diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAADODrv.dad b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAADODrv.dad
new file mode 100644
index 0000000..02c92d6
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAADODrv.dad differ
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAAnyDACDrv.dad b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAAnyDACDrv.dad
new file mode 100644
index 0000000..1963e5e
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAAnyDACDrv.dad differ
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DABDEDrv.dad b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DABDEDrv.dad
new file mode 100644
index 0000000..06f639f
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DABDEDrv.dad differ
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAConverter.exe b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAConverter.exe
new file mode 100644
index 0000000..fcb7211
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAConverter.exe differ
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DADBISAM3Drv.dad b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DADBISAM3Drv.dad
new file mode 100644
index 0000000..98e9be9
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DADBISAM3Drv.dad differ
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DADBISAM4Drv.dad b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DADBISAM4Drv.dad
new file mode 100644
index 0000000..604c9dd
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DADBISAM4Drv.dad differ
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DADBXDrv.dad b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DADBXDrv.dad
new file mode 100644
index 0000000..8d4bcb2
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DADBXDrv.dad differ
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAElevateDBDrv.dad b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAElevateDBDrv.dad
new file mode 100644
index 0000000..af89dea
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAElevateDBDrv.dad differ
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAFIBDrv.dad b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAFIBDrv.dad
new file mode 100644
index 0000000..52dbb8f
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAFIBDrv.dad differ
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAIBDACDrv.dad b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAIBDACDrv.dad
new file mode 100644
index 0000000..94d7147
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAIBDACDrv.dad differ
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAIBODrv.dad b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAIBODrv.dad
new file mode 100644
index 0000000..ba7298e
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAIBODrv.dad differ
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAIBXDrv.dad b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAIBXDrv.dad
new file mode 100644
index 0000000..d5bdae1
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAIBXDrv.dad differ
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAMyDACDrv.dad b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAMyDACDrv.dad
new file mode 100644
index 0000000..c457df8
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAMyDACDrv.dad differ
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAMySQLDACDrv.dad b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAMySQLDACDrv.dad
new file mode 100644
index 0000000..c1fdbe6
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAMySQLDACDrv.dad differ
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DANexusDBDrv.dad b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DANexusDBDrv.dad
new file mode 100644
index 0000000..779c18d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DANexusDBDrv.dad differ
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAODACDrv.dad b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAODACDrv.dad
new file mode 100644
index 0000000..08addb4
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAODACDrv.dad differ
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAPostgresDACDrv.dad b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAPostgresDACDrv.dad
new file mode 100644
index 0000000..3009f60
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAPostgresDACDrv.dad differ
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DASDACDrv.dad b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DASDACDrv.dad
new file mode 100644
index 0000000..f83fe1d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DASDACDrv.dad differ
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DASQLiteDrv.dad b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DASQLiteDrv.dad
new file mode 100644
index 0000000..1aec613
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DASQLiteDrv.dad differ
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DASchemaModeler.chm b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DASchemaModeler.chm
new file mode 100644
index 0000000..3873c8c
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DASchemaModeler.chm differ
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DASchemaModeler.exe b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DASchemaModeler.exe
new file mode 100644
index 0000000..8556fcb
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DASchemaModeler.exe differ
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAServer.exe b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAServer.exe
new file mode 100644
index 0000000..6d06eab
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAServer.exe differ
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAZeosDrv.dad b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAZeosDrv.dad
new file mode 100644
index 0000000..5470ba4
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DAZeosDrv.dad differ
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/Data Abstract.lic b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/Data Abstract.lic
new file mode 100644
index 0000000..51a3184
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/Data Abstract.lic	
@@ -0,0 +1,18 @@
+858331a3f6627cb5edad897b81e92c24542c2bd4e224284f86f4c5de2870c8e989978bee712e8654cb8c5cd8561fb3171743b80a7feb5ccad349208813d00b770fcf30a8e4fbc32fcd93dde70a9d6e58a5a6c52a1dea4a386eee6feed7ad369613c7d827d99529c4011ee3868997e243ce5ecc5a9bc1335cf514a3a4132b4af75e5f4eb39bda490711376264a57456afd4a46bd9b82e9275ea9524f65a59c73171b66ac4253dfff1e494d1d6636aa5098fbf868e72f1e1623726c382f73d1f61d90630686fb32fa8c28fe81f2323d3aba1ad6246c656cd3dbbf0190388ab176c8046f59a95f0d052897af2e98175339d3cb31faad526412273d97d7598d7235e
+314ea6e3de0c5478f767a86d9dedc6d345aadc1821a9bffa4e1da6cbcd92bc27e88e3d81376fd316b2f4d0519278e58e3d67474ced1a4dd17b9b90ad1a907b18
+Name=Trial
+Email=Trial
+UserId=Trial
+Company=Trial
+LicenseType=Default
+ProductName=Data Abstract
+Version=5
+AllowBeta=0
+Trial=1
+SubscriptionEndDate=2008-11-30
+LicenseFileEndDate=2008-11-29
+StartDate=2008-11-26
+EndDate=2009-8-29
+P1=5523046978612394123
+P2=14746419013494857097
+P3=1587299007
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DefaultConnections.ini b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DefaultConnections.ini
new file mode 100644
index 0000000..fd8e300
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/DefaultConnections.ini	
@@ -0,0 +1,14 @@
+[Delphi]
+AdventureWorks=ADO?AuxDriver=SQLNCLI.1;Server=localhost;Database=AdventureWorks;Schemas=1;Integrated Security=SSPI
+Northwind=ADO?AuxDriver=SQLOLEDB.1;Server=localhost;Database=Northwind;Integrated Security=SSPI
+Employee=IBX?Server=localhost;Database=C:\Program Files\Firebird\Firebird_1_5\examples\EMPLOYEE.FDB;UserID=sysdba;Password=masterkey;
+
+[.NET]
+AdventureWorks=MSSQL2005.NET?Database=AdventureWorks;Server=localhost;Integrated Security=SSPI
+Northwind=MSSQL.NET?Database=Northwind;Server=localhost;Integrated Security=SSPI
+Employee=FB.NET?Server=localhost;Database=C:\Program Files\Firebird\Firebird_1_5\examples\EMPLOYEE.FDB;UserID=sysdba;Password=masterkey;
+
+[Descriptions]
+AdventureWorks_Description=Microsoft SQL Server 2005, localhost
+Northwind_Description=Microsoft SQL Server 2000, localhost
+Employee_Description=Firebird/Interbase, localhost
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/borlndmm.dll b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/borlndmm.dll
new file mode 100644
index 0000000..2e3ede2
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/borlndmm.dll differ
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxasa30.dll b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxasa30.dll
new file mode 100644
index 0000000..3410b2f
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxasa30.dll differ
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxase30.dll b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxase30.dll
new file mode 100644
index 0000000..1977334
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxase30.dll differ
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxconnections.ini b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxconnections.ini
new file mode 100644
index 0000000..cd417db
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxconnections.ini	
@@ -0,0 +1,192 @@
+[DBXPoolConnection]
+DriverName=DBXPool
+MaxConnections=16
+MinConnections=0
+ConnectTimeout=0
+
+[DBXTraceConnection]
+DriverName=DBXTrace
+;TraceFile=c:\temp\dbxtrace.txt
+;TraceFlags=PARAMETER;ERROR;EXECUTE;COMMAND;CONNECT;TRANSACT;BLOB;MISC;VENDOR;READER;DRIVER_LOAD;METADATA
+;TraceDriver=true
+TraceFlags=NONE
+
+[DB2Connection]
+;DelegateConnection=DBXTraceConnection
+DriverName=DB2
+Database=DBNAME
+User_Name=user
+Password=password
+BlobSize=-1
+ErrorResourceFile=
+LocaleCode=0000
+DB2 TransIsolation=ReadCommited
+Decimal Separator=.
+
+[MySQLConnection]
+;DelegateConnection=DBXTraceConnection
+DriverName=MySQL
+HostName=ServerName
+Database=DBNAME
+User_Name=user
+Password=password
+BlobSize=-1
+ErrorResourceFile=
+LocaleCode=0000
+Compressed=False
+Encrypted=False
+
+
+[OracleConnection]
+;DelegateConnection=DBXTraceConnection
+DriverName=Oracle
+DataBase=Database Name
+User_Name=user
+Password=password
+RowsetSize=20
+BlobSize=-1
+ErrorResourceFile=
+LocaleCode=0000
+Oracle TransIsolation=ReadCommited
+OS Authentication=False
+Multiple Transaction=False
+Trim Char=False
+Decimal Separator=.
+
+[InformixConnection]
+;DelegateConnection=DBXTraceConnection
+DriverName=Informix
+HostName=ServerName
+DataBase=Database Name
+User_Name=user
+Password=password
+BlobSize=-1
+ErrorResourceFile=
+LocaleCode=0000
+Informix TransIsolation=ReadCommited
+Trim Char=False
+
+
+[ASAConnection]
+;DelegateConnection=DBXTraceConnection
+DriverName=ASA
+HostName=ServerName
+Database=DBNAME
+User_Name=user
+Password=password
+ConnectionString=
+BlobSize=-1
+ErrorResourceFile=
+LocaleCode=0000
+ASA TransIsolation=ReadCommited
+
+[ASEConnection]
+;DelegateConnection=DBXTraceConnection
+DriverName=ASE
+HostName=ServerName
+DataBase=Database Name
+User_Name=user
+Password=password
+BlobSize=-1
+ErrorResourceFile=
+LocaleCode=0000
+ASE TransIsolation=ReadCommited
+
+[BlackfishSQLCONNECTION]
+DriverName=BlackfishSQL
+HostName=localhost
+port=2508
+Database=databasename
+create=true
+User_Name=sysdba
+Password=masterkey
+BlobSize=-1
+TransIsolation=ReadCommited
+[Employee]
+DriverName=Interbase
+DriverUnit=DBXDynalink
+DriverPackageLoader=TDBXDynalinkDriverLoader,DbxDynalinkDriver100.bpl
+DriverPackage=DBXCommonDriver110.bpl
+DriverAssemblyLoader=Borland.Data.TDBXDynalinkDriverLoader,Borland.Data.DbxDynalinkDriver,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=91d62ebb5b0d1b1b
+DriverAssembly=Borland.Data.DbxCommonDriver,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=a91a7c5705831a4f
+Database=localhost:D:\EMPLOYEE.FDB
+RoleName=RoleName
+User_Name=sysdba
+Password=masterkey
+ServerCharSet=
+SQLDialect=3
+BlobSize=-1
+CommitRetain=False
+WaitOnLocks=True
+ErrorResourceFile=
+LocaleCode=0000
+Interbase TransIsolation=ReadCommited
+Trim Char=False
+MetaDataPackageLoader=TDBXInterbaseMetaDataCommandFactory,DbxReadOnlyMetaData100.bpl
+MetaDataAssemblyLoader=Borland.Data.TDBXInterbaseMetaDataCommandFactory,Borland.Data.DbxReadOnlyMetaData,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=91d62ebb5b0d1b1b
+[MSSQLConnection]
+SchemaOverride=sa.dbo
+DriverName=MSSQL
+HostName=localhost\sqlexpress
+DataBase=adventureWorks
+User_Name=sa
+Password=
+BlobSize=-1
+ErrorResourceFile=
+LocaleCode=0000
+MSSQL TransIsolation=ReadCommited
+OS Authentication=True
+Prepare SQL=False
+[AdventureWorks]
+DriverName=MSSQL
+SchemaOverride=%.dbo
+DriverUnit=DBXDynalink
+DriverPackageLoader=TDBXDynalinkDriverLoader,DBXDynalinkDriver100.bpl
+DriverPackage=DBXCommonDriver110.bpl
+DriverAssemblyLoader=Borland.Data.TDBXDynalinkDriverLoader,Borland.Data.DbxDynalinkDriver,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=91d62ebb5b0d1b1b
+DriverAssembly=Borland.Data.DbxCommonDriver,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=a91a7c5705831a4f
+HostName=wks1
+DataBase=master
+User_Name=sa
+Password=
+BlobSize=-1
+ErrorResourceFile=
+LocaleCode=0000
+MSSQL TransIsolation=ReadCommited
+OS Authentication=True
+Prepare SQL=False
+MetaDataPackageLoader=TDBXMsSqlMetaDataCommandFactory,DbxReadOnlyMetaData100.bpl
+MetaDataAssemblyLoader=Borland.Data.TDBXMsSqlMetaDataCommandFactory,Borland.Data.DbxReadOnlyMetaData,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=91d62ebb5b0d1b1b
+[ADO]
+DriverName=MSSQL
+SchemaOverride=%.dbo
+DriverUnit=DBXDynalink
+DriverPackageLoader=TDBXDynalinkDriverLoader
+DriverPackage=DBXCommonDriver110.bpl
+DriverAssemblyLoader=Borland.Data.TDBXDynalinkDriverLoader
+DriverAssembly=Borland.Data.DbxCommonDriver,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=a91a7c5705831a4f
+HostName=localhost
+DataBase=Northwind
+User_Name=sa
+Password=
+BlobSize=-1
+ErrorResourceFile=
+LocaleCode=0000
+MSSQL TransIsolation=ReadCommited
+OS Authentication=True
+Prepare SQL=False
+[IBConnection]
+DriverName=Interbase
+Database=database.gdb
+RoleName=RoleName
+User_Name=sysdba
+Password=masterkey
+ServerCharSet=
+SQLDialect=3
+ErrorResourceFile=
+LocaleCode=0000
+BlobSize=-1
+CommitRetain=False
+WaitOnLocks=True
+Interbase TransIsolation=ReadCommited
+Trim Char=False
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxdb230.dll b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxdb230.dll
new file mode 100644
index 0000000..b44bb92
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxdb230.dll differ
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxdrivers.ini b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxdrivers.ini
new file mode 100644
index 0000000..63a869f
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxdrivers.ini	
@@ -0,0 +1,301 @@
+[Installed Drivers]
+DB2=1
+Interbase=1
+MySQL=1
+Oracle=1
+Informix=1
+MSSQL=1
+ASA=1
+ASE=1
+DBXTrace=1
+DBXPool=1
+BlackfishSQL=1
+
+[DBXPool]
+DelegateDriver=True
+DriverName=DBXPool
+DriverUnit=DBXPool
+DriverPackageLoader=TDBXPoolDriverLoader,DBXCommonDriver100.bpl
+DriverPackage=DBXCommonDriver110.bpl
+DriverAssemblyLoader=Borland.Data.TDBXPoolDriverLoader,Borland.Data.DbxCommonDriver,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=91d62ebb5b0d1b1b
+DriverAssembly=Borland.Data.DbxCommonDriver,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=a91a7c5705831a4f
+
+[DBXTrace]
+DelegateDriver=True
+DriverName=DBXTrace
+DriverUnit=DBXTrace
+DriverPackageLoader=TDBXTraceDriverLoader,DBXCommonDriver100.bpl
+DriverPackage=DBXCommonDriver110.bpl
+DriverAssemblyLoader=Borland.Data.TDBXTraceDriverLoader,Borland.Data.DbxCommonDriver,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=91d62ebb5b0d1b1b
+DriverAssembly=Borland.Data.DbxCommonDriver,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=a91a7c5705831a4f
+
+[DB2]
+DriverUnit=DBXDynalink
+DriverPackageLoader=TDBXDynalinkDriverLoader,DBXDynalinkDriver100.bpl
+DriverPackage=DBXCommonDriver110.bpl
+DriverAssemblyLoader=Borland.Data.TDBXDynalinkDriverLoader,Borland.Data.DbxDynalinkDriver,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=91d62ebb5b0d1b1b
+DriverAssembly=Borland.Data.DbxCommonDriver,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=a91a7c5705831a4f
+
+GetDriverFunc=getSQLDriverDB2
+LibraryName=dbxdb230.dll
+VendorLib=db2cli.dll
+Database=DBNAME
+User_Name=user
+Password=password
+BlobSize=-1
+ErrorResourceFile=
+LocaleCode=0000
+DB2 TransIsolation=ReadCommited
+Decimal Separator=.
+MetaDataPackageLoader=TDBXDb2MetaDataCommandFactory,DbxReadOnlyMetaData100.bpl
+MetaDataAssemblyLoader=Borland.Data.TDBXDb2MetaDataCommandFactory,Borland.Data.DbxReadOnlyMetaData,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=91d62ebb5b0d1b1b
+
+[Interbase]
+DriverUnit=DBXDynalink
+DriverPackageLoader=TDBXDynalinkDriverLoader,DbxDynalinkDriver100.bpl
+DriverPackage=DBXCommonDriver110.bpl
+DriverAssemblyLoader=Borland.Data.TDBXDynalinkDriverLoader,Borland.Data.DbxDynalinkDriver,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=91d62ebb5b0d1b1b
+DriverAssembly=Borland.Data.DbxCommonDriver,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=a91a7c5705831a4f
+
+GetDriverFunc=getSQLDriverINTERBASE
+LibraryName=dbxint30.dll
+VendorLib=GDS32.DLL
+Database=database.gdb
+RoleName=RoleName
+User_Name=sysdba
+Password=masterkey
+ServerCharSet=
+SQLDialect=3
+BlobSize=-1
+CommitRetain=False
+WaitOnLocks=True
+ErrorResourceFile=
+LocaleCode=0000
+Interbase TransIsolation=ReadCommited
+Trim Char=False
+MetaDataPackageLoader=TDBXInterbaseMetaDataCommandFactory,DbxReadOnlyMetaData100.bpl
+MetaDataAssemblyLoader=Borland.Data.TDBXInterbaseMetaDataCommandFactory,Borland.Data.DbxReadOnlyMetaData,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=91d62ebb5b0d1b1b
+
+[MySQL]
+DriverUnit=DBXDynalink
+DriverPackageLoader=TDBXDynalinkDriverLoader,DbxDynalinkDriver100.bpl
+DriverPackage=DBXCommonDriver110.bpl
+DriverAssemblyLoader=Borland.Data.TDBXDynalinkDriverLoader,Borland.Data.DbxDynalinkDriver,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=91d62ebb5b0d1b1b
+DriverAssembly=Borland.Data.DbxCommonDriver,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=a91a7c5705831a4f
+
+GetDriverFunc=getSQLDriverMYSQL
+LibraryName=dbxmys30.dll
+VendorLib=LIBMYSQL.dll
+HostName=ServerName
+Database=DBNAME
+User_Name=user
+Password=password
+BlobSize=-1
+ErrorResourceFile=
+LocaleCode=0000
+Compressed=False
+Encrypted=False
+MetaDataPackageLoader=TDBXMySqlMetaDataCommandFactory,DbxReadOnlyMetaData100.bpl
+MetaDataAssemblyLoader=Borland.Data.TDBXMySqlMetaDataCommandFactory,Borland.Data.DbxReadOnlyMetaData,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=91d62ebb5b0d1b1b
+
+[Oracle]
+DriverUnit=DBXDynalink
+DriverPackageLoader=TDBXDynalinkDriverLoader,DBXDynalinkDriver100.bpl
+DriverPackage=DBXCommonDriver110.bpl
+DriverAssemblyLoader=Borland.Data.TDBXDynalinkDriverLoader,Borland.Data.DbxDynalinkDriver,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=91d62ebb5b0d1b1b
+DriverAssembly=Borland.Data.DbxCommonDriver,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=a91a7c5705831a4f
+
+GetDriverFunc=getSQLDriverORACLE
+LibraryName=dbxora30.dll
+VendorLib=oci.dll
+DataBase=Database Name
+User_Name=user
+Password=password
+BlobSize=-1
+ErrorResourceFile=
+LocaleCode=0000
+Oracle TransIsolation=ReadCommited
+RowsetSize=20
+OS Authentication=False
+Multiple Transaction=False
+Trim Char=False
+Decimal Separator=.
+MetaDataPackageLoader=TDBXOracleMetaDataCommandFactory,DbxReadOnlyMetaData100.bpl
+MetaDataAssemblyLoader=Borland.Data.TDBXOracleMetaDataCommandFactory,Borland.Data.DbxReadOnlyMetaData,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=91d62ebb5b0d1b1b
+
+[Informix]
+DriverUnit=DBXDynalink
+DriverPackageLoader=TDBXDynalinkDriverLoader,DBXDynalinkDriver100.bpl
+DriverPackage=DBXCommonDriver110.bpl
+DriverAssemblyLoader=Borland.Data.TDBXDynalinkDriverLoader,Borland.Data.DbxDynalinkDriver,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=91d62ebb5b0d1b1b
+DriverAssembly=Borland.Data.DbxCommonDriver,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=a91a7c5705831a4f
+
+GetDriverFunc=getSQLDriverINFORMIX
+LibraryName=dbxinf30.dll
+VendorLib=isqlt09a.dll
+HostName=ServerName
+DataBase=Database Name
+User_Name=user
+Password=password
+BlobSize=-1
+ErrorResourceFile=
+LocaleCode=0000
+Informix TransIsolation=ReadCommited
+Trim Char=False
+MetaDataPackageLoader=TDBXInformixMetaDataCommandFactory,DbxReadOnlyMetaData100.bpl
+MetaDataAssemblyLoader=Borland.Data.TDBXInformixMetaDataCommandFactory,Borland.Data.DbxReadOnlyMetaData,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=91d62ebb5b0d1b1b
+
+[MSSQL]
+SchemaOverride=%.dbo
+DriverUnit=DBXDynalink
+DriverPackageLoader=TDBXDynalinkDriverLoader,DBXDynalinkDriver100.bpl
+DriverPackage=DBXCommonDriver110.bpl
+DriverAssemblyLoader=Borland.Data.TDBXDynalinkDriverLoader,Borland.Data.DbxDynalinkDriver,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=91d62ebb5b0d1b1b
+DriverAssembly=Borland.Data.DbxCommonDriver,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=a91a7c5705831a4f
+
+GetDriverFunc=getSQLDriverMSSQL
+LibraryName=dbxmss30.dll
+VendorLib=oledb
+HostName=ServerName
+DataBase=Database Name
+User_Name=user
+Password=password
+BlobSize=-1
+ErrorResourceFile=
+LocaleCode=0000
+MSSQL TransIsolation=ReadCommited
+OS Authentication=False
+Prepare SQL=False
+MetaDataPackageLoader=TDBXMsSqlMetaDataCommandFactory,DbxReadOnlyMetaData100.bpl
+MetaDataAssemblyLoader=Borland.Data.TDBXMsSqlMetaDataCommandFactory,Borland.Data.DbxReadOnlyMetaData,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=91d62ebb5b0d1b1b
+
+[ASA]
+DriverUnit=DBXDynalink
+DriverPackageLoader=TDBXDynalinkDriverLoader,DbxDynalinkDriver100.bpl
+DriverPackage=DBXCommonDriver110.bpl
+DriverAssemblyLoader=Borland.Data.TDBXDynalinkDriverLoader,Borland.Data.DbxDynalinkDriver,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=91d62ebb5b0d1b1b
+DriverAssembly=Borland.Data.DbxCommonDriver,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=a91a7c5705831a4f
+
+GetDriverFunc=getSQLDriverASA
+LibraryName=dbxasa30.dll
+VendorLib=dbodbc9.dll
+HostName=ServerName
+Database=DBNAME
+User_Name=user
+Password=password
+ConnectionString=
+BlobSize=-1
+ErrorResourceFile=
+LocaleCode=0000
+ASA TransIsolation=ReadCommited
+MetaDataPackageLoader=TDBXSybaseASAMetaDataCommandFactory,DbxReadOnlyMetaData100.bpl
+MetaDataAssemblyLoader=Borland.Data.TDBXSybaseASAMetaDataCommandFactory,Borland.Data.DbxReadOnlyMetaData,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=91d62ebb5b0d1b1b
+
+[ASE]
+DriverUnit=DBXDynalink
+DriverPackageLoader=TDBXDynalinkDriverLoader,DBXDynalinkDriver100.bpl
+DriverPackage=DBXCommonDriver110.bpl
+DriverAssemblyLoader=Borland.Data.TDBXDynalinkDriverLoader,Borland.Data.DbxDynalinkDriver,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=91d62ebb5b0d1b1b
+DriverAssembly=Borland.Data.DbxCommonDriver,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=a91a7c5705831a4f
+
+GetDriverFunc=getSQLDriverASE
+LibraryName=dbxase30.dll
+VendorLib=libct.dll;libcs.dll
+HostName=ServerName
+DataBase=Database Name
+User_Name=user
+Password=password
+BlobSize=-1
+TDS Packet Size=512
+Client HostName=
+Client AppName=
+ErrorResourceFile=
+LocaleCode=0000
+ASE TransIsolation=ReadCommited
+MetaDataPackageLoader=TDBXSybaseASEMetaDataCommandFactory,DbxReadOnlyMetaData100.bpl
+MetaDataAssemblyLoader=Borland.Data.TDBXSybaseASEMetaDataCommandFactory,Borland.Data.DbxReadOnlyMetaData,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=91d62ebb5b0d1b1b
+
+[AutoCommit]
+False=0
+True=1
+
+[BlockingMode]
+False=0
+True=1
+
+[WaitOnLocks]
+False=1
+True=0
+
+[CommitRetain]
+False=0
+True=1
+
+[OS Authentication]
+False=0
+True=1
+
+[Multiple Transaction]
+False=0
+True=1
+
+[Trim Char]
+False=0
+True=1
+
+[DB2 TransIsolation]
+DirtyRead=0
+ReadCommited=1
+RepeatableRead=2
+
+[Interbase TransIsolation]
+ReadCommited=1
+RepeatableRead=2
+
+[Oracle TransIsolation]
+DirtyRead=0
+ReadCommited=1
+RepeatableRead=2
+
+[Informix TransIsolation]
+DirtyRead=0
+ReadCommited=1
+RepeatableRead=2
+
+[MSSQL TransIsolation]
+DirtyRead=0
+ReadCommited=1
+RepeatableRead=2
+
+[ASA TransIsolation]
+DirtyRead=0
+ReadCommited=1
+RepeatableRead=2
+
+[ASE TransIsolation]
+DirtyRead=0
+ReadCommited=1
+RepeatableRead=2
+
+[SQLDialect]
+1=0
+2=1
+3=2
+
+[Bdp Providers]
+Oracle=Oracle
+Sybase=Sybase
+Interbase=Interbase
+DB2=DB2
+MySql=MySql
+[BlackfishSQL]
+DriverUnit=DBXClient
+DriverPackageLoader=TDBXClientDriverLoader,DBXClientDriver100.bpl
+DriverAssemblyLoader=Borland.Data.TDBXClientDriverLoader,Borland.Data.DbxClientDriver,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=91d62ebb5b0d1b1b
+MetaDataPackageLoader=TDBXDataStoreMetaDataCommandFactory,DbxReadOnlyMetaData100.bpl
+MetaDataAssemblyLoader=Borland.Data.TDBXDataStoreMetaDataCommandFactory,Borland.Data.DbxReadOnlyMetaData,Version=11.0.5000.0,Culture=neutral,PublicKeyToken=91d62ebb5b0d1b1b
+Password=masterkey
+User_Name=sysdba
+Port=2508
+Create=False
+ReadOnlyDb=False
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxinf30.dll b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxinf30.dll
new file mode 100644
index 0000000..75f6178
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxinf30.dll differ
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxint30.dll b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxint30.dll
new file mode 100644
index 0000000..6be9532
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxint30.dll differ
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxmss30.dll b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxmss30.dll
new file mode 100644
index 0000000..770053b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxmss30.dll differ
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxmys30.dll b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxmys30.dll
new file mode 100644
index 0000000..9795083
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxmys30.dll differ
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxmysA30.dll b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxmysA30.dll
new file mode 100644
index 0000000..e7a34cf
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxmysA30.dll differ
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxora30.dll b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxora30.dll
new file mode 100644
index 0000000..f39c32d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxora30.dll differ
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxoraw30.dll b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxoraw30.dll
new file mode 100644
index 0000000..72fdf4d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/dbxoraw30.dll differ
diff --git a/internal/5.0.35.741/1/Data Abstract (Common)/Bin/sqlite3.dll b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/sqlite3.dll
new file mode 100644
index 0000000..7111873
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract (Common)/Bin/sqlite3.dll differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_ADODriver_D10.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_ADODriver_D10.bpl
new file mode 100644
index 0000000..f42598a
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_ADODriver_D10.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_ADODriver_D10.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_ADODriver_D10.dcp
new file mode 100644
index 0000000..33d6961
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_ADODriver_D10.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_BDEDriver_D10.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_BDEDriver_D10.bpl
new file mode 100644
index 0000000..c44338d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_BDEDriver_D10.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_BDEDriver_D10.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_BDEDriver_D10.dcp
new file mode 100644
index 0000000..bc81f21
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_BDEDriver_D10.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_Core_D10.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_Core_D10.bpl
new file mode 100644
index 0000000..be95b76
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_Core_D10.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_Core_D10.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_Core_D10.dcp
new file mode 100644
index 0000000..bbee11d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_Core_D10.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_DBXDriver_D10.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_DBXDriver_D10.bpl
new file mode 100644
index 0000000..3df8a01
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_DBXDriver_D10.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_DBXDriver_D10.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_DBXDriver_D10.dcp
new file mode 100644
index 0000000..d46eaeb
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_DBXDriver_D10.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_IBXDriver_D10.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_IBXDriver_D10.bpl
new file mode 100644
index 0000000..1925b05
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_IBXDriver_D10.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_IBXDriver_D10.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_IBXDriver_D10.dcp
new file mode 100644
index 0000000..b14563e
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_IBXDriver_D10.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_IDE_D10.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_IDE_D10.bpl
new file mode 100644
index 0000000..7df2429
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_IDE_D10.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_IDE_D10.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_IDE_D10.dcp
new file mode 100644
index 0000000..62f287e
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_IDE_D10.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_SQLiteDriver_D10.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_SQLiteDriver_D10.bpl
new file mode 100644
index 0000000..1e56025
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_SQLiteDriver_D10.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_SQLiteDriver_D10.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_SQLiteDriver_D10.dcp
new file mode 100644
index 0000000..f4248ec
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_SQLiteDriver_D10.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_Scripting_D10.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_Scripting_D10.bpl
new file mode 100644
index 0000000..5a4af9c
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_Scripting_D10.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_Scripting_D10.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_Scripting_D10.dcp
new file mode 100644
index 0000000..107c36d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D10/DataAbstract_Scripting_D10.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_ADODriver_D11.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_ADODriver_D11.bpl
new file mode 100644
index 0000000..61958fb
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_ADODriver_D11.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_ADODriver_D11.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_ADODriver_D11.dcp
new file mode 100644
index 0000000..db3de5d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_ADODriver_D11.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_BDEDriver_D11.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_BDEDriver_D11.bpl
new file mode 100644
index 0000000..a1c2dc8
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_BDEDriver_D11.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_BDEDriver_D11.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_BDEDriver_D11.dcp
new file mode 100644
index 0000000..ba6332c
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_BDEDriver_D11.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_Core_D11.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_Core_D11.bpl
new file mode 100644
index 0000000..1fb8158
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_Core_D11.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_Core_D11.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_Core_D11.dcp
new file mode 100644
index 0000000..3700ba5
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_Core_D11.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_DBXDriver_D11.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_DBXDriver_D11.bpl
new file mode 100644
index 0000000..5765ec1
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_DBXDriver_D11.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_DBXDriver_D11.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_DBXDriver_D11.dcp
new file mode 100644
index 0000000..6dfadd3
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_DBXDriver_D11.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_IBXDriver_D11.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_IBXDriver_D11.bpl
new file mode 100644
index 0000000..f69bd9c
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_IBXDriver_D11.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_IBXDriver_D11.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_IBXDriver_D11.dcp
new file mode 100644
index 0000000..9b83e7e
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_IBXDriver_D11.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_IDE_D11.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_IDE_D11.bpl
new file mode 100644
index 0000000..1b6941d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_IDE_D11.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_IDE_D11.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_IDE_D11.dcp
new file mode 100644
index 0000000..4e1277d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_IDE_D11.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_SQLiteDriver_D11.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_SQLiteDriver_D11.bpl
new file mode 100644
index 0000000..213c44d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_SQLiteDriver_D11.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_SQLiteDriver_D11.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_SQLiteDriver_D11.dcp
new file mode 100644
index 0000000..1bf2484
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_SQLiteDriver_D11.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_Scripting_D11.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_Scripting_D11.bpl
new file mode 100644
index 0000000..735fba1
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_Scripting_D11.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_Scripting_D11.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_Scripting_D11.dcp
new file mode 100644
index 0000000..04f8fce
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D11/DataAbstract_Scripting_D11.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/BaseLoginService_Impl.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/BaseLoginService_Impl.dcu
new file mode 100644
index 0000000..7feb271
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/BaseLoginService_Impl.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DALoginService_Impl.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DALoginService_Impl.dcu
new file mode 100644
index 0000000..bac5c36
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DALoginService_Impl.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DARemoteService_Impl.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DARemoteService_Impl.dcu
new file mode 100644
index 0000000..ce9c902
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DARemoteService_Impl.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract3_Async.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract3_Async.dcu
new file mode 100644
index 0000000..a103436
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract3_Async.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract3_Intf.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract3_Intf.dcu
new file mode 100644
index 0000000..e11e64c
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract3_Intf.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract3_Invk.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract3_Invk.dcu
new file mode 100644
index 0000000..f8002d2
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract3_Invk.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract4_Async.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract4_Async.dcu
new file mode 100644
index 0000000..01936d9
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract4_Async.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract4_Intf.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract4_Intf.dcu
new file mode 100644
index 0000000..e0dbec1
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract4_Intf.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract4_Invk.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract4_Invk.dcu
new file mode 100644
index 0000000..4a234ea
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract4_Invk.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstractService_Impl.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstractService_Impl.dcu
new file mode 100644
index 0000000..5a726c3
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstractService_Impl.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_ADODriver_D12.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_ADODriver_D12.bpl
new file mode 100644
index 0000000..05587eb
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_ADODriver_D12.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_ADODriver_D12.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_ADODriver_D12.dcp
new file mode 100644
index 0000000..3a2b7a8
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_ADODriver_D12.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_ADODriver_D12.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_ADODriver_D12.dcu
new file mode 100644
index 0000000..9d98b44
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_ADODriver_D12.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_BDEDriver_D12.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_BDEDriver_D12.bpl
new file mode 100644
index 0000000..ba31447
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_BDEDriver_D12.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_BDEDriver_D12.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_BDEDriver_D12.dcp
new file mode 100644
index 0000000..394b3ab
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_BDEDriver_D12.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_BDEDriver_D12.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_BDEDriver_D12.dcu
new file mode 100644
index 0000000..c4df573
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_BDEDriver_D12.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_Core_D12.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_Core_D12.bpl
new file mode 100644
index 0000000..809baa7
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_Core_D12.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_Core_D12.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_Core_D12.dcp
new file mode 100644
index 0000000..b3bd4d0
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_Core_D12.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_Core_D12.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_Core_D12.dcu
new file mode 100644
index 0000000..2109899
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_Core_D12.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_Core_Reg.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_Core_Reg.dcu
new file mode 100644
index 0000000..09a48b6
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_Core_Reg.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_DBXDriver_D12.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_DBXDriver_D12.bpl
new file mode 100644
index 0000000..74a565b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_DBXDriver_D12.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_DBXDriver_D12.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_DBXDriver_D12.dcp
new file mode 100644
index 0000000..cea18ea
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_DBXDriver_D12.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_DBXDriver_D12.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_DBXDriver_D12.dcu
new file mode 100644
index 0000000..928661b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_DBXDriver_D12.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_IBXDriver_D12.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_IBXDriver_D12.bpl
new file mode 100644
index 0000000..b7e45e4
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_IBXDriver_D12.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_IBXDriver_D12.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_IBXDriver_D12.dcp
new file mode 100644
index 0000000..eb642ed
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_IBXDriver_D12.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_IBXDriver_D12.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_IBXDriver_D12.dcu
new file mode 100644
index 0000000..c12b4e0
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_IBXDriver_D12.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_IDE_D12.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_IDE_D12.bpl
new file mode 100644
index 0000000..4f82145
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_IDE_D12.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_IDE_D12.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_IDE_D12.dcp
new file mode 100644
index 0000000..529f62e
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_IDE_D12.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_IDE_D12.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_IDE_D12.dcu
new file mode 100644
index 0000000..dd546a6
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_IDE_D12.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_IDE_Reg.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_IDE_Reg.dcu
new file mode 100644
index 0000000..ce62a25
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_IDE_Reg.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_Scripting_D12.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_Scripting_D12.bpl
new file mode 100644
index 0000000..566ee4e
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_Scripting_D12.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_Scripting_D12.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_Scripting_D12.dcp
new file mode 100644
index 0000000..3f1087f
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_Scripting_D12.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_Scripting_D12.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_Scripting_D12.dcu
new file mode 100644
index 0000000..f7b16ee
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_Scripting_D12.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_Scripting_Reg.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_Scripting_Reg.dcu
new file mode 100644
index 0000000..1cb18e0
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/DataAbstract_Scripting_Reg.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/MultiDbLoginServiceV5_Impl.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/MultiDbLoginServiceV5_Impl.dcu
new file mode 100644
index 0000000..259529b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/MultiDbLoginServiceV5_Impl.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/MultiDbLoginService_Impl.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/MultiDbLoginService_Impl.dcu
new file mode 100644
index 0000000..43262b2
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/MultiDbLoginService_Impl.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/SimpleLoginService_Impl.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/SimpleLoginService_Impl.dcu
new file mode 100644
index 0000000..74ac45d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/SimpleLoginService_Impl.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAADODataTable.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAADODataTable.dcu
new file mode 100644
index 0000000..d2a24a5
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAADODataTable.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAADODriver.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAADODriver.dcu
new file mode 100644
index 0000000..e23fbca
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAADODriver.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAADOInterfaces.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAADOInterfaces.dcu
new file mode 100644
index 0000000..d590e1e
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAADOInterfaces.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDABDEDriver.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDABDEDriver.dcu
new file mode 100644
index 0000000..980a370
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDABDEDriver.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDABin2DataStreamer.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDABin2DataStreamer.dcu
new file mode 100644
index 0000000..e3dacc3
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDABin2DataStreamer.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDABinAdapter.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDABinAdapter.dcu
new file mode 100644
index 0000000..a3fd501
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDABinAdapter.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDABusinessProcessor.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDABusinessProcessor.dcu
new file mode 100644
index 0000000..7be506f
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDABusinessProcessor.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDACDSDataTable.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDACDSDataTable.dcu
new file mode 100644
index 0000000..1b00937
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDACDSDataTable.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDACache.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDACache.dcu
new file mode 100644
index 0000000..ee49a94
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDACache.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAClasses.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAClasses.dcu
new file mode 100644
index 0000000..470fd8c
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAClasses.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAClientDataModule.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAClientDataModule.dcu
new file mode 100644
index 0000000..ca375ea
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAClientDataModule.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADB2Interfaces.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADB2Interfaces.dcu
new file mode 100644
index 0000000..f22d534
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADB2Interfaces.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADBSessionManager.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADBSessionManager.dcu
new file mode 100644
index 0000000..de084a3
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADBSessionManager.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADBSessionManagerEditor.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADBSessionManagerEditor.dcu
new file mode 100644
index 0000000..4c781a6
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADBSessionManagerEditor.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADBXDriver.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADBXDriver.dcu
new file mode 100644
index 0000000..a5bffcf
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADBXDriver.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADataAbstractEditors.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADataAbstractEditors.dcu
new file mode 100644
index 0000000..a76ba49
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADataAbstractEditors.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADataStreamer.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADataStreamer.dcu
new file mode 100644
index 0000000..9c351d4
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADataStreamer.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADataTable.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADataTable.dcu
new file mode 100644
index 0000000..a30b49a
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADataTable.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADataTableMasterLinkWizardForm.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADataTableMasterLinkWizardForm.dcu
new file mode 100644
index 0000000..d864099
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADataTableMasterLinkWizardForm.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADataTableReferenceCollection.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADataTableReferenceCollection.dcu
new file mode 100644
index 0000000..3daaa76
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADataTableReferenceCollection.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADataTableWizards.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADataTableWizards.dcu
new file mode 100644
index 0000000..58f231b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADataTableWizards.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADatasetProvider.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADatasetProvider.dcu
new file mode 100644
index 0000000..ba6307e
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADatasetProvider.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADatasetWrapper.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADatasetWrapper.dcu
new file mode 100644
index 0000000..2eb0efa
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADatasetWrapper.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADelta.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADelta.dcu
new file mode 100644
index 0000000..4e2854c
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADelta.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADesigntimeCall.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADesigntimeCall.dcu
new file mode 100644
index 0000000..4c496e6
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADesigntimeCall.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADriverInfo.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADriverInfo.dcu
new file mode 100644
index 0000000..58fd869
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADriverInfo.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADriverManager.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADriverManager.dcu
new file mode 100644
index 0000000..e7f4c66
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDADriverManager.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAElevateDBInterfaces.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAElevateDBInterfaces.dcu
new file mode 100644
index 0000000..02acaee
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAElevateDBInterfaces.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAEngine.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAEngine.dcu
new file mode 100644
index 0000000..19315e8
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAEngine.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAExceptions.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAExceptions.dcu
new file mode 100644
index 0000000..7976213
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAExceptions.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAExpressionEvaluator.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAExpressionEvaluator.dcu
new file mode 100644
index 0000000..7d4c5af
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAExpressionEvaluator.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAGuideWizardForm.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAGuideWizardForm.dcu
new file mode 100644
index 0000000..8586d78
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAGuideWizardForm.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAHETConnections.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAHETConnections.dcu
new file mode 100644
index 0000000..00a71b3
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAHETConnections.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAHETDriver.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAHETDriver.dcu
new file mode 100644
index 0000000..a390fda
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAHETDriver.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAHelpers.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAHelpers.dcu
new file mode 100644
index 0000000..e54c127
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAHelpers.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAIBInterfaces.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAIBInterfaces.dcu
new file mode 100644
index 0000000..12945b8
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAIBInterfaces.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAIBXDriver.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAIBXDriver.dcu
new file mode 100644
index 0000000..71e75aa
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAIBXDriver.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAIDEData.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAIDEData.dcu
new file mode 100644
index 0000000..cba842a
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAIDEData.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAIDEMenu.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAIDEMenu.dcu
new file mode 100644
index 0000000..2879a78
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAIDEMenu.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAIDERes.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAIDERes.dcu
new file mode 100644
index 0000000..0962084
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAIDERes.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAInterfaces.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAInterfaces.dcu
new file mode 100644
index 0000000..7044b07
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAInterfaces.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAInterfacesEx.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAInterfacesEx.dcu
new file mode 100644
index 0000000..5477447
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAInterfacesEx.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAMacroProcessors.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAMacroProcessors.dcu
new file mode 100644
index 0000000..a4d8a9c
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAMacroProcessors.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAMacros.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAMacros.dcu
new file mode 100644
index 0000000..162a177
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAMacros.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAMemDataTable.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAMemDataTable.dcu
new file mode 100644
index 0000000..8839a16
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAMemDataTable.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAMemDataset.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAMemDataset.dcu
new file mode 100644
index 0000000..e8cc7e1
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAMemDataset.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAMySQLInterfaces.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAMySQLInterfaces.dcu
new file mode 100644
index 0000000..4f10bd2
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAMySQLInterfaces.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAOracleInterfaces.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAOracleInterfaces.dcu
new file mode 100644
index 0000000..18d3ce7
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAOracleInterfaces.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAPSScriptingProvider.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAPSScriptingProvider.dcu
new file mode 100644
index 0000000..598af2d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAPSScriptingProvider.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAPascalScript.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAPascalScript.dcu
new file mode 100644
index 0000000..546c8de
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAPascalScript.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAPleaseWaitForm.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAPleaseWaitForm.dcu
new file mode 100644
index 0000000..3ef5126
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAPleaseWaitForm.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAPostgresInterfaces.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAPostgresInterfaces.dcu
new file mode 100644
index 0000000..4836b7f
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAPostgresInterfaces.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAPoweredByDataAbstractButton.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAPoweredByDataAbstractButton.dcu
new file mode 100644
index 0000000..a624cf5
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAPoweredByDataAbstractButton.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAReconcileDialog.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAReconcileDialog.dcu
new file mode 100644
index 0000000..fd72218
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAReconcileDialog.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAReconcileDialogDetails.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAReconcileDialogDetails.dcu
new file mode 100644
index 0000000..25d0ce9
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAReconcileDialogDetails.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDARegExpr.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDARegExpr.dcu
new file mode 100644
index 0000000..b06fa02
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDARegExpr.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDARemoteCommand.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDARemoteCommand.dcu
new file mode 100644
index 0000000..d4b8c54
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDARemoteCommand.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDARemoteDataAdapter.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDARemoteDataAdapter.dcu
new file mode 100644
index 0000000..59b2d1e
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDARemoteDataAdapter.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDARemoteDataAdapterRequests.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDARemoteDataAdapterRequests.dcu
new file mode 100644
index 0000000..b156bb9
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDARemoteDataAdapterRequests.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDARes.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDARes.dcu
new file mode 100644
index 0000000..85c57dc
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDARes.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDASQL92Interfaces.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDASQL92Interfaces.dcu
new file mode 100644
index 0000000..34c7370
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDASQL92Interfaces.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDASQL92QueryBuilder.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDASQL92QueryBuilder.dcu
new file mode 100644
index 0000000..cfa6302
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDASQL92QueryBuilder.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDASQLiteInterfaces.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDASQLiteInterfaces.dcu
new file mode 100644
index 0000000..580ca47
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDASQLiteInterfaces.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDASchemaUnitsGenerator.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDASchemaUnitsGenerator.dcu
new file mode 100644
index 0000000..e869f30
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDASchemaUnitsGenerator.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAScriptingProvider.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAScriptingProvider.dcu
new file mode 100644
index 0000000..7f448a7
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAScriptingProvider.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDASelectDataTablesForm.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDASelectDataTablesForm.dcu
new file mode 100644
index 0000000..92e8e66
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDASelectDataTablesForm.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAServerLog.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAServerLog.dcu
new file mode 100644
index 0000000..ea2e864
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAServerLog.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDASupportClasses.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDASupportClasses.dcu
new file mode 100644
index 0000000..72291e5
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDASupportClasses.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDASybaseInterfaces.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDASybaseInterfaces.dcu
new file mode 100644
index 0000000..179d0ad
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDASybaseInterfaces.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAUtils.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAUtils.dcu
new file mode 100644
index 0000000..d21a277
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAUtils.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAWhere.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAWhere.dcu
new file mode 100644
index 0000000..0b681fe
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAWhere.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAXMLUtils.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAXMLUtils.dcu
new file mode 100644
index 0000000..41f2f8e
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAXMLUtils.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAXmlAdapter.dcu b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAXmlAdapter.dcu
new file mode 100644
index 0000000..0537853
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D12/uDAXmlAdapter.dcu differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_ADODriver_D6.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_ADODriver_D6.bpl
new file mode 100644
index 0000000..f189d9c
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_ADODriver_D6.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_ADODriver_D6.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_ADODriver_D6.dcp
new file mode 100644
index 0000000..ea67b34
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_ADODriver_D6.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_BDEDriver_D6.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_BDEDriver_D6.bpl
new file mode 100644
index 0000000..54cb8b7
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_BDEDriver_D6.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_BDEDriver_D6.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_BDEDriver_D6.dcp
new file mode 100644
index 0000000..1f3e2ba
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_BDEDriver_D6.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_Core_D6.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_Core_D6.bpl
new file mode 100644
index 0000000..7ebdfd9
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_Core_D6.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_Core_D6.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_Core_D6.dcp
new file mode 100644
index 0000000..2c41152
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_Core_D6.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_DBXDriver_D6.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_DBXDriver_D6.bpl
new file mode 100644
index 0000000..142efda
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_DBXDriver_D6.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_DBXDriver_D6.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_DBXDriver_D6.dcp
new file mode 100644
index 0000000..5921fe1
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_DBXDriver_D6.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_IBXDriver_D6.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_IBXDriver_D6.bpl
new file mode 100644
index 0000000..4b3a4de
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_IBXDriver_D6.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_IBXDriver_D6.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_IBXDriver_D6.dcp
new file mode 100644
index 0000000..cc75c28
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_IBXDriver_D6.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_IDE_D6.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_IDE_D6.bpl
new file mode 100644
index 0000000..c1365df
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_IDE_D6.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_IDE_D6.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_IDE_D6.dcp
new file mode 100644
index 0000000..8461b40
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_IDE_D6.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_SQLiteDriver_D6.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_SQLiteDriver_D6.bpl
new file mode 100644
index 0000000..25565ed
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_SQLiteDriver_D6.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_SQLiteDriver_D6.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_SQLiteDriver_D6.dcp
new file mode 100644
index 0000000..eed5297
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_SQLiteDriver_D6.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_Scripting_D6.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_Scripting_D6.bpl
new file mode 100644
index 0000000..eafdd66
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_Scripting_D6.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_Scripting_D6.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_Scripting_D6.dcp
new file mode 100644
index 0000000..ecd6af8
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D6/DataAbstract_Scripting_D6.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_ADODriver_D7.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_ADODriver_D7.bpl
new file mode 100644
index 0000000..3e62ccc
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_ADODriver_D7.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_ADODriver_D7.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_ADODriver_D7.dcp
new file mode 100644
index 0000000..ca16b29
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_ADODriver_D7.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_BDEDriver_D7.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_BDEDriver_D7.bpl
new file mode 100644
index 0000000..796ce19
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_BDEDriver_D7.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_BDEDriver_D7.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_BDEDriver_D7.dcp
new file mode 100644
index 0000000..10fcb3e
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_BDEDriver_D7.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_Core_D7.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_Core_D7.bpl
new file mode 100644
index 0000000..bfc1bd5
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_Core_D7.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_Core_D7.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_Core_D7.dcp
new file mode 100644
index 0000000..bde11d7
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_Core_D7.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_DBXDriver_D7.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_DBXDriver_D7.bpl
new file mode 100644
index 0000000..e520856
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_DBXDriver_D7.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_DBXDriver_D7.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_DBXDriver_D7.dcp
new file mode 100644
index 0000000..520e3c7
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_DBXDriver_D7.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_IBXDriver_D7.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_IBXDriver_D7.bpl
new file mode 100644
index 0000000..8d647f6
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_IBXDriver_D7.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_IBXDriver_D7.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_IBXDriver_D7.dcp
new file mode 100644
index 0000000..d9f4cbd
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_IBXDriver_D7.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_IDE_D7.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_IDE_D7.bpl
new file mode 100644
index 0000000..8511d8d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_IDE_D7.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_IDE_D7.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_IDE_D7.dcp
new file mode 100644
index 0000000..a256099
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_IDE_D7.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_SQLiteDriver_D7.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_SQLiteDriver_D7.bpl
new file mode 100644
index 0000000..ebfba77
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_SQLiteDriver_D7.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_SQLiteDriver_D7.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_SQLiteDriver_D7.dcp
new file mode 100644
index 0000000..8382616
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_SQLiteDriver_D7.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_Scripting_D7.bpl b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_Scripting_D7.bpl
new file mode 100644
index 0000000..817da8e
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_Scripting_D7.bpl differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_Scripting_D7.dcp b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_Scripting_D7.dcp
new file mode 100644
index 0000000..c5d4325
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Dcu/D7/DataAbstract_Scripting_D7.dcp differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/BaseLoginService_Impl.dfm b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/BaseLoginService_Impl.dfm
new file mode 100644
index 0000000..75ebc6a
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/BaseLoginService_Impl.dfm	
@@ -0,0 +1,5 @@
+object BaseLoginService: TBaseLoginService
+  OldCreateOrder = True
+  Height = 300
+  Width = 300
+end
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/BaseLoginService_Impl.lfm b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/BaseLoginService_Impl.lfm
new file mode 100644
index 0000000..75ebc6a
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/BaseLoginService_Impl.lfm	
@@ -0,0 +1,5 @@
+object BaseLoginService: TBaseLoginService
+  OldCreateOrder = True
+  Height = 300
+  Width = 300
+end
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/BaseLoginService_Impl.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/BaseLoginService_Impl.pas
new file mode 100644
index 0000000..d20b514
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/BaseLoginService_Impl.pas	
@@ -0,0 +1,50 @@
+unit BaseLoginService_Impl;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  {vcl:} Classes, SysUtils,
+  {RemObjects:} uROClientIntf, uROTypes, uROServer, uROServerIntf, uROSessions,
+  {Required:} uRORemoteDataModule,
+  {Generated:} DataAbstract4_Intf;
+
+type
+  { TBaseLoginService }
+  TBaseLoginService = class (TRORemoteDataModule, IBaseLoginService)
+  private
+    fOnLogout: TNotifyEvent;
+  protected
+    { IBaseLoginService methods }
+    procedure Logout;
+  published
+    property OnLogout: TNotifyEvent read fOnLogout write fOnLogout;
+  end;
+
+implementation
+
+uses
+  {Generated:} DataAbstract4_Invk;
+
+{ BaseLoginService }
+
+procedure TBaseLoginService.Logout;
+begin
+  if assigned(OnLogout) then
+    OnLogout(self);
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/BuildDrivers.bpg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/BuildDrivers.bpg
new file mode 100644
index 0000000..32efc69
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/BuildDrivers.bpg	
@@ -0,0 +1,79 @@
+#------------------------------------------------------------------------------
+VERSION = BWS.01
+#------------------------------------------------------------------------------
+!ifndef ROOT
+ROOT = $(MAKEDIR)\..
+!endif
+#------------------------------------------------------------------------------
+MAKE = $(ROOT)\bin\make.exe -$(MAKEFLAGS) -f$**
+DCC = $(ROOT)\bin\dcc32.exe $**
+BRCC = $(ROOT)\bin\brcc32.exe $**
+#------------------------------------------------------------------------------
+PROJECTS = DAADODrv.dad DAAnyDACDrv.dad DABDEDrv.dad DADBISAM3Drv.dad DADBISAM4Drv.dad DADBXDrv.dad DADOADrv.dad DAFIBDrv.dad DAIBDACDrv.dad DAIBODrv.dad DAIBXDrv.dad DAMyDACDrv.dad DAMySQLDACDrv.dad DANexusDBDrv.dad DAODACDrv.dad \
+  DAPostgresDACDrv.dad DASDACDrv.dad DASQLiteDrv.dad DAZeosDrv.dad DAElevateDBDrv.dad
+#------------------------------------------------------------------------------
+default: $(PROJECTS)
+#------------------------------------------------------------------------------
+
+DAADODrv.dad: Drivers\DAADODrv.dpr
+  $(DCC)
+
+DAIBXDrv.dad: Drivers\DAIBXDrv.dpr
+  $(DCC)
+
+DADBXDrv.dad: Drivers\DADBXDrv.dpr
+  $(DCC)
+
+DAIBODrv.dad: Drivers\DAIBODrv.dpr
+  $(DCC)
+
+DAODACDrv.dad: Drivers\DAODACDrv.dpr
+  $(DCC)
+
+DASDACDrv.dad: Drivers\DASDACDrv.dpr
+  $(DCC)
+
+DADBISAM3Drv.dad: Drivers\DADBISAM3Drv.dpr
+  $(DCC)
+
+DADBISAM4Drv.dad: Drivers\DADBISAM4Drv.dpr
+  $(DCC)
+
+DAMyDACDrv.dad: Drivers\DAMyDACDrv.dpr
+  $(DCC)
+
+DAIBDACDrv.dad: Drivers\DAIBDACDrv.dpr
+  $(DCC)
+
+DAFIBDrv.dad: Drivers\DAFIBDrv.dpr
+  $(DCC)
+
+DAPostgresDACDrv.dad: Drivers\DAPostgresDACDrv.dpr
+  $(DCC)
+
+DAMySQLDACDrv.dad: Drivers\DAMySQLDACDrv.dpr
+  $(DCC)
+
+DABDEDrv.dad: Drivers\DABDEDrv.dpr
+  $(DCC)
+
+DANexusDBDrv.dad: Drivers\DANexusDBDrv.dpr
+  $(DCC)
+
+DAZeosDrv.dad: Drivers\DAZeosDrv.dpr
+  $(DCC)
+
+DASQLiteDrv.dad: Drivers\DASQLiteDrv.dpr
+  $(DCC)
+
+DAAnyDACDrv.dad: Drivers\DAAnyDACDrv.dpr
+  $(DCC)
+
+DAElevateDBDrv.dad: Drivers\DAElevateDBDrv.dpr
+  $(DCC)
+
+DADOADrv.dad: Drivers\DADOADrv.dpr
+  $(DCC)
+
+
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/BuildPackages_D10.bdsgroup b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/BuildPackages_D10.bdsgroup
new file mode 100644
index 0000000..5809593
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/BuildPackages_D10.bdsgroup	
@@ -0,0 +1,39 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality">Default.Personality</Option>
+			<Option Name="ProjectType"></Option>
+			<Option Name="Version">1.0</Option>
+			<Option Name="GUID">{54AB30E9-B101-48B0-A497-ACE401323312}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Default.Personality>  <Projects>
+      <Projects Name="DataAbstract_Core_D10.bpl">DataAbstract_Core_D10.bdsproj</Projects>
+      <Projects Name="DataAbstract_Scripting_D10.bpl">DataAbstract_Scripting_D10.bdsproj</Projects>
+      <Projects Name="DataAbstract_IDE_D10.bpl">IDE\DataAbstract_IDE_D10.bdsproj</Projects>
+      <Projects Name="DataAbstract_ADODriver_D10.bpl">Drivers\DataAbstract_ADODriver_D10.bdsproj</Projects>
+      <Projects Name="DataAbstract_AnyDACDriver_D10.bpl">Drivers\DataAbstract_AnyDACDriver_D10.bdsproj</Projects>
+      <Projects Name="DataAbstract_BDEDriver_D10.bpl">Drivers\DataAbstract_BDEDriver_D10.bdsproj</Projects>
+      <Projects Name="DataAbstract_DBISAMDriver_D10.bpl">Drivers\DataAbstract_DBISAMDriver_D10.bdsproj</Projects>
+      <Projects Name="DataAbstract_DBXDriver_D10.bpl">Drivers\DataAbstract_DBXDriver_D10.bdsproj</Projects>
+      <Projects Name="DataAbstract_DOADriver_D10.bpl">Drivers\DataAbstract_DOADriver_D10.bdsproj</Projects>
+      <Projects Name="DataAbstract_ElevateDBDriver_D10.bpl">Drivers\DataAbstract_ElevateDBDriver_D10.bdsproj</Projects>
+      <Projects Name="DataAbstract_FIBDriver_D10.bpl">Drivers\DataAbstract_FIBDriver_D10.bdsproj</Projects>
+      <Projects Name="DataAbstract_IBDACDriver_D10.bpl">Drivers\DataAbstract_IBDACDriver_D10.bdsproj</Projects>
+      <Projects Name="DataAbstract_IBODriver_D10.bpl">Drivers\DataAbstract_IBODriver_D10.bdsproj</Projects>
+      <Projects Name="DataAbstract_IBXDriver_D10.bpl">Drivers\DataAbstract_IBXDriver_D10.bdsproj</Projects>
+      <Projects Name="DataAbstract_MyDACDriver_D10.bpl">Drivers\DataAbstract_MyDACDriver_D10.bdsproj</Projects>
+      <Projects Name="DataAbstract_MySQLDACDriver_D10.bpl">Drivers\DataAbstract_MySQLDACDriver_D10.bdsproj</Projects>
+      <Projects Name="DataAbstract_NexusDBDriver_D10.bpl">Drivers\DataAbstract_NexusDBDriver_D10.bdsproj</Projects>
+      <Projects Name="DataAbstract_ODACDriver_D10.bpl">Drivers\DataAbstract_ODACDriver_D10.bdsproj</Projects>
+      <Projects Name="DataAbstract_PostgresDACDriver_D10.bpl">Drivers\DataAbstract_PostgresDACDriver_D10.bdsproj</Projects>
+      <Projects Name="DataAbstract_SDACDriver_D10.bpl">Drivers\DataAbstract_SDACDriver_D10.bdsproj</Projects>
+      <Projects Name="DataAbstract_SQLiteDriver_D10.bpl">Drivers\DataAbstract_SQLiteDriver_D10.bdsproj</Projects>
+      <Projects Name="DataAbstract_ZeosDriver_D10.bpl">Drivers\DataAbstract_ZeosDriver_D10.bdsproj</Projects>
+      <Projects Name="Targets">DataAbstract_Core_D10.bpl DataAbstract_Scripting_D10.bpl DataAbstract_IDE_D10.bpl DataAbstract_ADODriver_D10.bpl DataAbstract_AnyDACDriver_D10.bpl DataAbstract_BDEDriver_D10.bpl DataAbstract_DBISAMDriver_D10.bpl DataAbstract_DBXDriver_D10.bpl DataAbstract_DOADriver_D10.bpl DataAbstract_ElevateDBDriver_D10.bpl DataAbstract_FIBDriver_D10.bpl DataAbstract_IBDACDriver_D10.bpl DataAbstract_IBODriver_D10.bpl DataAbstract_IBXDriver_D10.bpl DataAbstract_MyDACDriver_D10.bpl DataAbstract_MySQLDACDriver_D10.bpl DataAbstract_NexusDBDriver_D10.bpl DataAbstract_ODACDriver_D10.bpl DataAbstract_PostgresDACDriver_D10.bpl DataAbstract_SDACDriver_D10.bpl DataAbstract_SQLiteDriver_D10.bpl DataAbstract_ZeosDriver_D10.bpl</Projects>
+    </Projects>
+    <Dependencies/>
+  </Default.Personality>  <StarTeamAssociation></StarTeamAssociation>
+  <StarTeamNonRelativeFiles></StarTeamNonRelativeFiles>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/BuildPackages_D11.groupproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/BuildPackages_D11.groupproj
new file mode 100644
index 0000000..ce9f4d4
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/BuildPackages_D11.groupproj	
@@ -0,0 +1,258 @@
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{788d1e93-6494-4009-bad7-5d620a616e08}</ProjectGuid>
+  </PropertyGroup>
+  <ItemGroup />
+  <ItemGroup>
+    <Projects Include="..\..\Pascal Script for Delphi\Source\PascalScript_Core_D11.dproj" />
+    <Projects Include="DataAbstract_Core_D11.dproj" />
+    <Projects Include="DataAbstract_Scripting_D11.dproj" />
+    <Projects Include="Drivers\DataAbstract_ADODriver_D11.dproj">
+      <Dependencies>DataAbstract_Core_D11.dproj</Dependencies>
+    </Projects>
+    <Projects Include="Drivers\DataAbstract_AnyDACDriver_D11.dproj">
+      <Dependencies>DataAbstract_Core_D11.dproj</Dependencies>
+    </Projects>
+    <Projects Include="Drivers\DataAbstract_BDEDriver_D11.dproj" />
+    <Projects Include="Drivers\DataAbstract_DBISAMDriver_D11.dproj" />
+    <Projects Include="Drivers\DataAbstract_DBXDriver_D11.dproj" />
+    <Projects Include="Drivers\DataAbstract_DOADriver_D11.dproj" />
+    <Projects Include="Drivers\DataAbstract_ElevateDBDriver_D11.dproj" />
+    <Projects Include="Drivers\DataAbstract_FIBDriver_D11.dproj" />
+    <Projects Include="Drivers\DataAbstract_IBDACDriver_D11.dproj" />
+    <Projects Include="Drivers\DataAbstract_IBODriver_D11.dproj" />
+    <Projects Include="Drivers\DataAbstract_IBXDriver_D11.dproj" />
+    <Projects Include="Drivers\DataAbstract_MyDACDriver_D11.dproj" />
+    <Projects Include="Drivers\DataAbstract_MySQLDACDriver_D11.dproj" />
+    <Projects Include="Drivers\DataAbstract_NexusDBDriver_D11.dproj" />
+    <Projects Include="Drivers\DataAbstract_ODACDriver_D11.dproj" />
+    <Projects Include="Drivers\DataAbstract_PostgresDACDriver_D11.dproj" />
+    <Projects Include="Drivers\DataAbstract_SDACDriver_D11.dproj" />
+    <Projects Include="Drivers\DataAbstract_SQLiteDriver_D11.dproj" />
+    <Projects Include="Drivers\DataAbstract_ZeosDriver_D11.dproj" />
+    <Projects Include="IDE\DataAbstract_IDE_D11.dproj" />
+  </ItemGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Default.Personality</Borland.Personality>
+    <Borland.ProjectType />
+    <BorlandProject>
+<BorlandProject xmlns=""><Default.Personality></Default.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Target Name="DataAbstract_Core_D11">
+    <MSBuild Projects="DataAbstract_Core_D11.dproj" Targets="" />
+  </Target>
+  <Target Name="DataAbstract_Core_D11:Clean">
+    <MSBuild Projects="DataAbstract_Core_D11.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="DataAbstract_Core_D11:Make">
+    <MSBuild Projects="DataAbstract_Core_D11.dproj" Targets="Make" />
+  </Target>
+  <Target Name="PascalScript_Core_D11">
+    <MSBuild Projects="..\..\Pascal Script for Delphi\Source\PascalScript_Core_D11.dproj" Targets="" />
+  </Target>
+  <Target Name="PascalScript_Core_D11:Clean">
+    <MSBuild Projects="..\..\Pascal Script for Delphi\Source\PascalScript_Core_D11.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="PascalScript_Core_D11:Make">
+    <MSBuild Projects="..\..\Pascal Script for Delphi\Source\PascalScript_Core_D11.dproj" Targets="Make" />
+  </Target>
+  <Target Name="DataAbstract_Scripting_D11">
+    <MSBuild Projects="DataAbstract_Scripting_D11.dproj" Targets="" />
+  </Target>
+  <Target Name="DataAbstract_Scripting_D11:Clean">
+    <MSBuild Projects="DataAbstract_Scripting_D11.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="DataAbstract_Scripting_D11:Make">
+    <MSBuild Projects="DataAbstract_Scripting_D11.dproj" Targets="Make" />
+  </Target>
+  <Target Name="DataAbstract_IDE_D11">
+    <MSBuild Projects="IDE\DataAbstract_IDE_D11.dproj" Targets="" />
+  </Target>
+  <Target Name="DataAbstract_IDE_D11:Clean">
+    <MSBuild Projects="IDE\DataAbstract_IDE_D11.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="DataAbstract_IDE_D11:Make">
+    <MSBuild Projects="IDE\DataAbstract_IDE_D11.dproj" Targets="Make" />
+  </Target>
+  <Target Name="DataAbstract_ADODriver_D11" DependsOnTargets="DataAbstract_Core_D11">
+    <MSBuild Projects="Drivers\DataAbstract_ADODriver_D11.dproj" Targets="" />
+  </Target>
+  <Target Name="DataAbstract_ADODriver_D11:Clean" DependsOnTargets="DataAbstract_Core_D11:Clean">
+    <MSBuild Projects="Drivers\DataAbstract_ADODriver_D11.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="DataAbstract_ADODriver_D11:Make" DependsOnTargets="DataAbstract_Core_D11:Make">
+    <MSBuild Projects="Drivers\DataAbstract_ADODriver_D11.dproj" Targets="Make" />
+  </Target>
+  <Target Name="DataAbstract_AnyDACDriver_D11" DependsOnTargets="DataAbstract_Core_D11">
+    <MSBuild Projects="Drivers\DataAbstract_AnyDACDriver_D11.dproj" Targets="" />
+  </Target>
+  <Target Name="DataAbstract_AnyDACDriver_D11:Clean" DependsOnTargets="DataAbstract_Core_D11:Clean">
+    <MSBuild Projects="Drivers\DataAbstract_AnyDACDriver_D11.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="DataAbstract_AnyDACDriver_D11:Make" DependsOnTargets="DataAbstract_Core_D11:Make">
+    <MSBuild Projects="Drivers\DataAbstract_AnyDACDriver_D11.dproj" Targets="Make" />
+  </Target>
+  <Target Name="DataAbstract_BDEDriver_D11">
+    <MSBuild Projects="Drivers\DataAbstract_BDEDriver_D11.dproj" Targets="" />
+  </Target>
+  <Target Name="DataAbstract_BDEDriver_D11:Clean">
+    <MSBuild Projects="Drivers\DataAbstract_BDEDriver_D11.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="DataAbstract_BDEDriver_D11:Make">
+    <MSBuild Projects="Drivers\DataAbstract_BDEDriver_D11.dproj" Targets="Make" />
+  </Target>
+  <Target Name="DataAbstract_DBISAMDriver_D11">
+    <MSBuild Projects="Drivers\DataAbstract_DBISAMDriver_D11.dproj" Targets="" />
+  </Target>
+  <Target Name="DataAbstract_DBISAMDriver_D11:Clean">
+    <MSBuild Projects="Drivers\DataAbstract_DBISAMDriver_D11.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="DataAbstract_DBISAMDriver_D11:Make">
+    <MSBuild Projects="Drivers\DataAbstract_DBISAMDriver_D11.dproj" Targets="Make" />
+  </Target>
+  <Target Name="DataAbstract_DBXDriver_D11">
+    <MSBuild Projects="Drivers\DataAbstract_DBXDriver_D11.dproj" Targets="" />
+  </Target>
+  <Target Name="DataAbstract_DBXDriver_D11:Clean">
+    <MSBuild Projects="Drivers\DataAbstract_DBXDriver_D11.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="DataAbstract_DBXDriver_D11:Make">
+    <MSBuild Projects="Drivers\DataAbstract_DBXDriver_D11.dproj" Targets="Make" />
+  </Target>
+  <Target Name="DataAbstract_DOADriver_D11">
+    <MSBuild Projects="Drivers\DataAbstract_DOADriver_D11.dproj" Targets="" />
+  </Target>
+  <Target Name="DataAbstract_DOADriver_D11:Clean">
+    <MSBuild Projects="Drivers\DataAbstract_DOADriver_D11.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="DataAbstract_DOADriver_D11:Make">
+    <MSBuild Projects="Drivers\DataAbstract_DOADriver_D11.dproj" Targets="Make" />
+  </Target>
+  <Target Name="DataAbstract_ElevateDBDriver_D11">
+    <MSBuild Projects="Drivers\DataAbstract_ElevateDBDriver_D11.dproj" Targets="" />
+  </Target>
+  <Target Name="DataAbstract_ElevateDBDriver_D11:Clean">
+    <MSBuild Projects="Drivers\DataAbstract_ElevateDBDriver_D11.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="DataAbstract_ElevateDBDriver_D11:Make">
+    <MSBuild Projects="Drivers\DataAbstract_ElevateDBDriver_D11.dproj" Targets="Make" />
+  </Target>
+  <Target Name="DataAbstract_IBDACDriver_D11">
+    <MSBuild Projects="Drivers\DataAbstract_IBDACDriver_D11.dproj" Targets="" />
+  </Target>
+  <Target Name="DataAbstract_IBDACDriver_D11:Clean">
+    <MSBuild Projects="Drivers\DataAbstract_IBDACDriver_D11.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="DataAbstract_IBDACDriver_D11:Make">
+    <MSBuild Projects="Drivers\DataAbstract_IBDACDriver_D11.dproj" Targets="Make" />
+  </Target>
+  <Target Name="DataAbstract_IBODriver_D11">
+    <MSBuild Projects="Drivers\DataAbstract_IBODriver_D11.dproj" Targets="" />
+  </Target>
+  <Target Name="DataAbstract_IBODriver_D11:Clean">
+    <MSBuild Projects="Drivers\DataAbstract_IBODriver_D11.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="DataAbstract_IBODriver_D11:Make">
+    <MSBuild Projects="Drivers\DataAbstract_IBODriver_D11.dproj" Targets="Make" />
+  </Target>
+  <Target Name="DataAbstract_IBXDriver_D11">
+    <MSBuild Projects="Drivers\DataAbstract_IBXDriver_D11.dproj" Targets="" />
+  </Target>
+  <Target Name="DataAbstract_IBXDriver_D11:Clean">
+    <MSBuild Projects="Drivers\DataAbstract_IBXDriver_D11.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="DataAbstract_IBXDriver_D11:Make">
+    <MSBuild Projects="Drivers\DataAbstract_IBXDriver_D11.dproj" Targets="Make" />
+  </Target>
+  <Target Name="DataAbstract_FIBDriver_D11">
+    <MSBuild Projects="Drivers\DataAbstract_FIBDriver_D11.dproj" Targets="" />
+  </Target>
+  <Target Name="DataAbstract_FIBDriver_D11:Clean">
+    <MSBuild Projects="Drivers\DataAbstract_FIBDriver_D11.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="DataAbstract_FIBDriver_D11:Make">
+    <MSBuild Projects="Drivers\DataAbstract_FIBDriver_D11.dproj" Targets="Make" />
+  </Target>
+  <Target Name="DataAbstract_MyDACDriver_D11">
+    <MSBuild Projects="Drivers\DataAbstract_MyDACDriver_D11.dproj" Targets="" />
+  </Target>
+  <Target Name="DataAbstract_MyDACDriver_D11:Clean">
+    <MSBuild Projects="Drivers\DataAbstract_MyDACDriver_D11.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="DataAbstract_MyDACDriver_D11:Make">
+    <MSBuild Projects="Drivers\DataAbstract_MyDACDriver_D11.dproj" Targets="Make" />
+  </Target>
+  <Target Name="DataAbstract_MySQLDACDriver_D11">
+    <MSBuild Projects="Drivers\DataAbstract_MySQLDACDriver_D11.dproj" Targets="" />
+  </Target>
+  <Target Name="DataAbstract_MySQLDACDriver_D11:Clean">
+    <MSBuild Projects="Drivers\DataAbstract_MySQLDACDriver_D11.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="DataAbstract_MySQLDACDriver_D11:Make">
+    <MSBuild Projects="Drivers\DataAbstract_MySQLDACDriver_D11.dproj" Targets="Make" />
+  </Target>
+  <Target Name="DataAbstract_NexusDBDriver_D11">
+    <MSBuild Projects="Drivers\DataAbstract_NexusDBDriver_D11.dproj" Targets="" />
+  </Target>
+  <Target Name="DataAbstract_NexusDBDriver_D11:Clean">
+    <MSBuild Projects="Drivers\DataAbstract_NexusDBDriver_D11.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="DataAbstract_NexusDBDriver_D11:Make">
+    <MSBuild Projects="Drivers\DataAbstract_NexusDBDriver_D11.dproj" Targets="Make" />
+  </Target>
+  <Target Name="DataAbstract_ODACDriver_D11">
+    <MSBuild Projects="Drivers\DataAbstract_ODACDriver_D11.dproj" Targets="" />
+  </Target>
+  <Target Name="DataAbstract_ODACDriver_D11:Clean">
+    <MSBuild Projects="Drivers\DataAbstract_ODACDriver_D11.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="DataAbstract_ODACDriver_D11:Make">
+    <MSBuild Projects="Drivers\DataAbstract_ODACDriver_D11.dproj" Targets="Make" />
+  </Target>
+  <Target Name="DataAbstract_PostgresDACDriver_D11">
+    <MSBuild Projects="Drivers\DataAbstract_PostgresDACDriver_D11.dproj" Targets="" />
+  </Target>
+  <Target Name="DataAbstract_PostgresDACDriver_D11:Clean">
+    <MSBuild Projects="Drivers\DataAbstract_PostgresDACDriver_D11.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="DataAbstract_PostgresDACDriver_D11:Make">
+    <MSBuild Projects="Drivers\DataAbstract_PostgresDACDriver_D11.dproj" Targets="Make" />
+  </Target>
+  <Target Name="DataAbstract_SDACDriver_D11">
+    <MSBuild Projects="Drivers\DataAbstract_SDACDriver_D11.dproj" Targets="" />
+  </Target>
+  <Target Name="DataAbstract_SDACDriver_D11:Clean">
+    <MSBuild Projects="Drivers\DataAbstract_SDACDriver_D11.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="DataAbstract_SDACDriver_D11:Make">
+    <MSBuild Projects="Drivers\DataAbstract_SDACDriver_D11.dproj" Targets="Make" />
+  </Target>
+  <Target Name="DataAbstract_SQLiteDriver_D11">
+    <MSBuild Projects="Drivers\DataAbstract_SQLiteDriver_D11.dproj" Targets="" />
+  </Target>
+  <Target Name="DataAbstract_SQLiteDriver_D11:Clean">
+    <MSBuild Projects="Drivers\DataAbstract_SQLiteDriver_D11.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="DataAbstract_SQLiteDriver_D11:Make">
+    <MSBuild Projects="Drivers\DataAbstract_SQLiteDriver_D11.dproj" Targets="Make" />
+  </Target>
+  <Target Name="DataAbstract_ZeosDriver_D11">
+    <MSBuild Projects="Drivers\DataAbstract_ZeosDriver_D11.dproj" Targets="" />
+  </Target>
+  <Target Name="DataAbstract_ZeosDriver_D11:Clean">
+    <MSBuild Projects="Drivers\DataAbstract_ZeosDriver_D11.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="DataAbstract_ZeosDriver_D11:Make">
+    <MSBuild Projects="Drivers\DataAbstract_ZeosDriver_D11.dproj" Targets="Make" />
+  </Target>
+  <Target Name="Build">
+    <CallTarget Targets="DataAbstract_Core_D11;PascalScript_Core_D11;DataAbstract_Scripting_D11;DataAbstract_IDE_D11;DataAbstract_ADODriver_D11;DataAbstract_AnyDACDriver_D11;DataAbstract_BDEDriver_D11;DataAbstract_DBISAMDriver_D11;DataAbstract_DBXDriver_D11;DataAbstract_DOADriver_D11;DataAbstract_ElevateDBDriver_D11;DataAbstract_IBDACDriver_D11;DataAbstract_IBODriver_D11;DataAbstract_IBXDriver_D11;DataAbstract_FIBDriver_D11;DataAbstract_MyDACDriver_D11;DataAbstract_MySQLDACDriver_D11;DataAbstract_NexusDBDriver_D11;DataAbstract_ODACDriver_D11;DataAbstract_PostgresDACDriver_D11;DataAbstract_SDACDriver_D11;DataAbstract_SQLiteDriver_D11;DataAbstract_ZeosDriver_D11" />
+  </Target>
+  <Target Name="Clean">
+    <CallTarget Targets="DataAbstract_Core_D11:Clean;PascalScript_Core_D11:Clean;DataAbstract_Scripting_D11:Clean;DataAbstract_IDE_D11:Clean;DataAbstract_ADODriver_D11:Clean;DataAbstract_AnyDACDriver_D11:Clean;DataAbstract_BDEDriver_D11:Clean;DataAbstract_DBISAMDriver_D11:Clean;DataAbstract_DBXDriver_D11:Clean;DataAbstract_DOADriver_D11:Clean;DataAbstract_ElevateDBDriver_D11:Clean;DataAbstract_IBDACDriver_D11:Clean;DataAbstract_IBODriver_D11:Clean;DataAbstract_IBXDriver_D11:Clean;DataAbstract_FIBDriver_D11:Clean;DataAbstract_MyDACDriver_D11:Clean;DataAbstract_MySQLDACDriver_D11:Clean;DataAbstract_NexusDBDriver_D11:Clean;DataAbstract_ODACDriver_D11:Clean;DataAbstract_PostgresDACDriver_D11:Clean;DataAbstract_SDACDriver_D11:Clean;DataAbstract_SQLiteDriver_D11:Clean;DataAbstract_ZeosDriver_D11:Clean" />
+  </Target>
+  <Target Name="Make">
+    <CallTarget Targets="DataAbstract_Core_D11:Make;PascalScript_Core_D11:Make;DataAbstract_Scripting_D11:Make;DataAbstract_IDE_D11:Make;DataAbstract_ADODriver_D11:Make;DataAbstract_AnyDACDriver_D11:Make;DataAbstract_BDEDriver_D11:Make;DataAbstract_DBISAMDriver_D11:Make;DataAbstract_DBXDriver_D11:Make;DataAbstract_DOADriver_D11:Make;DataAbstract_ElevateDBDriver_D11:Make;DataAbstract_IBDACDriver_D11:Make;DataAbstract_IBODriver_D11:Make;DataAbstract_IBXDriver_D11:Make;DataAbstract_FIBDriver_D11:Make;DataAbstract_MyDACDriver_D11:Make;DataAbstract_MySQLDACDriver_D11:Make;DataAbstract_NexusDBDriver_D11:Make;DataAbstract_ODACDriver_D11:Make;DataAbstract_PostgresDACDriver_D11:Make;DataAbstract_SDACDriver_D11:Make;DataAbstract_SQLiteDriver_D11:Make;DataAbstract_ZeosDriver_D11:Make" />
+  </Target>
+  <Import Condition="Exists('$(MSBuildBinPath)\Borland.Group.Targets')" Project="$(MSBuildBinPath)\Borland.Group.Targets" />
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/BuildPackages_D12.groupproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/BuildPackages_D12.groupproj
new file mode 100644
index 0000000..f9548c1
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/BuildPackages_D12.groupproj	
@@ -0,0 +1,308 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{788d1e93-6494-4009-bad7-5d620a616e08}</ProjectGuid>
+		</PropertyGroup>
+		<ItemGroup>
+			<Projects Include="DataAbstract_Core_D12.dproj">
+				<Dependencies/>
+			</Projects>
+			<Projects Include="..\..\Pascal Script for Delphi\Source\PascalScript_Core_D12.dproj">
+				<Dependencies/>
+			</Projects>
+			<Projects Include="DataAbstract_Scripting_D12.dproj">
+				<Dependencies>DataAbstract_Core_D12.dproj;..\..\Pascal Script for Delphi\Source\PascalScript_Core_D12.dproj</Dependencies>
+			</Projects>
+			<Projects Include="IDE\DataAbstract_IDE_D12.dproj">
+				<Dependencies>DataAbstract_Core_D12.dproj</Dependencies>
+			</Projects>
+			<Projects Include="Drivers\DataAbstract_ADODriver_D12.dproj">
+				<Dependencies>DataAbstract_Core_D12.dproj</Dependencies>
+			</Projects>
+			<Projects Include="Drivers\DataAbstract_AnyDACDriver_D12.dproj">
+				<Dependencies>DataAbstract_Core_D12.dproj</Dependencies>
+			</Projects>
+			<Projects Include="Drivers\DataAbstract_BDEDriver_D12.dproj">
+				<Dependencies>DataAbstract_Core_D12.dproj</Dependencies>
+			</Projects>
+			<Projects Include="Drivers\DataAbstract_DOADriver_D12.dproj">
+				<Dependencies>DataAbstract_Core_D12.dproj</Dependencies>
+			</Projects>
+			<Projects Include="Drivers\DataAbstract_DBISAMDriver_D12.dproj">
+				<Dependencies>DataAbstract_Core_D12.dproj</Dependencies>
+			</Projects>
+			<Projects Include="Drivers\DataAbstract_DBXDriver_D12.dproj">
+				<Dependencies>DataAbstract_Core_D12.dproj</Dependencies>
+			</Projects>
+			<Projects Include="Drivers\DataAbstract_ElevateDBDriver_D12.dproj">
+				<Dependencies>DataAbstract_Core_D12.dproj</Dependencies>
+			</Projects>
+			<Projects Include="Drivers\DataAbstract_IBDACDriver_D12.dproj">
+				<Dependencies>DataAbstract_Core_D12.dproj</Dependencies>
+			</Projects>
+			<Projects Include="Drivers\DataAbstract_IBODriver_D12.dproj">
+				<Dependencies>DataAbstract_Core_D12.dproj</Dependencies>
+			</Projects>
+			<Projects Include="Drivers\DataAbstract_IBXDriver_D12.dproj">
+				<Dependencies>DataAbstract_Core_D12.dproj</Dependencies>
+			</Projects>
+			<Projects Include="Drivers\DataAbstract_FIBDriver_D12.dproj">
+				<Dependencies>DataAbstract_Core_D12.dproj</Dependencies>
+			</Projects>
+			<Projects Include="Drivers\DataAbstract_MyDACDriver_D12.dproj">
+				<Dependencies>DataAbstract_Core_D12.dproj</Dependencies>
+			</Projects>
+			<Projects Include="Drivers\DataAbstract_MySQLDACDriver_D12.dproj">
+				<Dependencies>DataAbstract_Core_D12.dproj</Dependencies>
+			</Projects>
+			<Projects Include="Drivers\DataAbstract_NexusDBDriver_D12.dproj">
+				<Dependencies>DataAbstract_Core_D12.dproj</Dependencies>
+			</Projects>
+			<Projects Include="Drivers\DataAbstract_ODACDriver_D12.dproj">
+				<Dependencies>DataAbstract_Core_D12.dproj</Dependencies>
+			</Projects>
+			<Projects Include="Drivers\DataAbstract_PostgresDACDriver_D12.dproj">
+				<Dependencies>DataAbstract_Core_D12.dproj</Dependencies>
+			</Projects>
+			<Projects Include="Drivers\DataAbstract_SDACDriver_D12.dproj">
+				<Dependencies>DataAbstract_Core_D12.dproj</Dependencies>
+			</Projects>
+			<Projects Include="Drivers\DataAbstract_SQLiteDriver_D12.dproj">
+				<Dependencies>DataAbstract_Core_D12.dproj</Dependencies>
+			</Projects>
+			<Projects Include="Drivers\DataAbstract_ZeosDriver_D12.dproj">
+				<Dependencies>DataAbstract_Core_D12.dproj</Dependencies>
+			</Projects>
+		</ItemGroup>
+		<ProjectExtensions>
+			<Borland.Personality>Default.Personality.12</Borland.Personality>
+			<Borland.ProjectType/>
+			<BorlandProject>
+				<BorlandProject>
+					<BorlandProject>
+						<BorlandProject>
+							<BorlandProject>
+								<Default.Personality/>
+							</BorlandProject>
+						</BorlandProject>
+					</BorlandProject>
+				</BorlandProject>
+			</BorlandProject>
+		</ProjectExtensions>
+		<Target Name="DataAbstract_Core_D12">
+			<MSBuild Projects="DataAbstract_Core_D12.dproj"/>
+		</Target>
+		<Target Name="DataAbstract_Core_D12:Clean">
+			<MSBuild Targets="Clean" Projects="DataAbstract_Core_D12.dproj"/>
+		</Target>
+		<Target Name="DataAbstract_Core_D12:Make">
+			<MSBuild Targets="Make" Projects="DataAbstract_Core_D12.dproj"/>
+		</Target>
+		<Target Name="PascalScript_Core_D12">
+			<MSBuild Projects="..\..\Pascal Script for Delphi\Source\PascalScript_Core_D12.dproj"/>
+		</Target>
+		<Target Name="PascalScript_Core_D12:Clean">
+			<MSBuild Targets="Clean" Projects="..\..\Pascal Script for Delphi\Source\PascalScript_Core_D12.dproj"/>
+		</Target>
+		<Target Name="PascalScript_Core_D12:Make">
+			<MSBuild Targets="Make" Projects="..\..\Pascal Script for Delphi\Source\PascalScript_Core_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12;PascalScript_Core_D12" Name="DataAbstract_Scripting_D12">
+			<MSBuild Projects="DataAbstract_Scripting_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Clean;PascalScript_Core_D12:Clean" Name="DataAbstract_Scripting_D12:Clean">
+			<MSBuild Targets="Clean" Projects="DataAbstract_Scripting_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Make;PascalScript_Core_D12:Make" Name="DataAbstract_Scripting_D12:Make">
+			<MSBuild Targets="Make" Projects="DataAbstract_Scripting_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12" Name="DataAbstract_IDE_D12">
+			<MSBuild Projects="IDE\DataAbstract_IDE_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Clean" Name="DataAbstract_IDE_D12:Clean">
+			<MSBuild Targets="Clean" Projects="IDE\DataAbstract_IDE_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Make" Name="DataAbstract_IDE_D12:Make">
+			<MSBuild Targets="Make" Projects="IDE\DataAbstract_IDE_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12" Name="DataAbstract_ADODriver_D12">
+			<MSBuild Projects="Drivers\DataAbstract_ADODriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Clean" Name="DataAbstract_ADODriver_D12:Clean">
+			<MSBuild Targets="Clean" Projects="Drivers\DataAbstract_ADODriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Make" Name="DataAbstract_ADODriver_D12:Make">
+			<MSBuild Targets="Make" Projects="Drivers\DataAbstract_ADODriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12" Name="DataAbstract_AnyDACDriver_D12">
+			<MSBuild Projects="Drivers\DataAbstract_AnyDACDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Clean" Name="DataAbstract_AnyDACDriver_D12:Clean">
+			<MSBuild Targets="Clean" Projects="Drivers\DataAbstract_AnyDACDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Make" Name="DataAbstract_AnyDACDriver_D12:Make">
+			<MSBuild Targets="Make" Projects="Drivers\DataAbstract_AnyDACDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12" Name="DataAbstract_BDEDriver_D12">
+			<MSBuild Projects="Drivers\DataAbstract_BDEDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Clean" Name="DataAbstract_BDEDriver_D12:Clean">
+			<MSBuild Targets="Clean" Projects="Drivers\DataAbstract_BDEDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Make" Name="DataAbstract_BDEDriver_D12:Make">
+			<MSBuild Targets="Make" Projects="Drivers\DataAbstract_BDEDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12" Name="DataAbstract_DOADriver_D12">
+			<MSBuild Projects="Drivers\DataAbstract_DOADriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Clean" Name="DataAbstract_DOADriver_D12:Clean">
+			<MSBuild Targets="Clean" Projects="Drivers\DataAbstract_DOADriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Make" Name="DataAbstract_DOADriver_D12:Make">
+			<MSBuild Targets="Make" Projects="Drivers\DataAbstract_DOADriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12" Name="DataAbstract_DBISAMDriver_D12">
+			<MSBuild Projects="Drivers\DataAbstract_DBISAMDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Clean" Name="DataAbstract_DBISAMDriver_D12:Clean">
+			<MSBuild Targets="Clean" Projects="Drivers\DataAbstract_DBISAMDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Make" Name="DataAbstract_DBISAMDriver_D12:Make">
+			<MSBuild Targets="Make" Projects="Drivers\DataAbstract_DBISAMDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12" Name="DataAbstract_DBXDriver_D12">
+			<MSBuild Projects="Drivers\DataAbstract_DBXDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Clean" Name="DataAbstract_DBXDriver_D12:Clean">
+			<MSBuild Targets="Clean" Projects="Drivers\DataAbstract_DBXDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Make" Name="DataAbstract_DBXDriver_D12:Make">
+			<MSBuild Targets="Make" Projects="Drivers\DataAbstract_DBXDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12" Name="DataAbstract_ElevateDBDriver_D12">
+			<MSBuild Projects="Drivers\DataAbstract_ElevateDBDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Clean" Name="DataAbstract_ElevateDBDriver_D12:Clean">
+			<MSBuild Targets="Clean" Projects="Drivers\DataAbstract_ElevateDBDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Make" Name="DataAbstract_ElevateDBDriver_D12:Make">
+			<MSBuild Targets="Make" Projects="Drivers\DataAbstract_ElevateDBDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12" Name="DataAbstract_IBDACDriver_D12">
+			<MSBuild Projects="Drivers\DataAbstract_IBDACDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Clean" Name="DataAbstract_IBDACDriver_D12:Clean">
+			<MSBuild Targets="Clean" Projects="Drivers\DataAbstract_IBDACDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Make" Name="DataAbstract_IBDACDriver_D12:Make">
+			<MSBuild Targets="Make" Projects="Drivers\DataAbstract_IBDACDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12" Name="DataAbstract_IBODriver_D12">
+			<MSBuild Projects="Drivers\DataAbstract_IBODriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Clean" Name="DataAbstract_IBODriver_D12:Clean">
+			<MSBuild Targets="Clean" Projects="Drivers\DataAbstract_IBODriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Make" Name="DataAbstract_IBODriver_D12:Make">
+			<MSBuild Targets="Make" Projects="Drivers\DataAbstract_IBODriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12" Name="DataAbstract_IBXDriver_D12">
+			<MSBuild Projects="Drivers\DataAbstract_IBXDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Clean" Name="DataAbstract_IBXDriver_D12:Clean">
+			<MSBuild Targets="Clean" Projects="Drivers\DataAbstract_IBXDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Make" Name="DataAbstract_IBXDriver_D12:Make">
+			<MSBuild Targets="Make" Projects="Drivers\DataAbstract_IBXDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12" Name="DataAbstract_FIBDriver_D12">
+			<MSBuild Projects="Drivers\DataAbstract_FIBDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Clean" Name="DataAbstract_FIBDriver_D12:Clean">
+			<MSBuild Targets="Clean" Projects="Drivers\DataAbstract_FIBDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Make" Name="DataAbstract_FIBDriver_D12:Make">
+			<MSBuild Targets="Make" Projects="Drivers\DataAbstract_FIBDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12" Name="DataAbstract_MyDACDriver_D12">
+			<MSBuild Projects="Drivers\DataAbstract_MyDACDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Clean" Name="DataAbstract_MyDACDriver_D12:Clean">
+			<MSBuild Targets="Clean" Projects="Drivers\DataAbstract_MyDACDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Make" Name="DataAbstract_MyDACDriver_D12:Make">
+			<MSBuild Targets="Make" Projects="Drivers\DataAbstract_MyDACDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12" Name="DataAbstract_MySQLDACDriver_D12">
+			<MSBuild Projects="Drivers\DataAbstract_MySQLDACDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Clean" Name="DataAbstract_MySQLDACDriver_D12:Clean">
+			<MSBuild Targets="Clean" Projects="Drivers\DataAbstract_MySQLDACDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Make" Name="DataAbstract_MySQLDACDriver_D12:Make">
+			<MSBuild Targets="Make" Projects="Drivers\DataAbstract_MySQLDACDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12" Name="DataAbstract_NexusDBDriver_D12">
+			<MSBuild Projects="Drivers\DataAbstract_NexusDBDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Clean" Name="DataAbstract_NexusDBDriver_D12:Clean">
+			<MSBuild Targets="Clean" Projects="Drivers\DataAbstract_NexusDBDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Make" Name="DataAbstract_NexusDBDriver_D12:Make">
+			<MSBuild Targets="Make" Projects="Drivers\DataAbstract_NexusDBDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12" Name="DataAbstract_ODACDriver_D12">
+			<MSBuild Projects="Drivers\DataAbstract_ODACDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Clean" Name="DataAbstract_ODACDriver_D12:Clean">
+			<MSBuild Targets="Clean" Projects="Drivers\DataAbstract_ODACDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Make" Name="DataAbstract_ODACDriver_D12:Make">
+			<MSBuild Targets="Make" Projects="Drivers\DataAbstract_ODACDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12" Name="DataAbstract_PostgresDACDriver_D12">
+			<MSBuild Projects="Drivers\DataAbstract_PostgresDACDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Clean" Name="DataAbstract_PostgresDACDriver_D12:Clean">
+			<MSBuild Targets="Clean" Projects="Drivers\DataAbstract_PostgresDACDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Make" Name="DataAbstract_PostgresDACDriver_D12:Make">
+			<MSBuild Targets="Make" Projects="Drivers\DataAbstract_PostgresDACDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12" Name="DataAbstract_SDACDriver_D12">
+			<MSBuild Projects="Drivers\DataAbstract_SDACDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Clean" Name="DataAbstract_SDACDriver_D12:Clean">
+			<MSBuild Targets="Clean" Projects="Drivers\DataAbstract_SDACDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Make" Name="DataAbstract_SDACDriver_D12:Make">
+			<MSBuild Targets="Make" Projects="Drivers\DataAbstract_SDACDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12" Name="DataAbstract_SQLiteDriver_D12">
+			<MSBuild Projects="Drivers\DataAbstract_SQLiteDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Clean" Name="DataAbstract_SQLiteDriver_D12:Clean">
+			<MSBuild Targets="Clean" Projects="Drivers\DataAbstract_SQLiteDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Make" Name="DataAbstract_SQLiteDriver_D12:Make">
+			<MSBuild Targets="Make" Projects="Drivers\DataAbstract_SQLiteDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12" Name="DataAbstract_ZeosDriver_D12">
+			<MSBuild Projects="Drivers\DataAbstract_ZeosDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Clean" Name="DataAbstract_ZeosDriver_D12:Clean">
+			<MSBuild Targets="Clean" Projects="Drivers\DataAbstract_ZeosDriver_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="DataAbstract_Core_D12:Make" Name="DataAbstract_ZeosDriver_D12:Make">
+			<MSBuild Targets="Make" Projects="Drivers\DataAbstract_ZeosDriver_D12.dproj"/>
+		</Target>
+		<Target Name="Build">
+			<CallTarget Targets="DataAbstract_Core_D12;PascalScript_Core_D12;DataAbstract_Scripting_D12;DataAbstract_IDE_D12;DataAbstract_ADODriver_D12;DataAbstract_AnyDACDriver_D12;DataAbstract_BDEDriver_D12;DataAbstract_DOADriver_D12;DataAbstract_DBISAMDriver_D12;DataAbstract_DBXDriver_D12;DataAbstract_ElevateDBDriver_D12;DataAbstract_IBDACDriver_D12;DataAbstract_IBODriver_D12;DataAbstract_IBXDriver_D12;DataAbstract_FIBDriver_D12;DataAbstract_MyDACDriver_D12;DataAbstract_MySQLDACDriver_D12;DataAbstract_NexusDBDriver_D12;DataAbstract_ODACDriver_D12;DataAbstract_PostgresDACDriver_D12;DataAbstract_SDACDriver_D12;DataAbstract_SQLiteDriver_D12;DataAbstract_ZeosDriver_D12"/>
+		</Target>
+		<Target Name="Clean">
+			<CallTarget Targets="DataAbstract_Core_D12:Clean;PascalScript_Core_D12:Clean;DataAbstract_Scripting_D12:Clean;DataAbstract_IDE_D12:Clean;DataAbstract_ADODriver_D12:Clean;DataAbstract_AnyDACDriver_D12:Clean;DataAbstract_BDEDriver_D12:Clean;DataAbstract_DOADriver_D12:Clean;DataAbstract_DBISAMDriver_D12:Clean;DataAbstract_DBXDriver_D12:Clean;DataAbstract_ElevateDBDriver_D12:Clean;DataAbstract_IBDACDriver_D12:Clean;DataAbstract_IBODriver_D12:Clean;DataAbstract_IBXDriver_D12:Clean;DataAbstract_FIBDriver_D12:Clean;DataAbstract_MyDACDriver_D12:Clean;DataAbstract_MySQLDACDriver_D12:Clean;DataAbstract_NexusDBDriver_D12:Clean;DataAbstract_ODACDriver_D12:Clean;DataAbstract_PostgresDACDriver_D12:Clean;DataAbstract_SDACDriver_D12:Clean;DataAbstract_SQLiteDriver_D12:Clean;DataAbstract_ZeosDriver_D12:Clean"/>
+		</Target>
+		<Target Name="Make">
+			<CallTarget Targets="DataAbstract_Core_D12:Make;PascalScript_Core_D12:Make;DataAbstract_Scripting_D12:Make;DataAbstract_IDE_D12:Make;DataAbstract_ADODriver_D12:Make;DataAbstract_AnyDACDriver_D12:Make;DataAbstract_BDEDriver_D12:Make;DataAbstract_DOADriver_D12:Make;DataAbstract_DBISAMDriver_D12:Make;DataAbstract_DBXDriver_D12:Make;DataAbstract_ElevateDBDriver_D12:Make;DataAbstract_IBDACDriver_D12:Make;DataAbstract_IBODriver_D12:Make;DataAbstract_IBXDriver_D12:Make;DataAbstract_FIBDriver_D12:Make;DataAbstract_MyDACDriver_D12:Make;DataAbstract_MySQLDACDriver_D12:Make;DataAbstract_NexusDBDriver_D12:Make;DataAbstract_ODACDriver_D12:Make;DataAbstract_PostgresDACDriver_D12:Make;DataAbstract_SDACDriver_D12:Make;DataAbstract_SQLiteDriver_D12:Make;DataAbstract_ZeosDriver_D12:Make"/>
+		</Target>
+		<Import Project="$(BDS)\Bin\CodeGear.Group.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Group.Targets')"/>
+	</Project>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/BuildPackages_D6.bpg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/BuildPackages_D6.bpg
new file mode 100644
index 0000000..08ba77e
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/BuildPackages_D6.bpg	
@@ -0,0 +1,96 @@
+#------------------------------------------------------------------------------
+VERSION = BWS.01
+#------------------------------------------------------------------------------
+!ifndef ROOT
+ROOT = $(MAKEDIR)\..
+!endif
+#------------------------------------------------------------------------------
+MAKE = $(ROOT)\bin\make.exe -$(MAKEFLAGS) -f$**
+DCC = $(ROOT)\bin\dcc32.exe $**
+BRCC = $(ROOT)\bin\brcc32.exe $**
+#------------------------------------------------------------------------------
+PROJECTS = DataAbstract_Core_D6.bpl DataAbstract_Scripting_D6.bpl \
+  DataAbstract_IDE_D6.bpl DataAbstract_ADODriver_D6.bpl \
+  DataAbstract_AnyDACDriver_D6.bpl DataAbstract_BDEDriver_D6.bpl \
+  DataAbstract_DBISAMDriver_D6.bpl DataAbstract_DBXDriver_D6.bpl \
+  DataAbstract_DOADriver_D6.bpl DataAbstract_ElevateDBDriver_D6.bpl \
+  DataAbstract_FIBDriver_D6.bpl DataAbstract_IBDACDriver_D6.bpl \
+  DataAbstract_IBODriver_D6.bpl DataAbstract_IBXDriver_D6.bpl \
+  DataAbstract_MyDACDriver_D6.bpl DataAbstract_MySQLDACDriver_D6.bpl \
+  DataAbstract_NexusDBDriver_D6.bpl DataAbstract_ODACDriver_D6.bpl \
+  DataAbstract_PostgresDACDriver_D6.bpl DataAbstract_SDACDriver_D6.bpl \
+  DataAbstract_SQLiteDriver_D6.bpl DataAbstract_ZeosDriver_D6.bpl
+#------------------------------------------------------------------------------
+default: $(PROJECTS)
+#------------------------------------------------------------------------------
+
+DataAbstract_Core_D6.bpl: DataAbstract_Core_D6.dpk
+  $(DCC)
+
+DataAbstract_IDE_D6.bpl: IDE\DataAbstract_IDE_D6.dpk
+  $(DCC)
+
+DataAbstract_ADODriver_D6.bpl: Drivers\DataAbstract_ADODriver_D6.dpk
+  $(DCC)
+
+DataAbstract_IBXDriver_D6.bpl: Drivers\DataAbstract_IBXDriver_D6.dpk
+  $(DCC)
+
+DataAbstract_SDACDriver_D6.bpl: Drivers\DataAbstract_SDACDriver_D6.dpk
+  $(DCC)
+
+DataAbstract_DBXDriver_D6.bpl: Drivers\DataAbstract_DBXDriver_D6.dpk
+  $(DCC)
+
+DataAbstract_ODACDriver_D6.bpl: Drivers\DataAbstract_ODACDriver_D6.dpk
+  $(DCC)
+
+DataAbstract_IBODriver_D6.bpl: Drivers\DataAbstract_IBODriver_D6.dpk
+  $(DCC)
+
+DataAbstract_DBISAMDriver_D6.bpl: Drivers\DataAbstract_DBISAMDriver_D6.dpk
+  $(DCC)
+
+DataAbstract_MyDACDriver_D6.bpl: Drivers\DataAbstract_MyDACDriver_D6.dpk
+  $(DCC)
+
+DataAbstract_Scripting_D6.bpl: DataAbstract_Scripting_D6.dpk
+  $(DCC)
+
+PascalScript_Core_D6.bpl: ..\..\Pascal Script for Delphi\Source\PascalScript_Core_D6.dpk
+  $(DCC)
+
+DataAbstract_FIBDriver_D6.bpl: Drivers\DataAbstract_FIBDriver_D6.dpk
+  $(DCC)
+
+DataAbstract_IBDACDriver_D6.bpl: Drivers\DataAbstract_IBDACDriver_D6.dpk
+  $(DCC)
+
+DataAbstract_BDEDriver_D6.bpl: Drivers\DataAbstract_BDEDriver_D6.dpk
+  $(DCC)
+
+DataAbstract_ZeosDriver_D6.bpl: Drivers\DataAbstract_ZeosDriver_D6.dpk
+  $(DCC)
+
+DataAbstract_MySQLDACDriver_D6.bpl: Drivers\DataAbstract_MySQLDACDriver_D6.dpk
+  $(DCC)
+
+DataAbstract_NexusDBDriver_D6.bpl: Drivers\DataAbstract_NexusDBDriver_D6.dpk
+  $(DCC)
+
+DataAbstract_SQLiteDriver_D6.bpl: Drivers\DataAbstract_SQLiteDriver_D6.dpk
+  $(DCC)
+
+DataAbstract_PostgresDACDriver_D6.bpl: Drivers\DataAbstract_PostgresDACDriver_D6.dpk
+  $(DCC)
+
+DataAbstract_ElevateDBDriver_D6.bpl: Drivers\DataAbstract_ElevateDBDriver_D6.dpk
+  $(DCC)
+
+DataAbstract_AnyDACDriver_D6.bpl: Drivers\DataAbstract_AnyDACDriver_D6.dpk
+  $(DCC)
+
+DataAbstract_DOADriver_D6.bpl: Drivers\DataAbstract_DOADriver_D6.dpk
+  $(DCC)
+
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/BuildPackages_D7.bpg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/BuildPackages_D7.bpg
new file mode 100644
index 0000000..e570bb1
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/BuildPackages_D7.bpg	
@@ -0,0 +1,89 @@
+#------------------------------------------------------------------------------
+VERSION = BWS.01
+#------------------------------------------------------------------------------
+!ifndef ROOT
+ROOT = $(MAKEDIR)\..
+!endif
+#------------------------------------------------------------------------------
+MAKE = $(ROOT)\bin\make.exe -$(MAKEFLAGS) -f$**
+DCC = $(ROOT)\bin\dcc32.exe $**
+BRCC = $(ROOT)\bin\brcc32.exe $**
+#------------------------------------------------------------------------------
+PROJECTS = DataAbstract_Core_D7.bpl DataAbstract_Scripting_D7.bpl DataAbstract_IDE_D7.bpl DataAbstract_ADODriver_D7.bpl DataAbstract_AnyDACDriver_D7.bpl DataAbstract_BDEDriver_D7.bpl DataAbstract_DBISAMDriver_D7.bpl DataAbstract_DBXDriver_D7.bpl \
+  DataAbstract_DOADriver_D7.bpl DataAbstract_ElevateDBDriver_D7.bpl DataAbstract_FIBDriver_D7.bpl DataAbstract_IBDACDriver_D7.bpl DataAbstract_IBODriver_D7.bpl DataAbstract_IBXDriver_D7.bpl DataAbstract_MyDACDriver_D7.bpl \
+  DataAbstract_MySQLDACDriver_D7.bpl DataAbstract_NexusDBDriver_D7.bpl DataAbstract_ODACDriver_D7.bpl DataAbstract_PostgresDACDriver_D7.bpl DataAbstract_SDACDriver_D7.bpl DataAbstract_SQLiteDriver_D7.bpl \
+  DataAbstract_ZeosDriver_D7.bpl
+#------------------------------------------------------------------------------
+default: $(PROJECTS)
+#------------------------------------------------------------------------------
+
+DataAbstract_Core_D7.bpl: DataAbstract_Core_D7.dpk
+  $(DCC)
+
+DataAbstract_IDE_D7.bpl: IDE\DataAbstract_IDE_D7.dpk
+  $(DCC)
+
+DataAbstract_ADODriver_D7.bpl: Drivers\DataAbstract_ADODriver_D7.dpk
+  $(DCC)
+
+DataAbstract_IBXDriver_D7.bpl: Drivers\DataAbstract_IBXDriver_D7.dpk
+  $(DCC)
+
+DataAbstract_SDACDriver_D7.bpl: Drivers\DataAbstract_SDACDriver_D7.dpk
+  $(DCC)
+
+DataAbstract_DBXDriver_D7.bpl: Drivers\DataAbstract_DBXDriver_D7.dpk
+  $(DCC)
+
+DataAbstract_ODACDriver_D7.bpl: Drivers\DataAbstract_ODACDriver_D7.dpk
+  $(DCC)
+
+DataAbstract_IBODriver_D7.bpl: Drivers\DataAbstract_IBODriver_D7.dpk
+  $(DCC)
+
+DataAbstract_DBISAMDriver_D7.bpl: Drivers\DataAbstract_DBISAMDriver_D7.dpk
+  $(DCC)
+
+DataAbstract_MyDACDriver_D7.bpl: Drivers\DataAbstract_MyDACDriver_D7.dpk
+  $(DCC)
+
+DataAbstract_Scripting_D7.bpl: DataAbstract_Scripting_D7.dpk
+  $(DCC)
+
+PascalScript_Core_D7.bpl: ..\..\Pascal Script for Delphi\Source\PascalScript_Core_D7.dpk
+  $(DCC)
+
+DataAbstract_FIBDriver_D7.bpl: Drivers\DataAbstract_FIBDriver_D7.dpk
+  $(DCC)
+
+DataAbstract_IBDACDriver_D7.bpl: Drivers\DataAbstract_IBDACDriver_D7.dpk
+  $(DCC)
+
+DataAbstract_BDEDriver_D7.bpl: Drivers\DataAbstract_BDEDriver_D7.dpk
+  $(DCC)
+
+DataAbstract_ZeosDriver_D7.bpl: Drivers\DataAbstract_ZeosDriver_D7.dpk
+  $(DCC)
+
+DataAbstract_MySQLDACDriver_D7.bpl: Drivers\DataAbstract_MySQLDACDriver_D7.dpk
+  $(DCC)
+
+DataAbstract_NexusDBDriver_D7.bpl: Drivers\DataAbstract_NexusDBDriver_D7.dpk
+  $(DCC)
+
+DataAbstract_SQLiteDriver_D7.bpl: Drivers\DataAbstract_SQLiteDriver_D7.dpk
+  $(DCC)
+
+DataAbstract_PostgresDACDriver_D7.bpl: Drivers\DataAbstract_PostgresDACDriver_D7.dpk
+  $(DCC)
+
+DataAbstract_ElevateDBDriver_D7.bpl: Drivers\DataAbstract_ElevateDBDriver_D7.dpk
+  $(DCC)
+
+DataAbstract_AnyDACDriver_D7.bpl: Drivers\DataAbstract_AnyDACDriver_D7.dpk
+  $(DCC)
+
+DataAbstract_DOADriver_D7.bpl: Drivers\DataAbstract_DOADriver_D7.dpk
+  $(DCC)
+
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/BuildPackages_K3.bpg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/BuildPackages_K3.bpg
new file mode 100644
index 0000000..6649fe0
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/BuildPackages_K3.bpg	
@@ -0,0 +1,23 @@
+#------------------------------------------------------------------------------
+VERSION = BWS.01
+#------------------------------------------------------------------------------
+!ifndef ROOT
+ROOT = $(MAKEDIR)\..
+!endif
+#------------------------------------------------------------------------------
+MAKE = $(ROOT)\bin\make.exe -$(MAKEFLAGS) -f$**
+DCC = $(ROOT)\bin\dcc32.exe $**
+BRCC = $(ROOT)\bin\brcc32.exe $**
+#------------------------------------------------------------------------------
+PROJECTS = DataAbstract_Core_K3.bpl bplDataAbstract_IDE_K3.so
+#------------------------------------------------------------------------------
+default: $(PROJECTS)
+#------------------------------------------------------------------------------
+
+DataAbstract_Core_K3.bpl: DataAbstract_Core_K3.dpk
+	$(DCC)
+
+bplDataAbstract_IDE_K3.so: IDE/DataAbstract_IDE_K3.dpk
+	$(DCC)
+
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DALoginService_Impl.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DALoginService_Impl.pas
new file mode 100644
index 0000000..ce2614d
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DALoginService_Impl.pas	
@@ -0,0 +1,210 @@
+unit DALoginService_Impl {$IFNDEF FPC}deprecated{$ENDIF};
+
+{----------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project .                               }
+{                                                                            }
+{ This is where you are supposed to code the implementation of your objects. }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  {vcl:} Classes, SysUtils,
+  {RemObjects:} uROClientIntf, uROTypes, uROServer, uROSessions,
+  {Ancestor Implementation:} DARemoteService_Impl,
+  {Generated:} DataAbstract3_Intf;
+
+const
+  def_UserID    = 'UserID';
+  def_Password  = 'UserPassword';
+  def_SessionID = 'SessionID';
+
+type
+  TDALoginService = class;
+
+  TDAOnLoginEvent = procedure(Sender : TDALoginService; var aUserID, aPassword : AnsiString) of object;
+  TDAOnLoginSuccessEvent = procedure(Sender : TDALoginService; aLoginInfo : TDALoginInfo) of object;
+  TDAOnLoginFailureEvent = procedure(Sender : TDALoginService; const aUserID, aPassword : AnsiString) of object;
+  TDAOnLogoutEvent = procedure(Sender : TDALoginService; const aSessionID : TGUID) of object;
+
+  { TDALoginService }
+  TDALoginService = class(TDARemoteService, IDALoginService)
+  private
+    fLoginDataset: string;
+    fLogoutCommand: string;
+    fOnLogin: TDAOnLoginEvent;
+    fOnLoginFailure: TDAOnLoginFailureEvent;
+    fOnLoginSuccess: TDAOnLoginSuccessEvent;
+    fOnLogout: TDAOnLogoutEvent;
+    fParamNameUserID: string;
+    fParamNamePassword: string;
+    fParamNameSessionID: string;
+    function GetParamNamePasswordStored: Boolean;
+    function GetParamNameUserIDStored: Boolean;
+    function GetParamNameSessionIDStored: Boolean;
+    procedure SetParamNameSessionID(const Value: string);
+
+  protected
+    procedure SetLoginDataset(const Value: string); virtual;
+    procedure SetLogoutCommand(const Value: string); virtual;
+
+    procedure SetParamNamePassword(const Value: string); virtual;
+    procedure SetParamNameUserID(const Value: string); virtual;
+
+    function DoLogin(const UserID, Password: AnsiString; out LoginInfo: TDALoginInfo): boolean; virtual;
+    procedure DoLogout(const SessionID : TGUID); virtual;
+
+    { IDALoginService methods }
+    function Login(const UserID: AnsiString; const Password: AnsiString; out LoginInfo: TDALoginInfo): Boolean;
+    procedure Logout;
+
+  public
+    constructor Create(aOwner : TComponent); override;
+
+  published
+    property LoginDataset : string read fLoginDataset write SetLoginDataset;
+    property LogoutCommand : string read fLogoutCommand write SetLogoutCommand;
+
+    property ParamNameUserID : string read fParamNameUserID write SetParamNameUserID stored GetParamNameUserIDStored;
+    property ParamNamePassword : string read fParamNamePassword write SetParamNamePassword stored GetParamNamePasswordStored;
+    property ParamNameSessionID : string read fParamNameSessionID write SetParamNameSessionID stored GetParamNameSessionIDStored;
+
+    property OnLogin: TDAOnLoginEvent read fOnLogin write fOnLogin;
+    property OnLoginSuccess: TDAOnLoginSuccessEvent read fOnLoginSuccess write fOnLoginSuccess;
+    property OnLoginFailure: TDAOnLoginFailureEvent read fOnLoginFailure write fOnLoginFailure;
+    property OnLogout: TDAOnLogoutEvent read fOnLogout write fOnLogout;
+  end deprecated;
+
+implementation
+
+uses
+  {Generated:} uDAInterfaces, uROClasses;
+
+{ DALoginService }
+constructor TDALoginService.Create(aOwner: TComponent);
+begin
+  fParamNameUserID := def_UserID;
+  fParamNamePassword := def_Password;
+  fParamNameSessionID := def_SessionID;
+  
+  inherited;
+end;
+
+procedure TDALoginService.SetLoginDataset(const Value: string);
+begin
+  fLoginDataset := Value;
+end;
+
+procedure TDALoginService.SetLogoutCommand(const Value: string);
+begin
+  fLogoutCommand := Value;
+end;
+
+function TDALoginService.Login(const UserID: AnsiString; const Password: AnsiString; out LoginInfo: TDALoginInfo): Boolean;
+var tempuserid, temppassword : AnsiString;
+begin
+  tempuserid := UserID;
+  temppassword := Password;
+
+  CheckObjects(Connection, ServiceSchema, NIL, TRUE, TRUE, FALSE);
+
+  if Assigned(fOnLogin) then fOnLogin(Self, tempuserid, temppassword);
+
+  result := DoLogin(tempuserid, temppassword, LoginInfo);
+
+  if not result then begin
+    DestroySession;
+    if Assigned(fOnLoginFailure) then fOnLoginFailure(Self, tempuserid, temppassword);
+  end
+  else begin
+    if Assigned(fOnLoginSuccess) then fOnLoginSuccess(Self, LoginInfo);
+  end;
+end;
+
+procedure TDALoginService.Logout;
+begin
+  if (LogoutCommand<>'')
+    then CheckObjects(Connection, ServiceSchema, NIL, TRUE, TRUE, FALSE);
+
+  if Assigned(fOnLogout)
+    then fOnLogout(Self, Session.SessionID);
+
+  DoLogout(Session.SessionID);
+
+  DestroySession;
+end;
+
+function TDALoginService.DoLogin(const UserID: AnsiString; const Password: AnsiString; out LoginInfo: TDALoginInfo): boolean;
+var ds : IDADataset;
+    i : integer;
+begin
+  result := FALSE;
+  LoginInfo := NIL;
+
+  ds := ServiceSchema.NewDataset(Connection, LoginDataset, [ParamNameUserID, ParamNamePassword], [UserID, Password]);
+  if ds.EOF then Exit;
+
+  LoginInfo := TDALoginInfo.Create;
+  LoginInfo.UserID := UserID;
+  LoginInfo.SessionID := {$IFDEF UNICODE}WideStringToAnsiString{$ENDIF}(GUIDToString(Session.SessionID));
+
+  for i := 0 to (ds.FieldCount-1) do begin
+    Session[ds.Fields[i].Name] := ds.Fields[i].Value;
+    LoginInfo.Attributes.Add({$IFDEF UNICODE}UTF8Encode{$ENDIF}(ds.Fields[i].Name+'='+ds.Fields[i].AsString));
+  end;
+
+  result := TRUE;
+end;
+
+procedure TDALoginService.DoLogout(const SessionID: TGUID);
+var cmd : IDASQLCommand;
+begin
+  if (LogoutCommand<>'')
+    then cmd := ServiceSchema.NewCommand(Connection, LogoutCommand, [ParamNameSessionID], [GUIDToString(SessionID)]);
+    
+  if Not Connection.InTransaction then
+    Connection.BeginTransaction;
+  try
+    cmd.Execute;
+    Connection.CommitTransaction;
+  except
+    Connection.RollbackTransaction;
+    raise;
+  end;
+    
+end;
+
+procedure TDALoginService.SetParamNamePassword(const Value: string);
+begin
+  fParamNamePassword := Value;
+end;
+
+procedure TDALoginService.SetParamNameUserID(const Value: string);
+begin
+  fParamNameUserID := Value;
+end;
+
+function TDALoginService.GetParamNamePasswordStored: Boolean;
+begin
+  result := fParamNamePassword<>def_Password
+end;
+
+function TDALoginService.GetParamNameUserIDStored: Boolean;
+begin
+  result := fParamNameUserID<>def_UserID
+end;
+
+function TDALoginService.GetParamNameSessionIDStored: Boolean;
+begin
+  result := fParamNameSessionID<>def_SessionID
+end;
+
+procedure TDALoginService.SetParamNameSessionID(const Value: string);
+begin
+  fParamNameSessionID := Value;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DARemoteService_Impl.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DARemoteService_Impl.pas
new file mode 100644
index 0000000..1e9ef22
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DARemoteService_Impl.pas	
@@ -0,0 +1,1095 @@
+unit DARemoteService_Impl {$IFNDEF FPC}deprecated{$ENDIF};
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{----------------------------------------------------------------------------}
+{ LEGACY NOTE:                                                               }
+{   As of v4.0, future development of this unit has been discontinued, and   }
+{   new featureswill be impleentd in DataAbstractService_Impl.pas, instead.  }
+{                                                                            }
+{   When applying fixes to this unit, please propagate them to the new unit  }
+{   as well, where needed.                                                   }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  Classes, SysUtils, 
+  {$IFDEF DELPHI5}Forms, {$ENDIF}
+  uRORemoteDataModule, uROClientIntf, uROSessions, uROClasses, uROTypes,
+  uDAClasses, uDAInterfaces, uDADataTable, uDABusinessProcessor, uDACache, uDADelta, uDADataStreamer,
+  uDADataTableReferenceCollection, DataAbstract3_Intf;
+
+type
+  { Types }
+  TDARemoteService = class;
+
+  { Events }
+  TDAAcquireConnectionEvent = procedure(Sender: TDARemoteService; var ConnectionName: string) of object;
+  TDAConnectionAcquiredEvent = procedure(Sender: TDARemoteService; const ConnectionName: string; const AcquiredConnection: IDAConnection) of object;
+  TDAAcquireConnectionFailureEvent = procedure(Sender: TDARemoteService; const ConnectionName: string; Error: Exception) of object;
+  TDAGetDatasetSchemaEvent = procedure(const Dataset: IDADataset) of object;
+  TDAGetDatasetDataEvent = procedure(const Dataset: IDADataset; const IncludeSchema: Boolean; const MaxRecords: Integer) of object;
+  TDAOnBusinessProcessorAutoCreated = procedure(Sender : TRORemoteDataModule; BusinessProcessor : TDABusinessProcessor) of object;
+  TDABeforeExecuteCommandEvent = procedure(Sender : TDARemoteService; const aCommand : IDASQLCommand) of object;
+  TDAAfterExecuteCommandEvent = procedure(Sender : TDARemoteService; const aCommand : IDASQLCommand; RowsAffacted : integer) of object;
+  TDAConnectionReleasedEvent = procedure(Sender: TDARemoteService; const ConnectionName: string) of object;
+  TDAGetSchemaAsXMLEvent = procedure(Sender: TDARemoteService; var SchemaXML : AnsiString) of object;
+
+  TDAProcessDeltasEvent = procedure(Sender : TDARemoteService; DeltaStructs : TDADeltaStructList) of object;
+  TDAProcessDeltasErrorEvent = procedure(Sender : TDARemoteService; DeltaStructs : TDADeltaStructList; Error : Exception; var DoRaise : boolean) of object;
+
+  TDAOnGetCachedDataset = procedure(Sender : TDARemoteService; const aDatasetName : string; aDataStream : TStream) of object;
+
+  TDAGetDatasetDataValidationEvent = procedure(Sender: TDARemoteService;
+                                          const aConnection: IDAConnection;
+                                          const aDatasetName: string;
+                                          const aParamNames: array of string;
+                                          const aParamValues : array of variant;
+                                          aSchema: TDASchema;
+                                          var Allowed : boolean) of object;
+
+  TDAUpdateDataTransactionEvent = procedure(Sender: TDARemoteService; var UseDefaultTransactionLogic: Boolean) of object;
+
+  TDAAfterProcessTransactionAction = (pptaNone, pptaRollback, pptaCommit);
+
+  { TDARemoteService }
+  TDARemoteServiceOption = (rsoProcessDeltasWithoutUpdateRules);
+  TDARemoteServiceOptions = set of TDARemoteServiceOption;
+
+  TDARemoteService = class(TRORemoteDataModule, IDARemoteService)
+  private
+    fServiceSchema: TDASchema;
+
+    fStreamedAcquireConnection,
+    fAcquireConnection: boolean;
+    fConnectionName: string;
+    fOnBeforeAcquireConnection: TDAAcquireConnectionEvent;
+    fOnAfterAcquireConnection: TDAConnectionAcquiredEvent;
+    fOnAfterReleaseConnection: TDAConnectionReleasedEvent;
+    fOnBeforeReleaseConnection: TDAConnectionAcquiredEvent;
+    fConnection: IDAConnection;
+    fServiceAdapter: TDADataStreamer;
+    fOnAcquireConnectionFailure: TDAAcquireConnectionFailureEvent;
+
+    fOnAfterGetDatasetData: TDAGetDatasetDataEvent;
+    fOnBeforeGetDatasetData: TDAGetDatasetDataEvent;
+    fOnAfterGetDatasetSchema: TDAGetDatasetSchemaEvent;
+    fOnBeforeGetDatasetSchema: TDAGetDatasetSchemaEvent;
+    fAutoCreateBusinessProcessors: boolean;
+    fAllowExecuteSQLCommand: boolean;
+    fAllowWhereSQL: boolean;
+    fOnBusinessProcessorAutoCreated: TDAOnBusinessProcessorAutoCreated;
+    fOnBeforeExecuteCommand: TDABeforeExecuteCommandEvent;
+    fOnAfterExecuteCommand: TDAAfterExecuteCommandEvent;
+    fOnGetSchemaAsXML: TDAGetSchemaAsXMLEvent;
+
+    fGetDatasetDataValidation: TDAGetDatasetDataValidationEvent;
+
+    fAfterProcessTransactionAction: TDAAfterProcessTransactionAction;
+
+    fOnUpdateDataBeginTransaction    : TDAUpdateDataTransactionEvent;
+    fOnUpdateDataCommitTransaction   : TDAUpdateDataTransactionEvent;
+    fOnUpdateDataRollBackTransaction : TDAUpdateDataTransactionEvent;
+
+    fOnBeforeProcessDeltas : TDAProcessDeltasEvent;
+    fOnAfterProcessDeltas: TDAProcessDeltasEvent;
+    fOnProcessDeltasError: TDAProcessDeltasErrorEvent;
+    fExportedDataTables: TDADataTableReferenceCollection;
+    fCache: TDACache;
+    fCacheElements: TDACacheElementCollection;
+    fOnGetCachedDataset: TDAOnGetCachedDataset;
+    fOptions: TDARemoteServiceOptions;
+
+    function TriggerTransactionEvent(aEvent: TDAUpdateDataTransactionEvent): Boolean;
+    procedure SetServiceSchema(const Value: TDASchema);
+    procedure SetAcquireConnection(const Value: boolean);
+    procedure SetConnectionName(const Value: string);
+    procedure SetServiceAdapter(const Value: TDADataAdapter);
+    function UnpackDeltas(const DeltaStream: Binary; DeltaStructList : TDADeltaStructList): integer;
+    procedure SetExportedDataTables(const Value: TDADataTableReferenceCollection);
+    procedure MergeDatatablesToSchema(aList : TList);
+    procedure SetCache(const Value: TDACache);
+    procedure SetCacheElements(const Value: TDACacheElementCollection);
+    procedure SetConnection(const aValue: IDAConnection);
+
+  protected
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+    procedure Loaded; override;
+
+    procedure CheckObjects(const aConnection: IDAConnection;
+      aSchema: TDASchema; anAdapter: TDADataAdapter;
+      CheckConnection : boolean = TRUE;
+      CheckSchema : boolean = TRUE;
+      CheckAdapter : boolean = TRUE);
+
+    { Internal }
+    procedure DoOnActivate(aClientID: TGUID; const aMessage: IROMessage); override;
+    procedure DoOnDeactivate(aClientID: TGUID); override;
+
+    function DoGetDatasetData(const Stream: TStream;
+      const aConnection: IDAConnection;
+      const aDatasetName: ansistring;
+      const aParamNames: array of string;
+      const aParamValues : array of variant;
+      const UserFilter : ansistring;
+      aSchema: TDASchema;
+      anAdapter: TDADataAdapter;
+      someOptions: TDAWriteOptions;
+      MaxRecords: integer): integer; virtual;
+
+    function CreateParamString(const ParamNames: array of string; const ParamValues: array of Variant): string;
+
+    function GetDatasetData(const DatasetName: ansistring;
+      const ParamNames: array of string;
+      const ParamValues: array of Variant;
+      const IncludeSchema: Boolean = FALSE;
+      const MaxRecords: Integer = -1): Binary; overload;
+    function GetDatasetData(const DatasetName: Ansistring;
+      const IncludeSchema: Boolean = FALSE;
+      const MaxRecords: Integer = -1): Binary; overload;
+
+    { IDARemoteService }
+    function GetDatasetSchema(const aDatasetName: AnsiString): Binary; virtual;
+    function GetDatasetData(const DatasetName: AnsiString;
+      const Params: AnsiString;
+      const IncludeSchema: Boolean;
+      const MaxRecords: Integer): Binary; overload; virtual;
+    function UpdateData(const Delta: Binary): Binary; virtual;
+    function ExecuteSQLCommand(const SQL: AnsiString): Integer; virtual;
+    function GetSchemaAsXML: AnsiString; virtual;
+    function GetDatasetDataEx(const DatasetName: AnsiString;
+                              const Params: TDADatasetParamArray;
+                              const UserFilter: AnsiString;
+                              const IncludeSchema: Boolean;
+                              const MaxRecords: Integer): Binary;
+    function GetMultipleDatasets(const DatasetRequestInfoArray: TDADatasetRequestInfoArray): TROBinaryMemoryStream;
+    function GetDatasetScripts(const DatasetNames: AnsiString): AnsiString;
+    function ExecuteSQLCommandEx(const CommandName: AnsiString; const Params: TDADatasetParamArray): Integer;
+
+  public
+    constructor Create(aOwner : TComponent); override;
+    destructor Destroy; override;
+
+    property Connection: IDAConnection read fConnection write SetConnection;
+
+  published
+    property AcquireConnection: boolean read fAcquireConnection write SetAcquireConnection default false;
+    property ConnectionName: string read fConnectionName write SetConnectionName;
+
+    property ServiceSchema: TDASchema read fServiceSchema write SetServiceSchema;
+    property ServiceAdapter: TDADataAdapter read fServiceAdapter write SetServiceAdapter;
+
+    property AutoCreateBusinessProcessors : boolean read fAutoCreateBusinessProcessors write fAutoCreateBusinessProcessors default true;
+    property AllowExecuteSQLCommand: boolean read fAllowExecuteSQLCommand write fAllowExecuteSQLCommand default false;
+    property AllowWhereSQL: boolean read fAllowWhereSQL write fAllowWhereSQL default true;
+
+    property OnAfterProcessTransactionAction: TDAAfterProcessTransactionAction read fAfterProcessTransactionAction write fAfterProcessTransactionAction default pptaCommit;
+
+    property OnBeforeAcquireConnection: TDAAcquireConnectionEvent read fOnBeforeAcquireConnection write fOnBeforeAcquireConnection;
+    property OnAfterAcquireConnection: TDAConnectionAcquiredEvent read fOnAfterAcquireConnection write fOnAfterAcquireConnection;
+    property OnBeforeReleaseConnection: TDAConnectionAcquiredEvent read fOnBeforeReleaseConnection write fOnBeforeReleaseConnection;
+    property OnAfterReleaseConnection: TDAConnectionReleasedEvent read fOnAfterReleaseConnection write fOnAfterReleaseConnection;
+    property OnAcquireConnectionFailure: TDAAcquireConnectionFailureEvent read fOnAcquireConnectionFailure write fOnAcquireConnectionFailure;
+
+    property OnBeforeProcessDeltas : TDAProcessDeltasEvent read fOnBeforeProcessDeltas write fOnBeforeProcessDeltas;
+    property OnAfterProcessDeltas: TDAProcessDeltasEvent read fOnAfterProcessDeltas write fOnAfterProcessDeltas;
+    property OnProcessDeltasError: TDAProcessDeltasErrorEvent read fOnProcessDeltasError write fOnProcessDeltasError;
+
+    property OnBeforeGetDatasetSchema: TDAGetDatasetSchemaEvent read fOnBeforeGetDatasetSchema write fOnBeforeGetDatasetSchema;
+    property OnBeforeGetDatasetData: TDAGetDatasetDataEvent read fOnBeforeGetDatasetData write fOnBeforeGetDatasetData;
+    property OnAfterGetDatasetSchema: TDAGetDatasetSchemaEvent read fOnAfterGetDatasetSchema write fOnAfterGetDatasetSchema;
+    property OnAfterGetDatasetData: TDAGetDatasetDataEvent read fOnAfterGetDatasetData write fOnAfterGetDatasetData;
+    property OnBusinessProcessorAutoCreated: TDAOnBusinessProcessorAutoCreated read fOnBusinessProcessorAutoCreated write fOnBusinessProcessorAutoCreated;
+    property OnBeforeExecuteCommand: TDABeforeExecuteCommandEvent read fOnBeforeExecuteCommand write fOnBeforeExecuteCommand;
+    property OnAfterExecuteCommand: TDAAfterExecuteCommandEvent read fOnAfterExecuteCommand write fOnAfterExecuteCommand;
+    property OnGetSchemaAsXMLEvent: TDAGetSchemaAsXMLEvent read fOnGetSchemaAsXML write fOnGetSchemaAsXML;
+    property GetDatasetDataValidation: TDAGetDatasetDataValidationEvent read fGetDatasetDataValidation write fGetDatasetDataValidation;
+
+    property OnUpdateDataBeginTransaction    : TDAUpdateDataTransactionEvent read fOnUpdateDataBeginTransaction write fOnUpdateDataBeginTransaction;
+    property OnUpdateDataCommitTransaction   : TDAUpdateDataTransactionEvent read fOnUpdateDataCommitTransaction write fOnUpdateDataCommitTransaction;
+    property OnUpdateDataRollBackTransaction : TDAUpdateDataTransactionEvent read fOnUpdateDataRollBackTransaction write fOnUpdateDataRollBackTransaction;
+
+    property ExportedDataTables : TDADataTableReferenceCollection read fExportedDataTables write SetExportedDataTables;
+    property Cache : TDACache read fCache write SetCache;
+    property CacheElements : TDACacheElementCollection read fCacheElements write SetCacheElements;
+    property OnGetCachedDataset : TDAOnGetCachedDataset read fOnGetCachedDataset write fOnGetCachedDataset;
+
+    property Options : TDARemoteServiceOptions read fOptions write fOptions;
+  end deprecated;
+
+implementation
+
+uses
+  Contnrs, Variants, TypInfo,
+  uROClient,
+  uDARes, uDAExceptions;
+
+{ TDARemoteService }
+
+constructor TDARemoteService.Create(aOwner: TComponent);
+begin
+  fExportedDataTables := TDADataTableReferenceCollection.Create(Self);
+  fCacheElements := TDACacheElementCollection.Create();
+  fOptions := [rsoProcessDeltasWithoutUpdateRules];
+  fAllowWhereSQL := true;
+
+  inherited;
+
+  fAutoCreateBusinessProcessors := TRUE;
+end;
+
+destructor TDARemoteService.Destroy;
+begin
+  inherited;
+
+  FreeAndNIL(fExportedDataTables);
+  FreeAndNIL(fCacheElements);
+end;
+
+procedure TDARemoteService.DoOnActivate(aClientID: TGUID; const aMessage: IROMessage);
+var
+  connname: string;
+begin
+  inherited;
+
+  if (csDesigning in ComponentState) then Exit;
+
+  if AcquireConnection then try
+    // Acquires a DA connection automatically
+    if (fServiceSchema = nil) or (fServiceSchema.ConnectionManager = nil) then RaiseError(err_DARDMInvalidSchema);
+
+    connname := fConnectionName;
+    if Assigned(fOnBeforeAcquireConnection) then fOnBeforeAcquireConnection(Self, connname);
+
+    fConnection := ServiceSchema.ConnectionManager.NewConnection(connname);
+    if Supports(fConnection, IDAHETConnection) then
+      raise Exception.Create(err_HETConnectionNotSupportedInV3);
+
+    if Assigned(fOnAfterAcquireConnection) then fOnAfterAcquireConnection(Self, connname, fConnection);
+  except
+    on E: Exception do begin
+      if Assigned(fOnAcquireConnectionFailure) then fOnAcquireConnectionFailure(Self, connname, E);
+      raise;
+    end;
+  end;
+end;
+
+procedure TDARemoteService.DoOnDeactivate(aClientID: TGUID);
+var connname : string;
+begin
+  inherited;
+
+  if (csDesigning in ComponentState) then Exit;
+
+  if assigned(fConnection) then begin
+    connname := fConnection.Name;
+
+    if Assigned(fOnBeforeReleaseConnection)
+      then fOnBeforeReleaseConnection(Self, connname, fConnection);
+
+    fConnection := nil;
+
+    if Assigned(fOnAfterReleaseConnection)
+      then fOnAfterReleaseConnection(Self, connname);
+  end;
+end;
+
+procedure TDARemoteService.Loaded;
+begin
+  inherited;
+
+  AcquireConnection := fStreamedAcquireConnection;
+end;
+
+procedure TDARemoteService.CheckObjects(const aConnection: IDAConnection;
+      aSchema: TDASchema; anAdapter: TDADataAdapter;
+      CheckConnection : boolean = TRUE;
+      CheckSchema : boolean = TRUE;
+      CheckAdapter : boolean = TRUE);
+begin
+  if CheckConnection and not Assigned(aConnection) then RaiseError(err_DARDMConnectionIsNotAssigned);
+  if CheckSchema and not Assigned(aSchema) then RaiseError(err_DARDMInvalidSchema);
+  if CheckAdapter and not Assigned(anAdapter) then RaiseError(err_DARDMUnassignedAdapter);
+end;
+
+procedure TDARemoteService.Notification(AComponent: TComponent;
+  Operation: TOperation);
+var ref : TDADataTableReference;
+begin
+  inherited;
+
+  if (Operation = opRemove) then begin
+    if (aComponent = fServiceSchema) then ServiceSchema := nil
+    else if (AComponent=fCache) then fCache := NIL
+    else if (aComponent = fServiceAdapter) then ServiceAdapter := nil
+    else if (AComponent is TDADataTable) and (fExportedDataTables<>NIL) then begin
+      ref := fExportedDataTables.FindByDataTable(TDADataTable(aComponent));
+      if (ref<>NIL) then ref.DataTable := NIL;
+    end;
+  end
+
+  else if (Operation = opInsert) then begin
+    if not (csLoading in ComponentState) and (AComponent is TDASchema) and (fServiceSchema = nil) and (AComponent.Owner = Self) then ServiceSchema := TDASchema(aComponent);
+  end;
+end;
+
+procedure TDARemoteService.SetAcquireConnection(const Value: boolean);
+begin
+  if (csLoading in ComponentState) then
+    fStreamedAcquireConnection := Value
+  else begin
+    if Value then begin
+      if (fServiceSchema = nil) then raise Exception.Create(err_DARDMInvalidSchema);
+    end;
+
+    fAcquireConnection := Value;
+  end;
+end;
+
+procedure TDARemoteService.SetConnection(const aValue: IDAConnection);
+begin
+  if assigned(fConnection) and Supports(fConnection, IDAHETConnection) then
+      raise Exception.Create(err_HETConnectionNotSupportedInV3);
+  fConnection := aValue;
+end;
+
+procedure TDARemoteService.SetConnectionName(const Value: string);
+begin
+  fConnectionName := Trim(Value);
+  if (fConnectionName = '') then fAcquireConnection := FALSE;
+end;
+
+procedure TDARemoteService.SetServiceSchema(const Value: TDASchema);
+begin
+  fServiceSchema := Value;
+
+  if (fServiceSchema <> nil) then
+    fServiceSchema.FreeNotification(Self)
+  else
+    fAcquireConnection := FALSE;
+end;
+
+procedure TDARemoteService.SetServiceAdapter(const Value: TDADataAdapter);
+begin
+  fServiceAdapter := Value;
+  if (fServiceAdapter <> nil) then fServiceAdapter.FreeNotification(Self);
+end;
+
+function TDARemoteService.TriggerTransactionEvent(aEvent: TDAUpdateDataTransactionEvent): Boolean;
+begin
+  result := true;
+  if assigned(aEvent) then aEvent(self, result);
+end;
+
+function TDARemoteService.DoGetDatasetData(
+  const Stream: TStream;
+  const aConnection: IDAConnection;
+  const aDatasetName: ansistring;
+  const aParamNames: array of string;
+  const aParamValues : array of variant;
+  const UserFilter : ansistring;
+  aSchema: TDASchema;
+  anAdapter: TDADataAdapter;
+  someOptions: TDAWriteOptions;
+  MaxRecords: integer): integer;
+
+var
+  ds: IDADataset;
+  i, cnt: integer;
+  paramname: string;
+  paramvalue: variant;
+  inclrows,
+  inclschema: boolean;
+  allow : boolean;
+  ref : TDADataTableReference;
+  cachedentry : IDACacheEntry;
+  cacheelement : TDACacheElement;
+  lDatasetName: string;
+  lUserFilter: string;
+begin
+  // Misc
+  lDatasetName:= Utf8ToString(aDatasetName);
+  luserFilter := Utf8ToString(UserFilter);
+  cachedentry := NIL;
+
+  inclschema := (woSchema in someOptions);
+  inclrows := (woRows in someOptions);
+  ref := NIL;
+
+  if (fCache<>NIL) then begin
+    // If the service is connected to a cache, then it searches the cache for this dataset
+    cachedentry := fCache.Get(Self.Name+'.'+lDatasetName);
+  end;
+
+  if (cachedentry=NIL) then begin
+    // New: searches for a datatable reference that matches the request, if any are present
+    // This allows the user to return in memory datasets or other custom data
+    if (fExportedDataTables.Count>0) then begin
+      ref := fExportedDataTables.FindByName(lDatasetName); // Already checks the datatable is not NIL
+      if (ref<>NIL) then begin
+        ds := ref.Dataset;
+      end;
+    end;
+  end;
+
+  // Checks for connection, schema and adapter to be assigned since it will need to query the DB in this case
+  if (ref=NIL) and (cachedentry=NIL)
+    then CheckObjects(aConnection, aSchema, anAdapter);
+
+  // Security check, common to every case
+  allow := TRUE;
+  if Assigned(fGetDatasetDataValidation)
+    then fGetDatasetDataValidation(Self, aConnection, lDatasetName, aParamNames, aParamValues, aSchema, allow);
+
+  if not allow
+    then raise EDADatasetNotAccessible.CreateFmt(err_DatasetNotAccessible, [aDatasetName]);
+
+  // Returns the actual data. Cached and non-cached data follow two different paths (some events are not triggered in the
+  // case of cached data, since we don't have an actual IDADataset to reference)
+
+  if (cachedentry<>NIL) then begin
+    if Assigned(fOnGetCachedDataset) then fOnGetCachedDataset(Self, lDatasetName, cachedentry.Data);
+
+    result := cachedentry.RecordCount;
+    Stream.CopyFrom(cachedentry.Data, 0);
+  end
+  else begin
+
+    if TriggerTransactionEvent(fOnUpdateDataBeginTransaction) then Connection.BeginTransaction;
+    try
+
+      // Gets a reference to the dataset if it couldn't find a datatable to match the request...
+      if (ref=NIL) then
+        ds := aSchema.NewDataset(aConnection, lDatasetName);
+
+      // Fills the parameters (if any are specified)
+      cnt := Length(aParamNames);
+      if (cnt>0) then begin
+        for i := 0 to (cnt-1) do begin
+          paramname := aParamNames[i];
+          paramvalue := aParamValues[i];
+
+          ds.ParamByName(paramname).Value := paramvalue;
+        end;
+      end;
+
+      // Applies the UserFilter, if any specified
+      if (Trim(lUserFilter)<>'') then begin
+        if not AllowWhereSQL then
+          raise Exception.Create('Passing of clear text WHERE clauses has been disabled (GetData)');
+        ds.Where.AddText(lUserFilter);
+      end;
+
+      // ...and writes the data fireing the right events
+      if inclschema and Assigned(fOnBeforeGetDatasetSchema) then fOnBeforeGetDatasetSchema(ds);
+      if inclrows and Assigned(fOnBeforeGetDatasetData) then fOnBeforeGetDatasetData(ds, inclschema, MaxRecords);
+
+      result := anAdapter.WriteDataset(stream, ds, someOptions, MaxRecords);
+
+      if inclschema and Assigned(fOnAfterGetDatasetSchema) then fOnAfterGetDatasetSchema(ds);
+      if inclrows and Assigned(fOnAfterGetDatasetData) then fOnAfterGetDatasetData(ds, inclschema, MaxRecords);
+
+      if Connection.InTransaction and TriggerTransactionEvent(fOnUpdateDataCommitTransaction) then Connection.CommitTransaction;
+    except
+      if Connection.InTransaction and TriggerTransactionEvent(fOnUpdateDataRollBackTransaction) then Connection.RollbackTransaction;
+      raise;
+    end;
+
+    // Checks if it needs to stored it in the cache
+    if (fCache<>NIL) then begin
+      cacheelement := fCacheElements.FindByDatasetName(lDatasetName);
+      if (cacheelement=NIL) or not cacheelement.Enabled then Exit;
+
+      fCache.Store(Self.Name+'.'+lDatasetName, stream, TRUE, result, cacheelement.MaxReads, cacheelement.Duration);
+    end;
+    
+  end;
+end;
+
+function TDARemoteService.GetDatasetSchema(
+  const aDatasetName: AnsiString): Binary;
+var tempds : IDADataset;
+    schemads : TDADataset;
+    dummyrefs : TObjectList;
+    lDatasetName: string;
+begin
+  dummyrefs := NIL;
+
+  CheckObjects(Connection, ServiceSchema, ServiceAdapter);
+
+  result := Binary.Create;
+  try
+    try
+      // New: merges the data tables references by the service
+      if (fExportedDataTables.Count>0) then begin
+        dummyrefs := TObjectList.Create;
+        MergeDatatablesToSchema(dummyrefs);
+      end;
+
+      lDatasetName := Utf8ToString(aDatasetName);
+      // Improved this method: now it is not necessary to have statements associated to a dataset
+      // thus allowing for the definition of in memory datasets inside a schema
+      schemads := ServiceSchema.Datasets.DatasetByName(lDatasetName);
+      tempds := Connection.NewDataset('', lDatasetName);
+
+      // Copies the schema
+      tempds.Fields.AssignFieldCollection(schemads.Fields);
+      tempds.Params.AssignParamCollection(schemads.Params);
+
+      ServiceAdapter.WriteDataset(result, tempds, [woSchema], 0);
+    except
+      FreeAndNIL(result);
+      raise;
+  end;
+  finally
+    dummyrefs.Free;
+  end;
+end;
+
+type
+  TBizProcessorReference = class(TObject)
+  private
+  end;
+
+function TDARemoteService.UnpackDeltas(const DeltaStream: Binary;
+  DeltaStructList : TDADeltaStructList): integer;
+var x, i: integer;
+    deltaname: string;
+    bizproc: TDABusinessProcessor;
+    details : TDADatasetRelationshipList;
+    found: boolean;
+    struct : TDADeltaStruct;
+begin
+  result := 0;
+  with ServiceAdapter do begin
+
+    // Reads the deltas. 
+    Initialize(DeltaStream, aiReadFromBeginning);
+    try
+      if (DeltaCount = 0) then Exit;
+
+      for i := 0 to (DeltaCount - 1) do begin
+        deltaname := DeltaNames[i];
+        found := FALSE;
+
+        { Tries to locate a user-defined business processor }
+        for x := 0 to (Self.ComponentCount - 1) do
+          if (Self.Components[x] is TDABusinessProcessor) then begin
+            bizproc := TDABusinessProcessor(Self.Components[x]);
+            if SameText(bizproc.ReferencedDataset, deltaname) then begin
+              struct := DeltaStructList.Add(NewDelta(deltaname), bizproc);
+              ReadDelta(deltaname, struct.Delta);
+
+              found := TRUE;
+              Break;
+            end;
+          end;
+
+        { Either creates one or aborts raising an exception }
+        if not found then begin
+          if not AutoCreateBusinessProcessors then RaiseError(err_DARDMCannotFindProxessorForDelta, [deltaname]);
+
+          bizproc := TDABusinessProcessor.Create(Self);
+          bizproc.ReferencedDataset := deltaname;
+          bizproc.Schema := ServiceSchema;
+
+          struct := DeltaStructList.Add(NewDelta(deltaname), bizproc);
+          ReadDelta(deltaname, struct.Delta);
+
+          if Assigned(fOnBusinessProcessorAutoCreated)
+            then fOnBusinessProcessorAutoCreated(Self, bizproc);
+        end;
+
+        Inc(result);
+      end;
+
+      if (result=0) then Exit; // Cannot process anything!
+
+      { Sets the master/detail relationships }
+      with ServiceSchema do
+        if (RelationShips.Count>0) then begin
+          details := TDADatasetRelationshipList.Create;
+          try
+
+            for i := 0 to DeltaStructList.Count-1 do begin
+              RelationShips.GetDetails(DeltaStructList[i].BusinessProcessor.ReferencedDataset, details);
+              if (details.Count=0) then Continue;
+
+              { Prepares an array with the references to the detail deltas that will be used later on to adjust
+                autoincs, etc. }
+              for x := 0 to details.Count-1 do begin
+                struct := DeltaStructList.FindStruct(details[x].DetailDatasetName);
+                if (struct<>NIL) then begin
+                  DeltaStructList[i].DetailDeltas.Add(struct.Delta);
+                  DeltaStructList[i].RelationShips.Add(details[x]);
+                end;
+              end;
+            end;
+          finally
+            details.Free;
+          end;
+          
+        end;
+    finally
+      Finalize;
+    end;
+  end;
+end;
+
+function TDARemoteService.UpdateData(const Delta: Binary): Binary;
+var
+  deltastructs : TDADeltaStructList;
+  struct : TDADeltaStruct;
+  k, i: integer;
+  doraise : boolean;
+  processeddeltas : TStringList;
+
+  function ProceedDefaultTransactionLogic(aEvent: TDAUpdateDataTransactionEvent): Boolean;
+  begin
+    Result := True;
+    if Assigned(aEvent)
+      then aEvent(Self, Result);
+  end;
+
+  procedure FlushCache(const aDatasetName : string);
+  var element : TDACacheElement;
+  begin
+    if (fCache=NIL) or (fCacheElements.Count=0) then Exit;
+
+    element := fCacheElements.FindByDatasetName(aDatasetName);
+    if (element=NIL) then Exit;
+
+    if (ceoFlushOnUpdate in element.Options)
+      then fCache.Flush(Self.Name+'.'+aDatasetName);
+  end;
+
+begin
+  result := NIL;
+  processeddeltas := NIL;
+
+  CheckObjects(Connection, ServiceSchema, ServiceAdapter);
+
+  deltastructs := TDADeltaStructList.Create;
+
+  with ServiceAdapter do try
+    try
+      // Reads the deltas. The order in which the are put in the stream indicates
+      // the order in which updates are being made
+      if not (UnpackDeltas(Delta, deltastructs)>0) then Exit;
+
+      // Applies the updates
+      if ProceedDefaultTransactionLogic(fOnUpdateDataBeginTransaction)
+        then Connection.BeginTransaction;
+
+      if Assigned(fOnBeforeProcessDeltas) then fOnBeforeProcessDeltas(Self, deltastructs);
+
+      if (ServiceSchema.UpdateRules.Count=0) and (rsoProcessDeltasWithoutUpdateRules in Options) then begin
+        // Processes them in order, from first to last delta sent
+        for i := 0 to deltastructs.Count-1 do begin
+          // Flushes the cache for the given dataset
+          FlushCache(deltastructs[i].Delta.LogicalName);
+
+          deltastructs[i].BusinessProcessor.ProcessDelta(Connection, deltastructs[i].Delta, AllChanges);
+        end;
+      end
+      else try
+        processeddeltas := TStringList.Create;
+
+        for i := 0 to (ServiceSchema.UpdateRules.Count-1) do begin
+          // Processes them in the order defined in the schema
+          struct := deltastructs.FindStruct(ServiceSchema.UpdateRules[i].DatasetName);
+          if (struct<>NIL) then begin
+          // Adds the dataset name to the list of processed deltas. Those that don't have update rules will be processed later
+          processeddeltas.Add(struct.Delta.LogicalName);
+
+          // Flushes the cache for the given dataset
+          FlushCache(struct.Delta.LogicalName);
+
+          // Processes the delta
+            struct.BusinessProcessor.ProcessDelta(Connection, struct.Delta, ServiceSchema.UpdateRules[i].ChangeTypes);
+
+
+            if (ctInsert in ServiceSchema.UpdateRules[i].ChangeTypes) then begin
+              for k := 0 to (struct.DetailDeltas.Count-1) do
+                struct.BusinessProcessor.SynchronizeAutoIncs(struct.Delta, struct.DetailDeltas[k], struct.RelationShips[k]);
+            end;
+          end;
+        end;
+
+        // Processes the deltas for which update rules were not defined
+        if (rsoProcessDeltasWithoutUpdateRules in Options) then begin
+          for i := 0 to deltastructs.Count-1 do begin
+            // Skips if already processed
+            if (processeddeltas.IndexOf(deltastructs[i].Delta.LogicalName)>=0) then Continue;
+
+            // Flushes the cache for the given dataset
+            FlushCache(deltastructs[i].Delta.LogicalName);
+
+              deltastructs[i].BusinessProcessor.ProcessDelta(Connection, deltastructs[i].Delta, AllChanges);
+            end;
+          end;
+
+      finally
+        processeddeltas.Free;
+      end;
+
+      if Assigned(fOnAfterProcessDeltas) then fOnAfterProcessDeltas(Self, deltastructs);
+
+      if Connection.InTransaction and ProceedDefaultTransactionLogic(fOnUpdateDataCommitTransaction)
+        then Connection.CommitTransaction;
+
+      // Prepares the response
+      result := Binary.Create;
+      ServiceAdapter.Initialize(result, aiWrite);
+      try
+        for i := 0 to deltastructs.Count-1 do
+          WriteDelta(deltastructs[i].Delta);
+      finally
+        ServiceAdapter.Finalize;
+      end;
+
+    except
+      on E:Exception do begin
+        doraise := TRUE;
+        try
+          if Assigned(fOnProcessDeltasError)
+            then fOnProcessDeltasError(Self, deltastructs, E, doraise);
+        finally 
+          if Connection.InTransaction and ProceedDefaultTransactionLogic(fOnUpdateDataRollBackTransaction)
+            then Connection.RollbackTransaction;
+        end;
+        if doraise then raise;
+      end;
+    end;
+  finally
+    deltastructs.Free;
+  end;
+end;
+
+function TDARemoteService.ExecuteSQLCommand(const SQL: AnsiString): Integer;
+begin
+  if not AllowExecuteSQLCommand then
+    RaiseError(err_ExecuteSQLCommandNotAllowed);
+
+  CheckObjects(Connection, ServiceSchema, NIL, TRUE, TRUE, FALSE);
+
+  if TriggerTransactionEvent(fOnUpdateDataBeginTransaction) then Connection.BeginTransaction;
+  try
+    result := Connection.NewCommand(Utf8ToString(SQL), stSQL).Execute;
+    if Connection.InTransaction and TriggerTransactionEvent(fOnUpdateDataCommitTransaction) then Connection.CommitTransaction;
+  except
+    if Connection.InTransaction and TriggerTransactionEvent(fOnUpdateDataRollBackTransaction) then Connection.RollbackTransaction;
+    raise;
+  end;
+end;
+
+function TDARemoteService.GetDatasetData(const DatasetName: AnsiString; const Params: AnsiString;
+  const IncludeSchema: Boolean; const MaxRecords: Integer): Binary;
+var
+  parnames: array of string;
+  parvalues: array of Variant;
+  options: TDAWriteOptions;
+  pars: TStringList;
+  i : integer;
+begin
+  pars := TStringList.Create;
+  result := Binary.Create;
+  try
+    try
+      pars.Text := Utf8ToString(Params);
+      SetLength(parnames, pars.Count);
+      SetLength(parvalues, pars.Count);
+      for i := 0 to (pars.Count-1) do begin
+        parnames[i] := pars.Names[i];
+        parvalues[i] := pars.Values[pars.Names[i]];
+      end;
+
+      if IncludeSchema
+        then options := [woSchema, woRows]
+        else options := [woRows];
+
+      DoGetDatasetData(result, Connection, DatasetName, parnames, parvalues, '', ServiceSchema, ServiceAdapter, options, MaxRecords);
+    except
+      FreeAndNIL(result);
+      raise;
+    end;
+  finally
+    pars.Free;
+  end;
+end;
+
+function TDARemoteService.CreateParamString(
+  const ParamNames: array of string;
+  const ParamValues: array of Variant): string;
+var
+  i: integer;
+begin
+  result := '';
+
+  for i := 0 to High(ParamNames) do
+    result := result + ParamNames[i] + '=' + VarToStr(ParamValues[i]) + #13;
+end;
+
+function TDARemoteService.GetDatasetData(const DatasetName: ansistring;
+  const ParamNames: array of string; const ParamValues: array of Variant;
+  const IncludeSchema: Boolean; const MaxRecords: Integer): Binary;
+var
+  options: TDAWriteOptions;
+begin
+  {result := GetDatasetData(DatasetName, CreateParamString(ParamNames, ParamValues), IncludeSchema, MaxRecords);}
+  result := Binary.Create;
+  try
+    if IncludeSchema
+      then options := [woSchema, woRows]
+      else options := [woRows];
+    DoGetDatasetData(result, Connection, DatasetName, ParamNames, ParamValues, '', ServiceSchema, ServiceAdapter, options, MaxRecords);
+  except
+    FreeAndNIL(result);
+    raise;
+  end;
+end;
+
+function TDARemoteService.GetDatasetData(const DatasetName: ansistring;
+  const IncludeSchema: Boolean = FALSE;
+  const MaxRecords: Integer = -1): Binary;
+begin
+  result := GetDatasetData(DatasetName, '', IncludeSchema, MaxRecords);
+end;
+
+procedure TDARemoteService.MergeDatatablesToSchema(aList : TList);
+var i : integer;
+    ref : TDADataset;
+    dt : IDADataset;
+begin
+  if (fExportedDataTables.Count>0) then begin
+    for i := 0 to fExportedDataTables.Count-1 do
+      if fExportedDataTables[i].IsValidReference {and fExportedDataTables[i].ExportAsPartOfSchema} then begin
+        dt := fExportedDataTables[i].Dataset;
+
+        ref := ServiceSchema.Datasets.Add;
+        ref.Name := dt.LogicalName;
+        ref.Fields.AssignFieldCollection(dt.Fields);
+        ref.Params.AssignParamCollection(dt.Params);
+
+        aList.Add(ref);
+      end;
+  end;
+end;
+
+function TDARemoteService.GetSchemaAsXML: AnsiString;
+var xml : TStringStream;
+    dummyrefs : TObjectList;
+begin
+  result := '';
+  dummyrefs := NIL;
+
+  if not Assigned(ServiceSchema) then Exit;
+
+  try
+    // New: merges the data tables references by the service
+    if (fExportedDataTables.Count>0) then begin
+      dummyrefs := TObjectList.Create;
+      MergeDatatablesToSchema(dummyrefs);
+    end;
+
+    // Returns the schema
+    xml := TStringStream.Create('');
+    try
+      ServiceSchema.SaveToStream(xml);
+
+      result := UTF8Encode(xml.DataString);
+
+      if Assigned(fOnGetSchemaAsXML)
+        then fOnGetSchemaAsXML(Self, result);
+    finally
+      xml.Free;
+    end;
+
+  finally
+    dummyrefs.Free; // automatically removes the datatables from the schema again
+  end;
+end;
+
+function TDARemoteService.GetDatasetDataEx(const DatasetName: AnsiString;
+                              const Params: TDADatasetParamArray;
+                              const UserFilter: AnsiString;
+                              const IncludeSchema: Boolean;
+                              const MaxRecords: Integer): Binary;
+var parnames : array of string;
+    parvalues : array of variant;
+    i : integer;
+    options : TDAWriteOptions;
+begin
+  result := Binary.Create;
+  try
+    { Prepares the parameter arrays}
+    if (Params<>NIL) then begin
+      SetLength(parnames, Params.Count);
+      SetLength(parvalues, Params.Count);
+      for i := 0 to (Params.Count-1) do begin
+        parnames[i] := Utf8ToString(Params[i].Name);
+        parvalues[i] := Params[i].Value;
+      end;
+    end
+    else begin
+      SetLength(parnames, 0);
+      SetLength(parvalues, 0);
+    end;
+
+    { Other options }
+    if IncludeSchema
+      then options := [woSchema, woRows]
+      else options := [woRows];
+
+    { Reads the data }
+    DoGetDatasetData(result, Connection, DatasetName, parnames, parvalues, UserFilter, ServiceSchema, ServiceAdapter, options, MaxRecords);
+  except
+    FreeAndNIL(result);
+    raise;
+  end;
+end;
+
+function TDARemoteService.GetMultipleDatasets(const DatasetRequestInfoArray: TDADatasetRequestInfoArray): TROBinaryMemoryStream;
+var i : integer;
+    ds : IDADataset;
+    parnames : array of string;
+    parvalues : array of variant;
+    x : integer;
+    opt : TDAWriteOptions;
+    allow : boolean;
+    lDatasetName: string;
+begin
+  result := NIL;
+  if (DatasetRequestInfoArray=NIL) or (DatasetRequestInfoArray.Count=0) then exit;
+  result := Binary.Create;
+  try
+    ServiceAdapter.Initialize(result, aiWrite);
+    try
+
+      for i := 0 to (DatasetRequestInfoArray.Count-1) do begin
+        with DatasetRequestInfoArray[i] do begin
+          SetLength(parnames, Params.Count);
+          SetLength(parvalues, Params.Count);
+          for x := 0 to (Params.Count-1) do begin
+            parnames[x] := Utf8ToString(Params[x].Name);
+            parvalues[x] := Params[x].Value;
+          end;
+          lDatasetName := Utf8ToString(DatasetName);
+          opt := [woRows];
+          if DatasetRequestInfoArray[i].IncludeSchema then opt := opt+[woSchema];
+
+          // Security check
+          allow := TRUE;
+          if Assigned(fGetDatasetDataValidation)
+            then fGetDatasetDataValidation(Self, Connection, lDatasetName, parnames, parvalues, ServiceSchema, allow);
+
+          if not allow
+            then raise EDADatasetNotAccessible.CreateFmt(err_DatasetNotAccessible, [lDatasetName]);
+
+          // Proceeds
+          ds := ServiceSchema.NewDataset(Connection, lDatasetName, parnames, parvalues, TRUE);
+
+          ServiceAdapter.WriteDataset(ds, opt, MaxRecords);
+        end;
+      end;
+    finally
+      ServiceAdapter.Finalize();
+    end;
+  except
+    FreeAndNIL(result);
+    raise
+  end;
+end;
+
+function TDARemoteService.GetDatasetScripts(const DatasetNames: AnsiString): AnsiString;
+var names : TStringList;
+    i : integer;
+    ds : TDADataset;
+begin
+  result := '';
+  names := TStringList.Create;
+  try
+    CheckObjects(NIL, fServiceSchema, NIL, FALSE, TRUE, FALSE);
+    names.CommaText := Utf8ToString(DatasetNames);
+
+    result := '<Scripts>';
+
+    for i := 0 to (names.Count-1) do begin
+      ds := fServiceSchema.Datasets.DatasetByName(names[i]);
+
+      result := result+ {$IFDEF UNICODE}UTF8Encode{$ENDIF}(
+          Format('<%s Language="%s"><![CDATA[%s]]></%s>', [
+          names[i],
+          GetEnumName(TypeInfo(TROSEScriptLanguage), Ord(ds.BusinessRulesClient.ScriptLanguage)),
+          {$IFNDEF UNICODE}UTF8Encode{$ENDIF}(ds.BusinessRulesClient.Script),
+          names[i]]));
+    end;
+
+    result := result+AnsiString('</Scripts>');
+  finally
+    FreeAndNIL(names);
+  end;
+end;
+
+function TDARemoteService.ExecuteSQLCommandEx(const CommandName: AnsiString;
+  const Params: TDADatasetParamArray): Integer;
+var cmd : IDASQLCommand;
+    i : integer;
+begin
+  if not AllowExecuteSQLCommand then
+    RaiseError(err_ExecuteSQLCommandNotAllowed);
+
+  CheckObjects(Connection, ServiceSchema, NIL, TRUE, TRUE, FALSE);
+
+  cmd := ServiceSchema.NewCommand(Connection, Utf8ToString(CommandName));
+  for i := 0 to (Params.Count-1) do
+    cmd.ParamByName(Utf8ToString(Params[i].Name)).Value := Params[i].Value;
+
+  if Assigned(fOnBeforeExecuteCommand)
+    then fOnBeforeExecuteCommand(Self, cmd);
+
+  if TriggerTransactionEvent(fOnUpdateDataBeginTransaction) then Connection.BeginTransaction;
+  try
+    result := cmd.Execute;
+    if Connection.InTransaction and TriggerTransactionEvent(fOnUpdateDataCommitTransaction) then Connection.CommitTransaction;
+  except
+    if Connection.InTransaction and TriggerTransactionEvent(fOnUpdateDataRollBackTransaction) then Connection.RollbackTransaction;
+    raise;
+  end;
+
+  if Assigned(fOnAfterExecuteCommand)
+    then fOnAfterExecuteCommand(Self, cmd, result);
+end;
+
+procedure TDARemoteService.SetExportedDataTables(const Value: TDADataTableReferenceCollection);
+begin
+  fExportedDataTables.Assign(Value);
+end;
+
+procedure TDARemoteService.SetCache(const Value: TDACache);
+begin
+  fCache := Value;
+  if (fCache<>NIL)
+    then fCache.FreeNotification(Self);
+end;
+
+procedure TDARemoteService.SetCacheElements(
+  const Value: TDACacheElementCollection);
+begin
+  fCacheElements.Assign(Value);
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DBSessionManager Create Session Table.sql b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DBSessionManager Create Session Table.sql
new file mode 100644
index 0000000..54f5e49
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DBSessionManager Create Session Table.sql	
@@ -0,0 +1,15 @@
+CREATE TABLE [dbo].[Sessions] (
+	[SessionID] [char] (38) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL ,
+	[Created] [datetime] NULL ,
+	[LastAccessed] [datetime] NULL ,
+	[Data] [image] NULL 
+) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]
+GO
+
+ALTER TABLE [dbo].[Sessions] WITH NOCHECK ADD 
+	CONSTRAINT [PK_Sessions] PRIMARY KEY  CLUSTERED 
+	(
+		[SessionID]
+	)  ON [PRIMARY] 
+GO
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DBSessionManager Default Schema.daConnections b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DBSessionManager Default Schema.daConnections
new file mode 100644
index 0000000..625165d
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DBSessionManager Default Schema.daConnections	
@@ -0,0 +1 @@
+<TDAConnectionManager><Connections Type="TDAConnectionCollection" IsObject="true" IsCollection="true" Count="1" ItemClass="TDAConnection"><Item0><ConnectionString>ADO?AuxDriver=SQLOLEDB.1;Server=localhost;Database=Northwind;UserID=sa;Password=;</ConnectionString><Default>True</Default><Description></Description><Name>MSSQL</Name><Tag>0</Tag></Item0></Connections><DriverManager Type="TDADriverManager" IsObject="true" ByRef="true" RefName="DADriverManager1" Owner="ServerForm"/><MaxPoolSize>10</MaxPoolSize><PoolBehaviour>pbWait</PoolBehaviour><PoolingEnabled>True</PoolingEnabled><PoolTimeoutSeconds>60</PoolTimeoutSeconds><Tag>0</Tag><WaitIntervalSeconds>1</WaitIntervalSeconds></TDAConnectionManager>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DBSessionManager Default Schema.daSchema b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DBSessionManager Default Schema.daSchema
new file mode 100644
index 0000000..32f7e13
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DBSessionManager Default Schema.daSchema	
@@ -0,0 +1,30 @@
+<?xml version="1.0" encoding="utf-8"?>
+<TDASchema><Commands Type="TDASQLCommandCollection" IsObject="true" IsCollection="true" Count="4" ItemClass="TDASQLCommand"><Item0><CustomAttributes Type="TStrings" IsObject="true"></CustomAttributes><Description></Description><Name>Insert_Session</Name><Params Type="TDAParamCollection" IsObject="true" IsCollection="true" Count="4" ItemClass="TDAParam"><Item0><BlobType>dabtUnknown</BlobType><DataType>datString</DataType><Description></Description><GeneratorName></GeneratorName><Name>SessionID</Name><ParamType>daptInput</ParamType><Size>38</Size><Value></Value></Item0><Item1><BlobType>dabtUnknown</BlobType><DataType>datDateTime</DataType><Description></Description><GeneratorName></GeneratorName><Name>Created</Name><ParamType>daptInput</ParamType><Size>0</Size><Value></Value></Item1><Item2><BlobType>dabtUnknown</BlobType><DataType>datDateTime</DataType><Description></Description><GeneratorName></GeneratorName><Name>LastAccessed</Name><ParamType>daptInput</ParamType><Size>0</Size><Value></Value></Item2><Item3><BlobType>dabtUnknown</BlobType><DataType>datBlob</DataType><Description></Description><GeneratorName></GeneratorName><Name>Data</Name><ParamType>daptInput</ParamType><Size>0</Size><Value></Value></Item3></Params><Statements Type="TDAStatementCollection" IsObject="true" IsCollection="true" Count="1" ItemClass="TDAStatement"><Item0><ColumnMappings Type="TDAColumnMappingCollection" IsObject="true" IsCollection="true" Count="0" ItemClass="TDAColumnMapping"/><Connection>MSSQL</Connection><Name></Name><SQL>INSERT
+  INTO Sessions
+    (SessionID, Created, LastAccessed, Data)
+  VALUES
+    (:SessionID, :Created, :LastAccessed, :Data)</SQL><StatementType>stSQL</StatementType><TargetTable></TargetTable></Item0></Statements></Item0><Item1><CustomAttributes Type="TStrings" IsObject="true"></CustomAttributes><Description></Description><Name>Update_Session</Name><Params Type="TDAParamCollection" IsObject="true" IsCollection="true" Count="3" ItemClass="TDAParam"><Item0><BlobType>dabtUnknown</BlobType><DataType>datDateTime</DataType><Description></Description><GeneratorName></GeneratorName><Name>LastAccessed</Name><ParamType>daptInput</ParamType><Size>0</Size><Value></Value></Item0><Item1><BlobType>dabtUnknown</BlobType><DataType>datBlob</DataType><Description></Description><GeneratorName></GeneratorName><Name>Data</Name><ParamType>daptInput</ParamType><Size>0</Size><Value></Value></Item1><Item2><BlobType>dabtUnknown</BlobType><DataType>datString</DataType><Description></Description><GeneratorName></GeneratorName><Name>SessionID</Name><ParamType>daptInput</ParamType><Size>38</Size><Value></Value></Item2></Params><Statements Type="TDAStatementCollection" IsObject="true" IsCollection="true" Count="1" ItemClass="TDAStatement"><Item0><ColumnMappings Type="TDAColumnMappingCollection" IsObject="true" IsCollection="true" Count="0" ItemClass="TDAColumnMapping"/><Connection>MSSQL</Connection><Name></Name><SQL>UPDATE
+    Sessions
+  SET
+    LastAccessed = :LastAccessed,
+    Data = :Data
+  WHERE
+    SessionID = :SessionID
+</SQL><StatementType>stSQL</StatementType><TargetTable></TargetTable></Item0></Statements></Item1><Item2><CustomAttributes Type="TStrings" IsObject="true"></CustomAttributes><Description></Description><Name>ClearSessions</Name><Params Type="TDAParamCollection" IsObject="true" IsCollection="true" Count="1" ItemClass="TDAParam"><Item0><BlobType>dabtUnknown</BlobType><DataType>datDateTime</DataType><Description></Description><GeneratorName></GeneratorName><Name>LastAccessed</Name><ParamType>daptInput</ParamType><Size>0</Size><Value></Value></Item0></Params><Statements Type="TDAStatementCollection" IsObject="true" IsCollection="true" Count="1" ItemClass="TDAStatement"><Item0><ColumnMappings Type="TDAColumnMappingCollection" IsObject="true" IsCollection="true" Count="0" ItemClass="TDAColumnMapping"/><Connection>MSSQL</Connection><Name></Name><SQL>DELETE
+  FROM
+    Sessions
+  WHERE
+    LastAccessed &lt; :LastAccessed</SQL><StatementType>stSQL</StatementType><TargetTable></TargetTable></Item0></Statements></Item2><Item3><CustomAttributes Type="TStrings" IsObject="true"></CustomAttributes><Description></Description><Name>Delete_Session</Name><Params Type="TDAParamCollection" IsObject="true" IsCollection="true" Count="1" ItemClass="TDAParam"><Item0><BlobType>dabtUnknown</BlobType><DataType>datString</DataType><Description></Description><GeneratorName></GeneratorName><Name>SessionID</Name><ParamType>daptInput</ParamType><Size>38</Size><Value></Value></Item0></Params><Statements Type="TDAStatementCollection" IsObject="true" IsCollection="true" Count="1" ItemClass="TDAStatement"><Item0><ColumnMappings Type="TDAColumnMappingCollection" IsObject="true" IsCollection="true" Count="0" ItemClass="TDAColumnMapping"/><Connection>MSSQL</Connection><Name></Name><SQL>DELETE
+  FROM
+    Sessions
+  WHERE
+    SessionID = :SessionID</SQL><StatementType>stSQL</StatementType><TargetTable></TargetTable></Item0></Statements></Item3></Commands><ConnectionManager Type="TDAConnectionManager" IsObject="true" ByRef="true" RefName="DAConnectionManager" Owner="SchemaModelerData"/><DataDictionary Type="TDADataDictionary" IsObject="true" ByRef="true" RefName="DADataDictionary" Owner="SchemaModelerData"/><Datasets Type="TDADatasetCollection" IsObject="true" IsCollection="true" Count="3" ItemClass="TDADataset"><Item0><BusinessClassID></BusinessClassID><BusinessRulesClient Type="TDAClientBusinessRuleScript" IsObject="true"><CompileOnServer>True</CompileOnServer><Description></Description><RunOnClientAndServer>True</RunOnClientAndServer><Script></Script><ScriptLanguage>rslPascalScript</ScriptLanguage></BusinessRulesClient><BusinessRulesServer Type="TDABusinessRuleScript" IsObject="true"><Description></Description><Script></Script><ScriptLanguage>rslPascalScript</ScriptLanguage></BusinessRulesServer><CustomAttributes Type="TStrings" IsObject="true"></CustomAttributes><Description></Description><Fields Type="TDAFieldCollection" IsObject="true" IsCollection="true" Count="1" ItemClass="TDAField"><Item0><Alignment>taLeftJustify</Alignment><BlobType>dabtUnknown</BlobType><BusinessClassID></BusinessClassID><Calculated>False</Calculated><CustomAttributes Type="TStrings" IsObject="true"></CustomAttributes><DataType>datString</DataType><DefaultValue></DefaultValue><Description></Description><DictionaryEntry></DictionaryEntry><DisplayFormat></DisplayFormat><DisplayLabel>SessionID</DisplayLabel><DisplayWidth>0</DisplayWidth><EditFormat></EditFormat><EditMask></EditMask><GeneratorName></GeneratorName><InPrimaryKey>False</InPrimaryKey><KeyFields></KeyFields><LogChanges>True</LogChanges><Lookup>False</Lookup><LookupCache>False</LookupCache><LookupKeyFields></LookupKeyFields><LookupResultField></LookupResultField><LookupSource Type="TDataSource" IsObject="true" IsNull="true"/><Name>SessionID</Name><ReadOnly>False</ReadOnly><RegExpression></RegExpression><Required>False</Required><ServerAutoRefresh>False</ServerAutoRefresh><Size>38</Size><Visible>True</Visible></Item0></Fields><Name>GetAllSessionIDsDataset</Name><Params Type="TDAParamCollection" IsObject="true" IsCollection="true" Count="0" ItemClass="TDAParam"/><Statements Type="TDAStatementCollection" IsObject="true" IsCollection="true" Count="1" ItemClass="TDAStatement"><Item0><ColumnMappings Type="TDAColumnMappingCollection" IsObject="true" IsCollection="true" Count="1" ItemClass="TDAColumnMapping"><Item0><DatasetField>SessionID</DatasetField><TableField>SessionID</TableField></Item0></ColumnMappings><Connection>MSSQL</Connection><Name></Name><SQL>Select SessionID from Sessions
+</SQL><StatementType>stSQL</StatementType><TargetTable></TargetTable></Item0></Statements></Item0><Item1><BusinessClassID></BusinessClassID><BusinessRulesClient Type="TDAClientBusinessRuleScript" IsObject="true"><CompileOnServer>True</CompileOnServer><Description></Description><RunOnClientAndServer>True</RunOnClientAndServer><Script></Script><ScriptLanguage>rslPascalScript</ScriptLanguage></BusinessRulesClient><BusinessRulesServer Type="TDABusinessRuleScript" IsObject="true"><Description></Description><Script></Script><ScriptLanguage>rslPascalScript</ScriptLanguage></BusinessRulesServer><CustomAttributes Type="TStrings" IsObject="true"></CustomAttributes><Description></Description><Fields Type="TDAFieldCollection" IsObject="true" IsCollection="true" Count="1" ItemClass="TDAField"><Item0><Alignment>taLeftJustify</Alignment><BlobType>dabtUnknown</BlobType><BusinessClassID></BusinessClassID><Calculated>False</Calculated><CustomAttributes Type="TStrings" IsObject="true"></CustomAttributes><DataType>datInteger</DataType><DefaultValue></DefaultValue><Description></Description><DictionaryEntry></DictionaryEntry><DisplayFormat></DisplayFormat><DisplayLabel>COLUMN1</DisplayLabel><DisplayWidth>0</DisplayWidth><EditFormat></EditFormat><EditMask></EditMask><GeneratorName></GeneratorName><InPrimaryKey>False</InPrimaryKey><KeyFields></KeyFields><LogChanges>True</LogChanges><Lookup>False</Lookup><LookupCache>False</LookupCache><LookupKeyFields></LookupKeyFields><LookupResultField></LookupResultField><LookupSource Type="TDataSource" IsObject="true" IsNull="true"/><Name>COLUMN1</Name><ReadOnly>False</ReadOnly><RegExpression></RegExpression><Required>False</Required><ServerAutoRefresh>False</ServerAutoRefresh><Size>0</Size><Visible>True</Visible></Item0></Fields><Name>GetSessionCount</Name><Params Type="TDAParamCollection" IsObject="true" IsCollection="true" Count="0" ItemClass="TDAParam"/><Statements Type="TDAStatementCollection" IsObject="true" IsCollection="true" Count="1" ItemClass="TDAStatement"><Item0><ColumnMappings Type="TDAColumnMappingCollection" IsObject="true" IsCollection="true" Count="1" ItemClass="TDAColumnMapping"><Item0><DatasetField>COLUMN1</DatasetField><TableField>COLUMN1</TableField></Item0></ColumnMappings><Connection>MSSQL</Connection><Name></Name><SQL>SELECT
+    COUNT(*)
+  FROM
+    Sessions</SQL><StatementType>stSQL</StatementType><TargetTable></TargetTable></Item0></Statements></Item1><Item2><BusinessClassID></BusinessClassID><BusinessRulesClient Type="TDAClientBusinessRuleScript" IsObject="true"><CompileOnServer>True</CompileOnServer><Description></Description><RunOnClientAndServer>True</RunOnClientAndServer><Script></Script><ScriptLanguage>rslPascalScript</ScriptLanguage></BusinessRulesClient><BusinessRulesServer Type="TDABusinessRuleScript" IsObject="true"><Description></Description><Script></Script><ScriptLanguage>rslPascalScript</ScriptLanguage></BusinessRulesServer><CustomAttributes Type="TStrings" IsObject="true"></CustomAttributes><Description></Description><Fields Type="TDAFieldCollection" IsObject="true" IsCollection="true" Count="4" ItemClass="TDAField"><Item0><Alignment>taLeftJustify</Alignment><BlobType>dabtUnknown</BlobType><BusinessClassID></BusinessClassID><Calculated>False</Calculated><CustomAttributes Type="TStrings" IsObject="true"></CustomAttributes><DataType>datString</DataType><DefaultValue></DefaultValue><Description></Description><DictionaryEntry></DictionaryEntry><DisplayFormat></DisplayFormat><DisplayLabel>SessionID</DisplayLabel><DisplayWidth>0</DisplayWidth><EditFormat></EditFormat><EditMask></EditMask><GeneratorName></GeneratorName><InPrimaryKey>True</InPrimaryKey><KeyFields></KeyFields><LogChanges>True</LogChanges><Lookup>False</Lookup><LookupCache>False</LookupCache><LookupKeyFields></LookupKeyFields><LookupResultField></LookupResultField><LookupSource Type="TDataSource" IsObject="true" IsNull="true"/><Name>SessionID</Name><ReadOnly>False</ReadOnly><RegExpression></RegExpression><Required>False</Required><ServerAutoRefresh>False</ServerAutoRefresh><Size>38</Size><Visible>True</Visible></Item0><Item1><Alignment>taLeftJustify</Alignment><BlobType>dabtUnknown</BlobType><BusinessClassID></BusinessClassID><Calculated>False</Calculated><CustomAttributes Type="TStrings" IsObject="true"></CustomAttributes><DataType>datDateTime</DataType><DefaultValue></DefaultValue><Description></Description><DictionaryEntry></DictionaryEntry><DisplayFormat></DisplayFormat><DisplayLabel>Created</DisplayLabel><DisplayWidth>0</DisplayWidth><EditFormat></EditFormat><EditMask></EditMask><GeneratorName></GeneratorName><InPrimaryKey>False</InPrimaryKey><KeyFields></KeyFields><LogChanges>True</LogChanges><Lookup>False</Lookup><LookupCache>False</LookupCache><LookupKeyFields></LookupKeyFields><LookupResultField></LookupResultField><LookupSource Type="TDataSource" IsObject="true" IsNull="true"/><Name>Created</Name><ReadOnly>False</ReadOnly><RegExpression></RegExpression><Required>False</Required><ServerAutoRefresh>False</ServerAutoRefresh><Size>0</Size><Visible>True</Visible></Item1><Item2><Alignment>taLeftJustify</Alignment><BlobType>dabtUnknown</BlobType><BusinessClassID></BusinessClassID><Calculated>False</Calculated><CustomAttributes Type="TStrings" IsObject="true"></CustomAttributes><DataType>datDateTime</DataType><DefaultValue></DefaultValue><Description></Description><DictionaryEntry></DictionaryEntry><DisplayFormat></DisplayFormat><DisplayLabel>LastAccessed</DisplayLabel><DisplayWidth>0</DisplayWidth><EditFormat></EditFormat><EditMask></EditMask><GeneratorName></GeneratorName><InPrimaryKey>False</InPrimaryKey><KeyFields></KeyFields><LogChanges>True</LogChanges><Lookup>False</Lookup><LookupCache>False</LookupCache><LookupKeyFields></LookupKeyFields><LookupResultField></LookupResultField><LookupSource Type="TDataSource" IsObject="true" IsNull="true"/><Name>LastAccessed</Name><ReadOnly>False</ReadOnly><RegExpression></RegExpression><Required>False</Required><ServerAutoRefresh>False</ServerAutoRefresh><Size>0</Size><Visible>True</Visible></Item2><Item3><Alignment>taLeftJustify</Alignment><BlobType>dabtUnknown</BlobType><BusinessClassID></BusinessClassID><Calculated>False</Calculated><CustomAttributes Type="TStrings" IsObject="true"></CustomAttributes><DataType>datBlob</DataType><DefaultValue></DefaultValue><Description></Description><DictionaryEntry></DictionaryEntry><DisplayFormat></DisplayFormat><DisplayLabel>Data</DisplayLabel><DisplayWidth>0</DisplayWidth><EditFormat></EditFormat><EditMask></EditMask><GeneratorName></GeneratorName><InPrimaryKey>False</InPrimaryKey><KeyFields></KeyFields><LogChanges>True</LogChanges><Lookup>False</Lookup><LookupCache>False</LookupCache><LookupKeyFields></LookupKeyFields><LookupResultField></LookupResultField><LookupSource Type="TDataSource" IsObject="true" IsNull="true"/><Name>Data</Name><ReadOnly>False</ReadOnly><RegExpression></RegExpression><Required>False</Required><ServerAutoRefresh>False</ServerAutoRefresh><Size>0</Size><Visible>True</Visible></Item3></Fields><Name>GetSession</Name><Params Type="TDAParamCollection" IsObject="true" IsCollection="true" Count="1" ItemClass="TDAParam"><Item0><BlobType>dabtUnknown</BlobType><DataType>datString</DataType><Description></Description><GeneratorName></GeneratorName><Name>SessionID</Name><ParamType>daptInput</ParamType><Size>38</Size><Value></Value></Item0></Params><Statements Type="TDAStatementCollection" IsObject="true" IsCollection="true" Count="1" ItemClass="TDAStatement"><Item0><ColumnMappings Type="TDAColumnMappingCollection" IsObject="true" IsCollection="true" Count="4" ItemClass="TDAColumnMapping"><Item0><DatasetField>SessionID</DatasetField><TableField>SessionID</TableField></Item0><Item1><DatasetField>Created</DatasetField><TableField>Created</TableField></Item1><Item2><DatasetField>LastAccessed</DatasetField><TableField>LastAccessed</TableField></Item2><Item3><DatasetField>Data</DatasetField><TableField>Data</TableField></Item3></ColumnMappings><Connection>MSSQL</Connection><Name></Name><SQL>SELECT
+    SessionID, Created, LastAccessed, Data
+  FROM
+    Sessions
+  WHERE
+    SessionID = :SessionID</SQL><StatementType>stSQL</StatementType><TargetTable></TargetTable></Item0></Statements></Item2></Datasets><Diagrams Type="TDADiagrams" IsObject="true" IsNull="true"/><RelationShips Type="TDADatasetRelationshipCollection" IsObject="true" IsCollection="true" Count="0" ItemClass="TDADatasetRelationship"/><Tag>0</Tag><UpdateRules Type="TDAUpdateRuleCollection" IsObject="true" IsCollection="true" Count="0" ItemClass="TDAUpdateRule"/></TDASchema>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract.inc b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract.inc
new file mode 100644
index 0000000..cc135ba
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract.inc	
@@ -0,0 +1,33 @@
+{$INCLUDE eDefines.inc}
+{.$DEFINE STORERECID}
+{$DEFINE DataAbstract5}
+
+{$IFDEF FPC}
+  {$IFNDEF RO_FPC_MODE_SET}
+    {$MODE DELPHI}
+    {$DEFINE RO_FPC_MODE_SET}
+  {$ENDIF}
+  {$DEFINE FPC_SAFECALL_BUG}
+  {$DEFINE DA_WideMemoSupport}        // support for ftWideMemo
+  {$DEFINE DA_FixedWideCharSupport}   // support for ftWideFixedChar
+  {.$DEFINE ftFMTBCD_Support}         // support for FMTBCD
+{$ENDIF}
+
+{$IFDEF DELPHI6UP}
+  {$DEFINE ftFMTBCD_Support}     // support for FMTBCD
+{$ENDIF}
+
+
+{$IFDEF DELPHI10UP}
+  {$DEFINE DA_WideMemoSupport}        // support for ftWideMemo
+  {$DEFINE DA_FixedWideCharSupport}   // support for ftWideFixedChar
+{$ENDIF}
+
+// always use std methods for TDataset-compatible drivers
+{$DEFINE Drivers_CompatibilityMode}
+
+// bug in Delphi2009 with AsAnsiString
+{.$DEFINE DELPHI2009_USE_AsAnsiString_for_TStringField}
+
+// 
+{.$DEFINE USE_LOCALDATAADAPTER}
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract3.RODL b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract3.RODL
new file mode 100644
index 0000000..d9d82c1
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract3.RODL	
@@ -0,0 +1,171 @@
+<Library Name="DataAbstract3" UID="{2966A4BF-569C-45AA-8F34-CF1E155FD77A}" Version="3.0">
+<Services>
+<Service Name="DARemoteService" UID="{95DD2011-2B13-4CD6-8C9E-96BB71008093}" Abstract="1">
+<Interfaces>
+<Interface Name="Default" UID="{C532E842-0AA9-4253-A9BF-AFCF22885B97}">
+<Operations>
+<Operation Name="GetDatasetSchema" UID="{D051F207-728C-4C62-B8AC-71AF06EC0EAF}">
+<Parameters>
+<Parameter Name="Result" DataType="Binary" Flag="Result">
+</Parameter>
+<Parameter Name="aDatasetName" DataType="String" Flag="In" >
+</Parameter>
+</Parameters>
+</Operation>
+<Operation Name="GetDatasetScripts" UID="{56B8AC37-50B5-4702-987A-406116E01B5F}">
+<Parameters>
+<Parameter Name="Result" DataType="String" Flag="Result">
+</Parameter>
+<Parameter Name="DatasetNames" DataType="String" Flag="In" >
+</Parameter>
+</Parameters>
+</Operation>
+<Operation Name="GetDatasetData" UID="{8575660B-29D0-424D-8E55-3833D18DB927}">
+<Parameters>
+<Parameter Name="Result" DataType="Binary" Flag="Result">
+</Parameter>
+<Parameter Name="DatasetName" DataType="String" Flag="In" >
+</Parameter>
+<Parameter Name="Params" DataType="String" Flag="In" >
+</Parameter>
+<Parameter Name="IncludeSchema" DataType="Boolean" Flag="In" >
+</Parameter>
+<Parameter Name="MaxRecords" DataType="Integer" Flag="In" >
+</Parameter>
+</Parameters>
+</Operation>
+<Operation Name="GetDatasetDataEx" UID="{A07DFFAF-41A0-489A-83E8-B31992898BA7}">
+<Parameters>
+<Parameter Name="Result" DataType="Binary" Flag="Result">
+</Parameter>
+<Parameter Name="DatasetName" DataType="String" Flag="In" >
+</Parameter>
+<Parameter Name="Params" DataType="TDADatasetParamArray" Flag="In" >
+</Parameter>
+<Parameter Name="UserFilter" DataType="String" Flag="In" >
+</Parameter>
+<Parameter Name="IncludeSchema" DataType="Boolean" Flag="In" >
+</Parameter>
+<Parameter Name="MaxRecords" DataType="Integer" Flag="In" >
+</Parameter>
+</Parameters>
+</Operation>
+<Operation Name="UpdateData" UID="{D8E619B6-28E7-47BF-AE14-2EA90931CD88}">
+<Parameters>
+<Parameter Name="Result" DataType="Binary" Flag="Result">
+</Parameter>
+<Parameter Name="Delta" DataType="Binary" Flag="In" >
+</Parameter>
+</Parameters>
+</Operation>
+<Operation Name="ExecuteSQLCommand" UID="{05FA035A-8CAB-448A-99C2-98272A772088}">
+<Parameters>
+<Parameter Name="Result" DataType="Integer" Flag="Result">
+</Parameter>
+<Parameter Name="SQL" DataType="String" Flag="In" >
+</Parameter>
+</Parameters>
+</Operation>
+<Operation Name="GetSchemaAsXML" UID="{390B1AA0-7568-47D7-A593-3FDA8FD3AA04}">
+<Parameters>
+<Parameter Name="Result" DataType="String" Flag="Result">
+</Parameter>
+</Parameters>
+</Operation>
+<Operation Name="GetMultipleDatasets" UID="{F925F364-645C-4642-8A44-466892897BD0}">
+<Parameters>
+<Parameter Name="Result" DataType="Binary" Flag="Result">
+</Parameter>
+<Parameter Name="DatasetRequestInfoArray" DataType="TDADatasetRequestInfoArray" Flag="In" >
+</Parameter>
+</Parameters>
+</Operation>
+<Operation Name="ExecuteSQLCommandEx" UID="{726EDDF7-D1B2-43DF-B0E3-69E62F89DE0E}">
+<Parameters>
+<Parameter Name="Result" DataType="Integer" Flag="Result">
+</Parameter>
+<Parameter Name="CommandName" DataType="String" Flag="In" >
+</Parameter>
+<Parameter Name="Params" DataType="TDADatasetParamArray" Flag="In" >
+</Parameter>
+</Parameters>
+</Operation>
+</Operations>
+</Interface>
+</Interfaces>
+</Service>
+<Service Name="DALoginService" UID="{BCA2B2AC-7B31-46C8-9D94-4EA8B8930C21}" Ancestor="DARemoteService" Abstract="1">
+<Interfaces>
+<Interface Name="Default" UID="{58550AA0-B64F-495A-B2F8-C981D4C39180}">
+<Operations>
+<Operation Name="Login" UID="{3313B07C-5C16-4131-9141-6400C83C4E8F}">
+<Parameters>
+<Parameter Name="Result" DataType="Boolean" Flag="Result">
+</Parameter>
+<Parameter Name="UserID" DataType="String" Flag="In" >
+</Parameter>
+<Parameter Name="Password" DataType="String" Flag="In" >
+</Parameter>
+<Parameter Name="LoginInfo" DataType="TDALoginInfo" Flag="Out" >
+</Parameter>
+</Parameters>
+</Operation>
+<Operation Name="Logout" UID="{8805C446-5CE9-4A0C-BD0D-719B399DA126}">
+<Parameters>
+</Parameters>
+</Operation>
+</Operations>
+</Interface>
+</Interfaces>
+</Service>
+</Services>
+<Structs>
+<Struct Name="TDADatasetParam" UID="{70997D96-821B-4C1C-9EDF-163B2F596333}" AutoCreateParams="1">
+<Elements>
+<Element Name="Name" DataType="String">
+</Element>
+<Element Name="Value" DataType="Variant">
+</Element>
+</Elements>
+</Struct>
+<Struct Name="TDADatasetRequestInfo" UID="{B1A39AE9-2463-4CA4-B290-F152E4ADC528}" AutoCreateParams="1">
+<Elements>
+<Element Name="DatasetName" DataType="String">
+</Element>
+<Element Name="IncludeSchema" DataType="Boolean">
+</Element>
+<Element Name="MaxRecords" DataType="Integer">
+</Element>
+<Element Name="Params" DataType="TDADatasetParamArray">
+</Element>
+</Elements>
+</Struct>
+<Struct Name="TDALoginInfo" UID="{8E0DA92C-0D9D-4621-AF73-120D194CB12E}" AutoCreateParams="1">
+<Elements>
+<Element Name="SessionID" DataType="String">
+</Element>
+<Element Name="UserID" DataType="String">
+</Element>
+<Element Name="Privileges" DataType="TDAStringArray">
+</Element>
+<Element Name="Attributes" DataType="TDAStringArray">
+</Element>
+<Element Name="Data" DataType="Binary">
+</Element>
+</Elements>
+</Struct>
+</Structs>
+<Enums>
+</Enums>
+<Arrays>
+<Array Name="TDADatasetParamArray" UID="{6EFAF991-D747-46BF-A4C1-10F07C1A6333}">
+<ElementType DataType="TDADatasetParam" />
+</Array>
+<Array Name="TDADatasetRequestInfoArray" UID="{E421B749-348E-4951-ABBD-3E3364AC13D4}">
+<ElementType DataType="TDADatasetRequestInfo" />
+</Array>
+<Array Name="TDAStringArray" UID="{76872F99-438C-4476-B7E9-EE2F306A2A82}">
+<ElementType DataType="String" />
+</Array>
+</Arrays>
+</Library>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract3_Async.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract3_Async.pas
new file mode 100644
index 0000000..e823d65
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract3_Async.pas	
@@ -0,0 +1,367 @@
+unit DataAbstract3_Async;
+
+{----------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project .                               }
+{                                                                            }
+{ Do not modify this unit manually, or your changes will be lost when this   }
+{ unit is regenerated the next time you compile the project.                 }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  {vcl:} Classes, TypInfo,
+  {RemObjects:} uROXMLIntf, uROClasses, uROTypes, uROClientIntf, uROAsync,
+  {Project:} DataAbstract3_Intf;
+
+type
+  { IDARemoteService_Async }
+  IDARemoteService_Async = interface(IROAsyncInterface)
+    ['{F8299772-C66E-4D77-A4F9-78400662810B}']
+    procedure Invoke_GetDatasetSchema(const aDatasetName: AnsiString);
+    procedure Invoke_GetDatasetScripts(const DatasetNames: AnsiString);
+    procedure Invoke_GetDatasetData(const DatasetName: AnsiString; const Params: AnsiString; const IncludeSchema: Boolean; const MaxRecords: Integer);
+    procedure Invoke_GetDatasetDataEx(const DatasetName: AnsiString; const Params: TDADatasetParamArray; const UserFilter: AnsiString; const IncludeSchema: Boolean; const MaxRecords: Integer);
+    procedure Invoke_UpdateData(const Delta: Binary);
+    procedure Invoke_ExecuteSQLCommand(const SQL: AnsiString);
+    procedure Invoke_GetSchemaAsXML;
+    procedure Invoke_GetMultipleDatasets(const DatasetRequestInfoArray: TDADatasetRequestInfoArray);
+    procedure Invoke_ExecuteSQLCommandEx(const CommandName: AnsiString; const Params: TDADatasetParamArray);
+    function Retrieve_GetDatasetSchema: Binary;
+    function Retrieve_GetDatasetScripts: AnsiString;
+    function Retrieve_GetDatasetData: Binary;
+    function Retrieve_GetDatasetDataEx: Binary;
+    function Retrieve_UpdateData: Binary;
+    function Retrieve_ExecuteSQLCommand: Integer;
+    function Retrieve_GetSchemaAsXML: AnsiString;
+    function Retrieve_GetMultipleDatasets: Binary;
+    function Retrieve_ExecuteSQLCommandEx: Integer;
+  end;
+
+  { IDALoginService_Async }
+  IDALoginService_Async = interface(IDARemoteService_Async)
+    ['{5A9C9231-1C8D-4436-88E1-07AD23D7BEF3}']
+    procedure Invoke_Login(const UserID: AnsiString; const Password: AnsiString);
+    procedure Invoke_Logout;
+    function Retrieve_Login(out LoginInfo: TDALoginInfo): Boolean;
+  end;
+
+  { CoDARemoteService_Async }
+  CoDARemoteService_Async = class
+    class function Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): IDARemoteService_Async;
+  end;
+
+  { CoDALoginService_Async }
+  CoDALoginService_Async = class
+    class function Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): IDALoginService_Async;
+  end;
+
+  { TDARemoteService_AsyncProxy }
+  TDARemoteService_AsyncProxy = class(TROAsyncProxy, IDARemoteService_Async)
+  private
+  protected
+    function __GetInterfaceName:string; override;
+
+    procedure Invoke_GetDatasetSchema(const aDatasetName: AnsiString);
+    procedure Invoke_GetDatasetScripts(const DatasetNames: AnsiString);
+    procedure Invoke_GetDatasetData(const DatasetName: AnsiString; const Params: AnsiString; const IncludeSchema: Boolean; const MaxRecords: Integer);
+    procedure Invoke_GetDatasetDataEx(const DatasetName: AnsiString; const Params: TDADatasetParamArray; const UserFilter: AnsiString; const IncludeSchema: Boolean; const MaxRecords: Integer);
+    procedure Invoke_UpdateData(const Delta: Binary);
+    procedure Invoke_ExecuteSQLCommand(const SQL: AnsiString);
+    procedure Invoke_GetSchemaAsXML;
+    procedure Invoke_GetMultipleDatasets(const DatasetRequestInfoArray: TDADatasetRequestInfoArray);
+    procedure Invoke_ExecuteSQLCommandEx(const CommandName: AnsiString; const Params: TDADatasetParamArray);
+    function Retrieve_GetDatasetSchema: Binary;
+    function Retrieve_GetDatasetScripts: AnsiString;
+    function Retrieve_GetDatasetData: Binary;
+    function Retrieve_GetDatasetDataEx: Binary;
+    function Retrieve_UpdateData: Binary;
+    function Retrieve_ExecuteSQLCommand: Integer;
+    function Retrieve_GetSchemaAsXML: AnsiString;
+    function Retrieve_GetMultipleDatasets: Binary;
+    function Retrieve_ExecuteSQLCommandEx: Integer;
+  end;
+
+  { TDALoginService_AsyncProxy }
+  TDALoginService_AsyncProxy = class(TDARemoteService_AsyncProxy, IDALoginService_Async)
+  private
+  protected
+    function __GetInterfaceName:string; override;
+
+    procedure Invoke_Login(const UserID: AnsiString; const Password: AnsiString);
+    procedure Invoke_Logout;
+    function Retrieve_Login(out LoginInfo: TDALoginInfo): Boolean;
+  end;
+
+implementation
+
+uses
+  {vcl:} SysUtils;
+
+{ CoDARemoteService }
+
+class function CoDARemoteService_Async.Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): IDARemoteService_Async;
+begin
+  result := TDARemoteService_AsyncProxy.Create(aMessage, aTransportChannel);
+end;
+
+{ TDARemoteService_AsyncProxy }
+
+function TDARemoteService_AsyncProxy.__GetInterfaceName:string;
+begin
+  result := 'DARemoteService';
+end;
+
+procedure TDARemoteService_AsyncProxy.Invoke_GetDatasetSchema(const aDatasetName: AnsiString);
+begin
+  __AssertProxyNotBusy('GetDatasetSchema');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract3', __InterfaceName, 'GetDatasetSchema');
+  __Message.Write('aDatasetName', TypeInfo(AnsiString), aDatasetName, []);
+  __DispatchAsyncRequest('GetDatasetSchema',__Message);
+    __Message.UnsetAttributes(__TransportChannel);
+end;
+
+function TDARemoteService_AsyncProxy.Retrieve_GetDatasetSchema: Binary;
+var __response:TStream;
+begin
+  result := nil;
+  __response := __RetrieveAsyncResponse('GetDatasetSchema');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Result', TypeInfo(Binary), Result, []);
+
+  __response.Free();
+end;
+
+procedure TDARemoteService_AsyncProxy.Invoke_GetDatasetScripts(const DatasetNames: AnsiString);
+begin
+  __AssertProxyNotBusy('GetDatasetScripts');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract3', __InterfaceName, 'GetDatasetScripts');
+  __Message.Write('DatasetNames', TypeInfo(AnsiString), DatasetNames, []);
+  __DispatchAsyncRequest('GetDatasetScripts',__Message);
+    __Message.UnsetAttributes(__TransportChannel);
+end;
+
+function TDARemoteService_AsyncProxy.Retrieve_GetDatasetScripts: AnsiString;
+var __response:TStream;
+begin
+  __response := __RetrieveAsyncResponse('GetDatasetScripts');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Result', TypeInfo(AnsiString), Result, []);
+
+  __response.Free();
+end;
+
+procedure TDARemoteService_AsyncProxy.Invoke_GetDatasetData(const DatasetName: AnsiString; const Params: AnsiString; const IncludeSchema: Boolean; const MaxRecords: Integer);
+begin
+  __AssertProxyNotBusy('GetDatasetData');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract3', __InterfaceName, 'GetDatasetData');
+  __Message.Write('DatasetName', TypeInfo(AnsiString), DatasetName, []);
+  __Message.Write('Params', TypeInfo(AnsiString), Params, []);
+  __Message.Write('IncludeSchema', TypeInfo(Boolean), IncludeSchema, []);
+  __Message.Write('MaxRecords', TypeInfo(Integer), MaxRecords, []);
+  __DispatchAsyncRequest('GetDatasetData',__Message);
+    __Message.UnsetAttributes(__TransportChannel);
+end;
+
+function TDARemoteService_AsyncProxy.Retrieve_GetDatasetData: Binary;
+var __response:TStream;
+begin
+  result := nil;
+  __response := __RetrieveAsyncResponse('GetDatasetData');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Result', TypeInfo(Binary), Result, []);
+
+  __response.Free();
+end;
+
+procedure TDARemoteService_AsyncProxy.Invoke_GetDatasetDataEx(const DatasetName: AnsiString; const Params: TDADatasetParamArray; const UserFilter: AnsiString; const IncludeSchema: Boolean; const MaxRecords: Integer);
+begin
+  __AssertProxyNotBusy('GetDatasetDataEx');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract3', __InterfaceName, 'GetDatasetDataEx');
+  __Message.Write('DatasetName', TypeInfo(AnsiString), DatasetName, []);
+  __Message.Write('Params', TypeInfo(TDADatasetParamArray), Params, []);
+  __Message.Write('UserFilter', TypeInfo(AnsiString), UserFilter, []);
+  __Message.Write('IncludeSchema', TypeInfo(Boolean), IncludeSchema, []);
+  __Message.Write('MaxRecords', TypeInfo(Integer), MaxRecords, []);
+  __DispatchAsyncRequest('GetDatasetDataEx',__Message);
+    __Message.UnsetAttributes(__TransportChannel);
+end;
+
+function TDARemoteService_AsyncProxy.Retrieve_GetDatasetDataEx: Binary;
+var __response:TStream;
+begin
+  result := nil;
+  __response := __RetrieveAsyncResponse('GetDatasetDataEx');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Result', TypeInfo(Binary), Result, []);
+
+  __response.Free();
+end;
+
+procedure TDARemoteService_AsyncProxy.Invoke_UpdateData(const Delta: Binary);
+begin
+  __AssertProxyNotBusy('UpdateData');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract3', __InterfaceName, 'UpdateData');
+  __Message.Write('Delta', TypeInfo(Binary), Delta, []);
+  __DispatchAsyncRequest('UpdateData',__Message);
+    __Message.UnsetAttributes(__TransportChannel);
+end;
+
+function TDARemoteService_AsyncProxy.Retrieve_UpdateData: Binary;
+var __response:TStream;
+begin
+  result := nil;
+  __response := __RetrieveAsyncResponse('UpdateData');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Result', TypeInfo(Binary), Result, []);
+
+  __response.Free();
+end;
+
+procedure TDARemoteService_AsyncProxy.Invoke_ExecuteSQLCommand(const SQL: AnsiString);
+begin
+  __AssertProxyNotBusy('ExecuteSQLCommand');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract3', __InterfaceName, 'ExecuteSQLCommand');
+  __Message.Write('SQL', TypeInfo(AnsiString), SQL, []);
+  __DispatchAsyncRequest('ExecuteSQLCommand',__Message);
+    __Message.UnsetAttributes(__TransportChannel);
+end;
+
+function TDARemoteService_AsyncProxy.Retrieve_ExecuteSQLCommand: Integer;
+var __response:TStream;
+begin
+  __response := __RetrieveAsyncResponse('ExecuteSQLCommand');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Result', TypeInfo(Integer), Result, []);
+
+  __response.Free();
+end;
+
+procedure TDARemoteService_AsyncProxy.Invoke_GetSchemaAsXML;
+begin
+  __AssertProxyNotBusy('GetSchemaAsXML');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract3', __InterfaceName, 'GetSchemaAsXML');
+  __DispatchAsyncRequest('GetSchemaAsXML',__Message);
+end;
+
+function TDARemoteService_AsyncProxy.Retrieve_GetSchemaAsXML: AnsiString;
+var __response:TStream;
+begin
+  __response := __RetrieveAsyncResponse('GetSchemaAsXML');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Result', TypeInfo(AnsiString), Result, []);
+
+  __response.Free();
+end;
+
+procedure TDARemoteService_AsyncProxy.Invoke_GetMultipleDatasets(const DatasetRequestInfoArray: TDADatasetRequestInfoArray);
+begin
+  __AssertProxyNotBusy('GetMultipleDatasets');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract3', __InterfaceName, 'GetMultipleDatasets');
+  __Message.Write('DatasetRequestInfoArray', TypeInfo(TDADatasetRequestInfoArray), DatasetRequestInfoArray, []);
+  __DispatchAsyncRequest('GetMultipleDatasets',__Message);
+    __Message.UnsetAttributes(__TransportChannel);
+end;
+
+function TDARemoteService_AsyncProxy.Retrieve_GetMultipleDatasets: Binary;
+var __response:TStream;
+begin
+  result := nil;
+  __response := __RetrieveAsyncResponse('GetMultipleDatasets');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Result', TypeInfo(Binary), Result, []);
+
+  __response.Free();
+end;
+
+procedure TDARemoteService_AsyncProxy.Invoke_ExecuteSQLCommandEx(const CommandName: AnsiString; const Params: TDADatasetParamArray);
+begin
+  __AssertProxyNotBusy('ExecuteSQLCommandEx');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract3', __InterfaceName, 'ExecuteSQLCommandEx');
+  __Message.Write('CommandName', TypeInfo(AnsiString), CommandName, []);
+  __Message.Write('Params', TypeInfo(TDADatasetParamArray), Params, []);
+  __DispatchAsyncRequest('ExecuteSQLCommandEx',__Message);
+    __Message.UnsetAttributes(__TransportChannel);
+end;
+
+function TDARemoteService_AsyncProxy.Retrieve_ExecuteSQLCommandEx: Integer;
+var __response:TStream;
+begin
+  __response := __RetrieveAsyncResponse('ExecuteSQLCommandEx');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Result', TypeInfo(Integer), Result, []);
+
+  __response.Free();
+end;
+
+
+{ CoDALoginService }
+
+class function CoDALoginService_Async.Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): IDALoginService_Async;
+begin
+  result := TDALoginService_AsyncProxy.Create(aMessage, aTransportChannel);
+end;
+
+{ TDALoginService_AsyncProxy }
+
+function TDALoginService_AsyncProxy.__GetInterfaceName:string;
+begin
+  result := 'DALoginService';
+end;
+
+procedure TDALoginService_AsyncProxy.Invoke_Login(const UserID: AnsiString; const Password: AnsiString);
+begin
+  __AssertProxyNotBusy('Login');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract3', __InterfaceName, 'Login');
+  __Message.Write('UserID', TypeInfo(AnsiString), UserID, []);
+  __Message.Write('Password', TypeInfo(AnsiString), Password, []);
+  __DispatchAsyncRequest('Login',__Message);
+    __Message.UnsetAttributes(__TransportChannel);
+end;
+
+function TDALoginService_AsyncProxy.Retrieve_Login(out LoginInfo: TDALoginInfo): Boolean;
+var __response:TStream;
+begin
+  LoginInfo := nil;
+  __response := __RetrieveAsyncResponse('Login');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Result', TypeInfo(Boolean), Result, []);
+  __Message.Read('LoginInfo', TypeInfo(TDALoginInfo), LoginInfo, []);
+
+  __response.Free();
+end;
+
+procedure TDALoginService_AsyncProxy.Invoke_Logout;
+begin
+  __AssertProxyNotBusy('Logout');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract3', __InterfaceName, 'Logout');
+  __DispatchAsyncRequest('Logout',__Message, false);
+end;
+
+
+initialization
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract3_Intf.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract3_Intf.pas
new file mode 100644
index 0000000..c1f4134
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract3_Intf.pas	
@@ -0,0 +1,1367 @@
+unit DataAbstract3_Intf;
+
+{----------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project .                               }
+{                                                                            }
+{ Do not modify this unit manually, or your changes will be lost when this   }
+{ unit is regenerated the next time you compile the project.                 }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  {vcl:} Classes, TypInfo,
+  {RemObjects:} uROXMLIntf, uROClasses, uROClient, uROTypes, uROClientIntf;
+
+const
+  { Library ID }
+  LibraryUID = '{2966A4BF-569C-45AA-8F34-CF1E155FD77A}';
+  TargetNamespace = '';
+
+  { Service Interface ID's }
+  IDARemoteService_IID : TGUID = '{C532E842-0AA9-4253-A9BF-AFCF22885B97}';
+  IDALoginService_IID : TGUID = '{58550AA0-B64F-495A-B2F8-C981D4C39180}';
+
+  { Event ID's }
+
+type
+  { Forward declarations }
+  IDARemoteService = interface;
+  IDALoginService = interface;
+
+  TDADatasetParamArray = class;
+  TDADatasetRequestInfoArray = class;
+  TDAStringArray = class;
+
+  TDADatasetParam = class;
+  TDADatasetRequestInfo = class;
+  TDALoginInfo = class;
+
+
+  { TDADatasetParam }
+  TDADatasetParam = class(TROComplexType)
+  private
+    fName: AnsiString;
+    fValue: Variant;
+  public
+    procedure Assign(iSource: TPersistent); override;
+    procedure ReadComplex(ASerializer: TObject); override;
+    procedure WriteComplex(ASerializer: TObject); override;
+  published
+    property Name:AnsiString read fName write fName;
+    property Value:Variant read fValue write fValue;
+  end;
+
+  { TDADatasetParamCollection }
+  TDADatasetParamCollection = class(TROCollection)
+  protected
+    constructor Create(aItemClass: TCollectionItemClass); overload;
+    function GetItems(aIndex: integer): TDADatasetParam;
+    procedure SetItems(aIndex: integer; const Value: TDADatasetParam);
+  public
+    constructor Create; overload;
+    function Add: TDADatasetParam; reintroduce;
+    procedure SaveToArray(anArray: TDADatasetParamArray);
+    procedure LoadFromArray(anArray: TDADatasetParamArray);
+    property Items[Index: integer]:TDADatasetParam read GetItems write SetItems; default;
+  end;
+
+  { TDADatasetRequestInfo }
+  TDADatasetRequestInfo = class(TROComplexType)
+  private
+    fDatasetName: AnsiString;
+    fIncludeSchema: Boolean;
+    fMaxRecords: Integer;
+    fParams: TDADatasetParamArray;
+    function GetParams: TDADatasetParamArray;
+  public
+    procedure Assign(iSource: TPersistent); override;
+    procedure ReadComplex(ASerializer: TObject); override;
+    procedure WriteComplex(ASerializer: TObject); override;
+  published
+    property DatasetName:AnsiString read fDatasetName write fDatasetName;
+    property IncludeSchema:Boolean read fIncludeSchema write fIncludeSchema;
+    property MaxRecords:Integer read fMaxRecords write fMaxRecords;
+    property Params:TDADatasetParamArray read GetParams write fParams;
+  end;
+
+  { TDADatasetRequestInfoCollection }
+  TDADatasetRequestInfoCollection = class(TROCollection)
+  protected
+    constructor Create(aItemClass: TCollectionItemClass); overload;
+    function GetItems(aIndex: integer): TDADatasetRequestInfo;
+    procedure SetItems(aIndex: integer; const Value: TDADatasetRequestInfo);
+  public
+    constructor Create; overload;
+    function Add: TDADatasetRequestInfo; reintroduce;
+    procedure SaveToArray(anArray: TDADatasetRequestInfoArray);
+    procedure LoadFromArray(anArray: TDADatasetRequestInfoArray);
+    property Items[Index: integer]:TDADatasetRequestInfo read GetItems write SetItems; default;
+  end;
+
+  { TDALoginInfo }
+  TDALoginInfo = class(TROComplexType)
+  private
+    fSessionID: AnsiString;
+    fUserID: AnsiString;
+    fPrivileges: TDAStringArray;
+    fAttributes: TDAStringArray;
+    fData: Binary;
+    function GetPrivileges: TDAStringArray;
+    function GetAttributes: TDAStringArray;
+    function GetData: Binary;
+  public
+    procedure Assign(iSource: TPersistent); override;
+    procedure ReadComplex(ASerializer: TObject); override;
+    procedure WriteComplex(ASerializer: TObject); override;
+  published
+    property SessionID:AnsiString read fSessionID write fSessionID;
+    property UserID:AnsiString read fUserID write fUserID;
+    property Privileges:TDAStringArray read GetPrivileges write fPrivileges;
+    property Attributes:TDAStringArray read GetAttributes write fAttributes;
+    property Data:Binary read GetData write fData;
+  end;
+
+  { TDALoginInfoCollection }
+  TDALoginInfoCollection = class(TROCollection)
+  protected
+    constructor Create(aItemClass: TCollectionItemClass); overload;
+    function GetItems(aIndex: integer): TDALoginInfo;
+    procedure SetItems(aIndex: integer; const Value: TDALoginInfo);
+  public
+    constructor Create; overload;
+    function Add: TDALoginInfo; reintroduce;
+    property Items[Index: integer]:TDALoginInfo read GetItems write SetItems; default;
+  end;
+
+  { TDADatasetParamArray }
+  TDADatasetParamArray_TDADatasetParam = array of TDADatasetParam;
+  TDADatasetParamArray = class(TROArray)
+  private
+    fCount: Integer;
+    fItems : TDADatasetParamArray_TDADatasetParam;
+  protected
+    procedure Grow; virtual;
+    function GetItems(aIndex: integer): TDADatasetParam;
+    procedure SetItems(aIndex: integer; const Value: TDADatasetParam);
+    function GetCount: integer; override;
+  public
+    class function GetItemType: PTypeInfo; override;
+    class function GetItemClass: TClass; override;
+    class function GetItemSize: integer; override;
+
+    function GetItemRef(aIndex: integer): pointer; override;
+    procedure SetItemRef(aIndex: integer; Ref: pointer); override;
+    procedure Clear; override;
+    procedure Delete(aIndex: integer); override;
+    procedure Resize(ElementCount: integer); override;
+
+    procedure Assign(iSource:TPersistent); override;
+    procedure ReadComplex(ASerializer: TObject); override;
+    procedure WriteComplex(ASerializer: TObject); override;
+    function Add: TDADatasetParam; overload;
+    function Add(const Value: TDADatasetParam):integer; overload;
+
+    property Count : integer read GetCount;
+    property Items[Index: integer]:TDADatasetParam read GetItems write SetItems; default;
+    property InnerArray: TDADatasetParamArray_TDADatasetParam read fItems;
+  end;
+
+  { TDADatasetRequestInfoArray }
+  TDADatasetRequestInfoArray_TDADatasetRequestInfo = array of TDADatasetRequestInfo;
+  TDADatasetRequestInfoArray = class(TROArray)
+  private
+    fCount: Integer;
+    fItems : TDADatasetRequestInfoArray_TDADatasetRequestInfo;
+  protected
+    procedure Grow; virtual;
+    function GetItems(aIndex: integer): TDADatasetRequestInfo;
+    procedure SetItems(aIndex: integer; const Value: TDADatasetRequestInfo);
+    function GetCount: integer; override;
+  public
+    class function GetItemType: PTypeInfo; override;
+    class function GetItemClass: TClass; override;
+    class function GetItemSize: integer; override;
+
+    function GetItemRef(aIndex: integer): pointer; override;
+    procedure SetItemRef(aIndex: integer; Ref: pointer); override;
+    procedure Clear; override;
+    procedure Delete(aIndex: integer); override;
+    procedure Resize(ElementCount: integer); override;
+
+    procedure Assign(iSource:TPersistent); override;
+    procedure ReadComplex(ASerializer: TObject); override;
+    procedure WriteComplex(ASerializer: TObject); override;
+    function Add: TDADatasetRequestInfo; overload;
+    function Add(const Value: TDADatasetRequestInfo):integer; overload;
+
+    property Count : integer read GetCount;
+    property Items[Index: integer]:TDADatasetRequestInfo read GetItems write SetItems; default;
+    property InnerArray: TDADatasetRequestInfoArray_TDADatasetRequestInfo read fItems;
+  end;
+
+  { TDAStringArray }
+  TDAStringArray_AnsiString = array of AnsiString;
+  TDAStringArray = class(TROArray)
+  private
+    fCount: Integer;
+    fItems : TDAStringArray_AnsiString;
+  protected
+    procedure Grow; virtual;
+    function GetItems(aIndex: integer): AnsiString;
+    procedure SetItems(aIndex: integer; const Value: AnsiString);
+    function GetCount: integer; override;
+  public
+    class function GetItemType: PTypeInfo; override;
+    class function GetItemSize: integer; override;
+
+    function GetItemRef(aIndex: integer): pointer; override;
+    procedure Clear; override;
+    procedure Delete(aIndex: integer); override;
+    procedure Resize(ElementCount: integer); override;
+
+    procedure Assign(iSource:TPersistent); override;
+    procedure ReadComplex(ASerializer: TObject); override;
+    procedure WriteComplex(ASerializer: TObject); override;
+    function Add(const Value:AnsiString): integer;
+    function GetIndex(const aPropertyName : string;
+                      const aPropertyValue : Variant;
+                      StartFrom : integer = 0;
+                      Options : TROSearchOptions = [soIgnoreCase]) : integer; override;
+
+    property Count : integer read GetCount;
+    property Items[Index: integer]:AnsiString read GetItems write SetItems; default;
+    property InnerArray: TDAStringArray_AnsiString read fItems;
+  end;
+
+  { IDARemoteService }
+  IDARemoteService = interface
+    ['{C532E842-0AA9-4253-A9BF-AFCF22885B97}']
+    function GetDatasetSchema(const aDatasetName: AnsiString): Binary;
+    function GetDatasetScripts(const DatasetNames: AnsiString): AnsiString;
+    function GetDatasetData(const DatasetName: AnsiString; const Params: AnsiString; const IncludeSchema: Boolean; const MaxRecords: Integer): Binary;
+    function GetDatasetDataEx(const DatasetName: AnsiString; const Params: TDADatasetParamArray; const UserFilter: AnsiString; const IncludeSchema: Boolean; 
+                              const MaxRecords: Integer): Binary;
+    function UpdateData(const Delta: Binary): Binary;
+    function ExecuteSQLCommand(const SQL: AnsiString): Integer;
+    function GetSchemaAsXML: AnsiString;
+    function GetMultipleDatasets(const DatasetRequestInfoArray: TDADatasetRequestInfoArray): Binary;
+    function ExecuteSQLCommandEx(const CommandName: AnsiString; const Params: TDADatasetParamArray): Integer;
+  end;
+
+  { CoDARemoteService }
+  CoDARemoteService = class
+    class function Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): IDARemoteService;
+  end;
+
+  { TDARemoteService_Proxy }
+  TDARemoteService_Proxy = class(TROProxy, IDARemoteService)
+  protected
+    function __GetInterfaceName:string; override;
+
+    function GetDatasetSchema(const aDatasetName: AnsiString): Binary;
+    function GetDatasetScripts(const DatasetNames: AnsiString): AnsiString;
+    function GetDatasetData(const DatasetName: AnsiString; const Params: AnsiString; const IncludeSchema: Boolean; const MaxRecords: Integer): Binary;
+    function GetDatasetDataEx(const DatasetName: AnsiString; const Params: TDADatasetParamArray; const UserFilter: AnsiString; const IncludeSchema: Boolean; 
+                              const MaxRecords: Integer): Binary;
+    function UpdateData(const Delta: Binary): Binary;
+    function ExecuteSQLCommand(const SQL: AnsiString): Integer;
+    function GetSchemaAsXML: AnsiString;
+    function GetMultipleDatasets(const DatasetRequestInfoArray: TDADatasetRequestInfoArray): Binary;
+    function ExecuteSQLCommandEx(const CommandName: AnsiString; const Params: TDADatasetParamArray): Integer;
+  end;
+
+  { IDALoginService }
+  IDALoginService = interface(IDARemoteService)
+    ['{58550AA0-B64F-495A-B2F8-C981D4C39180}']
+    function Login(const UserID: AnsiString; const Password: AnsiString; out LoginInfo: TDALoginInfo): Boolean;
+    procedure Logout;
+  end;
+
+  { CoDALoginService }
+  CoDALoginService = class
+    class function Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): IDALoginService;
+  end;
+
+  { TDALoginService_Proxy }
+  TDALoginService_Proxy = class(TDARemoteService_Proxy, IDALoginService)
+  protected
+    function __GetInterfaceName:string; override;
+
+    function Login(const UserID: AnsiString; const Password: AnsiString; out LoginInfo: TDALoginInfo): Boolean;
+    procedure Logout;
+  end;
+
+implementation
+
+uses
+  {vcl:} SysUtils,
+  {RemObjects:} uROEventRepository, uROSerializer, uRORes;
+
+{ TDADatasetParamArray }
+
+procedure TDADatasetParamArray.Assign(iSource: TPersistent);
+var lSource:TDADatasetParamArray;
+    i:integer;
+begin
+  if (iSource is TDADatasetParamArray) then begin
+    lSource := TDADatasetParamArray(iSource);
+    Clear();
+    Resize(lSource.Count);
+
+    for i := 0 to Count-1 do begin
+      if Assigned(lSource.Items[i]) then begin
+        Items[i].Assign(lSource.Items[i]);
+      end;
+    end;
+  end
+  else begin
+    inherited Assign(iSource);
+  end;
+end;
+
+class function TDADatasetParamArray.GetItemType: PTypeInfo;
+begin
+  result := TypeInfo(TDADatasetParam);
+end;
+
+class function TDADatasetParamArray.GetItemClass: TClass;
+begin
+  result := TDADatasetParam;
+end;
+
+class function TDADatasetParamArray.GetItemSize: integer;
+begin
+  result := SizeOf(TDADatasetParam);
+end;
+
+function TDADatasetParamArray.GetItems(aIndex: integer): TDADatasetParam;
+begin
+  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);
+  result := fItems[aIndex];
+end;
+
+function TDADatasetParamArray.GetItemRef(aIndex: integer): pointer;
+begin
+  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);
+  result := fItems[aIndex];
+end;
+
+procedure TDADatasetParamArray.SetItemRef(aIndex: integer; Ref: pointer);
+begin
+  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);
+  if Ref <> fItems[aIndex] then begin
+    if fItems[aIndex] <> nil then fItems[aIndex].Free;
+    fItems[aIndex] := Ref;
+  end;
+end;
+
+procedure TDADatasetParamArray.Clear;
+var i: integer;
+begin
+  for i := 0 to (Count-1) do fItems[i].Free();
+  SetLength(fItems, 0);
+  FCount := 0;
+end;
+
+procedure TDADatasetParamArray.Delete(aIndex: integer);
+var i: integer;
+begin
+  if (aIndex>=Count) then RaiseError(err_InvalidIndex, [aIndex]);
+
+  fItems[aIndex].Free();
+
+  if (aIndex<Count-1) then
+    for i := aIndex to Count-2 do fItems[i] := fItems[i+1];
+
+  SetLength(fItems, Count-1);
+  Dec(FCount);
+end;
+
+procedure TDADatasetParamArray.SetItems(aIndex: integer; const Value: TDADatasetParam);
+begin
+  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);
+  if fItems[aIndex] <> Value then begin
+    fItems[aIndex].Free;
+    fItems[aIndex] := Value;
+  end;
+end;
+
+procedure TDADatasetParamArray.Resize(ElementCount: integer);
+var i: Integer;
+begin
+  if fCount = ElementCount then Exit;
+  for i := FCount -1 downto ElementCount do
+    FItems[i].Free;
+  SetLength(fItems, ElementCount);
+  for i := FCount to ElementCount -1 do
+    FItems[i] := TDADatasetParam.Create;
+  FCount := ElementCount;
+end;
+
+function TDADatasetParamArray.GetCount: integer;
+begin
+  result := FCount;
+end;
+
+procedure TDADatasetParamArray.Grow;
+var
+  Delta, Capacity: Integer;
+begin
+  Capacity := Length(fItems);
+  if Capacity > 64 then
+    Delta := Capacity div 4
+  else
+    if Capacity > 8 then
+      Delta := 16
+   else
+      Delta := 4;
+  SetLength(fItems, Capacity + Delta);
+end;
+
+function TDADatasetParamArray.Add: TDADatasetParam;
+begin
+  result := TDADatasetParam.Create;
+  Add(Result);
+end;
+
+function TDADatasetParamArray.Add(const Value:TDADatasetParam): integer;
+begin
+  Result := Count;
+  if Length(fItems) = Result then
+    Grow;
+  fItems[result] := Value;
+  Inc(fCount);
+end;
+
+procedure TDADatasetParamArray.ReadComplex(ASerializer: TObject);
+var
+  lval: TDADatasetParam;
+  i: integer;
+begin
+  for i := 0 to Count-1 do begin
+    with TROSerializer(ASerializer) do
+      ReadStruct(GetArrayElementName(GetItemType, GetItemRef(i)), TDADatasetParam, lval, i);
+    Items[i] := lval;
+  end;
+end;
+
+procedure TDADatasetParamArray.WriteComplex(ASerializer: TObject);
+var
+  i: integer;
+begin
+  for i := 0 to Count-1 do
+    with TROSerializer(ASerializer) do
+      WriteStruct(GetArrayElementName(GetItemType, GetItemRef(i)), fItems[i], TDADatasetParam, i);
+end;
+
+{ TDADatasetRequestInfoArray }
+
+procedure TDADatasetRequestInfoArray.Assign(iSource: TPersistent);
+var lSource:TDADatasetRequestInfoArray;
+    i:integer;
+begin
+  if (iSource is TDADatasetRequestInfoArray) then begin
+    lSource := TDADatasetRequestInfoArray(iSource);
+    Clear();
+    Resize(lSource.Count);
+
+    for i := 0 to Count-1 do begin
+      if Assigned(lSource.Items[i]) then begin
+        Items[i].Assign(lSource.Items[i]);
+      end;
+    end;
+  end
+  else begin
+    inherited Assign(iSource);
+  end;
+end;
+
+class function TDADatasetRequestInfoArray.GetItemType: PTypeInfo;
+begin
+  result := TypeInfo(TDADatasetRequestInfo);
+end;
+
+class function TDADatasetRequestInfoArray.GetItemClass: TClass;
+begin
+  result := TDADatasetRequestInfo;
+end;
+
+class function TDADatasetRequestInfoArray.GetItemSize: integer;
+begin
+  result := SizeOf(TDADatasetRequestInfo);
+end;
+
+function TDADatasetRequestInfoArray.GetItems(aIndex: integer): TDADatasetRequestInfo;
+begin
+  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);
+  result := fItems[aIndex];
+end;
+
+function TDADatasetRequestInfoArray.GetItemRef(aIndex: integer): pointer;
+begin
+  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);
+  result := fItems[aIndex];
+end;
+
+procedure TDADatasetRequestInfoArray.SetItemRef(aIndex: integer; Ref: pointer);
+begin
+  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);
+  if Ref <> fItems[aIndex] then begin
+    if fItems[aIndex] <> nil then fItems[aIndex].Free;
+    fItems[aIndex] := Ref;
+  end;
+end;
+
+procedure TDADatasetRequestInfoArray.Clear;
+var i: integer;
+begin
+  for i := 0 to (Count-1) do fItems[i].Free();
+  SetLength(fItems, 0);
+  FCount := 0;
+end;
+
+procedure TDADatasetRequestInfoArray.Delete(aIndex: integer);
+var i: integer;
+begin
+  if (aIndex>=Count) then RaiseError(err_InvalidIndex, [aIndex]);
+
+  fItems[aIndex].Free();
+
+  if (aIndex<Count-1) then
+    for i := aIndex to Count-2 do fItems[i] := fItems[i+1];
+
+  SetLength(fItems, Count-1);
+  Dec(FCount);
+end;
+
+procedure TDADatasetRequestInfoArray.SetItems(aIndex: integer; const Value: TDADatasetRequestInfo);
+begin
+  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);
+  if fItems[aIndex] <> Value then begin
+    fItems[aIndex].Free;
+    fItems[aIndex] := Value;
+  end;
+end;
+
+procedure TDADatasetRequestInfoArray.Resize(ElementCount: integer);
+var i: Integer;
+begin
+  if fCount = ElementCount then Exit;
+  for i := FCount -1 downto ElementCount do
+    FItems[i].Free;
+  SetLength(fItems, ElementCount);
+  for i := FCount to ElementCount -1 do
+    FItems[i] := TDADatasetRequestInfo.Create;
+  FCount := ElementCount;
+end;
+
+function TDADatasetRequestInfoArray.GetCount: integer;
+begin
+  result := FCount;
+end;
+
+procedure TDADatasetRequestInfoArray.Grow;
+var
+  Delta, Capacity: Integer;
+begin
+  Capacity := Length(fItems);
+  if Capacity > 64 then
+    Delta := Capacity div 4
+  else
+    if Capacity > 8 then
+      Delta := 16
+   else
+      Delta := 4;
+  SetLength(fItems, Capacity + Delta);
+end;
+
+function TDADatasetRequestInfoArray.Add: TDADatasetRequestInfo;
+begin
+  result := TDADatasetRequestInfo.Create;
+  Add(Result);
+end;
+
+function TDADatasetRequestInfoArray.Add(const Value:TDADatasetRequestInfo): integer;
+begin
+  Result := Count;
+  if Length(fItems) = Result then
+    Grow;
+  fItems[result] := Value;
+  Inc(fCount);
+end;
+
+procedure TDADatasetRequestInfoArray.ReadComplex(ASerializer: TObject);
+var
+  lval: TDADatasetRequestInfo;
+  i: integer;
+begin
+  for i := 0 to Count-1 do begin
+    with TROSerializer(ASerializer) do
+      ReadStruct(GetArrayElementName(GetItemType, GetItemRef(i)), TDADatasetRequestInfo, lval, i);
+    Items[i] := lval;
+  end;
+end;
+
+procedure TDADatasetRequestInfoArray.WriteComplex(ASerializer: TObject);
+var
+  i: integer;
+begin
+  for i := 0 to Count-1 do
+    with TROSerializer(ASerializer) do
+      WriteStruct(GetArrayElementName(GetItemType, GetItemRef(i)), fItems[i], TDADatasetRequestInfo, i);
+end;
+
+{ TDAStringArray }
+
+procedure TDAStringArray.Assign(iSource: TPersistent);
+var lSource:TDAStringArray;
+    i:integer;
+begin
+  if (iSource is TDAStringArray) then begin
+    lSource := TDAStringArray(iSource);
+    Clear();
+    Resize(lSource.Count);
+
+    for i := 0 to Count-1 do begin
+      Items[i] := lSource.Items[i];
+    end;
+  end
+  else begin
+    inherited Assign(iSource);
+  end;
+end;
+
+class function TDAStringArray.GetItemType: PTypeInfo;
+begin
+  result := TypeInfo(AnsiString);
+end;
+
+class function TDAStringArray.GetItemSize: integer;
+begin
+  result := SizeOf(AnsiString);
+end;
+
+function TDAStringArray.GetItems(aIndex: integer): AnsiString;
+begin
+  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);
+  result := fItems[aIndex];
+end;
+
+function TDAStringArray.GetItemRef(aIndex: integer): pointer;
+begin
+  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);
+  result := @fItems[aIndex];
+end;
+
+procedure TDAStringArray.Clear;
+begin
+  SetLength(fItems, 0);
+  FCount := 0;
+end;
+
+procedure TDAStringArray.Delete(aIndex: integer);
+var i: integer;
+begin
+  if (aIndex>=Count) then RaiseError(err_InvalidIndex, [aIndex]);
+
+  if (aIndex<Count-1) then
+    for i := aIndex to Count-2 do fItems[i] := fItems[i+1];
+
+  SetLength(fItems, Count-1);
+  Dec(FCount);
+end;
+
+procedure TDAStringArray.SetItems(aIndex: integer; const Value: AnsiString);
+begin
+  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);
+  fItems[aIndex] := Value;
+end;
+
+procedure TDAStringArray.Resize(ElementCount: integer);
+begin
+  if fCount = ElementCount then Exit;
+  SetLength(fItems, ElementCount);
+  FCount := ElementCount;
+end;
+
+function TDAStringArray.GetCount: integer;
+begin
+  result := FCount;
+end;
+
+procedure TDAStringArray.Grow;
+var
+  Delta, Capacity: Integer;
+begin
+  Capacity := Length(fItems);
+  if Capacity > 64 then
+    Delta := Capacity div 4
+  else
+    if Capacity > 8 then
+      Delta := 16
+   else
+      Delta := 4;
+  SetLength(fItems, Capacity + Delta);
+end;
+
+function TDAStringArray.Add(const Value: AnsiString): integer;
+begin
+  Result := Count;
+  if Length(fItems) = Result then
+    Grow;
+  fItems[result] := Value;
+  Inc(fCount);
+end;
+
+function TDAStringArray.GetIndex(const aPropertyName: string;
+  const aPropertyValue: Variant; StartFrom: integer;
+  Options: TROSearchOptions): integer;
+begin
+  result := -1;
+end;
+
+procedure TDAStringArray.ReadComplex(ASerializer: TObject);
+var
+  lval: AnsiString;
+  i: integer;
+begin
+  for i := 0 to Count-1 do begin
+    with TROSerializer(ASerializer) do
+      ReadUTF8String(GetArrayElementName(GetItemType, GetItemRef(i)), lval, i);
+    Items[i] := lval;
+  end;
+end;
+
+procedure TDAStringArray.WriteComplex(ASerializer: TObject);
+var
+  i: integer;
+begin
+  for i := 0 to Count-1 do
+    with TROSerializer(ASerializer) do
+      WriteUTF8String(GetArrayElementName(GetItemType, GetItemRef(i)), fItems[i], i);
+end;
+
+{ TDADatasetParam }
+
+procedure TDADatasetParam.Assign(iSource: TPersistent); 
+var lSource: DataAbstract3_Intf.TDADatasetParam;
+begin
+  inherited Assign(iSource);
+  if (iSource is DataAbstract3_Intf.TDADatasetParam) then begin
+    lSource := DataAbstract3_Intf.TDADatasetParam(iSource);
+    Name := lSource.Name;
+    Value := lSource.Value;
+  end;
+end;
+
+procedure TDADatasetParam.ReadComplex(ASerializer: TObject);
+var
+  l_Name: AnsiString;
+  l_Value: Variant;
+begin
+  if TROSerializer(ASerializer).RecordStrictOrder then begin
+    l_Name := Name;
+    TROSerializer(ASerializer).ReadUTF8String('Name', l_Name);
+    Name := l_Name;
+    l_Value := Value;
+    TROSerializer(ASerializer).ReadVariant('Value', l_Value);
+    Value := l_Value;
+  end
+  else begin
+    l_Name := Name;
+    TROSerializer(ASerializer).ReadUTF8String('Name', l_Name);
+    Name := l_Name;
+    l_Value := Value;
+    TROSerializer(ASerializer).ReadVariant('Value', l_Value);
+    Value := l_Value;
+  end;
+end;
+
+procedure TDADatasetParam.WriteComplex(ASerializer: TObject);
+var
+  l_Name: AnsiString;
+  l_Value: Variant;
+begin
+  if TROSerializer(ASerializer).RecordStrictOrder then begin
+    TROSerializer(ASerializer).ChangeClass(TDADatasetParam);
+    l_Name := Name;
+    TROSerializer(ASerializer).WriteUTF8String('Name', l_Name);
+    l_Value := Value;
+    TROSerializer(ASerializer).WriteVariant('Value', l_Value);
+  end
+  else begin
+    l_Name := Name;
+    TROSerializer(ASerializer).WriteUTF8String('Name', l_Name);
+    l_Value := Value;
+    TROSerializer(ASerializer).WriteVariant('Value', l_Value);
+  end;
+end;
+
+{ TDADatasetParamCollection }
+constructor TDADatasetParamCollection.Create;
+begin
+  inherited Create(TDADatasetParam);
+end;
+
+constructor TDADatasetParamCollection.Create(aItemClass: TCollectionItemClass);
+begin
+  inherited Create(aItemClass);
+end;
+
+function TDADatasetParamCollection.Add: TDADatasetParam;
+begin
+  result := TDADatasetParam(inherited Add);
+end;
+
+function TDADatasetParamCollection.GetItems(aIndex: integer): TDADatasetParam;
+begin
+  result := TDADatasetParam(inherited Items[aIndex]);
+end;
+
+procedure TDADatasetParamCollection.LoadFromArray(anArray: TDADatasetParamArray);
+var i : integer;
+begin
+  Clear;
+  for i := 0 to (anArray.Count-1) do
+    Add.Assign(anArray[i]);
+end;
+
+procedure TDADatasetParamCollection.SaveToArray(anArray: TDADatasetParamArray);
+var i : integer;
+begin
+  anArray.Clear;
+  anArray.Resize(Count);
+  for i := 0 to (Count-1) do begin
+    anArray[i] := TDADatasetParam.Create;
+    anArray[i].Assign(Items[i]);
+  end;
+end;
+
+procedure TDADatasetParamCollection.SetItems(aIndex: integer; const Value: TDADatasetParam);
+begin
+  TDADatasetParam(inherited Items[aIndex]).Assign(Value);
+end;
+
+{ TDADatasetRequestInfo }
+
+procedure TDADatasetRequestInfo.Assign(iSource: TPersistent); 
+var lSource: DataAbstract3_Intf.TDADatasetRequestInfo;
+begin
+  inherited Assign(iSource);
+  if (iSource is DataAbstract3_Intf.TDADatasetRequestInfo) then begin
+    lSource := DataAbstract3_Intf.TDADatasetRequestInfo(iSource);
+    DatasetName := lSource.DatasetName;
+    IncludeSchema := lSource.IncludeSchema;
+    MaxRecords := lSource.MaxRecords;
+    Params.Assign(lSource.Params);
+  end;
+end;
+
+function TDADatasetRequestInfo.GetParams: TDADatasetParamArray;
+begin
+  if (fParams = nil) then fParams := TDADatasetParamArray.Create();
+  result := fParams;
+end;
+
+procedure TDADatasetRequestInfo.ReadComplex(ASerializer: TObject);
+var
+  l_DatasetName: AnsiString;
+  l_IncludeSchema: Boolean;
+  l_MaxRecords: Integer;
+  l_Params: TDADatasetParamArray;
+begin
+  if TROSerializer(ASerializer).RecordStrictOrder then begin
+    l_DatasetName := DatasetName;
+    TROSerializer(ASerializer).ReadUTF8String('DatasetName', l_DatasetName);
+    DatasetName := l_DatasetName;
+    l_IncludeSchema := IncludeSchema;
+    TROSerializer(ASerializer).ReadEnumerated('IncludeSchema',TypeInfo(boolean), l_IncludeSchema);
+    IncludeSchema := l_IncludeSchema;
+    l_MaxRecords := MaxRecords;
+    TROSerializer(ASerializer).ReadInteger('MaxRecords', otSLong, l_MaxRecords);
+    MaxRecords := l_MaxRecords;
+    l_Params := Params;
+    TROSerializer(ASerializer).ReadArray('Params', TDADatasetParamArray, l_Params);
+    if Params <> l_Params then Params.Free;
+    Params := l_Params;
+  end
+  else begin
+    l_DatasetName := DatasetName;
+    TROSerializer(ASerializer).ReadUTF8String('DatasetName', l_DatasetName);
+    DatasetName := l_DatasetName;
+    l_IncludeSchema := IncludeSchema;
+    TROSerializer(ASerializer).ReadEnumerated('IncludeSchema',TypeInfo(boolean), l_IncludeSchema);
+    IncludeSchema := l_IncludeSchema;
+    l_MaxRecords := MaxRecords;
+    TROSerializer(ASerializer).ReadInteger('MaxRecords', otSLong, l_MaxRecords);
+    MaxRecords := l_MaxRecords;
+    l_Params := Params;
+    TROSerializer(ASerializer).ReadArray('Params', TDADatasetParamArray, l_Params);
+    if Params <> l_Params then Params.Free;
+    Params := l_Params;
+  end;
+end;
+
+procedure TDADatasetRequestInfo.WriteComplex(ASerializer: TObject);
+var
+  l_DatasetName: AnsiString;
+  l_IncludeSchema: Boolean;
+  l_MaxRecords: Integer;
+  l_Params: TDADatasetParamArray;
+begin
+  if TROSerializer(ASerializer).RecordStrictOrder then begin
+    TROSerializer(ASerializer).ChangeClass(TDADatasetRequestInfo);
+    l_DatasetName := DatasetName;
+    TROSerializer(ASerializer).WriteUTF8String('DatasetName', l_DatasetName);
+    l_IncludeSchema := IncludeSchema;
+    TROSerializer(ASerializer).WriteEnumerated('IncludeSchema',TypeInfo(boolean), l_IncludeSchema);
+    l_MaxRecords := MaxRecords;
+    TROSerializer(ASerializer).WriteInteger('MaxRecords', otSLong, l_MaxRecords);
+    l_Params := Params;
+    TROSerializer(ASerializer).WriteArray('Params', l_Params, TDADatasetParamArray);
+  end
+  else begin
+    l_DatasetName := DatasetName;
+    TROSerializer(ASerializer).WriteUTF8String('DatasetName', l_DatasetName);
+    l_IncludeSchema := IncludeSchema;
+    TROSerializer(ASerializer).WriteEnumerated('IncludeSchema',TypeInfo(boolean), l_IncludeSchema);
+    l_MaxRecords := MaxRecords;
+    TROSerializer(ASerializer).WriteInteger('MaxRecords', otSLong, l_MaxRecords);
+    l_Params := Params;
+    TROSerializer(ASerializer).WriteArray('Params', l_Params, TDADatasetParamArray);
+  end;
+end;
+
+{ TDADatasetRequestInfoCollection }
+constructor TDADatasetRequestInfoCollection.Create;
+begin
+  inherited Create(TDADatasetRequestInfo);
+end;
+
+constructor TDADatasetRequestInfoCollection.Create(aItemClass: TCollectionItemClass);
+begin
+  inherited Create(aItemClass);
+end;
+
+function TDADatasetRequestInfoCollection.Add: TDADatasetRequestInfo;
+begin
+  result := TDADatasetRequestInfo(inherited Add);
+end;
+
+function TDADatasetRequestInfoCollection.GetItems(aIndex: integer): TDADatasetRequestInfo;
+begin
+  result := TDADatasetRequestInfo(inherited Items[aIndex]);
+end;
+
+procedure TDADatasetRequestInfoCollection.LoadFromArray(anArray: TDADatasetRequestInfoArray);
+var i : integer;
+begin
+  Clear;
+  for i := 0 to (anArray.Count-1) do
+    Add.Assign(anArray[i]);
+end;
+
+procedure TDADatasetRequestInfoCollection.SaveToArray(anArray: TDADatasetRequestInfoArray);
+var i : integer;
+begin
+  anArray.Clear;
+  anArray.Resize(Count);
+  for i := 0 to (Count-1) do begin
+    anArray[i] := TDADatasetRequestInfo.Create;
+    anArray[i].Assign(Items[i]);
+  end;
+end;
+
+procedure TDADatasetRequestInfoCollection.SetItems(aIndex: integer; const Value: TDADatasetRequestInfo);
+begin
+  TDADatasetRequestInfo(inherited Items[aIndex]).Assign(Value);
+end;
+
+{ TDALoginInfo }
+
+procedure TDALoginInfo.Assign(iSource: TPersistent); 
+var lSource: DataAbstract3_Intf.TDALoginInfo;
+begin
+  inherited Assign(iSource);
+  if (iSource is DataAbstract3_Intf.TDALoginInfo) then begin
+    lSource := DataAbstract3_Intf.TDALoginInfo(iSource);
+    SessionID := lSource.SessionID;
+    UserID := lSource.UserID;
+    Privileges.Assign(lSource.Privileges);
+    Attributes.Assign(lSource.Attributes);
+    Data.Assign(lSource.Data);
+  end;
+end;
+
+function TDALoginInfo.GetPrivileges: TDAStringArray;
+begin
+  if (fPrivileges = nil) then fPrivileges := TDAStringArray.Create();
+  result := fPrivileges;
+end;
+
+function TDALoginInfo.GetAttributes: TDAStringArray;
+begin
+  if (fAttributes = nil) then fAttributes := TDAStringArray.Create();
+  result := fAttributes;
+end;
+
+function TDALoginInfo.GetData: Binary;
+begin
+  if (fData = nil) then fData := Binary.Create();
+  result := fData;
+end;
+
+procedure TDALoginInfo.ReadComplex(ASerializer: TObject);
+var
+  l_Attributes: TDAStringArray;
+  l_Data: Binary;
+  l_Privileges: TDAStringArray;
+  l_SessionID: AnsiString;
+  l_UserID: AnsiString;
+begin
+  if TROSerializer(ASerializer).RecordStrictOrder then begin
+    l_SessionID := SessionID;
+    TROSerializer(ASerializer).ReadUTF8String('SessionID', l_SessionID);
+    SessionID := l_SessionID;
+    l_UserID := UserID;
+    TROSerializer(ASerializer).ReadUTF8String('UserID', l_UserID);
+    UserID := l_UserID;
+    l_Privileges := Privileges;
+    TROSerializer(ASerializer).ReadArray('Privileges', TDAStringArray, l_Privileges);
+    if Privileges <> l_Privileges then Privileges.Free;
+    Privileges := l_Privileges;
+    l_Attributes := Attributes;
+    TROSerializer(ASerializer).ReadArray('Attributes', TDAStringArray, l_Attributes);
+    if Attributes <> l_Attributes then Attributes.Free;
+    Attributes := l_Attributes;
+    l_Data := Data;
+    TROSerializer(ASerializer).ReadBinary('Data', l_Data);
+    if Data <> l_Data then Data.Free;
+    Data := l_Data;
+  end
+  else begin
+    l_Attributes := Attributes;
+    TROSerializer(ASerializer).ReadArray('Attributes', TDAStringArray, l_Attributes);
+    if Attributes <> l_Attributes then Attributes.Free;
+    Attributes := l_Attributes;
+    l_Data := Data;
+    TROSerializer(ASerializer).ReadBinary('Data', l_Data);
+    if Data <> l_Data then Data.Free;
+    Data := l_Data;
+    l_Privileges := Privileges;
+    TROSerializer(ASerializer).ReadArray('Privileges', TDAStringArray, l_Privileges);
+    if Privileges <> l_Privileges then Privileges.Free;
+    Privileges := l_Privileges;
+    l_SessionID := SessionID;
+    TROSerializer(ASerializer).ReadUTF8String('SessionID', l_SessionID);
+    SessionID := l_SessionID;
+    l_UserID := UserID;
+    TROSerializer(ASerializer).ReadUTF8String('UserID', l_UserID);
+    UserID := l_UserID;
+  end;
+end;
+
+procedure TDALoginInfo.WriteComplex(ASerializer: TObject);
+var
+  l_Attributes: TDAStringArray;
+  l_Data: Binary;
+  l_Privileges: TDAStringArray;
+  l_SessionID: AnsiString;
+  l_UserID: AnsiString;
+begin
+  if TROSerializer(ASerializer).RecordStrictOrder then begin
+    TROSerializer(ASerializer).ChangeClass(TDALoginInfo);
+    l_SessionID := SessionID;
+    TROSerializer(ASerializer).WriteUTF8String('SessionID', l_SessionID);
+    l_UserID := UserID;
+    TROSerializer(ASerializer).WriteUTF8String('UserID', l_UserID);
+    l_Privileges := Privileges;
+    TROSerializer(ASerializer).WriteArray('Privileges', l_Privileges, TDAStringArray);
+    l_Attributes := Attributes;
+    TROSerializer(ASerializer).WriteArray('Attributes', l_Attributes, TDAStringArray);
+    l_Data := Data;
+    TROSerializer(ASerializer).WriteBinary('Data', l_Data);
+  end
+  else begin
+    l_Attributes := Attributes;
+    TROSerializer(ASerializer).WriteArray('Attributes', l_Attributes, TDAStringArray);
+    l_Data := Data;
+    TROSerializer(ASerializer).WriteBinary('Data', l_Data);
+    l_Privileges := Privileges;
+    TROSerializer(ASerializer).WriteArray('Privileges', l_Privileges, TDAStringArray);
+    l_SessionID := SessionID;
+    TROSerializer(ASerializer).WriteUTF8String('SessionID', l_SessionID);
+    l_UserID := UserID;
+    TROSerializer(ASerializer).WriteUTF8String('UserID', l_UserID);
+  end;
+end;
+
+{ TDALoginInfoCollection }
+constructor TDALoginInfoCollection.Create;
+begin
+  inherited Create(TDALoginInfo);
+end;
+
+constructor TDALoginInfoCollection.Create(aItemClass: TCollectionItemClass);
+begin
+  inherited Create(aItemClass);
+end;
+
+function TDALoginInfoCollection.Add: TDALoginInfo;
+begin
+  result := TDALoginInfo(inherited Add);
+end;
+
+function TDALoginInfoCollection.GetItems(aIndex: integer): TDALoginInfo;
+begin
+  result := TDALoginInfo(inherited Items[aIndex]);
+end;
+
+procedure TDALoginInfoCollection.SetItems(aIndex: integer; const Value: TDALoginInfo);
+begin
+  TDALoginInfo(inherited Items[aIndex]).Assign(Value);
+end;
+
+{ CoDARemoteService }
+
+class function CoDARemoteService.Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): IDARemoteService;
+begin
+  result := TDARemoteService_Proxy.Create(aMessage, aTransportChannel);
+end;
+
+{ TDARemoteService_Proxy }
+
+function TDARemoteService_Proxy.__GetInterfaceName:string;
+begin
+  result := 'DARemoteService';
+end;
+
+function TDARemoteService_Proxy.GetDatasetSchema(const aDatasetName: AnsiString): Binary;
+begin
+  try
+    result := nil;
+    __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract3', __InterfaceName, 'GetDatasetSchema');
+    __Message.Write('aDatasetName', TypeInfo(AnsiString), aDatasetName, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(Binary), result, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+function TDARemoteService_Proxy.GetDatasetScripts(const DatasetNames: AnsiString): AnsiString;
+begin
+  try
+    __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract3', __InterfaceName, 'GetDatasetScripts');
+    __Message.Write('DatasetNames', TypeInfo(AnsiString), DatasetNames, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(AnsiString), result, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+function TDARemoteService_Proxy.GetDatasetData(const DatasetName: AnsiString; const Params: AnsiString; const IncludeSchema: Boolean; const MaxRecords: Integer): Binary;
+begin
+  try
+    result := nil;
+    __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract3', __InterfaceName, 'GetDatasetData');
+    __Message.Write('DatasetName', TypeInfo(AnsiString), DatasetName, []);
+    __Message.Write('Params', TypeInfo(AnsiString), Params, []);
+    __Message.Write('IncludeSchema', TypeInfo(Boolean), IncludeSchema, []);
+    __Message.Write('MaxRecords', TypeInfo(Integer), MaxRecords, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(Binary), result, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+function TDARemoteService_Proxy.GetDatasetDataEx(const DatasetName: AnsiString; const Params: TDADatasetParamArray; const UserFilter: AnsiString; const IncludeSchema: Boolean; 
+                                                 const MaxRecords: Integer): Binary;
+begin
+  try
+    result := nil;
+    __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract3', __InterfaceName, 'GetDatasetDataEx');
+    __Message.Write('DatasetName', TypeInfo(AnsiString), DatasetName, []);
+    __Message.Write('Params', TypeInfo(DataAbstract3_Intf.TDADatasetParamArray), Params, []);
+    __Message.Write('UserFilter', TypeInfo(AnsiString), UserFilter, []);
+    __Message.Write('IncludeSchema', TypeInfo(Boolean), IncludeSchema, []);
+    __Message.Write('MaxRecords', TypeInfo(Integer), MaxRecords, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(Binary), result, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+function TDARemoteService_Proxy.UpdateData(const Delta: Binary): Binary;
+begin
+  try
+    result := nil;
+    __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract3', __InterfaceName, 'UpdateData');
+    __Message.Write('Delta', TypeInfo(Binary), Delta, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(Binary), result, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+function TDARemoteService_Proxy.ExecuteSQLCommand(const SQL: AnsiString): Integer;
+begin
+  try
+    __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract3', __InterfaceName, 'ExecuteSQLCommand');
+    __Message.Write('SQL', TypeInfo(AnsiString), SQL, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(Integer), result, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+function TDARemoteService_Proxy.GetSchemaAsXML: AnsiString;
+begin
+  try
+    __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract3', __InterfaceName, 'GetSchemaAsXML');
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(AnsiString), result, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+function TDARemoteService_Proxy.GetMultipleDatasets(const DatasetRequestInfoArray: TDADatasetRequestInfoArray): Binary;
+begin
+  try
+    result := nil;
+    __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract3', __InterfaceName, 'GetMultipleDatasets');
+    __Message.Write('DatasetRequestInfoArray', TypeInfo(DataAbstract3_Intf.TDADatasetRequestInfoArray), DatasetRequestInfoArray, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(Binary), result, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+function TDARemoteService_Proxy.ExecuteSQLCommandEx(const CommandName: AnsiString; const Params: TDADatasetParamArray): Integer;
+begin
+  try
+    __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract3', __InterfaceName, 'ExecuteSQLCommandEx');
+    __Message.Write('CommandName', TypeInfo(AnsiString), CommandName, []);
+    __Message.Write('Params', TypeInfo(DataAbstract3_Intf.TDADatasetParamArray), Params, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(Integer), result, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+{ CoDALoginService }
+
+class function CoDALoginService.Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): IDALoginService;
+begin
+  result := TDALoginService_Proxy.Create(aMessage, aTransportChannel);
+end;
+
+{ TDALoginService_Proxy }
+
+function TDALoginService_Proxy.__GetInterfaceName:string;
+begin
+  result := 'DALoginService';
+end;
+
+function TDALoginService_Proxy.Login(const UserID: AnsiString; const Password: AnsiString; out LoginInfo: TDALoginInfo): Boolean;
+begin
+  try
+    LoginInfo := nil;
+    __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract3', __InterfaceName, 'Login');
+    __Message.Write('UserID', TypeInfo(AnsiString), UserID, []);
+    __Message.Write('Password', TypeInfo(AnsiString), Password, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(Boolean), result, []);
+    __Message.Read('LoginInfo', TypeInfo(DataAbstract3_Intf.TDALoginInfo), LoginInfo, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+procedure TDALoginService_Proxy.Logout;
+begin
+  try
+    __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract3', __InterfaceName, 'Logout');
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+  finally
+    __Message.FreeStream;
+  end
+end;
+
+initialization
+  RegisterROClass(TDADatasetParam);
+  RegisterROClass(TDADatasetRequestInfo);
+  RegisterROClass(TDALoginInfo);
+  RegisterROClass(TDADatasetParamArray);
+  RegisterROClass(TDADatasetRequestInfoArray);
+  RegisterROClass(TDAStringArray);
+  RegisterProxyClass(IDARemoteService_IID, TDARemoteService_Proxy);
+  RegisterProxyClass(IDALoginService_IID, TDALoginService_Proxy);
+
+
+finalization
+  UnregisterROClass(TDADatasetParam);
+  UnregisterROClass(TDADatasetRequestInfo);
+  UnregisterROClass(TDALoginInfo);
+  UnregisterROClass(TDADatasetParamArray);
+  UnregisterROClass(TDADatasetRequestInfoArray);
+  UnregisterROClass(TDAStringArray);
+  UnregisterProxyClass(IDARemoteService_IID);
+  UnregisterProxyClass(IDALoginService_IID);
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract3_Invk.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract3_Invk.pas
new file mode 100644
index 0000000..9ad9018
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract3_Invk.pas	
@@ -0,0 +1,365 @@
+unit DataAbstract3_Invk;
+
+{----------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project .                               }
+{                                                                            }
+{ Do not modify this unit manually, or your changes will be lost when this   }
+{ unit is regenerated the next time you compile the project.                 }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  {vcl:} Classes,
+  {RemObjects:} uROXMLIntf, uROServer, uROServerIntf, uROTypes, uROClientIntf,
+  {Generated:} DataAbstract3_Intf;
+
+type
+  TDARemoteService_Invoker = class(TROInvoker)
+  private
+  protected
+  public
+    constructor Create; override;
+  published
+    procedure Invoke_GetDatasetSchema(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+    procedure Invoke_GetDatasetScripts(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+    procedure Invoke_GetDatasetData(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+    procedure Invoke_GetDatasetDataEx(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+    procedure Invoke_UpdateData(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+    procedure Invoke_ExecuteSQLCommand(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+    procedure Invoke_GetSchemaAsXML(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+    procedure Invoke_GetMultipleDatasets(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+    procedure Invoke_ExecuteSQLCommandEx(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+  end;
+
+  TDALoginService_Invoker = class(TDARemoteService_Invoker)
+  private
+  protected
+  public
+    constructor Create; override;
+  published
+    procedure Invoke_Login(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+    procedure Invoke_Logout(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+  end;
+
+implementation
+
+uses
+  {RemObjects:} uRORes, uROClient;
+
+{ TDARemoteService_Invoker }
+
+constructor TDARemoteService_Invoker.Create;
+begin
+  inherited Create;
+  FAbstract := True;
+end;
+
+procedure TDARemoteService_Invoker.Invoke_GetDatasetSchema(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function GetDatasetSchema(const aDatasetName: AnsiString): Binary; }
+var
+  aDatasetName: AnsiString;
+  lResult: Binary;
+  __lObjectDisposer: TROObjectDisposer;
+begin
+  lResult := nil;
+  try
+    __Message.Read('aDatasetName', TypeInfo(AnsiString), aDatasetName, []);
+
+    lResult := (__Instance as IDARemoteService).GetDatasetSchema(aDatasetName);
+
+    __Message.InitializeResponseMessage(__Transport, 'DataAbstract3', 'DARemoteService', 'GetDatasetSchemaResponse');
+    __Message.Write('Result', TypeInfo(Binary), lResult, []);
+    __Message.Finalize;
+    __Message.UnsetAttributes(__Transport);
+
+  finally
+    __lObjectDisposer := TROObjectDisposer.Create(__Instance);
+    try
+      __lObjectDisposer.Add(lResult);
+    finally
+      __lObjectDisposer.Free();
+    end;
+  end;
+end;
+
+procedure TDARemoteService_Invoker.Invoke_GetDatasetScripts(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function GetDatasetScripts(const DatasetNames: AnsiString): AnsiString; }
+var
+  DatasetNames: AnsiString;
+  lResult: AnsiString;
+begin
+  try
+    __Message.Read('DatasetNames', TypeInfo(AnsiString), DatasetNames, []);
+
+    lResult := (__Instance as IDARemoteService).GetDatasetScripts(DatasetNames);
+
+    __Message.InitializeResponseMessage(__Transport, 'DataAbstract3', 'DARemoteService', 'GetDatasetScriptsResponse');
+    __Message.Write('Result', TypeInfo(AnsiString), lResult, []);
+    __Message.Finalize;
+    __Message.UnsetAttributes(__Transport);
+
+  finally
+  end;
+end;
+
+procedure TDARemoteService_Invoker.Invoke_GetDatasetData(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function GetDatasetData(const DatasetName: AnsiString; const Params: AnsiString; const IncludeSchema: Boolean; const MaxRecords: Integer): Binary; }
+var
+  DatasetName: AnsiString;
+  Params: AnsiString;
+  IncludeSchema: Boolean;
+  MaxRecords: Integer;
+  lResult: Binary;
+  __lObjectDisposer: TROObjectDisposer;
+begin
+  lResult := nil;
+  try
+    __Message.Read('DatasetName', TypeInfo(AnsiString), DatasetName, []);
+    __Message.Read('Params', TypeInfo(AnsiString), Params, []);
+    __Message.Read('IncludeSchema', TypeInfo(Boolean), IncludeSchema, []);
+    __Message.Read('MaxRecords', TypeInfo(Integer), MaxRecords, []);
+
+    lResult := (__Instance as IDARemoteService).GetDatasetData(DatasetName, Params, IncludeSchema, MaxRecords);
+
+    __Message.InitializeResponseMessage(__Transport, 'DataAbstract3', 'DARemoteService', 'GetDatasetDataResponse');
+    __Message.Write('Result', TypeInfo(Binary), lResult, []);
+    __Message.Finalize;
+    __Message.UnsetAttributes(__Transport);
+
+  finally
+    __lObjectDisposer := TROObjectDisposer.Create(__Instance);
+    try
+      __lObjectDisposer.Add(lResult);
+    finally
+      __lObjectDisposer.Free();
+    end;
+  end;
+end;
+
+procedure TDARemoteService_Invoker.Invoke_GetDatasetDataEx(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function GetDatasetDataEx(const DatasetName: AnsiString; const Params: TDADatasetParamArray; const UserFilter: AnsiString; const IncludeSchema: Boolean; 
+                              const MaxRecords: Integer): Binary; }
+var
+  DatasetName: AnsiString;
+  Params: DataAbstract3_Intf.TDADatasetParamArray;
+  UserFilter: AnsiString;
+  IncludeSchema: Boolean;
+  MaxRecords: Integer;
+  lResult: Binary;
+  __lObjectDisposer: TROObjectDisposer;
+begin
+  Params := nil;
+  lResult := nil;
+  try
+    __Message.Read('DatasetName', TypeInfo(AnsiString), DatasetName, []);
+    __Message.Read('Params', TypeInfo(DataAbstract3_Intf.TDADatasetParamArray), Params, []);
+    __Message.Read('UserFilter', TypeInfo(AnsiString), UserFilter, []);
+    __Message.Read('IncludeSchema', TypeInfo(Boolean), IncludeSchema, []);
+    __Message.Read('MaxRecords', TypeInfo(Integer), MaxRecords, []);
+
+    lResult := (__Instance as IDARemoteService).GetDatasetDataEx(DatasetName, Params, UserFilter, IncludeSchema, MaxRecords);
+
+    __Message.InitializeResponseMessage(__Transport, 'DataAbstract3', 'DARemoteService', 'GetDatasetDataExResponse');
+    __Message.Write('Result', TypeInfo(Binary), lResult, []);
+    __Message.Finalize;
+    __Message.UnsetAttributes(__Transport);
+
+  finally
+    __lObjectDisposer := TROObjectDisposer.Create(__Instance);
+    try
+      __lObjectDisposer.Add(Params);
+      __lObjectDisposer.Add(lResult);
+    finally
+      __lObjectDisposer.Free();
+    end;
+  end;
+end;
+
+procedure TDARemoteService_Invoker.Invoke_UpdateData(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function UpdateData(const Delta: Binary): Binary; }
+var
+  Delta: Binary;
+  lResult: Binary;
+  __lObjectDisposer: TROObjectDisposer;
+begin
+  Delta := nil;
+  lResult := nil;
+  try
+    __Message.Read('Delta', TypeInfo(Binary), Delta, []);
+
+    lResult := (__Instance as IDARemoteService).UpdateData(Delta);
+
+    __Message.InitializeResponseMessage(__Transport, 'DataAbstract3', 'DARemoteService', 'UpdateDataResponse');
+    __Message.Write('Result', TypeInfo(Binary), lResult, []);
+    __Message.Finalize;
+    __Message.UnsetAttributes(__Transport);
+
+  finally
+    __lObjectDisposer := TROObjectDisposer.Create(__Instance);
+    try
+      __lObjectDisposer.Add(Delta);
+      __lObjectDisposer.Add(lResult);
+    finally
+      __lObjectDisposer.Free();
+    end;
+  end;
+end;
+
+procedure TDARemoteService_Invoker.Invoke_ExecuteSQLCommand(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function ExecuteSQLCommand(const SQL: AnsiString): Integer; }
+var
+  SQL: AnsiString;
+  lResult: Integer;
+begin
+  try
+    __Message.Read('SQL', TypeInfo(AnsiString), SQL, []);
+
+    lResult := (__Instance as IDARemoteService).ExecuteSQLCommand(SQL);
+
+    __Message.InitializeResponseMessage(__Transport, 'DataAbstract3', 'DARemoteService', 'ExecuteSQLCommandResponse');
+    __Message.Write('Result', TypeInfo(Integer), lResult, []);
+    __Message.Finalize;
+    __Message.UnsetAttributes(__Transport);
+
+  finally
+  end;
+end;
+
+procedure TDARemoteService_Invoker.Invoke_GetSchemaAsXML(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function GetSchemaAsXML: AnsiString; }
+var
+  lResult: AnsiString;
+begin
+  try
+    lResult := (__Instance as IDARemoteService).GetSchemaAsXML;
+
+    __Message.InitializeResponseMessage(__Transport, 'DataAbstract3', 'DARemoteService', 'GetSchemaAsXMLResponse');
+    __Message.Write('Result', TypeInfo(AnsiString), lResult, []);
+    __Message.Finalize;
+    __Message.UnsetAttributes(__Transport);
+
+  finally
+  end;
+end;
+
+procedure TDARemoteService_Invoker.Invoke_GetMultipleDatasets(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function GetMultipleDatasets(const DatasetRequestInfoArray: TDADatasetRequestInfoArray): Binary; }
+var
+  DatasetRequestInfoArray: DataAbstract3_Intf.TDADatasetRequestInfoArray;
+  lResult: Binary;
+  __lObjectDisposer: TROObjectDisposer;
+begin
+  DatasetRequestInfoArray := nil;
+  lResult := nil;
+  try
+    __Message.Read('DatasetRequestInfoArray', TypeInfo(DataAbstract3_Intf.TDADatasetRequestInfoArray), DatasetRequestInfoArray, []);
+
+    lResult := (__Instance as IDARemoteService).GetMultipleDatasets(DatasetRequestInfoArray);
+
+    __Message.InitializeResponseMessage(__Transport, 'DataAbstract3', 'DARemoteService', 'GetMultipleDatasetsResponse');
+    __Message.Write('Result', TypeInfo(Binary), lResult, []);
+    __Message.Finalize;
+    __Message.UnsetAttributes(__Transport);
+
+  finally
+    __lObjectDisposer := TROObjectDisposer.Create(__Instance);
+    try
+      __lObjectDisposer.Add(DatasetRequestInfoArray);
+      __lObjectDisposer.Add(lResult);
+    finally
+      __lObjectDisposer.Free();
+    end;
+  end;
+end;
+
+procedure TDARemoteService_Invoker.Invoke_ExecuteSQLCommandEx(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function ExecuteSQLCommandEx(const CommandName: AnsiString; const Params: TDADatasetParamArray): Integer; }
+var
+  CommandName: AnsiString;
+  Params: DataAbstract3_Intf.TDADatasetParamArray;
+  lResult: Integer;
+  __lObjectDisposer: TROObjectDisposer;
+begin
+  Params := nil;
+  try
+    __Message.Read('CommandName', TypeInfo(AnsiString), CommandName, []);
+    __Message.Read('Params', TypeInfo(DataAbstract3_Intf.TDADatasetParamArray), Params, []);
+
+    lResult := (__Instance as IDARemoteService).ExecuteSQLCommandEx(CommandName, Params);
+
+    __Message.InitializeResponseMessage(__Transport, 'DataAbstract3', 'DARemoteService', 'ExecuteSQLCommandExResponse');
+    __Message.Write('Result', TypeInfo(Integer), lResult, []);
+    __Message.Finalize;
+    __Message.UnsetAttributes(__Transport);
+
+  finally
+    __lObjectDisposer := TROObjectDisposer.Create(__Instance);
+    try
+      __lObjectDisposer.Add(Params);
+    finally
+      __lObjectDisposer.Free();
+    end;
+  end;
+end;
+
+{ TDALoginService_Invoker }
+
+constructor TDALoginService_Invoker.Create;
+begin
+  inherited Create;
+  FAbstract := True;
+end;
+
+procedure TDALoginService_Invoker.Invoke_Login(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function Login(const UserID: AnsiString; const Password: AnsiString; out LoginInfo: TDALoginInfo): Boolean; }
+var
+  UserID: AnsiString;
+  Password: AnsiString;
+  LoginInfo: DataAbstract3_Intf.TDALoginInfo;
+  lResult: Boolean;
+  __lObjectDisposer: TROObjectDisposer;
+begin
+  LoginInfo := nil;
+  try
+    __Message.Read('UserID', TypeInfo(AnsiString), UserID, []);
+    __Message.Read('Password', TypeInfo(AnsiString), Password, []);
+
+    lResult := (__Instance as IDALoginService).Login(UserID, Password, LoginInfo);
+
+    __Message.InitializeResponseMessage(__Transport, 'DataAbstract3', 'DALoginService', 'LoginResponse');
+    __Message.Write('Result', TypeInfo(Boolean), lResult, []);
+    __Message.Write('LoginInfo', TypeInfo(DataAbstract3_Intf.TDALoginInfo), LoginInfo, []);
+    __Message.Finalize;
+    __Message.UnsetAttributes(__Transport);
+
+  finally
+    __lObjectDisposer := TROObjectDisposer.Create(__Instance);
+    try
+      __lObjectDisposer.Add(LoginInfo);
+    finally
+      __lObjectDisposer.Free();
+    end;
+  end;
+end;
+
+procedure TDALoginService_Invoker.Invoke_Logout(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ procedure Logout; }
+begin
+  try
+    (__Instance as IDALoginService).Logout;
+
+    __Message.InitializeResponseMessage(__Transport, 'DataAbstract3', 'DALoginService', 'LogoutResponse');
+    __Message.Finalize;
+
+    __oResponseOptions := [roNoResponse];
+
+  finally
+  end;
+end;
+
+initialization
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract4.RODL b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract4.RODL
new file mode 100644
index 0000000..1201aae
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract4.RODL	
@@ -0,0 +1,323 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Library Name="DataAbstract4" Namespace="RemObjects.DataAbstract.Server" UID="{DC8B7BE2-14AF-402D-B1F8-E1008B6FA4F6}" Version="3.0">
+<Services>
+<Service Name="DataAbstractService" UID="{3B33DC0F-EC94-433E-97AC-D090F68BCE6A}" Abstract="1">
+<Interfaces>
+<Interface Name="Default" UID="{4C2EC238-4FB4-434E-8CFF-ED25EEFF1525}">
+<Documentation><![CDATA[   Service WinFormsDAServerService. This service has been automatically generated using the RODL template you can find in the Templates directory.]]></Documentation><Operations>
+<Operation Name="GetSchema" UID="{684994AA-6829-4497-A054-0ACB6647E24F}">
+<Parameters>
+<Parameter Name="Result" DataType="Utf8String" Flag="Result">
+</Parameter>
+<Parameter Name="aFilter" DataType="Utf8String" Flag="In" >
+</Parameter>
+</Parameters>
+</Operation>
+<Operation Name="GetData" UID="{7C394D25-2B02-4CC9-838B-7099B06F857C}">
+<Parameters>
+<Parameter Name="Result" DataType="Binary" Flag="Result">
+</Parameter>
+<Parameter Name="aTableNameArray" DataType="StringArray" Flag="In" >
+</Parameter>
+<Parameter Name="aTableRequestInfoArray" DataType="TableRequestInfoArray" Flag="In" >
+</Parameter>
+</Parameters>
+</Operation>
+<Operation Name="UpdateData" UID="{8FBDE1AF-A3DA-487A-9E08-FB7F446F8DC6}">
+<Parameters>
+<Parameter Name="Result" DataType="Binary" Flag="Result">
+</Parameter>
+<Parameter Name="aDelta" DataType="Binary" Flag="In" >
+</Parameter>
+</Parameters>
+</Operation>
+<Operation Name="ExecuteCommand" UID="{BEBB190E-A511-4808-9424-5594CB5B5F58}">
+<Parameters>
+<Parameter Name="Result" DataType="Integer" Flag="Result">
+</Parameter>
+<Parameter Name="aCommandName" DataType="Utf8String" Flag="In" >
+</Parameter>
+<Parameter Name="aParameterArray" DataType="DataParameterArray" Flag="In" >
+</Parameter>
+</Parameters>
+</Operation>
+<Operation Name="ExecuteCommandEx" UID="{B2C8E6DA-F233-4365-9F56-1590C0583604}">
+<Parameters>
+<Parameter Name="Result" DataType="Integer" Flag="Result">
+</Parameter>
+<Parameter Name="aCommandName" DataType="Utf8String" Flag="In" >
+</Parameter>
+<Parameter Name="aInputParameters" DataType="DataParameterArray" Flag="In" >
+</Parameter>
+<Parameter Name="aOutputParameters" DataType="DataParameterArray" Flag="Out" >
+</Parameter>
+</Parameters>
+</Operation>
+<Operation Name="GetTableSchema" UID="{CFD45BA0-FD52-40C5-951A-08FF71CF5059}">
+<Parameters>
+<Parameter Name="Result" DataType="Utf8String" Flag="Result">
+</Parameter>
+<Parameter Name="aTableNameArray" DataType="StringArray" Flag="In" >
+</Parameter>
+</Parameters>
+</Operation>
+<Operation Name="GetCommandSchema" UID="{15345F7D-9962-485C-B383-BCB0397DD50A}">
+<Parameters>
+<Parameter Name="Result" DataType="Utf8String" Flag="Result">
+</Parameter>
+<Parameter Name="aCommandNameArray" DataType="StringArray" Flag="In" >
+</Parameter>
+</Parameters>
+</Operation>
+<Operation Name="SQLGetData" UID="{F3A01874-E954-48F5-9DB3-315F248A0E08}">
+<Parameters>
+<Parameter Name="Result" DataType="Binary" Flag="Result">
+</Parameter>
+<Parameter Name="aSQLText" DataType="Utf8String" Flag="In" >
+</Parameter>
+<Parameter Name="aIncludeSchema" DataType="Boolean" Flag="In" >
+</Parameter>
+<Parameter Name="aMaxRecords" DataType="Integer" Flag="In" >
+</Parameter>
+</Parameters>
+</Operation>
+<Operation Name="SQLGetDataEx" UID="{025A6E0D-8583-44C7-8F5F-6ADE175E446F}">
+<Parameters>
+<Parameter Name="Result" DataType="Binary" Flag="Result">
+</Parameter>
+<Parameter Name="aSQLText" DataType="Utf8String" Flag="In" >
+</Parameter>
+<Parameter Name="aIncludeSchema" DataType="Boolean" Flag="In" >
+</Parameter>
+<Parameter Name="aMaxRecords" DataType="Integer" Flag="In" >
+</Parameter>
+<Parameter Name="aDynamicWhereXML" DataType="Widestring" Flag="In" >
+</Parameter>
+</Parameters>
+</Operation>
+<Operation Name="SQLExecuteCommand" UID="{C2525BDB-0CBA-4258-8016-37EB75C24BD7}">
+<Parameters>
+<Parameter Name="Result" DataType="Integer" Flag="Result">
+</Parameter>
+<Parameter Name="aSQLText" DataType="Utf8String" Flag="In" >
+</Parameter>
+</Parameters>
+</Operation>
+<Operation Name="SQLExecuteCommandEx" UID="{284F296C-A86B-410E-8A91-72D6E0DA86B9}">
+<Parameters>
+<Parameter Name="Result" DataType="Integer" Flag="Result">
+</Parameter>
+<Parameter Name="aSQLText" DataType="Utf8String" Flag="In" >
+</Parameter>
+<Parameter Name="aDynamicWhereXML" DataType="Widestring" Flag="In" >
+</Parameter>
+</Parameters>
+</Operation>
+<Operation Name="GetDatasetScripts" UID="{1025B82B-49FD-4D62-ACE1-908BAA8D330C}">
+<Parameters>
+<Parameter Name="Result" DataType="Utf8String" Flag="Result">
+</Parameter>
+<Parameter Name="DatasetNames" DataType="Utf8String" Flag="In" >
+</Parameter>
+</Parameters>
+</Operation>
+<Operation Name="RegisterForDataChangeNotification" UID="{3BFC17C7-6676-4B43-A90D-ABEC10072B48}">
+<Parameters>
+<Parameter Name="aTableName" DataType="Utf8String" Flag="In" >
+</Parameter>
+</Parameters>
+</Operation>
+<Operation Name="UnregisterForDataChangeNotification" UID="{F3D1B5FB-42FA-46B4-8528-16CF915D4B4D}">
+<Parameters>
+<Parameter Name="aTableName" DataType="Utf8String" Flag="In" >
+</Parameter>
+</Parameters>
+</Operation>
+</Operations>
+</Interface>
+</Interfaces>
+</Service>
+<Service Name="SimpleLoginService" UID="{4DD93F46-E044-47B9-A0F6-B45CD60A233A}" Ancestor="BaseLoginService" Abstract="1">
+<Interfaces>
+<Interface Name="Default" UID="{B186853B-168B-4E33-B798-467444BFC8C6}">
+<Operations>
+<Operation Name="Login" UID="{87E7258D-59B1-4E76-8619-BF46780562F0}">
+<Parameters>
+<Parameter Name="Result" DataType="Boolean" Flag="Result">
+</Parameter>
+<Parameter Name="aUserID" DataType="Utf8String" Flag="In" >
+</Parameter>
+<Parameter Name="aPassword" DataType="Utf8String" Flag="In" >
+</Parameter>
+<Parameter Name="aUserInfo" DataType="UserInfo" Flag="Out" >
+</Parameter>
+</Parameters>
+</Operation>
+</Operations>
+</Interface>
+</Interfaces>
+</Service>
+<Service Name="BaseLoginService" UID="{745EED14-581E-47FC-B2BB-D4FAA6005B4F}" Abstract="1">
+<Interfaces>
+<Interface Name="Default" UID="{C349DB54-9DFB-454E-AD23-6F2166A624A6}">
+<Operations>
+<Operation Name="Logout" UID="{866D0287-09D7-4368-AA5A-D4718CF698AF}">
+<Parameters>
+</Parameters>
+</Operation>
+</Operations>
+</Interface>
+</Interfaces>
+</Service>
+<Service Name="MultiDbLoginService" UID="{78596023-A368-4490-8BE4-224987698117}" Ancestor="BaseLoginService" Abstract="1">
+<Interfaces>
+<Interface Name="Default" UID="{2C6D5764-01CE-447A-8264-27210B2C7371}">
+<Operations>
+<Operation Name="Login" UID="{64F02AE6-1EFD-40FD-979E-D0CC21320CCB}">
+<Parameters>
+<Parameter Name="Result" DataType="Boolean" Flag="Result">
+</Parameter>
+<Parameter Name="aUserID" DataType="Utf8String" Flag="In" >
+</Parameter>
+<Parameter Name="aPassword" DataType="Utf8String" Flag="In" >
+</Parameter>
+<Parameter Name="aConnectionName" DataType="Utf8String" Flag="In" >
+</Parameter>
+<Parameter Name="aUserInfo" DataType="UserInfo" Flag="Out" >
+</Parameter>
+</Parameters>
+</Operation>
+</Operations>
+</Interface>
+</Interfaces>
+</Service>
+<Service Name="MultiDbLoginServiceV5" UID="{059B0FA5-5980-4811-8C8E-790402D62C62}" Ancestor="MultiDbLoginService" Abstract="1">
+<Interfaces>
+<Interface Name="Default" UID="{5A78AB01-2097-4473-A4D5-78980FFD90E4}">
+<Operations>
+<Operation Name="GetConnectionNames" UID="{BF3AE66F-A496-4B4D-AEDC-A484F8E2B20E}">
+<Parameters>
+<Parameter Name="Result" DataType="StringArray" Flag="Result">
+</Parameter>
+</Parameters>
+</Operation>
+<Operation Name="GetDefaultConnectionName" UID="{BA63F191-03A5-48FB-99D7-F48B150CB1C6}">
+<Parameters>
+<Parameter Name="Result" DataType="Utf8String" Flag="Result">
+</Parameter>
+</Parameters>
+</Operation>
+</Operations>
+</Interface>
+</Interfaces>
+</Service>
+</Services>
+<EventSinks>
+<EventSink Name="DataChangeNotification" UID="{10309CDF-EA24-4F8B-9678-8D1EF426955F}">
+<Interfaces>
+<Interface Name="Default" UID="{1309480C-AEF8-48E0-A27F-E6090F441B46}">
+<Operations>
+<Operation Name="OnDataTableChanged" UID="{61437AB0-DD71-44D3-967A-25199CE8C1CD}">
+<Parameters>
+<Parameter Name="aTableName" DataType="Utf8String" Flag="In">
+</Parameter>
+<Parameter Name="aDelta" DataType="Binary" Flag="In">
+</Parameter>
+</Parameters>
+</Operation>
+</Operations>
+</Interface>
+</Interfaces>
+</EventSink>
+</EventSinks>
+<Structs>
+<Struct Name="DataParameter" UID="{960C67F1-F39A-43EF-9D45-E091ACE04A86}" AutoCreateParams="1">
+<Elements>
+<Element Name="Name" DataType="Utf8String">
+</Element>
+<Element Name="Value" DataType="Variant">
+</Element>
+</Elements>
+</Struct>
+<Struct Name="TableRequestInfo" UID="{AD4D327E-650E-42AF-8D57-1166124FB515}" AutoCreateParams="1">
+<Elements>
+<Element Name="UserFilter" DataType="Utf8String">
+</Element>
+<Element Name="IncludeSchema" DataType="Boolean">
+</Element>
+<Element Name="MaxRecords" DataType="Integer">
+<CustomAttributes>
+<Default Value="-1" />
+</CustomAttributes>
+</Element>
+<Element Name="Parameters" DataType="DataParameterArray">
+</Element>
+</Elements>
+</Struct>
+<Struct Name="UserInfo" UID="{C07A7008-F183-4015-9503-5C8FAE347E1C}" AutoCreateParams="1">
+<Elements>
+<Element Name="SessionID" DataType="Utf8String">
+</Element>
+<Element Name="UserID" DataType="Utf8String">
+</Element>
+<Element Name="Privileges" DataType="StringArray">
+</Element>
+<Element Name="Attributes" DataType="VariantArray">
+</Element>
+<Element Name="UserData" DataType="Binary">
+</Element>
+</Elements>
+</Struct>
+<Struct Name="TableRequestInfoV5" UID="{F212B25A-167B-409C-BE99-23348E82AA5E}" AutoCreateParams="1" Ancestor="TableRequestInfo">
+<Elements>
+<Element Name="WhereClause" DataType="Xml">
+</Element>
+<Element Name="DynamicSelectFieldNames" DataType="StringArray">
+</Element>
+<Element Name="Sorting" DataType="ColumnSorting">
+</Element>
+</Elements>
+</Struct>
+<Struct Name="ColumnSorting" UID="{81A8FAD7-B72D-4962-AD43-CD8E827DBC12}" AutoCreateParams="1">
+<Elements>
+<Element Name="FieldName" DataType="Utf8String">
+</Element>
+<Element Name="SortDirection" DataType="ColumnSortDirection">
+</Element>
+</Elements>
+</Struct>
+<Struct Name="TableRequestInfoV6" UID="{9BC1458B-11F9-44EB-81D9-06198336F72D}" AutoCreateParams="1" Ancestor="TableRequestInfo">
+<Elements>
+<Element Name="Sql" DataType="Widestring">
+</Element>
+</Elements>
+</Struct>
+</Structs>
+<Enums>
+<Enum Name="ColumnSortDirection" UID="{EAEAD7D2-3A0E-48D6-BE19-A74265D14503}">
+<EnumValues>
+<EnumValue Name="Ascending">
+</EnumValue>
+<EnumValue Name="Descending">
+</EnumValue>
+</EnumValues>
+</Enum>
+</Enums>
+<Arrays>
+<Array Name="DataParameterArray" UID="{3E639D01-FB07-458F-B9C4-C6550F504901}">
+<ElementType DataType="DataParameter" />
+</Array>
+<Array Name="TableRequestInfoArray" UID="{036958C2-1AC8-49B6-8A94-417198CB799F}">
+<ElementType DataType="TableRequestInfo" />
+</Array>
+<Array Name="StringArray" UID="{7E86C9FC-99E7-45F2-8A49-E59A7A017265}">
+<ElementType DataType="Utf8String" />
+</Array>
+<Array Name="VariantArray" UID="{5E7C5D64-FC5D-4B54-AC91-11B27ACA5FF4}">
+<ElementType DataType="Variant" />
+</Array>
+<Array Name="ColumnSortingArray" UID="{53481559-8F14-44C6-83E4-5E9A579AB0EC}">
+<ElementType DataType="ColumnSorting" />
+</Array>
+</Arrays>
+</Library>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract4_Async.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract4_Async.pas
new file mode 100644
index 0000000..3db4e4d
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract4_Async.pas	
@@ -0,0 +1,645 @@
+unit DataAbstract4_Async;
+
+{----------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project .                               }
+{                                                                            }
+{ Do not modify this unit manually, or your changes will be lost when this   }
+{ unit is regenerated the next time you compile the project.                 }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  {vcl:} Classes, TypInfo,
+  {RemObjects:} uROXMLIntf, uROClasses, uROTypes, uROClientIntf, uROAsync,
+  {Project:} DataAbstract4_Intf;
+
+type
+  { IDataAbstractService_Async }
+  IDataAbstractService_Async = interface(IROAsyncInterface)
+    ['{B4C1D84D-1C6F-4E5A-8839-0C9F7EA5431B}']
+    procedure Invoke_GetSchema(const aFilter: Utf8String);
+    procedure Invoke_GetData(const aTableNameArray: StringArray; const aTableRequestInfoArray: TableRequestInfoArray);
+    procedure Invoke_UpdateData(const aDelta: Binary);
+    procedure Invoke_ExecuteCommand(const aCommandName: Utf8String; const aParameterArray: DataParameterArray);
+    procedure Invoke_ExecuteCommandEx(const aCommandName: Utf8String; const aInputParameters: DataParameterArray);
+    procedure Invoke_GetTableSchema(const aTableNameArray: StringArray);
+    procedure Invoke_GetCommandSchema(const aCommandNameArray: StringArray);
+    procedure Invoke_SQLGetData(const aSQLText: Utf8String; const aIncludeSchema: Boolean; const aMaxRecords: Integer);
+    procedure Invoke_SQLGetDataEx(const aSQLText: Utf8String; const aIncludeSchema: Boolean; const aMaxRecords: Integer; const aDynamicWhereXML: Widestring);
+    procedure Invoke_SQLExecuteCommand(const aSQLText: Utf8String);
+    procedure Invoke_SQLExecuteCommandEx(const aSQLText: Utf8String; const aDynamicWhereXML: Widestring);
+    procedure Invoke_GetDatasetScripts(const DatasetNames: Utf8String);
+    procedure Invoke_RegisterForDataChangeNotification(const aTableName: Utf8String);
+    procedure Invoke_UnregisterForDataChangeNotification(const aTableName: Utf8String);
+    function Retrieve_GetSchema: Utf8String;
+    function Retrieve_GetData: Binary;
+    function Retrieve_UpdateData: Binary;
+    function Retrieve_ExecuteCommand: Integer;
+    function Retrieve_ExecuteCommandEx(out aOutputParameters: DataParameterArray): Integer;
+    function Retrieve_GetTableSchema: Utf8String;
+    function Retrieve_GetCommandSchema: Utf8String;
+    function Retrieve_SQLGetData: Binary;
+    function Retrieve_SQLGetDataEx: Binary;
+    function Retrieve_SQLExecuteCommand: Integer;
+    function Retrieve_SQLExecuteCommandEx: Integer;
+    function Retrieve_GetDatasetScripts: Utf8String;
+  end;
+
+  { IBaseLoginService_Async }
+  IBaseLoginService_Async = interface(IROAsyncInterface)
+    ['{45A761A3-80E9-43E6-86BC-E96693551453}']
+    procedure Invoke_Logout;
+  end;
+
+  { IMultiDbLoginService_Async }
+  IMultiDbLoginService_Async = interface(IBaseLoginService_Async)
+    ['{8EBB1878-ECD9-4F4E-8A87-E26D51FD0ADD}']
+    procedure Invoke_Login(const aUserID: Utf8String; const aPassword: Utf8String; const aConnectionName: Utf8String);
+    function Retrieve_Login(out aUserInfo: UserInfo): Boolean;
+  end;
+
+  { IMultiDbLoginServiceV5_Async }
+  IMultiDbLoginServiceV5_Async = interface(IMultiDbLoginService_Async)
+    ['{292C3E8B-B263-4D95-9EE6-41DA014ACDF3}']
+    procedure Invoke_GetConnectionNames;
+    procedure Invoke_GetDefaultConnectionName;
+    function Retrieve_GetConnectionNames: StringArray;
+    function Retrieve_GetDefaultConnectionName: Utf8String;
+  end;
+
+  { ISimpleLoginService_Async }
+  ISimpleLoginService_Async = interface(IBaseLoginService_Async)
+    ['{74BC5406-7AA7-45CD-8012-193C38DF62E9}']
+    procedure Invoke_Login(const aUserID: Utf8String; const aPassword: Utf8String);
+    function Retrieve_Login(out aUserInfo: UserInfo): Boolean;
+  end;
+
+  { CoDataAbstractService_Async }
+  CoDataAbstractService_Async = class
+    class function Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): IDataAbstractService_Async;
+  end;
+
+  { CoBaseLoginService_Async }
+  CoBaseLoginService_Async = class
+    class function Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): IBaseLoginService_Async;
+  end;
+
+  { CoMultiDbLoginService_Async }
+  CoMultiDbLoginService_Async = class
+    class function Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): IMultiDbLoginService_Async;
+  end;
+
+  { CoMultiDbLoginServiceV5_Async }
+  CoMultiDbLoginServiceV5_Async = class
+    class function Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): IMultiDbLoginServiceV5_Async;
+  end;
+
+  { CoSimpleLoginService_Async }
+  CoSimpleLoginService_Async = class
+    class function Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): ISimpleLoginService_Async;
+  end;
+
+  { TDataAbstractService_AsyncProxy }
+  TDataAbstractService_AsyncProxy = class(TROAsyncProxy, IDataAbstractService_Async)
+  private
+  protected
+    function __GetInterfaceName:string; override;
+
+    procedure Invoke_GetSchema(const aFilter: Utf8String);
+    procedure Invoke_GetData(const aTableNameArray: StringArray; const aTableRequestInfoArray: TableRequestInfoArray);
+    procedure Invoke_UpdateData(const aDelta: Binary);
+    procedure Invoke_ExecuteCommand(const aCommandName: Utf8String; const aParameterArray: DataParameterArray);
+    procedure Invoke_ExecuteCommandEx(const aCommandName: Utf8String; const aInputParameters: DataParameterArray);
+    procedure Invoke_GetTableSchema(const aTableNameArray: StringArray);
+    procedure Invoke_GetCommandSchema(const aCommandNameArray: StringArray);
+    procedure Invoke_SQLGetData(const aSQLText: Utf8String; const aIncludeSchema: Boolean; const aMaxRecords: Integer);
+    procedure Invoke_SQLGetDataEx(const aSQLText: Utf8String; const aIncludeSchema: Boolean; const aMaxRecords: Integer; const aDynamicWhereXML: Widestring);
+    procedure Invoke_SQLExecuteCommand(const aSQLText: Utf8String);
+    procedure Invoke_SQLExecuteCommandEx(const aSQLText: Utf8String; const aDynamicWhereXML: Widestring);
+    procedure Invoke_GetDatasetScripts(const DatasetNames: Utf8String);
+    procedure Invoke_RegisterForDataChangeNotification(const aTableName: Utf8String);
+    procedure Invoke_UnregisterForDataChangeNotification(const aTableName: Utf8String);
+    function Retrieve_GetSchema: Utf8String;
+    function Retrieve_GetData: Binary;
+    function Retrieve_UpdateData: Binary;
+    function Retrieve_ExecuteCommand: Integer;
+    function Retrieve_ExecuteCommandEx(out aOutputParameters: DataParameterArray): Integer;
+    function Retrieve_GetTableSchema: Utf8String;
+    function Retrieve_GetCommandSchema: Utf8String;
+    function Retrieve_SQLGetData: Binary;
+    function Retrieve_SQLGetDataEx: Binary;
+    function Retrieve_SQLExecuteCommand: Integer;
+    function Retrieve_SQLExecuteCommandEx: Integer;
+    function Retrieve_GetDatasetScripts: Utf8String;
+  end;
+
+  { TBaseLoginService_AsyncProxy }
+  TBaseLoginService_AsyncProxy = class(TROAsyncProxy, IBaseLoginService_Async)
+  private
+  protected
+    function __GetInterfaceName:string; override;
+
+    procedure Invoke_Logout;
+  end;
+
+  { TMultiDbLoginService_AsyncProxy }
+  TMultiDbLoginService_AsyncProxy = class(TBaseLoginService_AsyncProxy, IMultiDbLoginService_Async)
+  private
+  protected
+    function __GetInterfaceName:string; override;
+
+    procedure Invoke_Login(const aUserID: Utf8String; const aPassword: Utf8String; const aConnectionName: Utf8String);
+    function Retrieve_Login(out aUserInfo: UserInfo): Boolean;
+  end;
+
+  { TMultiDbLoginServiceV5_AsyncProxy }
+  TMultiDbLoginServiceV5_AsyncProxy = class(TMultiDbLoginService_AsyncProxy, IMultiDbLoginServiceV5_Async)
+  private
+  protected
+    function __GetInterfaceName:string; override;
+
+    procedure Invoke_GetConnectionNames;
+    procedure Invoke_GetDefaultConnectionName;
+    function Retrieve_GetConnectionNames: StringArray;
+    function Retrieve_GetDefaultConnectionName: Utf8String;
+  end;
+
+  { TSimpleLoginService_AsyncProxy }
+  TSimpleLoginService_AsyncProxy = class(TBaseLoginService_AsyncProxy, ISimpleLoginService_Async)
+  private
+  protected
+    function __GetInterfaceName:string; override;
+
+    procedure Invoke_Login(const aUserID: Utf8String; const aPassword: Utf8String);
+    function Retrieve_Login(out aUserInfo: UserInfo): Boolean;
+  end;
+
+implementation
+
+uses
+  {vcl:} SysUtils;
+
+{ CoDataAbstractService }
+
+class function CoDataAbstractService_Async.Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): IDataAbstractService_Async;
+begin
+  result := TDataAbstractService_AsyncProxy.Create(aMessage, aTransportChannel);
+end;
+
+{ TDataAbstractService_AsyncProxy }
+
+function TDataAbstractService_AsyncProxy.__GetInterfaceName:string;
+begin
+  result := 'DataAbstractService';
+end;
+
+procedure TDataAbstractService_AsyncProxy.Invoke_GetSchema(const aFilter: Utf8String);
+begin
+  __AssertProxyNotBusy('GetSchema');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'GetSchema');
+  __Message.Write('aFilter', TypeInfo(Utf8String), aFilter, []);
+  __DispatchAsyncRequest('GetSchema',__Message);
+    __Message.UnsetAttributes(__TransportChannel);
+end;
+
+function TDataAbstractService_AsyncProxy.Retrieve_GetSchema: Utf8String;
+var __response:TStream;
+begin
+  __response := __RetrieveAsyncResponse('GetSchema');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Result', TypeInfo(Utf8String), Result, []);
+
+  __response.Free();
+end;
+
+procedure TDataAbstractService_AsyncProxy.Invoke_GetData(const aTableNameArray: StringArray; const aTableRequestInfoArray: TableRequestInfoArray);
+begin
+  __AssertProxyNotBusy('GetData');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'GetData');
+  __Message.Write('aTableNameArray', TypeInfo(StringArray), aTableNameArray, []);
+  __Message.Write('aTableRequestInfoArray', TypeInfo(TableRequestInfoArray), aTableRequestInfoArray, []);
+  __DispatchAsyncRequest('GetData',__Message);
+    __Message.UnsetAttributes(__TransportChannel);
+end;
+
+function TDataAbstractService_AsyncProxy.Retrieve_GetData: Binary;
+var __response:TStream;
+begin
+  result := nil;
+  __response := __RetrieveAsyncResponse('GetData');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Result', TypeInfo(Binary), Result, []);
+
+  __response.Free();
+end;
+
+procedure TDataAbstractService_AsyncProxy.Invoke_UpdateData(const aDelta: Binary);
+begin
+  __AssertProxyNotBusy('UpdateData');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'UpdateData');
+  __Message.Write('aDelta', TypeInfo(Binary), aDelta, []);
+  __DispatchAsyncRequest('UpdateData',__Message);
+    __Message.UnsetAttributes(__TransportChannel);
+end;
+
+function TDataAbstractService_AsyncProxy.Retrieve_UpdateData: Binary;
+var __response:TStream;
+begin
+  result := nil;
+  __response := __RetrieveAsyncResponse('UpdateData');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Result', TypeInfo(Binary), Result, []);
+
+  __response.Free();
+end;
+
+procedure TDataAbstractService_AsyncProxy.Invoke_ExecuteCommand(const aCommandName: Utf8String; const aParameterArray: DataParameterArray);
+begin
+  __AssertProxyNotBusy('ExecuteCommand');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'ExecuteCommand');
+  __Message.Write('aCommandName', TypeInfo(Utf8String), aCommandName, []);
+  __Message.Write('aParameterArray', TypeInfo(DataParameterArray), aParameterArray, []);
+  __DispatchAsyncRequest('ExecuteCommand',__Message);
+    __Message.UnsetAttributes(__TransportChannel);
+end;
+
+function TDataAbstractService_AsyncProxy.Retrieve_ExecuteCommand: Integer;
+var __response:TStream;
+begin
+  __response := __RetrieveAsyncResponse('ExecuteCommand');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Result', TypeInfo(Integer), Result, []);
+
+  __response.Free();
+end;
+
+procedure TDataAbstractService_AsyncProxy.Invoke_ExecuteCommandEx(const aCommandName: Utf8String; const aInputParameters: DataParameterArray);
+begin
+  __AssertProxyNotBusy('ExecuteCommandEx');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'ExecuteCommandEx');
+  __Message.Write('aCommandName', TypeInfo(Utf8String), aCommandName, []);
+  __Message.Write('aInputParameters', TypeInfo(DataParameterArray), aInputParameters, []);
+  __DispatchAsyncRequest('ExecuteCommandEx',__Message);
+    __Message.UnsetAttributes(__TransportChannel);
+end;
+
+function TDataAbstractService_AsyncProxy.Retrieve_ExecuteCommandEx(out aOutputParameters: DataParameterArray): Integer;
+var __response:TStream;
+begin
+  aOutputParameters := nil;
+  __response := __RetrieveAsyncResponse('ExecuteCommandEx');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Result', TypeInfo(Integer), Result, []);
+  __Message.Read('aOutputParameters', TypeInfo(DataParameterArray), aOutputParameters, []);
+
+  __response.Free();
+end;
+
+procedure TDataAbstractService_AsyncProxy.Invoke_GetTableSchema(const aTableNameArray: StringArray);
+begin
+  __AssertProxyNotBusy('GetTableSchema');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'GetTableSchema');
+  __Message.Write('aTableNameArray', TypeInfo(StringArray), aTableNameArray, []);
+  __DispatchAsyncRequest('GetTableSchema',__Message);
+    __Message.UnsetAttributes(__TransportChannel);
+end;
+
+function TDataAbstractService_AsyncProxy.Retrieve_GetTableSchema: Utf8String;
+var __response:TStream;
+begin
+  __response := __RetrieveAsyncResponse('GetTableSchema');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Result', TypeInfo(Utf8String), Result, []);
+
+  __response.Free();
+end;
+
+procedure TDataAbstractService_AsyncProxy.Invoke_GetCommandSchema(const aCommandNameArray: StringArray);
+begin
+  __AssertProxyNotBusy('GetCommandSchema');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'GetCommandSchema');
+  __Message.Write('aCommandNameArray', TypeInfo(StringArray), aCommandNameArray, []);
+  __DispatchAsyncRequest('GetCommandSchema',__Message);
+    __Message.UnsetAttributes(__TransportChannel);
+end;
+
+function TDataAbstractService_AsyncProxy.Retrieve_GetCommandSchema: Utf8String;
+var __response:TStream;
+begin
+  __response := __RetrieveAsyncResponse('GetCommandSchema');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Result', TypeInfo(Utf8String), Result, []);
+
+  __response.Free();
+end;
+
+procedure TDataAbstractService_AsyncProxy.Invoke_SQLGetData(const aSQLText: Utf8String; const aIncludeSchema: Boolean; const aMaxRecords: Integer);
+begin
+  __AssertProxyNotBusy('SQLGetData');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'SQLGetData');
+  __Message.Write('aSQLText', TypeInfo(Utf8String), aSQLText, []);
+  __Message.Write('aIncludeSchema', TypeInfo(Boolean), aIncludeSchema, []);
+  __Message.Write('aMaxRecords', TypeInfo(Integer), aMaxRecords, []);
+  __DispatchAsyncRequest('SQLGetData',__Message);
+    __Message.UnsetAttributes(__TransportChannel);
+end;
+
+function TDataAbstractService_AsyncProxy.Retrieve_SQLGetData: Binary;
+var __response:TStream;
+begin
+  result := nil;
+  __response := __RetrieveAsyncResponse('SQLGetData');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Result', TypeInfo(Binary), Result, []);
+
+  __response.Free();
+end;
+
+procedure TDataAbstractService_AsyncProxy.Invoke_SQLGetDataEx(const aSQLText: Utf8String; const aIncludeSchema: Boolean; const aMaxRecords: Integer; const aDynamicWhereXML: Widestring);
+begin
+  __AssertProxyNotBusy('SQLGetDataEx');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'SQLGetDataEx');
+  __Message.Write('aSQLText', TypeInfo(Utf8String), aSQLText, []);
+  __Message.Write('aIncludeSchema', TypeInfo(Boolean), aIncludeSchema, []);
+  __Message.Write('aMaxRecords', TypeInfo(Integer), aMaxRecords, []);
+  __Message.Write('aDynamicWhereXML', TypeInfo(Widestring), aDynamicWhereXML, []);
+  __DispatchAsyncRequest('SQLGetDataEx',__Message);
+    __Message.UnsetAttributes(__TransportChannel);
+end;
+
+function TDataAbstractService_AsyncProxy.Retrieve_SQLGetDataEx: Binary;
+var __response:TStream;
+begin
+  result := nil;
+  __response := __RetrieveAsyncResponse('SQLGetDataEx');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Result', TypeInfo(Binary), Result, []);
+
+  __response.Free();
+end;
+
+procedure TDataAbstractService_AsyncProxy.Invoke_SQLExecuteCommand(const aSQLText: Utf8String);
+begin
+  __AssertProxyNotBusy('SQLExecuteCommand');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'SQLExecuteCommand');
+  __Message.Write('aSQLText', TypeInfo(Utf8String), aSQLText, []);
+  __DispatchAsyncRequest('SQLExecuteCommand',__Message);
+    __Message.UnsetAttributes(__TransportChannel);
+end;
+
+function TDataAbstractService_AsyncProxy.Retrieve_SQLExecuteCommand: Integer;
+var __response:TStream;
+begin
+  __response := __RetrieveAsyncResponse('SQLExecuteCommand');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Result', TypeInfo(Integer), Result, []);
+
+  __response.Free();
+end;
+
+procedure TDataAbstractService_AsyncProxy.Invoke_SQLExecuteCommandEx(const aSQLText: Utf8String; const aDynamicWhereXML: Widestring);
+begin
+  __AssertProxyNotBusy('SQLExecuteCommandEx');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'SQLExecuteCommandEx');
+  __Message.Write('aSQLText', TypeInfo(Utf8String), aSQLText, []);
+  __Message.Write('aDynamicWhereXML', TypeInfo(Widestring), aDynamicWhereXML, []);
+  __DispatchAsyncRequest('SQLExecuteCommandEx',__Message);
+    __Message.UnsetAttributes(__TransportChannel);
+end;
+
+function TDataAbstractService_AsyncProxy.Retrieve_SQLExecuteCommandEx: Integer;
+var __response:TStream;
+begin
+  __response := __RetrieveAsyncResponse('SQLExecuteCommandEx');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Result', TypeInfo(Integer), Result, []);
+
+  __response.Free();
+end;
+
+procedure TDataAbstractService_AsyncProxy.Invoke_GetDatasetScripts(const DatasetNames: Utf8String);
+begin
+  __AssertProxyNotBusy('GetDatasetScripts');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'GetDatasetScripts');
+  __Message.Write('DatasetNames', TypeInfo(Utf8String), DatasetNames, []);
+  __DispatchAsyncRequest('GetDatasetScripts',__Message);
+    __Message.UnsetAttributes(__TransportChannel);
+end;
+
+function TDataAbstractService_AsyncProxy.Retrieve_GetDatasetScripts: Utf8String;
+var __response:TStream;
+begin
+  __response := __RetrieveAsyncResponse('GetDatasetScripts');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Result', TypeInfo(Utf8String), Result, []);
+
+  __response.Free();
+end;
+
+procedure TDataAbstractService_AsyncProxy.Invoke_RegisterForDataChangeNotification(const aTableName: Utf8String);
+begin
+  __AssertProxyNotBusy('RegisterForDataChangeNotification');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'RegisterForDataChangeNotification');
+  __Message.Write('aTableName', TypeInfo(Utf8String), aTableName, []);
+  __DispatchAsyncRequest('RegisterForDataChangeNotification',__Message, false);
+    __Message.UnsetAttributes(__TransportChannel);
+end;
+
+procedure TDataAbstractService_AsyncProxy.Invoke_UnregisterForDataChangeNotification(const aTableName: Utf8String);
+begin
+  __AssertProxyNotBusy('UnregisterForDataChangeNotification');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'UnregisterForDataChangeNotification');
+  __Message.Write('aTableName', TypeInfo(Utf8String), aTableName, []);
+  __DispatchAsyncRequest('UnregisterForDataChangeNotification',__Message, false);
+    __Message.UnsetAttributes(__TransportChannel);
+end;
+
+
+{ CoSimpleLoginService }
+
+class function CoSimpleLoginService_Async.Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): ISimpleLoginService_Async;
+begin
+  result := TSimpleLoginService_AsyncProxy.Create(aMessage, aTransportChannel);
+end;
+
+{ TSimpleLoginService_AsyncProxy }
+
+function TSimpleLoginService_AsyncProxy.__GetInterfaceName:string;
+begin
+  result := 'SimpleLoginService';
+end;
+
+procedure TSimpleLoginService_AsyncProxy.Invoke_Login(const aUserID: Utf8String; const aPassword: Utf8String);
+begin
+  __AssertProxyNotBusy('Login');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'Login');
+  __Message.Write('aUserID', TypeInfo(Utf8String), aUserID, []);
+  __Message.Write('aPassword', TypeInfo(Utf8String), aPassword, []);
+  __DispatchAsyncRequest('Login',__Message);
+    __Message.UnsetAttributes(__TransportChannel);
+end;
+
+function TSimpleLoginService_AsyncProxy.Retrieve_Login(out aUserInfo: UserInfo): Boolean;
+var __response:TStream;
+begin
+  aUserInfo := nil;
+  __response := __RetrieveAsyncResponse('Login');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Result', TypeInfo(Boolean), Result, []);
+  __Message.Read('aUserInfo', TypeInfo(UserInfo), aUserInfo, []);
+
+  __response.Free();
+end;
+
+
+{ CoBaseLoginService }
+
+class function CoBaseLoginService_Async.Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): IBaseLoginService_Async;
+begin
+  result := TBaseLoginService_AsyncProxy.Create(aMessage, aTransportChannel);
+end;
+
+{ TBaseLoginService_AsyncProxy }
+
+function TBaseLoginService_AsyncProxy.__GetInterfaceName:string;
+begin
+  result := 'BaseLoginService';
+end;
+
+procedure TBaseLoginService_AsyncProxy.Invoke_Logout;
+begin
+  __AssertProxyNotBusy('Logout');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'Logout');
+  __DispatchAsyncRequest('Logout',__Message, false);
+end;
+
+
+{ CoMultiDbLoginService }
+
+class function CoMultiDbLoginService_Async.Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): IMultiDbLoginService_Async;
+begin
+  result := TMultiDbLoginService_AsyncProxy.Create(aMessage, aTransportChannel);
+end;
+
+{ TMultiDbLoginService_AsyncProxy }
+
+function TMultiDbLoginService_AsyncProxy.__GetInterfaceName:string;
+begin
+  result := 'MultiDbLoginService';
+end;
+
+procedure TMultiDbLoginService_AsyncProxy.Invoke_Login(const aUserID: Utf8String; const aPassword: Utf8String; const aConnectionName: Utf8String);
+begin
+  __AssertProxyNotBusy('Login');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'Login');
+  __Message.Write('aUserID', TypeInfo(Utf8String), aUserID, []);
+  __Message.Write('aPassword', TypeInfo(Utf8String), aPassword, []);
+  __Message.Write('aConnectionName', TypeInfo(Utf8String), aConnectionName, []);
+  __DispatchAsyncRequest('Login',__Message);
+    __Message.UnsetAttributes(__TransportChannel);
+end;
+
+function TMultiDbLoginService_AsyncProxy.Retrieve_Login(out aUserInfo: UserInfo): Boolean;
+var __response:TStream;
+begin
+  aUserInfo := nil;
+  __response := __RetrieveAsyncResponse('Login');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Result', TypeInfo(Boolean), Result, []);
+  __Message.Read('aUserInfo', TypeInfo(UserInfo), aUserInfo, []);
+
+  __response.Free();
+end;
+
+
+{ CoMultiDbLoginServiceV5 }
+
+class function CoMultiDbLoginServiceV5_Async.Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): IMultiDbLoginServiceV5_Async;
+begin
+  result := TMultiDbLoginServiceV5_AsyncProxy.Create(aMessage, aTransportChannel);
+end;
+
+{ TMultiDbLoginServiceV5_AsyncProxy }
+
+function TMultiDbLoginServiceV5_AsyncProxy.__GetInterfaceName:string;
+begin
+  result := 'MultiDbLoginServiceV5';
+end;
+
+procedure TMultiDbLoginServiceV5_AsyncProxy.Invoke_GetConnectionNames;
+begin
+  __AssertProxyNotBusy('GetConnectionNames');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'GetConnectionNames');
+  __DispatchAsyncRequest('GetConnectionNames',__Message);
+end;
+
+function TMultiDbLoginServiceV5_AsyncProxy.Retrieve_GetConnectionNames: StringArray;
+var __response:TStream;
+begin
+  result := nil;
+  __response := __RetrieveAsyncResponse('GetConnectionNames');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Result', TypeInfo(StringArray), Result, []);
+
+  __response.Free();
+end;
+
+procedure TMultiDbLoginServiceV5_AsyncProxy.Invoke_GetDefaultConnectionName;
+begin
+  __AssertProxyNotBusy('GetDefaultConnectionName');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'GetDefaultConnectionName');
+  __DispatchAsyncRequest('GetDefaultConnectionName',__Message);
+end;
+
+function TMultiDbLoginServiceV5_AsyncProxy.Retrieve_GetDefaultConnectionName: Utf8String;
+var __response:TStream;
+begin
+  __response := __RetrieveAsyncResponse('GetDefaultConnectionName');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Result', TypeInfo(Utf8String), Result, []);
+
+  __response.Free();
+end;
+
+
+initialization
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract4_Intf.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract4_Intf.pas
new file mode 100644
index 0000000..53131e6
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract4_Intf.pas	
@@ -0,0 +1,2496 @@
+unit DataAbstract4_Intf;
+
+{----------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project .                               }
+{                                                                            }
+{ Do not modify this unit manually, or your changes will be lost when this   }
+{ unit is regenerated the next time you compile the project.                 }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  {vcl:} Classes, TypInfo,
+  {RemObjects:} uROXMLIntf, uROClasses, uROClient, uROTypes, uROClientIntf;
+
+const
+  { Library ID }
+  LibraryUID = '{DC8B7BE2-14AF-402D-B1F8-E1008B6FA4F6}';
+  TargetNamespace = '';
+
+  { Service Interface ID's }
+  IDataAbstractService_IID : TGUID = '{4C2EC238-4FB4-434E-8CFF-ED25EEFF1525}';
+  ISimpleLoginService_IID : TGUID = '{B186853B-168B-4E33-B798-467444BFC8C6}';
+  IBaseLoginService_IID : TGUID = '{C349DB54-9DFB-454E-AD23-6F2166A624A6}';
+  IMultiDbLoginService_IID : TGUID = '{2C6D5764-01CE-447A-8264-27210B2C7371}';
+  IMultiDbLoginServiceV5_IID : TGUID = '{5A78AB01-2097-4473-A4D5-78980FFD90E4}';
+
+  { Event ID's }
+  EID_DataChangeNotification = 'DataChangeNotification';
+
+type
+  { Forward declarations }
+  IDataAbstractService = interface;
+  ISimpleLoginService = interface;
+  IBaseLoginService = interface;
+  IMultiDbLoginService = interface;
+  IMultiDbLoginServiceV5 = interface;
+
+  DataParameterArray = class;
+  TableRequestInfoArray = class;
+  StringArray = class;
+  VariantArray = class;
+  ColumnSortingArray = class;
+
+  DataParameter = class;
+  TableRequestInfo = class;
+  UserInfo = class;
+  TableRequestInfoV5 = class;
+  ColumnSorting = class;
+  TableRequestInfoV6 = class;
+
+  IDataChangeNotification = interface;
+
+
+  { Enumerateds }
+  ColumnSortDirection = (ColumnSortDirection_Ascending,ColumnSortDirection_Descending);
+
+  { DataParameter }
+  DataParameter = class(TROComplexType)
+  private
+    fName: Utf8String;
+    fValue: Variant;
+  public
+    procedure Assign(iSource: TPersistent); override;
+    procedure ReadComplex(ASerializer: TObject); override;
+    procedure WriteComplex(ASerializer: TObject); override;
+  published
+    property Name:Utf8String read fName write fName;
+    property Value:Variant read fValue write fValue;
+  end;
+
+  { DataParameterCollection }
+  DataParameterCollection = class(TROCollection)
+  protected
+    constructor Create(aItemClass: TCollectionItemClass); overload;
+    function GetItems(aIndex: integer): DataParameter;
+    procedure SetItems(aIndex: integer; const Value: DataParameter);
+  public
+    constructor Create; overload;
+    function Add: DataParameter; reintroduce;
+    procedure SaveToArray(anArray: DataParameterArray);
+    procedure LoadFromArray(anArray: DataParameterArray);
+    property Items[Index: integer]:DataParameter read GetItems write SetItems; default;
+  end;
+
+  { TableRequestInfo }
+  TableRequestInfo = class(TROComplexType)
+  private
+    fUserFilter: Utf8String;
+    fIncludeSchema: Boolean;
+    fMaxRecords: Integer;
+    fParameters: DataParameterArray;
+    function GetParameters: DataParameterArray;
+  public
+    constructor Create(aCollection : TCollection); override;
+    procedure Assign(iSource: TPersistent); override;
+    procedure ReadComplex(ASerializer: TObject); override;
+    procedure WriteComplex(ASerializer: TObject); override;
+  published
+    property UserFilter:Utf8String read fUserFilter write fUserFilter;
+    property IncludeSchema:Boolean read fIncludeSchema write fIncludeSchema;
+    property MaxRecords:Integer read fMaxRecords write fMaxRecords;
+    property Parameters:DataParameterArray read GetParameters write fParameters;
+  end;
+
+  { TableRequestInfoCollection }
+  TableRequestInfoCollection = class(TROCollection)
+  protected
+    constructor Create(aItemClass: TCollectionItemClass); overload;
+    function GetItems(aIndex: integer): TableRequestInfo;
+    procedure SetItems(aIndex: integer; const Value: TableRequestInfo);
+  public
+    constructor Create; overload;
+    function Add: TableRequestInfo; reintroduce;
+    procedure SaveToArray(anArray: TableRequestInfoArray);
+    procedure LoadFromArray(anArray: TableRequestInfoArray);
+    property Items[Index: integer]:TableRequestInfo read GetItems write SetItems; default;
+  end;
+
+  { TableRequestInfoV6 }
+  TableRequestInfoV6 = class(TableRequestInfo)
+  private
+    fSql: Widestring;
+  public
+    procedure Assign(iSource: TPersistent); override;
+    procedure ReadComplex(ASerializer: TObject); override;
+    procedure WriteComplex(ASerializer: TObject); override;
+  published
+    property Sql:Widestring read fSql write fSql;
+  end;
+
+  { TableRequestInfoV6Collection }
+  TableRequestInfoV6Collection = class(TableRequestInfoCollection)
+  protected
+    constructor Create(aItemClass: TCollectionItemClass); overload;
+    function GetItems(aIndex: integer): TableRequestInfoV6;
+    procedure SetItems(aIndex: integer; const Value: TableRequestInfoV6);
+  public
+    constructor Create; overload;
+    function Add: TableRequestInfoV6; reintroduce;
+    property Items[Index: integer]:TableRequestInfoV6 read GetItems write SetItems; default;
+  end;
+
+  { TableRequestInfoV5 }
+  TableRequestInfoV5 = class(TableRequestInfo)
+  private
+    fWhereClause: IXmlNode;
+    fDynamicSelectFieldNames: StringArray;
+    fSorting: ColumnSorting;
+    function GetDynamicSelectFieldNames: StringArray;
+    function GetSorting: ColumnSorting;
+  public
+    procedure Assign(iSource: TPersistent); override;
+    procedure ReadComplex(ASerializer: TObject); override;
+    procedure WriteComplex(ASerializer: TObject); override;
+  published
+    property WhereClause:IXmlNode read fWhereClause write fWhereClause;
+    property DynamicSelectFieldNames:StringArray read GetDynamicSelectFieldNames write fDynamicSelectFieldNames;
+    property Sorting:ColumnSorting read GetSorting write fSorting;
+  end;
+
+  { TableRequestInfoV5Collection }
+  TableRequestInfoV5Collection = class(TableRequestInfoCollection)
+  protected
+    constructor Create(aItemClass: TCollectionItemClass); overload;
+    function GetItems(aIndex: integer): TableRequestInfoV5;
+    procedure SetItems(aIndex: integer; const Value: TableRequestInfoV5);
+  public
+    constructor Create; overload;
+    function Add: TableRequestInfoV5; reintroduce;
+    property Items[Index: integer]:TableRequestInfoV5 read GetItems write SetItems; default;
+  end;
+
+  { UserInfo }
+  UserInfo = class(TROComplexType)
+  private
+    fSessionID: Utf8String;
+    fUserID: Utf8String;
+    fPrivileges: StringArray;
+    fAttributes: VariantArray;
+    fUserData: Binary;
+    function GetPrivileges: StringArray;
+    function GetAttributes: VariantArray;
+    function GetUserData: Binary;
+  public
+    procedure Assign(iSource: TPersistent); override;
+    procedure ReadComplex(ASerializer: TObject); override;
+    procedure WriteComplex(ASerializer: TObject); override;
+  published
+    property SessionID:Utf8String read fSessionID write fSessionID;
+    property UserID:Utf8String read fUserID write fUserID;
+    property Privileges:StringArray read GetPrivileges write fPrivileges;
+    property Attributes:VariantArray read GetAttributes write fAttributes;
+    property UserData:Binary read GetUserData write fUserData;
+  end;
+
+  { UserInfoCollection }
+  UserInfoCollection = class(TROCollection)
+  protected
+    constructor Create(aItemClass: TCollectionItemClass); overload;
+    function GetItems(aIndex: integer): UserInfo;
+    procedure SetItems(aIndex: integer; const Value: UserInfo);
+  public
+    constructor Create; overload;
+    function Add: UserInfo; reintroduce;
+    property Items[Index: integer]:UserInfo read GetItems write SetItems; default;
+  end;
+
+  { ColumnSorting }
+  ColumnSorting = class(TROComplexType)
+  private
+    fFieldName: Utf8String;
+    fSortDirection: ColumnSortDirection;
+  public
+    procedure Assign(iSource: TPersistent); override;
+    procedure ReadComplex(ASerializer: TObject); override;
+    procedure WriteComplex(ASerializer: TObject); override;
+  published
+    property FieldName:Utf8String read fFieldName write fFieldName;
+    property SortDirection:ColumnSortDirection read fSortDirection write fSortDirection;
+  end;
+
+  { ColumnSortingCollection }
+  ColumnSortingCollection = class(TROCollection)
+  protected
+    constructor Create(aItemClass: TCollectionItemClass); overload;
+    function GetItems(aIndex: integer): ColumnSorting;
+    procedure SetItems(aIndex: integer; const Value: ColumnSorting);
+  public
+    constructor Create; overload;
+    function Add: ColumnSorting; reintroduce;
+    procedure SaveToArray(anArray: ColumnSortingArray);
+    procedure LoadFromArray(anArray: ColumnSortingArray);
+    property Items[Index: integer]:ColumnSorting read GetItems write SetItems; default;
+  end;
+
+  { DataParameterArray }
+  DataParameterArray_DataParameter = array of DataParameter;
+  DataParameterArray = class(TROArray)
+  private
+    fCount: Integer;
+    fItems : DataParameterArray_DataParameter;
+  protected
+    procedure Grow; virtual;
+    function GetItems(aIndex: integer): DataParameter;
+    procedure SetItems(aIndex: integer; const Value: DataParameter);
+    function GetCount: integer; override;
+  public
+    class function GetItemType: PTypeInfo; override;
+    class function GetItemClass: TClass; override;
+    class function GetItemSize: integer; override;
+
+    function GetItemRef(aIndex: integer): pointer; override;
+    procedure SetItemRef(aIndex: integer; Ref: pointer); override;
+    procedure Clear; override;
+    procedure Delete(aIndex: integer); override;
+    procedure Resize(ElementCount: integer); override;
+
+    procedure Assign(iSource:TPersistent); override;
+    procedure ReadComplex(ASerializer: TObject); override;
+    procedure WriteComplex(ASerializer: TObject); override;
+    function Add: DataParameter; overload;
+    function Add(const Value: DataParameter):integer; overload;
+
+    property Count : integer read GetCount;
+    property Items[Index: integer]:DataParameter read GetItems write SetItems; default;
+    property InnerArray: DataParameterArray_DataParameter read fItems;
+  end;
+
+  { TableRequestInfoArray }
+  TableRequestInfoArray_TableRequestInfo = array of TableRequestInfo;
+  TableRequestInfoArray = class(TROArray)
+  private
+    fCount: Integer;
+    fItems : TableRequestInfoArray_TableRequestInfo;
+  protected
+    procedure Grow; virtual;
+    function GetItems(aIndex: integer): TableRequestInfo;
+    procedure SetItems(aIndex: integer; const Value: TableRequestInfo);
+    function GetCount: integer; override;
+  public
+    class function GetItemType: PTypeInfo; override;
+    class function GetItemClass: TClass; override;
+    class function GetItemSize: integer; override;
+
+    function GetItemRef(aIndex: integer): pointer; override;
+    procedure SetItemRef(aIndex: integer; Ref: pointer); override;
+    procedure Clear; override;
+    procedure Delete(aIndex: integer); override;
+    procedure Resize(ElementCount: integer); override;
+
+    procedure Assign(iSource:TPersistent); override;
+    procedure ReadComplex(ASerializer: TObject); override;
+    procedure WriteComplex(ASerializer: TObject); override;
+    function Add: TableRequestInfo; overload;
+    function Add(const Value: TableRequestInfo):integer; overload;
+
+    property Count : integer read GetCount;
+    property Items[Index: integer]:TableRequestInfo read GetItems write SetItems; default;
+    property InnerArray: TableRequestInfoArray_TableRequestInfo read fItems;
+  end;
+
+  { StringArray }
+  StringArray_Utf8String = array of Utf8String;
+  StringArray = class(TROArray)
+  private
+    fCount: Integer;
+    fItems : StringArray_Utf8String;
+  protected
+    procedure Grow; virtual;
+    function GetItems(aIndex: integer): Utf8String;
+    procedure SetItems(aIndex: integer; const Value: Utf8String);
+    function GetCount: integer; override;
+  public
+    class function GetItemType: PTypeInfo; override;
+    class function GetItemSize: integer; override;
+
+    function GetItemRef(aIndex: integer): pointer; override;
+    procedure Clear; override;
+    procedure Delete(aIndex: integer); override;
+    procedure Resize(ElementCount: integer); override;
+
+    procedure Assign(iSource:TPersistent); override;
+    procedure ReadComplex(ASerializer: TObject); override;
+    procedure WriteComplex(ASerializer: TObject); override;
+    function Add(const Value:Utf8String): integer;
+    function GetIndex(const aPropertyName : string;
+                      const aPropertyValue : Variant;
+                      StartFrom : integer = 0;
+                      Options : TROSearchOptions = [soIgnoreCase]) : integer; override;
+
+    property Count : integer read GetCount;
+    property Items[Index: integer]:Utf8String read GetItems write SetItems; default;
+    property InnerArray: StringArray_Utf8String read fItems;
+  end;
+
+  { VariantArray }
+  VariantArray_Variant = array of Variant;
+  VariantArray = class(TROArray)
+  private
+    fCount: Integer;
+    fItems : VariantArray_Variant;
+  protected
+    procedure Grow; virtual;
+    function GetItems(aIndex: integer): Variant;
+    procedure SetItems(aIndex: integer; const Value: Variant);
+    function GetCount: integer; override;
+  public
+    class function GetItemType: PTypeInfo; override;
+    class function GetItemSize: integer; override;
+
+    function GetItemRef(aIndex: integer): pointer; override;
+    procedure Clear; override;
+    procedure Delete(aIndex: integer); override;
+    procedure Resize(ElementCount: integer); override;
+
+    procedure Assign(iSource:TPersistent); override;
+    procedure ReadComplex(ASerializer: TObject); override;
+    procedure WriteComplex(ASerializer: TObject); override;
+    function Add(const Value:Variant): integer;
+    function GetIndex(const aPropertyName : string;
+                      const aPropertyValue : Variant;
+                      StartFrom : integer = 0;
+                      Options : TROSearchOptions = [soIgnoreCase]) : integer; override;
+
+    property Count : integer read GetCount;
+    property Items[Index: integer]:Variant read GetItems write SetItems; default;
+    property InnerArray: VariantArray_Variant read fItems;
+  end;
+
+  { ColumnSortingArray }
+  ColumnSortingArray_ColumnSorting = array of ColumnSorting;
+  ColumnSortingArray = class(TROArray)
+  private
+    fCount: Integer;
+    fItems : ColumnSortingArray_ColumnSorting;
+  protected
+    procedure Grow; virtual;
+    function GetItems(aIndex: integer): ColumnSorting;
+    procedure SetItems(aIndex: integer; const Value: ColumnSorting);
+    function GetCount: integer; override;
+  public
+    class function GetItemType: PTypeInfo; override;
+    class function GetItemClass: TClass; override;
+    class function GetItemSize: integer; override;
+
+    function GetItemRef(aIndex: integer): pointer; override;
+    procedure SetItemRef(aIndex: integer; Ref: pointer); override;
+    procedure Clear; override;
+    procedure Delete(aIndex: integer); override;
+    procedure Resize(ElementCount: integer); override;
+
+    procedure Assign(iSource:TPersistent); override;
+    procedure ReadComplex(ASerializer: TObject); override;
+    procedure WriteComplex(ASerializer: TObject); override;
+    function Add: ColumnSorting; overload;
+    function Add(const Value: ColumnSorting):integer; overload;
+
+    property Count : integer read GetCount;
+    property Items[Index: integer]:ColumnSorting read GetItems write SetItems; default;
+    property InnerArray: ColumnSortingArray_ColumnSorting read fItems;
+  end;
+
+  { IDataAbstractService }
+  IDataAbstractService = interface
+    ['{4C2EC238-4FB4-434E-8CFF-ED25EEFF1525}']
+    function GetSchema(const aFilter: Utf8String): Utf8String;
+    function GetData(const aTableNameArray: StringArray; const aTableRequestInfoArray: TableRequestInfoArray): Binary;
+    function UpdateData(const aDelta: Binary): Binary;
+    function ExecuteCommand(const aCommandName: Utf8String; const aParameterArray: DataParameterArray): Integer;
+    function ExecuteCommandEx(const aCommandName: Utf8String; const aInputParameters: DataParameterArray; out aOutputParameters: DataParameterArray): Integer;
+    function GetTableSchema(const aTableNameArray: StringArray): Utf8String;
+    function GetCommandSchema(const aCommandNameArray: StringArray): Utf8String;
+    function SQLGetData(const aSQLText: Utf8String; const aIncludeSchema: Boolean; const aMaxRecords: Integer): Binary;
+    function SQLGetDataEx(const aSQLText: Utf8String; const aIncludeSchema: Boolean; const aMaxRecords: Integer; const aDynamicWhereXML: Widestring): Binary;
+    function SQLExecuteCommand(const aSQLText: Utf8String): Integer;
+    function SQLExecuteCommandEx(const aSQLText: Utf8String; const aDynamicWhereXML: Widestring): Integer;
+    function GetDatasetScripts(const DatasetNames: Utf8String): Utf8String;
+    procedure RegisterForDataChangeNotification(const aTableName: Utf8String);
+    procedure UnregisterForDataChangeNotification(const aTableName: Utf8String);
+  end;
+
+  { CoDataAbstractService }
+  CoDataAbstractService = class
+    class function Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): IDataAbstractService;
+  end;
+
+  { TDataAbstractService_Proxy }
+  TDataAbstractService_Proxy = class(TROProxy, IDataAbstractService)
+  protected
+    function __GetInterfaceName:string; override;
+
+    function GetSchema(const aFilter: Utf8String): Utf8String;
+    function GetData(const aTableNameArray: StringArray; const aTableRequestInfoArray: TableRequestInfoArray): Binary;
+    function UpdateData(const aDelta: Binary): Binary;
+    function ExecuteCommand(const aCommandName: Utf8String; const aParameterArray: DataParameterArray): Integer;
+    function ExecuteCommandEx(const aCommandName: Utf8String; const aInputParameters: DataParameterArray; out aOutputParameters: DataParameterArray): Integer;
+    function GetTableSchema(const aTableNameArray: StringArray): Utf8String;
+    function GetCommandSchema(const aCommandNameArray: StringArray): Utf8String;
+    function SQLGetData(const aSQLText: Utf8String; const aIncludeSchema: Boolean; const aMaxRecords: Integer): Binary;
+    function SQLGetDataEx(const aSQLText: Utf8String; const aIncludeSchema: Boolean; const aMaxRecords: Integer; const aDynamicWhereXML: Widestring): Binary;
+    function SQLExecuteCommand(const aSQLText: Utf8String): Integer;
+    function SQLExecuteCommandEx(const aSQLText: Utf8String; const aDynamicWhereXML: Widestring): Integer;
+    function GetDatasetScripts(const DatasetNames: Utf8String): Utf8String;
+    procedure RegisterForDataChangeNotification(const aTableName: Utf8String);
+    procedure UnregisterForDataChangeNotification(const aTableName: Utf8String);
+  end;
+
+  { IBaseLoginService }
+  IBaseLoginService = interface
+    ['{C349DB54-9DFB-454E-AD23-6F2166A624A6}']
+    procedure Logout;
+  end;
+
+  { CoBaseLoginService }
+  CoBaseLoginService = class
+    class function Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): IBaseLoginService;
+  end;
+
+  { TBaseLoginService_Proxy }
+  TBaseLoginService_Proxy = class(TROProxy, IBaseLoginService)
+  protected
+    function __GetInterfaceName:string; override;
+
+    procedure Logout;
+  end;
+
+  { IMultiDbLoginService }
+  IMultiDbLoginService = interface(IBaseLoginService)
+    ['{2C6D5764-01CE-447A-8264-27210B2C7371}']
+    function Login(const aUserID: Utf8String; const aPassword: Utf8String; const aConnectionName: Utf8String; out aUserInfo: UserInfo): Boolean;
+  end;
+
+  { CoMultiDbLoginService }
+  CoMultiDbLoginService = class
+    class function Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): IMultiDbLoginService;
+  end;
+
+  { TMultiDbLoginService_Proxy }
+  TMultiDbLoginService_Proxy = class(TBaseLoginService_Proxy, IMultiDbLoginService)
+  protected
+    function __GetInterfaceName:string; override;
+
+    function Login(const aUserID: Utf8String; const aPassword: Utf8String; const aConnectionName: Utf8String; out aUserInfo: UserInfo): Boolean;
+  end;
+
+  { IMultiDbLoginServiceV5 }
+  IMultiDbLoginServiceV5 = interface(IMultiDbLoginService)
+    ['{5A78AB01-2097-4473-A4D5-78980FFD90E4}']
+    function GetConnectionNames: StringArray;
+    function GetDefaultConnectionName: Utf8String;
+  end;
+
+  { CoMultiDbLoginServiceV5 }
+  CoMultiDbLoginServiceV5 = class
+    class function Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): IMultiDbLoginServiceV5;
+  end;
+
+  { TMultiDbLoginServiceV5_Proxy }
+  TMultiDbLoginServiceV5_Proxy = class(TMultiDbLoginService_Proxy, IMultiDbLoginServiceV5)
+  protected
+    function __GetInterfaceName:string; override;
+
+    function GetConnectionNames: StringArray;
+    function GetDefaultConnectionName: Utf8String;
+  end;
+
+  { ISimpleLoginService }
+  ISimpleLoginService = interface(IBaseLoginService)
+    ['{B186853B-168B-4E33-B798-467444BFC8C6}']
+    function Login(const aUserID: Utf8String; const aPassword: Utf8String; out aUserInfo: UserInfo): Boolean;
+  end;
+
+  { CoSimpleLoginService }
+  CoSimpleLoginService = class
+    class function Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): ISimpleLoginService;
+  end;
+
+  { TSimpleLoginService_Proxy }
+  TSimpleLoginService_Proxy = class(TBaseLoginService_Proxy, ISimpleLoginService)
+  protected
+    function __GetInterfaceName:string; override;
+
+    function Login(const aUserID: Utf8String; const aPassword: Utf8String; out aUserInfo: UserInfo): Boolean;
+  end;
+
+  { IDataChangeNotification }
+  IDataChangeNotification = interface
+    ['{1309480C-AEF8-48E0-A27F-E6090F441B46}']
+    procedure OnDataTableChanged(const aTableName: Utf8String; const aDelta: Binary);
+  end;
+
+  { IDataChangeNotification_Writer }
+  IDataChangeNotification_Writer = interface(IROEventWriter)
+    ['{1309480C-AEF8-48E0-A27F-E6090F441B46}']
+    procedure OnDataTableChanged(const __Sender : TGUID; const aTableName: Utf8String; const aDelta: Binary);
+  end;
+
+implementation
+
+uses
+  {vcl:} SysUtils,
+  {RemObjects:} uROEventRepository, uROSerializer, uRORes;
+
+{ DataParameterArray }
+
+procedure DataParameterArray.Assign(iSource: TPersistent);
+var lSource:DataParameterArray;
+    i:integer;
+begin
+  if (iSource is DataParameterArray) then begin
+    lSource := DataParameterArray(iSource);
+    Clear();
+    Resize(lSource.Count);
+
+    for i := 0 to Count-1 do begin
+      if Assigned(lSource.Items[i]) then begin
+        Items[i].Assign(lSource.Items[i]);
+      end;
+    end;
+  end
+  else begin
+    inherited Assign(iSource);
+  end;
+end;
+
+class function DataParameterArray.GetItemType: PTypeInfo;
+begin
+  result := TypeInfo(DataParameter);
+end;
+
+class function DataParameterArray.GetItemClass: TClass;
+begin
+  result := DataParameter;
+end;
+
+class function DataParameterArray.GetItemSize: integer;
+begin
+  result := SizeOf(DataParameter);
+end;
+
+function DataParameterArray.GetItems(aIndex: integer): DataParameter;
+begin
+  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);
+  result := fItems[aIndex];
+end;
+
+function DataParameterArray.GetItemRef(aIndex: integer): pointer;
+begin
+  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);
+  result := fItems[aIndex];
+end;
+
+procedure DataParameterArray.SetItemRef(aIndex: integer; Ref: pointer);
+begin
+  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);
+  if Ref <> fItems[aIndex] then begin
+    if fItems[aIndex] <> nil then fItems[aIndex].Free;
+    fItems[aIndex] := Ref;
+  end;
+end;
+
+procedure DataParameterArray.Clear;
+var i: integer;
+begin
+  for i := 0 to (Count-1) do fItems[i].Free();
+  SetLength(fItems, 0);
+  FCount := 0;
+end;
+
+procedure DataParameterArray.Delete(aIndex: integer);
+var i: integer;
+begin
+  if (aIndex>=Count) then RaiseError(err_InvalidIndex, [aIndex]);
+
+  fItems[aIndex].Free();
+
+  if (aIndex<Count-1) then
+    for i := aIndex to Count-2 do fItems[i] := fItems[i+1];
+
+  SetLength(fItems, Count-1);
+  Dec(FCount);
+end;
+
+procedure DataParameterArray.SetItems(aIndex: integer; const Value: DataParameter);
+begin
+  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);
+  if fItems[aIndex] <> Value then begin
+    fItems[aIndex].Free;
+    fItems[aIndex] := Value;
+  end;
+end;
+
+procedure DataParameterArray.Resize(ElementCount: integer);
+var i: Integer;
+begin
+  if fCount = ElementCount then Exit;
+  for i := FCount -1 downto ElementCount do
+    FItems[i].Free;
+  SetLength(fItems, ElementCount);
+  for i := FCount to ElementCount -1 do
+    FItems[i] := DataParameter.Create;
+  FCount := ElementCount;
+end;
+
+function DataParameterArray.GetCount: integer;
+begin
+  result := FCount;
+end;
+
+procedure DataParameterArray.Grow;
+var
+  Delta, Capacity: Integer;
+begin
+  Capacity := Length(fItems);
+  if Capacity > 64 then
+    Delta := Capacity div 4
+  else
+    if Capacity > 8 then
+      Delta := 16
+   else
+      Delta := 4;
+  SetLength(fItems, Capacity + Delta);
+end;
+
+function DataParameterArray.Add: DataParameter;
+begin
+  result := DataParameter.Create;
+  Add(Result);
+end;
+
+function DataParameterArray.Add(const Value:DataParameter): integer;
+begin
+  Result := Count;
+  if Length(fItems) = Result then
+    Grow;
+  fItems[result] := Value;
+  Inc(fCount);
+end;
+
+procedure DataParameterArray.ReadComplex(ASerializer: TObject);
+var
+  lval: DataParameter;
+  i: integer;
+begin
+  for i := 0 to Count-1 do begin
+    with TROSerializer(ASerializer) do
+      ReadStruct(GetArrayElementName(GetItemType, GetItemRef(i)), DataParameter, lval, i);
+    Items[i] := lval;
+  end;
+end;
+
+procedure DataParameterArray.WriteComplex(ASerializer: TObject);
+var
+  i: integer;
+begin
+  for i := 0 to Count-1 do
+    with TROSerializer(ASerializer) do
+      WriteStruct(GetArrayElementName(GetItemType, GetItemRef(i)), fItems[i], DataParameter, i);
+end;
+
+{ TableRequestInfoArray }
+
+procedure TableRequestInfoArray.Assign(iSource: TPersistent);
+var lSource:TableRequestInfoArray;
+    i:integer;
+begin
+  if (iSource is TableRequestInfoArray) then begin
+    lSource := TableRequestInfoArray(iSource);
+    Clear();
+    Resize(lSource.Count);
+
+    for i := 0 to Count-1 do begin
+      if Assigned(lSource.Items[i]) then begin
+        Items[i].Assign(lSource.Items[i]);
+      end;
+    end;
+  end
+  else begin
+    inherited Assign(iSource);
+  end;
+end;
+
+class function TableRequestInfoArray.GetItemType: PTypeInfo;
+begin
+  result := TypeInfo(TableRequestInfo);
+end;
+
+class function TableRequestInfoArray.GetItemClass: TClass;
+begin
+  result := TableRequestInfo;
+end;
+
+class function TableRequestInfoArray.GetItemSize: integer;
+begin
+  result := SizeOf(TableRequestInfo);
+end;
+
+function TableRequestInfoArray.GetItems(aIndex: integer): TableRequestInfo;
+begin
+  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);
+  result := fItems[aIndex];
+end;
+
+function TableRequestInfoArray.GetItemRef(aIndex: integer): pointer;
+begin
+  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);
+  result := fItems[aIndex];
+end;
+
+procedure TableRequestInfoArray.SetItemRef(aIndex: integer; Ref: pointer);
+begin
+  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);
+  if Ref <> fItems[aIndex] then begin
+    if fItems[aIndex] <> nil then fItems[aIndex].Free;
+    fItems[aIndex] := Ref;
+  end;
+end;
+
+procedure TableRequestInfoArray.Clear;
+var i: integer;
+begin
+  for i := 0 to (Count-1) do fItems[i].Free();
+  SetLength(fItems, 0);
+  FCount := 0;
+end;
+
+procedure TableRequestInfoArray.Delete(aIndex: integer);
+var i: integer;
+begin
+  if (aIndex>=Count) then RaiseError(err_InvalidIndex, [aIndex]);
+
+  fItems[aIndex].Free();
+
+  if (aIndex<Count-1) then
+    for i := aIndex to Count-2 do fItems[i] := fItems[i+1];
+
+  SetLength(fItems, Count-1);
+  Dec(FCount);
+end;
+
+procedure TableRequestInfoArray.SetItems(aIndex: integer; const Value: TableRequestInfo);
+begin
+  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);
+  if fItems[aIndex] <> Value then begin
+    fItems[aIndex].Free;
+    fItems[aIndex] := Value;
+  end;
+end;
+
+procedure TableRequestInfoArray.Resize(ElementCount: integer);
+var i: Integer;
+begin
+  if fCount = ElementCount then Exit;
+  for i := FCount -1 downto ElementCount do
+    FItems[i].Free;
+  SetLength(fItems, ElementCount);
+  for i := FCount to ElementCount -1 do
+    FItems[i] := TableRequestInfo.Create;
+  FCount := ElementCount;
+end;
+
+function TableRequestInfoArray.GetCount: integer;
+begin
+  result := FCount;
+end;
+
+procedure TableRequestInfoArray.Grow;
+var
+  Delta, Capacity: Integer;
+begin
+  Capacity := Length(fItems);
+  if Capacity > 64 then
+    Delta := Capacity div 4
+  else
+    if Capacity > 8 then
+      Delta := 16
+   else
+      Delta := 4;
+  SetLength(fItems, Capacity + Delta);
+end;
+
+function TableRequestInfoArray.Add: TableRequestInfo;
+begin
+  result := TableRequestInfo.Create;
+  Add(Result);
+end;
+
+function TableRequestInfoArray.Add(const Value:TableRequestInfo): integer;
+begin
+  Result := Count;
+  if Length(fItems) = Result then
+    Grow;
+  fItems[result] := Value;
+  Inc(fCount);
+end;
+
+procedure TableRequestInfoArray.ReadComplex(ASerializer: TObject);
+var
+  lval: TableRequestInfo;
+  i: integer;
+begin
+  for i := 0 to Count-1 do begin
+    with TROSerializer(ASerializer) do
+      ReadStruct(GetArrayElementName(GetItemType, GetItemRef(i)), TableRequestInfo, lval, i);
+    Items[i] := lval;
+  end;
+end;
+
+procedure TableRequestInfoArray.WriteComplex(ASerializer: TObject);
+var
+  i: integer;
+begin
+  for i := 0 to Count-1 do
+    with TROSerializer(ASerializer) do
+      WriteStruct(GetArrayElementName(GetItemType, GetItemRef(i)), fItems[i], TableRequestInfo, i);
+end;
+
+{ StringArray }
+
+procedure StringArray.Assign(iSource: TPersistent);
+var lSource:StringArray;
+    i:integer;
+begin
+  if (iSource is StringArray) then begin
+    lSource := StringArray(iSource);
+    Clear();
+    Resize(lSource.Count);
+
+    for i := 0 to Count-1 do begin
+      Items[i] := lSource.Items[i];
+    end;
+  end
+  else begin
+    inherited Assign(iSource);
+  end;
+end;
+
+class function StringArray.GetItemType: PTypeInfo;
+begin
+  result := TypeInfo(Utf8String);
+end;
+
+class function StringArray.GetItemSize: integer;
+begin
+  result := SizeOf(Utf8String);
+end;
+
+function StringArray.GetItems(aIndex: integer): Utf8String;
+begin
+  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);
+  result := fItems[aIndex];
+end;
+
+function StringArray.GetItemRef(aIndex: integer): pointer;
+begin
+  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);
+  result := @fItems[aIndex];
+end;
+
+procedure StringArray.Clear;
+begin
+  SetLength(fItems, 0);
+  FCount := 0;
+end;
+
+procedure StringArray.Delete(aIndex: integer);
+var i: integer;
+begin
+  if (aIndex>=Count) then RaiseError(err_InvalidIndex, [aIndex]);
+
+  if (aIndex<Count-1) then
+    for i := aIndex to Count-2 do fItems[i] := fItems[i+1];
+
+  SetLength(fItems, Count-1);
+  Dec(FCount);
+end;
+
+procedure StringArray.SetItems(aIndex: integer; const Value: Utf8String);
+begin
+  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);
+  fItems[aIndex] := Value;
+end;
+
+procedure StringArray.Resize(ElementCount: integer);
+begin
+  if fCount = ElementCount then Exit;
+  SetLength(fItems, ElementCount);
+  FCount := ElementCount;
+end;
+
+function StringArray.GetCount: integer;
+begin
+  result := FCount;
+end;
+
+procedure StringArray.Grow;
+var
+  Delta, Capacity: Integer;
+begin
+  Capacity := Length(fItems);
+  if Capacity > 64 then
+    Delta := Capacity div 4
+  else
+    if Capacity > 8 then
+      Delta := 16
+   else
+      Delta := 4;
+  SetLength(fItems, Capacity + Delta);
+end;
+
+function StringArray.Add(const Value: Utf8String): integer;
+begin
+  Result := Count;
+  if Length(fItems) = Result then
+    Grow;
+  fItems[result] := Value;
+  Inc(fCount);
+end;
+
+function StringArray.GetIndex(const aPropertyName: string;
+  const aPropertyValue: Variant; StartFrom: integer;
+  Options: TROSearchOptions): integer;
+begin
+  result := -1;
+end;
+
+procedure StringArray.ReadComplex(ASerializer: TObject);
+var
+  lval: Utf8String;
+  i: integer;
+begin
+  for i := 0 to Count-1 do begin
+    with TROSerializer(ASerializer) do
+      ReadUTF8String(GetArrayElementName(GetItemType, GetItemRef(i)), lval, i);
+    Items[i] := lval;
+  end;
+end;
+
+procedure StringArray.WriteComplex(ASerializer: TObject);
+var
+  i: integer;
+begin
+  for i := 0 to Count-1 do
+    with TROSerializer(ASerializer) do
+      WriteUTF8String(GetArrayElementName(GetItemType, GetItemRef(i)), fItems[i], i);
+end;
+
+{ VariantArray }
+
+procedure VariantArray.Assign(iSource: TPersistent);
+var lSource:VariantArray;
+    i:integer;
+begin
+  if (iSource is VariantArray) then begin
+    lSource := VariantArray(iSource);
+    Clear();
+    Resize(lSource.Count);
+
+    for i := 0 to Count-1 do begin
+      Items[i] := lSource.Items[i];
+    end;
+  end
+  else begin
+    inherited Assign(iSource);
+  end;
+end;
+
+class function VariantArray.GetItemType: PTypeInfo;
+begin
+  result := TypeInfo(Variant);
+end;
+
+class function VariantArray.GetItemSize: integer;
+begin
+  result := SizeOf(Variant);
+end;
+
+function VariantArray.GetItems(aIndex: integer): Variant;
+begin
+  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);
+  result := fItems[aIndex];
+end;
+
+function VariantArray.GetItemRef(aIndex: integer): pointer;
+begin
+  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);
+  result := @fItems[aIndex];
+end;
+
+procedure VariantArray.Clear;
+begin
+  SetLength(fItems, 0);
+  FCount := 0;
+end;
+
+procedure VariantArray.Delete(aIndex: integer);
+var i: integer;
+begin
+  if (aIndex>=Count) then RaiseError(err_InvalidIndex, [aIndex]);
+
+  if (aIndex<Count-1) then
+    for i := aIndex to Count-2 do fItems[i] := fItems[i+1];
+
+  SetLength(fItems, Count-1);
+  Dec(FCount);
+end;
+
+procedure VariantArray.SetItems(aIndex: integer; const Value: Variant);
+begin
+  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);
+  fItems[aIndex] := Value;
+end;
+
+procedure VariantArray.Resize(ElementCount: integer);
+begin
+  if fCount = ElementCount then Exit;
+  SetLength(fItems, ElementCount);
+  FCount := ElementCount;
+end;
+
+function VariantArray.GetCount: integer;
+begin
+  result := FCount;
+end;
+
+procedure VariantArray.Grow;
+var
+  Delta, Capacity: Integer;
+begin
+  Capacity := Length(fItems);
+  if Capacity > 64 then
+    Delta := Capacity div 4
+  else
+    if Capacity > 8 then
+      Delta := 16
+   else
+      Delta := 4;
+  SetLength(fItems, Capacity + Delta);
+end;
+
+function VariantArray.Add(const Value: Variant): integer;
+begin
+  Result := Count;
+  if Length(fItems) = Result then
+    Grow;
+  fItems[result] := Value;
+  Inc(fCount);
+end;
+
+function VariantArray.GetIndex(const aPropertyName: string;
+  const aPropertyValue: Variant; StartFrom: integer;
+  Options: TROSearchOptions): integer;
+begin
+  result := -1;
+end;
+
+procedure VariantArray.ReadComplex(ASerializer: TObject);
+var
+  lval: Variant;
+  i: integer;
+begin
+  for i := 0 to Count-1 do begin
+    with TROSerializer(ASerializer) do
+      ReadVariant(GetArrayElementName(GetItemType, GetItemRef(i)), lval, i);
+    Items[i] := lval;
+  end;
+end;
+
+procedure VariantArray.WriteComplex(ASerializer: TObject);
+var
+  i: integer;
+begin
+  for i := 0 to Count-1 do
+    with TROSerializer(ASerializer) do
+      WriteVariant(GetArrayElementName(GetItemType, GetItemRef(i)), fItems[i], i);
+end;
+
+{ ColumnSortingArray }
+
+procedure ColumnSortingArray.Assign(iSource: TPersistent);
+var lSource:ColumnSortingArray;
+    i:integer;
+begin
+  if (iSource is ColumnSortingArray) then begin
+    lSource := ColumnSortingArray(iSource);
+    Clear();
+    Resize(lSource.Count);
+
+    for i := 0 to Count-1 do begin
+      if Assigned(lSource.Items[i]) then begin
+        Items[i].Assign(lSource.Items[i]);
+      end;
+    end;
+  end
+  else begin
+    inherited Assign(iSource);
+  end;
+end;
+
+class function ColumnSortingArray.GetItemType: PTypeInfo;
+begin
+  result := TypeInfo(ColumnSorting);
+end;
+
+class function ColumnSortingArray.GetItemClass: TClass;
+begin
+  result := ColumnSorting;
+end;
+
+class function ColumnSortingArray.GetItemSize: integer;
+begin
+  result := SizeOf(ColumnSorting);
+end;
+
+function ColumnSortingArray.GetItems(aIndex: integer): ColumnSorting;
+begin
+  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);
+  result := fItems[aIndex];
+end;
+
+function ColumnSortingArray.GetItemRef(aIndex: integer): pointer;
+begin
+  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);
+  result := fItems[aIndex];
+end;
+
+procedure ColumnSortingArray.SetItemRef(aIndex: integer; Ref: pointer);
+begin
+  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);
+  if Ref <> fItems[aIndex] then begin
+    if fItems[aIndex] <> nil then fItems[aIndex].Free;
+    fItems[aIndex] := Ref;
+  end;
+end;
+
+procedure ColumnSortingArray.Clear;
+var i: integer;
+begin
+  for i := 0 to (Count-1) do fItems[i].Free();
+  SetLength(fItems, 0);
+  FCount := 0;
+end;
+
+procedure ColumnSortingArray.Delete(aIndex: integer);
+var i: integer;
+begin
+  if (aIndex>=Count) then RaiseError(err_InvalidIndex, [aIndex]);
+
+  fItems[aIndex].Free();
+
+  if (aIndex<Count-1) then
+    for i := aIndex to Count-2 do fItems[i] := fItems[i+1];
+
+  SetLength(fItems, Count-1);
+  Dec(FCount);
+end;
+
+procedure ColumnSortingArray.SetItems(aIndex: integer; const Value: ColumnSorting);
+begin
+  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);
+  if fItems[aIndex] <> Value then begin
+    fItems[aIndex].Free;
+    fItems[aIndex] := Value;
+  end;
+end;
+
+procedure ColumnSortingArray.Resize(ElementCount: integer);
+var i: Integer;
+begin
+  if fCount = ElementCount then Exit;
+  for i := FCount -1 downto ElementCount do
+    FItems[i].Free;
+  SetLength(fItems, ElementCount);
+  for i := FCount to ElementCount -1 do
+    FItems[i] := ColumnSorting.Create;
+  FCount := ElementCount;
+end;
+
+function ColumnSortingArray.GetCount: integer;
+begin
+  result := FCount;
+end;
+
+procedure ColumnSortingArray.Grow;
+var
+  Delta, Capacity: Integer;
+begin
+  Capacity := Length(fItems);
+  if Capacity > 64 then
+    Delta := Capacity div 4
+  else
+    if Capacity > 8 then
+      Delta := 16
+   else
+      Delta := 4;
+  SetLength(fItems, Capacity + Delta);
+end;
+
+function ColumnSortingArray.Add: ColumnSorting;
+begin
+  result := ColumnSorting.Create;
+  Add(Result);
+end;
+
+function ColumnSortingArray.Add(const Value:ColumnSorting): integer;
+begin
+  Result := Count;
+  if Length(fItems) = Result then
+    Grow;
+  fItems[result] := Value;
+  Inc(fCount);
+end;
+
+procedure ColumnSortingArray.ReadComplex(ASerializer: TObject);
+var
+  lval: ColumnSorting;
+  i: integer;
+begin
+  for i := 0 to Count-1 do begin
+    with TROSerializer(ASerializer) do
+      ReadStruct(GetArrayElementName(GetItemType, GetItemRef(i)), ColumnSorting, lval, i);
+    Items[i] := lval;
+  end;
+end;
+
+procedure ColumnSortingArray.WriteComplex(ASerializer: TObject);
+var
+  i: integer;
+begin
+  for i := 0 to Count-1 do
+    with TROSerializer(ASerializer) do
+      WriteStruct(GetArrayElementName(GetItemType, GetItemRef(i)), fItems[i], ColumnSorting, i);
+end;
+
+{ DataParameter }
+
+procedure DataParameter.Assign(iSource: TPersistent); 
+var lSource: DataAbstract4_Intf.DataParameter;
+begin
+  inherited Assign(iSource);
+  if (iSource is DataAbstract4_Intf.DataParameter) then begin
+    lSource := DataAbstract4_Intf.DataParameter(iSource);
+    Name := lSource.Name;
+    Value := lSource.Value;
+  end;
+end;
+
+procedure DataParameter.ReadComplex(ASerializer: TObject);
+var
+  l_Name: Utf8String;
+  l_Value: Variant;
+begin
+  if TROSerializer(ASerializer).RecordStrictOrder then begin
+    l_Name := Name;
+    TROSerializer(ASerializer).ReadUTF8String('Name', l_Name);
+    Name := l_Name;
+    l_Value := Value;
+    TROSerializer(ASerializer).ReadVariant('Value', l_Value);
+    Value := l_Value;
+  end
+  else begin
+    l_Name := Name;
+    TROSerializer(ASerializer).ReadUTF8String('Name', l_Name);
+    Name := l_Name;
+    l_Value := Value;
+    TROSerializer(ASerializer).ReadVariant('Value', l_Value);
+    Value := l_Value;
+  end;
+end;
+
+procedure DataParameter.WriteComplex(ASerializer: TObject);
+var
+  l_Name: Utf8String;
+  l_Value: Variant;
+begin
+  if TROSerializer(ASerializer).RecordStrictOrder then begin
+    TROSerializer(ASerializer).ChangeClass(DataParameter);
+    l_Name := Name;
+    TROSerializer(ASerializer).WriteUTF8String('Name', l_Name);
+    l_Value := Value;
+    TROSerializer(ASerializer).WriteVariant('Value', l_Value);
+  end
+  else begin
+    l_Name := Name;
+    TROSerializer(ASerializer).WriteUTF8String('Name', l_Name);
+    l_Value := Value;
+    TROSerializer(ASerializer).WriteVariant('Value', l_Value);
+  end;
+end;
+
+{ DataParameterCollection }
+constructor DataParameterCollection.Create;
+begin
+  inherited Create(DataParameter);
+end;
+
+constructor DataParameterCollection.Create(aItemClass: TCollectionItemClass);
+begin
+  inherited Create(aItemClass);
+end;
+
+function DataParameterCollection.Add: DataParameter;
+begin
+  result := DataParameter(inherited Add);
+end;
+
+function DataParameterCollection.GetItems(aIndex: integer): DataParameter;
+begin
+  result := DataParameter(inherited Items[aIndex]);
+end;
+
+procedure DataParameterCollection.LoadFromArray(anArray: DataParameterArray);
+var i : integer;
+begin
+  Clear;
+  for i := 0 to (anArray.Count-1) do
+    Add.Assign(anArray[i]);
+end;
+
+procedure DataParameterCollection.SaveToArray(anArray: DataParameterArray);
+var i : integer;
+begin
+  anArray.Clear;
+  anArray.Resize(Count);
+  for i := 0 to (Count-1) do begin
+    anArray[i] := DataParameter.Create;
+    anArray[i].Assign(Items[i]);
+  end;
+end;
+
+procedure DataParameterCollection.SetItems(aIndex: integer; const Value: DataParameter);
+begin
+  DataParameter(inherited Items[aIndex]).Assign(Value);
+end;
+
+{ TableRequestInfo }
+
+procedure TableRequestInfo.Assign(iSource: TPersistent); 
+var lSource: DataAbstract4_Intf.TableRequestInfo;
+begin
+  inherited Assign(iSource);
+  if (iSource is DataAbstract4_Intf.TableRequestInfo) then begin
+    lSource := DataAbstract4_Intf.TableRequestInfo(iSource);
+    UserFilter := lSource.UserFilter;
+    IncludeSchema := lSource.IncludeSchema;
+    MaxRecords := lSource.MaxRecords;
+    Parameters.Assign(lSource.Parameters);
+  end;
+end;
+
+constructor TableRequestInfo.Create(aCollection : TCollection);
+begin
+  inherited Create(aCollection);
+  fMaxRecords := -1;
+end;
+
+function TableRequestInfo.GetParameters: DataParameterArray;
+begin
+  if (fParameters = nil) then fParameters := DataParameterArray.Create();
+  result := fParameters;
+end;
+
+procedure TableRequestInfo.ReadComplex(ASerializer: TObject);
+var
+  l_IncludeSchema: Boolean;
+  l_MaxRecords: Integer;
+  l_Parameters: DataParameterArray;
+  l_UserFilter: Utf8String;
+begin
+  if TROSerializer(ASerializer).RecordStrictOrder then begin
+    l_UserFilter := UserFilter;
+    TROSerializer(ASerializer).ReadUTF8String('UserFilter', l_UserFilter);
+    UserFilter := l_UserFilter;
+    l_IncludeSchema := IncludeSchema;
+    TROSerializer(ASerializer).ReadEnumerated('IncludeSchema',TypeInfo(boolean), l_IncludeSchema);
+    IncludeSchema := l_IncludeSchema;
+    l_MaxRecords := MaxRecords;
+    TROSerializer(ASerializer).ReadInteger('MaxRecords', otSLong, l_MaxRecords);
+    MaxRecords := l_MaxRecords;
+    l_Parameters := Parameters;
+    TROSerializer(ASerializer).ReadArray('Parameters', DataParameterArray, l_Parameters);
+    if Parameters <> l_Parameters then Parameters.Free;
+    Parameters := l_Parameters;
+  end
+  else begin
+    l_IncludeSchema := IncludeSchema;
+    TROSerializer(ASerializer).ReadEnumerated('IncludeSchema',TypeInfo(boolean), l_IncludeSchema);
+    IncludeSchema := l_IncludeSchema;
+    l_MaxRecords := MaxRecords;
+    TROSerializer(ASerializer).ReadInteger('MaxRecords', otSLong, l_MaxRecords);
+    MaxRecords := l_MaxRecords;
+    l_Parameters := Parameters;
+    TROSerializer(ASerializer).ReadArray('Parameters', DataParameterArray, l_Parameters);
+    if Parameters <> l_Parameters then Parameters.Free;
+    Parameters := l_Parameters;
+    l_UserFilter := UserFilter;
+    TROSerializer(ASerializer).ReadUTF8String('UserFilter', l_UserFilter);
+    UserFilter := l_UserFilter;
+  end;
+end;
+
+procedure TableRequestInfo.WriteComplex(ASerializer: TObject);
+var
+  l_IncludeSchema: Boolean;
+  l_MaxRecords: Integer;
+  l_Parameters: DataParameterArray;
+  l_UserFilter: Utf8String;
+begin
+  if TROSerializer(ASerializer).RecordStrictOrder then begin
+    TROSerializer(ASerializer).ChangeClass(TableRequestInfo);
+    l_UserFilter := UserFilter;
+    TROSerializer(ASerializer).WriteUTF8String('UserFilter', l_UserFilter);
+    l_IncludeSchema := IncludeSchema;
+    TROSerializer(ASerializer).WriteEnumerated('IncludeSchema',TypeInfo(boolean), l_IncludeSchema);
+    l_MaxRecords := MaxRecords;
+    TROSerializer(ASerializer).WriteInteger('MaxRecords', otSLong, l_MaxRecords);
+    l_Parameters := Parameters;
+    TROSerializer(ASerializer).WriteArray('Parameters', l_Parameters, DataParameterArray);
+  end
+  else begin
+    l_IncludeSchema := IncludeSchema;
+    TROSerializer(ASerializer).WriteEnumerated('IncludeSchema',TypeInfo(boolean), l_IncludeSchema);
+    l_MaxRecords := MaxRecords;
+    TROSerializer(ASerializer).WriteInteger('MaxRecords', otSLong, l_MaxRecords);
+    l_Parameters := Parameters;
+    TROSerializer(ASerializer).WriteArray('Parameters', l_Parameters, DataParameterArray);
+    l_UserFilter := UserFilter;
+    TROSerializer(ASerializer).WriteUTF8String('UserFilter', l_UserFilter);
+  end;
+end;
+
+{ TableRequestInfoCollection }
+constructor TableRequestInfoCollection.Create;
+begin
+  inherited Create(TableRequestInfo);
+end;
+
+constructor TableRequestInfoCollection.Create(aItemClass: TCollectionItemClass);
+begin
+  inherited Create(aItemClass);
+end;
+
+function TableRequestInfoCollection.Add: TableRequestInfo;
+begin
+  result := TableRequestInfo(inherited Add);
+end;
+
+function TableRequestInfoCollection.GetItems(aIndex: integer): TableRequestInfo;
+begin
+  result := TableRequestInfo(inherited Items[aIndex]);
+end;
+
+procedure TableRequestInfoCollection.LoadFromArray(anArray: TableRequestInfoArray);
+var i : integer;
+begin
+  Clear;
+  for i := 0 to (anArray.Count-1) do
+    Add.Assign(anArray[i]);
+end;
+
+procedure TableRequestInfoCollection.SaveToArray(anArray: TableRequestInfoArray);
+var i : integer;
+begin
+  anArray.Clear;
+  anArray.Resize(Count);
+  for i := 0 to (Count-1) do begin
+    anArray[i] := TableRequestInfo.Create;
+    anArray[i].Assign(Items[i]);
+  end;
+end;
+
+procedure TableRequestInfoCollection.SetItems(aIndex: integer; const Value: TableRequestInfo);
+begin
+  TableRequestInfo(inherited Items[aIndex]).Assign(Value);
+end;
+
+{ UserInfo }
+
+procedure UserInfo.Assign(iSource: TPersistent); 
+var lSource: DataAbstract4_Intf.UserInfo;
+begin
+  inherited Assign(iSource);
+  if (iSource is DataAbstract4_Intf.UserInfo) then begin
+    lSource := DataAbstract4_Intf.UserInfo(iSource);
+    SessionID := lSource.SessionID;
+    UserID := lSource.UserID;
+    Privileges.Assign(lSource.Privileges);
+    Attributes.Assign(lSource.Attributes);
+    UserData.Assign(lSource.UserData);
+  end;
+end;
+
+function UserInfo.GetPrivileges: StringArray;
+begin
+  if (fPrivileges = nil) then fPrivileges := StringArray.Create();
+  result := fPrivileges;
+end;
+
+function UserInfo.GetAttributes: VariantArray;
+begin
+  if (fAttributes = nil) then fAttributes := VariantArray.Create();
+  result := fAttributes;
+end;
+
+function UserInfo.GetUserData: Binary;
+begin
+  if (fUserData = nil) then fUserData := Binary.Create();
+  result := fUserData;
+end;
+
+procedure UserInfo.ReadComplex(ASerializer: TObject);
+var
+  l_Attributes: VariantArray;
+  l_Privileges: StringArray;
+  l_SessionID: Utf8String;
+  l_UserData: Binary;
+  l_UserID: Utf8String;
+begin
+  if TROSerializer(ASerializer).RecordStrictOrder then begin
+    l_SessionID := SessionID;
+    TROSerializer(ASerializer).ReadUTF8String('SessionID', l_SessionID);
+    SessionID := l_SessionID;
+    l_UserID := UserID;
+    TROSerializer(ASerializer).ReadUTF8String('UserID', l_UserID);
+    UserID := l_UserID;
+    l_Privileges := Privileges;
+    TROSerializer(ASerializer).ReadArray('Privileges', StringArray, l_Privileges);
+    if Privileges <> l_Privileges then Privileges.Free;
+    Privileges := l_Privileges;
+    l_Attributes := Attributes;
+    TROSerializer(ASerializer).ReadArray('Attributes', VariantArray, l_Attributes);
+    if Attributes <> l_Attributes then Attributes.Free;
+    Attributes := l_Attributes;
+    l_UserData := UserData;
+    TROSerializer(ASerializer).ReadBinary('UserData', l_UserData);
+    if UserData <> l_UserData then UserData.Free;
+    UserData := l_UserData;
+  end
+  else begin
+    l_Attributes := Attributes;
+    TROSerializer(ASerializer).ReadArray('Attributes', VariantArray, l_Attributes);
+    if Attributes <> l_Attributes then Attributes.Free;
+    Attributes := l_Attributes;
+    l_Privileges := Privileges;
+    TROSerializer(ASerializer).ReadArray('Privileges', StringArray, l_Privileges);
+    if Privileges <> l_Privileges then Privileges.Free;
+    Privileges := l_Privileges;
+    l_SessionID := SessionID;
+    TROSerializer(ASerializer).ReadUTF8String('SessionID', l_SessionID);
+    SessionID := l_SessionID;
+    l_UserData := UserData;
+    TROSerializer(ASerializer).ReadBinary('UserData', l_UserData);
+    if UserData <> l_UserData then UserData.Free;
+    UserData := l_UserData;
+    l_UserID := UserID;
+    TROSerializer(ASerializer).ReadUTF8String('UserID', l_UserID);
+    UserID := l_UserID;
+  end;
+end;
+
+procedure UserInfo.WriteComplex(ASerializer: TObject);
+var
+  l_Attributes: VariantArray;
+  l_Privileges: StringArray;
+  l_SessionID: Utf8String;
+  l_UserData: Binary;
+  l_UserID: Utf8String;
+begin
+  if TROSerializer(ASerializer).RecordStrictOrder then begin
+    TROSerializer(ASerializer).ChangeClass(UserInfo);
+    l_SessionID := SessionID;
+    TROSerializer(ASerializer).WriteUTF8String('SessionID', l_SessionID);
+    l_UserID := UserID;
+    TROSerializer(ASerializer).WriteUTF8String('UserID', l_UserID);
+    l_Privileges := Privileges;
+    TROSerializer(ASerializer).WriteArray('Privileges', l_Privileges, StringArray);
+    l_Attributes := Attributes;
+    TROSerializer(ASerializer).WriteArray('Attributes', l_Attributes, VariantArray);
+    l_UserData := UserData;
+    TROSerializer(ASerializer).WriteBinary('UserData', l_UserData);
+  end
+  else begin
+    l_Attributes := Attributes;
+    TROSerializer(ASerializer).WriteArray('Attributes', l_Attributes, VariantArray);
+    l_Privileges := Privileges;
+    TROSerializer(ASerializer).WriteArray('Privileges', l_Privileges, StringArray);
+    l_SessionID := SessionID;
+    TROSerializer(ASerializer).WriteUTF8String('SessionID', l_SessionID);
+    l_UserData := UserData;
+    TROSerializer(ASerializer).WriteBinary('UserData', l_UserData);
+    l_UserID := UserID;
+    TROSerializer(ASerializer).WriteUTF8String('UserID', l_UserID);
+  end;
+end;
+
+{ UserInfoCollection }
+constructor UserInfoCollection.Create;
+begin
+  inherited Create(UserInfo);
+end;
+
+constructor UserInfoCollection.Create(aItemClass: TCollectionItemClass);
+begin
+  inherited Create(aItemClass);
+end;
+
+function UserInfoCollection.Add: UserInfo;
+begin
+  result := UserInfo(inherited Add);
+end;
+
+function UserInfoCollection.GetItems(aIndex: integer): UserInfo;
+begin
+  result := UserInfo(inherited Items[aIndex]);
+end;
+
+procedure UserInfoCollection.SetItems(aIndex: integer; const Value: UserInfo);
+begin
+  UserInfo(inherited Items[aIndex]).Assign(Value);
+end;
+
+{ TableRequestInfoV5 }
+
+procedure TableRequestInfoV5.Assign(iSource: TPersistent); 
+var lSource: DataAbstract4_Intf.TableRequestInfoV5;
+begin
+  inherited Assign(iSource);
+  if (iSource is DataAbstract4_Intf.TableRequestInfoV5) then begin
+    lSource := DataAbstract4_Intf.TableRequestInfoV5(iSource);
+    WhereClause := lSource.WhereClause;
+    DynamicSelectFieldNames.Assign(lSource.DynamicSelectFieldNames);
+    Sorting.Assign(lSource.Sorting);
+  end;
+end;
+
+function TableRequestInfoV5.GetDynamicSelectFieldNames: StringArray;
+begin
+  if (fDynamicSelectFieldNames = nil) then fDynamicSelectFieldNames := StringArray.Create();
+  result := fDynamicSelectFieldNames;
+end;
+
+function TableRequestInfoV5.GetSorting: ColumnSorting;
+begin
+  if (fSorting = nil) then fSorting := ColumnSorting.Create();
+  result := fSorting;
+end;
+
+procedure TableRequestInfoV5.ReadComplex(ASerializer: TObject);
+var
+  l_DynamicSelectFieldNames: StringArray;
+  l_IncludeSchema: Boolean;
+  l_MaxRecords: Integer;
+  l_Parameters: DataParameterArray;
+  l_Sorting: ColumnSorting;
+  l_UserFilter: Utf8String;
+  l_WhereClause: IXmlNode;
+begin
+  if TROSerializer(ASerializer).RecordStrictOrder then begin
+    inherited;
+    l_WhereClause := WhereClause;
+    TROSerializer(ASerializer).ReadXML('WhereClause', l_WhereClause);
+    WhereClause := l_WhereClause;
+    l_DynamicSelectFieldNames := DynamicSelectFieldNames;
+    TROSerializer(ASerializer).ReadArray('DynamicSelectFieldNames', StringArray, l_DynamicSelectFieldNames);
+    if DynamicSelectFieldNames <> l_DynamicSelectFieldNames then DynamicSelectFieldNames.Free;
+    DynamicSelectFieldNames := l_DynamicSelectFieldNames;
+    l_Sorting := Sorting;
+    TROSerializer(ASerializer).ReadStruct('Sorting', ColumnSorting, l_Sorting);
+    if Sorting <> l_Sorting then Sorting.Free;
+    Sorting := l_Sorting;
+  end
+  else begin
+    l_DynamicSelectFieldNames := DynamicSelectFieldNames;
+    TROSerializer(ASerializer).ReadArray('DynamicSelectFieldNames', StringArray, l_DynamicSelectFieldNames);
+    if DynamicSelectFieldNames <> l_DynamicSelectFieldNames then DynamicSelectFieldNames.Free;
+    DynamicSelectFieldNames := l_DynamicSelectFieldNames;
+    l_IncludeSchema := IncludeSchema;
+    TROSerializer(ASerializer).ReadEnumerated('IncludeSchema',TypeInfo(boolean), l_IncludeSchema);
+    IncludeSchema := l_IncludeSchema;
+    l_MaxRecords := MaxRecords;
+    TROSerializer(ASerializer).ReadInteger('MaxRecords', otSLong, l_MaxRecords);
+    MaxRecords := l_MaxRecords;
+    l_Parameters := Parameters;
+    TROSerializer(ASerializer).ReadArray('Parameters', DataParameterArray, l_Parameters);
+    if Parameters <> l_Parameters then Parameters.Free;
+    Parameters := l_Parameters;
+    l_Sorting := Sorting;
+    TROSerializer(ASerializer).ReadStruct('Sorting', ColumnSorting, l_Sorting);
+    if Sorting <> l_Sorting then Sorting.Free;
+    Sorting := l_Sorting;
+    l_UserFilter := UserFilter;
+    TROSerializer(ASerializer).ReadUTF8String('UserFilter', l_UserFilter);
+    UserFilter := l_UserFilter;
+    l_WhereClause := WhereClause;
+    TROSerializer(ASerializer).ReadXML('WhereClause', l_WhereClause);
+    WhereClause := l_WhereClause;
+  end;
+end;
+
+procedure TableRequestInfoV5.WriteComplex(ASerializer: TObject);
+var
+  l_DynamicSelectFieldNames: StringArray;
+  l_IncludeSchema: Boolean;
+  l_MaxRecords: Integer;
+  l_Parameters: DataParameterArray;
+  l_Sorting: ColumnSorting;
+  l_UserFilter: Utf8String;
+  l_WhereClause: IXmlNode;
+begin
+  if TROSerializer(ASerializer).RecordStrictOrder then begin
+    inherited;
+    TROSerializer(ASerializer).ChangeClass(TableRequestInfoV5);
+    l_WhereClause := WhereClause;
+    TROSerializer(ASerializer).WriteXML('WhereClause', l_WhereClause);
+    l_DynamicSelectFieldNames := DynamicSelectFieldNames;
+    TROSerializer(ASerializer).WriteArray('DynamicSelectFieldNames', l_DynamicSelectFieldNames, StringArray);
+    l_Sorting := Sorting;
+    TROSerializer(ASerializer).WriteStruct('Sorting', l_Sorting, ColumnSorting);
+  end
+  else begin
+    l_DynamicSelectFieldNames := DynamicSelectFieldNames;
+    TROSerializer(ASerializer).WriteArray('DynamicSelectFieldNames', l_DynamicSelectFieldNames, StringArray);
+    l_IncludeSchema := IncludeSchema;
+    TROSerializer(ASerializer).WriteEnumerated('IncludeSchema',TypeInfo(boolean), l_IncludeSchema);
+    l_MaxRecords := MaxRecords;
+    TROSerializer(ASerializer).WriteInteger('MaxRecords', otSLong, l_MaxRecords);
+    l_Parameters := Parameters;
+    TROSerializer(ASerializer).WriteArray('Parameters', l_Parameters, DataParameterArray);
+    l_Sorting := Sorting;
+    TROSerializer(ASerializer).WriteStruct('Sorting', l_Sorting, ColumnSorting);
+    l_UserFilter := UserFilter;
+    TROSerializer(ASerializer).WriteUTF8String('UserFilter', l_UserFilter);
+    l_WhereClause := WhereClause;
+    TROSerializer(ASerializer).WriteXML('WhereClause', l_WhereClause);
+  end;
+end;
+
+{ TableRequestInfoV5Collection }
+constructor TableRequestInfoV5Collection.Create;
+begin
+  inherited Create(TableRequestInfoV5);
+end;
+
+constructor TableRequestInfoV5Collection.Create(aItemClass: TCollectionItemClass);
+begin
+  inherited Create(aItemClass);
+end;
+
+function TableRequestInfoV5Collection.Add: TableRequestInfoV5;
+begin
+  result := TableRequestInfoV5(inherited Add);
+end;
+
+function TableRequestInfoV5Collection.GetItems(aIndex: integer): TableRequestInfoV5;
+begin
+  result := TableRequestInfoV5(inherited Items[aIndex]);
+end;
+
+procedure TableRequestInfoV5Collection.SetItems(aIndex: integer; const Value: TableRequestInfoV5);
+begin
+  TableRequestInfoV5(inherited Items[aIndex]).Assign(Value);
+end;
+
+{ ColumnSorting }
+
+procedure ColumnSorting.Assign(iSource: TPersistent); 
+var lSource: DataAbstract4_Intf.ColumnSorting;
+begin
+  inherited Assign(iSource);
+  if (iSource is DataAbstract4_Intf.ColumnSorting) then begin
+    lSource := DataAbstract4_Intf.ColumnSorting(iSource);
+    FieldName := lSource.FieldName;
+    SortDirection := lSource.SortDirection;
+  end;
+end;
+
+procedure ColumnSorting.ReadComplex(ASerializer: TObject);
+var
+  l_FieldName: Utf8String;
+  l_SortDirection: ColumnSortDirection;
+begin
+  if TROSerializer(ASerializer).RecordStrictOrder then begin
+    l_FieldName := FieldName;
+    TROSerializer(ASerializer).ReadUTF8String('FieldName', l_FieldName);
+    FieldName := l_FieldName;
+    l_SortDirection := SortDirection;
+    TROSerializer(ASerializer).ReadEnumerated('SortDirection',TypeInfo(ColumnSortDirection), l_SortDirection);
+    SortDirection := l_SortDirection;
+  end
+  else begin
+    l_FieldName := FieldName;
+    TROSerializer(ASerializer).ReadUTF8String('FieldName', l_FieldName);
+    FieldName := l_FieldName;
+    l_SortDirection := SortDirection;
+    TROSerializer(ASerializer).ReadEnumerated('SortDirection',TypeInfo(ColumnSortDirection), l_SortDirection);
+    SortDirection := l_SortDirection;
+  end;
+end;
+
+procedure ColumnSorting.WriteComplex(ASerializer: TObject);
+var
+  l_FieldName: Utf8String;
+  l_SortDirection: ColumnSortDirection;
+begin
+  if TROSerializer(ASerializer).RecordStrictOrder then begin
+    TROSerializer(ASerializer).ChangeClass(ColumnSorting);
+    l_FieldName := FieldName;
+    TROSerializer(ASerializer).WriteUTF8String('FieldName', l_FieldName);
+    l_SortDirection := SortDirection;
+    TROSerializer(ASerializer).WriteEnumerated('SortDirection',TypeInfo(ColumnSortDirection), l_SortDirection);
+  end
+  else begin
+    l_FieldName := FieldName;
+    TROSerializer(ASerializer).WriteUTF8String('FieldName', l_FieldName);
+    l_SortDirection := SortDirection;
+    TROSerializer(ASerializer).WriteEnumerated('SortDirection',TypeInfo(ColumnSortDirection), l_SortDirection);
+  end;
+end;
+
+{ ColumnSortingCollection }
+constructor ColumnSortingCollection.Create;
+begin
+  inherited Create(ColumnSorting);
+end;
+
+constructor ColumnSortingCollection.Create(aItemClass: TCollectionItemClass);
+begin
+  inherited Create(aItemClass);
+end;
+
+function ColumnSortingCollection.Add: ColumnSorting;
+begin
+  result := ColumnSorting(inherited Add);
+end;
+
+function ColumnSortingCollection.GetItems(aIndex: integer): ColumnSorting;
+begin
+  result := ColumnSorting(inherited Items[aIndex]);
+end;
+
+procedure ColumnSortingCollection.LoadFromArray(anArray: ColumnSortingArray);
+var i : integer;
+begin
+  Clear;
+  for i := 0 to (anArray.Count-1) do
+    Add.Assign(anArray[i]);
+end;
+
+procedure ColumnSortingCollection.SaveToArray(anArray: ColumnSortingArray);
+var i : integer;
+begin
+  anArray.Clear;
+  anArray.Resize(Count);
+  for i := 0 to (Count-1) do begin
+    anArray[i] := ColumnSorting.Create;
+    anArray[i].Assign(Items[i]);
+  end;
+end;
+
+procedure ColumnSortingCollection.SetItems(aIndex: integer; const Value: ColumnSorting);
+begin
+  ColumnSorting(inherited Items[aIndex]).Assign(Value);
+end;
+
+{ TableRequestInfoV6 }
+
+procedure TableRequestInfoV6.Assign(iSource: TPersistent); 
+var lSource: DataAbstract4_Intf.TableRequestInfoV6;
+begin
+  inherited Assign(iSource);
+  if (iSource is DataAbstract4_Intf.TableRequestInfoV6) then begin
+    lSource := DataAbstract4_Intf.TableRequestInfoV6(iSource);
+    Sql := lSource.Sql;
+  end;
+end;
+
+procedure TableRequestInfoV6.ReadComplex(ASerializer: TObject);
+var
+  l_IncludeSchema: Boolean;
+  l_MaxRecords: Integer;
+  l_Parameters: DataParameterArray;
+  l_Sql: Widestring;
+  l_UserFilter: Utf8String;
+begin
+  if TROSerializer(ASerializer).RecordStrictOrder then begin
+    inherited;
+    l_Sql := Sql;
+    TROSerializer(ASerializer).ReadWideString('Sql', l_Sql);
+    Sql := l_Sql;
+  end
+  else begin
+    l_IncludeSchema := IncludeSchema;
+    TROSerializer(ASerializer).ReadEnumerated('IncludeSchema',TypeInfo(boolean), l_IncludeSchema);
+    IncludeSchema := l_IncludeSchema;
+    l_MaxRecords := MaxRecords;
+    TROSerializer(ASerializer).ReadInteger('MaxRecords', otSLong, l_MaxRecords);
+    MaxRecords := l_MaxRecords;
+    l_Parameters := Parameters;
+    TROSerializer(ASerializer).ReadArray('Parameters', DataParameterArray, l_Parameters);
+    if Parameters <> l_Parameters then Parameters.Free;
+    Parameters := l_Parameters;
+    l_Sql := Sql;
+    TROSerializer(ASerializer).ReadWideString('Sql', l_Sql);
+    Sql := l_Sql;
+    l_UserFilter := UserFilter;
+    TROSerializer(ASerializer).ReadUTF8String('UserFilter', l_UserFilter);
+    UserFilter := l_UserFilter;
+  end;
+end;
+
+procedure TableRequestInfoV6.WriteComplex(ASerializer: TObject);
+var
+  l_IncludeSchema: Boolean;
+  l_MaxRecords: Integer;
+  l_Parameters: DataParameterArray;
+  l_Sql: Widestring;
+  l_UserFilter: Utf8String;
+begin
+  if TROSerializer(ASerializer).RecordStrictOrder then begin
+    inherited;
+    TROSerializer(ASerializer).ChangeClass(TableRequestInfoV6);
+    l_Sql := Sql;
+    TROSerializer(ASerializer).WriteWideString('Sql', l_Sql);
+  end
+  else begin
+    l_IncludeSchema := IncludeSchema;
+    TROSerializer(ASerializer).WriteEnumerated('IncludeSchema',TypeInfo(boolean), l_IncludeSchema);
+    l_MaxRecords := MaxRecords;
+    TROSerializer(ASerializer).WriteInteger('MaxRecords', otSLong, l_MaxRecords);
+    l_Parameters := Parameters;
+    TROSerializer(ASerializer).WriteArray('Parameters', l_Parameters, DataParameterArray);
+    l_Sql := Sql;
+    TROSerializer(ASerializer).WriteWideString('Sql', l_Sql);
+    l_UserFilter := UserFilter;
+    TROSerializer(ASerializer).WriteUTF8String('UserFilter', l_UserFilter);
+  end;
+end;
+
+{ TableRequestInfoV6Collection }
+constructor TableRequestInfoV6Collection.Create;
+begin
+  inherited Create(TableRequestInfoV6);
+end;
+
+constructor TableRequestInfoV6Collection.Create(aItemClass: TCollectionItemClass);
+begin
+  inherited Create(aItemClass);
+end;
+
+function TableRequestInfoV6Collection.Add: TableRequestInfoV6;
+begin
+  result := TableRequestInfoV6(inherited Add);
+end;
+
+function TableRequestInfoV6Collection.GetItems(aIndex: integer): TableRequestInfoV6;
+begin
+  result := TableRequestInfoV6(inherited Items[aIndex]);
+end;
+
+procedure TableRequestInfoV6Collection.SetItems(aIndex: integer; const Value: TableRequestInfoV6);
+begin
+  TableRequestInfoV6(inherited Items[aIndex]).Assign(Value);
+end;
+
+{ CoDataAbstractService }
+
+class function CoDataAbstractService.Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): IDataAbstractService;
+begin
+  result := TDataAbstractService_Proxy.Create(aMessage, aTransportChannel);
+end;
+
+{ TDataAbstractService_Proxy }
+
+function TDataAbstractService_Proxy.__GetInterfaceName:string;
+begin
+  result := 'DataAbstractService';
+end;
+
+function TDataAbstractService_Proxy.GetSchema(const aFilter: Utf8String): Utf8String;
+begin
+  try
+    __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'GetSchema');
+    __Message.Write('aFilter', TypeInfo(Utf8String), aFilter, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(Utf8String), result, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+function TDataAbstractService_Proxy.GetData(const aTableNameArray: StringArray; const aTableRequestInfoArray: TableRequestInfoArray): Binary;
+begin
+  try
+    result := nil;
+    __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'GetData');
+    __Message.Write('aTableNameArray', TypeInfo(DataAbstract4_Intf.StringArray), aTableNameArray, []);
+    __Message.Write('aTableRequestInfoArray', TypeInfo(DataAbstract4_Intf.TableRequestInfoArray), aTableRequestInfoArray, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(Binary), result, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+function TDataAbstractService_Proxy.UpdateData(const aDelta: Binary): Binary;
+begin
+  try
+    result := nil;
+    __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'UpdateData');
+    __Message.Write('aDelta', TypeInfo(Binary), aDelta, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(Binary), result, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+function TDataAbstractService_Proxy.ExecuteCommand(const aCommandName: Utf8String; const aParameterArray: DataParameterArray): Integer;
+begin
+  try
+    __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'ExecuteCommand');
+    __Message.Write('aCommandName', TypeInfo(Utf8String), aCommandName, []);
+    __Message.Write('aParameterArray', TypeInfo(DataAbstract4_Intf.DataParameterArray), aParameterArray, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(Integer), result, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+function TDataAbstractService_Proxy.ExecuteCommandEx(const aCommandName: Utf8String; const aInputParameters: DataParameterArray; out aOutputParameters: DataParameterArray): Integer;
+begin
+  try
+    aOutputParameters := nil;
+    __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'ExecuteCommandEx');
+    __Message.Write('aCommandName', TypeInfo(Utf8String), aCommandName, []);
+    __Message.Write('aInputParameters', TypeInfo(DataAbstract4_Intf.DataParameterArray), aInputParameters, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(Integer), result, []);
+    __Message.Read('aOutputParameters', TypeInfo(DataAbstract4_Intf.DataParameterArray), aOutputParameters, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+function TDataAbstractService_Proxy.GetTableSchema(const aTableNameArray: StringArray): Utf8String;
+begin
+  try
+    __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'GetTableSchema');
+    __Message.Write('aTableNameArray', TypeInfo(DataAbstract4_Intf.StringArray), aTableNameArray, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(Utf8String), result, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+function TDataAbstractService_Proxy.GetCommandSchema(const aCommandNameArray: StringArray): Utf8String;
+begin
+  try
+    __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'GetCommandSchema');
+    __Message.Write('aCommandNameArray', TypeInfo(DataAbstract4_Intf.StringArray), aCommandNameArray, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(Utf8String), result, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+function TDataAbstractService_Proxy.SQLGetData(const aSQLText: Utf8String; const aIncludeSchema: Boolean; const aMaxRecords: Integer): Binary;
+begin
+  try
+    result := nil;
+    __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'SQLGetData');
+    __Message.Write('aSQLText', TypeInfo(Utf8String), aSQLText, []);
+    __Message.Write('aIncludeSchema', TypeInfo(Boolean), aIncludeSchema, []);
+    __Message.Write('aMaxRecords', TypeInfo(Integer), aMaxRecords, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(Binary), result, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+function TDataAbstractService_Proxy.SQLGetDataEx(const aSQLText: Utf8String; const aIncludeSchema: Boolean; const aMaxRecords: Integer; const aDynamicWhereXML: Widestring): Binary;
+begin
+  try
+    result := nil;
+    __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'SQLGetDataEx');
+    __Message.Write('aSQLText', TypeInfo(Utf8String), aSQLText, []);
+    __Message.Write('aIncludeSchema', TypeInfo(Boolean), aIncludeSchema, []);
+    __Message.Write('aMaxRecords', TypeInfo(Integer), aMaxRecords, []);
+    __Message.Write('aDynamicWhereXML', TypeInfo(Widestring), aDynamicWhereXML, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(Binary), result, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+function TDataAbstractService_Proxy.SQLExecuteCommand(const aSQLText: Utf8String): Integer;
+begin
+  try
+    __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'SQLExecuteCommand');
+    __Message.Write('aSQLText', TypeInfo(Utf8String), aSQLText, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(Integer), result, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+function TDataAbstractService_Proxy.SQLExecuteCommandEx(const aSQLText: Utf8String; const aDynamicWhereXML: Widestring): Integer;
+begin
+  try
+    __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'SQLExecuteCommandEx');
+    __Message.Write('aSQLText', TypeInfo(Utf8String), aSQLText, []);
+    __Message.Write('aDynamicWhereXML', TypeInfo(Widestring), aDynamicWhereXML, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(Integer), result, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+function TDataAbstractService_Proxy.GetDatasetScripts(const DatasetNames: Utf8String): Utf8String;
+begin
+  try
+    __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'GetDatasetScripts');
+    __Message.Write('DatasetNames', TypeInfo(Utf8String), DatasetNames, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(Utf8String), result, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+procedure TDataAbstractService_Proxy.RegisterForDataChangeNotification(const aTableName: Utf8String);
+begin
+  try
+    __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'RegisterForDataChangeNotification');
+    __Message.Write('aTableName', TypeInfo(Utf8String), aTableName, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+procedure TDataAbstractService_Proxy.UnregisterForDataChangeNotification(const aTableName: Utf8String);
+begin
+  try
+    __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'UnregisterForDataChangeNotification');
+    __Message.Write('aTableName', TypeInfo(Utf8String), aTableName, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+{ CoSimpleLoginService }
+
+class function CoSimpleLoginService.Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): ISimpleLoginService;
+begin
+  result := TSimpleLoginService_Proxy.Create(aMessage, aTransportChannel);
+end;
+
+{ TSimpleLoginService_Proxy }
+
+function TSimpleLoginService_Proxy.__GetInterfaceName:string;
+begin
+  result := 'SimpleLoginService';
+end;
+
+function TSimpleLoginService_Proxy.Login(const aUserID: Utf8String; const aPassword: Utf8String; out aUserInfo: UserInfo): Boolean;
+begin
+  try
+    aUserInfo := nil;
+    __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'Login');
+    __Message.Write('aUserID', TypeInfo(Utf8String), aUserID, []);
+    __Message.Write('aPassword', TypeInfo(Utf8String), aPassword, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(Boolean), result, []);
+    __Message.Read('aUserInfo', TypeInfo(DataAbstract4_Intf.UserInfo), aUserInfo, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+{ CoBaseLoginService }
+
+class function CoBaseLoginService.Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): IBaseLoginService;
+begin
+  result := TBaseLoginService_Proxy.Create(aMessage, aTransportChannel);
+end;
+
+{ TBaseLoginService_Proxy }
+
+function TBaseLoginService_Proxy.__GetInterfaceName:string;
+begin
+  result := 'BaseLoginService';
+end;
+
+procedure TBaseLoginService_Proxy.Logout;
+begin
+  try
+    __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'Logout');
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+  finally
+    __Message.FreeStream;
+  end
+end;
+
+{ CoMultiDbLoginService }
+
+class function CoMultiDbLoginService.Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): IMultiDbLoginService;
+begin
+  result := TMultiDbLoginService_Proxy.Create(aMessage, aTransportChannel);
+end;
+
+{ TMultiDbLoginService_Proxy }
+
+function TMultiDbLoginService_Proxy.__GetInterfaceName:string;
+begin
+  result := 'MultiDbLoginService';
+end;
+
+function TMultiDbLoginService_Proxy.Login(const aUserID: Utf8String; const aPassword: Utf8String; const aConnectionName: Utf8String; out aUserInfo: UserInfo): Boolean;
+begin
+  try
+    aUserInfo := nil;
+    __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'Login');
+    __Message.Write('aUserID', TypeInfo(Utf8String), aUserID, []);
+    __Message.Write('aPassword', TypeInfo(Utf8String), aPassword, []);
+    __Message.Write('aConnectionName', TypeInfo(Utf8String), aConnectionName, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(Boolean), result, []);
+    __Message.Read('aUserInfo', TypeInfo(DataAbstract4_Intf.UserInfo), aUserInfo, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+{ CoMultiDbLoginServiceV5 }
+
+class function CoMultiDbLoginServiceV5.Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): IMultiDbLoginServiceV5;
+begin
+  result := TMultiDbLoginServiceV5_Proxy.Create(aMessage, aTransportChannel);
+end;
+
+{ TMultiDbLoginServiceV5_Proxy }
+
+function TMultiDbLoginServiceV5_Proxy.__GetInterfaceName:string;
+begin
+  result := 'MultiDbLoginServiceV5';
+end;
+
+function TMultiDbLoginServiceV5_Proxy.GetConnectionNames: StringArray;
+begin
+  try
+    result := nil;
+    __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'GetConnectionNames');
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(DataAbstract4_Intf.StringArray), result, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+function TMultiDbLoginServiceV5_Proxy.GetDefaultConnectionName: Utf8String;
+begin
+  try
+    __Message.InitializeRequestMessage(__TransportChannel, 'DataAbstract4', __InterfaceName, 'GetDefaultConnectionName');
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(Utf8String), result, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+type
+  { TDataChangeNotification_Writer }
+  TDataChangeNotification_Writer = class(TROEventWriter, IDataChangeNotification_Writer)
+  protected
+    procedure OnDataTableChanged(const __Sender : TGUID; const aTableName: Utf8String; const aDelta: Binary);
+  end;
+
+procedure TDataChangeNotification_Writer.OnDataTableChanged(const __Sender : TGUID; const aTableName: Utf8String; const aDelta: Binary);
+var __eventdata : Binary;
+begin
+  __eventdata := Binary.Create;
+  try
+    __Message.InitializeEventMessage(NIL, 'DataAbstract4', EID_DataChangeNotification, 'OnDataTableChanged');
+    __Message.Write('aTableName', TypeInfo(Utf8String), aTableName, []);
+    __Message.Write('aDelta', TypeInfo(Binary), aDelta, []);
+    __Message.Finalize;
+
+    __Message.WriteToStream(__eventdata);
+
+    Repository.StoreEventData(__Sender, __eventdata, ExcludeSender, ExcludeSessionList, SessionList.CommaText);
+  finally
+    __eventdata.Free;
+  end;
+end;
+
+type
+  { TDataChangeNotification_Invoker }
+  TDataChangeNotification_Invoker = class(TROEventInvoker)
+  published
+    procedure Invoke_OnDataTableChanged(__EventReceiver : TROEventReceiver; const __Message : IROMessage; const __Target : IUnknown);
+  end;
+
+procedure TDataChangeNotification_Invoker.Invoke_OnDataTableChanged(__EventReceiver : TROEventReceiver; const __Message : IROMessage; const __Target : IUnknown);
+var
+__lObjectDisposer: TROObjectDisposer;
+  aTableName: Utf8String;
+  aDelta: Binary;
+begin
+  aDelta := NIL;
+
+  try
+    __Message.Read('aTableName', TypeInfo(Utf8String), aTableName, []);
+    __Message.Read('aDelta', TypeInfo(Binary), aDelta, []);
+
+    (__Target as IDataChangeNotification).OnDataTableChanged(aTableName, aDelta);
+
+  finally
+    __lObjectDisposer:= TROObjectDisposer.Create(__EventReceiver);
+    try
+      __lObjectDisposer.Add(aDelta);
+    finally
+      __lObjectDisposer.Free();
+    end
+  end
+end;
+
+initialization
+  RegisterROClass(DataParameter);
+  RegisterROClass(TableRequestInfo);
+  RegisterROClass(UserInfo);
+  RegisterROClass(TableRequestInfoV5);
+  RegisterROClass(ColumnSorting);
+  RegisterROClass(TableRequestInfoV6);
+  RegisterROClass(DataParameterArray);
+  RegisterROClass(TableRequestInfoArray);
+  RegisterROClass(StringArray);
+  RegisterROClass(VariantArray);
+  RegisterROClass(ColumnSortingArray);
+  RegisterProxyClass(IDataAbstractService_IID, TDataAbstractService_Proxy);
+  RegisterProxyClass(ISimpleLoginService_IID, TSimpleLoginService_Proxy);
+  RegisterProxyClass(IBaseLoginService_IID, TBaseLoginService_Proxy);
+  RegisterProxyClass(IMultiDbLoginService_IID, TMultiDbLoginService_Proxy);
+  RegisterProxyClass(IMultiDbLoginServiceV5_IID, TMultiDbLoginServiceV5_Proxy);
+
+  RegisterEventWriterClass(IDataChangeNotification_Writer, TDataChangeNotification_Writer);
+  RegisterEventInvokerClass(EID_DataChangeNotification, TDataChangeNotification_Invoker);
+
+finalization
+  UnregisterROClass(DataParameter);
+  UnregisterROClass(TableRequestInfo);
+  UnregisterROClass(UserInfo);
+  UnregisterROClass(TableRequestInfoV5);
+  UnregisterROClass(ColumnSorting);
+  UnregisterROClass(TableRequestInfoV6);
+  UnregisterROClass(DataParameterArray);
+  UnregisterROClass(TableRequestInfoArray);
+  UnregisterROClass(StringArray);
+  UnregisterROClass(VariantArray);
+  UnregisterROClass(ColumnSortingArray);
+  UnregisterProxyClass(IDataAbstractService_IID);
+  UnregisterProxyClass(ISimpleLoginService_IID);
+  UnregisterProxyClass(IBaseLoginService_IID);
+  UnregisterProxyClass(IMultiDbLoginService_IID);
+  UnregisterProxyClass(IMultiDbLoginServiceV5_IID);
+
+  UnregisterEventWriterClass(IDataChangeNotification_Writer);
+  UnregisterEventInvokerClass(EID_DataChangeNotification);
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract4_Invk.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract4_Invk.pas
new file mode 100644
index 0000000..3058bec
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract4_Invk.pas	
@@ -0,0 +1,621 @@
+unit DataAbstract4_Invk;
+
+{----------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project .                               }
+{                                                                            }
+{ Do not modify this unit manually, or your changes will be lost when this   }
+{ unit is regenerated the next time you compile the project.                 }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  {vcl:} Classes,
+  {RemObjects:} uROXMLIntf, uROServer, uROServerIntf, uROTypes, uROClientIntf,
+  {Generated:} DataAbstract4_Intf;
+
+type
+  TDataAbstractService_Invoker = class(TROInvoker)
+  private
+  protected
+  public
+    constructor Create; override;
+  published
+    procedure Invoke_GetSchema(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+    procedure Invoke_GetData(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+    procedure Invoke_UpdateData(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+    procedure Invoke_ExecuteCommand(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+    procedure Invoke_ExecuteCommandEx(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+    procedure Invoke_GetTableSchema(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+    procedure Invoke_GetCommandSchema(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+    procedure Invoke_SQLGetData(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+    procedure Invoke_SQLGetDataEx(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+    procedure Invoke_SQLExecuteCommand(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+    procedure Invoke_SQLExecuteCommandEx(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+    procedure Invoke_GetDatasetScripts(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+    procedure Invoke_RegisterForDataChangeNotification(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+    procedure Invoke_UnregisterForDataChangeNotification(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+  end;
+
+  TBaseLoginService_Invoker = class(TROInvoker)
+  private
+  protected
+  public
+    constructor Create; override;
+  published
+    procedure Invoke_Logout(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+  end;
+
+  TMultiDbLoginService_Invoker = class(TBaseLoginService_Invoker)
+  private
+  protected
+  public
+    constructor Create; override;
+  published
+    procedure Invoke_Login(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+  end;
+
+  TMultiDbLoginServiceV5_Invoker = class(TMultiDbLoginService_Invoker)
+  private
+  protected
+  public
+    constructor Create; override;
+  published
+    procedure Invoke_GetConnectionNames(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+    procedure Invoke_GetDefaultConnectionName(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+  end;
+
+  TSimpleLoginService_Invoker = class(TBaseLoginService_Invoker)
+  private
+  protected
+  public
+    constructor Create; override;
+  published
+    procedure Invoke_Login(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+  end;
+
+implementation
+
+uses
+  {RemObjects:} uRORes, uROClient;
+
+{ TDataAbstractService_Invoker }
+
+constructor TDataAbstractService_Invoker.Create;
+begin
+  inherited Create;
+  FAbstract := True;
+end;
+
+procedure TDataAbstractService_Invoker.Invoke_GetSchema(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function GetSchema(const aFilter: Utf8String): Utf8String; }
+var
+  aFilter: Utf8String;
+  lResult: Utf8String;
+begin
+  try
+    __Message.Read('aFilter', TypeInfo(Utf8String), aFilter, []);
+
+    lResult := (__Instance as IDataAbstractService).GetSchema(aFilter);
+
+    __Message.InitializeResponseMessage(__Transport, 'DataAbstract4', 'DataAbstractService', 'GetSchemaResponse');
+    __Message.Write('Result', TypeInfo(Utf8String), lResult, []);
+    __Message.Finalize;
+    __Message.UnsetAttributes(__Transport);
+
+  finally
+  end;
+end;
+
+procedure TDataAbstractService_Invoker.Invoke_GetData(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function GetData(const aTableNameArray: StringArray; const aTableRequestInfoArray: TableRequestInfoArray): Binary; }
+var
+  aTableNameArray: DataAbstract4_Intf.StringArray;
+  aTableRequestInfoArray: DataAbstract4_Intf.TableRequestInfoArray;
+  lResult: Binary;
+  __lObjectDisposer: TROObjectDisposer;
+begin
+  aTableNameArray := nil;
+  aTableRequestInfoArray := nil;
+  lResult := nil;
+  try
+    __Message.Read('aTableNameArray', TypeInfo(DataAbstract4_Intf.StringArray), aTableNameArray, []);
+    __Message.Read('aTableRequestInfoArray', TypeInfo(DataAbstract4_Intf.TableRequestInfoArray), aTableRequestInfoArray, []);
+
+    lResult := (__Instance as IDataAbstractService).GetData(aTableNameArray, aTableRequestInfoArray);
+
+    __Message.InitializeResponseMessage(__Transport, 'DataAbstract4', 'DataAbstractService', 'GetDataResponse');
+    __Message.Write('Result', TypeInfo(Binary), lResult, []);
+    __Message.Finalize;
+    __Message.UnsetAttributes(__Transport);
+
+  finally
+    __lObjectDisposer := TROObjectDisposer.Create(__Instance);
+    try
+      __lObjectDisposer.Add(aTableNameArray);
+      __lObjectDisposer.Add(aTableRequestInfoArray);
+      __lObjectDisposer.Add(lResult);
+    finally
+      __lObjectDisposer.Free();
+    end;
+  end;
+end;
+
+procedure TDataAbstractService_Invoker.Invoke_UpdateData(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function UpdateData(const aDelta: Binary): Binary; }
+var
+  aDelta: Binary;
+  lResult: Binary;
+  __lObjectDisposer: TROObjectDisposer;
+begin
+  aDelta := nil;
+  lResult := nil;
+  try
+    __Message.Read('aDelta', TypeInfo(Binary), aDelta, []);
+
+    lResult := (__Instance as IDataAbstractService).UpdateData(aDelta);
+
+    __Message.InitializeResponseMessage(__Transport, 'DataAbstract4', 'DataAbstractService', 'UpdateDataResponse');
+    __Message.Write('Result', TypeInfo(Binary), lResult, []);
+    __Message.Finalize;
+    __Message.UnsetAttributes(__Transport);
+
+  finally
+    __lObjectDisposer := TROObjectDisposer.Create(__Instance);
+    try
+      __lObjectDisposer.Add(aDelta);
+      __lObjectDisposer.Add(lResult);
+    finally
+      __lObjectDisposer.Free();
+    end;
+  end;
+end;
+
+procedure TDataAbstractService_Invoker.Invoke_ExecuteCommand(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function ExecuteCommand(const aCommandName: Utf8String; const aParameterArray: DataParameterArray): Integer; }
+var
+  aCommandName: Utf8String;
+  aParameterArray: DataAbstract4_Intf.DataParameterArray;
+  lResult: Integer;
+  __lObjectDisposer: TROObjectDisposer;
+begin
+  aParameterArray := nil;
+  try
+    __Message.Read('aCommandName', TypeInfo(Utf8String), aCommandName, []);
+    __Message.Read('aParameterArray', TypeInfo(DataAbstract4_Intf.DataParameterArray), aParameterArray, []);
+
+    lResult := (__Instance as IDataAbstractService).ExecuteCommand(aCommandName, aParameterArray);
+
+    __Message.InitializeResponseMessage(__Transport, 'DataAbstract4', 'DataAbstractService', 'ExecuteCommandResponse');
+    __Message.Write('Result', TypeInfo(Integer), lResult, []);
+    __Message.Finalize;
+    __Message.UnsetAttributes(__Transport);
+
+  finally
+    __lObjectDisposer := TROObjectDisposer.Create(__Instance);
+    try
+      __lObjectDisposer.Add(aParameterArray);
+    finally
+      __lObjectDisposer.Free();
+    end;
+  end;
+end;
+
+procedure TDataAbstractService_Invoker.Invoke_ExecuteCommandEx(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function ExecuteCommandEx(const aCommandName: Utf8String; const aInputParameters: DataParameterArray; out aOutputParameters: DataParameterArray): Integer; }
+var
+  aCommandName: Utf8String;
+  aInputParameters: DataAbstract4_Intf.DataParameterArray;
+  aOutputParameters: DataAbstract4_Intf.DataParameterArray;
+  lResult: Integer;
+  __lObjectDisposer: TROObjectDisposer;
+begin
+  aInputParameters := nil;
+  aOutputParameters := nil;
+  try
+    __Message.Read('aCommandName', TypeInfo(Utf8String), aCommandName, []);
+    __Message.Read('aInputParameters', TypeInfo(DataAbstract4_Intf.DataParameterArray), aInputParameters, []);
+
+    lResult := (__Instance as IDataAbstractService).ExecuteCommandEx(aCommandName, aInputParameters, aOutputParameters);
+
+    __Message.InitializeResponseMessage(__Transport, 'DataAbstract4', 'DataAbstractService', 'ExecuteCommandExResponse');
+    __Message.Write('Result', TypeInfo(Integer), lResult, []);
+    __Message.Write('aOutputParameters', TypeInfo(DataAbstract4_Intf.DataParameterArray), aOutputParameters, []);
+    __Message.Finalize;
+    __Message.UnsetAttributes(__Transport);
+
+  finally
+    __lObjectDisposer := TROObjectDisposer.Create(__Instance);
+    try
+      __lObjectDisposer.Add(aInputParameters);
+      __lObjectDisposer.Add(aOutputParameters);
+    finally
+      __lObjectDisposer.Free();
+    end;
+  end;
+end;
+
+procedure TDataAbstractService_Invoker.Invoke_GetTableSchema(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function GetTableSchema(const aTableNameArray: StringArray): Utf8String; }
+var
+  aTableNameArray: DataAbstract4_Intf.StringArray;
+  lResult: Utf8String;
+  __lObjectDisposer: TROObjectDisposer;
+begin
+  aTableNameArray := nil;
+  try
+    __Message.Read('aTableNameArray', TypeInfo(DataAbstract4_Intf.StringArray), aTableNameArray, []);
+
+    lResult := (__Instance as IDataAbstractService).GetTableSchema(aTableNameArray);
+
+    __Message.InitializeResponseMessage(__Transport, 'DataAbstract4', 'DataAbstractService', 'GetTableSchemaResponse');
+    __Message.Write('Result', TypeInfo(Utf8String), lResult, []);
+    __Message.Finalize;
+    __Message.UnsetAttributes(__Transport);
+
+  finally
+    __lObjectDisposer := TROObjectDisposer.Create(__Instance);
+    try
+      __lObjectDisposer.Add(aTableNameArray);
+    finally
+      __lObjectDisposer.Free();
+    end;
+  end;
+end;
+
+procedure TDataAbstractService_Invoker.Invoke_GetCommandSchema(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function GetCommandSchema(const aCommandNameArray: StringArray): Utf8String; }
+var
+  aCommandNameArray: DataAbstract4_Intf.StringArray;
+  lResult: Utf8String;
+  __lObjectDisposer: TROObjectDisposer;
+begin
+  aCommandNameArray := nil;
+  try
+    __Message.Read('aCommandNameArray', TypeInfo(DataAbstract4_Intf.StringArray), aCommandNameArray, []);
+
+    lResult := (__Instance as IDataAbstractService).GetCommandSchema(aCommandNameArray);
+
+    __Message.InitializeResponseMessage(__Transport, 'DataAbstract4', 'DataAbstractService', 'GetCommandSchemaResponse');
+    __Message.Write('Result', TypeInfo(Utf8String), lResult, []);
+    __Message.Finalize;
+    __Message.UnsetAttributes(__Transport);
+
+  finally
+    __lObjectDisposer := TROObjectDisposer.Create(__Instance);
+    try
+      __lObjectDisposer.Add(aCommandNameArray);
+    finally
+      __lObjectDisposer.Free();
+    end;
+  end;
+end;
+
+procedure TDataAbstractService_Invoker.Invoke_SQLGetData(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function SQLGetData(const aSQLText: Utf8String; const aIncludeSchema: Boolean; const aMaxRecords: Integer): Binary; }
+var
+  aSQLText: Utf8String;
+  aIncludeSchema: Boolean;
+  aMaxRecords: Integer;
+  lResult: Binary;
+  __lObjectDisposer: TROObjectDisposer;
+begin
+  lResult := nil;
+  try
+    __Message.Read('aSQLText', TypeInfo(Utf8String), aSQLText, []);
+    __Message.Read('aIncludeSchema', TypeInfo(Boolean), aIncludeSchema, []);
+    __Message.Read('aMaxRecords', TypeInfo(Integer), aMaxRecords, []);
+
+    lResult := (__Instance as IDataAbstractService).SQLGetData(aSQLText, aIncludeSchema, aMaxRecords);
+
+    __Message.InitializeResponseMessage(__Transport, 'DataAbstract4', 'DataAbstractService', 'SQLGetDataResponse');
+    __Message.Write('Result', TypeInfo(Binary), lResult, []);
+    __Message.Finalize;
+    __Message.UnsetAttributes(__Transport);
+
+  finally
+    __lObjectDisposer := TROObjectDisposer.Create(__Instance);
+    try
+      __lObjectDisposer.Add(lResult);
+    finally
+      __lObjectDisposer.Free();
+    end;
+  end;
+end;
+
+procedure TDataAbstractService_Invoker.Invoke_SQLGetDataEx(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function SQLGetDataEx(const aSQLText: Utf8String; const aIncludeSchema: Boolean; const aMaxRecords: Integer; const aDynamicWhereXML: Widestring): Binary; }
+var
+  aSQLText: Utf8String;
+  aIncludeSchema: Boolean;
+  aMaxRecords: Integer;
+  aDynamicWhereXML: Widestring;
+  lResult: Binary;
+  __lObjectDisposer: TROObjectDisposer;
+begin
+  lResult := nil;
+  try
+    __Message.Read('aSQLText', TypeInfo(Utf8String), aSQLText, []);
+    __Message.Read('aIncludeSchema', TypeInfo(Boolean), aIncludeSchema, []);
+    __Message.Read('aMaxRecords', TypeInfo(Integer), aMaxRecords, []);
+    __Message.Read('aDynamicWhereXML', TypeInfo(Widestring), aDynamicWhereXML, []);
+
+    lResult := (__Instance as IDataAbstractService).SQLGetDataEx(aSQLText, aIncludeSchema, aMaxRecords, aDynamicWhereXML);
+
+    __Message.InitializeResponseMessage(__Transport, 'DataAbstract4', 'DataAbstractService', 'SQLGetDataExResponse');
+    __Message.Write('Result', TypeInfo(Binary), lResult, []);
+    __Message.Finalize;
+    __Message.UnsetAttributes(__Transport);
+
+  finally
+    __lObjectDisposer := TROObjectDisposer.Create(__Instance);
+    try
+      __lObjectDisposer.Add(lResult);
+    finally
+      __lObjectDisposer.Free();
+    end;
+  end;
+end;
+
+procedure TDataAbstractService_Invoker.Invoke_SQLExecuteCommand(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function SQLExecuteCommand(const aSQLText: Utf8String): Integer; }
+var
+  aSQLText: Utf8String;
+  lResult: Integer;
+begin
+  try
+    __Message.Read('aSQLText', TypeInfo(Utf8String), aSQLText, []);
+
+    lResult := (__Instance as IDataAbstractService).SQLExecuteCommand(aSQLText);
+
+    __Message.InitializeResponseMessage(__Transport, 'DataAbstract4', 'DataAbstractService', 'SQLExecuteCommandResponse');
+    __Message.Write('Result', TypeInfo(Integer), lResult, []);
+    __Message.Finalize;
+    __Message.UnsetAttributes(__Transport);
+
+  finally
+  end;
+end;
+
+procedure TDataAbstractService_Invoker.Invoke_SQLExecuteCommandEx(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function SQLExecuteCommandEx(const aSQLText: Utf8String; const aDynamicWhereXML: Widestring): Integer; }
+var
+  aSQLText: Utf8String;
+  aDynamicWhereXML: Widestring;
+  lResult: Integer;
+begin
+  try
+    __Message.Read('aSQLText', TypeInfo(Utf8String), aSQLText, []);
+    __Message.Read('aDynamicWhereXML', TypeInfo(Widestring), aDynamicWhereXML, []);
+
+    lResult := (__Instance as IDataAbstractService).SQLExecuteCommandEx(aSQLText, aDynamicWhereXML);
+
+    __Message.InitializeResponseMessage(__Transport, 'DataAbstract4', 'DataAbstractService', 'SQLExecuteCommandExResponse');
+    __Message.Write('Result', TypeInfo(Integer), lResult, []);
+    __Message.Finalize;
+    __Message.UnsetAttributes(__Transport);
+
+  finally
+  end;
+end;
+
+procedure TDataAbstractService_Invoker.Invoke_GetDatasetScripts(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function GetDatasetScripts(const DatasetNames: Utf8String): Utf8String; }
+var
+  DatasetNames: Utf8String;
+  lResult: Utf8String;
+begin
+  try
+    __Message.Read('DatasetNames', TypeInfo(Utf8String), DatasetNames, []);
+
+    lResult := (__Instance as IDataAbstractService).GetDatasetScripts(DatasetNames);
+
+    __Message.InitializeResponseMessage(__Transport, 'DataAbstract4', 'DataAbstractService', 'GetDatasetScriptsResponse');
+    __Message.Write('Result', TypeInfo(Utf8String), lResult, []);
+    __Message.Finalize;
+    __Message.UnsetAttributes(__Transport);
+
+  finally
+  end;
+end;
+
+procedure TDataAbstractService_Invoker.Invoke_RegisterForDataChangeNotification(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ procedure RegisterForDataChangeNotification(const aTableName: Utf8String); }
+var
+  aTableName: Utf8String;
+begin
+  try
+    __Message.Read('aTableName', TypeInfo(Utf8String), aTableName, []);
+
+    (__Instance as IDataAbstractService).RegisterForDataChangeNotification(aTableName);
+
+    __Message.InitializeResponseMessage(__Transport, 'DataAbstract4', 'DataAbstractService', 'RegisterForDataChangeNotificationResponse');
+    __Message.Finalize;
+    __Message.UnsetAttributes(__Transport);
+
+    __oResponseOptions := [roNoResponse];
+
+  finally
+  end;
+end;
+
+procedure TDataAbstractService_Invoker.Invoke_UnregisterForDataChangeNotification(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ procedure UnregisterForDataChangeNotification(const aTableName: Utf8String); }
+var
+  aTableName: Utf8String;
+begin
+  try
+    __Message.Read('aTableName', TypeInfo(Utf8String), aTableName, []);
+
+    (__Instance as IDataAbstractService).UnregisterForDataChangeNotification(aTableName);
+
+    __Message.InitializeResponseMessage(__Transport, 'DataAbstract4', 'DataAbstractService', 'UnregisterForDataChangeNotificationResponse');
+    __Message.Finalize;
+    __Message.UnsetAttributes(__Transport);
+
+    __oResponseOptions := [roNoResponse];
+
+  finally
+  end;
+end;
+
+{ TSimpleLoginService_Invoker }
+
+constructor TSimpleLoginService_Invoker.Create;
+begin
+  inherited Create;
+  FAbstract := True;
+end;
+
+procedure TSimpleLoginService_Invoker.Invoke_Login(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function Login(const aUserID: Utf8String; const aPassword: Utf8String; out aUserInfo: UserInfo): Boolean; }
+var
+  aUserID: Utf8String;
+  aPassword: Utf8String;
+  aUserInfo: DataAbstract4_Intf.UserInfo;
+  lResult: Boolean;
+  __lObjectDisposer: TROObjectDisposer;
+begin
+  aUserInfo := nil;
+  try
+    __Message.Read('aUserID', TypeInfo(Utf8String), aUserID, []);
+    __Message.Read('aPassword', TypeInfo(Utf8String), aPassword, []);
+
+    lResult := (__Instance as ISimpleLoginService).Login(aUserID, aPassword, aUserInfo);
+
+    __Message.InitializeResponseMessage(__Transport, 'DataAbstract4', 'SimpleLoginService', 'LoginResponse');
+    __Message.Write('Result', TypeInfo(Boolean), lResult, []);
+    __Message.Write('aUserInfo', TypeInfo(DataAbstract4_Intf.UserInfo), aUserInfo, []);
+    __Message.Finalize;
+    __Message.UnsetAttributes(__Transport);
+
+  finally
+    __lObjectDisposer := TROObjectDisposer.Create(__Instance);
+    try
+      __lObjectDisposer.Add(aUserInfo);
+    finally
+      __lObjectDisposer.Free();
+    end;
+  end;
+end;
+
+{ TBaseLoginService_Invoker }
+
+constructor TBaseLoginService_Invoker.Create;
+begin
+  inherited Create;
+  FAbstract := True;
+end;
+
+procedure TBaseLoginService_Invoker.Invoke_Logout(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ procedure Logout; }
+begin
+  try
+    (__Instance as IBaseLoginService).Logout;
+
+    __Message.InitializeResponseMessage(__Transport, 'DataAbstract4', 'BaseLoginService', 'LogoutResponse');
+    __Message.Finalize;
+
+    __oResponseOptions := [roNoResponse];
+
+  finally
+  end;
+end;
+
+{ TMultiDbLoginService_Invoker }
+
+constructor TMultiDbLoginService_Invoker.Create;
+begin
+  inherited Create;
+  FAbstract := True;
+end;
+
+procedure TMultiDbLoginService_Invoker.Invoke_Login(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function Login(const aUserID: Utf8String; const aPassword: Utf8String; const aConnectionName: Utf8String; out aUserInfo: UserInfo): Boolean; }
+var
+  aUserID: Utf8String;
+  aPassword: Utf8String;
+  aConnectionName: Utf8String;
+  aUserInfo: DataAbstract4_Intf.UserInfo;
+  lResult: Boolean;
+  __lObjectDisposer: TROObjectDisposer;
+begin
+  aUserInfo := nil;
+  try
+    __Message.Read('aUserID', TypeInfo(Utf8String), aUserID, []);
+    __Message.Read('aPassword', TypeInfo(Utf8String), aPassword, []);
+    __Message.Read('aConnectionName', TypeInfo(Utf8String), aConnectionName, []);
+
+    lResult := (__Instance as IMultiDbLoginService).Login(aUserID, aPassword, aConnectionName, aUserInfo);
+
+    __Message.InitializeResponseMessage(__Transport, 'DataAbstract4', 'MultiDbLoginService', 'LoginResponse');
+    __Message.Write('Result', TypeInfo(Boolean), lResult, []);
+    __Message.Write('aUserInfo', TypeInfo(DataAbstract4_Intf.UserInfo), aUserInfo, []);
+    __Message.Finalize;
+    __Message.UnsetAttributes(__Transport);
+
+  finally
+    __lObjectDisposer := TROObjectDisposer.Create(__Instance);
+    try
+      __lObjectDisposer.Add(aUserInfo);
+    finally
+      __lObjectDisposer.Free();
+    end;
+  end;
+end;
+
+{ TMultiDbLoginServiceV5_Invoker }
+
+constructor TMultiDbLoginServiceV5_Invoker.Create;
+begin
+  inherited Create;
+  FAbstract := True;
+end;
+
+procedure TMultiDbLoginServiceV5_Invoker.Invoke_GetConnectionNames(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function GetConnectionNames: StringArray; }
+var
+  lResult: DataAbstract4_Intf.StringArray;
+  __lObjectDisposer: TROObjectDisposer;
+begin
+  lResult := nil;
+  try
+    lResult := (__Instance as IMultiDbLoginServiceV5).GetConnectionNames;
+
+    __Message.InitializeResponseMessage(__Transport, 'DataAbstract4', 'MultiDbLoginServiceV5', 'GetConnectionNamesResponse');
+    __Message.Write('Result', TypeInfo(DataAbstract4_Intf.StringArray), lResult, []);
+    __Message.Finalize;
+    __Message.UnsetAttributes(__Transport);
+
+  finally
+    __lObjectDisposer := TROObjectDisposer.Create(__Instance);
+    try
+      __lObjectDisposer.Add(lResult);
+    finally
+      __lObjectDisposer.Free();
+    end;
+  end;
+end;
+
+procedure TMultiDbLoginServiceV5_Invoker.Invoke_GetDefaultConnectionName(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function GetDefaultConnectionName: Utf8String; }
+var
+  lResult: Utf8String;
+begin
+  try
+    lResult := (__Instance as IMultiDbLoginServiceV5).GetDefaultConnectionName;
+
+    __Message.InitializeResponseMessage(__Transport, 'DataAbstract4', 'MultiDbLoginServiceV5', 'GetDefaultConnectionNameResponse');
+    __Message.Write('Result', TypeInfo(Utf8String), lResult, []);
+    __Message.Finalize;
+    __Message.UnsetAttributes(__Transport);
+
+  finally
+  end;
+end;
+
+initialization
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstractService_Impl.dfm b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstractService_Impl.dfm
new file mode 100644
index 0000000..65deb18
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstractService_Impl.dfm	
@@ -0,0 +1,5 @@
+object DataAbstractService: TDataAbstractService
+  OldCreateOrder = True
+  Height = 437
+  Width = 546
+end
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstractService_Impl.lfm b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstractService_Impl.lfm
new file mode 100644
index 0000000..e5b4ff9
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstractService_Impl.lfm	
@@ -0,0 +1,7 @@
+inherited DataAbstractService: TDataAbstractService
+  OldCreateOrder = True
+  Height = 437
+  HorizontalOffset = 0
+  VerticalOffset = 0
+  Width = 546
+end
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstractService_Impl.lrs b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstractService_Impl.lrs
new file mode 100644
index 0000000..cca0dab
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstractService_Impl.lrs	
@@ -0,0 +1,7 @@
+{ This is an automatically generated lazarus resource file }
+
+LazarusResources.Add('TDataAbstractService','FORMDATA',[
+  'TPF0'#241#20'TDataAbstractService'#19'DataAbstractService'#14'OldCreateOrder'
+  +#9#6'Height'#3#181#1#16'HorizontalOffset'#2#0#14'VerticalOffset'#2#0#5'Width'
+  +#3'"'#2#0#0
+]);
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstractService_Impl.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstractService_Impl.pas
new file mode 100644
index 0000000..06fe45a
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstractService_Impl.pas	
@@ -0,0 +1,1455 @@
+unit DataAbstractService_Impl;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{----------------------------------------------------------------------------}
+{ When applying fixes to this unit, please see if the need to be propagates  }
+{ to the duplicate dlogic in legacy DARemoteService_Impl.pas, too.           }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  {vcl:} Classes, SysUtils, DB,
+  {Generated:} DataAbstract4_Intf,
+  uROClientIntf, uROTypes, uROServer, uROSessions, uRORemoteDataModule, uROClasses,
+  uDAInterfaces, uDAClasses, uDADataTable, uDADataStreamer, uDABusinessProcessor,
+  uDADataTableReferenceCollection, uDADelta;
+
+type
+  { Events }
+  TDAAcquireConnectionEvent = procedure(aSender: TObject; var aConnectionName: string) of object;
+  TDAConnectionAcquiredEvent = procedure(aSender: TObject; const aConnectionName: string; const aAcquiredConnection: IDAConnection) of object;
+  TDAAcquireConnectionFailureEvent = procedure(aSender: TObject; const aConnectionName: string; aError: Exception) of object;
+  TDAGetDatasetSchemaEvent = procedure(aSender: TObject; const aDataset: IDADataset) of object;
+  TDAGetDatasetDataEvent = procedure(aSender: TObject; const aDataset: IDADataset; const aIncludeSchema: Boolean; const aMaxRecords: Integer) of object;
+  TDABusinessProcessorAutoCreatedEvent = procedure(aSender: TRORemoteDataModule; BusinessProcessor : TDABusinessProcessor) of object;
+  TDABeforeExecuteCommandEvent = procedure(aSender: TObject; const aCommand: IDASQLCommand) of object;
+  TDAAfterExecuteCommandEvent = procedure(aSender: TObject; const aCommand: IDASQLCommand; aRowsAffacted : integer) of object;
+  TDAConnectionReleasedEvent = procedure(aSender: TObject; const aConnectionName: string) of object;
+  TDAGetSchemaAsXMLEvent = procedure(aSender: TObject; var aSchemaXML: Utf8string) of object;
+  TDAProcessDeltasEvent = procedure(aSender: TObject; aDeltaStructs: TDADeltaStructList) of object;
+  TDAProcessDeltasErrorEvent = procedure(aSender: TObject; aDeltaStructs: TDADeltaStructList; aError: Exception; var aDoRaise: boolean) of object;
+  TDASchemaElementAccessValidationEvent = procedure(Sender: TObject; const aConnection: IDAConnection; const aDatasetName: string;
+                                          const aParamNames: array of string; const aParamValues : array of variant;
+                                          aSchema: TDASchema; var Allowed : boolean) of object;
+  TDASQLValidationEvent = procedure(Sender: TObject; const aConnection: IDAConnection; const aSQLText: string;
+                                          const aParamNames: array of string; const aParamValues : array of variant;
+                                          var Allowed : boolean) of object;
+  TDAUpdateDataTransactionEvent = procedure(Sender: TObject; var aUseDefaultTransactionLogic: Boolean) of object;
+
+  TDADeltasMode = (dumExported, dumStandard);
+  TDADeltasModes = set of TDADeltasMode;
+  { TDataAbstractService }
+  TDataAbstractService = class(TRORemoteDataModule, IDataAbstractService)
+  private
+    { Properties }
+    fAllowExecuteCommands: boolean;
+    fAllowExecuteSQL: boolean;
+    fAllowDataAccess: boolean;
+    fAllowSchemaAccess: boolean;
+    fAllowWhereSQL: boolean;
+    fConnectionName: string;
+    fAcquireConnection: boolean;
+    fServiceSchema: TDASchema;
+    fAutoCreateBusinessProcessors: boolean;
+    fServiceDataStreamer: TDADataStreamer;
+    fProcessDeltasWithoutUpdateRules: boolean;
+
+    fConnection: IDAConnection;
+    fHETConnection: IDAHETConnection;
+    fExportedDataTables: TDADataTableReferenceCollection;
+
+    { Events }
+    fBeforeGetDatasetSchema: TDAGetDatasetSchemaEvent;
+    fBeforeProcessDeltas: TDAProcessDeltasEvent;
+    fOnAcquireConnectionFailure: TDAAcquireConnectionFailureEvent;
+    fOnUpdateDataCommitTransaction: TDAUpdateDataTransactionEvent;
+    fGetDatasetDataValidation: TDASchemaElementAccessValidationEvent;
+    fExecuteCommandValidation: TDASchemaElementAccessValidationEvent;
+    fSQLValidation: TDASQLValidationEvent;
+    fAfterExecuteCommand: TDAAfterExecuteCommandEvent;
+    fBeforeAcquireConnection: TDAAcquireConnectionEvent;
+    fOnUpdateDataRollBackTransaction: TDAUpdateDataTransactionEvent;
+    fAfterGetDatasetData: TDAGetDatasetDataEvent;
+    fAfterReleaseConnection: TDAConnectionReleasedEvent;
+    fAfterGetDatasetSchema: TDAGetDatasetSchemaEvent;
+    fAfterProcessDeltas: TDAProcessDeltasEvent;
+    fOnGetSchemaAsXML: TDAGetSchemaAsXMLEvent;
+    fOnBusinessProcessorAutoCreated: TDABusinessProcessorAutoCreatedEvent;
+    fOnUpdateDataBeginTransaction: TDAUpdateDataTransactionEvent;
+    fAfterAcquireConnection: TDAConnectionAcquiredEvent;
+    fOnProcessDeltasError: TDAProcessDeltasErrorEvent;
+    fBeforeExecuteCommand: TDABeforeExecuteCommandEvent;
+    fBeforeGetDatasetData: TDAGetDatasetDataEvent;
+    fBeforeReleaseConnection: TDAConnectionAcquiredEvent;
+    fAllowDynamicSelect: boolean;
+    fAllowDynamicWhere: boolean;
+    fAllowUpdates: boolean;
+    fHasReducedDelta: Boolean;
+    fReturnUpdateFailureDelta: boolean;
+
+    procedure SetServiceDataStreamer(const Value: TDADataStreamer);
+    procedure SetServiceSchema(const Value: TDASchema);
+    procedure SetExportedDataTables(const Value: TDADataTableReferenceCollection);
+    procedure Check(CheckOnlyDataStreamer:Boolean = false);
+  private
+    function GetConnection: IDAConnection;
+    function UnpackDeltas(const DeltaStream: Binary; DeltaStructList: TDADeltaStructList): TDADeltasModes;
+    function TriggerTransactionEvent(aEvent: TDAUpdateDataTransactionEvent): boolean;
+    procedure ExportedDataTables_MergeDelta(ADelta: IDADelta);
+  protected
+    { IDataAbstractService methods }
+    function GetSchema(const aFilter: Utf8String): Utf8String;
+    function GetData(const aTableNameArray: StringArray; const aTableRequestInfoArray: TableRequestInfoArray): Binary;
+    function UpdateData(const aDelta: Binary): Binary;
+    function ExecuteCommand(const aCommandName: Utf8String; const aParameterArray: DataParameterArray): Integer;
+    function GetTableSchema(const aTableNameArray: StringArray): Utf8String;
+    function GetCommandSchema(const aCommandNameArray: StringArray): Utf8String;
+    function SQLGetData(const aSQLText: Utf8String; const aIncludeSchema: Boolean; const aMaxRecords: Integer): Binary;
+    function SQLGetDataEx(const aSQLText: Utf8String; const aIncludeSchema: Boolean; const aMaxRecords: Integer; const aDynamicWhereXML: Widestring): Binary;
+    function SQLExecuteCommand(const aSQLText: Utf8String): Integer;
+    function SQLExecuteCommandEx(const aSQLText: Utf8String; const aDynamicWhereXML: Widestring): Integer;
+    function  ExecuteCommandEx(const aCommandName: Utf8String;
+      const aInputParameters: DataParameterArray;
+      out aOutputParameters: DataParameterArray): Integer;
+    function GetDatasetScripts(const DatasetNames: Utf8String): Utf8String;
+    procedure RegisterForDataChangeNotification(const aTableName: Utf8String);
+    procedure UnregisterForDataChangeNotification(const aTableName: Utf8String);
+
+    { TRORemoteDataModule }
+    procedure DoOnDeactivate(aClientID: TGUID); override;
+
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+
+    function GetConnectionForObject(const aName: string): IDAConnection; virtual;
+  public
+    constructor Create(aOwner : TComponent); override;
+    destructor Destroy; override;
+
+    procedure SetConnection(aConnection: IDAConnection); deprecated;
+    {$WARN SYMBOL_DEPRECATED OFF}
+    property Connection: IDAConnection read GetConnection write SetConnection;
+    {$WARN SYMBOL_DEPRECATED ON}
+
+    procedure ReleaseConnection;
+  published
+    property AcquireConnection: boolean read fAcquireConnection write fAcquireConnection default true;
+    property ConnectionName: string read fConnectionName write fConnectionName;
+    property AutoCreateBusinessProcessors : boolean read fAutoCreateBusinessProcessors write fAutoCreateBusinessProcessors default true;
+    property ServiceSchema: TDASchema read fServiceSchema write SetServiceSchema;
+    property ServiceDataStreamer: TDADataStreamer read fServiceDataStreamer write SetServiceDataStreamer;
+
+    property AllowDataAccess: boolean read fAllowDataAccess write fAllowDataAccess default true;
+    property AllowSchemaAccess: boolean read fAllowSchemaAccess write fAllowSchemaAccess default true;
+    property AllowUpdates: boolean read fAllowUpdates write fAllowUpdates default true;
+    property AllowExecuteSQL: boolean read fAllowExecuteSQL write fAllowExecuteSQL default false;
+    property AllowWhereSQL: boolean read fAllowWhereSQL write fAllowWhereSQL default false;
+    property AllowExecuteCommands: boolean read fAllowExecuteCommands write fAllowExecuteCommands default false;
+    property AllowDynamicSelect: boolean read fAllowDynamicSelect write fAllowDynamicSelect default true;
+    property AllowDynamicWhere: boolean read fAllowDynamicWhere write fAllowDynamicWhere default true;
+
+    property ProcessDeltasWithoutUpdateRules: boolean read fProcessDeltasWithoutUpdateRules write fProcessDeltasWithoutUpdateRules default true;
+    property ExportedDataTables: TDADataTableReferenceCollection read fExportedDataTables write SetExportedDataTables;
+    property ReturnUpdateFailureDelta: boolean read fReturnUpdateFailureDelta write FReturnUpdateFailureDelta default True;
+
+    { Events }
+    property BeforeAcquireConnection: TDAAcquireConnectionEvent read fBeforeAcquireConnection write fBeforeAcquireConnection;
+    property AfterAcquireConnection: TDAConnectionAcquiredEvent read fAfterAcquireConnection write fAfterAcquireConnection;
+    property BeforeReleaseConnection: TDAConnectionAcquiredEvent read fBeforeReleaseConnection write fBeforeReleaseConnection;
+    property AfterReleaseConnection: TDAConnectionReleasedEvent read fAfterReleaseConnection write fAfterReleaseConnection;
+    property OnAcquireConnectionFailure: TDAAcquireConnectionFailureEvent read fOnAcquireConnectionFailure write fOnAcquireConnectionFailure;
+
+    property BeforeProcessDeltas : TDAProcessDeltasEvent read fBeforeProcessDeltas write fBeforeProcessDeltas;
+    property AfterProcessDeltas: TDAProcessDeltasEvent read fAfterProcessDeltas write fAfterProcessDeltas;
+    property OnProcessDeltasError: TDAProcessDeltasErrorEvent read fOnProcessDeltasError write fOnProcessDeltasError;
+
+    property BeforeGetDatasetSchema: TDAGetDatasetSchemaEvent read fBeforeGetDatasetSchema write fBeforeGetDatasetSchema;
+    property BeforeGetDatasetData: TDAGetDatasetDataEvent read fBeforeGetDatasetData write fBeforeGetDatasetData;
+    property AfterGetDatasetSchema: TDAGetDatasetSchemaEvent read fAfterGetDatasetSchema write fAfterGetDatasetSchema;
+    property AfterGetDatasetData: TDAGetDatasetDataEvent read fAfterGetDatasetData write fAfterGetDatasetData;
+    property OnBusinessProcessorAutoCreated: TDABusinessProcessorAutoCreatedEvent read fOnBusinessProcessorAutoCreated write fOnBusinessProcessorAutoCreated;
+    property BeforeExecuteCommand: TDABeforeExecuteCommandEvent read fBeforeExecuteCommand write fBeforeExecuteCommand;
+    property AfterExecuteCommand: TDAAfterExecuteCommandEvent read fAfterExecuteCommand write fAfterExecuteCommand;
+    property OnGetSchemaAsXMLEvent: TDAGetSchemaAsXMLEvent read fOnGetSchemaAsXML write fOnGetSchemaAsXML;
+    property ValidateDatasetAccess: TDASchemaElementAccessValidationEvent read fGetDatasetDataValidation write fGetDatasetDataValidation;
+    property ValidateCommandExecution: TDASchemaElementAccessValidationEvent read  fExecuteCommandValidation write fExecuteCommandValidation;
+    property ValidateDirectSQLAccess: TDASQLValidationEvent read fSQLValidation write fSQLValidation;
+
+    property OnUpdateDataBeginTransaction    : TDAUpdateDataTransactionEvent read fOnUpdateDataBeginTransaction write fOnUpdateDataBeginTransaction;
+    property OnUpdateDataCommitTransaction   : TDAUpdateDataTransactionEvent read fOnUpdateDataCommitTransaction write fOnUpdateDataCommitTransaction;
+    property OnUpdateDataRollBackTransaction : TDAUpdateDataTransactionEvent read fOnUpdateDataRollBackTransaction write fOnUpdateDataRollBackTransaction;
+  end;
+
+implementation
+
+uses
+  Contnrs, Variants,
+  uDARes, uDAExceptions, uDAXMLUtils, uROXMLIntf,
+  TypInfo, uDAEngine, uDAWhere;
+
+procedure CheckUTF8Decode(const aOriginalStr: Utf8String; aDecodedStr: string);
+begin
+  if (aDecodedStr = '') and (aOriginalStr <> '') then raise Exception.CreateFmt(err_UTF8DecodeError, [aOriginalStr]);
+end;
+{ DataAbstractService }
+
+constructor TDataAbstractService.Create(aOwner : TComponent);
+begin
+  fAllowDataAccess := true;
+  fAllowSchemaAccess := true;
+  fAllowDynamicSelect := true;
+  fAllowDynamicWhere := true;
+  fAllowUpdates := true;
+  fAutoCreateBusinessProcessors := true;
+  fProcessDeltasWithoutUpdateRules := true;
+  fAcquireConnection := true;
+  fExportedDataTables := TDADataTableReferenceCollection.Create(Self);
+  fReturnUpdateFailureDelta := True;
+  inherited;
+end;
+
+destructor TDataAbstractService.Destroy;
+begin
+  inherited;
+  FreeAndNIL(fExportedDataTables);
+end;
+
+procedure TDataAbstractService.Notification(AComponent: TComponent; Operation: TOperation);
+var
+  lRef: TDADataTableReference;
+begin
+  inherited;
+
+  if (Operation = opRemove) then begin
+
+    if ((AComponent is TDADataTable) or (AComponent is TDataSet)) and (fExportedDataTables.Count > 0) then begin
+      lRef := fExportedDataTables.FindByDataTable(TDADataTable(aComponent));
+      if (lRef<>NIL) then lRef.DataTable := NIL;
+    end else if (AComponent = ServiceSchema) then
+      ServiceSchema := nil
+    else if (AComponent = ServiceDataStreamer) then
+      ServiceDataStreamer := nil;
+  end
+
+end;
+
+function TDataAbstractService.TriggerTransactionEvent(aEvent: TDAUpdateDataTransactionEvent): boolean;
+begin
+  result := true;
+  if assigned(aEvent) then aEvent(self, result);
+end;
+
+{ IDataAbstractService: Schema Access }
+
+function TDataAbstractService.GetSchema(const aFilter: Utf8String): Utf8String;
+var
+  xml: TStringStream;
+  dummyrefs: TObjectList;
+  tempSchema: TDASchema;
+
+  procedure MergeDatatablesToSchema(aList: TObjectList);
+  var i : integer;
+      ref : TDADataset;
+      dt : IDADataset;
+  begin
+    for i := 0 to fExportedDataTables.Count-1 do
+      if fExportedDataTables[i].IsValidReference then begin
+        dt := fExportedDataTables[i].Dataset;
+
+        ref := tempSchema.Datasets.Add;
+        ref.Name := dt.LogicalName;
+        ref.Fields.AssignFieldCollection(dt.Fields);
+        ref.Params.AssignParamCollection(dt.Params);
+
+        aList.Add(ref);
+      end;
+  end;
+
+begin
+  if not AllowSchemaAccess then
+    raise Exception.Create('Schema access has been disabled (GetSchema)');
+
+  tempSchema := ServiceSchema;
+  if not Assigned(tempSchema)  and (fExportedDataTables.Count<>0) then
+    tempSchema := TDASchema.Create(nil);
+
+  if not Assigned(tempSchema) then
+    raise Exception.Create('ServiceSchema property is not assigned and no data tables are exported.');
+
+  dummyrefs := nil;
+  try
+    // New: merges the data tables references by the service
+    if (fExportedDataTables.Count>0) then begin
+      dummyrefs := TObjectList.Create(true);;
+      MergeDatatablesToSchema(dummyrefs);
+    end;
+
+    // Returns the schema
+    xml := TStringStream.Create('');
+    try
+      tempSchema.SaveToStream(xml);
+
+      result := AnsiToUtf8(xml.DataString);
+
+      if Assigned(fOnGetSchemaAsXML) then fOnGetSchemaAsXML(Self, result);
+    finally
+      xml.Free;
+    end;
+
+  finally
+    FreeAndNil(dummyrefs); // automatically removes the datatables from the schema again
+    if tempSchema <> ServiceSchema then tempSchema.Free;
+  end;
+end;
+
+function TDataAbstractService.GetTableSchema(const aTableNameArray: StringArray): Utf8String;
+
+  function CreateDatasetFromIDADataset(aRef: IDADataset): TDADataset;
+  begin
+    Result := TDADataset.Create(nil);
+    Result.Name := aRef.LogicalName;
+    Result.Fields.AssignFieldCollection(aRef.Fields);
+    Result.Params.AssignParamCollection(aRef.Params);
+  end;
+
+var
+  lxml: IXMLDocument;
+  i: integer;
+  lDataSet: TDADataset;
+  lDataTableRef: TDADataTableReference;
+  lNeedDeleteDataset: Boolean;
+  lTableName: string;
+begin
+  if not AllowSchemaAccess then
+    raise Exception.Create('Schema access has been disabled (GetTableSchema)');
+
+  if not Assigned(ServiceSchema) and (fExportedDataTables.Count=0) then
+    raise Exception.Create('ServiceSchema property is not assigned and no data tables are exported.');
+
+  // Returns the schema
+  lxml := NewROXmlDocument;
+  lxml.New('DataTables');
+  try
+    for i := 0 to aTableNameArray.Count - 1 do begin
+      lTableName := UTF8ToString(aTableNameArray[i]);
+      CheckUTF8Decode(aTableNameArray[i], lTableName);
+      lDataSet := nil;
+      if (fExportedDataTables.Count > 0) then begin
+        lDataTableRef := fExportedDataTables.FindByName(lTableName);
+        if lDataTableRef <> nil then lDataSet := CreateDatasetFromIDADataset(lDataTableRef.Dataset);
+      end;
+      lNeedDeleteDataset := lDataSet <> nil;
+      if not lNeedDeleteDataset and (ServiceSchema <> nil) then
+         lDataSet := ServiceSchema.Datasets.DatasetByName(lTableName);
+      try
+        if lDataSet <> nil then begin
+          // if Assigned(fBeforeGetDatasetSchema) then fBeforeGetDatasetSchema(Self, lDataset as IDADataset);
+          SaveObjectToXMLNode(lDataSet, lxml.DocumentNode.Add('SchemaDataTable'), [], [], False);
+          //if Assigned(FAfterGetDatasetSchema) then FAfterGetDatasetSchema(Self, lDataset as IDADataset);
+          if not (lDataSet.IsPublic) then
+            raise EDAException.Create(lDataset.Name +' is not accessible');
+        end;
+      finally
+        if lNeedDeleteDataset then lDataSet.Free;
+      end;
+    end;
+    Result := UTF8Encode(lxml.DocumentNode.XML);
+  finally
+    lxml := nil;
+  end;
+end;
+
+function TDataAbstractService.GetCommandSchema(const aCommandNameArray: StringArray): Utf8String;
+var
+  lxml: IXMLDocument;
+  i: integer;
+  lSQLCommand: TDASQLCommand;
+  lCommand: string;
+begin
+  if not AllowSchemaAccess then
+    raise Exception.Create('Schema access has been disabled (GetCommandSchema)');
+
+  if not Assigned(ServiceSchema) then
+    raise Exception.Create('ServiceSchema property is not assigned.');
+
+  // Returns the schema
+  lxml := NewROXmlDocument;
+  lxml.New('Commands');
+  try
+    for i := 0 to aCommandNameArray.Count - 1 do begin
+      lCommand:=UTF8ToString(aCommandNameArray[i]);
+      CheckUTF8Decode(aCommandNameArray[i], lCommand);
+      lSQLCommand:=ServiceSchema.Commands.SQLCommandByName(lCommand);
+      if lSQLCommand <> nil then begin
+        if not lSQLCommand.IsPublic then
+          raise EDAException.Create(lSqlCommand.Name +' is not accessible');
+        SaveObjectToXMLNode(lSQLCommand, lxml.DocumentNode.Add('SchemaCommand'), [], [], False);
+      end;
+    end;
+    result := UTF8Encode(lxml.DocumentNode.XML);
+  finally
+    lxml := nil;
+  end;
+end;
+
+{ IDataAbstractService: Data Access }
+
+function TDataAbstractService.GetData(const aTableNameArray: StringArray; const aTableRequestInfoArray: TableRequestInfoArray): Binary;
+var
+  i, j, x, n,k: integer;
+  lParamNames: array of string;
+  lParamValues: array of Variant;
+  lOptions: TDAWriteOptions;
+  lAllow: boolean;
+  lDataSet: IDADataSet;
+  lEditableDataset: IDAEditableDataset;
+  lHasTransaction: boolean;
+  lMaxRecords: integer;
+  lDataTableRef: TDADataTableReference;
+  lDynSelectFields: array of string;
+  lDynSelectFields2: array of string;
+  lWhereClause, lProcessedWhereClause: WideString;
+ // lConnection: IDAConnection;
+  lTableName: String;
+  lDataTable: TDADataset;
+  lUnionTable: TDAUnionDataTable;
+  lAppendData: TDADataForAppend;
+  lMapping: TDAColumnMappingCollection;
+  lFilter: string;
+begin
+  // WARNING: any changes should be duplicated into TDALocalDataAdapter.InternalFill
+  if not AllowDataAccess then
+    raise Exception.Create('Data access has been disabled (GetData)');
+
+  result := nil;
+  if not assigned(aTableNameArray) or (aTableNameArray.Count = 0) then exit;
+
+  if assigned(aTableRequestInfoArray) and (aTableNameArray.Count <> aTableRequestInfoArray.Count) then
+    raise Exception.Create('Number of items passed to aTableNameArray and aTableRequestInfoArray do not match.');
+
+  Check(True);
+
+  result := Binary.Create;
+  Result.CapacityIncrement := ServiceDataStreamer.BufferSize;
+  try
+    lHasTransaction := false;
+    try
+
+      ServiceDataStreamer.Initialize(result, aiWrite);
+      try
+        for i := 0 to (aTableNameArray.Count-1) do begin
+
+          lTableName := UTF8ToString(aTableNameArray[i]);
+          CheckUTF8Decode(aTableNameArray[i], lTableName);
+          if ServiceSchema <> nil then lDataTable := ServiceSchema.FindDataset(lTableName) else lDataTable:=nil;
+          lOptions := [woRows];
+          lMaxRecords := -1;
+          SetLength(lDynSelectFields,0);
+          lWhereClause := '';
+
+          if assigned(aTableRequestInfoArray) and assigned(aTableRequestInfoArray[i]) then with aTableRequestInfoArray[i] do begin
+            SetLength(lParamNames, Parameters.Count);
+            SetLength(lParamValues, Parameters.Count);
+            for j := 0 to (Parameters.Count-1) do begin
+              lParamNames[j] := UTF8ToString(Parameters[j].Name);
+              CheckUTF8Decode(Parameters[j].Name, lParamNames[j]);
+              lParamValues[j] := Parameters[j].Value;
+            end;
+
+            if IncludeSchema then lOptions := lOptions+[woSchema];
+            lMaxRecords := MaxRecords;
+
+            // v5  TableRequestInfo
+            if aTableRequestInfoArray[i] is TableRequestInfoV5 then
+              with TableRequestInfoV5(aTableRequestInfoArray[i]) do begin
+                if assigned(DynamicSelectFieldNames) then begin
+                  if AllowDynamicSelect then begin
+                    SetLength(lDynSelectFields,DynamicSelectFieldNames.Count);
+                    for j := 0 to DynamicSelectFieldNames.Count-1 do begin
+                      CheckUTF8Decode(DynamicSelectFieldNames[j], UTF8ToString(DynamicSelectFieldNames[j]));
+                      lDynSelectFields[j] := Trim(UTF8ToString(DynamicSelectFieldNames[j]));
+                    end;
+                    if DynamicSelectFieldNames.Count > 0 then lOptions := lOptions+[woSchema];
+                  end else begin
+                    raise EDAException.Create('DynamicSelect support has been disabled (GetData)');
+                  end;
+                end;
+                if assigned(TableRequestInfoV5(aTableRequestInfoArray[i]).WhereClause) then begin
+                  if AllowDynamicWhere then
+                    lWhereClause := WhereClause.XML
+                  else
+                    raise EDAException.Create('DynamicWhere support has been disabled (GetData)');
+                end;
+            end;
+          end;
+
+          if (fExportedDataTables.Count > 0) and Assigned(fExportedDataTables.FindByName(lTableName)) then begin
+           // lConnection := nil;
+          end
+          else begin
+            Check();
+            //lConnection := GetConnectionForObject(aTableNameArray[i]);
+          end;
+
+          lAllow := true;
+          if assigned(fGetDatasetDataValidation) then fGetDatasetDataValidation(self, {l}Connection, lTableName, lParamNames, lParamValues, ServiceSchema, lAllow);
+          if not lAllow then raise EDADatasetNotAccessible.CreateFmt(err_DatasetNotAccessible, [lTableName]);
+
+          lDataSet := nil;
+          if (fExportedDataTables.Count > 0) then begin
+            lDataTableRef := fExportedDataTables.FindByName(lTableName);
+            if assigned(lDataTableRef) then lDataSet := lDataTableRef.Dataset;
+          end;
+
+          if not assigned(lDataSet) then begin
+
+            // Create transaction, if needed
+            if not lHasTransaction then begin
+              if TriggerTransactionEvent(fOnUpdateDataBeginTransaction) then begin
+                Connection.BeginTransaction;
+                lHasTransaction := true;
+              end;
+            end;
+
+            lDataTable := ServiceSchema.FindDataset(lTableName);
+
+            { Unions }
+            if lDataTable is TDAUnionDataTable then begin
+
+              if (aTableRequestInfoArray <> nil) then begin
+                lFilter:=UTF8ToString(aTableRequestInfoArray[i].UserFilter);
+                CheckUTF8Decode(aTableRequestInfoArray[i].UserFilter,lFilter);
+                if (Trim(lFilter)<>'') then
+                  raise EDAException.Create('Passing of clear text WHERE clauses is not supported for UNIONS (GetData)');
+              end;
+              lUnionTable := lDataTable as TDAUnionDataTable;
+              lAppendData := ServiceDataStreamer.BeginWriteDataset({Source}nil, {Schema}lDataTable, lOptions, lMaxRecords, lDynSelectFields);
+              if not (woRows in lOptions) then Continue;
+
+              for x := 0 to lUnionTable.SourceTables.Count - 1 do begin
+                lTableName := lUnionTable.SourceTables[x].Name;
+
+                // Check is source table exists in schema.
+                if (not Assigned(ServiceSchema.FindDataset(lTableName))) then
+                  raise EDAException.CreateFmt('Source table %s doesn''t exist in schema.', [lTableName]);
+
+                // Do column remapping for DynFields names
+                lMapping := lUnionTable.SourceTables[x].ColumnMappings;
+                SetLength(lDynSelectFields2, Length(lDynSelectFields));
+                for n := Low(lDynSelectFields) to High(lDynSelectFields) do begin
+                  if (lDynSelectFields[n]) = def_SourceTableFieldName then
+                    lDynSelectFields2[n] := lDynSelectFields[n]
+                  else
+                    lDynSelectFields2[n] := lMapping.MappingByDatasetField(lDynSelectFields[n]).TableField;
+                end;
+
+                // try to predict do we need dynamic where on this source table or not.
+				        lProcessedWhereClause := lWhereClause;
+                if not ProcessDAWhereForUnions(x, lProcessedWhereClause) then Continue;
+
+                lDataSet := ServiceSchema.NewUnionItemDataset(
+                  GetConnectionForObject(lTableName),
+                  lTableName,
+                  lParamNames,
+                  lParamValues,
+                  lDynSelectFields2,
+                  lProcessedWhereClause,
+                  lMapping
+                );
+
+                ServiceDataStreamer.WriteDatasetData(lDataSet, lAppendData, x);
+                // Keeping track of maxrecords
+                if ((lMaxRecords <> -1) and (lAppendData.RecordCount >= lMaxRecords)) then Break;
+              end;
+              ServiceDataStreamer.EndWriteDataset(lAppendData);
+            end
+            { Joins }
+            else if lDataTable is TDAJoinDataTable then begin
+              raise EDAException.Create('TODO: Joined Data Tables are not implemented in this release, yet.');
+            end
+            { Plain Data Tables }
+            else begin
+
+              lDataSet := ServiceSchema.NewDataset(GetConnectionForObject(lTableName), lTableName, lParamNames, lParamValues, lDynSelectFields, lWhereClause, False);
+
+              if (woSchema in lOptions) and Assigned(fBeforeGetDatasetSchema) then fBeforeGetDatasetSchema(self, lDataset);
+              if (woRows in lOptions) and Assigned(fBeforeGetDatasetData) then fBeforeGetDatasetData(self, lDataset, (woSchema in lOptions), lMaxRecords);
+
+              if (aTableRequestInfoArray <> nil) then begin
+                lFilter:=UTF8ToString(aTableRequestInfoArray[i].UserFilter);
+                CheckUTF8Decode(aTableRequestInfoArray[i].UserFilter,lFilter);
+                if (Trim(lFilter)<>'') then begin
+                  if not AllowWhereSQL then raise Exception.Create('Passing of clear text WHERE clauses has been disabled (GetData)');
+                  lDataSet.Where.AddText(lFilter);
+                  for k := 0 to High(lParamValues) do
+                    lDataSet.ParamByName(lParamNames[k]).Value := lParamValues[k];
+                end;
+              end;
+              lDataSet.Open;
+
+              ServiceDataStreamer.WriteDataset(lDataset, lOptions, lMaxRecords,lDynSelectFields);
+
+              if (woRows in lOptions) and Assigned(fAfterGetDatasetData) then fAfterGetDatasetData(self, lDataset, (woSchema in lOptions), lMaxRecords);
+              if (woSchema in lOptions) and Assigned(fAfterGetDatasetSchema) then fAfterGetDatasetSchema(self, lDataset);
+
+            end;
+
+          end
+          { ExportedDataTables }
+          else begin
+            lFilter:=UTF8ToString(aTableRequestInfoArray[i].UserFilter);
+            CheckUTF8Decode(aTableRequestInfoArray[i].UserFilter,lFilter);
+            if (Trim(lFilter)<>'') then
+              raise EDAException.Create('WHERE clauses are not supported on data from ExportedDataTables.');
+
+            if (woSchema in lOptions) and Assigned(fBeforeGetDatasetSchema) then fBeforeGetDatasetSchema(self, lDataset);
+            if (woRows in lOptions) and Assigned(fBeforeGetDatasetData) then fBeforeGetDatasetData(self, lDataset, (woSchema in lOptions), lMaxRecords);
+
+            if lDataSet.Active and (lMaxRecords = -1) then begin
+              if lDataSet.QueryInterface(IDAEditableDataset,lEditableDataset) = s_ok then
+                lEditableDataset.First
+              else
+                lDataSet.Close;
+            end;
+
+            if not lDataSet.Active then lDataSet.Open;
+            ServiceDataStreamer.WriteDataset(lDataset, lOptions, lMaxRecords,lDynSelectFields);
+
+            if (woRows in lOptions) and Assigned(fAfterGetDatasetData) then fAfterGetDatasetData(self, lDataset, (woSchema in lOptions), lMaxRecords);
+            if (woSchema in lOptions) and Assigned(fAfterGetDatasetSchema) then fAfterGetDatasetSchema(self, lDataset);
+          end;
+
+          if assigned(lDataTable) and not (lDataTable.IsPublic) then
+            raise EDAException.Create(lDataTable.Name +' is not accessible');
+
+          lDataSet := nil;
+        end; { for }
+
+      finally
+        ServiceDataStreamer.Finalize();
+      end;
+
+      if lHasTransaction and Connection.InTransaction and TriggerTransactionEvent(fOnUpdateDataCommitTransaction) then Connection.CommitTransaction;
+    except
+      if lHasTransaction and Connection.InTransaction and TriggerTransactionEvent(fOnUpdateDataRollBackTransaction) then Connection.RollbackTransaction;
+      raise;
+    end;
+
+  except
+    FreeAndNIL(result);
+    raise;
+  end;
+
+end;
+
+//TODO: needs cleaning!
+function TDataAbstractService.UnpackDeltas(const DeltaStream: Binary; DeltaStructList: TDADeltaStructList): TDADeltasModes;
+var
+  i, j: integer;
+  lDeltaName: string;
+  lBizProc: TDABusinessProcessor;
+  lDetails : TDADatasetRelationshipList;
+  lFound: boolean;
+  lStruct : TDADeltaStruct;
+  ltabRef: TDADataTableReference;
+begin
+  // WARNING: any changes should be duplicated into TDALocalDataAdapter.UnpackDeltas
+
+  result := [];
+  Check(True);
+  // Reads the deltas.
+  ServiceDataStreamer.Initialize(DeltaStream, aiReadFromBeginning);
+  try
+    if (ServiceDataStreamer.DeltaCount = 0) then Exit;
+    for i := 0 to (ServiceDataStreamer.DeltaCount - 1) do begin
+      lDeltaName := ServiceDataStreamer.DeltaNames[i];
+      if (ExportedDataTables.Count >0) then begin
+        ltabRef := ExportedDataTables.FindByName(lDeltaName);
+        if Assigned(ltabRef) then begin
+          // for ExportedDataTables , BP=nil
+          lStruct := DeltaStructList.Add(NewDelta(lDeltaName), nil);
+          ServiceDataStreamer.ReadDelta(lDeltaName, lStruct.Delta);
+          Result:=Result+[dumExported];
+          Continue;
+        end;
+      end;
+      lFound := false;
+      { Tries to locate a user-defined business processor }
+      for j := 0 to (Self.ComponentCount - 1) do begin
+        if (Self.Components[j] is TDABusinessProcessor) then begin
+          lBizProc := TDABusinessProcessor(Self.Components[j]);
+          if SameText(lBizProc.ReferencedDataset, lDeltaName) and (lBizProc.Schema = fServiceSchema) then begin
+            lStruct := DeltaStructList.Add(NewDelta(lDeltaName), lBizProc);
+            ServiceDataStreamer.ReadDelta(lDeltaName, lStruct.Delta);
+            if ServiceDataStreamer.HasReducedDelta then begin
+              if (lBizProc.InsertCommandName <> '') or
+                 (lBizProc.DeleteCommandName <> '') or
+                 (lBizProc.UpdateCommandName <> '') or
+                 ([poAutoGenerateInsert,poAutoGenerateUpdate,poAutoGenerateDelete]*lBizProc.ProcessorOptions <>[poAutoGenerateInsert,poAutoGenerateUpdate,poAutoGenerateDelete]) then
+               raise Exception.Create('SendReducedDelta option is incompatible with '+lBizProc.Name+' settings');
+            end;
+            lFound := true;
+            Break;
+          end;
+        end;
+      end;
+
+      { Either creates one or aborts raising an exception }
+      if not lFound then begin
+        if not AutoCreateBusinessProcessors then
+          raise Exception.CreateFmt(err_DARDMCannotFindProxessorForDelta, [lDeltaName]);
+
+        //ToDo: this will never get freed, until the DM frees?
+        lBizProc := TDABusinessProcessor.Create(self);
+        lBizProc.ReferencedDataset := lDeltaName;
+        lBizProc.Schema := ServiceSchema;
+        lBizProc.RaiseExceptionAtError := not fReturnUpdateFailureDelta;
+        if Assigned(fOnBusinessProcessorAutoCreated) then fOnBusinessProcessorAutoCreated(Self, lBizProc);
+
+        lStruct := DeltaStructList.Add(NewDelta(lDeltaName), lBizProc);
+        ServiceDataStreamer.ReadDelta(lDeltaName, lStruct.Delta);
+
+      end;
+
+      Result:=Result+[dumStandard];
+    end;
+    fHasReducedDelta := ServiceDataStreamer.HasReducedDelta;
+    if not (dumStandard in  Result) then  exit; // nothing to process
+    Check;
+    { Sets the master/detail relationships }
+    if (ServiceSchema.RelationShips.Count>0) then begin
+
+      lDetails := TDADatasetRelationshipList.Create;
+      try
+        for i := 0 to DeltaStructList.Count-1 do begin
+          ServiceSchema.RelationShips.GetDetails(DeltaStructList[i].BusinessProcessor.ReferencedDataset, lDetails);
+          if (lDetails.Count=0) then Continue;
+
+          { Prepares an array with the references to the detail deltas that will be used later on to adjust
+            autoincs, etc. }
+          for j := 0 to lDetails.Count-1 do begin
+            lStruct := DeltaStructList.FindStruct(lDetails[j].DetailDatasetName);
+            if assigned(lStruct) then begin
+              DeltaStructList[i].DetailDeltas.Add(lStruct.Delta);
+              DeltaStructList[i].RelationShips.Add(lDetails[j]);
+            end;
+          end;
+        end;
+      finally
+        lDetails.Free;
+      end;
+
+    end;
+  finally
+    ServiceDataStreamer.Finalize;
+  end;
+end;
+
+function TDataAbstractService.UpdateData(const aDelta: Binary): Binary;
+var
+  lProcessedDeltas: TStringList;
+  lDeltaStructs: TDADeltaStructList;
+  lStruct: TDADeltaStruct;
+  lDs: TDADataset;
+  lDoRaise: boolean;
+  i,j: integer;
+  modes: TDADeltasModes;
+  oldDeltaMode: Boolean;
+begin
+  // WARNING: any changes should be duplicated into TDALocalDataAdapter.DoUpdateData
+  if not AllowDataAccess then
+    raise Exception.Create('Data access has been disabled (UpdateData)');
+
+  if not AllowUpdates then
+    raise Exception.Create('Data updates have been disabled (UpdateData)');
+
+  result := nil;
+  fHasReducedDelta := False;
+
+  lDeltaStructs := TDADeltaStructList.Create;
+  try
+
+    try
+      modes:= UnpackDeltas(aDelta, lDeltaStructs);
+      if modes = [] then exit;
+
+      if dumStandard in modes then begin
+        Check;
+        if TriggerTransactionEvent(fOnUpdateDataBeginTransaction) then Connection.BeginTransaction;
+      end;
+      if Assigned(fBeforeProcessDeltas) then fBeforeProcessDeltas(Self, lDeltaStructs);
+
+      for i := 0 to lDeltaStructs.Count-1 do begin
+        if ServiceSchema <> nil then
+          lDs := ServiceSchema.FindDataset(lDeltaStructs[i].Delta.LogicalName)
+        else
+          lDs := nil;
+        if lDs <> nil then begin
+          if not lDs.IsPublic then
+            raise EDAException.Create(lDs.Name+' is not accessible');
+          if lDs.ReadOnly then
+            raise EDAException.Create(lDs.Name+' is read-only');
+        end;
+      end;
+      if dumExported in modes then
+       // Processes the delta for exported tables (BP=nil)
+        for i := 0 to lDeltaStructs.Count-1 do begin
+          if lDeltaStructs[i].BusinessProcessor = nil then
+            ExportedDataTables_MergeDelta(lDeltaStructs[i].Delta);
+        end;
+      if dumStandard in modes then begin
+        if (ServiceSchema.UpdateRules.Count = 0) and ProcessDeltasWithoutUpdateRules then begin
+
+          // Processes them in order, from first to last delta sent
+          for i := 0 to lDeltaStructs.Count-1 do
+           if lDeltaStructs[i].BusinessProcessor <> nil then begin
+             oldDeltaMode:=lDeltaStructs[i].BusinessProcessor.HasReducedDelta;
+             try
+               lDeltaStructs[i].BusinessProcessor.HasReducedDelta:=fHasReducedDelta;
+               // TODO: Handle GetConnectionForObject() for 'Rosetta', UNIONS and JOINS
+               lDeltaStructs[i].BusinessProcessor.ProcessDelta(GetConnectionForObject(lDeltaStructs[i].BusinessProcessor.ReferencedDataset), lDeltaStructs[i].Delta, AllChanges, lDeltaStructs[i]);
+             finally
+               lDeltaStructs[i].BusinessProcessor.HasReducedDelta:=oldDeltaMode;
+             end;
+
+             with lDeltaStructs[i] do
+               for j := 0 to (DetailDeltas.Count-1) do
+                 BusinessProcessor.SynchronizeAutoIncs(Delta, DetailDeltas[j], RelationShips[j]);
+           end;
+        end
+        else begin
+          lProcessedDeltas := TStringList.Create;
+          try
+
+            for i := 0 to (ServiceSchema.UpdateRules.Count-1) do begin
+              // Processes them in the order defined in the schema
+              lStruct := lDeltaStructs.FindStruct(ServiceSchema.UpdateRules[i].DatasetName);
+              if assigned(lStruct) then begin
+                if lStruct.BusinessProcessor = nil then Continue;
+                // Adds the dataset name to the list of processed deltas. Those that don't have update rules will be processed later
+                lProcessedDeltas.Add(lStruct.Delta.LogicalName);
+
+                // Processes the delta
+                oldDeltaMode:=lStruct.BusinessProcessor.HasReducedDelta;
+                try
+                  lStruct.BusinessProcessor.HasReducedDelta:=fHasReducedDelta;
+                  // TODO: Handle GetConnectionForObject() for 'Rosetta', UNIONS and JOINS
+                  lStruct.BusinessProcessor.ProcessDelta(GetConnectionForObject(lStruct.BusinessProcessor.ReferencedDataset), lStruct.Delta, ServiceSchema.UpdateRules[i].ChangeTypes,lStruct);
+                finally
+                  lStruct.BusinessProcessor.HasReducedDelta:=oldDeltaMode;
+                end;
+
+                if (ctInsert in ServiceSchema.UpdateRules[i].ChangeTypes) then begin
+                  for j := 0 to (lStruct.DetailDeltas.Count-1) do
+                    lStruct.BusinessProcessor.SynchronizeAutoIncs(lStruct.Delta, lStruct.DetailDeltas[j], lStruct.RelationShips[j]);
+                end;
+              end;
+            end;
+
+            // Processes the deltas for which update rules were not defined
+            if (ProcessDeltasWithoutUpdateRules) then begin
+              for i := 0 to lDeltaStructs.Count-1 do begin
+                // Skips if already processed
+                if (lProcessedDeltas.IndexOf(lDeltaStructs[i].Delta.LogicalName)>=0) then Continue;
+
+                if lDeltaStructs[i].BusinessProcessor <> nil then begin
+                  oldDeltaMode:=lDeltaStructs[i].BusinessProcessor.HasReducedDelta;
+                  try
+                    lDeltaStructs[i].BusinessProcessor.HasReducedDelta:=fHasReducedDelta;
+                    lDeltaStructs[i].BusinessProcessor.ProcessDelta(GetConnectionForObject(lDeltaStructs[i].BusinessProcessor.ReferencedDataset), lDeltaStructs[i].Delta, AllChanges,lDeltaStructs[i]);
+                  finally
+                    lDeltaStructs[i].BusinessProcessor.HasReducedDelta:=oldDeltaMode;
+                  end;
+
+                  with lDeltaStructs[i] do
+                    for j := 0 to (DetailDeltas.Count-1) do
+                      BusinessProcessor.SynchronizeAutoIncs(Delta, DetailDeltas[j], RelationShips[j]);
+                end;
+              end;
+            end;
+
+          finally
+            lProcessedDeltas.Free;
+          end;
+        end;
+      end;
+
+      if Assigned(fAfterProcessDeltas) then fAfterProcessDeltas(Self, lDeltaStructs);
+
+      if dumStandard in modes then
+        if Connection.InTransaction and TriggerTransactionEvent(fOnUpdateDataCommitTransaction) then Connection.CommitTransaction;
+
+      // Check for unhandled changes
+      for i := 0 to lDeltaStructs.Count-1 do begin
+        for j := 0 to lDeltaStructs[i].Delta.Count -1 do begin
+          if lDeltaStructs[i].Delta[j].Status = csPending then begin
+            lDeltaStructs[i].Delta[j].Status := csFailed;
+            lDeltaStructs[i].Delta[j].Message := 'Change was not processed';
+          end;
+        end;
+      end;
+      result := Binary.Create;
+      oldDeltaMode:=ServiceDataStreamer.SendReducedDelta;
+      ServiceDataStreamer.Initialize(result, aiWrite);
+      try
+        if fHasReducedDelta then ServiceDataStreamer.SendReducedDelta:=True;
+        for i := 0 to lDeltaStructs.Count-1 do
+          ServiceDataStreamer.WriteDelta(lDeltaStructs[i].Delta);
+      finally
+        ServiceDataStreamer.Finalize;
+        ServiceDataStreamer.SendReducedDelta:=oldDeltaMode;
+      end;
+
+    except
+      on E:Exception do begin
+        lDoRaise := true;
+        try
+          if Assigned(fOnProcessDeltasError) then fOnProcessDeltasError(Self, lDeltaStructs, E, lDoRaise);
+        finally
+          if dumStandard in modes then
+            if Connection.InTransaction and TriggerTransactionEvent(fOnUpdateDataRollBackTransaction) then Connection.RollbackTransaction;
+        end;
+        if lDoRaise then raise;
+      end;
+    end;
+  finally
+    lDeltaStructs.Free;
+  end;
+end;
+
+function TDataAbstractService.ExecuteCommand(const aCommandName: Utf8String; const aParameterArray: DataParameterArray): Integer;
+var
+  j: integer;
+  lParamNames: array of string;
+  lParamValues: array of Variant;
+  lAllow: boolean;
+  lCommand: IDASQLCommand;
+  lCommandSchema: TDASQLCommand;
+  lConnection: IDAConnection;
+  lCommandName: string;
+begin
+  if not AllowDataAccess then
+    raise Exception.Create('Data access has been disabled (ExecuteCommand)');
+
+  if not AllowExecuteCommands then
+    raise Exception.Create('Execution of commands has been disabled (ExecuteCommand)');
+
+  SetLength(lParamNames, aParameterArray.Count);
+  SetLength(lParamValues, aParameterArray.Count);
+  for j := 0 to (aParameterArray.Count-1) do begin
+    lParamNames[j] := UTF8ToString(aParameterArray[j].Name);
+    CheckUTF8Decode(aParameterArray[j].Name,lParamNames[j]);
+    lParamValues[j] := aParameterArray[j].Value;
+  end;
+
+  lCommandName:=UTF8ToString(aCommandName);
+  CheckUTF8Decode(aCommandName,lCommandName);
+  lCommandSchema := ServiceSchema.Commands.SQLCommandByName(lCommandName);
+  if assigned(lCommandSchema) and not (lCommandSchema.IsPublic) then
+    raise EDAException.Create(lCommandSchema.Name +' is not accessible');
+
+
+  lAllow := true;
+  lConnection := GetConnectionForObject(lCommandName);
+  if assigned(fExecuteCommandValidation) then fExecuteCommandValidation(self, lConnection, lCommandName, lParamNames, lParamValues, ServiceSchema, lAllow);
+  if not lAllow then raise EDADatasetNotAccessible.CreateFmt(err_CommandNotAccessible, [lCommandName]);
+
+  if TriggerTransactionEvent(fOnUpdateDataBeginTransaction) then lConnection.BeginTransaction;
+  try
+
+    lCommand := ServiceSchema.NewCommand(lConnection, lCommandName, lParamNames, lParamValues, false);
+    if Assigned(fBeforeExecutecommand) then fBeforeExecuteCommand(self, lCommand);
+    result := lCommand.Execute;
+    if assigned(fAfterExecutecommand) then fAfterExecuteCommand(self, lCommand, Result);
+
+    if lConnection.InTransaction and TriggerTransactionEvent(fOnUpdateDataCommitTransaction) then lConnection.CommitTransaction;
+  except
+    if lConnection.InTransaction and TriggerTransactionEvent(fOnUpdateDataRollBackTransaction) then lConnection.RollbackTransaction;
+    raise;
+  end;
+end;
+
+{ IDataAbstractService: Direct SQL Access }
+
+function TDataAbstractService.SQLGetDataEx(const aSQLText: Utf8String;
+  const aIncludeSchema: Boolean; const aMaxRecords: Integer;
+  const aDynamicWhereXML: Widestring): Binary;
+var
+  lOptions: TDAWriteOptions;
+  lDataSet: IDADataSet;
+  lAllow: boolean;
+  lSQLText: string;
+begin
+  if not AllowDataAccess then
+    raise Exception.Create('Data access has been disabled (SQLGetData)');
+
+  if not AllowExecuteSQL then
+    raise Exception.Create('Execution of SQL has been disabled (SQLGetData)');
+
+  if assigned(fHETConnection) then
+    raise Exception.Create('Execution of SQL isnot supported for HET Connections');
+
+  result := nil;
+  lSQLText := UTF8ToString(aSQLText);
+  CheckUTF8Decode(aSQLText,lSQLText);
+  if lSQLText = '' then exit;
+
+  Check();
+
+  lAllow := true;
+  if assigned(fSQLValidation) then fSQLValidation(self, Connection, lSQLText, [], [], lAllow);
+  if not lAllow then raise EDADatasetNotAccessible.Create(err_SQLNotPermitted);
+
+  result := Binary.Create;
+  Result.CapacityIncrement := ServiceDataStreamer.BufferSize;
+  try
+    if TriggerTransactionEvent(fOnUpdateDataBeginTransaction) then Connection.BeginTransaction;
+    try
+      ServiceDataStreamer.Initialize(result, aiWrite);
+      try
+
+        lOptions := [woRows];
+        if aIncludeSchema then lOptions := lOptions+[woSchema];
+
+        lDataSet := Connection.NewDataset(lSQLText,'SQLResult');
+        try
+          if aDynamicWhereXML <> '' then lDataSet.DynamicWhere.Expression := lDataSet.DynamicWhere.XMLToExpression(aDynamicWhereXML);
+          if (woSchema in lOptions) and Assigned(fBeforeGetDatasetSchema) then fBeforeGetDatasetSchema(self, lDataset);
+          if (woRows in lOptions) and Assigned(fBeforeGetDatasetData) then fBeforeGetDatasetData(self, lDataset, (woSchema in lOptions), aMaxRecords);
+
+          lDataSet.Open();
+
+          ServiceDataStreamer.WriteDataset(lDataset, lOptions, aMaxRecords);
+
+          if (woRows in lOptions) and Assigned(fAfterGetDatasetData) then fAfterGetDatasetData(self, lDataset, (woSchema in lOptions), aMaxRecords);
+          if (woSchema in lOptions) and Assigned(fAfterGetDatasetSchema) then fAfterGetDatasetSchema(self, lDataset);
+
+        finally
+          lDataSet := nil;
+        end;
+
+      finally
+        ServiceDataStreamer.Finalize();
+      end;
+
+      if Connection.InTransaction and TriggerTransactionEvent(fOnUpdateDataCommitTransaction) then Connection.CommitTransaction;
+    except
+      if Connection.InTransaction and TriggerTransactionEvent(fOnUpdateDataRollBackTransaction) then Connection.RollbackTransaction;
+      raise;
+    end;
+
+  except
+    FreeAndNIL(result);
+    raise;
+  end;
+
+end;
+
+function TDataAbstractService.SQLExecuteCommandEx(const aSQLText: Utf8String; const aDynamicWhereXML: Widestring): Integer;
+var
+  lAllow: boolean;
+  lSQLText: string;
+begin
+  if not AllowDataAccess then
+    raise Exception.Create('Data access has been disabled (SQLExecuteCommand)');
+
+  if not AllowExecuteSQL then
+    raise Exception.Create('Execution of SQL has been disabled (SQLExecuteCommand)');
+
+  if assigned(fHETConnection) then
+    raise Exception.Create('Execution of SQL isnot supported for HET Connections');
+
+  Check();
+  lSQLText := UTF8ToString(aSQLText);
+  CheckUTF8Decode(aSQLText,lSQLText);
+  lAllow := true;
+  if assigned(fSQLValidation) then fSQLValidation(self, Connection, lSQLText, [], [], lAllow);
+  if not lAllow then raise EDADatasetNotAccessible.CreateFmt(err_SQLNotPermitted, []);
+
+  if TriggerTransactionEvent(fOnUpdateDataBeginTransaction) then Connection.BeginTransaction;
+  try
+    with Connection.NewCommand(lSQLText, stSQL) do begin
+      if aDynamicWhereXML <> '' then DynamicWhere.Expression := DynamicWhere.XMLToExpression(aDynamicWhereXML);
+      result := Execute;
+    end;
+    if Connection.InTransaction and TriggerTransactionEvent(fOnUpdateDataCommitTransaction) then Connection.CommitTransaction;
+  except
+    if Connection.InTransaction and TriggerTransactionEvent(fOnUpdateDataRollBackTransaction) then Connection.RollbackTransaction;
+    raise;
+  end;
+end;
+
+{ Properties }
+
+procedure TDataAbstractService.SetExportedDataTables(const Value: TDADataTableReferenceCollection);
+begin
+  fExportedDataTables.Assign(Value);
+end;
+
+procedure TDataAbstractService.SetServiceDataStreamer(const Value: TDADataStreamer);
+begin
+  fServiceDataStreamer := Value;
+  if (fServiceDataStreamer <> nil) then
+    fServiceDataStreamer.FreeNotification(Self);
+end;
+
+procedure TDataAbstractService.SetServiceSchema(const Value: TDASchema);
+begin
+  fServiceSchema := Value;
+
+  if assigned(fServiceSchema) then
+    fServiceSchema.FreeNotification(self);
+end;
+
+{ Connections }
+
+function TDataAbstractService.GetConnection: IDAConnection;
+var
+  lConnectionName: string;
+begin
+  // WARNING: any changes should be duplicated into TDALocalDataAdapter.GetConnection
+  inherited;
+  result := fConnection;
+  if assigned(fConnection) then exit;
+  if (csDesigning in ComponentState) then exit;
+
+  if AcquireConnection then try
+
+    if (fServiceSchema = nil) or (fServiceSchema.ConnectionManager = nil) then raise Exception.Create(err_DARDMInvalidSchema);
+
+    lConnectionName := ConnectionName;
+    if Assigned(fBeforeAcquireConnection) then fBeforeAcquireConnection(Self, lConnectionName);
+
+    result := ServiceSchema.ConnectionManager.NewConnection(lConnectionName);
+    Connection := result;
+    if Assigned(fAfterAcquireConnection) then fAfterAcquireConnection(Self, lConnectionName, result);
+
+  except
+    on E: Exception do begin
+      if Assigned(fOnAcquireConnectionFailure) then fOnAcquireConnectionFailure(Self, lConnectionName, E);
+      raise;
+    end;
+  end;
+end;
+
+{$WARN SYMBOL_DEPRECATED OFF}
+procedure TDataAbstractService.SetConnection(aConnection: IDAConnection);
+begin
+  // WARNING: any changes should be duplicated into TDALocalDataAdapter.SetConnection
+
+  if fConnection <> aConnection then begin
+    fConnection := aConnection;
+    if not Supports(fConnection, IDAHETConnection, fHETConnection) then fHETConnection := nil;
+  end;
+end;
+{$WARN SYMBOL_DEPRECATED ON}
+
+function TDataAbstractService.GetConnectionForObject(const aName: string): IDAConnection;
+begin
+  // WARNING: any changes should be duplicated into TDALocalDataAdapter.GetConnectionForObject
+
+  result := Connection; // forces acquisition of Connection
+  if assigned(fHETConnection) and (ServiceSchema.UnionDataTables.FindItem(aName) = nil) then
+    result := fHETConnection.GetConnectionForObject(aName)
+end;
+
+procedure TDataAbstractService.DoOnDeactivate(aClientID: TGUID);
+begin
+  inherited;
+  if (csDesigning in ComponentState) then Exit;
+
+  ReleaseConnection();
+end;
+
+procedure TDataAbstractService.ReleaseConnection;
+var
+  lConnectionName: string;
+begin
+  if assigned(fConnection) then begin
+    lConnectionName := fConnection.Name;
+    if Assigned(fBeforeReleaseConnection) then fBeforeReleaseConnection(Self, lConnectionName, fConnection);
+    Connection := nil;
+    if Assigned(fAfterReleaseConnection) then fAfterReleaseConnection(Self, lConnectionName);
+  end;
+end;
+
+procedure TDataAbstractService.Check(CheckOnlyDataStreamer:Boolean = false);
+begin
+  if not CheckOnlyDataStreamer then begin
+    if not (Assigned(Connection) or AcquireConnection) then
+      raise EROException.Create('AcquireConnection is not set and there is no connection available');
+    if not Assigned(ServiceSchema) then
+      raise Exception.Create('ServiceSchema property is not assigned.');
+  end;
+  if not Assigned(ServiceDataStreamer) then
+    raise EROException.Create('DataStreamer must be assigned.');
+end;
+
+function TDataAbstractService.ExecuteCommandEx(const aCommandName: Utf8String;
+  const aInputParameters: DataParameterArray;
+  out aOutputParameters: DataParameterArray): Integer;
+var
+  j: integer;
+  lParamNames: array of string;
+  lParamValues: array of Variant;
+  lAllow: boolean;
+  lCommand: IDASQLCommand;
+  lCommandSchema: TDASQLCommand;
+  lConnection: IDAConnection;
+  lCommandName: string;
+begin
+  if not AllowDataAccess then
+    raise Exception.Create('Data access has been disabled (ExecuteCommand)');
+
+  if not AllowExecuteCommands then
+    raise Exception.Create('Execution of commands has been disabled (ExecuteCommand)');
+
+  lCommandName:= UTF8ToString(aCommandName);
+  CheckUTF8Decode(aCommandName,lCommandName);
+  SetLength(lParamNames, aInputParameters.Count);
+  SetLength(lParamValues, aInputParameters.Count);
+  for j := 0 to (aInputParameters.Count-1) do begin
+    lParamNames[j] := UTF8ToString(aInputParameters[j].Name);
+    CheckUTF8Decode(aInputParameters[j].Name,lParamNames[j]);
+    lParamValues[j] := aInputParameters[j].Value;
+  end;
+
+  lCommandSchema := ServiceSchema.Commands.SQLCommandByName(lCommandName);
+  if assigned(lCommandSchema) and not (lCommandSchema.IsPublic) then
+    raise EDAException.Create(lCommandSchema.Name +' is not accessible');
+
+
+  lAllow := true;
+  lConnection := GetConnectionForObject(lCommandName);
+  if assigned(fExecuteCommandValidation) then fExecuteCommandValidation(self, lConnection, lCommandName, lParamNames, lParamValues, ServiceSchema, lAllow);
+  if not lAllow then raise EDADatasetNotAccessible.CreateFmt(err_CommandNotAccessible, [lCommandName]);
+
+  if TriggerTransactionEvent(fOnUpdateDataBeginTransaction) then lConnection.BeginTransaction;
+  try
+
+    lCommand := ServiceSchema.NewCommand(lConnection, lCommandName, lParamNames, lParamValues, false);
+    if Assigned(fBeforeExecutecommand) then fBeforeExecuteCommand(self, lCommand);
+    result := lCommand.Execute;
+    if assigned(fAfterExecutecommand) then fAfterExecuteCommand(self, lCommand, Result);
+
+    aOutputParameters := DataParameterArray.Create;
+    for j := 0 to lCommand.Params.Count -1 do begin
+      if (lCommand.Params[j].ParamType <> daptUnknown) and (lCommand.Params[j].ParamType <> daptInput) then begin
+        with aOutputParameters.Add do begin
+          Name := AnsiToUtf8(lCommand.Params[j].Name);
+          Value := lCommand.Params[j].Value;
+        end;
+      end;
+    end;
+    if lConnection.InTransaction and TriggerTransactionEvent(fOnUpdateDataCommitTransaction) then lConnection.CommitTransaction;
+  except
+    if lConnection.InTransaction and TriggerTransactionEvent(fOnUpdateDataRollBackTransaction) then lConnection.RollbackTransaction;
+    raise;
+  end;
+end;
+
+type
+  TMyDatasetCollection = class(TDADatasetCollection)
+  end;
+
+function TDataAbstractService.GetDatasetScripts(const DatasetNames: Utf8String): Utf8String;
+var names : TStringList;
+    i : integer;
+    ds : TDADataset;
+    lResult: WideString;
+    lLogicalName: string;
+begin
+  // WARNING: any changes should be duplicated into TDALocalDataAdapter.FillScripts
+  lresult := '';
+  names := TStringList.Create;
+  try
+    names.CommaText :=UTF8ToString(DatasetNames);
+    CheckUTF8Decode(DatasetNames,names.CommaText);
+    for i := 0 to (names.Count-1) do begin
+      // scripts for externaltables is not allowed
+      lLogicalName := names[i];
+      if fExportedDataTables.FindByName(lLogicalName) <> nil then continue;
+      ds := ServiceSchema.Datasets.FindDatasetByName(lLogicalName);
+      if not assigned(ds) then
+        ds := ServiceSchema.UnionDataTables.FindUnionDataTableByName(lLogicalName);
+      if not assigned(ds) then
+        ds := ServiceSchema.JoinDataTables.FindJoinTableByName(lLogicalName);
+      with TMyDatasetCollection(ServiceSchema.Datasets) do
+        if ds = nil then EDAException.CreateFmt(err_CannotFindItem, [ItemName, lLogicalName, ClassName]);
+
+      lresult := lresult+Format('<%s Language="%s"><![CDATA[%s]]></%s>', [
+          lLogicalName,
+          GetEnumName(TypeInfo(TROSEScriptLanguage), Ord(ds.BusinessRulesClient.ScriptLanguage)),
+          ds.BusinessRulesClient.Script,
+          lLogicalName]);
+    end;
+
+    result := UTF8Encode('<Scripts>'+lresult+'</Scripts>');
+  finally
+    FreeAndNIL(names);
+  end;
+end;
+
+procedure TDataAbstractService.ExportedDataTables_MergeDelta(ADelta: IDADelta);
+var
+  i, k, x: integer;
+  oldval, newval, val : Variant;
+  fld : TDAField;
+  pkfields : string;
+  pkfields1: array of string;
+  insertfields: array of string;
+  keyvals, insertvals : array of variant;
+  LDAEditableDataset:IDAEditableDataset;
+  ADataset: IDADataset;
+  pk_array: array of boolean;
+begin
+  // validated in UnpackDeltas
+  ADataset:=ExportedDataTables.FindByName(ADelta.LogicalName).Dataset;
+  SetLength(pk_array, ADelta.LoggedFieldCount);
+  for i := 0 to ADelta.LoggedFieldCount - 1 do
+    pk_array[i]:=False;
+
+  for i := 0 to ADelta.KeyFieldCount - 1 do begin
+    x := ADelta.IndexOfLoggedField(ADelta.KeyFieldNames[i]);
+    if x <> -1 then pk_array[x]:=True;
+  end;
+
+  SetLength(pkfields1, ADelta.KeyFieldCount);
+  for i := 0 to (ADelta.KeyFieldCount-1) do
+    pkfields1[i]:=ADelta.KeyFieldNames[i];
+  if ADelta.KeyFieldCount = 0 then
+    begin
+      SetLength(pkfields1, ADelta.LoggedFieldCount);
+      k:=-1;
+      for i := 0 to (ADelta.LoggedFieldCount-1) do begin
+        if ADelta.LoggedFieldTypes[i] in [datUnknown, datMemo, datBlob,datWideMemo] then Continue;
+        inc(k);
+        pkfields1[k]:=ADelta.LoggedFieldNames[i];
+      end;
+      SetLength(pkfields1,k+1);
+    end;
+  SetLength(keyvals, Length(pkfields1));
+  pkfields := '';
+  For i:=0 to Length(pkfields1) - 1 do
+    pkfields:=pkfields+pkfields1[i]+';';
+  pkfields := Copy(pkfields, 1, Length(pkfields)-1);
+
+  if (ADelta.Count>0) then begin
+    for i := (ADelta.Count-1) downto 0 do begin
+      for k := 0 to Length(pkfields1)-1 do begin
+        val := ADelta[i].OldValueByName[pkfields1[k]];
+        keyvals[k] := val;
+      end;
+      if fHasReducedDelta and (ADelta.KeyFieldCount = 0) then begin
+        SetLength(pkfields1, ADelta.LoggedFieldCount);
+        k:=-1;
+        for x := 0 to (ADelta.LoggedFieldCount-1) do begin
+          if ADelta.LoggedFieldTypes[x] in [datUnknown, datMemo, datBlob,datWideMemo] then Continue;
+          pkfields:=ADelta.LoggedFieldNames[x];
+          oldval:=ADelta[i].OldValueByName[pkfields];
+          if ROVariantsEqual(oldval,ADelta[i].NewValueByName[pkfields]) and (VarIsNull(oldval) or (VarIsEmpty(oldval))) then Continue;
+          inc(k);
+          pkfields1[k]:=ADelta.LoggedFieldNames[x];
+        end;
+        SetLength(pkfields1,k+1);
+        SetLength(keyvals,k+1);
+        for k := 0 to Length(pkfields1)-1 do begin
+          val := ADelta[i].OldValueByName[pkfields1[k]];
+          keyvals[k] := val;
+        end;
+        pkfields := '';
+        For x:=0 to Length(pkfields1) - 1 do
+          pkfields:=pkfields+pkfields1[x]+';';
+        pkfields := Copy(pkfields, 1, Length(pkfields)-1);
+      end;
+      if ADataset.QueryInterface(StringToGUID('{D3E2147F-65B3-4D9D-8614-7270011FA7D5}'),LDAEditableDataset) <> 0 then exit;
+      LDAEditableDataset.Open;
+      LDAEditableDataset.First;
+      case ADelta[i].ChangeType of
+        ctDelete: begin
+          // Locates the original record
+          if Length(keyvals)=1 then begin
+            if not Adataset.Locate(pkfields, keyvals[0], []) then Continue;
+          end
+          else begin
+            if not Adataset.Locate(pkfields, keyvals, []) then Continue;
+          end;
+          LDAEditableDataset.Delete;
+        end;
+        ctInsert: begin
+          // fHasReducedDelta don't work in this case
+          // old values = Unassigned
+          // new Values = Null
+          SetLength(insertFields, ADelta.LoggedFieldCount);
+          SetLength(insertvals, ADelta.LoggedFieldCount);
+          for x := 0 to (ADelta.LoggedFieldCount-1) do begin
+            insertfields[x] := ADelta.LoggedFieldNames[x];
+            insertvals[x] := ADelta[i].NewValueByName[ADelta.LoggedFieldNames[x]];
+          end;
+          LDAEditableDataset.AddRecord(insertfields,insertvals);
+        end;
+        ctUpdate: begin
+          // Locates the original record
+          if Length(keyvals)=1 then begin
+            if not Adataset.Locate(pkfields, keyvals[0], []) then Continue;
+          end
+          else begin
+            if not Adataset.Locate(pkfields, keyvals, []) then Continue;
+          end;
+          LDAEditableDataset.Edit;
+          for x := 0 to (ADelta.LoggedFieldCount-1) do begin
+            fld := Adataset.FieldByName(ADelta.LoggedFieldNames[x]);
+            newval := ADelta[i].NewValueByName[fld.Name];
+            oldval := ADelta[i].OldValueByName[fld.Name];
+            if fHasReducedDelta and (ROVariantsEqual(newval, oldval)) then Continue;
+            fld.Value:=newval;
+{            if fld.ServerAutoRefresh or (not VarIsArray(newVal) and (newval<>oldval)) then begin
+              VariantToFieldValue(newval, fld);
+            end;
+}
+          end;
+          LDAEditableDataset.Post;
+         end;
+      end;
+      // Removes this merged change
+      ADelta.Delete(i);
+    end;
+  end
+end;
+
+procedure TDataAbstractService.RegisterForDataChangeNotification(
+  const aTableName: Utf8String);
+begin
+{ TODO : todo }
+end;
+
+procedure TDataAbstractService.UnregisterForDataChangeNotification(
+  const aTableName: Utf8String);
+begin
+{ TODO : todo }
+end;
+
+function TDataAbstractService.SQLExecuteCommand(const aSQLText: Utf8String): Integer;
+begin
+  Result:= SQLExecuteCommandEx(aSQLText,'');
+end;
+
+function TDataAbstractService.SQLGetData(const aSQLText: Utf8String; const aIncludeSchema: Boolean; const aMaxRecords: Integer): Binary;
+begin
+  Result:= SQLGetDataEx(aSQLText, aIncludeSchema, aMaxRecords, '');
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D10.bdsproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D10.bdsproj
new file mode 100644
index 0000000..4c974b2
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D10.bdsproj	
@@ -0,0 +1,179 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality">Delphi.Personality</Option>
+			<Option Name="ProjectType"></Option>
+			<Option Name="Version">1.0</Option>
+			<Option Name="GUID">{74F520E8-6944-4308-9CFD-20E9AFC351F3}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource">DataAbstract_Core_D10.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A">8</Compiler>
+			<Compiler Name="B">0</Compiler>
+			<Compiler Name="C">1</Compiler>
+			<Compiler Name="D">1</Compiler>
+			<Compiler Name="E">0</Compiler>
+			<Compiler Name="F">0</Compiler>
+			<Compiler Name="G">1</Compiler>
+			<Compiler Name="H">1</Compiler>
+			<Compiler Name="I">1</Compiler>
+			<Compiler Name="J">0</Compiler>
+			<Compiler Name="K">0</Compiler>
+			<Compiler Name="L">1</Compiler>
+			<Compiler Name="M">0</Compiler>
+			<Compiler Name="N">1</Compiler>
+			<Compiler Name="O">1</Compiler>
+			<Compiler Name="P">1</Compiler>
+			<Compiler Name="Q">0</Compiler>
+			<Compiler Name="R">0</Compiler>
+			<Compiler Name="S">0</Compiler>
+			<Compiler Name="T">0</Compiler>
+			<Compiler Name="U">0</Compiler>
+			<Compiler Name="V">1</Compiler>
+			<Compiler Name="W">0</Compiler>
+			<Compiler Name="X">1</Compiler>
+			<Compiler Name="Y">1</Compiler>
+			<Compiler Name="Z">1</Compiler>
+			<Compiler Name="ShowHints">True</Compiler>
+			<Compiler Name="ShowWarnings">True</Compiler>
+			<Compiler Name="UnitAliases"></Compiler>
+			<Compiler Name="NamespacePrefix"></Compiler>
+			<Compiler Name="GenerateDocumentation">False</Compiler>
+			<Compiler Name="DefaultNamespace"></Compiler>
+			<Compiler Name="SymbolDeprecated">False</Compiler>
+			<Compiler Name="SymbolLibrary">False</Compiler>
+			<Compiler Name="SymbolPlatform">False</Compiler>
+			<Compiler Name="SymbolExperimental">False</Compiler>
+			<Compiler Name="UnitLibrary">False</Compiler>
+			<Compiler Name="UnitPlatform">False</Compiler>
+			<Compiler Name="UnitDeprecated">False</Compiler>
+			<Compiler Name="UnitExperimental">False</Compiler>
+			<Compiler Name="HResultCompat">True</Compiler>
+			<Compiler Name="HidingMember">True</Compiler>
+			<Compiler Name="HiddenVirtual">True</Compiler>
+			<Compiler Name="Garbage">True</Compiler>
+			<Compiler Name="BoundsError">True</Compiler>
+			<Compiler Name="ZeroNilCompat">True</Compiler>
+			<Compiler Name="StringConstTruncated">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar">True</Compiler>
+			<Compiler Name="TypedConstVarPar">True</Compiler>
+			<Compiler Name="AsgToTypedConst">True</Compiler>
+			<Compiler Name="CaseLabelRange">True</Compiler>
+			<Compiler Name="ForVariable">True</Compiler>
+			<Compiler Name="ConstructingAbstract">True</Compiler>
+			<Compiler Name="ComparisonFalse">True</Compiler>
+			<Compiler Name="ComparisonTrue">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned">True</Compiler>
+			<Compiler Name="UnsupportedConstruct">True</Compiler>
+			<Compiler Name="FileOpen">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc">True</Compiler>
+			<Compiler Name="BadGlobalSymbol">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor">True</Compiler>
+			<Compiler Name="InvalidDirective">True</Compiler>
+			<Compiler Name="PackageNoLink">True</Compiler>
+			<Compiler Name="PackageThreadVar">True</Compiler>
+			<Compiler Name="ImplicitImport">True</Compiler>
+			<Compiler Name="HPPEMITIgnored">True</Compiler>
+			<Compiler Name="NoRetVal">True</Compiler>
+			<Compiler Name="UseBeforeDef">True</Compiler>
+			<Compiler Name="ForLoopVarUndef">True</Compiler>
+			<Compiler Name="UnitNameMismatch">True</Compiler>
+			<Compiler Name="NoCFGFileFound">True</Compiler>
+			<Compiler Name="MessageDirective">True</Compiler>
+			<Compiler Name="ImplicitVariants">True</Compiler>
+			<Compiler Name="UnicodeToLocale">True</Compiler>
+			<Compiler Name="LocaleToUnicode">True</Compiler>
+			<Compiler Name="ImagebaseMultiple">True</Compiler>
+			<Compiler Name="SuspiciousTypecast">True</Compiler>
+			<Compiler Name="PrivatePropAccessor">True</Compiler>
+			<Compiler Name="UnsafeType">False</Compiler>
+			<Compiler Name="UnsafeCode">False</Compiler>
+			<Compiler Name="UnsafeCast">False</Compiler>
+			<Compiler Name="OptionTruncated">True</Compiler>
+			<Compiler Name="WideCharReduced">True</Compiler>
+			<Compiler Name="DuplicatesIgnored">True</Compiler>
+			<Compiler Name="UnitInitSeq">True</Compiler>
+			<Compiler Name="LocalPInvoke">True</Compiler>
+			<Compiler Name="CodePage"></Compiler>
+		</Compiler>
+		<Linker>
+			<Linker Name="MapFile">0</Linker>
+			<Linker Name="OutputObjs">0</Linker>
+			<Linker Name="ConsoleApp">1</Linker>
+			<Linker Name="DebugInfo">False</Linker>
+			<Linker Name="RemoteSymbols">False</Linker>
+			<Linker Name="GenerateDRC">False</Linker>
+			<Linker Name="MinStackSize">16384</Linker>
+			<Linker Name="MaxStackSize">1048576</Linker>
+			<Linker Name="ImageBase">4194304</Linker>
+			<Linker Name="ExeDescription">RemObjects Data Abstract - Core Library</Linker>
+			<Linker Name="GenerateHpps">False</Linker>
+		</Linker>
+		<Directories>
+			<Directories Name="OutputDir"></Directories>
+			<Directories Name="UnitOutputDir">..\Dcu\D10</Directories>
+			<Directories Name="PackageDLLOutputDir">..\Dcu\D10</Directories>
+			<Directories Name="PackageDCPOutputDir">..\Dcu\D10</Directories>
+			<Directories Name="SearchPath"></Directories>
+			<Directories Name="Packages"></Directories>
+			<Directories Name="Conditionals">DESIGNTIME</Directories>
+			<Directories Name="DebugSourceDirs"></Directories>
+			<Directories Name="UsePackages">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams"></Parameters>
+			<Parameters Name="HostApplication"></Parameters>
+			<Parameters Name="Launcher"></Parameters>
+			<Parameters Name="UseLauncher">False</Parameters>
+			<Parameters Name="DebugCWD"></Parameters>
+			<Parameters Name="RemoteHost"></Parameters>
+			<Parameters Name="RemotePath"></Parameters>
+			<Parameters Name="RemoteLauncher"></Parameters>
+			<Parameters Name="RemoteCWD"></Parameters>
+			<Parameters Name="RemoteDebug">False</Parameters>
+			<Parameters Name="Debug Symbols Search Path"></Parameters>
+			<Parameters Name="LoadAllSymbols">True</Parameters>
+			<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+		</Parameters>
+		<Language>
+			<Language Name="ActiveLang"></Language>
+			<Language Name="ProjectLang">$00000000</Language>
+			<Language Name="RootDir"></Language>
+		</Language>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+			<VersionInfo Name="MajorVer">0</VersionInfo>
+			<VersionInfo Name="MinorVer">0</VersionInfo>
+			<VersionInfo Name="Release">0</VersionInfo>
+			<VersionInfo Name="Build">0</VersionInfo>
+			<VersionInfo Name="Debug">False</VersionInfo>
+			<VersionInfo Name="PreRelease">False</VersionInfo>
+			<VersionInfo Name="Special">False</VersionInfo>
+			<VersionInfo Name="Private">False</VersionInfo>
+			<VersionInfo Name="DLL">False</VersionInfo>
+			<VersionInfo Name="Locale">1033</VersionInfo>
+			<VersionInfo Name="CodePage">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion">0.0.0.0</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+		</VersionInfoKeys>
+	</Delphi.Personality>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D10.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D10.cfg
new file mode 100644
index 0000000..11c667c
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D10.cfg	
@@ -0,0 +1,48 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N0"..\Dcu\D10"
+-LE"..\Dcu\D10"
+-LN"..\Dcu\D10"
+-DDESIGNTIME
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-SYMBOL_EXPERIMENTAL
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNIT_EXPERIMENTAL
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D10.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D10.dpk
new file mode 100644
index 0000000..1a90ff0
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D10.dpk	
@@ -0,0 +1,116 @@
+package DataAbstract_Core_D10;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - Core Library'}
+{$IMPLICITBUILD OFF}
+{$DEFINE DESIGNTIME}
+
+requires
+  RemObjects_Core_D10,
+  rtl,
+  vcl,
+  adortl,
+  dbrtl,
+  dsnap,
+  vcldb;
+
+contains
+  uDAInterfaces in 'uDAInterfaces.pas',
+  uDAInterfacesEx in 'uDAInterfacesEx.pas',
+  uDAClasses in 'uDAClasses.pas',
+  uDAHelpers in 'uDAHelpers.pas',
+  uDAEngine in 'uDAEngine.pas',
+  uDAUtils in 'uDAUtils.pas',
+  uDARes in 'uDARes.pas',
+  DataAbstract_Core_Reg in 'DataAbstract_Core_Reg.pas',
+  uDABinAdapter in 'uDABinAdapter.pas',
+  uDAXMLAdapter in 'uDAXMLAdapter.pas',
+  uDADriverManager in 'uDADriverManager.pas',
+  uDASupportClasses in 'uDASupportClasses.pas',
+  uDADataTable in 'uDADataTable.pas',
+  uDACDSDataTable in 'uDACDSDataTable.pas',
+  uDAADODataTable in 'uDAADODataTable.pas',
+  uDABusinessProcessor in 'uDABusinessProcessor.pas',
+  uDAIBInterfaces in 'uDAIBInterfaces.pas',
+  uDAOracleInterfaces in 'uDAOracleInterfaces.pas',
+  uDAADOInterfaces in 'uDAADOInterfaces.pas',
+  uDAMacroProcessors in 'uDAMacroProcessors.pas',
+  uDADBSessionManager in 'uDADBSessionManager.pas',
+  uDAMacros in 'uDAMacros.pas',
+  DALoginService_Impl in 'DALoginService_Impl.pas',
+  DARemoteService_Impl in 'DARemoteService_Impl.pas',
+  uDAXMLUtils in 'uDAXMLUtils.pas',
+  uDARegExpr in 'uDARegExpr.pas',
+  uDADriverInfo in 'uDADriverInfo.pas',
+  uDAPleaseWaitForm in 'uDAPleaseWaitForm.pas',
+  uDAClientDataModule in 'uDAClientDataModule.pas',
+  uDAScriptingProvider in 'uDAScriptingProvider.pas',
+  uDAServerLog in 'uDAServerLog.pas',
+  uDADatasetProvider in 'uDADatasetProvider.pas',
+  uDAPoweredByDataAbstractButton in 'uDAPoweredByDataAbstractButton.pas',
+  SimpleLoginService_Impl in 'SimpleLoginService_Impl.pas',
+  DataAbstract3_Intf in 'DataAbstract3_Intf.pas',
+  DataAbstract3_Invk in 'DataAbstract3_Invk.pas',
+  DataAbstract3_Async in 'DataAbstract3_Async.pas',
+  DataAbstractService_Impl in 'DataAbstractService_Impl.pas' {DataAbstractService: TRORemoteDataModule},
+  MultiDbLoginService_Impl in 'MultiDbLoginService_Impl.pas',
+  BaseLoginService_Impl in 'BaseLoginService_Impl.pas' {BaseLoginService: TRORemoteDataModule},
+  DataAbstract4_Invk in 'DataAbstract4_Invk.pas',
+  DataAbstract4_Intf in 'DataAbstract4_Intf.pas',
+  DataAbstract4_Async in 'DataAbstract4_Async.pas',
+  uDARemoteDataAdapter in 'uDARemoteDataAdapter.pas',
+  uDACache in 'uDACache.pas',
+  uDARemoteDataAdapterRequests in 'uDARemoteDataAdapterRequests.pas',
+  uDADataStreamer in 'uDADataStreamer.pas',
+  uDADelta in 'uDADelta.pas',
+  uDADesigntimeCall in 'uDADesigntimeCall.pas',
+  uDAExceptions in 'uDAExceptions.pas',
+  uDASQL92Interfaces in 'uDASQL92Interfaces.pas',
+  uDABin2DataStreamer in 'uDABin2DataStreamer.pas',
+  uDAMemDataset in 'uDAMemDataset.pas',
+  uDAMemDataTable in 'uDAMemDataTable.pas',
+  uDAReconcileDialog in 'uDAReconcileDialog.pas' {ReconcileDialogForm},
+  uDAReconcileDialogDetails in 'uDAReconcileDialogDetails.pas',
+  uDADatasetWrapper in 'uDADatasetWrapper.pas',
+  uDADataTableReferenceCollection in 'uDADataTableReferenceCollection.pas',
+  uDAMySQLInterfaces in 'uDAMySQLInterfaces.pas',
+  uDASQLiteInterfaces in 'uDASQLiteInterfaces.pas',
+  uDAExpressionEvaluator in 'uDAExpressionEvaluator.pas',
+  uDASQL92QueryBuilder in 'uDASQL92QueryBuilder.pas',
+  uDAWhere in 'uDAWhere.pas',
+  uDARemoteCommand in 'uDARemoteCommand.pas',  
+  uDAPostgresInterfaces in 'uDAPostgresInterfaces.pas',
+  uDAElevateDBInterfaces in 'uDAElevateDBInterfaces.pas',
+  uDADB2Interfaces in 'uDADB2Interfaces.pas',
+  uDASybaseInterfaces in 'uDASybaseInterfaces.pas',
+  MultiDbLoginServiceV5_Impl in 'MultiDbLoginServiceV5_Impl.pas',
+  //.31
+  uDAHETDriver in 'uDAHETDriver.pas',
+  uDAHETConnections in 'uDAHETConnections.pas'
+  //
+  {$IFDEF USE_LOCALDATAADAPTER}
+  ,uDALocalDataAdapter in 'uDALocalDataAdapter.pas'
+  {$ENDIF}
+  ;
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D10.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D10.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D10.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D11.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D11.dpk
new file mode 100644
index 0000000..0f8679d
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D11.dpk	
@@ -0,0 +1,116 @@
+package DataAbstract_Core_D11;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - Core Library'}
+{$IMPLICITBUILD OFF}
+{$DEFINE DESIGNTIME}
+
+requires
+  RemObjects_Core_D11,
+  rtl,
+  vcl,
+  adortl,
+  dbrtl,
+  dsnap,
+  vcldb;
+
+contains
+  uDAInterfaces in 'uDAInterfaces.pas',
+  uDAInterfacesEx in 'uDAInterfacesEx.pas',
+  uDAClasses in 'uDAClasses.pas',
+  uDAHelpers in 'uDAHelpers.pas',
+  uDAEngine in 'uDAEngine.pas',
+  uDAUtils in 'uDAUtils.pas',
+  uDARes in 'uDARes.pas',
+  DataAbstract_Core_Reg in 'DataAbstract_Core_Reg.pas',
+  uDABinAdapter in 'uDABinAdapter.pas',
+  uDAXMLAdapter in 'uDAXMLAdapter.pas',
+  uDADriverManager in 'uDADriverManager.pas',
+  uDASupportClasses in 'uDASupportClasses.pas',
+  uDADataTable in 'uDADataTable.pas',
+  uDACDSDataTable in 'uDACDSDataTable.pas',
+  uDAADODataTable in 'uDAADODataTable.pas',
+  uDABusinessProcessor in 'uDABusinessProcessor.pas',
+  uDAIBInterfaces in 'uDAIBInterfaces.pas',
+  uDAOracleInterfaces in 'uDAOracleInterfaces.pas',
+  uDAADOInterfaces in 'uDAADOInterfaces.pas',
+  uDAMacroProcessors in 'uDAMacroProcessors.pas',
+  uDADBSessionManager in 'uDADBSessionManager.pas',
+  uDAMacros in 'uDAMacros.pas',
+  DALoginService_Impl in 'DALoginService_Impl.pas',
+  DARemoteService_Impl in 'DARemoteService_Impl.pas',
+  uDAXMLUtils in 'uDAXMLUtils.pas',
+  uDARegExpr in 'uDARegExpr.pas',
+  uDADriverInfo in 'uDADriverInfo.pas',
+  uDAPleaseWaitForm in 'uDAPleaseWaitForm.pas',
+  uDAClientDataModule in 'uDAClientDataModule.pas',
+  uDAScriptingProvider in 'uDAScriptingProvider.pas',
+  uDAServerLog in 'uDAServerLog.pas',
+  uDADatasetProvider in 'uDADatasetProvider.pas',
+  uDAPoweredByDataAbstractButton in 'uDAPoweredByDataAbstractButton.pas',
+  SimpleLoginService_Impl in 'SimpleLoginService_Impl.pas',
+  DataAbstract3_Intf in 'DataAbstract3_Intf.pas',
+  DataAbstract3_Invk in 'DataAbstract3_Invk.pas',
+  DataAbstract3_Async in 'DataAbstract3_Async.pas',
+  DataAbstractService_Impl in 'DataAbstractService_Impl.pas' {DataAbstractService: TRORemoteDataModule},
+  MultiDbLoginService_Impl in 'MultiDbLoginService_Impl.pas',
+  BaseLoginService_Impl in 'BaseLoginService_Impl.pas' {BaseLoginService: TRORemoteDataModule},
+  DataAbstract4_Invk in 'DataAbstract4_Invk.pas',
+  DataAbstract4_Intf in 'DataAbstract4_Intf.pas',
+  DataAbstract4_Async in 'DataAbstract4_Async.pas',
+  uDARemoteDataAdapter in 'uDARemoteDataAdapter.pas',
+  uDACache in 'uDACache.pas',
+  uDARemoteDataAdapterRequests in 'uDARemoteDataAdapterRequests.pas',
+  uDADataStreamer in 'uDADataStreamer.pas',
+  uDADelta in 'uDADelta.pas',
+  uDADesigntimeCall in 'uDADesigntimeCall.pas',
+  uDAExceptions in 'uDAExceptions.pas',
+  uDASQL92Interfaces in 'uDASQL92Interfaces.pas',
+  uDABin2DataStreamer in 'uDABin2DataStreamer.pas',
+  uDAMemDataset in 'uDAMemDataset.pas',
+  uDAMemDataTable in 'uDAMemDataTable.pas',
+  uDAReconcileDialog in 'uDAReconcileDialog.pas' {ReconcileDialogForm},
+  uDAReconcileDialogDetails in 'uDAReconcileDialogDetails.pas',
+  uDADatasetWrapper in 'uDADatasetWrapper.pas',
+  uDADataTableReferenceCollection in 'uDADataTableReferenceCollection.pas',
+  uDAMySQLInterfaces in 'uDAMySQLInterfaces.pas',
+  uDASQLiteInterfaces in 'uDASQLiteInterfaces.pas',
+  uDAExpressionEvaluator in 'uDAExpressionEvaluator.pas',
+  uDASQL92QueryBuilder in 'uDASQL92QueryBuilder.pas',
+  uDAWhere in 'uDAWhere.pas',
+  uDARemoteCommand in 'uDARemoteCommand.pas',
+  uDAPostgresInterfaces in 'uDAPostgresInterfaces.pas',
+  uDAElevateDBInterfaces in 'uDAElevateDBInterfaces.pas',
+  uDADB2Interfaces in 'uDADB2Interfaces.pas',
+  uDASybaseInterfaces in 'uDASybaseInterfaces.pas',
+  MultiDbLoginServiceV5_Impl in 'MultiDbLoginServiceV5_Impl.pas',
+  //.31
+  uDAHETDriver in 'uDAHETDriver.pas',
+  uDAHETConnections in 'uDAHETConnections.pas'
+  //
+  {$IFDEF USE_LOCALDATAADAPTER}
+  ,uDALocalDataAdapter in 'uDALocalDataAdapter.pas'
+  {$ENDIF}
+  ;
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D11.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D11.dproj
new file mode 100644
index 0000000..b53a05f
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D11.dproj	
@@ -0,0 +1,158 @@
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{f3a56007-69a7-443a-8fdf-56da71a8440c}</ProjectGuid>
+    <MainSource>DataAbstract_Core_D11.dpk</MainSource>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+    <DCC_DependencyCheckOutputName>..\Dcu\D11\DataAbstract_Core_D11.bpl</DCC_DependencyCheckOutputName>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DebugInformation>False</DCC_DebugInformation>
+    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+    <DCC_DcuOutput>..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\Dcu\D11</DCC_DcpOutput>
+    <DCC_Define>DESIGNTIME;RELEASE</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_SYMBOL_EXPERIMENTAL>False</DCC_SYMBOL_EXPERIMENTAL>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+    <DCC_UNIT_EXPERIMENTAL>False</DCC_UNIT_EXPERIMENTAL>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DcuOutput>..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\Dcu\D11</DCC_DcpOutput>
+    <DCC_Define>DESIGNTIME</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_SYMBOL_EXPERIMENTAL>False</DCC_SYMBOL_EXPERIMENTAL>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+    <DCC_UNIT_EXPERIMENTAL>False</DCC_UNIT_EXPERIMENTAL>
+    <DCC_UnitSearchPath>..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+  </PropertyGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Delphi.Personality</Borland.Personality>
+    <Borland.ProjectType>Package</Borland.ProjectType>
+    <BorlandProject>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">RemObjects Data Abstract - Core Library</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">4</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">2</VersionInfo><VersionInfo Name="Build">434</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">4.0.2.434</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">DataAbstract_Core_D11.dpk</Source></Source><Excluded_Packages>
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      <Excluded_Packages Name="$(BDS)\bin\dclbde100.bpl">CodeGear BDE DB Components</Excluded_Packages>
+      <Excluded_Packages Name="$(BDS)\bin\bcboffice2k100.bpl">CodeGear C++Builder Office 2000 Servers Package</Excluded_Packages>
+      <Excluded_Packages Name="$(BDS)\bin\bcbofficexp100.bpl">CodeGear C++Builder Office XP Servers Package</Excluded_Packages>
+      <Excluded_Packages Name="$(BDS)\bin\dcloffice2k100.bpl">Microsoft Office 2000 Sample Automation Server Wrapper Components</Excluded_Packages>
+      <Excluded_Packages Name="$(BDS)\bin\dclofficexp100.bpl">Microsoft Office XP Sample Automation Server Wrapper Components</Excluded_Packages>
+    </Excluded_Packages></Delphi.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
+  <ItemGroup>
+    <DelphiCompile Include="DataAbstract_Core_D11.dpk">
+      <MainSource>MainSource</MainSource>
+    </DelphiCompile>
+    <DCCReference Include="BaseLoginService_Impl.pas">
+      <Form>BaseLoginService</Form>
+      <DesignClass>TRORemoteDataModule</DesignClass>
+    </DCCReference>
+    <DCCReference Include="DALoginService_Impl.pas" />
+    <DCCReference Include="DARemoteService_Impl.pas" />
+    <DCCReference Include="DataAbstract3_Async.pas" />
+    <DCCReference Include="DataAbstract3_Intf.pas" />
+    <DCCReference Include="DataAbstract3_Invk.pas" />
+    <DCCReference Include="DataAbstract4_Async.pas" />
+    <DCCReference Include="DataAbstract4_Intf.pas" />
+    <DCCReference Include="DataAbstract4_Invk.pas" />
+    <DCCReference Include="DataAbstractService_Impl.pas">
+      <Form>DataAbstractService</Form>
+      <DesignClass>TRORemoteDataModule</DesignClass>
+    </DCCReference>
+    <DCCReference Include="DataAbstract_Core_Reg.pas" />
+    <DCCReference Include="MultiDbLoginServiceV5_Impl.pas" />
+    <DCCReference Include="MultiDbLoginService_Impl.pas" />
+    <DCCReference Include="SimpleLoginService_Impl.pas" />
+    <DCCReference Include="uDAADODataTable.pas" />
+    <DCCReference Include="uDAADOInterfaces.pas" />
+    <DCCReference Include="uDABin2DataStreamer.pas" />
+    <DCCReference Include="uDABinAdapter.pas" />
+    <DCCReference Include="uDABusinessProcessor.pas" />
+    <DCCReference Include="uDACache.pas" />
+    <DCCReference Include="uDACDSDataTable.pas" />
+    <DCCReference Include="uDAClasses.pas" />
+    <DCCReference Include="uDAClientDataModule.pas" />
+    <DCCReference Include="uDADatasetProvider.pas" />
+    <DCCReference Include="uDADatasetWrapper.pas" />
+    <DCCReference Include="uDADataStreamer.pas" />
+    <DCCReference Include="uDADataTable.pas" />
+    <DCCReference Include="uDADataTableReferenceCollection.pas" />
+    <DCCReference Include="uDADB2Interfaces.pas" />
+    <DCCReference Include="uDADBSessionManager.pas" />
+    <DCCReference Include="uDADelta.pas" />
+    <DCCReference Include="uDADesigntimeCall.pas" />
+    <DCCReference Include="uDADriverInfo.pas" />
+    <DCCReference Include="uDADriverManager.pas" />
+    <DCCReference Include="uDAElevateDBInterfaces.pas" />
+    <DCCReference Include="uDAEngine.pas" />
+    <DCCReference Include="uDAExceptions.pas" />
+    <DCCReference Include="uDAExpressionEvaluator.pas" />
+    <DCCReference Include="uDAHelpers.pas" />
+    <DCCReference Include="uDAHETConnections.pas" />
+    <DCCReference Include="uDAHETDriver.pas" />
+    <DCCReference Include="uDAIBInterfaces.pas" />
+    <DCCReference Include="uDAInterfaces.pas" />
+    <DCCReference Include="uDAInterfacesEx.pas" />
+    <DCCReference Include="uDAMacroProcessors.pas" />
+    <DCCReference Include="uDAMacros.pas" />
+    <DCCReference Include="uDAMemDataset.pas" />
+    <DCCReference Include="uDAMemDataTable.pas" />
+    <DCCReference Include="uDAMySQLInterfaces.pas" />
+    <DCCReference Include="uDAOracleInterfaces.pas" />
+    <DCCReference Include="uDAPleaseWaitForm.pas" />
+    <DCCReference Include="uDAPostgresInterfaces.pas" />
+    <DCCReference Include="uDAPoweredByDataAbstractButton.pas" />
+    <DCCReference Include="uDAReconcileDialog.pas">
+      <Form>ReconcileDialogForm</Form>
+    </DCCReference>
+    <DCCReference Include="uDAReconcileDialogDetails.pas" />
+    <DCCReference Include="uDARegExpr.pas" />
+    <DCCReference Include="uDARemoteCommand.pas" />
+    <DCCReference Include="uDARemoteDataAdapter.pas" />
+    <DCCReference Include="uDARemoteDataAdapterRequests.pas" />
+    <DCCReference Include="uDARes.pas" />
+    <DCCReference Include="uDAScriptingProvider.pas" />
+    <DCCReference Include="uDAServerLog.pas" />
+    <DCCReference Include="uDASQL92Interfaces.pas" />
+    <DCCReference Include="uDASQL92QueryBuilder.pas" />
+    <DCCReference Include="uDASQLiteInterfaces.pas" />
+    <DCCReference Include="uDASupportClasses.pas" />
+    <DCCReference Include="uDASybaseInterfaces.pas" />
+    <DCCReference Include="uDAUtils.pas" />
+    <DCCReference Include="uDAWhere.pas" />
+    <DCCReference Include="uDAXMLAdapter.pas" />
+    <DCCReference Include="uDAXMLUtils.pas" />
+  </ItemGroup>
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D11.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D11.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D11.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D12.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D12.dpk
new file mode 100644
index 0000000..f1d68ac
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D12.dpk	
@@ -0,0 +1,115 @@
+package DataAbstract_Core_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - Core Library'}
+{$IMPLICITBUILD OFF}
+{$DEFINE DESIGNTIME}
+
+requires
+  rtl,
+  vcl,
+  adortl,
+  dbrtl,
+  dsnap,
+  vcldb,
+  RemObjects_Core_D12;
+
+contains
+  uDAInterfaces in 'uDAInterfaces.pas',
+  uDAInterfacesEx in 'uDAInterfacesEx.pas',
+  uDAClasses in 'uDAClasses.pas',
+  uDAHelpers in 'uDAHelpers.pas',
+  uDAEngine in 'uDAEngine.pas',
+  uDAUtils in 'uDAUtils.pas',
+  uDARes in 'uDARes.pas',
+  DataAbstract_Core_Reg in 'DataAbstract_Core_Reg.pas',
+  uDABinAdapter in 'uDABinAdapter.pas',
+  uDAXMLAdapter in 'uDAXmlAdapter.pas',
+  uDADriverManager in 'uDADriverManager.pas',
+  uDASupportClasses in 'uDASupportClasses.pas',
+  uDADataTable in 'uDADataTable.pas',
+  uDACDSDataTable in 'uDACDSDataTable.pas',
+  uDAADODataTable in 'uDAADODataTable.pas',
+  uDABusinessProcessor in 'uDABusinessProcessor.pas',
+  uDAIBInterfaces in 'uDAIBInterfaces.pas',
+  uDAOracleInterfaces in 'uDAOracleInterfaces.pas',
+  uDAADOInterfaces in 'uDAADOInterfaces.pas',
+  uDAMacroProcessors in 'uDAMacroProcessors.pas',
+  uDADBSessionManager in 'uDADBSessionManager.pas',
+  uDAMacros in 'uDAMacros.pas',
+  DALoginService_Impl in 'DALoginService_Impl.pas',
+  DARemoteService_Impl in 'DARemoteService_Impl.pas',
+  uDAXMLUtils in 'uDAXMLUtils.pas',
+  uDARegExpr in 'uDARegExpr.pas',
+  uDADriverInfo in 'uDADriverInfo.pas',
+  uDAPleaseWaitForm in 'uDAPleaseWaitForm.pas',
+  uDAClientDataModule in 'uDAClientDataModule.pas',
+  uDAScriptingProvider in 'uDAScriptingProvider.pas',
+  uDAServerLog in 'uDAServerLog.pas',
+  uDADatasetProvider in 'uDADatasetProvider.pas',
+  uDAPoweredByDataAbstractButton in 'uDAPoweredByDataAbstractButton.pas',
+  SimpleLoginService_Impl in 'SimpleLoginService_Impl.pas',
+  DataAbstract3_Intf in 'DataAbstract3_Intf.pas',
+  DataAbstract3_Invk in 'DataAbstract3_Invk.pas',
+  DataAbstract3_Async in 'DataAbstract3_Async.pas',
+  DataAbstractService_Impl in 'DataAbstractService_Impl.pas' {DataAbstractService: TRORemoteDataModule},
+  MultiDbLoginService_Impl in 'MultiDbLoginService_Impl.pas',
+  BaseLoginService_Impl in 'BaseLoginService_Impl.pas' {BaseLoginService: TRORemoteDataModule},
+  DataAbstract4_Invk in 'DataAbstract4_Invk.pas',
+  DataAbstract4_Intf in 'DataAbstract4_Intf.pas',
+  DataAbstract4_Async in 'DataAbstract4_Async.pas',
+  uDARemoteDataAdapter in 'uDARemoteDataAdapter.pas',
+  uDACache in 'uDACache.pas',
+  uDARemoteDataAdapterRequests in 'uDARemoteDataAdapterRequests.pas',
+  uDADataStreamer in 'uDADataStreamer.pas',
+  uDADelta in 'uDADelta.pas',
+  uDADesigntimeCall in 'uDADesigntimeCall.pas',
+  uDAExceptions in 'uDAExceptions.pas',
+  uDASQL92Interfaces in 'uDASQL92Interfaces.pas',
+  uDABin2DataStreamer in 'uDABin2DataStreamer.pas',
+  uDAMemDataset in 'uDAMemDataset.pas',
+  uDAMemDataTable in 'uDAMemDataTable.pas',
+  uDAReconcileDialog in 'uDAReconcileDialog.pas' {ReconcileDialogForm},
+  uDAReconcileDialogDetails in 'uDAReconcileDialogDetails.pas',
+  uDADatasetWrapper in 'uDADatasetWrapper.pas',
+  uDADataTableReferenceCollection in 'uDADataTableReferenceCollection.pas',
+  uDAMySQLInterfaces in 'uDAMySQLInterfaces.pas',
+  uDASQLiteInterfaces in 'uDASQLiteInterfaces.pas',
+  uDAExpressionEvaluator in 'uDAExpressionEvaluator.pas',
+  uDASQL92QueryBuilder in 'uDASQL92QueryBuilder.pas',
+  uDAWhere in 'uDAWhere.pas',
+  uDARemoteCommand in 'uDARemoteCommand.pas',
+  uDAPostgresInterfaces in 'uDAPostgresInterfaces.pas',
+  uDAElevateDBInterfaces in 'uDAElevateDBInterfaces.pas',
+  uDADB2Interfaces in 'uDADB2Interfaces.pas',
+  uDASybaseInterfaces in 'uDASybaseInterfaces.pas',
+  MultiDbLoginServiceV5_Impl in 'MultiDbLoginServiceV5_Impl.pas',
+  uDAHETDriver in 'uDAHETDriver.pas',
+  uDAHETConnections in 'uDAHETConnections.pas'
+  //
+  {$IFDEF USE_LOCALDATAADAPTER}
+  ,uDALocalDataAdapter in 'uDALocalDataAdapter.pas'
+  {$ENDIF}
+  ;
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D12.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D12.dproj
new file mode 100644
index 0000000..c9bef7a
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D12.dproj	
@@ -0,0 +1,177 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{f3a56007-69a7-443a-8fdf-56da71a8440c}</ProjectGuid>
+			<MainSource>DataAbstract_Core_D12.dpk</MainSource>
+			<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+			<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+			<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+			<DCC_DependencyCheckOutputName>..\Dcu\D12\DataAbstract_Core_D12.bpl</DCC_DependencyCheckOutputName>
+			<ProjectVersion>11.1</ProjectVersion>
+			<Config Condition="'$(Config)'==''">Base</Config>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base)'!=''">
+			<DCC_SymbolReferenceInfo>1</DCC_SymbolReferenceInfo>
+			<DCC_CVT_ACHAR_TO_WCHAR>error</DCC_CVT_ACHAR_TO_WCHAR>
+			<DCC_CVT_WIDENING_STRING_LOST>error</DCC_CVT_WIDENING_STRING_LOST>
+			<DCC_CVT_WCHAR_TO_ACHAR>error</DCC_CVT_WCHAR_TO_ACHAR>
+			<DCC_UnitSearchPath>..\..\RemObjects SDK for Delphi\Dcu\D12;..\Dcu\D12;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+			<DCC_BplOutput>..\Dcu\D12</DCC_BplOutput>
+			<DCC_EXPLICIT_STRING_CAST>error</DCC_EXPLICIT_STRING_CAST>
+			<DCC_IMPLICIT_STRING_CAST_LOSS>error</DCC_IMPLICIT_STRING_CAST_LOSS>
+			<DCC_EXPLICIT_STRING_CAST_LOSS>error</DCC_EXPLICIT_STRING_CAST_LOSS>
+			<DCC_IMPLICIT_STRING_CAST>error</DCC_IMPLICIT_STRING_CAST>
+			<DCC_DcuOutput>..\Dcu\D12</DCC_DcuOutput>
+			<DCC_CVT_NARROWING_STRING_LOST>error</DCC_CVT_NARROWING_STRING_LOST>
+			<DCC_DcpOutput>..\Dcu\D12</DCC_DcpOutput>
+			<GenDll>true</GenDll>
+			<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+			<GenPackage>true</GenPackage>
+			<DesignOnlyPackage>false</DesignOnlyPackage>
+			<DCC_ImageBase>00400000</DCC_ImageBase>
+			<DCC_DependencyCheckOutputName>..\Dcu\D12\DataAbstract_Core_D12.bpl</DCC_DependencyCheckOutputName>
+			<DCC_Description>RemObjects Data Abstract - Core Library</DCC_Description>
+			<DCC_Define>DESIGNTIME;$(DCC_Define)</DCC_Define>
+		</PropertyGroup>
+		<ItemGroup>
+			<DelphiCompile Include="DataAbstract_Core_D12.dpk">
+				<MainSource>MainSource</MainSource>
+			</DelphiCompile>
+			<DCCReference Include="rtl.dcp"/>
+			<DCCReference Include="vcl.dcp"/>
+			<DCCReference Include="adortl.dcp"/>
+			<DCCReference Include="dbrtl.dcp"/>
+			<DCCReference Include="dsnap.dcp"/>
+			<DCCReference Include="vcldb.dcp"/>
+			<DCCReference Include="RemObjects_Core_D12.dcp"/>
+			<DCCReference Include="uDAInterfaces.pas"/>
+			<DCCReference Include="uDAInterfacesEx.pas"/>
+			<DCCReference Include="uDAClasses.pas"/>
+			<DCCReference Include="uDAHelpers.pas"/>
+			<DCCReference Include="uDAEngine.pas"/>
+			<DCCReference Include="uDAUtils.pas"/>
+			<DCCReference Include="uDARes.pas"/>
+			<DCCReference Include="DataAbstract_Core_Reg.pas"/>
+			<DCCReference Include="uDABinAdapter.pas"/>
+			<DCCReference Include="uDAXmlAdapter.pas"/>
+			<DCCReference Include="uDADriverManager.pas"/>
+			<DCCReference Include="uDASupportClasses.pas"/>
+			<DCCReference Include="uDADataTable.pas"/>
+			<DCCReference Include="uDACDSDataTable.pas"/>
+			<DCCReference Include="uDAADODataTable.pas"/>
+			<DCCReference Include="uDABusinessProcessor.pas"/>
+			<DCCReference Include="uDAIBInterfaces.pas"/>
+			<DCCReference Include="uDAOracleInterfaces.pas"/>
+			<DCCReference Include="uDAADOInterfaces.pas"/>
+			<DCCReference Include="uDAMacroProcessors.pas"/>
+			<DCCReference Include="uDADBSessionManager.pas"/>
+			<DCCReference Include="uDAMacros.pas"/>
+			<DCCReference Include="DALoginService_Impl.pas"/>
+			<DCCReference Include="DARemoteService_Impl.pas"/>
+			<DCCReference Include="uDAXMLUtils.pas"/>
+			<DCCReference Include="uDARegExpr.pas"/>
+			<DCCReference Include="uDADriverInfo.pas"/>
+			<DCCReference Include="uDAPleaseWaitForm.pas"/>
+			<DCCReference Include="uDAClientDataModule.pas"/>
+			<DCCReference Include="uDAScriptingProvider.pas"/>
+			<DCCReference Include="uDAServerLog.pas"/>
+			<DCCReference Include="uDADatasetProvider.pas"/>
+			<DCCReference Include="uDAPoweredByDataAbstractButton.pas"/>
+			<DCCReference Include="SimpleLoginService_Impl.pas"/>
+			<DCCReference Include="DataAbstract3_Intf.pas"/>
+			<DCCReference Include="DataAbstract3_Invk.pas"/>
+			<DCCReference Include="DataAbstract3_Async.pas"/>
+			<DCCReference Include="DataAbstractService_Impl.pas">
+				<Form>DataAbstractService</Form>
+				<DesignClass>TRORemoteDataModule</DesignClass>
+			</DCCReference>
+			<DCCReference Include="MultiDbLoginService_Impl.pas"/>
+			<DCCReference Include="BaseLoginService_Impl.pas">
+				<Form>BaseLoginService</Form>
+				<DesignClass>TRORemoteDataModule</DesignClass>
+			</DCCReference>
+			<DCCReference Include="DataAbstract4_Invk.pas"/>
+			<DCCReference Include="DataAbstract4_Intf.pas"/>
+			<DCCReference Include="DataAbstract4_Async.pas"/>
+			<DCCReference Include="uDARemoteDataAdapter.pas"/>
+			<DCCReference Include="uDACache.pas"/>
+			<DCCReference Include="uDARemoteDataAdapterRequests.pas"/>
+			<DCCReference Include="uDADataStreamer.pas"/>
+			<DCCReference Include="uDADelta.pas"/>
+			<DCCReference Include="uDADesigntimeCall.pas"/>
+			<DCCReference Include="uDAExceptions.pas"/>
+			<DCCReference Include="uDASQL92Interfaces.pas"/>
+			<DCCReference Include="uDABin2DataStreamer.pas"/>
+			<DCCReference Include="uDAMemDataset.pas"/>
+			<DCCReference Include="uDAMemDataTable.pas"/>
+			<DCCReference Include="uDAReconcileDialog.pas">
+				<Form>ReconcileDialogForm</Form>
+			</DCCReference>
+			<DCCReference Include="uDAReconcileDialogDetails.pas"/>
+			<DCCReference Include="uDADatasetWrapper.pas"/>
+			<DCCReference Include="uDADataTableReferenceCollection.pas"/>
+			<DCCReference Include="uDAMySQLInterfaces.pas"/>
+			<DCCReference Include="uDASQLiteInterfaces.pas"/>
+			<DCCReference Include="uDAExpressionEvaluator.pas"/>
+			<DCCReference Include="uDASQL92QueryBuilder.pas"/>
+			<DCCReference Include="uDAWhere.pas"/>
+			<DCCReference Include="uDARemoteCommand.pas"/>
+			<DCCReference Include="uDAPostgresInterfaces.pas"/>
+			<DCCReference Include="uDAElevateDBInterfaces.pas"/>
+			<DCCReference Include="uDADB2Interfaces.pas"/>
+			<DCCReference Include="uDASybaseInterfaces.pas"/>
+			<DCCReference Include="MultiDbLoginServiceV5_Impl.pas"/>
+			<DCCReference Include="uDAHETDriver.pas"/>
+			<DCCReference Include="uDAHETConnections.pas"/>
+			<BuildConfiguration Include="Base">
+				<Key>Base</Key>
+			</BuildConfiguration>
+		</ItemGroup>
+		<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+		<ProjectExtensions>
+			<Borland.Personality>Delphi.Personality.12</Borland.Personality>
+			<Borland.ProjectType>Package</Borland.ProjectType>
+			<BorlandProject>
+				<Delphi.Personality>
+					<Parameters>
+						<Parameters Name="UseLauncher">False</Parameters>
+						<Parameters Name="LoadAllSymbols">True</Parameters>
+						<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+					</Parameters>
+					<VersionInfo>
+						<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+						<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+						<VersionInfo Name="MajorVer">4</VersionInfo>
+						<VersionInfo Name="MinorVer">0</VersionInfo>
+						<VersionInfo Name="Release">2</VersionInfo>
+						<VersionInfo Name="Build">434</VersionInfo>
+						<VersionInfo Name="Debug">False</VersionInfo>
+						<VersionInfo Name="PreRelease">False</VersionInfo>
+						<VersionInfo Name="Special">False</VersionInfo>
+						<VersionInfo Name="Private">False</VersionInfo>
+						<VersionInfo Name="DLL">False</VersionInfo>
+						<VersionInfo Name="Locale">1033</VersionInfo>
+						<VersionInfo Name="CodePage">1252</VersionInfo>
+					</VersionInfo>
+					<VersionInfoKeys>
+						<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="FileDescription"/>
+						<VersionInfoKeys Name="FileVersion">4.0.2.434</VersionInfoKeys>
+						<VersionInfoKeys Name="InternalName"/>
+						<VersionInfoKeys Name="LegalCopyright"/>
+						<VersionInfoKeys Name="LegalTrademarks"/>
+						<VersionInfoKeys Name="OriginalFilename"/>
+						<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+						<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+					</VersionInfoKeys>
+					<Source>
+						<Source Name="MainSource">DataAbstract_Core_D12.dpk</Source>
+					</Source>
+					<Excluded_Packages/>
+				</Delphi.Personality>
+			</BorlandProject>
+			<ProjectFileVersion>12</ProjectFileVersion>
+		</ProjectExtensions>
+	</Project>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D12.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D12.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D12.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D6.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D6.cfg
new file mode 100644
index 0000000..3d4736d
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D6.cfg	
@@ -0,0 +1,42 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\Dcu\D6"
+-LE"..\Dcu\D6"
+-LN"..\Dcu\D6"
+-U"..\Dcu\D6;..\..\RemObjects SDK for Delphi\Dcu\D6"
+-O"..\Dcu\D6;..\..\RemObjects SDK for Delphi\Dcu\D6"
+-I"..\Dcu\D6;..\..\RemObjects SDK for Delphi\Dcu\D6"
+-R"..\Dcu\D6;..\..\RemObjects SDK for Delphi\Dcu\D6"
+-DDESIGNTIME
+-Z
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D6.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D6.dof
new file mode 100644
index 0000000..ff6f0ce
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D6.dof	
@@ -0,0 +1,76 @@
+[FileVersion]
+Version=6.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitDeprecated=0
+UnitLibrary=0
+UnitPlatform=0
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects Data Abstract - Core Library
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\Dcu\D6
+PackageDLLOutputDir=..\Dcu\D6
+PackageDCPOutputDir=..\Dcu\D6
+SearchPath=..\Dcu\D6;..\..\RemObjects SDK for Delphi\Dcu\D6
+Packages=
+Conditionals=DESIGNTIME
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=3.0.0.280
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D6.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D6.dpk
new file mode 100644
index 0000000..1829291
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D6.dpk	
@@ -0,0 +1,116 @@
+package DataAbstract_Core_D6;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - Core Library'}
+{$IMPLICITBUILD OFF}
+{$DEFINE DESIGNTIME}
+
+requires
+  RemObjects_Core_D6,
+  rtl,
+  vcl,
+  adortl,
+  dbrtl,
+  dsnap,
+  vcldb;
+
+contains
+  uDAInterfaces in 'uDAInterfaces.pas',
+  uDAInterfacesEx in 'uDAInterfacesEx.pas',
+  uDAClasses in 'uDAClasses.pas',
+  uDAHelpers in 'uDAHelpers.pas',
+  uDAEngine in 'uDAEngine.pas',
+  uDAUtils in 'uDAUtils.pas',
+  uDARes in 'uDARes.pas',
+  DataAbstract_Core_Reg in 'DataAbstract_Core_Reg.pas',
+  uDABinAdapter in 'uDABinAdapter.pas',
+  uDAXMLAdapter in 'uDAXMLAdapter.pas',
+  uDADriverManager in 'uDADriverManager.pas',
+  uDASupportClasses in 'uDASupportClasses.pas',
+  uDADataTable in 'uDADataTable.pas',
+  uDACDSDataTable in 'uDACDSDataTable.pas',
+  uDAADODataTable in 'uDAADODataTable.pas',
+  uDABusinessProcessor in 'uDABusinessProcessor.pas',
+  uDAIBInterfaces in 'uDAIBInterfaces.pas',
+  uDAOracleInterfaces in 'uDAOracleInterfaces.pas',
+  uDAADOInterfaces in 'uDAADOInterfaces.pas',
+  uDAMacroProcessors in 'uDAMacroProcessors.pas',
+  uDADBSessionManager in 'uDADBSessionManager.pas',
+  uDAMacros in 'uDAMacros.pas',
+  DALoginService_Impl in 'DALoginService_Impl.pas',
+  DARemoteService_Impl in 'DARemoteService_Impl.pas',
+  uDAXMLUtils in 'uDAXMLUtils.pas',
+  uDARegExpr in 'uDARegExpr.pas',
+  uDADriverInfo in 'uDADriverInfo.pas',
+  uDAPleaseWaitForm in 'uDAPleaseWaitForm.pas',
+  uDAClientDataModule in 'uDAClientDataModule.pas',
+  uDAScriptingProvider in 'uDAScriptingProvider.pas',
+  uDAServerLog in 'uDAServerLog.pas',
+  uDADatasetProvider in 'uDADatasetProvider.pas',
+  uDAPoweredByDataAbstractButton in 'uDAPoweredByDataAbstractButton.pas',
+  SimpleLoginService_Impl in 'SimpleLoginService_Impl.pas',
+  DataAbstract3_Intf in 'DataAbstract3_Intf.pas',
+  DataAbstract3_Invk in 'DataAbstract3_Invk.pas',
+  DataAbstract3_Async in 'DataAbstract3_Async.pas',
+  DataAbstractService_Impl in 'DataAbstractService_Impl.pas' {DataAbstractService: TRORemoteDataModule},
+  MultiDbLoginService_Impl in 'MultiDbLoginService_Impl.pas',
+  BaseLoginService_Impl in 'BaseLoginService_Impl.pas' {BaseLoginService: TRORemoteDataModule},
+  DataAbstract4_Invk in 'DataAbstract4_Invk.pas',
+  DataAbstract4_Intf in 'DataAbstract4_Intf.pas',
+  DataAbstract4_Async in 'DataAbstract4_Async.pas',
+  uDARemoteDataAdapter in 'uDARemoteDataAdapter.pas',
+  uDACache in 'uDACache.pas',
+  uDARemoteDataAdapterRequests in 'uDARemoteDataAdapterRequests.pas',
+  uDADataStreamer in 'uDADataStreamer.pas',
+  uDADelta in 'uDADelta.pas',
+  uDADesigntimeCall in 'uDADesigntimeCall.pas',
+  uDAExceptions in 'uDAExceptions.pas',
+  uDASQL92Interfaces in 'uDASQL92Interfaces.pas',
+  uDABin2DataStreamer in 'uDABin2DataStreamer.pas',
+  uDAMemDataset in 'uDAMemDataset.pas',
+  uDAMemDataTable in 'uDAMemDataTable.pas',
+  uDAReconcileDialog in 'uDAReconcileDialog.pas' {ReconcileDialogForm},
+  uDAReconcileDialogDetails in 'uDAReconcileDialogDetails.pas',
+  uDADatasetWrapper in 'uDADatasetWrapper.pas',
+  uDADataTableReferenceCollection in 'uDADataTableReferenceCollection.pas',
+  uDAMySQLInterfaces in 'uDAMySQLInterfaces.pas',
+  uDASQLiteInterfaces in 'uDASQLiteInterfaces.pas',
+  uDAExpressionEvaluator in 'uDAExpressionEvaluator.pas',
+  uDASQL92QueryBuilder in 'uDASQL92QueryBuilder.pas',
+  uDAWhere in 'uDAWhere.pas',
+  uDARemoteCommand in 'uDARemoteCommand.pas',
+  uDAPostgresInterfaces in 'uDAPostgresInterfaces.pas',
+  uDAElevateDBInterfaces in 'uDAElevateDBInterfaces.pas',
+  uDADB2Interfaces in 'uDADB2Interfaces.pas',
+  uDASybaseInterfaces in 'uDASybaseInterfaces.pas',
+  MultiDbLoginServiceV5_Impl in 'MultiDbLoginServiceV5_Impl.pas',
+  //.31
+  uDAHETDriver in 'uDAHETDriver.pas',
+  uDAHETConnections in 'uDAHETConnections.pas'
+  //
+  {$IFDEF USE_LOCALDATAADAPTER}
+  ,uDALocalDataAdapter in 'uDALocalDataAdapter.pas'
+  {$ENDIF}
+  ;
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D6.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D6.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D6.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D7.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D7.cfg
new file mode 100644
index 0000000..d9c7e92
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D7.cfg	
@@ -0,0 +1,51 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\Dcu\D7"
+-LE"..\Dcu\D7"
+-LN"..\Dcu\D7"
+-U"..\Dcu\D7;..\Dcu\DevEx;..\..\RemObjects SDK for Delphi\Dcu\D7;..\..\Pascal Script\Dcu\D7"
+-O"..\Dcu\D7;..\Dcu\DevEx;..\..\RemObjects SDK for Delphi\Dcu\D7;..\..\Pascal Script\Dcu\D7"
+-I"..\Dcu\D7;..\Dcu\DevEx;..\..\RemObjects SDK for Delphi\Dcu\D7;..\..\Pascal Script\Dcu\D7"
+-R"..\Dcu\D7;..\Dcu\DevEx;..\..\RemObjects SDK for Delphi\Dcu\D7;..\..\Pascal Script\Dcu\D7"
+-DDESIGNTIME
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D7.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D7.dof
new file mode 100644
index 0000000..19785e8
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D7.dof	
@@ -0,0 +1,116 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects Data Abstract - Core Library
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\Dcu\D7
+PackageDLLOutputDir=..\Dcu\D7
+PackageDCPOutputDir=..\Dcu\D7
+SearchPath=..\Dcu\D7;..\Dcu\DevEx;..\..\RemObjects SDK for Delphi\Dcu\D7;..\..\Pascal Script\Dcu\D7
+Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;dclOfficeXP;RemObjects_DataSnap_D7;PurposesoftD7;addict3_d6;tb2kComplete_70;CDKDesignTimeSupport;CDKSmp;CDK;ES_CodeSite20;ESDelphiCommandCompiler;ESFileSearch;ESVisualCompositeExpert;EaglWk;ESGraphUtils;ESBase;ESVsCp;ESSampleComposites70;ESSampleCompositeEditors7;Rz252N70;SynEdit_D7;dxsbD7;dxComnD7;dxDockingD7;dxEdtrD7;dxELibD7;dxExELD7;EQGridD7;dxExRwD7;dxDBEdD7;dxInsD7;dxGrEdD7;ECQDBCD7;EQTLD7;EQDBTLD7;dxLayoutControlD7;dxMasterViewD7;dxmdsd7;dxNavBarD7;dxObjInsD7;dxPageControlD7;dxPSCoreD7;Rz252D70;cxPageControlVCLD7;cxEditorsVCLD7;dxThemeD7;cxLibraryVCLD7;cxDataD7;cxGridUtilsVCLD7;cxGridVCLD7;RemObjects_BPDX_D7
+Conditionals=DESIGNTIME
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=3.0.0.286
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D7.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D7.dpk
new file mode 100644
index 0000000..6ad0dff
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D7.dpk	
@@ -0,0 +1,115 @@
+package DataAbstract_Core_D7;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - Core Library'}
+{$IMPLICITBUILD OFF}
+{$DEFINE DESIGNTIME}
+
+requires
+  RemObjects_Core_D7,
+  rtl,
+  vcl,
+  adortl,
+  dbrtl,
+  dsnap,
+  vcldb;
+
+contains
+  uDAInterfaces in 'uDAInterfaces.pas',
+  uDAInterfacesEx in 'uDAInterfacesEx.pas',
+  uDAClasses in 'uDAClasses.pas',
+  uDAHelpers in 'uDAHelpers.pas',
+  uDAEngine in 'uDAEngine.pas',
+  uDAUtils in 'uDAUtils.pas',
+  uDARes in 'uDARes.pas',
+  DataAbstract_Core_Reg in 'DataAbstract_Core_Reg.pas',
+  uDABinAdapter in 'uDABinAdapter.pas',
+  uDAXMLAdapter in 'uDAXMLAdapter.pas',
+  uDADriverManager in 'uDADriverManager.pas',
+  uDASupportClasses in 'uDASupportClasses.pas',
+  uDADataTable in 'uDADataTable.pas',
+  uDACDSDataTable in 'uDACDSDataTable.pas',
+  uDAADODataTable in 'uDAADODataTable.pas',
+  uDABusinessProcessor in 'uDABusinessProcessor.pas',
+  uDAIBInterfaces in 'uDAIBInterfaces.pas',
+  uDAOracleInterfaces in 'uDAOracleInterfaces.pas',
+  uDAADOInterfaces in 'uDAADOInterfaces.pas',
+  uDAMacroProcessors in 'uDAMacroProcessors.pas',
+  uDADBSessionManager in 'uDADBSessionManager.pas',
+  uDAMacros in 'uDAMacros.pas',
+  DALoginService_Impl in 'DALoginService_Impl.pas',
+  DARemoteService_Impl in 'DARemoteService_Impl.pas',
+  uDAXMLUtils in 'uDAXMLUtils.pas',
+  uDARegExpr in 'uDARegExpr.pas',
+  uDADriverInfo in 'uDADriverInfo.pas',
+  uDAPleaseWaitForm in 'uDAPleaseWaitForm.pas',
+  uDAClientDataModule in 'uDAClientDataModule.pas',
+  uDAScriptingProvider in 'uDAScriptingProvider.pas',
+  uDAServerLog in 'uDAServerLog.pas',
+  uDADatasetProvider in 'uDADatasetProvider.pas',
+  uDAPoweredByDataAbstractButton in 'uDAPoweredByDataAbstractButton.pas',
+  SimpleLoginService_Impl in 'SimpleLoginService_Impl.pas',
+  DataAbstract3_Intf in 'DataAbstract3_Intf.pas',
+  DataAbstract3_Invk in 'DataAbstract3_Invk.pas',
+  DataAbstract3_Async in 'DataAbstract3_Async.pas',
+  DataAbstractService_Impl in 'DataAbstractService_Impl.pas' {DataAbstractService: TRORemoteDataModule},
+  MultiDbLoginService_Impl in 'MultiDbLoginService_Impl.pas',
+  BaseLoginService_Impl in 'BaseLoginService_Impl.pas' {BaseLoginService: TRORemoteDataModule},
+  DataAbstract4_Invk in 'DataAbstract4_Invk.pas',
+  DataAbstract4_Intf in 'DataAbstract4_Intf.pas',
+  DataAbstract4_Async in 'DataAbstract4_Async.pas',
+  uDARemoteDataAdapter in 'uDARemoteDataAdapter.pas',
+  uDACache in 'uDACache.pas',
+  uDARemoteDataAdapterRequests in 'uDARemoteDataAdapterRequests.pas',
+  uDADataStreamer in 'uDADataStreamer.pas',
+  uDADelta in 'uDADelta.pas',
+  uDADesigntimeCall in 'uDADesigntimeCall.pas',
+  uDAExceptions in 'uDAExceptions.pas',
+  uDASQL92Interfaces in 'uDASQL92Interfaces.pas',
+  uDABin2DataStreamer in 'uDABin2DataStreamer.pas',
+  uDAMemDataset in 'uDAMemDataset.pas',
+  uDAMemDataTable in 'uDAMemDataTable.pas',
+  uDAReconcileDialog in 'uDAReconcileDialog.pas' {ReconcileDialogForm},
+  uDAReconcileDialogDetails in 'uDAReconcileDialogDetails.pas',
+  uDADatasetWrapper in 'uDADatasetWrapper.pas',
+  uDADataTableReferenceCollection in 'uDADataTableReferenceCollection.pas',
+  uDAMySQLInterfaces in 'uDAMySQLInterfaces.pas',
+  uDASQLiteInterfaces in 'uDASQLiteInterfaces.pas',
+  uDAExpressionEvaluator in 'uDAExpressionEvaluator.pas',
+  uDASQL92QueryBuilder in 'uDASQL92QueryBuilder.pas',
+  uDAWhere in 'uDAWhere.pas',
+  uDARemoteCommand in 'uDARemoteCommand.pas',
+  uDAPostgresInterfaces in 'uDAPostgresInterfaces.pas',
+  uDAElevateDBInterfaces in 'uDAElevateDBInterfaces.pas',
+  uDADB2Interfaces in 'uDADB2Interfaces.pas',
+  uDASybaseInterfaces in 'uDASybaseInterfaces.pas',
+  MultiDbLoginServiceV5_Impl in 'MultiDbLoginServiceV5_Impl.pas',
+  uDAHETDriver in 'uDAHETDriver.pas',
+  uDAHETConnections in 'uDAHETConnections.pas'
+  //
+  {$IFDEF USE_LOCALDATAADAPTER}
+  ,uDALocalDataAdapter in 'uDALocalDataAdapter.pas'
+  {$ENDIF}
+  ;
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D7.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D7.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_D7.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_Glyphs.lrs b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_Glyphs.lrs
new file mode 100644
index 0000000..caa8e90
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_Glyphs.lrs	
@@ -0,0 +1,1486 @@
+LazarusResources.Add('TDAPoweredByDataAbstractButton','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@'#0#0'@'#0#0'@'#0#0
+  +'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0
+  +#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0'@'#0#0#135'L*'#135'N.'#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#128#0#0#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#128#0#0'@'#0
+  +#0#142'V5'#135'N.'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0#255#255
+  +#255#255#255#255#128#0#0#255#255#255#255#255#255#128#0#0#255#255#255#128#0#0
+  +'@'#0#0#169'vR'#135'N.'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#128#0#0#255#255#255#128#0#0#255#255#255#255#255
+  +#255#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0#128#0#0#255#255#255#128#0#0
+  +'@'#0#0#173'}Y'#135'N.'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#128#0#0#255#255#255#128#0#0#255#255#255#255#255
+  +#255#128#0#0#255#255#255#128#0#0#255#255#255#255#255#255#128#0#0#255#255#255
+  +#128#0#0'@'#0#0#166'tU'#137'P2'#134'L-'#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#128#0#0#255#255#255#128#0#0#128#0#0#128#0
+  +#0#255#255#255#255#255#255#255#255#255#128#0#0#128#0#0#255#255#255#255#255
+  +#255#128#0#0'@'#0#0#182#138'j'#156'hI'#144'Z:'#139'R2'#135'N.'#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#128#0#0#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#128#0#0'@'#0#0#237#207#177#211#172#142#180#132'g'
+  +#153'eE'#142'T5'#136'P/'#255#0#255#255#0#255#255#0#255#255#0#255#128#0#0#128
+  +#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0
+  +#128#0#0#128#0#0#254#233#209#255#235#207#255#231#202#239#208#178#203#163#130
+  +#165'rQ'#144'W8'#137'P2'#135'M-'#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#208#183#169#207#182#164#224#201#181#247#229#209#255#240#221#255#240
+  +#221#254#238#218#254#237#216#254#235#213#254#234#212#254#233#209#254#233#207
+  +#255#234#206#255#235#207#251#225#196#220#183#151#170'xX'#143'Y:'#138'R3'#255
+  +#0#255#255#0#255#255#0#255#255#0#255#218#198#187#216#192#180#224#203#187#246
+  +#230#212#255#243#225#255#240#221#254#239#222#254#239#222#254#237#220#254#238
+  +#218#254#237#216#254#234#212#254#233#209#254#231#207#255#231#202#255#234#206
+  +#255#230#198#215#177#144#161'oP'#143'Y:'#139'T4'#255#0#255#255#0#255#255#0
+  +#255#225#208#197#226#206#194#240#224#209#254#240#226#255#243#227#254#240#226
+  +#254#240#226#254#240#226#254#240#224#254#239#222#254#237#220#254#237#216#254
+  +#234#212#254#233#209#254#231#206#255#231#202#255#234#202#247#217#184#193#150
+  +'v'#151'dD'#143'Y:'#255#0#255#255#0#255#235#225#218#231#218#208#235#221#208
+  +#250#237#224#254#242#231#254#242#231#254#243#230#254#243#230#254#243#230#255
+  +#243#227#254#239#225#254#239#222#254#237#220#254#237#216#254#234#212#254#233
+  +#209#254#231#206#255#231#201#255#230#198#222#184#153#164'tU'#147'_A'#145'[<'
+  +#255#0#255#240#235#230#237#227#220#242#230#220#252#242#230#254#244#237#254
+  +#244#237#254#244#237#254#244#237#254#244#237#254#242#231#254#242#229#254#239
+  +#225#254#239#221#254#238#218#254#235#213#254#233#209#254#231#207#255#231#202
+  +#255#231#201#234#202#170#176#129'e'#153'gH'#150'bC'#255#0#255#247#243#242#243
+  +#235#230#246#237#227#252#243#234#254#247#239#254#247#240#254#247#239#254#247
+  +#240#254#247#239#254#244#237#254#242#231#254#242#229#254#240#224#254#237#220
+  +#254#237#216#254#234#212#254#233#207#255#231#202#255#231#202#237#204#173#180
+  +#136'k'#158'mP'#154'iJ'#255#0#255#254#252#252#250#246#243#247#240#234#252#244
+  +#235#254#248#240#254#250#244#254#250#244#254#250#244#254#248#240#254#244#237
+  +#254#244#234#254#243#230#254#240#226#254#239#221#254#237#217#254#235#213#254
+  +#233#207#254#231#206#255#231#202#229#197#166#178#137'l'#161'tX'#159'oR'#255#0
+  +#255#255#255#255#255#254#254#252#248#246#252#246#239#254#250#244#254#251#247
+  +#254#251#248#254#251#247#254#250#244#254#247#239#254#246#235#254#243#230#254
+  +#240#226#254#239#222#254#237#217#254#235#213#254#233#209#254#233#207#252#226
+  +#197#213#180#151#177#136'm'#167'z`'#164'wZ'#255#0#255#255#0#255#255#255#255
+  +#255#255#255#254#250#247#254#250#244#254#251#248#254#252#252#254#251#248#254
+  +#250#244#254#248#240#254#244#237#254#243#230#254#240#226#254#239#222#254#237
+  +#217#254#235#213#254#233#209#255#234#206#235#208#181#197#160#136#178#138'r'
+  +#172#130'i'#255#0#255#255#0#255#255#0#255#255#255#255#255#255#255#255#255#252
+  +#254#250#247#254#250#247#254#251#247#254#251#247#254#250#244#252#246#239#254
+  +#246#234#254#243#230#254#240#226#254#239#221#254#237#217#254#237#216#254#233
+  ,#209#242#218#192#211#181#157#189#154#131#182#144'z'#178#138't'#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#255#255#255#255#255#255#254#254#254#251#248
+  +#254#250#244#254#247#240#254#247#240#254#244#237#254#244#234#254#243#230#254
+  +#240#226#255#240#221#254#237#216#251#231#208#239#216#193#217#191#171#198#167
+  +#149#192#159#139#187#153#132#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#255#255#255#255#255#255#255#255#254#251#248#254#250#244
+  +#252#246#239#252#243#234#252#240#229#251#239#226#250#235#220#248#231#215#242
+  +#224#206#230#211#193#218#194#178#208#181#164#202#173#156#198#167#149#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#255#255#255#255#255#255#255#255#255#254#254#252#252#248#250#247#240#247
+  +#239#233#244#234#225#239#227#217#235#220#209#229#212#201#221#203#191#216#196
+  +#182#213#189#175#208#183#166#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#255#255
+  +#255#255#255#255#255#255#255#254#254#251#247#246#246#239#235#242#233#227#237
+  +#225#220#231#218#211#227#212#202#221#204#193#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#255#255#255#254
+  +#254#251#247#246#246#240#237#242#233#227#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+]);
+LazarusResources.Add('TDADriverManager','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@'#0#0'@'#0#0'@'#0#0
+  +'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0
+  +#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0'@'#0#0#255#0#255#129#30#0
+  +#129#30#0#131#31#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#128#0#0#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#128#0#0
+  +'@'#0#0#129#30#0#129#30#0#136'%'#2#247#172'Q'#131#31#0#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0
+  +#255#255#255#255#255#255#128#0#0#255#255#255#255#255#255#128#0#0#255#255#255
+  +#128#0#0'@'#0#0#189'O'#3#173'E'#6#222'}'#31#255#173'C'#255#184'Z'#131#31#0
+  +#131#31#0#131#31#0#255#0#255#255#0#255#128#0#0#255#255#255#128#0#0#255#255
+  +#255#255#255#255#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0#128#0#0#255#255
+  +#255#128#0#0'@'#0#0#255#134#3#255#140#12#255#152#28#255#163'/'#255#175'E'#255
+  +#186']'#255#198'v'#131#31#0#255#0#255#255#0#255#128#0#0#255#255#255#128#0#0
+  +#255#255#255#255#255#255#128#0#0#255#255#255#128#0#0#255#255#255#255#255#255
+  +#128#0#0#255#255#255#128#0#0'@'#0#0#255#146#19#255#134#3#255#142#13#230''#23
+  +#255#164'2'#255#176'G'#255#187'_'#131#31#0#255#0#255#255#0#255#128#0#0#255
+  +#255#255#128#0#0#128#0#0#128#0#0#255#255#255#255#255#255#255#255#255#128#0#0
+  +#128#0#0#255#255#255#255#255#255#128#0#0'@'#0#0#255#164'2'#247#136#15#154'0'
+  +#0#130#31#0#137'$'#1#230#137')'#255#177'I'#213#130'8'#131#31#0#255#0#255#128
+  +#0#0#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#128#0#0'@'#0#0
+  +#255#183'V'#154'0'#0#255#0#255'_'#9#0'}'#27#0#167'A'#9#255#166'5'#255#177'L'
+  +#188'K'#0#140'+'#5#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0
+  +#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#255#216#159#255#202#128#154
+  +'0'#0#255#0#255'L'#0#0'i'#14#0#163':'#4#255#156'#'#255#167'7'#255#178'N'#131
+  +#31#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0'K'#130#0'K'#130'"'
+  +#143#186'o'#220#248#3'_'#150#149','#0#181'D'#0#173'Z,'#255#217#161#255#216
+  +#158#154'0'#0#255#0#255'h'#13#0#150'-'#0#176'B'#2#255#146#19#255#157'%'#188
+  +'K'#0#129#30#0#255#0#255#255#0#255#0'M'#132#2'W'#138#0'K'#130#0'K'#130#15#129
+  +#177'@'#201#240'c'#222#255'^'#203#234#3'_'#150#24'f'#142'(f}'#197'}K'#255#217
+  +#161#255#215#157#154'0'#0#165'B'#14#169'C'#9#247#130#7#255#136#6#238#130#17
+  +#131#31#0#255#0#255#255#0#255#255#0#255#0'X'#144#4'g'#153#19#201#254#15#199
+  +#254'!'#206#254'5'#211#254'L'#217#254'e'#224#255''#229#255#154#235#255#3'_'
+  +#150#189'rA'#255#217#161#255#217#161#255#215#154#255#196's'#255#175'F'#255
+  +#154'!'#255#136#6#131#31#0#255#0#255#255#0#255#255#0#255#255#0#255#0'['#147#3
+  +'d'#152'('#194#240#17#199#254#17#199#254'#'#206#254'7'#212#254'N'#217#254'g'
+  +#224#255#129#230#255#3'_'#150#222#163'n'#255#217#161#255#217#161#255#217#161
+  +#255#213#152#255#194'n'#255#173'C'#255#153#30#131#31#0#255#0#255#255#0#255
+  +#255#0#255#0'K'#130#1'd'#157#3'i'#157'I'#203#240'-'#208#254#13#180#233#0'K'
+  +#130#3'Z'#140#27#146#192'P'#218#254'j'#224#255')x'#149#149'I"'#158'@'#17#172
+  +'A'#4#222#163'n'#255#217#161#230#172'p'#131#31#0#131#31#0#157'5'#3#255#0#255
+  +#255#0#255#0'K'#130#1'd'#156#11'v'#166'b'#184#213#129#230#255'R'#218#255#0'K'
+  +#130#255#0#255#0'K'#130#0'K'#130'*'#177#220'S'#218#255'Z'#208#240#3'_'#150'['
+  +'-'#24#238's'#0#158'<'#10#255#217#161#131#31#0#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#0'K'#130#4#138#193'i'#186#213#186#242#255#171#239#255'{'
+  +#229#255#0'K'#130#255#0#255#0'Q'#137#0'K'#130#23#153#199'>'#213#254'U'#220
+  +#255'n'#225#255#3'_'#150#140'&'#0#149','#0#149'6'#15#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#0'S'#139#3#129#187#28#137#181#144#213
+  +#234#186#242#255#167#238#255#0'K'#130#255#0#255#0'K'#130#2'f'#156#18#169#220
+  +'*'#208#254'@'#213#254#3'_'#150#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0'K'#130#3
+  +#139#197#12'~'#173#171#233#248#186#242#255#131#211#234#0'K'#130#3'j'#157#13
+  +#139#188#12#198#254#24#202#254#26#166#213#0'K'#130#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#0'K'#130#5#147#201#144#213#234#186#242#255#184#242#255
+  +#159#237#255'n'#225#255'B'#215#254#28#203#254#12#198#254#0'K'#130#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#0'K'#130#6#139#191#186#242#255
+  +#186#242#255#186#242#255#184#242#255#154#235#255'j'#225#255'>'#213#254#25#203
+  +#254#0'K'#130#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  ,#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#2'}'#182#0
+  +'K'#130#0'K'#130'0'#153#193':'#157#193#186#242#255#183#242#255'j'#198#227#0
+  +'K'#130#0'K'#130#9'y'#170#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#0'\'#149#6#169#225'\'#177#207#171#233#248
+  +#0'K'#130#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0'K'#130#0'K'
+  +#130#0'K'#130#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255
+]);
+LazarusResources.Add('TDAConnectionManager','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@'#0#0'@'#0#0'@'#0#0
+  +'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0'M'#194#11
+  +'c'#221#255#0#255#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128
+  +#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0'@'#0#0#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#0'M'#194#0'M'#194#3'S'#202#7'\'#213#0'M'#194#128#0#0
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#128#0#0'@'#0#0#255#0
+  +#255#255#0#255#255#0#255#255#0#255#0'M'#194#12'e'#217#17'n'#217#0'M'#194#0'M'
+  +#194#255#0#255#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0#255#255#255#255
+  +#255#255#128#0#0#255#255#255#255#255#255#128#0#0#255#255#255#128#0#0'@'#0#0
+  +#255#0#255#255#0#255#255#0#255#0'M'#194#10'c'#217'9'#166#255','#147#255#7'\'
+  +#213#0'M'#194#255#0#255#128#0#0#255#255#255#128#0#0#255#255#255#255#255#255
+  +#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0#128#0#0#255#255#255#128#0#0'@'#0
+  +#0#255#0#255#255#0#255#0'M'#194#10'c'#217#29#128#231'0'#154#255#24'w'#243#1
+  +'P'#198#255#0#255#255#0#255#128#0#0#255#255#255#128#0#0#255#255#255#255#255
+  +#255#128#0#0#255#255#255#128#0#0#255#255#255#255#255#255#128#0#0#255#255#255
+  +#128#0#0'@'#0#0#0'M'#194#0'M'#194#10'c'#217'&'#140#243'0'#154#255#13'h'#225#1
+  +'P'#198#255#0#255#255#0#255#255#0#255#128#0#0#255#255#255#128#0#0#128#0#0#128
+  +#0#0#255#255#255#255#255#255#255#255#255#128#0#0#128#0#0#255#255#255#255#255
+  +#255#128#0#0'@'#0#0'C'#178#255'A'#177#255'4'#159#255#0'M'#194#24'w'#243#0'M'
+  +#194#255#0#255#255#0#255#255#0#255#255#0#255#128#0#0#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#128#0#0'@'#0#0'C'#180#255'6'#161#255'('#143
+  +#255#31#130#255#0'M'#194#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128
+  +#0#0#128#0#0#128#0#0#128#0#0#3'S'#198'+'#146#243'*'#146#255' '#131#255#31#129
+  +#255#0'M'#194#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#3'Z'#5#8's'#21#3'^'#8#0'Lh'#2
+  +'Q'#198'-'#150#243'F'#183#255' '#131#231#2'Q'#198#25'y'#243#31#129#255#31#129
+  +#255#0'M'#194#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#3'Z'#5#5'e'#12#31#189'M%'#196'R'#6'e'#12
+  +#0'Lc'#3'S'#198'.'#152#243'.'#152#255#19'p'#231#1'P'#198#19'p'#235#31#129#255
+  +#0'M'#194#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#3'Z'#5#3'Z'#5#22#153'08'#227'l?'#233'o'#6
+  +'e'#10#0'L9'#2'Q'#198#28'}'#243#31#129#255#17'm'#231#0'M'#194#17'm'#231#0'M'
+  +#194#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#3'Z'#5#7#138#19#3'Z'#5'$'#175'A7'#226'_'#31
+  +#188'7'#2'['#3#0'L5'#1'P'#198#24'w'#243#31#129#255#17'm'#231#0'M'#194#0'M'
+  +#194#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#3'Z'#5#18#169'.'#19#160'2'#3'Z'#5#17#146#31#15
+  +#165#27#3#135#5#0'U'#0#0'L5'#1'P'#198#24'w'#243#28'~'#251#3'S'#202#0'M'#194
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#3'Z'#5#27#182'C'#24#175'='#13#140'!'#3'Z'#5#1'r'#2#0
+  +#129#0#0'~'#0#0'U'#0#0'L5'#1'P'#198#4'V'#206#0'M'#194#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#3'Z'#5#24#172';'#17#156')'#11#139#25#4'r'#9#3'Z'#5#0'i'#0#0#129#0
+  +#0'~'#0#0'['#0#0'L5'#0'M'#194#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#3
+  +'Z'#5#16#154'('#10#137#24#5'y'#10#1'l'#2#1'd'#1#3'Z'#5#0'^'#0#0'~'#0#0'U'#0#0
+  +'K'#0#255#0#255#0#189#255#0#189#255#0#189#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#3'Z'#5#12#137#29#0'K'#0#4
+  +'w'#9#1'l'#2#1'j'#1#1'j'#1#1'd'#1#0'K'#0#0'N'#0#0'K'#0#255#0#255#7#233#231#7
+  +#233#231#7#233#231#0#189#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#3'Z'#5#15#128#29'-'#212'N'#3'm'#6#0'K'#0#0'K'#0#0'K'
+  +#0#0'K'#0#0'K'#0#0'K'#0#0'K'#0#255#0#255#255#0#255#255#0#255#255#0#255#7#233
+  +#231#0#189#255#0#189#255#0#189#255#255#0#255#255#0#255#255#0#255#255#0#255#3
+  +'Z'#5#31#166':-'#212'N'#3'v'#5#0'M'#0#0'K'#0#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#7#233
+  +#231#7#233#231#7#233#231#255#0#255#255#0#255#255#0#255#255#0#255#3'Z'#5#9'n'
+  +#17'('#206'G'#3#140#6#0'^'#0#0'K'#0#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0'K'#0#0'K'
+  ,#0#0'`'#1#0'^'#0#0'K'#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#3'Z'#5#6'l'#16#2'X'#5#0'K'
+  +#0#0'K'#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#10'y'#25#3'Z'#5
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+]);
+LazarusResources.Add('TDASchema','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@'#0#0'@'#0#0'@'#0#0
+  +'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0#255#0
+  +#255#255#0#255#255#0#255#0'K'#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0
+  +#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0'@'#0#0#255#0#255#255#0#255#0'K'#0
+  +#12#152#25#0'K'#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#128#0#0
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#128#0#0'@'#0#0#255#0
+  +#255#0'K'#0#24#169'-'#17#160'#'#12#152#25#0'K'#0#255#0#255#255#0#255#255#0
+  +#255#255#0#255#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0#255#255#255#255
+  +#255#255#128#0#0#255#255#255#255#255#255#128#0#0#255#255#255#128#0#0'@'#0#0#0
+  +'K'#0'&'#186'D'#31#177'8'#24#169'-'#17#160'#'#12#152#25#0'K'#0#255#0#255#255
+  +#0#255#255#0#255#128#0#0#255#255#255#128#0#0#255#255#255#255#255#255#128#0#0
+  +#255#255#255#128#0#0#128#0#0#128#0#0#128#0#0#255#255#255#128#0#0'@'#0#0'4'
+  +#203'\,'#193'N&'#186'D'#31#177'8'#23#167','#17#159'!'#12#151#24#0'K'#0#255#0
+  +#255#255#0#255#128#0#0#255#255#255#128#0#0#255#255#255#255#255#255#128#0#0
+  +#255#255#255#128#0#0#255#255#255#255#255#255#128#0#0#255#255#255#128#0#0'@'#0
+  +#0'>'#215'm4'#203'\,'#193'N&'#186'D'#29#176'6'#23#167','#17#159'!'#9#138#19#0
+  +'K'#0#255#0#255#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0#255#255#255#255
+  +#255#255#255#255#255#128#0#0#128#0#0#255#255#255#255#255#255#128#0#0'@'#0#0
+  +'>'#215'm9'#209'f4'#203'\,'#193'N&'#186'D'#29#176'6'#17#151'"'#0'K'#0#255#0
+  +#255#255#0#255#128#0#0#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#128#0#0'@'#0#0#0'K'#0'>'#215'm9'#209'f4'#203'\,'#193'N'#28#164'3'#0'K'#0
+  +#255#0#255#255#0#255#255#0#255#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0
+  +#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#255#0#255#255#0
+  +#255#0'K'#0'>'#215'm9'#209'f&'#177'E'#0'K'#0#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0'K'#0'/'#188'T'#0'K'#0
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#0'K'#0'/'#188'T'#0'K'#0#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0'K'#0#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#0'K'#0#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0'K'#0
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#0'K'#0#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0
+  +'K'#0#0'K'#0#0'K'#0#0'K'#0#0'K'#0#0'K'#0#0'K'#0#0'K'#0#0'K'#0#0'K'#0#0'K'#0#0
+  +'K'#0#0'K'#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#0'K'#0#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#0'K'#0#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#0#0#130#0#0#130#0#0#130#0#0#130#0#0#130#0#0#130#0#0#130#0#0#130#0
+  +#0#130#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#0#0#130#3'('#255#0#30#254#0#24#243#0#18#225#0#13#204#1#10#182#3#7#164#0
+  +#0#130#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#0#0#130#12'5'#255#3'('#255#0'!'#255#0#24#243#0#18#225#0#15#212#1#10#187
+  +#0#0#130#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#0#0#130#24'C'#255#12'5'#255#3'('#255#0'!'#255#0#30#254#0#20#234#0
+  +#15#212#0#0#130#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#0#0#130'&R'#255#24'C'#255#18'='#255#3'('#255#0'!'#255#0#30#254
+  +#0#20#234#0#0#130#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#0#0#130'/]'#255'&R'#255#24'C'#255#22'A'#255#12'5'#255#0'!'#255
+  +#0#30#254#0#0#130#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  ,#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#0#0#130'1^'#255'1^'#255'1^'#255#24'C'#255#22'A'#255#12'5'#255
+  +#3'('#255#0#0#130#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#0#0#130'1^'#255'1^'#255'/]'#255'1^'#255#24'C'#255#22'A'#255#12
+  +'5'#255#0#0#130#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#0#0#130#0#0#130#0#0#130#0#0#130#0#0#130#0#0#130#0#0#130#0#0
+  +#130#0#0#130#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255
+]);
+LazarusResources.Add('TDADiagrams','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@'#0#0'@'#0#0'@'#0#0
+  +'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0#255#0
+  +#255#255#0#255#5'f'#149#5'f'#149#5'f'#149#5'f'#149#5'f'#149#5'f'#149#255#0
+  +#255#255#0#255#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0
+  +#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0'@'#0#0#142']Y'#2't'#169'0'#201#233
+  +#18#203#254' '#206#254'T'#222#255't'#224#248','#167#211#5'f'#149#255#0#255
+  +#128#0#0#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#128#0#0'@'#0
+  +#0#2't'#169's'#250#254'?'#227#254#18#203#254' '#206#254'T'#222#255't'#224#248
+  +'0'#176#218#3#134#193#5'f'#149#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0
+  +#255#255#255#255#255#255#128#0#0#255#255#255#255#255#255#128#0#0#255#255#255
+  +#128#0#0'@'#0#0#2't'#169's'#250#254'?'#227#254#18#203#254' '#206#254'T'#222
+  +#255't'#224#248'0'#176#218#3#134#193#5'f'#149#128#0#0#255#255#255#128#0#0#255
+  +#255#255#255#255#255#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0#128#0#0#255
+  +#255#255#128#0#0'@'#0#0#2't'#169's'#250#254'?'#227#254#18#203#254' '#206#254
+  +'T'#222#255't'#224#248'0'#176#218#3#134#193#5'f'#149#128#0#0#255#255#255#128
+  +#0#0#255#255#255#255#255#255#128#0#0#255#255#255#128#0#0#255#255#255#255#255
+  +#255#128#0#0#255#255#255#128#0#0'@'#0#0#2't'#169#159#251#254#163#243#255#182
+  +#242#255#218#248#255#229#250#255#216#247#254#154#220#239'A'#172#213#5'f'#149
+  +#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0#255#255#255#255#255#255#255#255
+  +#255#128#0#0#128#0#0#255#255#255#255#255#255#128#0#0'@'#0#0#2't'#169#167#233
+  +#243#28#170#211#7#145#197#7#136#188#16#139#188#31#145#191#20'y'#173'y'#192
+  +#220#5'f'#149#128#0#0#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#128#0#0'@'#0#0#2't'#169'1'#181#211'?'#227#254#18#203#254' '#206#254'T'#222
+  +#255't'#224#248'0'#176#218#2'h'#163#3'h'#154#128#0#0#128#0#0#128#0#0#128#0#0
+  +#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0';'
+  +#192'['#2't'#169's'#250#254'?'#227#254#18#203#254' '#206#254'T'#222#255't'
+  +#224#248'0'#176#218#3#134#193#5'f'#149#152'ic'#249#238#225#251#242#234#0'K'#0
+  +#28#186'G'#28#186'G'#25#181'A'#0'K'#0#244#218#185#242#213#176#242#212#174#0
+  +'K'#0#28#186'GA'#201'k'#2't'#169's'#250#254'?'#227#254#18#203#254' '#206#254
+  +'T'#222#255't'#224#248'0'#176#218#3#134#193#5'f'#149#163'rf'#246#238#233#251
+  +#242#234#0'K'#0#0'K'#0#0'K'#0#0'K'#0#0'K'#0#244#218#185#244#218#182#242#212
+  +#174#0'K'#0#0'K'#0#30'k'#30#2't'#169's'#250#254'?'#227#254#18#203#254' '#206
+  +#254'T'#222#255't'#224#248'0'#176#218#3#134#193#5'f'#149#167'uh'#248#243#240
+  +#253#249#245#251#242#234#251#242#230#0'e'#0#247#230#209#246#226#204#240#222
+  +#204#244#218#185#244#218#185#242#213#176#242#212#174#30#129#30#2't'#169'x'
+  +#251#254'h'#246#255'U'#246#254'_'#254#255'x'#251#254#137#251#254'H'#207#242#5
+  +#139#199#5'f'#149#172'yi'#248#243#240#255#254#254#248#243#240#251#242#234#0
+  +'e'#0#0'e'#0#0'e'#0#0'e'#0#0'e'#0#0'e'#0#0'e'#0#0'e'#0#30#129#30#2't'#169#255
+  +#254#254#240#255#255#198#255#255#160#255#255#159#251#254#159#251#254#146#255
+  +#255'U'#246#254#5'f'#149#177'~k'#248#243#240#255#254#254#255#254#254#248#243
+  +#240#254#247#241#249#238#225#248#234#216#247#230#209#0'e'#0#245#222#192#245
+  +#222#192#242#213#176#242#213#176#244#218#185#4'y'#175#240#255#255#218#248#255
+  +#183#255#255#159#251#254#137#251#254#131#250#251#8'k'#154#255#0#255#182#129
+  +'l'#248#243#240#255#254#254#255#254#254#255#254#254#251#242#234#248#243#240
+  +#251#242#230#248#234#216#0'e'#0#247#230#209#245#222#192#245#222#192#244#218
+  +#185#242#213#176#244#218#185#2't'#169#2't'#169#2't'#169#2't'#169#2't'#169#2
+  +'t'#169#255#0#255#255#0#255#187#132'n'#248#243#240#255#254#254#255#254#254
+  +#255#254#254#255#254#254#251#242#234#0#0#130#0#0#130#0#0#130#0#0#130#0#0#130
+  +#245#222#192#244#218#185#242#213#176#242#212#174#240#208#165#240#207#163#128
+  +'PK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#192#137'o'#253#249#245
+  +#255#254#254#255#254#254#255#254#254#255#254#254#255#254#254#0#0#130#13'4'
+  +#255#4''''#255#0#30#255#0#0#130#246#224#193#245#222#192#244#218#182#242#213
+  +#176#242#212#174#240#208#165#128'PK'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#192#137'o'#253#249#245#255#254#254#255#254#254#255#254#254#255#254
+  +#254#255#254#254#0#0#130'(S'#255#26'D'#255#13'4'#255#0#0#130#247#230#209#246
+  +#224#193#245#222#192#244#218#185#242#213#176#242#212#174#128'PK'#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#203#145's'#248#243#240#255#254#254
+  +#255#254#254#255#254#254#255#254#254#255#254#254#0#0#130'1^'#255'1^'#255'(S'
+  +#255#0#0#130#248#234#216#247#230#209#246#226#204#244#218#185#244#218#185#244
+  +#218#182#128'PK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#203#145's'
+  +#253#249#245#255#254#254#255#254#254#255#254#254#255#254#254#255#254#254#0#0
+  ,#130#0#0#130#0#0#130#0#0#130#0#0#130#249#238#225#248#234#216#247#230#209#246
+  +#224#193#246#224#193#244#218#182#128'PK'#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#212#152'u'#253#249#245#255#254#254#255#254#254#255#254#254#255
+  +#254#254#255#254#254#255#254#254#255#254#254#255#254#254#255#254#254#251#242
+  +#234#253#249#245#248#234#216#248#234#216#248#234#216#246#224#193#245#222#192
+  +#128'PK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#212#152'u'#253#249
+  +#245#255#254#254#255#254#254#255#254#254#255#254#254#255#254#254#255#254#254
+  +#255#254#254#255#254#254#255#254#254#253#249#245#251#242#234#251#242#234#250
+  +#238#222#248#234#216#248#234#216#246#224#193#128'PK'#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#212#152'u'#255#254#254#255#254#254#255#254#254#255
+  +#254#254#255#254#254#255#254#254#255#254#254#255#254#254#255#254#254#255#254
+  +#254#255#254#254#253#249#245#254#247#241#251#242#230#248#234#216#248#234#216
+  +#246#224#193#128'PK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#207
+  +#142'h'#207#142'h'#207#142'h'#207#142'h'#207#142'h'#207#142'h'#207#142'h'#207
+  +#142'h'#207#142'h'#207#142'h'#207#142'h'#207#142'h'#207#142'h'#207#142'h'#207
+  +#142'h'#207#142'h'#207#142'h'#207#142'h'#207#142'h'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255
+]);
+LazarusResources.Add('TDADataDictionary','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@'#0#0'@'#0#0'@'#0#0
+  +'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0
+  +#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0'@'#0#0#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#128#0#0#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#128#0#0
+  +'@'#0#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0
+  +#255#255#255#255#255#255#128#0#0#255#255#255#255#255#255#128#0#0#255#255#255
+  +#128#0#0'@'#0#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#128#0#0#255#255#255#128#0#0#255#255
+  +#255#255#255#255#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0#128#0#0#255#255
+  +#255#128#0#0'@'#0#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#128#0#0#255#255#255#128#0#0#255
+  +#255#255#255#255#255#128#0#0#255#255#255#128#0#0#255#255#255#255#255#255#128
+  +#0#0#255#255#255#128#0#0'@'#0#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#128#0#0#255#255#255
+  +#128#0#0#128#0#0#128#0#0#255#255#255#255#255#255#255#255#255#128#0#0#128#0#0
+  +#255#255#255#255#255#255#128#0#0'@'#0#0#15'A'#180#15'@'#178#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#128#0#0#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#128#0#0'@'#0#0#206#139
+  +'bIg'#166#17'G'#189#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0
+  +#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#215#137'^'#226#149'_'#238#172'u'
+  +#131#142#172#19'N'#198#19'N'#198#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#31'w'#254'e'#151#217#252#209
+  +#160#252#209#160#252#209#161#252#211#163#252#211#164#244#197#156#247#203#160
+  +#213#132'U'#220#138'W'#234#169'x'#247#206#169#215#202#197'Bw'#211#21'U'#208
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#31'x'
+  +#255#31'x'#255#220#206#187#254#218#178#254#220#181#254#221#183#254#221#184
+  +#254#222#187#237#191#159#220#153't'#209'zK'#227#151'b'#246#201#159#248#216
+  +#186#251#229#208#252#238#225#138#175#229'#f'#218#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255')m'#207'tgN'#254#224#187#254#230#201#254
+  +#230#202#254#231#204#254#231#206#243#207#178#239#196#165#220#153'r'#233#163
+  +'l'#233#167'w'#247#211#177#250#225#201#251#235#220#254#243#234#254#250#244
+  +#203#221#246'9{'#230#24'b'#225#255#0#255#255#0#255#255#0#255#31'x'#255'fe['
+  +#255#164'5'#254#238#217#254#238#218#254#239#220#254#239#221#254#239#222#244
+  +#216#193#239#203#178#211#128'S'#212'{J'#237#178#135#248#220#193#251#231#213
+  +#252#240#230#254#247#242#255#251#248#255#254#254#221#234#252#26'h'#234#26'f'
+  +#231#255#0#255#255#0#255#31'x'#255#175'u,'#255#192'm'#255#244#231#255#244#233
+  +#255#246#234#255#246#234#252#237#224#233#183#153#221#156'w'#213#130'S'#233
+  +#166'w'#247#209#178#233#213#194#252#238#225#254#246#238#254#250#246#255#254
+  +#252#255#255#255#218#198#198'?\'#153#28'm'#240#255#0#255#255#0#255#31']'#164
+  +#30#188'L'#206#238#207#255#248#242#255#250#243#255#250#243#255#250#244#244
+  +#217#199#243#213#194#220#158'{'#230#164'u'#233#170''#250#224#199#157#154#149
+  +#158#157#153#235#231#227#255#252#250#255#255#254#255#255#255#202#151#151'po'
+  +#150#29's'#247#255#0#255#31'x'#255#31'eS'#30#188'L'#255#252#248#255#252#250
+  +#255#252#250#255#252#250#255#252#250#248#233#224#238#202#180#208'}P'#213#128
+  +'O'#240#192#156#251#231#212#252#240#229#217#213#208#142#144#142#183#184#183
+  +#255#255#255#247#238#238#191#129#129'7f'#181#255#0#255#255#0#255#31'p'#237#25
+  +'lYl'#193#169#255#254#252#255#254#252#255#254#254#255#255#254#252#244#239#229
+  +#173#143#224#164#130#217#139']'#238#186#146#248#221#197#252#237#222#254#244
+  +#237#254#250#246#255#254#251#183#184#183#201#202#201#206#227#255'\}'#197#31
+  +'x'#255#255#0#255#255#0#255#28'S'#176#0#30#255#193#206#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#224#166#135#225#157
+  +'r'#230#165'z'#225#211#196#217#211#202#254#248#243#255#252#250#255#254#254
+  +#255#255#255#255#255#255'f'#167#255#31'x'#255#255#0#255#255#0#255#255#0#255
+  +#17'7'#176#0#30#255#255#255#255#255#255#255#255#255#255#255#255#255#189#220
+  +#255'z'#180#255'?'#143#255#31'x'#255''#167#221#251#230#211#234#224#213#158
+  +#158#154#158#159#157#237#235#234#255#255#255#255#255#255#255#255#255')'#128
+  ,#255#31'x'#255#255#0#255#255#0#255#31'x'#255#21'_'#255#132#171#255#238#246
+  +#255#175#211#255'r'#175#255'/'#132#255'/'#132#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255'D'#144#248#220#227#238#254#250#246#218#218#216#142#144#143#183
+  +#186#184#255#255#255#159#202#255#31'x'#255#31'x'#255#255#0#255#255#0#255#31
+  +'x'#255#31'x'#255#31'x'#255#31'x'#255#31'x'#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'-'#131#254#144#192#252#255
+  +#254#254#255#255#255#192#193#192#246#246#246'L'#152#255#31'x'#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255']'#163#255#238#246#255#255#255#255#175#211#255#31'x'#255
+  +#31'x'#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#31'x'#255#31'x'#255#31'x'
+  +#255#31'x'#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#31'x'#255#31'x'#255#255#0#255#255#0#255#255#0#255#255#0#255
+]);
+LazarusResources.Add('TDABin2DataStreamer','BMP',[
+  'BM'#248#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#194#6#0#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@'#0#0'@'#0#0'@'#0#0
+  +'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0#142']'
+  +'Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'
+  +#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128
+  +#0#0#128#0#0#128#0#0#128#0#0'@'#0#0#255#225#189#255#221#181#255#217#172#255
+  +#213#165#255#211#157#255#207#151#255#203#145#255#201#140#255#199#135#128'PK'
+  +#128#0#0#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#128#0#0'@'#0
+  +#0#255#231#203#0#0#0#0#0#0#255#220#178#255#216#171#0#0#0#0#0#0#0#0#0#255#203
+  +#143#128'PK'#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0#255#255#255#255#255
+  +#255#128#0#0#255#255#255#255#255#255#128#0#0#255#255#255#128#0#0'@'#0#0#255
+  +#238#217#0#0#0#255#230#199#0#0#0#255#221#182#0#0#0#255#215#166#255#211#159
+  +#255#207#152#128'PK'#128#0#0#255#255#255#128#0#0#255#255#255#255#255#255#128
+  +#0#0#255#255#255#128#0#0#128#0#0#128#0#0#128#0#0#255#255#255#128#0#0'@'#0#0
+  +#255#243#229#0#0#0#0#0#0#255#233#204#255#229#197#255#224#187#0#0#0#255#216
+  +#171#255#213#165#128'PK'#128#0#0#255#255#255#128#0#0#255#255#255#255#255#255
+  +#128#0#0#255#255#255#128#0#0#255#255#255#255#255#255#128#0#0#255#255#255#128
+  +#0#0'@'#0#0#255#250#242#0#0#0#255#242#225#0#0#0#255#234#209#255#231#203#255
+  +#227#193#0#0#0#255#218#176#128'PK'#128#0#0#255#255#255#128#0#0#128#0#0#128#0
+  +#0#255#255#255#255#255#255#255#255#255#128#0#0#128#0#0#255#255#255#255#255
+  +#255#128#0#0'@'#0#0#255#254#250#0#0#0#0#0#0#255#244#231#255#240#222#0#0#0#0#0
+  +#0#255#229#198#255#225#189#128'PK'#128#0#0#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#128#0#0'@'#0#0#255#255#255#255#254#252#255#252#247
+  +#255#250#242#255#246#235#255#243#227#255#239#220#255#235#211#255#231#203#128
+  +'PK'#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0
+  +#128#0#0#128#0#0#128#0#0#128#0#0#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#254#250#255#251#246#255#248#239#255#244#231#255#242#225#255#238#217
+  +#128'PKHJK'#201#194#201#7'9z'#7'9z'#7'9z='#154#242'5'#149#239'-'#140#239#7'9'
+  +'z'#7'9z'#7'9zyyy'#194#140'm'#255#255#255#255#255#255#255#255#255#137#167#199
+  +#7'9z'#137#167#199#255#252#248#247#240#235#226#218#209#226#216#204'{MIHJK'
+  +#206#199#204#191#184#192#7'9z@'#157#242'@'#157#242'@'#157#242'9'#152#240'2'
+  +#145#239#7'9zE_{yyy'#203#147'o'#255#255#255#255#255#255#137#167#199#7'9z'#15
+  +'s'#233#7'9z'#137#167#199#234#233#230#182#180#176#182#177#171'uIEHJK'#209#202
+  +#209#194#188#194'h'#129#163#7'9z@'#157#242'@'#157#242'@'#157#242#7'9zE_{{{{y'
+  +'yy'#209#153'r'#255#255#255#137#167#199#7'9z'#15's'#233#15's'#233#15's'#233#7
+  +'9zURf'#160'g['#160'g['#149'\KHJK'#213#207#213#197#191#197#194#188#194'Qk'
+  +#138#7'9z@'#157#242#7'9zId'#128'yzzyyyyyy'#216#159'u'#137#167#199#7'9z'#27'}'
+  +#235#22'y'#234#18'u'#233#15's'#233#15's'#233#7'9z'#254#176'J'#240#145','#225
+  +#132'.HJK'#217#213#217#201#196#202#199#192#198#150#146#152'0Kf'#7'9z,D^'#137
+  +#137#137''#130#130#131'yyy'#220#163'v'#7'9z'#7'9z'#7'9z'#31#130#235#27'}'
+  +#235#22'y'#234#7'9z'#7'9z'#7'9z'#218#152'c'#255#0#255'HJK'#225#218#224#207
+  +#201#206#199#192#198#151#150#153'UWX'#175#175#177'JLM'#137#137#137#128#128
+  +#128#132#132#132''#220#163'v'#209#146'm'#209#146'm'#7'9z-'#140#239'%'#135
+  +#238#31#130#237#7'9zXTh'#212#154's'#255#0#255#255#0#255'HJK'#231#226#230#212
+  +#207#211#225#218#224#152#149#152'UWX'#176#175#177'LNO'#150#149#149#132#131
+  +#131'vvvyyy'#143#143#143#131#132#132'*C]'#7'9z7'#150#240'2'#146#240#7'9z'#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#239#235#239#235#233#235
+  +#198#197#199#160#157#161'UWX'#164#165#167';=>'#130#130#131#137#137#137#143
+  +#143#143#137#137#137#147#147#147'Id'#128#7'9z@'#157#242'@'#157#242'='#154#242
+  +#7'9z'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#238#237#238#178
+  +#177#180#156#153#156#159#158#161'RTU'#235#235#237'ossY[Z'#7'9z'#7'9z'#7'9z'#7
+  +'9z'#7'9z@'#157#242'@'#157#242#7'9z'#7'9z'#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255'HJK'#237#235#237#129#129#130#213#209#212#207#207
+  +#208'`cdprrxy{'#138#142#140#171#172#172'Xt'#146#7'9z'#7'9z'#7'9z'#7'9z'#7'9z'
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255'HJK'#251#251#252#204#204#204#254#254#254#227#227#230#186#184#188#151#149
+  +#152#136#134#137'xy{rssfihehi'#150#152#153#150#152#153'HJK'#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'H'
+  +'JK'#255#255#255#251#251#252#238#238#242#237#238#240#231#230#233#217#213#217
+  +#196#192#196#172#170#172#151#145#151#136#131#136#150#142#146#136#129#131'HJK'
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255'HJK'#255#255#255#255#255#255#246#246#248#248#247#251
+  ,#237#237#239#226#226#229#209#207#212#194#191#196#193#187#193#167#159#165'HJK'
+  +'HJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJKHJK'#255#255#255#255
+  +#255#255#255#255#255#240#239#243#229#225#230#203#197#203'HJKHJK'#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'L'
+  +'NOHJKHJKHJKHJKHJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#0#0
+]);
+LazarusResources.Add('TDABinDataStreamer','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@'#0#0'@'#0#0'@'#0#0
+  +'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0#142']'
+  +'Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'
+  +#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128
+  +#0#0#128#0#0#128#0#0#128#0#0'@'#0#0#255#225#189#255#221#181#255#217#172#255
+  +#213#165#255#211#157#255#207#151#255#203#145#255#201#140#255#199#135#128'PK'
+  +#128#0#0#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#128#0#0'@'#0
+  +#0#255#231#203#255#227#194#255#224#187#255#220#178#255#216#171#0#0#0#0#0#0
+  +#255#206#149#255#203#143#128'PK'#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0
+  +#255#255#255#255#255#255#128#0#0#255#255#255#255#255#255#128#0#0#255#255#255
+  +#128#0#0'@'#0#0#255#238#217#255#233#208#255#230#199#255#226#191#255#221#182#0
+  +#0#0#255#215#166#0#0#0#255#207#152#128'PK'#128#0#0#255#255#255#128#0#0#255
+  +#255#255#255#255#255#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0#128#0#0#255
+  +#255#255#128#0#0'@'#0#0#255#243#229#255#240#222#255#235#213#255#233#204#255
+  +#229#197#0#0#0#0#0#0#255#216#171#255#213#165#128'PK'#128#0#0#255#255#255#128
+  +#0#0#255#255#255#255#255#255#128#0#0#255#255#255#128#0#0#255#255#255#255#255
+  +#255#128#0#0#255#255#255#128#0#0'@'#0#0#7'9z'#255#246#233#255#242#225#255#238
+  +#218#255#234#209#0#0#0#255#227#193#0#0#0#255#218#176#128'PK'#128#0#0#255#255
+  +#255#128#0#0#128#0#0#128#0#0#255#255#255#255#255#255#255#255#255#128#0#0#128
+  +#0#0#255#255#255#255#255#255#128#0#0'@'#0#0#255#254#250#255#250#244#255#248
+  +#239#255#244#231#255#240#222#0#0#0#0#0#0#255#229#198#255#225#189#128'PK'#128
+  +#0#0#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#128#0#0'@'#0#0
+  +#255#255#255#255#254#252#255#252#247#255#250#242#255#246#235#255#243#227#255
+  +#239#220#255#235#211#255#231#203#128'PK'#128#0#0#128#0#0#128#0#0#128#0#0#128
+  +#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#254#250#255#251#246#255#248#239
+  +#255#244#231#255#242#225#255#238#217#128'PKHJK'#201#194#201#7'9z'#7'9z'#7'9z'
+  +'='#154#242'5'#149#239'-'#140#239#7'9z'#7'9z'#7'9zyyy'#194#140'm'#255#255#255
+  +#255#255#255#255#255#255#137#167#199#7'9z'#137#167#199#255#252#248#247#240
+  +#235#226#218#209#226#216#204'{MIHJK'#206#199#204#191#184#192#7'9z@'#157#242
+  +'@'#157#242'@'#157#242'9'#152#240'2'#145#239#7'9zE_{yyy'#203#147'o'#255#255
+  +#255#255#255#255#137#167#199#7'9z'#15's'#233#7'9z'#137#167#199#234#233#230
+  +#182#180#176#182#177#171'uIEHJK'#209#202#209#194#188#194'h'#129#163#7'9z@'
+  +#157#242'@'#157#242'@'#157#242#7'9zE_{{{{yyy'#209#153'r'#255#255#255#137#167
+  +#199#7'9z'#15's'#233#15's'#233#15's'#233#7'9zURf'#160'g['#160'g['#149'\KHJK'
+  +#213#207#213#197#191#197#194#188#194'Qk'#138#7'9z@'#157#242#7'9zId'#128'yzzy'
+  +'yyyyy'#216#159'u'#137#167#199#7'9z'#27'}'#235#22'y'#234#18'u'#233#15's'#233
+  +#15's'#233#7'9z'#254#176'J'#240#145','#225#132'.HJK'#217#213#217#201#196#202
+  +#199#192#198#150#146#152'0Kf'#7'9z,D^'#137#137#137''#130#130#131'yyy'#220
+  +#163'v'#7'9z'#7'9z'#7'9z'#31#130#235#27'}'#235#22'y'#234#7'9z'#7'9z'#7'9z'
+  +#218#152'c'#255#0#255'HJK'#225#218#224#207#201#206#199#192#198#151#150#153'U'
+  +'WX'#175#175#177'JLM'#137#137#137#128#128#128#132#132#132''#220#163'v'#209
+  +#146'm'#209#146'm'#7'9z-'#140#239'%'#135#238#31#130#237#7'9zXTh'#212#154's'
+  +#255#0#255#255#0#255'HJK'#231#226#230#212#207#211#225#218#224#152#149#152'UW'
+  +'X'#176#175#177'LNO'#150#149#149#132#131#131'vvvyyy'#143#143#143#131#132#132
+  +'*C]'#7'9z7'#150#240'2'#146#240#7'9z'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255'HJK'#239#235#239#235#233#235#198#197#199#160#157#161'UWX'#164#165
+  +#167';=>'#130#130#131#137#137#137#143#143#143#137#137#137#147#147#147'Id'#128
+  +#7'9z@'#157#242'@'#157#242'='#154#242#7'9z'#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255'HJK'#238#237#238#178#177#180#156#153#156#159#158#161'RTU'
+  +#235#235#237'ossY[Z'#7'9z'#7'9z'#7'9z'#7'9z'#7'9z@'#157#242'@'#157#242#7'9z'
+  +#7'9z'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#237
+  +#235#237#129#129#130#213#209#212#207#207#208'`cdprrxy{'#138#142#140#171#172
+  +#172'Xt'#146#7'9z'#7'9z'#7'9z'#7'9z'#7'9z'#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#251#251#252#204#204#204
+  +#254#254#254#227#227#230#186#184#188#151#149#152#136#134#137'xy{rssfihehi'
+  +#150#152#153#150#152#153'HJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#255#255#255#251#251#252#238
+  +#238#242#237#238#240#231#230#233#217#213#217#196#192#196#172#170#172#151#145
+  +#151#136#131#136#150#142#146#136#129#131'HJK'#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'
+  ,#255#255#255#255#255#255#246#246#248#248#247#251#237#237#239#226#226#229#209
+  +#207#212#194#191#196#193#187#193#167#159#165'HJKHJK'#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255'HJKHJK'#255#255#255#255#255#255#255#255#255#240#239#243
+  +#229#225#230#203#197#203'HJKHJK'#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255'LNOHJKHJKHJKHJKHJK'#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+]);
+LazarusResources.Add('TDAXMLDataStreamer','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@'#0#0'@'#0#0'@'#0#0
+  +'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0#142']'
+  +'Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'
+  +#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128
+  +#0#0#128#0#0#128#0#0#128#0#0'@'#0#0#255#225#189#255#221#181#255#217#172#255
+  +#213#165#255#211#157#255#207#151#255#203#145#255#201#140#255#199#135#128'PK'
+  +#128#0#0#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#128#0#0'@'#0
+  +#0#255#231#203#255#227#194#255#224#187#255#220#178#0#0#0#255#212#161#255#208
+  +#156#0#0#0#255#203#143#128'PK'#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0
+  +#255#255#255#255#255#255#128#0#0#255#255#255#255#255#255#128#0#0#255#255#255
+  +#128#0#0'@'#0#0#255#238#217#255#233#208#255#230#199#255#226#191#0#0#0#255#218
+  +#175#255#215#166#0#0#0#255#207#152#128'PK'#128#0#0#255#255#255#128#0#0#255
+  +#255#255#255#255#255#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0#128#0#0#255
+  +#255#255#128#0#0'@'#0#0#255#243#229#255#240#222#255#235#213#255#233#204#255
+  +#229#197#0#0#0#0#0#0#255#216#171#255#213#165#128'PK'#128#0#0#255#255#255#128
+  +#0#0#255#255#255#255#255#255#128#0#0#255#255#255#128#0#0#255#255#255#255#255
+  +#255#128#0#0#255#255#255#128#0#0'@'#0#0#7'9z'#255#246#233#255#242#225#255#238
+  +#218#0#0#0#255#231#203#255#227#193#0#0#0#255#218#176#128'PK'#128#0#0#255#255
+  +#255#128#0#0#128#0#0#128#0#0#255#255#255#255#255#255#255#255#255#128#0#0#128
+  +#0#0#255#255#255#255#255#255#128#0#0'@'#0#0#255#254#250#255#250#244#255#248
+  +#239#255#244#231#0#0#0#255#238#215#255#233#206#0#0#0#255#225#189#128'PK'#128
+  +#0#0#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#128#0#0'@'#0#0
+  +#255#255#255#255#254#252#255#252#247#255#250#242#255#246#235#255#243#227#255
+  +#239#220#255#235#211#255#231#203#128'PK'#128#0#0#128#0#0#128#0#0#128#0#0#128
+  +#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#254#250#255#251#246#255#248#239
+  +#255#244#231#255#242#225#255#238#217#128'PKHJK'#201#194#201#7'9z'#7'9z'#7'9z'
+  +'='#154#242'5'#149#239'-'#140#239#7'9z'#7'9z'#7'9zyyy'#194#140'm'#255#255#255
+  +#255#255#255#255#255#255#137#167#199#7'9z'#137#167#199#255#252#248#247#240
+  +#235#226#218#209#226#216#204'{MIHJK'#206#199#204#191#184#192#7'9z@'#157#242
+  +'@'#157#242'@'#157#242'9'#152#240'2'#145#239#7'9zE_{yyy'#203#147'o'#255#255
+  +#255#255#255#255#137#167#199#7'9z'#15's'#233#7'9z'#137#167#199#234#233#230
+  +#182#180#176#182#177#171'uIEHJK'#209#202#209#194#188#194'h'#129#163#7'9z@'
+  +#157#242'@'#157#242'@'#157#242#7'9zE_{{{{yyy'#209#153'r'#255#255#255#137#167
+  +#199#7'9z'#15's'#233#15's'#233#15's'#233#7'9zURf'#160'g['#160'g['#149'\KHJK'
+  +#213#207#213#197#191#197#194#188#194'Qk'#138#7'9z@'#157#242#7'9zId'#128'yzzy'
+  +'yyyyy'#216#159'u'#137#167#199#7'9z'#27'}'#235#22'y'#234#18'u'#233#15's'#233
+  +#15's'#233#7'9z'#254#176'J'#240#145','#225#132'.HJK'#217#213#217#201#196#202
+  +#199#192#198#150#146#152'0Kf'#7'9z,D^'#137#137#137''#130#130#131'yyy'#220
+  +#163'v'#7'9z'#7'9z'#7'9z'#31#130#235#27'}'#235#22'y'#234#7'9z'#7'9z'#7'9z'
+  +#218#152'c'#255#0#255'HJK'#225#218#224#207#201#206#199#192#198#151#150#153'U'
+  +'WX'#175#175#177'JLM'#137#137#137#128#128#128#132#132#132''#220#163'v'#209
+  +#146'm'#209#146'm'#7'9z-'#140#239'%'#135#238#31#130#237#7'9zXTh'#212#154's'
+  +#255#0#255#255#0#255'HJK'#231#226#230#212#207#211#225#218#224#152#149#152'UW'
+  +'X'#176#175#177'LNO'#150#149#149#132#131#131'vvvyyy'#143#143#143#131#132#132
+  +'*C]'#7'9z7'#150#240'2'#146#240#7'9z'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255'HJK'#239#235#239#235#233#235#198#197#199#160#157#161'UWX'#164#165
+  +#167';=>'#130#130#131#137#137#137#143#143#143#137#137#137#147#147#147'Id'#128
+  +#7'9z@'#157#242'@'#157#242'='#154#242#7'9z'#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255'HJK'#238#237#238#178#177#180#156#153#156#159#158#161'RTU'
+  +#235#235#237'ossY[Z'#7'9z'#7'9z'#7'9z'#7'9z'#7'9z@'#157#242'@'#157#242#7'9z'
+  +#7'9z'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#237
+  +#235#237#129#129#130#213#209#212#207#207#208'`cdprrxy{'#138#142#140#171#172
+  +#172'Xt'#146#7'9z'#7'9z'#7'9z'#7'9z'#7'9z'#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#251#251#252#204#204#204
+  +#254#254#254#227#227#230#186#184#188#151#149#152#136#134#137'xy{rssfihehi'
+  +#150#152#153#150#152#153'HJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#255#255#255#251#251#252#238
+  +#238#242#237#238#240#231#230#233#217#213#217#196#192#196#172#170#172#151#145
+  +#151#136#131#136#150#142#146#136#129#131'HJK'#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'
+  ,#255#255#255#255#255#255#246#246#248#248#247#251#237#237#239#226#226#229#209
+  +#207#212#194#191#196#193#187#193#167#159#165'HJKHJK'#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255'HJKHJK'#255#255#255#255#255#255#255#255#255#240#239#243
+  +#229#225#230#203#197#203'HJKHJK'#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255'LNOHJKHJKHJKHJKHJK'#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+]);
+LazarusResources.Add('TDARemoteDataAdapter','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@'#0#0'@'#0#0'@'#0#0
+  +'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0
+  +#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0'@'#0#0#17#128#169#17#128#169
+  +#17#128#169#17#128#169#17#128#169#17#128#169#17#128#169#255#0#255#255#0#255
+  +#255#0#255#128#0#0#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#128#0#0'@'#0#0'$}'#145#25#149#178'%'#183#215'Q'#210#235'~'#229#245#130#218
+  +#234'J'#179#210#17#128#169#17#128#169#255#0#255#128#0#0#255#255#255#128#0#0
+  +#128#0#0#128#0#0#255#255#255#255#255#255#128#0#0#255#255#255#255#255#255#128
+  +#0#0#255#255#255#128#0#0'@'#0#0'aTA'#29'u'#133#29#144#168'I'#188#211'|'#225
+  +#240#145#230#243'b'#201#228'0'#169#212#21#148#197#17#128#169#128#0#0#255#255
+  +#255#128#0#0#255#255#255#255#255#255#128#0#0#255#255#255#128#0#0#128#0#0#128
+  +#0#0#128#0#0#255#255#255#128#0#0'@'#0#0#174'L'#8#158'='#12'JfaH'#186#209'}'
+  +#227#242#145#230#243'b'#201#228'0'#169#212#22#153#204#17#128#169#128#0#0#255
+  +#255#255#128#0#0#255#255#255#255#255#255#128#0#0#255#255#255#128#0#0#255#255
+  +#255#255#255#255#128#0#0#255#255#255#128#0#0'@'#0#0#216#140';'#168'N'#31'5'
+  +#130#140'M'#200#225''#230#246#145#230#243'b'#201#228'0'#169#212#22#153#204
+  +#17#128#169#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0#255#255#255#255#255
+  +#255#255#255#255#128#0#0#128#0#0#255#255#255#255#255#255#128#0#0'@'#0#0#203
+  +#130'F|M."'#168#197'R'#213#238#128#232#248#145#230#243'b'#201#228'0'#169#212
+  +#22#153#204#17#128#169#128#0#0#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#128#0#0'@'#0#0#177']-Jok&'#187#220'U'#220#247#128#232#248#145
+  +#230#243'b'#201#228'0'#169#212#22#153#204#17#128#169#128#0#0#128#0#0#128#0#0
+  +#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128
+  +#0#0#159'N"'#152'R+a'#188#202's'#217#233#143#236#247#164#240#247#172#239#244
+  +#129#215#233'A'#178#216#22#153#204#17#128#169#17#128#169#150#248#247'u'#239
+  +#249'N'#227#250'&'#215#252'2'#203#234#154'I'#30#199#136'Z'#169'S&'#139'X9Trw'
+  +#16'z'#161#163#230#233#137'pZdib0'#142#172#17'}'#166#17#128#169#17#128#169'3'
+  +#151#183'?'#158#188'x'#196#212#133#209#225#17#128#169#17#128#169#150#248#247
+  +'u'#239#249'N'#227#250'&'#215#252'+'#214#251'x'#138'~'#140'j'#139#196#201'_'
+  +#195#222'0'#168#211#17#128#169#25#135#174'H'#159#178'C'#191#213'$'#207#244'+'
+  +#213#250'V'#223#250#128#232#248#138#225#238'N'#182#213' '#147#188#17#130#171
+  +#17#128#169#17#128#169#150#248#247'u'#239#249'N'#227#250'&'#215#252'+'#214
+  +#251'V'#223#250#128#232#248#145#230#243'b'#201#228'0'#168#210#17'~'#167#141
+  +#239#240'u'#239#249'N'#227#250'&'#214#251'*'#208#244'Q'#210#235'y'#219#234
+  +#142#225#238'b'#201#228'0'#169#212#22#151#202#17#128#169#17#128#169#150#248
+  +#247#129#240#248'u'#234#248'w'#231#248'z'#231#248#143#236#247#164#240#247#172
+  +#239#244''#212#230'='#168#204#16'v'#156#145#239#238's'#235#245'J'#215#237'"'
+  +#193#226'$'#177#208'A'#170#190'f'#185#197#134#213#225'b'#200#227'0'#169#212
+  +#22#153#204#17#128#169#17#128#169#165#233#236'x'#196#212'?'#158#188'3'#151
+  +#183#17#128#169#17#128#169#17#128#169'3'#151#183'<'#150#178'l'#140#141#13'c'
+  +#131#128#211#210'd'#205#214'<'#175#193'*'#135#150'aVDkT>R'#149#159'z'#193#204
+  +'`'#196#223'0'#169#212#22#153#204#17#128#169#17#128#169#25#135#174'<'#176#204
+  +'>'#202#230'$'#209#246'+'#214#251'V'#223#250#128#232#248#136#222#235'exuhE0'
+  +#10'Mfe'#155#152'hsc'#133'B'#27#156'7'#0#175'J'#1#153'3'#0'Rxzm'#172#182'\'
+  +#188#214'0'#169#212#22#153#204#17#128#169#17#128#169#142#241#242'u'#239#249
+  +'N'#227#250'&'#215#252'+'#214#251'V'#223#250#128#232#248#139#220#233#144'A'
+  +#23#153'3'#0'c9!'#148'8'#8#172'L'#14#192'd'#20#207'q'#17#205'k'#7#172'G'#1'o'
+  +'WAb'#156#165'X'#180#204'0'#168#211#22#153#204#17#128#169#17#128#169#150#248
+  +#247'u'#239#249'N'#227#250'&'#215#252'+'#214#251'V'#223#250''#230#246#137
+  +#158#150#162'@'#10#188'i*'#193'q1'#212#140'A'#217#143'<'#215#138'6'#215#137
+  +'7'#213#132'1'#200'r('#150'I'#31'o'#181#181'z'#214#219'Q'#201#228#30#162#210
+  +#17#128#169#17#128#169#150#248#247'u'#239#249'N'#227#250'&'#215#252'+'#214
+  +#251'V'#223#250'}'#227#242#145'W3'#200'A'#229#179'q'#230#179'q'#227#173'j'
+  +#226#170'g'#225#165'b'#211#141'K'#191'n5'#168'N'#31#151'W/'#141#204#196#148
+  +#240#238#136#243#247'a'#230#250#17#128#169#17#128#169#150#248#247'u'#239#249
+  +'N'#227#250'&'#215#252'+'#214#251'V'#223#250#129#193#196#158';'#7#234#192#134
+  +#239#208#158#241#212#166#234#197#148#210#151'd'#178'_/'#161'J'#30#158'c'#151
+  +#209#201#149#242#240#152#248#246#153#249#247#17#128#169#17#128#169#255#0#255
+  +#17#128#169#150#248#247'u'#239#249'N'#227#250'&'#215#252'+'#214#251'V'#223
+  ,#250#134#173#168#160'N#'#191'{P'#229#197#160#225#190#154#164'H'#27'oA''Qbe'
+  +#17#128#169#17#128#169#17#128#169#17#128#169#17#128#169#17#128#169#255#0#255
+  +#255#0#255#255#0#255#17#128#169#163#249#248#174#246#251#172#246#251#160#246
+  +#249#156#249#247#153#249#247#153#249#247#150#233#230#141#152#133#150'Q*'#172
+  +'Y.'#144'4'#6#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#255#255#244#254
+  +#254#219#253#252#194#251#250#168#250#248#154#249#247#153#249#247#153#249#247
+  +#153#249#247#137#244#248'r'#172#170#144'4'#6#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#17#128#169#17#128#169#236#254#254#211#252#252#186#251#250#162
+  +#250#248#153#249#247#153#249#247#153#249#247#17#128#169#17#128#169#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#17#128#169
+  +#17#128#169#17#128#169#17#128#169#17#128#169#17#128#169#17#128#169#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+]);
+LazarusResources.Add('TDABusinessProcessor','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@'#0#0'@'#0#0'@'#0#0
+  +'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0
+  +#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0'@'#0#0#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#128#0#0#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#128#0#0
+  +'@'#0#0#255#0#255#1#3#132#1#1'z'#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0#255
+  +#255#255#255#255#255#128#0#0#255#255#255#255#255#255#128#0#0#255#255#255#128
+  +#0#0'@'#0#0#1#6#140#3#19#202#2#10#171#1#1'z'#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#128#0#0#255#255#255#128#0#0#255#255#255#255
+  +#255#255#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0#128#0#0#255#255#255#128
+  +#0#0'@'#0#0#2#29#218#2#25#216#3#20#207#2#10#171#1#1'z'#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#128#0#0#255#255#255#128#0#0#255#255#255#255
+  +#255#255#128#0#0#255#255#255#128#0#0#255#255#255#255#255#255#128#0#0#255#255
+  +#255#128#0#0'@'#0#0#1'%'#234#2#31#225#2#25#216#3#20#207#2#10#171#1#1'z'#255#0
+  +#255#255#0#255#255#0#255#255#0#255#128#0#0#255#255#255#128#0#0#128#0#0#128#0
+  +#0#255#255#255#255#255#255#255#255#255#128#0#0#128#0#0#255#255#255#255#255
+  +#255#128#0#0'@'#0#0#128#149#248'1N'#237#2#31#225#2#25#216#3#20#207#2#10#171#1
+  +#1'z'#255#0#255#255#0#255#255#0#255#128#0#0#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#128#0#0'@'#0#0#255#255#255#144#162#248#1'%'#234#2#31
+  +#225#2#25#216#3#20#207#2#10#171#1#1'z'#255#0#255#255#0#255#128#0#0#128#0#0
+  +#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128
+  +#0#0#128#0#0#255#255#255#225#231#255#239#242#254#17'8'#243#1'%'#234#2#31#225
+  +#2#25#216#3#20#207#2#10#171#1#1'z'#255#0#255#255#0#255#7#141#187'v'#223#233
+  +#131#248#254'`'#236#254'<'#224#254#27#210#251'+'#203#239#14#22#147'7d'#247'2'
+  +'b'#255')Z'#255#159#181#255'n'#141#255'Lr'#255#255#255#255#175#190#253#1'+'
+  +#243#1'%'#234#2#31#225#2#25#216#3#20#207#2#10#171#1#1'z'#255#0#255#7#141#187
+  +'v'#223#233#151#249#254#147#242#254#149#238#254#157#235#253#176#233#247#23'&'
+  +#164'Ds'#255';k'#255'2b'#255')Z'#255' Q'#255#23'I'#255#151#173#255#255#255
+  +#255'`}'#252#1'+'#243#1'%'#234#2#31#225#2#25#216#3#19#202#1#3#132#255#0#255#7
+  +#141#187#180#238#243#188#242#248#138#218#235'Y'#194#221'2'#170#206'"'#154#192
+  +#28'I'#158#28'.'#172'Ds'#255';k'#255'2b'#255')Z'#255' Q'#255'&U'#255#211#220
+  +#255#255#255#255#175#190#253'@`'#245#1'%'#234#2#29#218#1#6#140#255#0#255#255
+  +#0#255#9#138#183'o'#194#214'?'#176#203'='#189#218'/'#198#231#25#199#241','
+  +#210#248'S'#220#251'CO'#157#28'.'#172'Ds'#255';k'#255'2b'#255')Z'#255' Q'#255
+  +'&U'#255#151#173#255#255#255#255#207#216#254#1')'#235#1#8#143#255#0#255#255#0
+  +#255#255#0#255#11#134#178'Y'#196#215#128#245#252'`'#236#254'<'#224#254#27#212
+  +#254'.'#216#254'U'#223#254'z'#229#252#28'9'#141#28'.'#172'Ds'#255';k'#255'2b'
+  +#255')Z'#255' Q'#255#23'I'#255'-Y'#255'5Z'#247#1#10#146#255#0#255#255#0#255
+  +#255#0#255#255#0#255#7#140#186'v'#223#233#131#248#254'`'#236#254'<'#224#254
+  +#27#212#254'.'#216#254'U'#224#255'{'#231#254'v'#200#220#27'<'#145#28'.'#172
+  +'Ds'#255';k'#255'2b'#255')Z'#255' Q'#255#22'E'#247#4#13#147#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#7#141#187'v'#223#233#131#248#254'`'#236
+  +#254'<'#224#254#27#212#254'.'#216#254'U'#224#255'{'#232#255#144#227#244'c'
+  +#194#217#19';'#146#28'.'#172'Ds'#255';k'#255'2b'#255'''T'#247#7#16#147#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#7#141#187'v'#223#233
+  +#131#248#254'`'#236#254'<'#224#254#27#212#254'.'#216#254'U'#224#255'{'#232
+  +#255#149#235#253'h'#205#230'4'#168#203#4'3'#142#28'.'#172'Ds'#255'7d'#247#10
+  +#19#147#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#7#141#187'v'#223#233#131#248#254'`'#236#254'<'#224#254#27#212#254'.'#216#254
+  +'U'#224#255'{'#232#255#149#235#253'l'#212#238'7'#178#214#9#145#190#2'0'#139
+  +#23'&'#164#14#22#147#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#7#141#187'v'#223#233#131#248#254'`'#236#254'<'#224
+  +#254#27#212#254'.'#216#254'U'#224#255'{'#232#255#149#235#253'l'#212#238'9'
+  +#184#222#10#153#201#4#138#184#13'v'#157#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#7#141#187'}'#223#233
+  +#173#251#254#179#249#255#168#249#254#170#255#254#154#255#254#153#255#254#153
+  +#255#254#153#255#254#143#246#251'k'#227#244')'#187#224#4#145#194#14'}'#167
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  ,#255#255#0#255#7#141#187#195#223#234#250#255#255#229#255#255#207#255#255#185
+  +#255#254#164#255#254#153#255#254#153#255#254#153#255#254#153#255#254#148#253
+  +#254'q'#242#254'>'#205#233#14#128#170#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#7#141#187'h'#176#202#240
+  +#247#250#245#255#255#223#255#255#201#255#254#179#255#254#158#255#254#153#255
+  +#254#153#255#254#153#255#254#153#255#254#132#243#249'0'#170#202#14#128#170
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#7#141#187#14#145#190'|'#192#213'|'#192#213#164#223
+  +#234#148#223#233#131#223#233'w'#223#233'v'#223#233'T'#192#212'T'#192#212#23
+  +#136#175#14#128#170#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#7
+  +#141#187#7#141#187#7#141#187#7#141#187#7#141#187#7#141#187#7#141#187#7#141
+  +#187#7#141#187#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+]);
+LazarusResources.Add('TDADesigntimeCall','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@'#0#0'@'#0#0'@'#0#0
+  +'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0#1'2'#2
+  +#1'2'#2#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0
+  +#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0'@'#0#0#2'p'#7#1'J'#4#1'2'#2#1'2'#2
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#128#0#0#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#128#0#0'@'#0#0#3#166#12#3
+  +#166#12#3'{'#9#1'J'#4#1'2'#2#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0#255#255#255#255#255#255#128
+  +#0#0#255#255#255#255#255#255#128#0#0#255#255#255#128#0#0'@'#0#0#3#154#11#3
+  +#154#11#3#166#12#3#166#12#2'l'#7#1'2'#2#255#0#255#255#0#255#255#0#255#255#0
+  +#255#128#0#0#255#255#255#128#0#0#255#255#255#255#255#255#128#0#0#255#255#255
+  +#128#0#0#128#0#0#128#0#0#128#0#0#255#255#255#128#0#0'@'#0#0#3#166#12#3#166#12
+  +#3#154#11#3#166#12#3#166#12#2'l'#7#1'2'#2#255#0#255#255#0#255#255#0#255#128#0
+  +#0#255#255#255#128#0#0#255#255#255#255#255#255#128#0#0#255#255#255#128#0#0
+  +#255#255#255#255#255#255#128#0#0#255#255#255#128#0#0'@'#0#0#3#154#11#3#154#11
+  +#3#154#11#3#154#11#3#166#12#3#166#12#2'l'#7#1'2'#2#255#0#255#255#0#255#128#0
+  +#0#255#255#255#128#0#0#128#0#0#128#0#0#255#255#255#255#255#255#255#255#255
+  +#128#0#0#128#0#0#255#255#255#255#255#255#128#0#0'@'#0#0#3#154#11#3#166#12#3
+  +#154#11#3#166#12#3#154#11#3#166#12#3#166#12#1'J'#4#255#0#255#255#0#255#128#0
+  +#0#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#128#0#0'@'#0#0#3
+  +#166#12#3#154#11#3#154#11#3#154#11#3#154#11#3#154#11#3#166#12#3'{'#9#1'2'#2
+  +#255#0#255#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0
+  +#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#3#154#11#3#154#11#3#166#12#3#154#11
+  +#3#166#12#3#154#11#3#166#12#3#154#11#3#166#12#1'@'#3#255#0#255#1'J'#4#7'i'#20
+  +#28#184'P'#25#177'A'#20#175'A'#218#244#225#246#252#246'#'#176'-'#3#154#11#3
+  +#166#12#3#154#11#3#154#11#3#166#12' '#175'+.'#181'9'#3#154#11#3#166#12#3#154
+  +#11#3#154#11#3#154#11#3#166#12#3#166#12#1'Y'#5#2'='#4#1'Y'#5#13#128'#!'#186
+  +'V'#28#178'N'#20#175'A'#218#244#225#255#255#255#153#222#160#8#163#25#8#163#25
+  +#6#164#21#8#163#25#8#161#22'='#187'G'#231#247#233'Y'#199'c'#3#154#11#3#166#12
+  +#3#154#11#3#166#12#3#154#11#3#166#12#2'p'#7#2'='#4#1'Y'#5#19#144'/*'#191'`'
+  +#30#180'P"'#181'T'#181#233#199#255#255#255#255#255#255#134#217#160')'#183'Q'
+  +#25#177'A'#28#178'N)'#183'Q1'#182'?'#255#255#255#255#255#255'r'#208'z'#3#154
+  +#11#3#166#12#3#154#11#3#154#11#3#166#12#3#129#9#1'2'#2#2'l'#7#29#154'9C'#197
+  +'s"'#181'T"'#181'Tc'#206#138#255#255#255#255#255#255#255#255#255#202#239#216
+  +'}'#215#158'W'#202#128'W'#202#128#132#216#144#255#255#255#255#255#255#255#255
+  +#255#146#220#153#8#163#25#3#154#11#3#166#12#3#166#12#3#129#9#1'@'#3#4'm'#8#29
+  +#154'9\'#208#137'9'#191'h"'#181'T('#184'Y'#183#234#202#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#178#230#186'1'#182'?'#3#154#11#3#166#12
+  +#3#129#9#2'='#4#3'u'#9#26#150'0l'#212#149'Y'#205#133'"'#181'T"'#181'T9'#191
+  +'h'#192#237#209#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#159
+  +#225#175#6#164#21#3#166#12#4'm'#8#2'='#4#255#0#255#14#139#28'l'#212#149#134
+  +#217#160'='#192'k'#22#175'I"'#181'T('#184'Y'#140#220#170#230#248#237#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#178#230#186'#'#178';'#4#159#17#3#166#12#1'Y'#5#255#0#255#255#0
+  +#255#15#146#28'I'#193'l'#167#230#192'v'#213#152'('#184'Y'#22#175'I"'#181'T"'
+  +#181'T9'#191'hv'#213#152#177#231#198#208#242#221#246#252#246#255#255#255#255
+  +#255#255#255#255#255#147#221#163#22#171'-'#8#163#25#6#164#21#4#159#17#1'@'#3
+  +#255#0#255#255#0#255#255#0#255#26#161'1'#154#227#186#181#233#199'Y'#205#133
+  +'"'#181'T'#20#175'A'#30#180'P"'#181'T"'#181'T"'#181'T9'#191'h'#159#225#175
+  +#255#255#255#255#255#255'z'#212#138#22#171'-'#12#167'$'#8#163#25#9#176#28#3
+  +'u'#9#255#0#255#255#0#255#255#0#255#255#0#255'('#161'2I'#193'l'#183#234#202
+  +#183#234#202'W'#202#128'('#184'Y'#22#175'I'#30#180'P"'#181'T'#30#180'P'#30
+  +#180'P'#147#222#175#246#252#246'Y'#205#133#16#170'0'#16#170'0'#12#173''''#12
+  +#173''''#12#167'$'#1'@'#3#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#20#156'$k'#209#139#192#237#209#189#237#208'v'#213#152'9'#191'h"'#181'T'#28
+  +#178'N('#184'Y"'#181'Tl'#212#149'Y'#205#133#25#177'A'#25#177'A'#21#166'<'#16
+  +#170'0'#15#176'-'#5'_'#13#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#21#151'$l'#212#149#192#237#209#208#242#221#164#227#188
+  ,'l'#212#149'P'#198'y9'#191'h('#184'Y='#192'k9'#191'h9'#191'h('#184'Y '#183'L'
+  +#25#177'A'#7'i'#20#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#28#158'(O'#196's'#154#227#186#189#237#208
+  +#192#237#209#183#234#202#154#227#186#140#220#170#129#217#164'l'#212#149'Y'
+  +#205#133'9'#191'h '#183'L'#7'i'#20#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#28#158
+  +'('#26#161'1P'#198'y'#129#217#164#149#226#181#149#226#181#140#220#170'v'#213
+  +#152'\'#208#137'9'#191'h'#22#145'2'#5'_'#13#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#28#158'('#26#161'1&'#169'C&'#169'C&'#169'C#'
+  +#161'@'#19#144'/'#2'l'#7#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255
+]);
+LazarusResources.Add('TDADataSource','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@'#0#0'@'#0#0'@'#0#0
+  +'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0
+  +#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0'@'#0#0#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#128#0#0#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#128#0#0
+  +'@'#0#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0
+  +#255#255#255#255#255#255#128#0#0#255#255#255#255#255#255#128#0#0#255#255#255
+  +#128#0#0'@'#0#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#128#0#0#255#255#255#128#0#0#255#255
+  +#255#255#255#255#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0#128#0#0#255#255
+  +#255#128#0#0'@'#0#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#128#0#0#255#255#255#128#0#0#255
+  +#255#255#255#255#255#128#0#0#255#255#255#128#0#0#255#255#255#255#255#255#128
+  +#0#0#255#255#255#128#0#0'@'#0#0#255#0#255#255#0#255#255#0#255#255#0#255#128#0
+  +#0#128#0#0#128#0#0#128#0#0#255#0#255#255#0#255#128#0#0#255#255#255#128#0#0
+  +#128#0#0#128#0#0#255#255#255#255#255#255#255#255#255#128#0#0#128#0#0#255#255
+  +#255#255#255#255#128#0#0'@'#0#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#128#0#0#128#0#0#128#0#0#255#0#255#255#0#255#128#0#0#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#128#0#0'@'#0#0#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#128#0#0#128#0#0#128#0#0#255#0#255#255#0#255#128#0#0
+  +#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128
+  +#0#0#128#0#0#128#0#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#128#0
+  +#0#255#0#255#255#0#255#128#0#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#128#0#0#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#128#0#0
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#128#0#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#128#0#0
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128#128#128#128#128#128#128#128#128#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#128#128#128
+  +#255#255#255#255#255#255#255#255#255#255#255#255#200#208#212#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#128#128#128#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#128#128#128#255#255#255#200#208#212#200#208
+  +#212#255#255#255#200#208#212#255#255#255#200#208#212#200#208#212#200#208#212
+  +#200#208#212#200#208#212#200#208#212#255#255#255#128#128#128#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#128#128#128#255#255#255#255#255#255#255#255#255#255#255#255#200#208#212#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#128#128#128#255#0#255#255#0#255#255#0#255#255#0#255#128#0#0
+  +#255#0#255#255#0#255#255#0#255#255#0#255#128#128#128#255#255#255#200#208#212
+  +#200#208#212#255#255#255#200#208#212#255#255#255#200#208#212#200#208#212#200
+  +#208#212#200#208#212#200#208#212#255#255#255#255#255#255#128#128#128#255#0
+  +#255#255#0#255#255#0#255#255#0#255#128#0#0#128#0#0#255#0#255#255#0#255#255#0
+  +#255#128#128#128#255#255#255#255#255#255#255#255#255#255#255#255#200#208#212
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#128#128#128#255#0#255#128#0#0#128#0#0#128#0#0#128#0#0
+  +#128#0#0#128#0#0#255#0#255#255#0#255#128#128#128#255#255#255#200#208#212#200
+  +#208#212#255#255#255#200#208#212#255#255#255#200#208#212#200#208#212#200#208
+  +#212#200#208#212#200#208#212#200#208#212#255#255#255#128#128#128#255#0#255
+  +#255#0#255#255#0#255#255#0#255#128#0#0#128#0#0#255#0#255#255#0#255#255#0#255
+  +#128#128#128#255#255#255#255#255#255#255#255#255#255#255#255#200#208#212#255
+  ,#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#128#128#128#255#0#255#255#0#255#255#0#255#255#0#255#128#0#0
+  +#255#0#255#255#0#255#255#0#255#255#0#255#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#128#128#128#200#208#212#200#208#212#200#208#212#200#208#212#200
+  +#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208
+  +#212#200#208#212#200#208#212#128#128#128#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#128#128#128#128#128
+  +#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255
+]);
+LazarusResources.Add('TDAServerLog','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#194#30#0#0#194#30#0#0#0#0#0#0#0#0#0#0#255#0#255'>'#0#0'>'#0#0'>'#0
+  +#0'>'#0#0'>'#0#0'>'#0#0'>'#0#0'>'#0#0'>'#0#0'>'#0#0'>'#0#0'>'#0#0'>'#0#0#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255'}'#4#0'}'#4#0'}'#4#0'}'#4#0'}'#4#0'}'#4#0'}'#4#0'}'#4#0
+  +'}'#4#0'}'#4#0'}'#4#0'}'#4#0'}'#4#0'>'#0#0#183#129#131#183#129#131#183#129
+  +#131#183#129#131#183#129#131#183#129#131#183#129#131#183#129#131#183#129#131
+  +#255#0#255'}'#4#0#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255'}'#4
+  +#0'>'#0#0#254#220#182#254#216#173#254#220#182#254#215#171#254#215#171#254#215
+  +#171#254#215#171#254#215#171#179#137'{'#255#0#255'}'#4#0#255#255#255'}'#4#0
+  +'}'#4#0'}'#4#0#255#255#255#255#255#255'}'#4#0#255#255#255#255#255#255'}'#4#0
+  +#255#255#255'}'#4#0'>'#0#0#254#220#182#254#220#182#254#215#171#254#220#182
+  +#254#216#173#254#216#173#254#215#171#254#215#171#179#137'{'#255#0#255'}'#4#0
+  +#255#255#255'}'#4#0#255#255#255#255#255#255'}'#4#0#255#255#255'}'#4#0'}'#4#0
+  +'}'#4#0'}'#4#0#255#255#255'}'#4#0'>'#0#0#254#220#182#254#220#182#0#153#0#254
+  +#216#173#254#220#182#254#216#173#254#216#173#254#216#173#179#137'{'#255#0#255
+  +'}'#4#0#255#255#255'}'#4#0#255#255#255#255#255#255'}'#4#0#255#255#255'}'#4#0
+  +#255#255#255#255#255#255'}'#4#0#255#255#255'}'#4#0'>'#0#0#254#222#185#0#153#0
+  +#0#153#0#0#153#0#254#220#182#254#216#173#254#216#173#254#216#173#179#137'{'
+  +#255#0#255'}'#4#0#255#255#255'}'#4#0'}'#4#0'}'#4#0#255#255#255#255#255#255
+  +#255#255#255'}'#4#0'}'#4#0#255#255#255#255#255#255'}'#4#0'>'#0#0#0#153#0'K'
+  +#144'<~'#164'^'#0#153#0'o'#156'Q'#254#220#182#254#216#173#254#216#173#179#137
+  +'{'#255#0#255'}'#4#0#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +'}'#4#0'>'#0#0#0#153#0#254#222#185#254#222#185#192#194#141#0#153#0#0#153#0
+  +#254#220#182#254#216#173#179#137'{'#255#0#255'}'#4#0'}'#4#0'}'#4#0'}'#4#0'}'
+  +#4#0'}'#4#0'}'#4#0'}'#4#0'}'#4#0'}'#4#0'}'#4#0'}'#4#0'}'#4#0#254#228#198#254
+  +#228#198#254#228#198#254#222#185#254#222#185#242#217#178#0#153#0#0#153#0#254
+  +#220#182#179#137'{'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#179#137
+  +'{'#254#240#225#254#240#222#254#238#220#254#238#220#254#233#209#254#233#209
+  +#254#233#209#254#231#204#254#231#204#254#228#198#254#228#198#254#228#198#254
+  +#228#198#254#220#182#254#222#185#254#222#185#254#220#182#179#137'{'#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#182#139#128#254#240#225#254#240#225
+  +#254#240#222#254#238#220#254#238#220#254#238#220#254#233#209#254#233#209#254
+  +#232#206#254#231#204#254#228#198#0#153#0#254#228#198#254#228#198#254#222#185
+  +#254#222#185#254#222#185#179#137'{'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#186#142#130#254#244#233#254#240#225#254#240#225#254#240#225#254
+  +#238#220#254#238#220#254#233#209#254#233#209#254#233#209#254#232#206#0#153#0
+  +#0#153#0#0#153#0#254#228#198#254#228#198#254#222#185#254#222#185#179#137'{'
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#190#146#131#254#244#233
+  +#254#244#233#223#153'>'#223#153'>'#223#153'>'#223#153'>'#223#153'>'#223#153
+  +'>'#254#233#209#0#153#0'K'#147'A~'#169'g'#0#153#0'o'#160'X'#254#228#198#254
+  +#228#198#254#228#198#179#137'{'#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#194#150#133#255#248#239#254#244#233#254#244#233#254#244#233#254#240#225
+  +#254#240#225#254#240#225#254#238#220#254#238#220#0#153#0#254#231#204#254#233
+  +#209#192#201#156#0#153#0#0#153#0#254#228#198#254#224#190#179#137'{'#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#198#153#134#254#248#241#254#248#241
+  +#254#244#233#254#244#233#254#244#233#254#240#225#254#240#225#254#240#225#254
+  +#238#220#254#238#220#254#233#209#254#233#209#254#233#209#242#226#197#0#153#0
+  +#0#153#0#254#228#198#182#139#128#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#202#156#136#254#248#241#254#248#241#254#248#241#255#248#239#254#244
+  +#233#254#244#233#254#244#233#254#240#225#254#240#225#254#240#222#254#238#220
+  +#254#238#220#254#233#209#254#233#209#254#233#209#254#231#204#254#231#204#156
+  +#131'~'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#206#160#137#254#248
+  +#241#254#248#241#254#248#241#254#248#241#254#244#233#254#244#233#254#244#233
+  +#254#240#225#254#240#225#254#240#225#254#240#222#0#153#0#254#238#220#254#233
+  +#209#254#233#209#254#233#209#254#231#204#156#131'~'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#210#163#138#255#252#249#255#252#249#254#248#241#254
+  +#248#241#254#248#241#254#248#241#255#248#239#254#244#233#254#244#233#254#240
+  +#225#0#153#0#0#153#0#0#153#0#254#238#220#254#238#220#254#233#209#254#232#206
+  +#156#131'~'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#210#163#138#254
+  +#248#241#255#252#249#223#153'>'#223#153'>'#223#153'>'#223#153'>'#223#153'>'
+  +#223#153'>'#254#244#233#0#153#0'K'#147'A~'#174'q'#0#153#0'o'#165'b'#254#238
+  ,#220#254#233#209#254#233#209#173#130't'#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#222#173#142#255#252#249#255#252#249#255#252#249#255#252#249
+  +#254#248#241#254#248#241#254#248#241#254#248#241#254#244#233#0#153#0#254#240
+  +#225#254#244#233#192#209#172#0#153#0#0#153#0#254#238#220#254#238#220#184#130
+  +#133#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#222#173#142#254#248
+  +#241#255#252#249#254#248#241#255#252#249#255#252#249#255#252#249#254#248#241
+  +#254#248#241#254#248#241#254#248#241#254#248#241#254#244#233#254#240#225#243
+  +#236#218#0#153#0#0#153#0#254#238#220#156#131'~'#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#222#173#142#255#252#249#255#252#249#255#252#249#255#252
+  +#249#255#252#249#255#252#249#255#252#249#255#252#249#254#248#241#254#248#241
+  +#255#248#239#254#244#233#254#244#233#254#244#233#254#240#225#254#240#225#254
+  +#240#222#156#131'~'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#222#173
+  +#142#254#248#241#255#252#249#254#248#241#255#252#249#254#248#241#255#252#249
+  +#254#248#241#255#252#249#254#248#241#254#248#241#254#248#241#254#248#241#255
+  +#248#239#254#244#233#254#244#233#254#240#225#254#240#225#156#131'~'#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#218#164#130#218#171#141#218#164#130
+  +#218#171#141#218#164#130#218#171#141#218#164#130#218#171#141#218#164#130#218
+  +#164#130#218#164#130#218#164#130#218#164#130#218#164#130#218#164#130#218#164
+  +#130#218#164#130#218#164#130#156#131'~'#255#0#255
+]);
+LazarusResources.Add('TDADatasetProvider','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@'#0#0'@'#0#0'@'#0#0
+  +'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0
+  +#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0'@'#0#0#128#128#128#128#128
+  +#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128#128#128#128#0#0#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#128#0#0'@'#0#0#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#128#128#128#128
+  +#0#0#255#255#255#128#0#0#128#0#0#128#0#0#255#255#255#255#255#255#128#0#0#255
+  +#255#255#255#255#255#128#0#0#255#255#255#128#0#0'@'#0#0#255#255#255#128#128
+  +#128#0#0#0#192#220#192#0#0#0#128#128#128#255#255#255#255#255#255#255#255#255
+  +#128#128#128#128#0#0#255#255#255#128#0#0#255#255#255#255#255#255#128#0#0#255
+  +#255#255#128#0#0#128#0#0#128#0#0#128#0#0#255#255#255#128#0#0'@'#0#0#128#128
+  +#128#0#0#0#255#255#255#128#128#128#255#255#255#0#0#0#128#128#128#255#255#255
+  +#255#255#255#128#128#128#128#0#0#255#255#255#128#0#0#255#255#255#255#255#255
+  +#128#0#0#255#255#255#128#0#0#255#255#255#255#255#255#128#0#0#255#255#255#128
+  +#0#0'@'#0#0#0#0#0#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#128#128#128#255#255#255#255#255#255#128#128#128#128#0#0#255#255#255#128#0#0
+  +#128#0#0#128#0#0#255#255#255#255#255#255#255#255#255#128#0#0#128#0#0#255#255
+  +#255#255#255#255#128#0#0'@'#0#0#192#220#192#128#128#128#255#255#255#0#0#0#255
+  +#255#255#128#128#128#192#220#192#255#255#255#255#255#255#128#128#128#128#0#0
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#128#0#0'@'#0#0#0#0#0
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#0#0#0#255#255
+  +#255#255#255#255#128#128#128#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0
+  +#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#255#255#255#128#128
+  +#128#0#0#0#255#255#255#128#128#128#255#255#255#0#0#0#128#128#128#255#255#255
+  +#255#255#255#128#128#128#255#0#255#128#128#128#192#220#192#255#255#255#255
+  +#255#255#192#220#192#192#220#192#0#0#0#255#0#255#128#128#128#128#128#128#128
+  +#128#128#255#255#255#255#255#255#255#255#255#128#128#128#0#0#0#192#220#192#0
+  +#0#0#128#128#128#255#255#255#255#255#255#255#255#255#128#128#128#255#0#255
+  +#128#128#128#192#220#192#192#220#192#255#255#255#255#255#255#192#220#192#0#0
+  +#0#255#0#255#128#128#128#192#220#192#128#128#128#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#128#128#128#255#0#255#128#128#128#192#220#192
+  +#255#255#255#255#255#255#192#220#192#192#220#192#0#0#0#255#0#255#128#128#128
+  +#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128#255#0#255#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128#128#128#0#0#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#128#128#128#192#220#192
+  +#255#255#255#255#255#255#255#255#255#192#220#192#0#0#0#255#0#255#128#128#128
+  +#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128#255#0#255#128#128#128#128#128#128#255#255#255#255#255#255
+  +#255#255#255#128#128#128#0#0#0#255#0#255#128#128#128#192#220#192#128#128#128
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#128#128#128#255#0
+  +#255#255#0#255#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#255#0#255#255#0#255#128#128#128#255#255#255#128#128#128#255#255#255#255#255
+  +#255#255#255#255#128#128#128#0#0#0#192#220#192#0#0#0#128#128#128#255#255#255
+  +#255#255#255#255#255#255#128#128#128#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#128#128#128#192#220#192
+  +#128#128#128#255#255#255#255#255#255#128#128#128#0#0#0#255#255#255#128#128
+  +#128#255#255#255#0#0#0#128#128#128#255#255#255#255#255#255#128#128#128#255#0
+  +#255#255#0#255#255#0#255#128#0#0#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#128#128#128#255#255#255#128#128#128#255#255#255#255#255#255#0#0#0#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#128#128#128#255#255
+  +#255#255#255#255#128#128#128#255#0#255#255#0#255#255#0#255#128#0#0#255#0#255
+  +#128#0#0#255#0#255#255#0#255#255#0#255#128#128#128#192#220#192#128#128#128
+  ,#255#255#255#255#255#255#192#220#192#128#128#128#255#255#255#0#0#0#255#255
+  +#255#128#128#128#192#220#192#255#255#255#255#255#255#128#128#128#255#0#255
+  +#255#0#255#255#0#255#128#0#0#255#0#255#128#0#0#128#0#0#255#0#255#255#0#255
+  +#128#128#128#255#255#255#128#128#128#255#255#255#255#255#255#0#0#0#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#0#0#0#255#255#255#255
+  +#255#255#128#128#128#255#0#255#255#0#255#255#0#255#255#0#255#128#0#0#128#0#0
+  +#128#0#0#128#0#0#255#0#255#128#128#128#192#220#192#128#128#128#255#255#255
+  +#255#255#255#128#128#128#0#0#0#255#255#255#128#128#128#255#255#255#0#0#0#128
+  +#128#128#255#255#255#255#255#255#128#128#128#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#128#0#0#128#0#0#255#0#255#255#0#255#128#128#128#128#128
+  +#128#128#128#128#255#255#255#255#255#255#255#255#255#128#128#128#0#0#0#192
+  +#220#192#0#0#0#128#128#128#255#255#255#255#255#255#255#255#255#128#128#128
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#128#0#0#255#0#255#255#0
+  +#255#255#0#255#128#128#128#192#220#192#128#128#128#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#128#128#128#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#128#128#128#128
+  +#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128#128
+]);
+
+LazarusResources.Add('TDAMemDataTable','BMP',[
+  'BM'#248#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#194#6#0#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@'#0#0'@'#0#0'@'#0#0
+  +'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0#255#0
+  +#255#255#0#255#5'f'#149#5'f'#149#5'f'#149#5'f'#149#5'f'#149#5'f'#149#255#0
+  +#255#255#0#255#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0
+  +#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0'@'#0#0#255#0#255#2't'#169'0'#201
+  +#233#18#203#254' '#206#254'T'#222#255't'#224#248','#167#211#5'f'#149#255#0
+  +#255#128#0#0#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#128#0#0
+  +'@'#0#0#2't'#169's'#250#254'?'#227#254#18#203#254' '#206#254'T'#222#255't'
+  +#224#248'0'#176#218#3#134#193#5'f'#149#128#0#0#255#255#255#128#0#0#128#0#0
+  +#128#0#0#255#255#255#255#255#255#128#0#0#255#255#255#255#255#255#128#0#0#255
+  +#255#255#128#0#0'@'#0#0#2't'#169's'#250#254'?'#227#254#18#203#254' '#206#254
+  +'T'#222#255't'#224#248'0'#176#218#3#134#193#5'f'#149#128#0#0#255#255#255#128
+  +#0#0#255#255#255#255#255#255#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0#128
+  +#0#0#255#255#255#128#0#0'@'#0#0#2't'#169's'#250#254'?'#227#254#18#203#254' '
+  +#206#254'T'#222#255't'#224#248'0'#176#218#3#134#193#5'f'#149#128#0#0#255#255
+  +#255#128#0#0#255#255#255#255#255#255#128#0#0#255#255#255#128#0#0#255#255#255
+  +#255#255#255#128#0#0#255#255#255#128#0#0'@'#0#0#2't'#169#159#251#254#163#243
+  +#255#182#242#255#218#248#255#229#250#255#216#247#254#154#220#239'A'#172#213#5
+  +'f'#149#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0#255#255#255#255#255#255
+  +#255#255#255#128#0#0#128#0#0#255#255#255#255#255#255#128#0#0'@'#0#0#2't'#169
+  +#167#233#243#28#170#211#7#145#197#7#136#188#16#139#188#31#145#191#20'y'#173
+  +'y'#192#220#5'g'#150#128#0#0#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#128#0#0'@'#0#0#2't'#169'1'#181#211'?'#227#254#18#203#254' '#206#254
+  +'T'#222#255't'#224#248'0'#176#218#2'h'#163#3'h'#154#128#0#0#128#0#0#128#0#0
+  +#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128
+  +#0#0'4'#144'4'#2't'#169's'#250#254'?'#227#254#18#203#254' '#206#254'T'#222
+  +#255't'#224#248'0'#176#218#3#134#193#5'f'#149#150'5'#17#254#254#254#254#254
+  +#254#254#254#251#254#250#247#0'e'#0#254#246#237#254#243#230#254#240#225#254
+  +#237#218#254#233#211#0'e'#0#254#226#197#254#233#208#2't'#169's'#250#254'?'
+  +#227#254#18#203#254' '#206#254'T'#222#255't'#224#248'0'#176#218#3#134#193#5
+  +'f'#149#150'5'#17#254#254#254#254#254#254#254#254#254#254#254#252#0'e'#0#254
+  +#248#243#254#246#239#254#244#233#254#242#226#254#238#221#0'e'#0#254#230#206
+  +#254#235#216#2't'#169's'#250#254'?'#227#254#18#203#254' '#206#254'T'#222#255
+  +'t'#224#248'0'#176#218#3#134#193#5'f'#149#150'5'#17#254#254#254#254#254#254
+  +#254#254#254#254#254#254#0'e'#0#254#251#250#254#250#244#254#247#240#254#244
+  +#234#254#242#227#0'e'#0#254#235#215#254#238#222#2't'#169'x'#251#254'h'#246
+  +#255'T'#246#255'_'#254#255''#254#255#137#251#254'H'#207#242#5#139#199#5'f'
+  +#149#150'5'#17#0'e'#0#0'e'#0#0'e'#0#0'e'#0#0'e'#0#0'e'#0#0'e'#0#0'e'#0#0'e'#0
+  +#0'e'#0#0'e'#0#0'e'#0'4'#144'4'#2't'#169#251#255#255#240#255#255#198#255#255
+  +#160#255#255#152#255#255#152#255#255#147#255#255'W'#247#254#5'f'#149#150'5'
+  +#17#254#254#254#254#254#254#254#254#254#254#254#254#0'e'#0#254#254#254#254
+  +#254#254#254#252#252#254#251#247#254#248#243#0'e'#0#254#243#233#254#240#225
+  +#254#243#230#4'y'#175#237#250#252#220#255#255#183#255#255#153#255#255#146#255
+  +#255#131#250#251#8'k'#154#255#0#255#150'5'#17#254#254#254#254#254#254#254#254
+  +#254#254#254#254#0'e'#0#254#254#254#254#254#254#254#254#254#254#254#254#254
+  +#252#250#0'e'#0#254#247#239#254#244#234#254#242#227#254#244#231#2't'#169#2't'
+  +#169#2't'#169#2't'#169#2't'#169#2't'#169#150'5'#17#255#0#255#150'5'#17#254
+  +#254#254#254#254#254#254#254#254#128#128#128#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#255#0#255#150'5'#17#0'e'#0#0'e'#0#0'e'#0#128#128#128#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#0#0#0#255#0#255#150'5'#17#254#254#254#254#254
+  +#254#254#254#254#128#128#128#255#255#255#128#0#0#255#255#255#255#255#255#255
+  +#255#255#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0#255#255#255#128#0#0#255
+  +#255#255#255#255#255#255#255#255#128#0#0#255#255#255#0#0#0#255#0#255#150'5'
+  +#17#254#254#254#254#254#254#254#254#254#128#128#128#255#255#255#128#0#0#255
+  +#255#255#192#220#192#255#255#255#128#0#0#255#255#255#128#0#0#192#220#192#255
+  +#255#255#255#255#255#128#0#0#255#255#255#192#220#192#255#255#255#128#0#0#255
+  +#255#255#0#0#0#255#0#255#150'5'#17#220#220#220#220#220#220#220#220#220#128
+  +#128#128#255#255#255#128#0#0#192#220#192#128#0#0#192#220#192#128#0#0#255#255
+  ,#255#128#0#0#128#0#0#192#220#192#255#255#255#128#0#0#192#220#192#128#0#0#192
+  +#220#192#128#0#0#255#255#255#0#0#0#255#0#255#150'5'#17#152'D'#16#152'D'#16
+  +#152'D'#16#128#128#128#255#255#255#128#0#0#128#0#0#192#220#192#128#0#0#128#0
+  +#0#255#255#255#128#0#0#192#220#192#255#255#255#255#255#255#128#0#0#128#0#0
+  +#192#220#192#128#0#0#128#0#0#255#255#255#0#0#0#255#0#255#189'X'#12#233''#30
+  +#233''#30#233''#30#128#128#128#255#255#255#128#0#0#192#220#192#255#255#255
+  +#192#220#192#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0#255#255#255#128#0#0
+  +#192#220#192#255#255#255#192#220#192#128#0#0#255#255#255#0#0#0#255#0#255#255
+  +#0#255#189'X'#12#189'X'#12#189'X'#12#128#128#128#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#0#0#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#255#0#255#0#0
+]);
+
+LazarusResources.Add('TDARemoteCommand','BMP',[
+  'BMv'#6#0#0#0#0#0#0'6'#4#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#8#0#0#0#0#0'@'#2#0
+  +#0#0#0#0#0#0#0#0#0#0#1#0#0#0#1#0#0#255#0#255#0#153'3'#0#0#154'4'#0#0#156'6'#0
+  +#0#158'8'#0#0#162'<'#0#0#165'?'#0#0#166'@'#0#0#169'C'#0#0#170'D'#0#0#175'I'#0
+  +#0#175'M'#11#0#172'L'#13#0#176'J'#0#0#179'M'#0#0#180'N'#0#0#182'P'#0#0#185'S'
+  +#0#0#185'V'#7#0#183'V'#11#0#181'T'#12#0#185'Y'#15#0#179'W'#25#0#191'd'#26#0
+  +#139'Q$'#0#138'Z+'#0#179'\&'#0#183'i$'#0#199'a'#0#0#201'c'#0#0#203'e'#0#0#204
+  +'f'#0#0#198'd'#10#0#209'k'#0#0#220'v'#0#0#229''#0#0#197'v9'#0#204'>'#0#144
+  +'kG'#0#183'uD'#0#198'{D'#0#247#145#0#0#255#157#11#0#249#152#12#0#255#158#12#0
+  +#242#148#20#0#249#156#24#0#255#161#19#0#255#163#25#0#255#166#31#0#217#137'6'
+  +#0#230#146'-'#0#242#155'%'#0#236#159'>'#0#255#166'!'#0#255#169')'#0#255#172
+  +'.'#0#255#175'7'#0#255#176'8'#0#255#178'>'#0#138#141''#0#210#136'E'#0#204
+  +#139'['#0#255#179'@'#0#249#178'M'#0#255#184'N'#0#236#167'S'#0#255#186'Q'#0
+  +#255#187'T'#0#255#188'W'#0#210#149'f'#0#223#170'y'#0#255#193'c'#0#255#194'e'
+  +#0#255#195'i'#0#255#196'j'#0#255#197'l'#0#249#193'r'#0#255#202'x'#0#255#203
+  +'|'#0#255#204'~'#0'(r'#138#0' '#129#159#0#14#128#170#0#23#136#175#0#11#134
+  +#178#0#9#138#183#0#7#140#186#0#14#145#190#0#30#148#188#0'('#152#186#0'g'#145
+  +#154#0'p'#159#166#0#4#147#196#0#9#151#199#0#10#157#206#0'"'#155#194#0#21#175
+  +#217#0'!'#170#207#0'5'#160#195#0'0'#170#202#0'2'#170#206#0'?'#176#203#0'='
+  +#189#218#0'9'#184#222#0')'#187#224#0'h'#176#202#0#25#199#241#0#27#212#254#0
+  +'/'#198#231#0'&'#194#233#0'>'#205#233#0','#211#249#0'.'#216#254#0'<'#224#254
+  +#0'T'#192#212#0'Y'#196#215#0'Y'#194#221#0'o'#194#214#0'|'#192#213#0'C'#200
+  +#233#0'T'#223#254#0'`'#206#234#0'l'#212#238#0'd'#217#233#0'v'#223#233#0'}'
+  +#223#233#0'U'#224#255#0'k'#227#244#0'`'#236#254#0'u'#226#250#0'{'#232#255#0
+  +'q'#242#254#0#136#153#143#0#151#166#158#0#150#177#174#0#236#187#133#0#230#182
+  +#136#0#255#205#130#0#255#210#141#0#236#193#147#0#255#212#147#0#249#212#162#0
+  +#255#220#166#0#249#215#170#0#255#221#169#0#255#223#173#0#255#224#175#0#255
+  +#226#181#0#134#187#196#0#131#223#233#0#138#218#235#0#148#223#233#0#149#223
+  +#237#0#164#223#234#0#149#235#253#0#149#238#254#0#158#237#255#0#132#243#249#0
+  +#128#245#252#0#143#246#251#0#131#248#254#0#147#242#254#0#151#249#254#0#148
+  +#253#254#0#153#255#254#0#158#255#254#0#180#238#243#0#164#255#254#0#168#249
+  +#254#0#173#251#254#0#170#255#254#0#182#241#255#0#188#242#248#0#179#249#255#0
+  +#179#255#254#0#185#255#254#0#195#223#234#0#206#234#238#0#204#246#255#0#201
+  +#255#254#0#207#255#255#0#209#247#255#0#223#255#255#0#229#255#255#0#240#247
+  +#250#0#245#255#255#0#250#255#255#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#1#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#1#1#22'N'#1#0#0#0#0#0#0#0#0#0
+  +'SSSSSSQ'#1#1#1#18#21'5HM'#1#1#1#0#0#0#0'SSbbanxz\'#7#4'.*19AHN'#141#1#0#0#0
+  +'SZ|'#129'rlq'#131#153#7#9'31*6:CJN'#1#0#0#0'W}'#161#129'rlq'#131#135#10#9
+  +'B:-'#7#1#12'@J='#1#0#0'W}'#161#129'rlq'#133#16#12'G'#141'H'#27#0#1#4#23'CJ'
+  +'%'#1#0'W}'#161#129'rlq'#15'!F'#148#147#139'&'#0#1#9#20'?CJ'#1#0'W}'#161#129
+  +'rlq<'#29#20#137#148#146''''#0#4#15' 7?2'#1#0'W}'#161#129'rlq'#131#134#29
+  +#18#140#148#142#26#9#20'*/4'#1#0#0'W}'#163#162#156#157#172#179#182#178#29'"'
+  +#137#148#148#146'NE7*'#1#0#0#0'W'#167#173#151'ue`Yc[#'#29#144#148#148#148#146
+  +'NC7'#1#0#0#0'Vvfgmkpy'#130#149#18#15'>$$'#144#148#136#1#1#1#0#0#0'Ut'#159
+  +#129'rlq'#131#156'{g_'#24')('#148#1#0#0#0#0#0#0'W}'#161#129'rlq'#131#156'{'
+  +'h_R'#25#4#1#0#0#0#0#0#0#0'W}'#161#129'rlq'#131#156'{h_]S'#0#0#0#0#0#0#0#0#0
+  +'W}'#161#129'rlq'#131#156'{g_]S'#0#0#0#0#0#0#0#0#0'W}'#161#129'rlq'#131#156
+  +'{h_]S'#0#0#0#0#0#0#0#0#0'W}'#161#129'rlq'#131#156'{h_]S'#0#0#0#0#0#0#0#0#0
+  +'W~'#170#174#170#170#165#165#165#165#160#128'i^S'#0#0#0#0#0#0#0#0#0'W'#177
+  +#187#184#181#174#168#165#165#165#165#163#132'oS'#0#0#0#0#0#0#0#0#0'Wj'#185
+  +#186#183#181#174#165#165#165#165#165#159'eS'#0#0#0#0#0#0#0#0#0#0'WXww'#154
+  +#153#150'~}ssTS'#0#0#0#0#0#0#0#0#0#0#0#0#0'WWWWWWWWW'#0#0#0#0#0#0#0#0#0#0#0
+]);
+
+LazarusResources.Add('TDABinAdapter','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@'#0#0'@'#0#0'@'#0#0
+  +'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0#142']'
+  +'Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'
+  +#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128
+  +#0#0#128#0#0#128#0#0#128#0#0'@'#0#0#255#225#189#255#221#181#255#217#172#255
+  +#213#165#255#211#157#255#207#151#255#203#145#255#201#140#255#199#135#128'PK'
+  +#128#0#0#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#128#0#0'@'#0
+  +#0#255#231#203#255#227#194#255#224#187#255#220#178#255#216#171#0#0#0#0#0#0
+  +#255#206#149#255#203#143#128'PK'#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0
+  +#255#255#255#255#255#255#128#0#0#255#255#255#255#255#255#128#0#0#255#255#255
+  +#128#0#0'@'#0#0#255#238#217#255#233#208#255#230#199#255#226#191#255#221#182#0
+  +#0#0#255#215#166#0#0#0#255#207#152#128'PK'#128#0#0#255#255#255#128#0#0#255
+  +#255#255#255#255#255#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0#128#0#0#255
+  +#255#255#128#0#0'@'#0#0#255#243#229#255#240#222#255#235#213#255#233#204#255
+  +#229#197#0#0#0#0#0#0#255#216#171#255#213#165#128'PK'#128#0#0#255#255#255#128
+  +#0#0#255#255#255#255#255#255#128#0#0#255#255#255#128#0#0#255#255#255#255#255
+  +#255#128#0#0#255#255#255#128#0#0'@'#0#0#7'9z'#255#246#233#255#242#225#255#238
+  +#218#255#234#209#0#0#0#255#227#193#0#0#0#255#218#176#128'PK'#128#0#0#255#255
+  +#255#128#0#0#128#0#0#128#0#0#255#255#255#255#255#255#255#255#255#128#0#0#128
+  +#0#0#255#255#255#255#255#255#128#0#0'@'#0#0#255#254#250#255#250#244#255#248
+  +#239#255#244#231#255#240#222#0#0#0#0#0#0#255#229#198#255#225#189#128'PK'#128
+  +#0#0#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#128#0#0'@'#0#0
+  +#255#255#255#255#254#252#255#252#247#255#250#242#255#246#235#255#243#227#255
+  +#239#220#255#235#211#255#231#203#128'PK'#128#0#0#128#0#0#128#0#0#128#0#0#128
+  +#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#254#250#255#251#246#255#248#239
+  +#255#244#231#255#242#225#255#238#217#128'PKHJK'#201#194#201#7'9z'#7'9z'#7'9z'
+  +'='#154#242'5'#149#239'-'#140#239#7'9z'#7'9z'#7'9zyyy'#194#140'm'#255#255#255
+  +#255#255#255#255#255#255#137#167#199#7'9z'#137#167#199#255#252#248#247#240
+  +#235#226#218#209#226#216#204'{MIHJK'#206#199#204#191#184#192#7'9z@'#157#242
+  +'@'#157#242'@'#157#242'9'#152#240'2'#145#239#7'9zE_{yyy'#203#147'o'#255#255
+  +#255#255#255#255#137#167#199#7'9z'#15's'#233#7'9z'#137#167#199#234#233#230
+  +#182#180#176#182#177#171'uIEHJK'#209#202#209#194#188#194'h'#129#163#7'9z@'
+  +#157#242'@'#157#242'@'#157#242#7'9zE_{{{{yyy'#209#153'r'#255#255#255#137#167
+  +#199#7'9z'#15's'#233#15's'#233#15's'#233#7'9zURf'#160'g['#160'g['#149'\KHJK'
+  +#213#207#213#197#191#197#194#188#194'Qk'#138#7'9z@'#157#242#7'9zId'#128'yzzy'
+  +'yyyyy'#216#159'u'#137#167#199#7'9z'#27'}'#235#22'y'#234#18'u'#233#15's'#233
+  +#15's'#233#7'9z'#254#176'J'#240#145','#225#132'.HJK'#217#213#217#201#196#202
+  +#199#192#198#150#146#152'0Kf'#7'9z,D^'#137#137#137''#130#130#131'yyy'#220
+  +#163'v'#7'9z'#7'9z'#7'9z'#31#130#235#27'}'#235#22'y'#234#7'9z'#7'9z'#7'9z'
+  +#218#152'c'#255#0#255'HJK'#225#218#224#207#201#206#199#192#198#151#150#153'U'
+  +'WX'#175#175#177'JLM'#137#137#137#128#128#128#132#132#132''#220#163'v'#209
+  +#146'm'#209#146'm'#7'9z-'#140#239'%'#135#238#31#130#237#7'9zXTh'#212#154's'
+  +#255#0#255#255#0#255'HJK'#231#226#230#212#207#211#225#218#224#152#149#152'UW'
+  +'X'#176#175#177'LNO'#150#149#149#132#131#131'vvvyyy'#143#143#143#131#132#132
+  +'*C]'#7'9z7'#150#240'2'#146#240#7'9z'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255'HJK'#239#235#239#235#233#235#198#197#199#160#157#161'UWX'#164#165
+  +#167';=>'#130#130#131#137#137#137#143#143#143#137#137#137#147#147#147'Id'#128
+  +#7'9z@'#157#242'@'#157#242'='#154#242#7'9z'#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255'HJK'#238#237#238#178#177#180#156#153#156#159#158#161'RTU'
+  +#235#235#237'ossY[Z'#7'9z'#7'9z'#7'9z'#7'9z'#7'9z@'#157#242'@'#157#242#7'9z'
+  +#7'9z'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#237
+  +#235#237#129#129#130#213#209#212#207#207#208'`cdprrxy{'#138#142#140#171#172
+  +#172'Xt'#146#7'9z'#7'9z'#7'9z'#7'9z'#7'9z'#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#251#251#252#204#204#204
+  +#254#254#254#227#227#230#186#184#188#151#149#152#136#134#137'xy{rssfihehi'
+  +#150#152#153#150#152#153'HJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#255#255#255#251#251#252#238
+  +#238#242#237#238#240#231#230#233#217#213#217#196#192#196#172#170#172#151#145
+  +#151#136#131#136#150#142#146#136#129#131'HJK'#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'
+  ,#255#255#255#255#255#255#246#246#248#248#247#251#237#237#239#226#226#229#209
+  +#207#212#194#191#196#193#187#193#167#159#165'HJKHJK'#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255'HJKHJK'#255#255#255#255#255#255#255#255#255#240#239#243
+  +#229#225#230#203#197#203'HJKHJK'#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255'LNOHJKHJKHJKHJKHJK'#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+]);
+
+LazarusResources.Add('TDADBSessionManager','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#0'Z'#0#0'Z'#0#0'Z'#0#0'Z'#0#0'Z'#0#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@@@'
+  +#3#143#10#17#172'.'#22#175'2'#13#146#15#0''#0#0'Z'#0#0'Z'#0#255#0#255#255#0
+  +#255#255#0#255#255#0#255'@'#0#192#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +'@'#0#192'@@@'#31#189'L'#23#186'K'#15#147#19#140#226#140#17#144#19#0'z'#0#0
+  +']'#0'n-'#19'n-'#19#255#0#255#255#0#255'@'#0#192#255#255#255'@'#0#192#255#255
+  +#255'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255
+  +#255'@'#0#192'@@@"'#202'Y'#15#147#19'p'#211'j'#255#240#239#30#157'"'#7#147#24
+  +#0'\'#0#244'[A'#248'J6n-'#19'n-'#19'@'#0#192#255#255#255'@'#0#192'@'#0#192
+  +#255#255#255#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255
+  +#255'@'#0#192'@@@'#23#178'='#15#147#19#160#199#188#251#252#252#25#164'$'#12
+  +#150'%'#0'Z'#1#237#156#136#234#136't'#225'@#n-'#19'@'#0#192#255#255#255'@'#0
+  +#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0
+  +#192#255#255#255'@'#0#192'@@@'#12')'#24'1X~.X'#146'5i'#130#17#135'8'#0'Z'#0
+  +#184'A'#23#255#240#239#226#176#154#212'C'#31'n-'#19'@'#0#192#255#255#255'@'#0
+  +#192'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255
+  +#255#255#255'@'#0#192'@@@'#9#17'?'#7')'#154#5'('#149#2#29#143#2#29#143#184'A'
+  +#23#233#161#140#251#252#252#229#160#136#226'U-n-'#19'@'#0#192#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255'@'#0#192'@@@'#14'?'#167#13'A'#181#13'?'#172#14
+  +'@'#175#2#28#145#134'wwZ'#135#153'W'#131#143#149'hR'#181'2'#21#255#0#255'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@'#0#192'@'#0#192#10#28'='#18'T'#213#16'M'#198#17'M'#197#17'M'#197
+  +#17'L'#203#17'W'#139#9'_'#194#4'W'#193#11'n'#154#13#13#13'uuu~~~YYYEuM*'#194
+  +'?;a?BBBBBB========='#3#3#4#0#0#0#10#26'1'#24'j'#229#22'g'#229#22'c'#221#22
+  +'c'#221#23'e'#231#17'W'#139' '#129#251#30'{'#247#22'k'#239#11'n'#154'===dddY'
+  +'YYE'#145'S1'#202'KCiIIIIBBBBBB======'#5#5#6#10#9#7#24#27#31#28'['#169#31#139
+  +#255#31#138#255#31#139#255#31#138#255#17'W'#139')'#145#250'&'#142#250'!'#132
+  +#250#26'p'#235#11'n'#154'^^^YYYJ'#150'Z9'#209'VHnNIIIIIIBBBBBB======%%%USP+2'
+  +':'#17'5]'#19'K'#135#23'W'#154#22'Cx('#142#230'0'#157#251'-'#152#250'('#144
+  +#251#31#130#247#11'n'#154'^^^^^^P'#156'aA'#217'aKzTYYYIIIIIIBBBBBBBBB'#5#5#6
+  +'AABNKJ865'#22#19#19#5#3#3#5#2#1#2'7\5'#166#255'1'#157#251','#150#251'#'#137
+  +#246#11'n'#154'hhh^^^U'#161'iH'#224'mB'#209'aA'#132'LHnNJSKIIIBBBBBB====== '
+  +#31'"'#29#28#28#20#20#20#12#12#12#2'Bm'#29'x'#189'9'#172#255'7'#167#255'4'
+  +#160#255#11'n'#154#23#30#23#138#138#138'bbb\'#139'iP'#232'xH'#224'mA'#217'a9'
+  +#209'V1'#202'K;'#135'FIIIBBBBBB=========&I&'#19'i'#156'R'#152#188#21'c'#146#3
+  +'>h'#3'>h'#0'<j'#11'n'#154'BBB'#255#0#255'bbbbbbX'#230#129'P'#232'xH'#224'mA'
+  +#217'a9'#209'V>'#148'MIIIIIIBBBBBB======''V'''#0#147#0'#w'#166#22'i'#151#7'P'
+  +'~'#0'<j'#30'6'#30'&&&'#129#129#129#255#0#255'uuubbb_'#171'wW'#239#132'P'#232
+  +'xH'#224'mA'#217'a9'#209'V;'#164'M='#128'G?eD;a?4c7"x&'#7#150#9#0#147#0#0#147
+  +#0#0#141#0#0#141#0#10'q'#10'---&&&'#255#0#255#255#0#255#143#143#143'hhhdnh_'
+  +#228#137'W'#239#132'P'#232'xH'#224'mA'#217'a9'#209'V1'#202'K*'#194'?"'#187'4'
+  +#27#179'('#19#172#29#12#164#17#4#157#6#4#157#6#0#147#0#0#141#0'&@&---^^^'#255
+  +#0#255#255#0#255#255#0#255'uuubbbd'#129'n_'#237#140'W'#239#132'P'#232'xH'#224
+  +'mA'#217'a9'#209'V1'#202'K*'#194'?"'#187'4'#27#179'('#19#172#29#12#164#17#4
+  +#157#6#0#147#0'!X!555---'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +'hhhhhhd'#129'n_'#237#140'W'#239#132'P'#232'xH'#224'mA'#217'a9'#209'V1'#202
+  +'K*'#194'?"'#187'4'#27#179'('#19#172#29#15#157#20'''`''===555'#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'hhhhhhdnh_'#181'zW'
+  +#239#132'P'#232'xH'#224'mA'#217'a9'#209'V1'#202'K*'#194'?"'#187'4'''#144'0<O'
+  +'======='#129#129#129#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255'uuuhhhbbbakd['#148'kT'#169'jL'#190'gE'#183'^B'#161
+  +'TA'#132'LGZJIIIBBBBBB'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#143#143#143'hhhbbbb'
+  +'bb^^^^^^YYYYYYYYYIIIIIIyyy'#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#148#148#148'yyy^^^^^^bbbyyy'#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+]);
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_Glyphs.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_Glyphs.res
new file mode 100644
index 0000000..85767e6
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_Glyphs.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_Lazarus_Mac.lpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_Lazarus_Mac.lpk
new file mode 100644
index 0000000..a5b076a
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_Lazarus_Mac.lpk	
@@ -0,0 +1,333 @@
+<?xml version="1.0"?>
+<CONFIG>
+  <Package Version="3">
+    <Name Value="DataAbstract_Core_Lazarus_Mac"/>
+    <CompilerOptions>
+      <Version Value="8"/>
+      <SearchPaths>
+        <UnitOutputDirectory Value="units/$(TargetCPU)-$(TargetOS)"/>
+      </SearchPaths>
+      <Parsing>
+        <SyntaxOptions>
+          <CStyleOperator Value="False"/>
+        </SyntaxOptions>
+      </Parsing>
+      <Other>
+        <CompilerPath Value="$(CompPath)"/>
+      </Other>
+    </CompilerOptions>
+    <Description Value="RemObjects Data Abstract - Core Library"/>
+    <Files Count="73">
+      <Item1>
+        <Filename Value="BaseLoginService_Impl.pas"/>
+        <UnitName Value="BaseLoginService_Impl"/>
+      </Item1>
+      <Item2>
+        <Filename Value="BaseLoginService_Impl.lfm"/>
+        <Type Value="LFM"/>
+      </Item2>
+      <Item3>
+        <Filename Value="DALoginService_Impl.pas"/>
+        <UnitName Value="DALoginService_Impl"/>
+      </Item3>
+      <Item4>
+        <Filename Value="DARemoteService_Impl.pas"/>
+        <UnitName Value="DARemoteService_Impl"/>
+      </Item4>
+      <Item5>
+        <Filename Value="DataAbstract_Core_Reg.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="DataAbstract_Core_Reg"/>
+      </Item5>
+      <Item6>
+        <Filename Value="DataAbstract3_Async.pas"/>
+        <UnitName Value="DataAbstract3_Async"/>
+      </Item6>
+      <Item7>
+        <Filename Value="DataAbstract3_Intf.pas"/>
+        <UnitName Value="DataAbstract3_Intf"/>
+      </Item7>
+      <Item8>
+        <Filename Value="DataAbstract3_Invk.pas"/>
+        <UnitName Value="DataAbstract3_Invk"/>
+      </Item8>
+      <Item9>
+        <Filename Value="DataAbstract4_Async.pas"/>
+        <UnitName Value="DataAbstract4_Async"/>
+      </Item9>
+      <Item10>
+        <Filename Value="DataAbstract4_Intf.pas"/>
+        <UnitName Value="DataAbstract4_Intf"/>
+      </Item10>
+      <Item11>
+        <Filename Value="DataAbstract4_Invk.pas"/>
+        <UnitName Value="DataAbstract4_Invk"/>
+      </Item11>
+      <Item12>
+        <Filename Value="DataAbstractService_Impl.pas"/>
+        <UnitName Value="DataAbstractService_Impl"/>
+      </Item12>
+      <Item13>
+        <Filename Value="DataAbstractService_Impl.lfm"/>
+        <Type Value="LFM"/>
+      </Item13>
+      <Item14>
+        <Filename Value="MultiDbLoginService_Impl.pas"/>
+        <UnitName Value="MultiDbLoginService_Impl"/>
+      </Item14>
+      <Item15>
+        <Filename Value="MultiDbLoginService_Impl.lfm"/>
+        <Type Value="LFM"/>
+      </Item15>
+      <Item16>
+        <Filename Value="SimpleLoginService_Impl.pas"/>
+        <UnitName Value="SimpleLoginService_Impl"/>
+      </Item16>
+      <Item17>
+        <Filename Value="SimpleLoginService_Impl.lfm"/>
+        <Type Value="LFM"/>
+      </Item17>
+      <Item18>
+        <Filename Value="uDAADOInterfaces.pas"/>
+        <UnitName Value="uDAADOInterfaces"/>
+      </Item18>
+      <Item19>
+        <Filename Value="uDABin2DataStreamer.pas"/>
+        <UnitName Value="uDABin2DataStreamer"/>
+      </Item19>
+      <Item20>
+        <Filename Value="uDABusinessProcessor.pas"/>
+        <UnitName Value="uDABusinessProcessor"/>
+      </Item20>
+      <Item21>
+        <Filename Value="uDAClasses.pas"/>
+        <UnitName Value="uDAClasses"/>
+      </Item21>
+      <Item22>
+        <Filename Value="uDAClientDataModule.pas"/>
+        <UnitName Value="uDAClientDataModule"/>
+      </Item22>
+      <Item23>
+        <Filename Value="uDADatasetWrapper.pas"/>
+        <UnitName Value="uDADatasetWrapper"/>
+      </Item23>
+      <Item24>
+        <Filename Value="uDADataStreamer.pas"/>
+        <UnitName Value="uDADataStreamer"/>
+      </Item24>
+      <Item25>
+        <Filename Value="uDADataTable.pas"/>
+        <UnitName Value="uDADataTable"/>
+      </Item25>
+      <Item26>
+        <Filename Value="uDADataTableReferenceCollection.pas"/>
+        <UnitName Value="uDADataTableReferenceCollection"/>
+      </Item26>
+      <Item27>
+        <Filename Value="uDADBSessionManager.pas"/>
+        <UnitName Value="uDADBSessionManager"/>
+      </Item27>
+      <Item28>
+        <Filename Value="uDADelta.pas"/>
+        <UnitName Value="uDADelta"/>
+      </Item28>
+      <Item29>
+        <Filename Value="uDADesigntimeCall.pas"/>
+        <UnitName Value="uDADesigntimeCall"/>
+      </Item29>
+      <Item30>
+        <Filename Value="uDADriverInfo.pas"/>
+        <UnitName Value="uDADriverInfo"/>
+      </Item30>
+      <Item31>
+        <Filename Value="uDADriverManager.pas"/>
+        <UnitName Value="uDADriverManager"/>
+      </Item31>
+      <Item32>
+        <Filename Value="uDAEngine.pas"/>
+        <UnitName Value="uDAEngine"/>
+      </Item32>
+      <Item33>
+        <Filename Value="uDAExceptions.pas"/>
+        <UnitName Value="uDAExceptions"/>
+      </Item33>
+      <Item34>
+        <Filename Value="uDAExpressionEvaluator.pas"/>
+        <UnitName Value="uDAExpressionEvaluator"/>
+      </Item34>
+      <Item35>
+        <Filename Value="uDAHelpers.pas"/>
+        <UnitName Value="uDAHelpers"/>
+      </Item35>
+      <Item36>
+        <Filename Value="uDAIBInterfaces.pas"/>
+        <UnitName Value="uDAIBInterfaces"/>
+      </Item36>
+      <Item37>
+        <Filename Value="uDAInterfaces.pas"/>
+        <UnitName Value="uDAInterfaces"/>
+      </Item37>
+      <Item38>
+        <Filename Value="uDAInterfacesEx.pas"/>
+        <UnitName Value="uDAInterfacesEx"/>
+      </Item38>
+      <Item39>
+        <Filename Value="uDAMacroProcessors.pas"/>
+        <UnitName Value="uDAMacroProcessors"/>
+      </Item39>
+      <Item40>
+        <Filename Value="uDAMacros.pas"/>
+        <UnitName Value="uDAMacros"/>
+      </Item40>
+      <Item41>
+        <Filename Value="uDAMemDataset.pas"/>
+        <UnitName Value="uDAMemDataset"/>
+      </Item41>
+      <Item42>
+        <Filename Value="uDAMemDataTable.pas"/>
+        <UnitName Value="uDAMemDataTable"/>
+      </Item42>
+      <Item43>
+        <Filename Value="uDAMySQLInterfaces.pas"/>
+        <UnitName Value="uDAMySQLInterfaces"/>
+      </Item43>
+      <Item44>
+        <Filename Value="uDAOracleInterfaces.pas"/>
+        <UnitName Value="uDAOracleInterfaces"/>
+      </Item44>
+      <Item45>
+        <Filename Value="uDAPleaseWaitForm.pas"/>
+        <UnitName Value="uDAPleaseWaitForm"/>
+      </Item45>
+      <Item46>
+        <Filename Value="uDAPleaseWaitForm.lfm"/>
+        <Type Value="LFM"/>
+      </Item46>
+      <Item47>
+        <Filename Value="uDAPoweredByDataAbstractButton.pas"/>
+        <UnitName Value="uDAPoweredByDataAbstractButton"/>
+      </Item47>
+      <Item48>
+        <Filename Value="uDAReconcileDialog.pas"/>
+        <UnitName Value="uDAReconcileDialog"/>
+      </Item48>
+      <Item49>
+        <Filename Value="uDAReconcileDialog.lfm"/>
+        <Type Value="LFM"/>
+      </Item49>
+      <Item50>
+        <Filename Value="uDAReconcileDialog.lrs"/>
+        <Type Value="LRS"/>
+      </Item50>
+      <Item51>
+        <Filename Value="uDAReconcileDialogDetails.pas"/>
+        <UnitName Value="uDAReconcileDialogDetails"/>
+      </Item51>
+      <Item52>
+        <Filename Value="uDAReconcileDialogDetails.lfm"/>
+        <Type Value="LFM"/>
+      </Item52>
+      <Item53>
+        <Filename Value="uDAReconcileDialogDetails.lrs"/>
+        <Type Value="LRS"/>
+      </Item53>
+      <Item54>
+        <Filename Value="uDARegExpr.pas"/>
+        <UnitName Value="uDARegExpr"/>
+      </Item54>
+      <Item55>
+        <Filename Value="uDARemoteDataAdapter.pas"/>
+        <UnitName Value="uDARemoteDataAdapter"/>
+      </Item55>
+      <Item56>
+        <Filename Value="uDARemoteDataAdapterRequests.pas"/>
+        <UnitName Value="uDARemoteDataAdapterRequests"/>
+      </Item56>
+      <Item57>
+        <Filename Value="uDARes.pas"/>
+        <UnitName Value="uDARes"/>
+      </Item57>
+      <Item58>
+        <Filename Value="uDAScriptingProvider.pas"/>
+        <UnitName Value="uDAScriptingProvider"/>
+      </Item58>
+      <Item59>
+        <Filename Value="uDAServerLog.pas"/>
+        <UnitName Value="uDAServerLog"/>
+      </Item59>
+      <Item60>
+        <Filename Value="uDASQL92Interfaces.pas"/>
+        <UnitName Value="uDASQL92Interfaces"/>
+      </Item60>
+      <Item61>
+        <Filename Value="uDASQL92QueryBuilder.pas"/>
+        <UnitName Value="uDASQL92QueryBuilder"/>
+      </Item61>
+      <Item62>
+        <Filename Value="uDASQLiteInterfaces.pas"/>
+        <UnitName Value="uDASQLiteInterfaces"/>
+      </Item62>
+      <Item63>
+        <Filename Value="uDASupportClasses.pas"/>
+        <UnitName Value="uDASupportClasses"/>
+      </Item63>
+      <Item64>
+        <Filename Value="uDAUtils.pas"/>
+        <UnitName Value="uDAUtils"/>
+      </Item64>
+      <Item65>
+        <Filename Value="uDAWhere.pas"/>
+        <UnitName Value="uDAWhere"/>
+      </Item65>
+      <Item66>
+        <Filename Value="uDAXMLAdapter.pas"/>
+        <UnitName Value="uDAXMLAdapter"/>
+      </Item66>
+      <Item67>
+        <Filename Value="uDAXMLUtils.pas"/>
+        <UnitName Value="uDAXMLUtils"/>
+      </Item67>
+      <Item68>
+        <Filename Value="uDAPostgresInterfaces.pas"/>
+        <UnitName Value="uDAPostgresInterfaces"/>
+      </Item68>
+      <Item69>
+        <Filename Value="uDABinAdapter.pas"/>
+        <UnitName Value="uDABinAdapter"/>
+      </Item69>
+      <Item70>
+        <Filename Value="uDADB2Interfaces.pas"/>
+        <UnitName Value="uDADB2Interfaces"/>
+      </Item70>
+      <Item71>
+        <Filename Value="uDASybaseInterfaces.pas"/>
+        <UnitName Value="uDASybaseInterfaces"/>
+      </Item71>
+      <Item72>
+        <Filename Value="MultiDbLoginServiceV5_Impl.lfm"/>
+        <Type Value="LFM"/>
+      </Item72>
+      <Item73>
+        <Filename Value="MultiDbLoginServiceV5_Impl.pas"/>
+        <UnitName Value="MultiDbLoginServiceV5_Impl"/>
+      </Item73>
+    </Files>
+    <Type Value="RunAndDesignTime"/>
+    <RequiredPkgs Count="2">
+      <Item1>
+        <PackageName Value="RemObjects_Core_Lazarus_Mac"/>
+      </Item1>
+      <Item2>
+        <PackageName Value="FCL"/>
+        <MinVersion Major="1" Valid="True"/>
+      </Item2>
+    </RequiredPkgs>
+    <UsageOptions>
+      <UnitPath Value="$(PkgOutDir)/"/>
+    </UsageOptions>
+    <PublishOptions>
+      <Version Value="2"/>
+      <IgnoreBinaries Value="False"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_Lazarus_Unix.lpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_Lazarus_Unix.lpk
new file mode 100644
index 0000000..ed7169f
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_Lazarus_Unix.lpk	
@@ -0,0 +1,339 @@
+<?xml version="1.0"?>
+<CONFIG>
+  <Package Version="3">
+    <PathDelim Value="\"/>
+    <Name Value="DataAbstract_Core_Lazarus_Unix"/>
+    <CompilerOptions>
+      <Version Value="5"/>
+      <PathDelim Value="\"/>
+      <SearchPaths>
+        <UnitOutputDirectory Value="units\$(TargetCPU)-$(TargetOS)"/>
+      </SearchPaths>
+      <Parsing>
+        <SyntaxOptions>
+          <D2Extensions Value="False"/>
+        </SyntaxOptions>
+      </Parsing>
+      <CodeGeneration>
+        <Generate Value="Faster"/>
+      </CodeGeneration>
+      <Other>
+        <CompilerPath Value="$(CompPath)"/>
+      </Other>
+    </CompilerOptions>
+    <Description Value="RemObjects Data Abstract - Core Library"/>
+    <Files Count="73">
+      <Item1>
+        <Filename Value="BaseLoginService_Impl.pas"/>
+        <UnitName Value="BaseLoginService_Impl"/>
+      </Item1>
+      <Item2>
+        <Filename Value="BaseLoginService_Impl.lfm"/>
+        <Type Value="LFM"/>
+      </Item2>
+      <Item3>
+        <Filename Value="DALoginService_Impl.pas"/>
+        <UnitName Value="DALoginService_Impl"/>
+      </Item3>
+      <Item4>
+        <Filename Value="DARemoteService_Impl.pas"/>
+        <UnitName Value="DARemoteService_Impl"/>
+      </Item4>
+      <Item5>
+        <Filename Value="DataAbstract_Core_Reg.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="DataAbstract_Core_Reg"/>
+      </Item5>
+      <Item6>
+        <Filename Value="DataAbstract3_Async.pas"/>
+        <UnitName Value="DataAbstract3_Async"/>
+      </Item6>
+      <Item7>
+        <Filename Value="DataAbstract3_Intf.pas"/>
+        <UnitName Value="DataAbstract3_Intf"/>
+      </Item7>
+      <Item8>
+        <Filename Value="DataAbstract3_Invk.pas"/>
+        <UnitName Value="DataAbstract3_Invk"/>
+      </Item8>
+      <Item9>
+        <Filename Value="DataAbstract4_Async.pas"/>
+        <UnitName Value="DataAbstract4_Async"/>
+      </Item9>
+      <Item10>
+        <Filename Value="DataAbstract4_Intf.pas"/>
+        <UnitName Value="DataAbstract4_Intf"/>
+      </Item10>
+      <Item11>
+        <Filename Value="DataAbstract4_Invk.pas"/>
+        <UnitName Value="DataAbstract4_Invk"/>
+      </Item11>
+      <Item12>
+        <Filename Value="DataAbstractService_Impl.pas"/>
+        <UnitName Value="DataAbstractService_Impl"/>
+      </Item12>
+      <Item13>
+        <Filename Value="DataAbstractService_Impl.lfm"/>
+        <Type Value="LFM"/>
+      </Item13>
+      <Item14>
+        <Filename Value="MultiDbLoginService_Impl.pas"/>
+        <UnitName Value="MultiDbLoginService_Impl"/>
+      </Item14>
+      <Item15>
+        <Filename Value="MultiDbLoginService_Impl.lfm"/>
+        <Type Value="LFM"/>
+      </Item15>
+      <Item16>
+        <Filename Value="SimpleLoginService_Impl.pas"/>
+        <UnitName Value="SimpleLoginService_Impl"/>
+      </Item16>
+      <Item17>
+        <Filename Value="SimpleLoginService_Impl.lfm"/>
+        <Type Value="LFM"/>
+      </Item17>
+      <Item18>
+        <Filename Value="uDAADOInterfaces.pas"/>
+        <UnitName Value="uDAADOInterfaces"/>
+      </Item18>
+      <Item19>
+        <Filename Value="uDABin2DataStreamer.pas"/>
+        <UnitName Value="uDABin2DataStreamer"/>
+      </Item19>
+      <Item20>
+        <Filename Value="uDABusinessProcessor.pas"/>
+        <UnitName Value="uDABusinessProcessor"/>
+      </Item20>
+      <Item21>
+        <Filename Value="uDAClasses.pas"/>
+        <UnitName Value="uDAClasses"/>
+      </Item21>
+      <Item22>
+        <Filename Value="uDAClientDataModule.pas"/>
+        <UnitName Value="uDAClientDataModule"/>
+      </Item22>
+      <Item23>
+        <Filename Value="uDADatasetWrapper.pas"/>
+        <UnitName Value="uDADatasetWrapper"/>
+      </Item23>
+      <Item24>
+        <Filename Value="uDADataStreamer.pas"/>
+        <UnitName Value="uDADataStreamer"/>
+      </Item24>
+      <Item25>
+        <Filename Value="uDADataTable.pas"/>
+        <UnitName Value="uDADataTable"/>
+      </Item25>
+      <Item26>
+        <Filename Value="uDADataTableReferenceCollection.pas"/>
+        <UnitName Value="uDADataTableReferenceCollection"/>
+      </Item26>
+      <Item27>
+        <Filename Value="uDADBSessionManager.pas"/>
+        <UnitName Value="uDADBSessionManager"/>
+      </Item27>
+      <Item28>
+        <Filename Value="uDADelta.pas"/>
+        <UnitName Value="uDADelta"/>
+      </Item28>
+      <Item29>
+        <Filename Value="uDADesigntimeCall.pas"/>
+        <UnitName Value="uDADesigntimeCall"/>
+      </Item29>
+      <Item30>
+        <Filename Value="uDADriverInfo.pas"/>
+        <UnitName Value="uDADriverInfo"/>
+      </Item30>
+      <Item31>
+        <Filename Value="uDADriverManager.pas"/>
+        <UnitName Value="uDADriverManager"/>
+      </Item31>
+      <Item32>
+        <Filename Value="uDAEngine.pas"/>
+        <UnitName Value="uDAEngine"/>
+      </Item32>
+      <Item33>
+        <Filename Value="uDAExceptions.pas"/>
+        <UnitName Value="uDAExceptions"/>
+      </Item33>
+      <Item34>
+        <Filename Value="uDAExpressionEvaluator.pas"/>
+        <UnitName Value="uDAExpressionEvaluator"/>
+      </Item34>
+      <Item35>
+        <Filename Value="uDAHelpers.pas"/>
+        <UnitName Value="uDAHelpers"/>
+      </Item35>
+      <Item36>
+        <Filename Value="uDAIBInterfaces.pas"/>
+        <UnitName Value="uDAIBInterfaces"/>
+      </Item36>
+      <Item37>
+        <Filename Value="uDAInterfaces.pas"/>
+        <UnitName Value="uDAInterfaces"/>
+      </Item37>
+      <Item38>
+        <Filename Value="uDAInterfacesEx.pas"/>
+        <UnitName Value="uDAInterfacesEx"/>
+      </Item38>
+      <Item39>
+        <Filename Value="uDAMacroProcessors.pas"/>
+        <UnitName Value="uDAMacroProcessors"/>
+      </Item39>
+      <Item40>
+        <Filename Value="uDAMacros.pas"/>
+        <UnitName Value="uDAMacros"/>
+      </Item40>
+      <Item41>
+        <Filename Value="uDAMemDataset.pas"/>
+        <UnitName Value="uDAMemDataset"/>
+      </Item41>
+      <Item42>
+        <Filename Value="uDAMemDataTable.pas"/>
+        <UnitName Value="uDAMemDataTable"/>
+      </Item42>
+      <Item43>
+        <Filename Value="uDAMySQLInterfaces.pas"/>
+        <UnitName Value="uDAMySQLInterfaces"/>
+      </Item43>
+      <Item44>
+        <Filename Value="uDAOracleInterfaces.pas"/>
+        <UnitName Value="uDAOracleInterfaces"/>
+      </Item44>
+      <Item45>
+        <Filename Value="uDAPleaseWaitForm.pas"/>
+        <UnitName Value="uDAPleaseWaitForm"/>
+      </Item45>
+      <Item46>
+        <Filename Value="uDAPleaseWaitForm.lfm"/>
+        <Type Value="LFM"/>
+      </Item46>
+      <Item47>
+        <Filename Value="uDAPoweredByDataAbstractButton.pas"/>
+        <UnitName Value="uDAPoweredByDataAbstractButton"/>
+      </Item47>
+      <Item48>
+        <Filename Value="uDAReconcileDialog.pas"/>
+        <UnitName Value="uDAReconcileDialog"/>
+      </Item48>
+      <Item49>
+        <Filename Value="uDAReconcileDialog.lfm"/>
+        <Type Value="LFM"/>
+      </Item49>
+      <Item50>
+        <Filename Value="uDAReconcileDialog.lrs"/>
+        <Type Value="LRS"/>
+      </Item50>
+      <Item51>
+        <Filename Value="uDAReconcileDialogDetails.pas"/>
+        <UnitName Value="uDAReconcileDialogDetails"/>
+      </Item51>
+      <Item52>
+        <Filename Value="uDAReconcileDialogDetails.lfm"/>
+        <Type Value="LFM"/>
+      </Item52>
+      <Item53>
+        <Filename Value="uDAReconcileDialogDetails.lrs"/>
+        <Type Value="LRS"/>
+      </Item53>
+      <Item54>
+        <Filename Value="uDARegExpr.pas"/>
+        <UnitName Value="uDARegExpr"/>
+      </Item54>
+      <Item55>
+        <Filename Value="uDARemoteDataAdapter.pas"/>
+        <UnitName Value="uDARemoteDataAdapter"/>
+      </Item55>
+      <Item56>
+        <Filename Value="uDARemoteDataAdapterRequests.pas"/>
+        <UnitName Value="uDARemoteDataAdapterRequests"/>
+      </Item56>
+      <Item57>
+        <Filename Value="uDARes.pas"/>
+        <UnitName Value="uDARes"/>
+      </Item57>
+      <Item58>
+        <Filename Value="uDAScriptingProvider.pas"/>
+        <UnitName Value="uDAScriptingProvider"/>
+      </Item58>
+      <Item59>
+        <Filename Value="uDAServerLog.pas"/>
+        <UnitName Value="uDAServerLog"/>
+      </Item59>
+      <Item60>
+        <Filename Value="uDASQL92Interfaces.pas"/>
+        <UnitName Value="uDASQL92Interfaces"/>
+      </Item60>
+      <Item61>
+        <Filename Value="uDASQL92QueryBuilder.pas"/>
+        <UnitName Value="uDASQL92QueryBuilder"/>
+      </Item61>
+      <Item62>
+        <Filename Value="uDASQLiteInterfaces.pas"/>
+        <UnitName Value="uDASQLiteInterfaces"/>
+      </Item62>
+      <Item63>
+        <Filename Value="uDASupportClasses.pas"/>
+        <UnitName Value="uDASupportClasses"/>
+      </Item63>
+      <Item64>
+        <Filename Value="uDAUtils.pas"/>
+        <UnitName Value="uDAUtils"/>
+      </Item64>
+      <Item65>
+        <Filename Value="uDAWhere.pas"/>
+        <UnitName Value="uDAWhere"/>
+      </Item65>
+      <Item66>
+        <Filename Value="uDAXMLAdapter.pas"/>
+        <UnitName Value="uDAXMLAdapter"/>
+      </Item66>
+      <Item67>
+        <Filename Value="uDAXMLUtils.pas"/>
+        <UnitName Value="uDAXMLUtils"/>
+      </Item67>
+      <Item68>
+        <Filename Value="uDAPostgresInterfaces.pas"/>
+        <UnitName Value="uDAPostgresInterfaces"/>
+      </Item68>
+      <Item69>
+        <Filename Value="uDABinAdapter.pas"/>
+        <UnitName Value="uDABinAdapter"/>
+      </Item69>
+      <Item70>
+        <Filename Value="uDADB2Interfaces.pas"/>
+        <UnitName Value="uDADB2Interfaces"/>
+      </Item70>
+      <Item71>
+        <Filename Value="uDASybaseInterfaces.pas"/>
+        <UnitName Value="uDASybaseInterfaces"/>
+      </Item71>
+      <Item72>
+        <Filename Value="MultiDbLoginServiceV5_Impl.lfm"/>
+        <Type Value="LFM"/>
+      </Item72>
+      <Item73>
+        <Filename Value="MultiDbLoginServiceV5_Impl.pas"/>
+        <UnitName Value="MultiDbLoginServiceV5_Impl"/>
+      </Item73>
+    </Files>
+    <Type Value="RunAndDesignTime"/>
+    <RequiredPkgs Count="2">
+      <Item1>
+        <PackageName Value="RemObjects_Core_Lazarus_Unix"/>
+      </Item1>
+      <Item2>
+        <PackageName Value="FCL"/>
+        <MinVersion Major="1" Valid="True"/>
+      </Item2>
+    </RequiredPkgs>
+    <UsageOptions>
+      <UnitPath Value="$(PkgOutDir)\"/>
+    </UsageOptions>
+    <PublishOptions>
+      <Version Value="2"/>
+      <DestinationDirectory Value="$(TestDir)\publishedpackage\"/>
+      <IgnoreBinaries Value="False"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_Lazarus_Windows.lpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_Lazarus_Windows.lpk
new file mode 100644
index 0000000..927b0b1
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_Lazarus_Windows.lpk	
@@ -0,0 +1,333 @@
+<?xml version="1.0"?>
+<CONFIG>
+  <Package Version="3">
+    <PathDelim Value="\"/>
+    <Name Value="DataAbstract_Core_Lazarus_Windows"/>
+    <CompilerOptions>
+      <Version Value="5"/>
+      <PathDelim Value="\"/>
+      <SearchPaths>
+        <UnitOutputDirectory Value="..\Dcu\Lazarus\$(TargetCPU)-$(TargetOS)"/>
+      </SearchPaths>
+      <Parsing>
+        <SyntaxOptions>
+          <D2Extensions Value="False"/>
+        </SyntaxOptions>
+      </Parsing>
+      <CodeGeneration>
+        <Generate Value="Faster"/>
+      </CodeGeneration>
+      <Other>
+        <CompilerPath Value="$(CompPath)"/>
+      </Other>
+    </CompilerOptions>
+    <Files Count="72">
+      <Item1>
+        <Filename Value="BaseLoginService_Impl.pas"/>
+        <UnitName Value="BaseLoginService_Impl"/>
+      </Item1>
+      <Item2>
+        <Filename Value="BaseLoginService_Impl.lfm"/>
+        <Type Value="LFM"/>
+      </Item2>
+      <Item3>
+        <Filename Value="DALoginService_Impl.pas"/>
+        <UnitName Value="DALoginService_Impl"/>
+      </Item3>
+      <Item4>
+        <Filename Value="DARemoteService_Impl.pas"/>
+        <UnitName Value="DARemoteService_Impl"/>
+      </Item4>
+      <Item5>
+        <Filename Value="DataAbstract_Core_Reg.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="DataAbstract_Core_Reg"/>
+      </Item5>
+      <Item6>
+        <Filename Value="DataAbstract3_Async.pas"/>
+        <UnitName Value="DataAbstract3_Async"/>
+      </Item6>
+      <Item7>
+        <Filename Value="DataAbstract3_Intf.pas"/>
+        <UnitName Value="DataAbstract3_Intf"/>
+      </Item7>
+      <Item8>
+        <Filename Value="DataAbstract3_Invk.pas"/>
+        <UnitName Value="DataAbstract3_Invk"/>
+      </Item8>
+      <Item9>
+        <Filename Value="DataAbstract4_Async.pas"/>
+        <UnitName Value="DataAbstract4_Async"/>
+      </Item9>
+      <Item10>
+        <Filename Value="DataAbstract4_Intf.pas"/>
+        <UnitName Value="DataAbstract4_Intf"/>
+      </Item10>
+      <Item11>
+        <Filename Value="DataAbstract4_Invk.pas"/>
+        <UnitName Value="DataAbstract4_Invk"/>
+      </Item11>
+      <Item12>
+        <Filename Value="DataAbstractService_Impl.pas"/>
+        <UnitName Value="DataAbstractService_Impl"/>
+      </Item12>
+      <Item13>
+        <Filename Value="DataAbstractService_Impl.lfm"/>
+        <Type Value="LFM"/>
+      </Item13>
+      <Item14>
+        <Filename Value="MultiDbLoginService_Impl.pas"/>
+        <UnitName Value="MultiDbLoginService_Impl"/>
+      </Item14>
+      <Item15>
+        <Filename Value="MultiDbLoginService_Impl.lfm"/>
+        <Type Value="LFM"/>
+      </Item15>
+      <Item16>
+        <Filename Value="SimpleLoginService_Impl.pas"/>
+        <UnitName Value="SimpleLoginService_Impl"/>
+      </Item16>
+      <Item17>
+        <Filename Value="SimpleLoginService_Impl.lfm"/>
+        <Type Value="LFM"/>
+      </Item17>
+      <Item18>
+        <Filename Value="uDAADOInterfaces.pas"/>
+        <UnitName Value="uDAADOInterfaces"/>
+      </Item18>
+      <Item19>
+        <Filename Value="uDABin2DataStreamer.pas"/>
+        <UnitName Value="uDABin2DataStreamer"/>
+      </Item19>
+      <Item20>
+        <Filename Value="uDABinAdapter.pas"/>
+        <UnitName Value="uDABinAdapter"/>
+      </Item20>
+      <Item21>
+        <Filename Value="uDABusinessProcessor.pas"/>
+        <UnitName Value="uDABusinessProcessor"/>
+      </Item21>
+      <Item22>
+        <Filename Value="uDAClasses.pas"/>
+        <UnitName Value="uDAClasses"/>
+      </Item22>
+      <Item23>
+        <Filename Value="uDAClientDataModule.pas"/>
+        <UnitName Value="uDAClientDataModule"/>
+      </Item23>
+      <Item24>
+        <Filename Value="uDADatasetWrapper.pas"/>
+        <UnitName Value="uDADatasetWrapper"/>
+      </Item24>
+      <Item25>
+        <Filename Value="uDADataStreamer.pas"/>
+        <UnitName Value="uDADataStreamer"/>
+      </Item25>
+      <Item26>
+        <Filename Value="uDADataTable.pas"/>
+        <UnitName Value="uDADataTable"/>
+      </Item26>
+      <Item27>
+        <Filename Value="uDADataTableReferenceCollection.pas"/>
+        <UnitName Value="uDADataTableReferenceCollection"/>
+      </Item27>
+      <Item28>
+        <Filename Value="uDADBSessionManager.pas"/>
+        <UnitName Value="uDADBSessionManager"/>
+      </Item28>
+      <Item29>
+        <Filename Value="uDADelta.pas"/>
+        <UnitName Value="uDADelta"/>
+      </Item29>
+      <Item30>
+        <Filename Value="uDADesigntimeCall.pas"/>
+        <UnitName Value="uDADesigntimeCall"/>
+      </Item30>
+      <Item31>
+        <Filename Value="uDADriverInfo.pas"/>
+        <UnitName Value="uDADriverInfo"/>
+      </Item31>
+      <Item32>
+        <Filename Value="uDADriverManager.pas"/>
+        <UnitName Value="uDADriverManager"/>
+      </Item32>
+      <Item33>
+        <Filename Value="uDAEngine.pas"/>
+        <UnitName Value="uDAEngine"/>
+      </Item33>
+      <Item34>
+        <Filename Value="uDAExceptions.pas"/>
+        <UnitName Value="uDAExceptions"/>
+      </Item34>
+      <Item35>
+        <Filename Value="uDAExpressionEvaluator.pas"/>
+        <UnitName Value="uDAExpressionEvaluator"/>
+      </Item35>
+      <Item36>
+        <Filename Value="uDAHelpers.pas"/>
+        <UnitName Value="uDAHelpers"/>
+      </Item36>
+      <Item37>
+        <Filename Value="uDAIBInterfaces.pas"/>
+        <UnitName Value="uDAIBInterfaces"/>
+      </Item37>
+      <Item38>
+        <Filename Value="uDAInterfaces.pas"/>
+        <UnitName Value="uDAInterfaces"/>
+      </Item38>
+      <Item39>
+        <Filename Value="uDAInterfacesEx.pas"/>
+        <UnitName Value="uDAInterfacesEx"/>
+      </Item39>
+      <Item40>
+        <Filename Value="uDAMacroProcessors.pas"/>
+        <UnitName Value="uDAMacroProcessors"/>
+      </Item40>
+      <Item41>
+        <Filename Value="uDAMacros.pas"/>
+        <UnitName Value="uDAMacros"/>
+      </Item41>
+      <Item42>
+        <Filename Value="uDAMemDataset.pas"/>
+        <UnitName Value="uDAMemDataset"/>
+      </Item42>
+      <Item43>
+        <Filename Value="uDAMemDataTable.pas"/>
+        <UnitName Value="uDAMemDataTable"/>
+      </Item43>
+      <Item44>
+        <Filename Value="uDAMySQLInterfaces.pas"/>
+        <UnitName Value="uDAMySQLInterfaces"/>
+      </Item44>
+      <Item45>
+        <Filename Value="uDAOracleInterfaces.pas"/>
+        <UnitName Value="uDAOracleInterfaces"/>
+      </Item45>
+      <Item46>
+        <Filename Value="uDAPleaseWaitForm.pas"/>
+        <UnitName Value="uDAPleaseWaitForm"/>
+      </Item46>
+      <Item47>
+        <Filename Value="uDAPleaseWaitForm.lfm"/>
+        <Type Value="LFM"/>
+      </Item47>
+      <Item48>
+        <Filename Value="uDAPoweredByDataAbstractButton.pas"/>
+        <UnitName Value="uDAPoweredByDataAbstractButton"/>
+      </Item48>
+      <Item49>
+        <Filename Value="uDAReconcileDialog.pas"/>
+        <UnitName Value="uDAReconcileDialog"/>
+      </Item49>
+      <Item50>
+        <Filename Value="uDAReconcileDialog.lfm"/>
+        <Type Value="LFM"/>
+      </Item50>
+      <Item51>
+        <Filename Value="uDAReconcileDialog.lrs"/>
+        <Type Value="LRS"/>
+      </Item51>
+      <Item52>
+        <Filename Value="uDAReconcileDialogDetails.pas"/>
+        <UnitName Value="uDAReconcileDialogDetails"/>
+      </Item52>
+      <Item53>
+        <Filename Value="uDAReconcileDialogDetails.lfm"/>
+        <Type Value="LFM"/>
+      </Item53>
+      <Item54>
+        <Filename Value="uDAReconcileDialogDetails.lrs"/>
+        <Type Value="LRS"/>
+      </Item54>
+      <Item55>
+        <Filename Value="uDARegExpr.pas"/>
+        <UnitName Value="uDARegExpr"/>
+      </Item55>
+      <Item56>
+        <Filename Value="uDARemoteDataAdapter.pas"/>
+        <UnitName Value="uDARemoteDataAdapter"/>
+      </Item56>
+      <Item57>
+        <Filename Value="uDARemoteDataAdapterRequests.pas"/>
+        <UnitName Value="uDARemoteDataAdapterRequests"/>
+      </Item57>
+      <Item58>
+        <Filename Value="uDARes.pas"/>
+        <UnitName Value="uDARes"/>
+      </Item58>
+      <Item59>
+        <Filename Value="uDAScriptingProvider.pas"/>
+        <UnitName Value="uDAScriptingProvider"/>
+      </Item59>
+      <Item60>
+        <Filename Value="uDAServerLog.pas"/>
+        <UnitName Value="uDAServerLog"/>
+      </Item60>
+      <Item61>
+        <Filename Value="uDASQL92Interfaces.pas"/>
+        <UnitName Value="uDASQL92Interfaces"/>
+      </Item61>
+      <Item62>
+        <Filename Value="uDASQL92QueryBuilder.pas"/>
+        <UnitName Value="uDASQL92QueryBuilder"/>
+      </Item62>
+      <Item63>
+        <Filename Value="uDASQLiteInterfaces.pas"/>
+        <UnitName Value="uDASQLiteInterfaces"/>
+      </Item63>
+      <Item64>
+        <Filename Value="uDASupportClasses.pas"/>
+        <UnitName Value="uDASupportClasses"/>
+      </Item64>
+      <Item65>
+        <Filename Value="uDAUtils.pas"/>
+        <UnitName Value="uDAUtils"/>
+      </Item65>
+      <Item66>
+        <Filename Value="uDAWhere.pas"/>
+        <UnitName Value="uDAWhere"/>
+      </Item66>
+      <Item67>
+        <Filename Value="uDAXMLAdapter.pas"/>
+        <UnitName Value="uDAXMLAdapter"/>
+      </Item67>
+      <Item68>
+        <Filename Value="uDAXMLUtils.pas"/>
+        <UnitName Value="uDAXMLUtils"/>
+      </Item68>
+      <Item69>
+        <Filename Value="uDAPostgresInterfaces.pas"/>
+        <UnitName Value="uDAPostgresInterfaces"/>
+      </Item69>
+      <Item70>
+        <Filename Value="uDADB2Interfaces.pas"/>
+        <UnitName Value="uDADB2Interfaces"/>
+      </Item70>
+      <Item71>
+        <Filename Value="uDASybaseInterfaces.pas"/>
+        <UnitName Value="uDASybaseInterfaces"/>
+      </Item71>
+      <Item72>
+        <Filename Value="MultiDbLoginServiceV5_Impl.pas"/>
+        <UnitName Value="MultiDbLoginServiceV5_Impl"/>
+      </Item72>
+    </Files>
+    <Type Value="RunAndDesignTime"/>
+    <RequiredPkgs Count="2">
+      <Item1>
+        <PackageName Value="RemObjects_Core_Lazarus_Windows"/>
+      </Item1>
+      <Item2>
+        <PackageName Value="FCL"/>
+        <MinVersion Major="1" Valid="True"/>
+      </Item2>
+    </RequiredPkgs>
+    <UsageOptions>
+      <UnitPath Value="$(PkgOutDir)"/>
+    </UsageOptions>
+    <PublishOptions>
+      <Version Value="2"/>
+      <IgnoreBinaries Value="False"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_Reg.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_Reg.pas
new file mode 100644
index 0000000..991a562
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Core_Reg.pas	
@@ -0,0 +1,81 @@
+unit DataAbstract_Core_Reg;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+procedure Register;
+
+implementation
+
+uses
+  {$IFDEF FPC}LResources,{$ENDIF}
+  Classes,
+  uDARes, uDAInterfaces, uDAClasses, uDADriverManager,
+  uDABinAdapter, uDAXMLAdapter, uDADataTable, uDADesigntimeCall,uDABin2DataStreamer,
+  {$IFNDEF FPC}uDACDSDataTable,uDADatasetProvider,uDACache,{$ENDIF FPC} 
+  uDARemoteDataAdapter, 
+  {$IFDEF USE_LOCALDATAADAPTER}uDALocalDataAdapter,{$ENDIF} 
+  {$IFDEF MSWINDOWS}
+  {$IFNDEF FPC}
+  uDAADODataTable,
+  {$ENDIF}
+  {$ENDIF MSWINDOWS}
+  uDABusinessProcessor,
+  uDADBSessionManager,
+  uDAServerLog, 
+  uDAMemDataTable,
+  uDARemoteCommand,  
+  uDAPoweredByDataAbstractButton;
+
+{$IFNDEF FPC}
+  {$R DataAbstract_Core_Glyphs.res}
+{$ENDIF}
+  
+procedure Register;
+begin
+  RegisterComponents(DAPalettePageName,
+    [TDAPoweredByDataAbstractButton,
+      TDADriverManager,
+      TDAConnectionManager,
+      TDASchema,
+      TDADiagrams,
+      TDADataDictionary,
+      TDABin2DataStreamer,
+      TDAXMLDataStreamer,  
+      TDARemoteDataAdapter, {$IFDEF USE_LOCALDATAADAPTER}TDALocalDataAdapter,{$ENDIF}
+      {$IFNDEF FPC}
+      TDADatasetProvider,
+      {$ENDIF FPC}
+      TDAMemDataTable,
+      TDABusinessProcessor,
+      TDADesigntimeCall,
+      TDADataSource,
+      TDARemoteCommand,
+      TDAServerLog]);
+{$WARN SYMBOL_DEPRECATED OFF}
+  RegisterComponents('RemObjects Data Abstract (Legacy)', [TDABinAdapter,TDABinDataStreamer
+    {$IFNDEF FPC}
+      ,TDACDSDataTable, TDAADODataTable,
+      TDAXMLAdapter,TDACache{$ENDIF}]);
+{$WARN SYMBOL_DEPRECATED ON}      
+  RegisterComponents('RemObjects SDK', [TDADBSessionManager]);
+end;
+
+{$IFDEF FPC}
+initialization
+  {$I DataAbstract_Core_Glyphs.lrs}
+{$ENDIF}
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D10.bdsproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D10.bdsproj
new file mode 100644
index 0000000..81d84c2
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D10.bdsproj	
@@ -0,0 +1,176 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality" Type="String">Delphi.Personality</Option>
+			<Option Name="ProjectType" Type="String"></Option>
+			<Option Name="Version" Type="String">1.0</Option>
+			<Option Name="GUID" Type="String">{20E037D4-6EF6-4096-ACA5-5BA32C54E59D}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource" Type="String">DataAbstract_Scripting_D10.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version" Type="String">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A" Type="Integer">8</Compiler>
+			<Compiler Name="B" Type="Integer">0</Compiler>
+			<Compiler Name="C" Type="Integer">1</Compiler>
+			<Compiler Name="D" Type="Integer">1</Compiler>
+			<Compiler Name="E" Type="Integer">0</Compiler>
+			<Compiler Name="F" Type="Integer">0</Compiler>
+			<Compiler Name="G" Type="Integer">1</Compiler>
+			<Compiler Name="H" Type="Integer">1</Compiler>
+			<Compiler Name="I" Type="Integer">1</Compiler>
+			<Compiler Name="J" Type="Integer">0</Compiler>
+			<Compiler Name="K" Type="Integer">0</Compiler>
+			<Compiler Name="L" Type="Integer">1</Compiler>
+			<Compiler Name="M" Type="Integer">0</Compiler>
+			<Compiler Name="N" Type="Integer">1</Compiler>
+			<Compiler Name="O" Type="Integer">1</Compiler>
+			<Compiler Name="P" Type="Integer">1</Compiler>
+			<Compiler Name="Q" Type="Integer">0</Compiler>
+			<Compiler Name="R" Type="Integer">0</Compiler>
+			<Compiler Name="S" Type="Integer">0</Compiler>
+			<Compiler Name="T" Type="Integer">0</Compiler>
+			<Compiler Name="U" Type="Integer">0</Compiler>
+			<Compiler Name="V" Type="Integer">1</Compiler>
+			<Compiler Name="W" Type="Integer">1</Compiler>
+			<Compiler Name="X" Type="Integer">1</Compiler>
+			<Compiler Name="Y" Type="Integer">1</Compiler>
+			<Compiler Name="Z" Type="Integer">1</Compiler>
+			<Compiler Name="ShowHints" Type="Boolean">True</Compiler>
+			<Compiler Name="ShowWarnings" Type="Boolean">True</Compiler>
+			<Compiler Name="UnitAliases" Type="String">WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;</Compiler>
+			<Compiler Name="NamespacePrefix" Type="String"></Compiler>
+			<Compiler Name="GenerateDocumentation" Type="Boolean">False</Compiler>
+			<Compiler Name="DefaultNamespace" Type="String"></Compiler>
+			<Compiler Name="SymbolDeprecated" Type="Boolean">False</Compiler>
+			<Compiler Name="SymbolLibrary" Type="Boolean">False</Compiler>
+			<Compiler Name="SymbolPlatform" Type="Boolean">False</Compiler>
+			<Compiler Name="SymbolExperimental" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitLibrary" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitPlatform" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitDeprecated" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitExperimental" Type="Boolean">False</Compiler>
+			<Compiler Name="HResultCompat" Type="Boolean">True</Compiler>
+			<Compiler Name="HidingMember" Type="Boolean">True</Compiler>
+			<Compiler Name="HiddenVirtual" Type="Boolean">True</Compiler>
+			<Compiler Name="Garbage" Type="Boolean">True</Compiler>
+			<Compiler Name="BoundsError" Type="Boolean">True</Compiler>
+			<Compiler Name="ZeroNilCompat" Type="Boolean">True</Compiler>
+			<Compiler Name="StringConstTruncated" Type="Boolean">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar" Type="Boolean">True</Compiler>
+			<Compiler Name="TypedConstVarPar" Type="Boolean">True</Compiler>
+			<Compiler Name="AsgToTypedConst" Type="Boolean">True</Compiler>
+			<Compiler Name="CaseLabelRange" Type="Boolean">True</Compiler>
+			<Compiler Name="ForVariable" Type="Boolean">True</Compiler>
+			<Compiler Name="ConstructingAbstract" Type="Boolean">True</Compiler>
+			<Compiler Name="ComparisonFalse" Type="Boolean">True</Compiler>
+			<Compiler Name="ComparisonTrue" Type="Boolean">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned" Type="Boolean">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned" Type="Boolean">True</Compiler>
+			<Compiler Name="UnsupportedConstruct" Type="Boolean">True</Compiler>
+			<Compiler Name="FileOpen" Type="Boolean">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc" Type="Boolean">True</Compiler>
+			<Compiler Name="BadGlobalSymbol" Type="Boolean">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor" Type="Boolean">True</Compiler>
+			<Compiler Name="InvalidDirective" Type="Boolean">True</Compiler>
+			<Compiler Name="PackageNoLink" Type="Boolean">True</Compiler>
+			<Compiler Name="PackageThreadVar" Type="Boolean">True</Compiler>
+			<Compiler Name="ImplicitImport" Type="Boolean">True</Compiler>
+			<Compiler Name="HPPEMITIgnored" Type="Boolean">True</Compiler>
+			<Compiler Name="NoRetVal" Type="Boolean">True</Compiler>
+			<Compiler Name="UseBeforeDef" Type="Boolean">True</Compiler>
+			<Compiler Name="ForLoopVarUndef" Type="Boolean">True</Compiler>
+			<Compiler Name="UnitNameMismatch" Type="Boolean">True</Compiler>
+			<Compiler Name="NoCFGFileFound" Type="Boolean">True</Compiler>
+			<Compiler Name="MessageDirective" Type="Boolean">True</Compiler>
+			<Compiler Name="ImplicitVariants" Type="Boolean">True</Compiler>
+			<Compiler Name="UnicodeToLocale" Type="Boolean">True</Compiler>
+			<Compiler Name="LocaleToUnicode" Type="Boolean">True</Compiler>
+			<Compiler Name="ImagebaseMultiple" Type="Boolean">True</Compiler>
+			<Compiler Name="SuspiciousTypecast" Type="Boolean">True</Compiler>
+			<Compiler Name="PrivatePropAccessor" Type="Boolean">True</Compiler>
+			<Compiler Name="UnsafeType" Type="Boolean">False</Compiler>
+			<Compiler Name="UnsafeCode" Type="Boolean">False</Compiler>
+			<Compiler Name="UnsafeCast" Type="Boolean">False</Compiler>
+			<Compiler Name="OptionTruncated" Type="Boolean">True</Compiler>
+			<Compiler Name="WideCharReduced" Type="Boolean">True</Compiler>
+			<Compiler Name="DuplicatesIgnored" Type="Boolean">True</Compiler>  <Compiler Name="UnitInitSeq">True</Compiler>
+      <Compiler Name="LocalPInvoke">True</Compiler>
+      <Compiler Name="CodePage"></Compiler>
+    </Compiler>
+		<Linker>
+			<Linker Name="MapFile" Type="Integer">0</Linker>
+			<Linker Name="OutputObjs" Type="Integer">0</Linker>
+			<Linker Name="ConsoleApp" Type="Integer">1</Linker>
+			<Linker Name="DebugInfo" Type="Boolean">False</Linker>
+			<Linker Name="RemoteSymbols" Type="Boolean">False</Linker>
+			<Linker Name="GenerateDRC" Type="Boolean">False</Linker>
+			<Linker Name="MinStackSize" Type="Integer">16384</Linker>
+			<Linker Name="MaxStackSize" Type="Integer">1048576</Linker>
+			<Linker Name="ImageBase" Type="Integer">4194304</Linker>
+			<Linker Name="ExeDescription" Type="String">RemObjects Data Abstract - Scripting Integration Library</Linker>  <Linker Name="GenerateHpps">False</Linker>
+    </Linker>
+		<Directories>
+			<Directories Name="OutputDir" Type="String"></Directories>
+			<Directories Name="UnitOutputDir" Type="String">..\Dcu\D10</Directories>
+			<Directories Name="PackageDLLOutputDir" Type="String">..\Dcu\D10</Directories>
+			<Directories Name="PackageDCPOutputDir" Type="String">..\Dcu\D10</Directories>
+			<Directories Name="SearchPath" Type="String">..\Dcu\D10;..\..\Pascal Script\Dcu\D10</Directories>
+			<Directories Name="Packages" Type="String"></Directories>
+			<Directories Name="Conditionals" Type="String"></Directories>
+			<Directories Name="DebugSourceDirs" Type="String"></Directories>
+			<Directories Name="UsePackages" Type="Boolean">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams" Type="String"></Parameters>
+			<Parameters Name="HostApplication" Type="String"></Parameters>
+			<Parameters Name="Launcher" Type="String"></Parameters>
+			<Parameters Name="UseLauncher" Type="Boolean">False</Parameters>
+			<Parameters Name="DebugCWD" Type="String"></Parameters>
+			<Parameters Name="RemoteHost" Type="String"></Parameters>
+			<Parameters Name="RemotePath" Type="String"></Parameters>
+			<Parameters Name="RemoteLauncher" Type="String"></Parameters>
+			<Parameters Name="RemoteCWD" Type="String"></Parameters>
+			<Parameters Name="RemoteDebug" Type="Boolean">False</Parameters>  <Parameters Name="Debug Symbols Search Path"></Parameters>
+      <Parameters Name="LoadAllSymbols">True</Parameters>
+      <Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+    </Parameters>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+			<VersionInfo Name="MajorVer">3</VersionInfo>
+			<VersionInfo Name="MinorVer">0</VersionInfo>
+			<VersionInfo Name="Release">1</VersionInfo>
+			<VersionInfo Name="Build">361</VersionInfo>
+			<VersionInfo Name="Debug">False</VersionInfo>
+			<VersionInfo Name="PreRelease">False</VersionInfo>
+			<VersionInfo Name="Special">False</VersionInfo>
+			<VersionInfo Name="Private">False</VersionInfo>
+			<VersionInfo Name="DLL">False</VersionInfo>
+			<VersionInfo Name="Locale">1033</VersionInfo>
+			<VersionInfo Name="CodePage">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+		</VersionInfoKeys>
+		<Language>
+			<Language Name="ActiveLang" Type="String"></Language>
+			<Language Name="ProjectLang" Type="String">$00000000</Language>
+			<Language Name="RootDir" Type="String"></Language>
+		</Language>
+	</Delphi.Personality>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D10.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D10.cfg
new file mode 100644
index 0000000..6d65c2e
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D10.cfg	
@@ -0,0 +1,52 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N0"..\Dcu\D10"
+-LE"..\Dcu\D10"
+-LN"..\Dcu\D10"
+-U"..\Dcu\D10;..\..\Pascal Script\Dcu\D10"
+-O"..\Dcu\D10;..\..\Pascal Script\Dcu\D10"
+-I"..\Dcu\D10;..\..\Pascal Script\Dcu\D10"
+-R"..\Dcu\D10;..\..\Pascal Script\Dcu\D10"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-SYMBOL_EXPERIMENTAL
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNIT_EXPERIMENTAL
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D10.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D10.dpk
new file mode 100644
index 0000000..14457eb
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D10.dpk	
@@ -0,0 +1,41 @@
+package DataAbstract_Scripting_D10;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - Scripting Integration Library'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  dbrtl,
+  vcl,
+  RemObjects_Core_D10,
+  DataAbstract_Core_D10,
+  PascalScript_Core_D10;
+
+contains
+  uDAPascalScript in 'uDAPascalScript.pas',
+  uDAPSScriptingProvider in 'uDAPSScriptingProvider.pas',
+  DataAbstract_Scripting_Reg in 'DataAbstract_Scripting_Reg.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D10.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D10.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D10.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D11.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D11.dpk
new file mode 100644
index 0000000..93e1fa3
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D11.dpk	
@@ -0,0 +1,41 @@
+package DataAbstract_Scripting_D11;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - Scripting Integration Library'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  dbrtl,
+  vcl,
+  RemObjects_Core_D11,
+  DataAbstract_Core_D11,
+  PascalScript_Core_D11;
+
+contains
+  uDAPascalScript in 'uDAPascalScript.pas',
+  uDAPSScriptingProvider in 'uDAPSScriptingProvider.pas',
+  DataAbstract_Scripting_Reg in 'DataAbstract_Scripting_Reg.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D11.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D11.dproj
new file mode 100644
index 0000000..d240db5
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D11.dproj	
@@ -0,0 +1,78 @@
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{3fb27763-9440-44c3-bb51-17969172e8fe}</ProjectGuid>
+    <MainSource>DataAbstract_Scripting_D11.dpk</MainSource>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+    <DCC_DependencyCheckOutputName>..\Dcu\D11\DataAbstract_Scripting_D11.bpl</DCC_DependencyCheckOutputName>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DebugInformation>False</DCC_DebugInformation>
+    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+    <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+    <DCC_DcuOutput>..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\Dcu\D11;..\..\Pascal Script\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\Dcu\D11;..\..\Pascal Script\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\Dcu\D11;..\..\Pascal Script\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\Dcu\D11;..\..\Pascal Script\Dcu\D11</DCC_IncludePath>
+    <DCC_Define>RELEASE</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_SYMBOL_EXPERIMENTAL>False</DCC_SYMBOL_EXPERIMENTAL>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+    <DCC_UNIT_EXPERIMENTAL>False</DCC_UNIT_EXPERIMENTAL>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+    <DCC_DcuOutput>..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\Dcu\D11;..\..\Pascal Script for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\Dcu\D11;..\..\Pascal Script for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\Dcu\D11;..\..\Pascal Script for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\Dcu\D11;..\..\Pascal Script for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_SYMBOL_EXPERIMENTAL>False</DCC_SYMBOL_EXPERIMENTAL>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+    <DCC_UNIT_EXPERIMENTAL>False</DCC_UNIT_EXPERIMENTAL>
+  </PropertyGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Delphi.Personality</Borland.Personality>
+    <Borland.ProjectType>Package</Borland.ProjectType>
+    <BorlandProject>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">RemObjects Data Abstract - Scripting Integration Library</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">3</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">1</VersionInfo><VersionInfo Name="Build">361</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">DataAbstract_Scripting_D11.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
+  <ItemGroup>
+    <DelphiCompile Include="DataAbstract_Scripting_D11.dpk">
+      <MainSource>MainSource</MainSource>
+    </DelphiCompile>
+    <DCCReference Include="..\..\RemObjects SDK for Delphi\Source\DataSnap\DataAbstract_Core_D1.dcp" />
+    <DCCReference Include="..\..\RemObjects SDK for Delphi\Source\DataSnap\DataAbstract_Core_D11.dcp" />
+    <DCCReference Include="..\..\RemObjects SDK for Delphi\Source\DataSnap\PascalScript_Core_D1.dcp" />
+    <DCCReference Include="..\..\RemObjects SDK for Delphi\Source\DataSnap\PascalScript_Core_D11.dcp" />
+    <DCCReference Include="..\..\RemObjects SDK for Delphi\Source\DataSnap\RemObjects_Core_D1.dcp" />
+    <DCCReference Include="..\..\RemObjects SDK for Delphi\Source\DataSnap\RemObjects_Core_D11.dcp" />
+    <DCCReference Include="..\..\RemObjects SDK for Delphi\Source\DataSnap\RemObjects_Core_D111.dcp" />
+    <DCCReference Include="DataAbstract_Scripting_Reg.pas" />
+    <DCCReference Include="uDAPascalScript.pas" />
+    <DCCReference Include="uDAPSScriptingProvider.pas" />
+  </ItemGroup>
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D11.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D11.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D11.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D12.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D12.dpk
new file mode 100644
index 0000000..aa68349
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D12.dpk	
@@ -0,0 +1,40 @@
+package DataAbstract_Scripting_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - Scripting Integration Library'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  RemObjects_Core_D12,
+  DataAbstract_Core_D12,
+  PascalScript_Core_D12;
+
+contains
+  uDAPascalScript in 'uDAPascalScript.pas',
+  uDAPSScriptingProvider in 'uDAPSScriptingProvider.pas',
+  DataAbstract_Scripting_Reg in 'DataAbstract_Scripting_Reg.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D12.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D12.dproj
new file mode 100644
index 0000000..a58aede
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D12.dproj	
@@ -0,0 +1,90 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{3fb27763-9440-44c3-bb51-17969172e8fe}</ProjectGuid>
+			<MainSource>DataAbstract_Scripting_D12.dpk</MainSource>
+			<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+			<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+			<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+			<DCC_DependencyCheckOutputName>..\Dcu\D11\DataAbstract_Scripting_D11.bpl</DCC_DependencyCheckOutputName>
+			<ProjectVersion>11.1</ProjectVersion>
+			<Config Condition="'$(Config)'==''">Base</Config>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base)'!=''">
+			<DCC_SymbolReferenceInfo>1</DCC_SymbolReferenceInfo>
+			<DCC_DcuOutput>..\Dcu\D12</DCC_DcuOutput>
+			<DCC_BplOutput>..\Dcu\D12</DCC_BplOutput>
+			<DCC_UnitSearchPath>..\Dcu\D12;..\..\Pascal Script for Delphi\Dcu\D12;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+			<DCC_DcpOutput>..\Dcu\D12</DCC_DcpOutput>
+			<GenDll>true</GenDll>
+			<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+			<GenPackage>true</GenPackage>
+			<DCC_GenerateStackFrames>true</DCC_GenerateStackFrames>
+			<DesignOnlyPackage>false</DesignOnlyPackage>
+			<DCC_ImageBase>00400000</DCC_ImageBase>
+			<DCC_DependencyCheckOutputName>..\Dcu\D12\DataAbstract_Scripting_D12.bpl</DCC_DependencyCheckOutputName>
+			<DCC_Description>RemObjects Data Abstract - Scripting Integration Library</DCC_Description>
+		</PropertyGroup>
+		<ItemGroup>
+			<DelphiCompile Include="DataAbstract_Scripting_D12.dpk">
+				<MainSource>MainSource</MainSource>
+			</DelphiCompile>
+			<DCCReference Include="rtl.dcp"/>
+			<DCCReference Include="vcl.dcp"/>
+			<DCCReference Include="RemObjects_Core_D12.dcp"/>
+			<DCCReference Include="DataAbstract_Core_D12.dcp"/>
+			<DCCReference Include="PascalScript_Core_D12.dcp"/>
+			<DCCReference Include="uDAPascalScript.pas"/>
+			<DCCReference Include="uDAPSScriptingProvider.pas"/>
+			<DCCReference Include="DataAbstract_Scripting_Reg.pas"/>
+			<BuildConfiguration Include="Base">
+				<Key>Base</Key>
+			</BuildConfiguration>
+		</ItemGroup>
+		<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+		<ProjectExtensions>
+			<Borland.Personality>Delphi.Personality.12</Borland.Personality>
+			<Borland.ProjectType>Package</Borland.ProjectType>
+			<BorlandProject>
+				<Delphi.Personality>
+					<Parameters>
+						<Parameters Name="UseLauncher">False</Parameters>
+						<Parameters Name="LoadAllSymbols">True</Parameters>
+						<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+					</Parameters>
+					<VersionInfo>
+						<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+						<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+						<VersionInfo Name="MajorVer">3</VersionInfo>
+						<VersionInfo Name="MinorVer">0</VersionInfo>
+						<VersionInfo Name="Release">1</VersionInfo>
+						<VersionInfo Name="Build">361</VersionInfo>
+						<VersionInfo Name="Debug">False</VersionInfo>
+						<VersionInfo Name="PreRelease">False</VersionInfo>
+						<VersionInfo Name="Special">False</VersionInfo>
+						<VersionInfo Name="Private">False</VersionInfo>
+						<VersionInfo Name="DLL">False</VersionInfo>
+						<VersionInfo Name="Locale">1033</VersionInfo>
+						<VersionInfo Name="CodePage">1252</VersionInfo>
+					</VersionInfo>
+					<VersionInfoKeys>
+						<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="FileDescription"/>
+						<VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys>
+						<VersionInfoKeys Name="InternalName"/>
+						<VersionInfoKeys Name="LegalCopyright"/>
+						<VersionInfoKeys Name="LegalTrademarks"/>
+						<VersionInfoKeys Name="OriginalFilename"/>
+						<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+						<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+					</VersionInfoKeys>
+					<Source>
+						<Source Name="MainSource">DataAbstract_Scripting_D12.dpk</Source>
+					</Source>
+				</Delphi.Personality>
+			</BorlandProject>
+			<ProjectFileVersion>12</ProjectFileVersion>
+		</ProjectExtensions>
+	</Project>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D12.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D12.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D12.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D6.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D6.cfg
new file mode 100644
index 0000000..d94514b
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D6.cfg	
@@ -0,0 +1,41 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\Dcu\D6"
+-LE"..\Dcu\D6"
+-LN"..\Dcu\D6"
+-U"..\Dcu\D6;..\..\RemObjects SDK for Delphi\Dcu\D6"
+-O"..\Dcu\D6;..\..\RemObjects SDK for Delphi\Dcu\D6"
+-I"..\Dcu\D6;..\..\RemObjects SDK for Delphi\Dcu\D6"
+-R"..\Dcu\D6;..\..\RemObjects SDK for Delphi\Dcu\D6"
+-Z
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D6.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D6.dof
new file mode 100644
index 0000000..75f52a1
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D6.dof	
@@ -0,0 +1,76 @@
+[FileVersion]
+Version=6.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitDeprecated=0
+UnitLibrary=0
+UnitPlatform=0
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects Data Abstract - Scripting Integration Library
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\Dcu\D6
+PackageDLLOutputDir=..\Dcu\D6
+PackageDCPOutputDir=..\Dcu\D6
+SearchPath=..\Dcu\D6;..\..\RemObjects SDK for Delphi\Dcu\D6
+Packages=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=3.0.0.280
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D6.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D6.dpk
new file mode 100644
index 0000000..4c39879
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D6.dpk	
@@ -0,0 +1,41 @@
+package DataAbstract_Scripting_D6;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - Scripting Integration Library'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  dbrtl,
+  vcl,
+  RemObjects_Core_D6,
+  DataAbstract_Core_D6,
+  PascalScript_Core_D6;
+
+contains
+  uDAPascalScript in 'uDAPascalScript.pas',
+  uDAPSScriptingProvider in 'uDAPSScriptingProvider.pas',
+  DataAbstract_Scripting_Reg in 'DataAbstract_Scripting_Reg.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D6.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D6.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D6.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D7.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D7.cfg
new file mode 100644
index 0000000..b26eab1
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D7.cfg	
@@ -0,0 +1,46 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\Dcu\D7"
+-LE"..\Dcu\D7"
+-LN"..\Dcu\D7"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D7.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D7.dof
new file mode 100644
index 0000000..97dc0fb
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D7.dof	
@@ -0,0 +1,117 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects Data Abstract - Scripting Integration Library
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\Dcu\D7
+PackageDLLOutputDir=..\Dcu\D7
+PackageDCPOutputDir=..\Dcu\D7
+SearchPath=
+Packages=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=ROServiceTester
+FileVersion=3.0.0.257
+InternalName=ROServiceTester
+LegalCopyright=Copyright RemObjects Software 2002
+LegalTrademarks=RemObjects Software 2002
+OriginalFilename=ROServiceTester.exe
+ProductName=RemObjects SDK
+ProductVersion=3.0.0.0
+Compile Date=Sunday, March 21, 2004 5:55 PM
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D7.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D7.dpk
new file mode 100644
index 0000000..34f8513
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D7.dpk	
@@ -0,0 +1,43 @@
+package DataAbstract_Scripting_D7;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - Scripting Integration Library'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  dbrtl,
+  vcl,
+  RemObjects_Core_D7,
+  DataAbstract_Core_D7,
+  PascalScript_Core_D7,
+  dsnap,
+  adortl;
+
+contains
+  uDAPascalScript in 'uDAPascalScript.pas',
+  uDAPSScriptingProvider in 'uDAPSScriptingProvider.pas',
+  DataAbstract_Scripting_Reg in 'DataAbstract_Scripting_Reg.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D7.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D7.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_D7.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_Glyphs.lrs b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_Glyphs.lrs
new file mode 100644
index 0000000..4501711
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_Glyphs.lrs	
@@ -0,0 +1,78 @@
+LazarusResources.Add('TDAPSScriptingProvider','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@'#0#0'@'#0#0'@'#0#0
+  +'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0#255#0
+  +#255#1'>'#3#1'='#3#1'<'#3#1';'#3#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0
+  +#0#128#0#0#128#0#0#128#0#0#128#0#0'@'#0#0#1'='#3#3#151#11#3#137#10#3#128#9#2
+  +'z'#9#1'.'#2#1'4'#3#255#0#255#255#0#255#255#0#255#128#0#0#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#128#0#0'@'#0#0#4#158#15#3#151#11#3#149
+  +#11#3#149#11#3#145#10#3#132#10#2't'#9#1'-'#2'111'#255#0#255#128#0#0#255#255
+  +#255#128#0#0#128#0#0#128#0#0#255#255#255#255#255#255#128#0#0#255#255#255#255
+  +#255#255#128#0#0#255#255#255#128#0#0'@'#0#0#7#163#24#5#160#16#3#158#12#3#158
+  +#12#3#158#12#3#158#12#3#151#11#3'~'#9#1'.'#2#255#0#255#128#0#0#255#255#255
+  +#128#0#0#255#255#255#255#255#255#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0
+  +#128#0#0#255#255#255#128#0#0'@'#0#0#12#166'#'#8#163#26#255#255#255#3#158#12#3
+  +#158#12#3#158#12#3#158#12#3#154#12#1'0'#3#255#0#255#128#0#0#255#255#255#128#0
+  +#0#255#255#255#255#255#255#128#0#0#255#255#255#128#0#0#255#255#255#255#255
+  +#255#128#0#0#255#255#255#128#0#0'@'#0#0#15#170'.'#12#166'%'#255#255#255#255
+  +#255#255#3#159#13#3#158#12#3#158#12#3#158#12#3#146#11#2'V'#5#128#0#0#255#255
+  +#255#128#0#0#128#0#0#128#0#0#255#255#255#255#255#255#255#255#255#128#0#0#128
+  +#0#0#255#255#255#255#255#255#128#0#0'@'#0#0#20#173':'#17#170'0'#255#255#255
+  +#255#255#255#255#255#255#4#159#15#3#158#12#3#158#12#3#156#12#2'_'#6#128#0#0
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#128#0#0'@'#0#0#24
+  +#177'G'#21#173'='#255#255#255#255#255#255#255#255#255#7#163#24#4#160#16#3#158
+  +#12#3#158#12#2'g'#6#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0
+  +#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#28#178'N'#28#178'N'#26#177
+  +'I'#255#255#255#255#255#255#15#169','#11#166'#'#8#163#25#5#160#17#3#158#12#2
+  +'g'#6#255#0#255'KKK'#217#217#217#177#176#176#166#165#165#152#152#152#145#145
+  +#145#137#137#137#255#255#255#255#255#255'D'#173'Mb'#206#137#137#218#167'&'
+  +#183'W'#28#178'N'#28#178'N'#255#255#255#23#175'A'#19#172'7'#15#170'-'#12#166
+  +'$'#9#164#28#6#161#19#2'P'#5#255#0#255'KKK'#226#226#226#193#193#193#177#177
+  +#177#159#159#159#153#153#153#144#144#144#209#209#209#255#255#255#177#215#163
+  +#10#143#22#154#225#181#131#217#164'.'#187'^'#28#178'N'#28#178'N'#27#178'L'#24
+  +#176'D'#20#173':'#16#170'0'#13#167''''#7#135#16#255#0#255#255#0#255'KKK'#234
+  +#233#233#209#208#208#189#188#188#167#167#167#163#163#163#151#151#151#194#193
+  +#193#240#240#240#206#206#206'O'#180'T'#11#144#24#165#227#188#173#230#196'i'
+  +#208#143'A'#193'n5'#189'e6'#189'f-'#184'Y'#24#175'@'#9#139#19'5='#10#255#0
+  +#255#255#0#255'KKK'#238#238#238#218#218#218#198#198#198#176#175#175#171#170
+  +#170#158#158#158#177#177#177#226#226#226#208#208#208#166#166#166'_'#187'c'#10
+  +#143#22'o'#211#149#153#224#180#149#222#176'}'#215#158'Z'#203#131'/'#187'`'#11
+  +#140#22'K'#128':111'#255#0#255#255#0#255'KKK'#240#240#240#225#225#225#206#204
+  +#204#182#182#182#199#199#199#191#190#190#153#152#152#227#227#227#226#226#226
+  +#136#136#136#255#255#255#177#217#167'D'#178'O'#9#142#20#10#143#22#10#142#22#9
+  +#139#19'B'#153'C'#176#186#132'~ee111'#255#0#255#255#0#255'KKK'#242#242#242
+  +#230#230#230#212#211#211#191#189#189#204#204#204#234#234#234#218#218#218#229
+  +#229#229#228#228#228#142#142#142#255#255#255#255#255#255#130#129#129#132''
+  +#138'~'#143''#147'~~'#152'~~'#158'~}zee111'#255#0#255#255#0#255'KKK'#243
+  +#242#242#233#233#233#218#218#218#196#196#196#197#196#196#228#227#227#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#187#185#185#137'~'#143''#146'~~'#152'~~wfe111'#255#0#255#255
+  +#0#255'KKK'#243#243#243#235#235#235#224#224#224#206#204#204#207#207#207#199
+  +#199#199#188#188#188#180#178#178#171#171#171#163#161#161#156#156#156#147#147
+  +#147#140#140#140#134#134#134#130#129#129#131''#137'~~'#143'~'#146'~~uff11'
+  +'1'#255#0#255#255#0#255'KKK'#243#243#243#238#238#238#230#230#230#208#207#207
+  +#211#211#211#204#204#204#197#196#196#189#188#188#181#181#181#173#172#172#170
+  +#169#169#159#159#159#151#151#151#142#142#142#134#134#134#130#130#130#131''
+  +#136''#142'~pgg111'#255#0#255#255#0#255'KKK'#243#243#243#240#239#239#238
+  +#238#238#220#218#218#216#216#216#213#213#213#206#204#204#199#198#198#191#189
+  +#189#183#182#182#182#182#182#171#171#171#159#158#158#150#149#149#143#143#143
+  +#135#135#135#130#130#130#130''#135'mgf111'#255#0#255#255#0#255'KKK'#242
+  +#242#242#238#238#238#243#242#242#240#239#239#238#238#238#235#235#235#231#231
+  +#231#226#226#226#218#218#218#208#208#208#198#198#198#183#182#182#170#170#170
+  +#157#157#157#149#147#147#140#140#140#136#136#136#131#131#131#130'kgg111'
+  ,#255#0#255#255#0#255'KKK'#239#239#239#233#233#233#238#238#238#242#240#240#242
+  +#240#240#239#239#239#237#237#237#234#234#234#227#227#227#218#218#218#206#206
+  +#206#193#193#193#177#177#177#165#164#164#156#156#156#149#149#149#140#140#140
+  +#137#136#136#131#131#131'hgg111'#255#0#255#255#0#255'KKK'#216#216#216#239#239
+  +#239#242#242#242#243#243#243#244#244#244#243#243#243#243#242#242#242#240#240
+  +#239#239#239#235#235#235#230#230#230#225#224#224#217#217#217#211#211#211#207
+  +#207#207#203#202#202#199#199#199#197#197#197#194#194#194'hgg111'#255#0#255
+  +#255#0#255#255#0#255'QQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQSSSQQQQQQQ'
+  +'QQQQQ'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255
+]);
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_Glyphs.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_Glyphs.res
new file mode 100644
index 0000000..fa5cad1
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_Glyphs.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_Lazarus_Unix.lpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_Lazarus_Unix.lpk
new file mode 100644
index 0000000..35f6313
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_Lazarus_Unix.lpk	
@@ -0,0 +1,65 @@
+<?xml version="1.0"?>
+<CONFIG>
+  <Package Version="3">
+    <PathDelim Value="\"/>
+    <Name Value="DataAbstract_Scripting_Lazarus_Unix"/>
+    <CompilerOptions>
+      <Version Value="5"/>
+      <PathDelim Value="\"/>
+      <SearchPaths>
+        <UnitOutputDirectory Value="units\$(TargetCPU)-$(TargetOS)"/>
+      </SearchPaths>
+      <Parsing>
+        <SyntaxOptions>
+          <D2Extensions Value="False"/>
+        </SyntaxOptions>
+      </Parsing>
+      <CodeGeneration>
+        <Generate Value="Faster"/>
+      </CodeGeneration>
+      <Other>
+        <CompilerPath Value="$(CompPath)"/>
+      </Other>
+    </CompilerOptions>
+    <Description Value="RemObjects Data Abstract - Scripting Integration Library"/>
+    <Files Count="3">
+      <Item1>
+        <Filename Value="DataAbstract_Scripting_Reg.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="DataAbstract_Scripting_Reg"/>
+      </Item1>
+      <Item2>
+        <Filename Value="uDAPascalScript.pas"/>
+        <UnitName Value="uDAPascalScript"/>
+      </Item2>
+      <Item3>
+        <Filename Value="uDAPSScriptingProvider.pas"/>
+        <UnitName Value="uDAPSScriptingProvider"/>
+      </Item3>
+    </Files>
+    <Type Value="DesignTime"/>
+    <RequiredPkgs Count="4">
+      <Item1>
+        <PackageName Value="RemObjects_Core_Lazarus_Unix"/>
+      </Item1>
+      <Item2>
+        <PackageName Value="DataAbstract_Core_Lazarus_Unix"/>
+      </Item2>
+      <Item3>
+        <PackageName Value="PascalScript"/>
+      </Item3>
+      <Item4>
+        <PackageName Value="FCL"/>
+        <MinVersion Major="1" Valid="True"/>
+      </Item4>
+    </RequiredPkgs>
+    <UsageOptions>
+      <UnitPath Value="$(PkgOutDir)\"/>
+    </UsageOptions>
+    <PublishOptions>
+      <Version Value="2"/>
+      <DestinationDirectory Value="$(TestDir)\publishedpackage\"/>
+      <IgnoreBinaries Value="False"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_Lazarus_Windows.lpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_Lazarus_Windows.lpk
new file mode 100644
index 0000000..97b164d
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_Lazarus_Windows.lpk	
@@ -0,0 +1,61 @@
+<?xml version="1.0"?>
+<CONFIG>
+  <Package Version="3">
+    <PathDelim Value="\"/>
+    <Name Value="DataAbstract_Scripting_Lazarus_Windows"/>
+    <CompilerOptions>
+      <Version Value="5"/>
+      <PathDelim Value="\"/>
+      <SearchPaths>
+        <OtherUnitFiles Value="$(LazarusDir)\lcl\units\$(TargetCPU)-$(TargetOS)\;T:\ROSOFT\ROSDK\Source\;T:\ROSOFT\ROSDK\Source\CodeGen\;T:\ROSOFT\ROSDK\Source\ZLib\FPC\"/>
+        <UnitOutputDirectory Value="..\Dcu\Lazarus"/>
+      </SearchPaths>
+      <Parsing>
+        <SyntaxOptions>
+          <D2Extensions Value="False"/>
+        </SyntaxOptions>
+      </Parsing>
+      <CodeGeneration>
+        <Generate Value="Faster"/>
+      </CodeGeneration>
+      <Other>
+        <CompilerPath Value="$(CompPath)"/>
+      </Other>
+    </CompilerOptions>
+    <Files Count="3">
+      <Item1>
+        <Filename Value="DataAbstract_Scripting_Reg.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="DataAbstract_Scripting_Reg"/>
+      </Item1>
+      <Item2>
+        <Filename Value="uDAPascalScript.pas"/>
+        <UnitName Value="uDAPascalScript"/>
+      </Item2>
+      <Item3>
+        <Filename Value="uDAPSScriptingProvider.pas"/>
+        <UnitName Value="uDAPSScriptingProvider"/>
+      </Item3>
+    </Files>
+    <Type Value="DesignTime"/>
+    <RequiredPkgs Count="3">
+      <Item1>
+        <PackageName Value="DataAbstract_Core_Lazarus_Windows"/>
+      </Item1>
+      <Item2>
+        <PackageName Value="PascalScript"/>
+      </Item2>
+      <Item3>
+        <PackageName Value="FCL"/>
+        <MinVersion Major="1" Valid="True"/>
+      </Item3>
+    </RequiredPkgs>
+    <UsageOptions>
+      <UnitPath Value="$(PkgOutDir)\"/>
+    </UsageOptions>
+    <PublishOptions>
+      <Version Value="2"/>
+      <IgnoreBinaries Value="False"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_Reg.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_Reg.pas
new file mode 100644
index 0000000..f71baf2
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_Scripting_Reg.pas	
@@ -0,0 +1,40 @@
+unit DataAbstract_Scripting_Reg;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       } 
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+procedure Register;
+
+implementation
+
+uses
+  {$IFDEF FPC}LResources,{$ENDIF}
+  Classes, uDAPSScriptingProvider, uDARes;
+
+{$IFNDEF FPC}  
+  {$R DataAbstract_Scripting_Glyphs.res}
+{$ENDIF FPC}  
+
+procedure Register;
+begin
+  RegisterComponents(DAPalettePageName, [TDAPSScriptingProvider]);
+end;
+
+{$IFDEF FPC}
+initialization
+  {$I DataAbstract_Scripting_Glyphs.lrs}
+{$ENDIF}
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D10.bdsproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D10.bdsproj
new file mode 100644
index 0000000..ddab013
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D10.bdsproj	
@@ -0,0 +1,177 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality">Delphi.Personality</Option>
+			<Option Name="ProjectType"></Option>
+			<Option Name="Version">1.0</Option>
+			<Option Name="GUID">{07EA6B1E-3F93-43E7-91C5-50005788308E}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource">DataAbstract_SimpleQuery_D10.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A">8</Compiler>
+			<Compiler Name="B">0</Compiler>
+			<Compiler Name="C">1</Compiler>
+			<Compiler Name="D">1</Compiler>
+			<Compiler Name="E">0</Compiler>
+			<Compiler Name="F">0</Compiler>
+			<Compiler Name="G">1</Compiler>
+			<Compiler Name="H">1</Compiler>
+			<Compiler Name="I">1</Compiler>
+			<Compiler Name="J">0</Compiler>
+			<Compiler Name="K">0</Compiler>
+			<Compiler Name="L">1</Compiler>
+			<Compiler Name="M">0</Compiler>
+			<Compiler Name="N">1</Compiler>
+			<Compiler Name="O">1</Compiler>
+			<Compiler Name="P">1</Compiler>
+			<Compiler Name="Q">0</Compiler>
+			<Compiler Name="R">0</Compiler>
+			<Compiler Name="S">0</Compiler>
+			<Compiler Name="T">0</Compiler>
+			<Compiler Name="U">0</Compiler>
+			<Compiler Name="V">1</Compiler>
+			<Compiler Name="W">1</Compiler>
+			<Compiler Name="X">1</Compiler>
+			<Compiler Name="Y">1</Compiler>
+			<Compiler Name="Z">1</Compiler>
+			<Compiler Name="ShowHints">True</Compiler>
+			<Compiler Name="ShowWarnings">True</Compiler>
+			<Compiler Name="UnitAliases">WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;</Compiler>
+			<Compiler Name="NamespacePrefix"></Compiler>
+			<Compiler Name="GenerateDocumentation">False</Compiler>
+			<Compiler Name="DefaultNamespace"></Compiler>
+			<Compiler Name="SymbolDeprecated">True</Compiler>
+			<Compiler Name="SymbolLibrary">True</Compiler>
+			<Compiler Name="SymbolPlatform">True</Compiler>
+			<Compiler Name="SymbolExperimental">True</Compiler>
+			<Compiler Name="UnitLibrary">True</Compiler>
+			<Compiler Name="UnitPlatform">True</Compiler>
+			<Compiler Name="UnitDeprecated">True</Compiler>
+			<Compiler Name="UnitExperimental">True</Compiler>
+			<Compiler Name="HResultCompat">True</Compiler>
+			<Compiler Name="HidingMember">True</Compiler>
+			<Compiler Name="HiddenVirtual">True</Compiler>
+			<Compiler Name="Garbage">True</Compiler>
+			<Compiler Name="BoundsError">True</Compiler>
+			<Compiler Name="ZeroNilCompat">True</Compiler>
+			<Compiler Name="StringConstTruncated">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar">True</Compiler>
+			<Compiler Name="TypedConstVarPar">True</Compiler>
+			<Compiler Name="AsgToTypedConst">True</Compiler>
+			<Compiler Name="CaseLabelRange">True</Compiler>
+			<Compiler Name="ForVariable">True</Compiler>
+			<Compiler Name="ConstructingAbstract">True</Compiler>
+			<Compiler Name="ComparisonFalse">True</Compiler>
+			<Compiler Name="ComparisonTrue">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned">True</Compiler>
+			<Compiler Name="UnsupportedConstruct">True</Compiler>
+			<Compiler Name="FileOpen">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc">True</Compiler>
+			<Compiler Name="BadGlobalSymbol">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor">True</Compiler>
+			<Compiler Name="InvalidDirective">True</Compiler>
+			<Compiler Name="PackageNoLink">True</Compiler>
+			<Compiler Name="PackageThreadVar">True</Compiler>
+			<Compiler Name="ImplicitImport">True</Compiler>
+			<Compiler Name="HPPEMITIgnored">True</Compiler>
+			<Compiler Name="NoRetVal">True</Compiler>
+			<Compiler Name="UseBeforeDef">True</Compiler>
+			<Compiler Name="ForLoopVarUndef">True</Compiler>
+			<Compiler Name="UnitNameMismatch">True</Compiler>
+			<Compiler Name="NoCFGFileFound">True</Compiler>
+			<Compiler Name="MessageDirective">True</Compiler>
+			<Compiler Name="ImplicitVariants">True</Compiler>
+			<Compiler Name="UnicodeToLocale">True</Compiler>
+			<Compiler Name="LocaleToUnicode">True</Compiler>
+			<Compiler Name="ImagebaseMultiple">True</Compiler>
+			<Compiler Name="SuspiciousTypecast">True</Compiler>
+			<Compiler Name="PrivatePropAccessor">True</Compiler>
+			<Compiler Name="UnsafeType">False</Compiler>
+			<Compiler Name="UnsafeCode">False</Compiler>
+			<Compiler Name="UnsafeCast">False</Compiler>
+			<Compiler Name="OptionTruncated">True</Compiler>
+			<Compiler Name="WideCharReduced">True</Compiler>
+			<Compiler Name="DuplicatesIgnored">True</Compiler>  <Compiler Name="UnitInitSeq">True</Compiler>
+      <Compiler Name="LocalPInvoke">True</Compiler>
+      <Compiler Name="CodePage"></Compiler>
+    </Compiler>
+		<Linker>
+			<Linker Name="MapFile">0</Linker>
+			<Linker Name="OutputObjs">0</Linker>
+			<Linker Name="ConsoleApp">1</Linker>
+			<Linker Name="DebugInfo">False</Linker>
+			<Linker Name="RemoteSymbols">False</Linker>
+			<Linker Name="GenerateDRC">False</Linker>
+			<Linker Name="MinStackSize">16384</Linker>
+			<Linker Name="MaxStackSize">1048576</Linker>
+			<Linker Name="ImageBase">4194304</Linker>
+			<Linker Name="ExeDescription">RemObjects Data Abstract - Korzh SimpleQuery Integration Library</Linker>  <Linker Name="GenerateHpps">False</Linker>
+    </Linker>
+		<Directories>
+			<Directories Name="OutputDir"></Directories>
+			<Directories Name="UnitOutputDir">..\Dcu\D10</Directories>
+			<Directories Name="PackageDLLOutputDir">..\Dcu\D10</Directories>
+			<Directories Name="PackageDCPOutputDir">..\Dcu\D10</Directories>
+			<Directories Name="SearchPath">..\Dcu\D10;..\..\RemObjects SDK for Dephi\Dcu\D10</Directories>
+			<Directories Name="Packages"></Directories>
+			<Directories Name="Conditionals"></Directories>
+			<Directories Name="DebugSourceDirs"></Directories>
+			<Directories Name="UsePackages">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams"></Parameters>
+			<Parameters Name="HostApplication"></Parameters>
+			<Parameters Name="Launcher"></Parameters>
+			<Parameters Name="UseLauncher">False</Parameters>
+			<Parameters Name="DebugCWD"></Parameters>
+			<Parameters Name="RemoteHost"></Parameters>
+			<Parameters Name="RemotePath"></Parameters>
+			<Parameters Name="RemoteLauncher"></Parameters>
+			<Parameters Name="RemoteCWD"></Parameters>
+			<Parameters Name="RemoteDebug">False</Parameters>  <Parameters Name="Debug Symbols Search Path"></Parameters>
+      <Parameters Name="LoadAllSymbols">True</Parameters>
+      <Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+    </Parameters>
+		<Language>
+			<Language Name="ActiveLang"></Language>
+			<Language Name="ProjectLang">$00000000</Language>
+			<Language Name="RootDir"></Language>
+		</Language>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+			<VersionInfo Name="MajorVer">1</VersionInfo>
+			<VersionInfo Name="MinorVer">0</VersionInfo>
+			<VersionInfo Name="Release">0</VersionInfo>
+			<VersionInfo Name="Build">0</VersionInfo>
+			<VersionInfo Name="Debug">False</VersionInfo>
+			<VersionInfo Name="PreRelease">False</VersionInfo>
+			<VersionInfo Name="Special">False</VersionInfo>
+			<VersionInfo Name="Private">False</VersionInfo>
+			<VersionInfo Name="DLL">False</VersionInfo>
+			<VersionInfo Name="Locale">1033</VersionInfo>
+			<VersionInfo Name="CodePage">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+			<VersionInfoKeys Name="Comments"></VersionInfoKeys>
+		</VersionInfoKeys>
+	</Delphi.Personality>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D10.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D10.cfg
new file mode 100644
index 0000000..c44bc25
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D10.cfg	
@@ -0,0 +1,44 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N0"..\Dcu\D10"
+-LE"..\Dcu\D10"
+-LN"..\Dcu\D10"
+-U"..\Dcu\D10;..\..\RemObjects SDK for Dephi\Dcu\D10"
+-O"..\Dcu\D10;..\..\RemObjects SDK for Dephi\Dcu\D10"
+-I"..\Dcu\D10;..\..\RemObjects SDK for Dephi\Dcu\D10"
+-R"..\Dcu\D10;..\..\RemObjects SDK for Dephi\Dcu\D10"
+-Z
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D10.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D10.dpk
new file mode 100644
index 0000000..9f33f70
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D10.dpk	
@@ -0,0 +1,42 @@
+package DataAbstract_SimpleQuery_D10;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - Korzh SimpleQuery Integration Library'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  RemObjects_Core_D10,
+  dbrtl,
+  vcl,
+  DataAbstract_Core_D10,
+  PascalScript_Core_D10,
+  sq7,
+  kprocs7;
+
+contains
+  uDAKDBInfo in 'uDAKDBInfo.pas',
+  DataAbstract_SimpleQuery_Reg in 'DataAbstract_SimpleQuery_Reg.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D10.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D10.res
new file mode 100644
index 0000000..c73b102
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D10.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D11.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D11.dpk
new file mode 100644
index 0000000..795f67f
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D11.dpk	
@@ -0,0 +1,42 @@
+package DataAbstract_SimpleQuery_D11;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - Korzh SimpleQuery Integration Library'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  RemObjects_Core_D11,
+  dbrtl,
+  vcl,
+  DataAbstract_Core_D11,
+  PascalScript_Core_D11,
+  sq11,
+  kprocs11;
+
+contains
+  uDAKDBInfo in 'uDAKDBInfo.pas',
+  DataAbstract_SimpleQuery_Reg in 'DataAbstract_SimpleQuery_Reg.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D11.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D11.dproj
new file mode 100644
index 0000000..58bef6e
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D11.dproj	
@@ -0,0 +1,71 @@
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{12feb998-13fa-45f9-8ee6-f5ab6077ef8e}</ProjectGuid>
+    <MainSource>DataAbstract_SimpleQuery_D11.dpk</MainSource>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+    <DCC_DependencyCheckOutputName>..\Dcu\D11\DataAbstract_SimpleQuery_D11.bpl</DCC_DependencyCheckOutputName>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DebugInformation>False</DCC_DebugInformation>
+    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+    <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+    <DCC_DcuOutput>..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\Dcu\D11;..\..\RemObjects SDK for Dephi\Dcu\D10</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\Dcu\D11;..\..\RemObjects SDK for Dephi\Dcu\D10</DCC_ResourcePath>
+    <DCC_ObjPath>..\Dcu\D11;..\..\RemObjects SDK for Dephi\Dcu\D10</DCC_ObjPath>
+    <DCC_IncludePath>..\Dcu\D11;..\..\RemObjects SDK for Dephi\Dcu\D10</DCC_IncludePath>
+    <DCC_Define>RELEASE</DCC_Define>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+    <DCC_DcuOutput>..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\Dcu\D11;..\..\RemObjects SDK for Dephi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\Dcu\D11;..\..\RemObjects SDK for Dephi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\Dcu\D11;..\..\RemObjects SDK for Dephi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\Dcu\D11;..\..\RemObjects SDK for Dephi\Dcu\D11</DCC_IncludePath>
+  </PropertyGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Delphi.Personality</Borland.Personality>
+    <Borland.ProjectType>Package</Borland.ProjectType>
+    <BorlandProject>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">RemObjects Data Abstract - Korzh SimpleQuery Integration Library</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">DataAbstract_SimpleQuery_D11.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
+  <ItemGroup>
+    <DelphiCompile Include="DataAbstract_SimpleQuery_D11.dpk">
+      <MainSource>MainSource</MainSource>
+    </DelphiCompile>
+    <DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\DataAbstract_Core_D10.dcp" />
+    <DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\DataAbstract_Core_D11.dcp" />
+    <DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\dbrtl.dcp" />
+    <DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\kprocs.dcp" />
+    <DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\kprocs1.dcp" />
+    <DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\kprocs11.dcp" />
+    <DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\kprocs7.dcp" />
+    <DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\PascalScript_Core_D10.dcp" />
+    <DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\PascalScript_Core_D11.dcp" />
+    <DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\RemObjects_Core_D10.dcp" />
+    <DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\RemObjects_Core_D11.dcp" />
+    <DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\rtl.dcp" />
+    <DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\sq.dcp" />
+    <DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\sq1.dcp" />
+    <DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\sq11.dcp" />
+    <DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\sq7.dcp" />
+    <DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\vcl.dcp" />
+    <DCCReference Include="DataAbstract_SimpleQuery_Reg.pas" />
+    <DCCReference Include="uDAKDBInfo.pas" />
+  </ItemGroup>
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D11.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D11.res
new file mode 100644
index 0000000..c73b102
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D11.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D6.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D6.cfg
new file mode 100644
index 0000000..e2a8294
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D6.cfg	
@@ -0,0 +1,47 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-E"s:\exe"
+-N"..\Dcu\D6"
+-LE"..\Dcu\D6"
+-LN"..\Dcu\D6"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D6.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D6.dof
new file mode 100644
index 0000000..29abd6f
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D6.dof	
@@ -0,0 +1,114 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects Data Abstract - Korzh SimpleQuery Integration Library
+
+[Directories]
+UnitOutputDir=..\Dcu\D6
+PackageDLLOutputDir=..\Dcu\D6
+PackageDCPOutputDir=..\Dcu\D6
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=ROServiceTester
+FileVersion=3.0.0.257
+InternalName=ROServiceTester
+LegalCopyright=Copyright RemObjects Software 2002
+LegalTrademarks=RemObjects Software 2002
+OriginalFilename=ROServiceTester.exe
+ProductName=RemObjects SDK
+ProductVersion=3.0.0.0
+Compile Date=Sunday, March 21, 2004 5:55 PM
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D6.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D6.dpk
new file mode 100644
index 0000000..b8c2834
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D6.dpk	
@@ -0,0 +1,42 @@
+package DataAbstract_SimpleQuery_D6;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - Korzh SimpleQuery Integration Library'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  RemObjects_Core_D6,
+  dbrtl,
+  vcl,
+  DataAbstract_Core_D6,
+  PascalScript_Core_D6,
+  sq6,
+  kprocs6;
+
+contains
+  uDAKDBInfo in 'uDAKDBInfo.pas',
+  DataAbstract_SimpleQuery_Reg in 'DataAbstract_SimpleQuery_Reg.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D6.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D6.res
new file mode 100644
index 0000000..fff68a1
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D6.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D7.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D7.cfg
new file mode 100644
index 0000000..b26eab1
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D7.cfg	
@@ -0,0 +1,46 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\Dcu\D7"
+-LE"..\Dcu\D7"
+-LN"..\Dcu\D7"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D7.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D7.dof
new file mode 100644
index 0000000..7e2dfdc
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D7.dof	
@@ -0,0 +1,117 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects Data Abstract - Korzh SimpleQuery Integration Library
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\Dcu\D7
+PackageDLLOutputDir=..\Dcu\D7
+PackageDCPOutputDir=..\Dcu\D7
+SearchPath=
+Packages=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=ROServiceTester
+FileVersion=3.0.0.257
+InternalName=ROServiceTester
+LegalCopyright=Copyright RemObjects Software 2002
+LegalTrademarks=RemObjects Software 2002
+OriginalFilename=ROServiceTester.exe
+ProductName=RemObjects SDK
+ProductVersion=3.0.0.0
+Compile Date=Sunday, March 21, 2004 5:55 PM
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D7.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D7.dpk
new file mode 100644
index 0000000..63ff17e
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D7.dpk	
@@ -0,0 +1,42 @@
+package DataAbstract_SimpleQuery_D7;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - Korzh SimpleQuery Integration Library'}
+{$IMPLICITBUILD ON}
+
+requires
+  rtl,
+  RemObjects_Core_D7,
+  dbrtl,
+  vcl,
+  DataAbstract_Core_D7,
+  PascalScript_Core_D7,
+  sq7,
+  kprocs7;
+
+contains
+  uDAKDBInfo in 'uDAKDBInfo.pas',
+  DataAbstract_SimpleQuery_Reg in 'DataAbstract_SimpleQuery_Reg.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D7.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D7.res
new file mode 100644
index 0000000..fff68a1
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_D7.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_Glyphs.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_Glyphs.res
new file mode 100644
index 0000000..4a5d497
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_Glyphs.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_Reg.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_Reg.pas
new file mode 100644
index 0000000..5a9be83
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/DataAbstract_SimpleQuery_Reg.pas	
@@ -0,0 +1,33 @@
+unit DataAbstract_SimpleQuery_Reg;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library
+{
+{ compiler: Delphi 6 and up, Kylix 3 and up
+{ platform: Win32, Linux
+{
+{ (c)opyright RemObjects Software. all rights reserved.
+{
+{ Using this code requires a valid license of the Data Abstract
+{ which can be obtained at http://www.remobjects.com.
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+{$R DataAbstract_SimpleQuery_Glyphs.res}
+
+interface
+
+procedure Register;
+
+implementation
+
+uses
+  Classes, uDAKDBInfo;
+
+procedure Register;
+begin
+  RegisterComponents('Data Abstract', [TDAKDBConnectionInfo, TDAKDBSchemaInfo]);
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/ASGRout3.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/ASGRout3.pas
new file mode 100644
index 0000000..6382a1b
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/ASGRout3.pas	
@@ -0,0 +1,424 @@
+{*_* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
+
+Author:       Albert Drent
+Description:  ASGRout parser routines
+Creation:     Januari 1998
+Version:      1.2.B
+EMail:        a.drent@aducom.com (www.aducom.com)
+Support:      support@aducom.com (www.aducom.com)
+Legal issues: Copyright (C) 2003 by Aducom Software
+
+              Aducom Software
+              Eckhartstr 61
+              9746 BN  Groningen
+              Netherlands
+
+              This software is provided 'as-is', without any express or
+              implied warranty.  In no event will the author be held liable
+              for any damages arising from the use of this software.
+
+              Permission is granted to anyone to use this software for any
+              purpose, including commercial applications, and to alter it
+              and redistribute it freely, subject to the following
+              restrictions:
+
+              1. The origin of this software must not be misrepresented,
+                 you must not claim that you wrote the original software.
+                 If you use this software in a product, an acknowledgment
+                 in the product documentation would be appreciated but is
+                 not required.
+
+              2. Altered source versions must be plainly marked as such, and
+                 must not be misrepresented as being the original software.
+
+              3. If you make changes which improves the component you must
+                 mail these to aducom as the moderator of the components
+                 complete with documentation for the benefits of the community.
+
+              4. You are not allowed to create commercial available components
+                 using this software. If you use this source in any way to create
+                 your own components, your source should be free of charge,
+                 available to anyone. It's a far better idea to distribute your
+                 changes through Aducom Software.
+
+              5. This notice may not be removed or altered from any source
+                 distribution.
+
+              6. You must register this software by entering the support forum.
+                 I like to keep track about where the components are used, so
+                 sending a picture postcard to the author would be appreciated.
+                 Use a nice stamp and mention your name, street
+                 address, EMail address and any comment you like to say.
+
+Modifications
+              26/5/2004 Function YYYYMMDDParser by JPierce, necessary for
+              locale independent datehandling in SQLite components.
+              1/9/2005 Changes to the StrToFloatX routine, now depending on
+              decimalseparator.
+
+*_* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * }
+
+unit ASGRout3;
+
+interface
+
+uses SysUtils;
+
+const
+  vtcIdentifier = 1;
+  vtcNumber = 2;
+  vtcAssignment = 3;
+  vtcQString = 4;
+  vtcDString = 5;
+  vtcRelOp = 6;
+  vtcFloat = 7;
+  vtcDelimiter = 8;
+  vtcEof = 9;
+
+procedure FindErrorPos(InString: string; ErrPos: integer;
+  var TheLine, TheCol: integer);
+function GetWord(var InString: string; var StartPos: integer;
+  var VarType: integer): string;
+function GetWordByDelim(var InString: string; var StartPos: integer;
+  var Delim: string): string;
+function PeekWord(var InString: string; StartPos: integer;
+  var VarType: integer): string;
+function Recover(var InString: string; var StartPos: integer): boolean;
+function StrToIntX(StrIn: string): integer;
+function StrToFloatX(StrIn : string) : extended;
+function StrToDateX(TheDate: string): TDateTime;
+function StrToDateTimeX(const S: string): TDateTime;
+function YYYYMMDDParser(Str: PChar): TDateTime;
+function FloatParser(Str: string): string;// jordi march
+
+implementation
+
+function FloatParser(Str: string): string;// jordi march
+var
+  Point: Byte;
+begin
+  if  DecimalSeparator <> '.'  then  begin
+    Point := Pos ('.', Str);
+    if  Point <> 0
+    then  Str[Point] := DecimalSeparator;
+  end;
+  Result := Str;
+end;
+
+ //==============================================================================
+ // Convert dates to a correct datetime notation. Try several notations,
+ // starting with the system defaults                           
+ //==============================================================================
+
+function StrToDateTimeX(const S: string): TDateTime;
+begin
+  if S = '' then
+     StrToDateTimeX := 0
+  else begin
+     try
+        StrToDateTimeX := StrToDateTime(S);
+     except
+        StrToDateTimeX := StrToDateX(s);
+     end;
+  end;
+end;
+
+function StrToDateX(TheDate: string): TDateTime;
+var
+  DateFormat: string;
+  DateSep:    char;
+begin
+  DateFormat := ShortDateFormat; // save current settings
+  DateSep    := DateSeparator;
+  try
+    try
+      StrToDateX      := StrToDate(TheDate)
+    except
+      DateSeparator   := '-';
+      ShortDateFormat := 'dd-mm-yyyy';
+      try
+        StrToDateX      := StrToDate(TheDate)
+      except
+        ShortDateFormat := 'yyyy-mm-dd';
+        try
+          StrToDateX := StrToDate(TheDate)
+        except
+          StrToDateX := StrToDateX('01-01-1900');
+          raise;
+        end;
+      end;
+    end;
+  finally
+    ShortDateFormat := DateFormat;
+    DateSeparator   := DateSep;
+  end;
+end;
+
+// Routine submitted by jpierce, modified to accept more types
+// It requires that the date be in strict yyyy-mm-dd [hh:nn:[ss[:mmm]]]
+
+function YYYYMMDDParser(Str: PChar): TDateTime;
+var
+  Year, Month, Day, Hour, Min, Sec, MSec: Word;
+begin
+  Result := 0;
+
+  try
+    if Length(Str) >= 10 then // 10 = Length of YYYY-MM-DD
+    begin
+      Year := StrToInt(Copy(Str, 1, 4));
+      Month := StrToInt(Copy(Str, 6, 2));
+      Day := StrToInt(Copy(Str, 9, 2));
+
+      Result := EncodeDate(Year, Month, Day);
+    end;
+
+    if Length(Str) > 10 then // it has a time
+    begin
+      Hour := StrToInt(Copy(Str, 12, 2));
+      Min := StrToInt(Copy(Str, 15, 2));
+      Sec := 0;
+      MSec := 0;
+      if Length(Str) > 16 then Sec := StrToInt(Copy(Str, 18, 2));
+      if Length(Str) > 19 then Msec := StrToInt(Copy(Str, 21, 3));
+      Result := Result + EncodeTime(Hour, Min, Sec, MSec);
+    end;
+  except
+    Result := 0;
+  end;
+end;
+
+function StrToIntX(StrIn: string): integer;
+var
+E: Integer;
+begin
+ Val(StrIn, Result, E);
+ if E <> 0 then Result := 0;
+end;
+
+function StrToFloatX(StrIn : string) : extended;
+begin
+  if not TextToFloat(PChar(StrIn), Result, fvExtended) then
+  Result := 0;
+end;
+
+procedure FindErrorPos(InString: string; ErrPos: integer;
+  var TheLine, TheCol: integer);
+var
+  i: integer;
+begin
+  TheLine := 1;
+  TheCol := 1;
+  i := 1;
+  while i < ErrPos do
+  begin
+    if InString[i] in [ #10, #13] then
+    begin
+      Inc(TheLine);
+      TheCol := 1;
+      Inc(i);
+      Inc(i);
+    end
+    else
+    begin
+      Inc(TheCol);
+      Inc(i);
+    end;
+  end;
+end;
+
+function Recover(var InString: string;
+  var StartPos: integer): boolean;
+begin
+  if (StartPos > Length(InString)) then
+  begin
+    Recover := false;
+    exit;
+  end;
+
+  while (Startpos < Length(InString)) and
+    ( not (InString[StartPos] in [ #10, #13])) do
+    Inc(StartPos);
+  Recover := true;
+end;
+
+function PeekWord(var InString: string; StartPos: integer;
+  var VarType: integer): string;
+begin
+  PeekWord := GetWord(InString, StartPos, VarType);
+end;
+
+function GetWordByDelim(var InString: string;
+  var StartPos: integer;
+  var Delim: string): string;
+var
+  Ret: string;
+begin
+  Ret := '';
+  while (StartPos <= Length(InString)) and (InString[StartPos] = ' ') do
+    Inc(StartPos);
+  while (StartPos <= Length(InString)) and (Pos(InString[StartPos], Delim) = 0) do
+  begin
+    Ret := Ret + InString[StartPos];
+    Inc(StartPos);
+  end;
+  GetWordByDelim := Trim(Ret);
+end;
+
+function GetWord(var InString: string; var StartPos: integer;
+  var VarType: integer): string;
+var
+  TheChar: char;
+  Rv:      string;
+begin
+  if (StartPos > Length(InString)) then
+  begin
+    GetWord := '';
+    VarType := vtcEof;
+    exit;
+  end;
+
+  while (StartPos <= Length(InString)) and (InString[StartPos] <= #32) do
+    Inc(StartPos);
+
+  TheChar := InString[StartPos];
+  Rv      := '';
+
+  if TheChar in ['a'..'z', 'A'..'Z'] then
+    VarType := vtcIdentifier
+  else if TheChar in ['0'..'9', '-'] then
+    VarType := vtcNumber
+  else if TheChar = ':' then
+    VarType := vtcAssignment
+  else if TheChar = '"' then
+    VarType := vtcDString
+  else if TheChar = '''' then
+    VarType := vtcQString
+  else if TheChar in ['>', '=', '<'] then
+    VarType := vtcRelOp
+  else
+  begin
+    Inc(StartPos);
+    if TheChar = '!' then
+    begin
+      Recover(InString, StartPos);
+      Rv      := GetWord(InString, StartPos, VarType);
+      GetWord := Rv;
+    end
+    else
+    begin
+      GetWord := TheChar;
+    end;
+    exit;
+  end;
+
+  case VarType of
+    vtcIdentifier:
+    begin
+      while InString[StartPos] in ['a'..'z', 'A'..'Z', '_','0'..'9'] do
+      begin
+        Rv := Rv + InString[StartPos];
+        Inc(StartPos);
+      end;
+    end;
+    vtcNumber:
+    begin
+      while InString[StartPos] in ['-', '0'..'9', '.'] do
+      begin
+        if InString[StartPos] = '.' then
+          VarType := vtcFloat;
+        Rv := Rv + InString[StartPos];
+        Inc(StartPos);
+      end;
+      if VarType = vtcFloat then
+        Rv := FloatToStr(StrToFloat(Rv))
+      else
+        Rv := IntToStr(StrToInt(Rv));
+    end;
+    vtcAssignment:
+    begin
+      Rv := InString[StartPos];
+      Inc(StartPos);
+      if InString[StartPos] = '=' then
+      begin
+        Inc(StartPos);
+        Rv := ':=';
+      end
+      else
+      begin
+        VarType := vtcDelimiter;
+        Rv      := ':';
+      end;
+    end;
+    vtcQString:
+    begin
+      Inc(StartPos);
+      while InString[StartPos] <> '''' do
+      begin
+        Rv := Rv + InString[StartPos];
+        Inc(StartPos);
+      end;
+      Inc(StartPos);
+    end;
+    vtcDString:
+    begin
+      Inc(StartPos);
+      while InString[StartPos] <> '"' do
+      begin
+        Rv := Rv + InString[StartPos];
+        Inc(StartPos);
+      end;
+      Inc(StartPos);
+    end;
+    vtcRelOp:
+    begin
+      Rv := InString[StartPos];
+      if Rv = '<' then
+      begin
+        if InString[StartPos + 1] in ['=', '>'] then
+        begin
+          Rv := Rv + InString[StartPos + 1];
+          StartPos := StartPos + 2;
+        end
+        else
+        begin
+          Inc(StartPos);
+        end;
+      end
+      else if Rv = '>' then
+      begin
+        if InString[StartPos + 1] in ['=', '<'] then
+        begin
+          Rv := Rv + InString[StartPos + 1];
+          StartPos := StartPos + 2;
+        end
+        else
+        begin
+          Inc(StartPos);
+        end;
+      end
+      else
+      begin
+        Inc(StartPos);
+      end;
+    end;
+  end;
+  GetWord := Rv;
+end;
+
+{$IFDEF SQLite_Static} 
+Var 
+  TZInfo  :_TIME_ZONE_INFORMATION; 
+  TZRes   :Integer; 
+
+initialization 
+  PInteger(@__timezone)^:=0; 
+  PInteger(@__daylight)^:=0; 
+  TZRes:=GetTimezoneInformation(TZInfo); 
+  if TZRes>=0 Then 
+    PInteger(@__timezone)^:=TZInfo.Bias*60; 
+  if TZRes=TIME_ZONE_ID_DAYLIGHT Then 
+    PInteger(@__daylight)^:=1; 
+{$ENDIF} 
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAADODriverHtml.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAADODriverHtml.res
new file mode 100644
index 0000000..98b7c6e
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAADODriverHtml.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAADODrv.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAADODrv.cfg
new file mode 100644
index 0000000..fbc8cdc
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAADODrv.cfg	
@@ -0,0 +1,46 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-GD
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-E"..\..\Bin"
+-LE"c:\program files\borland\delphi7\Projects\Bpl"
+-LN"c:\program files\borland\delphi7\Projects\Bpl"
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAADODrv.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAADODrv.dof
new file mode 100644
index 0000000..1a2d3d6
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAADODrv.dof	
@@ -0,0 +1,116 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=3
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=
+
+[Directories]
+OutputDir=..\..\Bin
+UnitOutputDir=
+PackageDLLOutputDir=
+PackageDCPOutputDir=
+SearchPath=
+Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;dclOfficeXP;RemObjects_DataSnap_D7;PurposesoftD7;addict3_d6;tb2kComplete_70;CDKDesignTimeSupport;CDKSmp;CDK;ES_CodeSite20;ESDelphiCommandCompiler;ESFileSearch;ESVisualCompositeExpert;EaglWk;ESGraphUtils;ESBase;ESVsCp;ESSampleComposites70;ESSampleCompositeEditors7;Rz252N70;SynEdit_D7;dxsbD7;dxComnD7;dxDockingD7;dxEdtrD7;dxELibD7;dxExELD7;EQGridD7;dxExRwD7;dxDBEdD7;dxInsD7;dxGrEdD7;ECQDBCD7;EQTLD7;EQDBTLD7;dxLayoutControlD7;dxMasterViewD7;dxmdsD7;dxNavBarD7;dxObjInsD7;dxPageControlD7;dxPSCoreD7;Rz252D70;cxPageControlVCLD7;cxEditorsVCLD7;dxThemeD7;cxLibraryVCLD7;cxDataD7;cxGridUtilsVCLD7;cxGridVCLD7;RemObjects_BPDX_D7
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=3.0.0.287
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=Data Abstract
+ProductVersion=2.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAADODrv.dpr b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAADODrv.dpr
new file mode 100644
index 0000000..7d130a8
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAADODrv.dpr	
@@ -0,0 +1,13 @@
+library DAADODrv;
+
+uses
+  ShareMem,
+  uDAADODriver in 'uDAADODriver.pas',
+  uDAADOInterfaces in '..\uDAADOInterfaces.pas';
+
+{$E dad}
+
+{$R *.res}
+{$R DAADODriverHtml.res}
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAADODrv.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAADODrv.res
new file mode 100644
index 0000000..155b50d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAADODrv.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAAnyDACDriverHtml.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAAnyDACDriverHtml.res
new file mode 100644
index 0000000..93f013e
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAAnyDACDriverHtml.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAAnyDACDrv.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAAnyDACDrv.cfg
new file mode 100644
index 0000000..9f8c69f
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAAnyDACDrv.cfg	
@@ -0,0 +1,37 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-E"..\..\Bin"
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAAnyDACDrv.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAAnyDACDrv.dof
new file mode 100644
index 0000000..b542147
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAAnyDACDrv.dof	
@@ -0,0 +1,117 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=
+
+[Directories]
+OutputDir=..\..\Bin
+UnitOutputDir=
+PackageDLLOutputDir=
+PackageDCPOutputDir=
+SearchPath=
+Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;dclOfficeXP;RemObjects_DataSnap_D7;PurposesoftD7;addict3_d6;tb2kComplete_70;CDKDesignTimeSupport;CDKSmp;CDK;ES_CodeSite20;ESDelphiCommandCompiler;ESFileSearch;ESVisualCompositeExpert;EaglWk;ESGraphUtils;ESBase;ESVsCp;ESSampleComposites70;ESSampleCompositeEditors7;Rz252N70;SynEdit_D7;dxsbD7;dxComnD7;dxDockingD7;dxEdtrD7;dxELibD7;dxExELD7;EQGridD7;dxExRwD7;dxDBEdD7;dxInsD7;dxGrEdD7;ECQDBCD7;EQTLD7;EQDBTLD7;dxLayoutControlD7;dxMasterViewD7;dxmdsD7;dxNavBarD7;dxObjInsD7;dxPageControlD7;dxPSCoreD7;Rz252D70;cxPageControlVCLD7;cxEditorsVCLD7;dxThemeD7;cxLibraryVCLD7;cxDataD7;cxGridUtilsVCLD7;cxGridVCLD7;RemObjects_BPDX_D7
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=
+FileDescription=
+FileVersion=5.0.5.25
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+Comments=
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAAnyDACDrv.dpr b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAAnyDACDrv.dpr
new file mode 100644
index 0000000..ab5ec53
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAAnyDACDrv.dpr	
@@ -0,0 +1,12 @@
+library DAAnyDACDrv;
+
+uses
+  ShareMem,
+  uDAAnyDACDriver in 'uDAAnyDACDriver.pas';
+
+{$E dad}
+
+{$R *.res}
+{$R DAAnyDACDriverHtml.res}
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAAnyDACDrv.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAAnyDACDrv.res
new file mode 100644
index 0000000..84f461e
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAAnyDACDrv.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DABDEDriverHtml.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DABDEDriverHtml.res
new file mode 100644
index 0000000..57e2373
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DABDEDriverHtml.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DABDEDrv.bdsproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DABDEDrv.bdsproj
new file mode 100644
index 0000000..720c571
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DABDEDrv.bdsproj	
@@ -0,0 +1,173 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality">Delphi.Personality</Option>
+			<Option Name="ProjectType">VCLApplication</Option>
+			<Option Name="Version">1.0</Option>
+			<Option Name="GUID">{9B98595C-7A8A-4139-9638-98A40A460278}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource">DABDEDrv.dpr</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A">8</Compiler>
+			<Compiler Name="B">0</Compiler>
+			<Compiler Name="C">1</Compiler>
+			<Compiler Name="D">1</Compiler>
+			<Compiler Name="E">0</Compiler>
+			<Compiler Name="F">0</Compiler>
+			<Compiler Name="G">1</Compiler>
+			<Compiler Name="H">1</Compiler>
+			<Compiler Name="I">1</Compiler>
+			<Compiler Name="J">0</Compiler>
+			<Compiler Name="K">0</Compiler>
+			<Compiler Name="L">1</Compiler>
+			<Compiler Name="M">0</Compiler>
+			<Compiler Name="N">1</Compiler>
+			<Compiler Name="O">0</Compiler>
+			<Compiler Name="P">1</Compiler>
+			<Compiler Name="Q">0</Compiler>
+			<Compiler Name="R">0</Compiler>
+			<Compiler Name="S">0</Compiler>
+			<Compiler Name="T">0</Compiler>
+			<Compiler Name="U">0</Compiler>
+			<Compiler Name="V">1</Compiler>
+			<Compiler Name="W">0</Compiler>
+			<Compiler Name="X">1</Compiler>
+			<Compiler Name="Y">1</Compiler>
+			<Compiler Name="Z">1</Compiler>
+			<Compiler Name="ShowHints">True</Compiler>
+			<Compiler Name="ShowWarnings">True</Compiler>
+			<Compiler Name="UnitAliases">WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;</Compiler>
+			<Compiler Name="NamespacePrefix"></Compiler>
+			<Compiler Name="GenerateDocumentation">False</Compiler>
+			<Compiler Name="DefaultNamespace"></Compiler>
+			<Compiler Name="SymbolDeprecated">True</Compiler>
+			<Compiler Name="SymbolLibrary">True</Compiler>
+			<Compiler Name="SymbolPlatform">True</Compiler>
+			<Compiler Name="SymbolExperimental">True</Compiler>
+			<Compiler Name="UnitLibrary">True</Compiler>
+			<Compiler Name="UnitPlatform">True</Compiler>
+			<Compiler Name="UnitDeprecated">True</Compiler>
+			<Compiler Name="UnitExperimental">True</Compiler>
+			<Compiler Name="HResultCompat">True</Compiler>
+			<Compiler Name="HidingMember">True</Compiler>
+			<Compiler Name="HiddenVirtual">True</Compiler>
+			<Compiler Name="Garbage">True</Compiler>
+			<Compiler Name="BoundsError">True</Compiler>
+			<Compiler Name="ZeroNilCompat">True</Compiler>
+			<Compiler Name="StringConstTruncated">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar">True</Compiler>
+			<Compiler Name="TypedConstVarPar">True</Compiler>
+			<Compiler Name="AsgToTypedConst">True</Compiler>
+			<Compiler Name="CaseLabelRange">True</Compiler>
+			<Compiler Name="ForVariable">True</Compiler>
+			<Compiler Name="ConstructingAbstract">True</Compiler>
+			<Compiler Name="ComparisonFalse">True</Compiler>
+			<Compiler Name="ComparisonTrue">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned">True</Compiler>
+			<Compiler Name="UnsupportedConstruct">True</Compiler>
+			<Compiler Name="FileOpen">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc">True</Compiler>
+			<Compiler Name="BadGlobalSymbol">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor">True</Compiler>
+			<Compiler Name="InvalidDirective">True</Compiler>
+			<Compiler Name="PackageNoLink">True</Compiler>
+			<Compiler Name="PackageThreadVar">True</Compiler>
+			<Compiler Name="ImplicitImport">True</Compiler>
+			<Compiler Name="HPPEMITIgnored">True</Compiler>
+			<Compiler Name="NoRetVal">True</Compiler>
+			<Compiler Name="UseBeforeDef">True</Compiler>
+			<Compiler Name="ForLoopVarUndef">True</Compiler>
+			<Compiler Name="UnitNameMismatch">True</Compiler>
+			<Compiler Name="NoCFGFileFound">True</Compiler>
+			<Compiler Name="ImplicitVariants">True</Compiler>
+			<Compiler Name="UnicodeToLocale">True</Compiler>
+			<Compiler Name="LocaleToUnicode">True</Compiler>
+			<Compiler Name="ImagebaseMultiple">True</Compiler>
+			<Compiler Name="SuspiciousTypecast">True</Compiler>
+			<Compiler Name="PrivatePropAccessor">True</Compiler>
+			<Compiler Name="UnsafeType">False</Compiler>
+			<Compiler Name="UnsafeCode">False</Compiler>
+			<Compiler Name="UnsafeCast">False</Compiler>
+			<Compiler Name="OptionTruncated">True</Compiler>
+			<Compiler Name="WideCharReduced">True</Compiler>
+			<Compiler Name="DuplicatesIgnored">True</Compiler>
+			<Compiler Name="UnitInitSeq">True</Compiler>
+			<Compiler Name="LocalPInvoke">True</Compiler>
+			<Compiler Name="MessageDirective">True</Compiler>
+			<Compiler Name="CodePage"></Compiler>
+		</Compiler>
+		<Linker>
+			<Linker Name="MapFile">3</Linker>
+			<Linker Name="OutputObjs">0</Linker>
+			<Linker Name="GenerateHpps">False</Linker>
+			<Linker Name="ConsoleApp">1</Linker>
+			<Linker Name="DebugInfo">True</Linker>
+			<Linker Name="RemoteSymbols">False</Linker>
+			<Linker Name="GenerateDRC">False</Linker>
+			<Linker Name="MinStackSize">16384</Linker>
+			<Linker Name="MaxStackSize">1048576</Linker>
+			<Linker Name="ImageBase">4194304</Linker>
+			<Linker Name="ExeDescription"></Linker>
+		</Linker>
+		<Directories>
+			<Directories Name="OutputDir">..\..\bin</Directories>
+			<Directories Name="UnitOutputDir"></Directories>
+			<Directories Name="PackageDLLOutputDir"></Directories>
+			<Directories Name="PackageDCPOutputDir"></Directories>
+			<Directories Name="SearchPath">$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</Directories>
+			<Directories Name="Conditionals"></Directories>
+			<Directories Name="DebugSourceDirs"></Directories>
+			<Directories Name="UsePackages">False</Directories>  <Directories Name="Packages"></Directories>
+    </Directories>
+		<Parameters>
+			<Parameters Name="RunParams"></Parameters>
+			<Parameters Name="HostApplication">D:\Program Files\RemObjects Software\Data Abstract\DASchemaModeler.exe</Parameters>
+			<Parameters Name="Launcher"></Parameters>
+			<Parameters Name="UseLauncher">False</Parameters>
+			<Parameters Name="DebugCWD"></Parameters>
+			<Parameters Name="Debug Symbols Search Path"></Parameters>
+			<Parameters Name="LoadAllSymbols">True</Parameters>
+			<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+		</Parameters>
+		<Language>
+			<Language Name="ActiveLang"></Language>
+			<Language Name="ProjectLang">$00000000</Language>
+			<Language Name="RootDir"></Language>
+		</Language>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+			<VersionInfo Name="MajorVer">3</VersionInfo>
+			<VersionInfo Name="MinorVer">0</VersionInfo>
+			<VersionInfo Name="Release">0</VersionInfo>
+			<VersionInfo Name="Build">290</VersionInfo>
+			<VersionInfo Name="Debug">False</VersionInfo>
+			<VersionInfo Name="PreRelease">False</VersionInfo>
+			<VersionInfo Name="Special">False</VersionInfo>
+			<VersionInfo Name="Private">False</VersionInfo>
+			<VersionInfo Name="DLL">False</VersionInfo>
+			<VersionInfo Name="Locale">1033</VersionInfo>
+			<VersionInfo Name="CodePage">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion">3.0.0.290</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName">Data Abstract</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion">2.0.0.0</VersionInfoKeys>
+		</VersionInfoKeys>
+	</Delphi.Personality>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DABDEDrv.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DABDEDrv.cfg
new file mode 100644
index 0000000..695c614
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DABDEDrv.cfg	
@@ -0,0 +1,39 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O-
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-GD
+-cg
+-vn
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-E"..\..\bin"
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DABDEDrv.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DABDEDrv.dof
new file mode 100644
index 0000000..593b787
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DABDEDrv.dof	
@@ -0,0 +1,94 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Directories]
+OutputDir=..\..\Bin
+UnitOutputDir=
+PackageDLLOutputDir=
+PackageDCPOutputDir=
+SearchPath=
+Packages=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DABDEDrv.dpr b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DABDEDrv.dpr
new file mode 100644
index 0000000..f00c885
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DABDEDrv.dpr	
@@ -0,0 +1,12 @@
+library DABDEDrv;
+
+uses
+  ShareMem,
+  uDABDEDriver in 'uDABDEDriver.pas';
+
+{$E dad}
+
+{$R *.res}
+{$R DABDEDriverHtml.res}
+begin
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DABDEDrv.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DABDEDrv.res
new file mode 100644
index 0000000..155b50d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DABDEDrv.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBISAM3Drv.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBISAM3Drv.cfg
new file mode 100644
index 0000000..4a853d2
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBISAM3Drv.cfg	
@@ -0,0 +1,41 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J+
+-$K-
+-$L+
+-$M-
+-$N+
+-$O-
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-E"..\..\Bin"
+-LE"c:\program files\borland\delphi7\Projects\Bpl"
+-LN"c:\program files\borland\delphi7\Projects\Bpl"
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_PLATFORM
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBISAM3Drv.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBISAM3Drv.dof
new file mode 100644
index 0000000..af7d0f6
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBISAM3Drv.dof	
@@ -0,0 +1,116 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=1
+K=0
+L=1
+M=0
+N=1
+O=0
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=Purposesoft HtmlEdit 2.0
+
+[Directories]
+OutputDir=..\..\Bin
+UnitOutputDir=
+PackageDLLOutputDir=
+PackageDCPOutputDir=
+SearchPath=
+Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;dclOfficeXP;RemObjects_DataSnap_D7;PurposesoftD7;addict3_d6;tb2kComplete_70;CDK;ES_CodeSite20;ESDelphiCommandCompiler;ESFileSearch;ESVisualCompositeExpert;CDKSmp;EaglWk;ESGraphUtils;ESBase;CDKDesignTimeSupport;ESVsCp;ESSampleCompositeEditors7;ESSampleComposites70;SynEdit_D7;dxsbD7;dxComnD7;dxExELD7;dxGrEdD7;ECQDBCD7;EQTLD7;dxEdtrD7;EQDBTLD7;EQGridD7;dxMasterViewD7;dxmdsd7;dxObjInsD7;dxPSCoreD7;Rz252N70;Rz252D70;madBasic_;madHelp_;madDisAsm_;madExcept_;EzSpecials_D7;sq7;kprocs7;dxDockingD7;dxLayoutControlD7;dxPageControlD7;cxEditorsVCLD7;cxLibraryVCLD7;dxThemeD7;cxDataD7;cxGridUtilsVCLD7;cxGridVCLD7;Phoenix_Core_D7;cxPageControlVCLD7;dxELibD7;dxExRwD7;dxDBEdD7;dxInsD7;dxNavBarD7;Phoenix_IDE_D7;DataAbstract_Core_D7;DataAbstract_DBXDriver_D7;cxWebD7;cxWebPascalScriptD7;cxWebTeeChartD7;cxWebSnapD7;SchemaModelerUtils_d7;Ani95_D7;DataAbstract_IDE_D7;DataAbstract_DiskDriver_D7
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=
+FileDescription=
+FileVersion=3.0.0.50
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBISAM3Drv.dpr b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBISAM3Drv.dpr
new file mode 100644
index 0000000..8efca9c
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBISAM3Drv.dpr	
@@ -0,0 +1,18 @@
+library DADBISAM3Drv;
+
+uses
+  ShareMem,
+  uDADBISAMDriver in 'uDADBISAMDriver.pas';
+
+{$E dad}
+
+{$I dbisamvr.inc}
+{$IFDEF DBISAM_V4}
+Please only build this driver dpr with DBISAM3
+{$ENDIF DBISAM_V4}
+
+{$R *.res}
+{$R DADBISAMDriverHtml.res}
+
+begin
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBISAM3Drv.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBISAM3Drv.res
new file mode 100644
index 0000000..155b50d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBISAM3Drv.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBISAM4Drv.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBISAM4Drv.cfg
new file mode 100644
index 0000000..4a853d2
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBISAM4Drv.cfg	
@@ -0,0 +1,41 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J+
+-$K-
+-$L+
+-$M-
+-$N+
+-$O-
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-E"..\..\Bin"
+-LE"c:\program files\borland\delphi7\Projects\Bpl"
+-LN"c:\program files\borland\delphi7\Projects\Bpl"
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_PLATFORM
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBISAM4Drv.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBISAM4Drv.dof
new file mode 100644
index 0000000..af7d0f6
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBISAM4Drv.dof	
@@ -0,0 +1,116 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=1
+K=0
+L=1
+M=0
+N=1
+O=0
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=Purposesoft HtmlEdit 2.0
+
+[Directories]
+OutputDir=..\..\Bin
+UnitOutputDir=
+PackageDLLOutputDir=
+PackageDCPOutputDir=
+SearchPath=
+Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;dclOfficeXP;RemObjects_DataSnap_D7;PurposesoftD7;addict3_d6;tb2kComplete_70;CDK;ES_CodeSite20;ESDelphiCommandCompiler;ESFileSearch;ESVisualCompositeExpert;CDKSmp;EaglWk;ESGraphUtils;ESBase;CDKDesignTimeSupport;ESVsCp;ESSampleCompositeEditors7;ESSampleComposites70;SynEdit_D7;dxsbD7;dxComnD7;dxExELD7;dxGrEdD7;ECQDBCD7;EQTLD7;dxEdtrD7;EQDBTLD7;EQGridD7;dxMasterViewD7;dxmdsd7;dxObjInsD7;dxPSCoreD7;Rz252N70;Rz252D70;madBasic_;madHelp_;madDisAsm_;madExcept_;EzSpecials_D7;sq7;kprocs7;dxDockingD7;dxLayoutControlD7;dxPageControlD7;cxEditorsVCLD7;cxLibraryVCLD7;dxThemeD7;cxDataD7;cxGridUtilsVCLD7;cxGridVCLD7;Phoenix_Core_D7;cxPageControlVCLD7;dxELibD7;dxExRwD7;dxDBEdD7;dxInsD7;dxNavBarD7;Phoenix_IDE_D7;DataAbstract_Core_D7;DataAbstract_DBXDriver_D7;cxWebD7;cxWebPascalScriptD7;cxWebTeeChartD7;cxWebSnapD7;SchemaModelerUtils_d7;Ani95_D7;DataAbstract_IDE_D7;DataAbstract_DiskDriver_D7
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=
+FileDescription=
+FileVersion=3.0.0.50
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBISAM4Drv.dpr b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBISAM4Drv.dpr
new file mode 100644
index 0000000..c81ef35
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBISAM4Drv.dpr	
@@ -0,0 +1,18 @@
+library DADBISAM4Drv;
+
+uses
+  ShareMem,
+  uDADBISAMDriver in 'uDADBISAMDriver.pas';
+
+{$E dad}
+
+{$I dbisamvr.inc}
+{$IFNDEF DBISAM_V4}
+Please only build this driver dpr with DBISAM4
+{$ENDIF DBISAM_V4}
+
+{$R *.res}
+{$R DADBISAMDriverHtml.res}
+
+begin
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBISAM4Drv.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBISAM4Drv.res
new file mode 100644
index 0000000..155b50d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBISAM4Drv.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBISAMDriverHtml.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBISAMDriverHtml.res
new file mode 100644
index 0000000..449e052
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBISAMDriverHtml.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBXDriverHtml.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBXDriverHtml.res
new file mode 100644
index 0000000..d7774e2
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBXDriverHtml.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBXDrv.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBXDrv.cfg
new file mode 100644
index 0000000..b0ec5d7
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBXDrv.cfg	
@@ -0,0 +1,45 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-E"..\..\Bin"
+-LE"c:\program files\borland\delphi7\Projects\Bpl"
+-LN"c:\program files\borland\delphi7\Projects\Bpl"
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBXDrv.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBXDrv.dof
new file mode 100644
index 0000000..daabfcd
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBXDrv.dof	
@@ -0,0 +1,116 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=
+
+[Directories]
+OutputDir=..\..\Bin
+UnitOutputDir=
+PackageDLLOutputDir=
+PackageDCPOutputDir=
+SearchPath=
+Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;dclOfficeXP;RemObjects_DataSnap_D7;PurposesoftD7;addict3_d6;tb2kComplete_70;CDKDesignTimeSupport;CDKSmp;CDK;ES_CodeSite20;ESDelphiCommandCompiler;ESFileSearch;ESVisualCompositeExpert;EaglWk;ESGraphUtils;ESBase;ESVsCp;ESSampleComposites70;ESSampleCompositeEditors7;Rz252N70;SynEdit_D7;dxsbD7;dxComnD7;dxDockingD7;dxEdtrD7;dxELibD7;dxExELD7;EQGridD7;dxExRwD7;dxDBEdD7;dxInsD7;dxGrEdD7;ECQDBCD7;EQTLD7;EQDBTLD7;dxLayoutControlD7;dxMasterViewD7;dxmdsd7;dxNavBarD7;dxObjInsD7;dxPageControlD7;dxPSCoreD7;Rz252D70;cxPageControlVCLD7;cxEditorsVCLD7;dxThemeD7;cxLibraryVCLD7;cxDataD7;cxGridUtilsVCLD7;cxGridVCLD7;RemObjects_BPDX_D7
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=2.0.0.142
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=Data Abstract
+ProductVersion=2.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBXDrv.dpr b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBXDrv.dpr
new file mode 100644
index 0000000..4c68283
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBXDrv.dpr	
@@ -0,0 +1,13 @@
+library DADBXDrv;
+
+uses
+  ShareMem,
+  uDADBXDriver in 'uDADBXDriver.pas';
+
+{$E dad}
+
+{$R *.res}
+{$R DADBXDriverHtml.res}
+
+begin
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBXDrv.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBXDrv.res
new file mode 100644
index 0000000..155b50d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADBXDrv.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADOADriverHtml.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADOADriverHtml.res
new file mode 100644
index 0000000..077daa2
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADOADriverHtml.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADOADrv.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADOADrv.cfg
new file mode 100644
index 0000000..ce504fe
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADOADrv.cfg	
@@ -0,0 +1,44 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J+
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-E"..\..\bin"
+-LN"D:\Program files.all\Winsys\borland\DCP_70"
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADOADrv.dpr b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADOADrv.dpr
new file mode 100644
index 0000000..6282793
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADOADrv.dpr	
@@ -0,0 +1,15 @@
+library DADOADrv;
+
+uses
+  ShareMem,
+  Forms,
+  SysUtils,
+  Classes,
+  uDADOADriver in 'uDADOADriver.pas';
+
+{$E dad}
+
+{$R *.res}
+{$R DADOADriverHtml.res}
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADOADrv.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADOADrv.res
new file mode 100644
index 0000000..155b50d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DADOADrv.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAElevateDBDriverHtml.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAElevateDBDriverHtml.res
new file mode 100644
index 0000000..e0b8925
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAElevateDBDriverHtml.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAElevateDBDrv.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAElevateDBDrv.cfg
new file mode 100644
index 0000000..a0ce1dc
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAElevateDBDrv.cfg	
@@ -0,0 +1,41 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O-
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-E"..\..\bin"
+-U"d:\program files.all\borland\delphi7\Lib\Debug;"
+-O"d:\program files.all\borland\delphi7\Lib\Debug;"
+-I"d:\program files.all\borland\delphi7\Lib\Debug;"
+-R"d:\program files.all\borland\delphi7\Lib\Debug;"
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAElevateDBDrv.dpr b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAElevateDBDrv.dpr
new file mode 100644
index 0000000..7f7050b
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAElevateDBDrv.dpr	
@@ -0,0 +1,12 @@
+library DAElevateDBDrv;
+
+uses
+  ShareMem,
+  uDAElevateDBDriver in 'uDAElevateDBDriver.pas';
+
+{$E dad}
+
+{$R *.res}
+{$R DAElevateDBDriverHtml.res}
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAElevateDBDrv.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAElevateDBDrv.res
new file mode 100644
index 0000000..08ba56e
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAElevateDBDrv.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAFIBDriverHtml.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAFIBDriverHtml.res
new file mode 100644
index 0000000..d12ca9d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAFIBDriverHtml.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAFIBDrv.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAFIBDrv.cfg
new file mode 100644
index 0000000..a17abb2
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAFIBDrv.cfg	
@@ -0,0 +1,46 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-GD
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-E"..\..\Bin"
+-LE"c:\program files (x86)\borland\delphi7\Projects\Bpl"
+-LN"c:\program files (x86)\borland\delphi7\Projects\Bpl"
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAFIBDrv.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAFIBDrv.dof
new file mode 100644
index 0000000..1a2d3d6
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAFIBDrv.dof	
@@ -0,0 +1,116 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=3
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=
+
+[Directories]
+OutputDir=..\..\Bin
+UnitOutputDir=
+PackageDLLOutputDir=
+PackageDCPOutputDir=
+SearchPath=
+Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;dclOfficeXP;RemObjects_DataSnap_D7;PurposesoftD7;addict3_d6;tb2kComplete_70;CDKDesignTimeSupport;CDKSmp;CDK;ES_CodeSite20;ESDelphiCommandCompiler;ESFileSearch;ESVisualCompositeExpert;EaglWk;ESGraphUtils;ESBase;ESVsCp;ESSampleComposites70;ESSampleCompositeEditors7;Rz252N70;SynEdit_D7;dxsbD7;dxComnD7;dxDockingD7;dxEdtrD7;dxELibD7;dxExELD7;EQGridD7;dxExRwD7;dxDBEdD7;dxInsD7;dxGrEdD7;ECQDBCD7;EQTLD7;EQDBTLD7;dxLayoutControlD7;dxMasterViewD7;dxmdsD7;dxNavBarD7;dxObjInsD7;dxPageControlD7;dxPSCoreD7;Rz252D70;cxPageControlVCLD7;cxEditorsVCLD7;dxThemeD7;cxLibraryVCLD7;cxDataD7;cxGridUtilsVCLD7;cxGridVCLD7;RemObjects_BPDX_D7
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=3.0.0.287
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=Data Abstract
+ProductVersion=2.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAFIBDrv.dpr b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAFIBDrv.dpr
new file mode 100644
index 0000000..1373b9a
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAFIBDrv.dpr	
@@ -0,0 +1,12 @@
+library DAFIBDrv;
+
+uses
+  ShareMem,
+  uDAFIBDriver in 'uDAFIBDriver.pas';
+
+{$E dad}
+
+{$R *.res}
+{$R DAFIBDriverHtml.res}
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAFIBDrv.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAFIBDrv.res
new file mode 100644
index 0000000..155b50d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAFIBDrv.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBDACDriverHtml.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBDACDriverHtml.res
new file mode 100644
index 0000000..4732a47
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBDACDriverHtml.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBDACDrv.dpr b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBDACDrv.dpr
new file mode 100644
index 0000000..5c46278
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBDACDrv.dpr	
@@ -0,0 +1,12 @@
+library DAIBDACDrv;
+
+uses
+  ShareMem,
+  uDAIBDACDriver in 'uDAIBDACDriver.pas';
+
+{$E dad}
+
+{$R *.res}
+{$R DAIBDACDriverHtml.res}
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBDACDrv.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBDACDrv.res
new file mode 100644
index 0000000..233c4ec
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBDACDrv.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBODriverHtml.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBODriverHtml.res
new file mode 100644
index 0000000..32c06f3
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBODriverHtml.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBODrv.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBODrv.cfg
new file mode 100644
index 0000000..301d58f
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBODrv.cfg	
@@ -0,0 +1,39 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-E"..\..\Bin"
+-LE"c:\program files\borland\delphi7\Projects\Bpl"
+-LN"c:\program files\borland\delphi7\Projects\Bpl"
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBODrv.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBODrv.dof
new file mode 100644
index 0000000..daabfcd
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBODrv.dof	
@@ -0,0 +1,116 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=
+
+[Directories]
+OutputDir=..\..\Bin
+UnitOutputDir=
+PackageDLLOutputDir=
+PackageDCPOutputDir=
+SearchPath=
+Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;dclOfficeXP;RemObjects_DataSnap_D7;PurposesoftD7;addict3_d6;tb2kComplete_70;CDKDesignTimeSupport;CDKSmp;CDK;ES_CodeSite20;ESDelphiCommandCompiler;ESFileSearch;ESVisualCompositeExpert;EaglWk;ESGraphUtils;ESBase;ESVsCp;ESSampleComposites70;ESSampleCompositeEditors7;Rz252N70;SynEdit_D7;dxsbD7;dxComnD7;dxDockingD7;dxEdtrD7;dxELibD7;dxExELD7;EQGridD7;dxExRwD7;dxDBEdD7;dxInsD7;dxGrEdD7;ECQDBCD7;EQTLD7;EQDBTLD7;dxLayoutControlD7;dxMasterViewD7;dxmdsd7;dxNavBarD7;dxObjInsD7;dxPageControlD7;dxPSCoreD7;Rz252D70;cxPageControlVCLD7;cxEditorsVCLD7;dxThemeD7;cxLibraryVCLD7;cxDataD7;cxGridUtilsVCLD7;cxGridVCLD7;RemObjects_BPDX_D7
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=2.0.0.142
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=Data Abstract
+ProductVersion=2.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBODrv.dpr b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBODrv.dpr
new file mode 100644
index 0000000..152fbe5
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBODrv.dpr	
@@ -0,0 +1,13 @@
+library DAIBODrv;
+
+uses
+  ShareMem,
+  uDAIBODriver in 'uDAIBODriver.pas';
+
+{$E dad}
+
+{$R *.res}
+{$R DAIBODriverHtml.res}
+
+begin
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBODrv.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBODrv.res
new file mode 100644
index 0000000..155b50d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBODrv.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBXDriverHtml.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBXDriverHtml.res
new file mode 100644
index 0000000..790cda2
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBXDriverHtml.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBXDrv.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBXDrv.cfg
new file mode 100644
index 0000000..b0ec5d7
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBXDrv.cfg	
@@ -0,0 +1,45 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-E"..\..\Bin"
+-LE"c:\program files\borland\delphi7\Projects\Bpl"
+-LN"c:\program files\borland\delphi7\Projects\Bpl"
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBXDrv.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBXDrv.dof
new file mode 100644
index 0000000..daabfcd
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBXDrv.dof	
@@ -0,0 +1,116 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=
+
+[Directories]
+OutputDir=..\..\Bin
+UnitOutputDir=
+PackageDLLOutputDir=
+PackageDCPOutputDir=
+SearchPath=
+Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;dclOfficeXP;RemObjects_DataSnap_D7;PurposesoftD7;addict3_d6;tb2kComplete_70;CDKDesignTimeSupport;CDKSmp;CDK;ES_CodeSite20;ESDelphiCommandCompiler;ESFileSearch;ESVisualCompositeExpert;EaglWk;ESGraphUtils;ESBase;ESVsCp;ESSampleComposites70;ESSampleCompositeEditors7;Rz252N70;SynEdit_D7;dxsbD7;dxComnD7;dxDockingD7;dxEdtrD7;dxELibD7;dxExELD7;EQGridD7;dxExRwD7;dxDBEdD7;dxInsD7;dxGrEdD7;ECQDBCD7;EQTLD7;EQDBTLD7;dxLayoutControlD7;dxMasterViewD7;dxmdsd7;dxNavBarD7;dxObjInsD7;dxPageControlD7;dxPSCoreD7;Rz252D70;cxPageControlVCLD7;cxEditorsVCLD7;dxThemeD7;cxLibraryVCLD7;cxDataD7;cxGridUtilsVCLD7;cxGridVCLD7;RemObjects_BPDX_D7
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=2.0.0.142
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=Data Abstract
+ProductVersion=2.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBXDrv.dpr b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBXDrv.dpr
new file mode 100644
index 0000000..39dde39
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBXDrv.dpr	
@@ -0,0 +1,13 @@
+library DAIBXDrv;
+
+uses
+  ShareMem,
+  uDAIBXDriver in 'uDAIBXDriver.pas';
+
+{$E dad}
+
+{$R *.res}
+{$R DAIBXDriverHtml.res}
+
+begin
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBXDrv.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBXDrv.res
new file mode 100644
index 0000000..155b50d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAIBXDrv.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAMyDACDriverHtml.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAMyDACDriverHtml.res
new file mode 100644
index 0000000..e1fa180
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAMyDACDriverHtml.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAMyDACDrv.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAMyDACDrv.cfg
new file mode 100644
index 0000000..301d58f
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAMyDACDrv.cfg	
@@ -0,0 +1,39 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-E"..\..\Bin"
+-LE"c:\program files\borland\delphi7\Projects\Bpl"
+-LN"c:\program files\borland\delphi7\Projects\Bpl"
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAMyDACDrv.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAMyDACDrv.dof
new file mode 100644
index 0000000..dd86d8f
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAMyDACDrv.dof	
@@ -0,0 +1,115 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=
+
+[Directories]
+OutputDir=..\..\Bin
+UnitOutputDir=
+PackageDLLOutputDir=
+PackageDCPOutputDir=
+SearchPath=
+Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;dclOfficeXP;RemObjects_DataSnap_D7;PurposesoftD7;addict3_d6;tb2kComplete_70;CDKDesignTimeSupport;CDKSmp;CDK;ES_CodeSite20;ESDelphiCommandCompiler;ESFileSearch;ESVisualCompositeExpert;EaglWk;ESGraphUtils;ESBase;ESVsCp;ESSampleComposites70;ESSampleCompositeEditors7;Rz252N70;SynEdit_D7;dxsbD7;dxComnD7;dxDockingD7;dxEdtrD7;dxELibD7;dxExELD7;EQGridD7;dxExRwD7;dxDBEdD7;dxInsD7;dxGrEdD7;ECQDBCD7;EQTLD7;EQDBTLD7;dxLayoutControlD7;dxMasterViewD7;dxmdsd7;dxNavBarD7;dxObjInsD7;dxPageControlD7;dxPSCoreD7;Rz252D70;cxPageControlVCLD7;cxEditorsVCLD7;dxThemeD7;cxLibraryVCLD7;cxDataD7;cxGridUtilsVCLD7;cxGridVCLD7;RemObjects_BPDX_D7
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=2.0.0.178
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=Data Abstract
+ProductVersion=2.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAMyDACDrv.dpr b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAMyDACDrv.dpr
new file mode 100644
index 0000000..971e17b
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAMyDACDrv.dpr	
@@ -0,0 +1,12 @@
+library DAMyDACDrv;
+
+uses
+  ShareMem,
+  uDAMyDACDriver in 'uDAMyDACDriver.pas';
+
+{$E dad}
+
+{$R *.res}
+{$R DAMyDACDriverHtml.res}
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAMyDACDrv.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAMyDACDrv.res
new file mode 100644
index 0000000..155b50d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAMyDACDrv.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAMySQLDACDriverHtml.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAMySQLDACDriverHtml.res
new file mode 100644
index 0000000..c7f7a82
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAMySQLDACDriverHtml.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAMySQLDACDrv.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAMySQLDACDrv.cfg
new file mode 100644
index 0000000..40c80d0
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAMySQLDACDrv.cfg	
@@ -0,0 +1,45 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-E"..\..\Bin"
+-LE"c:\program files (x86)\borland\delphi7\Projects\Bpl"
+-LN"c:\program files (x86)\borland\delphi7\Projects\Bpl"
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAMySQLDACDrv.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAMySQLDACDrv.dof
new file mode 100644
index 0000000..dd86d8f
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAMySQLDACDrv.dof	
@@ -0,0 +1,115 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=
+
+[Directories]
+OutputDir=..\..\Bin
+UnitOutputDir=
+PackageDLLOutputDir=
+PackageDCPOutputDir=
+SearchPath=
+Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;dclOfficeXP;RemObjects_DataSnap_D7;PurposesoftD7;addict3_d6;tb2kComplete_70;CDKDesignTimeSupport;CDKSmp;CDK;ES_CodeSite20;ESDelphiCommandCompiler;ESFileSearch;ESVisualCompositeExpert;EaglWk;ESGraphUtils;ESBase;ESVsCp;ESSampleComposites70;ESSampleCompositeEditors7;Rz252N70;SynEdit_D7;dxsbD7;dxComnD7;dxDockingD7;dxEdtrD7;dxELibD7;dxExELD7;EQGridD7;dxExRwD7;dxDBEdD7;dxInsD7;dxGrEdD7;ECQDBCD7;EQTLD7;EQDBTLD7;dxLayoutControlD7;dxMasterViewD7;dxmdsd7;dxNavBarD7;dxObjInsD7;dxPageControlD7;dxPSCoreD7;Rz252D70;cxPageControlVCLD7;cxEditorsVCLD7;dxThemeD7;cxLibraryVCLD7;cxDataD7;cxGridUtilsVCLD7;cxGridVCLD7;RemObjects_BPDX_D7
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=2.0.0.178
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=Data Abstract
+ProductVersion=2.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAMySQLDACDrv.dpr b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAMySQLDACDrv.dpr
new file mode 100644
index 0000000..3a48d91
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAMySQLDACDrv.dpr	
@@ -0,0 +1,12 @@
+library DAMySQLDACDrv;
+
+uses
+  ShareMem,
+  uDAMySQLDACDriver in 'uDAMySQLDACDriver.pas';
+
+{$E dad}
+
+{$R *.res}
+{$R DAMySQLDACDriverHtml.res}
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAMySQLDACDrv.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAMySQLDACDrv.res
new file mode 100644
index 0000000..155b50d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAMySQLDACDrv.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DANexusDBDriverHtml.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DANexusDBDriverHtml.res
new file mode 100644
index 0000000..46b9c33
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DANexusDBDriverHtml.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DANexusDBDrv.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DANexusDBDrv.cfg
new file mode 100644
index 0000000..7caebcd
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DANexusDBDrv.cfg	
@@ -0,0 +1,45 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-E"..\..\Data Abstract\Bin"
+-LE"c:\program files\borland\delphi7\Projects\Bpl"
+-LN"c:\program files\borland\delphi7\Projects\Bpl"
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DANexusDBDrv.dpr b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DANexusDBDrv.dpr
new file mode 100644
index 0000000..5d47e04
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DANexusDBDrv.dpr	
@@ -0,0 +1,12 @@
+library DANexusDBDrv;
+
+uses
+  ShareMem,
+  uDANexusDBDriver in 'uDANexusDBDriver.pas';
+
+{$E dad}
+
+{$R *.res}
+{$R DANexusDBDriverHtml.res}
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DANexusDBDrv.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DANexusDBDrv.res
new file mode 100644
index 0000000..155b50d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DANexusDBDrv.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAODACDriverHtml.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAODACDriverHtml.res
new file mode 100644
index 0000000..a096da3
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAODACDriverHtml.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAODACDrv.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAODACDrv.cfg
new file mode 100644
index 0000000..301d58f
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAODACDrv.cfg	
@@ -0,0 +1,39 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-E"..\..\Bin"
+-LE"c:\program files\borland\delphi7\Projects\Bpl"
+-LN"c:\program files\borland\delphi7\Projects\Bpl"
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAODACDrv.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAODACDrv.dof
new file mode 100644
index 0000000..daabfcd
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAODACDrv.dof	
@@ -0,0 +1,116 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=
+
+[Directories]
+OutputDir=..\..\Bin
+UnitOutputDir=
+PackageDLLOutputDir=
+PackageDCPOutputDir=
+SearchPath=
+Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;dclOfficeXP;RemObjects_DataSnap_D7;PurposesoftD7;addict3_d6;tb2kComplete_70;CDKDesignTimeSupport;CDKSmp;CDK;ES_CodeSite20;ESDelphiCommandCompiler;ESFileSearch;ESVisualCompositeExpert;EaglWk;ESGraphUtils;ESBase;ESVsCp;ESSampleComposites70;ESSampleCompositeEditors7;Rz252N70;SynEdit_D7;dxsbD7;dxComnD7;dxDockingD7;dxEdtrD7;dxELibD7;dxExELD7;EQGridD7;dxExRwD7;dxDBEdD7;dxInsD7;dxGrEdD7;ECQDBCD7;EQTLD7;EQDBTLD7;dxLayoutControlD7;dxMasterViewD7;dxmdsd7;dxNavBarD7;dxObjInsD7;dxPageControlD7;dxPSCoreD7;Rz252D70;cxPageControlVCLD7;cxEditorsVCLD7;dxThemeD7;cxLibraryVCLD7;cxDataD7;cxGridUtilsVCLD7;cxGridVCLD7;RemObjects_BPDX_D7
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=2.0.0.142
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=Data Abstract
+ProductVersion=2.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAODACDrv.dpr b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAODACDrv.dpr
new file mode 100644
index 0000000..b2aa1e2
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAODACDrv.dpr	
@@ -0,0 +1,13 @@
+library DAODACDrv;
+
+uses
+  ShareMem,
+  uDAODACDriver in 'uDAODACDriver.pas',
+  uDAOracleInterfaces in '..\uDAOracleInterfaces.pas';
+
+{$E dad}
+
+{$R *.res}
+{$R DAODACDriverHtml.res}
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAODACDrv.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAODACDrv.res
new file mode 100644
index 0000000..155b50d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAODACDrv.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAPostgresDACDriverHtml.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAPostgresDACDriverHtml.res
new file mode 100644
index 0000000..c7f7a82
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAPostgresDACDriverHtml.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAPostgresDACDrv.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAPostgresDACDrv.cfg
new file mode 100644
index 0000000..40c80d0
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAPostgresDACDrv.cfg	
@@ -0,0 +1,45 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-E"..\..\Bin"
+-LE"c:\program files (x86)\borland\delphi7\Projects\Bpl"
+-LN"c:\program files (x86)\borland\delphi7\Projects\Bpl"
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAPostgresDACDrv.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAPostgresDACDrv.dof
new file mode 100644
index 0000000..dd86d8f
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAPostgresDACDrv.dof	
@@ -0,0 +1,115 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=
+
+[Directories]
+OutputDir=..\..\Bin
+UnitOutputDir=
+PackageDLLOutputDir=
+PackageDCPOutputDir=
+SearchPath=
+Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;dclOfficeXP;RemObjects_DataSnap_D7;PurposesoftD7;addict3_d6;tb2kComplete_70;CDKDesignTimeSupport;CDKSmp;CDK;ES_CodeSite20;ESDelphiCommandCompiler;ESFileSearch;ESVisualCompositeExpert;EaglWk;ESGraphUtils;ESBase;ESVsCp;ESSampleComposites70;ESSampleCompositeEditors7;Rz252N70;SynEdit_D7;dxsbD7;dxComnD7;dxDockingD7;dxEdtrD7;dxELibD7;dxExELD7;EQGridD7;dxExRwD7;dxDBEdD7;dxInsD7;dxGrEdD7;ECQDBCD7;EQTLD7;EQDBTLD7;dxLayoutControlD7;dxMasterViewD7;dxmdsd7;dxNavBarD7;dxObjInsD7;dxPageControlD7;dxPSCoreD7;Rz252D70;cxPageControlVCLD7;cxEditorsVCLD7;dxThemeD7;cxLibraryVCLD7;cxDataD7;cxGridUtilsVCLD7;cxGridVCLD7;RemObjects_BPDX_D7
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=2.0.0.178
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=Data Abstract
+ProductVersion=2.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAPostgresDACDrv.dpr b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAPostgresDACDrv.dpr
new file mode 100644
index 0000000..700c0aa
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAPostgresDACDrv.dpr	
@@ -0,0 +1,12 @@
+library DAPostgresDACDrv;
+
+uses
+  ShareMem,
+  uDAPostgresDACDriver in 'uDAPostgresDACDriver.pas';
+
+{$E dad}
+
+{$R *.res}
+{$R DAPostgresDACDriverHtml.res}
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAPostgresDACDrv.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAPostgresDACDrv.res
new file mode 100644
index 0000000..155b50d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAPostgresDACDrv.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DASDACDriverHtml.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DASDACDriverHtml.res
new file mode 100644
index 0000000..2ca3ed1
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DASDACDriverHtml.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DASDACDrv.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DASDACDrv.cfg
new file mode 100644
index 0000000..301d58f
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DASDACDrv.cfg	
@@ -0,0 +1,39 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-E"..\..\Bin"
+-LE"c:\program files\borland\delphi7\Projects\Bpl"
+-LN"c:\program files\borland\delphi7\Projects\Bpl"
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DASDACDrv.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DASDACDrv.dof
new file mode 100644
index 0000000..8c8eb5f
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DASDACDrv.dof	
@@ -0,0 +1,116 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=
+
+[Directories]
+OutputDir=..\..\Bin
+UnitOutputDir=
+PackageDLLOutputDir=
+PackageDCPOutputDir=
+SearchPath=
+Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;dclOfficeXP;RemObjects_DataSnap_D7;PurposesoftD7;addict3_d6;tb2kComplete_70;CDKDesignTimeSupport;CDKSmp;CDK;ES_CodeSite20;ESDelphiCommandCompiler;ESFileSearch;ESVisualCompositeExpert;EaglWk;ESGraphUtils;ESBase;ESVsCp;ESSampleComposites70;ESSampleCompositeEditors7;Rz252N70;SynEdit_D7;dxsbD7;dxComnD7;dxDockingD7;dxEdtrD7;dxELibD7;dxExELD7;EQGridD7;dxExRwD7;dxDBEdD7;dxInsD7;dxGrEdD7;ECQDBCD7;EQTLD7;EQDBTLD7;dxLayoutControlD7;dxMasterViewD7;dxmdsd7;dxNavBarD7;dxObjInsD7;dxPageControlD7;dxPSCoreD7;Rz252D70;cxPageControlVCLD7;cxEditorsVCLD7;dxThemeD7;cxLibraryVCLD7;cxDataD7;cxGridUtilsVCLD7;cxGridVCLD7;RemObjects_BPDX_D7
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=2.0.1.196
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=Data Abstract
+ProductVersion=2.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DASDACDrv.dpr b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DASDACDrv.dpr
new file mode 100644
index 0000000..615439d
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DASDACDrv.dpr	
@@ -0,0 +1,12 @@
+library DASDACDrv;
+
+uses
+  ShareMem,
+  uDASDACDriver in 'uDASDACDriver.pas';
+
+{$E dad}
+
+{$R *.res}
+{$R DASDACDriverHtml.res}
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DASDACDrv.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DASDACDrv.res
new file mode 100644
index 0000000..155b50d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DASDACDrv.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DASQLiteDriverHtml.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DASQLiteDriverHtml.res
new file mode 100644
index 0000000..316f711
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DASQLiteDriverHtml.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DASQLiteDrv.bdsproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DASQLiteDrv.bdsproj
new file mode 100644
index 0000000..584582a
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DASQLiteDrv.bdsproj	
@@ -0,0 +1,182 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality">Delphi.Personality</Option>
+			<Option Name="ProjectType">VCLApplication</Option>
+			<Option Name="Version">1.0</Option>
+			<Option Name="GUID">{5F97886E-15E1-47E5-B346-586F0B37A04B}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource">DASQLiteDrv.dpr</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A">8</Compiler>
+			<Compiler Name="B">0</Compiler>
+			<Compiler Name="C">1</Compiler>
+			<Compiler Name="D">1</Compiler>
+			<Compiler Name="E">0</Compiler>
+			<Compiler Name="F">0</Compiler>
+			<Compiler Name="G">1</Compiler>
+			<Compiler Name="H">1</Compiler>
+			<Compiler Name="I">1</Compiler>
+			<Compiler Name="J">0</Compiler>
+			<Compiler Name="K">0</Compiler>
+			<Compiler Name="L">1</Compiler>
+			<Compiler Name="M">0</Compiler>
+			<Compiler Name="N">1</Compiler>
+			<Compiler Name="O">0</Compiler>
+			<Compiler Name="P">1</Compiler>
+			<Compiler Name="Q">0</Compiler>
+			<Compiler Name="R">0</Compiler>
+			<Compiler Name="S">0</Compiler>
+			<Compiler Name="T">0</Compiler>
+			<Compiler Name="U">0</Compiler>
+			<Compiler Name="V">1</Compiler>
+			<Compiler Name="W">0</Compiler>
+			<Compiler Name="X">1</Compiler>
+			<Compiler Name="Y">1</Compiler>
+			<Compiler Name="Z">1</Compiler>
+			<Compiler Name="ShowHints">True</Compiler>
+			<Compiler Name="ShowWarnings">True</Compiler>
+			<Compiler Name="UnitAliases">WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;</Compiler>
+			<Compiler Name="NamespacePrefix"></Compiler>
+			<Compiler Name="GenerateDocumentation">False</Compiler>
+			<Compiler Name="DefaultNamespace"></Compiler>
+			<Compiler Name="SymbolDeprecated">True</Compiler>
+			<Compiler Name="SymbolLibrary">True</Compiler>
+			<Compiler Name="SymbolPlatform">True</Compiler>
+			<Compiler Name="SymbolExperimental">True</Compiler>
+			<Compiler Name="UnitLibrary">True</Compiler>
+			<Compiler Name="UnitPlatform">True</Compiler>
+			<Compiler Name="UnitDeprecated">True</Compiler>
+			<Compiler Name="UnitExperimental">True</Compiler>
+			<Compiler Name="HResultCompat">True</Compiler>
+			<Compiler Name="HidingMember">True</Compiler>
+			<Compiler Name="HiddenVirtual">True</Compiler>
+			<Compiler Name="Garbage">True</Compiler>
+			<Compiler Name="BoundsError">True</Compiler>
+			<Compiler Name="ZeroNilCompat">True</Compiler>
+			<Compiler Name="StringConstTruncated">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar">True</Compiler>
+			<Compiler Name="TypedConstVarPar">True</Compiler>
+			<Compiler Name="AsgToTypedConst">True</Compiler>
+			<Compiler Name="CaseLabelRange">True</Compiler>
+			<Compiler Name="ForVariable">True</Compiler>
+			<Compiler Name="ConstructingAbstract">True</Compiler>
+			<Compiler Name="ComparisonFalse">True</Compiler>
+			<Compiler Name="ComparisonTrue">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned">True</Compiler>
+			<Compiler Name="UnsupportedConstruct">True</Compiler>
+			<Compiler Name="FileOpen">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc">True</Compiler>
+			<Compiler Name="BadGlobalSymbol">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor">True</Compiler>
+			<Compiler Name="InvalidDirective">True</Compiler>
+			<Compiler Name="PackageNoLink">True</Compiler>
+			<Compiler Name="PackageThreadVar">True</Compiler>
+			<Compiler Name="ImplicitImport">True</Compiler>
+			<Compiler Name="HPPEMITIgnored">True</Compiler>
+			<Compiler Name="NoRetVal">True</Compiler>
+			<Compiler Name="UseBeforeDef">True</Compiler>
+			<Compiler Name="ForLoopVarUndef">True</Compiler>
+			<Compiler Name="UnitNameMismatch">True</Compiler>
+			<Compiler Name="NoCFGFileFound">True</Compiler>
+			<Compiler Name="ImplicitVariants">True</Compiler>
+			<Compiler Name="UnicodeToLocale">True</Compiler>
+			<Compiler Name="LocaleToUnicode">True</Compiler>
+			<Compiler Name="ImagebaseMultiple">True</Compiler>
+			<Compiler Name="SuspiciousTypecast">True</Compiler>
+			<Compiler Name="PrivatePropAccessor">True</Compiler>
+			<Compiler Name="UnsafeType">False</Compiler>
+			<Compiler Name="UnsafeCode">False</Compiler>
+			<Compiler Name="UnsafeCast">False</Compiler>
+			<Compiler Name="OptionTruncated">True</Compiler>
+			<Compiler Name="WideCharReduced">True</Compiler>
+			<Compiler Name="DuplicatesIgnored">True</Compiler>
+			<Compiler Name="UnitInitSeq">True</Compiler>
+			<Compiler Name="LocalPInvoke">True</Compiler>
+			<Compiler Name="MessageDirective">True</Compiler>
+			<Compiler Name="CodePage"></Compiler>
+		</Compiler>
+		<Linker>
+			<Linker Name="MapFile">3</Linker>
+			<Linker Name="OutputObjs">0</Linker>
+			<Linker Name="GenerateHpps">False</Linker>
+			<Linker Name="ConsoleApp">1</Linker>
+			<Linker Name="DebugInfo">False</Linker>
+			<Linker Name="RemoteSymbols">False</Linker>
+			<Linker Name="GenerateDRC">False</Linker>
+			<Linker Name="MinStackSize">16384</Linker>
+			<Linker Name="MaxStackSize">1048576</Linker>
+			<Linker Name="ImageBase">4194304</Linker>
+			<Linker Name="ExeDescription"></Linker>
+		</Linker>
+		<Directories>
+			<Directories Name="OutputDir">D:\Program Files\RemObjects Software\Data Abstract</Directories>
+			<Directories Name="UnitOutputDir"></Directories>
+			<Directories Name="PackageDLLOutputDir"></Directories>
+			<Directories Name="PackageDCPOutputDir"></Directories>
+			<Directories Name="SearchPath">$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10;$(DELPHI)\Lib\Debug</Directories>
+			<Directories Name="Packages">vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;dclOfficeXP;RemObjects_DataSnap_D7;PurposesoftD7;addict3_d6;tb2kComplete_70;CDKDesignTimeSupport;CDKSmp;CDK;ES_CodeSite20;ESDelphiCommandCompiler;ESFileSearch;ESVisualCompositeExpert;EaglWk;ESGraphUtils;ESBase;ESVsCp;ESSampleComposites70;ESSampleCompositeEditors7;Rz252N70;SynEdit_D7;dxsbD7;dxComnD7;dxDockingD7;dxEdtrD7;dxELibD7;dxExELD7;EQGridD7;dxExRwD7;dxDBEdD7;dxInsD7;dxGrEdD7;ECQDBCD7;EQTLD7;EQDBTLD7;dxLayoutControlD7;dxMasterViewD7;dxmdsd7;dxNavBarD7;dxObjInsD7;dxPageControlD7;dxPSCoreD7;Rz252D70;cxPageControlVCLD7;cxEditorsVCLD7;dxThemeD7;cxLibraryVCLD7;cxDataD7;cxGridUtilsVCLD7;cxGridVCLD7;RemObjects_BPDX_D7</Directories>
+			<Directories Name="Conditionals"></Directories>
+			<Directories Name="DebugSourceDirs"></Directories>
+			<Directories Name="UsePackages">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams"></Parameters>
+			<Parameters Name="HostApplication">D:\Program Files\RemObjects Software\Data Abstract\DASchemaModeler.exe</Parameters>
+			<Parameters Name="Launcher"></Parameters>
+			<Parameters Name="UseLauncher">False</Parameters>
+			<Parameters Name="DebugCWD"></Parameters>
+			<Parameters Name="Debug Symbols Search Path"></Parameters>
+			<Parameters Name="LoadAllSymbols">True</Parameters>
+			<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+		</Parameters>
+		<Language>
+			<Language Name="ActiveLang"></Language>
+			<Language Name="ProjectLang">$00000000</Language>
+			<Language Name="RootDir"></Language>
+		</Language>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+			<VersionInfo Name="MajorVer">3</VersionInfo>
+			<VersionInfo Name="MinorVer">0</VersionInfo>
+			<VersionInfo Name="Release">0</VersionInfo>
+			<VersionInfo Name="Build">290</VersionInfo>
+			<VersionInfo Name="Debug">False</VersionInfo>
+			<VersionInfo Name="PreRelease">False</VersionInfo>
+			<VersionInfo Name="Special">False</VersionInfo>
+			<VersionInfo Name="Private">False</VersionInfo>
+			<VersionInfo Name="DLL">False</VersionInfo>
+			<VersionInfo Name="Locale">1033</VersionInfo>
+			<VersionInfo Name="CodePage">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion">3.0.0.290</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName">Data Abstract</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion">2.0.0.0</VersionInfoKeys>
+		</VersionInfoKeys>  <Excluded_Packages>
+      <Excluded_Packages Name="D:\Program Files\RemObjects Software\Data Abstract for Delphi\Dcu\D10\DataAbstract_FIBDriver_D10.bpl">RemObjects Data Abstract - FIBPlus Driver</Excluded_Packages>
+      <Excluded_Packages Name="D:\Program Files\RemObjects Software\Hydra for Delphi\Dcu\D10\Hydra_Core_D10.bpl">RemObjects Hydra - Core Library</Excluded_Packages>
+      <Excluded_Packages Name="D:\Program Files\RemObjects Software\Hydra for Delphi\Dcu\D10\Hydra_IDE_D10.bpl">RemObjects Hydra - IDE Integration</Excluded_Packages>
+      <Excluded_Packages Name="D:\Program Files\RemObjects Software\Hydra for Delphi\Dcu\D10\Hydra_RO_D10.bpl">RemObjects Hydra - RemObjects SDK Integration Library</Excluded_Packages>
+      <Excluded_Packages Name="D:\Program Files\RemObjects Software\Hydra for Delphi\Dcu\D10\Hydra_RO_IDE_D10.bpl">RemObjects Hydra - RemObjects SDK IDE Integration</Excluded_Packages>
+      <Excluded_Packages Name="D:\Program Files\RemObjects Software\NexusDB Pack\Dcu\D10\RemObjects_NexusDB_D10.bpl">RemObjects NexusDB Pack - Library</Excluded_Packages>
+      <Excluded_Packages Name="D:\Program Files\RemObjects Software\NexusDB Pack\Dcu\D10\RemObjects_NexusDB_IDE_D10.bpl">RemObjects NexusDB Pack - IDE Integration</Excluded_Packages>
+    </Excluded_Packages>
+  </Delphi.Personality>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DASQLiteDrv.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DASQLiteDrv.cfg
new file mode 100644
index 0000000..8549342
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DASQLiteDrv.cfg	
@@ -0,0 +1,34 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O-
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-E"..\..\Bin"
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DASQLiteDrv.dpr b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DASQLiteDrv.dpr
new file mode 100644
index 0000000..dafaf13
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DASQLiteDrv.dpr	
@@ -0,0 +1,13 @@
+library DASQLiteDrv;
+
+uses
+  ShareMem,
+  uDASQLiteDriver in 'uDASQLiteDriver.pas';
+
+{$E dad}
+
+{$R *.res}
+{$R DASQLiteDriverHtml.res}
+
+begin
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DASQLiteDrv.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DASQLiteDrv.res
new file mode 100644
index 0000000..155b50d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DASQLiteDrv.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAZeosDriverHtml.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAZeosDriverHtml.res
new file mode 100644
index 0000000..f3000f5
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAZeosDriverHtml.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAZeosDrv.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAZeosDrv.cfg
new file mode 100644
index 0000000..96a1b9a
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAZeosDrv.cfg	
@@ -0,0 +1,41 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O-
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-E"D:\Program Files\RemObjects Software\Data Abstract"
+-U"d:\program files.all\borland\delphi7\Lib\Debug;J:\Products\ACAT\Source"
+-O"d:\program files.all\borland\delphi7\Lib\Debug;J:\Products\ACAT\Source"
+-I"d:\program files.all\borland\delphi7\Lib\Debug;J:\Products\ACAT\Source"
+-R"d:\program files.all\borland\delphi7\Lib\Debug;J:\Products\ACAT\Source"
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAZeosDrv.dpr b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAZeosDrv.dpr
new file mode 100644
index 0000000..a566487
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAZeosDrv.dpr	
@@ -0,0 +1,12 @@
+library DAZeosDrv;
+
+uses
+  ShareMem,
+  uDAZeosDriver in 'uDAZeosDriver.pas';
+
+{$E dad}
+
+{$R *.res}
+{$R DAZeosDriverHtml.res}
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAZeosDrv.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAZeosDrv.res
new file mode 100644
index 0000000..155b50d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DAZeosDrv.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D10.bdsproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D10.bdsproj
new file mode 100644
index 0000000..1e97716
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D10.bdsproj	
@@ -0,0 +1,176 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality">Delphi.Personality</Option>
+			<Option Name="ProjectType"></Option>
+			<Option Name="Version">1.0</Option>
+			<Option Name="GUID">{0FC45B58-F519-40B6-831A-DD79C8D3270F}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource">DataAbstract_ADODriver_D10.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A">8</Compiler>
+			<Compiler Name="B">0</Compiler>
+			<Compiler Name="C">1</Compiler>
+			<Compiler Name="D">1</Compiler>
+			<Compiler Name="E">0</Compiler>
+			<Compiler Name="F">0</Compiler>
+			<Compiler Name="G">1</Compiler>
+			<Compiler Name="H">1</Compiler>
+			<Compiler Name="I">1</Compiler>
+			<Compiler Name="J">0</Compiler>
+			<Compiler Name="K">0</Compiler>
+			<Compiler Name="L">1</Compiler>
+			<Compiler Name="M">0</Compiler>
+			<Compiler Name="N">1</Compiler>
+			<Compiler Name="O">1</Compiler>
+			<Compiler Name="P">1</Compiler>
+			<Compiler Name="Q">0</Compiler>
+			<Compiler Name="R">0</Compiler>
+			<Compiler Name="S">0</Compiler>
+			<Compiler Name="T">0</Compiler>
+			<Compiler Name="U">0</Compiler>
+			<Compiler Name="V">1</Compiler>
+			<Compiler Name="W">0</Compiler>
+			<Compiler Name="X">1</Compiler>
+			<Compiler Name="Y">1</Compiler>
+			<Compiler Name="Z">1</Compiler>
+			<Compiler Name="ShowHints">True</Compiler>
+			<Compiler Name="ShowWarnings">True</Compiler>
+			<Compiler Name="UnitAliases"></Compiler>
+			<Compiler Name="NamespacePrefix"></Compiler>
+			<Compiler Name="GenerateDocumentation">False</Compiler>
+			<Compiler Name="DefaultNamespace"></Compiler>
+			<Compiler Name="SymbolDeprecated">False</Compiler>
+			<Compiler Name="SymbolLibrary">False</Compiler>
+			<Compiler Name="SymbolPlatform">False</Compiler>
+			<Compiler Name="SymbolExperimental">True</Compiler>
+			<Compiler Name="UnitLibrary">False</Compiler>
+			<Compiler Name="UnitPlatform">False</Compiler>
+			<Compiler Name="UnitDeprecated">False</Compiler>
+			<Compiler Name="UnitExperimental">True</Compiler>
+			<Compiler Name="HResultCompat">True</Compiler>
+			<Compiler Name="HidingMember">True</Compiler>
+			<Compiler Name="HiddenVirtual">True</Compiler>
+			<Compiler Name="Garbage">True</Compiler>
+			<Compiler Name="BoundsError">True</Compiler>
+			<Compiler Name="ZeroNilCompat">True</Compiler>
+			<Compiler Name="StringConstTruncated">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar">True</Compiler>
+			<Compiler Name="TypedConstVarPar">True</Compiler>
+			<Compiler Name="AsgToTypedConst">True</Compiler>
+			<Compiler Name="CaseLabelRange">True</Compiler>
+			<Compiler Name="ForVariable">True</Compiler>
+			<Compiler Name="ConstructingAbstract">True</Compiler>
+			<Compiler Name="ComparisonFalse">True</Compiler>
+			<Compiler Name="ComparisonTrue">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned">True</Compiler>
+			<Compiler Name="UnsupportedConstruct">True</Compiler>
+			<Compiler Name="FileOpen">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc">True</Compiler>
+			<Compiler Name="BadGlobalSymbol">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor">True</Compiler>
+			<Compiler Name="InvalidDirective">True</Compiler>
+			<Compiler Name="PackageNoLink">True</Compiler>
+			<Compiler Name="PackageThreadVar">True</Compiler>
+			<Compiler Name="ImplicitImport">True</Compiler>
+			<Compiler Name="HPPEMITIgnored">True</Compiler>
+			<Compiler Name="NoRetVal">True</Compiler>
+			<Compiler Name="UseBeforeDef">True</Compiler>
+			<Compiler Name="ForLoopVarUndef">True</Compiler>
+			<Compiler Name="UnitNameMismatch">True</Compiler>
+			<Compiler Name="NoCFGFileFound">True</Compiler>
+			<Compiler Name="MessageDirective">True</Compiler>
+			<Compiler Name="ImplicitVariants">True</Compiler>
+			<Compiler Name="UnicodeToLocale">True</Compiler>
+			<Compiler Name="LocaleToUnicode">True</Compiler>
+			<Compiler Name="ImagebaseMultiple">True</Compiler>
+			<Compiler Name="SuspiciousTypecast">True</Compiler>
+			<Compiler Name="PrivatePropAccessor">True</Compiler>
+			<Compiler Name="UnsafeType">False</Compiler>
+			<Compiler Name="UnsafeCode">False</Compiler>
+			<Compiler Name="UnsafeCast">False</Compiler>
+			<Compiler Name="OptionTruncated">True</Compiler>
+			<Compiler Name="WideCharReduced">True</Compiler>
+			<Compiler Name="DuplicatesIgnored">True</Compiler>  <Compiler Name="UnitInitSeq">True</Compiler>
+      <Compiler Name="LocalPInvoke">True</Compiler>
+      <Compiler Name="CodePage"></Compiler>
+    </Compiler>
+		<Linker>
+			<Linker Name="MapFile">0</Linker>
+			<Linker Name="OutputObjs">0</Linker>
+			<Linker Name="ConsoleApp">1</Linker>
+			<Linker Name="DebugInfo">False</Linker>
+			<Linker Name="RemoteSymbols">False</Linker>
+			<Linker Name="GenerateDRC">False</Linker>
+			<Linker Name="MinStackSize">16384</Linker>
+			<Linker Name="MaxStackSize">1048576</Linker>
+			<Linker Name="ImageBase">4194304</Linker>
+			<Linker Name="ExeDescription">RemObjects Data Abstract - ADOExpress/dbGo Driver</Linker>  <Linker Name="GenerateHpps">False</Linker>
+    </Linker>
+		<Directories>
+			<Directories Name="OutputDir"></Directories>
+			<Directories Name="UnitOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDLLOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDCPOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="SearchPath">..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10</Directories>
+			<Directories Name="Packages"></Directories>
+			<Directories Name="Conditionals"></Directories>
+			<Directories Name="DebugSourceDirs"></Directories>
+			<Directories Name="UsePackages">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams"></Parameters>
+			<Parameters Name="HostApplication"></Parameters>
+			<Parameters Name="Launcher"></Parameters>
+			<Parameters Name="UseLauncher">False</Parameters>
+			<Parameters Name="DebugCWD"></Parameters>
+			<Parameters Name="RemoteHost"></Parameters>
+			<Parameters Name="RemotePath"></Parameters>
+			<Parameters Name="RemoteLauncher"></Parameters>
+			<Parameters Name="RemoteCWD"></Parameters>
+			<Parameters Name="RemoteDebug">False</Parameters>  <Parameters Name="Debug Symbols Search Path"></Parameters>
+      <Parameters Name="LoadAllSymbols">True</Parameters>
+      <Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+    </Parameters>
+		<Language>
+			<Language Name="ActiveLang"></Language>
+			<Language Name="ProjectLang">$00000000</Language>
+			<Language Name="RootDir"></Language>
+		</Language>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+			<VersionInfo Name="MajorVer">3</VersionInfo>
+			<VersionInfo Name="MinorVer">0</VersionInfo>
+			<VersionInfo Name="Release">1</VersionInfo>
+			<VersionInfo Name="Build">361</VersionInfo>
+			<VersionInfo Name="Debug">False</VersionInfo>
+			<VersionInfo Name="PreRelease">False</VersionInfo>
+			<VersionInfo Name="Special">False</VersionInfo>
+			<VersionInfo Name="Private">False</VersionInfo>
+			<VersionInfo Name="DLL">False</VersionInfo>
+			<VersionInfo Name="Locale">1033</VersionInfo>
+			<VersionInfo Name="CodePage">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+		</VersionInfoKeys>
+	</Delphi.Personality>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D10.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D10.cfg
new file mode 100644
index 0000000..9037d9d
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D10.cfg	
@@ -0,0 +1,49 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N0"..\..\Dcu\D10"
+-LE"..\..\Dcu\D10"
+-LN"..\..\Dcu\D10"
+-U"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-O"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-I"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-R"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D10.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D10.dpk
new file mode 100644
index 0000000..501b019
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D10.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_ADODriver_D10;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - ADOExpress/dbGo Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D10,
+  adortl;
+
+contains
+  uDAADODriver in 'uDAADODriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D10.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D10.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D10.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D11.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D11.dpk
new file mode 100644
index 0000000..503d123
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D11.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_ADODriver_D11;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - ADOExpress/dbGo Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D11,
+  adortl;
+
+contains
+  uDAADODriver in 'uDAADODriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D11.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D11.dproj
new file mode 100644
index 0000000..b399aa9
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D11.dproj	
@@ -0,0 +1,68 @@
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{6843d8de-6ab6-4222-a3c5-282e7cc611df}</ProjectGuid>
+    <MainSource>DataAbstract_ADODriver_D11.dpk</MainSource>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+    <DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_ADODriver_D11.bpl</DCC_DependencyCheckOutputName>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DebugInformation>False</DCC_DebugInformation>
+    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_Define>RELEASE</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Delphi.Personality</Borland.Personality>
+    <Borland.ProjectType>Package</Borland.ProjectType>
+    <BorlandProject>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">RemObjects Data Abstract - ADOExpress/dbGo Driver</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">True</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">3</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">1</VersionInfo><VersionInfo Name="Build">361</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">DataAbstract_ADODriver_D11.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
+  <ItemGroup>
+    <DelphiCompile Include="DataAbstract_ADODriver_D11.dpk">
+      <MainSource>MainSource</MainSource>
+    </DelphiCompile>
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\adortl.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\DataAbstract_Core_D11.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\dbrtl.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\rtl.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\vcl.dcp" />
+    <DCCReference Include="uDAADODriver.pas" />
+  </ItemGroup>
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D11.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D11.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D11.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D12.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D12.dpk
new file mode 100644
index 0000000..9bd8e7c
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D12.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_ADODriver_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - ADOExpress/dbGo Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  adortl,
+  DataAbstract_Core_D12;
+
+contains
+  uDAADODriver in 'uDAADODriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D12.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D12.dproj
new file mode 100644
index 0000000..149460f
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D12.dproj	
@@ -0,0 +1,95 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{6843d8de-6ab6-4222-a3c5-282e7cc611df}</ProjectGuid>
+			<MainSource>DataAbstract_ADODriver_D12.dpk</MainSource>
+			<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+			<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+			<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_ADODriver_D11.bpl</DCC_DependencyCheckOutputName>
+			<ProjectVersion>11.1</ProjectVersion>
+			<Config Condition="'$(Config)'==''">Base</Config>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base)'!=''">
+			<DCC_SymbolReferenceInfo>1</DCC_SymbolReferenceInfo>
+			<DCC_CVT_WCHAR_TO_ACHAR>error</DCC_CVT_WCHAR_TO_ACHAR>
+			<DCC_CVT_WIDENING_STRING_LOST>error</DCC_CVT_WIDENING_STRING_LOST>
+			<DCC_BplOutput>..\..\Dcu\D12</DCC_BplOutput>
+			<DCC_UnitSearchPath>..;..\..\Dcu\D12;..\..\..\RemObjects SDK for Delphi\Dcu\D12;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+			<DCC_EXPLICIT_STRING_CAST>error</DCC_EXPLICIT_STRING_CAST>
+			<DCC_CVT_ACHAR_TO_WCHAR>error</DCC_CVT_ACHAR_TO_WCHAR>
+			<DCC_IMPLICIT_STRING_CAST_LOSS>error</DCC_IMPLICIT_STRING_CAST_LOSS>
+			<DCC_EXPLICIT_STRING_CAST_LOSS>error</DCC_EXPLICIT_STRING_CAST_LOSS>
+			<DCC_IMPLICIT_STRING_CAST>error</DCC_IMPLICIT_STRING_CAST>
+			<DCC_DcuOutput>..\..\Dcu\D12</DCC_DcuOutput>
+			<DCC_CVT_NARROWING_STRING_LOST>error</DCC_CVT_NARROWING_STRING_LOST>
+			<DCC_DcpOutput>..\..\Dcu\D12</DCC_DcpOutput>
+			<GenDll>true</GenDll>
+			<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+			<GenPackage>true</GenPackage>
+			<DesignOnlyPackage>true</DesignOnlyPackage>
+			<DCC_ImageBase>00400000</DCC_ImageBase>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D12\DataAbstract_ADODriver_D12.bpl</DCC_DependencyCheckOutputName>
+			<DCC_Description>RemObjects Data Abstract - ADOExpress/dbGo Driver</DCC_Description>
+		</PropertyGroup>
+		<ItemGroup>
+			<DelphiCompile Include="DataAbstract_ADODriver_D12.dpk">
+				<MainSource>MainSource</MainSource>
+			</DelphiCompile>
+			<DCCReference Include="rtl.dcp"/>
+			<DCCReference Include="vcl.dcp"/>
+			<DCCReference Include="dbrtl.dcp"/>
+			<DCCReference Include="adortl.dcp"/>
+			<DCCReference Include="DataAbstract_Core_D12.dcp"/>
+			<DCCReference Include="uDAADODriver.pas"/>
+			<BuildConfiguration Include="Base">
+				<Key>Base</Key>
+			</BuildConfiguration>
+		</ItemGroup>
+		<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+		<ProjectExtensions>
+			<Borland.Personality>Delphi.Personality.12</Borland.Personality>
+			<Borland.ProjectType>Package</Borland.ProjectType>
+			<BorlandProject>
+				<Delphi.Personality>
+					<Parameters>
+						<Parameters Name="UseLauncher">False</Parameters>
+						<Parameters Name="LoadAllSymbols">True</Parameters>
+						<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+					</Parameters>
+					<VersionInfo>
+						<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+						<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+						<VersionInfo Name="MajorVer">3</VersionInfo>
+						<VersionInfo Name="MinorVer">0</VersionInfo>
+						<VersionInfo Name="Release">1</VersionInfo>
+						<VersionInfo Name="Build">361</VersionInfo>
+						<VersionInfo Name="Debug">False</VersionInfo>
+						<VersionInfo Name="PreRelease">False</VersionInfo>
+						<VersionInfo Name="Special">False</VersionInfo>
+						<VersionInfo Name="Private">False</VersionInfo>
+						<VersionInfo Name="DLL">False</VersionInfo>
+						<VersionInfo Name="Locale">1033</VersionInfo>
+						<VersionInfo Name="CodePage">1252</VersionInfo>
+					</VersionInfo>
+					<VersionInfoKeys>
+						<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="FileDescription"/>
+						<VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys>
+						<VersionInfoKeys Name="InternalName"/>
+						<VersionInfoKeys Name="LegalCopyright"/>
+						<VersionInfoKeys Name="LegalTrademarks"/>
+						<VersionInfoKeys Name="OriginalFilename"/>
+						<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+						<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+					</VersionInfoKeys>
+					<Source>
+						<Source Name="MainSource">DataAbstract_ADODriver_D12.dpk</Source>
+					</Source>
+				</Delphi.Personality>
+			</BorlandProject>
+			<ProjectFileVersion>12</ProjectFileVersion>
+		</ProjectExtensions>
+	</Project>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D12.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D12.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D12.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D6.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D6.cfg
new file mode 100644
index 0000000..05f9ec3
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D6.cfg	
@@ -0,0 +1,41 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D6"
+-LE"..\..\Dcu\D6"
+-LN"..\..\Dcu\D6"
+-U"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-O"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-I"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-R"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-Z
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D6.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D6.dof
new file mode 100644
index 0000000..e0035fa
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D6.dof	
@@ -0,0 +1,76 @@
+[FileVersion]
+Version=6.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitDeprecated=0
+UnitLibrary=0
+UnitPlatform=0
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=Data Abstract - ADOExpress/dbGo Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D6
+PackageDLLOutputDir=..\..\Dcu\D6
+PackageDCPOutputDir=..\..\Dcu\D6
+SearchPath=..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6
+Packages=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=2.0.0.138
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D6.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D6.dpk
new file mode 100644
index 0000000..9a608cd
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D6.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_ADODriver_D6;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - ADOExpress/dbGo Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D6,
+  adortl;
+
+contains
+  uDAADODriver in 'uDAADODriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D6.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D6.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D6.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D7.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D7.cfg
new file mode 100644
index 0000000..6784156
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D7.cfg	
@@ -0,0 +1,50 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D7"
+-LE"..\..\Dcu\D7"
+-LN"..\..\Dcu\D7"
+-U"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-O"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-I"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-R"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D7.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D7.dof
new file mode 100644
index 0000000..f2d0c96
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D7.dof	
@@ -0,0 +1,116 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=Data Abstract - ADOExpress/dbGo Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D7
+PackageDLLOutputDir=..\..\Dcu\D7
+PackageDCPOutputDir=..\..\Dcu\D7
+SearchPath=..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7
+Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;dclOfficeXP;RemObjects_DataSnap_D7;PurposesoftD7;addict3_d6;tb2kComplete_70;CDKDesignTimeSupport;CDKSmp;CDK;ES_CodeSite20;ESDelphiCommandCompiler;ESFileSearch;ESVisualCompositeExpert;EaglWk;ESGraphUtils;ESBase;ESVsCp;ESSampleComposites70;ESSampleCompositeEditors7;Rz252N70;SynEdit_D7;dxsbD7;dxComnD7;dxDockingD7;dxEdtrD7;dxELibD7;dxExELD7;EQGridD7;dxExRwD7;dxDBEdD7;dxInsD7;dxGrEdD7;ECQDBCD7;EQTLD7;EQDBTLD7;dxLayoutControlD7;dxMasterViewD7;dxmdsd7;dxNavBarD7;dxObjInsD7;dxPageControlD7;dxPSCoreD7;Rz252D70;cxPageControlVCLD7;cxEditorsVCLD7;dxThemeD7;cxLibraryVCLD7;cxDataD7;cxGridUtilsVCLD7;cxGridVCLD7;RemObjects_BPDX_D7
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=2.0.0.142
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D7.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D7.dpk
new file mode 100644
index 0000000..a1427e8
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D7.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_ADODriver_D7;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - ADOExpress/dbGo Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D7,
+  adortl;
+
+contains
+  uDAADODriver in 'uDAADODriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D7.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D7.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_D7.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_Glyphs.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_Glyphs.res
new file mode 100644
index 0000000..067c6a6
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ADODriver_Glyphs.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D10.bdsproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D10.bdsproj
new file mode 100644
index 0000000..a34aa65
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D10.bdsproj	
@@ -0,0 +1,176 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality">Delphi.Personality</Option>
+			<Option Name="ProjectType"></Option>
+			<Option Name="Version">1.0</Option>
+			<Option Name="GUID">{0FC45B58-F519-40B6-831A-DD79C8D3270F}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource">DataAbstract_AnyDACDriver_D10.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A">8</Compiler>
+			<Compiler Name="B">0</Compiler>
+			<Compiler Name="C">1</Compiler>
+			<Compiler Name="D">1</Compiler>
+			<Compiler Name="E">0</Compiler>
+			<Compiler Name="F">0</Compiler>
+			<Compiler Name="G">1</Compiler>
+			<Compiler Name="H">1</Compiler>
+			<Compiler Name="I">1</Compiler>
+			<Compiler Name="J">0</Compiler>
+			<Compiler Name="K">0</Compiler>
+			<Compiler Name="L">1</Compiler>
+			<Compiler Name="M">0</Compiler>
+			<Compiler Name="N">1</Compiler>
+			<Compiler Name="O">1</Compiler>
+			<Compiler Name="P">1</Compiler>
+			<Compiler Name="Q">0</Compiler>
+			<Compiler Name="R">0</Compiler>
+			<Compiler Name="S">0</Compiler>
+			<Compiler Name="T">0</Compiler>
+			<Compiler Name="U">0</Compiler>
+			<Compiler Name="V">1</Compiler>
+			<Compiler Name="W">0</Compiler>
+			<Compiler Name="X">1</Compiler>
+			<Compiler Name="Y">1</Compiler>
+			<Compiler Name="Z">1</Compiler>
+			<Compiler Name="ShowHints">True</Compiler>
+			<Compiler Name="ShowWarnings">True</Compiler>
+			<Compiler Name="UnitAliases"></Compiler>
+			<Compiler Name="NamespacePrefix"></Compiler>
+			<Compiler Name="GenerateDocumentation">False</Compiler>
+			<Compiler Name="DefaultNamespace"></Compiler>
+			<Compiler Name="SymbolDeprecated">False</Compiler>
+			<Compiler Name="SymbolLibrary">False</Compiler>
+			<Compiler Name="SymbolPlatform">False</Compiler>
+			<Compiler Name="SymbolExperimental">True</Compiler>
+			<Compiler Name="UnitLibrary">False</Compiler>
+			<Compiler Name="UnitPlatform">False</Compiler>
+			<Compiler Name="UnitDeprecated">False</Compiler>
+			<Compiler Name="UnitExperimental">True</Compiler>
+			<Compiler Name="HResultCompat">True</Compiler>
+			<Compiler Name="HidingMember">True</Compiler>
+			<Compiler Name="HiddenVirtual">True</Compiler>
+			<Compiler Name="Garbage">True</Compiler>
+			<Compiler Name="BoundsError">True</Compiler>
+			<Compiler Name="ZeroNilCompat">True</Compiler>
+			<Compiler Name="StringConstTruncated">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar">True</Compiler>
+			<Compiler Name="TypedConstVarPar">True</Compiler>
+			<Compiler Name="AsgToTypedConst">True</Compiler>
+			<Compiler Name="CaseLabelRange">True</Compiler>
+			<Compiler Name="ForVariable">True</Compiler>
+			<Compiler Name="ConstructingAbstract">True</Compiler>
+			<Compiler Name="ComparisonFalse">True</Compiler>
+			<Compiler Name="ComparisonTrue">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned">True</Compiler>
+			<Compiler Name="UnsupportedConstruct">True</Compiler>
+			<Compiler Name="FileOpen">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc">True</Compiler>
+			<Compiler Name="BadGlobalSymbol">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor">True</Compiler>
+			<Compiler Name="InvalidDirective">True</Compiler>
+			<Compiler Name="PackageNoLink">True</Compiler>
+			<Compiler Name="PackageThreadVar">True</Compiler>
+			<Compiler Name="ImplicitImport">True</Compiler>
+			<Compiler Name="HPPEMITIgnored">True</Compiler>
+			<Compiler Name="NoRetVal">True</Compiler>
+			<Compiler Name="UseBeforeDef">True</Compiler>
+			<Compiler Name="ForLoopVarUndef">True</Compiler>
+			<Compiler Name="UnitNameMismatch">True</Compiler>
+			<Compiler Name="NoCFGFileFound">True</Compiler>
+			<Compiler Name="MessageDirective">True</Compiler>
+			<Compiler Name="ImplicitVariants">True</Compiler>
+			<Compiler Name="UnicodeToLocale">True</Compiler>
+			<Compiler Name="LocaleToUnicode">True</Compiler>
+			<Compiler Name="ImagebaseMultiple">True</Compiler>
+			<Compiler Name="SuspiciousTypecast">True</Compiler>
+			<Compiler Name="PrivatePropAccessor">True</Compiler>
+			<Compiler Name="UnsafeType">False</Compiler>
+			<Compiler Name="UnsafeCode">False</Compiler>
+			<Compiler Name="UnsafeCast">False</Compiler>
+			<Compiler Name="OptionTruncated">True</Compiler>
+			<Compiler Name="WideCharReduced">True</Compiler>
+			<Compiler Name="DuplicatesIgnored">True</Compiler>  <Compiler Name="UnitInitSeq">True</Compiler>
+      <Compiler Name="LocalPInvoke">True</Compiler>
+      <Compiler Name="CodePage"></Compiler>
+    </Compiler>
+		<Linker>
+			<Linker Name="MapFile">0</Linker>
+			<Linker Name="OutputObjs">0</Linker>
+			<Linker Name="ConsoleApp">1</Linker>
+			<Linker Name="DebugInfo">False</Linker>
+			<Linker Name="RemoteSymbols">False</Linker>
+			<Linker Name="GenerateDRC">False</Linker>
+			<Linker Name="MinStackSize">16384</Linker>
+			<Linker Name="MaxStackSize">1048576</Linker>
+			<Linker Name="ImageBase">4194304</Linker>
+			<Linker Name="ExeDescription">RemObjects Data Abstract - AnyDAC Driver</Linker>  <Linker Name="GenerateHpps">False</Linker>
+    </Linker>
+		<Directories>
+			<Directories Name="OutputDir"></Directories>
+			<Directories Name="UnitOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDLLOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDCPOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="SearchPath">..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10</Directories>
+			<Directories Name="Packages"></Directories>
+			<Directories Name="Conditionals"></Directories>
+			<Directories Name="DebugSourceDirs"></Directories>
+			<Directories Name="UsePackages">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams"></Parameters>
+			<Parameters Name="HostApplication"></Parameters>
+			<Parameters Name="Launcher"></Parameters>
+			<Parameters Name="UseLauncher">False</Parameters>
+			<Parameters Name="DebugCWD"></Parameters>
+			<Parameters Name="RemoteHost"></Parameters>
+			<Parameters Name="RemotePath"></Parameters>
+			<Parameters Name="RemoteLauncher"></Parameters>
+			<Parameters Name="RemoteCWD"></Parameters>
+			<Parameters Name="RemoteDebug">False</Parameters>  <Parameters Name="Debug Symbols Search Path"></Parameters>
+      <Parameters Name="LoadAllSymbols">True</Parameters>
+      <Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+    </Parameters>
+		<Language>
+			<Language Name="ActiveLang"></Language>
+			<Language Name="ProjectLang">$00000000</Language>
+			<Language Name="RootDir"></Language>
+		</Language>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+			<VersionInfo Name="MajorVer">3</VersionInfo>
+			<VersionInfo Name="MinorVer">0</VersionInfo>
+			<VersionInfo Name="Release">1</VersionInfo>
+			<VersionInfo Name="Build">361</VersionInfo>
+			<VersionInfo Name="Debug">False</VersionInfo>
+			<VersionInfo Name="PreRelease">False</VersionInfo>
+			<VersionInfo Name="Special">False</VersionInfo>
+			<VersionInfo Name="Private">False</VersionInfo>
+			<VersionInfo Name="DLL">False</VersionInfo>
+			<VersionInfo Name="Locale">1033</VersionInfo>
+			<VersionInfo Name="CodePage">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+		</VersionInfoKeys>
+	</Delphi.Personality>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D10.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D10.cfg
new file mode 100644
index 0000000..9037d9d
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D10.cfg	
@@ -0,0 +1,49 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N0"..\..\Dcu\D10"
+-LE"..\..\Dcu\D10"
+-LN"..\..\Dcu\D10"
+-U"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-O"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-I"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-R"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D10.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D10.dpk
new file mode 100644
index 0000000..d6baf13
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D10.dpk	
@@ -0,0 +1,53 @@
+package DataAbstract_AnyDACDriver_D10;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - AnyDAC Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D10,
+  dbexpress,
+  xmlrtl,
+  AnyDAC_PhysIB_D10,
+  AnyDAC_Phys_D10,
+  AnyDAC_ComI_D10,
+  AnyDAC_PhysADS_D10,
+  AnyDAC_PhysODBC_D10,
+  AnyDAC_PhysDBExp_D10,
+  AnyDAC_PhysASA_D10,
+  AnyDAC_PhysOracl_D10,
+  AnyDAC_PhysMySQL_D10,
+  AnyDAC_PhysDb2_D10,
+  AnyDAC_PhysMSSQL_D10,
+  AnyDAC_PhysMSAcc_D10,
+  AnyDAC_Comp_D10;
+
+contains
+  uDAAnyDACDriver in 'uDAAnyDACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D10.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D10.res
new file mode 100644
index 0000000..7b3c163
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D10.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D11.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D11.dpk
new file mode 100644
index 0000000..bd83783
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D11.dpk	
@@ -0,0 +1,54 @@
+package DataAbstract_AnyDACDriver_D11;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - AnyDAC Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D11,
+  dbexpress,
+  xmlrtl,
+  AnyDAC_PhysIB_D11,
+  AnyDAC_Phys_D11,
+  AnyDAC_ComI_D11,
+  AnyDAC_PhysADS_D11,
+  AnyDAC_PhysODBC_D11,
+  AnyDAC_PhysASA_D11,
+  AnyDAC_PhysOracl_D11,
+  AnyDAC_PhysMySQL_D11,
+  AnyDAC_PhysDb2_D11,
+  AnyDAC_PhysMSSQL_D11,
+  AnyDAC_PhysMSAcc_D11,
+  AnyDAC_Comp_D11,
+  AnyDAC_PhysTDBX_D11,
+  DbxMetaData;
+
+contains
+  uDAAnyDACDriver in 'uDAAnyDACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D11.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D11.dproj
new file mode 100644
index 0000000..37cf6a8
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D11.dproj	
@@ -0,0 +1,67 @@
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{6843d8de-6ab6-4222-a3c5-282e7cc611df}</ProjectGuid>
+    <MainSource>DataAbstract_AnyDACDriver_D11.dpk</MainSource>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+    <DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_AnyDACDriver_D11.bpl</DCC_DependencyCheckOutputName>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DebugInformation>False</DCC_DebugInformation>
+    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_Define>RELEASE</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Delphi.Personality</Borland.Personality>
+    <Borland.ProjectType>Package</Borland.ProjectType>
+    <BorlandProject>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">RemObjects Data Abstract - AnyDAC Driver</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">True</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">3</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">1</VersionInfo><VersionInfo Name="Build">361</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">DataAbstract_AnyDACDriver_D11.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
+  <ItemGroup>
+    <DelphiCompile Include="DataAbstract_AnyDACDriver_D11.dpk">
+      <MainSource>MainSource</MainSource>
+    </DelphiCompile>
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\DataAbstract_Core_D11.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\dbrtl.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\rtl.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\vcl.dcp" />
+    <DCCReference Include="uDAAnyDACDriver.pas" />
+  </ItemGroup>
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D11.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D11.res
new file mode 100644
index 0000000..7b3c163
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D11.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D12.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D12.dpk
new file mode 100644
index 0000000..57f22a5
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D12.dpk	
@@ -0,0 +1,51 @@
+package DataAbstract_AnyDACDriver_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - AnyDAC Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D12,
+  AnyDAC_PhysIB_D12,
+  AnyDAC_Phys_D12,
+  AnyDAC_ComI_D12,
+  AnyDAC_PhysADS_D12,
+  AnyDAC_PhysODBC_D12,
+  AnyDAC_PhysASA_D12,
+  AnyDAC_PhysOracl_D12,
+  AnyDAC_PhysMySQL_D12,
+  AnyDAC_PhysDb2_D12,
+  AnyDAC_PhysMSSQL_D12,
+  AnyDAC_PhysMSAcc_D12,
+  AnyDAC_Comp_D12,
+  AnyDAC_PhysTDBX_D12;
+
+contains
+  uDAAnyDACDriver in 'uDAAnyDACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D12.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D12.dproj
new file mode 100644
index 0000000..532bd6a
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D12.dproj	
@@ -0,0 +1,157 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{6843d8de-6ab6-4222-a3c5-282e7cc611df}</ProjectGuid>
+			<MainSource>DataAbstract_AnyDACDriver_D12.dpk</MainSource>
+			<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+			<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+			<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D12\DataAbstract_AnyDACDriver_D12.bpl</DCC_DependencyCheckOutputName>
+			<ProjectVersion>11.1</ProjectVersion>
+			<Config Condition="'$(Config)'==''">Debug</Config>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Release' or '$(Cfg_Release)'!=''">
+			<Cfg_Release>true</Cfg_Release>
+			<CfgParent>Base</CfgParent>
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Debug' or '$(Cfg_Debug)'!=''">
+			<Cfg_Debug>true</Cfg_Debug>
+			<CfgParent>Base</CfgParent>
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base)'!=''">
+			<DCC_SymbolReferenceInfo>1</DCC_SymbolReferenceInfo>
+			<DCC_CVT_WCHAR_TO_ACHAR>error</DCC_CVT_WCHAR_TO_ACHAR>
+			<DCC_CVT_WIDENING_STRING_LOST>error</DCC_CVT_WIDENING_STRING_LOST>
+			<DCC_BplOutput>..\..\Dcu\D12</DCC_BplOutput>
+			<DCC_UnitSearchPath>..;..\..\Dcu\D12;..\..\..\RemObjects SDK for Delphi\Dcu\D12;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+			<DCC_EXPLICIT_STRING_CAST>error</DCC_EXPLICIT_STRING_CAST>
+			<DCC_CVT_ACHAR_TO_WCHAR>error</DCC_CVT_ACHAR_TO_WCHAR>
+			<DCC_IMPLICIT_STRING_CAST_LOSS>error</DCC_IMPLICIT_STRING_CAST_LOSS>
+			<DCC_EXPLICIT_STRING_CAST_LOSS>error</DCC_EXPLICIT_STRING_CAST_LOSS>
+			<DCC_IMPLICIT_STRING_CAST>error</DCC_IMPLICIT_STRING_CAST>
+			<DCC_DcuOutput>..\..\Dcu\D12</DCC_DcuOutput>
+			<DCC_CVT_NARROWING_STRING_LOST>error</DCC_CVT_NARROWING_STRING_LOST>
+			<DCC_DcpOutput>..\..\Dcu\D12</DCC_DcpOutput>
+			<GenDll>true</GenDll>
+			<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+			<GenPackage>true</GenPackage>
+			<DesignOnlyPackage>true</DesignOnlyPackage>
+			<DCC_ImageBase>00400000</DCC_ImageBase>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D12\DataAbstract_AnyDACDriver_D12.bpl</DCC_DependencyCheckOutputName>
+			<DCC_Description>RemObjects Data Abstract - AnyDAC Driver</DCC_Description>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Cfg_Release)'!=''">
+			<DCC_HppOutput>..\..\Dcu\D12</DCC_HppOutput>
+			<Version>7.0</Version>
+			<DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+			<DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+			<DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+			<DCC_DebugInformation>False</DCC_DebugInformation>
+			<DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+			<DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+			<DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+			<DCC_ObjPath>..\..\Dcu\D12;..\..\..\RemObjects SDK for Delphi\Dcu\D12;$(DCC_ObjPath)</DCC_ObjPath>
+			<DCC_ResourcePath>..\..\Dcu\D12;..\..\..\RemObjects SDK for Delphi\Dcu\D12;$(DCC_ResourcePath)</DCC_ResourcePath>
+			<DCC_Define>RELEASE;$(DCC_Define)</DCC_Define>
+			<DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+			<DCC_ObjOutput>..\..\Dcu\D12</DCC_ObjOutput>
+			<DCC_IncludePath>..\..\Dcu\D12;..\..\..\RemObjects SDK for Delphi\Dcu\D12;$(DCC_IncludePath)</DCC_IncludePath>
+			<DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Cfg_Debug)'!=''">
+			<DCC_HppOutput>..\..\Dcu\D12</DCC_HppOutput>
+			<Version>7.0</Version>
+			<DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+			<DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+			<DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+			<DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+			<DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+			<DCC_ObjPath>..\..\Dcu\D12;..\..\..\RemObjects SDK for Delphi\Dcu\D12;$(DCC_ObjPath)</DCC_ObjPath>
+			<DCC_ResourcePath>..\..\Dcu\D12;..\..\..\RemObjects SDK for Delphi\Dcu\D12;$(DCC_ResourcePath)</DCC_ResourcePath>
+			<DCC_ObjOutput>..\..\Dcu\D12</DCC_ObjOutput>
+			<DCC_IncludePath>..\..\Dcu\D12;..\..\..\RemObjects SDK for Delphi\Dcu\D12;$(DCC_IncludePath)</DCC_IncludePath>
+			<DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+		</PropertyGroup>
+		<ItemGroup>
+			<DelphiCompile Include="DataAbstract_AnyDACDriver_D12.dpk">
+				<MainSource>MainSource</MainSource>
+			</DelphiCompile>
+			<DCCReference Include="rtl.dcp"/>
+			<DCCReference Include="vcl.dcp"/>
+			<DCCReference Include="dbrtl.dcp"/>
+			<DCCReference Include="DataAbstract_Core_D12.dcp"/>
+			<DCCReference Include="AnyDAC_PhysIB_D12.dcp"/>
+			<DCCReference Include="AnyDAC_Phys_D12.dcp"/>
+			<DCCReference Include="AnyDAC_ComI_D12.dcp"/>
+			<DCCReference Include="AnyDAC_PhysADS_D12.dcp"/>
+			<DCCReference Include="AnyDAC_PhysODBC_D12.dcp"/>
+			<DCCReference Include="AnyDAC_PhysASA_D12.dcp"/>
+			<DCCReference Include="AnyDAC_PhysOracl_D12.dcp"/>
+			<DCCReference Include="AnyDAC_PhysMySQL_D12.dcp"/>
+			<DCCReference Include="AnyDAC_PhysDb2_D12.dcp"/>
+			<DCCReference Include="AnyDAC_PhysMSSQL_D12.dcp"/>
+			<DCCReference Include="AnyDAC_PhysMSAcc_D12.dcp"/>
+			<DCCReference Include="AnyDAC_Comp_D12.dcp"/>
+			<DCCReference Include="AnyDAC_PhysTDBX_D12.dcp"/>
+			<DCCReference Include="uDAAnyDACDriver.pas"/>
+			<BuildConfiguration Include="Base">
+				<Key>Base</Key>
+			</BuildConfiguration>
+			<BuildConfiguration Include="Release">
+				<Key>Cfg_Release</Key>
+				<CfgParent>Base</CfgParent>
+			</BuildConfiguration>
+			<BuildConfiguration Include="Debug">
+				<Key>Cfg_Debug</Key>
+				<CfgParent>Base</CfgParent>
+			</BuildConfiguration>
+		</ItemGroup>
+		<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+		<ProjectExtensions>
+			<Borland.Personality>Delphi.Personality.12</Borland.Personality>
+			<Borland.ProjectType>Package</Borland.ProjectType>
+			<BorlandProject>
+				<Delphi.Personality>
+					<Parameters>
+						<Parameters Name="UseLauncher">False</Parameters>
+						<Parameters Name="LoadAllSymbols">True</Parameters>
+						<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+					</Parameters>
+					<VersionInfo>
+						<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+						<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+						<VersionInfo Name="MajorVer">3</VersionInfo>
+						<VersionInfo Name="MinorVer">0</VersionInfo>
+						<VersionInfo Name="Release">1</VersionInfo>
+						<VersionInfo Name="Build">361</VersionInfo>
+						<VersionInfo Name="Debug">False</VersionInfo>
+						<VersionInfo Name="PreRelease">False</VersionInfo>
+						<VersionInfo Name="Special">False</VersionInfo>
+						<VersionInfo Name="Private">False</VersionInfo>
+						<VersionInfo Name="DLL">False</VersionInfo>
+						<VersionInfo Name="Locale">1033</VersionInfo>
+						<VersionInfo Name="CodePage">1252</VersionInfo>
+					</VersionInfo>
+					<VersionInfoKeys>
+						<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="FileDescription"/>
+						<VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys>
+						<VersionInfoKeys Name="InternalName"/>
+						<VersionInfoKeys Name="LegalCopyright"/>
+						<VersionInfoKeys Name="LegalTrademarks"/>
+						<VersionInfoKeys Name="OriginalFilename"/>
+						<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+						<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+					</VersionInfoKeys>
+					<Source>
+						<Source Name="MainSource">DataAbstract_AnyDACDriver_D12.dpk</Source>
+					</Source>
+				</Delphi.Personality>
+			</BorlandProject>
+			<ProjectFileVersion>12</ProjectFileVersion>
+		</ProjectExtensions>
+	</Project>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D12.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D12.res
new file mode 100644
index 0000000..7b3c163
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D12.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D6.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D6.cfg
new file mode 100644
index 0000000..05f9ec3
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D6.cfg	
@@ -0,0 +1,41 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D6"
+-LE"..\..\Dcu\D6"
+-LN"..\..\Dcu\D6"
+-U"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-O"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-I"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-R"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-Z
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D6.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D6.dof
new file mode 100644
index 0000000..70f2fea
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D6.dof	
@@ -0,0 +1,76 @@
+[FileVersion]
+Version=6.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitDeprecated=0
+UnitLibrary=0
+UnitPlatform=0
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=Data Abstract - AnyDAC Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D6
+PackageDLLOutputDir=..\..\Dcu\D6
+PackageDCPOutputDir=..\..\Dcu\D6
+SearchPath=..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6
+Packages=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=2.0.0.138
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D6.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D6.dpk
new file mode 100644
index 0000000..f744ae2
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D6.dpk	
@@ -0,0 +1,53 @@
+package DataAbstract_AnyDACDriver_D6;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - AnyDAC Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D6,
+  dbexpress,
+  xmlrtl,
+  AnyDAC_PhysIB_D6,
+  AnyDAC_Phys_D6,
+  AnyDAC_ComI_D6,
+  AnyDAC_PhysADS_D6,
+  AnyDAC_PhysODBC_D6,
+  AnyDAC_PhysDBExp_D6,
+  AnyDAC_PhysASA_D6,
+  AnyDAC_PhysOracl_D6,
+  AnyDAC_PhysMySQL_D6,
+  AnyDAC_PhysDb2_D6,
+  AnyDAC_PhysMSSQL_D6,
+  AnyDAC_PhysMSAcc_D6,
+  AnyDAC_Comp_D6;
+
+contains
+  uDAAnyDACDriver in 'uDAAnyDACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D6.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D6.res
new file mode 100644
index 0000000..892aed8
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D6.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D7.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D7.cfg
new file mode 100644
index 0000000..f33a910
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D7.cfg	
@@ -0,0 +1,50 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D7"
+-LE"..\..\Dcu\D7"
+-LN"..\..\Dcu\D7"
+-U"..\..\Dcu\D7;..\..\..\RemObjects SDK for Delphi\Dcu\D7"
+-O"..\..\Dcu\D7;..\..\..\RemObjects SDK for Delphi\Dcu\D7"
+-I"..\..\Dcu\D7;..\..\..\RemObjects SDK for Delphi\Dcu\D7"
+-R"..\..\Dcu\D7;..\..\..\RemObjects SDK for Delphi\Dcu\D7"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D7.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D7.dof
new file mode 100644
index 0000000..f8327e9
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D7.dof	
@@ -0,0 +1,116 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects Data Abstract - AnyDAC Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D7
+PackageDLLOutputDir=..\..\Dcu\D7
+PackageDCPOutputDir=..\..\Dcu\D7
+SearchPath=..\..\Dcu\D7;..\..\..\RemObjects SDK for Delphi\Dcu\D7
+Packages=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=3.0.0.289
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D7.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D7.dpk
new file mode 100644
index 0000000..47a39c3
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D7.dpk	
@@ -0,0 +1,53 @@
+package DataAbstract_AnyDACDriver_D7;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - AnyDAC Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D7,
+  dbexpress,
+  xmlrtl,
+  AnyDAC_PhysIB_D7,
+  AnyDAC_Phys_D7,
+  AnyDAC_ComI_D7,
+  AnyDAC_PhysADS_D7,
+  AnyDAC_PhysODBC_D7,
+  AnyDAC_PhysDBExp_D7,
+  AnyDAC_PhysASA_D7,
+  AnyDAC_PhysOracl_D7,
+  AnyDAC_PhysMySQL_D7,
+  AnyDAC_PhysDb2_D7,
+  AnyDAC_PhysMSSQL_D7,
+  AnyDAC_PhysMSAcc_D7,
+  AnyDAC_Comp_D7;
+
+contains
+  uDAAnyDACDriver in 'uDAAnyDACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D7.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D7.res
new file mode 100644
index 0000000..b40eccd
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_D7.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_Glyphs.lrs b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_Glyphs.lrs
new file mode 100644
index 0000000..6f651d1
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_Glyphs.lrs	
@@ -0,0 +1,80 @@
+LazarusResources.Add('TDAANYDACDriver','BMP',[
+  'BM'#248#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#194#6#0#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@'#0#0'@'#0#0'@'#0#0
+  +'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0#255#0
+  +#255#255#0#255#255#0#255#255#0#255#129#30#0'w'#23#0'w'#23#0#255#0#255#255#0
+  +#255#255#0#255#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0
+  +#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0'@'#0#0#255#0#255#255#0#255#129#30
+  +#0#129#30#0#129#30#0#252#154'*'#184':'#0#184':'#0#128'*'#3#255#0#255#128#0#0
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#128#0#0'@'#0#0#255#0
+  +#255#130#24#0#129#30#0#248'w'#0#255#129#0#255#149#19#255#170'4'#255#189'Z'
+  +#138#31#0#255#0#255#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0#255#255#255
+  +#255#255#255#128#0#0#255#255#255#255#255#255#128#0#0#255#255#255#128#0#0'@'#0
+  +#0#5'f'#149#130#24#0'y'#16#0#255#158' '#252'w'#0#143#30#0#213'g'#10#255#171
+  +'8'#138#31#0#255#0#255#128#0#0#255#255#255#128#0#0#255#255#255#255#255#255
+  +#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0#128#0#0#255#255#255#128#0#0'@'#0
+  +#0#130#24#0#130#24#0#221#152'Z'#255#191']'#186'M'#5#255#0#255'v'#12#0#242#134
+  +#20#252#160'4'#138#31#0#128#0#0#255#255#255#128#0#0#255#255#255#255#255#255
+  +#128#0#0#255#255#255#128#0#0#255#255#255#255#255#255#128#0#0#0'R'#143#0'6o'#9
+  +'o'#164'W9'#23#171'3'#0#233#171'n'#255#215#146#193'e%'#255#0#255'v'#12#0#242
+  +'w'#1#255#150#25#138#31#0#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0#255#255
+  +#255#255#255#255#255#255#255#128#0#0#0'R'#143#0'R'#143#0'R'#143#6#140#194'I'
+  +#221#255#0'v'#186#0'v'#186'YVE'#255#218#154#233#170'j'#145'%'#0#193'M'#0#255
+  +'~'#0#138#31#0#255#0#255#128#0#0#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#0'6p'#0'j'#161#2#199#255
+  +#9#202#255''''#212#255'N'#222#255'y'#233#255#0'v'#186#255#218#154#255#218#154
+  +#255#211#137#255#177'C'#255#138#7#138#31#0#255#0#255#128#0#0#128#0#0#128#0#0
+  +#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#0'9u'#4'v'#170'('#212#255#0
+  +#158#218#0'N'#138#22#163#212'R'#224#255#0'v'#186#196'f#'#203'g'#25#255#218
+  +#154#184':'#0#184':'#0#184':'#0#255#0#255#255#0#255#2't'#169'['#213#226'i'
+  +#246#254'E'#230#254'%'#215#254#13#199#254#26#204#254#0';v'#11#128#176#156#233
+  +#254'h'#230#255'#'#165#212#0'A~'#0'F'#129'0'#215#255'M'#215#254'%_p'#184':'#0
+  +#184':'#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#2't'#169'['#213
+  +#226''#247#254'z'#238#254'}'#233#254#135#231#255#163#237#255#0';v'#3'{'#176
+  +#165#235#254#167#243#255'^'#193#226#0'L'#138#0'N'#138#19#204#255'-'#206#252
+  +#13'b'#145#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#2't'#169#160#233#239#170#238#246'p'#207#229'?'#177#211#29#149#192#17#131
+  +#177#15'{'#170#0'@z'#24#150#196#182#246#255'~'#212#238#3'g'#157#13#182#235#1
+  +#198#255#13'b'#145#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#3'p'#164'T'#177#202'('#156#188'&'#171#207#27#182#224
+  +#12#183#237#24#198#247':'#213#254#0'A~'#27#153#196#181#244#255#182#246#255
+  +#154#240#255'N'#222#255#13#202#255#13'b'#145#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#4'l'#158'?'#180#203'f'#242
+  +#251'E'#230#254'%'#215#254#0#0#0#0#0#0#0#0#0#0#0#0#0'Ay'#0'E~;'#175#213#182
+  +#246#255#13'b'#145#13'b'#145#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#2's'#167'['#213#226'i'#246#254
+  +'E'#230#254#0#0#0#255#255#255#255#255#255#255#255#255#255#255#255#0#0#0'Q'
+  +#199#233#0'A{'#0'E{'#1'z'#180#5'f'#149#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#128#128#128#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#255#255#255#128#0#0#128#0#0#255#255#255#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#128#128#128#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#254#254#254#128#0#0#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#0#0#0#128#128#128#255#255#255#128#0#0#255#255
+  +#255#128#0#0#255#255#255#128#0#0#255#255#255#128#0#0#255#255#255#128#0#0#255
+  +#255#255#128#0#0#128#0#0#192#220#192#255#255#255#128#0#0#255#255#255#128#0#0
+  +#255#255#255#192#220#192#128#0#0#255#255#255#0#0#0#128#128#128#255#255#255
+  +#128#0#0#255#255#255#128#0#0#255#255#255#128#0#0#255#255#255#128#0#0#255#255
+  +#255#128#0#0#255#255#255#128#0#0#192#220#192#128#0#0#255#255#255#128#0#0#255
+  +#255#255#128#0#0#255#255#255#128#0#0#192#220#192#255#255#255#0#0#0#128#128
+  +#128#255#255#255#128#0#0#128#0#0#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0
+  +#255#255#255#128#0#0#255#255#255#128#0#0#255#255#255#128#0#0#255#255#255#128
+  +#0#0#128#0#0#128#0#0#255#255#255#128#0#0#255#255#255#255#255#255#0#0#0#128
+  +#128#128#255#255#255#128#0#0#255#255#255#128#0#0#255#255#255#255#255#255#255
+  ,#255#255#254#254#254#255#255#255#255#255#255#255#255#255#128#0#0#192#220#192
+  +#128#0#0#255#255#255#128#0#0#255#255#255#128#0#0#255#255#255#128#0#0#192#220
+  +#192#255#255#255#0#0#0#128#128#128#255#255#255#192#220#192#128#0#0#192#220
+  +#192#255#255#255#255#255#255#255#255#255#254#254#254#255#255#255#255#255#255
+  +#255#255#255#128#0#0#128#0#0#192#220#192#255#255#255#192#220#192#128#0#0#192
+  +#220#192#255#255#255#192#220#192#128#0#0#255#255#255#0#0#0#128#128#128#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#254#254#254#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#0#0#0#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128#128#128#0#0
+]);
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_Glyphs.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_Glyphs.res
new file mode 100644
index 0000000..3926468
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_Glyphs.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_Lazarus_Windows.lpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_Lazarus_Windows.lpk
new file mode 100644
index 0000000..a937aad
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_AnyDACDriver_Lazarus_Windows.lpk	
@@ -0,0 +1,52 @@
+<?xml version="1.0"?>
+<CONFIG>
+  <Package Version="3">
+    <PathDelim Value="\"/>
+    <Name Value="DataAbstract_AnyDACDriver_Lazarus_Windows"/>
+    <CompilerOptions>
+      <Version Value="5"/>
+      <PathDelim Value="\"/>
+      <SearchPaths>
+        <IncludeFiles Value="T:\ROSOFT\AnyDAC\Source\"/>
+        <UnitOutputDirectory Value="..\..\Dcu\Lazarus\$(TargetCPU)-$(TargetOS)"/>
+      </SearchPaths>
+      <CodeGeneration>
+        <Generate Value="Faster"/>
+      </CodeGeneration>
+      <Other>
+        <CompilerPath Value="$(CompPath)"/>
+      </Other>
+    </CompilerOptions>
+    <Files Count="2">
+      <Item1>
+        <Filename Value="uDAAnyDACDriver.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="uDAAnyDACDriver"/>
+      </Item1>
+      <Item2>
+        <Filename Value="DataAbstract_AnyDACDriver_Glyphs.lrs"/>
+        <Type Value="LRS"/>
+      </Item2>
+    </Files>
+    <Type Value="RunAndDesignTime"/>
+    <RequiredPkgs Count="3">
+      <Item1>
+        <PackageName Value="DataAbstract_Core_Lazarus_Windows"/>
+      </Item1>
+      <Item2>
+        <PackageName Value="AnyDAC_lazarus"/>
+      </Item2>
+      <Item3>
+        <PackageName Value="FCL"/>
+        <MinVersion Major="1" Valid="True"/>
+      </Item3>
+    </RequiredPkgs>
+    <UsageOptions>
+      <UnitPath Value="$(PkgOutDir)"/>
+    </UsageOptions>
+    <PublishOptions>
+      <Version Value="2"/>
+      <IgnoreBinaries Value="False"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D10.bdsproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D10.bdsproj
new file mode 100644
index 0000000..f5afeb9
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D10.bdsproj	
@@ -0,0 +1,179 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality">Delphi.Personality</Option>
+			<Option Name="ProjectType"></Option>
+			<Option Name="Version">1.0</Option>
+			<Option Name="GUID">{0FC45B58-F519-40B6-831A-DD79C8D3270F}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource">DataAbstract_BDEDriver_D10.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A">8</Compiler>
+			<Compiler Name="B">0</Compiler>
+			<Compiler Name="C">1</Compiler>
+			<Compiler Name="D">1</Compiler>
+			<Compiler Name="E">0</Compiler>
+			<Compiler Name="F">0</Compiler>
+			<Compiler Name="G">1</Compiler>
+			<Compiler Name="H">1</Compiler>
+			<Compiler Name="I">1</Compiler>
+			<Compiler Name="J">0</Compiler>
+			<Compiler Name="K">0</Compiler>
+			<Compiler Name="L">1</Compiler>
+			<Compiler Name="M">0</Compiler>
+			<Compiler Name="N">1</Compiler>
+			<Compiler Name="O">1</Compiler>
+			<Compiler Name="P">1</Compiler>
+			<Compiler Name="Q">0</Compiler>
+			<Compiler Name="R">0</Compiler>
+			<Compiler Name="S">0</Compiler>
+			<Compiler Name="T">0</Compiler>
+			<Compiler Name="U">0</Compiler>
+			<Compiler Name="V">1</Compiler>
+			<Compiler Name="W">0</Compiler>
+			<Compiler Name="X">1</Compiler>
+			<Compiler Name="Y">1</Compiler>
+			<Compiler Name="Z">1</Compiler>
+			<Compiler Name="ShowHints">True</Compiler>
+			<Compiler Name="ShowWarnings">True</Compiler>
+			<Compiler Name="UnitAliases"></Compiler>
+			<Compiler Name="NamespacePrefix"></Compiler>
+			<Compiler Name="GenerateDocumentation">False</Compiler>
+			<Compiler Name="DefaultNamespace"></Compiler>
+			<Compiler Name="SymbolDeprecated">False</Compiler>
+			<Compiler Name="SymbolLibrary">False</Compiler>
+			<Compiler Name="SymbolPlatform">False</Compiler>
+			<Compiler Name="SymbolExperimental">True</Compiler>
+			<Compiler Name="UnitLibrary">False</Compiler>
+			<Compiler Name="UnitPlatform">False</Compiler>
+			<Compiler Name="UnitDeprecated">False</Compiler>
+			<Compiler Name="UnitExperimental">True</Compiler>
+			<Compiler Name="HResultCompat">True</Compiler>
+			<Compiler Name="HidingMember">True</Compiler>
+			<Compiler Name="HiddenVirtual">True</Compiler>
+			<Compiler Name="Garbage">True</Compiler>
+			<Compiler Name="BoundsError">True</Compiler>
+			<Compiler Name="ZeroNilCompat">True</Compiler>
+			<Compiler Name="StringConstTruncated">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar">True</Compiler>
+			<Compiler Name="TypedConstVarPar">True</Compiler>
+			<Compiler Name="AsgToTypedConst">True</Compiler>
+			<Compiler Name="CaseLabelRange">True</Compiler>
+			<Compiler Name="ForVariable">True</Compiler>
+			<Compiler Name="ConstructingAbstract">True</Compiler>
+			<Compiler Name="ComparisonFalse">True</Compiler>
+			<Compiler Name="ComparisonTrue">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned">True</Compiler>
+			<Compiler Name="UnsupportedConstruct">True</Compiler>
+			<Compiler Name="FileOpen">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc">True</Compiler>
+			<Compiler Name="BadGlobalSymbol">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor">True</Compiler>
+			<Compiler Name="InvalidDirective">True</Compiler>
+			<Compiler Name="PackageNoLink">True</Compiler>
+			<Compiler Name="PackageThreadVar">True</Compiler>
+			<Compiler Name="ImplicitImport">True</Compiler>
+			<Compiler Name="HPPEMITIgnored">True</Compiler>
+			<Compiler Name="NoRetVal">True</Compiler>
+			<Compiler Name="UseBeforeDef">True</Compiler>
+			<Compiler Name="ForLoopVarUndef">True</Compiler>
+			<Compiler Name="UnitNameMismatch">True</Compiler>
+			<Compiler Name="NoCFGFileFound">True</Compiler>
+			<Compiler Name="MessageDirective">True</Compiler>
+			<Compiler Name="ImplicitVariants">True</Compiler>
+			<Compiler Name="UnicodeToLocale">True</Compiler>
+			<Compiler Name="LocaleToUnicode">True</Compiler>
+			<Compiler Name="ImagebaseMultiple">True</Compiler>
+			<Compiler Name="SuspiciousTypecast">True</Compiler>
+			<Compiler Name="PrivatePropAccessor">True</Compiler>
+			<Compiler Name="UnsafeType">False</Compiler>
+			<Compiler Name="UnsafeCode">False</Compiler>
+			<Compiler Name="UnsafeCast">False</Compiler>
+			<Compiler Name="OptionTruncated">True</Compiler>
+			<Compiler Name="WideCharReduced">True</Compiler>
+			<Compiler Name="DuplicatesIgnored">True</Compiler>
+			<Compiler Name="UnitInitSeq">True</Compiler>
+			<Compiler Name="LocalPInvoke">True</Compiler>
+			<Compiler Name="CodePage"></Compiler>
+		</Compiler>
+		<Linker>
+			<Linker Name="MapFile">0</Linker>
+			<Linker Name="OutputObjs">0</Linker>
+			<Linker Name="ConsoleApp">1</Linker>
+			<Linker Name="DebugInfo">False</Linker>
+			<Linker Name="RemoteSymbols">False</Linker>
+			<Linker Name="GenerateDRC">False</Linker>
+			<Linker Name="MinStackSize">16384</Linker>
+			<Linker Name="MaxStackSize">1048576</Linker>
+			<Linker Name="ImageBase">4194304</Linker>
+			<Linker Name="ExeDescription">RemObjects Data Abstract - BDE Driver</Linker>
+			<Linker Name="GenerateHpps">False</Linker>
+		</Linker>
+		<Directories>
+			<Directories Name="OutputDir"></Directories>
+			<Directories Name="UnitOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDLLOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDCPOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="SearchPath">..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10</Directories>
+			<Directories Name="Packages"></Directories>
+			<Directories Name="Conditionals"></Directories>
+			<Directories Name="DebugSourceDirs"></Directories>
+			<Directories Name="UsePackages">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams"></Parameters>
+			<Parameters Name="HostApplication"></Parameters>
+			<Parameters Name="Launcher"></Parameters>
+			<Parameters Name="UseLauncher">False</Parameters>
+			<Parameters Name="DebugCWD"></Parameters>
+			<Parameters Name="RemoteHost"></Parameters>
+			<Parameters Name="RemotePath"></Parameters>
+			<Parameters Name="RemoteLauncher"></Parameters>
+			<Parameters Name="RemoteCWD"></Parameters>
+			<Parameters Name="RemoteDebug">False</Parameters>
+			<Parameters Name="Debug Symbols Search Path"></Parameters>
+			<Parameters Name="LoadAllSymbols">True</Parameters>
+			<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+		</Parameters>
+		<Language>
+			<Language Name="ActiveLang"></Language>
+			<Language Name="ProjectLang">$00000000</Language>
+			<Language Name="RootDir"></Language>
+		</Language>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+			<VersionInfo Name="MajorVer">3</VersionInfo>
+			<VersionInfo Name="MinorVer">0</VersionInfo>
+			<VersionInfo Name="Release">1</VersionInfo>
+			<VersionInfo Name="Build">361</VersionInfo>
+			<VersionInfo Name="Debug">False</VersionInfo>
+			<VersionInfo Name="PreRelease">False</VersionInfo>
+			<VersionInfo Name="Special">False</VersionInfo>
+			<VersionInfo Name="Private">False</VersionInfo>
+			<VersionInfo Name="DLL">False</VersionInfo>
+			<VersionInfo Name="Locale">1033</VersionInfo>
+			<VersionInfo Name="CodePage">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+		</VersionInfoKeys>
+	</Delphi.Personality>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D10.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D10.cfg
new file mode 100644
index 0000000..9037d9d
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D10.cfg	
@@ -0,0 +1,49 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N0"..\..\Dcu\D10"
+-LE"..\..\Dcu\D10"
+-LN"..\..\Dcu\D10"
+-U"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-O"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-I"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-R"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D10.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D10.dpk
new file mode 100644
index 0000000..de3b837
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D10.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_BDEDriver_D10;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - BDE Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  bdertl,
+  DataAbstract_Core_D10;
+
+contains
+  uDABDEDriver in 'uDABDEDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D10.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D10.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D10.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D11.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D11.dpk
new file mode 100644
index 0000000..073cecc
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D11.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_BDEDriver_D11;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - BDE Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  bdertl,
+  DataAbstract_Core_D11;
+
+contains
+  uDABDEDriver in 'uDABDEDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D11.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D11.dproj
new file mode 100644
index 0000000..2d9757f
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D11.dproj	
@@ -0,0 +1,68 @@
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{3cd4ddcd-76f8-4583-8117-c00562cb6a62}</ProjectGuid>
+    <MainSource>DataAbstract_BDEDriver_D11.dpk</MainSource>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+    <DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_BDEDriver_D11.bpl</DCC_DependencyCheckOutputName>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DebugInformation>False</DCC_DebugInformation>
+    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_Define>RELEASE</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Delphi.Personality</Borland.Personality>
+    <Borland.ProjectType>Package</Borland.ProjectType>
+    <BorlandProject>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">RemObjects Data Abstract - BDE Driver</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">True</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">3</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">1</VersionInfo><VersionInfo Name="Build">361</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">DataAbstract_BDEDriver_D11.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
+  <ItemGroup>
+    <DelphiCompile Include="DataAbstract_BDEDriver_D11.dpk">
+      <MainSource>MainSource</MainSource>
+    </DelphiCompile>
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\bdertl.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\DataAbstract_Core_D11.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\dbrtl.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\rtl.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\vcl.dcp" />
+    <DCCReference Include="uDABDEDriver.pas" />
+  </ItemGroup>
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D11.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D11.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D11.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D12.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D12.dpk
new file mode 100644
index 0000000..806569a
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D12.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_BDEDriver_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - BDE Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  bdertl,
+  DataAbstract_Core_D12;
+
+contains
+  uDABDEDriver in 'uDABDEDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D12.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D12.dproj
new file mode 100644
index 0000000..07c3f28
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D12.dproj	
@@ -0,0 +1,95 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{3cd4ddcd-76f8-4583-8117-c00562cb6a62}</ProjectGuid>
+			<MainSource>DataAbstract_BDEDriver_D12.dpk</MainSource>
+			<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+			<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+			<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_BDEDriver_D11.bpl</DCC_DependencyCheckOutputName>
+			<ProjectVersion>11.1</ProjectVersion>
+			<Config Condition="'$(Config)'==''">Base</Config>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base)'!=''">
+			<DCC_SymbolReferenceInfo>1</DCC_SymbolReferenceInfo>
+			<DCC_CVT_WCHAR_TO_ACHAR>error</DCC_CVT_WCHAR_TO_ACHAR>
+			<DCC_CVT_WIDENING_STRING_LOST>error</DCC_CVT_WIDENING_STRING_LOST>
+			<DCC_BplOutput>..\..\Dcu\D12</DCC_BplOutput>
+			<DCC_UnitSearchPath>..;..\..\Dcu\D12;..\..\..\RemObjects SDK for Delphi\Dcu\D12;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+			<DCC_EXPLICIT_STRING_CAST>error</DCC_EXPLICIT_STRING_CAST>
+			<DCC_CVT_ACHAR_TO_WCHAR>error</DCC_CVT_ACHAR_TO_WCHAR>
+			<DCC_IMPLICIT_STRING_CAST_LOSS>error</DCC_IMPLICIT_STRING_CAST_LOSS>
+			<DCC_EXPLICIT_STRING_CAST_LOSS>error</DCC_EXPLICIT_STRING_CAST_LOSS>
+			<DCC_IMPLICIT_STRING_CAST>error</DCC_IMPLICIT_STRING_CAST>
+			<DCC_DcuOutput>..\..\Dcu\D12</DCC_DcuOutput>
+			<DCC_CVT_NARROWING_STRING_LOST>error</DCC_CVT_NARROWING_STRING_LOST>
+			<DCC_DcpOutput>..\..\Dcu\D12</DCC_DcpOutput>
+			<GenDll>true</GenDll>
+			<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+			<GenPackage>true</GenPackage>
+			<DesignOnlyPackage>true</DesignOnlyPackage>
+			<DCC_ImageBase>00400000</DCC_ImageBase>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D12\DataAbstract_BDEDriver_D12.bpl</DCC_DependencyCheckOutputName>
+			<DCC_Description>RemObjects Data Abstract - BDE Driver</DCC_Description>
+		</PropertyGroup>
+		<ItemGroup>
+			<DelphiCompile Include="DataAbstract_BDEDriver_D12.dpk">
+				<MainSource>MainSource</MainSource>
+			</DelphiCompile>
+			<DCCReference Include="rtl.dcp"/>
+			<DCCReference Include="vcl.dcp"/>
+			<DCCReference Include="dbrtl.dcp"/>
+			<DCCReference Include="bdertl.dcp"/>
+			<DCCReference Include="DataAbstract_Core_D12.dcp"/>
+			<DCCReference Include="uDABDEDriver.pas"/>
+			<BuildConfiguration Include="Base">
+				<Key>Base</Key>
+			</BuildConfiguration>
+		</ItemGroup>
+		<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+		<ProjectExtensions>
+			<Borland.Personality>Delphi.Personality.12</Borland.Personality>
+			<Borland.ProjectType>Package</Borland.ProjectType>
+			<BorlandProject>
+				<Delphi.Personality>
+					<Parameters>
+						<Parameters Name="UseLauncher">False</Parameters>
+						<Parameters Name="LoadAllSymbols">True</Parameters>
+						<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+					</Parameters>
+					<VersionInfo>
+						<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+						<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+						<VersionInfo Name="MajorVer">3</VersionInfo>
+						<VersionInfo Name="MinorVer">0</VersionInfo>
+						<VersionInfo Name="Release">1</VersionInfo>
+						<VersionInfo Name="Build">361</VersionInfo>
+						<VersionInfo Name="Debug">False</VersionInfo>
+						<VersionInfo Name="PreRelease">False</VersionInfo>
+						<VersionInfo Name="Special">False</VersionInfo>
+						<VersionInfo Name="Private">False</VersionInfo>
+						<VersionInfo Name="DLL">False</VersionInfo>
+						<VersionInfo Name="Locale">1033</VersionInfo>
+						<VersionInfo Name="CodePage">1252</VersionInfo>
+					</VersionInfo>
+					<VersionInfoKeys>
+						<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="FileDescription"/>
+						<VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys>
+						<VersionInfoKeys Name="InternalName"/>
+						<VersionInfoKeys Name="LegalCopyright"/>
+						<VersionInfoKeys Name="LegalTrademarks"/>
+						<VersionInfoKeys Name="OriginalFilename"/>
+						<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+						<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+					</VersionInfoKeys>
+					<Source>
+						<Source Name="MainSource">DataAbstract_BDEDriver_D12.dpk</Source>
+					</Source>
+				</Delphi.Personality>
+			</BorlandProject>
+			<ProjectFileVersion>12</ProjectFileVersion>
+		</ProjectExtensions>
+	</Project>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D12.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D12.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D12.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D6.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D6.cfg
new file mode 100644
index 0000000..c2c069b
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D6.cfg	
@@ -0,0 +1,41 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D6"
+-LE"..\..\Dcu\D6"
+-LN"..\..\Dcu\D6"
+-U"..\..\Dcu\D6;..\..\..\RemObjects SDK\Dcu\D6"
+-O"..\..\Dcu\D6;..\..\..\RemObjects SDK\Dcu\D6"
+-I"..\..\Dcu\D6;..\..\..\RemObjects SDK\Dcu\D6"
+-R"..\..\Dcu\D6;..\..\..\RemObjects SDK\Dcu\D6"
+-Z
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D6.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D6.dpk
new file mode 100644
index 0000000..aceb56d
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D6.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_BDEDriver_D6;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - BDE Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D6,
+  bdertl;
+
+contains
+  uDABDEDriver in 'uDABDEDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D6.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D6.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D6.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D7.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D7.cfg
new file mode 100644
index 0000000..8e0bad7
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D7.cfg	
@@ -0,0 +1,50 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D7"
+-LE"..\..\Dcu\D7"
+-LN"..\..\Dcu\D7"
+-U"..\..\Dcu\D7;..\..\..\RemObjects SDK\Dcu\D7"
+-O"..\..\Dcu\D7;..\..\..\RemObjects SDK\Dcu\D7"
+-I"..\..\Dcu\D7;..\..\..\RemObjects SDK\Dcu\D7"
+-R"..\..\Dcu\D7;..\..\..\RemObjects SDK\Dcu\D7"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D7.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D7.dpk
new file mode 100644
index 0000000..a5b4538
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D7.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_BDEDriver_D7;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - BDE Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  bdertl,
+  DataAbstract_Core_D7;
+
+contains
+  uDABDEDriver in 'uDABDEDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D7.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D7.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_D7.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_Glyphs.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_Glyphs.res
new file mode 100644
index 0000000..a2a5a20
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_BDEDriver_Glyphs.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D10.bdsproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D10.bdsproj
new file mode 100644
index 0000000..096f1d8
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D10.bdsproj	
@@ -0,0 +1,176 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality">Delphi.Personality</Option>
+			<Option Name="ProjectType"></Option>
+			<Option Name="Version">1.0</Option>
+			<Option Name="GUID">{E4D07654-5C28-4ECD-A91D-BABEA25937FF}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource">DataAbstract_DBISAMDriver_D10.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A">8</Compiler>
+			<Compiler Name="B">0</Compiler>
+			<Compiler Name="C">1</Compiler>
+			<Compiler Name="D">1</Compiler>
+			<Compiler Name="E">0</Compiler>
+			<Compiler Name="F">0</Compiler>
+			<Compiler Name="G">1</Compiler>
+			<Compiler Name="H">1</Compiler>
+			<Compiler Name="I">1</Compiler>
+			<Compiler Name="J">0</Compiler>
+			<Compiler Name="K">0</Compiler>
+			<Compiler Name="L">1</Compiler>
+			<Compiler Name="M">0</Compiler>
+			<Compiler Name="N">1</Compiler>
+			<Compiler Name="O">1</Compiler>
+			<Compiler Name="P">1</Compiler>
+			<Compiler Name="Q">0</Compiler>
+			<Compiler Name="R">0</Compiler>
+			<Compiler Name="S">0</Compiler>
+			<Compiler Name="T">0</Compiler>
+			<Compiler Name="U">0</Compiler>
+			<Compiler Name="V">1</Compiler>
+			<Compiler Name="W">0</Compiler>
+			<Compiler Name="X">1</Compiler>
+			<Compiler Name="Y">1</Compiler>
+			<Compiler Name="Z">1</Compiler>
+			<Compiler Name="ShowHints">True</Compiler>
+			<Compiler Name="ShowWarnings">True</Compiler>
+			<Compiler Name="UnitAliases"></Compiler>
+			<Compiler Name="NamespacePrefix"></Compiler>
+			<Compiler Name="GenerateDocumentation">False</Compiler>
+			<Compiler Name="DefaultNamespace"></Compiler>
+			<Compiler Name="SymbolDeprecated">False</Compiler>
+			<Compiler Name="SymbolLibrary">False</Compiler>
+			<Compiler Name="SymbolPlatform">False</Compiler>
+			<Compiler Name="SymbolExperimental">True</Compiler>
+			<Compiler Name="UnitLibrary">False</Compiler>
+			<Compiler Name="UnitPlatform">False</Compiler>
+			<Compiler Name="UnitDeprecated">False</Compiler>
+			<Compiler Name="UnitExperimental">True</Compiler>
+			<Compiler Name="HResultCompat">True</Compiler>
+			<Compiler Name="HidingMember">True</Compiler>
+			<Compiler Name="HiddenVirtual">True</Compiler>
+			<Compiler Name="Garbage">True</Compiler>
+			<Compiler Name="BoundsError">True</Compiler>
+			<Compiler Name="ZeroNilCompat">True</Compiler>
+			<Compiler Name="StringConstTruncated">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar">True</Compiler>
+			<Compiler Name="TypedConstVarPar">True</Compiler>
+			<Compiler Name="AsgToTypedConst">True</Compiler>
+			<Compiler Name="CaseLabelRange">True</Compiler>
+			<Compiler Name="ForVariable">True</Compiler>
+			<Compiler Name="ConstructingAbstract">True</Compiler>
+			<Compiler Name="ComparisonFalse">True</Compiler>
+			<Compiler Name="ComparisonTrue">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned">True</Compiler>
+			<Compiler Name="UnsupportedConstruct">True</Compiler>
+			<Compiler Name="FileOpen">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc">True</Compiler>
+			<Compiler Name="BadGlobalSymbol">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor">True</Compiler>
+			<Compiler Name="InvalidDirective">True</Compiler>
+			<Compiler Name="PackageNoLink">True</Compiler>
+			<Compiler Name="PackageThreadVar">True</Compiler>
+			<Compiler Name="ImplicitImport">True</Compiler>
+			<Compiler Name="HPPEMITIgnored">True</Compiler>
+			<Compiler Name="NoRetVal">True</Compiler>
+			<Compiler Name="UseBeforeDef">True</Compiler>
+			<Compiler Name="ForLoopVarUndef">True</Compiler>
+			<Compiler Name="UnitNameMismatch">True</Compiler>
+			<Compiler Name="NoCFGFileFound">True</Compiler>
+			<Compiler Name="MessageDirective">True</Compiler>
+			<Compiler Name="ImplicitVariants">True</Compiler>
+			<Compiler Name="UnicodeToLocale">True</Compiler>
+			<Compiler Name="LocaleToUnicode">True</Compiler>
+			<Compiler Name="ImagebaseMultiple">True</Compiler>
+			<Compiler Name="SuspiciousTypecast">True</Compiler>
+			<Compiler Name="PrivatePropAccessor">True</Compiler>
+			<Compiler Name="UnsafeType">False</Compiler>
+			<Compiler Name="UnsafeCode">False</Compiler>
+			<Compiler Name="UnsafeCast">False</Compiler>
+			<Compiler Name="OptionTruncated">True</Compiler>
+			<Compiler Name="WideCharReduced">True</Compiler>
+			<Compiler Name="DuplicatesIgnored">True</Compiler>  <Compiler Name="UnitInitSeq">True</Compiler>
+      <Compiler Name="LocalPInvoke">True</Compiler>
+      <Compiler Name="CodePage"></Compiler>
+    </Compiler>
+		<Linker>
+			<Linker Name="MapFile">0</Linker>
+			<Linker Name="OutputObjs">0</Linker>
+			<Linker Name="ConsoleApp">1</Linker>
+			<Linker Name="DebugInfo">False</Linker>
+			<Linker Name="RemoteSymbols">False</Linker>
+			<Linker Name="GenerateDRC">False</Linker>
+			<Linker Name="MinStackSize">16384</Linker>
+			<Linker Name="MaxStackSize">1048576</Linker>
+			<Linker Name="ImageBase">4194304</Linker>
+			<Linker Name="ExeDescription">RemObjects Data Abstract - DBISAM Driver</Linker>  <Linker Name="GenerateHpps">False</Linker>
+    </Linker>
+		<Directories>
+			<Directories Name="OutputDir"></Directories>
+			<Directories Name="UnitOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDLLOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDCPOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="SearchPath">..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10</Directories>
+			<Directories Name="Packages"></Directories>
+			<Directories Name="Conditionals"></Directories>
+			<Directories Name="DebugSourceDirs"></Directories>
+			<Directories Name="UsePackages">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams"></Parameters>
+			<Parameters Name="HostApplication"></Parameters>
+			<Parameters Name="Launcher"></Parameters>
+			<Parameters Name="UseLauncher">False</Parameters>
+			<Parameters Name="DebugCWD"></Parameters>
+			<Parameters Name="RemoteHost"></Parameters>
+			<Parameters Name="RemotePath"></Parameters>
+			<Parameters Name="RemoteLauncher"></Parameters>
+			<Parameters Name="RemoteCWD"></Parameters>
+			<Parameters Name="RemoteDebug">False</Parameters>  <Parameters Name="Debug Symbols Search Path"></Parameters>
+      <Parameters Name="LoadAllSymbols">True</Parameters>
+      <Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+    </Parameters>
+		<Language>
+			<Language Name="ActiveLang"></Language>
+			<Language Name="ProjectLang">$00000000</Language>
+			<Language Name="RootDir"></Language>
+		</Language>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+			<VersionInfo Name="MajorVer">1</VersionInfo>
+			<VersionInfo Name="MinorVer">0</VersionInfo>
+			<VersionInfo Name="Release">0</VersionInfo>
+			<VersionInfo Name="Build">0</VersionInfo>
+			<VersionInfo Name="Debug">False</VersionInfo>
+			<VersionInfo Name="PreRelease">False</VersionInfo>
+			<VersionInfo Name="Special">False</VersionInfo>
+			<VersionInfo Name="Private">False</VersionInfo>
+			<VersionInfo Name="DLL">False</VersionInfo>
+			<VersionInfo Name="Locale">1033</VersionInfo>
+			<VersionInfo Name="CodePage">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName">RemObjects Data Abstract</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+		</VersionInfoKeys>
+	</Delphi.Personality>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D10.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D10.cfg
new file mode 100644
index 0000000..9037d9d
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D10.cfg	
@@ -0,0 +1,49 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N0"..\..\Dcu\D10"
+-LE"..\..\Dcu\D10"
+-LN"..\..\Dcu\D10"
+-U"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-O"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-I"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-R"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D10.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D10.dpk
new file mode 100644
index 0000000..b21161d
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D10.dpk	
@@ -0,0 +1,40 @@
+package DataAbstract_DBISAMDriver_D10;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - DBISAM Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  vcldb,
+  RemObjects_Core_D10,
+  DataAbstract_Core_D10,
+  db324d9r;
+
+contains
+  uDADBISAMDriver in 'uDADBISAMDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D10.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D10.res
new file mode 100644
index 0000000..6ef0ba1
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D10.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D11.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D11.dpk
new file mode 100644
index 0000000..2ba6953
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D11.dpk	
@@ -0,0 +1,40 @@
+package DataAbstract_DBISAMDriver_D11;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - DBISAM Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  vcldb,
+  RemObjects_Core_D11,
+  DataAbstract_Core_D11,
+  db324d2007r;
+
+contains
+  uDADBISAMDriver in 'uDADBISAMDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D11.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D11.dproj
new file mode 100644
index 0000000..15260b2
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D11.dproj	
@@ -0,0 +1,63 @@
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{18f879f9-5865-46a9-8515-d3b4503d16ff}</ProjectGuid>
+    <MainSource>DataAbstract_DBISAMDriver_D11.dpk</MainSource>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+    <DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_DBISAMDriver_D11.bpl</DCC_DependencyCheckOutputName>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DebugInformation>False</DCC_DebugInformation>
+    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_Define>RELEASE</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Delphi.Personality</Borland.Personality>
+    <Borland.ProjectType>Package</Borland.ProjectType>
+    <BorlandProject>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">RemObjects Data Abstract - DBISAM Driver</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">RemObjects Data Abstract</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">DataAbstract_DBISAMDriver_D11.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
+  <ItemGroup>
+    <DelphiCompile Include="DataAbstract_DBISAMDriver_D11.dpk">
+      <MainSource>MainSource</MainSource>
+    </DelphiCompile>
+    <DCCReference Include="uDADBISAMDriver.pas" />
+  </ItemGroup>
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D11.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D11.res
new file mode 100644
index 0000000..6ef0ba1
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D11.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D12.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D12.dpk
new file mode 100644
index 0000000..db50a91
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D12.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_DBISAMDriver_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - DBISAM Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  vcldb,
+  DataAbstract_Core_D12,
+  db424b2009r;
+
+contains
+  uDADBISAMDriver in 'uDADBISAMDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D12.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D12.dproj
new file mode 100644
index 0000000..19951b8
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D12.dproj	
@@ -0,0 +1,96 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{18f879f9-5865-46a9-8515-d3b4503d16ff}</ProjectGuid>
+			<MainSource>DataAbstract_DBISAMDriver_D12.dpk</MainSource>
+			<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+			<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+			<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_DBISAMDriver_D11.bpl</DCC_DependencyCheckOutputName>
+			<ProjectVersion>11.1</ProjectVersion>
+			<Config Condition="'$(Config)'==''">Base</Config>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base)'!=''">
+			<DCC_SymbolReferenceInfo>1</DCC_SymbolReferenceInfo>
+			<DCC_CVT_WCHAR_TO_ACHAR>error</DCC_CVT_WCHAR_TO_ACHAR>
+			<DCC_CVT_WIDENING_STRING_LOST>error</DCC_CVT_WIDENING_STRING_LOST>
+			<DCC_BplOutput>..\..\Dcu\D12</DCC_BplOutput>
+			<DCC_UnitSearchPath>..;..\..\Dcu\D12;..\..\..\RemObjects SDK for Delphi\Dcu\D12;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+			<DCC_EXPLICIT_STRING_CAST>error</DCC_EXPLICIT_STRING_CAST>
+			<DCC_CVT_ACHAR_TO_WCHAR>error</DCC_CVT_ACHAR_TO_WCHAR>
+			<DCC_IMPLICIT_STRING_CAST_LOSS>error</DCC_IMPLICIT_STRING_CAST_LOSS>
+			<DCC_EXPLICIT_STRING_CAST_LOSS>error</DCC_EXPLICIT_STRING_CAST_LOSS>
+			<DCC_IMPLICIT_STRING_CAST>error</DCC_IMPLICIT_STRING_CAST>
+			<DCC_DcuOutput>..\..\Dcu\D12</DCC_DcuOutput>
+			<DCC_CVT_NARROWING_STRING_LOST>error</DCC_CVT_NARROWING_STRING_LOST>
+			<DCC_DcpOutput>..\..\Dcu\D12</DCC_DcpOutput>
+			<GenDll>true</GenDll>
+			<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+			<GenPackage>true</GenPackage>
+			<DesignOnlyPackage>false</DesignOnlyPackage>
+			<DCC_ImageBase>00400000</DCC_ImageBase>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D12\DataAbstract_DBISAMDriver_D12.bpl</DCC_DependencyCheckOutputName>
+			<DCC_Description>RemObjects Data Abstract - DBISAM Driver</DCC_Description>
+		</PropertyGroup>
+		<ItemGroup>
+			<DelphiCompile Include="DataAbstract_DBISAMDriver_D12.dpk">
+				<MainSource>MainSource</MainSource>
+			</DelphiCompile>
+			<DCCReference Include="rtl.dcp"/>
+			<DCCReference Include="vcl.dcp"/>
+			<DCCReference Include="dbrtl.dcp"/>
+			<DCCReference Include="vcldb.dcp"/>
+			<DCCReference Include="DataAbstract_Core_D12.dcp"/>
+			<DCCReference Include="db424b2009r.dcp"/>
+			<DCCReference Include="uDADBISAMDriver.pas"/>
+			<BuildConfiguration Include="Base">
+				<Key>Base</Key>
+			</BuildConfiguration>
+		</ItemGroup>
+		<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+		<ProjectExtensions>
+			<Borland.Personality>Delphi.Personality.12</Borland.Personality>
+			<Borland.ProjectType>Package</Borland.ProjectType>
+			<BorlandProject>
+				<Delphi.Personality>
+					<Parameters>
+						<Parameters Name="UseLauncher">False</Parameters>
+						<Parameters Name="LoadAllSymbols">True</Parameters>
+						<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+					</Parameters>
+					<VersionInfo>
+						<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+						<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+						<VersionInfo Name="MajorVer">1</VersionInfo>
+						<VersionInfo Name="MinorVer">0</VersionInfo>
+						<VersionInfo Name="Release">0</VersionInfo>
+						<VersionInfo Name="Build">0</VersionInfo>
+						<VersionInfo Name="Debug">False</VersionInfo>
+						<VersionInfo Name="PreRelease">False</VersionInfo>
+						<VersionInfo Name="Special">False</VersionInfo>
+						<VersionInfo Name="Private">False</VersionInfo>
+						<VersionInfo Name="DLL">False</VersionInfo>
+						<VersionInfo Name="Locale">1033</VersionInfo>
+						<VersionInfo Name="CodePage">1252</VersionInfo>
+					</VersionInfo>
+					<VersionInfoKeys>
+						<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="FileDescription"/>
+						<VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys>
+						<VersionInfoKeys Name="InternalName"/>
+						<VersionInfoKeys Name="LegalCopyright">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="LegalTrademarks">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="OriginalFilename"/>
+						<VersionInfoKeys Name="ProductName">RemObjects Data Abstract</VersionInfoKeys>
+						<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+					</VersionInfoKeys>
+					<Source>
+						<Source Name="MainSource">DataAbstract_DBISAMDriver_D12.dpk</Source>
+					</Source>
+				</Delphi.Personality>
+			</BorlandProject>
+			<ProjectFileVersion>12</ProjectFileVersion>
+		</ProjectExtensions>
+	</Project>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D12.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D12.res
new file mode 100644
index 0000000..6ef0ba1
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D12.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D6.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D6.cfg
new file mode 100644
index 0000000..05f9ec3
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D6.cfg	
@@ -0,0 +1,41 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D6"
+-LE"..\..\Dcu\D6"
+-LN"..\..\Dcu\D6"
+-U"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-O"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-I"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-R"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-Z
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D6.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D6.dof
new file mode 100644
index 0000000..1e36acf
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D6.dof	
@@ -0,0 +1,77 @@
+[FileVersion]
+Version=6.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitDeprecated=0
+UnitLibrary=0
+UnitPlatform=0
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=Data Abstract - DBISAM Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D6
+PackageDLLOutputDir=..\..\Dcu\D6
+PackageDCPOutputDir=..\..\Dcu\D6
+SearchPath=..\..\Dcu\D6
+Packages=vcl;rtl;dbrtl;adortl;vcldb;vclx;bdertl;vcldbx;ibxpress;dsnap;cds;bdecds;visualclx;visualdbclx;dsnapcrba;dsnapcon;VclSmp;vclshlctrls;vclie;xmlrtl;inet;inetdbbde;inetdbxpress;inetdb;webdsnap;websnap;soaprtl;dbexpress;dbxcds;indy;tb2kComplete;CRControls60;dac60;dacvcl60;sdacvcl60;sdac60;oraprov60;odac60;odacvcl60;DataAbstract_Core_D6;DataAbstract_DBXDriver_D6;DataAbstract_DiskDriver_D6
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=1.0.0.0
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+Comments=
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D6.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D6.dpk
new file mode 100644
index 0000000..f1b37bf
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D6.dpk	
@@ -0,0 +1,40 @@
+package DataAbstract_DBISAMDriver_D6;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - DBISAM Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  vcldb,
+  RemObjects_Core_D6,
+  DataAbstract_Core_D6,
+  db324d6r;
+
+contains
+  uDADBISAMDriver in 'uDADBISAMDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D6.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D6.res
new file mode 100644
index 0000000..84eaa11
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D6.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D7.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D7.cfg
new file mode 100644
index 0000000..02179cd
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D7.cfg	
@@ -0,0 +1,50 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D7"
+-LE"..\..\Dcu\D7"
+-LN"..\..\Dcu\D7"
+-U"..\..\Dcu\D7"
+-O"..\..\Dcu\D7"
+-I"..\..\Dcu\D7"
+-R"..\..\Dcu\D7"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D7.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D7.dof
new file mode 100644
index 0000000..2d15714
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D7.dof	
@@ -0,0 +1,116 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects Data Abstract - DBISAM Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D7
+PackageDLLOutputDir=..\..\Dcu\D7
+PackageDCPOutputDir=..\..\Dcu\D7
+SearchPath=..\..\Dcu\D7
+Packages=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=1.0.0.0
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D7.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D7.dpk
new file mode 100644
index 0000000..6a2ee23
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D7.dpk	
@@ -0,0 +1,40 @@
+package DataAbstract_DBISAMDriver_D7;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - DBISAM Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  vcldb,
+  RemObjects_Core_D7,
+  DataAbstract_Core_D7,
+  db324d7r;
+
+contains
+  uDADBISAMDriver in 'uDADBISAMDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D7.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D7.res
new file mode 100644
index 0000000..84eaa11
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_D7.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_Glyphs.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_Glyphs.res
new file mode 100644
index 0000000..3163762
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBISAMDriver_Glyphs.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D10.bdsproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D10.bdsproj
new file mode 100644
index 0000000..214c011
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D10.bdsproj	
@@ -0,0 +1,176 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality">Delphi.Personality</Option>
+			<Option Name="ProjectType"></Option>
+			<Option Name="Version">1.0</Option>
+			<Option Name="GUID">{C227C50C-E7AA-4212-8D32-C33B5BFE5BB8}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource">DataAbstract_DBXDriver_D10.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A">8</Compiler>
+			<Compiler Name="B">0</Compiler>
+			<Compiler Name="C">1</Compiler>
+			<Compiler Name="D">1</Compiler>
+			<Compiler Name="E">0</Compiler>
+			<Compiler Name="F">0</Compiler>
+			<Compiler Name="G">1</Compiler>
+			<Compiler Name="H">1</Compiler>
+			<Compiler Name="I">1</Compiler>
+			<Compiler Name="J">0</Compiler>
+			<Compiler Name="K">0</Compiler>
+			<Compiler Name="L">1</Compiler>
+			<Compiler Name="M">0</Compiler>
+			<Compiler Name="N">1</Compiler>
+			<Compiler Name="O">1</Compiler>
+			<Compiler Name="P">1</Compiler>
+			<Compiler Name="Q">0</Compiler>
+			<Compiler Name="R">0</Compiler>
+			<Compiler Name="S">0</Compiler>
+			<Compiler Name="T">0</Compiler>
+			<Compiler Name="U">1</Compiler>
+			<Compiler Name="V">1</Compiler>
+			<Compiler Name="W">1</Compiler>
+			<Compiler Name="X">1</Compiler>
+			<Compiler Name="Y">1</Compiler>
+			<Compiler Name="Z">1</Compiler>
+			<Compiler Name="ShowHints">True</Compiler>
+			<Compiler Name="ShowWarnings">True</Compiler>
+			<Compiler Name="UnitAliases"></Compiler>
+			<Compiler Name="NamespacePrefix"></Compiler>
+			<Compiler Name="GenerateDocumentation">False</Compiler>
+			<Compiler Name="DefaultNamespace"></Compiler>
+			<Compiler Name="SymbolDeprecated">False</Compiler>
+			<Compiler Name="SymbolLibrary">False</Compiler>
+			<Compiler Name="SymbolPlatform">False</Compiler>
+			<Compiler Name="SymbolExperimental">True</Compiler>
+			<Compiler Name="UnitLibrary">False</Compiler>
+			<Compiler Name="UnitPlatform">False</Compiler>
+			<Compiler Name="UnitDeprecated">False</Compiler>
+			<Compiler Name="UnitExperimental">True</Compiler>
+			<Compiler Name="HResultCompat">True</Compiler>
+			<Compiler Name="HidingMember">True</Compiler>
+			<Compiler Name="HiddenVirtual">True</Compiler>
+			<Compiler Name="Garbage">True</Compiler>
+			<Compiler Name="BoundsError">True</Compiler>
+			<Compiler Name="ZeroNilCompat">True</Compiler>
+			<Compiler Name="StringConstTruncated">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar">True</Compiler>
+			<Compiler Name="TypedConstVarPar">True</Compiler>
+			<Compiler Name="AsgToTypedConst">True</Compiler>
+			<Compiler Name="CaseLabelRange">True</Compiler>
+			<Compiler Name="ForVariable">True</Compiler>
+			<Compiler Name="ConstructingAbstract">True</Compiler>
+			<Compiler Name="ComparisonFalse">True</Compiler>
+			<Compiler Name="ComparisonTrue">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned">True</Compiler>
+			<Compiler Name="UnsupportedConstruct">True</Compiler>
+			<Compiler Name="FileOpen">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc">True</Compiler>
+			<Compiler Name="BadGlobalSymbol">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor">True</Compiler>
+			<Compiler Name="InvalidDirective">True</Compiler>
+			<Compiler Name="PackageNoLink">True</Compiler>
+			<Compiler Name="PackageThreadVar">True</Compiler>
+			<Compiler Name="ImplicitImport">True</Compiler>
+			<Compiler Name="HPPEMITIgnored">True</Compiler>
+			<Compiler Name="NoRetVal">True</Compiler>
+			<Compiler Name="UseBeforeDef">True</Compiler>
+			<Compiler Name="ForLoopVarUndef">True</Compiler>
+			<Compiler Name="UnitNameMismatch">True</Compiler>
+			<Compiler Name="NoCFGFileFound">True</Compiler>
+			<Compiler Name="MessageDirective">True</Compiler>
+			<Compiler Name="ImplicitVariants">True</Compiler>
+			<Compiler Name="UnicodeToLocale">True</Compiler>
+			<Compiler Name="LocaleToUnicode">True</Compiler>
+			<Compiler Name="ImagebaseMultiple">True</Compiler>
+			<Compiler Name="SuspiciousTypecast">True</Compiler>
+			<Compiler Name="PrivatePropAccessor">True</Compiler>
+			<Compiler Name="UnsafeType">False</Compiler>
+			<Compiler Name="UnsafeCode">False</Compiler>
+			<Compiler Name="UnsafeCast">False</Compiler>
+			<Compiler Name="OptionTruncated">True</Compiler>
+			<Compiler Name="WideCharReduced">True</Compiler>
+			<Compiler Name="DuplicatesIgnored">True</Compiler>  <Compiler Name="UnitInitSeq">True</Compiler>
+      <Compiler Name="LocalPInvoke">True</Compiler>
+      <Compiler Name="CodePage"></Compiler>
+    </Compiler>
+		<Linker>
+			<Linker Name="MapFile">0</Linker>
+			<Linker Name="OutputObjs">0</Linker>
+			<Linker Name="ConsoleApp">1</Linker>
+			<Linker Name="DebugInfo">False</Linker>
+			<Linker Name="RemoteSymbols">False</Linker>
+			<Linker Name="GenerateDRC">False</Linker>
+			<Linker Name="MinStackSize">16384</Linker>
+			<Linker Name="MaxStackSize">1048576</Linker>
+			<Linker Name="ImageBase">4194304</Linker>
+			<Linker Name="ExeDescription">RemObjects Data Abstract - dbExpress Driver</Linker>  <Linker Name="GenerateHpps">False</Linker>
+    </Linker>
+		<Directories>
+			<Directories Name="OutputDir"></Directories>
+			<Directories Name="UnitOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDLLOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDCPOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="SearchPath">..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10</Directories>
+			<Directories Name="Packages"></Directories>
+			<Directories Name="Conditionals"></Directories>
+			<Directories Name="DebugSourceDirs"></Directories>
+			<Directories Name="UsePackages">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams"></Parameters>
+			<Parameters Name="HostApplication"></Parameters>
+			<Parameters Name="Launcher"></Parameters>
+			<Parameters Name="UseLauncher">False</Parameters>
+			<Parameters Name="DebugCWD"></Parameters>
+			<Parameters Name="RemoteHost"></Parameters>
+			<Parameters Name="RemotePath"></Parameters>
+			<Parameters Name="RemoteLauncher"></Parameters>
+			<Parameters Name="RemoteCWD"></Parameters>
+			<Parameters Name="RemoteDebug">False</Parameters>  <Parameters Name="Debug Symbols Search Path"></Parameters>
+      <Parameters Name="LoadAllSymbols">True</Parameters>
+      <Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+    </Parameters>
+		<Language>
+			<Language Name="ActiveLang"></Language>
+			<Language Name="ProjectLang">$00000000</Language>
+			<Language Name="RootDir"></Language>
+		</Language>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+			<VersionInfo Name="MajorVer">3</VersionInfo>
+			<VersionInfo Name="MinorVer">0</VersionInfo>
+			<VersionInfo Name="Release">1</VersionInfo>
+			<VersionInfo Name="Build">361</VersionInfo>
+			<VersionInfo Name="Debug">False</VersionInfo>
+			<VersionInfo Name="PreRelease">False</VersionInfo>
+			<VersionInfo Name="Special">False</VersionInfo>
+			<VersionInfo Name="Private">False</VersionInfo>
+			<VersionInfo Name="DLL">False</VersionInfo>
+			<VersionInfo Name="Locale">1033</VersionInfo>
+			<VersionInfo Name="CodePage">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+		</VersionInfoKeys>
+	</Delphi.Personality>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D10.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D10.cfg
new file mode 100644
index 0000000..207b254
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D10.cfg	
@@ -0,0 +1,49 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U+
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N0"..\..\Dcu\D10"
+-LE"..\..\Dcu\D10"
+-LN"..\..\Dcu\D10"
+-U"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-O"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-I"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-R"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D10.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D10.dpk
new file mode 100644
index 0000000..ce917fe
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D10.dpk	
@@ -0,0 +1,38 @@
+package DataAbstract_DBXDriver_D10;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - dbExpress Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  dbexpress,
+  DataAbstract_Core_D10;
+
+contains
+  uDADBXDriver in 'uDADBXDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D10.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D10.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D10.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D11.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D11.dpk
new file mode 100644
index 0000000..d3298fa
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D11.dpk	
@@ -0,0 +1,38 @@
+package DataAbstract_DBXDriver_D11;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - dbExpress Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  dbexpress,
+  DataAbstract_Core_D11;
+
+contains
+  uDADBXDriver in 'uDADBXDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D11.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D11.dproj
new file mode 100644
index 0000000..071e5f3
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D11.dproj	
@@ -0,0 +1,72 @@
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{f8cd0c64-f9cd-46d4-8a1b-03d6a3efbdb3}</ProjectGuid>
+    <MainSource>DataAbstract_DBXDriver_D11.dpk</MainSource>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+    <DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_DBXDriver_D11.bpl</DCC_DependencyCheckOutputName>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DebugInformation>False</DCC_DebugInformation>
+    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+    <DCC_PentiumSafeDivide>True</DCC_PentiumSafeDivide>
+    <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_Define>RELEASE</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_PentiumSafeDivide>True</DCC_PentiumSafeDivide>
+    <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Delphi.Personality</Borland.Personality>
+    <Borland.ProjectType>Package</Borland.ProjectType>
+    <BorlandProject>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">RemObjects Data Abstract - dbExpress Driver</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">3</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">1</VersionInfo><VersionInfo Name="Build">361</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">DataAbstract_DBXDriver_D11.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
+  <ItemGroup>
+    <DelphiCompile Include="DataAbstract_DBXDriver_D11.dpk">
+      <MainSource>MainSource</MainSource>
+    </DelphiCompile>
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\DataAbstract_Core_D11.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\dbexpress.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\dbrtl.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\rtl.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\vcl.dcp" />
+    <DCCReference Include="uDADBXDriver.pas" />
+  </ItemGroup>
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D11.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D11.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D11.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D12.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D12.dpk
new file mode 100644
index 0000000..35f7066
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D12.dpk	
@@ -0,0 +1,38 @@
+package DataAbstract_DBXDriver_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - dbExpress Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  dbexpress,
+  DataAbstract_Core_D12;
+
+contains
+  uDADBXDriver in 'uDADBXDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D12.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D12.dproj
new file mode 100644
index 0000000..7ef561d
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D12.dproj	
@@ -0,0 +1,97 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{f8cd0c64-f9cd-46d4-8a1b-03d6a3efbdb3}</ProjectGuid>
+			<MainSource>DataAbstract_DBXDriver_D12.dpk</MainSource>
+			<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+			<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+			<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_DBXDriver_D11.bpl</DCC_DependencyCheckOutputName>
+			<ProjectVersion>11.1</ProjectVersion>
+			<Config Condition="'$(Config)'==''">Base</Config>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base)'!=''">
+			<DCC_SymbolReferenceInfo>1</DCC_SymbolReferenceInfo>
+			<DCC_CVT_WCHAR_TO_ACHAR>error</DCC_CVT_WCHAR_TO_ACHAR>
+			<DCC_UnitSearchPath>..;..\..\Dcu\D12;..\..\..\RemObjects SDK for Delphi\Dcu\D12;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+			<DCC_IMPLICIT_STRING_CAST>error</DCC_IMPLICIT_STRING_CAST>
+			<DCC_BplOutput>..\..\Dcu\D12</DCC_BplOutput>
+			<DCC_IMPLICIT_STRING_CAST_LOSS>error</DCC_IMPLICIT_STRING_CAST_LOSS>
+			<DCC_EXPLICIT_STRING_CAST_LOSS>error</DCC_EXPLICIT_STRING_CAST_LOSS>
+			<DCC_CVT_ACHAR_TO_WCHAR>error</DCC_CVT_ACHAR_TO_WCHAR>
+			<DCC_CVT_WIDENING_STRING_LOST>error</DCC_CVT_WIDENING_STRING_LOST>
+			<DCC_EXPLICIT_STRING_CAST>error</DCC_EXPLICIT_STRING_CAST>
+			<DCC_DcuOutput>..\..\Dcu\D12</DCC_DcuOutput>
+			<DCC_CVT_NARROWING_STRING_LOST>error</DCC_CVT_NARROWING_STRING_LOST>
+			<DCC_DcpOutput>..\..\Dcu\D12</DCC_DcpOutput>
+			<GenDll>true</GenDll>
+			<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+			<GenPackage>true</GenPackage>
+			<DCC_GenerateStackFrames>true</DCC_GenerateStackFrames>
+			<DesignOnlyPackage>false</DesignOnlyPackage>
+			<DCC_ImageBase>00400000</DCC_ImageBase>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D12\DataAbstract_DBXDriver_D12.bpl</DCC_DependencyCheckOutputName>
+			<DCC_PentiumSafeDivide>true</DCC_PentiumSafeDivide>
+			<DCC_Description>RemObjects Data Abstract - dbExpress Driver</DCC_Description>
+		</PropertyGroup>
+		<ItemGroup>
+			<DelphiCompile Include="DataAbstract_DBXDriver_D12.dpk">
+				<MainSource>MainSource</MainSource>
+			</DelphiCompile>
+			<DCCReference Include="rtl.dcp"/>
+			<DCCReference Include="vcl.dcp"/>
+			<DCCReference Include="dbrtl.dcp"/>
+			<DCCReference Include="dbexpress.dcp"/>
+			<DCCReference Include="DataAbstract_Core_D12.dcp"/>
+			<DCCReference Include="uDADBXDriver.pas"/>
+			<BuildConfiguration Include="Base">
+				<Key>Base</Key>
+			</BuildConfiguration>
+		</ItemGroup>
+		<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+		<ProjectExtensions>
+			<Borland.Personality>Delphi.Personality.12</Borland.Personality>
+			<Borland.ProjectType>Package</Borland.ProjectType>
+			<BorlandProject>
+				<Delphi.Personality>
+					<Parameters>
+						<Parameters Name="UseLauncher">False</Parameters>
+						<Parameters Name="LoadAllSymbols">True</Parameters>
+						<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+					</Parameters>
+					<VersionInfo>
+						<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+						<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+						<VersionInfo Name="MajorVer">3</VersionInfo>
+						<VersionInfo Name="MinorVer">0</VersionInfo>
+						<VersionInfo Name="Release">1</VersionInfo>
+						<VersionInfo Name="Build">361</VersionInfo>
+						<VersionInfo Name="Debug">False</VersionInfo>
+						<VersionInfo Name="PreRelease">False</VersionInfo>
+						<VersionInfo Name="Special">False</VersionInfo>
+						<VersionInfo Name="Private">False</VersionInfo>
+						<VersionInfo Name="DLL">False</VersionInfo>
+						<VersionInfo Name="Locale">1033</VersionInfo>
+						<VersionInfo Name="CodePage">1252</VersionInfo>
+					</VersionInfo>
+					<VersionInfoKeys>
+						<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="FileDescription"/>
+						<VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys>
+						<VersionInfoKeys Name="InternalName"/>
+						<VersionInfoKeys Name="LegalCopyright"/>
+						<VersionInfoKeys Name="LegalTrademarks"/>
+						<VersionInfoKeys Name="OriginalFilename"/>
+						<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+						<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+					</VersionInfoKeys>
+					<Source>
+						<Source Name="MainSource">DataAbstract_DBXDriver_D12.dpk</Source>
+					</Source>
+				</Delphi.Personality>
+			</BorlandProject>
+			<ProjectFileVersion>12</ProjectFileVersion>
+		</ProjectExtensions>
+	</Project>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D12.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D12.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D12.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D6.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D6.cfg
new file mode 100644
index 0000000..0aa2cb6
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D6.cfg	
@@ -0,0 +1,41 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U+
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D6"
+-LE"..\..\Dcu\D6"
+-LN"..\..\Dcu\D6"
+-U"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-O"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-I"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-R"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-Z
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D6.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D6.dof
new file mode 100644
index 0000000..d2de85f
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D6.dof	
@@ -0,0 +1,76 @@
+[FileVersion]
+Version=6.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=1
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitDeprecated=0
+UnitLibrary=0
+UnitPlatform=0
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=Data Abstract - dbExpress Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D6
+PackageDLLOutputDir=..\..\Dcu\D6
+PackageDCPOutputDir=..\..\Dcu\D6
+SearchPath=..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6
+Packages=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=2.0.0.138
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D6.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D6.dpk
new file mode 100644
index 0000000..d9265ff
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D6.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_DBXDriver_D6;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - dbExpress Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  dbexpress,
+  RemObjects_Core_D6,
+  DataAbstract_Core_D6;
+
+contains
+  uDADBXDriver in 'uDADBXDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D6.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D6.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D6.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D7.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D7.cfg
new file mode 100644
index 0000000..a290ad9
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D7.cfg	
@@ -0,0 +1,50 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U+
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D7"
+-LE"..\..\Dcu\D7"
+-LN"..\..\Dcu\D7"
+-U"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-O"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-I"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-R"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D7.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D7.dof
new file mode 100644
index 0000000..7f90f99
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D7.dof	
@@ -0,0 +1,116 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=1
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=Data Abstract - dbExpress Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D7
+PackageDLLOutputDir=..\..\Dcu\D7
+PackageDCPOutputDir=..\..\Dcu\D7
+SearchPath=..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7
+Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;dclOfficeXP;RemObjects_DataSnap_D7;PurposesoftD7;addict3_d6;tb2kComplete_70;CDKDesignTimeSupport;CDKSmp;CDK;ES_CodeSite20;ESDelphiCommandCompiler;ESFileSearch;ESVisualCompositeExpert;EaglWk;ESGraphUtils;ESBase;ESVsCp;ESSampleComposites70;ESSampleCompositeEditors7;Rz252N70;SynEdit_D7;dxsbD7;dxComnD7;dxDockingD7;dxEdtrD7;dxELibD7;dxExELD7;EQGridD7;dxExRwD7;dxDBEdD7;dxInsD7;dxGrEdD7;ECQDBCD7;EQTLD7;EQDBTLD7;dxLayoutControlD7;dxMasterViewD7;dxmdsd7;dxNavBarD7;dxObjInsD7;dxPageControlD7;dxPSCoreD7;Rz252D70;cxPageControlVCLD7;cxEditorsVCLD7;dxThemeD7;cxLibraryVCLD7;cxDataD7;cxGridUtilsVCLD7;cxGridVCLD7;RemObjects_BPDX_D7
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=2.0.0.142
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D7.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D7.dpk
new file mode 100644
index 0000000..a20bd62
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D7.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_DBXDriver_D7;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - dbExpress Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  dbexpress,
+  RemObjects_Core_D7,
+  DataAbstract_Core_D7;
+
+contains
+  uDADBXDriver in 'uDADBXDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D7.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D7.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_D7.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_Glyphs.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_Glyphs.res
new file mode 100644
index 0000000..3ac39af
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DBXDriver_Glyphs.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D10.bdsproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D10.bdsproj
new file mode 100644
index 0000000..9e97b99
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D10.bdsproj	
@@ -0,0 +1,172 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality">Delphi.Personality</Option>
+			<Option Name="ProjectType">VCLApplication</Option>
+			<Option Name="Version">1.0</Option>
+			<Option Name="GUID">{EB34E68F-ED55-4ABC-A07A-7AF827B26017}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource">DataAbstract_DOADriver_D10.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A">8</Compiler>
+			<Compiler Name="B">0</Compiler>
+			<Compiler Name="C">0</Compiler>
+			<Compiler Name="D">0</Compiler>
+			<Compiler Name="E">0</Compiler>
+			<Compiler Name="F">0</Compiler>
+			<Compiler Name="G">1</Compiler>
+			<Compiler Name="H">1</Compiler>
+			<Compiler Name="I">1</Compiler>
+			<Compiler Name="J">0</Compiler>
+			<Compiler Name="K">0</Compiler>
+			<Compiler Name="L">0</Compiler>
+			<Compiler Name="M">0</Compiler>
+			<Compiler Name="N">1</Compiler>
+			<Compiler Name="O">1</Compiler>
+			<Compiler Name="P">1</Compiler>
+			<Compiler Name="Q">1</Compiler>
+			<Compiler Name="R">1</Compiler>
+			<Compiler Name="S">0</Compiler>
+			<Compiler Name="T">0</Compiler>
+			<Compiler Name="U">1</Compiler>
+			<Compiler Name="V">1</Compiler>
+			<Compiler Name="W">0</Compiler>
+			<Compiler Name="X">1</Compiler>
+			<Compiler Name="Y">0</Compiler>
+			<Compiler Name="Z">1</Compiler>
+			<Compiler Name="ShowHints">True</Compiler>
+			<Compiler Name="ShowWarnings">True</Compiler>
+			<Compiler Name="UnitAliases">WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;</Compiler>
+			<Compiler Name="NamespacePrefix"></Compiler>
+			<Compiler Name="GenerateDocumentation">False</Compiler>
+			<Compiler Name="DefaultNamespace"></Compiler>
+			<Compiler Name="SymbolDeprecated">False</Compiler>
+			<Compiler Name="SymbolLibrary">False</Compiler>
+			<Compiler Name="SymbolPlatform">False</Compiler>
+			<Compiler Name="SymbolExperimental">True</Compiler>
+			<Compiler Name="UnitLibrary">False</Compiler>
+			<Compiler Name="UnitPlatform">False</Compiler>
+			<Compiler Name="UnitDeprecated">False</Compiler>
+			<Compiler Name="UnitExperimental">True</Compiler>
+			<Compiler Name="HResultCompat">True</Compiler>
+			<Compiler Name="HidingMember">True</Compiler>
+			<Compiler Name="HiddenVirtual">True</Compiler>
+			<Compiler Name="Garbage">True</Compiler>
+			<Compiler Name="BoundsError">True</Compiler>
+			<Compiler Name="ZeroNilCompat">True</Compiler>
+			<Compiler Name="StringConstTruncated">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar">True</Compiler>
+			<Compiler Name="TypedConstVarPar">True</Compiler>
+			<Compiler Name="AsgToTypedConst">True</Compiler>
+			<Compiler Name="CaseLabelRange">True</Compiler>
+			<Compiler Name="ForVariable">True</Compiler>
+			<Compiler Name="ConstructingAbstract">True</Compiler>
+			<Compiler Name="ComparisonFalse">True</Compiler>
+			<Compiler Name="ComparisonTrue">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned">True</Compiler>
+			<Compiler Name="UnsupportedConstruct">True</Compiler>
+			<Compiler Name="FileOpen">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc">True</Compiler>
+			<Compiler Name="BadGlobalSymbol">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor">True</Compiler>
+			<Compiler Name="InvalidDirective">True</Compiler>
+			<Compiler Name="PackageNoLink">True</Compiler>
+			<Compiler Name="PackageThreadVar">True</Compiler>
+			<Compiler Name="ImplicitImport">True</Compiler>
+			<Compiler Name="HPPEMITIgnored">True</Compiler>
+			<Compiler Name="NoRetVal">True</Compiler>
+			<Compiler Name="UseBeforeDef">True</Compiler>
+			<Compiler Name="ForLoopVarUndef">True</Compiler>
+			<Compiler Name="UnitNameMismatch">True</Compiler>
+			<Compiler Name="NoCFGFileFound">True</Compiler>
+			<Compiler Name="MessageDirective">True</Compiler>
+			<Compiler Name="ImplicitVariants">True</Compiler>
+			<Compiler Name="UnicodeToLocale">True</Compiler>
+			<Compiler Name="LocaleToUnicode">True</Compiler>
+			<Compiler Name="ImagebaseMultiple">True</Compiler>
+			<Compiler Name="SuspiciousTypecast">True</Compiler>
+			<Compiler Name="PrivatePropAccessor">True</Compiler>
+			<Compiler Name="UnsafeType">False</Compiler>
+			<Compiler Name="UnsafeCode">False</Compiler>
+			<Compiler Name="UnsafeCast">False</Compiler>
+			<Compiler Name="OptionTruncated">True</Compiler>
+			<Compiler Name="WideCharReduced">True</Compiler>
+			<Compiler Name="DuplicatesIgnored">True</Compiler>  <Compiler Name="UnitInitSeq">True</Compiler>
+      <Compiler Name="LocalPInvoke">True</Compiler>
+      <Compiler Name="CodePage"></Compiler>
+    </Compiler>
+		<Linker>
+			<Linker Name="MapFile">0</Linker>
+			<Linker Name="OutputObjs">0</Linker>
+			<Linker Name="ConsoleApp">1</Linker>
+			<Linker Name="DebugInfo">False</Linker>
+			<Linker Name="RemoteSymbols">False</Linker>
+			<Linker Name="GenerateDRC">False</Linker>
+			<Linker Name="MinStackSize">16384</Linker>
+			<Linker Name="MaxStackSize">1048576</Linker>
+			<Linker Name="ImageBase">4194304</Linker>
+			<Linker Name="ExeDescription">RemObjects Data Abstract - Direct Oracle Access Driver</Linker>  <Linker Name="GenerateHpps">False</Linker>
+    </Linker>
+		<Directories>
+			<Directories Name="OutputDir"></Directories>
+			<Directories Name="UnitOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDLLOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDCPOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="SearchPath">..\..\Dcu\D10</Directories>
+			<Directories Name="Packages"></Directories>
+			<Directories Name="Conditionals"></Directories>
+			<Directories Name="DebugSourceDirs"></Directories>
+			<Directories Name="UsePackages">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams"></Parameters>
+			<Parameters Name="HostApplication"></Parameters>
+			<Parameters Name="Launcher"></Parameters>
+			<Parameters Name="UseLauncher">False</Parameters>
+			<Parameters Name="DebugCWD"></Parameters>
+			<Parameters Name="RemoteHost"></Parameters>
+			<Parameters Name="RemotePath"></Parameters>
+			<Parameters Name="RemoteLauncher"></Parameters>
+			<Parameters Name="RemoteCWD"></Parameters>
+			<Parameters Name="RemoteDebug">False</Parameters>  <Parameters Name="Debug Symbols Search Path"></Parameters>
+      <Parameters Name="LoadAllSymbols">True</Parameters>
+      <Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+    </Parameters>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+			<VersionInfo Name="MajorVer">1</VersionInfo>
+			<VersionInfo Name="MinorVer">0</VersionInfo>
+			<VersionInfo Name="Release">0</VersionInfo>
+			<VersionInfo Name="Build">0</VersionInfo>
+			<VersionInfo Name="Debug">False</VersionInfo>
+			<VersionInfo Name="PreRelease">False</VersionInfo>
+			<VersionInfo Name="Special">False</VersionInfo>
+			<VersionInfo Name="Private">False</VersionInfo>
+			<VersionInfo Name="DLL">False</VersionInfo>
+			<VersionInfo Name="Locale">1031</VersionInfo>
+			<VersionInfo Name="CodePage">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+			<VersionInfoKeys Name="Comments"></VersionInfoKeys>
+		</VersionInfoKeys>
+	</Delphi.Personality>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D10.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D10.cfg
new file mode 100644
index 0000000..ec7d8d2
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D10.cfg	
@@ -0,0 +1,50 @@
+-$A8
+-$B-
+-$C-
+-$D-
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L-
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q+
+-$R+
+-$S-
+-$T-
+-$U+
+-$V+
+-$W-
+-$X+
+-$Y-
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N0"..\..\Dcu\D10"
+-LE"..\..\Dcu\D10"
+-LN"..\..\Dcu\D10"
+-U"..\..\Dcu\D10"
+-O"..\..\Dcu\D10"
+-I"..\..\Dcu\D10"
+-R"..\..\Dcu\D10"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D10.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D10.dpk
new file mode 100644
index 0000000..15b25df
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D10.dpk	
@@ -0,0 +1,40 @@
+package DataAbstract_DOADriver_D10;
+
+{$R *.res}
+{$R 'uDADOADriver.dcr'}
+{$ALIGN 8}
+{$ASSERTIONS OFF}
+{$BOOLEVAL OFF}
+{$DEBUGINFO OFF}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS OFF}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS ON}
+{$RANGECHECKS ON}
+{$REFERENCEINFO OFF}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - Direct Oracle Access Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D10,
+  doa41d2006;
+
+contains
+  uDADOADriver in 'uDADOADriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D10.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D10.res
new file mode 100644
index 0000000..7d5072d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D10.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D11.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D11.dpk
new file mode 100644
index 0000000..150f485
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D11.dpk	
@@ -0,0 +1,40 @@
+package DataAbstract_DOADriver_D11;
+
+{$R *.res}
+{$R 'uDADOADriver.dcr'}
+{$ALIGN 8}
+{$ASSERTIONS OFF}
+{$BOOLEVAL OFF}
+{$DEBUGINFO OFF}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS OFF}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS ON}
+{$RANGECHECKS ON}
+{$REFERENCEINFO OFF}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - Direct Oracle Access Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D11,
+  doa41d2007;
+
+contains
+  uDADOADriver in 'uDADOADriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D11.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D11.dproj
new file mode 100644
index 0000000..28b9bc0
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D11.dproj	
@@ -0,0 +1,96 @@
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{a2e90cba-5a04-4ca5-b40f-eeb19b461f2f}</ProjectGuid>
+    <MainSource>DataAbstract_DOADriver_D11.dpk</MainSource>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+    <DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_DOADriver_D11.bpl</DCC_DependencyCheckOutputName>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_AssertionsAtRuntime>False</DCC_AssertionsAtRuntime>
+    <DCC_DebugInformation>False</DCC_DebugInformation>
+    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+    <DCC_IntegerOverflowCheck>True</DCC_IntegerOverflowCheck>
+    <DCC_RangeChecking>True</DCC_RangeChecking>
+    <DCC_PentiumSafeDivide>True</DCC_PentiumSafeDivide>
+    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11</DCC_IncludePath>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Delphi.Personality</Borland.Personality>
+    <Borland.ProjectType>Package</Borland.ProjectType>
+    <BorlandProject>
+<BorlandProject xmlns=""> <Delphi.Personality>   <Parameters>
+      <Parameters Name="UseLauncher">False</Parameters>
+      <Parameters Name="LoadAllSymbols">True</Parameters>
+      <Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+    </Parameters>
+    <Package_Options>
+      <Package_Options Name="PackageDescription">RemObjects Data Abstract - Direct Oracle Access Driver</Package_Options>
+      <Package_Options Name="ImplicitBuild">False</Package_Options>
+      <Package_Options Name="DesigntimeOnly">True</Package_Options>
+      <Package_Options Name="RuntimeOnly">False</Package_Options>
+    </Package_Options>
+    <VersionInfo>
+      <VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+      <VersionInfo Name="AutoIncBuild">False</VersionInfo>
+      <VersionInfo Name="MajorVer">1</VersionInfo>
+      <VersionInfo Name="MinorVer">0</VersionInfo>
+      <VersionInfo Name="Release">0</VersionInfo>
+      <VersionInfo Name="Build">0</VersionInfo>
+      <VersionInfo Name="Debug">False</VersionInfo>
+      <VersionInfo Name="PreRelease">False</VersionInfo>
+      <VersionInfo Name="Special">False</VersionInfo>
+      <VersionInfo Name="Private">False</VersionInfo>
+      <VersionInfo Name="DLL">False</VersionInfo>
+      <VersionInfo Name="Locale">1031</VersionInfo>
+      <VersionInfo Name="CodePage">1252</VersionInfo>
+    </VersionInfo>
+    <VersionInfoKeys>
+      <VersionInfoKeys Name="CompanyName"></VersionInfoKeys>
+      <VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+      <VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys>
+      <VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+      <VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys>
+      <VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys>
+      <VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+      <VersionInfoKeys Name="ProductName"></VersionInfoKeys>
+      <VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+      <VersionInfoKeys Name="Comments"></VersionInfoKeys>
+    </VersionInfoKeys>
+    <Source>
+      <Source Name="MainSource">DataAbstract_DOADriver_D11.dpk</Source>
+    </Source>
+  </Delphi.Personality> </BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <ItemGroup />
+  <ItemGroup>
+    <DelphiCompile Include="DataAbstract_DOADriver_D11.dpk">
+      <MainSource>MainSource</MainSource>
+    </DelphiCompile>
+    <DCCReference Include="D:\Program files.all\Borland\RAD Studio\5.0\bin\DataAbstract_Core_D11.dcp" />
+    <DCCReference Include="D:\Program files.all\Borland\RAD Studio\5.0\bin\dbrtl.dcp" />
+    <DCCReference Include="D:\Program files.all\Borland\RAD Studio\5.0\bin\rtl.dcp" />
+    <DCCReference Include="D:\Program files.all\Borland\RAD Studio\5.0\bin\vcl.dcp" />
+    <DCCReference Include="uDADOADriver.dcr" />
+    <DCCReference Include="uDADOADriver.dcr" />
+    <DCCReference Include="uDADOADriver.pas" />
+  </ItemGroup>
+  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D11.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D11.res
new file mode 100644
index 0000000..c467631
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D11.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D12.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D12.dpk
new file mode 100644
index 0000000..166b374
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D12.dpk	
@@ -0,0 +1,40 @@
+package DataAbstract_DOADriver_D12;
+
+{$R *.res}
+{$R 'uDADOADriver.dcr'}
+{$ALIGN 8}
+{$ASSERTIONS OFF}
+{$BOOLEVAL OFF}
+{$DEBUGINFO OFF}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS OFF}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS ON}
+{$RANGECHECKS ON}
+{$REFERENCEINFO OFF}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - Direct Oracle Access Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D12,
+  doa41d2009;
+
+contains
+  uDADOADriver in 'uDADOADriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D12.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D12.dproj
new file mode 100644
index 0000000..d9bf6ae
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D12.dproj	
@@ -0,0 +1,103 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{E84B9AAD-18C0-4A3D-893C-C2036F2B3D7A}</ProjectGuid>
+			<MainSource>DataAbstract_DOADriver_D12.dpk</MainSource>
+			<Config Condition="'$(Config)'==''">Base</Config>
+			<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+			<ProjectVersion>11.1</ProjectVersion>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base)'!=''">
+			<DCC_Description>RemObjects Data Abstract - Direct Oracle Access Driver</DCC_Description>
+			<DCC_CVT_WIDENING_STRING_LOST>error</DCC_CVT_WIDENING_STRING_LOST>
+			<DCC_IMPLICIT_STRING_CAST_LOSS>error</DCC_IMPLICIT_STRING_CAST_LOSS>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D12\DataAbstract_DOADriver_D12.bpl</DCC_DependencyCheckOutputName>
+			<DCC_PentiumSafeDivide>true</DCC_PentiumSafeDivide>
+			<DCC_UnitSearchPath>..;..\..\Dcu\D12;..\..\..\RemObjects SDK for Delphi\Dcu\D12;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+			<DCC_EXPLICIT_STRING_CAST_LOSS>error</DCC_EXPLICIT_STRING_CAST_LOSS>
+			<DCC_BplOutput>..\..\Dcu\D12</DCC_BplOutput>
+			<DCC_CVT_ACHAR_TO_WCHAR>error</DCC_CVT_ACHAR_TO_WCHAR>
+			<DCC_CVT_WCHAR_TO_ACHAR>error</DCC_CVT_WCHAR_TO_ACHAR>
+			<DCC_LocalDebugSymbols>false</DCC_LocalDebugSymbols>
+			<DCC_EXPLICIT_STRING_CAST>error</DCC_EXPLICIT_STRING_CAST>
+			<DCC_RangeChecking>true</DCC_RangeChecking>
+			<DCC_CVT_NARROWING_STRING_LOST>error</DCC_CVT_NARROWING_STRING_LOST>
+			<DCC_IntegerOverflowCheck>true</DCC_IntegerOverflowCheck>
+			<DCC_AssertionsAtRuntime>false</DCC_AssertionsAtRuntime>
+			<GenDll>true</GenDll>
+			<DCC_DcpOutput>..\..\Dcu\D12</DCC_DcpOutput>
+			<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+			<DCC_DcuOutput>..\..\Dcu\D12</DCC_DcuOutput>
+			<DCC_DebugInformation>false</DCC_DebugInformation>
+			<DesignOnlyPackage>true</DesignOnlyPackage>
+			<DCC_IMPLICIT_STRING_CAST>error</DCC_IMPLICIT_STRING_CAST>
+			<GenPackage>true</GenPackage>
+			<DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+			<DCC_ImageBase>00400000</DCC_ImageBase>
+			<DCC_Platform>x86</DCC_Platform>
+		</PropertyGroup>
+		<ItemGroup>
+			<DelphiCompile Include="DataAbstract_DOADriver_D12.dpk">
+				<MainSource>MainSource</MainSource>
+			</DelphiCompile>
+			<DCCReference Include="uDADOADriver.dcr"/>
+			<DCCReference Include="rtl.dcp"/>
+			<DCCReference Include="vcl.dcp"/>
+			<DCCReference Include="dbrtl.dcp"/>
+			<DCCReference Include="DataAbstract_Core_D12.dcp"/>
+			<DCCReference Include="doa41d2009.dcp"/>
+			<DCCReference Include="uDADOADriver.pas"/>
+			<DCCReference Include="uDADOADriver.dcr"/>
+			<BuildConfiguration Include="Base">
+				<Key>Base</Key>
+			</BuildConfiguration>
+		</ItemGroup>
+		<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+		<ProjectExtensions>
+			<Borland.Personality>Delphi.Personality.12</Borland.Personality>
+			<Borland.ProjectType>Package</Borland.ProjectType>
+			<BorlandProject>
+				<Delphi.Personality>
+					<Source>
+						<Source Name="MainSource">DataAbstract_DOADriver_D12.dpk</Source>
+					</Source>
+					<Parameters>
+						<Parameters Name="UseLauncher">False</Parameters>
+						<Parameters Name="LoadAllSymbols">True</Parameters>
+						<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+					</Parameters>
+					<VersionInfo>
+						<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+						<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+						<VersionInfo Name="MajorVer">1</VersionInfo>
+						<VersionInfo Name="MinorVer">0</VersionInfo>
+						<VersionInfo Name="Release">0</VersionInfo>
+						<VersionInfo Name="Build">0</VersionInfo>
+						<VersionInfo Name="Debug">False</VersionInfo>
+						<VersionInfo Name="PreRelease">False</VersionInfo>
+						<VersionInfo Name="Special">False</VersionInfo>
+						<VersionInfo Name="Private">False</VersionInfo>
+						<VersionInfo Name="DLL">False</VersionInfo>
+						<VersionInfo Name="Locale">1049</VersionInfo>
+						<VersionInfo Name="CodePage">1251</VersionInfo>
+					</VersionInfo>
+					<VersionInfoKeys>
+						<VersionInfoKeys Name="CompanyName"/>
+						<VersionInfoKeys Name="FileDescription"/>
+						<VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys>
+						<VersionInfoKeys Name="InternalName"/>
+						<VersionInfoKeys Name="LegalCopyright"/>
+						<VersionInfoKeys Name="LegalTrademarks"/>
+						<VersionInfoKeys Name="OriginalFilename"/>
+						<VersionInfoKeys Name="ProductName"/>
+						<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+						<VersionInfoKeys Name="Comments"/>
+					</VersionInfoKeys>
+					<Excluded_Packages/>
+				</Delphi.Personality>
+			</BorlandProject>
+			<ProjectFileVersion>12</ProjectFileVersion>
+		</ProjectExtensions>
+	</Project>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D12.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D12.res
new file mode 100644
index 0000000..77cfa35
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D12.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D6.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D6.cfg
new file mode 100644
index 0000000..ce65bb4
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D6.cfg	
@@ -0,0 +1,41 @@
+-$A8
+-$B-
+-$C-
+-$D-
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L-
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q+
+-$R+
+-$S-
+-$T-
+-$U+
+-$V+
+-$W-
+-$X+
+-$Y-
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D6"
+-LE"..\..\Dcu\D6"
+-LN"..\..\Dcu\D6"
+-U"..\..\Dcu\D6"
+-O"..\..\Dcu\D6"
+-I"..\..\Dcu\D6"
+-R"..\..\Dcu\D6"
+-Z
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D6.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D6.dof
new file mode 100644
index 0000000..3c9cab7
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D6.dof	
@@ -0,0 +1,77 @@
+[FileVersion]
+Version=6.0
+
+[Compiler]
+A=8
+B=0
+C=0
+D=0
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=0
+M=0
+N=1
+O=1
+P=1
+Q=1
+R=1
+S=0
+T=0
+U=1
+V=1
+W=0
+X=1
+Y=0
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitDeprecated=0
+UnitLibrary=0
+UnitPlatform=0
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects Data Abstract - Direct Oracle Access Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D6
+PackageDLLOutputDir=..\..\Dcu\D6
+PackageDCPOutputDir=..\..\Dcu\D6
+SearchPath=..\..\Dcu\D6
+Packages=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=
+FileDescription=
+FileVersion=1.0.0.0
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+Comments=
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D6.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D6.dpk
new file mode 100644
index 0000000..4eff87c
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D6.dpk	
@@ -0,0 +1,40 @@
+package DataAbstract_DOADriver_D6;
+
+{$R *.res}
+{$R 'uDADOADriver.dcr'}
+{$ALIGN 8}
+{$ASSERTIONS OFF}
+{$BOOLEVAL OFF}
+{$DEBUGINFO OFF}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS OFF}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS ON}
+{$RANGECHECKS ON}
+{$REFERENCEINFO OFF}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - Direct Oracle Access Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D6,
+  doa41d6;
+
+contains
+  uDADOADriver in 'uDADOADriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D6.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D6.res
new file mode 100644
index 0000000..c467631
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D6.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D7.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D7.cfg
new file mode 100644
index 0000000..e5c2492
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D7.cfg	
@@ -0,0 +1,50 @@
+-$A8
+-$B-
+-$C-
+-$D-
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L-
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q+
+-$R+
+-$S-
+-$T-
+-$U+
+-$V+
+-$W-
+-$X+
+-$Y-
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D7"
+-LE"..\..\Dcu\D7"
+-LN"..\..\Dcu\D7"
+-U"..\..\Dcu\D7"
+-O"..\..\Dcu\D7"
+-I"..\..\Dcu\D7"
+-R"..\..\Dcu\D7"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D7.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D7.dof
new file mode 100644
index 0000000..b369898
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D7.dof	
@@ -0,0 +1,117 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=0
+D=0
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=0
+M=0
+N=1
+O=1
+P=1
+Q=1
+R=1
+S=0
+T=0
+U=1
+V=1
+W=0
+X=1
+Y=0
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects Data Abstract - Direct Oracle Access Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D7
+PackageDLLOutputDir=..\..\Dcu\D7
+PackageDCPOutputDir=..\..\Dcu\D7
+SearchPath=..\..\Dcu\D7
+Packages=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=
+FileDescription=
+FileVersion=1.0.0.0
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+Comments=
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D7.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D7.dpk
new file mode 100644
index 0000000..fc81f64
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D7.dpk	
@@ -0,0 +1,40 @@
+package DataAbstract_DOADriver_D7;
+
+{$R *.res}
+{$R 'uDADOADriver.dcr'}
+{$ALIGN 8}
+{$ASSERTIONS OFF}
+{$BOOLEVAL OFF}
+{$DEBUGINFO OFF}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS OFF}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS ON}
+{$RANGECHECKS ON}
+{$REFERENCEINFO OFF}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - Direct Oracle Access Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D7,
+  doa41d7;
+
+contains
+  uDADOADriver in 'uDADOADriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D7.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D7.res
new file mode 100644
index 0000000..c467631
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D7.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D9.bdsproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D9.bdsproj
new file mode 100644
index 0000000..213d43f
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D9.bdsproj	
@@ -0,0 +1,168 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality">Delphi.Personality</Option>
+			<Option Name="ProjectType">VCLApplication</Option>
+			<Option Name="Version">1.0</Option>
+			<Option Name="GUID">{EB34E68F-ED55-4ABC-A07A-7AF827B26017}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource">DataAbstract_DOADriver_D9.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A">8</Compiler>
+			<Compiler Name="B">0</Compiler>
+			<Compiler Name="C">0</Compiler>
+			<Compiler Name="D">0</Compiler>
+			<Compiler Name="E">0</Compiler>
+			<Compiler Name="F">0</Compiler>
+			<Compiler Name="G">1</Compiler>
+			<Compiler Name="H">1</Compiler>
+			<Compiler Name="I">1</Compiler>
+			<Compiler Name="J">0</Compiler>
+			<Compiler Name="K">0</Compiler>
+			<Compiler Name="L">0</Compiler>
+			<Compiler Name="M">0</Compiler>
+			<Compiler Name="N">1</Compiler>
+			<Compiler Name="O">1</Compiler>
+			<Compiler Name="P">1</Compiler>
+			<Compiler Name="Q">1</Compiler>
+			<Compiler Name="R">1</Compiler>
+			<Compiler Name="S">0</Compiler>
+			<Compiler Name="T">0</Compiler>
+			<Compiler Name="U">1</Compiler>
+			<Compiler Name="V">1</Compiler>
+			<Compiler Name="W">0</Compiler>
+			<Compiler Name="X">1</Compiler>
+			<Compiler Name="Y">0</Compiler>
+			<Compiler Name="Z">1</Compiler>
+			<Compiler Name="ShowHints">True</Compiler>
+			<Compiler Name="ShowWarnings">True</Compiler>
+			<Compiler Name="UnitAliases">WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;</Compiler>
+			<Compiler Name="NamespacePrefix"></Compiler>
+			<Compiler Name="GenerateDocumentation">False</Compiler>
+			<Compiler Name="DefaultNamespace"></Compiler>
+			<Compiler Name="SymbolDeprecated">False</Compiler>
+			<Compiler Name="SymbolLibrary">False</Compiler>
+			<Compiler Name="SymbolPlatform">False</Compiler>
+			<Compiler Name="SymbolExperimental">True</Compiler>
+			<Compiler Name="UnitLibrary">False</Compiler>
+			<Compiler Name="UnitPlatform">False</Compiler>
+			<Compiler Name="UnitDeprecated">False</Compiler>
+			<Compiler Name="UnitExperimental">True</Compiler>
+			<Compiler Name="HResultCompat">True</Compiler>
+			<Compiler Name="HidingMember">True</Compiler>
+			<Compiler Name="HiddenVirtual">True</Compiler>
+			<Compiler Name="Garbage">True</Compiler>
+			<Compiler Name="BoundsError">True</Compiler>
+			<Compiler Name="ZeroNilCompat">True</Compiler>
+			<Compiler Name="StringConstTruncated">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar">True</Compiler>
+			<Compiler Name="TypedConstVarPar">True</Compiler>
+			<Compiler Name="AsgToTypedConst">True</Compiler>
+			<Compiler Name="CaseLabelRange">True</Compiler>
+			<Compiler Name="ForVariable">True</Compiler>
+			<Compiler Name="ConstructingAbstract">True</Compiler>
+			<Compiler Name="ComparisonFalse">True</Compiler>
+			<Compiler Name="ComparisonTrue">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned">True</Compiler>
+			<Compiler Name="UnsupportedConstruct">True</Compiler>
+			<Compiler Name="FileOpen">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc">True</Compiler>
+			<Compiler Name="BadGlobalSymbol">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor">True</Compiler>
+			<Compiler Name="InvalidDirective">True</Compiler>
+			<Compiler Name="PackageNoLink">True</Compiler>
+			<Compiler Name="PackageThreadVar">True</Compiler>
+			<Compiler Name="ImplicitImport">True</Compiler>
+			<Compiler Name="HPPEMITIgnored">True</Compiler>
+			<Compiler Name="NoRetVal">True</Compiler>
+			<Compiler Name="UseBeforeDef">True</Compiler>
+			<Compiler Name="ForLoopVarUndef">True</Compiler>
+			<Compiler Name="UnitNameMismatch">True</Compiler>
+			<Compiler Name="NoCFGFileFound">True</Compiler>
+			<Compiler Name="MessageDirective">True</Compiler>
+			<Compiler Name="ImplicitVariants">True</Compiler>
+			<Compiler Name="UnicodeToLocale">True</Compiler>
+			<Compiler Name="LocaleToUnicode">True</Compiler>
+			<Compiler Name="ImagebaseMultiple">True</Compiler>
+			<Compiler Name="SuspiciousTypecast">True</Compiler>
+			<Compiler Name="PrivatePropAccessor">True</Compiler>
+			<Compiler Name="UnsafeType">False</Compiler>
+			<Compiler Name="UnsafeCode">False</Compiler>
+			<Compiler Name="UnsafeCast">False</Compiler>
+			<Compiler Name="OptionTruncated">True</Compiler>
+			<Compiler Name="WideCharReduced">True</Compiler>
+			<Compiler Name="DuplicatesIgnored">True</Compiler>
+		</Compiler>
+		<Linker>
+			<Linker Name="MapFile">0</Linker>
+			<Linker Name="OutputObjs">0</Linker>
+			<Linker Name="ConsoleApp">1</Linker>
+			<Linker Name="DebugInfo">False</Linker>
+			<Linker Name="RemoteSymbols">False</Linker>
+			<Linker Name="GenerateDRC">False</Linker>
+			<Linker Name="MinStackSize">16384</Linker>
+			<Linker Name="MaxStackSize">1048576</Linker>
+			<Linker Name="ImageBase">4194304</Linker>
+			<Linker Name="ExeDescription">RemObjects Data Abstract - Direct Oracle Access Driver</Linker>
+		</Linker>
+		<Directories>
+			<Directories Name="OutputDir"></Directories>
+			<Directories Name="UnitOutputDir">..\..\Dcu\D9</Directories>
+			<Directories Name="PackageDLLOutputDir">..\..\Dcu\D9</Directories>
+			<Directories Name="PackageDCPOutputDir">..\..\Dcu\D9</Directories>
+			<Directories Name="SearchPath">..\..\Dcu\D9</Directories>
+			<Directories Name="Packages"></Directories>
+			<Directories Name="Conditionals"></Directories>
+			<Directories Name="DebugSourceDirs"></Directories>
+			<Directories Name="UsePackages">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams"></Parameters>
+			<Parameters Name="HostApplication"></Parameters>
+			<Parameters Name="Launcher"></Parameters>
+			<Parameters Name="UseLauncher">False</Parameters>
+			<Parameters Name="DebugCWD"></Parameters>
+			<Parameters Name="RemoteHost"></Parameters>
+			<Parameters Name="RemotePath"></Parameters>
+			<Parameters Name="RemoteLauncher"></Parameters>
+			<Parameters Name="RemoteCWD"></Parameters>
+			<Parameters Name="RemoteDebug">False</Parameters>
+		</Parameters>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+			<VersionInfo Name="MajorVer">1</VersionInfo>
+			<VersionInfo Name="MinorVer">0</VersionInfo>
+			<VersionInfo Name="Release">0</VersionInfo>
+			<VersionInfo Name="Build">0</VersionInfo>
+			<VersionInfo Name="Debug">False</VersionInfo>
+			<VersionInfo Name="PreRelease">False</VersionInfo>
+			<VersionInfo Name="Special">False</VersionInfo>
+			<VersionInfo Name="Private">False</VersionInfo>
+			<VersionInfo Name="DLL">False</VersionInfo>
+			<VersionInfo Name="Locale">1031</VersionInfo>
+			<VersionInfo Name="CodePage">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+			<VersionInfoKeys Name="Comments"></VersionInfoKeys>
+		</VersionInfoKeys>
+	</Delphi.Personality>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D9.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D9.cfg
new file mode 100644
index 0000000..1ff2976
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D9.cfg	
@@ -0,0 +1,50 @@
+-$A8
+-$B-
+-$C-
+-$D-
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L-
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q+
+-$R+
+-$S-
+-$T-
+-$U+
+-$V+
+-$W-
+-$X+
+-$Y-
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D9"
+-LE"..\..\Dcu\D9"
+-LN"..\..\Dcu\D9"
+-U"..\..\Dcu\D9"
+-O"..\..\Dcu\D9"
+-I"..\..\Dcu\D9"
+-R"..\..\Dcu\D9"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D9.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D9.dpk
new file mode 100644
index 0000000..5b58a97
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D9.dpk	
@@ -0,0 +1,40 @@
+package DataAbstract_DOADriver_D9;
+
+{$R *.res}
+{$R 'uDADOADriver.dcr'}
+{$ALIGN 8}
+{$ASSERTIONS OFF}
+{$BOOLEVAL OFF}
+{$DEBUGINFO OFF}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS OFF}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS ON}
+{$RANGECHECKS ON}
+{$REFERENCEINFO OFF}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - Direct Oracle Access Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D9,
+  doa41d9;
+
+contains
+  uDADOADriver in 'uDADOADriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D9.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D9.res
new file mode 100644
index 0000000..7d5072d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_DOADriver_D9.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_Drivers_D6.bpg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_Drivers_D6.bpg
new file mode 100644
index 0000000..4e931fa
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_Drivers_D6.bpg	
@@ -0,0 +1,61 @@
+#------------------------------------------------------------------------------
+VERSION = BWS.01
+#------------------------------------------------------------------------------
+!ifndef ROOT
+ROOT = $(MAKEDIR)\..
+!endif
+#------------------------------------------------------------------------------
+MAKE = $(ROOT)\bin\make.exe -$(MAKEFLAGS) -f$**
+DCC = $(ROOT)\bin\dcc32.exe $**
+BRCC = $(ROOT)\bin\brcc32.exe $**
+#------------------------------------------------------------------------------
+PROJECTS = DataAbstract_ADODriver_D7.bpl DataAbstract_DBXDriver_D7.bpl \
+  DataAbstract_IBXDriver_D7.bpl DataAbstract_DiskDriver_D7.bpl DAADODrv.dad \
+  DADBXDrv.dad DADiskDrv.dad DAIBXDrv.dad DataAbstract_IBODriver_D7.bpl \
+  DataAbstract_SDACDriver_D7.bpl DataAbstract_ODACDriver_D7.bpl DAIBODrv.dad \
+  DASDACDrv.dad
+DataAbstract_SDACDriver_D6.bpl DataAbstract_ODACDriver_D6.bpl
+#------------------------------------------------------------------------------
+default: $(PROJECTS)
+#------------------------------------------------------------------------------
+
+DataAbstract_DiskDriver_D7.bpl: DataAbstract_DiskDriver_D7.dpk
+  $(DCC)
+
+DataAbstract_DBXDriver_D7.bpl: DataAbstract_DBXDriver_D7.dpk
+  $(DCC)
+
+DAADODrv.dad: DAADODrv.dpr
+  $(DCC)
+
+DADBXDrv.dad: DADBXDrv.dpr
+  $(DCC)
+
+DADiskDrv.dad: DADiskDrv.dpr
+  $(DCC)
+
+DAIBXDrv.dad: DAIBXDrv.dpr
+  $(DCC)
+
+DAIBODrv.dad: DAIBODrv.dpr
+  $(DCC)
+
+DASDACDrv.dad: DASDACDrv.dpr
+  $(DCC)
+
+DataAbstract_SDACDriver_D7.bpl: DataAbstract_SDACDriver_D7.dpk
+  $(DCC)
+
+DataAbstract_ODACDriver_D7.bpl: DataAbstract_ODACDriver_D7.dpk
+  $(DCC)
+
+DataAbstract_ADODriver_D7.bpl: DataAbstract_ADODriver_D7.dpk
+  $(DCC)
+
+DataAbstract_IBXDriver_D7.bpl: DataAbstract_IBXDriver_D7.dpk
+  $(DCC)
+
+DataAbstract_IBODriver_D7.bpl: DataAbstract_IBODriver_D7.dpk
+  $(DCC)
+
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D10.bdsproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D10.bdsproj
new file mode 100644
index 0000000..47a24e4
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D10.bdsproj	
@@ -0,0 +1,176 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality">Delphi.Personality</Option>
+			<Option Name="ProjectType"></Option>
+			<Option Name="Version">1.0</Option>
+			<Option Name="GUID">{D0E1436D-9AA9-4616-943B-851DF450E715}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource">DataAbstract_ElevateDBDriver_D10.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A">8</Compiler>
+			<Compiler Name="B">0</Compiler>
+			<Compiler Name="C">1</Compiler>
+			<Compiler Name="D">1</Compiler>
+			<Compiler Name="E">0</Compiler>
+			<Compiler Name="F">0</Compiler>
+			<Compiler Name="G">1</Compiler>
+			<Compiler Name="H">1</Compiler>
+			<Compiler Name="I">1</Compiler>
+			<Compiler Name="J">0</Compiler>
+			<Compiler Name="K">0</Compiler>
+			<Compiler Name="L">1</Compiler>
+			<Compiler Name="M">0</Compiler>
+			<Compiler Name="N">1</Compiler>
+			<Compiler Name="O">1</Compiler>
+			<Compiler Name="P">1</Compiler>
+			<Compiler Name="Q">0</Compiler>
+			<Compiler Name="R">0</Compiler>
+			<Compiler Name="S">0</Compiler>
+			<Compiler Name="T">0</Compiler>
+			<Compiler Name="U">0</Compiler>
+			<Compiler Name="V">1</Compiler>
+			<Compiler Name="W">0</Compiler>
+			<Compiler Name="X">1</Compiler>
+			<Compiler Name="Y">1</Compiler>
+			<Compiler Name="Z">1</Compiler>
+			<Compiler Name="ShowHints">True</Compiler>
+			<Compiler Name="ShowWarnings">True</Compiler>
+			<Compiler Name="UnitAliases"></Compiler>
+			<Compiler Name="NamespacePrefix"></Compiler>
+			<Compiler Name="GenerateDocumentation">False</Compiler>
+			<Compiler Name="DefaultNamespace"></Compiler>
+			<Compiler Name="SymbolDeprecated">False</Compiler>
+			<Compiler Name="SymbolLibrary">False</Compiler>
+			<Compiler Name="SymbolPlatform">False</Compiler>
+			<Compiler Name="SymbolExperimental">True</Compiler>
+			<Compiler Name="UnitLibrary">False</Compiler>
+			<Compiler Name="UnitPlatform">False</Compiler>
+			<Compiler Name="UnitDeprecated">False</Compiler>
+			<Compiler Name="UnitExperimental">True</Compiler>
+			<Compiler Name="HResultCompat">True</Compiler>
+			<Compiler Name="HidingMember">True</Compiler>
+			<Compiler Name="HiddenVirtual">True</Compiler>
+			<Compiler Name="Garbage">True</Compiler>
+			<Compiler Name="BoundsError">True</Compiler>
+			<Compiler Name="ZeroNilCompat">True</Compiler>
+			<Compiler Name="StringConstTruncated">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar">True</Compiler>
+			<Compiler Name="TypedConstVarPar">True</Compiler>
+			<Compiler Name="AsgToTypedConst">True</Compiler>
+			<Compiler Name="CaseLabelRange">True</Compiler>
+			<Compiler Name="ForVariable">True</Compiler>
+			<Compiler Name="ConstructingAbstract">True</Compiler>
+			<Compiler Name="ComparisonFalse">True</Compiler>
+			<Compiler Name="ComparisonTrue">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned">True</Compiler>
+			<Compiler Name="UnsupportedConstruct">True</Compiler>
+			<Compiler Name="FileOpen">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc">True</Compiler>
+			<Compiler Name="BadGlobalSymbol">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor">True</Compiler>
+			<Compiler Name="InvalidDirective">True</Compiler>
+			<Compiler Name="PackageNoLink">True</Compiler>
+			<Compiler Name="PackageThreadVar">True</Compiler>
+			<Compiler Name="ImplicitImport">True</Compiler>
+			<Compiler Name="HPPEMITIgnored">True</Compiler>
+			<Compiler Name="NoRetVal">True</Compiler>
+			<Compiler Name="UseBeforeDef">True</Compiler>
+			<Compiler Name="ForLoopVarUndef">True</Compiler>
+			<Compiler Name="UnitNameMismatch">True</Compiler>
+			<Compiler Name="NoCFGFileFound">True</Compiler>
+			<Compiler Name="MessageDirective">True</Compiler>
+			<Compiler Name="ImplicitVariants">True</Compiler>
+			<Compiler Name="UnicodeToLocale">True</Compiler>
+			<Compiler Name="LocaleToUnicode">True</Compiler>
+			<Compiler Name="ImagebaseMultiple">True</Compiler>
+			<Compiler Name="SuspiciousTypecast">True</Compiler>
+			<Compiler Name="PrivatePropAccessor">True</Compiler>
+			<Compiler Name="UnsafeType">False</Compiler>
+			<Compiler Name="UnsafeCode">False</Compiler>
+			<Compiler Name="UnsafeCast">False</Compiler>
+			<Compiler Name="OptionTruncated">True</Compiler>
+			<Compiler Name="WideCharReduced">True</Compiler>
+			<Compiler Name="DuplicatesIgnored">True</Compiler>  <Compiler Name="UnitInitSeq">True</Compiler>
+      <Compiler Name="LocalPInvoke">True</Compiler>
+      <Compiler Name="CodePage"></Compiler>
+    </Compiler>
+		<Linker>
+			<Linker Name="MapFile">0</Linker>
+			<Linker Name="OutputObjs">0</Linker>
+			<Linker Name="ConsoleApp">1</Linker>
+			<Linker Name="DebugInfo">False</Linker>
+			<Linker Name="RemoteSymbols">False</Linker>
+			<Linker Name="GenerateDRC">False</Linker>
+			<Linker Name="MinStackSize">16384</Linker>
+			<Linker Name="MaxStackSize">1048576</Linker>
+			<Linker Name="ImageBase">4194304</Linker>
+			<Linker Name="ExeDescription">RemObjects Data Abstract - Elevate DB Driver</Linker>  <Linker Name="GenerateHpps">False</Linker>
+    </Linker>
+		<Directories>
+			<Directories Name="OutputDir"></Directories>
+			<Directories Name="UnitOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDLLOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDCPOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="SearchPath">..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10</Directories>
+			<Directories Name="Packages"></Directories>
+			<Directories Name="Conditionals"></Directories>
+			<Directories Name="DebugSourceDirs"></Directories>
+			<Directories Name="UsePackages">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams"></Parameters>
+			<Parameters Name="HostApplication"></Parameters>
+			<Parameters Name="Launcher"></Parameters>
+			<Parameters Name="UseLauncher">False</Parameters>
+			<Parameters Name="DebugCWD"></Parameters>
+			<Parameters Name="RemoteHost"></Parameters>
+			<Parameters Name="RemotePath"></Parameters>
+			<Parameters Name="RemoteLauncher"></Parameters>
+			<Parameters Name="RemoteCWD"></Parameters>
+			<Parameters Name="RemoteDebug">False</Parameters>  <Parameters Name="Debug Symbols Search Path"></Parameters>
+      <Parameters Name="LoadAllSymbols">True</Parameters>
+      <Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+    </Parameters>
+		<Language>
+			<Language Name="ActiveLang"></Language>
+			<Language Name="ProjectLang">$00000000</Language>
+			<Language Name="RootDir"></Language>
+		</Language>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+			<VersionInfo Name="MajorVer">3</VersionInfo>
+			<VersionInfo Name="MinorVer">0</VersionInfo>
+			<VersionInfo Name="Release">1</VersionInfo>
+			<VersionInfo Name="Build">361</VersionInfo>
+			<VersionInfo Name="Debug">False</VersionInfo>
+			<VersionInfo Name="PreRelease">False</VersionInfo>
+			<VersionInfo Name="Special">False</VersionInfo>
+			<VersionInfo Name="Private">False</VersionInfo>
+			<VersionInfo Name="DLL">False</VersionInfo>
+			<VersionInfo Name="Locale">1033</VersionInfo>
+			<VersionInfo Name="CodePage">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+		</VersionInfoKeys>
+	</Delphi.Personality>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D10.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D10.cfg
new file mode 100644
index 0000000..9037d9d
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D10.cfg	
@@ -0,0 +1,49 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N0"..\..\Dcu\D10"
+-LE"..\..\Dcu\D10"
+-LN"..\..\Dcu\D10"
+-U"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-O"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-I"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-R"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D10.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D10.dpk
new file mode 100644
index 0000000..b6773b6
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D10.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_ElevateDBDriver_D10;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - ElevateDB Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D10,
+  edb105d10run;
+
+contains
+  uDAElevateDBDriver in 'uDAElevateDBDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D10.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D10.res
new file mode 100644
index 0000000..7b3c163
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D10.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D11.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D11.dpk
new file mode 100644
index 0000000..bd44fbd
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D11.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_ElevateDBDriver_D11;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - ElevateDB Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D11,
+  edb105D2007run;
+
+contains
+  uDAElevateDBDriver in 'uDAElevateDBDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D11.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D11.dproj
new file mode 100644
index 0000000..d04db30
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D11.dproj	
@@ -0,0 +1,73 @@
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{c31471d9-f8e2-4e45-94a7-1264d8011587}</ProjectGuid>
+    <MainSource>DataAbstract_ElevateDBDriver_D11.dpk</MainSource>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+    <DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_ElevateDBDriver_D11.bpl</DCC_DependencyCheckOutputName>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DebugInformation>False</DCC_DebugInformation>
+    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_Define>RELEASE</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Delphi.Personality</Borland.Personality>
+    <Borland.ProjectType>Package</Borland.ProjectType>
+    <BorlandProject>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">RemObjects Data Abstract - ElevateDB Driver</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">True</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">3</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">1</VersionInfo><VersionInfo Name="Build">361</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">DataAbstract_ElevateDBDriver_D11.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
+  <ItemGroup>
+    <DelphiCompile Include="DataAbstract_ElevateDBDriver_D11.dpk">
+      <MainSource>MainSource</MainSource>
+    </DelphiCompile>
+    <DCCReference Include="..\..\..\..\Stardock\Object Desktop\DeskScapes\DataAbstract_Core_D11.dcp" />
+    <DCCReference Include="..\..\..\..\Stardock\Object Desktop\DeskScapes\dbrtl.dcp" />
+    <DCCReference Include="..\..\..\..\Stardock\Object Desktop\DeskScapes\edb105D11run.dcp" />
+    <DCCReference Include="..\..\..\..\Stardock\Object Desktop\DeskScapes\edb105D1run.dcp" />
+    <DCCReference Include="..\..\..\..\Stardock\Object Desktop\DeskScapes\edb105D200run.dcp" />
+    <DCCReference Include="..\..\..\..\Stardock\Object Desktop\DeskScapes\edb105D20run.dcp" />
+    <DCCReference Include="..\..\..\..\Stardock\Object Desktop\DeskScapes\edb105D2run.dcp" />
+    <DCCReference Include="..\..\..\..\Stardock\Object Desktop\DeskScapes\edb105Drun.dcp" />
+    <DCCReference Include="..\..\..\..\Stardock\Object Desktop\DeskScapes\rtl.dcp" />
+    <DCCReference Include="..\..\..\..\Stardock\Object Desktop\DeskScapes\vcl.dcp" />
+    <DCCReference Include="uDAElevateDBDriver.pas" />
+  </ItemGroup>
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D11.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D11.res
new file mode 100644
index 0000000..7b3c163
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D11.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D12.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D12.dpk
new file mode 100644
index 0000000..0eb30af
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D12.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_ElevateDBDriver_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - ElevateDB Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D12,
+  edb105D2009run;
+
+contains
+  uDAElevateDBDriver in 'uDAElevateDBDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D12.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D12.dproj
new file mode 100644
index 0000000..dfe92dd
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D12.dproj	
@@ -0,0 +1,95 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{c31471d9-f8e2-4e45-94a7-1264d8011587}</ProjectGuid>
+			<MainSource>DataAbstract_ElevateDBDriver_D12.dpk</MainSource>
+			<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+			<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+			<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_ElevateDBDriver_D11.bpl</DCC_DependencyCheckOutputName>
+			<ProjectVersion>11.1</ProjectVersion>
+			<Config Condition="'$(Config)'==''">Base</Config>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base)'!=''">
+			<DCC_SymbolReferenceInfo>1</DCC_SymbolReferenceInfo>
+			<DCC_CVT_WCHAR_TO_ACHAR>error</DCC_CVT_WCHAR_TO_ACHAR>
+			<DCC_CVT_WIDENING_STRING_LOST>error</DCC_CVT_WIDENING_STRING_LOST>
+			<DCC_BplOutput>..\..\Dcu\D12</DCC_BplOutput>
+			<DCC_UnitSearchPath>..;..\..\Dcu\D12;..\..\..\RemObjects SDK for Delphi\Dcu\D12;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+			<DCC_EXPLICIT_STRING_CAST>error</DCC_EXPLICIT_STRING_CAST>
+			<DCC_CVT_ACHAR_TO_WCHAR>error</DCC_CVT_ACHAR_TO_WCHAR>
+			<DCC_IMPLICIT_STRING_CAST_LOSS>error</DCC_IMPLICIT_STRING_CAST_LOSS>
+			<DCC_EXPLICIT_STRING_CAST_LOSS>error</DCC_EXPLICIT_STRING_CAST_LOSS>
+			<DCC_IMPLICIT_STRING_CAST>error</DCC_IMPLICIT_STRING_CAST>
+			<DCC_DcuOutput>..\..\Dcu\D12</DCC_DcuOutput>
+			<DCC_CVT_NARROWING_STRING_LOST>error</DCC_CVT_NARROWING_STRING_LOST>
+			<DCC_DcpOutput>..\..\Dcu\D12</DCC_DcpOutput>
+			<GenDll>true</GenDll>
+			<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+			<GenPackage>true</GenPackage>
+			<DesignOnlyPackage>true</DesignOnlyPackage>
+			<DCC_ImageBase>00400000</DCC_ImageBase>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D12\DataAbstract_ElevateDBDriver_D12.bpl</DCC_DependencyCheckOutputName>
+			<DCC_Description>RemObjects Data Abstract - ElevateDB Driver</DCC_Description>
+		</PropertyGroup>
+		<ItemGroup>
+			<DelphiCompile Include="DataAbstract_ElevateDBDriver_D12.dpk">
+				<MainSource>MainSource</MainSource>
+			</DelphiCompile>
+			<DCCReference Include="rtl.dcp"/>
+			<DCCReference Include="vcl.dcp"/>
+			<DCCReference Include="dbrtl.dcp"/>
+			<DCCReference Include="DataAbstract_Core_D12.dcp"/>
+			<DCCReference Include="edb105D2009run.dcp"/>
+			<DCCReference Include="uDAElevateDBDriver.pas"/>
+			<BuildConfiguration Include="Base">
+				<Key>Base</Key>
+			</BuildConfiguration>
+		</ItemGroup>
+		<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+		<ProjectExtensions>
+			<Borland.Personality>Delphi.Personality.12</Borland.Personality>
+			<Borland.ProjectType>Package</Borland.ProjectType>
+			<BorlandProject>
+				<Delphi.Personality>
+					<Parameters>
+						<Parameters Name="UseLauncher">False</Parameters>
+						<Parameters Name="LoadAllSymbols">True</Parameters>
+						<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+					</Parameters>
+					<VersionInfo>
+						<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+						<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+						<VersionInfo Name="MajorVer">3</VersionInfo>
+						<VersionInfo Name="MinorVer">0</VersionInfo>
+						<VersionInfo Name="Release">1</VersionInfo>
+						<VersionInfo Name="Build">361</VersionInfo>
+						<VersionInfo Name="Debug">False</VersionInfo>
+						<VersionInfo Name="PreRelease">False</VersionInfo>
+						<VersionInfo Name="Special">False</VersionInfo>
+						<VersionInfo Name="Private">False</VersionInfo>
+						<VersionInfo Name="DLL">False</VersionInfo>
+						<VersionInfo Name="Locale">1033</VersionInfo>
+						<VersionInfo Name="CodePage">1252</VersionInfo>
+					</VersionInfo>
+					<VersionInfoKeys>
+						<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="FileDescription"/>
+						<VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys>
+						<VersionInfoKeys Name="InternalName"/>
+						<VersionInfoKeys Name="LegalCopyright"/>
+						<VersionInfoKeys Name="LegalTrademarks"/>
+						<VersionInfoKeys Name="OriginalFilename"/>
+						<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+						<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+					</VersionInfoKeys>
+					<Source>
+						<Source Name="MainSource">DataAbstract_ElevateDBDriver_D12.dpk</Source>
+					</Source>
+				</Delphi.Personality>
+			</BorlandProject>
+			<ProjectFileVersion>12</ProjectFileVersion>
+		</ProjectExtensions>
+	</Project>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D12.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D12.res
new file mode 100644
index 0000000..7b3c163
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D12.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D6.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D6.cfg
new file mode 100644
index 0000000..c2c069b
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D6.cfg	
@@ -0,0 +1,41 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D6"
+-LE"..\..\Dcu\D6"
+-LN"..\..\Dcu\D6"
+-U"..\..\Dcu\D6;..\..\..\RemObjects SDK\Dcu\D6"
+-O"..\..\Dcu\D6;..\..\..\RemObjects SDK\Dcu\D6"
+-I"..\..\Dcu\D6;..\..\..\RemObjects SDK\Dcu\D6"
+-R"..\..\Dcu\D6;..\..\..\RemObjects SDK\Dcu\D6"
+-Z
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D6.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D6.dof
new file mode 100644
index 0000000..0c3ea83
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D6.dof	
@@ -0,0 +1,76 @@
+[FileVersion]
+Version=6.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitDeprecated=0
+UnitLibrary=0
+UnitPlatform=0
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects Data Abstract - ElevateDB Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D6
+PackageDLLOutputDir=..\..\Dcu\D6
+PackageDCPOutputDir=..\..\Dcu\D6
+SearchPath=..\..\Dcu\D6;..\..\..\RemObjects SDK\Dcu\D6
+Packages=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=2.0.0.138
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D6.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D6.dpk
new file mode 100644
index 0000000..5e5f141
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D6.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_ElevateDBDriver_D6;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - ElevateDB Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D6,
+  edb105d6run;
+
+contains
+  uDAElevateDBDriver in 'uDAElevateDBDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D6.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D6.res
new file mode 100644
index 0000000..f5602d3
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D6.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D7.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D7.cfg
new file mode 100644
index 0000000..6784156
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D7.cfg	
@@ -0,0 +1,50 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D7"
+-LE"..\..\Dcu\D7"
+-LN"..\..\Dcu\D7"
+-U"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-O"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-I"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-R"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D7.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D7.dof
new file mode 100644
index 0000000..9e696f5
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D7.dof	
@@ -0,0 +1,116 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects Data Abstract - ElevateDB Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D7
+PackageDLLOutputDir=..\..\Dcu\D7
+PackageDCPOutputDir=..\..\Dcu\D7
+SearchPath=..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7
+Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;EDBpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;dclOfficeXP;RemObjects_DataSnap_D7;PurposesoftD7;addict3_d6;tb2kComplete_70;CDKDesignTimeSupport;CDKSmp;CDK;ES_CodeSite20;ESDelphiCommandCompiler;ESFileSearch;ESVisualCompositeExpert;EaglWk;ESGraphUtils;ESBase;ESVsCp;ESSampleComposites70;ESSampleCompositeEditors7;Rz252N70;SynEdit_D7;dxsbD7;dxComnD7;dxDockingD7;dxEdtrD7;dxELibD7;dxExELD7;EQGridD7;dxExRwD7;dxDBEdD7;dxInsD7;dxGrEdD7;ECQDBCD7;EQTLD7;EQDBTLD7;dxLayoutControlD7;dxMasterViewD7;dxmdsd7;dxNavBarD7;dxObjInsD7;dxPageControlD7;dxPSCoreD7;Rz252D70;cxPageControlVCLD7;cxEditorsVCLD7;dxThemeD7;cxLibraryVCLD7;cxDataD7;cxGridUtilsVCLD7;cxGridVCLD7;RemObjects_BPDX_D7
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=2.0.0.142
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D7.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D7.dpk
new file mode 100644
index 0000000..c2f5f25
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D7.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_ElevateDBDriver_D7;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - ElevateDB Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D7,
+  edb105d7run;
+
+contains
+  uDAElevateDBDriver in 'uDAElevateDBDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D7.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D7.res
new file mode 100644
index 0000000..77a3fad
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_D7.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_Glyphs.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_Glyphs.res
new file mode 100644
index 0000000..9e2c761
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ElevateDBDriver_Glyphs.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D10.bdsproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D10.bdsproj
new file mode 100644
index 0000000..239dc3d
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D10.bdsproj	
@@ -0,0 +1,176 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality">Delphi.Personality</Option>
+			<Option Name="ProjectType"></Option>
+			<Option Name="Version">1.0</Option>
+			<Option Name="GUID">{0FC45B58-F519-40B6-831A-DD79C8D3270F}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource">DataAbstract_FIBDriver_D10.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A">8</Compiler>
+			<Compiler Name="B">0</Compiler>
+			<Compiler Name="C">1</Compiler>
+			<Compiler Name="D">1</Compiler>
+			<Compiler Name="E">0</Compiler>
+			<Compiler Name="F">0</Compiler>
+			<Compiler Name="G">1</Compiler>
+			<Compiler Name="H">1</Compiler>
+			<Compiler Name="I">1</Compiler>
+			<Compiler Name="J">0</Compiler>
+			<Compiler Name="K">0</Compiler>
+			<Compiler Name="L">1</Compiler>
+			<Compiler Name="M">0</Compiler>
+			<Compiler Name="N">1</Compiler>
+			<Compiler Name="O">1</Compiler>
+			<Compiler Name="P">1</Compiler>
+			<Compiler Name="Q">0</Compiler>
+			<Compiler Name="R">0</Compiler>
+			<Compiler Name="S">0</Compiler>
+			<Compiler Name="T">0</Compiler>
+			<Compiler Name="U">0</Compiler>
+			<Compiler Name="V">1</Compiler>
+			<Compiler Name="W">0</Compiler>
+			<Compiler Name="X">1</Compiler>
+			<Compiler Name="Y">1</Compiler>
+			<Compiler Name="Z">1</Compiler>
+			<Compiler Name="ShowHints">True</Compiler>
+			<Compiler Name="ShowWarnings">True</Compiler>
+			<Compiler Name="UnitAliases"></Compiler>
+			<Compiler Name="NamespacePrefix"></Compiler>
+			<Compiler Name="GenerateDocumentation">False</Compiler>
+			<Compiler Name="DefaultNamespace"></Compiler>
+			<Compiler Name="SymbolDeprecated">False</Compiler>
+			<Compiler Name="SymbolLibrary">False</Compiler>
+			<Compiler Name="SymbolPlatform">False</Compiler>
+			<Compiler Name="SymbolExperimental">True</Compiler>
+			<Compiler Name="UnitLibrary">False</Compiler>
+			<Compiler Name="UnitPlatform">False</Compiler>
+			<Compiler Name="UnitDeprecated">False</Compiler>
+			<Compiler Name="UnitExperimental">True</Compiler>
+			<Compiler Name="HResultCompat">True</Compiler>
+			<Compiler Name="HidingMember">True</Compiler>
+			<Compiler Name="HiddenVirtual">True</Compiler>
+			<Compiler Name="Garbage">True</Compiler>
+			<Compiler Name="BoundsError">True</Compiler>
+			<Compiler Name="ZeroNilCompat">True</Compiler>
+			<Compiler Name="StringConstTruncated">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar">True</Compiler>
+			<Compiler Name="TypedConstVarPar">True</Compiler>
+			<Compiler Name="AsgToTypedConst">True</Compiler>
+			<Compiler Name="CaseLabelRange">True</Compiler>
+			<Compiler Name="ForVariable">True</Compiler>
+			<Compiler Name="ConstructingAbstract">True</Compiler>
+			<Compiler Name="ComparisonFalse">True</Compiler>
+			<Compiler Name="ComparisonTrue">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned">True</Compiler>
+			<Compiler Name="UnsupportedConstruct">True</Compiler>
+			<Compiler Name="FileOpen">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc">True</Compiler>
+			<Compiler Name="BadGlobalSymbol">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor">True</Compiler>
+			<Compiler Name="InvalidDirective">True</Compiler>
+			<Compiler Name="PackageNoLink">True</Compiler>
+			<Compiler Name="PackageThreadVar">True</Compiler>
+			<Compiler Name="ImplicitImport">True</Compiler>
+			<Compiler Name="HPPEMITIgnored">True</Compiler>
+			<Compiler Name="NoRetVal">True</Compiler>
+			<Compiler Name="UseBeforeDef">True</Compiler>
+			<Compiler Name="ForLoopVarUndef">True</Compiler>
+			<Compiler Name="UnitNameMismatch">True</Compiler>
+			<Compiler Name="NoCFGFileFound">True</Compiler>
+			<Compiler Name="MessageDirective">True</Compiler>
+			<Compiler Name="ImplicitVariants">True</Compiler>
+			<Compiler Name="UnicodeToLocale">True</Compiler>
+			<Compiler Name="LocaleToUnicode">True</Compiler>
+			<Compiler Name="ImagebaseMultiple">True</Compiler>
+			<Compiler Name="SuspiciousTypecast">True</Compiler>
+			<Compiler Name="PrivatePropAccessor">True</Compiler>
+			<Compiler Name="UnsafeType">False</Compiler>
+			<Compiler Name="UnsafeCode">False</Compiler>
+			<Compiler Name="UnsafeCast">False</Compiler>
+			<Compiler Name="OptionTruncated">True</Compiler>
+			<Compiler Name="WideCharReduced">True</Compiler>
+			<Compiler Name="DuplicatesIgnored">True</Compiler>  <Compiler Name="UnitInitSeq">True</Compiler>
+      <Compiler Name="LocalPInvoke">True</Compiler>
+      <Compiler Name="CodePage"></Compiler>
+    </Compiler>
+		<Linker>
+			<Linker Name="MapFile">0</Linker>
+			<Linker Name="OutputObjs">0</Linker>
+			<Linker Name="ConsoleApp">1</Linker>
+			<Linker Name="DebugInfo">False</Linker>
+			<Linker Name="RemoteSymbols">False</Linker>
+			<Linker Name="GenerateDRC">False</Linker>
+			<Linker Name="MinStackSize">16384</Linker>
+			<Linker Name="MaxStackSize">1048576</Linker>
+			<Linker Name="ImageBase">4194304</Linker>
+			<Linker Name="ExeDescription">RemObjects Data Abstract - FIBPlus Driver</Linker>  <Linker Name="GenerateHpps">False</Linker>
+    </Linker>
+		<Directories>
+			<Directories Name="OutputDir"></Directories>
+			<Directories Name="UnitOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDLLOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDCPOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="SearchPath">..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10</Directories>
+			<Directories Name="Packages"></Directories>
+			<Directories Name="Conditionals"></Directories>
+			<Directories Name="DebugSourceDirs"></Directories>
+			<Directories Name="UsePackages">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams"></Parameters>
+			<Parameters Name="HostApplication"></Parameters>
+			<Parameters Name="Launcher"></Parameters>
+			<Parameters Name="UseLauncher">False</Parameters>
+			<Parameters Name="DebugCWD"></Parameters>
+			<Parameters Name="RemoteHost"></Parameters>
+			<Parameters Name="RemotePath"></Parameters>
+			<Parameters Name="RemoteLauncher"></Parameters>
+			<Parameters Name="RemoteCWD"></Parameters>
+			<Parameters Name="RemoteDebug">False</Parameters>  <Parameters Name="Debug Symbols Search Path"></Parameters>
+      <Parameters Name="LoadAllSymbols">True</Parameters>
+      <Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+    </Parameters>
+		<Language>
+			<Language Name="ActiveLang"></Language>
+			<Language Name="ProjectLang">$00000000</Language>
+			<Language Name="RootDir"></Language>
+		</Language>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+			<VersionInfo Name="MajorVer">3</VersionInfo>
+			<VersionInfo Name="MinorVer">0</VersionInfo>
+			<VersionInfo Name="Release">1</VersionInfo>
+			<VersionInfo Name="Build">361</VersionInfo>
+			<VersionInfo Name="Debug">False</VersionInfo>
+			<VersionInfo Name="PreRelease">False</VersionInfo>
+			<VersionInfo Name="Special">False</VersionInfo>
+			<VersionInfo Name="Private">False</VersionInfo>
+			<VersionInfo Name="DLL">False</VersionInfo>
+			<VersionInfo Name="Locale">1033</VersionInfo>
+			<VersionInfo Name="CodePage">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+		</VersionInfoKeys>
+	</Delphi.Personality>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D10.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D10.cfg
new file mode 100644
index 0000000..9037d9d
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D10.cfg	
@@ -0,0 +1,49 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N0"..\..\Dcu\D10"
+-LE"..\..\Dcu\D10"
+-LN"..\..\Dcu\D10"
+-U"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-O"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-I"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-R"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D10.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D10.dpk
new file mode 100644
index 0000000..6b4fd10
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D10.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_FIBDriver_D10;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - FIBPlus Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D10,
+  FIBPlus2006;
+
+contains
+  uDAFIBDriver in 'uDAFIBDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D10.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D10.res
new file mode 100644
index 0000000..7b3c163
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D10.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D11.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D11.dpk
new file mode 100644
index 0000000..d35cd4a
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D11.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_FIBDriver_D11;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - FIBPlus Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D11,
+  FIBPlus2007;
+
+contains
+  uDAFIBDriver in 'uDAFIBDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D11.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D11.dproj
new file mode 100644
index 0000000..f73572b
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D11.dproj	
@@ -0,0 +1,68 @@
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{4aa60252-6f77-44b7-a171-e158f29374ca}</ProjectGuid>
+    <MainSource>DataAbstract_FIBDriver_D11.dpk</MainSource>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+    <DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_FIBDriver_D11.bpl</DCC_DependencyCheckOutputName>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DebugInformation>False</DCC_DebugInformation>
+    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_Define>RELEASE</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Delphi.Personality</Borland.Personality>
+    <Borland.ProjectType>Package</Borland.ProjectType>
+    <BorlandProject>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">RemObjects Data Abstract - FIBPlus Driver</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">True</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">3</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">1</VersionInfo><VersionInfo Name="Build">361</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">DataAbstract_FIBDriver_D11.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
+  <ItemGroup>
+    <DelphiCompile Include="DataAbstract_FIBDriver_D11.dpk">
+      <MainSource>MainSource</MainSource>
+    </DelphiCompile>
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\DataAbstract_Core_D11.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\dbrtl.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\FIBPlus2007.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\rtl.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\vcl.dcp" />
+    <DCCReference Include="uDAFIBDriver.pas" />
+  </ItemGroup>
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D11.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D11.res
new file mode 100644
index 0000000..7b3c163
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D11.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D12.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D12.dpk
new file mode 100644
index 0000000..07031d1
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D12.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_FIBDriver_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - FIBPlus Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D12,
+  FIBPlus2009;
+
+contains
+  uDAFIBDriver in 'uDAFIBDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D12.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D12.dproj
new file mode 100644
index 0000000..67a3d3b
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D12.dproj	
@@ -0,0 +1,95 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{4aa60252-6f77-44b7-a171-e158f29374ca}</ProjectGuid>
+			<MainSource>DataAbstract_FIBDriver_D12.dpk</MainSource>
+			<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+			<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+			<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_FIBDriver_D11.bpl</DCC_DependencyCheckOutputName>
+			<ProjectVersion>11.1</ProjectVersion>
+			<Config Condition="'$(Config)'==''">Base</Config>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base)'!=''">
+			<DCC_SymbolReferenceInfo>1</DCC_SymbolReferenceInfo>
+			<DCC_CVT_WIDENING_STRING_LOST>error</DCC_CVT_WIDENING_STRING_LOST>
+			<DCC_CVT_ACHAR_TO_WCHAR>error</DCC_CVT_ACHAR_TO_WCHAR>
+			<DCC_IMPLICIT_STRING_CAST>error</DCC_IMPLICIT_STRING_CAST>
+			<DCC_IMPLICIT_STRING_CAST_LOSS>error</DCC_IMPLICIT_STRING_CAST_LOSS>
+			<DCC_CVT_WCHAR_TO_ACHAR>error</DCC_CVT_WCHAR_TO_ACHAR>
+			<DCC_EXPLICIT_STRING_CAST>error</DCC_EXPLICIT_STRING_CAST>
+			<DCC_EXPLICIT_STRING_CAST_LOSS>error</DCC_EXPLICIT_STRING_CAST_LOSS>
+			<DCC_CVT_NARROWING_STRING_LOST>error</DCC_CVT_NARROWING_STRING_LOST>
+			<DCC_DcuOutput>..\..\Dcu\D12</DCC_DcuOutput>
+			<DCC_BplOutput>..\..\Dcu\D12</DCC_BplOutput>
+			<DCC_UnitSearchPath>..;..\..\Dcu\D12;..\..\..\RemObjects SDK for Delphi\Dcu\D12;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+			<DCC_DcpOutput>..\..\Dcu\D12</DCC_DcpOutput>
+			<GenDll>true</GenDll>
+			<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+			<GenPackage>true</GenPackage>
+			<DesignOnlyPackage>true</DesignOnlyPackage>
+			<DCC_ImageBase>00400000</DCC_ImageBase>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D12\DataAbstract_FIBDriver_D12.bpl</DCC_DependencyCheckOutputName>
+			<DCC_Description>RemObjects Data Abstract - FIBPlus Driver</DCC_Description>
+		</PropertyGroup>
+		<ItemGroup>
+			<DelphiCompile Include="DataAbstract_FIBDriver_D12.dpk">
+				<MainSource>MainSource</MainSource>
+			</DelphiCompile>
+			<DCCReference Include="rtl.dcp"/>
+			<DCCReference Include="vcl.dcp"/>
+			<DCCReference Include="dbrtl.dcp"/>
+			<DCCReference Include="DataAbstract_Core_D12.dcp"/>
+			<DCCReference Include="FIBPlus2009.dcp"/>
+			<DCCReference Include="uDAFIBDriver.pas"/>
+			<BuildConfiguration Include="Base">
+				<Key>Base</Key>
+			</BuildConfiguration>
+		</ItemGroup>
+		<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+		<ProjectExtensions>
+			<Borland.Personality>Delphi.Personality.12</Borland.Personality>
+			<Borland.ProjectType>Package</Borland.ProjectType>
+			<BorlandProject>
+				<Delphi.Personality>
+					<Parameters>
+						<Parameters Name="UseLauncher">False</Parameters>
+						<Parameters Name="LoadAllSymbols">True</Parameters>
+						<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+					</Parameters>
+					<VersionInfo>
+						<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+						<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+						<VersionInfo Name="MajorVer">3</VersionInfo>
+						<VersionInfo Name="MinorVer">0</VersionInfo>
+						<VersionInfo Name="Release">1</VersionInfo>
+						<VersionInfo Name="Build">361</VersionInfo>
+						<VersionInfo Name="Debug">False</VersionInfo>
+						<VersionInfo Name="PreRelease">False</VersionInfo>
+						<VersionInfo Name="Special">False</VersionInfo>
+						<VersionInfo Name="Private">False</VersionInfo>
+						<VersionInfo Name="DLL">False</VersionInfo>
+						<VersionInfo Name="Locale">1033</VersionInfo>
+						<VersionInfo Name="CodePage">1252</VersionInfo>
+					</VersionInfo>
+					<VersionInfoKeys>
+						<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="FileDescription"/>
+						<VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys>
+						<VersionInfoKeys Name="InternalName"/>
+						<VersionInfoKeys Name="LegalCopyright"/>
+						<VersionInfoKeys Name="LegalTrademarks"/>
+						<VersionInfoKeys Name="OriginalFilename"/>
+						<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+						<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+					</VersionInfoKeys>
+					<Source>
+						<Source Name="MainSource">DataAbstract_FIBDriver_D12.dpk</Source>
+					</Source>
+				</Delphi.Personality>
+			</BorlandProject>
+			<ProjectFileVersion>12</ProjectFileVersion>
+		</ProjectExtensions>
+	</Project>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D12.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D12.res
new file mode 100644
index 0000000..7b3c163
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D12.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D6.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D6.cfg
new file mode 100644
index 0000000..05f9ec3
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D6.cfg	
@@ -0,0 +1,41 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D6"
+-LE"..\..\Dcu\D6"
+-LN"..\..\Dcu\D6"
+-U"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-O"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-I"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-R"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-Z
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D6.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D6.dof
new file mode 100644
index 0000000..c96c6c8
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D6.dof	
@@ -0,0 +1,76 @@
+[FileVersion]
+Version=6.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitDeprecated=0
+UnitLibrary=0
+UnitPlatform=0
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects Data Abstract - FIBPlus Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D6
+PackageDLLOutputDir=..\..\Dcu\D6
+PackageDCPOutputDir=..\..\Dcu\D6
+SearchPath=..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6
+Packages=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=3.0.0.289
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D6.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D6.dpk
new file mode 100644
index 0000000..0447c56
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D6.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_FIBDriver_D6;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - FIBPlus Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D6,
+  FIBPlus6;
+
+contains
+  uDAFIBDriver in 'uDAFIBDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D6.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D6.res
new file mode 100644
index 0000000..f5602d3
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D6.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D7.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D7.cfg
new file mode 100644
index 0000000..6784156
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D7.cfg	
@@ -0,0 +1,50 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D7"
+-LE"..\..\Dcu\D7"
+-LN"..\..\Dcu\D7"
+-U"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-O"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-I"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-R"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D7.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D7.dof
new file mode 100644
index 0000000..ccdfd7b
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D7.dof	
@@ -0,0 +1,116 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=Data Abstract - FIBPlus Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D7
+PackageDLLOutputDir=..\..\Dcu\D7
+PackageDCPOutputDir=..\..\Dcu\D7
+SearchPath=..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7
+Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;dclOfficeXP;RemObjects_DataSnap_D7;PurposesoftD7;addict3_d6;tb2kComplete_70;CDKDesignTimeSupport;CDKSmp;CDK;ES_CodeSite20;ESDelphiCommandCompiler;ESFileSearch;ESVisualCompositeExpert;EaglWk;ESGraphUtils;ESBase;ESVsCp;ESSampleComposites70;ESSampleCompositeEditors7;Rz252N70;SynEdit_D7;dxsbD7;dxComnD7;dxDockingD7;dxEdtrD7;dxELibD7;dxExELD7;EQGridD7;dxExRwD7;dxDBEdD7;dxInsD7;dxGrEdD7;ECQDBCD7;EQTLD7;EQDBTLD7;dxLayoutControlD7;dxMasterViewD7;dxmdsd7;dxNavBarD7;dxObjInsD7;dxPageControlD7;dxPSCoreD7;Rz252D70;cxPageControlVCLD7;cxEditorsVCLD7;dxThemeD7;cxLibraryVCLD7;cxDataD7;cxGridUtilsVCLD7;cxGridVCLD7;RemObjects_BPDX_D7
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=2.0.0.142
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D7.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D7.dpk
new file mode 100644
index 0000000..8ecc150
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D7.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_FIBDriver_D7;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - FIBPlus Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D7,
+  FIBPlus7;
+
+contains
+  uDAFIBDriver in 'uDAFIBDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D7.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D7.res
new file mode 100644
index 0000000..892aed8
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_D7.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_Glyphs.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_Glyphs.res
new file mode 100644
index 0000000..d0e3d08
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_FIBDriver_Glyphs.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D10.bdsproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D10.bdsproj
new file mode 100644
index 0000000..8d350cb
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D10.bdsproj	
@@ -0,0 +1,179 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality">Delphi.Personality</Option>
+			<Option Name="ProjectType"></Option>
+			<Option Name="Version">1.0</Option>
+			<Option Name="GUID">{89ABBDEB-A4DB-4045-AE76-0CE8A7CB792A}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource">DataAbstract_IBDACDriver_D10.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A">8</Compiler>
+			<Compiler Name="B">0</Compiler>
+			<Compiler Name="C">1</Compiler>
+			<Compiler Name="D">1</Compiler>
+			<Compiler Name="E">0</Compiler>
+			<Compiler Name="F">0</Compiler>
+			<Compiler Name="G">1</Compiler>
+			<Compiler Name="H">1</Compiler>
+			<Compiler Name="I">1</Compiler>
+			<Compiler Name="J">0</Compiler>
+			<Compiler Name="K">0</Compiler>
+			<Compiler Name="L">1</Compiler>
+			<Compiler Name="M">0</Compiler>
+			<Compiler Name="N">1</Compiler>
+			<Compiler Name="O">1</Compiler>
+			<Compiler Name="P">1</Compiler>
+			<Compiler Name="Q">0</Compiler>
+			<Compiler Name="R">0</Compiler>
+			<Compiler Name="S">0</Compiler>
+			<Compiler Name="T">0</Compiler>
+			<Compiler Name="U">1</Compiler>
+			<Compiler Name="V">1</Compiler>
+			<Compiler Name="W">1</Compiler>
+			<Compiler Name="X">1</Compiler>
+			<Compiler Name="Y">1</Compiler>
+			<Compiler Name="Z">1</Compiler>
+			<Compiler Name="ShowHints">True</Compiler>
+			<Compiler Name="ShowWarnings">True</Compiler>
+			<Compiler Name="UnitAliases"></Compiler>
+			<Compiler Name="NamespacePrefix"></Compiler>
+			<Compiler Name="GenerateDocumentation">False</Compiler>
+			<Compiler Name="DefaultNamespace"></Compiler>
+			<Compiler Name="SymbolDeprecated">False</Compiler>
+			<Compiler Name="SymbolLibrary">False</Compiler>
+			<Compiler Name="SymbolPlatform">False</Compiler>
+			<Compiler Name="SymbolExperimental">True</Compiler>
+			<Compiler Name="UnitLibrary">False</Compiler>
+			<Compiler Name="UnitPlatform">False</Compiler>
+			<Compiler Name="UnitDeprecated">False</Compiler>
+			<Compiler Name="UnitExperimental">True</Compiler>
+			<Compiler Name="HResultCompat">True</Compiler>
+			<Compiler Name="HidingMember">True</Compiler>
+			<Compiler Name="HiddenVirtual">True</Compiler>
+			<Compiler Name="Garbage">True</Compiler>
+			<Compiler Name="BoundsError">True</Compiler>
+			<Compiler Name="ZeroNilCompat">True</Compiler>
+			<Compiler Name="StringConstTruncated">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar">True</Compiler>
+			<Compiler Name="TypedConstVarPar">True</Compiler>
+			<Compiler Name="AsgToTypedConst">True</Compiler>
+			<Compiler Name="CaseLabelRange">True</Compiler>
+			<Compiler Name="ForVariable">True</Compiler>
+			<Compiler Name="ConstructingAbstract">True</Compiler>
+			<Compiler Name="ComparisonFalse">True</Compiler>
+			<Compiler Name="ComparisonTrue">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned">True</Compiler>
+			<Compiler Name="UnsupportedConstruct">True</Compiler>
+			<Compiler Name="FileOpen">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc">True</Compiler>
+			<Compiler Name="BadGlobalSymbol">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor">True</Compiler>
+			<Compiler Name="InvalidDirective">True</Compiler>
+			<Compiler Name="PackageNoLink">True</Compiler>
+			<Compiler Name="PackageThreadVar">True</Compiler>
+			<Compiler Name="ImplicitImport">True</Compiler>
+			<Compiler Name="HPPEMITIgnored">True</Compiler>
+			<Compiler Name="NoRetVal">True</Compiler>
+			<Compiler Name="UseBeforeDef">True</Compiler>
+			<Compiler Name="ForLoopVarUndef">True</Compiler>
+			<Compiler Name="UnitNameMismatch">True</Compiler>
+			<Compiler Name="NoCFGFileFound">True</Compiler>
+			<Compiler Name="MessageDirective">True</Compiler>
+			<Compiler Name="ImplicitVariants">True</Compiler>
+			<Compiler Name="UnicodeToLocale">True</Compiler>
+			<Compiler Name="LocaleToUnicode">True</Compiler>
+			<Compiler Name="ImagebaseMultiple">True</Compiler>
+			<Compiler Name="SuspiciousTypecast">True</Compiler>
+			<Compiler Name="PrivatePropAccessor">True</Compiler>
+			<Compiler Name="UnsafeType">False</Compiler>
+			<Compiler Name="UnsafeCode">False</Compiler>
+			<Compiler Name="UnsafeCast">False</Compiler>
+			<Compiler Name="OptionTruncated">True</Compiler>
+			<Compiler Name="WideCharReduced">True</Compiler>
+			<Compiler Name="DuplicatesIgnored">True</Compiler>
+			<Compiler Name="UnitInitSeq">True</Compiler>
+			<Compiler Name="LocalPInvoke">True</Compiler>
+			<Compiler Name="CodePage"></Compiler>
+		</Compiler>
+		<Linker>
+			<Linker Name="MapFile">0</Linker>
+			<Linker Name="OutputObjs">0</Linker>
+			<Linker Name="ConsoleApp">1</Linker>
+			<Linker Name="DebugInfo">False</Linker>
+			<Linker Name="RemoteSymbols">False</Linker>
+			<Linker Name="GenerateDRC">False</Linker>
+			<Linker Name="MinStackSize">16384</Linker>
+			<Linker Name="MaxStackSize">1048576</Linker>
+			<Linker Name="ImageBase">4194304</Linker>
+			<Linker Name="ExeDescription">RemObjects Data Abstract - CoreLabs IBDAC Driver</Linker>
+			<Linker Name="GenerateHpps">False</Linker>
+		</Linker>
+		<Directories>
+			<Directories Name="OutputDir"></Directories>
+			<Directories Name="UnitOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDLLOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDCPOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="SearchPath">..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10</Directories>
+			<Directories Name="Packages"></Directories>
+			<Directories Name="Conditionals"></Directories>
+			<Directories Name="DebugSourceDirs"></Directories>
+			<Directories Name="UsePackages">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams"></Parameters>
+			<Parameters Name="HostApplication"></Parameters>
+			<Parameters Name="Launcher"></Parameters>
+			<Parameters Name="UseLauncher">False</Parameters>
+			<Parameters Name="DebugCWD"></Parameters>
+			<Parameters Name="RemoteHost"></Parameters>
+			<Parameters Name="RemotePath"></Parameters>
+			<Parameters Name="RemoteLauncher"></Parameters>
+			<Parameters Name="RemoteCWD"></Parameters>
+			<Parameters Name="RemoteDebug">False</Parameters>
+			<Parameters Name="Debug Symbols Search Path"></Parameters>
+			<Parameters Name="LoadAllSymbols">True</Parameters>
+			<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+		</Parameters>
+		<Language>
+			<Language Name="ActiveLang"></Language>
+			<Language Name="ProjectLang">$00000000</Language>
+			<Language Name="RootDir"></Language>
+		</Language>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+			<VersionInfo Name="MajorVer">1</VersionInfo>
+			<VersionInfo Name="MinorVer">0</VersionInfo>
+			<VersionInfo Name="Release">0</VersionInfo>
+			<VersionInfo Name="Build">0</VersionInfo>
+			<VersionInfo Name="Debug">False</VersionInfo>
+			<VersionInfo Name="PreRelease">False</VersionInfo>
+			<VersionInfo Name="Special">False</VersionInfo>
+			<VersionInfo Name="Private">False</VersionInfo>
+			<VersionInfo Name="DLL">False</VersionInfo>
+			<VersionInfo Name="Locale">1033</VersionInfo>
+			<VersionInfo Name="CodePage">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName">RemObjects Data Abstract</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+		</VersionInfoKeys>
+	</Delphi.Personality>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D10.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D10.cfg
new file mode 100644
index 0000000..207b254
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D10.cfg	
@@ -0,0 +1,49 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U+
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N0"..\..\Dcu\D10"
+-LE"..\..\Dcu\D10"
+-LN"..\..\Dcu\D10"
+-U"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-O"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-I"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-R"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D10.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D10.dpk
new file mode 100644
index 0000000..032d677
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D10.dpk	
@@ -0,0 +1,38 @@
+package DataAbstract_MyDACDriver_D10;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - CoreLabs IBDAC Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  IBdac100,
+  RemObjects_Core_D10,
+  DataAbstract_Core_D10;
+
+contains
+  uDAIBDACDriver in 'uDAIBDACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D10.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D10.res
new file mode 100644
index 0000000..6ef0ba1
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D10.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D11.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D11.dpk
new file mode 100644
index 0000000..6cd7bb8
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D11.dpk	
@@ -0,0 +1,38 @@
+package DataAbstract_IBDACDriver_D11;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - CoreLabs IBDAC Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  IBdac105,
+  RemObjects_Core_D11,
+  DataAbstract_Core_D11;
+
+contains
+  uDAIBDACDriver in 'uDAIBDACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D11.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D11.dproj
new file mode 100644
index 0000000..bfcbf1a
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D11.dproj	
@@ -0,0 +1,73 @@
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{0d0e2131-7a05-4241-9ca1-f98aea2eb9d9}</ProjectGuid>
+    <MainSource>DataAbstract_IBDACDriver_D11.dpk</MainSource>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+    <DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_IBDACDriver_D11.bpl</DCC_DependencyCheckOutputName>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DebugInformation>False</DCC_DebugInformation>
+    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+    <DCC_PentiumSafeDivide>True</DCC_PentiumSafeDivide>
+    <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_Define>RELEASE</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_PentiumSafeDivide>True</DCC_PentiumSafeDivide>
+    <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Delphi.Personality</Borland.Personality>
+    <Borland.ProjectType>Package</Borland.ProjectType>
+    <BorlandProject>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">RemObjects Data Abstract - CoreLabs IBDAC Driver</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">RemObjects Data Abstract</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">DataAbstract_IBDACDriver_D11.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
+  <ItemGroup>
+    <DelphiCompile Include="DataAbstract_IBDACDriver_D11.dpk">
+      <MainSource>MainSource</MainSource>
+    </DelphiCompile>
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\DataAbstract_Core_D11.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\IBdac105.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\RemObjects_Core_D11.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\rtl.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\vcl.dcp" />
+    <DCCReference Include="IBdac100.dcp" />
+    <DCCReference Include="uDAIBDACDriver.pas" />
+  </ItemGroup>
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D11.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D11.res
new file mode 100644
index 0000000..6ef0ba1
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D11.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D12.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D12.dpk
new file mode 100644
index 0000000..980ce55
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D12.dpk	
@@ -0,0 +1,38 @@
+package DataAbstract_IBDACDriver_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - CoreLabs IBDAC Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  IBdac12,
+  RemObjects_Core_D12,
+  DataAbstract_Core_D12;
+
+contains
+  uDAIBDACDriver in 'uDAIBDACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D12.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D12.dproj
new file mode 100644
index 0000000..014d532
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D12.dproj	
@@ -0,0 +1,97 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{0d0e2131-7a05-4241-9ca1-f98aea2eb9d9}</ProjectGuid>
+			<MainSource>DataAbstract_IBDACDriver_D12.dpk</MainSource>
+			<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+			<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+			<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_IBDACDriver_D11.bpl</DCC_DependencyCheckOutputName>
+			<ProjectVersion>11.1</ProjectVersion>
+			<Config Condition="'$(Config)'==''">Base</Config>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base)'!=''">
+			<DCC_SymbolReferenceInfo>1</DCC_SymbolReferenceInfo>
+			<DCC_CVT_WCHAR_TO_ACHAR>error</DCC_CVT_WCHAR_TO_ACHAR>
+			<DCC_UnitSearchPath>..;..\..\Dcu\D12;..\..\..\RemObjects SDK for Delphi\Dcu\D12;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+			<DCC_IMPLICIT_STRING_CAST>error</DCC_IMPLICIT_STRING_CAST>
+			<DCC_BplOutput>..\..\Dcu\D12</DCC_BplOutput>
+			<DCC_IMPLICIT_STRING_CAST_LOSS>error</DCC_IMPLICIT_STRING_CAST_LOSS>
+			<DCC_EXPLICIT_STRING_CAST_LOSS>error</DCC_EXPLICIT_STRING_CAST_LOSS>
+			<DCC_CVT_ACHAR_TO_WCHAR>error</DCC_CVT_ACHAR_TO_WCHAR>
+			<DCC_CVT_WIDENING_STRING_LOST>error</DCC_CVT_WIDENING_STRING_LOST>
+			<DCC_EXPLICIT_STRING_CAST>error</DCC_EXPLICIT_STRING_CAST>
+			<DCC_DcuOutput>..\..\Dcu\D12</DCC_DcuOutput>
+			<DCC_CVT_NARROWING_STRING_LOST>error</DCC_CVT_NARROWING_STRING_LOST>
+			<DCC_DcpOutput>..\..\Dcu\D12</DCC_DcpOutput>
+			<GenDll>true</GenDll>
+			<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+			<GenPackage>true</GenPackage>
+			<DCC_GenerateStackFrames>true</DCC_GenerateStackFrames>
+			<DesignOnlyPackage>false</DesignOnlyPackage>
+			<DCC_ImageBase>00400000</DCC_ImageBase>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D12\DataAbstract_IBDACDriver_D12.bpl</DCC_DependencyCheckOutputName>
+			<DCC_PentiumSafeDivide>true</DCC_PentiumSafeDivide>
+			<DCC_Description>RemObjects Data Abstract - CoreLabs IBDAC Driver</DCC_Description>
+		</PropertyGroup>
+		<ItemGroup>
+			<DelphiCompile Include="DataAbstract_IBDACDriver_D12.dpk">
+				<MainSource>MainSource</MainSource>
+			</DelphiCompile>
+			<DCCReference Include="rtl.dcp"/>
+			<DCCReference Include="vcl.dcp"/>
+			<DCCReference Include="IBdac12.dcp"/>
+			<DCCReference Include="RemObjects_Core_D12.dcp"/>
+			<DCCReference Include="DataAbstract_Core_D12.dcp"/>
+			<DCCReference Include="uDAIBDACDriver.pas"/>
+			<BuildConfiguration Include="Base">
+				<Key>Base</Key>
+			</BuildConfiguration>
+		</ItemGroup>
+		<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+		<ProjectExtensions>
+			<Borland.Personality>Delphi.Personality.12</Borland.Personality>
+			<Borland.ProjectType>Package</Borland.ProjectType>
+			<BorlandProject>
+				<Delphi.Personality>
+					<Parameters>
+						<Parameters Name="UseLauncher">False</Parameters>
+						<Parameters Name="LoadAllSymbols">True</Parameters>
+						<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+					</Parameters>
+					<VersionInfo>
+						<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+						<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+						<VersionInfo Name="MajorVer">1</VersionInfo>
+						<VersionInfo Name="MinorVer">0</VersionInfo>
+						<VersionInfo Name="Release">0</VersionInfo>
+						<VersionInfo Name="Build">0</VersionInfo>
+						<VersionInfo Name="Debug">False</VersionInfo>
+						<VersionInfo Name="PreRelease">False</VersionInfo>
+						<VersionInfo Name="Special">False</VersionInfo>
+						<VersionInfo Name="Private">False</VersionInfo>
+						<VersionInfo Name="DLL">False</VersionInfo>
+						<VersionInfo Name="Locale">1033</VersionInfo>
+						<VersionInfo Name="CodePage">1252</VersionInfo>
+					</VersionInfo>
+					<VersionInfoKeys>
+						<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="FileDescription"/>
+						<VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys>
+						<VersionInfoKeys Name="InternalName"/>
+						<VersionInfoKeys Name="LegalCopyright">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="LegalTrademarks">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="OriginalFilename"/>
+						<VersionInfoKeys Name="ProductName">RemObjects Data Abstract</VersionInfoKeys>
+						<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+					</VersionInfoKeys>
+					<Source>
+						<Source Name="MainSource">DataAbstract_IBDACDriver_D12.dpk</Source>
+					</Source>
+				</Delphi.Personality>
+			</BorlandProject>
+			<ProjectFileVersion>12</ProjectFileVersion>
+		</ProjectExtensions>
+	</Project>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D12.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D12.res
new file mode 100644
index 0000000..6ef0ba1
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D12.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D6.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D6.cfg
new file mode 100644
index 0000000..51b688e
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D6.cfg	
@@ -0,0 +1,41 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U+
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D6"
+-LE"..\..\Dcu\D6"
+-LN"..\..\Dcu\D6"
+-U"..\..\Dcu\D6"
+-O"..\..\Dcu\D6"
+-I"..\..\Dcu\D6"
+-R"..\..\Dcu\D6"
+-Z
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D6.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D6.dof
new file mode 100644
index 0000000..0cbf2a3
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D6.dof	
@@ -0,0 +1,76 @@
+[FileVersion]
+Version=6.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=1
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitDeprecated=0
+UnitLibrary=0
+UnitPlatform=0
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects Data Abstract - CoreLabs IBDAC Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D6
+PackageDLLOutputDir=..\..\Dcu\D6
+PackageDCPOutputDir=..\..\Dcu\D6
+SearchPath=..\..\Dcu\D6
+Packages=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=
+FileDescription=
+FileVersion=1.0.0.0
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D6.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D6.dpk
new file mode 100644
index 0000000..6975ec3
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D6.dpk	
@@ -0,0 +1,38 @@
+package DataAbstract_IBDACDriver_D6;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - CoreLabs IBDAC Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  ibdac60,
+  RemObjects_Core_D6,
+  DataAbstract_Core_D6;
+
+contains
+  uDAIBDACDriver in 'uDAIBDACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D6.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D6.res
new file mode 100644
index 0000000..371f8db
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D6.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D7.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D7.cfg
new file mode 100644
index 0000000..4c8862b
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D7.cfg	
@@ -0,0 +1,50 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U+
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D7"
+-LE"..\..\Dcu\D7"
+-LN"..\..\Dcu\D7"
+-U"..\..\Dcu\D7"
+-O"..\..\Dcu\D7"
+-I"..\..\Dcu\D7"
+-R"..\..\Dcu\D7"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D7.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D7.dof
new file mode 100644
index 0000000..f69663d
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D7.dof	
@@ -0,0 +1,116 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=1
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects Data Abstract - CoreLabs IBDAC Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D7
+PackageDLLOutputDir=..\..\Dcu\D7
+PackageDCPOutputDir=..\..\Dcu\D7
+SearchPath=..\..\Dcu\D7
+Packages=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=1.0.0.0
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D7.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D7.dpk
new file mode 100644
index 0000000..3fd2f36
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D7.dpk	
@@ -0,0 +1,38 @@
+package DataAbstract_MyDACDriver_D7;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - CoreLabs IBDAC Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  ibdac70,
+  RemObjects_Core_D7,
+  DataAbstract_Core_D7;
+
+contains
+  uDAIBDACDriver in 'uDAIBDACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D7.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D7.res
new file mode 100644
index 0000000..371f8db
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_D7.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_Glyphs.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_Glyphs.res
new file mode 100644
index 0000000..3497984
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBDACDriver_Glyphs.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D10.bdsproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D10.bdsproj
new file mode 100644
index 0000000..00d9b79
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D10.bdsproj	
@@ -0,0 +1,176 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality">Delphi.Personality</Option>
+			<Option Name="ProjectType"></Option>
+			<Option Name="Version">1.0</Option>
+			<Option Name="GUID">{EECA635C-0BB1-414E-B43A-42F8C5D07E64}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource">DataAbstract_IBODriver_D10.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A">8</Compiler>
+			<Compiler Name="B">0</Compiler>
+			<Compiler Name="C">1</Compiler>
+			<Compiler Name="D">1</Compiler>
+			<Compiler Name="E">0</Compiler>
+			<Compiler Name="F">0</Compiler>
+			<Compiler Name="G">1</Compiler>
+			<Compiler Name="H">1</Compiler>
+			<Compiler Name="I">1</Compiler>
+			<Compiler Name="J">0</Compiler>
+			<Compiler Name="K">0</Compiler>
+			<Compiler Name="L">1</Compiler>
+			<Compiler Name="M">0</Compiler>
+			<Compiler Name="N">1</Compiler>
+			<Compiler Name="O">1</Compiler>
+			<Compiler Name="P">1</Compiler>
+			<Compiler Name="Q">0</Compiler>
+			<Compiler Name="R">0</Compiler>
+			<Compiler Name="S">0</Compiler>
+			<Compiler Name="T">0</Compiler>
+			<Compiler Name="U">0</Compiler>
+			<Compiler Name="V">1</Compiler>
+			<Compiler Name="W">0</Compiler>
+			<Compiler Name="X">1</Compiler>
+			<Compiler Name="Y">1</Compiler>
+			<Compiler Name="Z">1</Compiler>
+			<Compiler Name="ShowHints">True</Compiler>
+			<Compiler Name="ShowWarnings">True</Compiler>
+			<Compiler Name="UnitAliases"></Compiler>
+			<Compiler Name="NamespacePrefix"></Compiler>
+			<Compiler Name="GenerateDocumentation">False</Compiler>
+			<Compiler Name="DefaultNamespace"></Compiler>
+			<Compiler Name="SymbolDeprecated">False</Compiler>
+			<Compiler Name="SymbolLibrary">False</Compiler>
+			<Compiler Name="SymbolPlatform">False</Compiler>
+			<Compiler Name="SymbolExperimental">True</Compiler>
+			<Compiler Name="UnitLibrary">False</Compiler>
+			<Compiler Name="UnitPlatform">False</Compiler>
+			<Compiler Name="UnitDeprecated">False</Compiler>
+			<Compiler Name="UnitExperimental">True</Compiler>
+			<Compiler Name="HResultCompat">True</Compiler>
+			<Compiler Name="HidingMember">True</Compiler>
+			<Compiler Name="HiddenVirtual">True</Compiler>
+			<Compiler Name="Garbage">True</Compiler>
+			<Compiler Name="BoundsError">True</Compiler>
+			<Compiler Name="ZeroNilCompat">True</Compiler>
+			<Compiler Name="StringConstTruncated">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar">True</Compiler>
+			<Compiler Name="TypedConstVarPar">True</Compiler>
+			<Compiler Name="AsgToTypedConst">True</Compiler>
+			<Compiler Name="CaseLabelRange">True</Compiler>
+			<Compiler Name="ForVariable">True</Compiler>
+			<Compiler Name="ConstructingAbstract">True</Compiler>
+			<Compiler Name="ComparisonFalse">True</Compiler>
+			<Compiler Name="ComparisonTrue">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned">True</Compiler>
+			<Compiler Name="UnsupportedConstruct">True</Compiler>
+			<Compiler Name="FileOpen">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc">True</Compiler>
+			<Compiler Name="BadGlobalSymbol">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor">True</Compiler>
+			<Compiler Name="InvalidDirective">True</Compiler>
+			<Compiler Name="PackageNoLink">True</Compiler>
+			<Compiler Name="PackageThreadVar">True</Compiler>
+			<Compiler Name="ImplicitImport">True</Compiler>
+			<Compiler Name="HPPEMITIgnored">True</Compiler>
+			<Compiler Name="NoRetVal">True</Compiler>
+			<Compiler Name="UseBeforeDef">True</Compiler>
+			<Compiler Name="ForLoopVarUndef">True</Compiler>
+			<Compiler Name="UnitNameMismatch">True</Compiler>
+			<Compiler Name="NoCFGFileFound">True</Compiler>
+			<Compiler Name="MessageDirective">True</Compiler>
+			<Compiler Name="ImplicitVariants">True</Compiler>
+			<Compiler Name="UnicodeToLocale">True</Compiler>
+			<Compiler Name="LocaleToUnicode">True</Compiler>
+			<Compiler Name="ImagebaseMultiple">True</Compiler>
+			<Compiler Name="SuspiciousTypecast">True</Compiler>
+			<Compiler Name="PrivatePropAccessor">True</Compiler>
+			<Compiler Name="UnsafeType">False</Compiler>
+			<Compiler Name="UnsafeCode">False</Compiler>
+			<Compiler Name="UnsafeCast">False</Compiler>
+			<Compiler Name="OptionTruncated">True</Compiler>
+			<Compiler Name="WideCharReduced">True</Compiler>
+			<Compiler Name="DuplicatesIgnored">True</Compiler>  <Compiler Name="UnitInitSeq">True</Compiler>
+      <Compiler Name="LocalPInvoke">True</Compiler>
+      <Compiler Name="CodePage"></Compiler>
+    </Compiler>
+		<Linker>
+			<Linker Name="MapFile">0</Linker>
+			<Linker Name="OutputObjs">0</Linker>
+			<Linker Name="ConsoleApp">1</Linker>
+			<Linker Name="DebugInfo">False</Linker>
+			<Linker Name="RemoteSymbols">False</Linker>
+			<Linker Name="GenerateDRC">False</Linker>
+			<Linker Name="MinStackSize">16384</Linker>
+			<Linker Name="MaxStackSize">1048576</Linker>
+			<Linker Name="ImageBase">4194304</Linker>
+			<Linker Name="ExeDescription">RemObjects Data Abstract - InterBase Objects Driver</Linker>  <Linker Name="GenerateHpps">False</Linker>
+    </Linker>
+		<Directories>
+			<Directories Name="OutputDir"></Directories>
+			<Directories Name="UnitOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDLLOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDCPOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="SearchPath">..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10</Directories>
+			<Directories Name="Packages"></Directories>
+			<Directories Name="Conditionals"></Directories>
+			<Directories Name="DebugSourceDirs"></Directories>
+			<Directories Name="UsePackages">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams"></Parameters>
+			<Parameters Name="HostApplication"></Parameters>
+			<Parameters Name="Launcher"></Parameters>
+			<Parameters Name="UseLauncher">False</Parameters>
+			<Parameters Name="DebugCWD"></Parameters>
+			<Parameters Name="RemoteHost"></Parameters>
+			<Parameters Name="RemotePath"></Parameters>
+			<Parameters Name="RemoteLauncher"></Parameters>
+			<Parameters Name="RemoteCWD"></Parameters>
+			<Parameters Name="RemoteDebug">False</Parameters>  <Parameters Name="Debug Symbols Search Path"></Parameters>
+      <Parameters Name="LoadAllSymbols">True</Parameters>
+      <Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+    </Parameters>
+		<Language>
+			<Language Name="ActiveLang"></Language>
+			<Language Name="ProjectLang">$00000000</Language>
+			<Language Name="RootDir"></Language>
+		</Language>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+			<VersionInfo Name="MajorVer">1</VersionInfo>
+			<VersionInfo Name="MinorVer">0</VersionInfo>
+			<VersionInfo Name="Release">0</VersionInfo>
+			<VersionInfo Name="Build">0</VersionInfo>
+			<VersionInfo Name="Debug">False</VersionInfo>
+			<VersionInfo Name="PreRelease">False</VersionInfo>
+			<VersionInfo Name="Special">False</VersionInfo>
+			<VersionInfo Name="Private">False</VersionInfo>
+			<VersionInfo Name="DLL">False</VersionInfo>
+			<VersionInfo Name="Locale">1033</VersionInfo>
+			<VersionInfo Name="CodePage">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName">RemObjects Data Abstract</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+		</VersionInfoKeys>
+	</Delphi.Personality>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D10.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D10.cfg
new file mode 100644
index 0000000..9037d9d
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D10.cfg	
@@ -0,0 +1,49 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N0"..\..\Dcu\D10"
+-LE"..\..\Dcu\D10"
+-LN"..\..\Dcu\D10"
+-U"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-O"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-I"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-R"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D10.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D10.dpk
new file mode 100644
index 0000000..ef0bb3f
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D10.dpk	
@@ -0,0 +1,40 @@
+package DataAbstract_IBODriver_D10;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - InterBase Objects Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D10,
+  IBO40TRT_D10,
+  IBO40XRT_D10;
+  
+contains
+  uDAIBODriver in 'uDAIBODriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D10.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D10.res
new file mode 100644
index 0000000..6ef0ba1
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D10.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D11.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D11.dpk
new file mode 100644
index 0000000..d20f478
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D11.dpk	
@@ -0,0 +1,40 @@
+package DataAbstract_IBODriver_D11;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - InterBase Objects Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D11,
+  IBO40TRT_D2007,
+  IBO40XRT_D2007;
+
+contains
+  uDAIBODriver in 'uDAIBODriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D11.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D11.dproj
new file mode 100644
index 0000000..15f3a0b
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D11.dproj	
@@ -0,0 +1,70 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{8dcafd0d-ab98-4b7e-8b86-36dbc593e504}</ProjectGuid>
+    <MainSource>DataAbstract_IBODriver_D11.dpk</MainSource>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+    <DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_IBODriver_D11.bpl</DCC_DependencyCheckOutputName>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DebugInformation>False</DCC_DebugInformation>
+    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_Define>RELEASE</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Delphi.Personality</Borland.Personality>
+    <Borland.ProjectType>Package</Borland.ProjectType>
+    <BorlandProject>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">RemObjects Data Abstract - InterBase Objects Driver</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">True</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">RemObjects Data Abstract</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">DataAbstract_IBODriver_D11.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
+  <ItemGroup>
+    <DelphiCompile Include="DataAbstract_IBODriver_D11.dpk">
+      <MainSource>MainSource</MainSource>
+    </DelphiCompile>
+    <DCCReference Include="DataAbstract_Core_D11.dcp" />
+    <DCCReference Include="dbrtl.dcp" />
+    <DCCReference Include="IBO40TRT_D2007.dcp" />
+    <DCCReference Include="IBO40XRT_D2007.dcp" />
+    <DCCReference Include="rtl.dcp" />
+    <DCCReference Include="uDAIBODriver.pas" />
+    <DCCReference Include="vcl.dcp" />
+  </ItemGroup>
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D11.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D11.res
new file mode 100644
index 0000000..6ef0ba1
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D11.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D12.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D12.dpk
new file mode 100644
index 0000000..2056b9a
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D12.dpk	
@@ -0,0 +1,40 @@
+package DataAbstract_IBODriver_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - InterBase Objects Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D12,
+  IBO40TRT_D2009,
+  IBO40XRT_D2009;
+
+contains
+  uDAIBODriver in 'uDAIBODriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D12.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D12.dproj
new file mode 100644
index 0000000..f65fa8f
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D12.dproj	
@@ -0,0 +1,96 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{8dcafd0d-ab98-4b7e-8b86-36dbc593e504}</ProjectGuid>
+			<MainSource>DataAbstract_IBODriver_D12.dpk</MainSource>
+			<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+			<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+			<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_IBODriver_D11.bpl</DCC_DependencyCheckOutputName>
+			<ProjectVersion>11.1</ProjectVersion>
+			<Config Condition="'$(Config)'==''">Base</Config>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base)'!=''">
+			<DCC_SymbolReferenceInfo>1</DCC_SymbolReferenceInfo>
+			<DCC_CVT_WCHAR_TO_ACHAR>error</DCC_CVT_WCHAR_TO_ACHAR>
+			<DCC_CVT_WIDENING_STRING_LOST>error</DCC_CVT_WIDENING_STRING_LOST>
+			<DCC_BplOutput>..\..\Dcu\D12</DCC_BplOutput>
+			<DCC_UnitSearchPath>..;..\..\Dcu\D12;..\..\..\RemObjects SDK for Delphi\Dcu\D12;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+			<DCC_EXPLICIT_STRING_CAST>error</DCC_EXPLICIT_STRING_CAST>
+			<DCC_CVT_ACHAR_TO_WCHAR>error</DCC_CVT_ACHAR_TO_WCHAR>
+			<DCC_IMPLICIT_STRING_CAST_LOSS>error</DCC_IMPLICIT_STRING_CAST_LOSS>
+			<DCC_EXPLICIT_STRING_CAST_LOSS>error</DCC_EXPLICIT_STRING_CAST_LOSS>
+			<DCC_IMPLICIT_STRING_CAST>error</DCC_IMPLICIT_STRING_CAST>
+			<DCC_DcuOutput>..\..\Dcu\D12</DCC_DcuOutput>
+			<DCC_CVT_NARROWING_STRING_LOST>error</DCC_CVT_NARROWING_STRING_LOST>
+			<DCC_DcpOutput>..\..\Dcu\D12</DCC_DcpOutput>
+			<GenDll>true</GenDll>
+			<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+			<GenPackage>true</GenPackage>
+			<DesignOnlyPackage>true</DesignOnlyPackage>
+			<DCC_ImageBase>00400000</DCC_ImageBase>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D12\DataAbstract_IBODriver_D12.bpl</DCC_DependencyCheckOutputName>
+			<DCC_Description>RemObjects Data Abstract - InterBase Objects Driver</DCC_Description>
+		</PropertyGroup>
+		<ItemGroup>
+			<DelphiCompile Include="DataAbstract_IBODriver_D12.dpk">
+				<MainSource>MainSource</MainSource>
+			</DelphiCompile>
+			<DCCReference Include="rtl.dcp"/>
+			<DCCReference Include="vcl.dcp"/>
+			<DCCReference Include="dbrtl.dcp"/>
+			<DCCReference Include="DataAbstract_Core_D12.dcp"/>
+			<DCCReference Include="IBO40TRT_D2009.dcp"/>
+			<DCCReference Include="IBO40XRT_D2009.dcp"/>
+			<DCCReference Include="uDAIBODriver.pas"/>
+			<BuildConfiguration Include="Base">
+				<Key>Base</Key>
+			</BuildConfiguration>
+		</ItemGroup>
+		<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+		<ProjectExtensions>
+			<Borland.Personality>Delphi.Personality.12</Borland.Personality>
+			<Borland.ProjectType>Package</Borland.ProjectType>
+			<BorlandProject>
+				<Delphi.Personality>
+					<Parameters>
+						<Parameters Name="UseLauncher">False</Parameters>
+						<Parameters Name="LoadAllSymbols">True</Parameters>
+						<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+					</Parameters>
+					<VersionInfo>
+						<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+						<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+						<VersionInfo Name="MajorVer">1</VersionInfo>
+						<VersionInfo Name="MinorVer">0</VersionInfo>
+						<VersionInfo Name="Release">0</VersionInfo>
+						<VersionInfo Name="Build">0</VersionInfo>
+						<VersionInfo Name="Debug">False</VersionInfo>
+						<VersionInfo Name="PreRelease">False</VersionInfo>
+						<VersionInfo Name="Special">False</VersionInfo>
+						<VersionInfo Name="Private">False</VersionInfo>
+						<VersionInfo Name="DLL">False</VersionInfo>
+						<VersionInfo Name="Locale">1033</VersionInfo>
+						<VersionInfo Name="CodePage">1252</VersionInfo>
+					</VersionInfo>
+					<VersionInfoKeys>
+						<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="FileDescription"/>
+						<VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys>
+						<VersionInfoKeys Name="InternalName"/>
+						<VersionInfoKeys Name="LegalCopyright">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="LegalTrademarks">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="OriginalFilename"/>
+						<VersionInfoKeys Name="ProductName">RemObjects Data Abstract</VersionInfoKeys>
+						<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+					</VersionInfoKeys>
+					<Source>
+						<Source Name="MainSource">DataAbstract_IBODriver_D12.dpk</Source>
+					</Source>
+				</Delphi.Personality>
+			</BorlandProject>
+			<ProjectFileVersion>12</ProjectFileVersion>
+		</ProjectExtensions>
+	</Project>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D12.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D12.res
new file mode 100644
index 0000000..6ef0ba1
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D12.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D6.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D6.cfg
new file mode 100644
index 0000000..05f9ec3
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D6.cfg	
@@ -0,0 +1,41 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D6"
+-LE"..\..\Dcu\D6"
+-LN"..\..\Dcu\D6"
+-U"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-O"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-I"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-R"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-Z
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D6.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D6.dof
new file mode 100644
index 0000000..533614b
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D6.dof	
@@ -0,0 +1,77 @@
+[FileVersion]
+Version=6.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitDeprecated=0
+UnitLibrary=0
+UnitPlatform=0
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=Data Abstract - InterBase Objects Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D6
+PackageDLLOutputDir=..\..\Dcu\D6
+PackageDCPOutputDir=..\..\Dcu\D6
+SearchPath=..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6
+Packages=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software, Inc.
+FileDescription=
+FileVersion=1.0.0.0
+InternalName=
+LegalCopyright=RemObjects Software, Inc.
+LegalTrademarks=RemObjects Software, Inc.
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+Comments=http://www.remobjects.com
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D6.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D6.dpk
new file mode 100644
index 0000000..1238d53
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D6.dpk	
@@ -0,0 +1,40 @@
+package DataAbstract_IBODriver_D6;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - InterBase Objects Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D6,
+  IBO40TRT_D6,
+  IBO40XRT_D6;
+  
+contains
+  uDAIBODriver in 'uDAIBODriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D6.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D6.res
new file mode 100644
index 0000000..b26b84e
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D6.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D7.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D7.cfg
new file mode 100644
index 0000000..6784156
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D7.cfg	
@@ -0,0 +1,50 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D7"
+-LE"..\..\Dcu\D7"
+-LN"..\..\Dcu\D7"
+-U"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-O"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-I"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-R"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D7.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D7.dof
new file mode 100644
index 0000000..b8f8fb1
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D7.dof	
@@ -0,0 +1,117 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects Data Abstract - InterBase Objects Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D7
+PackageDLLOutputDir=..\..\Dcu\D7
+PackageDCPOutputDir=..\..\Dcu\D7
+SearchPath=..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7
+Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;dclOfficeXP;RemObjects_DataSnap_D7;PurposesoftD7;addict3_d6;tb2kComplete_70;CDKDesignTimeSupport;CDKSmp;CDK;ES_CodeSite20;ESDelphiCommandCompiler;ESFileSearch;ESVisualCompositeExpert;EaglWk;ESGraphUtils;ESBase;ESVsCp;ESSampleComposites70;ESSampleCompositeEditors7;Rz252N70;SynEdit_D7;dxsbD7;dxComnD7;dxDockingD7;dxEdtrD7;dxELibD7;dxExELD7;EQGridD7;dxExRwD7;dxDBEdD7;dxInsD7;dxGrEdD7;ECQDBCD7;EQTLD7;EQDBTLD7;dxLayoutControlD7;dxMasterViewD7;dxmdsd7;dxNavBarD7;dxObjInsD7;dxPageControlD7;dxPSCoreD7;Rz252D70;cxPageControlVCLD7;cxEditorsVCLD7;dxThemeD7;cxLibraryVCLD7;cxDataD7;cxGridUtilsVCLD7;cxGridVCLD7;RemObjects_BPDX_D7
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software, Inc.
+FileDescription=
+FileVersion=1.0.0.0
+InternalName=
+LegalCopyright=RemObjects Software, Inc.
+LegalTrademarks=RemObjects Software, Inc.
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+Comments=http://www.remobjects.com
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D7.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D7.dpk
new file mode 100644
index 0000000..d4562dc
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D7.dpk	
@@ -0,0 +1,40 @@
+package DataAbstract_IBODriver_D7;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - InterBase Objects Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D7,
+  IBO40TRT_D7,
+  IBO40XRT_D7;
+
+contains
+  uDAIBODriver in 'uDAIBODriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D7.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D7.res
new file mode 100644
index 0000000..b26b84e
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_D7.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_Glyphs.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_Glyphs.res
new file mode 100644
index 0000000..e4c8f7b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBODriver_Glyphs.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D10.bdsproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D10.bdsproj
new file mode 100644
index 0000000..ba3a5e6
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D10.bdsproj	
@@ -0,0 +1,176 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality">Delphi.Personality</Option>
+			<Option Name="ProjectType"></Option>
+			<Option Name="Version">1.0</Option>
+			<Option Name="GUID">{D0E1436D-9AA9-4616-943B-851DF450E715}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource">DataAbstract_IBXDriver_D10.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A">8</Compiler>
+			<Compiler Name="B">0</Compiler>
+			<Compiler Name="C">1</Compiler>
+			<Compiler Name="D">1</Compiler>
+			<Compiler Name="E">0</Compiler>
+			<Compiler Name="F">0</Compiler>
+			<Compiler Name="G">1</Compiler>
+			<Compiler Name="H">1</Compiler>
+			<Compiler Name="I">1</Compiler>
+			<Compiler Name="J">0</Compiler>
+			<Compiler Name="K">0</Compiler>
+			<Compiler Name="L">1</Compiler>
+			<Compiler Name="M">0</Compiler>
+			<Compiler Name="N">1</Compiler>
+			<Compiler Name="O">1</Compiler>
+			<Compiler Name="P">1</Compiler>
+			<Compiler Name="Q">0</Compiler>
+			<Compiler Name="R">0</Compiler>
+			<Compiler Name="S">0</Compiler>
+			<Compiler Name="T">0</Compiler>
+			<Compiler Name="U">0</Compiler>
+			<Compiler Name="V">1</Compiler>
+			<Compiler Name="W">0</Compiler>
+			<Compiler Name="X">1</Compiler>
+			<Compiler Name="Y">1</Compiler>
+			<Compiler Name="Z">1</Compiler>
+			<Compiler Name="ShowHints">True</Compiler>
+			<Compiler Name="ShowWarnings">True</Compiler>
+			<Compiler Name="UnitAliases"></Compiler>
+			<Compiler Name="NamespacePrefix"></Compiler>
+			<Compiler Name="GenerateDocumentation">False</Compiler>
+			<Compiler Name="DefaultNamespace"></Compiler>
+			<Compiler Name="SymbolDeprecated">False</Compiler>
+			<Compiler Name="SymbolLibrary">False</Compiler>
+			<Compiler Name="SymbolPlatform">False</Compiler>
+			<Compiler Name="SymbolExperimental">True</Compiler>
+			<Compiler Name="UnitLibrary">False</Compiler>
+			<Compiler Name="UnitPlatform">False</Compiler>
+			<Compiler Name="UnitDeprecated">False</Compiler>
+			<Compiler Name="UnitExperimental">True</Compiler>
+			<Compiler Name="HResultCompat">True</Compiler>
+			<Compiler Name="HidingMember">True</Compiler>
+			<Compiler Name="HiddenVirtual">True</Compiler>
+			<Compiler Name="Garbage">True</Compiler>
+			<Compiler Name="BoundsError">True</Compiler>
+			<Compiler Name="ZeroNilCompat">True</Compiler>
+			<Compiler Name="StringConstTruncated">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar">True</Compiler>
+			<Compiler Name="TypedConstVarPar">True</Compiler>
+			<Compiler Name="AsgToTypedConst">True</Compiler>
+			<Compiler Name="CaseLabelRange">True</Compiler>
+			<Compiler Name="ForVariable">True</Compiler>
+			<Compiler Name="ConstructingAbstract">True</Compiler>
+			<Compiler Name="ComparisonFalse">True</Compiler>
+			<Compiler Name="ComparisonTrue">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned">True</Compiler>
+			<Compiler Name="UnsupportedConstruct">True</Compiler>
+			<Compiler Name="FileOpen">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc">True</Compiler>
+			<Compiler Name="BadGlobalSymbol">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor">True</Compiler>
+			<Compiler Name="InvalidDirective">True</Compiler>
+			<Compiler Name="PackageNoLink">True</Compiler>
+			<Compiler Name="PackageThreadVar">True</Compiler>
+			<Compiler Name="ImplicitImport">True</Compiler>
+			<Compiler Name="HPPEMITIgnored">True</Compiler>
+			<Compiler Name="NoRetVal">True</Compiler>
+			<Compiler Name="UseBeforeDef">True</Compiler>
+			<Compiler Name="ForLoopVarUndef">True</Compiler>
+			<Compiler Name="UnitNameMismatch">True</Compiler>
+			<Compiler Name="NoCFGFileFound">True</Compiler>
+			<Compiler Name="MessageDirective">True</Compiler>
+			<Compiler Name="ImplicitVariants">True</Compiler>
+			<Compiler Name="UnicodeToLocale">True</Compiler>
+			<Compiler Name="LocaleToUnicode">True</Compiler>
+			<Compiler Name="ImagebaseMultiple">True</Compiler>
+			<Compiler Name="SuspiciousTypecast">True</Compiler>
+			<Compiler Name="PrivatePropAccessor">True</Compiler>
+			<Compiler Name="UnsafeType">False</Compiler>
+			<Compiler Name="UnsafeCode">False</Compiler>
+			<Compiler Name="UnsafeCast">False</Compiler>
+			<Compiler Name="OptionTruncated">True</Compiler>
+			<Compiler Name="WideCharReduced">True</Compiler>
+			<Compiler Name="DuplicatesIgnored">True</Compiler>  <Compiler Name="UnitInitSeq">True</Compiler>
+      <Compiler Name="LocalPInvoke">True</Compiler>
+      <Compiler Name="CodePage"></Compiler>
+    </Compiler>
+		<Linker>
+			<Linker Name="MapFile">0</Linker>
+			<Linker Name="OutputObjs">0</Linker>
+			<Linker Name="ConsoleApp">1</Linker>
+			<Linker Name="DebugInfo">False</Linker>
+			<Linker Name="RemoteSymbols">False</Linker>
+			<Linker Name="GenerateDRC">False</Linker>
+			<Linker Name="MinStackSize">16384</Linker>
+			<Linker Name="MaxStackSize">1048576</Linker>
+			<Linker Name="ImageBase">4194304</Linker>
+			<Linker Name="ExeDescription">RemObjects Data Abstract - InterBase Express Driver</Linker>  <Linker Name="GenerateHpps">False</Linker>
+    </Linker>
+		<Directories>
+			<Directories Name="OutputDir"></Directories>
+			<Directories Name="UnitOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDLLOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDCPOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="SearchPath">..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10</Directories>
+			<Directories Name="Packages"></Directories>
+			<Directories Name="Conditionals"></Directories>
+			<Directories Name="DebugSourceDirs"></Directories>
+			<Directories Name="UsePackages">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams"></Parameters>
+			<Parameters Name="HostApplication"></Parameters>
+			<Parameters Name="Launcher"></Parameters>
+			<Parameters Name="UseLauncher">False</Parameters>
+			<Parameters Name="DebugCWD"></Parameters>
+			<Parameters Name="RemoteHost"></Parameters>
+			<Parameters Name="RemotePath"></Parameters>
+			<Parameters Name="RemoteLauncher"></Parameters>
+			<Parameters Name="RemoteCWD"></Parameters>
+			<Parameters Name="RemoteDebug">False</Parameters>  <Parameters Name="Debug Symbols Search Path"></Parameters>
+      <Parameters Name="LoadAllSymbols">True</Parameters>
+      <Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+    </Parameters>
+		<Language>
+			<Language Name="ActiveLang"></Language>
+			<Language Name="ProjectLang">$00000000</Language>
+			<Language Name="RootDir"></Language>
+		</Language>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+			<VersionInfo Name="MajorVer">3</VersionInfo>
+			<VersionInfo Name="MinorVer">0</VersionInfo>
+			<VersionInfo Name="Release">1</VersionInfo>
+			<VersionInfo Name="Build">361</VersionInfo>
+			<VersionInfo Name="Debug">False</VersionInfo>
+			<VersionInfo Name="PreRelease">False</VersionInfo>
+			<VersionInfo Name="Special">False</VersionInfo>
+			<VersionInfo Name="Private">False</VersionInfo>
+			<VersionInfo Name="DLL">False</VersionInfo>
+			<VersionInfo Name="Locale">1033</VersionInfo>
+			<VersionInfo Name="CodePage">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+		</VersionInfoKeys>
+	</Delphi.Personality>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D10.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D10.cfg
new file mode 100644
index 0000000..9037d9d
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D10.cfg	
@@ -0,0 +1,49 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N0"..\..\Dcu\D10"
+-LE"..\..\Dcu\D10"
+-LN"..\..\Dcu\D10"
+-U"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-O"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-I"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-R"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D10.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D10.dpk
new file mode 100644
index 0000000..33c10ef
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D10.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_IBXDriver_D10;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - InterBase Express Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D10,
+  ibxpress;
+
+contains
+  uDAIBXDriver in 'uDAIBXDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D10.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D10.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D10.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D11.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D11.dpk
new file mode 100644
index 0000000..f4f4afd
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D11.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_IBXDriver_D11;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - InterBase Express Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D11,
+  ibxpress;
+
+contains
+  uDAIBXDriver in 'uDAIBXDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D11.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D11.dproj
new file mode 100644
index 0000000..812d141
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D11.dproj	
@@ -0,0 +1,68 @@
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{c31471d9-f8e2-4e45-94a7-1264d8011587}</ProjectGuid>
+    <MainSource>DataAbstract_IBXDriver_D11.dpk</MainSource>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+    <DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_IBXDriver_D11.bpl</DCC_DependencyCheckOutputName>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DebugInformation>False</DCC_DebugInformation>
+    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_Define>RELEASE</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Delphi.Personality</Borland.Personality>
+    <Borland.ProjectType>Package</Borland.ProjectType>
+    <BorlandProject>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">RemObjects Data Abstract - InterBase Express Driver</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">True</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">3</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">1</VersionInfo><VersionInfo Name="Build">361</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">DataAbstract_IBXDriver_D11.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
+  <ItemGroup>
+    <DelphiCompile Include="DataAbstract_IBXDriver_D11.dpk">
+      <MainSource>MainSource</MainSource>
+    </DelphiCompile>
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\DataAbstract_Core_D11.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\dbrtl.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\ibxpress.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\rtl.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\vcl.dcp" />
+    <DCCReference Include="uDAIBXDriver.pas" />
+  </ItemGroup>
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D11.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D11.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D11.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D12.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D12.dpk
new file mode 100644
index 0000000..5f919cf
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D12.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_IBXDriver_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - InterBase Express Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D12,
+  ibxpress;
+
+contains
+  uDAIBXDriver in 'uDAIBXDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D12.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D12.dproj
new file mode 100644
index 0000000..fdd0d82
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D12.dproj	
@@ -0,0 +1,102 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{c31471d9-f8e2-4e45-94a7-1264d8011587}</ProjectGuid>
+			<MainSource>DataAbstract_IBXDriver_D12.dpk</MainSource>
+			<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+			<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+			<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_IBXDriver_D11.bpl</DCC_DependencyCheckOutputName>
+			<ProjectVersion>11.1</ProjectVersion>
+			<Config Condition="'$(Config)'==''">Base</Config>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base)'!=''">
+			<DCC_SymbolReferenceInfo>1</DCC_SymbolReferenceInfo>
+			<DCC_CVT_WCHAR_TO_ACHAR>error</DCC_CVT_WCHAR_TO_ACHAR>
+			<DCC_CVT_WIDENING_STRING_LOST>error</DCC_CVT_WIDENING_STRING_LOST>
+			<DCC_BplOutput>..\..\Dcu\D12</DCC_BplOutput>
+			<DCC_UnitSearchPath>..;..\..\Dcu\D12;..\..\..\RemObjects SDK for Delphi\Dcu\D12;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+			<DCC_EXPLICIT_STRING_CAST>error</DCC_EXPLICIT_STRING_CAST>
+			<DCC_CVT_ACHAR_TO_WCHAR>error</DCC_CVT_ACHAR_TO_WCHAR>
+			<DCC_IMPLICIT_STRING_CAST_LOSS>error</DCC_IMPLICIT_STRING_CAST_LOSS>
+			<DCC_EXPLICIT_STRING_CAST_LOSS>error</DCC_EXPLICIT_STRING_CAST_LOSS>
+			<DCC_IMPLICIT_STRING_CAST>error</DCC_IMPLICIT_STRING_CAST>
+			<DCC_DcuOutput>..\..\Dcu\D12</DCC_DcuOutput>
+			<DCC_CVT_NARROWING_STRING_LOST>error</DCC_CVT_NARROWING_STRING_LOST>
+			<DCC_DcpOutput>..\..\Dcu\D12</DCC_DcpOutput>
+			<GenDll>true</GenDll>
+			<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+			<GenPackage>true</GenPackage>
+			<DesignOnlyPackage>true</DesignOnlyPackage>
+			<DCC_ImageBase>00400000</DCC_ImageBase>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D12\DataAbstract_IBXDriver_D12.bpl</DCC_DependencyCheckOutputName>
+			<DCC_Description>RemObjects Data Abstract - InterBase Express Driver</DCC_Description>
+		</PropertyGroup>
+		<ItemGroup>
+			<DelphiCompile Include="DataAbstract_IBXDriver_D12.dpk">
+				<MainSource>MainSource</MainSource>
+			</DelphiCompile>
+			<DCCReference Include="rtl.dcp"/>
+			<DCCReference Include="vcl.dcp"/>
+			<DCCReference Include="dbrtl.dcp"/>
+			<DCCReference Include="DataAbstract_Core_D12.dcp"/>
+			<DCCReference Include="ibxpress.dcp"/>
+			<DCCReference Include="uDAIBXDriver.pas"/>
+			<BuildConfiguration Include="Base">
+				<Key>Base</Key>
+			</BuildConfiguration>
+		</ItemGroup>
+		<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+		<ProjectExtensions>
+			<Borland.Personality>Delphi.Personality.12</Borland.Personality>
+			<Borland.ProjectType>Package</Borland.ProjectType>
+			<BorlandProject>
+				<Delphi.Personality>
+					<Parameters>
+						<Parameters Name="UseLauncher">False</Parameters>
+						<Parameters Name="LoadAllSymbols">True</Parameters>
+						<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+					</Parameters>
+					<VersionInfo>
+						<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+						<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+						<VersionInfo Name="MajorVer">3</VersionInfo>
+						<VersionInfo Name="MinorVer">0</VersionInfo>
+						<VersionInfo Name="Release">1</VersionInfo>
+						<VersionInfo Name="Build">361</VersionInfo>
+						<VersionInfo Name="Debug">False</VersionInfo>
+						<VersionInfo Name="PreRelease">False</VersionInfo>
+						<VersionInfo Name="Special">False</VersionInfo>
+						<VersionInfo Name="Private">False</VersionInfo>
+						<VersionInfo Name="DLL">False</VersionInfo>
+						<VersionInfo Name="Locale">1033</VersionInfo>
+						<VersionInfo Name="CodePage">1252</VersionInfo>
+					</VersionInfo>
+					<VersionInfoKeys>
+						<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="FileDescription"/>
+						<VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys>
+						<VersionInfoKeys Name="InternalName"/>
+						<VersionInfoKeys Name="LegalCopyright"/>
+						<VersionInfoKeys Name="LegalTrademarks"/>
+						<VersionInfoKeys Name="OriginalFilename"/>
+						<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+						<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+					</VersionInfoKeys>
+					<Source>
+						<Source Name="MainSource">DataAbstract_IBXDriver_D12.dpk</Source>
+					</Source>
+					<Excluded_Packages>
+						<Excluded_Packages Name="C:\WINNT\system32\vclimg120.bpl">CodeGear Delphi image support library</Excluded_Packages>
+						<Excluded_Packages Name="$(BDS)\bin\bcboffice2k120.bpl">CodeGear C++Builder Office 2000 Servers Package</Excluded_Packages>
+						<Excluded_Packages Name="$(BDS)\bin\bcbofficexp120.bpl">CodeGear C++Builder Office XP Servers Package</Excluded_Packages>
+						<Excluded_Packages Name="$(BDS)\bin\dcloffice2k120.bpl">Microsoft Office 2000 Sample Automation Server Wrapper Components</Excluded_Packages>
+						<Excluded_Packages Name="$(BDS)\bin\dclofficexp120.bpl">Microsoft Office XP Sample Automation Server Wrapper Components</Excluded_Packages>
+					</Excluded_Packages>
+				</Delphi.Personality>
+			</BorlandProject>
+			<ProjectFileVersion>12</ProjectFileVersion>
+		</ProjectExtensions>
+	</Project>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D12.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D12.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D12.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D6.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D6.cfg
new file mode 100644
index 0000000..05f9ec3
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D6.cfg	
@@ -0,0 +1,41 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D6"
+-LE"..\..\Dcu\D6"
+-LN"..\..\Dcu\D6"
+-U"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-O"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-I"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-R"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-Z
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D6.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D6.dof
new file mode 100644
index 0000000..220d444
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D6.dof	
@@ -0,0 +1,76 @@
+[FileVersion]
+Version=6.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitDeprecated=0
+UnitLibrary=0
+UnitPlatform=0
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=Data Abstract - InterBase Express Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D6
+PackageDLLOutputDir=..\..\Dcu\D6
+PackageDCPOutputDir=..\..\Dcu\D6
+SearchPath=..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6
+Packages=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=2.0.0.138
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D6.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D6.dpk
new file mode 100644
index 0000000..98c5ffa
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D6.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_IBXDriver_D6;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - InterBase Express Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D6,
+  ibxpress;
+
+contains
+  uDAIBXDriver in 'uDAIBXDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D6.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D6.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D6.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D7.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D7.cfg
new file mode 100644
index 0000000..6784156
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D7.cfg	
@@ -0,0 +1,50 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D7"
+-LE"..\..\Dcu\D7"
+-LN"..\..\Dcu\D7"
+-U"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-O"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-I"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-R"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D7.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D7.dof
new file mode 100644
index 0000000..933b8c1
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D7.dof	
@@ -0,0 +1,116 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=Data Abstract - InterBase Express Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D7
+PackageDLLOutputDir=..\..\Dcu\D7
+PackageDCPOutputDir=..\..\Dcu\D7
+SearchPath=..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7
+Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;dclOfficeXP;RemObjects_DataSnap_D7;PurposesoftD7;addict3_d6;tb2kComplete_70;CDKDesignTimeSupport;CDKSmp;CDK;ES_CodeSite20;ESDelphiCommandCompiler;ESFileSearch;ESVisualCompositeExpert;EaglWk;ESGraphUtils;ESBase;ESVsCp;ESSampleComposites70;ESSampleCompositeEditors7;Rz252N70;SynEdit_D7;dxsbD7;dxComnD7;dxDockingD7;dxEdtrD7;dxELibD7;dxExELD7;EQGridD7;dxExRwD7;dxDBEdD7;dxInsD7;dxGrEdD7;ECQDBCD7;EQTLD7;EQDBTLD7;dxLayoutControlD7;dxMasterViewD7;dxmdsd7;dxNavBarD7;dxObjInsD7;dxPageControlD7;dxPSCoreD7;Rz252D70;cxPageControlVCLD7;cxEditorsVCLD7;dxThemeD7;cxLibraryVCLD7;cxDataD7;cxGridUtilsVCLD7;cxGridVCLD7;RemObjects_BPDX_D7
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=2.0.0.142
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D7.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D7.dpk
new file mode 100644
index 0000000..7c15b6b
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D7.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_IBXDriver_D7;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - InterBase Express Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D7,
+  ibxpress;
+
+contains
+  uDAIBXDriver in 'uDAIBXDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D7.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D7.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_D7.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_Glyphs.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_Glyphs.res
new file mode 100644
index 0000000..5d3bf7b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_IBXDriver_Glyphs.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D10.bdsproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D10.bdsproj
new file mode 100644
index 0000000..f023fd3
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D10.bdsproj	
@@ -0,0 +1,176 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality">Delphi.Personality</Option>
+			<Option Name="ProjectType"></Option>
+			<Option Name="Version">1.0</Option>
+			<Option Name="GUID">{89ABBDEB-A4DB-4045-AE76-0CE8A7CB792A}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource">DataAbstract_MyDACDriver_D10.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A">8</Compiler>
+			<Compiler Name="B">0</Compiler>
+			<Compiler Name="C">1</Compiler>
+			<Compiler Name="D">1</Compiler>
+			<Compiler Name="E">0</Compiler>
+			<Compiler Name="F">0</Compiler>
+			<Compiler Name="G">1</Compiler>
+			<Compiler Name="H">1</Compiler>
+			<Compiler Name="I">1</Compiler>
+			<Compiler Name="J">0</Compiler>
+			<Compiler Name="K">0</Compiler>
+			<Compiler Name="L">1</Compiler>
+			<Compiler Name="M">0</Compiler>
+			<Compiler Name="N">1</Compiler>
+			<Compiler Name="O">1</Compiler>
+			<Compiler Name="P">1</Compiler>
+			<Compiler Name="Q">0</Compiler>
+			<Compiler Name="R">0</Compiler>
+			<Compiler Name="S">0</Compiler>
+			<Compiler Name="T">0</Compiler>
+			<Compiler Name="U">1</Compiler>
+			<Compiler Name="V">1</Compiler>
+			<Compiler Name="W">1</Compiler>
+			<Compiler Name="X">1</Compiler>
+			<Compiler Name="Y">1</Compiler>
+			<Compiler Name="Z">1</Compiler>
+			<Compiler Name="ShowHints">True</Compiler>
+			<Compiler Name="ShowWarnings">True</Compiler>
+			<Compiler Name="UnitAliases"></Compiler>
+			<Compiler Name="NamespacePrefix"></Compiler>
+			<Compiler Name="GenerateDocumentation">False</Compiler>
+			<Compiler Name="DefaultNamespace"></Compiler>
+			<Compiler Name="SymbolDeprecated">False</Compiler>
+			<Compiler Name="SymbolLibrary">False</Compiler>
+			<Compiler Name="SymbolPlatform">False</Compiler>
+			<Compiler Name="SymbolExperimental">True</Compiler>
+			<Compiler Name="UnitLibrary">False</Compiler>
+			<Compiler Name="UnitPlatform">False</Compiler>
+			<Compiler Name="UnitDeprecated">False</Compiler>
+			<Compiler Name="UnitExperimental">True</Compiler>
+			<Compiler Name="HResultCompat">True</Compiler>
+			<Compiler Name="HidingMember">True</Compiler>
+			<Compiler Name="HiddenVirtual">True</Compiler>
+			<Compiler Name="Garbage">True</Compiler>
+			<Compiler Name="BoundsError">True</Compiler>
+			<Compiler Name="ZeroNilCompat">True</Compiler>
+			<Compiler Name="StringConstTruncated">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar">True</Compiler>
+			<Compiler Name="TypedConstVarPar">True</Compiler>
+			<Compiler Name="AsgToTypedConst">True</Compiler>
+			<Compiler Name="CaseLabelRange">True</Compiler>
+			<Compiler Name="ForVariable">True</Compiler>
+			<Compiler Name="ConstructingAbstract">True</Compiler>
+			<Compiler Name="ComparisonFalse">True</Compiler>
+			<Compiler Name="ComparisonTrue">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned">True</Compiler>
+			<Compiler Name="UnsupportedConstruct">True</Compiler>
+			<Compiler Name="FileOpen">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc">True</Compiler>
+			<Compiler Name="BadGlobalSymbol">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor">True</Compiler>
+			<Compiler Name="InvalidDirective">True</Compiler>
+			<Compiler Name="PackageNoLink">True</Compiler>
+			<Compiler Name="PackageThreadVar">True</Compiler>
+			<Compiler Name="ImplicitImport">True</Compiler>
+			<Compiler Name="HPPEMITIgnored">True</Compiler>
+			<Compiler Name="NoRetVal">True</Compiler>
+			<Compiler Name="UseBeforeDef">True</Compiler>
+			<Compiler Name="ForLoopVarUndef">True</Compiler>
+			<Compiler Name="UnitNameMismatch">True</Compiler>
+			<Compiler Name="NoCFGFileFound">True</Compiler>
+			<Compiler Name="MessageDirective">True</Compiler>
+			<Compiler Name="ImplicitVariants">True</Compiler>
+			<Compiler Name="UnicodeToLocale">True</Compiler>
+			<Compiler Name="LocaleToUnicode">True</Compiler>
+			<Compiler Name="ImagebaseMultiple">True</Compiler>
+			<Compiler Name="SuspiciousTypecast">True</Compiler>
+			<Compiler Name="PrivatePropAccessor">True</Compiler>
+			<Compiler Name="UnsafeType">False</Compiler>
+			<Compiler Name="UnsafeCode">False</Compiler>
+			<Compiler Name="UnsafeCast">False</Compiler>
+			<Compiler Name="OptionTruncated">True</Compiler>
+			<Compiler Name="WideCharReduced">True</Compiler>
+			<Compiler Name="DuplicatesIgnored">True</Compiler>  <Compiler Name="UnitInitSeq">True</Compiler>
+      <Compiler Name="LocalPInvoke">True</Compiler>
+      <Compiler Name="CodePage"></Compiler>
+    </Compiler>
+		<Linker>
+			<Linker Name="MapFile">0</Linker>
+			<Linker Name="OutputObjs">0</Linker>
+			<Linker Name="ConsoleApp">1</Linker>
+			<Linker Name="DebugInfo">False</Linker>
+			<Linker Name="RemoteSymbols">False</Linker>
+			<Linker Name="GenerateDRC">False</Linker>
+			<Linker Name="MinStackSize">16384</Linker>
+			<Linker Name="MaxStackSize">1048576</Linker>
+			<Linker Name="ImageBase">4194304</Linker>
+			<Linker Name="ExeDescription">RemObjects Data Abstract - CoreLabs MyDAC Driver</Linker>  <Linker Name="GenerateHpps">False</Linker>
+    </Linker>
+		<Directories>
+			<Directories Name="OutputDir"></Directories>
+			<Directories Name="UnitOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDLLOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDCPOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="SearchPath">..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10</Directories>
+			<Directories Name="Packages"></Directories>
+			<Directories Name="Conditionals"></Directories>
+			<Directories Name="DebugSourceDirs"></Directories>
+			<Directories Name="UsePackages">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams"></Parameters>
+			<Parameters Name="HostApplication"></Parameters>
+			<Parameters Name="Launcher"></Parameters>
+			<Parameters Name="UseLauncher">False</Parameters>
+			<Parameters Name="DebugCWD"></Parameters>
+			<Parameters Name="RemoteHost"></Parameters>
+			<Parameters Name="RemotePath"></Parameters>
+			<Parameters Name="RemoteLauncher"></Parameters>
+			<Parameters Name="RemoteCWD"></Parameters>
+			<Parameters Name="RemoteDebug">False</Parameters>  <Parameters Name="Debug Symbols Search Path"></Parameters>
+      <Parameters Name="LoadAllSymbols">True</Parameters>
+      <Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+    </Parameters>
+		<Language>
+			<Language Name="ActiveLang"></Language>
+			<Language Name="ProjectLang">$00000000</Language>
+			<Language Name="RootDir"></Language>
+		</Language>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+			<VersionInfo Name="MajorVer">1</VersionInfo>
+			<VersionInfo Name="MinorVer">0</VersionInfo>
+			<VersionInfo Name="Release">0</VersionInfo>
+			<VersionInfo Name="Build">0</VersionInfo>
+			<VersionInfo Name="Debug">False</VersionInfo>
+			<VersionInfo Name="PreRelease">False</VersionInfo>
+			<VersionInfo Name="Special">False</VersionInfo>
+			<VersionInfo Name="Private">False</VersionInfo>
+			<VersionInfo Name="DLL">False</VersionInfo>
+			<VersionInfo Name="Locale">1033</VersionInfo>
+			<VersionInfo Name="CodePage">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName">RemObjects Data Abstract</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+		</VersionInfoKeys>
+	</Delphi.Personality>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D10.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D10.cfg
new file mode 100644
index 0000000..207b254
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D10.cfg	
@@ -0,0 +1,49 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U+
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N0"..\..\Dcu\D10"
+-LE"..\..\Dcu\D10"
+-LN"..\..\Dcu\D10"
+-U"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-O"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-I"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-R"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D10.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D10.dpk
new file mode 100644
index 0000000..7d302e2
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D10.dpk	
@@ -0,0 +1,41 @@
+package DataAbstract_MyDACDriver_D10;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - CoreLabs MyDAC Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  bdertl,
+  dac100,
+  mydac100,
+  RemObjects_Core_D10,
+  DataAbstract_Core_D10;
+
+contains
+  uDAMyDACDriver in 'uDAMyDACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D10.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D10.res
new file mode 100644
index 0000000..6ef0ba1
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D10.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D11.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D11.dpk
new file mode 100644
index 0000000..9a0e35d
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D11.dpk	
@@ -0,0 +1,41 @@
+package DataAbstract_MyDACDriver_D11;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - CoreLabs MyDAC Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  bdertl,
+  dac105,
+  mydac105,
+  RemObjects_Core_D11,
+  DataAbstract_Core_D11;
+
+contains
+  uDAMyDACDriver in 'uDAMyDACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D11.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D11.dproj
new file mode 100644
index 0000000..dec5987
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D11.dproj	
@@ -0,0 +1,77 @@
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{c13e3848-8048-4b6e-a5c5-b14de1a683a5}</ProjectGuid>
+    <MainSource>DataAbstract_MyDACDriver_D11.dpk</MainSource>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+    <DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_MyDACDriver_D11.bpl</DCC_DependencyCheckOutputName>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DebugInformation>False</DCC_DebugInformation>
+    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+    <DCC_PentiumSafeDivide>True</DCC_PentiumSafeDivide>
+    <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_Define>RELEASE</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_PentiumSafeDivide>True</DCC_PentiumSafeDivide>
+    <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Delphi.Personality</Borland.Personality>
+    <Borland.ProjectType>Package</Borland.ProjectType>
+    <BorlandProject>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">RemObjects Data Abstract - CoreLabs MyDAC Driver</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">RemObjects Data Abstract</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">DataAbstract_MyDACDriver_D11.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
+  <ItemGroup>
+    <DelphiCompile Include="DataAbstract_MyDACDriver_D11.dpk">
+      <MainSource>MainSource</MainSource>
+    </DelphiCompile>
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\bdertl.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\dac105.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\DataAbstract_Core_D11.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\dbrtl.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\mydac105.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\RemObjects_Core_D11.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\rtl.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\vcl.dcp" />
+    <DCCReference Include="dac100.dcp" />
+    <DCCReference Include="mydac100.dcp" />
+    <DCCReference Include="uDAMyDACDriver.pas" />
+  </ItemGroup>
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D11.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D11.res
new file mode 100644
index 0000000..6ef0ba1
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D11.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D12.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D12.dpk
new file mode 100644
index 0000000..7e659ce
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D12.dpk	
@@ -0,0 +1,40 @@
+package DataAbstract_MyDACDriver_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - CoreLabs MyDAC Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  bdertl,
+  dac12,
+  mydac12,
+  DataAbstract_Core_D12;
+
+contains
+  uDAMyDACDriver in 'uDAMyDACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D12.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D12.dproj
new file mode 100644
index 0000000..addf263
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D12.dproj	
@@ -0,0 +1,99 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{c13e3848-8048-4b6e-a5c5-b14de1a683a5}</ProjectGuid>
+			<MainSource>DataAbstract_MyDACDriver_D12.dpk</MainSource>
+			<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+			<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+			<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_MyDACDriver_D11.bpl</DCC_DependencyCheckOutputName>
+			<ProjectVersion>11.1</ProjectVersion>
+			<Config Condition="'$(Config)'==''">Base</Config>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base)'!=''">
+			<DCC_SymbolReferenceInfo>1</DCC_SymbolReferenceInfo>
+			<DCC_CVT_WCHAR_TO_ACHAR>error</DCC_CVT_WCHAR_TO_ACHAR>
+			<DCC_UnitSearchPath>..;..\..\Dcu\D12;..\..\..\RemObjects SDK for Delphi\Dcu\D12;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+			<DCC_IMPLICIT_STRING_CAST>error</DCC_IMPLICIT_STRING_CAST>
+			<DCC_BplOutput>..\..\Dcu\D12</DCC_BplOutput>
+			<DCC_IMPLICIT_STRING_CAST_LOSS>error</DCC_IMPLICIT_STRING_CAST_LOSS>
+			<DCC_EXPLICIT_STRING_CAST_LOSS>error</DCC_EXPLICIT_STRING_CAST_LOSS>
+			<DCC_CVT_ACHAR_TO_WCHAR>error</DCC_CVT_ACHAR_TO_WCHAR>
+			<DCC_CVT_WIDENING_STRING_LOST>error</DCC_CVT_WIDENING_STRING_LOST>
+			<DCC_EXPLICIT_STRING_CAST>error</DCC_EXPLICIT_STRING_CAST>
+			<DCC_DcuOutput>..\..\Dcu\D12</DCC_DcuOutput>
+			<DCC_CVT_NARROWING_STRING_LOST>error</DCC_CVT_NARROWING_STRING_LOST>
+			<DCC_DcpOutput>..\..\Dcu\D12</DCC_DcpOutput>
+			<GenDll>true</GenDll>
+			<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+			<GenPackage>true</GenPackage>
+			<DCC_GenerateStackFrames>true</DCC_GenerateStackFrames>
+			<DesignOnlyPackage>false</DesignOnlyPackage>
+			<DCC_ImageBase>00400000</DCC_ImageBase>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D12\DataAbstract_MyDACDriver_D12.bpl</DCC_DependencyCheckOutputName>
+			<DCC_PentiumSafeDivide>true</DCC_PentiumSafeDivide>
+			<DCC_Description>RemObjects Data Abstract - CoreLabs MyDAC Driver</DCC_Description>
+		</PropertyGroup>
+		<ItemGroup>
+			<DelphiCompile Include="DataAbstract_MyDACDriver_D12.dpk">
+				<MainSource>MainSource</MainSource>
+			</DelphiCompile>
+			<DCCReference Include="rtl.dcp"/>
+			<DCCReference Include="vcl.dcp"/>
+			<DCCReference Include="dbrtl.dcp"/>
+			<DCCReference Include="bdertl.dcp"/>
+			<DCCReference Include="dac12.dcp"/>
+			<DCCReference Include="mydac12.dcp"/>
+			<DCCReference Include="DataAbstract_Core_D12.dcp"/>
+			<DCCReference Include="uDAMyDACDriver.pas"/>
+			<BuildConfiguration Include="Base">
+				<Key>Base</Key>
+			</BuildConfiguration>
+		</ItemGroup>
+		<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+		<ProjectExtensions>
+			<Borland.Personality>Delphi.Personality.12</Borland.Personality>
+			<Borland.ProjectType>Package</Borland.ProjectType>
+			<BorlandProject>
+				<Delphi.Personality>
+					<Parameters>
+						<Parameters Name="UseLauncher">False</Parameters>
+						<Parameters Name="LoadAllSymbols">True</Parameters>
+						<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+					</Parameters>
+					<VersionInfo>
+						<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+						<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+						<VersionInfo Name="MajorVer">1</VersionInfo>
+						<VersionInfo Name="MinorVer">0</VersionInfo>
+						<VersionInfo Name="Release">0</VersionInfo>
+						<VersionInfo Name="Build">0</VersionInfo>
+						<VersionInfo Name="Debug">False</VersionInfo>
+						<VersionInfo Name="PreRelease">False</VersionInfo>
+						<VersionInfo Name="Special">False</VersionInfo>
+						<VersionInfo Name="Private">False</VersionInfo>
+						<VersionInfo Name="DLL">False</VersionInfo>
+						<VersionInfo Name="Locale">1033</VersionInfo>
+						<VersionInfo Name="CodePage">1252</VersionInfo>
+					</VersionInfo>
+					<VersionInfoKeys>
+						<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="FileDescription"/>
+						<VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys>
+						<VersionInfoKeys Name="InternalName"/>
+						<VersionInfoKeys Name="LegalCopyright">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="LegalTrademarks">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="OriginalFilename"/>
+						<VersionInfoKeys Name="ProductName">RemObjects Data Abstract</VersionInfoKeys>
+						<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+					</VersionInfoKeys>
+					<Source>
+						<Source Name="MainSource">DataAbstract_MyDACDriver_D12.dpk</Source>
+					</Source>
+				</Delphi.Personality>
+			</BorlandProject>
+			<ProjectFileVersion>12</ProjectFileVersion>
+		</ProjectExtensions>
+	</Project>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D12.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D12.res
new file mode 100644
index 0000000..6ef0ba1
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D12.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D6.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D6.cfg
new file mode 100644
index 0000000..481e4c1
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D6.cfg	
@@ -0,0 +1,42 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U+
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\dcu\d6"
+-LE"..\..\dcu\d6"
+-LN"..\..\dcu\d6"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_PLATFORM
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D6.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D6.dof
new file mode 100644
index 0000000..468bfc4
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D6.dof	
@@ -0,0 +1,116 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=1
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects Data Abstract - CoreLabs MyDAC Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D6
+PackageDLLOutputDir=..\..\Dcu\D6
+PackageDCPOutputDir=..\..\Dcu\D6
+SearchPath=..\..\Dcu\D6
+Packages=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=1.0.0.0
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D6.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D6.dpk
new file mode 100644
index 0000000..3886fc7
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D6.dpk	
@@ -0,0 +1,41 @@
+package DataAbstract_MYDACDriver_D6;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - CoreLabs MyDAC Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  bdertl,
+  dac60,
+  mydac60,
+  RemObjects_Core_D6,
+  DataAbstract_Core_D6;
+
+contains
+  uDAMyDACDriver in 'uDAMyDACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D6.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D6.res
new file mode 100644
index 0000000..371f8db
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D6.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D7.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D7.cfg
new file mode 100644
index 0000000..6784156
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D7.cfg	
@@ -0,0 +1,50 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D7"
+-LE"..\..\Dcu\D7"
+-LN"..\..\Dcu\D7"
+-U"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-O"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-I"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-R"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D7.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D7.dof
new file mode 100644
index 0000000..d99f972
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D7.dof	
@@ -0,0 +1,116 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=1
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects Data Abstract - CoreLabs MyDAC Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D7
+PackageDLLOutputDir=..\..\Dcu\D7
+PackageDCPOutputDir=..\..\Dcu\D7
+SearchPath=..\..\Dcu\D7
+Packages=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=1.0.0.0
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D7.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D7.dpk
new file mode 100644
index 0000000..a90f1f3
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D7.dpk	
@@ -0,0 +1,41 @@
+package DataAbstract_MyDACDriver_D7;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - CoreLabs MyDAC Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  bdertl,
+  dac70,
+  mydac70,
+  RemObjects_Core_D7,
+  DataAbstract_Core_D7;
+
+contains
+  uDAMyDACDriver in 'uDAMyDACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D7.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D7.res
new file mode 100644
index 0000000..371f8db
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_D7.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_Glyphs.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_Glyphs.res
new file mode 100644
index 0000000..7e28db9
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MyDACDriver_Glyphs.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D10.bdsproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D10.bdsproj
new file mode 100644
index 0000000..98d0a00
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D10.bdsproj	
@@ -0,0 +1,176 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality">Delphi.Personality</Option>
+			<Option Name="ProjectType"></Option>
+			<Option Name="Version">1.0</Option>
+			<Option Name="GUID">{0FC45B58-F519-40B6-831A-DD79C8D3270F}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource">DataAbstract_MySQLDACDriver_D10.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A">8</Compiler>
+			<Compiler Name="B">0</Compiler>
+			<Compiler Name="C">1</Compiler>
+			<Compiler Name="D">1</Compiler>
+			<Compiler Name="E">0</Compiler>
+			<Compiler Name="F">0</Compiler>
+			<Compiler Name="G">1</Compiler>
+			<Compiler Name="H">1</Compiler>
+			<Compiler Name="I">1</Compiler>
+			<Compiler Name="J">0</Compiler>
+			<Compiler Name="K">0</Compiler>
+			<Compiler Name="L">1</Compiler>
+			<Compiler Name="M">0</Compiler>
+			<Compiler Name="N">1</Compiler>
+			<Compiler Name="O">1</Compiler>
+			<Compiler Name="P">1</Compiler>
+			<Compiler Name="Q">0</Compiler>
+			<Compiler Name="R">0</Compiler>
+			<Compiler Name="S">0</Compiler>
+			<Compiler Name="T">0</Compiler>
+			<Compiler Name="U">0</Compiler>
+			<Compiler Name="V">1</Compiler>
+			<Compiler Name="W">0</Compiler>
+			<Compiler Name="X">1</Compiler>
+			<Compiler Name="Y">1</Compiler>
+			<Compiler Name="Z">1</Compiler>
+			<Compiler Name="ShowHints">True</Compiler>
+			<Compiler Name="ShowWarnings">True</Compiler>
+			<Compiler Name="UnitAliases"></Compiler>
+			<Compiler Name="NamespacePrefix"></Compiler>
+			<Compiler Name="GenerateDocumentation">False</Compiler>
+			<Compiler Name="DefaultNamespace"></Compiler>
+			<Compiler Name="SymbolDeprecated">False</Compiler>
+			<Compiler Name="SymbolLibrary">False</Compiler>
+			<Compiler Name="SymbolPlatform">False</Compiler>
+			<Compiler Name="SymbolExperimental">True</Compiler>
+			<Compiler Name="UnitLibrary">False</Compiler>
+			<Compiler Name="UnitPlatform">False</Compiler>
+			<Compiler Name="UnitDeprecated">False</Compiler>
+			<Compiler Name="UnitExperimental">True</Compiler>
+			<Compiler Name="HResultCompat">True</Compiler>
+			<Compiler Name="HidingMember">True</Compiler>
+			<Compiler Name="HiddenVirtual">True</Compiler>
+			<Compiler Name="Garbage">True</Compiler>
+			<Compiler Name="BoundsError">True</Compiler>
+			<Compiler Name="ZeroNilCompat">True</Compiler>
+			<Compiler Name="StringConstTruncated">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar">True</Compiler>
+			<Compiler Name="TypedConstVarPar">True</Compiler>
+			<Compiler Name="AsgToTypedConst">True</Compiler>
+			<Compiler Name="CaseLabelRange">True</Compiler>
+			<Compiler Name="ForVariable">True</Compiler>
+			<Compiler Name="ConstructingAbstract">True</Compiler>
+			<Compiler Name="ComparisonFalse">True</Compiler>
+			<Compiler Name="ComparisonTrue">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned">True</Compiler>
+			<Compiler Name="UnsupportedConstruct">True</Compiler>
+			<Compiler Name="FileOpen">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc">True</Compiler>
+			<Compiler Name="BadGlobalSymbol">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor">True</Compiler>
+			<Compiler Name="InvalidDirective">True</Compiler>
+			<Compiler Name="PackageNoLink">True</Compiler>
+			<Compiler Name="PackageThreadVar">True</Compiler>
+			<Compiler Name="ImplicitImport">True</Compiler>
+			<Compiler Name="HPPEMITIgnored">True</Compiler>
+			<Compiler Name="NoRetVal">True</Compiler>
+			<Compiler Name="UseBeforeDef">True</Compiler>
+			<Compiler Name="ForLoopVarUndef">True</Compiler>
+			<Compiler Name="UnitNameMismatch">True</Compiler>
+			<Compiler Name="NoCFGFileFound">True</Compiler>
+			<Compiler Name="MessageDirective">True</Compiler>
+			<Compiler Name="ImplicitVariants">True</Compiler>
+			<Compiler Name="UnicodeToLocale">True</Compiler>
+			<Compiler Name="LocaleToUnicode">True</Compiler>
+			<Compiler Name="ImagebaseMultiple">True</Compiler>
+			<Compiler Name="SuspiciousTypecast">True</Compiler>
+			<Compiler Name="PrivatePropAccessor">True</Compiler>
+			<Compiler Name="UnsafeType">False</Compiler>
+			<Compiler Name="UnsafeCode">False</Compiler>
+			<Compiler Name="UnsafeCast">False</Compiler>
+			<Compiler Name="OptionTruncated">True</Compiler>
+			<Compiler Name="WideCharReduced">True</Compiler>
+			<Compiler Name="DuplicatesIgnored">True</Compiler>  <Compiler Name="UnitInitSeq">True</Compiler>
+      <Compiler Name="LocalPInvoke">True</Compiler>
+      <Compiler Name="CodePage"></Compiler>
+    </Compiler>
+		<Linker>
+			<Linker Name="MapFile">0</Linker>
+			<Linker Name="OutputObjs">0</Linker>
+			<Linker Name="ConsoleApp">1</Linker>
+			<Linker Name="DebugInfo">False</Linker>
+			<Linker Name="RemoteSymbols">False</Linker>
+			<Linker Name="GenerateDRC">False</Linker>
+			<Linker Name="MinStackSize">16384</Linker>
+			<Linker Name="MaxStackSize">1048576</Linker>
+			<Linker Name="ImageBase">4194304</Linker>
+			<Linker Name="ExeDescription">RemObjects Data Abstract - MicroOlap mySQL Driver</Linker>  <Linker Name="GenerateHpps">False</Linker>
+    </Linker>
+		<Directories>
+			<Directories Name="OutputDir"></Directories>
+			<Directories Name="UnitOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDLLOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDCPOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="SearchPath">..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10</Directories>
+			<Directories Name="Packages"></Directories>
+			<Directories Name="Conditionals"></Directories>
+			<Directories Name="DebugSourceDirs"></Directories>
+			<Directories Name="UsePackages">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams"></Parameters>
+			<Parameters Name="HostApplication"></Parameters>
+			<Parameters Name="Launcher"></Parameters>
+			<Parameters Name="UseLauncher">False</Parameters>
+			<Parameters Name="DebugCWD"></Parameters>
+			<Parameters Name="RemoteHost"></Parameters>
+			<Parameters Name="RemotePath"></Parameters>
+			<Parameters Name="RemoteLauncher"></Parameters>
+			<Parameters Name="RemoteCWD"></Parameters>
+			<Parameters Name="RemoteDebug">False</Parameters>  <Parameters Name="Debug Symbols Search Path"></Parameters>
+      <Parameters Name="LoadAllSymbols">True</Parameters>
+      <Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+    </Parameters>
+		<Language>
+			<Language Name="ActiveLang"></Language>
+			<Language Name="ProjectLang">$00000000</Language>
+			<Language Name="RootDir"></Language>
+		</Language>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+			<VersionInfo Name="MajorVer">3</VersionInfo>
+			<VersionInfo Name="MinorVer">0</VersionInfo>
+			<VersionInfo Name="Release">1</VersionInfo>
+			<VersionInfo Name="Build">361</VersionInfo>
+			<VersionInfo Name="Debug">False</VersionInfo>
+			<VersionInfo Name="PreRelease">False</VersionInfo>
+			<VersionInfo Name="Special">False</VersionInfo>
+			<VersionInfo Name="Private">False</VersionInfo>
+			<VersionInfo Name="DLL">False</VersionInfo>
+			<VersionInfo Name="Locale">1033</VersionInfo>
+			<VersionInfo Name="CodePage">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+		</VersionInfoKeys>
+	</Delphi.Personality>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D10.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D10.dpk
new file mode 100644
index 0000000..835b724
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D10.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_MySQLDACDriver_D10;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - MicroOlap mySQLDac Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D10,
+  mySQLDAC10;
+
+contains
+  uDAMySQLDACDriver in 'uDAMySQLDACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D10.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D10.res
new file mode 100644
index 0000000..7b3c163
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D10.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D11.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D11.dpk
new file mode 100644
index 0000000..55e6cc5
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D11.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_MySQLDACDriver_D11;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - MicroOlap mySQLDac Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D11,
+  mySQLDAC11;
+
+contains
+  uDAMySQLDACDriver in 'uDAMySQLDACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D11.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D11.dproj
new file mode 100644
index 0000000..ebd8da3
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D11.dproj	
@@ -0,0 +1,69 @@
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{8ba781c7-bf1c-49bf-a87d-d21f3a68fd91}</ProjectGuid>
+    <MainSource>DataAbstract_MySQLDACDriver_D11.dpk</MainSource>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+    <DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_MySQLDACDriver_D11.bpl</DCC_DependencyCheckOutputName>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DebugInformation>False</DCC_DebugInformation>
+    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_Define>RELEASE</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Delphi.Personality</Borland.Personality>
+    <Borland.ProjectType>Package</Borland.ProjectType>
+    <BorlandProject>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">RemObjects Data Abstract - MicroOlap mySQLDac Driver</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">True</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">3</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">1</VersionInfo><VersionInfo Name="Build">361</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">DataAbstract_MySQLDACDriver_D11.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
+  <ItemGroup>
+    <DelphiCompile Include="DataAbstract_MySQLDACDriver_D11.dpk">
+      <MainSource>MainSource</MainSource>
+    </DelphiCompile>
+    <DCCReference Include="..\..\..\..\Stardock\Object Desktop\DeskScapes\DataAbstract_Core_D11.dcp" />
+    <DCCReference Include="..\..\..\..\Stardock\Object Desktop\DeskScapes\dbrtl.dcp" />
+    <DCCReference Include="..\..\..\..\Stardock\Object Desktop\DeskScapes\mySQLDAC11.dcp" />
+    <DCCReference Include="..\..\..\..\Stardock\Object Desktop\DeskScapes\rtl.dcp" />
+    <DCCReference Include="..\..\..\..\Stardock\Object Desktop\DeskScapes\vcl.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\mySQLDAC10.dcp" />
+    <DCCReference Include="uDAMySQLDACDriver.pas" />
+  </ItemGroup>
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D11.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D11.res
new file mode 100644
index 0000000..7b3c163
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D11.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D12.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D12.dpk
new file mode 100644
index 0000000..9a3dd0e
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D12.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_MySQLDACDriver_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - MicroOlap mySQLDac Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D12,
+  mySQLDAC12;
+
+contains
+  uDAMySQLDACDriver in 'uDAMySQLDACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D12.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D12.dproj
new file mode 100644
index 0000000..8eec613
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D12.dproj	
@@ -0,0 +1,95 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{8ba781c7-bf1c-49bf-a87d-d21f3a68fd91}</ProjectGuid>
+			<MainSource>DataAbstract_MySQLDACDriver_D12.dpk</MainSource>
+			<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+			<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+			<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_MySQLDACDriver_D11.bpl</DCC_DependencyCheckOutputName>
+			<ProjectVersion>11.1</ProjectVersion>
+			<Config Condition="'$(Config)'==''">Base</Config>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base)'!=''">
+			<DCC_SymbolReferenceInfo>1</DCC_SymbolReferenceInfo>
+			<DCC_CVT_WCHAR_TO_ACHAR>error</DCC_CVT_WCHAR_TO_ACHAR>
+			<DCC_CVT_WIDENING_STRING_LOST>error</DCC_CVT_WIDENING_STRING_LOST>
+			<DCC_BplOutput>..\..\Dcu\D12</DCC_BplOutput>
+			<DCC_UnitSearchPath>..;..\..\Dcu\D12;..\..\..\RemObjects SDK for Delphi\Dcu\D12;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+			<DCC_EXPLICIT_STRING_CAST>error</DCC_EXPLICIT_STRING_CAST>
+			<DCC_CVT_ACHAR_TO_WCHAR>error</DCC_CVT_ACHAR_TO_WCHAR>
+			<DCC_IMPLICIT_STRING_CAST_LOSS>error</DCC_IMPLICIT_STRING_CAST_LOSS>
+			<DCC_EXPLICIT_STRING_CAST_LOSS>error</DCC_EXPLICIT_STRING_CAST_LOSS>
+			<DCC_IMPLICIT_STRING_CAST>error</DCC_IMPLICIT_STRING_CAST>
+			<DCC_DcuOutput>..\..\Dcu\D12</DCC_DcuOutput>
+			<DCC_CVT_NARROWING_STRING_LOST>error</DCC_CVT_NARROWING_STRING_LOST>
+			<DCC_DcpOutput>..\..\Dcu\D12</DCC_DcpOutput>
+			<GenDll>true</GenDll>
+			<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+			<GenPackage>true</GenPackage>
+			<DesignOnlyPackage>true</DesignOnlyPackage>
+			<DCC_ImageBase>00400000</DCC_ImageBase>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D12\DataAbstract_MySQLDACDriver_D12.bpl</DCC_DependencyCheckOutputName>
+			<DCC_Description>RemObjects Data Abstract - MicroOlap mySQLDac Driver</DCC_Description>
+		</PropertyGroup>
+		<ItemGroup>
+			<DelphiCompile Include="DataAbstract_MySQLDACDriver_D12.dpk">
+				<MainSource>MainSource</MainSource>
+			</DelphiCompile>
+			<DCCReference Include="rtl.dcp"/>
+			<DCCReference Include="vcl.dcp"/>
+			<DCCReference Include="dbrtl.dcp"/>
+			<DCCReference Include="DataAbstract_Core_D12.dcp"/>
+			<DCCReference Include="mySQLDAC12.dcp"/>
+			<DCCReference Include="uDAMySQLDACDriver.pas"/>
+			<BuildConfiguration Include="Base">
+				<Key>Base</Key>
+			</BuildConfiguration>
+		</ItemGroup>
+		<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+		<ProjectExtensions>
+			<Borland.Personality>Delphi.Personality.12</Borland.Personality>
+			<Borland.ProjectType>Package</Borland.ProjectType>
+			<BorlandProject>
+				<Delphi.Personality>
+					<Parameters>
+						<Parameters Name="UseLauncher">False</Parameters>
+						<Parameters Name="LoadAllSymbols">True</Parameters>
+						<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+					</Parameters>
+					<VersionInfo>
+						<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+						<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+						<VersionInfo Name="MajorVer">3</VersionInfo>
+						<VersionInfo Name="MinorVer">0</VersionInfo>
+						<VersionInfo Name="Release">1</VersionInfo>
+						<VersionInfo Name="Build">361</VersionInfo>
+						<VersionInfo Name="Debug">False</VersionInfo>
+						<VersionInfo Name="PreRelease">False</VersionInfo>
+						<VersionInfo Name="Special">False</VersionInfo>
+						<VersionInfo Name="Private">False</VersionInfo>
+						<VersionInfo Name="DLL">False</VersionInfo>
+						<VersionInfo Name="Locale">1033</VersionInfo>
+						<VersionInfo Name="CodePage">1252</VersionInfo>
+					</VersionInfo>
+					<VersionInfoKeys>
+						<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="FileDescription"/>
+						<VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys>
+						<VersionInfoKeys Name="InternalName"/>
+						<VersionInfoKeys Name="LegalCopyright"/>
+						<VersionInfoKeys Name="LegalTrademarks"/>
+						<VersionInfoKeys Name="OriginalFilename"/>
+						<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+						<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+					</VersionInfoKeys>
+					<Source>
+						<Source Name="MainSource">DataAbstract_MySQLDACDriver_D12.dpk</Source>
+					</Source>
+				</Delphi.Personality>
+			</BorlandProject>
+			<ProjectFileVersion>12</ProjectFileVersion>
+		</ProjectExtensions>
+	</Project>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D12.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D12.res
new file mode 100644
index 0000000..7b3c163
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D12.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D6.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D6.cfg
new file mode 100644
index 0000000..05f9ec3
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D6.cfg	
@@ -0,0 +1,41 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D6"
+-LE"..\..\Dcu\D6"
+-LN"..\..\Dcu\D6"
+-U"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-O"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-I"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-R"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-Z
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D6.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D6.dof
new file mode 100644
index 0000000..e0035fa
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D6.dof	
@@ -0,0 +1,76 @@
+[FileVersion]
+Version=6.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitDeprecated=0
+UnitLibrary=0
+UnitPlatform=0
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=Data Abstract - ADOExpress/dbGo Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D6
+PackageDLLOutputDir=..\..\Dcu\D6
+PackageDCPOutputDir=..\..\Dcu\D6
+SearchPath=..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6
+Packages=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=2.0.0.138
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D6.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D6.dpk
new file mode 100644
index 0000000..66a1e6c
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D6.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_MySQLDACDriver_D6;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - MicroOlap mySQLDac Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D6,
+  mySQLDAC6;
+
+contains
+  uDAMySQLDACDriver in 'uDAMySQLDACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D6.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D6.res
new file mode 100644
index 0000000..892aed8
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D6.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D7.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D7.cfg
new file mode 100644
index 0000000..6784156
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D7.cfg	
@@ -0,0 +1,50 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D7"
+-LE"..\..\Dcu\D7"
+-LN"..\..\Dcu\D7"
+-U"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-O"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-I"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-R"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D7.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D7.dof
new file mode 100644
index 0000000..f2d0c96
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D7.dof	
@@ -0,0 +1,116 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=Data Abstract - ADOExpress/dbGo Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D7
+PackageDLLOutputDir=..\..\Dcu\D7
+PackageDCPOutputDir=..\..\Dcu\D7
+SearchPath=..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7
+Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;dclOfficeXP;RemObjects_DataSnap_D7;PurposesoftD7;addict3_d6;tb2kComplete_70;CDKDesignTimeSupport;CDKSmp;CDK;ES_CodeSite20;ESDelphiCommandCompiler;ESFileSearch;ESVisualCompositeExpert;EaglWk;ESGraphUtils;ESBase;ESVsCp;ESSampleComposites70;ESSampleCompositeEditors7;Rz252N70;SynEdit_D7;dxsbD7;dxComnD7;dxDockingD7;dxEdtrD7;dxELibD7;dxExELD7;EQGridD7;dxExRwD7;dxDBEdD7;dxInsD7;dxGrEdD7;ECQDBCD7;EQTLD7;EQDBTLD7;dxLayoutControlD7;dxMasterViewD7;dxmdsd7;dxNavBarD7;dxObjInsD7;dxPageControlD7;dxPSCoreD7;Rz252D70;cxPageControlVCLD7;cxEditorsVCLD7;dxThemeD7;cxLibraryVCLD7;cxDataD7;cxGridUtilsVCLD7;cxGridVCLD7;RemObjects_BPDX_D7
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=2.0.0.142
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D7.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D7.dpk
new file mode 100644
index 0000000..994ed6b
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D7.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_MySQLDACDriver_D7;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - MicroOlap mySQLDac Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D7,
+  mySQLDAC7;
+
+contains
+  uDAMySQLDACDriver in 'uDAMySQLDACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D7.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D7.res
new file mode 100644
index 0000000..892aed8
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_D7.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_Glyphs.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_Glyphs.res
new file mode 100644
index 0000000..cd846aa
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_MySQLDACDriver_Glyphs.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D10.bdsproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D10.bdsproj
new file mode 100644
index 0000000..05fd89b
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D10.bdsproj	
@@ -0,0 +1,182 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality">Delphi.Personality</Option>
+			<Option Name="ProjectType"></Option>
+			<Option Name="Version">1.0</Option>
+			<Option Name="GUID">{56F75847-162D-44A5-A3DF-94172EE994EF}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource">DataAbstract_NexusDBDriver_D10.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A">8</Compiler>
+			<Compiler Name="B">0</Compiler>
+			<Compiler Name="C">1</Compiler>
+			<Compiler Name="D">1</Compiler>
+			<Compiler Name="E">0</Compiler>
+			<Compiler Name="F">0</Compiler>
+			<Compiler Name="G">1</Compiler>
+			<Compiler Name="H">1</Compiler>
+			<Compiler Name="I">1</Compiler>
+			<Compiler Name="J">0</Compiler>
+			<Compiler Name="K">0</Compiler>
+			<Compiler Name="L">1</Compiler>
+			<Compiler Name="M">0</Compiler>
+			<Compiler Name="N">1</Compiler>
+			<Compiler Name="O">1</Compiler>
+			<Compiler Name="P">1</Compiler>
+			<Compiler Name="Q">0</Compiler>
+			<Compiler Name="R">0</Compiler>
+			<Compiler Name="S">0</Compiler>
+			<Compiler Name="T">0</Compiler>
+			<Compiler Name="U">0</Compiler>
+			<Compiler Name="V">1</Compiler>
+			<Compiler Name="W">0</Compiler>
+			<Compiler Name="X">1</Compiler>
+			<Compiler Name="Y">1</Compiler>
+			<Compiler Name="Z">1</Compiler>
+			<Compiler Name="ShowHints">True</Compiler>
+			<Compiler Name="ShowWarnings">True</Compiler>
+			<Compiler Name="UnitAliases"></Compiler>
+			<Compiler Name="NamespacePrefix"></Compiler>
+			<Compiler Name="GenerateDocumentation">False</Compiler>
+			<Compiler Name="DefaultNamespace"></Compiler>
+			<Compiler Name="SymbolDeprecated">False</Compiler>
+			<Compiler Name="SymbolLibrary">False</Compiler>
+			<Compiler Name="SymbolPlatform">False</Compiler>
+			<Compiler Name="SymbolExperimental">True</Compiler>
+			<Compiler Name="UnitLibrary">False</Compiler>
+			<Compiler Name="UnitPlatform">False</Compiler>
+			<Compiler Name="UnitDeprecated">False</Compiler>
+			<Compiler Name="UnitExperimental">True</Compiler>
+			<Compiler Name="HResultCompat">True</Compiler>
+			<Compiler Name="HidingMember">True</Compiler>
+			<Compiler Name="HiddenVirtual">True</Compiler>
+			<Compiler Name="Garbage">True</Compiler>
+			<Compiler Name="BoundsError">True</Compiler>
+			<Compiler Name="ZeroNilCompat">True</Compiler>
+			<Compiler Name="StringConstTruncated">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar">True</Compiler>
+			<Compiler Name="TypedConstVarPar">True</Compiler>
+			<Compiler Name="AsgToTypedConst">True</Compiler>
+			<Compiler Name="CaseLabelRange">True</Compiler>
+			<Compiler Name="ForVariable">True</Compiler>
+			<Compiler Name="ConstructingAbstract">True</Compiler>
+			<Compiler Name="ComparisonFalse">True</Compiler>
+			<Compiler Name="ComparisonTrue">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned">True</Compiler>
+			<Compiler Name="UnsupportedConstruct">True</Compiler>
+			<Compiler Name="FileOpen">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc">True</Compiler>
+			<Compiler Name="BadGlobalSymbol">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor">True</Compiler>
+			<Compiler Name="InvalidDirective">True</Compiler>
+			<Compiler Name="PackageNoLink">True</Compiler>
+			<Compiler Name="PackageThreadVar">True</Compiler>
+			<Compiler Name="ImplicitImport">True</Compiler>
+			<Compiler Name="HPPEMITIgnored">True</Compiler>
+			<Compiler Name="NoRetVal">True</Compiler>
+			<Compiler Name="UseBeforeDef">True</Compiler>
+			<Compiler Name="ForLoopVarUndef">True</Compiler>
+			<Compiler Name="UnitNameMismatch">True</Compiler>
+			<Compiler Name="NoCFGFileFound">True</Compiler>
+			<Compiler Name="MessageDirective">True</Compiler>
+			<Compiler Name="ImplicitVariants">True</Compiler>
+			<Compiler Name="UnicodeToLocale">True</Compiler>
+			<Compiler Name="LocaleToUnicode">True</Compiler>
+			<Compiler Name="ImagebaseMultiple">True</Compiler>
+			<Compiler Name="SuspiciousTypecast">True</Compiler>
+			<Compiler Name="PrivatePropAccessor">True</Compiler>
+			<Compiler Name="UnsafeType">False</Compiler>
+			<Compiler Name="UnsafeCode">False</Compiler>
+			<Compiler Name="UnsafeCast">False</Compiler>
+			<Compiler Name="OptionTruncated">True</Compiler>
+			<Compiler Name="WideCharReduced">True</Compiler>
+			<Compiler Name="DuplicatesIgnored">True</Compiler>  <Compiler Name="UnitInitSeq">True</Compiler>
+      <Compiler Name="LocalPInvoke">True</Compiler>
+      <Compiler Name="CodePage"></Compiler>
+    </Compiler>
+		<Linker>
+			<Linker Name="MapFile">0</Linker>
+			<Linker Name="OutputObjs">0</Linker>
+			<Linker Name="ConsoleApp">1</Linker>
+			<Linker Name="DebugInfo">False</Linker>
+			<Linker Name="RemoteSymbols">False</Linker>
+			<Linker Name="GenerateDRC">False</Linker>
+			<Linker Name="MinStackSize">16384</Linker>
+			<Linker Name="MaxStackSize">1048576</Linker>
+			<Linker Name="ImageBase">4194304</Linker>
+			<Linker Name="ExeDescription">Data Abstract - NexusDB Driver</Linker>  <Linker Name="GenerateHpps">False</Linker>
+    </Linker>
+		<Directories>
+			<Directories Name="OutputDir"></Directories>
+			<Directories Name="UnitOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDLLOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDCPOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="SearchPath">..\</Directories>
+			<Directories Name="Packages"></Directories>
+			<Directories Name="Conditionals"></Directories>
+			<Directories Name="DebugSourceDirs"></Directories>
+			<Directories Name="UsePackages">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams"></Parameters>
+			<Parameters Name="HostApplication"></Parameters>
+			<Parameters Name="Launcher"></Parameters>
+			<Parameters Name="UseLauncher">False</Parameters>
+			<Parameters Name="DebugCWD"></Parameters>
+			<Parameters Name="RemoteHost"></Parameters>
+			<Parameters Name="RemotePath"></Parameters>
+			<Parameters Name="RemoteLauncher"></Parameters>
+			<Parameters Name="RemoteCWD"></Parameters>
+			<Parameters Name="RemoteDebug">False</Parameters>  <Parameters Name="Debug Symbols Search Path"></Parameters>
+      <Parameters Name="LoadAllSymbols">True</Parameters>
+      <Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+    </Parameters>
+		<Language>
+			<Language Name="ActiveLang"></Language>
+			<Language Name="ProjectLang">$00000000</Language>
+			<Language Name="RootDir"></Language>
+		</Language>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+			<VersionInfo Name="MajorVer">1</VersionInfo>
+			<VersionInfo Name="MinorVer">0</VersionInfo>
+			<VersionInfo Name="Release">0</VersionInfo>
+			<VersionInfo Name="Build">0</VersionInfo>
+			<VersionInfo Name="Debug">False</VersionInfo>
+			<VersionInfo Name="PreRelease">False</VersionInfo>
+			<VersionInfo Name="Special">False</VersionInfo>
+			<VersionInfo Name="Private">False</VersionInfo>
+			<VersionInfo Name="DLL">False</VersionInfo>
+			<VersionInfo Name="Locale">1033</VersionInfo>
+			<VersionInfo Name="CodePage">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+		</VersionInfoKeys>  
+    
+    <Excluded_Packages>
+      <Excluded_Packages Name="R:\Data Abstract\Dcu\D9\DataAbstract_Core_D9.bpl">RemObjects Data Abstract - Core Library</Excluded_Packages>
+      <Excluded_Packages Name="R:\Data Abstract\Dcu\D9\DataAbstract_IDE_D9.bpl">RemObjects Data Abstract - IDE Package</Excluded_Packages>
+    </Excluded_Packages>
+  </Delphi.Personality>  <StarTeamAssociation></StarTeamAssociation>
+  <StarTeamNonRelativeFiles></StarTeamNonRelativeFiles>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D10.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D10.cfg
new file mode 100644
index 0000000..ab68ed8
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D10.cfg	
@@ -0,0 +1,49 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N0"..\..\Dcu\D10"
+-LE"..\..\Dcu\D10"
+-LN"..\..\Dcu\D10"
+-U"..\"
+-O"..\"
+-I"..\"
+-R"..\"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D10.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D10.dpk
new file mode 100644
index 0000000..5ab0396
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D10.dpk	
@@ -0,0 +1,47 @@
+package DataAbstract_NexusDBDriver_D10;
+
+{$R *.res}
+{$R 'uDANexusDBDriver.dcr'}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'Data Abstract - NexusDB Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  RemObjects_Core_D10,
+  DataAbstract_Core_D10,
+  NexusDB107ll100,
+  NexusDB107sr100,
+  NexusDB107sd100,
+  NexusDB107sq100,
+  NexusDB107re100,
+  NexusDB107st100,
+  NexusDB107tn100,
+  NexusDB107pt100,
+  NexusDB107tw100,
+  NexusDB107db100,
+  NexusDB1071x100;
+
+contains
+  uDANexusDBDriver in 'uDANexusDBDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D10.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D10.res
new file mode 100644
index 0000000..941b7a7
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D10.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D11.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D11.dpk
new file mode 100644
index 0000000..4ffe8e1
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D11.dpk	
@@ -0,0 +1,46 @@
+package DataAbstract_NexusDBDriver_D11;
+
+{$R *.res}
+{$R 'uDANexusDBDriver.dcr'}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'Data Abstract - NexusDB Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  RemObjects_Core_D11,
+  DataAbstract_Core_D11,
+  NexusDB207ll110,
+  NexusDB207se110,
+  NexusDB207sr110,
+  NexusDB207sd110,
+  NexusDB207sq110,
+  NexusDB207re110,
+  NexusDB207pt110,
+  NexusDB207tn110,
+  NexusDB207tw110,
+  NexusDB207db110;
+
+contains
+  uDANexusDBDriver in 'uDANexusDBDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D11.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D11.dproj
new file mode 100644
index 0000000..52343f9
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D11.dproj	
@@ -0,0 +1,102 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{f5368522-8742-4b69-a8b3-668ec242cc52}</ProjectGuid>
+    <MainSource>DataAbstract_NexusDBDriver_D11.dpk</MainSource>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+    <DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_NexusDBDriver_D11.bpl</DCC_DependencyCheckOutputName>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DebugInformation>False</DCC_DebugInformation>
+    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\</DCC_ResourcePath>
+    <DCC_ObjPath>..\</DCC_ObjPath>
+    <DCC_IncludePath>..\</DCC_IncludePath>
+    <DCC_Define>RELEASE</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\</DCC_ResourcePath>
+    <DCC_ObjPath>..\</DCC_ObjPath>
+    <DCC_IncludePath>..\</DCC_IncludePath>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Delphi.Personality</Borland.Personality>
+    <Borland.ProjectType>Package</Borland.ProjectType>
+    <BorlandProject>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">Data Abstract - NexusDB Driver</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      <Excluded_Packages Name="C:\Program Files (x86)\RemObjects Software\Data Abstract for Delphi\Dcu\D11\DataAbstract_MySQLDACDriver_D11.bpl">RemObjects Data Abstract - MicroOlap mySQLDac Driver</Excluded_Packages>
+      <Excluded_Packages Name="$(BDS)\bin\dclbde100.bpl">CodeGear BDE DB Components</Excluded_Packages>
+      <Excluded_Packages Name="$(BDS)\bin\bcboffice2k100.bpl">CodeGear C++Builder Office 2000 Servers Package</Excluded_Packages>
+      <Excluded_Packages Name="$(BDS)\bin\bcbofficexp100.bpl">CodeGear C++Builder Office XP Servers Package</Excluded_Packages>
+      <Excluded_Packages Name="$(BDS)\bin\dcloffice2k100.bpl">Microsoft Office 2000 Sample Automation Server Wrapper Components</Excluded_Packages>
+      <Excluded_Packages Name="$(BDS)\bin\dclofficexp100.bpl">Microsoft Office XP Sample Automation Server Wrapper Components</Excluded_Packages>
+    </Excluded_Packages><Source><Source Name="MainSource">DataAbstract_NexusDBDriver_D11.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
+  <ItemGroup>
+    <DelphiCompile Include="DataAbstract_NexusDBDriver_D11.dpk">
+      <MainSource>MainSource</MainSource>
+    </DelphiCompile>
+    <DCCReference Include="..\..\..\..\Stardock\Object Desktop\DeskScapes\containsuDANexusDBDriverin.dcp" />
+    <DCCReference Include="..\..\..\..\Stardock\Object Desktop\DeskScapes\DataAbstract_Core_D11.dcp" />
+    <DCCReference Include="..\..\..\..\Stardock\Object Desktop\DeskScapes\NexusDB207db110.dcp" />
+    <DCCReference Include="..\..\..\..\Stardock\Object Desktop\DeskScapes\NexusDB207ll110.dcp" />
+    <DCCReference Include="..\..\..\..\Stardock\Object Desktop\DeskScapes\NexusDB207pt110.dcp" />
+    <DCCReference Include="..\..\..\..\Stardock\Object Desktop\DeskScapes\NexusDB207re110.dcp" />
+    <DCCReference Include="..\..\..\..\Stardock\Object Desktop\DeskScapes\NexusDB207sd110.dcp" />
+    <DCCReference Include="..\..\..\..\Stardock\Object Desktop\DeskScapes\NexusDB207se110.dcp" />
+    <DCCReference Include="..\..\..\..\Stardock\Object Desktop\DeskScapes\NexusDB207sq110.dcp" />
+    <DCCReference Include="..\..\..\..\Stardock\Object Desktop\DeskScapes\NexusDB207sr110.dcp" />
+    <DCCReference Include="..\..\..\..\Stardock\Object Desktop\DeskScapes\NexusDB207tn110.dcp" />
+    <DCCReference Include="..\..\..\..\Stardock\Object Desktop\DeskScapes\NexusDB207tw110.dcp" />
+    <DCCReference Include="..\..\..\..\Stardock\Object Desktop\DeskScapes\RemObjects_Core_D11.dcp" />
+    <DCCReference Include="uDANexusDBDriver.dcr" />
+    <DCCReference Include="uDANexusDBDriver.dcr" />
+    <DCCReference Include="uDANexusDBDriver.pas" />
+  </ItemGroup>
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D11.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D11.res
new file mode 100644
index 0000000..941b7a7
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D11.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D12.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D12.dpk
new file mode 100644
index 0000000..7711aae
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D12.dpk	
@@ -0,0 +1,45 @@
+package DataAbstract_NexusDBDriver_D12;
+
+{$R *.res}
+{$R 'uDANexusDBDriver.dcr'}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'Data Abstract - NexusDB Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  DataAbstract_Core_D12,
+  NexusDB207ll120,
+  NexusDB207se120,
+  NexusDB207sr120,
+  NexusDB207sd120,
+  NexusDB207sq120,
+  NexusDB207re120,
+  NexusDB207pt120,
+  NexusDB207tn120,
+  NexusDB207tw120,
+  NexusDB207db120;
+
+contains
+  uDANexusDBDriver in 'uDANexusDBDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D12.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D12.dproj
new file mode 100644
index 0000000..e683a67
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D12.dproj	
@@ -0,0 +1,111 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{f5368522-8742-4b69-a8b3-668ec242cc52}</ProjectGuid>
+			<MainSource>DataAbstract_NexusDBDriver_D12.dpk</MainSource>
+			<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+			<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+			<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_NexusDBDriver_D11.bpl</DCC_DependencyCheckOutputName>
+			<ProjectVersion>11.1</ProjectVersion>
+			<Config Condition="'$(Config)'==''">Base</Config>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base)'!=''">
+			<DCC_SymbolReferenceInfo>1</DCC_SymbolReferenceInfo>
+			<DCC_CVT_WIDENING_STRING_LOST>error</DCC_CVT_WIDENING_STRING_LOST>
+			<DCC_CVT_ACHAR_TO_WCHAR>error</DCC_CVT_ACHAR_TO_WCHAR>
+			<DCC_IMPLICIT_STRING_CAST>error</DCC_IMPLICIT_STRING_CAST>
+			<DCC_IMPLICIT_STRING_CAST_LOSS>error</DCC_IMPLICIT_STRING_CAST_LOSS>
+			<DCC_CVT_WCHAR_TO_ACHAR>error</DCC_CVT_WCHAR_TO_ACHAR>
+			<DCC_EXPLICIT_STRING_CAST>error</DCC_EXPLICIT_STRING_CAST>
+			<DCC_EXPLICIT_STRING_CAST_LOSS>error</DCC_EXPLICIT_STRING_CAST_LOSS>
+			<DCC_CVT_NARROWING_STRING_LOST>error</DCC_CVT_NARROWING_STRING_LOST>
+			<DCC_DcuOutput>..\..\Dcu\D12</DCC_DcuOutput>
+			<DCC_BplOutput>..\..\Dcu\D12</DCC_BplOutput>
+			<DCC_UnitSearchPath>..;..\..\Dcu\D12;..\..\..\RemObjects SDK for Delphi\Dcu\D12;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+			<DCC_DcpOutput>..\..\Dcu\D12</DCC_DcpOutput>
+			<GenDll>true</GenDll>
+			<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+			<GenPackage>true</GenPackage>
+			<DesignOnlyPackage>false</DesignOnlyPackage>
+			<DCC_ImageBase>00400000</DCC_ImageBase>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D12\DataAbstract_NexusDBDriver_D12.bpl</DCC_DependencyCheckOutputName>
+			<DCC_Description>Data Abstract - NexusDB Driver</DCC_Description>
+		</PropertyGroup>
+		<ItemGroup>
+			<DelphiCompile Include="DataAbstract_NexusDBDriver_D12.dpk">
+				<MainSource>MainSource</MainSource>
+			</DelphiCompile>
+			<DCCReference Include="uDANexusDBDriver.dcr"/>
+			<DCCReference Include="DataAbstract_Core_D12.dcp"/>
+			<DCCReference Include="NexusDB207ll120.dcp"/>
+			<DCCReference Include="NexusDB207se120.dcp"/>
+			<DCCReference Include="NexusDB207sr120.dcp"/>
+			<DCCReference Include="NexusDB207sd120.dcp"/>
+			<DCCReference Include="NexusDB207sq120.dcp"/>
+			<DCCReference Include="NexusDB207re120.dcp"/>
+			<DCCReference Include="NexusDB207pt120.dcp"/>
+			<DCCReference Include="NexusDB207tn120.dcp"/>
+			<DCCReference Include="NexusDB207tw120.dcp"/>
+			<DCCReference Include="NexusDB207db120.dcp"/>
+			<DCCReference Include="uDANexusDBDriver.pas"/>
+			<DCCReference Include="uDANexusDBDriver.dcr"/>
+			<BuildConfiguration Include="Base">
+				<Key>Base</Key>
+			</BuildConfiguration>
+		</ItemGroup>
+		<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+		<ProjectExtensions>
+			<Borland.Personality>Delphi.Personality.12</Borland.Personality>
+			<Borland.ProjectType>Package</Borland.ProjectType>
+			<BorlandProject>
+				<Delphi.Personality>
+					<Parameters>
+						<Parameters Name="UseLauncher">False</Parameters>
+						<Parameters Name="LoadAllSymbols">True</Parameters>
+						<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+					</Parameters>
+					<VersionInfo>
+						<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+						<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+						<VersionInfo Name="MajorVer">1</VersionInfo>
+						<VersionInfo Name="MinorVer">0</VersionInfo>
+						<VersionInfo Name="Release">0</VersionInfo>
+						<VersionInfo Name="Build">0</VersionInfo>
+						<VersionInfo Name="Debug">False</VersionInfo>
+						<VersionInfo Name="PreRelease">False</VersionInfo>
+						<VersionInfo Name="Special">False</VersionInfo>
+						<VersionInfo Name="Private">False</VersionInfo>
+						<VersionInfo Name="DLL">False</VersionInfo>
+						<VersionInfo Name="Locale">1033</VersionInfo>
+						<VersionInfo Name="CodePage">1252</VersionInfo>
+					</VersionInfo>
+					<VersionInfoKeys>
+						<VersionInfoKeys Name="CompanyName"/>
+						<VersionInfoKeys Name="FileDescription"/>
+						<VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys>
+						<VersionInfoKeys Name="InternalName"/>
+						<VersionInfoKeys Name="LegalCopyright"/>
+						<VersionInfoKeys Name="LegalTrademarks"/>
+						<VersionInfoKeys Name="OriginalFilename"/>
+						<VersionInfoKeys Name="ProductName"/>
+						<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+					</VersionInfoKeys>
+					<Excluded_Packages>
+						<Excluded_Packages Name="C:\Program Files (x86)\RemObjects Software\Data Abstract for Delphi\Dcu\D11\DataAbstract_MySQLDACDriver_D11.bpl">RemObjects Data Abstract - MicroOlap mySQLDac Driver</Excluded_Packages>
+						<Excluded_Packages Name="$(BDS)\bin\dclbde100.bpl">CodeGear BDE DB Components</Excluded_Packages>
+						<Excluded_Packages Name="$(BDS)\bin\bcboffice2k100.bpl">CodeGear C++Builder Office 2000 Servers Package</Excluded_Packages>
+						<Excluded_Packages Name="$(BDS)\bin\bcbofficexp100.bpl">CodeGear C++Builder Office XP Servers Package</Excluded_Packages>
+						<Excluded_Packages Name="$(BDS)\bin\dcloffice2k100.bpl">Microsoft Office 2000 Sample Automation Server Wrapper Components</Excluded_Packages>
+						<Excluded_Packages Name="$(BDS)\bin\dclofficexp100.bpl">Microsoft Office XP Sample Automation Server Wrapper Components</Excluded_Packages>
+					</Excluded_Packages>
+					<Source>
+						<Source Name="MainSource">DataAbstract_NexusDBDriver_D12.dpk</Source>
+					</Source>
+				</Delphi.Personality>
+			</BorlandProject>
+			<ProjectFileVersion>12</ProjectFileVersion>
+		</ProjectExtensions>
+	</Project>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D12.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D12.res
new file mode 100644
index 0000000..941b7a7
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D12.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D6.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D6.cfg
new file mode 100644
index 0000000..c7cbecf
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D6.cfg	
@@ -0,0 +1,42 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\Dcu\D6"
+-LE"..\Dcu\D6"
+-LN"..\Dcu\D6"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_PLATFORM
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D6.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D6.dof
new file mode 100644
index 0000000..dcd6c63
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D6.dof	
@@ -0,0 +1,116 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=Data Abstract - NexusDB Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\Dcu\D6
+PackageDLLOutputDir=..\Dcu\D6
+PackageDCPOutputDir=..\Dcu\D6
+SearchPath=
+Packages=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=
+FileDescription=
+FileVersion=1.0.0.0
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D6.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D6.dpk
new file mode 100644
index 0000000..f2b9bec
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D6.dpk	
@@ -0,0 +1,44 @@
+package DataAbstract_NexusDBDriver_D6;
+
+{$R *.res}
+{$R 'uDANexusDBDriver.dcr'}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'Data Abstract - NexusDB Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  RemObjects_Core_D6,
+  DataAbstract_Core_D6,
+  NexusDB107st60,
+  NexusDB107pt60,
+  NexusDB107tw60,
+  NexusDB107tn60,
+  NexusDB107re60,
+  NexusDB1071x60,
+  NexusDB107sq60,
+  NexusDB107db60;
+
+contains
+  uDANexusDBDriver in 'uDANexusDBDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D6.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D6.res
new file mode 100644
index 0000000..22eb4e7
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D6.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D7.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D7.cfg
new file mode 100644
index 0000000..d772b58
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D7.cfg	
@@ -0,0 +1,46 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\Dcu\D7"
+-LE"..\Dcu\D7"
+-LN"..\Dcu\D7"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D7.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D7.dof
new file mode 100644
index 0000000..3a86bcb
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D7.dof	
@@ -0,0 +1,116 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=Data Abstract - NexusDB Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\Dcu\D7
+PackageDLLOutputDir=..\Dcu\D7
+PackageDCPOutputDir=..\Dcu\D7
+SearchPath=
+Packages=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=
+FileDescription=
+FileVersion=1.0.0.0
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D7.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D7.dpk
new file mode 100644
index 0000000..66eb10a
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D7.dpk	
@@ -0,0 +1,47 @@
+package DataAbstract_NexusDBDriver_D7;
+
+{$R *.res}
+{$R 'uDANexusDBDriver.dcr'}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'Data Abstract - NexusDB Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  RemObjects_Core_D7,
+  DataAbstract_Core_D7,
+  NexusDB107ll70,
+  NexusDB107sr70,
+  NexusDB107sd70,
+  NexusDB107sq70,
+  NexusDB107re70,
+  NexusDB107st70,
+  NexusDB107tn70,
+  NexusDB107pt70,
+  NexusDB107tw70,
+  NexusDB107db70,
+  NexusDB1071x70;
+
+contains
+  uDANexusDBDriver in 'uDANexusDBDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D7.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D7.res
new file mode 100644
index 0000000..20e9bca
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_NexusDBDriver_D7.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D10.bdsproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D10.bdsproj
new file mode 100644
index 0000000..01bb3ad
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D10.bdsproj	
@@ -0,0 +1,176 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality">Delphi.Personality</Option>
+			<Option Name="ProjectType"></Option>
+			<Option Name="Version">1.0</Option>
+			<Option Name="GUID">{D5CF0E18-5430-44E4-8B68-4D54B5F3535D}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource">DataAbstract_ODACDriver_D10.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A">8</Compiler>
+			<Compiler Name="B">0</Compiler>
+			<Compiler Name="C">1</Compiler>
+			<Compiler Name="D">1</Compiler>
+			<Compiler Name="E">0</Compiler>
+			<Compiler Name="F">0</Compiler>
+			<Compiler Name="G">1</Compiler>
+			<Compiler Name="H">1</Compiler>
+			<Compiler Name="I">1</Compiler>
+			<Compiler Name="J">0</Compiler>
+			<Compiler Name="K">0</Compiler>
+			<Compiler Name="L">1</Compiler>
+			<Compiler Name="M">0</Compiler>
+			<Compiler Name="N">1</Compiler>
+			<Compiler Name="O">1</Compiler>
+			<Compiler Name="P">1</Compiler>
+			<Compiler Name="Q">0</Compiler>
+			<Compiler Name="R">0</Compiler>
+			<Compiler Name="S">0</Compiler>
+			<Compiler Name="T">0</Compiler>
+			<Compiler Name="U">1</Compiler>
+			<Compiler Name="V">1</Compiler>
+			<Compiler Name="W">1</Compiler>
+			<Compiler Name="X">1</Compiler>
+			<Compiler Name="Y">1</Compiler>
+			<Compiler Name="Z">1</Compiler>
+			<Compiler Name="ShowHints">True</Compiler>
+			<Compiler Name="ShowWarnings">True</Compiler>
+			<Compiler Name="UnitAliases"></Compiler>
+			<Compiler Name="NamespacePrefix"></Compiler>
+			<Compiler Name="GenerateDocumentation">False</Compiler>
+			<Compiler Name="DefaultNamespace"></Compiler>
+			<Compiler Name="SymbolDeprecated">False</Compiler>
+			<Compiler Name="SymbolLibrary">False</Compiler>
+			<Compiler Name="SymbolPlatform">False</Compiler>
+			<Compiler Name="SymbolExperimental">True</Compiler>
+			<Compiler Name="UnitLibrary">False</Compiler>
+			<Compiler Name="UnitPlatform">False</Compiler>
+			<Compiler Name="UnitDeprecated">False</Compiler>
+			<Compiler Name="UnitExperimental">True</Compiler>
+			<Compiler Name="HResultCompat">True</Compiler>
+			<Compiler Name="HidingMember">True</Compiler>
+			<Compiler Name="HiddenVirtual">True</Compiler>
+			<Compiler Name="Garbage">True</Compiler>
+			<Compiler Name="BoundsError">True</Compiler>
+			<Compiler Name="ZeroNilCompat">True</Compiler>
+			<Compiler Name="StringConstTruncated">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar">True</Compiler>
+			<Compiler Name="TypedConstVarPar">True</Compiler>
+			<Compiler Name="AsgToTypedConst">True</Compiler>
+			<Compiler Name="CaseLabelRange">True</Compiler>
+			<Compiler Name="ForVariable">True</Compiler>
+			<Compiler Name="ConstructingAbstract">True</Compiler>
+			<Compiler Name="ComparisonFalse">True</Compiler>
+			<Compiler Name="ComparisonTrue">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned">True</Compiler>
+			<Compiler Name="UnsupportedConstruct">True</Compiler>
+			<Compiler Name="FileOpen">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc">True</Compiler>
+			<Compiler Name="BadGlobalSymbol">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor">True</Compiler>
+			<Compiler Name="InvalidDirective">True</Compiler>
+			<Compiler Name="PackageNoLink">True</Compiler>
+			<Compiler Name="PackageThreadVar">True</Compiler>
+			<Compiler Name="ImplicitImport">True</Compiler>
+			<Compiler Name="HPPEMITIgnored">True</Compiler>
+			<Compiler Name="NoRetVal">True</Compiler>
+			<Compiler Name="UseBeforeDef">True</Compiler>
+			<Compiler Name="ForLoopVarUndef">True</Compiler>
+			<Compiler Name="UnitNameMismatch">True</Compiler>
+			<Compiler Name="NoCFGFileFound">True</Compiler>
+			<Compiler Name="MessageDirective">True</Compiler>
+			<Compiler Name="ImplicitVariants">True</Compiler>
+			<Compiler Name="UnicodeToLocale">True</Compiler>
+			<Compiler Name="LocaleToUnicode">True</Compiler>
+			<Compiler Name="ImagebaseMultiple">True</Compiler>
+			<Compiler Name="SuspiciousTypecast">True</Compiler>
+			<Compiler Name="PrivatePropAccessor">True</Compiler>
+			<Compiler Name="UnsafeType">False</Compiler>
+			<Compiler Name="UnsafeCode">False</Compiler>
+			<Compiler Name="UnsafeCast">False</Compiler>
+			<Compiler Name="OptionTruncated">True</Compiler>
+			<Compiler Name="WideCharReduced">True</Compiler>
+			<Compiler Name="DuplicatesIgnored">True</Compiler>  <Compiler Name="UnitInitSeq">True</Compiler>
+      <Compiler Name="LocalPInvoke">True</Compiler>
+      <Compiler Name="CodePage"></Compiler>
+    </Compiler>
+		<Linker>
+			<Linker Name="MapFile">0</Linker>
+			<Linker Name="OutputObjs">0</Linker>
+			<Linker Name="ConsoleApp">1</Linker>
+			<Linker Name="DebugInfo">False</Linker>
+			<Linker Name="RemoteSymbols">False</Linker>
+			<Linker Name="GenerateDRC">False</Linker>
+			<Linker Name="MinStackSize">16384</Linker>
+			<Linker Name="MaxStackSize">1048576</Linker>
+			<Linker Name="ImageBase">4194304</Linker>
+			<Linker Name="ExeDescription">RemObjects Data Abstract - CoreLabs ODAC Driver</Linker>  <Linker Name="GenerateHpps">False</Linker>
+    </Linker>
+		<Directories>
+			<Directories Name="OutputDir"></Directories>
+			<Directories Name="UnitOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDLLOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDCPOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="SearchPath">..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10</Directories>
+			<Directories Name="Packages"></Directories>
+			<Directories Name="Conditionals"></Directories>
+			<Directories Name="DebugSourceDirs"></Directories>
+			<Directories Name="UsePackages">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams"></Parameters>
+			<Parameters Name="HostApplication"></Parameters>
+			<Parameters Name="Launcher"></Parameters>
+			<Parameters Name="UseLauncher">False</Parameters>
+			<Parameters Name="DebugCWD"></Parameters>
+			<Parameters Name="RemoteHost"></Parameters>
+			<Parameters Name="RemotePath"></Parameters>
+			<Parameters Name="RemoteLauncher"></Parameters>
+			<Parameters Name="RemoteCWD"></Parameters>
+			<Parameters Name="RemoteDebug">False</Parameters>  <Parameters Name="Debug Symbols Search Path"></Parameters>
+      <Parameters Name="LoadAllSymbols">True</Parameters>
+      <Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+    </Parameters>
+		<Language>
+			<Language Name="ActiveLang"></Language>
+			<Language Name="ProjectLang">$00000000</Language>
+			<Language Name="RootDir"></Language>
+		</Language>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+			<VersionInfo Name="MajorVer">1</VersionInfo>
+			<VersionInfo Name="MinorVer">0</VersionInfo>
+			<VersionInfo Name="Release">0</VersionInfo>
+			<VersionInfo Name="Build">0</VersionInfo>
+			<VersionInfo Name="Debug">False</VersionInfo>
+			<VersionInfo Name="PreRelease">False</VersionInfo>
+			<VersionInfo Name="Special">False</VersionInfo>
+			<VersionInfo Name="Private">False</VersionInfo>
+			<VersionInfo Name="DLL">False</VersionInfo>
+			<VersionInfo Name="Locale">1033</VersionInfo>
+			<VersionInfo Name="CodePage">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName">RemObjects Data Abstract</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+		</VersionInfoKeys>
+	</Delphi.Personality>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D10.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D10.cfg
new file mode 100644
index 0000000..207b254
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D10.cfg	
@@ -0,0 +1,49 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U+
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N0"..\..\Dcu\D10"
+-LE"..\..\Dcu\D10"
+-LN"..\..\Dcu\D10"
+-U"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-O"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-I"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-R"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D10.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D10.dpk
new file mode 100644
index 0000000..78921ea
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D10.dpk	
@@ -0,0 +1,41 @@
+package DataAbstract_ODACDriver_D10;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - CoreLabs ODAC Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  bdertl,
+  dac100,
+  RemObjects_Core_D10,
+  DataAbstract_Core_D10,
+  odac100;
+
+contains
+  uDAODACDriver in 'uDAODACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D10.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D10.res
new file mode 100644
index 0000000..6ef0ba1
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D10.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D11.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D11.dpk
new file mode 100644
index 0000000..92f4d48
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D11.dpk	
@@ -0,0 +1,41 @@
+package DataAbstract_ODACDriver_D11;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - CoreLabs ODAC Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  bdertl,
+  dac105,
+  RemObjects_Core_D11,
+  DataAbstract_Core_D11,
+  odac105;
+
+contains
+  uDAODACDriver in 'uDAODACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D11.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D11.dproj
new file mode 100644
index 0000000..7d8ed75
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D11.dproj	
@@ -0,0 +1,87 @@
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{4ed86b4c-3296-4ab5-b711-e264774d76b0}</ProjectGuid>
+    <MainSource>DataAbstract_ODACDriver_D11.dpk</MainSource>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+    <DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_ODACDriver_D11.bpl</DCC_DependencyCheckOutputName>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DebugInformation>False</DCC_DebugInformation>
+    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+    <DCC_PentiumSafeDivide>True</DCC_PentiumSafeDivide>
+    <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_Define>RELEASE</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_PentiumSafeDivide>True</DCC_PentiumSafeDivide>
+    <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Delphi.Personality</Borland.Personality>
+    <Borland.ProjectType>Package</Borland.ProjectType>
+    <BorlandProject>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">RemObjects Data Abstract - CoreLabs ODAC Driver</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">RemObjects Data Abstract</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">DataAbstract_ODACDriver_D11.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
+  <ItemGroup>
+    <DelphiCompile Include="DataAbstract_ODACDriver_D11.dpk">
+      <MainSource>MainSource</MainSource>
+    </DelphiCompile>
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\bdertl.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\dac105.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\DataAbstract_Core_D11.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\dbrtl.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\odac105.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\RemObjects_Core_D11.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\rtl.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\vcl.dcp" />
+    <DCCReference Include="bdac105.dcp" />
+    <DCCReference Include="bddac105.dcp" />
+    <DCCReference Include="bdedac105.dcp" />
+    <DCCReference Include="bderdac105.dcp" />
+    <DCCReference Include="bdertdac105.dcp" />
+    <DCCReference Include="bdertldac105.dcp" />
+    <DCCReference Include="brdac105.dcp" />
+    <DCCReference Include="bredac105.dcp" />
+    <DCCReference Include="dac10.dcp" />
+    <DCCReference Include="dac100.dcp" />
+    <DCCReference Include="odac10.dcp" />
+    <DCCReference Include="odac100.dcp" />
+    <DCCReference Include="uDAODACDriver.pas" />
+  </ItemGroup>
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D11.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D11.res
new file mode 100644
index 0000000..6ef0ba1
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D11.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D12.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D12.dpk
new file mode 100644
index 0000000..49a0044
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D12.dpk	
@@ -0,0 +1,40 @@
+package DataAbstract_ODACDriver_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - CoreLabs ODAC Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  bdertl,
+  dac12,
+  DataAbstract_Core_D12,
+  odac12;
+
+contains
+  uDAODACDriver in 'uDAODACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D12.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D12.dproj
new file mode 100644
index 0000000..16668d0
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D12.dproj	
@@ -0,0 +1,99 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{4ed86b4c-3296-4ab5-b711-e264774d76b0}</ProjectGuid>
+			<MainSource>DataAbstract_ODACDriver_D12.dpk</MainSource>
+			<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+			<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+			<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_ODACDriver_D11.bpl</DCC_DependencyCheckOutputName>
+			<ProjectVersion>11.1</ProjectVersion>
+			<Config Condition="'$(Config)'==''">Base</Config>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base)'!=''">
+			<DCC_SymbolReferenceInfo>1</DCC_SymbolReferenceInfo>
+			<DCC_CVT_WCHAR_TO_ACHAR>error</DCC_CVT_WCHAR_TO_ACHAR>
+			<DCC_UnitSearchPath>..;..\..\Dcu\D12;..\..\..\RemObjects SDK for Delphi\Dcu\D12;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+			<DCC_IMPLICIT_STRING_CAST>error</DCC_IMPLICIT_STRING_CAST>
+			<DCC_BplOutput>..\..\Dcu\D12</DCC_BplOutput>
+			<DCC_IMPLICIT_STRING_CAST_LOSS>error</DCC_IMPLICIT_STRING_CAST_LOSS>
+			<DCC_EXPLICIT_STRING_CAST_LOSS>error</DCC_EXPLICIT_STRING_CAST_LOSS>
+			<DCC_CVT_ACHAR_TO_WCHAR>error</DCC_CVT_ACHAR_TO_WCHAR>
+			<DCC_CVT_WIDENING_STRING_LOST>error</DCC_CVT_WIDENING_STRING_LOST>
+			<DCC_EXPLICIT_STRING_CAST>error</DCC_EXPLICIT_STRING_CAST>
+			<DCC_DcuOutput>..\..\Dcu\D12</DCC_DcuOutput>
+			<DCC_CVT_NARROWING_STRING_LOST>error</DCC_CVT_NARROWING_STRING_LOST>
+			<DCC_DcpOutput>..\..\Dcu\D12</DCC_DcpOutput>
+			<GenDll>true</GenDll>
+			<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+			<GenPackage>true</GenPackage>
+			<DCC_GenerateStackFrames>true</DCC_GenerateStackFrames>
+			<DesignOnlyPackage>false</DesignOnlyPackage>
+			<DCC_ImageBase>00400000</DCC_ImageBase>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D12\DataAbstract_ODACDriver_D12.bpl</DCC_DependencyCheckOutputName>
+			<DCC_PentiumSafeDivide>true</DCC_PentiumSafeDivide>
+			<DCC_Description>RemObjects Data Abstract - CoreLabs ODAC Driver</DCC_Description>
+		</PropertyGroup>
+		<ItemGroup>
+			<DelphiCompile Include="DataAbstract_ODACDriver_D12.dpk">
+				<MainSource>MainSource</MainSource>
+			</DelphiCompile>
+			<DCCReference Include="rtl.dcp"/>
+			<DCCReference Include="vcl.dcp"/>
+			<DCCReference Include="dbrtl.dcp"/>
+			<DCCReference Include="bdertl.dcp"/>
+			<DCCReference Include="dac12.dcp"/>
+			<DCCReference Include="DataAbstract_Core_D12.dcp"/>
+			<DCCReference Include="odac12.dcp"/>
+			<DCCReference Include="uDAODACDriver.pas"/>
+			<BuildConfiguration Include="Base">
+				<Key>Base</Key>
+			</BuildConfiguration>
+		</ItemGroup>
+		<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+		<ProjectExtensions>
+			<Borland.Personality>Delphi.Personality.12</Borland.Personality>
+			<Borland.ProjectType>Package</Borland.ProjectType>
+			<BorlandProject>
+				<Delphi.Personality>
+					<Parameters>
+						<Parameters Name="UseLauncher">False</Parameters>
+						<Parameters Name="LoadAllSymbols">True</Parameters>
+						<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+					</Parameters>
+					<VersionInfo>
+						<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+						<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+						<VersionInfo Name="MajorVer">1</VersionInfo>
+						<VersionInfo Name="MinorVer">0</VersionInfo>
+						<VersionInfo Name="Release">0</VersionInfo>
+						<VersionInfo Name="Build">0</VersionInfo>
+						<VersionInfo Name="Debug">False</VersionInfo>
+						<VersionInfo Name="PreRelease">False</VersionInfo>
+						<VersionInfo Name="Special">False</VersionInfo>
+						<VersionInfo Name="Private">False</VersionInfo>
+						<VersionInfo Name="DLL">False</VersionInfo>
+						<VersionInfo Name="Locale">1033</VersionInfo>
+						<VersionInfo Name="CodePage">1252</VersionInfo>
+					</VersionInfo>
+					<VersionInfoKeys>
+						<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="FileDescription"/>
+						<VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys>
+						<VersionInfoKeys Name="InternalName"/>
+						<VersionInfoKeys Name="LegalCopyright">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="LegalTrademarks">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="OriginalFilename"/>
+						<VersionInfoKeys Name="ProductName">RemObjects Data Abstract</VersionInfoKeys>
+						<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+					</VersionInfoKeys>
+					<Source>
+						<Source Name="MainSource">DataAbstract_ODACDriver_D12.dpk</Source>
+					</Source>
+				</Delphi.Personality>
+			</BorlandProject>
+			<ProjectFileVersion>12</ProjectFileVersion>
+		</ProjectExtensions>
+	</Project>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D12.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D12.res
new file mode 100644
index 0000000..6ef0ba1
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D12.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D6.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D6.cfg
new file mode 100644
index 0000000..0aa2cb6
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D6.cfg	
@@ -0,0 +1,41 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U+
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D6"
+-LE"..\..\Dcu\D6"
+-LN"..\..\Dcu\D6"
+-U"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-O"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-I"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-R"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-Z
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D6.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D6.dof
new file mode 100644
index 0000000..e6a8cb6
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D6.dof	
@@ -0,0 +1,77 @@
+[FileVersion]
+Version=6.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=1
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitDeprecated=0
+UnitLibrary=0
+UnitPlatform=0
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=Data Abstract - CoreLabs ODAC Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D6
+PackageDLLOutputDir=..\..\Dcu\D6
+PackageDCPOutputDir=..\..\Dcu\D6
+SearchPath=..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6
+Packages=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software, Inc.
+FileDescription=
+FileVersion=1.0.0.0
+InternalName=
+LegalCopyright=RemObjects Software, Inc.
+LegalTrademarks=RemObjects Software, Inc.
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+Comments=http://www.remobjects.com
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D6.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D6.dpk
new file mode 100644
index 0000000..debd426
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D6.dpk	
@@ -0,0 +1,41 @@
+package DataAbstract_ODACDriver_D6;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - CoreLabs ODAC Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  bdertl,
+  dac60,
+  RemObjects_Core_D6,
+  DataAbstract_Core_D6,
+  odac60;
+
+contains
+  uDAODACDriver in 'uDAODACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D6.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D6.res
new file mode 100644
index 0000000..b26b84e
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D6.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D7.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D7.cfg
new file mode 100644
index 0000000..a290ad9
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D7.cfg	
@@ -0,0 +1,50 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U+
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D7"
+-LE"..\..\Dcu\D7"
+-LN"..\..\Dcu\D7"
+-U"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-O"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-I"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-R"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D7.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D7.dof
new file mode 100644
index 0000000..b6566eb
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D7.dof	
@@ -0,0 +1,117 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=1
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=Data Abstract - CoreLabs ODAC Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D7
+PackageDLLOutputDir=..\..\Dcu\D7
+PackageDCPOutputDir=..\..\Dcu\D7
+SearchPath=..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7
+Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;dclOfficeXP;RemObjects_DataSnap_D7;PurposesoftD7;addict3_d6;tb2kComplete_70;CDKDesignTimeSupport;CDKSmp;CDK;ES_CodeSite20;ESDelphiCommandCompiler;ESFileSearch;ESVisualCompositeExpert;EaglWk;ESGraphUtils;ESBase;ESVsCp;ESSampleComposites70;ESSampleCompositeEditors7;Rz252N70;SynEdit_D7;dxsbD7;dxComnD7;dxDockingD7;dxEdtrD7;dxELibD7;dxExELD7;EQGridD7;dxExRwD7;dxDBEdD7;dxInsD7;dxGrEdD7;ECQDBCD7;EQTLD7;EQDBTLD7;dxLayoutControlD7;dxMasterViewD7;dxmdsd7;dxNavBarD7;dxObjInsD7;dxPageControlD7;dxPSCoreD7;Rz252D70;cxPageControlVCLD7;cxEditorsVCLD7;dxThemeD7;cxLibraryVCLD7;cxDataD7;cxGridUtilsVCLD7;cxGridVCLD7;RemObjects_BPDX_D7
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software, Inc.
+FileDescription=
+FileVersion=1.0.0.0
+InternalName=
+LegalCopyright=RemObjects Software, Inc.
+LegalTrademarks=RemObjects Software, Inc.
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+Comments=http://www.remobjects.com
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D7.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D7.dpk
new file mode 100644
index 0000000..06e9940
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D7.dpk	
@@ -0,0 +1,41 @@
+package DataAbstract_ODACDriver_D7;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - CoreLabs ODAC Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  bdertl,
+  dac70,
+  RemObjects_Core_D7,
+  DataAbstract_Core_D7,
+  odac70;
+
+contains
+  uDAODACDriver in 'uDAODACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D7.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D7.res
new file mode 100644
index 0000000..b26b84e
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_D7.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_Glyphs.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_Glyphs.res
new file mode 100644
index 0000000..5948a0e
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ODACDriver_Glyphs.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D10.bdsproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D10.bdsproj
new file mode 100644
index 0000000..d3a6db6
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D10.bdsproj	
@@ -0,0 +1,176 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality">Delphi.Personality</Option>
+			<Option Name="ProjectType"></Option>
+			<Option Name="Version">1.0</Option>
+			<Option Name="GUID">{0FC45B58-F519-40B6-831A-DD79C8D3270F}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource">DataAbstract_PostgresDACDriver_D10.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A">8</Compiler>
+			<Compiler Name="B">0</Compiler>
+			<Compiler Name="C">1</Compiler>
+			<Compiler Name="D">1</Compiler>
+			<Compiler Name="E">0</Compiler>
+			<Compiler Name="F">0</Compiler>
+			<Compiler Name="G">1</Compiler>
+			<Compiler Name="H">1</Compiler>
+			<Compiler Name="I">1</Compiler>
+			<Compiler Name="J">0</Compiler>
+			<Compiler Name="K">0</Compiler>
+			<Compiler Name="L">1</Compiler>
+			<Compiler Name="M">0</Compiler>
+			<Compiler Name="N">1</Compiler>
+			<Compiler Name="O">1</Compiler>
+			<Compiler Name="P">1</Compiler>
+			<Compiler Name="Q">0</Compiler>
+			<Compiler Name="R">0</Compiler>
+			<Compiler Name="S">0</Compiler>
+			<Compiler Name="T">0</Compiler>
+			<Compiler Name="U">0</Compiler>
+			<Compiler Name="V">1</Compiler>
+			<Compiler Name="W">0</Compiler>
+			<Compiler Name="X">1</Compiler>
+			<Compiler Name="Y">1</Compiler>
+			<Compiler Name="Z">1</Compiler>
+			<Compiler Name="ShowHints">True</Compiler>
+			<Compiler Name="ShowWarnings">True</Compiler>
+			<Compiler Name="UnitAliases"></Compiler>
+			<Compiler Name="NamespacePrefix"></Compiler>
+			<Compiler Name="GenerateDocumentation">False</Compiler>
+			<Compiler Name="DefaultNamespace"></Compiler>
+			<Compiler Name="SymbolDeprecated">False</Compiler>
+			<Compiler Name="SymbolLibrary">False</Compiler>
+			<Compiler Name="SymbolPlatform">False</Compiler>
+			<Compiler Name="SymbolExperimental">True</Compiler>
+			<Compiler Name="UnitLibrary">False</Compiler>
+			<Compiler Name="UnitPlatform">False</Compiler>
+			<Compiler Name="UnitDeprecated">False</Compiler>
+			<Compiler Name="UnitExperimental">True</Compiler>
+			<Compiler Name="HResultCompat">True</Compiler>
+			<Compiler Name="HidingMember">True</Compiler>
+			<Compiler Name="HiddenVirtual">True</Compiler>
+			<Compiler Name="Garbage">True</Compiler>
+			<Compiler Name="BoundsError">True</Compiler>
+			<Compiler Name="ZeroNilCompat">True</Compiler>
+			<Compiler Name="StringConstTruncated">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar">True</Compiler>
+			<Compiler Name="TypedConstVarPar">True</Compiler>
+			<Compiler Name="AsgToTypedConst">True</Compiler>
+			<Compiler Name="CaseLabelRange">True</Compiler>
+			<Compiler Name="ForVariable">True</Compiler>
+			<Compiler Name="ConstructingAbstract">True</Compiler>
+			<Compiler Name="ComparisonFalse">True</Compiler>
+			<Compiler Name="ComparisonTrue">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned">True</Compiler>
+			<Compiler Name="UnsupportedConstruct">True</Compiler>
+			<Compiler Name="FileOpen">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc">True</Compiler>
+			<Compiler Name="BadGlobalSymbol">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor">True</Compiler>
+			<Compiler Name="InvalidDirective">True</Compiler>
+			<Compiler Name="PackageNoLink">True</Compiler>
+			<Compiler Name="PackageThreadVar">True</Compiler>
+			<Compiler Name="ImplicitImport">True</Compiler>
+			<Compiler Name="HPPEMITIgnored">True</Compiler>
+			<Compiler Name="NoRetVal">True</Compiler>
+			<Compiler Name="UseBeforeDef">True</Compiler>
+			<Compiler Name="ForLoopVarUndef">True</Compiler>
+			<Compiler Name="UnitNameMismatch">True</Compiler>
+			<Compiler Name="NoCFGFileFound">True</Compiler>
+			<Compiler Name="MessageDirective">True</Compiler>
+			<Compiler Name="ImplicitVariants">True</Compiler>
+			<Compiler Name="UnicodeToLocale">True</Compiler>
+			<Compiler Name="LocaleToUnicode">True</Compiler>
+			<Compiler Name="ImagebaseMultiple">True</Compiler>
+			<Compiler Name="SuspiciousTypecast">True</Compiler>
+			<Compiler Name="PrivatePropAccessor">True</Compiler>
+			<Compiler Name="UnsafeType">False</Compiler>
+			<Compiler Name="UnsafeCode">False</Compiler>
+			<Compiler Name="UnsafeCast">False</Compiler>
+			<Compiler Name="OptionTruncated">True</Compiler>
+			<Compiler Name="WideCharReduced">True</Compiler>
+			<Compiler Name="DuplicatesIgnored">True</Compiler>  <Compiler Name="UnitInitSeq">True</Compiler>
+      <Compiler Name="LocalPInvoke">True</Compiler>
+      <Compiler Name="CodePage"></Compiler>
+    </Compiler>
+		<Linker>
+			<Linker Name="MapFile">0</Linker>
+			<Linker Name="OutputObjs">0</Linker>
+			<Linker Name="ConsoleApp">1</Linker>
+			<Linker Name="DebugInfo">False</Linker>
+			<Linker Name="RemoteSymbols">False</Linker>
+			<Linker Name="GenerateDRC">False</Linker>
+			<Linker Name="MinStackSize">16384</Linker>
+			<Linker Name="MaxStackSize">1048576</Linker>
+			<Linker Name="ImageBase">4194304</Linker>
+			<Linker Name="ExeDescription">RemObjects Data Abstract - MicroOlap PostgresDAC Driver</Linker>  <Linker Name="GenerateHpps">False</Linker>
+    </Linker>
+		<Directories>
+			<Directories Name="OutputDir"></Directories>
+			<Directories Name="UnitOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDLLOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDCPOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="SearchPath">..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10</Directories>
+			<Directories Name="Packages"></Directories>
+			<Directories Name="Conditionals"></Directories>
+			<Directories Name="DebugSourceDirs"></Directories>
+			<Directories Name="UsePackages">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams"></Parameters>
+			<Parameters Name="HostApplication"></Parameters>
+			<Parameters Name="Launcher"></Parameters>
+			<Parameters Name="UseLauncher">False</Parameters>
+			<Parameters Name="DebugCWD"></Parameters>
+			<Parameters Name="RemoteHost"></Parameters>
+			<Parameters Name="RemotePath"></Parameters>
+			<Parameters Name="RemoteLauncher"></Parameters>
+			<Parameters Name="RemoteCWD"></Parameters>
+			<Parameters Name="RemoteDebug">False</Parameters>  <Parameters Name="Debug Symbols Search Path"></Parameters>
+      <Parameters Name="LoadAllSymbols">True</Parameters>
+      <Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+    </Parameters>
+		<Language>
+			<Language Name="ActiveLang"></Language>
+			<Language Name="ProjectLang">$00000000</Language>
+			<Language Name="RootDir"></Language>
+		</Language>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+			<VersionInfo Name="MajorVer">3</VersionInfo>
+			<VersionInfo Name="MinorVer">0</VersionInfo>
+			<VersionInfo Name="Release">1</VersionInfo>
+			<VersionInfo Name="Build">361</VersionInfo>
+			<VersionInfo Name="Debug">False</VersionInfo>
+			<VersionInfo Name="PreRelease">False</VersionInfo>
+			<VersionInfo Name="Special">False</VersionInfo>
+			<VersionInfo Name="Private">False</VersionInfo>
+			<VersionInfo Name="DLL">False</VersionInfo>
+			<VersionInfo Name="Locale">1033</VersionInfo>
+			<VersionInfo Name="CodePage">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+		</VersionInfoKeys>
+	</Delphi.Personality>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D10.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D10.cfg
new file mode 100644
index 0000000..9037d9d
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D10.cfg	
@@ -0,0 +1,49 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N0"..\..\Dcu\D10"
+-LE"..\..\Dcu\D10"
+-LN"..\..\Dcu\D10"
+-U"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-O"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-I"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-R"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D10.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D10.dpk
new file mode 100644
index 0000000..424def4
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D10.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_PostgresDACDriver_D10;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - MicroOlap PostgresDAC Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D10,
+  PostgresDAC10;
+
+contains
+  uDAPostgresDACDriver in 'uDAPostgresDACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D10.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D10.res
new file mode 100644
index 0000000..7b3c163
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D10.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D11.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D11.dpk
new file mode 100644
index 0000000..14e92ab
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D11.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_PostgresDACDriver_D11;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - MicroOlap PostgresDAC Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D11,
+  PostgresDAC11;
+
+contains
+  uDAPostgresDACDriver in 'uDAPostgresDACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D11.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D11.dproj
new file mode 100644
index 0000000..1233566
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D11.dproj	
@@ -0,0 +1,69 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{777e54de-8166-497d-912a-60af105eb626}</ProjectGuid>
+    <MainSource>DataAbstract_PostgresDACDriver_D11.dpk</MainSource>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+    <DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_PostgresDACDriver_D11.bpl</DCC_DependencyCheckOutputName>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DebugInformation>False</DCC_DebugInformation>
+    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_Define>RELEASE</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Delphi.Personality</Borland.Personality>
+    <Borland.ProjectType>Package</Borland.ProjectType>
+    <BorlandProject>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">RemObjects Data Abstract - MicroOlap PostgresDAC Driver</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">True</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">3</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">1</VersionInfo><VersionInfo Name="Build">361</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">DataAbstract_PostgresDACDriver_D11.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
+  <ItemGroup>
+    <DelphiCompile Include="DataAbstract_PostgresDACDriver_D11.dpk">
+      <MainSource>MainSource</MainSource>
+    </DelphiCompile>
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\DataAbstract_Core_D11.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\dbrtl.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\PostgresDAC11.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\rtl.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\vcl.dcp" />
+    <DCCReference Include="uDAPostgresDACDriver.pas" />
+  </ItemGroup>
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D11.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D11.res
new file mode 100644
index 0000000..7b3c163
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D11.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D12.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D12.dpk
new file mode 100644
index 0000000..162af52
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D12.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_PostgresDACDriver_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - MicroOlap PostgresDAC Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D12,
+  PostgresDAC12;
+
+contains
+  uDAPostgresDACDriver in 'uDAPostgresDACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D12.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D12.dproj
new file mode 100644
index 0000000..cc12094
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D12.dproj	
@@ -0,0 +1,95 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{777e54de-8166-497d-912a-60af105eb626}</ProjectGuid>
+			<MainSource>DataAbstract_PostgresDACDriver_D12.dpk</MainSource>
+			<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+			<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+			<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_PostgresDACDriver_D11.bpl</DCC_DependencyCheckOutputName>
+			<ProjectVersion>11.1</ProjectVersion>
+			<Config Condition="'$(Config)'==''">Base</Config>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base)'!=''">
+			<DCC_SymbolReferenceInfo>1</DCC_SymbolReferenceInfo>
+			<DCC_CVT_WCHAR_TO_ACHAR>error</DCC_CVT_WCHAR_TO_ACHAR>
+			<DCC_CVT_WIDENING_STRING_LOST>error</DCC_CVT_WIDENING_STRING_LOST>
+			<DCC_BplOutput>..\..\Dcu\D12</DCC_BplOutput>
+			<DCC_UnitSearchPath>..;..\..\Dcu\D12;..\..\..\RemObjects SDK for Delphi\Dcu\D12;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+			<DCC_EXPLICIT_STRING_CAST>error</DCC_EXPLICIT_STRING_CAST>
+			<DCC_CVT_ACHAR_TO_WCHAR>error</DCC_CVT_ACHAR_TO_WCHAR>
+			<DCC_IMPLICIT_STRING_CAST_LOSS>error</DCC_IMPLICIT_STRING_CAST_LOSS>
+			<DCC_EXPLICIT_STRING_CAST_LOSS>error</DCC_EXPLICIT_STRING_CAST_LOSS>
+			<DCC_IMPLICIT_STRING_CAST>error</DCC_IMPLICIT_STRING_CAST>
+			<DCC_DcuOutput>..\..\Dcu\D12</DCC_DcuOutput>
+			<DCC_CVT_NARROWING_STRING_LOST>error</DCC_CVT_NARROWING_STRING_LOST>
+			<DCC_DcpOutput>..\..\Dcu\D12</DCC_DcpOutput>
+			<GenDll>true</GenDll>
+			<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+			<GenPackage>true</GenPackage>
+			<DesignOnlyPackage>true</DesignOnlyPackage>
+			<DCC_ImageBase>00400000</DCC_ImageBase>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D12\DataAbstract_PostgresDACDriver_D12.bpl</DCC_DependencyCheckOutputName>
+			<DCC_Description>RemObjects Data Abstract - MicroOlap PostgresDAC Driver</DCC_Description>
+		</PropertyGroup>
+		<ItemGroup>
+			<DelphiCompile Include="DataAbstract_PostgresDACDriver_D12.dpk">
+				<MainSource>MainSource</MainSource>
+			</DelphiCompile>
+			<DCCReference Include="rtl.dcp"/>
+			<DCCReference Include="vcl.dcp"/>
+			<DCCReference Include="dbrtl.dcp"/>
+			<DCCReference Include="DataAbstract_Core_D12.dcp"/>
+			<DCCReference Include="PostgresDAC12.dcp"/>
+			<DCCReference Include="uDAPostgresDACDriver.pas"/>
+			<BuildConfiguration Include="Base">
+				<Key>Base</Key>
+			</BuildConfiguration>
+		</ItemGroup>
+		<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+		<ProjectExtensions>
+			<Borland.Personality>Delphi.Personality.12</Borland.Personality>
+			<Borland.ProjectType>Package</Borland.ProjectType>
+			<BorlandProject>
+				<Delphi.Personality>
+					<Parameters>
+						<Parameters Name="UseLauncher">False</Parameters>
+						<Parameters Name="LoadAllSymbols">True</Parameters>
+						<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+					</Parameters>
+					<VersionInfo>
+						<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+						<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+						<VersionInfo Name="MajorVer">3</VersionInfo>
+						<VersionInfo Name="MinorVer">0</VersionInfo>
+						<VersionInfo Name="Release">1</VersionInfo>
+						<VersionInfo Name="Build">361</VersionInfo>
+						<VersionInfo Name="Debug">False</VersionInfo>
+						<VersionInfo Name="PreRelease">False</VersionInfo>
+						<VersionInfo Name="Special">False</VersionInfo>
+						<VersionInfo Name="Private">False</VersionInfo>
+						<VersionInfo Name="DLL">False</VersionInfo>
+						<VersionInfo Name="Locale">1033</VersionInfo>
+						<VersionInfo Name="CodePage">1252</VersionInfo>
+					</VersionInfo>
+					<VersionInfoKeys>
+						<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="FileDescription"/>
+						<VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys>
+						<VersionInfoKeys Name="InternalName"/>
+						<VersionInfoKeys Name="LegalCopyright"/>
+						<VersionInfoKeys Name="LegalTrademarks"/>
+						<VersionInfoKeys Name="OriginalFilename"/>
+						<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+						<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+					</VersionInfoKeys>
+					<Source>
+						<Source Name="MainSource">DataAbstract_PostgresDACDriver_D12.dpk</Source>
+					</Source>
+				</Delphi.Personality>
+			</BorlandProject>
+			<ProjectFileVersion>12</ProjectFileVersion>
+		</ProjectExtensions>
+	</Project>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D12.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D12.res
new file mode 100644
index 0000000..7b3c163
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D12.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D6.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D6.cfg
new file mode 100644
index 0000000..05f9ec3
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D6.cfg	
@@ -0,0 +1,41 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D6"
+-LE"..\..\Dcu\D6"
+-LN"..\..\Dcu\D6"
+-U"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-O"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-I"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-R"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-Z
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D6.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D6.dof
new file mode 100644
index 0000000..e0035fa
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D6.dof	
@@ -0,0 +1,76 @@
+[FileVersion]
+Version=6.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitDeprecated=0
+UnitLibrary=0
+UnitPlatform=0
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=Data Abstract - ADOExpress/dbGo Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D6
+PackageDLLOutputDir=..\..\Dcu\D6
+PackageDCPOutputDir=..\..\Dcu\D6
+SearchPath=..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6
+Packages=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=2.0.0.138
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D6.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D6.dpk
new file mode 100644
index 0000000..b7803fe
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D6.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_PostgresDACDriver_D6;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - MicroOlap PostgresDAC Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D6,
+  PostgresDAC6;
+
+contains
+  uDAPostgresDACDriver in 'uDAPostgresDACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D6.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D6.res
new file mode 100644
index 0000000..892aed8
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D6.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D7.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D7.cfg
new file mode 100644
index 0000000..6784156
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D7.cfg	
@@ -0,0 +1,50 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D7"
+-LE"..\..\Dcu\D7"
+-LN"..\..\Dcu\D7"
+-U"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-O"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-I"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-R"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D7.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D7.dof
new file mode 100644
index 0000000..f2d0c96
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D7.dof	
@@ -0,0 +1,116 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=Data Abstract - ADOExpress/dbGo Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D7
+PackageDLLOutputDir=..\..\Dcu\D7
+PackageDCPOutputDir=..\..\Dcu\D7
+SearchPath=..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7
+Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;dclOfficeXP;RemObjects_DataSnap_D7;PurposesoftD7;addict3_d6;tb2kComplete_70;CDKDesignTimeSupport;CDKSmp;CDK;ES_CodeSite20;ESDelphiCommandCompiler;ESFileSearch;ESVisualCompositeExpert;EaglWk;ESGraphUtils;ESBase;ESVsCp;ESSampleComposites70;ESSampleCompositeEditors7;Rz252N70;SynEdit_D7;dxsbD7;dxComnD7;dxDockingD7;dxEdtrD7;dxELibD7;dxExELD7;EQGridD7;dxExRwD7;dxDBEdD7;dxInsD7;dxGrEdD7;ECQDBCD7;EQTLD7;EQDBTLD7;dxLayoutControlD7;dxMasterViewD7;dxmdsd7;dxNavBarD7;dxObjInsD7;dxPageControlD7;dxPSCoreD7;Rz252D70;cxPageControlVCLD7;cxEditorsVCLD7;dxThemeD7;cxLibraryVCLD7;cxDataD7;cxGridUtilsVCLD7;cxGridVCLD7;RemObjects_BPDX_D7
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=2.0.0.142
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D7.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D7.dpk
new file mode 100644
index 0000000..37c6d74
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D7.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_PostgresDACDriver_D7;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - MicroOlap PostgresDAC Driver'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D7,
+  PostgresDAC7;
+
+contains
+  uDAPostgresDACDriver in 'uDAPostgresDACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D7.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D7.res
new file mode 100644
index 0000000..892aed8
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_D7.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_Glyphs.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_Glyphs.res
new file mode 100644
index 0000000..fb43550
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_PostgresDACDriver_Glyphs.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D10.bdsproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D10.bdsproj
new file mode 100644
index 0000000..d05f343
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D10.bdsproj	
@@ -0,0 +1,176 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality">Delphi.Personality</Option>
+			<Option Name="ProjectType"></Option>
+			<Option Name="Version">1.0</Option>
+			<Option Name="GUID">{D100EE26-6D50-4902-BC9B-C2BA456E2258}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource">DataAbstract_SDACDriver_D10.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A">8</Compiler>
+			<Compiler Name="B">0</Compiler>
+			<Compiler Name="C">1</Compiler>
+			<Compiler Name="D">1</Compiler>
+			<Compiler Name="E">0</Compiler>
+			<Compiler Name="F">0</Compiler>
+			<Compiler Name="G">1</Compiler>
+			<Compiler Name="H">1</Compiler>
+			<Compiler Name="I">1</Compiler>
+			<Compiler Name="J">0</Compiler>
+			<Compiler Name="K">0</Compiler>
+			<Compiler Name="L">1</Compiler>
+			<Compiler Name="M">0</Compiler>
+			<Compiler Name="N">1</Compiler>
+			<Compiler Name="O">1</Compiler>
+			<Compiler Name="P">1</Compiler>
+			<Compiler Name="Q">0</Compiler>
+			<Compiler Name="R">0</Compiler>
+			<Compiler Name="S">0</Compiler>
+			<Compiler Name="T">0</Compiler>
+			<Compiler Name="U">1</Compiler>
+			<Compiler Name="V">1</Compiler>
+			<Compiler Name="W">1</Compiler>
+			<Compiler Name="X">1</Compiler>
+			<Compiler Name="Y">1</Compiler>
+			<Compiler Name="Z">1</Compiler>
+			<Compiler Name="ShowHints">True</Compiler>
+			<Compiler Name="ShowWarnings">True</Compiler>
+			<Compiler Name="UnitAliases"></Compiler>
+			<Compiler Name="NamespacePrefix"></Compiler>
+			<Compiler Name="GenerateDocumentation">False</Compiler>
+			<Compiler Name="DefaultNamespace"></Compiler>
+			<Compiler Name="SymbolDeprecated">False</Compiler>
+			<Compiler Name="SymbolLibrary">False</Compiler>
+			<Compiler Name="SymbolPlatform">False</Compiler>
+			<Compiler Name="SymbolExperimental">True</Compiler>
+			<Compiler Name="UnitLibrary">False</Compiler>
+			<Compiler Name="UnitPlatform">False</Compiler>
+			<Compiler Name="UnitDeprecated">False</Compiler>
+			<Compiler Name="UnitExperimental">True</Compiler>
+			<Compiler Name="HResultCompat">True</Compiler>
+			<Compiler Name="HidingMember">True</Compiler>
+			<Compiler Name="HiddenVirtual">True</Compiler>
+			<Compiler Name="Garbage">True</Compiler>
+			<Compiler Name="BoundsError">True</Compiler>
+			<Compiler Name="ZeroNilCompat">True</Compiler>
+			<Compiler Name="StringConstTruncated">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar">True</Compiler>
+			<Compiler Name="TypedConstVarPar">True</Compiler>
+			<Compiler Name="AsgToTypedConst">True</Compiler>
+			<Compiler Name="CaseLabelRange">True</Compiler>
+			<Compiler Name="ForVariable">True</Compiler>
+			<Compiler Name="ConstructingAbstract">True</Compiler>
+			<Compiler Name="ComparisonFalse">True</Compiler>
+			<Compiler Name="ComparisonTrue">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned">True</Compiler>
+			<Compiler Name="UnsupportedConstruct">True</Compiler>
+			<Compiler Name="FileOpen">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc">True</Compiler>
+			<Compiler Name="BadGlobalSymbol">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor">True</Compiler>
+			<Compiler Name="InvalidDirective">True</Compiler>
+			<Compiler Name="PackageNoLink">True</Compiler>
+			<Compiler Name="PackageThreadVar">True</Compiler>
+			<Compiler Name="ImplicitImport">True</Compiler>
+			<Compiler Name="HPPEMITIgnored">True</Compiler>
+			<Compiler Name="NoRetVal">True</Compiler>
+			<Compiler Name="UseBeforeDef">True</Compiler>
+			<Compiler Name="ForLoopVarUndef">True</Compiler>
+			<Compiler Name="UnitNameMismatch">True</Compiler>
+			<Compiler Name="NoCFGFileFound">True</Compiler>
+			<Compiler Name="MessageDirective">True</Compiler>
+			<Compiler Name="ImplicitVariants">True</Compiler>
+			<Compiler Name="UnicodeToLocale">True</Compiler>
+			<Compiler Name="LocaleToUnicode">True</Compiler>
+			<Compiler Name="ImagebaseMultiple">True</Compiler>
+			<Compiler Name="SuspiciousTypecast">True</Compiler>
+			<Compiler Name="PrivatePropAccessor">True</Compiler>
+			<Compiler Name="UnsafeType">False</Compiler>
+			<Compiler Name="UnsafeCode">False</Compiler>
+			<Compiler Name="UnsafeCast">False</Compiler>
+			<Compiler Name="OptionTruncated">True</Compiler>
+			<Compiler Name="WideCharReduced">True</Compiler>
+			<Compiler Name="DuplicatesIgnored">True</Compiler>  <Compiler Name="UnitInitSeq">True</Compiler>
+      <Compiler Name="LocalPInvoke">True</Compiler>
+      <Compiler Name="CodePage"></Compiler>
+    </Compiler>
+		<Linker>
+			<Linker Name="MapFile">0</Linker>
+			<Linker Name="OutputObjs">0</Linker>
+			<Linker Name="ConsoleApp">1</Linker>
+			<Linker Name="DebugInfo">False</Linker>
+			<Linker Name="RemoteSymbols">False</Linker>
+			<Linker Name="GenerateDRC">False</Linker>
+			<Linker Name="MinStackSize">16384</Linker>
+			<Linker Name="MaxStackSize">1048576</Linker>
+			<Linker Name="ImageBase">4194304</Linker>
+			<Linker Name="ExeDescription">RemObjects Data Abstract - CoreLabs SDAC Driver</Linker>  <Linker Name="GenerateHpps">False</Linker>
+    </Linker>
+		<Directories>
+			<Directories Name="OutputDir"></Directories>
+			<Directories Name="UnitOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDLLOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDCPOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="SearchPath">..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10</Directories>
+			<Directories Name="Packages"></Directories>
+			<Directories Name="Conditionals"></Directories>
+			<Directories Name="DebugSourceDirs"></Directories>
+			<Directories Name="UsePackages">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams"></Parameters>
+			<Parameters Name="HostApplication"></Parameters>
+			<Parameters Name="Launcher"></Parameters>
+			<Parameters Name="UseLauncher">False</Parameters>
+			<Parameters Name="DebugCWD"></Parameters>
+			<Parameters Name="RemoteHost"></Parameters>
+			<Parameters Name="RemotePath"></Parameters>
+			<Parameters Name="RemoteLauncher"></Parameters>
+			<Parameters Name="RemoteCWD"></Parameters>
+			<Parameters Name="RemoteDebug">False</Parameters>  <Parameters Name="Debug Symbols Search Path"></Parameters>
+      <Parameters Name="LoadAllSymbols">True</Parameters>
+      <Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+    </Parameters>
+		<Language>
+			<Language Name="ActiveLang"></Language>
+			<Language Name="ProjectLang">$00000000</Language>
+			<Language Name="RootDir"></Language>
+		</Language>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+			<VersionInfo Name="MajorVer">1</VersionInfo>
+			<VersionInfo Name="MinorVer">0</VersionInfo>
+			<VersionInfo Name="Release">0</VersionInfo>
+			<VersionInfo Name="Build">0</VersionInfo>
+			<VersionInfo Name="Debug">False</VersionInfo>
+			<VersionInfo Name="PreRelease">False</VersionInfo>
+			<VersionInfo Name="Special">False</VersionInfo>
+			<VersionInfo Name="Private">False</VersionInfo>
+			<VersionInfo Name="DLL">False</VersionInfo>
+			<VersionInfo Name="Locale">1033</VersionInfo>
+			<VersionInfo Name="CodePage">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName">RemObjects Data Abstract</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+		</VersionInfoKeys>
+	</Delphi.Personality>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D10.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D10.cfg
new file mode 100644
index 0000000..207b254
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D10.cfg	
@@ -0,0 +1,49 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U+
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N0"..\..\Dcu\D10"
+-LE"..\..\Dcu\D10"
+-LN"..\..\Dcu\D10"
+-U"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-O"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-I"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-R"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D10.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D10.dpk
new file mode 100644
index 0000000..a7067e9
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D10.dpk	
@@ -0,0 +1,41 @@
+package DataAbstract_SDACDriver_D10;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - CoreLabs SDAC Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  bdertl,
+  dac100,
+  RemObjects_Core_D10,
+  sdac100,
+  DataAbstract_Core_D10;
+
+contains
+  uDASDACDriver in 'uDASDACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D10.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D10.res
new file mode 100644
index 0000000..6ef0ba1
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D10.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D11.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D11.dpk
new file mode 100644
index 0000000..40d1424
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D11.dpk	
@@ -0,0 +1,41 @@
+package DataAbstract_SDACDriver_D11;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - CoreLabs SDAC Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  bdertl,
+  dac105,
+  RemObjects_Core_D11,
+  sdac105,
+  DataAbstract_Core_D11;
+
+contains
+  uDASDACDriver in 'uDASDACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D11.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D11.dproj
new file mode 100644
index 0000000..4c5409b
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D11.dproj	
@@ -0,0 +1,79 @@
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{bcb5ceeb-712c-4f85-83e3-6f57bb934c9f}</ProjectGuid>
+    <MainSource>DataAbstract_SDACDriver_D11.dpk</MainSource>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+    <DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_SDACDriver_D11.bpl</DCC_DependencyCheckOutputName>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DebugInformation>False</DCC_DebugInformation>
+    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+    <DCC_PentiumSafeDivide>True</DCC_PentiumSafeDivide>
+    <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_Define>RELEASE</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_PentiumSafeDivide>True</DCC_PentiumSafeDivide>
+    <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Delphi.Personality</Borland.Personality>
+    <Borland.ProjectType>Package</Borland.ProjectType>
+    <BorlandProject>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">RemObjects Data Abstract - CoreLabs SDAC Driver</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">RemObjects Data Abstract</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">DataAbstract_SDACDriver_D11.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
+  <ItemGroup>
+    <DelphiCompile Include="DataAbstract_SDACDriver_D11.dpk">
+      <MainSource>MainSource</MainSource>
+    </DelphiCompile>
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\bdertl.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\dac105.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\DataAbstract_Core_D11.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\dbrtl.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\RemObjects_Core_D11.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\rtl.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\sdac105.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\vcl.dcp" />
+    <DCCReference Include="dac10.dcp" />
+    <DCCReference Include="dac100.dcp" />
+    <DCCReference Include="sdac10.dcp" />
+    <DCCReference Include="sdac100.dcp" />
+    <DCCReference Include="uDASDACDriver.pas" />
+  </ItemGroup>
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D11.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D11.res
new file mode 100644
index 0000000..6ef0ba1
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D11.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D12.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D12.dpk
new file mode 100644
index 0000000..2a066c3
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D12.dpk	
@@ -0,0 +1,40 @@
+package DataAbstract_SDACDriver_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - CoreLabs SDAC Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  bdertl,
+  dac12,
+  sdac12,
+  DataAbstract_Core_D12;
+
+contains
+  uDASDACDriver in 'uDASDACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D12.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D12.dproj
new file mode 100644
index 0000000..6641211
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D12.dproj	
@@ -0,0 +1,99 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{bcb5ceeb-712c-4f85-83e3-6f57bb934c9f}</ProjectGuid>
+			<MainSource>DataAbstract_SDACDriver_D12.dpk</MainSource>
+			<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+			<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+			<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_SDACDriver_D11.bpl</DCC_DependencyCheckOutputName>
+			<ProjectVersion>11.1</ProjectVersion>
+			<Config Condition="'$(Config)'==''">Base</Config>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base)'!=''">
+			<DCC_SymbolReferenceInfo>1</DCC_SymbolReferenceInfo>
+			<DCC_CVT_WCHAR_TO_ACHAR>error</DCC_CVT_WCHAR_TO_ACHAR>
+			<DCC_UnitSearchPath>..;..\..\Dcu\D12;..\..\..\RemObjects SDK for Delphi\Dcu\D12;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+			<DCC_IMPLICIT_STRING_CAST>error</DCC_IMPLICIT_STRING_CAST>
+			<DCC_BplOutput>..\..\Dcu\D12</DCC_BplOutput>
+			<DCC_IMPLICIT_STRING_CAST_LOSS>error</DCC_IMPLICIT_STRING_CAST_LOSS>
+			<DCC_EXPLICIT_STRING_CAST_LOSS>error</DCC_EXPLICIT_STRING_CAST_LOSS>
+			<DCC_CVT_ACHAR_TO_WCHAR>error</DCC_CVT_ACHAR_TO_WCHAR>
+			<DCC_CVT_WIDENING_STRING_LOST>error</DCC_CVT_WIDENING_STRING_LOST>
+			<DCC_EXPLICIT_STRING_CAST>error</DCC_EXPLICIT_STRING_CAST>
+			<DCC_DcuOutput>..\..\Dcu\D12</DCC_DcuOutput>
+			<DCC_CVT_NARROWING_STRING_LOST>error</DCC_CVT_NARROWING_STRING_LOST>
+			<DCC_DcpOutput>..\..\Dcu\D12</DCC_DcpOutput>
+			<GenDll>true</GenDll>
+			<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+			<GenPackage>true</GenPackage>
+			<DCC_GenerateStackFrames>true</DCC_GenerateStackFrames>
+			<DesignOnlyPackage>false</DesignOnlyPackage>
+			<DCC_ImageBase>00400000</DCC_ImageBase>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D12\DataAbstract_SDACDriver_D12.bpl</DCC_DependencyCheckOutputName>
+			<DCC_PentiumSafeDivide>true</DCC_PentiumSafeDivide>
+			<DCC_Description>RemObjects Data Abstract - CoreLabs SDAC Driver</DCC_Description>
+		</PropertyGroup>
+		<ItemGroup>
+			<DelphiCompile Include="DataAbstract_SDACDriver_D12.dpk">
+				<MainSource>MainSource</MainSource>
+			</DelphiCompile>
+			<DCCReference Include="rtl.dcp"/>
+			<DCCReference Include="vcl.dcp"/>
+			<DCCReference Include="dbrtl.dcp"/>
+			<DCCReference Include="bdertl.dcp"/>
+			<DCCReference Include="dac12.dcp"/>
+			<DCCReference Include="sdac12.dcp"/>
+			<DCCReference Include="DataAbstract_Core_D12.dcp"/>
+			<DCCReference Include="uDASDACDriver.pas"/>
+			<BuildConfiguration Include="Base">
+				<Key>Base</Key>
+			</BuildConfiguration>
+		</ItemGroup>
+		<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+		<ProjectExtensions>
+			<Borland.Personality>Delphi.Personality.12</Borland.Personality>
+			<Borland.ProjectType>Package</Borland.ProjectType>
+			<BorlandProject>
+				<Delphi.Personality>
+					<Parameters>
+						<Parameters Name="UseLauncher">False</Parameters>
+						<Parameters Name="LoadAllSymbols">True</Parameters>
+						<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+					</Parameters>
+					<VersionInfo>
+						<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+						<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+						<VersionInfo Name="MajorVer">1</VersionInfo>
+						<VersionInfo Name="MinorVer">0</VersionInfo>
+						<VersionInfo Name="Release">0</VersionInfo>
+						<VersionInfo Name="Build">0</VersionInfo>
+						<VersionInfo Name="Debug">False</VersionInfo>
+						<VersionInfo Name="PreRelease">False</VersionInfo>
+						<VersionInfo Name="Special">False</VersionInfo>
+						<VersionInfo Name="Private">False</VersionInfo>
+						<VersionInfo Name="DLL">False</VersionInfo>
+						<VersionInfo Name="Locale">1033</VersionInfo>
+						<VersionInfo Name="CodePage">1252</VersionInfo>
+					</VersionInfo>
+					<VersionInfoKeys>
+						<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="FileDescription"/>
+						<VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys>
+						<VersionInfoKeys Name="InternalName"/>
+						<VersionInfoKeys Name="LegalCopyright">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="LegalTrademarks">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="OriginalFilename"/>
+						<VersionInfoKeys Name="ProductName">RemObjects Data Abstract</VersionInfoKeys>
+						<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+					</VersionInfoKeys>
+					<Source>
+						<Source Name="MainSource">DataAbstract_SDACDriver_D12.dpk</Source>
+					</Source>
+				</Delphi.Personality>
+			</BorlandProject>
+			<ProjectFileVersion>12</ProjectFileVersion>
+		</ProjectExtensions>
+	</Project>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D12.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D12.res
new file mode 100644
index 0000000..6ef0ba1
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D12.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D6.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D6.cfg
new file mode 100644
index 0000000..0aa2cb6
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D6.cfg	
@@ -0,0 +1,41 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U+
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D6"
+-LE"..\..\Dcu\D6"
+-LN"..\..\Dcu\D6"
+-U"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-O"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-I"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-R"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-Z
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D6.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D6.dof
new file mode 100644
index 0000000..a6cb4e4
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D6.dof	
@@ -0,0 +1,77 @@
+[FileVersion]
+Version=6.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=1
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitDeprecated=0
+UnitLibrary=0
+UnitPlatform=0
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=Data Abstract - CoreLabs SDAC Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D6
+PackageDLLOutputDir=..\..\Dcu\D6
+PackageDCPOutputDir=..\..\Dcu\D6
+SearchPath=..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6
+Packages=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software, Inc.
+FileDescription=
+FileVersion=1.0.0.0
+InternalName=
+LegalCopyright=RemObjects Software, Inc.
+LegalTrademarks=RemObjects Software, Inc.
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+Comments=http://www.remobjects.com
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D6.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D6.dpk
new file mode 100644
index 0000000..6f3c3e6
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D6.dpk	
@@ -0,0 +1,41 @@
+package DataAbstract_SDACDriver_D6;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - CoreLabs SDAC Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  bdertl,
+  RemObjects_Core_D6,
+  DataAbstract_Core_D6,
+  dac60,
+  sdac60;
+
+contains
+  uDASDACDriver in 'uDASDACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D6.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D6.res
new file mode 100644
index 0000000..b26b84e
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D6.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D7.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D7.cfg
new file mode 100644
index 0000000..a290ad9
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D7.cfg	
@@ -0,0 +1,50 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U+
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D7"
+-LE"..\..\Dcu\D7"
+-LN"..\..\Dcu\D7"
+-U"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-O"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-I"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-R"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D7.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D7.dof
new file mode 100644
index 0000000..42ca991
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D7.dof	
@@ -0,0 +1,117 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=1
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=Data Abstract - CoreLabs SDAC Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D7
+PackageDLLOutputDir=..\..\Dcu\D7
+PackageDCPOutputDir=..\..\Dcu\D7
+SearchPath=..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7
+Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;dclOfficeXP;RemObjects_DataSnap_D7;PurposesoftD7;addict3_d6;tb2kComplete_70;CDKDesignTimeSupport;CDKSmp;CDK;ES_CodeSite20;ESDelphiCommandCompiler;ESFileSearch;ESVisualCompositeExpert;EaglWk;ESGraphUtils;ESBase;ESVsCp;ESSampleComposites70;ESSampleCompositeEditors7;Rz252N70;SynEdit_D7;dxsbD7;dxComnD7;dxDockingD7;dxEdtrD7;dxELibD7;dxExELD7;EQGridD7;dxExRwD7;dxDBEdD7;dxInsD7;dxGrEdD7;ECQDBCD7;EQTLD7;EQDBTLD7;dxLayoutControlD7;dxMasterViewD7;dxmdsd7;dxNavBarD7;dxObjInsD7;dxPageControlD7;dxPSCoreD7;Rz252D70;cxPageControlVCLD7;cxEditorsVCLD7;dxThemeD7;cxLibraryVCLD7;cxDataD7;cxGridUtilsVCLD7;cxGridVCLD7;RemObjects_BPDX_D7
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software, Inc.
+FileDescription=
+FileVersion=1.0.0.0
+InternalName=
+LegalCopyright=RemObjects Software, Inc.
+LegalTrademarks=RemObjects Software, Inc.
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+Comments=http://www.remobjects.com
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D7.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D7.dpk
new file mode 100644
index 0000000..ca1d337
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D7.dpk	
@@ -0,0 +1,41 @@
+package DataAbstract_SDACDriver_D7;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - CoreLabs SDAC Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  bdertl,
+  dac70,
+  RemObjects_Core_D7,
+  sdac70,
+  DataAbstract_Core_D7;
+
+contains
+  uDASDACDriver in 'uDASDACDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D7.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D7.res
new file mode 100644
index 0000000..ac3b612
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_D7.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_Glyphs.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_Glyphs.res
new file mode 100644
index 0000000..d14c81c
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SDACDriver_Glyphs.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D10.bdsproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D10.bdsproj
new file mode 100644
index 0000000..4acf23e
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D10.bdsproj	
@@ -0,0 +1,176 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality">Delphi.Personality</Option>
+			<Option Name="ProjectType"></Option>
+			<Option Name="Version">1.0</Option>
+			<Option Name="GUID">{C227C50C-E7AA-4212-8D32-C33B5BFE5BB8}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource">DataAbstract_SQLiteDriver_D10.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A">8</Compiler>
+			<Compiler Name="B">0</Compiler>
+			<Compiler Name="C">1</Compiler>
+			<Compiler Name="D">1</Compiler>
+			<Compiler Name="E">0</Compiler>
+			<Compiler Name="F">0</Compiler>
+			<Compiler Name="G">1</Compiler>
+			<Compiler Name="H">1</Compiler>
+			<Compiler Name="I">1</Compiler>
+			<Compiler Name="J">0</Compiler>
+			<Compiler Name="K">0</Compiler>
+			<Compiler Name="L">1</Compiler>
+			<Compiler Name="M">0</Compiler>
+			<Compiler Name="N">1</Compiler>
+			<Compiler Name="O">1</Compiler>
+			<Compiler Name="P">1</Compiler>
+			<Compiler Name="Q">0</Compiler>
+			<Compiler Name="R">0</Compiler>
+			<Compiler Name="S">0</Compiler>
+			<Compiler Name="T">0</Compiler>
+			<Compiler Name="U">1</Compiler>
+			<Compiler Name="V">1</Compiler>
+			<Compiler Name="W">1</Compiler>
+			<Compiler Name="X">1</Compiler>
+			<Compiler Name="Y">1</Compiler>
+			<Compiler Name="Z">1</Compiler>
+			<Compiler Name="ShowHints">True</Compiler>
+			<Compiler Name="ShowWarnings">True</Compiler>
+			<Compiler Name="UnitAliases"></Compiler>
+			<Compiler Name="NamespacePrefix"></Compiler>
+			<Compiler Name="GenerateDocumentation">False</Compiler>
+			<Compiler Name="DefaultNamespace"></Compiler>
+			<Compiler Name="SymbolDeprecated">False</Compiler>
+			<Compiler Name="SymbolLibrary">False</Compiler>
+			<Compiler Name="SymbolPlatform">False</Compiler>
+			<Compiler Name="SymbolExperimental">True</Compiler>
+			<Compiler Name="UnitLibrary">False</Compiler>
+			<Compiler Name="UnitPlatform">False</Compiler>
+			<Compiler Name="UnitDeprecated">False</Compiler>
+			<Compiler Name="UnitExperimental">True</Compiler>
+			<Compiler Name="HResultCompat">True</Compiler>
+			<Compiler Name="HidingMember">True</Compiler>
+			<Compiler Name="HiddenVirtual">True</Compiler>
+			<Compiler Name="Garbage">True</Compiler>
+			<Compiler Name="BoundsError">True</Compiler>
+			<Compiler Name="ZeroNilCompat">True</Compiler>
+			<Compiler Name="StringConstTruncated">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar">True</Compiler>
+			<Compiler Name="TypedConstVarPar">True</Compiler>
+			<Compiler Name="AsgToTypedConst">True</Compiler>
+			<Compiler Name="CaseLabelRange">True</Compiler>
+			<Compiler Name="ForVariable">True</Compiler>
+			<Compiler Name="ConstructingAbstract">True</Compiler>
+			<Compiler Name="ComparisonFalse">True</Compiler>
+			<Compiler Name="ComparisonTrue">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned">True</Compiler>
+			<Compiler Name="UnsupportedConstruct">True</Compiler>
+			<Compiler Name="FileOpen">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc">True</Compiler>
+			<Compiler Name="BadGlobalSymbol">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor">True</Compiler>
+			<Compiler Name="InvalidDirective">True</Compiler>
+			<Compiler Name="PackageNoLink">True</Compiler>
+			<Compiler Name="PackageThreadVar">True</Compiler>
+			<Compiler Name="ImplicitImport">True</Compiler>
+			<Compiler Name="HPPEMITIgnored">True</Compiler>
+			<Compiler Name="NoRetVal">True</Compiler>
+			<Compiler Name="UseBeforeDef">True</Compiler>
+			<Compiler Name="ForLoopVarUndef">True</Compiler>
+			<Compiler Name="UnitNameMismatch">True</Compiler>
+			<Compiler Name="NoCFGFileFound">True</Compiler>
+			<Compiler Name="MessageDirective">True</Compiler>
+			<Compiler Name="ImplicitVariants">True</Compiler>
+			<Compiler Name="UnicodeToLocale">True</Compiler>
+			<Compiler Name="LocaleToUnicode">True</Compiler>
+			<Compiler Name="ImagebaseMultiple">True</Compiler>
+			<Compiler Name="SuspiciousTypecast">True</Compiler>
+			<Compiler Name="PrivatePropAccessor">True</Compiler>
+			<Compiler Name="UnsafeType">False</Compiler>
+			<Compiler Name="UnsafeCode">False</Compiler>
+			<Compiler Name="UnsafeCast">False</Compiler>
+			<Compiler Name="OptionTruncated">True</Compiler>
+			<Compiler Name="WideCharReduced">True</Compiler>
+			<Compiler Name="DuplicatesIgnored">True</Compiler>  <Compiler Name="UnitInitSeq">True</Compiler>
+      <Compiler Name="LocalPInvoke">True</Compiler>
+      <Compiler Name="CodePage"></Compiler>
+    </Compiler>
+		<Linker>
+			<Linker Name="MapFile">0</Linker>
+			<Linker Name="OutputObjs">0</Linker>
+			<Linker Name="ConsoleApp">1</Linker>
+			<Linker Name="DebugInfo">False</Linker>
+			<Linker Name="RemoteSymbols">False</Linker>
+			<Linker Name="GenerateDRC">False</Linker>
+			<Linker Name="MinStackSize">16384</Linker>
+			<Linker Name="MaxStackSize">1048576</Linker>
+			<Linker Name="ImageBase">4194304</Linker>
+			<Linker Name="ExeDescription">RemObjects Data Abstract - SQLite Driver</Linker>  <Linker Name="GenerateHpps">False</Linker>
+    </Linker>
+		<Directories>
+			<Directories Name="OutputDir"></Directories>
+			<Directories Name="UnitOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDLLOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDCPOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="SearchPath">..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10</Directories>
+			<Directories Name="Packages"></Directories>
+			<Directories Name="Conditionals"></Directories>
+			<Directories Name="DebugSourceDirs"></Directories>
+			<Directories Name="UsePackages">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams"></Parameters>
+			<Parameters Name="HostApplication"></Parameters>
+			<Parameters Name="Launcher"></Parameters>
+			<Parameters Name="UseLauncher">False</Parameters>
+			<Parameters Name="DebugCWD"></Parameters>
+			<Parameters Name="RemoteHost"></Parameters>
+			<Parameters Name="RemotePath"></Parameters>
+			<Parameters Name="RemoteLauncher"></Parameters>
+			<Parameters Name="RemoteCWD"></Parameters>
+			<Parameters Name="RemoteDebug">False</Parameters>  <Parameters Name="Debug Symbols Search Path"></Parameters>
+      <Parameters Name="LoadAllSymbols">True</Parameters>
+      <Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+    </Parameters>
+		<Language>
+			<Language Name="ActiveLang"></Language>
+			<Language Name="ProjectLang">$00000000</Language>
+			<Language Name="RootDir"></Language>
+		</Language>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+			<VersionInfo Name="MajorVer">3</VersionInfo>
+			<VersionInfo Name="MinorVer">0</VersionInfo>
+			<VersionInfo Name="Release">1</VersionInfo>
+			<VersionInfo Name="Build">361</VersionInfo>
+			<VersionInfo Name="Debug">False</VersionInfo>
+			<VersionInfo Name="PreRelease">False</VersionInfo>
+			<VersionInfo Name="Special">False</VersionInfo>
+			<VersionInfo Name="Private">False</VersionInfo>
+			<VersionInfo Name="DLL">False</VersionInfo>
+			<VersionInfo Name="Locale">1033</VersionInfo>
+			<VersionInfo Name="CodePage">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+		</VersionInfoKeys>
+	</Delphi.Personality>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D10.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D10.cfg
new file mode 100644
index 0000000..207b254
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D10.cfg	
@@ -0,0 +1,49 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U+
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N0"..\..\Dcu\D10"
+-LE"..\..\Dcu\D10"
+-LN"..\..\Dcu\D10"
+-U"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-O"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-I"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-R"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D10.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D10.dpk
new file mode 100644
index 0000000..e678ec2
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D10.dpk	
@@ -0,0 +1,37 @@
+package DataAbstract_SQLiteDriver_D10;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - SQLite Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D10;
+
+contains
+  uDASQLiteDriver in 'uDASQLiteDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D10.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D10.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D10.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D11.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D11.dpk
new file mode 100644
index 0000000..ba6edaa
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D11.dpk	
@@ -0,0 +1,37 @@
+package DataAbstract_SQLiteDriver_D11;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - SQLite Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D11;
+
+contains
+  uDASQLiteDriver in 'uDASQLiteDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D11.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D11.dproj
new file mode 100644
index 0000000..ed142b2
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D11.dproj	
@@ -0,0 +1,71 @@
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{17f81962-5ed1-4c36-bee9-ce79aab46e95}</ProjectGuid>
+    <MainSource>DataAbstract_SQLiteDriver_D11.dpk</MainSource>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+    <DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_SQLiteDriver_D11.bpl</DCC_DependencyCheckOutputName>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DebugInformation>False</DCC_DebugInformation>
+    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+    <DCC_PentiumSafeDivide>True</DCC_PentiumSafeDivide>
+    <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_Define>RELEASE</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_PentiumSafeDivide>True</DCC_PentiumSafeDivide>
+    <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Delphi.Personality</Borland.Personality>
+    <Borland.ProjectType>Package</Borland.ProjectType>
+    <BorlandProject>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">RemObjects Data Abstract - SQLite Driver</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">3</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">1</VersionInfo><VersionInfo Name="Build">361</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">DataAbstract_SQLiteDriver_D11.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
+  <ItemGroup>
+    <DelphiCompile Include="DataAbstract_SQLiteDriver_D11.dpk">
+      <MainSource>MainSource</MainSource>
+    </DelphiCompile>
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\DataAbstract_Core_D11.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\dbrtl.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\rtl.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\vcl.dcp" />
+    <DCCReference Include="uDASQLiteDriver.pas" />
+  </ItemGroup>
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D11.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D11.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D11.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D12.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D12.dpk
new file mode 100644
index 0000000..201d328
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D12.dpk	
@@ -0,0 +1,37 @@
+package DataAbstract_SQLiteDriver_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - SQLite Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D12;
+
+contains
+  uDASQLiteDriver in 'uDASQLiteDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D12.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D12.dproj
new file mode 100644
index 0000000..e23601c
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D12.dproj	
@@ -0,0 +1,96 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{17f81962-5ed1-4c36-bee9-ce79aab46e95}</ProjectGuid>
+			<MainSource>DataAbstract_SQLiteDriver_D12.dpk</MainSource>
+			<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+			<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+			<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_SQLiteDriver_D11.bpl</DCC_DependencyCheckOutputName>
+			<ProjectVersion>11.1</ProjectVersion>
+			<Config Condition="'$(Config)'==''">Base</Config>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base)'!=''">
+			<DCC_SymbolReferenceInfo>1</DCC_SymbolReferenceInfo>
+			<DCC_CVT_WCHAR_TO_ACHAR>error</DCC_CVT_WCHAR_TO_ACHAR>
+			<DCC_UnitSearchPath>..;..\..\Dcu\D12;..\..\..\RemObjects SDK for Delphi\Dcu\D12;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+			<DCC_IMPLICIT_STRING_CAST>error</DCC_IMPLICIT_STRING_CAST>
+			<DCC_BplOutput>..\..\Dcu\D12</DCC_BplOutput>
+			<DCC_IMPLICIT_STRING_CAST_LOSS>error</DCC_IMPLICIT_STRING_CAST_LOSS>
+			<DCC_EXPLICIT_STRING_CAST_LOSS>error</DCC_EXPLICIT_STRING_CAST_LOSS>
+			<DCC_CVT_ACHAR_TO_WCHAR>error</DCC_CVT_ACHAR_TO_WCHAR>
+			<DCC_CVT_WIDENING_STRING_LOST>error</DCC_CVT_WIDENING_STRING_LOST>
+			<DCC_EXPLICIT_STRING_CAST>error</DCC_EXPLICIT_STRING_CAST>
+			<DCC_DcuOutput>..\..\Dcu\D12</DCC_DcuOutput>
+			<DCC_CVT_NARROWING_STRING_LOST>error</DCC_CVT_NARROWING_STRING_LOST>
+			<DCC_DcpOutput>..\..\Dcu\D12</DCC_DcpOutput>
+			<GenDll>true</GenDll>
+			<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+			<GenPackage>true</GenPackage>
+			<DCC_GenerateStackFrames>true</DCC_GenerateStackFrames>
+			<DesignOnlyPackage>false</DesignOnlyPackage>
+			<DCC_ImageBase>00400000</DCC_ImageBase>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D12\DataAbstract_SQLiteDriver_D12.bpl</DCC_DependencyCheckOutputName>
+			<DCC_PentiumSafeDivide>true</DCC_PentiumSafeDivide>
+			<DCC_Description>RemObjects Data Abstract - SQLite Driver</DCC_Description>
+		</PropertyGroup>
+		<ItemGroup>
+			<DelphiCompile Include="DataAbstract_SQLiteDriver_D12.dpk">
+				<MainSource>MainSource</MainSource>
+			</DelphiCompile>
+			<DCCReference Include="rtl.dcp"/>
+			<DCCReference Include="vcl.dcp"/>
+			<DCCReference Include="dbrtl.dcp"/>
+			<DCCReference Include="DataAbstract_Core_D12.dcp"/>
+			<DCCReference Include="uDASQLiteDriver.pas"/>
+			<BuildConfiguration Include="Base">
+				<Key>Base</Key>
+			</BuildConfiguration>
+		</ItemGroup>
+		<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+		<ProjectExtensions>
+			<Borland.Personality>Delphi.Personality.12</Borland.Personality>
+			<Borland.ProjectType>Package</Borland.ProjectType>
+			<BorlandProject>
+				<Delphi.Personality>
+					<Parameters>
+						<Parameters Name="UseLauncher">False</Parameters>
+						<Parameters Name="LoadAllSymbols">True</Parameters>
+						<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+					</Parameters>
+					<VersionInfo>
+						<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+						<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+						<VersionInfo Name="MajorVer">3</VersionInfo>
+						<VersionInfo Name="MinorVer">0</VersionInfo>
+						<VersionInfo Name="Release">1</VersionInfo>
+						<VersionInfo Name="Build">361</VersionInfo>
+						<VersionInfo Name="Debug">False</VersionInfo>
+						<VersionInfo Name="PreRelease">False</VersionInfo>
+						<VersionInfo Name="Special">False</VersionInfo>
+						<VersionInfo Name="Private">False</VersionInfo>
+						<VersionInfo Name="DLL">False</VersionInfo>
+						<VersionInfo Name="Locale">1033</VersionInfo>
+						<VersionInfo Name="CodePage">1252</VersionInfo>
+					</VersionInfo>
+					<VersionInfoKeys>
+						<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="FileDescription"/>
+						<VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys>
+						<VersionInfoKeys Name="InternalName"/>
+						<VersionInfoKeys Name="LegalCopyright"/>
+						<VersionInfoKeys Name="LegalTrademarks"/>
+						<VersionInfoKeys Name="OriginalFilename"/>
+						<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+						<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+					</VersionInfoKeys>
+					<Source>
+						<Source Name="MainSource">DataAbstract_SQLiteDriver_D12.dpk</Source>
+					</Source>
+				</Delphi.Personality>
+			</BorlandProject>
+			<ProjectFileVersion>12</ProjectFileVersion>
+		</ProjectExtensions>
+	</Project>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D12.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D12.res
new file mode 100644
index 0000000..7b3c163
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D12.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D6.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D6.cfg
new file mode 100644
index 0000000..4730510
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D6.cfg	
@@ -0,0 +1,41 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U+
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D6"
+-LE"..\..\Dcu\D6"
+-LN"..\..\Dcu\D6"
+-U"..\..\Dcu\D6;..\..\..\RemObjects SDK\Dcu\D6"
+-O"..\..\Dcu\D6;..\..\..\RemObjects SDK\Dcu\D6"
+-I"..\..\Dcu\D6;..\..\..\RemObjects SDK\Dcu\D6"
+-R"..\..\Dcu\D6;..\..\..\RemObjects SDK\Dcu\D6"
+-Z
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D6.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D6.dof
new file mode 100644
index 0000000..1fb3129
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D6.dof	
@@ -0,0 +1,76 @@
+[FileVersion]
+Version=6.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=1
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitDeprecated=0
+UnitLibrary=0
+UnitPlatform=0
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects Data Abstract - SQLite Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D6
+PackageDLLOutputDir=..\..\Dcu\D6
+PackageDCPOutputDir=..\..\Dcu\D6
+SearchPath=..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6
+Packages=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=2.0.0.138
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D6.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D6.dpk
new file mode 100644
index 0000000..81be681
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D6.dpk	
@@ -0,0 +1,37 @@
+package DataAbstract_SQLiteDriver_D6;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - SQLite Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D6;
+
+contains
+  uDASQLiteDriver in 'uDASQLiteDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D6.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D6.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D6.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D7.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D7.cfg
new file mode 100644
index 0000000..5cf57a8
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D7.cfg	
@@ -0,0 +1,50 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U+
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D7"
+-LE"..\..\Dcu\D7"
+-LN"..\..\Dcu\D7"
+-U"..\..\Dcu\D7;..\..\..\RemObjects SDK\Dcu\D7"
+-O"..\..\Dcu\D7;..\..\..\RemObjects SDK\Dcu\D7"
+-I"..\..\Dcu\D7;..\..\..\RemObjects SDK\Dcu\D7"
+-R"..\..\Dcu\D7;..\..\..\RemObjects SDK\Dcu\D7"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D7.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D7.dof
new file mode 100644
index 0000000..94c4d85
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D7.dof	
@@ -0,0 +1,116 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=1
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=Data Abstract - SQLite Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D7
+PackageDLLOutputDir=..\..\Dcu\D7
+PackageDCPOutputDir=..\..\Dcu\D7
+SearchPath=..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7
+Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;dclOfficeXP;RemObjects_DataSnap_D7;PurposesoftD7;addict3_d6;tb2kComplete_70;CDKDesignTimeSupport;CDKSmp;CDK;ES_CodeSite20;ESDelphiCommandCompiler;ESFileSearch;ESVisualCompositeExpert;EaglWk;ESGraphUtils;ESBase;ESVsCp;ESSampleComposites70;ESSampleCompositeEditors7;Rz252N70;SynEdit_D7;dxsbD7;dxComnD7;dxDockingD7;dxEdtrD7;dxELibD7;dxExELD7;EQGridD7;dxExRwD7;dxDBEdD7;dxInsD7;dxGrEdD7;ECQDBCD7;EQTLD7;EQDBTLD7;dxLayoutControlD7;dxMasterViewD7;dxmdsd7;dxNavBarD7;dxObjInsD7;dxPageControlD7;dxPSCoreD7;Rz252D70;cxPageControlVCLD7;cxEditorsVCLD7;dxThemeD7;cxLibraryVCLD7;cxDataD7;cxGridUtilsVCLD7;cxGridVCLD7;RemObjects_BPDX_D7
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=2.0.0.142
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D7.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D7.dpk
new file mode 100644
index 0000000..0265195
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D7.dpk	
@@ -0,0 +1,37 @@
+package DataAbstract_SQLiteDriver_D7;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - SQLite Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  DataAbstract_Core_D7;
+
+contains
+  uDASQLiteDriver in 'uDASQLiteDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D7.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D7.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_D7.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_Glyphs.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_Glyphs.res
new file mode 100644
index 0000000..9f2e224
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLiteDriver_Glyphs.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLitePassDriver_Lazarus_Unix.lpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLitePassDriver_Lazarus_Unix.lpk
new file mode 100644
index 0000000..5c89f27
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLitePassDriver_Lazarus_Unix.lpk	
@@ -0,0 +1,58 @@
+<?xml version="1.0"?>
+<CONFIG>
+  <Package Version="3">
+    <PathDelim Value="\"/>
+    <Name Value="DataAbstract_SQLitePassDriver_Lazarus_Unix"/>
+    <CompilerOptions>
+      <Version Value="5"/>
+      <PathDelim Value="\"/>
+      <SearchPaths>
+        <UnitOutputDirectory Value="..\units\$(TargetCPU)-$(TargetOS)"/>
+      </SearchPaths>
+      <CodeGeneration>
+        <Generate Value="Faster"/>
+      </CodeGeneration>
+      <Other>
+        <CompilerPath Value="$(CompPath)"/>
+      </Other>
+    </CompilerOptions>
+    <Files Count="2">
+      <Item1>
+        <Filename Value="uDASQLitePassDriver.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="uDASQLitePassDriver"/>
+      </Item1>
+      <Item2>
+        <Filename Value="DataAbstract_SQLitePassDriver_Glyphs.lrs"/>
+        <Type Value="LRS"/>
+      </Item2>
+    </Files>
+    <Type Value="RunAndDesignTime"/>
+    <RequiredPkgs Count="5">
+      <Item1>
+        <PackageName Value="RemObjects_Core_Lazarus_Unix"/>
+      </Item1>
+      <Item2>
+        <PackageName Value="DataAbstract_Core_Lazarus_Unix"/>
+      </Item2>
+      <Item3>
+        <PackageName Value="LCL"/>
+      </Item3>
+      <Item4>
+        <PackageName Value="Laz_SqlitePassDbo_Runtime"/>
+      </Item4>
+      <Item5>
+        <PackageName Value="FCL"/>
+        <MinVersion Major="1" Valid="True"/>
+      </Item5>
+    </RequiredPkgs>
+    <UsageOptions>
+      <UnitPath Value="$(PkgOutDir)"/>
+    </UsageOptions>
+    <PublishOptions>
+      <Version Value="2"/>
+      <DestinationDirectory Value="$(TestDir)\publishedpackage\"/>
+      <IgnoreBinaries Value="False"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLitePassDriver_Lazarus_Windows.lpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLitePassDriver_Lazarus_Windows.lpk
new file mode 100644
index 0000000..a8fa43b
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_SQLitePassDriver_Lazarus_Windows.lpk	
@@ -0,0 +1,57 @@
+<?xml version="1.0"?>
+<CONFIG>
+  <Package Version="3">
+    <PathDelim Value="\"/>
+    <Name Value="DataAbstract_SQLitePassDriver_Lazarus_Windows"/>
+    <CompilerOptions>
+      <Version Value="5"/>
+      <PathDelim Value="\"/>
+      <SearchPaths>
+        <UnitOutputDirectory Value="..\..\Dcu\Lazarus\$(TargetCPU)-$(TargetOS)"/>
+      </SearchPaths>
+      <CodeGeneration>
+        <Generate Value="Faster"/>
+      </CodeGeneration>
+      <Other>
+        <CompilerPath Value="$(CompPath)"/>
+      </Other>
+    </CompilerOptions>
+    <Files Count="2">
+      <Item1>
+        <Filename Value="uDASQLitePassDriver.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="uDASQLitePassDriver"/>
+      </Item1>
+      <Item2>
+        <Filename Value="DataAbstract_SQLitePassDriver_Glyphs.lrs"/>
+        <Type Value="LRS"/>
+      </Item2>
+    </Files>
+    <Type Value="RunAndDesignTime"/>
+    <RequiredPkgs Count="5">
+      <Item1>
+        <PackageName Value="DataAbstract_Core_Lazarus_Windows"/>
+      </Item1>
+      <Item2>
+        <PackageName Value="LCL"/>
+      </Item2>
+      <Item3>
+        <PackageName Value="RemObjects_Core_Lazarus_Windows"/>
+      </Item3>
+      <Item4>
+        <PackageName Value="Laz_SqlitePassDbo_Runtime"/>
+      </Item4>
+      <Item5>
+        <PackageName Value="FCL"/>
+        <MinVersion Major="1" Valid="True"/>
+      </Item5>
+    </RequiredPkgs>
+    <UsageOptions>
+      <UnitPath Value="$(PkgOutDir)"/>
+    </UsageOptions>
+    <PublishOptions>
+      <Version Value="2"/>
+      <IgnoreBinaries Value="False"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D10.bdsproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D10.bdsproj
new file mode 100644
index 0000000..267567e
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D10.bdsproj	
@@ -0,0 +1,176 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality">Delphi.Personality</Option>
+			<Option Name="ProjectType"></Option>
+			<Option Name="Version">1.0</Option>
+			<Option Name="GUID">{D5CF0E18-5430-44E4-8B68-4D54B5F3535D}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource">DataAbstract_ZeosDriver_D10.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A">8</Compiler>
+			<Compiler Name="B">0</Compiler>
+			<Compiler Name="C">1</Compiler>
+			<Compiler Name="D">1</Compiler>
+			<Compiler Name="E">0</Compiler>
+			<Compiler Name="F">0</Compiler>
+			<Compiler Name="G">1</Compiler>
+			<Compiler Name="H">1</Compiler>
+			<Compiler Name="I">1</Compiler>
+			<Compiler Name="J">0</Compiler>
+			<Compiler Name="K">0</Compiler>
+			<Compiler Name="L">1</Compiler>
+			<Compiler Name="M">0</Compiler>
+			<Compiler Name="N">1</Compiler>
+			<Compiler Name="O">1</Compiler>
+			<Compiler Name="P">1</Compiler>
+			<Compiler Name="Q">0</Compiler>
+			<Compiler Name="R">0</Compiler>
+			<Compiler Name="S">0</Compiler>
+			<Compiler Name="T">0</Compiler>
+			<Compiler Name="U">1</Compiler>
+			<Compiler Name="V">1</Compiler>
+			<Compiler Name="W">1</Compiler>
+			<Compiler Name="X">1</Compiler>
+			<Compiler Name="Y">1</Compiler>
+			<Compiler Name="Z">1</Compiler>
+			<Compiler Name="ShowHints">True</Compiler>
+			<Compiler Name="ShowWarnings">True</Compiler>
+			<Compiler Name="UnitAliases"></Compiler>
+			<Compiler Name="NamespacePrefix"></Compiler>
+			<Compiler Name="GenerateDocumentation">False</Compiler>
+			<Compiler Name="DefaultNamespace"></Compiler>
+			<Compiler Name="SymbolDeprecated">False</Compiler>
+			<Compiler Name="SymbolLibrary">False</Compiler>
+			<Compiler Name="SymbolPlatform">False</Compiler>
+			<Compiler Name="SymbolExperimental">True</Compiler>
+			<Compiler Name="UnitLibrary">False</Compiler>
+			<Compiler Name="UnitPlatform">False</Compiler>
+			<Compiler Name="UnitDeprecated">False</Compiler>
+			<Compiler Name="UnitExperimental">True</Compiler>
+			<Compiler Name="HResultCompat">True</Compiler>
+			<Compiler Name="HidingMember">True</Compiler>
+			<Compiler Name="HiddenVirtual">True</Compiler>
+			<Compiler Name="Garbage">True</Compiler>
+			<Compiler Name="BoundsError">True</Compiler>
+			<Compiler Name="ZeroNilCompat">True</Compiler>
+			<Compiler Name="StringConstTruncated">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar">True</Compiler>
+			<Compiler Name="TypedConstVarPar">True</Compiler>
+			<Compiler Name="AsgToTypedConst">True</Compiler>
+			<Compiler Name="CaseLabelRange">True</Compiler>
+			<Compiler Name="ForVariable">True</Compiler>
+			<Compiler Name="ConstructingAbstract">True</Compiler>
+			<Compiler Name="ComparisonFalse">True</Compiler>
+			<Compiler Name="ComparisonTrue">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned">True</Compiler>
+			<Compiler Name="UnsupportedConstruct">True</Compiler>
+			<Compiler Name="FileOpen">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc">True</Compiler>
+			<Compiler Name="BadGlobalSymbol">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor">True</Compiler>
+			<Compiler Name="InvalidDirective">True</Compiler>
+			<Compiler Name="PackageNoLink">True</Compiler>
+			<Compiler Name="PackageThreadVar">True</Compiler>
+			<Compiler Name="ImplicitImport">True</Compiler>
+			<Compiler Name="HPPEMITIgnored">True</Compiler>
+			<Compiler Name="NoRetVal">True</Compiler>
+			<Compiler Name="UseBeforeDef">True</Compiler>
+			<Compiler Name="ForLoopVarUndef">True</Compiler>
+			<Compiler Name="UnitNameMismatch">True</Compiler>
+			<Compiler Name="NoCFGFileFound">True</Compiler>
+			<Compiler Name="MessageDirective">True</Compiler>
+			<Compiler Name="ImplicitVariants">True</Compiler>
+			<Compiler Name="UnicodeToLocale">True</Compiler>
+			<Compiler Name="LocaleToUnicode">True</Compiler>
+			<Compiler Name="ImagebaseMultiple">True</Compiler>
+			<Compiler Name="SuspiciousTypecast">True</Compiler>
+			<Compiler Name="PrivatePropAccessor">True</Compiler>
+			<Compiler Name="UnsafeType">False</Compiler>
+			<Compiler Name="UnsafeCode">False</Compiler>
+			<Compiler Name="UnsafeCast">False</Compiler>
+			<Compiler Name="OptionTruncated">True</Compiler>
+			<Compiler Name="WideCharReduced">True</Compiler>
+			<Compiler Name="DuplicatesIgnored">True</Compiler>  <Compiler Name="UnitInitSeq">True</Compiler>
+      <Compiler Name="LocalPInvoke">True</Compiler>
+      <Compiler Name="CodePage"></Compiler>
+    </Compiler>
+		<Linker>
+			<Linker Name="MapFile">0</Linker>
+			<Linker Name="OutputObjs">0</Linker>
+			<Linker Name="ConsoleApp">1</Linker>
+			<Linker Name="DebugInfo">False</Linker>
+			<Linker Name="RemoteSymbols">False</Linker>
+			<Linker Name="GenerateDRC">False</Linker>
+			<Linker Name="MinStackSize">16384</Linker>
+			<Linker Name="MaxStackSize">1048576</Linker>
+			<Linker Name="ImageBase">4194304</Linker>
+			<Linker Name="ExeDescription">RemObjects Data Abstract - Zeos Driver</Linker>  <Linker Name="GenerateHpps">False</Linker>
+    </Linker>
+		<Directories>
+			<Directories Name="OutputDir"></Directories>
+			<Directories Name="UnitOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDLLOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDCPOutputDir">..\..\Dcu\D10</Directories>
+			<Directories Name="SearchPath">..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10</Directories>
+			<Directories Name="Packages"></Directories>
+			<Directories Name="Conditionals"></Directories>
+			<Directories Name="DebugSourceDirs"></Directories>
+			<Directories Name="UsePackages">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams"></Parameters>
+			<Parameters Name="HostApplication"></Parameters>
+			<Parameters Name="Launcher"></Parameters>
+			<Parameters Name="UseLauncher">False</Parameters>
+			<Parameters Name="DebugCWD"></Parameters>
+			<Parameters Name="RemoteHost"></Parameters>
+			<Parameters Name="RemotePath"></Parameters>
+			<Parameters Name="RemoteLauncher"></Parameters>
+			<Parameters Name="RemoteCWD"></Parameters>
+			<Parameters Name="RemoteDebug">False</Parameters>  <Parameters Name="Debug Symbols Search Path"></Parameters>
+      <Parameters Name="LoadAllSymbols">True</Parameters>
+      <Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+    </Parameters>
+		<Language>
+			<Language Name="ActiveLang"></Language>
+			<Language Name="ProjectLang">$00000000</Language>
+			<Language Name="RootDir"></Language>
+		</Language>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+			<VersionInfo Name="MajorVer">1</VersionInfo>
+			<VersionInfo Name="MinorVer">0</VersionInfo>
+			<VersionInfo Name="Release">0</VersionInfo>
+			<VersionInfo Name="Build">0</VersionInfo>
+			<VersionInfo Name="Debug">False</VersionInfo>
+			<VersionInfo Name="PreRelease">False</VersionInfo>
+			<VersionInfo Name="Special">False</VersionInfo>
+			<VersionInfo Name="Private">False</VersionInfo>
+			<VersionInfo Name="DLL">False</VersionInfo>
+			<VersionInfo Name="Locale">1033</VersionInfo>
+			<VersionInfo Name="CodePage">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName">RemObjects Data Abstract</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+		</VersionInfoKeys>
+	</Delphi.Personality>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D10.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D10.cfg
new file mode 100644
index 0000000..207b254
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D10.cfg	
@@ -0,0 +1,49 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U+
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N0"..\..\Dcu\D10"
+-LE"..\..\Dcu\D10"
+-LN"..\..\Dcu\D10"
+-U"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-O"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-I"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-R"..\..\Dcu\D10;..\..\..\RemObjects SDK for Delphi\Dcu\D10"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D10.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D10.dpk
new file mode 100644
index 0000000..fa6c962
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D10.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_ZeosDriver_D10;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - Zeos Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  ZComponentDesign,  
+  RemObjects_Core_D10,
+  DataAbstract_Core_D10;
+
+contains
+  uDAZeosDriver in 'uDAZeosDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D10.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D10.res
new file mode 100644
index 0000000..6ef0ba1
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D10.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D11.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D11.dpk
new file mode 100644
index 0000000..8483957
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D11.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_ZeosDriver_D11;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - Zeos Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  ZComponentDesign,  
+  RemObjects_Core_D11,
+  DataAbstract_Core_D11;
+
+contains
+  uDAZeosDriver in 'uDAZeosDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D11.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D11.dproj
new file mode 100644
index 0000000..5711217
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D11.dproj	
@@ -0,0 +1,73 @@
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{a14f79c2-acbc-46d8-a339-5d13e7ddad81}</ProjectGuid>
+    <MainSource>DataAbstract_ZeosDriver_D11.dpk</MainSource>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+    <DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_ZeosDriver_D11.bpl</DCC_DependencyCheckOutputName>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DebugInformation>False</DCC_DebugInformation>
+    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+    <DCC_PentiumSafeDivide>True</DCC_PentiumSafeDivide>
+    <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_Define>RELEASE</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_PentiumSafeDivide>True</DCC_PentiumSafeDivide>
+    <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\..\Dcu\D11;..\..\..\RemObjects SDK for Delphi\Dcu\D11</DCC_IncludePath>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+  </PropertyGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Delphi.Personality</Borland.Personality>
+    <Borland.ProjectType>Package</Borland.ProjectType>
+    <BorlandProject>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">RemObjects Data Abstract - Zeos Driver</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">RemObjects Data Abstract</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">DataAbstract_ZeosDriver_D11.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
+  <ItemGroup>
+    <DelphiCompile Include="DataAbstract_ZeosDriver_D11.dpk">
+      <MainSource>MainSource</MainSource>
+    </DelphiCompile>
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\DataAbstract_Core_D11.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\dbrtl.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\RemObjects_Core_D11.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\rtl.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\vcl.dcp" />
+    <DCCReference Include="..\..\..\RemObjects SDK for Delphi\Source\DataSnap\ZComponentDesign.dcp" />
+    <DCCReference Include="uDAZeosDriver.pas" />
+  </ItemGroup>
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D11.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D11.res
new file mode 100644
index 0000000..6ef0ba1
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D11.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D12.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D12.dpk
new file mode 100644
index 0000000..7a4343f
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D12.dpk	
@@ -0,0 +1,38 @@
+package DataAbstract_ZeosDriver_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - Zeos Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  ZComponentDesign,
+  DataAbstract_Core_D12;
+
+contains
+  uDAZeosDriver in 'uDAZeosDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D12.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D12.dproj
new file mode 100644
index 0000000..22b6b80
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D12.dproj	
@@ -0,0 +1,97 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{a14f79c2-acbc-46d8-a339-5d13e7ddad81}</ProjectGuid>
+			<MainSource>DataAbstract_ZeosDriver_D12.dpk</MainSource>
+			<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+			<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+			<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_ZeosDriver_D11.bpl</DCC_DependencyCheckOutputName>
+			<ProjectVersion>11.1</ProjectVersion>
+			<Config Condition="'$(Config)'==''">Base</Config>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base)'!=''">
+			<DCC_SymbolReferenceInfo>1</DCC_SymbolReferenceInfo>
+			<DCC_CVT_WCHAR_TO_ACHAR>error</DCC_CVT_WCHAR_TO_ACHAR>
+			<DCC_UnitSearchPath>..;..\..\Dcu\D12;..\..\..\RemObjects SDK for Delphi\Dcu\D12;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+			<DCC_IMPLICIT_STRING_CAST>error</DCC_IMPLICIT_STRING_CAST>
+			<DCC_BplOutput>..\..\Dcu\D12</DCC_BplOutput>
+			<DCC_IMPLICIT_STRING_CAST_LOSS>error</DCC_IMPLICIT_STRING_CAST_LOSS>
+			<DCC_EXPLICIT_STRING_CAST_LOSS>error</DCC_EXPLICIT_STRING_CAST_LOSS>
+			<DCC_CVT_ACHAR_TO_WCHAR>error</DCC_CVT_ACHAR_TO_WCHAR>
+			<DCC_CVT_WIDENING_STRING_LOST>error</DCC_CVT_WIDENING_STRING_LOST>
+			<DCC_EXPLICIT_STRING_CAST>error</DCC_EXPLICIT_STRING_CAST>
+			<DCC_DcuOutput>..\..\Dcu\D12</DCC_DcuOutput>
+			<DCC_CVT_NARROWING_STRING_LOST>error</DCC_CVT_NARROWING_STRING_LOST>
+			<DCC_DcpOutput>..\..\Dcu\D12</DCC_DcpOutput>
+			<GenDll>true</GenDll>
+			<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+			<GenPackage>true</GenPackage>
+			<DCC_GenerateStackFrames>true</DCC_GenerateStackFrames>
+			<DesignOnlyPackage>false</DesignOnlyPackage>
+			<DCC_ImageBase>00400000</DCC_ImageBase>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D12\DataAbstract_ZeosDriver_D12.bpl</DCC_DependencyCheckOutputName>
+			<DCC_PentiumSafeDivide>true</DCC_PentiumSafeDivide>
+			<DCC_Description>RemObjects Data Abstract - Zeos Driver</DCC_Description>
+		</PropertyGroup>
+		<ItemGroup>
+			<DelphiCompile Include="DataAbstract_ZeosDriver_D12.dpk">
+				<MainSource>MainSource</MainSource>
+			</DelphiCompile>
+			<DCCReference Include="rtl.dcp"/>
+			<DCCReference Include="vcl.dcp"/>
+			<DCCReference Include="dbrtl.dcp"/>
+			<DCCReference Include="ZComponentDesign.dcp"/>
+			<DCCReference Include="DataAbstract_Core_D12.dcp"/>
+			<DCCReference Include="uDAZeosDriver.pas"/>
+			<BuildConfiguration Include="Base">
+				<Key>Base</Key>
+			</BuildConfiguration>
+		</ItemGroup>
+		<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+		<ProjectExtensions>
+			<Borland.Personality>Delphi.Personality.12</Borland.Personality>
+			<Borland.ProjectType>Package</Borland.ProjectType>
+			<BorlandProject>
+				<Delphi.Personality>
+					<Parameters>
+						<Parameters Name="UseLauncher">False</Parameters>
+						<Parameters Name="LoadAllSymbols">True</Parameters>
+						<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+					</Parameters>
+					<VersionInfo>
+						<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+						<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+						<VersionInfo Name="MajorVer">1</VersionInfo>
+						<VersionInfo Name="MinorVer">0</VersionInfo>
+						<VersionInfo Name="Release">0</VersionInfo>
+						<VersionInfo Name="Build">0</VersionInfo>
+						<VersionInfo Name="Debug">False</VersionInfo>
+						<VersionInfo Name="PreRelease">False</VersionInfo>
+						<VersionInfo Name="Special">False</VersionInfo>
+						<VersionInfo Name="Private">False</VersionInfo>
+						<VersionInfo Name="DLL">False</VersionInfo>
+						<VersionInfo Name="Locale">1033</VersionInfo>
+						<VersionInfo Name="CodePage">1252</VersionInfo>
+					</VersionInfo>
+					<VersionInfoKeys>
+						<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="FileDescription"/>
+						<VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys>
+						<VersionInfoKeys Name="InternalName"/>
+						<VersionInfoKeys Name="LegalCopyright">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="LegalTrademarks">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="OriginalFilename"/>
+						<VersionInfoKeys Name="ProductName">RemObjects Data Abstract</VersionInfoKeys>
+						<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+					</VersionInfoKeys>
+					<Source>
+						<Source Name="MainSource">DataAbstract_ZeosDriver_D12.dpk</Source>
+					</Source>
+				</Delphi.Personality>
+			</BorlandProject>
+			<ProjectFileVersion>12</ProjectFileVersion>
+		</ProjectExtensions>
+	</Project>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D12.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D12.res
new file mode 100644
index 0000000..6ef0ba1
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D12.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D6.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D6.cfg
new file mode 100644
index 0000000..0aa2cb6
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D6.cfg	
@@ -0,0 +1,41 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U+
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D6"
+-LE"..\..\Dcu\D6"
+-LN"..\..\Dcu\D6"
+-U"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-O"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-I"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-R"..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6"
+-Z
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D6.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D6.dof
new file mode 100644
index 0000000..1972ae0
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D6.dof	
@@ -0,0 +1,77 @@
+[FileVersion]
+Version=6.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=1
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitDeprecated=0
+UnitLibrary=0
+UnitPlatform=0
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=Data Abstract - Zeos Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D6
+PackageDLLOutputDir=..\..\Dcu\D6
+PackageDCPOutputDir=..\..\Dcu\D6
+SearchPath=..\..\Dcu\D6;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D6
+Packages=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software, Inc.
+FileDescription=
+FileVersion=1.0.0.0
+InternalName=
+LegalCopyright=RemObjects Software, Inc.
+LegalTrademarks=RemObjects Software, Inc.
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+Comments=http://www.remobjects.com
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D6.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D6.dpk
new file mode 100644
index 0000000..95dba7c
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D6.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_ZeosDriver_D6;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - Zeos Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  ZComponentDesign,
+  RemObjects_Core_D6,
+  DataAbstract_Core_D6;
+
+contains
+  uDAZeosDriver in 'uDAZeosDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D6.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D6.res
new file mode 100644
index 0000000..b26b84e
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D6.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D7.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D7.cfg
new file mode 100644
index 0000000..a290ad9
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D7.cfg	
@@ -0,0 +1,50 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U+
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D7"
+-LE"..\..\Dcu\D7"
+-LN"..\..\Dcu\D7"
+-U"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-O"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-I"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-R"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D7.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D7.dof
new file mode 100644
index 0000000..cb208b6
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D7.dof	
@@ -0,0 +1,117 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=1
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects Data Abstract - Zeos Driver
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D7
+PackageDLLOutputDir=..\..\Dcu\D7
+PackageDCPOutputDir=..\..\Dcu\D7
+SearchPath=..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7
+Packages=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software, Inc.
+FileDescription=
+FileVersion=1.0.0.0
+InternalName=
+LegalCopyright=RemObjects Software, Inc.
+LegalTrademarks=RemObjects Software, Inc.
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+Comments=http://www.remobjects.com
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D7.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D7.dpk
new file mode 100644
index 0000000..9cac616
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D7.dpk	
@@ -0,0 +1,39 @@
+package DataAbstract_ZeosDriver_D7;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE ON}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - Zeos Driver'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl,
+  RemObjects_Core_D7,
+  DataAbstract_Core_D7,
+  ZComponentDesign;
+
+contains
+  uDAZeosDriver in 'uDAZeosDriver.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D7.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D7.res
new file mode 100644
index 0000000..b26b84e
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_D7.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_Glyphs.lrs b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_Glyphs.lrs
new file mode 100644
index 0000000..5e84941
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_Glyphs.lrs	
@@ -0,0 +1,165 @@
+LazarusResources.Add('TDAZEOSDriver','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#0#255'@'#0#0'@'#0#0'@'#0#0'@'
+  +#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0'@'#0#0#255#0#255
+  +#255#0#255#255#0#255#255#0#255#129#30#0'w'#23#0'w'#23#0#255#0#255#255#0#255
+  +#255#0#255#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0
+  +#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0'@'#0#0#255#0#255#255#0#255#129#30#0
+  +#129#30#0#129#30#0#252#154'*'#184':'#0#184':'#0#128'*'#3#255#0#255#128#0#0
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#128#0#0'@'#0#0#255#0
+  +#255#130#24#0#129#30#0#248'w'#0#255#129#0#255#149#19#255#170'4'#255#189'Z'
+  +#138#31#0#255#0#255#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0#255#255#255
+  +#255#255#255#128#0#0#255#255#255#255#255#255#128#0#0#255#255#255#128#0#0'@'#0
+  +#0#5'f'#149#130#24#0'y'#16#0#255#158' '#252'w'#0#143#30#0#213'g'#10#255#171
+  +'8'#138#31#0#255#0#255#128#0#0#255#255#255#128#0#0#255#255#255#255#255#255
+  +#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0#128#0#0#255#255#255#128#0#0'@'#0
+  +#0#130#24#0#130#24#0#221#152'Z'#255#191']'#186'M'#5#255#0#255'v'#12#0#242#134
+  +#20#252#160'4'#138#31#0#128#0#0#255#255#255#128#0#0#255#255#255#255#255#255
+  +#128#0#0#255#255#255#128#0#0#255#255#255#255#255#255#128#0#0#0'R'#143#0'6o'#9
+  +'o'#164'W9'#23#171'3'#0#233#171'n'#255#215#146#193'e%'#255#0#255'v'#12#0#242
+  +'w'#1#255#150#25#138#31#0#128#0#0#255#255#255#128#0#0#128#0#0#128#0#0#255#255
+  +#255#255#255#255#255#255#255#128#0#0#0'R'#143#0'R'#143#0'R'#143#6#140#194'I'
+  +#221#255#0'v'#186#0'v'#186'YVE'#255#218#154#233#170'j'#145'%'#0#193'M'#0#255
+  +'~'#0#138#31#0#255#0#255#128#0#0#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#0'6p'#0'j'#161#2#199#255
+  +#9#202#255''''#212#255'N'#222#255'y'#233#255#0'v'#186#255#218#154#255#218#154
+  +#255#211#137#255#177'C'#255#138#7#138#31#0#255#0#255#128#0#0#128#0#0#128#0#0
+  +#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#128#0#0#0'9u'#4'v'#170'('#212#255#0
+  +#158#218#0'N'#138#22#163#212'R'#224#255#0'v'#186#196'f#'#203'g'#25#255#218
+  +#154#184':'#0#184':'#0#184':'#0#255#0#255#255#0#255#2't'#169'['#213#226'i'
+  +#246#254'E'#230#254'%'#215#254#13#199#254#26#204#254#0';v'#11#128#176#156#233
+  +#254'h'#230#255'#'#165#212#0'A~'#0'F'#129'0'#215#255'M'#215#254'%_p'#184':'#0
+  +#184':'#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#2't'#169'['#213
+  +#226''#247#254'z'#238#254'}'#233#254#135#231#255#163#237#255#0';v'#3'{'#176
+  +#165#235#254#167#243#255'^'#193#226#0'L'#138#0'N'#138#19#204#255'-'#206#252
+  +#13'b'#145#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#2't'#169#160#233#239#170#238#246'p'#207#229'?'#177#211#29#149#192#17#131
+  +#177#15'{'#170#0'@z'#24#150#196#182#246#255'~'#212#238#3'g'#157#13#182#235#1
+  +#198#255#13'b'#145#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#3'p'#164'T'#177#202'('#156#188'&'#171#207#27#182#224
+  +#12#183#237#24#198#247':'#213#254#0'A~'#27#153#196#181#244#255#182#246#255
+  +#154#240#255'N'#222#255#13#202#255#13'b'#145#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#4'l'#158'?'#180#203'f'#242
+  +#251'E'#230#254'%'#215#254#13#199#254#26#204#254';'#215#255'`'#225#255#0'Ay'
+  +#0'E~;'#175#213#182#246#255#13'b'#145#13'b'#145#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#2's'#167'['#213
+  +#226'i'#246#254'E'#230#254'%'#215#254#13#199#254#26#204#254';'#215#255'`'#225
+  +#255'}'#229#252'Q'#199#233#0'A{'#0'E{'#1'z'#180#5'f'#149#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#2't'
+  +#169'['#213#226'i'#246#254'E'#230#254'%'#215#254#13#199#254#26#204#254#128
+  +#128#128#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#255#0#255#255#0#255#2't'#169'['#213#226'i'#246#254'E'#230
+  +#254'%'#215#254#13#199#254#26#204#254#128#128#128#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#0#0#0#255#0#255#255#0
+  +#255#2't'#169'['#213#226'i'#246#254'E'#230#254'%'#215#254#13#199#254#26#204
+  +#254#128#128#128#255#255#255#255#255#255#255#255#255#255#255#255#128#0#0#128
+  +#0#0#128#0#0#128#0#0#128#0#0#255#255#255#255#255#255#255#255#255#255#255#255
+  +#0#0#0#255#0#255#255#0#255#2't'#169'['#213#226'i'#246#254'E'#230#254'%'#215
+  +#254#13#199#254#26#204#254#128#128#128#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#128#0#0#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#0#0#0#255#0#255#255#0#255#2't'#169
+  +'c'#213#226#152#250#254#159#247#255#146#247#254#149#255#254#130#255#254#128
+  +#128#128#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#128#0#0#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  ,#255#255#0#0#0#255#0#255#255#0#255#2't'#169#178#213#227#248#255#255#221#255
+  +#255#193#255#255#166#255#254#142#255#254#128#128#128#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#128#0#0#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#0#0#0#255#0#255#255#0
+  +#255#2't'#169'M'#156#187#235#244#248#242#255#255#213#255#255#186#255#254#159
+  +#255#254#128#128#128#255#255#255#255#255#255#255#255#255#255#255#255#128#0#0
+  +#128#0#0#128#0#0#128#0#0#128#0#0#255#255#255#255#255#255#255#255#255#255#255
+  +#255#0#0#0#255#0#255#255#0#255#255#0#255#2't'#169#5'x'#172'b'#175#201'b'#175
+  +#201#142#213#227'{'#213#226#128#128#128#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#0#0#0#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#2't'#169#2't'#169#2't'#169#2't'#169#128#128#128#128
+  +#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128#128#255#0#255
+]);
+LazarusResources.Add('TDAZEOSDriver32','BMP',[
+  'BM6'#8#0#0#0#0#0#0'6'#4#0#0'('#0#0#0' '#0#0#0' '#0#0#0#1#0#8#0#0#0#0#0#0#4#0
+  +#0#0#0#0#0#0#0#0#0#0#1#0#0#0#1#0#0#255#0#255#0''#28#0#0'2Yb'#0#30'i|'#0'1v'
+  +#0'__C'#0'Yue'#0'`wa'#0#129#29#0#0#133'"'#1#0#139'%'#0#0#142'-'#9#0#148'-'#0
+  +#0#149'2'#6#0#156'3'#0#0#149'7'#15#0#145'4'#19#0#150'8'#17#0#148':'#27#0#160
+  +'5'#0#0#164'8'#1#0#151'K'#15#0#158'R'#14#0#155'P'#30#0#172'@'#0#0#175'L'#13#0
+  +#177'D'#1#0#177'I'#0#0#186'L'#0#0#176'O'#12#0#166'H'#18#0#160'G'#30#0#175'U'
+  +#27#0#175'g'#18#0#150'C)'#0#128'[/'#0#155'M8'#0#158'P8'#0#173'V"'#0#175']-'#0
+  +#161'P0'#0#189'c"'#0#179'd7'#0#176'c9'#0#196'U'#1#0#192'W'#11#0#193'\'#9#0
+  +#209'Z'#0#0#199'\'#16#0#199'd'#3#0#204'b'#3#0#199'l'#4#0#202'm'#7#0#197'n'#8
+  +#0#211'c'#0#0#221'e'#0#0#214'i'#0#0#219'k'#0#0#216'k'#8#0#218'q'#15#0#221'x'
+  +#14#0#199'c'#19#0#208'm'#21#0#220'm'#16#0#204'r'#17#0#213'v'#23#0#229'k'#0#0
+  +#233'o'#1#0#224'm'#10#0#233'v'#2#0#247'z'#0#0#165'^H'#0#166'bN'#0#179'vd'#0
+  +#181'|l'#0#193'{M'#0'g'#137'l'#0's'#141'b'#0'd'#156'y'#0's'#144'u'#0'|'#157
+  +'v'#0'o'#163'}'#0#254#129#0#0#245#131#8#0#247#137#12#0#252#137#9#0#248#137#18
+  +#0#255#147#16#0#250#149#28#0#255#153#27#0#222#130')'#0#225#135''''#0#255#155
+  +'"'#0#249#148'*'#0#247#157'.'#0#251#154'+'#0#255#160'&'#0#255#161','#0#247
+  +#161'6'#0#254#165'4'#0#245#163'>'#0#255#169'<'#0#154#134'@'#0#149#142'O'#0
+  +#164#140'M'#0#162#150'\'#0#135#144'v'#0#188#135'l'#0#163#151'`'#0#164#169'x'
+  +#0#205#132'H'#0#209#137'F'#0#219#143'H'#0#198#132'W'#0#213#147'V'#0#216#149
+  +'S'#0#226#148'B'#0#248#162'E'#0#255#172'B'#0#255#177'L'#0#243#170'P'#0#255
+  +#180'S'#0#255#185'\'#0#238#182'j'#0#241#178'a'#0#254#187'b'#0#249#189'l'#0
+  +#242#187'q'#0#255#193'l'#0#255#196'r'#0#255#201'~'#0#4'e'#148#0#10'f'#149#0#7
+  +'i'#150#0#10'h'#150#0#7'o'#158#0#11'l'#153#0#19'l'#153#0#10'p'#157#0#23'r'
+  +#158#0#11'u'#165#0#9''#175#0#20'y'#162#0#0'~'#186#0'&z'#162#0#29#132#170#0#0
+  +#129#189#0#22#138#177#0#24#147#188#0'*'#134#171#0'3'#143#165#0'7'#132#169#0
+  +';'#134#171#0'>'#136#172#0' '#141#178#0'<'#141#176#0'5'#173#171#0'/'#170#181
+  +#0'?'#172#180#0'3'#160#190#0'+'#176#184#0'R'#152#134#0'y'#153#131#0'K'#161
+  +#146#0'l'#166#130#0'C'#140#175#0'Y'#152#184#0'c'#159#188#0'K'#175#169#0'e'
+  +#160#189#0#6#138#195#0#9#147#201#0'#'#159#200#0#29#161#210#0#25#175#217#0'%'
+  +#177#211#0'?'#183#219#0#15#187#235#0':'#185#224#0'Z'#171#197#0'D'#183#204#0
+  +'f'#163#192#0'z'#174#198#0'l'#188#209#0#30#194#234#0#10#197#253#0#15#204#254
+  +#0#16#197#246#0#16#203#254#0#30#205#254#0'('#201#238#0')'#213#246#0'#'#213
+  +#253#0'6'#213#254#0'7'#228#254#0':'#224#254#0'F'#195#215#0'W'#199#216#0'\'
+  +#209#223#0'j'#202#218#0'q'#198#216#0'_'#209#238#0'O'#221#255#0'R'#218#253#0
+  +'`'#210#239#0'I'#232#253#0'R'#236#253#0'['#242#254#0'o'#231#238#0'i'#230#252
+  +#0's'#237#254#0'b'#242#254#0'm'#247#254#0'n'#248#254#0'z'#242#252#0'v'#251
+  +#254#0'|'#250#253#0#132#167#132#0#242#194#133#0#248#198#133#0#254#203#131#0
+  +#243#198#139#0#246#203#141#0#255#209#144#0#253#213#154#0#254#218#163#0#255
+  +#220#169#0#255#225#181#0#255#228#187#0#129#178#201#0#154#224#234#0#129#230
+  +#251#0#143#247#254#0#130#254#254#0#139#255#254#0#150#255#254#0#167#236#243#0
+  +#164#255#254#0#169#252#254#0#180#254#253#0#187#255#254#0#255#230#195#0#255
+  +#232#197#0#255#235#205#0#255#237#211#0#255#239#216#0#255#240#218#0#194#221
+  +#232#0#201#225#234#0#200#255#254#0#211#255#255#0#255#243#226#0#255#245#233#0
+  +#255#248#239#0#229#254#255#0#251#253#253#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#180
+  +#0#0#0'j'#13#11#16#18#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#135#131#131#131#131
+  +#135#135#135#3#1#1#9'|{'#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#146#131#131#170#174
+  +#177#177#159'O'#162'j'#18#1#1')zl'#5#0#0#0#0#0#0#0#0#0#0#0#0#135#135#176#206
+  +#195#189#188#159#26#12#12'/,'#14#25'bwz'#128'K#'#5#5#5#0#0#0#0#0#0#0#0#131
+  +#208#213#206#195#192#188'L'#19#9#19'W\\`cewz~'#222#224#226#11#0#0#0#0#0#0#0#0
+  +#135#216#213#206#195#192#188#161#24#12#19'acaaacew}'#129#220#222'"'#0#0#0#0#0
+  +#0#0#0#135#216#213#206#195#192#188#160#28#19#12'awcaaacey}'#129'rj'#0#0#0#0#0
+  +#0#0#0#135#216#213#206#195#192#188#156','#19#19'd~w`S.=^ey}nH'#0#0#0#0#0#0#0
+  +#0#135#234#213#206#195#192'N1'#28#26'p'#220#223#128'S'#27#12#1#13'cvy}('#5#0
+  +#0#0#0#0#0#0#135#216#213#206#195'Q6,0'#218#228#241#226#128';'#6#21#9#1'>cvy~'
+  +'K#'#0#0#0#0#0#0#135#216#213#206#195'f6/t'#241#251#246#241#130'>'#150'#'#12#9
+  +'.cevz'#128#16#0#0#0#0#0#0#135#216#213#206#195#164'77?'#224#244#251#246#225
+  +'['#6#22#19#12'Daeewt('#0#0#0#0#0#0#135#234#213#206#195#191'g67?'#219#242#251
+  +#244#128'.'#26#20#26'Uccc['#31#0#0#0#0#0#0#0#135#216#216#232#238#239#236'l8B'
+  +'D'#226#252#251#241'~ZAYcccY'#30#0#0#0#0#0#0#0#0#135#240#230#179#149#134#131
+  +#3'9EC'#224#252#252#251#242#225#220#220'}vcV('#0#0#0#0#0#0#0#0#135#149#131
+  +#147#175#184#187#163'EFV'#227#253#253#252#251#244#228#224#220'}vU'#23#0#0#0#0
+  +#0#0#0#0#131#159#209#207#195#192#186'MFFa'#241#246#241#242#251#251#244#226
+  +#128'wvU'#21#0#0#0#0#0#0#0#0#135#216#213#206#195#192#188#163'9F;~x]u'#227#252
+  +#246#220'A><1h'#0#0#0#0#0#0#0#0#135#216#213#206#195#192#188#186#168'P'#217'i'
+  ,'4FF'#128#246#241't'#5#0#0#0#0#0#0#0#0#0#0#0#0#135#216#213#206#195#192#188
+  +#187#189#193#202#209'mBRV'#226#222'!'#131#0#0#0#0#0#0#0#0#0#0#0#0#135#216#213
+  +#206#195#192#188#187#189#193#202#209#231'h54>@'#4#131#0#0#0#0#0#0#0#0#0#0#0#0
+  +#135#234#213#206#195#192#188#187#189#193#202#209#231#204#176#172#147#141#143
+  +#131#0#0#0#0#0#0#0#0#0#0#0#0#135#216#213#206#195#192#188#187#189#193#202#209
+  +#231#204#178#173#170#143#143#131#0#0#0#0#0#0#0#0#0#0#0#0#135#216#213#206#195
+  +#192#188#187#189#193#202#209#231#204#178#173#170#143#143#131#0#0#0#0#0#0#0#0
+  +#0#0#0#0#135#216#213#206#195#192#188#185#189#193#202#209#231#204#178#173#170
+  +#146#143#131#0#0#0#0#0#0#0#0#0#0#0#0#135#216#213#210#210#216#214#213#216#216
+  +#216#216#216#216#201#178#171#143#143#131#0#0#0#0#0#0#0#0#0#0#0#0#135#240#254
+  +#254#249#240#237#232#216#216#234#216#234#216#216#213#206#190#171#131#0#0#0#0
+  +#0#0#0#0#0#0#0#0#135#255#255#254#254#240#239#237#234#216#234#216#216#234#216
+  +#216#211#205#192#131#0#0#0#0#0#0#0#0#0#0#0#0#131#248#255#255#254#250#240#238
+  +#235#216#234#216#234#216#234#216#213#211#175#131#0#0#0#0#0#0#0#0#0#0#0#0#143
+  +#132#169#247#255#254#249#240#238#232#216#234#216#234#216#234#198#154#131#179
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#135#131#139#155#179#183#200#199#198#197#180#159
+  +#145#134#131#152#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#154#152#139#139#132
+  +#132#139#144#155#169#0#0#0#0#0#0#0#0#0#0#0
+]);
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_Glyphs.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_Glyphs.res
new file mode 100644
index 0000000..92bfe89
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_Glyphs.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_Lazarus_Mac.lpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_Lazarus_Mac.lpk
new file mode 100644
index 0000000..091b32e
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_Lazarus_Mac.lpk	
@@ -0,0 +1,50 @@
+<?xml version="1.0"?>
+<CONFIG>
+  <Package Version="3">
+    <Name Value="DataAbstract_ZeosDriver_Lazarus_Mac"/>
+    <CompilerOptions>
+      <Version Value="8"/>
+      <SearchPaths>
+        <UnitOutputDirectory Value="../units/$(TargetCPU)-$(TargetOS)"/>
+      </SearchPaths>
+      <Other>
+        <CompilerPath Value="$(CompPath)"/>
+      </Other>
+    </CompilerOptions>
+    <Description Value="RemObjects Data Abstract - Zeos Driver"/>
+    <Files Count="2">
+      <Item1>
+        <Filename Value="DataAbstract_ZeosDriver_Glyphs.lrs"/>
+        <Type Value="LRS"/>
+      </Item1>
+      <Item2>
+        <Filename Value="uDAZeosDriver.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="uDAZeosDriver"/>
+      </Item2>
+    </Files>
+    <Type Value="RunAndDesignTime"/>
+    <RequiredPkgs Count="4">
+      <Item1>
+        <PackageName Value="DataAbstract_Core_Lazarus_Mac"/>
+      </Item1>
+      <Item2>
+        <PackageName Value="zcomponent"/>
+      </Item2>
+      <Item3>
+        <PackageName Value="LCL"/>
+      </Item3>
+      <Item4>
+        <PackageName Value="FCL"/>
+        <MinVersion Major="1" Valid="True"/>
+      </Item4>
+    </RequiredPkgs>
+    <UsageOptions>
+      <UnitPath Value="$(PkgOutDir)/"/>
+    </UsageOptions>
+    <PublishOptions>
+      <Version Value="2"/>
+      <IgnoreBinaries Value="False"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_Lazarus_Unix.lpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_Lazarus_Unix.lpk
new file mode 100644
index 0000000..ca75cdb
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_Lazarus_Unix.lpk	
@@ -0,0 +1,56 @@
+<?xml version="1.0"?>
+<CONFIG>
+  <Package Version="3">
+    <PathDelim Value="\"/>
+    <Name Value="DataAbstract_ZeosDriver_Lazarus_Unix"/>
+    <CompilerOptions>
+      <Version Value="5"/>
+      <PathDelim Value="\"/>
+      <SearchPaths>
+        <UnitOutputDirectory Value="..\units\$(TargetCPU)-$(TargetOS)"/>
+      </SearchPaths>
+      <CodeGeneration>
+        <Generate Value="Faster"/>
+      </CodeGeneration>
+      <Other>
+        <CompilerPath Value="$(CompPath)"/>
+      </Other>
+    </CompilerOptions>
+    <Description Value="RemObjects Data Abstract - Zeos Driver"/>
+    <Files Count="2">
+      <Item1>
+        <Filename Value="DataAbstract_ZeosDriver_Glyphs.lrs"/>
+        <Type Value="LRS"/>
+      </Item1>
+      <Item2>
+        <Filename Value="uDAZeosDriver.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="uDAZeosDriver"/>
+      </Item2>
+    </Files>
+    <Type Value="RunAndDesignTime"/>
+    <RequiredPkgs Count="4">
+      <Item1>
+        <PackageName Value="DataAbstract_Core_Lazarus_Unix"/>
+      </Item1>
+      <Item2>
+        <PackageName Value="zcomponent"/>
+      </Item2>
+      <Item3>
+        <PackageName Value="LCL"/>
+      </Item3>
+      <Item4>
+        <PackageName Value="FCL"/>
+        <MinVersion Major="1" Valid="True"/>
+      </Item4>
+    </RequiredPkgs>
+    <UsageOptions>
+      <UnitPath Value="$(PkgOutDir)\"/>
+    </UsageOptions>
+    <PublishOptions>
+      <Version Value="2"/>
+      <DestinationDirectory Value="$(TestDir)\publishedpackage\"/>
+      <IgnoreBinaries Value="False"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_Lazarus_Windows.lpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_Lazarus_Windows.lpk
new file mode 100644
index 0000000..4a5c1ef
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/DataAbstract_ZeosDriver_Lazarus_Windows.lpk	
@@ -0,0 +1,57 @@
+<?xml version="1.0"?>
+<CONFIG>
+  <Package Version="3">
+    <PathDelim Value="\"/>
+    <Name Value="DataAbstract_ZeosDriver_Lazarus_Windows"/>
+    <CompilerOptions>
+      <Version Value="5"/>
+      <PathDelim Value="\"/>
+      <SearchPaths>
+        <UnitOutputDirectory Value="..\..\Dcu\Lazarus\$(TargetCPU)-$(TargetOS)"/>
+      </SearchPaths>
+      <CodeGeneration>
+        <Generate Value="Faster"/>
+      </CodeGeneration>
+      <Other>
+        <CompilerPath Value="$(CompPath)"/>
+      </Other>
+    </CompilerOptions>
+    <Files Count="2">
+      <Item1>
+        <Filename Value="DataAbstract_ZeosDriver_Glyphs.lrs"/>
+        <Type Value="LRS"/>
+      </Item1>
+      <Item2>
+        <Filename Value="uDAZeosDriver.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="uDAZeosDriver"/>
+      </Item2>
+    </Files>
+    <Type Value="RunAndDesignTime"/>
+    <RequiredPkgs Count="5">
+      <Item1>
+        <PackageName Value="DataAbstract_Core_Lazarus_Windows"/>
+      </Item1>
+      <Item2>
+        <PackageName Value="RemObjects_Core_Lazarus_Windows"/>
+      </Item2>
+      <Item3>
+        <PackageName Value="zcomponent"/>
+      </Item3>
+      <Item4>
+        <PackageName Value="LCL"/>
+      </Item4>
+      <Item5>
+        <PackageName Value="FCL"/>
+        <MinVersion Major="1" Valid="True"/>
+      </Item5>
+    </RequiredPkgs>
+    <UsageOptions>
+      <UnitPath Value="$(PkgOutDir)\"/>
+    </UsageOptions>
+    <PublishOptions>
+      <Version Value="2"/>
+      <IgnoreBinaries Value="False"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/asgsqlite3.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/asgsqlite3.pas
new file mode 100644
index 0000000..6220b65
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/asgsqlite3.pas	
@@ -0,0 +1,5560 @@
+// To enable debugging remove the dot. Do NOT forget to re-insert before
+// deploying to production since this feature will slow down this component
+// significantly
+{.$DEFINE DEBUG_ENABLED } // Enables Debug information
+ {.$DEFINE DEBUG_VERY_LOUD}
+ {.$DEFINE DEBUG_LOUD}
+
+// Disable this for ignoring IProvider interface (for D4)
+{$DEFINE IPROVIDER}
+
+// enable this if you want to link the SQLite library statically. (No need for dll)
+{.$DEFINE SQLite_Static}
+
+{$I asqlite_def.inc}
+
+unit ASGSQLite3;
+{*_* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
+
+Author:       Albert Drent
+Description:  SQLite 3 DataSet class (encapsulates the Delphi DataSet Class)
+              based upon the asqlite version for sqlite 2
+Target:       Delphi 4, 5, 6 and 7; Delphi 2005; Borland C++ 5 and 6
+Creation:     November 2003
+Version:      2006.03.D Stable
+EMail:        a.drent@aducom.com (www.aducom.com/sqlite, sqlite.aducom.com)
+Support:      support@aducom.com (supportforum on www.aducom.com)
+              Please post any questions, remarks etc. to the support forum. We
+              useually answer questions within days.
+              Unsollicited mail to support will be intercepted by our spamfilters
+              and probabely never be heard of.
+Legal issues: Copyright (C) 2003..2006 by Aducom Software
+
+              Aducom Software
+              Eckhartstr 61
+              9746 BN  Groningen
+              Netherlands
+
+              Open Source licence (BSD: http://www.opensource.org/licenses/bsd-license.php)
+
+              Copyright (c) 2006, Aducom Software
+              All rights reserved.
+
+              Redistribution and use in source and binary forms, with or without modification,
+              are permitted provided that the following conditions are met:
+
+              Redistributions of source code must retain the above copyright notice,
+              this list of conditions and the following disclaimer.
+              Redistributions in binary form must reproduce the above copyright notice,
+              this list of conditions and the following disclaimer in the documentation
+              and/or other materials provided with the distribution.
+              Neither the name of Aducom Software nor the names of its contributors
+              may be used to endorse or promote products derived from this software
+              without specific prior written permission.
+              THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
+              "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
+              TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
+              PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
+              COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT,
+              INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+              DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
+              GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+              HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
+              STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
+              IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
+              POSSIBILITY OF SUCH DAMAGE.
+
+
+Acknowledgement
+              These components were written for our own needs. Since SQLite is
+              a freeware component we like to donate this one to the community
+              too. Parts of the code is adapted from several sources, but mainly
+              from a sample and the vcl sources of Borland itself. And, of
+              course, we did a lot and still are...
+To Do
+              A lot...
+              We are very busy, but will develop on our needs. If anyone can
+              contribute, please feel welcome. Alter the source with lots of comment
+              and mail it to me. If it works right I will add it to the official
+              source and add your credit here below. Before you start, please
+              put a request on the forum. It would be a shame and a waste of your
+              time if you develop something which already is... and I need to set
+              the spamfilter right to let you pass through.
+History:
+              Nov 8, 2003 First alpha release 1.0.A Albert Drent (c) 2003 Aducom Software
+              Nov 11, Release alpha 1.0.B Albert Drent (c) 2003 Aducom Software
+                        - added 'param' support
+                        - fixed null pointer assignment
+                        - added support for partial select (limit / offset)
+              Nov 12, Release alpha 1.0.C Albert Drent (c) 2003 Aducom Software
+                        - fixed bug in update
+                        - support for events
+                        - added 'RowsAffected'
+              Nov 16, Release beta 1.0.D Albert Drent (c) 2003 Aducom Software
+                        - fixed 0 resultlist after any ExecSQL usage
+                        - added Transaction support
+              Nov 24, Release beta 1.0.E Albert Drent (c) 2003 Aducom Software
+                        - StartTransaction will open database if it is'nt already open
+                        - Changed resultset method
+                        - Added property editor for table names
+                        - Added GetTableNames function to TASQLite3Database
+                        - Added GetIndexNames function to TASQLite3Database
+                        - Added Open and Close function to TASQLite3Database
+                        - Added AutoCommit property to TDataSet descendants
+                        - Split of source in designtime and runtime package
+              Dec 15, Release beta 1.0.F Albert Drent (c) 2003 Aducom Software
+                        - Optimized code for speed
+                        - Added support for quering databases
+                        - Added property for base directory (default dir) TDatabase
+                        - Preparations for mastersets and TUpdateSQL (not functional yet)
+                        - Solved GPF on stringfields
+                        - Solved hangup of Delphi when developing
+                        - Solved invalid pointer operation bug while developing
+              Jan 11 2004, Release beta 1.0.G Albert Drent (c) 2003, 2004 Aducom Software
+                        - Fixed GetTableNames Bug as reported on forum
+                        - Solved some minor bugs, several code optimizations
+                        - Added 'getfieldnames' procedure to asqlitedb
+                        - Added component asqlitepragma for adjustments to sqlite behaviour
+                        - Added several property editors to smooth things up
+                        - Added component asqliteupdatesql
+                        - Added master-detail support for TASQLite3table (not fully tested yet)
+                        - Added master-detail support for TASQLite3query (not fully tested yet)
+                        - Added filter property to TASQLite3Query
+              Jan 18, 2004, Release beta 1.0.H Albert Drent (c) 2003, 2004 Aducom Software
+                        - Added TASQLite3Log component
+                        - Support for autoincrement (index primary key)
+              Jan 22, 2004, Release beta 1.0.I Albert Drent (c) 2003, 2004 Aducom Software
+                        - Solved bug, causing the user to open database first (where
+                          it should be opened automatically after open query or table.
+                        - datatype text is now treated as a string of max 255 chars.
+                        - added samples
+                        - added preparations for import and export component
+              Jan 26, 2004, Release beta 1.1.A Albert Drent (c) 2003, 2004 Aducom Software
+                        - Support for master-detail
+                        - Support for TUpdateSQL
+              Feb 05, 2004, Release beta 1.1.B Albert Drent (c) 2003, 2004 Aducom Software
+                        - Solved small bug: basequery is closed on querychanged event
+                        - Solved small bug: basequery is closed on filter change event
+                        - Solved bug in design package, by Marc Wetzel(forum)
+                        - Notification of BaseQuery removed and added to SQLiteTable
+              Feb 24, 2004 Release alpha 1.2.A Albert Drent (c) 2003, 2004 Aducom Software
+                        - Locate implemented, working on resultset!
+                        - Some small bugfixes
+              Feb 25, 2004 Release alpha 1.2.B Albert Drent (c) 2003, 2004 Aducom Software
+                        - Reformat of source (Marc Wetzel)
+                        - All the debug directives (Marc Wetzel)
+                          The debug stuff is added to be able to do more debugging on the
+                          components. At this stage there are still some isues which are
+                          hard to be find.
+                        - Some small bugfixes (Marc Wetzel)
+                        - Solved bug with dblookupcombobox, lookup is now shown (variant error)
+                        - Derived more classes from TDataset to solve compatibility isues with
+                          3rd party software (DevExpress)
+                        - Start of port to lower Delphi versions (designintf vs dsgnintf)
+              March 25, 2004 Release alpha 1.2.C Albert Drent (c) 2003, 2004 Aducom Software
+                        - Added property editor for database directory
+                        - Added property editor for sqlitedll directory
+                        - Bugix needed for release 13 of SQLite.dll (is compatible to lower
+                          dll versions)
+                        - More changes to solve compatibility problem with DevExpress (Plato of DevExpress)
+                        - Solved some compatibility isues with TDataSet
+                        - Solved some compatibility isues with the newest SQLite version (2.8.12)
+                        - Added/modified, GetFieldNames, GetPrimaryKeys
+                        - Added GetTableInfo
+                        - Added StartTransaction and Commit and RollBack to TTable and TQuery
+                          This will create a more readable source:
+                             db.starttranaction;
+                             q.somesql
+                             db.commit
+                          becomes now
+                             with q do begin
+                               starttransaction;
+                               somesql;
+                               try
+                                 commit;
+                               except
+                                 rollback;
+                               end;
+                             end;
+                        - Changed cleanup of components in notification (TheSneak)
+                        - Fixed potential AV (so far not reported)
+                        - Changed escape of string characters (TheSneak)
+                          (might cause incompatibility of older components if you use single
+                          quote in data)
+                        - Fixed question mark problem in data (TheSneak)
+              April 7, 2004
+                        - Fixed bug GetxxxxNames, moved pragma (reported by Martini)
+                        - Improved some performance isues (TheSneak)
+                        - Added GetTableIndexNames(by Martini)
+                        - Added support for 'small text blobs', it isn't the real stuff but
+                          limited to 20000 characters.
+                        - Fixed another compatibility isue with DevExpress
+              April 8, 2004
+                        - Fixed EnableControls (TheSneak)
+                        - Fixed memoryleak ASQLiteQuery.InternalPost (TheSneak)
+                        - Downgraded some stuff for support Delphi 4/5
+                        - Updated Locate function (by Joel  hottcha@juno.com)
+              April 14, 2004 Release beta 1.2.C Albert Drent (c) 2003, 2004 Aducom Software
+                        - RawSQL property implemented (supresses parsing of sql data)
+                        - published csv release as 1.2.C beta
+              April 15, 2004 Release alpha 2.0.A Albert Drent (c) 2003, 2004 Aducom Software
+                        - support for real clobs
+                        - added fieldtype numeric(x.y)
+                        - Implement RawSQL property in TASQLite3Query
+              May 26, 2004 Release beta 2.0.B Albert Drent (c) 2003, 2004 Aducom Software
+                        - new procedure: GetGetLastInsertRow
+                        - new component: TASQLite3InlineSQL, to be used to contain all
+                          kinds of pre-stored sql statements. I.e. for creation of tables in case
+                          of an in-memory database, or a local storage for sql statements to
+                          simplify sourcecode. In this release it is bound to the ASQLiteDB component.
+                        - new component TASQLite3Output, to be used to generate csv files,
+                          xml and html documents. It is NOT bound to ASQLite components but
+                          to a datasource (containing any database connection)
+                        - implemented bound as described by minhl on the forum
+                        - implemented IsNull as described by Kazooie64 on the forum
+                        - implemented a uniform datetime implementation by jpierce
+              May, 26, 2004 Release beta 2.0.B Albert Drent (c) 2003, 2004 Aducom Software
+                        - A few bugfixes
+              June, 15, 2004 Release beta 2.0.C Albert Drent (c) 2003, 2004 Aducom Software
+                        - A few bugfixes, thanks to Tzvetan
+              July 2004, Release 1.0 based upon source sqlite version 2 components
+              Okt 11, 2004 Release beta 1.0.B Albert Drent (c) 2003, 2004 Aducom Software
+                        - Callback routine for retieving data replaced by new
+                          by sqlite prefered way.
+                        - Some bugfixes
+                        - Support for calculated fields
+                        - Support for real blobs
+              okt 14, 2004 Release beta 1.0.C Albert Drent (c) 2003, 2004 Aducom Software
+                        - support for locate lo-partial key (thanks to Bob Mitchel)
+                        - some bugfixes (thanks to Oleg Lembievskiy marked by OL)
+                        - some other bugfixes and code cleanup
+              okt 18, 2004
+                        - re-introduced sqlite_version
+                        - added transactiontype property(SQLite3 feature)
+                        - added transaction procedures to db and basequery
+                                StartDeferredTransaction;
+                                StartImmediateTransaction;
+                                StartExclusiveTransaction;
+              nov 1, 2004
+                        - bugfix (thanx to James) for null pointer assignment on null values
+              nov 8, 2004
+                        - fixed introduced bug in result preventing new records to appear
+                          right in dbgrids.
+              nov 17, 2004
+                        - fixed small bug showing rubish on empty tables
+              Nov 17, 2004 by Mike Dijkema
+                        - filter bug  FPrepared := FPrepared + ' and ' + Filter adds ' and filterexpr' to the end of the sql statement
+                          this created errors with 'order by' 'limit' 'union' 'having' etc..
+                          filtering changed to that it works like the ADO components and union and other statements
+                          now 'select a from b union select c from d' and 'select a from b order by c' works with a filter
+                        - filter bug 'select a_where from b' removed
+              jan 11, 2005 Release 2005.01.A Albert Drent (c) 2003 .. 2005 Aducom Software
+                        - fixed bug causing fielddescription to be deleted incorrectly
+                        - fixed bug causing errormessage on null values in integer fields
+                        - added sqlcursor property
+                        - modifications to support Delphi 2005
+                        - implemented all transactiontypes
+                        - changed all showmessages to raise event types
+                        - added readonly property
+              feb 21, 2005 Release 2005.02.A Albert Drent (c) 2003 .. 2005 Aducom Software
+                        - some bugfixes, code optimization
+                        - first implementation of IProvider support (thanks to
+                          Rocco Barbaresco)
+                        - changed default SDB extension to SQB
+                        - support for multi sql statements in one string
+                        - added master-detail functionality on insert of
+                          new child record (key-data is copied)
+                        - added compatibility with SQLite3.dll version 3.1.2
+              feb 28, 2005 Release 2005.02.B Albert Drent (c) 2003 .. 2005 Aducom Software
+                        - bugfix for filter on master-detail. Setting filtered will
+                          not automatical open table any more. Causes error on closed
+                          tables in master-detail otherwise.
+              mar 7, 2005 Release 2005.03.A Albert Drent (c) 2003 .. 2005 Aducom Software
+                        - bugfix for memofields causing crlf to be handled wrongly
+                        - added TableExists function ('// DI  Ralf http://www.yunqa.de/delphi/)
+                        - some code optimizations ('// DI Ralf http://www.yunqa.de/delphi/)
+                        - solved decimalpoint bug ('// DI Ralf http://www.yunqa.de/delphi/)
+              mar 10, 2005 Release 2005.03.B Albert Drent (c) 2003 .. 2005 Aducom Software
+                        - more code optimizations
+                        - removed Forms from uses list to decrease codesize of console app's
+                        - changed cursorstyle handling
+                        - changed exception handling
+              mar 29, 2005 Release 2005.03.C Albert Drent (c) 2003 .. 2005 Aducom Software
+                        - removed default pragma's for tables
+                        - implemented another solution for tableheader duplicates (mirko)
+                        - implemented user version
+                        - solved minor bug in GetTableInfo
+              april 5, 2005 Release 2005.04.A Albert Drent (c) 2003 .. 2005 Aducom Software
+                        - fixed bug conceirning in-memory database (Bert Verhees)
+                        - fixed precompiler settings for Delhpi 7 (Dak)
+              mai 31, 2005 Release 2005.05.A Albert Drent (c) 2003 .. 2005 Aducom Software
+                        - UTF8 support (thanks to Bilgehan KUYUCU)
+                        - Statical linking (thanks to Gianpaolo Avallone (GPA)
+                        - Some bugfixes and enhancements by Albert, Gianpaolo and others.
+              august 1, 2005 Release 2005.08.A
+                        - UTF8 support to be set by property, solving a 'locale' problem.
+                        - Bugfix for null strings
+                        - Fix for static linking
+                        - Solved bug in updatesql, fieldlist is now setup correctly
+                        - solved bug in updatesql, inserting null values and constants.
+              august 2, 2005 Release 2005.08.B
+                        - first steps towards support utf16 (by Kevin Zhang)
+                        - implemented another locate routine (by jbannon)
+                        - changed treatment of datatype text. It is considered 'longtext' now.
+                          added 'shorttext' datatype which replaces the original 'text' datatype.
+                          The datatype text is now compatible with sqlite3, mysql and perhaps
+                          others.
+              sept 1, 2005 Release 2005.09.A
+                        - code optimizations by Kevin Lu, Aducom
+              sept 1, 2005 Release 2005.09.B
+                        - candidate fix for decimal point problem by Jordi March
+              sept 20, 2005 Release 2005.09.C
+                        - implementation of unidirectional dataset. This improves
+                          performance on large resultsets to the optimum. However
+                          the dataset is readonly by default, using inserts/deletes and
+                          updates will result in a 'database table is locked' error.
+              sept 21, 2005 Release 2005.09.D
+                        - bugfix for decimal point routine by Kevin Lu
+              sept 29, 2005 Release 2005.09.E
+                        - bugfix for unidirectional dataset.
+                        - bugfix for split of prepare and execute. Data was not updated
+                          correctly
+              nov 1, 2005 Release 2005.11.A
+                        - Code improvements
+                        - First (alpha) implementation of Lookup field (By John Lito)
+              dec 14, 2005 Release 2005.12.A
+                        - Check for null values
+              jan 5, 2006 Release 2006.01.A
+                        - fixed unidirectional bug (I)
+              jan 9, 2006 Release 2006.01.B
+                        - fixed unidirectional bug (II)
+                        - automatically will close table if tablename property is changed
+                          while a table is still open.
+                        - automatically close query if sql property is changed while a table
+                          is still open.
+                        - fixes for compilation under D4
+                        - changes for installation under Delphi 2005 and 2006
+                        - changes of copyright notice, the components are now under
+                          open-source bsd licence.
+              feb 22, 2006 Release 2006.02.A
+                        - Changed status to stable
+              mar 2, 2006 Release 2006.03.A
+                        - Modifications for D4/D5
+                        - Added order by property. Enter fieldnames separated by ','
+                        - Added GetIndexFieldNames (thanks to zavu10n)
+                        - Database will be reopened if necessary on filter change
+                        - Fixes by Donnie
+                        - New routine for dates and floates by Donnie
+              mar 8, 2006 Release 2006.03.B
+                        - Fixed small bug causing text treated as char 255, is now memo.
+              mar 15, 2006 Release 2006.03.C
+                        - Added switch for compilation under D4/D5 (Art Register)
+                        - DBOpen change for utf8 by John Lito
+                        - SQLCursor fix
+                        - GetFieldValue fix by Velis
+              mar 23, 2006 Release 2006.03.D
+                        - Compatibility fixes for D45 (Art Register)
+                        - changed D45 directive to $IFDEF ASQLITE_D6PLUS so
+                          compilation should work automatically now
+                        - changed cr cr/lf pairs for compatibilty with D4/D5
+                        - added CompareBookmarks to support multiple selection
+                          in DBGrid (Michael S)
+                        - added support for char *nothing* datatype (was char(1) now char is allowed)
+
+
+
+*_* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * }
+
+
+interface
+
+uses
+  DB,
+  DBCommon,
+  Dialogs,
+  Classes,
+  Windows,
+  SysUtils,
+{$IFDEF ASQLITE_D6PLUS}
+  Variants,
+{$ENDIF}
+  ASGRout3;
+const
+  SQLiteVersion     = 'ASGSQLite V2006.03.D stable';
+
+  MaxBuf            = 30000;            // max stringbuffer for record (length) (excluding blob's)
+  SQLITE_OK         = 0;                // Successful result */
+  SQLITE_ERROR      = 1;                // SQL error or missing database */
+  SQLITE_INTERNAL   = 2;                // An internal logic error in SQLite */
+  SQLITE_PERM       = 3;                // Access permission denied */
+  SQLITE_ABORT      = 4;                // Callback routine requested an abort */
+  SQLITE_BUSY       = 5;                // The database file is locked */
+  SQLITE_LOCKED     = 6;                // A table in the database is locked */
+  SQLITE_NOMEM      = 7;                // A malloc() failed */
+  SQLITE_READONLY   = 8;                // Attempt to write a readonly database */
+  SQLITE_INTERRUPT  = 9;                // Operation terminated by sqlite_interrupt() */
+  SQLITE_IOERR      = 10;               // Some kind of disk I/O error occurred */
+  SQLITE_CORRUPT    = 11;               // The database disk image is malformed */
+  SQLITE_NOTFOUND   = 12;               // (Internal Only) Table or record not found */
+  SQLITE_FULL       = 13;               // Insertion failed because database is full */
+  SQLITE_CANTOPEN   = 14;               // Unable to open the database file */
+  SQLITE_PROTOCOL   = 15;               // Database lock protocol error */
+  SQLITE_EMPTY      = 16;               // (Internal Only) Database table is empty */
+  SQLITE_SCHEMA     = 17;               // The database schema changed */
+  SQLITE_TOOBIG     = 18;               // Too much data for one row of a table */
+  SQLITE_CONSTRAINT = 19;               // Abort due to contraint violation */
+  SQLITE_MISMATCH   = 20;               // Data type mismatch */
+  SQLITE_MISUSE     = 21;               // Library used incorrectly */
+  SQLITE_NOLFS      = 22;               // Uses OS features not supported on host */
+  SQLITE_AUTH       = 23;               // Authorization denied */
+  SQLITE_ROW        = 100;              // sqlite_step() has another row ready */
+  SQLITE_DONE       = 101;              // sqlite_step() has finished executing */
+
+  SQLITE_CREATE_INDEX = 1;              // Index Name      Table Name      */
+  SQLITE_CREATE_TABLE = 2;              // Table Name      NULL            */
+  SQLITE_CREATE_TEMP_INDEX = 3;         // Index Name      Table Name      */
+  SQLITE_CREATE_TEMP_TABLE = 4;         // Table Name      NULL            */
+  SQLITE_CREATE_TEMP_TRIGGER = 5;       // Trigger Name    Table Name      */
+  SQLITE_CREATE_TEMP_VIEW = 6;          // View Name       NULL            */
+  SQLITE_CREATE_TRIGGER = 7;            // Trigger Name    Table Name      */
+  SQLITE_CREATE_VIEW = 8;               // View Name       NULL            */
+  SQLITE_DELETE     = 9;                // Table Name      NULL            */
+  SQLITE_DROP_INDEX = 10;               // Index Name      Table Name      */
+  SQLITE_DROP_TABLE = 11;               // Table Name      NULL            */
+  SQLITE_DROP_TEMP_INDEX = 12;          // Index Name      Table Name      */
+  SQLITE_DROP_TEMP_TABLE = 13;          // Table Name      NULL            */
+  SQLITE_DROP_TEMP_TRIGGER = 14;        // Trigger Name    Table Name      */
+  SQLITE_DROP_TEMP_VIEW = 15;           // View Name       NULL            */
+  SQLITE_DROP_TRIGGER = 16;             // Trigger Name    Table Name      */
+  SQLITE_DROP_VIEW  = 17;               // View Name       NULL            */
+  SQLITE_INSERT     = 18;               // Table Name      NULL            */
+  SQLITE_PRAGMA     = 19;               // Pragma Name     1st arg or NULL */
+  SQLITE_READ       = 20;               // Table Name      Column Name     */
+  SQLITE_SELECT     = 21;               // NULL            NULL            */
+  SQLITE_TRANSACTION = 22;              // NULL            NULL            */
+  SQLITE_UPDATE     = 23;               // Table Name      Column Name     */
+  SQLITE_ATTACH     = 24;               // Filename        NULL            */
+  SQLITE_DETACH     = 25;               // Database Name   NULL            */
+
+  SQLITE_DENY       = 1;                // Abort the SQL statement with an error */
+  SQLITE_IGNORE     = 2;                // Don't allow access, but don't generate an error */
+
+  Crlf              : string = #13#10;
+  Q                 = '''';
+
+type
+  pInteger = ^integer;
+  pPointer = ^Pointer;
+  pSmallInt = ^smallint;
+  pFloat = ^extended;
+  pBoolean = ^boolean;
+
+
+  TConvertBuffer = array[1..255] of char;
+
+  TSQLite3_Callback = function(UserData: Pointer; ColumnCount: Integer; ColumnValues, ColumnNames: PPointer): Integer; cdecl;
+//  TSQLiteExecCallback = function(Sender: TObject; Columns: integer; ColumnValues: Pointer; ColumnNames: Pointer): integer of object; cdecl;
+  TSQLiteBusyCallback = function(Sender: TObject; ObjectName: PAnsiChar; BusyCount: integer): integer of object; cdecl;
+  TOnData = procedure(Sender: TObject; Columns: integer; ColumnNames, ColumnValues: string) of object;
+  TOnBusy = procedure(Sender: TObject; ObjectName: string; BusyCount: integer; var Cancel: boolean) of object;
+  TOnQueryComplete = procedure(Sender: TObject) of object;
+  TASQLite3NotifyEvent = procedure(Sender: TObject) of object;
+
+  // structure for holding field information. It is used by GetTableInfo
+
+  TASQLite3Field = class
+  public
+    FieldNumber: integer;
+    FieldName: string;
+    FieldType: string;
+    FieldNN: integer;                   // 1 if notnull
+    FieldDefault: string;
+    FieldPK: integer;                   // 1 if primary key
+  end;
+
+  // object to 'play' with SQLite's default settings
+
+  TASQLite3Pragma = class(TComponent)
+  private
+    FTempCacheSize: integer;
+    FDefaultCacheSize: integer;
+    FDefaultSynchronous: string;
+    FDefaultTempStore: string;
+    FTempStore: string;
+    FSynchronous: string;
+  protected
+    function GetTempCacheSize: string;
+    function GetDefaultCacheSize: string;
+    function GetDefaultSynchronous: string;
+    function GetDefaultTempStore: string;
+    function GetTempStore: string;
+    function GetSynchronous: string;
+  published
+    { Published declarations }
+    property TempCacheSize: integer read FTempCacheSize write FTempCacheSize;
+    property DefaultCacheSize: integer read FDefaultCacheSize write FDefaultCacheSize;
+    property DefaultSynchronous: string read FDefaultSynchronous
+      write FDefaultSynchronous;
+    property DefaultTempStore: string read FDefaultTempStore write FDefaultTempStore;
+    property TempStore: string read FTempStore write FTempStore;
+    property Synchronous: string read FSynchronous write FSynchronous;
+  end;
+
+  // component to log messages
+  // it's for debugging purpose and may be obsolete due
+  // to the event implementation. not sure yet...
+
+  TASQLite3Log = class(TComponent)
+  private
+    FLogFile: string;
+    FLogDebugOut: boolean;
+    FAppend: boolean;
+    FLogSQL: boolean;
+    FLogInt: boolean;
+  protected
+  public
+    procedure Display(Msg: string);
+  published
+    { Published declarations }
+    property LogFile: string read FLogFile write FLogFile;
+    property LogDebugOut: boolean read FLogDebugOut write FLogDebugOut; // 20040225
+    property Append: boolean read FAppend write FAppend;
+    property LogSQL: boolean read FLogSQL write FLogSQL;
+    property LogInternals: boolean read FLogInt write FLogInt;
+  end;
+
+// This component can be used to store sql outside the pascal source.
+// It is useful for automatically creating tables on open of a temporary database
+// (i.e. in-memory database)
+
+  TASQLite3InlineSQL = class(TComponent)
+  private
+    FSQL: TStrings;
+    procedure SetSQL(const Value: TStrings);
+    function GetSQL: TStrings;
+  public
+    constructor Create(AOwner: TComponent); override;
+    destructor Destroy; override;
+  published
+    property SQL: TStrings read GetSQL write SetSQL;
+  end;
+
+  { Basic Database component }
+
+  TASQLite3DB = class(TComponent)
+  private
+    { Private declarations }
+    FAfterConnect: TASQLite3NotifyEvent;
+    FBeforeConnect: TASQLite3NotifyEvent;
+    FAfterDisconnect: TASQLite3NotifyEvent;
+    FBeforeDisconnect: TASQLite3NotifyEvent;
+    function FGetDefaultExt: string;
+    function FGetDriverDLL: string;
+  protected
+    { Protected declarations }
+    FInlineSQL: TASQLite3InlineSQL;
+    FExecuteInlineSQL: boolean;
+    FDatabase: string;
+    FTransactionType: string;
+    FSQLiteVersion: string;
+    FDefaultExt: string;
+    FDefaultDir: string;
+    FDriverDll: string;
+    FConnected: boolean;
+    FMustExist: boolean;
+    FVersion: string;
+    FCharEnc: string;
+    FUtf8: boolean;
+    DBHandle: Pointer;
+    FASQLitePragma: TASQLite3Pragma;
+    FASQLiteLog: TASQLite3Log;
+    FLastError: string;
+    SQLite3_Open: function(dbname: PAnsiChar; var db: pointer): integer; cdecl;
+    SQLite3_Close: function(db: pointer): integer; cdecl;
+    SQLite3_Exec: function(DB: Pointer; SQLStatement: PAnsiChar; Callback: TSQLite3_Callback;
+                           UserDate: Pointer; var ErrMsg: PAnsiChar): Integer; cdecl;
+    SQLite3_LibVersion: function(): PAnsiChar; cdecl;
+    SQLite3_ErrorString: function(db: pointer): PAnsiChar; cdecl;
+    SQLite3_GetTable: function(db: Pointer; SQLStatement: PAnsiChar; var ResultPtr: Pointer;
+      var RowCount: cardinal; var ColCount: cardinal; var ErrMsg: PAnsiChar): integer; cdecl;
+    SQLite3_FreeTable: procedure(Table: PAnsiChar); cdecl;
+    SQLite3_FreeMem: procedure(P: PAnsiChar); cdecl;
+    SQLite3_Complete: function(P: PAnsiChar): boolean; cdecl;
+    SQLite3_LastInsertRow: function(db: Pointer): integer; cdecl;
+    SQLite3_Cancel: procedure(db: Pointer); cdecl;
+    SQLite3_BusyHandler: procedure(db: Pointer; CallbackPtr: Pointer; Sender: TObject); cdecl;
+    SQLite3_BusyTimeout: procedure(db: Pointer; TimeOut: integer); cdecl;
+    SQLite3_Changes: function(db: Pointer): integer; cdecl;
+    SQLite3_Prepare: function(db: Pointer; SQLStatement: PAnsiChar; nBytes: integer;
+      var hstatement: pointer; var Tail: PAnsiChar): integer; cdecl;
+    SQLite3_Finalize: function(hstatement: pointer): integer; cdecl;
+    SQLite3_Reset: function(hstatement: pointer): integer; cdecl;
+    SQLite3_Step: function(hstatement: pointer): integer; cdecl;
+    SQLite3_Column_blob: function(hstatement: pointer; iCol: integer): pointer; cdecl;
+    SQLite3_Column_bytes: function(hstatement: pointer; iCol: integer): integer; cdecl;
+    SQLite3_Column_count: function(hstatement: pointer): integer; cdecl;
+    SQLite3_Column_decltype: function(hstatement: pointer; iCol: integer): PAnsiChar; cdecl;
+    SQLite3_Column_double: function(hstatement: pointer; iCol: integer): double; cdecl;
+    SQLite3_Column_int: function(hstatement: pointer; iCol: integer): integer; cdecl;
+    SQLite3_Column_int64: function(hstatement: pointer; iCol: integer): int64; cdecl;
+    SQLite3_Column_name: function(hstatement: pointer; iCol: integer): PAnsiChar; cdecl;
+    SQLite3_Column_text: function(hstatement: pointer; iCol: integer): PAnsiChar; cdecl;
+    SQLite3_Column_text16: function(hstatement: pointer; iCol: integer): PWideChar; cdecl;
+    SQLite3_Column_type: function(hstatement: pointer; iCol: integer): integer; cdecl;
+    SQLite3_Bind_Blob: function(hstatement: pointer; iCol: integer; buf: PAnsiChar; n: integer; DestroyPtr: Pointer): integer; cdecl;
+    SQLite3_Bind_Text16: function(hstatement: pointer; iCol: integer; buf: pointer; n: integer; DestroyPtr: Pointer): integer; cdecl;//\\\
+    SQLite3_Bind_Parameter_Count: function(hstatement: pointer): integer; cdecl;//\\\
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+    procedure DBConnect(Connected: boolean);
+    function SQLite3_PrepareResult(DB: Pointer; TheStatement: string; FParams: TParams; Sender: TObject) : pointer;
+    function SQLite3_GetNextResult(DB: Pointer; TheStatement: pointer; FParams: TParams; Sender: TObject) : pointer;
+    procedure SQLite3_CloseResult(TheStatement : pointer);
+  public
+    DLLHandle: THandle;
+    { Public declarations }
+    constructor Create(AOwner: TComponent); override;
+    destructor Destroy; override;
+    function LoadLibs: boolean;
+    procedure FSetDatabase(Database: string);
+    function RowsAffected: integer;
+    function  TableExists(const ATableName: AnsiString): Boolean;
+    procedure ExecStartTransaction(TransType: string);
+    procedure StartTransaction;
+    procedure StartDeferredTransaction;
+    procedure StartImmediateTransaction;
+    procedure StartExclusiveTransaction;
+    procedure Open;
+    procedure Close;
+    procedure Commit;
+    procedure RollBack;
+    procedure ShowDatabases(List: TStrings);
+    procedure GetTableNames(List: TStrings; SystemTables: boolean = false);
+    procedure GetTableInfo(TableName: string; List: TList);
+    procedure GetIndexNames(List: TStrings; SystemTables: boolean = false);
+    procedure GetIndexFieldNames(IndexName: string; List: TStrings);
+    procedure GetFieldNames(TableName: string; List: TStrings);
+    procedure GetPrimaryKeys(TableName: string; List: TStrings);
+    procedure GetTableIndexNames(TableName: string; List: TStrings);
+    procedure ExecPragma;
+//    function SQLite_XExec(db: Pointer; SQLStatement: PAnsiChar;
+//      CallbackPtr: Pointer; Sender: TObject; var ErrMsg: PAnsiChar): integer; cdecl;
+    function SQLite3_Execute(db: Pointer; TheStatement: string; FParams: TParams; Sender: TObject): integer;
+    function SQLite3_ExecSQL(TheStatement: string; Blobs: TList=nil): integer;
+    procedure ShowError;
+    function GetUserVersion(database : string=''): integer;
+    procedure SetUserVersion(Version : integer; Database : string='');
+  published
+    { Published declarations }
+    property CharacterEncoding: string read FCharEnc write FCharEnc;
+    property TransactionType: string read FTransactionType write FTransactionType;
+    property Database: string read FDatabase write FSetDatabase;
+    property ASQLitePragma: TASQLite3Pragma read FASQLitePragma write FASQLitePragma;
+    property ASQLiteLog: TASQLite3Log read FASQLiteLog write FASQLiteLog;
+    property DefaultExt: string read FGetDefaultExt write FDefaultExt;
+    property DefaultDir: string read FDefaultDir write FDefaultDir;
+    property Version: string read FVersion write FVersion;
+//  property CharacterEncoding: string Read FCharEncoding Write FCharEncoding;
+    property DriverDLL: string read FGetDriverDLL write FDriverDLL;
+    property Connected: boolean read FConnected write DBConnect;
+    property MustExist: boolean read FMustExist write FMustExist;
+    property ASQLiteInlineSQL: TASQLite3InlineSQL read FInlineSQL write FInlineSQL;
+    property ExecuteInlineSQL: boolean read FExecuteInlineSQL write FExecuteInlineSQL;
+    property AfterConnect: TASQLite3NotifyEvent read FAfterConnect write FAfterConnect;
+    property BeforeConnect: TASQLite3NotifyEvent read FBeforeConnect write FBeforeConnect;
+    property AfterDisconnect: TASQLite3NotifyEvent
+      read FAfterDisconnect write FAfterDisconnect;
+    property BeforeDisconnect: TASQLite3NotifyEvent
+      read FBeforeDisconnect write FBeforeDisconnect;
+  end;
+
+  AsgError = class(Exception);
+
+{ TRecInfo }
+
+{   This structure is used to access additional information stored in
+  each record buffer which follows the actual record data.
+
+    Buffer: PAnsiChar;
+   ||
+   \/
+    --------------------------------------------
+    |  Record Data  | Bookmark | Bookmark Flag |
+    --------------------------------------------
+                    ^-- PRecInfo = Buffer + FRecInfoOfs
+
+  Keep in mind that this is just an example of how the record buffer
+  can be used to store additional information besides the actual record
+  data.  There is no requirement that TDataSet implementations do it this
+  way.
+
+  For the purposes of this demo, the bookmark format used is just an integer
+  value.  For an actual implementation the bookmark would most likely be
+  a native bookmark type (as with BDE), or a fabricated bookmark for
+  data providers which do not natively support bookmarks (this might be
+  a variant array of key values for instance).
+
+  The BookmarkFlag is used to determine if the record buffer contains a
+  valid bookmark and has special values for when the dataset is positioned
+  on the "cracks" at BOF and EOF. }
+
+  PRecInfo = ^TRecInfo;
+
+  TRecInfo = packed record
+    Bookmark : integer;
+    BookmarkFlag : TBookmarkFlag;
+//    Nulls :
+  end;
+
+ //============================================================================== TFResult
+ // The TFResult class is used to maintain the resultlist in memory. This
+ // will only be the case for 'normal' data. Blobs and Clobs will be treated
+ // differently, but they are not supported yet.
+ //==============================================================================
+  TASQLite3BaseQuery = class;
+
+  TFResult = class
+  protected
+    Data: TList;
+    BookMark: TList;
+    RowId: TList;
+    FLastBookmark: integer;
+    FBufSize: integer;
+    FDataSet: TASQLite3BaseQuery;
+  public
+    constructor Create(TheDataSet: TASQLite3BaseQuery);
+    destructor Destroy; override;
+    procedure FreeBlobs;
+    procedure SetBufSize(TheSize: integer);
+    procedure Add(TheBuffer: PAnsiChar; TheRowId: integer);
+    procedure Insert(Index: integer; TheBuffer: Pointer; TheRowId: integer);
+    procedure Delete(Index: integer);
+    function GetData(Index: integer): Pointer;
+    function Count: integer;
+    function IndexOf(TheBookMark: pointer): integer;
+    function GetBookmark(Index: integer): integer;
+    function GetRowId(Index: integer): integer;
+  end;
+
+//============================================================================== TASQLite3UpdateSQL
+  TASQLite3UpdateSQL = class(TComponent)
+  private
+    FInsertSQL: TStrings;
+    FUpdateSQL: TStrings;
+    FDeleteSQL: TStrings;
+    procedure SetInsertSQL(const Value: TStrings);
+    procedure SetUpdateSQL(const Value: TStrings);
+    procedure SetDeleteSQL(const Value: TStrings);
+  public
+    constructor Create(AOwner: TComponent); override;
+    destructor Destroy; override;
+  published
+    property InsertSQL: TStrings read FInsertSQL write SetInsertSQL;
+    property UpdateSQL: TStrings read FUpdateSQL write SetUpdateSQL;
+    property DeleteSQL: TStrings read FDeleteSQL write SetDeleteSQL;
+  end;
+
+//============================================================================== TASQLite3Output
+
+  TASQLite3Output = class(TComponent)
+  private
+    FActive: boolean;
+    FOutputType: string;
+    FTableClass: string;
+    FHeaderClass: string;
+    FCellClass: string;
+    FOutput: TStrings;
+    FSeparator: string;
+    FDataSource: TDataSource;
+    procedure SetOutput(const Value: TStrings);
+    procedure SetFActive(Active: boolean);
+    function GetOutput: TStrings;
+  public
+    constructor Create(AOwner: TComponent); override;
+    destructor Destroy; override;
+    procedure Execute(MyDataSet: TDataSet);
+  protected
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+  published
+    property Active: boolean read FActive write SetFActive;
+    property DataSource: TDataSource read FDataSource write FDataSource;
+    property OutputType: string read FOutputType write FOutputType;
+    property TableClass: string read FTableClass write FTableClass;
+    property HeaderClass: string read FHeaderClass write FHeaderClass;
+    property CellClass: string read FCellClass write FCellClass;
+    property Output: TStrings read GetOutput write SetOutput;
+    property FieldSeparator: string read FSeparator write FSeparator;
+  end;
+
+//============================================================================== TASQLite3BaseQuery
+  TASQLite3BaseQuery = class(TDataSet)
+  private
+    FParams: TParams;
+    FTypeLess: boolean;
+    FNoResults: boolean;                // suppresses the creation of a result list
+    FAutoCommit: boolean;
+    FTransactionType: string;
+    FTableDateFormat: string;
+    FSQLiteDateFormat: boolean;
+    FResult: TFResult;
+    FSQL: TStrings;
+    FSQLCursor: boolean;
+    FPrepared: string;
+    FRecBufSize: integer;
+    FRecInfoOfs: integer;
+    FCurRec: integer;
+    FMasterFields: string;
+    FMasterSource: TDataSource;
+    FSaveChanges: boolean;
+    MaxStrLen: integer;
+    FConnection: TASQLite3DB;
+    FReadOnly: boolean;
+    FMaxResults: integer;
+    FStartResult: integer;
+    FUniDir : boolean;
+    FStatement : pointer;
+    CurrentRowId: integer;
+    SQLStr: string;
+    ResultStr: PAnsiChar;
+    RowId : integer;
+    RowIdCol : integer;
+    DetailList: TList;
+    procedure SetSQL(const Value: TStrings);
+    function UnpackBuffer(Buffer: PAnsiChar; FieldType: TFieldType): TConvertBuffer;
+    procedure SetDataSource(Value: TDataSource);
+  protected
+    function SetQueryParams(InStr: string): string; //***
+    procedure SetParamsList(Value: TParams);
+    function GetParamsCount: word;
+    procedure RegisterDetailDataset(DetailDataSet: TASQLite3BaseQuery);
+    procedure LoadQueryData;
+    function GetActiveBuffer(var Buffer: PAnsiChar): boolean;
+    function GetDataSource: TDataSource; override;
+    procedure NotifySQLiteMasterChanged;
+    function GetFieldValue(const AField: TField; const Blobs: TList = nil): string; // added by Donnie
+
+    { Overriden abstract methods (required) }
+    function AllocRecordBuffer: PAnsiChar; override;
+    procedure FreeRecordBuffer(var Buffer: PAnsiChar); override;
+    procedure GetBookmarkData(Buffer: PAnsiChar; Data: Pointer); override;
+    function GetBookmarkFlag(Buffer: PAnsiChar): TBookmarkFlag; override;
+    function GetRecord(Buffer: PAnsiChar; GetMode: TGetMode;
+      DoCheck: boolean): TGetResult; override;
+    function GetRecordSize: word; override;
+    procedure InternalAddRecord(Buffer: Pointer; Append: boolean); override;
+    procedure InternalClose; override;
+    procedure InternalDelete; override;
+    procedure InternalFirst; override;
+    procedure InternalGotoBookmark(Bookmark: Pointer); override;
+    procedure InternalHandleException; override;
+    procedure InternalInitFieldDefs; override;
+    procedure InternalInitRecord(Buffer: PAnsiChar); override;
+    procedure InternalLast; override;
+    procedure InternalOpen; override;
+    procedure InternalPost; override;
+    procedure InternalSetToRecord(Buffer: PAnsiChar); override;
+    procedure OpenCursor(InfoQuery: Boolean); override; // GPA
+    function IsCursorOpen: boolean; override;
+    procedure SetBookmarkFlag(Buffer: PAnsiChar; Value: TBookmarkFlag); override;
+    procedure SetBookmarkData(Buffer: PAnsiChar; Data: Pointer); override;
+    procedure SetFieldData(Field: TField; Buffer: Pointer); override;
+    function GetFieldSize(FieldNo: integer): integer; overload;
+    function GetFieldSize(Field: TField): integer; overload;
+    function GetNativeFieldSize(FieldNo: integer): integer;
+    function GetFieldOffset(FieldNo: integer): integer;
+    function GetCalcFieldOffset(Field: TField): integer;
+    function GetMasterFields: string;
+    procedure SetMasterFields(const Value: string);
+    { Additional overrides (optional) }
+    function GetRecordCount: integer; override;
+    function GetRecNo: integer; override;
+    procedure SetRecNo(Value: integer); override;
+    property BaseSQL: TStrings read FSQL write SetSQL;
+    procedure SetSQLiteDateFormat(const Value: boolean);
+    procedure SetFilterText(const Value: string); override;
+    procedure DataConvert(Field: TField; Source, Dest: Pointer; ToNative: Boolean); override;//\\\
+    function CalcFieldInList(const List: string): Boolean;                      // John Lito
+
+   {$IFDEF IPROVIDER}
+   {***** IProviderSupport - Begin *****}
+    //-----| These are not necessary until the moment!
+    // procedure PSGetAttributes(List: TList); virtual;
+    // function PSGetDefaultOrder: TIndexDef; virtual;
+    // function PSGetIndexDefs(IndexTypes: TIndexOptions): TIndexDefs; virtual;
+    //-----| These are necessary to support IProvider
+    procedure PSEndTransaction(Commit: Boolean); override;
+    procedure PSExecute; override;
+    function PSExecuteStatement(const ASQL: string; AParams: TParams; ResultSet: Pointer = nil): Integer; override;
+    function PSGetParams: TParams; override;
+    function PSGetTableName: string; override;
+    function PSGetUpdateException(E: Exception; Prev: EUpdateError): EUpdateError; override;
+    function PSInTransaction: Boolean; override;
+    function PSIsSQLBased: Boolean; override;
+    function PSIsSQLSupported: Boolean; override;
+    procedure PSReset; override;
+    procedure PSSetCommandText(const CommandText: string); override;
+    procedure PSSetParams(AParams: TParams); override;
+    procedure PSStartTransaction; override;
+    function PSUpdateRecord(UpdateKind: TUpdateKind; Delta: TDataSet): Boolean; override;
+    function PSGetQuoteChar: string; override;
+    function PSGetKeyFields: string; override;
+   {***** IProviderSupport - End *****}
+   {$ENDIF}
+  public
+    constructor Create(AOwner: TComponent); override;
+    destructor Destroy; override;
+    procedure ExecSQL;
+    procedure StartTransaction;
+    procedure StartDeferredTransaction;
+    procedure StartImmediateTransaction;
+    procedure StartExclusiveTransaction;
+    procedure Commit;
+    procedure RollBack;
+    procedure SetFiltered(Value: Boolean); override;
+    procedure SQLiteMasterChanged; virtual;
+    function GetFieldData(Field: TField; Buffer: Pointer): boolean; override;
+    function GetFieldData(FieldNo: integer; Buffer: Pointer): boolean; override; // 20040225
+    function GetLastInsertRow: integer;
+{$IFDEF ASQLITE_D6PLUS}
+//    function GetFieldData(Field: TField; Buffer: Pointer; NativeFormat: boolean): boolean; override;
+{$ENDIF}
+
+    function CompareBookmarks(Bookmark1, Bookmark2: TBookmark): Integer; override; //MS
+    function CreateBlobStream(Field: TField; Mode: TBlobStreamMode): TStream; override;
+    function Locate(const KeyFields: string; const KeyValues: variant; Options: TLocateOptions): boolean; override;
+    function BookmarkValid(Bookmark: Pointer): boolean; override;
+//    function    LocateNearest(const KeyFields: String; const KeyValues: Variant; Options: TLocateOptions): Boolean;
+    property Params: TParams read FParams write SetParamsList stored false;
+    function Lookup(const KeyFields: string; const KeyValues: Variant;          // John Lito
+                    const ResultFields: string): Variant; override;             // John Lito
+  published
+    property AutoCommit: boolean read FAutoCommit write FAutoCommit default true;
+    property TransactionType: string read FTransactionType write FTransactionType;
+    property SQLiteDateFormat: boolean read FSQLiteDateFormat write SetSQLiteDateFormat;
+    property TableDateFormat: string read FTableDateFormat write FTableDateFormat;
+    property Connection: TASQLite3DB read FConnection write FConnection;
+    property MaxResults: integer read FMaxResults write FMaxResults;
+    property StartResult: integer read FStartResult write FStartResult;
+    property TypeLess: boolean read FTypeLess write FTypeLess;
+    property MasterFields: string read GetMasterFields write SetMasterFields;
+    property MasterSource: TDataSource read GetDataSource write SetDataSource;
+    property SQLCursor: boolean read FSQLCursor write FSQLCursor;
+    property ReadOnly: boolean read FreadOnly write FReadOnly;
+    property UniDirectional : boolean read FUniDir write FUniDir;
+    property AutoCalcFields;
+    property Filter;
+    property Filtered;
+    property Active;
+    property BeforeOpen;
+    property AfterOpen;
+    property BeforeClose;
+    property AfterClose;
+    property BeforeInsert;
+    property AfterInsert;
+    property BeforeEdit;
+    property AfterEdit;
+    property BeforePost;
+    property AfterPost;
+    property BeforeCancel;
+    property AfterCancel;
+    property BeforeDelete;
+    property AfterDelete;
+    property BeforeScroll;
+    property AfterScroll;
+{$IFDEF ASQLITE_D6PLUS}
+    property BeforeRefresh;
+    property AfterRefresh;
+{$ENDIF}
+    property OnCalcFields;
+    property OnDeleteError;
+    property OnEditError;
+    property OnNewRecord;
+    property OnPostError;
+  end;
+//============================================================================== TASQLite3Query
+
+  TASQLite3Query = class(TASQLite3BaseQuery)
+  private
+    FUpdateSQL: TASQLite3UpdateSQL;
+    FRawSQL: boolean;
+    procedure SetSQL(const Value: TStrings);
+    function GetSQL: TStrings;
+    procedure QueryChanged(Sender: TObject);
+  protected
+    procedure InternalOpen; override;
+    procedure InternalPost; override;
+    procedure InternalDelete; override;
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+    procedure InternalClose; override;
+  public
+    constructor Create(AOwner: TComponent); override;
+    destructor Destroy; override;
+//    property Params: TParams Read FParams Write SetParamsList Stored false;
+    procedure SQLiteMasterChanged; override;
+  published
+    property RawSQL: boolean read FRawSQL write FRawSQL;
+    property SQL: TStrings read GetSQL write SetSQL;
+    property UpdateSQL: TASQLite3UpdateSQL read FUpdateSQL write FUpdateSQL;
+  end;
+
+//============================================================================== TASQLite3Table
+
+  TASQLite3Table = class(TASQLite3BaseQuery)
+  private
+    FTableName: string;
+    FOrderBy : string;
+    FPrimaryAutoInc: boolean;
+  protected
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+    procedure InternalOpen; override;
+    procedure InternalPost; override;
+    procedure InternalDelete; override;
+    procedure SetFTableName(TableName : string);
+    procedure SetFOrderBy(OrderBy : string);
+  public
+    procedure SQLiteMasterChanged; override;
+  published
+    property TableName: string read FTableName write SetFTableName;
+    property PrimaryAutoInc: boolean read FPrimaryAutoInc write FPrimaryAutoInc;
+    property OrderBy : string read FOrderBy write SetFOrderBy;
+  end;
+
+ //============================================================================== TASQLite3BlobStream
+
+  TASQLite3BlobStream = class(TMemoryStream)
+  private
+    FField: TBlobField;
+    FDataSet: TASQLite3BaseQuery;
+    FMode: TBlobStreamMode;
+    FModified: Boolean;
+    FOpened: Boolean;
+    procedure LoadBlobData;
+    procedure SaveBlobData;
+  public
+    constructor Create(Field: TBlobField; Mode: TBlobStreamMode);
+    destructor Destroy; override;
+    function Read(var Buffer; Count: Longint): Longint; override;
+    function Write(const Buffer; Count: Longint): Longint; override;
+  end;
+
+
+implementation
+
+uses
+  Math
+{$IFDEF ASQLITE_D6PLUS}
+  , StrUtils
+{$endif}
+  ;
+
+// GPA - Static Link Start
+{$IFDEF SQLite_Static}
+Var
+  __HandlerPtr:Pointer;
+
+  {$L 'OBJ\sqlite3.obj'}
+  {$L 'OBJ\files.obj'}
+  {$L 'OBJ\strlen.obj'}
+  {$L 'OBJ\assert.obj'}
+  {$L 'OBJ\memcmp.obj'}
+  {$L 'OBJ\memcpy.obj'}
+  {$L 'OBJ\memset.obj'}
+  {$L 'OBJ\strcmp.obj'}
+  {$L 'OBJ\strcpy.obj'}
+  {$L 'OBJ\strcat.obj'}
+  {$L 'OBJ\strncmp.obj'}
+  {$L 'OBJ\strncpy.obj'}
+  {$L 'OBJ\strncat.obj'}
+  {$L 'OBJ\sprintf.obj'}
+  {$L 'OBJ\fprintf.obj'}
+  {$L 'OBJ\_ll.obj'}
+  {$L 'OBJ\ltoupper.obj'}
+  {$L 'OBJ\ltolower.obj'}
+  {$L 'OBJ\atol.obj'}
+  {$L 'OBJ\ftol.obj'}
+  {$L 'OBJ\longtoa.obj'}
+  {$L 'OBJ\hrdir_r.obj'}
+  {$L 'OBJ\gmtime.obj'}
+  {$L 'OBJ\tzdata.obj'}
+  {$L 'OBJ\initcvt.obj'}
+  {$L 'OBJ\streams.obj'}
+  {$L 'OBJ\scantod.obj'}
+  {$L 'OBJ\scanwtod.obj'}
+  {$L 'OBJ\allocbuf.obj'}
+  {$L 'OBJ\bigctype.obj'}
+  {$L 'OBJ\clocale.obj'}
+  {$L 'OBJ\clower.obj'}
+  {$L 'OBJ\cupper.obj'}
+  {$L 'OBJ\fflush.obj'}
+  {$L 'OBJ\fputn.obj'}
+  {$L 'OBJ\hrdir_s.obj'}
+  {$L 'OBJ\mbisspc.obj'}
+  {$L 'OBJ\mbsrchr.obj'}
+  {$L 'OBJ\realcvt.obj'}
+  {$L 'OBJ\realcvtw.obj'}
+  {$L 'OBJ\timefunc.obj'}
+  {$L 'OBJ\vprinter.obj'}
+  {$L 'OBJ\hugeval.obj'}
+  {$L 'OBJ\cvtfak.obj'}
+  {$L 'OBJ\getinfo.obj'}
+  {$L 'OBJ\qmul10.obj'}
+  {$L 'OBJ\fuildq.obj'}
+  {$L 'OBJ\_pow10.obj'}
+  {$L 'OBJ\ldtrunc.obj'}
+  {$L 'OBJ\cvtfakw.obj'}
+  {$L 'OBJ\wis.obj'}
+  {$L 'OBJ\xfflush.obj'}
+  {$L 'OBJ\flushout.obj'}
+  {$L 'OBJ\lputc.obj'}
+  {$L 'OBJ\hrdir_b.obj'}
+  {$L 'OBJ\realloc.obj'}
+  {$L 'OBJ\mbctype.obj'}
+  {$L 'OBJ\xcvt.obj'}
+  {$L 'OBJ\xcvtw.obj'}
+  {$L 'OBJ\wcscpy.obj'}
+  {$L 'OBJ\errno.obj'}
+  {$L 'OBJ\ctrl87.obj'}
+  {$L 'OBJ\timedata.obj'}
+  {$L 'OBJ\int64toa.obj'}
+  {$L 'OBJ\cvtentry.obj'}
+  {$L 'OBJ\mbyte1.obj'}
+  {$L 'OBJ\errormsg.obj'}
+  {$L 'OBJ\exit.obj'}
+  {$L 'OBJ\iswctype.obj'}
+  {$L 'OBJ\heap.obj'}
+  {$L 'OBJ\memmove.obj'}
+  {$L 'OBJ\fxam.obj'}
+  {$L 'OBJ\fuistq.obj'}
+  {$L 'OBJ\qdiv10.obj'}
+  {$L 'OBJ\wmemset.obj'}
+  {$L 'OBJ\wcslen.obj'}
+  {$L 'OBJ\_tzset.obj'}
+  {$L 'OBJ\deflt87.obj'}
+  {$L 'OBJ\mbschr.obj'}
+  {$L 'OBJ\mbsrchr.obj'}
+  {$L 'OBJ\ermsghlp.obj'}
+  {$L 'OBJ\patexit.obj'}
+  {$L 'OBJ\initexit.obj'}
+  {$L 'OBJ\virtmem.obj'}
+  {$L 'OBJ\tzset.obj'}
+  {$L 'OBJ\mbisdgt.obj'}
+  {$L 'OBJ\mbsnbcpy.obj'}
+  {$L 'OBJ\platform.obj'}
+  {$L 'OBJ\getenv.obj'}
+  {$L 'OBJ\mbisalp.obj'}
+  {$L 'OBJ\abort.obj'}
+  {$L 'OBJ\signal.obj'}
+  {$L 'OBJ\clear87.obj'}
+  {$L 'OBJ\abort.obj'}
+  {$L 'OBJ\handles.obj'}
+  {$L 'OBJ\_cfinfo.obj'}
+  {$L 'OBJ\__isatty.obj'}
+  {$L 'OBJ\perror.obj'}
+  {$L 'OBJ\fputs.obj'}
+  {$L 'OBJ\files2.obj'}
+  {$L 'OBJ\ioerror.obj'}
+  {$L 'OBJ\__write.obj'}
+  {$L 'OBJ\_write.obj'}
+  {$L 'OBJ\__lseek.obj'}
+  {$L 'OBJ\ioerror.obj'}
+  {$L 'OBJ\setenvp.obj'}
+  {$L 'OBJ\calloc.obj'}
+  {$L 'OBJ\mbsnbcmp.obj'}
+  {$L 'OBJ\mbsnbicm.obj'}
+  {$L 'OBJ\is.obj'}
+  {$L 'OBJ\isctype.obj'}
+  {$L 'OBJ\bigctype.obj'}
+  {$L 'OBJ\globals.obj'}
+  {$L 'OBJ\hrdir_mf.obj'}
+  {$L 'OBJ\fpreset.obj'}
+  {$L 'OBJ\ta.obj'}
+  {$L 'OBJ\setexc.obj'}
+  {$L 'OBJ\defhandl.obj'}
+
+  function _wsprintfA:integer; external 'user32.dll' name 'wsprintfA';
+  procedure RtlUnwind; external 'NtDll.dll' name 'RtlUnwind';
+
+  function  _sqlite3_open(dbname: PAnsiChar; var db: pointer): integer; cdecl; external;
+  function  _sqlite3_close(db: pointer): integer; cdecl; external;
+  function  _sqlite3_exec(DB: Pointer; SQLStatement: PAnsiChar; Callback: TSQLite3_Callback;
+                          UserDate: Pointer; var ErrMsg: PAnsiChar): Integer; cdecl; external;
+  function  _sqlite3_libversion: PAnsiChar; cdecl; external;
+  function  _sqlite3_errmsg(db: pointer): PAnsiChar; cdecl; external;
+  function  _sqlite3_get_table(db: Pointer; SQLStatement: PAnsiChar; var ResultPtr: Pointer;
+                              var RowCount: cardinal; var ColCount: cardinal; var ErrMsg: PAnsiChar): integer; cdecl; external;
+  procedure _sqlite3_free_table(Table: PAnsiChar); cdecl; external;
+  procedure _sqlite3_free(P: PAnsiChar); cdecl; external;
+  function  _sqlite3_complete(P: PAnsiChar): boolean; cdecl; external;
+  function  _sqlite3_last_insert_rowid(db: Pointer): integer; cdecl; external;
+  procedure _sqlite3_interrupt(db: Pointer); cdecl; external;
+  procedure _sqlite3_busy_handler(db: Pointer; CallbackPtr: Pointer; Sender: TObject); cdecl; external;
+  procedure _sqlite3_busy_timeout(db: Pointer; TimeOut: integer); cdecl; external;
+  function  _sqlite3_changes(db: Pointer): integer; cdecl; external;
+  function  _sqlite3_prepare(db: Pointer; SQLStatement: PAnsiChar; nBytes: integer;
+                             var hstatement: pointer; var Tail: PAnsiChar): integer; cdecl; external;
+  function  _sqlite3_finalize(hstatement: pointer): integer; cdecl; external;
+  function  _sqlite3_reset(hstatement: pointer): integer; cdecl; external;
+  function  _sqlite3_step(hstatement: pointer): integer; cdecl; external;
+  function  _sqlite3_column_blob(hstatement: pointer; iCol: integer): pointer; cdecl; external;
+  function  _sqlite3_column_bytes(hstatement: pointer; iCol: integer): integer; cdecl; external;
+  function  _sqlite3_column_count(hstatement: pointer): integer; cdecl; external;
+  function  _sqlite3_column_decltype(hstatement: pointer; iCol: integer): PAnsiChar; cdecl; external;
+  function  _sqlite3_column_double(hstatement: pointer; iCol: integer): double; cdecl; external;
+  function  _sqlite3_column_int(hstatement: pointer; iCol: integer): integer; cdecl; external;
+  function  _sqlite3_column_int64(hstatement: pointer; iCol: integer): int64; cdecl; external;
+  function  _sqlite3_column_name(hstatement: pointer; iCol: integer): PAnsiChar; cdecl; external;
+  function  _sqlite3_column_text(hstatement: pointer; iCol: integer): PAnsiChar; cdecl; external;
+  function  _sqlite3_column_type(hstatement: pointer; iCol: integer): integer; cdecl; external;
+  function  _sqlite3_bind_blob(hstatement: pointer; iCol: integer; buf: PAnsiChar; n: integer; DestroyPtr: Pointer): integer; cdecl; external;
+
+{$ENDIF}
+// GPA - Static Link End
+
+
+{$IFDEF DEBUG_ENABLED}
+var
+  DebugSpaces       : Integer = 0;
+{$ENDIF}
+
+{$IFNDEF ASQLITE_D6PLUS} //Art Register - Function sign not provided in Delphi 5
+function Sign(I: Integer) : Integer ;
+begin
+ if (I > 0) then
+   Result := 1
+ else
+ begin
+   if (I < 0) then
+     Result := -1
+   else
+     Result := 0;
+ end;
+end;
+{$ENDIF}
+
+procedure Debug(const S: string);
+begin
+{$IFDEF DEBUG_ENABLED}
+  OutputDebugString(PAnsiChar(StringOfChar(' ', DebugSpaces) + S));
+{$ENDIF}
+end;
+
+procedure DebugEnter(const S: string);
+begin
+{$IFDEF DEBUG_ENABLED}
+  OutputDebugString(PAnsiChar(StringOfChar(' ', DebugSpaces) + 'Enter ' + S));
+  inc(DebugSpaces);
+{$ENDIF}
+end;
+
+procedure DebugLeave(const S: string);
+begin
+{$IFDEF DEBUG_ENABLED}
+  dec(DebugSpaces);
+  OutputDebugString(PAnsiChar(StringOfChar(' ', DebugSpaces) + 'Leave ' + S));
+{$ENDIF}
+end;
+
+//==============================================================================
+// SyntaxCheck. This routine is used to check if words match the sql syntax
+//              It is called where sql statements are parsed and generated
+//==============================================================================
+
+function SyntaxCheck(LWord, RWord: string): boolean;
+begin
+  DebugEnter('SyntaxCheck');
+  try
+    if CompareText(LWord, RWord) <> 0 then begin
+      SyntaxCheck := false;
+      raise AsgError.Create('SQL macro syntax error on sql, expected ' + RWord)
+    end else
+      SyntaxCheck := true;
+  finally
+    DebugLeave('SyntaxCheck');
+  end;
+end;
+
+//==============================================================================
+// Parse the SQL fielddescription and return the Delphi Field types, length etc.
+//==============================================================================
+
+procedure GetFieldInfo(FieldInfo: string; var FieldType: TFieldType;
+  var FieldLen, FieldDec: integer);
+var
+  p1, p2, pn        : integer;
+  vt                : string;
+begin
+  DebugEnter('GetFieldInfo');
+  FieldType := ftString;                // just a default;
+  FieldLen := 255;
+  FieldDec := 0;
+
+  p1 := pos('(', FieldInfo);
+  if p1 <> 0 then
+  begin
+    p2 := pos(')', FieldInfo);
+    if p2 <> 0 then
+    begin
+      vt := LowerCase(Copy(FieldInfo, 1, p1 - 1));
+      if (vt = 'varchar') or (vt = 'char') or (vt = 'varchar2') then begin
+        FieldType := ftString;
+        FieldLen := StrToInt(Copy(FieldInfo, p1 + 1, p2 - p1 - 1));
+      end else if (vt = 'nvarchar') or (vt = 'nchar') or (vt = 'nvarchar2') then begin
+        FieldType := ftWideString;
+        FieldLen := StrToInt(Copy(FieldInfo, p1 + 1, p2 - p1 - 1)) * 2;
+      end else if (vt = 'numeric') then begin
+        vt := Copy(FieldInfo, p1 + 1, p2 - p1 - 1);
+        pn := pos('.', vt); if pn = 0 then pn := pos(',', vt);
+        FieldType := ftFloat;
+        if pn = 0 then begin
+          FieldLen := StrToInt(vt);
+          FieldDec := 0;
+        end else begin
+          FieldLen := StrToInt(Copy(vt, 1, pn - 1));
+          FieldDec := StrToInt(Copy(vt, pn + 1, 2));
+        end;
+      end;
+    end
+    else
+      FieldLen := 256;
+  end
+  else
+  begin
+    vt := LowerCase(FieldInfo);
+    if vt = 'date' then
+    begin
+      FieldType := ftDate;
+      FieldLen := 10;
+    end
+    else if vt = 'datetime' then
+    begin
+      FieldType := ftDateTime;          // fpierce original ftDate
+      FieldLen := 24;                   // aducom
+    end
+    else if vt = 'time' then
+    begin
+      FieldType := ftTime;
+      FieldLen := 12;
+    end
+{$IFDEF ASQLITE_D6PLUS}
+    else if vt = 'timestamp' then
+    begin
+      FieldType := ftTimeStamp;
+      FieldLen := 12;
+    end
+{$ENDIF}
+    else if (vt = 'integer') or (vt = 'int')  then
+    begin
+      FieldType := ftInteger;
+      FieldLen := 12;
+    end
+    else if (vt = 'float') or (vt = 'real') then
+    begin
+      FieldType := ftFloat;
+      FieldLen := 12;
+    end
+    else if (vt = 'boolean') or (vt = 'logical') then
+    begin
+      FieldType := ftBoolean;
+      FieldLen := 2;
+    end
+    else if (vt = 'char') or (vt = 'byte') then
+    begin
+      FieldType := ftString;
+      FieldLen := 1;
+    end
+    else if (vt = 'shorttext') or (vt = 'string') then
+    begin
+      FieldType := ftString;
+      FieldLen := 255;
+    end
+    else if (vt = 'widetext') or (vt = 'widestring') then
+    begin
+      FieldType := ftWideString;
+      FieldLen := 512;
+    end
+    else if (vt = 'currency') or (vt = 'financial') or (vt = 'money') then
+    begin
+      FieldType := ftCurrency;
+      FieldLen := 10;
+    end
+    else if (vt = 'blob') then
+    begin
+      FieldType := ftBlob;
+      FieldLen := SizeOf(Pointer);
+    end
+    else if (vt = 'graphic') then
+    begin
+      FieldType := ftGraphic;
+      FieldLen := SizeOf(Pointer);
+    end
+    else if (vt = 'clob') or (vt = 'memo') or (vt = 'text') or (vt = 'longtext') then
+    begin
+      FieldType := ftMemo;
+      FieldLen := SizeOf(Pointer);
+    end;
+  end;
+  DebugLeave('GetFieldInfo: ' + vt);
+end;
+
+ //==============================================================================
+ // Convert TDateTime to TDateTimeRec
+ //==============================================================================
+
+function DateTimeToNative(DataType: TFieldType; Data: TDateTime): TDateTimeRec;
+var
+  TimeStamp         : TTimeStamp;
+begin
+  DebugEnter('DateTimeToNative');
+  TimeStamp := DateTimeToTimeStamp(Data);
+  case DataType of
+    ftDate: Result.Date := TimeStamp.Date;
+    ftTime: Result.Time := TimeStamp.Time;
+  else
+    Result.DateTime := TimeStampToMSecs(TimeStamp);
+  end;
+  DebugLeave('DateTimeToNative');
+end;
+
+procedure ApplicationHandleException(Sender: TObject);
+begin
+{$IFDEF ASQLITE_D6PLUS}
+  if Assigned(Classes.ApplicationHandleException) then
+    Classes.ApplicationHandleException(Sender);
+{$ENDIF}
+end;
+
+//============================================================================== TASQLite3LOG
+
+procedure TASQLite3Log.Display(Msg: string);
+var
+  fn                : Textfile;
+begin
+  DebugEnter('TASQLite3Log.Display');
+  if FileExists(FLogFile) then
+  begin
+    if FAppend then
+    begin
+      AssignFile(fn, FLogFile);
+      System.Append(fn);
+    end
+    else
+    begin
+      SysUtils.DeleteFile(FLogFile);
+      AssignFile(fn, FLogFile);
+      Rewrite(fn);
+    end;
+  end
+  else
+  begin
+    AssignFile(fn, FLogFile);
+    Rewrite(fn);
+  end;
+  Writeln(fn, FormatDateTime('yyyy mmm dd (hh:nn:ss) ', now) + Msg);
+  CloseFile(fn);
+  DebugLeave('TASQLite3Log.Display');
+end;
+
+//============================================================================== TASQLite3PRAGMA
+
+function TASQLite3Pragma.GetTempCacheSize: string;
+begin
+  DebugEnter('TASQLite3Pragma.GetTempCacheSize');
+  GetTempCacheSize := 'pragma cache_size=' + IntToStr(FTempCacheSize);
+  DebugLeave('TASQLite3Pragma.GetTempCacheSize');
+end;
+
+function TASQLite3Pragma.GetDefaultCacheSize: string;
+begin
+  DebugEnter('TASQLite3Pragma.GetDefaultCacheSize');
+  GetDefaultCacheSize := 'pragma default_cache_size=' + IntToStr(FDefaultCacheSize);
+  DebugLeave('TASQLite3Pragma.GetDefaultCacheSize');
+end;
+
+function TASQLite3Pragma.GetDefaultSynchronous: string;
+begin
+  DebugEnter('TASQLite3Pragma.GetDefaultSynchronous');
+  GetDefaultSynchronous := 'pragma default_synchronous=' + FDefaultSynchronous;
+  DebugLeave('TASQLite3Pragma.GetDefaultSynchronous');
+end;
+
+function TASQLite3Pragma.GetDefaultTempStore: string;
+begin
+  DebugEnter('TASQLite3Pragma.GetDefaultTempStore');
+  GetDefaultTempStore := 'pragma default_temp_store=' + FDefaultTempStore;
+  DebugLeave('TASQLite3Pragma.GetDefaultTempStore');
+end;
+
+function TASQLite3Pragma.GetTempStore: string;
+begin
+  DebugEnter('TASQLite3Pragma.GetTempStore');
+  GetTempStore := 'pragma temp_store=' + FTempStore;
+  DebugLeave('TASQLite3Pragma.GetTempStore');
+end;
+
+function TASQLite3Pragma.GetSynchronous: string;
+begin
+  DebugEnter('TASQLite3Pragma.GetSynchronous');
+  GetSynchronous := 'pragma synchronous=' + FSynchronous;
+  DebugLeave('TASQLite3Pragma.GetSynchronous');
+end;
+
+ //============================================================================== TFRESULT
+ // TResult is a representation of an internal pointerlist of results.
+ // Only 'normal' results will be stored internally within a fixed memory block
+ // depending on calculated length internally. This is not the case
+ // for blobs and clobs. In this case only the handle is stored in the fixed
+ // structure and a separate memory handle is retrieved to store the blob and
+ // clob data. This is because the blobs are stored as null terminated 'strings'
+ // and thus have different lengths. No more memory is allocated this way than
+ // strictly necessary.
+ // KEEP IN MIND: ...
+ //     This resultset is NOT used for unidirectional search results. You can
+ //     however, open a dbgrid containing griddata. You cannot update your data
+ //     if you use the unidirectional the result is read-only by default and cannot
+ //     be changed.
+ //     The unidirectional dataset improves performance on large resultsets and
+ //     is to be considered for query-only components...
+ //==============================================================================
+
+constructor TFResult.Create(TheDataSet: TASQLite3BaseQuery);
+begin
+  DebugEnter('TFResult.Create');
+  Data := TList.Create;
+  Bookmark := TList.Create;
+  RowId := TList.Create;
+  FDataSet := TheDataset;
+  FLastBookmark := -1;                  // 2004-14-09 (rps) 0 -> -1 (otherwise insert in an empty table gives index out of range)
+  DebugLeave('TFResult.Create');
+end;
+
+destructor TFResult.Destroy;
+var
+  ptr               : Pointer;
+  i                 : integer;
+begin
+  DebugEnter('TFResult.Destroy');
+  FreeBlobs;
+  if Assigned(Data) then begin
+    for i := 0 to Data.Count - 1 do begin
+      ptr := Data.Items[i];
+      if Assigned(ptr) then FreeMem(ptr, FBufSize);
+    end;
+    Data.Free;                          // D4 compatibility, otherwise FreeAndNil could be used
+    Data := nil;
+  end;
+
+  if Assigned(Bookmark) then begin
+    Bookmark.Free;
+    Bookmark := nil;
+  end;
+
+  if Assigned(RowId) then begin
+    RowId.Free;
+    RowId := nil;
+  end;
+
+  DebugLeave('TFResult.Destroy');
+end;
+
+procedure TFResult.FreeBlobs;
+var i, j            : integer;
+  offset            : integer;
+  ptr               : PAnsiChar;
+  stream            : TMemoryStream;
+begin
+  if not Assigned(FDataSet) then exit;
+  if not Assigned(FDataSet.FieldList) then exit;
+  for j := 0 to Data.Count - 1 do begin
+    ptr := GetData(j);
+    for i := 0 to FDataSet.FieldList.Count - 1 do begin
+      if FDataSet.FieldList[i].DataType in [ftMemo, ftFmtMemo, ftGraphic, ftBlob] then begin
+        Offset := FDataset.GetFieldOffset(FDataSet.FieldList[i].FieldNo);
+        Move((ptr + Offset)^, Pointer(Stream), sizeof(Pointer));
+        Stream.Free;
+      end;
+    end;
+  end;
+end;
+
+procedure TFResult.SetBufSize(TheSize: integer);
+begin
+  DebugEnter('TFResult.SetBufSize');
+  FBufSize := TheSize;
+  DebugLeave('TFResult.SetBufSize');
+end;
+
+//==============================================================================
+// Adds a row of data to the resultset.
+//==============================================================================
+
+procedure TFResult.Add(TheBuffer: PAnsiChar; TheRowId: integer);
+var
+  ptr               : PAnsiChar;
+//  i:   integer;
+begin
+{$IFDEF DEBUG_VERY_LOUD}
+  DebugEnter('TFResult.Add');
+{$ENDIF}
+  Inc(FLastBookmark);
+  GetMem(Ptr, FBufSize);
+  move(TheBuffer^, ptr^, FBufSize);
+  Data.Add(Ptr);
+  Bookmark.Add(Pointer(FLastBookMark));
+  if TheRowId >= 0 then
+    RowId.Add(Pointer(TheRowId))
+  else
+    RowId.Add(Pointer(RowId.Count));
+{$IFDEF DEBUG_VERY_LOUD}
+  DebugLeave('TFResult.Add');
+{$ENDIF}
+end;
+
+//==============================================================================
+// Inserts a row of date into the resultset
+//==============================================================================
+
+procedure TFResult.Insert(Index: integer; TheBuffer: pointer; TheRowId: integer);
+var
+  ptr               : Pointer;
+begin
+  DebugEnter('TFResult.Insert');
+  Inc(FLastBookmark);
+  GetMem(Ptr, FBufSize);
+  move(TheBuffer^, ptr^, FBufSize);
+  if Data.Count < Index then begin
+    Data.Add(Ptr);
+    Bookmark.Add(Pointer(FLastBookMark));
+    RowId.Add(Pointer(TheRowId));
+  end else begin
+    Data.Insert(Index, Ptr);
+    Bookmark.Insert(Index, Pointer(FLastBookMark));
+    RowId.Insert(Index, Pointer(TheRowId));
+  end;
+  DebugLeave('TFResult.Insert');
+end;
+
+//==============================================================================
+// Deletes a row of data from the resultset
+//==============================================================================
+
+procedure TFResult.Delete(Index: integer);
+var
+  ptr               : pointer;
+begin
+  DebugEnter('TFResult.Delete');
+  if not ((Index < 0) or (Index >= Data.Count)) then
+  begin
+    ptr := Data.Items[Index];
+    if ptr <> nil then
+      FreeMem(ptr, FBufSize);
+    Data.Delete(Index);
+    Bookmark.Delete(Index);
+    Rowid.Delete(Index);
+  end;
+  DebugLeave('TFResult.Delete');
+end;
+
+//==============================================================================
+// Returns a row from the resultset
+//==============================================================================
+
+function TFResult.GetData(Index: integer): Pointer;
+begin
+  DebugEnter('TFResult.GetData');
+  if (Index < 0) or (Index >= Data.Count) then
+    GetData := nil
+  else
+    GetData := Data.Items[Index];
+  DebugLeave('TFResult.GetData');
+end;
+
+function TFResult.GetBookmark(Index: integer): integer;
+begin
+  DebugEnter('TFResult.GetBookmark');
+  if (Index < 0) or (Index >= Data.Count) then
+    GetBookmark := -1
+  else
+    GetBookmark := integer(Bookmark.Items[Index]);
+  DebugLeave('TFResult.GetBookmark');
+end;
+
+function TFResult.GetRowId(Index: integer): integer;
+begin
+  DebugEnter('TFResult.GetRowId');
+  if (Index < 0) or (Index >= RowId.Count) then
+    GetRowId := -1
+  else
+    GetRowId := integer(RowId.Items[Index]);
+  DebugLeave('TFResult.GetRowId');
+end;
+
+function TFResult.Count: integer;
+begin
+  Count := Data.Count;
+end;
+
+function TFResult.IndexOf(TheBookMark: pointer): integer;
+begin
+  Result := BookMark.IndexOf(TheBookmark);
+end;
+
+//============================================================================== ASQLITEDB
+
+procedure TASQLite3DB.Notification(AComponent: TComponent; Operation: TOperation);
+begin
+{$IFDEF DEBUG_VERY_LOUD}
+  DebugEnter('TASQLite3DB.Notification');
+{$ENDIF}
+//  Application.ProcessMessages;
+  if Assigned(AComponent) then
+  begin
+    if (Operation = opRemove) then
+    begin
+      if (AComponent is TASQLite3Pragma) then begin
+        if Assigned(FASQLitePragma) then begin
+          if TASQLite3Pragma(AComponent) = FASQLitePragma then
+            FASQLitePragma := nil;
+        end;
+      end
+      else if (AComponent is TASQLite3Log) then
+      begin
+        if Assigned(FASQLiteLog) then begin
+          if TASQLite3Log(AComponent) = FASQLiteLog then
+            FASQLiteLog := nil;
+        end;
+      end
+      else if (AComponent is TASQLite3InlineSQL) then
+      begin
+        if Assigned(FInlineSQL) then begin
+          if TASQLite3InlineSQL(AComponent) = FInlineSQL then
+            FInlineSQL := nil;
+        end;
+      end;
+    end;
+  end;
+  inherited;
+{$IFDEF DEBUG_VERY_LOUD}
+  DebugLeave('TASQLite3DB.Notification');
+{$ENDIF}
+end;
+
+function TASQLite3DB.LoadLibs: boolean;
+begin
+  try
+    DebugEnter('TASQLite3DB.LoadLibs');
+    if not(DecimalSeparator in ['.',',']) then
+       DecimalSeparator := '.';
+
+    Debug('loading sqlite lib');
+{$IFNDEF SQLite_Static}
+    Debug(PAnsiChar(DriverDLL));
+    Result := false;
+    DLLHandle := LoadLibrary(PAnsiChar(DriverDLL));  //JohnLito
+    if DLLHandle <> 0 then
+    begin
+      @SQLite3_Open := GetProcAddress(DLLHandle, 'sqlite3_open');
+      if not Assigned(@SQLite3_Open) then exit;
+      @SQLite3_Close := GetProcAddress(DLLHandle, 'sqlite3_close');
+      if not Assigned(@SQLite3_Close) then exit;
+      @SQLite3_Exec := GetProcAddress(DLLHandle, 'sqlite3_exec');
+      if not Assigned(@SQLite3_Exec) then exit;
+      @SQLite3_LibVersion := GetProcAddress(DLLHandle, 'sqlite3_libversion');
+      if not Assigned(@SQLite3_LibVersion) then exit;
+      @SQLite3_ErrorString := GetProcAddress(DLLHandle, 'sqlite3_errmsg');
+      if not Assigned(@SQLite3_ErrorString) then exit;
+      @SQLite3_GetTable := GetProcAddress(DLLHandle, 'sqlite3_get_table');
+      if not Assigned(@SQLite3_GetTable) then exit;
+      @SQLite3_FreeTable := GetProcAddress(DLLHandle, 'sqlite3_free_table');
+      if not Assigned(@SQLite3_FreeTable) then exit;
+      @SQLite3_FreeMem := GetProcAddress(DLLHandle, 'sqlite3_free');
+      if not Assigned(@SQLite3_FreeMem) then exit;
+      @SQLite3_Complete := GetProcAddress(DLLHandle, 'sqlite3_complete');
+      if not Assigned(@SQLite3_Complete) then exit;
+      @SQLite3_LastInsertRow := GetProcAddress(DLLHandle, 'sqlite3_last_insert_rowid');
+      if not Assigned(@SQLite3_LastInsertRow) then exit;
+      @SQLite3_Cancel := GetProcAddress(DLLHandle, 'sqlite3_interrupt');
+      if not Assigned(@SQLite3_Cancel) then exit;
+      @SQLite3_BusyTimeout := GetProcAddress(DLLHandle, 'sqlite3_busy_timeout');
+      if not Assigned(@SQLite3_BusyTimeout) then exit;
+      @SQLite3_BusyHandler := GetProcAddress(DLLHandle, 'sqlite3_busy_handler');
+      if not Assigned(@SQLite3_BusyHandler) then exit;
+      @SQLite3_Changes := GetProcAddress(DLLHandle, 'sqlite3_changes');
+      if not Assigned(@SQLite3_Changes) then exit;
+      @SQLite3_Prepare := GetProcAddress(DLLHandle, 'sqlite3_prepare');
+      if not Assigned(@SQLite3_Prepare) then exit;
+      @SQLite3_Finalize := GetProcAddress(DLLHandle, 'sqlite3_finalize');
+      if not Assigned(@SQLite3_Finalize) then exit;
+      @SQLite3_Reset := GetProcAddress(DLLHandle, 'sqlite3_reset');
+      if not Assigned(@SQLite3_Reset) then exit;
+      @SQLite3_Step := GetProcAddress(DLLHandle, 'sqlite3_step');
+      if not Assigned(@SQLite3_Step) then exit;
+      @SQLite3_Column_blob := GetProcAddress(DLLHandle, 'sqlite3_column_blob');
+      if not Assigned(@SQLite3_Column_blob) then exit;
+      @SQLite3_Column_bytes := GetProcAddress(DLLHandle, 'sqlite3_column_bytes');
+      if not Assigned(@SQLite3_Column_bytes) then exit;
+      @SQLite3_Column_count := GetProcAddress(DLLHandle, 'sqlite3_column_count');
+      if not Assigned(@SQLite3_Column_Count) then exit;
+      @SQLite3_Column_decltype := GetProcAddress(DLLHandle, 'sqlite3_column_decltype');
+      if not Assigned(@SQLite3_Column_decltype) then exit;
+      @SQLite3_Column_double := GetProcAddress(DLLHandle, 'sqlite3_column_double');
+      if not Assigned(@SQLite3_Column_double) then exit;
+      @SQLite3_Column_int := GetProcAddress(DLLHandle, 'sqlite3_column_int');
+      if not Assigned(@SQLite3_Column_int) then exit;
+      @SQLite3_Column_int64 := GetProcAddress(DLLHandle, 'sqlite3_column_int64');
+      if not Assigned(@SQLite3_Column_int64) then exit;
+      @SQLite3_Column_name := GetProcAddress(DLLHandle, 'sqlite3_column_name');
+      if not Assigned(@SQLite3_Column_name) then exit;
+      @SQLite3_Column_text := GetProcAddress(DLLHandle, 'sqlite3_column_text');
+      if not Assigned(@SQLite3_Column_text) then exit;
+      @SQLite3_Column_text16 := GetProcAddress(DLLHandle, 'sqlite3_column_text16');
+      if not Assigned(@SQLite3_Column_text16) then exit;
+      @SQLite3_Column_type := GetProcAddress(DLLHandle, 'sqlite3_column_type');
+      if not Assigned(@SQLite3_Column_type) then exit;
+      @SQLite3_Bind_Blob := GetProcAddress(DLLHandle, 'sqlite3_bind_blob');
+      if not Assigned(@SQLite3_Bind_blob) then exit;
+      @SQLite3_Bind_Text16 := GetProcAddress(DLLHandle, 'sqlite3_bind_text16');
+      if not Assigned(@SQLite3_Bind_Text16) then exit;
+      @SQLite3_Bind_Parameter_Count := GetProcAddress(DLLHandle, 'sqlite3_bind_parameter_count');
+      if not Assigned(@SQLite3_Bind_Parameter_Count) then exit;
+
+      Result := true;
+    end;
+    {$ELSE}
+      DllHandle := 1;
+      @SQLite3_Open := @_sqlite3_open;
+      @SQLite3_Close := @_sqlite3_close;
+      @SQLite3_Exec := @_sqlite3_exec;
+      @SQLite3_LibVersion := @_sqlite3_libversion;
+      @SQLite3_ErrorString := @_sqlite3_errmsg;
+      @SQLite3_GetTable := @_sqlite3_get_table;
+      @SQLite3_FreeTable := @_sqlite3_free_table;
+      @SQLite3_FreeMem := @_sqlite3_free;
+      @SQLite3_Complete := @_sqlite3_complete;
+      @SQLite3_LastInsertRow := @_sqlite3_last_insert_rowid;
+      @SQLite3_Cancel := @_sqlite3_interrupt;
+      @SQLite3_BusyTimeout := @_sqlite3_busy_timeout;
+      @SQLite3_BusyHandler := @_sqlite3_busy_handler;
+      @SQLite3_Changes := @_sqlite3_changes;
+      @SQLite3_Prepare := @_sqlite3_prepare;
+      @SQLite3_Finalize := @_sqlite3_finalize;
+      @SQLite3_Reset := @_sqlite3_reset;
+      @SQLite3_Step := @_sqlite3_step;
+      @SQLite3_Column_blob := @_sqlite3_column_blob;
+      @SQLite3_Column_bytes := @_sqlite3_column_bytes;
+      @SQLite3_Column_count := @_sqlite3_column_count;
+      @SQLite3_Column_decltype := @_sqlite3_column_decltype;
+      @SQLite3_Column_double := @_sqlite3_column_double;
+      @SQLite3_Column_int := @_sqlite3_column_int;
+      @SQLite3_Column_int64 := @_sqlite3_column_int64;
+      @SQLite3_Column_name := @_sqlite3_column_name;
+      @SQLite3_Column_text := @_sqlite3_column_text;
+      @SQLite3_Column_type := @_sqlite3_column_type;
+      @SQLite3_Bind_Blob := @_sqlite3_bind_blob;
+      Result := true;
+    {$ENDIF}
+  finally
+    DebugLeave('TASQLite3DB.LoadLibs');
+  end;
+end;
+
+procedure TASQLite3DB.ShowError;
+var msg             : PAnsiChar;
+begin
+  msg := SQLite3_ErrorString(DBHandle);
+  raise EDatabaseError.Create(msg);
+end;
+
+function TASQLite3DB.SQLite3_ExecSQL(TheStatement: string; Blobs: TList=nil): integer;
+var
+ PF: PAnsiChar;
+ p: Pointer;
+ i: Integer;
+ b: Integer;
+ m: TMemoryStream;
+begin
+ TheStatement := StringReplace(TheStatement, #2, '?', [rfReplaceAll, rfIgnoreCase]);
+ PF := PAnsiChar(TheStatement);
+ repeat
+   Result := SQLite3_Prepare(DBHandle, PF, -1, p, PF);
+   if Result = SQLITE_OK then
+     begin
+       if Assigned(Blobs) then begin
+         for i := 0 to Blobs.Count - 1 do Begin
+           b := i+1;
+           m := TMemoryStream(Blobs.Items[i]);
+           SQLite3_Bind_Blob(p, b, PChar(m.Memory), m.Size, nil);
+         End;
+       end;
+       repeat
+       until SQLite3_Step(p) in [SQLITE_DONE, SQLITE_ERROR, SQLITE_MISUSE];
+       Result := SQLite3_Finalize(p);
+       if Result <> SQLITE_OK then ShowError;
+     end
+   else
+     ShowError;
+ until PF^ = #0;
+end;
+
+function TASQLite3DB.SQLite3_PrepareResult(DB: Pointer; TheStatement: string; FParams: TParams; Sender: TObject): Pointer;
+var
+  i,tmpi: Integer;
+  t: PAnsiChar;
+  RV: Integer;
+//  RowIdCol: Integer; // column containing rowid
+//  RowId: Integer; // current record row id (to be stored in resultset)
+  colname, coltype: PChar;
+  tmpcolname:string;
+  FieldType: TFieldType;
+  FieldLen: Integer;
+  FieldDec: Integer;
+  bFirst: Boolean;
+  wildcard: Integer;
+begin
+  if not (Sender is TASQLite3BaseQuery) then Exit;
+
+  with (Sender as TASQLite3BaseQuery) do begin
+         // if there are blob fields then we need to bind the blob variable
+        RowId := -1;
+        RowIdCol := -1;
+        TheStatement := StringReplace(TheStatement, #2, '?', [rfReplaceAll, rfIgnoreCase]);
+
+        bFirst := True;
+{$IFDEF ASQLITE_D6PLUS}
+        if FUtf8 then
+           RV := SQLite3_Prepare(DBHandle, PAnsiChar(AnsiToUtf8(TheStatement)), -1, result, t)
+        else
+{$endif}
+           RV := SQLite3_Prepare(DBHandle, PAnsiChar(TheStatement), -1, result, t);
+
+          wildcard := 1;
+          if Assigned(FParams) then begin
+              for i := 0 to FParams.Count - 1 do begin
+                  if FParams[i].DataType in [ftBlob, ftGraphic] then begin
+                      SQLite3_Bind_Blob(result, wildcard, PChar(FParams[i].AsBlob), FParams[i].GetDataSize, nil);
+                      Inc(wildcard);
+                    end;
+                end;
+            end;
+
+          if RV <> 0 then ShowError else begin
+              if bFirst then begin // retrieve metadata on first row
+                  bFirst := False;
+                  if SQLite3_Column_count(result) > 0 then FieldDefs.Clear;
+                  for i := 0 to SQLite3_Column_count(result) - 1 do begin
+                      colname := SQLite3_Column_name(result, i);
+
+                  // the second field named "ID", change in "ID_1" (like InterBase)
+                      if (FieldDefs.IndexOf(colname) >= 0) then begin           // Mirko
+                         tmpColName := colname;                                 // Mirko
+                         tmpI := 0;                                             // Mirko
+                         while (FieldDefs.IndexOf(tmpcolname) >= 0) do begin    // Mirko
+                           inc(tmpI);                                           // Mirko
+                           tmpColName := colname + '_' + inttostr(tmpI);        // Mirko
+                         end;                                                   // Mirko
+                         colName := PChar(tmpColName);                          // Mirko
+                      end;                                                      // Mirko
+
+                      if CompareText(colname, 'rowid') = 0 then begin
+                          RowIdCol := i;
+                        end else begin
+                          coltype := SQLite3_Column_decltype(result, i);
+                          //SQl: select max(CurID) from Items, sqlite3_column_decltype returns null.. it's probably SQLite bug
+                          // better is to use max(CurID) as something from .... Aducom
+                          if coltype = nil then
+                            GetFieldInfo('string', FieldType, FieldLen, FieldDec) //OL
+                          else
+                            GetFieldInfo(coltype, FieldType, FieldLen, FieldDec);
+                          if TypeLess then begin
+                              FieldType := ftString;
+                              with FieldDefs.AddFieldDef do begin
+                                  Name := colname;
+                                  DataType := FieldType;
+                                  Size := FieldLen;
+                                end;
+                            end else begin
+                              with FieldDefs.AddFieldDef do begin
+                                  if FieldType <> ftString then begin
+                                      Name := colname;
+                                      DataType := FieldType;
+                                      if FieldType = ftFloat then
+                                        Precision := FieldDec;
+                                    end else begin
+                                      Name := colname;
+                                      DataType := FieldType;
+                                      Size := FieldLen;
+                                    end;
+                                end;
+                            end;
+                          MaxStrLen := MaxStrLen + GetNativeFieldSize(i + 1); // compensate for terminating zero
+                          FResult.SetBufSize(MaxStrLen + 1 + SizeOf(TBookMark));
+                        end;
+                    end;
+                end;
+              end;
+          end;
+end;
+
+function TASQLite3DB.SQLite3_GetNextResult(DB: Pointer; TheStatement: pointer; FParams: TParams; Sender: TObject) : pointer;
+var
+  i : integer;
+  minmin : integer;
+  RV: Integer;
+  mv: Integer;
+//  RowIdCol: Integer; // column containing rowid
+  convertbuf: TConvertBuffer;
+  pData: PAnsiChar;
+  BlobStream: TMemoryStream;
+begin
+  result := nil;
+  with (Sender as TASQLite3BaseQuery) do begin
+
+                FillChar(ResultStr^, MaxBuf, 0);
+                RV := SQLite3_Step(theStatement);
+                if RV = SQLITE_ROW then begin
+
+                    // retrieve data
+                    if (Sender is TASQLite3Query) then
+                        MinMin := 1
+                    else
+                        MinMin := 1; // compensate for 'rowid'
+                    for i := 0 to SQLite3_Column_count(theStatement) - MinMin do begin
+                        if i = RowIdCol then begin // just save rowid
+                            RowId := SQLite3_Column_int(theStatement, i);
+                          end else begin
+
+// ok, i can find-out that the fiels is null but.... eh....
+//                            if SQLite3_column_type(theStatement, i) = 5 then begin
+//                            end;
+
+                            pData := SQLite3_Column_text(theStatement, i);
+                            if pData = nil then pData := ''; // james
+                            if FTypeLess then begin
+                                mv := GetNativeFieldSize(i + 1);
+                                if StrLen(pData) < Cardinal(mv) then
+                                  mv := StrLen(pData);
+                                Move(pData^, (ResultStr + GetFieldOffset(i + 1))^, mv);
+                            end else begin
+                                case FieldDefs[i].DataType of // DI
+                                  ftString: // DI
+                                    begin // DI
+                                      mv := GetNativeFieldSize(i + 1);
+                                      if pData <> nil then //OL
+                                        begin
+                                          if StrLen(pData) < Cardinal(mv) then
+                                             mv := StrLen(pData)+1;  // plus onennnnnnnnnnnnnnnn
+                                          Move(pData^, (ResultStr + GetFieldOffset(i + 1))^, mv);
+                                        end;
+                                    end; // DI
+                                  ftMemo, ftGraphic, ftFmtMemo, ftBlob: // DI
+                                    begin // DI
+                                      // create memory stream to save blob;
+                                      pData := SQLite3_Column_blob(theStatement, i);
+                                      BlobStream := TMemoryStream.Create;
+                                      if pData <> nil then
+                                        BlobStream.Write(pData^, SQLite3_Column_bytes(theStatement, i))
+                                      else begin
+                                          pData := '';
+                                          BlobStream.Write(pData^, 0);
+                                        end;
+                                      Move(BlobStream, (ResultStr + GetFieldOffset(i + 1))^, SizeOf(BlobStream));
+                                    end; // DI
+                                else // DI
+                                  begin // DI
+                                    convertbuf := UnpackBuffer(pData, FieldDefs[i].DataType);
+                                    Move(convertbuf, (ResultStr + GetFieldOffset(i + 1))^, GetFieldSize(i + 1));
+                                  end;
+                                end;
+                            end;
+                          end
+                      end;
+                    Result := ResultStr;
+                  end;
+              if RV in [SQLITE_DONE] then result := nil;
+              if RV in [SQLITE_ERROR, SQLITE_MISUSE] then //f.e. inserting NULL in field declared as NOT NULL
+                ShowError;
+            end;
+end;
+
+procedure TASQLite3DB.SQLite3_CloseResult(TheStatement : pointer);
+var RV : integer;
+begin
+    if TheStatement <> nil then begin
+       SQLite3_Reset(TheStatement);
+       RV := SQLite3_Finalize(TheStatement);
+       if RV <> 0 then raise AsgError.Create('SQLiteExecute error: ' + IntToStr(RV));
+    end;
+end;
+
+function TASQLite3DB.SQLite3_Execute(DB: Pointer; TheStatement: string; FParams: TParams; Sender: TObject): Integer;
+var
+  p: Pointer;
+  RowIdCol: Integer; // column containing rowid
+{$IFDEF ASQLITE_D6PLUS}
+  Cursor: TDBScreenCursor;
+{$endif}
+begin
+  SQLite3_Execute := 0;
+  RowIdCol := -1;
+  if not (Sender is TASQLite3BaseQuery) then Exit;
+  try
+    with (Sender as TASQLite3BaseQuery) do begin
+{$IFDEF ASQLITE_D6PLUS}
+     if Assigned(DBScreen) and (FSQLCursor) then begin
+       Cursor := DBScreen.Cursor;
+       DBScreen.Cursor := dcrSQLWait;
+     end;
+{$endif}
+    RowId := -1;
+
+    FStatement := Connection.SQLite3_PrepareResult(Connection.DBHandle, PAnsiChar(TheStatement),FParams, Sender);
+
+    repeat
+       p := Connection.SQLite3_GetNextResult(Connection.DBHandle, FStatement, FParams, Sender);
+       if p <> nil then
+          FResult.Add(ResultStr, RowId);
+    until p = nil;
+
+    Connection.SQLite3_CloseResult(FStatement);
+    FStatement := nil;
+    end;
+  finally
+{$IFDEF ASQLITE_D6PLUS}
+    if Assigned(DBScreen) and ((Sender as TASQLite3BaseQuery).FSQLCursor) then begin
+        DBScreen.Cursor := Cursor;
+        if DBScreen.Cursor = dcrSQLWait then
+           DBScreen.Cursor := dcrDefault;
+    end;
+{$endif}
+
+  end;
+end;
+
+function TASQLite3DB.FGetDriverDLL: string;
+begin
+  DebugEnter('TASQLite3DB.FGetDriverDLL');
+  if FDriverDLL = '' then
+    FDriverDLL := 'SQLite3.dll';
+  FGetDriverDLL := FDriverDLL;
+  DebugLeave('TASQLite3DB.FGetDriverDLL');
+end;
+
+function TASQLite3DB.FGetDefaultExt: string;
+begin
+  DebugEnter('TASQLite3DB.FGetDefaultExt');
+  if FDefaultExt = '' then
+    FDefaultExt := '.sqb';
+  FGetDefaultExt := FDefaultExt;
+  DebugLeave('TASQLite3DB.FGetDefaultExt');
+end;
+
+procedure TASQLite3DB.FSetDatabase(Database: string);
+begin
+  DebugEnter('TASQLite3DB.FSetDatabase ' + Database);
+  FDatabase := Trim(Database);
+  if ExtractFileExt(FDataBase)='' Then  // GPA
+     FDatabase:=FDataBase+FDefaultExt;  // GPA
+  DebugLeave('TASQLite3DB.FSetDatabase');
+end;
+
+procedure TASQLite3DB.ShowDatabases(List: TStrings);
+var
+  sr                : TSearchRec;
+begin
+  DebugEnter('TASQLite3DB.ShowDatabases');
+  if DefaultExt = '' then
+    DefaultExt := '.sqb';
+  if DefaultExt[1] <> '.' then
+    DefaultExt := '.' + DefaultExt;
+  if DefaultDir <> '' then
+    if DefaultDir[Length(DefaultDir)] <> '\' then
+      DefaultDir := DefaultDir + '\';
+  if FindFirst(FDefaultDir + '*' + DefaultExt, faAnyFile, sr) = 0 then
+  begin
+    repeat
+      List.Add(sr.Name);
+    until FindNext(sr) <> 0;
+    SysUtils.FindClose(sr);
+  end;
+  DebugLeave('TASQLite3DB.ShowDatabases');
+end;
+
+procedure TASQLite3DB.GetTableNames(List: TStrings; SystemTables: boolean = false);
+var
+  ResultPtr         : Pointer;
+  ResultStr         : ^Pointer;
+  RowCount          : cardinal;
+  ColCount          : cardinal;
+  ErrMsg            : PAnsiChar;
+  i                 : integer;
+begin
+  DebugEnter('TASQLite3DB.GetTableNames');
+  if not FConnected then
+    Connected := true;
+  if FConnected then
+  begin
+    SQLite3_GetTable(DBHandle, PAnsiChar(
+      'SELECT name FROM sqlite_master WHERE type="table" ORDER BY name'),
+      ResultPtr, RowCount, ColCount, ErrMsg);
+
+    ResultStr := ResultPtr;
+    List.Clear;
+    Inc(ResultStr);                     // ignore header
+    for i := 1 to RowCount do
+    begin
+      if (CompareText('name', PAnsiChar(ResultStr^)) <> 0) then
+        List.Add(PAnsiChar(ResultStr^));
+      Inc(ResultStr);
+    end;
+    if Assigned(ResultPtr) then SQLite3_FreeTable(ResultPtr);
+  end;
+  DebugLeave('TASQLite3DB.GetTableNames');
+end;
+
+procedure TASQLite3DB.GetIndexFieldNames(IndexName: string; List: TStrings);
+var
+  ResultPtr         : Pointer;
+  ResultStr         : ^Pointer;
+  RowCount          : cardinal;
+  ColCount          : cardinal;
+  ErrMsg            : PAnsiChar;
+  i                 : integer;
+begin
+  DebugEnter('TASQLite3DB.GetIndexFieldNames');
+  if not FConnected then
+    Connected := true;
+  if FConnected then
+  begin
+    SQLite3_GetTable(DBHandle, PAnsiChar(
+      'PRAGMA  index_info("' + IndexName + '");'),
+      ResultPtr, RowCount, ColCount, ErrMsg);
+
+    ResultStr := ResultPtr;
+    List.Clear;
+    Inc(ResultStr, 5);
+    for i := 1 to RowCount do
+    begin
+      List.Insert(0, PAnsiChar(ResultStr^));
+      Inc(ResultStr, 3);
+    end;
+    if Assigned(ResultPtr) then SQLite3_FreeTable(ResultPtr);
+  end;
+  DebugLeave('TASQLite3DB.GetIndexFieldNames');
+end;
+
+procedure TASQLite3DB.GetIndexNames(List: TStrings; SystemTables: boolean = false);
+var
+  ResultPtr         : Pointer;
+  ResultStr         : ^Pointer;
+  RowCount          : cardinal;
+  ColCount          : cardinal;
+  ErrMsg            : PAnsiChar;
+  i                 : integer;
+begin
+  DebugEnter('TASQLite3DB.GetIndexNames');
+  if not FConnected then
+    Connected := true;
+  if FConnected then
+  begin
+    SQLite3_GetTable(DBHandle, PAnsiChar(
+      'SELECT name FROM sqlite_master WHERE type="index" ORDER BY name'),
+      ResultPtr, RowCount, ColCount, ErrMsg);
+
+    ResultStr := ResultPtr;
+    List.Clear;
+    Inc(ResultStr);                     // ignore header
+    for i := 1 to RowCount do
+    begin
+      List.Add(PAnsiChar(ResultStr^));
+      Inc(ResultStr);
+    end;
+    if Assigned(ResultPtr) then SQLite3_FreeTable(ResultPtr);
+  end;
+  DebugLeave('TASQLite3DB.GetIndexNames');
+end;
+
+procedure TASQLite3DB.GetFieldNames(TableName: string; List: TStrings);
+var
+  ResultPtr         : Pointer;
+  ResultStr         : ^Pointer;
+  RowCount          : cardinal;
+  ColCount          : cardinal;
+  ErrMsg            : PAnsiChar;
+  i                 : integer;
+begin
+  DebugEnter('TASQLite3DB.GetFieldNames ' + Tablename);
+  if not FConnected then
+    Connected := true;
+  if FConnected then
+  begin
+    SQLite3_GetTable(DBHandle, PAnsiChar('PRAGMA table_info("' + TableName + '");'),
+      ResultPtr, RowCount, ColCount, ErrMsg);
+    ResultStr := ResultPtr;
+    List.Clear;
+    Inc(ResultStr, 6);                  // headers can be ignored
+    for i := 1 to RowCount do
+    begin
+      Inc(ResultStr);
+      List.Add(PAnsiChar(ResultStr^));      // the second field contains the fieldname
+      Inc(ResultStr, 5);
+    end;
+    if Assigned(ResultPtr) then SQLite3_FreeTable(ResultPtr);
+  end;
+  DebugLeave('TASQLite3DB.GetFieldNames');
+end;
+
+procedure TASQLite3DB.GetPrimaryKeys(TableName: string; List: TStrings);
+var
+  ResultPtr         : Pointer;
+  ResultStr         : ^Pointer;
+//  PK:     ^Pointer;
+  RowCount          : cardinal;
+  ColCount          : cardinal;
+  ErrMsg            : PAnsiChar;
+  Temp              : string;
+  i                 : integer;
+begin
+  DebugEnter('TASQLite3DB.GetPrimaryKeys ' + Tablename);
+  if not FConnected then
+    Connected := true;
+  if FConnected then
+  begin
+    SQLite3_GetTable(DBHandle, PAnsiChar('PRAGMA table_info("' + TableName + '");'),
+      ResultPtr, RowCount, ColCount, ErrMsg);
+    ResultStr := ResultPtr;
+    List.Clear;
+    Inc(ResultStr, 6);                  // headers can be ignored
+    for i := 1 to RowCount do
+    begin
+      Inc(ResultStr);
+      Temp := PAnsiChar(ResultStr^);        // the second field contains the fieldname
+      Inc(ResultStr, 4);
+            // the last field reveils a indicator for primary key
+      if PAnsiChar(ResultStr^) = '1' then
+        List.Add(Temp);
+      Inc(ResultStr);
+    end;
+    if Assigned(ResultPtr) then SQLite3_FreeTable(ResultPtr);
+  end;
+  DebugLeave('TASQLite3DB.GetPrimaryKeys');
+end;
+
+procedure TASQLite3DB.GetTableInfo(TableName: string; List: TList);
+var
+  ResultPtr         : Pointer;
+  ResultStr         : ^Pointer;
+  RowCount          : cardinal;
+  ColCount          : cardinal;
+  ErrMsg            : PAnsiChar;
+  Field             : TASQLite3Field;
+  i                 : integer;
+begin
+  DebugEnter('TASQLite3DB.GetTableInfo ' + Tablename);
+  if not FConnected then
+    Connected := true;
+  if FConnected then
+  begin
+    SQLite3_GetTable(DBHandle, PAnsiChar('PRAGMA table_info("' + TableName + '");'),
+      ResultPtr, RowCount, ColCount, ErrMsg);
+    ResultStr := ResultPtr;
+    while List.Count > 0 do
+    begin
+      TASQLite3Field(List[0]).Free;
+      List.Delete(0);
+    end;
+    List.Clear;
+
+    Inc(ResultStr,6);
+    for i := 1 to RowCount do
+    begin
+      Field := TASQLite3Field.Create;
+      with Field do
+      begin
+        FieldNumber := StrToIntX(PAnsiChar(ResultStr^));
+        Inc(ResultStr);
+        FieldName := PAnsiChar(ResultStr^);
+        Inc(ResultStr);
+        FieldType := PAnsiChar(ResultStr^);
+        Inc(ResultStr);
+        FieldNN := StrToIntX(PAnsiChar(ResultStr^));
+        Inc(ResultStr);
+        FieldDefault := PAnsiChar(ResultStr^);
+        Inc(ResultStr);
+        FieldPK := StrToIntX(PAnsiChar(ResultStr^));
+        Inc(ResultStr);
+      end;
+      List.Add(Field);
+    end;
+    if Assigned(ResultPtr) then SQLite3_FreeTable(ResultPtr);
+  end;
+  DebugLeave('TASQLite3DB.GetTableInfo');
+end;
+
+// retrieves the user version
+function TASQLite3DB.GetUserVersion(database : string=''): integer;
+var
+  ResultPtr         : Pointer;
+  ResultStr         : ^Pointer;
+  RowCount          : cardinal;
+  ColCount          : cardinal;
+  ErrMsg            : PAnsiChar;
+begin
+  DebugEnter('TASQLite3DB.GetTableIndexNames');
+  GetUserVersion := -1;
+  if not FConnected then
+    Connected := true;
+  if FConnected then
+  begin
+    if database <> '' then database := database +'.';
+    SQLite3_GetTable(DBHandle, PAnsiChar(
+      'PRAGMA '+Database+'user_version'),
+      ResultPtr, RowCount, ColCount, ErrMsg);
+    ResultStr := ResultPtr;
+    Inc(ResultStr);
+    GetUserVersion := StrToIntX(PAnsiChar(ResultStr^));
+  end;
+end;
+
+// sets user version.
+procedure TASQLite3DB.SetUserVersion(Version : integer; Database : string='');
+begin
+  if Database <> '' then Database := Database +'.';
+  SQLite3_ExecSQL('PRAGMA '+Database+'user_version='+IntToStr(Version));
+end;
+
+procedure TASQLite3DB.GetTableIndexNames(TableName: string; List: TStrings);
+var
+  ResultPtr         : Pointer;
+  ResultStr         : ^Pointer;
+  RowCount          : cardinal;
+  ColCount          : cardinal;
+  ErrMsg            : PAnsiChar;
+  i                 : integer;
+begin
+  DebugEnter('TASQLite3DB.GetTableIndexNames');
+  if not FConnected then
+    Connected := true;
+  if FConnected then
+  begin
+    SQLite3_GetTable(DBHandle, PAnsiChar(
+      'PRAGMA  index_list("' + TableName + '");'),
+      ResultPtr, RowCount, ColCount, ErrMsg);
+
+    ResultStr := ResultPtr;
+    List.Clear;
+    Inc(ResultStr, 4);                  // Skip header + 1st col.
+    for i := 1 to RowCount do
+    begin
+      List.Insert(0, PAnsiChar(ResultStr^));
+      Inc(ResultStr, 3);
+    end;
+    if Assigned(ResultPtr) then SQLite3_FreeTable(ResultPtr);
+  end;
+  DebugLeave('TASQLite3DB.GetTableIndexNames');
+end;
+
+procedure TASQLite3DB.DBConnect(Connected: boolean);
+var
+  ErrMsg            : PAnsiChar;
+  DBMS              : string;
+  rv                : integer;
+  i                 : integer; // GPA
+begin
+  DebugEnter('TASQLite3DB.DBConnect');
+
+//  ShowMessage(FCharEnc);
+  if (CompareText(FCharEnc,'utf8')=0) or (FCharEnc='') then
+     FUtf8 := true
+  else
+     FUtf8 := false;
+
+  if (Connected) and (FDatabase = '') then
+  begin
+    DebugLeave('TASQLite3DB.DBConnect Exit');
+    raise AsgError.Create('Missing database property');
+    SQLite3_FreeMem(ErrMsg);
+    FConnected := false;
+    exit;
+  end;
+
+  if not Connected then
+  begin
+    if FConnected then
+    begin
+      if DLLHandle <> 0 then
+      begin
+        Debug('freeing sqlite dll');
+        if Assigned(FBeforeDisconnect) then
+          FBeforeDisconnect(self);
+          // if closed then all Datasets must be closed (GPA)
+          if Assigned(Owner) Then
+            For I:=0 to Owner.ComponentCount-1 do
+              if Owner.Components[I] is TASQLite3BaseQuery Then
+                TASQLite3BaseQuery(Owner.Components[I]).Active:=False;
+
+        if Assigned(@SQLite3_Close) then
+          SQLite3_Close(DBHandle);
+
+      {$IFNDEF SQLite_Static}
+          FreeLibrary(DLLHandle);
+      {$ENDIF}
+
+        DLLHandle := 0;
+        if Assigned(FAfterDisconnect) then
+          FAfterDisconnect(self);
+      end;
+      FConnected := false;
+      DebugLeave('TASQLite3DB.DBConnect');
+      exit;
+    end
+  end
+  else
+  begin
+    if CompareText(':memory:', Database) <> 0 then begin
+       if DefaultDir <> '' then begin
+         if DefaultDir[Length(DefaultDir)] <> '\' then
+           DefaultDir := DefaultDir + '\';
+         DBMS := DefaultDir + Database;
+       end else begin
+         if Pos('\', Database) = 0 then
+           DBMS := GetCurrentDir + '\' + DataBase
+         else
+           DBMS := Database;
+       end;
+
+       if FMustExist then begin
+         if not FileExists(DBMS) then begin
+          DebugLeave('TASQLite3DB.DBConnect ' + 'Database ' + DBMS + ' does not exist');
+          raise EDatabaseError.Create('Database ' + DBMS + ' does not exist');
+         end;
+      end;
+    end else DBMS := Database; // in memory database
+
+    if DLLHandle = 0 then
+    begin
+      if not LoadLibs then
+      begin
+        FConnected := false;
+        DebugLeave('TASQLite3DB.DBConnect ' + 'Could Not load SQLite Library');
+        raise AsgError.Create('Could not load SQLite library');
+      end;
+    end;
+
+    FConnected := true;
+    FVersion := SQLite3_LibVersion;
+
+    DBHandle := nil;
+    ErrMsg := nil;
+    if Assigned(FBeforeConnect) then
+      FBeforeConnect(self);
+
+{$IFDEF ASQLITE_D6PLUS}
+    if Assigned(@SQLite3_Open) then
+      if FVersion > '3.2.5' then
+        rv := SQLite3_Open(PAnsiChar(AnsiToUTF8(DBMS)), DBHandle)
+      else
+{$endif}
+        rv := SQLite3_Open(PAnsiChar(DBMS), DBHandle);
+
+    if Assigned(FAfterConnect) then
+      FAfterConnect(self);
+      
+    if DBHandle = nil then
+      FConnected := false;
+
+    if Assigned(FASQLitePragma) then
+      ExecPragma;
+
+    FLastError := ErrMsg;
+    if ErrMsg <> nil then
+      SQLite3_FreeMem(ErrMsg);
+ // GPA Added to execute InlineSQL in case of use Connected:=True instead of Open
+    if ExecuteInlineSQL and Assigned(FInlineSQL) then Try    // GPA
+      ExecStartTransaction('');                              // GPA
+      SQLite3_ExecSQL(FInlineSQL.FSQL.Text);                 // GPA
+      Commit;                                                // GPA
+    finally                                                  // GPA
+      ExecuteInlineSQL:=False;  //GPA Assure just one execution in case of reopen
+    end;                                                     // GPA
+  end;
+  DebugLeave('TASQLite3DB.DBConnect');
+end;
+
+function TASQLite3DB.RowsAffected: integer;
+begin
+  DebugEnter('TASQLite3DB.RowsAffected');
+  if not FConnected then
+    Result := -1
+  else
+    Result := SQLite3_Changes(DBHandle);
+  DebugLeave('TASQLite3DB.RowsAffected');
+end;
+
+//------------------------------------------------------------------------------
+// By Ralf, The Delphi Inspiration
+//------------------------------------------------------------------------------
+
+function TableExistsCallback(UserData: Pointer; ColumnCount: Integer; ColumnValues, ColumnNames: PPointer): Integer; cdecl;
+begin
+  if AnsiStrIComp(UserData, ColumnValues^) <> 0 then
+    Result := 0
+  else
+    Result := 1; // Abort
+end;
+
+//------------------------------------------------------------------------------
+
+function TASQLite3DB.TableExists(const ATableName: AnsiString): Boolean;
+var
+  ErrMsg: PAnsiChar;
+begin
+  try
+    { No WHERE clause is used in the SQL statement below.
+      Instead, the callback function compares without case sensitivity. }
+    Result := SQLite3_Exec(DBHandle, 'SELECT name FROM sqlite_master',
+                           TableExistsCallback,Pointer(ATableName), ErrMsg) = SQLITE_ABORT;
+  finally
+    if ErrMsg <> nil then
+      begin
+        SQLite3_FreeMem(ErrMsg);
+        ShowError;
+      end;
+  end;
+end;
+
+//------------------------------------------------------------------------------
+procedure TASQLite3DB.ExecStartTransaction(TransType: string);
+begin
+// if no transaction type available then use default from asqlitedb
+  if (TransType = '') then TransType := FTransactionType;
+
+  if ((TransType = '') or (CompareText(TransType, 'DEFAULT') = 0)) then StartTransaction
+  else if (CompareText(TransType, 'DEFERRED') = 0) then StartDeferredTransaction
+  else if (CompareText(TransType, 'IMMEDIATE') = 0) then StartImmediateTransaction
+  else if (CompareText(TransType, 'EXCLUSIVE') = 0) then StartExclusiveTransaction
+  else StartTransaction;
+end;
+
+procedure TASQLite3DB.StartTransaction;
+begin
+  DebugEnter('TASQLite3DB.StartTransaction');
+  if not FConnected then                // open database if necessary
+    Connected := true;                  // trigger the 'dbconnect' event
+  if FConnected then SQLite3_ExecSQL('begin transaction');
+  DebugLeave('TASQLite3DB.StartTransaction');
+end;
+
+procedure TASQLite3DB.StartDeferredTransaction;
+begin
+  if not FConnected then                // open database if necessary
+    Connected := true;                  // trigger the 'dbconnect' event
+  if FConnected then SQLite3_ExecSQL('begin deferred transaction');
+end;
+
+procedure TASQLite3DB.StartImmediateTransaction;
+begin
+  if not FConnected then                // open database if necessary
+    Connected := true;                  // trigger the 'dbconnect' event
+  if FConnected then SQLite3_ExecSQL('begin immediate transaction');
+end;
+
+procedure TASQLite3DB.StartExclusiveTransaction;
+begin
+  if not FConnected then                // open database if necessary
+    Connected := true;                  // trigger the 'dbconnect' event
+  if FConnected then SQLite3_ExecSQL('begin exclusive transaction');
+end;
+
+procedure TASQLite3DB.Open;
+begin
+  DebugEnter('TASQLite3DB.Open');
+  Connected := true;
+
+  if DLLHandle = 0 then
+    Connected := false;
+
+  DebugLeave('TASQLite3DB.Open');
+end;
+
+procedure TASQLite3DB.Close;
+begin
+  DebugEnter('TASQLite3DB.Close');
+  Connected := false;
+  DebugLeave('TASQLite3DB.Close');
+end;
+
+procedure TASQLite3DB.ExecPragma;
+var
+  Cmd               : string;
+begin
+  DebugEnter('TASQLite3DB.ExecPragma');
+  if not FConnected then
+    Connected := true;
+  if FConnected then
+  begin
+    if FASQLitePragma.FTempCacheSize <> 0 then
+    begin
+      cmd := FASQLitePragma.GetTempCacheSize;
+      SQLite3_ExecSQL(cmd);
+    end;
+    if FASQLitePragma.FDefaultCacheSize <> 0 then
+    begin
+      cmd := FASQLitePragma.GetDefaultCacheSize;
+      SQLite3_ExecSQL(cmd);
+    end;
+
+    if FASQLitePragma.FDefaultSynchronous <> '' then
+    begin
+      cmd := FASQLitePragma.GetDefaultSynchronous;
+      SQLite3_ExecSQL(cmd);
+    end;
+
+    if FASQLitePragma.FDefaultTempStore <> '' then
+    begin
+      cmd := FASQLitePragma.GetDefaultTempStore;
+      SQLite3_ExecSQL(cmd);
+    end;
+
+    if FASQLitePragma.FTempStore <> '' then
+    begin
+      cmd := FASQLitePragma.GetTempStore;
+      SQLite3_ExecSQL(cmd);
+    end;
+
+    if FASQLitePragma.FSynchronous <> '' then
+    begin
+      cmd := FASQLitePragma.GetSynchronous;
+      SQLite3_ExecSQL(cmd);
+    end;
+  end;
+  DebugLeave('TASQLite3DB.ExecPragma');
+end;
+
+procedure TASQLite3DB.Commit;
+begin
+  DebugEnter('TASQLite3DB.Commit');
+  if not FConnected then
+    Connected := true;
+  if FConnected then SQLite3_ExecSQL('commit transaction');
+  DebugLeave('TASQLite3DB.Commit');
+end;
+
+procedure TASQLite3DB.RollBack;
+begin
+  DebugEnter('TASQLite3DB.RollBack');
+  if not FConnected then
+    Connected := true;
+  if FConnected then
+    SQLite3_ExecSQL('rollback transaction');
+  DebugLeave('TASQLite3DB.RollBack');
+end;
+
+constructor TASQLite3DB.Create(AOwner: TComponent);
+//var fn : TextFile;
+begin
+  DebugEnter('TASQLite3DB.Create');
+  Connected := false;
+  ASQLiteLog := nil;
+  ASQLitePragma := nil;
+  inherited Create(AOwner);
+  DebugLeave('TASQLite3DB.Create');
+end;
+
+destructor TASQLite3DB.Destroy;
+//var fn : TextFile;
+begin
+  DebugEnter('TASQLite3DB.Destroy');
+  FConnected := false;
+  ASQLiteLog := nil;
+  ASQLitePragma := nil;
+  inherited Destroy;
+  DebugLeave('TASQLite3DB.Destroy');
+end;
+
+//============================================================================== TASQLite3BaseQuery
+
+function TASQLite3BaseQuery.CompareBookmarks(Bookmark1, Bookmark2: TBookmark): Integer; //MS
+begin
+   result := sign(integer(Bookmark1^)-integer(Bookmark2^));
+end;
+
+// Is one or more fields a calculated field?  (John Lito)
+function TASQLite3BaseQuery.CalcFieldInList(const List: string): Boolean;
+var i: Integer;
+    Fields: TList;
+begin
+  if Pos(';', List) <> 0 then
+  begin
+    Result := False;
+    Fields := TList.Create;
+    try
+      GetFieldList(Fields, List);
+      for i := 0 to Fields.Count - 1 do
+        if TField(Fields[I]).FieldKind in [fkCalculated, fkLookup] then Result := True;
+    finally
+      Fields.Free;
+    end;
+  end else
+    Result := (FieldByName(List).FieldKind in [fkCalculated, fkLookup]);
+end;
+
+function TASQLite3BaseQuery.Lookup(const KeyFields: string; const KeyValues: Variant;
+  const ResultFields: string): Variant;
+var OldState: TDataSetState;
+begin
+  Result := '';
+  if Locate(KeyFields, KeyValues, []) then
+  begin
+    if CalcFieldInList(ResultFields) then GetCalcFields(PChar(FResult.GetData(FCurRec)));
+    OldState := SetTempState(dsFilter);
+    try
+      Result := FieldValues[ResultFields];
+    finally
+      RestoreState(OldState);
+    end;
+  end;
+end;
+
+{
+  support routine for UTF16
+}
+
+procedure TASQlite3BaseQuery.DataConvert(Field: TField; Source, Dest: Pointer;
+  ToNative: Boolean);
+const x: Word = 0;
+var L: Integer;
+begin
+  try
+    case Field.DataType of
+     ftWideString:
+       begin
+        if ToNative then
+          begin
+           L := Length(PWideChar(Source^));
+           if (L <= 0) then
+            Move(x,Dest^,2)
+           else
+            begin
+             if (L <= Field.Size) then
+              Move(PWideChar(Source^)^, Dest^, (L+1)*2)
+             else
+              begin
+               Move(PWideChar(Source^)^, Dest^, Field.Size*2);
+               //Move(x,(PChar(Dest)+Field.Size-(Field.Size mod 2))^,2+(Field.Size mod 2));
+               Move(x, (PChar(Dest)+Field.Size*2 - 2)^, 2);
+              end;
+            end;
+          end
+         else
+          begin
+           WideString(Dest^) := WideString(PWideChar(Source));
+          end;
+       end;//ftWideString
+     else
+      begin
+       inherited DataConvert(Field, Source, Dest, ToNative);
+      end
+    end;//case
+  finally
+  end;
+end;//DataConvert
+
+
+{
+ Register detail dataset for a master-detail relationship
+}
+procedure TASQLite3BaseQuery.RegisterDetailDataset(DetailDataSet: TASQLite3BaseQuery);
+var
+  i                 : integer;
+begin
+  DebugEnter('TASQLite3BaseQuery.RegisterDetailDataset');
+  try
+    for i := 0 to DetailList.Count - 1 do
+      if DetailList[i] = DetailDataset then exit;
+    DetailList.Add(DetailDataSet);
+  finally
+    DebugLeave('TASQLite3BaseQuery.RegisterDetailDataset');
+  end;
+end;
+
+{ compatibility isue }
+procedure TASQLite3BaseQuery.SQLiteMasterChanged;
+begin
+  DebugEnter('TASQLite3BaseQuery.SQLiteMasterChanged');
+  DebugLeave('TASQLite3BaseQuery.SQLiteMasterChanged');
+end;
+
+{
+ notify that the master has changed and a requery on the detail has
+ to be done
+}
+
+procedure TASQLite3BaseQuery.NotifySQLiteMasterChanged;
+var
+  i                 : integer;
+begin
+  DebugEnter('TASQLite3BaseQuery.NotifySQLiteMasterChanged');
+  for i := 0 to DetailList.Count - 1 do
+  begin
+    TASQLite3BaseQuery(DetailList[i]).SQLiteMasterChanged;
+  end;
+  DebugLeave('TASQLite3BaseQuery.NotifySQLiteMasterChanged');
+end;
+
+{
+   This function returns a string representing the value of the specified field
+   in SQLite format. Floating point values always use '.' as a decimal separator.
+   Date values use 'yyyy-mm-dd' format, unless SQLiteDateFormat is set to false,
+   which results in using TableDateFormat, or system dependent ShortDateFormat
+   if TableDateFormat is not set. Same goes for DateTime and Time values, for
+   which default formats are 'yyyy-mm-ss hh:nn:ss' and 'hh:nn:ss.zzz', respectively.
+   Setting SQLiteDateFormat to false is discouraged.
+   Result is quoted when necessary.
+}
+// added by Donnie
+
+function TASQLite3BaseQuery.GetFieldValue(const AField: TField; const Blobs: TList = nil): string;
+var
+  MS: TMemoryStream;
+  DateTimeFormat: string;
+begin
+  if (AField.DataSet <> Self) then
+    raise EInvalidArgument.Create('Only own fields are accepted');
+  case AField.DataType of
+    ftString:
+{$IFDEF ASQLITE_D6PLUS}
+      if Connection.FUtf8 then
+        Result := QuotedStr(UTF8Encode(VarToWideStr(AField.Value)))
+      else
+{$endif}
+        Result := QuotedStr(AField.AsString);
+    ftSmallint, ftInteger, ftWord:
+      Result := AField.AsString;
+    ftFloat:
+      if DecimalSeparator <> '.' then
+{$IFDEF ASQLITE_D6PLUS}
+        Result := AnsiReplaceStr(AField.AsString, DecimalSeparator, '.')
+{$else}
+        Result := StringReplace(AField.AsString, DecimalSeparator, '.', [rfReplaceAll])
+{$endif}
+      else
+        Result := AField.AsString;
+    ftDate: begin
+      if FSQLiteDateFormat then
+        DateTimeFormat := 'yyyy"-"mm"-"dd'
+      else if TableDateFormat <> '' then
+        DateTimeFormat := TableDateFormat
+      else
+        DateTimeFormat := ShortDateFormat;
+      Result := QuotedStr(FormatDateTime(DateTimeFormat, AField.AsDateTime));
+    end;
+    ftDateTime: begin
+      if FSQLiteDateFormat then
+        DateTimeFormat := 'yyyy"-"mm"-"dd" "hh":"nn":"ss"."zzz'
+      else if TableDateFormat <> '' then
+        DateTimeFormat := TableDateFormat
+      else
+        DateTimeFormat := ShortDateFormat + '" "' + LongTimeFormat;
+      Result := QuotedStr(FormatDateTime(DateTimeFormat, AField.AsDateTime));
+    end;
+    ftTime: begin
+      if FSQLiteDateFormat then
+        DateTimeFormat := 'hh":"nn":"ss"."zzz'
+      else if TableDateFormat <> '' then
+        DateTimeFormat := TableDateFormat
+      else
+        DateTimeFormat := LongTimeFormat;
+      Result := QuotedStr(FormatDateTime(DateTimeFormat, AField.AsDateTime));
+    end;
+    ftBlob, ftGraphic, ftMemo, ftFmtMemo: begin
+      if Blobs = nil then
+        raise EInvalidArgument.Create('No place to store a blob field');
+      MS := TMemoryStream.Create;
+      TBlobField(AField).SaveToStream(MS);
+      Result := #2 + IntToStr(1 + Blobs.Add(MS));
+    end
+    else
+      Result := QuotedStr(AField.AsString);
+  end;
+end; // GetFieldValue
+
+{
+   Unpack the buffer (if necessary) and convert it to a valid representation
+   this is necessary for sqlite since it it typeless. If typed has been
+   defined then the fields have to be converted to the appropiate datatype
+}
+
+function TASQLite3BaseQuery.UnpackBuffer(Buffer: PAnsiChar; FieldType: TFieldType): TConvertBuffer;
+var
+  TempInt           : integer;
+  TempDouble        : double;
+  TempBool          : wordbool;
+  TempT             : TDateTimeRec;
+begin
+{$IFDEF DEBUG_VERY_LOUD}
+  DebugEnter('TASQLite3BaseQuery.UnpackBuffer: ' + Buffer);
+{$ENDIF}
+  case FieldType of
+    ftString:
+      begin
+{$IFDEF DEBUG_VERY_LOUD}
+        DebugLeave('TASQLite3BaseQuery.UnpackBuffer');
+{$ENDIF}
+        exit;
+      end;
+    ftInteger, ftSmallInt:
+      begin
+        TempInt := StrToIntX(Buffer);
+        Move(TempInt, result, sizeof(TempInt));
+      end;
+    ftTime:
+      begin
+        TempT := DateTimeToNative(FieldType, StrToDateTimeX(Buffer));
+        Move(TempT, result, sizeof(TDateTime));
+      end;
+    ftDate:
+      begin
+        TempT := DateTimeToNative(FieldType, StrToDateTimeX(Buffer));
+        Move(TempT, result, sizeof(TDateTime));
+      end;
+    ftDateTime:
+      begin
+        if FSQLiteDateFormat then       // aducom
+          TempT := DateTimeToNative(FieldType, YYYYMMDDParser(Buffer)) // jpierce
+        else
+          TempT := DateTimeToNative(FieldType, StrToDateTimeX(Buffer));
+        Move(TempT, result, sizeof(TDateTime));
+      end;
+    ftFloat, ftBCD, ftCurrency:
+      begin
+        TempDouble := StrToFloatX(FloatParser(Buffer));
+        Move(TempDouble, result, sizeof(TempDouble));
+      end;
+
+{$IFDEF ASQLITE_D6PLUS}
+    ftBoolean:
+      begin
+        TempBool := StrToBool(Buffer);
+        Move(TempBool, result, sizeof(TempBool));
+      end;
+{$ENDIF}
+    ftMemo, ftGraphic, ftBlob, ftFMTMemo: // pointer to stream
+      begin
+        TempInt := StrToInt(Buffer);
+        Move(TempInt, result, sizeof(TempInt));
+      end;
+  end;
+{$IFDEF DEBUG_VERY_LOUD}
+  DebugLeave('TASQLite3BaseQuery.UnpackBuffer');
+{$ENDIF}
+end;
+
+{ This method is called by TDataSet.Open and also when FieldDefs need to
+  be updated (usually by the DataSet designer).  Everything which is
+  allocated or initialized in this method should also be freed or
+  uninitialized in the InternalClose method. }
+
+constructor TASQLite3BaseQuery.Create(AOwner: TComponent);
+begin
+  DebugEnter('TASQLite3BaseQuery.Create');
+  MaxStrLen := 0;
+  FSQL := TStringList.Create;
+  FParams := TParams.Create(Self);
+  DetailList := TList.Create;
+  FConnection := nil;
+  FResult := nil;
+  GetMem(ResultStr, MaxBuf);
+  SQLCursor := true;
+  SQLiteDateFormat := true;
+  TypeLess := false;
+  ReadOnly := false;
+  inherited;
+  DebugLeave('TASQLite3BaseQuery.Create');
+end;
+
+function TASQLite3BaseQuery.CreateBlobStream(Field: TField; Mode: TBlobStreamMode): TStream;
+begin
+  Result := TASQLite3BlobStream.Create(Field as TBlobField, Mode);
+end;
+
+destructor TASQLite3BaseQuery.Destroy;
+begin
+  DebugEnter('TASQLite3BaseQuery.Destroy');
+//  Close;
+//  inherited Destroy;
+
+  if Assigned(FSQL) then begin
+    TStringList(FSQL).OnChange := nil;
+    FSQL.Free;
+  end;
+  FSQL := nil;
+
+  if Assigned(FParams) then
+  begin
+    FParams.Free;
+    FParams := nil;
+  end;
+
+  if Assigned(DetailList) then
+    DetailList.Free;
+  DetailList := nil;
+
+  if Assigned(FConnection) then
+    FConnection := nil;
+
+  if Assigned(ResultStr) then
+    FreeMem(ResultStr);
+  ResultStr := nil;
+
+  if Assigned(FResult) then
+    FResult.Free;
+  FResult := nil;
+
+  inherited;
+  DebugLeave('TASQLite3BaseQuery.Destroy');
+end;
+
+procedure TASQLite3BaseQuery.StartTransaction;
+begin
+  if Assigned(FConnection) then
+    FConnection.ExecStartTransaction(FTransActionType);
+end;
+
+procedure TASQLite3BaseQuery.StartDeferredTransaction;
+begin
+  if Assigned(FConnection) then
+    FConnection.StartDeferredTransaction;
+end;
+
+procedure TASQLite3BaseQuery.StartImmediateTransaction;
+begin
+  if Assigned(FConnection) then
+    FConnection.StartImmediateTransaction;
+end;
+
+procedure TASQLite3BaseQuery.StartExclusiveTransaction;
+begin
+  if Assigned(FConnection) then
+    FConnection.StartExclusiveTransaction;
+end;
+
+procedure TASQLite3BaseQuery.Commit;
+begin
+  if Assigned(FConnection) then
+    FConnection.Commit;
+end;
+
+procedure TASQLite3BaseQuery.RollBack;
+begin
+  if Assigned(FConnection) then
+    FConnection.RollBack;
+end;
+
+//function TASQLite3BaseQuery.LocateNearest(const KeyFields: String; const KeyValues: Variant; Options: TLocateOptions): Boolean;
+ //begin
+ //end;
+
+// implementation by J Bannon, implementing partial key too.
+function TASQLite3BaseQuery.Locate(const KeyFields: string;
+  const KeyValues: variant; Options: TLocateOptions): boolean;
+//loCaseInsensitive, loPartialKey
+var
+  bOk               : boolean;
+  i, j, p           : integer;
+  Fields, SearchValue: string;          //Variable SearchValue added by bobmitch
+  FieldList         : TStringList;
+  DebugStr          : string;
+  DoEnableControls  : boolean;
+begin
+  DebugEnter('TASQLite3BaseQuery.Locate ' + Keyfields);
+  DoEnableControls := not ControlsDisabled; {used to determine whether to EnableControls at end of function}
+  DisableControls;
+  FieldList := TStringList.Create;
+  bOk := false;
+  try
+    Fields := KeyFields;
+    p := pos(';', Fields);
+    while p > 0 do
+    begin
+      FieldList.Add(Copy(Fields, 1, p - 1));
+      System.Delete(Fields, 1, p);
+      p := pos(';', Fields);
+    end;
+    if Fields <> '' then
+      FieldList.Add(Fields);
+
+    First;
+    for i := 1 to FResult.Data.Count do
+    begin
+      SetRecNo(i);
+      bOk := true;
+      for j := 0 to FieldList.Count - 1 do
+      begin
+        if loCaseInsensitive in Options then
+        begin
+          if FieldList.Count = 1 then
+          begin                         //Lines 2303 - 2338 by bobmitch, replaces original lines 2303 - 2336
+            SearchValue := VarToStr(KeyValues);
+            if (loPartialKey in Options) and (Length(SearchValue) <= Length(FieldByName(FieldList[j]).AsString)) then
+              bOk := CompareText(Copy(FieldByName(FieldList[j]).AsString, 1, Length(SearchValue)), SearchValue) = 0
+            else
+              bOk := CompareText(FieldByName(FieldList[j]).AsString, SearchValue) = 0
+          end                           {end loCaseInsensitive in Options AND FieldList.Count = 1}
+          else
+          begin
+            SearchValue := VarToStr(KeyValues[j]);
+            if (loPartialKey in Options) and (Length(SearchValue) <= Length(FieldByName(FieldList[j]).AsString)) then
+              bOk := CompareText(Copy(FieldByName(FieldList[j]).AsString, 1, Length(SearchValue)), SearchValue) = 0
+            else
+              bOk := CompareText(FieldByName(FieldList[j]).AsString, SearchValue) = 0
+          end                           {end loCaseInsensitive in Options AND FieldList.Count greater than 1}
+        end                             {end loCaseInsensitive in Options}
+        else
+        begin                           {begin loCaseInsensitive NOT in Options}
+          if FieldList.Count = 1 then
+          begin
+            SearchValue := VarToStr(KeyValues);
+            if (loPartialKey in Options) and (Length(SearchValue) <= Length(FieldByName(FieldList[j]).AsString)) then
+              bOk := Copy(FieldByName(FieldList[j]).AsString, 1, Length(SearchValue)) = SearchValue
+            else
+              bOk := FieldByName(FieldList[j]).AsString = SearchValue
+          end                           {end loCaseInsensitive NOT in Options AND FieldList.Count = 1}
+          else
+          begin
+            SearchValue := VarToStr(KeyValues[j]);
+            if (loPartialKey in Options) and (Length(SearchValue) <= Length(FieldByName(FieldList[j]).AsString)) then
+              bOk := Copy(FieldByName(FieldList[j]).AsString, 1, Length(SearchValue)) = SearchValue
+            else
+              bOk := FieldByName(FieldList[j]).AsString = SearchValue
+          end;                          {end loCaseInsensitive NOT in Options AND FieldList.Count greater than 1}
+        end;                            {end loCaseInsensitive NOT in Options}
+        if bOk = false then
+          break;
+      end;                              {end for j := 0 to FieldList.Count - 1}
+      if bOk then
+      begin
+        break;
+      end;
+    end;                                {end for i := 1 to FResult.Data.Count}
+    if bOk then
+    begin
+      Locate := true;
+      DebugStr := 'TASQLite3BaseQuery.Locate true';
+    end
+    else
+    begin
+      Locate := false;
+      DebugStr := 'TASQLite3BaseQuery.Locate false';
+    end;
+  finally
+    FieldList.Free;
+    if DoEnableControls then            {restore original state of the controls}
+      EnableControls;
+    DebugLeave(DebugStr);
+  end;
+end;
+
+
+function TASQLite3BaseQuery.GetDataSource: TDataSource;
+
+begin
+  DebugEnter('TASQLite3BaseQuery.GetDataSource');
+  Result := FMasterSource;
+  DebugLeave('TASQLite3BaseQuery.GetDataSource');
+end;
+
+procedure TASQLite3BaseQuery.SetSQLiteDateFormat(const Value: boolean);
+begin
+  FSQLiteDateFormat := Value;
+end;
+
+procedure TASQLite3BaseQuery.SetDataSource(Value: TDataSource);
+begin
+  DebugEnter('TASQLite3BaseQuery.SetDataSource');
+  if IsLinkedTo(Value) then
+    DatabaseError('circular references are not allowed', Self);
+  FMasterSource := Value;
+  DebugLeave('TASQLite3BaseQuery.SetDataSource');
+end;
+
+function TASQLite3BaseQuery.GetMasterFields: string;
+begin
+  DebugEnter('TASQLite3BaseQuery.GetMasterFields');
+  Result := FMasterFields;              //FMasterLink.FieldNames;
+  DebugLeave('TASQLite3BaseQuery.GetMasterFields');
+end;
+
+procedure TASQLite3BaseQuery.SetMasterFields(const Value: string);
+begin
+  DebugEnter('TASQLite3BaseQuery.SetMasterFields ' + Value);
+  FMasterFields := Value;               //  FMasterLink.FieldNames := Value;
+  DebugLeave('TASQLite3BaseQuery.SetMasterFields');
+end;
+ //Checks the State and Results a defined Buffer;
+
+function TASQLite3BaseQuery.GetActiveBuffer(var Buffer: PAnsiChar): boolean;
+begin
+{$IFDEF DEBUG_VERY_LOUD}
+  DebugEnter('TASQLite3BaseQuery.GetActiveBuffer');
+{$ENDIF}
+  case State of
+    dsBrowse: if IsEmpty then
+        Buffer := nil
+      else
+        Buffer := ActiveBuffer;
+
+    dsEdit: Buffer := ActiveBuffer;
+    dsInsert: Buffer := ActiveBuffer;
+    dsFilter: Buffer := ActiveBuffer;   //FFilterBuffer;
+    dsCalcFields: Buffer := CalcBuffer;
+  else
+    Buffer := nil;
+  end;
+  Result := Buffer <> nil;
+{$IFDEF DEBUG_VERY_LOUD}
+  DebugLeave('TASQLite3BaseQuery.GetActiveBuffer ' + PAnsiChar(Buffer));
+{$ENDIF}
+end;
+
+function TASQLite3BaseQuery.GetNativeFieldSize(FieldNo: integer): integer;
+begin
+  DebugEnter('TASQLite3BaseQuery.GetNativeFieldSize');
+  Result := 0;
+  case FieldDefs.Items[FieldNo - 1].Datatype of
+    ftString: Result := FieldDefs.Items[FieldNo - 1].Size + 1;
+    ftWideString: Result := FieldDefs.Items[FieldNo - 1].Size + 1;    
+    ftInteger, ftSmallInt, ftDate, ftTime: Result := 12;
+    ftDateTime: Result := 20;
+    ftFloat, ftBCD, ftCurrency: Result := 12;
+    ftBoolean: Result := 12;
+    ftGraphic, ftMemo, ftBlob, ftFmtMemo: Result := 12; // space for memory handles
+  else
+    raise AsgError.Create('Fieldtype of Field "' + FieldDefs.Items[FieldNo - 1].Name +
+      '" not supported!');
+  end;
+  DebugLeave('TASQLite3BaseQuery.GetNativeFieldSize');
+end;
+
+function TASQLite3BaseQuery.GetFieldSize(FieldNo: integer): integer;
+begin
+{$IFDEF DEBUG_VERY_LOUD}
+  DebugEnter('TASQLite3BaseQuery.GetFieldSize');
+{$ENDIF}
+ // try
+  Result := 0;
+  case FieldDefs.Items[FieldNo - 1].Datatype of
+    ftString: Result := FieldDefs.Items[FieldNo - 1].Size+ 1 ;  // GPA - Warning UTF-8 length can be potentially > Ansi length
+    ftWideString: Result := FieldDefs.Items[FieldNo - 1].Size+ 1 ;  
+    ftInteger, ftSmallInt, ftDate, ftTime: Inc(Result, sizeof(integer));
+    ftDateTime: Inc(Result, sizeof(TDateTime));
+    ftFloat, ftBCD, ftCurrency: Inc(Result, sizeof(double));
+    ftBoolean: Inc(Result, sizeof(wordbool));
+    ftGraphic, ftMemo, ftBlob, ftFmtMemo: Inc(Result, sizeof(pointer));
+  else
+    raise AsgError.Create('Fieldtype of Field "' + FieldDefs.Items[FieldNo - 1].Name +
+      '" not supported!');
+  end;
+{$IFDEF DEBUG_VERY_LOUD}
+  DebugLeave('TASQLite3BaseQuery.GetFieldSize');
+{$ENDIF}
+end;
+
+function TASQLite3BaseQuery.GetFieldSize(Field: TField): integer;
+begin
+{$IFDEF DEBUG_VERY_LOUD}
+  DebugEnter('TASQLiteBaseQuery.GetFieldSize');
+{$ENDIF}
+ // try
+  Result := 0;
+  case Field.DataType of
+    ftString: Result := Field.Size + 1;
+    ftWideString: Result := Field.Size + 1;
+    ftInteger, ftSmallInt, ftDate, ftTime: Inc(Result, sizeof(integer));
+    ftDateTime: Inc(Result, sizeof(TDateTime));
+    ftFloat, ftBCD, ftCurrency: Inc(Result, sizeof(double));
+    ftBoolean: Inc(Result, sizeof(wordbool));
+    ftGraphic, ftMemo, ftBlob, ftFmtMemo: Inc(Result, sizeof(pointer));
+  else
+    raise AsgError.Create('Fieldtype of Field "' + Field.FieldName +
+      '" not supported!');
+  end;
+{$IFDEF DEBUG_VERY_LOUD}
+  DebugLeave('TASQLiteBaseQuery.GetFieldSize');
+{$ENDIF}
+end;
+
+function TASQLite3BaseQuery.GetFieldOffset(FieldNo: integer): integer;
+var
+  i                 : integer;
+  Offset            : integer;
+begin
+{$IFDEF DEBUG_VERY_LOUD}
+  DebugEnter('TASQLite3BaseQuery.GetFieldOffset');
+{$ENDIF}
+  Offset := 0;
+  if FieldNo > 1 then
+  begin
+    for i := 1 to FieldNo - 1 do
+      OffSet := OffSet + GetFieldSize(i);
+  end;
+  GetFieldOffset := Offset;
+{$IFDEF DEBUG_VERY_LOUD}
+  DebugLeave('TASQLite3BaseQuery.GetFieldOffset');
+{$ENDIF}
+end;
+
+function TASQLite3BaseQuery.GetCalcFieldOffset(Field: TField): integer;
+var
+  i                 : integer;
+  Offset            : integer;
+begin
+
+// calcfieldoffset is appended to record (after bookmarkinfo)
+
+{$IFDEF DEBUG_VERY_LOUD}
+  DebugEnter('TASQLiteBaseQuery.GetCalcFieldOffset');
+{$ENDIF}
+  Offset := FRecBufSize + sizeof(TRecInfo); // startlocation of offsetbuffer
+  for i := 0 to FieldList.Count - 1 do begin
+    if CompareText(FieldList[i].FieldName, Field.FieldName) = 0 then begin
+      GetCalcFieldOffset := Offset;
+      exit;
+    end;
+    if FieldList[i].Calculated then
+      OffSet := OffSet + GetFieldSize(Field);
+  end;
+  GetCalcFieldOffset := Offset;
+{$IFDEF DEBUG_VERY_LOUD}
+  DebugLeave('TASQLiteBaseQuery.GetCalcFieldOffset');
+{$ENDIF}
+end;
+
+procedure TASQLite3BaseQuery.SetSQL(const Value: TStrings);
+begin
+  DebugEnter('TASQLite3BaseQuery.SetSQL');
+  Close;
+  if Assigned(FSQL) then
+    FSQL.Assign(Value)
+  else
+    FSQL := Value;
+  DebugLeave('TASQLite3BaseQuery.SetSQL');
+end;
+
+procedure TASQLite3BaseQuery.LoadQueryData;
+begin
+  DebugEnter('TASQLite3BaseQuery.LoadQueryData');
+  if Connection.FConnected then begin
+    Connection.SQLite3_execute(Connection.DBHandle, PAnsiChar(FPrepared), FParams, self);
+  end;
+  DebugLeave('TASQLite3BaseQuery.LoadQueryData');
+end;
+
+procedure TASQLite3BaseQuery.InternalOpen;
+begin
+  DebugEnter('TASQLite3BaseQuery.InternalOpen');
+{$IFDEF ASQLITE_D6PLUS}
+  if UniDirectional then
+     SetUnidirectional(true)
+  else
+     SetUniDirectional(false);
+{$endif}
+  MaxStrLen := 0;
+  if (Connection = nil) then
+  begin                                 // check to see if a valid database
+    raise AsgError.Create('no database connection');
+  end
+  else
+  begin
+
+    if Connection.Connected = false then // open database if necessary
+      Connection.Connected := true;     // trigger the 'dbconnect' event
+
+    if (Connection.Connected) and (Connection.DLLHandle <> 0) then
+      if Assigned(MasterSource) then
+      begin                             // notify master about existance!
+        if (MasterSource.DataSet <> nil) then
+        begin
+          if CompareText(Copy(MasterSource.DataSet.ClassName, 1, 9), 'TASQLite3') = 0 then
+          begin
+            TASQLite3BaseQuery(MasterSource.DataSet).RegisterDetailDataset(
+              TASQLite3BaseQuery(Self));
+          end
+          else
+          begin
+            raise AsgError.Create('master dataset ' + MasterSource.DataSet.ClassName +
+              ' is not of TSQLiteBaseQuery type');
+            DebugLeave('TASQLite3BaseQuery.InternalOpen');
+            exit;
+          end;
+        end
+        else
+        begin
+          raise AsgError.Create('master dataset undefined');
+          DebugLeave('TASQLite3BaseQuery.InternalOpen');
+          exit;
+        end;
+      end;
+
+    if not FUniDir then begin
+  { Load the result into a resultlist }
+       FResult := TFResult.Create(Self);
+       LoadQueryData;
+    end else begin
+       FResult := TFResult.Create(Self);
+       FStatement := Connection.SQLite3_PrepareResult(Connection.DBHandle, PAnsiChar(FPrepared),FParams, self);
+//       ptr := Connection.SQLite3_GetNextResult(Connection.DBHandle, FStatement, FParams,self);
+    end;
+
+  { Initialize our internal position.
+    We use -1 to indicate the "crack" before the first record. }
+    FCurRec := -1;
+
+  { Initialize an offset value to find the TRecInfo in each buffer }
+    FRecInfoOfs := MaxStrLen;
+
+  { Calculate the size of the record buffers.
+    Note: This is NOT the same as the RecordSize property which
+    only gets the size of the data in the record buffer }
+    FRecBufSize := FRecInfoOfs + SizeOf(TRecInfo);
+
+  { Tell TDataSet how big our Bookmarks are (REQUIRED) }
+    BookmarkSize := SizeOf(integer);
+
+  { Initialize the FieldDefs }
+    InternalInitFieldDefs;
+
+  { Create TField components when no persistent fields have been created }
+    if DefaultFields then
+      CreateFields;
+
+  { Bind the TField components to the physical fields }
+    BindFields(true);
+
+  end;
+  DebugLeave('TASQLite3BaseQuery.InternalOpen');
+end;
+
+procedure TASQLite3BaseQuery.InternalClose;
+begin
+  DebugEnter('TASQLite3BaseQuery.InternalClose');
+
+   if (FUniDir) and (FStatement <> nil) and (active) then begin
+      Connection.SQLite3_CloseResult(FStatement);
+      FStatement := nil;
+   end;
+
+  if Assigned(FResult) then
+  begin
+    FResult.Free;
+    FResult := nil;
+  end;
+
+  { Destroy the TField components if no persistent fields }
+  if DefaultFields then
+    DestroyFields;
+
+  { Reset these internal flags }
+  //  FLastBookmark := 0;
+  FCurRec := -1;
+  DebugLeave('TASQLite3BaseQuery.InternalClose');
+end;
+
+{ This property is used while opening the dataset.
+  It indicates if data is available even though the
+  current state is still dsInActive. }
+
+function TASQLite3BaseQuery.IsCursorOpen: boolean;
+begin
+  Result := Assigned(FResult);
+end;
+
+procedure TASQLite3BaseQuery.OpenCursor(InfoQuery: Boolean);
+begin  
+  if InfoQuery then  
+    Begin  
+      if Assigned(FConnection) Then Begin  
+        InternalOpen;
+        InternalClose;  
+      End;  
+    End  
+  else if State <> dsOpening then  
+    inherited OpenCursor(InfoQuery);  
+end;  
+
+procedure TASQLite3BaseQuery.InternalInitFieldDefs;
+begin
+//  Just here for compatibility
+end;
+
+{ This is the exception handler which is called if an exception is raised
+  while the component is being stream in or streamed out.  In most cases this
+  should be implemented useing the application exception handler as follows. }
+
+procedure TASQLite3BaseQuery.InternalHandleException;
+begin
+  DebugEnter('TASQLite3BaseQuery.InternalHandleException');
+  ApplicationHandleException(Self);
+  DebugLeave('TASQLite3BaseQuery.InternalHandleException');
+end;
+
+ { Bookmarks }
+ { ========= }
+
+{ In this sample the bookmarks are stored in the Object property of the
+  TStringList holding the data.  Positioning to a bookmark just requires
+  finding the offset of the bookmark in the TStrings.Objects and using that
+  value as the new current record pointer. }
+
+procedure TASQLite3BaseQuery.InternalGotoBookmark(Bookmark: Pointer);
+var
+  Index             : integer;
+begin
+  DebugEnter('TASQLite3BaseQuery.InternalGotoBookmark');
+//  inherited;
+  Index := FResult.IndexOf(TObject(PInteger(Bookmark)^));
+  if Index <> -1 then
+    FCurRec := Index
+  else
+    if not FUniDir then DatabaseError('Bookmark not found');
+  DebugLeave('TASQLite3BaseQuery.InternalGotoBookmark');
+end;
+
+function TASQLite3BaseQuery.BookmarkValid(Bookmark: Pointer): boolean;
+var
+  Index             : integer;
+begin
+  DebugEnter('TASQLite3BaseQuery.BookmarkValid');
+  Index := FResult.IndexOf(TObject(PInteger(Bookmark)^));
+  if Index <> -1 then
+    BookmarkValid := true
+  else
+    BookmarkValid := false;
+  DebugLeave('TASQLite3BaseQuery.BookmarkValid');
+end;
+
+{ This function does the same thing as InternalGotoBookmark, but it takes
+  a record buffer as a parameter instead }
+
+procedure TASQLite3BaseQuery.InternalSetToRecord(Buffer: PAnsiChar);
+begin
+  DebugEnter('TASQLite3BaseQuery.InternalSetToRecord');
+  InternalGotoBookmark(@PRecInfo(Buffer + FRecInfoOfs).Bookmark);
+//  NotifySQLiteMasterChanged;
+  DebugLeave('TASQLite3BaseQuery.InternalSetToRecord');
+end;
+
+{ Bookmark flags are used to indicate if a particular record is the first
+  or last record in the dataset.  This is necessary for "crack" handling.
+  If the bookmark flag is bfBOF or bfEOF then the bookmark is not actually
+  used; InternalFirst, or InternalLast are called instead by TDataSet. }
+
+function TASQLite3BaseQuery.GetBookmarkFlag(Buffer: PAnsiChar): TBookmarkFlag;
+begin
+  DebugEnter('TASQLite3BaseQuery.GetBookmarkFlag');
+  Result := PRecInfo(Buffer + FRecInfoOfs).BookmarkFlag;
+  DebugLeave('TASQLite3BaseQuery.GetBookmarkFlag');
+end;
+
+procedure TASQLite3BaseQuery.SetBookmarkFlag(Buffer: PAnsiChar; Value: TBookmarkFlag);
+begin
+  DebugEnter('TASQLite3BaseQuery.SetBookmarkFlag');
+  PRecInfo(Buffer + FRecInfoOfs).BookmarkFlag := Value;
+  DebugLeave('TASQLite3BaseQuery.SetBookmarkFlag');
+end;
+
+{ These methods provide a way to read and write bookmark data into the
+  record buffer without actually repositioning the current record }
+
+procedure TASQLite3BaseQuery.GetBookmarkData(Buffer: PAnsiChar; Data: Pointer);
+begin
+  DebugEnter('TASQLite3BaseQuery.GetBookmarkData');
+  PInteger(Data)^ := PRecInfo(Buffer + FRecInfoOfs).Bookmark;
+  DebugLeave('TASQLite3BaseQuery.GetBookmarkData');
+end;
+
+procedure TASQLite3BaseQuery.SetBookmarkData(Buffer: PAnsiChar; Data: Pointer);
+begin
+  DebugEnter('TASQLite3BaseQuery.SetBookmarkData');
+  PRecInfo(Buffer + FRecInfoOfs).Bookmark := PInteger(Data)^;
+  DebugLeave('TASQLite3BaseQuery.SetBookmarkData');
+end;
+
+ { Record / Field Access }
+ { ===================== }
+
+{ This method returns the size of just the data in the record buffer.
+  Do not confuse this with RecBufSize which also includes any additonal
+  structures stored in the record buffer (such as TRecInfo). }
+
+function TASQLite3BaseQuery.GetRecordSize: word;
+begin
+  DebugEnter('TASQLite3BaseQuery.GetRecordSize');
+  Result := MaxStrLen;
+  DebugLeave('TASQLite3BaseQuery.GetRecordSize');
+end;
+
+{ TDataSet calls this method to allocate the record buffer.  Here we use
+  FRecBufSize which is equal to the size of the data plus the size of the
+  TRecInfo structure. }
+
+function TASQLite3BaseQuery.AllocRecordBuffer: PAnsiChar;
+begin
+  DebugEnter('TASQLiteBaseQuery.AllocRecordBuffer');
+  GetMem(Result, FRecBufSize + CalcFieldsSize + sizeof(TRecinfo) + 5);
+  FillChar(Result^, FRecBufSize + CalcFieldsSize + sizeof(TRecinfo) + 5, 0);
+//  FillChar(Result^, GetRecordSize+CalcFieldsSize+10, 0);
+  DebugLeave('TASQLiteBaseQuery.AllocRecordBuffer');
+end;
+
+{ Again, TDataSet calls this method to free the record buffer.
+  Note: Make sure the value of FRecBufSize does not change before all
+  allocated buffers are freed. }
+
+procedure TASQLite3BaseQuery.FreeRecordBuffer(var Buffer: PAnsiChar);
+begin
+  DebugEnter('TASQLiteBaseQuery.FreeRecordBuffer');
+  try FreeMem(Buffer);                  //, FRecBufSize+CalcFieldsSize+sizeof(TRecinfo));
+  except end;
+//  Buffer := nil;
+  DebugLeave('TASQLiteBaseQuery.FreeRecordBuffer');
+end;
+
+{ This multi-purpose function does 3 jobs.  It retrieves data for either
+  the current, the prior, or the next record.  It must return the status
+  (TGetResult), and raise an exception if DoCheck is True. }
+
+function TASQLite3BaseQuery.GetRecord(Buffer: PAnsiChar; GetMode: TGetMode;
+  DoCheck: boolean): TGetResult;
+var
+  ptr               : pointer;
+begin
+  DebugEnter('TASQLite3BaseQuery.GetRecord');
+//  if Active then CheckBrowseMode;
+  if (not (FUniDir)) and (FResult.Count < 1) then
+    Result := grEOF
+  else
+  begin
+    Result := grOK;
+    case GetMode of
+      gmNext:
+        if FUniDir then begin
+//          ptr := Connection.SQLite3_GetNextResult(Connection.DBHandle, FStatement, FParams,self);
+//          if ptr <> nil then
+//             Move(ptr^, Buffer^, MaxStrLen)
+//          else
+//             Result := grEOF;
+        end else begin
+           if FCurRec >= RecordCount - 1 then
+              Result := grEOF
+           else
+             Inc(FCurRec);
+        end;
+      gmPrior: begin
+                if FUniDir then
+//                   Result := grOK
+                   raise AsgError.Create('operation PRIOR not allowed on unidirectional dataset')
+                else begin
+                   if FCurRec <= 0 then
+                      Result := grBOF
+                   else
+                      Dec(FCurRec);
+                   end;
+               end;
+      gmCurrent:
+        begin
+          if (FCurRec < 0) or (FCurRec >= RecordCount) then
+            Result := grError;
+        end;
+    end;
+    if Result = grOK then
+    begin
+      if FUniDir then begin
+          ptr := Connection.SQLite3_GetNextResult(Connection.DBHandle, FStatement, FParams,self);
+          if ptr <> nil then begin
+             Move(ptr^, ActiveBuffer^, MaxStrLen);
+          end else Result := grEOF;
+      end else begin
+          ptr := FResult.GetData(FCurRec);
+          if FResult.Count = 0 then
+             InternalInitRecord(Buffer)
+          else
+             if ptr <> nil then Move(ptr^, Buffer^, MaxStrLen); // albert 17/11/2004
+      end;
+
+      with PRecInfo(Buffer + FRecInfoOfs)^ do
+      begin
+        BookmarkFlag := bfCurrent;
+        Bookmark := FResult.GetBookMark(FCurRec);
+      end;
+
+      if CalcFieldsSize > 0 then
+        GetCalcFields(Buffer)
+
+    end
+    else if (Result = grError) and DoCheck then
+      DatabaseError('No Records');
+  end;
+  DebugLeave('TASQLite3BaseQuery.GetRecord: ' + Buffer);
+end;
+
+{ This routine is called to initialize a record buffer. }
+
+procedure TASQLite3BaseQuery.InternalInitRecord(Buffer: PAnsiChar);
+var
+  i                 : integer;
+  TempT             : TDateTimeRec;
+  Stream            : TMemoryStream;
+begin
+  DebugEnter('TASQLite3BaseQuery.InternalInitRecord');
+
+  for i := 0 to FieldDefs.Count - 1 do
+  begin
+    if not (Fields[i].Calculated) then begin
+      case FieldDefs.Items[i].Datatype of
+        ftMemo, ftGraphic, ftBlob, ftFmtMemo: begin
+            Stream := TMemoryStream.Create;
+            Move(Pointer(Stream), (Buffer + GetFieldOffset(i + 1))^, sizeof(Pointer));
+          end;
+        ftString: PAnsiChar(Buffer + GetFieldOffset(i + 1))^ := #0;
+        ftBoolean: pBoolean(Buffer + GetFieldOffset(i + 1))^ := false;
+        ftFloat: pFloat(Buffer + GetFieldOffset(i + 1))^ := 0;
+        ftSmallInt: pSmallInt(Buffer + GetFieldOffset(i + 1))^ := 0;
+        ftInteger: pInteger(Buffer + GetFieldOffset(i + 1))^ := integer(nil);
+        ftCurrency: pFloat(Buffer + GetFieldOffset(i + 1))^ := 0;
+        ftDate:
+          begin
+            TempT := DateTimeToNative(ftDate, now);
+            Move(TempT, (Buffer + GetFieldOffset(i + 1))^, sizeof(TDateTime));
+          end;
+        ftTime:
+          begin
+            TempT := DateTimeToNative(ftTime, now);
+            Move(TempT, (Buffer + GetFieldOffset(i + 1))^, sizeof(TDateTime));
+          end;
+        ftDateTime:
+          begin
+            TempT := DateTimeToNative(ftDateTime, now);
+            Move(TempT, (Buffer + GetFieldOffset(i + 1))^, sizeof(TDateTime));
+          end;
+      end;
+    end;
+  end;
+
+//  if FMasterSource <> nil then begin
+//     FMasterSource.DataSet.FieldByName()
+//  end;
+
+
+  DebugLeave('TASQLite3BaseQuery.InternalInitRecord');
+end;
+
+{ Here we copy the data from the record buffer into a field's buffer.
+  This function, and SetFieldData, are more complex when supporting
+  calculated fields, filters, and other more advanced features.
+  See TBDEDataSet for a more complete example. }
+
+function TASQLite3BaseQuery.GetFieldData(Field: TField; Buffer: Pointer): boolean;
+var
+//  SrcBuffer         : PAnsiChar;
+  MyBuf : string;
+
+  SrcBuffer         : PAnsiChar;
+//  MasterField       : TField;
+//  EqualPos          : Integer;
+///  MasterFieldName, DetailFieldName   : string;
+
+begin
+{$IFDEF DEBUG_VERY_LOUD}
+  DebugEnter('TASQLite3BaseQuery.GetFieldData');
+{$ENDIF}
+  if Field.FieldNo > 0 then begin
+    // load masterfield data if there's a master-detail relationship
+    // key-data should not be NULL!!
+    if pos(UpperCase(Field.FieldName), UpperCase(FMasterFields)) > 0 then begin
+       MasterSource.DataSet.GetFieldData(Field, Buffer);
+       Result := true;
+       exit;
+    end;
+
+//    if FMasterFields <> '' then begin
+//      EqualPos := Pos('=',FMasterFields);
+//      DetailFieldName := Copy(FMasterFields,1, EqualPos - 1);
+//      MasterFieldName := Copy(FMasterFields,EqualPos + 1, Length(FMasterFields) - EqualPos -1);
+//      if UpperCase(Field.FieldName) = UpperCase(DetailFieldName) then begin
+//        // locate and get master field by name
+//        MasterField := MasterSource.DataSet.FieldByName(MasterFieldName);
+//        MasterSource.DataSet.GetFieldData(MasterField, Buffer);
+//        Result := true;
+//        exit;
+//      end;
+//    end;
+
+    Result := true;                     // indicates NotNull
+    if GetActiveBuffer(SrcBuffer) then begin
+      if (Assigned(Buffer)) and (Assigned(SrcBuffer)) then begin
+        Move((SrcBuffer + GetFieldOffset(Field.FieldNo))^, Buffer^, GetFieldSize(Field.FieldNo));
+        if Field.DataType = ftString then begin // GPA
+           MyBuf := PChar(Buffer);
+{$IFDEF ASQLITE_D6PLUS}
+           if Connection.FUtf8 then
+              Move(Utf8ToAnsi(MyBuf)[1], Buffer^, Length(MyBuf)) // GPA - Warning UTF-8 length can be potentially > Ansi length
+           else
+{$endif}           
+              Move(MyBuf[1], Buffer^, Length(MyBuf)); // GPA - Warning UTF-8 length can be potentially > Ansi length
+            PAnsiChar(PAnsiChar(Buffer) + GetFieldSize(Field.FieldNo))^ := #0; // dev
+        end;
+        Result := true;
+        exit;
+      end;
+      if Assigned(SrcBuffer) then
+        if (Field.DataType <> ftDateTime) and ((SrcBuffer + GetFieldOffset(Field.FieldNo))^ = #0) then
+          Result := false
+    end else begin
+      if assigned(Buffer) then PAnsiChar(Buffer)^ := #0;
+      Result := false;
+    end;
+  end else begin                        {calcfields}
+    Result := GetActiveBuffer(SrcBuffer);
+    if Result and (State in [dsBrowse, dsEdit, dsInsert, dsCalcFields, dsBlockRead]) then begin
+      if (Assigned(Buffer)) then
+        Move((SrcBuffer + GetCalcFieldOffset(Field))^, Buffer^, GetFieldSize(Field));
+    end;
+  end;
+{$IFDEF DEBUG_VERY_LOUD}
+  DebugLeave('TASQLite3BaseQuery.GetFieldData: ' + PAnsiChar(Buffer));
+{$ENDIF}
+end;
+
+// The next two functions are added to increase compatibility with
+// components that require it (like DevExpress)
+
+function TASQLite3BaseQuery.GetFieldData(FieldNo: integer; Buffer: Pointer): boolean;
+begin
+  Result := GetFieldData(FieldByNumber(FieldNo), Buffer);
+end;
+
+{$IFDEF ASQLITE_D6PLUS}
+//function TASQLite3BaseQuery.GetFieldData(Field: TField; Buffer: Pointer;
+//  NativeFormat: boolean): boolean;
+//begin
+//  Result := GetFieldData(Field, Buffer);
+//end;
+{$ENDIF}
+
+{ returns the field data back to callee }
+
+procedure TASQLite3BaseQuery.SetFieldData(Field: TField; Buffer: Pointer);
+var
+  DestBuffer        : PAnsiChar;
+  MyBuf             : string;
+begin
+  DebugEnter('TASQLite3BaseQuery.SetFieldData');
+  GetActiveBuffer(DestBuffer);
+  if (Field.FieldNo > 0) and (Assigned(Buffer)) and (Assigned(DestBuffer)) then
+  begin
+    if Field.DataType = ftString then
+      Begin // GPA 
+        MyBuf := PChar(Buffer);
+{$IFDEF ASQLITE_D6PLUS}
+        if Connection.FUtf8 then
+           MyBuf := AnsiToUTF8(MyBuf);
+{$endif}
+        if Length(MyBuf)>0 then
+           Move(MyBuf[1], (DestBuffer + GetFieldOffset(Field.FieldNo))^, Length(MyBuf)+1) // GPA - Warning UTF-8 length can be potentially > Ansi length
+        else begin
+           MyBuf := #0;
+           Move(MyBuf[1], (DestBuffer + GetFieldOffset(Field.FieldNo))^, Length(MyBuf)); // GPA - Warning UTF-8 length can be potentially > Ansi length
+        end;
+      End
+    else
+      Move(Buffer^, (DestBuffer + GetFieldOffset(Field.FieldNo))^, GetFieldSize(Field.FieldNo));
+  end else {fkCalculated, fkLookup}  begin
+    if (State in [dsBrowse, dsEdit, dsInsert, dsCalcFields, dsBlockRead]) then begin
+      if (Field.FieldNo < 0) and (Assigned(Buffer)) and (Assigned(DestBuffer)) then begin
+        Move(Buffer^, (CalcBuffer + GetCalcFieldOffset(Field))^, GetFieldSize(Field));
+      end;
+    end;
+  end;
+
+  if not (State in [dsCalcFields, dsFilter, dsNewValue]) then
+    DataEvent(deFieldChange, Longint(Field));
+  DebugLeave('TASQLite3BaseQuery.SetFieldData');
+end;
+
+{ Record Navigation / Editing }
+{ =========================== }
+
+{ This method is called by TDataSet.First.  Crack behavior is required.
+  That is we must position to a special place *before* the first record.
+  Otherwise, we will actually end up on the second record after Resync
+  is called. }
+
+procedure TASQLite3BaseQuery.InternalFirst;
+begin
+  DebugEnter('TASQLite3BaseQuery.InternalFirst');
+  FCurRec := -1;
+  DebugLeave('TASQLite3BaseQuery.InternalFirst');
+end;
+
+{ Again, we position to the crack *after* the last record here. }
+
+procedure TASQLite3BaseQuery.InternalLast;
+begin
+  DebugEnter('TASQLite3BaseQuery.InternalLast');
+  FCurRec := FResult.Count;
+  DebugLeave('TASQLite3BaseQuery.InternalLast');
+end;
+
+function TASQLite3BaseQuery.GetLastInsertRow: integer;
+begin
+  if Assigned(Connection) then
+    result := Connection.SQLite3_LastInsertRow(Connection.DBHandle)
+  else
+    result := -1;
+end;
+
+{ This method is called by TDataSet.Post. }
+
+procedure TASQLite3BaseQuery.InternalPost;
+var
+  ptr               : Pointer;
+begin
+  DebugEnter('TASQLite3BaseQuery.InternalPost');
+  FSaveChanges := true;
+  { For inserts, just update the data in the string list }
+  if State = dsEdit then
+  begin
+    if FUniDir then
+       Connection.SQLite3_GetNextResult(Connection.DBHandle, FStatement, FParams,self)
+    else begin
+       ptr := FResult.GetData(FCurrec);
+       if ptr <> nil then
+          move(ActiveBuffer^, ptr^, FRecBufSize); // albert 17/11/2004
+    end;//2006
+  end
+  else
+  begin
+    { If inserting (or appending), increment the bookmark counter and
+      store the data }
+    FResult.Insert(FCurRec, ActiveBuffer,
+      Connection.SQLite3_LastInsertRow(Connection.DBHandle));
+  end;
+  DebugLeave('TASQLite3BaseQuery.InternalPost');
+end;
+
+{ This method is similar to InternalPost above, but the operation is always
+  an insert or append and takes a pointer to a record buffer as well. }
+
+procedure TASQLite3BaseQuery.InternalAddRecord(Buffer: Pointer; Append: boolean);
+begin
+  DebugEnter('TASQLite3BaseQuery.InternalAddRecord');
+  if FReadOnly then
+     raise AsgError.Create('Cannot write to a read-only dataset');
+
+  FSaveChanges := true;
+  if Append then
+    InternalLast;
+  Post;
+  DebugLeave('TASQLite3BaseQuery.InternalAddRecord');
+end;
+
+{ This method is called by TDataSet.Delete to delete the current record }
+
+procedure TASQLite3BaseQuery.InternalDelete;
+begin
+  DebugEnter('TASQLite3BaseQuery.InternalDelete');
+  FSaveChanges := true;
+  FResult.Delete(FCurRec);
+  if FCurRec >= FResult.Count then
+    Dec(FCurRec);
+  DebugLeave('TASQLite3BaseQuery.InternalDelete');
+end;
+
+ { Optional Methods }
+ { ================ }
+
+{ The following methods are optional.  When provided they will allow the
+  DBGrid and other data aware controls to track the current cursor postion
+  relative to the number of records in the dataset.  Because we are dealing
+  with a small, static data store (a stringlist), these are very easy to
+  implement.  However, for many data sources (SQL servers), the concept of
+  record numbers and record counts do not really apply. }
+
+function TASQLite3BaseQuery.GetRecordCount: longint;
+begin
+  DebugEnter('TASQLite3BaseQuery.GetRecordCount');
+  Result := FResult.Count;
+  DebugLeave('TASQLite3BaseQuery.GetRecordCount ' + IntToStr(Result));
+end;
+
+function TASQLite3BaseQuery.GetRecNo: longint;
+begin
+  DebugEnter('TASQLite3BaseQuery.GetRecNo');
+  UpdateCursorPos;
+  if (FCurRec = -1) and (RecordCount > 0) then
+    Result := 1
+  else
+    Result := FCurRec + 1;
+  NotifySQLiteMasterChanged;            //20040819
+  DebugLeave('TASQLite3BaseQuery.GetRecNo');
+end;
+
+procedure TASQLite3BaseQuery.SetRecNo(Value: integer);
+begin
+  DebugEnter('TASQLite3BaseQuery.SetRecNo');
+  if (Value >= 0) and (Value < FResult.Count + 2) then // value < resultetc
+  begin
+    FCurRec := Value - 1;
+    Resync([]);
+  end;
+  DebugLeave('TASQLite3BaseQuery.SetRecNo');
+end;
+
+procedure TASQLite3BaseQuery.SetFiltered(Value: Boolean);
+begin
+  inherited;
+end;
+
+procedure TASQLite3BaseQuery.SetFilterText(const Value: string);
+begin
+  DebugEnter('TASQLite3BaseQuery.SetFilterText ' + Value);
+  if Active then begin
+     Close;
+     inherited;
+     Open;
+  end else Inherited;
+  DebugLeave('TASQLite3BaseQuery.SetFilterText');
+end;
+
+function TASQLite3BaseQuery.SetQueryParams(InStr: string): string;
+var
+  i                 : integer;
+  TempParam         : string;
+  ThisDateFormat    : string;
+  OldDateFormat     : string;
+begin
+  if FSQLiteDateFormat then
+    ThisDateFormat := 'yyyy-mm-dd hh:nn:ss.zzz'
+  else if (FTableDateFormat <> '') then
+    ThisDateFormat := FTableDateFormat
+  else
+    ThisDateFormat := ShortDateFormat;
+
+  for i := 0 to FParams.Count - 1 do begin
+    if (FParams.Items[i].DataType <> ftBlob) and
+      (FParams.Items[i].DataType <> ftGraphic) then begin
+      TempParam := Fparams.Items[i].AsString;
+      if (TempParam = '') and (FParams.Items[i].bound) then begin
+        InStr := StringReplace(Instr, '?', 'NULL', []);
+      end else begin
+        //Here we'll replace legitimate '?' characters with an unprintable character
+        TempParam := StringReplace(TempParam, '?', #1, [rfReplaceAll]);
+
+        //Okay, we need to check string dates and times
+        if FParams[i].DataType = ftDate then begin
+        end else if FParams[i].DataType = ftTime then begin
+        end else if FParams[i].DataType = ftDateTime then begin
+          OldDateFormat := ShortDateFormat;
+          ShortDateFormat := ThisDateFormat;
+          TempParam := DateToStr(FParams[i].AsDateTime);
+          ShortDateFormat := OldDateFormat;
+        end;
+
+        InStr := StringReplace(Instr, '?', QuotedStr(TempParam), [rfIgnoreCase]);
+      end;
+    end else begin                      // BLOB !!
+        //Here we'll replace legitimate '?' characters with an unprintable character
+      InStr := StringReplace(Instr, '?', #2, [rfIgnoreCase]);
+    end;
+  end;
+    //Here we'll restore legitimate '?' characters
+  InStr := StringReplace(Instr, #1, '?', [rfReplaceAll]);
+  SetQueryParams := InStr;
+end;
+
+// ============================================================================= TASQLite3 UPDATE SQL
+
+constructor TASQLite3UpdateSQL.Create(AOWner: TComponent);
+begin
+  DebugEnter('TASQLite3UpdateSQL.Create');
+  inherited Create(AOwner);
+  FInsertSQL := TStringList.Create;
+  FUpdateSQL := TStringList.Create;
+  FDeleteSQL := TStringList.Create;
+  DebugLeave('TASQLite3UpdateSQL.Create');
+end;
+
+destructor TASQLite3UpdateSQL.Destroy;
+begin
+  DebugEnter('TASQLite3UpdateSQL.Destroy');
+  inherited;
+  if Assigned(FInsertSQL) then
+    FInsertSQL.Free;
+  if Assigned(FUpdateSQL) then
+    FUpdateSQL.Free;
+  if Assigned(FDeleteSQL) then
+    FDeleteSQL.Free;
+  DebugLeave('TASQLite3UpdateSQL.Destroy');
+end;
+
+procedure TASQLite3UpdateSQL.SetInsertSQL(const Value: TStrings);
+begin
+  DebugEnter('TASQLite3UpdateSQL.SetInsertSQL');
+  if Assigned(FInsertSQL) then
+    FInsertSQL.Assign(Value)
+  else
+    FInsertSQL := Value;
+  DebugLeave('TASQLite3UpdateSQL.SetInsertSQL');
+end;
+
+procedure TASQLite3UpdateSQL.SetUpdateSQL(const Value: TStrings);
+begin
+  DebugEnter('TASQLite3UpdateSQL.SetUpdateSQL');
+  if Assigned(FUpdateSQL) then
+    FUpdateSQL.Assign(Value)
+  else
+    FUpdateSQL := Value;
+  DebugLeave('TASQLite3UpdateSQL.SetUpdateSQL');
+end;
+
+procedure TASQLite3UpdateSQL.SetDeleteSQL(const Value: TStrings);
+begin
+  DebugEnter('TASQLite3UpdateSQL.SetDeleteSQL');
+  if Assigned(FDeleteSQL) then
+    FDeleteSQL.Assign(Value)
+  else
+    FDeleteSQL := Value;
+  DebugLeave('TASQLite3UpdateSQL.SetDeleteSQL');
+end;
+// ============================================================================= TASQLite3 QUERY
+
+constructor TASQLite3Query.Create(AOwner: TComponent);
+begin
+  DebugEnter('TASQLite3Query.Create');
+  inherited Create(AOwner);
+//  FParams := TParams.Create(Self);
+  TStringList(FSQL).OnChange := QueryChanged;
+  DebugLeave('TASQLite3Query.Create');
+end;
+
+destructor TASQLite3Query.Destroy;
+begin
+  DebugEnter('TASQLite3Query.Destroy');
+
+  if Assigned(FSQL) then
+    TStringList(FSQL).OnChange := nil;
+
+  inherited Destroy;
+  DebugLeave('TASQLite3Query.Destroy');
+end;
+
+procedure TASQLite3Query.Notification(AComponent: TComponent; Operation: TOperation);
+begin
+{$IFDEF DEBUG_VERY_LOUD}
+  DebugEnter('TASQLite3Query.Notification');
+{$ENDIF}
+//  Application.ProcessMessages;
+  if Assigned(AComponent) then
+  begin
+    if (Operation = opRemove) then begin
+      if Assigned(FUpdateSQL) and (AComponent is TASQLite3UpdateSQL) then begin
+        if TASQLite3UpdateSQL(AComponent) = FUpdateSQL then
+          FUpdateSQL := nil;
+      end else
+
+        if Assigned(FConnection) then begin
+          if (AComponent is TASQLite3DB) and
+            (TASQLite3Db(AComponent) = FConnection) then begin
+            Close;
+            Connection := nil;
+          end;
+        end else
+
+    end;
+  end;
+  inherited;
+{$IFDEF DEBUG_VERY_LOUD}
+  DebugLeave('TASQLite3Query.Notification');
+{$ENDIF}
+end;
+
+procedure TASQLite3Query.QueryChanged(Sender: TObject);
+begin
+  DebugEnter('TASQLite3Query.QueryChanged');
+  FNoResults := false;
+  Close;
+  if not FRawSQL then begin
+    if assigned(FParams) then FParams.Clear; // new
+    SQLStr := FParams.ParseSQL(SQL.Text, true)
+  end else SQLStr := SQL.Text;
+  DebugLeave('TASQLite3Query.QueryChanged');
+end;
+
+procedure TASQLite3Query.SetSQL(const Value: TStrings);
+begin
+  DebugEnter('TASQLite3Query.SetSQL');
+  FNoResults := false;
+  Close;
+  if Assigned(FSQL) then
+    FSQL.Assign(Value)
+  else
+    FSQL := Value;
+//  FText := FParams.ParseSQL(SQL.Text, False);
+  DebugLeave('TASQLite3Query.SetSQL');
+end;
+
+function TASQLite3Query.GetSQL: TStrings;
+begin
+  DebugEnter('TASQLite3Query.GetSQL');
+  GetSQL := FSQL;
+  DebugLeave('TASQLite3Query.GetSQL');
+end;
+
+procedure TASQLite3Query.InternalDelete;
+var
+  MySQL             : string;
+  TempSQL           : string;
+  SQLStr            : string; // added by Donnie
+  TheWord           : string;
+  TableId           : string;
+  FieldId           : string;
+  startpos          : integer;
+  vartype           : integer;
+  p                 : integer;
+  Blobs             : TList; // added by Donnie
+label
+  Ende;
+begin
+  DebugEnter('TASQLite3Query.InternalDelete');
+  if FReadOnly then
+    raise AsgError.Create('Cannot delete from a read-only dataset');
+
+  if Connection.FConnected then
+  begin
+    if FAutoCommit then
+      Connection.ExecStartTransaction(FTransactionType);
+
+    if not Assigned(FUpdateSQL) then
+    begin
+      raise AsgError.Create('Missing TASQLite3UpdateSQL component');
+      goto ende;
+    end;
+ //     MyFieldList := TStringList.Create;
+ //     MyFieldValues := TStringList.Create;
+    Blobs := TList.Create;
+    MySQL := FUpdateSQL.FDeleteSQL.Text;
+    startpos := 1;
+
+    TheWord := GetWord(MySQL, startpos, vartype); // delete
+    if not SyntaxCheck(TheWord, 'delete') then
+      goto ende;
+
+    TheWord := GetWord(MySQL, startpos, vartype); // from
+    if not SyntaxCheck(TheWord, 'from') then
+      goto ende;
+
+    Tableid := GetWord(MySQL, startpos, vartype); // tablename
+
+    TheWord := GetWord(MySQL, startpos, vartype); // where
+    if not SyntaxCheck(TheWord, 'where') then
+      goto ende;
+
+    SQLStr := 'delete from ' + TableId + ' where ';
+    TempSQL := Copy(MySQL, startpos, 999);
+
+    p := pos(':', TempSQL);
+    while p > 0 do
+    begin
+      SQLStr := SQLStr + Copy(TempSQL, 1, p - 1);
+      System.Delete(TempSQL, 1, p);
+      startpos := 1;
+      FieldId := GetWord(TempSQL, startpos, vartype); // variable
+      System.Delete(TempSQL, 1, startpos); // Tzvetan
+      // SQLStr := SQLStr + QuotedStr(FieldByName(FieldId).AsString);
+      // edited by Donnie
+      SQLStr := SQLStr + GetFieldValue(FieldByName(FieldId), Blobs);
+      p := pos(':', TempSQL);
+    end;
+    SQLStr := SQLStr + Copy(TempSQL, StartPos, 999);
+    try
+      Connection.SQLite3_execute(Connection.DBHandle, PAnsiChar(SQLStr), FParams, self);
+      if FAutoCommit then
+        Connection.Commit;
+    except
+      if FAutoCommit then begin
+        Connection.RollBack;
+        raise;
+      end;
+    end;
+    if Assigned(Blobs) then begin
+      for p := 0 to Blobs.Count - 1 do
+        TMemoryStream(Blobs.Items[p]).Free;
+      Blobs.Free;
+    end;
+    inherited InternalDelete;
+  end;
+  Ende:
+  DebugLeave('TASQLite3Query.InternalDelete');
+end;
+
+ //==============================================================================
+ // This is probabely the most difficult thing about these components.
+ // To be able to have a live resultset a tupdatequery must be used to
+ // supply the correct sql on the events. In the internalpost the insert and
+ // update are handled. The routine will take the given sql and remodel it
+ // to a workable sql which is executed. Keep in mind that this routine
+ // is far more difficult then the TASQLite3Table, since the last one is depending
+ // on a unique rownumber, available in the resultset, which might not be
+ // available to user queries
+ // There are several syntaxes allowed:
+ //
+ // insert into table *
+ // this will generate an insert statement for each field and values
+ // i.e. insert into table a,b,c values :a, :b, :c;
+ //
+ // insert into table (a, b, c) values *
+ // this will generate an insert statement like
+ // insert into table (a, b, c) values (:a, :b, :c);
+ //
+ // insert into table (a, b, c) values (:a, :b, :c);
+ // insert into table (a, b, c) values (:a, "bvalue", :c) etc.
+ //
+ // update table set * where <criteria>
+ // this will generate a update for all fields like
+ // update a=:a, b=:b, c=:c where <criteria>
+ //
+ //==============================================================================
+
+procedure TASQLite3Query.InternalPost;
+var
+  i                 : integer;
+  p                 : integer;
+  startpos          : integer;
+  MyFieldList       : TStringList;
+  MyFieldValues     : TStringList;
+  MySQL             : string;
+  TheWord           : string;
+  TempSQL           : string;
+  SQLStr            : string; // added by Donnie
+  TableId           : string;
+  FieldId           : string;
+  varType           : integer;
+  Blobs             : TList; // added by Donnie
+begin
+  DebugEnter('TASQLite3Query.InternalPost');
+  if FReadOnly then
+    raise AsgError.Create('Cannot post into a read-only dataset');
+  MyFieldList := nil;
+  MyFieldValues := nil;
+  try
+    if not Connection.FConnected then
+    begin
+      DebugLeave('TASQLite3Query.InternalPost');
+      exit;
+    end;
+    if FAutoCommit then
+      Connection.ExecStartTransaction(FTransactionType);
+    if not Assigned(FUpdateSQL) then
+    begin
+      DebugLeave('TASQLite3Query.InternalPost Exception');
+      raise AsgError.Create('Missing TASQLite3UpdateSQL component');
+    end;
+
+    Blobs := TList.Create;
+    if (State = dsEdit) and (FResult.Count > 0) then
+    begin
+      MyFieldList := TStringList.Create;
+      MyFieldValues := TStringList.Create;
+      MySQL := FUpdateSQL.FUpdateSQL.Text;
+      startpos := 1;
+      TheWord := GetWord(MySQL, startpos, vartype); // update
+      if not SyntaxCheck(TheWord, 'update') then
+        exit;
+
+      Tableid := GetWord(MySQL, startpos, vartype); // tablename
+
+      TheWord := GetWord(MySQL, startpos, vartype); // set or '*'
+      if TheWord = '*' then
+      begin
+        for i := 0 to FieldList.Count - 1 do
+        begin
+          MyFieldList.Add(FieldList[i].FieldName);
+          MyFieldValues.Add(':' + FieldList[i].FieldName);
+        end;
+        TheWord := GetWord(MySQL, startpos, vartype); // where
+      end
+      else
+      begin
+        if not SyntaxCheck(TheWord, 'set') then
+        begin
+          DebugLeave('TASQLite3Query.InternalPost');
+          exit;
+        end;
+
+        repeat
+          TheWord := GetWord(MySQL, startpos, vartype); // fieldname
+          MyFieldList.Add(TheWord);
+
+          TheWord := GetWord(MySQL, startpos, vartype); // '='
+          if not SyntaxCheck(TheWord, '=') then
+          begin
+            DebugLeave('TASQLite3Query.InternalPost');
+            exit;
+          end;
+          TheWord := GetWord(MySQL, startpos, vartype); // 2004-14-09 (rps) ':' or 'where'  --->
+          if vartype = vtcDelimiter then //                                 <---
+            TheWord := GetWord(MySQL, startpos, vartype); // fieldvalue
+          if TheWord = '*' then
+            MyFieldValues.Add(':' + MyFieldList[MyFieldList.Count - 1])
+          else
+            MyFieldValues.Add(':' + TheWord);
+
+          TheWord := GetWord(MySQL, startpos, vartype); // , or 'where'
+        until CompareText(TheWord, 'where') = 0;
+      end;
+
+      if not SyntaxCheck(TheWord, 'where') then
+        exit;
+
+      SQLStr := 'update ' + TableId + ' set ';
+      // for i := 0 to FieldList.Count - 1 do
+      // typo corrected by Donnie
+      for i := 0 to MyFieldList.Count - 1 do
+      begin
+        // SQLStr := SQLStr + FieldList[i].FieldName + '=';
+        // typo corrected by Donnie
+        SQLStr := SQLStr + MyFieldList.Strings[i] + '=';
+        FieldId := MyFieldValues[i];
+        if FieldId[1] = ':' then
+        begin
+          System.Delete(FieldId, 1, 1);
+          // SQLStr := SQLStr + QuotedStr(FieldByName(FieldId).AsString) + ','
+          // edited by Donnie
+          SQLStr := SQLStr + GetFieldValue(FieldByName(FieldId), Blobs) + ','
+        end
+        else
+          SQLStr := SQLStr + QuotedStr(FieldId) + ','
+      end;
+      System.Delete(SQLStr, Length(SQLStr), 1); // get rid of ','
+      TempSQL := ' where ' + Copy(MySQL, startpos, 999);
+
+      p := pos(':', TempSQL);
+      while p > 0 do
+      begin
+        SQLStr := SQLStr + Copy(TempSQL, 1, p - 1);
+        System.Delete(TempSQL, 1, p);
+        startpos := 1;
+        FieldId := GetWord(TempSQL, startpos, vartype); // variable
+        System.Delete(TempSQL, 1, startpos); // Tzvetan
+        // SQLStr := SQLStr + QuotedStr(FieldToStr(FieldByName(FieldId)));
+        // edited by Donnie
+        SQLStr := SQLStr + GetFieldValue(FieldByName(FieldId), Blobs);
+        p := pos(':', TempSQL);
+      end;
+      SQLStr := SQLStr + Copy(TempSQL, StartPos, 999);
+
+      // Connection.SQLite3_ExecSQL(SQLStr);
+      // edited by Donnie
+      Connection.SQLite3_ExecSQL(SQLStr, Blobs);
+      inherited InternalPost;           // rework internals
+    end
+    else
+    begin
+    { If inserting (or appending), increment the bookmark counter and
+      store the data. Sytax should be: insert into <table> * or
+      insert into <table> (field, field) values (field, field) | *
+      The sql is parsed and a new (valid) sql generated
+    }
+      MyFieldList := TStringList.Create;
+      MyFieldValues := TStringList.Create;
+      MySQL := FUpdateSQL.FInsertSQL.Text;
+      startpos := 1;
+      TheWord := GetWord(MySQL, startpos, vartype); // insert
+      if not SyntaxCheck(TheWord, 'insert') then
+        exit;
+
+      TheWord := GetWord(MySQL, startpos, vartype); // into
+      if not SyntaxCheck(TheWord, 'into') then
+        exit;
+
+      Tableid := GetWord(MySQL, startpos, vartype); // tablename
+
+      TheWord := GetWord(MySQL, startpos, vartype); // ( or *
+      if TheWord = '*' then
+      begin
+        for i := 0 to FieldList.Count - 1 do
+        begin
+          MyFieldList.Add(FieldList[i].FieldName);
+          MyFieldValues.Add(':' + FieldList[i].FieldName);
+        end;
+      end
+      else if TheWord = '(' then
+      begin
+        repeat
+          TheWord := GetWord(MySQL, startpos, vartype); // fieldname
+          MyFieldList.Add(TheWord);
+          TheWord := GetWord(MySQL, startpos, vartype); // ',' or ')'
+        until theword = ')';
+        TheWord := GetWord(MySQL, startpos, vartype); // values
+        TheWord := GetWord(MySQL, startpos, vartype); // '(' or '*'
+        if TheWord = '*' then
+        begin
+          for i := 0 to MyFieldList.Count - 1 do
+            MyFieldValues.Add(':' + MyFieldList[i]);
+        end
+        else
+        begin
+// 2004-14-09 (rps) original - does not work
+          repeat
+            TheWord := GetWord(MySQL, startpos, vartype); // ':' or fieldname
+            if vartype = vtcDelimiter then begin
+              TheWord := GetWord(MySQL, startpos, vartype); // fieldname !!
+              MyFieldValues.Add(':' + TheWord);
+            end else
+              MyFieldValues.Add(TheWord);
+            TheWord := GetWord(MySQL, startpos, vartype); // ',' or ')'
+          until theword = ')';
+        end;
+      end
+      else
+      begin
+        raise AsgError.Create('SQL macro syntax error on insertsql, expected ( or *');
+      end;
+
+      SQLStr := 'insert into ' + TableId + ' (';
+      for i := 0 to MyFieldList.Count - 1 do
+        SQLStr := SQLStr + MyFieldList[i] + ',';
+      SQLStr[Length(SQLStr)] := ')';
+      SQLStr := SQLStr + ' values (';
+      for i := 0 to MyFieldList.Count - 1 do
+      begin
+        FieldId := MyFieldValues[i];
+        if FieldId[1] = ':' then begin
+          System.Delete(FieldId, 1, 1);
+          // SQLStr := SQLStr + QuotedStr(FieldByName(FieldId).AsString) + ','
+          // edited by Donnie
+          SQLStr := SQLStr + GetFieldValue(FieldByName(FieldId), Blobs) + ','
+        end else begin
+          if CompareText(FieldId,'null')=0 then
+             SQLStr := SQLStr + FieldId+','
+          else
+             SQLStr := SQLStr + QuotedStr(FieldId) + ','
+        end;
+      end;
+      SQLStr[Length(SQLStr)] := ')';
+      // Connection.SQLite3_ExecSQL(SQLStr);
+      // edited by Donnie
+      Connection.SQLite3_ExecSQL(SQLStr, Blobs);
+      if FResult.Count = 0 then
+        Inc(FCurrec);
+      inherited InternalPost;           // rework internals
+    end;
+    if FAutoCommit then
+    begin
+      try
+        Connection.Commit;
+      except
+        Connection.RollBack;
+        raise;
+      end;
+    end;
+  finally
+    if Assigned(MyFieldList) then MyFieldList.Free;
+    if Assigned(MyFieldValues) then MyFieldValues.Free;
+    if Assigned(Blobs) then begin
+      for i := 0 to Blobs.Count - 1 do
+        try
+          TMemoryStream(Blobs.Items[i]).Free;
+        except
+        end;
+      Blobs.Free;
+    end;
+  end;
+  DebugLeave('TASQLite3Query.InternalPost');
+end;
+
+procedure TASQLite3Query.InternalClose;
+begin
+  DebugEnter('TASQLite3Query.InternalClose');
+  FPrepared := '';
+  inherited;
+  DebugLeave('TASQLite3Query.InternalClose');
+end;
+
+procedure TASQLite3Query.InternalOpen;
+//var
+//  p                 : integer;
+begin
+  DebugEnter('TASQLite3Query.InternalOpen');
+  if Trim(FSQL.Text) = '' then
+  begin
+    raise AsgError.Create('no query specified');
+    abort;
+  end;
+
+  if (FMaxResults = 0) and (FStartResult <> 0) then
+    FMaxResults := -1;
+
+ // SQLStr contains the 'raw' interpreted SQL, with ? as parameterlist
+ // This string has to be preserved, since it was parsed on entering the sql.
+ // On close and open (i.e. in case of master-detail) the parsed data still
+ // must be available
+
+ // We'll prepare the SQL statement into FPrepared. This is also the var
+ // containing the SQL statement to be executed.
+  FPrepared := SQLStr;
+
+//  FPrepared := FSql.Text; // 2004-14-09 (rps) changed SqlStr (current) -> FSql.Text (property),
+                          //                  to bring Close; Open; to work. (Full refresh.)
+                          // this will block parameterized queries to function right (Aducom)
+
+  if (Filtered) and (Filter <> '') then
+  begin
+    //in order to let a filter work we use a little trick:
+    //select * from (my select statement)
+    FPrepared := 'select * from (' + FPrepared + ') where ' + Filter;
+  end;
+
+  if FParams.Count > 0 then
+    FPrepared := SetQueryParams(FPrepared);
+
+  if FMaxResults <> 0 then
+    FPrepared := FPrepared + ' limit ' + IntToStr(FMaxResults);
+  if FStartResult <> 0 then
+    FPrepared := FPrepared + ' offset ' + IntToStr(FStartResult);
+  inherited;
+  DebugLeave('TASQLite3Query.InternalOpen');
+end;
+
+ // =============================================================================
+ // The master-detail is implemented through the filter object
+ // in the future perhaps a separate filter object will be used allowing
+ // to add your own criteria too, but for the time being..
+ //==============================================================================
+
+procedure TASQLite3Query.SQLiteMasterChanged;
+var
+  r, s              : string;
+  m, d              : string;
+  p                 : integer;
+  cAnd              : string;
+begin
+  DebugEnter('TASQLite3Query.SQLiteMasterChanged');
+  Close;
+  cAnd := '';
+  r := FMasterFields;
+  Filter := '';
+  Filtered := false;
+  while r <> '' do
+  begin                                 // build the filter sql syntax
+    p := pos(';', r);
+    if p = 0 then
+    begin
+      if Trim(r) <> '' then
+        s := r;
+      r := '';
+    end
+    else
+    begin
+      s := Trim(Copy(r, 1, p - 1));
+      System.Delete(r, 1, p);
+    end;
+
+    p := pos('=', s);
+    if p = 0 then
+    begin
+      raise AsgError.Create('Syntax error: Masterfields not build of a=b;... pairs');
+    end
+    else
+    begin
+      d := copy(s, 1, p - 1);
+      m := copy(s, p + 1, 99);
+    end;
+//    Filter := Filter + cAnd + d + '=' + FMasterSource.DataSet.FieldByName(m).AsString;
+    Filter := Filter + cAnd + d + '=' + QuotedStr(FMasterSource.DataSet.FieldByName(m).AsString) ;
+    cAnd := ' and ';
+  end;
+  if (Filter <> '') and (Active) then begin
+    filtered := true;
+    Open;
+  end;
+  DebugLeave('TASQLite3Query.SQLiteMasterChanged');
+end;
+
+ //==============================================================================
+ // execsql is used for sql statements which do not require cursors. For this
+ // reason the fnoresults is set, to prevent building a result set
+ //==============================================================================
+
+procedure TASQLite3BaseQuery.ExecSQL;
+begin
+  DebugEnter('TASQLite3BaseQuery.ExecSQL');
+  FNoResults := true;
+  Close;
+  if FAutoCommit then
+  begin
+    Connection.ExecStartTransaction(FTransactionType);
+    Open;
+    try
+      Connection.Commit
+    except
+      Connection.RollBack;
+      raise;
+    end;
+  end
+  else
+    Open;
+  DebugLeave('TASQLite3BaseQuery.ExecSQL');
+end;
+
+procedure TASQLite3BaseQuery.SetParamsList(Value: TParams);
+begin
+  DebugEnter('TASQLite3BaseQuery.SetParamsList');
+  FParams.AssignValues(Value);
+  DebugLeave('TASQLite3BaseQuery.SetParamsList');
+end;
+
+function TASQLite3BaseQuery.GetParamsCount: word;
+begin
+  DebugEnter('TASQLite3BaseQuery.GetParamsCount');
+  Result := FParams.Count;
+  DebugLeave('TASQLite3BaseQuery.GetParamsCount');
+end;
+
+procedure TASQLite3Table.SetFOrderBy(OrderBy : string);
+begin
+ if FOrderBy <> OrderBy then begin
+    Close;
+    FOrderBy := OrderBy;
+ end;
+end;
+
+procedure TASQLite3Table.SetFTableName(TableName : string);
+begin
+  Close;
+  FTableName := TableName;
+end;
+
+procedure TASQLite3Table.Notification(AComponent: TComponent; Operation: TOperation);
+begin
+{$IFDEF DEBUG_VERY_LOUD}
+  DebugEnter('TASQLite3Table.Notification');
+{$ENDIF}
+//  Application.ProcessMessages;
+  if Assigned(AComponent) then
+  begin
+    if (Operation = opRemove) then
+    begin
+      if (AComponent is TASQLite3DB) and Assigned(FConnection) then
+      begin
+        if TASQLite3DB(AComponent) = FConnection then begin
+          Close;
+          FConnection := nil;
+        end;
+      end else
+
+    end;
+  end;
+  inherited;
+{$IFDEF DEBUG_VERY_LOUD}
+  DebugLeave('TASQLite3Table.Notification');
+{$ENDIF}
+end;
+
+procedure TASQLite3Table.InternalOpen;
+begin
+  DebugEnter('TASQLite3Table.InternalOpen');
+
+  if FTableName = '' then
+  begin
+    raise AsgError.Create('no table specified');
+    exit;
+  end;
+  FSQL.Clear;
+  FSQL.Add('select *, rowid as rowid from ' + TableName);
+  if Filtered then
+    if Filter <> '' then
+      FSQL.Add(' where ' + Filter);
+  if (FMaxResults = 0) and (FStartResult <> 0) then
+    FMaxResults := -1;
+  if FMaxResults <> 0 then
+    FSQL.Add(' limit ' + IntToStr(FMaxResults));
+  if FStartResult <> 0 then
+    FSQL.Add(' offset ' + IntToStr(FStartResult));
+  if FOrderBy <> '' then
+    FSQL.Add(' order by ('+FOrderBy+')');
+  SQLStr := FSQL.Text;
+  FPrepared := SQLStr;
+  inherited;
+  DebugLeave('TASQLite3Table.InternalOpen');
+end;
+
+procedure TASQLite3Table.SQLiteMasterChanged;
+var
+  r, s              : string;
+  m, d              : string;
+  p                 : integer;
+  cAnd              : string;
+begin
+  DebugEnter('TASQLite3Table.SQLiteMasterChanged');
+  Close;
+  cAnd := '';
+  r := FMasterFields;
+  Filter := '';
+  while r <> '' do
+  begin
+    p := pos(';', r);
+    if p = 0 then
+    begin
+      if Trim(r) <> '' then
+        s := r;
+      r := '';
+    end
+    else
+    begin
+      s := Trim(Copy(r, 1, p - 1));
+      System.Delete(r, 1, p);
+    end;
+
+    p := pos('=', s);
+    if p = 0 then
+    begin
+      raise AsgError.Create('Syntax error: Masterfields not build of a=b;... pairs');
+    end
+    else
+    begin
+      d := copy(s, 1, p - 1);
+      m := copy(s, p + 1, 99);
+    end;
+//    Filter := Filter + cAnd + d + '=' + FMasterSource.DataSet.FieldByName(m).AsString;
+    Filter := Filter + cAnd + d + '=' + QuotedStr(FMasterSource.DataSet.FieldByName(m).AsString) ;
+    cAnd := ' and ';
+  end;
+  if Filter <> '' then
+    filtered := true;
+  Open;
+  DebugLeave('TASQLite3Table.SQLiteMasterChanged');
+end;
+
+procedure TASQLite3Table.InternalDelete;
+begin
+  DebugEnter('TASQLite3Table.InternalDelete');
+  if FReadOnly then
+    raise AsgError.Create('Cannot delete from a read-only dataset');
+
+  if not Connection.FConnected then
+    exit;
+  if FAutoCommit then
+    Connection.ExecStartTransaction(FTransactionType);
+
+  SQLStr := '';
+  CurrentRowId := FResult.GetRowId(FCurRec);
+  FSQL.Clear;
+  FSQL.Add('delete from ' + Tablename + ' where rowid=' + QuotedStr(IntToStr(CurrentRowId)));
+//  SQLStr := StringReplace(FSQL.Text, crlf, #10, [rfReplaceAll, rfIgnoreCase]); // albert
+  SQLStr := FSQL.Text;
+  Connection.SQLite3_execute(Connection.DBHandle, PAnsiChar(SQLStr), FParams, self);
+
+  inherited InternalDelete;
+
+  if FAutoCommit then
+  begin
+    try
+      Connection.Commit;
+    except
+      Connection.RollBack;
+      raise;
+    end;
+  end;
+  DebugLeave('TASQLite3Table.InternalDelete');
+end;
+
+procedure TASQLite3Table.InternalPost;
+var
+  i : integer;
+  n: Integer;
+  ThisDateFormat,
+  tmpMasterDetail, MasterField, chDelim: string;
+  slDetail, slValues: TStringList;
+  lsBlobs: TList; //GPA
+  M:TMemoryStream; //GPA
+
+  // this function will return the fielvalue of an indicated fieldbyordinalnumber
+  // if the fieldtype is tdatetime it is transfered to the right date notation as
+  // indicated by jpierce.
+
+  function GetFieldValue(const AField: TField): string; // DI
+  begin // DI
+    if AField.DataType = ftDateTime then // DI
+      GetFieldValue := QuotedStr(FormatDateTime(ThisDateFormat, FieldByName(AField.FieldName).AsDateTime)) // DI
+    else if (AField.DataType = ftBlob) or (AField.DataType = ftMemo) or (AField.DataType = ftFmtMemo) or (AField.DataType = ftGraphic) then //GPA
+      begin //GPA
+        M:=TMemoryStream.Create; //GPA
+        TBlobField(FieldByName(AField.FieldName)).SaveToStream(M);
+        GetFieldValue := #2+IntToStr(1+lsBlobs.Add(Pointer(M))) //GPA
+      end
+    else
+      GetFieldValue := QuotedStr(FieldByName(AField.FieldName).AsString); // DI
+  end; // DI
+
+var
+  f: TField; // DI
+  OldDecimalSeparator: ansiChar; // DI
+begin
+  DebugEnter('TASQLite3Table.InternalPost');
+
+  if FReadOnly then
+    raise AsgError.Create('Cannot post into a read-only dataset');
+
+  // determine datetime style of dataset (if any)
+
+  if FSQLiteDateFormat then
+    ThisDateFormat := 'yyyy-mm-dd hh:nn:ss.zzz'
+  else if (FTableDateFormat <> '') then
+    ThisDateFormat := FTableDateFormat
+  else
+    ThisDateFormat := ShortDateFormat;
+
+  if not Connection.FConnected then Exit;
+  if FAutoCommit then Connection.StartTransaction;
+
+  lsBlobs := TList.Create; //GPA
+  OldDecimalSeparator := DecimalSeparator; // DI
+  try // DI
+    DecimalSeparator := '.'; // DI: Force Delphi's DecimalSeparator to SQL style syntax.
+
+    if (State = dsEdit) and (FResult.Count > 0) then
+      begin
+        CurrentRowId := FResult.GetRowId(FCurRec);
+        FSQL.Clear;
+        FSQL.Add('update ' + TableName + ' set ');
+        SQLStr := '';
+        for i := 0 to FieldList.Count - 1 do begin
+            f := FieldList[i]; // DI
+            if not (f.Calculated or f.Lookup) then // DI
+              SQLStr := SQLStr + f.FieldName + '=' + GetFieldValue(f) + ','; // DI
+          end;
+        SQLStr[Length(SQLStr)] := ' ';
+        FSQL.Add(SQLStr);
+        FSQL.Add(' where rowid=' + QuotedStr(IntToStr(CurrentRowId)));
+
+        SQLStr := FSQL.Text; // DI
+        // DI SQLStr := StringReplace(FSQL.Text, CRLF, #10, [rfReplaceAll, rfIgnoreCase]);
+
+        Connection.SQLite3_ExecSQL(SQLStr,lsBlobs);
+        inherited InternalPost; // rework internals
+      end
+    else
+      begin
+        { If inserting (or appending), increment the bookmark counter and
+        store the data }
+        FSQL.Clear;
+        FSQL.Add('insert into ' + TableName + ' (');
+        SQLStr := '';
+
+        for i := 0 to FieldList.Count - 1 do begin
+            if not (FieldList[i].Calculated or FieldList[i].Lookup) then // aducom
+              SQLStr := SQLStr + FieldList[i].FieldName + ',';
+          end;
+
+        SQLStr[Length(SQLStr)] := ')';
+        SQLStr := SQLStr + ' values (';
+        FSQL.Add(SQLStr);
+        SQLStr := '';
+
+        slDetail := TStringList.Create;
+        slValues := TStringList.Create;
+        i := 0; chDelim := ';';
+        if FMasterSource <> nil then
+          begin
+            while i < Length(FMasterFields) do
+              begin
+                tmpMasterDetail := GetWordByDelim(FMasterFields, i, chDelim);
+                n := Pos('=', tmpMasterDetail);
+                if n <> 0 then
+                  begin
+                    slDetail.Add(Copy(tmpMasterDetail, 1, n - 1));
+                    MasterField := Copy(tmpMasterDetail, n + 1, Length(tmpMasterDetail) - n);
+                    slValues.Add(FMasterSource.DataSet.FieldByName(MasterField).AsString);
+                  end;
+              end;
+          end;
+
+        if (FPrimaryAutoInc) and (FieldDefs[0].DataType = ftInteger) then begin
+          SQLStr := SQLStr + 'null,';
+          n := 1;                                                               // aducom
+        end else begin                                                          // aducom
+          n := 0;                                                               // aducom
+        end;                                                                    // aducom
+
+        for i := n to FieldList.Count - 1 do                                    // aducom
+          begin // DI
+            f := FieldList[i];
+            if not (f.Calculated or f.Lookup) then // DI
+              if slDetail.Find(f.FieldName, n) then // DI
+                SQLStr := SQLStr + QuotedStr(slValues.Strings[n]) + ','
+              else
+                SQLStr := SQLStr + GetFieldValue(f) + ','; // DI
+          end; // DI
+
+        slDetail.Free;
+        slValues.Free;
+
+        SQLStr[Length(SQLStr)] := ')';
+        FSQL.Add(SQLStr);
+
+        SQLStr := FSQL.Text; // DI
+        // DI SQLStr := StringReplace(FSQL.Text, CRLF, #10, [rfReplaceAll, rfIgnoreCase]);
+
+        Connection.SQLite3_ExecSQL(SQLStr, lsBlobs);
+        if FPrimaryAutoInc then
+          if FieldDefs[0].DataType = ftInteger then
+            FieldByName(FieldList[0].FieldName).AsInteger :=
+              Connection.SQLite3_LastInsertRow(Connection.DBHandle);
+        if FResult.Count = 0 then
+          Inc(FCurRec);
+        inherited InternalPost; // rework internals
+      end;
+
+  finally // DI
+    DecimalSeparator := OldDecimalSeparator; // DI
+    For I:=0 to lsBlobs.Count-1 do begin // GPA
+      M:=TMemoryStream(lsBlobs.Items[I]); // GPA
+      M.Free; // GPA
+    end; // GPA
+    lsBlobs.Free; // GPA
+
+  end; // DI
+
+  if FAutoCommit then
+    begin
+      try
+        Connection.Commit;
+      except
+        Connection.RollBack;
+        raise;
+      end;
+    end;
+  DebugLeave('TASQLite3Table.InternalPost');
+end;
+
+// Blobfields in SQLite are in fact CLOB fields. However, since it is a large
+// chunk of data for all types the ftBlob is used. Keep in mind that blobs are
+// stored separately of TResult. Within the result structure only the memory
+// handle of the blob is stored.
+
+constructor TASQLite3BlobStream.Create(Field: TBlobField; Mode: TBlobStreamMode);
+begin
+//  inherited Create;
+  FField := Field;
+  FMode := Mode;
+  FDataSet := FField.DataSet as TASQLite3BaseQuery;
+  if Mode <> bmWrite then
+    LoadBlobData;
+end;
+
+destructor TASQLite3BlobStream.Destroy;
+begin
+  DebugEnter('TASQLite3BlobStream.Destroy');
+  if FModified then
+    SaveBlobData;
+  inherited Destroy;
+end;
+
+function TASQLite3BlobStream.Read(var Buffer; Count: Longint): Longint;
+begin
+  DebugEnter('ASQLiteBlobStream.Read');
+  Result := inherited Read(Buffer, Count);
+  FOpened := True;
+end;
+
+function TASQLite3BlobStream.Write(const Buffer; Count: Longint): Longint;
+begin
+  DebugEnter('ASQLiteBlobStream.Write');
+  Result := inherited Write(Buffer, Count);
+  FModified := True;
+  FDataSet.SetModified(true);
+end;
+
+procedure TASQLite3BlobStream.LoadBlobData;
+var
+  Stream            : TMemoryStream;
+  Offset            : Integer;
+  RecBuffer         : PAnsiChar;
+begin
+  DebugEnter('ASQLiteBlobStream.LoadBlobData');
+  Self.Size := 0;
+  FDataset.GetActiveBuffer(RecBuffer);
+
+//  recbuffer := nil;
+
+  if RecBuffer <> nil then
+  begin
+    Offset := FDataset.GetFieldOffset(FField.FieldNo);
+    Move((RecBuffer + Offset)^, Pointer(Stream), sizeof(Pointer));
+    Self.CopyFrom(Stream, 0);
+  end;
+  Position := 0;
+end;
+
+procedure TASQLite3BlobStream.SaveBlobData;
+var
+  Stream            : TMemoryStream;
+  Offset            : Integer;
+  RecBuffer         : PAnsiChar;
+begin
+  DebugEnter('ASQLiteBlobStream.SaveBlobData');
+  FDataset.GetActiveBuffer(RecBuffer);
+  if RecBuffer <> nil then
+  begin
+    Offset := FDataset.GetFieldOffset(FField.FieldNo);
+    Move((RecBuffer + Offset)^, Pointer(Stream), sizeof(Pointer));
+    Stream.Size := 0;
+    Stream.CopyFrom(Self, 0);
+    Stream.Position := 0;
+  end;
+end;
+
+// Inline sql can be used to store sqlstatements outside of the pascal source.
+// it prevents large 'sql.add' rows. Also it can be used to generate an in-memory
+// database structure if needed
+
+constructor TASQLite3InlineSQL.Create;
+begin
+  inherited;
+  FSQL := TStringList.Create;
+end;
+
+destructor TASQLite3InlineSQL.Destroy;
+begin
+  if Assigned(FSQL) then FSQL.Free;
+  inherited;
+end;
+
+procedure TASQLite3InlineSQL.SetSQL(const Value: TStrings);
+begin
+  if Assigned(FSQL) then
+    FSQL.Assign(Value)
+  else
+    FSQL := Value;
+end;
+
+function TASQLite3InlineSQL.GetSQL: TStrings;
+begin
+  GetSQL := FSQL;
+end;
+
+// save resultset as text, html or xml. Depending on type the following
+// will happen:
+//
+// text: all rows will be output, separated by the given separation symbol
+// xml: all rows will be output, tags are the fieldnames
+//      <queryname>
+//              <rowid>
+//                      <fieldid> fieldvalue </fieldid>
+//                      ....
+//
+// html: a table will be generated with the given classnames (if available)
+
+constructor TASQLite3Output.Create;
+begin
+  inherited;
+  FOutput := TStringList.Create;
+end;
+
+destructor TASQLite3Output.Destroy;
+begin
+  if Assigned(FOutput) then FOutput.Free;
+  inherited;
+end;
+
+procedure TASQLite3Output.SetFActive(Active: boolean);
+begin
+  FActive := Active;
+  if FActive = false then begin
+  end else begin
+    if Assigned(FDataSource) then begin
+      if Assigned(FDataSource.DataSet) then begin
+        Execute(FDataSource.DataSet);
+      end else raise AsgError.Create('Missing Datasource.Dataset');
+    end else raise AsgError.Create('Missing Datasource');
+  end;
+end;
+
+procedure TASQLite3Output.SetOutput(const Value: TStrings);
+begin
+  if Assigned(FOutput) then
+    FOutput.Assign(Value)
+  else
+    FOutput := Value;
+end;
+
+function TASQLite3Output.GetOutput: TStrings;
+begin
+  GetOutput := FOutput;
+end;
+
+procedure TASQLite3Output.Notification(AComponent: TComponent; Operation: TOperation);
+begin
+{$IFDEF DEBUG_VERY_LOUD}
+  DebugEnter('TASQLite3Output.Notification');
+{$ENDIF}
+  if Assigned(AComponent) then begin
+    if (Operation = opRemove) then begin
+      if (AComponent is TDataSource) then begin
+        if Assigned(FDataSource) then begin
+          if TDataSource(AComponent) = FDataSource then
+            FDataSource := nil;
+        end;
+      end
+    end;
+  end;
+  inherited;
+{$IFDEF DEBUG_VERY_LOUD}
+  DebugLeave('TASQLite3DB.Notification');
+{$ENDIF}
+end;
+
+procedure TASQLite3Output.Execute(MyDataSet: TDataSet);
+const eXML          = 0;
+  eHTML             = 1;
+  eTXT              = 2;
+var FType           : integer;
+  i                 : integer;
+  Line              : string;
+  Sep               : string;
+//    Indent : integer;
+begin
+  if Assigned(MyDataset) then begin
+    if MyDataSet.Active = false then MyDataSet.Open;
+    Output.Clear;
+    FType := ETxt;
+    Line := '';
+
+    if CompareText(FOutputType[1], 'X') = 0 then begin
+      FType := eXML;
+      Line := Line + '<table id="' + MyDataSet.Name + '" CreationDate="' + DateToStr(Now) + '">' + #10;
+    end else if CompareText(FOutputType[1], 'H') = 0 then begin
+      FType := eHTML;
+      Line := Line + '<html>' + #10 + '<head>' + #10 +
+        '<title>Table ' + MyDataSet.Name + '</title>' + #10 +
+        '<meta name="generator" content="Dev-PHP 2.0.13 test">' + #10 +
+        '<table class="' + FTableClass + '"cellpadding="0" cellspacing="0">' + #10 +
+        '<tr>' + #10;
+    end else if CompareText(FOutputType[1], 'T') = 0 then begin
+      FType := eTXT;
+    end;
+
+    Sep := '';
+
+    for i := 0 to MyDataSet.FieldDefs.Count - 1 do begin
+      case FType of
+        eXML: begin
+          end;
+        eHTML: begin
+            Line := Line + '<td>' + MyDataSet.FieldDefs[i].Name + '</td>';
+          end;
+        eTXT: begin
+            Line := Line + Sep + MyDataSet.FieldDefs[i].Name;
+          end;
+      end;
+      Sep := FSeparator;
+    end;
+
+    Output.Add(Line); Line := ''; Sep := '';
+    MyDataSet.First;
+
+//    Indent := 0;
+    while not MyDataSet.Eof do begin
+
+      case FType of
+        eXML: Line := Line + '   <record>' + #10;
+        eHTML: Line := Line + '<tr>' + #10;
+      end;
+
+      for i := 0 to MyDataSet.FieldDefs.Count - 1 do begin
+        case FType of
+          eXML: begin
+              Line := Line + '      <' + MyDataSet.FieldDefs[i].Name + '>' +
+                MyDataSet.FieldByName(MyDataSet.FieldDefs[i].Name).AsString +
+                '</' + MyDataSet.FieldDefs[i].Name + '>' + #10;
+            end;
+          eHTML: begin
+              Line := Line + '<td>' + MyDataSet.FieldByName(MyDataSet.FieldDefs[i].Name).AsString + '</td>';
+            end;
+          eTXT: begin
+              Line := Line + Sep + MyDataSet.FieldByName(MyDataSet.FieldDefs[i].Name).AsString;
+            end;
+        end;
+        Sep := FSeparator;
+      end;
+
+      case FType of
+        eXML: Line := Line + '   </record>' + #10;
+        eHTML: Line := Line + '</tr>' + #10;
+      end;
+
+      Output.Add(Line); Line := ''; Sep := '';
+      MyDataSet.Next;
+    end;
+
+    case FType of
+      eXML: Line := Line + '   </table>' + #10;
+      eHTML: Line := Line + '</table>' + #10 + '</body>' + #10 + '</html>' + #10;
+    end;
+    Output.Add(Line);
+  end;
+end;
+
+{$IFDEF IPROVIDER}
+procedure TASQLite3BaseQuery.PSEndTransaction(Commit: Boolean);
+begin
+  // qui non sono molto sicuro...
+  if Assigned(Connection) then
+    if Commit then
+      Connection.Commit
+    else
+      Connection.RollBack;
+end;
+
+procedure TASQLite3BaseQuery.PSExecute;
+begin
+  UniDirectional := true;
+  ExecSQL;
+end;
+
+function TASQLite3BaseQuery.PSExecuteStatement(const ASQL: string;
+  AParams: TParams; ResultSet: Pointer): Integer;
+var
+  AsqlQry           : TASQLite3BaseQuery;
+begin
+  if Assigned(ResultSet) then
+  begin
+    TDataSet(ResultSet^) := TASQLite3Query.Create(nil);
+{$IFDEF ASQLITE_D6PLUS}
+    TASQlite3Query(ResultSet^).SetUniDirectional(true);// := true; // just store data in provider.
+{$endif}
+    with TASQLite3BaseQuery(ResultSet^) do begin
+      Connection := self.Connection;
+      Params.Assign(AParams);
+      FPrepared := ASql;
+      if FParams.Count > 0 then
+        FPrepared := SetQueryParams(FPrepared);
+      Open;
+      Result := Connection.RowsAffected;
+    end;
+  end
+  else
+  begin
+    AsqlQry := TASQLite3BaseQuery.Create(nil);
+    try
+      with AsqlQry do begin
+        Connection := self.Connection;
+        FPrepared := ASql;
+        FParams.Assign(AParams);
+        if FParams.Count > 0 then
+          FPrepared := SetQueryParams(AsqlQry.FPrepared);
+        ExecSQL;
+        Result := Connection.RowsAffected;
+      end;
+    finally
+      AsqlQry.Free;
+    end;
+  end;
+end;
+
+function TASQLite3BaseQuery.PSGetParams: TParams;
+begin
+  Result := Params;
+end;
+
+function TASQLite3BaseQuery.PSGetQuoteChar: string;
+begin
+  Result := '"';
+end;
+
+function TASQLite3BaseQuery.PSGetTableName: string;
+begin
+  Result := GetTableNameFromSQL(FSQL.Text);
+end;
+
+function TASQLite3BaseQuery.PSInTransaction: Boolean;
+begin
+  Result := Assigned(Connection);
+end;
+
+function TASQLite3BaseQuery.PSIsSQLBased: Boolean;
+begin
+  Result := True;
+end;
+
+function TASQLite3BaseQuery.PSIsSQLSupported: Boolean;
+begin
+  Result := True;
+end;
+
+procedure TASQLite3BaseQuery.PSSetCommandText(const CommandText: string);
+begin
+  if CommandText <> '' then begin
+    FSQL.Text := CommandText;
+    FPrepared := CommandText;
+  end;
+end;
+
+procedure TASQLite3BaseQuery.PSSetParams(AParams: TParams);
+begin
+  if AParams.Count <> 0 then
+    Params.Assign(AParams);
+  Close;
+end;
+
+procedure TASQLite3BaseQuery.PSStartTransaction;
+begin
+  StartTransaction;
+end;
+
+procedure TASQLite3BaseQuery.PSReset;
+begin
+  if Active then
+  begin
+    Close;
+    Open;
+  end;
+end;
+
+function TASQLite3BaseQuery.PSGetUpdateException(e: Exception; Prev: EUpdateError): EUpdateError;
+var
+  PrevErr           : Integer;
+begin
+  // Generates an EUpdateError object based on another exception object.
+  if e is ASGError then begin
+    if Prev = nil then
+      PrevErr := Prev.errorCode
+    else
+      PrevErr := 0;
+    with ASGError(e) do
+      Result := EUpdateError.Create(e.Message, '', -1, PrevErr, e);
+  end else
+    Result := EUpdateError.Create(e.Message, '', -1, -1, e);
+end;
+
+function TASQLite3BaseQuery.PSUpdateRecord(UpdateKind: TUpdateKind; Delta: TDataSet): Boolean;
+begin
+  // OnUpdateRecord is not supported
+  Result := False;
+end;
+
+function TASQlite3BaseQuery.PSGetKeyFields: string;
+var
+  i                 : integer;
+begin
+  Result := '';
+  for i := 0 to (Fields.Count - 1) do begin
+    if pfInKey in Fields[i].ProviderFlags then begin
+      if Result <> '' then
+        Result := Result + ';';
+      Result := Result + Fields[i].FieldName;
+    end;
+  end;
+end;
+
+{$ENDIF}
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/asqlite_def.inc b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/asqlite_def.inc
new file mode 100644
index 0000000..bbd5e3b
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/asqlite_def.inc	
@@ -0,0 +1,99 @@
+{
+
+Aducom Software SQLite components
+Copyright (C) 2003-2006 by Aducom Software
+Albert Drent
+a.drent@aducom.com
+for questions please register on the forum on www.aducom.com/sqlite
+}
+
+{$IFDEF VER125}{C4}{$B-}{$X+}{$T-}{$H+}{$ENDIF}
+{$IFDEF VER110}{C3}{$B-}{$X+}{$T-}{$H+}{$ENDIF}
+{$IFDEF VER93}{C1}{$B-}{$X+}{$T-}{$H+}{$ENDIF}
+{$IFDEF VER180}
+  {$DEFINE ASQLite_D2PLUS}
+  {$DEFINE ASQLite_D3PLUS}
+  {$DEFINE ASQLite_D4PLUS}
+  {$DEFINE ASQLite_D5PLUS}
+  {$DEFINE ASQLite_D6PLUS}
+  {$DEFINE ASQLite_D7PLUS}
+  {$DEFINE ASQLite_D2005PLUS}
+  {$DEFINE ASQLite_D2006PLUS}
+  {DELPHI10}
+  {$B-}{$X+}{$T-}{$H+}
+  {$DEFINE ASQLite_DYNARRAY}
+{$ENDIF}
+{$IFDEF VER170}
+  {$DEFINE ASQLite_D2PLUS}
+  {$DEFINE ASQLite_D3PLUS}
+  {$DEFINE ASQLite_D4PLUS}
+  {$DEFINE ASQLite_D5PLUS}
+  {$DEFINE ASQLite_D6PLUS}
+  {$DEFINE ASQLite_D7PLUS}
+  {$DEFINE ASQLite_D2005PLUS}
+  {DELPHI9}
+  {$B-}{$X+}{$T-}{$H+}
+  {$DEFINE ASQLite_DYNARRAY}
+{$ENDIF}
+{$IFDEF VER150}
+  {$DEFINE ASQLite_D2PLUS}
+  {$DEFINE ASQLite_D3PLUS}
+  {$DEFINE ASQLite_D4PLUS}
+  {$DEFINE ASQLite_D5PLUS}
+  {$DEFINE ASQLite_D6PLUS}
+  {$DEFINE ASQLite_D7PLUS}
+  {DELPHI7}
+  {$B-}{$X+}{$T-}{$H+}                                   
+  {$DEFINE ASQLite_DYNARRAY}
+{$ENDIF}
+{$IFDEF VER140}
+  {$DEFINE ASQLite_D2PLUS}
+  {$DEFINE ASQLite_D3PLUS}
+  {$DEFINE ASQLite_D4PLUS}
+  {$DEFINE ASQLite_D5PLUS}
+  {$DEFINE ASQLite_D6PLUS}
+  {DELPHI6}
+  {$B-}{$X+}{$T-}{$H+}
+  {$DEFINE ASQLite_DYNARRAY}
+{$ENDIF}
+{$IFDEF VER130}
+  {$DEFINE ASQLite_D2PLUS}
+  {$DEFINE ASQLite_D3PLUS}
+  {$DEFINE ASQLite_D4PLUS}
+  {$DEFINE ASQLite_D5PLUS}
+  {DELPHI5}
+  {$DEFINE ASQLite_DYNARRAY}
+  {$B-}{$X+}{$T-}{$H+}
+{$ENDIF}
+{$IFDEF VER120}
+  {$DEFINE ASQLite_D2PLUS}
+  {$DEFINE ASQLite_D3PLUS}
+  {$DEFINE ASQLite_D4PLUS}
+  {DELPHI4}
+  {$DEFINE ASQLite_DYNARRAY}
+  {$B-}{$X+}{$T-}{$H+}
+{$ENDIF}
+{$IFDEF VER100}
+  {$DEFINE ASQLite_D2PLUS}
+  {$DEFINE ASQLite_D3PLUS}
+  {$DEFINE ASQLite_NOINT64}
+  {DELPHI3}
+  {$B-}{$X+}{$T-}{$H+}
+{$ENDIF}
+{$IFDEF VER90}
+  {$DEFINE ASQLite_D2PLUS}
+  {$DEFINE ASQLite_NOINT64}
+  {$DEFINE ASQLite_NOWIDESTRING}
+  {DELPHI2}
+  {$B-}{$X+}{$T-}{$H+}
+{$ENDIF}
+
+{$IFDEF LINUX}{KYLIX}{$DEFINE CLX}{$ENDIF}
+{$IFDEF FPC}{$H+}{$MODE DELPHI}{$ENDIF}
+{$IFDEF ASQLite_D4PLUS}{$DEFINE ASQLite_HAVEVARIANT}{$ENDIF}
+{$R-}{$Q-}
+
+{$IFDEF CLX}
+{$DEFINE ASQLite_NOIDISPATCH} // not implemented
+{$ENDIF}
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAADODriver.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAADODriver.pas
new file mode 100644
index 0000000..c880a01
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAADODriver.pas	
@@ -0,0 +1,1736 @@
+unit uDAADODriver;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Driver Library
+{
+{ compiler: Delphi 6 and up
+{ platform: Win32
+{
+{ (c)opyright RemObjects Software. all rights reserved.
+{
+{ Using this code requires a valid license of the Data Abstract
+{ which can be obtained at http://www.remobjects.com.
+{----------------------------------------------------------------------------}
+
+{$IFDEF MSWINDOWS}
+{$I ..\DataAbstract.inc}
+{$ELSE}
+{$I ../DataAbstract.inc}
+{$ENDIF}
+
+{$R DataAbstract_ADODriver_Glyphs.res}
+
+// with included option, you can receive errors like
+// Access violation at address 6BD7297F in module 'msado15.dll'. Read of address 00000068.
+{.$DEFINE ADOMONITOR_SHOWPARAMVALUES}
+
+interface
+
+uses Windows, Classes, DB, uDAEngine, uDAInterfaces, uDAADOInterfaces, uROClasses, ADODB,
+  uDAInterfacesEx, uDAUtils, uDAOracleInterfaces;
+
+type { TDAADODriver }
+  TDAADODriver = class(TDADriverReference)
+  end;
+  TDAEADODriver = class;
+
+  TDAADOMonitor = class
+  private
+    FDriver: TDAEADODriver;
+    FEnabled: Boolean;
+    FOnCallback: TDALogTraceEvent;
+    FTraceFlags: TDATraceOptions;
+    procedure SetEnabled(const Value: Boolean);
+    procedure SetTraceFlags(const Value: TDATraceOptions);
+    procedure SetOnCallback(const Value: TDALogTraceEvent);
+    procedure ADOConnectionBeginTransComplete(Connection: TADOConnection;
+      TransactionLevel: Integer; const Error: Error;
+      var EventStatus: TEventStatus);
+    procedure ADOConnectionCommitTransComplete(Connection: TADOConnection;
+      const Error: Error; var EventStatus: TEventStatus);
+    procedure ADOConnectionConnectComplete(Connection: TADOConnection;
+      const Error: Error; var EventStatus: TEventStatus);
+    procedure ADOConnectionExecuteComplete(Connection: TADOConnection;
+      RecordsAffected: Integer; const Error: Error;
+      var EventStatus: TEventStatus; const Command: _Command;
+      const Recordset: _Recordset);
+    procedure ADOConnectionInfoMessage(Connection: TADOConnection;
+      const Error: Error; var EventStatus: TEventStatus);
+    procedure ADOConnectionRollbackTransComplete(
+      Connection: TADOConnection; const Error: Error;
+      var EventStatus: TEventStatus);
+    procedure ADOConnectionDisconnect(Connection: TADOConnection;
+      var EventStatus: TEventStatus);
+    procedure ADOConnectionWillConnect(Connection: TADOConnection;
+      var ConnectionString, UserID, Password: WideString;
+      var ConnectOptions: TConnectOption; var EventStatus: TEventStatus);
+    procedure ADOConnectionWillExecute(Connection: TADOConnection;
+      var CommandText: WideString; var CursorType: TCursorType;
+      var LockType: TADOLockType; var CommandType: TCommandType;
+      var ExecuteOptions: TExecuteOptions; var EventStatus: TEventStatus;
+      const Command: _Command; const Recordset: _Recordset);
+  public
+    constructor Create(ADriver: TDAEADODriver);
+    procedure ReAssignEvents;
+    procedure AssignEvents(AConnection:TADOConnection);
+    procedure UnAssignEvents(AConnection:TADOConnection);
+    property Enabled : Boolean read FEnabled write SetEnabled;
+    property TraceFlags: TDATraceOptions read FTraceFlags write SetTraceFlags;
+    property OnCallback: TDALogTraceEvent read FOnCallback write SetOnCallback;
+  end;
+
+     { TDAEADODriver }
+  TDAEADODriver = class(TDAEDriver, IDADriver40)
+  private
+    FConnectionList: TThreadList;
+    FMonitor: TDAADOMonitor;
+  protected
+    procedure DoSetTraceOptions(TraceActive: boolean; TraceFlags: TDATraceOptions; Callback: TDALogTraceEvent); override;
+    procedure RegisterConnection(AConnection: TADOConnection);
+    procedure UnregisterConnection(AConnection: TADOConnection);
+  protected
+    function GetConnectionClass: TDAEConnectionClass; override;
+    procedure CustomizeConnectionObject(aConnection: TDAEConnection); override;
+       // IDADriver
+    function GetDriverID: string; override;
+    function GetDescription: string; override;
+    procedure GetAuxDrivers(out List: IROStrings); override;
+    procedure GetAuxParams(const AuxDriver: string; out List: IROStrings); override;
+    function GetAvailableDriverOptions: TDAAvailableDriverOptions; override;
+    function GetProviderDefaultCustomParameters(Provider: string): string; safecall;
+    function GetDefaultConnectionType(const AuxDriver: string): string;override; safecall;
+  public
+    constructor Create(AOwner: TComponent); override;
+    destructor Destroy; override;
+  end;
+
+     { TDAEADOConnection }
+  TDAEADOConnection = class(TDAEConnection, IDAADOConnection, IDAConnectionModelling, IDACanQueryDatabaseNames,IDAFileBasedDatabase,IDAUseGenerators,IDAOracleConnection)
+  private
+    fProviderName: string;
+    fSchemaEnabled: Boolean;
+    fProviderType: TDAOleDBProviderType;
+    fADOConnection: TADOConnection;
+    fQuery_CursorType: TCursorType;
+    fQuery_CursorLocation: TCursorLocation;
+    fQuery_ADOLockType: TADOLockType;
+    procedure GetViewOrTableNames(const aType: string; const aSystemTables: boolean; List: IROStrings);
+    function CreateCompatibleQuery: IDADataset;
+
+  protected
+    function QueryInterface(const IID: TGUID; out Obj): HResult; override; stdcall;
+    function CreateCustomConnection: TCustomConnection; override;
+    function CreateMacroProcessor: TDASQLMacroProcessor; override;
+
+    function GetDatasetClass: TDAEDatasetClass; override;
+    function GetStoredProcedureClass: TDAEStoredProcedureClass; override;
+
+    procedure DoApplyConnectionString(aConnStrParser: TDAConnectionStringParser; aConnectionObject: TCustomConnection); override;
+
+    function DoBeginTransaction: integer; override;
+    procedure DoCommitTransaction; override;
+    procedure DoRollbackTransaction; override;
+    function DoGetInTransaction: boolean; override;
+
+    procedure DoGetTableNames(out List: IROStrings); override;
+    procedure DoGetTableFields(const aTableName: string; out Fields: TDAFieldCollection); override;
+
+    procedure DoGetViewNames(out List: IROStrings); override;
+    procedure DoGetStoredProcedureNames(out List: IROStrings); override;
+    procedure DoGetStoredProcedureParams(const aStoredProcedureName: string; out Params: TDAParamCollection); override;
+    procedure DoGetForeignKeys(out ForeignKeys: TDADriverForeignKeyCollection); override;
+
+    function DoGetLastAutoInc(const GeneratorName: string): integer; override;
+
+    function GetQuoteChars: TDAQuoteCharArray; override;
+    function isAlive: Boolean; override; safecall;
+
+    // IADOConnection
+    function GetProviderName: string; safecall;
+    function GetProviderType: TDAOleDBProviderType; safecall;
+    function GetCommandTimeout: Integer; safecall;
+    procedure SetCommandTimeout(const Value: Integer); safecall;
+
+    // IDAConnectionModelling
+    function BuildCreateTableSQL(aDataSet: TDADataSet; const aOverrideName: string = ''): string; safecall;
+    procedure CreateTable(aDataSet: TDADataSet; const aOverrideName: string = ''); safecall;
+    function FieldToDeclaration(aField: TDAField): string; safecall;
+
+    // IDACanQueryDatabaseNames
+    function GetDatabaseNames: IROStrings;
+    function GetSPSelectSyntax(HasArguments: Boolean): String; override; safecall;
+    // IDAFileBasedDatabase
+    function GetFileExtensions: IROStrings;
+    function IdentifierNeedsQuoting(const iIdentifier: string): boolean; override; safecall;
+    { IDAUseGenerators }
+    function GetNextAutoinc(const GeneratorName: string): integer; safecall;
+  public
+    constructor Create(aDriver: TDAEDriver; aName: string = ''); override;
+    destructor Destroy; override;
+    property SchemaEnabled: Boolean read fSchemaEnabled write fSchemaEnabled;
+  end;
+
+     { TDAEADOQuery }
+  TDAEADOQuery = class(TDAEDataset, IDAMustSetParams)
+  private
+
+  protected
+    procedure ClearParams; override;
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+
+    function DoExecute: integer; override;
+    function DoGetSQL: string; override;
+    procedure DoSetSQL(const Value: string); override;
+
+
+       // IDAMustSetParams
+    procedure SetParamValues(Params: TDAParamCollection); override;safecall;
+    procedure RefreshParams; override; safecall;
+    procedure GetParamValues(Params: TDAParamCollection); override;safecall;
+
+  public
+  end;
+
+     { TDAEADOStoredProcedure }
+  TDAEADOStoredProcedure = class(TDAEStoredProcedure, IDAMustSetParams)
+  protected
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+
+    procedure RefreshParams; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetStoredProcedureName: string; override;
+    procedure SetStoredProcedureName(const Name: string); override;
+    function DoExecute: integer; override;
+    function Execute: integer; override;
+
+       // IDAMustSetParams
+    procedure SetParamValues(Params: TDAParamCollection); override;safecall;
+    procedure GetParamValues(Params: TDAParamCollection); override;safecall;
+  end;
+
+procedure Register;
+
+function GetDriverObject: IDADriver; stdcall;
+
+implementation
+
+uses SysUtils, uDADriverManager, uDARes, Variants, ADOInt, uDAMacroProcessors,
+  Math, uDAHelpers, uROBinaryHelpers, uDAPostgresInterfaces;
+
+const
+  Default_CursorType = ctOpenForwardOnly;
+  Default_CursorLocation = clUseServer;
+  Default_ADOLockType = ltReadOnly;
+
+const
+   TConnectOptionStr:  array[TConnectOption]  of string = ('coConnectUnspecified', 'coAsyncConnect');
+   TCursorLocationStr: array[TCursorLocation] of string = ('clUseServer', 'clUseClient');
+   TCursorTypeStr:     array[TCursorType]     of string = ('ctUnspecified', 'ctOpenForwardOnly', 'ctKeyset', 'ctDynamic','ctStatic');
+   TEventStatusStr:    array[TEventStatus]    of string = ('esOK', 'esErrorsOccured', 'esCantDeny', 'esCancel', 'esUnwantedEvent');
+   TADOLockTypeStr:    array[TADOLockType]    of string = ('ltUnspecified', 'ltReadOnly', 'ltPessimistic', 'ltOptimistic', 'ltBatchOptimistic');
+   TCommandTypeStr:    array[TCommandType]    of string = ('cmdUnknown', 'cmdText', 'cmdTable', 'cmdStoredProc', 'cmdFile', 'cmdTableDirect');
+   TExecuteOptionStr:  array[TExecuteOption]  of string = ('eoAsyncExecute', 'eoAsyncFetch', 'eoAsyncFetchNonBlocking','eoExecuteNoRecords');
+
+var
+  _driver: TDAEDriver = nil;
+
+procedure Register;
+begin
+  RegisterComponents(DAPalettePageName, [TDAADODriver]);
+end;
+
+function GetDriverObject: IDADriver;
+begin
+  if (_driver = nil) then _driver := TDAEADODriver.Create(nil);
+  result := _driver;
+end;
+
+type
+  TDecimalVariant = packed record
+    VarType: TVarType;
+    scale: Byte;
+    sign: Byte;
+    Hi32: Cardinal;
+    Lo32: Cardinal;
+    Mid32: Cardinal;
+    Dummy: Cardinal;
+  end;
+
+function DecimalToInt64(const V: Variant): Int64;
+var
+  vData: TDecimalVariant absolute V;
+begin
+  if (vData.VarType = 14) and (vData.scale = 0) and (vData.Hi32 = 0) then begin
+    Result := Int64(vData.Lo32) or (Int64(vData.Mid32) shl 32);
+    if vData.sign <> 0 then result := -Result;
+  end else result := v;
+end;
+
+function Int64ToDecimal(Data: Int64): Variant;
+var
+  vd: TDecimalVariant absolute Result;
+begin
+  VarClear(Result);
+  vd.scale := 0;
+  if data < 0 then begin
+    vd.Sign := 128;
+    data := -data;
+  end else
+    vd.sign := 0;
+  vd.Hi32 := 0;
+  vd.Mid32 := int64(data shr 32);
+  vd.Lo32 := data;
+  vd.VarType := 14;
+end;
+
+
+{ TDAEADOConnection }
+
+procedure TDAEADOConnection.DoApplyConnectionString(aConnStrParser: TDAConnectionStringParser; aConnectionObject: TCustomConnection);
+var
+  lConnectionString: string;
+  i: Integer;
+  sName,sValue: string;
+begin
+  inherited;
+
+  with aConnStrParser do begin
+    lConnectionString := '';
+    if AuxDriver <> '' then lConnectionString := lConnectionString + 'Provider=' + AuxDriver + ';' else
+      raise EDADriverException.Create('No aux driver specified for ADO connection');
+
+    fProviderName := AuxDriver;
+    fProviderType := OleDBDriverIdToOleDBProviderType(fProviderName);
+
+    if (Self.UserID <> '') then
+      lConnectionString := lConnectionString + 'User ID=' + Self.UserID + ';'
+    else if (UserID <> '') then
+      lConnectionString := lConnectionString + 'User ID=' + UserID + ';';
+
+    if (Self.Password <> '') then
+      lConnectionString := lConnectionString + 'Password=' + Self.Password + ';'
+    else if (Password <> '') then
+      lConnectionString := lConnectionString + 'Password=' + Password + ';';
+
+    if fProviderType = oledb_Jet then begin
+      lConnectionString := lConnectionString + 'Data Source=' + Database+';';
+    end else begin
+      if Database <> '' then begin
+        if fProviderType = oledb_Postgresql then
+          lConnectionString := lConnectionString + 'Location=' + Database + ';'
+        else
+          lConnectionString := lConnectionString + 'Initial Catalog=' + Database + ';';
+      end;
+      if Server <> '' then lConnectionString := lConnectionString + 'Data Source=' + Server + ';';
+
+      if fProviderType <> oledb_Postgresql then
+        lConnectionString := lConnectionString + 'OLE DB SERVICES=-2;';
+    end;
+    fSchemaEnabled := false;
+    for i := 0 to AuxParamsCount -1 do
+    begin
+      sName := AuxParamNames[i];
+      if sName = '' then Continue;
+      sValue := AuxParams[AuxParamNames[i]];
+      if AnsiSameText('SCHEMAS',sName) then
+        fSchemaEnabled := sValue = '1'
+      else if AnsiSameText(sName, 'CursorLocation') then begin
+        if AnsiSameText('clUseServer',sValue) then
+          fQuery_CursorLocation:= clUseServer
+        else if AnsiSameText('clUseClient',sValue) then
+          fQuery_CursorLocation:= clUseClient;
+      end else if AnsiSameText(sName,'CursorType') then begin
+        if AnsiSameText('ctUnspecified',sValue) then
+          fQuery_CursorType:=ctUnspecified
+        else if AnsiSameText('ctOpenForwardOnly',sValue) then
+          fQuery_CursorType:=ctOpenForwardOnly
+        else if AnsiSameText('ctKeyset',sValue) then
+          fQuery_CursorType:=ctKeyset
+        else if AnsiSameText('ctDynamic',sValue) then
+          fQuery_CursorType:=ctDynamic
+        else if AnsiSameText('ctStatic',sValue) then
+          fQuery_CursorType:=ctStatic;
+      end else if AnsiSameText(sName, 'LockType') then begin
+        if AnsiSameText('ltUnspecified',sValue) then
+          fQuery_ADOLockType:= ltUnspecified
+        else if AnsiSameText('ltReadOnly',sValue) then
+          fQuery_ADOLockType:= ltReadOnly
+        else if AnsiSameText('ltPessimistic',sValue) then
+          fQuery_ADOLockType:= ltPessimistic
+        else if AnsiSameText('ltOptimistic',sValue) then
+          fQuery_ADOLockType:= ltOptimistic
+        else if AnsiSameText('ltBatchOptimistic',sValue) then
+          fQuery_ADOLockType:= ltBatchOptimistic;
+      end else begin
+        if sName[1] = '@' then sName:= Pchar(sName)+1;
+        lConnectionString := lConnectionString + sName + '=' + sValue +';';
+      end;
+    end;
+    fADOConnection.ConnectionString := lConnectionString;
+  end;
+  SchemaEnabled := fSchemaEnabled or ((UpperCase(GetProviderName) = 'SQLNCLI') or (UpperCase(GetProviderName) ='SQLNCLI.1'));
+  if fProviderType = oledb_Postgresql then fQuery_CursorLocation:=clUseClient; // ADOQuery can't process correctly "name" datatype of Postgres
+  if fProviderType = oledb_Oracle then fQuery_CursorLocation:=clUseClient; // Oracle don't work correctly without clUseClient
+end;
+
+function TDAEADOConnection.DoBeginTransaction: integer;
+begin
+  result := fADOConnection.BeginTrans
+end;
+
+procedure TDAEADOConnection.DoCommitTransaction;
+begin
+  fADOConnection.CommitTrans
+end;
+
+function TDAEADOConnection.CreateCustomConnection: TCustomConnection;
+begin
+  fSchemaEnabled := true;
+  fADOConnection := TADOConnection.Create(nil);
+  fADOConnection.LoginPrompt := FALSE;
+  if Assigned(fADOConnection) then TDAEADODriver(Driver).RegisterConnection(fADOConnection);
+  result := fADOConnection;
+end;
+
+function TDAEADOConnection.GetDatasetClass: TDAEDatasetClass;
+begin
+  result := TDAEADOQuery;
+end;
+
+function TDAEADOConnection.GetStoredProcedureClass: TDAEStoredProcedureClass;
+begin
+  result := TDAEADOStoredProcedure;
+end;
+
+procedure TDAEADOConnection.DoGetStoredProcedureNames(out List: IROStrings);
+var
+  Schema, NameField: TField;
+  DataSet: TADODataSet;
+  lName: string;
+  p: integer;
+begin
+  inherited;
+  case fProviderType of
+    oledb_MSSQL, oledb_MSSQL2005, oledb_MSSQL2008: MSSQL_DoGetNames(CreateCompatibleQuery,List,dotProcedure,SchemaEnabled);
+    oledb_Postgresql: Postgres_DoGetNames(CreateCompatibleQuery,List,dotProcedure);
+    oledb_Oracle: Oracle_DoGetNames(CreateCompatibleQuery,List,dotProcedure);
+  else
+    fADOConnection.Open();
+    DataSet := TADODataSet.Create(nil);
+    try
+      fADOConnection.OpenSchema(siProcedures, EmptyParam, EmptyParam, DataSet);
+      NameField := DataSet.FieldByName('PROCEDURE_NAME');
+      Schema := DataSet.Findfield('PROCEDURE_SCHEMA');
+      while not DataSet.EOF do begin
+        lName := NameField.AsString;
+        if (Schema <> nil) and (Schema.Value = 'sys') then begin dataset.Next; continue; end;
+        p := Pos(';', lName);
+        if p > 1 then begin
+          if P+1 >= length(lName) then begin
+            if lName[p+1] = '0' then // function
+            begin
+              Dataset.Next;
+              continue;
+            end;
+          end;
+          SetLength(lName, p-1);
+        end;
+        if fSchemaEnabled and (Schema <> nil) and not (VarIsNull(Schema.Value)) then
+          List.Add(Schema.AsString + '.' + lName)
+        else
+          List.Add(lName);
+        DataSet.Next;
+      end;
+    finally
+      DataSet.Free;
+    end;
+  end;
+end;
+
+function ADOTypeToFieldType(const ADOType: DataTypeEnum; EnableBCD: Boolean = False): TFieldType;
+begin
+  case ADOType of
+    adEmpty: Result := ftUnknown;
+    adTinyInt, adSmallInt: Result := ftSmallint;
+    adError, adInteger, adUnsignedInt: Result := ftInteger;
+    adBigInt, adUnsignedBigInt: Result := ftLargeInt;
+    adUnsignedTinyInt, adUnsignedSmallInt: Result := ftWord;
+    adSingle, adDouble: Result := ftFloat;
+    adCurrency: Result := ftCurrency;
+    adBoolean: Result := ftBoolean;
+    adDBDate: Result := ftDate;
+    adDBTime: Result := ftTime;
+    adDate, adDBTimeStamp, adFileTime, adDBFileTime: Result := ftDateTime;
+    adChar: Result := ftFixedChar;
+    adVarChar: Result := ftString;
+    adBSTR, adWChar, adVarWChar: Result := ftWideString;
+    adLongVarChar, adLongVarWChar: Result := ftMemo;
+    adLongVarBinary: Result := ftBlob;
+    adBinary: Result := ftBytes;
+    adVarBinary: Result := ftVarBytes;
+    adChapter: Result := ftDataSet;
+    adPropVariant, adVariant: Result := ftVariant;
+    adIUnknown: Result := ftInterface;
+    adIDispatch: Result := ftIDispatch;
+    adGUID: Result := ftGUID;
+    adDecimal, adNumeric, adVarNumeric:
+      if EnableBCD then
+        Result := ftBCD
+      else
+        Result := ftFloat;
+  else
+    Result := ftUnknown;
+  end;
+end;
+
+(*procedure TDAEADOConnection.DoGetStoredProcedureParams(const aStoredProcedureName: string; out Params: TDAParamCollection);
+var
+  DataSet: TADODataSet;
+begin
+  fADOConnection.Open();
+  DataSet := TADODataSet.Create(nil);
+  try
+    fADOConnection.OpenSchema(siProcedureParameters, VarArrayOf([Null, Null, aStoredProcedureName]), EmptyParam, DataSet);
+    //NameField := DataSet.FieldByName('PROCEDURE_NAME'); { do not localize }
+    Params := TDAParamCollection.Create(NIL);
+    while not DataSet.EOF do  begin
+      with Params.Add() do begin
+        Name := DataSet.FieldByName('PARAMETER_NAME').AsString;
+        ParamType := TDAParamType(DataSet.FieldByName('PARAMETER_TYPE').AsInteger);
+        //DataType := TDADataType(DataSet.FieldByName('DATA_TYPE').AsInteger);
+        DataType := VCLTypeToDAType(ADOTypeToFieldType(DataSet.FieldByName('DATA_TYPE').AsInteger));
+        Size := DataSet.FieldByName('CHARACTER_MAXIMUM_LENGTH').AsInteger
+        //more info available:
+        //'PARAMETER_HASDEFAULT'
+        //'PARAMETER_DEFAULT'
+        //'IS_NULLABLE'
+        //'DATA_TYPE'
+        //'CHARACTER_MAXIMUM_LENGTH'
+        //'CHARACTER_OCTET_LENGTH'
+        //'DESCRIPTION'
+        //'TYPE_NAME'
+        //'LOCAL_TYPE_NAME'
+      end;
+      //List.Add(NameField.AsString);
+      DataSet.Next;
+    end;
+  finally
+    DataSet.Free;
+  end;
+end;*)
+
+procedure TDAEADOConnection.DoGetTableFields(const aTableName: string; out Fields: TDAFieldCollection);
+var
+  lField: TDAField;
+  //i: Integer;
+  DataSet: TADODataSet;
+begin
+  case fProviderType of
+    oledb_MSSQL, oledb_MSSQL2005, oledb_MSSQL2008: MSSQL_DoGetTableFields(QuoteIdentifierIfNeeded(aTableName),CreateCompatibleQuery,Fields);
+    oledb_Postgresql: Postgres_DoGetTableFields(QuoteIdentifierIfNeeded(aTableName),CreateCompatibleQuery,Fields);
+    oledb_Oracle: Oracle_DoGetTableFields(QuoteIdentifierIfNeeded(aTableName),CreateCompatibleQuery,Fields);
+  else
+    fADOConnection.Open();
+    DataSet := TADODataSet.Create(nil);
+    try
+      if (pos('.', aTableName) > 0) and (SchemaEnabled) then
+        fADOConnection.OpenSchema(siColumns, VarArrayOf([Unassigned, Copy(aTableName, 1, Pos('.', aTableName)-1), Copy(aTableName, Pos('.', aTableName)+1, MaxInt)]), EmptyParam, DataSet)
+      else
+        fADOConnection.OpenSchema(siColumns, VarArrayOf([Unassigned, Unassigned, aTableName]), EmptyParam, DataSet);
+      //NameField := DataSet.FieldByName('PROCEDURE_NAME'); { do not localize }
+      if DataSet.EOF then begin
+        inherited DoGetTableFields(QuoteIdentifierIfNeeded(aTableName), Fields);
+        exit ;
+      end;
+
+      Fields := TDAFieldCollection.Create(nil);
+
+      {for i := 0 to DataSet.FieldCount-1 do begin
+        DebugServer.Wre(DataSet.Fields[i].FieldName);
+      end; { for }
+
+      while not DataSet.EOF do begin
+        with Fields.Add() do begin
+          Name := DataSet.FieldByName('COLUMN_NAME').AsString;
+          DataType := VCLTypeToDAType(ADOTypeToFieldType(DataSet.FieldByName('DATA_TYPE').AsInteger));
+          Size := DataSet.FieldByName('CHARACTER_MAXIMUM_LENGTH').AsInteger;
+          Description := DataSet.FieldByName('DESCRIPTION').AsString;
+          // NotNull := DataSet.FieldByName('IS_NULLABLE').AsBoolean;
+          Required := not DataSet.FieldByName('IS_NULLABLE').AsBoolean;
+
+          { Hack: for Memo fields ADO seems to return datString, with a lenght of $7fffffff }
+          //if (DataType = datString) and (Size = $7FFFFFFF) then
+          if (DataType = datString) and (Size > $100000) then
+            DataType := datMemo;
+          if (DAtaType = datWideString) and (Size > $100000) then
+            DataType := datWideMemo;
+
+          if DataSet.FieldByName('COLUMN_HASDEFAULT').AsBoolean then
+          begin
+            DefaultValue := DataSet.FieldByName('COLUMN_DEFAULT').AsString;
+            if not TestDefaultValue(DefaultValue, DataType) then
+              DefaultValue := '';
+          end;
+
+          if ADOTypeToFieldType(DataSet.FieldByName('DATA_TYPE').AsInteger) = ftGUID then begin
+            Size := 38; { Quickhack, until we have proper GUID support in 3.0 }
+            if DefaultValue = 'newid()' then DefaultValue := Unassigned;
+          end;
+
+
+          //more info available:
+          //'COLUMN_HASDEFAULT'
+          //'COLUMN_DEFAULT'
+          //'IS_NULLABLE'
+          //'DATA_TYPE'
+          //'CHARACTER_MAXIMUM_LENGTH'
+        end;
+        //List.Add(NameField.AsString);
+        DataSet.Next;
+      end;
+
+      if (pos('.', aTableName) > 0) and (SchemaEnabled) then
+        fADOConnection.OpenSchema(siPrimaryKeys, VarArrayOf([Unassigned, Copy(aTableName, 1, Pos('.', aTableName)-1), Copy(aTableName, Pos('.', aTableName)+1, MaxInt)]), EmptyParam, DataSet)
+      else
+        fADOConnection.OpenSchema(siPrimaryKeys, VarArrayOf([Unassigned, Unassigned, aTableName]), EmptyParam, DataSet);
+      {for i := 0 to DataSet.FieldCount-1 do begin
+        DebugServer.Write(DataSet.Fields[i].FieldName);
+      end; { for }
+      while not DataSet.EOF do begin
+        lField := Fields.FieldByName(DataSet.FieldByName('COLUMN_NAME').AsString);
+        if Assigned(lField) then
+          lField.InPrimaryKey := true;
+
+        DataSet.Next();
+      end;
+    finally
+      DataSet.Free;
+    end;
+  end;
+end;
+
+procedure TDAEADOConnection.DoGetForeignKeys(out ForeignKeys: TDADriverForeignKeyCollection);
+var
+  //i: Integer;
+  DataSet: TADODataSet;
+  s: string;
+  PKSchema,FKSchema: TField;
+begin
+  inherited;
+  case fProviderType of
+    oledb_MSSQL, oledb_MSSQL2005, oledb_MSSQL2008: MSSQL_DoGetForeignKeys(CreateCompatibleQuery, ForeignKeys, SchemaEnabled);
+    oledb_Postgresql:  Postgres_DoGetForeignKeys(CreateCompatibleQuery, ForeignKeys);
+    oledb_Oracle:  Oracle_DoGetForeignKeys(CreateCompatibleQuery, ForeignKeys);
+  else
+    s := UpperCase(GetProviderName);
+    fADOConnection.Open();
+    DataSet := TADODataSet.Create(nil);
+    try
+      fADOConnection.OpenSchema(siForeignKeys, EmptyParam, EmptyParam, DataSet);
+      {for i := 0 to DataSet.FieldCount-1 do begin
+        DebugServer.Write(DataSet.Fields[i].FieldName);
+      end; { for }
+      PKSchema := DataSet.FindField('PK_TABLE_SCHEMA');
+      FKSchema := DataSet.FindField('FK_TABLE_SCHEMA');
+      while not DataSet.EOF do begin
+        {lField := Fields.FieldByName(DataSet.FieldByName('COLUMN_NAME').AsString);
+        if Assigned(lField) then
+          lField.InPrimaryKey := true;}
+        with ForeignKeys.Add() do begin
+          FKField := DataSet.FieldByName('FK_COLUMN_NAME').AsString;
+          PKField := DataSet.FieldByName('PK_COLUMN_NAME').AsString;
+          //FKTable := DataSet.FieldByName('FK_TABLE_NAME').AsString;
+          //PKTable := DataSet.FieldByName('PK_TABLE_NAME').AsString;
+          if fSchemaEnabled and (PKSchema <> nil) and not (VarIsNull(PKSchema.Value)) then
+            PKTable := PKSchema.AsString + '.' + DataSet.FieldByName('PK_TABLE_NAME').AsString
+          else
+            PKTable := DataSet.FieldByName('PK_TABLE_NAME').AsString;
+          if fSchemaEnabled and (FKSchema <> nil) and not (VarIsNull(FKSchema.Value)) then
+            FKTable := FKSchema.AsString + '.' + DataSet.FieldByName('FK_TABLE_NAME').AsString
+          else
+            FKTable := DataSet.FieldByName('FK_TABLE_NAME').AsString;
+
+        end;
+        {DebugServer.Write(DataSet.FieldByName('FK_TABLE_NAME').AsString+'.'+DataSet.FieldByName('FK_COLUMN_NAME').AsString+' => '+
+                          DataSet.FieldByName('PK_COLUMN_NAME').AsString);}
+
+        DataSet.Next();
+      end;
+
+
+    finally
+      DataSet.Free;
+    end;
+  end;  
+end;
+
+procedure TDAEADOConnection.GetViewOrTableNames(const aType: string; const aSystemTables: boolean; List: IROStrings);
+var
+  SchemaField,
+  TypeField,
+    NameField: TField;
+  TableType: string;
+  DataSet: TADODataSet;
+begin
+  fADOConnection.Open();
+
+  DataSet := TADODataSet.Create(nil);
+  try
+    fADOConnection.OpenSchema(siTables, EmptyParam, EmptyParam, DataSet);
+
+    TypeField := DataSet.FieldByName('TABLE_TYPE'); { do not localize }
+    NameField := DataSet.FieldByName('TABLE_NAME'); { do not localize }
+    SchemaField := DataSet.FindField('TABLE_SCHEMA');
+    while not DataSet.EOF do begin
+      TableType := TypeField.AsString;
+      if (TableType = aType) or ((aType = 'TABLE') and (TableType ='ACCESS TABLE')) or (aSystemTables and (TableType = 'SYSTEM TABLE')) then
+      begin
+        if fSchemaEnabled and (SchemaField <> nil) and not (VarIsNull(SchemaField.Value)) then
+          List.Add(SchemaField.AsString + '.' + NameField.AsString)
+        else
+          List.Add(NameField.AsString);
+      end;
+      DataSet.Next;
+    end;
+  finally
+    DataSet.Free;
+  end;
+end;
+
+procedure TDAEADOConnection.DoGetViewNames(out List: IROStrings);
+var
+  Schema,NameField: TField;
+  DataSet: TADODataSet;
+  lName: string;
+  p: integer;
+begin
+  inherited;
+  case fProviderType of
+    oledb_MSSQL, oledb_MSSQL2005, oledb_MSSQL2008: MSSQL_DoGetNames(CreateCompatibleQuery,List,dotView,SchemaEnabled);
+    oledb_Postgresql: Postgres_DoGetNames(CreateCompatibleQuery,List,dotView);
+    oledb_Oracle: Oracle_DoGetNames(CreateCompatibleQuery,List,dotView);
+  else
+    GetViewOrTableNames('VIEW', false, List);
+    fADOConnection.Open();
+    DataSet := TADODataSet.Create(nil);
+    try
+      fADOConnection.OpenSchema(siProcedures, EmptyParam, EmptyParam, DataSet);
+      NameField := DataSet.FieldByName('PROCEDURE_NAME'); { do not localize }
+      Schema := DataSet.Findfield('PROCEDURE_SCHEMA');
+      if List = nil then
+        List := NewROStrings();
+      while not DataSet.EOF do begin
+        lName := NameField.AsString;
+        if (Schema <> nil) and (Schema.Value = 'sys') then begin dataset.Next; continue; end;
+        p := Pos(';', lName);
+        if p > 1 then begin
+          if P+1 >= length(lName) then begin
+            if lName[p+1] = '1' then // procedure
+            begin
+              Dataset.Next;
+              continue;
+            end;
+          end;
+          SetLength(lName, p-1);
+        end;
+        if fSchemaEnabled and (Schema <> nil) and not (VarIsNull(Schema.Value)) then
+          List.Add(Schema.AsString + '.' + lName)
+        else
+          List.Add(lName);
+        DataSet.Next;
+      end;
+    finally
+      DataSet.Free;
+    end;
+  end;
+end;
+
+procedure TDAEADOConnection.DoGetTableNames(out List: IROStrings);
+begin
+  inherited;
+  case fProviderType of
+    oledb_MSSQL, oledb_MSSQL2005, oledb_MSSQL2008: MSSQL_DoGetNames(CreateCompatibleQuery,List,dotTable,SchemaEnabled);
+    oledb_Postgresql: Postgres_DoGetNames(CreateCompatibleQuery,List,dotTable);
+    oledb_Oracle: Oracle_DoGetNames(CreateCompatibleQuery,List,dotTable);
+  else
+    GetViewOrTableNames('TABLE', false, List);
+  end;
+end;
+
+procedure TDAEADOConnection.DoRollbackTransaction;
+begin
+  fADOConnection.RollbackTrans
+end;
+
+function TDAEADOConnection.GetQuoteChars: TDAQuoteCharArray;
+begin
+  case fProviderType of
+    oledb_Oracle: Result:= Oracle_GetQuoteChars;
+  else
+    result:=MSSQL_GetQuoteChars;
+  end;  
+end;
+
+function TDAEADOConnection.DoGetInTransaction: boolean;
+begin
+  result := fADOConnection.InTransaction
+end;
+
+function TDAEADOConnection.DoGetLastAutoInc(
+  const GeneratorName: string): integer;
+var
+  ds: IDADataset;
+begin
+  case fProviderType of
+    oledb_MSSQL, oledb_MSSQL2005, oledb_MSSQL2008: begin
+      Result := MSSQL_DoGetLastAutoInc(GeneratorName,CreateCompatibleQuery);
+    end;
+    oledb_Jet: begin
+      ds := NewDataset('SELECT @@Identity', ''); // Returns 0 by default
+      ds.Open;
+      result := ds.Fields[0].Value;
+    end;
+    oledb_Postgresql: Result := Postgres_DoGetLastAutoInc(GeneratorName,CreateCompatibleQuery);
+    oledb_Oracle: Result := Oracle_DoGetLastAutoInc(GeneratorName,CreateCompatibleQuery);
+  else
+    result := inherited DoGetLastAutoInc(GeneratorName);
+  end;
+end;
+
+function TDAEADOConnection.GetProviderName: string;
+begin
+  result := fProviderName;
+end;
+
+function TDAEADOConnection.GetProviderType: TDAOleDBProviderType;
+begin
+  result := fProviderType;
+end;
+
+function TDAEADOConnection.CreateMacroProcessor: TDASQLMacroProcessor;
+begin
+  case fProviderType of
+    oledb_MSSQL, oledb_MSSQL2005, oledb_MSSQL2008: Result := MSSQL_CreateMacroProcessor;
+    oledb_Jet: result := MSSQL_CreateMacroProcessor;
+    oledb_Oracle: Result := Oracle_CreateMacroProcessor;
+  else
+    Result:= inherited CreateMacroProcessor;
+  end;
+end;
+
+procedure TDAEADOConnection.CreateTable(aDataSet: TDADataSet; const aOverrideName: string);
+var
+  lSQL: string;
+begin
+  lSQL := BuildCreateTableSQL(aDataSet, aOverrideName);
+  with NewCommand(lSQL, stSQL) do begin
+    Execute();
+  end; { with }
+end;
+
+function TDAEADOConnection.BuildCreateTableSQL(aDataSet: TDADataSet; const aOverrideName: string): string;
+var
+  lName: string;
+begin
+  lName := aOverrideName;
+  if lName = '' then lName := aDataSet.Name;
+  result := uDAHelpers.BuildCreateStatementForTable(aDataSet, lName, self);
+end;
+
+function TDAEADOConnection.FieldToDeclaration(aField: TDAField): string;
+begin
+  case aField.DataType of
+    datUnknown: result := 'unknown';
+    datString: result := Format('varchar(%d)', [aField.Size]);
+    datDateTime: result := 'datetime';
+    datFloat: result := 'float';
+    datCurrency: result := 'money';
+    datAutoInc: result := 'int IDENTITY(1,1)';
+    datInteger: result := 'int';
+    datLargeInt: result := 'largeint';
+    datBoolean: result := 'bit';
+    datMemo: result := 'text';
+    datBlob: result := 'image';
+    //datGuid:result := 'uniqueidentifier';
+  end; { case }
+end;
+
+function TDAEADOConnection.GetDatabaseNames: IROStrings;
+begin
+  case fProviderType of
+    oledb_Jet: Result := NewROStrings;
+    oledb_Postgresql: Result:= Postgres_GetDatabaseNames(Self);
+  else
+    Result := MSSQL_GetDatabaseNames(Self);
+  end;
+end;
+
+function TDAEADOConnection.GetSPSelectSyntax(
+  HasArguments: Boolean): String;
+begin
+  case fProviderType of
+    oledb_MSSQL, oledb_MSSQL2005, oledb_MSSQL2008: Result := MSSQL_GetSPSelectSyntax(HasArguments);
+    oledb_Oracle: Result := Oracle_GetSPSelectSyntax(HasArguments);
+    oledb_Postgresql: Result:= Postgres_GetSPSelectSyntax(HasArguments);
+  else
+    Result := inherited GetSPSelectSyntax(HasArguments);
+  end;
+end;
+
+function TDAEADOConnection.GetCommandTimeout: Integer;
+begin
+  if fADOConnection <> nil then
+    Result:= fADOConnection.CommandTimeout
+  else
+    Result:=0;
+end;
+
+procedure TDAEADOConnection.SetCommandTimeout(const Value: Integer);
+begin
+  if fADOConnection <> nil then
+    fADOConnection.CommandTimeout:= Value;
+end;
+
+function TDAEADOConnection.IdentifierNeedsQuoting(
+  const iIdentifier: string): boolean;
+begin
+  Result := inherited IdentifierNeedsQuoting(iIdentifier);
+  if not Result then
+    case fProviderType of
+      oledb_Oracle: Result:= Oracle_IdentifierNeedsQuoting(iIdentifier);
+      oledb_Postgresql: Result:= Postgres_IdentifierNeedsQuoting(iIdentifier);
+    else
+      Result:= MSSQL_IdentifierNeedsQuoting(iIdentifier);
+    end;  
+end;
+
+function TDAEADOConnection.GetFileExtensions: IROStrings;
+begin
+  case fProviderType of
+    oledb_Jet: Result:=MSACCESS_GetFileExtensions;
+  else
+    result := NewROStrings;
+  end;
+end;
+
+function TDAEADOConnection.QueryInterface(const IID: TGUID;
+  out Obj): HResult;
+begin
+  Result := E_NOINTERFACE;
+  if IsEqualGUID(IID, IDAFileBasedDatabase) then begin
+    if not (fProviderType in [oledb_Jet]) then Exit;
+  end
+  else if IsEqualGUID(IID, IDACanQueryDatabaseNames) then begin
+    if (fProviderType in [oledb_Jet]) then Exit;
+  end
+  else if IsEqualGUID(IID, IDAUseGenerators) then begin
+    if not (fProviderType in [oledb_Oracle, oledb_Postgresql]) then Exit;
+  end
+  else if IsEqualGUID(IID, IDAOracleConnection) then begin
+    if (fProviderType <> oledb_Oracle) then Exit;
+  end;
+
+  Result := inherited QueryInterface(IID, Obj);
+end;
+
+function TDAEADOConnection.isAlive: Boolean;
+begin
+  Result:=(ConnectionObject <> nil) and not (stClosed in fADOConnection.State);
+end;
+
+constructor TDAEADOConnection.Create(aDriver: TDAEDriver; aName: string);
+begin
+  inherited Create(aDriver, aName);
+  fQuery_CursorType := Default_CursorType;
+  fQuery_CursorLocation := Default_CursorLocation;
+  fQuery_ADOLockType := Default_ADOLockType;
+end;
+
+function TDAEADOConnection.GetNextAutoinc(const GeneratorName: string): integer;
+begin
+  case fProviderType of
+    oledb_Oracle: Result:=Oracle_GetNextAutoinc(GeneratorName,CreateCompatibleQuery);
+    oledb_Postgresql: Result := Postgres_GetNextAutoInc(GeneratorName,CreateCompatibleQuery);
+  else
+    Result:=-1;
+  end;
+end;
+
+function TDAEADOConnection.CreateCompatibleQuery: IDADataset;
+begin
+  Result := GetDatasetClass.Create(Self);
+  TADOQuery(Result.Dataset).CursorLocation:=clUseClient;
+end;
+
+procedure TDAEADOConnection.DoGetStoredProcedureParams(
+  const aStoredProcedureName: string; out Params: TDAParamCollection);
+begin
+  case fProviderType of
+    oledb_Postgresql: Postgres_DoGetStoredProcedureParams(aStoredProcedureName, CreateCompatibleQuery, Params);
+    oledb_Oracle: Oracle_DoGetStoredProcedureParams(aStoredProcedureName, CreateCompatibleQuery, Params);
+    oledb_MSSQL, oledb_MSSQL2005, oledb_MSSQL2008: MSSQL_DoGetStoredProcedureParams(aStoredProcedureName, CreateCompatibleQuery, Params);
+  else
+    inherited;
+  end;
+end;
+
+destructor TDAEADOConnection.Destroy;
+begin
+  if Assigned(fADOConnection) then TDAEADODriver(Driver).UnregisterConnection(fADOConnection);
+  inherited;
+end;
+
+{ TDAEADODriver }
+
+function TDAEADODriver.GetAvailableDriverOptions: TDAAvailableDriverOptions;
+begin
+  result := [doAuxDriver, doServerName, doDatabaseName, doLogin, doCustom];
+end;
+
+function TDAEADODriver.GetConnectionClass: TDAEConnectionClass;
+begin
+  result := TDAEADOConnection;
+end;
+
+function TDAEADODriver.GetDefaultConnectionType(
+  const AuxDriver: string): string;
+begin
+  case OleDBDriverIdToOleDBProviderType(AuxDriver) of
+    oledb_MSSQL,
+    oledb_MSSQL2005,
+    oledb_MSSQL2008 :Result:=MSSQL_DriverType;
+    oledb_Jet: Result := Access_DriverType;
+    oledb_Oracle: Result := Oracle_DriverType;
+    oledb_ODBC: Result := ODBC_DriverType;
+    oledb_Postgresql : Result := PostgreSQL_DriverType;
+    oleDb_VisualFoxPro: Result := FoxPro_DriverType;
+  else
+    Result:= inherited GetDefaultConnectionType(AuxDriver);
+  end;
+end;
+
+function TDAEADODriver.GetDescription: string;
+begin
+  result := 'Borland ADOExpress Driver';
+end;
+
+function TDAEADODriver.GetDriverID: string;
+begin
+  result := 'ADO';
+end;
+
+procedure TDAEADODriver.GetAuxDrivers(out List: IROStrings);
+var
+  i: TDAOleDBProviderType;
+begin
+  inherited;
+  for i := Low(TDAOleDBProviderType) to High(TDAOleDBProviderType) do
+    if (i <> oledb_Unknown) {// Redundant but safe if I change the enum later...} then List.Add(OleDBProviders[i]);
+end;
+
+function TDAEADODriver.GetProviderDefaultCustomParameters(
+  Provider: string): string;
+begin
+  if Sametext(Trim(Provider), oledb_MSSQL2005id) or
+     Sametext(Trim(Provider), oledb_MSSQL2008id) then Result := 'Schemas=1;Integrated Security=SSPI;' else
+  if SameText(Trim(Provider), oledb_MSSQLId) then Result := 'Integrated Security=SSPI;';
+end;
+
+procedure TDAEADODriver.GetAuxParams(const AuxDriver: string;
+  out List: IROStrings);
+begin
+  inherited;
+  if Sametext(Trim(AuxDriver), oledb_MSSQL2005id) or
+     SameText(Trim(AuxDriver), oledb_MSSQLId)     or
+     Sametext(Trim(AuxDriver), oledb_MSSQL2008id) then
+    MSSQL_GetAuxParams(List);
+  List.Add('CursorLocation=(clUseServer,clUseClient)');
+  List.Add('CursorType=(ctUnspecified,ctOpenForwardOnly,ctKeyset,ctDynamic,ctStatic)');
+  List.Add('LockType=(ltUnspecified,ltReadOnly,ltPessimistic,ltOptimistic,ltBatchOptimistic)');
+  List.Add('');
+  List.Add('You can pass any parameters directly to driver. Use the prefix ''@'' for this, e.g.:');
+  List.Add('CursorLocation=clUseServer;@Mode=Read');
+end;
+
+procedure TDAEADODriver.CustomizeConnectionObject(
+  aConnection: TDAEConnection);
+begin
+  inherited;
+  if Assigned(FMonitor) then fMonitor.AssignEvents(TDAEADOConnection(aConnection).fADOConnection);
+end;
+
+constructor TDAEADODriver.Create(AOwner: TComponent);
+begin
+  FConnectionList:= TThreadList.Create;
+  inherited;
+end;
+
+destructor TDAEADODriver.Destroy;
+begin
+  inherited;
+  FConnectionList.Free;
+end;
+
+procedure TDAEADODriver.DoSetTraceOptions(TraceActive: boolean;
+  TraceFlags: TDATraceOptions; Callback: TDALogTraceEvent);
+begin
+  inherited;
+  if TraceActive then begin
+    if (FMonitor = nil) then fMonitor := TDAADOMonitor.Create(Self);
+    fMonitor.Enabled := FALSE;
+    fMonitor.TraceFlags := TraceFlags;
+    FMonitor.OnCallback := Callback;
+    fMonitor.Enabled := TRUE;
+  end
+  else begin
+    if (FMonitor <> nil) then begin
+      fMonitor.Enabled:=False;
+      FreeAndNIL(fMonitor);
+    end;
+  end;
+end;
+
+procedure TDAEADODriver.RegisterConnection(AConnection: TADOConnection);
+begin
+  FConnectionList.Add(AConnection);
+  if FMonitor <> nil then FMonitor.AssignEvents(AConnection);
+end;
+
+procedure TDAEADODriver.UnregisterConnection(AConnection: TADOConnection);
+begin
+  FConnectionList.Remove(AConnection);
+  if FMonitor <> nil then FMonitor.UnAssignEvents(AConnection);  
+end;
+
+{ TDAEADOQuery }
+
+procedure TDAEADOQuery.ClearParams;
+begin
+  inherited;
+  TADOQuery(Dataset).Parameters.Clear;
+end;
+
+function TDAEADOQuery.CreateDataset(aConnection: TDAEConnection): TDataset;
+begin
+  result := TADOQuery.Create(nil);
+
+  TADOQuery(result).LockType := TDAEADOConnection(aConnection).fQuery_ADOLockType;// ltReadOnly;
+  TADOQuery(result).CursorLocation :=TDAEADOConnection(aConnection).fQuery_CursorLocation; // clUseClient;
+  TADOQuery(result).CursorType := TDAEADOConnection(aConnection).fQuery_CursorType; //ctOpenForwardOnly;
+  TADOQuery(result).Connection := TDAEADOConnection(aConnection).fADOConnection;
+  TADOQuery(result).EnableBCD := False;
+  TADOQuery(result).CacheSize := 25;
+//  TADOQuery(result).Prepared := TRUE;
+  if TADOQuery(result).Connection <> nil then
+    TADOQuery(result).CommandTimeout := TADOQuery(result).Connection.CommandTimeout;
+end;
+
+function TDAEADOQuery.DoExecute: integer;
+begin
+  result := TADOQuery(Dataset).ExecSQL;
+  if TADOQuery(Dataset).Connection.Errors.Count>0 then
+    raise Exception.Create(TADOQuery(Dataset).Connection.Errors.Item[0].Description);
+end;
+
+function TDAEADOQuery.DoGetSQL: string;
+begin
+  result := TADOQuery(Dataset).SQL.Text;
+end;
+
+procedure TDAEADOQuery.DoSetSQL(const Value: string);
+begin
+  TADOQuery(Dataset).SQL.Text := Value;
+end;
+
+procedure TDAEADOQuery.GetParamValues(Params: TDAParamCollection);
+var
+  i: integer;
+  par: TDAParam;
+  inpar: TParameter;
+  ds: TADOQuery;
+begin
+  ds := TADOQuery(Dataset);
+  if not Assigned(ds.Parameters) then
+    Exit;
+
+  for i := 0 to (ds.Parameters.Count - 1) do begin
+    inpar := ds.Parameters[i];
+
+    par := Params.ParamByName(inpar.Name);
+    if par.ParamType in [daptOutput, daptInputOutput, daptResult] then begin
+      if inpar.DataType = ftLargeint then
+        par.Value := DecimalToInt64(inpar.Value)
+      else
+        par.Value := inpar.Value;
+    end;
+  end;
+end;
+
+procedure TDAEADOQuery.RefreshParams;
+var
+  i: Integer;
+  par: TDAParam;
+  outpar: TParameter;
+  ds: TADOQuery;
+begin
+  inherited;
+  ds := TADOQuery(Dataset);
+  if not Assigned(ds.Parameters) then
+    Exit;
+  for i := 0 to ds.Parameters.Count -1 do begin
+    outpar := ds.Parameters[i];
+
+    par := self.ParamByName(outpar.Name);
+
+    if outpar.DataType <> ftUnknown then begin
+      par.DataType := VCLTypeToDAType(outpar.DataType);
+      par.Size := outpar.Size;
+      par.DecimalPrecision := outpar.Precision;
+      par.DecimalScale := outpar.NumericScale;
+      case outpar.Direction of
+        pdInput: par.ParamType := daptInput;
+        pdOutput: par.ParamType := daptOutput;
+        pdInputOutput: par.ParamType := daptInputOutput;
+        pdReturnValue: par.ParamType := daptResult;
+      end;
+    end;
+ end;
+end;
+
+procedure TDAEADOQuery.SetParamValues(Params: TDAParamCollection);
+var
+  i: integer;
+  par: TDAParam;
+  outpar: TParameter;
+  ds: TADOQuery;
+  ft: TFieldType;
+begin
+  ds := TADOQuery(Dataset);
+  if not Assigned(ds.Parameters) then
+    Exit;
+
+  for i := 0 to (ds.Parameters.Count - 1) do begin
+    outpar := ds.Parameters[i];
+
+    par := Params.ParamByName(outpar.Name);
+    ft := DATypeToVCLType(par.DataType);
+    case par.ParamType of
+      daptInput: outpar.Direction := pdInput;
+      daptOutput: outpar.Direction := pdOutput;
+      daptInputOutput: outpar.Direction := pdInputOutput;
+      daptResult: outpar.Direction := pdReturnValue;
+    end;
+
+    if par.DataType = datBlob then begin
+      outpar.DataType := ftBlob;
+      if not (par.ParamType in [daptOutput, daptResult]) then begin
+        if VarIsEmpty(par.Value) or VarIsNull(par.Value)
+         then outpar.Value := NULL
+         else outpar.Value := VariantBinaryToString(par.Value);
+       end;
+    end
+    else begin
+      if (outpar.DataType <> ft) and (ft <> ftUnknown) then
+        outpar.DataType := ft;
+      if not (par.ParamType in [daptOutput, daptResult]) then begin
+        if outpar.DataType = ftLargeint then
+          Outpar.Value := Int64ToDecimal(par.Value)
+        else
+          outpar.Value := par.Value;
+      end;
+    end;
+    if (VarIsEmpty(par.Value) or VarIsNull(par.Value)) and
+       (par.DataType <> datUnknown) then begin
+      if (outpar.DataType <> ft) and (ft <> ftUnknown) then
+        outpar.DataType := ft;
+    end;
+  end;
+end;
+
+{ TDAEADOStoredProcedure }
+
+function TDAEADOStoredProcedure.CreateDataset(aConnection: TDAEConnection): TDataset;
+begin
+  result := TADOStoredProc.Create(nil);
+  TADOStoredProc(result).Connection := TDAEADOConnection(aConnection).fADOConnection;
+  if TADOStoredProc(result).Connection <> nil then
+    TADOStoredProc(result).CommandTimeout := TADOStoredProc(result).Connection.CommandTimeout;
+end;
+
+procedure TDAEADOStoredProcedure.SetParamValues(Params: TDAParamCollection);
+var
+  i: integer;
+  par: TDAParam;
+  outpar: TParameter;
+  ds: TADOStoredProc;
+  ft: TFieldType;
+begin
+  ds := TADOStoredProc(Dataset);
+  if not Assigned(ds.Parameters) then
+    Exit;
+
+  for i := 0 to (ds.Parameters.Count - 1) do begin
+    outpar := ds.Parameters[i];
+
+    par := Params.ParamByName(outpar.Name);
+    ft := DATypeToVCLType(par.DataType);
+    case par.ParamType of
+      daptInput: outpar.Direction := pdInput;
+      daptOutput: outpar.Direction := pdOutput;
+      daptInputOutput: outpar.Direction := pdInputOutput;
+      daptResult: outpar.Direction := pdReturnValue;
+    end;
+
+    if par.DataType = datBlob then begin
+      outpar.DataType := ftBlob;
+      if not (par.ParamType in [daptOutput, daptResult]) then begin
+        if VarIsEmpty(par.Value) or VarIsNull(par.Value)
+         then outpar.Value := NULL
+         else outpar.Value := VariantBinaryToString(par.Value);
+       end;
+    end
+    else begin
+      if (outpar.DataType <> ft) and (ft <> ftUnknown) then
+        outpar.DataType := ft;
+      if not (par.ParamType in [daptOutput, daptResult]) then begin
+        if outpar.DataType = ftLargeint then
+          Outpar.Value := Int64ToDecimal(par.Value)
+        else
+          outpar.Value := par.Value;
+      end;
+    end;
+    if (VarIsEmpty(par.Value) or VarIsNull(par.Value)) and
+       (par.DataType <> datUnknown) then begin
+      if (outpar.DataType <> ft) and (ft <> ftUnknown) then
+        outpar.DataType := ft;
+    end;
+  end;
+end;
+
+procedure TDAEADOStoredProcedure.GetParamValues(Params: TDAParamCollection);
+var
+  i: integer;
+  par: TDAParam;
+  inpar: TParameter;
+  ds: TADOQuery;
+begin
+  ds := TADOQuery(Dataset);
+  if not Assigned(ds.Parameters) then
+    Exit;
+
+  for i := 0 to (ds.Parameters.Count - 1) do begin
+    inpar := ds.Parameters[i];
+
+    par := Params.ParamByName(inpar.Name);
+    if par.ParamType in [daptOutput, daptInputOutput, daptResult] then begin
+      if inpar.DataType = ftLargeint then
+        par.Value := DecimalToInt64(inpar.Value)
+      else
+        par.Value := inpar.Value;
+    end;
+  end;
+end;
+
+
+type
+  TADOStoredProcHack = class(TADOStoredProc);
+
+function TDAEADOStoredProcedure.Execute: integer;
+var
+  i: integer;
+  pstr: string;
+  params: TDAParamCollection;
+  ds: TADOStoredProc;
+  lParam: TParameter;
+begin
+  params := GetParams;
+  if (Connection as TDAEADOConnection).fProviderType = oledb_Oracle then pstr := '' else pstr := '@';
+
+  ds := TADOStoredProc(Dataset);
+
+  for i := ds.Parameters.Count -1 downto 0 do
+  begin
+    if (ds.Parameters[i].DataType = ftInterface) and (ds.Parameters[i].Direction in [pdOutput, pdInputOutput, pdReturnValue]) then
+      ds.Parameters.Delete(i);
+  end;
+
+  if (ds.Parameters.Count<>Params.Count) then begin
+    ds.Parameters.Refresh;
+  end;
+
+  {for i := 0 to (Parameters.Count - 1) do
+    if (Parameters[i].Direction in [pdInput, pdInputOutput])
+      then Parameters.ParamByName('@'+params[i].Name)  [i].Value := params[i].Value;}
+
+  for i := 0 to (params.Count-1) do
+  begin
+    lParam:= ds.Parameters.ParamByName(pstr+params[i].Name);
+    if (params[i].ParamType = daptOutput) and (lParam.Direction <> pdOutput) then
+      lParam.Direction := pdOutput // ado sometimes doesn't set the direction properly
+    else if (params[i].ParamType in [daptInput, daptInputOutput]) then
+      lParam.Value := params[i].Value;
+  end;
+
+  Result := DoExecute;
+
+  {TADOStoredProcHack(Dataset).InitializeMasterFields(Self);
+  Command.Execute;}
+
+  {for i := 0 to (Parameters.Count - 1) do
+    if (Parameters[i].Direction in [pdOutput, pdInputOutput, pdReturnValue])
+      then params[i].Value := Parameters[i].Value;}
+
+  for i := 0 to (params.Count-1) do
+    if (params[i].ParamType in [daptOutput, daptInputOutput, daptResult])
+      then params[i].Value := ds.Parameters.ParamByName(pstr+params[i].Name).Value;
+end;
+
+function TDAEADOStoredProcedure.GetStoredProcedureName: string;
+begin
+  result := TADOStoredProc(Dataset).ProcedureName;
+end;
+
+procedure TDAEADOStoredProcedure.SetStoredProcedureName(
+  const Name: string);
+begin
+  TADOStoredProc(Dataset).ProcedureName := Name;
+end;
+
+procedure TDAEADOStoredProcedure.RefreshParams;
+var
+  dsparams: TParameters;
+  dPar: TParameter;
+  i: integer;
+  par: TDAParam;
+  params: TDAParamCollection;
+  nme: string;
+begin
+  dsparams := TADOStoredProc(Dataset).Parameters;
+
+  dsparams.Refresh;
+  params := GetParams;
+  params.Clear;
+
+  for i := 0 to (dsparams.Count - 1) do begin
+    par := params.Add;
+    dPar:=dsparams[i];
+    nme := dPar.Name;
+    if Pos('@', nme) > 0 then
+      System.Delete(nme, Pos('@', nme), 1);
+    par.Name := nme;
+
+    if (dPar.DataType = ftInterface) then
+      par.DataType := datUnknown
+    else
+      par.DataType := VCLTypeToDAType(dPar.DataType);
+    par.ParamType := TDAParamType(dPar.Direction);
+    par.Size := dPar.Size;
+  end;
+end;
+
+exports
+  GetDriverObject name func_GetDriverObject;
+
+
+function TDAEADOStoredProcedure.DoExecute: integer;
+begin
+  TADOStoredProcHack(TADOStoredProc(Dataset)).Command.Execute(result, EmptyParam);
+
+  if TADOStoredProc(Dataset).Connection.Errors.Count >0 then
+    raise Exception.Create(TADOStoredProc(Dataset).Connection.Errors.Item[0].Description);
+end;
+
+{ TDAADOMonitor }
+
+function ParseError(const AError: Error):string;
+begin
+  if aError = nil then begin
+    Result:=''
+  end
+  else begin
+    Result:=
+      'Error.Number: ' + IntToStr(AError.Number) + sLineBreak +
+      'Error.NativeError: ' + IntToStr(AError.NativeError) + sLineBreak +
+      'Error.Source: ' + AError.Source+sLineBreak +
+      'Error.Description: ' + AError.Description + sLineBreak +
+      'Error.SQLState: ' + AError.SQLState + sLineBreak;
+  end;
+end;
+
+function ParseCommand(Const Command: _Command): string;
+var
+  i: integer;
+  {$IFDEF ADOMONITOR_SHOWPARAMVALUES}
+  v: Variant;
+  {$ENDIF}
+  lItem: _Parameter;
+  s: String;
+begin
+  if Command = nil then begin
+    Result:=sLineBreak;
+  end
+  else begin
+    s:= PWideChar(Command.CommandText);
+    Result:=
+      'Command.CommandText: ' + StringReplace(s, sLineBreak,' ',[rfReplaceAll]) + sLineBreak +
+      'Command.Parameters.Count: ' + IntToStr(Command.Parameters.Count) + sLineBreak;
+    for i:= 0 to Command.Parameters.Count-1 do begin
+      lItem:=Command.Parameters.Item[i];
+      Result := Result + 'Command.Parameters['+intToStr(i)+ ']: '+ lItem.Name;
+      {$IFDEF ADOMONITOR_SHOWPARAMVALUES}
+      Result:= Result + ' = ';
+      v:=lItem.Value;
+      if VarIsNull(v) then Result := Result+ '<Null>'
+      else if VarIsEmpty(v) then Result := Result+ '<empty>'
+      else if lItem.Type_ in [adBinary, adVarBinary, adLongVarBinary, adLongVarChar] then Result:= Result + '<blob>'
+      else Result:= Result + VarToStr(v);
+      {$ENDIF}
+      Result:=Result+sLineBreak;
+    end;
+    Result:=Result+sLineBreak;
+  end;
+end;
+
+function ParseEventStatus(const EventStatus: TEventStatus): string;
+begin
+  Result := 'EventStatus: ' + TEventStatusStr[EventStatus]+sLineBreak;
+end;
+
+procedure TDAADOMonitor.ADOConnectionBeginTransComplete(
+  Connection: TADOConnection; TransactionLevel: Integer;
+  const Error: Error; var EventStatus: TEventStatus);
+begin
+  if Assigned(FOnCallback) then FOnCallback(Self,
+    'Begin transaction'+sLineBreak+
+    '-----------------'+sLineBreak+
+    'TransactionLevel: ' +IntToStr(TransactionLevel)+sLineBreak+
+    ParseError(Error)+
+    ParseEventStatus(EventStatus),
+    0);
+end;
+
+procedure TDAADOMonitor.ADOConnectionCommitTransComplete(
+  Connection: TADOConnection; const Error: Error;
+  var EventStatus: TEventStatus);
+begin
+  if Assigned(FOnCallback) then FOnCallback(Self,
+    'Commit transaction'+sLineBreak+
+    '------------------'+sLineBreak+
+    ParseError(Error)+
+    ParseEventStatus(EventStatus),
+    0);
+end;
+
+procedure TDAADOMonitor.ADOConnectionConnectComplete(
+  Connection: TADOConnection; const Error: Error;
+  var EventStatus: TEventStatus);
+begin
+  if Assigned(FOnCallback) then FOnCallback(Self,
+    'Connect'+sLineBreak+
+    '-------'+sLineBreak+
+    ParseError(Error)+
+    ParseEventStatus(EventStatus),
+    0);
+end;
+
+procedure TDAADOMonitor.ADOConnectionDisconnect(Connection: TADOConnection;
+  var EventStatus: TEventStatus);
+begin
+  if Assigned(FOnCallback) then FOnCallback(Self,
+    'Disconnect'+sLineBreak+
+    '----------'+sLineBreak+
+    ParseEventStatus(EventStatus),
+    0);
+end;
+
+procedure TDAADOMonitor.ADOConnectionExecuteComplete(
+  Connection: TADOConnection; RecordsAffected: Integer; const Error: Error;
+  var EventStatus: TEventStatus; const Command: _Command;
+  const Recordset: _Recordset);
+begin
+  if Assigned(FOnCallback) then FOnCallback(Self,
+    'Execute'+sLineBreak+
+    '-------'+sLineBreak+
+    'RecordsAffected: ' +IntToStr(RecordsAffected)+sLineBreak+
+    ParseError(Error)+
+    ParseEventStatus(EventStatus)+
+    ParseCommand(Command),
+    0);
+end;
+
+procedure TDAADOMonitor.ADOConnectionInfoMessage(
+  Connection: TADOConnection; const Error: Error;
+  var EventStatus: TEventStatus);
+begin
+  if Assigned(FOnCallback) then FOnCallback(Self,
+    'Info message'+sLineBreak+
+    '------------'+sLineBreak+
+    ParseError(Error)+
+    ParseEventStatus(EventStatus),
+    0);
+end;
+
+procedure TDAADOMonitor.ADOConnectionRollbackTransComplete(
+  Connection: TADOConnection; const Error: Error;
+  var EventStatus: TEventStatus);
+begin
+  if Assigned(FOnCallback) then FOnCallback(Self,
+    'Rollback transaction'+sLineBreak+
+    '-------------------'+sLineBreak+
+    ParseError(Error)+
+    ParseEventStatus(EventStatus),
+    0);
+end;
+
+procedure TDAADOMonitor.ADOConnectionWillConnect(
+  Connection: TADOConnection; var ConnectionString, UserID,
+  Password: WideString; var ConnectOptions: TConnectOption;
+  var EventStatus: TEventStatus);
+begin
+  if Assigned(FOnCallback) then FOnCallback(Self,
+    'Will connect'+sLineBreak+
+    '------------'+sLineBreak+
+    'Connection string: ' + ConnectionString +sLineBreak+
+    'UserID: ' + UserID +sLineBreak+
+    'Password: ' + Password +sLineBreak+
+    'ConnectOptions: ' + TConnectOptionStr[ConnectOptions]+sLineBreak+
+    ParseEventStatus(EventStatus),
+    0);
+end;
+
+function getExecuteOptionStr(const ExecuteOptions: TExecuteOptions): string;
+var
+  i: TExecuteOption;
+begin
+  Result:='';
+  for i:= low(TExecuteOption) to High(TExecuteOption) do
+    if i in ExecuteOptions then Result:= Result + TExecuteOptionStr[i]+',';
+  if Length(Result) > 0 then SetLength(Result, Length(Result)-1);
+end;
+
+procedure TDAADOMonitor.ADOConnectionWillExecute(
+  Connection: TADOConnection; var CommandText: WideString;
+  var CursorType: TCursorType; var LockType: TADOLockType;
+  var CommandType: TCommandType; var ExecuteOptions: TExecuteOptions;
+  var EventStatus: TEventStatus; const Command: _Command;
+  const Recordset: _Recordset);
+begin
+  if Assigned(FOnCallback) then FOnCallback(Self,
+    'Will execute'   + sLineBreak+
+    '------------'   + sLineBreak+
+    'CommandText: ' + CommandText + sLineBreak+
+    'CursorType: '  + TCursorTypeStr[CursorType] + sLineBreak +
+    'LockType: '    + TADOLockTypeStr[LockType] + sLineBreak +
+    'CommandType: ' + TCommandTypeStr[CommandType] + sLineBreak +
+    'ExecuteOptions: ' + getExecuteOptionStr(ExecuteOptions) + sLineBreak +
+    ParseEventStatus(EventStatus)+
+    ParseCommand(Command),
+    0);
+end;
+
+procedure TDAADOMonitor.AssignEvents(AConnection: TADOConnection);
+begin
+  if (AConnection <> nil) and FEnabled and Assigned(FOnCallback) then begin
+  //  if toPrepare in FTraceFlags then AConnection.
+    if toExecute in FTraceFlags then begin
+      AConnection.OnExecuteComplete := ADOConnectionExecuteComplete;
+      AConnection.OnWillExecute := ADOConnectionWillExecute;
+    end;
+  //  if toFetch in FTraceFlags then AConnection.
+    if toError in FTraceFlags then begin
+      AConnection.OnInfoMessage := ADOConnectionInfoMessage;
+    end;
+  //  if toStmt in FTraceFlags then AConnection.
+    if toConnect in FTraceFlags then begin
+      AConnection.OnConnectComplete := ADOConnectionConnectComplete;
+      AConnection.OnWillConnect := ADOConnectionWillConnect;
+      AConnection.OnDisconnect := ADOConnectionDisconnect;
+    end;
+    if toTransact in FTraceFlags then begin
+      AConnection.OnBeginTransComplete := ADOConnectionBeginTransComplete;
+      AConnection.OnCommitTransComplete := ADOConnectionCommitTransComplete;
+      AConnection.OnRollbackTransComplete := ADOConnectionRollbackTransComplete;
+    end;
+  //  if toBlob in FTraceFlags then AConnection.
+  //  if toService in FTraceFlags then AConnection.
+  //  if toMisc in FTraceFlags then AConnection.
+  //  if toParams in FTraceFlags then AConnection.
+  end;
+end;
+
+constructor TDAADOMonitor.Create(ADriver: TDAEADODriver);
+begin
+  inherited Create;
+  FDriver := ADriver;
+  FEnabled := False;
+end;
+
+procedure TDAADOMonitor.ReAssignEvents;
+var
+  i: integer;
+  lmode: boolean;
+begin
+  lMode:=FEnabled and (fTraceFlags <> []) and Assigned(FOnCallback);
+  with FDriver.FConnectionList.LockList do try
+    for i:= 0 to Count-1 do
+     if lMode then
+       AssignEvents(TADOConnection(Items[i]))
+     else
+       UnAssignEvents(TADOConnection(Items[i]));
+  finally
+    FDriver.FConnectionList.UnLockList;
+  end;
+end;
+
+procedure TDAADOMonitor.SetEnabled(const Value: Boolean);
+begin
+  if FEnabled <> Value then begin
+    FEnabled := Value;
+    if FEnabled and (fTraceFlags <> []) and Assigned(FOnCallback) then ReAssignEvents;
+  end;
+end;
+
+procedure TDAADOMonitor.SetOnCallback(const Value: TDALogTraceEvent);
+begin
+  if @fOnCallback <> @Value  then begin
+    FOnCallback := Value;
+    if FEnabled and (fTraceFlags <> []) and Assigned(FOnCallback) then ReAssignEvents;
+  end;
+end;
+
+procedure TDAADOMonitor.SetTraceFlags(const Value: TDATraceOptions);
+begin
+  if FTraceFlags <> Value then begin
+    FTraceFlags := Value;
+    if FEnabled and (fTraceFlags <> []) and Assigned(FOnCallback) then ReAssignEvents;
+  end;
+end;
+
+procedure TDAADOMonitor.UnAssignEvents(AConnection: TADOConnection);
+begin
+  if AConnection <> nil then begin
+    // toTransact
+    AConnection.OnBeginTransComplete := nil;
+    AConnection.OnCommitTransComplete := nil;
+    AConnection.OnRollbackTransComplete := nil;
+
+    //toConnect
+    AConnection.OnConnectComplete := nil;
+    AConnection.OnWillConnect := nil;
+    AConnection.OnDisconnect := nil;
+
+    //toExecute
+    AConnection.OnExecuteComplete := nil;
+    AConnection.OnWillExecute := nil;
+
+    //toError
+    AConnection.OnInfoMessage := nil;
+  end;
+end;
+
+initialization
+  _driver := nil;
+  RegisterDriverProc(GetDriverObject);
+finalization
+  UnregisterDriverProc(GetDriverObject);
+  FreeAndNIL(_driver);
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAAnyDACDriver.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAAnyDACDriver.pas
new file mode 100644
index 0000000..ef13940
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAAnyDACDriver.pas	
@@ -0,0 +1,2836 @@
+{-------------------------------------------------------------------------------}
+{ Data Abstract Library - Driver Library                                        }
+{                                                                               }
+{ compiler: Delphi 6 and up                                                     }
+{ platform: Win32                                                               }
+{                                                                               }
+{ (c)opyright RemObjects Software. all rights reserved.                         }
+{                                                                               }
+{ Using this code requires a valid license of the Data Abstract                 }
+{ which can be obtained at http://www.remobjects.com.                           }
+{                                                                               }
+{ Based on AnyDAC Driver by Dmitry Arefiev (www.da-soft.com)                    }
+{-------------------------------------------------------------------------------}
+
+{$IFDEF MSWINDOWS}
+{$I ..\DataAbstract.inc}
+{$ELSE}
+{$I ../DataAbstract.inc}
+{$ENDIF}
+
+{$I uAD.inc}
+
+unit uDAAnyDACDriver;
+
+interface
+
+uses
+  DB, Classes,
+  uROClasses,
+  uDAEngine, uDAInterfaces, uDAInterfacesEx, uDAUtils, uDAOracleInterfaces,
+    uDAMySQLInterfaces, uDAADOInterfaces, uDAIBInterfaces, uDADB2Interfaces,
+    uDASybaseInterfaces,
+  uADStanIntf, uADStanOption, uADDatSManager, uADPhysIntf, uADCompClient
+{$IFDEF AnyDAC_MONITOR}
+    ,uADMoniBase, uADMoniCustom
+{$ENDIF}
+  ;
+
+const
+  C_DriverMajVer = 3;
+  C_DriverMinVer = 50;
+
+type
+  TDAAnyDACDriverType = TADRDBMSKind;
+
+  { TDAAnyDACDriver }
+  TDAAnyDACDriver = class(TDADriverReference)
+  end;
+
+  { TDAEAnyDACDriver }
+  TDAEAnyDACDriver = class(TDAEDriver, IDADriver40)
+  private
+    FConnectionDefs: TStringList;
+    FConnectionDefIndex: Integer;
+{$IFDEF AnyDAC_MONITOR}
+    FMonitor: TADMoniCustomClientLink;
+    FTraceCallback: TDALogTraceEvent;
+    procedure DoTrace(ASender: TADMoniClientLinkBase; const AClassName, AObjName, AMessage: String);
+{$ENDIF}
+    function LookupConnectionString(const AConnectionString: String; AParsedParams: TStringList): String;
+  protected
+{$IFDEF AnyDAC_MONITOR}
+    procedure DoSetTraceOptions(TraceActive: Boolean; TraceOptions: TDATraceOptions; Callback: TDALogTraceEvent); override;
+{$ENDIF}
+    function GetConnectionClass: TDAEConnectionClass; override;
+    // IDADriver
+    procedure Initialize; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure Finalize; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetDriverID: string; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetDescription: string; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetMajVersion: byte; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetMinVersion: byte; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}    // IDADriver40
+    procedure GetAuxDrivers(out List: IROStrings); override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetAuxParams(const AuxDriver: string; out List: IROStrings); override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAvailableDriverOptions: TDAAvailableDriverOptions; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetDefaultConnectionType(const AuxDriver: string): string; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetProviderDefaultCustomParameters(Provider: string): string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  end;
+
+  { TDAEAnyDACConnection }
+  TDAEAnyDACConnection = class(TDAEConnection, IDAConnection,
+    IDAADOConnection,
+    IDAInterbaseConnection,
+    IDAIBTransactionAccess,
+    IDAIBConnectionProperties,
+    IDAOracleConnection,
+    IDAMySQLConnection,
+    IDADB2Connection,
+    IDASybaseConnection,
+    IDAConnectionModelling,
+    IDACanQueryDatabaseNames,
+    IDAFileBasedDatabase,
+    IDAUseGenerators,
+    IDACanQueryGeneratorsNames,
+    IDATestableObject)
+  private
+    FADConnection: TADConnection;
+    fDriverType: TDAAnyDACDriverType;
+    fMSSQLSchemaEnabled: Boolean;
+    fBiDirectionalDataSets: Boolean;
+    fDirectMode: Boolean;
+    FDataTypeSchema: String;
+    FMySQLVersion: integer;
+    FDataBaseName: string;
+    procedure DoGetNames(AList: IROStrings; AObjectType: TDAObjecttype);
+    procedure Native_DoGetTableFields(aTableName: string; out Fields: TDAFieldCollection);
+    procedure Native_DoGetForeignKeys(ForeignKeys: TDADriverForeignKeyCollection);
+    function Native_DoGetLastAutoInc(const GeneratorName: string): integer;
+    function Native_GetQuoteChars: TDAQuoteCharArray;
+    function GetAnyDACPhysConnection:IADPhysConnection;
+    procedure MapAsFIB;
+    function GetMySQLVersion: integer;
+    function GetDataBaseName: string;
+  protected
+    // IInterface
+    function QueryInterface(const IID: TGUID; out Obj): HResult; override; stdcall;
+    // TDAEConnection
+    function CreateCustomConnection: TCustomConnection; override;
+    function CreateMacroProcessor: TDASQLMacroProcessor; override;
+    function GetDatasetClass: TDAEDatasetClass; override;
+    function GetStoredProcedureClass: TDAEStoredProcedureClass; override;
+    procedure DoApplyConnectionString(aConnStrParser: TDAConnectionStringParser; aConnectionObject: TCustomConnection); override;
+    procedure SetupDataset(ADataSet: TADRdbmsDataSet; AFetchMeta: Boolean);
+    procedure SetupOptions(AOptions: IADStanOptions; AFetchMeta: Boolean);
+    function DoBeginTransaction: integer; override;
+    procedure DoCommitTransaction; override;
+    procedure DoRollbackTransaction; override;
+    function DoGetInTransaction: boolean; override;
+    procedure DoGetTableNames(out List: IROStrings); override;
+    procedure DoGetViewNames(out List: IROStrings); override;
+    procedure DoGetStoredProcedureNames(out List: IROStrings); override;
+    procedure DoGetTableFields(const aTableName: string; out Fields: TDAFieldCollection); override;
+    procedure DoGetStoredProcedureParams(const aStoredProcedureName: string; out Params: TDAParamCollection); override;
+    procedure DoGetForeignKeys(out ForeignKeys: TDADriverForeignKeyCollection); override;
+    function DoGetLastAutoInc(const GeneratorName: string): integer; override;
+    // IDATestObject
+    // nothing
+    // IDAConnection
+    function GetSPSelectSyntax(AHasArguments: Boolean): string; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetQuoteChars: TDAQuoteCharArray; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function IdentifierNeedsQuoting(const AIdentifier: string): boolean; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // IDAADOConnection
+    function GetProviderName: string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetProviderType: TDAOleDBProviderType; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetCommandTimeout: Integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetCommandTimeout(const Value: Integer); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // IDAInterbaseConnection
+    // nothing
+    // IDAIBTransactionAccess
+    function GetTransaction: TObject; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // IDAIBConnectionProperties
+    function GetRole: string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetRole(const Value: string); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetSQLDialect: integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetSQLDialect(Value: integer); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetCharset: string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetCharset(const Value: string); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure Commit; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure CommitRetaining; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure Rollback; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure RollbackRetaining; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // IDAOracleConnection
+    // nothing
+    // IDAConnectionModelling
+    function FieldToDeclaration(aField: TDAField): string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function BuildCreateTableSQL(aDataSet: TDADataSet; const aOverrideName: string = ''): string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure CreateTable(aDataSet: TDADataSet; const aOverrideName: string = ''); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // IDACanQueryDatabaseNames
+    function GetDatabaseNames: IROStrings;
+    // IDAFileBasedDatabase
+    function GetFileExtensions: IROStrings;
+    // IDADirectoryBasedDatabase
+    // nothing
+    // IDAUseGenerators
+    function GetNextAutoinc(const GeneratorName: string): integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // IDACanQueryGeneratorsNames
+    function GetGeneratorNames: IROStrings;
+  end;
+
+  { TDAEAnyDACQuery }
+  TDAEAnyDACQuery = class(TDAEDataset, IDAMustSetParams)
+  protected
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+    // TDAEDataset
+    procedure DoPrepare(AValue: boolean); override;
+    function DoExecute: integer; override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function DoGetSQL: string; override;
+    procedure DoSetSQL(const AValue: string); override;
+    procedure ClearParams; override;
+    // IDAMustSetParams
+    procedure SetParamValues(AParams: TDAParamCollection); override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(AParams: TDAParamCollection); override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  end;
+
+  { TDAEAnyDACStoredProcedure }
+  TDAEAnyDACStoredProcedure = class(TDAEStoredProcedure, IDAMustSetParams)
+  protected
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+    // TDAEDataset
+    procedure RefreshParams; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetStoredProcedureName: string; override;
+    procedure SetStoredProcedureName(const Name: string); override;
+    function DoExecute: integer; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function Execute: integer; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // IDAMustSetParams
+    procedure SetParamValues(AParams: TDAParamCollection); override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(AParams: TDAParamCollection); override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  end;
+
+  TDAEAnyDACNativeDatabaseAccess = class;
+
+  { TDAEAnyDACNativeField }
+  TDAEAnyDACNativeField = class(TInterfacedObject, IDANativeField)
+  private
+    FCol: TADDatSColumn;
+    FCmd: IADPhysCommand;
+    fParent: TDAEAnyDACNativeDatabaseAccess;
+  protected
+    function GetNativeObject: TObject;
+    function isTFieldCompatible: Boolean;
+    function GetFieldName: string;
+    function GetDataType: TFieldType;
+    function GetSize: integer;
+    function GetDecimalPrecision: Integer;
+    procedure SetDecimalPrecision(Value: integer);
+    function GetDecimalScale: Integer;
+    procedure SetDecimalScale(Value: integer);
+    procedure SetDataType(Value: TFieldType);
+    function GetFieldIndex: integer;
+    function GetValue: Variant;
+    function IsNull: Boolean;
+  public
+    constructor Create(ACol: TADDatSColumn; const ACmd: IADPhysCommand; AParent: TDAEAnyDACNativeDatabaseAccess);
+  end;
+
+  { TDAEAnyDACNativeDatabaseAccess }
+  TDAEAnyDACNativeDatabaseAccessFlags = set of (nfActive, nfBOF, nfEOF);
+  TDAEAnyDACNativeDatabaseAccess = class(TObject, IInterface, IDANativeDatabaseAccess)
+  private
+    FCmd: IADPhysCommand;
+    FTab: TADDatSTable;
+    FFlags: TDAEAnyDACNativeDatabaseAccessFlags;
+    FRowIndex: Integer;
+    FRowsPurged: Integer;
+    FBuffs: array of Pointer;
+    procedure First;
+    procedure CheckActive;
+    procedure CheckBidir;
+    function LocateRecord(const KeyFields: string; const KeyValues: Variant;
+      Options: TLocateOptions; AChangePos: Boolean): Integer;
+    function IsNull(Index: integer): Boolean;
+  protected
+    // IInterface
+    function QueryInterface(const IID: TGUID; out Obj): HResult; stdcall;
+    function _AddRef: Integer; stdcall;
+    function _Release: Integer; stdcall;
+    // IDANativeDatabaseAccess
+    procedure ClearFieldDefs;
+    function GetRecordCount: Integer;
+    function GetBOF: Boolean;
+    function GetEOF: Boolean;
+    function GetActive: Boolean;
+    procedure SetActive(const aValue: Boolean);
+    procedure Next;
+    function Locate(const KeyFields: string; const KeyValues: Variant; Options: TLocateOptions): Boolean;
+    function Lookup(const KeyFields: string; const KeyValues: Variant; const ResultFields: string): Variant;
+    function GetFieldName(Index: Integer): string;
+    procedure DisableControls;
+    procedure EnableControls;
+    function GetIsEmpty: boolean;
+    procedure FreeBookmark(Bookmark: TBookmark);
+    function GetBookMark: pointer;
+    procedure GotoBookmark(Bookmark: TBookmark);
+    function GetState: TDatasetState;
+    function ControlsDisabled: Boolean;
+    procedure Prepare(const AValue: Boolean);
+    function GetFields(Index: integer): IDANativeField;
+    function FieldCount: Integer;
+    function FindField(const FieldName: string): IDANativeField;
+    function IsTDatasetCompatible: Boolean;
+    function GetNativeFieldData(Index: Integer; var Data: pointer; var DataSize: cardinal):Boolean;
+    function GetNativeFieldValue(Index: Integer): Variant;
+    function CanFreeNativeFieldData: Boolean;
+  public
+    Constructor Create(ADAEConnection: TDAEAnyDACConnection);
+    destructor Destroy; override;
+  end;
+
+  { TDAEAnyDACQueryNative }
+  TDAEAnyDACQueryNative = class(TDAEDataset, IDAMustSetParams)
+  private
+    function GetNativeObject: TDAEAnyDACNativeDatabaseAccess;
+  protected
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+    function CreateNativeObject(aConnection: TDAEConnection): TObject; override;
+    function CreateNativeDatabaseAccess: IDANativeDatabaseAccess; override;
+    // TDAEDataset
+    procedure DoPrepare(AValue: boolean); override;
+    function DoExecute: integer; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function DoGetSQL: string; override;
+    procedure DoSetSQL(const AValue: string); override;
+    procedure ClearParams; override;
+    // IDAMustSetParams
+    procedure SetParamValues(AParams: TDAParamCollection); override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(AParams: TDAParamCollection); override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  public
+    property NativeObject: TDAEAnyDACNativeDatabaseAccess read GetNativeObject;
+  end;
+
+  { TDAEAnyDACStoredProcedureNative }
+  TDAEAnyDACStoredProcedureNative = class(TDAEStoredProcedure, IDAMustSetParams)
+  private
+    function GetNativeObject: TDAEAnyDACNativeDatabaseAccess;
+  protected
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+    function CreateNativeObject(aConnection: TDAEConnection): TObject; override;
+    function CreateNativeDatabaseAccess: IDANativeDatabaseAccess; override;
+    // TDAEDataset
+    procedure RefreshParams; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetStoredProcedureName: string; override;
+    procedure SetStoredProcedureName(const Name: string); override;
+    function DoExecute: integer; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function Execute: integer; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // IDAMustSetParams
+    procedure SetParamValues(AParams: TDAParamCollection); override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(AParams: TDAParamCollection); override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  public
+    property NativeObject: TDAEAnyDACNativeDatabaseAccess read GetNativeObject;
+  end;
+
+procedure Register;
+function GetDriverObject: IDADriver; stdcall;
+function AnyDACDriverIdToAnyDACDriverType(Provider: string): TDAAnyDACDriverType;
+
+implementation
+
+uses
+  {$IFDEF FPC} LResources, {$ENDIF}
+  {$IFDEF MSWINDOWS} Windows, {$ENDIF}
+  SysUtils, Variants, FmtBCD,
+  uDADriverManager, uDARes, uDAHelpers, uROBinaryHelpers,
+  uADStanParam, uADStanConst, uADStanFactory, uADGUIxConsoleWait, uADPhysManager,
+    uADPhysODBC, uADPhysOracl, uADPhysMySQL, uADPhysMSSQL, uADPhysMSAcc, uADPhysDB2,
+    uADPhysASA, uADPhysIB, uADPhysADS, uADStanUtil
+{$IFDEF AnyDAC_D11}
+    , uADPhysTDBX
+{$ELSE}
+  {$IFDEF AnyDAC_D6}
+    , uADPhysDbExp
+  {$ENDIF}
+{$ENDIF};
+
+{$IFNDEF FPC}
+  {$R DataAbstract_AnyDACDriver_Glyphs.res}
+{$ENDIF}
+
+{$IFDEF DataAbstract_SchemaModelerOnly}
+  {$INCLUDE ..\DataAbstract_SchemaModelerOnly.inc}
+{$ENDIF DataAbstract_SchemaModelerOnly}
+
+{------------------------------------------------------------------------------}
+{ Generic procedures                                                           }
+{------------------------------------------------------------------------------}
+function AnyDACDriverIdToAnyDACDriverType(Provider: string): TDAAnyDACDriverType;
+var
+  FConnectionIntf: IADPhysConnection;
+  oConMeta: IADPhysConnectionMetadata;
+begin
+  Result := mkUnknown;
+  if Provider = '' then
+    Exit;
+  try
+    with TADConnection.Create(nil) do
+    try
+      ResultConnectionDef.DriverID := Provider;
+      ADPhysManager.CreateConnection(ResultConnectionDef, FConnectionIntf);
+      if FConnectionIntf <> nil then begin
+        FConnectionIntf.CreateMetadata(oConMeta);
+        Result := oConMeta.Kind;
+      end;
+    finally
+      Free;
+    end;
+  except
+    // hide an exception
+  end;
+end;
+
+{------------------------------------------------------------------------------}
+procedure SetADParamValuesFromDA(ADAParams: TDAParamCollection;
+  AADParams: TADParams; ASetType: Boolean);
+var
+  i: integer;
+  oDAPar: TDAParam;
+  oADPar: TADParam;
+begin
+  for i := 0 to AADParams.Count - 1 do begin
+    oADPar := AADParams[i];
+    oDAPar := ADAParams.ParamByName(oADPar.Name);
+    oADPar.ParamType := TParamType(oDAPar.ParamType);
+    if oDAPar.ParamType in [daptInput, daptInputOutput, daptUnknown] then
+      if oDAPar.DataType in [datBlob, datMemo, datWideMemo] then begin
+        if ASetType then
+          if oDAPar.BlobType = dabtUnknown then
+            case oDAPar.DataType of
+            datMemo:     oADPar.DataType := ftMemo;
+            datBlob:     oADPar.DataType := ftBlob;
+            datWideMemo: oADPar.DataType := {$IFDEF AnyDAC_D10} ftWideMemo {$ELSE} ftFmtMemo {$ENDIF};
+            end
+          else
+            oADPar.DataType := BlobTypeMappings[oDAPar.BlobType];
+        if VarIsEmpty(oDAPar.Value) or VarIsNull(oDAPar.Value) then
+          oADPar.Clear
+        else
+          oADPar.AsBlob := VariantBinaryToString(oDAPar.Value);
+      end
+      else begin
+        if ASetType then
+          oADPar.DataType := DATypeToVCLType(oDAPar.DataType);
+        if VarIsEmpty(oDAPar.Value) or VarIsNull(oDAPar.Value) then
+          oADPar.Clear
+        else
+          oADPar.Value := oDAPar.Value;
+      end
+    else
+      if ASetType then begin
+        oADPar.DataType := DATypeToVCLType(oDAPar.DataType);
+        oADPar.Size := oDAPar.Size;
+        oADPar.Precision := oDAPar.DecimalPrecision;
+        oADPar.NumericScale := oDAPar.DecimalScale;
+      end;
+  end;
+end;
+
+{------------------------------------------------------------------------------}
+procedure GetDAParamValuesFromAD(Params: TDAParamCollection; AADParams: TADParams);
+var
+  i: integer;
+  oDAPar: TDAParam;
+  oADPar: TADParam;
+begin
+  if not Assigned(AADParams) then
+    Exit;
+  for i := 0 to AADParams.Count - 1 do begin
+    oADPar := AADParams[i];
+    oDAPar := Params.ParamByName(oADPar.Name);
+    if oDAPar.ParamType in [daptOutput, daptInputOutput, daptResult] then
+      oDAPar.Value := oADPar.Value;
+  end;
+end;
+
+{------------------------------------------------------------------------------}
+function MapAD2DADataType(AADDataType: TADDataType; out ABlobType: TDABlobType): TDADataType;
+begin
+  ABlobType := dabtUnknown;
+  case AADDataType of
+  dtUnknown:       Result := datUnknown;
+  dtBoolean:       Result := datBoolean;
+  dtSByte:         Result := datShortInt;
+  dtInt16:         Result := datSmallInt;
+  dtInt32:         Result := datInteger;
+  dtInt64:         Result := datLargeInt;
+  dtByte:          Result := datByte;
+  dtUInt16:        Result := datWord;
+  dtUInt32:        Result := datCardinal;
+  dtUInt64:        Result := datLargeUInt;
+  dtDouble:        Result := datFloat;
+  dtCurrency:      Result := datFloat;    // Double
+  dtBCD:           Result := datCurrency; // Currency
+  dtFmtBCD:        Result := datDecimal;  // TBcd
+  dtDateTime:      Result := datDateTime;
+  dtTime:          Result := datDateTime;
+  dtDate:          Result := datDateTime;
+  dtDateTimeStamp: Result := datDateTime;
+  dtAnsiString:    Result := datString;
+  dtWideString:    Result := datWideString;
+  dtByteString:    Result := datString;
+  dtBlob:          begin Result := datBlob; ABlobType := dabtBlob; end;
+  dtMemo:          begin Result := datMemo; ABlobType := dabtMemo; end;
+  dtWideMemo:      begin Result := datWideMemo; ABlobType := dabtMemo; end;
+  dtHBlob:         begin Result := datBlob; ABlobType := dabtOraBlob; end;
+  dtHMemo:         begin Result := datMemo; ABlobType := dabtOraClob; end;
+  dtWideHMemo:     begin Result := datWideMemo; ABlobType := dabtOraClob; end;
+  dtHBFile:        begin Result := datBlob; ABlobType := dabtOraBlob; end;
+  dtGUID:          Result := datGuid;
+  else             raise Exception.CreateFmt('AnyDAC data type [%s] is not supported by DataAbstract',
+                                             [C_AD_DataTypeNames[AADDataType]]);
+  end;
+end;
+
+{------------------------------------------------------------------------------}
+{ TDAEAnyDACDriver                                                             }
+{------------------------------------------------------------------------------}
+function TDAEAnyDACDriver.GetAvailableDriverOptions: TDAAvailableDriverOptions;
+begin
+  result := [doAuxDriver, doServerName, doDatabaseName, doLogin, doCustom];
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACDriver.GetConnectionClass: TDAEConnectionClass;
+begin
+  result := TDAEAnyDACConnection;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACDriver.GetDriverID: string;
+begin
+  result := 'AnyDAC';
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACDriver.GetDescription: string;
+begin
+  result := 'RemObjects AnyDAC v ' + C_AD_Version + ' Driver'
+    {$IFDEF DataAbstract_SchemaModelerOnly} + SchemaModelerOnly{$ENDIF};
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACDriver.GetMajVersion: byte;
+begin
+  Result := C_DriverMajVer;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACDriver.GetMinVersion: byte;
+begin
+  Result := C_DriverMinVer; 
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACDriver.GetAuxDrivers(out List: IROStrings);
+begin
+  List := NewROStrings;
+  ADManager.GetDriverNames(List.Strings);
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACDriver.GetProviderDefaultCustomParameters(Provider: string): string;
+begin
+  Result := '';
+  case AnyDACDriverIdToAnyDACDriverType(Provider) of
+    mkOracle:    Result := S_AD_ConnParam_Common_OSAuthent + '=No;';
+    mkMSSQL:     Result := 'Schemas=1;Integrated Security=SSPI;';
+    mkMySQL:     Result := MYSQL_GetDefaultCustomParameters;
+    mkInterbase: Result := S_AD_ConnParam_IB_Protocol + '=TCPIP;';
+  end;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACDriver.GetDefaultConnectionType(const AuxDriver: string): string;
+begin
+  case AnyDACDriverIdToAnyDACDriverType(AuxDriver) of
+    mkOracle:    Result := Oracle_DriverType;
+    mkMSSQL:     Result := MSSQL_DriverType;
+    mkMSAccess:  Result := Access_DriverType;
+    mkMySQL:     Result := MySQL_DriverType;
+    mkDB2:       Result := DB2_DriverType;
+    mkASA:       Result := ASA_DriverType;
+    mkInterbase: Result := IB_DriverType;
+  else
+    Result := inherited GetDefaultConnectionType(AuxDriver);
+  end;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACDriver.GetAuxParams(const AuxDriver: string;
+  out List: IROStrings);
+const
+  C_Line: String = '-----------------------------';
+begin
+  inherited;
+
+  List.Add('AnyDAC Driver parameters');
+  List.Add(C_Line);
+  case AnyDACDriverIdToAnyDACDriverType(AuxDriver) of
+    mkOracle:
+      ;
+    mkMSSQL:
+      MSSQL_GetAuxParams(List);
+    mkMSAccess:
+      ;
+    mkMySQL:
+      MYSQL_GetAuxParams(List);
+    mkDB2:
+      ;
+    mkASA:
+      ;
+    mkInterbase:
+      begin
+        AddIBAuxParams(List);
+        List.Add('DataTypeSchema=<FIB>');
+      end;
+  end;
+  List.Add('ConnectionDefName=<string>');
+  List.Add('BiDirectionalDataSets=0,1');
+  List.Add('DirectMode=0,1');
+  List.Add('');
+
+  case AnyDACDriverIdToAnyDACDriverType(AuxDriver) of
+    mkOracle:
+      begin
+        List.Add('Oracle AuxDriver parameters');
+        List.Add(C_Line);
+        List.Add('You can pass any parameters directly to aux driver. Use the prefix ''@'' for this, e.g.:');
+        List.Add('@SQLTrace=True;@Pooled=True');
+        List.Add('');
+        List.Add('Detailed description of aux driver parameters you can find at:');
+        List.Add('http://wiki.remobjects.com/wiki/Connect_to_Oracle_Server_(AnyDAC)');
+      end;
+    mkMSSQL:
+      begin
+        List.Add('MSSQL AuxDriver parameters');
+        List.Add(C_Line);
+        List.Add('');
+        List.Add('You can pass any parameters directly to aux driver. Use the prefix ''@'' for this, e.g.:');
+        List.Add('@App=My DA Server;@Pooled=True');
+        List.Add('');
+        List.Add('Detailed description of aux driver parameters you can find at:');
+        List.Add('http://wiki.remobjects.com/wiki/Connect_to_Microsoft_SQL_Server_(AnyDAC)');
+      end;
+    mkMSAccess:
+      begin
+        List.Add('MSAccess AuxDriver parameters');
+        List.Add(C_Line);
+        List.Add('You can pass any parameters directly to aux driver. Use the prefix ''@'' for this, e.g.:');
+        List.Add('@ReadOnly=True;@Pooled=True');
+        List.Add('');
+        List.Add('Detailed description of aux driver parameters you can find at:');
+        List.Add('http://wiki.remobjects.com/wiki/Connect_to_MS_Access_database_(AnyDAC)');
+      end;
+    mkMySQL:
+      begin
+        List.Add('MySQL AuxDriver parameters');
+        List.Add(C_Line);
+        List.Add('You can pass any parameters directly to aux driver. Use the prefix ''@'' for this, e.g.:');
+        List.Add('@CharacterSet=utf8;@Pooled=True');
+        List.Add('');
+        List.Add('Detailed description of aux driver parameters you can find at:');
+        List.Add('http://wiki.remobjects.com/wiki/Connect_to_MySQL_Server_(AnyDAC)');
+      end;
+    mkDB2:
+      begin
+        List.Add('DB2 AuxDriver parameters');
+        List.Add(C_Line);
+        List.Add('You can pass any parameters directly to aux driver. Use the prefix ''@'' for this, e.g.:');
+        List.Add('@Alias=MyDB;@Pooled=True');
+        List.Add('');
+        List.Add('Detailed description of aux driver parameters you can find at:');
+        List.Add('http://wiki.remobjects.com/wiki/Connect_to_IBM_DB2_Server_(AnyDAC)');
+      end;
+    mkASA:
+      begin
+        List.Add('ASA AuxDriver parameters');
+        List.Add(C_Line);
+        List.Add('You can pass any parameters directly to aux driver. Use the prefix ''@'' for this, e.g.:');
+        List.Add('@ODBCAdvanced=AutoStart=Yes;@DatabaseFile=C:\sybase\addemo_asa10.db;@Pooled=True');
+        List.Add('');
+        List.Add('Detailed description of aux driver parameters you can find at:');
+        List.Add('http://wiki.remobjects.com/wiki/Connect_to_Sybase_SQL_Anywhere_(AnyDAC)');
+      end;
+    mkInterBase:
+      begin
+        List.Add('IB/FB AuxDriver parameters');
+        List.Add(C_Line);
+        List.Add('You can pass any parameters directly to aux driver. Use the prefix ''@'' for this, e.g.:');
+        List.Add('@Protocol=TCPIP;@CharacterSet=win1251;@Pooled=True');
+        List.Add('');
+        List.Add('Detailed description of aux driver parameters you can find at:');
+        List.Add('http://wiki.remobjects.com/wiki/Connect_to_Interbase_or_Firebird_Server_(AnyDAC)');
+      end;
+  end;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACDriver.Initialize;
+begin
+  FConnectionDefs := TStringList.Create;
+  FConnectionDefs.Sorted := True;
+  FConnectionDefIndex := 0;
+  ADManager.Open;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACDriver.Finalize;
+begin
+  ADManager.Close;
+{$IFDEF AnyDAC_MONITOR}
+  FreeAndNil(FMonitor);
+{$ENDIF}
+  ADTerminate;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACDriver.LookupConnectionString(const AConnectionString: String;
+  AParsedParams: TStringList): String;
+var
+  i: Integer;
+begin
+  i := FConnectionDefs.IndexOf(AConnectionString);
+  if i = -1 then begin
+    Inc(FConnectionDefIndex);
+    FConnectionDefs.AddObject(AConnectionString, TObject(FConnectionDefIndex));
+    with ADManager.ConnectionDefs.AddConnectionDef do begin
+      Name := Format('__DACD_%d', [FConnectionDefIndex]);
+      Params.AddStrings(AParsedParams);
+      Result := Name;
+    end;
+  end
+  else
+    Result := Format('__DACD_%d', [Integer(FConnectionDefs.Objects[i])]);
+end;
+
+{------------------------------------------------------------------------------}
+{$IFDEF AnyDAC_MONITOR}
+procedure TDAEAnyDACDriver.DoTrace(ASender: TADMoniClientLinkBase;
+  const AClassName, AObjName, AMessage: String);
+begin
+  if Assigned(FTraceCallback) then
+    FTraceCallback(ASender, AMessage, 0);
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACDriver.DoSetTraceOptions(TraceActive: boolean; TraceOptions: TDATraceOptions; Callback: TDALogTraceEvent);
+var
+  eKinds: TADMoniEventKinds;
+begin
+  inherited;
+  if TraceActive then begin
+    FTraceCallBack := Callback;
+    eKinds := [];
+    if toPrepare in TraceOptions then  eKinds := eKinds + [ekCmdPrepare];
+    if toExecute in TraceOptions then  eKinds := eKinds + [ekCmdExecute];
+    if toFetch in TraceOptions then    eKinds := eKinds + [ekCmdDataIn];
+    if toError in TraceOptions then    eKinds := eKinds + [ekError];
+    // if toStmt in TraceOptions then  eKinds := eKinds + [tfStmt];
+    if toConnect in TraceOptions then  eKinds := eKinds + [ekConnConnect];
+    if toTransact in TraceOptions then eKinds := eKinds + [ekConnTransact];
+    // if toBlob in TraceOptions then  eKinds := eKinds + [tfBlob];
+    if toService in TraceOptions then  eKinds := eKinds + [ekVendor];
+    if toMisc in TraceOptions then     eKinds := eKinds + [ekConnService, ekLiveCycle, ekAdaptUpdate];
+    if toParams in TraceOptions then   eKinds := eKinds + [ekCmdDataIn, ekCmdDataOut];
+    if FMonitor = nil then FMonitor := TADMoniCustomClientLink.Create(Self);
+    FMonitor.Tracing := False;
+    FMonitor.OnOutput := DoTrace;
+    FMonitor.EventKinds := eKinds;
+    FMonitor.Tracing := True;
+  end
+  else begin
+    if FMonitor <> nil then
+      FMonitor.Tracing := False;
+    FTraceCallback := nil;
+  end;
+end;
+{$ENDIF}
+
+{------------------------------------------------------------------------------}
+{ TDAEAnyDACConnection                                                         }
+{------------------------------------------------------------------------------}
+function TDAEAnyDACConnection.QueryInterface(const IID: TGUID; out Obj): HResult;
+begin
+  Result := E_NOINTERFACE;
+  if IsEqualGUID(IID, IDAADOConnection) then begin
+    if fDriverType <> mkMSSQL then Exit;
+  end else if IsEqualGUID(IID, IDAInterbaseConnection) then begin
+    if fDriverType <> mkInterbase then Exit;
+  end else if IsEqualGUID(IID, IDAIBTransactionAccess) then begin
+    if fDriverType <> mkInterbase then Exit;
+  end else if IsEqualGUID(IID, IDAIBConnectionProperties) then begin
+    if fDriverType <> mkInterbase then Exit;
+  end else if IsEqualGUID(IID, IDAOracleConnection) then begin
+    if fDriverType <> mkOracle then Exit;
+  end else if IsEqualGUID(IID, IDADB2Connection) then begin
+    if fDriverType <> mkDB2 then Exit;
+  end else if IsEqualGUID(IID, IDASybaseConnection) then begin
+    if not (fDriverType in [mkASA, mkADS]) then Exit;
+  end else if IsEqualGUID(IID, IDAMySQLConnection) then begin
+    if fDriverType <> mkMySQL then Exit;
+  end else if IsEqualGUID(IID, IDACanQueryDatabaseNames) then begin
+    if (fDriverType in [mkInterBase, mkMSAccess]) then Exit;
+  end else if IsEqualGUID(IID, IDAFileBasedDatabase) then begin
+    if not (fDriverType in [mkInterBase,mkMSAccess]) then Exit;
+  end else if IsEqualGUID(IID, IDAUseGenerators) then begin
+    if not (fDriverType in [mkInterBase, mkOracle]) then Exit;
+  end else if IsEqualGUID(IID, IDACanQueryGeneratorsNames) then begin
+    if not (fDriverType in [mkInterBase]) then Exit;
+  end
+  //  else if IsEqualGUID(IID, IDAConnectionModelling) then
+  ;
+  Result := inherited QueryInterface(IID, Obj);
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACConnection.GetDatasetClass: TDAEDatasetClass;
+begin
+  if FDirectMode then
+    result := TDAEAnyDACQueryNative
+  else
+    result := TDAEAnyDACQuery;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACConnection.GetStoredProcedureClass: TDAEStoredProcedureClass;
+begin
+  if FDirectMode then
+    result := TDAEAnyDACStoredProcedureNative
+  else
+    result := TDAEAnyDACStoredProcedure;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACConnection.CreateCustomConnection: TCustomConnection;
+begin
+  fDriverType := mkUnknown;
+  FADConnection := TADConnection.Create(nil);
+  with FADConnection do begin
+    LoginPrompt := False;
+    FetchOptions.Mode := fmAll;
+    FetchOptions.RowsetSize := 100;
+    ResourceOptions.SilentMode := True;
+    ResourceOptions.UnifyParamNames := True;
+  end;
+  result := FADConnection;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACConnection.GetAnyDACPhysConnection: IADPhysConnection;
+begin
+  Result := FADConnection.ConnectionIntf;
+  if Result = nil then
+    ADPhysManager.CreateConnection(FADConnection.ConnectionDefName, Result);
+end;
+
+{------------------------------------------------------------------------------}
+
+{
+Database=                 S_AD_ConnParam_Common_Database
+User_Name=                S_AD_ConnParam_Common_UserName
+Password=                 S_AD_ConnParam_Common_Password
+
+Oracle
+======
+OSAuthent=                S_AD_ConnParam_Common_OSAuthent
+DriverID=Ora
+
+MSAccess
+========
+SystemDB=                 S_AD_ConnParam_MSAcc_SysDB
+DriverID=MSAcc
+
+DB2
+===
+Alias=                    S_AD_ConnParam_DB2_Alias
+Server=                   S_AD_ConnParam_Common_Server
+Port=                     S_AD_ConnParam_Common_Port
+Protocol=                 S_AD_ConnParam_DB2_Protocol
+DriverID=DB2
+
+ASA
+===
+Server=                   S_AD_ConnParam_Common_Server
+DatabaseFile=             S_AD_ConnParam_ASA_DatabaseFile
+OSAuthent=                S_AD_ConnParam_Common_OSAuthent
+App=                      S_AD_ConnParam_ASA_App
+Compress=                 S_AD_ConnParam_ASA_Compress
+Encrypt=                  S_AD_ConnParam_ASA_Encrypt
+DriverID=ASA
+
+ADS
+===
+DefaultType=
+ServerTypes=
+DriverID=ADS
+
+MSSQL
+=====
+Server=                   S_AD_ConnParam_Common_Server
+Network=                  S_AD_ConnParam_MSSQL_Network
+Address=                  S_AD_ConnParam_MSSQL_Address
+OSAuthent=                S_AD_ConnParam_Common_OSAuthent
+Workstation=              S_AD_ConnParam_MSSQL_Workstation
+App=                      S_AD_ConnParam_MSSQL_App
+Encrypt=                  S_AD_ConnParam_MSSQL_Encrypt
+Language=                 S_AD_ConnParam_MSSQL_Language
+DriverID=MSSQL
+
+MySQL
+=====
+CharacterSet=             S_AD_ConnParam_Common_CharacterSet
+Server=                   S_AD_ConnParam_Common_Server
+Port=                     S_AD_ConnParam_Common_Port
+DriverID=MySQL
+
+IB
+==
+Protocol=                 S_AD_ConnParam_IB_Protocol
+Server=                   S_AD_ConnParam_Common_Server
+InstanceName=             S_AD_ConnParam_IB_InstanceName
+CharacterSet=             S_AD_ConnParam_Common_CharacterSet
+RoleName=                 S_AD_ConnParam_IB_RoleName
+SQLDialect=               S_AD_ConnParam_IB_SQLDialect
+DriverID=IB
+
+Other
+=====
+ODBCDriver=
+DataSource=
+RDBMS=
+ODBCAdvanced=
+DriverID=ODBC
+}
+
+procedure TDAEAnyDACConnection.DoApplyConnectionString(
+  aConnStrParser: TDAConnectionStringParser; aConnectionObject: TCustomConnection);
+var
+  sName, sValue: string;
+  i: integer;
+  oParams: TStringList;
+begin
+  FMySQLVersion := -1;
+  fDriverType := mkUnknown;
+  FDataTypeSchema := '';
+  fMSSQLSchemaEnabled := False;
+  fBiDirectionalDataSets := False;
+  fDirectMode := False;
+
+  inherited DoApplyConnectionString(aConnStrParser, aConnectionObject);
+  oParams := TStringList.Create;
+  try
+    with aConnStrParser do begin
+      oParams.Values[S_AD_ConnParam_Common_DriverID] := AuxDriver;
+      fDriverType := AnyDACDriverIdToAnyDACDriverType(AuxDriver);
+
+      if (Self.UserID <> '') then
+        oParams.Values[S_AD_ConnParam_Common_UserName] := Self.UserID
+      else if (UserID <> '') then
+        oParams.Values[S_AD_ConnParam_Common_UserName] := UserID;
+
+      if (Self.Password <> '') then
+        oParams.Values[S_AD_ConnParam_Common_Password] := Self.Password
+      else if (Password <> '') then
+        oParams.Values[S_AD_ConnParam_Common_Password] := Password;
+
+      if Database <> '' then
+        oParams.Values[S_AD_ConnParam_Common_Database] := Database;
+       FDataBaseName := DataBase;
+
+      if Server <> '' then
+        oParams.Values[S_AD_ConnParam_Common_Server] := Server;
+
+      for i := 0 to AuxParamsCount - 1 do begin
+        sName := AuxParamNames[i];
+        if sName = '' then Continue;
+        sValue := AuxParams[AuxParamNames[i]];
+        if SameText(sName, 'Schemas') then begin
+          fMSSQLSchemaEnabled := sValue = '1';
+          Continue;
+        end
+        else if SameText(sName, 'Dialect') then begin
+          if fDriverType = mkInterBase then
+            sName := S_AD_ConnParam_IB_SQLDialect;
+        end
+        else if SameText(sName, 'Role') then begin
+          if fDriverType = mkInterBase then
+            sName := S_AD_ConnParam_IB_RoleName;
+        end
+        else if SameText(sName, 'Charset') then begin
+          if fDriverType = mkInterBase then
+            sName := S_AD_ConnParam_Common_CharacterSet;
+        end
+        else if SameText(sName, 'Port') then begin
+          if StrToIntDef(sValue, -1) <> -1 then
+            sName := S_AD_ConnParam_Common_Port;
+        end
+        else if SameText(sName, 'ConnectionDefName') then
+          sName := S_AD_DefinitionParam_Common_ConnectionDef
+        else if SameText(sName, 'DataTypeSchema') then begin
+          if fDriverType = mkInterBase then
+            FDataTypeSchema := UpperCase(sValue);
+        end
+        else if SameText(sName, 'Integrated Security') then begin
+          if (fDriverType = mkMSSQL) and (sValue = 'SSPI') then begin
+            sName := S_AD_ConnParam_Common_OSAuthent;
+            sValue := 'Yes';
+          end
+          else
+            Continue;
+        end
+        else if SameText(sName, 'BiDirectionalDataSets') then begin
+          fBiDirectionalDataSets := sValue = '1';
+          Continue;
+        end
+        else if SameText(sName, 'DirectMode') then begin
+          fDirectMode := sValue = '1';
+          Continue;
+        end
+        else
+          if sName[1] = '@' then
+            sName := Pchar(sName) + 1;
+        oParams.Values[sName] := sValue;
+      end;
+    end;
+
+    FADConnection.ConnectionDefName :=
+      TDAEAnyDACDriver(Driver).LookupConnectionString(GetConnectionString, oParams);
+
+    if FDataTypeSchema = 'FIB' then
+      MapAsFIB;
+  finally
+    oParams.Free;
+  end;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACConnection.MapAsFIB;
+begin
+  with FADConnection.FormatOptions do begin
+    OwnMapRules := True;
+    MapRules.Clear;
+    with MapRules.Add do begin
+      SourceDataType := dtFmtBCD;
+      TargetDataType := dtDouble;
+    end;
+    with MapRules.Add do begin
+      SourceDataType := dtCurrency;
+      TargetDataType := dtDouble;
+    end;
+    with MapRules.Add do begin
+      SourceDataType := dtBCD;
+      TargetDataType := dtBCD;
+    end;
+    with MapRules.Add do begin
+      SourceDataType := dtInt64;
+      TargetDataType := dtBCD;
+    end;
+  end;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACConnection.DoBeginTransaction: integer;
+begin
+  Result := 0;
+  FADConnection.StartTransaction;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACConnection.DoCommitTransaction;
+begin
+  FADConnection.Commit;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACConnection.DoRollbackTransaction;
+begin
+  FADConnection.Rollback;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACConnection.DoGetInTransaction: boolean;
+begin
+  result := FADConnection.InTransaction;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACConnection.Native_DoGetLastAutoInc(const GeneratorName: string): integer;
+var
+  v: Variant;
+begin
+  v := FADConnection.GetLastAutoGenValue(GeneratorName);
+  if VarIsNull(v) then
+    Result := -1
+  else
+    Result := v;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACConnection.DoGetLastAutoInc(const GeneratorName: string): integer;
+begin
+  case fDriverType of
+    mkOracle:    Result := Oracle_DoGetLastAutoInc(GeneratorName, GetDatasetClass.Create(Self));
+    mkMSSQL:     Result := MSSQL_DoGetLastAutoInc(GeneratorName, GetDatasetClass.Create(Self));
+    mkMySQL:     Result := MySQL_GetLastAutoInc(GeneratorName, GetDatasetClass.Create(Self));
+    mkInterBase: Result := IB_GetLastAutoInc(GeneratorName, GetDatasetClass.Create(Self));
+  else
+    Result := Native_DoGetLastAutoInc(GeneratorName);
+  end;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACConnection.DoGetStoredProcedureNames(out List: IROStrings);
+begin
+  inherited;
+  case fDriverType of
+    mkOracle:    Oracle_DoGetNames(GetDatasetClass.Create(Self), List, dotProcedure);
+    mkMSSQL:     MSSQL_DoGetNames(GetDatasetClass.Create(Self), List, dotProcedure, fMSSQLSchemaEnabled);
+    mkMySQL:     MYSQL_DoGetNames(GetDatasetClass.Create(Self), List, dotProcedure, GetDataBaseName,GetMySQLVersion);
+    mkInterbase: IB_GetObjectNames(GetDatasetClass.Create(Self), List, dotProcedure);
+  else
+    DoGetNames(List, dotProcedure);
+  end
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACConnection.DoGetViewNames(out List: IROStrings);
+begin
+  inherited;
+  case fDriverType of
+    mkOracle:    Oracle_DoGetNames(GetDatasetClass.Create(Self), List, dotView);
+    mkMSSQL:     MSSQL_DoGetNames(GetDatasetClass.Create(Self), List, dotView, fMSSQLSchemaEnabled);
+    mkMySQL:     MYSQL_DoGetNames(GetDatasetClass.Create(Self), List, dotView, GetDataBaseName,GetMySQLVersion);
+    mkInterbase: IB_GetObjectNames(GetDatasetClass.Create(Self), List, dotView);
+  else
+    DoGetNames(List, dotView);
+  end
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACConnection.DoGetTableNames(out List: IROStrings);
+begin
+  inherited;
+  case fDriverType of
+    mkOracle:    Oracle_DoGetNames(GetDatasetClass.Create(Self), List, dotTable);
+    mkMSSQL:     MSSQL_DoGetNames(GetDatasetClass.Create(Self), List, dotTable, fMSSQLSchemaEnabled);
+    mkMySQL:     MYSQL_DoGetNames(GetDatasetClass.Create(Self), List, dotTable, GetDataBaseName,GetMySQLVersion);
+    mkInterbase: IB_GetObjectNames(GetDatasetClass.Create(Self), List, dotTable);
+  else
+    DoGetNames(List, dotTable);
+  end
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACConnection.Native_DoGetTableFields(aTableName: string; out Fields: TDAFieldCollection);
+var
+  oMIQ: TADMetaInfoQuery;
+  eAttrs: TADDataAttributes;
+  eBlobType: TDABlobType;
+  lUseROWIDAsPK: Boolean;
+  oFld: TDAField;
+begin
+  aTableName := QuoteIdentifierIfNeeded(aTableName);
+  Fields := TDAFieldCollection.Create(nil);
+  lUseROWIDAsPK := False;
+  oMIQ := TADMetaInfoQuery.Create(nil);
+  try
+    oMIQ.Connection := FADConnection;
+    oMIQ.ObjectName := aTableName;
+    oMIQ.MetaInfoKind := mkTableFields;
+    oMIQ.Open;
+    while not oMIQ.Eof do begin
+      with Fields.Add do begin
+        Name := oMIQ.FieldByName('COLUMN_NAME').AsString;
+        Size := oMIQ.FieldByName('COLUMN_LENGTH').AsInteger;
+        eAttrs := TADDataAttributes({$IFDEF FPC}ord{$ELSE}Word{$ENDIF}(oMIQ.FieldByName('COLUMN_ATTRIBUTES').AsInteger));
+        DataType := MapAD2DADataType(TADDataType(oMIQ.FieldByName('COLUMN_DATATYPE').AsInteger), eBlobType);
+        if eBlobType <> dabtUnknown then
+          BlobType := eBlobType;
+        if (DataType = datInteger) and (caAutoInc in eAttrs) then
+          DataType := datAutoInc;
+        Required := not (caAllowNull in eAttrs);
+        ReadOnly := caReadOnly in eAttrs;
+        if caROWID in eAttrs then begin
+          InPrimaryKey := True;
+          lUseROWIDAsPK := True;
+        end;
+        // DefaultValue
+        // ServerAutoRefresh
+      end;
+      oMIQ.Next;
+    end;
+
+    if not lUseROWIDAsPK then begin
+      oMIQ.Close;
+      oMIQ.BaseObjectName := oMIQ.ObjectName;
+      oMIQ.ObjectName := '';
+      oMIQ.MetaInfoKind := mkPrimaryKeyFields;
+      oMIQ.Open;
+      while not oMIQ.Eof do begin
+        oFld := Fields.FindField(oMIQ.FieldByName('COLUMN_NAME').AsString);
+        if oFld <> nil then
+          oFld.InPrimaryKey := True;
+        oMIQ.Next;
+      end;
+    end;
+
+  finally
+    oMIQ.Free;
+  end;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACConnection.Native_DoGetForeignKeys(ForeignKeys: TDADriverForeignKeyCollection);
+var
+  oTabs, oFKeys, oFKeyFields: TADMetaInfoQuery;
+  sFKFields, sPKFields: String;
+  oConnMeta: IADPhysConnectionMetadata;
+
+  function QuoteName(const AName: String): String;
+  begin
+    if AName = '' then
+      Result := ''
+    else
+      Result := oConnMeta.NameQuotaChar1 + AName + oConnMeta.NameQuotaChar2;
+  end;
+
+begin
+  GetAnyDACPhysConnection.CreateMetadata(oConnMeta);
+  ForeignKeys := TDADriverForeignKeyCollection.Create(nil);
+  oTabs := TADMetaInfoQuery.Create(nil);
+  oFKeys := TADMetaInfoQuery.Create(nil);
+  oFKeyFields := TADMetaInfoQuery.Create(nil);
+  try
+    oTabs.Connection := FADConnection;
+    oTabs.MetaInfoKind := mkTables;
+    oTabs.TableKinds := [tkTable, tkTempTable, tkLocalTable];
+    oFKeys.MetaInfoKind := mkForeignKeys;
+    oFKeys.Connection := FADConnection;
+    oFKeys.MetaInfoKind := mkForeignKeys;
+    oFKeyFields.Connection := FADConnection;
+    oFKeyFields.MetaInfoKind := mkForeignKeyFields;
+    oTabs.Open;
+    while not oTabs.Eof do begin
+      oFKeys.Close;
+      oFKeys.CatalogName := QuoteName(oTabs.Fields[1].AsString);
+      oFKeys.SchemaName := QuoteName(oTabs.Fields[2].AsString);
+      oFKeys.ObjectName := QuoteName(oTabs.Fields[3].AsString);
+      oFKeys.Open;
+      while not oFKeys.Eof do begin
+        oFKeyFields.Close;
+        oFKeyFields.CatalogName := QuoteName(oFKeys.Fields[1].AsString);
+        oFKeyFields.SchemaName := QuoteName(oFKeys.Fields[2].AsString);
+        oFKeyFields.BaseObjectName := QuoteName(oFKeys.Fields[3].AsString);
+        oFKeyFields.ObjectName := QuoteName(oFKeys.Fields[4].AsString);
+        oFKeyFields.Open;
+        sPKFields := '';
+        sFKFields := '';
+        while not oFKeyFields.Eof do begin
+          if sPKFields <> '' then
+            sPKFields := sPKFields + ',';
+          sPKFields := sPKFields + oFKeyFields.Fields[6].AsString;
+          if sFKFields <> '' then
+            sFKFields := sFKFields + ',';
+          sFKFields := sFKFields + oFKeyFields.Fields[5].AsString;
+          oFKeyFields.Next;
+        end;
+        with ForeignKeys.Add do begin
+          PKTable := FADConnection.EncodeObjectName(oFKeys.Fields[5].AsString,
+            oFKeys.Fields[6].AsString, '', oFKeys.Fields[7].AsString);
+          PKField := sPKFields;
+          FKTable := FADConnection.EncodeObjectName(oFKeys.Fields[1].AsString,
+            oFKeys.Fields[2].AsString, '', oFKeys.Fields[3].AsString);
+          FKField := sFKFields;
+        end;
+        oFKeys.Next;
+      end;
+      oTabs.Next;
+    end;
+  finally
+    oTabs.Free;
+    oFKeys.Free;
+    oFKeyFields.Free;
+  end;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACConnection.DoGetNames(AList: IROStrings; AObjectType: TDAObjecttype);
+begin
+  case AObjectType of
+    dotTable:     FADConnection.GetTableNames('', '', '', AList.Strings, [osMy], [tkTable]);
+    dotProcedure: FADConnection.GetStoredProcNames('', '', '', '', AList.Strings, [osMy]);
+    dotView:      FADConnection.GetTableNames('', '', '', AList.Strings, [osMy], [tkView]);
+  end;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACConnection.DoGetTableFields(const aTableName: string;
+  out Fields: TDAFieldCollection);
+begin
+  case fDriverType of
+    mkOracle:    Oracle_DoGetTableFields(QuoteIdentifierIfNeeded(aTableName), GetDatasetClass.Create(Self), Fields);
+    mkMSSQL:     MSSQL_DoGetTableFields(QuoteIdentifierIfNeeded(aTableName), GetDatasetClass.Create(Self), Fields);
+    mkMySQL:     MYSQL_DoGetTableFields(QuoteIdentifierIfNeeded(aTableName),GetDatasetClass.Create(Self),Fields, GetDataBaseName,GetMySQLVersion);
+    mkInterBase: IB_GetTableFields(QuoteIdentifierIfNeeded(aTableName), GetDatasetClass.Create(Self), Fields);
+  else
+    Native_DoGetTableFields(aTableName,Fields);
+  end;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACConnection.DoGetStoredProcedureParams(
+  const aStoredProcedureName: string; out Params: TDAParamCollection);
+begin
+  case fDriverType of
+    mkMySQL:  MYSQL_DoGetStoredProcedureParams(aStoredProcedureName, GetDatasetClass.Create(Self), Params, GetDataBaseName);
+    mkOracle: Oracle_DoGetStoredProcedureParams(aStoredProcedureName, GetDatasetClass.Create(Self), Params);
+    mkMSSQL:  MSSQL_DoGetStoredProcedureParams(aStoredProcedureName, GetDatasetClass.Create(Self), Params);
+  else
+    inherited;
+  end;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACConnection.DoGetForeignKeys(
+  out ForeignKeys: TDADriverForeignKeyCollection);
+begin
+  inherited;
+  case fDriverType of
+    mkOracle:    Oracle_DoGetForeignKeys(GetDatasetClass.Create(Self), ForeignKeys);
+    mkMSSQL:     MSSQL_DoGetForeignKeys(GetDatasetClass.Create(Self), ForeignKeys, fMSSQLSchemaEnabled);
+    mkMySQL:     MYSQL_DoGetForeignKeys(GetDatasetClass.Create(Self), ForeignKeys, GetDataBaseName,GetMySQLVersion);
+    mkInterBase: IB_DoGetForeignKeys(GetDatasetClass.Create(Self), ForeignKeys);
+  else
+    Native_DoGetForeignKeys(ForeignKeys);
+  end;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACConnection.CreateMacroProcessor: TDASQLMacroProcessor;
+begin
+  case fDriverType of
+    mkOracle:           Result := Oracle_CreateMacroProcessor;
+    mkMSSQL,mkMSAccess: Result := MSSQL_CreateMacroProcessor;
+    mkInterBase:        Result := IB_CreateMacroProcessor;
+  else
+    Result := inherited CreateMacroProcessor;
+  end;
+end;
+
+{------------------------------------------------------------------------------}
+// IDAConnection
+
+function TDAEAnyDACConnection.GetSPSelectSyntax(AHasArguments: Boolean): string;
+begin
+  case fDriverType of
+    mkOracle:    Result := Oracle_GetSPSelectSyntax(AHasArguments);
+    mkMSSQL:     Result := MSSQL_GetSPSelectSyntax(AHasArguments);
+    mkInterBase: Result := IB_GetSPSelectSyntax(AHasArguments);
+  else
+    Result := inherited GetSPSelectSyntax(AHasArguments);
+  end;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACConnection.Native_GetQuoteChars: TDAQuoteCharArray;
+var
+  oConnMeta: IADPhysConnectionMetadata;
+begin
+  GetAnyDACPhysConnection.CreateMetadata(oConnMeta);
+  result[0] := oConnMeta.NameQuotaChar1;
+  result[1] := oConnMeta.NameQuotaChar2;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACConnection.GetQuoteChars: TDAQuoteCharArray;
+begin
+  case fDriverType of
+    mkMSSQL:  Result := MSSQL_GetQuoteChars;
+    mkOracle: Result := Oracle_GetQuoteChars;
+  else
+    Result := Native_GetQuoteChars;
+  end;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACConnection.IdentifierNeedsQuoting(const AIdentifier: string): boolean;
+begin
+  Result := inherited IdentifierNeedsQuoting(AIdentifier);
+  if not Result then
+    case fDriverType of
+      mkORACLE:    Result := Oracle_IdentifierNeedsQuoting(AIdentifier);
+      mkMSSQL:     Result := MSSQL_IdentifierNeedsQuoting(AIdentifier);
+      mkMySQL:     Result := MYSQL_IdentifierNeedsQuoting(AIdentifier);
+      mkInterBase: Result := IB_IdentifierNeedsQuoting(AIdentifier, GetSQLDialect);
+      mkDB2:       Result := DB2_IdentifierNeedsQuoting(AIdentifier);
+      mkASA,mkADS: Result := Sybase_IdentifierNeedsQuoting(AIdentifier);
+    else
+    end;
+end;
+
+{------------------------------------------------------------------------------}
+// IDAADOConnection
+
+function TDAEAnyDACConnection.GetCommandTimeout: Integer;
+begin
+  Result := Integer(FADConnection.ResourceOptions.CmdExecTimeout);
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACConnection.SetCommandTimeout(const Value: Integer);
+begin
+  FADConnection.ResourceOptions.CmdExecTimeout := Value;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACConnection.GetProviderName: string;
+begin
+  Result := FADConnection.ResultConnectionDef.DriverID;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACConnection.GetProviderType: TDAOleDBProviderType;
+var
+  s: String;
+begin
+  s := GetProviderName;
+  if SameText(s, S_AD_MSSQLId) then
+    Result := oledb_MSSQL
+  else if SameText(s, S_AD_MSAccId) then
+    Result := oledb_Jet
+  else if SameText(s, S_AD_OraId) then
+    Result := oledb_Oracle
+  else if SameText(s, S_AD_ODBCId) then
+    Result := oledb_ODBC
+  else
+    Result := oledb_Unknown;
+  // oledb_MSSQL2005
+  // oledb_Postgresql
+  // oleDb_VisualFoxPro
+end;
+
+{------------------------------------------------------------------------------}
+// IDAIBTransactionAccess
+
+function TDAEAnyDACConnection.GetTransaction: TObject;
+begin
+  Result := FADConnection.Transaction;
+end;
+
+{------------------------------------------------------------------------------}
+// IDAIBConnectionProperties
+
+function TDAEAnyDACConnection.GetSQLDialect: integer;
+begin
+  Result := StrToIntDef(FADConnection.Params.Values[S_AD_ConnParam_IB_SQLDialect],3);
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACConnection.SetSQLDialect(Value: integer);
+begin
+  FADConnection.Params.Values[S_AD_ConnParam_IB_SQLDialect] := IntToStr(Value);
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACConnection.GetCharset: string;
+begin
+  Result := FADConnection.Params.Values[S_AD_ConnParam_Common_CharacterSet];
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACConnection.SetCharset(const Value: string);
+begin
+  FADConnection.Params.Values[S_AD_ConnParam_Common_CharacterSet] := Value;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACConnection.GetRole: string;
+begin
+  Result := FADConnection.Params.Values[S_AD_ConnParam_IB_RoleName];
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACConnection.SetRole(const Value: string);
+begin
+  FADConnection.Params.Values[S_AD_ConnParam_IB_RoleName] := Value;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACConnection.Commit;
+begin
+  Self.DoCommitTransaction;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACConnection.Rollback;
+begin
+  Self.DoRollbackTransaction;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACConnection.CommitRetaining;
+begin
+  FADConnection.CommitRetaining;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACConnection.RollbackRetaining;
+begin
+  FADConnection.RollbackRetaining;
+end;
+
+{------------------------------------------------------------------------------}
+// IDAConnectionModelling
+
+function TDAEAnyDACConnection.FieldToDeclaration(aField: TDAField): string;
+begin
+  Result := '';
+  case fDriverType of
+  mkMSSQL:
+    case aField.DataType of
+    datString:       result := Format('varchar(%d)', [aField.Size]);
+    datDateTime:     result := 'datetime';
+    datFloat:        result := 'float';
+    datCurrency:     result := 'money';
+    datAutoInc:      result := 'int IDENTITY(1,1)';
+    datInteger:      result := 'int';
+    datLargeInt:     result := 'bigint';
+    datBoolean:      result := 'bit';
+    datMemo:         result := 'text';
+    datBlob:         result := 'image';
+    datWideString:   result := Format('nvarchar(%d)', [aField.Size]);
+    datWideMemo:     result := 'ntext';
+    datLargeAutoInc: result := 'bigint IDENTITY(1,1)';
+    datByte:         result := 'smallint';
+    datShortInt:     result := 'smallint';
+    datWord:         result := 'int';
+    datSmallInt:     result := 'smallint';
+    datCardinal:     result := 'bigint';
+    datLargeUInt:    result := 'bigint';
+    datGuid:         result := 'uniqueidentifier';
+    datXml:          result := 'ntext';
+    datDecimal:      result := 'decimal';
+    datSingleFloat:  result := 'real';
+    end;
+
+  mkOracle:
+    case aField.DataType of
+    datString:       result := Format('varchar2(%d)', [aField.Size]);
+    datDateTime:     result := 'date';
+    datFloat:        result := 'float';
+    datCurrency:     result := 'number(19,4)';
+    datAutoInc:      result := 'number(10,0)';
+    datInteger:      result := 'number(10,0)';
+    datLargeInt:     result := 'number(19,0)';
+    datBoolean:      result := 'number(1)';
+    datMemo,
+    datBlob:
+      case aField.BlobType of
+      dabtBlob:      result := 'long raw';
+      dabtMemo:      result := 'long';
+      dabtOraBlob:   result := 'blob';
+      dabtOraClob:   result := 'clob';
+      else           if aField.DataType = datMemo then result := 'long' else result := 'long raw';
+      end;
+    datWideString:   result := Format('nvarchar2(%d)', [aField.Size]);
+    datWideMemo:     result := 'nclob';
+    datLargeAutoInc: result := 'number(19,0)';
+    datByte:         result := 'number(3,0)';
+    datShortInt:     result := 'number(3,0)';
+    datWord:         result := 'number(5,0)';
+    datSmallInt:     result := 'number(5,0)';
+    datCardinal:     result := 'number(10,0)';
+    datLargeUInt:    result := 'number(19,0)';
+    datGuid:         result := 'varchar2(38)';
+    datXml:          result := 'XMLType';
+    datDecimal:      result := 'number';
+    datSingleFloat:  result := 'float';
+    end;
+
+  mkMySQL:
+    case aField.DataType of
+    datString:       result := Format('varchar(%d)', [aField.Size]);
+    datDateTime:     result := 'datetime';
+    datFloat:        result := 'double';
+    datCurrency:     result := 'decimal(19,4)';
+    datAutoInc:      result := 'int auto_increment';
+    datInteger:      result := 'int';
+    datLargeInt:     result := 'bigint';
+    datBoolean:      result := 'bool';
+    datMemo:         result := 'longtext';
+    datBlob:         result := 'longblob';
+    datWideString:   result := Format('varchar(%d) character set utf8', [aField.Size]);
+    datWideMemo:     result := 'longtext character set utf8';
+    datLargeAutoInc: result := 'bigint auto_increment';
+    datByte:         result := 'tinyint unsigned';
+    datShortInt:     result := 'tinyint';
+    datWord:         result := 'smallint unsigned';
+    datSmallInt:     result := 'smallint';
+    datCardinal:     result := 'int unsigned';
+    datLargeUInt:    result := 'bigint unsigned';
+    datGuid:         result := 'varchar(38)';
+    datXml:          result := 'longtext';
+    datDecimal:      result := 'decimal';
+    datSingleFloat:  result := 'float';
+    end;
+
+  mkMSAccess:
+    case aField.DataType of
+    datString:       result := Format('varchar(%d)', [aField.Size]);
+    datDateTime:     result := 'datetime';
+    datFloat:        result := 'float';
+    datCurrency:     result := 'currency';
+    datAutoInc:      result := 'IDENTITY(1,1)';
+    datInteger:      result := 'integer';
+    datLargeInt:     result := 'decimal(19,0)';
+    datBoolean:      result := 'boolean';
+    datMemo:         result := 'memo';
+    datBlob:         result := 'image';
+    datWideString:   result := Format('nchar(%d)', [aField.Size]);
+    datWideMemo:     result := 'ntext';
+    datLargeAutoInc: result := 'IDENTITY(1,1)';
+    datByte:         result := 'byte';
+    datShortInt:     result := 'tinyint';
+    datWord:         result := 'smallint';
+    datSmallInt:     result := 'smallint';
+    datCardinal:     result := 'integer';
+    datLargeUInt:    result := 'decimal(19,0)';
+    datGuid:         result := 'varchar(38)';
+    datXml:          result := 'ntext';
+    datDecimal:      result := 'decimal';
+    datSingleFloat:  result := 'real';
+    end;
+
+  mkDB2:
+    case aField.DataType of
+    datString:       result := Format('varchar(%d)', [aField.Size]);
+    datDateTime:     result := 'timestamp';
+    datFloat:        result := 'real';
+    datCurrency:     result := 'decimal(19,4)';
+    datAutoInc:      result := 'integer not null generated always as identity (start with 1, increment by 1, no cache)';
+    datInteger:      result := 'integer';
+    datLargeInt:     result := 'bigint'; // >= 9.1
+    datBoolean:      result := 'smallint';
+    datMemo,
+    datBlob:
+      case aField.BlobType of
+      dabtBlob:      result := 'long varchar for bit data';
+      dabtMemo:      result := 'long varchar ';
+      dabtOraBlob:   result := 'blob';
+      dabtOraClob:   result := 'clob';
+      else           if aField.DataType = datMemo then result := 'long varchar' else result := 'long varchar for bit data';
+      end;
+    datWideString:   result := Format('vargraphic(%d)', [aField.Size]);
+    datWideMemo:     result := 'clob';
+    datLargeAutoInc: result := 'bigint not null generated always as identity (start with 1, increment by 1, no cache)'; // >= 9.1
+    datByte:         result := 'smallint';
+    datShortInt:     result := 'smallint';
+    datWord:         result := 'smallint';
+    datSmallInt:     result := 'smallint';
+    datCardinal:     result := 'integer';
+    datLargeUInt:    result := 'bigint'; // >= 9.1
+    datGuid:         result := 'varchar(38)';
+    datXml:          result := 'clob';
+    datDecimal:      result := 'number';
+    datSingleFloat:  result := 'real';
+    end;
+
+  mkASA:
+    case aField.DataType of
+    datString:       result := Format('varchar(%d)', [aField.Size]);
+    datDateTime:     result := 'timestamp';
+    datFloat:        result := 'double';
+    datCurrency:     result := 'money';
+    datAutoInc:      result := 'integer identity(1,1)';
+    datInteger:      result := 'integer';
+    datLargeInt:     result := 'bigint';
+    datBoolean:      result := 'bit';
+    datMemo:         result := 'text';
+    datBlob:         result := 'image';
+    datWideString:   result := Format('nvarchar(%d)', [aField.Size]);
+    datWideMemo:     result := 'ntext';
+    datLargeAutoInc: result := 'bigint identity(1,1)';
+    datByte:         result := 'unsigned tinyint';
+    datShortInt:     result := 'tinyint';
+    datWord:         result := 'unsigned smallint';
+    datSmallInt:     result := 'smallint';
+    datCardinal:     result := 'unsigned integer';
+    datLargeUInt:    result := 'unsigned bigint';
+    datGuid:         result := 'uniqueidentifierstr';
+    datXml:          result := 'xml';
+    datDecimal:      result := 'decimal';
+    datSingleFloat:  result := 'real';
+    end;
+
+  mkInterbase:
+    case aField.DataType of
+    datString:       result := Format('varchar(%d)', [aField.Size]);
+    datDateTime:     result := 'timestamp';
+    datFloat:        result := 'double precision';
+    datCurrency:     result := 'decimal(18,4)';
+    datAutoInc:      result := 'integer';
+    datInteger:      result := 'integer';
+    datLargeInt:     result := 'decimal(18,0)';
+    datBoolean:      result := 'integer check (value in (0, 1))';
+    datMemo,
+    datBlob:
+      case aField.BlobType of
+      dabtBlob:      result := 'blob(2000,0)';
+      dabtMemo:      result := 'blob(2000,1)';
+      dabtOraBlob:   result := 'blob(2000,0)';
+      dabtOraClob:   result := 'blob(2000,1)';
+      else           if aField.DataType = datMemo then result := 'blob(2000,1)' else result := 'blob(2000,0)';
+      end;
+    datWideString:   result := Format('varchar(%d) character set unicode_fss', [aField.Size]);
+    datWideMemo:     result := 'blob sub_type 1 segment size 2000 character set unicode_fss';
+    datLargeAutoInc: result := 'decimal(18,0)';
+    datByte:         result := 'smallint';
+    datShortInt:     result := 'smallint';
+    datWord:         result := 'smallint';
+    datSmallInt:     result := 'smallint';
+    datCardinal:     result := 'decimal(10,0)';
+    datLargeUInt:    result := 'decimal(18,0)';
+    datGuid:         result := 'varchar(38)';
+    datXml:          result := 'blob(2000,1)';
+    datDecimal:      result := 'decimal(18,6)';
+    datSingleFloat:  result := 'float';
+    end;
+  end;
+
+  if Result = '' then
+    raise Exception.CreateFmt('DataAbstract [%d] data type of field [%s] for DBMS [%s] is not supported',
+      [Integer(aField.DataType), aField.Name, C_AD_PhysRDBMSKinds[fDriverType]]);
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACConnection.BuildCreateTableSQL(aDataSet: TDADataSet;
+  const aOverrideName: string): string;
+var
+  lName: string;
+begin
+  lName := aOverrideName;
+  if lName = '' then
+    lName := aDataSet.Name;
+  result := uDAHelpers.BuildCreateStatementForTable(aDataSet, lName, self);
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACConnection.CreateTable(aDataSet: TDADataSet; const aOverrideName: string);
+var
+  sSQL: string;
+begin
+  sSQL := BuildCreateTableSQL(aDataSet, aOverrideName);
+  with NewCommand(sSQL, stSQL) do
+    Execute();
+end;
+
+{------------------------------------------------------------------------------}
+// IDACanQueryDatabaseNames
+
+function TDAEAnyDACConnection.GetDataBaseName: string;
+begin
+  Result := FDataBaseName;
+end;
+
+function TDAEAnyDACConnection.GetDatabaseNames: IROStrings;
+begin
+  case fDriverType of
+    mkMSSQL: Result := MSSQL_GetDatabaseNames(Self);
+    mkMySQL: Result := MYSQL_GetDatabaseNames(Self);
+  else
+    Result := NewROStrings;
+  end;
+end;
+
+{------------------------------------------------------------------------------}
+// IDAFileBasedDatabase
+
+function TDAEAnyDACConnection.GetFileExtensions: IROStrings;
+begin
+  case fDriverType of
+    mkInterBase: Result := IB_GetFileExtensions;
+    mkMSAccess:  Result := MSACCESS_GetFileExtensions;
+  else
+    Result := NewROStrings;
+  end;
+end;
+
+{------------------------------------------------------------------------------}
+// IDAUseGenerators
+
+function TDAEAnyDACConnection.GetNextAutoinc(const GeneratorName: string): integer;
+begin
+  Result := -1;
+  case fDriverType of
+    mkInterBase: Result := IB_GetNextAutoinc(GeneratorName, GetDatasetClass.Create(Self));
+    mkOracle:    Result := Oracle_GetNextAutoinc(GeneratorName, GetDatasetClass.Create(Self));
+  end;
+end;
+
+{------------------------------------------------------------------------------}
+// IDACanQueryGeneratorsNames
+
+function TDAEAnyDACConnection.GetGeneratorNames: IROStrings;
+begin
+  case fDriverType of
+    mkInterBase: Result := IB_GetGeneratorNames(GetDatasetClass.Create(Self));
+  else
+    Result := NewROStrings;
+  end;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACConnection.SetupOptions(AOptions: IADStanOptions;
+  AFetchMeta: Boolean);
+begin
+  with AOptions do begin
+    if not fBiDirectionalDataSets then
+      FetchOptions.Unidirectional := True;
+    if not AFetchMeta then
+      FetchOptions.Items := FetchOptions.Items - [fiMeta];
+  end;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACConnection.SetupDataset(ADataSet: TADRdbmsDataSet;
+  AFetchMeta: Boolean);
+begin
+  TADQuery(ADataSet).Connection := FADConnection;
+  SetupOptions(IADStanOptions(TADQuery(ADataSet).Command), AFetchMeta);
+end;
+
+{------------------------------------------------------------------------------}
+{ TDAEAnyDACQuery                                                              }
+{------------------------------------------------------------------------------}
+function TDAEAnyDACQuery.CreateDataset(aConnection: TDAEConnection): TDataset;
+begin
+  result := TADQuery.Create(nil);
+  TDAEAnyDACConnection(aConnection).SetupDataset(TADQuery(result), False);
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACQuery.DoPrepare(AValue: boolean);
+var
+  i: integer;
+  oPar: TADParam;
+begin
+  if AValue and not TADQuery(Dataset).Prepared and (TADQuery(Dataset).ParamCount <> 0) then
+    for I := 0 to GetParams.Count - 1 do begin
+      oPar := TADQuery(Dataset).ParamByName(GetParams[i].Name);
+      oPar.DataType := DATypeToVCLType(GetParams[i].DataType);
+      if oPar.DataType = ftAutoInc then
+        oPar.DataType := ftInteger;
+    end;
+  TADQuery(Dataset).Prepared := AValue;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACQuery.ClearParams;
+begin
+  inherited;
+  TADQuery(Dataset).Params.Clear;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACQuery.DoExecute: integer;
+begin
+  with TADQuery(Dataset) do begin
+    // 1) SELECT command on MSSQL, etc may be without result set, for example:
+    //    SELECT :CUSTOMERS_CNT = count(*) from customers
+    // 2) On Oracle skExecute is handled specially (PL/SQL) and commands as
+    //    above are not possible
+    if PointedConnection.RDBMSKind <> mkOracle then
+      Command.CommandKind := skExecute;
+    ExecSQL;
+    Result := RowsAffected;
+  end;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACQuery.DoGetSQL: string;
+begin
+  Result := TADQuery(Dataset).SQL.Text;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACQuery.DoSetSQL(const AValue: string);
+begin
+  with TADQuery(Dataset).SQL do begin
+    BeginUpdate;
+    try
+      Clear;
+      Add(AValue);
+    finally
+      EndUpdate;
+    end;
+  end;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACQuery.SetParamValues(AParams: TDAParamCollection);
+begin
+  SetADParamValuesFromDA(AParams, TADQuery(Dataset).Params, True);
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACQuery.GetParamValues(AParams: TDAParamCollection);
+begin
+  GetDAParamValuesFromAD(GetParams, TADQuery(Dataset).Params);
+end;
+
+{------------------------------------------------------------------------------}
+{ TDAEAnyDACStoredProcedure                                                    }
+{------------------------------------------------------------------------------}
+function TDAEAnyDACStoredProcedure.CreateDataset(AConnection: TDAEConnection): TDataset;
+begin
+  Result := TADStoredProc.Create(nil);
+  TDAEAnyDACConnection(aConnection).SetupDataset(TADStoredProc(Result), True);
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACStoredProcedure.GetStoredProcedureName: string;
+begin
+  Result := TADStoredProc(DataSet).StoredProcName;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACStoredProcedure.SetStoredProcedureName(const Name: string);
+begin
+  TADStoredProc(DataSet).StoredProcName := Name;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACStoredProcedure.DoExecute: integer;
+begin
+  TADStoredProc(Dataset).ExecProc;
+  result := TADStoredProc(Dataset).RowsAffected;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACStoredProcedure.Execute: integer;
+var
+  oADParams: TADParams;
+  oDAParams: TDAParamCollection;
+begin
+  oADParams := TADStoredProc(Dataset).Params;
+  oDAParams := GetParams;
+  if oADParams.Count <> oDAParams.Count then
+    TADStoredProc(Dataset).Prepare;
+  SetADParamValuesFromDA(oDAParams, oADParams, False);
+  Result := DoExecute;
+  // in case of SP the reference to params may be invalid after execution
+  oADParams := TADStoredProc(Dataset).Params;
+  GetDAParamValuesFromAD(oDAParams, oADParams);
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACStoredProcedure.RefreshParams;
+var
+  oDAParams: TDAParamCollection;
+  oDAParam: TDAParam;
+  i: Integer;
+begin
+  TADStoredProc(Dataset).Prepare;
+  oDAParams := GetParams;
+  oDAParams.Clear;
+  with TADStoredProc(Dataset) do
+    for i := 0 to Params.Count - 1 do begin
+      oDAParam := oDAParams.Add;
+      oDAParam.Name := Params[i].Name;
+      oDAParam.DataType := VCLTypeToDAType(Params[i].DataType);
+      oDAParam.ParamType := TDAParamType(Params[i].ParamType);
+      oDAParam.Size := Params[i].Size;
+    end;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACStoredProcedure.SetParamValues(AParams: TDAParamCollection);
+begin
+  SetADParamValuesFromDA(AParams, TADStoredProc(Dataset).Params, False);
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACStoredProcedure.GetParamValues(AParams: TDAParamCollection);
+begin
+  GetDAParamValuesFromAD(AParams, TADStoredProc(Dataset).Params);
+end;
+
+{------------------------------------------------------------------------------}
+{ TDAEAnyDACNativeField                                                        }
+{------------------------------------------------------------------------------}
+constructor TDAEAnyDACNativeField.Create(ACol: TADDatSColumn; const ACmd: IADPhysCommand; AParent: TDAEAnyDACNativeDatabaseAccess);
+begin
+  inherited Create;
+  FCol := ACol;
+  FCmd := ACmd;
+  fParent:= AParent;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACNativeField.GetDataType: TFieldType;
+var
+  iDestSize: Longword;
+  iDestPrec,iDescScale: Integer;
+begin
+  FCmd.Options.FormatOptions.ColumnDef2FieldDef(FCol.DataType, FCol.Size, FCol.Precision, FCol.Scale,
+    FCol.Attributes, Result, iDestSize, iDestPrec, iDescScale);
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACNativeField.GetDecimalPrecision: Integer;
+begin
+  Result := FCol.Precision;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACNativeField.GetDecimalScale: Integer;
+begin
+  Result := FCol.Scale;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACNativeField.GetFieldIndex: integer;
+begin
+  Result := FCol.Index;
+end;
+
+function TDAEAnyDACNativeField.GetFieldName: string;
+begin
+  Result := FCol.Name;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACNativeField.GetNativeObject: TObject;
+begin
+  Result := Self;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACNativeField.GetSize: integer;
+begin
+  Result := FCol.Size;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACNativeField.GetValue: Variant;
+begin
+  Result := FParent.GetNativeFieldValue(FCol.Index);
+end;
+
+function TDAEAnyDACNativeField.IsNull: Boolean;
+begin
+  Result := fParent.IsNull(FCol.Index);
+end;
+
+function TDAEAnyDACNativeField.isTFieldCompatible: Boolean;
+begin
+  Result := False;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACNativeField.SetDataType(Value: TFieldType);
+var
+  eDestType: TADDataType;
+  iDestScale: Integer;
+  iDestPrec: Integer;
+  iDestSize: LongWord;
+  iDestAttrs: TADDataAttributes;
+begin
+  FCmd.Options.FormatOptions.FieldDef2ColumnDef(Value, FCol.Size, FCol.Precision,FCol.Scale,
+    eDestType, iDestSize, iDestPrec, iDestScale, iDestAttrs);
+  FCol.DataType := eDestType;
+  FCol.Attributes := iDestAttrs;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACNativeField.SetDecimalPrecision(Value: integer);
+begin
+  FCol.Precision := Value;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACNativeField.SetDecimalScale(Value: integer);
+begin
+  FCol.Scale := Value;
+end;
+
+{------------------------------------------------------------------------------}
+{ TDAEAnyDACNativeDatabaseAccess                                               }
+{------------------------------------------------------------------------------}
+constructor TDAEAnyDACNativeDatabaseAccess.Create(ADAEConnection: TDAEAnyDACConnection);
+begin
+  inherited Create;
+  ADAEConnection.FADConnection.Connected:=True;
+  ADAEConnection.FADConnection.ConnectionIntf.CreateCommand(FCmd);
+  FTab := TADDatSTable.Create;
+end;
+
+{------------------------------------------------------------------------------}
+destructor TDAEAnyDACNativeDatabaseAccess.Destroy;
+begin
+  FCmd := nil;
+  FreeAndNil(FTab);
+  inherited Destroy;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACNativeDatabaseAccess._AddRef: Integer;
+begin
+  Result := 1;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACNativeDatabaseAccess._Release: Integer;
+begin
+  Result := 1;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACNativeDatabaseAccess.QueryInterface(const IID: TGUID; out Obj): HResult;
+begin
+  if GetInterface(IID, Obj) then
+    Result := 0
+  else
+    Result := E_NOINTERFACE;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACNativeDatabaseAccess.CheckActive;
+begin
+  if not (nfActive in FFlags) then
+    raise Exception.Create('Dataset must be active');
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACNativeDatabaseAccess.CheckBidir;
+begin
+  if FCmd.Options.FetchOptions.Unidirectional then
+    raise Exception.Create('Dataset must be bidirectional');
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACNativeDatabaseAccess.ClearFieldDefs;
+begin
+  FTab.Reset;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACNativeDatabaseAccess.GetRecordCount: Integer;
+begin
+  Result := FRowsPurged + FTab.Rows.Count;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACNativeDatabaseAccess.GetBOF: Boolean;
+begin
+  Result := nfBOF in FFlags;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACNativeDatabaseAccess.GetEOF: Boolean;
+begin
+  Result := nfEOF in FFlags;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACNativeDatabaseAccess.GetActive: Boolean;
+begin
+  Result := nfActive in FFlags;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACNativeDatabaseAccess.SetActive(const aValue: Boolean);
+var
+  i: Integer;
+begin
+  if (nfActive in FFlags) <> aValue then
+    if aValue then begin
+      FCmd.Open;
+      FCmd.Define(FTab);
+      FCmd.Fetch(FTab, False);
+      FRowIndex := 0;
+      FRowsPurged := 0;
+      if FTab.Rows.Count = 0 then
+        Include(FFlags, nfEOF)
+      else
+        Exclude(FFlags, nfEOF);
+      Include(FFlags, nfBOF);
+      Include(FFlags, nfActive);
+      SetLength(FBuffs, FTab.Columns.Count);
+      for i := 0 to FTab.Columns.Count - 1 do
+        case FTab.Columns[i].DataType of
+        dtDateTimeStamp,
+        dtTime,
+        dtDate:
+          GetMem(FBuffs[i], SizeOf(TDateTime));
+        dtGUID:
+          GetMem(FBuffs[i], 39);
+        dtCurrency:
+          GetMem(FBuffs[i], SizeOf(Double));
+        dtBCD:
+          GetMem(FBuffs[i], SizeOf(Currency));
+        else
+          FBuffs[i] := nil;
+        end;
+    end
+    else begin
+      FCmd.AbortJob(True);
+      FCmd.CloseAll;
+      FTab.Clear;
+      FRowIndex := 0;
+      FRowsPurged := 0;
+      Exclude(FFlags, nfActive);
+      for i := 0 to FTab.Columns.Count - 1 do
+        if FBuffs[i] <> nil then
+          FreeMem(FBuffs[i]);
+      SetLength(FBuffs, 0);
+    end;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACNativeDatabaseAccess.First;
+begin
+  CheckActive;
+  CheckBidir;
+  FRowIndex := 0;
+  if FTab.Rows.Count = 0 then
+    Include(FFlags, nfEOF);
+  Include(FFlags, nfBOF);
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACNativeDatabaseAccess.Next;
+begin
+  CheckActive;
+  Exclude(FFlags, nfEOF);
+  if FRowIndex >= FTab.Rows.Count - 1 then begin
+    if FCmd.State = csOpen then begin
+      if FCmd.Options.FetchOptions.Unidirectional then begin
+        Inc(FRowsPurged, FTab.Rows.Count);
+        FTab.Clear;
+        FRowIndex := -1;
+      end;
+      FCmd.Fetch(FTab, False);
+      if FCmd.RowsAffected = 0 then
+        Include(FFlags, nfEOF);
+    end
+    else
+      Include(FFlags, nfEOF);
+  end;
+  if FRowIndex < FTab.Rows.Count - 1 then
+    Inc(FRowIndex);
+  if FRowIndex <= 0 then
+    Include(FFlags, nfBOF)
+  else
+    Exclude(FFlags, nfBOF);
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACNativeDatabaseAccess.LocateRecord(const KeyFields: string;
+  const KeyValues: Variant; Options: TLocateOptions; AChangePos: Boolean): Integer;
+var
+  oCols: TADDatSColumnSublist;
+  iPrevRowIndex: Integer;
+  ePrevFlags: TDAEAnyDACNativeDatabaseAccessFlags;
+  lSimple: Boolean;
+  lEQ: Boolean;
+  i: Integer;
+  V1, V2: Variant;
+begin
+  Result := -1;
+  oCols := TADDatSColumnSublist.Create;
+  iPrevRowIndex := FRowIndex;
+  ePrevFlags := FFlags;
+  try
+    oCols.Fill(FTab, KeyFields);
+    lSimple := (oCols.Count = 1) and not VarIsArray(KeyValues);     
+    First;
+    while not (nfEOF in FFlags) do begin
+      lEQ := False;
+      for i := 0 to oCols.Count - 1 do begin
+        V1 := FTab.Rows[FRowIndex].GetData(oCols[i]);
+        if lSimple then
+          V2 := KeyValues
+        else
+          V2 := KeyValues[i];
+        if VarIsNull(V1) and VarIsNull(V2) then
+          lEQ := True
+        else if VarIsNull(V1) xor VarIsNull(V2) then
+          lEQ := False
+        else if oCols[i].DataType in [dtAnsiString, dtWideString, dtMemo,
+                                      dtWideMemo, dtHMemo, dtWideHMemo] then
+          if loCaseInsensitive in Options then begin
+            if loPartialKey in Options then
+              lEQ := Pos(AnsiLowerCase(VarToStr(V2)), AnsiLowerCase(VarToStr(V1))) = 1
+            else
+              lEQ := AnsiCompareText(VarToStr(V2), VarToStr(V1)) = 0;
+          end
+          else if loPartialKey in Options then
+            lEQ := Pos(VarToStr(V2), VarToStr(V1)) = 1
+          else
+            lEQ := CompareStr(VarToStr(V2), VarToStr(V1)) = 0
+        else
+          try
+            lEQ := V1 = V2;
+          except
+            lEQ := False;
+          end;
+        if not lEQ then
+          Break;
+      end;
+      if lEQ then begin
+        Result := FRowIndex;
+        Break;
+      end;
+      Next;
+    end;
+  finally
+    oCols.Free;
+    if (Result = -1) or not AChangePos then begin
+      FRowIndex := iPrevRowIndex;
+      FFlags := ePrevFlags;
+    end;
+  end;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACNativeDatabaseAccess.Locate(const KeyFields: string;
+  const KeyValues: Variant; Options: TLocateOptions): Boolean;
+begin
+  Result := LocateRecord(KeyFields, KeyValues, Options, True) <> -1;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACNativeDatabaseAccess.Lookup(const KeyFields: string;
+  const KeyValues: Variant; const ResultFields: string): Variant;
+var
+  iRowIndex, i: Integer;
+  oCols: TADDatSColumnSublist;
+begin
+  iRowIndex := LocateRecord(KeyFields, KeyValues, [], False);
+  if iRowIndex <> -1 then begin
+    oCols := TADDatSColumnSublist.Create;
+    try
+      if oCols.Count = 1 then
+        Result := FTab.Rows[iRowIndex].GetData(oCols[0])
+      else begin
+        Result := VarArrayCreate([0, oCols.Count - 1], varVariant);
+        for i := 0 to oCols.Count - 1 do
+          Result[i] := FTab.Rows[iRowIndex].GetData(oCols[i]);
+      end;
+    finally
+      oCols.Free;
+    end
+  end
+  else
+    Result := Null;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACNativeDatabaseAccess.GetFieldName(Index: Integer): string;
+begin
+  Result := FTab.Columns[Index].Name;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACNativeDatabaseAccess.DisableControls;
+begin
+  // nothing
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACNativeDatabaseAccess.EnableControls;
+begin
+  // nothing
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACNativeDatabaseAccess.ControlsDisabled: Boolean;
+begin
+  // nothing
+  Result := True;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACNativeDatabaseAccess.GetIsEmpty: boolean;
+begin
+  Result := (FRowsPurged + FTab.Rows.Count) = 0;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACNativeDatabaseAccess.FreeBookmark(Bookmark: TBookmark);
+begin
+  // nothing
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACNativeDatabaseAccess.GetBookMark: pointer;
+begin
+  CheckActive;
+  CheckBidir;
+  Result := Pointer(FRowIndex);
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACNativeDatabaseAccess.GotoBookmark(Bookmark: TBookmark);
+begin
+  CheckActive;
+  CheckBidir;
+  FRowIndex := Integer(Bookmark);
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACNativeDatabaseAccess.GetState: TDatasetState;
+begin
+  if FCmd.State = csExecuting then
+    Result := dsOpening
+  else if nfActive in FFlags then
+    Result := dsBrowse
+  else
+    Result := dsInactive;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACNativeDatabaseAccess.Prepare(const AValue: Boolean);
+begin
+  if AValue then
+    FCmd.Prepare
+  else
+    FCmd.Unprepare;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACNativeDatabaseAccess.GetFields(Index: integer): IDANativeField;
+begin
+  Result := TDAEAnyDACNativeField.Create(FTab.Columns[Index], FCmd, Self) as IDANativeField;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACNativeDatabaseAccess.FieldCount: Integer;
+begin
+  Result := FTab.Columns.Count;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACNativeDatabaseAccess.FindField(const FieldName: string): IDANativeField;
+var
+  i: Integer;
+begin
+  i := FTab.Columns.IndexOfName(FieldName);
+  if i = -1 then
+    Result := nil
+  else
+    Result := GetFields(i);
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACNativeDatabaseAccess.IsTDatasetCompatible: Boolean;
+begin
+  Result := False;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACNativeDatabaseAccess.GetNativeFieldData(Index: Integer;
+  var Data: pointer; var DataSize: cardinal): Boolean;
+
+  procedure CvtGUID(ABuff: PChar; AGuid: PGUID);
+  begin
+    with AGuid^ do
+      StrLFmt(ABuff, 38,
+        '{%.8x-%.4x-%.4x-%.2x%.2x-%.2x%.2x%.2x%.2x%.2x%.2x}',
+        [D1, D2, D3, D4[0], D4[1], D4[2], D4[3], D4[4], D4[5], D4[6], D4[7]]);
+  end;
+
+  procedure ErrNotSupported(AType: TADDataType);
+  begin
+    raise Exception.CreateFmt('AnyDAC data type [%s] is not supported by DataAbstract',
+                              [C_AD_DataTypeNames[AType]]);
+  end;
+
+begin
+  CheckActive;
+  if (FRowIndex >= 0) and (FRowIndex < FTab.Rows.Count) then begin
+    Result := FTab.Rows[FRowIndex].GetData(Index, rvDefault, Data, 0, DataSize, False);
+    if Result then
+      case FTab.Columns[Index].DataType of
+      dtWideString,
+      dtWideMemo,
+      dtWideHMemo:
+        DataSize := DataSize * SizeOf(WideChar);
+      dtDateTimeStamp:
+        begin
+          PDateTime(FBuffs[Index])^ := ADSQLTimeStampToDateTime(PADSQLTimeStamp(Data)^);
+          DataSize := SizeOf(TDateTime);
+          Data := FBuffs[Index];
+        end;
+      dtTime:
+        begin
+          PDateTime(FBuffs[Index])^ := ADTime2DateTime(PLongint(Data)^);
+          DataSize := SizeOf(TDateTime);
+          Data := FBuffs[Index];
+        end;
+      dtDate:
+        begin
+          PDateTime(FBuffs[Index])^ := ADDate2DateTime(PLongint(Data)^);
+          DataSize := SizeOf(TDateTime);
+          Data := FBuffs[Index];
+        end;
+      dtGUID:
+        begin
+          CvtGUID(PChar(FBuffs[Index]), PGuid(Data));
+          DataSize := 38;
+          Data := FBuffs[Index];
+        end;
+      dtCurrency:
+        begin
+          PDouble(FBuffs[Index])^ := PCurrency(Data)^;
+          DataSize := SizeOf(Double);
+          Data := FBuffs[Index];
+        end;
+      dtBCD:
+        begin
+          BCDToCurr(PBCD(Data)^, PCurrency(FBuffs[Index])^);
+          DataSize := SizeOf(Currency);
+          Data := FBuffs[Index];
+        end;
+      dtFmtBCD: begin
+        PBCD(FBuffs[Index])^ := PBCD(Data)^;
+        DataSize := SizeOf(TBCD);
+        Data := FBuffs[Index];
+      end;
+      dtRowSetRef,
+      dtCursorRef,
+      dtRowRef,
+      dtArrayRef,
+      dtParentRowRef,
+      dtObject:
+        ErrNotSupported(FTab.Columns[Index].DataType);
+      end;
+  end
+  else
+    Result := False;
+  if not Result then begin
+    DataSize := 0;
+    Data := nil;
+  end;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACNativeDatabaseAccess.GetNativeFieldValue(Index: Integer): Variant;
+var
+  data: pointer;
+  DataSize: cardinal;
+  c: Currency;
+begin
+  CheckActive;
+  if (FRowIndex >= 0) and (FRowIndex < FTab.Rows.Count) then begin
+    case FTab.Columns[Index].DataType of
+      dtDateTimeStamp:
+        if FTab.Rows[FRowIndex].GetData(Index, rvDefault, Data, 0, DataSize, False) then
+          Result := VarFromDateTime(ADSQLTimeStampToDateTime(PADSQLTimeStamp(Data)^))
+        else
+          Result := Null;
+      dtBCD:
+        if FTab.Rows[FRowIndex].GetData(Index, rvDefault, Data, 0, DataSize, False) then begin
+          BCDToCurr(PBCD(Data)^, c);
+          Result := c;
+        end
+        else begin
+          Result := Null;
+        end;
+      dtFmtBCD:
+        if FTab.Rows[FRowIndex].GetData(Index, rvDefault, Data, 0, DataSize, False) then
+          Result := DecimalToString(BCDToDecimal(PBCD(Data)^),DecimalSeparator)
+        else
+          Result := Null;
+      dtTime, dtDate:
+        if FTab.Rows[FRowIndex].GetData(Index, rvDefault, Data, 0, DataSize, False) then
+          Result := VarFromDateTime(ADTime2DateTime(PLongint(Data)^))
+        else
+          Result := Null;
+      dtCurrency:
+        if FTab.Rows[FRowIndex].GetData(Index, rvDefault, Data, 0, DataSize, False) then
+          Result := PCurrency(Data)^
+        else
+          Result := Null;
+      dtGUID:
+        if FTab.Rows[FRowIndex].GetData(Index, rvDefault, Data, 0, DataSize, False) then
+          Result := GUIDToString(PGuid(Data)^)
+        else
+          Result := Null;
+    else
+      Result := FTab.Rows[FRowIndex].GetData(Index);
+    end;
+  end
+  else
+    Result := Null;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACNativeDatabaseAccess.CanFreeNativeFieldData: Boolean;
+begin
+  Result := False;
+end;
+
+{------------------------------------------------------------------------------}
+{ TDAEAnyDACQueryNative                                                        }
+{------------------------------------------------------------------------------}
+function TDAEAnyDACQueryNative.GetNativeObject: TDAEAnyDACNativeDatabaseAccess;
+begin
+  Result := TDAEAnyDACNativeDatabaseAccess(inherited NativeObject);
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACQueryNative.CreateDataset(aConnection: TDAEConnection): TDataset;
+begin
+  Result := nil;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACQueryNative.CreateNativeDatabaseAccess: IDANativeDatabaseAccess;
+begin
+  Supports(NativeObject, IDANativeDatabaseAccess, Result);
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACQueryNative.CreateNativeObject(aConnection: TDAEConnection): TObject;
+begin
+  Result := TDAEAnyDACNativeDatabaseAccess.Create(TDAEAnyDACConnection(aConnection));
+  TDAEAnyDACConnection(aConnection).SetupOptions(TDAEAnyDACNativeDatabaseAccess(Result).FCmd.Options, False);
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACQueryNative.DoPrepare(AValue: boolean);
+var
+  i: integer;
+  oPar: TADParam;
+begin
+  if AValue and (NativeObject.FCmd.State <> csPrepared) and (NativeObject.FCmd.Params.Count <> 0) then
+    for I := 0 to GetParams.Count - 1 do begin
+      oPar := NativeObject.FCmd.Params.ParamByName(GetParams[i].Name);
+      oPar.DataType := DATypeToVCLType(GetParams[i].DataType);
+      if oPar.DataType = ftAutoInc then
+        oPar.DataType := ftInteger;
+    end;
+  if AValue then
+    NativeObject.FCmd.Prepare
+  else
+    NativeObject.FCmd.Unprepare;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACQueryNative.ClearParams;
+begin
+  inherited;
+  NativeObject.FCmd.Params.Clear;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACQueryNative.DoExecute: integer;
+var
+  oConnMeta: IADPhysConnectionMetadata;
+begin
+  with NativeObject.FCmd do begin
+    // 1) SELECT command on MSSQL, etc may be without result set, for example:
+    //    SELECT :CUSTOMERS_CNT = count(*) from customers
+    // 2) On Oracle skExecute is handled specially (PL/SQL) and commands as
+    //    above are not possible
+    Connection.CreateMetadata(oConnMeta);
+    if oConnMeta.Kind <> mkOracle then
+      CommandKind := skExecute;
+    Execute;
+    if RowsAffectedReal then
+      Result := RowsAffected
+    else
+      Result := 0;
+  end;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACQueryNative.DoGetSQL: string;
+begin
+  Result := NativeObject.FCmd.CommandText;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACQueryNative.DoSetSQL(const AValue: string);
+begin
+  NativeObject.FCmd.CommandText := AValue;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACQueryNative.SetParamValues(AParams: TDAParamCollection);
+begin
+  SetADParamValuesFromDA(AParams, NativeObject.FCmd.Params, True);
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACQueryNative.GetParamValues(AParams: TDAParamCollection);
+begin
+  GetDAParamValuesFromAD(GetParams, NativeObject.FCmd.Params);
+end;
+
+{------------------------------------------------------------------------------}
+{ TDAEAnyDACStoredProcedureNative                                              }
+{------------------------------------------------------------------------------}
+function TDAEAnyDACStoredProcedureNative.GetNativeObject: TDAEAnyDACNativeDatabaseAccess;
+begin
+  Result := TDAEAnyDACNativeDatabaseAccess(inherited NativeObject);
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACStoredProcedureNative.CreateDataset(aConnection: TDAEConnection): TDataset;
+begin
+  Result := nil;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACStoredProcedureNative.CreateNativeDatabaseAccess: IDANativeDatabaseAccess;
+begin
+  Supports(NativeObject, IDANativeDatabaseAccess, Result);
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACStoredProcedureNative.CreateNativeObject(aConnection: TDAEConnection): TObject;
+begin
+  Result := TDAEAnyDACNativeDatabaseAccess.Create(TDAEAnyDACConnection(aConnection));
+  TDAEAnyDACNativeDatabaseAccess(Result).FCmd.CommandKind := skStoredProc;
+  TDAEAnyDACConnection(aConnection).SetupOptions(TDAEAnyDACNativeDatabaseAccess(Result).FCmd.Options, False);
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACStoredProcedureNative.GetStoredProcedureName: string;
+begin
+  Result := NativeObject.FCmd.CommandText;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACStoredProcedureNative.SetStoredProcedureName(const Name: string);
+begin
+  NativeObject.FCmd.CommandText := Name;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACStoredProcedureNative.DoExecute: integer;
+begin
+  with NativeObject.FCmd do begin
+    Execute();
+    if RowsAffectedReal then
+      Result := RowsAffected
+    else
+      Result := 0;
+  end;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAEAnyDACStoredProcedureNative.Execute: integer;
+var
+  oADParams: TADParams;
+  oDAParams: TDAParamCollection;
+begin
+  oADParams := NativeObject.FCmd.Params;
+  oDAParams := GetParams;
+  if oADParams.Count <> oDAParams.Count then
+    NativeObject.FCmd.Prepare;
+  SetADParamValuesFromDA(oDAParams, oADParams, False);
+  Result := DoExecute;
+  // in case of SP the reference to params may be invalid after execution
+  oADParams := NativeObject.FCmd.Params;
+  GetDAParamValuesFromAD(oDAParams, oADParams);
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACStoredProcedureNative.RefreshParams;
+var
+  oDAParams: TDAParamCollection;
+  oDAParam: TDAParam;
+  i: Integer;
+begin
+  NativeObject.FCmd.Prepare;
+  oDAParams := GetParams;
+  oDAParams.Clear;
+  with NativeObject.FCmd do
+    for i := 0 to Params.Count - 1 do begin
+      oDAParam := oDAParams.Add;
+      oDAParam.Name := Params[i].Name;
+      oDAParam.DataType := VCLTypeToDAType(Params[i].DataType);
+      oDAParam.ParamType := TDAParamType(Params[i].ParamType);
+      oDAParam.Size := Params[i].Size;
+    end;
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACStoredProcedureNative.GetParamValues(AParams: TDAParamCollection);
+begin
+  SetADParamValuesFromDA(AParams, NativeObject.FCmd.Params, False);
+end;
+
+{------------------------------------------------------------------------------}
+procedure TDAEAnyDACStoredProcedureNative.SetParamValues(AParams: TDAParamCollection);
+begin
+  GetDAParamValuesFromAD(AParams, NativeObject.FCmd.Params);
+end;
+
+{------------------------------------------------------------------------------}
+{ Registration and factory code                                                }
+{------------------------------------------------------------------------------}
+var
+  _driver: TDAEDriver = nil;
+
+{------------------------------------------------------------------------------}
+procedure Register;
+begin
+  RegisterComponents(DAPalettePageName, [TDAAnyDACDriver]);
+end;
+
+{------------------------------------------------------------------------------}
+function GetDriverObject: IDADriver;
+begin
+{$IFDEF DataAbstract_SchemaModelerOnly}
+  if not RunningInSchemaModeler then begin
+    result := nil;
+    exit;
+  end;
+{$ENDIF}
+  if _driver = nil then
+    _driver := TDAEAnyDACDriver.Create(nil);
+  result := _driver;
+end;
+
+{------------------------------------------------------------------------------}
+exports
+  GetDriverObject name func_GetDriverObject;
+
+function TDAEAnyDACConnection.GetMySQLVersion: integer;
+begin
+  if FMySQLVersion = -1 then FMySQLVersion := MYSQL_GetVersion(GetDatasetClass.Create(Self));
+  Result := FMySQLVersion;
+end;
+
+function TDAEAnyDACNativeDatabaseAccess.IsNull(Index: integer): Boolean;
+var
+  Data: pointer;
+  DataSize: Cardinal;
+begin
+  Result := not FTab.Rows[FRowIndex].GetData(Index, rvDefault, Data, 0, DataSize, False);
+end;
+
+initialization
+{$IFDEF FPC}
+  {$I DataAbstract_AnyDACDriver_Glyphs.lrs}
+{$ENDIF}
+  _driver := nil;
+  RegisterDriverProc(GetDriverObject);
+
+finalization
+  UnregisterDriverProc(GetDriverObject);
+  FreeAndNil(_driver);
+
+end.
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDABDEDriver.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDABDEDriver.pas
new file mode 100644
index 0000000..c2507d4
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDABDEDriver.pas	
@@ -0,0 +1,1209 @@
+unit uDABDEDriver;
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Driver Library
+{
+{ compiler: Delphi 6 and up
+{ platform: Win32
+{
+{ (c)opyright RemObjects Software. all rights reserved.
+{
+{ Using this code requires a valid license of the Data Abstract
+{ which can be obtained at http://www.remobjects.com.
+{----------------------------------------------------------------------------}
+
+{$IFDEF MSWINDOWS}
+{$I ..\DataAbstract.inc}
+{$ELSE}
+{$I ../DataAbstract.inc}
+{$ENDIF}
+
+{$R DataAbstract_BDEDriver_Glyphs.res}
+{$DEFINE MAX_SUPPORT}
+interface
+
+uses DB, uDAEngine, uDAInterfaces, uROClasses, uDAInterfacesEx, uDAUtils, DBTables,
+     uDAIBInterfaces, uDAADOInterfaces, uDAOracleInterfaces, uDADB2Interfaces, uDASybaseInterfaces;
+
+type
+  TDABDEProviderType = (
+    bdeSTANDARD,
+    bdeDB2,
+    bdeINFORMIX,
+    bdeINTRBASE,
+    bdeMSACCESS,
+    bdeMSSQL,
+    bdeORACLE,
+    bdeSYBASE,
+    bdeODBC);
+
+  { TDABDEDriver }
+  TDABDEDriver = class(TDADriverReference)
+  end;
+
+  { TDAEADODriver }
+  TDAEBDEDriver = class(TDAEDriver, IDADriver40)
+  protected
+    function GetConnectionClass: TDAEConnectionClass; override;
+    // IDADriver
+    function GetDriverID: string; override;
+    function GetDescription: string; override;
+    procedure GetAuxDrivers(out List: IROStrings); override;
+    procedure GetAuxParams(const AuxDriver: string; out List: IROStrings); override;
+    function GetAvailableDriverOptions: TDAAvailableDriverOptions; override;
+    function GetAvailableDriverOptionsEx(AuxDriver: string): TDAAvailableDriverOptions; override;
+    function GetProviderDefaultCustomParameters(Provider: string): string; safecall;
+    function GetDefaultConnectionType(const AuxDriver: string): string; override; safecall;
+  public
+  end;
+
+  { TDAEADOConnection }
+  TDAEBDEConnection = class(TDAEConnection, IDACanQueryDatabaseNames, IDAFileBasedDatabase,
+                            IDADirectoryBasedDatabase, IDAUseGenerators, {IDAADOConnection,}
+                            IDAInterbaseConnection, IDAOracleConnection, IDACanQueryGeneratorsNames,
+                            IDADB2Connection, IDASybaseConnection)
+  private
+    fProviderName: string;
+    fProviderType: TDABDEProviderType;
+    fDatabase: TDataBase;
+    FSession: TSession;
+  protected
+    function QueryInterface(const IID: TGUID; out Obj): HResult; override; stdcall;
+    function CreateCustomConnection: TCustomConnection; override;
+    function CreateMacroProcessor: TDASQLMacroProcessor; override;
+
+    function GetDatasetClass: TDAEDatasetClass; override;
+    function GetStoredProcedureClass: TDAEStoredProcedureClass; override;
+
+    procedure DoApplyConnectionString(aConnStrParser: TDAConnectionStringParser; aConnectionObject: TCustomConnection); override;
+
+    function DoBeginTransaction: integer; override;
+    procedure DoCommitTransaction; override;
+    procedure DoRollbackTransaction; override;
+    function DoGetInTransaction: boolean; override;
+
+    procedure DoGetTableNames(out List: IROStrings); override;
+    procedure DoGetTableFields(const aTableName: string; out Fields: TDAFieldCollection); override;
+
+    procedure DoGetViewNames(out List: IROStrings); override;
+    procedure DoGetStoredProcedureNames(out List: IROStrings); override;
+    procedure DoGetForeignKeys(out ForeignKeys: TDADriverForeignKeyCollection); override;
+    function DoGetLastAutoInc(const GeneratorName: string): integer; override;
+    function GetQuoteChars: TDAQuoteCharArray; override;
+    function GetSPSelectSyntax(HasArguments: Boolean): string; override; safecall;
+    function IdentifierNeedsQuoting(const iIdentifier: string): boolean; override; safecall;
+    function QuoteFieldName(const aTableName, aFieldName: string): string; override; safecall;
+    function GetUserID: string; override; safecall;
+    procedure DoGetStoredProcedureParams(const aStoredProcedureName: string; out Params: TDAParamCollection); override;
+    // IDACanQueryDatabaseNames
+    function GetDatabaseNames: IROStrings;
+    // IDAFileBasedDatabase
+    function GetFileExtensions: IROStrings;
+    // IDAUseGenerators
+    function GetNextAutoinc(const GeneratorName: string): integer; safecall;
+    // IDACanQueryGeneratorsNames
+    function GetGeneratorNames: IROStrings;
+  public
+    destructor Destroy; override;
+  end;
+
+  { TDAEADOQuery }
+  TDAEBDEQuery = class(TDAEDataset, IDAMustSetParams)
+  protected
+    procedure ClearParams; override;  
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+    function DoExecute: integer; override;
+    function DoGetSQL: string; override;
+    procedure DoSetSQL(const Value: string); override;
+    procedure RefreshParams; override; safecall;
+    procedure DoPrepare(Value: boolean); override; safecall;
+    // IDAMustSetParams
+    procedure SetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  public
+  end;
+
+  { TDAEADOStoredProcedure }
+  TDAEBDEStoredProcedure = class(TDAEStoredProcedure, IDAMustSetParams)
+  protected
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+    procedure RefreshParams; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetStoredProcedureName: string; override;
+    procedure SetStoredProcedureName(const Name: string); override;
+    function DoExecute: integer; override;
+    function Execute: integer; override;
+    // IDAMustSetParams
+    procedure SetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure DoPrepare(Value: boolean); override; safecall;
+  end;
+
+procedure Register;
+function GetDriverObject: IDADriver; stdcall;
+
+function ProviderToProviderType(AProvider: string): TDABDEProviderType;
+
+implementation
+
+uses
+  Windows, SysUtils, Variants, Classes, uDARes,
+  uROBinaryHelpers, uDADriverManager, uDAMacroProcessors, uDASQL92Interfaces;
+
+var
+  _driver                     : TDAEDriver = nil;
+
+const
+  BDE_LANGDRIVER              =
+    '(Access General,Access Greece,Access Japanese,Access Nord/Danish,Access Swed/Finnish,''ascii'' ANSI,' +
+    'Borland ANSI Arabic,Borland DAN Latin-1,Borland DEU Latin-1,Borland ENG Latin-1,Borland ENU Latin-1,Borland ESP Latin-1,' +
+    'Borland FIN Latin-1,Borland FRA Latin-1,Borland FRC Latin-1,Borland ISL Latin-1,Borland ITA Latin-1,Borland NLD Latin-1,' +
+    'Borland NOR Latin-1,Borland PTG Latin-1,Borland SVE Latin-1,DB2 SQL ANSI DEU,dBASE BUL 868,dBASE CHS cp936,dBASE CHT cp950,' +
+    'dBASE CSY cp852,dBASE CSY cp867,dBASE DAN cp865,dBASE DEU cp437,dBASE DEU cp850,dBASE ELL GR437,dBASE ENG cp437,dBASE ENG cp850,' +
+    'dBASE ENU cp437,dBASE ENU cp850,dBASE ESP cp437,dBASE ESP cp850,dBASE FIN cp437,dBASE FRA cp437,dBASE FRA cp850,dBASE FRC cp850,' +
+    'dBASE FRC cp863,dBASE HUN cp852,dBASE ITA cp437,dBASE ITA cp850,dBASE JPN cp932,dBASE JPN Dic932,dBASE KOR cp949,dBASE NLD cp437,' +
+    'dBASE NLD cp850,dBASE NOR cp865,dBASE PLK cp852,dBASE PTB cp850,dBASE PTG cp860,dBASE RUS cp866,dBASE SLO cp852,dBASE SVE cp437,' +
+    'dBASE SVE cp850,dBASE THA cp874,dBASE TRK cp857,FoxPro Czech 1250,FoxPro Czech DOS895,FoxPro German 1252,FoxPro German 437,FoxPro Nordic 1252,' +
+    'FoxPro Nordic 437,FoxPro Nordic 850,Hebrew dBASE,MSSQL ANSI Greek,Oracle SQL WE850,Paradox ANSI HEBREW,Paradox ''ascii'',Paradox BUL 868,' +
+    'Paradox China 936,Paradox Cyrr 866,Paradox Czech 852,Paradox Czech 867,Paradox ESP 437,Paradox Greek GR437,Paradox ''hebrew'',' +
+    'Paradox Hun 852 DC,Paradox ''intl'',Paradox ''intl'' 850,Paradox ISL 861,Paradox ''japan'',Paradox Korea 949,Paradox ''nordan'',' +
+    'Paradox ''nordan40'',Paradox Polish 852,Paradox Slovene 852,Paradox ''swedfin'',Paradox Taiwan 950,Paradox Thai 874,Paradox ''turk'',' +
+    'Pdox ANSI Bulgaria,Pdox ANSI Cyrillic,Pdox ANSI Czech,Pdox ANSI Greek,Pdox ANSI Hun. DC,Pdox ANSI Intl,Pdox ANSI Intl850,Pdox ANSI Nordan4,' +
+    'Pdox ANSI Polish,Pdox ANSI Slovene,Pdox ANSI Spanish,Pdox ANSI Swedfin,Pdox ANSI Swedfin,Pdox ANSI Turkish,Paradox ''ascii'' Japan,' +
+    'pdx ANSI Czech ''CH'',pdx ANSI ISO L_2 CZ,pdx Czech 852 ''CH'',pdx Czech 867 ''CH'',pdx ISO L_2 Czech,''Spanish'' ANSI,' +
+    'SQL Link ROMAN8,Sybase SQL Dic437,Sybase SQL Dic850,''WEurope'' ANSI)';
+
+function ProviderToProviderType2(AProvider: string): TDABDEProviderType;
+begin
+  if AnsiCompareText(AProvider, 'STANDARD') = 0 then Result := bdeSTANDARD else
+    if AnsiCompareText(AProvider, 'DB2') = 0 then Result := bdeDB2 else
+    if AnsiCompareText(AProvider, 'INFORMIX') = 0 then Result := bdeINFORMIX else
+    if AnsiCompareText(AProvider, 'INTRBASE') = 0 then Result := bdeINTRBASE else
+    if AnsiCompareText(AProvider, 'MSACCESS') = 0 then Result := bdeMSACCESS else
+    if AnsiCompareText(AProvider, 'MSSQL') = 0 then Result := bdeMSSQL else
+    if AnsiCompareText(AProvider, 'ORACLE') = 0 then Result := bdeORACLE else
+    if AnsiCompareText(AProvider, 'SYBASE') = 0 then Result := bdeSYBASE else
+    Result := bdeODBC;
+end;
+
+function ProviderToProviderType(AProvider: string): TDABDEProviderType;
+begin
+  if Session.IsAlias(AProvider) then
+    Result := ProviderToProviderType2(Session.GetAliasDriverName(AProvider))
+  else
+    Result := ProviderToProviderType2(AProvider);
+end;
+
+function GetDriverObject: IDADriver;
+begin
+  if (_driver = nil) then _driver := TDAEBDEDriver.Create(nil);
+  result := _driver;
+end;
+
+type
+  TDecimalVariant = packed record
+    VarType: TVarType;
+    scale: Byte;
+    sign: Byte;
+    Hi32: Cardinal;
+    Lo32: Cardinal;
+    Mid32: Cardinal;
+    Dummy: Cardinal;
+  end;
+
+function DecimalToInt64(const V: Variant): Int64;
+var
+  vData                       : TDecimalVariant absolute V;
+begin
+  if (vData.VarType = 14) and (vData.scale = 0) and (vData.Hi32 = 0) then begin
+    Result := Int64(vData.Lo32) or (Int64(vData.Mid32) shl 32);
+    if vData.sign <> 0 then result := -Result;
+  end else result := v;
+end;
+
+function Int64ToDecimal(Data: Int64): Variant;
+var
+  vd                          : TDecimalVariant absolute Result;
+begin
+  VarClear(Result);
+  vd.scale := 0;
+  if data < 0 then begin
+    vd.Sign := 128;
+    data := -data;
+  end else
+    vd.sign := 0;
+  vd.Hi32 := 0;
+  vd.Mid32 := int64(data shr 32);
+  vd.Lo32 := data;
+  vd.VarType := 14;
+end;
+
+{ TDAEBDEDriver }
+
+procedure TDAEBDEDriver.GetAuxDrivers(out List: IROStrings);
+var
+  FList                       : TStringList;
+begin
+  inherited GetAuxDrivers(List);
+  FList := TStringList.Create;
+  try
+    try
+      Session.GetAliasNames(FList);
+      List.AddStrings(FList);
+    except
+    end;
+    try
+      Session.GetDriverNames(FList);
+      List.AddStrings(FList);
+    except
+    end;
+  finally
+    FList.Free;
+  end;
+  List.Sorted := True;
+  List.Sorted := False;
+end;
+
+procedure TDAEBDEDriver.GetAuxParams(const AuxDriver: string;
+  out List: IROStrings);
+begin
+  inherited GetAuxParams(AuxDriver, List);
+  case ProviderToProviderType(AuxDriver) of
+    bdeSTANDARD: begin
+        List.Add('DEFAULT DRIVER=(PARADOX, DBASE, FOXPRO, ASCIIDRV)');
+        List.Add('ENABLE BCD=(TRUE, FALSE)');
+      end;
+    bdeDB2: begin
+        List.Add('BATCH COUNT=200');
+        List.Add('BLOB SIZE=32');
+        List.Add('BLOBS TO CACHE=64');
+        //List.Add('DB2 DSN'); { = 'DB2_SERVER'}
+        List.Add('ENABLE BCD=(TRUE, FALSE)');
+        List.Add('ENABLE SCHEMA CACHE=(TRUE, FALSE)');
+        List.Add('LANGDRIVER=' + BDE_LANGDRIVER);
+        List.Add('MAX ROWS=-1');
+        List.Add('OPEN MODE=(READ/WRITE,READ ONLY)');
+        List.Add('ROWSET SIZE=20');
+        List.Add('SCHEMA CACHE DIR=<dir>');
+        List.Add('SCHEMA CACHE SIZE=8');
+        List.Add('SCHEMA CACHE TIME=-1');
+        List.Add('SQLPASSTHRU MODE=(SHARED AUTOCOMMIT,SHARED NOAUTOCOMMIT,NOT SHARED)');
+        List.Add('SQLQRYMODE=(LOCAL,SERVER)');
+      end;
+    bdeINFORMIX: begin
+        List.Add('BATCH COUNT=200');
+        List.Add('BLOB SIZE=32');
+        List.Add('BLOBS TO CACHE=64');
+        List.Add('COLLCHAR=(0,1,2)');
+        List.Add('DATE MODE=0');
+        List.Add('DATE SEPARATOR=/');
+        List.Add('DBNLS=(0,1,2)');
+        List.Add('ENABLE BCD=(TRUE, FALSE)');
+        List.Add('ENABLE SCHEMA CACHE=(TRUE, FALSE)');
+        List.Add('LANGDRIVER=' + BDE_LANGDRIVER);
+        List.Add('LIST SYNONYMS=(NONE,ALL,PRIVATE)');
+        List.Add('LOCK MODE=5');
+        List.Add('MAX ROWS=-1');
+        List.Add('OPEN MODE=(READ/WRITE,READ ONLY)');
+        List.Add('SCHEMA CACHE DIR=<dir>');
+        List.Add('SCHEMA CACHE SIZE=8');
+        List.Add('SCHEMA CACHE TIME=-1');
+        List.Add('SQLPASSTHRU MODE=(SHARED AUTOCOMMIT,SHARED NOAUTOCOMMIT,NOT SHARED)');
+        List.Add('SQLQRYMODE=(LOCAL,SERVER)');
+      end;
+    bdeINTRBASE: begin
+        List.Add('BATCH COUNT=200');
+        List.Add('BLOB SIZE=32');
+        List.Add('BLOBS TO CACHE=64');
+        List.Add('COMMIT RETAIN=(FALSE)');
+        List.Add('ENABLE BCD=(TRUE, FALSE)');
+        List.Add('ENABLE SCHEMA CACHE=(TRUE, FALSE)');
+        List.Add('LANGDRIVER=' + BDE_LANGDRIVER);
+        List.Add('MAX ROWS=-1');
+        List.Add('OPEN MODE=(READ/WRITE,READ ONLY)');
+        List.Add('ROLE NAME=<rolename>');
+        List.Add('SCHEMA CACHE DIR=<dir>');
+        List.Add('SCHEMA CACHE SIZE=8');
+        List.Add('SCHEMA CACHE TIME=-1');
+        List.Add('SQLPASSTHRU MODE=(SHARED AUTOCOMMIT,SHARED NOAUTOCOMMIT,NOT SHARED)');
+        List.Add('SQLQRYMODE=(LOCAL,SERVER)');
+        List.Add('WAIT ON LOCKS=(FALSE)');
+      end;
+    bdeMSACCESS: begin
+        //List.Add('DATABASE NAME');  { DRIVE:/PATH/DATABASE.MDB}
+        List.Add('LANGDRIVER=' + BDE_LANGDRIVER);
+        List.Add('OPEN MODE=(READ/WRITE,READ ONLY)');
+        List.Add('SYSTEM DATABASE=(<file>.MDW)');
+      end;
+    bdeMSSQL: begin
+        List.Add('APPLICATION MODE');   { }
+        List.Add('BATCH COUNT=200');
+        List.Add('BLOB EDIT LOGGING=(TRUE, FALSE)');
+        List.Add('BLOB SIZE=32');
+        List.Add('BLOBS TO CACHE=64');
+        //List.Add('DATABASE NAME');  { }
+        List.Add('DATE MODE=0');
+        List.Add('ENABLE BCD=(TRUE, FALSE)');
+        List.Add('ENABLE SCHEMA CACHE=(TRUE, FALSE)');
+        //List.Add('HOST NAME');      { }
+        List.Add('LANGDRIVER=' + BDE_LANGDRIVER);
+        List.Add('MAX QUERY TIME=300');
+        List.Add('NATIONAL LANG NAME=');
+        List.Add('MAX ROWS=-1');
+        List.Add('OPEN MODE=(READ/WRITE,READ ONLY)');
+        List.Add('SCHEMA CACHE DIR=<dir>');
+        List.Add('SCHEMA CACHE SIZE=8');
+        List.Add('SCHEMA CACHE TIME=-1');
+        List.Add('SQLPASSTHRU MODE=(SHARED AUTOCOMMIT,SHARED NOAUTOCOMMIT,NOT SHARED)');
+        List.Add('SQLQRYMODE=(LOCAL,SERVER)');
+        List.Add('TDS PACKET SIZE=4096');
+      end;
+    bdeORACLE: begin
+        List.Add('BATCH COUNT=200');
+        List.Add('BLOB SIZE=32');
+        List.Add('BLOBS TO CACHE=64');
+        List.Add('ENABLE BCD=(TRUE, FALSE)');
+        List.Add('ENABLE INTEGERS=(TRUE, FALSE)');
+        List.Add('ENABLE SCHEMA CACHE=(TRUE, FALSE)');
+        List.Add('LANGDRIVER=' + BDE_LANGDRIVER);
+        List.Add('LIST SYNONYMS=(NONE,ALL,PRIVATE)');
+        List.Add('MAX ROWS=-1');
+        List.Add('OPEN MODE=(READ/WRITE,READ ONLY)');
+        List.Add('NET PROTOCOL=(TNS,TCP/IP,SPX/IPX,NETBIOS,NAMED PIPES,DECNET,3270,VINES,APPC,ASYNC)');
+        List.Add('OBJECT MODE=(TRUE, FALSE)');
+        List.Add('ROWSET SIZE=20');
+        List.Add('SCHEMA CACHE DIR=<dir>');
+        List.Add('SCHEMA CACHE SIZE=8');
+        List.Add('SCHEMA CACHE TIME=-1');
+        List.Add('SQLPASSTHRU MODE=(SHARED AUTOCOMMIT,SHARED NOAUTOCOMMIT,NOT SHARED)');
+        List.Add('SQLQRYMODE=(LOCAL,SERVER)');
+      end;
+    bdeSYBASE: begin
+        List.Add('APPLICATION MODE=');
+        List.Add('BATCH COUNT=200');
+        List.Add('BLOB EDIT LOGGING=(TRUE, FALSE)');
+        List.Add('BLOB SIZE=32');
+        List.Add('BLOBS TO CACHE=64');
+        List.Add('CS CURSOR ROWS=1');
+        //List.Add('DATABASE NAME');  { }
+        List.Add('DATE MODE=0');
+        List.Add('ENABLE BCD=(TRUE, FALSE)');
+        List.Add('ENABLE SCHEMA CACHE=(TRUE, FALSE)');
+        List.Add('HOST NAME=');         { }
+        List.Add('LANGDRIVER=' + BDE_LANGDRIVER);
+        List.Add('MAX QUERY TIME=300');
+        List.Add('NATIONAL LANG NAME=');
+        List.Add('MAX ROWS=-1');
+        List.Add('OPEN MODE=(READ/WRITE,READ ONLY)');
+        List.Add('SCHEMA CACHE DIR=<dir>');
+        List.Add('SCHEMA CACHE SIZE=8');
+        List.Add('SCHEMA CACHE TIME=-1');
+        List.Add('SQLPASSTHRU MODE=(SHARED AUTOCOMMIT,SHARED NOAUTOCOMMIT,NOT SHARED)');
+        List.Add('SQLQRYMODE=(LOCAL,SERVER)');
+        List.Add('TDS PACKET SIZE=512');
+      end;
+    bdeODBC: begin
+        List.Add('BATCH COUNT=200');
+        List.Add('BLOB SIZE=32');
+        List.Add('BLOBS TO CACHE=64');
+        //List.Add('DATABASE NAME=');  { }
+        List.Add('ENABLE BCD=(TRUE, FALSE)');
+        List.Add('ENABLE SCHEMA CACHE=(TRUE, FALSE)');
+        List.Add('LANGDRIVER=' + BDE_LANGDRIVER);
+        List.Add('MAX ROWS=-1');
+        List.Add('OPEN MODE=(READ/WRITE,READ ONLY)');
+        List.Add('ODBC DSN=<odbc dsn>');
+        List.Add('ROWSET SIZE=20');
+        List.Add('SCHEMA CACHE DIR=<dir>');
+        List.Add('SCHEMA CACHE SIZE=8');
+        List.Add('SCHEMA CACHE TIME=-1');
+        List.Add('SQLPASSTHRU MODE=(SHARED AUTOCOMMIT,SHARED NOAUTOCOMMIT,NOT SHARED)');
+        List.Add('SQLQRYMODE=(LOCAL,SERVER)');
+      end;
+  end;
+  List.Add('TransIsolation=(tiDirtyRead,tiReadCommitted,tiRepeatableRead)');
+end;
+
+function TDAEBDEDriver.GetAvailableDriverOptions: TDAAvailableDriverOptions;
+begin
+  result := [doAuxDriver, doServerName, doDatabaseName, doLogin, doCustom];
+  { TODO -c???: GetAuxParams }
+end;
+
+function TDAEBDEDriver.GetAvailableDriverOptionsEx(
+  AuxDriver: string): TDAAvailableDriverOptions;
+begin
+  case ProviderToProviderType(AuxDriver) of
+    bdeSTANDARD: result :=  [doAuxDriver, doDatabaseName, doCustom];
+    bdeDB2:      result :=  [doAuxDriver, doServerName, doLogin, doCustom];
+    bdeMSACCESS: result :=  [doAuxDriver, doDatabaseName, doLogin, doCustom];
+  else
+    result := [doAuxDriver, doServerName, doDatabaseName, doLogin, doCustom];
+  end;
+end;
+
+function TDAEBDEDriver.GetConnectionClass: TDAEConnectionClass;
+begin
+  result := TDAEBDEConnection;
+end;
+
+function TDAEBDEDriver.GetDefaultConnectionType(
+  const AuxDriver: string): string;
+begin
+  case ProviderToProviderType(AuxDriver) of
+    bdeSTANDARD : Result := Paradox_DriverType;
+    bdeDB2 : Result := DB2_DriverType;
+    bdeINFORMIX: Result := Informix_DriverType;
+    bdeINTRBASE : Result := IB_DriverType;
+    bdeMSACCESS : Result := Access_DriverType;
+    bdeMSSQL: Result:=MSSQL_DriverType;
+    bdeORACLE: Result:=Oracle_DriverType;
+    bdeSYBASE: Result:=Sybase_DriverType;
+    bdeODBC: Result:=ODBC_DriverType;
+  else
+    Result := inherited GetDefaultConnectionType(AuxDriver);
+  end;
+end;
+
+function TDAEBDEDriver.GetDescription: string;
+begin
+  result := 'Borland BDE Driver';
+end;
+
+function TDAEBDEDriver.GetDriverID: string;
+begin
+  result := 'BDE';
+end;
+
+function Need_ODBC_DSN(Provider: string): boolean;
+var
+  List                        : TStringList;
+begin
+  List := TStringList.Create;
+  try
+    try
+      if Session.IsAlias(Provider) then
+        Session.GetAliasParams(Provider, List)
+      else
+        Session.GetDriverParams(Provider, List);
+      Result := List.Values['ODBC DSN'] = '';
+    except
+      // in case is invalid Provider, error is raised
+      Result := False;
+    end;
+  finally
+    List.Free;
+  end;
+end;
+
+function TDAEBDEDriver.GetProviderDefaultCustomParameters(
+  Provider: string): string;
+begin
+  Result := '';
+  if Provider = '' then Exit;
+  case ProviderToProviderType(Provider) of
+    bdeODBC: if Need_ODBC_DSN(Provider) then Result := 'ODBC DSN=<please specify!>';
+    bdeSTANDARD, bdeDB2, bdeMSACCESS: Result := 'TransIsolation=tiDirtyRead;';
+  end;
+end;
+
+{ TDAEBDEQuery }
+
+procedure TDAEBDEQuery.ClearParams;
+begin
+  inherited;
+  TQuery(Dataset).Params.Clear;
+end;
+
+function TDAEBDEQuery.CreateDataset(aConnection: TDAEConnection): TDataset;
+begin
+  result := TQuery.Create(nil);
+  TQuery(Result).DatabaseName := TDAEBDEConnection(aConnection).fDatabase.DatabaseName;
+  TQuery(Result).SessionName := TDAEBDEConnection(aConnection).fDatabase.SessionName;
+end;
+
+function TDAEBDEQuery.DoExecute: integer;
+begin
+  TQuery(Dataset).ExecSQL;
+  result := TQuery(Dataset).RowsAffected;
+end;
+
+function TDAEBDEQuery.DoGetSQL: string;
+begin
+  result := TQuery(Dataset).SQL.Text;
+end;
+
+procedure TDAEBDEQuery.DoPrepare(Value: boolean);
+begin
+  if Value then
+    TQuery(Dataset).Prepare
+  else
+    TQuery(Dataset).UnPrepare
+end;
+
+procedure TDAEBDEQuery.DoSetSQL(const Value: string);
+begin
+  TQuery(Dataset).SQL.Text := Value;
+end;
+
+procedure TDAEBDEQuery.GetParamValues(AParams: TDAParamCollection);
+begin
+  GetParamValuesStd(AParams,TQuery(Dataset).Params);
+end;
+
+procedure TDAEBDEQuery.RefreshParams;
+var
+  i                           : Integer;
+  par                         : TDAParam;
+  outpar                      : TParam;
+  ds                          : TQuery;
+begin
+  inherited;
+  ds := TQuery(Dataset);
+  if not Assigned(ds.Params) then Exit;
+  for i := 0 to ds.Params.Count - 1 do begin
+    outpar := ds.Params[i];
+
+    par := self.ParamByName(outpar.Name);
+
+    if outpar.DataType <> ftUnknown then
+      par.DataType := VCLTypeToDAType(outpar.DataType);
+  end;
+end;
+
+procedure TDAEBDEQuery.SetParamValues(AParams: TDAParamCollection);
+begin
+  SetParamValuesStd(AParams,TQuery(Dataset).Params);
+end;
+
+{ TDAEBDEStoredProcedure }
+
+function TDAEBDEStoredProcedure.CreateDataset(
+  aConnection: TDAEConnection): TDataset;
+begin
+  result := TStoredProc.Create(nil);
+  TStoredProc(result).DatabaseName := TDAEBDEConnection(aConnection).fDatabase.DatabaseName;
+  TStoredProc(result).SessionName := TDAEBDEConnection(aConnection).fDatabase.SessionName;
+end;
+
+function TDAEBDEStoredProcedure.DoExecute: integer;
+begin
+  Result := -1;
+  TStoredProc(Dataset).ExecProc;
+end;
+
+procedure TDAEBDEStoredProcedure.DoPrepare(Value: boolean);
+begin
+  if value then
+    TStoredProc(Dataset).Prepare
+  else
+    TStoredProc(Dataset).UnPrepare
+end;
+
+function TDAEBDEStoredProcedure.Execute: integer;
+var
+  i                           : integer;
+  ds                          : TStoredProc;
+begin
+  ds := TStoredProc(Dataset);
+
+  for i := ds.Params.Count - 1 downto 0 do begin
+    if (ds.Params[i].DataType = ftInterface) and
+      (ds.Params[i].ParamType in [ptOutput, ptInputOutput, ptReSult]) then
+      ds.Params.Delete(i);
+  end;
+
+  SetParamValuesStd(GetParams, TStoredProc(Dataset).Params);
+
+  Result:= DoExecute;
+  ds.GetResults;
+
+  GetParamValuesStd(GetParams, TStoredProc(Dataset).Params);
+end;
+
+procedure TDAEBDEStoredProcedure.GetParamValues(AParams: TDAParamCollection);
+begin
+  GetParamValuesStd(AParams, TStoredProc(Dataset).Params);
+end;
+
+function TDAEBDEStoredProcedure.GetStoredProcedureName: string;
+begin
+  result := TStoredProc(Dataset).StoredProcName;
+end;
+
+procedure TDAEBDEStoredProcedure.RefreshParams;
+var
+  dsparams                    : TParams;
+begin
+  dsparams := TParams.Create(nil);
+  try
+    TStoredProc(Dataset).CopyParams(dsParams);
+    RefreshParamsStd(dsparams);
+  finally
+    dsParams.Free;
+  end;
+end;
+
+procedure TDAEBDEStoredProcedure.SetParamValues(
+  AParams: TDAParamCollection);
+begin
+  SetParamValuesStd(AParams, TStoredProc(Dataset).Params);
+end;
+
+procedure TDAEBDEStoredProcedure.SetStoredProcedureName(
+  const Name: string);
+begin
+  TStoredProc(Dataset).StoredProcName := Name;
+end;
+
+{ TDAEBDEConnection }
+
+function TDAEBDEConnection.CreateCustomConnection: TCustomConnection;
+begin
+  FDatabase := TDatabase.Create(nil);
+  FSession := TSession.Create(nil);
+  FSession.AutoSessionName := True;
+  fDatabase.SessionName := FSession.SessionName;
+  Result := fDatabase;
+  fDatabase.LoginPrompt := False;
+  fDatabase.DatabaseName := copy(NewStrippedGuidAsString, 1, 30);
+end;
+
+function TDAEBDEConnection.CreateMacroProcessor: TDASQLMacroProcessor;
+begin
+  {$IFDEF MAX_SUPPORT}
+  case fProviderType of
+    bdeINTRBASE: Result := IB_CreateMacroProcessor;
+    bdeMSSQL: Result := MSSQL_CreateMacroProcessor;
+    bdeORACLE: Result := Oracle_CreateMacroProcessor;
+  else
+    Result:=inherited CreateMacroProcessor;  
+  end;
+  {$ELSE}
+    Result:=inherited CreateMacroProcessor;    
+  {$ENDIF}
+end;
+
+destructor TDAEBDEConnection.Destroy;
+begin
+  FreeAndNil(FSession);
+  inherited;
+end;
+
+procedure TDAEBDEConnection.DoApplyConnectionString(
+  aConnStrParser: TDAConnectionStringParser;
+  aConnectionObject: TCustomConnection);
+
+  procedure SetUserNamePassword;
+  begin
+    with aConnStrParser do begin
+      if (Self.UserID <> '') then
+        fDatabase.Params.Values['USER NAME'] := Self.UserID
+      else if (UserID <> '') then
+        fDatabase.Params.Values['USER NAME'] := UserID;
+
+      if (Self.Password <> '') then
+        fDatabase.Params.Values['PASSWORD'] := Self.Password
+      else if (Password <> '') then
+        fDatabase.Params.Values['PASSWORD'] := Password;
+    end;
+  end;
+
+var
+  i                           : Integer;
+begin
+  inherited;
+  with aConnStrParser do begin
+    if AuxDriver <> '' then begin
+      fDatabase.Params.Clear;
+      fDatabase.AliasName := '';
+      fDatabase.DriverName := '';
+      fProviderType := ProviderToProviderType(AuxDriver);
+      if fDatabase.Session.IsAlias(AuxDriver) then
+        fDatabase.AliasName := AuxDriver
+      else
+        fDatabase.DriverName := AuxDriver;
+    end
+    else
+      raise EDADriverException.Create('No aux driver specified for BDE connection');
+
+    fProviderName := AuxDriver;
+
+    case fProviderType of
+      bdeSTANDARD: begin
+          //fDatabase.Params.Values['DEFAULT DRIVER'] := ; {PARADOX, DBASE, FOXPRO, ASCIIDRV}
+          //fDatabase.Params.Values['ENABLE BCD'] :=   { TRUE / FALSE}
+          if Database <> '' then fDatabase.Params.Values['PATH'] := Database;
+        end;
+      bdeDB2: begin
+          //fDatabase.Params.Values['BATCH COUNT'] :=  { = 200}
+          //fDatabase.Params.Values['BLOB SIZE'] :=   { = 32}
+          //fDatabase.Params.Values['BLOBS TO CACHE'] := { = 64}
+          if Server <> '' then fDatabase.Params.Values['DB2 DSN'] := Server; { = 'DB2_SERVER'}
+          //fDatabase.Params.Values['ENABLE BCD'] :=   { TRUE / FALSE}
+          //fDatabase.Params.Values['ENABLE SCHEMA CACHE'] :=   { TRUE / FALSE}
+          //fDatabase.Params.Values['LANGDRIVER'] :=   { ...}
+          //fDatabase.Params.Values['MAX ROWS'] :=   { = -1}
+          //fDatabase.Params.Values['OPEN MODE'] :=   { READ/WRITE, READ ONLY}
+          //fDatabase.Params.Values['ROWSET SIZE'] :=   { = 20}
+          //fDatabase.Params.Values['SCHEMA CACHE DIR'] :=   { = ''}
+          //fDatabase.Params.Values['SCHEMA CACHE SIZE'] :=   { = 8}
+          //fDatabase.Params.Values['SCHEMA CACHE TIME'] :=   { = -1}
+          //fDatabase.Params.Values['SQLPASSTHRU MODE'] :=   { SHARED AUTOCOMMIT, SHARED NOAUTOCOMMIT, NOT SHARED}
+          //fDatabase.Params.Values['SQLQRYMODE'] :=   { = '',LOCAL,SERVER}
+          SetUserNamePassword;
+        end;
+      bdeINFORMIX: begin
+          //fDatabase.Params.Values['BATCH COUNT'] :=  { = 200}
+          //fDatabase.Params.Values['BLOB SIZE'] :=   { = 32}
+          //fDatabase.Params.Values['BLOBS TO CACHE'] := { = 64}
+          //fDatabase.Params.Values['COLLCHAR'] := { = 0,1,2}
+          if Database <> '' then fDatabase.Params.Values['DATABASE NAME'] := Database;
+          //fDatabase.Params.Values['DATE MODE'] := { = 0};
+          //fDatabase.Params.Values['DATE SEPARATOR'] := { = '/'};
+          //fDatabase.Params.Values['DBNLS'] := { = '',0,1,2};
+          //fDatabase.Params.Values['ENABLE BCD'] :=   { TRUE / FALSE}
+          //fDatabase.Params.Values['ENABLE SCHEMA CACHE'] :=   { TRUE / FALSE}
+          //fDatabase.Params.Values['LANGDRIVER'] :=   { ...}
+          //fDatabase.Params.Values['LIST SYNONYMS'] :=   { NONE, ALL, PRIVATE}
+          //fDatabase.Params.Values['LOCK MODE'] :=   { = 5}
+          //fDatabase.Params.Values['MAX ROWS'] :=   { = -1}
+          //fDatabase.Params.Values['OPEN MODE'] :=   { READ/WRITE, READ ONLY}
+          //fDatabase.Params.Values['SCHEMA CACHE DIR'] :=   { = ''}
+          //fDatabase.Params.Values['SCHEMA CACHE SIZE'] :=   { = 8}
+          //fDatabase.Params.Values['SCHEMA CACHE TIME'] :=   { = -1}
+          if Server <> '' then fDatabase.Params.Values['SERVER NAME'] := Server;
+          //fDatabase.Params.Values['SQLPASSTHRU MODE'] :=   { SHARED AUTOCOMMIT, SHARED NOAUTOCOMMIT, NOT SHARED}
+          //fDatabase.Params.Values['SQLQRYMODE'] :=   { = '',LOCAL,SERVER}
+          SetUserNamePassword;
+        end;
+      bdeINTRBASE: begin
+          //fDatabase.Params.Values['BATCH COUNT'] :=  { = 200}
+          //fDatabase.Params.Values['BLOB SIZE'] :=   { = 32}
+          //fDatabase.Params.Values['BLOBS TO CACHE'] := { = 64}
+          //fDatabase.Params.Values['COMMIT RETAIN'] := { = FALSE}
+          //fDatabase.Params.Values['ENABLE BCD'] :=   { TRUE / FALSE}
+          //fDatabase.Params.Values['ENABLE SCHEMA CACHE'] :=   { TRUE / FALSE}
+          //fDatabase.Params.Values['LANGDRIVER'] :=   { ...}
+          //fDatabase.Params.Values['MAX ROWS'] :=   { = -1}
+          //fDatabase.Params.Values['OPEN MODE'] :=   { READ/WRITE, READ ONLY}
+          //fDatabase.Params.Values['ROLE NAME'] :=   { = ''}
+          //fDatabase.Params.Values['SCHEMA CACHE DIR'] :=   { = ''}
+          //fDatabase.Params.Values['SCHEMA CACHE SIZE'] :=   { = 8}
+          //fDatabase.Params.Values['SCHEMA CACHE TIME'] :=   { = -1}
+          if Database <> '' then fDatabase.Params.Values['SERVER NAME'] := StringReplace(Database, '\', '/', [rfReplaceAll]); { = IB_SERVER:/PATH/DATABASE.GDB}
+          if Server <> '' then fDatabase.Params.Values['SERVER NAME'] := Server + ':' + fDatabase.Params.Values['SERVER NAME']; { = IB_SERVER:/PATH/DATABASE.GDB}
+          //fDatabase.Params.Values['SQLPASSTHRU MODE'] :=   { SHARED AUTOCOMMIT, SHARED NOAUTOCOMMIT, NOT SHARED}
+          //fDatabase.Params.Values['SQLQRYMODE'] :=   { = '',LOCAL,SERVER}
+          SetUserNamePassword;
+          //fDatabase.Params.Values['WAIT ON LOCKS'] := {FALSE};
+        end;
+      bdeMSACCESS: begin
+          if Database <> '' then fDatabase.Params.Values['DATABASE NAME'] := StringReplace(Database, '\', '/', [rfReplaceAll]); { DRIVE:/PATH/DATABASE.MDB}
+          //fDatabase.Params.Values['LANGDRIVER'] :=   { ...}
+          //fDatabase.Params.Values['OPEN MODE'] :=   { READ/WRITE, READ ONLY}
+          //fDatabase.Params.Values['SYSTEM DATABASE'] :=   { *.MDW}
+          SetUserNamePassword;
+        end;
+      bdeMSSQL: begin
+          //fDatabase.Params.Values['APPLICATION MODE'] := { }
+          //fDatabase.Params.Values['BATCH COUNT'] :=  { = 200}
+          //fDatabase.Params.Values['BLOB EDIT LOGGING'] :=  { '',TRUE,FALSE}
+          //fDatabase.Params.Values['BLOB SIZE'] :=   { = 32}
+          //fDatabase.Params.Values['BLOBS TO CACHE'] := { = 64}
+          if Database <> '' then fDatabase.Params.Values['DATABASE NAME'] := Database;
+          //fDatabase.Params.Values['DATE MODE'] := { = 0};
+          //fDatabase.Params.Values['ENABLE BCD'] :=   { TRUE / FALSE}
+          //fDatabase.Params.Values['ENABLE SCHEMA CACHE'] :=   { TRUE / FALSE}
+          //fDatabase.Params.Values['HOST NAME'] := { };
+          //fDatabase.Params.Values['LANGDRIVER'] :=   { ...}
+          //fDatabase.Params.Values['MAX QUERY TIME'] :=   { 300}
+          //fDatabase.Params.Values['MAX ROWS'] :=   { = -1}
+          //fDatabase.Params.Values['NATIONAL LANG NAME'] :=   { }
+          //fDatabase.Params.Values['OPEN MODE'] :=   { READ/WRITE, READ ONLY}
+          //fDatabase.Params.Values['SCHEMA CACHE DIR'] :=   { = ''}
+          //fDatabase.Params.Values['SCHEMA CACHE SIZE'] :=   { = 8}
+          //fDatabase.Params.Values['SCHEMA CACHE TIME'] :=   { = -1}
+          if Server <> '' then fDatabase.Params.Values['SERVER NAME'] := Server; { = MSS_SERVER}
+          //fDatabase.Params.Values['SQLPASSTHRU MODE'] :=   { SHARED AUTOCOMMIT, SHARED NOAUTOCOMMIT, NOT SHARED}
+          //fDatabase.Params.Values['SQLQRYMODE'] :=   { = '',LOCAL,SERVER}
+          //fDatabase.Params.Values['TDS PACKET SIZE'] :=   { = 4096}
+          SetUserNamePassword;
+        end;
+      bdeORACLE: begin
+          //fDatabase.Params.Values['BATCH COUNT'] :=  { = 200}
+          //fDatabase.Params.Values['BLOB SIZE'] :=   { = 32}
+          //fDatabase.Params.Values['BLOBS TO CACHE'] := { = 64}
+          //fDatabase.Params.Values['ENABLE BCD'] :=   { TRUE / FALSE}
+          //fDatabase.Params.Values['ENABLE INTEGERS'] :=   { TRUE / FALSE}
+          //fDatabase.Params.Values['ENABLE SCHEMA CACHE'] :=   { TRUE / FALSE}
+          //fDatabase.Params.Values['LANGDRIVER'] :=   { ...}
+          //fDatabase.Params.Values['LIST SYNONYMS'] :=   { NONE, ALL, PRIVATE}
+          //fDatabase.Params.Values['MAX ROWS'] :=   { = -1}
+          //fDatabase.Params.Values['NET PROTOCOL'] :=   { = TNS, TCP/IP,SPX/IPX,NETBIOS,NAMED PIPES,DECNET,3270,VINES,APPC,ASYNC}
+          //fDatabase.Params.Values['OBJECT MODE'] :=   { = TRUE/FALSE}
+          //fDatabase.Params.Values['OPEN MODE'] :=   { READ/WRITE, READ ONLY}
+          //fDatabase.Params.Values['ROWSET SIZE'] :=   { = 20}
+          //fDatabase.Params.Values['SCHEMA CACHE DIR'] :=   { = ''}
+          //fDatabase.Params.Values['SCHEMA CACHE SIZE'] :=   { = 8}
+          //fDatabase.Params.Values['SCHEMA CACHE TIME'] :=   { = -1}
+          if Server <> '' then fDatabase.Params.Values['SERVER NAME'] := Server; { = ORA_SERVER}
+          //fDatabase.Params.Values['SQLPASSTHRU MODE'] :=   { SHARED AUTOCOMMIT, SHARED NOAUTOCOMMIT, NOT SHARED}
+          //fDatabase.Params.Values['SQLQRYMODE'] :=   { = '',LOCAL,SERVER}
+          SetUserNamePassword;
+        end;
+      bdeSYBASE: begin
+          //fDatabase.Params.Values['APPLICATION MODE'] := { }
+          //fDatabase.Params.Values['BATCH COUNT'] :=  { = 200}
+          //fDatabase.Params.Values['BLOB EDIT LOGGING'] :=  { '',TRUE,FALSE}
+          //fDatabase.Params.Values['BLOB SIZE'] :=   { = 32}
+          //fDatabase.Params.Values['BLOBS TO CACHE'] := { = 64}
+          //fDatabase.Params.Values['CS CURSOR ROWS'] := { = 1}
+          if Database <> '' then fDatabase.Params.Values['DATABASE NAME'] := Database;
+          //fDatabase.Params.Values['DATE MODE'] := { = 0};
+          //fDatabase.Params.Values['ENABLE BCD'] :=   { TRUE / FALSE}
+          //fDatabase.Params.Values['ENABLE SCHEMA CACHE'] :=   { TRUE / FALSE}
+          //fDatabase.Params.Values['HOST NAME'] := { };
+          //fDatabase.Params.Values['LANGDRIVER'] :=   { ...}
+          //fDatabase.Params.Values['MAX QUERY TIME'] :=   { 300}
+          //fDatabase.Params.Values['MAX ROWS'] :=   { = -1}
+          //fDatabase.Params.Values['NATIONAL LANG NAME'] :=   { }
+          //fDatabase.Params.Values['OPEN MODE'] :=   { READ/WRITE, READ ONLY}
+          //fDatabase.Params.Values['SCHEMA CACHE DIR'] :=   { = ''}
+          //fDatabase.Params.Values['SCHEMA CACHE SIZE'] :=   { = 8}
+          //fDatabase.Params.Values['SCHEMA CACHE TIME'] :=   { = -1}
+          if Server <> '' then fDatabase.Params.Values['SERVER NAME'] := Server; { = SYB_SERVER}
+          //fDatabase.Params.Values['SQLPASSTHRU MODE'] :=   { SHARED AUTOCOMMIT, SHARED NOAUTOCOMMIT, NOT SHARED}
+          //fDatabase.Params.Values['SQLQRYMODE'] :=   { = '',LOCAL,SERVER}
+          //fDatabase.Params.Values['TDS PACKET SIZE'] :=   { = 512}
+          SetUserNamePassword;
+        end;
+      bdeODBC: begin
+          //fDatabase.Params.Values['BATCH COUNT'] :=  { = 200}
+          //fDatabase.Params.Values['BLOB SIZE'] :=   { = 32}
+          //fDatabase.Params.Values['BLOBS TO CACHE'] := { = 64}
+          if Database <> '' then fDatabase.Params.Values['DATABASE NAME'] := Database;
+          //fDatabase.Params.Values['ENABLE BCD'] :=   { TRUE / FALSE}
+          //fDatabase.Params.Values['ENABLE SCHEMA CACHE'] :=   { TRUE / FALSE}
+          //fDatabase.Params.Values['LANGDRIVER'] :=   { ...}
+          //fDatabase.Params.Values['MAX ROWS'] :=   { = -1}
+          //fDatabase.Params.Values['ODBC DSN'] :=   {}
+          //fDatabase.Params.Values['OPEN MODE'] :=   { READ/WRITE, READ ONLY}
+          //fDatabase.Params.Values['ROWSET SIZE'] :=   { = 20}
+          //fDatabase.Params.Values['SCHEMA CACHE DIR'] :=   { = ''}
+          //fDatabase.Params.Values['SCHEMA CACHE SIZE'] :=   { = 8}
+          //fDatabase.Params.Values['SCHEMA CACHE TIME'] :=   { = -1}
+          //fDatabase.Params.Values['SQLPASSTHRU MODE'] :=   { SHARED AUTOCOMMIT, SHARED NOAUTOCOMMIT, NOT SHARED}
+          //fDatabase.Params.Values['SQLQRYMODE'] :=   { = '',LOCAL,SERVER}
+          SetUserNamePassword;
+        end;
+    end;
+    for i := 0 to AuxParamsCount - 1 do begin
+      if AnsiSameText(AuxParamNames[i], 'TransIsolation') then begin
+          if AnsiSameText(AuxParams[AuxParamNames[i]], 'tiDirtyRead') then fDatabase.TransIsolation := tiDirtyRead else
+          if AnsiSameText(AuxParams[AuxParamNames[i]], 'tiReadCommitted') then fDatabase.TransIsolation := tiReadCommitted else
+          if AnsiSameText(AuxParams[AuxParamNames[i]], 'tiRepeatableRead') then fDatabase.TransIsolation := tiRepeatableRead;
+      end
+      else
+        fDatabase.Params.Values[AuxParamNames[i]] := AuxParams[AuxParamNames[i]];
+    end;
+  end;
+end;
+
+function TDAEBDEConnection.DoBeginTransaction: integer;
+begin
+  result := -1;
+  fDatabase.StartTransaction;
+end;
+
+procedure TDAEBDEConnection.DoCommitTransaction;
+begin
+  fDatabase.Commit;
+end;
+
+procedure TDAEBDEConnection.DoGetForeignKeys(
+  out ForeignKeys: TDADriverForeignKeyCollection);
+begin
+  inherited DoGetForeignKeys(ForeignKeys);
+  {$IFDEF MAX_SUPPORT}
+  case fProviderType of
+    bdeINTRBASE: IB_DoGetForeignKeys(GetDatasetClass.Create(Self), ForeignKeys);
+    bdeMSSQL: MSSQL_DoGetForeignKeys(GetDatasetClass.Create(Self), ForeignKeys, True);
+    bdeORACLE: Oracle_DoGetForeignKeys(GetDatasetClass.Create(Self), ForeignKeys);
+  end;
+  {$ENDIF}
+end;
+
+function TDAEBDEConnection.DoGetInTransaction: boolean;
+begin
+  Result := fDatabase.InTransaction;
+end;
+
+function TDAEBDEConnection.DoGetLastAutoInc(
+  const GeneratorName: string): integer;
+begin
+  Result := inherited DoGetLastAutoInc(GeneratorName);
+  {$IFDEF MAX_SUPPORT}
+  case fProviderType of
+    bdeINTRBASE: Result := IB_GetLastAutoInc(GeneratorName, GetDatasetClass.Create(Self));
+    bdeMSSQL: Result := MSSQL_DoGetLastAutoInc(GeneratorName, GetDatasetClass.Create(Self));
+    bdeOracle: Result := Oracle_DoGetLastAutoInc(GeneratorName,GetDatasetClass.Create(Self));
+  end;
+  {$ENDIF}
+end;
+
+procedure TDAEBDEConnection.DoGetStoredProcedureNames(
+  out List: IROStrings);
+begin
+  inherited DoGetStoredProcedureNames(List);
+  {$IFDEF MAX_SUPPORT}
+  case fProviderType of
+    bdeINTRBASE: IB_GetObjectNames(GetDatasetClass.Create(Self), List, dotProcedure);
+    bdeMSSQL: MSSQL_DoGetNames(GetDatasetClass.Create(Self), List, dotProcedure, True);
+    bdeORACLE: Oracle_DoGetNames(GetDatasetClass.Create(Self), List, dotProcedure);
+  else
+    fDatabase.Session.GetStoredProcNames(fDatabase.DatabaseName, List.Strings);
+  end;
+  {$ELSE}
+  fDatabase.Session.GetStoredProcNames(fDatabase.DatabaseName, List.Strings);
+  {$ENDIF}
+end;
+
+procedure TDAEBDEConnection.DoGetStoredProcedureParams(
+  const aStoredProcedureName: string; out Params: TDAParamCollection);
+begin
+  {$IFDEF MAX_SUPPORT}
+  case fProviderType of
+    bdeOracle: Oracle_DoGetStoredProcedureParams(aStoredProcedureName, GetDatasetClass.Create(Self), Params);
+    bdeMSSQL:  MSSQL_DoGetStoredProcedureParams(aStoredProcedureName, GetDatasetClass.Create(Self), Params);
+  else
+    inherited DoGetStoredProcedureParams(aStoredProcedureName, Params);
+  end;
+  {$ELSE}
+  inherited DoGetStoredProcedureParams(aStoredProcedureName, Params);
+  {$ENDIF}
+end;
+
+procedure TDAEBDEConnection.DoGetTableFields(const aTableName: string;
+  out Fields: TDAFieldCollection);
+begin
+  {$IFDEF MAX_SUPPORT}
+  case fProviderType of
+    bdeINTRBASE: IB_GetTableFields(QuoteIdentifierIfNeeded(aTableName), GetDatasetClass.Create(Self), Fields);
+    bdeMSSQL: MSSQL_DoGetTableFields(QuoteIdentifierIfNeeded(aTableName), GetDatasetClass.Create(Self), Fields);
+    bdeOracle: Oracle_DoGetTableFields(QuoteIdentifierIfNeeded(aTableName), GetDatasetClass.Create(Self), Fields);
+  else
+    inherited DoGetTableFields(QuoteIdentifierIfNeeded(aTableName), Fields);
+  end;
+  {$ELSE}
+  inherited DoGetTableFields(QuoteIdentifierIfNeeded(aTableName), Fields);
+  {$ENDIF}
+end;
+
+procedure TDAEBDEConnection.DoGetTableNames(out List: IROStrings);
+begin
+  inherited DoGetTableNames(List);
+  {$IFDEF MAX_SUPPORT}
+  case fProviderType of
+    bdeINTRBASE: IB_GetObjectNames(GetDatasetClass.Create(Self), List, dotTable);
+    bdeMSSQL: MSSQL_DoGetNames(GetDatasetClass.Create(Self), List, dotTable, True);
+    bdeORACLE: Oracle_DoGetNames(GetDatasetClass.Create(Self), List, dotTable);
+  else
+    fDatabase.GetTableNames(List.Strings);
+  end;
+  {$ELSE}
+  fDatabase.GetTableNames(List.Strings);
+  {$ENDIF}
+end;
+
+procedure TDAEBDEConnection.DoGetViewNames(out List: IROStrings);
+begin
+  inherited DoGetViewNames(List);
+  {$IFDEF MAX_SUPPORT}
+  case fProviderType of
+    bdeINTRBASE: IB_GetObjectNames(GetDatasetClass.Create(Self), List, dotView);
+    bdeMSSQL: MSSQL_DoGetNames(GetDatasetClass.Create(Self), List, dotView, True);
+    bdeORACLE: Oracle_DoGetNames(GetDatasetClass.Create(Self), List, dotView);
+  end;
+  {$ENDIF}
+end;
+
+procedure TDAEBDEConnection.DoRollbackTransaction;
+begin
+  fDatabase.Rollback;
+end;
+
+function TDAEBDEConnection.GetDatabaseNames: IROStrings;
+begin
+  {$IFDEF MAX_SUPPORT}
+  case fProviderType of
+    bdeMSSQL: Result := MSSQL_GetDatabaseNames(Self);
+  else
+    Result := NewROStrings;
+    fDatabase.Session.GetDatabaseNames(Result.Strings);
+  end;
+  {$ELSE}
+  Result := NewROStrings;
+  fDatabase.Session.GetDatabaseNames(Result.Strings);
+  {$ENDIF}
+end;
+
+function TDAEBDEConnection.GetDatasetClass: TDAEDatasetClass;
+begin
+  Result := TDAEBDEQuery;
+end;
+
+function TDAEBDEConnection.GetFileExtensions: IROStrings;
+begin
+  case fProviderType of
+    bdeINTRBASE: Result := IB_GetFileExtensions;
+    bdeMSACCESS: Result := MSACCESS_GetFileExtensions;
+  else
+    Result := NewROStrings;
+  end;
+end;
+
+function TDAEBDEConnection.GetGeneratorNames: IROStrings;
+begin
+  case fProviderType of
+    bdeINTRBASE: Result:= IB_GetGeneratorNames(GetDatasetClass.Create(Self));
+  else
+    Result := NewROStrings;
+  end;
+end;
+
+function TDAEBDEConnection.GetNextAutoinc(
+  const GeneratorName: string): integer;
+begin
+  result := -1;
+  {$IFDEF MAX_SUPPORT}
+  case fProviderType of
+    bdeINTRBASE: Result := IB_GetNextAutoinc(GeneratorName, GetDatasetClass.Create(Self));
+    bdeOracle:   Result := Oracle_GetNextAutoinc(GeneratorName, GetDatasetClass.Create(Self));
+  end;
+  {$ENDIF}
+end;
+
+function TDAEBDEConnection.GetQuoteChars: TDAQuoteCharArray;
+begin
+  case fProviderType of
+    bdeMSSQL: result:=MSSQL_GetQuoteChars;
+    bdeORACLE: Result:= Oracle_GetQuoteChars;
+  else
+    Result[0] := '"';
+    Result[1] := '"';
+  end;
+end;
+
+function TDAEBDEConnection.GetSPSelectSyntax(
+  HasArguments: Boolean): string;
+begin
+  Result := inherited GetSPSelectSyntax(HasArguments);
+  {$IFDEF MAX_SUPPORT}
+  case fProviderType of
+    bdeINTRBASE: Result := IB_GetSPSelectSyntax(HasArguments);
+    bdeMSSQL: Result := MSSQL_GetSPSelectSyntax(HasArguments);
+    bdeOracle: Result := Oracle_GetSPSelectSyntax(HasArguments);
+  end;
+  {$ENDIF}
+end;
+
+function TDAEBDEConnection.GetStoredProcedureClass: TDAEStoredProcedureClass;
+begin
+  Result := TDAEBDEStoredProcedure;
+end;
+
+function TDAEBDEConnection.GetUserID: string;
+begin
+  Result:=fDatabase.Params.Values['USER NAME'];
+end;
+
+function TDAEBDEConnection.IdentifierNeedsQuoting(
+  const iIdentifier: string): boolean;
+begin
+  Result := inherited IdentifierNeedsQuoting(iIdentifier);
+  if not Result then
+    case fProviderType of
+      bdeMSSQL: Result := MSSQL_IdentifierNeedsQuoting(iIdentifier);
+      bdeINTRBASE: Result := IB_IdentifierNeedsQuoting(iIdentifier,1);
+      bdeORACLE: Result := Oracle_IdentifierNeedsQuoting(iIdentifier);
+      bdeDB2: Result := DB2_IdentifierNeedsQuoting(iIdentifier);
+      bdeSYBASE: Result := Sybase_IdentifierNeedsQuoting(iIdentifier);
+    else
+      Result := SQL92_IdentifierNeedsQuoting(iIdentifier);
+    end;
+end;
+
+function TDAEBDEConnection.QueryInterface(const IID: TGUID;
+  out Obj): HResult;
+begin
+  Result := E_NOINTERFACE;
+
+  if IsEqualGUID(IID, IDADB2Connection) then begin
+    if not (fProviderType in [bdeDB2]) then Exit;
+  end;
+
+  if IsEqualGUID(IID, IDASybaseConnection) then begin
+    if not (fProviderType in [bdeSYBASE]) then Exit;
+  end;
+
+  if IsEqualGUID(IID, IDAInterbaseConnection) then begin
+    if not (fProviderType in [bdeINTRBASE]) then Exit;
+  end;
+
+  if IsEqualGUID(IID, IDAADOConnection) then begin
+    if not (fProviderType in [bdeMSSQL]) then Exit;
+  end;
+
+  if IsEqualGUID(IID, IDAOracleConnection) then begin
+    if not (fProviderType in [bdeOracle]) then Exit;
+  end;
+
+  if IsEqualGUID(IID, IDAUseGenerators) then begin
+    if not (fProviderType in [bdeINTRBASE, bdeOracle]) then Exit;
+  end;
+
+  if IsEqualGUID(IID, IDACanQueryGeneratorsNames) then begin
+    if not (fProviderType in [bdeINTRBASE]) then Exit;
+  end;
+
+  if IsEqualGUID(IID, IDAFileBasedDatabase) then begin
+    if not (fProviderType in [bdeINTRBASE, bdeMSACCESS]) then Exit;
+  end;
+
+  if IsEqualGUID(IID, IDACanQueryDatabaseNames) then begin
+    if not (fProviderType in [bdeINFORMIX, bdeMSSQL, bdeORACLE, bdeSYBASE]) then Exit;
+  end;
+
+  if IsEqualGUID(IID, IDADirectoryBasedDatabase) then begin
+    if not (fProviderType in [bdeSTANDARD]) then Exit;
+  end;
+
+  Result := inherited QueryInterface(IID, Obj);
+end;
+
+procedure Register;
+begin
+  RegisterComponents(DAPalettePageName, [TDABDEDriver]);
+end;
+
+exports
+  GetDriverObject name func_GetDriverObject;
+
+function TDAEBDEConnection.QuoteFieldName(const aTableName,
+  aFieldName: string): string;
+begin
+  Result := inherited QuoteFieldName(aTableName, aFieldName);
+  case fProviderType of
+    bdeSTANDARD:
+      if (aTableName <> '') and (aFieldName <> Result) then
+        Result := QuoteIdentifierIfNeeded(aTableName) + '.' + Result;
+  end;
+end;
+
+initialization
+  _driver := nil;
+  RegisterDriverProc(GetDriverObject);
+finalization
+  UnregisterDriverProc(GetDriverObject);
+  FreeAndNIL(_driver);
+end.
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDACRLabsUtils.inc b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDACRLabsUtils.inc
new file mode 100644
index 0000000..5cf9450
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDACRLabsUtils.inc	
@@ -0,0 +1,60 @@
+{
+                             !!! DO NOT REMOVE THIS FILE !!!
+
+  It's included with an $I directive in the SDAC and ODAC driver units and it's used in
+  their implementation of the IDAMustSetParams
+  
+}
+procedure WriteCrLabsParamValues(InputParams : TDAParamCollection; OutputParams: TDAParams; IgnoreBlobType : boolean = false);
+var i : integer;
+    par : uDAInterfaces.TDAParam;
+    outpar : DBAccess.TDAParam;
+    blobtype : TFieldType;
+begin
+  for i := 0 to (InputParams.Count-1) do begin
+    par := InputParams[i];
+    outpar := OutputParams.ParamByName(par.Name);
+
+    // If no blob type is specified, then gets the default field type.
+    // BlobType is only meaningful to Oracle. MSSQL works fine just setting the DataType
+    blobtype := BlobTypeMappings[par.BlobType];
+    if (blobtype=ftUnknown)
+      then blobtype := DADataTypesMappings[par.DataType];
+
+    case par.DataType of
+      datBlob : begin
+          outpar.ParamType := TParamType(par.ParamType);
+          outpar.DataType := DADataTypesMappings[par.DataType];
+          if VarIsNull(par.Value) then 
+            outpar.Clear
+          else begin
+            if VarIsArray(par.Value) then
+              outpar.Value := VariantBinaryToString(par.Value)
+            else
+              outpar.Value := par.Value;
+          end;    
+        end;
+      datMemo : begin
+          outpar.ParamType := TParamType(par.ParamType);
+          outpar.DataType := ftMemo;
+
+          // Only happens with Oracle
+          if not IgnoreBlobType and (blobtype<>ftUnknown) then
+            outpar.DataType := blobtype;
+
+          if VarIsNull(par.Value) then 
+            outpar.Clear
+          else
+            outpar.Value := par.Value;
+        end;
+      else begin
+        outpar.ParamType := TParamType(par.ParamType);
+        outpar.DataType := DADataTypesMappings[par.DataType];
+        if VarIsNull(par.Value)
+          then outpar.Clear
+          else outpar.Value := par.Value;
+      end;
+    end; { case }
+  end; { for }
+end;
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDADBISAMDriver.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDADBISAMDriver.pas
new file mode 100644
index 0000000..e6c4f61
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDADBISAMDriver.pas	
@@ -0,0 +1,1110 @@
+unit uDADBISAMDriver;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Driver Library
+{
+{ compiler: Delphi 6 and up
+{ platform: Win32
+{
+{ (c)opyright RemObjects Software. all rights reserved.
+{
+{ Using this code requires a valid license of the Data Abstract
+{ which can be obtained at http://www.remobjects.com.
+{----------------------------------------------------------------------------}
+
+{$IFDEF MSWINDOWS}
+{$I ..\DataAbstract.inc}
+{$ELSE}
+{$I ../DataAbstract.inc}
+{$ENDIF}
+
+
+{$R DataAbstract_DBISAMDriver_Glyphs.res}
+
+{$I dbisamvr.inc}
+{$IFNDEF DBISAM_V4}
+{$DEFINE DBISAM_V3}
+{$ENDIF}
+
+interface
+
+uses DB, Classes, uDAEngine, uDAInterfaces, uROClasses, DBISAMTb, uDAUtils;
+
+type
+  { TDADBISAMDriver }
+  TDADBISAMDriver = class(TDADriverReference)
+  end;
+
+  { IDBISAMConnection }
+  IDBISAMConnection = interface
+    ['{C6222EF8-FBAE-42AE-B034-8FFAE8FF2578}']
+  end;
+
+  { IDBISAMConnectionProperties
+    Provides access to common properties of DBISAM connections }
+
+  IDBISAMConnectionProperties = interface
+    ['{41BAFCD6-D6EA-477E-B489-7EA6E05FFCC0}']
+    function GetForceBufferFlush: Boolean;
+    procedure SetForceBufferFlush(Value: Boolean);
+    function GetKeepConnections: Boolean;
+    procedure SetKeepConnections(Value: Boolean);
+    function GetLockProtocol: TLockProtocol;
+    procedure SetLockProtocol(Value: TLockProtocol);
+    function GetLockRetryCount: Byte;
+    procedure SetLockRetryCount(Value: Byte);
+    function GetLockWaitTime: Word;
+    procedure SetLockWaitTime(Value: Word);
+    function GetPrivateDir: string;
+    procedure SetPrivateDir(const Value: string);
+    function GetRemotePort: Integer;
+    procedure SetRemotePort(Value: Integer);
+    function GetRemoteService: string;
+    procedure SetRemoteService(const Value: string);
+    function GetRemoteTrace: Boolean;
+    procedure SetRemoteTrace(Value: Boolean);
+    {$IFDEF DBISAM_V3}
+    function GetRemoteType: TRemoteType;
+    procedure SetRemoteType(Value: TRemoteType);
+    {$ENDIF}
+    {$IFDEF DBISAM_V4}
+    function GetRemoteCompression: Byte;
+    procedure SetRemoteCompression(Value: Byte);
+    function GetRemoteEncryption: Boolean;
+    procedure SetRemoteEncryption(Value: Boolean);
+    function GetRemoteEncryptionPassword: string;
+    procedure SetRemoteEncryptionPassword(const Value: string);
+    function GetRemoteTimeout: Integer;
+    procedure SetRemoteTimeout(Value: Integer);
+    {$ENDIF}
+
+    procedure AddPassword( const aPassword: string);
+    procedure RemovePassword(const aPassword: string);
+    procedure RemoveAllPasswords;
+
+    property ForceBufferFlush: Boolean read GetForceBufferFlush write SetForceBufferFlush;
+    property KeepConnections: Boolean read GetKeepConnections write SetKeepConnections;
+    property LockProtocol: TLockProtocol read GetLockProtocol write SetLockProtocol;
+    property LockRetryCount: Byte read GetLockRetryCount write SetLockRetryCount;
+    property LockWaitTime: Word read GetLockWaitTime write SetLockWaitTime;
+    property PrivateDir: string read GetPrivateDir write SetPrivateDir;
+    property RemotePort: Integer read GetRemotePort write SetRemotePort;
+    property RemoteService: string read GetRemoteService write SetRemoteService;
+    property RemoteTrace: Boolean read GetRemoteTrace write SetRemoteTrace;
+    {$IFDEF DBISAM_V3}
+    property RemoteType: TRemoteType read GetRemoteType write SetRemoteType;
+    {$ENDIF}
+    {$IFDEF DBISAM_V4}
+    property RemoteCompression: Byte read GetRemoteCompression write SetRemoteCompression;
+    property RemoteEncryption: Boolean read GetRemoteEncryption write SetRemoteEncryption;
+    property RemoteEncryptionPassword: string read GetRemoteEncryptionPassword write SetRemoteEncryptionPassword;
+    property RemoteTimeout: Integer read GetRemoteTimeout write SetRemoteTimeout;
+    {$ENDIF}
+  end;
+
+  { TDBISAMConnection }
+  TDBISAMConnection = class(TDAConnectionWrapper)
+  private
+    fDatabase: TDBISAMDatabase;
+    fSession: TDBISAMSession;
+
+  protected
+    function GetConnected: Boolean; override;
+    procedure SetConnected(Value: Boolean); override;
+
+  public
+    constructor Create(AOwner: TComponent); override;
+
+    property Database: TDBISAMDatabase read fDatabase;
+    property Session: TDBISAMSession read fSession;
+  end;
+
+  { TDAEDBISAMDriver }
+  TDAEDBISAMDriver = class(TDAEDriver)
+  private
+
+  protected
+    function GetConnectionClass: TDAEConnectionClass; override;
+
+    // IDADriver
+    function GetDriverID: string; override;
+    function GetDescription: string; override;
+
+    procedure GetAuxParams(const AuxDriver: string; out List: IROStrings); override;
+
+    function GetAvailableDriverOptions: TDAAvailableDriverOptions; override;
+    function GetDefaultConnectionType(const AuxDriver: string): string; override; safecall;
+  public
+  end;
+
+  { TDAEDBISAMConnection }
+  TDAEDBISAMConnection = class(TDAEConnection, IDBISAMConnection, IDBISAMConnectionProperties)
+  private
+    fConnection: TDBISAMConnection;
+
+  protected
+    // IDBISAMConnectionProperties
+    function GetForceBufferFlush: Boolean;
+    procedure SetForceBufferFlush(Value: Boolean);
+    function GetKeepConnections: Boolean;
+    procedure SetKeepConnections(Value: Boolean);
+    function GetLockProtocol: TLockProtocol;
+    procedure SetLockProtocol(Value: TLockProtocol);
+    function GetLockRetryCount: Byte;
+    procedure SetLockRetryCount(Value: Byte);
+    function GetLockWaitTime: Word;
+    procedure SetLockWaitTime(Value: Word);
+    function GetPrivateDir: string;
+    procedure SetPrivateDir(const Value: string);
+    function GetRemotePort: Integer;
+    procedure SetRemotePort(Value: Integer);
+    function GetRemoteService: string;
+    procedure SetRemoteService(const Value: string);
+    function GetRemoteTrace: Boolean;
+    procedure SetRemoteTrace(Value: Boolean);
+    {$IFDEF DBISAM_V3}
+    function GetRemoteType: TRemoteType;
+    procedure SetRemoteType(Value: TRemoteType);
+    {$ENDIF}
+    {$IFDEF DBISAM_V4}
+    function GetRemoteCompression: Byte;
+    procedure SetRemoteCompression(Value: Byte);
+    function GetRemoteEncryption: Boolean;
+    procedure SetRemoteEncryption(Value: Boolean);
+    function GetRemoteEncryptionPassword: string;
+    procedure SetRemoteEncryptionPassword(const Value: string);
+    function GetRemoteTimeout: Integer;
+    procedure SetRemoteTimeout(Value: Integer);
+    {$ENDIF}
+    procedure AddPassword( const aPassword: string);
+    procedure RemovePassword(const aPassword: string);
+    procedure RemoveAllPasswords;
+
+    // IDAConnection
+    function CreateCustomConnection: TCustomConnection; override;
+    function CreateMacroProcessor: TDASQLMacroProcessor; override;
+
+    function GetDatasetClass: TDAEDatasetClass; override;
+    procedure DoApplyConnectionString(aConnStrParser: TDAConnectionStringParser; aConnectionObject: TCustomConnection); override;
+    function DoBeginTransaction: Integer; override;
+    procedure DoCommitTransaction; override;
+    procedure DoRollbackTransaction; override;
+    function DoGetInTransaction: Boolean; override;
+    procedure DoGetTableNames(out List: IROStrings); override;
+    function DoGetLastAutoInc(const GeneratorName: string): integer; override;
+    procedure DoGetTableFields(const aTableName: string; out Fields: TDAFieldCollection);override;
+    function IdentifierNeedsQuoting(const iIdentifier: string): boolean; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}    
+  public
+  end;
+
+  { TDAEDBISAMQuery }
+  TDAEDBISAMQuery = class(TDAEDataset, IDAMustSetParams)
+  private
+  protected
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+    procedure ClearParams; override;
+    function DoExecute: Integer; override;
+    function DoGetSQL: string; override;
+    procedure DoSetSQL(const Value: string); override;
+    procedure DoPrepare(Value: Boolean); override;
+
+    // IDAMustSetParams
+    {$IFDEF DBISAM_V4}
+    procedure RefreshParams; override;
+    {$ENDIF}
+    procedure SetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  end;
+
+const
+  DBISAM_DriverType = 'DBISAM';
+
+procedure Register;
+
+function GetDriverObject: IDADriver; stdcall;
+
+implementation
+
+uses
+  SysUtils, uDADriverManager, uDARes, uDAMacroProcessors, Variants,
+  uROBinaryHelpers;
+
+var
+  _driver: TDAEDriver = nil;
+  dbisam_reservedwords: array of string;
+
+procedure Register;
+begin
+  RegisterComponents(DAPalettePageName, [TDADBISAMDriver]);
+end;
+
+{$IFDEF DataAbstract_SchemaModelerOnly}
+{$INCLUDE ..\DataAbstract_SchemaModelerOnly.inc}
+{$ENDIF DataAbstract_SchemaModelerOnly}
+
+function GetDriverObject: IDADriver;
+begin
+  {$IFDEF DataAbstract_SchemaModelerOnly}
+  if not RunningInSchemaModeler then begin
+    result := nil;
+    exit;
+  end;
+  {$ENDIF}
+  if (_driver = nil) then _driver := TDAEDBISAMDriver.Create(nil);
+  result := _driver;
+end;
+
+{ TDBISAMConnection }
+
+constructor TDBISAMConnection.Create(AOwner: TComponent);
+begin
+  inherited;
+
+  fSession := TDBISAMSession.Create(Self);
+  fSession.AutoSessionName := TRUE;
+
+  fDatabase := TDBISAMDatabase.Create(Self);
+  fDatabase.SessionName := fSession.SessionName;
+  fDatabase.DatabaseName := 'DBISAMDB';
+end;
+
+function TDBISAMConnection.GetConnected: Boolean;
+begin
+  result := fDatabase.Connected;
+end;
+
+procedure TDBISAMConnection.SetConnected(Value: Boolean);
+begin
+  if not(csDestroying in fDatabase.ComponentState) then begin
+    try
+      fSession.Active := Value;
+      fDatabase.Connected := Value;
+    except
+      fSession.Active := FALSE;
+      fDatabase.Connected := FALSE;
+      raise;
+    end;
+  end;
+end;
+
+{ TDAEDBISAMConnection }
+
+procedure TDAEDBISAMConnection.DoApplyConnectionString(
+  aConnStrParser: TDAConnectionStringParser; aConnectionObject: TCustomConnection);
+begin
+  inherited;
+  with aConnStrParser do begin
+    if (Self.UserID <> '') then
+      fConnection.Session.RemoteUser := Self.UserID
+    else
+      fConnection.Session.RemoteUser := UserID;
+    if (Self.Password <> '') then
+      fConnection.Session.RemotePassword := Self.Password
+    else
+      fConnection.Session.RemotePassword := Password;
+
+    if (Server <> '') then begin
+      // Remote connection
+      fConnection.Session.SessionType := stRemote;
+      fConnection.Session.RemoteHost := Server;
+      fConnection.Database.RemoteDatabase := Database;
+      if (AuxParams['RemotePort'] <> '') then
+        fConnection.Session.RemotePort := StrToInt(AuxParams['RemotePort']);
+      if (AuxParams['RemoteService'] <> '') then
+        fConnection.Session.RemoteService := AuxParams['RemoteService'];
+      if (AuxParams['RemoteTrace'] = 'False') then
+        fConnection.Session.RemoteTrace := False
+      else if (AuxParams['RemoteTrace'] = 'True') then
+        fConnection.Session.RemoteTrace := True;
+      {$IFDEF DBISAM_V3}
+      if (AuxParams['RemoteType'] = 'rtLAN') then
+        fConnection.Session.RemoteType := rtLAN
+      else if (AuxParams['RemoteType'] = 'rtInternet') then
+        fConnection.Session.RemoteType := rtInternet;
+      {$ENDIF}
+      {$IFDEF DBISAM_V4}
+      if (AuxParams['RemoteCompression'] <> '') then
+        if (StrToInt(AuxParams['RemoteCompression']) in [0..9]) then
+          fConnection.Session.RemoteCompression := StrToInt(AuxParams['RemoteCompression']);
+      if (AuxParams['RemoteEncryption'] = 'False') then
+        fConnection.Session.RemoteEncryption := False
+      else if (AuxParams['RemoteEncryption'] = 'True') then
+        fConnection.Session.RemoteEncryption := True;
+      if (AuxParams['RemoteEncryptionPassword'] <> '') then
+        fConnection.Session.RemoteEncryptionPassword := AuxParams['RemoteEncryptionPassword'];
+      if (AuxParams['RemoteTimeout'] <> '') then
+        fConnection.Session.RemoteTimeout := StrToInt(AuxParams['RemoteTimeout']);
+      {$ENDIF}
+    end
+    else begin
+      // Local connection
+      fConnection.Session.SessionType := stLocal;
+      fConnection.Database.Directory := Database;
+    end;
+
+    if (AuxParams['ForceBufferFlush'] = 'False') then
+      fConnection.Session.ForceBufferFlush := False
+    else if (AuxParams['ForceBufferFlush'] = 'True') then
+      fConnection.Session.ForceBufferFlush := True;
+    if (AuxParams['KeepConnections'] = 'False') then
+    begin
+      fConnection.Session.KeepConnections := False;
+      fConnection.Database.KeepConnection := False;
+    end
+    else if (AuxParams['KeepConnections'] = 'True') then
+    begin
+      fConnection.Session.KeepConnections := True;
+      fConnection.Database.KeepConnection := True;
+    end;
+    if (AuxParams['LockProtocol'] = 'lpOptimistic') then
+      fConnection.Session.LockProtocol := lpOptimistic
+    else if (AuxParams['LockProtocol'] = 'lpPessimistic') then
+      fConnection.Session.LockProtocol := lpPessimistic;
+    if (AuxParams['LockRetryCount'] <> '') then
+      fConnection.Session.LockRetryCount := StrToInt(AuxParams['LockRetryCount']);
+    if (AuxParams['LockWaitTime'] <> '') then
+      fConnection.Session.LockWaitTime := StrToInt(AuxParams['LockWaitTime']);
+    if (AuxParams['PrivateDir'] <> '') then
+      fConnection.Session.PrivateDir := AuxParams['PrivateDir'];
+    if (AuxParams['TablePassword'] <> '') then
+    begin
+      fConnection.Session.Active := True;
+      fConnection.Session.AddPassword(AuxParams['TablePassword']);
+    end;
+  end;
+end;
+
+function TDAEDBISAMConnection.DoBeginTransaction: integer;
+begin
+  result := -1;
+  fConnection.Database.StartTransaction;
+end;
+
+procedure TDAEDBISAMConnection.DoCommitTransaction;
+begin
+  with fConnection do
+    Database.Commit(Session.ForceBufferFlush);
+end;
+
+function TDAEDBISAMConnection.CreateCustomConnection: TCustomConnection;
+begin
+  result := TDBISAMConnection.Create(nil);
+  fConnection := TDBISAMConnection(result);
+end;
+
+function TDAEDBISAMConnection.GetDatasetClass: TDAEDatasetClass;
+begin
+  result := TDAEDBISAMQuery
+end;
+
+procedure TDAEDBISAMConnection.DoGetTableNames(out List: IROStrings);
+var
+  _database: string;
+begin
+  List := TROStrings.Create;
+  if (fConnection.Session.SessionType = stLocal) then
+    _database := fConnection.Database.Directory
+  else
+    _database := fConnection.Database.RemoteDatabase;
+
+  fConnection.Session.GetTableNames(_database, List.Strings);
+end;
+
+procedure TDAEDBISAMConnection.DoRollbackTransaction;
+begin
+  fConnection.Database.Rollback;
+end;
+
+function TDAEDBISAMConnection.DoGetInTransaction: Boolean;
+begin
+  result := fConnection.Database.InTransaction;
+end;
+
+function TDAEDBISAMConnection.CreateMacroProcessor: TDASQLMacroProcessor;
+begin
+  result := TDADBISAMMacroProcessor.Create;
+end;
+
+function TDAEDBISAMConnection.GetForceBufferFlush: Boolean;
+begin
+  result := fConnection.Session.ForceBufferFlush;
+end;
+
+procedure TDAEDBISAMConnection.SetForceBufferFlush(Value: Boolean);
+begin
+  fConnection.Session.ForceBufferFlush := Value;
+end;
+
+function TDAEDBISAMConnection.GetKeepConnections: Boolean;
+begin
+  result := fConnection.Session.KeepConnections;
+end;
+
+procedure TDAEDBISAMConnection.SetKeepConnections(Value: Boolean);
+begin
+  fConnection.Session.KeepConnections := Value;
+  fConnection.Database.KeepConnection := Value;
+end;
+
+function TDAEDBISAMConnection.GetLockProtocol: TLockProtocol;
+begin
+  result := fConnection.Session.LockProtocol;
+end;
+
+procedure TDAEDBISAMConnection.SetLockProtocol(Value: TLockProtocol);
+begin
+  fConnection.Session.LockProtocol := Value;
+end;
+
+function TDAEDBISAMConnection.GetLockRetryCount: Byte;
+begin
+  result := fConnection.Session.LockRetryCount;
+end;
+
+procedure TDAEDBISAMConnection.SetLockRetryCount(Value: Byte);
+begin
+  fConnection.Session.LockRetryCount := Value;
+end;
+
+function TDAEDBISAMConnection.GetLockWaitTime: Word;
+begin
+  result := fConnection.Session.LockWaitTime;
+end;
+
+procedure TDAEDBISAMConnection.SetLockWaitTime(Value: Word);
+begin
+  fConnection.Session.LockWaitTime := Value;
+end;
+
+function TDAEDBISAMConnection.GetPrivateDir: string;
+begin
+  result := fConnection.Session.PrivateDir;
+end;
+
+procedure TDAEDBISAMConnection.SetPrivateDir(const Value: string);
+begin
+  fConnection.Session.PrivateDir := Value;
+end;
+
+function TDAEDBISAMConnection.GetRemotePort: Integer;
+begin
+  result := fConnection.Session.RemotePort;
+end;
+
+procedure TDAEDBISAMConnection.SetRemotePort(Value: Integer);
+begin
+  fConnection.Session.RemotePort := Value;
+end;
+
+function TDAEDBISAMConnection.GetRemoteService: string;
+begin
+  result := fConnection.Session.RemoteService;
+end;
+
+procedure TDAEDBISAMConnection.SetRemoteService(const Value: string);
+begin
+  fConnection.Session.RemoteService := Value;
+end;
+
+function TDAEDBISAMConnection.GetRemoteTrace: Boolean;
+begin
+  result := fConnection.Session.RemoteTrace;
+end;
+
+procedure TDAEDBISAMConnection.SetRemoteTrace(Value: Boolean);
+begin
+  fConnection.Session.RemoteTrace := Value;
+end;
+
+{$IFDEF DBISAM_V3}
+
+function TDAEDBISAMConnection.GetRemoteType: TRemoteType;
+begin
+  result := fConnection.Session.RemoteType;
+end;
+
+procedure TDAEDBISAMConnection.SetRemoteType(Value: TRemoteType);
+begin
+  fConnection.Session.RemoteType := Value;
+end;
+{$ENDIF}
+
+{$IFDEF DBISAM_V4}
+
+function TDAEDBISAMConnection.GetRemoteCompression: Byte;
+begin
+  result := fConnection.Session.RemoteCompression;
+end;
+
+procedure TDAEDBISAMConnection.SetRemoteCompression(Value: Byte);
+begin
+  fConnection.Session.RemoteCompression := Value;
+end;
+
+function TDAEDBISAMConnection.GetRemoteEncryption: Boolean;
+begin
+  result := fConnection.Session.RemoteEncryption;
+end;
+
+procedure TDAEDBISAMConnection.SetRemoteEncryption(Value: Boolean);
+begin
+  fConnection.Session.RemoteEncryption := Value;
+end;
+
+function TDAEDBISAMConnection.GetRemoteEncryptionPassword: string;
+begin
+  result := fConnection.Session.RemoteEncryptionPassword;
+end;
+
+procedure TDAEDBISAMConnection.SetRemoteEncryptionPassword(const Value: string);
+begin
+  fConnection.Session.RemoteEncryptionPassword := Value;
+end;
+
+function TDAEDBISAMConnection.GetRemoteTimeout: Integer;
+begin
+  result := fConnection.Session.RemoteTimeout;
+end;
+
+procedure TDAEDBISAMConnection.SetRemoteTimeout(Value: Integer);
+begin
+  fConnection.Session.RemoteTimeout := Value;
+end;
+{$ENDIF}
+
+procedure TDAEDBISAMConnection.AddPassword( const aPassword: string);
+begin
+  fConnection.Session.AddPassword(aPassword);
+end;
+
+procedure TDAEDBISAMConnection.RemovePassword( const aPassword: string);
+begin
+  fConnection.Session.RemovePassword(aPassword);
+end;
+
+procedure TDAEDBISAMConnection.RemoveAllPasswords;
+begin
+  fConnection.Session.RemoveAllPasswords;
+end;
+
+function TDAEDBISAMConnection.DoGetLastAutoInc(
+  const GeneratorName: string): integer;
+var
+  lQuery: IDADataset;
+begin
+  Result:= inherited DoGetLastAutoInc(GeneratorName);
+  if GeneratorName <> '' then begin
+    lQuery:=GetDatasetClass.Create(Self);
+    try
+      lQuery.SQL := 'SELECT LASTAUTOINC('''+GeneratorName+''') from '+QuoteIdentifierIfNeeded(GeneratorName);
+      lQuery.Open;
+      Result := lQuery.Fields[0].AsInteger;
+    finally
+      lQuery:=nil;
+    end;
+  end;
+end;
+
+{$IFDEF DELPHI10UP}
+{$WARN SYMBOL_DEPRECATED OFF}
+{$ENDIF DELPHI10UP}
+procedure TDAEDBISAMConnection.DoGetTableFields(const aTableName: string;
+  out Fields: TDAFieldCollection);
+var
+  i: integer;
+  pos1: integer;
+  fld: TDAField;
+  {$IFDEF DBISAM_V4}
+  lofld:TDBISAMFieldDef;
+  {$ELSE}
+  lofld:TFieldDef;
+  {$ENDIF}
+  s: string;
+  ltable: TDBISAMTable;
+begin
+  Fields:=TDAFieldCollection.Create(nil);
+  ltable:=TDBISAMTable.Create(nil);
+  try
+    ltable.DatabaseName := fConnection.Database.DatabaseName;
+    ltable.SessionName := fConnection.Session.SessionName;
+    ltable.TableName := aTableName;
+    ltable.FieldDefs.Update;
+    for i:=0 to ltable.FieldDefs.Count-1 do begin
+      lofld:=ltable.FieldDefs[i];
+      fld:= Fields.Add;
+      fld.Name:= lofld.Name;
+      fld.DataType:= VCLTypeToDAType(lofld.DataType);
+      fld.Size:= lofld.Size;
+      fld.Required:= lofld.Required;
+      {$IFDEF DBISAM_V4}
+      fld.DefaultValue:=lofld.DefaultValue;
+      fld.Description:=lofld.Description;
+      {$ENDIF DBISAM_V4}
+      fld.ReadOnly:= DB.faReadonly in lofld.Attributes;
+      if fld.DataType = datAutoInc then fld.GeneratorName:= aTableName;
+      if fld.DataType = datDecimal then begin
+        case lofld.DataType of
+          ftBCD: begin
+            fld.DecimalPrecision:=20;
+            fld.DecimalScale:=lofld.Size;
+          end;
+        end;  
+      end;
+    end;
+
+    //pk
+    ltable.IndexDefs.Update;
+    For i:=0 to ltable.IndexDefs.Count - 1 do
+      if ixPrimary in ltable.IndexDefs[i].Options then begin
+        Pos1 := 1;
+        s:=ltable.IndexDefs[i].Fields;
+        while Pos1 <= Length(s) do begin
+          fld := Fields.FindField(ExtractFieldName(s, Pos1));
+          if fld <> nil then fld.InPrimaryKey:=True;
+        end;
+      end;
+
+  finally
+    ltable.free;
+  end;
+end;
+{$IFDEF DELPHI10UP}
+{$WARN SYMBOL_DEPRECATED ON}
+{$ENDIF DELPHI10UP}
+
+function TDAEDBISAMConnection.IdentifierNeedsQuoting(
+  const iIdentifier: string): boolean;
+begin
+  Result := inherited IdentifierNeedsQuoting(iIdentifier) or TestIdentifier(iIdentifier,dbisam_reservedwords);
+end;
+
+{ TDAEDBISAMDriver }
+
+procedure TDAEDBISAMDriver.GetAuxParams(const AuxDriver: string; out List: IROStrings);
+begin
+  inherited;
+
+  List.Add('ForceBufferFlush=False,True');
+  List.Add('KeepConnections=False,True');
+  List.Add('LockProtocol=lpOptimistic,lpPessimistic');
+  List.Add('LockRetryCount=');
+  List.Add('LockWaitTime=');
+  List.Add('PrivateDir=');
+  List.Add('RemotePort=');
+  List.Add('RemoteService=');
+  List.Add('RemoteTrace=False,True');
+  List.Add('TablePassword=');
+  {$IFDEF DBISAM_V3}
+  List.Add('RemoteType=rtLAN,rtInternet');
+  {$ENDIF}
+  {$IFDEF DBISAM_V4}
+  List.Add('RemoteCompression=');
+  List.Add('RemoteEncryption=False,True');
+  List.Add('RemoteEncryptionPassword=');
+  List.Add('RemoteTimeout=');
+  {$ENDIF}
+
+  List.Sorted := True;
+end;
+
+function TDAEDBISAMDriver.GetAvailableDriverOptions: TDAAvailableDriverOptions;
+begin
+  result := [doServerName, doDatabaseName, doLogin, doCustom];
+end;
+
+function TDAEDBISAMDriver.GetConnectionClass: TDAEConnectionClass;
+begin
+  result := TDAEDBISAMConnection
+end;
+
+function TDAEDBISAMDriver.GetDefaultConnectionType(
+  const AuxDriver: string): string;
+begin
+  Result:=DBISAM_DriverType;
+end;
+
+function TDAEDBISAMDriver.GetDescription: string;
+begin
+  {$IFDEF DBISAM_V3}
+  result := 'DBISAM3 Driver'{$IFDEF DataAbstract_SchemaModelerOnly} + SchemaModelerOnly{$ENDIF};
+  {$ENDIF}
+  {$IFDEF DBISAM_V4}
+  result := 'DBISAM4 Driver'{$IFDEF DataAbstract_SchemaModelerOnly} + SchemaModelerOnly{$ENDIF};
+  {$ENDIF}
+end;
+
+function TDAEDBISAMDriver.GetDriverID: string;
+begin
+  {$IFDEF DBISAM_V3}
+  result := 'DBISAM3';
+  {$ENDIF}
+  {$IFDEF DBISAM_V4}
+  result := 'DBISAM4';
+  {$ENDIF}
+end;
+
+{ TDAEDBISAMQuery }
+
+function TDAEDBISAMQuery.CreateDataset(aConnection: TDAEConnection): TDataset;
+begin
+  result := TDBISAMQuery.Create(nil);
+
+  with TDBISAMQuery(result) do begin
+    DatabaseName := TDAEDBISAMConnection(aConnection).fConnection.Database.DatabaseName;
+    SessionName := TDAEDBISAMConnection(aConnection).fConnection.Session.SessionName;
+    ReadOnly := True;
+    RequestLive := True;
+  end;
+end;
+
+function TDAEDBISAMQuery.DoExecute: integer;
+begin
+  with TDBISAMQuery(Dataset) do begin
+    ExecSQL;
+    result := RowsAffected;
+  end;
+end;
+
+function TDAEDBISAMQuery.DoGetSQL: string;
+begin
+  result := TDBISAMQuery(Dataset).SQL.Text
+end;
+
+procedure TDAEDBISAMQuery.DoPrepare(Value: Boolean);
+begin
+  TDBISAMQuery(Dataset).Prepared := Value;
+end;
+
+procedure TDAEDBISAMQuery.SetParamValues(AParams: TDAParamCollection);
+var
+  i: integer;
+  par: uDAInterfaces.TDAParam;
+  {$IFDEF DBISAM_V4}
+  outpar: TDBISAMParam;
+  {$ELSE}
+  outpar: TParam;
+  {$ENDIF}
+  ft: TFieldType;
+  lParIsEmpty: Boolean;
+begin
+  for i := 0 to (AParams.Count - 1) do begin
+    par := AParams[i];
+    outpar := TDBISAMQuery(Dataset).Params.ParamByName(par.Name);
+
+    ft := DATypeToVCLType(par.DataType);
+    {$IFNDEF DBISAM_V4}
+    case par.ParamType of
+      daptInput: outpar.ParamType := ptInput;
+      daptOutput: outpar.ParamType := ptOutput;
+      daptInputOutput: outpar.ParamType := ptInputOutput;
+      daptResult: outpar.ParamType := ptResult;
+    end;
+    {$ENDIF DBISAM_V3}
+    lParIsEmpty := VarIsEmpty(par.Value) or VarIsNull(par.Value);
+
+    if par.DataType = datBlob then begin
+      outpar.DataType := ftBlob;
+      if not (par.ParamType in [daptOutput, daptResult]) then begin
+        if lParIsEmpty then
+           outpar.Value := Null
+        else
+           outpar.Value := VariantBinaryToString(par.Value);
+      end;
+    end
+    else begin
+      if (outpar.DataType <> ft) and (ft <> ftUnknown) then outpar.DataType := ft;
+      if not (par.ParamType in [daptOutput, daptResult]) then outpar.Value := par.Value;
+    end;
+
+    if lParIsEmpty and (par.DataType <> datUnknown) then begin
+      if (outpar.DataType <> ft) and (ft <> ftUnknown) then outpar.DataType := ft;
+    end;
+  end;
+end;
+
+procedure TDAEDBISAMQuery.GetParamValues(AParams: TDAParamCollection);
+var
+  i: integer;
+  par: uDAInterfaces.TDAParam;
+begin
+  for i := 0 to (AParams.Count - 1) do begin
+    par := AParams[i];
+    if Par.ParamType in [daptOutput, daptInputOutput, daptResult] then
+      Par.Value := TDBISAMQuery(Dataset).Params.ParamByName(par.Name).Value;
+  end;
+end;
+
+procedure TDAEDBISAMQuery.DoSetSQL(const Value: string);
+begin
+  TDBISAMQuery(Dataset).SQL.Text := Value;
+end;
+
+{$IFDEF DBISAM_V4}
+procedure TDAEDBISAMQuery.RefreshParams;
+var
+  i: Integer;
+  par: TDAParam;
+  outpar: TDBISAMParam;
+  ds: TDBISAMQuery;
+begin
+  inherited;
+  ds := TDBISAMQuery(Dataset);
+  if not Assigned(ds.Params) then
+    Exit;
+  for i := 0 to ds.Params.Count -1 do begin
+    outpar := ds.Params[i];
+
+    par := self.ParamByName(outpar.Name);
+
+    if outpar.DataType <> ftUnknown then begin
+      par.DataType := VCLTypeToDAType(outpar.DataType);
+    end;
+ end;
+end;
+{$ENDIF}
+
+exports GetDriverObject name func_GetDriverObject;
+
+procedure TDAEDBISAMQuery.ClearParams;
+begin
+  inherited;
+  TDBISAMQuery(Dataset).Params.Clear;
+end;
+
+procedure dbisam_InitializeReservedWords;
+begin
+  SetLength(dbisam_reservedwords, 220);
+  // sorted with TStringList.Sort (bds2007)  
+  dbisam_reservedwords[0] := 'ABS';
+  dbisam_reservedwords[1] := 'ACOS';
+  dbisam_reservedwords[2] := 'ADD';
+  dbisam_reservedwords[3] := 'ALL';
+  dbisam_reservedwords[4] := 'ALLTRIM';
+  dbisam_reservedwords[5] := 'ALTER';
+  dbisam_reservedwords[6] := 'AND';
+  dbisam_reservedwords[7] := 'AS';
+  dbisam_reservedwords[8] := 'ASC';
+  dbisam_reservedwords[9] := 'ASCENDING';
+  dbisam_reservedwords[10] := 'ASIN';
+  dbisam_reservedwords[11] := 'AT';
+  dbisam_reservedwords[12] := 'ATAN';
+  dbisam_reservedwords[13] := 'ATAN2';
+  dbisam_reservedwords[14] := 'AUTOINC';
+  dbisam_reservedwords[15] := 'AVG';
+  dbisam_reservedwords[16] := 'BETWEEN';
+  dbisam_reservedwords[17] := 'BINARY';
+  dbisam_reservedwords[18] := 'BIT';
+  dbisam_reservedwords[19] := 'BLOB';
+  dbisam_reservedwords[20] := 'BLOCK';
+  dbisam_reservedwords[21] := 'BOOL';
+  dbisam_reservedwords[22] := 'BOOLEAN';
+  dbisam_reservedwords[23] := 'BOTH';
+  dbisam_reservedwords[24] := 'BY';
+  dbisam_reservedwords[25] := 'BYTES';
+  dbisam_reservedwords[26] := 'CAST';
+  dbisam_reservedwords[27] := 'CEIL';
+  dbisam_reservedwords[28] := 'CEILING';
+  dbisam_reservedwords[29] := 'CHAR';
+  dbisam_reservedwords[30] := 'CHARACTER';
+  dbisam_reservedwords[31] := 'CHARCASE';
+  dbisam_reservedwords[32] := 'CHARS';
+  dbisam_reservedwords[33] := 'COALESCE';
+  dbisam_reservedwords[34] := 'COLUMN';
+  dbisam_reservedwords[35] := 'COLUMNS';
+  dbisam_reservedwords[36] := 'COMMIT';
+  dbisam_reservedwords[37] := 'COMPRESS';
+  dbisam_reservedwords[38] := 'CONCAT';
+  dbisam_reservedwords[39] := 'CONSTRAINT';
+  dbisam_reservedwords[40] := 'COS';
+  dbisam_reservedwords[41] := 'COT';
+  dbisam_reservedwords[42] := 'COUNT';
+  dbisam_reservedwords[43] := 'CREATE';
+  dbisam_reservedwords[44] := 'CURRENT_DATE';
+  dbisam_reservedwords[45] := 'CURRENT_GUID';
+  dbisam_reservedwords[46] := 'CURRENT_TIME';
+  dbisam_reservedwords[47] := 'CURRENT_TIMESTAMP';
+  dbisam_reservedwords[48] := 'DAY';
+  dbisam_reservedwords[49] := 'DAYOFWEEK';
+  dbisam_reservedwords[50] := 'DAYOFYEAR';
+  dbisam_reservedwords[51] := 'DAYSFROMMSECS';
+  dbisam_reservedwords[52] := 'DECIMAL';
+  dbisam_reservedwords[53] := 'DEFAULT';
+  dbisam_reservedwords[54] := 'DEGREES';
+  dbisam_reservedwords[55] := 'DELETE';
+  dbisam_reservedwords[56] := 'DELIMITER';
+  dbisam_reservedwords[57] := 'DESC';
+  dbisam_reservedwords[58] := 'DESCENDING';
+  dbisam_reservedwords[59] := 'DESCRIPTION';
+  dbisam_reservedwords[60] := 'DISTINCT';
+  dbisam_reservedwords[61] := 'DROP';
+  dbisam_reservedwords[62] := 'DUPBYTE';
+  dbisam_reservedwords[63] := 'ELSE';
+  dbisam_reservedwords[64] := 'EMPTY';
+  dbisam_reservedwords[65] := 'ENCRYPTED';
+  dbisam_reservedwords[66] := 'ESCAPE';
+  dbisam_reservedwords[67] := 'EXCEPT';
+  dbisam_reservedwords[68] := 'EXISTS';
+  dbisam_reservedwords[69] := 'EXP';
+  dbisam_reservedwords[70] := 'EXPORT';
+  dbisam_reservedwords[71] := 'EXTRACT';
+  dbisam_reservedwords[72] := 'FALSE';
+  dbisam_reservedwords[73] := 'FLOAT';
+  dbisam_reservedwords[74] := 'FLOOR';
+  dbisam_reservedwords[75] := 'FLUSH';
+  dbisam_reservedwords[76] := 'FOR';
+  dbisam_reservedwords[77] := 'FORCEINDEXREBUILD';
+  dbisam_reservedwords[78] := 'FROM';
+  dbisam_reservedwords[79] := 'FULL';
+  dbisam_reservedwords[80] := 'GRAPHIC';
+  dbisam_reservedwords[81] := 'GROUP';
+  dbisam_reservedwords[82] := 'GUID';
+  dbisam_reservedwords[83] := 'HAVING';
+  dbisam_reservedwords[84] := 'HEADERS';
+  dbisam_reservedwords[85] := 'HOUR';
+  dbisam_reservedwords[86] := 'HOURSFROMMSECS';
+  dbisam_reservedwords[87] := 'IDENT_CURRENT';
+  dbisam_reservedwords[88] := 'IDENTITY';
+  dbisam_reservedwords[89] := 'IF';
+  dbisam_reservedwords[90] := 'IFNULL';
+  dbisam_reservedwords[91] := 'IMPORT';
+  dbisam_reservedwords[92] := 'IN';
+  dbisam_reservedwords[93] := 'INCLUDE';
+  dbisam_reservedwords[94] := 'INDEX';
+  dbisam_reservedwords[95] := 'INNER';
+  dbisam_reservedwords[96] := 'INSERT';
+  dbisam_reservedwords[97] := 'INT';
+  dbisam_reservedwords[98] := 'INTEGER';
+  dbisam_reservedwords[99] := 'INTERSECT';
+  dbisam_reservedwords[100] := 'INTERVAL';
+  dbisam_reservedwords[101] := 'INTO';
+  dbisam_reservedwords[102] := 'IS';
+  dbisam_reservedwords[103] := 'JOIN';
+  dbisam_reservedwords[104] := 'KEY';
+  dbisam_reservedwords[105] := 'LARGEINT';
+  dbisam_reservedwords[106] := 'LAST';
+  dbisam_reservedwords[107] := 'LASTAUTOINC';
+  dbisam_reservedwords[108] := 'LCASE';
+  dbisam_reservedwords[109] := 'LEADING';
+  dbisam_reservedwords[110] := 'LEFT';
+  dbisam_reservedwords[111] := 'LENGTH';
+  dbisam_reservedwords[112] := 'LIKE';
+  dbisam_reservedwords[113] := 'LOCALE';
+  dbisam_reservedwords[114] := 'LOG';
+  dbisam_reservedwords[115] := 'LOG10';
+  dbisam_reservedwords[116] := 'LONGVARBINARY';
+  dbisam_reservedwords[117] := 'LONGVARCHAR';
+  dbisam_reservedwords[118] := 'LOWER';
+  dbisam_reservedwords[119] := 'LTRIM';
+  dbisam_reservedwords[120] := 'MAJOR';
+  dbisam_reservedwords[121] := 'MAX';
+  dbisam_reservedwords[122] := 'MAXIMUM';
+  dbisam_reservedwords[123] := 'MEMO';
+  dbisam_reservedwords[124] := 'MIN';
+  dbisam_reservedwords[125] := 'MINIMUM';
+  dbisam_reservedwords[126] := 'MINOR';
+  dbisam_reservedwords[127] := 'MINSFROMMSECS';
+  dbisam_reservedwords[128] := 'MINUTE';
+  dbisam_reservedwords[129] := 'MOD';
+  dbisam_reservedwords[130] := 'MONEY';
+  dbisam_reservedwords[131] := 'MONTH';
+  dbisam_reservedwords[132] := 'MSECOND';
+  dbisam_reservedwords[133] := 'MSECSFROMMSECS';
+  dbisam_reservedwords[134] := 'NOBACKUP';
+  dbisam_reservedwords[135] := 'NOCASE';
+  dbisam_reservedwords[136] := 'NOCHANGE';
+  dbisam_reservedwords[137] := 'NOJOINOPTIMIZE';
+  dbisam_reservedwords[138] := 'NONE';
+  dbisam_reservedwords[139] := 'NOT';
+  dbisam_reservedwords[140] := 'NULL';
+  dbisam_reservedwords[141] := 'NUMERIC';
+  dbisam_reservedwords[142] := 'OCCURS';
+  dbisam_reservedwords[143] := 'ON';
+  dbisam_reservedwords[144] := 'OPTIMIZE';
+  dbisam_reservedwords[145] := 'OR';
+  dbisam_reservedwords[146] := 'ORDER';
+  dbisam_reservedwords[147] := 'OUTER';
+  dbisam_reservedwords[148] := 'PAGE';
+  dbisam_reservedwords[149] := 'PI';
+  dbisam_reservedwords[150] := 'POS';
+  dbisam_reservedwords[151] := 'POSITION';
+  dbisam_reservedwords[152] := 'POWER';
+  dbisam_reservedwords[153] := 'PRIMARY';
+  dbisam_reservedwords[154] := 'RADIANS';
+  dbisam_reservedwords[155] := 'RAND';
+  dbisam_reservedwords[156] := 'RANGE';
+  dbisam_reservedwords[157] := 'REDEFINE';
+  dbisam_reservedwords[158] := 'RENAME';
+  dbisam_reservedwords[159] := 'REPAIR';
+  dbisam_reservedwords[160] := 'REPEAT';
+  dbisam_reservedwords[161] := 'REPLACE';
+  dbisam_reservedwords[162] := 'RIGHT';
+  dbisam_reservedwords[163] := 'ROLLBACK';
+  dbisam_reservedwords[164] := 'ROUND';
+  dbisam_reservedwords[165] := 'RTRIM';
+  dbisam_reservedwords[166] := 'RUNSUM';
+  dbisam_reservedwords[167] := 'SECOND';
+  dbisam_reservedwords[168] := 'SECSFROMMSECS';
+  dbisam_reservedwords[169] := 'SELECT';
+  dbisam_reservedwords[170] := 'SET';
+  dbisam_reservedwords[171] := 'SIGN';
+  dbisam_reservedwords[172] := 'SIN';
+  dbisam_reservedwords[173] := 'SIZE';
+  dbisam_reservedwords[174] := 'SMALLINT';
+  dbisam_reservedwords[175] := 'SPACE';
+  dbisam_reservedwords[176] := 'SQRT';
+  dbisam_reservedwords[177] := 'START';
+  dbisam_reservedwords[178] := 'STDDEV';
+  dbisam_reservedwords[179] := 'STOP';
+  dbisam_reservedwords[180] := 'SUBSTRING';
+  dbisam_reservedwords[181] := 'SUM';
+  dbisam_reservedwords[182] := 'TABLE';
+  dbisam_reservedwords[183] := 'TAN';
+  dbisam_reservedwords[184] := 'TEXT';
+  dbisam_reservedwords[185] := 'TEXTOCCURS';
+  dbisam_reservedwords[186] := 'TEXTSEARCH';
+  dbisam_reservedwords[187] := 'THEN';
+  dbisam_reservedwords[188] := 'TIME';
+  dbisam_reservedwords[189] := 'TIMESTAMP';
+  dbisam_reservedwords[190] := 'TO';
+  dbisam_reservedwords[191] := 'TOP';
+  dbisam_reservedwords[192] := 'TRAILBYTE';
+  dbisam_reservedwords[193] := 'TRAILING';
+  dbisam_reservedwords[194] := 'TRANSACTION';
+  dbisam_reservedwords[195] := 'TRIM';
+  dbisam_reservedwords[196] := 'TRUE';
+  dbisam_reservedwords[197] := 'TRUNC';
+  dbisam_reservedwords[198] := 'TRUNCATE';
+  dbisam_reservedwords[199] := 'UCASE';
+  dbisam_reservedwords[200] := 'UNION';
+  dbisam_reservedwords[201] := 'UNIQUE';
+  dbisam_reservedwords[202] := 'UPDATE';
+  dbisam_reservedwords[203] := 'UPGRADE';
+  dbisam_reservedwords[204] := 'UPPER';
+  dbisam_reservedwords[205] := 'USER';
+  dbisam_reservedwords[206] := 'VALUES';
+  dbisam_reservedwords[207] := 'VARBINARY';
+  dbisam_reservedwords[208] := 'VARBYTES';
+  dbisam_reservedwords[209] := 'VARCHAR';
+  dbisam_reservedwords[210] := 'VERIFY';
+  dbisam_reservedwords[211] := 'VERSION';
+  dbisam_reservedwords[212] := 'WEEK';
+  dbisam_reservedwords[213] := 'WHERE';
+  dbisam_reservedwords[214] := 'WITH';
+  dbisam_reservedwords[215] := 'WORD';
+  dbisam_reservedwords[216] := 'WORDS';
+  dbisam_reservedwords[217] := 'WORK';
+  dbisam_reservedwords[218] := 'YEAR';
+  dbisam_reservedwords[219] := 'YEARSFROMMSECS';
+end;
+
+initialization
+  _driver := nil;
+  RegisterDriverProc(GetDriverObject);
+  dbisam_InitializeReservedWords;
+finalization
+  dbisam_reservedwords := nil;
+  UnregisterDriverProc(GetDriverObject);
+  FreeAndNIL(_driver);
+
+end.
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDADBXDriver.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDADBXDriver.pas
new file mode 100644
index 0000000..ee6b8a1
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDADBXDriver.pas	
@@ -0,0 +1,1009 @@
+unit uDADBXDriver;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Driver Library
+{
+{ compiler: Delphi 6 and up, Kylix 3 and up
+{ platform: Win32, Linux
+{
+{ (c)opyright RemObjects Software. all rights reserved.
+{
+{ Using this code requires a valid license of the Data Abstract
+{ which can be obtained at http://www.remobjects.com.
+{----------------------------------------------------------------------------}
+
+{$IFDEF MSWINDOWS}
+{$I ..\DataAbstract.inc}
+{$ELSE}
+{$I ../DataAbstract.inc}
+{$ENDIF}
+
+
+{$R DataAbstract_DBXDriver_Glyphs.res}
+
+interface
+
+uses Windows,Classes, DB, uDAEngine, uDAInterfaces, uROClasses, SqlExpr,{$IFNDEF DELPHI11UP}DBXpress,{$ENDIF}
+     SqlConst, uDAUtils, uDAIBInterfaces, uDAAdoInterfaces,uDAMySQLInterfaces, {$IFDEF DELPHI9UP}uDASybaseInterfaces,{$ENDIF}
+     uDADB2Interfaces, uDAOracleInterfaces;
+
+const
+  // Standard dbExpress driver identifiers
+  dbx_UnknownId = '???';
+  dbx_MSSQLId = 'MSSQL';
+  dbx_InterbaseId = 'Interbase';
+  dbx_OracleId = 'Oracle';
+  dbx_DB2Id = 'DB2';
+  dbx_MySQLId = 'MYSQL';
+  dbx_InformixId = 'Informix';
+  {$IFDEF DELPHI9UP}
+  dbx_ASAid = 'ASA';
+  dbx_ASEid = 'ASE';
+  {$ENDIF}
+
+type
+  // Standard dbExpress driver enumerated
+  TDADBXDriverType = (dbx_Unknown,
+    dbx_MSSQL,
+    dbx_Interbase,
+    dbx_Oracle,
+    dbx_DB2,
+    dbx_MySQL,
+    dbx_Informix
+  {$IFDEF DELPHI9UP}
+  , dbx_ASA, dbx_ASE
+  {$ENDIF DELPHI9UP}
+    );
+
+const
+  // Standard dbExpress driver identifier array (useful for lookups)
+  DBXDrivers: array[TDADBXDriverType] of string = (
+    dbx_UnknownId,
+    dbx_MSSQLId,
+    dbx_InterbaseId,
+    dbx_OracleId,
+    dbx_DB2Id,
+    dbx_MySQLId,
+    dbx_InformixId
+  {$IFDEF DELPHI9UP}
+   ,dbx_ASAid, dbx_ASEid
+  {$ENDIF DELPHI9UP}
+    );
+
+type
+  { TDADBXDriver }
+  TDADBXDriver = class(TDADriverReference)
+  end;
+
+  { TDAEDBXDriver }
+  TDAEDBXDriver = class(TDAEDriver, IDADriver40)
+  protected
+    function GetConnectionClass: TDAEConnectionClass; override;
+
+    // IDADriver
+    function GetDriverID: string; override;
+    function GetDescription: string; override;
+
+    procedure GetAuxDrivers(out List: IROStrings); override;
+    procedure GetAuxParams(const AuxDriver: string; out List: IROStrings); override;
+
+    function GetAvailableDriverOptions: TDAAvailableDriverOptions; override;
+    // IDADriver40
+    function GetProviderDefaultCustomParameters(Provider: string): string; safecall;
+    function GetDefaultConnectionType(const AuxDriver: string): string; override; safecall;
+  public
+  end;
+
+  { IDBXConnection
+      For identification purposes. }
+  IDBXConnection = interface
+    ['{D4E8FE6C-76B5-46FA-A850-2FD626960775}']
+    function GetDriverName: string;
+    function GetDriverType: TDADBXDriverType;
+
+    property DriverName: string read GetDriverName;
+    property DriverType: TDADBXDriverType read GetDriverType;
+  end;
+
+  { TDBXConnection }
+  TDBXConnection = class(TDAConnectionWrapper)
+  private
+    fSQLConnection: TSQLConnection;
+    fTransDesc: TTransactionDesc;
+
+  protected
+    function GetConnected: Boolean; override;
+    procedure SetConnected(Value: Boolean); override;
+
+  public
+    constructor Create(AOwner: TComponent); override;
+    destructor Destroy; override;
+
+    property SQLConnection: TSQLConnection read fSQLConnection;
+    property TransDesc: TTransactionDesc read fTransDesc;
+  end;
+
+
+  { TDAEDBXConnection }
+  TDAEDBXConnection = class(TDAEConnection, IDAFileBasedDatabase,
+                            IDACanQueryDatabaseNames, IDAUseGenerators ,{IDAADOConnection,}
+                            IDAInterbaseConnection, IDACanQueryGeneratorsNames,
+                            {$IFDEF DELPHI9UP}IDASybaseConnection,{$ENDIF}
+                            IDADB2Connection, IDAMySQLConnection,IDAOracleConnection)
+  private
+    fConnection: TDBXConnection;
+    fDriverName: string;
+    fDriverType: TDADBXDriverType;
+    fMSSQLSchemaEnabled: Boolean;
+    fSqlDialect: Integer;
+    FMySQLVersion: integer;
+    function GetMySQLVersion: integer;
+  protected
+    function QueryInterface(const IID: TGUID; out Obj): HResult; override; stdcall;
+    // TDAEConnection
+    function CreateCustomConnection: TCustomConnection; override;
+    function CreateMacroProcessor: TDASQLMacroProcessor; override;
+
+    function GetDatasetClass: TDAEDatasetClass; override;
+    function GetStoredProcedureClass: TDAEStoredProcedureClass; override;
+
+    procedure DoApplyConnectionString(aConnStrParser: TDAConnectionStringParser;
+      aConnectionObject: TCustomConnection); override;
+
+    function DoBeginTransaction: integer; override;
+    procedure DoCommitTransaction; override;
+    procedure DoRollbackTransaction; override;
+    function DoGetInTransaction: boolean; override;
+
+    function GetUserID: string; override; safecall;
+    procedure SetUserID(const Value: string); override; safecall;
+    function GetPassword: string; override; safecall;
+    procedure SetPassword(const Value: string); override; safecall;
+
+    procedure DoGetTableNames(out List: IROStrings); override;
+    procedure DoGetStoredProcedureNames(out List: IROStrings); override;
+    procedure DoGetViewNames(out List: IROStrings); override;
+    procedure DoGetForeignKeys(out ForeignKeys: TDADriverForeignKeyCollection); override;
+    procedure DoGetTableFields(const aTableName: string; out Fields: TDAFieldCollection); override;
+    procedure DoGetStoredProcedureParams(const aStoredProcedureName: string; out Params: TDAParamCollection); override;
+    function DoGetLastAutoInc(const GeneratorName: string): integer; override;
+    function IdentifierNeedsQuoting(const iIdentifier: string): boolean; override; safecall;
+    function GetQuoteChars: TDAQuoteCharArray; override;
+    // IDBXConnection
+    function GetDriverName: string;
+    function GetDriverType: TDADBXDriverType;
+    function GetSPSelectSyntax(HasArguments: Boolean): string; override;
+      safecall;
+    //IDAFileBasedDatabase
+    function GetFileExtensions: IROStrings;
+    //IDACanQueryDatabaseNames
+    function GetDatabaseNames: IROStrings;
+    //IDAUseGenerators
+    function GetNextAutoinc(const GeneratorName: string): integer; safecall;
+    // IDACanQueryGeneratorsNames
+    function GetGeneratorNames: IROStrings;
+  public
+    property MSSQLSchemaEnabled: Boolean read fMSSQLSchemaEnabled write fMSSQLSchemaEnabled;
+  end;
+
+  { TDAEDBXQuery }
+  TDAEDBXQuery = class(TDAEDataset,IDAMustSetParams)
+  private
+  protected
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+    function IsNeedToFixFMTBCDIssue: Boolean; override;
+    function DoExecute: integer; override;
+    function DoGetSQL: string; override;
+    procedure DoSetSQL(const Value: string); override;
+    procedure DoPrepare(Value: boolean); override;
+    procedure ClearParams; override;
+    procedure SetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  public
+  end;
+
+  { TDAEDBXStoredProcedure }
+  TDAEDBXStoredProcedure = class(TDAEStoredProcedure, IDAMustSetParams)
+  protected
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+
+    function GetStoredProcedureName: string; override;
+    procedure SetStoredProcedureName(const Name: string); override;
+    function DoExecute: integer; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function Execute: integer; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure RefreshParams; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  end;
+
+procedure Register;
+
+function DBXDriverIdToDBXDriverType(const anID: string): TDADBXDriverType;
+
+function GetDriverObject: IDADriver; stdcall;
+
+implementation
+
+uses SysUtils, INIFiles, uDADriverManager, uDARes, uDAMacroProcessors, Variants, SqlTimSt,
+  uROBinaryHelpers,uDASQL92Interfaces;
+
+// TODO: Add support for IADOConnection and IInterbaseConnection, etc by redefining QueryInterface in TDAEDBXConnection
+
+
+var
+  _driver: TDAEDriver = nil;
+
+procedure Register;
+begin
+  RegisterComponents(DAPalettePageName, [TDADBXDriver]);
+end;
+
+function GetDriverObject: IDADriver;
+begin
+  if (_driver = nil) then _driver := TDAEDBXDriver.Create(nil);
+  result := _driver;
+end;
+
+function DBXDriverIdToDBXDriverType(const anID: string): TDADBXDriverType;
+var
+  x: TDADBXDriverType;
+begin
+  result := dbx_Unknown;
+
+  for x := Low(TDADBXDriverType) to High(TDADBXDriverType) do
+    if AnsiSameText(DBXDrivers[x], anID) then begin
+      result := x;
+      Exit;
+    end;
+
+  //RaiseError('Unknown dbExpress driver %s', [anID]);
+end;
+
+{ TDBXConnection }
+
+constructor TDBXConnection.Create(AOwner: TComponent);
+begin
+  inherited;
+  fSQLConnection := TSQLConnection.Create(nil);
+end;
+
+destructor TDBXConnection.Destroy;
+begin
+  inherited;
+  fSQLConnection.Free;
+end;
+
+function TDBXConnection.GetConnected: Boolean;
+begin
+  result := fSQLConnection.Connected
+end;
+
+procedure TDBXConnection.SetConnected(Value: Boolean);
+begin
+  fSQLConnection.Connected := Value;
+end;
+
+{ TDAEDBXConnection }
+{$IFDEF DELPHI2009UP}
+const
+  SDriverNotInConfigFile = 'Driver (%s) not found in Cfg file (%s)';
+{$ENDIF}
+
+procedure TDAEDBXConnection.DoApplyConnectionString(
+  aConnStrParser: TDAConnectionStringParser; aConnectionObject: TCustomConnection);
+
+  function GetProfileString(Section, Setting, IniFileName: string): string;
+  var
+    IniFile: TMemIniFile;
+    List: TStrings;
+  begin
+    List := TStringList.Create;
+    try
+      IniFile := TMemIniFile.Create(IniFileName);
+      IniFile.ReadSectionValues(Section, List);
+      try
+        Result := List.Values[Setting];
+      finally
+        IniFile.Free;
+      end;
+    finally
+      List.Free;
+    end;
+  end;
+
+var
+  i: integer;
+  drvregfile: string;
+begin
+  inherited;
+  FMySQLVersion := -1;
+  with aConnStrParser do begin
+
+    with TDBXConnection(aConnectionObject).SQLConnection do begin
+      DriverName := AuxDriver;
+
+      fDriverType := DBXDriverIdToDBXDriverType(AuxDriver);
+
+      drvregfile := GetDriverRegistryFile(false);
+
+      try
+        VendorLib := GetProfileString(DriverName, VENDORLIB_KEY, drvregfile);
+        LibraryName := GetProfileString(DriverName, DLLLIB_KEY, drvregfile);
+        GetDriverFunc := GetProfileString(DriverName, GETDRIVERFUNC_KEY, drvregfile);
+      except
+        DatabaseErrorFmt(SDriverNotInConfigFile, [DriverName, drvregfile]);
+      end;
+
+      Params.Clear;
+      Params.Values[szUSERNAME] := UserID;
+      Params.Values[szPASSWORD] := Password;
+      if fDriverType = dbx_Interbase then begin // Dbx requires a seperate host field for Interbase
+        Params.Values[DATABASENAME_KEY] := Server + ':' + Database;
+        if auxParams[SQLDIALECT_KEY] = '' then begin
+          AuxParams[SQLDIALECT_KEY] := '3'; // default to 3
+        end;
+      end else begin
+        Params.Values[HOSTNAME_KEY] := Server;
+        Params.Values[DATABASENAME_KEY] := Database;
+      end;
+      fMSSQLSchemaEnabled := false;
+      for i := 0 to (AuxParamsCount - 1) do begin
+        if AnsiSameText(AuxParamNames[i], 'DriverName') then
+           fConnection.fSQLConnection.DriverName:=AuxParams[AuxParamNames[i]]
+        else if AnsiSameText(AuxParamNames[i], 'GetDriverFunc') then
+           fConnection.fSQLConnection.GetDriverFunc:=AuxParams[AuxParamNames[i]]
+        else if AnsiSameText(AuxParamNames[i], 'LibraryName') then
+           fConnection.fSQLConnection.LibraryName:=AuxParams[AuxParamNames[i]]
+        else if AnsiSameText(AuxParamNames[i], 'TableScope') then begin
+          if AnsiSameText(AuxParams[AuxParamNames[i]], 'Synonyms') then
+            TableScope := [tsTable, tsView, tsSynonym]
+          else
+            TableScope := [tsTable, tsView]
+        end
+        else if AnsiSameText(AuxParamNames[i], 'Schemas') then
+          fMSSQLSchemaEnabled := AuxParams['Schemas'] = '1'
+        else begin
+          Params.Add(AuxParamNames[i] + '=' + AuxParams[AuxParamNames[i]]);
+        end;
+      end;
+      LoginPrompt := FALSE;
+      if fDriverType = dbx_Interbase then fSqlDialect := StrToIntDef(AuxParams[SQLDIALECT_KEY],3);
+    end;
+  end;
+end;
+
+function TDAEDBXConnection.DoBeginTransaction: integer;
+begin
+  result := -1;
+
+  // TODO: allow more flexibility here...
+  fConnection.fTransDesc.TransactionID := 1;
+  fConnection.fTransDesc.IsolationLevel := xilREADCOMMITTED;
+{$IFDEF DELPHI10UP}{$WARN SYMBOL_DEPRECATED OFF}{$ENDIF}
+  fConnection.fSQLConnection.StartTransaction(fConnection.fTransDesc);
+{$IFDEF DELPHI10UP}{$WARN SYMBOL_DEPRECATED ON}{$ENDIF}
+end;
+
+procedure TDAEDBXConnection.DoCommitTransaction;
+begin
+{$IFDEF DELPHI10UP}{$WARN SYMBOL_DEPRECATED OFF}{$ENDIF}
+  fConnection.fSQLConnection.Commit(fConnection.fTransDesc);
+{$IFDEF DELPHI10UP}{$WARN SYMBOL_DEPRECATED ON}{$ENDIF}
+end;
+
+function TDAEDBXConnection.CreateCustomConnection: TCustomConnection;
+begin
+  fConnection := TDBXConnection.Create(nil);
+  fConnection.SQLConnection.LoginPrompt := FALSE;
+  result := fConnection;
+end;
+
+function TDAEDBXConnection.GetDatasetClass: TDAEDatasetClass;
+begin
+  result := TDAEDBXQuery;
+end;
+
+function TDAEDBXConnection.GetStoredProcedureClass: TDAEStoredProcedureClass;
+begin
+  result := TDAEDBXStoredProcedure;
+end;
+
+procedure TDAEDBXConnection.DoGetStoredProcedureNames(out List: IROStrings);
+begin
+  inherited DoGetStoredProcedureNames(List);
+  case fDriverType of
+    dbx_MSSQL: MSSQL_DoGetNames(GetDatasetClass.Create(Self), List, dotProcedure, MSSQLSchemaEnabled);
+    dbx_Interbase: IB_GetObjectNames(GetDatasetClass.Create(Self), List, dotProcedure);
+    dbx_MySQL: MYSQL_DoGetNames(GetDatasetClass.Create(Self), List, dotProcedure,fConnection.SQLConnection.Params.Values[DATABASENAME_KEY],GetMySQLVersion);
+    dbx_Oracle: Oracle_DoGetNames(GetDatasetClass.Create(Self), List, dotProcedure);
+  else
+{$IFDEF DELPHI10UP}{$WARN SYMBOL_DEPRECATED OFF}{$ENDIF}
+    fConnection.fSQLConnection.GetProcedureNames(List.Strings);
+{$IFDEF DELPHI10UP}{$WARN SYMBOL_DEPRECATED ON}{$ENDIF}
+  end;
+end;
+
+procedure TDAEDBXConnection.DoGetStoredProcedureParams(
+  const aStoredProcedureName: string; out Params: TDAParamCollection);
+begin
+  case fDriverType of
+    dbx_MySQL: MYSQL_DoGetStoredProcedureParams(aStoredProcedureName,GetDatasetClass.Create(Self),Params,fConnection.SQLConnection.Params.Values[DATABASENAME_KEY]);
+    dbx_MSSQL: MSSQL_DoGetStoredProcedureParams(aStoredProcedureName,GetDatasetClass.Create(Self),Params);
+  else
+    inherited;
+  end;
+end;
+
+procedure TDAEDBXConnection.DoGetTableNames(out List: IROStrings);
+begin
+  inherited DoGetTableNames(List);
+  case fDriverType of
+    dbx_MSSQL: MSSQL_DoGetNames(GetDatasetClass.Create(Self), List, dotTable, MSSQLSchemaEnabled);
+    dbx_Interbase: IB_GetObjectNames(GetDatasetClass.Create(Self), List, dotTable);
+    dbx_MySQL: MYSQL_DoGetNames(GetDatasetClass.Create(Self), List, dotTable,fConnection.SQLConnection.Params.Values[DATABASENAME_KEY],GetMySQLVersion);
+    dbx_Oracle: Oracle_DoGetNames(GetDatasetClass.Create(Self), List, dotTable);
+  else
+    fConnection.fSQLConnection.GetTableNames(List.Strings);
+  end;
+end;
+
+procedure TDAEDBXConnection.DoRollbackTransaction;
+begin
+{$WARNINGS OFF}
+  fConnection.fSQLConnection.Rollback(fConnection.fTransDesc);
+{$WARNINGS ON}  
+end;
+
+function TDAEDBXConnection.DoGetInTransaction: boolean;
+begin
+  result := fConnection.fSQLConnection.InTransaction
+end;
+
+function TDAEDBXConnection.GetDriverName: string;
+begin
+  result := fDriverName
+end;
+
+function TDAEDBXConnection.GetDriverType: TDADBXDriverType;
+begin
+  result := fDriverType
+end;
+
+function TDAEDBXConnection.CreateMacroProcessor: TDASQLMacroProcessor;
+begin
+  case fDriverType of
+    dbx_MSSQL: result := MSSQL_CreateMacroProcessor;
+    dbx_Interbase: result := IB_CreateMacroProcessor;
+    dbx_Oracle: result := Oracle_CreateMacroProcessor;
+  else
+    result := inherited CreateMacroProcessor;  
+  end;
+end;
+
+function TDAEDBXConnection.GetPassword: string;
+begin
+  Result := fConnection.SQLConnection.Params.Values[szPASSWORD];
+end;
+
+function TDAEDBXConnection.GetUserID: string;
+begin
+  Result := fConnection.SQLConnection.Params.Values[szUSERNAME];
+end;
+
+procedure TDAEDBXConnection.SetPassword(const Value: string);
+begin
+  fConnection.SQLConnection.Params.Values[szPASSWORD] := Value;
+end;
+
+procedure TDAEDBXConnection.SetUserID(const Value: string);
+begin
+  fConnection.SQLConnection.Params.Values[szUSERNAME] := Value;
+end;
+
+function TDAEDBXConnection.GetSPSelectSyntax(
+  HasArguments: Boolean): string;
+begin
+  case fDriverType of
+    dbx_MSSQL:  Result := MSSQL_GetSPSelectSyntax(HasArguments);
+    dbx_Interbase: Result := IB_GetSPSelectSyntax(HasArguments);
+    dbx_Oracle: Result := Oracle_GetSPSelectSyntax(HasArguments);
+  else
+    Result := inherited GetSPSelectSyntax(HasArguments);
+  end;
+end;
+
+function TDAEDBXConnection.GetFileExtensions: IROStrings;
+begin
+  case fDriverType of
+    dbx_Interbase: result := IB_GetFileExtensions;
+  else
+    result := TROStrings.Create;
+  end;
+end;
+
+function TDAEDBXConnection.GetGeneratorNames: IROStrings;
+begin
+  case fDriverType of
+    dbx_Interbase: Result:= IB_GetGeneratorNames(GetDatasetClass.Create(Self));
+  else
+    Result := NewROStrings;
+  end;
+end;
+
+function TDAEDBXConnection.QueryInterface(const IID: TGUID;
+  out Obj): HResult;
+begin
+  Result := E_NOINTERFACE;
+
+  {$IFDEF DELPHI9UP}
+  if IsEqualGUID(IID, IDASybaseConnection) then begin
+    if not (fDriverType in [dbx_ASA, dbx_ASE]) then Exit;
+  end
+  else
+  {$ENDIF}
+  if IsEqualGUID(IID, IDADB2Connection) then begin
+    if not (fDriverType in [dbx_DB2]) then Exit;
+  end
+  else if IsEqualGUID(IID, IDAInterbaseConnection) then begin
+    if not (fDriverType in [dbx_Interbase]) then Exit;
+  end
+  else if IsEqualGUID(IID, IDAADOConnection) then begin
+    if not (fDriverType in [dbx_MSSQL]) then Exit;
+  end
+  else if IsEqualGUID(IID, IDAMySQLConnection) then begin
+    if not (fDriverType in [dbx_MySQL]) then Exit;
+  end
+  else if IsEqualGUID(IID, IDAOracleConnection) then begin
+    if not (fDriverType in [dbx_Oracle]) then Exit;
+  end
+  else if IsEqualGUID(IID, IDAUseGenerators) then begin
+    if not (fDriverType in [dbx_Interbase,dbx_Oracle]) then Exit;
+  end
+  else if IsEqualGUID(IID, IDACanQueryGeneratorsNames) then begin
+    if not (fDriverType in [dbx_Interbase]) then Exit;
+  end
+  else if IsEqualGUID(IID, IDAFileBasedDatabase) then begin
+    if not (fDriverType in [dbx_Interbase]) then Exit;
+  end
+  else if IsEqualGUID(IID, IDACanQueryDatabaseNames) then begin
+    if not (fDriverType in [dbx_MSSQL, dbx_Oracle, dbx_MySQL {$IFDEF DELPHI9UP}, dbx_ASA, dbx_ASE{$ENDIF DELPHI9UP}]) then Exit;
+  end;
+
+  Result := inherited QueryInterface(IID, Obj);
+end;
+
+function TDAEDBXConnection.GetDatabaseNames: IROStrings;
+begin
+  case fDriverType of
+    dbx_MSSQL: Result:=MSSQL_GetDatabaseNames(Self);
+    dbx_MySQL: Result:=MYSQL_GetDatabaseNames(Self);
+  else
+    Result := NewROStrings;
+  end;
+end;
+
+procedure TDAEDBXConnection.DoGetViewNames(out List: IROStrings);
+begin
+  inherited DoGetViewNames(List);
+  case fDriverType of
+    dbx_MSSQL: MSSQL_DoGetNames(GetDatasetClass.Create(Self), List, dotView, MSSQLSchemaEnabled);
+    dbx_Interbase: IB_GetObjectNames(GetDatasetClass.Create(Self), List, dotView);
+    dbx_MySQL: MYSQL_DoGetNames(GetDatasetClass.Create(Self), List, dotView,fConnection.SQLConnection.Params.Values[DATABASENAME_KEY],GetMySQLVersion);
+    dbx_Oracle: Oracle_DoGetNames(GetDatasetClass.Create(Self), List, dotView);
+  else
+    //
+  end;
+end;
+
+procedure TDAEDBXConnection.DoGetForeignKeys(
+  out ForeignKeys: TDADriverForeignKeyCollection);
+begin
+  inherited DoGetForeignKeys(ForeignKeys);
+  case fDriverType of
+    dbx_MSSQL: MSSQL_DoGetForeignKeys(GetDatasetClass.Create(Self), ForeignKeys, MSSQLSchemaEnabled);
+    dbx_Interbase: IB_DoGetForeignKeys(GetDatasetClass.Create(Self), ForeignKeys);
+    dbx_MySQL: MYSQL_DoGetForeignKeys(GetDatasetClass.Create(Self), ForeignKeys,fConnection.SQLConnection.Params.Values[DATABASENAME_KEY],GetMySQLVersion);
+    dbx_ORACLE: Oracle_DoGetForeignKeys(GetDatasetClass.Create(Self), ForeignKeys);
+  else
+    //
+  end;
+end;
+
+procedure TDAEDBXConnection.DoGetTableFields(const aTableName: string;
+  out Fields: TDAFieldCollection);
+begin
+  case fDriverType of
+    dbx_MSSQL: MSSQL_DoGetTableFields(QuoteIdentifierIfNeeded(aTableName), GetDatasetClass.Create(Self), Fields);
+    dbx_Interbase: IB_GetTableFields(QuoteIdentifierIfNeeded(aTableName), GetDatasetClass.Create(Self), Fields);
+    dbx_MySQL: MYSQL_DoGetTableFields(QuoteIdentifierIfNeeded(aTableName), GetDatasetClass.Create(Self), Fields,fConnection.SQLConnection.Params.Values[DATABASENAME_KEY],GetMySQLVersion);
+    dbx_Oracle: Oracle_DoGetTableFields(QuoteIdentifierIfNeeded(aTableName), GetDatasetClass.Create(Self), Fields);
+  else
+    inherited DoGetTableFields(QuoteIdentifierIfNeeded(aTableName), Fields);
+  end;
+end;
+
+function TDAEDBXConnection.DoGetLastAutoInc(
+  const GeneratorName: string): integer;
+begin
+  case fDriverType of
+    dbx_MSSQL: Result := MSSQL_DoGetLastAutoInc(GeneratorName, GetDatasetClass.Create(Self));
+    dbx_Interbase: Result := IB_GetLastAutoInc(GeneratorName, GetDatasetClass.Create(Self));
+    dbx_Oracle: Result := Oracle_DoGetLastAutoInc(GeneratorName,GetDatasetClass.Create(Self));
+    dbx_MySQL: Result := MySQL_GetLastAutoInc(GeneratorName,GetDatasetClass.Create(Self));
+  else
+    Result := inherited DoGetLastAutoInc(GeneratorName);
+  end;
+end;
+
+function TDAEDBXConnection.GetNextAutoinc(
+  const GeneratorName: string): integer;
+begin
+  case fDriverType of
+    dbx_Interbase: Result := IB_GetNextAutoinc(GeneratorName, GetDatasetClass.Create(Self));
+    dbx_Oracle:   Result := Oracle_GetNextAutoinc(GeneratorName, GetDatasetClass.Create(Self));
+  else
+    result := -1;
+  end;
+end;
+
+function TDAEDBXConnection.IdentifierNeedsQuoting(
+  const iIdentifier: string): boolean;
+begin
+  Result := inherited IdentifierNeedsQuoting(iIdentifier);
+  if not Result then
+    case fDriverType of
+      dbx_MSSQL: Result := MSSQL_IdentifierNeedsQuoting(iIdentifier);
+      dbx_Interbase: Result := IB_IdentifierNeedsQuoting(iIdentifier, fSqlDialect);
+      dbx_MySQL: Result := MYSQL_IdentifierNeedsQuoting(iIdentifier);
+      dbx_ORACLE: Result := Oracle_IdentifierNeedsQuoting(iIdentifier);
+      dbx_DB2: Result := DB2_IdentifierNeedsQuoting(iIdentifier);
+      {$IFDEF DELPHI9UP}
+      dbx_ASA, dbx_ASE: Result := Sybase_IdentifierNeedsQuoting(iIdentifier);
+      {$ENDIF DELPHI9UP}
+    else
+      Result:= SQL92_IdentifierNeedsQuoting(iIdentifier);
+    end;
+end;
+
+function TDAEDBXConnection.GetQuoteChars: TDAQuoteCharArray;
+begin
+  case fDriverType of
+    dbx_Oracle: Result:=Oracle_GetQuoteChars;
+  else
+    Result:= inherited GetQuoteChars;
+  end;    
+end;
+
+function TDAEDBXConnection.GetMySQLVersion: integer;
+begin
+  if FMySQLVersion = -1 then FMySQLVersion := MYSQL_GetVersion(GetDatasetClass.Create(Self));
+  Result := FMySQLVersion;
+end;
+
+{ TDAEDBXDriver }
+
+function TDAEDBXDriver.GetAvailableDriverOptions: TDAAvailableDriverOptions;
+begin
+  result := [doAuxDriver, doServerName, doDatabaseName, doLogin, doCustom];
+end;
+
+function TDAEDBXDriver.GetConnectionClass: TDAEConnectionClass;
+begin
+  result := TDAEDBXConnection;
+end;
+
+function TDAEDBXDriver.GetDefaultConnectionType(
+  const AuxDriver: string): string;
+begin
+  case DBXDriverIdToDBXDriverType(AuxDriver) of
+    dbx_MSSQL: Result:=MSSQL_DriverType;
+    dbx_Interbase: Result:=IB_DriverType;
+    dbx_Oracle: Result:=Oracle_DriverType;
+    dbx_DB2: Result:=DB2_DriverType;
+    dbx_MySQL: Result:=MySQL_DriverType;
+    dbx_Informix: Result:=Informix_DriverType;
+  {$IFDEF DELPHI9UP}
+    dbx_ASA,dbx_ASE : Result:=ASA_DriverType;
+  {$ENDIF DELPHI9UP}
+  else
+    Result := inherited GetDefaultConnectionType(AuxDriver);
+  end;
+end;
+
+function TDAEDBXDriver.GetDescription: string;
+begin
+  result := 'Borland DBXExpress Driver';
+end;
+
+function TDAEDBXDriver.GetDriverID: string;
+begin
+  result := 'DBX';
+end;
+
+procedure TDAEDBXDriver.GetAuxDrivers(out List: IROStrings);
+var
+  i: Integer;
+  lDriversIni: string;
+  x: TDADBXDriverType;
+begin
+  List := NewROStrings;
+
+  lDriversIni := GetDriverRegistryFile(false);
+  if FileExists(lDriversIni) then begin
+    with TMemIniFile.Create(lDriversIni) do try
+      ReadSections(List.Strings);
+      for i := List.Count - 1 downto 0 do begin
+        if not ValueExists(List[i], 'LibraryName') then List.Delete(i);
+      end; { for }
+    finally
+      Free();
+    end;
+  end
+  else begin
+    for x := Low(TDADBXDriverType) to High(TDADBXDriverType) do
+      if (x <> dbx_Unknown) {// Redundant but safe if I change the enum later...} then
+        List.Add(DBXDrivers[x])
+  end;
+  List.Sorted:=True;
+end;
+
+procedure TDAEDBXDriver.GetAuxParams(const AuxDriver: string;
+  out List: IROStrings);
+begin
+  inherited;
+  List.Add('TableScope=Synonyms');
+  List.Add('DriverName=<DriverName>');
+  List.Add('GetDriverFunc=<GetDriverFunc>');
+  List.Add('LibraryName=<LibraryName>');
+  case DBXDriverIdToDBXDriverType(AuxDriver) of
+    dbx_MSSQL: List.Add('Schemas=(0,1)');
+    dbx_Interbase: List.Add('Interbase TransIsolation=(ReadCommited,RepeatableRead)');
+  end;
+end;
+
+function TDAEDBXDriver.GetProviderDefaultCustomParameters(
+  Provider: string): string;
+begin
+  Result := '';
+  case DBXDriverIdToDBXDriverType(Provider) of
+    dbx_MSSQL: Result := 'Schemas=0;';
+    dbx_Interbase: Result:='Interbase TransIsolation=ReadCommited;';
+  end;
+end;
+
+{ TDAEDBXQuery }
+
+procedure TDAEDBXQuery.ClearParams;
+begin
+  inherited;
+  TSQLQuery(Dataset).Params.Clear;
+end;
+
+function TDAEDBXQuery.CreateDataset(aConnection: TDAEConnection): TDataset;
+begin
+  result := TSQLQuery.Create(nil);
+
+  //TSQLQuery(result).rea
+  //TSQLQuery(result).CursorLocation := clUseClient;
+  //TSQLQuery(result).CursorType := ctOpenForwardOnly;
+  TSQLQuery(result).SQLConnection := TDAEDBXConnection(aConnection).fConnection.fSQLConnection;
+end;
+
+{$IFNDEF DELPHI12UP}
+function GetBlobValue(const val: Variant): string;
+var
+  lsize: integer;
+  p: Pointer;
+begin
+  if VarType(val) = 8209 then
+  begin
+    lSize := VarArrayHighBound(val, 1) - VarArrayLowBound(val, 1) + 1;
+    p := VarArrayLock(val);
+    try
+      setlength(REsult, lSize);
+      move(p^, Result[1], lSize);
+    finally
+      VarArrayUnlock(val);
+    end;
+  end else if vartype(val) = varEmpty then
+    result := ''
+  else
+    result := val;
+end;
+{$ELSE}
+function GetBlobValue(const val: Variant): TBytes;
+var
+  Data: UnicodeString;
+  lData: Ansistring;
+  Len: Integer;
+  lsize: integer;
+  p: Pointer;
+begin
+  if VarType(val) = 8209 then begin
+    lSize := VarArrayHighBound(val, 1) - VarArrayLowBound(val, 1) + 1;
+    p := VarArrayLock(val);
+    try
+      setlength(Result, lSize);
+      move(p^, Result[0], lSize);
+    finally
+      VarArrayUnlock(val);
+    end;
+  end
+  else if vartype(val) = varEmpty then
+    Result := Null
+  else if (VarType(Val) = varOleStr) or (VarType(Val) = varUString) then begin
+    Data := VarToStr(Val);
+    Len := Length(Data);
+    SetLength(Result, Len * SizeOf(Char));
+    Move(Pointer(Data)^, Pointer(Result)^, Len * SizeOf(Char));
+  end
+  else if VarType(Val) = varString then begin
+    lData := PAnsiChar(TVarData(Val).vString);
+    Len := Length(lData);
+    SetLength(Result, Len);
+    Move(Pointer(lData)^, Pointer(Result)^, Len);
+  end
+  else
+    Result := val;
+end;
+{$ENDIF}
+
+function TDAEDBXQuery.DoExecute: integer;
+var
+  i: Integer;
+  refParams: TParams;
+  dapar: TDAParam;
+  lDriverName: string;
+begin
+  if Assigned(DataSet) and Assigned(TSQLQuery(DataSet).SQLConnection) and
+    Assigned(TSQLQuery(DataSet).Params) then begin
+    lDriverName := TSQLQuery(DataSet).SQLConnection.DriverName;
+    refParams := TSQLQuery(DataSet).Params;
+    case DBXDriverIdToDBXDriverType(lDriverName) of
+      dbx_Oracle: begin
+          for i := 0 to refParams.Count - 1 do begin
+            case VarType(refParams[i].Value) of
+              varInteger,
+                varSmallInt,
+                varShortInt,
+                varWord,
+                varByte,
+                varLongWord:
+                refParams[i].AsString := VarToStr(refParams[i].Value);
+              varSingle,
+                varDouble,
+                varCurrency:
+                refParams[i].AsBCD := StrToCurr(VarToStr(refParams[i].Value));
+              varDate:
+                refParams[i].AsSQLTimeStamp := DateTimeToSQLTimeStamp(VarToDateTime(refParams[i].Value));
+            end;
+          end;
+        end;
+      dbx_Interbase: begin
+          for i := 0 to refParams.Count - 1 do begin
+            dapar := GetParams.FindParam(refParams[i].Name);
+            if (dapar <> nil) then begin
+              if dapar.DataType = datBlob then begin
+                refParams[i].AsBlob := GetBlobValue(dapar.AsVariant);
+                continue;
+              end;
+              if dapar.DataType = datMemo then begin
+                refParams[i].AsMemo := dapar.AsVariant;
+                continue;
+              end;
+            end;
+            case VarType(refParams[i].Value) of
+              varDate:
+                refParams[i].AsSQLTimeStamp := DateTimeToSQLTimeStamp(VarToDateTime(refParams[i].Value));
+            end;
+          end;
+        end;
+    else ;
+    end;
+  end;
+
+  Result := TSQLQuery(Dataset).ExecSQL;
+end;
+
+function TDAEDBXQuery.DoGetSQL: string;
+begin
+  result := TSQLQuery(Dataset).SQL.Text;
+end;
+
+procedure TDAEDBXQuery.DoPrepare(Value: boolean);
+begin
+  TSQLQuery(Dataset).Prepared := Value;
+end;
+
+procedure TDAEDBXQuery.DoSetSQL(const Value: string);
+begin
+  TSQLQuery(Dataset).SQL.Text := Value;
+end;
+
+procedure TDAEDBXQuery.GetParamValues(AParams: TDAParamCollection);
+begin
+  GetParamValuesStd(AParams, TSQLQuery(Dataset).Params);
+end;
+
+function TDAEDBXQuery.IsNeedToFixFMTBCDIssue: Boolean;
+var
+  i: integer;
+begin
+  Result:=False;
+  For i:=0 to TSQLQuery(Dataset).FieldCount-1 do begin
+    Result:= TSQLQuery(Dataset).Fields[i].DataType = ftFMTBcd;
+    if Result then Break;
+  end;
+end;
+
+procedure TDAEDBXQuery.SetParamValues(AParams: TDAParamCollection);
+var
+  i: integer;
+  p: TParams;
+begin
+  SetParamValuesStd(AParams, TSQLQuery(Dataset).Params);
+    p := TSQLQuery(Dataset).Params;
+  for I := 0 to p.Count - 1 do
+    if p[i].DataType = ftLargeint then
+       p[i].DataType := ftFMTBcd;
+end;
+
+{ TDAEDBXStoredProcedure }
+
+function TDAEDBXStoredProcedure.CreateDataset(
+  aConnection: TDAEConnection): TDataset;
+begin
+  result := TSQLStoredProc.Create(nil);
+  TSQLStoredProc(result).SQLConnection := TDAEDBXConnection(aConnection).fConnection.fSQLConnection;
+end;
+
+procedure TDAEDBXStoredProcedure.SetParamValues(AParams: TDAParamCollection);
+begin
+  SetParamValuesStd(AParams, TSQLStoredProc(Dataset).Params);
+end;
+
+procedure TDAEDBXStoredProcedure.GetParamValues(AParams: TDAParamCollection);
+begin
+  GetParamValuesStd(AParams, TSQLStoredProc(Dataset).Params);
+end;
+
+function TDAEDBXStoredProcedure.Execute: integer;
+begin
+  SetParamValues(GetParams);
+  Result:= DoExecute;
+  GetParamValues(GetParams);
+end;
+
+function TDAEDBXStoredProcedure.GetStoredProcedureName: string;
+begin
+  result := TSQLStoredProc(Dataset).StoredProcName;
+end;
+
+procedure TDAEDBXStoredProcedure.SetStoredProcedureName(
+  const Name: string);
+begin
+  TSQLStoredProc(Dataset).StoredProcName := Name;
+end;
+
+procedure TDAEDBXStoredProcedure.RefreshParams;
+begin
+  TSQLStoredProc(Dataset).Prepared := True;
+  RefreshParamsStd(TSQLStoredProc(Dataset).Params)
+end;
+
+exports
+  GetDriverObject name func_GetDriverObject;
+
+function TDAEDBXStoredProcedure.DoExecute: integer;
+begin
+  Result := TSQLStoredProc(Dataset).ExecProc;
+end;
+
+initialization
+  _driver := nil;
+  RegisterDriverProc(GetDriverObject);
+finalization
+  UnregisterDriverProc(GetDriverObject);
+  FreeAndNIL(_driver);
+end.
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDADOADriver.dcr b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDADOADriver.dcr
new file mode 100644
index 0000000..3e5d914
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDADOADriver.dcr differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDADOADriver.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDADOADriver.pas
new file mode 100644
index 0000000..6b19ea3
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDADOADriver.pas	
@@ -0,0 +1,689 @@
+unit uDADOADriver;
+
+// if using DOA 4.0 or higher activate this define
+{$DEFINE DOA4}
+
+{$IFDEF MSWINDOWS}
+{$I ..\DataAbstract.inc}
+{$ELSE}
+{$I ../DataAbstract.inc}
+{$ENDIF}
+
+interface
+
+uses
+  DB,
+  Classes,
+  uROClasses,
+  uDAEngine,
+  uDAInterfaces,
+  uDAOracleInterfaces,
+  uDAUtils,
+  Oracle,
+  OracleData;
+
+type
+
+  TDADOADriver = class(TDADriverReference)
+  end;
+
+  TDAEDOADriver = class(TDAOracleDriver)
+  private
+    fTraceCallBack: TDALogTraceEvent; // UKO 26.09.2003
+  protected
+    procedure DoSetTraceOptions(TraceActive: Boolean; TraceOptions:
+      TDATraceOptions; Callback: TDALogTraceEvent); override;
+    function GetAvailableDriverOptions: TDAAvailableDriverOptions; override;
+    function GetConnectionClass: TDAEConnectionClass; override;
+    function GetDefaultCustomParameters: string; override;
+    function GetDescription: string; override;
+    function GetDriverID: string; override;
+
+    procedure GetAuxParams(const AuxDriver: string; out List: IROStrings); override;
+  end;
+
+  TDAEDOAConnection = class(TDAOracleConnection)
+  private
+    function GetOracleSession: TOracleSession;
+  protected
+    function CreateCompatibleQuery: IDADataset; override;
+    function CreateCustomConnection: TCustomConnection; override;
+    procedure DoApplyConnectionString(aConnStrParser: TDAConnectionStringParser; aConnectionObject: TCustomConnection); override;
+
+    function DoGetInTransaction: boolean; override;
+    function DoBeginTransaction: Integer; override;
+    procedure DoCommitTransaction; override;
+    procedure DoRollbackTransaction; override;
+    function GetDataSetClass: TDAEDatasetClass; override;
+    function GetStoredProcedureClass: TDAEStoredProcedureClass; override;
+    property OracleSession: TOracleSession read GetOracleSession;
+  end;
+
+  TDAEDOAQuery = class(TDAEDataSet,  IOracleDataSet)
+  private
+    function LockModeDaToDoa(LockMode: TDAOracleLockMode): TLockingModeOptions;
+    function LockModeDoaToDa(LockMode: TLockingModeOptions): TDAOracleLockMode;
+  protected
+    procedure ClearParams; override;
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+    function DoExecute: Integer; override;
+    function DoGetSQL: string; override;
+    procedure DoPrepare(Value: Boolean); override;
+    procedure DoSetSQL(const Value: string); override;
+    function GetLockMode: TDAOracleLockMode;
+    function GetOptions: TDAOracleOptions;
+    procedure SetLockMode(Value: TDAOracleLockMode);
+    procedure SetOptions(Value: TDAOracleOptions);
+    procedure SetParamValues(Params: TDAParamCollection); override; safecall;
+    procedure GetParamValues(Params: TDAParamCollection); override; safecall;
+  end;
+
+  TDAEDOAStoredProcedure = class(TDAEStoredProcedure)
+  private
+    fProcedureName: string;
+    FConnection: TDAEDOAConnection;
+    procedure DoGetParams;
+    function DoGetParamsResult: TDAParam;
+    procedure DoSetSource;
+  protected
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+    function Execute: Integer; override;
+    function GetStoredProcedureName: string; override;
+    procedure RefreshParams; override;
+    procedure SetParamValues(Params: TDAParamCollection); override; safecall;
+    procedure GetParamValues(Params: TDAParamCollection); override; safecall;
+    procedure SetStoredProcedureName(const Name: string); override;
+  end;
+
+procedure Register;
+
+function GetDriverObject: IDADriver; stdcall;
+
+implementation
+
+uses
+  SysUtils,
+  uDADriverManager,
+  uDARes;
+
+type
+  TDADOAInternalConnection = class(TCustomConnection)
+  private
+    fOracleSession: TOracleSession;
+  protected
+    procedure DoConnect; override;
+    procedure DoDisconnect; override;
+    function GetConnected: Boolean; override;
+  public
+    constructor Create(AOwner: TComponent); override;
+    destructor Destroy; override;
+    property Session: TOracleSession read fOracleSession;
+  end;
+
+  TOraPath = record
+    aScheme: string;
+    aPackage: string;
+    aObject: string;
+  end;
+
+var
+  _Driver: TDAEDriver = nil;
+
+procedure Register;
+begin
+  RegisterComponents(DAPalettePageName, [TDADOADriver]);
+end;
+
+{$IFDEF DataAbstract_SchemaModelerOnly}
+{$INCLUDE ..\DataAbstract_SchemaModelerOnly.inc}
+{$ENDIF DataAbstract_SchemaModelerOnly}
+
+function GetDriverObject: IDADriver;
+begin
+  {$IFDEF DataAbstract_SchemaModelerOnly}
+  if not RunningInSchemaModeler then begin
+    result := nil;
+    exit;
+  end;
+  {$ENDIF}
+  if (_driver = nil) then _driver := TDAEDOADriver.Create(nil);
+  result := _driver;
+end;
+
+
+function HandleSqlName(AParamName: string; AParamType: TDAParamType): string;
+begin
+  Result := AParamName;
+  if AParamType = daptResult then Result := 'result';
+end;
+
+function DataTypeDaToOra(AType: TDADataType): Integer;
+const
+  Error = 'INTERNAL: not supported by DOA';
+begin
+  Result := otString;
+  case AType of
+    datUnknown: raise Exception.Create(Error);
+    datGuid, datString: Result := otString;
+    datDateTime: Result := otDate;
+    datSingleFloat, datFloat, datCurrency: Result := otFloat;
+    datByte,
+    datShortInt,
+    datWord,
+    datCardinal,
+    datAutoInc,
+    datInteger,
+    datLargeInt: Result := otInteger;
+    datBoolean: Result := otInteger; // needs a special handling
+    datMemo: Result := otClob;
+    datBlob: Result := otBlob;
+    datXml, datWideString: Result := otVarchar2;
+    datWideMemo : Result := otNCLOB;
+    datLargeAutoInc, datLargeUInt,datDecimal : Result := otNumber;
+  end;
+end;
+
+procedure SetDataSetParams(Params: TDAParamCollection; DataSet: TDataSet);
+var
+  I: Integer;
+  Ds: TOracleDataSet;
+  ParamIndex, OraType: Integer;
+  Name: string;
+begin
+  Ds := TOracleDataSet(DataSet);
+  if Ds.Variables.Count > Params.Count then
+    for I := Ds.VariableCount - 1 downto 0 do
+      if Params.ParamByName(Ds.VariableName(I)) = nil then
+        Ds.DeleteVariable(Ds.VariableName(I));
+
+  for I := 0 to Params.Count - 1 do
+  begin
+    ParamIndex := Ds.VariableIndex(Params[I].Name);
+    Name := HandleSqlName(Params[I].Name, Params[I].ParamType);
+    OraType := DataTypeDaToOra(Params[I].DataType);
+    // New Param
+    if ParamIndex = -1 then
+      Ds.DeclareVariable(Name, OraType);
+    // Changed Param
+    if (ParamIndex > -1) and (Ds.VariableType(ParamIndex) <> DataTypeDaToOra(
+      Params[I].DataType)) then
+    begin
+      Ds.DeleteVariable(Params[I].Name);
+      Ds.DeclareVariable(Name, OraType);
+    end;
+    // Set value
+    if Params[I].DataType = datBoolean then
+      Ds.SetVariable(Name, Integer(Params[I].Value))
+    else
+      Ds.SetVariable(Name, Params[I].Value);
+  end;
+end;
+
+{ INTERNAL CLASSES *********************************************************** }
+{
+*************************** TDADOAInternalConnection ***************************
+}
+
+constructor TDADOAInternalConnection.Create(AOwner: TComponent);
+begin
+  inherited;
+  fOracleSession := TOracleSession.Create(nil);
+end;
+
+destructor TDADOAInternalConnection.Destroy;
+begin
+  fOracleSession.Free;
+  inherited;
+end;
+
+procedure TDADOAInternalConnection.DoConnect;
+begin
+  fOracleSession.LogOn;
+end;
+
+procedure TDADOAInternalConnection.DoDisconnect;
+begin
+  fOracleSession.LogOff;
+end;
+
+function TDADOAInternalConnection.GetConnected: Boolean;
+begin
+  Result := fOracleSession.Connected;
+end;
+
+{ PUBLIC CLASSES ************************************************************* }
+{
+******************************** TDAEDOADriver *********************************
+}
+
+// -----------------------------------------------------------------------------
+// TDAEDOADriver.DoSetTraceOptions
+//
+// Tracing can only be enabled when DOA Version 4.0 or higher is used.
+// UKO 26.09.2003 21:14:47
+//
+
+procedure TDAEDOADriver.DoSetTraceOptions(TraceActive: Boolean; TraceOptions:
+  TDATraceOptions; Callback: TDALogTraceEvent);
+begin
+  inherited;
+
+  if TraceActive then
+  begin
+    fTraceCallBack := Callback;
+
+    {$IFDEF DOA4}
+    EnableMonitor;
+    {$ENDIF}
+  end
+  else
+  begin
+    fTraceCallBack := nil;
+
+    {$IFDEF DOA4}
+    DisableMonitor;
+    {$ENDIF}
+  end;
+
+end;
+
+procedure TDAEDOADriver.GetAuxParams(const AuxDriver: string;
+  out List: IROStrings);
+begin
+  inherited;
+end;
+
+// -----------------------------------------------------------------------------
+// TDAEDOADriver.GetAvailableDriverOptions
+//
+// Only Database, Login and Custom needed. doServerName is not needed !
+//
+// UKO 25.09.2003 17:51:31
+//
+
+function TDAEDOADriver.GetAvailableDriverOptions: TDAAvailableDriverOptions;
+begin
+  Result := [doDatabaseName, doLogin{, doCustom}];
+end;
+
+function TDAEDOADriver.GetConnectionClass: TDAEConnectionClass;
+begin
+  Result := TDAEDOAConnection;
+end;
+
+function TDAEDOADriver.GetDefaultCustomParameters: string;
+begin
+  Result:='';
+end;
+
+function TDAEDOADriver.GetDescription: string;
+begin
+  Result := 'Direct Oracle Access Driver'{$IFDEF DataAbstract_SchemaModelerOnly} + SchemaModelerOnly{$ENDIF};;
+end;
+
+function TDAEDOADriver.GetDriverID: string;
+begin
+  Result := 'DOA';
+end;
+
+{
+****************************** TDAEDOAConnection *******************************
+}
+
+function TDAEDOAConnection.CreateCompatibleQuery: IDADataset;
+begin
+  Result := inherited CreateCompatibleQuery;
+  OracleSession.LogOn;
+end;
+
+function TDAEDOAConnection.CreateCustomConnection: TCustomConnection;
+begin
+  Result := TDADOAInternalConnection.Create(nil);
+end;
+
+// -----------------------------------------------------------------------------
+// TDAEDOAConnection.CreateMacroProcessor
+//
+// UKO 25.09.2003 18:43:06
+//
+
+
+// -----------------------------------------------------------------------------
+// TDAEDOAConnection.DoApplyConnectionString
+//
+// Use Database instead of Server. Server has no meaning in Oracle
+// UKO 25.09.2003 17:54:25
+//
+
+procedure TDAEDOAConnection.DoApplyConnectionString(aConnStrParser: TDAConnectionStringParser; aConnectionObject: TCustomConnection);
+begin
+  inherited;
+  with aConnStrParser do begin
+    OracleSession.LogonDatabase := Database;
+    OracleSession.LogonUsername := UpperCase(UserID);
+    OracleSession.LogonPassword := Password;
+  end;
+end;
+
+function TDAEDOAConnection.DoBeginTransaction: Integer;
+begin
+  // DOA doesn't have any special transaction starting routines
+  Result := 0;
+end;
+
+procedure TDAEDOAConnection.DoCommitTransaction;
+begin
+  OracleSession.Commit;
+end;
+
+function TDAEDOAConnection.DoGetInTransaction: boolean;
+begin
+  Result := OracleSession.InTransaction;
+end;
+
+procedure TDAEDOAConnection.DoRollbackTransaction;
+begin
+  OracleSession.Rollback;
+end;
+
+function TDAEDOAConnection.GetDataSetClass: TDAEDatasetClass;
+begin
+  Result := TDAEDOAQuery;
+end;
+
+function TDAEDOAConnection.GetOracleSession: TOracleSession;
+begin
+  Result := TDADOAInternalConnection(inherited ConnectionObject).Session;
+end;
+
+
+
+function TDAEDOAConnection.GetStoredProcedureClass: TDAEStoredProcedureClass;
+begin
+  Result := TDAEDOAStoredProcedure;
+end;
+
+// -----------------------------------------------------------------------------
+// TDAEDOAConnection.IdentifierNeedsQuoting
+//
+// Default behavior not enough, as '$' and '.' are also a valid character which doesn´t need quoting
+//
+// UKO 25.09.2003 11:48:13
+//
+
+{
+********************************* TDAEDOAQuery *********************************
+}
+
+procedure TDAEDOAQuery.ClearParams;
+begin
+  inherited;
+  TOracleDataSet(Dataset).ClearVariables;
+end;
+
+function TDAEDOAQuery.CreateDataset(aConnection: TDAEConnection): TDataset;
+begin
+  Result := TOracleDataSet.Create(nil);
+  TOracleDataSet(Result).ReadOnly := True;
+  TOracleDataSet(Result).Session := TDAEDOAConnection(aConnection).OracleSession;
+end;
+
+function TDAEDOAQuery.DoExecute: Integer;
+begin
+  TOracleDataSet(DataSet).ExecSQL;
+  Result := -1;
+end;
+
+function TDAEDOAQuery.DoGetSQL: string;
+begin
+  Result := TOracleDataSet(Dataset).SQL.Text;
+end;
+
+procedure TDAEDOAQuery.DoPrepare(Value: Boolean);
+begin
+  TOracleDataSet(DataSet).Optimize := Value;
+end;
+
+procedure TDAEDOAQuery.DoSetSQL(const Value: string);
+begin
+  TOracleDataSet(Dataset).SQL.Text := Value;
+end;
+
+function TDAEDOAQuery.GetLockMode: TDAOracleLockMode;
+begin
+  Result := LockModeDoaToDa(TOracleDataSet(Dataset).LockingMode)
+end;
+
+function TDAEDOAQuery.GetOptions: TDAOracleOptions;
+begin
+  // Can't be implemented
+end;
+
+procedure TDAEDOAQuery.GetParamValues(Params: TDAParamCollection);
+var
+  i: integer;
+  par: TDAParam;
+  ds: TOracleDataSet;
+begin
+  ds := TOracleDataSet(Dataset);
+  if not Assigned(ds.Variables) then Exit;
+
+  for i := 0 to (ds.VariableCount - 1) do begin
+    par := Params.ParamByName(copy(ds.VariableName(i),2,MaxInt));
+    if par.ParamType in [daptOutput, daptInputOutput, daptResult] then
+       par.Value := ds.GetVariable(i);
+  end;
+end;
+
+function TDAEDOAQuery.LockModeDaToDoa(LockMode: TDAOracleLockMode):
+  TLockingModeOptions;
+begin
+  Result := lmNone;
+  case LockMode of
+    olmLockImmediate: Result := lmLockImmediate;
+    olmLockDelayed: Result := lmLockDelayed;
+  end;
+end;
+
+function TDAEDOAQuery.LockModeDoaToDa(LockMode: TLockingModeOptions):
+  TDAOracleLockMode;
+begin
+  Result := olmNone;
+  case LockMode of
+    lmLockImmediate: Result := olmLockImmediate;
+    lmLockDelayed: Result := olmLockDelayed;
+  end;
+end;
+
+procedure TDAEDOAQuery.SetLockMode(Value: TDAOracleLockMode);
+begin
+  TOracleDataSet(Dataset).LockingMode := LockModeDaToDoa(Value);
+end;
+
+procedure TDAEDOAQuery.SetOptions(Value: TDAOracleOptions);
+begin
+  // Can't be implemented
+end;
+
+procedure TDAEDOAQuery.SetParamValues(Params: TDAParamCollection);
+begin
+  SetDataSetParams(Params, DataSet);
+end;
+
+{
+**************************** TDAEDOAStoredProcedure ****************************
+}
+
+function TDAEDOAStoredProcedure.CreateDataset(aConnection: TDAEConnection): TDataset;
+begin
+  Result := TOracleDataSet.Create(nil);
+  FConnection := TDAEDOAConnection(aConnection); 
+  TOracleDataSet(Result).Session := TDAEDOAConnection(aConnection).OracleSession;
+end;
+
+procedure TDAEDOAStoredProcedure.DoGetParams;
+var
+  Ds: TOracleDataSet;
+  I: Integer;
+  Params: TDAParamCollection;
+begin
+  Params := GetParams;
+  Ds := TOracleDataSet(DataSet);
+  for I := 0 to Params.Count - 1 do
+    if Params[I].ParamType in [daptOutput, daptInputOutput, daptResult] then
+      Params[I].Value := Ds.GetVariable(HandleSqlName(Params[I].Name, Params[I].ParamType));
+end;
+
+function TDAEDOAStoredProcedure.DoGetParamsResult: TDAParam;
+var
+  I: Integer;
+  Params: TDAParamCollection;
+begin
+  Result := nil;
+  Params := GetParams;
+  for I := 0 to Params.Count - 1 do
+    if Params[I].ParamType = daptResult then
+    begin
+      Result := Params[I];
+      Exit;
+    end;
+end;
+
+procedure TDAEDOAStoredProcedure.DoSetSource;
+var
+  Ds: TOracleDataSet;
+  I: Integer;
+  Params: TDaParamCollection;
+  ParamResult: TDAParam;
+  ParamsExist: Boolean;
+
+const
+  SQLHeader = 'declare' + sLineBreak +
+    '  result boolean;' + sLineBreak +
+    'begin' + sLineBreak;
+  SQLHandleBoolean = ':result := sys.diutil.bool_to_int(function_result);';
+  SQLFooter = 'end;';
+
+  function CaseOfParam(const AParamResult: TDAParam): Integer;
+  begin
+    Result := 0;
+    if AParamResult <> nil then
+      if AParamResult.DataType = datBoolean then
+        Result := 1
+      else
+        Result := 2;
+  end;
+
+  function ConvertParam(const AName: string; const ADataType: TDADataType):
+      string;
+  begin
+    if ADataType = datBoolean then
+    begin
+      Result := Format('%s => sys.diutil.int_to_bool(:%s), ', [AName, AName]);
+      Exit;
+    end;
+    Result := Format('%s => :%s, ', [AName, AName]);
+  end;
+
+  function TrimSqlParams(const SQL: string): string;
+  var
+    S: string;
+  begin
+    S := SQL;
+    Delete(S, Length(S) - 3, 4);
+    Result := S;
+  end;
+
+begin
+  Ds := TOracleDataSet(DataSet);
+  Params := GetParams;
+  ParamResult := DoGetParamsResult;
+  // PL/SQL Block - header + stored proc name
+  Ds.SQL.Text := SQLHeader;
+  case CaseOfParam(ParamResult) of // 0 = no result, 1 = boolean, 2 = misc
+    0: Ds.SQL.Add(Format('  %s(', [fProcedureName]));
+    1: Ds.SQL.Add(Format('  result := %s(', [fProcedureName]));
+    2: Ds.SQL.Add(Format('  :result := %s(', [fProcedureName]));
+  end;
+  // PL/SQL Block - params if any;
+  ParamsExist := False;
+  for I := 0 to Params.Count - 1 do
+    if (Params.Items[I] <> ParamResult) then
+    begin
+      ParamsExist := True;
+      Ds.SQL.Add(ConvertParam(Params[I].Name, Params[I].DataType));
+    end;
+  // PL/SQL Block - params - remove the last half-stop
+  if ParamsExist then
+    Ds.SQL.Text := TrimSQLParams(Ds.SQL.Text);
+  Ds.SQL.Add(');');
+  // PL/SQL Block - special treatment for functions with boolean results
+  if ParamResult.DataType = datBoolean then
+    Ds.SQL.Add(SQLHandleBoolean);
+  Ds.SQL.Add(SQLFooter);
+end;
+
+function TDAEDOAStoredProcedure.Execute: Integer;
+var
+  Params: TDAParamCollection;
+begin
+  Params := GetParams;
+  SetDataSetParams(Params, DataSet);
+  DoSetSource;
+  TOracleDataSet(DataSet).ExecSQL;
+  DoGetParams;
+  Result := -1;
+end;
+
+function TDAEDOAStoredProcedure.GetStoredProcedureName: string;
+begin
+  Result := fProcedureName;
+end;
+
+procedure TDAEDOAStoredProcedure.RefreshParams;
+var
+  OraParams: TDAParamCollection;
+begin
+  Oracle_DoGetStoredProcedureParams(fProcedureName, FConnection.CreateCompatibleQuery,OraParams);
+  GetParams.AssignParamCollection(OraParams);
+end;
+
+procedure TDAEDOAStoredProcedure.GetParamValues(Params: TDAParamCollection);
+var
+  i: integer;
+  par: TDAParam;
+  ds: TOracleDataSet;
+begin
+  ds := TOracleDataSet(Dataset);
+  if not Assigned(ds.Variables) then Exit;
+
+  for i := 0 to (ds.VariableCount - 1) do begin
+    par := Params.ParamByName(ds.VariableName(i));
+    if par.ParamType in [daptOutput, daptInputOutput, daptResult] then
+       par.Value := ds.GetVariable(i);
+  end;
+end;
+
+procedure TDAEDOAStoredProcedure.SetParamValues(Params: TDAParamCollection);
+begin
+  SetDataSetParams(Params, DataSet);
+end;
+
+procedure TDAEDOAStoredProcedure.SetStoredProcedureName(const Name: string);
+begin
+  fProcedureName := Name;
+end;
+
+exports
+  GetDriverObject name func_GetDriverObject;
+
+initialization
+  _Driver := nil;
+  RegisterDriverProc(GetDriverObject);
+
+finalization
+  UnregisterDriverProc(GetDriverObject);
+  FreeAndNil(_Driver);
+
+end.
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAElevateDBDriver.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAElevateDBDriver.pas
new file mode 100644
index 0000000..825b143
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAElevateDBDriver.pas	
@@ -0,0 +1,1496 @@
+unit uDAElevateDBDriver;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Driver Library
+{
+{ compiler: Delphi 6 and up
+{ platform: Win32
+{
+{ (c)opyright RemObjects Software. all rights reserved.
+{
+{ Using this code requires a valid license of the Data Abstract
+{ which can be obtained at http://www.remobjects.com.
+{----------------------------------------------------------------------------}
+
+{$IFDEF MSWINDOWS}
+{$I ..\DataAbstract.inc}
+{$ELSE}
+{$I ../DataAbstract.inc}
+{$ENDIF}
+
+{$R DataAbstract_ElevateDBDriver_Glyphs.res}
+
+interface
+uses Classes, DB,
+  uDAElevateDBInterfaces, edbType, edbcomps,
+  uROClasses, uDAEngine, uDAInterfaces, uDAInterfacesEx, uDAUtils;
+
+type { TDAElevateDBDriver }
+  TDAElevateDBDriver = class(TDADriverReference)
+  end;
+
+  { TDAEElevateDBDriver }
+  TDAEElevateDBDriver = class(uDAElevateDBInterfaces.TDAElevateDBDriver ,IDADriver40)
+  protected
+    function GetConnectionClass: TDAEConnectionClass; override;
+    //procedure CustomizeConnectionObject(aConnection: TDAEConnection); override;
+    //procedure DoSetTraceOptions(TraceActive: boolean; TraceFlags: TDATraceOptions; Callback: TDALogTraceEvent); override;
+
+    { IDADriver }
+    function GetDriverID: string; override; safecall;
+    function GetDescription: string; override; safecall;
+    // function GetMajVersion: byte; override; safecall;
+    // function GetMinVersion: byte; override; safecall;
+    procedure GetAuxDrivers(out List: IROStrings); override; safecall;
+    procedure GetAuxParams(const AuxDriver: string; out List: IROStrings); override;
+    function GetAvailableDriverOptions: TDAAvailableDriverOptions; override; safecall;
+    // procedure Initialize; override; safecall;
+    // procedure Finalize; override; safecall;
+    // function GetDefaultCustomParameters: string; override; safecall;
+
+    { IDADriver40 }
+    function GetProviderDefaultCustomParameters(Provider: string): string; safecall;
+  public
+  end;
+
+  IElevateDBEngineProperties = interface
+    function GetBackupExtension: TEDBString;
+    function GetCatalogExtension: TEDBString;
+    function GetCatalogName: TEDBString;
+    function GetConfigExtension: TEDBString;
+    function GetConfigName: TEDBString;
+    function GetConfigPath: TEDBString;
+    function GetEncryptionPassword: TEDBString;
+    function GetEngineType: TEDBEngineType;
+    function GetLargeFileSupport: Boolean;
+    function GetLicensedSessions: Integer;
+    function GetLockExtension: TEDBString;
+    function GetLogCategories: TEDBLogCategories;
+    function GetLogExtension: TEDBString;
+    function GetMaxLogFileSize: Integer;
+    function GetServerAddress: TEDBString;
+    function GetServerAuthorizedAddresses: TEDBStrings;
+    function GetServerBlockedAddresses: TEDBStrings;
+    function GetServerDeadSessionExpiration: Integer;
+    function GetServerDeadSessionInterval: Integer;
+    function GetServerDescription: TEDBString;
+    function GetServerEncryptedOnly: Boolean;
+    function GetServerJobCategory: TEDBString;
+    function GetServerMaxDeadSessions: Integer;
+    function GetServerName: TEDBString;
+    function GetServerPort: Integer;
+    function GetServerRunJobs: Boolean;
+    function GetServerSessionTimeout: Integer;
+    function GetServerThreadCacheSize: Integer;
+    function GetSignature: TEDBString;
+    function GetTableBlobExtension: TEDBString;
+    function GetTableExtension: TEDBString;
+    function GetTableIndexExtension: TEDBString;
+    function GetTempTablesPathProperty: TEDBString;
+    procedure SetBackupExtension(const Value: TEDBString);
+    procedure SetCatalogExtension(const Value: TEDBString);
+    procedure SetCatalogName(const Value: TEDBString);
+    procedure SetConfigExtension(const Value: TEDBString);
+    procedure SetConfigName(const Value: TEDBString);
+    procedure SetConfigPath(const Value: TEDBString);
+    procedure SetEncryptionPassword(const Value: TEDBString);
+    procedure SetEngineType(const Value: TEDBEngineType);
+    procedure SetLargeFileSupport(const Value: Boolean);
+    procedure SetLicensedSessions(const Value: Integer);
+    procedure SetLockExtension(const Value: TEDBString);
+    procedure SetLogCategories(const Value: TEDBLogCategories);
+    procedure SetLogExtension(const Value: TEDBString);
+    procedure SetMaxLogFileSize(const Value: Integer);
+    procedure SetServerAddress(const Value: TEDBString);
+    procedure SetServerAuthorizedAddresses(const Value: TEDBStrings);
+    procedure SetServerBlockedAddresses(const Value: TEDBStrings);
+    procedure SetServerDeadSessionExpiration(const Value: Integer);
+    procedure SetServerDeadSessionInterval(const Value: Integer);
+    procedure SetServerDescription(const Value: TEDBString);
+    procedure SetServerEncryptedOnly(const Value: Boolean);
+    procedure SetServerJobCategory(const Value: TEDBString);
+    procedure SetServerMaxDeadSessions(const Value: Integer);
+    procedure SetServerName(const Value: TEDBString);
+    procedure SetServerPort(const Value: Integer);
+    procedure SetServerRunJobs(const Value: Boolean);
+    procedure SetServerSessionTimeout(const Value: Integer);
+    procedure SetServerThreadCacheSize(const Value: Integer);
+    procedure SetSignature(const Value: TEDBString);
+    procedure SetTableBlobExtension(const Value: TEDBString);
+    procedure SetTableExtension(const Value: TEDBString);
+    procedure SetTableIndexExtension(const Value: TEDBString);
+    procedure SetTempTablesPath(const Value: TEDBString);
+    property EngineType: TEDBEngineType read GetEngineType write SetEngineType;
+    property Signature: TEDBString read GetSignature write SetSignature;
+    property EncryptionPassword: TEDBString read GetEncryptionPassword write SetEncryptionPassword;
+    property LargeFileSupport: Boolean read GetLargeFileSupport write SetLargeFileSupport;
+    property LicensedSessions: Integer read GetLicensedSessions write SetLicensedSessions;
+    property ConfigPath: TEDBString read GetConfigPath write SetConfigPath;
+    property ConfigName: TEDBString read GetConfigName write SetConfigName;
+    property ConfigExtension: TEDBString read GetConfigExtension write SetConfigExtension;
+    property LockExtension: TEDBString read GetLockExtension write SetLockExtension;
+    property LogExtension: TEDBString read GetLogExtension write SetLogExtension;
+    property MaxLogFileSize: Integer read GetMaxLogFileSize write SetMaxLogFileSize;
+    property LogCategories: TEDBLogCategories read GetLogCategories write SetLogCategories;
+    property CatalogName: TEDBString read GetCatalogName write SetCatalogName;
+    property CatalogExtension: TEDBString read GetCatalogExtension write SetCatalogExtension;
+    property BackupExtension: TEDBString read GetBackupExtension write SetBackupExtension;
+    property TableExtension: TEDBString read GetTableExtension write SetTableExtension;
+    property TableIndexExtension: TEDBString read GetTableIndexExtension write SetTableIndexExtension;
+    property TableBlobExtension: TEDBString read GetTableBlobExtension write SetTableBlobExtension;
+    property TempTablesPath: TEDBString read GetTempTablesPathProperty write SetTempTablesPath;
+    property ServerName: TEDBString read GetServerName write SetServerName;
+    property ServerDescription: TEDBString read GetServerDescription write SetServerDescription;
+    property ServerAddress: TEDBString read GetServerAddress write SetServerAddress;
+    property ServerPort: Integer read GetServerPort write SetServerPort;
+    property ServerThreadCacheSize: Integer read GetServerThreadCacheSize write SetServerThreadCacheSize;
+    property ServerEncryptedOnly: Boolean read GetServerEncryptedOnly write SetServerEncryptedOnly;
+    property ServerSessionTimeout: Integer read GetServerSessionTimeout write SetServerSessionTimeout;
+    property ServerDeadSessionInterval: Integer read GetServerDeadSessionInterval write SetServerDeadSessionInterval;
+    property ServerDeadSessionExpiration: Integer read GetServerDeadSessionExpiration write SetServerDeadSessionExpiration;
+    property ServerMaxDeadSessions: Integer read GetServerMaxDeadSessions write SetServerMaxDeadSessions;
+    property ServerAuthorizedAddresses: TEDBStrings read GetServerAuthorizedAddresses write SetServerAuthorizedAddresses;
+    property ServerBlockedAddresses: TEDBStrings read GetServerBlockedAddresses write SetServerBlockedAddresses;
+    property ServerRunJobs: Boolean read GetServerRunJobs write SetServerRunJobs;
+    property ServerJobCategory: TEDBString read GetServerJobCategory write SetServerJobCategory;
+  end;
+
+  TElevateDBEngineProperties = class(TInterfacedObject,IElevateDBEngineProperties)
+  protected
+    function GetBackupExtension: TEDBString;
+    function GetCatalogExtension: TEDBString;
+    function GetCatalogName: TEDBString;
+    function GetConfigExtension: TEDBString;
+    function GetConfigName: TEDBString;
+    function GetConfigPath: TEDBString;
+    function GetEncryptionPassword: TEDBString;
+    function GetEngineType: TEDBEngineType;
+    function GetLargeFileSupport: Boolean;
+    function GetLicensedSessions: Integer;
+    function GetLockExtension: TEDBString;
+    function GetLogCategories: TEDBLogCategories;
+    function GetLogExtension: TEDBString;
+    function GetMaxLogFileSize: Integer;
+    function GetServerAddress: TEDBString;
+    function GetServerAuthorizedAddresses: TEDBStrings;
+    function GetServerBlockedAddresses: TEDBStrings;
+    function GetServerDeadSessionExpiration: Integer;
+    function GetServerDeadSessionInterval: Integer;
+    function GetServerDescription: TEDBString;
+    function GetServerEncryptedOnly: Boolean;
+    function GetServerJobCategory: TEDBString;
+    function GetServerMaxDeadSessions: Integer;
+    function GetServerName: TEDBString;
+    function GetServerPort: Integer;
+    function GetServerRunJobs: Boolean;
+    function GetServerSessionTimeout: Integer;
+    function GetServerThreadCacheSize: Integer;
+    function GetSignature: TEDBString;
+    function GetTableBlobExtension: TEDBString;
+    function GetTableExtension: TEDBString;
+    function GetTableIndexExtension: TEDBString;
+    function GetTempTablesPathProperty: TEDBString;
+    procedure SetBackupExtension(const Value: TEDBString);
+    procedure SetCatalogExtension(const Value: TEDBString);
+    procedure SetCatalogName(const Value: TEDBString);
+    procedure SetConfigExtension(const Value: TEDBString);
+    procedure SetConfigName(const Value: TEDBString);
+    procedure SetConfigPath(const Value: TEDBString);
+    procedure SetEncryptionPassword(const Value: TEDBString);
+    procedure SetEngineType(const Value: TEDBEngineType);
+    procedure SetLargeFileSupport(const Value: Boolean);
+    procedure SetLicensedSessions(const Value: Integer);
+    procedure SetLockExtension(const Value: TEDBString);
+    procedure SetLogCategories(const Value: TEDBLogCategories);
+    procedure SetLogExtension(const Value: TEDBString);
+    procedure SetMaxLogFileSize(const Value: Integer);
+    procedure SetServerAddress(const Value: TEDBString);
+    procedure SetServerAuthorizedAddresses(const Value: TEDBStrings);
+    procedure SetServerBlockedAddresses(const Value: TEDBStrings);
+    procedure SetServerDeadSessionExpiration(const Value: Integer);
+    procedure SetServerDeadSessionInterval(const Value: Integer);
+    procedure SetServerDescription(const Value: TEDBString);
+    procedure SetServerEncryptedOnly(const Value: Boolean);
+    procedure SetServerJobCategory(const Value: TEDBString);
+    procedure SetServerMaxDeadSessions(const Value: Integer);
+    procedure SetServerName(const Value: TEDBString);
+    procedure SetServerPort(const Value: Integer);
+    procedure SetServerRunJobs(const Value: Boolean);
+    procedure SetServerSessionTimeout(const Value: Integer);
+    procedure SetServerThreadCacheSize(const Value: Integer);
+    procedure SetSignature(const Value: TEDBString);
+    procedure SetTableBlobExtension(const Value: TEDBString);
+    procedure SetTableExtension(const Value: TEDBString);
+    procedure SetTableIndexExtension(const Value: TEDBString);
+    procedure SetTempTablesPath(const Value: TEDBString);
+  public
+    property EngineType: TEDBEngineType read GetEngineType write SetEngineType;
+    property Signature: TEDBString read GetSignature write SetSignature;
+    property EncryptionPassword: TEDBString read GetEncryptionPassword write SetEncryptionPassword;
+    property LargeFileSupport: Boolean read GetLargeFileSupport write SetLargeFileSupport;
+    property LicensedSessions: Integer read GetLicensedSessions write SetLicensedSessions;
+    property ConfigPath: TEDBString read GetConfigPath write SetConfigPath;
+    property ConfigName: TEDBString read GetConfigName write SetConfigName;
+    property ConfigExtension: TEDBString read GetConfigExtension write SetConfigExtension;
+    property LockExtension: TEDBString read GetLockExtension write SetLockExtension;
+    property LogExtension: TEDBString read GetLogExtension write SetLogExtension;
+    property MaxLogFileSize: Integer read GetMaxLogFileSize write SetMaxLogFileSize;
+    property LogCategories: TEDBLogCategories read GetLogCategories write SetLogCategories;
+    property CatalogName: TEDBString read GetCatalogName write SetCatalogName;
+    property CatalogExtension: TEDBString read GetCatalogExtension write SetCatalogExtension;
+    property BackupExtension: TEDBString read GetBackupExtension write SetBackupExtension;
+    property TableExtension: TEDBString read GetTableExtension write SetTableExtension;
+    property TableIndexExtension: TEDBString read GetTableIndexExtension write SetTableIndexExtension;
+    property TableBlobExtension: TEDBString read GetTableBlobExtension write SetTableBlobExtension;
+    property TempTablesPath: TEDBString read GetTempTablesPathProperty write SetTempTablesPath;
+    property ServerName: TEDBString read GetServerName write SetServerName;
+    property ServerDescription: TEDBString read GetServerDescription write SetServerDescription;
+    property ServerAddress: TEDBString read GetServerAddress write SetServerAddress;
+    property ServerPort: Integer read GetServerPort write SetServerPort;
+    property ServerThreadCacheSize: Integer read GetServerThreadCacheSize write SetServerThreadCacheSize;
+    property ServerEncryptedOnly: Boolean read GetServerEncryptedOnly write SetServerEncryptedOnly;
+    property ServerSessionTimeout: Integer read GetServerSessionTimeout write SetServerSessionTimeout;
+    property ServerDeadSessionInterval: Integer read GetServerDeadSessionInterval write SetServerDeadSessionInterval;
+    property ServerDeadSessionExpiration: Integer read GetServerDeadSessionExpiration write SetServerDeadSessionExpiration;
+    property ServerMaxDeadSessions: Integer read GetServerMaxDeadSessions write SetServerMaxDeadSessions;
+    property ServerAuthorizedAddresses: TEDBStrings read GetServerAuthorizedAddresses write SetServerAuthorizedAddresses;
+    property ServerBlockedAddresses: TEDBStrings read GetServerBlockedAddresses write SetServerBlockedAddresses;
+    property ServerRunJobs: Boolean read GetServerRunJobs write SetServerRunJobs;
+    property ServerJobCategory: TEDBString read GetServerJobCategory write SetServerJobCategory;
+  end;
+
+  IElevateDBEngine = interface
+    function EngineProperties: IElevateDBEngineProperties;
+  end;
+
+  IElevateDBSessionProperties = interface
+    function GetForceBufferFlush: Boolean;
+    function GetKeepConnections: Boolean;
+    function GetKeepTablesOpen: Boolean;
+    function GetProgressTimeInterval: Integer;
+    function GetRecordChangeDetection: Boolean;
+    function GetRecordLockProtocol: TEDBRecordLockProtocol;
+    function GetRecordLockRetryCount: Integer;
+    function GetRecordLockWaitTime: Integer;
+    function GetRemoteAddress: TEDBString;
+    function GetRemoteCompression: Integer;
+    function GetRemoteEncryption: Boolean;
+    function GetRemoteHost: TEDBString;
+    function GetRemotePing: Boolean;
+    function GetRemotePingInterval: Integer;
+    function GetRemotePort: Integer;
+    function GetRemoteService: TEDBString;
+    function GetRemoteTimeout: Integer;
+    function GetRemoteTrace: Boolean;
+    function GetSessionType: TEDBSessionType;
+    procedure SetForceBufferFlush(const Value: Boolean);
+    procedure SetKeepTablesOpen(const Value: Boolean);
+    procedure SetKeepConnections(const Value: Boolean);
+    procedure SetProgressTimeInterval(const Value: Integer);
+    procedure SetRecordChangeDetection(const Value: Boolean);
+    procedure SetRecordLockProtocol(const Value: TEDBRecordLockProtocol);
+    procedure SetRecordLockRetryCount(const Value: Integer);
+    procedure SetRecordLockWaitTime(const Value: Integer);
+    procedure SetRemoteAddress(const Value: TEDBString);
+    procedure SetRemoteCompression(const Value: Integer);
+    procedure SetRemoteEncryption(const Value: Boolean);
+    procedure SetRemoteHost(const Value: TEDBString);
+    procedure SetRemotePing(const Value: Boolean);
+    procedure SetRemotePingInterval(const Value: Integer);
+    procedure SetRemotePort(const Value: Integer);
+    procedure SetRemoteService(const Value: TEDBString);
+    procedure SetRemoteTimeout(const Value: Integer);
+    procedure SetRemoteTrace(const Value: Boolean);
+    procedure SetSessionType(const Value: TEDBSessionType);
+    property ForceBufferFlush: Boolean read GetForceBufferFlush write SetForceBufferFlush;
+    property KeepConnections: Boolean read GetKeepConnections write SetKeepConnections;
+    property KeepTablesOpen: Boolean read GetKeepTablesOpen write SetKeepTablesOpen;
+    property RecordLockProtocol: TEDBRecordLockProtocol read GetRecordLockProtocol write SetRecordLockProtocol;
+    property RecordLockRetryCount: Integer read GetRecordLockRetryCount write SetRecordLockRetryCount;
+    property RecordLockWaitTime: Integer read GetRecordLockWaitTime write SetRecordLockWaitTime;
+    property RecordChangeDetection: Boolean read GetRecordChangeDetection write SetRecordChangeDetection;
+    property ProgressTimeInterval: Integer read GetProgressTimeInterval write SetProgressTimeInterval;
+    property SessionType: TEDBSessionType read GetSessionType write SetSessionType;
+    property RemoteCompression: Integer read GetRemoteCompression write SetRemoteCompression;
+    property RemoteEncryption: Boolean read GetRemoteEncryption write SetRemoteEncryption;
+    property RemoteHost: TEDBString read GetRemoteHost write SetRemoteHost;
+    property RemoteAddress: TEDBString read GetRemoteAddress write SetRemoteAddress;
+    property RemotePort: Integer read GetRemotePort write SetRemotePort;
+    property RemoteService: TEDBString read GetRemoteService write SetRemoteService;
+    property RemoteTrace: Boolean read GetRemoteTrace write SetRemoteTrace;
+    property RemoteTimeout: Integer read GetRemoteTimeout write SetRemoteTimeout;
+    property RemotePing: Boolean read GetRemotePing write SetRemotePing;
+    property RemotePingInterval: Integer read GetRemotePingInterval write SetRemotePingInterval;
+  end;
+
+  { TDAEEDBConnection }
+  TDAEEDBConnection = class(TDAElevateDBConnection,IElevateDBEngine,IElevateDBSessionProperties)
+  private
+    FNativeSession: TEDBSession;
+    fNativeDatabase: TEDBDatabase;
+    FDataBasePath: String;
+    FDataBaseName: string;
+    function CreateConfigQuery: TDAEDataset;
+  protected
+    procedure CheckConnected; override;
+    function GetForceBufferFlush: Boolean;
+    function GetKeepConnections: Boolean;
+    function GetKeepTablesOpen: Boolean;
+    function GetProgressTimeInterval: Integer;
+    function GetRecordChangeDetection: Boolean;
+    function GetRecordLockProtocol: TEDBRecordLockProtocol;
+    function GetRecordLockRetryCount: Integer;
+    function GetRecordLockWaitTime: Integer;
+    function GetRemoteAddress: TEDBString;
+    function GetRemoteCompression: Integer;
+    function GetRemoteEncryption: Boolean;
+    function GetRemoteHost: TEDBString;
+    function GetRemotePing: Boolean;
+    function GetRemotePingInterval: Integer;
+    function GetRemotePort: Integer;
+    function GetRemoteService: TEDBString;
+    function GetRemoteTimeout: Integer;
+    function GetRemoteTrace: Boolean;
+    function GetSessionType: TEDBSessionType;
+    procedure SetForceBufferFlush(const Value: Boolean);
+    procedure SetKeepTablesOpen(const Value: Boolean);
+    procedure SetKeepConnections(const Value: Boolean);
+    procedure SetProgressTimeInterval(const Value: Integer);
+    procedure SetRecordChangeDetection(const Value: Boolean);
+    procedure SetRecordLockProtocol(const Value: TEDBRecordLockProtocol);
+    procedure SetRecordLockRetryCount(const Value: Integer);
+    procedure SetRecordLockWaitTime(const Value: Integer);
+    procedure SetRemoteAddress(const Value: TEDBString);
+    procedure SetRemoteCompression(const Value: Integer);
+    procedure SetRemoteEncryption(const Value: Boolean);
+    procedure SetRemoteHost(const Value: TEDBString);
+    procedure SetRemotePing(const Value: Boolean);
+    procedure SetRemotePingInterval(const Value: Integer);
+    procedure SetRemotePort(const Value: Integer);
+    procedure SetRemoteService(const Value: TEDBString);
+    procedure SetRemoteTimeout(const Value: Integer);
+    procedure SetRemoteTrace(const Value: Boolean);
+    procedure SetSessionType(const Value: TEDBSessionType);
+  protected
+    procedure SetConnected(Value: boolean); override; safecall;
+    function CreateCustomConnection: TCustomConnection; override;
+    //function CreateMacroProcessor: TDASQLMacroProcessor; override;
+    function GetDatasetClass: TDAEDatasetClass; override;
+    function GetStoredProcedureClass: TDAEStoredProcedureClass; override;
+    procedure DoApplyConnectionString(aConnStrParser: TDAConnectionStringParser; aConnectionObject: TCustomConnection); override;
+    // transaction support
+    function DoBeginTransaction: integer; override;
+    procedure DoCommitTransaction; override;
+    procedure DoRollbackTransaction; override;
+    function DoGetInTransaction: boolean; override;
+
+    // procedure DoGetTableFields(const aTableName: string; out Fields: TDAFieldCollection); override;
+    // procedure DoGetQueryFields(const aSQL: string; aParamsIfNeeded: TDAParamCollection; out Fields: TDAFieldCollection); override;
+    // procedure DoGetViewFields(const aViewName: string; out Fields: TDAFieldCollection); override;
+
+    // procedure DoGetStoredProcedureParams(const aStoredProcedureName: string; out Params: TDAParamCollection); override;
+    // function DoGetLastAutoInc(const GeneratorName: string): integer; override;
+
+    { IDAConnection }
+    // UserID/Password
+    // function GetUserID: string; override; safecall;
+    // procedure SetUserID(const Value: string); override; safecall;
+    // function GetPassword: string; override; safecall;
+    // procedure SetPassword(const Value: string); override; safecall;
+
+    function GetSPSelectSyntax(HasArguments: Boolean): string; override; safecall;
+    // function GetQuoteChars: TDAQuoteCharArray; override; safecall;
+    // function IdentifierIsQuoted(const iIdentifier: string): boolean; override; safecall;
+    // function IdentifierNeedsQuoting(const iIdentifier: string): boolean; override; safecall;
+    // function QuoteIdentifierIfNeeded(const iIdentifier: string): string; override; safecall;
+    // function QuoteIdentifier(const iIdentifier: string): string; override; safecall;
+    // function QuoteFieldNameIfNeeded(const aTableName, aFieldName: string): string; override;safecall;
+    // function QuoteFieldName(const aTableName, aFieldName: string): string; override; safecall;
+
+    // function NewCommand(const Text: string; CommandType: TDASQLStatementType; const aCommandName: string = ''): IDASQLCommand; override; safecall;
+    // function NewDataset(const SQL: string; const aDatasetName: string = ''): IDADataset; override; safecall;
+    // function GetLastAutoInc(const GeneratorName: string = ''): integer; safecall;
+
+    // function isAlive: Boolean; override; safecall;
+    // function GetQueryBuilder: TDAQueryBuilder; override; safecall;
+
+    { IDAUseGenerators }
+    // function GetNextAutoinc(const GeneratorName: string): integer; safecall;
+    { IElevateDBEngine }
+    function EngineProperties: IElevateDBEngineProperties;
+  public
+    destructor Destroy; override;
+  end;
+
+  { TDAEElevDBQuery }
+  TDAEElevDBQuery = class(TDAEDataset, IDASQLCommand , IDAMustSetParams)
+  protected
+    // procedure PrepareSQLStatement; override;
+    procedure ClearParams; override;
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+    procedure DoPrepare(Value: boolean); override; safecall;
+    function DoExecute: integer; override; safecall;
+    procedure DoSetSQL(const Value: string); override; safecall;
+    function DoGetSQL: string; override; safecall;
+    // function intVCLTypeToDAType(aFieldType: TFieldType): TDADataType;override;
+
+    { IDASQLCommand }
+    // procedure RefreshParams; override; safecall;
+    function Execute: integer; override; safecall;
+    // function DoGetRecordCount: integer; override;
+    // function DoGetActive: boolean; override;
+    // procedure DoSetActive(Value: boolean); override;
+    // function DoGetBOF: boolean; override;
+    // function DoGetEOF: boolean; override;
+    // procedure DoNext; override;
+    // function DoLocate(const KeyFields: string; const KeyValues: Variant; Options: TLocateOptions): Boolean; override;
+
+    // IDAMustSetParams
+    procedure SetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  public
+  end;
+
+  { TDAEElevDBStoredProcedure }
+  TDAEElevDBStoredProcedure = class(TDAEStoredProcedure, IDAStoredProcedure , IDAMustSetParams)
+  protected
+    // IDAStoredProcedure
+    function GetStoredProcedureName: string; override; safecall;
+    procedure SetStoredProcedureName(const Name: string); override; safecall;
+
+    // procedure PrepareSQLStatement; override;
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+    procedure DoPrepare(Value: boolean); override; safecall;
+    function DoExecute: integer; override; safecall;
+    procedure DoSetSQL(const Value: string); override; safecall;
+    function DoGetSQL: string; override; safecall;
+    // function intVCLTypeToDAType(aFieldType: TFieldType): TDADataType;override;
+
+    { IDASQLCommand }
+    procedure RefreshParams; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function Execute: integer; override; safecall;
+    // function DoGetRecordCount: integer; override;
+    // function DoGetActive: boolean; override;
+    // procedure DoSetActive(Value: boolean); override;
+    // function DoGetBOF: boolean; override;
+    // function DoGetEOF: boolean; override;
+    // procedure DoNext; override;
+    // function DoLocate(const KeyFields: string; const KeyValues: Variant; Options: TLocateOptions): Boolean; override;
+
+    // IDAMustSetParams
+    procedure SetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  end;
+
+procedure Register;
+
+function GetDriverObject: IDADriver; stdcall;
+
+implementation
+
+uses SysUtils, uDADriverManager, uDARes, Variants, uDAMacroProcessors,
+  Math, uDAHelpers, uROBinaryHelpers, Windows;
+
+var
+  _driver: TDAEDriver = nil;
+   gEngineProperties: TElevateDBEngineProperties;
+
+procedure Register;
+begin
+  RegisterComponents(DAPalettePageName, [TDAElevateDBDriver]);
+end;
+
+{$IFDEF DataAbstract_SchemaModelerOnly}
+{$INCLUDE ..\DataAbstract_SchemaModelerOnly.inc}
+{$ENDIF DataAbstract_SchemaModelerOnly}
+
+function GetDriverObject: IDADriver;
+begin
+  {$IFDEF DataAbstract_SchemaModelerOnly}
+  if not RunningInSchemaModeler then begin
+    result := nil;
+    exit;
+  end;
+  {$ENDIF}
+  if (_driver = nil) then _driver := TDAEElevateDBDriver.Create(nil);
+  result := _driver;
+end;
+
+{ TDAEEDBConnection }
+
+procedure TDAEEDBConnection.DoApplyConnectionString(aConnStrParser: TDAConnectionStringParser; aConnectionObject: TCustomConnection);
+var
+  i: Integer;
+  sName, sValue: string;
+begin
+  inherited;
+  with aConnStrParser do begin
+    if (Self.UserID <> '') then
+      FNativeSession.LoginUser := Self.UserID
+    else
+      FNativeSession.LoginUser := UserID;
+
+    if (Self.Password <> '') then
+      FNativeSession.LoginPassword := Self.Password
+    else
+      FNativeSession.LoginPassword := Password;
+
+    Session.RemoteAddress := Server;
+//    Engine.ConfigPath := Database;
+    FDataBasePath := Database;
+    FDataBaseName := '';
+    for i := 0 to AuxParamsCount - 1 do begin
+      sName := AuxParamNames[i];
+      if sName = '' then Continue;
+      sValue := AuxParams[AuxParamNames[i]];
+      // engine settings
+      if SameText(sName,'EngineType') then begin
+        if SameText(sValue,'etClient') then gEngineProperties.EngineType:=etClient
+        else if SameText(sValue,'etServer') then gEngineProperties.EngineType:=etServer;
+      end
+      else if SameText(sName,'Signature') then gEngineProperties.Signature := sValue
+      else if SameText(sName,'EncryptionPassword') then gEngineProperties.EncryptionPassword := sValue
+      else if SameText(sName,'LargeFileSupport') then gEngineProperties.LargeFileSupport := StrToBoolDef(sValue, gEngineProperties.LargeFileSupport)
+      else if SameText(sName,'LicensedSessions') then gEngineProperties.LicensedSessions := StrToIntDef(sValue, gEngineProperties.LicensedSessions)
+      else if SameText(sName,'ConfigPath') then       gEngineProperties.ConfigPath := sValue
+      else if SameText(sName,'ConfigName') then       gEngineProperties.ConfigName := sValue
+      else if SameText(sName,'ConfigExtension') then  gEngineProperties.ConfigExtension := sValue
+      else if SameText(sName,'LockExtension') then    gEngineProperties.LockExtension := sValue
+      else if SameText(sName,'LogExtension') then     gEngineProperties.LogExtension := sValue
+      else if SameText(sName,'MaxLogFileSize') then   gEngineProperties.MaxLogFileSize := StrToIntDef(sValue, gEngineProperties.MaxLogFileSize)
+      else if SameText(sName,'CatalogName') then      gEngineProperties.CatalogName := sValue
+      else if SameText(sName,'CatalogExtension') then gEngineProperties.CatalogExtension := sValue
+      else if SameText(sName,'BackupExtension') then  gEngineProperties.BackupExtension := sValue
+      else if SameText(sName,'TableExtension') then   gEngineProperties.TableExtension := sValue
+      else if SameText(sName,'TableIndexExtension') then gEngineProperties.TableIndexExtension := sValue
+      else if SameText(sName,'TableBlobExtension') then  gEngineProperties.TableBlobExtension := sValue
+      else if SameText(sName,'TempTablesPath') then      gEngineProperties.TempTablesPath := sValue
+      else if SameText(sName,'ServerName') then          gEngineProperties.ServerName := sValue
+      else if SameText(sName,'ServerDescription') then   gEngineProperties.ServerDescription := sValue
+      else if SameText(sName,'ServerPort') then          gEngineProperties.ServerPort := StrToIntDef(sValue, gEngineProperties.ServerPort)
+      else if SameText(sName,'ServerThreadCacheSize') then gEngineProperties.ServerThreadCacheSize := StrToIntDef(sValue, gEngineProperties.ServerThreadCacheSize)
+      else if SameText(sName,'ServerEncryptedOnly') then   gEngineProperties.ServerEncryptedOnly := StrToBoolDef(sValue, gEngineProperties.ServerEncryptedOnly)
+      else if SameText(sName,'ServerSessionTimeout') then  gEngineProperties.ServerSessionTimeout := StrToIntDef(sValue, gEngineProperties.ServerSessionTimeout)
+      else if SameText(sName,'ServerDeadSessionInterval') then gEngineProperties.ServerDeadSessionInterval := StrToIntDef(sValue, gEngineProperties.ServerDeadSessionInterval)
+      else if SameText(sName,'ServerDeadSessionExpiration') then gEngineProperties.ServerDeadSessionExpiration := StrToIntDef(sValue, gEngineProperties.ServerDeadSessionExpiration)
+      else if SameText(sName,'ServerMaxDeadSessions') then gEngineProperties.ServerMaxDeadSessions := StrToIntDef(sValue, gEngineProperties.ServerMaxDeadSessions)
+      else if SameText(sName,'ServerRunJobs') then         gEngineProperties.ServerRunJobs := StrToBoolDef(sValue, gEngineProperties.ServerRunJobs)
+      else if SameText(sName,'ServerJobCategory') then     gEngineProperties.ServerJobCategory := sValue
+      // session settings
+      else if SameText(sName,'ForceBufferFlush') then FNativeSession.ForceBufferFlush := StrToBoolDef(sValue, FNativeSession.ForceBufferFlush)
+      else if SameText(sName,'KeepConnections') then FNativeSession.KeepConnections := StrToBoolDef(sValue, FNativeSession.KeepConnections)
+      else if SameText(sName,'KeepTablesOpen') then FNativeSession.KeepTablesOpen := StrToBoolDef(sValue, FNativeSession.KeepTablesOpen)
+      else if SameText(sName,'RecordLockProtocol') then begin
+        if SameText(sValue,'lpPessimistic') then FNativeSession.RecordLockProtocol:=lpPessimistic
+        else if SameText(sValue,'lpOptimistic') then FNativeSession.RecordLockProtocol:=lpOptimistic;
+      end
+      else if SameText(sName,'RecordLockRetryCount') then FNativeSession.RecordLockRetryCount := StrToIntDef(sValue, fNativeSession.RecordLockRetryCount)
+      else if SameText(sName,'RecordLockWaitTime') then fNativeSession.RecordLockWaitTime := StrToIntDef(sValue, fNativeSession.RecordLockWaitTime)
+      else if SameText(sName,'RecordChangeDetection') then FNativeSession.RecordChangeDetection := StrToBoolDef(sValue, FNativeSession.RecordChangeDetection)
+      else if SameText(sName,'ProgressTimeInterval') then fNativeSession.ProgressTimeInterval := StrToIntDef(sValue, fNativeSession.ProgressTimeInterval)
+      else if SameText(sName,'SessionType') then begin
+        if SameText(sValue,'stLocal') then FNativeSession.SessionType:=stLocal
+        else if SameText(sValue,'stRemote') then FNativeSession.SessionType:=stRemote;
+      end
+      else if SameText(sName,'RemoteCompression') then fNativeSession.RemoteCompression := StrToIntDef(sValue, fNativeSession.RemoteCompression)
+      else if SameText(sName,'RemoteEncryption') then FNativeSession.RemoteEncryption := StrToBoolDef(sValue, FNativeSession.RemoteEncryption)
+      else if SameText(sName,'RemoteHost') then fNativeSession.RemoteHost := sValue
+      else if SameText(sName,'RemoteAddress') then fNativeSession.RemoteAddress := sValue
+      else if SameText(sName,'RemotePort') then fNativeSession.RemotePort := StrToIntDef(sValue, fNativeSession.RemotePort)
+      else if SameText(sName,'RemoteService') then fNativeSession.RemoteService := sValue
+      else if SameText(sName,'RemoteTrace') then FNativeSession.RemoteTrace := StrToBoolDef(sValue, FNativeSession.RemoteTrace)
+      else if SameText(sName,'RemoteTimeout') then fNativeSession.RemoteTimeout := StrToIntDef(sValue, fNativeSession.RemoteTimeout)
+      else if SameText(sName,'RemotePing') then FNativeSession.RemotePing := StrToBoolDef(sValue, FNativeSession.RemotePing)
+      else if SameText(sName,'RemotePingInterval') then fNativeSession.RemotePingInterval := StrToIntDef(sValue, fNativeSession.RemotePingInterval)
+      //
+      else if SameText(sName,'DataBaseName') then FDataBaseName:=sValue;
+    end;
+    fNativeDatabase.DatabaseName := FDataBaseName;
+    fNativeDatabase.Database := FDataBaseName;
+    if gEngineProperties.ConfigPath = '' then gEngineProperties.ConfigPath := '.'; 
+  end;
+end;
+
+function TDAEEDBConnection.DoBeginTransaction: integer;
+begin
+  CheckConnected;
+  fNativeDatabase.StartTransaction(EmptyEDBStringsArray);
+  Result := 0;
+end;
+
+procedure TDAEEDBConnection.DoCommitTransaction;
+begin
+  CheckConnected;
+  fNativeDatabase.Commit;
+end;
+
+function TDAEEDBConnection.CreateCustomConnection: TCustomConnection;
+begin
+  FNativeSession := TEDBSession.Create(nil);
+  FNativeSession.AutoSessionName:=True;
+  fNativeDatabase := TEDBDatabase.Create(nil);
+  fNativeDatabase.SessionName := FNativeSession.SessionName;
+  result := fNativeDatabase;
+end;
+
+function TDAEEDBConnection.GetDatasetClass: TDAEDatasetClass;
+begin
+  result := TDAEElevDBQuery;
+end;
+
+function TDAEEDBConnection.GetStoredProcedureClass: TDAEStoredProcedureClass;
+begin
+  result := TDAEElevDBStoredProcedure;
+end;
+
+procedure TDAEEDBConnection.DoRollbackTransaction;
+begin
+  CheckConnected;
+  fNativeDatabase.Rollback;
+end;
+
+function TDAEEDBConnection.DoGetInTransaction: boolean;
+begin
+  CheckConnected;
+  Result := fNativeDatabase.InTransaction;
+end;
+
+
+procedure TDAEEDBConnection.SetConnected(Value: boolean);
+begin
+  if (fNativeDatabase <> nil) then
+    if Value then begin
+      FNativeSession.Connected:=True;
+      ElevateDB_RegisterDatabase(CreateConfigQuery,fNativeDatabase.DatabaseName,FDataBasePath);
+      fNativeDatabase.Connected:=True;
+    end
+    else begin
+      fNativeDatabase.Connected:=False;
+      FNativeSession.Connected:=False;
+    end;
+end;
+
+procedure TDAEEDBConnection.CheckConnected;
+begin
+  if not fNativeDatabase.Connected then SetConnected(True);
+end;
+
+destructor TDAEEDBConnection.Destroy;
+begin
+  FNativeSession.Free;
+  Engine.Active:=False;
+  inherited;
+end;
+
+function TDAEEDBConnection.CreateConfigQuery: TDAEDataset;
+begin
+  Result:= GetDatasetClass.Create(Self);
+  TEDBQuery(TDAEElevDBQuery(Result).Dataset).DatabaseName := ElevateDB_ConfigDBName;
+end;
+
+function TDAEEDBConnection.EngineProperties: IElevateDBEngineProperties;
+begin
+  Result:= gEngineProperties;
+end;
+
+function TDAEEDBConnection.GetForceBufferFlush: Boolean;
+begin
+  Result := FNativeSession.ForceBufferFlush;
+end;
+
+function TDAEEDBConnection.GetKeepConnections: Boolean;
+begin
+  Result := FNativeSession.KeepConnections;
+end;
+
+function TDAEEDBConnection.GetKeepTablesOpen: Boolean;
+begin
+  Result := FNativeSession.KeepTablesOpen;
+end;
+
+function TDAEEDBConnection.GetProgressTimeInterval: Integer;
+begin
+  Result := FNativeSession.ProgressTimeInterval;
+end;
+
+function TDAEEDBConnection.GetRecordChangeDetection: Boolean;
+begin
+  Result := FNativeSession.RecordChangeDetection;
+end;
+
+function TDAEEDBConnection.GetRecordLockProtocol: TEDBRecordLockProtocol;
+begin
+  Result := FNativeSession.RecordLockProtocol;
+end;
+
+function TDAEEDBConnection.GetRecordLockRetryCount: Integer;
+begin
+  Result := FNativeSession.RecordLockRetryCount;
+end;
+
+function TDAEEDBConnection.GetRecordLockWaitTime: Integer;
+begin
+  Result := FNativeSession.RecordLockWaitTime;
+end;
+
+function TDAEEDBConnection.GetRemoteAddress: TEDBString;
+begin
+  Result := FNativeSession.RemoteAddress;
+end;
+
+function TDAEEDBConnection.GetRemoteCompression: Integer;
+begin
+  Result := FNativeSession.RemoteCompression;
+end;
+
+function TDAEEDBConnection.GetRemoteEncryption: Boolean;
+begin
+  Result := FNativeSession.RemoteEncryption;
+end;
+
+function TDAEEDBConnection.GetRemoteHost: TEDBString;
+begin
+  Result := FNativeSession.RemoteHost;
+end;
+
+function TDAEEDBConnection.GetRemotePing: Boolean;
+begin
+  Result := FNativeSession.RemotePing;
+end;
+
+function TDAEEDBConnection.GetRemotePingInterval: Integer;
+begin
+  Result := FNativeSession.RemotePingInterval;
+end;
+
+function TDAEEDBConnection.GetRemotePort: Integer;
+begin
+  Result := FNativeSession.RemotePort;
+end;
+
+function TDAEEDBConnection.GetRemoteService: TEDBString;
+begin
+  Result := FNativeSession.RemoteService;
+end;
+
+function TDAEEDBConnection.GetRemoteTimeout: Integer;
+begin
+  Result := FNativeSession.RemoteTimeout;
+end;
+
+function TDAEEDBConnection.GetRemoteTrace: Boolean;
+begin
+  Result := FNativeSession.RemoteTrace;
+end;
+
+function TDAEEDBConnection.GetSessionType: TEDBSessionType;
+begin
+  Result := FNativeSession.SessionType;
+end;
+
+procedure TDAEEDBConnection.SetForceBufferFlush(const Value: Boolean);
+begin
+  FNativeSession.ForceBufferFlush := Value;
+end;
+
+procedure TDAEEDBConnection.SetKeepConnections(const Value: Boolean);
+begin
+  FNativeSession.KeepConnections := Value;
+end;
+
+procedure TDAEEDBConnection.SetKeepTablesOpen(const Value: Boolean);
+begin
+  FNativeSession.KeepTablesOpen := Value;
+end;
+
+procedure TDAEEDBConnection.SetProgressTimeInterval(const Value: Integer);
+begin
+  FNativeSession.ProgressTimeInterval := Value;
+end;
+
+procedure TDAEEDBConnection.SetRecordChangeDetection(const Value: Boolean);
+begin
+  FNativeSession.RecordChangeDetection := Value;
+end;
+
+procedure TDAEEDBConnection.SetRecordLockProtocol(
+  const Value: TEDBRecordLockProtocol);
+begin
+  FNativeSession.RecordLockProtocol := Value;
+end;
+
+procedure TDAEEDBConnection.SetRecordLockRetryCount(const Value: Integer);
+begin
+  FNativeSession.RecordLockRetryCount := Value;
+end;
+
+procedure TDAEEDBConnection.SetRecordLockWaitTime(const Value: Integer);
+begin
+  FNativeSession.RecordLockWaitTime := Value;
+end;
+
+procedure TDAEEDBConnection.SetRemoteAddress(const Value: TEDBString);
+begin
+  FNativeSession.RemoteAddress := Value;
+end;
+
+procedure TDAEEDBConnection.SetRemoteCompression(const Value: Integer);
+begin
+  FNativeSession.RemoteCompression := Value;
+end;
+
+procedure TDAEEDBConnection.SetRemoteEncryption(const Value: Boolean);
+begin
+  FNativeSession.RemoteEncryption := Value;
+end;
+
+procedure TDAEEDBConnection.SetRemoteHost(const Value: TEDBString);
+begin
+  FNativeSession.RemoteHost := Value;
+end;
+
+procedure TDAEEDBConnection.SetRemotePing(const Value: Boolean);
+begin
+  FNativeSession.RemotePing := Value;
+end;
+
+procedure TDAEEDBConnection.SetRemotePingInterval(const Value: Integer);
+begin
+  FNativeSession.RemotePingInterval := Value;
+end;
+
+procedure TDAEEDBConnection.SetRemotePort(const Value: Integer);
+begin
+  FNativeSession.RemotePort := Value;
+end;
+
+procedure TDAEEDBConnection.SetRemoteService(const Value: TEDBString);
+begin
+  FNativeSession.RemoteService := Value;
+end;
+
+procedure TDAEEDBConnection.SetRemoteTimeout(const Value: Integer);
+begin
+  FNativeSession.RemoteTimeout := Value;
+end;
+
+procedure TDAEEDBConnection.SetRemoteTrace(const Value: Boolean);
+begin
+  FNativeSession.RemoteTrace := Value;
+end;
+
+procedure TDAEEDBConnection.SetSessionType(const Value: TEDBSessionType);
+begin
+  FNativeSession.SessionType := Value;
+end;
+
+function TDAEEDBConnection.GetSPSelectSyntax(
+  HasArguments: Boolean): string;
+begin
+  Result:= ''; // not supported!
+end;
+
+{ TDAEElevateDBDriver }
+
+procedure TDAEElevateDBDriver.GetAuxDrivers(out List: IROStrings);
+begin
+  inherited;
+ // List.Add('Driver1');
+ // List.Add('Driver2');
+end;
+
+procedure TDAEElevateDBDriver.GetAuxParams(const AuxDriver: string;
+  out List: IROStrings);
+begin
+  inherited;
+  List.Add('DataBaseName=<string>');
+  List.Add('ForceBufferFlush=(True,False)');
+  List.Add('KeepConnections=(True,False)');
+  List.Add('KeepTablesOpen=(True,False)');
+  List.Add('RecordLockProtocol=(lpPessimistic,lpOptimistic)');
+  List.Add('RecordLockRetryCount=<number>');
+  List.Add('RecordLockWaitTime=<number>');
+  List.Add('RecordChangeDetection=(True,False)');
+  List.Add('ProgressTimeInterval=<number>');
+  List.Add('SessionType=(stLocal,stRemote)');
+  List.Add('RemoteCompression=<number>');
+  List.Add('RemoteEncryption=(True,False)');
+  List.Add('RemoteHost=<string>');
+  List.Add('RemoteAddress=<string>');
+  List.Add('RemotePort=<number>');
+  List.Add('RemoteService=<string>');
+  List.Add('RemoteTrace=(True,False)');
+  List.Add('RemoteTimeout=<number>');
+  List.Add('RemotePing=(True,False)');
+  List.Add('RemotePingInterval=<number>');
+  List.Add('');
+  List.Add('=== Global Engine Options ===');
+  List.Add('EngineType=(etClient,etServer)');
+  List.Add('Signature=<string>');
+  List.Add('EncryptionPassword=<string>');
+  List.Add('LargeFileSupport=(True,False)');
+  List.Add('LicensedSessions=<number>');
+  List.Add('ConfigPath=<string>');
+  List.Add('ConfigName=<string>');
+  List.Add('ConfigExtension=<string>');
+  List.Add('LockExtension=<string>');
+  List.Add('LogExtension=<string>');
+  List.Add('MaxLogFileSize=<number>');
+  List.Add('CatalogName=<string>');
+  List.Add('CatalogExtension=<string>');
+  List.Add('BackupExtension=<string>');
+  List.Add('TableExtension=<string>');
+  List.Add('TableIndexExtension=<string>');
+  List.Add('TableBlobExtension=<string>');
+  List.Add('TempTablesPath=<string>');
+  List.Add('ServerName=<string>');
+  List.Add('ServerDescription=<string>');
+  List.Add('ServerPort=<number>');
+  List.Add('ServerThreadCacheSize=<number>');
+  List.Add('ServerEncryptedOnly=(True,False)');
+  List.Add('ServerSessionTimeout=<number>');
+  List.Add('ServerDeadSessionInterval=<number>');
+  List.Add('ServerDeadSessionExpiration=<number>');
+  List.Add('ServerMaxDeadSessions=<number>');
+  List.Add('ServerRunJobs=(True,False)');
+  List.Add('ServerJobCategory=<string>');
+end;
+
+function TDAEElevateDBDriver.GetAvailableDriverOptions: TDAAvailableDriverOptions;
+begin
+  Result:=[doServerName, doDatabaseName, doLogin, doCustom];
+end;
+
+function TDAEElevateDBDriver.GetConnectionClass: TDAEConnectionClass;
+begin
+  result := TDAEEDBConnection;
+end;
+
+
+function TDAEElevateDBDriver.GetDescription: string;
+begin
+  result := 'ElevateDB Driver'{$IFDEF DataAbstract_SchemaModelerOnly} + SchemaModelerOnly{$ENDIF};
+end;
+
+function TDAEElevateDBDriver.GetDriverID: string;
+begin
+  result := 'ElevateDB';
+end;
+
+function TDAEElevateDBDriver.GetProviderDefaultCustomParameters(
+  Provider: string): string;
+begin
+  Result:='DataBaseName=<please specify>';
+end;
+
+{ TDAEElevDBQuery }
+
+procedure TDAEElevDBQuery.ClearParams;
+begin
+  inherited;
+  TEDBQuery(Dataset).Params.Clear;
+end;
+
+function TDAEElevDBQuery.CreateDataset(aConnection: TDAEConnection): TDataset;
+begin
+  Result := TEDBQuery.Create(nil);
+  TEDBQuery(Result).SessionName := TDAEEDBConnection(aConnection).fNativeDatabase.SessionName;
+  TEDBQuery(Result).DatabaseName := TDAEEDBConnection(aConnection).fNativeDatabase.DatabaseName;
+end;
+
+function TDAEElevDBQuery.DoExecute: integer;
+begin
+  TEDBQuery(Dataset).ExecSQL;
+  Result:=TEDBQuery(Dataset).RowsAffected;
+end;
+
+function TDAEElevDBQuery.DoGetSQL: string;
+begin
+  Result := TEDBQuery(Dataset).SQL.Text;
+end;
+
+procedure TDAEElevDBQuery.DoPrepare(Value: boolean);
+begin
+//nothing
+  TEDBQuery(Dataset).Prepared:= Value;
+end;
+
+procedure TDAEElevDBQuery.DoSetSQL(const Value: string);
+begin
+  TEDBQuery(Dataset).SQL.Text := Value;
+end;
+
+function TDAEElevDBQuery.Execute: integer;
+begin
+  SetParamValues(GetParams);
+  Result:= DoExecute;
+  GetParamValues(GetParams);
+end;
+
+procedure TDAEElevDBQuery.GetParamValues(AParams: TDAParamCollection);
+begin
+  GetParamValuesStd(AParams, TEDBQuery(Dataset).Params);
+end;
+
+procedure TDAEElevDBQuery.SetParamValues(AParams: TDAParamCollection);
+begin
+  SetParamValuesStd(AParams, TEDBQuery(Dataset).Params);
+end;
+
+{ TDAEElevDBStoredProcedure }
+
+function TDAEElevDBStoredProcedure.CreateDataset(aConnection: TDAEConnection): TDataset;
+begin
+  result := TEDBStoredProc.Create(nil);
+  TEDBStoredProc(Result).SessionName := TDAEEDBConnection(aConnection).fNativeDatabase.SessionName;
+  TEDBStoredProc(Result).DatabaseName := TDAEEDBConnection(aConnection).fNativeDatabase.DatabaseName;
+end;
+
+function TDAEElevDBStoredProcedure.Execute: integer;
+begin
+  TEDBStoredProc(Dataset).Prepare;
+  SetParamValues(GetParams);
+  Result:= DoExecute;
+  //Result:=TEDBStoredProc(Dataset).RecordCount;
+  GetParamValues(GetParams);
+end;
+
+function TDAEElevDBStoredProcedure.DoGetSQL: string;
+begin
+  Result := '';
+end;
+
+procedure TDAEElevDBStoredProcedure.DoPrepare(Value: boolean);
+begin
+  TEDBStoredProc(Dataset).Prepared:=Value;
+end;
+
+procedure TDAEElevDBStoredProcedure.DoSetSQL(const Value: string);
+begin
+  //
+end;
+
+procedure TDAEElevDBStoredProcedure.GetParamValues(
+  AParams: TDAParamCollection);
+begin
+  GetParamValuesStd(AParams, TEDBStoredProc(Dataset).Params);
+end;
+
+function TDAEElevDBStoredProcedure.GetStoredProcedureName: string;
+begin
+  Result := TEDBStoredProc(Dataset).StoredProcName;
+end;
+
+procedure TDAEElevDBStoredProcedure.RefreshParams;
+var
+  lField: TField;
+  i: integer;
+  par: TDAParam;
+begin
+  DoPrepare(False);
+  DoPrepare(True);
+  RefreshParamsStd(TEDBStoredProc(Dataset).Params);
+  For i:=0 to TEDBStoredProc(Dataset).FieldCount-1 do begin
+    par := GetParams.Add;
+    lField:=TEDBStoredProc(Dataset).Fields[i];
+    par.Name := lField.Name;
+    par.DataType := intVCLTypeToDAType(lField.DataType);
+    par.ParamType := daptOutput;
+    par.Size := lField.Size;
+  end;
+end;
+
+procedure TDAEElevDBStoredProcedure.SetParamValues(
+  AParams: TDAParamCollection);
+begin
+  SetParamValuesStd(AParams, TEDBStoredProc(Dataset).Params);
+end;
+
+procedure TDAEElevDBStoredProcedure.SetStoredProcedureName(
+  const Name: string);
+begin
+  TEDBStoredProc(Dataset).StoredProcName := Name;
+end;
+
+function TDAEElevDBStoredProcedure.DoExecute: integer;
+begin
+  TEDBStoredProc(Dataset).ExecProc;
+  Result:=0;
+end;
+
+{ TElevateDBEngineProperties }
+
+function TElevateDBEngineProperties.GetBackupExtension: TEDBString;
+begin
+  Result := edbcomps.Engine.BackupExtension;
+end;
+
+function TElevateDBEngineProperties.GetCatalogExtension: TEDBString;
+begin
+  Result := edbcomps.Engine.CatalogExtension;
+end;
+
+function TElevateDBEngineProperties.GetCatalogName: TEDBString;
+begin
+  Result := edbcomps.Engine.CatalogName;
+end;
+
+function TElevateDBEngineProperties.GetConfigExtension: TEDBString;
+begin
+  Result := edbcomps.Engine.ConfigExtension;
+end;
+
+function TElevateDBEngineProperties.GetConfigName: TEDBString;
+begin
+  Result := edbcomps.Engine.ConfigName;
+end;
+
+function TElevateDBEngineProperties.GetConfigPath: TEDBString;
+begin
+  Result := edbcomps.Engine.ConfigPath;
+end;
+
+function TElevateDBEngineProperties.GetEncryptionPassword: TEDBString;
+begin
+  Result := edbcomps.Engine.EncryptionPassword;
+end;
+
+function TElevateDBEngineProperties.GetEngineType: TEDBEngineType;
+begin
+  Result := edbcomps.Engine.EngineType;
+end;
+
+function TElevateDBEngineProperties.GetLargeFileSupport: Boolean;
+begin
+  Result := edbcomps.Engine.LargeFileSupport;
+end;
+
+function TElevateDBEngineProperties.GetLicensedSessions: Integer;
+begin
+  Result := edbcomps.Engine.LicensedSessions;
+end;
+
+function TElevateDBEngineProperties.GetLockExtension: TEDBString;
+begin
+  Result := edbcomps.Engine.LockExtension;
+end;
+
+function TElevateDBEngineProperties.GetLogCategories: TEDBLogCategories;
+begin
+  Result := edbcomps.Engine.LogCategories;
+end;
+
+function TElevateDBEngineProperties.GetLogExtension: TEDBString;
+begin
+  Result := edbcomps.Engine.LogExtension;
+end;
+
+function TElevateDBEngineProperties.GetMaxLogFileSize: Integer;
+begin
+  Result := edbcomps.Engine.MaxLogFileSize;
+end;
+
+function TElevateDBEngineProperties.GetServerAddress: TEDBString;
+begin
+  Result := edbcomps.Engine.ServerAddress;
+end;
+
+function TElevateDBEngineProperties.GetServerAuthorizedAddresses: TEDBStrings;
+begin
+  Result := edbcomps.Engine.ServerAuthorizedAddresses;
+end;
+
+function TElevateDBEngineProperties.GetServerBlockedAddresses: TEDBStrings;
+begin
+  Result := edbcomps.Engine.ServerBlockedAddresses;
+end;
+
+function TElevateDBEngineProperties.GetServerDeadSessionExpiration: Integer;
+begin
+  Result := edbcomps.Engine.ServerDeadSessionExpiration;
+end;
+
+function TElevateDBEngineProperties.GetServerDeadSessionInterval: Integer;
+begin
+  Result := edbcomps.Engine.ServerDeadSessionInterval;
+end;
+
+function TElevateDBEngineProperties.GetServerDescription: TEDBString;
+begin
+  Result := edbcomps.Engine.ServerDescription;
+end;
+
+function TElevateDBEngineProperties.GetServerEncryptedOnly: Boolean;
+begin
+  Result := edbcomps.Engine.ServerEncryptedOnly;
+end;
+
+function TElevateDBEngineProperties.GetServerJobCategory: TEDBString;
+begin
+  Result := edbcomps.Engine.ServerJobCategory;
+end;
+
+function TElevateDBEngineProperties.GetServerMaxDeadSessions: Integer;
+begin
+  Result := edbcomps.Engine.ServerMaxDeadSessions;
+end;
+
+function TElevateDBEngineProperties.GetServerName: TEDBString;
+begin
+  Result := edbcomps.Engine.ServerName;
+end;
+
+function TElevateDBEngineProperties.GetServerPort: Integer;
+begin
+  Result := edbcomps.Engine.ServerPort;
+end;
+
+function TElevateDBEngineProperties.GetServerRunJobs: Boolean;
+begin
+  Result := edbcomps.Engine.ServerRunJobs;
+end;
+
+function TElevateDBEngineProperties.GetServerSessionTimeout: Integer;
+begin
+  Result := edbcomps.Engine.ServerSessionTimeout;
+end;
+
+function TElevateDBEngineProperties.GetServerThreadCacheSize: Integer;
+begin
+  Result := edbcomps.Engine.ServerThreadCacheSize;
+end;
+
+function TElevateDBEngineProperties.GetSignature: TEDBString;
+begin
+  Result := edbcomps.Engine.Signature;
+end;
+
+function TElevateDBEngineProperties.GetTableBlobExtension: TEDBString;
+begin
+  Result := edbcomps.Engine.TableBlobExtension;
+end;
+
+function TElevateDBEngineProperties.GetTableExtension: TEDBString;
+begin
+  Result := edbcomps.Engine.TableExtension;
+end;
+
+function TElevateDBEngineProperties.GetTableIndexExtension: TEDBString;
+begin
+  Result := edbcomps.Engine.TableIndexExtension;
+end;
+
+function TElevateDBEngineProperties.GetTempTablesPathProperty: TEDBString;
+begin
+  Result := edbcomps.Engine.TempTablesPath;
+end;
+
+procedure TElevateDBEngineProperties.SetBackupExtension(
+  const Value: TEDBString);
+begin
+  edbcomps.Engine.BackupExtension := Value;
+end;
+
+procedure TElevateDBEngineProperties.SetCatalogExtension(
+  const Value: TEDBString);
+begin
+  edbcomps.Engine.CatalogExtension := Value;
+end;
+
+procedure TElevateDBEngineProperties.SetCatalogName(
+  const Value: TEDBString);
+begin
+  edbcomps.Engine.CatalogName := Value;
+end;
+
+procedure TElevateDBEngineProperties.SetConfigExtension(
+  const Value: TEDBString);
+begin
+  edbcomps.Engine.ConfigExtension := Value;
+end;
+
+procedure TElevateDBEngineProperties.SetConfigName(
+  const Value: TEDBString);
+begin
+  edbcomps.Engine.ConfigName := Value;
+end;
+
+procedure TElevateDBEngineProperties.SetConfigPath(
+  const Value: TEDBString);
+begin
+  edbcomps.Engine.ConfigPath := Value;
+end;
+
+procedure TElevateDBEngineProperties.SetEncryptionPassword(
+  const Value: TEDBString);
+begin
+  edbcomps.Engine.EncryptionPassword := Value;
+end;
+
+procedure TElevateDBEngineProperties.SetEngineType(
+  const Value: TEDBEngineType);
+begin
+  edbcomps.Engine.EngineType := Value;
+end;
+
+procedure TElevateDBEngineProperties.SetLargeFileSupport(
+  const Value: Boolean);
+begin
+  edbcomps.Engine.LargeFileSupport := Value;
+end;
+
+procedure TElevateDBEngineProperties.SetLicensedSessions(
+  const Value: Integer);
+begin
+  edbcomps.Engine.LicensedSessions := Value;
+end;
+
+procedure TElevateDBEngineProperties.SetLockExtension(
+  const Value: TEDBString);
+begin
+  edbcomps.Engine.LockExtension := Value;
+end;
+
+procedure TElevateDBEngineProperties.SetLogCategories(
+  const Value: TEDBLogCategories);
+begin
+  edbcomps.Engine.LogCategories := Value;
+end;
+
+procedure TElevateDBEngineProperties.SetLogExtension(
+  const Value: TEDBString);
+begin
+  edbcomps.Engine.LogExtension := Value;
+end;
+
+procedure TElevateDBEngineProperties.SetMaxLogFileSize(
+  const Value: Integer);
+begin
+  edbcomps.Engine.MaxLogFileSize := Value;
+end;
+
+procedure TElevateDBEngineProperties.SetServerAddress(
+  const Value: TEDBString);
+begin
+  edbcomps.Engine.ServerAddress := Value;
+end;
+
+procedure TElevateDBEngineProperties.SetServerAuthorizedAddresses(
+  const Value: TEDBStrings);
+begin
+  edbcomps.Engine.ServerAuthorizedAddresses := Value;
+end;
+
+procedure TElevateDBEngineProperties.SetServerBlockedAddresses(
+  const Value: TEDBStrings);
+begin
+  edbcomps.Engine.ServerBlockedAddresses := Value;
+end;
+
+procedure TElevateDBEngineProperties.SetServerDeadSessionExpiration(
+  const Value: Integer);
+begin
+  edbcomps.Engine.ServerDeadSessionExpiration := Value;
+end;
+
+procedure TElevateDBEngineProperties.SetServerDeadSessionInterval(
+  const Value: Integer);
+begin
+  edbcomps.Engine.ServerDeadSessionInterval := Value;
+end;
+
+procedure TElevateDBEngineProperties.SetServerDescription(
+  const Value: TEDBString);
+begin
+  edbcomps.Engine.ServerDescription := Value;
+end;
+
+procedure TElevateDBEngineProperties.SetServerEncryptedOnly(
+  const Value: Boolean);
+begin
+  edbcomps.Engine.ServerEncryptedOnly := Value;
+end;
+
+procedure TElevateDBEngineProperties.SetServerJobCategory(
+  const Value: TEDBString);
+begin
+  edbcomps.Engine.ServerJobCategory := Value;
+end;
+
+procedure TElevateDBEngineProperties.SetServerMaxDeadSessions(
+  const Value: Integer);
+begin
+  edbcomps.Engine.ServerMaxDeadSessions := Value;
+end;
+
+procedure TElevateDBEngineProperties.SetServerName(
+  const Value: TEDBString);
+begin
+  edbcomps.Engine.ServerName := Value;
+end;
+
+procedure TElevateDBEngineProperties.SetServerPort(const Value: Integer);
+begin
+  edbcomps.Engine.ServerPort := Value;
+end;
+
+procedure TElevateDBEngineProperties.SetServerRunJobs(
+  const Value: Boolean);
+begin
+  edbcomps.Engine.ServerRunJobs := Value;
+end;
+
+procedure TElevateDBEngineProperties.SetServerSessionTimeout(
+  const Value: Integer);
+begin
+  edbcomps.Engine.ServerSessionTimeout := Value;
+end;
+
+procedure TElevateDBEngineProperties.SetServerThreadCacheSize(
+  const Value: Integer);
+begin
+  edbcomps.Engine.ServerThreadCacheSize := Value;
+end;
+
+procedure TElevateDBEngineProperties.SetSignature(const Value: TEDBString);
+begin
+  edbcomps.Engine.Signature := Value;
+end;
+
+procedure TElevateDBEngineProperties.SetTableBlobExtension(
+  const Value: TEDBString);
+begin
+  edbcomps.Engine.TableBlobExtension := Value;
+end;
+
+procedure TElevateDBEngineProperties.SetTableExtension(
+  const Value: TEDBString);
+begin
+  edbcomps.Engine.TableExtension := Value;
+end;
+
+procedure TElevateDBEngineProperties.SetTableIndexExtension(
+  const Value: TEDBString);
+begin
+  edbcomps.Engine.TableIndexExtension := Value;
+end;
+
+procedure TElevateDBEngineProperties.SetTempTablesPath(
+  const Value: TEDBString);
+begin
+  edbcomps.Engine.TempTablesPath := Value;
+end;
+
+exports
+  GetDriverObject name func_GetDriverObject;
+
+initialization
+  _driver := nil;
+  RegisterDriverProc(GetDriverObject);
+  gEngineProperties := TElevateDBEngineProperties.Create;
+finalization
+  gEngineProperties := nil;
+  UnregisterDriverProc(GetDriverObject);
+  FreeAndNIL(_driver);
+end.
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAFIBDriver.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAFIBDriver.pas
new file mode 100644
index 0000000..d596d87
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAFIBDriver.pas	
@@ -0,0 +1,682 @@
+unit uDAFIBDriver;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Driver Library
+{
+{ compiler: Delphi 6 and up
+{ platform: Win32
+{
+{ (c)opyright RemObjects Software. all rights reserved.
+{
+{ Using this code requires a valid license of the Data Abstract
+{ which can be obtained at http://www.remobjects.com.
+{----------------------------------------------------------------------------}
+
+{$IFDEF MSWINDOWS}
+{$I ..\DataAbstract.inc}
+{$ELSE}
+{$I ../DataAbstract.inc}
+{$ENDIF}
+
+{$R DataAbstract_FIBDriver_Glyphs.res}
+
+{.$DEFINE MANUAL_STARTTRANSACTION}
+interface
+
+uses
+  Classes, DB, uDAEngine, uDAInterfaces, uDAIBInterfaces, FIBDatabase,
+  uROClasses, pFIBDatabase, FIBQuery, pFIBQuery, pFIBStoredProc, uDAUtils,
+  FIBDataSet, ibase, FIBSQLMonitor;
+
+type
+  { TDAFIBDriver }
+  TDAFIBDriver = class(TDADriverReference)
+  end;
+
+  { TFIBConnection }
+  TFIBConnection = class(TDAConnectionWrapper)
+  private
+    fDatabase: TpFIBDatabase;
+    fTransaction: TFIBTransaction;
+
+  protected
+    function GetConnected: Boolean; override;
+    procedure SetConnected(Value: boolean); override;
+
+  public
+    constructor Create(AOwner: TComponent); override;
+
+    property Database: TpFIBDatabase read fDatabase;
+    property Transaction: TFIBTransaction read fTransaction;
+  end;
+
+  { TDAEFIBDriver }
+  TDAEFIBDriver = class(TDAIBDriver)
+  private
+    fFIBTraceOptions: TFIBTraceFlags;
+    fTraceCallback: TDALogTraceEvent;
+    fMonitor: TFIBSQLMonitor;
+    procedure OnTrace(EventText: string; EventTime: TDateTime);
+  protected
+    function GetConnectionClass: TDAEConnectionClass; override;
+    procedure CustomizeConnectionObject(aConnection: TDAEConnection); override;
+    procedure DoSetTraceOptions(TraceActive: boolean; TraceOptions: TDATraceOptions; Callback: TDALogTraceEvent); override;
+
+    // IDADriver
+    function GetDriverID: string; override;
+    function GetDescription: string; override;
+  public
+  end;
+
+  { TDAEFIBConnection }
+  TDAEFIBConnection = class(TDAIBConnection, IDAInterbaseConnection, IDAIBTransactionAccess, IDAIBConnectionProperties, IDAUseGenerators, IDAFileBasedDatabase)
+  private
+    fConnection: TFIBConnection;
+    procedure IntOpen;
+  protected
+
+    // IIBTransactionAccess
+    function GetTransaction: TObject; safecall;
+
+    procedure Commit; safecall;
+    procedure CommitRetaining; safecall;
+    procedure Rollback; safecall;
+    procedure RollbackRetaining; safecall;
+
+    // IIBConnectionProperties
+    function GetRole: string; safecall;
+    procedure SetRole(const Value: string); safecall;
+    function GetSQLDialect: integer; override; safecall;
+    procedure SetSQLDialect(Value: integer); safecall;
+    function GetCharset: string; safecall;
+    procedure SetCharset(const Value: string); safecall;
+
+    // IDAConnection
+    function CreateCustomConnection: TCustomConnection; override;
+
+    function GetDatasetClass: TDAEDatasetClass; override;
+    function GetStoredProcedureClass: TDAEStoredProcedureClass; override;
+
+    procedure DoApplyConnectionString(aConnStrParser: TDAConnectionStringParser;
+      aConnectionObject: TCustomConnection); override;
+
+    function DoBeginTransaction: integer; override;
+    procedure DoCommitTransaction; override;
+    procedure DoRollbackTransaction; override;
+    function DoGetInTransaction: boolean; override;
+  public
+  end;
+
+  { TDAEFIBQuery }
+  TDAEFIBQuery = class(TDAEDataset, IDAMustSetParams)
+  private
+  protected
+    function DoGetRecordCount: integer; override;
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+    procedure ClearParams; override;
+    function DoExecute: integer; override;
+    function DoGetSQL: string; override;
+    procedure DoSetSQL(const Value: string); override;
+    procedure DoPrepare(Value: boolean); override;
+    procedure RefreshParams; override;
+    procedure DoSetActive(Value: Boolean); override;
+    procedure SetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  public
+  end;
+
+  { TDAEFIBStoredProcedure }
+  TDAEFIBStoredProcedure = class(TDAEStoredProcedure, IDAMustSetParams)
+  private
+    FSP: TpFIBStoredProc;
+  protected
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+
+    function GetStoredProcedureName: string; override;
+    procedure SetStoredProcedureName(const Name: string); override;
+    procedure RefreshParams; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function DoExecute: integer; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function Execute: integer; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  end;
+
+procedure Register;
+
+function GetDriverObject: IDADriver; stdcall;
+
+implementation
+
+uses SysUtils, uDADriverManager, uDARes, 
+  pFIBProps;
+
+var
+  _driver: TDAEDriver = nil;
+
+procedure Register;
+begin
+  RegisterComponents(DAPalettePageName, [TDAFIBDriver]);
+end;
+
+{$IFDEF DataAbstract_SchemaModelerOnly}
+{$INCLUDE ..\DataAbstract_SchemaModelerOnly.inc}
+{$ENDIF DataAbstract_SchemaModelerOnly}
+
+function GetDriverObject: IDADriver;
+begin
+  {$IFDEF DataAbstract_SchemaModelerOnly}
+  if not RunningInSchemaModeler then begin
+    result := nil;
+    exit;
+  end;
+  {$ENDIF}
+  if (_driver = nil) then _driver := TDAEFIBDriver.Create(nil);
+  result := _driver;
+end;
+
+
+{ TFIBConnection }
+
+constructor TFIBConnection.Create(AOwner: TComponent);
+begin
+  inherited;
+
+  fDatabase := TpFIBDatabase.Create(Self);
+  fTransaction := TFIBTransaction.Create(Self);
+
+  fDatabase.UseLoginPrompt := FALSE;
+  fDatabase.DefaultTransaction := fTransaction;
+end;
+
+function TFIBConnection.GetConnected: Boolean;
+begin
+  result := fDatabase.Connected
+end;
+
+procedure TFIBConnection.SetConnected(Value: boolean);
+begin
+  // This first check is required.
+  // I think there's a bug in the FIB destroying sequence and the notification. TCustomConnection gets to this point *after*
+  // the owned components are destroyed. Only happens with FIB...
+
+  if (csDestroying in ComponentState) then Exit;
+  fDatabase.Connected := Value
+end;
+
+{ TDAEFIBConnection }
+
+procedure TDAEFIBConnection.DoApplyConnectionString(
+  aConnStrParser: TDAConnectionStringParser; aConnectionObject: TCustomConnection);
+begin
+  inherited;
+
+  fConnection.Database.SQLDialect := 3;
+  with aConnStrParser do begin
+    if (Self.UserID <> '') then
+      fConnection.Database.ConnectParams.UserName := Self.UserID
+    else
+      fConnection.Database.ConnectParams.UserName := UserID;
+
+    if (Self.Password <> '') then
+      fConnection.Database.ConnectParams.Password := Self.Password
+    else
+      fConnection.Database.ConnectParams.Password := Password;
+
+    if Server <> '' then 
+      fConnection.Database.DatabaseName := Server + ':' + Database
+    else
+      fConnection.Database.DatabaseName := Database;
+
+    if AuxParams['Dialect'] <> '' then
+      fConnection.Database.SQLDialect := StrtoInt(AuxParams['Dialect'])
+    else if AuxParams['SQLDialect'] <> '' then
+      fConnection.Database.SQLDialect := StrtoInt(AuxParams['SQLDialect']);
+
+    if AuxParams['Role'] <> '' then
+      fConnection.Database.ConnectParams.RoleName := AuxParams['Role'];
+
+    if AuxParams['Charset'] <> '' then
+      SetCharset(AuxParams['Charset']);
+
+  end;
+end;
+
+function TDAEFIBConnection.DoBeginTransaction: integer;
+begin
+  result := -1;
+  fConnection.Database.DefaultTransaction.StartTransaction;
+end;
+
+procedure TDAEFIBConnection.DoCommitTransaction;
+begin
+  fConnection.Database.DefaultTransaction.Commit;
+end;
+
+function TDAEFIBConnection.CreateCustomConnection: TCustomConnection;
+begin
+  fConnection := TFIBConnection.Create(nil);
+  result := fConnection;
+end;
+
+function TDAEFIBConnection.GetDatasetClass: TDAEDatasetClass;
+begin
+  result := TDAEFIBQuery
+end;
+
+function TDAEFIBConnection.GetStoredProcedureClass: TDAEStoredProcedureClass;
+begin
+  result := TDAEFIBStoredProcedure
+end;
+
+function TDAEFIBConnection.GetTransaction: TObject;
+begin
+  result := fConnection.fTransaction;
+end;
+
+procedure TDAEFIBConnection.DoRollbackTransaction;
+begin
+  fConnection.Database.DefaultTransaction.Rollback;
+end;
+
+function TDAEFIBConnection.GetRole: string;
+begin
+  result := fConnection.Database.ConnectParams.RoleName;
+end;
+
+function TDAEFIBConnection.GetSQLDialect: integer;
+begin
+  result := fConnection.Database.SQLDialect
+end;
+
+function TDAEFIBConnection.GetCharset: string;
+begin
+  result := fConnection.Database.ConnectParams.CharSet
+end;
+
+procedure TDAEFIBConnection.SetRole(const Value: string);
+begin
+  fConnection.Database.ConnectParams.RoleName := Value
+end;
+
+procedure TDAEFIBConnection.SetSQLDialect(Value: integer);
+begin
+  fConnection.Database.SQLDialect := Value
+end;
+
+procedure TDAEFIBConnection.SetCharset(const Value: string);
+begin
+  fConnection.Database.ConnectParams.CharSet := Value;
+end;
+
+procedure TDAEFIBConnection.Commit;
+begin
+  fConnection.fTransaction.Commit
+end;
+
+procedure TDAEFIBConnection.CommitRetaining;
+begin
+  fConnection.fTransaction.CommitRetaining
+end;
+
+procedure TDAEFIBConnection.Rollback;
+begin
+  fConnection.fTransaction.Rollback
+end;
+
+procedure TDAEFIBConnection.RollbackRetaining;
+begin
+  fConnection.fTransaction.RollbackRetaining
+end;
+
+function TDAEFIBConnection.DoGetInTransaction: boolean;
+begin
+  result := fConnection.fTransaction.InTransaction
+end;
+
+procedure TDAEFIBConnection.IntOpen;
+begin
+  {$IFNDEF MANUAL_STARTTRANSACTION}
+  if not fConnection.Connected then fConnection.Open;
+  if not fConnection.Transaction.InTransaction then fConnection.Transaction.StartTransaction;
+  {$ENDIF}
+end;
+
+{ TDAEFIBDriver }
+
+procedure TDAEFIBDriver.CustomizeConnectionObject(aConnection: TDAEConnection);
+begin
+  // 25/04/06 13:05 Donald Shimoda . To do.
+  //TDAEFIBConnection(aConnection).fConnection.Database.TraceFlags := fIBTraceOptions;
+end;
+
+procedure TDAEFIBDriver.DoSetTraceOptions(TraceActive: boolean;
+  TraceOptions: TDATraceOptions; Callback: TDALogTraceEvent);
+begin
+  inherited;
+
+  if TraceActive then begin
+    if (fMonitor = nil) then fMonitor := TFIBSQLMonitor.Create(Self);
+
+    fMonitor.Active := False;
+    fMonitor.OnSQL := OnTrace;
+
+    fFIBTraceOptions := [];
+    if (toPrepare in TraceOptions) then fFIBTraceOptions := fFIBTraceOptions + [tfQPrepare];
+    if (toExecute in TraceOptions) then fFIBTraceOptions := fFIBTraceOptions + [tfQExecute];
+    if (toFetch in TraceOptions) then fFIBTraceOptions := fFIBTraceOptions + [tfQFetch];
+    if (toConnect in TraceOptions) then fFIBTraceOptions := fFIBTraceOptions + [tfConnect];
+    if (toTransact in TraceOptions) then fFIBTraceOptions := fFIBTraceOptions + [tfTransact];
+    if (toService in TraceOptions) then fFIBTraceOptions := fFIBTraceOptions + [tfService];
+    if (toMisc in TraceOptions) then fFIBTraceOptions := fFIBTraceOptions + [tfMisc];
+
+    fTraceCallBack := Callback;
+
+    fMonitor.TraceFlags := fFIBTraceOptions;
+    fMonitor.Active := True;
+  end
+  else begin
+    FreeAndNIL(fMonitor);
+    fTraceCallback := nil;
+  end;
+end;
+
+
+function TDAEFIBDriver.GetConnectionClass: TDAEConnectionClass;
+begin
+  result := TDAEFIBConnection;
+end;
+
+function TDAEFIBDriver.GetDescription: string;
+begin
+  result := 'FIBPlus Driver'{$IFDEF DataAbstract_SchemaModelerOnly} + SchemaModelerOnly{$ENDIF};
+end;
+
+function TDAEFIBDriver.GetDriverID: string;
+begin
+  result := 'FIB';
+end;
+
+procedure CreateParams(FQuery: TFIBQuery; Pars: TDAParamCollection; CreateOutputParams: Boolean = False);
+var
+  i: Integer;
+  par: TDAParam;
+  sqPar: TFIBXSQLVAR;
+begin
+  if FQuery.Database.Handle = nil then
+    FQuery.Database.Open;
+
+  if not FQuery.Prepared then
+    FQuery.Prepare;
+  pars.Clear;
+  for i := 0 to FQuery.ParamCount -1 do begin
+    sqpar := FQuery.Params[i];
+    if sqpar.IsParam then begin
+      par := pars.Add;
+      par.Name := sqPar.Name;
+      par.ParamType:= daptInput;
+      case sqpar.SQLType and not 1 of
+        SQL_VARYING, SQL_TEXT:
+        begin
+          if sqPar.CharacterSet = 'UNICODE_FSS' then
+            par.DataType := datWideString
+          else
+            par.DataType := datString;
+          par.Size := sqPar.Size;
+        end;
+        SQL_DOUBLE, SQL_FLOAT,SQL_D_FLOAT:par.DataType := datFloat;
+        SQL_SHORT, SQL_LONG: begin
+         if sqPar.Scale <> 0 then
+           par.DataType := datFloat
+         else
+           par.DataType := datInteger;
+        end;
+        SQL_INT64: begin
+         if sqPar.Scale <> 0 then
+           par.DataType := datFloat
+         else
+           par.DataType := datLargeInt;
+        end;
+        SQL_TIMESTAMP,
+        SQL_TYPE_TIME,
+        SQL_TYPE_DATE: par.DataType := datDateTime;
+        SQL_BLOB:
+          if sqPar.SQLSubtype = 1 then
+             par.DataType := datMemo
+          else
+             par.DataType := datBlob;
+        SQL_BOOLEAN: par.DataType := datBoolean;
+      else
+          par.DataType := datUnknown;
+      end;
+    end;
+  end;
+
+  if CreateOutputParams then
+    for i := 0 to FQuery.FieldCount -1 do begin
+      sqpar := FQuery.Fields[i];
+      par := pars.Add;
+      par.Name := sqPar.Name;
+      par.ParamType:= daptOutput;
+      case sqpar.SQLType and not 1 of
+        SQL_VARYING, SQL_TEXT:
+        begin
+          if sqPar.CharacterSet = 'UNICODE_FSS' then
+            par.DataType := datWideString
+          else
+            par.DataType := datString;
+          par.Size := sqPar.Size;
+        end;
+        SQL_DOUBLE, SQL_FLOAT,SQL_D_FLOAT:par.DataType := datFloat;
+        SQL_SHORT, SQL_LONG: begin
+         if sqPar.Scale <> 0 then
+           par.DataType := datFloat
+         else
+           par.DataType := datInteger;
+        end;
+        SQL_INT64: begin
+         if sqPar.Scale <> 0 then
+           par.DataType := datFloat
+         else
+           par.DataType := datLargeInt;
+        end;
+        SQL_TIMESTAMP,
+        SQL_TYPE_TIME,
+        SQL_TYPE_DATE: par.DataType := datDateTime;
+        SQL_BLOB:
+          if sqPar.SQLSubtype = 1 then
+             par.DataType := datMemo
+          else
+             par.DataType := datBlob;
+        SQL_BOOLEAN: par.DataType := datBoolean;
+      else
+          par.DataType := datUnknown;
+      end;
+    end;
+end;
+
+
+{ TDAEFIBQuery }
+
+
+procedure TDAEFIBDriver.OnTrace(EventText: string; EventTime: TDateTime);
+begin
+  if Assigned(fTraceCallback) then fTraceCallback(fMonitor, EventText, 0);
+end;
+
+procedure TDAEFIBQuery.ClearParams;
+begin
+  inherited;
+  TFIBDataSet(Dataset).Params.ClearValues;
+end;
+
+{ TDAEFIBStoredProcedure }
+
+function TDAEFIBStoredProcedure.CreateDataset(
+  aConnection: TDAEConnection): TDataset;
+begin
+  FreeAndNil(FSP);
+  FSP := TpFIBStoredProc.Create(nil);
+  FSP.Database := TDAEFIBConnection(aConnection).fConnection.Database;
+  result := nil;
+end;
+
+function TDAEFIBStoredProcedure.Execute: integer;
+begin
+  TDAEFIBConnection(Connection).IntOpen;
+  if FSP.Database.Handle = nil then FSP.Database.Open;
+
+  SetParamValues(GetParams);
+  Result:= DoExecute;
+  GetParamValues(GetParams);
+end;
+
+procedure TDAEFIBStoredProcedure.SetParamValues(AParams: TDAParamCollection);
+var
+  i: integer;
+  sqPar: TFIBXSQLVAR;
+begin
+  FSP.Prepare;
+  for i := 0 to AParams.Count - 1 do begin
+    if (AParams[i].ParamType in [daptInput, daptInputOutput, daptUnknown]) then begin
+     sqPar:= FSP.ParamByName(AParams[i].Name);
+     if (sqPar <> nil) and sqPar.IsParam then sqPar.Value:=AParams[i].Value;
+    end;
+  end;
+end;
+
+procedure TDAEFIBStoredProcedure.GetParamValues(AParams: TDAParamCollection);
+var
+  i: integer;
+  sqPar: TFIBXSQLVAR;
+begin
+  for i := 0 to AParams.Count - 1 do begin
+    if (AParams[i].ParamType in [daptOutput, daptInputOutput, daptResult]) then begin
+     sqPar:= FSP.FieldByName(AParams[i].Name);
+     if (sqPar <> nil) then AParams[i].Value:=sqPar.Value;
+    end;
+  end;
+end;
+
+
+function TDAEFIBStoredProcedure.GetStoredProcedureName: string;
+begin
+  result := FSP.StoredProcName;
+end;
+
+procedure TDAEFIBStoredProcedure.SetStoredProcedureName(
+  const Name: string);
+begin
+  TDAEFIBConnection(Connection).IntOpen;
+  FSP.StoredProcName := Name;
+end;
+
+procedure TDAEFIBStoredProcedure.RefreshParams;
+begin
+  TDAEFIBConnection(Connection).IntOpen;
+  CreateParams(FSP, GetParams,True);
+end;
+
+exports
+  GetDriverObject name func_GetDriverObject;
+
+function TDAEFIBStoredProcedure.DoExecute: integer;
+begin
+  FSP.ExecQuery;
+  result := FSP.RowsAffected;
+end;
+
+{ TDAEFIBQuery }
+
+function TDAEFIBQuery.CreateDataset(aConnection: TDAEConnection): TDataset;
+var
+  ds: TFIBDataSet;
+begin
+  ds := TFIBDataSet.Create(nil);
+  ds.Database := TDAEFIBConnection(aConnection).fConnection.Database;
+  ds.Transaction := TDAEFIBConnection(aConnection).fConnection.Transaction;
+  ds.PrepareOptions := ds.PrepareOptions + [psUseLargeIntField];
+  result := ds;
+end;
+
+function TDAEFIBQuery.DoExecute: integer;
+begin
+  TDAEFIBConnection(Connection).IntOpen;
+  TFIBDataSet(Dataset).QSelect.ExecQuery;
+  result := TFIBDataSet(Dataset).QSelect.RowsAffected;
+end;
+
+function TDAEFIBQuery.DoGetRecordCount: integer;
+begin
+  result := TFIBDataSet(DAtaset).QSelect.RecordCount;
+end;
+
+function TDAEFIBQuery.DoGetSQL: string;
+begin
+  result := TFIBDataSet(DAtaset).QSelect.SQL.Text;
+end;
+
+procedure TDAEFIBQuery.DoPrepare(Value: boolean);
+begin
+  TDAEFIBConnection(Connection).IntOpen;
+  if Value then TFIBDataSet(DAtaset).QSelect.Prepare;
+end;
+
+procedure TDAEFIBQuery.DoSetActive(Value: Boolean);
+begin
+  TDAEFIBConnection(Connection).IntOpen;
+  if Value then begin
+    if not TFIBDataSet(Dataset).Database.Connected then
+      TFIBDataSet(Dataset).Database.Connected := true;
+  end;
+  inherited DoSetActive(Value);
+end;
+
+procedure TDAEFIBQuery.DoSetSQL(const Value: string);
+begin
+  TFIBDataSet(DAtaset).QSelect.SQL.Text := Value;
+end;
+
+
+
+procedure TDAEFIBQuery.RefreshParams;
+begin
+  CreateParams(TFIBDataSet(Dataset).QSelect, GetParams);
+end;
+
+
+procedure TDAEFIBQuery.SetParamValues(AParams: TDAParamCollection);
+var
+  i: integer;
+  _par: TDAParam;
+begin
+  TFIBDataSet(Dataset).Prepare;
+  for i := 0 to TFIBDataSet(Dataset).ParamCount - 1 do begin
+    _Par := AParams.ParamByName(TFIBDataSet(Dataset).Params[i].Name);
+    if (_Par.ParamType in [daptInput, daptInputOutput, daptUnknown]) then
+      if (TFIBDataSet(Dataset).Params[i].IsParam) then
+         TFIBDataSet(Dataset).Params[i].Value := _Par.Value;
+  end;
+end;
+
+procedure TDAEFIBQuery.GetParamValues(AParams: TDAParamCollection);
+var
+  i: integer;
+  _Par: TDAParam;
+begin
+  for i := 0 to TFIBDataSet(Dataset).ParamCount - 1 do begin
+    _Par := AParams.ParamByName(TFIBDataSet(Dataset).Params[i].Name);
+     if (_Par.ParamType in [daptOutput, daptInputOutput, daptResult]) then
+      _Par.Value := TFIBDataSet(Dataset).Params[i].Value;
+  end;
+end;
+
+
+initialization
+  _driver := nil;
+  RegisterDriverProc(GetDriverObject);
+
+finalization
+  UnregisterDriverProc(GetDriverObject);
+  FreeAndNIL(_driver);
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAIBDACDriver.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAIBDACDriver.pas
new file mode 100644
index 0000000..98953c0
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAIBDACDriver.pas	
@@ -0,0 +1,566 @@
+unit uDAIBDACDriver;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Driver Library
+{
+{ compiler: Delphi 6 and up
+{ platform: Win32
+{
+{ (c)opyright RemObjects Software. all rights reserved.
+{
+{ Using this code requires a valid license of the Data Abstract
+{ which can be obtained at http://www.remobjects.com.
+{----------------------------------------------------------------------------}
+
+{$IFDEF MSWINDOWS}
+{$I ..\DataAbstract.inc}
+{$ELSE}
+{$I ../DataAbstract.inc}
+{$ENDIF}
+
+{$R DataAbstract_IBDACDriver_Glyphs.res}
+
+interface
+
+uses
+  DB, Classes, uDAEngine, uDAInterfaces, uDAADOInterfaces, uROClasses,
+  DBAccess, IBC, DASQLMonitor,
+  IBCSQLMonitor, Variants, uDAUtils, uDAIBInterfaces;
+
+type { TDAIBDACDriver }
+  TDAIBDACDriver = class(TDADriverReference)
+  end;
+
+  { TDAEIBDACDriver }
+  TDAEIBDACDriver = class(TDAIBDriver)
+  private
+    fMonitor: TIBCSQLMonitor;
+    fTraceCallBack: TDALogTraceEvent;
+    procedure OnIBDACTrace(Sender: TObject; Text: string; Flag: TDATraceFlag);
+  protected
+    function GetConnectionClass: TDAEConnectionClass; override;
+    procedure DoSetTraceOptions(TraceActive: boolean; TraceOptions: TDATraceOptions; Callback: TDALogTraceEvent); override;
+    procedure CustomizeConnectionObject(aConnection: TDAEConnection); override;
+    // IDADriver
+    function GetDriverID: string; override;
+    function GetDescription: string; override;
+  end;
+
+  { TDAEIBDACConnection }
+  TDAEIBDACConnection = class(TDAIBConnection, IDAInterbaseConnection, IDAIBTransactionAccess, IDAIBConnectionProperties, IDAUseGenerators, IDAFileBasedDatabase)
+  private
+    fConnection: TIBCConnection;
+  protected
+    // IIBTransactionAccess
+    function GetTransaction: TObject; safecall;
+
+    procedure Commit; safecall;
+    procedure CommitRetaining; safecall;
+    procedure Rollback; safecall;
+    procedure RollbackRetaining; safecall;
+
+    // IIBConnectionProperties
+    function GetRole: string; safecall;
+    procedure SetRole(const Value: string); safecall;
+    function GetSQLDialect: integer;override; safecall;
+    procedure SetSQLDialect(Value: integer); safecall;
+    function GetCharset: string; safecall;
+    procedure SetCharset(const Value: string); safecall;
+
+
+    // IDAConnection
+    function CreateCustomConnection: TCustomConnection; override;
+
+    function GetDatasetClass: TDAEDatasetClass; override;
+    function GetStoredProcedureClass: TDAEStoredProcedureClass; override;
+
+    procedure DoApplyConnectionString(aConnStrParser: TDAConnectionStringParser;
+      aConnectionObject: TCustomConnection); override;
+
+    function DoBeginTransaction: integer; override;
+    procedure DoCommitTransaction; override;
+    procedure DoRollbackTransaction; override;
+    function DoGetInTransaction: boolean; override;
+  end;
+
+  { TDAEIBDACQuery }
+  TDAEIBDACQuery = class(TDAEDataset, IDAMustSetParams)
+  private
+
+  protected
+    function DoGetRecordCount: integer; override;
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+    procedure ClearParams; override;
+    function DoExecute: integer; override;
+    function DoGetSQL: string; override;
+    procedure DoSetSQL(const Value: string); override;
+    procedure DoPrepare(Value: boolean); override;
+
+    // IDAMustSetParams
+    procedure SetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+  public
+  end;
+
+  { TDAEIBDACStoredProcedure }
+  TDAEIBDACStoredProcedure = class(TDAEStoredProcedure, IDAMustSetParams)
+  protected
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+
+    function GetStoredProcedureName: string; override;
+    procedure SetStoredProcedureName(const Name: string); override;
+    function DoExecute: Integer; override;
+    function Execute: integer; override;
+    procedure RefreshParams; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    // IDAMustSetParams
+    procedure SetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+  end;
+
+procedure Register;
+
+function GetDriverObject: IDADriver; stdcall;
+
+implementation
+
+uses
+  SysUtils,
+  uDADriverManager, uDARes,
+  uROBinaryHelpers;
+
+var
+  _driver: TDAEDriver = nil;
+
+procedure Register;
+begin
+  RegisterComponents(DAPalettePageName, [TDAIBDACDriver]);
+end;
+
+{$IFDEF DataAbstract_SchemaModelerOnly}
+{$INCLUDE ..\DataAbstract_SchemaModelerOnly.inc}
+{$ENDIF DataAbstract_SchemaModelerOnly}
+
+function GetDriverObject: IDADriver;
+begin
+{$IFDEF DataAbstract_SchemaModelerOnly}
+  if not RunningInSchemaModeler then begin
+    result := nil;
+    exit;
+  end;
+{$ENDIF}
+  if (_driver = nil) then _driver := TDAEIBDACDriver.Create(nil);
+  result := _driver;
+end;
+
+{$I uDACRLabsUtils.inc}
+
+{ TDAEIBDACConnection }
+
+procedure TDAEIBDACConnection.DoApplyConnectionString(
+  aConnStrParser: TDAConnectionStringParser; aConnectionObject: TCustomConnection);
+begin
+  inherited;
+  SetSQLDialect(3);
+  with aConnStrParser do begin
+    if (Self.UserID <> '') then
+      fConnection.Username := Self.UserID
+    else
+      fConnection.Username := UserID;
+
+    if (Self.Password <> '') then
+      fConnection.Password := Self.Password
+    else
+      fConnection.Password := Password;
+
+    if Server <> '' then
+      fConnection.Database := Server + ':' + Database
+    else
+      fConnection.Database := Database;
+
+    if AuxParams['Dialect'] <> '' then
+      SetSQLDialect(StrToInt(AuxParams['Dialect']))
+    else if AuxParams['SQLDialect'] <> '' then
+      SetSQLDialect(StrToInt(AuxParams['SQLDialect']));
+
+    if AuxParams['Role'] <> '' then SetRole(AuxParams['Role']);
+
+    if AuxParams['Charset'] <> '' then SetCharset(AuxParams['Charset']);
+  end;
+end;
+
+function TDAEIBDACConnection.DoBeginTransaction: integer;
+begin
+  result := -1;
+  fConnection.StartTransaction;
+end;
+
+procedure TDAEIBDACConnection.DoCommitTransaction;
+begin
+  fConnection.Commit;
+end;
+
+function TDAEIBDACConnection.CreateCustomConnection: TCustomConnection;
+begin
+  fConnection := TIBCConnection.Create(nil);
+  fConnection.LoginPrompt := FALSE;
+
+  result := fConnection;
+end;
+
+function TDAEIBDACConnection.GetDatasetClass: TDAEDatasetClass;
+begin
+  result := TDAEIBDACQuery;
+end;
+
+function TDAEIBDACConnection.GetStoredProcedureClass: TDAEStoredProcedureClass;
+begin
+  result := TDAEIBDACStoredProcedure;
+end;
+
+(*function SqlServerToDAType(aType:integer):TDADataType;
+begin
+  case aType of
+    34:result := datBlob;
+    35:result := datMemo;
+    36:result := datString; //uniqueidentifier
+    48:result := datInteger;
+    52:result := datInteger;
+    56:result := datInteger;
+    58:result := datDateTime;
+    59:result := datFloat;
+    60:result := datCurrency;
+    61:result := datDateTime;
+    62:result := datFloat;
+    //98    sql_variant
+    99:result := datMemo;//    ntext
+    104:result := datBoolean;
+    106:result := datFloat;
+    108:result := datFloat;
+    122:result := datCurrency;
+    127:result := datInteger;
+    165:result := datBlob; // varbinary
+    167:result := datString;
+    173:result := datBlob;   // binary
+    175:result := datString; //   char
+    189:result := datBlob;   //   timestamp
+    231:result := datString; //  nvarchar
+    239:result := datString; //nchar
+    240:result := datDateTime;
+    241:result := datBlob;//   xml
+    else result := datUnknown;
+  end;
+end;
+
+procedure TDAEIBDACConnection.DoGetStoredProcedureParams(const aStoredProcedureName: string; out Params: TDAParamCollection);
+var
+  ds : TIBCQuery;
+  lID:string;
+begin
+  ds := TIBCQuery.Create(NIL);
+  try
+
+    ds.Connection := fConnection;
+    ds.SQL.Text := 'select * from sysobjects where xtype=''P'' and name='''+aStoredProcedureName+'''';
+    ds.Open;
+    try
+      if ds.EOF then RaiseError('Stored Procedure %s not found in database',[aStoredProcedureName]);
+      lID := ds.FieldbyName('id').AsString;
+    finally
+      ds.Close();
+    end;
+
+    ds.SQL.Text := 'select * from sys.parameters where object_id='''+lID+''' ORDER BY parameter_id';
+    ds.Open;
+    try
+      Params := TDAParamCollection.Create(nil);
+      while not ds.Eof do begin
+        with Params.Add() do begin
+          Name := ds.FieldByName('name').AsString;
+
+          DataType := SqlServerToDAType(ds.FieldByName('system_type_id').AsInteger);
+          Size := ds.FieldByName('max_length').AsInteger;
+
+          {if ds.FieldByName('has_default_value').AsBoolean then
+            DefaultValue := ds.FieldByName('default_Value').AsInteger;}
+
+          if ds.FieldByName('is_output').AsBoolean then
+            ParamType := daptOutput
+          else
+            ParamType := daptInput;
+
+        end;
+        ds.Next();
+      end;
+    finally
+      Close();
+    end;
+
+  finally
+    ds.Free;
+  end;
+end;*)
+
+procedure TDAEIBDACConnection.DoRollbackTransaction;
+begin
+  fConnection.Rollback;
+end;
+
+function TDAEIBDACConnection.DoGetInTransaction: boolean;
+begin
+  result := fConnection.InTransaction
+end;
+
+procedure TDAEIBDACConnection.Commit;
+begin
+  fConnection.Commit;
+end;
+
+procedure TDAEIBDACConnection.CommitRetaining;
+begin
+  fConnection.CommitRetaining;
+end;
+
+function TDAEIBDACConnection.GetCharset: string;
+begin
+  result := fConnection.Options.Charset;
+end;
+
+function TDAEIBDACConnection.GetRole: string;
+begin
+  Result := fConnection.Options.Role;
+end;
+
+function TDAEIBDACConnection.GetSQLDialect: integer;
+begin
+  Result := fConnection.SQLDialect;
+end;
+
+function TDAEIBDACConnection.GetTransaction: TObject;
+begin
+  Result := fConnection.DefaultTransaction;
+end;
+
+procedure TDAEIBDACConnection.Rollback;
+begin
+  fConnection.Rollback;
+end;
+
+procedure TDAEIBDACConnection.RollbackRetaining;
+begin
+  fConnection.RollbackRetaining;
+end;
+
+procedure TDAEIBDACConnection.SetCharset(const Value: string);
+begin
+  fConnection.Options.Charset := Value;
+end;
+
+procedure TDAEIBDACConnection.SetRole(const Value: string);
+begin
+  fConnection.Options.Role := Value;
+end;
+
+procedure TDAEIBDACConnection.SetSQLDialect(Value: integer);
+begin
+  fConnection.SQLDialect := Value;
+end;
+
+{ TDAEIBDACDriver }
+
+function TDAEIBDACDriver.GetConnectionClass: TDAEConnectionClass;
+begin
+  result := TDAEIBDACConnection;
+end;
+
+function TDAEIBDACDriver.GetDescription: string;
+begin
+  result := 'Core Lab IBDAC Driver'{$IFDEF DataAbstract_SchemaModelerOnly} + SchemaModelerOnly{$ENDIF};
+end;
+
+function TDAEIBDACDriver.GetDriverID: string;
+begin
+  result := 'IBDAC';
+end;
+
+procedure TDAEIBDACDriver.OnIBDACTrace(Sender: TObject; Text: string; Flag: TDATraceFlag);
+begin
+  inherited;
+  //  if Assigned(fTraceCallback) then fTraceCallback(Sender, Text, integer(Flag));
+end;
+
+procedure TDAEIBDACDriver.DoSetTraceOptions(TraceActive: boolean; TraceOptions: TDATraceOptions; Callback: TDALogTraceEvent);
+var
+  IBDACopts: TDATraceFlags;
+begin
+  inherited;
+  exit;
+  if TraceActive then begin
+    if (fMonitor = nil) then fMonitor := TIBCSQLMonitor.Create(Self);
+
+    fMonitor.Active := FALSE;
+    fMonitor.OnSQL := OnIBDACTrace;
+
+    IBDACopts := [];
+    if (toPrepare in TraceOptions) then IBDACopts := IBDACopts + [tfQPrepare];
+    if (toExecute in TraceOptions) then IBDACopts := IBDACopts + [tfQExecute];
+    if (toFetch in TraceOptions) then IBDACopts := IBDACopts + [tfQFetch];
+    if (toError in TraceOptions) then IBDACopts := IBDACopts + [tfError];
+    if (toStmt in TraceOptions) then IBDACopts := IBDACopts + [tfStmt];
+    if (toConnect in TraceOptions) then IBDACopts := IBDACopts + [tfConnect];
+    if (toTransact in TraceOptions) then IBDACopts := IBDACopts + [tfTransact];
+    if (toBlob in TraceOptions) then IBDACopts := IBDACopts + [tfBlob];
+    if (toService in TraceOptions) then IBDACopts := IBDACopts + [tfService];
+    if (toMisc in TraceOptions) then IBDACopts := IBDACopts + [tfMisc];
+    if (toParams in TraceOptions) then IBDACopts := IBDACopts + [tfParams];
+
+    fTraceCallBack := Callback;
+
+    fMonitor.TraceFlags := IBDACopts;
+    fMonitor.Active := TRUE;
+  end
+  else begin
+    FreeAndNIL(fMonitor);
+    fTraceCallback := nil;
+  end;
+end;
+
+procedure TDAEIBDACDriver.CustomizeConnectionObject(
+  aConnection: TDAEConnection);
+begin
+  //
+end;
+
+{ TDAEIBDACQuery }
+
+procedure TDAEIBDACQuery.ClearParams;
+begin
+  inherited;
+  TIBCQuery(Dataset).Params.Clear;
+end;
+
+function TDAEIBDACQuery.CreateDataset(aConnection: TDAEConnection): TDataset;
+begin
+  result := TIBCQuery.Create(nil);
+  TIBCQuery(result).FetchAll := True;  //for preventing creating an additional session when you call StartTransaction (an known issue of OLEDB)
+  TIBCQuery(result).Unidirectional := True;
+  TIBCQuery(result).ReadOnly := TRUE;
+  TIBCQuery(result).Connection := TDAEIBDACConnection(aConnection).fConnection;
+end;
+
+function TDAEIBDACQuery.DoExecute: integer;
+begin
+  TIBCQuery(Dataset).ExecSQL;
+  result := TIBCQuery(Dataset).RowsAffected;
+end;
+
+function TDAEIBDACQuery.DoGetRecordCount: integer;
+begin
+  Result := TIBCQuery(Dataset).RecordCount;
+end;
+
+function TDAEIBDACQuery.DoGetSQL: string;
+begin
+  result := TIBCQuery(Dataset).SQL.Text;
+end;
+
+procedure TDAEIBDACQuery.DoPrepare(Value: boolean);
+begin
+  TIBCQuery(Dataset).Prepared := Value;
+end;
+
+procedure TDAEIBDACQuery.DoSetSQL(const Value: string);
+begin
+  TIBCQuery(Dataset).SQL.Text := Value;
+end;
+
+procedure TDAEIBDACQuery.GetParamValues(AParams: TDAParamCollection);
+var
+  I: Integer;
+  lParam: TIBCParam;
+begin
+  for i := 0 to TIBCQuery(DataSet).Params.Count - 1 do begin
+    lParam:=TIBCQuery(DataSet).Params[i];
+    if (lParam.ParamType in [ptOutput, ptInputOutput, ptResult]) then
+      AParams.ParamByName(lParam.Name).Value := lParam.Value;
+  end;
+end;
+
+procedure TDAEIBDACQuery.SetParamValues(AParams: TDAParamCollection);
+begin
+  WriteCrLabsParamValues(AParams, TIBCQuery(Dataset).Params, true);
+end;
+
+{ TDAEIBDACStoredProcedure }
+
+function TDAEIBDACStoredProcedure.CreateDataset(
+  aConnection: TDAEConnection): TDataset;
+begin
+  result := TIBCStoredProc.Create(nil);
+  TIBCStoredProc(result).Connection := TDAEIBDACConnection(aConnection).fConnection;
+end;
+
+function TDAEIBDACStoredProcedure.Execute: integer;
+begin
+  TIBCStoredProc(Dataset).Prepare;
+  SetParamValues(GetParams);
+  Result:=DoExecute;
+  GetParamValues(GetParams);
+end;
+
+
+procedure TDAEIBDACStoredProcedure.GetParamValues(AParams: TDAParamCollection);
+var
+  i: Integer;
+  lParam: TIBCParam;
+begin
+  for i := 0 to TIBCStoredProc(DataSet).Params.Count - 1 do begin
+    lParam:=TIBCStoredProc(DataSet).Params[i];
+    if (lParam.ParamType in [ptOutput, ptInputOutput, ptResult]) then
+      AParams.ParamByName(lParam.Name).Value := lParam.Value;
+  end;
+end;
+
+function TDAEIBDACStoredProcedure.GetStoredProcedureName: string;
+begin
+  result := TIBCStoredProc(Dataset).StoredProcName;
+end;
+
+procedure TDAEIBDACStoredProcedure.SetStoredProcedureName(
+  const Name: string);
+begin
+  TIBCStoredProc(Dataset).StoredProcName := Name;
+end;
+
+procedure TDAEIBDACStoredProcedure.RefreshParams;
+begin
+  TIBCStoredProc(Dataset).Prepare;
+  RefreshParamsStd(TIBCStoredProc(Dataset).Params);
+end;
+
+procedure TDAEIBDACStoredProcedure.SetParamValues(AParams: TDAParamCollection);
+begin
+  WriteCrLabsParamValues(AParams, TIBCStoredProc(Dataset).Params);
+end;
+
+exports
+  GetDriverObject name func_GetDriverObject;
+
+function TDAEIBDACStoredProcedure.DoExecute: Integer;
+begin
+  TIBCStoredProc(Dataset).ExecProc;
+  result := TIBCStoredProc(Dataset).RowsAffected;
+end;
+
+initialization
+  _driver := nil;
+  RegisterDriverProc(GetDriverObject);
+
+finalization
+  UnregisterDriverProc(GetDriverObject);
+  FreeAndNIL(_driver);
+
+end.
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAIBODriver.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAIBODriver.pas
new file mode 100644
index 0000000..cc2d92a
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAIBODriver.pas	
@@ -0,0 +1,530 @@
+unit uDAIBODriver;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Driver Library
+{
+{ compiler: Delphi 6 and up, Kylix 3 and up
+{ platform: Win32, Linux
+{
+{ (c)opyright RemObjects Software. all rights reserved.
+{
+{ Using this code requires a valid license of the Data Abstract
+{ which can be obtained at http://www.remobjects.com.
+{----------------------------------------------------------------------------}
+
+{$IFDEF MSWINDOWS}
+{$I ..\DataAbstract.inc}
+{$ELSE}
+{$I ../DataAbstract.inc}
+{$ENDIF}
+
+{$R DataAbstract_IBODriver_Glyphs.res}
+
+interface
+
+uses DB, Classes, uDAEngine, uDAInterfaces, uDAIBInterfaces, uROClasses,
+  IBODataset, IB_Components, IB_Monitor, uDAUtils;
+
+type
+  { TDAIBODriver }
+  TDAIBODriver = class(TDADriverReference)
+  end;
+
+  { TIBOConnection }
+  TIBOConnection = class(TDAConnectionWrapper)
+  private
+    fDatabase: TIBODatabase;
+
+  protected
+    function GetConnected: Boolean; override;
+    procedure SetConnected(Value: boolean); override;
+
+  public
+    constructor Create(AOwner: TComponent); override;
+    destructor Destroy; override;
+    property Database: TIBODatabase read fDatabase;
+  end;
+
+  { TDAEIBODriver }
+  TDAEIBODriver = class(TDAIBDriver)
+  private
+    fTraceCallback: TDALogTraceEvent;
+    fMonitor: TIB_Monitor;
+    procedure OnIBOTrace(Sender: TObject; const NewString: string);
+  protected
+    function GetConnectionClass: TDAEConnectionClass; override;
+
+    // IDADriver
+    function GetDriverID: string; override;
+    function GetDescription: string; override;
+
+    procedure DoSetTraceOptions(TraceActive: boolean; TraceOptions: TDATraceOptions;
+      Callback: TDALogTraceEvent); override;
+
+  public
+  end;
+
+  { TDAEIBOConnection }
+  TDAEIBOConnection = class(TDAIBConnection, IDAInterbaseConnection, IDAIBTransactionAccess, IDAIBConnectionProperties, IDAUseGenerators,
+      IDAFileBasedDatabase)
+  private
+    fConnection: TIBOConnection;
+    fSQLDialect: integer; // See TDAEIBOConnection.GetSQLDialect for more details
+
+  protected
+
+    // IIBTransactionAccess
+    function GetTransaction: TObject; safecall;
+
+    procedure Commit; safecall;
+    procedure CommitRetaining; safecall;
+    procedure Rollback; safecall;
+    procedure RollbackRetaining; safecall;
+
+    // IIBConnectionProperties
+    function GetRole: string; safecall;
+    procedure SetRole(const Value: string); safecall;
+    function GetSQLDialect: integer; override;safecall;
+    procedure SetSQLDialect(Value: integer); safecall;
+    function GetCharset: string; safecall;
+    procedure SetCharset(const Value: string); safecall;
+
+    // IDAConnection
+    function CreateCustomConnection: TCustomConnection; override;
+
+    function GetDatasetClass: TDAEDatasetClass; override;
+    function GetStoredProcedureClass: TDAEStoredProcedureClass; override;
+
+    procedure DoApplyConnectionString(aConnStrParser: TDAConnectionStringParser;
+      aConnectionObject: TCustomConnection); override;
+
+    function DoBeginTransaction: integer; override;
+    procedure DoCommitTransaction; override;
+    procedure DoRollbackTransaction; override;
+    function DoGetInTransaction: boolean; override;
+  public
+  end;
+
+  { TDAEIBOQuery }
+  TDAEIBOQuery = class(TDAEDataset, IDAMustSetParams)
+  private
+  protected
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+    procedure ClearParams; override;
+    function DoExecute: integer; override;
+    function DoGetSQL: string; override;
+    procedure DoSetSQL(const Value: string); override;
+    procedure DoPrepare(Value: boolean); override;
+    procedure SetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+  public
+  end;
+
+  { TDAEIBOStoredProcedure }
+  TDAEIBOStoredProcedure = class(TDAEStoredProcedure, IDAMustSetParams)
+  private
+
+  protected
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+    procedure RefreshParams; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetStoredProcedureName: string; override;
+    procedure SetStoredProcedureName(const Name: string); override;
+    function DoExecute: integer; override;
+    function Execute: integer; override;
+    procedure SetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  end;
+
+procedure Register;
+
+function GetDriverObject: IDADriver; stdcall;
+
+implementation
+
+uses SysUtils, uDADriverManager, uDARes, uROBinaryHelpers, Variants;
+
+var
+  _driver: TDAEDriver = nil;
+
+procedure Register;
+begin
+  RegisterComponents(DAPalettePageName, [TDAIBODriver]);
+end;
+
+{$IFDEF DataAbstract_SchemaModelerOnly}
+{$INCLUDE ..\DataAbstract_SchemaModelerOnly.inc}
+{$ENDIF DataAbstract_SchemaModelerOnly}
+
+function GetDriverObject: IDADriver;
+begin
+  {$IFDEF DataAbstract_SchemaModelerOnly}
+  if not RunningInSchemaModeler then begin
+    result := nil;
+    exit;
+  end;
+  {$ENDIF}
+  if (_driver = nil) then _driver := TDAEIBODriver.Create(nil);
+  result := _driver;
+end;
+
+
+
+{ TIBOConnection }
+
+constructor TIBOConnection.Create(AOwner: TComponent);
+begin
+  inherited;
+
+  fDatabase := TIBODatabase.Create(Self);
+  fDatabase.LoginPrompt := FALSE;
+end;
+
+destructor TIBOConnection.Destroy;
+begin
+  FreeAndNil(fDatabase);
+  inherited;
+end;
+
+function TIBOConnection.GetConnected: Boolean;
+begin
+  result := fDatabase.Connected
+end;
+
+procedure TIBOConnection.SetConnected(Value: boolean);
+begin
+  if fDatabase <> nil then fDatabase.Connected := Value;
+end;
+
+{ TDAEIBOConnection }
+
+procedure TDAEIBOConnection.DoApplyConnectionString(
+  aConnStrParser: TDAConnectionStringParser; aConnectionObject: TCustomConnection);
+begin
+  inherited;
+
+  with aConnStrParser do begin
+    if (Self.UserID <> '') then
+      fConnection.Database.Username := Self.UserID
+    else
+      fConnection.Database.Username := UserID;
+
+    if (Self.Password <> '') then
+      fConnection.Database.Password := Self.Password
+    else
+      fConnection.Database.Password := Password;
+
+    if (Server <> '') then
+      fConnection.Database.DatabaseName := Server + ':' + Database
+    else
+      fConnection.Database.DatabaseName := Database;
+
+    if AuxParams['Dialect'] <> '' then
+      SetSQLDialect(StrToInt(AuxParams['Dialect']))
+    else if AuxParams['SQLDialect'] <> '' then
+      SetSQLDialect(StrToInt(AuxParams['SQLDialect']));
+
+    if AuxParams['Role'] <> '' then
+      SetRole(AuxParams['Role']);
+
+    if AuxParams['Charset'] <> '' then
+      fConnection.Database.CharSet := AuxParams['Charset'];
+
+  end;
+end;
+
+function TDAEIBOConnection.DoBeginTransaction: integer;
+begin
+  fConnection.Database.DefaultTransaction.StartTransaction;
+  result := -1;
+end;
+
+procedure TDAEIBOConnection.DoCommitTransaction;
+begin
+  fConnection.Database.DefaultTransaction.Commit;
+end;
+
+function TDAEIBOConnection.CreateCustomConnection: TCustomConnection;
+begin
+  fConnection := TIBOConnection.Create(nil);
+  fSQLDialect := fConnection.Database.SQLDialect;
+  result := fConnection;
+end;
+
+function TDAEIBOConnection.GetDatasetClass: TDAEDatasetClass;
+begin
+  result := TDAEIBOQuery
+end;
+
+function TDAEIBOConnection.GetStoredProcedureClass: TDAEStoredProcedureClass;
+begin
+  result := TDAEIBOStoredProcedure
+end;
+
+function TDAEIBOConnection.GetTransaction: TObject;
+begin
+  result := fConnection.Database.DefaultTransaction;
+end;
+
+procedure TDAEIBOConnection.DoRollbackTransaction;
+begin
+  fConnection.Database.DefaultTransaction.Rollback;
+end;
+
+function TDAEIBOConnection.GetRole: string;
+begin
+  result := fConnection.Database.SQLRole
+end;
+
+function TDAEIBOConnection.GetSQLDialect: integer;
+begin
+  // AleF: I modified this because somehow IBO returned 3 even after setting this value to 2 or else.
+  // Somewhere in the IBO code this calue gets reset. This is a work around that basically makes QuoteIdentifier work correctly
+
+  result := fSQLDialect; // fConnection.Database.SQLDialect;
+end;
+
+procedure TDAEIBOConnection.SetSQLDialect(Value: integer);
+begin
+  fSQLDialect := Value;
+  fConnection.Database.SQLDialect := Value;
+end;
+
+procedure TDAEIBOConnection.SetRole(const Value: string);
+begin
+  fConnection.Database.SQLRole := Value
+end;
+
+procedure TDAEIBOConnection.Commit;
+begin
+  fConnection.Database.Commit
+end;
+
+procedure TDAEIBOConnection.CommitRetaining;
+begin
+  fConnection.Database.CommitRetaining
+end;
+
+procedure TDAEIBOConnection.Rollback;
+begin
+  fConnection.Database.Rollback
+end;
+
+procedure TDAEIBOConnection.RollbackRetaining;
+begin
+  fConnection.Database.RollbackRetaining
+end;
+
+function TDAEIBOConnection.DoGetInTransaction: boolean;
+begin
+  result := fConnection.Database.InTransaction
+end;
+
+function TDAEIBOConnection.GetCharset: string;
+begin
+  result := fConnection.Database.CharSet;
+end;
+
+procedure TDAEIBOConnection.SetCharset(const Value: string);
+begin
+  fConnection.Database.CharSet := Value;
+end;
+
+{ TDAEIBODriver }
+
+function TDAEIBODriver.GetConnectionClass: TDAEConnectionClass;
+begin
+  result := TDAEIBOConnection
+end;
+
+function TDAEIBODriver.GetDescription: string;
+begin
+  result := 'Interbase Objects (IBO) Driver'{$IFDEF DataAbstract_SchemaModelerOnly} + SchemaModelerOnly{$ENDIF};
+end;
+
+function TDAEIBODriver.GetDriverID: string;
+begin
+  result := 'IBO';
+end;
+
+procedure TDAEIBODriver.OnIBOTrace(Sender: TObject; const NewString: string);
+begin
+  if Assigned(fTraceCallback) then fTraceCallback(fMonitor, NewString, 0);
+end;
+
+procedure TDAEIBODriver.DoSetTraceOptions(TraceActive: boolean; TraceOptions:
+  TDATraceOptions; Callback: TDALogTraceEvent);
+begin
+  inherited;
+
+  if TraceActive then begin
+    if (fMonitor = nil) then fMonitor := TIB_Monitor.Create(Self);
+
+    fMonitor.Enabled := FALSE;
+    fMonitor.OnMonitorOutputItem := OnIBOTrace;
+    fMonitor.IncludeTimeStamp := True;
+    fMonitor.ItemStart := '';
+    fMonitor.ItemEnd := '';
+    fMonitor.NewLineText := ',';
+
+    FMonitor.MonitorGroups := [];
+    FMonitor.StatementGroups := [];
+
+    if (toPrepare in TraceOptions) then begin
+      FMonitor.MonitorGroups := FMonitor.MonitorGroups + [mgStatement];
+      FMonitor.StatementGroups := FMonitor.StatementGroups + [sgPrepare, sgAllocate, sgStatementInfo, sgDescribe];
+    end;
+
+    if (toExecute in TraceOptions) then begin
+      FMonitor.MonitorGroups := FMonitor.MonitorGroups + [mgStatement];
+      FMonitor.StatementGroups := FMonitor.StatementGroups + [sgExecute];
+    end;
+
+    if (toFetch in TraceOptions) then begin
+      FMonitor.MonitorGroups := FMonitor.MonitorGroups + [mgStatement, mgRow];
+      FMonitor.StatementGroups := FMonitor.StatementGroups + [sgDescribe, sgStatementInfo];
+    end;
+
+    if (toStmt in TraceOptions) then begin
+      FMonitor.MonitorGroups := FMonitor.MonitorGroups + [mgStatement];
+      FMonitor.StatementGroups := FMonitor.StatementGroups + [sgDescribe, sgStatementInfo];
+    end;
+
+    if (toConnect in TraceOptions) then FMonitor.MonitorGroups := FMonitor.MonitorGroups + [mgConnection];
+    if (toTransact in TraceOptions) then FMonitor.MonitorGroups := FMonitor.MonitorGroups + [mgtransaction];
+
+    if (toBlob in TraceOptions) then FMonitor.MonitorGroups := FMonitor.MonitorGroups + [mgBlob];
+
+    if (toMisc in TraceOptions) then begin
+      FMonitor.MonitorGroups := FMonitor.MonitorGroups + [mgBlob, mgArray, mgClientTrace];
+      FMonitor.StatementGroups := FMonitor.StatementGroups + [sgStatementInfo, sgServerCursor, sgServerCursor];
+    end;
+
+    fTraceCallBack := Callback;
+
+    fMonitor.Enabled := TRUE;
+  end
+  else begin
+    FreeAndNIL(fMonitor);
+    fTraceCallback := nil;
+  end;
+end;
+
+{ TDAEIBOQuery }
+
+procedure TDAEIBOQuery.ClearParams;
+begin
+  inherited;
+  TIBOQuery(Dataset).Params.Clear;
+end;
+
+function TDAEIBOQuery.CreateDataset(aConnection: TDAEConnection): TDataset;
+begin
+  result := TIBOQuery.Create(nil);
+  TIBOQuery(result).IB_Connection := TDAEIBOConnection(aConnection).fConnection.Database;
+  TIBOQuery(result).AutoFetchAll := TRUE;
+  TIBOQuery(result).RecordCountAccurate := TRUE;
+end;
+
+function TDAEIBOQuery.DoExecute: integer;
+begin
+  TIBOQuery(Dataset).ExecSQL;
+  result := TIBOQuery(Dataset).RowsAffected;
+end;
+
+function TDAEIBOQuery.DoGetSQL: string;
+begin
+  result := TIBOQuery(Dataset).SQL.Text
+end;
+
+procedure TDAEIBOQuery.DoPrepare(Value: boolean);
+begin
+  TIBOQuery(Dataset).Prepared := Value;
+end;
+
+procedure TDAEIBOQuery.DoSetSQL(const Value: string);
+begin
+  TIBOQuery(Dataset).SQL.Text := Value;
+end;
+
+procedure TDAEIBOQuery.GetParamValues(AParams: TDAParamCollection);
+begin
+  GetParamValuesStd(AParams, TIBOQuery(Dataset).Params);
+end;
+
+procedure TDAEIBOQuery.SetParamValues(AParams: TDAParamCollection);
+var i: Integer;
+begin
+  for i := 0 to AParams.Count - 1 do
+    if (VarType(AParams[i].Value) = varOleStr) and (AParams[i].Value = '') then
+      AParams[i].Value := Unassigned;
+  SetParamValuesStd(AParams, TIBOQuery(Dataset).Params);
+end;
+
+{ TDAEIBOStoredProcedure }
+
+function TDAEIBOStoredProcedure.CreateDataset(
+  aConnection: TDAEConnection): TDataset;
+begin
+  result := TIBOStoredProc.Create(nil);
+  TIBOStoredProc(result).IB_Connection := TDAEIBOConnection(aConnection).fConnection.Database;
+end;
+
+function TDAEIBOStoredProcedure.Execute: integer;
+begin
+  with TIBOStoredProc(Dataset) do begin
+    Unprepare;
+    Prepare;
+  end;
+
+  SetParamValues(GetParams);
+  Result := DoExecute;
+  GetParamValues(GetParams);
+end;
+
+function TDAEIBOStoredProcedure.GetStoredProcedureName: string;
+begin
+  result := TIBOStoredProc(Dataset).StoredProcName;
+end;
+
+procedure TDAEIBOStoredProcedure.SetStoredProcedureName(
+  const Name: string);
+begin
+  TIBOStoredProc(Dataset).StoredProcName := Name;
+end;
+
+procedure TDAEIBOStoredProcedure.RefreshParams;
+begin
+  // Apparently a bug in IBO requires to do so... Automatic gathering only works at runtime
+  TIBOStoredProc(Dataset).Prepare;
+  RefreshParamsStd(TIBOStoredProc(Dataset).Params);
+end;
+
+procedure TDAEIBOStoredProcedure.SetParamValues(AParams: TDAParamCollection);
+begin
+  SetParamValuesStd(AParams, TIBOStoredProc(Dataset).Params);
+end;
+
+procedure TDAEIBOStoredProcedure.GetParamValues(AParams: TDAParamCollection);
+begin
+  GetParamValuesStd(AParams, TIBOStoredProc(Dataset).Params);
+end;
+
+exports
+  GetDriverObject name func_GetDriverObject;
+
+function TDAEIBOStoredProcedure.DoExecute: integer;
+begin
+  TIBOStoredProc(Dataset).ExecProc;
+  result := TIBOStoredProc(Dataset).RowsAffected;
+end;
+
+initialization
+  _driver := nil;
+  RegisterDriverProc(GetDriverObject);
+
+finalization
+  UnregisterDriverProc(GetDriverObject);
+  FreeAndNIL(_driver);
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAIBXDriver.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAIBXDriver.pas
new file mode 100644
index 0000000..91693b6
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAIBXDriver.pas	
@@ -0,0 +1,495 @@
+unit uDAIBXDriver;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Driver Library
+{
+{ compiler: Delphi 6 and up
+{ platform: Win32
+{
+{ (c)opyright RemObjects Software. all rights reserved.
+{
+{ Using this code requires a valid license of the Data Abstract
+{ which can be obtained at http://www.remobjects.com.
+{----------------------------------------------------------------------------}
+
+{$IFDEF MSWINDOWS}
+{$I ..\DataAbstract.inc}
+{$ELSE}
+{$I ../DataAbstract.inc}
+{$ENDIF}
+
+{$R DataAbstract_IBXDriver_Glyphs.res}
+
+interface
+
+uses
+  Classes, DB, uDAEngine, uDAInterfaces, uDAIBInterfaces, IBDatabase,
+  uROClasses, IBQuery, IBStoredProc, IBSQLMonitor, IB, uDAUtils;
+
+type
+  { TDAIBXDriver }
+  TDAIBXDriver = class(TDADriverReference)
+  end;
+
+  { TIBXConnection }
+  TIBXConnection = class(TDAConnectionWrapper)
+  private
+    fDatabase: TIBDatabase;
+    fTransaction: TIBTransaction;
+
+  protected
+    function GetConnected: Boolean; override;
+    procedure SetConnected(Value: boolean); override;
+
+  public
+    constructor Create(AOwner: TComponent); override;
+
+    property Database: TIBDatabase read fDatabase;
+    property Transaction: TIBTransaction read fTransaction;
+  end;
+
+  { TDAEIBXDriver }
+  TDAEIBXDriver = class(TDAIBDriver)
+  private
+    fIBTraceOptions: TTraceFlags;
+    fTraceCallback: TDALogTraceEvent;
+    fMonitor: TIBSQLMonitor;
+
+    procedure OnIBXTrace(EventText: string; EventTime: TDateTime);
+  protected
+    function GetConnectionClass: TDAEConnectionClass; override;
+    procedure CustomizeConnectionObject(aConnection: TDAEConnection); override;
+    procedure DoSetTraceOptions(TraceActive: boolean; TraceOptions: TDATraceOptions; Callback: TDALogTraceEvent); override;
+
+    // IDADriver
+    function GetDriverID: string; override;
+    function GetDescription: string; override;
+  public
+  end;
+
+  { TDAEIBXConnection }
+  TDAEIBXConnection = class(TDAIBConnection, IDAInterbaseConnection, IDAIBTransactionAccess, IDAIBConnectionProperties, IDAUseGenerators, IDAFileBasedDatabase)
+  private
+    fConnection: TIBXConnection;
+
+  protected
+    // IIBTransactionAccess
+    function GetTransaction: TObject; safecall;
+
+    procedure Commit; safecall;
+    procedure CommitRetaining; safecall;
+    procedure Rollback; safecall;
+    procedure RollbackRetaining; safecall;
+
+    // IIBConnectionProperties
+    function GetRole: string; safecall;
+    procedure SetRole(const Value: string); safecall;
+    function GetSQLDialect: integer; override;safecall; 
+    procedure SetSQLDialect(Value: integer); safecall;
+    function GetCharset: string; safecall;
+    procedure SetCharset(const Value: string); safecall;
+
+
+    // IDAConnection
+    function CreateCustomConnection: TCustomConnection; override;
+
+    function GetDatasetClass: TDAEDatasetClass; override;
+    function GetStoredProcedureClass: TDAEStoredProcedureClass; override;
+
+    procedure DoApplyConnectionString(aConnStrParser: TDAConnectionStringParser;
+      aConnectionObject: TCustomConnection); override;
+
+    function DoBeginTransaction: integer; override;
+    procedure DoCommitTransaction; override;
+    procedure DoRollbackTransaction; override;
+    function DoGetInTransaction: boolean; override;
+
+  end;
+
+  { TDAEIBXQuery }
+  TDAEIBXQuery = class(TDAEDataset,IDAMustSetParams)
+
+  protected
+    function DoGetRecordCount: integer; override;
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+    procedure ClearParams; override;
+    function DoExecute: integer; override;
+    function DoGetSQL: string; override;
+    procedure DoSetSQL(const Value: string); override;
+    procedure DoPrepare(Value: boolean); override;
+    procedure SetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  public
+  end;
+
+  { TDAEIBXStoredProcedure }
+  TDAEIBXStoredProcedure = class(TDAEStoredProcedure, IDAMustSetParams)
+  protected
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+
+    procedure RefreshParams; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetStoredProcedureName: string; override;
+    procedure SetStoredProcedureName(const Name: string); override;
+    function DoExecute: integer; override;
+    function Execute: integer; override;
+    procedure SetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  end;
+
+procedure Register;
+
+function GetDriverObject: IDADriver; stdcall;
+
+implementation
+
+uses SysUtils, uDADriverManager, uDARes, IBCustomDataSet, IBSQL,uROBinaryHelpers;
+
+var
+  _driver: TDAEDriver = nil;
+
+procedure Register;
+begin
+  RegisterComponents(DAPalettePageName, [TDAIBXDriver]);
+end;
+
+function GetDriverObject: IDADriver;
+begin
+  if (_driver = nil) then _driver := TDAEIBXDriver.Create(nil);
+  result := _driver;
+end;
+
+{ TIBXConnection }
+
+constructor TIBXConnection.Create(AOwner: TComponent);
+begin
+  inherited;
+
+  fDatabase := TIBDatabase.Create(Self);
+  fTransaction := TIBTransaction.Create(Self);
+  fTransaction.AutoStopAction := saNone;
+  //fTransaction.AutoStopAction := saCommit;
+  // ^ new per recommendation from Andy Gibson, to fix the "Transaction in progress" error.
+
+  fDatabase.LoginPrompt := FALSE;
+  fDatabase.DefaultTransaction := fTransaction;
+end;
+
+function TIBXConnection.GetConnected: Boolean;
+begin
+  result := fDatabase.Connected
+end;
+
+procedure TIBXConnection.SetConnected(Value: boolean);
+begin
+  // This first check is required.
+  // I think there's a bug in the IBX destroying sequence and the notification. TCustomConnection gets to this point *after*
+  // the owned components are destroyed. Only happens with IBX...
+
+  if (csDestroying in ComponentState) then Exit;
+  fDatabase.Connected := Value
+end;
+
+{ TDAEIBXConnection }
+
+procedure TDAEIBXConnection.DoApplyConnectionString(
+  aConnStrParser: TDAConnectionStringParser; aConnectionObject: TCustomConnection);
+begin
+  inherited;
+
+  with aConnStrParser do begin
+    if (Self.UserID <> '') then
+      fConnection.Database.Params.Add('user_name=' + Self.UserID)
+    else
+      fConnection.Database.Params.Add('user_name=' + UserID);
+
+    if (Self.Password <> '') then
+      fConnection.Database.Params.Add('password=' + Self.Password)
+    else
+      fConnection.Database.Params.Add('password=' + Password);
+
+    if Server <> '' then { Change: Aleksander Oven, 27. july 2003 }
+      fConnection.Database.DatabaseName := Server + ':' + Database
+    else
+      fConnection.Database.DatabaseName := Database;
+
+    if AuxParams['Dialect'] <> '' then
+      SetSQLDialect(StrToInt(AuxParams['Dialect']))
+    else if AuxParams['SQLDialect'] <> '' then
+      SetSQLDialect(StrToInt(AuxParams['SQLDialect']));
+
+    if AuxParams['Role'] <> '' then
+      SetRole(AuxParams['Role']);
+
+    if AuxParams['Charset'] <> '' then
+      SetCharset(AuxParams['Charset']);
+
+  end;
+end;
+
+function TDAEIBXConnection.DoBeginTransaction: integer;
+begin
+  result := -1;
+  fConnection.Database.DefaultTransaction.StartTransaction;
+end;
+
+procedure TDAEIBXConnection.DoCommitTransaction;
+begin
+  fConnection.Database.DefaultTransaction.Commit;
+end;
+
+function TDAEIBXConnection.CreateCustomConnection: TCustomConnection;
+begin
+  fConnection := TIBXConnection.Create(nil);
+  result := fConnection;
+end;
+
+function TDAEIBXConnection.GetDatasetClass: TDAEDatasetClass;
+begin
+  result := TDAEIBXQuery
+end;
+
+function TDAEIBXConnection.GetStoredProcedureClass: TDAEStoredProcedureClass;
+begin
+  result := TDAEIBXStoredProcedure
+end;
+
+function TDAEIBXConnection.GetTransaction: TObject;
+begin
+  result := fConnection.fTransaction;
+end;
+
+procedure TDAEIBXConnection.DoRollbackTransaction;
+begin
+  fConnection.Database.DefaultTransaction.Rollback;
+end;
+
+function TDAEIBXConnection.GetRole: string;
+begin
+  result := fConnection.Database.Params.Values['sql_role_name']
+end;
+
+function TDAEIBXConnection.GetSQLDialect: integer;
+begin
+  result := fConnection.Database.SQLDialect
+end;
+
+function TDAEIBXConnection.GetCharset: string;
+begin
+  result := fConnection.Database.Params.Values['lc_ctype']
+end;
+
+procedure TDAEIBXConnection.SetRole(const Value: string);
+begin
+  fConnection.Database.Params.Values['sql_role_name'] := Value
+end;
+
+procedure TDAEIBXConnection.SetSQLDialect(Value: integer);
+begin
+  fConnection.Database.SQLDialect := Value
+end;
+
+procedure TDAEIBXConnection.SetCharset(const Value: string);
+begin
+  fConnection.Database.Params.Values['lc_ctype'] := Value;
+end;
+
+procedure TDAEIBXConnection.Commit;
+begin
+  fConnection.fTransaction.Commit
+end;
+
+procedure TDAEIBXConnection.CommitRetaining;
+begin
+  fConnection.fTransaction.CommitRetaining
+end;
+
+procedure TDAEIBXConnection.Rollback;
+begin
+  fConnection.fTransaction.Rollback
+end;
+
+procedure TDAEIBXConnection.RollbackRetaining;
+begin
+  fConnection.fTransaction.RollbackRetaining
+end;
+
+function TDAEIBXConnection.DoGetInTransaction: boolean;
+begin
+  result := fConnection.fTransaction.InTransaction
+end;
+
+{ TDAEIBXDriver }
+
+procedure TDAEIBXDriver.CustomizeConnectionObject(aConnection: TDAEConnection);
+begin
+  TDAEIBXConnection(aConnection).fConnection.Database.TraceFlags := fIBTraceOptions;
+end;
+
+function TDAEIBXDriver.GetConnectionClass: TDAEConnectionClass;
+begin
+  result := TDAEIBXConnection;
+end;
+
+function TDAEIBXDriver.GetDescription: string;
+begin
+  result := 'Borland Interbase Express Driver';
+end;
+
+function TDAEIBXDriver.GetDriverID: string;
+begin
+  result := 'IBX';
+end;
+
+procedure TDAEIBXDriver.OnIBXTrace(EventText: string; EventTime: TDateTime);
+begin
+  if Assigned(fTraceCallback) then fTraceCallback(fMonitor, EventText, 0);
+end;
+
+procedure TDAEIBXDriver.DoSetTraceOptions(TraceActive: boolean; TraceOptions: TDATraceOptions; Callback: TDALogTraceEvent);
+begin
+  inherited;
+
+  if TraceActive then begin
+    if (fMonitor = nil) then fMonitor := TIBSQLMonitor.Create(Self);
+
+    fMonitor.Enabled := FALSE;
+    fMonitor.OnSQL := OnIBXTrace;
+
+    fIBTraceOptions := [];
+    if (toPrepare in TraceOptions) then fIBTraceOptions := fIBTraceOptions + [tfQPrepare];
+    if (toExecute in TraceOptions) then fIBTraceOptions := fIBTraceOptions + [tfQExecute];
+    if (toFetch in TraceOptions) then fIBTraceOptions := fIBTraceOptions + [tfQFetch];
+    if (toError in TraceOptions) then fIBTraceOptions := fIBTraceOptions + [tfError];
+    if (toStmt in TraceOptions) then fIBTraceOptions := fIBTraceOptions + [tfStmt];
+    if (toConnect in TraceOptions) then fIBTraceOptions := fIBTraceOptions + [tfConnect];
+    if (toTransact in TraceOptions) then fIBTraceOptions := fIBTraceOptions + [tfTransact];
+    if (toBlob in TraceOptions) then fIBTraceOptions := fIBTraceOptions + [tfBlob];
+    if (toService in TraceOptions) then fIBTraceOptions := fIBTraceOptions + [tfService];
+    if (toMisc in TraceOptions) then fIBTraceOptions := fIBTraceOptions + [tfMisc];
+
+    fTraceCallBack := Callback;
+
+    fMonitor.TraceFlags := fIBTraceOptions;
+    fMonitor.Enabled := TRUE;
+  end
+  else begin
+    FreeAndNIL(fMonitor);
+    fTraceCallback := nil;
+  end;
+end;
+
+{ TDAEIBXQuery }
+
+procedure TDAEIBXQuery.ClearParams;
+begin
+  inherited;
+  TIBQuery(Dataset).Params.Clear;
+end;
+
+function TDAEIBXQuery.CreateDataset(aConnection: TDAEConnection): TDataset;
+begin
+  result := TIBQuery.Create(nil);
+  TIBQuery(result).UniDirectional := true;
+  TIBQuery(result).Database := TDAEIBXConnection(aConnection).fConnection.Database;
+end;
+
+function TDAEIBXQuery.DoExecute: integer;
+begin
+  TIBQuery(Dataset).ExecSQL;
+  result := TIBQuery(Dataset).RowsAffected;
+end;
+
+function TDAEIBXQuery.DoGetRecordCount: integer;
+begin
+  TIBQuery(Dataset).FetchAll;
+  Result := inherited DoGetRecordCount;
+end;
+
+function TDAEIBXQuery.DoGetSQL: string;
+begin
+  result := TIBQuery(Dataset).SQL.Text
+end;
+
+procedure TDAEIBXQuery.DoPrepare(Value: boolean);
+begin
+  TIBQuery(Dataset).Prepared := Value
+end;
+
+procedure TDAEIBXQuery.DoSetSQL(const Value: string);
+begin
+  TIBQuery(Dataset).SQL.Text := Value;
+end;
+
+
+procedure TDAEIBXQuery.GetParamValues(AParams: TDAParamCollection);
+begin
+  GetParamValuesStd(AParams,TIBQuery(Dataset).Params);
+end;
+
+procedure TDAEIBXQuery.SetParamValues(AParams: TDAParamCollection);
+begin
+  SetParamValuesStd(AParams,TIBQuery(Dataset).Params);
+end;
+
+{ TDAEIBXStoredProcedure }
+
+function TDAEIBXStoredProcedure.CreateDataset(
+  aConnection: TDAEConnection): TDataset;
+begin
+  result := TIBStoredProc.Create(nil);
+  TIBStoredProc(result).Database := TDAEIBXConnection(aConnection).fConnection.Database;
+end;
+
+function TDAEIBXStoredProcedure.Execute: integer;
+begin
+  SetParamValues(GetParams);
+  Result:=DoExecute;
+  GetParamValues(GetParams);
+end;
+
+procedure TDAEIBXStoredProcedure.SetParamValues(AParams: TDAParamCollection);
+begin
+  SetParamValuesStd(AParams,TIBStoredProc(Dataset).Params);
+end;
+
+procedure TDAEIBXStoredProcedure.GetParamValues(AParams: TDAParamCollection);
+begin
+  GetParamValuesStd(AParams,TIBStoredProc(Dataset).Params);
+end;
+
+function TDAEIBXStoredProcedure.GetStoredProcedureName: string;
+begin
+  result := TIBStoredProc(Dataset).StoredProcName
+end;
+
+procedure TDAEIBXStoredProcedure.SetStoredProcedureName(
+  const Name: string);
+begin
+  TIBStoredProc(Dataset).StoredProcName := Name;
+end;
+
+procedure TDAEIBXStoredProcedure.RefreshParams;
+begin
+  // Apparently a bug in IBX requires to do so... Automatic gathering only works at runtime
+  TIBStoredProc(Dataset).Prepare;
+  RefreshParamsStd(TIBStoredProc(Dataset).Params);
+end;
+
+exports
+  GetDriverObject name func_GetDriverObject;
+
+function TDAEIBXStoredProcedure.DoExecute: integer;
+begin
+  TIBStoredProc(Dataset).ExecProc;
+  result := TIBStoredProc(Dataset).RowsAffected;
+end;
+
+initialization
+  _driver := nil;
+  RegisterDriverProc(GetDriverObject);
+
+finalization
+  UnregisterDriverProc(GetDriverObject);
+  FreeAndNIL(_driver);
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAMyDACDriver.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAMyDACDriver.pas
new file mode 100644
index 0000000..5f34ca3
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAMyDACDriver.pas	
@@ -0,0 +1,543 @@
+unit uDAMyDACDriver;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Driver Library
+{
+{ compiler: Delphi 6 and up, Kylix 3 and up
+{ platform: Win32, Linux
+{
+{ (c)opyright RemObjects Software. all rights reserved.
+{
+{ Using this code requires a valid license of the Data Abstract
+{ which can be obtained at http://www.remobjects.com.
+{----------------------------------------------------------------------------}
+
+{$IFDEF MSWINDOWS}
+{$I ..\DataAbstract.inc}
+{$ELSE}
+{$I ../DataAbstract.inc}
+{$ENDIF}
+
+{$R DataAbstract_MyDACDriver_Glyphs.res}
+{.$DEFINE ENABLE_SQLMonitor}
+{.$DEFINE MYSQL4Compatible}
+
+interface
+
+uses DB, Classes, uDAEngine, uDAInterfaces, {uDAADOInterfaces,} uROClasses, DBAccess, MyAccess,
+  {$IFDEF ENABLE_SQLMonitor}DASQLMonitor, MySQLMonitor,{$ENDIF ENABLE_SQLMonitor} uROBinaryHelpers, uDAUtils, uDAMySQLInterfaces;
+
+type { TDAMyDACDriver }
+  TDAMyDACDriver = class(TDADriverReference)
+  end;
+
+     { TDAEADODriver }
+  TDAEADODriver = class(TDAMySQLDriver)
+  private
+    {$IFDEF ENABLE_SQLMonitor}
+    fMonitor: TMySQLMonitor;
+    fTraceCallBack: TDALogTraceEvent;
+
+    procedure OnMyDACTrace(Sender: TObject; Text: string; Flag: TDATraceFlag);
+    {$ENDIF ENABLE_SQLMonitor}
+  protected
+    function GetConnectionClass: TDAEConnectionClass; override;
+    {$IFDEF ENABLE_SQLMonitor}
+    procedure DoSetTraceOptions(TraceActive: boolean; TraceOptions: TDATraceOptions; Callback: TDALogTraceEvent); override;
+    {$ENDIF ENABLE_SQLMonitor}
+       // IDADriver
+    function GetDriverID: string; override; safecall;
+    function GetDescription: string; override; safecall;
+    function GetDefaultCustomParameters: string; override; safecall;
+    procedure GetAuxParams(const AuxDriver: string; out List: IROStrings); override;
+  end;
+
+     { TDAEMyConnection }
+  TDAEMyConnection = class(TDAMySQLConnection, IDAMySQLConnection,IDACanQueryDatabaseNames)
+  private
+    function GetMyConnection: TMyConnection;
+
+  protected
+    function GetTableSchema: string; override;
+    function useUnicode:Boolean; override;
+
+    function CreateCustomConnection: TCustomConnection; override;
+
+    function GetDatasetClass: TDAEDatasetClass; override;
+    function GetStoredProcedureClass: TDAEStoredProcedureClass; override;
+
+    procedure DoApplyConnectionString(aConnStrParser: TDAConnectionStringParser;
+      aConnectionObject: TCustomConnection); override;
+
+    function DoBeginTransaction: integer; override;
+    procedure DoCommitTransaction; override;
+    procedure DoRollbackTransaction; override;
+    function DoGetInTransaction: boolean; override;
+    procedure DoGetTableNames(out List: IROStrings); override;
+    procedure DoGetViewNames(out List: IROStrings); override;
+    procedure DoGetStoredProcedureNames(out List: IROStrings); override;
+    procedure DoGetForeignKeys(out ForeignKeys: TDADriverForeignKeyCollection); override;
+    procedure DoGetStoredProcedureParams(const aStoredProcedureName: string; out Params: TDAParamCollection); override;
+    function GetDatabaseNames: IROStrings;
+    procedure DoGetTableFields(const aTableName: string; out Fields: TDAFieldCollection); override;
+    property MyConnection: TMyConnection read GetMyConnection;
+  public
+  end;
+
+     { TDAEMyQuery }
+  TDAEMyQuery = class(TDAEDataset, IDAMustSetParams)
+  private
+
+  protected
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+    procedure ClearParams; override;
+    function DoExecute: integer; override;
+    function DoGetSQL: string; override;
+    procedure DoSetSQL(const Value: string); override;
+    procedure DoPrepare(Value: boolean); override;
+
+       // IDAMustSetParams
+    procedure SetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+  public
+  end;
+
+     { TDAEADOStoredProcedure }
+  TDAEADOStoredProcedure = class(TDAEStoredProcedure, IDAMustSetParams)
+  protected
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+
+    function GetStoredProcedureName: string; override;
+    procedure SetStoredProcedureName(const Name: string); override;
+    function DoExecute: integer; override;
+    function Execute: integer; override;
+    procedure RefreshParams; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+       // IDAMustSetParams
+    procedure SetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  end;
+
+procedure Register;
+
+function GetDriverObject: IDADriver; stdcall;
+
+implementation
+
+uses
+  SysUtils,Variants,
+  uDADriverManager, uDARes;
+
+var
+  _driver: TDAEDriver = nil;
+
+procedure Register;
+begin
+  RegisterComponents(DAPalettePageName, [TDAMyDACDriver]);
+end;
+
+{$IFDEF DataAbstract_SchemaModelerOnly}
+{$INCLUDE ..\DataAbstract_SchemaModelerOnly.inc}
+{$ENDIF DataAbstract_SchemaModelerOnly}
+
+function GetDriverObject: IDADriver;
+begin
+  {$IFDEF DataAbstract_SchemaModelerOnly}
+  if not RunningInSchemaModeler then begin
+    result := nil;
+    exit;
+  end;
+  {$ENDIF}
+  if (_driver = nil) then _driver := TDAEADODriver.Create(nil);
+  result := _driver;
+end;
+
+{$IFDEF LATEST_MyDAC}
+{$I uDACRLabsUtils.inc}
+{$ENDIF LATEST_MyDAC}
+
+
+{$I uDACRLabsUtils.inc}
+{ TDAEMyConnection }
+
+function TDAEMyConnection.DoBeginTransaction: integer;
+begin
+  MyConnection.StartTransaction;
+  result := 0;
+end;
+
+procedure TDAEMyConnection.DoCommitTransaction;
+begin
+  MyConnection.Commit;
+end;
+
+function TDAEMyConnection.GetMyConnection: TMyConnection;
+begin
+  result := TMyConnection(inherited ConnectionObject);
+end;
+
+function TDAEMyConnection.CreateCustomConnection: TCustomConnection;
+begin
+  result := TMyConnection.Create(nil);
+  TMyConnection(result).LoginPrompt := FALSE;
+end;
+
+function TDAEMyConnection.GetDatasetClass: TDAEDatasetClass;
+begin
+  result := TDAEMyQuery;
+end;
+
+function TDAEMyConnection.GetStoredProcedureClass: TDAEStoredProcedureClass;
+begin
+  result := TDAEADOStoredProcedure;
+end;
+
+procedure TDAEMyConnection.DoGetStoredProcedureNames(out List: IROStrings);
+begin
+  {$IFDEF MYSQL4Compatible}
+  List := TROStrings.Create;
+  MyConnection.GetStoredProcNames(List.Strings);
+  {$ELSE}
+  inherited DoGetStoredProcedureNames(List);
+  {$ENDIF}
+end;
+
+procedure TDAEMyConnection.DoGetTableNames(out List: IROStrings);
+begin
+  {$IFDEF MYSQL4Compatible}
+  List := TROStrings.Create;
+  MyConnection.GetTableNames(List.Strings);
+  {$ELSE}
+  inherited DoGetTableNames(List);
+  {$ENDIF MYSQL4Compatible}
+end;
+
+procedure TDAEMyConnection.DoRollbackTransaction;
+begin
+  MyConnection.Rollback;
+end;
+
+function TDAEMyConnection.DoGetInTransaction: boolean;
+begin
+  result := MyConnection.InTransaction
+end;
+
+
+procedure TDAEMyConnection.DoApplyConnectionString(
+  aConnStrParser: TDAConnectionStringParser; aConnectionObject: TCustomConnection);
+const
+  stdMSSQL_ConnectionString = 'User ID=%s;Password=%s;Initial Catalog=%s;Data Source=%s';
+var
+  adoconn: string;
+  i: integer;
+  sName,sValue: string;
+begin
+  inherited;
+
+  with aConnStrParser do begin
+    adoconn := Format(stdMSSQL_ConnectionString, [UserID, Password, Database, Server]);
+
+    MyConnection.Database := Database;
+
+    MyConnection.Server := Server;
+
+    if (Self.UserID <> '') then
+      MyConnection.Username := Self.UserID
+    else
+      MyConnection.Username := UserID;
+
+    if (Self.Password <> '') then
+      MyConnection.Password := Self.Password
+    else
+      MyConnection.Password := Password;
+    for i := 0 to AuxParamsCount -1 do
+    begin
+      sName := AuxParamNames[i];
+      sValue := AuxParams[AuxParamNames[i]];
+      if SameText('Port', sName) then MyConnection.Port:= StrToIntDef(sValue,3306);
+      if SameText('useUnicode', sName) then MyConnection.Options.UseUnicode:=StrToBoolDef(sValue,False);
+    end;
+  end;
+end;
+
+function TDAEMyConnection.GetTableSchema: string;
+begin
+  Result:=MyConnection.Database;
+end;
+
+function TDAEMyConnection.useUnicode: Boolean;
+begin
+  Result:= GetMyConnection.Options.UseUnicode;
+end;
+
+function TDAEMyConnection.GetDatabaseNames: IROStrings;
+begin
+  {$IFDEF MYSQL4Compatible}
+  Result := TROStrings.Create();
+  MyConnection.GetDatabaseNames(Result.Strings);
+  {$ELSE}
+  Result := inherited GetDatabaseNames;
+  {$ENDIF MYSQL4Compatible}
+end;
+
+procedure TDAEMyConnection.DoGetViewNames(out List: IROStrings);
+begin
+  {$IFDEF MYSQL4Compatible}
+  List := TROStrings.Create;
+  GetTablesList(MyConnection, List.Strings);
+  {$ELSE}
+  inherited DoGetViewNames(List);
+  {$ENDIF MYSQL4Compatible}
+end;
+
+procedure TDAEMyConnection.DoGetForeignKeys(
+  out ForeignKeys: TDADriverForeignKeyCollection);
+begin
+  {$IFDEF MYSQL4Compatible}
+  ForeignKeys := TDADriverForeignKeyCollection.Create(nil);
+  {$ELSE}
+  inherited DoGetForeignKeys(ForeignKeys);
+  {$ENDIF MYSQL4Compatible}
+end;
+
+procedure TDAEMyConnection.DoGetStoredProcedureParams(
+  const aStoredProcedureName: string; out Params: TDAParamCollection);
+{$IFDEF MYSQL4Compatible}
+var
+  cmd: IDASQLCommand;
+  {$ENDIF MYSQL4Compatible}
+begin
+  {$IFDEF MYSQL4Compatible}
+  cmd := NewCommand(aStoredProcedureName, stStoredProcedure);
+  cmd.RefreshParams;
+  Params := TDAParamCollection.Create(nil);
+  Params.AssignParamCollection(cmd.Params);
+  {$ELSE}
+  inherited DoGetStoredProcedureParams(aStoredProcedureName, Params);
+  {$ENDIF MYSQL4Compatible}
+end;
+
+procedure TDAEMyConnection.DoGetTableFields(const aTableName: string;
+  out Fields: TDAFieldCollection);
+{$IFDEF MYSQL4Compatible}
+  var
+  qry: IDADataset;
+{$ENDIF}
+begin
+  {$IFDEF MYSQL4Compatible}
+  Fields := TDAFieldCollection.Create(nil);
+  qry := GetDatasetClass.Create(Self);
+  try
+    qry.SQL := 'SELECT * FROM ' + QuoteIdentifierIfNeeded(aTableName) + ' WHERE 1=0';
+    qry.Open;
+    Fields.Assign(qry.Fields);
+  finally
+    qry := nil;
+  end;
+  {$ELSE}
+  inherited DoGetTableFields(aTableName, Fields);
+  {$ENDIF MYSQL4Compatible}
+end;
+
+{ TDAEADODriver }
+
+procedure TDAEADODriver.GetAuxParams(const AuxDriver: string;
+  out List: IROStrings);
+begin
+  inherited;
+  List.Add('useUnicode=(True;False)');
+end;
+
+function TDAEADODriver.GetConnectionClass: TDAEConnectionClass;
+begin
+  result := TDAEMyConnection;
+end;
+
+function TDAEADODriver.GetDefaultCustomParameters: string;
+begin
+  Result:= inherited GetDefaultCustomParameters + 'useUnicode=False;';
+end;
+
+function TDAEADODriver.GetDescription: string;
+begin
+  result := 'Core Lab MyDAC Driver'{$IFDEF DataAbstract_SchemaModelerOnly} + SchemaModelerOnly{$ENDIF};
+end;
+
+function TDAEADODriver.GetDriverID: string;
+begin
+  result := 'MyDAC';
+end;
+
+{$IFDEF ENABLE_SQLMonitor}
+procedure TDAEADODriver.OnMyDACTrace(Sender: TObject; Text: string; Flag: TDATraceFlag);
+begin
+  if Assigned(fTraceCallback) then fTraceCallback(Sender, Text, integer(Flag));
+end;
+
+procedure TDAEADODriver.DoSetTraceOptions(TraceActive: boolean; TraceOptions: TDATraceOptions; Callback: TDALogTraceEvent);
+var
+  MyDACopts: TDATraceFlags;
+begin
+  inherited;
+
+  if TraceActive then begin
+    if (fMonitor = nil) then fMonitor := TMySQLMonitor.Create(Self);
+
+    fMonitor.Active := FALSE;
+    fMonitor.OnSQL := OnMyDACTrace;
+
+    MyDACopts := [];
+    if (toPrepare in TraceOptions) then MyDACopts := MyDACopts + [tfQPrepare];
+    if (toExecute in TraceOptions) then MyDACopts := MyDACopts + [tfQExecute];
+    if (toFetch in TraceOptions) then MyDACopts := MyDACopts + [tfQFetch];
+    if (toError in TraceOptions) then MyDACopts := MyDACopts + [tfError];
+    if (toStmt in TraceOptions) then MyDACopts := MyDACopts + [tfStmt];
+    if (toConnect in TraceOptions) then MyDACopts := MyDACopts + [tfConnect];
+    if (toTransact in TraceOptions) then MyDACopts := MyDACopts + [tfTransact];
+    if (toBlob in TraceOptions) then MyDACopts := MyDACopts + [tfBlob];
+    if (toService in TraceOptions) then MyDACopts := MyDACopts + [tfService];
+    if (toMisc in TraceOptions) then MyDACopts := MyDACopts + [tfMisc];
+    if (toParams in TraceOptions) then MyDACopts := MyDACopts + [tfParams];
+
+    fTraceCallBack := Callback;
+
+    fMonitor.TraceFlags := MyDACopts;
+    fMonitor.Active := TRUE;
+  end
+  else begin
+    FreeAndNIL(fMonitor);
+    fTraceCallback := nil;
+  end;
+end;
+{$ENDIF ENABLE_SQLMonitor}
+
+{ TDAEMyQuery }
+
+function TDAEMyQuery.CreateDataset(aConnection: TDAEConnection): TDataset;
+begin
+  result := TMyQuery.Create(nil);
+  TMyQuery(result).ReadOnly := TRUE;
+  TMyQuery(result).Connection := TDAEMyConnection(aConnection).MyConnection;
+  TMyQuery(result).FetchAll := True;  //for preventing creating an additional session when you call StartTransaction (an known issue of OLEDB)
+
+//  GetLastAutoInc will work in case these options is commented
+//  TMyQuery(result).FetchAll := False;
+//  TMyQuery(result).Unidirectional := True;
+end;
+
+function TDAEMyQuery.DoExecute: integer;
+begin
+  TMyQuery(Dataset).Execute;
+  result := TMyQuery(Dataset).RowsAffected;
+end;
+
+function TDAEMyQuery.DoGetSQL: string;
+begin
+  result := TMyQuery(Dataset).SQL.Text;
+end;
+
+procedure TDAEMyQuery.DoPrepare(Value: boolean);
+begin
+  // Do not do inherited DoPrepare for MySQL.
+  {with TMyQuery(Dataset) do begin
+     if not Options.Direct then Prepared := Value;
+  end;}
+end;
+
+procedure TDAEMyQuery.DoSetSQL(const Value: string);
+begin
+  TMyQuery(Dataset).SQL.Text := Value;
+end;
+
+procedure TDAEMyQuery.SetParamValues(AParams: TDAParamCollection);
+begin
+  WriteCrLabsParamValues(AParams, TMyQuery(Dataset).Params);
+end;
+
+procedure TDAEMyQuery.GetParamValues(AParams: TDAParamCollection);
+var
+  i: integer;
+  par: uDAInterfaces.TDAParam;
+  inpar: TParam;
+begin
+  for i := 0 to (AParams.Count - 1) do begin
+    par := AParams[i];
+    inpar := TMyQuery(Dataset).Params.ParamByName(par.Name);
+    par.Value := inpar.Value;
+  end;
+end;
+
+procedure TDAEMyQuery.ClearParams;
+begin
+  inherited;
+  TMyQuery(Dataset).Params.Clear;
+end;
+
+{ TDAEADOStoredProcedure }
+
+function TDAEADOStoredProcedure.CreateDataset(
+  aConnection: TDAEConnection): TDataset;
+begin
+  result := TMyStoredProc.Create(nil);
+  TMyStoredProc(result).Connection := TDAEMyConnection(aConnection).MyConnection;
+end;
+
+function TDAEADOStoredProcedure.Execute: integer;
+begin
+  SetParamValues(GetParams);
+  Result:= DoExecute;
+  GetParamValues(GetParams);
+end;
+
+function TDAEADOStoredProcedure.GetStoredProcedureName: string;
+begin
+  result := TMyStoredProc(Dataset).StoredProcName;
+end;
+
+procedure TDAEADOStoredProcedure.SetStoredProcedureName(
+  const Name: string);
+begin
+  TMyStoredProc(Dataset).StoredProcName := Name;
+end;
+
+procedure TDAEADOStoredProcedure.SetParamValues(AParams: TDAParamCollection);
+begin
+  WriteCrLabsParamValues(AParams, TMyStoredProc(Dataset).Params);
+end;
+
+procedure TDAEADOStoredProcedure.GetParamValues(AParams: TDAParamCollection);
+var
+  i: Integer;
+  lParam: DBAccess.TDAParam;
+begin
+  for i := 0 to TMyStoredProc(DataSet).Params.Count - 1 do begin
+    lParam:=TMyStoredProc(DataSet).Params[i];
+    if (lParam.ParamType in [ptOutput, ptInputOutput, ptResult]) then
+      Aparams.ParamByName(lParam.Name).Value := lParam.Value;
+  end;
+end;
+
+exports
+  GetDriverObject name func_GetDriverObject;
+
+procedure TDAEADOStoredProcedure.RefreshParams;
+begin
+  RefreshParamsStd(TMyStoredProc(DataSet).Params);
+end;
+
+function TDAEADOStoredProcedure.DoExecute: integer;
+begin
+  TMyStoredProc(Dataset).ExecProc;
+  Result := -1;
+end;
+
+initialization
+  _driver := nil;
+  RegisterDriverProc(GetDriverObject);
+
+finalization
+  UnregisterDriverProc(GetDriverObject);
+  FreeAndNIL(_driver);
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAMySQLDACDriver.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAMySQLDACDriver.pas
new file mode 100644
index 0000000..bc9702a
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAMySQLDACDriver.pas	
@@ -0,0 +1,366 @@
+unit uDAMySQLDACDriver;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Driver Library
+{
+{ compiler: Delphi 6 and up, Kylix 3 and up
+{ platform: Win32, Linux
+{
+{ (c)opyright RemObjects Software. all rights reserved.
+{
+{ Using this code requires a valid license of the Data Abstract
+{ which can be obtained at http://www.remobjects.com.
+{----------------------------------------------------------------------------}
+
+{$IFDEF MSWINDOWS}
+{$I ..\DataAbstract.inc}
+{$ELSE}
+{$I ../DataAbstract.inc}
+{$ENDIF}
+
+{$R DataAbstract_MySQLDACDriver_Glyphs.res}
+
+interface
+
+uses DB, Classes, uDAEngine, uDAInterfaces, uDAADOInterfaces, uROClasses,
+  uROBinaryHelpers, uDAUtils, mySQLAccess, mySQLDbTables, mySQLTypes, uDAMySQLInterfaces;
+
+type { TDAMySQLDACDriver }
+  TDAMySQLDacDriver = class(TDADriverReference)
+  end;
+
+     { TDAEMySQLDacDriver }
+  TDAEMySQLDacDriver = class(TDAMySQLDriver)
+  private
+  protected
+    function GetConnectionClass: TDAEConnectionClass; override;
+
+       // IDADriver
+    function GetDriverID: string; override; safecall;
+    function GetDescription: string; override; safecall;
+  end;
+
+     { TDAEMyConnection }
+  TDAEMySQLDacConnection = class(TDAMySQLConnection, IDACanQueryDatabaseNames,IDAMySQLConnection)
+  private
+    function GetConnection: TmySQLDatabase;
+
+  protected
+    function GetTableSchema: string; override;
+    function CreateCustomConnection: TCustomConnection; override;
+
+    function GetDatasetClass: TDAEDatasetClass; override;
+    function GetStoredProcedureClass: TDAEStoredProcedureClass; override;
+
+    procedure DoApplyConnectionString(aConnStrParser: TDAConnectionStringParser;
+      aConnectionObject: TCustomConnection); override;
+
+    function DoBeginTransaction: integer; override;
+    procedure DoCommitTransaction; override;
+    procedure DoRollbackTransaction; override;
+    function DoGetInTransaction: boolean; override;
+
+    property Connection: TmySQLDatabase read GetConnection;
+  public
+  end;
+
+     { TDAEMySQLDacQuery }
+  TDAEMySQLDacQuery = class(TDAEDataset, IDAMustSetParams)
+  private
+
+  protected
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+    procedure ClearParams; override;
+    function DoExecute: integer; override;
+    function DoGetSQL: string; override;
+    procedure DoSetSQL(const Value: string); override;
+    procedure DoPrepare(Value: boolean); override;
+    procedure SetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+  public
+  end;
+
+     { TDAEMySQLDacStoredProcedure }
+  TDAEMySQLDacStoredProcedure = class(TDAEStoredProcedure, IDAMustSetParams)
+  protected
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+    procedure RefreshParams; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetStoredProcedureName: string; override;
+    procedure SetStoredProcedureName(const Name: string); override;
+    function DoExecute: integer; override;
+    function Execute: integer; override;
+    procedure SetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  end;
+
+procedure Register;
+
+function GetDriverObject: IDADriver; stdcall;
+
+implementation
+
+uses
+  SysUtils,
+  uDADriverManager, uDARes, uDAMacroProcessors;
+
+var
+  _driver: TDAEDriver = nil;
+
+procedure Register;
+begin
+  RegisterComponents(DAPalettePageName, [TDAMySQLDACDriver]);
+end;
+
+{$IFDEF DataAbstract_SchemaModelerOnly}
+{$INCLUDE ..\DataAbstract_SchemaModelerOnly.inc}
+{$ENDIF DataAbstract_SchemaModelerOnly}
+
+function GetDriverObject: IDADriver;
+begin
+  {$IFDEF DataAbstract_SchemaModelerOnly}
+  if not RunningInSchemaModeler then begin
+    result := nil;
+    exit;
+  end;
+  {$ENDIF}
+  if (_driver = nil) then _driver := TDAEMySQLDacDriver.Create(nil);
+  result := _driver;
+end;
+
+{$IFDEF LATEST_MyDAC}
+{$I uDACRLabsUtils.inc}
+{$ENDIF LATEST_MyDAC}
+
+{ TDAEMySQLDacConnection }
+
+function TDAEMySQLDacConnection.DoBeginTransaction: integer;
+begin
+  Connection.StartTransaction;
+  result := 0;
+end;
+
+procedure TDAEMySQLDacConnection.DoCommitTransaction;
+begin
+  Connection.Commit;
+end;
+
+function TDAEMySQLDacConnection.GetConnection: TmySQLDatabase;
+begin
+  result := TmySQLDatabase(inherited ConnectionObject);
+end;
+
+function TDAEMySQLDacConnection.CreateCustomConnection: TCustomConnection;
+begin
+  result := TmySQLDatabase.Create(nil);
+  TmySQLDatabase(result).LoginPrompt := false;
+end;
+
+function TDAEMySQLDacConnection.GetDatasetClass: TDAEDatasetClass;
+begin
+  result := TDAEMySQLDacQuery;
+end;
+
+function TDAEMySQLDacConnection.GetStoredProcedureClass: TDAEStoredProcedureClass;
+begin
+  result := TDAEMySQLDacStoredProcedure;
+end;
+
+
+procedure TDAEMySQLDacConnection.DoRollbackTransaction;
+begin
+  Connection.Rollback;
+end;
+
+function TDAEMySQLDacConnection.DoGetInTransaction: boolean;
+begin
+  result := Connection.InTransaction
+end;
+
+
+
+procedure TDAEMySQLDacConnection.DoApplyConnectionString(
+  aConnStrParser: TDAConnectionStringParser; aConnectionObject: TCustomConnection);
+var
+  i: Integer;
+begin
+  inherited;
+
+  with aConnStrParser do begin
+    Connection.DatabaseName := Database;
+
+    Connection.Host := Server;
+
+    if (Self.UserID <> '') then
+      Connection.Username := Self.UserID
+    else
+      Connection.Username := UserID;
+
+    if (Self.Password <> '') then
+      Connection.UserPassword := Self.Password
+    else
+      Connection.UserPassword := Password;
+    if AuxParams['Port'] <> '' then Connection.Port := StrToIntDef(AuxParams['Port'],3306);
+
+    for i := 0 to AuxParamsCount -1 do
+    begin
+      if SameText(AuxParamNames[i], 'Port') then continue;
+      if AuxParams[AuxParamNames[i]] <> '' then
+        Connection.Params.Add(AuxParamNames[i]+'='+AuxParams[AuxParamNames[i]]);
+    end;
+  end;
+end;
+
+
+function TDAEMySQLDacConnection.GetTableSchema: string;
+begin
+  Result:=Connection.DatabaseName;
+end;
+
+{ TDAEMySQLDacDriver }
+
+
+function TDAEMySQLDacDriver.GetConnectionClass: TDAEConnectionClass;
+begin
+  result := TDAEMySQLDacConnection;
+end;
+
+function TDAEMySQLDacDriver.GetDescription: string;
+begin
+  result := 'MicroOlap DAC for MySQL Driver'{$IFDEF DataAbstract_SchemaModelerOnly} + SchemaModelerOnly{$ENDIF};
+end;
+
+function TDAEMySQLDacDriver.GetDriverID: string;
+begin
+  result := 'MySQLDAC';
+end;
+
+
+{ TDAEMySQLDacQuery }
+
+procedure TDAEMySQLDacQuery.ClearParams;
+begin
+  inherited;
+  TmySQLQuery(Dataset).Params.Clear;
+end;
+
+function TDAEMySQLDacQuery.CreateDataset(aConnection: TDAEConnection): TDataset;
+begin
+  result := TmySQLQuery.Create(nil);
+
+  TmySQLQuery(result).RequestLive := false;
+  TmySQLQuery(result).UniDirectional:=True;
+  TMySqlQuery(result).Database := TDAEMySQLDacConnection(aConnection).Connection;
+end;
+
+function TDAEMySQLDacQuery.DoExecute: integer;
+begin
+  TmySQLQuery(Dataset).ExecSQL;
+  result := TmySQLQuery(Dataset).RowsAffected;
+end;
+
+function TDAEMySQLDacQuery.DoGetSQL: string;
+begin
+  result := TmySQLQuery(Dataset).SQL.Text;
+end;
+
+procedure TDAEMySQLDacQuery.DoPrepare(Value: boolean);
+begin
+  TmySQLQuery(Dataset).Prepared := Value;
+end;
+
+procedure TDAEMySQLDacQuery.DoSetSQL(const Value: string);
+begin
+  TmySQLQuery(Dataset).SQL.Text := Value;
+end;
+
+procedure TDAEMySQLDacQuery.GetParamValues(AParams: TDAParamCollection);
+begin
+  GetParamValuesStd(AParams, TmySQLQuery(Dataset).Params);
+end;
+
+procedure TDAEMySQLDacQuery.SetParamValues(AParams: TDAParamCollection);
+begin
+  SetParamValuesStd(AParams, TmySQLQuery(Dataset).Params);
+end;
+
+
+{ TDAEADOStoredProcedure }
+
+function TDAEMySQLDacStoredProcedure.CreateDataset(
+  aConnection: TDAEConnection): TDataset;
+begin
+  result := TmySQLStoredProc.Create(nil);
+  TmySQLStoredProc(result).Database := TDAEMySQLDacConnection(aConnection).Connection;
+end;
+
+function TDAEMySQLDacStoredProcedure.Execute: integer;
+var
+  i: integer;
+  _params: TDAParamCollection;
+  lParam: TmySQLSPParam;
+begin
+  _params := GetParams;
+
+  with TmySQLStoredProc(Dataset) do begin
+    for i := 0 to (Params.Count-1) do begin
+      lParam:=Params[i];
+      if (lParam.ParamType in [ptInput, ptInputOutput]) then
+        lParam.Value := _params.ParamByName(lParam.Name).Value;
+    end;
+
+    Result:= DoExecute;
+
+    for i := 0 to (Params.Count-1) do begin
+      lParam:=Params[i];
+      if (lParam.ParamType in [ptOutput, ptInputOutput, ptResult]) then
+        _params.ParamByName(lParam.Name).Value := lParam.Value;
+    end;
+  end; 
+end;
+
+function TDAEMySQLDacStoredProcedure.GetStoredProcedureName: string;
+begin
+  Result := TmySQLStoredProc(Dataset).ProcedureName;
+end;
+
+procedure TDAEMySQLDacStoredProcedure.SetStoredProcedureName(
+  const Name: string);
+begin
+  TmySQLStoredProc(Dataset).ProcedureName := Name;
+end;
+
+procedure TDAEMySQLDacStoredProcedure.RefreshParams;
+begin
+  RefreshParamsStd(TmySQLStoredProc(Dataset).Params);
+end;
+
+procedure TDAEMySQLDacStoredProcedure.GetParamValues(
+  AParams: TDAParamCollection);
+begin
+  GetParamValuesStd(AParams, TmySQLStoredProc(Dataset).Params);
+end;
+
+procedure TDAEMySQLDacStoredProcedure.SetParamValues(
+  AParams: TDAParamCollection);
+begin
+  SetParamValuesStd(AParams, TmySQLStoredProc(Dataset).Params);
+end;
+
+exports  GetDriverObject name func_GetDriverObject;
+
+function TDAEMySQLDacStoredProcedure.DoExecute: integer;
+begin
+  TmySQLStoredProc(Dataset).ExecProc;
+  result := -1;
+end;
+
+initialization
+  _driver := nil;
+  RegisterDriverProc(GetDriverObject);
+
+finalization
+  UnregisterDriverProc(GetDriverObject);
+  FreeAndNIL(_driver);
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDANexusDBDriver.dcr b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDANexusDBDriver.dcr
new file mode 100644
index 0000000..52a0cec
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDANexusDBDriver.dcr differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDANexusDBDriver.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDANexusDBDriver.pas
new file mode 100644
index 0000000..80abb7b
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDANexusDBDriver.pas	
@@ -0,0 +1,1146 @@
+unit uDANexusDBDriver;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Driver Library
+{
+{ compiler: Delphi 6 and up
+{ platform: Win32
+{
+{ (c)opyright RemObjects Software. all rights reserved.
+{ (c)opyright Nexus Database Systems Pty. Ltd.
+{
+{ Using this code requires a valid license of the Data Abstract
+{ which can be obtained at http://www.remobjects.com.
+{----------------------------------------------------------------------------}
+
+{$IFDEF MSWINDOWS}
+{$I ..\DataAbstract.inc}
+{$ELSE}
+{$I ../DataAbstract.inc}
+{$ENDIF}
+
+interface
+
+uses
+  Classes,
+  DB,
+
+  uDAEngine,
+  uDAInterfaces,
+  uROClasses,
+
+  nxllMemoryManager,
+  nxllSync,
+  nxllComponent,
+  nxllTransport,
+
+  nxsdServerEngine,
+
+  nxdb,
+
+  {$IFNDEF DataAbstract_NexusDBPack}
+  nxptBasePooledTransport,
+  nxtwWinsockTransport,
+  nxtnNamedPipeTransport,
+
+  nxreRemoteServerEngine,
+  {$ENDIF}
+
+  nxsrSqlEngineBase,
+  nxsrServerEngine,
+
+  nxsqlEngine,
+
+  //nx1xAllEngines,
+  nxseAllEngines, // // NXDB2: Renamed
+  uDAUtils;
+
+type
+  TDANexusDBDriver = class(TDADriverReference)
+  end;
+
+  INexusDBConnection = interface
+    ['{DFF41623-A766-44C0-A61A-CC18FB80CAE3}']
+  end;
+
+  INexusDBDriver = interface
+    ['{CFE4B5BB-3C38-40BF-BE57-5BE3C627A6C3}']
+    procedure RegisterServerEngine(aServerEngine: TnxBaseServerEngine;
+      const aName: string); safecall;
+
+    procedure UnregisterServerEngine(aServerEngine: TnxBaseServerEngine); overload; safecall;
+    procedure UnregisterServerEngine(const aName: string); overload; safecall;
+  end;
+
+  TNexusDBConnection = class;
+
+  TNexusDBBaseEngineContainer = class(TnxObject)
+  protected                                                 {private}
+    becServerName: string;
+
+    becConnectionsHead : TNexusDBConnection;
+    becConnectionsTail : TNexusDBConnection;
+  protected
+    function becGetEngine: TnxBaseServerEngine; virtual; abstract;
+  public
+    constructor Create(aServerName: string);
+    destructor Destroy; override;
+
+    procedure CheckedFree; virtual;
+
+    property Engine: TnxBaseServerEngine
+      read becGetEngine;
+  end;
+
+  TNexusDBConnection = class(TDAConnectionWrapper)
+  protected                                                 {private}
+    conEngineContainer      : TNexusDBBaseEngineContainer;
+    conEngineContainerNext  : TNexusDBConnection;
+    conEngineContainerPrev  : TNexusDBConnection;
+    conEngineContainerAdded : Boolean;
+
+    conSession              : TnxSession;
+    conDatabase             : TnxDatabase;
+
+    procedure conSetEngineContainer(aContainer: TNexusDBBaseEngineContainer);
+  protected
+    function GetConnected: Boolean; override;
+    procedure SetConnected(Value: Boolean); override;
+
+    procedure conAddToEngineContainer;
+    procedure conRemoveFromEngineContainer;
+  public
+    constructor Create(aOwner: TComponent); override;
+    destructor Destroy; override;
+    property EngineContainer: TNexusDBBaseEngineContainer read conEngineContainer write conSetEngineContainer;
+    property Session: TnxSession read conSession;
+    property Database: TnxDatabase read conDatabase;
+  end;
+
+  TDAENexusDBDriver = class(TDAEDriver, INexusDBDriver)
+  protected                                                 {private}
+    nxdEnginesPadlock: TnxPadlock;
+    nxdEngines: TStringList;
+  protected
+    function GetConnectionClass: TDAEConnectionClass; override;
+
+    { IDADriver }
+    function GetDriverID: string; override;
+    function GetDescription: string; override;
+
+    procedure GetAuxParams(const AuxDriver: string; out List: IROStrings); override;
+
+    function GetAvailableDriverOptions: TDAAvailableDriverOptions; override;
+    function GetDefaultCustomParameters: string; override; safecall;
+    { INexusDBDriver }
+    procedure RegisterServerEngine(aServerEngine: TnxBaseServerEngine;const aName: string); safecall;
+
+    procedure UnregisterServerEngine(aServerEngine: TnxBaseServerEngine); overload; safecall;
+    procedure UnregisterServerEngine(const aName: string); overload; safecall;
+    function GetDefaultConnectionType(const AuxDriver: string): string; override; safecall;
+  public
+    constructor Create(aOwner: TComponent); override;
+    destructor Destroy; override;
+  end;
+
+  { TDAENexusDBConnection }
+  TDAENexusDBConnection = class(TDAEConnection, INexusDBConnection)
+  private
+    dacConnection: TNexusDBConnection;
+  protected
+    { IDAConnection }
+    function CreateCustomConnection: TCustomConnection; override;
+    function CreateMacroProcessor: TDASQLMacroProcessor; override;
+
+    function GetDatasetClass: TDAEDatasetClass; override;
+    function GetStoredProcedureClass: TDAEStoredProcedureClass; override;
+    procedure DoApplyConnectionString(aConnStrParser: TDAConnectionStringParser;
+                                      aConnectionObject : TCustomConnection); override;
+    function DoBeginTransaction: Integer; override;
+    procedure DoCommitTransaction; override;
+    procedure DoRollbackTransaction; override;
+    function DoGetInTransaction: Boolean; override;
+
+    procedure DoGetTableNames(out aList: IROStrings); override;
+    procedure DoGetStoredProcedureNames(out List: IROStrings); override;
+    procedure DoGetTableFields(const aTableName : string;
+                                 out aFields    : TDAFieldCollection); override;
+    procedure DoGetForeignKeys(out ForeignKeys: TDADriverForeignKeyCollection); override;
+
+    function DoGetLastAutoInc(const GeneratorName: string): integer; override;
+    function IdentifierNeedsQuoting(const iIdentifier: string): boolean; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  public
+  end;
+
+  { TDAENexusDBQuery }
+  TDAENexusDBQuery = class(TDAEDataset, IDAMustSetParams)
+  private
+  protected
+    function CreateDataset(aConnection: TDAEConnection): TDataSet; override;
+    procedure ClearParams; override;
+    function DoExecute: Integer; override;
+    function DoGetSQL: string; override;
+    procedure DoSetSQL(const Value: string); override;
+    procedure DoPrepare(Value: Boolean); override;
+
+    { IDAMustSetParams }
+    procedure SetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  public
+  end;
+
+    { TDAENexusStoredProcedure }
+  TDAENexusStoredProcedure = class(TDAEStoredProcedure, IDAStoredProcedure, IDAMustSetParams)
+  protected
+    // Internal
+    // function DoGetStoredProcedureName: string; override;
+    // procedure DoSetStoredProcedureName(const Name: string); override;
+
+    // IDAStoredProcedure
+    function GetStoredProcedureName: string; override; safecall;
+    procedure SetStoredProcedureName(const Name: string); override; safecall;
+
+    // procedure PrepareSQLStatement; override;
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+    procedure DoPrepare(Value: boolean); override; safecall;
+    function DoExecute: integer; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function Execute: integer; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure DoSetSQL(const Value: string); override; safecall;
+    function DoGetSQL: string; override; safecall;
+    // function intVCLTypeToDAType(aFieldType: TFieldType): TDADataType;override;
+
+    { IDASQLCommand }
+    procedure RefreshParams; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // function DoGetRecordCount: integer; override;
+    // function DoGetActive: boolean; override;
+    // procedure DoSetActive(Value: boolean); override;
+    // function DoGetBOF: boolean; override;
+    // function DoGetEOF: boolean; override;
+    // procedure DoNext; override;
+    // function DoLocate(const KeyFields: string; const KeyValues: Variant; Options: TLocateOptions): Boolean; override;
+
+    // IDAMustSetParams
+    procedure SetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  end;
+
+procedure Register;
+
+function GetDriverObject: IDADriver; stdcall;
+
+const
+  Nexus_DriverType = 'Nexus';
+implementation
+
+uses
+  SysUtils,
+
+  nxllUtils,nxsdTypes,nxsqlBase,
+
+  uDADriverManager,
+  uDARes,
+  uDAMacroProcessors,
+
+  TypInfo;
+
+const
+  csUrlSeperator              = '://';
+
+  csEmbedded                  = 'embedded';
+  csRegistered                = 'registered';
+  csEmbeddedDefault           = 'embedded://default';
+
+  csAlias                     = 'alias';
+  csPath                      = 'path';
+
+  csNexusDB                   = 'NexusDB';
+  csNexusDBDriver             = 'NexusDB Driver';
+
+resourcestring
+  rsEmbeddedOnly = ' [embedded only]';
+  rsThisDriverOnlySupportsEmbeddedServerEngines = 'This driver only supports embedded server engines. Connections to remote server engines require a full NexusDB license.';
+  rsNoProtocolHasBeenSpecified = 'No protocol has been specified';
+  rsNoServerEngineHasBeenRegisteredAs = 'No Server Engine has been registered as "%s"';
+  rsNoTransportAvailableForProtocol = 'No transport available for protocol "%s"';
+  rsUnknownDatabaseType       = 'Unknown database type "%s"';
+
+var
+  _driver                     : TDAENexusDBDriver = nil;
+
+{===Register===================================================================}
+procedure Register;
+begin
+  RegisterComponents(DAPalettePageName, [TDANexusDBDriver]);
+end;
+{==============================================================================}
+
+
+
+{===GetDriverObject============================================================}
+{$IFDEF DataAbstract_SchemaModelerOnly}{$INCLUDE DataAbstract_SchemaModelerOnly.inc}{$ENDIF DataAbstract_SchemaModelerOnly}
+function GetDriverObject: IDADriver;
+begin
+  {$IFDEF DataAbstract_SchemaModelerOnly}
+  if not RunningInSchemaModeler then begin
+    Result := nil;
+    Exit;
+  end;
+  {$ENDIF}
+  if (_driver = nil) then _driver := TDAENexusDBDriver.Create(nil);
+  Result := _driver;
+end;
+{==============================================================================}
+
+
+
+{===TNexusDBBaseEngineContainer================================================}
+procedure TNexusDBBaseEngineContainer.CheckedFree;
+begin
+  if not Assigned(becConnectionsHead) then
+    Free;
+end;
+{------------------------------------------------------------------------------}
+constructor TNexusDBBaseEngineContainer.Create(aServerName: string);
+begin
+  becServerName := aServerName;
+
+  inherited Create;
+
+  _driver.nxdEnginesPadlock.Lock;
+  try
+    _driver.nxdEngines.AddObject(aServerName, Self);
+  finally
+    _driver.nxdEnginesPadlock.Unlock;
+  end;
+end;
+{------------------------------------------------------------------------------}
+destructor TNexusDBBaseEngineContainer.Destroy;
+var
+  i                           : Integer;
+begin
+  if Assigned(_driver) then begin
+    _driver.nxdEnginesPadlock.Lock;
+    try
+      with _driver.nxdEngines do
+        if Find(becServerName, i) and (Objects[i] = Self) then
+          Delete(i);
+      while Assigned(becConnectionsHead) do try
+        becConnectionsHead.EngineContainer := nil;
+      except end;
+    finally
+      _driver.nxdEnginesPadlock.Unlock;
+    end;
+  end;
+
+  inherited;
+end;
+{==============================================================================}
+
+
+
+{===TNexusDBEmbeddedEngineContainer============================================}
+type
+  TNexusDBEmbeddedEngineContainer = class(TNexusDBBaseEngineContainer)
+  protected                                                 {private}
+    eecServerEngine: TnxServerEngine;
+  protected
+    function becGetEngine: TnxBaseServerEngine; override;
+  public
+    constructor Create(aServerName: string);
+    destructor Destroy; override;
+
+    procedure CheckedFree; override;
+  end;
+function TNexusDBEmbeddedEngineContainer.becGetEngine: TnxBaseServerEngine;
+begin
+  Result := eecServerEngine;
+end;
+{~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~}
+procedure TNexusDBEmbeddedEngineContainer.CheckedFree;
+begin
+  if not SameText(becServerName, csEmbeddedDefault) then
+    inherited;
+end;
+{------------------------------------------------------------------------------}
+constructor TNexusDBEmbeddedEngineContainer.Create(aServerName: string);
+begin
+  eecServerEngine := TnxServerEngine.Create(nil);
+  eecServerEngine.SqlEngine := TnxSqlEngine.Create(eecServerEngine);
+  eecServerEngine.Open;
+
+  inherited Create(aServerName);
+end;
+{------------------------------------------------------------------------------}
+destructor TNexusDBEmbeddedEngineContainer.Destroy;
+begin
+  inherited;
+  FreeAndNil(eecServerEngine);
+end;
+{==============================================================================}
+
+
+
+{$IFNDEF DataAbstract_NexusDBPack}
+{==============================================================================}
+type
+  TNexusDBRemoteEngineContainer = class(TNexusDBBaseEngineContainer)
+  protected                                                 {private}
+    recTransport: TnxBaseTransport;
+    recServerEngine: TnxRemoteServerEngine;
+  protected
+    function becGetEngine: TnxBaseServerEngine; override;
+  public
+    constructor Create(aServerName, aAuxParamsString: string;
+      aTransportClass: TnxBaseTransportClass);
+    destructor Destroy; override;
+  end;
+{~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~}
+function TNexusDBRemoteEngineContainer.becGetEngine: TnxBaseServerEngine;
+begin
+  Result := recServerEngine;
+end;
+{------------------------------------------------------------------------------}
+constructor TNexusDBRemoteEngineContainer.Create(aServerName, aAuxParamsString: string;
+  aTransportClass: TnxBaseTransportClass);
+var
+  S,
+  N,
+  V                           : string;
+  AuxParams                   : IROStrings;
+  i                           : integer;
+
+  procedure SetProperty(Instance: TObject; const Prefix, Name, Value: string);
+  begin
+    if (Pos(Prefix, Name) = 1) then
+    begin
+      SetPropValue(Instance,
+                   Copy(Name, Length(Prefix) + 1, Length(Name)),
+                   Value);
+    end;
+  end;
+
+begin
+  S := aServerName;
+  Delete(S, 1, Pos(csUrlSeperator, S) + 2);
+
+  AuxParams := ListStringElements(aAuxParamsString);
+
+  recTransport := aTransportClass.Create(nil);
+  recTransport.ServerName := S;
+
+  recServerEngine := TnxRemoteServerEngine.Create(nil);
+  recServerEngine.Transport := recTransport;
+
+  for i := 0 to AuxParams.Count-1 do
+  begin
+    N := AuxParams.Names[i];
+    V := AuxParams.Values[AuxParams.Names[i]];
+    SetProperty(recTransport, 'Transport.', N, V);
+    SetProperty(recServerEngine, 'Server.', N, V);
+  end;
+
+  recTransport.Open;
+  recServerEngine.Open;
+
+  inherited Create(aServerName);
+end;
+{------------------------------------------------------------------------------}
+destructor TNexusDBRemoteEngineContainer.Destroy;
+begin
+  inherited;
+  FreeAndNil(recServerEngine);
+  FreeAndNil(recTransport);
+end;
+{==============================================================================}
+{$ENDIF}
+
+
+
+{===TNexusDBRegisteredEngineContainer==========================================}
+type
+  TNexusDBRegisteredEngineContainer = class(TNexusDBBaseEngineContainer)
+  protected                                                 {private}
+    regecServerEngine: TnxBaseServerEngine;
+  protected
+    function becGetEngine: TnxBaseServerEngine; override;
+  public
+    constructor Create(aServerName: string;
+      aServerEngine: TnxBaseServerEngine);
+
+    procedure CheckedFree; override;
+  end;
+{~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~}
+function TNexusDBRegisteredEngineContainer.becGetEngine: TnxBaseServerEngine;
+begin
+  Result := regecServerEngine;
+end;
+{------------------------------------------------------------------------------}
+procedure TNexusDBRegisteredEngineContainer.CheckedFree;
+begin
+  {never}
+end;
+{------------------------------------------------------------------------------}
+constructor TNexusDBRegisteredEngineContainer.Create(aServerName: string;
+  aServerEngine: TnxBaseServerEngine);
+begin
+  regecServerEngine := aServerEngine;
+  inherited Create(aServerName);
+end;
+{==============================================================================}
+
+
+
+{===TNexusDBConnection=========================================================}
+procedure TNexusDBConnection.conAddToEngineContainer;
+begin
+  if conEngineContainerAdded then
+    Exit;
+  if not Assigned(conEngineContainer) then
+    Exit;
+
+  _driver.nxdEnginesPadlock.Lock;
+  try
+    conEngineContainerPrev := conEngineContainer.becConnectionsTail;
+    conEngineContainer.becConnectionsTail := Self;
+    if Assigned(conEngineContainerPrev) then
+      conEngineContainerPrev.conEngineContainerNext := Self;
+    if not Assigned(conEngineContainer.becConnectionsHead) then
+      conEngineContainer.becConnectionsHead := Self;
+  finally
+    _driver.nxdEnginesPadlock.Unlock;
+  end;
+
+  conEngineContainerAdded := True;
+end;
+{------------------------------------------------------------------------------}
+procedure TNexusDBConnection.conRemoveFromEngineContainer;
+begin
+  if not conEngineContainerAdded then
+    Exit;
+
+  _driver.nxdEnginesPadlock.Lock;
+  try
+    if Assigned(conEngineContainerNext) then
+      conEngineContainerNext.conEngineContainerPrev := conEngineContainerPrev
+    else
+      if conEngineContainer.becConnectionsTail = Self then
+        conEngineContainer.becConnectionsTail := conEngineContainerPrev;
+
+    if Assigned(conEngineContainerPrev) then
+      conEngineContainerPrev.conEngineContainerNext := conEngineContainerNext
+    else
+      if conEngineContainer.becConnectionsHead = Self then
+        conEngineContainer.becConnectionsHead := conEngineContainerNext;
+
+    conEngineContainerNext := nil;
+    conEngineContainerPrev := nil;
+
+    conEngineContainer.CheckedFree;
+    conEngineContainer := nil;
+  finally
+    _driver.nxdEnginesPadlock.Unlock;
+  end;
+  conEngineContainerAdded := False;
+end;
+{------------------------------------------------------------------------------}
+procedure TNexusDBConnection.conSetEngineContainer(aContainer: TNexusDBBaseEngineContainer);
+begin
+  if conEngineContainer <> aContainer then begin
+    conSession.Close;
+    conSession.ServerEngine := nil;
+
+    conRemoveFromEngineContainer;
+
+    conEngineContainer := aContainer;
+    if Assigned(conEngineContainer) then
+      conSession.ServerEngine := conEngineContainer.Engine;
+
+    conAddToEngineContainer;
+  end;
+end;
+{------------------------------------------------------------------------------}
+constructor TNexusDBConnection.Create(aOwner: TComponent);
+begin
+  inherited;
+
+  conSession := TnxSession.Create(Self);
+  conDatabase := TnxDatabase.Create(Self);
+  conDatabase.Session := conSession;
+end;
+{------------------------------------------------------------------------------}
+destructor TNexusDBConnection.Destroy;
+begin
+  EngineContainer := nil;
+  inherited;
+end;
+{------------------------------------------------------------------------------}
+function TNexusDBConnection.GetConnected: Boolean;
+begin
+  Result := conDatabase.Connected;
+end;
+{------------------------------------------------------------------------------}
+procedure TNexusDBConnection.SetConnected(Value: Boolean);
+begin
+  if (csDestroying in ComponentState) then Exit;
+
+  try
+    conSession.Active := Value;
+    conDatabase.Connected := Value;
+  except
+    conSession.Active := False;
+    conDatabase.Connected := False;
+    raise;
+  end;
+end;
+{==============================================================================}
+
+
+
+{===TDAENexusDBDriver==========================================================}
+constructor TDAENexusDBDriver.Create(aOwner: TComponent);
+begin
+  inherited;
+  nxdEnginesPadlock := TnxPadlock.Create;
+  nxdEngines := TStringList.Create;
+end;
+{------------------------------------------------------------------------------}
+destructor TDAENexusDBDriver.Destroy;
+var
+  i                           : Integer;
+begin
+  if Assigned(nxdEnginesPadlock) then begin
+    nxdEnginesPadlock.Lock;
+    try
+      if Assigned(nxdEngines) then begin
+        for i := Pred(nxdEngines.Count) downto 0 do
+          nxdEngines.Objects[i].Free;
+        nxdEngines.Clear;
+      end;
+    finally
+      nxdEnginesPadlock.Unlock;
+    end;
+  end;
+  inherited;
+  FreeAndNil(nxdEnginesPadlock);
+  FreeAndNil(nxdEngines);
+end;
+{------------------------------------------------------------------------------}
+procedure TDAENexusDBDriver.GetAuxParams(const AuxDriver: string; out List: IROStrings);
+begin
+  inherited;
+end;
+{------------------------------------------------------------------------------}
+function TDAENexusDBDriver.GetAvailableDriverOptions: TDAAvailableDriverOptions;
+begin
+  {$IFDEF DataAbstract_NexusDBPack}
+    Result := [doDatabaseName];
+  {$ELSE}
+    Result := [doServerName, doDatabaseName, doLogin];
+  {$ENDIF}
+end;
+{------------------------------------------------------------------------------}
+function TDAENexusDBDriver.GetConnectionClass: TDAEConnectionClass;
+begin
+  Result := TDAENexusDBConnection;
+end;
+{------------------------------------------------------------------------------}
+function TDAENexusDBDriver.GetDefaultConnectionType(
+  const AuxDriver: string): string;
+begin
+  Result:=Nexus_DriverType;
+end;
+
+function TDAENexusDBDriver.GetDefaultCustomParameters: string;
+begin
+  Result:='';
+end;
+
+function TDAENexusDBDriver.GetDescription: string;
+begin
+  Result := csNexusDBDriver
+    {$IFDEF DataAbstract_SchemaModelerOnly} + SchemaModelerOnly{$ENDIF}
+    {$IFDEF DataAbstract_NexusDBPack} + rsEmbeddedOnly{$ENDIF};
+end;
+{------------------------------------------------------------------------------}
+function TDAENexusDBDriver.GetDriverID: string;
+begin
+  Result := csNexusDB;
+end;
+{------------------------------------------------------------------------------}
+procedure TDAENexusDBDriver.RegisterServerEngine(aServerEngine : TnxBaseServerEngine;
+                                           const aName         : string);
+begin
+  TNexusDBRegisteredEngineContainer.Create(csRegistered + csUrlSeperator + aName, aServerEngine);
+end;
+{------------------------------------------------------------------------------}
+procedure TDAENexusDBDriver.UnregisterServerEngine(aServerEngine : TnxBaseServerEngine);
+var
+  i                           : Integer;
+begin
+  _driver.nxdEnginesPadlock.Lock;
+  try
+    for i := Pred(_driver.nxdEngines.Count) downto 0 do
+      if _driver.nxdEngines.Objects[i] is TNexusDBRegisteredEngineContainer then
+        if TNexusDBRegisteredEngineContainer(_driver.nxdEngines.Objects[i]).regecServerEngine = aServerEngine then
+          _driver.nxdEngines.Objects[i].Free;
+  finally
+    _driver.nxdEnginesPadlock.Unlock;
+  end;
+end;
+{------------------------------------------------------------------------------}
+procedure TDAENexusDBDriver.UnregisterServerEngine(const aName : string);
+var
+  i                           : Integer;
+begin
+  _driver.nxdEnginesPadlock.Lock;
+  try
+    if _driver.nxdEngines.Find(csRegistered + csUrlSeperator + aName, i) then
+      _driver.nxdEngines.Objects[i].Free;
+  finally
+    _driver.nxdEnginesPadlock.Unlock;
+  end;
+end;
+{==============================================================================}
+
+
+
+{===TDAENexusDBConnection======================================================}
+function TDAENexusDBConnection.CreateCustomConnection: TCustomConnection;
+begin
+  Result := TNexusDBConnection.Create(nil);
+  dacConnection := TNexusDBConnection(Result);
+end;
+{------------------------------------------------------------------------------}
+function TDAENexusDBConnection.CreateMacroProcessor: TDASQLMacroProcessor;
+begin
+  Result := TOracleMacroProcessor.Create;
+end;
+{------------------------------------------------------------------------------}
+procedure TDAENexusDBConnection.DoApplyConnectionString(aConnStrParser: TDAConnectionStringParser;
+                                                              aConnectionObject : TCustomConnection);
+var
+  S, T                        : string;
+  i                           : Integer;
+  sl                          : TStringList;
+  tpc                         : TnxBaseTransportClass;
+begin
+  inherited;
+
+  with aConnStrParser do begin
+    (aConnectionObject as TNexusDBConnection).Session.Close;
+
+    if Self.UserID <> '' then
+      dacConnection.Session.Username := Self.UserID
+    else
+      dacConnection.Session.Username := UserID;
+
+    if Self.Password <> '' then
+      dacConnection.Session.Password := Self.Password
+    else
+      dacConnection.Session.Password := Password;
+
+    Server := Trim(Server);
+
+    if Server = '' then
+      Server := csEmbeddedDefault;
+
+    _driver.nxdEnginesPadlock.Lock;
+    try
+      S := Server;
+      SetLength(S, nxMaxI32(0, Pred(Pos(csUrlSeperator, S))));
+
+      if S = '' then
+        raise EDADriverException.Create(rsNoProtocolHasBeenSpecified);
+
+      if not _driver.nxdEngines.Find(Server, i) then begin
+
+        if SameText(S, csEmbedded) then begin
+          (aConnectionObject as TNexusDBConnection).EngineContainer :=
+            TNexusDBEmbeddedEngineContainer.Create(Server);
+        end else if SameText(S, csRegistered) then begin
+          raise EDADriverException.CreateFmt(rsNoServerEngineHasBeenRegisteredAs, [Server]);
+        end else begin
+          {$IFDEF DataAbstract_NexusDBPack}
+            raise EDADriverException.Create(rsThisDriverOnlySupportsEmbeddedServerEngines);
+          {$ELSE}
+          sl := TStringList.Create;
+          try
+            TnxBaseDirectTransport.GetRegisteredClasses(sl);
+            tpc := nil;
+            for i := 0 to Pred(sl.Count) do
+              if SameText(S, TnxBaseTransportClass(sl.Objects[i]).ProtocolName) then begin
+                tpc := TnxBaseTransportClass(sl.Objects[i]);
+                Break;
+              end;
+            if not Assigned(tpc) then
+              raise EDADriverException.CreateFmt(rsNoTransportAvailableForProtocol, [S]);
+            (aConnectionObject as TNexusDBConnection).EngineContainer :=
+              TNexusDBRemoteEngineContainer.Create(Server, AuxParamsString, tpc);
+          finally
+            FreeAndNil(sl);
+          end;
+          {$ENDIF}
+        end;
+      end else
+        (aConnectionObject as TNexusDBConnection).EngineContainer :=
+          (_driver.nxdEngines.Objects[i] as TNexusDBBaseEngineContainer);
+    finally
+      _driver.nxdEnginesPadlock.Unlock;
+    end;
+
+    Database := Trim(Database);
+
+    S := Database;
+    SetLength(S, nxMaxI32(0, Pred(Pos(csUrlSeperator, S))));
+    if Pos(csUrlSeperator, Database) > 0 then
+      T := Copy(Database, Length(S) + 4, High(Integer))
+    else
+      T := Database;
+
+    if S = '' then
+      if (aConnectionObject as TNexusDBConnection).EngineContainer.becGetEngine is TnxServerEngine then
+        S := csPath
+      else
+        S := csAlias;
+
+    if SameText(S, csAlias) then
+      (aConnectionObject as TNexusDBConnection).Database.AliasName := T
+    else if SameText(S, csPath) then
+      (aConnectionObject as TNexusDBConnection).Database.AliasPath := T
+    else
+      raise EDADriverException.CreateFmt(rsUnknownDatabaseType, [S]);
+
+  end;
+end;
+{------------------------------------------------------------------------------}
+function TDAENexusDBConnection.DoBeginTransaction: Integer;
+begin
+  Result := -1;
+  dacConnection.Database.StartTransaction;
+end;
+{------------------------------------------------------------------------------}
+procedure TDAENexusDBConnection.DoCommitTransaction;
+begin
+  dacConnection.Database.Commit;
+end;
+{------------------------------------------------------------------------------}
+function TDAENexusDBConnection.DoGetInTransaction: Boolean;
+begin
+  Result := dacConnection.Database.InTransaction;
+end;
+{------------------------------------------------------------------------------}
+procedure TDAENexusDBConnection.DoGetTableFields(const aTableName : string;
+                                                   out aFields    : TDAFieldCollection);
+var
+  i                           : Integer;
+  fld: TField;
+  dafld: TDAField;
+begin
+  dacConnection.Open;
+
+  with TnxQuery.Create(nil) do try
+    SQL.Text := 'SELECT * FROM "' + aTableName + '" WHERE ''c'' <> ''c''';
+    Database := dacConnection.Database;
+    Open;
+
+    aFields := TDAFieldCollection.Create(nil);
+    try
+      for i := 0 to Pred(FieldCount) do begin
+        fld:=Fields.Fields[i];
+        with aFields.Add do begin
+          Name := fld.FieldName;
+          Size := fld.Size;
+          Required := fld.Required;
+          ReadOnly := fld.ReadOnly;
+          Calculated := fld.Calculated;
+          DisplayWidth := fld.DisplayWidth;
+          DisplayLabel := fld.DisplayLabel;
+          DataType := VCLTypeToDAType(fld.DataType);
+          if DataType = datDecimal then begin
+            case fld.DataType of
+              ftBCD: begin
+                DecimalPrecision:= TBCDField(fld).Precision;
+                DecimalScale:= TBCDField(fld).Size;
+              end;
+              ftFMTBCD: begin
+                DecimalPrecision:= TFMTBCDField(fld).Precision;
+                DecimalScale:= TFMTBCDField(fld).Size;
+              end;
+            end;
+          end;
+        end;
+      end;
+    except
+      FreeAndNil(aFields);
+      raise;
+    end;
+    close;
+    //pk
+    sql.Text := 'SELECT SEGMENT_FIELD FROM #INDEXFIELDS '+
+                'WHERE INDEX_NAME = ''$SQL$PRIMARYKEY$INDEX#0'' AND TABLE_NAME = '''+aTableName+''' '+
+                'ORDER BY TABLE_NAME, SEGMENT_INDEX';
+    Open;
+    while not Eof do begin
+      daFld := aFields.FindField(Fields[0].AsString);
+      if dafld <> nil then begin
+        daFld.InPrimaryKey := True;
+        dafld.Required := True;
+      end;
+      Next;
+    end;
+    // field description
+    close;
+    sql.Text := 'SELECT FIELD_NAME, FIELD_DESC, FIELD_TYPE_SQL FROM #FIELDS WHERE TABLE_NAME = '''+aTableName+''' ORDER BY FIELD_INDEX';
+    Open;
+    while not Eof do begin
+      daFld := aFields.FindField(Fields[0].AsString);
+      if dafld <> nil then begin
+        if not Fields[1].IsNull then daFld.Description := Fields[1].AsString;
+        if Fields[2].AsString  = 'AUTOINC' then  begin
+          dafld.DataType:= datAutoInc;
+          dafld.GeneratorName := aTableName;
+        end;
+      end;
+      Next;
+    end;
+  finally
+    Free;
+  end;
+end;
+{------------------------------------------------------------------------------}
+procedure TDAENexusDBConnection.DoGetTableNames(out aList: IROStrings);
+begin
+  inherited;
+  dacConnection.Database.Open;
+  dacConnection.Database.GetTableNames(aList.Strings);
+end;
+{------------------------------------------------------------------------------}
+procedure TDAENexusDBConnection.DoRollbackTransaction;
+begin
+  dacConnection.Database.Rollback;
+end;
+{------------------------------------------------------------------------------}
+function TDAENexusDBConnection.GetDatasetClass: TDAEDatasetClass;
+begin
+  Result := TDAENexusDBQuery;
+end;
+
+function TDAENexusDBConnection.GetStoredProcedureClass: TDAEStoredProcedureClass;
+begin
+  Result:=TDAENexusStoredProcedure;
+end;
+
+{------------------------------------------------------------------------------}
+function TDAENexusDBConnection.DoGetLastAutoInc(const GeneratorName: string): integer;
+begin
+  // dacConnection.Database.GetAutoIncValue(GeneratorName, Cardinal(Result)); // NXDB2: Changed
+  dacConnection.Database.GetAutoIncValue(GeneratorName,
+                                          dacConnection.Session.Password,
+                                          Cardinal(Result));
+//  Dec(Result);
+end;
+{==============================================================================}
+
+
+
+{===TDAENexusDBQuery===========================================================}
+function TDAENexusDBQuery.CreateDataset(aConnection: TDAEConnection): TDataSet;
+begin
+  Result := TnxQuery.Create(nil);
+  with TnxQuery(Result) do begin
+    Database := TDAENexusDBConnection(aConnection).dacConnection.Database;
+    RequestLive := False;
+  end;
+end;
+{------------------------------------------------------------------------------}
+function TDAENexusDBQuery.DoExecute: Integer;
+begin
+  with TnxQuery(DataSet) do begin
+    ExecSQL;
+    Result := RowsAffected;
+  end;
+end;
+{------------------------------------------------------------------------------}
+function TDAENexusDBQuery.DoGetSQL: string;
+begin
+  Result := TnxQuery(DataSet).SQL.Text
+end;
+{------------------------------------------------------------------------------}
+procedure TDAENexusDBQuery.DoPrepare(Value: Boolean);
+begin
+  TnxQuery(DataSet).Prepared := Value;
+end;
+{------------------------------------------------------------------------------}
+procedure TDAENexusDBQuery.DoSetSQL(const Value: string);
+begin
+  TnxQuery(DataSet).SQL.Text := Value;
+end;
+{------------------------------------------------------------------------------}
+procedure TDAENexusDBQuery.SetParamValues(AParams: TDAParamCollection);
+begin
+  SetParamValuesStd(AParams, TnxQuery(DataSet).Params);
+end;
+
+procedure TDAENexusDBQuery.GetParamValues(AParams: TDAParamCollection);
+begin
+  GetParamValuesStd(AParams, TnxQuery(DataSet).Params);
+end;
+
+procedure TDAENexusDBQuery.ClearParams;
+begin
+  inherited;
+  TnxQuery(DataSet).Params.Clear;
+end;
+
+
+{==============================================================================}
+
+exports  GetDriverObject Name func_GetDriverObject;
+
+procedure TDAENexusDBConnection.DoGetStoredProcedureNames(
+  out List: IROStrings);
+begin
+  inherited;
+  dacConnection.Database.Open;
+  dacConnection.Database.GetStoredProcNames(List.Strings);
+end;
+
+
+{ TDAENexusStoredProcedure }
+
+function TDAENexusStoredProcedure.CreateDataset(
+  aConnection: TDAEConnection): TDataset;
+begin
+  Result := TnxStoredProc.Create(nil);
+  with TnxStoredProc(Result) do begin
+    Database := TDAENexusDBConnection(aConnection).dacConnection.Database;
+    RequestLive := False;
+  end;
+end;
+
+function TDAENexusStoredProcedure.Execute: integer;
+begin
+  SetParamValues(GetParams);
+  Result:=DoExecute;
+  GetParamValues(GetParams);
+end;
+
+function TDAENexusStoredProcedure.DoGetSQL: string;
+begin
+  Result:='';
+end;
+
+procedure TDAENexusStoredProcedure.DoSetSQL(const Value: string);
+begin
+//
+end;
+
+procedure TDAENexusStoredProcedure.GetParamValues(AParams: TDAParamCollection);
+begin
+  GetParamValuesStd(AParams,TnxStoredProc(Dataset).Params);
+end;
+
+function TDAENexusStoredProcedure.GetStoredProcedureName: string;
+begin
+  Result:=TnxStoredProc(Dataset).StoredProcName;
+end;
+
+procedure TDAENexusStoredProcedure.SetParamValues(AParams: TDAParamCollection);
+begin
+  SetParamValuesStd(AParams,TnxStoredProc(Dataset).Params);
+end;
+
+procedure TDAENexusStoredProcedure.SetStoredProcedureName(
+  const Name: string);
+begin
+  TnxStoredProc(Dataset).StoredProcName:=Name;
+end;
+
+procedure TDAENexusStoredProcedure.RefreshParams;
+begin
+  TnxStoredProc(DataSet).RefreshParam;
+  RefreshParamsStd(TnxStoredProc(DataSet).Params);
+end;
+
+procedure TDAENexusStoredProcedure.DoPrepare(Value: boolean);
+begin
+  TnxStoredProc(DataSet).Prepared:=Value;
+end;
+
+
+function TDAENexusStoredProcedure.DoExecute: integer;
+begin
+  TnxStoredProc(Dataset).ExecProc;
+  Result:=-1;
+end;
+
+
+function TDAENexusDBConnection.IdentifierNeedsQuoting(
+  const iIdentifier: string): boolean;
+begin
+  Result := inherited IdentifierNeedsQuoting(iIdentifier) or IsReservedName(iIdentifier);
+end;
+
+procedure TDAENexusDBConnection.DoGetForeignKeys(out ForeignKeys: TDADriverForeignKeyCollection);
+const
+  sFK_SQL =
+    'SELECT fkc.fk_constraint_name, fkc.fk_constraint_table_name as table_name, fkc.fk_constraint_references_table_name as target_table, '+
+    'srccols.fk_constraint_referencing_columns_name as srccol, destcols.fk_constraint_referenced_columns_name as destcol '+
+    'from #foreignkey_constraints fkc '+
+    'join #foreignkey_constraints_referencing_columns srccols on (fkc.fk_constraint_name = srccols.fk_constraint_name and fkc.fk_constraint_table_name = srccols.fk_constraint_table_name) '+
+    'join #foreignkey_constraints_referenced_columns destcols on (fkc.fk_constraint_name = destcols.fk_constraint_name and fkc.fk_constraint_table_name = destcols.fk_constraint_table_name '+
+    'and srccols.fk_constraint_referencing_columns_index = destcols.fk_constraint_referenced_columns_index) '+
+    'order by fkc.fk_constraint_table_name, fkc.fk_constraint_name, srccols.fk_constraint_referencing_columns_index';
+var
+  lCurrConstraint: string;
+  lCurrFK: TDADriverForeignKey;
+  Query: TnxQuery;
+begin
+  inherited DoGetForeignKeys(ForeignKeys);
+  lCurrConstraint := '';
+  lCurrFK := nil;
+  Query :=  TnxQuery.Create(nil);
+  try
+    Query.SQL.Text := sFK_SQL;
+    Query.Database := dacConnection.Database;
+    Query.Open;
+
+    ForeignKeys.Clear;
+    while (not Query.EOF) do begin
+
+      if lCurrConstraint <> Query.Fields[0].AsString then begin
+        lCurrConstraint := Query.Fields[0].AsString;
+
+        lCurrFK := ForeignKeys.Add();
+        with lCurrFK do begin
+          FKField := TrimRight(Query.Fields[3].AsString);
+          PKField := TrimRight(Query.Fields[4].AsString);
+          FKTable := TrimRight(Query.Fields[1].AsString);
+          PKTable := TrimRight(Query.Fields[2].AsString);
+        end;
+      end else begin
+        with lCurrFK do begin
+          FKField := FKField + ';' + TrimRight(Query.Fields[4].AsString);
+          PKField := PKField + ';' + TrimRight(Query.Fields[3].AsString);
+        end;
+      end;
+      Query.Next;
+    end;
+  finally
+    Query.Free;
+  end;
+
+end;
+
+initialization
+  _driver := nil;
+  RegisterDriverProc(GetDriverObject);
+finalization
+  UnregisterDriverProc(GetDriverObject);
+  try
+    _driver.Free;
+  except end;
+  _driver := nil;
+end.
+
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAODACDriver.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAODACDriver.pas
new file mode 100644
index 0000000..cd3ab1b
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAODACDriver.pas	
@@ -0,0 +1,671 @@
+unit uDAODACDriver;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Driver Library
+{
+{ compiler: Delphi 6 and up
+{ platform: Win32
+{
+{ (c)opyright RemObjects Software. all rights reserved.
+{
+{ Using this code requires a valid license of the Data Abstract
+{ which can be obtained at http://www.remobjects.com.
+{----------------------------------------------------------------------------}
+
+{$IFDEF MSWINDOWS}
+{$I ..\DataAbstract.inc}
+{$ELSE}
+{$I ../DataAbstract.inc}
+{$ENDIF}
+
+{$R DataAbstract_ODACDriver_Glyphs.res}
+
+{
+  If you have the version with source code, uncomment the following conditional to
+  make this unit compile.
+}
+
+{.$DEFINE SOURCECODEVERSION}
+
+interface
+
+uses DB, Classes, uDAEngine, uDAInterfaces, uDAADOInterfaces, uROClasses, Variants,
+  uDAOracleInterfaces, Ora, DBAccess, DASQLMonitor, OraSQLMonitor, OraSmart, uDAMacroProcessors, uDAUtils, OraClasses;
+
+type { TDAODACDriver }
+  TDAODACDriver = class(TDADriverReference)
+  end;
+
+     { TDAEODACDriver }
+  TDAEODACDriver = class(TDAOracleDriver)
+  private
+    fMonitor: TOraSQLMonitor;
+    fTraceCallBack: TDALogTraceEvent;
+
+    procedure OnODACTrace(Sender: TObject; Text: string; Flag: TDATraceFlag);
+
+  protected
+    function GetConnectionClass: TDAEConnectionClass; override;
+
+       // IDADriver
+    function GetDriverID: string; override;
+    function GetDescription: string; override;
+    procedure GetAuxParams(const AuxDriver: string; out List: IROStrings); override;
+
+    procedure DoSetTraceOptions(TraceActive: boolean; TraceOptions: TDATraceOptions; Callback: TDALogTraceEvent); override;
+
+    function GetAvailableDriverOptions: TDAAvailableDriverOptions; override;
+    function GetDefaultCustomParameters: string; override;
+
+  public
+  end;
+
+     { TDAEODACConnection }
+  TDAEODACConnection = class(TDAOracleConnection)
+  private
+    fConnection: TORASession;
+  protected
+    function CreateCustomConnection: TCustomConnection; override;
+
+    function GetDatasetClass: TDAEDatasetClass; override;
+    function GetStoredProcedureClass: TDAEStoredProcedureClass; override;
+
+    procedure DoApplyConnectionString(aConnStrParser: TDAConnectionStringParser;
+      aConnectionObject: TCustomConnection); override;
+
+    function DoBeginTransaction: integer; override;
+    procedure DoCommitTransaction; override;
+    procedure DoRollbackTransaction; override;
+    function DoGetInTransaction: boolean; override;
+
+  public
+    function GetDatabaseNames: IROStrings;
+  end;
+
+     { TDAEODACQuery }
+  TDAEODACQuery = class(TDAEDataset, IDAOracleDataset, IDAMustSetParams)
+  private
+
+  protected
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+    function intVCLTypeToDAType(aFieldType: TFieldType): TDADataType;override;
+    procedure ClearParams; override;
+       // IDADataset
+    function DoExecute: integer; override;
+    function DoGetSQL: string; override;
+    procedure DoSetSQL(const Value: string); override;
+    procedure DoPrepare(Value: boolean); override;
+    procedure DoSetActive(Value: boolean); override;
+
+       // IOracleDataset
+    function GetLockMode: TDAOracleLockMode;
+    procedure SetLockMode(Value: TDAOracleLockMode);
+    function GetOptions: TDAOracleOptions;
+    procedure SetOptions(Value: TDAOracleOptions);
+
+       // IDAMustSetParams
+    procedure SetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  public
+  end;
+
+     { TDAEODACStoredProcedure }
+  TDAEODACStoredProcedure = class(TDAEStoredProcedure, IDAMustSetParams)
+  protected
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+    function intVCLTypeToDAType(aFieldType: TFieldType): TDADataType;override;
+
+    function GetStoredProcedureName: string; override;
+    procedure SetStoredProcedureName(const Name: string); override;
+    procedure RefreshParams; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function DoExecute: integer; override;
+    function Execute: integer; override;
+
+        // IDAMustSetParams
+    procedure SetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  end;
+
+procedure Register;
+
+function GetDriverObject: IDADriver; stdcall;
+
+implementation
+
+uses
+  SysUtils,
+  uDADriverManager, uDARes, uROBinaryHelpers;
+
+var
+  _driver: TDAEDriver = nil;
+
+procedure Register;
+begin
+  RegisterComponents(DAPalettePageName, [TDAODACDriver]);
+end;
+
+{$IFDEF DataAbstract_SchemaModelerOnly}
+{$INCLUDE ..\DataAbstract_SchemaModelerOnly.inc}
+{$ENDIF DataAbstract_SchemaModelerOnly}
+
+function GetDriverObject: IDADriver;
+begin
+  {$IFDEF DataAbstract_SchemaModelerOnly}
+  if not RunningInSchemaModeler then begin
+    result := nil;
+    exit;
+  end;
+  {$ENDIF}
+  if (_driver = nil) then _driver := TDAEODACDriver.Create(nil);
+  result := _driver;
+end;
+
+
+procedure ReadODACParamValues(AParams: TDAParamCollection;aDACParams: TOraParams;pvSession: TOraSession);
+var
+  i: integer;
+  lParam: TOraParam;
+  ms: IROStream;
+begin
+  for i := 0 to aDACParams.Count - 1 do begin
+    lParam := aDACParams[i];
+    if (lParam.ParamType in [ptOutput, ptInputOutput, ptResult]) then
+      if ord(lParam.DataType) = ftBFile then begin
+        ms := TROStream.Create;
+        lParam.AsBFile.SaveToStream(ms.Stream);
+        ms.Position:=0;
+        Aparams.ParamByName(lParam.Name).LoadFromStream(ms);
+        ms:=nil;
+      end
+      else
+        Aparams.ParamByName(lParam.Name).Value := lParam.Value;
+  end;
+end;
+
+
+procedure WriteODACParamValues(InputParams: TDAParamCollection;OutputParams: TOraParams;pvSession: TOraSession);
+var i : integer;
+    par : uDAInterfaces.TDAParam;
+    outpar : TOraParam;
+    ms: IROStream;
+    blobtype : TFieldType;
+    lvOraLob : TOralob;
+begin
+  for i := 0 to (InputParams.Count-1) do begin
+    par := InputParams[i];
+    outpar := OutputParams.ParamByName(par.Name);
+
+    // If no blob type is specified, then gets the default field type.
+    // BlobType is only meaningful to Oracle. MSSQL works fine just setting the DataType
+    blobtype := BlobTypeMappings[par.BlobType];
+    if (blobtype=ftUnknown) then blobtype := DADataTypesMappings[par.DataType];
+
+    case par.DataType of
+      datBlob : begin
+        outpar.ParamType := TParamType(par.ParamType);
+        outpar.DataType := DADataTypesMappings[par.DataType];
+        if par.ParamType <> daptOutput then begin
+          ms := TROStream.Create;
+          par.SaveToStream(ms);
+          ms.Position := 0;
+          lvOraLob := TOralob.Create(pvSession.OCISvcCtx);
+          try
+            lvOraLob.CreateTemporary(ltBlob);
+            if ms.Size>0 then lvOraLob.LoadFromStream(ms.Stream);
+            lvOraLob.WriteLob;
+            outpar.AsOraBLOB := lvOraLob;
+          finally
+            lvOraLob.Free;
+          end;
+        end;
+
+      end;
+      datMemo : begin
+        outpar.ParamType := TParamType(par.ParamType);
+        outpar.DataType := ftMemo;
+
+        // Only happens with Oracle
+        if (blobtype<>ftUnknown) then outpar.DataType := blobtype;
+        if par.ParamType <> daptOutput then outpar.Value := par.Value;
+      end;
+      else begin
+        outpar.ParamType := TParamType(par.ParamType);
+        case par.DataType of
+          datAutoInc : outpar.DataType := ftInteger;
+          datLargeAutoInc: outpar.DataType := ftLargeInt;
+        else
+          outpar.DataType := DADataTypesMappings[par.DataType];
+        end;
+        if par.ParamType <> daptOutput then outpar.Value := par.Value;
+      end;
+    end;
+  end;
+end;
+
+{ TDAEODACConnection }
+
+procedure TDAEODACConnection.DoApplyConnectionString(
+  aConnStrParser: TDAConnectionStringParser; aConnectionObject: TCustomConnection);
+begin
+  inherited;
+
+  with aConnStrParser do begin
+
+    if (Self.UserID <> '') then
+      fConnection.Username := Self.UserID
+    else
+      fConnection.Username := UserID;
+
+    if (Self.Password <> '') then
+      fConnection.Password := Self.Password
+    else
+      fConnection.Password := Password;
+
+    fConnection.Server := Server;
+    fConnection.ConnectPrompt := FALSE;
+    fConnection.Debug := (AuxParams['Debug']='1');
+
+    fConnection.Options.Net := AuxParams['Net'] = '1';
+  end;
+end;
+
+function TDAEODACConnection.DoBeginTransaction: integer;
+begin
+  fConnection.StartTransaction;
+  result := 0;
+end;
+
+procedure TDAEODACConnection.DoCommitTransaction;
+begin
+  fConnection.Commit;
+end;
+
+function TDAEODACConnection.CreateCustomConnection: TCustomConnection;
+begin
+  fConnection := TORASession.Create(nil);
+  fConnection.LoginPrompt := FALSE;
+
+  { ToDo: add a COnnectionString parameter to set
+    fConnection.Debug := TRUE; }
+
+  result := fConnection;
+end;
+
+function TDAEODACConnection.GetDatasetClass: TDAEDatasetClass;
+begin
+  result := TDAEODACQuery;
+end;
+
+function TDAEODACConnection.GetStoredProcedureClass: TDAEStoredProcedureClass;
+begin
+  result := TDAEODACStoredProcedure;
+end;
+
+procedure TDAEODACConnection.DoRollbackTransaction;
+begin
+  fConnection.Rollback;
+end;
+
+function TDAEODACConnection.DoGetInTransaction: boolean;
+begin
+  result := fConnection.InTransaction
+end;
+
+function TDAEODACConnection.GetDatabaseNames: IROStrings;
+begin
+  Result := TROStrings.Create();
+  fConnection.GetDatabaseNames(Result.Strings);
+end;
+
+
+{ TDAEODACDriver }
+
+function TDAEODACDriver.GetAvailableDriverOptions: TDAAvailableDriverOptions;
+begin
+  result := [doServerName, doLogin, doCustom];
+end;
+
+function TDAEODACDriver.GetConnectionClass: TDAEConnectionClass;
+begin
+  result := TDAEODACConnection;
+end;
+
+function TDAEODACDriver.GetDefaultCustomParameters: string;
+begin
+  result := 'Net=0';
+end;
+
+function TDAEODACDriver.GetDescription: string;
+begin
+  result := 'Core Lab ODAC Driver'{$IFDEF DataAbstract_SchemaModelerOnly} + SchemaModelerOnly{$ENDIF};
+end;
+
+function TDAEODACDriver.GetDriverID: string;
+begin
+  result := 'ODAC';
+end;
+
+procedure TDAEODACDriver.GetAuxParams(const AuxDriver: string; out List: IROStrings);
+begin
+  inherited;
+  List.Add('Net=0,1');
+end;
+
+procedure TDAEODACDriver.OnODACTrace(Sender: TObject; Text: string; Flag: TDATraceFlag);
+begin
+  if Assigned(fTraceCallback) then fTraceCallback(Sender, Text, integer(Flag));
+end;
+
+procedure TDAEODACDriver.DoSetTraceOptions(TraceActive: boolean; TraceOptions: TDATraceOptions; Callback: TDALogTraceEvent);
+var
+  sdacopts: TDATraceFlags;
+begin
+  inherited;
+
+  if TraceActive then begin
+    if (fMonitor = nil) then fMonitor := TOraSQLMonitor.Create(Self);
+
+    fMonitor.Active := FALSE;
+    fMonitor.OnSQL := OnODACTrace;
+
+    sdacopts := [];
+    if (toPrepare in TraceOptions) then sdacopts := sdacopts + [tfQPrepare];
+    if (toExecute in TraceOptions) then sdacopts := sdacopts + [tfQExecute];
+    if (toFetch in TraceOptions) then sdacopts := sdacopts + [tfQFetch];
+    if (toError in TraceOptions) then sdacopts := sdacopts + [tfError];
+    if (toStmt in TraceOptions) then sdacopts := sdacopts + [tfStmt];
+    if (toConnect in TraceOptions) then sdacopts := sdacopts + [tfConnect];
+    if (toTransact in TraceOptions) then sdacopts := sdacopts + [tfTransact];
+    if (toBlob in TraceOptions) then sdacopts := sdacopts + [tfBlob];
+    if (toService in TraceOptions) then sdacopts := sdacopts + [tfService];
+    if (toMisc in TraceOptions) then sdacopts := sdacopts + [tfMisc];
+    if (toParams in TraceOptions) then sdacopts := sdacopts + [tfParams];
+
+    fTraceCallBack := Callback;
+
+    fMonitor.TraceFlags := sdacopts;
+    fMonitor.Active := TRUE;
+  end
+  else begin
+    FreeAndNIL(fMonitor);
+    fTraceCallback := nil;
+  end;
+end;
+
+{ TDAEODACQuery }
+
+function TDAEODACQuery.CreateDataset(aConnection: TDAEConnection): TDataset;
+begin
+  result := TSmartQuery.Create(nil);
+  TSmartQuery(result).Debug := TDAEODACConnection(aConnection).fConnection.Debug;
+  TSmartQuery(result).ReadOnly := TRUE;
+  TSmartQuery(result).FetchAll := True; //for preventing creating an additional session when you call StartTransaction (an known issue of OLEDB)
+  TSmartQuery(result).Unidirectional := True;
+  TSmartQuery(result).Session := TDAEODACConnection(aConnection).fConnection;
+end;
+
+function TDAEODACQuery.DoGetSQL: string;
+begin
+  result := TSmartQuery(Dataset).SQL.Text;
+end;
+
+procedure TDAEODACQuery.DoSetSQL(const Value: string);
+begin
+  TSmartQuery(Dataset).SQL.Text := Value;
+end;
+
+function TDAEODACQuery.GetLockMode: TDAOracleLockMode;
+begin
+  result := TDAOracleLockMode(TSmartQuery(Dataset).LockMode)
+end;
+
+procedure TDAEODACQuery.SetLockMode(Value: TDAOracleLockMode);
+begin
+  TSmartQuery(Dataset).LockMode := Ora.TLockMode(Value)
+end;
+
+procedure TDAEODACQuery.SetOptions(Value: TDAOracleOptions);
+var
+  {$IFDEF SOURCECODEVERSION}
+  dsopts: TOraDataSetOptions;
+  {$ELSE}
+  dsopts: TOraDataSetOptionsDS;
+  {$ENDIF}
+begin
+  {$IFDEF SOURCECODEVERSION}
+  dsopts := TSmartQuery(Dataset).Options;
+  {$ELSE}
+  dsopts := TSmartQuery(Dataset).OptionsDS;
+  {$ENDIF}
+  
+  TSmartQuery(Dataset).DMLRefresh := True; // To get the output params when we exec SPs
+  dsopts.AutoClose := opAutoClose in Value;
+  dsopts.DefaultValues := opDefaultValues in Value;
+  dsopts.LongStrings := opLongStrings in Value;
+  dsopts.QueryRecCount := opQueryRecCount in Value;
+  dsopts.CacheLobs := opCacheLobs in Value;
+  dsopts.DeferredLobRead := opDeferredLobRead in Value;
+  dsopts.KeepPrepared := opKeepPrepared in Value;
+end;
+
+function TDAEODACQuery.GetOptions: TDAOracleOptions;
+var
+  {$IFDEF SOURCECODEVERSION}
+  dsopts: TOraDataSetOptions;
+  {$ELSE}
+  dsopts: TOraDataSetOptionsDS;
+  {$ENDIF}
+begin
+  {$IFDEF SOURCECODEVERSION}
+  dsopts := TSmartQuery(Dataset).Options;
+  {$ELSE}
+  dsopts := TSmartQuery(Dataset).OptionsDS;
+  {$ENDIF}
+
+  result := [];
+
+  if dsopts.AutoClose then result := result + [opAutoClose];
+  if dsopts.DefaultValues then result := result + [opDefaultValues];
+  if dsopts.LongStrings then result := result + [opLongStrings];
+  if dsopts.QueryRecCount then result := result + [opQueryRecCount];
+  if dsopts.CacheLobs then result := result + [opCacheLobs];
+  if dsopts.DeferredLobRead then result := result + [opDeferredLobRead];
+  if dsopts.KeepPrepared then result := result + [opKeepPrepared];
+end;
+
+procedure TDAEODACQuery.DoPrepare(Value: boolean);
+begin
+  TSmartQuery(Dataset).Prepared := Value
+end;
+
+function TDAEODACQuery.DoExecute: integer;
+begin
+  TSmartQuery(Dataset).ExecSQL;
+  result := TSmartQuery(Dataset).RowsAffected;
+end;
+
+procedure TDAEODACQuery.SetParamValues(AParams: TDAParamCollection);
+begin
+  WriteODACParamValues(AParams, TSmartQuery(Dataset).Params, TSmartQuery(Dataset).Session);
+end;
+
+procedure TDAEODACQuery.GetParamValues(AParams: TDAParamCollection);
+begin
+  ReadODACParamValues(AParams, TSmartQuery(Dataset).Params, TSmartQuery(Dataset).Session)
+end;
+
+
+function ExtractTableName(aSQLStatement: string): string;
+var sql: string;
+    idx, i, x: integer;
+begin
+  result := '';
+
+  sql := UpperCase(aSQLStatement);
+  ReplaceChar(sql, [#13, #9, #10], #32);
+
+  idx := Pos(' FROM ', sql);
+  if (idx=0) then Exit;
+
+  for i := idx+6 to Length(sql) do begin
+    if (sql[i]<>#32) then begin
+      for x := i to Length(sql) do
+        if not (sql[x] in ['A'..'Z', '0'..'9', '.', '_']) then begin
+          result := Trim(Copy(sql, i, x-i));
+          Exit;
+        end;
+    end;
+  end;
+end;
+
+procedure TDAEODACQuery.DoSetActive(Value: boolean);
+var willCreateFields: boolean;
+    fieldColl: TDAFieldCollection;
+    tableName: string;
+    fld: TDAField;
+    qry: TSmartQuery;
+begin
+  fieldColl:=nil; // prevent warnings
+  willCreateFields := FALSE;
+  if Value then begin
+    fieldColl := inherited GetFields;
+    willCreateFields := fieldColl.Count=0;
+  end;
+
+  inherited;
+
+  if not willCreateFields then Exit;
+
+  { Determines which ones are part of the PK }
+  tableName := UpperCase(ExtractTableName(DoGetSQL));
+
+  if (tableName='') then Exit;
+  qry := TSmartQuery.Create(NIL);
+  try
+    qry.Assign(Dataset);
+    qry.SQL.Text := Format(
+       'SELECT cols.column_name, cols.position '+
+       'FROM all_constraints cons, all_cons_columns cols '+
+       'WHERE cols.table_name = ''%s'' AND cons.constraint_type = ''P'' AND cons.constraint_name = cols.constraint_name '+
+       'AND cons.owner = cols.owner ORDER BY cols.position', [tableName]);
+    qry.Open;
+    if (qry.RecordCount=0) then Exit;
+
+    while not qry.Eof do try
+      fld := fieldColl.FindField(qry.Fields[0].AsString);
+      if (fld<>NIL) then begin
+        fld.InPrimaryKey := TRUE;
+        fld.Required := TRUE;
+      end;
+    finally
+      qry.Next;
+    end;
+  finally
+    qry.Free;
+  end;
+end;
+
+function TDAEODACQuery.intVCLTypeToDAType(
+  aFieldType: TFieldType): TDADataType;
+begin
+  if ord(aFieldType) in [ftTimeStampTZ,ftTimeStampLTZ] then aFieldType:=ftTimeStamp;
+  if ord(aFieldType) in [ftBFile] then aFieldType:=ftBlob;
+  Result:= inherited intVCLTypeToDAType(aFieldType);
+end;
+
+procedure TDAEODACQuery.ClearParams;
+begin
+  inherited;
+  TSmartQuery(Dataset).Params.Clear;
+end;
+
+{ TDAEODACStoredProcedure }
+
+function TDAEODACStoredProcedure.CreateDataset(aConnection: TDAEConnection): TDataset;
+begin
+  result := TOraStoredProc.Create(nil);
+  TOraStoredProc(result).Debug := TDAEODACConnection(aConnection).fConnection.Debug;
+  TOraStoredProc(result).Session := TDAEODACConnection(aConnection).fConnection;
+end;
+
+function TDAEODACStoredProcedure.Execute: integer;
+var
+//  i: integer;
+  _params: TDAParamCollection;
+ // lParam: DBAccess.TDAParam;
+begin
+  _params := GetParams;
+  setParamValues(_Params);
+{
+  with TOraStoredProc(Dataset) do begin
+    if (Params.Count <> _Params.Count) then TOraStoredProc(Dataset).PrepareSQL;
+
+    for i := 0 to (Params.Count - 1) do
+      if (Params[i].ParamType in [ptInput, ptInputOutput]) then
+        Params[i].Value := _params.ParamByName(Params[i].Name).Value;
+
+    for i := 0 to (_params.Count - 1) do begin
+      lParam := Params.ParamByName(_params[i].Name);
+      if (_params[i].DataType = datString) and (_params[i].Size > 4000) and (lParam.ParamType in [ptOutput, ptInputOutput]) then
+        lParam.Size := _params[i].Size;
+    end;
+  end;
+}
+  result := DoExecute;
+  GetParamValues(_Params);
+end;
+
+function TDAEODACStoredProcedure.GetStoredProcedureName: string;
+begin
+  result := TOraStoredProc(Dataset).StoredProcName;
+end;
+
+procedure TDAEODACStoredProcedure.SetStoredProcedureName(
+  const Name: string);
+begin
+  TOraStoredProc(Dataset).StoredProcName := Name;
+end;
+
+procedure TDAEODACStoredProcedure.SetParamValues(AParams: TDAParamCollection);
+begin
+  if (AParams.Count <> TOraStoredProc(Dataset).Params.Count) then TOraStoredProc(Dataset).PrepareSQL;
+  WriteODACParamValues(AParams, TOraStoredProc(Dataset).Params, TOraStoredProc(Dataset).Session);
+end;
+
+procedure TDAEODACStoredProcedure.GetParamValues(AParams: TDAParamCollection);
+begin
+  ReadODACParamValues(AParams, TOraStoredProc(Dataset).Params, TOraStoredProc(Dataset).Session)
+end;
+
+procedure TDAEODACStoredProcedure.RefreshParams;
+begin
+  TOraStoredProc(Dataset).PrepareSQL;
+  RefreshParamsStd(TOraStoredProc(Dataset).Params);
+end;
+
+function TDAEODACStoredProcedure.intVCLTypeToDAType(
+  aFieldType: TFieldType): TDADataType;
+begin
+  if ord(aFieldType) in [ftTimeStampTZ,ftTimeStampLTZ] then aFieldType:=ftTimeStamp;
+  Result:= inherited intVCLTypeToDAType(aFieldType);
+end;
+
+exports GetDriverObject name func_GetDriverObject;
+
+function TDAEODACStoredProcedure.DoExecute: integer;
+begin
+  with TOraStoredProc(Dataset) do begin
+    ExecProc;
+    result := RowsAffected;
+  end;
+end;
+
+initialization
+  _driver := nil;
+  RegisterDriverProc(GetDriverObject);
+
+finalization
+  UnregisterDriverProc(GetDriverObject);
+  FreeAndNIL(_driver);
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAPostgresDACDriver.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAPostgresDACDriver.pas
new file mode 100644
index 0000000..04c711b
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAPostgresDACDriver.pas	
@@ -0,0 +1,357 @@
+unit uDAPostgresDACDriver;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Driver Library
+{
+{ compiler: Delphi 6 and up, Kylix 3 and up
+{ platform: Win32, Linux
+{
+{ (c)opyright RemObjects Software. all rights reserved.
+{
+{ Using this code requires a valid license of the Data Abstract
+{ which can be obtained at http://www.remobjects.com.
+{----------------------------------------------------------------------------}
+
+{$IFDEF MSWINDOWS}
+{$I ..\DataAbstract.inc}
+{$ELSE}
+{$I ../DataAbstract.inc}
+{$ENDIF}
+
+{$R DataAbstract_PostgresDACDriver_Glyphs.res} 
+
+interface
+
+uses DB, Classes, uDAEngine, uDAInterfaces, uDAADOInterfaces, uROClasses,
+  uROBinaryHelpers, uDAUtils, PSQLDbTables, uDAPostgresInterfaces;
+
+type { TDAPostgresDACDriver }
+  TDAPostgresDACDriver = class(TDADriverReference)
+  end;
+
+     { TDAEPostgresDACDriver }
+  TDAEPostgresDACDriver = class(TDAPostgresDriver)
+  private
+  protected
+    function GetConnectionClass: TDAEConnectionClass; override;
+
+       // IDADriver
+    function GetDriverID: string; override; safecall;
+    function GetDescription: string; override; safecall;
+    function GetAvailableDriverOptions: TDAAvailableDriverOptions; override; safecall;
+  end;
+
+     { TDAEMyConnection }
+  TDAEPostgresDACConnection = class(TDAEPostgresConnection)
+  private
+    function GetConnection: TPSQLDatabase;
+  protected
+    function CreateCustomConnection: TCustomConnection; override;
+
+    function GetDatasetClass: TDAEDatasetClass; override;
+    function GetStoredProcedureClass: TDAEStoredProcedureClass; override;
+
+    procedure DoApplyConnectionString(aConnStrParser: TDAConnectionStringParser;
+      aConnectionObject: TCustomConnection); override;
+
+    function DoBeginTransaction: integer; override;
+    procedure DoCommitTransaction; override;
+    procedure DoRollbackTransaction; override;
+    function DoGetInTransaction: boolean; override;
+    property Connection: TPSQLDatabase read GetConnection;
+  public
+  end;
+
+     { TDAEPostgresDACQuery }
+  TDAEPostgresDACQuery = class(TDAEDataset,IDAMustSetParams)
+  private
+
+  protected
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+    procedure ClearParams; override;
+    function DoExecute: integer; override;safecall;
+    function DoGetSQL: string; override;safecall;
+    procedure DoSetSQL(const Value: string); override;safecall;
+    procedure DoPrepare(Value: boolean); override;safecall;
+    procedure SetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+  public
+  end;
+
+     { TDAEPostgresDACStoredProcedure }
+  TDAEPostgresDACStoredProcedure = class(TDAEStoredProcedure,IDAMustSetParams)
+  private
+    fConnection:TDAEConnection;
+  protected
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+    function GetStoredProcedureName: string; override; safecall;
+    procedure SetStoredProcedureName(const Name: string); override; safecall;
+    function DoExecute: integer; override;safecall;    
+    function Execute: integer; override;safecall;
+    procedure SetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure RefreshParams; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}    
+  end;
+
+procedure Register;
+
+function GetDriverObject: IDADriver; stdcall;
+
+implementation
+
+uses
+  SysUtils,
+  uDADriverManager, uDARes;
+
+var
+  _driver: TDAEDriver = nil;
+
+procedure Register;
+begin
+  RegisterComponents(DAPalettePageName, [TDAPostgresDACDriver]);
+end;
+
+{$IFDEF DataAbstract_SchemaModelerOnly}
+{$INCLUDE ..\DataAbstract_SchemaModelerOnly.inc}
+{$ENDIF DataAbstract_SchemaModelerOnly}
+
+function GetDriverObject: IDADriver;
+begin
+  {$IFDEF DataAbstract_SchemaModelerOnly}
+  if not RunningInSchemaModeler then begin
+    result := nil;
+    exit;
+  end;
+  {$ENDIF}
+  if (_driver = nil) then _driver := TDAEPostgresDacDriver.Create(nil);
+  result := _driver;
+end;
+
+{$IFDEF LATEST_MyDAC}
+{$I uDACRLabsUtils.inc}
+{$ENDIF LATEST_MyDAC}
+
+{ TDAEPostgresDacConnection }
+
+function TDAEPostgresDacConnection.DoBeginTransaction: integer;
+begin
+  Connection.StartTransaction;
+  result := 0;
+end;
+
+procedure TDAEPostgresDacConnection.DoCommitTransaction;
+begin
+  Connection.Commit;
+end;
+
+function TDAEPostgresDacConnection.GetConnection: TPsqlDatabase;
+begin
+  result := TPsqlDatabase(inherited ConnectionObject);
+end;
+
+function TDAEPostgresDacConnection.CreateCustomConnection: TCustomConnection;
+begin
+  result := TPsqlDatabase.Create(nil);
+  TPsqlDatabase(result).LoginPrompt := false;
+end;
+
+function TDAEPostgresDacConnection.GetDatasetClass: TDAEDatasetClass;
+begin
+  result := TDAEPostgresDacQuery;
+end;
+
+function TDAEPostgresDacConnection.GetStoredProcedureClass: TDAEStoredProcedureClass;
+begin
+  result := TDAEPostgresDacStoredProcedure;
+end;
+
+procedure TDAEPostgresDacConnection.DoRollbackTransaction;
+begin
+  Connection.Rollback;
+end;
+
+function TDAEPostgresDacConnection.DoGetInTransaction: boolean;
+begin
+  result := Connection.InTransaction
+end;
+
+
+procedure TDAEPostgresDacConnection.DoApplyConnectionString(
+  aConnStrParser: TDAConnectionStringParser; aConnectionObject: TCustomConnection);
+var
+  i: Integer;
+begin
+  inherited;
+
+  with aConnStrParser do begin
+    Connection.DatabaseName := Database;
+
+    Connection.Host := Server;
+
+    if (Self.UserID <> '') then
+      Connection.Username := Self.UserID
+    else
+      Connection.Username := UserID;
+
+    if (Self.Password <> '') then
+      Connection.UserPassword := Self.Password
+    else
+      Connection.UserPassword := Password;
+
+    for i := 0 to AuxParamsCount -1 do
+    begin
+      if AuxParams[AuxParamNames[i]] <> '' then
+        Connection.Params.Add(AuxParamNames[i]+'='+AuxParams[AuxParamNames[i]]);
+    end;
+  end;
+end;
+
+
+{ TDAEPostgresDacDriver }
+
+function TDAEPostgresDacDriver.GetAvailableDriverOptions: TDAAvailableDriverOptions;
+begin
+  Result := [doServerName, doDatabaseName, doLogin, doCustom];
+end;
+
+function TDAEPostgresDacDriver.GetConnectionClass: TDAEConnectionClass;
+begin
+  result := TDAEPostgresDacConnection;
+end;
+
+function TDAEPostgresDacDriver.GetDescription: string;
+begin
+  result := 'MicroOlap DAC for Postgres Driver'{$IFDEF DataAbstract_SchemaModelerOnly} + SchemaModelerOnly{$ENDIF};
+end;
+
+function TDAEPostgresDacDriver.GetDriverID: string;
+begin
+  result := 'PostgresDAC';
+end;
+
+
+{ TDAEPostgresDacQuery }
+
+procedure TDAEPostgresDACQuery.ClearParams;
+begin
+  inherited;
+  TPSQLQuery(Dataset).Params.Clear;
+end;
+
+function TDAEPostgresDacQuery.CreateDataset(aConnection: TDAEConnection): TDataset;
+begin
+  result := TPSQLQuery.Create(nil);
+  TPSQLQuery(result).UniDirectional := True;
+  TPSQLQuery(result).RequestLive := false;
+  TPSQLQuery(result).Database := TDAEPostgresDacConnection(aConnection).Connection;
+end;
+
+function TDAEPostgresDacQuery.DoExecute: integer;
+begin
+  TPSQLQuery(Dataset).ExecSQL;
+  result := TPSQLQuery(Dataset).RowsAffected;
+end;
+
+function TDAEPostgresDacQuery.DoGetSQL: string;
+begin
+  result := TPSQLQuery(Dataset).SQL.Text;
+end;
+
+procedure TDAEPostgresDacQuery.DoPrepare(Value: boolean);
+begin
+  TPSQLQuery(Dataset).Prepared := Value;
+end;
+
+procedure TDAEPostgresDacQuery.DoSetSQL(const Value: string);
+begin
+  TPSQLQuery(Dataset).SQL.Text := Value;
+end;
+
+procedure TDAEPostgresDACQuery.GetParamValues(AParams: TDAParamCollection);
+begin
+  GetParamValuesStd(AParams, TPSQLQuery(Dataset).Params);
+end;
+
+procedure TDAEPostgresDACQuery.SetParamValues(AParams: TDAParamCollection);
+begin
+  SetParamValuesStd(AParams, TPSQLQuery(Dataset).Params);
+end;
+
+
+{ TDAEADOStoredProcedure }
+
+function TDAEPostgresDacStoredProcedure.CreateDataset(
+  aConnection: TDAEConnection): TDataset;
+begin
+  fConnection := aConnection;
+  result := TPSQLStoredProc.Create(nil);
+  TPSQLStoredProc(result).Database := TDAEPostgresDacConnection(aConnection).Connection;
+end;
+
+function TDAEPostgresDACStoredProcedure.DoExecute: integer;
+begin
+  TPSQLStoredProc(Dataset).ExecProc;
+  result := -1;
+end;
+
+function TDAEPostgresDacStoredProcedure.Execute: integer;
+var
+  i: integer;
+  _params: TDAParamCollection;
+begin
+  _params := GetParams;
+
+  with TPSQLStoredProc(Dataset) do begin
+    for i := 0 to (ParamCount-1) do
+      if (Params[i].ParamType in [ptInput, ptInputOutput]) then
+        Params[i].Value := _params.ParamByName(Params[i].Name).Value;
+
+    result := DoExecute;
+
+    for i := 0 to (ParamCount-1) do
+      if (Params[i].ParamType in [ptOutput, ptInputOutput, ptResult]) then
+        _params.ParamByName(Params[i].Name).Value := Params[i].Value;
+  end;
+end;
+
+procedure TDAEPostgresDACStoredProcedure.GetParamValues(
+  AParams: TDAParamCollection);
+begin
+  GetParamValuesStd(AParams,TPSQLStoredProc(Dataset).Params);
+end;
+
+function TDAEPostgresDacStoredProcedure.GetStoredProcedureName: string;
+begin
+  Result := TPSQLStoredProc(Dataset).StoredProcName;
+end;
+
+procedure TDAEPostgresDACStoredProcedure.RefreshParams;
+begin
+  RefreshParamsStd(TPSQLStoredProc(Dataset).Params);
+end;
+
+procedure TDAEPostgresDACStoredProcedure.SetParamValues(
+  AParams: TDAParamCollection);
+begin
+  SetParamValuesStd(AParams,TPSQLStoredProc(Dataset).Params);
+end;
+
+procedure TDAEPostgresDacStoredProcedure.SetStoredProcedureName(
+  const Name: string);
+begin
+  TPSQLStoredProc(Dataset).StoredProcName := Name;
+end;
+
+exports GetDriverObject name func_GetDriverObject;
+
+
+initialization
+  _driver := nil;
+  RegisterDriverProc(GetDriverObject);
+
+finalization
+  UnregisterDriverProc(GetDriverObject);
+  FreeAndNIL(_driver);
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDASDACDriver.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDASDACDriver.pas
new file mode 100644
index 0000000..7896c83
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDASDACDriver.pas	
@@ -0,0 +1,505 @@
+unit uDASDACDriver;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Driver Library
+{
+{ compiler: Delphi 6 and up
+{ platform: Win32
+{
+{ (c)opyright RemObjects Software. all rights reserved.
+{
+{ Using this code requires a valid license of the Data Abstract
+{ which can be obtained at http://www.remobjects.com.
+{----------------------------------------------------------------------------}
+
+{$IFDEF MSWINDOWS}
+{$I ..\DataAbstract.inc}
+{$ELSE}
+{$I ../DataAbstract.inc}
+{$ENDIF}
+
+{$R DataAbstract_SDACDriver_Glyphs.res}
+
+interface
+
+uses
+  DB, Classes, uDAEngine, uDAInterfaces, uDAADOInterfaces, uROClasses,
+  DBAccess, MSAccess, DASQLMonitor,
+  MSSQLMonitor, Variants, uDAUtils;
+
+type { TDASDACDriver }
+  TDASDACDriver = class(TDADriverReference)
+  end;
+
+     { TDAEADODriver }
+  TDAEADODriver = class(TDAMSSQLDriver)
+  private
+    fMonitor: TMSSQLMonitor;
+    fTraceCallBack: TDALogTraceEvent;
+
+    procedure OnSDACTrace(Sender: TObject; Text: string; Flag: TDATraceFlag);
+
+  protected
+    function GetConnectionClass: TDAEConnectionClass; override;
+    procedure DoSetTraceOptions(TraceActive: boolean; TraceOptions: TDATraceOptions; Callback: TDALogTraceEvent); override;
+
+       // IDADriver
+    function GetDriverID: string; override;
+    function GetDescription: string; override;
+    function GetAvailableDriverOptions: TDAAvailableDriverOptions; override; safecall;
+    function GetDefaultCustomParameters: String; override; safecall;
+    procedure GetAuxParams(const AuxDriver: string; out List: IROStrings); override;    
+  end;
+
+     { TDAEMSConnection }
+  TDAEMSConnection = class(TDAMSConnection, IDAADOConnection, IDACanQueryDatabaseNames)
+  private
+    fMSConnection: TMSConnection;
+
+//    procedure GetSysObjects(const aCondition: string; aList: TStrings);
+
+  protected
+    function CreateCustomConnection: TCustomConnection; override;
+
+    function GetDatasetClass: TDAEDatasetClass; override;
+    function GetStoredProcedureClass: TDAEStoredProcedureClass; override;
+
+    procedure DoApplyConnectionString(aConnStrParser: TDAConnectionStringParser;
+      aConnectionObject: TCustomConnection); override;
+
+    function DoBeginTransaction: integer; override;
+    procedure DoCommitTransaction; override;
+    procedure DoRollbackTransaction; override;
+    function DoGetInTransaction: boolean; override;
+    // IADOConnection
+    function GetProviderName: string; safecall;
+    function GetProviderType: TDAOleDBProviderType; safecall;
+    function GetCommandTimeout: Integer; safecall;
+    procedure SetCommandTimeout(const Value: Integer); safecall;
+  end;
+
+     { TDAEMSQuery }
+  TDAEMSQuery = class(TDAEDataset, IDAMustSetParams)
+  private
+
+  protected
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+    procedure ClearParams; override;
+    function DoExecute: integer; override;
+    function DoGetSQL: string; override;
+    procedure DoSetSQL(const Value: string); override;
+    procedure DoPrepare(Value: boolean); override;
+
+       // IDAMustSetParams
+    procedure SetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+  public
+  end;
+
+     { TDAEADOStoredProcedure }
+  TDAEADOStoredProcedure = class(TDAEStoredProcedure, IDAMustSetParams)
+  protected
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+
+    function GetStoredProcedureName: string; override;
+    procedure SetStoredProcedureName(const Name: string); override;
+    function DoExecute: integer; override;
+    function Execute: integer; override;
+    procedure RefreshParams; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+       // IDAMustSetParams
+    procedure SetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  end;
+
+procedure Register;
+
+function GetDriverObject: IDADriver; stdcall;
+
+implementation
+
+uses
+  SysUtils,
+  uDADriverManager, uDARes, OLEDBAccess,
+    uROBinaryHelpers;
+
+var
+  _driver: TDAEDriver = nil;
+
+procedure Register;
+begin
+  RegisterComponents(DAPalettePageName, [TDASDACDriver]);
+end;
+
+{$IFDEF DataAbstract_SchemaModelerOnly}
+{$INCLUDE ..\DataAbstract_SchemaModelerOnly.inc}
+{$ENDIF DataAbstract_SchemaModelerOnly}
+
+function GetDriverObject: IDADriver;
+begin
+  {$IFDEF DataAbstract_SchemaModelerOnly}
+  if not RunningInSchemaModeler then begin
+    result := nil;
+    exit;
+  end;
+  {$ENDIF}
+  if (_driver = nil) then _driver := TDAEADODriver.Create(nil);
+  result := _driver;
+end;
+
+{$I uDACRLabsUtils.inc}
+
+{ TDAEMSConnection }
+
+procedure TDAEMSConnection.DoApplyConnectionString(
+  aConnStrParser: TDAConnectionStringParser; aConnectionObject: TCustomConnection);
+var
+  adoconn: string;
+  i: integer;
+begin
+  inherited;
+
+  with aConnStrParser do begin
+    adoconn := Format(stdMSSQL_ConnectionString, [UserID, Password, Database, Server]);
+    adoconn := '';
+    if UserId <> '' then begin
+      if adoconn = '' then
+        AdoConn := 'User ID='+UserID
+      else
+        AdoConn := ADoConn + ';User ID='+UserID;
+    end;
+    if Password <> '' then begin
+      if adoconn = '' then
+        AdoConn := 'Password='+Password
+      else
+        AdoConn := ADoConn + ';Password='+Password;
+    end;
+    if DataBase <> '' then begin
+      if adoconn = '' then
+        AdoConn := 'Initial Catalog='+Database
+      else
+        AdoConn := ADoConn + ';Initial Catalog='+Database;
+    end;
+    if Server <> '' then begin
+      if adoconn = '' then
+        AdoConn := 'Data Source='+Server
+      else
+        AdoConn := ADoConn + ';Data Source='+Server;
+    end;
+
+    AdoConn := ADoConn + ';';
+    MSSQLSchemaEnabled := True; // by default
+    for i := 0 to AuxParamsCount -1 do
+    begin
+      if Uppercase(AuxParamNames[i]) = 'SCHEMAS' then
+        MSSQLSchemaEnabled := AuxParams['Schemas'] = '1'
+      else
+        adoconn := adoconn + AuxParamNames[i] + '=' + AuxParams[AuxParamNames[i]]+';';
+    end;
+
+    fMSConnection.ConnectString := adoconn;
+
+    if (Self.UserID <> '') then fMSConnection.Username := Self.UserID;
+
+    if (Self.Password <> '') then fMSConnection.Password := Self.Password;
+  end;
+end;
+
+function TDAEMSConnection.DoBeginTransaction: integer;
+begin
+  fMSConnection.StartTransaction;
+  result := 0;
+end;
+
+procedure TDAEMSConnection.DoCommitTransaction;
+begin
+  fMSConnection.Commit;
+end;
+
+function TDAEMSConnection.CreateCustomConnection: TCustomConnection;
+begin
+  fMSConnection := TMSConnection.Create(nil);
+  fMSConnection.LoginPrompt := FALSE;
+
+  result := fMSConnection;
+end;
+
+function TDAEMSConnection.GetDatasetClass: TDAEDatasetClass;
+begin
+  result := TDAEMSQuery;
+end;
+
+function TDAEMSConnection.GetStoredProcedureClass: TDAEStoredProcedureClass;
+begin
+  result := TDAEADOStoredProcedure;
+end;
+
+procedure TDAEMSConnection.DoRollbackTransaction;
+begin
+  fMSConnection.Rollback;
+end;
+
+function TDAEMSConnection.DoGetInTransaction: boolean;
+begin
+  result := fMSConnection.InTransaction
+end;
+
+function TDAEMSConnection.GetProviderName: string;
+begin
+  result := oledb_MSSQLId;
+end;
+
+function TDAEMSConnection.GetProviderType: TDAOleDBProviderType;
+begin
+  result := oledb_MSSQL;
+end;
+
+function TDAEMSConnection.GetCommandTimeout: Integer;
+begin
+   if fMSConnection <> nil then
+     Result := fMSConnection.ConnectionTimeout
+   else
+     Result:=0;
+end;
+
+procedure TDAEMSConnection.SetCommandTimeout(const Value: Integer);
+begin
+  if fMSConnection <> nil then
+  fMSConnection.ConnectionTimeout := Value;
+end;
+
+{ TDAEADODriver }
+
+function TDAEADODriver.GetConnectionClass: TDAEConnectionClass;
+begin
+  result := TDAEMSConnection;
+end;
+
+function TDAEADODriver.GetDescription: string;
+begin
+  result := 'Core Lab SDAC Driver'{$IFDEF DataAbstract_SchemaModelerOnly} + SchemaModelerOnly{$ENDIF};
+end;
+
+function TDAEADODriver.GetDriverID: string;
+begin
+  result := 'SDAC';
+end;
+
+procedure TDAEADODriver.OnSDACTrace(Sender: TObject; Text: string; Flag: TDATraceFlag);
+begin
+  if Assigned(fTraceCallback) then fTraceCallback(Sender, Text, integer(Flag));
+end;
+
+procedure TDAEADODriver.DoSetTraceOptions(TraceActive: boolean; TraceOptions: TDATraceOptions; Callback: TDALogTraceEvent);
+var
+  sdacopts: TDATraceFlags;
+begin
+  inherited;
+
+  if TraceActive then begin
+    if (fMonitor = nil) then fMonitor := TMSSQLMonitor.Create(Self);
+
+    fMonitor.Active := FALSE;
+    fMonitor.OnSQL := OnSDACTrace;
+
+    sdacopts := [];
+    if (toPrepare in TraceOptions) then sdacopts := sdacopts + [tfQPrepare];
+    if (toExecute in TraceOptions) then sdacopts := sdacopts + [tfQExecute];
+    if (toFetch in TraceOptions) then sdacopts := sdacopts + [tfQFetch];
+    if (toError in TraceOptions) then sdacopts := sdacopts + [tfError];
+    if (toStmt in TraceOptions) then sdacopts := sdacopts + [tfStmt];
+    if (toConnect in TraceOptions) then sdacopts := sdacopts + [tfConnect];
+    if (toTransact in TraceOptions) then sdacopts := sdacopts + [tfTransact];
+    if (toBlob in TraceOptions) then sdacopts := sdacopts + [tfBlob];
+    if (toService in TraceOptions) then sdacopts := sdacopts + [tfService];
+    if (toMisc in TraceOptions) then sdacopts := sdacopts + [tfMisc];
+    if (toParams in TraceOptions) then sdacopts := sdacopts + [tfParams];
+
+    fTraceCallBack := Callback;
+
+    fMonitor.TraceFlags := sdacopts;
+    fMonitor.Active := TRUE;
+  end
+  else begin
+    FreeAndNIL(fMonitor);
+    fTraceCallback := nil;
+  end;
+end;
+
+function TDAEADODriver.GetAvailableDriverOptions: TDAAvailableDriverOptions;
+begin
+  result := [doServerName, doDatabaseName, doLogin, doCustom];
+end;
+
+function TDAEADODriver.GetDefaultCustomParameters: String;
+begin
+  Result := 'Schemas=1;Integrated Security=SSPI';
+end;
+
+
+
+procedure TDAEADODriver.GetAuxParams(const AuxDriver: string;
+  out List: IROStrings);
+begin
+  inherited;
+  MSSQL_GetAuxParams(List);
+end;
+
+{ TDAEMSQuery }
+
+procedure TDAEMSQuery.ClearParams;
+begin
+  inherited;
+  TMSQuery(Dataset).Params.Clear;
+end;
+
+function TDAEMSQuery.CreateDataset(aConnection: TDAEConnection): TDataset;
+begin
+  result := TMSQuery.Create(nil);
+
+  TMSQuery(result).FetchAll := True;  //for preventing creating an additional session when you call StartTransaction (an known issue of OLEDB)
+  TMSQuery(result).Unidirectional := True;
+  TMSQuery(result).ReadOnly := TRUE;
+  TMSQuery(result).Connection := TDAEMSConnection(aConnection).fMSConnection;
+//  TMSQuery(result).Options.AutoPrepare:=True;
+end;
+
+function TDAEMSQuery.DoExecute: integer;
+begin
+  TMSQuery(Dataset).Execute;
+  result := TMSQuery(Dataset).RowsAffected;
+end;
+
+function TDAEMSQuery.DoGetSQL: string;
+begin
+  result := TMSQuery(Dataset).SQL.Text;
+end;
+
+procedure TDAEMSQuery.DoPrepare(Value: boolean);
+var
+  i: integer;
+  par: TMSParam;
+begin
+  if Value and not TMSQuery(Dataset).Prepared and (TMSQuery(Dataset).ParamCount<>0) then begin
+    for I := 0 to GetParams.Count - 1 do begin
+      par:=TMSQuery(Dataset).ParamByName(GetParams[i].Name);
+      par.DataType:= DATypeToVCLType(GetParams[i].DataType);
+      if par.DataType = ftAutoInc then par.DataType:= ftInteger;
+    end;
+  end;
+  TMSQuery(Dataset).Prepared := Value;
+end;
+
+procedure TDAEMSQuery.DoSetSQL(const Value: string);
+begin
+  TMSQuery(Dataset).SQL.Text := Value;
+end;
+
+procedure TDAEMSQuery.GetParamValues(AParams: TDAParamCollection);
+var
+  I: Integer;
+  lParam: TMSParam;
+begin
+  for i := 0 to TMSQuery(DataSet).Params.Count - 1 do begin
+    lParam:=TMSQuery(DataSet).Params[i];
+    if (lParam.ParamType in [ptOutput, ptInputOutput, ptResult]) then
+      Aparams.ParamByName(lParam.Name).Value := lParam.Value;
+  end;
+end;
+
+procedure TDAEMSQuery.SetParamValues(AParams: TDAParamCollection);
+begin
+  WriteCrLabsParamValues(AParams, TMSQuery(Dataset).Params, true);
+end;
+
+{ TDAEADOStoredProcedure }
+
+function TDAEADOStoredProcedure.CreateDataset(
+  aConnection: TDAEConnection): TDataset;
+begin
+  result := TMSStoredProc.Create(nil);
+  TMSStoredProc(result).Connection := TDAEMSConnection(aConnection).fMSConnection;
+end;
+
+function TDAEADOStoredProcedure.Execute: integer;
+var
+  i: integer;
+  _params: TDAParamCollection;
+  lParam: uDAInterfaces.TDAParam;
+begin
+  _params := GetParams;
+
+  with TMSStoredProc(Dataset) do begin
+    for i := 0 to (Params.Count - 1) do
+      if (Params[i].ParamType in [ptInput, ptInputOutput]) then begin
+        lParam := _params.ParamByName(Params[i].Name);
+        if (Params[i].DataType in [ftMemo, ftBlob, ftGraphic]) and VarIsArray(lParam.Value)then
+          Params[i].Value := VariantBinaryToString(lParam.Value)
+        else
+          Params[i].Value := lParam.Value;
+      end;
+
+    result := DoExecute;
+
+    for i := 0 to (_params.Count-1) do
+      if (_params[i].ParamType in [daptOutput, daptInputOutput, daptResult])
+        then _params[i].Value := params.ParamByName(_params[i].Name).Value;
+  end;
+end;
+
+procedure TDAEADOStoredProcedure.GetParamValues(AParams: TDAParamCollection);
+var
+  i: Integer;
+  lParam: TMSParam;
+begin
+  for i := 0 to TMSStoredProc(DataSet).Params.Count - 1 do begin
+    lParam:=TMSStoredProc(DataSet).Params[i];
+    if (lParam.ParamType in [ptOutput, ptInputOutput, ptResult]) then
+      Aparams.ParamByName(lParam.Name).Value := lParam.Value;
+    end;
+end;
+
+
+function TDAEADOStoredProcedure.GetStoredProcedureName: string;
+begin
+  result := TMSStoredProc(Dataset).StoredProcName;
+end;
+
+procedure TDAEADOStoredProcedure.SetStoredProcedureName(
+  const Name: string);
+begin
+  TMSStoredProc(Dataset).StoredProcName := Name;
+end;
+
+procedure TDAEADOStoredProcedure.SetParamValues(AParams: TDAParamCollection);
+begin
+  WriteCrLabsParamValues(AParams, TMSStoredProc(Dataset).Params);
+end;
+
+
+exports
+  GetDriverObject name func_GetDriverObject;
+
+procedure TDAEADOStoredProcedure.RefreshParams;
+begin
+  RefreshParamsStd(TMSStoredProc(Dataset).Params);
+end;
+
+function TDAEADOStoredProcedure.DoExecute: integer;
+begin
+  with TMSStoredProc(Dataset) do begin
+    ExecProc;
+    result := RowsAffected;
+  end;
+end;
+
+initialization
+  _driver := nil;
+  RegisterDriverProc(GetDriverObject);
+
+finalization
+  UnregisterDriverProc(GetDriverObject);
+  FreeAndNIL(_driver);
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDASQLiteDriver.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDASQLiteDriver.pas
new file mode 100644
index 0000000..6577bb6
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDASQLiteDriver.pas	
@@ -0,0 +1,373 @@
+unit uDASQLiteDriver;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Driver Library
+{
+{ compiler: Delphi 6 and up, Kylix 3 and up
+{ platform: Win32, Linux
+{
+{ (c)opyright RemObjects Software. all rights reserved.
+{
+{ Using this code requires a valid license of the Data Abstract
+{ which can be obtained at http://www.remobjects.com.
+{----------------------------------------------------------------------------}
+
+{$IFDEF MSWINDOWS}
+{$I ..\DataAbstract.inc}
+{$ELSE}
+{$I ../DataAbstract.inc}
+{$ENDIF}
+
+{$R DataAbstract_SQLiteDriver_Glyphs.res}
+
+interface
+
+uses Windows, Classes, DB, uDAEngine, uDAInterfaces, uROClasses, uDAUtils, ASGSQLite3, uDASQLiteInterfaces;
+
+type
+  { TDASQLiteDriver }
+  TDASQLiteDriver = class(TDADriverReference)
+  end;
+
+  { TDAESQLiteDriver }
+  TDAESQLiteDriver = class(uDASQLiteInterfaces.TDASQLiteDriver, IDADriver40)
+  protected
+    function GetConnectionClass: TDAEConnectionClass; override;
+
+    // IDADriver
+    function GetDriverID: string; override;
+    function GetDescription: string; override;
+
+    procedure GetAuxParams(const AuxDriver: string; out List: IROStrings); override;
+
+    function GetAvailableDriverOptions: TDAAvailableDriverOptions; override;
+    // IDADriver40
+    function GetProviderDefaultCustomParameters(Provider: string): string; safecall;
+  public
+  end;
+
+  // for access to protected methods
+  TDAASQLite3DB = class(TASQLite3DB)
+  private
+  public
+    function GetLastInsertRow: integer;
+  end;
+
+  { TSQLiteConnection }
+  TSQLiteConnection = class(TDAConnectionWrapper)
+  private
+    fConnection: TDAASQLite3DB;
+  protected
+    function GetConnected: Boolean; override;
+    procedure SetConnected(Value: Boolean); override;
+  public
+    constructor Create(AOwner: TComponent); override;
+    destructor Destroy; override;
+    property Connection: TDAASQLite3DB read fConnection;
+  end;
+
+  { TDAESQLiteConnection }
+  TDAESQLiteConnection = class(TDASQLiteConnection)
+  private
+    FtransactionFlag: Boolean;
+    fConnection: TSQLiteConnection;
+  protected
+    // TDAEConnection
+    function CreateCustomConnection: TCustomConnection; override;
+    function GetDatasetClass: TDAEDatasetClass; override;
+    procedure DoApplyConnectionString(aConnStrParser: TDAConnectionStringParser; aConnectionObject: TCustomConnection); override;
+    function DoBeginTransaction: integer; override;
+    procedure DoCommitTransaction; override;
+    procedure DoRollbackTransaction; override;
+    function DoGetInTransaction: boolean; override;
+    function DoGetLastAutoInc(const GeneratorName: string): integer; override;
+    procedure DoGetForeignKeys(out ForeignKeys: TDADriverForeignKeyCollection); override;
+    procedure DoGetTableFields(const aTableName: string; out Fields: TDAFieldCollection); override;
+
+    function IdentifierNeedsQuoting(const iIdentifier: string): boolean; override; safecall;
+  public
+    constructor Create(aDriver: TDAEDriver; aName: string = ''); override;
+  end;
+
+  { TDAESQLiteQuery }
+  TDAESQLiteQuery = class(TDAEDataset,IDAMustSetParams)
+  private
+  protected
+    procedure ClearParams; override;
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+    procedure DoPrepare(Value: boolean); override; safecall;
+    function DoExecute: integer; override;
+    function DoGetSQL: string; override;
+    procedure DoSetSQL(const Value: string); override;
+    procedure SetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  end;
+
+procedure Register;
+
+function GetDriverObject: IDADriver; stdcall;
+
+implementation
+
+uses SysUtils, uDADriverManager, uDARes, Variants,
+  uROBinaryHelpers, uDASQL92Interfaces;
+
+var
+  _driver: TDAEDriver = nil;
+
+procedure Register;
+begin
+  RegisterComponents(DAPalettePageName, [TDASQLiteDriver]);
+end;
+
+{$IFDEF DataAbstract_SchemaModelerOnly}
+{$INCLUDE ..\DataAbstract_SchemaModelerOnly.inc}
+{$ENDIF DataAbstract_SchemaModelerOnly}
+
+function GetDriverObject: IDADriver;
+begin
+  if (_driver = nil) then _driver := TDAESQLiteDriver.Create(nil);
+  result := _driver;
+end;
+
+{ TSQLiteConnection }
+
+constructor TSQLiteConnection.Create(AOwner: TComponent);
+begin
+  inherited;
+  fConnection := TDAASQLite3DB.Create(nil);
+end;
+
+destructor TSQLiteConnection.Destroy;
+begin
+  inherited;
+  fConnection.Free;
+end;
+
+function TSQLiteConnection.GetConnected: Boolean;
+begin
+  result := fConnection.Connected;
+end;
+
+procedure TSQLiteConnection.SetConnected(Value: Boolean);
+begin
+  fConnection.Connected := Value;
+end;
+
+{ TDAESQLiteConnection }
+
+procedure TDAESQLiteConnection.DoApplyConnectionString(
+  aConnStrParser: TDAConnectionStringParser; aConnectionObject: TCustomConnection);
+var
+  sName, sValue: string;
+  i: integer;
+begin
+  inherited;
+  with aConnStrParser do begin
+    TSQLiteConnection(aConnectionObject).Connection.Database := Database;
+    for i := 0 to (AuxParamsCount - 1) do begin
+      sName := AuxParamNames[i];
+      sValue := AuxParams[sName];
+      if AnsiSameText(sName, 'TransactionType') then begin
+        if AnsiSameText(sValue, 'DEFAULT') or
+          AnsiSameText(sValue, 'DEFERRED') or
+          AnsiSameText(sValue, 'IMMEDIATE') or
+          AnsiSameText(sValue, 'EXCLUSIVE') then
+          fConnection.fConnection.TransactionType := AnsiUpperCase(sValue);
+      end
+      else if AnsiSameText(sName, 'DriverDll') then begin
+        fConnection.fConnection.DriverDll := sValue
+      end
+      else if AnsiSameText(sName, 'CharacterEncoding') then begin
+        if AnsiSameText(sValue, 'STANDARD') or
+          AnsiSameText(sValue, 'UTF8') then
+          fConnection.fConnection.CharacterEncoding := AnsiUpperCase(sValue);
+      end;
+    end;
+  end;
+end;
+
+function TDAESQLiteConnection.DoBeginTransaction: integer;
+begin
+  result := -1;
+  fConnection.Connection.StartTransaction;
+  FtransactionFlag := True;
+end;
+
+procedure TDAESQLiteConnection.DoCommitTransaction;
+begin
+  fConnection.Connection.Commit;
+  FtransactionFlag := False;
+end;
+
+function TDAESQLiteConnection.CreateCustomConnection: TCustomConnection;
+begin
+  fConnection := TSQLiteConnection.Create(nil);
+  result := fConnection;
+end;
+
+function TDAESQLiteConnection.GetDatasetClass: TDAEDatasetClass;
+begin
+  result := TDAESQLiteQuery;
+end;
+
+procedure TDAESQLiteConnection.DoRollbackTransaction;
+begin
+  FtransactionFlag := False;
+  fConnection.Connection.RollBack;
+end;
+
+function TDAESQLiteConnection.DoGetInTransaction: boolean;
+begin
+  Result := FtransactionFlag;
+end;
+
+procedure TDAESQLiteConnection.DoGetTableFields(const aTableName: string;
+  out Fields: TDAFieldCollection);
+var
+  List: TList;
+  i: integer;
+  fld: TDAField;
+begin
+  inherited DoGetTableFields(QuoteIdentifierIfNeeded(aTableName), Fields);
+  List := TList.Create;
+  try
+    fConnection.Connection.GetTableInfo(aTableName, List);
+    for i := 0 to List.Count - 1 do
+      with TASQLite3Field(List[i]) do begin
+        fld := Fields.FieldByName(FieldName);
+        fld.Required := FieldNN <> 0;
+        fld.InPrimaryKey := FieldPK <> 0;
+        if fld.InPrimaryKey then fld.Required := True;
+        fld.DefaultValue := FieldDefault;
+      end;
+  finally
+    List.Free;
+  end;
+end;
+
+function TDAESQLiteConnection.IdentifierNeedsQuoting(
+  const iIdentifier: string): boolean;
+begin
+  Result := inherited IdentifierNeedsQuoting(iIdentifier) or
+    SQL92_IdentifierNeedsQuoting(iIdentifier);
+end;
+
+constructor TDAESQLiteConnection.Create(aDriver: TDAEDriver;
+  aName: string);
+begin
+  inherited;
+  FtransactionFlag := False;
+end;
+
+function TDAESQLiteConnection.DoGetLastAutoInc(
+  const GeneratorName: string): integer;
+begin
+  Result := fConnection.Connection.GetLastInsertRow;
+end;
+
+procedure TDAESQLiteConnection.DoGetForeignKeys(
+  out ForeignKeys: TDADriverForeignKeyCollection);
+begin
+  inherited;
+  // SQL Features That SQLite Does Not Implement
+end;
+
+{ TDAESQLiteDriver }
+
+function TDAESQLiteDriver.GetAvailableDriverOptions: TDAAvailableDriverOptions;
+begin
+  result := [doDatabaseName, doCustom];
+end;
+
+function TDAESQLiteDriver.GetConnectionClass: TDAEConnectionClass;
+begin
+  result := TDAESQLiteConnection;
+end;
+
+function TDAESQLiteDriver.GetDescription: string;
+begin
+  result := 'SQLite Driver';
+end;
+
+function TDAESQLiteDriver.GetDriverID: string;
+begin
+  result := 'SQLite';
+end;
+
+procedure TDAESQLiteDriver.GetAuxParams(const AuxDriver: string;
+  out List: IROStrings);
+begin
+  inherited;
+  List.Add('TransactionType=(DEFAULT,DEFERRED,IMMEDIATE,EXCLUSIVE)');
+  List.Add('DriverDll=SQLite3.dll');
+  List.Add('CharacterEncoding=(STANDARD,UTF8)');
+end;
+
+function TDAESQLiteDriver.GetProviderDefaultCustomParameters(
+  Provider: string): string;
+begin
+  Result := '';
+end;
+
+{ TDAESQLiteQuery }
+
+procedure TDAESQLiteQuery.ClearParams;
+begin
+  inherited;
+  TASQLite3Query(Dataset).Params.Clear;
+end;
+
+function TDAESQLiteQuery.CreateDataset(aConnection: TDAEConnection): TDataset;
+begin
+  result := TASQLite3Query.Create(nil);
+  TASQLite3Query(result).Connection := TDAESQLiteConnection(aConnection).fConnection.Connection;
+end;
+
+function TDAESQLiteQuery.DoExecute: integer;
+begin
+  Result := -1;
+  TASQLite3Query(Dataset).ExecSQL;
+end;
+
+function TDAESQLiteQuery.DoGetSQL: string;
+begin
+  result := TASQLite3Query(Dataset).SQL.Text;
+end;
+
+procedure TDAESQLiteQuery.DoPrepare(Value: boolean);
+begin
+  // nothing
+end;
+
+procedure TDAESQLiteQuery.DoSetSQL(const Value: string);
+begin
+  TASQLite3Query(Dataset).SQL.Text := Value;
+end;
+
+procedure TDAESQLiteQuery.GetParamValues(AParams: TDAParamCollection);
+begin
+  GetParamValuesStd(AParams, TASQLite3Query(Dataset).Params);
+end;
+
+procedure TDAESQLiteQuery.SetParamValues(AParams: TDAParamCollection);
+begin
+  SetParamValuesStd(AParams, TASQLite3Query(Dataset).Params);
+end;
+
+exports GetDriverObject name func_GetDriverObject;
+{ TDAASQLite3DB }
+
+function TDAASQLite3DB.GetLastInsertRow: integer;
+begin
+  result := SQLite3_LastInsertRow(DBHandle)
+end;
+
+initialization
+  _driver := nil;
+  RegisterDriverProc(GetDriverObject);
+finalization
+  UnregisterDriverProc(GetDriverObject);
+  FreeAndNIL(_driver);
+end.
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAZeosDriver.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAZeosDriver.pas
new file mode 100644
index 0000000..ff3d1bc
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Drivers/uDAZeosDriver.pas	
@@ -0,0 +1,1227 @@
+unit uDAZeosDriver;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Driver Library                                     }
+{                                                                            }
+{ compiler: Delphi 6 and up , FPC                                            }
+{ platform: Win32                                                            }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFDEF MSWINDOWS}
+{$I ..\DataAbstract.inc}
+{$ELSE}
+{$I ../DataAbstract.inc}
+{$ENDIF}
+
+interface
+
+uses Classes, DB,
+  ZDbcIntfs, ZConnection, ZSqlMetadata,
+  uDAInterfaces,
+  uDAADOInterfaces,
+  uDAIBInterfaces,
+  uDASQLiteInterfaces,
+  uDAOracleInterfaces,
+  uDAMySQLInterfaces,
+  uDADB2Interfaces,
+  uDASybaseInterfaces,
+  uDAPostgresInterfaces,
+  uROClasses, uDAEngine, uDAUtils;
+
+type
+  TDAZEOSDriverType = (
+    dazUnknown,
+    dazADO,
+    dazASA,
+    dazIBMDB2,
+    dazInterBase,
+    dazMSSQL,
+    dazMySQL,
+    dazOracle,
+    dazPostgreSQL,
+    dazSQLite,
+    dazSybase);
+
+const
+  ZEOS_ADO                    = 'ado';
+  ZEOS_ASA                    = 'asa';
+  ZEOS_IBMDB2                 = 'db2';
+  ZEOS_Interbase              = 'interbase';
+  ZEOS_Firebird               = 'firebird';
+  ZEOS_MSSQL                  = 'mssql';
+  ZEOS_MySQL                  = 'mysql';
+  ZEOS_ORACLE                 = 'oracle';
+  ZEOS_PostgreSQL             = 'postgresql';
+  ZEOS_SQLite                 = 'sqlite';
+  ZEOS_SYBASE                 = 'sybase';
+
+type
+  { TDAZeosDriver }
+  TDAZeosDriver = class(TDADriverReference)
+  end;
+
+  { TDAESampleDriver }
+  TDAESampleDriver = class(TDAEDriver, IDADriver40)
+    //  TDAESampleDriver = class(TDAIBDriver, IDADriver40)
+  protected
+    function GetConnectionClass: TDAEConnectionClass; override;
+    //procedure CustomizeConnectionObject(aConnection: TDAEConnection); override;
+    //procedure DoSetTraceOptions(TraceActive: boolean; TraceFlags: TDATraceOptions; Callback: TDALogTraceEvent); override;
+
+    { IDADriver }
+    function GetDriverID: string; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetDescription: string; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // function GetMajVersion: byte; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // function GetMinVersion: byte; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetAuxDrivers(out List: IROStrings); override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetAuxParams(const AuxDriver: string; out List: IROStrings); override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAvailableDriverOptions: TDAAvailableDriverOptions; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAvailableDriverOptionsEx(AuxDriver: string): TDAAvailableDriverOptions; override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // procedure Initialize; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // procedure Finalize; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // function GetDefaultCustomParameters: string; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetDefaultConnectionType(const AuxDriver: string): string; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    { IDADriver40 }
+    function GetProviderDefaultCustomParameters(Provider: string): string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  public
+  end;
+
+  TZEOSConnection = class(TDAConnectionWrapper)
+  private
+    fConnection: TZConnection;
+    fMetaData: TZSQLMetaData;
+  protected
+    function GetConnected: Boolean; override;
+    procedure SetConnected(Value: boolean); override;
+  public
+    constructor Create(AOwner: TComponent); override;
+    destructor Destroy; override;
+    property Connection: TZConnection read fConnection write fConnection;
+  end;
+
+  { TDAESampleConnection }
+  TDAESampleConnection = class(TDAEConnection, IDAConnection,
+      IDAADOConnection,
+      IDAInterbaseConnection,           //IDAIBTransactionAccess, IDAIBConnectionProperties,
+      IDAOracleConnection,
+      IDAMySQLConnection,
+      IDASQLiteConnection,
+      IDADB2Connection,
+      IDASybaseConnection,
+      IDAPostgresConnection,
+      // IDAConnectionModelling,
+      IDACanQueryDatabaseNames,
+      IDAFileBasedDatabase,
+      // IDADirectoryBasedDatabase,
+      IDAUseGenerators,
+      IDACanQueryGeneratorsNames,
+      IDATestableObject)
+  private
+    fNativeConnection: TZEOSConnection;
+    fDriverType: TDAZEOSDriverType;
+    fDriverName: string;
+    fADOProviderName: string;
+    fADOProviderType: TDAOleDBProviderType;
+    fMSSQLSchemaEnabled: Boolean;
+    FMySQLVersion: integer;
+    function GetMySQLVersion: integer;
+    procedure DoGetNames(AList: IROStrings; AObjectType: TDAObjecttype);
+    function ZEOS_GetMetaData: IZDatabaseMetadata;
+    procedure FixWideStringBug(AFields: TDAFieldCollection);
+  protected
+    function QueryInterface(const IID: TGUID; out Obj): HResult; override; stdcall;
+
+    function CreateCustomConnection: TCustomConnection; override;
+    function CreateMacroProcessor: TDASQLMacroProcessor; override;
+    function GetDatasetClass: TDAEDatasetClass; override;
+    function GetStoredProcedureClass: TDAEStoredProcedureClass; override;
+    procedure DoApplyConnectionString(aConnStrParser: TDAConnectionStringParser; aConnectionObject: TCustomConnection); override;
+
+    // transaction support
+    function DoBeginTransaction: integer; override;
+    procedure DoCommitTransaction; override;
+    procedure DoRollbackTransaction; override;
+    function DoGetInTransaction: boolean; override;
+
+    procedure DoGetTableNames(out List: IROStrings); override;
+    procedure DoGetViewNames(out List: IROStrings); override;
+    procedure DoGetStoredProcedureNames(out List: IROStrings); override;
+
+    procedure DoGetTableFields(const aTableName: string; out Fields: TDAFieldCollection); override;
+    procedure DoGetQueryFields(const aSQL: string; aParamsIfNeeded: TDAParamCollection; out Fields: TDAFieldCollection); override;
+    //procedure DoGetViewFields(const aViewName: string; out Fields: TDAFieldCollection); override;
+
+    procedure DoGetStoredProcedureParams(const aStoredProcedureName: string; out Params: TDAParamCollection); override;
+    procedure DoGetForeignKeys(out ForeignKeys: TDADriverForeignKeyCollection); override;
+
+    function DoGetLastAutoInc(const GeneratorName: string): integer; override;
+
+    { IDATestableObject }
+    // procedure Test; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    { IDAConnection }
+
+    function GetSPSelectSyntax(HasArguments: Boolean): string; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetQuoteChars: TDAQuoteCharArray; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // function IdentifierIsQuoted(const iIdentifier: string): boolean; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function IdentifierNeedsQuoting(const iIdentifier: string): boolean; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // function QuoteIdentifierIfNeeded(const iIdentifier: string): string; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // function QuoteIdentifier(const iIdentifier: string): string; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // function QuoteFieldNameIfNeeded(const aTableName, aFieldName: string): string; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // function QuoteFieldName(const aTableName, aFieldName: string): string; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    // function NewCommand(const Text: string; CommandType: TDASQLStatementType; const aCommandName: string = ''): IDASQLCommand; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // function NewDataset(const SQL: string; const aDatasetName: string = ''): IDADataset; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    // function isAlive: Boolean; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // function GetQueryBuilder: TDAQueryBuilder; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    { IDAADOConnection }
+    function GetProviderName: string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetProviderType: TDAOleDBProviderType; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetCommandTimeout: Integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetCommandTimeout(const Value: Integer); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    { IDAInterbaseConnection }
+    // nothing
+
+    { IDAIBTransactionAccess }
+    //function GetTransaction: TObject; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    //procedure CommitRetaining; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    //procedure RollbackRetaining; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    { IDAIBConnectionProperties }
+    function GetRole: string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetRole(const Value: string); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetSQLDialect: integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetSQLDialect(Value: integer); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetCharset: string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetCharset(const Value: string); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    procedure Commit; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // procedure CommitRetaining; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure Rollback; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // procedure RollbackRetaining; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    { IDAOracleConnection }
+    // nothing
+
+    { IDAConnectionModelling }
+    // function FieldToDeclaration(aField: TDAField): string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // function BuildCreateTableSQL(aDataSet: TDADataSet; const aOverrideName: string = ''): string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // procedure CreateTable(aDataSet: TDADataSet; const aOverrideName: string = ''); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    { IDACanQueryDatabaseNames }
+    function GetDatabaseNames: IROStrings;
+
+    { IDAFileBasedDatabase }
+    function GetFileExtensions: IROStrings;
+
+    { IDADirectoryBasedDatabase }
+    // nothing
+
+    { IDAUseGenerators }
+    function GetNextAutoinc(const GeneratorName: string): integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    { IDACanQueryGeneratorsNames }
+    function GetGeneratorNames: IROStrings;
+
+  public
+    constructor Create(aDriver: TDAEDriver; aName: string = ''); override;
+  end;
+
+  { TDAESampleQuery }
+  TDAESampleQuery = class(TDAEDataset , IDAMustSetParams)
+  protected
+    // procedure PrepareSQLStatement; override;
+    procedure ClearParams; override;
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+    procedure DoPrepare(Value: boolean); override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function DoExecute: integer; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure DoSetSQL(const Value: string); override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function DoGetSQL: string; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // function intVCLTypeToDAType(aFieldType: TFieldType): TDADataType;override;
+
+    { IDASQLCommand }
+    // procedure RefreshParams; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // function Execute: integer; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // function DoGetRecordCount: integer; override;
+    // function DoGetActive: boolean; override;
+    // procedure DoSetActive(Value: boolean); override;
+    // function DoGetBOF: boolean; override;
+    // function DoGetEOF: boolean; override;
+    // procedure DoNext; override;
+    // function DoLocate(const KeyFields: string; const KeyValues: Variant; Options: TLocateOptions): Boolean; override;
+
+    // IDAMustSetParams
+    procedure SetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  public
+  end;
+
+  { TDAESampleStoredProcedure }
+  TDAESampleStoredProcedure = class(TDAEStoredProcedure, IDAMustSetParams)
+  protected
+    // Internal
+    // function DoGetStoredProcedureName: string; override;
+    // procedure DoSetStoredProcedureName(const Name: string); override;
+    procedure DoPrepare(Value: boolean); override;
+    procedure RefreshParams; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    // IDAStoredProcedure
+    function GetStoredProcedureName: string; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetStoredProcedureName(const Name: string); override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    // procedure PrepareSQLStatement; override;
+    function CreateDataset(aConnection: TDAEConnection): TDataset; override;
+    function DoExecute: integer; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure DoSetSQL(const Value: string); override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function DoGetSQL: string; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // function intVCLTypeToDAType(aFieldType: TFieldType): TDADataType;override;
+
+    { IDASQLCommand }
+    // procedure RefreshParams; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // function Execute: integer; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // function DoGetRecordCount: integer; override;
+    // function DoGetActive: boolean; override;
+    // procedure DoSetActive(Value: boolean); override;
+    // function DoGetBOF: boolean; override;
+    // function DoGetEOF: boolean; override;
+    // procedure DoNext; override;
+    // function DoLocate(const KeyFields: string; const KeyValues: Variant; Options: TLocateOptions): Boolean; override;
+
+    // IDAMustSetParams
+    procedure SetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(AParams: TDAParamCollection); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  end;
+
+procedure Register;
+
+function GetDriverObject: IDADriver; stdcall;
+
+implementation
+
+uses
+  {$IFDEF FPC}LResources,{$ENDIF}
+  {$IFDEF MSWINDOWS}Windows, {$ENDIF}
+  Variants, Types, SysUtils,
+  uDADriverManager, uDARes, uDASQL92Interfaces,
+  zClasses, ZDataset, ZStoredProcedure;
+
+{$IFNDEF FPC}
+  {$R DataAbstract_ZeosDriver_Glyphs.res}
+{$ENDIF}
+
+var
+  _driver                     : TDAEDriver = nil;
+
+procedure Register;
+begin
+  RegisterComponents(DAPalettePageName, [TDAZeosDriver]);
+end;
+
+function GetDriverObject: IDADriver;
+begin
+  if (_driver = nil) then _driver := TDAESampleDriver.Create(nil);
+  result := _driver;
+end;
+
+function ZEOSDriverIdToZEOSDriverType(aAuxDriver: string): TDAZEOSDriverType;
+begin
+  aAuxDriver := LowerCase(aAuxDriver);
+  if aAuxDriver = '' then Result := dazUnknown
+  else if Pos(ZEOS_ADO, aAuxDriver) = 1 then Result := dazADO
+  else if Pos(ZEOS_ASA, aAuxDriver) = 1 then Result := dazASA
+  else if Pos(ZEOS_IBMDB2, aAuxDriver) = 1 then Result := dazIBMDB2
+  else if Pos(ZEOS_Interbase, aAuxDriver) = 1 then Result := dazInterBase
+  else if Pos(ZEOS_Firebird, aAuxDriver) = 1 then Result := dazInterBase
+  else if Pos(ZEOS_MSSQL, aAuxDriver) = 1 then Result := dazMSSQL
+  else if Pos(ZEOS_MySQL, aAuxDriver) = 1 then Result := dazMySQL
+  else if Pos(ZEOS_ORACLE, aAuxDriver) = 1 then Result := dazOracle
+  else if Pos(ZEOS_PostgreSQL, aAuxDriver) = 1 then Result := dazPostgreSQL
+  else if Pos(ZEOS_SQLite, aAuxDriver) = 1 then Result := dazSQLite
+  else if Pos(ZEOS_SYBASE, aAuxDriver) = 1 then Result := dazSybase
+  else Result := dazUnknown;
+end;
+
+{ TDAESampleConnection }
+
+procedure TDAESampleConnection.DoApplyConnectionString(aConnStrParser: TDAConnectionStringParser; aConnectionObject: TCustomConnection);
+var
+  i                           : Integer;
+  sName, sValue               : string;
+begin
+  FMySQLVersion := -1;
+  inherited;
+  with aConnStrParser do begin
+    fDriverName := AuxDriver;
+    fDriverType := ZEOSDriverIdToZEOSDriverType(AuxDriver);
+    fADOProviderName := AuxParams['Provider'];
+    FADOProviderType := OleDBDriverIdToOleDBProviderType(FADOProviderName);
+
+    fNativeConnection.fConnection.Protocol := AuxDriver;
+    if (Self.UserID <> '') then
+      fNativeConnection.fConnection.User := Self.UserID
+    else
+      fNativeConnection.fConnection.User := UserID;
+
+    if (Self.Password <> '') then
+      fNativeConnection.fConnection.Password := Self.Password
+    else
+      fNativeConnection.fConnection.Password := Password;
+    if Server <> '' then fNativeConnection.fConnection.HostName := Server;
+    if Database <> '' then begin
+      fNativeConnection.fConnection.Database := Database;
+      if fDriverType <> dazSQLite then   
+         fNativeConnection.fConnection.Catalog := Database;
+    end;
+
+    for i := 0 to AuxParamsCount - 1 do begin
+      sName := AuxParamNames[i];
+      if sName = '' then Continue;
+      sValue := AuxParams[AuxParamNames[i]];
+      if AnsiSameText(sName, 'role') then begin
+        if fDriverType = dazInterBase then sName := 'rolename';
+      end else if AnsiSameText(sName, 'charset') then begin
+        if fDriverType = dazInterBase then sName := 'codepage';
+      end else if AnsiSameText(sName, 'port') then begin
+        if StrToIntDef(sValue, -1) <> -1 then fNativeConnection.fConnection.Port := StrToInt(sValue);
+      end else begin
+        if sName[1] = '@' then sName := Pchar(sName) + 1;
+      end;
+      fNativeConnection.fConnection.Properties.Values[sName] := sValue;
+    end;
+
+    if fDriverType = dazADO then begin
+      if fADOProviderName = '' then
+        raise EDADriverException.Create('No proviver specified for ADO auxdriver');
+
+      fNativeConnection.fConnection.Properties.Values['User ID'] := fNativeConnection.fConnection.User;
+      fNativeConnection.fConnection.Properties.Values['Password'] := fNativeConnection.fConnection.Password;
+      if FADOProviderType = oledb_Jet then begin
+        fNativeConnection.fConnection.Properties.Values['Data Source'] := Database;
+      end else begin
+        if Database <> '' then begin
+          if fADOProviderType = oledb_Postgresql then
+            fNativeConnection.fConnection.Properties.Values['Location'] := Database
+          else
+            fNativeConnection.fConnection.Properties.Values['Initial Catalog'] := Database;
+        end;
+        if Server <> '' then fNativeConnection.fConnection.Properties.Values['Data Source'] := Server;
+        if fADOProviderType <> oledb_Postgresql then fNativeConnection.fConnection.Properties.Values['OLE DB SERVICES'] := '-2';
+      end;
+      fNativeConnection.fConnection.Database := '';
+      for i := 0 to fNativeConnection.fConnection.Properties.Count - 1 do begin
+        sName:=fNativeConnection.fConnection.Properties.Names[i];
+        sValue:=fNativeConnection.fConnection.Properties.Values[sName];
+        fNativeConnection.fConnection.Database:=fNativeConnection.fConnection.Database + sName+'='+sValue+';'
+      end;
+    end;
+  end;
+end;
+
+function TDAESampleConnection.DoBeginTransaction: integer;
+begin
+  fNativeConnection.fConnection.StartTransaction;
+  Result := 0;
+end;
+
+procedure TDAESampleConnection.DoCommitTransaction;
+begin
+  fNativeConnection.fConnection.Commit;
+end;
+
+function TDAESampleConnection.CreateCustomConnection: TCustomConnection;
+begin
+  fNativeConnection := TZEOSConnection.Create(nil);
+  result := fNativeConnection;
+end;
+
+function TDAESampleConnection.GetDatasetClass: TDAEDatasetClass;
+begin
+  result := TDAESampleQuery;
+end;
+
+function TDAESampleConnection.GetStoredProcedureClass: TDAEStoredProcedureClass;
+begin
+  result := TDAESampleStoredProcedure;
+end;
+
+procedure TDAESampleConnection.DoRollbackTransaction;
+begin
+  fNativeConnection.fConnection.Rollback;
+end;
+
+function TDAESampleConnection.DoGetInTransaction: boolean;
+begin
+  Result := fNativeConnection.fConnection.InTransaction
+end;
+
+function TDAESampleConnection.QueryInterface(const IID: TGUID; out Obj): HResult;
+begin
+  Result := E_NOINTERFACE;
+  if IsEqualGUID(IID, IDAADOConnection) then begin
+    if fDriverType <> dazADO then Exit;
+  end else if IsEqualGUID(IID, IDAInterbaseConnection) then begin
+    if fDriverType <> dazInterbase then Exit;
+  end else if IsEqualGUID(IID, IDAIBTransactionAccess) then begin
+    if fDriverType <> dazInterbase then Exit;
+  end else if IsEqualGUID(IID, IDAIBConnectionProperties) then begin
+    if fDriverType <> dazInterbase then Exit;
+  end else if IsEqualGUID(IID, IDAOracleConnection) then begin
+    if fDriverType <> dazOracle then Exit;
+  end else if IsEqualGUID(IID, IDASQLiteConnection) then begin
+    if fDriverType <> dazSQLite then Exit;
+  end else if IsEqualGUID(IID, IDADB2Connection) then begin
+    if fDriverType <> dazIBMDB2 then Exit;
+  end else if IsEqualGUID(IID, IDASybaseConnection) then begin
+    if not (fDriverType in [dazSybase, dazASA]) then Exit;
+  end else if IsEqualGUID(IID, IDAPostgresConnection) then begin
+    if fDriverType <> dazPostgreSQL then Exit;
+  end else if IsEqualGUID(IID, IDAMySQLConnection) then begin
+    if fDriverType <> dazMySQL then Exit;
+  end else if IsEqualGUID(IID, IDACanQueryDatabaseNames) then begin
+    if (fDriverType in [dazInterBase, dazSQLite]) then Exit;
+  end else if IsEqualGUID(IID, IDAFileBasedDatabase) then begin
+    if not (fDriverType in [dazInterBase, dazSQLite]) then Exit;
+  end else if IsEqualGUID(IID, IDAUseGenerators) then begin
+    if not (fDriverType in [dazInterBase, dazOracle, dazPostgreSQL]) then Exit;
+  end else if IsEqualGUID(IID, IDACanQueryGeneratorsNames) then begin
+    if not (fDriverType in [dazInterBase]) then Exit;
+  end
+
+  //  else if IsEqualGUID(IID, IDAConnectionModelling) then
+  //  else if IsEqualGUID(IID, IDADirectoryBasedDatabase) then
+  ;
+  Result := inherited QueryInterface(IID, Obj);
+end;
+
+constructor TDAESampleConnection.Create(aDriver: TDAEDriver; aName: string);
+begin
+  inherited Create(aDriver, aName);
+  fMSSQLSchemaEnabled := True;
+end;
+
+function TDAESampleConnection.CreateMacroProcessor: TDASQLMacroProcessor;
+begin
+  case fDriverType of
+    dazInterBase: Result := IB_CreateMacroProcessor;
+    dazMSSQL: Result := MSSQL_CreateMacroProcessor;
+    dazOracle: Result := Oracle_CreateMacroProcessor;
+  else
+    Result := inherited CreateMacroProcessor;
+  end;
+end;
+
+function TDAESampleConnection.GetFileExtensions: IROStrings;
+begin
+  case fDriverType of
+    dazInterBase: Result := IB_GetFileExtensions;
+    dazSQLite: Result := SQLite_GetFileExtensions;
+  else
+    Result := NewROStrings;
+  end;
+end;
+
+function TDAESampleConnection.GetGeneratorNames: IROStrings;
+begin
+  case fDriverType of
+    dazInterBase: Result:= IB_GetGeneratorNames(GetDatasetClass.Create(Self));
+  else
+    Result := NewROStrings;
+  end;
+end;
+
+procedure TDAESampleConnection.DoGetTableNames(out List: IROStrings);
+begin
+  inherited;
+  case fDriverType of
+    dazMSSQL: MSSQL_DoGetNames(GetDatasetClass.Create(Self), List, dotTable, fMSSQLSchemaEnabled);
+    dazInterBase: IB_GetObjectNames(GetDatasetClass.Create(Self), List, dotTable);
+    dazMYSQL: MYSQL_DoGetNames(GetDatasetClass.Create(Self), List, dotTable, fNativeConnection.fConnection.Catalog,GetMySQLVersion);
+    dazSQLite: SQLite_GetObjectNames(GetDatasetClass.Create(Self), List, dotTable);
+    dazPostgreSQL: Postgres_DoGetNames(GetDatasetClass.Create(Self), List, dotTable);
+    dazOracle: Oracle_DoGetNames(GetDatasetClass.Create(Self), List, dotTable);
+  else
+    if (fDriverType = dazADO) and (fADOProviderType in [oledb_MSSQL, oledb_MSSQL2005]) then
+      MSSQL_DoGetNames(GetDatasetClass.Create(Self), List, dotTable, fMSSQLSchemaEnabled)
+    else begin
+      DoGetNames(List, dotTable);
+    end;
+  end
+end;
+
+procedure TDAESampleConnection.DoGetViewNames(out List: IROStrings);
+begin
+  inherited;
+  case fDriverType of
+    dazMSSQL: MSSQL_DoGetNames(GetDatasetClass.Create(Self), List, dotView, fMSSQLSchemaEnabled);
+    dazInterBase: IB_GetObjectNames(GetDatasetClass.Create(Self), List, dotView);
+    dazMYSQL: MYSQL_DoGetNames(GetDatasetClass.Create(Self), List, dotView, fNativeConnection.fConnection.Catalog,GetMySQLVersion);
+    dazSQLite: SQLite_GetObjectNames(GetDatasetClass.Create(Self), List, dotView);
+    dazPostgreSQL: Postgres_DoGetNames(GetDatasetClass.Create(Self), List, dotView);
+    dazOracle: Oracle_DoGetNames(GetDatasetClass.Create(Self), List, dotView);
+  else
+    if (fDriverType = dazADO) and (fADOProviderType in [oledb_MSSQL, oledb_MSSQL2005]) then
+      MSSQL_DoGetNames(GetDatasetClass.Create(Self), List, dotView, fMSSQLSchemaEnabled)
+    else begin
+      DoGetNames(List, dotView);
+    end;
+  end
+end;
+
+procedure TDAESampleConnection.DoGetStoredProcedureNames(
+  out List: IROStrings);
+begin
+  inherited;
+  case fDriverType of
+    dazMSSQL: MSSQL_DoGetNames(GetDatasetClass.Create(Self), List, dotProcedure, fMSSQLSchemaEnabled);
+    dazInterBase: IB_GetObjectNames(GetDatasetClass.Create(Self), List, dotProcedure);
+    dazMYSQL: MYSQL_DoGetNames(GetDatasetClass.Create(Self), List, dotProcedure, fNativeConnection.fConnection.Catalog,GetMySQLVersion);
+    dazSQLite: SQLite_GetObjectNames(GetDatasetClass.Create(Self), List, dotProcedure);
+    dazPostgreSQL: Postgres_DoGetNames(GetDatasetClass.Create(Self), List, dotProcedure);
+    dazOracle: Oracle_DoGetNames(GetDatasetClass.Create(Self), List, dotProcedure);
+  else
+    if (fDriverType = dazADO) and (fADOProviderType in [oledb_MSSQL, oledb_MSSQL2005]) then
+      MSSQL_DoGetNames(GetDatasetClass.Create(Self), List, dotProcedure, fMSSQLSchemaEnabled)
+    else begin
+      DoGetNames(List, dotProcedure);
+    end;
+  end
+end;
+
+procedure TDAESampleConnection.DoGetTableFields(const aTableName: string;
+  out Fields: TDAFieldCollection);
+var
+  lschema, ltbl               : string;
+  fld                         : TDAField;
+begin
+  case fDriverType of
+    dazMSSQL: MSSQL_DoGetTableFields(QuoteIdentifierIfNeeded(aTableName), GetDatasetClass.Create(Self), Fields);
+    dazInterBase: IB_GetTableFields(QuoteIdentifierIfNeeded(aTableName), GetDatasetClass.Create(Self), Fields);
+    dazMySQL: MYSQL_DoGetTableFields(QuoteIdentifierIfNeeded(aTableName),GetDatasetClass.Create(Self),Fields, fNativeConnection.fConnection.Catalog,GetMySQLVersion);
+    dazOracle: Oracle_DoGetTableFields(QuoteIdentifierIfNeeded(aTableName), GetDatasetClass.Create(Self), Fields);
+    dazPostgreSQL: Postgres_DoGetTableFields(QuoteIdentifierIfNeeded(aTableName), GetDatasetClass.Create(Self), Fields);
+  else
+    if (fDriverType = dazADO) and (fADOProviderType in [oledb_MSSQL, oledb_MSSQL2005]) then
+      MSSQL_DoGetTableFields(QuoteIdentifierIfNeeded(aTableName), GetDatasetClass.Create(Self), Fields)
+    else begin
+      inherited;
+      if Pos('.', aTableName) > 0 then begin
+        lschema := Trim(Copy(aTableName, 1, Pos('.', aTableName) - 1));
+        ltbl := Trim(Copy(aTableName, Pos('.', aTableName) + 1, Length(aTableName)));
+      end else begin
+        lschema := '';
+        ltbl := aTableName;
+      end;
+      // required+default value
+      with ZEOS_GetMetadata.GetColumns(fNativeConnection.fConnection.Catalog, lschema, ltbl, '') do
+        while Next do begin
+          fld := Fields.FindField(GetStringByName('COLUMN_NAME'));
+          if fld = nil then Continue;
+          fld.Required := GetStringByName('IS_NULLABLE') = 'NO';
+
+          fld.DefaultValue := GetStringByName('COLUMN_DEF');
+          if not TestDefaultValue(fld.DefaultValue, fld.DataType) then
+            fld.DefaultValue := '';
+        end;
+      // pk
+      with ZEOS_GetMetadata.GetPrimaryKeys(fNativeConnection.fConnection.Catalog, lschema, ltbl) do
+        while Next do begin
+          fld := Fields.FindField(GetStringByName('COLUMN_NAME'));
+          if fld = nil then Continue;
+          fld.Required := True;
+          fld.InPrimaryKey := True;
+        end;
+    end;
+  end;
+  FixWideStringBug(Fields);
+end;
+
+procedure TDAESampleConnection.DoGetForeignKeys(
+  out ForeignKeys: TDADriverForeignKeyCollection);
+var
+  lSupportedSchema            : boolean;
+begin
+  inherited;
+  case fDriverType of
+    dazMSSQL: MSSQL_DoGetForeignKeys(GetDatasetClass.Create(Self), ForeignKeys, fMSSQLSchemaEnabled);
+    dazInterBase: IB_DoGetForeignKeys(GetDatasetClass.Create(Self), ForeignKeys);
+    dazMySQL: MYSQL_DoGetForeignKeys(GetDatasetClass.Create(Self), ForeignKeys, fNativeConnection.fConnection.Catalog,GetMySQLVersion);
+    dazPostgreSQL:   Postgres_DoGetForeignKeys(GetDatasetClass.Create(Self),ForeignKeys);
+    dazOracle: Oracle_DoGetForeignKeys(GetDatasetClass.Create(Self), ForeignKeys);
+  else
+    if (fDriverType = dazADO) and (fADOProviderType in [oledb_MSSQL, oledb_MSSQL2005]) then
+      MSSQL_DoGetForeignKeys(GetDatasetClass.Create(Self), ForeignKeys, fMSSQLSchemaEnabled)
+    else begin
+      lSupportedSchema := ZEOS_GetMetadata.SupportsSchemasInDataManipulation;
+      with ZEOS_GetMetadata.GetCrossReference(fNativeConnection.fConnection.Catalog, '', '', fNativeConnection.fConnection.Catalog, '', '') do
+        while Next do
+          with ForeignKeys.Add do begin
+            if lSupportedSchema then begin
+              PKTable := GetStringByName('PKTABLE_SCHEM') + '.' + GetStringByName('PKTABLE_NAME');
+              FKTable := GetStringByName('FKTABLE_SCHEM') + '.' + GetStringByName('FKTABLE_NAME');
+            end
+            else begin
+              PKTable := GetStringByName('PKTABLE_NAME');
+              FKTable := GetStringByName('FKTABLE_NAME');
+            end;
+            PKField := GetStringByName('PKCOLUMN_NAME');
+            FKField := GetStringByName('FKCOLUMN_NAME');
+          end;
+    end;
+  end;
+end;
+
+function TDAESampleConnection.GetDatabaseNames: IROStrings;
+begin
+  case fDriverType of
+    dazMSSQL: Result := MSSQL_GetDatabaseNames(Self);
+    dazMySQL: Result := MYSQL_GetDatabaseNames(Self);
+    dazPostgreSQL: Result := Postgres_GetDatabaseNames(Self);
+  else
+    if (fDriverType = dazADO) and (fADOProviderType in [oledb_MSSQL, oledb_MSSQL2005]) then
+      Result := MSSQL_GetDatabaseNames(Self)
+    else begin
+      Result := NewROStrings;
+      with ZEOS_GetMetadata.GetCatalogs do
+        while Next do
+          Result.Add(GetStringByName('TABLE_CAT'));
+    end;
+  end;
+end;
+
+function TDAESampleConnection.GetQuoteChars: TDAQuoteCharArray;
+var
+  s                           : string;
+begin
+  Result := inherited GetQuoteChars;
+  case fDriverType of
+    dazMSSQL: Result := MSSQL_GetQuoteChars;
+    dazOracle: Result:= Oracle_GetQuoteChars;
+  else
+    if (fDriverType = dazADO) and (fADOProviderType in [oledb_MSSQL, oledb_MSSQL2005]) then
+      Result := MSSQL_GetQuoteChars
+    else begin
+      s := ZEOS_GetMetadata.GetIdentifierQuoteString;
+      if Length(s) = 1 then begin
+        Result[0] := s[1];
+        Result[1] := s[1];
+      end
+      else if Length(s) = 2 then begin
+        Result[0] := s[1];
+        Result[1] := s[2];
+      end
+    end;
+  end;
+end;
+
+function TDAESampleConnection.IdentifierNeedsQuoting(
+  const iIdentifier: string): boolean;
+var
+  lList                       : TstringList;
+  i                           : integer;
+begin
+  Result:= inherited IdentifierNeedsQuoting(iIdentifier);
+  if not result then
+    case fDriverType of
+      dazMSSQL: Result := MSSQL_IdentifierNeedsQuoting(iIdentifier);
+      dazInterBase: Result := IB_IdentifierNeedsQuoting(iIdentifier, GetSQLDialect);
+      dazMySQL: Result := MYSQL_IdentifierNeedsQuoting(iIdentifier);
+      dazORACLE: Result := Oracle_IdentifierNeedsQuoting(iIdentifier);
+      dazPostgreSQL: Result:= Postgres_IdentifierNeedsQuoting(iIdentifier);
+      dazIBMDB2: Result := DB2_IdentifierNeedsQuoting(iIdentifier);
+      dazASA,dazSybase: Result := Sybase_IdentifierNeedsQuoting(iIdentifier);
+    else
+      if (fDriverType = dazADO) and (fADOProviderType in [oledb_MSSQL, oledb_MSSQL2005]) then
+        Result := MSSQL_IdentifierNeedsQuoting(iIdentifier)
+      else begin
+        lList := TStringList.Create;
+        try
+          lList.CommaText :=
+            ZEOS_GetMetadata.GetSQLKeywords + ',' +
+            ZEOS_GetMetadata.GetNumericFunctions + ',' +
+            ZEOS_GetMetadata.GetStringFunctions + ',' +
+            ZEOS_GetMetadata.GetSystemFunctions + ',' +
+            ZEOS_GetMetadata.GetTimeDateFunctions;
+          for i := 0 to lList.Count - 1 do
+            if CompareText(llist[i], iIdentifier) = 0 then begin
+              Result := True;
+              Exit;
+            end;
+        finally
+          lList.Free;
+        end
+      end;
+    end;
+end;
+
+function TDAESampleConnection.GetRole: string;
+begin
+  Result := fNativeConnection.fConnection.Properties.Values['rolename'];
+end;
+
+function TDAESampleConnection.GetSQLDialect: integer;
+begin
+  Result := StrToIntDef(fNativeConnection.fConnection.Properties.Values['dialect'], -1);
+  if Result = -1 then begin
+    if fDriverName = 'interbase-5' then
+      Result := 1
+    else
+      Result := 3;
+  end;
+end;
+
+procedure TDAESampleConnection.SetRole(const Value: string);
+begin
+  fNativeConnection.fConnection.Properties.Values['rolename'] := Value;
+end;
+
+procedure TDAESampleConnection.SetSQLDialect(Value: integer);
+begin
+  fNativeConnection.fConnection.Properties.Values['dialect'] := IntToStr(Value);
+end;
+
+function TDAESampleConnection.GetCharset: string;
+begin
+  Result := fNativeConnection.fConnection.Properties.Values['codepage'];
+end;
+
+procedure TDAESampleConnection.SetCharset(const Value: string);
+begin
+  fNativeConnection.fConnection.Properties.Values['codepage'] := Value;
+end;
+
+procedure TDAESampleConnection.Commit;
+begin
+  Self.DoCommitTransaction;
+end;
+
+procedure TDAESampleConnection.Rollback;
+begin
+  Self.DoRollbackTransaction;
+end;
+
+function TDAESampleConnection.DoGetLastAutoInc(
+  const GeneratorName: string): integer;
+begin
+  Result := -1;
+  case fDriverType of
+    dazMSSQL: Result := MSSQL_DoGetLastAutoInc(GeneratorName, GetDatasetClass.Create(Self));
+    dazInterBase: Result := IB_GetLastAutoInc(GeneratorName, GetDatasetClass.Create(Self));
+    dazMySQL: Result := MySQL_GetLastAutoInc(GeneratorName, GetDatasetClass.Create(Self));
+    dazOracle: Result := Oracle_DoGetLastAutoInc(GeneratorName, GetDatasetClass.Create(Self));
+    dazPostgreSQL: Result := Postgres_DoGetLastAutoInc(GeneratorName, GetDatasetClass.Create(Self));
+  else
+    if (fDriverType = dazADO) and (fADOProviderType in [oledb_MSSQL, oledb_MSSQL2005]) then
+      Result := MSSQL_DoGetLastAutoInc(GeneratorName, GetDatasetClass.Create(Self))
+    else ;
+  end;
+end;
+
+function TDAESampleConnection.GetNextAutoinc(
+  const GeneratorName: string): integer;
+begin
+  Result := -1;
+  case fDriverType of
+    dazInterBase: Result := IB_GetNextAutoinc(GeneratorName, GetDatasetClass.Create(Self));
+    dazOracle: Result := Oracle_GetNextAutoinc(GeneratorName, GetDatasetClass.Create(Self));
+    dazPostgreSQL: Result := Postgres_GetNextAutoInc(GeneratorName, GetDatasetClass.Create(Self));
+  end;
+end;
+
+procedure TDAESampleConnection.DoGetNames(AList: IROStrings;
+  AObjectType: TDAObjecttype);
+var
+  lTableTypes                 : TStringDynArray;
+  lsupportSchema              : Boolean;
+  lprocname                   : string;
+  i                           : integer;
+begin
+  fNativeConnection.fConnection.Connect;
+  lsupportSchema := ZEOS_GetMetadata.SupportsSchemasInDataManipulation;
+  if AObjectType = dotProcedure then begin
+    with ZEOS_GetMetadata.GetProcedures(fNativeConnection.fConnection.Catalog, '', '') do
+      while Next do begin
+        lprocname := GetStringByName('PROCEDURE_NAME');
+        i := pos(';', lprocname);
+        if i > 0 then lprocname := Copy(lprocname, 1, i - 1);
+        if lsupportSchema then
+          aList.Add(GetStringByName('PROCEDURE_SCHEM') + '.' + lprocname)
+        else
+          aList.Add(lprocname)
+      end;
+  end
+  else begin
+    SetLength(lTableTypes, 1);
+    if AObjectType = dotTable then
+      lTableTypes[0] := 'TABLE'
+    else
+      lTableTypes[0] := 'VIEW';
+    with ZEOS_GetMetadata.GetTables(fNativeConnection.fConnection.Catalog, '', '', lTableTypes) do
+      while Next do
+        if lsupportSchema then
+          aList.Add(GetStringByName('TABLE_SCHEM') + '.' + GetStringByName('TABLE_NAME'))
+        else
+          aList.Add(GetStringByName('TABLE_NAME'))
+  end;
+end;
+
+function TDAESampleConnection.GetSPSelectSyntax(
+  HasArguments: Boolean): string;
+begin
+  case fDriverType of
+    dazMSSQL: Result := MSSQL_GetSPSelectSyntax(HasArguments);
+    dazInterBase: Result := IB_GetSPSelectSyntax(HasArguments);
+    dazOracle: Result := Oracle_GetSPSelectSyntax(HasArguments);
+    dazPostgreSQL: Result := Postgres_GetSPSelectSyntax(HasArguments);
+  else
+    if (fDriverType = dazADO) and (fADOProviderType in [oledb_MSSQL, oledb_MSSQL2005]) then
+      Result := MSSQL_GetSPSelectSyntax(HasArguments)
+    else begin
+      Result := inherited GetSPSelectSyntax(HasArguments);
+    end;
+  end;
+end;
+
+function TDAESampleConnection.GetCommandTimeout: Integer;
+begin
+  Result := StrToIntDef(fNativeConnection.fConnection.Properties.Values['timeout'], 0);
+end;
+
+function TDAESampleConnection.GetProviderName: string;
+begin
+  Result := fADOProviderName;
+end;
+
+function TDAESampleConnection.GetProviderType: TDAOleDBProviderType;
+begin
+  Result := fADOProviderType;
+end;
+
+procedure TDAESampleConnection.SetCommandTimeout(const Value: Integer);
+begin
+  fNativeConnection.fConnection.Properties.Values['timeout'] := InttoStr(Value);
+end;
+
+procedure TDAESampleConnection.DoGetStoredProcedureParams(
+  const aStoredProcedureName: string; out Params: TDAParamCollection);
+begin
+  case fDriverType of
+    dazMySQL:   MYSQL_DoGetStoredProcedureParams(aStoredProcedureName, GetDatasetClass.Create(Self), Params, fNativeConnection.fConnection.Catalog);
+    dazOracle:  Oracle_DoGetStoredProcedureParams(aStoredProcedureName, GetDatasetClass.Create(Self), Params);
+    dazPostgreSQL: Postgres_DoGetStoredProcedureParams(aStoredProcedureName, GetDatasetClass.Create(Self), Params);
+    dazMSSQL:   MSSQL_DoGetStoredProcedureParams(aStoredProcedureName, GetDatasetClass.Create(Self), Params);
+  else
+    inherited;
+  end;
+end;
+
+
+function TDAESampleConnection.ZEOS_GetMetaData: IZDatabaseMetadata;
+begin
+  fNativeConnection.Connected:=True;
+  Result:= fNativeConnection.fConnection.DbcConnection.GetMetadata;
+end;
+
+procedure TDAESampleConnection.FixWideStringBug(AFields: TDAFieldCollection);
+{$IFDEF DA_WideMemoSupport}
+var
+  i: integer;
+{$ENDIF}
+begin
+  {$IFDEF DA_WideMemoSupport}
+  For i:=0 to AFields.Count -1 do
+    with AFields[i] do
+      if (DataType = datWideString) and (Size = MaxInt div 2) then begin
+        DataType:= datWideMemo;
+        Size := 0;
+      end;
+  {$ENDIF}
+end;
+
+procedure TDAESampleConnection.DoGetQueryFields(const aSQL: string;
+  aParamsIfNeeded: TDAParamCollection; out Fields: TDAFieldCollection);
+begin
+  inherited;
+  FixWideStringBug(Fields);
+end;
+
+function TDAESampleConnection.GetMySQLVersion: integer;
+begin
+  if FMySQLVersion = -1 then FMySQLVersion := MYSQL_GetVersion(GetDatasetClass.Create(Self));
+  Result := FMySQLVersion;
+end;
+
+{ TDAESampleDriver }
+
+procedure TDAESampleDriver.GetAuxDrivers(out List: IROStrings);
+var
+  i, j                        : integer;
+  lDrivers                    : IZCollection;
+  Protocols                   : TStringDynArray;
+begin
+  inherited;
+  lDrivers := ZDbcIntfs.DriverManager.GetDrivers;
+  for i := 0 to lDrivers.Count - 1 do begin
+    Protocols := (lDrivers[I] as IZDriver).GetSupportedProtocols;
+    for J := Low(Protocols) to High(Protocols) do
+      List.Add(Protocols[J]);
+  end;
+  List.Sorted := True;
+end;
+
+procedure TDAESampleDriver.GetAuxParams(const AuxDriver: string;
+  out List: IROStrings);
+var
+  i                           : TDAOleDBProviderType;
+  s                           : string;
+begin
+  inherited;
+  case ZEOSDriverIdToZEOSDriverType(AuxDriver) of
+    dazADO: begin
+        s := '';
+        for i := Low(TDAOleDBProviderType) to High(TDAOleDBProviderType) do
+          if (i <> oledb_Unknown) {// Redundant but safe if I change the enum later...} then begin
+            if s <> '' then s := s + ';';
+            s := s + OleDBProviders[i];
+          end;
+        List.Add('Provider=(' + s + ')');
+      end;
+    dazInterBase: AddIBAuxParams(List);
+  end;
+  if ZEOSDriverIdToZEOSDriverType(AuxDriver) <> dazAdo then List.Add('Port=<port>');
+  List.Add('timeout=<timeout>');
+end;
+
+function TDAESampleDriver.GetAvailableDriverOptions: TDAAvailableDriverOptions;
+begin
+  Result := [doAuxDriver, doServerName, doDatabaseName, doLogin, doCustom];
+end;
+
+function TDAESampleDriver.GetAvailableDriverOptionsEx(
+  AuxDriver: string): TDAAvailableDriverOptions;
+begin
+  case ZEOSDriverIdToZEOSDriverType(AuxDriver) of
+    dazSQLite : Result := [doAuxDriver, doDatabaseName, doCustom];
+  else
+    Result := [doAuxDriver, doServerName, doDatabaseName, doLogin, doCustom];
+  end;    
+end;
+
+function TDAESampleDriver.GetConnectionClass: TDAEConnectionClass;
+begin
+  result := TDAESampleConnection;
+end;
+
+function TDAESampleDriver.GetDefaultConnectionType(
+  const AuxDriver: string): string;
+begin
+  case ZEOSDriverIdToZEOSDriverType(AuxDriver) of
+    dazADO: Result := '';
+    dazMySQL: Result := MySQL_DriverType;
+    dazIBMDB2: Result:= DB2_DriverType;
+    dazInterBase: Result := IB_DriverType;
+    dazMSSQL: Result := MSSQL_DriverType;
+    dazOracle: Result := Oracle_DriverType;
+    dazPostgreSQL: Result := PostgreSQL_DriverType;
+    dazSQLite : Result:= SQLite_DriverType;
+    dazASA: Result:=ASA_DriverType;
+    dazSybase: Result:=Sybase_DriverType;
+  else
+    Result:= inherited GetDefaultConnectionType(AuxDriver);
+  end;
+end;
+
+function TDAESampleDriver.GetDescription: string;
+begin
+  result := 'DataAbstact Zeos Driver';
+end;
+
+function TDAESampleDriver.GetDriverID: string;
+begin
+  result := 'ZEOS';
+end;
+
+function TDAESampleDriver.GetProviderDefaultCustomParameters(
+  Provider: string): string;
+begin
+  Result := '';
+  case ZEOSDriverIdToZEOSDriverType(Provider) of
+    dazADO: Result := 'Provider=<please specify provider>;';
+    dazMySQL: Result := MYSQL_GetDefaultCustomParameters;
+  end;
+end;
+
+{ TDAESampleQuery }
+
+function TDAESampleQuery.CreateDataset(aConnection: TDAEConnection): TDataset;
+begin
+  result := TZReadOnlyQuery.Create(nil);
+  TZReadOnlyQuery(result).Connection := TDAESampleConnection(aConnection).fNativeConnection.fConnection;
+end;
+
+function TDAESampleQuery.DoExecute: integer;
+begin
+  TZReadOnlyQuery(Dataset).ExecSQL;
+  Result:=TZReadOnlyQuery(Dataset).RowsAffected;
+end;
+
+function TDAESampleQuery.DoGetSQL: string;
+begin
+  result := TZReadOnlyQuery(Dataset).SQL.Text;
+end;
+
+procedure TDAESampleQuery.DoPrepare(Value: boolean);
+begin
+  // nothing
+end;
+
+procedure TDAESampleQuery.DoSetSQL(const Value: string);
+begin
+  TZReadOnlyQuery(Dataset).SQL.Text := Value;
+end;
+
+procedure TDAESampleQuery.SetParamValues(AParams: TDAParamCollection);
+var
+  i: integer;
+begin
+  SetParamValuesStd(AParams, TZReadOnlyQuery(Dataset).Params);
+  // zeos doesn't support ftfmtBCD, ftBCD
+  for i:=0 to TZReadOnlyQuery(Dataset).Params.Count-1 do
+    with TZReadOnlyQuery(Dataset).Params[i] do begin
+      if DataType = ftBCD then AsCurrency := Value
+      else if DataType = ftFMTBCD then AsFloat := Value;
+    end;  
+end;
+
+procedure TDAESampleQuery.GetParamValues(AParams: TDAParamCollection);
+begin
+  GetParamValuesStd(AParams, TZReadOnlyQuery(Dataset).Params);
+end;
+
+procedure TDAESampleQuery.ClearParams;
+begin
+  inherited;
+  TZReadOnlyQuery(Dataset).Params.Clear;
+end;
+
+{ TDAESampleStoredProcedure }
+
+function TDAESampleStoredProcedure.CreateDataset(aConnection: TDAEConnection): TDataset;
+begin
+  result := TZStoredProc.Create(nil);
+  TZStoredProc(result).Connection := TDAESampleConnection(aConnection).fNativeConnection.fConnection;
+end;
+
+function TDAESampleStoredProcedure.DoExecute: integer;
+begin
+  TZStoredProc(Dataset).ExecProc;
+  Result:=TZStoredProc(Dataset).RowsAffected;
+end;
+
+function TDAESampleStoredProcedure.DoGetSQL: string;
+begin
+  Result := '';
+end;
+
+procedure TDAESampleStoredProcedure.DoPrepare(Value: boolean);
+begin
+  // nothing
+end;
+
+procedure TDAESampleStoredProcedure.DoSetSQL(const Value: string);
+begin
+  //
+end;
+
+procedure TDAESampleStoredProcedure.GetParamValues(
+  AParams: TDAParamCollection);
+begin
+  GetParamValuesStd(AParams, TZStoredProc(Dataset).Params);
+end;
+
+function TDAESampleStoredProcedure.GetStoredProcedureName: string;
+begin
+  Result := TZStoredProc(Dataset).StoredProcName;
+end;
+
+procedure TDAESampleStoredProcedure.RefreshParams;
+begin
+  RefreshParamsStd(TZStoredProc(Dataset).Params);
+end;
+
+procedure TDAESampleStoredProcedure.SetParamValues(
+  AParams: TDAParamCollection);
+var
+  i: integer;  
+begin
+  SetParamValuesStd(AParams, TZStoredProc(Dataset).Params);
+  // zeos doesn't support ftfmtBCD, ftBCD
+  for i:=0 to TZStoredProc(Dataset).Params.Count-1 do
+    with TZStoredProc(Dataset).Params[i] do begin
+      if DataType = ftBCD then AsCurrency := Value
+      else if DataType = ftFMTBCD then AsFloat := Value;
+    end
+end;
+
+procedure TDAESampleStoredProcedure.SetStoredProcedureName(
+  const Name: string);
+begin
+  TZStoredProc(Dataset).Connection.Connect;
+  TZStoredProc(Dataset).StoredProcName := Name;
+end;
+
+{ TZEOSConnection }
+
+constructor TZEOSConnection.Create(AOwner: TComponent);
+begin
+  inherited;
+  fConnection := TZConnection.Create(nil);
+  fConnection.LoginPrompt := False;
+  fMetaData := TZSQLMetaData.Create(nil);
+  fMetaData.Connection := fConnection;
+end;
+
+destructor TZEOSConnection.Destroy;
+begin
+  inherited;
+  FreeAndNil(fMetaData);
+  FreeAndNil(fConnection);
+end;
+
+function TZEOSConnection.GetConnected: Boolean;
+begin
+  if fConnection <> nil then
+    Result := fConnection.Connected
+  else
+    Result:=False;  
+end;
+
+procedure TZEOSConnection.SetConnected(Value: boolean);
+begin
+  fConnection.Connected := Value;
+end;
+
+{$IFNDEF DARWIN}
+exports
+  GetDriverObject name func_GetDriverObject;
+{$ENDIF}
+
+initialization
+{$IFDEF FPC}
+  {$I DataAbstract_ZeosDriver_Glyphs.lrs}
+{$ENDIF}
+  _driver := nil;
+  RegisterDriverProc(GetDriverObject);
+finalization
+  UnregisterDriverProc(GetDriverObject);
+  FreeAndNIL(_driver);
+end.
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_AdditionalResources.lrs b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_AdditionalResources.lrs
new file mode 100644
index 0000000..d9a86b7
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_AdditionalResources.lrs	
@@ -0,0 +1,76 @@
+LazarusResources.Add('dalogo','BMP',[
+  'BMX'#8#0#0#0#0#0#0'6'#4#0#0'('#0#0#0' '#0#0#0' '#0#0#0#1#0#8#0#1#0#0#0'"'#4#0
+  +#0#194#30#0#0#194#30#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#128#0#0#128#0#0#0#128
+  +#128#0#128#0#0#0#128#0#128#0#128#128#0#0#192#192#192#0#192#220#192#0#240#202
+  +#166#0#0#148#0#0#0'1'#0#0#0'J'#0#0#0'R'#0#0#0'c'#0#0#0'k'#0#0#0's'#0#0#0'{'#0
+  +#0#0#132#0#0#0#140#0#0#0#148#0#0#0#156#0#0#8#8#8#0#8#16#8#0#8#24#8#0#8'!'#8#0
+  +#8')'#8#0#8'1'#8#0#8'J'#8#0#8'R'#8#0#8'c'#8#0#8'k'#8#0#8#132#8#0#8#165#8#0#16
+  +#16#16#0#16#24#16#0#16')'#16#0#16'1'#16#0#16'9'#16#0#16'B'#16#0#16'R'#16#0#16
+  +'c'#16#0#16'{'#16#0#16#132#16#0#8#165#16#0#24#24#24#0#24')'#24#0#24'1'#24#0
+  +#24'9'#24#0#16#173#24#0'!!!'#0'!B!'#0#24#148'!'#0#24#181'!'#0')))'#0'!s)'#0
+  +'!'#148')'#0#24#181')'#0'111'#0'191'#0'1R1'#0')'#140'1'#0')'#156'1'#0'!'#189
+  +'1'#0'199'#0'999'#0'1R9'#0')'#165'9'#0')'#198'9'#0'9BB'#0'BBB'#0'9RB'#0'BZB'
+  +#0'9'#132'B'#0'1'#165'B'#0')'#181'B'#0'JJJ'#0'JRJ'#0'BkJ'#0'BsJ'#0'B{J'#0'B'
+  +#132'J'#0'9'#148'J'#0'1'#173'J'#0'1'#206'J'#0'JRR'#0'RRR'#0'J'#132'R'#0'B'
+  +#140'R'#0'B'#148'R'#0'9'#173'R'#0'B'#181'R'#0'1'#198'R'#0'1'#206'R'#0'ZZZ'#0
+  +'B'#181'Z'#0'B'#189'Z'#0'9'#206'Z'#0'9'#214'Z'#0'Zcc'#0'ccc'#0'ckc'#0'Z'#132
+  +'c'#0'J'#189'c'#0'B'#214'c'#0'B'#222'c'#0'cck'#0'kkk'#0'R'#165'k'#0'R'#189'k'
+  +#0'B'#222'k'#0'sss'#0'c'#148's'#0'Z'#173's'#0'J'#231's'#0'ss{'#0's{{'#0'{{{'
+  +#0'c'#173'{'#0'R'#239'{'#0'{'#132#132#0#132#132#132#0'Z'#231#132#0'R'#247#132
+  +#0#140#140#140#0'Z'#239#140#0'Z'#247#140#0#140#140#148#0#140#148#148#0#148
+  +#148#156#0#148#156#156#0#156#156#165#0#165#173#173#0#173#181#181#0#181#181
+  +#189#0#181#189#189#0#181#189#198#0#189#198#198#0#189#198#206#0#198#198#206#0
+  +#198#206#206#0#206#214#214#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#240#251
+  +#255#0#164#160#160#0#128#128#128#0#0#0#255#0#0#255#0#0#0#255#255#0#255#0#0#0
+  +#255#0#255#0#255#255#0#0#255#255#255#0#10#140#0#13#137'cA--""6At'#134#140#0
+  +#9#140#0#0#8#140#0#3#135'j2'#0#2'2'#4'-'#3'"'#2#22#0#3'A'#131#140#1#7#140#0#0
+  +#7#140#1'o'#3'6'#3'2'#4'-'#3'"'#3#22#0#3'A'#134#140#6#5#140#0#0#5#140#0#4#135
+  +'U:6'#2'6'#0#12'0('#30#17#16#16#15#14#28#26'"'#22#2#22#0#3'"'#140#0#4#140#0
+  +#0#4#140#0#3#133'F:'#0#2':'#2'6'#0#8'3('#30#17#17#16#16#15#2#15#0#3#14#27#22
+  +#0#3#22#1'x'#4#140#0#0#3#140#0#5#138'FAA:'#0#2':'#4'6'#0#6'/'#16#17#16#16#15
+  +#2#15#0#4#14#13#24#22#2#22#1''#3#140#0#0#3#140#1'd'#4'A'#3':'#4'6'#1#30#2#17
+  +#2#16#0#6#28'$##'#24#22#2#22#0#4'"'#134#140#140#0#0#2#140#1#128#2'F'#4'A'#3
+  +':'#3'6'#1#31#3#17#1''''#3'-'#3'"'#3#22#1'A'#2#140#0#0#0#7#140#138'VFFBA'#22
+  +#3'A'#3':'#4'6'#0#4'/0.-'#3'-'#3'"'#3#22#1#131#1#140#0#0#0#8#140'|LLG8FA'#3
+  +'A'#3':'#4'6'#3'2'#4'-'#0#7'"'#26#27#22#22'A'#140'F'#0#0#0#9#140'^LL=8FFA'#15
+  +#3'A'#3':'#4'6'#3'2'#4'-'#0#6'$'#14'"'#22#22#134#0#0#0#7#134'VLM?>F'#16#2'F'
+  +#4'A'#3':'#4'6'#3'2'#3'-'#0#6'$'#15#27'"'#22't'#0#0#1#130#2'V'#0#5'ODCLF'#17
+  +#2'F'#4'A'#3':'#4'6'#3'2'#2'-'#0#6'$'#15#28'""A'#0#0#1'|'#2'V'#0#6'XTJLLF'#2
+  +'F'#4'A'#3':'#4'6'#3'2'#0#7'-%'#15#14'""-L'#0#0#0#7's^V_]SL2'#2'L'#3'F'#4'A'
+  +#3':'#4'6'#3'2'#0#6'/'#16#15'-""'#0#0#1't'#2'^'#0#4'_bZL'#3'L'#3'F'#4'A'#3':'
+  +#4'6'#2'2'#1'0'#2#16#2'-'#1'"'#0#0#1'u'#2'^'#0#5'gh_VL:'#3'L'#3'F'#4'A'#3':'
+  +#1'3'#2'6'#0#6'0'''#15#17#16'-'#2'-'#0#0#0#9'ud^mnhWVL6'#3'L'#3'F'#4'A'#2':'
+  +#2#19#2#18#1#2#3#17#3'-'#0#0#1#130#2'd'#0#11'lrnhaZRIHLF'#7#2'F'#4'A'#1':'#3
+  +#19#2#18#0#6#2#17#31'2-A'#0#0#1#132#2'd'#0#12'fwrnhb]TNLLF'#2'F'#4'A'#1#10#3
+  +#19#2#18#0#5#2'(22VF'#0#0#1#137#3'd'#0#9'zwrnhb]QL'#0#2'L'#3'F'#2'A'#1';'#2
+  +#10#3#19#2#18#1'0'#2'2'#1''#0#0#0#17#140#248'ddq}wrnhb\PMLLFm'#2'F'#0#3'<*'
+  ,#10'L'#2#10#3#19#1#31#2'6'#1'2'#1#137#0#0#0#23#140#132'kde}}wrnhb]TKC>81,!'
+  +#21#10'A'#2#10#2#19#1'3'#2'6'#1'j'#1#140#0#0#2#140#0#22'okdp~}wrnhb]TD??91,!'
+  +#21#10#2#10#0#6'):66'#135#140#0#0#2#140#1#134#2'k'#0#22'dv~}wrnhb]TD??91,!'
+  +#21#10' :'#2':'#1'o'#2#140#0#0#3#140#1#129#2'k'#0#26'dv~}wrnhb]TD??91,!+;A:U'
+  +#137#140#140#0#0#4#140#1'y'#2'k'#0#18'dp}}wrnhb]TD??917A'#2'A'#0#3'F'#135#140
+  +#22#2#140#0#0#4#140#0#25#139'|kkdeqzwrnhb]TD?=GFFAF'#133#140#6#3#140#0#0#6
+  +#140#1#129#2'k'#3'd'#0#16'flmg__YPMLLFFd'#138#140#4#140#0#0#7#140#0#4#134'ok'
+  +'d'#3'd'#3'^'#3'V'#3'L'#0#3'V'#128#140'v'#6#140#0#0#9#140#0#3#132#248'd?'#3
+  +'d'#3'^'#3'V'#0#4'^|'#138#140#7#140#0#0#11#140#0#11#137#132#130'uuts|'#130
+  +#134#140']'#10#140#0#1
+]);
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_AdditionalResources.rc b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_AdditionalResources.rc
new file mode 100644
index 0000000..d480282
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_AdditionalResources.rc	
@@ -0,0 +1 @@
+DALOGO           BITMAP DISCARDABLE "dalogo.bmp"
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_AdditionalResources.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_AdditionalResources.res
new file mode 100644
index 0000000..6735fcb
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_AdditionalResources.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D10.bdsproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D10.bdsproj
new file mode 100644
index 0000000..67fa8e2
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D10.bdsproj	
@@ -0,0 +1,179 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality" Type="String">Delphi.Personality</Option>
+			<Option Name="ProjectType" Type="String"></Option>
+			<Option Name="Version" Type="String">1.0</Option>
+			<Option Name="GUID" Type="String">{06DC969E-3DBF-4AD9-80A8-ADB03BFF41D1}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource" Type="String">DataAbstract_IDE_D10.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version" Type="String">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A" Type="Integer">8</Compiler>
+			<Compiler Name="B" Type="Integer">0</Compiler>
+			<Compiler Name="C" Type="Integer">1</Compiler>
+			<Compiler Name="D" Type="Integer">1</Compiler>
+			<Compiler Name="E" Type="Integer">0</Compiler>
+			<Compiler Name="F" Type="Integer">0</Compiler>
+			<Compiler Name="G" Type="Integer">1</Compiler>
+			<Compiler Name="H" Type="Integer">1</Compiler>
+			<Compiler Name="I" Type="Integer">1</Compiler>
+			<Compiler Name="J" Type="Integer">0</Compiler>
+			<Compiler Name="K" Type="Integer">0</Compiler>
+			<Compiler Name="L" Type="Integer">1</Compiler>
+			<Compiler Name="M" Type="Integer">0</Compiler>
+			<Compiler Name="N" Type="Integer">1</Compiler>
+			<Compiler Name="O" Type="Integer">1</Compiler>
+			<Compiler Name="P" Type="Integer">1</Compiler>
+			<Compiler Name="Q" Type="Integer">0</Compiler>
+			<Compiler Name="R" Type="Integer">0</Compiler>
+			<Compiler Name="S" Type="Integer">0</Compiler>
+			<Compiler Name="T" Type="Integer">0</Compiler>
+			<Compiler Name="U" Type="Integer">0</Compiler>
+			<Compiler Name="V" Type="Integer">1</Compiler>
+			<Compiler Name="W" Type="Integer">1</Compiler>
+			<Compiler Name="X" Type="Integer">1</Compiler>
+			<Compiler Name="Y" Type="Integer">1</Compiler>
+			<Compiler Name="Z" Type="Integer">1</Compiler>
+			<Compiler Name="ShowHints" Type="Boolean">True</Compiler>
+			<Compiler Name="ShowWarnings" Type="Boolean">True</Compiler>
+			<Compiler Name="UnitAliases" Type="String">WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;</Compiler>
+			<Compiler Name="NamespacePrefix" Type="String"></Compiler>
+			<Compiler Name="GenerateDocumentation" Type="Boolean">False</Compiler>
+			<Compiler Name="DefaultNamespace" Type="String"></Compiler>
+			<Compiler Name="SymbolDeprecated" Type="Boolean">False</Compiler>
+			<Compiler Name="SymbolLibrary" Type="Boolean">False</Compiler>
+			<Compiler Name="SymbolPlatform" Type="Boolean">False</Compiler>
+			<Compiler Name="SymbolExperimental" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitLibrary" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitPlatform" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitDeprecated" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitExperimental" Type="Boolean">False</Compiler>
+			<Compiler Name="HResultCompat" Type="Boolean">True</Compiler>
+			<Compiler Name="HidingMember" Type="Boolean">True</Compiler>
+			<Compiler Name="HiddenVirtual" Type="Boolean">True</Compiler>
+			<Compiler Name="Garbage" Type="Boolean">True</Compiler>
+			<Compiler Name="BoundsError" Type="Boolean">True</Compiler>
+			<Compiler Name="ZeroNilCompat" Type="Boolean">True</Compiler>
+			<Compiler Name="StringConstTruncated" Type="Boolean">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar" Type="Boolean">True</Compiler>
+			<Compiler Name="TypedConstVarPar" Type="Boolean">True</Compiler>
+			<Compiler Name="AsgToTypedConst" Type="Boolean">True</Compiler>
+			<Compiler Name="CaseLabelRange" Type="Boolean">True</Compiler>
+			<Compiler Name="ForVariable" Type="Boolean">True</Compiler>
+			<Compiler Name="ConstructingAbstract" Type="Boolean">True</Compiler>
+			<Compiler Name="ComparisonFalse" Type="Boolean">True</Compiler>
+			<Compiler Name="ComparisonTrue" Type="Boolean">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned" Type="Boolean">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned" Type="Boolean">True</Compiler>
+			<Compiler Name="UnsupportedConstruct" Type="Boolean">True</Compiler>
+			<Compiler Name="FileOpen" Type="Boolean">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc" Type="Boolean">True</Compiler>
+			<Compiler Name="BadGlobalSymbol" Type="Boolean">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor" Type="Boolean">True</Compiler>
+			<Compiler Name="InvalidDirective" Type="Boolean">True</Compiler>
+			<Compiler Name="PackageNoLink" Type="Boolean">True</Compiler>
+			<Compiler Name="PackageThreadVar" Type="Boolean">True</Compiler>
+			<Compiler Name="ImplicitImport" Type="Boolean">True</Compiler>
+			<Compiler Name="HPPEMITIgnored" Type="Boolean">True</Compiler>
+			<Compiler Name="NoRetVal" Type="Boolean">True</Compiler>
+			<Compiler Name="UseBeforeDef" Type="Boolean">True</Compiler>
+			<Compiler Name="ForLoopVarUndef" Type="Boolean">True</Compiler>
+			<Compiler Name="UnitNameMismatch" Type="Boolean">True</Compiler>
+			<Compiler Name="NoCFGFileFound" Type="Boolean">True</Compiler>
+			<Compiler Name="MessageDirective" Type="Boolean">True</Compiler>
+			<Compiler Name="ImplicitVariants" Type="Boolean">True</Compiler>
+			<Compiler Name="UnicodeToLocale" Type="Boolean">True</Compiler>
+			<Compiler Name="LocaleToUnicode" Type="Boolean">True</Compiler>
+			<Compiler Name="ImagebaseMultiple" Type="Boolean">True</Compiler>
+			<Compiler Name="SuspiciousTypecast" Type="Boolean">True</Compiler>
+			<Compiler Name="PrivatePropAccessor" Type="Boolean">True</Compiler>
+			<Compiler Name="UnsafeType" Type="Boolean">False</Compiler>
+			<Compiler Name="UnsafeCode" Type="Boolean">False</Compiler>
+			<Compiler Name="UnsafeCast" Type="Boolean">False</Compiler>
+			<Compiler Name="OptionTruncated" Type="Boolean">True</Compiler>
+			<Compiler Name="WideCharReduced" Type="Boolean">True</Compiler>
+			<Compiler Name="DuplicatesIgnored" Type="Boolean">True</Compiler>
+			<Compiler Name="UnitInitSeq">True</Compiler>
+			<Compiler Name="LocalPInvoke">True</Compiler>
+			<Compiler Name="CodePage"></Compiler>
+		</Compiler>
+		<Linker>
+			<Linker Name="MapFile" Type="Integer">0</Linker>
+			<Linker Name="OutputObjs" Type="Integer">0</Linker>
+			<Linker Name="ConsoleApp" Type="Integer">1</Linker>
+			<Linker Name="DebugInfo" Type="Boolean">False</Linker>
+			<Linker Name="RemoteSymbols" Type="Boolean">False</Linker>
+			<Linker Name="GenerateDRC" Type="Boolean">False</Linker>
+			<Linker Name="MinStackSize" Type="Integer">16384</Linker>
+			<Linker Name="MaxStackSize" Type="Integer">1048576</Linker>
+			<Linker Name="ImageBase" Type="Integer">4194304</Linker>
+			<Linker Name="ExeDescription" Type="String">RemObjects Data Abstract - IDE Package</Linker>
+			<Linker Name="GenerateHpps">False</Linker>
+		</Linker>
+		<Directories>
+			<Directories Name="OutputDir" Type="String"></Directories>
+			<Directories Name="UnitOutputDir" Type="String">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDLLOutputDir" Type="String">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDCPOutputDir" Type="String">..\..\Dcu\D10</Directories>
+			<Directories Name="SearchPath" Type="String">..\;..\..\Dcu\D10</Directories>
+			<Directories Name="Packages" Type="String"></Directories>
+			<Directories Name="Conditionals" Type="String"></Directories>
+			<Directories Name="DebugSourceDirs" Type="String"></Directories>
+			<Directories Name="UsePackages" Type="Boolean">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams" Type="String"></Parameters>
+			<Parameters Name="HostApplication" Type="String"></Parameters>
+			<Parameters Name="Launcher" Type="String"></Parameters>
+			<Parameters Name="UseLauncher" Type="Boolean">False</Parameters>
+			<Parameters Name="DebugCWD" Type="String"></Parameters>
+			<Parameters Name="RemoteHost" Type="String"></Parameters>
+			<Parameters Name="RemotePath" Type="String"></Parameters>
+			<Parameters Name="RemoteLauncher" Type="String"></Parameters>
+			<Parameters Name="RemoteCWD" Type="String"></Parameters>
+			<Parameters Name="RemoteDebug" Type="Boolean">False</Parameters>
+			<Parameters Name="Debug Symbols Search Path"></Parameters>
+			<Parameters Name="LoadAllSymbols">True</Parameters>
+			<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+		</Parameters>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+			<VersionInfo Name="MajorVer">3</VersionInfo>
+			<VersionInfo Name="MinorVer">0</VersionInfo>
+			<VersionInfo Name="Release">1</VersionInfo>
+			<VersionInfo Name="Build">361</VersionInfo>
+			<VersionInfo Name="Debug">False</VersionInfo>
+			<VersionInfo Name="PreRelease">False</VersionInfo>
+			<VersionInfo Name="Special">False</VersionInfo>
+			<VersionInfo Name="Private">False</VersionInfo>
+			<VersionInfo Name="DLL">False</VersionInfo>
+			<VersionInfo Name="Locale">1033</VersionInfo>
+			<VersionInfo Name="CodePage">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion">3.0.1.361</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+		</VersionInfoKeys>
+		<Language>
+			<Language Name="ActiveLang" Type="String"></Language>
+			<Language Name="ProjectLang" Type="String">$00000000</Language>
+			<Language Name="RootDir" Type="String"></Language>
+		</Language>
+	</Delphi.Personality>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D10.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D10.cfg
new file mode 100644
index 0000000..f6e54d1
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D10.cfg	
@@ -0,0 +1,52 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N0"..\..\Dcu\D10"
+-LE"..\..\Dcu\D10"
+-LN"..\..\Dcu\D10"
+-U"..\;..\..\Dcu\D10"
+-O"..\;..\..\Dcu\D10"
+-I"..\;..\..\Dcu\D10"
+-R"..\;..\..\Dcu\D10"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-SYMBOL_EXPERIMENTAL
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNIT_EXPERIMENTAL
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D10.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D10.dpk
new file mode 100644
index 0000000..fdc6b17
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D10.dpk	
@@ -0,0 +1,51 @@
+package DataAbstract_IDE_D10;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - IDE Package'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  DesignIDE,
+  vcldb,
+  dbrtl,
+  RemObjects_Core_D10,
+  RemObjects_IDE_D10,
+  RemObjects_Everwood_D10,
+  DataAbstract_Core_D10;
+
+contains
+  DataAbstract_IDE_Reg in 'DataAbstract_IDE_Reg.pas',
+  uDADataAbstractEditors in 'uDADataAbstractEditors.pas',
+  uDADBSessionManagerEditor in 'uDADBSessionManagerEditor.pas',
+  uDASchemaUnitsGenerator in 'uDASchemaUnitsGenerator.pas',
+  uDAIDEMenu in 'uDAIDEMenu.pas',
+  uDAIDEData in 'uDAIDEData.pas' {DAIdeData: TDataModule},
+  uDAIDERes in 'uDAIDERes.pas',
+  uDASelectDataTablesForm in 'uDASelectDataTablesForm.pas' {DASelectDataTablesForm},
+  uDADataTableMasterLinkWizardForm in 'uDADataTableMasterLinkWizardForm.pas' {DADataTableMasterLinkWizard},
+  uDAGuideWizardForm in 'uDAGuideWizardForm.pas' {DAGuideWizardForm},
+  uDADataTableWizards in 'uDADataTableWizards.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D10.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D10.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D10.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D11.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D11.dpk
new file mode 100644
index 0000000..aa099c4
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D11.dpk	
@@ -0,0 +1,51 @@
+package DataAbstract_IDE_D11;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - IDE Package'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  DesignIDE,
+  vcldb,
+  dbrtl,
+  RemObjects_Core_D11,
+  RemObjects_IDE_D11,
+  RemObjects_Everwood_D11,
+  DataAbstract_Core_D11;
+
+contains
+  DataAbstract_IDE_Reg in 'DataAbstract_IDE_Reg.pas',
+  uDADataAbstractEditors in 'uDADataAbstractEditors.pas',
+  uDADBSessionManagerEditor in 'uDADBSessionManagerEditor.pas',
+  uDASchemaUnitsGenerator in 'uDASchemaUnitsGenerator.pas',
+  uDAIDEMenu in 'uDAIDEMenu.pas',
+  uDAIDEData in 'uDAIDEData.pas' {DAIdeData: TDataModule},
+  uDAIDERes in 'uDAIDERes.pas',
+  uDASelectDataTablesForm in 'uDASelectDataTablesForm.pas' {DASelectDataTablesForm},
+  uDADataTableMasterLinkWizardForm in 'uDADataTableMasterLinkWizardForm.pas' {DADataTableMasterLinkWizard},
+  uDAGuideWizardForm in 'uDAGuideWizardForm.pas' {DAGuideWizardForm},
+  uDADataTableWizards in 'uDADataTableWizards.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D11.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D11.dproj
new file mode 100644
index 0000000..9ce7332
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D11.dproj	
@@ -0,0 +1,88 @@
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{83d4313b-eff3-4ea0-9289-ba6e608e821e}</ProjectGuid>
+    <MainSource>DataAbstract_IDE_D11.dpk</MainSource>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+    <DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_IDE_D11.bpl</DCC_DependencyCheckOutputName>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DebugInformation>False</DCC_DebugInformation>
+    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+    <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\;..\..\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\;..\..\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\;..\..\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\;..\..\Dcu\D11</DCC_IncludePath>
+    <DCC_Define>RELEASE</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_SYMBOL_EXPERIMENTAL>False</DCC_SYMBOL_EXPERIMENTAL>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+    <DCC_UNIT_EXPERIMENTAL>False</DCC_UNIT_EXPERIMENTAL>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\;..\..\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\;..\..\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\;..\..\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\;..\..\Dcu\D11</DCC_IncludePath>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_SYMBOL_EXPERIMENTAL>False</DCC_SYMBOL_EXPERIMENTAL>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+    <DCC_UNIT_EXPERIMENTAL>False</DCC_UNIT_EXPERIMENTAL>
+  </PropertyGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Delphi.Personality</Borland.Personality>
+    <Borland.ProjectType>Package</Borland.ProjectType>
+    <BorlandProject>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">RemObjects Data Abstract - IDE Package</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">3</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">6</VersionInfo><VersionInfo Name="Build">442</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">3.0.6.442</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">DataAbstract_IDE_D11.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
+  <ItemGroup>
+    <DelphiCompile Include="DataAbstract_IDE_D11.dpk">
+      <MainSource>MainSource</MainSource>
+    </DelphiCompile>
+    <DCCReference Include="DataAbstract_IDE_Reg.pas" />
+    <DCCReference Include="uDADataAbstractEditors.pas" />
+    <DCCReference Include="uDADataTableMasterLinkWizardForm.pas">
+      <Form>DADataTableMasterLinkWizard</Form>
+    </DCCReference>
+    <DCCReference Include="uDADataTableWizards.pas" />
+    <DCCReference Include="uDADBSessionManagerEditor.pas" />
+    <DCCReference Include="uDAGuideWizardForm.pas">
+      <Form>DAGuideWizardForm</Form>
+    </DCCReference>
+    <DCCReference Include="uDAIDEData.pas">
+      <Form>DAIdeData</Form>
+      <DesignClass>TDataModule</DesignClass>
+    </DCCReference>
+    <DCCReference Include="uDAIDEMenu.pas" />
+    <DCCReference Include="uDAIDERes.pas" />
+    <DCCReference Include="uDASchemaUnitsGenerator.pas" />
+    <DCCReference Include="uDASelectDataTablesForm.pas">
+      <Form>DASelectDataTablesForm</Form>
+    </DCCReference>
+  </ItemGroup>
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D11.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D11.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D11.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D12.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D12.dpk
new file mode 100644
index 0000000..5ffd96f
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D12.dpk	
@@ -0,0 +1,51 @@
+package DataAbstract_IDE_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - IDE Package'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  DesignIDE,
+  vcldb,
+  dbrtl,
+  RemObjects_Core_D12,
+  RemObjects_IDE_D12,
+  RemObjects_Everwood_D12,
+  DataAbstract_Core_D12;
+
+contains
+  DataAbstract_IDE_Reg in 'DataAbstract_IDE_Reg.pas',
+  uDADataAbstractEditors in 'uDADataAbstractEditors.pas',
+  uDADBSessionManagerEditor in 'uDADBSessionManagerEditor.pas',
+  uDASchemaUnitsGenerator in 'uDASchemaUnitsGenerator.pas',
+  uDAIDEMenu in 'uDAIDEMenu.pas',
+  uDAIDEData in 'uDAIDEData.pas' {DAIdeData: TDataModule},
+  uDAIDERes in 'uDAIDERes.pas',
+  uDASelectDataTablesForm in 'uDASelectDataTablesForm.pas' {DASelectDataTablesForm},
+  uDADataTableMasterLinkWizardForm in 'uDADataTableMasterLinkWizardForm.pas' {DADataTableMasterLinkWizard},
+  uDAGuideWizardForm in 'uDAGuideWizardForm.pas' {DAGuideWizardForm},
+  uDADataTableWizards in 'uDADataTableWizards.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D12.dproj b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D12.dproj
new file mode 100644
index 0000000..dcc42eb
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D12.dproj	
@@ -0,0 +1,121 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{83d4313b-eff3-4ea0-9289-ba6e608e821e}</ProjectGuid>
+			<MainSource>DataAbstract_IDE_D12.dpk</MainSource>
+			<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+			<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+			<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D11\DataAbstract_IDE_D11.bpl</DCC_DependencyCheckOutputName>
+			<ProjectVersion>11.1</ProjectVersion>
+			<Config Condition="'$(Config)'==''">Base</Config>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base)'!=''">
+			<DCC_DebugDCUs>true</DCC_DebugDCUs>
+			<DCC_SymbolReferenceInfo>1</DCC_SymbolReferenceInfo>
+			<DCC_CVT_WIDENING_STRING_LOST>error</DCC_CVT_WIDENING_STRING_LOST>
+			<DCC_IMPLICIT_STRING_CAST_LOSS>error</DCC_IMPLICIT_STRING_CAST_LOSS>
+			<DCC_IMPLICIT_STRING_CAST>error</DCC_IMPLICIT_STRING_CAST>
+			<DCC_UnitSearchPath>..;..\..\Dcu\D12;..\..\..\RemObjects SDK for Delphi\Dcu\D12;..\..\..\Everwood\Bin;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+			<DCC_EXPLICIT_STRING_CAST_LOSS>error</DCC_EXPLICIT_STRING_CAST_LOSS>
+			<DCC_CVT_WCHAR_TO_ACHAR>error</DCC_CVT_WCHAR_TO_ACHAR>
+			<DCC_BplOutput>..\..\Dcu\D12\</DCC_BplOutput>
+			<DCC_EXPLICIT_STRING_CAST>error</DCC_EXPLICIT_STRING_CAST>
+			<DCC_CVT_ACHAR_TO_WCHAR>error</DCC_CVT_ACHAR_TO_WCHAR>
+			<DCC_DcuOutput>..\..\Dcu\D12\</DCC_DcuOutput>
+			<DCC_CVT_NARROWING_STRING_LOST>error</DCC_CVT_NARROWING_STRING_LOST>
+			<DCC_DcpOutput>..\..\Dcu\D12\</DCC_DcpOutput>
+			<GenDll>true</GenDll>
+			<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+			<GenPackage>true</GenPackage>
+			<DCC_GenerateStackFrames>true</DCC_GenerateStackFrames>
+			<DesignOnlyPackage>false</DesignOnlyPackage>
+			<DCC_ImageBase>00400000</DCC_ImageBase>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D12\DataAbstract_IDE_D12.bpl</DCC_DependencyCheckOutputName>
+			<DCC_Description>RemObjects Data Abstract - IDE Package</DCC_Description>
+		</PropertyGroup>
+		<ItemGroup>
+			<DelphiCompile Include="DataAbstract_IDE_D12.dpk">
+				<MainSource>MainSource</MainSource>
+			</DelphiCompile>
+			<DCCReference Include="rtl.dcp"/>
+			<DCCReference Include="DesignIDE.dcp"/>
+			<DCCReference Include="vcldb.dcp"/>
+			<DCCReference Include="dbrtl.dcp"/>
+			<DCCReference Include="RemObjects_Core_D12.dcp"/>
+			<DCCReference Include="RemObjects_IDE_D12.dcp"/>
+			<DCCReference Include="RemObjects_Everwood_D12.dcp"/>
+			<DCCReference Include="DataAbstract_Core_D12.dcp"/>
+			<DCCReference Include="DataAbstract_IDE_Reg.pas"/>
+			<DCCReference Include="uDADataAbstractEditors.pas"/>
+			<DCCReference Include="uDADBSessionManagerEditor.pas"/>
+			<DCCReference Include="uDASchemaUnitsGenerator.pas"/>
+			<DCCReference Include="uDAIDEMenu.pas"/>
+			<DCCReference Include="uDAIDEData.pas">
+				<Form>DAIdeData</Form>
+				<DesignClass>TDataModule</DesignClass>
+			</DCCReference>
+			<DCCReference Include="uDAIDERes.pas"/>
+			<DCCReference Include="uDASelectDataTablesForm.pas">
+				<Form>DASelectDataTablesForm</Form>
+			</DCCReference>
+			<DCCReference Include="uDADataTableMasterLinkWizardForm.pas">
+				<Form>DADataTableMasterLinkWizard</Form>
+			</DCCReference>
+			<DCCReference Include="uDAGuideWizardForm.pas">
+				<Form>DAGuideWizardForm</Form>
+			</DCCReference>
+			<DCCReference Include="uDADataTableWizards.pas"/>
+			<BuildConfiguration Include="Base">
+				<Key>Base</Key>
+			</BuildConfiguration>
+		</ItemGroup>
+		<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+		<ProjectExtensions>
+			<Borland.Personality>Delphi.Personality.12</Borland.Personality>
+			<Borland.ProjectType>Package</Borland.ProjectType>
+			<BorlandProject>
+				<Delphi.Personality>
+					<Parameters>
+						<Parameters Name="UseLauncher">False</Parameters>
+						<Parameters Name="LoadAllSymbols">True</Parameters>
+						<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+						<Parameters Name="RunParams">-pDelphi</Parameters>
+						<Parameters Name="HostApplication">C:\Program Files\CodeGear\RAD Studio\6.0\bin\bds.exe</Parameters>
+					</Parameters>
+					<VersionInfo>
+						<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+						<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+						<VersionInfo Name="MajorVer">5</VersionInfo>
+						<VersionInfo Name="MinorVer">0</VersionInfo>
+						<VersionInfo Name="Release">35</VersionInfo>
+						<VersionInfo Name="Build">741</VersionInfo>
+						<VersionInfo Name="Debug">False</VersionInfo>
+						<VersionInfo Name="PreRelease">False</VersionInfo>
+						<VersionInfo Name="Special">False</VersionInfo>
+						<VersionInfo Name="Private">False</VersionInfo>
+						<VersionInfo Name="DLL">False</VersionInfo>
+						<VersionInfo Name="Locale">1033</VersionInfo>
+						<VersionInfo Name="CodePage">1252</VersionInfo>
+					</VersionInfo>
+					<VersionInfoKeys>
+						<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="FileDescription"/>
+						<VersionInfoKeys Name="FileVersion">5.0.35.741</VersionInfoKeys>
+						<VersionInfoKeys Name="InternalName"/>
+						<VersionInfoKeys Name="LegalCopyright"/>
+						<VersionInfoKeys Name="LegalTrademarks"/>
+						<VersionInfoKeys Name="OriginalFilename"/>
+						<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+						<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+					</VersionInfoKeys>
+					<Source>
+						<Source Name="MainSource">DataAbstract_IDE_D12.dpk</Source>
+					</Source>
+				</Delphi.Personality>
+			</BorlandProject>
+			<ProjectFileVersion>12</ProjectFileVersion>
+		</ProjectExtensions>
+	</Project>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D12.identcache b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D12.identcache
new file mode 100644
index 0000000..f25b077
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D12.identcache differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D12.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D12.res
new file mode 100644
index 0000000..da6c4f2
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D12.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D6.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D6.cfg
new file mode 100644
index 0000000..a95f764
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D6.cfg	
@@ -0,0 +1,41 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D6"
+-LE"..\..\Dcu\D6"
+-LN"..\..\Dcu\D6"
+-U"..\Dcu\D6"
+-O"..\Dcu\D6"
+-I"..\Dcu\D6"
+-R"..\Dcu\D6"
+-Z
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D6.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D6.dof
new file mode 100644
index 0000000..f1ca4e5
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D6.dof	
@@ -0,0 +1,116 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=Data Abstract - IDE Package
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D6
+PackageDLLOutputDir=..\..\Dcu\D6
+PackageDCPOutputDir=..\..\Dcu\D6
+SearchPath=..\Dcu\D6
+Packages=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=2.0.0.138
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D6.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D6.dpk
new file mode 100644
index 0000000..c2b6298
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D6.dpk	
@@ -0,0 +1,51 @@
+package DataAbstract_IDE_D6;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - IDE Package'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  DesignIDE,
+  vcldb,
+  dbrtl,
+  RemObjects_Core_D6,
+  RemObjects_IDE_D6,
+  RemObjects_Everwood_D6,
+  DataAbstract_Core_D6;
+
+contains
+  DataAbstract_IDE_Reg in 'DataAbstract_IDE_Reg.pas',
+  uDADataAbstractEditors in 'uDADataAbstractEditors.pas',
+  uDADBSessionManagerEditor in 'uDADBSessionManagerEditor.pas',
+  uDASchemaUnitsGenerator in 'uDASchemaUnitsGenerator.pas',
+  uDAIDEMenu in 'uDAIDEMenu.pas',
+  uDAIDEData in 'uDAIDEData.pas' {DAIdeData: TDataModule},
+  uDAIDERes in 'uDAIDERes.pas',
+  uDASelectDataTablesForm in 'uDASelectDataTablesForm.pas' {DASelectDataTablesForm},
+  uDADataTableMasterLinkWizardForm in 'uDADataTableMasterLinkWizardForm.pas' {DADataTableMasterLinkWizard},
+  uDAGuideWizardForm in 'uDAGuideWizardForm.pas' {DAGuideWizardForm},
+  uDADataTableWizards in 'uDADataTableWizards.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D6.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D6.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D6.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D7.cfg b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D7.cfg
new file mode 100644
index 0000000..5645689
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D7.cfg	
@@ -0,0 +1,50 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D7"
+-LE"..\..\Dcu\D7"
+-LN"..\..\Dcu\D7"
+-U"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-O"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-I"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-R"..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D7.dof b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D7.dof
new file mode 100644
index 0000000..2b8a3a6
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D7.dof	
@@ -0,0 +1,116 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects Data Abstract - IDE Package
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D7
+PackageDLLOutputDir=..\..\Dcu\D7
+PackageDCPOutputDir=..\..\Dcu\D7
+SearchPath=..\..\Dcu\D7;..\..\Dcu\DevEx;..\..\..\RemObjects SDK\Dcu\D7
+Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;dclOfficeXP;RemObjects_DataSnap_D7;PurposesoftD7;addict3_d6;tb2kComplete_70;CDKDesignTimeSupport;CDKSmp;CDK;ES_CodeSite20;ESDelphiCommandCompiler;ESFileSearch;ESVisualCompositeExpert;EaglWk;ESGraphUtils;ESBase;ESVsCp;ESSampleComposites70;ESSampleCompositeEditors7;Rz252N70;SynEdit_D7;dxsbD7;dxComnD7;dxDockingD7;dxEdtrD7;dxELibD7;dxExELD7;EQGridD7;dxExRwD7;dxDBEdD7;dxInsD7;dxGrEdD7;ECQDBCD7;EQTLD7;EQDBTLD7;dxLayoutControlD7;dxMasterViewD7;dxmdsd7;dxNavBarD7;dxObjInsD7;dxPageControlD7;dxPSCoreD7;Rz252D70;cxPageControlVCLD7;cxEditorsVCLD7;dxThemeD7;cxLibraryVCLD7;cxDataD7;cxGridUtilsVCLD7;cxGridVCLD7;RemObjects_BPDX_D7
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=3.0.0.280
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D7.dpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D7.dpk
new file mode 100644
index 0000000..377b366
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D7.dpk	
@@ -0,0 +1,51 @@
+package DataAbstract_IDE_D7;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - IDE Package'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  DesignIDE,
+  vcldb,
+  dbrtl,
+  RemObjects_Core_D7,
+  RemObjects_IDE_D7,
+  RemObjects_Everwood_D7,
+  DataAbstract_Core_D7;
+
+contains
+  DataAbstract_IDE_Reg in 'DataAbstract_IDE_Reg.pas',
+  uDADataAbstractEditors in 'uDADataAbstractEditors.pas',
+  uDADBSessionManagerEditor in 'uDADBSessionManagerEditor.pas',
+  uDASchemaUnitsGenerator in 'uDASchemaUnitsGenerator.pas',
+  uDAIDEMenu in 'uDAIDEMenu.pas',
+  uDAIDEData in 'uDAIDEData.pas' {DAIdeData: TDataModule},
+  uDAIDERes in 'uDAIDERes.pas',
+  uDASelectDataTablesForm in 'uDASelectDataTablesForm.pas' {DASelectDataTablesForm},
+  uDADataTableMasterLinkWizardForm in 'uDADataTableMasterLinkWizardForm.pas' {DADataTableMasterLinkWizard},
+  uDAGuideWizardForm in 'uDAGuideWizardForm.pas' {DAGuideWizardForm},
+  uDADataTableWizards in 'uDADataTableWizards.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D7.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D7.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_D7.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_Lazarus_Mac.lpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_Lazarus_Mac.lpk
new file mode 100644
index 0000000..ed53532
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_Lazarus_Mac.lpk	
@@ -0,0 +1,114 @@
+<?xml version="1.0"?>
+<CONFIG>
+  <Package Version="3">
+    <Name Value="DataAbstract_IDE_Lazarus_Mac"/>
+    <CompilerOptions>
+      <Version Value="8"/>
+      <SearchPaths>
+        <UnitOutputDirectory Value="../units/$(TargetCPU)-$(TargetOS)"/>
+        <ObjectPath Value="../../Dcu/D7/"/>
+      </SearchPaths>
+      <Other>
+        <CompilerPath Value="$(CompPath)"/>
+      </Other>
+    </CompilerOptions>
+    <Files Count="16">
+      <Item1>
+        <Filename Value="DataAbstract_IDE_Reg.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="DataAbstract_IDE_Reg"/>
+      </Item1>
+      <Item2>
+        <Filename Value="uDADataAbstractEditors.pas"/>
+        <UnitName Value="uDADataAbstractEditors"/>
+      </Item2>
+      <Item3>
+        <Filename Value="uDADataTableMasterLinkWizardForm_laz.pas"/>
+        <UnitName Value="uDADataTableMasterLinkWizardForm_laz"/>
+      </Item3>
+      <Item4>
+        <Filename Value="uDADataTableMasterLinkWizardForm_laz.lfm"/>
+        <Type Value="LFM"/>
+      </Item4>
+      <Item5>
+        <Filename Value="uDADataTableMasterLinkWizardForm_laz.lrs"/>
+        <Type Value="LRS"/>
+      </Item5>
+      <Item6>
+        <Filename Value="uDADataTableWizards.pas"/>
+        <UnitName Value="uDADataTableWizards"/>
+      </Item6>
+      <Item7>
+        <Filename Value="uDADBSessionManagerEditor.pas"/>
+        <UnitName Value="uDADBSessionManagerEditor"/>
+      </Item7>
+      <Item8>
+        <Filename Value="uDAIDEData.pas"/>
+        <UnitName Value="uDAIDEData"/>
+      </Item8>
+      <Item9>
+        <Filename Value="uDAIDEData.lfm"/>
+        <Type Value="LFM"/>
+      </Item9>
+      <Item10>
+        <Filename Value="uDAIDEData.lrs"/>
+        <Type Value="LRS"/>
+      </Item10>
+      <Item11>
+        <Filename Value="uDAIDEMenu_laz.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="uDAIDEMenu_laz"/>
+      </Item11>
+      <Item12>
+        <Filename Value="uDAIDERes.pas"/>
+        <UnitName Value="uDAIDERes"/>
+      </Item12>
+      <Item13>
+        <Filename Value="uDASchemaUnitsGenerator.pas"/>
+        <UnitName Value="uDASchemaUnitsGenerator"/>
+      </Item13>
+      <Item14>
+        <Filename Value="uDASelectDataTablesForm.pas"/>
+        <UnitName Value="uDASelectDataTablesForm"/>
+      </Item14>
+      <Item15>
+        <Filename Value="uDASelectDataTablesForm.lfm"/>
+        <Type Value="LFM"/>
+      </Item15>
+      <Item16>
+        <Filename Value="uDASelectDataTablesForm.lrs"/>
+        <Type Value="LRS"/>
+      </Item16>
+    </Files>
+    <Type Value="RunAndDesignTime"/>
+    <RequiredPkgs Count="6">
+      <Item1>
+        <PackageName Value="FCL"/>
+        <MinVersion Major="1" Valid="True"/>
+      </Item1>
+      <Item2>
+        <PackageName Value="IDEIntf"/>
+      </Item2>
+      <Item3>
+        <PackageName Value="RemObjects_IDE_Lazarus_Mac"/>
+      </Item3>
+      <Item4>
+        <PackageName Value="DataAbstract_Core_Lazarus_Mac"/>
+      </Item4>
+      <Item5>
+        <PackageName Value="RemObjects_Everwood_Lazarus_Mac"/>
+      </Item5>
+      <Item6>
+        <PackageName Value="LCL"/>
+        <MinVersion Major="1" Valid="True"/>
+      </Item6>
+    </RequiredPkgs>
+    <UsageOptions>
+      <UnitPath Value="$(PkgOutDir)"/>
+    </UsageOptions>
+    <PublishOptions>
+      <Version Value="2"/>
+      <IgnoreBinaries Value="False"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_Lazarus_Unix.lpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_Lazarus_Unix.lpk
new file mode 100644
index 0000000..9ee52af
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_Lazarus_Unix.lpk	
@@ -0,0 +1,120 @@
+<?xml version="1.0"?>
+<CONFIG>
+  <Package Version="3">
+    <PathDelim Value="\"/>
+    <Name Value="DataAbstract_IDE_Lazarus_Unix"/>
+    <CompilerOptions>
+      <Version Value="5"/>
+      <PathDelim Value="\"/>
+      <SearchPaths>
+        <UnitOutputDirectory Value="..\units\$(TargetCPU)-$(TargetOS)"/>
+        <ObjectPath Value="..\..\Dcu\D7\"/>
+      </SearchPaths>
+      <CodeGeneration>
+        <Generate Value="Faster"/>
+      </CodeGeneration>
+      <Other>
+        <CompilerPath Value="$(CompPath)"/>
+      </Other>
+    </CompilerOptions>
+    <Files Count="16">
+      <Item1>
+        <Filename Value="DataAbstract_IDE_Reg.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="DataAbstract_IDE_Reg"/>
+      </Item1>
+      <Item2>
+        <Filename Value="uDADataAbstractEditors.pas"/>
+        <UnitName Value="uDADataAbstractEditors"/>
+      </Item2>
+      <Item3>
+        <Filename Value="uDADataTableMasterLinkWizardForm_laz.pas"/>
+        <UnitName Value="uDADataTableMasterLinkWizardForm_laz"/>
+      </Item3>
+      <Item4>
+        <Filename Value="uDADataTableMasterLinkWizardForm_laz.lfm"/>
+        <Type Value="LFM"/>
+      </Item4>
+      <Item5>
+        <Filename Value="uDADataTableMasterLinkWizardForm_laz.lrs"/>
+        <Type Value="LRS"/>
+      </Item5>
+      <Item6>
+        <Filename Value="uDADataTableWizards.pas"/>
+        <UnitName Value="uDADataTableWizards"/>
+      </Item6>
+      <Item7>
+        <Filename Value="uDADBSessionManagerEditor.pas"/>
+        <UnitName Value="uDADBSessionManagerEditor"/>
+      </Item7>
+      <Item8>
+        <Filename Value="uDAIDEData.pas"/>
+        <UnitName Value="uDAIDEData"/>
+      </Item8>
+      <Item9>
+        <Filename Value="uDAIDEData.lfm"/>
+        <Type Value="LFM"/>
+      </Item9>
+      <Item10>
+        <Filename Value="uDAIDEData.lrs"/>
+        <Type Value="LRS"/>
+      </Item10>
+      <Item11>
+        <Filename Value="uDAIDEMenu_laz.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="uDAIDEMenu_laz"/>
+      </Item11>
+      <Item12>
+        <Filename Value="uDAIDERes.pas"/>
+        <UnitName Value="uDAIDERes"/>
+      </Item12>
+      <Item13>
+        <Filename Value="uDASchemaUnitsGenerator.pas"/>
+        <UnitName Value="uDASchemaUnitsGenerator"/>
+      </Item13>
+      <Item14>
+        <Filename Value="uDASelectDataTablesForm.pas"/>
+        <UnitName Value="uDASelectDataTablesForm"/>
+      </Item14>
+      <Item15>
+        <Filename Value="uDASelectDataTablesForm.lfm"/>
+        <Type Value="LFM"/>
+      </Item15>
+      <Item16>
+        <Filename Value="uDASelectDataTablesForm.lrs"/>
+        <Type Value="LRS"/>
+      </Item16>
+    </Files>
+    <Type Value="RunAndDesignTime"/>
+    <RequiredPkgs Count="6">
+      <Item1>
+        <PackageName Value="FCL"/>
+        <MinVersion Major="1" Valid="True"/>
+      </Item1>
+      <Item2>
+        <PackageName Value="IDEIntf"/>
+      </Item2>
+      <Item3>
+        <PackageName Value="RemObjects_IDE_Lazarus_Unix"/>
+      </Item3>
+      <Item4>
+        <PackageName Value="DataAbstract_Core_Lazarus_Unix"/>
+      </Item4>
+      <Item5>
+        <PackageName Value="RemObjects_Everwood_Lazarus_Unix"/>
+      </Item5>
+      <Item6>
+        <PackageName Value="LCL"/>
+        <MinVersion Major="1" Valid="True"/>
+      </Item6>
+    </RequiredPkgs>
+    <UsageOptions>
+      <UnitPath Value="$(PkgOutDir)"/>
+    </UsageOptions>
+    <PublishOptions>
+      <Version Value="2"/>
+      <DestinationDirectory Value="$(TestDir)\publishedpackage\"/>
+      <IgnoreBinaries Value="False"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_Lazarus_Windows.lpk b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_Lazarus_Windows.lpk
new file mode 100644
index 0000000..7cfde89
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_Lazarus_Windows.lpk	
@@ -0,0 +1,116 @@
+<?xml version="1.0"?>
+<CONFIG>
+  <Package Version="3">
+    <PathDelim Value="\"/>
+    <Name Value="DataAbstract_IDE_Lazarus_Windows"/>
+    <CompilerOptions>
+      <Version Value="5"/>
+      <PathDelim Value="\"/>
+      <SearchPaths>
+        <UnitOutputDirectory Value="..\..\Dcu\Lazarus\$(TargetCPU)-$(TargetOS)"/>
+        <ObjectPath Value="..\..\Dcu\D7\"/>
+        <SrcPath Value="..\"/>
+      </SearchPaths>
+      <CodeGeneration>
+        <Generate Value="Faster"/>
+      </CodeGeneration>
+      <Other>
+        <CompilerPath Value="$(CompPath)"/>
+      </Other>
+    </CompilerOptions>
+    <Files Count="16">
+      <Item1>
+        <Filename Value="DataAbstract_IDE_Reg.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="DataAbstract_IDE_Reg"/>
+      </Item1>
+      <Item2>
+        <Filename Value="uDADataAbstractEditors.pas"/>
+        <UnitName Value="uDADataAbstractEditors"/>
+      </Item2>
+      <Item3>
+        <Filename Value="uDADataTableMasterLinkWizardForm_laz.pas"/>
+        <UnitName Value="uDADataTableMasterLinkWizardForm_laz"/>
+      </Item3>
+      <Item4>
+        <Filename Value="uDADataTableMasterLinkWizardForm_laz.lfm"/>
+        <Type Value="LFM"/>
+      </Item4>
+      <Item5>
+        <Filename Value="uDADataTableMasterLinkWizardForm_laz.lrs"/>
+        <Type Value="LRS"/>
+      </Item5>
+      <Item6>
+        <Filename Value="uDADataTableWizards.pas"/>
+        <UnitName Value="uDADataTableWizards"/>
+      </Item6>
+      <Item7>
+        <Filename Value="uDADBSessionManagerEditor.pas"/>
+        <UnitName Value="uDADBSessionManagerEditor"/>
+      </Item7>
+      <Item8>
+        <Filename Value="uDAIDEData.pas"/>
+        <UnitName Value="uDAIDEData"/>
+      </Item8>
+      <Item9>
+        <Filename Value="uDAIDEData.lfm"/>
+        <Type Value="LFM"/>
+      </Item9>
+      <Item10>
+        <Filename Value="uDAIDEData.lrs"/>
+        <Type Value="LRS"/>
+      </Item10>
+      <Item11>
+        <Filename Value="uDAIDEMenu_laz.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="uDAIDEMenu_laz"/>
+      </Item11>
+      <Item12>
+        <Filename Value="uDAIDERes.pas"/>
+        <UnitName Value="uDAIDERes"/>
+      </Item12>
+      <Item13>
+        <Filename Value="uDASchemaUnitsGenerator.pas"/>
+        <UnitName Value="uDASchemaUnitsGenerator"/>
+      </Item13>
+      <Item14>
+        <Filename Value="uDASelectDataTablesForm.pas"/>
+        <UnitName Value="uDASelectDataTablesForm"/>
+      </Item14>
+      <Item15>
+        <Filename Value="uDASelectDataTablesForm.lfm"/>
+        <Type Value="LFM"/>
+      </Item15>
+      <Item16>
+        <Filename Value="uDASelectDataTablesForm.lrs"/>
+        <Type Value="LRS"/>
+      </Item16>
+    </Files>
+    <Type Value="RunAndDesignTime"/>
+    <RequiredPkgs Count="5">
+      <Item1>
+        <PackageName Value="RemObjects_Everwood_Lazarus_Windows"/>
+      </Item1>
+      <Item2>
+        <PackageName Value="RemObjects_IDE_Lazarus_Windows"/>
+      </Item2>
+      <Item3>
+        <PackageName Value="DataAbstract_Core_Lazarus_Windows"/>
+      </Item3>
+      <Item4>
+        <PackageName Value="IDEIntf"/>
+      </Item4>
+      <Item5>
+        <PackageName Value="LCL"/>
+        <MinVersion Major="1" Valid="True"/>
+      </Item5>
+    </RequiredPkgs>
+    <UsageOptions>
+      <UnitPath Value="$(PkgOutDir)"/>
+    </UsageOptions>
+    <PublishOptions>
+      <Version Value="2"/>
+      <IgnoreBinaries Value="False"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_Reg.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_Reg.pas
new file mode 100644
index 0000000..3fad5ff
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/DataAbstract_IDE_Reg.pas	
@@ -0,0 +1,184 @@
+unit DataAbstract_IDE_Reg;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - IDE Library                                        }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFDEF MSWINDOWS}
+{$I ..\DataAbstract.inc}
+{$ELSE}
+{$I ../DataAbstract.inc}
+{$ENDIF}
+
+interface
+
+procedure Register;
+
+implementation
+
+uses
+  SysUtils, DB, Classes,
+  uRODLGenTools,
+  {$IFDEF FPC}
+  ComponentEditors,PropEdits,FormEditingIntf,
+  {$ELSE}
+  ColnEdit,uROProductVersionInfo,
+  {$IFDEF DELPHI5}
+  DsgnIntf, DMDesigner,
+  {$ELSE}
+  DesignIntf, DesignEditors,
+  {$ENDIF}
+  {$ENDIF}
+  uDAClasses, uDADataTable, uDARemoteDataAdapter, uDARemoteDataAdapterRequests,
+  uDADataAbstractEditors, uDADriverManager, uDAInterfaces, uDABusinessProcessor,
+  uDADBSessionManagerEditor, uDADBSessionManager,
+  DARemoteService_Impl, DALoginService_Impl,
+  DataAbstractService_Impl, BaseLoginService_Impl, MultiDbLoginService_Impl,MultiDbLoginServiceV5_Impl,
+  SimpleLoginService_Impl, uDAClientDataModule, uDADesigntimeCall, uDADataTableReferenceCollection,
+  fROAbout;
+
+
+procedure Register;
+begin
+  RegisterComponentEditor(TDADriverManager, TDADriverManagerEditor);
+  RegisterComponentEditor(TDASchema, TDASchemaEditor);
+  RegisterComponentEditor(TDAConnectionManager, TDAConnectionManagerEditor);
+  RegisterComponentEditor(TDADataDictionary, TDADataDictionaryEditor);
+  RegisterComponentEditor(TDADataTable, TDADataTableEditor);
+  RegisterComponentEditor(TDABaseRemoteDataAdapter, TDABaseRemoteDataAdapterEditor);
+  RegisterComponentEditor(TDARemoteDataAdapter, TDARemoteDataAdapterEditor);
+  RegisterComponentEditor(TDADesigntimeCall, TDADesigntimeCallEditor);
+
+  {$IFDEF MSWINDOWS}
+  //RegisterComponentEditor(TDAClientDataModule, TDAClientDataModuleEditor);
+  {$ENDIF MSWINDOWS}
+
+  RegisterPropertyEditor(TypeInfo(string), TDARemoteRequest, 'MethodName', TDADataRequestCallMethodNameEditor);
+
+  {$IFDEF MSWINDOWS}
+  RegisterPropertyEditor(TypeInfo(string), TDADataTable, 'MasterFields', TDADataTableMasterDetailProps);
+  RegisterPropertyEditor(TypeInfo(string), TDADataTable, 'DetailFields', TDADataTableMasterDetailProps);
+  RegisterPropertyEditor(TypeInfo(TStrings), TDADataTable, 'MasterRequestMappings', TDADataTableMasterDetailProps);
+  RegisterPropertyEditor(TypeInfo(TStrings), TDADataTable, 'MasterParamsMappings', TDADataTableMasterDetailProps);
+  {$ENDIF MSWINDOWS}
+
+  RegisterPropertyEditor(TypeInfo(string), TDADriverManager, 'DriverDirectory', TDADriverManagerDirectory);
+  RegisterPropertyEditor(TypeInfo(TComponent), TDADataTableReference, 'DataTable', TDADataTableReferenceDataTable);
+
+  RegisterPropertyEditor(TypeInfo(TDataset), TDADataSource, 'Dataset', NIL);
+
+  RegisterPropertyEditor(TypeInfo(string), TDADataTable, 'LogicalName', TDADataTableLogicalNameEditor);
+  RegisterPropertyEditor(TypeInfo(string), TDADataTable, 'LocalConnection', TDADataTableLocalConnection);
+
+  RegisterPropertyEditor(TypeInfo(string), TDAUpdateRule, 'DatasetName', TDACollectionItemDatasetNameEditor);
+  RegisterPropertyEditor(TypeInfo(string), TDADatasetRelationship, 'DetailDatasetName', TDACollectionItemDatasetNameEditor);
+  RegisterPropertyEditor(TypeInfo(string), TDADatasetRelationship, 'MasterDatasetName', TDACollectionItemDatasetNameEditor);
+
+  RegisterPropertyEditor(TypeInfo(string), TDABusinessProcessor, 'InsertCommandName', TDABusinessProcessorCommandProperty);
+  RegisterPropertyEditor(TypeInfo(string), TDABusinessProcessor, 'DeleteCommandName', TDABusinessProcessorCommandProperty);
+  RegisterPropertyEditor(TypeInfo(string), TDABusinessProcessor, 'UpdateCommandName', TDABusinessProcessorCommandProperty);
+  RegisterPropertyEditor(TypeInfo(string), TDABusinessProcessor, 'ReferencedDataset', TDABusinessProcessorRefDatasetProperty);
+  RegisterPropertyEditor(TypeInfo(string), TDABusinessProcessor, 'RefreshDatasetName', TDABusinessProcessorRefDatasetProperty);
+
+  RegisterPropertyEditor(TypeInfo(string), TDADBSessionManager, 'InsertSessionCommand', TDASchemaCommandListEditor);
+  RegisterPropertyEditor(TypeInfo(string), TDADBSessionManager, 'UpdateSessionCommand', TDASchemaCommandListEditor);
+  RegisterPropertyEditor(TypeInfo(string), TDADBSessionManager, 'DeleteSessionCommand', TDASchemaCommandListEditor);
+  RegisterPropertyEditor(TypeInfo(string), TDADBSessionManager, 'ClearSessionsCommand', TDASchemaCommandListEditor);
+  RegisterPropertyEditor(TypeInfo(string), TDADBSessionManager, 'GetSessionCountDataSet', TDASchemaDataSetListEditor);
+  RegisterPropertyEditor(TypeInfo(string), TDADBSessionManager, 'GetAllSessionIDsDataset', TDASchemaDataSetListEditor);
+  RegisterPropertyEditor(TypeInfo(string), TDADBSessionManager, 'GetSessionDataSet', TDASchemaDataSetListEditor);
+  RegisterPropertyEditor(TypeInfo(string), TDADBSessionManager, 'Connection', TDASchemaConnectionsListEditor);
+
+  RegisterPropertyEditor(TypeInfo(TCollection), TDADataset, 'Fields', TCollectionProperty);
+  RegisterPropertyEditor(TypeInfo(TCollection), TDADataset, 'Params', TCollectionProperty);
+  RegisterPropertyEditor(TypeInfo(TCollection), TDADataset, 'Statements', TCollectionProperty);
+
+  RegisterPropertyEditor(TypeInfo(string), TDALoginService, 'LoginDataset', TDARemoteServiceDataSetListEditor);
+  RegisterPropertyEditor(TypeInfo(string), TDALoginService, 'LogoutCommand', TDARemoteServiceCommandListEditor);
+
+  RegisterPropertyEditor(TypeInfo(string), TDAField, 'KeyFields', TDALookupSourceProperty);
+  RegisterPropertyEditor(TypeInfo(string), TDAField, 'LookupKeyFields', TDALookupDestProperty);
+  RegisterPropertyEditor(TypeInfo(string), TDAField, 'LookupResultField', TDALookupResultFieldProperty);
+
+  {$IFDEF FPC}
+  FormEditingHook.RegisterDesignerBaseClass(TDARemoteService);
+  FormEditingHook.RegisterDesignerBaseClass(TDALoginService);
+  FormEditingHook.RegisterDesignerBaseClass(TDataAbstractService);
+  FormEditingHook.RegisterDesignerBaseClass(TBaseLoginService);
+  FormEditingHook.RegisterDesignerBaseClass(TSimpleLoginService);
+  FormEditingHook.RegisterDesignerBaseClass(TMultiDbLoginService);
+  FormEditingHook.RegisterDesignerBaseClass(TMultiDbLoginServiceV5);
+  FormEditingHook.RegisterDesignerBaseClass(TDAClientDataModule);
+  {$ELSE}
+  {$IFDEF VER140UP}
+  RegisterCustomModule(TDARemoteService, TCustomModule);
+  RegisterCustomModule(TDALoginService, TCustomModule);
+  RegisterCustomModule(TDataAbstractService, TCustomModule);
+  RegisterCustomModule(TBaseLoginService, TCustomModule);
+  RegisterCustomModule(TSimpleLoginService, TCustomModule);
+  RegisterCustomModule(TMultiDbLoginService, TCustomModule);
+  RegisterCustomModule(TMultiDbLoginServiceV5, TCustomModule);
+  {$ELSE}
+  RegisterCustomModule(TDARemoteService, TDataModuleDesignerCustomModule);
+  RegisterCustomModule(TDALoginService, TDataModuleDesignerCustomModule);
+  RegisterCustomModule(TDataAbstractService, TDataModuleDesignerCustomModule);
+  RegisterCustomModule(TBaseLoginService, TDataModuleDesignerCustomModule);
+  RegisterCustomModule(TSimpleLoginService, TDataModuleDesignerCustomModule);
+  RegisterCustomModule(TMultiDbLoginService, TDataModuleDesignerCustomModule);
+  RegisterCustomModule(TMultiDbLoginServiceV5, TDataModuleDesignerCustomModule);
+  {$ENDIF}
+  RegisterCustomModule(TDAClientDataModule,TCustomModule);
+  { TDARemoteDataAdapter }
+  RegisterPropertiesInCategory('Dynamic Method Binding', TDARemoteDataAdapter, ['GetSchemaCall', 'GetDataCall', 'GetScriptsCall', 'UpdateDataCall']);
+
+  RegisterPropertiesInCategory('Legacy', TDAGetDataRequest, ['OutgoingParamsParameter', 'OutgoingIncludeSchemaParameter', 'OutgoingMaxRecordsParameter']);
+
+  { TDADataTable }
+  //RegisterPropertiesInCategory('Legacy v3.0', TDADataTable, ['DataRequestCall', 'DataUpdateCall', 'SchemaCall', 'ScriptCall', 'Adapter']);
+  RegisterPropertiesInCategory('Master/Detail', TDADataTable, ['MasterFields', 'MasterMappingMode', 'MasterOptions', 'MasterParamsMappings', 'MasterRequestMappings', 'MasterSource', 'DetailFields', 'DetailOptions']);
+  RegisterPropertiesInCategory('Database', TDADataTable, ['Fields', 'Params', 'LogicalName', 'IndexDefs', 'IndexName', 'Active', 'StoreActive', 'LogChanges', 'MaxRecords']);
+  RegisterPropertiesInCategory('Business Rules', TDADataTable, ['BusinessRulesID', 'ScriptCode']);
+  RegisterPropertiesInCategory('Local Data', TDADataTable, ['LocalConnection', 'LocalSchema', 'LocalDataStreamer']);
+
+  { DA Service }
+
+  { Login Services }
+  RegisterPropertiesInCategory('Login', TBaseLoginService, ['OnLogout']);
+  RegisterPropertiesInCategory('Login', TSimpleLoginService, ['OnLogin']);
+  RegisterPropertiesInCategory('Login', TMultiDbLoginService, ['OnLogin']);
+  {$ENDIF}
+
+  RegisterRODataModuleClass(TDataAbstractService,
+    '&Data Abstract 4.0 Service',
+    'Data Abstract datamodule. '+
+    'This is the preferred server type when creating a Data Abstract version 4.0 or above server.',
+    'uRORemoteDataModule, uDAInterfaces, DataAbstractService_Impl, DataAbstract4_Intf'
+  );
+
+  RegisterRODataModuleClass(TDARemoteService,
+    'Data Abstract &3.0 Remote Service',
+    'Data Abstract datamodule. This is the preferred server type when creating backward-compatible version 3.0 Data Abstract server.',
+    'uRORemoteDataModule, uDAInterfaces, DARemoteService_Impl, DataAbstract3_Intf'
+  );
+
+
+
+end;
+
+{$IFNDEF FPC}
+{$IFDEF MSWINDOWS}
+initialization
+  RegisterProduct('{261E7EA5-C380-42A4-90AC-1FA10ADB39D8}',VersionBuildNo(hInstance));
+finalization
+  UnregisterProduct('{261E7EA5-C380-42A4-90AC-1FA10ADB39D8}');
+{$ENDIF MSWINDOWS}
+{$ENDIF}
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/Resources.BDS.RES b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/Resources.BDS.RES
new file mode 100644
index 0000000..bfd676d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/Resources.BDS.RES differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/__history/DataAbstract_IDE_D12.dpk.~1~ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/__history/DataAbstract_IDE_D12.dpk.~1~
new file mode 100644
index 0000000..5ffd96f
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/__history/DataAbstract_IDE_D12.dpk.~1~	
@@ -0,0 +1,51 @@
+package DataAbstract_IDE_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Data Abstract - IDE Package'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  DesignIDE,
+  vcldb,
+  dbrtl,
+  RemObjects_Core_D12,
+  RemObjects_IDE_D12,
+  RemObjects_Everwood_D12,
+  DataAbstract_Core_D12;
+
+contains
+  DataAbstract_IDE_Reg in 'DataAbstract_IDE_Reg.pas',
+  uDADataAbstractEditors in 'uDADataAbstractEditors.pas',
+  uDADBSessionManagerEditor in 'uDADBSessionManagerEditor.pas',
+  uDASchemaUnitsGenerator in 'uDASchemaUnitsGenerator.pas',
+  uDAIDEMenu in 'uDAIDEMenu.pas',
+  uDAIDEData in 'uDAIDEData.pas' {DAIdeData: TDataModule},
+  uDAIDERes in 'uDAIDERes.pas',
+  uDASelectDataTablesForm in 'uDASelectDataTablesForm.pas' {DASelectDataTablesForm},
+  uDADataTableMasterLinkWizardForm in 'uDADataTableMasterLinkWizardForm.pas' {DADataTableMasterLinkWizard},
+  uDAGuideWizardForm in 'uDAGuideWizardForm.pas' {DAGuideWizardForm},
+  uDADataTableWizards in 'uDADataTableWizards.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAClientDataModuleDataTableWizardForm.dfm b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAClientDataModuleDataTableWizardForm.dfm
new file mode 100644
index 0000000..1b2f269
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAClientDataModuleDataTableWizardForm.dfm	
@@ -0,0 +1,176 @@
+object DAClientDataModuleDataTableWizardForm: TDAClientDataModuleDataTableWizardForm
+  Left = 417
+  Top = 173
+  BorderStyle = bsDialog
+  BorderWidth = 5
+  Caption = '%s - DataTable Wizard'
+  ClientHeight = 412
+  ClientWidth = 339
+  Color = clBtnFace
+  ParentFont = True
+  OldCreateOrder = False
+  Position = poScreenCenter
+  DesignSize = (
+    339
+    412)
+  PixelsPerInch = 96
+  TextHeight = 13
+  object lbl_ServerUrl1: TLabel
+    Left = 0
+    Top = 0
+    Width = 90
+    Height = 13
+    Caption = 'Select DataSets'
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWindowText
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    Font.Style = [fsBold]
+    ParentFont = False
+  end
+  object lbl_ServerUrl2: TLabel
+    Left = 16
+    Top = 16
+    Width = 248
+    Height = 26
+    Caption = 
+      'Select the Datasets  for that you want to generate TDADataTable ' +
+      'components.'
+    WordWrap = True
+  end
+  object BitBtn2: TBitBtn
+    Left = 264
+    Top = 387
+    Width = 75
+    Height = 25
+    Anchors = [akLeft, akBottom]
+    Cancel = True
+    Caption = 'Cancel'
+    ModalResult = 2
+    TabOrder = 0
+    Glyph.Data = {
+      36060000424D3606000000000000360000002800000020000000100000000100
+      18000000000000060000C40E0000C40E00000000000000000000FF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FF00009A00009AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00009A0000
+      9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+      00009A174AFD103BF400009AFF00FFFF00FFFF00FFFF00FF00009A002CF80030
+      FC00009AFF00FFFF00FFFF00FFFF00FF6B6B6BA8A8A8A0A0A06B6B6BFF00FFFF
+      00FFFF00FFFF00FF6B6B6B9A9A9A9C9C9C6B6B6BFF00FFFF00FFFF00FFFF00FF
+      00009A1A47F81A4CFF123BF100009AFF00FFFF00FF00009A012DF60132FF002A
+      F300009AFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7AAAAAA9F9F9F6B6B6BFF
+      00FFFF00FF6B6B6B9999999E9E9E9797976B6B6BFF00FFFF00FFFF00FFFF00FF
+      FF00FF00009A1C47F61B4DFF143EF400009A00009A002DF80134FF032BF20000
+      9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7ABABABA2A2A26B
+      6B6B6B6B6B9A9A9A9E9E9E9898986B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FF00009A1D48F61D50FF103DFB0431FE0132FF002CF600009AFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7ACACACA3
+      A3A39F9F9F9E9E9E9999996B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FF00009A1A48F91342FF0C3CFF0733F600009AFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7A7
+      A7A7A3A3A39C9C9C6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FF00009A214EFC1D4BFF1847FF1743F600009AFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BACACACAC
+      ACACA9A9A9A4A4A46B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FF00009A2E5BF92C5FFF224DF8204BF82355FF1B46F600009AFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BB1B1B1B3B3B3AB
+      ABABAAAAAAAFAFAFA6A6A66B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FF00009A3664FA386BFF2D59F400009A00009A224CF42558FF1D49F60000
+      9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BB6B6B6B9B9B9AEAEAE6B
+      6B6B6B6B6BA9A9A9B0B0B0A7A7A76B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+      00009A4071FA4274FF325DF100009AFF00FFFF00FF00009A224DF1275AFF204C
+      F800009AFF00FFFF00FFFF00FFFF00FF6B6B6BBBBBBBBEBEBEAFAFAF6B6B6BFF
+      00FFFF00FF6B6B6BA7A7A7B1B1B1AAAAAA6B6B6BFF00FFFF00FFFF00FFFF00FF
+      00009A497AFC3B66F300009AFF00FFFF00FFFF00FFFF00FF00009A2550F42655
+      FA00009AFF00FFFF00FFFF00FFFF00FF6B6B6BC0C0C0B5B5B56B6B6BFF00FFFF
+      00FFFF00FFFF00FF6B6B6BAAAAAAAEAEAE6B6B6BFF00FFFF00FFFF00FFFF00FF
+      FF00FF00009A00009AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00009A0000
+      9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
+    NumGlyphs = 2
+  end
+  object BitBtn1: TBitBtn
+    Left = 184
+    Top = 387
+    Width = 75
+    Height = 25
+    Anchors = [akRight, akBottom]
+    Caption = 'Finish'
+    Default = True
+    ModalResult = 1
+    TabOrder = 1
+    Glyph.Data = {
+      36060000424D3606000000000000360000002800000020000000100000000100
+      18000000000000060000220B0000220B00000000000000000000FF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF811E00FF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FF787878FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF811E00
+      811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FF787878787878FF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      811E00811E00811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FF787878787878787878FF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FF811E0095440F811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF787878898989787878FF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FF811E00A7632F811E00811E00FF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF7878789F9F9F78787878
+      7878FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FF811E00BF8B62CCA17E811E00811E00FF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF787878B8B8B8C6
+      C6C6787878787878FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FF811E00D8B69CE6D1BFE7D3C4811E00FF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF787878D1
+      D1D1E0E0E0E2E2E2787878FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FF811E00F0E2D9FCF7F2FAF0E6811E00811E
+      00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF78
+      7878EBEBEBF5F5F5F1F1F1787878787878FF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FF811E00D8AF96F4E2CFF0D7BDD8A784811E
+      00811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF78
+      7878D0D0D0E9E9E9E3E3E3CACACA787878787878FF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FF811E00F3DECAEFD4B8EBC9A7DAA67D811E00FF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF787878E7
+      E7E7E1E1E1DBDBDBC9C9C9787878FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FF811E00E7BB92E3B081E0A672D5925A811E
+      00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF78
+      7878D3D3D3CDCDCDC6C6C6BCBCBC787878FF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF811E00DA995ED78F50D38441CF7B
+      35811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FF787878BFBFBFB8B8B8B2B2B2ACACAC787878FF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF811E00811E00811E00811E
+      00811E00811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FF787878787878787878787878787878787878FF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
+    NumGlyphs = 2
+  end
+  object lb_DataSets: TCheckListBox
+    Left = 16
+    Top = 48
+    Width = 323
+    Height = 329
+    Anchors = [akLeft, akTop, akRight, akBottom]
+    ItemHeight = 13
+    TabOrder = 2
+  end
+end
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAClientDataModuleDataTableWizardForm.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAClientDataModuleDataTableWizardForm.pas
new file mode 100644
index 0000000..e48152d
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAClientDataModuleDataTableWizardForm.pas	
@@ -0,0 +1,114 @@
+unit uDAClientDataModuleDataTableWizardForm;
+
+interface
+
+uses
+  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
+  Dialogs, StdCtrls, CheckLst, Buttons, uDAClientDataModule, DesignIntf;
+
+type
+  TDAClientDataModuleDataTableWizardForm = class(TForm)
+    BitBtn2: TBitBtn;
+    BitBtn1: TBitBtn;
+    lbl_ServerUrl1: TLabel;
+    lbl_ServerUrl2: TLabel;
+    lb_DataSets: TCheckListBox;
+  private
+    fModule:TDAClientDataModule;
+    procedure FillDataSets;
+  public
+    class function Execute(aOwner: TComponent; aModule:TDAClientDataModule; aDesigner:IDesigner):boolean;
+  end;
+
+var
+  DAClientDataModuleDataTableWizardForm: TDAClientDataModuleDataTableWizardForm;
+
+implementation
+
+uses
+  uROClasses, uDAIDERes, uRODL, uRORemoteService,
+  uDADataAbstractEditors, uDAMemDataTable, uDAClasses, uDAPleaseWaitForm;
+
+{$R *.dfm}
+
+{ TDAClientDataModuleDataTableWizardForm }
+
+class function TDAClientDataModuleDataTableWizardForm.Execute(aOwner: TComponent; aModule: TDAClientDataModule; aDesigner:IDesigner): boolean;
+var
+  i:integer;
+begin
+  if not Assigned(aModule.RemoteService) then         RaiseError(err_AssignRemoteService);
+  if not Assigned(aModule.RemoteService.Channel) then RaiseError(err_AssignRemoteServiceChannel);
+  if not Assigned(aModule.RemoteService.Message) then RaiseError(err_AssignRemoteServiceMessage);
+
+  with self.Create(aOwner) do try
+
+    fModule := aModule;
+    Caption := Format(Caption,[fModule.Name]);
+    FillDataSets();
+
+    result := ShowModal() = idOk;
+    if result then begin
+
+      for i := 0 to lb_DataSets.Items.Count-1 do begin
+        if lb_DataSets.Checked[i] then begin
+          CreateDataTable(aDesigner, aModule, TDAMemDataTable, lb_DataSets.Items[i], false);
+        end;
+      end;
+
+    end;
+
+  finally
+    Free();
+  end;
+end;
+
+procedure TDAClientDataModuleDataTableWizardForm.FillDataSets;
+var
+  i: integer;
+  lSchema: TDASchema;
+  lDataSets: TStringList;
+begin
+
+  lDataSets := TStringList.Create();
+  try
+    lDataSets.Duplicates := dupIgnore;
+    lDataSets.Sorted := true;
+
+
+    lSchema := nil;
+    with CreatePleaseWaitForm(self,'Retrieving Schema...') do begin
+      fModule.GetSchema(lSchema,true);
+      Hide;
+    end;
+    try
+      for i := 0 to lSchema.Datasets.Count-1 do begin
+        lDataSets.Add(lSchema.Datasets[i].Name);
+      end; { for }
+    finally
+      lSchema.Free();
+    end;
+
+    lb_DataSets.Items.Assign(lDataSets);
+    for i := 0 to lb_Datasets.Items.Count-1 do begin
+      lb_DataSets.Checked[i] := true;
+    end; { for }
+
+  finally
+    FreeAndNil(lDataSets);
+  end;
+  {lLibrary := fModule.RemoteService.GetRODLLibrary();
+  if not Assigned (lLibrary) then RaiseError('Library could not retrieved from server');
+  try
+    lDataSets := fModule.RemoteService.GetServiceMethods();
+    for i := 0 to lDataSets.Count-1 do begin
+      p := Pos('_',lDataSets[i]);
+      if p > 0 then
+        lb_DataSets.Checked[lb_DataSets.Items.Add(Copy(lDataSets[i],p+1,Length(lDataSets[i])-p))] := true;
+    end;
+  finally
+    lLibrary.Free();
+  end; }
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAClientDataModuleEditorForm.dfm b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAClientDataModuleEditorForm.dfm
new file mode 100644
index 0000000..3b17c9c
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAClientDataModuleEditorForm.dfm	
@@ -0,0 +1,280 @@
+object DAClientDataModuleEditorForm: TDAClientDataModuleEditorForm
+  Left = 381
+  Top = 253
+  BorderStyle = bsDialog
+  BorderWidth = 5
+  Caption = '%s - ClientDataModule Editor'
+  ClientHeight = 183
+  ClientWidth = 322
+  Color = clBtnFace
+  ParentFont = True
+  OldCreateOrder = False
+  Position = poScreenCenter
+  DesignSize = (
+    322
+    183)
+  PixelsPerInch = 96
+  TextHeight = 13
+  object lbl_ServerUrl1: TLabel
+    Left = 0
+    Top = 0
+    Width = 66
+    Height = 13
+    Caption = 'Server URL:'
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWindowText
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    Font.Style = [fsBold]
+    ParentFont = False
+  end
+  object lbl_ServerUrl2: TLabel
+    Left = 16
+    Top = 16
+    Width = 211
+    Height = 13
+    Caption = 'Select the URL of yout development server.'
+  end
+  object lbl_ServerUrl3: TLabel
+    Left = 16
+    Top = 32
+    Width = 308
+    Height = 26
+    Caption = 
+      'If you have kept the defaults when writing the server and are ru' +
+      'nning the server on this machine, the default  value will be ok:'
+    WordWrap = True
+  end
+  object Label4: TLabel
+    Left = 0
+    Top = 96
+    Width = 77
+    Height = 13
+    Caption = 'Service Name'
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWindowText
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    Font.Style = [fsBold]
+    ParentFont = False
+  end
+  object Label5: TLabel
+    Left = 16
+    Top = 112
+    Width = 228
+    Height = 13
+    Caption = 'Select the Service that you want to connect to:'
+  end
+  object btn_CreateTables: TBitBtn
+    Left = 62
+    Top = 158
+    Width = 126
+    Height = 25
+    Anchors = [akRight, akBottom]
+    Caption = 'Create DataTables'
+    ModalResult = 1
+    TabOrder = 0
+    OnClick = btn_CreateTablesClick
+    Glyph.Data = {
+      36060000424D3606000000000000360000002800000020000000100000000100
+      18000000000000060000130B0000130B00000000000000000000FF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF08750D08750D08750D0875
+      0DFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FF8C8C8C8C8C8C8C8C8C8C8C8CFF00FFFF00FFFF00FFFF00FFFF00FF
+      0E80AA0E80AA0E80AA0E80AA0E80AA0E80AAFF00FF08750D13AA2210A61D0875
+      0DFF00FFFF00FFFF00FFFF00FFFF00FF83838383838383838383838383838383
+      8383FF00FF8C8C8CA3A3A3A1A1A18C8C8CFF00FFFF00FFFF00FFFF00FF078DBB
+      49D5EE23D7FE36D9FE6FE6FF8DE7FA44BADD0E80AA08750D1AB12D16AD260875
+      0DFF00FFFF00FFFF00FFFF00FF878787AFAFAFA8A8A8AFAFAFC3C3C3CCCCCCA8
+      A8A88383838C8C8CA8A8A8A5A5A58C8C8CFF00FFFF00FFFF00FF078DBB8CFBFE
+      59EAFE23D7FE36D8FD6CE0F808750D08750D08750D08750D22B93B1DB5320875
+      0D08750D08750D08750D878787CDCDCDBBBBBBA8A8A8AEAEAEC0C0C08C8C8C8C
+      8C8C8C8C8C8C8C8CADADADAAAAAA8C8C8C8C8C8C8C8C8C8C8C8C078DBB8CFBFE
+      59EAFE23D7FE36D8FD6CE0F808750D3CD46236CF5A30C9522CC34926BE4121B8
+      381CB43117AF2A08750D878787CDCDCDBBBBBBA8A8A8AEAEAEC0C0C08C8C8CC0
+      C0C0BCBCBCB8B8B8B4B4B4B1B1B1ACACACAAAAAAA6A6A68C8C8C078DBB8CFBFE
+      59EAFE23D7FE36D9FE6CE1F908750D44DD703FD8683AD26035CD582FC74F2AC1
+      4725BD3E20B83608750D878787CDCDCDBBBBBBA8A8A8AFAFAFC0C0C08C8C8CC6
+      C6C6C2C2C2BFBFBFBBBBBBB7B7B7B3B3B3B0B0B0ACACAC8C8C8C078DBBB3FCFE
+      B6F6FFC6F5FFE3FAFFE9F9FD08750D08750D08750D08750D3ED76638D15E0875
+      0D08750D08750D08750D878787DADADADCDCDCE1E1E1ECECECEDEDED8C8C8C8C
+      8C8C8C8C8C8C8C8CC2C2C2BDBDBD8C8C8C8C8C8C8C8C8C8C8C8C078DBBBAEEF6
+      30BCDD11A7D2129FCB20A1CA35A7CD2692BF92CEE408750D46DE7341DA6D0875
+      0DFF00FFFF00FFFF00FF878787DADADAA1A1A19292929090909595959D9D9D93
+      9393C6C6C68C8C8CC7C7C7C4C4C48C8C8CFF00FFFF00FFFF00FF078DBB4AC5DD
+      59EAFE23D7FE36D9FE6FE6FF8DE7FA49C1E30682B608750D4DE67F49E2790875
+      0DFF00FFFF00FFFF00FF878787AAAAAABBBBBBA8A8A8AFAFAFC3C3C3CCCCCCAC
+      ACAC8585858C8C8CCCCCCCC9C9C98C8C8CFF00FFFF00FFFF00FF078DBB8CFBFE
+      59EAFE23D7FE36D9FE6FE6FF8DE7FA49C1E3089DCF08750D08750D08750D0875
+      0DFF00FFFF00FFFF00FF878787CDCDCDBBBBBBA8A8A8AFAFAFC3C3C3CCCCCCAC
+      ACAC8E8E8E8C8C8C8C8C8C8C8C8C8C8C8CFF00FFFF00FFFF00FF078DBB8CFBFE
+      59EAFE23D7FE36D9FE6FE6FF8DE7FA49C1E3089CCE0E7FA9FF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FF878787CDCDCDBBBBBBA8A8A8AFAFAFC3C3C3CCCCCCAC
+      ACAC8E8E8E838383FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF078DBB8CFBFE
+      59EAFE23D7FE36D9FE6FE6FF8DE7FA49C1E3089DCF0E80AAFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FF878787CDCDCDBBBBBBA8A8A8AFAFAFC3C3C3CCCCCCAC
+      ACAC8E8E8E838383FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF078DBB91FCFE
+      82F8FF6FF8FF7AFEFF97FEFFA0FCFE63DAF50DA2D40E80AAFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FF878787CECECEC9C9C9C3C3C3C7C7C7D1D1D1D4D4D4BB
+      BBBB919191838383FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF078DBBFCFFFF
+      F4FFFFD3FFFFB4FFFFADFFFFADFFFFA9FFFF72F9FE0E80AAFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FF878787F4F4F4F1F1F1E6E6E6DBDBDBD9D9D9D9D9D9D7
+      D7D7C4C4C4838383FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0C92C0
+      F1FBFDE4FFFFC7FFFFAEFFFFA8FFFF9BFBFC1385AFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FF8A8A8AF0F0F0ECECECE2E2E2D9D9D9D7D7D7D1
+      D1D1878787FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      078DBB078DBB078DBB078DBB078DBB078DBBFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FF87878787878787878787878787878787
+      8787FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
+    NumGlyphs = 2
+  end
+  object BitBtn2: TBitBtn
+    Left = 259
+    Top = 158
+    Width = 63
+    Height = 25
+    Anchors = [akLeft, akBottom]
+    Cancel = True
+    Caption = 'Cancel'
+    ModalResult = 2
+    TabOrder = 1
+    OnClick = BitBtn2Click
+    Glyph.Data = {
+      36060000424D3606000000000000360000002800000020000000100000000100
+      18000000000000060000C40E0000C40E00000000000000000000FF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FF00009A00009AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00009A0000
+      9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+      00009A174AFD103BF400009AFF00FFFF00FFFF00FFFF00FF00009A002CF80030
+      FC00009AFF00FFFF00FFFF00FFFF00FF6B6B6BA8A8A8A0A0A06B6B6BFF00FFFF
+      00FFFF00FFFF00FF6B6B6B9A9A9A9C9C9C6B6B6BFF00FFFF00FFFF00FFFF00FF
+      00009A1A47F81A4CFF123BF100009AFF00FFFF00FF00009A012DF60132FF002A
+      F300009AFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7AAAAAA9F9F9F6B6B6BFF
+      00FFFF00FF6B6B6B9999999E9E9E9797976B6B6BFF00FFFF00FFFF00FFFF00FF
+      FF00FF00009A1C47F61B4DFF143EF400009A00009A002DF80134FF032BF20000
+      9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7ABABABA2A2A26B
+      6B6B6B6B6B9A9A9A9E9E9E9898986B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FF00009A1D48F61D50FF103DFB0431FE0132FF002CF600009AFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7ACACACA3
+      A3A39F9F9F9E9E9E9999996B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FF00009A1A48F91342FF0C3CFF0733F600009AFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7A7
+      A7A7A3A3A39C9C9C6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FF00009A214EFC1D4BFF1847FF1743F600009AFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BACACACAC
+      ACACA9A9A9A4A4A46B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FF00009A2E5BF92C5FFF224DF8204BF82355FF1B46F600009AFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BB1B1B1B3B3B3AB
+      ABABAAAAAAAFAFAFA6A6A66B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FF00009A3664FA386BFF2D59F400009A00009A224CF42558FF1D49F60000
+      9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BB6B6B6B9B9B9AEAEAE6B
+      6B6B6B6B6BA9A9A9B0B0B0A7A7A76B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+      00009A4071FA4274FF325DF100009AFF00FFFF00FF00009A224DF1275AFF204C
+      F800009AFF00FFFF00FFFF00FFFF00FF6B6B6BBBBBBBBEBEBEAFAFAF6B6B6BFF
+      00FFFF00FF6B6B6BA7A7A7B1B1B1AAAAAA6B6B6BFF00FFFF00FFFF00FFFF00FF
+      00009A497AFC3B66F300009AFF00FFFF00FFFF00FFFF00FF00009A2550F42655
+      FA00009AFF00FFFF00FFFF00FFFF00FF6B6B6BC0C0C0B5B5B56B6B6BFF00FFFF
+      00FFFF00FFFF00FF6B6B6BAAAAAAAEAEAE6B6B6BFF00FFFF00FFFF00FFFF00FF
+      FF00FF00009A00009AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00009A0000
+      9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
+    NumGlyphs = 2
+  end
+  object ed_ServerUrl: TEdit
+    Left = 16
+    Top = 64
+    Width = 306
+    Height = 21
+    Anchors = [akLeft, akTop, akRight]
+    TabOrder = 2
+    OnChange = ed_ServerUrlChange
+  end
+  object cb_Services: TComboBox
+    Left = 16
+    Top = 128
+    Width = 306
+    Height = 21
+    Anchors = [akLeft, akTop, akRight]
+    ItemHeight = 13
+    TabOrder = 3
+    OnChange = cb_ServicesChange
+    OnCloseUp = cb_ServicesChange
+    OnEnter = cb_ServicesEnter
+    OnExit = cb_ServicesChange
+  end
+  object BitBtn1: TBitBtn
+    Left = 193
+    Top = 158
+    Width = 61
+    Height = 25
+    Anchors = [akRight, akBottom]
+    Caption = 'Finish'
+    Default = True
+    ModalResult = 1
+    TabOrder = 4
+    Glyph.Data = {
+      36060000424D3606000000000000360000002800000020000000100000000100
+      18000000000000060000220B0000220B00000000000000000000FF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF811E00FF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FF787878FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF811E00
+      811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FF787878787878FF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      811E00811E00811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FF787878787878787878FF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FF811E0095440F811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF787878898989787878FF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FF811E00A7632F811E00811E00FF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF7878789F9F9F78787878
+      7878FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FF811E00BF8B62CCA17E811E00811E00FF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF787878B8B8B8C6
+      C6C6787878787878FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FF811E00D8B69CE6D1BFE7D3C4811E00FF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF787878D1
+      D1D1E0E0E0E2E2E2787878FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FF811E00F0E2D9FCF7F2FAF0E6811E00811E
+      00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF78
+      7878EBEBEBF5F5F5F1F1F1787878787878FF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FF811E00D8AF96F4E2CFF0D7BDD8A784811E
+      00811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF78
+      7878D0D0D0E9E9E9E3E3E3CACACA787878787878FF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FF811E00F3DECAEFD4B8EBC9A7DAA67D811E00FF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF787878E7
+      E7E7E1E1E1DBDBDBC9C9C9787878FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FF811E00E7BB92E3B081E0A672D5925A811E
+      00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF78
+      7878D3D3D3CDCDCDC6C6C6BCBCBC787878FF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF811E00DA995ED78F50D38441CF7B
+      35811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FF787878BFBFBFB8B8B8B2B2B2ACACAC787878FF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF811E00811E00811E00811E
+      00811E00811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FF787878787878787878787878787878787878FF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
+    NumGlyphs = 2
+  end
+end
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAClientDataModuleEditorForm.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAClientDataModuleEditorForm.pas
new file mode 100644
index 0000000..c5a26ff
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAClientDataModuleEditorForm.pas	
@@ -0,0 +1,148 @@
+unit uDAClientDataModuleEditorForm;
+
+interface
+
+uses
+  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
+  Dialogs, uDAClientDataModule, StdCtrls, Buttons, DesignIntf;
+
+type
+  TDAClientDataModuleEditorForm = class(TForm)
+    btn_CreateTables: TBitBtn;
+    BitBtn2: TBitBtn;
+    lbl_ServerUrl1: TLabel;
+    ed_ServerUrl: TEdit;
+    lbl_ServerUrl2: TLabel;
+    lbl_ServerUrl3: TLabel;
+    Label4: TLabel;
+    Label5: TLabel;
+    cb_Services: TComboBox;
+    BitBtn1: TBitBtn;
+    procedure ed_ServerUrlChange(Sender: TObject);
+    procedure cb_ServicesEnter(Sender: TObject);
+    procedure BitBtn2Click(Sender: TObject);
+    procedure btn_CreateTablesClick(Sender: TObject);
+    procedure cb_ServicesChange(Sender: TObject);
+  private
+    fServerUrlChanged: boolean;
+    fRestoreServerUrl: string;
+    fModule:TDAClientDataModule;
+    fCreateDataTables: boolean;
+    procedure FillServiceCombo;
+
+  public
+    class function Execute(aOwner: TCOmponent; aModule:TDAClientDataModule; aDesigner:IDesigner):boolean;
+  end;
+
+var
+  DAClientDataModuleEditorForm: TDAClientDataModuleEditorForm;
+
+implementation
+
+uses
+  uROClasses, TypInfo, uDAIDERes, uDAPleaseWaitForm,
+    uDAClientDataModuleDataTableWizardForm;
+
+{$R *.dfm}
+
+{ TDAClientDataModuleEditorForm }
+
+class function TDAClientDataModuleEditorForm.Execute(aOwner: TCOmponent; aModule: TDAClientDataModule; aDesigner:IDesigner): boolean;
+begin
+  if not Assigned(aModule.RemoteService) then         RaiseError(err_AssignRemoteService);
+  if not Assigned(aModule.RemoteService.Channel) then RaiseError(err_AssignRemoteServiceChannel);
+  if not Assigned(aModule.RemoteService.Message) then RaiseError(err_AssignRemoteServiceMessage);
+
+  with self.Create(aOwner) do try
+
+    fModule := aModule;
+    Caption := Format(Caption,[fModule.Name]);
+
+
+    try
+      fRestoreServerUrl := GetStrProp(fModule.RemoteService.Channel,'TargetURL');
+      ed_ServerUrl.Text := fRestoreServerUrl;
+      fServerUrlChanged := false;
+    except
+      ed_ServerUrl.Enabled := false;
+      lbl_ServerUrl1.Enabled := false;
+      lbl_ServerUrl2.Enabled := false;
+      lbl_ServerUrl3.Enabled := false;
+    end;
+
+    FillServiceCombo();
+    cb_Services.ItemIndex := cb_Services.Items.IndexOf(fModule.RemoteService.ServiceName);
+    cb_ServicesChange(nil);
+
+    result := ShowModal() = idOk;
+    if result then begin
+      if ed_ServerUrl.Enabled then SetStrProp(fModule.RemoteService.Channel,'TargetURL',ed_ServerUrl.Text);
+      fModule.RemoteService.ServiceName := cb_Services.Text;
+
+      if fCreateDataTables then begin
+        TDAClientDataModuleDataTableWizardForm.Execute(aOwner, fModule, aDesigner);
+      end;
+
+    end;
+
+  finally
+    Free();
+  end;
+end;
+
+procedure TDAClientDataModuleEditorForm.ed_ServerUrlChange(
+  Sender: TObject);
+begin
+  fServerUrlChanged := true;
+end;
+
+procedure TDAClientDataModuleEditorForm.FillServiceCombo;
+var
+  lServiceNames: IROStrings;
+  i:integer;
+begin
+  Screen.Cursor := crHourGlass;
+  try
+    cb_Services.Items.Clear();
+    lServiceNames := fModule.RemoteService.GetServiceNames();
+    if Assigned(lServiceNames) then begin
+      for i := 0 to (lServiceNames.Count-1) do
+        cb_Services.Items.Add(lServiceNames[i]);
+    end
+    else begin
+      cb_Services.Text := '<could not retrieve RODL>';
+    end;
+    cb_ServicesChange(nil);
+  finally
+    Screen.Cursor := crDefault;
+  end;
+end;
+
+procedure TDAClientDataModuleEditorForm.cb_ServicesEnter(Sender: TObject);
+begin
+  if fServerUrlChanged then begin
+    if ed_ServerUrl.Enabled then begin
+      SetStrProp(fModule.RemoteService.Channel,'TargetURL',ed_ServerUrl.Text);
+      FillServiceCombo();
+    end;
+    fServerUrlChanged := true;
+  end
+end;
+
+procedure TDAClientDataModuleEditorForm.BitBtn2Click(Sender: TObject);
+begin
+  if ed_ServerUrl.Enabled then
+    SetStrProp(fModule.RemoteService.Channel,'TargetURL',fRestoreServerUrl);
+end;
+
+procedure TDAClientDataModuleEditorForm.btn_CreateTablesClick(Sender: TObject);
+begin
+  fCreateDataTables := true;
+end;
+
+procedure TDAClientDataModuleEditorForm.cb_ServicesChange(Sender: TObject);
+begin
+  btn_CreateTables.Enabled := cb_Services.Text <> '';
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAClientDataModuleWizard.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAClientDataModuleWizard.pas
new file mode 100644
index 0000000..8ced8e8
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAClientDataModuleWizard.pas	
@@ -0,0 +1,394 @@
+unit uDAClientDataModuleWizard;
+
+{$I DataAbstract.inc}
+
+interface
+
+uses DesignEditors, ToolsAPI, Windows, ActnList, Menus, Classes;
+
+const CRLF = #13#10;		// Carriage-return line-feed.
+
+resourcestring
+  sBasicDfmSource =
+    'object %0:s: T%0:s'                                       + crlf +
+    '  Left = 200'                                             + crlf +
+    '  Top = 200'                                              + crlf +
+    '  Height = 300'                                           + crlf +
+    '  Width = 300'                                            + crlf +
+    '  RemoteService = RORemoteService'                        + crlf +
+    '  Adapter = DABinAdapter'                                 + crlf +
+    '  SchemaCall.MethodName = ''GetSchemaAsXML'''             + crlf +
+    '  SchemaCall.Params = <'                                  + crlf +
+    '    item'                                                 + crlf +
+    '      Name = ''Result'''                                  + crlf +
+    '      ParamType = fResult'                                + crlf +
+    '      DataType = rtString'                                + crlf +
+    '    end>'                                                 + crlf +
+    '  object ROChannel: TROWinInetHTTPChannel'                + crlf +
+    '    UserAgent = ''RemObjects SDK'''                       + crlf +
+    '    TargetURL = ''http://localhost:8099/bin'''            + crlf +
+    '    Left = 40'                                            + crlf +
+    '    Top = 8'                                              + crlf +
+    '  end'                                                    + crlf +
+    '   object ROMessage: TROBinMessage'                       + crlf +
+    '    Left = 40'                                            + crlf +
+    '    Top = 52'                                             + crlf +
+    '  end'                                                    + crlf +
+    '  object RORemoteService: TRORemoteService'               + crlf +
+    '    Message = ROMessage'                                  + crlf +
+    '    Channel = ROChannel'                                  + crlf +
+    '    Left = 40'                                            + crlf +
+    '    Top = 96'                                             + crlf +
+    '   end'                                                   + crlf +
+    '   object DABinAdapter: TDABINAdapter'                    + crlf +
+    '     Left = 40'                                           + crlf +
+    '     Top = 144'                                           + crlf +
+    '   end'                                                   + crlf +
+    'end';
+
+  sBasicFormSource =
+    'unit %0:s;' 					       + crlf +
+                                                                 crlf +
+    'interface'  					       + crlf +
+                                                                 crlf +
+    'uses {vcl:} SysUtils, Classes, DB, DBClient, '            + crlf +
+    '     {RemObjects:} %3:s;'                                 + crlf +
+                                                                 crlf +
+    'type'                                                     + crlf +
+    '  T%1:s = class(%2:s)'  				                           + crlf +
+    '    ROChannel: TROWinInetHTTPChannel;'                    + crlf +
+    '    ROMessage: TROBinMessage;'                            + crlf +
+    '    RORemoteService: TRORemoteService;'                   + crlf +
+    '    DABinAdapter: TDABINAdapter;'                         + crlf +
+    '  private'  			                                         + crlf +
+    '    { Private declarations }' 		                         + crlf +
+    '  public'  			                                         + crlf +
+    '    { Public declarations }' 		                         + crlf +
+    '  end;'	 					                                       + crlf +
+                                                                 crlf +
+    'var'  						                                         + crlf +
+    '  %1:s: T%1:s;'                                           + crlf +
+                                                                 crlf +
+    'implementation'                                           + crlf +
+                                                                 crlf +
+    '{$R *.DFM}'                                               + crlf +
+                                                                 crlf +
+    'initialization'                                           + crlf +
+    'end.' 																									   ;
+
+type TSourceFile = class(TInterfacedObject, IOTAFile)
+     private
+       fAge: TDateTime;
+       fSource:string;
+     public
+       function GetSource: string;
+       function GetAge: TDateTime;
+       constructor Create(const iSource:string);
+     end;
+
+     TBaseFormCreator = class(TInterfacedObject, IOTAModuleCreator)
+     public
+       function GetCreatorType: string;
+       function GetExisting: Boolean;
+       function GetFileSystem: string;
+       function GetOwner: IOTAModule;
+       function GetUnnamed: Boolean;
+
+       function GetAncestorName: string;
+       function GetImplFileName: string;
+       function GetIntfFileName: string;
+       function GetFormName: string;
+       function GetMainForm: Boolean;
+       function GetShowForm: Boolean;
+       function GetShowSource: Boolean;
+       function NewFormFile(const FormIdent, AncestorIdent: string): IOTAFile;
+       function NewImplSource(const ModuleIdent, FormIdent, AncestorIdent: string): IOTAFile;
+       function NewIntfSource(const ModuleIdent, FormIdent, AncestorIdent: string): IOTAFile;
+
+       procedure FormCreated(const FormEditor: IOTAFormEditor);
+     end;		{ TBaseFormCreator }
+
+     TNewModuleExpert = class(TInterfacedObject,
+       IOTAWizard,
+       IOTARepositoryWizard,
+       IOTAFormWizard,
+       {$IFDEF BDS}
+       IOTARepositoryWizard80,
+       {$ENDIF}
+       IOTARepositoryWizard60)
+     public
+
+       constructor Create();
+       destructor Destroy(); override;
+
+       procedure AfterSave;
+       procedure BeforeSave;
+       procedure Destroyed;
+       procedure Modified;
+
+       procedure Execute;
+       function GetAuthor: String;
+       function GetComment: String;
+       function GetGlyph: Cardinal;
+       function GetIDString: String;
+       function GetName: String;
+       function GetPage: String;
+       function GetState: TWizardState;
+       function GetDesigner: String;
+
+       {$IFDEF BDS}
+       function GetGalleryCategory: IOTAGalleryCategory;
+       function GetPersonality: string;
+       {$ENDIF}
+
+     end;
+
+procedure Register;
+
+implementation
+
+uses SysUtils, Graphics,
+     uRORes, uDADataAbstractEditors, Dialogs, uDAClientDataModuleEditorForm, Forms,
+       uDAClientDataModule;
+
+{ TBaseFormCreator }
+
+procedure TBaseFormCreator.FormCreated(const FormEditor: IOTAFormEditor);
+begin
+
+end;
+
+function TBaseFormCreator.GetAncestorName: string;
+begin
+  result := 'TDAClientDataModule';
+end;
+
+function TBaseFormCreator.GetCreatorType: string;
+begin
+  result := sForm;
+end;
+
+function TBaseFormCreator.GetExisting: Boolean;
+begin
+  result := false;
+end;
+
+function TBaseFormCreator.GetFileSystem: string;
+begin
+  result := '';
+end;
+
+function TBaseFormCreator.GetFormName: string;
+begin
+  result := '';
+end;
+
+function TBaseFormCreator.GetImplFileName: string;
+begin
+  result := '';
+end;
+
+function TBaseFormCreator.GetIntfFileName: string;
+begin
+  result := '';
+end;
+
+function TBaseFormCreator.GetMainForm: Boolean;
+begin
+  result := false;
+end;
+
+function TBaseFormCreator.GetOwner: IOTAModule;
+var
+  ModuleServices: IOTAModuleServices;
+  Module: IOTAModule;
+  NewModule: IOTAModule;
+begin
+  Result := nil;
+  if BorlandIDEServices.QueryInterface(IOTAModuleServices, ModuleServices) =
+S_OK then
+  begin
+    Module := ModuleServices.CurrentModule;
+    if Module <> nil then
+      if Module.GetOwnerCount > 0 then
+      begin
+         NewModule := Module.GetOwner(0);
+         if NewModule <> nil then
+            if NewModule.QueryInterface(IOTAProject, Result) <> S_OK then
+               Result := nil;
+      end;
+  end;
+end;
+
+function TBaseFormCreator.GetShowForm: Boolean;
+begin
+  result := true;
+end;
+
+function TBaseFormCreator.GetShowSource: Boolean;
+begin
+  result := true;
+end;
+
+function TBaseFormCreator.GetUnnamed: Boolean;
+begin
+  result := true;
+end;
+
+function RemoveInitialT(const iString:string):string;
+begin
+  result := iString;
+  if (result <> '') and (result[1] = 'T') then Delete(result,1,1);
+  //ShowMessage(iString+' '+result);
+end;
+
+function TBaseFormCreator.NewFormFile(const FormIdent,
+  AncestorIdent: string): IOTAFile;
+begin
+  result := TSourceFile.Create(Format(sBasicDfmSource,[RemoveInitialT(FormIdent)]));
+end;
+
+function TBaseFormCreator.NewImplSource(const ModuleIdent, FormIdent,
+  AncestorIdent: string): IOTAFile;
+begin
+  result := TSourceFile.Create(Format(sBasicFormSource,[ModuleIdent,RemoveInitialT(FormIdent),AncestorIdent,'uDAClientDataModule']));
+end;
+
+function TBaseFormCreator.NewIntfSource(const ModuleIdent, FormIdent,
+  AncestorIdent: string): IOTAFile;
+begin
+
+end;
+
+{ TSourceFile }
+
+constructor TSourceFile.Create(const iSource: string);
+begin
+  inherited Create();
+  fSource := iSource;
+  fAge := Now;
+end;
+
+function TSourceFile.GetAge: TDateTime;
+begin
+  result := fAge;
+end;
+
+function TSourceFile.GetSource: string;
+begin
+  result := fSource;
+end;
+
+{ TNewModuleExpert }
+
+constructor TNewModuleExpert.Create;
+begin
+  inherited;
+end;
+
+destructor TNewModuleExpert.Destroy;
+begin
+  inherited;
+end;
+
+procedure TNewModuleExpert.Execute;
+var
+  lModuleServices: IOTAModuleServices;
+  lModuleCreator: IOTAModuleCreator;
+  lModule: IOTAModule;
+begin
+  if BorlandIDEServices.QueryInterface(IOTAModuleServices, lModuleServices) = S_OK then
+  begin
+    lModuleCreator := TBaseFormCreator.Create();
+    lModule := lModuleServices.CreateModule(lModuleCreator);
+    TDAClientDataModuleEditorForm.Execute(Application,
+                                          (lModule.GetCurrentEditor as INTAFormEditor).FormDesigner.Root as TDAClientDataModule,
+                                          (lModule.GetCurrentEditor as INTAFormEditor).FormDesigner);
+  end;
+end;
+
+function TNewModuleExpert.GetAuthor: String;
+begin
+  result := 'RemObjects Software';
+end;
+
+function TNewModuleExpert.GetComment: String;
+begin
+  result := 'Data Abstract ClientDataModule';
+end;
+
+function TNewModuleExpert.GetGlyph: Cardinal;
+begin
+  result := LoadIcon(hInstance,'DAClientDataModule');
+end;
+
+function TNewModuleExpert.GetIDString: String;
+begin
+  result := 'RemObjectsDAClientDataModule';
+end;
+
+function TNewModuleExpert.GetName: String;
+begin
+  result := 'Data Abstract ClientDataModule';
+end;
+
+function TNewModuleExpert.GetPage: String;
+begin
+  result := 'RemObjects Data Abstract';
+end;
+
+{$IFDEF BDS}
+function TNewModuleExpert.GetGalleryCategory: IOTAGalleryCategory;
+var
+  lGalleryManager: IOTAGalleryCategoryManager;
+begin
+  lGalleryManager := BorlandIDEServices as IOTAGalleryCategoryManager;
+  result := lGalleryManager.FindCategory('RemObjectsDataAbstractDelphi');
+end;
+
+function TNewModuleExpert.GetPersonality: string;
+begin
+  result := sDelphiPersonality;
+end;
+{$ENDIF}
+
+function TNewModuleExpert.GetState: TWizardState;
+begin
+  result := [wsEnabled];
+end;
+
+procedure TNewModuleExpert.AfterSave;
+begin
+
+end;
+
+procedure TNewModuleExpert.BeforeSave;
+begin
+
+end;
+
+procedure TNewModuleExpert.Destroyed;
+begin
+
+end;
+
+procedure TNewModuleExpert.Modified;
+begin
+
+end;
+
+procedure Register;
+begin
+  //RegisterPackageWizard(TNewModuleExpert.Create as IOTAFormWizard);
+end;
+
+{$R 'uDAClientModuleWizard.res' 'uDAClientModuleWizard.rc'}
+
+function TNewModuleExpert.GetDesigner: String;
+begin
+  Result := dAny;
+end;
+
+initialization
+finalization
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAClientModuleWizard.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAClientModuleWizard.res
new file mode 100644
index 0000000..dd81d99
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAClientModuleWizard.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDADBSessionManagerEditor.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDADBSessionManagerEditor.pas
new file mode 100644
index 0000000..c639cfb
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDADBSessionManagerEditor.pas	
@@ -0,0 +1,170 @@
+unit uDADBSessionManagerEditor;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - IDE Library                                        }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFDEF MSWINDOWS}
+{$I ..\DataAbstract.inc}
+{$ELSE}
+{$I ../DataAbstract.inc}
+{$ENDIF}
+
+interface
+
+uses
+  Classes,
+  {$IFDEF FPC}
+  PropEdits,
+  {$ELSE}
+  DesignIntf, DesignEditors,
+  {$ENDIF}
+  uDAClasses;
+
+type
+  TDASchemaItemListEditor = class(TStringProperty)
+  protected
+    function GetSchema: TDASchema; virtual;
+
+  public
+    function GetAttributes: TPropertyAttributes; override;
+    procedure SetValue(const Value: string); override;
+    property Schema: TDASchema read GetSchema;
+  end;
+
+  TDASchemaCommandListEditor = class(TDASchemaItemListEditor)
+  public
+    procedure GetValues(Proc: TGetStrProc); override;
+  end;
+
+  TDASchemaDataSetListEditor = class(TDASchemaItemListEditor)
+  public
+    procedure GetValues(Proc: TGetStrProc); override;
+  end;
+
+  TDARemoteServiceDataSetListEditor = class(TDASchemaDataSetListEditor)
+  protected
+    function GetSchema: TDASchema; override;
+
+  end;
+
+  TDARemoteServiceCommandListEditor = class(TDASchemaCommandListEditor)
+  protected
+    function GetSchema: TDASchema; override;
+
+  end;
+
+  TDASchemaCommandAndDataSetListEditor = class(TDASchemaItemListEditor)
+  public
+    procedure GetValues(Proc: TGetStrProc); override;
+  end;
+
+  TDASchemaConnectionsListEditor = class(TDASchemaItemListEditor)
+  public
+    procedure GetValues(Proc: TGetStrProc); override;
+  end;
+
+implementation
+
+uses
+  uDADBSessionManager, Dialogs, DARemoteService_Impl;
+
+{ TDASchemaItemListEditor }
+
+function TDASchemaItemListEditor.GetAttributes: TPropertyAttributes;
+begin
+  result := [paValueList, paSortList]
+end;
+
+function TDASchemaItemListEditor.GetSchema: TDASchema;
+begin
+  result := (GetComponent(0) as TDADBSessionManager).Schema;
+end;
+
+procedure TDASchemaItemListEditor.SetValue(const Value: string);
+begin
+  inherited;
+
+end;
+
+{ TDASchemaCommandListEditor }
+
+procedure TDASchemaCommandListEditor.GetValues(Proc: TGetStrProc);
+var
+  i: integer;
+begin
+  if Assigned(Schema) then begin
+    for i := 0 to Schema.Commands.Count - 1 do begin
+      Proc(Schema.Commands[i].Name);
+    end;
+  end;
+end;
+
+{ TDASchemaDataSetListEditor }
+
+procedure TDASchemaDataSetListEditor.GetValues(Proc: TGetStrProc);
+var
+  i: integer;
+begin
+  if Assigned(Schema) then begin
+    for i := 0 to Schema.Datasets.Count - 1 do begin
+      Proc(Schema.Datasets[i].Name);
+    end;
+  end;
+end;
+
+{ TDASchemaCommandAndDataSetListEditor }
+
+procedure TDASchemaCommandAndDataSetListEditor.GetValues(Proc: TGetStrProc);
+var
+  i: integer;
+begin
+  if Assigned(Schema) then begin
+    for i := 0 to Schema.Datasets.Count - 1 do begin
+      Proc(Schema.Datasets[i].Name);
+    end;
+    if (Schema.Datasets.Count > 0) and (Schema.Commands.Count > 0) then
+      Proc('---');
+
+    for i := 0 to Schema.Commands.Count - 1 do begin
+      Proc(Schema.Commands[i].Name);
+    end;
+  end;
+end;
+
+{ TDASchemaConnectionsListEditor }
+
+procedure TDASchemaConnectionsListEditor.GetValues(Proc: TGetStrProc);
+var
+  i: integer;
+begin
+  if Assigned(Schema) and Assigned(Schema.ConnectionManager) then begin
+    for i := 0 to Schema.ConnectionManager.Connections.Count - 1 do begin
+      Proc(Schema.ConnectionManager.Connections[i].Name);
+    end;
+  end;
+end;
+
+{ TDARemoteServiceDataSetListEditor }
+
+function TDARemoteServiceDataSetListEditor.GetSchema: TDASchema;
+begin
+  result := (GetComponent(0) as TDARemoteService).ServiceSchema;
+end;
+
+{ TDARemoteServiceCommandListEditor }
+
+function TDARemoteServiceCommandListEditor.GetSchema: TDASchema;
+begin
+  result := (GetComponent(0) as TDARemoteService).ServiceSchema;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDADataAbstractEditors.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDADataAbstractEditors.pas
new file mode 100644
index 0000000..31279fe
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDADataAbstractEditors.pas	
@@ -0,0 +1,1420 @@
+unit uDADataAbstractEditors;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - IDE Library                                        }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFDEF MSWINDOWS}
+{$I ..\DataAbstract.inc}
+{$ELSE}
+{$I ../DataAbstract.inc}
+{$ENDIF}
+
+interface
+
+uses
+  {$IFDEF MSWINDOWS}Windows,{$ENDIF}
+  {$IFDEF FPC}ComponentEditors, PropEdits, {$ELSE}DesignIntf, DesignEditors, ColnEdit,{$ENDIF}
+  SysUtils, Classes,
+  uROClient, uRODL,uRORemoteService,
+  uDAClasses, uDARes,uDAClientDataModule, uDADataTable, uDARemoteDataAdapter;
+
+type { TDADriverManagerEditor }
+     TDADriverManagerEditor = class(TComponentEditor)
+     private
+     public
+       procedure ExecuteVerb(Index: Integer); override;
+       function GetVerb(Index: Integer): string; override;
+       function GetVerbCount: Integer; override;
+     end;
+
+     { TDAConnectionManagerEditor }
+     TDAConnectionManagerEditor = class(TComponentEditor)
+     private
+     public
+       procedure ExecuteVerb(Index: Integer); override;
+       function GetVerb(Index: Integer): string; override;
+       function GetVerbCount: Integer; override;
+     end;
+
+     { TDADataDictionaryEditor }
+     TDADataDictionaryEditor = class(TComponentEditor)
+     private
+     public
+       procedure ExecuteVerb(Index: Integer); override;
+       function GetVerb(Index: Integer): string; override;
+       function GetVerbCount: Integer; override;
+     end;
+
+     { TDASchemaEditor }
+     TDASchemaEditor = class(TComponentEditor)
+     protected
+     public
+       procedure ExecuteVerb(Index: Integer); override;
+       function GetVerb(Index: Integer): string; override;
+       function GetVerbCount: Integer; override;
+     end;
+
+     { TDADesigntimeCallEditor }
+     TDADesigntimeCallEditor = class(TComponentEditor)
+     protected
+     public
+       procedure ExecuteVerb(Index: Integer); override;
+       function GetVerb(Index: Integer): string; override;
+       function GetVerbCount: Integer; override;
+     end;
+
+     { TDADataRequestCallMethodNameEditor }
+     TDADataRequestCallMethodNameEditor = class(TStringProperty)
+     private
+       function RetrieveLibrary: TRODLLibrary;
+
+     protected
+     public
+       function GetAttributes: TPropertyAttributes; override;
+       procedure GetValues(Proc: TGetStrProc); override;
+       procedure SetValue(const Value: string); override;
+     end;
+
+     { TDALoginAwareComponentEditor }
+     TDALoginAwareComponentEditor = class(TComponentEditor)
+     protected
+       fRemoteService: TRORemoteService;
+       function GetAdapterSchema(aAdapter: TDABaseRemoteDataAdapter): TDASchema;
+       procedure OnLoginNeeded(Sender: TROTransportChannel; anException: Exception; var aRetry: Boolean);
+     end;
+
+     { TDADataTableEditor }
+     TDADataTableEditor = class(TDALoginAwareComponentEditor)
+     protected
+     public
+       procedure ExecuteVerb(Index: Integer); override;
+       function GetVerb(Index: Integer): string; override;
+       function GetVerbCount: Integer; override;
+     end;
+
+     { TDABaseRemoteDataAdapterEditor }
+     TDABaseRemoteDataAdapterEditor = class(TDALoginAwareComponentEditor)
+     protected
+       fDataTables: TStringList;
+       function HookUpDataTables: boolean;
+       procedure GetDataTables(const aName: string);
+     public
+       procedure ExecuteVerb(Index: Integer); override;
+       function GetVerb(Index: Integer): string; override;
+       function GetVerbCount: Integer; override;
+     end;
+
+     { TDARemoteDataAdapterEditor }
+     TDARemoteDataAdapterEditor = class(TDABaseRemoteDataAdapterEditor )
+     public
+       procedure ExecuteVerb(Index: Integer); override;
+       function GetVerb(Index: Integer): string; override;
+       function GetVerbCount: Integer; override;
+     end;
+
+     { TDADataTableMasterDetailProps }
+     TDADataTableMasterDetailProps = class(TStringProperty)
+     protected
+     public
+       function GetAttributes: TPropertyAttributes; override;
+       procedure Edit; override;
+     end;
+
+     { TDABusinessProcessorCommandProperty }
+     TDABusinessProcessorCommandProperty = class(TStringProperty)
+     protected
+     public
+       function GetAttributes: TPropertyAttributes; override;
+       procedure GetValues(Proc: TGetStrProc); override;
+     end;
+
+     { TDABusinessProcessorRefDatasetProperty }
+     TDABusinessProcessorRefDatasetProperty = class(TStringProperty)
+     protected
+     public
+       function GetAttributes: TPropertyAttributes; override;
+       procedure GetValues(Proc: TGetStrProc); override;
+     end;
+
+    {$IFDEF FPC}
+     TCollectionProperty = TCollectionPropertyEditor;
+    {$ENDIF FPC}
+     { TDACollectionProperty }
+     TDACollectionProperty = class(TCollectionProperty)
+     private
+     protected
+     public
+       procedure Edit; override;
+       function GetAttributes: TPropertyAttributes; override;
+     end;
+
+
+     { TDADataTableLogicalNameEditor }
+     TDADataTableLogicalNameEditor = class(TStringProperty)
+     private
+       function GetSchema: TDASchema;
+     public
+       function GetAttributes: TPropertyAttributes; override;
+       procedure GetValues(Proc: TGetStrProc); override;
+     end;
+
+     { TDACollectionItemDatasetNameEditor }
+     TDACollectionItemDatasetNameEditor = class(TStringProperty)
+     private
+     public
+       function GetAttributes: TPropertyAttributes; override;
+       procedure GetValues(Proc: TGetStrProc); override;
+     end;
+
+     { TDADataTableLocalConnection }
+     TDADataTableLocalConnection = class(TStringProperty)
+     private
+     public
+       function GetAttributes: TPropertyAttributes; override;
+       procedure GetValues(Proc: TGetStrProc); override;
+     end;
+
+     { TDADriverManagerDirectory }
+     TDADriverManagerDirectory = class(TStringProperty)
+     private
+     public
+       function GetAttributes: TPropertyAttributes; override;
+       procedure GetValues(Proc: TGetStrProc); override;
+       procedure SetValue(const Value: string); override;
+     end;
+
+     { TDADataTableReferenceDataTable }
+     TDADataTableReferenceDataTable = class(TComponentProperty)
+     public
+        procedure GetValues(Proc: TGetStrProc); override;
+     end;
+
+     { TDALookupSourceProperty }
+     TDALookupSourceProperty = class(TStringProperty)
+     private
+     public
+       function GetAttributes: TPropertyAttributes; override;
+       procedure GetValues(Proc: TGetStrProc); override;
+     end;
+
+     { TDALookupDestProperty }
+     TDALookupDestProperty = class(TStringProperty)
+     private
+     public
+       function GetAttributes: TPropertyAttributes; override;
+       procedure GetValues(Proc: TGetStrProc); override;
+     end;
+
+     { TDALookupResultFieldProperty }
+     TDALookupResultFieldProperty = class(TDALookupDestProperty)
+     private
+     public
+       function GetAttributes: TPropertyAttributes; override;
+       procedure SetValue(const Value: string); override;
+     end;
+
+implementation
+
+uses
+
+  {$IFDEF FPC}
+  uDADataTableMasterLinkWizardForm_laz, uROIDETools_laz,uDAIDEMenu_laz,
+  {$ELSE}
+  uROIDETools, uROIDEMenu, uROPleaseWaitForm,
+  uDAIDEMenu, uDAPleaseWaitForm,
+  ToolsAPI,
+  uDADataTableMasterLinkWizardForm,ShellAPI,
+  {$ENDIF}
+  uDAIDEData,uDASchemaUnitsGenerator,
+  uROLoginNeededForm,
+  Dialogs,  Graphics, Controls, FileCtrl,
+  TypInfo, Forms, ClipBrd, DB,
+  uROTypes,
+  uDAUtils, uDADriverManager, uDADriverInfo, uDASupportClasses,
+  uROClasses,
+  uRODLToXML, uDAInterfaces, uDABusinessProcessor, uDAIDERes,
+  IniFiles, Registry, uDADesigntimeCall, uDASelectDataTablesForm,
+  uRODynamicRequest, {$IFDEF USE_LOCALDATAADAPTER}uDALocalDataAdapter,{$ENDIF} uDADataTableWizards;
+
+{$IFNDEF FPC}
+function FindProjectByActiveModule: IOTAProject;
+var
+  services: IOTAModuleServices;
+  lProject: IOTAProject;
+  lcurModule: IOTAModule;
+  i,j: Integer;
+begin
+  Result:= CurrentProject;
+  services := ModuleServices;
+  if (services = nil) then Exit;
+  lcurModule := services.CurrentModule;
+  for I := 0 to (services.ModuleCount - 1) do begin
+    if Services.Modules[i].QueryInterface(IOTAProject, lProject) = S_OK then begin
+      for j := 0 to lProject.GetModuleCount-1 do begin
+        if SameText(lProject.GetModule(j).FileName,lcurModule.FileName) then begin
+          result := lProject;
+          exit;
+        end;
+      end;
+    end;
+  end;
+end;
+{$ENDIF}
+{ TDASchemaEditor }
+
+const
+  COMMAND_INDEX_EDIT = 0;
+  COMMAND_INDEX_PUBLISH = 1;
+  COMMAND_INDEX_SEPARATOR_1 = 2;
+  COMMAND_INDEX_SAVE = 3;
+  COMMAND_INDEX_LOAD = 4;
+  COMMAND_INDEX_SEPARATOR_2 = 5;
+  COMMAND_INDEX_GENCODE = 6;
+  COMMAND_INDEX_GENCONSTS = 7;
+
+procedure TDASchemaEditor.ExecuteVerb(Index: Integer);
+var
+  schema :TDASchema;
+  connmgr : TDAConnectionManager;
+  lSchemaAge:integer;
+  sfname,
+  cmfname, dadname,diagramname :string;
+  i, x : integer;
+  s : string;
+  lDesigner:IDesignerNotify;
+  params: TStringList;
+  {$IFNDEF FPC}
+  loldCurrentProject, lproject: IOTAProject;
+  {$ENDIF}
+begin
+  schema := GetComponent as TDASchema;
+  connmgr := schema.ConnectionManager;
+
+  if (Index=COMMAND_INDEX_GENCONSTS) then begin
+    params := TStringList.Create;
+    with schema do try
+      params.Sorted := TRUE;
+
+      s := '';
+      if Datasets.Count>0 then begin
+        s := Format('  { Dataset names contained in schema "%s" }',[schema.Name])+#13#10;
+        for i := 0 to (Datasets.Count-1) do begin
+          s := s+Format('  ds_%s = ''%s'';', [MakeValidIdentifier(Datasets[i].Name), Datasets[i].Name])+#13#10;
+        end;
+      end;
+
+      if Commands.Count>0 then begin
+        s := s+#13#10+Format('  { Command names contained in schema "%s"}',[schema.Name])+#13#10;
+        for i := 0 to (Commands.Count-1) do begin
+          s := s+Format('  cmd_%s = ''%s'';', [MakeValidIdentifier(Commands[i].Name), Commands[i].Name])+#13#10;
+        end;
+      end;
+
+      s := s+'  { Dataset and command parameters }'+#13#10;
+      for i := 0 to (Datasets.Count-1) do begin
+        for x := 0 to (Datasets[i].Params.Count-1) do begin
+          // Checks for duplicates
+          if params.IndexOf(UpperCase(Datasets[i].Params[x].Name))<0
+            then params.Add(UpperCase(Datasets[i].Params[x].Name))
+            else Continue;
+
+          s := s+Format('  par_%s = ''%s'';', [Datasets[i].Params[x].Name, Datasets[i].Params[x].Name])+#13#10;
+        end;
+      end;
+
+      for i := 0 to (Commands.Count-1) do begin
+        for x := 0 to (Commands[i].Params.Count-1) do begin
+          // Checks for duplicates
+          if params.IndexOf(UpperCase(Commands[i].Params[x].Name))<0
+            then params.Add(UpperCase(Commands[i].Params[x].Name))
+            else Continue;
+
+          s := s+Format('  par_%s = ''%s'';', [Commands[i].Params[x].Name, Commands[i].Params[x].Name])+#13#10;
+        end;
+      end;
+    finally
+      params.Free;
+    end;
+
+    Clipboard.AsText := s;
+    Exit;
+  end;
+
+  if (Index<>COMMAND_INDEX_LOAD) and (Index<>COMMAND_INDEX_GENCODE)  then begin
+    Check(connmgr=NIL, 'The schema doesn''t have a connection manager associated. Cannot launch Schema Modeler');
+
+    if (Index=COMMAND_INDEX_SAVE) then begin
+      sfname := schema.Name;
+      if not PromptForFileName(sfname, 'Data Abstract Schema (*'+daFileExtSchemaFile+')|*'+daFileExtSchemaFile+'|All Files (*.*)|*.*', daFileExtSchemaFile, 'Save Schema '+schema.Name, '', TRUE)
+        then Exit;
+    end
+    else begin
+      sfname := GetTempFileName(daFileExtSchemaFile);
+    end;
+
+    schema.SaveToFile(sfname, pfXML);
+    lSchemaAge := FileAge(sfname);
+
+    cmfname := ChangeFileExt(sfname, daFileExtConnectionMgrFile);
+    connmgr.SaveToFile(cmfname, pfXML);
+
+    dadname := '';
+    if Assigned(schema.DataDictionary) then begin
+      dadname := ChangeFileExt(sfname, daFileExtDataDictionaryFile);
+      schema.DataDictionary.SaveToFile(dadname, pfXML);
+    end;
+
+    diagramname := '';
+    if Assigned(schema.Diagrams) then begin
+      diagramname := ChangeFileExt(sfname, DAFileExtDiagramsFile);
+      schema.Diagrams.SaveToFile(diagramname);
+    end;
+
+    if (Index=COMMAND_INDEX_LOAD) then Exit; // Only wants to save!
+
+    case Index of
+      COMMAND_INDEX_EDIT: begin
+        {$IFDEF FPC}
+          ShowMessage('Don''t implemented');
+        {$ELSE}
+        try
+          with CreatePleaseWaitForm('Running the Schema Modeler...') do try
+            Show();
+            ExecuteAndWait(GetSchemaModelerPath, '/ns /platform:Delphi /projectname:"'+GetComponent().Name+'" /autosave /schemafile:"'+sfname+'"');
+            Hide();
+          finally
+            Free();
+          end;
+
+          if lSchemaAge < FileAge(sfname) then begin
+
+            schema.LoadFromFile(sfname, pfXML);
+            Designer.Modified();
+
+            connmgr.LoadFromFile(cmfname, pfXML);
+            lDesigner := FindRootDesigner(connmgr);
+            if Assigned(lDesigner) then lDesigner.Modified();
+
+            if dadname <> '' then begin
+              schema.DataDictionary.LoadFromFile(dadname, pfXML);
+              lDesigner := FindRootDesigner(schema.DataDictionary);
+              if Assigned(lDesigner) then lDesigner.Modified();
+            end;
+
+            if diagramname <> '' then begin
+              schema.Diagrams.LoadFromFile(diagramname);
+              lDesigner := FindRootDesigner(schema.DataDictionary);
+              if Assigned(lDesigner) then lDesigner.Modified();
+            end;
+
+          end;
+          
+        finally
+          DeleteFile(sfname);
+          DeleteFile(cmfname);
+          if dadname <> '' then DeleteFile(dadname);
+        end;
+        {$ENDIF}
+        end;
+      COMMAND_INDEX_PUBLISH: begin
+        {$IFDEF FPC}
+          ShowMessage('Don''t implemented');
+        {$ELSE}
+        // search project for current unit
+        loldCurrentProject := CurrentProject;
+        // lproject
+        lproject := FindProjectByActiveModule;
+        SetActiveProject(lproject);
+        try
+          with CreatePleaseWaitForm('Running the Service Builder...') do try
+            Show();
+            {$IFDEF SB2}
+            LaunchServiceBuilderForCurrentProject('/dataabstract-import-schema /schemafile:"'+sfname+'" /schemacomponentname:"'+schema.Name+'" /ServiceName:"'+schema.Owner.Name+'"',true,true);
+            {$ELSE}
+            LaunchServiceBuilderForCurrentProject('/execute:"DataAbstract.PublishSchemaWizard" /execute-options:"Schema='+sfname+';ServiceName='+schema.Owner.Name+';SchemaComponentName='+schema.Name+'"',true,true);
+            {$ENDIF}
+            Hide();
+          finally
+            Free();
+          end;
+        finally
+          DeleteFile(sfname);
+          DeleteFile(cmfname);
+          if dadname <> '' then DeleteFile(dadname);
+          if diagramname <> '' then DeleteFile(diagramname);
+          if loldCurrentProject <> CurrentProject then SetActiveProject(loldCurrentProject);
+        end;
+        {$ENDIF}
+      end;
+      COMMAND_INDEX_SAVE: exit;
+    end;
+  end
+  else if (Index=COMMAND_INDEX_GENCODE) then begin
+    GenerateSchemaUnits(schema);
+  end
+  else begin
+    if PromptForFileName(sfname, 'Data Abstract Schema (*'+daFileExtSchemaFile+')|*'+daFileExtSchemaFile+'|All Files (*.*)|*.*', daFileExtSchemaFile, 'Load Schema') then begin
+      schema.LoadFromFile(sfname, pfXML);
+      Designer.Modified;
+    end;
+  end;
+end;
+
+function TDASchemaEditor.GetVerb(Index: Integer): string;
+begin
+  case Index of
+    COMMAND_INDEX_SEPARATOR_1,
+    COMMAND_INDEX_SEPARATOR_2 : result := '-';
+    COMMAND_INDEX_EDIT : result := 'Edit '+GetComponent.Name;
+    COMMAND_INDEX_PUBLISH : result := 'Publish '+GetComponent.Name+'...';
+    COMMAND_INDEX_SAVE : result := 'Save '+GetComponent.Name+' to Disk...';
+    COMMAND_INDEX_LOAD : result := 'Load '+GetComponent.Name+' from Disk...';
+    COMMAND_INDEX_GENCODE : result := 'Generate '+GetComponent.Name+' strongly-typed access units...';
+    COMMAND_INDEX_GENCONSTS : result := 'Copy Dataset and Command Names to Clipboard';
+  end;
+end;
+
+function TDASchemaEditor.GetVerbCount: Integer;
+begin
+  result := 8;
+end;
+
+{ TDADriverManagerEditor }
+
+procedure TDADriverManagerEditor.ExecuteVerb(Index: Integer);
+var
+  s : string;
+  i: Integer;
+  sl : IROStrings;
+  dm : TDADriverManager;
+begin
+  dm := TDADriverManager(GetComponent);
+  s := '';
+
+  case Index of
+    0 : ShowDriverInfo(dm);
+
+    1: begin
+      if (dm.DriverCount=0) then begin
+        MessageDlg('No drivers to unload.', mtWarning, [mbOK], 0);
+      end
+      else begin
+        dm.UnloadAllDrivers;
+        MessageDlg('Drivers unloaded.', mtInformation, [mbOK], 0);
+      end;
+    end;
+
+    2 : begin
+      if (dm.DriverDirectory='') then begin
+        MessageDlg('DriverDirectory is empty. Cannot load drivers.', mtWarning, [mbOK], 0);
+      end
+      else begin
+        dm.ListDrivers(dm.DriverDirectory, sl);
+        if (sl.Count=0) then begin
+          MessageDlg('No drivers were found', mtInformation, [mbOK], 0);
+        end
+        else begin
+          {$IFNDEF FPC}
+          with CreatePleaseWaitForm('Loading Drivers...') do try
+          {$ENDIF}
+            for i := 0 to sl.Count-1 do try
+              {$IFNDEF FPC}
+              Show(Format('Loading %s...',[ExtractFileName(sl[i])]));
+              {$ENDIF}
+              dm.LoadDriver(sl[i]);
+            except
+              on E:EDADriverAlreadyLoaded do;
+              on E:EDASchemaModelerOnly do;
+              on E:Exception do begin
+                {$IFNDEF FPC}
+                Hide();
+                {$ENDIF}
+                ShowMessageFmt('There was an error loading the %s driver:'#13#13'%s: %s',[ExtractFileName(sl[i]),E.ClassName,E.Message]);
+              end;
+            end; { for }
+          {$IFNDEF FPC}
+          finally
+            free;
+          end;
+          {$ENDIF}
+          MessageDlg(IntToStr(dm.DriverCount)+' Drivers loaded.', mtInformation, [mbOK], 0);
+        end;
+      end;
+    end;
+  end;
+end;
+
+function TDADriverManagerEditor.GetVerb(Index: Integer): string;
+var dir : string;
+begin
+  case Index of
+    0 : result := 'Display Driver Information...';
+    1 : result := 'Unload All Drivers';
+    2 : begin
+      dir := TranslateFileName(TDADriverManager(GetComponent).DriverDirectory);
+      if (dir='')
+        then dir := '<DriverDirectory property is empty!>';
+      result := 'Load Drivers in '+dir;
+    end;
+  end;
+end;
+
+function TDADriverManagerEditor.GetVerbCount: Integer;
+begin
+  result := 3;
+end;
+
+{ TDAConnectionManagerEditor }
+
+procedure TDAConnectionManagerEditor.ExecuteVerb(Index: Integer);
+var connmgr : TDAConnectionManager;
+    sfname : string;
+begin
+  connmgr := GetComponent as TDAConnectionManager;
+  sfname := connmgr.Name+daFileExtConnectionMgrFile;
+
+  case Index of
+    0:begin
+      {$IFDEF FPC}
+      EditCollection(connmgr, connmgr.Connections, 'Connections');
+      {$ELSE}
+      ShowCollectionEditor(Designer, connmgr,  connmgr.Connections, 'Connections');
+      {$ENDIF}
+    end;
+
+    1 : {separator};
+
+    2 : begin
+      if not PromptForFileName(sfname, 'Data Abstract Connections (*'+daFileExtConnectionMgrFile+')|*'+daFileExtConnectionMgrFile+'|All Files (*.*)|*.*', daFileExtConnectionMgrFile, 'Save Connections '+connmgr.Name, '', TRUE)
+        then Exit;
+
+      connmgr.SaveToFile(sfname, pfXML);
+    end;
+
+    3: begin
+      if not PromptForFileName(sfname, 'Data Abstract Connections (*'+daFileExtConnectionMgrFile+')|*'+daFileExtConnectionMgrFile+'|All Files (*.*)|*.*', DAFileExtConnectionMgrFile, 'Load Connections '+connmgr.Name, '')
+        then Exit;
+
+      connmgr.LoadFromFile(sfname, pfXML);
+      Designer.Modified;
+    end;
+  end;
+end;
+
+function TDAConnectionManagerEditor.GetVerb(Index: Integer): string;
+begin
+  case Index of
+    0 : result := 'Connection List Editor';
+    1 : result := '-';
+    2 : result := 'Save '+GetComponent.Name+' To Disk...';
+    3 : result := 'Load '+GetComponent.Name+' From Disk...';
+  end;
+end;
+
+function TDAConnectionManagerEditor.GetVerbCount: Integer;
+begin
+  result := 4;  
+end;
+
+{ TDADataRequestAccessParamEditor }
+
+procedure CheckCondition(InvalidSituation : boolean; const anErrorMessage : string);
+begin
+  if InvalidSituation then begin
+    MessageDlg(anErrorMessage, mtError, [mbOK], 0);
+    Abort;
+  end;
+end;
+
+
+{ TDADataRequestCallMethodNameEditor }
+
+function TDADataRequestCallMethodNameEditor.GetAttributes: TPropertyAttributes;
+begin
+  result := [paValueList]
+end;
+
+function TDADataRequestCallMethodNameEditor.RetrieveLibrary : TRODLLibrary;
+var datamethod : TDARemoteRequest;
+    //datatable : TDADataTable;
+    //adapter : TDADataAdapter;
+    rs : TRORemoteService;
+    svcname : string;
+begin
+  //result := NIL;
+
+  // Sets the variable we need
+  datamethod := GetComponent(0) as TDARemoteRequest;
+  rs := datamethod.RemoteService;
+
+  CheckCondition(rs=NIL, 'RemoteService must be assigned.');
+
+  svcname := Trim(rs.ServiceName);
+  CheckCondition(svcname='', rs.Name+'.ServiceName must be assigned.');
+
+  {adapter := datamethod.Owner.Adapter;
+  CheckCondition(adapter=NIL, 'The Adpater property is not set');}
+
+  result := rs.GetRODLLibrary;
+end;
+
+procedure TDADataRequestCallMethodNameEditor.GetValues(Proc: TGetStrProc);
+var lib : TRODLLibrary;
+    i,j : integer;
+    svc : TRODLService;
+    svcintf : TRODLServiceInterface;
+    svcname : string;
+    sl : IROStrings;
+    anchestors : TList;
+    method: TDARemoteRequest;
+begin
+  lib := RetrieveLibrary;
+  if not assigned(lib) then
+    raise Exception.Create('RODL library could npt be retrieved from server.');
+
+  anchestors := TList.Create;
+  try
+
+    method := GetComponent(0) as TDARemoteRequest;
+    svcname := method.RemoteService.ServiceName;
+
+    svc := lib.FindService(svcname);
+    if not assigned(svc) then raise Exception.Create('Service "'+svcname+'" could not be found in RODL.');
+
+    repeat
+      anchestors.Add(svc.Default);
+      if (Trim(svc.Ancestor)<>'') then begin
+        svc := lib.FindService(svc.Ancestor);
+        if not assigned(svc) then break;
+      end
+      else break;
+    until false;
+
+    // Methods
+    sl := NewROStrings;
+    sl.Sorted := TRUE;
+
+    for i := 0 to anchestors.Count-1 do begin
+      svcintf := TRODLServiceInterface(anchestors[i]);
+
+      for j := 0 to (svcintf.Count-1) do begin
+        {if (svcintf.Items[i].Result=NIL) or
+           not (StrToDataType(svcintf.Items[i].Result.DataType)=method.Owner.Adapter.TargetDataType)
+        then Continue;}
+
+        sl.Add(svcintf.Items[j].Name);
+      end;
+    end;
+
+    for i := 0 to (sl.Count-1)
+      do Proc(sl[i]);
+
+  finally
+    anchestors.Free;
+  end;
+end;
+
+procedure TDADataRequestCallMethodNameEditor.SetValue(const Value: string);
+var
+  lRemoteRequest: TDARemoteRequest;
+  lOldMethodName: String;
+begin
+  lRemoteRequest := TDARemoteRequest(GetComponent(0));
+  lOldMethodName := lRemoteRequest.MethodName;
+  lRemoteRequest.MethodName := Value;
+  if (Trim(lOldMethodName) <> Trim(Value)) then begin
+    {$IFNDEF FPC}
+    Designer.Modified();
+    {$ELSE}
+    PropertyHook.Modified(lRemoteRequest);
+    {$ENDIF}
+  end;
+
+  if (Trim(Value)='') then Exit;
+
+  if MessageDlg('Do you want to retrieve the parameters of the method '+Value+'?', mtConfirmation, [mbYes, mbNo], 0) = mrYes then begin
+    {$IFNDEF FPC}
+    with CreatePleaseWaitForm('Retrieving Parameters...') do begin
+    {$ENDIF}
+      lRemoteRequest.RefreshParams(true);
+      {$IFNDEF FPC}
+      Hide();
+      {$ENDIF}
+      {$IFNDEF FPC}
+      Designer.Modified();
+      {$ELSE}
+      PropertyHook.Modified(lRemoteRequest);
+      {$ENDIF FPC}
+    {$IFNDEF FPC}
+    end;
+    {$ENDIF}
+  end;
+end;
+
+{ TDALoginAwareComponentEditor }
+
+procedure TDALoginAwareComponentEditor.OnLoginNeeded(Sender: TROTransportChannel; anException: Exception; var aRetry: Boolean);
+begin
+  aRetry := TROLoginNeededForm.Execute(fRemoteService);
+end;
+
+function TDALoginAwareComponentEditor.GetAdapterSchema(aAdapter: TDABaseRemoteDataAdapter): TDASchema;
+var
+  lSaved: TROExceptionEvent;
+begin
+  if (aAdapter is TDARemoteDataAdapter) then begin
+    if TDARemoteDataAdapter(aAdapter).RemoteService.Channel = nil then
+      raise EROException.Create('Channel not assigned');
+    lSaved := TDARemoteDataAdapter(aAdapter).RemoteService.Channel.OnLoginNeeded;
+    TDARemoteDataAdapter(aAdapter).RemoteService.Channel.OnLoginNeeded := OnLoginNeeded;
+    try
+      fRemoteService := TDARemoteDataAdapter(aAdapter).RemoteService;
+      result := aAdapter.ReadSchema(True);
+    finally
+      TDARemoteDataAdapter(aAdapter).RemoteService.Channel.OnLoginNeeded := lSaved;
+    end;
+  end
+  else begin
+    result := aAdapter.ReadSchema(True);
+  end;
+end;
+
+{ TDARemoteDataAdapterEditor }
+
+procedure TDARemoteDataAdapterEditor.ExecuteVerb(Index: Integer);
+var
+  lAdapter: TDARemoteDataAdapter;
+begin
+  lAdapter := TDARemoteDataAdapter(GetComponent);
+  case Index of
+    0: lAdapter.SetupDefaultRequest();
+    1: lAdapter.SetupDefaultRequestV3();
+    2: exit{ Separator };
+    3: if not HookUpDataTables() then exit;
+    4: if not TDataTableWizards.CreateDataTables(Designer, lAdapter, GetAdapterSchema(lAdapter), Point(0,0)) then exit;
+  end;
+  Designer.Modified();
+end;
+
+function TDARemoteDataAdapterEditor.GetVerb(Index: Integer): string;
+begin
+  case Index of
+    0 : result := '&Reset Calls to Default';
+    1 : result := 'Reset Calls to Default (Legacy v&3.0)';
+    2 : result := '-';
+    3 : result := '&Hook up Data Tables...';
+    4 : result := '&Create Data Tables...';
+  end;
+end;
+
+function TDARemoteDataAdapterEditor.GetVerbCount: Integer;
+begin
+  result := 5;
+end;
+
+{ TDADataTableEditor }
+
+procedure TDADataTableEditor.ExecuteVerb(Index: Integer);
+var
+  dt: TDADataTable;
+  ds: TDADataset;
+  lTempSchema: TDASchema;
+  lTempSchemaDataSet: TDADataset;
+  s: string;
+  lSaved: TROExceptionEvent;
+begin
+  dt := TDADataTable(GetComponent);
+
+  case Index of
+    0:begin
+       {$IFDEF FPC}
+        EditCollection(dt, dt.Fields, 'Fields');
+       {$ELSE}
+        ShowCollectionEditor(Designer, dt,  dt.Fields, 'Fields');
+       {$ENDIF}
+      end;
+    1:{ Seperator };
+    2:begin
+        if not (MessageDlg('Do you want to retrieve the schema of '+dt.Name+'?'#13+
+                           'This will overwrite the current field and parameter settings.',
+                mtWarning, [mbYes, mbNo], 0)=mrYes) then Exit;
+
+        if dt.LogicalName = '' then
+          raise Exception.Create('LogicalName must be set.');
+
+        if dt.RemoteFetchEnabled then begin
+          if assigned(dt.RemoteDataAdapter) then begin
+            (dt.RemoteDataAdapter as TDABaseRemoteDataAdapter).CheckProperties();
+            if dt.RemoteDataAdapter is TDARemoteDataAdapter then begin
+              fRemoteService := (dt.RemoteDataAdapter as TDARemoteDataAdapter).RemoteService;
+              lSaved := fRemoteService.Channel.OnLoginNeeded;
+              fRemoteService.Channel.OnLoginNeeded := OnLoginNeeded;
+              (dt.RemoteDataAdapter as TDARemoteDataAdapter).FlushSchema;
+              try
+                dt.LoadSchema(true, true);
+              finally
+                fRemoteService.Channel.OnLoginNeeded := lSaved;
+              end;
+            end
+            else begin
+              dt.LoadSchema(true, true);
+            end;
+          end
+          else begin
+            MessageDlg('RemoteDataAdapter must be assigned.', mtError, [mbOK], 0);
+            Exit;
+          end;
+        end
+        else begin
+          if assigned(dt.LocalSchema) and assigned(dt.LocalDataStreamer) then begin
+            ds := dt.LocalSchema.Datasets.DatasetByName(dt.LogicalName);
+            dt.Fields.AssignFieldCollection(ds.Fields);
+            dt.Params.AssignParamCollection(ds.Params);
+          end
+          else begin
+            MessageDlg('LocalSchema/LocalDataStreamer must be assigned.', mtError, [mbOK], 0);
+            Exit;
+          end;
+        end;
+
+        s := 'Schema loaded successfully. '+IntToStr(dt.Fields.Count)+' fields';
+        if (dt.Params.Count>0) then s := s+' and '+IntToStr(dt.Params.Count)+' params';
+        s := s+' have been created. Original lookup- and client calculated fields have been preserved.';
+
+        MessageDlg(s, mtInformation, [mbOK], 0);
+
+        Designer.Modified;
+      end;
+
+    3: if TDADataTableMasterLinkWizard.ExecuteWizard(dt,{$IFDEF FPC}Designer.PropertyEditorHook{$ELSE} Designer {$ENDIF}) then
+         Designer.Modified();
+    4:{ Seperator };
+    5:begin
+        lTempSchema := TDASchema.Create(NIL);
+        try
+          lTempSchema.Name := MakeValidIdentifier(dt.LogicalName);
+          if lTempSchema.Name = '' then lTempSchema.Name := dt.Name;
+
+          lTempSchemaDataSet := lTempSchema.Datasets.Add();
+          lTempSchemaDataSet.Name := lTempSchema.Name;
+          lTempSchemaDataSet.Fields.AssignFieldCollection(dt.Fields);
+          GenerateSchemaUnits(lTempSchema);
+        finally
+          lTempSchema.Free;
+        end;
+      end;
+    6:{ Seperator };
+    7:begin
+        with TDAIdeData.Create(nil) do try
+          if dlg_OpenBriefcase.Execute then begin
+            dt.LoadFromFile(dlg_OpenBriefcase.Filename);
+            Designer.Modified();
+          end;
+        finally
+          Free();
+        end;
+      end;
+    8:begin
+        if not dt.Active then
+          raise Exception.Create('DataTable is not active.');
+
+        with TDAIdeData.Create(nil) do try
+          if dlg_SaveBriefcase.Execute then begin
+            dt.SaveToFile(dlg_SaveBriefcase.Filename);
+          end;
+        finally
+          Free();
+        end;
+      end;
+    10:begin
+        if dt.LogicalName = '' then
+          raise Exception.Create('LogicalName must be set.');
+
+        if dt.RemoteFetchEnabled then
+          if assigned(dt.RemoteDataAdapter) then begin
+            (dt.RemoteDataAdapter as TDABaseRemoteDataAdapter).CheckProperties();
+            if dt.RemoteDataAdapter is TDARemoteDataAdapter then begin
+              fRemoteService := (dt.RemoteDataAdapter as TDARemoteDataAdapter).RemoteService;
+              lSaved := fRemoteService.Channel.OnLoginNeeded;
+              fRemoteService.Channel.OnLoginNeeded := OnLoginNeeded;
+              try
+                dt.Open();
+              finally
+                fRemoteService.Channel.OnLoginNeeded := lSaved;
+              end;
+            end
+            else begin
+              dt.Open();
+            end;
+          end
+        else if assigned(dt.LocalSchema) and assigned(dt.LocalDataStreamer) then begin
+          dt.Open();
+        end;
+        Designer.Modified;
+      end;
+
+  end; { case }
+end;
+
+function TDADataTableEditor.GetVerb(Index: Integer): string;
+begin
+  case Index of
+    0 : result := 'Field Collection Editor';
+    1 : result := '-';
+    //2 : result := 'Dynamic Method Binding Setup Wizard (Legacy v3.0)';
+    //3 : result := '-';
+    2 : result := 'Retrieve DataTable Schema';
+    3 : result := 'Master/Detail Wizard';
+    4 : result := '-';
+    5 : result := 'Generate Business Class...';
+    6 : result := '-';
+    7 : result := 'Load Data from briefcase file...';
+    8 : result := 'Save Data to briefcase file...';
+    9 : result := '-';
+    10 : result := 'Get Design-Time Data';
+  end;
+end;
+
+function TDADataTableEditor.GetVerbCount: Integer;
+begin
+  result := 9;
+  if not TDADataTable(GetComponent).Active and (assigned(TDADataTable(GetComponent).RemoteDataAdapter)) then inc(result,2);
+end;
+
+{ TDABusinessProcessorCommandProperty }
+
+function TDABusinessProcessorCommandProperty.GetAttributes: TPropertyAttributes;
+begin
+  result := [paValueList, paSortList]
+end;
+
+procedure TDABusinessProcessorCommandProperty.GetValues(Proc: TGetStrProc);
+var biz : TDABusinessProcessor;
+    i : integer;
+    list : IROStrings;
+begin
+  biz := GetComponent(0) as TDABusinessProcessor;
+  if (biz.Schema=NIL) then Exit;
+
+  list := NewROStrings;
+  for i := 0 to (biz.Schema.Commands.Count-1) do
+    list.Add(biz.Schema.Commands[i].Name);
+
+  list.Sorted := TRUE;
+
+  for i := 0 to (list.Count-1) do
+    Proc(list[i]);
+end;
+
+type
+  TPersistentCracker = class(TPersistent);
+{ TDACollectionProperty }
+
+procedure TDACollectionProperty.Edit;
+var coll : TCollection;
+begin
+  coll := GetObjectProp(GetComponent(0), GetName) as TCollection;
+
+  if (coll=NIL) then ShowMessage('no way!')
+                else showmessage(GetName+' has #'+INtToSTr(coll.count)+' '+TComponent(integer(coll.Owner)).ClassName);
+  {$IFDEF FPC}
+  EditCollection(TComponent(GetComponent(0)),coll, GetName);
+  {$ELSE}
+  ShowCollectionEditor(Designer, TComponent(GetComponent(0)), coll, GetName);
+  {$ENDIF}
+end;
+
+function TDACollectionProperty.GetAttributes: TPropertyAttributes;
+begin
+  result := [paDialog, paReadOnly];
+end;
+{ TDABusinessProcessorRefDatasetProperty }
+
+function TDABusinessProcessorRefDatasetProperty.GetAttributes: TPropertyAttributes;
+begin
+  result := [paValueList, paSortList]
+end;
+
+procedure TDABusinessProcessorRefDatasetProperty.GetValues( Proc: TGetStrProc);
+var biz : TDABusinessProcessor;
+    i : integer;
+    list : IROStrings;
+begin
+  biz := GetComponent(0) as TDABusinessProcessor;
+  if (biz.Schema=NIL) then Exit;
+
+  list := NewROStrings;
+  for i := 0 to (biz.Schema.Datasets.Count-1) do
+    list.Add(biz.Schema.Datasets[i].Name);
+
+  list.Sorted := TRUE;
+
+  for i := 0 to (list.Count-1) do
+    Proc(list[i]);
+end;
+
+{ TDADataTableLogicalNameEditor }
+
+function TDADataTableLogicalNameEditor.GetAttributes: TPropertyAttributes;
+begin
+  result := [paValueList, paSortList]
+end;
+
+function TDADataTableLogicalNameEditor.GetSchema: TDASchema;
+begin
+  Result:=nil;
+  try
+    with TDADataTable(GetComponent(0)) do
+      if not RemoteFetchEnabled then
+         Result := LocalSchema
+      else if (RemoteDataAdapter <> nil) then begin
+        if (RemoteDataAdapter is TDARemoteDataAdapter) then
+          Result:= (RemoteDataAdapter as TDARemoteDataAdapter).Schema
+        {$IFDEF USE_LOCALDATAADAPTER}
+        else
+          Result:= (RemoteDataAdapter as TDALocalDataAdapter).Schema;
+        {$ENDIF}
+      end;
+  except
+    // hide exception, when RDA can't receive SCHEMA
+  end;
+end;
+
+procedure TDADataTableLogicalNameEditor.GetValues(Proc: TGetStrProc);
+var i : integer;
+    _Schema: TDASchema;
+begin
+  _Schema:= GetSchema;
+  if _Schema <> nil then begin
+    for i := 0 to (_Schema.Datasets.Count-1) do
+      if _Schema.Datasets[i].IsPublic then Proc(_Schema.Datasets[i].Name);
+    for i := 0 to (_Schema.UnionDataTables.Count-1) do
+      if _Schema.UnionDataTables[i].IsPublic then Proc(_Schema.UnionDataTables[i].Name);
+    for i := 0 to (_Schema.JoinDataTables.Count-1) do
+      if _Schema.JoinDataTables[i].IsPublic then Proc(_Schema.JoinDataTables[i].Name);
+  end;
+end;
+
+{ TDADataTableLocalConnection }
+
+function TDADataTableLocalConnection.GetAttributes: TPropertyAttributes;
+begin
+  if (TDADataTable(GetComponent(0)).LocalSchema<>NIL) and (TDADataTable(GetComponent(0)).LocalSchema.ConnectionManager<>NIL)
+    then result := [paValueList]
+    else result := []
+end;
+
+procedure TDADataTableLocalConnection.GetValues(Proc: TGetStrProc);
+var i : integer;
+begin
+  with TDADataTable(GetComponent(0)) do begin
+    if (LocalSchema=NIL) or (LocalSchema.ConnectionManager=NIL) then Exit;
+
+    for i := 0 to (LocalSchema.ConnectionManager.Connections.Count-1) do
+      Proc(LocalSchema.ConnectionManager.Connections[i].Name);
+  end;
+end;
+
+{ TDADriverManagerDirectory }
+
+function TDADriverManagerDirectory.GetAttributes: TPropertyAttributes;
+begin
+  result := [paValueList]
+end;
+
+const SelectDirOption = '<Select directory>';
+
+procedure TDADriverManagerDirectory.GetValues(Proc: TGetStrProc);
+begin
+  inherited;
+
+  Proc(alias_ModuleDir);
+  Proc(alias_System);
+  Proc(SelectDirOption);
+end;
+
+procedure TDADriverManagerDirectory.SetValue(const Value: string);
+var dir : string;
+begin
+  if (Value=SelectDirOption) then begin
+    if SelectDirectory(dir, [sdPrompt, sdAllowCreate], 0)
+      then inherited SetValue(dir);
+  end
+
+  else if (Value=alias_DABinDir) then begin
+    dir := IncludeTrailingPathDelimiter(Copy(GetDllPath,  1, Length(GetDLLPath)-7))+'Bin';
+    inherited SetValue(dir);
+  end
+
+  else inherited;
+end;
+
+{ TDADataDictionaryEditor }
+
+procedure TDADataDictionaryEditor.ExecuteVerb(Index: Integer);
+var
+  dict: TDADataDictionary;
+  sfname: string;
+begin
+  inherited;
+
+  dict := GetComponent as TDADataDictionary;
+  sfname := dict.Name+DAFileExtDataDictionaryFile;
+
+  case Index of
+    0: {$IFDEF FPC}
+       EditCollection(GetComponent(), dict.Fields, 'Fields');
+       {$ELSE}
+       ShowCollectionEditor(Designer, GetComponent(), dict.Fields, 'Fields');
+       {$ENDIF}
+    1:{separater};
+    2:if PromptForFileName(sfname, 'Data Abstract DataDictionaries (*'+DAFileExtDataDictionaryFile+')|*'+daFileExtConnectionMgrFile+'|All Files (*.*)|*.*', daFileExtConnectionMgrFile, 'Save DataDictionary '+dict.Name, '', TRUE) then
+        dict.SaveToFile(sfname, pfXML);
+    3:if PromptForFileName(sfname, 'Data Abstract DataDictionaries (*'+DAFileExtDataDictionaryFile+')|*'+daFileExtConnectionMgrFile+'|All Files (*.*)|*.*', daFileExtConnectionMgrFile, 'Load DataDictionary '+dict.Name, '') then begin
+        dict.LoadFromFile(sfname, pfXML);
+        Designer.Modified;
+      end;
+  end;
+end;
+
+function TDADataDictionaryEditor.GetVerb(Index: Integer): string;
+begin
+  case Index of
+    0:result := 'DataDictionary Editor';
+    1:result := '-';
+    2: result := 'Save '+GetComponent.Name+' to Disk...';
+    3: result := 'Load '+GetComponent.Name+' from Disk...';
+  end;
+end;
+
+function TDADataDictionaryEditor.GetVerbCount: Integer;
+begin
+  result := 4;
+end;
+
+{ TDAClientDataModuleEditor }
+
+{ TDADataTableMasterDetailProps }
+
+procedure TDADataTableMasterDetailProps.Edit;
+begin
+  {$IFDEF FPC}
+  if TDADataTableMasterLinkWizard.ExecuteWizard(TDADataTable(GetComponent(0)), PropertyHook) then
+    Modified;
+  {$ELSE}
+  if TDADataTableMasterLinkWizard.ExecuteWizard(TDADataTable(GetComponent(0)), Designer) then
+    Designer.Modified();
+  {$ENDIF}
+end;
+
+function TDADataTableMasterDetailProps.GetAttributes: TPropertyAttributes;
+begin
+  result := [paDialog]
+end;
+
+
+{ TDACollectionItemDatasetNameEditor }
+
+function TDACollectionItemDatasetNameEditor.GetAttributes: TPropertyAttributes;
+begin
+  result := [paValueList, paSortList]
+end;
+
+procedure TDACollectionItemDatasetNameEditor.GetValues(Proc: TGetStrProc);
+var schema : TDASchema;
+    i : integer;
+begin
+  schema :=  TSearcheableCollection(TCollectionItem(GetComponent(0)).Collection).Owner as TDASchema;
+  for i := 0 to schema.Datasets.Count-1 do begin
+    Proc(schema.Datasets[i].Name);
+  end;
+end;
+
+{ TDADesigntimeCallEditor }
+
+procedure TDADesigntimeCallEditor.ExecuteVerb(Index: Integer);
+begin
+  inherited;
+  (GetComponent as TDADesigntimeCall).MakeRequest;
+  ShowMessage('The call to the server was executed.');
+end;
+
+function TDADesigntimeCallEditor.GetVerb(Index: Integer): string;
+begin
+  result := 'Make Call';
+end;
+
+function TDADesigntimeCallEditor.GetVerbCount: Integer;
+begin
+  result := 1;
+end;
+
+{ TDADataTableReferenceDataTable }
+
+procedure TDADataTableReferenceDataTable.GetValues(Proc: TGetStrProc);
+begin
+  {$IFDEF FPC}
+  with PropertyHook do
+  {$ELSE}
+  With Designer do
+  {$ENDIF}
+  begin
+    GetComponentNames(GetTypeData(TypeInfo(TDADataTable)), Proc);
+    GetComponentNames(GetTypeData(TypeInfo(TDataset)), Proc);
+  end;
+end;
+
+{ TDALookupSourceProperty }
+
+function TDALookupSourceProperty.GetAttributes: TPropertyAttributes;
+begin
+  result := [paValueList, paSortList, paMultiSelect];
+end;
+
+procedure TDALookupSourceProperty.GetValues(Proc: TGetStrProc);
+var
+  i: integer;
+begin
+  with GetComponent(0) as TDAField do
+    for i := 0 to (FieldCollection.Count - 1) do
+      Proc(FieldCollection[i].Name);
+end;
+
+{ TDALookupDestProperty }
+
+function TDALookupDestProperty.GetAttributes: TPropertyAttributes;
+begin
+  result := [paValueList, paSortList, paMultiSelect];
+end;
+
+procedure TDALookupDestProperty.GetValues(Proc: TGetStrProc);
+var
+  lValues: TStringList;
+  i: Integer;
+begin
+  lValues := TStringList.Create;
+  with GetComponent(0) as TDAField do try
+    if Assigned(LookupSource) then begin
+      LookupSource.DataSet.GetFieldNames(lValues);
+      for i := 0 to lValues.Count - 1 do
+        Proc(lValues[i]);
+    end;
+  finally
+    lValues.free;
+  end;
+end;
+
+{ TDALookupResultFieldProperty }
+
+function TDALookupResultFieldProperty.GetAttributes: TPropertyAttributes;
+begin
+  result := [paValueList, paSortList];
+end;
+
+procedure TDALookupResultFieldProperty.SetValue(const Value: string);
+var
+  lResultField, lLookupField: TDAField;
+begin
+  lResultField := GetComponent(0) as TDAField;
+  if Assigned(lResultField.LookupSource) then begin
+    with TDADataSource(lResultField.LookupSource).DataTable do
+      lLookupField := FindField(Value);
+    if Assigned(lLookupField) then begin
+      lResultField.DataType := lLookupField.DataType;
+      lResultField.Size := lLookupField.Size;
+    end;
+  end;
+
+  inherited;
+end;
+
+{ TDABaseRemoteDataAdapterEditor }
+
+procedure TDABaseRemoteDataAdapterEditor.ExecuteVerb(Index: Integer);
+var
+  lAdapter: TDABaseRemoteDataAdapter;
+begin
+  lAdapter := TDABaseRemoteDataAdapter(GetComponent);
+  case Index of
+    0: if not HookUpDataTables() then exit;
+    1: if not TDataTableWizards.CreateDataTables(Designer, lAdapter, GetAdapterSchema(lAdapter), Point(0,0)) then exit;
+  end;
+  Designer.Modified();
+end;
+
+procedure TDABaseRemoteDataAdapterEditor.GetDataTables(
+  const aName: string);
+begin
+  fDataTables.Add(aName);
+end;
+
+function TDABaseRemoteDataAdapterEditor.GetVerb(Index: Integer): string;
+begin
+  case Index of
+    0 : result := '&Hook up Data Tables...';
+    1 : result := '&Create Data Tables...';
+  end;
+end;
+
+function TDABaseRemoteDataAdapterEditor.GetVerbCount: Integer;
+begin
+  result := 2;
+end;
+
+function TDABaseRemoteDataAdapterEditor.HookUpDataTables: boolean;
+var
+  lForm: TDASelectDataTablesForm;
+  i: integer;
+  {$IFDEF FPC}
+  ldesigner: TPropertyEditorHook;
+  {$ELSE}
+  ldesigner: IDesigner;
+  {$ENDIF}
+begin
+  {$IFDEF FPC}
+  ldesigner:= Designer.PropertyEditorHook;
+  {$ELSE}
+  ldesigner := Designer;
+  {$ENDIF}
+  fDataTables := TStringList.Create;
+  try
+    fDataTables.Sorted := true;
+    lDesigner.GetComponentNames(GetTypeData(TypeInfo(TDADataTable)), GetDataTables);
+    if fDataTables.Count > 0 then begin
+      lForm := TDASelectDataTablesForm.Create(nil);
+      try
+        for i := 0 to fDataTables.Count - 1 do begin
+          lForm.lb_DataTables.Items.AddObject(fDataTables[i], nil);
+          lForm.lb_DataTables.Checked[lForm.lb_DataTables.Items.Count-1] := not assigned((lDesigner.GetComponent(fDataTables[i]) as TDADataTable).RemoteDataAdapter);
+        end;
+        lForm.UpdateCheckBoxState();
+        lForm.OkButtonCaption := '&Hook Up';
+        result := (lForm.ShowModal() = mrOk);
+        if result then begin
+          for i := 0 to lForm.lb_DataTables.Items.Count - 1 do
+            if lForm.lb_DataTables.Checked[i] then
+              (lDesigner.GetComponent(lForm.lb_DataTables.Items[i]) as TDADataTable).RemoteDataAdapter := TDABaseRemoteDataAdapter(GetComponent);
+        end;
+      finally
+        FreeAndNil(lForm);
+      end;
+    end
+    else begin
+      result := false;
+      ShowMessage('No data tables were found on module.')
+    end;
+  finally
+    FreeAndNil(fDataTables);
+  end;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDADataTableEditorForm.dfm b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDADataTableEditorForm.dfm
new file mode 100644
index 0000000..1da0d2e
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDADataTableEditorForm.dfm	
@@ -0,0 +1,427 @@
+object DADataTableEditorForm: TDADataTableEditorForm
+  Left = 407
+  Top = 225
+  BorderStyle = bsDialog
+  BorderWidth = 5
+  Caption = '%s - DataTable Editor'
+  ClientHeight = 513
+  ClientWidth = 300
+  Color = clBtnFace
+  ParentFont = True
+  OldCreateOrder = False
+  Position = poScreenCenter
+  OnDestroy = FormDestroy
+  DesignSize = (
+    300
+    513)
+  PixelsPerInch = 96
+  TextHeight = 13
+  object Label1: TLabel
+    Left = 0
+    Top = 0
+    Width = 49
+    Height = 13
+    Caption = 'DataSet:'
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWindowText
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    Font.Style = [fsBold]
+    ParentFont = False
+  end
+  object Label2: TLabel
+    Left = 0
+    Top = 75
+    Width = 91
+    Height = 13
+    Caption = 'Get Schema Call'
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWindowText
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    Font.Style = [fsBold]
+    ParentFont = False
+  end
+  object Label3: TLabel
+    Left = 16
+    Top = 13
+    Width = 239
+    Height = 26
+    Caption = 
+      'Select or enter the name of the dataset you want this DataTable ' +
+      'to represent.'
+    WordWrap = True
+  end
+  object Label6: TLabel
+    Left = 0
+    Top = 179
+    Width = 73
+    Height = 13
+    Caption = 'Get Data Call'
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWindowText
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    Font.Style = [fsBold]
+    ParentFont = False
+  end
+  object Label9: TLabel
+    Left = 8
+    Top = 283
+    Width = 98
+    Height = 13
+    Caption = 'Apply Upates Call'
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWindowText
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    Font.Style = [fsBold]
+    ParentFont = False
+  end
+  object Label12: TLabel
+    Left = 8
+    Top = 387
+    Width = 85
+    Height = 13
+    Caption = 'Get Scripts Call'
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWindowText
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    Font.Style = [fsBold]
+    ParentFont = False
+  end
+  object btn_Ok: TBitBtn
+    Left = 145
+    Top = 487
+    Width = 75
+    Height = 25
+    Anchors = [akRight, akBottom]
+    Caption = 'Ok'
+    Default = True
+    ModalResult = 1
+    TabOrder = 0
+    OnClick = btn_OkClick
+    Glyph.Data = {
+      36060000424D3606000000000000360000002800000020000000100000000100
+      18000000000000060000C40E0000C40E00000000000000000000FF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FF006600006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565656565FF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FF0066001EB2311FB133006600FF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6565659A9A9A9A9A9A65
+      6565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FF00660031C24F22B7381AB02D21B437006600FF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565ABABAB9E9E9E9797979C
+      9C9C656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      00660047D36D3BCB5E25A83B0066001BA92E1DB132006600FF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FF656565BFBFBFB5B5B598989865656594
+      9494999999656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF006600
+      4FD67953DE7F31B54D006600FF00FF006600179D271EAE31006600FF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FF656565C4C4C4CACACAA5A5A5656565FF00FF65
+      65658C8C8C989898656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      00660041C563006600FF00FFFF00FFFF00FFFF00FF00660019AA2B006600FF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FF656565B5B5B5656565FF00FFFF00FFFF
+      00FFFF00FF656565939393656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FF006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF006600149D210066
+      00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565FF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FF6565658A8A8A656565FF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0066
+      00006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FF656565656565FF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FF006600006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565656565FF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
+    NumGlyphs = 2
+  end
+  object BitBtn2: TBitBtn
+    Left = 225
+    Top = 487
+    Width = 75
+    Height = 25
+    Anchors = [akRight, akBottom]
+    Cancel = True
+    Caption = 'Cancel'
+    ModalResult = 2
+    TabOrder = 1
+    Glyph.Data = {
+      36060000424D3606000000000000360000002800000020000000100000000100
+      18000000000000060000C40E0000C40E00000000000000000000FF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FF00009A00009AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00009A0000
+      9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+      00009A174AFD103BF400009AFF00FFFF00FFFF00FFFF00FF00009A002CF80030
+      FC00009AFF00FFFF00FFFF00FFFF00FF6B6B6BA8A8A8A0A0A06B6B6BFF00FFFF
+      00FFFF00FFFF00FF6B6B6B9A9A9A9C9C9C6B6B6BFF00FFFF00FFFF00FFFF00FF
+      00009A1A47F81A4CFF123BF100009AFF00FFFF00FF00009A012DF60132FF002A
+      F300009AFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7AAAAAA9F9F9F6B6B6BFF
+      00FFFF00FF6B6B6B9999999E9E9E9797976B6B6BFF00FFFF00FFFF00FFFF00FF
+      FF00FF00009A1C47F61B4DFF143EF400009A00009A002DF80134FF032BF20000
+      9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7ABABABA2A2A26B
+      6B6B6B6B6B9A9A9A9E9E9E9898986B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FF00009A1D48F61D50FF103DFB0431FE0132FF002CF600009AFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7ACACACA3
+      A3A39F9F9F9E9E9E9999996B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FF00009A1A48F91342FF0C3CFF0733F600009AFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7A7
+      A7A7A3A3A39C9C9C6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FF00009A214EFC1D4BFF1847FF1743F600009AFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BACACACAC
+      ACACA9A9A9A4A4A46B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FF00009A2E5BF92C5FFF224DF8204BF82355FF1B46F600009AFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BB1B1B1B3B3B3AB
+      ABABAAAAAAAFAFAFA6A6A66B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FF00009A3664FA386BFF2D59F400009A00009A224CF42558FF1D49F60000
+      9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BB6B6B6B9B9B9AEAEAE6B
+      6B6B6B6B6BA9A9A9B0B0B0A7A7A76B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+      00009A4071FA4274FF325DF100009AFF00FFFF00FF00009A224DF1275AFF204C
+      F800009AFF00FFFF00FFFF00FFFF00FF6B6B6BBBBBBBBEBEBEAFAFAF6B6B6BFF
+      00FFFF00FF6B6B6BA7A7A7B1B1B1AAAAAA6B6B6BFF00FFFF00FFFF00FFFF00FF
+      00009A497AFC3B66F300009AFF00FFFF00FFFF00FFFF00FF00009A2550F42655
+      FA00009AFF00FFFF00FFFF00FFFF00FF6B6B6BC0C0C0B5B5B56B6B6BFF00FFFF
+      00FFFF00FFFF00FF6B6B6BAAAAAAAEAEAE6B6B6BFF00FFFF00FFFF00FFFF00FF
+      FF00FF00009A00009AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00009A0000
+      9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
+    NumGlyphs = 2
+  end
+  object cb_DataSets: TComboBox
+    Left = 16
+    Top = 44
+    Width = 284
+    Height = 21
+    Anchors = [akLeft, akTop, akRight]
+    ItemHeight = 0
+    TabOrder = 2
+    OnChange = cb_DataSetsChange
+  end
+  object cb_GetSchemaMethods: TComboBox
+    Left = 16
+    Top = 91
+    Width = 284
+    Height = 21
+    Style = csDropDownList
+    Anchors = [akLeft, akTop, akRight]
+    ItemHeight = 0
+    TabOrder = 3
+    OnChange = cb_GetSchemaMethodsChange
+  end
+  object cb_GetDataMethods: TComboBox
+    Left = 16
+    Top = 195
+    Width = 284
+    Height = 21
+    Style = csDropDownList
+    Anchors = [akLeft, akTop, akRight]
+    ItemHeight = 0
+    TabOrder = 4
+    OnChange = cb_GetDataMethodsChange
+  end
+  object cb_ApplyUpdatesMethods: TComboBox
+    Left = 16
+    Top = 299
+    Width = 284
+    Height = 21
+    Style = csDropDownList
+    Anchors = [akLeft, akTop, akRight]
+    ItemHeight = 0
+    TabOrder = 5
+    OnChange = cb_ApplyUpdatesMethodsChange
+  end
+  object pnl_GetSchemaOptions: TPanel
+    Left = 16
+    Top = 112
+    Width = 284
+    Height = 52
+    BevelOuter = bvNone
+    TabOrder = 6
+    object Label4: TLabel
+      Left = 0
+      Top = 7
+      Width = 84
+      Height = 13
+      Caption = 'Parameter Name:'
+    end
+    object Label5: TLabel
+      Left = 0
+      Top = 31
+      Width = 83
+      Height = 13
+      Caption = 'Parameter Value:'
+    end
+    object ed_GetSchemaValue: TEdit
+      Left = 90
+      Top = 28
+      Width = 194
+      Height = 21
+      TabOrder = 0
+    end
+    object cb_GetSchemaParams: TComboBox
+      Left = 90
+      Top = 4
+      Width = 194
+      Height = 21
+      Style = csDropDownList
+      ItemHeight = 0
+      TabOrder = 1
+    end
+  end
+  object pnl_GetDataOptions: TPanel
+    Left = 16
+    Top = 216
+    Width = 284
+    Height = 52
+    BevelOuter = bvNone
+    TabOrder = 7
+    object Label7: TLabel
+      Left = 0
+      Top = 7
+      Width = 84
+      Height = 13
+      Caption = 'Parameter Name:'
+    end
+    object Label8: TLabel
+      Left = 0
+      Top = 31
+      Width = 83
+      Height = 13
+      Caption = 'Parameter Value:'
+    end
+    object ed_GetDataValue: TEdit
+      Left = 90
+      Top = 28
+      Width = 194
+      Height = 21
+      TabOrder = 0
+    end
+    object cb_GetDataParams: TComboBox
+      Left = 90
+      Top = 4
+      Width = 194
+      Height = 21
+      Style = csDropDownList
+      ItemHeight = 0
+      TabOrder = 1
+    end
+  end
+  object pnl_ApplyUpdatesOptions: TPanel
+    Left = 16
+    Top = 320
+    Width = 284
+    Height = 52
+    BevelOuter = bvNone
+    TabOrder = 8
+    object Label10: TLabel
+      Left = 0
+      Top = 7
+      Width = 84
+      Height = 13
+      Caption = 'Parameter Name:'
+    end
+    object Label11: TLabel
+      Left = 0
+      Top = 31
+      Width = 83
+      Height = 13
+      Caption = 'Parameter Value:'
+    end
+    object ed_ApplyUpdatesValue: TEdit
+      Left = 90
+      Top = 28
+      Width = 194
+      Height = 21
+      TabOrder = 0
+    end
+    object cb_ApplyUpdatesParams: TComboBox
+      Left = 90
+      Top = 4
+      Width = 194
+      Height = 21
+      Style = csDropDownList
+      ItemHeight = 0
+      TabOrder = 1
+    end
+  end
+  object cb_GetScriptsMethods: TComboBox
+    Left = 16
+    Top = 403
+    Width = 284
+    Height = 21
+    Style = csDropDownList
+    Anchors = [akLeft, akTop, akRight]
+    ItemHeight = 0
+    TabOrder = 9
+    OnChange = cb_GetScriptsMethodsChange
+  end
+  object pnl_GetScriptOptions: TPanel
+    Left = 16
+    Top = 424
+    Width = 284
+    Height = 52
+    BevelOuter = bvNone
+    TabOrder = 10
+    object Label13: TLabel
+      Left = 0
+      Top = 7
+      Width = 84
+      Height = 13
+      Caption = 'Parameter Name:'
+    end
+    object Label14: TLabel
+      Left = 0
+      Top = 31
+      Width = 83
+      Height = 13
+      Caption = 'Parameter Value:'
+    end
+    object ed_GetScriptsValue: TEdit
+      Left = 90
+      Top = 28
+      Width = 194
+      Height = 21
+      TabOrder = 0
+    end
+    object cb_GetScriptsParams: TComboBox
+      Left = 90
+      Top = 4
+      Width = 194
+      Height = 21
+      Style = csDropDownList
+      ItemHeight = 0
+      TabOrder = 1
+    end
+  end
+end
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDADataTableEditorForm.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDADataTableEditorForm.pas
new file mode 100644
index 0000000..87324d1
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDADataTableEditorForm.pas	
@@ -0,0 +1,435 @@
+unit uDADataTableEditorForm;
+
+interface
+
+uses
+  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
+  Dialogs, uDADataTable, StdCtrls, Buttons, ExtCtrls, uRODL, uROClasses,
+  uRORemoteService, uROClientIntf;
+
+type
+  TDADataTableEditorForm = class(TForm)
+    btn_Ok: TBitBtn;
+    BitBtn2: TBitBtn;
+    cb_DataSets: TComboBox;
+    Label1: TLabel;
+    Label2: TLabel;
+    cb_GetSchemaMethods: TComboBox;
+    Label3: TLabel;
+    cb_GetDataMethods: TComboBox;
+    cb_ApplyUpdatesMethods: TComboBox;
+    Label6: TLabel;
+    Label9: TLabel;
+    pnl_GetSchemaOptions: TPanel;
+    Label4: TLabel;
+    Label5: TLabel;
+    ed_GetSchemaValue: TEdit;
+    cb_GetSchemaParams: TComboBox;
+    pnl_GetDataOptions: TPanel;
+    Label7: TLabel;
+    Label8: TLabel;
+    ed_GetDataValue: TEdit;
+    cb_GetDataParams: TComboBox;
+    pnl_ApplyUpdatesOptions: TPanel;
+    Label10: TLabel;
+    Label11: TLabel;
+    ed_ApplyUpdatesValue: TEdit;
+    cb_ApplyUpdatesParams: TComboBox;
+    Label12: TLabel;
+    cb_GetScriptsMethods: TComboBox;
+    pnl_GetScriptOptions: TPanel;
+    Label13: TLabel;
+    Label14: TLabel;
+    ed_GetScriptsValue: TEdit;
+    cb_GetScriptsParams: TComboBox;
+    procedure OnMethodChanged(Sender: TObject);
+    procedure cb_DataSetsChange(Sender: TObject);
+    procedure FormDestroy(Sender: TObject);
+    procedure cb_GetSchemaMethodsChange(Sender: TObject);
+    procedure cb_GetDataMethodsChange(Sender: TObject);
+    procedure cb_ApplyUpdatesMethodsChange(Sender: TObject);
+    procedure btn_OkClick(Sender: TObject);
+    procedure cb_GetScriptsMethodsChange(Sender: TObject);
+  private
+    fDataTable: TDADataTable;
+    fManuallySelectedMethods:boolean;
+    fMethods:TStringList;
+    fLibrary:TRODLLibrary;
+
+    fGetSchemaParams,fGetDataParams,fApplyUpdateParams,fGetScriptsParams:TDARemoteRequestParams;
+
+    procedure FillDataSetsCombo;
+    procedure EnablePanel(iPanel:TPanel; iEnable:boolean=true);
+    procedure FillParameters(iMethodCombo, iParamCombo: TComboBox; iParamEdit:TEdit);
+    procedure CreateParameters(iMethodCombo, iParamCombo: TComboBox; iParamEdit: TEdit; ioParams: TDARemoteRequestParams);
+    function GetSchemaAsXML(aRemoteService : TRORemoteService): String;
+  public
+    class function Execute(aOwner:TComponent; aDataTable:TDADataTable; var aDataSet:string):boolean;
+  end;
+
+implementation
+
+uses
+  uROTypes, uDAClientDataModule, uDAClasses, uDAIDERes, uDAPleaseWaitForm;
+
+{$R *.dfm}
+
+{ TForm1 }
+
+procedure TDADataTableEditorForm.FormDestroy(Sender: TObject);
+begin
+  FreeAndNil(fMethods);
+  FreeAndNil(fLibrary);
+  FreeAndNil(fGetSchemaParams);
+  FreeAndNil(fGetDataParams);
+  FreeAndNil(fApplyUpdateParams);
+  FreeAndNil(fGetScriptsParams);
+end;
+
+class function TDADataTableEditorForm.Execute(aOwner: TComponent; aDataTable: TDADataTable; var aDataSet:string): boolean;
+begin
+  with self.Create(aOwner) do try
+
+    Caption := Format(Caption,[aDataTable.Name]);
+    fDataTable := aDataTable;
+    FillDataSetsCombo();
+
+    cb_DataSets.ItemIndex := cb_DataSets.Items.IndexOf(aDataSet);
+    cb_DataSetsChange(nil);
+
+    result := ShowModal = idOk;
+    if result then begin
+
+      {aDataTable.SchemaCall.MethodName := cb_GetSchemaMethods.Text;
+      aDataTable.SchemaCall.Params.Assign(fGetSchemaParams);
+
+      aDataTable.DataRequestCall.MethodName := cb_GetDataMethods.Text;
+      aDataTable.DataRequestCall.Params.Assign(fGetDataParams);
+
+      aDataTable.DataUpdateCall.MethodName := cb_ApplyUpdatesMethods.Text;
+      aDataTable.DataUpdateCall.Params.Assign(fApplyUpdateParams);
+
+      aDataTable.ScriptCall.MethodName := cb_GetScriptsMethods.Text;
+      aDataTable.ScriptCall.Params.Assign(fGetScriptsParams);}
+
+      aDataSet := cb_DataSets.Text;
+
+    end;
+  finally
+    Free();
+  end; 
+end;
+
+function TDADataTableEditorForm.GetSchemaAsXML(aRemoteService : TRORemoteService): String;
+var __request, __response : TMemoryStream;
+    __TransportChannel : IROTransportChannel;
+    __Message : IROMessage;
+begin
+  __TransportChannel := aRemoteService.Channel;
+  __Message := aRemoteService.Message;
+
+  __request := TMemoryStream.Create;
+  __response := TMemoryStream.Create;
+
+  try
+     __Message.Initialize(__TransportChannel, 'DataAbstract', aRemoteService.ServiceName, 'GetSchemaAsXML');
+     __Message.Finalize;
+
+     __Message.WriteToStream(__request);
+     __TransportChannel.Dispatch(__request, __response);
+     __Message.ReadFromStream(__response);
+
+     __Message.Read('Result', TypeInfo(String), result, []);
+  finally
+    __request.Free;
+    __response.Free;
+  end
+end;
+procedure TDADataTableEditorForm.FillDataSetsCombo;
+var
+  p: Integer;
+  lDataSets: TStringList;
+  i: Integer;
+  lService: TRODLService;
+  lSchema:TDASchema;
+begin
+  (*fMethods := TStringList.Create();
+  fLibrary := fDataTable.RemoteService.GetRODLLibrary();
+
+  fGetSchemaParams := TDARemoteRequestParams.Create(nil);
+  fGetDataParams := TDARemoteRequestParams.Create(nil);
+  fApplyUpdateParams := TDARemoteRequestParams.Create(nil);
+  fGetScriptsParams := TDARemoteRequestParams.Create(nil);
+
+  lDataSets := TStringList.Create();
+  try
+
+    lService := fLibrary.FindService(fDataTable.RemoteService.ServiceName);
+    while Assigned(lService) do begin
+      for i := 0 to lService.Default.Count-1 do begin
+        fMethods.AddObject(lService.Default.Items[i].Info.Name,lService.Default.Items[i]);
+      end;
+
+      if (lService.Ancestor <> '')
+        then lService := fLibrary.FindService(lService.Ancestor)
+        else lService := nil;
+    end;
+
+    fMethods.Sort();
+    cb_GetSchemaMethods.Items.Assign(fMethods);
+    cb_GetDataMethods.Items.Assign(fMethods);
+    cb_ApplyUpdatesMethods.Items.Assign(fMethods);
+    cb_GetScriptsMethods.Items.Assign(fMethods);
+
+    lDataSets.Duplicates := dupIgnore;
+    lDataSets.Sorted := true;
+
+    if Assigned(fDataTable.RemoteService) then begin
+      if not Assigned(fDataTable.RemoteService.Channel) then RaiseError(err_AssignRemoteServiceChannel);
+      if not Assigned(fDataTable.RemoteService.Message) then RaiseError(err_AssignRemoteServiceMessage);
+      
+      lSchema := nil;
+      with CreatePleaseWaitForm(self,'Retrieving Schema...') do try
+        try
+          lSchema := TDASchema.Create(nil);
+          lSchema.LoadFromXml(GetSchemaAsXML(fDataTable.RemoteService));
+        except
+          lSchema.Free;
+          raise;
+        end;
+      finally
+        Hide;
+      end;
+
+      try
+        for i := 0 to lSchema.Datasets.Count-1 do begin
+          lDataSets.Add(lSchema.Datasets[i].Name);
+        end; { for }
+      finally
+        lSchema.Free();
+      end;
+
+    end
+    else begin
+
+      for i := 0 to fMethods.Count-1 do begin
+        p := Pos('_',fMethods[i]);
+        if p > 0 then lDataSets.Add(Copy(fMethods[i],p+1,Length(fMethods[i])-p));
+      end; { for }
+
+    end;
+    cb_DataSets.Items.Assign(lDataSets);
+
+  finally
+    FreeAndNil(lDataSets);
+  end;
+        *)
+end;
+
+procedure TDADataTableEditorForm.OnMethodChanged(Sender: TObject);
+begin
+  fManuallySelectedMethods := true;
+end;
+
+procedure TDADataTableEditorForm.EnablePanel(iPanel:TPanel; iEnable:boolean=true);
+var
+  i:integer;
+begin
+  for i := 0 to ComponentCount-1 do if (Components[i] as TControl).Parent = iPanel then begin
+    if Components[i] is TLabel then TLabel(Components[i]).Enabled := iEnable
+    else if Components[i] is TComboBox then TComboBox(Components[i]).Enabled := iEnable
+    else if Components[i] is TEdit then TEdit(Components[i]).Enabled := iEnable
+  end;
+end;
+
+procedure TDADataTableEditorForm.cb_DataSetsChange(Sender: TObject);
+var
+  lIndex:integer;
+  lDataSetName:string;
+begin
+  if not fManuallySelectedMethods then begin
+
+    lDataSetName := StringReplace(cb_DataSets.Text,' ','_',[rfReplaceAll]);
+
+    lIndex := cb_GetSchemaMethods.Items.IndexOf('GetDatasetSchema_'+lDataSetName);
+    if lIndex = -1 then lIndex := cb_GetSchemaMethods.Items.IndexOf('GetSchema_'+lDataSetName);
+    if lIndex > -1 then begin
+      cb_GetSchemaMethods.ItemIndex := lIndex;
+      cb_GetSchemaMethodsChange(nil);
+      EnablePanel(pnl_GetSchemaOptions,false);
+    end
+    else begin
+      lIndex := cb_GetSchemaMethods.Items.IndexOf('GetDatasetSchema');
+      if lIndex = -1 then cb_GetSchemaMethods.Text := '';
+      cb_GetSchemaMethods.ItemIndex := lIndex;
+      cb_GetSchemaMethodsChange(nil);
+    end;
+
+    lIndex := cb_GetScriptsMethods.Items.IndexOf('GetDatasetScript_'+lDataSetName);
+    if lIndex = -1 then lIndex := cb_GetScriptsMethods.Items.IndexOf('GetDatasetScripts_'+lDataSetName);
+    if lIndex > -1 then begin
+      cb_GetScriptsMethods.ItemIndex := lIndex;
+      cb_GetScriptsMethodsChange(nil);
+      EnablePanel(pnl_GetScriptOptions,false);
+    end
+    else begin
+      lIndex := cb_GetScriptsMethods.Items.IndexOf('GetDatasetScripts');
+      if lIndex = -1 then cb_GetScriptsMethods.Text := '';
+      cb_GetScriptsMethods.ItemIndex := lIndex;
+      cb_GetScriptsMethodsChange(nil);
+    end;
+
+    lIndex := cb_GetDataMethods.Items.IndexOf('GetDatasetData_'+lDataSetName);
+    if lIndex = -1 then lIndex := cb_GetDataMethods.Items.IndexOf('Get_'+lDataSetName);
+    if lIndex = -1 then lIndex := cb_GetDataMethods.Items.IndexOf('Get'+lDataSetName);
+    if lIndex = -1 then lIndex := cb_GetDataMethods.Items.IndexOf('Load_'+lDataSetName);
+    if lIndex = -1 then lIndex := cb_GetDataMethods.Items.IndexOf('Load'+lDataSetName);
+    if lIndex = -1 then lIndex := cb_GetDataMethods.Items.IndexOf('Read_'+lDataSetName);
+    if lIndex = -1 then lIndex := cb_GetDataMethods.Items.IndexOf('Read'+lDataSetName);
+    if lIndex > -1 then begin
+      cb_GetDataMethods.ItemIndex := lIndex;
+      cb_GetDataMethodsChange(nil);
+      EnablePanel(pnl_GetDataOptions,false);
+    end
+    else begin
+      EnablePanel(pnl_GetDataOptions);
+      lIndex := cb_GetDataMethods.Items.IndexOf('GetDatasetDataEx');
+      if lIndex = -1 then lIndex := cb_GetDataMethods.Items.IndexOf('GetDatasetData'); 
+      if lIndex = -1 then cb_GetDataMethods.Text := '';
+      cb_GetDataMethods.ItemIndex := lIndex;
+      cb_GetDataMethodsChange(nil);
+    end;
+
+    lIndex := cb_ApplyUpdatesMethods.Items.IndexOf('UpdateData_'+lDataSetName);
+    if lIndex = -1 then lIndex := cb_GetDataMethods.Items.IndexOf('Update_'+lDataSetName);
+    if lIndex = -1 then lIndex := cb_GetDataMethods.Items.IndexOf('Update'+lDataSetName);
+    if lIndex = -1 then lIndex := cb_GetDataMethods.Items.IndexOf('Set_'+lDataSetName);
+    if lIndex = -1 then lIndex := cb_GetDataMethods.Items.IndexOf('Set'+lDataSetName);
+    if lIndex = -1 then lIndex := cb_GetDataMethods.Items.IndexOf('Save_'+lDataSetName);
+    if lIndex = -1 then lIndex := cb_GetDataMethods.Items.IndexOf('Save'+lDataSetName);
+    if lIndex = -1 then lIndex := cb_GetDataMethods.Items.IndexOf('Write_'+lDataSetName);
+    if lIndex = -1 then lIndex := cb_GetDataMethods.Items.IndexOf('Write'+lDataSetName);
+    if lIndex > -1 then begin
+      cb_ApplyUpdatesMethods.ItemIndex := lIndex;
+      cb_ApplyUpdatesMethodsChange(nil);
+      EnablePanel(pnl_ApplyUpdatesOptions,false);
+    end
+    else begin
+      EnablePanel(pnl_ApplyUpdatesOptions);
+      lIndex := cb_ApplyUpdatesMethods.Items.IndexOf('UpdateData');
+      if lIndex = -1 then cb_ApplyUpdatesMethods.Text := '';
+      cb_ApplyUpdatesMethods.ItemIndex := lIndex;
+      cb_ApplyUpdatesMethodsChange(nil);
+    end;
+
+    fManuallySelectedMethods := false;
+  end;
+end;
+
+procedure TDADataTableEditorForm.FillParameters(iMethodCombo, iParamCombo:TComboBox; iParamEdit:TEdit);
+var
+  lIndex:integer;
+  lMethod:TRODLOperation;
+  i:integer;
+begin
+  iParamCombo.Items.Clear();
+
+  lIndex := iMethodCombo.ItemIndex;
+  if lIndex > -1 then begin
+    lMethod := (fMethods.Objects[lIndex] as TRODLOperation);
+
+    iParamCombo.ItemIndex := -1;
+    iParamCombo.Text := '';
+    iParamEdit.Text := '';
+    for i := 0 to lMethod.Count-1 do begin
+      if (lMethod.Items[i].Flag in [fIn, fInOut]) and (lMethod.Items[i].DataType = DataTypeNames[rtString]) then begin
+        iParamCombo.Items.Add(lMethod.Items[i].Name);
+      end;
+    end;
+    //if iParamCombo.Enabled then begin
+      if (iParamCombo.Items.Count > 0) then begin
+        iParamCombo.ItemIndex := 0;
+        iParamEdit.Text := cb_DataSets.Text;
+        EnablePanel(iParamEdit.Parent as TPanel);
+      end
+      else begin
+        iParamEdit.Text := '';
+        EnablePanel(iParamEdit.Parent as TPanel,false);
+      end;
+    //end
+  end;
+end;
+
+
+procedure TDADataTableEditorForm.cb_GetSchemaMethodsChange(Sender: TObject);
+begin
+  FillParameters(cb_GetSchemaMethods, cb_GetSchemaParams, ed_GetSchemaValue);
+end;
+
+procedure TDADataTableEditorForm.cb_GetDataMethodsChange(Sender: TObject);
+begin
+  FillParameters(cb_GetDataMethods, cb_GetDataParams, ed_GetDataValue);
+end;
+
+procedure TDADataTableEditorForm.cb_ApplyUpdatesMethodsChange(Sender: TObject);
+begin
+  FillParameters(cb_ApplyUpdatesMethods, cb_ApplyUpdatesParams, ed_ApplyUpdatesValue);
+end;
+
+procedure TDADataTableEditorForm.cb_GetScriptsMethodsChange(Sender: TObject);
+begin
+  FillParameters(cb_GetScriptsMethods, cb_GetScriptsParams, ed_GetScriptsValue);
+end;
+
+
+procedure TDADataTableEditorForm.CreateParameters(iMethodCombo, iParamCombo:TComboBox; iParamEdit:TEdit; ioParams:TDARemoteRequestParams);
+var
+  lIndex:integer;
+  lMethod:TRODLOperation;
+  i:integer;
+  newparam : TDARemoteRequestParam;
+begin
+  ioParams.Clear();
+
+  lIndex := iMethodCombo.ItemIndex;
+  if lIndex > -1 then begin
+    lMethod := (fMethods.Objects[lIndex] as TRODLOperation);
+
+    // AleF: fixed this one too and moved up to be consistent with the RODL changes of ages ago
+    if Assigned(lMethod.Result) then begin
+      ioParams.Add.CopyRODLParam(lMethod.Result);
+    end;
+
+    for i := 0 to lMethod.Count-1 do begin
+      // AleF: fixed this up so that it uses a common copy function instead of duplicating it like it was before
+      newparam := ioParams.Add;
+      newparam.CopyRODLParam(lMethod.Items[i]);
+
+      // Sets defaults
+      with newparam do begin
+        if (Flag in [fIn, fInOut]) and (Name = iParamCombo.Text) then begin
+          AsString := ed_GetSchemaValue.Text;
+        end
+        else if SameText(Name, 'MaxRecords') then begin
+          AsInteger := -1;
+        end
+        else if SameText(Name, 'IncludeSchema') then begin
+          AsBoolean := false;
+        end
+        else if (newparam.DataType=rtString) and VarIsEmpty(newparam.AsVariant) then begin
+          newparam.AsVariant := '';
+        end;
+      end;
+    end;
+  end;
+end;
+
+procedure TDADataTableEditorForm.btn_OkClick(Sender: TObject);
+begin
+  CreateParameters(cb_GetSchemaMethods, cb_GetSchemaParams, ed_GetSchemaValue, fGetSchemaParams);
+  CreateParameters(cb_GetDataMethods, cb_GetDataParams, ed_GetDataValue, fGetDataParams);
+  CreateParameters(cb_ApplyUpdatesMethods, cb_ApplyUpdatesParams, ed_ApplyUpdatesValue, fApplyUpdateParams);
+  CreateParameters(cb_GetScriptsMethods, cb_GetScriptsParams, ed_GetScriptsValue, fGetScriptsParams);
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDADataTableMasterLinkWizardForm.dfm b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDADataTableMasterLinkWizardForm.dfm
new file mode 100644
index 0000000..a233e81
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDADataTableMasterLinkWizardForm.dfm	
@@ -0,0 +1,1457 @@
+inherited DADataTableMasterLinkWizard: TDADataTableMasterLinkWizard
+  Left = 259
+  Top = 205
+  Caption = '%s Master/Detail Wizard'
+  ClientHeight = 480
+  ClientWidth = 459
+  PixelsPerInch = 96
+  TextHeight = 13
+  inherited Bevel1: TBevel
+    Width = 459
+  end
+  object Label16: TLabel [1]
+    Left = 8
+    Top = 366
+    Width = 73
+    Height = 13
+    Caption = 'Mapping Mode:'
+  end
+  inherited Panel1: TPanel
+    Width = 459
+    inherited Image1: TImage
+      Picture.Data = {
+        055449636F6E0000010006003030000001000800A80E00006600000020200000
+        01000800A80800000E0F0000101000000100080068050000B617000030300000
+        01002000A82500001E1D00002020000001002000A8100000C642000010100000
+        01002000680400006E5300002800000030000000600000000100080000000000
+        0009000000000000000000000001000000010000000000000505050009090900
+        0D0D0D000B120B000E150E000A1D0A000C190C00121212001515150011181100
+        101D1000191919001D1D1D000A230A000F2A0F00053F0500093709000C3C0C00
+        14391400163D1600193019001A391A0021212100252525002028200029292900
+        2D2D2D0024342400293229003131310035353500333D3300393939003D3D3D00
+        07420700044B04000B420B000C450C000E480E00025902000C590C0016461600
+        104C10001353130014551400155815001D511D00185F180000660000006A0000
+        006E0000076F07000B620B00096709000E600E000E6D0E000072000000750000
+        00780000007D00000E7F0E00136C1300196119001B651B00204C20002C5C2E00
+        3640360039563B002571270028742C002B7730002D7A3300307C3700327F3B00
+        3C6240004040400045454500494949004D4D4D0049534A005151510056565600
+        595959005D5D5D004167460047644C0043694800456B4B00417A4900447D4E00
+        4F6252005D7965006161610065656500616B6400686868006E6E6E00637F6C00
+        7171710074747400787878007D7D7D000081000000850000008A0000008D0000
+        0A810A000A850A00009100000095000000990000049D05001284130007A00B00
+        0BA411000FA8170013AC1C001F91260022942A002D83350035823E002D973A00
+        16AF22001AB328001EB72E002FA13E0022BB340026BE39002AC23F0038844200
+        3B8745003D8949003C9B4C003C9C4D0032A442003BAE50003AB650003EB95500
+        408C4D00438F51004197510045925400479C580045A459005C826700629B7500
+        58A46D005DA9740060AC78002DC6440031CA4A0035CD500039D156003DD55B00
+        40D9610044DD670052C470004CDB710058DD7F0048E06D004CE4730050E87800
+        53EC7E005FDA860057EF84005BEA87005FED8C005BF38A005FF78F0086868600
+        959595009F9F9F00A2A2A200AAAAAA00ACACAC00000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000066511F090909090D4E60000000000000000000000000000000
+        00000000000000000000000000000000000000004E0D0D0D0D0D090909090309
+        0303031864000000000000000000000000000000000000000000000000000000
+        00001F1818180D0D0D090D09090909030303030303004E000000000000000000
+        000000000000000000000000000000001F1A1818180D180D0D0D0D0909090909
+        09030303030300035D000000000000000000000000000000000000000000641A
+        1A1A1A181818180D151327272727110F05090303030303000309000000000000
+        000000000000000000000000004E1F1A1F1A1A1A182A353B3B3B3A3A3A333333
+        332811070303030300000064000000000000000000000000000000004E1A1F1F
+        1A1F1A1A1C2D2D353B3B3B3A3A3A3A333333313124070303030300005D000000
+        00000000000000000000004E1F1F1F1F1F1A1F1A1A1A181A182A3A3B3A3A3333
+        333333313331100404000303005D0000000000000000000000004E1F1F211F1F
+        1A1F1A1F1A1A1A1A1818163B3B3A3A3A33333333313131280703030003006400
+        0000000000000000005D212121211F1F1F1F1A1F1A1A1A1A1A18183B3B3B3A3A
+        3A3331120F0B080507030303000300000000000000000000AB4E214E2121211F
+        1F1F1F1A1F1F1A1A1A181A673B3B3B3A3A270C09090909030303030303000309
+        00000000000000004E214E21212121211F1F1F1F1A1F1A1E1A1A1867673B3B3B
+        3A0D0D0C0C090909090303030303000051000000000000644E4E214E214E2121
+        211F1F1F1F1A1F1A1A1A1A1A181A16132D0D0D0C0C0909090903030303030303
+        000000000000004E4E4E4E44462121212121211F1F1F1F1E1F1A1A1A1A181818
+        0D0D0D0D0D0C09090909090310030003034E00000000664E4E214E76474E214E
+        2121211F1F1F1F1A1E1E1A1A1A1A181818170D0D0D0D090B0C080908310E0303
+        0003000000004E4E4E4E4B7C474E21214E2121211F1F1F1F1A1F1A1E1A1A1A18
+        1817180D0D0D0D0C09090908312403030303640000004E514E4E7A7D474E4E21
+        21212121211F1F1F1F1E1E1A1A1A1A18181817180D0D0D0C0C09090933310703
+        030309000066514E5150807F4A4E214E4E214E2121211F1F1F1E1E1F1E1A1A1A
+        1A181817180D0D0D0D0C0909333123030303030000515151515981804A4E4E21
+        4E21214E2121211F1F1F1E1A1E1E1A1A1A1A181817180D0D0D0D0C0C33332809
+        030303000051515151859681824E4E4E4E4E2121212121211F1F1F1F1E1E1E1A
+        1A1A1A181817180D0D0D0C0C33333109050303530053535151889796834E4E4E
+        214E4E214E21212121211F1F1E1E1E1E1A1A1A1A181817180D0D0D0C3333330F
+        0909034E00535351519A9797844E4E4E4E4E214E214E212121211F1F1F1E1E1E
+        1E1A1A1A1A181817180D0D0D3A3A33120909030900535353519B99988B4E4E4E
+        4E4E4E4E214E214E2121211F1F1F1E1E1E1E1A1A1A1A181817180D0D3A3A3327
+        0909090300535353539B9A998C514E4E4E4E4E214E214E21212121211F1F1F1E
+        1E1E1E1A1A1A1A181817180D3A3A3A270909090900535353539B9B9A8C51514E
+        4E4E4E4E4E4E214E214E2121211F1F1F1E1E1E1E1A1A1A1A181817293B3A3A27
+        09090909005D535353A19B9B905151514E4E4E4E4E4E4E214E21212121211F1F
+        1F1E1E2D382E2E2D3533673B3B3B3A270C0D0909005D5D5D539EA19C9B8F5B51
+        514E4E4E4E4E214E214E214E2121211F1F1F1E306A6A676A676767673B3B3B13
+        0D0C0D1F005D5D535D9DA1A09B9B9A8A8D8C58574B4E4E4E4E214E2121212121
+        1F1F1F306A6A6A6767676767673B3B150D0D0951005D5D5D5394A1A1A19B9B9A
+        99989796964E4E4E4E4E214E214E2121211F1F306D6A6A6A6A67676767673B18
+        0D0D0D6600665D5D5D5CA3A3A1A09C9B9A999897964E4E4E4E214E214E21214C
+        21211F306D6A6A6A676A6A67676735180D180D0000AC5D5D5D5D9FA3A2A1A09B
+        9B9A9998974E4E4E4E4E4E4E214E214C212121406D6D6A6A6A6A676A67672A18
+        180D0D00000060605D5D94A5A3A3A1A09C9B9A99985A4E4E4E4E4E4E4E214E21
+        4E2121716D6D6D6D6A6A676A67671A1818184E000000645D605D5FA6A5A3A2A1
+        A09B9B9A999886564E4E4E4E214E214E2142716F6F6F6D6D6A6A6A6A672E1A18
+        18180000000000605D605D95A8A5A3A3A1A09C9B9A9A989796877A4A4A787776
+        7474706F6F6F6D6D6D6D6A6A671E1A1A181F000000000064605D605DA4A8A5A3
+        A2A1A09B9B9A9998979681807F7D7D75757474726F6F6F6D6D6D6A6A411E1A1A
+        1A0000000000000060605D6062A7A8A5A3A3A1A09C9B9A9998979681807F7D7D
+        75757474726F6F6F6F6D6D381F1A1E1A21000000000000006660605D6092A8A8
+        A5A3A2A1A09B9B9A9998979681807F7D7D7575747472706F6F6D6C1F1F1E1E1A
+        000000000000000000606060605D92A9A8A5A3A3A1A09C9B9A9998979681807F
+        7D7D75757474726F6F6C1F1F1F1E1E5D000000000000000000AF606060606092
+        A8A8A5A3A2A1A09B9B9A9998979681807F7D7D757574747271431F1F1F1F2100
+        00000000000000000000AE6060605D6062A4A8A5A3A3A1A09C9B9A9998979681
+        807F7D7D757574454C214C1F1F4E00000000000000000000000000AA60606060
+        5D5D95A7A5A3A1A1A09C9B9A9998979681807F7D7D77444C4C214C4C4E000000
+        000000000000000000000000AE60606060605D5F949FA3A3A1A09B9B9A999897
+        9681807A4B4E4C4E214E1F4D0000000000000000000000000000000000AF6060
+        605D605D5D5D91939D9EA19B9B9A99898559504E4E4E4E4C4C4C5D0000000000
+        000000000000000000000000000000666060605D5D5D5D535353535353515151
+        514E514E4E4E4E4C4EAB00000000000000000000000000000000000000000000
+        006060605D5D5D5D5D535353535351515151514E4E4E4E640000000000000000
+        000000000000000000000000000000000000AF6460605D5D5D5D5D5353535353
+        515151514E660000000000000000000000000000000000000000000000000000
+        0000000000AE605D5D5D535D5353535353516600000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000FFFFE007FFFF0000FFFF0000
+        7FFF0000FFFC00001FFF0000FFF0000007FF0000FFC0000003FF0000FF800000
+        00FF0000FF000000007F0000FE000000003F0000FC000000001F0000F8000000
+        001F0000F0000000000F0000F000000000070000E000000000070000E0000000
+        00030000C000000000030000C000000000010000C00000000001000080000000
+        0001000080000000000100008000000000000000800000000000000080000000
+        0000000080000000000000008000000000000000800000000000000080000000
+        0000000080000000000000008000000000000000800000000000000080000000
+        000100008000000000010000C000000000010000C000000000030000E0000000
+        00030000E000000000070000F000000000070000F0000000000F0000F8000000
+        000F0000F8000000001F0000FC000000003F0000FE000000007F0000FF000000
+        00FF0000FF80000001FF0000FFE0000003FF0000FFF800000FFF0000FFFC0000
+        3FFF0000FFFF8001FFFF0000FFFFFFFFFFFF0000280000002000000040000000
+        0100080000000000000400000000000000000000000100000001000000000000
+        06060600090909000C0C0C000A170A000D130D000F160F000C190C0011111100
+        1414140012181200181818001D1D1D000C260C000B2B0B000E280E0007340700
+        0A310A00102B1000122D12001B2A1B0014311400153A1500173D17001D351D00
+        1E3F1E002222220026262600292929002E2E2E003232320034343400353E3500
+        3A3A3A003D3D3D00064906000A490A00025502000F560F001043100016451600
+        13531300016101000067000000690000006D0000066A0600046F04000B610B00
+        08650800096909000A6F0A00007200000075000000780000007D000015661500
+        147D150021442100335034003653380026732A003F5240004141410045454500
+        494949004E4E4E004558470049534B005151510056565600595959005D5D5D00
+        4369490044744C00427C4B00437C4D006262620065656500636D660068686800
+        6F6F6F0072727200777777007C7C7C000081000000860000008A0000008E0000
+        0A820A000091000000950000029B03001083110008A10C000DA6140013AC1D00
+        1F92270024972E002D8D3700299B350019B226001EB72E002EA03C0024BD3700
+        2AC23F003B8746003D934C0033A5430037AA4A002EB441003CAF510041844C00
+        4A835600428F50004197500041B3570041B4580046B85E005C83670063927200
+        57A36B004ABC650050B96B005FAB760062AE7C0030C8480037C6510035CE5100
+        3DCC59003BD3590042D1610041D9620046DF6B004CE4730052EA7C0058E68200
+        5DEC8A0057F085005DF58D008282820085858500888888008D8D8D0090909000
+        99999900A0A0A000ACACAC000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        000000000000000052400B0909091C4100000000000000000000000000000000
+        0000000000521B1B0B0B0B0B0909080808004100000000000000000000000000
+        0000008E1C1C1B1B1B1B0B0B0B09090808080008400000000000000000000000
+        0000471C1E1C1C1826313635352D2A230E080800000900000000000000000000
+        00401E1E1E1C1C192930363635352D2D312A1008080000000000000000000000
+        40211E1E1E1E1C1C1C1B18353535352D2D313125040800080000000000000051
+        212121211E1E1E1C1C1C1B3236363535230E0604040800000900000000000040
+        402121211E1E1E1E1C1C1C32363636270B0B0909080808080040000000004540
+        403C212121211E1E1E1C1C1C1B1817140B0B0B09090808010800000000004140
+        3E6140212121211E1E1E1C1C1C1B1B1B1A0B0B0B09040D1008004100004E4141
+        636240402121211E1E1E1E1C1C1C1B1B0B1B0B0B0B0B0D310808000000454144
+        6864404040212121211E1E1E1C1C1B1B1B1B1B0B0B0B0E31100808000045454A
+        696740402140212121211E1E1E1C1C1C1B1B0B1B0B0B152D2308014192454572
+        7E6C41404040402121211E1E1E1E1C1C1C1B1B1B1A0B152D2A09040B8C474775
+        806D414141404040212121211E1E1E1C1C1C1B1B0B1B15352D0909098C474776
+        826F41414140402140212121211E1E1E1C1C1C1B1B1A1735350B09098C47477A
+        847545454141404040402121211E1E1E1E3A1C1C18272D35350B0B098E4E477B
+        8583714541414141404040212121211E1E57575656365635360B0B0B004E4779
+        8685848174736A43404040402121211E1E5A575756563656321B0B40004E4E77
+        8786858482807E494140402140212121215A575757565636261B0B4E004E4E4E
+        88878685848280704141404040402121205A5A5A57575656181B1B00008E4E4E
+        7C8A87868584827F4C4441414040403B395C5A5A575757321B1B1B0000004E4E
+        4F898A8786858482807E6E676462605F5E5C5C5A5A5A573A1C1B520000005451
+        4E788B8A8786858482807E69686665605F5E5C5C5A5A381E1C1C000000000051
+        4E4E7D8B8A8786858482807E69686665605F5E5C5C591E1E1E8E000000000093
+        514E4E7D8B8A8786858482806969686665605F5E5D201E1E4700000000000000
+        8E514E4E78898A8786858482807E69686665603D212121400000000000000000
+        0091514E4E4F7C888786858482807E6968633E40402141000000000000000000
+        000093514E4E4E4E77797B7A7675727044414040405100000000000000000000
+        0000000054514E4E474E47474745454541414145000000000000000000000000
+        0000000000008E4E4E4E474747474645454F0000000000000000000000000000
+        000000000000000000008E8E8C8C9200000000000000000000000000FFF00FFF
+        FF8001FFFE00007FFC00003FF800001FF000000FE0000007E0000003C0000003
+        C000000180000001800000018000000000000000000000000000000000000000
+        0000000080000000800000008000000180000001C0000001C0000003E0000003
+        E0000007F000000FF800001FFC00003FFF0000FFFFC003FFFFFC1FFF28000000
+        1000000020000000010008000000000000010000000000000000000000010000
+        00010000000000000A0A0A00090F09000F0F0F000E140E000C190C0013131300
+        14141400111E1100181818001D1D1D00092F09000A390A00113311001B321B00
+        22222200262626002B2B2B0021322100263626003030300034343400313A3100
+        393939003E3E3E00044A04000B440B000E490E0005540500065A0600075F0700
+        124912001848180014531400155915001E521E00006A0000066A0600096A0900
+        0070000000750000007B0000146414001B631B00137B1300374A38002E713300
+        2B78300043434300474747004C4C4C004A534B00575757005A5A5A005E5E5E00
+        46634B004E6152004A7050004878510063636300656565006868680070707000
+        757575007D7D7D000081000000860000008C00000B860C000092000001980100
+        09A20E0014AD1F0022B1320020B830003A9048004B975B005D836800539F6600
+        63A679002BC442003AC0540037CF530039C8530042DA64004DE6750063C28300
+        59E8840059F187008A8A8A009191910098989800AAAAAA000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000003D110906033400000000000000003E11121F1B1A0C0503
+        1500000000003615151220252828241902060000004018181514112129250D05
+        0403150000312E1815151511120E0909060B03005A3349311818151111101009
+        091C04343E3950313118151515111010091E0C03364C52323131181815111110
+        101E1A06364E5438323131181515232226291B09594D5554534B311818182B43
+        42421F095C3D575554513731312D2C454342123D003D4F58555452504A484745
+        452A1100005C3D5658555452504A484744163D0000005B3D4F5755545250492F
+        183600000000005C3D3D4D4E4C3A33314000000000000000005C5936363E5A00
+        00000000F81F0000E0070000C003000080010000800100000000000000000000
+        000000000000000000000000000000008001000080010000C0030000E0070000
+        F81F000028000000300000006000000001002000000000008025000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        000000000000000000000000000000001E1E1E0F1C1C1C4F1B1B1B8F191919BF
+        171717DF161616FF141414FF131313FF111111FF0F0F0FEF0E0E0EBF0D0D0D9F
+        0B0B0B6F0A0A0A2F000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        000000002424240F2323235F212121CF1F1F1FFF1E1E1EFF1C1C1CFF1A1A1AFF
+        191919FF171717FF161616FF141414FF131313FF111111FF0F0F0FFF0E0E0EFF
+        0C0C0CFF0B0B0BFF090909DF0808088F0707071F000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        000000000000000000000000000000000000000000000000000000002929290F
+        2727277F262626EF242424FF222222FF212121FF1F1F1FFF1E1E1EFF1C1C1CFF
+        1A1A1AFF191919FF171717FF161616FF141414FF131313FF111111FF0F0F0FFF
+        0E0E0EFF0C0C0CFF0B0B0BFF090909FF080808FF060606BF0505053F00000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000002C2C2C5F2A2A2AEF
+        292929FF272727FF262626FF242424FF222222FF212121FF1F1F1FFF1E1E1EFF
+        1C1C1CFF1A1A1AFF191919FF171717FF161616FF141414FF131313FF111111FF
+        0F0F0FFF0E0E0EFF0C0C0CFF0B0B0BFF090909FF080808FF060606FF0505059F
+        0505050F00000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        000000000000000000000000000000003131310F2F2F2FAF2E2E2EFF2C2C2CFF
+        2A2A2AFF292929FF272727FF262626FF242424FF222222FF212121FF193019FF
+        143914FF0E480EFF0D460DFF0C450CFF0B430BFF0C3C0CFF0F2A0FFF111811FF
+        111111FF0F0F0FFF0E0E0EFF0C0C0CFF0B0B0BFF090909FF080808FF060606FF
+        040404EF0404044F000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000003434342F323232DF303030FF2F2F2FFF2E2E2EFF
+        2C2C2CFF2A2A2AFF292929FF272727FF174717FF0B620BFF027702FF007A00FF
+        007800FF007600FF007400FF007300FF007100FF006F00FF006D00FF006B00FF
+        035903FF093709FF0D1A0DFF0E0E0EFF0C0C0CFF0B0B0BFF090909FF080808FF
+        060606FF040404FF0303038F0000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        00000000000000003737372F353535EF343434FF323232FF303030FF2F2F2FFF
+        2E2E2EFF2C2C2CFF2A2A2AFF243424FF145414FF135313FF096709FF007C00FF
+        007A00FF007800FF007600FF007400FF007300FF007100FF006F00FF006D00FF
+        006B00FF006900FF006700FF044B04FF0B1E0BFF0C0C0CFF0B0B0BFF090909FF
+        080808FF060606FF040404FF0303039F00000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        000000003A3A3A2F383838EF373737FF353535FF343434FF323232FF303030FF
+        2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF262626FF242424FF
+        164416FF027502FF007800FF007600FF007400FF007300FF007100FF006F00FF
+        006D00FF006B00FF006900FF006700FF006600FF053F05FF0B120BFF0B0B0BFF
+        090909FF080808FF060606FF040404FF0303039F000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        3D3D3D2F3C3C3CEF3A3A3AFF383838FF373737FF353535FF343434FF323232FF
+        303030FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF262626FF
+        242424FF1A391AFF007A00FF007800FF007600FF007400FF007300FF007100FF
+        006F00FF006D00FF006B00FF006900FF006700FF006600FF015A01FF0A1D0AFF
+        0B0B0BFF090909FF080808FF060606FF040404FF0303038F0000000000000000
+        000000000000000000000000000000000000000000000000000000004141410F
+        3F3F3FCF3D3D3DFF3C3C3CFF3A3A3AFF383838FF373737FF353535FF343434FF
+        323232FF303030FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF
+        262626FF242424FF007C00FF007A00FF007800FF007600FF007400FF007300FF
+        007100FF036403FF0B410BFF0F2A0FFF101D10FF111111FF0E150EFF0C190CFF
+        0C0C0CFF0B0B0BFF090909FF080808FF060606FF040404FF0404044F00000000
+        000000000000000000000000000000000000000000000000000000004242428F
+        404040FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF383838FF373737FF353535FF
+        343434FF323232FF303030FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF
+        272727FF262626FF007E00FF007C00FF007A00FF007800FF007600FF007400FF
+        0D460DFF191919FF171717FF161616FF141414FF131313FF111111FF0F0F0FFF
+        0E0E0EFF0C0C0CFF0B0B0BFF090909FF080808FF060606FF040404EF0505050F
+        0000000000000000000000000000000000000000000000004545453F444444FF
+        424242FF404040FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF383838FF373737FF
+        353535FF343434FF323232FF303030FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF
+        292929FF272727FF008000FF007E00FF007C00FF007A00FF007800FF007600FF
+        1C1C1CFF1A1A1AFF191919FF171717FF161616FF141414FF131313FF111111FF
+        0F0F0FFF0E0E0EFF0C0C0CFF0B0B0BFF090909FF080808FF060606FF050505AF
+        000000000000000000000000000000000000000000000000464646BF454545FF
+        444444FF424242FF404040FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF383838FF
+        373737FF353535FF343434FF323232FF303030FF2F2F2FFF2E2E2EFF2C2C2CFF
+        2A2A2AFF292929FF272727FF262626FF242424FF1A391AFF163D16FF104C10FF
+        1E1E1EFF1C1C1CFF1A1A1AFF191919FF171717FF161616FF141414FF131313FF
+        111111FF0F0F0FFF0E0E0EFF0C0C0CFF0B0B0BFF090909FF080808FF060606FF
+        0505053F000000000000000000000000000000004A4A4A3F484848FF474747FF
+        454545FF444444FF39563BFF28742CFF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF
+        383838FF373737FF353535FF343434FF323232FF303030FF2F2F2FFF2E2E2EFF
+        2C2C2CFF2A2A2AFF292929FF272727FF262626FF242424FF222222FF212121FF
+        1F1F1FFF1E1E1EFF1C1C1CFF1A1A1AFF191919FF171717FF161616FF141414FF
+        131313FF111111FF0F0F0FFF053F05FF0C0C0CFF0B0B0BFF090909FF080808FF
+        060606BF000000000000000000000000000000004B4B4BBF4A4A4AFF484848FF
+        474747FF454545FF22942AFF2B7730FF404040FF3F3F3FFF3D3D3DFF3C3C3CFF
+        3A3A3AFF383838FF373737FF353535FF343434FF323232FF303030FF2F2F2FFF
+        2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF262626FF242424FF222222FF
+        212121FF1F1F1FFF1E1E1EFF1C1C1CFF1A1A1AFF191919FF171717FF161616FF
+        141414FF131313FF111111FF006600FF0A230AFF0C0C0CFF0B0B0BFF090909FF
+        080808FF0707072F00000000000000004F4F4F1F4D4D4DFF4B4B4BFF4A4A4AFF
+        484848FF3C6240FF1AB328FF2D7A33FF424242FF404040FF3F3F3FFF3D3D3DFF
+        3C3C3CFF3A3A3AFF383838FF373737FF353535FF343434FF323232FF303030FF
+        2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF262626FF242424FF
+        222222FF212121FF1F1F1FFF1E1E1EFF1C1C1CFF1A1A1AFF191919FF171717FF
+        161616FF141414FF131313FF006700FF044B04FF0E0E0EFF0C0C0CFF0B0B0BFF
+        090909FF0808088F00000000000000005050506F4F4F4FFF4D4D4DFF4B4B4BFF
+        4A4A4AFF2D973AFF1EB72EFF307C37FF444444FF424242FF404040FF3F3F3FFF
+        3D3D3DFF3C3C3CFF3A3A3AFF383838FF373737FF353535FF343434FF323232FF
+        303030FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF262626FF
+        242424FF222222FF212121FF1F1F1FFF1E1E1EFF1C1C1CFF1A1A1AFF191919FF
+        171717FF161616FF141414FF006900FF006700FF0D1A0DFF0E0E0EFF0C0C0CFF
+        0B0B0BFF090909EF0000000000000000525252BF505050FF4F4F4FFF4D4D4DFF
+        49534AFF26BE39FF22BB34FF327F3BFF454545FF444444FF424242FF404040FF
+        3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF383838FF373737FF353535FF343434FF
+        323232FF303030FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF
+        262626FF242424FF222222FF212121FF1F1F1FFF1E1E1EFF1C1C1CFF1A1A1AFF
+        191919FF171717FF161616FF006B00FF006900FF074207FF0F0F0FFF0E0E0EFF
+        0C0C0CFF0B0B0BFF0A0A0A2F00000000535353FF525252FF505050FF4F4F4FFF
+        417A49FF2AC23FFF26BE39FF35823EFF474747FF454545FF444444FF424242FF
+        404040FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF383838FF373737FF353535FF
+        343434FF323232FF303030FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF
+        272727FF262626FF242424FF222222FF212121FF1F1F1FFF1E1E1EFF1C1C1CFF
+        1A1A1AFF191919FF171717FF006D00FF006B00FF035903FF111111FF0F0F0FFF
+        0E0E0EFF0C0C0CFF0B0B0B6F5656563F555555FF535353FF525252FF505050FF
+        3C9B4CFF2DC644FF2AC23FFF388442FF484848FF474747FF454545FF444444FF
+        424242FF404040FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF383838FF373737FF
+        353535FF343434FF323232FF303030FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF
+        292929FF272727FF262626FF242424FF222222FF212121FF1F1F1FFF1E1E1EFF
+        1C1C1CFF1A1A1AFF191919FF006F00FF006D00FF006B00FF111811FF111111FF
+        0F0F0FFF0E0E0EFF0C0C0CAF5858584F575757FF555555FF535353FF525252FF
+        3BAE50FF31CA4AFF2DC644FF3B8745FF4A4A4AFF484848FF474747FF454545FF
+        444444FF424242FF404040FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF383838FF
+        373737FF353535FF343434FF323232FF303030FF2F2F2FFF2E2E2EFF2C2C2CFF
+        2A2A2AFF292929FF272727FF262626FF242424FF222222FF212121FF1F1F1FFF
+        1E1E1EFF1C1C1CFF1A1A1AFF007100FF006F00FF006D00FF0F2A0FFF131313FF
+        111111FF0F0F0FFF0E0E0EBF5959597F585858FF575757FF555555FF535353FF
+        39D156FF35CD50FF31CA4AFF3D8949FF4B4B4BFF4A4A4AFF484848FF474747FF
+        454545FF444444FF424242FF404040FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF
+        383838FF373737FF353535FF343434FF323232FF303030FF2F2F2FFF2E2E2EFF
+        2C2C2CFF2A2A2AFF292929FF272727FF262626FF242424FF222222FF212121FF
+        1F1F1FFF1E1E1EFF1C1C1CFF007300FF007100FF006F00FF0C3C0CFF141414FF
+        131313FF111111FF0F0F0FFF5B5B5B7F595959FF585858FF575757FF555555FF
+        3DD55BFF39D156FF35CD50FF408C4DFF4D4D4DFF4B4B4BFF4A4A4AFF484848FF
+        474747FF454545FF444444FF424242FF404040FF3F3F3FFF3D3D3DFF3C3C3CFF
+        3A3A3AFF383838FF373737FF353535FF343434FF323232FF303030FF2F2F2FFF
+        2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF262626FF242424FF222222FF
+        212121FF1F1F1FFF1E1E1EFF007400FF007300FF007100FF0B430BFF161616FF
+        141414FF131313FF111111FF5C5C5C7F5B5B5BFF595959FF585858FF575757FF
+        40D961FF3DD55BFF39D156FF438F51FF4F4F4FFF4D4D4DFF4B4B4BFF4A4A4AFF
+        484848FF474747FF454545FF444444FF424242FF404040FF3F3F3FFF3D3D3DFF
+        3C3C3CFF3A3A3AFF383838FF373737FF353535FF343434FF323232FF303030FF
+        2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF262626FF242424FF
+        222222FF212121FF1F1F1FFF007600FF007400FF007300FF0C450CFF171717FF
+        161616FF141414FF131313FF5E5E5E7F5D5D5DFF5B5B5BFF595959FF585858FF
+        44DD67FF40D961FF3DD55BFF459254FF505050FF4F4F4FFF4D4D4DFF4B4B4BFF
+        4A4A4AFF484848FF474747FF454545FF444444FF424242FF404040FF3F3F3FFF
+        3D3D3DFF3C3C3CFF3A3A3AFF383838FF373737FF353535FF343434FF323232FF
+        303030FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF262626FF
+        242424FF202820FF0C590CFF007800FF007600FF007400FF0D460DFF191919FF
+        171717FF161616FF141414FF6060607F5E5E5EFF5D5D5DFF5B5B5BFF595959FF
+        48E06DFF44DD67FF40D961FF45A459FF525252FF505050FF4F4F4FFF4D4D4DFF
+        4B4B4BFF4A4A4AFF484848FF474747FF454545FF444444FF424242FF404040FF
+        3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF383838FF373737FF353535FF343434FF
+        323232FF303030FF1D511DFF0E6D0EFF155A15FF155815FF145614FF0E600EFF
+        076F07FF007E00FF007C00FF007A00FF007800FF007600FF0E480EFF1A1A1AFF
+        191919FF171717FF161616FF6161617F606060FF5E5E5EFF5D5D5DFF5B5B5BFF
+        4CDB71FF48E06DFF44DD67FF40D961FF479C58FF4F6252FF505050FF4F4F4FFF
+        4D4D4DFF4B4B4BFF4A4A4AFF484848FF474747FF454545FF444444FF424242FF
+        404040FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF383838FF373737FF353535FF
+        343434FF323232FF185F18FF008B00FF008900FF008700FF008500FF008400FF
+        008200FF008000FF007E00FF007C00FF007A00FF007800FF143914FF1C1C1CFF
+        1A1A1AFF191919FF171717DF6262623F616161FF606060FF5E5E5EFF5D5D5DFF
+        52C470FF4CE473FF48E06DFF44DD67FF40D961FF3DD55BFF3EB955FF419751FF
+        408C4DFF456B4BFF436948FF416746FF484848FF474747FF454545FF444444FF
+        424242FF404040FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF383838FF373737FF
+        353535FF343434FF196019FF008D00FF008B00FF008900FF008700FF008500FF
+        008400FF008200FF008000FF007E00FF007C00FF007A00FF193019FF1E1E1EFF
+        1C1C1CFF1A1A1AFF191919BF6464641F636363FF616161FF606060FF5E5E5EFF
+        58A46DFF50E878FF4CE473FF48E06DFF44DD67FF40D961FF3DD55BFF39D156FF
+        35CD50FF31CA4AFF2DC644FF2AC23FFF4A4A4AFF484848FF474747FF454545FF
+        444444FF424242FF404040FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF383838FF
+        373737FF353535FF1A621AFF008F00FF008D00FF008B00FF008900FF008700FF
+        008500FF008400FF008200FF008000FF007E00FF027702FF212121FF1F1F1FFF
+        1E1E1EFF1C1C1CFF1B1B1B8F00000000656565DF636363FF616161FF606060FF
+        5D7965FF53EC7EFF50E878FF4CE473FF48E06DFF44DD67FF40D961FF3DD55BFF
+        39D156FF35CD50FF31CA4AFF2DC644FF4B4B4BFF4A4A4AFF484848FF474747FF
+        454545FF444444FF424242FF404040FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF
+        383838FF373737FF1B641BFF009100FF008F00FF008D00FF008B00FF008900FF
+        008700FF008500FF008400FF008200FF008000FF0B620BFF222222FF212121FF
+        1F1F1FFF1E1E1EFF1C1C1C5F000000006666669F656565FF636363FF616161FF
+        606060FF58DD7FFF53EC7EFF50E878FF4CE473FF48E06DFF44DD67FF40D961FF
+        3DD55BFF39D156FF35CD50FF31CA4AFF4D4D4DFF4B4B4BFF4A4A4AFF484848FF
+        474747FF454545FF444444FF424242FF404040FF3F3F3FFF3D3D3DFF3C3C3CFF
+        3A3A3AFF383838FF1B661BFF009300FF009100FF008F00FF008D00FF008B00FF
+        008900FF008700FF008500FF008400FF008200FF174717FF242424FF222222FF
+        212121FF1F1F1FFF1E1E1E0F000000006767674F666666FF656565FF636363FF
+        616161FF5DA974FF57EF84FF53EC7EFF50E878FF4CE473FF48E06DFF44DD67FF
+        40D961FF3DD55BFF39D156FF35CD50FF447D4EFF4D4D4DFF4B4B4BFF4A4A4AFF
+        484848FF474747FF454545FF444444FF424242FF404040FF3F3F3FFF3D3D3DFF
+        3C3C3CFF3A3A3AFF0E7F0EFF009500FF009300FF009100FF008F00FF008D00FF
+        008B00FF008900FF008700FF008500FF027E02FF272727FF262626FF242424FF
+        222222FF212121CF000000000000000000000000686868EF666666FF656565FF
+        636363FF616B64FF5BEA87FF57EF84FF53EC7EFF50E878FF4CE473FF48E06DFF
+        44DD67FF40D961FF3DD55BFF39D156FF35CD50FF3C9C4DFF47644CFF4B4B4BFF
+        4A4A4AFF484848FF474747FF454545FF444444FF424242FF404040FF3F3F3FFF
+        2C5C2EFF128413FF009900FF009700FF009500FF009300FF009100FF008F00FF
+        008D00FF008B00FF008900FF008700FF155815FF292929FF272727FF262626FF
+        242424FF2323235F0000000000000000000000006969697F686868FF666666FF
+        656565FF636363FF60AC78FF5BF38AFF57EF84FF53EC7EFF50E878FF4CE473FF
+        48E06DFF44DD67FF40D961FF3DD55BFF39D156FF35CD50FF31CA4AFF2DC644FF
+        32A442FF2FA13EFF35823EFF327F3BFF2D8335FF22942BFF1F9126FF0FA817FF
+        0BA411FF07A00BFF049D05FF009900FF009700FF009500FF009300FF009100FF
+        008F00FF008D00FF008B00FF028402FF293229FF2A2A2AFF292929FF272727FF
+        262626EF2424240F0000000000000000000000006A6A6A1F696969EF686868FF
+        666666FF656565FF636363FF5FDA86FF5BF38AFF57EF84FF53EC7EFF50E878FF
+        4CE473FF48E06DFF44DD67FF40D961FF3DD55BFF39D156FF35CD50FF31CA4AFF
+        2DC644FF2AC23FFF26BE39FF22BB34FF1EB72EFF1AB328FF16AF22FF13AC1CFF
+        0FA817FF0BA411FF07A00BFF049D05FF009900FF009700FF009500FF009300FF
+        009100FF008F00FF008D00FF204C20FF2E2E2EFF2C2C2CFF2A2A2AFF292929FF
+        2727277F00000000000000000000000000000000000000006A6A6A7F696969FF
+        686868FF666666FF656565FF637F6CFF5FED8CFF5BF38AFF57EF84FF53EC7EFF
+        50E878FF4CE473FF48E06DFF44DD67FF40D961FF3DD55BFF39D156FF35CD50FF
+        31CA4AFF2DC644FF2AC23FFF26BE39FF22BB34FF1EB72EFF1AB328FF16AF22FF
+        13AC1CFF0FA817FF0BA411FF07A00BFF049D05FF009900FF009700FF009500FF
+        009300FF009100FF136C13FF303030FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AEF
+        2929290F00000000000000000000000000000000000000006B6B6B0F6A6A6ADF
+        696969FF686868FF666666FF656565FF629B75FF5FF78FFF5BF38AFF57EF84FF
+        53EC7EFF50E878FF4CE473FF48E06DFF44DD67FF40D961FF3DD55BFF39D156FF
+        35CD50FF31CA4AFF2DC644FF2AC23FFF26BE39FF22BB34FF1EB72EFF1AB328FF
+        16AF22FF13AC1CFF0FA817FF0BA411FF07A00BFF049D05FF009900FF009700FF
+        009500FF0A810AFF343434FF323232FF303030FF2F2F2FFF2E2E2EFF2C2C2C6F
+        000000000000000000000000000000000000000000000000000000006B6B6B3F
+        6A6A6AFF696969FF686868FF666666FF656565FF629B75FF5FF78FFF5BF38AFF
+        57EF84FF53EC7EFF50E878FF4CE473FF48E06DFF44DD67FF40D961FF3DD55BFF
+        39D156FF35CD50FF31CA4AFF2DC644FF2AC23FFF26BE39FF22BB34FF1EB72EFF
+        1AB328FF16AF22FF13AC1CFF0FA817FF0BA411FF07A00BFF049D05FF009900FF
+        0A850AFF333D33FF353535FF343434FF323232FF303030FF2F2F2FBF00000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        6B6B6B8F6A6A6AFF696969FF686868FF666666FF656565FF629B75FF5FF78FFF
+        5BF38AFF57EF84FF53EC7EFF50E878FF4CE473FF48E06DFF44DD67FF40D961FF
+        3DD55BFF39D156FF35CD50FF31CA4AFF2DC644FF2AC23FFF26BE39FF22BB34FF
+        1EB72EFF1AB328FF16AF22FF13AC1CFF0FA817FF0BA411FF07A00BFF128413FF
+        364036FF383838FF373737FF353535FF343434FF323232EF3131310F00000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        000000006B6B6B9F6A6A6AFF696969FF686868FF666666FF656565FF637F6CFF
+        5FDA86FF5BF38AFF57EF84FF53EC7EFF50E878FF4CE473FF48E06DFF44DD67FF
+        40D961FF3DD55BFF39D156FF35CD50FF31CA4AFF2DC644FF2AC23FFF26BE39FF
+        22BB34FF1EB72EFF1AB328FF16AF22FF13AC1CFF0FA817FF257127FF3D3D3DFF
+        3C3C3CFF3A3A3AFF383838FF373737FF353535EF3434342F0000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        000000006B6B6B0F6B6B6BCF6A6A6AFF696969FF686868FF666666FF656565FF
+        636363FF60AC78FF5BEA87FF57EF84FF53EC7EFF50E878FF4CE473FF48E06DFF
+        44DD67FF40D961FF3DD55BFF39D156FF35CD50FF31CA4AFF2DC644FF2AC23FFF
+        26BE39FF22BB34FF1EB72EFF1AB328FF22942AFF39563BFF404040FF3F3F3FFF
+        3D3D3DFF3C3C3CFF3A3A3AFF383838EF3737372F000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        00000000000000006B6B6B0F6B6B6B9F6A6A6AFF696969FF686868FF666666FF
+        656565FF636363FF616B64FF5DA974FF58DD7FFF53EC7EFF50E878FF4CE473FF
+        48E06DFF44DD67FF40D961FF3DD55BFF39D156FF35CD50FF31CA4AFF2DC644FF
+        2AC23FFF26BE39FF2D973AFF3C6240FF454545FF444444FF424242FF404040FF
+        3F3F3FFF3D3D3DFF3C3C3CEF3A3A3A2F00000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        000000000000000000000000000000006B6B6B8F6A6A6AFF696969FF686868FF
+        666666FF656565FF636363FF616161FF606060FF5C8267FF58A46DFF52C470FF
+        4CDB71FF48E06DFF44DD67FF40D961FF3DD55BFF39D156FF3AB650FF3C9B4CFF
+        417A49FF49534AFF4A4A4AFF484848FF474747FF454545FF444444FF424242FF
+        404040FF3F3F3FCF3D3D3D2F0000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        00000000000000000000000000000000000000006B6B6B3F6A6A6ADF696969FF
+        686868FF666666FF656565FF636363FF616161FF606060FF5E5E5EFF5D5D5DFF
+        5B5B5BFF595959FF585858FF575757FF555555FF535353FF525252FF505050FF
+        4F4F4FFF4D4D4DFF4B4B4BFF4A4A4AFF484848FF474747FF454545FF444444FF
+        4242428F4141410F000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000006B6B6B0F6A6A6A7F
+        696969FF686868FF666666FF656565FF636363FF616161FF606060FF5E5E5EFF
+        5D5D5DFF5B5B5BFF595959FF585858FF575757FF555555FF535353FF525252FF
+        505050FF4F4F4FFF4D4D4DFF4B4B4BFF4A4A4AFF484848FF464646BF4545453F
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        6A6A6A1F6969698F686868EF666666FF656565FF636363FF616161FF606060FF
+        5E5E5EFF5D5D5DFF5B5B5BFF595959FF585858FF575757FF555555FF535353FF
+        525252FF505050FF4F4F4FFF4D4D4DFF4B4B4BBF4A4A4A3F0000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000006767674F6666669F656565EF636363FF616161FF
+        606060FF5E5E5EFF5D5D5DFF5B5B5BFF595959FF585858FF575757FF555555FF
+        535353FF525252BF5050506F4F4F4F1F00000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000006464641F6262623F
+        6161617F6060607F5E5E5E7F5C5C5C7F5B5B5B7F5959597F5858585F5656563F
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        000000000000000000000000FFFF8001FFFF0000FFFC00003FFF0000FFF00000
+        0FFF0000FFE0000003FF0000FF80000001FF0000FF00000000FF0000FE000000
+        007F0000FC000000003F0000F8000000001F0000F0000000000F0000F0000000
+        00070000E000000000070000E000000000030000C000000000030000C0000000
+        0001000080000000000100008000000000010000800000000000000080000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000800000000000000080000000
+        000000008000000000010000C000000000010000C000000000010000C0000000
+        00030000E000000000030000E000000000070000F0000000000F0000F8000000
+        000F0000FC000000001F0000FC000000003F0000FE000000007F0000FF800000
+        00FF0000FFC0000001FF0000FFE0000007FF0000FFF800001FFF0000FFFF0000
+        7FFF0000FFFFE007FFFF00002800000020000000400000000100200000000000
+        8010000000000000000000000000000000000000000000000000000000000000
+        000000000000000000000000000000000000000000000000000000002121210F
+        1F1F1F5F1D1D1D9F1A1A1ACF181818FF151515FF131313FF101010FF0E0E0EDF
+        0C0C0CBF0A0A0A6F0808081F0000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        00000000000000000000000000000000000000002929291F2626269F232323FF
+        212121FF1F1F1FFF1C1C1CFF1A1A1AFF181818FF151515FF131313FF101010FF
+        0E0E0EFF0C0C0CFF090909FF070707BF0606063F000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        000000000000000000000000000000002D2D2D8F2A2A2AFF282828FF262626FF
+        232323FF212121FF1F1F1FFF1C1C1CFF1A1A1AFF181818FF151515FF131313FF
+        101010FF0E0E0EFF0C0C0CFF090909FF070707FF050505BF0404041F00000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        00000000000000003434341F323232CF2F2F2FFF2D2D2DFF2A2A2AFF282828FF
+        1E371EFF0F560FFF086408FF007800FF007500FF007200FF006F00FF026102FF
+        064906FF0B2B0BFF0E0E0EFF0C0C0CFF090909FF070707FF050505EF0303034F
+        0000000000000000000000000000000000000000000000000000000000000000
+        000000003939392F363636EF343434FF323232FF2F2F2FFF2D2D2DFF2A2A2AFF
+        1E3F1EFF135313FF0B610BFF007A00FF007800FF007500FF007200FF006F00FF
+        006C00FF006900FF006100FF073407FF0C0C0CFF090909FF070707FF050505FF
+        0303035F00000000000000000000000000000000000000000000000000000000
+        3E3E3E0F3B3B3BEF393939FF363636FF343434FF323232FF2F2F2FFF2D2D2DFF
+        2A2A2AFF282828FF262626FF1D341DFF027502FF007800FF007500FF007200FF
+        006F00FF006C00FF006900FF006700FF025502FF0A170AFF090909FF070707FF
+        050505FF0303034F000000000000000000000000000000000000000000000000
+        404040BF3D3D3DFF3B3B3BFF393939FF363636FF343434FF323232FF2F2F2FFF
+        2D2D2DFF2A2A2AFF282828FF262626FF096709FF007A00FF007800FF007500FF
+        007200FF0A490AFF102B10FF121812FF0F160FFF0C190CFF0C0C0CFF090909FF
+        070707FF050505EF0404041F000000000000000000000000000000004444446F
+        424242FF404040FF3D3D3DFF3B3B3BFF393939FF363636FF343434FF323232FF
+        2F2F2FFF2D2D2DFF2A2A2AFF282828FF096909FF007D00FF007A00FF007800FF
+        104310FF1A1A1AFF181818FF151515FF131313FF101010FF0E0E0EFF0C0C0CFF
+        090909FF070707FF050505BF0000000000000000000000004A4A4A0F474747EF
+        444444FF424242FF365338FF3D3D3DFF3B3B3BFF393939FF363636FF343434FF
+        323232FF2F2F2FFF2D2D2DFF2A2A2AFF282828FF262626FF1D341DFF173D17FF
+        1B2A1BFF1C1C1CFF1A1A1AFF181818FF151515FF131313FF101010FF0D130DFF
+        0C0C0CFF090909FF070707FF0606063F00000000000000004B4B4B7F494949FF
+        474747FF3F5240FF1F9227FF404040FF3D3D3DFF3B3B3BFF393939FF363636FF
+        343434FF323232FF2F2F2FFF2D2D2DFF2A2A2AFF282828FF262626FF232323FF
+        212121FF1F1F1FFF1C1C1CFF1A1A1AFF181818FF151515FF131313FF0C260CFF
+        073407FF0C0C0CFF090909FF070707BF00000000000000004E4E4EDF4B4B4BFF
+        494949FF2D8D37FF24972EFF424242FF404040FF3D3D3DFF3B3B3BFF393939FF
+        363636FF343434FF323232FF2F2F2FFF2D2D2DFF2A2A2AFF282828FF262626FF
+        232323FF212121FF1F1F1FFF1C1C1CFF1A1A1AFF181818FF151515FF0E280EFF
+        006100FF0E0E0EFF0C0C0CFF090909FF0808081F5252522F505050FF4E4E4EFF
+        49534BFF24BD37FF299B35FF444444FF424242FF404040FF3D3D3DFF3B3B3BFF
+        393939FF363636FF343434FF323232FF2F2F2FFF2D2D2DFF2A2A2AFF282828FF
+        262626FF232323FF212121FF1F1F1FFF1C1C1CFF1A1A1AFF181818FF102B10FF
+        006900FF0A310AFF0E0E0EFF0C0C0CFF0A0A0A6F5555556F535353FF505050FF
+        44744CFF2AC23FFF2EA03CFF474747FF444444FF424242FF404040FF3D3D3DFF
+        3B3B3BFF393939FF363636FF343434FF323232FF2F2F2FFF2D2D2DFF2A2A2AFF
+        282828FF262626FF232323FF212121FF1F1F1FFF1C1C1CFF1A1A1AFF122D12FF
+        006C00FF064906FF101010FF0E0E0EFF0C0C0CBF5757578F555555FF535353FF
+        428F50FF30C848FF33A543FF494949FF474747FF444444FF424242FF404040FF
+        3D3D3DFF3B3B3BFF393939FF363636FF343434FF323232FF2F2F2FFF2D2D2DFF
+        2A2A2AFF282828FF262626FF232323FF212121FF1F1F1FFF1C1C1CFF143014FF
+        006F00FF026102FF131313FF101010FF0E0E0EEF595959BF575757FF555555FF
+        41B357FF35CE51FF37AA4AFF4B4B4BFF494949FF474747FF444444FF424242FF
+        404040FF3D3D3DFF3B3B3BFF393939FF363636FF343434FF323232FF2F2F2FFF
+        2D2D2DFF2A2A2AFF282828FF262626FF232323FF212121FF1F1F1FFF153215FF
+        007200FF006F00FF151515FF131313FF101010FF5C5C5CBF5A5A5AFF575757FF
+        46B85EFF3BD359FF3CAF51FF4E4E4EFF4B4B4BFF494949FF474747FF444444FF
+        424242FF404040FF3D3D3DFF3B3B3BFF393939FF363636FF343434FF323232FF
+        2F2F2FFF2D2D2DFF2A2A2AFF282828FF262626FF232323FF212121FF153A15FF
+        007500FF007200FF181818FF151515FF131313FF5E5E5EBF5C5C5CFF5A5A5AFF
+        4ABC65FF41D962FF41B458FF505050FF4E4E4EFF4B4B4BFF494949FF474747FF
+        444444FF424242FF404040FF3D3D3DFF3B3B3BFF393939FF363636FF343434FF
+        323232FF2F2F2FFF214421FF2A2A2AFF282828FF1E371EFF164516FF046F04FF
+        007800FF007500FF1A1A1AFF181818FF151515FF616161BF5F5F5FFF5C5C5CFF
+        50B96BFF46DF6BFF42D161FF4A8356FF505050FF4E4E4EFF4B4B4BFF494949FF
+        474747FF444444FF424242FF404040FF3D3D3DFF3B3B3BFF393939FF363636FF
+        343434FF323232FF008B00FF008900FF008600FF008300FF008000FF007D00FF
+        007A00FF007800FF1C1C1CFF1A1A1AFF181818FF6363637F616161FF5F5F5FFF
+        57A36BFF4CE473FF46DF6BFF41D962FF3DCC59FF3CAF51FF3D934CFF3B8746FF
+        455847FF474747FF444444FF424242FF404040FF3D3D3DFF3B3B3BFF393939FF
+        363636FF343434FF008E00FF008B00FF008900FF008600FF008300FF008000FF
+        007D00FF066A06FF1F1F1FFF1C1C1CFF1A1A1ACF6565655F636363FF616161FF
+        5C8367FF52EA7CFF4CE473FF46DF6BFF41D962FF3BD359FF35CE51FF30C848FF
+        436949FF494949FF474747FF444444FF424242FF404040FF3D3D3DFF3B3B3BFF
+        393939FF363636FF009100FF008E00FF008B00FF008900FF008600FF008300FF
+        008000FF0F560FFF212121FF1F1F1FFF1D1D1DAF6767671F666666FF636363FF
+        616161FF58E682FF52EA7CFF4CE473FF46DF6BFF41D962FF3BD359FF35CE51FF
+        41844CFF4B4B4BFF494949FF474747FF444444FF424242FF404040FF3D3D3DFF
+        3B3B3BFF353E35FF009400FF009100FF008E00FF008B00FF008900FF008600FF
+        008300FF1E371EFF232323FF212121FF1F1F1F5F00000000676767BF666666FF
+        636363FF5FAB76FF57F085FF52EA7CFF4CE473FF46DF6BFF41D962FF3BD359FF
+        37C651FF437C4DFF49534BFF494949FF474747FF444444FF424242FF404040FF
+        335034FF147D15FF009700FF009400FF009100FF008E00FF008B00FF008900FF
+        0A6F0AFF282828FF262626FF232323FF2121210F000000006A6A6A5F686868FF
+        666666FF636D66FF5DEC8AFF57F085FF52EA7CFF4CE473FF46DF6BFF41D962FF
+        3BD359FF35CE51FF30C848FF2EB441FF2EA03CFF299B35FF24972EFF13AC1DFF
+        0DA614FF08A10CFF029B03FF009700FF009400FF009100FF008E00FF008B00FF
+        214421FF2A2A2AFF282828FF2626269F0000000000000000000000006A6A6ADF
+        686868FF666666FF639272FF5DF58DFF57F085FF52EA7CFF4CE473FF46DF6BFF
+        41D962FF3BD359FF35CE51FF30C848FF2AC23FFF24BD37FF1EB72EFF19B226FF
+        13AC1DFF0DA614FF08A10CFF029B03FF009700FF009400FF009100FF156615FF
+        2F2F2FFF2D2D2DFF2A2A2AFF2929291F0000000000000000000000006B6B6B3F
+        6A6A6AFF686868FF666666FF62AE7CFF5DF58DFF57F085FF52EA7CFF4CE473FF
+        46DF6BFF41D962FF3BD359FF35CE51FF30C848FF2AC23FFF24BD37FF1EB72EFF
+        19B226FF13AC1DFF0DA614FF08A10CFF029B03FF009700FF0A820AFF343434FF
+        323232FF2F2F2FFF2D2D2D8F0000000000000000000000000000000000000000
+        6B6B6B8F6A6A6AFF686868FF666666FF62AE7CFF5DF58DFF57F085FF52EA7CFF
+        4CE473FF46DF6BFF41D962FF3BD359FF35CE51FF30C848FF2AC23FFF24BD37FF
+        1EB72EFF19B226FF13AC1DFF0DA614FF08A10CFF108311FF353E35FF363636FF
+        343434FF323232CF3030300F0000000000000000000000000000000000000000
+        000000006B6B6BBF6A6A6AFF686868FF666666FF639272FF5DEC8AFF57F085FF
+        52EA7CFF4CE473FF46DF6BFF41D962FF3BD359FF35CE51FF30C848FF2AC23FFF
+        24BD37FF1EB72EFF19B226FF13AC1DFF26732AFF3D3D3DFF3B3B3BFF393939FF
+        363636EF3434341F000000000000000000000000000000000000000000000000
+        000000006B6B6B0F6B6B6BAF6A6A6AFF686868FF666666FF636D66FF5FAB76FF
+        58E682FF52EA7CFF4CE473FF46DF6BFF41D962FF3BD359FF35CE51FF30C848FF
+        2AC23FFF24BD37FF2D8D37FF3F5240FF424242FF404040FF3D3D3DFF3B3B3BEF
+        3939392F00000000000000000000000000000000000000000000000000000000
+        0000000000000000000000006B6B6B8F6A6A6AFF686868FF666666FF636363FF
+        616161FF5C8367FF57A36BFF50B96BFF4ABC65FF46B85EFF41B357FF419750FF
+        427C4BFF49534BFF494949FF474747FF444444FF424242FF404040BF3E3E3E0F
+        0000000000000000000000000000000000000000000000000000000000000000
+        000000000000000000000000000000006B6B6B3F6A6A6ADF686868FF666666FF
+        636363FF616161FF5F5F5FFF5C5C5CFF5A5A5AFF575757FF555555FF535353FF
+        505050FF4E4E4EFF4B4B4BFF494949FF474747EF4444446F0000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000006A6A6A5F676767BF
+        666666FF636363FF616161FF5F5F5FFF5C5C5CFF5A5A5AFF575757FF555555FF
+        535353FF505050FF4E4E4EDF4B4B4B7F4A4A4A0F000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        6767671F6565655F6363637F616161BF5E5E5EBF5C5C5CBF595959BF5757578F
+        5555556F5252522F000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000FFC003FFFF0000FFFE00003F
+        F800001FF000000FE0000007E0000003C0000003800000018000000180000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        00000000000000008000000080000001C0000001C0000003E0000003F0000007
+        F000000FFC00001FFE00007FFF8000FFFFE007FF280000001000000020000000
+        0100200000000000400400000000000000000000000000000000000000000000
+        0000000000000000000000002727273F222222AF1D1D1DEF181818FF131313FF
+        0F0F0FFF0B0B0BAF0707075F0000000000000000000000000000000000000000
+        000000003535350F303030AF2B2B2BFF213221FF124912FF0E490EFF0B440BFF
+        0A390AFF0C190CFF0A0A0AFF060606CF0404041F000000000000000000000000
+        3E3E3E0F393939CF343434FF303030FF263626FF184818FF066A06FF007500FF
+        007000FF006A00FF044A04FF090F09FF050505EF0404041F0000000000000000
+        424242AF3E3E3EFF393939FF343434FF303030FF2B2B2BFF145314FF007B00FF
+        017001FF113311FF111E11FF0E140EFF0A0A0AFF060606CF000000004B4B4B3F
+        474747FF2E7133FF3E3E3EFF393939FF343434FF303030FF2B2B2BFF223222FF
+        1B321BFF1D1D1DFF181818FF131313FF092F09FF0A0A0AFF0707075F5050509F
+        4A534BFF22B132FF434343FF3E3E3EFF393939FF343434FF303030FF2B2B2BFF
+        262626FF222222FF1D1D1DFF181818FF055405FF0C190CFF0B0B0BAF555555CF
+        4A7050FF2BC442FF474747FF434343FF3E3E3EFF393939FF343434FF303030FF
+        2B2B2BFF262626FF222222FF1D1D1DFF065A06FF0A390AFF0F0F0FFF5A5A5AFF
+        4B975BFF37CF53FF4C4C4CFF474747FF434343FF3E3E3EFF393939FF343434FF
+        303030FF2B2B2BFF262626FF222222FF075F07FF0B440BFF131313FF5F5F5FFF
+        539F66FF42DA64FF4E6152FF4C4C4CFF474747FF434343FF3E3E3EFF393939FF
+        343434FF1E521EFF155915FF096A09FF007B00FF0E490EFF181818FF636363BF
+        5D8368FF4DE675FF42DA64FF39C853FF3A9048FF474747FF434343FF3E3E3EFF
+        393939FF1B631BFF008C00FF008600FF008100FF124912FF1D1D1DFF6868688F
+        646464FF59E884FF4DE675FF42DA64FF3AC054FF46634BFF474747FF434343FF
+        374A38FF137B13FF009200FF008C00FF008600FF213221FF222222AF6A6A6A1F
+        686868FF63A679FF59F187FF4DE675FF42DA64FF37CF53FF2BC442FF20B830FF
+        14AD1FFF09A20EFF019801FF009200FF146414FF2B2B2BFF2727273F00000000
+        6A6A6A8F686868FF63C283FF59F187FF4DE675FF42DA64FF37CF53FF2BC442FF
+        20B830FF14AD1FFF09A20EFF0B860CFF313A31FF303030BF0000000000000000
+        000000006A6A6AAF686868FF63A679FF59E884FF4DE675FF42DA64FF37CF53FF
+        2BC442FF22B132FF2B7830FF3E3E3EFF393939CF3535350F0000000000000000
+        00000000000000006A6A6A8F686868FF646464FF5D8368FF539F66FF4B975BFF
+        487851FF4A534BFF474747FF424242AF3E3E3E0F000000000000000000000000
+        0000000000000000000000006A6A6A1F6868688F636363BF5F5F5FFF5A5A5AFF
+        555555CF5050509F4B4B4B3F00000000000000000000000000000000F00F0000
+        C003000080010000800100000000000000000000000000000000000000000000
+        00000000000000000000000080010000C0010000E0030000F00F0000}
+    end
+    inherited Label1: TLabel
+      Width = 221
+      Caption = 'Data Table Master/Detail Setup Wizard'
+    end
+    inherited Label2: TLabel
+      Width = 295
+      Caption = 'This wizard will help you configure a master/detail relationship'
+    end
+  end
+  inherited pc_Pages: TPageControl
+    Width = 459
+    Height = 401
+    ActivePage = ts_MasterSource
+    inherited ts_Welcome: TTabSheet
+      inherited Label3: TLabel
+        Width = 313
+        Caption = 'Welcome to the Data Table Master/Detail Setup Wizard'
+      end
+      inherited Label4: TLabel
+        Width = 350
+        Height = 39
+        Caption = 
+          'This wizard will help you set up a Master/Detail relationship by' +
+          ' choosing a Master Source for the selected data table and defini' +
+          'ng how the relationshop between master and detail tables is mapp' +
+          'ed.'
+        WordWrap = True
+      end
+      object Label24: TLabel
+        Left = 24
+        Top = 72
+        Width = 218
+        Height = 13
+        Caption = 'This wizard will affect the following properties'
+      end
+      object Label25: TLabel
+        Left = 32
+        Top = 88
+        Width = 73
+        Height = 13
+        Caption = '- MasterSource'
+      end
+      object Label26: TLabel
+        Left = 32
+        Top = 104
+        Width = 145
+        Height = 13
+        Caption = '- MasterFields and DetailFields'
+      end
+      object Label27: TLabel
+        Left = 32
+        Top = 136
+        Width = 120
+        Height = 13
+        Caption = '- MasterParamsMappings'
+      end
+      object Label28: TLabel
+        Left = 32
+        Top = 152
+        Width = 120
+        Height = 13
+        Caption = '- MasterRequestMapping'
+      end
+      object Label29: TLabel
+        Left = 32
+        Top = 120
+        Width = 106
+        Height = 13
+        Caption = '- MasterMappingMode'
+      end
+    end
+    object ts_MasterSource: TTabSheet [1]
+      Caption = 'ts_MasterSource'
+      ImageIndex = 6
+      object Label8: TLabel
+        Left = 8
+        Top = 8
+        Width = 105
+        Height = 13
+        Caption = 'Pick MasterSource'
+        Font.Charset = DEFAULT_CHARSET
+        Font.Color = clWindowText
+        Font.Height = -11
+        Font.Name = 'Tahoma'
+        Font.Style = [fsBold]
+        ParentFont = False
+      end
+      object Label9: TLabel
+        Left = 24
+        Top = 24
+        Width = 286
+        Height = 13
+        Caption = 'Select the data table to use as master source for this table:'
+      end
+      object Label10: TLabel
+        Left = 8
+        Top = 80
+        Width = 126
+        Height = 13
+        Caption = 'Choose Mapping Mode'
+        Font.Charset = DEFAULT_CHARSET
+        Font.Color = clWindowText
+        Font.Height = -11
+        Font.Name = 'Tahoma'
+        Font.Style = [fsBold]
+        ParentFont = False
+      end
+      object Label17: TLabel
+        Left = 24
+        Top = 96
+        Width = 371
+        Height = 13
+        Caption = 
+          'Select what method you want to use fetch detail data for your ma' +
+          'ster source'
+      end
+      object lbl_Params1: TLabel
+        Left = 42
+        Top = 204
+        Width = 354
+        Height = 39
+        Caption = 
+          'Master key fields will be passed as parameters when fetching det' +
+          'ail data. Use this if you'#39're talking to a standard DA server, an' +
+          'd have defined Parameters in data table inside your schema.'
+        WordWrap = True
+      end
+      object lbl_Params2: TLabel
+        Left = 42
+        Top = 248
+        Width = 320
+        Height = 26
+        Caption = 
+          'Your detail data will be fetched via the standard DataRequestCal' +
+          'l, just like any data table.'
+        WordWrap = True
+      end
+      object lbl_Method1: TLabel
+        Left = 42
+        Top = 324
+        Width = 358
+        Height = 13
+        Caption = 
+          'Data will be retrieved using a custom method you provided in you' +
+          'r service.'
+      end
+      object lbl_Method2: TLabel
+        Left = 42
+        Top = 344
+        Width = 345
+        Height = 22
+        Caption = 
+          'This option is only available if the detail table uses a separat' +
+          'e RemoteDataAdapter component with a custom DataRequestCall.'
+        Font.Charset = DEFAULT_CHARSET
+        Font.Color = clGrayText
+        Font.Height = -9
+        Font.Name = 'Tahoma'
+        Font.Style = []
+        ParentFont = False
+        WordWrap = True
+      end
+      object lbl_Params3: TLabel
+        Left = 42
+        Top = 282
+        Width = 298
+        Height = 11
+        Caption = 
+          'This option is only available if your detail data table defines ' +
+          'parameters.'
+        Font.Charset = DEFAULT_CHARSET
+        Font.Color = clGrayText
+        Font.Height = -9
+        Font.Name = 'Tahoma'
+        Font.Style = []
+        ParentFont = False
+        WordWrap = True
+      end
+      object lbl_Where1: TLabel
+        Left = 42
+        Top = 140
+        Width = 291
+        Height = 13
+        Caption = 'A where clause will be passed to retrieve filtered detail data.'
+      end
+      object lbl_Where2: TLabel
+        Left = 42
+        Top = 160
+        Width = 175
+        Height = 11
+        Caption = 'Recommended for Version 5.0 and above.'
+        Font.Charset = DEFAULT_CHARSET
+        Font.Color = clGrayText
+        Font.Height = -9
+        Font.Name = 'Tahoma'
+        Font.Style = []
+        ParentFont = False
+      end
+      object cb_DataSources: TComboBox
+        Left = 24
+        Top = 40
+        Width = 289
+        Height = 21
+        Style = csDropDownList
+        ItemHeight = 13
+        TabOrder = 0
+        OnChange = cb_DataSourcesChange
+      end
+      object rb_Where: TRadioButton
+        Left = 24
+        Top = 120
+        Width = 177
+        Height = 13
+        Caption = 'Using automatic WHERE clauses'
+        TabOrder = 1
+        OnClick = cb_DataSourcesChange
+      end
+      object rb_Params: TRadioButton
+        Left = 24
+        Top = 184
+        Width = 129
+        Height = 13
+        Caption = 'Using data parameters'
+        TabOrder = 2
+        OnClick = cb_DataSourcesChange
+      end
+      object rb_Method: TRadioButton
+        Left = 24
+        Top = 304
+        Width = 153
+        Height = 13
+        Caption = 'Using a custom method call'
+        TabOrder = 3
+        OnClick = cb_DataSourcesChange
+      end
+    end
+    object ts_Fields: TTabSheet [2]
+      Caption = 'ts_Fields'
+      ImageIndex = 3
+      object labMasterFields: TLabel
+        Left = 24
+        Top = 80
+        Width = 67
+        Height = 13
+        Caption = '&Master Fields:'
+        FocusControl = lbMaster
+      end
+      object labDetailFields: TLabel
+        Left = 256
+        Top = 80
+        Width = 61
+        Height = 13
+        Caption = '&Detail Fields:'
+        FocusControl = lbDetail
+      end
+      object Label13: TLabel
+        Left = 24
+        Top = 311
+        Width = 64
+        Height = 13
+        Caption = 'MasterFields:'
+        FocusControl = eMasterFields
+      end
+      object Label14: TLabel
+        Left = 24
+        Top = 335
+        Width = 58
+        Height = 13
+        Caption = 'DetailFields:'
+        FocusControl = eDetailFields
+      end
+      object Label18: TLabel
+        Left = 8
+        Top = 8
+        Width = 114
+        Height = 13
+        Caption = 'Master/Detail Fields'
+        Font.Charset = DEFAULT_CHARSET
+        Font.Color = clWindowText
+        Font.Height = -11
+        Font.Name = 'Tahoma'
+        Font.Style = [fsBold]
+        ParentFont = False
+      end
+      object Label19: TLabel
+        Left = 24
+        Top = 24
+        Width = 323
+        Height = 13
+        Caption = 
+          'Please select the fields that describe the Master/Detail relatio' +
+          'nship.'
+      end
+      object lbMaster: TListBox
+        Left = 22
+        Top = 96
+        Width = 164
+        Height = 209
+        ItemHeight = 13
+        MultiSelect = True
+        TabOrder = 0
+      end
+      object lbDetail: TListBox
+        Left = 254
+        Top = 96
+        Width = 164
+        Height = 209
+        ItemHeight = 13
+        MultiSelect = True
+        TabOrder = 1
+      end
+      object eMasterFields: TEdit
+        Left = 97
+        Top = 308
+        Width = 321
+        Height = 21
+        TabOrder = 2
+        Text = 'fdsfdsdsf'
+        OnChange = OnFieldMappingChange
+      end
+      object eDetailFields: TEdit
+        Left = 97
+        Top = 332
+        Width = 321
+        Height = 21
+        TabOrder = 3
+        Text = 'fdsfdsdsf'
+        OnChange = OnFieldMappingChange
+      end
+      object bbAddFieldMapping: TBitBtn
+        Left = 190
+        Top = 96
+        Width = 60
+        Height = 25
+        Caption = '&Add'
+        TabOrder = 4
+        OnClick = bbAddFieldMappingClick
+        Glyph.Data = {
+          36030000424D3603000000000000360000002800000010000000100000000100
+          18000000000000030000120B0000120B00000000000000000000FF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF03
+          5D05035D05FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FF035D055BF791058C0D035D05FF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF035D055B
+          F79105950E035D05FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FF035D055BF79105920D035D05FF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF035D055B
+          F79106950F035D05FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          035D05035D05035D05035D05035D055BF7910C9C18035D05035D05035D05035D
+          05035D05FF00FFFF00FFFF00FF035D055BF7913BDA6930CF572AC64D21B83C17
+          A62B119F210D9E1C0A9A1506920E05930D058B0D035D05FF00FFFF00FF035D05
+          5BF7915BF7915BF7915BF7915BF7915BF79118A92F5BF7915BF7915BF7915BF7
+          915BF791035D05FF00FFFF00FFFF00FF035D05035D05035D05035D05035D055B
+          F79125BC42035D05035D05035D05035D05035D05FF00FFFF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FF035D055BF79130CE57035D05FF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF035D055B
+          F7913BD968035D05FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FF035D055BF79148EB7F035D05FF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF035D055B
+          F7915BF791035D05FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FFFF00FF035D05035D05FF00FFFF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+          00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
+      end
+      object BitBtn4: TBitBtn
+        Left = 190
+        Top = 280
+        Width = 59
+        Height = 25
+        Caption = '&Clear'
+        TabOrder = 5
+        OnClick = BitBtn4Click
+        Glyph.Data = {
+          36030000424D3603000000000000360000002800000010000000100000000100
+          18000000000000030000120B0000120B00000000000000000000FF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFF2BB81F3C48AF2BC81EF
+          B072EEAF6EEFB275FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          FF00FFFBEBBDFEF3C9FBDEACF3C990FBB67EFFB47DFCCA99FFD9ADFED9A7F0B5
+          77FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFEFAD3FEF7CCFBDCA9EBCA91A9
+          B86E84AB542B912057A743EAF3C7FCE9BDEEAD6FFF00FFFF00FFFF00FFFF00FF
+          EDA565F3C28AFCF0C4FCE5B5FBD09F2C9622007B00058206067F043DA335FEF2
+          D0F0B173FF00FFFF00FFFF00FFFF00FFEEAB6DEDA767EFB070F6C990FFD8AC2E
+          9823006E006ABF6BFFF0EA48A138A3AF5EFCAF74FF00FFFF00FFFF00FFFF00FF
+          F2B479F2B77EF0B277F0AC6FFBB57E7AB46041A6416FBC69FFFFFFF4FEFBBCBB
+          79F3AA6BFF00FFFF00FFFF00FFFF00FFF7C292FAC598F8C293F8C090F3BF8AC2
+          D5A5FFFFFFD9EED556B1534BAF4BB8BC79F8B075FF00FFFF00FFFF00FFF6C792
+          FCD4ADFCD4ACFCD0A9FCD0A9FFD4B55DA94680C780E0F2DE27982400700082B0
+          5BFFBD90EEAC6DFF00FFFF00FFF6C792FFEAC4FEE3BCFEE2BAFEE0B8FFE0BAD9
+          D9AC0A8209188A16037F0300790077B45DFFCEAAEEAC6DFF00FFFF00FFFADDAB
+          FFFBD5FFF4CCFFF3CAFFF0C9FFEFC5FFF2D1B5D5982A96242B99249ACB87B5D1
+          95FFE0BAF2B77AFF00FFFF00FFFCEFC4FFFFD8FFFBD3FFFCD4FFFBD3FFFBD4FF
+          FCD4FFFFE1FFFFEBFFFFE7FFFFE0FFF8D7FFF4CBF3C086FF00FFFF00FFFEF4CB
+          FFFFDDFFFFD9FFFFD9FFFFDAFFFED7FEF6CCF8DAA3F4C07DF4C17FF7D8A3FEF2
+          C5FFFFDDF3C991FF00FFFF00FFF4CC96F8DEAFF8DDACF7D8A6F6CF99F3BF80EF
+          AC66EB9D4FEB9C4CEB9F55F0AC6EFAC087FCD3A0FAC089FF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFEDA354EFAB68F7BC83FABF
+          88FABC83FABC83FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+          00FFFF00FFFF00FFFF00FFFAC088FAC088FAC088FF00FFFF00FF}
+      end
+    end
+    object ts_MethodCall: TTabSheet [3]
+      Caption = 'ts_MethodCall'
+      ImageIndex = 4
+      object labMasterFields2: TLabel
+        Left = 24
+        Top = 80
+        Width = 67
+        Height = 13
+        Caption = '&Master Fields:'
+      end
+      object labDataReqParams: TLabel
+        Left = 256
+        Top = 80
+        Width = 122
+        Height = 13
+        Caption = 'DataRequestCall &Params:'
+        FocusControl = lbDataReqParams
+      end
+      object Label7: TLabel
+        Left = 24
+        Top = 286
+        Width = 273
+        Height = 13
+        Caption = 'Mapp&ings (Detail'#39's DataRequestCall Param=MasterField):'
+        FocusControl = mMappings
+      end
+      object Label20: TLabel
+        Left = 8
+        Top = 8
+        Width = 190
+        Height = 13
+        Caption = 'Map Fields to Method Parameters'
+        Font.Charset = DEFAULT_CHARSET
+        Font.Color = clWindowText
+        Font.Height = -11
+        Font.Name = 'Tahoma'
+        Font.Style = [fsBold]
+        ParentFont = False
+      end
+      object Label21: TLabel
+        Left = 24
+        Top = 24
+        Width = 396
+        Height = 39
+        Caption = 
+          'Select how the master fields map to the parameters passed to the' +
+          ' customs GetDataCall you are using to fetch Detail data. Ideally' +
+          ', all fields from the previous page (i.e. all fields involved in' +
+          ' the M/D relationship) should be mapped here.'
+        WordWrap = True
+      end
+      object lbMaster2: TListBox
+        Left = 22
+        Top = 96
+        Width = 164
+        Height = 185
+        ItemHeight = 13
+        MultiSelect = True
+        TabOrder = 0
+      end
+      object lbDataReqParams: TListBox
+        Left = 254
+        Top = 96
+        Width = 164
+        Height = 185
+        ItemHeight = 13
+        MultiSelect = True
+        TabOrder = 1
+      end
+      object mMappings: TMemo
+        Left = 22
+        Top = 302
+        Width = 395
+        Height = 60
+        ScrollBars = ssVertical
+        TabOrder = 2
+      end
+      object bbAddDataReqMapping: TBitBtn
+        Left = 190
+        Top = 96
+        Width = 60
+        Height = 25
+        Caption = '&Add'
+        TabOrder = 3
+        OnClick = bbAddDataReqMappingClick
+        Glyph.Data = {
+          36030000424D3603000000000000360000002800000010000000100000000100
+          18000000000000030000120B0000120B00000000000000000000FF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF03
+          5D05035D05FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FF035D055BF791058C0D035D05FF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF035D055B
+          F79105950E035D05FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FF035D055BF79105920D035D05FF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF035D055B
+          F79106950F035D05FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          035D05035D05035D05035D05035D055BF7910C9C18035D05035D05035D05035D
+          05035D05FF00FFFF00FFFF00FF035D055BF7913BDA6930CF572AC64D21B83C17
+          A62B119F210D9E1C0A9A1506920E05930D058B0D035D05FF00FFFF00FF035D05
+          5BF7915BF7915BF7915BF7915BF7915BF79118A92F5BF7915BF7915BF7915BF7
+          915BF791035D05FF00FFFF00FFFF00FF035D05035D05035D05035D05035D055B
+          F79125BC42035D05035D05035D05035D05035D05FF00FFFF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FF035D055BF79130CE57035D05FF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF035D055B
+          F7913BD968035D05FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FF035D055BF79148EB7F035D05FF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF035D055B
+          F7915BF791035D05FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FFFF00FF035D05035D05FF00FFFF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+          00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
+      end
+      object bbClearDataReqMapping: TBitBtn
+        Left = 190
+        Top = 256
+        Width = 59
+        Height = 25
+        Caption = '&Clear'
+        TabOrder = 4
+        OnClick = bbClearDataReqMappingClick
+        Glyph.Data = {
+          36030000424D3603000000000000360000002800000010000000100000000100
+          18000000000000030000120B0000120B00000000000000000000FF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFF2BB81F3C48AF2BC81EF
+          B072EEAF6EEFB275FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          FF00FFFBEBBDFEF3C9FBDEACF3C990FBB67EFFB47DFCCA99FFD9ADFED9A7F0B5
+          77FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFEFAD3FEF7CCFBDCA9EBCA91A9
+          B86E84AB542B912057A743EAF3C7FCE9BDEEAD6FFF00FFFF00FFFF00FFFF00FF
+          EDA565F3C28AFCF0C4FCE5B5FBD09F2C9622007B00058206067F043DA335FEF2
+          D0F0B173FF00FFFF00FFFF00FFFF00FFEEAB6DEDA767EFB070F6C990FFD8AC2E
+          9823006E006ABF6BFFF0EA48A138A3AF5EFCAF74FF00FFFF00FFFF00FFFF00FF
+          F2B479F2B77EF0B277F0AC6FFBB57E7AB46041A6416FBC69FFFFFFF4FEFBBCBB
+          79F3AA6BFF00FFFF00FFFF00FFFF00FFF7C292FAC598F8C293F8C090F3BF8AC2
+          D5A5FFFFFFD9EED556B1534BAF4BB8BC79F8B075FF00FFFF00FFFF00FFF6C792
+          FCD4ADFCD4ACFCD0A9FCD0A9FFD4B55DA94680C780E0F2DE27982400700082B0
+          5BFFBD90EEAC6DFF00FFFF00FFF6C792FFEAC4FEE3BCFEE2BAFEE0B8FFE0BAD9
+          D9AC0A8209188A16037F0300790077B45DFFCEAAEEAC6DFF00FFFF00FFFADDAB
+          FFFBD5FFF4CCFFF3CAFFF0C9FFEFC5FFF2D1B5D5982A96242B99249ACB87B5D1
+          95FFE0BAF2B77AFF00FFFF00FFFCEFC4FFFFD8FFFBD3FFFCD4FFFBD3FFFBD4FF
+          FCD4FFFFE1FFFFEBFFFFE7FFFFE0FFF8D7FFF4CBF3C086FF00FFFF00FFFEF4CB
+          FFFFDDFFFFD9FFFFD9FFFFDAFFFED7FEF6CCF8DAA3F4C07DF4C17FF7D8A3FEF2
+          C5FFFFDDF3C991FF00FFFF00FFF4CC96F8DEAFF8DDACF7D8A6F6CF99F3BF80EF
+          AC66EB9D4FEB9C4CEB9F55F0AC6EFAC087FCD3A0FAC089FF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFEDA354EFAB68F7BC83FABF
+          88FABC83FABC83FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+          00FFFF00FFFF00FFFF00FFFAC088FAC088FAC088FF00FFFF00FF}
+      end
+    end
+    object ts_Params: TTabSheet [4]
+      Caption = 'ts_Params'
+      ImageIndex = 5
+      object Label11: TLabel
+        Left = 24
+        Top = 80
+        Width = 74
+        Height = 13
+        Caption = 'Master'#39's Fields:'
+      end
+      object Label12: TLabel
+        Left = 256
+        Top = 80
+        Width = 39
+        Height = 13
+        Caption = 'Params:'
+        FocusControl = lbParams
+      end
+      object Label15: TLabel
+        Left = 24
+        Top = 286
+        Width = 190
+        Height = 13
+        Caption = 'Mappings (Detail'#39's Param=MasterField):'
+        FocusControl = mParamsMappings
+      end
+      object Label22: TLabel
+        Left = 8
+        Top = 8
+        Width = 208
+        Height = 13
+        Caption = 'Map Fields to Data Table Parameters'
+        Font.Charset = DEFAULT_CHARSET
+        Font.Color = clWindowText
+        Font.Height = -11
+        Font.Name = 'Tahoma'
+        Font.Style = [fsBold]
+        ParentFont = False
+      end
+      object Label23: TLabel
+        Left = 24
+        Top = 24
+        Width = 399
+        Height = 39
+        Caption = 
+          'Select how the master fields map to the parameters of your detai' +
+          'l data. Ideally, all fields from the previous page (i.e. all fie' +
+          'lds involved in the M/D relationship) should be mapped here.'
+        WordWrap = True
+      end
+      object lbMaster3: TListBox
+        Left = 22
+        Top = 96
+        Width = 164
+        Height = 185
+        ItemHeight = 13
+        MultiSelect = True
+        TabOrder = 0
+      end
+      object lbParams: TListBox
+        Left = 254
+        Top = 96
+        Width = 164
+        Height = 185
+        ItemHeight = 13
+        MultiSelect = True
+        TabOrder = 1
+      end
+      object mParamsMappings: TMemo
+        Left = 22
+        Top = 302
+        Width = 395
+        Height = 60
+        ScrollBars = ssVertical
+        TabOrder = 2
+      end
+      object bbAddParamMappingXXX: TBitBtn
+        Left = 190
+        Top = 96
+        Width = 60
+        Height = 25
+        Caption = '&Add'
+        TabOrder = 3
+        OnClick = bbAddParamMappingXXXClick
+        Glyph.Data = {
+          36030000424D3603000000000000360000002800000010000000100000000100
+          18000000000000030000120B0000120B00000000000000000000FF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF03
+          5D05035D05FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FF035D055BF791058C0D035D05FF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF035D055B
+          F79105950E035D05FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FF035D055BF79105920D035D05FF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF035D055B
+          F79106950F035D05FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          035D05035D05035D05035D05035D055BF7910C9C18035D05035D05035D05035D
+          05035D05FF00FFFF00FFFF00FF035D055BF7913BDA6930CF572AC64D21B83C17
+          A62B119F210D9E1C0A9A1506920E05930D058B0D035D05FF00FFFF00FF035D05
+          5BF7915BF7915BF7915BF7915BF7915BF79118A92F5BF7915BF7915BF7915BF7
+          915BF791035D05FF00FFFF00FFFF00FF035D05035D05035D05035D05035D055B
+          F79125BC42035D05035D05035D05035D05035D05FF00FFFF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FF035D055BF79130CE57035D05FF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF035D055B
+          F7913BD968035D05FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FF035D055BF79148EB7F035D05FF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF035D055B
+          F7915BF791035D05FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FFFF00FF035D05035D05FF00FFFF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+          00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
+      end
+      object bbClearParamMappingsXXX: TBitBtn
+        Left = 190
+        Top = 256
+        Width = 59
+        Height = 25
+        Caption = '&Clear'
+        TabOrder = 4
+        OnClick = bbClearParamMappingsXXXClick
+        Glyph.Data = {
+          36030000424D3603000000000000360000002800000010000000100000000100
+          18000000000000030000120B0000120B00000000000000000000FF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFF2BB81F3C48AF2BC81EF
+          B072EEAF6EEFB275FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          FF00FFFBEBBDFEF3C9FBDEACF3C990FBB67EFFB47DFCCA99FFD9ADFED9A7F0B5
+          77FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFEFAD3FEF7CCFBDCA9EBCA91A9
+          B86E84AB542B912057A743EAF3C7FCE9BDEEAD6FFF00FFFF00FFFF00FFFF00FF
+          EDA565F3C28AFCF0C4FCE5B5FBD09F2C9622007B00058206067F043DA335FEF2
+          D0F0B173FF00FFFF00FFFF00FFFF00FFEEAB6DEDA767EFB070F6C990FFD8AC2E
+          9823006E006ABF6BFFF0EA48A138A3AF5EFCAF74FF00FFFF00FFFF00FFFF00FF
+          F2B479F2B77EF0B277F0AC6FFBB57E7AB46041A6416FBC69FFFFFFF4FEFBBCBB
+          79F3AA6BFF00FFFF00FFFF00FFFF00FFF7C292FAC598F8C293F8C090F3BF8AC2
+          D5A5FFFFFFD9EED556B1534BAF4BB8BC79F8B075FF00FFFF00FFFF00FFF6C792
+          FCD4ADFCD4ACFCD0A9FCD0A9FFD4B55DA94680C780E0F2DE27982400700082B0
+          5BFFBD90EEAC6DFF00FFFF00FFF6C792FFEAC4FEE3BCFEE2BAFEE0B8FFE0BAD9
+          D9AC0A8209188A16037F0300790077B45DFFCEAAEEAC6DFF00FFFF00FFFADDAB
+          FFFBD5FFF4CCFFF3CAFFF0C9FFEFC5FFF2D1B5D5982A96242B99249ACB87B5D1
+          95FFE0BAF2B77AFF00FFFF00FFFCEFC4FFFFD8FFFBD3FFFCD4FFFBD3FFFBD4FF
+          FCD4FFFFE1FFFFEBFFFFE7FFFFE0FFF8D7FFF4CBF3C086FF00FFFF00FFFEF4CB
+          FFFFDDFFFFD9FFFFD9FFFFDAFFFED7FEF6CCF8DAA3F4C07DF4C17FF7D8A3FEF2
+          C5FFFFDDF3C991FF00FFFF00FFF4CC96F8DEAFF8DDACF7D8A6F6CF99F3BF80EF
+          AC66EB9D4FEB9C4CEB9F55F0AC6EFAC087FCD3A0FAC089FF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFEDA354EFAB68F7BC83FABF
+          88FABC83FABC83FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+          00FFFF00FFFF00FFFF00FFFAC088FAC088FAC088FF00FFFF00FF}
+      end
+    end
+    inherited ts_Finish: TTabSheet
+      inherited Label5: TLabel
+        Width = 51
+        Caption = 'That'#39's It!'
+      end
+      inherited Label6: TLabel
+        Width = 217
+        Caption = 'Your Master/Detail relationship is now set up.'
+      end
+      inherited lv_Options: TListView
+        Top = 184
+        Visible = False
+      end
+    end
+  end
+  inherited Panel2: TPanel
+    Top = 445
+    Width = 459
+    inherited btn_Finish: TBitBtn
+      Left = 379
+      OnClick = btn_FinishClick
+    end
+    inherited btn_Next: TBitBtn
+      Left = 379
+    end
+    inherited btn_Back: TBitBtn
+      Left = 299
+    end
+  end
+end
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDADataTableMasterLinkWizardForm.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDADataTableMasterLinkWizardForm.pas
new file mode 100644
index 0000000..0c0d22f
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDADataTableMasterLinkWizardForm.pas	
@@ -0,0 +1,393 @@
+unit uDADataTableMasterLinkWizardForm;
+
+interface
+
+uses
+  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
+  Dialogs, StdCtrls, ComCtrls, Buttons, uDADataTable, uEWWizard, ExtCtrls,
+  DesignIntf;
+
+type
+  TDADataTableMasterLinkWizard = class(TEWWizardForm)
+    ts_Fields: TTabSheet;
+    ts_MethodCall: TTabSheet;
+    ts_Params: TTabSheet;
+    labMasterFields: TLabel;
+    labDetailFields: TLabel;
+    Label13: TLabel;
+    Label14: TLabel;
+    lbMaster: TListBox;
+    lbDetail: TListBox;
+    eMasterFields: TEdit;
+    eDetailFields: TEdit;
+    bbAddFieldMapping: TBitBtn;
+    BitBtn4: TBitBtn;
+    labMasterFields2: TLabel;
+    labDataReqParams: TLabel;
+    Label7: TLabel;
+    lbMaster2: TListBox;
+    lbDataReqParams: TListBox;
+    mMappings: TMemo;
+    bbAddDataReqMapping: TBitBtn;
+    bbClearDataReqMapping: TBitBtn;
+    Label11: TLabel;
+    Label12: TLabel;
+    Label15: TLabel;
+    lbMaster3: TListBox;
+    lbParams: TListBox;
+    mParamsMappings: TMemo;
+    bbAddParamMappingXXX: TBitBtn;
+    bbClearParamMappingsXXX: TBitBtn;
+    ts_MasterSource: TTabSheet;
+    Label8: TLabel;
+    Label9: TLabel;
+    Label18: TLabel;
+    Label19: TLabel;
+    Label20: TLabel;
+    Label21: TLabel;
+    cb_DataSources: TComboBox;
+    Label10: TLabel;
+    Label17: TLabel;
+    rb_Params: TRadioButton;
+    rb_Method: TRadioButton;
+    lbl_Params1: TLabel;
+    lbl_Params2: TLabel;
+    lbl_Method1: TLabel;
+    lbl_Method2: TLabel;
+    Label22: TLabel;
+    Label23: TLabel;
+    lbl_Params3: TLabel;
+    Label24: TLabel;
+    Label25: TLabel;
+    Label26: TLabel;
+    Label27: TLabel;
+    Label28: TLabel;
+    Label29: TLabel;
+    rb_Where: TRadioButton;
+    lbl_Where1: TLabel;
+    lbl_Where2: TLabel;
+    procedure bbAddFieldMappingClick(Sender: TObject);
+    procedure bbAddDataReqMappingClick(Sender: TObject);
+    procedure bbClearDataReqMappingClick(Sender: TObject);
+    procedure BitBtn4Click(Sender: TObject);
+    procedure FormCreate(Sender: TObject);
+    procedure bbAddParamMappingXXXClick(Sender: TObject);
+    procedure bbClearParamMappingsXXXClick(Sender: TObject);
+    procedure cb_DataSourcesChange(Sender: TObject);
+    procedure btn_FinishClick(Sender: TObject);
+    procedure OnFieldMappingChange(Sender: TObject);
+  private
+    fDataTable: TDADataTable;
+    fMasterSource: TDADataSource;
+    fDesigner: IDesigner;
+    procedure GetDataTables(const aName: string);
+    procedure Initialize;
+
+  protected
+    constructor Create(aOwner : TComponent); reintroduce;
+    procedure AfterEnterPage(aPage:TTabSheet; aMovingForward:boolean); override;
+    procedure OnLeavePage(aPage:TTabSheet; aMovingForward:boolean); override;
+  public
+    class function ExecuteWizard(aDataTable: TDADataTable; aDesigner: IDesigner): boolean;
+  end;
+
+var
+  DADataTableMasterLinkWizard: TDADataTableMasterLinkWizard;
+
+
+implementation
+
+uses uROClasses, TypInfo, uDARemoteDataAdapter, uRODynamicRequest, uRODL;
+
+{$R *.dfm}
+
+procedure TrimNamesAndValues(aSL: TStrings);
+var
+  i: Integer;
+begin
+  for i := 0 to aSL.Count - 1 do begin
+    aSL[i] := Trim(aSL.Names[i]) + {$IFDEF DELPHI7UP}aSL.NameValueSeparator{$ELSE}'='{$ENDIF} + Trim(aSL.Values[aSL.Names[i]]);
+
+  end;
+end;
+
+{ TDataTableMasterLink }
+
+class function TDADataTableMasterLinkWizard.ExecuteWizard(aDataTable: TDADataTable; aDesigner: IDesigner): boolean;
+begin
+  with TDADataTableMasterLinkWizard.Create(NIL) do try
+    fDataTable := aDataTable;
+    fDesigner := aDesigner;
+    Initialize();
+    result := Execute();
+  finally
+    Free;
+  end;
+end;
+
+constructor TDADataTableMasterLinkWizard.Create(aOwner: TComponent);
+begin
+  inherited;
+
+end;
+
+procedure TDADataTableMasterLinkWizard.Initialize;
+var
+  i : integer;
+begin
+  cb_DataSources.Items.Clear();
+  fDesigner.GetComponentNames(GetTypeData(TypeInfo(TDADataSource)), GetDataTables);
+
+  if assigned(fDataTable.MasterSource) then begin
+    cb_DataSources.ItemIndex := cb_DataSources.Items.IndexOf(fDataTable.MasterSource.Name);
+    //lMasterTable := fDataTable.MasterSource.DataTable;
+    //Check(mast=NIL, 'MasterSource doesn''t point to a datatable');
+  end;
+  cb_DataSourcesChange(nil);
+
+  Caption := Format(Caption, [fDataTable.Name]);
+
+  eMasterFields.Text := fDataTable.MasterFields;
+  eDetailFields.Text := fDataTable.DetailFields;
+  mMappings.Lines.Text := fDataTable.MasterRequestMappings.Text;
+  mParamsMappings.Lines.Text := fDataTable.MasterParamsMappings.Text;
+
+  for i := 0 to (fDataTable.FieldCount-1) do
+    lbDetail.Items.Add(fDataTable.Fields[i].Name);
+
+  for i := 0 to (fDataTable.Params.Count-1) do
+    lbParams.Items.Add(fDataTable.Params[i].Name);
+
+  case fDataTable.MasterMappingMode of
+    mmParams: rb_Params.Checked := true;
+    mmDataRequest: rb_Method.Checked := true;
+    mmWhere: rb_Where.Checked := true;
+  end;
+end;
+
+procedure TDADataTableMasterLinkWizard.cb_DataSourcesChange(Sender: TObject);
+var
+  lMasterTable: TDADataTable;
+  lCall: TRODynamicRequest;
+  i: integer;
+begin
+  inherited;
+  fMasterSource := fDesigner.GetComponent(cb_DataSources.Text) as TDADataSource;
+
+  if assigned(fMasterSource) and assigned(fMasterSource.DataTable) then begin
+    lMasterTable := fMasterSource.DataTable;
+
+    rb_Params.Enabled := fDataTable.Params.Count > 0;
+    lbl_Params1.Enabled := rb_Params.Enabled;
+    lbl_Params2.Enabled := rb_Params.Enabled;
+
+    rb_Method.Enabled := assigned(lMasterTable.RemoteDataAdapter) and
+                         assigned(fDataTable.RemoteDataAdapter) and
+                         (lMasterTable.RemoteDataAdapter <> fDataTable.RemoteDataAdapter) and
+                         lMasterTable.RemoteFetchEnabled and fDataTable.RemoteFetchEnabled;
+    lbl_Method1.Enabled := rb_Method.Enabled;
+
+    if (not rb_Params.Enabled and rb_Params.Checked) or (not rb_Method.Enabled and rb_Method.Checked) then
+      rb_Where.Checked := true;
+
+    lbMaster.Items.Clear();
+    lbMaster2.Items.Clear();
+    lbMaster3.Items.Clear();
+    for i := 0 to (lMasterTable.FieldCount-1) do begin
+      lbMaster.Items.Add(lMasterTable.Fields[i].Name);
+      lbMaster2.Items.Add(lMasterTable.Fields[i].Name);
+      lbMaster3.Items.Add(lMasterTable.Fields[i].Name);
+    end;
+
+    if fDataTable.RemoteFetchEnabled and
+       assigned(fDataTable.RemoteDataAdapter) and (fDataTable.RemoteDataAdapter is TDARemoteDataAdapter) then begin
+      lCall := (fDataTable.RemoteDataAdapter as TDARemoteDataAdapter).GetDataCall;
+      lbDataReqParams.Items.Clear();
+      for i := 0 to lCall.Params.Count-1 do
+        if lCall.Params[i].Flag in [fIn, fInOut] then
+          lbDataReqParams.Items.Add(lCall.Params[i].Name);
+    end
+    else begin
+      lbDataReqParams.Enabled := false;
+    end;
+
+    if pc_Pages.ActivePage = ts_MasterSource then
+      btn_Next.Enabled := (rb_Where.Enabled and rb_Where.Checked) or (rb_Params.Enabled and rb_Params.Checked) or (rb_Method.Enabled and rb_Method.Checked);
+  end
+  else begin
+    if pc_Pages.ActivePage = ts_MasterSource then
+      btn_Next.Enabled := false;
+  end;
+end;
+
+
+procedure TDADataTableMasterLinkWizard.GetDataTables(const aName: string);
+var
+  lDataSource: TDADataSource;
+begin
+  lDataSource := fDesigner.GetComponent(aName) as TDADataSource;
+  if assigned(lDataSource.DataTable) and assigned(lDataSource.DataTable) and (lDataSource.DataTable <> fDataTable) then
+    cb_DataSources.Items.Add(aName);
+end;
+
+procedure TDADataTableMasterLinkWizard.bbAddFieldMappingClick(Sender: TObject);
+var x : integer;
+begin
+  if (lbMaster.SelCount=0) or (lbMaster.SelCount<>lbDetail.SelCount) then begin
+    Beep;
+    Exit;
+  end;
+
+  for x := 0 to (lbMaster.Items.Count-1) do
+    if lbMaster.Selected[x] then begin
+      if (eMasterFields.Text<>'')
+        then eMasterFields.Text := eMasterFields.Text+';';
+      eMasterFields.Text := eMasterFields.Text+lbMaster.Items[x];
+    end;
+
+  for x := 0 to (lbDetail.Items.Count-1) do
+    if lbDetail.Selected[x] then begin
+      if (eDetailFields.Text<>'')
+        then eDetailFields.Text := eDetailFields.Text+';';
+      eDetailFields.Text := eDetailFields.Text+lbDetail.Items[x];
+    end;
+  OnFieldMappingChange(nil);
+end;
+
+procedure TDADataTableMasterLinkWizard.bbAddDataReqMappingClick(Sender: TObject);
+var x, i : integer;
+    s : TStringList;
+begin
+  if (lbMaster2.SelCount=0) or (lbDataReqParams.SelCount<>lbMaster2.SelCount) then begin
+    Beep;
+    Exit;
+  end;
+
+  s := TStringList.Create;
+  try
+      for x := 0 to (lbDataReqParams.Items.Count-1) do
+      if lbDataReqParams.Selected[x] then s.Add(lbDataReqParams.Items[x]+'=');
+
+    i := 0;
+    for x := 0 to (lbMaster2.Items.Count-1) do
+      if lbMaster2.Selected[x] then begin
+        s[i] := s[i]+lbMaster2.Items[x];
+        Inc(i);
+      end;
+
+    mMappings.Lines.AddStrings(s);
+  finally
+    s.Free;
+  end;
+end;
+
+procedure TDADataTableMasterLinkWizard.bbClearDataReqMappingClick(Sender: TObject);
+begin
+  mMappings.Lines.Clear
+end;
+
+procedure TDADataTableMasterLinkWizard.BitBtn4Click(Sender: TObject);
+begin
+  eMasterFields.Text := '';
+  eDetailFields.Text := '';
+  OnFieldMappingChange(nil);
+end;
+
+procedure TDADataTableMasterLinkWizard.OnFieldMappingChange(
+  Sender: TObject);
+begin
+  inherited;
+  if pc_Pages.ActivePage = ts_Fields then
+    btn_Next.Enabled := (eMasterFields.Text <> '') and (eDetailFields.Text <> '');
+end;
+
+procedure TDADataTableMasterLinkWizard.FormCreate(Sender: TObject);
+begin
+  inherited;
+  //PageControl1.ActivePageIndex := 0
+
+end;
+
+procedure TDADataTableMasterLinkWizard.bbAddParamMappingXXXClick(Sender: TObject);
+var x, i : integer;
+    s : TStringList;
+begin
+  if (lbMaster3.SelCount=0) or (lbParams.SelCount<>lbMaster3.SelCount) then begin
+    Beep;
+    Exit;
+  end;
+
+  s := TStringList.Create;
+  try
+      for x := 0 to (lbParams.Items.Count-1) do
+      if lbParams.Selected[x] then s.Add(lbParams.Items[x]+'=');
+
+    i := 0;
+    for x := 0 to (lbMaster3.Items.Count-1) do
+      if lbMaster3.Selected[x] then begin
+        s[i] := s[i]+lbMaster3.Items[x];
+        Inc(i);
+      end;
+
+    mParamsMappings.Lines.AddStrings(s);
+  finally
+    s.Free;
+  end;
+end;
+
+procedure TDADataTableMasterLinkWizard.bbClearParamMappingsXXXClick(Sender: TObject);
+begin
+  mParamsMappings.Lines.Clear
+end;
+
+procedure TDADataTableMasterLinkWizard.btn_FinishClick(Sender: TObject);
+begin
+  inherited;
+
+  fDataTable.MasterSource := fMasterSource;
+  fDataTable.MasterFields := eMasterFields.Text;
+  fDataTable.DetailFields := eDetailFields.Text;
+
+  TrimNamesAndValues(mMappings.Lines);
+  TrimNamesAndValues(mParamsMappings.Lines);
+
+  fDataTable.MasterRequestMappings.Text := mMappings.Lines.Text;
+  fDataTable.MasterParamsMappings.Text := mParamsMappings.Lines.Text;
+
+  if rb_Where.Checked then
+    fDataTable.MasterMappingMode := mmWhere
+  else if rb_Params.Checked then
+    fDataTable.MasterMappingMode := mmParams
+  else if rb_Method.Checked then
+    fDataTable.MasterMappingMode := mmDataRequest;
+
+end;
+
+procedure TDADataTableMasterLinkWizard.AfterEnterPage(aPage: TTabSheet;
+  aMovingForward: boolean);
+begin
+  inherited;
+  if (aPage = ts_MasterSource) and aMovingForward then begin
+    cb_DataSourcesChange(nil);
+  end
+  else if (aPage = ts_Fields) and aMovingForward then begin
+    OnFieldMappingChange(nil);
+  end;
+end;
+
+procedure TDADataTableMasterLinkWizard.OnLeavePage(aPage: TTabSheet;
+  aMovingForward: boolean);
+begin
+  inherited;
+  if (aPage = ts_Fields) and aMovingForward then begin
+    if rb_Where.Checked then NextPage := ts_Finish.PageIndex
+    else if rb_Params.Checked then NextPage := ts_Params.PageIndex
+    else if rb_Method.Checked then NextPage := ts_MethodCall.PageIndex;
+  end
+  else if (aPage = ts_Params) or (aPage = ts_MethodCall) then begin
+    NextPage := ts_Finish.PageIndex;
+    PreviousPage := ts_Fields.PageIndex;
+  end;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDADataTableMasterLinkWizardForm_laz.lfm b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDADataTableMasterLinkWizardForm_laz.lfm
new file mode 100644
index 0000000..0219847
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDADataTableMasterLinkWizardForm_laz.lfm	
@@ -0,0 +1,1354 @@
+object DADataTableMasterLinkWizard: TDADataTableMasterLinkWizard
+  Left = 488
+  Height = 515
+  Top = 173
+  Width = 448
+  HorzScrollBar.Page = 447
+  VertScrollBar.Page = 514
+  ActiveControl = pc_Pages
+  Caption = 'Form1'
+  ClientHeight = 515
+  ClientWidth = 448
+  Font.Height = -11
+  Font.Name = 'MS Sans Serif'
+  OnCreate = FormCreate
+  OnDestroy = FormDestroy
+  LCLVersion = '0.9.25'
+  object Bevel1: TBevel
+    Height = 2
+    Top = 42
+    Width = 448
+    Align = alTop
+    Shape = bsBottomLine
+  end
+  object Label16: TLabel
+    Left = 8
+    Height = 16
+    Top = 366
+    Width = 86
+    Caption = 'Mapping Mode:'
+    ParentColor = False
+  end
+  object Panel1: TPanel
+    Height = 42
+    Width = 448
+    Align = alTop
+    BevelOuter = bvNone
+    ClientHeight = 42
+    ClientWidth = 448
+    Color = clWhite
+    ParentColor = False
+    TabOrder = 0
+    object Image1: TImage
+      Left = 5
+      Height = 32
+      Top = 5
+      Width = 32
+      Picture.Data = {
+        055449636F6E012200002F2A2058504D202A2F0A737461746963206368617220
+        2A677261706869635B5D203D207B0A223438203438203234312032222C0A222E
+        2E2063204E6F6E65222C0A222E2C20632023363636363636222C0A222E2D2063
+        2023363536353635222C0A222E2A20632023363336333633222C0A222E612063
+        2023363136313631222C0A222E6220632023363036303630222C0A222E632063
+        2023354535453545222C0A222E6420632023354435443544222C0A222E652063
+        2023354235423542222C0A222E6620632023353935393539222C0A222E672063
+        2023353835383538222C0A222E6820632023353735373537222C0A222E692063
+        2023353535353535222C0A222E6A20632023353335333533222C0A222E6B2063
+        2023353235323532222C0A222E6C20632023363936393639222C0A222E6D2063
+        2023363836383638222C0A222E6E20632023353035303530222C0A222E6F2063
+        2023344634463446222C0A222E7020632023344434443444222C0A222E712063
+        2023344234423442222C0A222E7220632023344134413441222C0A222E732063
+        2023343834383438222C0A222E7420632023343634363436222C0A222E752063
+        2023364136413641222C0A222E7620632023343734373437222C0A222E772063
+        2023343534353435222C0A222E7820632023343434343434222C0A222E792063
+        2023343234323432222C0A222E7A20632023364236423642222C0A222E412063
+        2023363738323543222C0A222E4220632023364441343538222C0A222E432063
+        2023373043343532222C0A222E4420632023373144423443222C0A222E452063
+        2023364445303438222C0A222E4620632023363744443434222C0A222E472063
+        2023363144393430222C0A222E4820632023354244353344222C0A222E492063
+        2023353644313339222C0A222E4A20632023353042363341222C0A222E4B2063
+        2023344339423343222C0A222E4C20632023343937413431222C0A222E4D2063
+        2023344135333439222C0A222E4E20632023343034303430222C0A222E4F2063
+        2023334633463346222C0A222E5020632023363436423631222C0A222E512063
+        2023373441393544222C0A222E5220632023374644443538222C0A222E532063
+        2023374545433533222C0A222E5420632023373845383530222C0A222E552063
+        2023373345343443222C0A222E5620632023353043443335222C0A222E572063
+        2023344143413331222C0A222E5820632023343443363244222C0A222E592063
+        2023334643323241222C0A222E5A20632023333942453236222C0A222E302063
+        2023334139373244222C0A222E3120632023343036323343222C0A222E322063
+        2023334433443344222C0A222E3320632023334333433343222C0A222E342063
+        2023373841433630222C0A222E3520632023383745413542222C0A222E362063
+        2023383445463537222C0A222E3720632023333442423232222C0A222E382063
+        2023324542373145222C0A222E3920632023323842333141222C0A222E402063
+        2023324139343232222C0A222E2320632023334235363339222C0A222E3B2063
+        2023334133413341222C0A222E3A20632023333833383338222C0A222E3D2063
+        2023364337463633222C0A222E2B20632023383644413546222C0A222E252063
+        2023384146333542222C0A222E2420632023323241463136222C0A222E282063
+        2023314341433133222C0A222E2920632023313741383046222C0A222E5B2063
+        2023323737313235222C0A222E5D20632023333733373337222C0A222C2E2063
+        2023333533353335222C0A222C2C20632023373539423632222C0A222C2D2063
+        2023384646373546222C0A222C2A20632023313141343042222C0A222C612063
+        2023304241303037222C0A222C6220632023313338343132222C0A222C632063
+        2023333634303336222C0A222C6420632023333433343334222C0A222C652063
+        2023333233323332222C0A222C6620632023303539443034222C0A222C672063
+        2023303039393030222C0A222C6820632023304138353041222C0A222C692063
+        2023333333443333222C0A222C6A20632023333033303330222C0A222C6B2063
+        2023324632463246222C0A222C6C20632023303039373030222C0A222C6D2063
+        2023303039353030222C0A222C6E20632023304138313041222C0A222C6F2063
+        2023324532453245222C0A222C7020632023384345443546222C0A222C712063
+        2023303039333030222C0A222C7220632023303039313030222C0A222C732063
+        2023313336433133222C0A222C7420632023324332433243222C0A222C752063
+        2023324132413241222C0A222C7620632023303038463030222C0A222C772063
+        2023303038443030222C0A222C7820632023323034433230222C0A222C792063
+        2023323932393239222C0A222C7A20632023343241343332222C0A222C412063
+        2023334541313246222C0A222C4220632023334538323335222C0A222C432063
+        2023334237463332222C0A222C4420632023333538333244222C0A222C452063
+        2023324239343232222C0A222C4620632023323639313146222C0A222C472063
+        2023303038423030222C0A222C4820632023303238343032222C0A222C492063
+        2023323933323239222C0A222C4A20632023323732373237222C0A222C4B2063
+        2023323632363236222C0A222C4C20632023344439433343222C0A222C4D2063
+        2023344336343437222C0A222C4E20632023324535433243222C0A222C4F2063
+        2023303038393030222C0A222C5020632023303038373030222C0A222C512063
+        2023313535383135222C0A222C5220632023323432343234222C0A222C532063
+        2023344537443434222C0A222C5420632023304537463045222C0A222C552063
+        2023303038353030222C0A222C5620632023303237453032222C0A222C572063
+        2023323232323232222C0A222C5820632023323132313231222C0A222C592063
+        2023314236363142222C0A222C5A20632023303038343030222C0A222C302063
+        2023303038323030222C0A222C3120632023313734373137222C0A222C322063
+        2023314631463146222C0A222C3320632023363537393544222C0A222C342063
+        2023314236343142222C0A222C3520632023303038303030222C0A222C362063
+        2023304236323042222C0A222C3720632023314531453145222C0A222C382063
+        2023314136323141222C0A222C3920632023303037453030222C0A222C402063
+        2023303237373032222C0A222C2320632023314331433143222C0A222C3B2063
+        2023314231423142222C0A222C3A20632023353542393345222C0A222C3D2063
+        2023353139373431222C0A222C2B20632023344438433430222C0A222C252063
+        2023344236423435222C0A222C2420632023343836393433222C0A222C282063
+        2023343636373431222C0A222C2920632023313936303139222C0A222C5B2063
+        2023303037433030222C0A222C5D20632023303037413030222C0A222D2E2063
+        2023313933303139222C0A222D2C20632023314131413141222C0A222D2D2063
+        2023313931393139222C0A222D2A20632023353839433437222C0A222D612063
+        2023353236323446222C0A222D6220632023313835463138222C0A222D632063
+        2023303037383030222C0A222D6420632023313433393134222C0A222D652063
+        2023313731373137222C0A222D6620632023353941343435222C0A222D672063
+        2023314435313144222C0A222D6820632023304536443045222C0A222D692063
+        2023313535413135222C0A222D6A20632023313435363134222C0A222D6B2063
+        2023304536303045222C0A222D6C20632023303736463037222C0A222D6D2063
+        2023303037363030222C0A222D6E20632023304534383045222C0A222D6F2063
+        2023313631363136222C0A222D7020632023353439323435222C0A222D712063
+        2023323032383230222C0A222D7220632023304335393043222C0A222D732063
+        2023303037343030222C0A222D7420632023304434363044222C0A222D752063
+        2023313431343134222C0A222D7620632023353138463433222C0A222D772063
+        2023303037333030222C0A222D7820632023304334353043222C0A222D792063
+        2023313331333133222C0A222D7A20632023303037313030222C0A222D412063
+        2023304234333042222C0A222D4220632023313131313131222C0A222D432063
+        2023343938393344222C0A222D4420632023303036463030222C0A222D452063
+        2023304333433043222C0A222D4620632023304630463046222C0A222D472063
+        2023353041453342222C0A222D4820632023343538373342222C0A222D492063
+        2023303036443030222C0A222D4A20632023304632413046222C0A222D4B2063
+        2023304530453045222C0A222D4C20632023343238343338222C0A222D4D2063
+        2023303036423030222C0A222D4E20632023313131383131222C0A222D4F2063
+        2023304330433043222C0A222D5020632023303335393033222C0A222D512063
+        2023303036393030222C0A222D5220632023303734323037222C0A222D532063
+        2023304230423042222C0A222D5420632023333737433330222C0A222D552063
+        2023303036373030222C0A222D5620632023304431413044222C0A222D572063
+        2023303930393039222C0A222D5820632023333337413244222C0A222D592063
+        2023303434423034222C0A222D5A20632023303830383038222C0A222D302063
+        2023333037373242222C0A222D3120632023303036363030222C0A222D322063
+        2023304132333041222C0A222D3320632023324337343238222C0A222D342063
+        2023303533463035222C0A222D3520632023303630363036222C0A222D362063
+        2023314133393141222C0A222D3720632023313633443136222C0A222D382063
+        2023313034433130222C0A222D3920632023303530353035222C0A222D402063
+        2023303430343034222C0A222D2320632023303336343033222C0A222D3B2063
+        2023304234313042222C0A222D3A20632023313031443130222C0A222D3D2063
+        2023304531353045222C0A222D2B20632023304331393043222C0A222D252063
+        2023303135413031222C0A222D2420632023304131443041222C0A222D282063
+        2023303330333033222C0A222D2920632023313634343136222C0A222D5B2063
+        2023303237353032222C0A222D5D20632023304231323042222C0A222A2E2063
+        2023323433343234222C0A222A2C20632023313435343134222C0A222A2D2063
+        2023313335333133222C0A222A2A20632023303936373039222C0A222A612063
+        2023304231453042222C0A222A6220632023303933373039222C0A222A632063
+        2023304430443044222C0A222E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+        2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+        2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+        2E2E2E2E2E2E2E2E2E2E2E2E222C0A222E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+        2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2C2E2D2E2A2E612E622E632E64
+        2E652E662E672E682E692E6A2E6B2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+        2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E222C0A222E2E2E2E2E2E2E2E2E2E2E2E
+        2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E6C2E6D2E2C2E2D2E2A2E612E622E63
+        2E642E652E662E672E682E692E6A2E6B2E6E2E6F2E702E712E2E2E2E2E2E2E2E
+        2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E222C0A222E2E2E2E2E2E2E2E
+        2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E6C2E6D2E2C2E2D2E2A2E612E62
+        2E632E642E652E662E672E682E692E6A2E6B2E6E2E6F2E702E712E722E732E74
+        2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E222C0A222E2E2E2E
+        2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E752E6C2E6D2E2C2E2D2E2A2E61
+        2E622E632E642E652E662E672E682E692E6A2E6B2E6E2E6F2E702E712E722E73
+        2E762E772E782E792E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E222C0A22
+        2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E7A2E752E6C2E6D2E2C2E2D2E2A
+        2E612E622E412E422E432E442E452E462E472E482E492E4A2E4B2E4C2E4D2E72
+        2E732E762E772E782E792E4E2E4F2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+        222C0A222E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E7A2E752E6C2E6D2E2C2E2D
+        2E2A2E502E512E522E532E542E552E452E462E472E482E492E562E572E582E59
+        2E5A2E302E312E772E782E792E4E2E4F2E322E332E2E2E2E2E2E2E2E2E2E2E2E
+        2E2E2E2E222C0A222E2E2E2E2E2E2E2E2E2E2E2E2E2E2E7A2E752E6C2E6D2E2C
+        2E2D2E2A2E342E352E362E532E542E552E452E462E472E482E492E562E572E58
+        2E592E5A2E372E382E392E402E232E4E2E4F2E322E332E3B2E3A2E2E2E2E2E2E
+        2E2E2E2E2E2E2E2E222C0A222E2E2E2E2E2E2E2E2E2E2E2E2E7A2E752E6C2E6D
+        2E2C2E2D2E3D2E2B2E252E362E532E542E552E452E462E472E482E492E562E57
+        2E582E592E5A2E372E382E392E242E282E292E5B2E322E332E3B2E3A2E5D2C2E
+        2E2E2E2E2E2E2E2E2E2E2E2E222C0A222E2E2E2E2E2E2E2E2E2E2E7A2E752E6C
+        2E6D2E2C2E2D2C2C2C2D2E252E362E532E542E552E452E462E472E482E492E56
+        2E572E582E592E5A2E372E382E392E242E282E292C2A2C612C622C632E3A2E5D
+        2C2E2C642C652E2E2E2E2E2E2E2E2E2E222C0A222E2E2E2E2E2E2E2E2E2E2E75
+        2E6C2E6D2E2C2E2D2C2C2C2D2E252E362E532E542E552E452E462E472E482E49
+        2E562E572E582E592E5A2E372E382E392E242E282E292C2A2C612C662C672C68
+        2C692C2E2C642C652C6A2C6B2E2E2E2E2E2E2E2E222C0A222E2E2E2E2E2E2E2E
+        2E752E6C2E6D2E2C2E2D2C2C2C2D2E252E362E532E542E552E452E462E472E48
+        2E492E562E572E582E592E5A2E372E382E392E242E282E292C2A2C612C662C67
+        2C6C2C6D2C6E2C642C652C6A2C6B2C6F2E2E2E2E2E2E2E2E222C0A222E2E2E2E
+        2E2E2E2E2E6C2E6D2E2C2E2D2E3D2C702E252E362E532E542E552E452E462E47
+        2E482E492E562E572E582E592E5A2E372E382E392E242E282E292C2A2C612C66
+        2C672C6C2C6D2C712C722C732C6A2C6B2C6F2C742C752E2E2E2E2E2E222C0A22
+        2E2E2E2E2E2E2E6C2E6D2E2C2E2D2E2A2E2B2E252E362E532E542E552E452E46
+        2E472E482E492E562E572E582E592E5A2E372E382E392E242E282E292C2A2C61
+        2C662C672C6C2C6D2C712C722C762C772C782C6F2C742C752C792E2E2E2E2E2E
+        222C0A222E2E2E2E2E2E2E6D2E2C2E2D2E2A2E342E252E362E532E542E552E45
+        2E462E472E482E492E562E572E582C7A2C412C422C432C442C452C462E292C2A
+        2C612C662C672C6C2C6D2C712C722C762C772C472C482C492C752C792C4A2C4B
+        2E2E2E2E222C0A222E2E2E2E2E6D2E2C2E2D2E2A2E502E352E362E532E542E55
+        2E452E462E472E482E492E562C4C2C4D2E712E722E732E762E772E782E792E4E
+        2E4F2C4E2C622C672C6C2C6D2C712C722C762C772C472C4F2C502C512C792C4A
+        2C4B2C522E2E2E2E222C0A222E2E2E2E2E2C2E2D2E2A2E612E512E362E532E54
+        2E552E452E462E472E482E492E562C532E702E712E722E732E762E772E782E79
+        2E4E2E4F2E322E332E3B2C542C6D2C712C722C762C772C472C4F2C502C552C56
+        2C4A2C4B2C522C572C582E2E222C0A222E2E2E2C2E2D2E2A2E612E622E522E53
+        2E542E552E452E462E472E482E492E562E572E702E712E722E732E762E772E78
+        2E792E4E2E4F2E322E332E3B2E3A2C592C712C722C762C772C472C4F2C502C55
+        2C5A2C302C312C522C572C582C322E2E222C0A222E2E2E2D2E2A2E612E622C33
+        2E532E542E552E452E462E472E482E492E562E572E582E712E722E732E762E77
+        2E782E792E4E2E4F2E322E332E3B2E3A2E5D2C342C722C762C772C472C4F2C50
+        2C552C5A2C302C352C362C572C582C322C372E2E222C0A222E2E2E2A2E612E62
+        2E632E422E542E552E452E462E472E482E492E562E572E582E592E722E732E76
+        2E772E782E792E4E2E4F2E322E332E3B2E3A2E5D2C2E2C382C762C772C472C4F
+        2C502C552C5A2C302C352C392C402C582C322C372C232C3B222C0A222E2E2E61
+        2E622E632E642E432E552E452E462E472E482C3A2C3D2C2B2C252C242C282E73
+        2E762E772E782E792E4E2E4F2E322E332E3B2E3A2E5D2C2E2C642C292C772C47
+        2C4F2C502C552C5A2C302C352C392C5B2C5D2D2E2C372C232D2C2D2D222C0A22
+        2E2E2E622E632E642E652E442E452E462E472D2A2D612E6E2E6F2E702E712E72
+        2E732E762E772E782E792E4E2E4F2E322E332E3B2E3A2E5D2C2E2C642C652D62
+        2C472C4F2C502C552C5A2C302C352C392C5B2C5D2D632D642C232D2C2D2D2D65
+        222C0A222E2E2E632E642E652E662E452E462E472D662E6B2E6E2E6F2E702E71
+        2E722E732E762E772E782E792E4E2E4F2E322E332E3B2E3A2E5D2C2E2C642C65
+        2C6A2D672D682D692C512D6A2D6B2D6C2C392C5B2C5D2D632D6D2D6E2D2C2D2D
+        2D652D6F222C0A222E2E2E642E652E662E672E462E472E482D702E6E2E6F2E70
+        2E712E722E732E762E772E782E792E4E2E4F2E322E332E3B2E3A2E5D2C2E2C64
+        2C652C6A2C6B2C6F2C742C752C792C4A2C4B2C522D712D722D632D6D2D732D74
+        2D2D2D652D6F2D75222C0A222E2E2E652E662E672E682E472E482E492D762E6F
+        2E702E712E722E732E762E772E782E792E4E2E4F2E322E332E3B2E3A2E5D2C2E
+        2C642C652C6A2C6B2C6F2C742C752C792C4A2C4B2C522C572C582C322D6D2D73
+        2D772D782D652D6F2D752D79222C0A222E2E2E662E672E682E692E482E492E56
+        2C2B2E702E712E722E732E762E772E782E792E4E2E4F2E322E332E3B2E3A2E5D
+        2C2E2C642C652C6A2C6B2C6F2C742C752C792C4A2C4B2C522C572C582C322C37
+        2D732D772D7A2D412D6F2D752D792D42222C0A222E2E2E672E682E692E6A2E49
+        2E562E572D432E712E722E732E762E772E782E792E4E2E4F2E322E332E3B2E3A
+        2E5D2C2E2C642C652C6A2C6B2C6F2C742C752C792C4A2C4B2C522C572C582C32
+        2C372C232D772D7A2D442D452D752D792D422D46222C0A222E2E2E682E692E6A
+        2E6B2D472E572E582D482E722E732E762E772E782E792E4E2E4F2E322E332E3B
+        2E3A2E5D2C2E2C642C652C6A2C6B2C6F2C742C752C792C4A2C4B2C522C572C58
+        2C322C372C232D2C2D7A2D442D492D4A2D792D422D462D4B222C0A222E2E2E69
+        2E6A2E6B2E6E2E4B2E582E592D4C2E732E762E772E782E792E4E2E4F2E322E33
+        2E3B2E3A2E5D2C2E2C642C652C6A2C6B2C6F2C742C752C792C4A2C4B2C522C57
+        2C582C322C372C232D2C2D2D2D442D492D4D2D4E2D422D462D4B2D4F222C0A22
+        2E2E2E6A2E6B2E6E2E6F2E4C2E592E5A2C422E762E772E782E792E4E2E4F2E32
+        2E332E3B2E3A2E5D2C2E2C642C652C6A2C6B2C6F2C742C752C792C4A2C4B2C52
+        2C572C582C322C372C232D2C2D2D2D652D492D4D2D502D422D462D4B2D4F2E2E
+        222C0A222E2E2E6B2E6E2E6F2E702E4D2E5A2E372C432E772E782E792E4E2E4F
+        2E322E332E3B2E3A2E5D2C2E2C642C652C6A2C6B2C6F2C742C752C792C4A2C4B
+        2C522C572C582C322C372C232D2C2D2D2D652D6F2D4D2D512D522D462D4B2D4F
+        2D532E2E222C0A222E2E2E2E2E6F2E702E712E722E302E382D542E782E792E4E
+        2E4F2E322E332E3B2E3A2E5D2C2E2C642C652C6A2C6B2C6F2C742C752C792C4A
+        2C4B2C522C572C582C322C372C232D2C2D2D2D652D6F2D752D512D552D562D4B
+        2D4F2D532D572E2E222C0A222E2E2E2E2E702E712E722E732E312E392D582E79
+        2E4E2E4F2E322E332E3B2E3A2E5D2C2E2C642C652C6A2C6B2C6F2C742C752C79
+        2C4A2C4B2C522C572C582C322C372C232D2C2D2D2D652D6F2D752D792D552D59
+        2D4B2D4F2D532D572D5A2E2E222C0A222E2E2E2E2E712E722E732E762E772E40
+        2D302E4E2E4F2E322E332E3B2E3A2E5D2C2E2C642C652C6A2C6B2C6F2C742C75
+        2C792C4A2C4B2C522C572C582C322C372C232D2C2D2D2D652D6F2D752D792D42
+        2D312D322D4F2D532D572D5A2E2E2E2E222C0A222E2E2E2E2E2E2E732E762E77
+        2E782E232D332E4F2E322E332E3B2E3A2E5D2C2E2C642C652C6A2C6B2C6F2C74
+        2C752C792C4A2C4B2C522C572C582C322C372C232D2C2D2D2D652D6F2D752D79
+        2D422D462D342D4F2D532D572D5A2D352E2E2E2E222C0A222E2E2E2E2E2E2E74
+        2E772E782E792E4E2E4F2E322E332E3B2E3A2E5D2C2E2C642C652C6A2C6B2C6F
+        2C742C752C792C4A2C4B2C522D362D372D382C372C232D2C2D2D2D652D6F2D75
+        2D792D422D462D4B2D4F2D532D572D5A2D352E2E2E2E2E2E222C0A222E2E2E2E
+        2E2E2E2E2E782E792E4E2E4F2E322E332E3B2E3A2E5D2C2E2C642C652C6A2C6B
+        2C6F2C742C752C792C4A2C352C392C5B2C5D2D632D6D2C232D2C2D2D2D652D6F
+        2D752D792D422D462D4B2D4F2D532D572D5A2D352D392E2E2E2E2E2E222C0A22
+        2E2E2E2E2E2E2E2E2E792E4E2E4F2E322E332E3B2E3A2E5D2C2E2C642C652C6A
+        2C6B2C6F2C742C752C792C4A2C4B2C392C5B2C5D2D632D6D2D732D742D2D2D65
+        2D6F2D752D792D422D462D4B2D4F2D532D572D5A2D352D402E2E2E2E2E2E2E2E
+        222C0A222E2E2E2E2E2E2E2E2E2E2E4F2E322E332E3B2E3A2E5D2C2E2C642C65
+        2C6A2C6B2C6F2C742C752C792C4A2C4B2C522C5B2C5D2D632D6D2D732D772D7A
+        2D232D3B2D4A2D3A2D422D3D2D2B2D4F2D532D572D5A2D352D402E2E2E2E2E2E
+        2E2E2E2E222C0A222E2E2E2E2E2E2E2E2E2E2E2E2E332E3B2E3A2E5D2C2E2C64
+        2C652C6A2C6B2C6F2C742C752C792C4A2C4B2C522D362C5D2D632D6D2D732D77
+        2D7A2D442D492D4D2D512D552D312D252D242D532D572D5A2D352D402D282E2E
+        2E2E2E2E2E2E2E2E222C0A222E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3A2E5D2C2E
+        2C642C652C6A2C6B2C6F2C742C752C792C4A2C4B2C522D292D5B2D632D6D2D73
+        2D772D7A2D442D492D4D2D512D552D312D342D5D2D532D572D5A2D352D402D28
+        2E2E2E2E2E2E2E2E2E2E2E2E222C0A222E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+        2C2E2C642C652C6A2C6B2C6F2C742C752A2E2A2C2A2D2A2A2C5B2C5D2D632D6D
+        2D732D772D7A2D442D492D4D2D512D552D592A612D4F2D532D572D5A2D352D40
+        2D282E2E2E2E2E2E2E2E2E2E2E2E2E2E222C0A222E2E2E2E2E2E2E2E2E2E2E2E
+        2E2E2E2E2E2E2C652C6A2C6B2C6F2C742C752C792C4A2C312C362C402C5D2D63
+        2D6D2D732D772D7A2D442D492D4D2D502A622D562D4B2D4F2D532D572D5A2D35
+        2D402D282E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E222C0A222E2E2E2E2E2E2E2E
+        2E2E2E2E2E2E2E2E2E2E2E2E2C6B2C6F2C742C752C792C4A2C4B2C522C572C58
+        2D2E2D642D6E2D742D782D412D452D4A2D4E2D422D462D4B2D4F2D532D572D5A
+        2D352D402E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E222C0A222E2E2E2E
+        2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2C752C792C4A2C4B2C522C57
+        2C582C322C372C232D2C2D2D2D652D6F2D752D792D422D462D4B2D4F2D532D57
+        2D5A2D352D392E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E222C0A22
+        2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2C4B2C52
+        2C572C582C322C372C232D2C2D2D2D652D6F2D752D792D422D462D4B2D4F2D53
+        2D572D5A2D352E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+        222C0A222E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+        2E2E2E2E2C582C322C372C232D2C2D2D2D652D6F2D752D792D422D462D4B2D4F
+        2D532D572D5A2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+        2E2E2E2E222C0A222E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+        2E2E2E2E2E2E2E2E2E2E2E2E2E2E2C3B2D2D2D652D6F2D752D792D422D462D4B
+        2A632E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+        2E2E2E2E2E2E2E2E227D0A
+      }
+      Proportional = True
+      Stretch = True
+      Transparent = False
+    end
+    object Label1: TLabel
+      Left = 43
+      Height = 14
+      Top = 5
+      Width = 222
+      Caption = 'Data Table Master/Detail Setup Wizard'
+      Font.Height = -11
+      Font.Name = 'Tahoma'
+      Font.Style = [fsBold]
+      ParentColor = False
+    end
+    object Label2: TLabel
+      Left = 45
+      Height = 16
+      Top = 21
+      Width = 331
+      Caption = 'This wizard will help you configure a master/detail relationship'
+      ParentColor = False
+    end
+  end
+  object pc_Pages: TPageControl
+    Height = 436
+    Top = 44
+    Width = 448
+    ActivePage = ts_Params
+    Align = alClient
+    TabIndex = 4
+    TabOrder = 1
+    object ts_Welcome: TTabSheet
+      Caption = 'Welcome'
+      ClientHeight = 410
+      ClientWidth = 440
+      object Label3: TLabel
+        Left = 8
+        Height = 14
+        Top = 8
+        Width = 314
+        Caption = 'Welcome to the Data Table Master/Detail Setup Wizard'
+        Font.Height = -11
+        Font.Name = 'Tahoma'
+        Font.Style = [fsBold]
+        ParentColor = False
+      end
+      object Label4: TLabel
+        Left = 24
+        Height = 46
+        Top = 24
+        Width = 350
+        Caption = 'This wizard will help you set up a Master/Detail relationship by choosing a Master Source for the selected data table and defining how the relationshop between master and detail tables is mapped.'
+        ParentColor = False
+        WordWrap = True
+      end
+      object Label24: TLabel
+        Left = 24
+        Height = 16
+        Top = 72
+        Width = 243
+        Caption = 'This wizard will affect the following properties'
+        ParentColor = False
+      end
+      object Label25: TLabel
+        Left = 32
+        Height = 16
+        Top = 88
+        Width = 81
+        Caption = '- MasterSource'
+        ParentColor = False
+      end
+      object Label26: TLabel
+        Left = 32
+        Height = 16
+        Top = 104
+        Width = 161
+        Caption = '- MasterFields and DetailFields'
+        ParentColor = False
+      end
+      object Label27: TLabel
+        Left = 32
+        Height = 16
+        Top = 136
+        Width = 137
+        Caption = '- MasterParamsMappings'
+        ParentColor = False
+      end
+      object Label28: TLabel
+        Left = 32
+        Height = 16
+        Top = 152
+        Width = 135
+        Caption = '- MasterRequestMapping'
+        ParentColor = False
+      end
+      object Label29: TLabel
+        Left = 32
+        Height = 16
+        Top = 120
+        Width = 124
+        Caption = '- MasterMappingMode'
+        ParentColor = False
+      end
+    end
+    object ts_MasterSource: TTabSheet
+      Caption = 'ts_MasterSource'
+      ClientHeight = 410
+      ClientWidth = 440
+      ImageIndex = 6
+      object Label8: TLabel
+        Left = 8
+        Height = 14
+        Top = 8
+        Width = 106
+        Caption = 'Pick MasterSource'
+        Font.Height = -11
+        Font.Name = 'Tahoma'
+        Font.Style = [fsBold]
+        ParentColor = False
+      end
+      object Label9: TLabel
+        Left = 24
+        Height = 16
+        Top = 24
+        Width = 305
+        Caption = 'Select the data table to use as master source for this table:'
+        ParentColor = False
+      end
+      object Label10: TLabel
+        Left = 8
+        Height = 14
+        Top = 80
+        Width = 127
+        Caption = 'Choose Mapping Mode'
+        Font.Height = -11
+        Font.Name = 'Tahoma'
+        Font.Style = [fsBold]
+        ParentColor = False
+      end
+      object Label17: TLabel
+        Left = 24
+        Height = 16
+        Top = 96
+        Width = 403
+        Caption = 'Select what method you want to use fetch detail data for your master source'
+        ParentColor = False
+      end
+      object lbl_Params1: TLabel
+        Left = 42
+        Height = 46
+        Top = 204
+        Width = 342
+        Caption = 'Master key fields will be passed as parameters when fetching detail data. Use this if you''re talking to a standard DA server, and have defined Parameters in data table inside your schema.'
+        ParentColor = False
+        WordWrap = True
+      end
+      object lbl_Params2: TLabel
+        Left = 42
+        Height = 31
+        Top = 248
+        Width = 254
+        Caption = 'Your detail data will be fetched via the standard DataRequestCall, just like any data table.'
+        ParentColor = False
+        WordWrap = True
+      end
+      object lbl_Method1: TLabel
+        Left = 42
+        Height = 16
+        Top = 324
+        Width = 395
+        Caption = 'Data will be retrieved using a custom method you provided in your service.'
+        ParentColor = False
+      end
+      object lbl_Method2: TLabel
+        Left = 42
+        Height = 23
+        Top = 344
+        Width = 346
+        Caption = 'This option is only available if the detail table uses a separate RemoteDataAdapter component with a custom DataRequestCall.'
+        Font.Color = clGrayText
+        Font.Height = -9
+        Font.Name = 'Tahoma'
+        ParentColor = False
+        WordWrap = True
+      end
+      object lbl_Params3: TLabel
+        Left = 42
+        Height = 12
+        Top = 282
+        Width = 299
+        Caption = 'This option is only available if your detail data table defines parameters.'
+        Font.Color = clGrayText
+        Font.Height = -9
+        Font.Name = 'Tahoma'
+        ParentColor = False
+        WordWrap = True
+      end
+      object lbl_Where1: TLabel
+        Left = 42
+        Height = 16
+        Top = 140
+        Width = 313
+        Caption = 'A where clause will be passed to retrieve filtered detail data.'
+        ParentColor = False
+      end
+      object lbl_Where2: TLabel
+        Left = 42
+        Height = 12
+        Top = 160
+        Width = 176
+        Caption = 'Recommended for Version 5.0 and above.'
+        Font.Color = clGrayText
+        Font.Height = -9
+        Font.Name = 'Tahoma'
+        ParentColor = False
+      end
+      object cb_DataSources: TComboBox
+        Left = 24
+        Height = 21
+        Top = 40
+        Width = 289
+        AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
+        ItemHeight = 13
+        OnChange = cb_DataSourcesChange
+        Style = csDropDownList
+        TabOrder = 0
+      end
+      object rb_Where: TRadioButton
+        Left = 24
+        Height = 21
+        Top = 120
+        Width = 187
+        Caption = 'Using automatic WHERE clauses'
+        OnChange = cb_DataSourcesChange
+        TabOrder = 1
+      end
+      object rb_Params: TRadioButton
+        Left = 24
+        Height = 21
+        Top = 184
+        Width = 134
+        Caption = 'Using data parameters'
+        OnChange = cb_DataSourcesChange
+        TabOrder = 2
+      end
+      object rb_Method: TRadioButton
+        Left = 24
+        Height = 21
+        Top = 304
+        Width = 158
+        Caption = 'Using a custom method call'
+        OnChange = cb_DataSourcesChange
+        TabOrder = 3
+      end
+    end
+    object ts_Fields: TTabSheet
+      Caption = 'ts_Fields'
+      ClientHeight = 410
+      ClientWidth = 440
+      ImageIndex = 3
+      object labMasterFields: TLabel
+        Left = 24
+        Height = 16
+        Top = 92
+        Width = 73
+        Caption = '&Master Fields:'
+        FocusControl = lbMaster
+        ParentColor = False
+      end
+      object labDetailFields: TLabel
+        Left = 256
+        Height = 16
+        Top = 92
+        Width = 67
+        Caption = '&Detail Fields:'
+        FocusControl = lbDetail
+        ParentColor = False
+      end
+      object Label13: TLabel
+        Left = 24
+        Height = 16
+        Top = 323
+        Width = 70
+        Caption = 'MasterFields:'
+        FocusControl = eMasterFields
+        ParentColor = False
+      end
+      object Label14: TLabel
+        Left = 24
+        Height = 16
+        Top = 347
+        Width = 64
+        Caption = 'DetailFields:'
+        FocusControl = eDetailFields
+        ParentColor = False
+      end
+      object Label18: TLabel
+        Left = 8
+        Height = 14
+        Top = 8
+        Width = 115
+        Caption = 'Master/Detail Fields'
+        Font.Height = -11
+        Font.Name = 'Tahoma'
+        Font.Style = [fsBold]
+        ParentColor = False
+      end
+      object Label19: TLabel
+        Left = 24
+        Height = 16
+        Top = 24
+        Width = 351
+        Caption = 'Please select the fields that describe the Master/Detail relationship.'
+        ParentColor = False
+      end
+      object lbMaster: TListBox
+        Left = 22
+        Height = 209
+        Top = 108
+        Width = 164
+        ItemHeight = 13
+        MultiSelect = True
+        TabOrder = 0
+      end
+      object lbDetail: TListBox
+        Left = 254
+        Height = 209
+        Top = 108
+        Width = 164
+        ItemHeight = 13
+        MultiSelect = True
+        TabOrder = 1
+      end
+      object eMasterFields: TEdit
+        Left = 97
+        Height = 21
+        Top = 320
+        Width = 321
+        OnChange = OnFieldMappingChange
+        TabOrder = 2
+        Text = 'fdsfdsdsf'
+      end
+      object eDetailFields: TEdit
+        Left = 97
+        Height = 21
+        Top = 344
+        Width = 321
+        OnChange = OnFieldMappingChange
+        TabOrder = 3
+        Text = 'fdsfdsdsf'
+      end
+      object bbAddFieldMapping: TBitBtn
+        Left = 190
+        Height = 25
+        Top = 108
+        Width = 60
+        Caption = '&Add'
+        Glyph.Data = {
+          36030000424D3603000000000000360000002800000010000000100000000100
+          18000000000000030000120B0000120B00000000000000000000FF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF03
+          5D05035D05FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FF035D055BF791058C0D035D05FF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF035D055B
+          F79105950E035D05FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FF035D055BF79105920D035D05FF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF035D055B
+          F79106950F035D05FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          035D05035D05035D05035D05035D055BF7910C9C18035D05035D05035D05035D
+          05035D05FF00FFFF00FFFF00FF035D055BF7913BDA6930CF572AC64D21B83C17
+          A62B119F210D9E1C0A9A1506920E05930D058B0D035D05FF00FFFF00FF035D05
+          5BF7915BF7915BF7915BF7915BF7915BF79118A92F5BF7915BF7915BF7915BF7
+          915BF791035D05FF00FFFF00FFFF00FF035D05035D05035D05035D05035D055B
+          F79125BC42035D05035D05035D05035D05035D05FF00FFFF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FF035D055BF79130CE57035D05FF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF035D055B
+          F7913BD968035D05FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FF035D055BF79148EB7F035D05FF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF035D055B
+          F7915BF791035D05FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FFFF00FF035D05035D05FF00FFFF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+          00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        }
+        NumGlyphs = 0
+        OnClick = bbAddFieldMappingClick
+        TabOrder = 4
+      end
+      object BitBtn4: TBitBtn
+        Left = 190
+        Height = 25
+        Top = 292
+        Width = 60
+        Caption = '&Clear'
+        Glyph.Data = {
+          36030000424D3603000000000000360000002800000010000000100000000100
+          18000000000000030000120B0000120B00000000000000000000FF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFF2BB81F3C48AF2BC81EF
+          B072EEAF6EEFB275FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          FF00FFFBEBBDFEF3C9FBDEACF3C990FBB67EFFB47DFCCA99FFD9ADFED9A7F0B5
+          77FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFEFAD3FEF7CCFBDCA9EBCA91A9
+          B86E84AB542B912057A743EAF3C7FCE9BDEEAD6FFF00FFFF00FFFF00FFFF00FF
+          EDA565F3C28AFCF0C4FCE5B5FBD09F2C9622007B00058206067F043DA335FEF2
+          D0F0B173FF00FFFF00FFFF00FFFF00FFEEAB6DEDA767EFB070F6C990FFD8AC2E
+          9823006E006ABF6BFFF0EA48A138A3AF5EFCAF74FF00FFFF00FFFF00FFFF00FF
+          F2B479F2B77EF0B277F0AC6FFBB57E7AB46041A6416FBC69FFFFFFF4FEFBBCBB
+          79F3AA6BFF00FFFF00FFFF00FFFF00FFF7C292FAC598F8C293F8C090F3BF8AC2
+          D5A5FFFFFFD9EED556B1534BAF4BB8BC79F8B075FF00FFFF00FFFF00FFF6C792
+          FCD4ADFCD4ACFCD0A9FCD0A9FFD4B55DA94680C780E0F2DE27982400700082B0
+          5BFFBD90EEAC6DFF00FFFF00FFF6C792FFEAC4FEE3BCFEE2BAFEE0B8FFE0BAD9
+          D9AC0A8209188A16037F0300790077B45DFFCEAAEEAC6DFF00FFFF00FFFADDAB
+          FFFBD5FFF4CCFFF3CAFFF0C9FFEFC5FFF2D1B5D5982A96242B99249ACB87B5D1
+          95FFE0BAF2B77AFF00FFFF00FFFCEFC4FFFFD8FFFBD3FFFCD4FFFBD3FFFBD4FF
+          FCD4FFFFE1FFFFEBFFFFE7FFFFE0FFF8D7FFF4CBF3C086FF00FFFF00FFFEF4CB
+          FFFFDDFFFFD9FFFFD9FFFFDAFFFED7FEF6CCF8DAA3F4C07DF4C17FF7D8A3FEF2
+          C5FFFFDDF3C991FF00FFFF00FFF4CC96F8DEAFF8DDACF7D8A6F6CF99F3BF80EF
+          AC66EB9D4FEB9C4CEB9F55F0AC6EFAC087FCD3A0FAC089FF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFEDA354EFAB68F7BC83FABF
+          88FABC83FABC83FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+          00FFFF00FFFF00FFFF00FFFAC088FAC088FAC088FF00FFFF00FF
+        }
+        NumGlyphs = 0
+        OnClick = BitBtn4Click
+        TabOrder = 5
+      end
+    end
+    object ts_MethodCall: TTabSheet
+      Caption = 'ts_MethodCall'
+      ClientHeight = 410
+      ClientWidth = 440
+      ImageIndex = 4
+      object labMasterFields2: TLabel
+        Left = 24
+        Height = 16
+        Top = 92
+        Width = 73
+        Caption = '&Master Fields:'
+        ParentColor = False
+      end
+      object labDataReqParams: TLabel
+        Left = 256
+        Height = 16
+        Top = 92
+        Width = 132
+        Caption = 'DataRequestCall &Params:'
+        FocusControl = lbDataReqParams
+        ParentColor = False
+      end
+      object Label7: TLabel
+        Left = 24
+        Height = 16
+        Top = 298
+        Width = 301
+        Caption = 'Mapp&ings (Detail''s DataRequestCall Param=MasterField):'
+        FocusControl = mMappings
+        ParentColor = False
+      end
+      object Label20: TLabel
+        Left = 8
+        Height = 14
+        Top = 8
+        Width = 191
+        Caption = 'Map Fields to Method Parameters'
+        Font.Height = -11
+        Font.Name = 'Tahoma'
+        Font.Style = [fsBold]
+        ParentColor = False
+      end
+      object Label21: TLabel
+        Left = 24
+        Height = 61
+        Top = 24
+        Width = 390
+        AutoSize = False
+        Caption = 'Select how the master fields map to the parameters passed to the customs GetDataCall you are using to fetch Detail data. Ideally, all fields from the previous page (i.e. all fields involved in the M/D relationship) should be mapped here.'
+        ParentColor = False
+        WordWrap = True
+      end
+      object lbMaster2: TListBox
+        Left = 22
+        Height = 185
+        Top = 108
+        Width = 164
+        ItemHeight = 13
+        MultiSelect = True
+        TabOrder = 0
+      end
+      object lbDataReqParams: TListBox
+        Left = 254
+        Height = 185
+        Top = 106
+        Width = 164
+        ItemHeight = 13
+        MultiSelect = True
+        TabOrder = 1
+      end
+      object mMappings: TMemo
+        Left = 22
+        Height = 60
+        Top = 314
+        Width = 395
+        ScrollBars = ssVertical
+        TabOrder = 2
+      end
+      object bbAddDataReqMapping: TBitBtn
+        Left = 190
+        Height = 25
+        Top = 108
+        Width = 60
+        Caption = '&Add'
+        Glyph.Data = {
+          36030000424D3603000000000000360000002800000010000000100000000100
+          18000000000000030000120B0000120B00000000000000000000FF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF03
+          5D05035D05FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FF035D055BF791058C0D035D05FF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF035D055B
+          F79105950E035D05FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FF035D055BF79105920D035D05FF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF035D055B
+          F79106950F035D05FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          035D05035D05035D05035D05035D055BF7910C9C18035D05035D05035D05035D
+          05035D05FF00FFFF00FFFF00FF035D055BF7913BDA6930CF572AC64D21B83C17
+          A62B119F210D9E1C0A9A1506920E05930D058B0D035D05FF00FFFF00FF035D05
+          5BF7915BF7915BF7915BF7915BF7915BF79118A92F5BF7915BF7915BF7915BF7
+          915BF791035D05FF00FFFF00FFFF00FF035D05035D05035D05035D05035D055B
+          F79125BC42035D05035D05035D05035D05035D05FF00FFFF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FF035D055BF79130CE57035D05FF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF035D055B
+          F7913BD968035D05FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FF035D055BF79148EB7F035D05FF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF035D055B
+          F7915BF791035D05FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FFFF00FF035D05035D05FF00FFFF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+          00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        }
+        NumGlyphs = 0
+        OnClick = bbAddDataReqMappingClick
+        TabOrder = 3
+      end
+      object bbClearDataReqMapping: TBitBtn
+        Left = 190
+        Height = 25
+        Top = 266
+        Width = 60
+        Caption = '&Clear'
+        Glyph.Data = {
+          36030000424D3603000000000000360000002800000010000000100000000100
+          18000000000000030000120B0000120B00000000000000000000FF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFF2BB81F3C48AF2BC81EF
+          B072EEAF6EEFB275FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          FF00FFFBEBBDFEF3C9FBDEACF3C990FBB67EFFB47DFCCA99FFD9ADFED9A7F0B5
+          77FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFEFAD3FEF7CCFBDCA9EBCA91A9
+          B86E84AB542B912057A743EAF3C7FCE9BDEEAD6FFF00FFFF00FFFF00FFFF00FF
+          EDA565F3C28AFCF0C4FCE5B5FBD09F2C9622007B00058206067F043DA335FEF2
+          D0F0B173FF00FFFF00FFFF00FFFF00FFEEAB6DEDA767EFB070F6C990FFD8AC2E
+          9823006E006ABF6BFFF0EA48A138A3AF5EFCAF74FF00FFFF00FFFF00FFFF00FF
+          F2B479F2B77EF0B277F0AC6FFBB57E7AB46041A6416FBC69FFFFFFF4FEFBBCBB
+          79F3AA6BFF00FFFF00FFFF00FFFF00FFF7C292FAC598F8C293F8C090F3BF8AC2
+          D5A5FFFFFFD9EED556B1534BAF4BB8BC79F8B075FF00FFFF00FFFF00FFF6C792
+          FCD4ADFCD4ACFCD0A9FCD0A9FFD4B55DA94680C780E0F2DE27982400700082B0
+          5BFFBD90EEAC6DFF00FFFF00FFF6C792FFEAC4FEE3BCFEE2BAFEE0B8FFE0BAD9
+          D9AC0A8209188A16037F0300790077B45DFFCEAAEEAC6DFF00FFFF00FFFADDAB
+          FFFBD5FFF4CCFFF3CAFFF0C9FFEFC5FFF2D1B5D5982A96242B99249ACB87B5D1
+          95FFE0BAF2B77AFF00FFFF00FFFCEFC4FFFFD8FFFBD3FFFCD4FFFBD3FFFBD4FF
+          FCD4FFFFE1FFFFEBFFFFE7FFFFE0FFF8D7FFF4CBF3C086FF00FFFF00FFFEF4CB
+          FFFFDDFFFFD9FFFFD9FFFFDAFFFED7FEF6CCF8DAA3F4C07DF4C17FF7D8A3FEF2
+          C5FFFFDDF3C991FF00FFFF00FFF4CC96F8DEAFF8DDACF7D8A6F6CF99F3BF80EF
+          AC66EB9D4FEB9C4CEB9F55F0AC6EFAC087FCD3A0FAC089FF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFEDA354EFAB68F7BC83FABF
+          88FABC83FABC83FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+          00FFFF00FFFF00FFFF00FFFAC088FAC088FAC088FF00FFFF00FF
+        }
+        NumGlyphs = 0
+        OnClick = bbClearDataReqMappingClick
+        TabOrder = 4
+      end
+    end
+    object ts_Params: TTabSheet
+      Caption = 'ts_Params'
+      ClientHeight = 410
+      ClientWidth = 440
+      ImageIndex = 5
+      object Label11: TLabel
+        Left = 24
+        Height = 16
+        Top = 92
+        Width = 81
+        Caption = 'Master''s Fields:'
+        ParentColor = False
+      end
+      object Label12: TLabel
+        Left = 256
+        Height = 16
+        Top = 92
+        Width = 43
+        Caption = 'Params:'
+        FocusControl = lbParams
+        ParentColor = False
+      end
+      object Label15: TLabel
+        Left = 24
+        Height = 16
+        Top = 298
+        Width = 212
+        Caption = 'Mappings (Detail''s Param=MasterField):'
+        FocusControl = mParamsMappings
+        ParentColor = False
+      end
+      object Label22: TLabel
+        Left = 8
+        Height = 14
+        Top = 8
+        Width = 209
+        Caption = 'Map Fields to Data Table Parameters'
+        Font.Height = -11
+        Font.Name = 'Tahoma'
+        Font.Style = [fsBold]
+        ParentColor = False
+      end
+      object Label23: TLabel
+        Left = 24
+        Height = 46
+        Top = 24
+        Width = 389
+        Caption = 'Select how the master fields map to the parameters of your detail data. Ideally, all fields from the previous page (i.e. all fields involved in the M/D relationship) should be mapped here.'
+        ParentColor = False
+        WordWrap = True
+      end
+      object lbMaster3: TListBox
+        Left = 22
+        Height = 185
+        Top = 108
+        Width = 164
+        ItemHeight = 13
+        MultiSelect = True
+        TabOrder = 0
+      end
+      object lbParams: TListBox
+        Left = 254
+        Height = 185
+        Top = 108
+        Width = 164
+        ItemHeight = 13
+        MultiSelect = True
+        TabOrder = 1
+      end
+      object mParamsMappings: TMemo
+        Left = 22
+        Height = 60
+        Top = 314
+        Width = 395
+        ScrollBars = ssVertical
+        TabOrder = 2
+      end
+      object bbAddParamMappingXXX: TBitBtn
+        Left = 190
+        Height = 25
+        Top = 108
+        Width = 60
+        Caption = '&Add'
+        Glyph.Data = {
+          36030000424D3603000000000000360000002800000010000000100000000100
+          18000000000000030000120B0000120B00000000000000000000FF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF03
+          5D05035D05FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FF035D055BF791058C0D035D05FF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF035D055B
+          F79105950E035D05FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FF035D055BF79105920D035D05FF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF035D055B
+          F79106950F035D05FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          035D05035D05035D05035D05035D055BF7910C9C18035D05035D05035D05035D
+          05035D05FF00FFFF00FFFF00FF035D055BF7913BDA6930CF572AC64D21B83C17
+          A62B119F210D9E1C0A9A1506920E05930D058B0D035D05FF00FFFF00FF035D05
+          5BF7915BF7915BF7915BF7915BF7915BF79118A92F5BF7915BF7915BF7915BF7
+          915BF791035D05FF00FFFF00FFFF00FF035D05035D05035D05035D05035D055B
+          F79125BC42035D05035D05035D05035D05035D05FF00FFFF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FF035D055BF79130CE57035D05FF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF035D055B
+          F7913BD968035D05FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FF035D055BF79148EB7F035D05FF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF035D055B
+          F7915BF791035D05FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FFFF00FF035D05035D05FF00FFFF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+          00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        }
+        NumGlyphs = 0
+        OnClick = bbAddParamMappingXXXClick
+        TabOrder = 3
+      end
+      object bbClearParamMappingsXXX: TBitBtn
+        Left = 190
+        Height = 25
+        Top = 268
+        Width = 60
+        Caption = '&Clear'
+        Glyph.Data = {
+          36030000424D3603000000000000360000002800000010000000100000000100
+          18000000000000030000120B0000120B00000000000000000000FF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+          FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFF2BB81F3C48AF2BC81EF
+          B072EEAF6EEFB275FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+          FF00FFFBEBBDFEF3C9FBDEACF3C990FBB67EFFB47DFCCA99FFD9ADFED9A7F0B5
+          77FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFEFAD3FEF7CCFBDCA9EBCA91A9
+          B86E84AB542B912057A743EAF3C7FCE9BDEEAD6FFF00FFFF00FFFF00FFFF00FF
+          EDA565F3C28AFCF0C4FCE5B5FBD09F2C9622007B00058206067F043DA335FEF2
+          D0F0B173FF00FFFF00FFFF00FFFF00FFEEAB6DEDA767EFB070F6C990FFD8AC2E
+          9823006E006ABF6BFFF0EA48A138A3AF5EFCAF74FF00FFFF00FFFF00FFFF00FF
+          F2B479F2B77EF0B277F0AC6FFBB57E7AB46041A6416FBC69FFFFFFF4FEFBBCBB
+          79F3AA6BFF00FFFF00FFFF00FFFF00FFF7C292FAC598F8C293F8C090F3BF8AC2
+          D5A5FFFFFFD9EED556B1534BAF4BB8BC79F8B075FF00FFFF00FFFF00FFF6C792
+          FCD4ADFCD4ACFCD0A9FCD0A9FFD4B55DA94680C780E0F2DE27982400700082B0
+          5BFFBD90EEAC6DFF00FFFF00FFF6C792FFEAC4FEE3BCFEE2BAFEE0B8FFE0BAD9
+          D9AC0A8209188A16037F0300790077B45DFFCEAAEEAC6DFF00FFFF00FFFADDAB
+          FFFBD5FFF4CCFFF3CAFFF0C9FFEFC5FFF2D1B5D5982A96242B99249ACB87B5D1
+          95FFE0BAF2B77AFF00FFFF00FFFCEFC4FFFFD8FFFBD3FFFCD4FFFBD3FFFBD4FF
+          FCD4FFFFE1FFFFEBFFFFE7FFFFE0FFF8D7FFF4CBF3C086FF00FFFF00FFFEF4CB
+          FFFFDDFFFFD9FFFFD9FFFFDAFFFED7FEF6CCF8DAA3F4C07DF4C17FF7D8A3FEF2
+          C5FFFFDDF3C991FF00FFFF00FFF4CC96F8DEAFF8DDACF7D8A6F6CF99F3BF80EF
+          AC66EB9D4FEB9C4CEB9F55F0AC6EFAC087FCD3A0FAC089FF00FFFF00FFFF00FF
+          FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFEDA354EFAB68F7BC83FABF
+          88FABC83FABC83FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+          00FFFF00FFFF00FFFF00FFFAC088FAC088FAC088FF00FFFF00FF
+        }
+        NumGlyphs = 0
+        OnClick = bbClearParamMappingsXXXClick
+        TabOrder = 4
+      end
+    end
+    object ts_Finish: TTabSheet
+      Caption = 'Finish'
+      ClientHeight = 410
+      ClientWidth = 440
+      ImageIndex = 2
+      object Label5: TLabel
+        Left = 8
+        Height = 14
+        Top = 8
+        Width = 52
+        Caption = 'That''s It!'
+        Font.Height = -11
+        Font.Name = 'Tahoma'
+        Font.Style = [fsBold]
+        ParentColor = False
+      end
+      object Label6: TLabel
+        Left = 24
+        Height = 16
+        Top = 24
+        Width = 240
+        Caption = 'Your Master/Detail relationship is now set up.'
+        ParentColor = False
+      end
+    end
+  end
+  object Panel2: TPanel
+    Height = 35
+    Top = 480
+    Width = 448
+    Align = alBottom
+    BevelOuter = bvNone
+    ClientHeight = 35
+    ClientWidth = 448
+    TabOrder = 2
+    object btn_Finish: TBitBtn
+      Left = 368
+      Height = 25
+      Hint = 'This is Finish, but not the End'
+      Top = 5
+      Width = 75
+      Anchors = [akTop, akRight]
+      Caption = 'Finish'
+      Glyph.Data = {
+        36060000424D3606000000000000360000002800000020000000100000000100
+        18000000000000060000220B0000220B00000000000000000000FF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF811E00FF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FF787878FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF811E00
+        811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FF787878787878FF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        811E00811E00811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FF787878787878787878FF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FF811E0095440F811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF787878898989787878FF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FF811E00A7632F811E00811E00FF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF7878789F9F9F78787878
+        7878FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FF811E00BF8B62CCA17E811E00811E00FF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF787878B8B8B8C6
+        C6C6787878787878FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FF811E00D8B69CE6D1BFE7D3C4811E00FF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF787878D1
+        D1D1E0E0E0E2E2E2787878FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FF811E00F0E2D9FCF7F2FAF0E6811E00811E
+        00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF78
+        7878EBEBEBF5F5F5F1F1F1787878787878FF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FF811E00D8AF96F4E2CFF0D7BDD8A784811E
+        00811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF78
+        7878D0D0D0E9E9E9E3E3E3CACACA787878787878FF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FF811E00F3DECAEFD4B8EBC9A7DAA67D811E00FF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF787878E7
+        E7E7E1E1E1DBDBDBC9C9C9787878FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FF811E00E7BB92E3B081E0A672D5925A811E
+        00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF78
+        7878D3D3D3CDCDCDC6C6C6BCBCBC787878FF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF811E00DA995ED78F50D38441CF7B
+        35811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FF787878BFBFBFB8B8B8B2B2B2ACACAC787878FF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF811E00811E00811E00811E
+        00811E00811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FF787878787878787878787878787878787878FF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      }
+      ModalResult = 1
+      NumGlyphs = 2
+      OnClick = btn_FinishClick
+      TabOrder = 0
+      Visible = False
+    end
+    object btn_Cancel: TBitBtn
+      Left = 5
+      Height = 25
+      Top = 5
+      Width = 75
+      Cancel = True
+      Caption = 'Cancel'
+      Glyph.Data = {
+        36060000424D3606000000000000360000002800000020000000100000000100
+        18000000000000060000C40E0000C40E00000000000000000000FF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A00009AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00009A0000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        00009A174AFD103BF400009AFF00FFFF00FFFF00FFFF00FF00009A002CF80030
+        FC00009AFF00FFFF00FFFF00FFFF00FF6B6B6BA8A8A8A0A0A06B6B6BFF00FFFF
+        00FFFF00FFFF00FF6B6B6B9A9A9A9C9C9C6B6B6BFF00FFFF00FFFF00FFFF00FF
+        00009A1A47F81A4CFF123BF100009AFF00FFFF00FF00009A012DF60132FF002A
+        F300009AFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7AAAAAA9F9F9F6B6B6BFF
+        00FFFF00FF6B6B6B9999999E9E9E9797976B6B6BFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A1C47F61B4DFF143EF400009A00009A002DF80134FF032BF20000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7ABABABA2A2A26B
+        6B6B6B6B6B9A9A9A9E9E9E9898986B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FF00009A1D48F61D50FF103DFB0431FE0132FF002CF600009AFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7ACACACA3
+        A3A39F9F9F9E9E9E9999996B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FF00009A1A48F91342FF0C3CFF0733F600009AFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7A7
+        A7A7A3A3A39C9C9C6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FF00009A214EFC1D4BFF1847FF1743F600009AFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BACACACAC
+        ACACA9A9A9A4A4A46B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FF00009A2E5BF92C5FFF224DF8204BF82355FF1B46F600009AFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BB1B1B1B3B3B3AB
+        ABABAAAAAAAFAFAFA6A6A66B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A3664FA386BFF2D59F400009A00009A224CF42558FF1D49F60000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BB6B6B6B9B9B9AEAEAE6B
+        6B6B6B6B6BA9A9A9B0B0B0A7A7A76B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        00009A4071FA4274FF325DF100009AFF00FFFF00FF00009A224DF1275AFF204C
+        F800009AFF00FFFF00FFFF00FFFF00FF6B6B6BBBBBBBBEBEBEAFAFAF6B6B6BFF
+        00FFFF00FF6B6B6BA7A7A7B1B1B1AAAAAA6B6B6BFF00FFFF00FFFF00FFFF00FF
+        00009A497AFC3B66F300009AFF00FFFF00FFFF00FFFF00FF00009A2550F42655
+        FA00009AFF00FFFF00FFFF00FFFF00FF6B6B6BC0C0C0B5B5B56B6B6BFF00FFFF
+        00FFFF00FFFF00FF6B6B6BAAAAAAAEAEAE6B6B6BFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A00009AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00009A0000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      }
+      ModalResult = 2
+      NumGlyphs = 2
+      TabOrder = 1
+    end
+    object btn_Next: TBitBtn
+      Left = 368
+      Height = 25
+      Top = 5
+      Width = 75
+      Anchors = [akTop, akRight]
+      Caption = '&Next'
+      Default = True
+      Glyph.Data = {
+        36060000424D3606000000000000360000002800000020000000100000000100
+        18000000000000060000130B0000130B00000000000000000000FF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        0B7C15097A14087110056A0C04670B04670C04670C04670C04670C04670C0467
+        0C045709FF00FFFF00FFFF00FFFF00FF9C9C9C9C9C9C98989896969695959595
+        9595959595959595959595959595959595909090FF00FFFF00FFFF00FF129A28
+        1AB03A15AF3211AB270DA81F08A61808A51608A51608A61708A61708A51708AB
+        18078D12045708FF00FFFF00FFA8A8A8B0B0B0AEAEAEACACACAAAAAAA8A8A8A8
+        A8A8A8A8A8A8A8A8A8A8A8A8A8A8A9A9A9A0A0A0909090FF00FFFF00FF1BAD3C
+        25C5541EC0451ABE3A15BD3110BA270BB81D09B81909B81A09B81A09B71A09BE
+        1C08AB1704670CFF00FFFF00FFB0B0B0B9B9B9B5B5B5B4B4B4B2B2B2B0B0B0AD
+        ADADADADADADADADADADADADADADAFAFAFA9A9A9959595FF00FFFF00FF20B445
+        31C46429BF5322BB481BBA3D17B73312B4290DB3200AB21909B11809B01809B7
+        1A08A61704680CFF00FFFF00FFB3B3B3BCBCBCB8B8B8B5B5B5B3B3B3B1B1B1AF
+        AFAFADADADACACACACACACABABABADADADA8A8A8959595FF00FFFF00FF22B548
+        3FC87635C367FEFEFE23BC4E1DBA4218B838FEFEFE0EB4240AB31C09B11809B8
+        1A08A61704670CFF00FFFF00FFB3B3B3C0C0C0BCBCBCFEFEFEB5B5B5B3B3B3B1
+        B1B1FEFEFEADADADACACACACACACADADADA8A8A8959595FF00FFFF00FF21B548
+        58D08A46C97AFEFEFEFEFEFE24BD501FBB46FEFEFEFEFEFE10B4290CB21F09B7
+        1A08A61604670CFF00FFFF00FFB3B3B3CACACAC3C3C3FEFEFEFEFEFEB6B6B6B4
+        B4B4FEFEFEFEFEFEAEAEAEACACACADADADA8A8A8959595FF00FFFF00FF21B548
+        77D89F52CC813BC772FEFEFEFEFEFE26BE5421BD4AFEFEFEFEFEFE13B52D0DBA
+        230AA71804680BFF00FFFF00FFB3B3B3D5D5D5C8C8C8C0C0C0FEFEFEFEFEFEB7
+        B7B7B5B5B5FEFEFEFEFEFEB0B0B0AFAFAFA8A8A8959595FF00FFFF00FF21B548
+        8ADEAC5DD08A42C87637C56EFEFEFEFEFEFE27BF5822BD4FFEFEFEFEFEFE14BB
+        310EA922066F0EFF00FFFF00FFB3B3B3DCDCDCCCCCCCC2C2C2BEBEBEFEFEFEFE
+        FEFEB8B8B8B5B5B5FEFEFEFEFEFEB1B1B1AAAAAA989898FF00FFFF00FF21B548
+        95E0B365D28F48CA7AFEFEFEFEFEFE30C3692EC265FEFEFEFEFEFE1FBB461BBE
+        3E14AE2F0A7A14FF00FFFF00FFB3B3B3E0E0E0CECECEC4C4C4FEFEFEFEFEFEBB
+        BBBBBBBBBBFEFEFEFEFEFEB4B4B4B4B4B4ADADAD9C9C9CFF00FFFF00FF21B548
+        9DE3B96FD597FEFEFEFEFEFE40C87439C570FEFEFEFEFEFE2BC16027BF5523C0
+        4E1BB23C0D851AFF00FFFF00FFB3B3B3E3E3E3D2D2D2FEFEFEFEFEFEC1C1C1BF
+        BFBFFEFEFEFEFEFEB9B9B9B8B8B8B7B7B7B0B0B0A0A0A0FF00FFFF00FF21B548
+        A9E6C280DAA3FEFEFE59CF874DCC7E44C978FEFEFE39C57032C36B2DC1632AC2
+        5D20B548108F1FFF00FFFF00FFB3B3B3E7E7E7D8D8D8FEFEFECACACAC6C6C6C2
+        C2C2FEFEFEBFBFBFBCBCBCBABABAB9B9B9B3B3B3A4A4A4FF00FFFF00FF21B549
+        AEE8C5A6E5BF91DFAF86DBA778D79D67D39159CF8744C97836C56E32C36C30C5
+        6A27BB57139C26FF00FFFF00FFB3B3B3E9E9E9E6E6E6DFDFDFDADADAD5D5D5D0
+        D0D0CACACAC2C2C2BDBDBDBCBCBCBCBCBCB7B7B7A8A8A8FF00FFFF00FF22B548
+        92E0B3AEE8C6B1E9C8A9E6C29BE3B887DDAA6AD5964FCD823BC77436C57034C8
+        732BBF5E14A428FF00FFFF00FFB3B3B3DFDFDFE9E9E9EAEAEAE7E7E7E2E2E2DB
+        DBDBD0D0D0C7C7C7C0C0C0BDBDBDBEBEBEB9B9B9ABABABFF00FFFF00FFFF00FF
+        38BB5A51C57053C57151C56F4CC36B42C06437BC5A2EB95325B74A23B54B23B7
+        4A1AAF39FF00FFFF00FFFF00FFFF00FFBBBBBBC5C5C5C6C6C6C5C5C5C3C3C3C0
+        C0C0BBBBBBB8B8B8B5B5B5B4B4B4B4B4B4B0B0B0FF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      }
+      Layout = blGlyphRight
+      NumGlyphs = 2
+      OnClick = btn_NextClick
+      TabOrder = 2
+    end
+    object btn_Back: TBitBtn
+      Left = 288
+      Height = 25
+      Top = 5
+      Width = 75
+      Anchors = [akTop, akRight]
+      Caption = 'Back'
+      Enabled = False
+      Glyph.Data = {
+        36060000424D3606000000000000360000002800000020000000100000000100
+        18000000000000060000130B0000130B00000000000000000000FF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        0B7C15097A14087110056A0C04670B04670C04670C04670C04670C04670C0467
+        0C045709FF00FFFF00FFFF00FFFF00FF9D9D9D9C9C9C99999996969695959595
+        9595959595959595959595959595959595919191FF00FFFF00FFFF00FF129A28
+        1AB03A15AF3211AB270DA81F08A61808A51608A51608A61708A61708A51708AB
+        18078D12045708FF00FFFF00FFA8A8A8B1B1B1AEAEAEADADADAAAAAAA9A9A9A8
+        A8A8A8A8A8A9A9A9A9A9A9A8A8A8A9A9A9A1A1A1919191FF00FFFF00FF1BAD3C
+        25C5541EC0451ABE3A15BD3110BA270BB81D09B81909B81A09B81A09B71A09BE
+        1C08AB1704670CFF00FFFF00FFB0B0B0B9B9B9B6B6B6B4B4B4B2B2B2B1B1B1AE
+        AEAEADADADADADADADADADADADADAFAFAFA9A9A9959595FF00FFFF00FF20B445
+        31C46429BF5322BB481BBA3D17B73312B4290DB3200AB21909B11809B01809B7
+        1A08A61704680CFF00FFFF00FFB3B3B3BCBCBCB9B9B9B5B5B5B3B3B3B1B1B1AF
+        AFAFADADADADADADACACACABABABADADADA9A9A9969696FF00FFFF00FF22B548
+        3FC87635C3672BBF5723BC4E1DBA42FEFEFE13B72E0EB4240AB31CFEFEFE09B8
+        1A08A61704670CFF00FFFF00FFB4B4B4C1C1C1BDBDBDB9B9B9B6B6B6B4B4B4FE
+        FEFEB1B1B1AEAEAEADADADFEFEFEADADADA9A9A9959595FF00FFFF00FF21B548
+        58D08A46C97A34C5692CBF5DFEFEFEFEFEFE1ABA3D16B733FEFEFEFEFEFE09B7
+        1A08A61604670CFF00FFFF00FFB4B4B4CBCBCBC3C3C3BDBDBDB9B9B9FEFEFEFE
+        FEFEB3B3B3B1B1B1FEFEFEFEFEFEADADADA9A9A9959595FF00FFFF00FF21B548
+        77D89F52CC813BC772FEFEFEFEFEFE26BE5421BD4AFEFEFEFEFEFE13B52D0DBA
+        230AA71804680BFF00FFFF00FFB4B4B4D5D5D5C8C8C8C0C0C0FEFEFEFEFEFEB8
+        B8B8B6B6B6FEFEFEFEFEFEB0B0B0AFAFAFA9A9A9969696FF00FFFF00FF21B548
+        8ADEAC5DD08AFEFEFEFEFEFE2FC3682CC162FEFEFEFEFEFE1EBB4418B93A14BB
+        310EA922066F0EFF00FFFF00FFB4B4B4DDDDDDCCCCCCFEFEFEFEFEFEBCBCBCBA
+        BABAFEFEFEFEFEFEB4B4B4B2B2B2B1B1B1ABABAB989898FF00FFFF00FF21B548
+        95E0B365D28F48CA7AFEFEFEFEFEFE30C3692EC265FEFEFEFEFEFE1FBB461BBE
+        3E14AE2F0A7A14FF00FFFF00FFB4B4B4E0E0E0CECECEC5C5C5FEFEFEFEFEFEBC
+        BCBCBBBBBBFEFEFEFEFEFEB5B5B5B4B4B4AEAEAE9D9D9DFF00FFFF00FF21B548
+        9DE3B96FD59757CE854ECC7FFEFEFEFEFEFE35C56D30C368FEFEFEFEFEFE23C0
+        4E1BB23C0D851AFF00FFFF00FFB4B4B4E3E3E3D2D2D2C9C9C9C7C7C7FEFEFEFE
+        FEFEBDBDBDBCBCBCFEFEFEFEFEFEB7B7B7B1B1B1A1A1A1FF00FFFF00FF21B548
+        A9E6C280DAA35ED08A59CF874DCC7EFEFEFE43C87739C57032C36BFEFEFE2AC2
+        5D20B548108F1FFF00FFFF00FFB4B4B4E7E7E7D9D9D9CDCDCDCBCBCBC6C6C6FE
+        FEFEC2C2C2BFBFBFBCBCBCFEFEFEBABABAB3B3B3A4A4A4FF00FFFF00FF21B549
+        AEE8C5A6E5BF91DFAF86DBA778D79D67D39159CF8744C97836C56E32C36C30C5
+        6A27BB57139C26FF00FFFF00FFB4B4B4E9E9E9E6E6E6DFDFDFDADADAD5D5D5D0
+        D0D0CBCBCBC3C3C3BDBDBDBCBCBCBCBCBCB7B7B7A9A9A9FF00FFFF00FF22B548
+        92E0B3AEE8C6B1E9C8A9E6C29BE3B887DDAA6AD5964FCD823BC77436C57034C8
+        732BBF5E14A428FF00FFFF00FFB4B4B4E0E0E0E9E9E9EBEBEBE7E7E7E3E3E3DC
+        DCDCD1D1D1C7C7C7C0C0C0BDBDBDBEBEBEB9B9B9ABABABFF00FFFF00FFFF00FF
+        38BB5A51C57053C57151C56F4CC36B42C06437BC5A2EB95325B74A23B54B23B7
+        4A1AAF39FF00FFFF00FFFF00FFFF00FFBCBCBCC5C5C5C6C6C6C5C5C5C3C3C3C0
+        C0C0BCBCBCB8B8B8B5B5B5B4B4B4B5B5B5B0B0B0FF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      }
+      NumGlyphs = 2
+      OnClick = btn_BackClick
+      TabOrder = 3
+    end
+  end
+end
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDADataTableMasterLinkWizardForm_laz.lrs b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDADataTableMasterLinkWizardForm_laz.lrs
new file mode 100644
index 0000000..7f2e250
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDADataTableMasterLinkWizardForm_laz.lrs	
@@ -0,0 +1,831 @@
+{ This is an automatically generated lazarus resource file }
+
+LazarusResources.Add('TDADataTableMasterLinkWizard','FORMDATA',[
+  'TPF0'#28'TDADataTableMasterLinkWizard'#27'DADataTableMasterLinkWizard'#4'Lef'
+  +'t'#3#232#1#6'Height'#3#3#2#3'Top'#3#173#0#5'Width'#3#192#1#18'HorzScrollBar'
+  +'.Page'#3#191#1#18'VertScrollBar.Page'#3#2#2#13'ActiveControl'#7#8'pc_Pages'
+  +#7'Caption'#6#5'Form1'#12'ClientHeight'#3#3#2#11'ClientWidth'#3#192#1#11'Fon'
+  +'t.Height'#2#245#9'Font.Name'#6#13'MS Sans Serif'#8'OnCreate'#7#10'FormCreat'
+  +'e'#9'OnDestroy'#7#11'FormDestroy'#10'LCLVersion'#6#6'0.9.25'#0#6'TBevel'#6
+  +'Bevel1'#6'Height'#2#2#3'Top'#2'*'#5'Width'#3#192#1#5'Align'#7#5'alTop'#5'Sh'
+  +'ape'#7#12'bsBottomLine'#0#0#6'TLabel'#7'Label16'#4'Left'#2#8#6'Height'#2#16
+  +#3'Top'#3'n'#1#5'Width'#2'V'#7'Caption'#6#13'Mapping Mode:'#11'ParentColor'#8
+  +#0#0#6'TPanel'#6'Panel1'#6'Height'#2'*'#5'Width'#3#192#1#5'Align'#7#5'alTop'
+  +#10'BevelOuter'#7#6'bvNone'#12'ClientHeight'#2'*'#11'ClientWidth'#3#192#1#5
+  +'Color'#7#7'clWhite'#11'ParentColor'#8#8'TabOrder'#2#0#0#6'TImage'#6'Image1'
+  +#4'Left'#2#5#6'Height'#2' '#3'Top'#2#5#5'Width'#2' '#12'Picture.Data'#10#11
+  +'"'#0#0#5'TIcon'#1'"'#0#0'/* XPM */'#10'static char *graphic[] = {'#10'"48 4'
+  +'8 241 2",'#10'".. c None",'#10'"., c #666666",'#10'".- c #656565",'#10'".* '
+  +'c #636363",'#10'".a c #616161",'#10'".b c #606060",'#10'".c c #5E5E5E",'#10
+  +'".d c #5D5D5D",'#10'".e c #5B5B5B",'#10'".f c #595959",'#10'".g c #585858",'
+  +#10'".h c #575757",'#10'".i c #555555",'#10'".j c #535353",'#10'".k c #52525'
+  +'2",'#10'".l c #696969",'#10'".m c #686868",'#10'".n c #505050",'#10'".o c #'
+  +'4F4F4F",'#10'".p c #4D4D4D",'#10'".q c #4B4B4B",'#10'".r c #4A4A4A",'#10'".'
+  +'s c #484848",'#10'".t c #464646",'#10'".u c #6A6A6A",'#10'".v c #474747",'
+  +#10'".w c #454545",'#10'".x c #444444",'#10'".y c #424242",'#10'".z c #6B6B6'
+  +'B",'#10'".A c #67825C",'#10'".B c #6DA458",'#10'".C c #70C452",'#10'".D c #'
+  +'71DB4C",'#10'".E c #6DE048",'#10'".F c #67DD44",'#10'".G c #61D940",'#10'".'
+  +'H c #5BD53D",'#10'".I c #56D139",'#10'".J c #50B63A",'#10'".K c #4C9B3C",'
+  +#10'".L c #497A41",'#10'".M c #4A5349",'#10'".N c #404040",'#10'".O c #3F3F3'
+  +'F",'#10'".P c #646B61",'#10'".Q c #74A95D",'#10'".R c #7FDD58",'#10'".S c #'
+  +'7EEC53",'#10'".T c #78E850",'#10'".U c #73E44C",'#10'".V c #50CD35",'#10'".'
+  +'W c #4ACA31",'#10'".X c #44C62D",'#10'".Y c #3FC22A",'#10'".Z c #39BE26",'
+  +#10'".0 c #3A972D",'#10'".1 c #40623C",'#10'".2 c #3D3D3D",'#10'".3 c #3C3C3'
+  +'C",'#10'".4 c #78AC60",'#10'".5 c #87EA5B",'#10'".6 c #84EF57",'#10'".7 c #'
+  +'34BB22",'#10'".8 c #2EB71E",'#10'".9 c #28B31A",'#10'".@ c #2A9422",'#10'".'
+  +'# c #3B5639",'#10'".; c #3A3A3A",'#10'".: c #383838",'#10'".= c #6C7F63",'
+  +#10'".+ c #86DA5F",'#10'".% c #8AF35B",'#10'".$ c #22AF16",'#10'".( c #1CAC1'
+  +'3",'#10'".) c #17A80F",'#10'".[ c #277125",'#10'".] c #373737",'#10'",. c #'
+  +'353535",'#10'",, c #759B62",'#10'",- c #8FF75F",'#10'",* c #11A40B",'#10'",'
+  +'a c #0BA007",'#10'",b c #138412",'#10'",c c #364036",'#10'",d c #343434",'
+  +#10'",e c #323232",'#10'",f c #059D04",'#10'",g c #009900",'#10'",h c #0A850'
+  +'A",'#10'",i c #333D33",'#10'",j c #303030",'#10'",k c #2F2F2F",'#10'",l c #'
+  +'009700",'#10'",m c #009500",'#10'",n c #0A810A",'#10'",o c #2E2E2E",'#10'",'
+  +'p c #8CED5F",'#10'",q c #009300",'#10'",r c #009100",'#10'",s c #136C13",'
+  +#10'",t c #2C2C2C",'#10'",u c #2A2A2A",'#10'",v c #008F00",'#10'",w c #008D0'
+  +'0",'#10'",x c #204C20",'#10'",y c #292929",'#10'",z c #42A432",'#10'",A c #'
+  +'3EA12F",'#10'",B c #3E8235",'#10'",C c #3B7F32",'#10'",D c #35832D",'#10'",'
+  +'E c #2B9422",'#10'",F c #26911F",'#10'",G c #008B00",'#10'",H c #028402",'
+  +#10'",I c #293229",'#10'",J c #272727",'#10'",K c #262626",'#10'",L c #4D9C3'
+  +'C",'#10'",M c #4C6447",'#10'",N c #2E5C2C",'#10'",O c #008900",'#10'",P c #'
+  +'008700",'#10'",Q c #155815",'#10'",R c #242424",'#10'",S c #4E7D44",'#10'",'
+  +'T c #0E7F0E",'#10'",U c #008500",'#10'",V c #027E02",'#10'",W c #222222",'
+  +#10'",X c #212121",'#10'",Y c #1B661B",'#10'",Z c #008400",'#10'",0 c #00820'
+  +'0",'#10'",1 c #174717",'#10'",2 c #1F1F1F",'#10'",3 c #65795D",'#10'",4 c #'
+  +'1B641B",'#10'",5 c #008000",'#10'",6 c #0B620B",'#10'",7 c #1E1E1E",'#10'",'
+  +'8 c #1A621A",'#10'",9 c #007E00",'#10'",@ c #027702",'#10'",# c #1C1C1C",'
+  +#10'",; c #1B1B1B",'#10'",: c #55B93E",'#10'",= c #519741",'#10'",+ c #4D8C4'
+  +'0",'#10'",% c #4B6B45",'#10'",$ c #486943",'#10'",( c #466741",'#10'",) c #'
+  +'196019",'#10'",[ c #007C00",'#10'",] c #007A00",'#10'"-. c #193019",'#10'"-'
+  +', c #1A1A1A",'#10'"-- c #191919",'#10'"-* c #589C47",'#10'"-a c #52624F",'
+  +#10'"-b c #185F18",'#10'"-c c #007800",'#10'"-d c #143914",'#10'"-e c #17171'
+  +'7",'#10'"-f c #59A445",'#10'"-g c #1D511D",'#10'"-h c #0E6D0E",'#10'"-i c #'
+  +'155A15",'#10'"-j c #145614",'#10'"-k c #0E600E",'#10'"-l c #076F07",'#10'"-'
+  +'m c #007600",'#10'"-n c #0E480E",'#10'"-o c #161616",'#10'"-p c #549245",'
+  +#10'"-q c #202820",'#10'"-r c #0C590C",'#10'"-s c #007400",'#10'"-t c #0D460'
+  +'D",'#10'"-u c #141414",'#10'"-v c #518F43",'#10'"-w c #007300",'#10'"-x c #'
+  +'0C450C",'#10'"-y c #131313",'#10'"-z c #007100",'#10'"-A c #0B430B",'#10'"-'
+  ,'B c #111111",'#10'"-C c #49893D",'#10'"-D c #006F00",'#10'"-E c #0C3C0C",'
+  +#10'"-F c #0F0F0F",'#10'"-G c #50AE3B",'#10'"-H c #45873B",'#10'"-I c #006D0'
+  +'0",'#10'"-J c #0F2A0F",'#10'"-K c #0E0E0E",'#10'"-L c #428438",'#10'"-M c #'
+  +'006B00",'#10'"-N c #111811",'#10'"-O c #0C0C0C",'#10'"-P c #035903",'#10'"-'
+  +'Q c #006900",'#10'"-R c #074207",'#10'"-S c #0B0B0B",'#10'"-T c #377C30",'
+  +#10'"-U c #006700",'#10'"-V c #0D1A0D",'#10'"-W c #090909",'#10'"-X c #337A2'
+  +'D",'#10'"-Y c #044B04",'#10'"-Z c #080808",'#10'"-0 c #30772B",'#10'"-1 c #'
+  +'006600",'#10'"-2 c #0A230A",'#10'"-3 c #2C7428",'#10'"-4 c #053F05",'#10'"-'
+  +'5 c #060606",'#10'"-6 c #1A391A",'#10'"-7 c #163D16",'#10'"-8 c #104C10",'
+  +#10'"-9 c #050505",'#10'"-@ c #040404",'#10'"-# c #036403",'#10'"-; c #0B410'
+  +'B",'#10'"-: c #101D10",'#10'"-= c #0E150E",'#10'"-+ c #0C190C",'#10'"-% c #'
+  +'015A01",'#10'"-$ c #0A1D0A",'#10'"-( c #030303",'#10'"-) c #164416",'#10'"-'
+  +'[ c #027502",'#10'"-] c #0B120B",'#10'"*. c #243424",'#10'"*, c #145414",'
+  +#10'"*- c #135313",'#10'"** c #096709",'#10'"*a c #0B1E0B",'#10'"*b c #09370'
+  +'9",'#10'"*c c #0D0D0D",'#10'"..............................................'
+  +'..................................................",'#10'".................'
+  +'..................,.-.*.a.b.c.d.e.f.g.h.i.j.k..............................'
+  +'....",'#10'".............................l.m.,.-.*.a.b.c.d.e.f.g.h.i.j.k.n.'
+  +'o.p.q............................",'#10'"...........................l.m.,.-'
+  +'.*.a.b.c.d.e.f.g.h.i.j.k.n.o.p.q.r.s.t........................",'#10'".....'
+  +'..................u.l.m.,.-.*.a.b.c.d.e.f.g.h.i.j.k.n.o.p.q.r.s.v.w.x.y....'
+  +'................",'#10'"...................z.u.l.m.,.-.*.a.b.A.B.C.D.E.F.G.'
+  +'H.I.J.K.L.M.r.s.v.w.x.y.N.O..................",'#10'".................z.u.l'
+  +'.m.,.-.*.P.Q.R.S.T.U.E.F.G.H.I.V.W.X.Y.Z.0.1.w.x.y.N.O.2.3................"'
+  +','#10'"...............z.u.l.m.,.-.*.4.5.6.S.T.U.E.F.G.H.I.V.W.X.Y.Z.7.8.9.@'
+  +'.#.N.O.2.3.;.:..............",'#10'".............z.u.l.m.,.-.=.+.%.6.S.T.U.'
+  +'E.F.G.H.I.V.W.X.Y.Z.7.8.9.$.(.).[.2.3.;.:.],.............",'#10'"..........'
+  +'.z.u.l.m.,.-,,,-.%.6.S.T.U.E.F.G.H.I.V.W.X.Y.Z.7.8.9.$.(.),*,a,b,c.:.],.,d,'
+  +'e..........",'#10'"...........u.l.m.,.-,,,-.%.6.S.T.U.E.F.G.H.I.V.W.X.Y.Z.7'
+  +'.8.9.$.(.),*,a,f,g,h,i,.,d,e,j,k........",'#10'".........u.l.m.,.-,,,-.%.6.'
+  +'S.T.U.E.F.G.H.I.V.W.X.Y.Z.7.8.9.$.(.),*,a,f,g,l,m,n,d,e,j,k,o........",'#10
+  +'".........l.m.,.-.=,p.%.6.S.T.U.E.F.G.H.I.V.W.X.Y.Z.7.8.9.$.(.),*,a,f,g,l,m'
+  +',q,r,s,j,k,o,t,u......",'#10'".......l.m.,.-.*.+.%.6.S.T.U.E.F.G.H.I.V.W.X.'
+  +'Y.Z.7.8.9.$.(.),*,a,f,g,l,m,q,r,v,w,x,o,t,u,y......",'#10'".......m.,.-.*.4'
+  +'.%.6.S.T.U.E.F.G.H.I.V.W.X,z,A,B,C,D,E,F.),*,a,f,g,l,m,q,r,v,w,G,H,I,u,y,J,'
+  +'K....",'#10'".....m.,.-.*.P.5.6.S.T.U.E.F.G.H.I.V,L,M.q.r.s.v.w.x.y.N.O,N,b'
+  +',g,l,m,q,r,v,w,G,O,P,Q,y,J,K,R....",'#10'".....,.-.*.a.Q.6.S.T.U.E.F.G.H.I.'
+  +'V,S.p.q.r.s.v.w.x.y.N.O.2.3.;,T,m,q,r,v,w,G,O,P,U,V,J,K,R,W,X..",'#10'"...,'
+  +'.-.*.a.b.R.S.T.U.E.F.G.H.I.V.W.p.q.r.s.v.w.x.y.N.O.2.3.;.:,Y,q,r,v,w,G,O,P,'
+  +'U,Z,0,1,R,W,X,2..",'#10'"...-.*.a.b,3.S.T.U.E.F.G.H.I.V.W.X.q.r.s.v.w.x.y.N'
+  +'.O.2.3.;.:.],4,r,v,w,G,O,P,U,Z,0,5,6,W,X,2,7..",'#10'"...*.a.b.c.B.T.U.E.F.'
+  +'G.H.I.V.W.X.Y.r.s.v.w.x.y.N.O.2.3.;.:.],.,8,v,w,G,O,P,U,Z,0,5,9,@,X,2,7,#,;'
+  +'",'#10'"...a.b.c.d.C.U.E.F.G.H,:,=,+,%,$,(.s.v.w.x.y.N.O.2.3.;.:.],.,d,),w,'
+  +'G,O,P,U,Z,0,5,9,[,]-.,7,#-,--",'#10'"...b.c.d.e.D.E.F.G-*-a.n.o.p.q.r.s.v.w'
+  +'.x.y.N.O.2.3.;.:.],.,d,e-b,G,O,P,U,Z,0,5,9,[,]-c-d,#-,---e",'#10'"...c.d.e.'
+  +'f.E.F.G-f.k.n.o.p.q.r.s.v.w.x.y.N.O.2.3.;.:.],.,d,e,j-g-h-i,Q-j-k-l,9,[,]-c'
+  +'-m-n-,---e-o",'#10'"...d.e.f.g.F.G.H-p.n.o.p.q.r.s.v.w.x.y.N.O.2.3.;.:.],.,'
+  +'d,e,j,k,o,t,u,y,J,K,R-q-r-c-m-s-t---e-o-u",'#10'"...e.f.g.h.G.H.I-v.o.p.q.r'
+  +'.s.v.w.x.y.N.O.2.3.;.:.],.,d,e,j,k,o,t,u,y,J,K,R,W,X,2-m-s-w-x-e-o-u-y",'#10
+  +'"...f.g.h.i.H.I.V,+.p.q.r.s.v.w.x.y.N.O.2.3.;.:.],.,d,e,j,k,o,t,u,y,J,K,R,W'
+  +',X,2,7-s-w-z-A-o-u-y-B",'#10'"...g.h.i.j.I.V.W-C.q.r.s.v.w.x.y.N.O.2.3.;.:.'
+  +'],.,d,e,j,k,o,t,u,y,J,K,R,W,X,2,7,#-w-z-D-E-u-y-B-F",'#10'"...h.i.j.k-G.W.X'
+  +'-H.r.s.v.w.x.y.N.O.2.3.;.:.],.,d,e,j,k,o,t,u,y,J,K,R,W,X,2,7,#-,-z-D-I-J-y-'
+  +'B-F-K",'#10'"...i.j.k.n.K.X.Y-L.s.v.w.x.y.N.O.2.3.;.:.],.,d,e,j,k,o,t,u,y,J'
+  +',K,R,W,X,2,7,#-,---D-I-M-N-B-F-K-O",'#10'"...j.k.n.o.L.Y.Z,B.v.w.x.y.N.O.2.'
+  +'3.;.:.],.,d,e,j,k,o,t,u,y,J,K,R,W,X,2,7,#-,---e-I-M-P-B-F-K-O..",'#10'"...k'
+  +'.n.o.p.M.Z.7,C.w.x.y.N.O.2.3.;.:.],.,d,e,j,k,o,t,u,y,J,K,R,W,X,2,7,#-,---e-'
+  +'o-M-Q-R-F-K-O-S..",'#10'".....o.p.q.r.0.8-T.x.y.N.O.2.3.;.:.],.,d,e,j,k,o,t'
+  +',u,y,J,K,R,W,X,2,7,#-,---e-o-u-Q-U-V-K-O-S-W..",'#10'".....p.q.r.s.1.9-X.y.'
+  +'N.O.2.3.;.:.],.,d,e,j,k,o,t,u,y,J,K,R,W,X,2,7,#-,---e-o-u-y-U-Y-K-O-S-W-Z..'
+  +'",'#10'".....q.r.s.v.w.@-0.N.O.2.3.;.:.],.,d,e,j,k,o,t,u,y,J,K,R,W,X,2,7,#-'
+  +',---e-o-u-y-B-1-2-O-S-W-Z....",'#10'".......s.v.w.x.#-3.O.2.3.;.:.],.,d,e,j'
+  +',k,o,t,u,y,J,K,R,W,X,2,7,#-,---e-o-u-y-B-F-4-O-S-W-Z-5....",'#10'".......t.'
+  +'w.x.y.N.O.2.3.;.:.],.,d,e,j,k,o,t,u,y,J,K,R-6-7-8,7,#-,---e-o-u-y-B-F-K-O-S'
+  ,'-W-Z-5......",'#10'".........x.y.N.O.2.3.;.:.],.,d,e,j,k,o,t,u,y,J,5,9,[,]-'
+  +'c-m,#-,---e-o-u-y-B-F-K-O-S-W-Z-5-9......",'#10'".........y.N.O.2.3.;.:.],.'
+  +',d,e,j,k,o,t,u,y,J,K,9,[,]-c-m-s-t---e-o-u-y-B-F-K-O-S-W-Z-5-@........",'#10
+  +'"...........O.2.3.;.:.],.,d,e,j,k,o,t,u,y,J,K,R,[,]-c-m-s-w-z-#-;-J-:-B-=-+'
+  +'-O-S-W-Z-5-@..........",'#10'".............3.;.:.],.,d,e,j,k,o,t,u,y,J,K,R-'
+  +'6,]-c-m-s-w-z-D-I-M-Q-U-1-%-$-S-W-Z-5-@-(..........",'#10'"...............:'
+  +'.],.,d,e,j,k,o,t,u,y,J,K,R-)-[-c-m-s-w-z-D-I-M-Q-U-1-4-]-S-W-Z-5-@-(.......'
+  +'.....",'#10'"................,.,d,e,j,k,o,t,u*.*,*-**,[,]-c-m-s-w-z-D-I-M-Q'
+  +'-U-Y*a-O-S-W-Z-5-@-(..............",'#10'"..................,e,j,k,o,t,u,y,'
+  +'J,1,6,@,]-c-m-s-w-z-D-I-M-P*b-V-K-O-S-W-Z-5-@-(................",'#10'"....'
+  +'................,k,o,t,u,y,J,K,R,W,X-.-d-n-t-x-A-E-J-N-B-F-K-O-S-W-Z-5-@...'
+  +'.................",'#10'"........................,u,y,J,K,R,W,X,2,7,#-,---e'
+  +'-o-u-y-B-F-K-O-S-W-Z-5-9......................",'#10'".....................'
+  +'.......,K,R,W,X,2,7,#-,---e-o-u-y-B-F-K-O-S-W-Z-5..........................'
+  +'",'#10'"................................,X,2,7,#-,---e-o-u-y-B-F-K-O-S-W-Z.'
+  +'.............................",'#10'"......................................'
+  +',;---e-o-u-y-B-F-K*c......................................"}'#10#12'Proport'
+  +'ional'#9#7'Stretch'#9#11'Transparent'#8#0#0#6'TLabel'#6'Label1'#4'Left'#2'+'
+  +#6'Height'#2#14#3'Top'#2#5#5'Width'#3#222#0#7'Caption'#6'%Data Table Master/'
+  +'Detail Setup Wizard'#11'Font.Height'#2#245#9'Font.Name'#6#6'Tahoma'#10'Font'
+  +'.Style'#11#6'fsBold'#0#11'ParentColor'#8#0#0#6'TLabel'#6'Label2'#4'Left'#2
+  +'-'#6'Height'#2#16#3'Top'#2#21#5'Width'#3'K'#1#7'Caption'#6'@This wizard wil'
+  +'l help you configure a master/detail relationship'#11'ParentColor'#8#0#0#0
+  +#12'TPageControl'#8'pc_Pages'#6'Height'#3#180#1#3'Top'#2','#5'Width'#3#192#1
+  +#10'ActivePage'#7#9'ts_Params'#5'Align'#7#8'alClient'#8'TabIndex'#2#4#8'TabO'
+  +'rder'#2#1#0#9'TTabSheet'#10'ts_Welcome'#7'Caption'#6#7'Welcome'#12'ClientHe'
+  +'ight'#3#154#1#11'ClientWidth'#3#184#1#0#6'TLabel'#6'Label3'#4'Left'#2#8#6'H'
+  +'eight'#2#14#3'Top'#2#8#5'Width'#3':'#1#7'Caption'#6'4Welcome to the Data Ta'
+  +'ble Master/Detail Setup Wizard'#11'Font.Height'#2#245#9'Font.Name'#6#6'Taho'
+  +'ma'#10'Font.Style'#11#6'fsBold'#0#11'ParentColor'#8#0#0#6'TLabel'#6'Label4'
+  +#4'Left'#2#24#6'Height'#2'.'#3'Top'#2#24#5'Width'#3'^'#1#7'Caption'#6#195'Th'
+  +'is wizard will help you set up a Master/Detail relationship by choosing a M'
+  +'aster Source for the selected data table and defining how the relationshop '
+  +'between master and detail tables is mapped.'#11'ParentColor'#8#8'WordWrap'#9
+  +#0#0#6'TLabel'#7'Label24'#4'Left'#2#24#6'Height'#2#16#3'Top'#2'H'#5'Width'#3
+  +#243#0#7'Caption'#6'0This wizard will affect the following properties'#11'Pa'
+  +'rentColor'#8#0#0#6'TLabel'#7'Label25'#4'Left'#2' '#6'Height'#2#16#3'Top'#2
+  +'X'#5'Width'#2'Q'#7'Caption'#6#14'- MasterSource'#11'ParentColor'#8#0#0#6'TL'
+  +'abel'#7'Label26'#4'Left'#2' '#6'Height'#2#16#3'Top'#2'h'#5'Width'#3#161#0#7
+  +'Caption'#6#31'- MasterFields and DetailFields'#11'ParentColor'#8#0#0#6'TLab'
+  +'el'#7'Label27'#4'Left'#2' '#6'Height'#2#16#3'Top'#3#136#0#5'Width'#3#137#0#7
+  +'Caption'#6#22'- MasterParamsMappings'#11'ParentColor'#8#0#0#6'TLabel'#7'Lab'
+  +'el28'#4'Left'#2' '#6'Height'#2#16#3'Top'#3#152#0#5'Width'#3#135#0#7'Caption'
+  +#6#22'- MasterRequestMapping'#11'ParentColor'#8#0#0#6'TLabel'#7'Label29'#4'L'
+  +'eft'#2' '#6'Height'#2#16#3'Top'#2'x'#5'Width'#2'|'#7'Caption'#6#19'- Master'
+  +'MappingMode'#11'ParentColor'#8#0#0#0#9'TTabSheet'#15'ts_MasterSource'#7'Cap'
+  +'tion'#6#15'ts_MasterSource'#12'ClientHeight'#3#154#1#11'ClientWidth'#3#184#1
+  +#10'ImageIndex'#2#6#0#6'TLabel'#6'Label8'#4'Left'#2#8#6'Height'#2#14#3'Top'#2
+  +#8#5'Width'#2'j'#7'Caption'#6#17'Pick MasterSource'#11'Font.Height'#2#245#9
+  +'Font.Name'#6#6'Tahoma'#10'Font.Style'#11#6'fsBold'#0#11'ParentColor'#8#0#0#6
+  +'TLabel'#6'Label9'#4'Left'#2#24#6'Height'#2#16#3'Top'#2#24#5'Width'#3'1'#1#7
+  +'Caption'#6'=Select the data table to use as master source for this table:'
+  +#11'ParentColor'#8#0#0#6'TLabel'#7'Label10'#4'Left'#2#8#6'Height'#2#14#3'Top'
+  +#2'P'#5'Width'#2''#7'Caption'#6#19'Choose Mapping Mode'#11'Font.Height'#2
+  +#245#9'Font.Name'#6#6'Tahoma'#10'Font.Style'#11#6'fsBold'#0#11'ParentColor'#8
+  +#0#0#6'TLabel'#7'Label17'#4'Left'#2#24#6'Height'#2#16#3'Top'#2'`'#5'Width'#3
+  +#147#1#7'Caption'#6'KSelect what method you want to use fetch detail data fo'
+  +'r your master source'#11'ParentColor'#8#0#0#6'TLabel'#11'lbl_Params1'#4'Lef'
+  +'t'#2'*'#6'Height'#2'.'#3'Top'#3#204#0#5'Width'#3'V'#1#7'Caption'#6#187'Mast'
+  +'er key fields will be passed as parameters when fetching detail data. Use t'
+  +'his if you''re talking to a standard DA server, and have defined Parameters'
+  +' in data table inside your schema.'#11'ParentColor'#8#8'WordWrap'#9#0#0#6'T'
+  +'Label'#11'lbl_Params2'#4'Left'#2'*'#6'Height'#2#31#3'Top'#3#248#0#5'Width'#3
+  +#254#0#7'Caption'#6'\Your detail data will be fetched via the standard DataR'
+  ,'equestCall, just like any data table.'#11'ParentColor'#8#8'WordWrap'#9#0#0#6
+  +'TLabel'#11'lbl_Method1'#4'Left'#2'*'#6'Height'#2#16#3'Top'#3'D'#1#5'Width'#3
+  +#139#1#7'Caption'#6'JData will be retrieved using a custom method you provid'
+  +'ed in your service.'#11'ParentColor'#8#0#0#6'TLabel'#11'lbl_Method2'#4'Left'
+  +#2'*'#6'Height'#2#23#3'Top'#3'X'#1#5'Width'#3'Z'#1#7'Caption'#6'|This option'
+  +' is only available if the detail table uses a separate RemoteDataAdapter co'
+  +'mponent with a custom DataRequestCall.'#10'Font.Color'#7#10'clGrayText'#11
+  +'Font.Height'#2#247#9'Font.Name'#6#6'Tahoma'#11'ParentColor'#8#8'WordWrap'#9
+  +#0#0#6'TLabel'#11'lbl_Params3'#4'Left'#2'*'#6'Height'#2#12#3'Top'#3#26#1#5'W'
+  +'idth'#3'+'#1#7'Caption'#6'KThis option is only available if your detail dat'
+  +'a table defines parameters.'#10'Font.Color'#7#10'clGrayText'#11'Font.Height'
+  +#2#247#9'Font.Name'#6#6'Tahoma'#11'ParentColor'#8#8'WordWrap'#9#0#0#6'TLabel'
+  +#10'lbl_Where1'#4'Left'#2'*'#6'Height'#2#16#3'Top'#3#140#0#5'Width'#3'9'#1#7
+  +'Caption'#6'?A where clause will be passed to retrieve filtered detail data.'
+  +#11'ParentColor'#8#0#0#6'TLabel'#10'lbl_Where2'#4'Left'#2'*'#6'Height'#2#12#3
+  +'Top'#3#160#0#5'Width'#3#176#0#7'Caption'#6'&Recommended for Version 5.0 and'
+  +' above.'#10'Font.Color'#7#10'clGrayText'#11'Font.Height'#2#247#9'Font.Name'
+  +#6#6'Tahoma'#11'ParentColor'#8#0#0#9'TComboBox'#14'cb_DataSources'#4'Left'#2
+  +#24#6'Height'#2#21#3'Top'#2'('#5'Width'#3'!'#1#16'AutoCompleteText'#11#22'cb'
+  +'actEndOfLineComplete'#20'cbactSearchAscending'#0#10'ItemHeight'#2#13#8'OnCh'
+  +'ange'#7#20'cb_DataSourcesChange'#5'Style'#7#14'csDropDownList'#8'TabOrder'#2
+  +#0#0#0#12'TRadioButton'#8'rb_Where'#4'Left'#2#24#6'Height'#2#21#3'Top'#2'x'#5
+  +'Width'#3#187#0#7'Caption'#6#29'Using automatic WHERE clauses'#8'OnChange'#7
+  +#20'cb_DataSourcesChange'#8'TabOrder'#2#1#0#0#12'TRadioButton'#9'rb_Params'#4
+  +'Left'#2#24#6'Height'#2#21#3'Top'#3#184#0#5'Width'#3#134#0#7'Caption'#6#21'U'
+  +'sing data parameters'#8'OnChange'#7#20'cb_DataSourcesChange'#8'TabOrder'#2#2
+  +#0#0#12'TRadioButton'#9'rb_Method'#4'Left'#2#24#6'Height'#2#21#3'Top'#3'0'#1
+  +#5'Width'#3#158#0#7'Caption'#6#26'Using a custom method call'#8'OnChange'#7
+  +#20'cb_DataSourcesChange'#8'TabOrder'#2#3#0#0#0#9'TTabSheet'#9'ts_Fields'#7
+  +'Caption'#6#9'ts_Fields'#12'ClientHeight'#3#154#1#11'ClientWidth'#3#184#1#10
+  +'ImageIndex'#2#3#0#6'TLabel'#15'labMasterFields'#4'Left'#2#24#6'Height'#2#16
+  +#3'Top'#2'\'#5'Width'#2'I'#7'Caption'#6#15'&Master Fields:'#12'FocusControl'
+  +#7#8'lbMaster'#11'ParentColor'#8#0#0#6'TLabel'#15'labDetailFields'#4'Left'#3
+  +#0#1#6'Height'#2#16#3'Top'#2'\'#5'Width'#2'C'#7'Caption'#6#15'&Detail Fields'
+  +':'#12'FocusControl'#7#8'lbDetail'#11'ParentColor'#8#0#0#6'TLabel'#7'Label13'
+  +#4'Left'#2#24#6'Height'#2#16#3'Top'#3'C'#1#5'Width'#2'F'#7'Caption'#6#13'Mas'
+  +'terFields:'#12'FocusControl'#7#13'eMasterFields'#11'ParentColor'#8#0#0#6'TL'
+  +'abel'#7'Label14'#4'Left'#2#24#6'Height'#2#16#3'Top'#3'['#1#5'Width'#2'@'#7
+  +'Caption'#6#13'DetailFields:'#12'FocusControl'#7#13'eDetailFields'#11'Parent'
+  +'Color'#8#0#0#6'TLabel'#7'Label18'#4'Left'#2#8#6'Height'#2#14#3'Top'#2#8#5'W'
+  +'idth'#2's'#7'Caption'#6#20'Master/Detail Fields'#11'Font.Height'#2#245#9'Fo'
+  +'nt.Name'#6#6'Tahoma'#10'Font.Style'#11#6'fsBold'#0#11'ParentColor'#8#0#0#6
+  +'TLabel'#7'Label19'#4'Left'#2#24#6'Height'#2#16#3'Top'#2#24#5'Width'#3'_'#1#7
+  +'Caption'#6'FPlease select the fields that describe the Master/Detail relati'
+  +'onship.'#11'ParentColor'#8#0#0#8'TListBox'#8'lbMaster'#4'Left'#2#22#6'Heigh'
+  +'t'#3#209#0#3'Top'#2'l'#5'Width'#3#164#0#10'ItemHeight'#2#13#11'MultiSelect'
+  +#9#8'TabOrder'#2#0#0#0#8'TListBox'#8'lbDetail'#4'Left'#3#254#0#6'Height'#3
+  +#209#0#3'Top'#2'l'#5'Width'#3#164#0#10'ItemHeight'#2#13#11'MultiSelect'#9#8
+  +'TabOrder'#2#1#0#0#5'TEdit'#13'eMasterFields'#4'Left'#2'a'#6'Height'#2#21#3
+  +'Top'#3'@'#1#5'Width'#3'A'#1#8'OnChange'#7#20'OnFieldMappingChange'#8'TabOrd'
+  +'er'#2#2#4'Text'#6#9'fdsfdsdsf'#0#0#5'TEdit'#13'eDetailFields'#4'Left'#2'a'#6
+  +'Height'#2#21#3'Top'#3'X'#1#5'Width'#3'A'#1#8'OnChange'#7#20'OnFieldMappingC'
+  +'hange'#8'TabOrder'#2#3#4'Text'#6#9'fdsfdsdsf'#0#0#7'TBitBtn'#17'bbAddFieldM'
+  +'apping'#4'Left'#3#190#0#6'Height'#2#25#3'Top'#2'l'#5'Width'#2'<'#7'Caption'
+  +#6#4'&Add'#10'Glyph.Data'#10':'#3#0#0'6'#3#0#0'BM6'#3#0#0#0#0#0#0'6'#0#0#0'('
+  +#0#0#0#16#0#0#0#16#0#0#0#1#0#24#0#0#0#0#0#0#3#0#0#18#11#0#0#18#11#0#0#0#0#0#0
+  +#0#0#0#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#3']'#5#3']'#5#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#3']'#5'['#247#145#5#140#13#3']'#5#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#3']'#5'['#247#145#5#149#14#3']'#5#255#0#255#255#0#255#255#0
+  ,#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#3']'#5'['#247#145#5#146#13#3']'#5#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#3']'#5'['#247#145#6#149#15#3']'#5#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#3']'#5#3']'
+  +#5#3']'#5#3']'#5#3']'#5'['#247#145#12#156#24#3']'#5#3']'#5#3']'#5#3']'#5#3']'
+  +#5#255#0#255#255#0#255#255#0#255#3']'#5'['#247#145';'#218'i0'#207'W*'#198'M!'
+  +#184'<'#23#166'+'#17#159'!'#13#158#28#10#154#21#6#146#14#5#147#13#5#139#13#3
+  +']'#5#255#0#255#255#0#255#3']'#5'['#247#145'['#247#145'['#247#145'['#247#145
+  +'['#247#145'['#247#145#24#169'/['#247#145'['#247#145'['#247#145'['#247#145'['
+  +#247#145#3']'#5#255#0#255#255#0#255#255#0#255#3']'#5#3']'#5#3']'#5#3']'#5#3
+  +']'#5'['#247#145'%'#188'B'#3']'#5#3']'#5#3']'#5#3']'#5#3']'#5#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#3']'#5'['
+  +#247#145'0'#206'W'#3']'#5#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#3']'#5
+  +'['#247#145';'#217'h'#3']'#5#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#3
+  +']'#5'['#247#145'H'#235''#3']'#5#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#3']'#5'['#247#145'['#247#145#3']'#5#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#3']'#5#3']'#5#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#9'NumGlyphs'#2#0#7'OnClick'#7#22'bbAddFie'
+  +'ldMappingClick'#8'TabOrder'#2#4#0#0#7'TBitBtn'#7'BitBtn4'#4'Left'#3#190#0#6
+  +'Height'#2#25#3'Top'#3'$'#1#5'Width'#2'<'#7'Caption'#6#6'&Clear'#10'Glyph.Da'
+  +'ta'#10':'#3#0#0'6'#3#0#0'BM6'#3#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#16#0#0#0#16#0
+  +#0#0#1#0#24#0#0#0#0#0#0#3#0#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#242#187#129#243#196#138#242#188#129
+  +#239#176'r'#238#175'n'#239#178'u'#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#251#235#189#254#243#201#251
+  +#222#172#243#201#144#251#182'~'#255#180'}'#252#202#153#255#217#173#254#217
+  +#167#240#181'w'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#254#250#211#254#247#204#251#220#169#235#202#145#169#184'n'#132#171'T+'#145
+  +' W'#167'C'#234#243#199#252#233#189#238#173'o'#255#0#255#255#0#255#255#0#255
+  +#255#0#255#237#165'e'#243#194#138#252#240#196#252#229#181#251#208#159','#150
+  +'"'#0'{'#0#5#130#6#6''#4'='#163'5'#254#242#208#240#177's'#255#0#255#255#0
+  +#255#255#0#255#255#0#255#238#171'm'#237#167'g'#239#176'p'#246#201#144#255#216
+  +#172'.'#152'#'#0'n'#0'j'#191'k'#255#240#234'H'#161'8'#163#175'^'#252#175't'
+  +#255#0#255#255#0#255#255#0#255#255#0#255#242#180'y'#242#183'~'#240#178'w'#240
+  +#172'o'#251#181'~z'#180'`A'#166'Ao'#188'i'#255#255#255#244#254#251#188#187'y'
+  +#243#170'k'#255#0#255#255#0#255#255#0#255#255#0#255#247#194#146#250#197#152
+  +#248#194#147#248#192#144#243#191#138#194#213#165#255#255#255#217#238#213'V'
+  +#177'SK'#175'K'#184#188'y'#248#176'u'#255#0#255#255#0#255#255#0#255#246#199
+  +#146#252#212#173#252#212#172#252#208#169#252#208#169#255#212#181']'#169'F'
+  +#128#199#128#224#242#222''''#152'$'#0'p'#0#130#176'['#255#189#144#238#172'm'
+  +#255#0#255#255#0#255#246#199#146#255#234#196#254#227#188#254#226#186#254#224
+  +#184#255#224#186#217#217#172#10#130#9#24#138#22#3''#3#0'y'#0'w'#180']'#255
+  +#206#170#238#172'm'#255#0#255#255#0#255#250#221#171#255#251#213#255#244#204
+  +#255#243#202#255#240#201#255#239#197#255#242#209#181#213#152'*'#150'$+'#153
+  +'$'#154#203#135#181#209#149#255#224#186#242#183'z'#255#0#255#255#0#255#252
+  +#239#196#255#255#216#255#251#211#255#252#212#255#251#211#255#251#212#255#252
+  +#212#255#255#225#255#255#235#255#255#231#255#255#224#255#248#215#255#244#203
+  +#243#192#134#255#0#255#255#0#255#254#244#203#255#255#221#255#255#217#255#255
+  +#217#255#255#218#255#254#215#254#246#204#248#218#163#244#192'}'#244#193''
+  +#247#216#163#254#242#197#255#255#221#243#201#145#255#0#255#255#0#255#244#204
+  +#150#248#222#175#248#221#172#247#216#166#246#207#153#243#191#128#239#172'f'
+  +#235#157'O'#235#156'L'#235#159'U'#240#172'n'#250#192#135#252#211#160#250#192
+  +#137#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#237#163'T'#239#171'h'#247#188#131#250#191#136
+  +#250#188#131#250#188#131#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  ,#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#250
+  +#192#136#250#192#136#250#192#136#255#0#255#255#0#255#9'NumGlyphs'#2#0#7'OnCl'
+  +'ick'#7#12'BitBtn4Click'#8'TabOrder'#2#5#0#0#0#9'TTabSheet'#13'ts_MethodCall'
+  +#7'Caption'#6#13'ts_MethodCall'#12'ClientHeight'#3#154#1#11'ClientWidth'#3
+  +#184#1#10'ImageIndex'#2#4#0#6'TLabel'#16'labMasterFields2'#4'Left'#2#24#6'He'
+  +'ight'#2#16#3'Top'#2'\'#5'Width'#2'I'#7'Caption'#6#15'&Master Fields:'#11'Pa'
+  +'rentColor'#8#0#0#6'TLabel'#16'labDataReqParams'#4'Left'#3#0#1#6'Height'#2#16
+  +#3'Top'#2'\'#5'Width'#3#132#0#7'Caption'#6#24'DataRequestCall &Params:'#12'F'
+  +'ocusControl'#7#15'lbDataReqParams'#11'ParentColor'#8#0#0#6'TLabel'#6'Label7'
+  +#4'Left'#2#24#6'Height'#2#16#3'Top'#3'*'#1#5'Width'#3'-'#1#7'Caption'#6'7Map'
+  +'p&ings (Detail''s DataRequestCall Param=MasterField):'#12'FocusControl'#7#9
+  +'mMappings'#11'ParentColor'#8#0#0#6'TLabel'#7'Label20'#4'Left'#2#8#6'Height'
+  +#2#14#3'Top'#2#8#5'Width'#3#191#0#7'Caption'#6#31'Map Fields to Method Param'
+  +'eters'#11'Font.Height'#2#245#9'Font.Name'#6#6'Tahoma'#10'Font.Style'#11#6'f'
+  +'sBold'#0#11'ParentColor'#8#0#0#6'TLabel'#7'Label21'#4'Left'#2#24#6'Height'#2
+  +'='#3'Top'#2#24#5'Width'#3#134#1#8'AutoSize'#8#7'Caption'#6#237'Select how t'
+  +'he master fields map to the parameters passed to the customs GetDataCall yo'
+  +'u are using to fetch Detail data. Ideally, all fields from the previous pag'
+  +'e (i.e. all fields involved in the M/D relationship) should be mapped here.'
+  +#11'ParentColor'#8#8'WordWrap'#9#0#0#8'TListBox'#9'lbMaster2'#4'Left'#2#22#6
+  +'Height'#3#185#0#3'Top'#2'l'#5'Width'#3#164#0#10'ItemHeight'#2#13#11'MultiSe'
+  +'lect'#9#8'TabOrder'#2#0#0#0#8'TListBox'#15'lbDataReqParams'#4'Left'#3#254#0
+  +#6'Height'#3#185#0#3'Top'#2'j'#5'Width'#3#164#0#10'ItemHeight'#2#13#11'Multi'
+  +'Select'#9#8'TabOrder'#2#1#0#0#5'TMemo'#9'mMappings'#4'Left'#2#22#6'Height'#2
+  +'<'#3'Top'#3':'#1#5'Width'#3#139#1#10'ScrollBars'#7#10'ssVertical'#8'TabOrde'
+  +'r'#2#2#0#0#7'TBitBtn'#19'bbAddDataReqMapping'#4'Left'#3#190#0#6'Height'#2#25
+  +#3'Top'#2'l'#5'Width'#2'<'#7'Caption'#6#4'&Add'#10'Glyph.Data'#10':'#3#0#0'6'
+  +#3#0#0'BM6'#3#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#16#0#0#0#16#0#0#0#1#0#24#0#0#0#0
+  +#0#0#3#0#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#3']'#5#3']'#5#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#3']'#5'['#247#145#5#140#13#3']'
+  +#5#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#3']'#5'['#247#145#5#149#14#3
+  +']'#5#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#3']'#5'['#247#145#5#146#13
+  +#3']'#5#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#3']'#5'['#247#145#6#149#15
+  +#3']'#5#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#3']'#5#3']'#5#3']'#5#3']'#5#3']'#5'['#247#145#12#156#24#3']'#5#3
+  +']'#5#3']'#5#3']'#5#3']'#5#255#0#255#255#0#255#255#0#255#3']'#5'['#247#145';'
+  +#218'i0'#207'W*'#198'M!'#184'<'#23#166'+'#17#159'!'#13#158#28#10#154#21#6#146
+  +#14#5#147#13#5#139#13#3']'#5#255#0#255#255#0#255#3']'#5'['#247#145'['#247#145
+  +'['#247#145'['#247#145'['#247#145'['#247#145#24#169'/['#247#145'['#247#145'['
+  +#247#145'['#247#145'['#247#145#3']'#5#255#0#255#255#0#255#255#0#255#3']'#5#3
+  +']'#5#3']'#5#3']'#5#3']'#5'['#247#145'%'#188'B'#3']'#5#3']'#5#3']'#5#3']'#5#3
+  +']'#5#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#3']'#5'['#247#145'0'#206'W'#3']'#5#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#3']'#5'['#247#145';'#217'h'#3']'#5#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#3']'#5'['#247#145'H'#235''#3']'#5#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#3']'#5'['#247#145'['#247#145#3']'#5#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#3']'#5#3']'#5#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#9'NumGlyphs'#2#0
+  +#7'OnClick'#7#24'bbAddDataReqMappingClick'#8'TabOrder'#2#3#0#0#7'TBitBtn'#21
+  +'bbClearDataReqMapping'#4'Left'#3#190#0#6'Height'#2#25#3'Top'#3#10#1#5'Width'
+  +#2'<'#7'Caption'#6#6'&Clear'#10'Glyph.Data'#10':'#3#0#0'6'#3#0#0'BM6'#3#0#0#0
+  ,#0#0#0'6'#0#0#0'('#0#0#0#16#0#0#0#16#0#0#0#1#0#24#0#0#0#0#0#0#3#0#0#18#11#0#0
+  +#18#11#0#0#0#0#0#0#0#0#0#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#242#187#129#243#196#138#242#188#129#239#176'r'#238#175'n'#239#178'u'#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#251#235#189#254#243#201#251#222#172#243#201#144#251#182'~'#255#180
+  +'}'#252#202#153#255#217#173#254#217#167#240#181'w'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#254#250#211#254#247#204#251#220#169#235
+  +#202#145#169#184'n'#132#171'T+'#145' W'#167'C'#234#243#199#252#233#189#238
+  +#173'o'#255#0#255#255#0#255#255#0#255#255#0#255#237#165'e'#243#194#138#252
+  +#240#196#252#229#181#251#208#159','#150'"'#0'{'#0#5#130#6#6''#4'='#163'5'
+  +#254#242#208#240#177's'#255#0#255#255#0#255#255#0#255#255#0#255#238#171'm'
+  +#237#167'g'#239#176'p'#246#201#144#255#216#172'.'#152'#'#0'n'#0'j'#191'k'#255
+  +#240#234'H'#161'8'#163#175'^'#252#175't'#255#0#255#255#0#255#255#0#255#255#0
+  +#255#242#180'y'#242#183'~'#240#178'w'#240#172'o'#251#181'~z'#180'`A'#166'Ao'
+  +#188'i'#255#255#255#244#254#251#188#187'y'#243#170'k'#255#0#255#255#0#255#255
+  +#0#255#255#0#255#247#194#146#250#197#152#248#194#147#248#192#144#243#191#138
+  +#194#213#165#255#255#255#217#238#213'V'#177'SK'#175'K'#184#188'y'#248#176'u'
+  +#255#0#255#255#0#255#255#0#255#246#199#146#252#212#173#252#212#172#252#208
+  +#169#252#208#169#255#212#181']'#169'F'#128#199#128#224#242#222''''#152'$'#0
+  +'p'#0#130#176'['#255#189#144#238#172'm'#255#0#255#255#0#255#246#199#146#255
+  +#234#196#254#227#188#254#226#186#254#224#184#255#224#186#217#217#172#10#130#9
+  +#24#138#22#3''#3#0'y'#0'w'#180']'#255#206#170#238#172'm'#255#0#255#255#0#255
+  +#250#221#171#255#251#213#255#244#204#255#243#202#255#240#201#255#239#197#255
+  +#242#209#181#213#152'*'#150'$+'#153'$'#154#203#135#181#209#149#255#224#186
+  +#242#183'z'#255#0#255#255#0#255#252#239#196#255#255#216#255#251#211#255#252
+  +#212#255#251#211#255#251#212#255#252#212#255#255#225#255#255#235#255#255#231
+  +#255#255#224#255#248#215#255#244#203#243#192#134#255#0#255#255#0#255#254#244
+  +#203#255#255#221#255#255#217#255#255#217#255#255#218#255#254#215#254#246#204
+  +#248#218#163#244#192'}'#244#193''#247#216#163#254#242#197#255#255#221#243
+  +#201#145#255#0#255#255#0#255#244#204#150#248#222#175#248#221#172#247#216#166
+  +#246#207#153#243#191#128#239#172'f'#235#157'O'#235#156'L'#235#159'U'#240#172
+  +'n'#250#192#135#252#211#160#250#192#137#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#237#163'T'
+  +#239#171'h'#247#188#131#250#191#136#250#188#131#250#188#131#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#250#192#136#250#192#136#250#192#136#255#0#255
+  +#255#0#255#9'NumGlyphs'#2#0#7'OnClick'#7#26'bbClearDataReqMappingClick'#8'Ta'
+  +'bOrder'#2#4#0#0#0#9'TTabSheet'#9'ts_Params'#7'Caption'#6#9'ts_Params'#12'Cl'
+  +'ientHeight'#3#154#1#11'ClientWidth'#3#184#1#10'ImageIndex'#2#5#0#6'TLabel'#7
+  +'Label11'#4'Left'#2#24#6'Height'#2#16#3'Top'#2'\'#5'Width'#2'Q'#7'Caption'#6
+  +#16'Master''s Fields:'#11'ParentColor'#8#0#0#6'TLabel'#7'Label12'#4'Left'#3#0
+  +#1#6'Height'#2#16#3'Top'#2'\'#5'Width'#2'+'#7'Caption'#6#7'Params:'#12'Focus'
+  +'Control'#7#8'lbParams'#11'ParentColor'#8#0#0#6'TLabel'#7'Label15'#4'Left'#2
+  +#24#6'Height'#2#16#3'Top'#3'*'#1#5'Width'#3#212#0#7'Caption'#6'&Mappings (De'
+  +'tail''s Param=MasterField):'#12'FocusControl'#7#15'mParamsMappings'#11'Pare'
+  +'ntColor'#8#0#0#6'TLabel'#7'Label22'#4'Left'#2#8#6'Height'#2#14#3'Top'#2#8#5
+  +'Width'#3#209#0#7'Caption'#6'#Map Fields to Data Table Parameters'#11'Font.H'
+  +'eight'#2#245#9'Font.Name'#6#6'Tahoma'#10'Font.Style'#11#6'fsBold'#0#11'Pare'
+  +'ntColor'#8#0#0#6'TLabel'#7'Label23'#4'Left'#2#24#6'Height'#2'.'#3'Top'#2#24
+  +#5'Width'#3#133#1#7'Caption'#6#188'Select how the master fields map to the p'
+  +'arameters of your detail data. Ideally, all fields from the previous page ('
+  +'i.e. all fields involved in the M/D relationship) should be mapped here.'#11
+  +'ParentColor'#8#8'WordWrap'#9#0#0#8'TListBox'#9'lbMaster3'#4'Left'#2#22#6'He'
+  +'ight'#3#185#0#3'Top'#2'l'#5'Width'#3#164#0#10'ItemHeight'#2#13#11'MultiSele'
+  +'ct'#9#8'TabOrder'#2#0#0#0#8'TListBox'#8'lbParams'#4'Left'#3#254#0#6'Height'
+  +#3#185#0#3'Top'#2'l'#5'Width'#3#164#0#10'ItemHeight'#2#13#11'MultiSelect'#9#8
+  +'TabOrder'#2#1#0#0#5'TMemo'#15'mParamsMappings'#4'Left'#2#22#6'Height'#2'<'#3
+  +'Top'#3':'#1#5'Width'#3#139#1#10'ScrollBars'#7#10'ssVertical'#8'TabOrder'#2#2
+  +#0#0#7'TBitBtn'#20'bbAddParamMappingXXX'#4'Left'#3#190#0#6'Height'#2#25#3'To'
+  +'p'#2'l'#5'Width'#2'<'#7'Caption'#6#4'&Add'#10'Glyph.Data'#10':'#3#0#0'6'#3#0
+  +#0'BM6'#3#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#16#0#0#0#16#0#0#0#1#0#24#0#0#0#0#0#0
+  +#3#0#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#255#0#255#255#0#255#255#0#255#255
+  ,#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#3']'#5#3']'#5#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#3']'#5'['#247#145#5#140#13#3']'#5
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#3']'#5'['#247#145#5#149#14#3']'
+  +#5#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#3']'#5'['#247#145#5#146#13#3
+  +']'#5#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#3']'#5'['#247#145#6#149#15
+  +#3']'#5#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#3']'#5#3']'#5#3']'#5#3']'#5#3']'#5'['#247#145#12#156#24#3']'#5#3
+  +']'#5#3']'#5#3']'#5#3']'#5#255#0#255#255#0#255#255#0#255#3']'#5'['#247#145';'
+  +#218'i0'#207'W*'#198'M!'#184'<'#23#166'+'#17#159'!'#13#158#28#10#154#21#6#146
+  +#14#5#147#13#5#139#13#3']'#5#255#0#255#255#0#255#3']'#5'['#247#145'['#247#145
+  +'['#247#145'['#247#145'['#247#145'['#247#145#24#169'/['#247#145'['#247#145'['
+  +#247#145'['#247#145'['#247#145#3']'#5#255#0#255#255#0#255#255#0#255#3']'#5#3
+  +']'#5#3']'#5#3']'#5#3']'#5'['#247#145'%'#188'B'#3']'#5#3']'#5#3']'#5#3']'#5#3
+  +']'#5#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#3']'#5'['#247#145'0'#206'W'#3']'#5#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#3']'#5'['#247#145';'#217'h'#3']'#5#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#3']'#5'['#247#145'H'#235''#3']'#5#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#3']'#5'['#247#145'['#247#145#3']'#5#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#3']'#5#3']'#5#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#9'NumGlyphs'#2#0
+  +#7'OnClick'#7#25'bbAddParamMappingXXXClick'#8'TabOrder'#2#3#0#0#7'TBitBtn'#23
+  +'bbClearParamMappingsXXX'#4'Left'#3#190#0#6'Height'#2#25#3'Top'#3#12#1#5'Wid'
+  +'th'#2'<'#7'Caption'#6#6'&Clear'#10'Glyph.Data'#10':'#3#0#0'6'#3#0#0'BM6'#3#0
+  +#0#0#0#0#0'6'#0#0#0'('#0#0#0#16#0#0#0#16#0#0#0#1#0#24#0#0#0#0#0#0#3#0#0#18#11
+  +#0#0#18#11#0#0#0#0#0#0#0#0#0#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#242#187#129#243#196#138#242#188#129#239#176'r'#238#175'n'#239#178'u'#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#251#235#189#254#243#201#251#222#172#243#201#144#251#182'~'#255#180
+  +'}'#252#202#153#255#217#173#254#217#167#240#181'w'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#254#250#211#254#247#204#251#220#169#235
+  +#202#145#169#184'n'#132#171'T+'#145' W'#167'C'#234#243#199#252#233#189#238
+  +#173'o'#255#0#255#255#0#255#255#0#255#255#0#255#237#165'e'#243#194#138#252
+  +#240#196#252#229#181#251#208#159','#150'"'#0'{'#0#5#130#6#6''#4'='#163'5'
+  +#254#242#208#240#177's'#255#0#255#255#0#255#255#0#255#255#0#255#238#171'm'
+  +#237#167'g'#239#176'p'#246#201#144#255#216#172'.'#152'#'#0'n'#0'j'#191'k'#255
+  +#240#234'H'#161'8'#163#175'^'#252#175't'#255#0#255#255#0#255#255#0#255#255#0
+  +#255#242#180'y'#242#183'~'#240#178'w'#240#172'o'#251#181'~z'#180'`A'#166'Ao'
+  +#188'i'#255#255#255#244#254#251#188#187'y'#243#170'k'#255#0#255#255#0#255#255
+  +#0#255#255#0#255#247#194#146#250#197#152#248#194#147#248#192#144#243#191#138
+  +#194#213#165#255#255#255#217#238#213'V'#177'SK'#175'K'#184#188'y'#248#176'u'
+  +#255#0#255#255#0#255#255#0#255#246#199#146#252#212#173#252#212#172#252#208
+  +#169#252#208#169#255#212#181']'#169'F'#128#199#128#224#242#222''''#152'$'#0
+  +'p'#0#130#176'['#255#189#144#238#172'm'#255#0#255#255#0#255#246#199#146#255
+  +#234#196#254#227#188#254#226#186#254#224#184#255#224#186#217#217#172#10#130#9
+  +#24#138#22#3''#3#0'y'#0'w'#180']'#255#206#170#238#172'm'#255#0#255#255#0#255
+  +#250#221#171#255#251#213#255#244#204#255#243#202#255#240#201#255#239#197#255
+  +#242#209#181#213#152'*'#150'$+'#153'$'#154#203#135#181#209#149#255#224#186
+  +#242#183'z'#255#0#255#255#0#255#252#239#196#255#255#216#255#251#211#255#252
+  +#212#255#251#211#255#251#212#255#252#212#255#255#225#255#255#235#255#255#231
+  +#255#255#224#255#248#215#255#244#203#243#192#134#255#0#255#255#0#255#254#244
+  ,#203#255#255#221#255#255#217#255#255#217#255#255#218#255#254#215#254#246#204
+  +#248#218#163#244#192'}'#244#193''#247#216#163#254#242#197#255#255#221#243
+  +#201#145#255#0#255#255#0#255#244#204#150#248#222#175#248#221#172#247#216#166
+  +#246#207#153#243#191#128#239#172'f'#235#157'O'#235#156'L'#235#159'U'#240#172
+  +'n'#250#192#135#252#211#160#250#192#137#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#237#163'T'
+  +#239#171'h'#247#188#131#250#191#136#250#188#131#250#188#131#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#250#192#136#250#192#136#250#192#136#255#0#255
+  +#255#0#255#9'NumGlyphs'#2#0#7'OnClick'#7#28'bbClearParamMappingsXXXClick'#8
+  +'TabOrder'#2#4#0#0#0#9'TTabSheet'#9'ts_Finish'#7'Caption'#6#6'Finish'#12'Cli'
+  +'entHeight'#3#154#1#11'ClientWidth'#3#184#1#10'ImageIndex'#2#2#0#6'TLabel'#6
+  +'Label5'#4'Left'#2#8#6'Height'#2#14#3'Top'#2#8#5'Width'#2'4'#7'Caption'#6#10
+  +'That''s It!'#11'Font.Height'#2#245#9'Font.Name'#6#6'Tahoma'#10'Font.Style'
+  +#11#6'fsBold'#0#11'ParentColor'#8#0#0#6'TLabel'#6'Label6'#4'Left'#2#24#6'Hei'
+  +'ght'#2#16#3'Top'#2#24#5'Width'#3#240#0#7'Caption'#6'.Your Master/Detail rel'
+  +'ationship is now set up.'#11'ParentColor'#8#0#0#0#0#6'TPanel'#6'Panel2'#6'H'
+  +'eight'#2'#'#3'Top'#3#224#1#5'Width'#3#192#1#5'Align'#7#8'alBottom'#10'Bevel'
+  +'Outer'#7#6'bvNone'#12'ClientHeight'#2'#'#11'ClientWidth'#3#192#1#8'TabOrder'
+  +#2#2#0#7'TBitBtn'#10'btn_Finish'#4'Left'#3'p'#1#6'Height'#2#25#4'Hint'#6#31
+  +'This is Finish, but not the End'#3'Top'#2#5#5'Width'#2'K'#7'Anchors'#11#5'a'
+  +'kTop'#7'akRight'#0#7'Caption'#6#6'Finish'#10'Glyph.Data'#10':'#6#0#0'6'#6#0
+  +#0'BM6'#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0' '#0#0#0#16#0#0#0#1#0#24#0#0#0#0#0#0
+  +#6#0#0'"'#11#0#0'"'#11#0#0#0#0#0#0#0#0#0#0#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#129#30#0#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'xxx'
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#129#30#0#129#30#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255'xxxxxx'#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#129#30#0#129#30#0#129#30#0#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255'xxxxxxxxx'#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#129#30#0#149'D'#15#129#30#0#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255'xxx'#137#137#137'xxx'#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#129#30#0#167'c/'#129#30#0
+  +#129#30#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'xxx'#159#159#159'xxxx'
+  +'xx'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#129#30#0#191#139
+  +'b'#204#161'~'#129#30#0#129#30#0#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'xxx'#184
+  +#184#184#198#198#198'xxxxxx'#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#129#30#0#216#182#156#230#209#191#231#211#196#129#30#0#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255'xxx'#209#209#209#224#224#224#226#226#226'xxx'#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#129#30#0#240#226#217#252#247#242#250#240#230
+  +#129#30#0#129#30#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255'xxx'#235#235#235#245#245#245#241
+  +#241#241'xxxxxx'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#129#30#0#216#175#150#244#226#207#240
+  +#215#189#216#167#132#129#30#0#129#30#0#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'xxx'#208#208#208#233
+  ,#233#233#227#227#227#202#202#202'xxxxxx'#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#129#30#0#243#222#202#239#212#184
+  +#235#201#167#218#166'}'#129#30#0#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'xxx'#231#231#231#225
+  +#225#225#219#219#219#201#201#201'xxx'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#129#30
+  +#0#231#187#146#227#176#129#224#166'r'#213#146'Z'#129#30#0#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255'xxx'#211#211#211#205#205#205#198#198#198#188#188#188'xxx'#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#129#30#0#218#153'^'#215#143'P'#211#132'A'#207'{5'#129#30
+  +#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255'xxx'#191#191#191#184#184#184#178#178#178#172#172
+  +#172'xxx'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#129#30#0#129#30#0#129#30#0#129
+  +#30#0#129#30#0#129#30#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255'xxxxxxxxxxxxxxxxxx'#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#11'ModalResult'#2#1#9'NumGlyphs'#2#2
+  +#7'OnClick'#7#15'btn_FinishClick'#8'TabOrder'#2#0#7'Visible'#8#0#0#7'TBitBtn'
+  +#10'btn_Cancel'#4'Left'#2#5#6'Height'#2#25#3'Top'#2#5#5'Width'#2'K'#6'Cancel'
+  +#9#7'Caption'#6#6'Cancel'#10'Glyph.Data'#10':'#6#0#0'6'#6#0#0'BM6'#6#0#0#0#0
+  +#0#0'6'#0#0#0'('#0#0#0' '#0#0#0#16#0#0#0#1#0#24#0#0#0#0#0#0#6#0#0#196#14#0#0
+  +#196#14#0#0#0#0#0#0#0#0#0#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#0#0#154#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#0#0#154#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255'kkkkkk'#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255'kkkkkk'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0#0
+  +#154#23'J'#253#16';'#244#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255#0#0
+  +#154#0','#248#0'0'#252#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255'kkk'
+  +#168#168#168#160#160#160'kkk'#255#0#255#255#0#255#255#0#255#255#0#255'kkk'
+  +#154#154#154#156#156#156'kkk'#255#0#255#255#0#255#255#0#255#255#0#255#0#0#154
+  +#26'G'#248#26'L'#255#18';'#241#0#0#154#255#0#255#255#0#255#0#0#154#1'-'#246#1
+  +'2'#255#0'*'#243#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255'kkk'#167#167
+  +#167#170#170#170#159#159#159'kkk'#255#0#255#255#0#255'kkk'#153#153#153#158
+  +#158#158#151#151#151'kkk'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0
+  +#0#154#28'G'#246#27'M'#255#20'>'#244#0#0#154#0#0#154#0'-'#248#1'4'#255#3'+'
+  +#242#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'kkk'
+  +#167#167#167#171#171#171#162#162#162'kkkkkk'#154#154#154#158#158#158#152#152
+  +#152'kkk'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#0#0#154#29'H'#246#29'P'#255#16'='#251#4'1'#254#1'2'#255#0','#246#0#0#154
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255'kkk'#167#167#167#172#172#172#163#163#163#159#159#159#158#158#158#153#153
+  +#153'kkk'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#0#0#154#26'H'#249#19'B'#255#12'<'#255#7'3'#246#0#0
+  +#154#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255'kkk'#167#167#167#167#167#167#163#163#163#156
+  +#156#156'kkk'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#0#0#154'!N'#252#29'K'#255#24'G'#255#23
+  ,'C'#246#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255'kkk'#172#172#172#172#172#172#169#169
+  +#169#164#164#164'kkk'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#0#0#154'.['#249',_'#255'"M'#248' K'#248'#'
+  +'U'#255#27'F'#246#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255'kkk'#177#177#177#179#179#179#171#171#171#170
+  +#170#170#175#175#175#166#166#166'kkk'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#0#0#154'6d'#250'8k'#255'-Y'#244#0#0#154#0#0
+  +#154'"L'#244'%X'#255#29'I'#246#0#0#154#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255'kkk'#182#182#182#185#185#185#174#174#174'kkkkkk'#169
+  +#169#169#176#176#176#167#167#167'kkk'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#0#0#154'@q'#250'Bt'#255'2]'#241#0#0#154#255#0#255#255#0#255#0#0
+  +#154'"M'#241'''Z'#255' L'#248#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255
+  +'kkk'#187#187#187#190#190#190#175#175#175'kkk'#255#0#255#255#0#255'kkk'#167
+  +#167#167#177#177#177#170#170#170'kkk'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#0#0#154'Iz'#252';f'#243#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255#0#0
+  +#154'%P'#244'&U'#250#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255'kkk'#192
+  +#192#192#181#181#181'kkk'#255#0#255#255#0#255#255#0#255#255#0#255'kkk'#170
+  +#170#170#174#174#174'kkk'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0
+  +#0#154#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0
+  +#0#154#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'k'
+  +'kkkkk'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'kkkkkk'
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#11'Mo'
+  +'dalResult'#2#2#9'NumGlyphs'#2#2#8'TabOrder'#2#1#0#0#7'TBitBtn'#8'btn_Next'#4
+  +'Left'#3'p'#1#6'Height'#2#25#3'Top'#2#5#5'Width'#2'K'#7'Anchors'#11#5'akTop'
+  +#7'akRight'#0#7'Caption'#6#5'&Next'#7'Default'#9#10'Glyph.Data'#10':'#6#0#0
+  +'6'#6#0#0'BM6'#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0' '#0#0#0#16#0#0#0#1#0#24#0#0#0
+  +#0#0#0#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#11'|'#21#9'z'#20#8'q'#16#5'j'#12#4'g'#11#4'g'#12#4'g'#12#4'g'
+  +#12#4'g'#12#4'g'#12#4'g'#12#4'W'#9#255#0#255#255#0#255#255#0#255#255#0#255
+  +#156#156#156#156#156#156#152#152#152#150#150#150#149#149#149#149#149#149#149
+  +#149#149#149#149#149#149#149#149#149#149#149#149#149#149#144#144#144#255#0
+  +#255#255#0#255#255#0#255#18#154'('#26#176':'#21#175'2'#17#171''''#13#168#31#8
+  +#166#24#8#165#22#8#165#22#8#166#23#8#166#23#8#165#23#8#171#24#7#141#18#4'W'#8
+  +#255#0#255#255#0#255#168#168#168#176#176#176#174#174#174#172#172#172#170#170
+  +#170#168#168#168#168#168#168#168#168#168#168#168#168#168#168#168#168#168#168
+  +#169#169#169#160#160#160#144#144#144#255#0#255#255#0#255#27#173'<%'#197'T'#30
+  +#192'E'#26#190':'#21#189'1'#16#186''''#11#184#29#9#184#25#9#184#26#9#184#26#9
+  +#183#26#9#190#28#8#171#23#4'g'#12#255#0#255#255#0#255#176#176#176#185#185#185
+  +#181#181#181#180#180#180#178#178#178#176#176#176#173#173#173#173#173#173#173
+  +#173#173#173#173#173#173#173#173#175#175#175#169#169#169#149#149#149#255#0
+  +#255#255#0#255' '#180'E1'#196'd)'#191'S"'#187'H'#27#186'='#23#183'3'#18#180
+  +')'#13#179' '#10#178#25#9#177#24#9#176#24#9#183#26#8#166#23#4'h'#12#255#0#255
+  +#255#0#255#179#179#179#188#188#188#184#184#184#181#181#181#179#179#179#177
+  +#177#177#175#175#175#173#173#173#172#172#172#172#172#172#171#171#171#173#173
+  +#173#168#168#168#149#149#149#255#0#255#255#0#255'"'#181'H?'#200'v5'#195'g'
+  +#254#254#254'#'#188'N'#29#186'B'#24#184'8'#254#254#254#14#180'$'#10#179#28#9
+  +#177#24#9#184#26#8#166#23#4'g'#12#255#0#255#255#0#255#179#179#179#192#192#192
+  +#188#188#188#254#254#254#181#181#181#179#179#179#177#177#177#254#254#254#173
+  +#173#173#172#172#172#172#172#172#173#173#173#168#168#168#149#149#149#255#0
+  +#255#255#0#255'!'#181'HX'#208#138'F'#201'z'#254#254#254#254#254#254'$'#189'P'
+  +#31#187'F'#254#254#254#254#254#254#16#180')'#12#178#31#9#183#26#8#166#22#4'g'
+  ,#12#255#0#255#255#0#255#179#179#179#202#202#202#195#195#195#254#254#254#254
+  +#254#254#182#182#182#180#180#180#254#254#254#254#254#254#174#174#174#172#172
+  +#172#173#173#173#168#168#168#149#149#149#255#0#255#255#0#255'!'#181'Hw'#216
+  +#159'R'#204#129';'#199'r'#254#254#254#254#254#254'&'#190'T!'#189'J'#254#254
+  +#254#254#254#254#19#181'-'#13#186'#'#10#167#24#4'h'#11#255#0#255#255#0#255
+  +#179#179#179#213#213#213#200#200#200#192#192#192#254#254#254#254#254#254#183
+  +#183#183#181#181#181#254#254#254#254#254#254#176#176#176#175#175#175#168#168
+  +#168#149#149#149#255#0#255#255#0#255'!'#181'H'#138#222#172']'#208#138'B'#200
+  +'v7'#197'n'#254#254#254#254#254#254''''#191'X"'#189'O'#254#254#254#254#254
+  +#254#20#187'1'#14#169'"'#6'o'#14#255#0#255#255#0#255#179#179#179#220#220#220
+  +#204#204#204#194#194#194#190#190#190#254#254#254#254#254#254#184#184#184#181
+  +#181#181#254#254#254#254#254#254#177#177#177#170#170#170#152#152#152#255#0
+  +#255#255#0#255'!'#181'H'#149#224#179'e'#210#143'H'#202'z'#254#254#254#254#254
+  +#254'0'#195'i.'#194'e'#254#254#254#254#254#254#31#187'F'#27#190'>'#20#174'/'
+  +#10'z'#20#255#0#255#255#0#255#179#179#179#224#224#224#206#206#206#196#196#196
+  +#254#254#254#254#254#254#187#187#187#187#187#187#254#254#254#254#254#254#180
+  +#180#180#180#180#180#173#173#173#156#156#156#255#0#255#255#0#255'!'#181'H'
+  +#157#227#185'o'#213#151#254#254#254#254#254#254'@'#200't9'#197'p'#254#254#254
+  +#254#254#254'+'#193'`'''#191'U#'#192'N'#27#178'<'#13#133#26#255#0#255#255#0
+  +#255#179#179#179#227#227#227#210#210#210#254#254#254#254#254#254#193#193#193
+  +#191#191#191#254#254#254#254#254#254#185#185#185#184#184#184#183#183#183#176
+  +#176#176#160#160#160#255#0#255#255#0#255'!'#181'H'#169#230#194#128#218#163
+  +#254#254#254'Y'#207#135'M'#204'~D'#201'x'#254#254#254'9'#197'p2'#195'k-'#193
+  +'c*'#194'] '#181'H'#16#143#31#255#0#255#255#0#255#179#179#179#231#231#231#216
+  +#216#216#254#254#254#202#202#202#198#198#198#194#194#194#254#254#254#191#191
+  +#191#188#188#188#186#186#186#185#185#185#179#179#179#164#164#164#255#0#255
+  +#255#0#255'!'#181'I'#174#232#197#166#229#191#145#223#175#134#219#167'x'#215
+  +#157'g'#211#145'Y'#207#135'D'#201'x6'#197'n2'#195'l0'#197'j'''#187'W'#19#156
+  +'&'#255#0#255#255#0#255#179#179#179#233#233#233#230#230#230#223#223#223#218
+  +#218#218#213#213#213#208#208#208#202#202#202#194#194#194#189#189#189#188#188
+  +#188#188#188#188#183#183#183#168#168#168#255#0#255#255#0#255'"'#181'H'#146
+  +#224#179#174#232#198#177#233#200#169#230#194#155#227#184#135#221#170'j'#213
+  +#150'O'#205#130';'#199't6'#197'p4'#200's+'#191'^'#20#164'('#255#0#255#255#0
+  +#255#179#179#179#223#223#223#233#233#233#234#234#234#231#231#231#226#226#226
+  +#219#219#219#208#208#208#199#199#199#192#192#192#189#189#189#190#190#190#185
+  +#185#185#171#171#171#255#0#255#255#0#255#255#0#255'8'#187'ZQ'#197'pS'#197'qQ'
+  +#197'oL'#195'kB'#192'd7'#188'Z.'#185'S%'#183'J#'#181'K#'#183'J'#26#175'9'#255
+  +#0#255#255#0#255#255#0#255#255#0#255#187#187#187#197#197#197#198#198#198#197
+  +#197#197#195#195#195#192#192#192#187#187#187#184#184#184#181#181#181#180#180
+  +#180#180#180#180#176#176#176#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#6'Lay'
+  +'out'#7#12'blGlyphRight'#9'NumGlyphs'#2#2#7'OnClick'#7#13'btn_NextClick'#8'T'
+  +'abOrder'#2#2#0#0#7'TBitBtn'#8'btn_Back'#4'Left'#3' '#1#6'Height'#2#25#3'Top'
+  +#2#5#5'Width'#2'K'#7'Anchors'#11#5'akTop'#7'akRight'#0#7'Caption'#6#4'Back'#7
+  +'Enabled'#8#10'Glyph.Data'#10':'#6#0#0'6'#6#0#0'BM6'#6#0#0#0#0#0#0'6'#0#0#0
+  +'('#0#0#0' '#0#0#0#16#0#0#0#1#0#24#0#0#0#0#0#0#6#0#0#19#11#0#0#19#11#0#0#0#0
+  +#0#0#0#0#0#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#11'|'#21#9'z'#20#8'q'#16#5
+  +'j'#12#4'g'#11#4'g'#12#4'g'#12#4'g'#12#4'g'#12#4'g'#12#4'g'#12#4'W'#9#255#0
+  +#255#255#0#255#255#0#255#255#0#255#157#157#157#156#156#156#153#153#153#150
+  +#150#150#149#149#149#149#149#149#149#149#149#149#149#149#149#149#149#149#149
+  +#149#149#149#149#145#145#145#255#0#255#255#0#255#255#0#255#18#154'('#26#176
+  +':'#21#175'2'#17#171''''#13#168#31#8#166#24#8#165#22#8#165#22#8#166#23#8#166
+  +#23#8#165#23#8#171#24#7#141#18#4'W'#8#255#0#255#255#0#255#168#168#168#177#177
+  +#177#174#174#174#173#173#173#170#170#170#169#169#169#168#168#168#168#168#168
+  +#169#169#169#169#169#169#168#168#168#169#169#169#161#161#161#145#145#145#255
+  +#0#255#255#0#255#27#173'<%'#197'T'#30#192'E'#26#190':'#21#189'1'#16#186''''
+  +#11#184#29#9#184#25#9#184#26#9#184#26#9#183#26#9#190#28#8#171#23#4'g'#12#255
+  ,#0#255#255#0#255#176#176#176#185#185#185#182#182#182#180#180#180#178#178#178
+  +#177#177#177#174#174#174#173#173#173#173#173#173#173#173#173#173#173#173#175
+  +#175#175#169#169#169#149#149#149#255#0#255#255#0#255' '#180'E1'#196'd)'#191
+  +'S"'#187'H'#27#186'='#23#183'3'#18#180')'#13#179' '#10#178#25#9#177#24#9#176
+  +#24#9#183#26#8#166#23#4'h'#12#255#0#255#255#0#255#179#179#179#188#188#188#185
+  +#185#185#181#181#181#179#179#179#177#177#177#175#175#175#173#173#173#173#173
+  +#173#172#172#172#171#171#171#173#173#173#169#169#169#150#150#150#255#0#255
+  +#255#0#255'"'#181'H?'#200'v5'#195'g+'#191'W#'#188'N'#29#186'B'#254#254#254#19
+  +#183'.'#14#180'$'#10#179#28#254#254#254#9#184#26#8#166#23#4'g'#12#255#0#255
+  +#255#0#255#180#180#180#193#193#193#189#189#189#185#185#185#182#182#182#180
+  +#180#180#254#254#254#177#177#177#174#174#174#173#173#173#254#254#254#173#173
+  +#173#169#169#169#149#149#149#255#0#255#255#0#255'!'#181'HX'#208#138'F'#201'z'
+  +'4'#197'i,'#191']'#254#254#254#254#254#254#26#186'='#22#183'3'#254#254#254
+  +#254#254#254#9#183#26#8#166#22#4'g'#12#255#0#255#255#0#255#180#180#180#203
+  +#203#203#195#195#195#189#189#189#185#185#185#254#254#254#254#254#254#179#179
+  +#179#177#177#177#254#254#254#254#254#254#173#173#173#169#169#169#149#149#149
+  +#255#0#255#255#0#255'!'#181'Hw'#216#159'R'#204#129';'#199'r'#254#254#254#254
+  +#254#254'&'#190'T!'#189'J'#254#254#254#254#254#254#19#181'-'#13#186'#'#10#167
+  +#24#4'h'#11#255#0#255#255#0#255#180#180#180#213#213#213#200#200#200#192#192
+  +#192#254#254#254#254#254#254#184#184#184#182#182#182#254#254#254#254#254#254
+  +#176#176#176#175#175#175#169#169#169#150#150#150#255#0#255#255#0#255'!'#181
+  +'H'#138#222#172']'#208#138#254#254#254#254#254#254'/'#195'h,'#193'b'#254#254
+  +#254#254#254#254#30#187'D'#24#185':'#20#187'1'#14#169'"'#6'o'#14#255#0#255
+  +#255#0#255#180#180#180#221#221#221#204#204#204#254#254#254#254#254#254#188
+  +#188#188#186#186#186#254#254#254#254#254#254#180#180#180#178#178#178#177#177
+  +#177#171#171#171#152#152#152#255#0#255#255#0#255'!'#181'H'#149#224#179'e'#210
+  +#143'H'#202'z'#254#254#254#254#254#254'0'#195'i.'#194'e'#254#254#254#254#254
+  +#254#31#187'F'#27#190'>'#20#174'/'#10'z'#20#255#0#255#255#0#255#180#180#180
+  +#224#224#224#206#206#206#197#197#197#254#254#254#254#254#254#188#188#188#187
+  +#187#187#254#254#254#254#254#254#181#181#181#180#180#180#174#174#174#157#157
+  +#157#255#0#255#255#0#255'!'#181'H'#157#227#185'o'#213#151'W'#206#133'N'#204
+  +''#254#254#254#254#254#254'5'#197'm0'#195'h'#254#254#254#254#254#254'#'#192
+  +'N'#27#178'<'#13#133#26#255#0#255#255#0#255#180#180#180#227#227#227#210#210
+  +#210#201#201#201#199#199#199#254#254#254#254#254#254#189#189#189#188#188#188
+  +#254#254#254#254#254#254#183#183#183#177#177#177#161#161#161#255#0#255#255#0
+  +#255'!'#181'H'#169#230#194#128#218#163'^'#208#138'Y'#207#135'M'#204'~'#254
+  +#254#254'C'#200'w9'#197'p2'#195'k'#254#254#254'*'#194'] '#181'H'#16#143#31
+  +#255#0#255#255#0#255#180#180#180#231#231#231#217#217#217#205#205#205#203#203
+  +#203#198#198#198#254#254#254#194#194#194#191#191#191#188#188#188#254#254#254
+  +#186#186#186#179#179#179#164#164#164#255#0#255#255#0#255'!'#181'I'#174#232
+  +#197#166#229#191#145#223#175#134#219#167'x'#215#157'g'#211#145'Y'#207#135'D'
+  +#201'x6'#197'n2'#195'l0'#197'j'''#187'W'#19#156'&'#255#0#255#255#0#255#180
+  +#180#180#233#233#233#230#230#230#223#223#223#218#218#218#213#213#213#208#208
+  +#208#203#203#203#195#195#195#189#189#189#188#188#188#188#188#188#183#183#183
+  +#169#169#169#255#0#255#255#0#255'"'#181'H'#146#224#179#174#232#198#177#233
+  +#200#169#230#194#155#227#184#135#221#170'j'#213#150'O'#205#130';'#199't6'#197
+  +'p4'#200's+'#191'^'#20#164'('#255#0#255#255#0#255#180#180#180#224#224#224#233
+  +#233#233#235#235#235#231#231#231#227#227#227#220#220#220#209#209#209#199#199
+  +#199#192#192#192#189#189#189#190#190#190#185#185#185#171#171#171#255#0#255
+  +#255#0#255#255#0#255'8'#187'ZQ'#197'pS'#197'qQ'#197'oL'#195'kB'#192'd7'#188
+  +'Z.'#185'S%'#183'J#'#181'K#'#183'J'#26#175'9'#255#0#255#255#0#255#255#0#255
+  +#255#0#255#188#188#188#197#197#197#198#198#198#197#197#197#195#195#195#192
+  +#192#192#188#188#188#184#184#184#181#181#181#180#180#180#181#181#181#176#176
+  +#176#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#9'NumGlyphs'#2#2#7'OnClick'#7#13
+  +'btn_BackClick'#8'TabOrder'#2#3#0#0#0#0
+]);
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDADataTableMasterLinkWizardForm_laz.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDADataTableMasterLinkWizardForm_laz.pas
new file mode 100644
index 0000000..6b792f1
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDADataTableMasterLinkWizardForm_laz.pas	
@@ -0,0 +1,572 @@
+unit uDADataTableMasterLinkWizardForm_laz;
+
+{$IFDEF MSWINDOWS}
+{$I ..\DataAbstract.inc}
+{$ELSE}
+{$I ../DataAbstract.inc}
+{$ENDIF}
+
+interface
+
+uses
+  LCLIntf,LResources,PropEdits,
+  SysUtils, Variants, Classes, Graphics, Controls, Forms,
+  Dialogs, StdCtrls, ComCtrls, Buttons, uDADataTable, ExtCtrls;
+
+type
+
+  { TDADataTableMasterLinkWizard }
+
+  TDADataTableMasterLinkWizard = class(TForm)
+    Bevel1: TBevel;
+    Panel1: TPanel;
+    Image1: TImage;
+    Label1: TLabel;
+    Label2: TLabel;
+    pc_Pages: TPageControl;
+    ts_Welcome: TTabSheet;
+    Label3: TLabel;
+    Label4: TLabel;
+    Label24: TLabel;
+    Label25: TLabel;
+    Label26: TLabel;
+    Label27: TLabel;
+    Label28: TLabel;
+    Label29: TLabel;
+    ts_MasterSource: TTabSheet;
+    Label8: TLabel;
+    Label9: TLabel;
+    Label10: TLabel;
+    Label17: TLabel;
+    lbl_Params1: TLabel;
+    lbl_Params2: TLabel;
+    lbl_Method1: TLabel;
+    lbl_Method2: TLabel;
+    lbl_Params3: TLabel;
+    lbl_Where1: TLabel;
+    lbl_Where2: TLabel;
+    cb_DataSources: TComboBox;
+    rb_Where: TRadioButton;
+    rb_Params: TRadioButton;
+    rb_Method: TRadioButton;
+    ts_Fields: TTabSheet;
+    labMasterFields: TLabel;
+    labDetailFields: TLabel;
+    Label13: TLabel;
+    Label14: TLabel;
+    Label18: TLabel;
+    Label19: TLabel;
+    lbMaster: TListBox;
+    lbDetail: TListBox;
+    eMasterFields: TEdit;
+    eDetailFields: TEdit;
+    bbAddFieldMapping: TBitBtn;
+    BitBtn4: TBitBtn;
+    ts_MethodCall: TTabSheet;
+    labMasterFields2: TLabel;
+    labDataReqParams: TLabel;
+    Label7: TLabel;
+    Label20: TLabel;
+    Label21: TLabel;
+    lbMaster2: TListBox;
+    lbDataReqParams: TListBox;
+    mMappings: TMemo;
+    bbAddDataReqMapping: TBitBtn;
+    bbClearDataReqMapping: TBitBtn;
+    ts_Params: TTabSheet;
+    Label11: TLabel;
+    Label12: TLabel;
+    Label15: TLabel;
+    Label22: TLabel;
+    Label23: TLabel;
+    lbMaster3: TListBox;
+    lbParams: TListBox;
+    mParamsMappings: TMemo;
+    bbAddParamMappingXXX: TBitBtn;
+    bbClearParamMappingsXXX: TBitBtn;
+    ts_Finish: TTabSheet;
+    Label5: TLabel;
+    Label6: TLabel;
+    Panel2: TPanel;
+    btn_Finish: TBitBtn;
+    btn_Cancel: TBitBtn;
+    btn_Next: TBitBtn;
+    btn_Back: TBitBtn;
+    Label16: TLabel;
+    procedure bbAddFieldMappingClick(Sender: TObject);
+    procedure bbAddDataReqMappingClick(Sender: TObject);
+    procedure bbClearDataReqMappingClick(Sender: TObject);
+    procedure BitBtn4Click(Sender: TObject);
+    procedure FormCreate(Sender: TObject);
+    procedure bbAddParamMappingXXXClick(Sender: TObject);
+    procedure bbClearParamMappingsXXXClick(Sender: TObject);
+    procedure cb_DataSourcesChange(Sender: TObject);
+    procedure btn_FinishClick(Sender: TObject);
+    procedure OnFieldMappingChange(Sender: TObject);
+    procedure FormDestroy(Sender: TObject);
+    procedure btn_BackClick(Sender: TObject);
+    procedure btn_NextClick(Sender: TObject);
+  private
+    fDataTable: TDADataTable;
+    fMasterSource: TDADataSource;
+    fDesigner: TPropertyEditorHook;
+    fInEnterPage: boolean;
+    fActiveControl: TWinControl;
+    fValues: TStrings;
+    fNextPage: integer;
+    fPreviousPage: integer;
+    procedure GetDataTables(const aName: ansistring);
+    function GetActiveControl: TWinControl;
+    procedure SetActiveControl(const Value: TWinControl);
+    function GetNextPage: integer;
+    function GetPreviousPage: integer;
+    procedure Initialize;
+  protected
+    function CleanPascalString(const aString: string): string;
+    procedure AfterEnterPage(aPage:TTabSheet; aMovingForward:boolean);
+    procedure OnLeavePage(aPage:TTabSheet; aMovingForward:boolean);
+    procedure OnEnterPage(aPage:TTabSheet; aMovingForward:boolean);
+  public
+    constructor Create(aOwner : TComponent); reintroduce;
+    property Values:TStrings read fValues;
+    function Execute:boolean; overload;
+    class function Execute(aOwner: TComponent): boolean; overload;
+    property ActiveControl: TWinControl read GetActiveControl write SetActiveControl;
+    property NextPage: integer read GetNextPage write fNextPage;
+    property PreviousPage: integer read GetPreviousPage write fPreviousPage;
+    class function ExecuteWizard(aDataTable: TDADataTable; aDesigner: TPropertyEditorHook): boolean;
+  end;
+
+var
+  DADataTableMasterLinkWizard: TDADataTableMasterLinkWizard;
+
+
+implementation
+
+uses uROClasses, TypInfo, uDARemoteDataAdapter, uRODynamicRequest, uRODL;
+
+procedure TrimNamesAndValues(aSL: TStrings);
+var
+  i: Integer;
+begin
+  for i := 0 to aSL.Count - 1 do begin
+    aSL[i] := Trim(aSL.Names[i]) + aSL.NameValueSeparator + Trim(aSL.Values[aSL.Names[i]]);
+
+  end;
+end;
+
+{ TDataTableMasterLink }
+
+class function TDADataTableMasterLinkWizard.ExecuteWizard(aDataTable: TDADataTable; aDesigner: TPropertyEditorHook): boolean;
+begin
+  with TDADataTableMasterLinkWizard.Create(NIL) do try
+    fDataTable := aDataTable;
+    fDesigner := aDesigner;
+    Initialize();
+    result := Execute();
+  finally
+    Free;
+  end;
+end;
+
+constructor TDADataTableMasterLinkWizard.Create(aOwner: TComponent);
+begin
+  inherited;
+
+end;
+
+procedure TDADataTableMasterLinkWizard.Initialize;
+var
+  i : integer;
+begin
+  cb_DataSources.Items.Clear();
+  fDesigner.GetComponentNames(GetTypeData(TypeInfo(TDADataSource)), Self.GetDataTables);
+  if assigned(fDataTable.MasterSource) then begin
+    cb_DataSources.ItemIndex := cb_DataSources.Items.IndexOf(fDataTable.MasterSource.Name);
+    //lMasterTable := fDataTable.MasterSource.DataTable;
+    //Check(mast=NIL, 'MasterSource doesn''t point to a datatable');
+  end;
+  cb_DataSourcesChange(nil);
+
+  Caption := Format(Caption, [fDataTable.Name]);
+
+  eMasterFields.Text := fDataTable.MasterFields;
+  eDetailFields.Text := fDataTable.DetailFields;
+  mMappings.Lines.Text := fDataTable.MasterRequestMappings.Text;
+  mParamsMappings.Lines.Text := fDataTable.MasterParamsMappings.Text;
+
+  for i := 0 to (fDataTable.FieldCount-1) do
+    lbDetail.Items.Add(fDataTable.Fields[i].Name);
+
+  for i := 0 to (fDataTable.Params.Count-1) do
+    lbParams.Items.Add(fDataTable.Params[i].Name);
+
+  case fDataTable.MasterMappingMode of
+    mmParams: rb_Params.Checked := true;
+    mmDataRequest: rb_Method.Checked := true;
+    mmWhere: rb_Where.Checked := true;
+  end;
+end;
+
+procedure TDADataTableMasterLinkWizard.GetDataTables(const aName: ansistring);
+var
+  lDataSource: TDADataSource;
+begin
+  lDataSource := fDesigner.GetComponent(aName) as TDADataSource;
+  if assigned(lDataSource.DataTable) and (lDataSource.DataTable <> fDataTable) then
+    cb_DataSources.Items.Add(aName);
+end;
+
+function TDADataTableMasterLinkWizard.CleanPascalString(const aString: string
+  ): string;
+begin
+  result := aString;
+  result := StringReplace(result,'''','''''',[rfReplaceAll]); { replace quotes with double quotes }
+  result := StringReplace(result,#13#10,'''#13#10''',[rfReplaceAll]);
+  result := ''''+result+'''';
+end;
+
+procedure TDADataTableMasterLinkWizard.cb_DataSourcesChange(Sender: TObject);
+var
+  lMasterTable: TDADataTable;
+  lCall: TRODynamicRequest;
+  i: integer;
+begin
+  fMasterSource := fDesigner.GetComponent(cb_DataSources.Text) as TDADataSource;
+  if assigned(fMasterSource) and assigned(fMasterSource.DataTable) then begin
+    lMasterTable := fMasterSource.DataTable;
+
+    rb_Params.Enabled := fDataTable.Params.Count > 0;
+    lbl_Params1.Enabled := rb_Params.Enabled;
+    lbl_Params2.Enabled := rb_Params.Enabled;
+
+    rb_Method.Enabled := assigned(lMasterTable.RemoteDataAdapter) and
+                         assigned(fDataTable.RemoteDataAdapter) and
+                         (lMasterTable.RemoteDataAdapter <> fDataTable.RemoteDataAdapter);
+    lbl_Method1.Enabled := rb_Method.Enabled;
+
+    if (not rb_Params.Enabled and rb_Params.Checked) or (not rb_Method.Enabled and rb_Method.Checked) then
+      rb_Where.Checked := true;
+
+    lbMaster.Items.Clear();
+    lbMaster2.Items.Clear();
+    lbMaster3.Items.Clear();
+    for i := 0 to (lMasterTable.FieldCount-1) do begin
+      lbMaster.Items.Add(lMasterTable.Fields[i].Name);
+      lbMaster2.Items.Add(lMasterTable.Fields[i].Name);
+      lbMaster3.Items.Add(lMasterTable.Fields[i].Name);
+    end;
+
+    if assigned(fDataTable.RemoteDataAdapter) then begin
+      lCall := (fDataTable.RemoteDataAdapter as TDARemoteDataAdapter).GetDataCall;
+      lbDataReqParams.Items.Clear();
+      for i := 0 to lCall.Params.Count-1 do
+        if lCall.Params[i].Flag in [fIn, fInOut] then
+          lbDataReqParams.Items.Add(lCall.Params[i].Name);
+    end
+    else begin
+      lbDataReqParams.Enabled := false;
+    end;
+
+    if pc_Pages.ActivePage = ts_MasterSource then
+      btn_Next.Enabled := (rb_Where.Enabled and rb_Where.Checked) or (rb_Params.Enabled and rb_Params.Checked) or (rb_Method.Enabled and rb_Method.Checked);
+  end
+  else begin
+    if pc_Pages.ActivePage = ts_MasterSource then
+      btn_Next.Enabled := false;
+  end;
+end;
+
+
+procedure TDADataTableMasterLinkWizard.bbAddFieldMappingClick(Sender: TObject);
+var x : integer;
+begin
+  if (lbMaster.SelCount=0) or (lbMaster.SelCount<>lbDetail.SelCount) then begin
+    Beep;
+    Exit;
+  end;
+
+  for x := 0 to (lbMaster.Items.Count-1) do
+    if lbMaster.Selected[x] then begin
+      if (eMasterFields.Text<>'')
+        then eMasterFields.Text := eMasterFields.Text+';';
+      eMasterFields.Text := eMasterFields.Text+lbMaster.Items[x];
+    end;
+
+  for x := 0 to (lbDetail.Items.Count-1) do
+    if lbDetail.Selected[x] then begin
+      if (eDetailFields.Text<>'')
+        then eDetailFields.Text := eDetailFields.Text+';';
+      eDetailFields.Text := eDetailFields.Text+lbDetail.Items[x];
+    end;
+  OnFieldMappingChange(nil);
+end;
+
+procedure TDADataTableMasterLinkWizard.bbAddDataReqMappingClick(Sender: TObject);
+var x, i : integer;
+    s : TStringList;
+begin
+  if (lbMaster2.SelCount=0) or (lbDataReqParams.SelCount<>lbMaster2.SelCount) then begin
+    Beep;
+    Exit;
+  end;
+
+  s := TStringList.Create;
+  try
+      for x := 0 to (lbDataReqParams.Items.Count-1) do
+      if lbDataReqParams.Selected[x] then s.Add(lbDataReqParams.Items[x]+'=');
+
+    i := 0;
+    for x := 0 to (lbMaster2.Items.Count-1) do
+      if lbMaster2.Selected[x] then begin
+        s[i] := s[i]+lbMaster2.Items[x];
+        Inc(i);
+      end;
+
+    mMappings.Lines.AddStrings(s);
+  finally
+    s.Free;
+  end;
+end;
+
+procedure TDADataTableMasterLinkWizard.bbClearDataReqMappingClick(Sender: TObject);
+begin
+  mMappings.Lines.Clear
+end;
+
+procedure TDADataTableMasterLinkWizard.BitBtn4Click(Sender: TObject);
+begin
+  eMasterFields.Text := '';
+  eDetailFields.Text := '';
+  OnFieldMappingChange(nil);
+end;
+
+
+procedure TDADataTableMasterLinkWizard.OnFieldMappingChange(
+  Sender: TObject);
+begin
+  if pc_Pages.ActivePage = ts_Fields then
+    btn_Next.Enabled := (eMasterFields.Text <> '') and (eDetailFields.Text <> '');
+end;
+
+procedure TDADataTableMasterLinkWizard.FormDestroy(Sender: TObject);
+begin
+  FreeAndNil(fValues);
+end;
+
+procedure TDADataTableMasterLinkWizard.btn_BackClick(Sender: TObject);
+begin
+  if pc_Pages.ActivePageIndex > 0 then begin
+    fInEnterPage := true;
+    try
+      OnLeavePage(pc_Pages.Pages[pc_Pages.ActivePageIndex],false);
+      OnEnterPage(pc_Pages.Pages[PreviousPage],false);
+    finally
+      fInEnterPage := false;
+    end;
+    pc_Pages.ActivePageIndex := PreviousPage;
+    if Assigned(fActiveControl) then begin
+      inherited ActiveControl := fActiveControl;
+      fActiveControl := nil;
+    end;
+  end;
+  fNextPage := -1;
+  fPreviousPage := -1;
+  AfterEnterPage(pc_Pages.ActivePage, false);
+end;
+
+procedure TDADataTableMasterLinkWizard.btn_NextClick(Sender: TObject);
+begin
+  if pc_Pages.ActivePageIndex+1 < pc_Pages.PageCount then begin
+    fInEnterPage := true;
+    try
+      OnLeavePage(pc_Pages.Pages[pc_Pages.ActivePageIndex],true);
+      OnEnterPage(pc_Pages.Pages[NextPage],true);
+    finally
+      fInEnterPage := false;
+    end;
+    fPreviousPage := pc_Pages.ActivePageIndex;
+    pc_Pages.ActivePageIndex := NextPage;
+    if Assigned(fActiveControl) then begin
+      inherited ActiveControl := fActiveControl;
+      fActiveControl := nil;
+    end;
+  end;
+  fNextPage := -1;
+  AfterEnterPage(pc_Pages.ActivePage, true);
+end;
+
+function TDADataTableMasterLinkWizard.GetActiveControl: TWinControl;
+begin
+  if Assigned(fActiveControl) then
+    result := fActiveControl
+  else
+    result := inherited ActiveControl;
+end;
+
+procedure TDADataTableMasterLinkWizard.SetActiveControl(const Value: TWinControl
+  );
+begin
+  if fInEnterPage then begin
+    fActiveControl := Value;
+  end
+  else begin
+    inherited ActiveControl := Value;
+    fActiveControl := nil;
+  end;
+end;
+
+function TDADataTableMasterLinkWizard.GetNextPage: integer;
+begin
+  Result := fNextPage;
+  if result = -1 then result := pc_Pages.ActivePageIndex+1;
+end;
+
+function TDADataTableMasterLinkWizard.GetPreviousPage: integer;
+begin
+  Result := fPreviousPage;
+  if result = -1 then result := pc_Pages.ActivePageIndex-1;
+end;
+
+procedure TDADataTableMasterLinkWizard.FormCreate(Sender: TObject);
+var
+  i: integer;
+begin
+  for i := 0 to ComponentCount-1 do begin
+    if Components[i] is TTabSheet then TTabSheet(Components[i]).TabVisible := false;
+  end;
+
+  fValues := TStringList.Create();
+
+  Height := Height-16;
+  pc_Pages.ActivePageIndex := 0;
+  OnEnterPage(pc_Pages.Pages[0],true);
+
+  fNextPage := -1;
+  fPreviousPage := -1;
+end;
+
+procedure TDADataTableMasterLinkWizard.bbAddParamMappingXXXClick(Sender: TObject);
+var x, i : integer;
+    s : TStringList;
+begin
+  if (lbMaster3.SelCount=0) or (lbParams.SelCount<>lbMaster3.SelCount) then begin
+    Beep;
+    Exit;
+  end;
+
+  s := TStringList.Create;
+  try
+      for x := 0 to (lbParams.Items.Count-1) do
+      if lbParams.Selected[x] then s.Add(lbParams.Items[x]+'=');
+
+    i := 0;
+    for x := 0 to (lbMaster3.Items.Count-1) do
+      if lbMaster3.Selected[x] then begin
+        s[i] := s[i]+lbMaster3.Items[x];
+        Inc(i);
+      end;
+
+    mParamsMappings.Lines.AddStrings(s);
+  finally
+    s.Free;
+  end;
+end;
+
+procedure TDADataTableMasterLinkWizard.bbClearParamMappingsXXXClick(Sender: TObject);
+begin
+  mParamsMappings.Lines.Clear
+end;
+
+procedure TDADataTableMasterLinkWizard.btn_FinishClick(Sender: TObject);
+begin
+  fDataTable.MasterSource := fMasterSource;
+  fDataTable.MasterFields := eMasterFields.Text;
+  fDataTable.DetailFields := eDetailFields.Text;
+
+  TrimNamesAndValues(mMappings.Lines);
+  TrimNamesAndValues(mParamsMappings.Lines);
+
+  fDataTable.MasterRequestMappings.Text := mMappings.Lines.Text;
+  fDataTable.MasterParamsMappings.Text := mParamsMappings.Lines.Text;
+
+  if rb_Where.Checked then
+    fDataTable.MasterMappingMode := mmWhere
+  else if rb_Params.Checked then
+    fDataTable.MasterMappingMode := mmParams
+  else if rb_Method.Checked then
+    fDataTable.MasterMappingMode := mmDataRequest;
+
+end;
+
+procedure TDADataTableMasterLinkWizard.AfterEnterPage(aPage: TTabSheet;
+  aMovingForward: boolean);
+begin
+  if (aPage = ts_MasterSource) and aMovingForward then begin
+    cb_DataSourcesChange(nil);
+  end
+  else if (aPage = ts_Fields) and aMovingForward then begin
+    OnFieldMappingChange(nil);
+  end;
+end;
+
+procedure TDADataTableMasterLinkWizard.OnLeavePage(aPage: TTabSheet;
+  aMovingForward: boolean);
+begin
+  if (aPage = ts_Fields) and aMovingForward then begin
+    if rb_Where.Checked then NextPage := ts_Finish.PageIndex
+    else if rb_Params.Checked then NextPage := ts_Params.PageIndex
+    else if rb_Method.Checked then NextPage := ts_MethodCall.PageIndex;
+  end
+  else if (aPage = ts_Params) or (aPage = ts_MethodCall) then begin
+    NextPage := ts_Finish.PageIndex;
+    PreviousPage := ts_Fields.PageIndex;
+  end;
+end;
+
+procedure TDADataTableMasterLinkWizard.OnEnterPage(aPage: TTabSheet;
+  aMovingForward: boolean);
+begin
+  {$IFDEF FPC}
+  if aMovingForward then btn_Finish.Visible := false else // for prevent warnings
+  {$ENDIF}
+  btn_Finish.Visible := false;
+  btn_Next.Visible := true;
+  if aPage = ts_Welcome then begin
+    btn_Back.Enabled := false;
+    btn_Next.Enabled := true;
+    ActiveControl := btn_Next;
+  end
+  else if aPage = ts_Finish then begin
+    try
+      btn_Finish.Visible := true;
+      btn_Finish.Enabled := true;
+      btn_Next.Visible := false;
+      ActiveControl := btn_Finish;
+    finally
+    end;
+  end
+  else { default for custom added pages } begin
+    btn_Back.Enabled := true;
+    btn_Next.Enabled := true;
+  end;
+end;
+
+function TDADataTableMasterLinkWizard.Execute: boolean;
+begin
+  result := (ShowModal() = 1); // idOk=1
+end;
+
+class function TDADataTableMasterLinkWizard.Execute(aOwner: TComponent
+  ): boolean;
+begin
+  with self.Create(aOwner) do try
+    result := Execute();
+  finally
+    Free();
+  end;
+end;
+
+initialization
+  {$I uDADataTableMasterLinkWizardForm_laz.lrs}
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDADataTableWizards.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDADataTableWizards.pas
new file mode 100644
index 0000000..f8fe705
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDADataTableWizards.pas	
@@ -0,0 +1,234 @@
+unit uDADataTableWizards;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - IDE Library                                        }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFDEF MSWINDOWS}
+{$I ..\DataAbstract.inc}
+{$ELSE}
+{$I ../DataAbstract.inc}
+{$ENDIF}
+
+interface
+
+uses
+  {$IFDEF MSWINDOWS}Windows, {$ENDIF}
+  Classes, Types, Controls,{$IFDEF FPC}ComponentEditors,PropEdits,{$ELSE}ToolsAPI, DesignIntf,{$ENDIF}
+  uDAClasses, uDADataTable;
+
+type
+  {$IFDEF FPC}
+  IDesigner = TComponentEditorDesigner;
+  {$ENDIF}
+
+  TDataTableWizards = class
+  private
+    class procedure GetDataTables(const aName: string);
+  public
+    class function CreateDataTables(aDesigner: IDesigner; aAdapter: TDABaseRemoteDataAdapter; aSchema: TDASchema; aCoordinates: TPoint): boolean; overload;
+    {$IFNDEF FPC}
+    class function CreateDataTables(aForm: IOTAFormEditor; aAdapter: TDABaseRemoteDataAdapter; aSchema: TDASchema; aCoordinates: TPoint): boolean; overload;
+    {$ENDIF}
+  end;
+  
+implementation
+
+uses
+  Forms, SysUtils, Dialogs, Registry, TypInfo,
+  uROClasses,
+  uDAInterfaces, uDAPleaseWaitForm, uDASelectDataTablesForm, uDAMemDataTable {, uDARemoteDataAdapter};
+
+
+function ComponentExists(aDesigner: IDesigner; aName: string): boolean;
+var
+  i: integer;
+begin
+  for i := 0 to aDesigner.{$IFDEF FPC}Form{$ELSE}Root{$ENDIF}.ComponentCount-1 do
+    if aDesigner.{$IFDEF FPC}Form{$ELSE}Root{$ENDIF}.Components[i].Name = aName then begin
+      result := true;
+      exit;
+    end;
+  result := false;
+end;
+
+procedure CreateDataTable(aDesigner: IDesigner; aClass:TDADataTableClass; aAdapter: TDABaseRemoteDataAdapter; aSchema: TDASchema;
+                          const aDataTableName: String; X,Y: integer; aCreateDataSource: boolean=true); overload;
+var
+  lDataTable:TDADataTable;
+  lDataSource:TDADataSource;
+  lBaseName:string;
+  lDataTablePrefix,lDataSourcePrefix:string;
+  lDataset: TDADataSet;
+  lField: TDAField;
+begin
+  with TRegistry.Create do try
+    RootKey := HKEY_CURRENT_USER;
+    OpenKey('Software\RemObjects\Data Abstract\IDE\ComponentPrefixes',false);
+    lDataTablePrefix := ReadString('TDADataTable');
+    lDataSourcePrefix := ReadString('TDADataSource');
+  finally
+    Free();
+  end;
+  if lDataTablePrefix = '' then lDataTablePrefix := 'tbl_';
+  if lDataSourcePrefix = '' then lDataSourcePrefix := 'ds_';
+
+  {$IFDEF FPC}
+  lDataTable := aClass.Create(aDesigner.Form);
+  LongRec(lDataTable.DesignInfo).Lo := X;
+  LongRec(lDataTable.DesignInfo).Hi := Y;
+  {$ELSE}
+  lDataTable := aDesigner.CreateComponent(aClass, nil, X, Y, 24, 24) as TDADataTable;
+  {$ENDIF}
+  lDataset := aSchema.FindDataset(aDataTableName);
+  if Assigned(lDataset) then begin
+    lDataTable.LogicalName := lDataset.Name;
+    lDataTable.CustomAttributes.Assign(lDataset.CustomAttributes);
+    lDataTable.Fields.AssignFieldCollection(lDataset.Fields);
+    lDataTable.Params.AssignParamCollection(lDataset.Params);
+    lBaseName := lDataset.Name;
+    // ToDo: the code below is shared with RDA.FillSchema. Refactor.
+    if lDataset is TDAUnionDataTable then begin
+      if not Assigned(lDataset.Fields.FindField(def_SourceTableFieldName) as TDAField) then begin
+        lField := lDataTable.Fields.Add();
+        lField.Name := def_SourceTableFieldName;
+        lField.DataType := datInteger;
+        lField.InPrimaryKey := True;
+        lField.ServerAutoRefresh := True;
+      end;
+    end;
+  end;
+
+  lDataTable.RemoteDataAdapter := aAdapter;
+
+  RemoveExcept(lBaseName,['a'..'z','A'..'Z','0'..'9','_']);
+  if ComponentExists(aDesigner, lDataTablePrefix+lBaseName) then
+    lDataTable.Name := aDesigner.UniqueName(lDataTablePrefix+lBaseName)
+  else
+    lDataTable.Name := lDataTablePrefix+lBaseName;
+
+
+  if aCreateDataSource then begin
+    {$IFDEF FPC}
+    lDataSource := TDADataSource.Create(aDesigner.Form);
+    LongRec(lDataSource.DesignInfo).Lo := X;
+    LongRec(lDataSource.DesignInfo).Hi := Y+44;
+    {$ELSE}
+    lDataSource := aDesigner.CreateComponent(TDADataSource, nil , X, Y+44, 24, 24) as TDADataSource;
+    {$ENDIF}
+    lDataSource.DataTable := lDataTable;
+    if ComponentExists(aDesigner, lDataSourcePrefix+lBaseName) then
+      lDataSource.Name := aDesigner.UniqueName(lDataSourcePrefix+lBaseName)
+    else
+      lDataSource.Name := lDataSourcePrefix+lBaseName;
+  end;
+
+end;
+
+{$IFNDEF FPC}
+class function TDataTableWizards.CreateDataTables(aForm: IOTAFormEditor; aAdapter: TDABaseRemoteDataAdapter; aSchema: TDASchema; aCoordinates: TPoint): boolean;
+begin
+  result := CreateDataTables((aForm as INTAFormEditor).FormDesigner, aAdapter, aSchema, aCoordinates);
+end;
+{$ENDIF}
+
+var
+  gDataTables: TStringList;
+  gDesigner: IDesigner;
+
+class procedure TDataTableWizards.GetDataTables(const aName: string);
+var
+  lComponent: TComponent;
+begin
+  {$IFDEF FPC}
+  lComponent := gDesigner.PropertyEditorHook.GetComponent(aName);
+  {$ELSE}
+  lComponent := gDesigner.GetComponent(aName);
+  {$ENDIF}
+  if assigned(lComponent) then
+    gDataTables.Add((lComponent as TDADataTable).LogicalName);
+end;
+
+class function TDataTableWizards.CreateDataTables(aDesigner: IDesigner; aAdapter: TDABaseRemoteDataAdapter; aSchema: TDASchema; aCoordinates: TPoint): boolean;
+var
+  lForm: TDASelectDataTablesForm;
+  lDataTables: TStringList;
+  i: integer;
+  Y: integer;
+  {$IFDEF FPC}
+  ldesigner: TPropertyEditorHook;
+  {$ELSE}
+  ldesigner: IDesigner;
+  {$ENDIF}
+begin
+  {$IFDEF FPC}
+  ldesigner:= aDesigner.PropertyEditorHook;
+  {$ELSE}
+  ldesigner := aDesigner;
+  {$ENDIF}
+  lDataTables := TStringList.Create;
+  try
+    lDataTables.Sorted := true;
+    for i := 0 to aSchema.Datasets.Count-1 do
+      if aSchema.Datasets[i].IsPublic then
+        lDataTables.AddObject(aSchema.Datasets[i].Name, aSchema.Datasets[i]);
+
+    for i := 0 to aSchema.UnionDataTables.Count-1 do
+      if aSchema.UnionDataTables[i].IsPublic then
+        lDataTables.AddObject(aSchema.UnionDataTables[i].Name, aSchema.UnionDataTables[i]);
+
+    for i := 0 to aSchema.JoinDataTables.Count-1 do
+      if aSchema.JoinDataTables[i].IsPublic then
+        lDataTables.AddObject(aSchema.JoinDataTables[i].Name, aSchema.JoinDataTables[i]);
+
+    if lDataTables.Count > 0 then begin
+
+      gDesigner := aDesigner;
+      gDataTables := TStringList.Create();
+      try
+        lDesigner.GetComponentNames(GetTypeData(TypeInfo(TDADataTable)), GetDataTables);
+        lForm := TDASelectDataTablesForm.Create(nil);
+        try
+          for i := 0 to lDataTables.Count-1 do begin
+            lForm.lb_DataTables.Items.AddObject(lDataTables[i], lDataTables.Objects[i]);
+            lForm.lb_DataTables.Checked[lForm.lb_DataTables.Items.Count-1] := gDataTables.IndexOf(lDataTables[i]) = -1;
+          end;
+          lForm.UpdateCheckBoxState();
+          lForm.OkButtonCaption := '&Create';
+          result := (lForm.ShowModal() = mrOk);
+          if result then begin
+            Y := aCoordinates.Y;
+            for i := 0 to lForm.lb_DataTables.Items.Count - 1 do
+              if lForm.lb_DataTables.Checked[i] then begin
+                CreateDataTable(aDesigner, TDAMemDataTable, aAdapter, aSchema, lForm.lb_DataTables.Items[i], aCoordinates.X, Y, true);
+                inc(y, 88); // doesn't seem to work :(
+              end;
+          end;
+        finally
+          FreeAndNil(lForm);
+        end;
+
+      finally
+        FreeAndNil(gDataTables);
+        gDesigner := nil;
+      end;
+
+    end
+    else begin
+      ShowMessage('No data tables were found in schema.');
+      result := false;
+    end;
+  finally
+    FreeAndNil(lDataTables);
+  end;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAGuideWizardForm.dfm b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAGuideWizardForm.dfm
new file mode 100644
index 0000000..3a2cc06
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAGuideWizardForm.dfm	
@@ -0,0 +1,1799 @@
+inherited DAGuideWizardForm: TDAGuideWizardForm
+  Left = 309
+  Top = 307
+  Caption = 'New Data Abstract Server Project Wizard'
+  ClientHeight = 293
+  ClientWidth = 569
+  Icon.Data = {
+    0000010006003030000001000800A80E0000660000002020000001000800A808
+    00000E0F0000101000000100080068050000B61700003030000001002000A825
+    00001E1D00002020000001002000A8100000C642000010100000010020006804
+    00006E5300002800000030000000600000000100080000000000000900000000
+    00000000000000010000000100000000000005050500090909000D0D0D000B12
+    0B000E150E000A1D0A000C190C00121212001515150011181100101D10001919
+    19001D1D1D000A230A000F2A0F00053F0500093709000C3C0C0014391400163D
+    1600193019001A391A00212121002525250020282000292929002D2D2D002434
+    2400293229003131310035353500333D3300393939003D3D3D0007420700044B
+    04000B420B000C450C000E480E00025902000C590C0016461600104C10001353
+    130014551400155815001D511D00185F180000660000006A0000006E0000076F
+    07000B620B00096709000E600E000E6D0E00007200000075000000780000007D
+    00000E7F0E00136C1300196119001B651B00204C20002C5C2E00364036003956
+    3B002571270028742C002B7730002D7A3300307C3700327F3B003C6240004040
+    400045454500494949004D4D4D0049534A005151510056565600595959005D5D
+    5D004167460047644C0043694800456B4B00417A4900447D4E004F6252005D79
+    65006161610065656500616B6400686868006E6E6E00637F6C00717171007474
+    7400787878007D7D7D000081000000850000008A0000008D00000A810A000A85
+    0A00009100000095000000990000049D05001284130007A00B000BA411000FA8
+    170013AC1C001F91260022942A002D83350035823E002D973A0016AF22001AB3
+    28001EB72E002FA13E0022BB340026BE39002AC23F00388442003B8745003D89
+    49003C9B4C003C9C4D0032A442003BAE50003AB650003EB95500408C4D00438F
+    51004197510045925400479C580045A459005C826700629B750058A46D005DA9
+    740060AC78002DC6440031CA4A0035CD500039D156003DD55B0040D9610044DD
+    670052C470004CDB710058DD7F0048E06D004CE4730050E8780053EC7E005FDA
+    860057EF84005BEA87005FED8C005BF38A005FF78F0086868600959595009F9F
+    9F00A2A2A200AAAAAA00ACACAC00000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0066511F090909090D4E60000000000000000000000000000000000000000000
+    00000000000000000000000000004E0D0D0D0D0D090909090309030303186400
+    000000000000000000000000000000000000000000000000000000001F181818
+    0D0D0D090D09090909030303030303004E000000000000000000000000000000
+    000000000000000000001F1A1818180D180D0D0D0D0909090909090303030303
+    00035D000000000000000000000000000000000000000000641A1A1A1A181818
+    180D151327272727110F05090303030303000309000000000000000000000000
+    000000000000004E1F1A1F1A1A1A182A353B3B3B3A3A3A333333332811070303
+    030300000064000000000000000000000000000000004E1A1F1F1A1F1A1A1C2D
+    2D353B3B3B3A3A3A3A333333313124070303030300005D000000000000000000
+    00000000004E1F1F1F1F1F1A1F1A1A1A181A182A3A3B3A3A3333333333313331
+    100404000303005D0000000000000000000000004E1F1F211F1F1A1F1A1F1A1A
+    1A1A1818163B3B3A3A3A33333333313131280703030003006400000000000000
+    0000005D212121211F1F1F1F1A1F1A1A1A1A1A18183B3B3B3A3A3A3331120F0B
+    080507030303000300000000000000000000AB4E214E2121211F1F1F1F1A1F1F
+    1A1A1A181A673B3B3B3A3A270C09090909030303030303000309000000000000
+    00004E214E21212121211F1F1F1F1A1F1A1E1A1A1867673B3B3B3A0D0D0C0C09
+    0909090303030303000051000000000000644E4E214E214E2121211F1F1F1F1A
+    1F1A1A1A1A1A181A16132D0D0D0C0C0909090903030303030303000000000000
+    004E4E4E4E44462121212121211F1F1F1F1E1F1A1A1A1A1818180D0D0D0D0D0C
+    09090909090310030003034E00000000664E4E214E76474E214E2121211F1F1F
+    1F1A1E1E1A1A1A1A181818170D0D0D0D090B0C080908310E0303000300000000
+    4E4E4E4E4B7C474E21214E2121211F1F1F1F1A1F1A1E1A1A1A181817180D0D0D
+    0D0C09090908312403030303640000004E514E4E7A7D474E4E2121212121211F
+    1F1F1F1E1E1A1A1A1A18181817180D0D0D0C0C09090933310703030309000066
+    514E5150807F4A4E214E4E214E2121211F1F1F1E1E1F1E1A1A1A1A181817180D
+    0D0D0D0C0909333123030303030000515151515981804A4E4E214E21214E2121
+    211F1F1F1E1A1E1E1A1A1A1A181817180D0D0D0D0C0C33332809030303000051
+    515151859681824E4E4E4E4E2121212121211F1F1F1F1E1E1E1A1A1A1A181817
+    180D0D0D0C0C33333109050303530053535151889796834E4E4E214E4E214E21
+    212121211F1F1E1E1E1E1A1A1A1A181817180D0D0D0C3333330F0909034E0053
+    5351519A9797844E4E4E4E4E214E214E212121211F1F1F1E1E1E1E1A1A1A1A18
+    1817180D0D0D3A3A33120909030900535353519B99988B4E4E4E4E4E4E4E214E
+    214E2121211F1F1F1E1E1E1E1A1A1A1A181817180D0D3A3A3327090909030053
+    5353539B9A998C514E4E4E4E4E214E214E21212121211F1F1F1E1E1E1E1A1A1A
+    1A181817180D3A3A3A270909090900535353539B9B9A8C51514E4E4E4E4E4E4E
+    214E214E2121211F1F1F1E1E1E1E1A1A1A1A181817293B3A3A2709090909005D
+    535353A19B9B905151514E4E4E4E4E4E4E214E21212121211F1F1F1E1E2D382E
+    2E2D3533673B3B3B3A270C0D0909005D5D5D539EA19C9B8F5B51514E4E4E4E4E
+    214E214E214E2121211F1F1F1E306A6A676A676767673B3B3B130D0C0D1F005D
+    5D535D9DA1A09B9B9A8A8D8C58574B4E4E4E4E214E21212121211F1F1F306A6A
+    6A6767676767673B3B150D0D0951005D5D5D5394A1A1A19B9B9A99989796964E
+    4E4E4E4E214E214E2121211F1F306D6A6A6A6A67676767673B180D0D0D660066
+    5D5D5D5CA3A3A1A09C9B9A999897964E4E4E4E214E214E21214C21211F306D6A
+    6A6A676A6A67676735180D180D0000AC5D5D5D5D9FA3A2A1A09B9B9A9998974E
+    4E4E4E4E4E4E214E214C212121406D6D6A6A6A6A676A67672A18180D0D000000
+    60605D5D94A5A3A3A1A09C9B9A99985A4E4E4E4E4E4E4E214E214E2121716D6D
+    6D6D6A6A676A67671A1818184E000000645D605D5FA6A5A3A2A1A09B9B9A9998
+    86564E4E4E4E214E214E2142716F6F6F6D6D6A6A6A6A672E1A18181800000000
+    00605D605D95A8A5A3A3A1A09C9B9A9A989796877A4A4A7877767474706F6F6F
+    6D6D6D6D6A6A671E1A1A181F000000000064605D605DA4A8A5A3A2A1A09B9B9A
+    9998979681807F7D7D75757474726F6F6F6D6D6D6A6A411E1A1A1A0000000000
+    000060605D6062A7A8A5A3A3A1A09C9B9A9998979681807F7D7D75757474726F
+    6F6F6F6D6D381F1A1E1A21000000000000006660605D6092A8A8A5A3A2A1A09B
+    9B9A9998979681807F7D7D7575747472706F6F6D6C1F1F1E1E1A000000000000
+    000000606060605D92A9A8A5A3A3A1A09C9B9A9998979681807F7D7D75757474
+    726F6F6C1F1F1F1E1E5D000000000000000000AF606060606092A8A8A5A3A2A1
+    A09B9B9A9998979681807F7D7D757574747271431F1F1F1F2100000000000000
+    00000000AE6060605D6062A4A8A5A3A3A1A09C9B9A9998979681807F7D7D7575
+    74454C214C1F1F4E00000000000000000000000000AA606060605D5D95A7A5A3
+    A1A1A09C9B9A9998979681807F7D7D77444C4C214C4C4E000000000000000000
+    000000000000AE60606060605D5F949FA3A3A1A09B9B9A9998979681807A4B4E
+    4C4E214E1F4D0000000000000000000000000000000000AF6060605D605D5D5D
+    91939D9EA19B9B9A99898559504E4E4E4E4C4C4C5D0000000000000000000000
+    000000000000000000666060605D5D5D5D535353535353515151514E514E4E4E
+    4E4C4EAB00000000000000000000000000000000000000000000006060605D5D
+    5D5D5D535353535351515151514E4E4E4E640000000000000000000000000000
+    000000000000000000000000AF6460605D5D5D5D5D5353535353515151514E66
+    00000000000000000000000000000000000000000000000000000000000000AE
+    605D5D5D535D5353535353516600000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000FFFFE007FFFF0000FFFF00007FFF0000FFFC
+    00001FFF0000FFF0000007FF0000FFC0000003FF0000FF80000000FF0000FF00
+    0000007F0000FE000000003F0000FC000000001F0000F8000000001F0000F000
+    0000000F0000F000000000070000E000000000070000E000000000030000C000
+    000000030000C000000000010000C00000000001000080000000000100008000
+    0000000100008000000000000000800000000000000080000000000000008000
+    0000000000008000000000000000800000000000000080000000000000008000
+    0000000000008000000000000000800000000000000080000000000100008000
+    000000010000C000000000010000C000000000030000E000000000030000E000
+    000000070000F000000000070000F0000000000F0000F8000000000F0000F800
+    0000001F0000FC000000003F0000FE000000007F0000FF00000000FF0000FF80
+    000001FF0000FFE0000003FF0000FFF800000FFF0000FFFC00003FFF0000FFFF
+    8001FFFF0000FFFFFFFFFFFF0000280000002000000040000000010008000000
+    0000000400000000000000000000000100000001000000000000060606000909
+    09000C0C0C000A170A000D130D000F160F000C190C0011111100141414001218
+    1200181818001D1D1D000C260C000B2B0B000E280E00073407000A310A00102B
+    1000122D12001B2A1B0014311400153A1500173D17001D351D001E3F1E002222
+    220026262600292929002E2E2E003232320034343400353E35003A3A3A003D3D
+    3D00064906000A490A00025502000F560F001043100016451600135313000161
+    01000067000000690000006D0000066A0600046F04000B610B00086508000969
+    09000A6F0A00007200000075000000780000007D000015661500147D15002144
+    2100335034003653380026732A003F5240004141410045454500494949004E4E
+    4E004558470049534B005151510056565600595959005D5D5D00436949004474
+    4C00427C4B00437C4D006262620065656500636D6600686868006F6F6F007272
+    7200777777007C7C7C000081000000860000008A0000008E00000A820A000091
+    000000950000029B03001083110008A10C000DA6140013AC1D001F9227002497
+    2E002D8D3700299B350019B226001EB72E002EA03C0024BD37002AC23F003B87
+    46003D934C0033A5430037AA4A002EB441003CAF510041844C004A835600428F
+    50004197500041B3570041B4580046B85E005C8367006392720057A36B004ABC
+    650050B96B005FAB760062AE7C0030C8480037C6510035CE51003DCC59003BD3
+    590042D1610041D9620046DF6B004CE4730052EA7C0058E682005DEC8A0057F0
+    85005DF58D008282820085858500888888008D8D8D009090900099999900A0A0
+    A000ACACAC000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    000052400B0909091C4100000000000000000000000000000000000000000052
+    1B1B0B0B0B0B09090808080041000000000000000000000000000000008E1C1C
+    1B1B1B1B0B0B0B090908080800084000000000000000000000000000471C1E1C
+    1C1826313635352D2A230E08080000090000000000000000000000401E1E1E1C
+    1C192930363635352D2D312A100808000000000000000000000040211E1E1E1E
+    1C1C1C1B18353535352D2D313125040800080000000000000051212121211E1E
+    1E1C1C1C1B3236363535230E0604040800000900000000000040402121211E1E
+    1E1E1C1C1C32363636270B0B0909080808080040000000004540403C21212121
+    1E1E1E1C1C1C1B1817140B0B0B090908080108000000000041403E6140212121
+    211E1E1E1C1C1C1B1B1B1A0B0B0B09040D1008004100004E4141636240402121
+    211E1E1E1E1C1C1C1B1B0B1B0B0B0B0B0D310808000000454144686440404021
+    2121211E1E1E1C1C1B1B1B1B1B0B0B0B0E31100808000045454A696740402140
+    212121211E1E1E1C1C1C1B1B0B1B0B0B152D23080141924545727E6C41404040
+    402121211E1E1E1E1C1C1C1B1B1B1A0B152D2A09040B8C474775806D41414140
+    4040212121211E1E1E1C1C1C1B1B0B1B15352D0909098C474776826F41414140
+    402140212121211E1E1E1C1C1C1B1B1A1735350B09098C47477A847545454141
+    404040402121211E1E1E1E3A1C1C18272D35350B0B098E4E477B858371454141
+    4141404040212121211E1E57575656365635360B0B0B004E4779868584817473
+    6A43404040402121211E1E5A575756563656321B0B40004E4E77878685848280
+    7E494140402140212121215A575757565636261B0B4E004E4E4E888786858482
+    80704141404040402121205A5A5A57575656181B1B00008E4E4E7C8A87868584
+    827F4C4441414040403B395C5A5A575757321B1B1B0000004E4E4F898A878685
+    8482807E6E676462605F5E5C5C5A5A5A573A1C1B5200000054514E788B8A8786
+    858482807E69686665605F5E5C5C5A5A381E1C1C0000000000514E4E7D8B8A87
+    86858482807E69686665605F5E5C5C591E1E1E8E000000000093514E4E7D8B8A
+    8786858482806969686665605F5E5D201E1E47000000000000008E514E4E7889
+    8A8786858482807E69686665603D2121214000000000000000000091514E4E4F
+    7C888786858482807E6968633E40402141000000000000000000000093514E4E
+    4E4E77797B7A7675727044414040405100000000000000000000000000005451
+    4E4E474E47474745454541414145000000000000000000000000000000000000
+    8E4E4E4E474747474645454F0000000000000000000000000000000000000000
+    000000008E8E8C8C9200000000000000000000000000FFF00FFFFF8001FFFE00
+    007FFC00003FF800001FF000000FE0000007E0000003C0000003C00000018000
+    0001800000018000000000000000000000000000000000000000000000008000
+    0000800000008000000180000001C0000001C0000003E0000003E0000007F000
+    000FF800001FFC00003FFF0000FFFFC003FFFFFC1FFF28000000100000002000
+    0000010008000000000000010000000000000000000000010000000100000000
+    00000A0A0A00090F09000F0F0F000E140E000C190C001313130014141400111E
+    1100181818001D1D1D00092F09000A390A00113311001B321B00222222002626
+    26002B2B2B0021322100263626003030300034343400313A3100393939003E3E
+    3E00044A04000B440B000E490E0005540500065A0600075F0700124912001848
+    180014531400155915001E521E00006A0000066A0600096A0900007000000075
+    0000007B0000146414001B631B00137B1300374A38002E7133002B7830004343
+    4300474747004C4C4C004A534B00575757005A5A5A005E5E5E0046634B004E61
+    52004A7050004878510063636300656565006868680070707000757575007D7D
+    7D000081000000860000008C00000B860C00009200000198010009A20E0014AD
+    1F0022B1320020B830003A9048004B975B005D836800539F660063A679002BC4
+    42003AC0540037CF530039C8530042DA64004DE6750063C2830059E8840059F1
+    87008A8A8A009191910098989800AAAAAA000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000003D110906033400000000000000003E11121F1B1A0C0503150000000000
+    3615151220252828241902060000004018181514112129250D05040315000031
+    2E1815151511120E0909060B03005A3349311818151111101009091C04343E39
+    50313118151515111010091E0C03364C52323131181815111110101E1A06364E
+    5438323131181515232226291B09594D5554534B311818182B4342421F095C3D
+    575554513731312D2C454342123D003D4F58555452504A484745452A1100005C
+    3D5658555452504A484744163D0000005B3D4F5755545250492F183600000000
+    005C3D3D4D4E4C3A33314000000000000000005C5936363E5A0000000000F81F
+    0000E0070000C003000080010000800100000000000000000000000000000000
+    000000000000000000008001000080010000C0030000E0070000F81F00002800
+    0000300000006000000001002000000000008025000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    000000000000000000001E1E1E0F1C1C1C4F1B1B1B8F191919BF171717DF1616
+    16FF141414FF131313FF111111FF0F0F0FEF0E0E0EBF0D0D0D9F0B0B0B6F0A0A
+    0A2F000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000002424
+    240F2323235F212121CF1F1F1FFF1E1E1EFF1C1C1CFF1A1A1AFF191919FF1717
+    17FF161616FF141414FF131313FF111111FF0F0F0FFF0E0E0EFF0C0C0CFF0B0B
+    0BFF090909DF0808088F0707071F000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    000000000000000000000000000000000000000000002929290F2727277F2626
+    26EF242424FF222222FF212121FF1F1F1FFF1E1E1EFF1C1C1CFF1A1A1AFF1919
+    19FF171717FF161616FF141414FF131313FF111111FF0F0F0FFF0E0E0EFF0C0C
+    0CFF0B0B0BFF090909FF080808FF060606BF0505053F00000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000002C2C2C5F2A2A2AEF292929FF2727
+    27FF262626FF242424FF222222FF212121FF1F1F1FFF1E1E1EFF1C1C1CFF1A1A
+    1AFF191919FF171717FF161616FF141414FF131313FF111111FF0F0F0FFF0E0E
+    0EFF0C0C0CFF0B0B0BFF090909FF080808FF060606FF0505059F0505050F0000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    000000000000000000003131310F2F2F2FAF2E2E2EFF2C2C2CFF2A2A2AFF2929
+    29FF272727FF262626FF242424FF222222FF212121FF193019FF143914FF0E48
+    0EFF0D460DFF0C450CFF0B430BFF0C3C0CFF0F2A0FFF111811FF111111FF0F0F
+    0FFF0E0E0EFF0C0C0CFF0B0B0BFF090909FF080808FF060606FF040404EF0404
+    044F000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000003434342F323232DF303030FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A
+    2AFF292929FF272727FF174717FF0B620BFF027702FF007A00FF007800FF0076
+    00FF007400FF007300FF007100FF006F00FF006D00FF006B00FF035903FF0937
+    09FF0D1A0DFF0E0E0EFF0C0C0CFF0B0B0BFF090909FF080808FF060606FF0404
+    04FF0303038F0000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    00003737372F353535EF343434FF323232FF303030FF2F2F2FFF2E2E2EFF2C2C
+    2CFF2A2A2AFF243424FF145414FF135313FF096709FF007C00FF007A00FF0078
+    00FF007600FF007400FF007300FF007100FF006F00FF006D00FF006B00FF0069
+    00FF006700FF044B04FF0B1E0BFF0C0C0CFF0B0B0BFF090909FF080808FF0606
+    06FF040404FF0303039F00000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000003A3A
+    3A2F383838EF373737FF353535FF343434FF323232FF303030FF2F2F2FFF2E2E
+    2EFF2C2C2CFF2A2A2AFF292929FF272727FF262626FF242424FF164416FF0275
+    02FF007800FF007600FF007400FF007300FF007100FF006F00FF006D00FF006B
+    00FF006900FF006700FF006600FF053F05FF0B120BFF0B0B0BFF090909FF0808
+    08FF060606FF040404FF0303039F000000000000000000000000000000000000
+    00000000000000000000000000000000000000000000000000003D3D3D2F3C3C
+    3CEF3A3A3AFF383838FF373737FF353535FF343434FF323232FF303030FF2F2F
+    2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF262626FF242424FF1A39
+    1AFF007A00FF007800FF007600FF007400FF007300FF007100FF006F00FF006D
+    00FF006B00FF006900FF006700FF006600FF015A01FF0A1D0AFF0B0B0BFF0909
+    09FF080808FF060606FF040404FF0303038F0000000000000000000000000000
+    000000000000000000000000000000000000000000004141410F3F3F3FCF3D3D
+    3DFF3C3C3CFF3A3A3AFF383838FF373737FF353535FF343434FF323232FF3030
+    30FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF262626FF2424
+    24FF007C00FF007A00FF007800FF007600FF007400FF007300FF007100FF0364
+    03FF0B410BFF0F2A0FFF101D10FF111111FF0E150EFF0C190CFF0C0C0CFF0B0B
+    0BFF090909FF080808FF060606FF040404FF0404044F00000000000000000000
+    000000000000000000000000000000000000000000004242428F404040FF3F3F
+    3FFF3D3D3DFF3C3C3CFF3A3A3AFF383838FF373737FF353535FF343434FF3232
+    32FF303030FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF2626
+    26FF007E00FF007C00FF007A00FF007800FF007600FF007400FF0D460DFF1919
+    19FF171717FF161616FF141414FF131313FF111111FF0F0F0FFF0E0E0EFF0C0C
+    0CFF0B0B0BFF090909FF080808FF060606FF040404EF0505050F000000000000
+    0000000000000000000000000000000000004545453F444444FF424242FF4040
+    40FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF383838FF373737FF353535FF3434
+    34FF323232FF303030FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF2727
+    27FF008000FF007E00FF007C00FF007A00FF007800FF007600FF1C1C1CFF1A1A
+    1AFF191919FF171717FF161616FF141414FF131313FF111111FF0F0F0FFF0E0E
+    0EFF0C0C0CFF0B0B0BFF090909FF080808FF060606FF050505AF000000000000
+    000000000000000000000000000000000000464646BF454545FF444444FF4242
+    42FF404040FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF383838FF373737FF3535
+    35FF343434FF323232FF303030FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF2929
+    29FF272727FF262626FF242424FF1A391AFF163D16FF104C10FF1E1E1EFF1C1C
+    1CFF1A1A1AFF191919FF171717FF161616FF141414FF131313FF111111FF0F0F
+    0FFF0E0E0EFF0C0C0CFF0B0B0BFF090909FF080808FF060606FF0505053F0000
+    00000000000000000000000000004A4A4A3F484848FF474747FF454545FF4444
+    44FF39563BFF28742CFF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF383838FF3737
+    37FF353535FF343434FF323232FF303030FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A
+    2AFF292929FF272727FF262626FF242424FF222222FF212121FF1F1F1FFF1E1E
+    1EFF1C1C1CFF1A1A1AFF191919FF171717FF161616FF141414FF131313FF1111
+    11FF0F0F0FFF053F05FF0C0C0CFF0B0B0BFF090909FF080808FF060606BF0000
+    00000000000000000000000000004B4B4BBF4A4A4AFF484848FF474747FF4545
+    45FF22942AFF2B7730FF404040FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF3838
+    38FF373737FF353535FF343434FF323232FF303030FF2F2F2FFF2E2E2EFF2C2C
+    2CFF2A2A2AFF292929FF272727FF262626FF242424FF222222FF212121FF1F1F
+    1FFF1E1E1EFF1C1C1CFF1A1A1AFF191919FF171717FF161616FF141414FF1313
+    13FF111111FF006600FF0A230AFF0C0C0CFF0B0B0BFF090909FF080808FF0707
+    072F00000000000000004F4F4F1F4D4D4DFF4B4B4BFF4A4A4AFF484848FF3C62
+    40FF1AB328FF2D7A33FF424242FF404040FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A
+    3AFF383838FF373737FF353535FF343434FF323232FF303030FF2F2F2FFF2E2E
+    2EFF2C2C2CFF2A2A2AFF292929FF272727FF262626FF242424FF222222FF2121
+    21FF1F1F1FFF1E1E1EFF1C1C1CFF1A1A1AFF191919FF171717FF161616FF1414
+    14FF131313FF006700FF044B04FF0E0E0EFF0C0C0CFF0B0B0BFF090909FF0808
+    088F00000000000000005050506F4F4F4FFF4D4D4DFF4B4B4BFF4A4A4AFF2D97
+    3AFF1EB72EFF307C37FF444444FF424242FF404040FF3F3F3FFF3D3D3DFF3C3C
+    3CFF3A3A3AFF383838FF373737FF353535FF343434FF323232FF303030FF2F2F
+    2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF262626FF242424FF2222
+    22FF212121FF1F1F1FFF1E1E1EFF1C1C1CFF1A1A1AFF191919FF171717FF1616
+    16FF141414FF006900FF006700FF0D1A0DFF0E0E0EFF0C0C0CFF0B0B0BFF0909
+    09EF0000000000000000525252BF505050FF4F4F4FFF4D4D4DFF49534AFF26BE
+    39FF22BB34FF327F3BFF454545FF444444FF424242FF404040FF3F3F3FFF3D3D
+    3DFF3C3C3CFF3A3A3AFF383838FF373737FF353535FF343434FF323232FF3030
+    30FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF262626FF2424
+    24FF222222FF212121FF1F1F1FFF1E1E1EFF1C1C1CFF1A1A1AFF191919FF1717
+    17FF161616FF006B00FF006900FF074207FF0F0F0FFF0E0E0EFF0C0C0CFF0B0B
+    0BFF0A0A0A2F00000000535353FF525252FF505050FF4F4F4FFF417A49FF2AC2
+    3FFF26BE39FF35823EFF474747FF454545FF444444FF424242FF404040FF3F3F
+    3FFF3D3D3DFF3C3C3CFF3A3A3AFF383838FF373737FF353535FF343434FF3232
+    32FF303030FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF2626
+    26FF242424FF222222FF212121FF1F1F1FFF1E1E1EFF1C1C1CFF1A1A1AFF1919
+    19FF171717FF006D00FF006B00FF035903FF111111FF0F0F0FFF0E0E0EFF0C0C
+    0CFF0B0B0B6F5656563F555555FF535353FF525252FF505050FF3C9B4CFF2DC6
+    44FF2AC23FFF388442FF484848FF474747FF454545FF444444FF424242FF4040
+    40FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF383838FF373737FF353535FF3434
+    34FF323232FF303030FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF2727
+    27FF262626FF242424FF222222FF212121FF1F1F1FFF1E1E1EFF1C1C1CFF1A1A
+    1AFF191919FF006F00FF006D00FF006B00FF111811FF111111FF0F0F0FFF0E0E
+    0EFF0C0C0CAF5858584F575757FF555555FF535353FF525252FF3BAE50FF31CA
+    4AFF2DC644FF3B8745FF4A4A4AFF484848FF474747FF454545FF444444FF4242
+    42FF404040FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF383838FF373737FF3535
+    35FF343434FF323232FF303030FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF2929
+    29FF272727FF262626FF242424FF222222FF212121FF1F1F1FFF1E1E1EFF1C1C
+    1CFF1A1A1AFF007100FF006F00FF006D00FF0F2A0FFF131313FF111111FF0F0F
+    0FFF0E0E0EBF5959597F585858FF575757FF555555FF535353FF39D156FF35CD
+    50FF31CA4AFF3D8949FF4B4B4BFF4A4A4AFF484848FF474747FF454545FF4444
+    44FF424242FF404040FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF383838FF3737
+    37FF353535FF343434FF323232FF303030FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A
+    2AFF292929FF272727FF262626FF242424FF222222FF212121FF1F1F1FFF1E1E
+    1EFF1C1C1CFF007300FF007100FF006F00FF0C3C0CFF141414FF131313FF1111
+    11FF0F0F0FFF5B5B5B7F595959FF585858FF575757FF555555FF3DD55BFF39D1
+    56FF35CD50FF408C4DFF4D4D4DFF4B4B4BFF4A4A4AFF484848FF474747FF4545
+    45FF444444FF424242FF404040FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF3838
+    38FF373737FF353535FF343434FF323232FF303030FF2F2F2FFF2E2E2EFF2C2C
+    2CFF2A2A2AFF292929FF272727FF262626FF242424FF222222FF212121FF1F1F
+    1FFF1E1E1EFF007400FF007300FF007100FF0B430BFF161616FF141414FF1313
+    13FF111111FF5C5C5C7F5B5B5BFF595959FF585858FF575757FF40D961FF3DD5
+    5BFF39D156FF438F51FF4F4F4FFF4D4D4DFF4B4B4BFF4A4A4AFF484848FF4747
+    47FF454545FF444444FF424242FF404040FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A
+    3AFF383838FF373737FF353535FF343434FF323232FF303030FF2F2F2FFF2E2E
+    2EFF2C2C2CFF2A2A2AFF292929FF272727FF262626FF242424FF222222FF2121
+    21FF1F1F1FFF007600FF007400FF007300FF0C450CFF171717FF161616FF1414
+    14FF131313FF5E5E5E7F5D5D5DFF5B5B5BFF595959FF585858FF44DD67FF40D9
+    61FF3DD55BFF459254FF505050FF4F4F4FFF4D4D4DFF4B4B4BFF4A4A4AFF4848
+    48FF474747FF454545FF444444FF424242FF404040FF3F3F3FFF3D3D3DFF3C3C
+    3CFF3A3A3AFF383838FF373737FF353535FF343434FF323232FF303030FF2F2F
+    2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF262626FF242424FF2028
+    20FF0C590CFF007800FF007600FF007400FF0D460DFF191919FF171717FF1616
+    16FF141414FF6060607F5E5E5EFF5D5D5DFF5B5B5BFF595959FF48E06DFF44DD
+    67FF40D961FF45A459FF525252FF505050FF4F4F4FFF4D4D4DFF4B4B4BFF4A4A
+    4AFF484848FF474747FF454545FF444444FF424242FF404040FF3F3F3FFF3D3D
+    3DFF3C3C3CFF3A3A3AFF383838FF373737FF353535FF343434FF323232FF3030
+    30FF1D511DFF0E6D0EFF155A15FF155815FF145614FF0E600EFF076F07FF007E
+    00FF007C00FF007A00FF007800FF007600FF0E480EFF1A1A1AFF191919FF1717
+    17FF161616FF6161617F606060FF5E5E5EFF5D5D5DFF5B5B5BFF4CDB71FF48E0
+    6DFF44DD67FF40D961FF479C58FF4F6252FF505050FF4F4F4FFF4D4D4DFF4B4B
+    4BFF4A4A4AFF484848FF474747FF454545FF444444FF424242FF404040FF3F3F
+    3FFF3D3D3DFF3C3C3CFF3A3A3AFF383838FF373737FF353535FF343434FF3232
+    32FF185F18FF008B00FF008900FF008700FF008500FF008400FF008200FF0080
+    00FF007E00FF007C00FF007A00FF007800FF143914FF1C1C1CFF1A1A1AFF1919
+    19FF171717DF6262623F616161FF606060FF5E5E5EFF5D5D5DFF52C470FF4CE4
+    73FF48E06DFF44DD67FF40D961FF3DD55BFF3EB955FF419751FF408C4DFF456B
+    4BFF436948FF416746FF484848FF474747FF454545FF444444FF424242FF4040
+    40FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF383838FF373737FF353535FF3434
+    34FF196019FF008D00FF008B00FF008900FF008700FF008500FF008400FF0082
+    00FF008000FF007E00FF007C00FF007A00FF193019FF1E1E1EFF1C1C1CFF1A1A
+    1AFF191919BF6464641F636363FF616161FF606060FF5E5E5EFF58A46DFF50E8
+    78FF4CE473FF48E06DFF44DD67FF40D961FF3DD55BFF39D156FF35CD50FF31CA
+    4AFF2DC644FF2AC23FFF4A4A4AFF484848FF474747FF454545FF444444FF4242
+    42FF404040FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF383838FF373737FF3535
+    35FF1A621AFF008F00FF008D00FF008B00FF008900FF008700FF008500FF0084
+    00FF008200FF008000FF007E00FF027702FF212121FF1F1F1FFF1E1E1EFF1C1C
+    1CFF1B1B1B8F00000000656565DF636363FF616161FF606060FF5D7965FF53EC
+    7EFF50E878FF4CE473FF48E06DFF44DD67FF40D961FF3DD55BFF39D156FF35CD
+    50FF31CA4AFF2DC644FF4B4B4BFF4A4A4AFF484848FF474747FF454545FF4444
+    44FF424242FF404040FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF383838FF3737
+    37FF1B641BFF009100FF008F00FF008D00FF008B00FF008900FF008700FF0085
+    00FF008400FF008200FF008000FF0B620BFF222222FF212121FF1F1F1FFF1E1E
+    1EFF1C1C1C5F000000006666669F656565FF636363FF616161FF606060FF58DD
+    7FFF53EC7EFF50E878FF4CE473FF48E06DFF44DD67FF40D961FF3DD55BFF39D1
+    56FF35CD50FF31CA4AFF4D4D4DFF4B4B4BFF4A4A4AFF484848FF474747FF4545
+    45FF444444FF424242FF404040FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF3838
+    38FF1B661BFF009300FF009100FF008F00FF008D00FF008B00FF008900FF0087
+    00FF008500FF008400FF008200FF174717FF242424FF222222FF212121FF1F1F
+    1FFF1E1E1E0F000000006767674F666666FF656565FF636363FF616161FF5DA9
+    74FF57EF84FF53EC7EFF50E878FF4CE473FF48E06DFF44DD67FF40D961FF3DD5
+    5BFF39D156FF35CD50FF447D4EFF4D4D4DFF4B4B4BFF4A4A4AFF484848FF4747
+    47FF454545FF444444FF424242FF404040FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A
+    3AFF0E7F0EFF009500FF009300FF009100FF008F00FF008D00FF008B00FF0089
+    00FF008700FF008500FF027E02FF272727FF262626FF242424FF222222FF2121
+    21CF000000000000000000000000686868EF666666FF656565FF636363FF616B
+    64FF5BEA87FF57EF84FF53EC7EFF50E878FF4CE473FF48E06DFF44DD67FF40D9
+    61FF3DD55BFF39D156FF35CD50FF3C9C4DFF47644CFF4B4B4BFF4A4A4AFF4848
+    48FF474747FF454545FF444444FF424242FF404040FF3F3F3FFF2C5C2EFF1284
+    13FF009900FF009700FF009500FF009300FF009100FF008F00FF008D00FF008B
+    00FF008900FF008700FF155815FF292929FF272727FF262626FF242424FF2323
+    235F0000000000000000000000006969697F686868FF666666FF656565FF6363
+    63FF60AC78FF5BF38AFF57EF84FF53EC7EFF50E878FF4CE473FF48E06DFF44DD
+    67FF40D961FF3DD55BFF39D156FF35CD50FF31CA4AFF2DC644FF32A442FF2FA1
+    3EFF35823EFF327F3BFF2D8335FF22942BFF1F9126FF0FA817FF0BA411FF07A0
+    0BFF049D05FF009900FF009700FF009500FF009300FF009100FF008F00FF008D
+    00FF008B00FF028402FF293229FF2A2A2AFF292929FF272727FF262626EF2424
+    240F0000000000000000000000006A6A6A1F696969EF686868FF666666FF6565
+    65FF636363FF5FDA86FF5BF38AFF57EF84FF53EC7EFF50E878FF4CE473FF48E0
+    6DFF44DD67FF40D961FF3DD55BFF39D156FF35CD50FF31CA4AFF2DC644FF2AC2
+    3FFF26BE39FF22BB34FF1EB72EFF1AB328FF16AF22FF13AC1CFF0FA817FF0BA4
+    11FF07A00BFF049D05FF009900FF009700FF009500FF009300FF009100FF008F
+    00FF008D00FF204C20FF2E2E2EFF2C2C2CFF2A2A2AFF292929FF2727277F0000
+    0000000000000000000000000000000000006A6A6A7F696969FF686868FF6666
+    66FF656565FF637F6CFF5FED8CFF5BF38AFF57EF84FF53EC7EFF50E878FF4CE4
+    73FF48E06DFF44DD67FF40D961FF3DD55BFF39D156FF35CD50FF31CA4AFF2DC6
+    44FF2AC23FFF26BE39FF22BB34FF1EB72EFF1AB328FF16AF22FF13AC1CFF0FA8
+    17FF0BA411FF07A00BFF049D05FF009900FF009700FF009500FF009300FF0091
+    00FF136C13FF303030FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AEF2929290F0000
+    0000000000000000000000000000000000006B6B6B0F6A6A6ADF696969FF6868
+    68FF666666FF656565FF629B75FF5FF78FFF5BF38AFF57EF84FF53EC7EFF50E8
+    78FF4CE473FF48E06DFF44DD67FF40D961FF3DD55BFF39D156FF35CD50FF31CA
+    4AFF2DC644FF2AC23FFF26BE39FF22BB34FF1EB72EFF1AB328FF16AF22FF13AC
+    1CFF0FA817FF0BA411FF07A00BFF049D05FF009900FF009700FF009500FF0A81
+    0AFF343434FF323232FF303030FF2F2F2FFF2E2E2EFF2C2C2C6F000000000000
+    000000000000000000000000000000000000000000006B6B6B3F6A6A6AFF6969
+    69FF686868FF666666FF656565FF629B75FF5FF78FFF5BF38AFF57EF84FF53EC
+    7EFF50E878FF4CE473FF48E06DFF44DD67FF40D961FF3DD55BFF39D156FF35CD
+    50FF31CA4AFF2DC644FF2AC23FFF26BE39FF22BB34FF1EB72EFF1AB328FF16AF
+    22FF13AC1CFF0FA817FF0BA411FF07A00BFF049D05FF009900FF0A850AFF333D
+    33FF353535FF343434FF323232FF303030FF2F2F2FBF00000000000000000000
+    00000000000000000000000000000000000000000000000000006B6B6B8F6A6A
+    6AFF696969FF686868FF666666FF656565FF629B75FF5FF78FFF5BF38AFF57EF
+    84FF53EC7EFF50E878FF4CE473FF48E06DFF44DD67FF40D961FF3DD55BFF39D1
+    56FF35CD50FF31CA4AFF2DC644FF2AC23FFF26BE39FF22BB34FF1EB72EFF1AB3
+    28FF16AF22FF13AC1CFF0FA817FF0BA411FF07A00BFF128413FF364036FF3838
+    38FF373737FF353535FF343434FF323232EF3131310F00000000000000000000
+    0000000000000000000000000000000000000000000000000000000000006B6B
+    6B9F6A6A6AFF696969FF686868FF666666FF656565FF637F6CFF5FDA86FF5BF3
+    8AFF57EF84FF53EC7EFF50E878FF4CE473FF48E06DFF44DD67FF40D961FF3DD5
+    5BFF39D156FF35CD50FF31CA4AFF2DC644FF2AC23FFF26BE39FF22BB34FF1EB7
+    2EFF1AB328FF16AF22FF13AC1CFF0FA817FF257127FF3D3D3DFF3C3C3CFF3A3A
+    3AFF383838FF373737FF353535EF3434342F0000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000006B6B
+    6B0F6B6B6BCF6A6A6AFF696969FF686868FF666666FF656565FF636363FF60AC
+    78FF5BEA87FF57EF84FF53EC7EFF50E878FF4CE473FF48E06DFF44DD67FF40D9
+    61FF3DD55BFF39D156FF35CD50FF31CA4AFF2DC644FF2AC23FFF26BE39FF22BB
+    34FF1EB72EFF1AB328FF22942AFF39563BFF404040FF3F3F3FFF3D3D3DFF3C3C
+    3CFF3A3A3AFF383838EF3737372F000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    00006B6B6B0F6B6B6B9F6A6A6AFF696969FF686868FF666666FF656565FF6363
+    63FF616B64FF5DA974FF58DD7FFF53EC7EFF50E878FF4CE473FF48E06DFF44DD
+    67FF40D961FF3DD55BFF39D156FF35CD50FF31CA4AFF2DC644FF2AC23FFF26BE
+    39FF2D973AFF3C6240FF454545FF444444FF424242FF404040FF3F3F3FFF3D3D
+    3DFF3C3C3CEF3A3A3A2F00000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    000000000000000000006B6B6B8F6A6A6AFF696969FF686868FF666666FF6565
+    65FF636363FF616161FF606060FF5C8267FF58A46DFF52C470FF4CDB71FF48E0
+    6DFF44DD67FF40D961FF3DD55BFF39D156FF3AB650FF3C9B4CFF417A49FF4953
+    4AFF4A4A4AFF484848FF474747FF454545FF444444FF424242FF404040FF3F3F
+    3FCF3D3D3D2F0000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    00000000000000000000000000006B6B6B3F6A6A6ADF696969FF686868FF6666
+    66FF656565FF636363FF616161FF606060FF5E5E5EFF5D5D5DFF5B5B5BFF5959
+    59FF585858FF575757FF555555FF535353FF525252FF505050FF4F4F4FFF4D4D
+    4DFF4B4B4BFF4A4A4AFF484848FF474747FF454545FF444444FF4242428F4141
+    410F000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000006B6B6B0F6A6A6A7F696969FF6868
+    68FF666666FF656565FF636363FF616161FF606060FF5E5E5EFF5D5D5DFF5B5B
+    5BFF595959FF585858FF575757FF555555FF535353FF525252FF505050FF4F4F
+    4FFF4D4D4DFF4B4B4BFF4A4A4AFF484848FF464646BF4545453F000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    00000000000000000000000000000000000000000000000000006A6A6A1F6969
+    698F686868EF666666FF656565FF636363FF616161FF606060FF5E5E5EFF5D5D
+    5DFF5B5B5BFF595959FF585858FF575757FF555555FF535353FF525252FF5050
+    50FF4F4F4FFF4D4D4DFF4B4B4BBF4A4A4A3F0000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000006767674F6666669F656565EF636363FF616161FF606060FF5E5E
+    5EFF5D5D5DFF5B5B5BFF595959FF585858FF575757FF555555FF535353FF5252
+    52BF5050506F4F4F4F1F00000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000006464641F6262623F6161617F6060
+    607F5E5E5E7F5C5C5C7F5B5B5B7F5959597F5858585F5656563F000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    000000000000FFFF8001FFFF0000FFFC00003FFF0000FFF000000FFF0000FFE0
+    000003FF0000FF80000001FF0000FF00000000FF0000FE000000007F0000FC00
+    0000003F0000F8000000001F0000F0000000000F0000F000000000070000E000
+    000000070000E000000000030000C000000000030000C0000000000100008000
+    0000000100008000000000010000800000000000000080000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000800000000000000080000000000000008000
+    000000010000C000000000010000C000000000010000C000000000030000E000
+    000000030000E000000000070000F0000000000F0000F8000000000F0000FC00
+    0000001F0000FC000000003F0000FE000000007F0000FF80000000FF0000FFC0
+    000001FF0000FFE0000007FF0000FFF800001FFF0000FFFF00007FFF0000FFFF
+    E007FFFF00002800000020000000400000000100200000000000801000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    000000000000000000000000000000000000000000002121210F1F1F1F5F1D1D
+    1D9F1A1A1ACF181818FF151515FF131313FF101010FF0E0E0EDF0C0C0CBF0A0A
+    0A6F0808081F0000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    00000000000000000000000000002929291F2626269F232323FF212121FF1F1F
+    1FFF1C1C1CFF1A1A1AFF181818FF151515FF131313FF101010FF0E0E0EFF0C0C
+    0CFF090909FF070707BF0606063F000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    000000000000000000002D2D2D8F2A2A2AFF282828FF262626FF232323FF2121
+    21FF1F1F1FFF1C1C1CFF1A1A1AFF181818FF151515FF131313FF101010FF0E0E
+    0EFF0C0C0CFF090909FF070707FF050505BF0404041F00000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    00003434341F323232CF2F2F2FFF2D2D2DFF2A2A2AFF282828FF1E371EFF0F56
+    0FFF086408FF007800FF007500FF007200FF006F00FF026102FF064906FF0B2B
+    0BFF0E0E0EFF0C0C0CFF090909FF070707FF050505EF0303034F000000000000
+    0000000000000000000000000000000000000000000000000000000000003939
+    392F363636EF343434FF323232FF2F2F2FFF2D2D2DFF2A2A2AFF1E3F1EFF1353
+    13FF0B610BFF007A00FF007800FF007500FF007200FF006F00FF006C00FF0069
+    00FF006100FF073407FF0C0C0CFF090909FF070707FF050505FF0303035F0000
+    00000000000000000000000000000000000000000000000000003E3E3E0F3B3B
+    3BEF393939FF363636FF343434FF323232FF2F2F2FFF2D2D2DFF2A2A2AFF2828
+    28FF262626FF1D341DFF027502FF007800FF007500FF007200FF006F00FF006C
+    00FF006900FF006700FF025502FF0A170AFF090909FF070707FF050505FF0303
+    034F000000000000000000000000000000000000000000000000404040BF3D3D
+    3DFF3B3B3BFF393939FF363636FF343434FF323232FF2F2F2FFF2D2D2DFF2A2A
+    2AFF282828FF262626FF096709FF007A00FF007800FF007500FF007200FF0A49
+    0AFF102B10FF121812FF0F160FFF0C190CFF0C0C0CFF090909FF070707FF0505
+    05EF0404041F000000000000000000000000000000004444446F424242FF4040
+    40FF3D3D3DFF3B3B3BFF393939FF363636FF343434FF323232FF2F2F2FFF2D2D
+    2DFF2A2A2AFF282828FF096909FF007D00FF007A00FF007800FF104310FF1A1A
+    1AFF181818FF151515FF131313FF101010FF0E0E0EFF0C0C0CFF090909FF0707
+    07FF050505BF0000000000000000000000004A4A4A0F474747EF444444FF4242
+    42FF365338FF3D3D3DFF3B3B3BFF393939FF363636FF343434FF323232FF2F2F
+    2FFF2D2D2DFF2A2A2AFF282828FF262626FF1D341DFF173D17FF1B2A1BFF1C1C
+    1CFF1A1A1AFF181818FF151515FF131313FF101010FF0D130DFF0C0C0CFF0909
+    09FF070707FF0606063F00000000000000004B4B4B7F494949FF474747FF3F52
+    40FF1F9227FF404040FF3D3D3DFF3B3B3BFF393939FF363636FF343434FF3232
+    32FF2F2F2FFF2D2D2DFF2A2A2AFF282828FF262626FF232323FF212121FF1F1F
+    1FFF1C1C1CFF1A1A1AFF181818FF151515FF131313FF0C260CFF073407FF0C0C
+    0CFF090909FF070707BF00000000000000004E4E4EDF4B4B4BFF494949FF2D8D
+    37FF24972EFF424242FF404040FF3D3D3DFF3B3B3BFF393939FF363636FF3434
+    34FF323232FF2F2F2FFF2D2D2DFF2A2A2AFF282828FF262626FF232323FF2121
+    21FF1F1F1FFF1C1C1CFF1A1A1AFF181818FF151515FF0E280EFF006100FF0E0E
+    0EFF0C0C0CFF090909FF0808081F5252522F505050FF4E4E4EFF49534BFF24BD
+    37FF299B35FF444444FF424242FF404040FF3D3D3DFF3B3B3BFF393939FF3636
+    36FF343434FF323232FF2F2F2FFF2D2D2DFF2A2A2AFF282828FF262626FF2323
+    23FF212121FF1F1F1FFF1C1C1CFF1A1A1AFF181818FF102B10FF006900FF0A31
+    0AFF0E0E0EFF0C0C0CFF0A0A0A6F5555556F535353FF505050FF44744CFF2AC2
+    3FFF2EA03CFF474747FF444444FF424242FF404040FF3D3D3DFF3B3B3BFF3939
+    39FF363636FF343434FF323232FF2F2F2FFF2D2D2DFF2A2A2AFF282828FF2626
+    26FF232323FF212121FF1F1F1FFF1C1C1CFF1A1A1AFF122D12FF006C00FF0649
+    06FF101010FF0E0E0EFF0C0C0CBF5757578F555555FF535353FF428F50FF30C8
+    48FF33A543FF494949FF474747FF444444FF424242FF404040FF3D3D3DFF3B3B
+    3BFF393939FF363636FF343434FF323232FF2F2F2FFF2D2D2DFF2A2A2AFF2828
+    28FF262626FF232323FF212121FF1F1F1FFF1C1C1CFF143014FF006F00FF0261
+    02FF131313FF101010FF0E0E0EEF595959BF575757FF555555FF41B357FF35CE
+    51FF37AA4AFF4B4B4BFF494949FF474747FF444444FF424242FF404040FF3D3D
+    3DFF3B3B3BFF393939FF363636FF343434FF323232FF2F2F2FFF2D2D2DFF2A2A
+    2AFF282828FF262626FF232323FF212121FF1F1F1FFF153215FF007200FF006F
+    00FF151515FF131313FF101010FF5C5C5CBF5A5A5AFF575757FF46B85EFF3BD3
+    59FF3CAF51FF4E4E4EFF4B4B4BFF494949FF474747FF444444FF424242FF4040
+    40FF3D3D3DFF3B3B3BFF393939FF363636FF343434FF323232FF2F2F2FFF2D2D
+    2DFF2A2A2AFF282828FF262626FF232323FF212121FF153A15FF007500FF0072
+    00FF181818FF151515FF131313FF5E5E5EBF5C5C5CFF5A5A5AFF4ABC65FF41D9
+    62FF41B458FF505050FF4E4E4EFF4B4B4BFF494949FF474747FF444444FF4242
+    42FF404040FF3D3D3DFF3B3B3BFF393939FF363636FF343434FF323232FF2F2F
+    2FFF214421FF2A2A2AFF282828FF1E371EFF164516FF046F04FF007800FF0075
+    00FF1A1A1AFF181818FF151515FF616161BF5F5F5FFF5C5C5CFF50B96BFF46DF
+    6BFF42D161FF4A8356FF505050FF4E4E4EFF4B4B4BFF494949FF474747FF4444
+    44FF424242FF404040FF3D3D3DFF3B3B3BFF393939FF363636FF343434FF3232
+    32FF008B00FF008900FF008600FF008300FF008000FF007D00FF007A00FF0078
+    00FF1C1C1CFF1A1A1AFF181818FF6363637F616161FF5F5F5FFF57A36BFF4CE4
+    73FF46DF6BFF41D962FF3DCC59FF3CAF51FF3D934CFF3B8746FF455847FF4747
+    47FF444444FF424242FF404040FF3D3D3DFF3B3B3BFF393939FF363636FF3434
+    34FF008E00FF008B00FF008900FF008600FF008300FF008000FF007D00FF066A
+    06FF1F1F1FFF1C1C1CFF1A1A1ACF6565655F636363FF616161FF5C8367FF52EA
+    7CFF4CE473FF46DF6BFF41D962FF3BD359FF35CE51FF30C848FF436949FF4949
+    49FF474747FF444444FF424242FF404040FF3D3D3DFF3B3B3BFF393939FF3636
+    36FF009100FF008E00FF008B00FF008900FF008600FF008300FF008000FF0F56
+    0FFF212121FF1F1F1FFF1D1D1DAF6767671F666666FF636363FF616161FF58E6
+    82FF52EA7CFF4CE473FF46DF6BFF41D962FF3BD359FF35CE51FF41844CFF4B4B
+    4BFF494949FF474747FF444444FF424242FF404040FF3D3D3DFF3B3B3BFF353E
+    35FF009400FF009100FF008E00FF008B00FF008900FF008600FF008300FF1E37
+    1EFF232323FF212121FF1F1F1F5F00000000676767BF666666FF636363FF5FAB
+    76FF57F085FF52EA7CFF4CE473FF46DF6BFF41D962FF3BD359FF37C651FF437C
+    4DFF49534BFF494949FF474747FF444444FF424242FF404040FF335034FF147D
+    15FF009700FF009400FF009100FF008E00FF008B00FF008900FF0A6F0AFF2828
+    28FF262626FF232323FF2121210F000000006A6A6A5F686868FF666666FF636D
+    66FF5DEC8AFF57F085FF52EA7CFF4CE473FF46DF6BFF41D962FF3BD359FF35CE
+    51FF30C848FF2EB441FF2EA03CFF299B35FF24972EFF13AC1DFF0DA614FF08A1
+    0CFF029B03FF009700FF009400FF009100FF008E00FF008B00FF214421FF2A2A
+    2AFF282828FF2626269F0000000000000000000000006A6A6ADF686868FF6666
+    66FF639272FF5DF58DFF57F085FF52EA7CFF4CE473FF46DF6BFF41D962FF3BD3
+    59FF35CE51FF30C848FF2AC23FFF24BD37FF1EB72EFF19B226FF13AC1DFF0DA6
+    14FF08A10CFF029B03FF009700FF009400FF009100FF156615FF2F2F2FFF2D2D
+    2DFF2A2A2AFF2929291F0000000000000000000000006B6B6B3F6A6A6AFF6868
+    68FF666666FF62AE7CFF5DF58DFF57F085FF52EA7CFF4CE473FF46DF6BFF41D9
+    62FF3BD359FF35CE51FF30C848FF2AC23FFF24BD37FF1EB72EFF19B226FF13AC
+    1DFF0DA614FF08A10CFF029B03FF009700FF0A820AFF343434FF323232FF2F2F
+    2FFF2D2D2D8F00000000000000000000000000000000000000006B6B6B8F6A6A
+    6AFF686868FF666666FF62AE7CFF5DF58DFF57F085FF52EA7CFF4CE473FF46DF
+    6BFF41D962FF3BD359FF35CE51FF30C848FF2AC23FFF24BD37FF1EB72EFF19B2
+    26FF13AC1DFF0DA614FF08A10CFF108311FF353E35FF363636FF343434FF3232
+    32CF3030300F0000000000000000000000000000000000000000000000006B6B
+    6BBF6A6A6AFF686868FF666666FF639272FF5DEC8AFF57F085FF52EA7CFF4CE4
+    73FF46DF6BFF41D962FF3BD359FF35CE51FF30C848FF2AC23FFF24BD37FF1EB7
+    2EFF19B226FF13AC1DFF26732AFF3D3D3DFF3B3B3BFF393939FF363636EF3434
+    341F000000000000000000000000000000000000000000000000000000006B6B
+    6B0F6B6B6BAF6A6A6AFF686868FF666666FF636D66FF5FAB76FF58E682FF52EA
+    7CFF4CE473FF46DF6BFF41D962FF3BD359FF35CE51FF30C848FF2AC23FFF24BD
+    37FF2D8D37FF3F5240FF424242FF404040FF3D3D3DFF3B3B3BEF3939392F0000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000006B6B6B8F6A6A6AFF686868FF666666FF636363FF616161FF5C83
+    67FF57A36BFF50B96BFF4ABC65FF46B85EFF41B357FF419750FF427C4BFF4953
+    4BFF494949FF474747FF444444FF424242FF404040BF3E3E3E0F000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    000000000000000000006B6B6B3F6A6A6ADF686868FF666666FF636363FF6161
+    61FF5F5F5FFF5C5C5CFF5A5A5AFF575757FF555555FF535353FF505050FF4E4E
+    4EFF4B4B4BFF494949FF474747EF4444446F0000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000006A6A6A5F676767BF666666FF6363
+    63FF616161FF5F5F5FFF5C5C5CFF5A5A5AFF575757FF555555FF535353FF5050
+    50FF4E4E4EDF4B4B4B7F4A4A4A0F000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    00000000000000000000000000000000000000000000000000006767671F6565
+    655F6363637F616161BF5E5E5EBF5C5C5CBF595959BF5757578F5555556F5252
+    522F000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000FFC003FFFF0000FFFE00003FF800001FF000
+    000FE0000007E0000003C0000003800000018000000180000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    00008000000080000001C0000001C0000003E0000003F0000007F000000FFC00
+    001FFE00007FFF8000FFFFE007FF280000001000000020000000010020000000
+    0000400400000000000000000000000000000000000000000000000000000000
+    0000000000002727273F222222AF1D1D1DEF181818FF131313FF0F0F0FFF0B0B
+    0BAF0707075F0000000000000000000000000000000000000000000000003535
+    350F303030AF2B2B2BFF213221FF124912FF0E490EFF0B440BFF0A390AFF0C19
+    0CFF0A0A0AFF060606CF0404041F0000000000000000000000003E3E3E0F3939
+    39CF343434FF303030FF263626FF184818FF066A06FF007500FF007000FF006A
+    00FF044A04FF090F09FF050505EF0404041F0000000000000000424242AF3E3E
+    3EFF393939FF343434FF303030FF2B2B2BFF145314FF007B00FF017001FF1133
+    11FF111E11FF0E140EFF0A0A0AFF060606CF000000004B4B4B3F474747FF2E71
+    33FF3E3E3EFF393939FF343434FF303030FF2B2B2BFF223222FF1B321BFF1D1D
+    1DFF181818FF131313FF092F09FF0A0A0AFF0707075F5050509F4A534BFF22B1
+    32FF434343FF3E3E3EFF393939FF343434FF303030FF2B2B2BFF262626FF2222
+    22FF1D1D1DFF181818FF055405FF0C190CFF0B0B0BAF555555CF4A7050FF2BC4
+    42FF474747FF434343FF3E3E3EFF393939FF343434FF303030FF2B2B2BFF2626
+    26FF222222FF1D1D1DFF065A06FF0A390AFF0F0F0FFF5A5A5AFF4B975BFF37CF
+    53FF4C4C4CFF474747FF434343FF3E3E3EFF393939FF343434FF303030FF2B2B
+    2BFF262626FF222222FF075F07FF0B440BFF131313FF5F5F5FFF539F66FF42DA
+    64FF4E6152FF4C4C4CFF474747FF434343FF3E3E3EFF393939FF343434FF1E52
+    1EFF155915FF096A09FF007B00FF0E490EFF181818FF636363BF5D8368FF4DE6
+    75FF42DA64FF39C853FF3A9048FF474747FF434343FF3E3E3EFF393939FF1B63
+    1BFF008C00FF008600FF008100FF124912FF1D1D1DFF6868688F646464FF59E8
+    84FF4DE675FF42DA64FF3AC054FF46634BFF474747FF434343FF374A38FF137B
+    13FF009200FF008C00FF008600FF213221FF222222AF6A6A6A1F686868FF63A6
+    79FF59F187FF4DE675FF42DA64FF37CF53FF2BC442FF20B830FF14AD1FFF09A2
+    0EFF019801FF009200FF146414FF2B2B2BFF2727273F000000006A6A6A8F6868
+    68FF63C283FF59F187FF4DE675FF42DA64FF37CF53FF2BC442FF20B830FF14AD
+    1FFF09A20EFF0B860CFF313A31FF303030BF0000000000000000000000006A6A
+    6AAF686868FF63A679FF59E884FF4DE675FF42DA64FF37CF53FF2BC442FF22B1
+    32FF2B7830FF3E3E3EFF393939CF3535350F0000000000000000000000000000
+    00006A6A6A8F686868FF646464FF5D8368FF539F66FF4B975BFF487851FF4A53
+    4BFF474747FF424242AF3E3E3E0F000000000000000000000000000000000000
+    0000000000006A6A6A1F6868688F636363BF5F5F5FFF5A5A5AFF555555CF5050
+    509F4B4B4B3F00000000000000000000000000000000F00F0000C00300008001
+    0000800100000000000000000000000000000000000000000000000000000000
+    00000000000080010000C0010000E0030000F00F0000}
+  PixelsPerInch = 96
+  TextHeight = 13
+  inherited Bevel1: TBevel
+    Width = 569
+  end
+  inherited Panel1: TPanel
+    Width = 569
+    inherited Image1: TImage
+      Picture.Data = {
+        055449636F6E0000010006003030000001000800A80E00006600000020200000
+        01000800A80800000E0F0000101000000100080068050000B617000030300000
+        01002000A82500001E1D00002020000001002000A8100000C642000010100000
+        01002000680400006E5300002800000030000000600000000100080000000000
+        0009000000000000000000000001000000010000000000000505050009090900
+        0D0D0D000B120B000E150E000A1D0A000C190C00121212001515150011181100
+        101D1000191919001D1D1D000A230A000F2A0F00053F0500093709000C3C0C00
+        14391400163D1600193019001A391A0021212100252525002028200029292900
+        2D2D2D0024342400293229003131310035353500333D3300393939003D3D3D00
+        07420700044B04000B420B000C450C000E480E00025902000C590C0016461600
+        104C10001353130014551400155815001D511D00185F180000660000006A0000
+        006E0000076F07000B620B00096709000E600E000E6D0E000072000000750000
+        00780000007D00000E7F0E00136C1300196119001B651B00204C20002C5C2E00
+        3640360039563B002571270028742C002B7730002D7A3300307C3700327F3B00
+        3C6240004040400045454500494949004D4D4D0049534A005151510056565600
+        595959005D5D5D004167460047644C0043694800456B4B00417A4900447D4E00
+        4F6252005D7965006161610065656500616B6400686868006E6E6E00637F6C00
+        7171710074747400787878007D7D7D000081000000850000008A0000008D0000
+        0A810A000A850A00009100000095000000990000049D05001284130007A00B00
+        0BA411000FA8170013AC1C001F91260022942A002D83350035823E002D973A00
+        16AF22001AB328001EB72E002FA13E0022BB340026BE39002AC23F0038844200
+        3B8745003D8949003C9B4C003C9C4D0032A442003BAE50003AB650003EB95500
+        408C4D00438F51004197510045925400479C580045A459005C826700629B7500
+        58A46D005DA9740060AC78002DC6440031CA4A0035CD500039D156003DD55B00
+        40D9610044DD670052C470004CDB710058DD7F0048E06D004CE4730050E87800
+        53EC7E005FDA860057EF84005BEA87005FED8C005BF38A005FF78F0086868600
+        959595009F9F9F00A2A2A200AAAAAA00ACACAC00000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000066511F090909090D4E60000000000000000000000000000000
+        00000000000000000000000000000000000000004E0D0D0D0D0D090909090309
+        0303031864000000000000000000000000000000000000000000000000000000
+        00001F1818180D0D0D090D09090909030303030303004E000000000000000000
+        000000000000000000000000000000001F1A1818180D180D0D0D0D0909090909
+        09030303030300035D000000000000000000000000000000000000000000641A
+        1A1A1A181818180D151327272727110F05090303030303000309000000000000
+        000000000000000000000000004E1F1A1F1A1A1A182A353B3B3B3A3A3A333333
+        332811070303030300000064000000000000000000000000000000004E1A1F1F
+        1A1F1A1A1C2D2D353B3B3B3A3A3A3A333333313124070303030300005D000000
+        00000000000000000000004E1F1F1F1F1F1A1F1A1A1A181A182A3A3B3A3A3333
+        333333313331100404000303005D0000000000000000000000004E1F1F211F1F
+        1A1F1A1F1A1A1A1A1818163B3B3A3A3A33333333313131280703030003006400
+        0000000000000000005D212121211F1F1F1F1A1F1A1A1A1A1A18183B3B3B3A3A
+        3A3331120F0B080507030303000300000000000000000000AB4E214E2121211F
+        1F1F1F1A1F1F1A1A1A181A673B3B3B3A3A270C09090909030303030303000309
+        00000000000000004E214E21212121211F1F1F1F1A1F1A1E1A1A1867673B3B3B
+        3A0D0D0C0C090909090303030303000051000000000000644E4E214E214E2121
+        211F1F1F1F1A1F1A1A1A1A1A181A16132D0D0D0C0C0909090903030303030303
+        000000000000004E4E4E4E44462121212121211F1F1F1F1E1F1A1A1A1A181818
+        0D0D0D0D0D0C09090909090310030003034E00000000664E4E214E76474E214E
+        2121211F1F1F1F1A1E1E1A1A1A1A181818170D0D0D0D090B0C080908310E0303
+        0003000000004E4E4E4E4B7C474E21214E2121211F1F1F1F1A1F1A1E1A1A1A18
+        1817180D0D0D0D0C09090908312403030303640000004E514E4E7A7D474E4E21
+        21212121211F1F1F1F1E1E1A1A1A1A18181817180D0D0D0C0C09090933310703
+        030309000066514E5150807F4A4E214E4E214E2121211F1F1F1E1E1F1E1A1A1A
+        1A181817180D0D0D0D0C0909333123030303030000515151515981804A4E4E21
+        4E21214E2121211F1F1F1E1A1E1E1A1A1A1A181817180D0D0D0D0C0C33332809
+        030303000051515151859681824E4E4E4E4E2121212121211F1F1F1F1E1E1E1A
+        1A1A1A181817180D0D0D0C0C33333109050303530053535151889796834E4E4E
+        214E4E214E21212121211F1F1E1E1E1E1A1A1A1A181817180D0D0D0C3333330F
+        0909034E00535351519A9797844E4E4E4E4E214E214E212121211F1F1F1E1E1E
+        1E1A1A1A1A181817180D0D0D3A3A33120909030900535353519B99988B4E4E4E
+        4E4E4E4E214E214E2121211F1F1F1E1E1E1E1A1A1A1A181817180D0D3A3A3327
+        0909090300535353539B9A998C514E4E4E4E4E214E214E21212121211F1F1F1E
+        1E1E1E1A1A1A1A181817180D3A3A3A270909090900535353539B9B9A8C51514E
+        4E4E4E4E4E4E214E214E2121211F1F1F1E1E1E1E1A1A1A1A181817293B3A3A27
+        09090909005D535353A19B9B905151514E4E4E4E4E4E4E214E21212121211F1F
+        1F1E1E2D382E2E2D3533673B3B3B3A270C0D0909005D5D5D539EA19C9B8F5B51
+        514E4E4E4E4E214E214E214E2121211F1F1F1E306A6A676A676767673B3B3B13
+        0D0C0D1F005D5D535D9DA1A09B9B9A8A8D8C58574B4E4E4E4E214E2121212121
+        1F1F1F306A6A6A6767676767673B3B150D0D0951005D5D5D5394A1A1A19B9B9A
+        99989796964E4E4E4E4E214E214E2121211F1F306D6A6A6A6A67676767673B18
+        0D0D0D6600665D5D5D5CA3A3A1A09C9B9A999897964E4E4E4E214E214E21214C
+        21211F306D6A6A6A676A6A67676735180D180D0000AC5D5D5D5D9FA3A2A1A09B
+        9B9A9998974E4E4E4E4E4E4E214E214C212121406D6D6A6A6A6A676A67672A18
+        180D0D00000060605D5D94A5A3A3A1A09C9B9A99985A4E4E4E4E4E4E4E214E21
+        4E2121716D6D6D6D6A6A676A67671A1818184E000000645D605D5FA6A5A3A2A1
+        A09B9B9A999886564E4E4E4E214E214E2142716F6F6F6D6D6A6A6A6A672E1A18
+        18180000000000605D605D95A8A5A3A3A1A09C9B9A9A989796877A4A4A787776
+        7474706F6F6F6D6D6D6D6A6A671E1A1A181F000000000064605D605DA4A8A5A3
+        A2A1A09B9B9A9998979681807F7D7D75757474726F6F6F6D6D6D6A6A411E1A1A
+        1A0000000000000060605D6062A7A8A5A3A3A1A09C9B9A9998979681807F7D7D
+        75757474726F6F6F6F6D6D381F1A1E1A21000000000000006660605D6092A8A8
+        A5A3A2A1A09B9B9A9998979681807F7D7D7575747472706F6F6D6C1F1F1E1E1A
+        000000000000000000606060605D92A9A8A5A3A3A1A09C9B9A9998979681807F
+        7D7D75757474726F6F6C1F1F1F1E1E5D000000000000000000AF606060606092
+        A8A8A5A3A2A1A09B9B9A9998979681807F7D7D757574747271431F1F1F1F2100
+        00000000000000000000AE6060605D6062A4A8A5A3A3A1A09C9B9A9998979681
+        807F7D7D757574454C214C1F1F4E00000000000000000000000000AA60606060
+        5D5D95A7A5A3A1A1A09C9B9A9998979681807F7D7D77444C4C214C4C4E000000
+        000000000000000000000000AE60606060605D5F949FA3A3A1A09B9B9A999897
+        9681807A4B4E4C4E214E1F4D0000000000000000000000000000000000AF6060
+        605D605D5D5D91939D9EA19B9B9A99898559504E4E4E4E4C4C4C5D0000000000
+        000000000000000000000000000000666060605D5D5D5D535353535353515151
+        514E514E4E4E4E4C4EAB00000000000000000000000000000000000000000000
+        006060605D5D5D5D5D535353535351515151514E4E4E4E640000000000000000
+        000000000000000000000000000000000000AF6460605D5D5D5D5D5353535353
+        515151514E660000000000000000000000000000000000000000000000000000
+        0000000000AE605D5D5D535D5353535353516600000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000FFFFE007FFFF0000FFFF0000
+        7FFF0000FFFC00001FFF0000FFF0000007FF0000FFC0000003FF0000FF800000
+        00FF0000FF000000007F0000FE000000003F0000FC000000001F0000F8000000
+        001F0000F0000000000F0000F000000000070000E000000000070000E0000000
+        00030000C000000000030000C000000000010000C00000000001000080000000
+        0001000080000000000100008000000000000000800000000000000080000000
+        0000000080000000000000008000000000000000800000000000000080000000
+        0000000080000000000000008000000000000000800000000000000080000000
+        000100008000000000010000C000000000010000C000000000030000E0000000
+        00030000E000000000070000F000000000070000F0000000000F0000F8000000
+        000F0000F8000000001F0000FC000000003F0000FE000000007F0000FF000000
+        00FF0000FF80000001FF0000FFE0000003FF0000FFF800000FFF0000FFFC0000
+        3FFF0000FFFF8001FFFF0000FFFFFFFFFFFF0000280000002000000040000000
+        0100080000000000000400000000000000000000000100000001000000000000
+        06060600090909000C0C0C000A170A000D130D000F160F000C190C0011111100
+        1414140012181200181818001D1D1D000C260C000B2B0B000E280E0007340700
+        0A310A00102B1000122D12001B2A1B0014311400153A1500173D17001D351D00
+        1E3F1E002222220026262600292929002E2E2E003232320034343400353E3500
+        3A3A3A003D3D3D00064906000A490A00025502000F560F001043100016451600
+        13531300016101000067000000690000006D0000066A0600046F04000B610B00
+        08650800096909000A6F0A00007200000075000000780000007D000015661500
+        147D150021442100335034003653380026732A003F5240004141410045454500
+        494949004E4E4E004558470049534B005151510056565600595959005D5D5D00
+        4369490044744C00427C4B00437C4D006262620065656500636D660068686800
+        6F6F6F0072727200777777007C7C7C000081000000860000008A0000008E0000
+        0A820A000091000000950000029B03001083110008A10C000DA6140013AC1D00
+        1F92270024972E002D8D3700299B350019B226001EB72E002EA03C0024BD3700
+        2AC23F003B8746003D934C0033A5430037AA4A002EB441003CAF510041844C00
+        4A835600428F50004197500041B3570041B4580046B85E005C83670063927200
+        57A36B004ABC650050B96B005FAB760062AE7C0030C8480037C6510035CE5100
+        3DCC59003BD3590042D1610041D9620046DF6B004CE4730052EA7C0058E68200
+        5DEC8A0057F085005DF58D008282820085858500888888008D8D8D0090909000
+        99999900A0A0A000ACACAC000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        000000000000000052400B0909091C4100000000000000000000000000000000
+        0000000000521B1B0B0B0B0B0909080808004100000000000000000000000000
+        0000008E1C1C1B1B1B1B0B0B0B09090808080008400000000000000000000000
+        0000471C1E1C1C1826313635352D2A230E080800000900000000000000000000
+        00401E1E1E1C1C192930363635352D2D312A1008080000000000000000000000
+        40211E1E1E1E1C1C1C1B18353535352D2D313125040800080000000000000051
+        212121211E1E1E1C1C1C1B3236363535230E0604040800000900000000000040
+        402121211E1E1E1E1C1C1C32363636270B0B0909080808080040000000004540
+        403C212121211E1E1E1C1C1C1B1817140B0B0B09090808010800000000004140
+        3E6140212121211E1E1E1C1C1C1B1B1B1A0B0B0B09040D1008004100004E4141
+        636240402121211E1E1E1E1C1C1C1B1B0B1B0B0B0B0B0D310808000000454144
+        6864404040212121211E1E1E1C1C1B1B1B1B1B0B0B0B0E31100808000045454A
+        696740402140212121211E1E1E1C1C1C1B1B0B1B0B0B152D2308014192454572
+        7E6C41404040402121211E1E1E1E1C1C1C1B1B1B1A0B152D2A09040B8C474775
+        806D414141404040212121211E1E1E1C1C1C1B1B0B1B15352D0909098C474776
+        826F41414140402140212121211E1E1E1C1C1C1B1B1A1735350B09098C47477A
+        847545454141404040402121211E1E1E1E3A1C1C18272D35350B0B098E4E477B
+        8583714541414141404040212121211E1E57575656365635360B0B0B004E4779
+        8685848174736A43404040402121211E1E5A575756563656321B0B40004E4E77
+        8786858482807E494140402140212121215A575757565636261B0B4E004E4E4E
+        88878685848280704141404040402121205A5A5A57575656181B1B00008E4E4E
+        7C8A87868584827F4C4441414040403B395C5A5A575757321B1B1B0000004E4E
+        4F898A8786858482807E6E676462605F5E5C5C5A5A5A573A1C1B520000005451
+        4E788B8A8786858482807E69686665605F5E5C5C5A5A381E1C1C000000000051
+        4E4E7D8B8A8786858482807E69686665605F5E5C5C591E1E1E8E000000000093
+        514E4E7D8B8A8786858482806969686665605F5E5D201E1E4700000000000000
+        8E514E4E78898A8786858482807E69686665603D212121400000000000000000
+        0091514E4E4F7C888786858482807E6968633E40402141000000000000000000
+        000093514E4E4E4E77797B7A7675727044414040405100000000000000000000
+        0000000054514E4E474E47474745454541414145000000000000000000000000
+        0000000000008E4E4E4E474747474645454F0000000000000000000000000000
+        000000000000000000008E8E8C8C9200000000000000000000000000FFF00FFF
+        FF8001FFFE00007FFC00003FF800001FF000000FE0000007E0000003C0000003
+        C000000180000001800000018000000000000000000000000000000000000000
+        0000000080000000800000008000000180000001C0000001C0000003E0000003
+        E0000007F000000FF800001FFC00003FFF0000FFFFC003FFFFFC1FFF28000000
+        1000000020000000010008000000000000010000000000000000000000010000
+        00010000000000000A0A0A00090F09000F0F0F000E140E000C190C0013131300
+        14141400111E1100181818001D1D1D00092F09000A390A00113311001B321B00
+        22222200262626002B2B2B0021322100263626003030300034343400313A3100
+        393939003E3E3E00044A04000B440B000E490E0005540500065A0600075F0700
+        124912001848180014531400155915001E521E00006A0000066A0600096A0900
+        0070000000750000007B0000146414001B631B00137B1300374A38002E713300
+        2B78300043434300474747004C4C4C004A534B00575757005A5A5A005E5E5E00
+        46634B004E6152004A7050004878510063636300656565006868680070707000
+        757575007D7D7D000081000000860000008C00000B860C000092000001980100
+        09A20E0014AD1F0022B1320020B830003A9048004B975B005D836800539F6600
+        63A679002BC442003AC0540037CF530039C8530042DA64004DE6750063C28300
+        59E8840059F187008A8A8A009191910098989800AAAAAA000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000003D110906033400000000000000003E11121F1B1A0C0503
+        1500000000003615151220252828241902060000004018181514112129250D05
+        0403150000312E1815151511120E0909060B03005A3349311818151111101009
+        091C04343E3950313118151515111010091E0C03364C52323131181815111110
+        101E1A06364E5438323131181515232226291B09594D5554534B311818182B43
+        42421F095C3D575554513731312D2C454342123D003D4F58555452504A484745
+        452A1100005C3D5658555452504A484744163D0000005B3D4F5755545250492F
+        183600000000005C3D3D4D4E4C3A33314000000000000000005C5936363E5A00
+        00000000F81F0000E0070000C003000080010000800100000000000000000000
+        000000000000000000000000000000008001000080010000C0030000E0070000
+        F81F000028000000300000006000000001002000000000008025000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        000000000000000000000000000000001E1E1E0F1C1C1C4F1B1B1B8F191919BF
+        171717DF161616FF141414FF131313FF111111FF0F0F0FEF0E0E0EBF0D0D0D9F
+        0B0B0B6F0A0A0A2F000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        000000002424240F2323235F212121CF1F1F1FFF1E1E1EFF1C1C1CFF1A1A1AFF
+        191919FF171717FF161616FF141414FF131313FF111111FF0F0F0FFF0E0E0EFF
+        0C0C0CFF0B0B0BFF090909DF0808088F0707071F000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        000000000000000000000000000000000000000000000000000000002929290F
+        2727277F262626EF242424FF222222FF212121FF1F1F1FFF1E1E1EFF1C1C1CFF
+        1A1A1AFF191919FF171717FF161616FF141414FF131313FF111111FF0F0F0FFF
+        0E0E0EFF0C0C0CFF0B0B0BFF090909FF080808FF060606BF0505053F00000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000002C2C2C5F2A2A2AEF
+        292929FF272727FF262626FF242424FF222222FF212121FF1F1F1FFF1E1E1EFF
+        1C1C1CFF1A1A1AFF191919FF171717FF161616FF141414FF131313FF111111FF
+        0F0F0FFF0E0E0EFF0C0C0CFF0B0B0BFF090909FF080808FF060606FF0505059F
+        0505050F00000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        000000000000000000000000000000003131310F2F2F2FAF2E2E2EFF2C2C2CFF
+        2A2A2AFF292929FF272727FF262626FF242424FF222222FF212121FF193019FF
+        143914FF0E480EFF0D460DFF0C450CFF0B430BFF0C3C0CFF0F2A0FFF111811FF
+        111111FF0F0F0FFF0E0E0EFF0C0C0CFF0B0B0BFF090909FF080808FF060606FF
+        040404EF0404044F000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000003434342F323232DF303030FF2F2F2FFF2E2E2EFF
+        2C2C2CFF2A2A2AFF292929FF272727FF174717FF0B620BFF027702FF007A00FF
+        007800FF007600FF007400FF007300FF007100FF006F00FF006D00FF006B00FF
+        035903FF093709FF0D1A0DFF0E0E0EFF0C0C0CFF0B0B0BFF090909FF080808FF
+        060606FF040404FF0303038F0000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        00000000000000003737372F353535EF343434FF323232FF303030FF2F2F2FFF
+        2E2E2EFF2C2C2CFF2A2A2AFF243424FF145414FF135313FF096709FF007C00FF
+        007A00FF007800FF007600FF007400FF007300FF007100FF006F00FF006D00FF
+        006B00FF006900FF006700FF044B04FF0B1E0BFF0C0C0CFF0B0B0BFF090909FF
+        080808FF060606FF040404FF0303039F00000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        000000003A3A3A2F383838EF373737FF353535FF343434FF323232FF303030FF
+        2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF262626FF242424FF
+        164416FF027502FF007800FF007600FF007400FF007300FF007100FF006F00FF
+        006D00FF006B00FF006900FF006700FF006600FF053F05FF0B120BFF0B0B0BFF
+        090909FF080808FF060606FF040404FF0303039F000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        3D3D3D2F3C3C3CEF3A3A3AFF383838FF373737FF353535FF343434FF323232FF
+        303030FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF262626FF
+        242424FF1A391AFF007A00FF007800FF007600FF007400FF007300FF007100FF
+        006F00FF006D00FF006B00FF006900FF006700FF006600FF015A01FF0A1D0AFF
+        0B0B0BFF090909FF080808FF060606FF040404FF0303038F0000000000000000
+        000000000000000000000000000000000000000000000000000000004141410F
+        3F3F3FCF3D3D3DFF3C3C3CFF3A3A3AFF383838FF373737FF353535FF343434FF
+        323232FF303030FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF
+        262626FF242424FF007C00FF007A00FF007800FF007600FF007400FF007300FF
+        007100FF036403FF0B410BFF0F2A0FFF101D10FF111111FF0E150EFF0C190CFF
+        0C0C0CFF0B0B0BFF090909FF080808FF060606FF040404FF0404044F00000000
+        000000000000000000000000000000000000000000000000000000004242428F
+        404040FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF383838FF373737FF353535FF
+        343434FF323232FF303030FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF
+        272727FF262626FF007E00FF007C00FF007A00FF007800FF007600FF007400FF
+        0D460DFF191919FF171717FF161616FF141414FF131313FF111111FF0F0F0FFF
+        0E0E0EFF0C0C0CFF0B0B0BFF090909FF080808FF060606FF040404EF0505050F
+        0000000000000000000000000000000000000000000000004545453F444444FF
+        424242FF404040FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF383838FF373737FF
+        353535FF343434FF323232FF303030FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF
+        292929FF272727FF008000FF007E00FF007C00FF007A00FF007800FF007600FF
+        1C1C1CFF1A1A1AFF191919FF171717FF161616FF141414FF131313FF111111FF
+        0F0F0FFF0E0E0EFF0C0C0CFF0B0B0BFF090909FF080808FF060606FF050505AF
+        000000000000000000000000000000000000000000000000464646BF454545FF
+        444444FF424242FF404040FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF383838FF
+        373737FF353535FF343434FF323232FF303030FF2F2F2FFF2E2E2EFF2C2C2CFF
+        2A2A2AFF292929FF272727FF262626FF242424FF1A391AFF163D16FF104C10FF
+        1E1E1EFF1C1C1CFF1A1A1AFF191919FF171717FF161616FF141414FF131313FF
+        111111FF0F0F0FFF0E0E0EFF0C0C0CFF0B0B0BFF090909FF080808FF060606FF
+        0505053F000000000000000000000000000000004A4A4A3F484848FF474747FF
+        454545FF444444FF39563BFF28742CFF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF
+        383838FF373737FF353535FF343434FF323232FF303030FF2F2F2FFF2E2E2EFF
+        2C2C2CFF2A2A2AFF292929FF272727FF262626FF242424FF222222FF212121FF
+        1F1F1FFF1E1E1EFF1C1C1CFF1A1A1AFF191919FF171717FF161616FF141414FF
+        131313FF111111FF0F0F0FFF053F05FF0C0C0CFF0B0B0BFF090909FF080808FF
+        060606BF000000000000000000000000000000004B4B4BBF4A4A4AFF484848FF
+        474747FF454545FF22942AFF2B7730FF404040FF3F3F3FFF3D3D3DFF3C3C3CFF
+        3A3A3AFF383838FF373737FF353535FF343434FF323232FF303030FF2F2F2FFF
+        2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF262626FF242424FF222222FF
+        212121FF1F1F1FFF1E1E1EFF1C1C1CFF1A1A1AFF191919FF171717FF161616FF
+        141414FF131313FF111111FF006600FF0A230AFF0C0C0CFF0B0B0BFF090909FF
+        080808FF0707072F00000000000000004F4F4F1F4D4D4DFF4B4B4BFF4A4A4AFF
+        484848FF3C6240FF1AB328FF2D7A33FF424242FF404040FF3F3F3FFF3D3D3DFF
+        3C3C3CFF3A3A3AFF383838FF373737FF353535FF343434FF323232FF303030FF
+        2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF262626FF242424FF
+        222222FF212121FF1F1F1FFF1E1E1EFF1C1C1CFF1A1A1AFF191919FF171717FF
+        161616FF141414FF131313FF006700FF044B04FF0E0E0EFF0C0C0CFF0B0B0BFF
+        090909FF0808088F00000000000000005050506F4F4F4FFF4D4D4DFF4B4B4BFF
+        4A4A4AFF2D973AFF1EB72EFF307C37FF444444FF424242FF404040FF3F3F3FFF
+        3D3D3DFF3C3C3CFF3A3A3AFF383838FF373737FF353535FF343434FF323232FF
+        303030FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF262626FF
+        242424FF222222FF212121FF1F1F1FFF1E1E1EFF1C1C1CFF1A1A1AFF191919FF
+        171717FF161616FF141414FF006900FF006700FF0D1A0DFF0E0E0EFF0C0C0CFF
+        0B0B0BFF090909EF0000000000000000525252BF505050FF4F4F4FFF4D4D4DFF
+        49534AFF26BE39FF22BB34FF327F3BFF454545FF444444FF424242FF404040FF
+        3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF383838FF373737FF353535FF343434FF
+        323232FF303030FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF
+        262626FF242424FF222222FF212121FF1F1F1FFF1E1E1EFF1C1C1CFF1A1A1AFF
+        191919FF171717FF161616FF006B00FF006900FF074207FF0F0F0FFF0E0E0EFF
+        0C0C0CFF0B0B0BFF0A0A0A2F00000000535353FF525252FF505050FF4F4F4FFF
+        417A49FF2AC23FFF26BE39FF35823EFF474747FF454545FF444444FF424242FF
+        404040FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF383838FF373737FF353535FF
+        343434FF323232FF303030FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF
+        272727FF262626FF242424FF222222FF212121FF1F1F1FFF1E1E1EFF1C1C1CFF
+        1A1A1AFF191919FF171717FF006D00FF006B00FF035903FF111111FF0F0F0FFF
+        0E0E0EFF0C0C0CFF0B0B0B6F5656563F555555FF535353FF525252FF505050FF
+        3C9B4CFF2DC644FF2AC23FFF388442FF484848FF474747FF454545FF444444FF
+        424242FF404040FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF383838FF373737FF
+        353535FF343434FF323232FF303030FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF
+        292929FF272727FF262626FF242424FF222222FF212121FF1F1F1FFF1E1E1EFF
+        1C1C1CFF1A1A1AFF191919FF006F00FF006D00FF006B00FF111811FF111111FF
+        0F0F0FFF0E0E0EFF0C0C0CAF5858584F575757FF555555FF535353FF525252FF
+        3BAE50FF31CA4AFF2DC644FF3B8745FF4A4A4AFF484848FF474747FF454545FF
+        444444FF424242FF404040FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF383838FF
+        373737FF353535FF343434FF323232FF303030FF2F2F2FFF2E2E2EFF2C2C2CFF
+        2A2A2AFF292929FF272727FF262626FF242424FF222222FF212121FF1F1F1FFF
+        1E1E1EFF1C1C1CFF1A1A1AFF007100FF006F00FF006D00FF0F2A0FFF131313FF
+        111111FF0F0F0FFF0E0E0EBF5959597F585858FF575757FF555555FF535353FF
+        39D156FF35CD50FF31CA4AFF3D8949FF4B4B4BFF4A4A4AFF484848FF474747FF
+        454545FF444444FF424242FF404040FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF
+        383838FF373737FF353535FF343434FF323232FF303030FF2F2F2FFF2E2E2EFF
+        2C2C2CFF2A2A2AFF292929FF272727FF262626FF242424FF222222FF212121FF
+        1F1F1FFF1E1E1EFF1C1C1CFF007300FF007100FF006F00FF0C3C0CFF141414FF
+        131313FF111111FF0F0F0FFF5B5B5B7F595959FF585858FF575757FF555555FF
+        3DD55BFF39D156FF35CD50FF408C4DFF4D4D4DFF4B4B4BFF4A4A4AFF484848FF
+        474747FF454545FF444444FF424242FF404040FF3F3F3FFF3D3D3DFF3C3C3CFF
+        3A3A3AFF383838FF373737FF353535FF343434FF323232FF303030FF2F2F2FFF
+        2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF262626FF242424FF222222FF
+        212121FF1F1F1FFF1E1E1EFF007400FF007300FF007100FF0B430BFF161616FF
+        141414FF131313FF111111FF5C5C5C7F5B5B5BFF595959FF585858FF575757FF
+        40D961FF3DD55BFF39D156FF438F51FF4F4F4FFF4D4D4DFF4B4B4BFF4A4A4AFF
+        484848FF474747FF454545FF444444FF424242FF404040FF3F3F3FFF3D3D3DFF
+        3C3C3CFF3A3A3AFF383838FF373737FF353535FF343434FF323232FF303030FF
+        2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF262626FF242424FF
+        222222FF212121FF1F1F1FFF007600FF007400FF007300FF0C450CFF171717FF
+        161616FF141414FF131313FF5E5E5E7F5D5D5DFF5B5B5BFF595959FF585858FF
+        44DD67FF40D961FF3DD55BFF459254FF505050FF4F4F4FFF4D4D4DFF4B4B4BFF
+        4A4A4AFF484848FF474747FF454545FF444444FF424242FF404040FF3F3F3FFF
+        3D3D3DFF3C3C3CFF3A3A3AFF383838FF373737FF353535FF343434FF323232FF
+        303030FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF262626FF
+        242424FF202820FF0C590CFF007800FF007600FF007400FF0D460DFF191919FF
+        171717FF161616FF141414FF6060607F5E5E5EFF5D5D5DFF5B5B5BFF595959FF
+        48E06DFF44DD67FF40D961FF45A459FF525252FF505050FF4F4F4FFF4D4D4DFF
+        4B4B4BFF4A4A4AFF484848FF474747FF454545FF444444FF424242FF404040FF
+        3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF383838FF373737FF353535FF343434FF
+        323232FF303030FF1D511DFF0E6D0EFF155A15FF155815FF145614FF0E600EFF
+        076F07FF007E00FF007C00FF007A00FF007800FF007600FF0E480EFF1A1A1AFF
+        191919FF171717FF161616FF6161617F606060FF5E5E5EFF5D5D5DFF5B5B5BFF
+        4CDB71FF48E06DFF44DD67FF40D961FF479C58FF4F6252FF505050FF4F4F4FFF
+        4D4D4DFF4B4B4BFF4A4A4AFF484848FF474747FF454545FF444444FF424242FF
+        404040FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF383838FF373737FF353535FF
+        343434FF323232FF185F18FF008B00FF008900FF008700FF008500FF008400FF
+        008200FF008000FF007E00FF007C00FF007A00FF007800FF143914FF1C1C1CFF
+        1A1A1AFF191919FF171717DF6262623F616161FF606060FF5E5E5EFF5D5D5DFF
+        52C470FF4CE473FF48E06DFF44DD67FF40D961FF3DD55BFF3EB955FF419751FF
+        408C4DFF456B4BFF436948FF416746FF484848FF474747FF454545FF444444FF
+        424242FF404040FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF383838FF373737FF
+        353535FF343434FF196019FF008D00FF008B00FF008900FF008700FF008500FF
+        008400FF008200FF008000FF007E00FF007C00FF007A00FF193019FF1E1E1EFF
+        1C1C1CFF1A1A1AFF191919BF6464641F636363FF616161FF606060FF5E5E5EFF
+        58A46DFF50E878FF4CE473FF48E06DFF44DD67FF40D961FF3DD55BFF39D156FF
+        35CD50FF31CA4AFF2DC644FF2AC23FFF4A4A4AFF484848FF474747FF454545FF
+        444444FF424242FF404040FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF383838FF
+        373737FF353535FF1A621AFF008F00FF008D00FF008B00FF008900FF008700FF
+        008500FF008400FF008200FF008000FF007E00FF027702FF212121FF1F1F1FFF
+        1E1E1EFF1C1C1CFF1B1B1B8F00000000656565DF636363FF616161FF606060FF
+        5D7965FF53EC7EFF50E878FF4CE473FF48E06DFF44DD67FF40D961FF3DD55BFF
+        39D156FF35CD50FF31CA4AFF2DC644FF4B4B4BFF4A4A4AFF484848FF474747FF
+        454545FF444444FF424242FF404040FF3F3F3FFF3D3D3DFF3C3C3CFF3A3A3AFF
+        383838FF373737FF1B641BFF009100FF008F00FF008D00FF008B00FF008900FF
+        008700FF008500FF008400FF008200FF008000FF0B620BFF222222FF212121FF
+        1F1F1FFF1E1E1EFF1C1C1C5F000000006666669F656565FF636363FF616161FF
+        606060FF58DD7FFF53EC7EFF50E878FF4CE473FF48E06DFF44DD67FF40D961FF
+        3DD55BFF39D156FF35CD50FF31CA4AFF4D4D4DFF4B4B4BFF4A4A4AFF484848FF
+        474747FF454545FF444444FF424242FF404040FF3F3F3FFF3D3D3DFF3C3C3CFF
+        3A3A3AFF383838FF1B661BFF009300FF009100FF008F00FF008D00FF008B00FF
+        008900FF008700FF008500FF008400FF008200FF174717FF242424FF222222FF
+        212121FF1F1F1FFF1E1E1E0F000000006767674F666666FF656565FF636363FF
+        616161FF5DA974FF57EF84FF53EC7EFF50E878FF4CE473FF48E06DFF44DD67FF
+        40D961FF3DD55BFF39D156FF35CD50FF447D4EFF4D4D4DFF4B4B4BFF4A4A4AFF
+        484848FF474747FF454545FF444444FF424242FF404040FF3F3F3FFF3D3D3DFF
+        3C3C3CFF3A3A3AFF0E7F0EFF009500FF009300FF009100FF008F00FF008D00FF
+        008B00FF008900FF008700FF008500FF027E02FF272727FF262626FF242424FF
+        222222FF212121CF000000000000000000000000686868EF666666FF656565FF
+        636363FF616B64FF5BEA87FF57EF84FF53EC7EFF50E878FF4CE473FF48E06DFF
+        44DD67FF40D961FF3DD55BFF39D156FF35CD50FF3C9C4DFF47644CFF4B4B4BFF
+        4A4A4AFF484848FF474747FF454545FF444444FF424242FF404040FF3F3F3FFF
+        2C5C2EFF128413FF009900FF009700FF009500FF009300FF009100FF008F00FF
+        008D00FF008B00FF008900FF008700FF155815FF292929FF272727FF262626FF
+        242424FF2323235F0000000000000000000000006969697F686868FF666666FF
+        656565FF636363FF60AC78FF5BF38AFF57EF84FF53EC7EFF50E878FF4CE473FF
+        48E06DFF44DD67FF40D961FF3DD55BFF39D156FF35CD50FF31CA4AFF2DC644FF
+        32A442FF2FA13EFF35823EFF327F3BFF2D8335FF22942BFF1F9126FF0FA817FF
+        0BA411FF07A00BFF049D05FF009900FF009700FF009500FF009300FF009100FF
+        008F00FF008D00FF008B00FF028402FF293229FF2A2A2AFF292929FF272727FF
+        262626EF2424240F0000000000000000000000006A6A6A1F696969EF686868FF
+        666666FF656565FF636363FF5FDA86FF5BF38AFF57EF84FF53EC7EFF50E878FF
+        4CE473FF48E06DFF44DD67FF40D961FF3DD55BFF39D156FF35CD50FF31CA4AFF
+        2DC644FF2AC23FFF26BE39FF22BB34FF1EB72EFF1AB328FF16AF22FF13AC1CFF
+        0FA817FF0BA411FF07A00BFF049D05FF009900FF009700FF009500FF009300FF
+        009100FF008F00FF008D00FF204C20FF2E2E2EFF2C2C2CFF2A2A2AFF292929FF
+        2727277F00000000000000000000000000000000000000006A6A6A7F696969FF
+        686868FF666666FF656565FF637F6CFF5FED8CFF5BF38AFF57EF84FF53EC7EFF
+        50E878FF4CE473FF48E06DFF44DD67FF40D961FF3DD55BFF39D156FF35CD50FF
+        31CA4AFF2DC644FF2AC23FFF26BE39FF22BB34FF1EB72EFF1AB328FF16AF22FF
+        13AC1CFF0FA817FF0BA411FF07A00BFF049D05FF009900FF009700FF009500FF
+        009300FF009100FF136C13FF303030FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AEF
+        2929290F00000000000000000000000000000000000000006B6B6B0F6A6A6ADF
+        696969FF686868FF666666FF656565FF629B75FF5FF78FFF5BF38AFF57EF84FF
+        53EC7EFF50E878FF4CE473FF48E06DFF44DD67FF40D961FF3DD55BFF39D156FF
+        35CD50FF31CA4AFF2DC644FF2AC23FFF26BE39FF22BB34FF1EB72EFF1AB328FF
+        16AF22FF13AC1CFF0FA817FF0BA411FF07A00BFF049D05FF009900FF009700FF
+        009500FF0A810AFF343434FF323232FF303030FF2F2F2FFF2E2E2EFF2C2C2C6F
+        000000000000000000000000000000000000000000000000000000006B6B6B3F
+        6A6A6AFF696969FF686868FF666666FF656565FF629B75FF5FF78FFF5BF38AFF
+        57EF84FF53EC7EFF50E878FF4CE473FF48E06DFF44DD67FF40D961FF3DD55BFF
+        39D156FF35CD50FF31CA4AFF2DC644FF2AC23FFF26BE39FF22BB34FF1EB72EFF
+        1AB328FF16AF22FF13AC1CFF0FA817FF0BA411FF07A00BFF049D05FF009900FF
+        0A850AFF333D33FF353535FF343434FF323232FF303030FF2F2F2FBF00000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        6B6B6B8F6A6A6AFF696969FF686868FF666666FF656565FF629B75FF5FF78FFF
+        5BF38AFF57EF84FF53EC7EFF50E878FF4CE473FF48E06DFF44DD67FF40D961FF
+        3DD55BFF39D156FF35CD50FF31CA4AFF2DC644FF2AC23FFF26BE39FF22BB34FF
+        1EB72EFF1AB328FF16AF22FF13AC1CFF0FA817FF0BA411FF07A00BFF128413FF
+        364036FF383838FF373737FF353535FF343434FF323232EF3131310F00000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        000000006B6B6B9F6A6A6AFF696969FF686868FF666666FF656565FF637F6CFF
+        5FDA86FF5BF38AFF57EF84FF53EC7EFF50E878FF4CE473FF48E06DFF44DD67FF
+        40D961FF3DD55BFF39D156FF35CD50FF31CA4AFF2DC644FF2AC23FFF26BE39FF
+        22BB34FF1EB72EFF1AB328FF16AF22FF13AC1CFF0FA817FF257127FF3D3D3DFF
+        3C3C3CFF3A3A3AFF383838FF373737FF353535EF3434342F0000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        000000006B6B6B0F6B6B6BCF6A6A6AFF696969FF686868FF666666FF656565FF
+        636363FF60AC78FF5BEA87FF57EF84FF53EC7EFF50E878FF4CE473FF48E06DFF
+        44DD67FF40D961FF3DD55BFF39D156FF35CD50FF31CA4AFF2DC644FF2AC23FFF
+        26BE39FF22BB34FF1EB72EFF1AB328FF22942AFF39563BFF404040FF3F3F3FFF
+        3D3D3DFF3C3C3CFF3A3A3AFF383838EF3737372F000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        00000000000000006B6B6B0F6B6B6B9F6A6A6AFF696969FF686868FF666666FF
+        656565FF636363FF616B64FF5DA974FF58DD7FFF53EC7EFF50E878FF4CE473FF
+        48E06DFF44DD67FF40D961FF3DD55BFF39D156FF35CD50FF31CA4AFF2DC644FF
+        2AC23FFF26BE39FF2D973AFF3C6240FF454545FF444444FF424242FF404040FF
+        3F3F3FFF3D3D3DFF3C3C3CEF3A3A3A2F00000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        000000000000000000000000000000006B6B6B8F6A6A6AFF696969FF686868FF
+        666666FF656565FF636363FF616161FF606060FF5C8267FF58A46DFF52C470FF
+        4CDB71FF48E06DFF44DD67FF40D961FF3DD55BFF39D156FF3AB650FF3C9B4CFF
+        417A49FF49534AFF4A4A4AFF484848FF474747FF454545FF444444FF424242FF
+        404040FF3F3F3FCF3D3D3D2F0000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        00000000000000000000000000000000000000006B6B6B3F6A6A6ADF696969FF
+        686868FF666666FF656565FF636363FF616161FF606060FF5E5E5EFF5D5D5DFF
+        5B5B5BFF595959FF585858FF575757FF555555FF535353FF525252FF505050FF
+        4F4F4FFF4D4D4DFF4B4B4BFF4A4A4AFF484848FF474747FF454545FF444444FF
+        4242428F4141410F000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000006B6B6B0F6A6A6A7F
+        696969FF686868FF666666FF656565FF636363FF616161FF606060FF5E5E5EFF
+        5D5D5DFF5B5B5BFF595959FF585858FF575757FF555555FF535353FF525252FF
+        505050FF4F4F4FFF4D4D4DFF4B4B4BFF4A4A4AFF484848FF464646BF4545453F
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        6A6A6A1F6969698F686868EF666666FF656565FF636363FF616161FF606060FF
+        5E5E5EFF5D5D5DFF5B5B5BFF595959FF585858FF575757FF555555FF535353FF
+        525252FF505050FF4F4F4FFF4D4D4DFF4B4B4BBF4A4A4A3F0000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000006767674F6666669F656565EF636363FF616161FF
+        606060FF5E5E5EFF5D5D5DFF5B5B5BFF595959FF585858FF575757FF555555FF
+        535353FF525252BF5050506F4F4F4F1F00000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000006464641F6262623F
+        6161617F6060607F5E5E5E7F5C5C5C7F5B5B5B7F5959597F5858585F5656563F
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        000000000000000000000000FFFF8001FFFF0000FFFC00003FFF0000FFF00000
+        0FFF0000FFE0000003FF0000FF80000001FF0000FF00000000FF0000FE000000
+        007F0000FC000000003F0000F8000000001F0000F0000000000F0000F0000000
+        00070000E000000000070000E000000000030000C000000000030000C0000000
+        0001000080000000000100008000000000010000800000000000000080000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000800000000000000080000000
+        000000008000000000010000C000000000010000C000000000010000C0000000
+        00030000E000000000030000E000000000070000F0000000000F0000F8000000
+        000F0000FC000000001F0000FC000000003F0000FE000000007F0000FF800000
+        00FF0000FFC0000001FF0000FFE0000007FF0000FFF800001FFF0000FFFF0000
+        7FFF0000FFFFE007FFFF00002800000020000000400000000100200000000000
+        8010000000000000000000000000000000000000000000000000000000000000
+        000000000000000000000000000000000000000000000000000000002121210F
+        1F1F1F5F1D1D1D9F1A1A1ACF181818FF151515FF131313FF101010FF0E0E0EDF
+        0C0C0CBF0A0A0A6F0808081F0000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        00000000000000000000000000000000000000002929291F2626269F232323FF
+        212121FF1F1F1FFF1C1C1CFF1A1A1AFF181818FF151515FF131313FF101010FF
+        0E0E0EFF0C0C0CFF090909FF070707BF0606063F000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        000000000000000000000000000000002D2D2D8F2A2A2AFF282828FF262626FF
+        232323FF212121FF1F1F1FFF1C1C1CFF1A1A1AFF181818FF151515FF131313FF
+        101010FF0E0E0EFF0C0C0CFF090909FF070707FF050505BF0404041F00000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        00000000000000003434341F323232CF2F2F2FFF2D2D2DFF2A2A2AFF282828FF
+        1E371EFF0F560FFF086408FF007800FF007500FF007200FF006F00FF026102FF
+        064906FF0B2B0BFF0E0E0EFF0C0C0CFF090909FF070707FF050505EF0303034F
+        0000000000000000000000000000000000000000000000000000000000000000
+        000000003939392F363636EF343434FF323232FF2F2F2FFF2D2D2DFF2A2A2AFF
+        1E3F1EFF135313FF0B610BFF007A00FF007800FF007500FF007200FF006F00FF
+        006C00FF006900FF006100FF073407FF0C0C0CFF090909FF070707FF050505FF
+        0303035F00000000000000000000000000000000000000000000000000000000
+        3E3E3E0F3B3B3BEF393939FF363636FF343434FF323232FF2F2F2FFF2D2D2DFF
+        2A2A2AFF282828FF262626FF1D341DFF027502FF007800FF007500FF007200FF
+        006F00FF006C00FF006900FF006700FF025502FF0A170AFF090909FF070707FF
+        050505FF0303034F000000000000000000000000000000000000000000000000
+        404040BF3D3D3DFF3B3B3BFF393939FF363636FF343434FF323232FF2F2F2FFF
+        2D2D2DFF2A2A2AFF282828FF262626FF096709FF007A00FF007800FF007500FF
+        007200FF0A490AFF102B10FF121812FF0F160FFF0C190CFF0C0C0CFF090909FF
+        070707FF050505EF0404041F000000000000000000000000000000004444446F
+        424242FF404040FF3D3D3DFF3B3B3BFF393939FF363636FF343434FF323232FF
+        2F2F2FFF2D2D2DFF2A2A2AFF282828FF096909FF007D00FF007A00FF007800FF
+        104310FF1A1A1AFF181818FF151515FF131313FF101010FF0E0E0EFF0C0C0CFF
+        090909FF070707FF050505BF0000000000000000000000004A4A4A0F474747EF
+        444444FF424242FF365338FF3D3D3DFF3B3B3BFF393939FF363636FF343434FF
+        323232FF2F2F2FFF2D2D2DFF2A2A2AFF282828FF262626FF1D341DFF173D17FF
+        1B2A1BFF1C1C1CFF1A1A1AFF181818FF151515FF131313FF101010FF0D130DFF
+        0C0C0CFF090909FF070707FF0606063F00000000000000004B4B4B7F494949FF
+        474747FF3F5240FF1F9227FF404040FF3D3D3DFF3B3B3BFF393939FF363636FF
+        343434FF323232FF2F2F2FFF2D2D2DFF2A2A2AFF282828FF262626FF232323FF
+        212121FF1F1F1FFF1C1C1CFF1A1A1AFF181818FF151515FF131313FF0C260CFF
+        073407FF0C0C0CFF090909FF070707BF00000000000000004E4E4EDF4B4B4BFF
+        494949FF2D8D37FF24972EFF424242FF404040FF3D3D3DFF3B3B3BFF393939FF
+        363636FF343434FF323232FF2F2F2FFF2D2D2DFF2A2A2AFF282828FF262626FF
+        232323FF212121FF1F1F1FFF1C1C1CFF1A1A1AFF181818FF151515FF0E280EFF
+        006100FF0E0E0EFF0C0C0CFF090909FF0808081F5252522F505050FF4E4E4EFF
+        49534BFF24BD37FF299B35FF444444FF424242FF404040FF3D3D3DFF3B3B3BFF
+        393939FF363636FF343434FF323232FF2F2F2FFF2D2D2DFF2A2A2AFF282828FF
+        262626FF232323FF212121FF1F1F1FFF1C1C1CFF1A1A1AFF181818FF102B10FF
+        006900FF0A310AFF0E0E0EFF0C0C0CFF0A0A0A6F5555556F535353FF505050FF
+        44744CFF2AC23FFF2EA03CFF474747FF444444FF424242FF404040FF3D3D3DFF
+        3B3B3BFF393939FF363636FF343434FF323232FF2F2F2FFF2D2D2DFF2A2A2AFF
+        282828FF262626FF232323FF212121FF1F1F1FFF1C1C1CFF1A1A1AFF122D12FF
+        006C00FF064906FF101010FF0E0E0EFF0C0C0CBF5757578F555555FF535353FF
+        428F50FF30C848FF33A543FF494949FF474747FF444444FF424242FF404040FF
+        3D3D3DFF3B3B3BFF393939FF363636FF343434FF323232FF2F2F2FFF2D2D2DFF
+        2A2A2AFF282828FF262626FF232323FF212121FF1F1F1FFF1C1C1CFF143014FF
+        006F00FF026102FF131313FF101010FF0E0E0EEF595959BF575757FF555555FF
+        41B357FF35CE51FF37AA4AFF4B4B4BFF494949FF474747FF444444FF424242FF
+        404040FF3D3D3DFF3B3B3BFF393939FF363636FF343434FF323232FF2F2F2FFF
+        2D2D2DFF2A2A2AFF282828FF262626FF232323FF212121FF1F1F1FFF153215FF
+        007200FF006F00FF151515FF131313FF101010FF5C5C5CBF5A5A5AFF575757FF
+        46B85EFF3BD359FF3CAF51FF4E4E4EFF4B4B4BFF494949FF474747FF444444FF
+        424242FF404040FF3D3D3DFF3B3B3BFF393939FF363636FF343434FF323232FF
+        2F2F2FFF2D2D2DFF2A2A2AFF282828FF262626FF232323FF212121FF153A15FF
+        007500FF007200FF181818FF151515FF131313FF5E5E5EBF5C5C5CFF5A5A5AFF
+        4ABC65FF41D962FF41B458FF505050FF4E4E4EFF4B4B4BFF494949FF474747FF
+        444444FF424242FF404040FF3D3D3DFF3B3B3BFF393939FF363636FF343434FF
+        323232FF2F2F2FFF214421FF2A2A2AFF282828FF1E371EFF164516FF046F04FF
+        007800FF007500FF1A1A1AFF181818FF151515FF616161BF5F5F5FFF5C5C5CFF
+        50B96BFF46DF6BFF42D161FF4A8356FF505050FF4E4E4EFF4B4B4BFF494949FF
+        474747FF444444FF424242FF404040FF3D3D3DFF3B3B3BFF393939FF363636FF
+        343434FF323232FF008B00FF008900FF008600FF008300FF008000FF007D00FF
+        007A00FF007800FF1C1C1CFF1A1A1AFF181818FF6363637F616161FF5F5F5FFF
+        57A36BFF4CE473FF46DF6BFF41D962FF3DCC59FF3CAF51FF3D934CFF3B8746FF
+        455847FF474747FF444444FF424242FF404040FF3D3D3DFF3B3B3BFF393939FF
+        363636FF343434FF008E00FF008B00FF008900FF008600FF008300FF008000FF
+        007D00FF066A06FF1F1F1FFF1C1C1CFF1A1A1ACF6565655F636363FF616161FF
+        5C8367FF52EA7CFF4CE473FF46DF6BFF41D962FF3BD359FF35CE51FF30C848FF
+        436949FF494949FF474747FF444444FF424242FF404040FF3D3D3DFF3B3B3BFF
+        393939FF363636FF009100FF008E00FF008B00FF008900FF008600FF008300FF
+        008000FF0F560FFF212121FF1F1F1FFF1D1D1DAF6767671F666666FF636363FF
+        616161FF58E682FF52EA7CFF4CE473FF46DF6BFF41D962FF3BD359FF35CE51FF
+        41844CFF4B4B4BFF494949FF474747FF444444FF424242FF404040FF3D3D3DFF
+        3B3B3BFF353E35FF009400FF009100FF008E00FF008B00FF008900FF008600FF
+        008300FF1E371EFF232323FF212121FF1F1F1F5F00000000676767BF666666FF
+        636363FF5FAB76FF57F085FF52EA7CFF4CE473FF46DF6BFF41D962FF3BD359FF
+        37C651FF437C4DFF49534BFF494949FF474747FF444444FF424242FF404040FF
+        335034FF147D15FF009700FF009400FF009100FF008E00FF008B00FF008900FF
+        0A6F0AFF282828FF262626FF232323FF2121210F000000006A6A6A5F686868FF
+        666666FF636D66FF5DEC8AFF57F085FF52EA7CFF4CE473FF46DF6BFF41D962FF
+        3BD359FF35CE51FF30C848FF2EB441FF2EA03CFF299B35FF24972EFF13AC1DFF
+        0DA614FF08A10CFF029B03FF009700FF009400FF009100FF008E00FF008B00FF
+        214421FF2A2A2AFF282828FF2626269F0000000000000000000000006A6A6ADF
+        686868FF666666FF639272FF5DF58DFF57F085FF52EA7CFF4CE473FF46DF6BFF
+        41D962FF3BD359FF35CE51FF30C848FF2AC23FFF24BD37FF1EB72EFF19B226FF
+        13AC1DFF0DA614FF08A10CFF029B03FF009700FF009400FF009100FF156615FF
+        2F2F2FFF2D2D2DFF2A2A2AFF2929291F0000000000000000000000006B6B6B3F
+        6A6A6AFF686868FF666666FF62AE7CFF5DF58DFF57F085FF52EA7CFF4CE473FF
+        46DF6BFF41D962FF3BD359FF35CE51FF30C848FF2AC23FFF24BD37FF1EB72EFF
+        19B226FF13AC1DFF0DA614FF08A10CFF029B03FF009700FF0A820AFF343434FF
+        323232FF2F2F2FFF2D2D2D8F0000000000000000000000000000000000000000
+        6B6B6B8F6A6A6AFF686868FF666666FF62AE7CFF5DF58DFF57F085FF52EA7CFF
+        4CE473FF46DF6BFF41D962FF3BD359FF35CE51FF30C848FF2AC23FFF24BD37FF
+        1EB72EFF19B226FF13AC1DFF0DA614FF08A10CFF108311FF353E35FF363636FF
+        343434FF323232CF3030300F0000000000000000000000000000000000000000
+        000000006B6B6BBF6A6A6AFF686868FF666666FF639272FF5DEC8AFF57F085FF
+        52EA7CFF4CE473FF46DF6BFF41D962FF3BD359FF35CE51FF30C848FF2AC23FFF
+        24BD37FF1EB72EFF19B226FF13AC1DFF26732AFF3D3D3DFF3B3B3BFF393939FF
+        363636EF3434341F000000000000000000000000000000000000000000000000
+        000000006B6B6B0F6B6B6BAF6A6A6AFF686868FF666666FF636D66FF5FAB76FF
+        58E682FF52EA7CFF4CE473FF46DF6BFF41D962FF3BD359FF35CE51FF30C848FF
+        2AC23FFF24BD37FF2D8D37FF3F5240FF424242FF404040FF3D3D3DFF3B3B3BEF
+        3939392F00000000000000000000000000000000000000000000000000000000
+        0000000000000000000000006B6B6B8F6A6A6AFF686868FF666666FF636363FF
+        616161FF5C8367FF57A36BFF50B96BFF4ABC65FF46B85EFF41B357FF419750FF
+        427C4BFF49534BFF494949FF474747FF444444FF424242FF404040BF3E3E3E0F
+        0000000000000000000000000000000000000000000000000000000000000000
+        000000000000000000000000000000006B6B6B3F6A6A6ADF686868FF666666FF
+        636363FF616161FF5F5F5FFF5C5C5CFF5A5A5AFF575757FF555555FF535353FF
+        505050FF4E4E4EFF4B4B4BFF494949FF474747EF4444446F0000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000006A6A6A5F676767BF
+        666666FF636363FF616161FF5F5F5FFF5C5C5CFF5A5A5AFF575757FF555555FF
+        535353FF505050FF4E4E4EDF4B4B4B7F4A4A4A0F000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        6767671F6565655F6363637F616161BF5E5E5EBF5C5C5CBF595959BF5757578F
+        5555556F5252522F000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000FFC003FFFF0000FFFE00003F
+        F800001FF000000FE0000007E0000003C0000003800000018000000180000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        00000000000000008000000080000001C0000001C0000003E0000003F0000007
+        F000000FFC00001FFE00007FFF8000FFFFE007FF280000001000000020000000
+        0100200000000000400400000000000000000000000000000000000000000000
+        0000000000000000000000002727273F222222AF1D1D1DEF181818FF131313FF
+        0F0F0FFF0B0B0BAF0707075F0000000000000000000000000000000000000000
+        000000003535350F303030AF2B2B2BFF213221FF124912FF0E490EFF0B440BFF
+        0A390AFF0C190CFF0A0A0AFF060606CF0404041F000000000000000000000000
+        3E3E3E0F393939CF343434FF303030FF263626FF184818FF066A06FF007500FF
+        007000FF006A00FF044A04FF090F09FF050505EF0404041F0000000000000000
+        424242AF3E3E3EFF393939FF343434FF303030FF2B2B2BFF145314FF007B00FF
+        017001FF113311FF111E11FF0E140EFF0A0A0AFF060606CF000000004B4B4B3F
+        474747FF2E7133FF3E3E3EFF393939FF343434FF303030FF2B2B2BFF223222FF
+        1B321BFF1D1D1DFF181818FF131313FF092F09FF0A0A0AFF0707075F5050509F
+        4A534BFF22B132FF434343FF3E3E3EFF393939FF343434FF303030FF2B2B2BFF
+        262626FF222222FF1D1D1DFF181818FF055405FF0C190CFF0B0B0BAF555555CF
+        4A7050FF2BC442FF474747FF434343FF3E3E3EFF393939FF343434FF303030FF
+        2B2B2BFF262626FF222222FF1D1D1DFF065A06FF0A390AFF0F0F0FFF5A5A5AFF
+        4B975BFF37CF53FF4C4C4CFF474747FF434343FF3E3E3EFF393939FF343434FF
+        303030FF2B2B2BFF262626FF222222FF075F07FF0B440BFF131313FF5F5F5FFF
+        539F66FF42DA64FF4E6152FF4C4C4CFF474747FF434343FF3E3E3EFF393939FF
+        343434FF1E521EFF155915FF096A09FF007B00FF0E490EFF181818FF636363BF
+        5D8368FF4DE675FF42DA64FF39C853FF3A9048FF474747FF434343FF3E3E3EFF
+        393939FF1B631BFF008C00FF008600FF008100FF124912FF1D1D1DFF6868688F
+        646464FF59E884FF4DE675FF42DA64FF3AC054FF46634BFF474747FF434343FF
+        374A38FF137B13FF009200FF008C00FF008600FF213221FF222222AF6A6A6A1F
+        686868FF63A679FF59F187FF4DE675FF42DA64FF37CF53FF2BC442FF20B830FF
+        14AD1FFF09A20EFF019801FF009200FF146414FF2B2B2BFF2727273F00000000
+        6A6A6A8F686868FF63C283FF59F187FF4DE675FF42DA64FF37CF53FF2BC442FF
+        20B830FF14AD1FFF09A20EFF0B860CFF313A31FF303030BF0000000000000000
+        000000006A6A6AAF686868FF63A679FF59E884FF4DE675FF42DA64FF37CF53FF
+        2BC442FF22B132FF2B7830FF3E3E3EFF393939CF3535350F0000000000000000
+        00000000000000006A6A6A8F686868FF646464FF5D8368FF539F66FF4B975BFF
+        487851FF4A534BFF474747FF424242AF3E3E3E0F000000000000000000000000
+        0000000000000000000000006A6A6A1F6868688F636363BF5F5F5FFF5A5A5AFF
+        555555CF5050509F4B4B4B3F00000000000000000000000000000000F00F0000
+        C003000080010000800100000000000000000000000000000000000000000000
+        00000000000000000000000080010000C0010000E0030000F00F0000}
+    end
+    inherited Label1: TLabel
+      Width = 232
+      Caption = 'New Data Abstract Server Project Wizard'
+    end
+    inherited Label2: TLabel
+      Width = 483
+      Caption = 
+        'This wizard will guide you through the configuration of your Dat' +
+        'a Abstract client and server projects.'
+    end
+  end
+  inherited pc_Pages: TPageControl
+    Width = 569
+    Height = 214
+    ActivePage = ts_SM
+    inherited ts_Welcome: TTabSheet
+      inherited Label3: TLabel
+        Width = 324
+        Caption = 'Welcome to the New Data Abstract Server Project Wizard'
+      end
+      inherited Label4: TLabel
+        Width = 483
+        Caption = 
+          'This wizard will guide you through the configuration of your Dat' +
+          'a Abstract client and server projects.'
+      end
+      object Label7: TLabel
+        Left = 24
+        Top = 56
+        Width = 332
+        Height = 13
+        Caption = 
+          'To complete this task, the wizard will run through the following' +
+          ' steps:'
+      end
+      object Label8: TLabel
+        Left = 32
+        Top = 72
+        Width = 256
+        Height = 13
+        Caption = '- Launch Schema Modeler and configure your Schema'
+      end
+      object Label9: TLabel
+        Left = 32
+        Top = 88
+        Width = 198
+        Height = 13
+        Caption = '- Build and launch your Server application'
+      end
+      object Label10: TLabel
+        Left = 32
+        Top = 104
+        Width = 161
+        Height = 13
+        Caption = '- Add Data Tables to your project'
+      end
+    end
+    object ts_SM: TTabSheet [1]
+      Caption = 'ts_SM'
+      ImageIndex = 2
+      object Label11: TLabel
+        Left = 8
+        Top = 8
+        Width = 371
+        Height = 13
+        Caption = 'Step 1: Run Schema Modeler to define and configure your Schema'
+        Font.Charset = DEFAULT_CHARSET
+        Font.Color = clWindowText
+        Font.Height = -11
+        Font.Name = 'Tahoma'
+        Font.Style = [fsBold]
+        ParentFont = False
+      end
+      object Label12: TLabel
+        Left = 24
+        Top = 24
+        Width = 381
+        Height = 13
+        Caption = 
+          'As the first step, the wizard will launch Schema Modeler to defi' +
+          'ne your Schema.'
+      end
+      object Label13: TLabel
+        Left = 24
+        Top = 56
+        Width = 448
+        Height = 26
+        Caption = 
+          'The Schema Modeler provides a very easy visual interface for man' +
+          'aging the connections and datasets available on the server and w' +
+          'hich of those are accessible by clients.'
+        WordWrap = True
+      end
+      object lbl_SMLaunching: TLabel
+        Left = 24
+        Top = 104
+        Width = 506
+        Height = 13
+        Caption = 
+          'Please follow steps in Schema Modeler and close the modeler to c' +
+          'ontinue with this wizard.'
+        Font.Charset = DEFAULT_CHARSET
+        Font.Color = clWindowText
+        Font.Height = -11
+        Font.Name = 'Tahoma'
+        Font.Style = [fsBold]
+        ParentFont = False
+        Transparent = True
+        Visible = False
+      end
+      object Label15: TLabel
+        Left = 8
+        Top = 175
+        Width = 497
+        Height = 13
+        Caption = 
+          'Tip: You can always launch Schema Modeler again by simply double' +
+          '-clicking the TDASchema component.'
+      end
+      object lbl_SMClickNext: TLabel
+        Left = 24
+        Top = 104
+        Width = 229
+        Height = 13
+        Caption = 'Click "Next >>" now to launch Schema Modeler.'
+        Transparent = True
+      end
+    end
+    object ts_Compile: TTabSheet [2]
+      Caption = 'ts_Compile'
+      ImageIndex = 3
+      object Label16: TLabel
+        Left = 8
+        Top = 8
+        Width = 290
+        Height = 13
+        Caption = 'Step 2: Compile and Launch Your Server Application'
+        Font.Charset = DEFAULT_CHARSET
+        Font.Color = clWindowText
+        Font.Height = -11
+        Font.Name = 'Tahoma'
+        Font.Style = [fsBold]
+        ParentFont = False
+      end
+      object Label17: TLabel
+        Left = 24
+        Top = 24
+        Width = 408
+        Height = 13
+        Caption = 
+          'As the second step, the wizard will now compile your server appl' +
+          'ication and launch it.'
+      end
+      object lbl_CompileBuilding: TLabel
+        Left = 24
+        Top = 104
+        Width = 124
+        Height = 13
+        Caption = 'Compiling Project(s)...'
+        Font.Charset = DEFAULT_CHARSET
+        Font.Color = clWindowText
+        Font.Height = -11
+        Font.Name = 'Tahoma'
+        Font.Style = [fsBold]
+        ParentFont = False
+        Transparent = True
+        Visible = False
+      end
+      object Label19: TLabel
+        Left = 24
+        Top = 56
+        Width = 441
+        Height = 26
+        Caption = 
+          'This will allow your client code to connect to the live server a' +
+          's you proceed to configure the client application.'
+        WordWrap = True
+      end
+      object lbl_CompileClickNext: TLabel
+        Left = 24
+        Top = 104
+        Width = 253
+        Height = 13
+        Caption = 'Click "Next >>" now to build and launch your server.'
+        Transparent = True
+      end
+      object lbl_CompileLaunching: TLabel
+        Left = 24
+        Top = 104
+        Width = 173
+        Height = 13
+        Caption = 'Launching Server Application...'
+        Font.Charset = DEFAULT_CHARSET
+        Font.Color = clWindowText
+        Font.Height = -11
+        Font.Name = 'Tahoma'
+        Font.Style = [fsBold]
+        ParentFont = False
+        Transparent = True
+        Visible = False
+      end
+    end
+    object ts_DataTables: TTabSheet [3]
+      Caption = 'ts_DataTables'
+      ImageIndex = 4
+      object Label18: TLabel
+        Left = 8
+        Top = 8
+        Width = 300
+        Height = 13
+        Caption = 'Step 3: Create Data Tables components for your data'
+        Font.Charset = DEFAULT_CHARSET
+        Font.Color = clWindowText
+        Font.Height = -11
+        Font.Name = 'Tahoma'
+        Font.Style = [fsBold]
+        ParentFont = False
+      end
+      object Label20: TLabel
+        Left = 24
+        Top = 24
+        Width = 485
+        Height = 26
+        Caption = 
+          'Finally, the wizard will launch the Create Data Tables dialog, w' +
+          'hich wll allow you to add one ore more TDADataTable components t' +
+          'o your client project to access your data.'
+        WordWrap = True
+      end
+      object Label21: TLabel
+        Left = 8
+        Top = 175
+        Width = 533
+        Height = 13
+        Caption = 
+          'Tip: You can invoke this dialog again by right-clicking the Remo' +
+          'teDataAdapter component on your data module.'
+      end
+      object lbl_DataTableClickNext: TLabel
+        Left = 24
+        Top = 104
+        Width = 171
+        Height = 13
+        Caption = 'Click "Next >>" to launch the dialog'
+      end
+    end
+    object ts_FinishMulti: TTabSheet [4]
+      Caption = 'ts_FinishMulti'
+      ImageIndex = 5
+      object Label30: TLabel
+        Left = 24
+        Top = 175
+        Width = 342
+        Height = 13
+        Caption = 
+          'Also make sure to check our articles and FAQ on the web for more' +
+          ' info:'
+      end
+      object Label31: TLabel
+        Left = 370
+        Top = 175
+        Width = 153
+        Height = 13
+        Cursor = crHandPoint
+        Caption = 'http://www.remobjects.com?da'
+        Font.Charset = DEFAULT_CHARSET
+        Font.Color = clBlue
+        Font.Height = -11
+        Font.Name = 'Tahoma'
+        Font.Style = [fsUnderline]
+        ParentFont = False
+        OnClick = lb_LinkClick
+      end
+      object Label22: TLabel
+        Left = 8
+        Top = 8
+        Width = 49
+        Height = 13
+        Caption = 'That'#39's it!'
+        Font.Charset = DEFAULT_CHARSET
+        Font.Color = clWindowText
+        Font.Height = -11
+        Font.Name = 'Tahoma'
+        Font.Style = [fsBold]
+        ParentFont = False
+      end
+      object Label23: TLabel
+        Left = 24
+        Top = 24
+        Width = 503
+        Height = 26
+        Caption = 
+          'You'#39're now ready to build your client application according to t' +
+          'he standard Delphi TDataSet practices you are used to.'
+        WordWrap = True
+      end
+      object Label24: TLabel
+        Left = 24
+        Top = 56
+        Width = 490
+        Height = 26
+        Caption = 
+          'For example, you could drop a DataGrid orother data-aware compon' +
+          'ents on your Main form and hook them up to the Data Tables that ' +
+          'you created in the previous step.'
+        WordWrap = True
+      end
+    end
+    object ts_FinishServer: TTabSheet [5]
+      Caption = 'ts_FinishServer'
+      ImageIndex = 6
+      object Label25: TLabel
+        Left = 8
+        Top = 8
+        Width = 49
+        Height = 13
+        Caption = 'That'#39's it!'
+        Font.Charset = DEFAULT_CHARSET
+        Font.Color = clWindowText
+        Font.Height = -11
+        Font.Name = 'Tahoma'
+        Font.Style = [fsBold]
+        ParentFont = False
+      end
+      object Label26: TLabel
+        Left = 24
+        Top = 24
+        Width = 248
+        Height = 13
+        Caption = 'Your Data Abstract server application is now ready.'
+        WordWrap = True
+      end
+      object Label28: TLabel
+        Left = 24
+        Top = 175
+        Width = 342
+        Height = 13
+        Caption = 
+          'Also make sure to check our articles and FAQ on the web for more' +
+          ' info:'
+      end
+      object lb_Link: TLabel
+        Left = 370
+        Top = 175
+        Width = 153
+        Height = 13
+        Cursor = crHandPoint
+        Caption = 'http://www.remobjects.com?da'
+        Font.Charset = DEFAULT_CHARSET
+        Font.Color = clBlue
+        Font.Height = -11
+        Font.Name = 'Tahoma'
+        Font.Style = [fsUnderline]
+        ParentFont = False
+        OnClick = lb_LinkClick
+      end
+    end
+  end
+  inherited Panel2: TPanel
+    Top = 258
+    Width = 569
+    inherited btn_Finish: TBitBtn
+      Left = 489
+    end
+    inherited btn_Cancel: TBitBtn
+      Caption = 'Close'
+    end
+    inherited btn_Next: TBitBtn
+      Left = 489
+    end
+    inherited btn_Back: TBitBtn
+      Left = 409
+      Visible = False
+    end
+  end
+end
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAGuideWizardForm.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAGuideWizardForm.pas
new file mode 100644
index 0000000..d8f1b4c
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAGuideWizardForm.pas	
@@ -0,0 +1,257 @@
+unit uDAGuideWizardForm;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - IDE Library                                        }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+interface
+
+uses
+  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
+  Dialogs, uROIDEPrjWizard, uEWWizard, StdCtrls, Buttons, ComCtrls,
+  ExtCtrls;
+
+type
+  TDAGuideWizardForm = class(TEWWizardForm)
+    Label7: TLabel;
+    Label8: TLabel;
+    Label9: TLabel;
+    Label10: TLabel;
+    ts_SM: TTabSheet;
+    ts_Compile: TTabSheet;
+    ts_DataTables: TTabSheet;
+    Label11: TLabel;
+    Label12: TLabel;
+    Label13: TLabel;
+    lbl_SMLaunching: TLabel;
+    Label15: TLabel;
+    Label16: TLabel;
+    Label17: TLabel;
+    lbl_CompileBuilding: TLabel;
+    Label19: TLabel;
+    lbl_CompileClickNext: TLabel;
+    lbl_CompileLaunching: TLabel;
+    Label18: TLabel;
+    Label20: TLabel;
+    Label21: TLabel;
+    lbl_DataTableClickNext: TLabel;
+    ts_FinishMulti: TTabSheet;
+    ts_FinishServer: TTabSheet;
+    Label25: TLabel;
+    Label26: TLabel;
+    Label28: TLabel;
+    lb_Link: TLabel;
+    Label30: TLabel;
+    Label31: TLabel;
+    Label22: TLabel;
+    Label23: TLabel;
+    Label24: TLabel;
+    lbl_SMClickNext: TLabel;
+    procedure lb_LinkClick(Sender: TObject);
+  private
+    fNewProjectInfo: TROIDENewProjectInfo;
+    fTempSchema, fTempConnections: string;
+  protected
+    procedure OnEnterPage(aPage:TTabSheet; aMovingForward:boolean); override;
+    procedure OnLeavePage(aPage:TTabSheet; aMovingForward:boolean); override;
+  public
+    constructor Create(aNewProjectInfo: TROIDENewProjectInfo); reintroduce;
+    destructor Destroy; override;
+  end;
+
+var
+  DAGuideWizardForm: TDAGuideWizardForm;
+
+implementation
+
+uses
+  ShellAPI,
+  uROIDETools, ToolsAPI, uROClasses, uDAIDEMenu, uDAClasses, uDAInterfaces,
+  uDAEngine, uDADataTableWizards, uDADataTable;
+
+procedure OnNewProject(aNewProjectInfo: TROIDENewProjectInfo);
+begin
+  if Pos('DAGuideWizard', aNewProjectInfo.Wizard) <> 1 then exit;
+
+  //ShowMessage(Uppercase(aNewProjectInfo.TemplateName));
+  if not assigned(aNewProjectInfo.ClientProject) and (Uppercase(aNewProjectInfo.TemplateName) = 'LOCAL') then
+    aNewProjectInfo.ClientProject := aNewProjectInfo.ServerProject;
+
+  with TDAGuideWizardForm.Create(aNewProjectInfo) do try
+    ShowModal();
+  finally
+    Free;
+  end;
+end;
+
+{$R *.dfm}
+
+{ TTDAGuideWizardForm }
+
+constructor TDAGuideWizardForm.Create(aNewProjectInfo: TROIDENewProjectInfo);
+begin
+  inherited Create(Application);
+  fNewProjectInfo := aNewProjectInfo;
+  fTempSchema := IncludeTrailingPathDelimiter(fNewProjectInfo.ProjectOptions.ProjectDir)+NewGuidAsString()+'.daSchema';
+  fTempConnections := ChangeFileExt(fTempSchema, '.daConnections');
+end;
+
+destructor TDAGuideWizardForm.Destroy;
+begin
+  if FileExists(fTempSchema) then DeleteFile(fTempSchema);
+  if FileExists(fTempConnections) then DeleteFile(fTempConnections);
+  inherited;
+end;
+
+procedure TDAGuideWizardForm.lb_LinkClick(Sender: TObject);
+begin
+  inherited;
+  ShellExecute(0, 'open', 'http://www.remobjects.com?da',nil, nil,SW_SHOWNORMAL);
+end;
+
+procedure TDAGuideWizardForm.OnEnterPage(aPage: TTabSheet; aMovingForward: boolean);
+begin
+  inherited;
+  btn_Back.Enabled := false;
+  btn_Cancel.Visible := (aPage <> ts_FinishMulti) and (aPage <> ts_FinishServer);
+  btn_Next.Visible := btn_Cancel.Visible;
+  btn_Finish.Visible := not btn_Next.Visible;
+  SetForegroundWindow(Self.Handle);
+end;
+
+function FindFormEditor(aModule: IOTAModule): IOTAFormEditor;
+var
+  i: integer;
+  lEditor: IOTAEditor;
+begin
+  for i := 0 to aModule.ModuleFileCount-1 do begin
+    lEditor := aModule.ModuleFileEditors[i];
+    if Supports(lEditor, IOTAFormEditor, result) then exit;
+  end;
+end;
+
+function FindFormInProject(aProject: IOTAProject; aName: string): IOTAFormEditor;
+var
+  i: integer;
+  lModule: IOTAModule;
+begin
+  for i := 0 to aProject.GetModuleCount-1 do begin
+    if aProject.GetModule(i).Name = aName then begin
+      lModule := aProject.GetModule(i).OpenModule();
+      result := FindFormEditor(lModule);
+      exit;
+    end
+  end;
+  raise Exception.Create('Could not locate '+aName+' module in project.');
+end;
+
+function FindComponentOnForm(aForm: IOTAFormEditor; aName: string): TComponent;
+var
+  lOTAComponent: IOTAComponent;
+begin
+  lOTAComponent := aForm.FindComponent(aName);
+  if not assigned(lOTAComponent) then
+    raise Exception.Create('Could not locate '+aName+' component.');
+
+  result := (lOTAComponent as INTAComponent).GetComponent();
+end;
+
+
+procedure TDAGuideWizardForm.OnLeavePage(aPage: TTabSheet; aMovingForward: boolean);
+var
+  lSMParams: string;
+  lServerDM, lService, lClientDM: IOTAFormEditor;
+
+  lConnectionManager: TDAConnectionManager;
+  lSchema: TDASchema;
+  lRemoteDataAdapter: TDABaseRemoteDataAdapter;
+begin
+  inherited;
+  try
+
+    if (aPage = ts_SM) and aMovingForward then begin
+
+      lbl_SMClickNext.Visible := false;
+      lbl_SMLaunching.Visible := true;
+      btn_Next.Enabled := false;
+      Application.ProcessMessages();
+
+      // locate forms & components
+      lServerDM := FindFormInProject(fNewProjectInfo.ServerProject, 'fServerDataModule');
+      lService := FindFormInProject(fNewProjectInfo.ServerProject, fNewProjectInfo.ProjectOptions.ServiceName+'_Impl');
+      lConnectionManager := FindComponentOnForm(lServerDM, 'ConnectionManager') as TDAConnectionManager;
+      lSchema := FindComponentOnForm(lService, 'Schema') as TDASchema;
+
+      // edit in SM
+      lConnectionManager.SaveToFile(fTempConnections);
+      lSchema.SaveToFile(fTempSchema);
+      lSMParams := Format('/ns /autosave /projectname:"%s" /schemafile:"%s" /connectionsfile:"%s" /platform:Delphi /schemawizard', [fNewProjectInfo.ProjectOptions.ProjectName, fTempSchema, fTempConnections]);
+
+      LaunchSchemaModeler(fNewProjectInfo.ProjectOptions.ProjectName, lSMParams, true);
+      lConnectionManager.LoadFromFile(fTempConnections);
+      lSchema.LoadFromFile(fTempSchema);
+      lServerDM.MarkModified();
+      lService.MarkModified();
+
+      if not assigned(fNewProjectInfo.ClientProject) then
+        NextPage := ts_FinishServer.PageIndex;
+      //else if DAPackage.Package.DTE.Solution.Projects.Count > 2 then
+        //fNextPage := pc_Pages.Pages.IndexOf(ts_FinishMultiProject);
+
+      btn_Next.Enabled := true;
+    end
+    else if (aPage = ts_Compile) and aMovingForward then begin
+
+      lbl_CompileClickNext.Visible := false;
+      lbl_CompileBuilding.Visible := true;
+      btn_Next.Enabled := false;
+      Application.ProcessMessages();
+
+      if not fNewProjectInfo.ServerProject.ProjectBuilder.BuildProject(cmOTAMake, true, true) then
+        raise Exception.Create('Failed to compile server project; please check error messages.');
+
+      lbl_CompileLaunching.Visible := true;
+      Application.ProcessMessages();
+      ShellExecute(0, 'open', pchar(GetProjectExe(fNewProjectInfo.ServerProject)), nil, nil, SW_SHOWNORMAL);
+
+      btn_Next.Enabled := false;
+    end
+    else if (aPage = ts_DataTables) and aMovingForward then begin
+
+      lbl_DataTableClickNext.Visible := false;
+      Application.ProcessMessages();
+
+      // locate forms & components
+      lClientDM := FindFormInProject(fNewProjectInfo.ClientProject, 'fClientDataModule');
+      lRemoteDataAdapter := FindComponentOnForm(lClientDM, 'RemoteDataAdapter') as TDABaseRemoteDataAdapter;
+      lService := FindFormInProject(fNewProjectInfo.ServerProject, fNewProjectInfo.ProjectOptions.ServiceName+'_Impl');
+      lSchema := FindComponentOnForm(lService, 'Schema') as TDASchema;
+
+      // create DTs
+      lClientDM.Show();
+      TDataTableWizards.CreateDataTables(lClientDM, lRemoteDataAdapter, lSchema, Point(80,8));
+      lClientDM.MarkModified();
+
+    end;
+
+  except
+    Visible := false;
+    ModalResult := mrCancel;
+    raise;
+  end;
+
+end;
+
+initialization
+  RegisterGuideWizard(@OnNewProject);
+finalization
+  UnregisterGuideWizard(@OnNewProject);
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAIDEData.dfm b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAIDEData.dfm
new file mode 100644
index 0000000..ad06737
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAIDEData.dfm	
@@ -0,0 +1,170 @@
+object DAIdeData: TDAIdeData
+  OldCreateOrder = False
+  Left = 586
+  Top = 308
+  Height = 150
+  Width = 215
+  object iml_Actions: TImageList
+    Left = 32
+    Top = 8
+    Bitmap = {
+      494C010101000400040010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
+      0000000000003600000028000000400000001000000001002000000000000010
+      000000000000000000000000000000000000FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF00686868002B2B2B0018181800131313000F0F0F0057575700FF00
+      FF00FF00FF00FF00FF00FF00FF00FF00FF000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000FF00FF00FF00FF00FF00FF007070
+      70002B2B2B0021322100124912000E490E000B440B000A390A000C190C000F0F
+      0F0034343400FF00FF00FF00FF00FF00FF000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000FF00FF00FF00FF005E5E5E003434
+      3400343434002132210018481800066A06000075000000750000066A0600044A
+      04000F0F0F0013131300FF00FF00FF00FF000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000FF00FF007D7D7D003E3E3E003E3E
+      3E0034343400303030002B2B2B0014531400007B0000066A0600113311000C19
+      0C000E140E000F0F0F0034343400FF00FF000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000FF00FF00474747002E7133003E3E
+      3E003434340034343400343434002B2B2B00213221001B321B00181818001818
+      180013131300092F09000F0F0F00FF00FF000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000919191004A534B0022B132004747
+      47003E3E3E003E3E3E00343434002B2B2B002B2B2B0026262600262626001818
+      180018181800055405000E140E00575757000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000707070004A7050002BC442004747
+      4700474747003E3E3E003434340034343400343434002B2B2B00262626002626
+      260018181800075F07000A390A000F0F0F000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000005E5E5E004B975B0037CF53004C4C
+      4C0047474700474747003E3E3E003E3E3E00343434002B2B2B002B2B2B002626
+      260026262600075F07000B440B00131313000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000005E5E5E00539F660042DA64004E61
+      52004C4C4C0047474700474747003E3E3E0034343400343434001E521E001559
+      1500096A0900007B00000E490E00181818000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000008A8A8A005D8368004DE6750042DA
+      640039C853003A904800474747003E3E3E003E3E3E003E3E3E001B631B00008C
+      0000008600000086000012491200181818000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000FF00FF006868680059E884004DE6
+      750042DA64003AC0540046634B004747470047474700374A3800137B13000092
+      0000008C00000086000021322100686868000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000FF00FF006868680063A6790059F1
+      87004DE6750042DA640037CF53002BC4420020B8300014AD1F0009A20E000092
+      000000920000146414002B2B2B00FF00FF000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000FF00FF00FF00FF006868680063C2
+      830059F187004DE6750042DA640037CF53002BC4420020B8300014AD1F0009A2
+      0E000B860C00313A310068686800FF00FF000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000FF00FF00FF00FF00989898006868
+      680063A6790059E884004DE6750042DA640037CF53002BC4420022B132002B78
+      30003E3E3E005E5E5E00FF00FF00FF00FF000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000FF00FF00FF00FF00FF00FF00FF00
+      FF0068686800686868005D836800539F66004B975B00487851004A534B004747
+      47007D7D7D00FF00FF00FF00FF00FF00FF000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF008A8A8A00636363005A5A5A005A5A5A00575757008A8A8A00FF00
+      FF00FF00FF00FF00FF00FF00FF00FF00FF000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000424D3E000000000000003E000000
+      2800000040000000100000000100010000000000800000000000000000000000
+      000000000000000000000000FFFFFF0000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000}
+  end
+  object dlg_OpenBriefcase: TOpenDialog
+    DefaultExt = '.daBriefcase'
+    Filter = 
+      'Briefcase files (*.daBriefcase)|*.daBriefcase|All files (*.*)|*.' +
+      '*'
+    FilterIndex = 0
+    Title = 'Load Data from Briefcase File'
+    Left = 112
+    Top = 8
+  end
+  object dlg_SaveBriefcase: TSaveDialog
+    DefaultExt = '.daBriefcase'
+    Filter = 
+      'Briefcase files (*.daBriefcase)|*.daBriefcase|All files (*.*)|*.' +
+      '*'
+    FilterIndex = 0
+    Title = 'Save Data as Briefcase File'
+    Left = 112
+    Top = 56
+  end
+end
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAIDEData.lfm b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAIDEData.lfm
new file mode 100644
index 0000000..7c1bd08
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAIDEData.lfm	
@@ -0,0 +1,64 @@
+object DAIdeData: TDAIdeData
+  left = 586
+  top = 308
+  Height = 150
+  HorizontalOffset = 218
+  VerticalOffset = 192
+  Width = 215
+  object iml_Actions: TImageList
+    BkColor = clForeground
+    left = 32
+    top = 8
+    Bitmap = {
+      4C69010000001000000010000000FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFF8A8A8AFF636363FF5A5A5AFF5A5A5AFF575757FF8A8A8AFFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF6868
+      68FF686868FF5D8368FF539F66FF4B975BFF487851FF4A534BFF474747FF7D7D
+      7DFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF989898FF686868FF63A6
+      79FF59E884FF4DE675FF42DA64FF37CF53FF2BC442FF22B132FF2B7830FF3E3E
+      3EFF5E5E5EFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF686868FF63C283FF59F1
+      87FF4DE675FF42DA64FF37CF53FF2BC442FF20B830FF14AD1FFF09A20EFF0B86
+      0CFF313A31FF686868FFFF00FFFFFF00FFFF686868FF63A679FF59F187FF4DE6
+      75FF42DA64FF37CF53FF2BC442FF20B830FF14AD1FFF09A20EFF009200FF0092
+      00FF146414FF2B2B2BFFFF00FFFFFF00FFFF686868FF59E884FF4DE675FF42DA
+      64FF3AC054FF46634BFF474747FF474747FF374A38FF137B13FF009200FF008C
+      00FF008600FF213221FF686868FF8A8A8AFF5D8368FF4DE675FF42DA64FF39C8
+      53FF3A9048FF474747FF3E3E3EFF3E3E3EFF3E3E3EFF1B631BFF008C00FF0086
+      00FF008600FF124912FF181818FF5E5E5EFF539F66FF42DA64FF4E6152FF4C4C
+      4CFF474747FF474747FF3E3E3EFF343434FF343434FF1E521EFF155915FF096A
+      09FF007B00FF0E490EFF181818FF5E5E5EFF4B975BFF37CF53FF4C4C4CFF4747
+      47FF474747FF3E3E3EFF3E3E3EFF343434FF2B2B2BFF2B2B2BFF262626FF2626
+      26FF075F07FF0B440BFF131313FF707070FF4A7050FF2BC442FF474747FF4747
+      47FF3E3E3EFF343434FF343434FF343434FF2B2B2BFF262626FF262626FF1818
+      18FF075F07FF0A390AFF0F0F0FFF919191FF4A534BFF22B132FF474747FF3E3E
+      3EFF3E3E3EFF343434FF2B2B2BFF2B2B2BFF262626FF262626FF181818FF1818
+      18FF055405FF0E140EFF575757FFFF00FFFF474747FF2E7133FF3E3E3EFF3434
+      34FF343434FF343434FF2B2B2BFF213221FF1B321BFF181818FF181818FF1313
+      13FF092F09FF0F0F0FFFFF00FFFFFF00FFFF7D7D7DFF3E3E3EFF3E3E3EFF3434
+      34FF303030FF2B2B2BFF145314FF007B00FF066A06FF113311FF0C190CFF0E14
+      0EFF0F0F0FFF343434FFFF00FFFFFF00FFFFFF00FFFF5E5E5EFF343434FF3434
+      34FF213221FF184818FF066A06FF007500FF007500FF066A06FF044A04FF0F0F
+      0FFF131313FFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF707070FF2B2B
+      2BFF213221FF124912FF0E490EFF0B440BFF0A390AFF0C190CFF0F0F0FFF3434
+      34FFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFF686868FF2B2B2BFF181818FF131313FF0F0F0FFF575757FFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFF
+    }
+  end
+  object dlg_OpenBriefcase: TOpenDialog
+    Title = 'Load Data from Briefcase File'
+    DefaultExt = '.daBriefcase'
+    Filter = 'Briefcase files (*.daBriefcase)|*.daBriefcase|All files (*.*)|*.*'
+    FilterIndex = 0
+    left = 112
+    top = 8
+  end
+  object dlg_SaveBriefcase: TSaveDialog
+    Title = 'Save Data as Briefcase File'
+    DefaultExt = '.daBriefcase'
+    Filter = 'Briefcase files (*.daBriefcase)|*.daBriefcase|All files (*.*)|*.*'
+    FilterIndex = 0
+    left = 112
+    top = 56
+  end
+end
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAIDEData.lrs b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAIDEData.lrs
new file mode 100644
index 0000000..0791927
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAIDEData.lrs	
@@ -0,0 +1,55 @@
+{ This is an automatically generated lazarus resource file }
+
+LazarusResources.Add('TDAIdeData','FORMDATA',[
+  'TPF0'#10'TDAIdeData'#9'DAIdeData'#4'left'#3'J'#2#3'top'#3'4'#1#6'Height'#3
+  +#150#0#16'HorizontalOffset'#3#218#0#14'VerticalOffset'#3#192#0#5'Width'#3#215
+  +#0#0#10'TImageList'#11'iml_Actions'#7'BkColor'#7#12'clForeground'#4'left'#2
+  +' '#3'top'#2#8#6'Bitmap'#10#14#4#0#0'Li'#1#0#0#0#16#0#0#0#16#0#0#0#255#0#255
+  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#138#138#138#255
+  +'ccc'#255'ZZZ'#255'ZZZ'#255'WWW'#255#138#138#138#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255'hhh'#255'hhh'#255']'#131'h'#255'S'#159'f'#255'K'
+  +#151'['#255'HxQ'#255'JSK'#255'GGG'#255'}}}'#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#255#255#152#152#152#255'hhh'#255'c'#166'y'
+  +#255'Y'#232#132#255'M'#230'u'#255'B'#218'd'#255'7'#207'S'#255'+'#196'B'#255
+  +'"'#177'2'#255'+x0'#255'>>>'#255'^^^'#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255'hhh'#255'c'#194#131#255'Y'#241#135#255'M'#230'u'#255
+  +'B'#218'd'#255'7'#207'S'#255'+'#196'B'#255' '#184'0'#255#20#173#31#255#9#162
+  +#14#255#11#134#12#255'1:1'#255'hhh'#255#255#0#255#255#255#0#255#255'hhh'#255
+  +'c'#166'y'#255'Y'#241#135#255'M'#230'u'#255'B'#218'd'#255'7'#207'S'#255'+'
+  +#196'B'#255' '#184'0'#255#20#173#31#255#9#162#14#255#0#146#0#255#0#146#0#255
+  +#20'd'#20#255'+++'#255#255#0#255#255#255#0#255#255'hhh'#255'Y'#232#132#255'M'
+  +#230'u'#255'B'#218'd'#255':'#192'T'#255'FcK'#255'GGG'#255'GGG'#255'7J8'#255
+  +#19'{'#19#255#0#146#0#255#0#140#0#255#0#134#0#255'!2!'#255'hhh'#255#138#138
+  +#138#255']'#131'h'#255'M'#230'u'#255'B'#218'd'#255'9'#200'S'#255':'#144'H'
+  +#255'GGG'#255'>>>'#255'>>>'#255'>>>'#255#27'c'#27#255#0#140#0#255#0#134#0#255
+  +#0#134#0#255#18'I'#18#255#24#24#24#255'^^^'#255'S'#159'f'#255'B'#218'd'#255
+  +'NaR'#255'LLL'#255'GGG'#255'GGG'#255'>>>'#255'444'#255'444'#255#30'R'#30#255
+  +#21'Y'#21#255#9'j'#9#255#0'{'#0#255#14'I'#14#255#24#24#24#255'^^^'#255'K'#151
+  +'['#255'7'#207'S'#255'LLL'#255'GGG'#255'GGG'#255'>>>'#255'>>>'#255'444'#255
+  +'+++'#255'+++'#255'&&&'#255'&&&'#255#7'_'#7#255#11'D'#11#255#19#19#19#255'pp'
+  +'p'#255'JpP'#255'+'#196'B'#255'GGG'#255'GGG'#255'>>>'#255'444'#255'444'#255
+  +'444'#255'+++'#255'&&&'#255'&&&'#255#24#24#24#255#7'_'#7#255#10'9'#10#255#15
+  +#15#15#255#145#145#145#255'JSK'#255'"'#177'2'#255'GGG'#255'>>>'#255'>>>'#255
+  +'444'#255'+++'#255'+++'#255'&&&'#255'&&&'#255#24#24#24#255#24#24#24#255#5'T'
+  +#5#255#14#20#14#255'WWW'#255#255#0#255#255'GGG'#255'.q3'#255'>>>'#255'444'
+  +#255'444'#255'444'#255'+++'#255'!2!'#255#27'2'#27#255#24#24#24#255#24#24#24
+  +#255#19#19#19#255#9'/'#9#255#15#15#15#255#255#0#255#255#255#0#255#255'}}}'
+  +#255'>>>'#255'>>>'#255'444'#255'000'#255'+++'#255#20'S'#20#255#0'{'#0#255#6
+  +'j'#6#255#17'3'#17#255#12#25#12#255#14#20#14#255#15#15#15#255'444'#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255'^^^'#255'444'#255'444'#255'!2!'#255#24
+  +'H'#24#255#6'j'#6#255#0'u'#0#255#0'u'#0#255#6'j'#6#255#4'J'#4#255#15#15#15
+  +#255#19#19#19#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255
+  +#0#255#255'ppp'#255'+++'#255'!2!'#255#18'I'#18#255#14'I'#14#255#11'D'#11#255
+  +#10'9'#10#255#12#25#12#255#15#15#15#255'444'#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255'hhh'#255'+++'#255#24#24#24#255#19#19#19#255#15#15#15#255'WWW'#255
+  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#0#0#11
+  +'TOpenDialog'#17'dlg_OpenBriefcase'#5'Title'#6#29'Load Data from Briefcase F'
+  +'ile'#10'DefaultExt'#6#12'.daBriefcase'#6'Filter'#6'ABriefcase files (*.daBr'
+  +'iefcase)|*.daBriefcase|All files (*.*)|*.*'#11'FilterIndex'#2#0#4'left'#2'p'
+  +#3'top'#2#8#0#0#11'TSaveDialog'#17'dlg_SaveBriefcase'#5'Title'#6#27'Save Dat'
+  +'a as Briefcase File'#10'DefaultExt'#6#12'.daBriefcase'#6'Filter'#6'ABriefca'
+  +'se files (*.daBriefcase)|*.daBriefcase|All files (*.*)|*.*'#11'FilterIndex'
+  +#2#0#4'left'#2'p'#3'top'#2'8'#0#0#0
+]);
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAIDEData.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAIDEData.pas
new file mode 100644
index 0000000..e0e5d05
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAIDEData.pas	
@@ -0,0 +1,54 @@
+unit uDAIDEData;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - IDE Library                                        }
+{                                                                            }
+{ compiler: Delphi 6 and up,                                                 }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFDEF MSWINDOWS}
+{$I ..\DataAbstract.inc}
+{$ELSE}
+{$I ../DataAbstract.inc}
+{$ENDIF}
+
+interface
+
+uses
+  {$IFDEF DELPHI5}Forms,{$ENDIF}
+  {$IFDEF FPC}LResources,{$ENDIF}
+  SysUtils, Classes, ImgList, Controls, Dialogs;
+
+
+type
+  TDAIdeData = class(TDataModule)
+    iml_Actions: TImageList;
+    dlg_OpenBriefcase: TOpenDialog;
+    dlg_SaveBriefcase: TSaveDialog;
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+const
+  ICON_REGENERATE = 1;
+  ICON_IMPORT     = 2;
+  ICON_MAKESERVER = 3;
+
+implementation
+{$IFNDEF FPC}
+{$R *.dfm}
+{$ENDIF FPC}
+
+{$IFDEF FPC}
+initialization
+  {$I uDAIDEData.lrs}
+{$ENDIF}
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAIDEMenu.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAIDEMenu.pas
new file mode 100644
index 0000000..f80c268
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAIDEMenu.pas	
@@ -0,0 +1,296 @@
+unit uDAIDEMenu;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - IDE Library
+{
+{ compiler: Delphi 6 and up, Kylix 3 and up
+{ platform: Win32, Linux
+{
+{ (c)opyright RemObjects Software. all rights reserved.
+{
+{ Using this code requires a valid license of the Data Abstract
+{ which can be obtained at http://www.remobjects.com.
+{----------------------------------------------------------------------------}
+
+{$IFDEF MSWINDOWS}
+{$I ..\DataAbstract.inc}
+{$ELSE}
+{$I ../DataAbstract.inc}
+{$ENDIF}
+
+interface
+
+uses Forms,
+     Classes, Windows, SysUtils,{$IFDEF DELPHI6UP}DesignEditors, DesignIntf, {$ELSE}
+     {$IFDEF LINUX}
+     DesignEditors, DesignIntf,
+     {$ELSE}
+     DsgnIntf,{$ENDIF}{$ENDIF}
+     ToolsApi, Menus, Contnrs, ComObj, Graphics;
+
+type
+  { TMenuItemInfo }
+  TMenuItemInfo = record
+    Caption,
+    ShortCut : string;
+    Menu:TMenuItem;
+    ImageIndex:integer;
+  end;
+
+const MAX_MENU_ITEM = 0;
+
+var
+  MenuItems : array[0..MAX_MENU_ITEM] of TMenuItemInfo = (
+    //(Caption: '-';               ShortCut: ''; Menu:nil; ImageIndex: -1),
+    (Caption: 'Schema &Modeler'; ShortCut: ''; Menu:nil; ImageIndex: 0)
+  );
+
+const
+  mi_SchemaModeler   = 0;
+
+type
+  { TDAMenuWizard }
+  TDAMenuWizard = class(TInterfacedObject, IOTAWizard, IOTANotifier)
+  private
+    fDAMenuItems : TList;
+
+  protected
+    { Misc }
+    procedure CreateMenuItems;
+    procedure LaunchSchemaModeler(Sender : TObject);
+    function FindROMenu : TMenuItem;
+
+    { IOTANotifier}
+    procedure AfterSave;
+    procedure BeforeSave;
+    procedure Destroyed;
+    procedure Execute;
+    procedure Modified;
+
+    { IOTAWizard }
+    function GetState: TWizardState;
+    function GetIDString: string;
+    function GetName: string;
+
+  public
+
+    constructor Create;
+    destructor Destroy; override;
+  end;
+
+function GetSchemaModelerPath: string;
+function GetDllPath: String;
+function GetBinDir: string;
+procedure LaunchSchemaModeler(const aProjectName, someParams : string; aWait: boolean=false);
+
+procedure Register;
+
+implementation
+
+uses ShellAPI, Controls, Registry, Dialogs,
+     uRODL, uROIDETools, uRODLToXML, uRODLToPascalIntf, uRODLGenTools,
+     uRORODLNotifier, uROPleaseWaitForm, uDAIDEData, fROAbout,
+     fCustomIDEMessagesForm, uROProductVersionInfo, uROClasses, uROIDEMenu;
+
+{$R Resources.BDS.res}
+
+procedure RegisterAboutInfo;
+const
+  lProductName = 'RemObjects Data Abstract ''Vinci'' for Delphi';
+begin
+  {$IFDEF BDS}
+  {$IFDEF BDS3}
+  SplashScreenServices.AddPluginBitmap(, LoadBitmap(HInstance, 'SPLASH2005'));
+  {$ELSE}
+    {$IFDEF BDS4}
+    SplashScreenServices.AddPluginBitmap(lProductName, LoadBitmap(HInstance, 'SPLASH2006'));
+    {$ELSE}
+    SplashScreenServices.AddPluginBitmap(lProductName, LoadBitmap(HInstance, 'SPLASH2007'));
+    {$ENDIF}
+  {$ENDIF}
+  (BorlandIDEServices as IOTAAboutBoxServices).AddPluginInfo(lProductName, lProductName+#13#10'Copyright RemObjects Software 2002-2008.'#13#10'All rights reserved.'#13#10'http://www.remobjects.com/da.', LoadBitmap(HInstance, 'ABOUT'));
+  {$ENDIF BDS}
+end;
+
+procedure Register;
+begin
+  RegisterAboutInfo();
+  RegisterPackageWizard(TDAMenuWizard.Create);
+end;
+
+{ TDAMenuWizard }
+
+constructor TDAMenuWizard.Create;
+begin
+  inherited Create;
+
+  fDAMenuItems := TList.Create;
+  CreateMenuItems;
+end;
+
+destructor TDAMenuWizard.Destroy;
+var romenu : TMenuItem;
+    i, x : integer;
+begin
+  romenu := FindROMenu;
+  if (romenu<>NIL) then begin
+    for i := (romenu.Count-1) downto 0 do begin
+      for x := (fDAMenuItems.Count-1) downto 0 do
+        if (romenu.Items[i]=fDAMenuItems[x]) then begin
+          TObject(fDAMenuItems[x]).Free;
+          Break;
+        end;
+    end;
+  end;
+  
+  fDAMenuItems.Free;
+end;
+
+function TDAMenuWizard.GetIDString: string;
+begin
+  Result := '{FE46996E-0AFA-4C8D-AF59-192F1D581FD1}'
+end;
+
+function TDAMenuWizard.GetName: string;
+begin
+  Result := 'DAMenuWizard';
+end;
+
+// The following are stubs that Delphi never calls.
+procedure TDAMenuWizard.AfterSave;
+begin
+end;
+
+procedure TDAMenuWizard.BeforeSave;
+begin
+end;
+
+procedure TDAMenuWizard.Destroyed;
+begin
+end;
+
+procedure TDAMenuWizard.Execute;
+begin
+end;
+
+function TDAMenuWizard.GetState: TWizardState;
+begin
+  Result := [];
+end;
+
+procedure TDAMenuWizard.Modified;
+begin
+end;
+
+function TDAMenuWizard.FindROMenu: TMenuItem;
+{var mainmenu : TMainMenu;
+    i : integer;}
+begin
+  result := gRemObjectsMenu;
+  {result := NIL;
+  mainmenu := (BorlandIDEServices as INTAServices).MainMenu;
+  for i := 0 to (mainmenu.Items.Count-1) do
+    if SameText('Rem&Objects', mainmenu.Items[i].Caption) then begin
+      result := mainmenu.Items[i];
+      Break;
+    end;}
+end;
+
+procedure TDAMenuWizard.CreateMenuItems;
+var romenu,
+    item     : TMenuItem;
+    i        : Integer;
+    lBitmap  : TBitmap;
+begin
+  romenu := FindROMenu;
+
+  if (romenu=NIL) then Exit;
+
+  with TDAIdeData.Create(nil) do try
+
+    lBitmap := TBitmap.Create();
+    try
+      for i := 0 to High(MenuItems) do begin
+        item := TMenuItem.Create(romenu);
+        item.Caption := MenuItems[i].Caption;
+        item.ShortCut := TextToShortCut(MenuItems[i].ShortCut);
+        item.Tag := i;
+
+        fDAMenuItems.Add(item);
+
+        if MenuItems[i].ImageIndex > -1 then begin
+          iml_Actions.GetBitmap(MenuItems[i].ImageIndex,lBitmap);
+          item.ImageIndex := (BorlandIDEServices as INTAServices).AddMasked(lBitmap, clFuchsia);
+        end;
+
+        MenuItems[i].Menu := item;
+
+        case i of
+          mi_SchemaModeler  : item.OnClick := LaunchSchemaModeler;
+          else item.OnClick := NIL;
+        end;
+
+        romenu.Insert(6+i, item);// Add(item);
+      end;
+    finally
+      lBitmap.Free();
+    end;
+
+  finally
+    Free();
+  end;
+end;
+
+function GetDllPath: String;
+var TheFileName : array[0..MAX_PATH] of char;
+begin
+  FillChar(TheFileName, SizeOf(TheFileName), #0);
+  {$IFDEF KYLIX}System.{$ENDIF}GetModuleFileName(hInstance, TheFileName, sizeof(TheFileName));
+  Result := ExtractFilePath(TheFileName);
+end;
+
+function GetBinDir: string;
+begin
+  // This function strips the "DCU\Dx" part of the path where the BPL is
+  result := ExtractFilePath(GetDllPath);
+{$IFDEF DELPHI10UP}
+ result := IncludeTrailingPathDelimiter(Copy(result,1,Length(result)-8))+'Bin\';
+{$ELSE}
+ result := IncludeTrailingBackslash(Copy(result,1,Length(result)-7))+'Bin\';
+{$ENDIF}
+end;
+
+function GetSchemaModelerPath: string;
+var reg: TRegIniFile;
+begin
+  reg := TRegIniFile.Create('Software\RemObjects\Data Abstract');
+  try
+    result := reg.ReadString('Schema Modeler', 'FullPath', GetBinDir+'DASchemaModeler.exe');
+  finally
+    reg.Free;
+  end;
+end;
+
+procedure LaunchSchemaModeler(const aProjectName, someParams : string; aWait: boolean=false);
+var exename : string;
+begin
+  exename := GetSchemaModelerPath;
+
+  if not FileExists(exename) then
+    MessageDlg(Format('Cannot find "%s"', [exename]), mtError, [mbOK], 0)
+  else begin
+    if aWait then begin
+      ExecuteAndWait(exename, someParams);
+    end
+    else begin
+      ShellExecute(0, 'open', PChar(exename), PChar(someParams), PChar(ExtractFilePath(aProjectName)), SW_NORMAL);
+    end;
+  end;
+end;
+
+procedure TDAMenuWizard.LaunchSchemaModeler(Sender: TObject);
+begin
+  uDAIDEMenu.LaunchSchemaModeler('', '/ns /platform:Delphi');
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAIDEMenu_laz.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAIDEMenu_laz.pas
new file mode 100644
index 0000000..780c606
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAIDEMenu_laz.pas	
@@ -0,0 +1,209 @@
+unit uDAIDEMenu_laz;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - IDE Library                                        }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFDEF MSWINDOWS}
+{$I ..\DataAbstract.inc}
+{$ELSE}
+{$I ../DataAbstract.inc}
+{$ENDIF}
+
+interface
+
+uses {$IFDEF MSWINDOWS}Windows,ComObj,{$ENDIF}
+     SysUtils,Classes,Forms,uEWMenuManager_laz,
+     Menus, Graphics;
+
+type
+  { TMenuItemInfo }
+  TMenuItemInfo = record
+    Caption,
+    ShortCut : string;
+    ImageIndex:integer;
+  end;
+
+const MAX_MENU_ITEM = 0;
+
+var
+  MenuItems : array[0..MAX_MENU_ITEM] of TMenuItemInfo = (
+    //(Caption: '-';               ShortCut: ''; Menu:nil; ImageIndex: -1),
+    (Caption: 'Schema &Modeler'; ShortCut: ''; ImageIndex: 0)
+  );
+
+const
+  mi_SchemaModeler   = 0;
+
+type
+  { TDAMenuWizard }
+  TDAMenuWizard = class
+  private
+  protected
+    { Misc }
+    procedure CreateMenuItems;
+    procedure LaunchSchemaModeler(Sender : TObject);
+    function FindROMenu : TEWMenu;
+    { IOTAWizard }
+    function GetIDString: string;
+    function GetName: string;
+  public
+    constructor Create;
+  end;
+
+function GetSchemaModelerPath: string;
+function GetDllPath: String;
+function GetBinDir: string;
+procedure LaunchSchemaModeler(const aProjectName, someParams : string; aWait: boolean=false);
+
+procedure Register;
+
+implementation
+
+uses Controls, Registry, Dialogs,uEWTools, IDECommands,
+     uRODL, uROIDETools_laz, uRODLGenTools,
+     uROPleaseWaitForm, uDAIDEData, fROAbout,
+     fCustomIDEMessagesForm, uROClasses, uROIDEMenu_laz;
+
+var
+  wiz: TDAMenuWizard = nil;
+
+procedure Register;
+begin
+{$IFDEF MSWINDOWS}
+  // DASM exists only for Windows
+  wiz:= TDAMenuWizard.Create;
+{$ENDIF}
+{$IFNDEF FPC}
+  RegisterPackageWizard(TDAMenuWizard.Create);
+{$ENDIF FPC}
+end;
+
+{ TDAMenuWizard }
+
+constructor TDAMenuWizard.Create;
+begin
+  inherited Create;
+  CreateMenuItems;
+end;
+
+
+function TDAMenuWizard.GetIDString: string;
+begin
+  Result := '{FE46996E-0AFA-4C8D-AF59-192F1D581FD1}'
+end;
+
+function TDAMenuWizard.GetName: string;
+begin
+  Result := 'DAMenuWizard';
+end;
+
+function TDAMenuWizard.FindROMenu: TEWMenu;
+begin
+  result := gRemObjectsMenu;
+end;
+
+procedure TDAMenuWizard.CreateMenuItems;
+var
+    romenu   : TEWMenu;
+    item     : TEWMenuItem;
+    i        : Integer;
+    lBitmap  : TBitmap;
+begin
+  romenu := FindROMenu;
+
+  if (romenu=NIL) then Exit;
+  with TDAIdeData.Create(nil) do try
+
+    lBitmap := TBitmap.Create();
+    try
+      for i := 0 to High(MenuItems) do begin
+        item := romenu.CreateMenuItem(MenuItems[i].Caption,-1,[pAny],False);
+         if MenuItems[i].ShortCut <> '' then
+            Item.Command := RegisterIDECommand(RoMenu.CommandCategory, Item.Caption,Item.Caption,TextToIDEShortCut(MenuItems[i].ShortCut));
+        item.Tag := i;
+        if MenuItems[i].ImageIndex > -1 then begin
+          iml_Actions.GetBitmap(MenuItems[i].ImageIndex,lBitmap);
+          if romenu.SubMenuImages <> nil then
+            item.ImageIndex := romenu.SubMenuImages.AddMasked(lBitmap, clFuchsia);
+        end;
+        case i of
+          mi_SchemaModeler  : item.OnClick := LaunchSchemaModeler;
+          else item.OnClick := NIL;
+        end;
+        romenu.Insert(6+i, item);
+      end;
+    finally
+      lBitmap.Free();
+    end;
+
+  finally
+    Free();
+  end;
+end;
+
+function GetDllPath: String;
+{$IFDEF MSWINDOWS}
+var TheFileName : array[0..MAX_PATH] of char;
+{$ENDIF}
+begin
+{$IFDEF MSWINDOWS}
+  TheFileName[0]:=#0;
+  FillChar(TheFileName, SizeOf(TheFileName), #0);
+  GetModuleFileName(hInstance, TheFileName, sizeof(TheFileName));
+  Result := ExtractFilePath(TheFileName);
+{$ELSE}
+  Result := '';
+{$ENDIF}
+end;
+
+function GetBinDir: string;
+begin
+  // This function strips the "DCU\Dx" part of the path where the BPL is
+  result := ExtractFilePath(GetDllPath);
+ result := IncludeTrailingBackslash(Copy(result,1,Length(result)-7))+'Bin\';
+end;
+
+function GetSchemaModelerPath: string;
+var reg: TRegIniFile;
+begin
+  reg := TRegIniFile.Create('Software\RemObjects\Data Abstract');
+  try
+    result := reg.ReadString('Schema Modeler', 'FullPath', GetBinDir+'DASchemaModeler.exe');
+  finally
+    reg.Free;
+  end;
+end;
+
+procedure LaunchSchemaModeler(const aProjectName, someParams : string; aWait: boolean=false);
+var exename : string;
+begin
+  exename := GetSchemaModelerPath;
+  if not FileExists(exename) then
+    MessageDlg(Format('Cannot find "%s"', [exename]), mtError, [mbOK], 0)
+  else begin
+    if aWait then begin
+      ExecuteAndWait(exename, someParams);
+    end
+    else begin
+      RO_ShellExecute(0, 'open', PChar(exename), PChar(someParams), PChar(ExtractFilePath(aProjectName)), SW_NORMAL);
+    end;
+  end;
+end;
+
+procedure TDAMenuWizard.LaunchSchemaModeler(Sender: TObject);
+begin
+  uDAIDEMenu_laz.LaunchSchemaModeler('', '/ns /platform:Delphi');
+end;
+
+finalization
+  if wiz <> nil then wiz.free;
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAIDERes.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAIDERes.pas
new file mode 100644
index 0000000..850aee9
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDAIDERes.pas	
@@ -0,0 +1,12 @@
+unit uDAIDERes;
+
+interface
+
+resourcestring
+  err_AssignRemoteService = 'Please assign a RemoteService, first.';
+  err_AssignRemoteServiceChannel = 'Please assign a Channel to the RemoteService, first.';
+  err_AssignRemoteServiceMessage = 'Please assign a Message to the RemoteService, first.';
+
+implementation
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDASchemaUnitsGenerator.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDASchemaUnitsGenerator.pas
new file mode 100644
index 0000000..4acf332
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDASchemaUnitsGenerator.pas	
@@ -0,0 +1,934 @@
+unit uDASchemaUnitsGenerator;
+
+{$IFDEF MSWINDOWS}
+{$I ..\DataAbstract.inc}
+{$ELSE}
+{$I ../DataAbstract.inc}
+{$ENDIF}
+
+interface
+
+// usage TBCD instead of Double for datDecimal 
+{.$DEFINE TREAT_DECIMAL_AS_TBCD}
+uses
+  Classes, uDAInterfaces, uDAClasses;
+
+
+     
+type
+  { TDASchemaCodeGenerator }
+  TDASchemaCodeGenerator = class(TStringList)
+  private
+    fSchema : TDASchema;
+    fFileName : string;
+
+  protected
+    procedure DoWriteCode; virtual; abstract;
+
+    property FileName : string read fFileName;
+    property Schema : TDASchema read fSchema;
+
+  public
+    constructor Create(aSchema : TDASchema);
+
+    procedure Write(const someText: string; Indentation: integer = 0); overload;
+    procedure WriteLines(const someText: string);
+    procedure WriteEmptyLine;
+
+    procedure WriteCode(const aFileName : string);
+  end;
+
+  { TClientUnitSchemaGenerator }
+  TClientUnitSchemaGenerator = class(TDASchemaCodeGenerator)
+  protected
+    procedure DoWriteCode; override;
+  end;
+
+  { TServerUnitSchemaGenerator }
+  TServerUnitSchemaGenerator = class(TDASchemaCodeGenerator)
+  private
+    fClientUnitName: string;
+
+  protected
+    procedure DoWriteCode; override;
+
+  public
+    property ClientUnitName : string read fClientUnitName write fClientUnitName;
+  end;
+
+procedure GenerateSchemaUnits(aSchema : TDASchema);
+function GetDAType(ad: TDADataType): string;
+{$IFDEF FPC}
+function PromptForFileName(var AFileName: string; const AFilter: string = '';
+  const ADefaultExt: string = ''; const ATitle: string = '';
+  const AInitialDir: string = ''; SaveDialog: Boolean = False): Boolean;
+{$ENDIF}
+implementation
+
+{$IFDEF FPC}
+  {$UNDEF TREAT_DECIMAL_AS_TBCD}
+{$ENDIF}
+
+uses
+  {$IFDEF FPC}ProjectIntf, uROIDETools_laz,uEWOTAHelpers_laz,{$ELSE}uROIDETools,{$ENDIF}
+   uRODLToPascal, SysUtils, Dialogs, uROTypes, uROClasses;
+
+{$IFDEF FPC}
+function PromptForFileName(var AFileName: string; const AFilter: string = '';
+  const ADefaultExt: string = ''; const ATitle: string = '';
+  const AInitialDir: string = ''; SaveDialog: Boolean = False): Boolean;
+var
+  Dialog: TOpenDialog;
+begin
+  if SaveDialog then
+  begin
+    Dialog := TSaveDialog.Create(nil);
+    Dialog.Options := Dialog.Options + [ofOverwritePrompt];
+  end
+  else
+    Dialog := TOpenDialog.Create(nil);
+  with Dialog do
+  try
+    Title := ATitle;
+    DefaultExt := ADefaultExt;
+    if AFilter = '' then
+      Filter := 'All files (*.*)|*.*' else
+      Filter := AFilter;
+    InitialDir := AInitialDir;
+    FileName := AFileName;
+    Result := Execute;
+    if Result then
+      AFileName := FileName;
+  finally
+    Free;
+  end;
+end;
+{$ENDIF}
+
+
+function GetDATypeMethod(ad: TDADataType): string;
+begin
+  case ad of
+    datAutoInc: Result := 'Integer';
+    datLargeAutoInc: Result := 'LargeInt';
+    datWideMemo: Result := 'WideString';
+    datSingleFloat: Result := 'Single';
+    {$IFNDEF TREAT_DECIMAL_AS_TBCD}
+    datDecimal: Result := 'Float';
+    {$ENDIF}
+  else
+    Result := DADataTypeNames[ad];
+  end;
+end;
+
+{ TDASchemaCodeGenerator }
+
+procedure TDASchemaCodeGenerator.Write(const someText: string; Indentation: integer = 0);
+var
+  i: integer;
+  s: string;
+begin
+  s := '';
+  for i := 1 to Indentation do s := s + ' ';
+  s := s + someText;
+  Add(s)
+end;
+
+procedure TDASchemaCodeGenerator.WriteLines(const someText: string);
+begin
+  Text := Text+someText;
+end;
+
+procedure TDASchemaCodeGenerator.WriteEmptyLine;
+begin
+  Add('');
+end;
+
+constructor TDASchemaCodeGenerator.Create(aSchema: TDASchema);
+begin
+  inherited Create;
+  fSchema := aSchema;
+end;
+
+procedure TDASchemaCodeGenerator.WriteCode(const aFileName: string);
+begin
+  fFileName := aFileName;
+
+  Clear;
+  DoWriteCode;
+  SaveToFile(aFileName);
+end;
+
+{ Misc }
+procedure GenerateSchemaUnits(aSchema : TDASchema);
+var clienttargetfilename,
+    servertargetfilename : string;
+{$IFDEF FPC}
+    lfile: TLazProjectFile;
+{$ENDIF}
+begin
+  clienttargetfilename := IncludeTrailingPathDelimiter(ModuleDir(CurrentProject))+aSchema.Name+'Client_Intf.pas';
+  if PromptForFileName(clienttargetfilename, 'Delphi unit (*.pas)|*.pas', '*.pas', 'Save '+aSchema.Name+' client access unit', '', TRUE) then begin
+
+    with TClientUnitSchemaGenerator.Create(aSchema) do try
+      WriteCode(clienttargetfilename);
+      {$IFDEF FPC}
+      lFile := CurrentProject.CreateProjectFile(clienttargetfilename);
+      CurrentProject.AddFile(lFile, False);
+      lFile.IsPartOfProject := True;
+      {$ELSE}
+      CurrentProject.AddFile(clienttargetfilename, TRUE);
+      {$ENDIF}
+    finally
+      Free;
+    end;
+
+  end;
+
+  servertargetfilename := IncludeTrailingPathDelimiter(ModuleDir(CurrentProject))+aSchema.Name+'Server_Intf.pas';
+  if PromptForFileName(servertargetfilename, 'Delphi unit (*.pas)|*.pas', '*.pas', 'Save '+aSchema.Name+' server access unit', '', TRUE) then begin
+    with TServerUnitSchemaGenerator.Create(aSchema) do try
+      ClientUnitName := ChangeFileExt(ExtractFileName(clienttargetfilename), '');
+
+      WriteCode(servertargetfilename);
+      {$IFDEF FPC}
+      lFile :=CurrentProject.CreateProjectFile(servertargetfilename);
+      CurrentProject.AddFile(lFile, False);
+      lFile.IsPartOfProject := True;
+      {$ELSE}
+      CurrentProject.AddFile(servertargetfilename, TRUE);
+      {$ENDIF}
+    finally
+      Free;
+    end;
+  end;
+end;
+
+function GenFindParams(aDataset : TDADataset; AddType, UsePrefix, UseComma : boolean) : string;
+var x : integer;
+begin
+  result := '';
+  with aDataset do begin
+    for x := 0 to (Fields.Count-1) do
+      if Fields[x].InPrimaryKey then begin
+        if UsePrefix then result := result+'a'+Fields[x].Name
+                     else result := result+Fields[x].Name;
+
+        if AddType
+          then result := result+': '+GetDAType(Fields[x].DataType);
+
+        if UseComma
+          then result := result+','
+          else result := result+'; ';
+      end;
+
+    if UseComma
+      then result := Copy(result, 1, Length(result)-1)
+      else result := Copy(result, 1, Length(result)-2);
+  end;
+end;
+
+function GetDAType(ad: TDADataType): string;
+begin
+  case ad of
+    datMemo: Result := 'IROStrings';
+    datBlob: Result := 'IROStream';
+    datAutoInc: Result := 'Integer';
+    datWideMemo: Result := 'WideString';
+    datLargeAutoInc: Result := 'Int64';
+    datGuid: result := 'TGuid';
+    datXml: result := 'IXmlNode';
+    datLargeUint: Result := 'UInt64';
+    datLargeInt: Result := 'Int64';
+    {$IFDEF TREAT_DECIMAL_AS_TBCD}
+    datDecimal: Result := 'TBcd';
+    {$ELSE}
+    datDecimal: Result := 'Double';
+    {$ENDIF}
+    datSingleFloat: Result := 'Single';
+  else
+    Result := DADataTypeNames[ad];
+  end;
+end;
+
+{ TClientUnitSchemaGenerator }
+
+procedure TClientUnitSchemaGenerator.DoWriteCode;
+var i, x : integer;
+    guid : TGUID;
+    guids : TStringList;
+    //s, s2 : string;
+    bVar: boolean;
+begin
+  guids := TStringList.Create;
+
+  with Schema do try
+    for i := 0 to (Datasets.Count-1) do begin
+      CreateGUID(guid);
+      guids.Add(GUIDToString(guid));
+    end;
+
+    Write(Format('unit %s;', [ChangeFileExt(ExtractFileName(FileName), '')]));
+    WriteEmptyLine;
+
+    Write('interface');
+    WriteEmptyLine;
+    Write('uses');
+    Write('  Classes, DB, SysUtils, uROClasses, uDAInterfaces, uDADataTable, FmtBCD, uROXMLIntf;');
+
+    // Data table GUIDs
+    WriteEmptyLine;
+    Write('const');
+    Write('{ Data table rules ids', PASCAL_INDENTATION_LEVEL_1);
+    Write('     Feel free to change them to something more human readable', PASCAL_INDENTATION_LEVEL_1);
+    Write('     but make sure they are unique in the context of your application }', PASCAL_INDENTATION_LEVEL_1);
+    for i := 0 to (Datasets.Count-1) do begin
+      Write(Format('RID_%s = ''%s'';', [MakeValidIdentifier(Datasets[i].Name), guids[i]]), PASCAL_INDENTATION_LEVEL_1);
+    end;
+
+    // Data table names
+    WriteEmptyLine;
+    Write('{ Data table names }', PASCAL_INDENTATION_LEVEL_1);
+    for i := 0 to (Datasets.Count-1) do begin
+      Write(Format('nme_%s = ''%s'';', [MakeValidIdentifier(Datasets[i].Name), Datasets[i].Name]), PASCAL_INDENTATION_LEVEL_1);
+    end;
+    WriteEmptyLine;
+
+    // Data table fields
+    for i := 0 to (Datasets.Count-1) do begin
+      Write(Format('{ %s fields }', [Datasets[i].Name]), PASCAL_INDENTATION_LEVEL_1);
+      for x := 0 to (Datasets[i].Fields.Count-1) do
+        Write(Format('fld_%s%s = ''%s'';', [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Fields[x].Name), Datasets[i].Fields[x].Name]), PASCAL_INDENTATION_LEVEL_1);
+      WriteEmptyLine;
+
+      Write(Format('{ %s field indexes }', [Datasets[i].Name]), PASCAL_INDENTATION_LEVEL_1);
+      for x := 0 to (Datasets[i].Fields.Count-1) do
+        Write(Format('idx_%s%s = %d;', [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Fields[x].Name), x]), PASCAL_INDENTATION_LEVEL_1);
+      WriteEmptyLine;
+    end;
+
+    Write('type');
+    for i := 0 to (Datasets.Count-1) do begin
+      if (Trim(Datasets[i].Description)<>'') then begin
+        Write('{', PASCAL_INDENTATION_LEVEL_1);
+        Write(Datasets[i].Description, PASCAL_INDENTATION_LEVEL_1);
+        Write('}', PASCAL_INDENTATION_LEVEL_1);
+      end;
+
+      // Base interface
+      CreateGUID(guid); // This interface is just for reference. People will use the others
+      Write(Format('{ I%s }', [MakeValidIdentifier(Datasets[i].Name)]), PASCAL_INDENTATION_LEVEL_1);
+      Write(Format('I%s = interface(IDAStronglyTypedDataTable)', [MakeValidIdentifier(Datasets[i].Name)]), PASCAL_INDENTATION_LEVEL_1);
+      Write(Format('[''%s'']', [GuidToString(guid)]), PASCAL_INDENTATION_LEVEL_1);
+
+      with Datasets[i] do begin
+        Write('{ Property getters and setters }', PASCAL_INDENTATION_LEVEL_2);
+        for x := 0 to (Fields.Count-1) do begin
+          Write(Format('function Get%sValue: %s;', [MakeValidIdentifier(Fields[x].Name), GetDAType(Fields[x].DataType)]), PASCAL_INDENTATION_LEVEL_2);
+          if not (Fields[x].DataType in [datMemo, datblob]) then
+            Write(Format('procedure Set%sValue(const aValue: %s);', [MakeValidIdentifier(Fields[x].Name), GetDAType(Fields[x].DataType)]), PASCAL_INDENTATION_LEVEL_2);
+          Write(Format('function Get%sIsNull: Boolean;', [MakeValidIdentifier(Fields[x].Name)]), PASCAL_INDENTATION_LEVEL_2);
+          Write(Format('procedure Set%sIsNull(const aValue: Boolean);', [MakeValidIdentifier(Fields[x].Name)]), PASCAL_INDENTATION_LEVEL_2);
+        end;
+
+        WriteEmptyLine;
+        {Write('// Methods', PASCAL_INDENTATION_LEVEL_2);
+
+        // Generates the Find method
+        s := GenFindParams(Datasets[i], TRUE, TRUE, FALSE);
+        if (s<>'') then Write(Format('function Find(%s; LocateOptions : TLocateOptions) : boolean;', [s]), PASCAL_INDENTATION_LEVEL_2);}
+
+        // Properties
+        WriteEmptyLine;
+        Write('{ Properties }', PASCAL_INDENTATION_LEVEL_2);
+        for x := 0 to (Fields.Count-1) do
+        begin
+          if Fields[x].DataType in [datMemo, datBlob] then
+            Write(Format('property %s: %s read Get%sValue;',
+              [MakeValidIdentifier(Fields[x].Name), GetDAType(Fields[x].DataType),
+              MakeValidIdentifier(Fields[x].Name)]), PASCAL_INDENTATION_LEVEL_2)
+          else
+            Write(Format('property %s: %s read Get%sValue write Set%sValue;',
+              [MakeValidIdentifier(Fields[x].Name), GetDAType(Fields[x].DataType),
+              MakeValidIdentifier(Fields[x].Name),
+              MakeValidIdentifier(Fields[x].Name)]), PASCAL_INDENTATION_LEVEL_2);
+          Write(Format('property %sIsNull: Boolean read Get%sIsNull write Set%sIsNull;',
+            [MakeValidIdentifier(Fields[x].Name),
+            MakeValidIdentifier(Fields[x].Name),
+            MakeValidIdentifier(Fields[x].Name)]), PASCAL_INDENTATION_LEVEL_2);
+        end;
+      end;
+      Write(Format('end;', []), PASCAL_INDENTATION_LEVEL_1);
+      WriteEmptyLine;
+
+      // Implementor class
+      Write(Format('{ T%sDataTableRules }', [MakeValidIdentifier(Datasets[i].Name)]), PASCAL_INDENTATION_LEVEL_1);
+      Write(Format('T%sDataTableRules = class(TDADataTableRules, I%s)', [MakeValidIdentifier(Datasets[i].Name),
+                                                                         MakeValidIdentifier(Datasets[i].Name)]), PASCAL_INDENTATION_LEVEL_1);
+
+      with Datasets[i] do begin
+        Write('private', PASCAL_INDENTATION_LEVEL_1);
+        for x := 0 to (Fields.Count-1) do begin
+          if Fields[x].DataType in [datMemo, datBlob] then
+            Write(Format('f_%s: %s;',[MakeValidIdentifier(Fields[x].Name), GetDAType(Fields[x].DataType)]),PASCAL_INDENTATION_LEVEL_2);
+        end;
+        for x := 0 to (Fields.Count-1) do begin
+          if Fields[x].DataType = datMemo then
+            Write(Format('procedure %s_OnChange(Sender: TObject);',[MakeValidIdentifier(Fields[x].Name)]),PASCAL_INDENTATION_LEVEL_2)
+          else
+          if Fields[x].DataType = datBlob then
+            Write(Format('procedure %s_OnChange(Sender: TObject);',[MakeValidIdentifier(Fields[x].Name)]),PASCAL_INDENTATION_LEVEL_2);
+        end;
+        Write('protected', PASCAL_INDENTATION_LEVEL_1);
+        Write('{ Property getters and setters }', PASCAL_INDENTATION_LEVEL_2);
+        for x := 0 to (Fields.Count-1) do begin
+          Write(Format('function Get%sValue: %s; virtual;', [MakeValidIdentifier(Fields[x].Name), GetDAType(Fields[x].DataType)]), PASCAL_INDENTATION_LEVEL_2);
+          if not (Fields[x].DataType in [datMemo, datBlob]) then
+            Write(Format('procedure Set%sValue(const aValue: %s); virtual;', [MakeValidIdentifier(Fields[x].Name), GetDAType(Fields[x].DataType)]), PASCAL_INDENTATION_LEVEL_2);
+          Write(Format('function Get%sIsNull: Boolean; virtual;', [MakeValidIdentifier(Fields[x].Name)]), PASCAL_INDENTATION_LEVEL_2);
+          Write(Format('procedure Set%sIsNull(const aValue: Boolean); virtual;', [MakeValidIdentifier(Fields[x].Name)]), PASCAL_INDENTATION_LEVEL_2);
+        end;
+
+        WriteEmptyLine;
+        Write('{ Properties }', PASCAL_INDENTATION_LEVEL_2);
+        for x := 0 to (Fields.Count-1) do
+        begin
+          if Fields[x].DataType in [datMemo, datBlob] then
+            Write(Format('property %s: %s read Get%sValue;',
+              [MakeValidIdentifier(Fields[x].Name),
+               GetDAType(Fields[x].DataType),
+               MakeValidIdentifier(Fields[x].Name)]), PASCAL_INDENTATION_LEVEL_2)
+          else
+            Write(Format('property %s: %s read Get%sValue write Set%sValue;',
+              [MakeValidIdentifier(Fields[x].Name),
+               GetDAType(Fields[x].DataType),
+               MakeValidIdentifier(Fields[x].Name),
+               MakeValidIdentifier(Fields[x].Name)]), PASCAL_INDENTATION_LEVEL_2);
+          Write(Format('property %sIsNull: Boolean read Get%sIsNull write Set%sIsNull;',
+            [MakeValidIdentifier(Fields[x].Name),
+              MakeValidIdentifier(Fields[x].Name),
+             MakeValidIdentifier(Fields[x].Name)]), PASCAL_INDENTATION_LEVEL_2);
+        end;
+
+        WriteEmptyLine;
+        {Write('procedure Validate; override;', PASCAL_INDENTATION_LEVEL_3);
+        WriteEmptyLine;}
+
+        Write('public', PASCAL_INDENTATION_LEVEL_1);
+        Write('constructor Create(aDataTable: TDADataTable); override;', PASCAL_INDENTATION_LEVEL_2);
+        Write('destructor Destroy; override;', PASCAL_INDENTATION_LEVEL_2);
+        WriteEmptyLine;
+
+        // Generates the Find method
+        {s := GenFindParams(Datasets[i], TRUE, TRUE, FALSE);
+        if (s<>'') then Write(Format('function Find(%s; LocateOptions : TLocateOptions) : boolean;', [s]), PASCAL_INDENTATION_LEVEL_2);}
+      end;
+
+      Write(Format('end;', []), PASCAL_INDENTATION_LEVEL_1);
+      WriteEmptyLine;
+    end;
+
+    Write('implementation');
+    WriteEmptyLine;
+    Write('uses Variants, uROBinaryHelpers;');
+    WriteEmptyLine;
+
+    for i := 0 to (Datasets.Count-1) do begin
+      // Implementor class
+      Write(Format('{ T%sDataTableRules }', [MakeValidIdentifier(Datasets[i].Name)]));
+
+      with Datasets[i] do begin
+        Write(Format('constructor T%sDataTableRules.Create(aDataTable: TDADataTable);', [MakeValidIdentifier(Name)]));
+        bVar:=False;
+
+        // create StrList
+        for x := 0 to (Fields.Count-1) do begin
+          if Fields[x].DataType = datMemo then begin
+            if not bVar then begin
+               Write('var');
+               bVar:=True;
+            end;
+            Write('  StrList: TStringList;');
+            Break;
+          end;
+        end;
+
+        // create ROStream
+        for x := 0 to (Fields.Count-1) do begin
+          if Fields[x].DataType = datBlob then begin
+            if not bVar then begin
+               Write('var');
+            end;
+            Write('  ROStream: TROStream;');
+            Break;
+          end;
+        end;
+
+        Write('begin');
+        Write('  inherited;');
+        for x := 0 to (Fields.Count-1) do begin
+          if Fields[x].DataType = datMemo then begin
+            WriteEmptyLine;
+            Write('  StrList := TStringList.Create;');
+            Write(Format('  StrList.OnChange := %s_OnChange;', [MakeValidIdentifier(Fields[x].Name)]));
+            Write(Format('  f_%s := NewROStrings(StrList,True);', [MakeValidIdentifier(Fields[x].Name)]));
+          end else
+          if Fields[x].DataType = datBlob then begin
+            WriteEmptyLine;
+            Write('  ROStream := TROStream.Create;');
+            Write(Format('  ROStream.OnChange := %s_OnChange;', [MakeValidIdentifier(Fields[x].Name)]));
+            Write(Format('  f_%s := ROStream;', [MakeValidIdentifier(Fields[x].Name)]));
+          end;
+        end;
+        Write('end;');
+        WriteEmptyLine;
+
+        Write(Format('destructor T%sDataTableRules.Destroy;', [MakeValidIdentifier(Name)]));
+        Write('begin');
+        Write('  inherited;');
+        Write('end;');
+        WriteEmptyLine;
+
+        // Generates the Find method body
+        {s := GenFindParams(Datasets[i], TRUE, TRUE, FALSE);
+        if (s<>'') then begin
+          Write(Format('function T%s.Find(%s; LocateOptions : TLocateOptions) : boolean;', [Name, s]));
+          Write('begin');
+          s := GenFindParams(Datasets[i], FALSE, FALSE, TRUE);
+          s2 := GenFindParams(Datasets[i], FALSE, TRUE, TRUE);
+          if (Pos(',', s2)=0)
+            then Write(Format('result := DataTable.Locate(''%s'', %s, LocateOptions);', [s, s2]), PASCAL_INDENTATION_LEVEL_1)
+            else Write(Format('result := DataTable.Locate(''%s'', VarArrayOf([%s]), LocateOptions);', [s, s2]), PASCAL_INDENTATION_LEVEL_1);
+
+          Write('end;');
+          WriteEmptyLine;
+        end;}
+
+        {Write(Format('procedure T%s.Validate;', [Name]));
+        Write('begin');
+        Write('end;');
+        WriteEmptyLine;}
+
+
+        {ToDo: -cDA3 improve handling of Memos (and possibly Blobs, too), so that assignments to the returned
+                     IROStream (ie MyField.Text := 'Hello') get carried back to the field data properly.
+                     currently, the onmly way to chage the field is to actually assign a new IROStream to
+                     the property via "MyField := ...", which is NOT GOOD.}
+
+        for x := 0 to (Fields.Count-1) do begin
+          if Fields[x].DataType = datMemo then begin
+            Write(Format('procedure T%sDataTableRules.%s_OnChange(Sender: TObject);', [MakeValidIdentifier(Name), MakeValidIdentifier(Fields[x].Name)]));
+            Write('begin');
+            Write(Format('  if DataTable.Editing then DataTable.Fields[idx_%s%s].AsVariant := TStringList(Sender).Text;', [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Fields[x].Name), GetDAType(Fields[x].DataType)]));
+            Write('end;');
+            WriteEmptyLine;
+          end else
+          if Fields[x].DataType = datBlob then begin
+            Write(Format('procedure T%sDataTableRules.%s_OnChange(Sender: TObject);', [MakeValidIdentifier(Name), MakeValidIdentifier(Fields[x].Name)]));
+            Write('begin');
+            Write(Format('  if DataTable.Editing then DataTable.Fields[idx_%s%s].LoadFromStream(TROStream(Sender));', [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Fields[x].Name), GetDAType(Fields[x].DataType)]));
+            Write('end;');
+            WriteEmptyLine;
+          end;
+        end;
+
+        for x := 0 to (Fields.Count-1) do begin
+          Write(Format('function T%sDataTableRules.Get%sValue: %s;', [MakeValidIdentifier(Name), MakeValidIdentifier(Fields[x].Name), GetDAType(Fields[x].DataType)]));
+          Write('begin');
+          case Fields[x].DataType of    { }
+            datMemo:begin
+                Write(Format('  result := f_%s;',[MakeValidIdentifier(Fields[x].Name)]));
+                Write(Format('  result.Text := DataTable.Fields[idx_%s%s].AsString;',  [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Fields[x].Name)]));
+              end;
+            datBlob:begin
+                Write(Format('  result := f_%s;',[MakeValidIdentifier(Fields[x].Name)]));
+                Write('  result.Position := 0;');
+                Write('  if not Result.InUpdateMode then begin');
+                Write(Format('    DataTable.Fields[idx_%s%s].SaveToStream(result);',  [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Fields[x].Name)]));
+                Write('    result.Position := 0;');
+                Write('  end;');
+              end;
+            else
+                Write(Format('  result := DataTable.Fields[idx_%s%s].As%s;',  [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Fields[x].Name), GetDATypeMethod(Fields[x].DataType)]));
+          end;    { case }
+          Write('end;');
+          WriteEmptyLine;
+
+          if not (Fields[x].DataType in [datMemo, datBlob]) then begin
+            Write(Format('procedure T%sDataTableRules.Set%sValue(const aValue: %s);', [MakeValidIdentifier(Name), MakeValidIdentifier(Fields[x].Name), GetDAType(Fields[x].DataType)]));
+            Write('begin');
+            Write(Format('  DataTable.Fields[idx_%s%s].As%s := aValue;', [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Fields[x].Name), GetDATypeMethod(Fields[x].DataType)]));
+            Write('end;');
+            WriteEmptyLine;
+          end;
+
+          Write(Format('function T%sDataTableRules.Get%sIsNull: boolean;', [MakeValidIdentifier(Name), MakeValidIdentifier(Fields[x].Name)]));
+          Write('begin');
+          Write(Format('  result := DataTable.Fields[idx_%s%s].IsNull;',  [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Fields[x].Name)]));
+          Write('end;');
+          WriteEmptyLine;
+
+
+          Write(Format('procedure T%sDataTableRules.Set%sIsNull(const aValue: Boolean);', [MakeValidIdentifier(Name), MakeValidIdentifier(Fields[x].Name)]));
+          Write('begin');
+          Write('  if aValue then');
+          Write(Format('    DataTable.Fields[idx_%s%s].AsVariant := Null;', [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Fields[x].Name)]));
+          Write('end;');
+          WriteEmptyLine;
+        end;
+      end;
+
+      WriteEmptyLine;
+    end;
+
+    Write('initialization');
+    for i := 0 to (Datasets.Count-1) do
+      Write(Format('RegisterDataTableRules(RID_%s, T%sDataTableRules);', [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Name)]), PASCAL_INDENTATION_LEVEL_1);
+
+    WriteEmptyLine;
+    Write('end.');
+  finally
+    guids.Free;
+  end;
+end;
+
+{ TServerUnitSchemaGenerator }
+
+procedure TServerUnitSchemaGenerator.DoWriteCode;
+var i, x : integer;
+    guid : TGUID;
+    guids : TStringList;
+    //s, s2 : string;
+    bVar: Boolean;
+begin
+  guids := TStringList.Create;
+
+  with Schema do try
+    for i := 0 to (Datasets.Count-1) do begin
+      CreateGUID(guid);
+      guids.Add(GUIDToString(guid));
+    end;
+
+    Write(Format('unit %s;', [ChangeFileExt(ExtractFileName(FileName), '')]));
+    WriteEmptyLine;
+
+    Write('interface');
+    WriteEmptyLine;
+    Write('uses');
+    Write(Format('  Classes, DB, SysUtils, uROClasses, uDADataTable, uDABusinessProcessor, FmtBCD, uROXMLIntf, %s;', [ClientUnitName]));
+
+    // Data table GUIDs
+    WriteEmptyLine;
+    Write('const');
+    Write('{ Delta rules ids ', PASCAL_INDENTATION_LEVEL_1);
+    Write('     Feel free to change them to something more human readable', PASCAL_INDENTATION_LEVEL_1);
+    Write('     but make sure they are unique in the context of your application }', PASCAL_INDENTATION_LEVEL_1);
+    for i := 0 to (Datasets.Count-1) do begin
+      Write(Format('RID_%sDelta = ''%s'';', [MakeValidIdentifier(Datasets[i].Name), guids[i]]), PASCAL_INDENTATION_LEVEL_1);
+    end;
+    WriteEmptyLine;
+
+    Write('type');
+    for i := 0 to (Datasets.Count-1) do begin
+      // Business delta change
+      Write(Format('{ I%sDelta }', [MakeValidIdentifier(Datasets[i].Name)]), PASCAL_INDENTATION_LEVEL_1);
+      Write(Format('I%sDelta = interface(I%s)', [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Name)]), PASCAL_INDENTATION_LEVEL_1);
+      Write(Format('[''%s'']', [guids[i]]), PASCAL_INDENTATION_LEVEL_1);
+
+      with Datasets[i] do begin
+        Write('{ Property getters and setters }', PASCAL_INDENTATION_LEVEL_2);
+        for x := 0 to (Fields.Count-1) do begin
+          Write(Format('function GetOld%sValue : %s;', [MakeValidIdentifier(Fields[x].Name), GetDAType(Fields[x].DataType)]), PASCAL_INDENTATION_LEVEL_2);
+        end;
+        WriteEmptyLine;
+
+        // Properties
+        Write('{ Properties }', PASCAL_INDENTATION_LEVEL_2);
+        for x := 0 to (Fields.Count-1) do
+          Write(Format('property Old%s : %s read GetOld%sValue;',
+            [MakeValidIdentifier(Fields[x].Name),
+             GetDAType(Fields[x].DataType),
+             MakeValidIdentifier(Fields[x].Name),
+             MakeValidIdentifier(Fields[x].Name)]), PASCAL_INDENTATION_LEVEL_2);
+
+        Write(Format('end;', []), PASCAL_INDENTATION_LEVEL_1);
+      end;
+      WriteEmptyLine;
+
+      // Implementor class
+      Write(Format('{ T%sBusinessProcessorRules }', [MakeValidIdentifier(Datasets[i].Name)]), PASCAL_INDENTATION_LEVEL_1);
+      Write(Format('T%sBusinessProcessorRules = class(TDABusinessProcessorRules, I%s, I%sDelta)', [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Name)]), PASCAL_INDENTATION_LEVEL_1);
+
+      with Datasets[i] do begin
+        Write('private', PASCAL_INDENTATION_LEVEL_1);
+        for x := 0 to (Fields.Count-1) do begin
+          if Fields[x].DataType in [datMemo, datBlob] then
+            Write(Format('f_%s: %s;',[MakeValidIdentifier(Fields[x].Name), GetDAType(Fields[x].DataType)]),PASCAL_INDENTATION_LEVEL_2);
+        end;
+        for x := 0 to (Fields.Count-1) do begin
+          if Fields[x].DataType = datMemo then
+            Write(Format('procedure %s_OnChange(Sender: TObject);',[MakeValidIdentifier(Fields[x].Name)]),PASCAL_INDENTATION_LEVEL_2)
+          else
+          if Fields[x].DataType = datBlob then
+            Write(Format('procedure %s_OnChange(Sender: Tobject);',[MakeValidIdentifier(Fields[x].Name)]),PASCAL_INDENTATION_LEVEL_2);
+        end;
+        Write('protected', PASCAL_INDENTATION_LEVEL_1);
+        Write('{ Property getters and setters }', PASCAL_INDENTATION_LEVEL_2);
+        for x := 0 to (Fields.Count-1) do begin
+          Write(Format('function Get%sValue: %s; virtual;', [MakeValidIdentifier(Fields[x].Name), GetDAType(Fields[x].DataType)]), PASCAL_INDENTATION_LEVEL_2);
+          Write(Format('function Get%sIsNull: Boolean; virtual;', [MakeValidIdentifier(Fields[x].Name)]), PASCAL_INDENTATION_LEVEL_2);
+          Write(Format('function GetOld%sValue: %s; virtual;', [MakeValidIdentifier(Fields[x].Name), GetDAType(Fields[x].DataType)]), PASCAL_INDENTATION_LEVEL_2);
+          Write(Format('function GetOld%sIsNull: Boolean; virtual;', [MakeValidIdentifier(Fields[x].Name)]), PASCAL_INDENTATION_LEVEL_2);
+          if not(Fields[x].DataType in [datMemo, datBlob]) then
+             Write(Format('procedure Set%sValue(const aValue: %s); virtual;', [MakeValidIdentifier(Fields[x].Name), GetDAType(Fields[x].DataType)]), PASCAL_INDENTATION_LEVEL_2);
+          Write(Format('procedure Set%sIsNull(const aValue: Boolean); virtual;', [MakeValidIdentifier(Fields[x].Name)]), PASCAL_INDENTATION_LEVEL_2);
+        end;
+
+        WriteEmptyLine;
+        Write('{ Properties }', PASCAL_INDENTATION_LEVEL_2);
+        for x := 0 to (Fields.Count-1) do begin
+           if (Fields[x].DataType in [datMemo, datBlob]) then
+              Write(Format('property %s : %s read Get%sValue;',
+                [MakeValidIdentifier(Fields[x].Name),
+                 GetDAType(Fields[x].DataType),
+                 MakeValidIdentifier(Fields[x].Name)]), PASCAL_INDENTATION_LEVEL_2)
+           else
+            Write(Format('property %s : %s read Get%sValue write Set%sValue;',
+              [MakeValidIdentifier(Fields[x].Name),
+               GetDAType(Fields[x].DataType),
+               MakeValidIdentifier(Fields[x].Name),
+               MakeValidIdentifier(Fields[x].Name)]), PASCAL_INDENTATION_LEVEL_2);
+          Write(Format('property %sIsNull : Boolean read Get%sIsNull write Set%sIsNull;',
+            [MakeValidIdentifier(Fields[x].Name),
+             MakeValidIdentifier(Fields[x].Name),
+             MakeValidIdentifier(Fields[x].Name)]), PASCAL_INDENTATION_LEVEL_2);
+          Write(Format('property Old%s : %s read GetOld%sValue;',
+            [MakeValidIdentifier(Fields[x].Name),
+             GetDAType(Fields[x].DataType),
+             MakeValidIdentifier(Fields[x].Name),
+             MakeValidIdentifier(Fields[x].Name)]), PASCAL_INDENTATION_LEVEL_2);
+          Write(Format('property Old%sIsNull : Boolean read GetOld%sIsNull;',
+            [MakeValidIdentifier(Fields[x].Name),
+             MakeValidIdentifier(Fields[x].Name),
+             MakeValidIdentifier(Fields[x].Name)]), PASCAL_INDENTATION_LEVEL_2);
+        end;
+
+        WriteEmptyLine;
+
+        Write('public', PASCAL_INDENTATION_LEVEL_1);
+        Write('constructor Create(aBusinessProcessor: TDABusinessProcessor); override;', PASCAL_INDENTATION_LEVEL_2);
+        Write('destructor Destroy; override;', PASCAL_INDENTATION_LEVEL_2);
+        WriteEmptyLine;
+
+        // Generates the Find method
+        {s := GenFindParams(Datasets[i], TRUE, TRUE, FALSE);
+        if (s<>'') then Write(Format('function Find(%s; LocateOptions : TLocateOptions) : boolean;', [s]), PASCAL_INDENTATION_LEVEL_2);}
+      end;
+
+      Write(Format('end;', []), PASCAL_INDENTATION_LEVEL_1);
+      WriteEmptyLine;
+    end;
+
+    Write('implementation');
+    WriteEmptyLine;
+    Write('uses');
+    Write('  Variants, uROBinaryHelpers, uDAInterfaces;');
+    WriteEmptyLine;
+
+    for i := 0 to (Datasets.Count-1) do begin
+      // Implementor class
+      Write(Format('{ T%sBusinessProcessorRules }', [MakeValidIdentifier(Datasets[i].Name)]));
+
+      with Datasets[i] do begin
+        Write(Format('constructor T%sBusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);', [MakeValidIdentifier(Name)]));
+        bVar:=False;
+
+        // create StrList
+        for x := 0 to (Fields.Count-1) do begin
+          if Fields[x].DataType = datMemo then begin
+            if not bVar then begin
+               Write('var');
+               bVar:=True;
+            end;
+            Write('  StrList: TStringList;');
+            Break;
+          end;
+        end;
+
+        // create ROStream
+        for x := 0 to (Fields.Count-1) do begin
+          if Fields[x].DataType = datBlob then begin
+            if not bVar then begin
+               Write('var');
+            end;
+            Write('  ROStream: TROStream;');
+            Break;
+          end;
+        end;
+
+        Write('begin');
+        Write('  inherited;');
+        for x := 0 to (Fields.Count-1) do begin
+          if Fields[x].DataType = datMemo then begin
+            WriteEmptyLine;
+            Write('  StrList := TStringList.Create;');
+            Write(Format('  StrList.OnChange := %s_OnChange;', [MakeValidIdentifier(Fields[x].Name)]));
+            Write(Format('  f_%s := NewROStrings(StrList,True);', [MakeValidIdentifier(Fields[x].Name)]));
+          end else
+          if Fields[x].DataType = datBlob then begin
+            WriteEmptyLine;
+            Write('  ROStream := TROStream.Create;');
+            Write(Format('  ROStream.OnChange := %s_OnChange;', [MakeValidIdentifier(Fields[x].Name)]));
+            Write(Format('  f_%s := ROStream;', [MakeValidIdentifier(Fields[x].Name)]));
+          end;
+        end;
+        Write('end;');
+        WriteEmptyLine;
+
+        Write(Format('destructor T%sBusinessProcessorRules.Destroy;', [MakeValidIdentifier(Name)]));
+        Write('begin');
+        Write('  inherited;');
+        Write('end;');
+        WriteEmptyLine;
+
+        for x := 0 to (Fields.Count-1) do begin
+          if Fields[x].DataType = datMemo then begin
+            Write(Format('procedure T%sBusinessProcessorRules.%s_OnChange(Sender: TObject);', [MakeValidIdentifier(Name), MakeValidIdentifier(Fields[x].Name)]));
+            Write('begin');
+            Write(Format('  BusinessProcessor.CurrentChange.NewValueByName[fld_%s%s] := TStringList(Sender).Text;',  [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Fields[x].Name)]));
+            Write('end;');
+            WriteEmptyLine;
+          end else
+          if Fields[x].DataType = datBlob then begin
+            Write(Format('procedure T%sBusinessProcessorRules.%s_OnChange(Sender: TObject);', [MakeValidIdentifier(Name), MakeValidIdentifier(Fields[x].Name)]));
+            Write('begin');
+            Write(Format('  BusinessProcessor.CurrentChange.NewValueByName[fld_%s%s] := BinaryToBlobVariant((TROStream(Sender) as IROStream).Stream);',  [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Fields[x].Name)]));
+            Write('end;');
+            WriteEmptyLine;
+          end;
+        end;
+
+        for x := 0 to (Fields.Count-1) do begin
+          Write(Format('function T%sBusinessProcessorRules.Get%sValue: %s;', [MakeValidIdentifier(Name), MakeValidIdentifier(Fields[x].Name), GetDAType(Fields[x].DataType)]));
+          Write('begin');
+          case Fields[x].DataType of
+            datMemo:begin
+                Write(Format('  result := f_%s;',[MakeValidIdentifier(Fields[x].Name)]));
+                Write(Format('  result.Text := BusinessProcessor.CurrentChange.NewValueByName[fld_%s%s];',  [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Fields[x].Name)]));
+              end;
+            datBlob:begin
+                Write(Format('  result := f_%s;',[MakeValidIdentifier(Fields[x].Name)]));
+                Write('  result.Position := 0;');
+                Write('  if not Result.InUpdateMode then begin');
+                Write(Format('    BlobVariantToBinary(BusinessProcessor.CurrentChange.NewValueByName[fld_%s%s], result.Stream);',  [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Fields[x].Name)]));
+                Write('    result.Position := 0;');
+                Write('  end;');
+              end;
+            {$IFDEF TREAT_DECIMAL_AS_TBCD}
+            datDecimal: begin
+                Write(Format('  result := GetVarDecimal(BusinessProcessor.CurrentChange.NewValueByName[fld_%s%s]);',  [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Fields[x].Name), GetDAType(Fields[x].DataType)]));
+              end;
+            {$ENDIF}  
+            datXml: begin
+                Write(Format('  result := GetVarXml(BusinessProcessor.CurrentChange.NewValueByName[fld_%s%s]);',  [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Fields[x].Name), GetDAType(Fields[x].DataType)]));
+              end;
+            datGuid: begin
+                Write(Format('  result := GetVarGuid(BusinessProcessor.CurrentChange.NewValueByName[fld_%s%s]);',  [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Fields[x].Name), GetDAType(Fields[x].DataType)]));
+              end;
+            else begin
+                Write(Format('  result := BusinessProcessor.CurrentChange.NewValueByName[fld_%s%s];',  [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Fields[x].Name), GetDAType(Fields[x].DataType)]));
+              end;
+          end;
+          Write('end;');
+          WriteEmptyLine;
+
+          Write(Format('function T%sBusinessProcessorRules.Get%sIsNull: Boolean;', [MakeValidIdentifier(Name), MakeValidIdentifier(Fields[x].Name)]));
+          Write('begin');
+          Write(Format('  result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_%s%s]);',  [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Fields[x].Name)]));
+          Write('end;');
+          WriteEmptyLine;
+
+          Write(Format('function T%sBusinessProcessorRules.GetOld%sValue: %s;', [MakeValidIdentifier(Name), MakeValidIdentifier(Fields[x].Name), GetDAType(Fields[x].DataType)]));
+          Write('begin');
+          case Fields[x].DataType of
+            datMemo:begin
+                Write('  result := NewROStrings();');
+                Write(Format('  result.Text := BusinessProcessor.CurrentChange.OldValueByName[fld_%s%s];',  [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Fields[x].Name)]));
+              end;
+            datBlob:begin
+                Write('  result := NewROStream();');
+                Write(Format('  BlobVariantToBinary(BusinessProcessor.CurrentChange.OldValueByName[fld_%s%s], result.Stream);',  [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Fields[x].Name)]));
+              end;
+            {$IFDEF TREAT_DECIMAL_AS_TBCD}
+            datDecimal: begin
+                Write(Format('  result := GetVarDecimal(BusinessProcessor.CurrentChange.OldValueByName[fld_%s%s]);',  [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Fields[x].Name), GetDAType(Fields[x].DataType)]));
+              end;
+            {$ENDIF}
+            datXml: begin
+                Write(Format('  result := GetVarXml(BusinessProcessor.CurrentChange.OldValueByName[fld_%s%s]);',  [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Fields[x].Name), GetDAType(Fields[x].DataType)]));
+              end;
+            datGuid: begin
+                Write(Format('  result := GetVarGuid(BusinessProcessor.CurrentChange.OldValueByName[fld_%s%s]);',  [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Fields[x].Name), GetDAType(Fields[x].DataType)]));
+              end;
+            else begin
+                Write(Format('  result := BusinessProcessor.CurrentChange.OldValueByName[fld_%s%s];',  [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Fields[x].Name), GetDAType(Fields[x].DataType)]));
+              end;
+          end;
+          Write('end;');
+          WriteEmptyLine;
+
+          Write(Format('function T%sBusinessProcessorRules.GetOld%sIsNull: Boolean;', [MakeValidIdentifier(Name), MakeValidIdentifier(Fields[x].Name)]));
+          Write('begin');
+          Write(Format('  result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_%s%s]);',  [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Fields[x].Name)]));
+          Write('end;');
+          WriteEmptyLine;
+
+          if not(Fields[x].DataType in [datMemo, datBlob]) then begin
+            Write(Format('procedure T%sBusinessProcessorRules.Set%sValue(const aValue: %s);', [MakeValidIdentifier(Name), MakeValidIdentifier(Fields[x].Name), GetDAType(Fields[x].DataType)]));
+            Write('begin');
+            case Fields[x].DataType of
+            {$IFDEF TREAT_DECIMAL_AS_TBCD}
+              datDecimal: begin
+                  Write(Format('  BusinessProcessor.CurrentChange.NewValueByName[fld_%s%s] := BCDToVariant(aValue);', [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Fields[x].Name), GetDAType(Fields[x].DataType)]));
+              end;
+            {$ENDIF}
+              datXml:     begin
+                  Write(       '  if aValue = nil then');
+                  Write(Format('  BusinessProcessor.CurrentChange.NewValueByName[fld_%s%s] := ''''', [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Fields[x].Name), GetDAType(Fields[x].DataType)]));
+                  Write(       '  else');
+                  Write(Format('  BusinessProcessor.CurrentChange.NewValueByName[fld_%s%s] := aValue.XML;', [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Fields[x].Name), GetDAType(Fields[x].DataType)]));
+              end;
+              datGuid: begin
+                  Write(Format('  BusinessProcessor.CurrentChange.NewValueByName[fld_%s%s] := GUIDToString(aValue);', [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Fields[x].Name), GetDAType(Fields[x].DataType)]));
+              end;
+            else
+              Write(Format('  BusinessProcessor.CurrentChange.NewValueByName[fld_%s%s] := aValue;', [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Fields[x].Name), GetDAType(Fields[x].DataType)]));
+            end;
+            Write('end;');
+            WriteEmptyLine;
+          end;
+
+          Write(Format('procedure T%sBusinessProcessorRules.Set%sIsNull(const aValue: Boolean);', [MakeValidIdentifier(Name), MakeValidIdentifier(Fields[x].Name)]));
+          Write('begin');
+          write('  if aValue then');
+          Write(Format('    BusinessProcessor.CurrentChange.NewValueByName[fld_%s%s] := Null;',  [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Fields[x].Name)]));
+          Write('end;');
+          WriteEmptyLine;
+        end;
+      end;
+
+      WriteEmptyLine;
+    end;
+
+    Write('initialization');
+    for i := 0 to (Datasets.Count-1) do
+      Write(Format('RegisterBusinessProcessorRules(RID_%sDelta, T%sBusinessProcessorRules);', [MakeValidIdentifier(Datasets[i].Name), MakeValidIdentifier(Datasets[i].Name)]), PASCAL_INDENTATION_LEVEL_1);
+
+    WriteEmptyLine;
+    Write('end.');
+  finally
+    guids.Free;
+  end;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDASelectDataTablesForm.dfm b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDASelectDataTablesForm.dfm
new file mode 100644
index 0000000..cbe8103
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDASelectDataTablesForm.dfm	
@@ -0,0 +1,204 @@
+object DASelectDataTablesForm: TDASelectDataTablesForm
+  Left = 312
+  Top = 219
+  Width = 275
+  Height = 426
+  HorzScrollBar.Range = 59
+  ActiveControl = btn_Ok
+  AutoScroll = False
+  BorderWidth = 5
+  Caption = 'Select Data Tables...'
+  Color = clBtnFace
+  Constraints.MinHeight = 300
+  Constraints.MinWidth = 275
+  ParentFont = True
+  Icon.Data = {
+    0000010002001010000001000800680500002600000010100000010020006804
+    00008E0500002800000010000000200000000100080000000000000100000000
+    000000000000000100000001000000000000A84A0300AE500600D2761800C777
+    2900CA792C0089815D00B28B5D00CC895100DEA25A00D59E6F00DEAA6A002778
+    9100FF00FF001182AB001E93BE003F9EBC00609592006D9B9A0044B3BE0063BB
+    BC0067B9BD0026A3D10056ADC60043B2CC0048BCCF005BB7D20055BBD70066BB
+    CF006DBCCF003ECAE60023D5FC005ACADD007BD1DE0055D0E90055D8F00050DC
+    F20054DAF40052DDF9006BCEE7004DE2FA009EBBA10093C1BA009AD5CA008ED8
+    DE0099F1ED008CEAF70086F3F80090F2F40099F9F700A2F3EE00A2FAF800AAFA
+    F800B8F8FB00C3FBFA00CCFBFC00E8FEFD000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    00000000000000000000FFFFFF000000000000000000000E0E0E0E0E00000000
+    0000000000000E241F262E270E00000000000000010101011F262E27160E0000
+    0E0E0E0E010A0B011F262E27160E000E281F0601050908011F262E27160E0E2F
+    281F0103040101011710171D1A0E0E2F281F0102010C11191F262E1B0F0E0E2F
+    281F152A270E2F281F262E27160E0E211C1710171D0E2F1513262E27160E0E18
+    1E1F262C120C010201242E27160E0E2F281F26010101040301293130220E0E2F
+    281F240108090501073231310E000E2F281F20010B0A010E0E0E0E0E00000E37
+    35342B0101010100000000000000000E3836332D2D0E00000000000000000000
+    0E0E0E0E0E000000000000000000FF830000FF010000FC000000C00000008000
+    0000000000000000000000000000000000000000000000000000000100000003
+    0000007F000080FF0000C1FF0000280000001000000020000000010020000000
+    0000400400000000000000000000000000000000000000000000000000000000
+    000000000000000000000000000000000000000000001182AB401182ABFF1182
+    ABFF1182ABFF1182ABFF1182ABFF1182AB400000000000000000000000000000
+    00000000000000000000000000009932003D1182AB401182ABFF50DCF2FF23D5
+    FCFF52DEFAFF8CEAF7FF6BCEE7FF1182ABFF1182AB4000000000000000000000
+    0000000000000000000000000000A84A03FFA84A03FFA84A03FFA84A03FF23D5
+    FCFF52DEFAFF8CEAF7FF6BCEE7FF26A3D1FF1182ABFF000000001182AB401182
+    ABFF1182ABFF1182ABFF498A96FFA84A03FFD59E6FFFDEAA6AFFA84A03FF23D5
+    FCFF52DEFAFF8CEAF7FF6BCEE7FF26A3D1FF1182ABFF1182AB401182ABFF4DE2
+    FAFF23D5FCFF89815DFFA84A03FFCA792CFFDEA25AFFCC8951FFA84A03FF23D5
+    FCFF52DEFAFF8CEAF7FF6BCEE7FF26A3D1FF1182ABFF1182ABFF86F3F8FF4DE2
+    FAFF23D5FCFFA84A03FFD27618FFC77729FFA84A03FFA84A03FFA84A03FF56AD
+    C6FF3F9EBCFF56ADC6FF6DBCCFFF5BB7D2FF1182ABFF1182ABFF86F3F8FF4DE2
+    FAFF23D5FCFFA84A03FFAE5006FFA84A03FF277890FF609592FF48BCCFFF23D5
+    FCFF52DEFAFF8CEAF7FF55BBD7FF1E93BEFF1182ABFF1182ABFF86F3F8FF4DE2
+    FAFF23D5FCFF67B9BDFF93C1BAFF6BCEE7FF1182ABFF86F3F8FF4DE2FAFF23D5
+    FCFF52DEFAFF8CEAF7FF6BCEE7FF26A3D1FF1182ABFF1182ABFF7BD1DEFF66BB
+    CFFF56ADC6FF3F9EBCFF56ADC6FF6DBCCFFF1182ABFF86F3F8FF63BBBCFF44B3
+    BEFF52DEFAFF8CEAF7FF6BCEE7FF26A3D1FF1182ABFF1182ABFF43B2CCFF3ECA
+    E6FF23D5FCFF52DEFAFF8ED8DEFF6D9B9AFF277992FFA84A03FFAE5006FFA84A
+    03FF55D8F0FF8CEAF7FF6BCEE7FF26A3D1FF1182ABFF1182ABFF86F3F8FF4DE2
+    FAFF23D5FCFF52DDF9FFA84A03FFA84A03FFA84A03FFC77729FFD27618FFA84A
+    03FF9EBBA1FF99F9F7FF90F2F4FF55D0E9FF1182ABFF1182ABFF86F3F8FF4DE2
+    FAFF23D5FCFF54DAF4FFA84A03FFCC8951FFDEA25AFFCA792CFFA84A03FFB28B
+    5DFFA2F3EEFF99F9F7FF99F9F7FF1182ABFF1182AB401182ABFF86F3F8FF4DE2
+    FAFF23D5FCFF5ACADDFFA84A03FFDEAA6AFFD59E6FFFA84A03FF47818FFF1182
+    ABFF1182ABFF1182ABFF1182ABFF1182AB40000000001182ABFFCCFBFCFFB8F8
+    FBFFAAFAF8FF9AD5CAFFA84A03FFA84A03FFA84A03FFA84A03FF000000000000
+    000000000000000000000000000000000000000000001182AB401182ABFFE8FE
+    FDFFC3FBFAFFA2FAF8FF99F3EFFF9AF0ECFF1182ABFF1182AB40000000000000
+    00000000000000000000000000000000000000000000000000001182AB401182
+    ABFF1182ABFF1182ABFF1182ABFF1182ABFF1182AB4000000000000000000000
+    00000000000000000000000000000000000000000000FF010000FC000000FC00
+    0000800000000000000000000000000000000000000000000000000000000000
+    00000000000000010000007F0000007F000080FF0000}
+  OldCreateOrder = True
+  Position = poScreenCenter
+  DesignSize = (
+    249
+    380)
+  PixelsPerInch = 96
+  TextHeight = 13
+  object btn_Ok: TBitBtn
+    Left = 94
+    Top = 354
+    Width = 75
+    Height = 25
+    Anchors = [akRight, akBottom]
+    Caption = 'OK'
+    Default = True
+    ModalResult = 1
+    TabOrder = 0
+    Glyph.Data = {
+      D6020000424DD602000000000000D60000002800000020000000100000000100
+      08000000000000020000C30E0000C30E0000280000002800000000000000FFFF
+      FF00FF00FF0000660000149D210019AA2B00179D27001AB02D001BA92E001DB1
+      32001EB231001FB133001EAE310022B7380021B4370025A83B0031C24F0031B5
+      4D003BCB5E0041C5630047D36D004FD6790053DE7F00CACACA00C4C4C400BFBF
+      BF00B5B5B500ABABAB00A5A5A5009E9E9E009C9C9C009A9A9A00999999009898
+      98009797970094949400939393008C8C8C008A8A8A0065656500020202020202
+      0202020202020202020202020202020202020202020202020202020202020202
+      0202020202020202020202020202020202020202020202020202020202020203
+      030202020202020202020202020202272702020202020202020202020202030A
+      0B03020202020202020202020202271F1F27020202020202020202020203100D
+      070E0302020202020202020202271B1D221E270202020202020202020314120F
+      03080903020202020202020227191A2127232027020202020202020315161103
+      0203060C030202020202022718171C2702272521270202020202020203130302
+      020202030503020202020202271A270202020227242702020202020202030202
+      0202020203040302020202020227020202020202272627020202020202020202
+      0202020202020303020202020202020202020202020227270202020202020202
+      0202020202020203030202020202020202020202020202272702020202020202
+      0202020202020202020202020202020202020202020202020202020202020202
+      0202020202020202020202020202020202020202020202020202020202020202
+      0202020202020202020202020202020202020202020202020202020202020202
+      0202020202020202020202020202020202020202020202020202020202020202
+      0202020202020202020202020202020202020202020202020202}
+    NumGlyphs = 2
+  end
+  object btn_Cancel: TBitBtn
+    Left = 174
+    Top = 354
+    Width = 75
+    Height = 25
+    Anchors = [akRight, akBottom]
+    Cancel = True
+    Caption = 'Cancel'
+    ModalResult = 2
+    TabOrder = 1
+    Glyph.Data = {
+      8A030000424D8A030000000000008A0100002800000020000000100000000100
+      08000000000000020000C30E0000C30E0000550000005500000000000000FFFF
+      FF00FF00FF004071FA004274FF00497AFC00275AFF002C5FFF003664FA00386B
+      FF00174AFD001A4CFF001B4DFF001D50FF002355FF002558FF002655FA002E5B
+      F9002D59F400325DF1003B66F3000030FC000132FF000134FF000C3CFF00103D
+      FB00103BF4001342FF001743F6001847FF001A48F9001A47F8001B46F6001D4B
+      FF001C47F6001D48F6001D49F600214EFC00204BF800204CF800224DF800224C
+      F400224DF1002550F400002CF800002DF800002CF600002AF300012DF600032B
+      F2000431FE000733F600123BF100143EF40000009A00C0C0C000BEBEBE00BBBB
+      BB00B9B9B900B6B6B600B5B5B500B3B3B300B1B1B100B0B0B000AFAFAF00AEAE
+      AE00ACACAC00ABABAB00AAAAAA00A9A9A900A8A8A800A7A7A700A6A6A600A4A4
+      A400A3A3A300A2A2A200A0A0A0009F9F9F009E9E9E009C9C9C009A9A9A009999
+      990098989800979797006B6B6B00020202020202020202020202020202020202
+      0202020202020202020202020202020202020202020202020202020202020202
+      0202020202020202020202020202020202363602020202020236360202020202
+      02545402020202020254540202020202360A1A3602020202362C153602020202
+      54464C540202020254504F5402020202361F0B343602023630162F3602020202
+      5447444D54020254514E5354020202020236220C3536362D1731360202020202
+      025447434B5454504E52540202020202020236230D1932162E36020202020202
+      02025447424A4D4E5154020202020202020202361E1B18333602020202020202
+      0202025447474A4F54020202020202020202023625211D1C3602020202020202
+      02020254424245495402020202020202020236110728260E2036020202020202
+      0202543E3D434440485402020202020202360809123636290F24360202020202
+      02543B3A415454453F4754020202020236030413360202362A06273602020202
+      5439384054020254473E4454020202023605143602020202362B103602020202
+      54373C5402020202544441540202020202363602020202020236360202020202
+      0254540202020202025454020202020202020202020202020202020202020202
+      0202020202020202020202020202020202020202020202020202020202020202
+      0202020202020202020202020202}
+    NumGlyphs = 2
+  end
+  object lb_DataTables: TCheckListBox
+    Left = 0
+    Top = 0
+    Width = 249
+    Height = 349
+    OnClickCheck = lb_DataTablesClick
+    Align = alTop
+    Anchors = [akLeft, akTop, akRight, akBottom]
+    ItemHeight = 13
+    TabOrder = 2
+    OnClick = lb_DataTablesClick
+    OnDblClick = lb_DataTablesClick
+  end
+  object cb_SelectAll: TCheckBox
+    Left = 0
+    Top = 355
+    Width = 65
+    Height = 12
+    Anchors = [akLeft, akBottom]
+    Caption = 'Select &All'
+    TabOrder = 3
+    OnClick = cb_SelectAllClick
+  end
+end
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDASelectDataTablesForm.lfm b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDASelectDataTablesForm.lfm
new file mode 100644
index 0000000..f4f2117
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDASelectDataTablesForm.lfm	
@@ -0,0 +1,206 @@
+object DASelectDataTablesForm: TDASelectDataTablesForm
+  Left = 348
+  Height = 300
+  Top = 169
+  Width = 275
+  HorzScrollBar.Page = 274
+  HorzScrollBar.Range = 59
+  VertScrollBar.Page = 299
+  ActiveControl = btn_Ok
+  Caption = 'Select Data Tables...'
+  ClientHeight = 300
+  ClientWidth = 275
+  Constraints.MinHeight = 300
+  Constraints.MinWidth = 275
+  Font.Height = -11
+  Font.Name = 'Tahoma'
+  Font.Pitch = fpVariable
+  Icon.Data = {
+    B609000000000100020010100000010008006805000026000000101000000100
+    2000680400008E05000028000000100000002000000001000800000000000001
+    00000000000000000000000100000001000000000000A84A0300AE500600D276
+    1800C7772900CA792C0089815D00B28B5D00CC895100DEA25A00D59E6F00DEAA
+    6A0027789100FF00FF001182AB001E93BE003F9EBC00609592006D9B9A0044B3
+    BE0063BBBC0067B9BD0026A3D10056ADC60043B2CC0048BCCF005BB7D20055BB
+    D70066BBCF006DBCCF003ECAE60023D5FC005ACADD007BD1DE0055D0E90055D8
+    F00050DCF20054DAF40052DDF9006BCEE7004DE2FA009EBBA10093C1BA009AD5
+    CA008ED8DE0099F1ED008CEAF70086F3F80090F2F40099F9F700A2F3EE00A2FA
+    F800AAFAF800B8F8FB00C3FBFA00CCFBFC00E8FEFD0000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000FFFFFF000000000000000000000E0E0E0E0E
+    000000000000000000000E241F262E270E00000000000000010101011F262E27
+    160E00000E0E0E0E010A0B011F262E27160E000E281F0601050908011F262E27
+    160E0E2F281F0103040101011710171D1A0E0E2F281F0102010C11191F262E1B
+    0F0E0E2F281F152A270E2F281F262E27160E0E211C1710171D0E2F1513262E27
+    160E0E181E1F262C120C010201242E27160E0E2F281F26010101040301293130
+    220E0E2F281F240108090501073231310E000E2F281F20010B0A010E0E0E0E0E
+    00000E3735342B0101010100000000000000000E3836332D2D0E000000000000
+    000000000E0E0E0E0E000000000000000000FF830000FF010000FC000000C000
+    0000800000000000000000000000000000000000000000000000000000000001
+    000000030000007F000080FF0000C1FF00002800000010000000200000000100
+    2000000000004004000000000000000000000000000000000000000000000000
+    00000000000000000000000000000000000000000000000000001182AB401182
+    ABFF1182ABFF1182ABFF1182ABFF1182ABFF1182AB4000000000000000000000
+    0000000000000000000000000000000000009932003D1182AB401182ABFF50DC
+    F2FF23D5FCFF52DEFAFF8CEAF7FF6BCEE7FF1182ABFF1182AB40000000000000
+    000000000000000000000000000000000000A84A03FFA84A03FFA84A03FFA84A
+    03FF23D5FCFF52DEFAFF8CEAF7FF6BCEE7FF26A3D1FF1182ABFF000000001182
+    AB401182ABFF1182ABFF1182ABFF498A96FFA84A03FFD59E6FFFDEAA6AFFA84A
+    03FF23D5FCFF52DEFAFF8CEAF7FF6BCEE7FF26A3D1FF1182ABFF1182AB401182
+    ABFF4DE2FAFF23D5FCFF89815DFFA84A03FFCA792CFFDEA25AFFCC8951FFA84A
+    03FF23D5FCFF52DEFAFF8CEAF7FF6BCEE7FF26A3D1FF1182ABFF1182ABFF86F3
+    F8FF4DE2FAFF23D5FCFFA84A03FFD27618FFC77729FFA84A03FFA84A03FFA84A
+    03FF56ADC6FF3F9EBCFF56ADC6FF6DBCCFFF5BB7D2FF1182ABFF1182ABFF86F3
+    F8FF4DE2FAFF23D5FCFFA84A03FFAE5006FFA84A03FF277890FF609592FF48BC
+    CFFF23D5FCFF52DEFAFF8CEAF7FF55BBD7FF1E93BEFF1182ABFF1182ABFF86F3
+    F8FF4DE2FAFF23D5FCFF67B9BDFF93C1BAFF6BCEE7FF1182ABFF86F3F8FF4DE2
+    FAFF23D5FCFF52DEFAFF8CEAF7FF6BCEE7FF26A3D1FF1182ABFF1182ABFF7BD1
+    DEFF66BBCFFF56ADC6FF3F9EBCFF56ADC6FF6DBCCFFF1182ABFF86F3F8FF63BB
+    BCFF44B3BEFF52DEFAFF8CEAF7FF6BCEE7FF26A3D1FF1182ABFF1182ABFF43B2
+    CCFF3ECAE6FF23D5FCFF52DEFAFF8ED8DEFF6D9B9AFF277992FFA84A03FFAE50
+    06FFA84A03FF55D8F0FF8CEAF7FF6BCEE7FF26A3D1FF1182ABFF1182ABFF86F3
+    F8FF4DE2FAFF23D5FCFF52DDF9FFA84A03FFA84A03FFA84A03FFC77729FFD276
+    18FFA84A03FF9EBBA1FF99F9F7FF90F2F4FF55D0E9FF1182ABFF1182ABFF86F3
+    F8FF4DE2FAFF23D5FCFF54DAF4FFA84A03FFCC8951FFDEA25AFFCA792CFFA84A
+    03FFB28B5DFFA2F3EEFF99F9F7FF99F9F7FF1182ABFF1182AB401182ABFF86F3
+    F8FF4DE2FAFF23D5FCFF5ACADDFFA84A03FFDEAA6AFFD59E6FFFA84A03FF4781
+    8FFF1182ABFF1182ABFF1182ABFF1182ABFF1182AB40000000001182ABFFCCFB
+    FCFFB8F8FBFFAAFAF8FF9AD5CAFFA84A03FFA84A03FFA84A03FFA84A03FF0000
+    00000000000000000000000000000000000000000000000000001182AB401182
+    ABFFE8FEFDFFC3FBFAFFA2FAF8FF99F3EFFF9AF0ECFF1182ABFF1182AB400000
+    0000000000000000000000000000000000000000000000000000000000001182
+    AB401182ABFF1182ABFF1182ABFF1182ABFF1182ABFF1182AB40000000000000
+    0000000000000000000000000000000000000000000000000000
+  }
+  Position = poScreenCenter
+  object btn_Ok: TBitBtn
+    AnchorSideTop.Side = asrBottom
+    Left = 89
+    Height = 25
+    Top = 271
+    Width = 90
+    Align = alCustom
+    Anchors = [akRight, akBottom]
+    Caption = 'OK'
+    Default = True
+    Glyph.Data = {
+      D6020000424DD602000000000000D60000002800000020000000100000000100
+      08000000000000020000C30E0000C30E0000280000002800000000000000FFFF
+      FF00FF00FF0000660000149D210019AA2B00179D27001AB02D001BA92E001DB1
+      32001EB231001FB133001EAE310022B7380021B4370025A83B0031C24F0031B5
+      4D003BCB5E0041C5630047D36D004FD6790053DE7F00CACACA00C4C4C400BFBF
+      BF00B5B5B500ABABAB00A5A5A5009E9E9E009C9C9C009A9A9A00999999009898
+      98009797970094949400939393008C8C8C008A8A8A0065656500020202020202
+      0202020202020202020202020202020202020202020202020202020202020202
+      0202020202020202020202020202020202020202020202020202020202020203
+      030202020202020202020202020202272702020202020202020202020202030A
+      0B03020202020202020202020202271F1F27020202020202020202020203100D
+      070E0302020202020202020202271B1D221E270202020202020202020314120F
+      03080903020202020202020227191A2127232027020202020202020315161103
+      0203060C030202020202022718171C2702272521270202020202020203130302
+      020202030503020202020202271A270202020227242702020202020202030202
+      0202020203040302020202020227020202020202272627020202020202020202
+      0202020202020303020202020202020202020202020227270202020202020202
+      0202020202020203030202020202020202020202020202272702020202020202
+      0202020202020202020202020202020202020202020202020202020202020202
+      0202020202020202020202020202020202020202020202020202020202020202
+      0202020202020202020202020202020202020202020202020202020202020202
+      0202020202020202020202020202020202020202020202020202020202020202
+      0202020202020202020202020202020202020202020202020202
+    }
+    ModalResult = 1
+    NumGlyphs = 2
+    TabOrder = 2
+  end
+  object btn_Cancel: TBitBtn
+    AnchorSideTop.Side = asrBottom
+    Left = 180
+    Height = 25
+    Top = 271
+    Width = 90
+    Align = alCustom
+    Anchors = [akRight, akBottom]
+    Cancel = True
+    Caption = 'Cancel'
+    Glyph.Data = {
+      8A030000424D8A030000000000008A0100002800000020000000100000000100
+      08000000000000020000C30E0000C30E0000550000005500000000000000FFFF
+      FF00FF00FF004071FA004274FF00497AFC00275AFF002C5FFF003664FA00386B
+      FF00174AFD001A4CFF001B4DFF001D50FF002355FF002558FF002655FA002E5B
+      F9002D59F400325DF1003B66F3000030FC000132FF000134FF000C3CFF00103D
+      FB00103BF4001342FF001743F6001847FF001A48F9001A47F8001B46F6001D4B
+      FF001C47F6001D48F6001D49F600214EFC00204BF800204CF800224DF800224C
+      F400224DF1002550F400002CF800002DF800002CF600002AF300012DF600032B
+      F2000431FE000733F600123BF100143EF40000009A00C0C0C000BEBEBE00BBBB
+      BB00B9B9B900B6B6B600B5B5B500B3B3B300B1B1B100B0B0B000AFAFAF00AEAE
+      AE00ACACAC00ABABAB00AAAAAA00A9A9A900A8A8A800A7A7A700A6A6A600A4A4
+      A400A3A3A300A2A2A200A0A0A0009F9F9F009E9E9E009C9C9C009A9A9A009999
+      990098989800979797006B6B6B00020202020202020202020202020202020202
+      0202020202020202020202020202020202020202020202020202020202020202
+      0202020202020202020202020202020202363602020202020236360202020202
+      02545402020202020254540202020202360A1A3602020202362C153602020202
+      54464C540202020254504F5402020202361F0B343602023630162F3602020202
+      5447444D54020254514E5354020202020236220C3536362D1731360202020202
+      025447434B5454504E52540202020202020236230D1932162E36020202020202
+      02025447424A4D4E5154020202020202020202361E1B18333602020202020202
+      0202025447474A4F54020202020202020202023625211D1C3602020202020202
+      02020254424245495402020202020202020236110728260E2036020202020202
+      0202543E3D434440485402020202020202360809123636290F24360202020202
+      02543B3A415454453F4754020202020236030413360202362A06273602020202
+      5439384054020254473E4454020202023605143602020202362B103602020202
+      54373C5402020202544441540202020202363602020202020236360202020202
+      0254540202020202025454020202020202020202020202020202020202020202
+      0202020202020202020202020202020202020202020202020202020202020202
+      0202020202020202020202020202
+    }
+    ModalResult = 2
+    NumGlyphs = 2
+    TabOrder = 3
+  end
+  object lb_DataTables: TCheckListBox
+    Height = 266
+    Width = 275
+    Align = alTop
+    Anchors = [akTop, akLeft, akRight, akBottom]
+    ItemHeight = 13
+    OnClick = lb_DataTablesClick
+    OnClickCheck = lb_DataTablesClick
+    OnDblClick = lb_DataTablesClick
+    TabOrder = 0
+  end
+  object cb_SelectAll: TCheckBox
+    AnchorSideTop.Side = asrBottom
+    Left = 8
+    Height = 21
+    Top = 273
+    Width = 72
+    Align = alCustom
+    Anchors = [akLeft, akBottom]
+    Caption = 'Select &All'
+    OnClick = cb_SelectAllClick
+    TabOrder = 1
+  end
+end
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDASelectDataTablesForm.lrs b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDASelectDataTablesForm.lrs
new file mode 100644
index 0000000..88a24b6
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDASelectDataTablesForm.lrs	
@@ -0,0 +1,168 @@
+{ This is an automatically generated lazarus resource file }
+
+LazarusResources.Add('TDASelectDataTablesForm','FORMDATA',[
+  'TPF0'#23'TDASelectDataTablesForm'#22'DASelectDataTablesForm'#4'Left'#3'\'#1#6
+  +'Height'#3','#1#3'Top'#3#169#0#5'Width'#3#19#1#18'HorzScrollBar.Page'#3#18#1
+  +#19'HorzScrollBar.Range'#2';'#18'VertScrollBar.Page'#3'+'#1#13'ActiveControl'
+  +#7#6'btn_Ok'#7'Caption'#6#21'Select Data Tables...'#12'ClientHeight'#3','#1
+  +#11'ClientWidth'#3#19#1#21'Constraints.MinHeight'#3','#1#20'Constraints.MinW'
+  +'idth'#3#19#1#11'Font.Height'#2#245#9'Font.Name'#6#6'Tahoma'#10'Font.Pitch'#7
+  +#10'fpVariable'#9'Icon.Data'#10#186#9#0#0#182#9#0#0#0#0#1#0#2#0#16#16#0#0#1#0
+  +#8#0'h'#5#0#0'&'#0#0#0#16#16#0#0#1#0' '#0'h'#4#0#0#142#5#0#0'('#0#0#0#16#0#0
+  +#0' '#0#0#0#1#0#8#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#1#0#0#0#0#0#0
+  +#168'J'#3#0#174'P'#6#0#210'v'#24#0#199'w)'#0#202'y,'#0#137#129']'#0#178#139
+  +']'#0#204#137'Q'#0#222#162'Z'#0#213#158'o'#0#222#170'j'#0'''x'#145#0#255#0
+  +#255#0#17#130#171#0#30#147#190#0'?'#158#188#0'`'#149#146#0'm'#155#154#0'D'
+  +#179#190#0'c'#187#188#0'g'#185#189#0'&'#163#209#0'V'#173#198#0'C'#178#204#0
+  +'H'#188#207#0'['#183#210#0'U'#187#215#0'f'#187#207#0'm'#188#207#0'>'#202#230
+  +#0'#'#213#252#0'Z'#202#221#0'{'#209#222#0'U'#208#233#0'U'#216#240#0'P'#220
+  +#242#0'T'#218#244#0'R'#221#249#0'k'#206#231#0'M'#226#250#0#158#187#161#0#147
+  +#193#186#0#154#213#202#0#142#216#222#0#153#241#237#0#140#234#247#0#134#243
+  +#248#0#144#242#244#0#153#249#247#0#162#243#238#0#162#250#248#0#170#250#248#0
+  +#184#248#251#0#195#251#250#0#204#251#252#0#232#254#253#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#255#0#0#0#0#0#0#0#0#0#0
+  +#14#14#14#14#14#0#0#0#0#0#0#0#0#0#0#14'$'#31'&.'''#14#0#0#0#0#0#0#0#1#1#1#1
+  +#31'&.'''#22#14#0#0#14#14#14#14#1#10#11#1#31'&.'''#22#14#0#14'('#31#6#1#5#9#8
+  +#1#31'&.'''#22#14#14'/('#31#1#3#4#1#1#1#23#16#23#29#26#14#14'/('#31#1#2#1#12
+  +#17#25#31'&.'#27#15#14#14'/('#31#21'*'''#14'/('#31'&.'''#22#14#14'!'#28#23#16
+  +#23#29#14'/'#21#19'&.'''#22#14#14#24#30#31'&,'#18#12#1#2#1'$.'''#22#14#14'/('
+  +#31'&'#1#1#1#4#3#1')10"'#14#14'/('#31'$'#1#8#9#5#1#7'211'#14#0#14'/('#31' '#1
+  +#11#10#1#14#14#14#14#14#0#0#14'754+'#1#1#1#1#0#0#0#0#0#0#0#0#14'863--'#14#0#0
+  +#0#0#0#0#0#0#0#0#14#14#14#14#14#0#0#0#0#0#0#0#0#0#255#131#0#0#255#1#0#0#252#0
+  +#0#0#192#0#0#0#128#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#1
+  +#0#0#0#3#0#0#0''#0#0#128#255#0#0#193#255#0#0'('#0#0#0#16#0#0#0' '#0#0#0#1#0
+  +' '#0#0#0#0#0'@'#4#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#17#130#171'@'#17#130#171#255#17
+  +#130#171#255#17#130#171#255#17#130#171#255#17#130#171#255#17#130#171'@'#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#153'2'#0'='#17#130#171'@'
+  +#17#130#171#255'P'#220#242#255'#'#213#252#255'R'#222#250#255#140#234#247#255
+  +'k'#206#231#255#17#130#171#255#17#130#171'@'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#168'J'#3#255#168'J'#3#255#168'J'#3#255#168'J'#3#255'#'#213
+  +#252#255'R'#222#250#255#140#234#247#255'k'#206#231#255'&'#163#209#255#17#130
+  +#171#255#0#0#0#0#17#130#171'@'#17#130#171#255#17#130#171#255#17#130#171#255
+  +'I'#138#150#255#168'J'#3#255#213#158'o'#255#222#170'j'#255#168'J'#3#255'#'
+  +#213#252#255'R'#222#250#255#140#234#247#255'k'#206#231#255'&'#163#209#255#17
+  +#130#171#255#17#130#171'@'#17#130#171#255'M'#226#250#255'#'#213#252#255#137
+  +#129']'#255#168'J'#3#255#202'y,'#255#222#162'Z'#255#204#137'Q'#255#168'J'#3
+  +#255'#'#213#252#255'R'#222#250#255#140#234#247#255'k'#206#231#255'&'#163#209
+  ,#255#17#130#171#255#17#130#171#255#134#243#248#255'M'#226#250#255'#'#213#252
+  +#255#168'J'#3#255#210'v'#24#255#199'w)'#255#168'J'#3#255#168'J'#3#255#168'J'
+  +#3#255'V'#173#198#255'?'#158#188#255'V'#173#198#255'm'#188#207#255'['#183#210
+  +#255#17#130#171#255#17#130#171#255#134#243#248#255'M'#226#250#255'#'#213#252
+  +#255#168'J'#3#255#174'P'#6#255#168'J'#3#255'''x'#144#255'`'#149#146#255'H'
+  +#188#207#255'#'#213#252#255'R'#222#250#255#140#234#247#255'U'#187#215#255#30
+  +#147#190#255#17#130#171#255#17#130#171#255#134#243#248#255'M'#226#250#255'#'
+  +#213#252#255'g'#185#189#255#147#193#186#255'k'#206#231#255#17#130#171#255#134
+  +#243#248#255'M'#226#250#255'#'#213#252#255'R'#222#250#255#140#234#247#255'k'
+  +#206#231#255'&'#163#209#255#17#130#171#255#17#130#171#255'{'#209#222#255'f'
+  +#187#207#255'V'#173#198#255'?'#158#188#255'V'#173#198#255'm'#188#207#255#17
+  +#130#171#255#134#243#248#255'c'#187#188#255'D'#179#190#255'R'#222#250#255#140
+  +#234#247#255'k'#206#231#255'&'#163#209#255#17#130#171#255#17#130#171#255'C'
+  +#178#204#255'>'#202#230#255'#'#213#252#255'R'#222#250#255#142#216#222#255'm'
+  +#155#154#255'''y'#146#255#168'J'#3#255#174'P'#6#255#168'J'#3#255'U'#216#240
+  +#255#140#234#247#255'k'#206#231#255'&'#163#209#255#17#130#171#255#17#130#171
+  +#255#134#243#248#255'M'#226#250#255'#'#213#252#255'R'#221#249#255#168'J'#3
+  +#255#168'J'#3#255#168'J'#3#255#199'w)'#255#210'v'#24#255#168'J'#3#255#158#187
+  +#161#255#153#249#247#255#144#242#244#255'U'#208#233#255#17#130#171#255#17#130
+  +#171#255#134#243#248#255'M'#226#250#255'#'#213#252#255'T'#218#244#255#168'J'
+  +#3#255#204#137'Q'#255#222#162'Z'#255#202'y,'#255#168'J'#3#255#178#139']'#255
+  +#162#243#238#255#153#249#247#255#153#249#247#255#17#130#171#255#17#130#171'@'
+  +#17#130#171#255#134#243#248#255'M'#226#250#255'#'#213#252#255'Z'#202#221#255
+  +#168'J'#3#255#222#170'j'#255#213#158'o'#255#168'J'#3#255'G'#129#143#255#17
+  +#130#171#255#17#130#171#255#17#130#171#255#17#130#171#255#17#130#171'@'#0#0#0
+  +#0#17#130#171#255#204#251#252#255#184#248#251#255#170#250#248#255#154#213#202
+  +#255#168'J'#3#255#168'J'#3#255#168'J'#3#255#168'J'#3#255#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#17#130#171'@'#17#130#171#255#232#254#253
+  +#255#195#251#250#255#162#250#248#255#153#243#239#255#154#240#236#255#17#130
+  +#171#255#17#130#171'@'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#17#130#171'@'#17#130#171#255#17#130#171#255#17#130#171#255#17#130
+  +#171#255#17#130#171#255#17#130#171'@'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#8'Position'#7#14'poScreenCenter'#0#7'TBitBtn'#6'btn'
+  +'_Ok'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2'Y'#6'Height'#2#25#3'To'
+  +'p'#3#15#1#5'Width'#2'Z'#5'Align'#7#8'alCustom'#7'Anchors'#11#7'akRight'#8'a'
+  +'kBottom'#0#7'Caption'#6#2'OK'#7'Default'#9#10'Glyph.Data'#10#218#2#0#0#214#2
+  +#0#0'BM'#214#2#0#0#0#0#0#0#214#0#0#0'('#0#0#0' '#0#0#0#16#0#0#0#1#0#8#0#0#0#0
+  +#0#0#2#0#0#195#14#0#0#195#14#0#0'('#0#0#0'('#0#0#0#0#0#0#0#255#255#255#0#255
+  +#0#255#0#0'f'#0#0#20#157'!'#0#25#170'+'#0#23#157''''#0#26#176'-'#0#27#169'.'
+  +#0#29#177'2'#0#30#178'1'#0#31#177'3'#0#30#174'1'#0'"'#183'8'#0'!'#180'7'#0'%'
+  +#168';'#0'1'#194'O'#0'1'#181'M'#0';'#203'^'#0'A'#197'c'#0'G'#211'm'#0'O'#214
+  +'y'#0'S'#222''#0#202#202#202#0#196#196#196#0#191#191#191#0#181#181#181#0#171
+  +#171#171#0#165#165#165#0#158#158#158#0#156#156#156#0#154#154#154#0#153#153
+  +#153#0#152#152#152#0#151#151#151#0#148#148#148#0#147#147#147#0#140#140#140#0
+  +#138#138#138#0'eee'#0#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2
+  +#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2
+  +#2#2#2#3#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2''''''#2#2#2#2#2#2#2#2#2#2#2#2#2#3#10
+  +#11#3#2#2#2#2#2#2#2#2#2#2#2#2''''#31#31''''#2#2#2#2#2#2#2#2#2#2#2#3#16#13#7
+  +#14#3#2#2#2#2#2#2#2#2#2#2''''#27#29'"'#30''''#2#2#2#2#2#2#2#2#2#3#20#18#15#3
+  +#8#9#3#2#2#2#2#2#2#2#2''''#25#26'!''# '''#2#2#2#2#2#2#2#3#21#22#17#3#2#3#6#12
+  +#3#2#2#2#2#2#2''''#24#23#28''''#2'''%!'''#2#2#2#2#2#2#2#3#19#3#2#2#2#2#3#5#3
+  +#2#2#2#2#2#2''''#26''''#2#2#2#2'''$'''#2#2#2#2#2#2#2#3#2#2#2#2#2#2#3#4#3#2#2
+  +#2#2#2#2''''#2#2#2#2#2#2'''&'''#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#3#3#2#2#2#2#2#2
+  +#2#2#2#2#2#2#2#2''''''#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#3#3#2#2#2#2#2#2#2#2#2#2
+  +#2#2#2#2''''''#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2
+  +#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2
+  +#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2
+  +#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2
+  +#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#11'ModalResult'#2#1#9'NumGlyphs'#2#2#8'TabO'
+  +'rder'#2#2#0#0#7'TBitBtn'#10'btn_Cancel'#18'AnchorSideTop.Side'#7#9'asrBotto'
+  +'m'#4'Left'#3#180#0#6'Height'#2#25#3'Top'#3#15#1#5'Width'#2'Z'#5'Align'#7#8
+  +'alCustom'#7'Anchors'#11#7'akRight'#8'akBottom'#0#6'Cancel'#9#7'Caption'#6#6
+  +'Cancel'#10'Glyph.Data'#10#142#3#0#0#138#3#0#0'BM'#138#3#0#0#0#0#0#0#138#1#0
+  +#0'('#0#0#0' '#0#0#0#16#0#0#0#1#0#8#0#0#0#0#0#0#2#0#0#195#14#0#0#195#14#0#0
+  ,'U'#0#0#0'U'#0#0#0#0#0#0#0#255#255#255#0#255#0#255#0'@q'#250#0'Bt'#255#0'Iz'
+  +#252#0'''Z'#255#0',_'#255#0'6d'#250#0'8k'#255#0#23'J'#253#0#26'L'#255#0#27'M'
+  +#255#0#29'P'#255#0'#U'#255#0'%X'#255#0'&U'#250#0'.['#249#0'-Y'#244#0'2]'#241
+  +#0';f'#243#0#0'0'#252#0#1'2'#255#0#1'4'#255#0#12'<'#255#0#16'='#251#0#16';'
+  +#244#0#19'B'#255#0#23'C'#246#0#24'G'#255#0#26'H'#249#0#26'G'#248#0#27'F'#246
+  +#0#29'K'#255#0#28'G'#246#0#29'H'#246#0#29'I'#246#0'!N'#252#0' K'#248#0' L'
+  +#248#0'"M'#248#0'"L'#244#0'"M'#241#0'%P'#244#0#0','#248#0#0'-'#248#0#0','#246
+  +#0#0'*'#243#0#1'-'#246#0#3'+'#242#0#4'1'#254#0#7'3'#246#0#18';'#241#0#20'>'
+  +#244#0#0#0#154#0#192#192#192#0#190#190#190#0#187#187#187#0#185#185#185#0#182
+  +#182#182#0#181#181#181#0#179#179#179#0#177#177#177#0#176#176#176#0#175#175
+  +#175#0#174#174#174#0#172#172#172#0#171#171#171#0#170#170#170#0#169#169#169#0
+  +#168#168#168#0#167#167#167#0#166#166#166#0#164#164#164#0#163#163#163#0#162
+  +#162#162#0#160#160#160#0#159#159#159#0#158#158#158#0#156#156#156#0#154#154
+  +#154#0#153#153#153#0#152#152#152#0#151#151#151#0'kkk'#0#2#2#2#2#2#2#2#2#2#2#2
+  +#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2
+  +#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2'66'#2#2#2#2#2#2'66'#2#2#2#2#2#2'TT'#2#2
+  +#2#2#2#2'TT'#2#2#2#2#2'6'#10#26'6'#2#2#2#2'6,'#21'6'#2#2#2#2'TFLT'#2#2#2#2'T'
+  +'POT'#2#2#2#2'6'#31#11'46'#2#2'60'#22'/6'#2#2#2#2'TGDMT'#2#2'TQNST'#2#2#2#2#2
+  +'6"'#12'566-'#23'16'#2#2#2#2#2#2'TGCKTTPNRT'#2#2#2#2#2#2#2'6#'#13#25'2'#22'.'
+  +'6'#2#2#2#2#2#2#2#2'TGBJMNQT'#2#2#2#2#2#2#2#2#2'6'#30#27#24'36'#2#2#2#2#2#2#2
+  +#2#2#2'TGGJOT'#2#2#2#2#2#2#2#2#2#2'6%!'#29#28'6'#2#2#2#2#2#2#2#2#2#2'TBBEIT'
+  +#2#2#2#2#2#2#2#2#2'6'#17#7'(&'#14' 6'#2#2#2#2#2#2#2#2'T>=CD@HT'#2#2#2#2#2#2#2
+  +'6'#8#9#18'66)'#15'$6'#2#2#2#2#2#2'T;:ATTE?GT'#2#2#2#2#2'6'#3#4#19'6'#2#2'6*'
+  +#6'''6'#2#2#2#2'T98@T'#2#2'TG>DT'#2#2#2#2'6'#5#20'6'#2#2#2#2'6+'#16'6'#2#2#2
+  +#2'T7<T'#2#2#2#2'TDAT'#2#2#2#2#2'66'#2#2#2#2#2#2'66'#2#2#2#2#2#2'TT'#2#2#2#2
+  +#2#2'TT'#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2
+  +#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#11'ModalR'
+  +'esult'#2#2#9'NumGlyphs'#2#2#8'TabOrder'#2#3#0#0#13'TCheckListBox'#13'lb_Dat'
+  +'aTables'#6'Height'#3#10#1#5'Width'#3#19#1#5'Align'#7#5'alTop'#7'Anchors'#11
+  +#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#10'ItemHeight'#2#13#7'OnClick'#7
+  +#18'lb_DataTablesClick'#12'OnClickCheck'#7#18'lb_DataTablesClick'#10'OnDblCl'
+  +'ick'#7#18'lb_DataTablesClick'#8'TabOrder'#2#0#0#0#9'TCheckBox'#12'cb_Select'
+  +'All'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2#8#6'Height'#2#21#3'Top'
+  +#3#17#1#5'Width'#2'H'#5'Align'#7#8'alCustom'#7'Anchors'#11#6'akLeft'#8'akBot'
+  +'tom'#0#7'Caption'#6#11'Select &All'#7'OnClick'#7#17'cb_SelectAllClick'#8'Ta'
+  +'bOrder'#2#1#0#0#0
+]);
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDASelectDataTablesForm.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDASelectDataTablesForm.pas
new file mode 100644
index 0000000..d793599
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/IDE/uDASelectDataTablesForm.pas	
@@ -0,0 +1,92 @@
+unit uDASelectDataTablesForm;
+
+{$IFDEF MSWINDOWS}
+{$I ..\DataAbstract.inc}
+{$ELSE}
+{$I ../DataAbstract.inc}
+{$ENDIF}
+
+interface
+
+uses
+  {$IFDEF FPC} LResources, {$ENDIF}
+  {$IFDEF MSWINDOWS}Windows,{$ENDIF}
+  Messages, SysUtils, Variants, Classes
+  ,Graphics, Controls, Forms, Dialogs, StdCtrls, CheckLst, Buttons;
+
+type
+  TDASelectDataTablesForm = class(TForm)
+    btn_Ok: TBitBtn;
+    btn_Cancel: TBitBtn;
+    lb_DataTables: TCheckListBox;
+    cb_SelectAll: TCheckBox;
+    procedure cb_SelectAllClick(Sender: TObject);
+    procedure lb_DataTablesClick(Sender: TObject);
+  private
+    fChanging: boolean;
+    procedure SetOkButtonCaption(const Value: string);
+  public
+    procedure UpdateCheckBoxState;
+    property OkButtonCaption: string write SetOkButtonCaption;
+  end;
+
+var
+  DASelectDataTablesForm: TDASelectDataTablesForm;
+
+implementation
+{$IFNDEF FPC}
+  {$R *.dfm}
+{$ENDIF FPC}
+
+procedure TDASelectDataTablesForm.cb_SelectAllClick(Sender: TObject);
+var
+  i: integer;
+begin
+  if fChanging then exit;
+  fChanging := true;
+  try
+    for i := 0 to lb_DataTables.Items.Count-1 do
+      lb_DataTables.Checked[i] := cb_SelectAll.Checked;
+  finally
+    fChanging := false;
+  end;
+end;
+
+procedure TDASelectDataTablesForm.lb_DataTablesClick(Sender: TObject);
+var
+  lNone, lAll: boolean;
+  i: integer;
+begin
+  if fChanging then exit;
+  fChanging := true;
+  try
+    lNone := true;
+    lAll := true;
+    for i := 0 to lb_DataTables.Items.Count-1 do
+      if lb_DataTables.Checked[i] then
+        lNone := false
+      else
+        lAll := false;
+    if lNone then cb_SelectAll.State := cbUnchecked
+    else if lAll then cb_SelectAll.State := cbChecked
+    else cb_SelectAll.State := cbGrayed;
+  finally
+    fChanging := false;
+  end;
+end;
+
+procedure TDASelectDataTablesForm.SetOkButtonCaption(const Value: string);
+begin
+  btn_Ok.Caption := Value;
+end;
+
+procedure TDASelectDataTablesForm.UpdateCheckBoxState;
+begin
+  lb_DataTablesClick(nil);
+end;
+
+{$IFDEF FPC}
+initialization
+  {$I uDASelectDataTablesForm.lrs}
+{$ENDIF}
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/MultiDbLoginServiceV5_Impl.dfm b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/MultiDbLoginServiceV5_Impl.dfm
new file mode 100644
index 0000000..27ec41e
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/MultiDbLoginServiceV5_Impl.dfm	
@@ -0,0 +1,2 @@
+inherited MultiDbLoginServicev5: TMultiDbLoginServicev5
+end
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/MultiDbLoginServiceV5_Impl.lfm b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/MultiDbLoginServiceV5_Impl.lfm
new file mode 100644
index 0000000..27ec41e
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/MultiDbLoginServiceV5_Impl.lfm	
@@ -0,0 +1,2 @@
+inherited MultiDbLoginServicev5: TMultiDbLoginServicev5
+end
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/MultiDbLoginServiceV5_Impl.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/MultiDbLoginServiceV5_Impl.pas
new file mode 100644
index 0000000..78377cf
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/MultiDbLoginServiceV5_Impl.pas	
@@ -0,0 +1,44 @@
+unit MultiDbLoginServiceV5_Impl;
+
+{----------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project .                               }
+{                                                                            }
+{ This is where you are supposed to code the implementation of your objects. }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  {vcl:} Classes, SysUtils, 
+  {RemObjects:} uROXMLIntf, uROClientIntf, uROTypes, uROServer, uROSessions,
+  {Ancestor Implementation:} MultiDbLoginService_Impl,
+  {Generated:} DataAbstract4_Intf;
+
+type
+  { TMultiDbLoginServiceV5 }
+  TMultiDbLoginServiceV5 = class(TMultiDbLoginService,IMultiDbLoginServiceV5)
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+implementation
+
+uses
+  {Generated:} DataAbstract4_Invk;
+  
+procedure Create_MultiDbLoginServiceV5(out anInstance : IUnknown);
+begin
+  anInstance := TMultiDbLoginServiceV5.Create(nil);
+end;
+
+initialization
+  TROClassFactory.Create('MultiDbLoginServiceV5', Create_MultiDbLoginServiceV5, TMultiDbLoginServiceV5_Invoker);
+
+finalization
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/MultiDbLoginService_Impl.dfm b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/MultiDbLoginService_Impl.dfm
new file mode 100644
index 0000000..5892128
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/MultiDbLoginService_Impl.dfm	
@@ -0,0 +1,2 @@
+inherited MultiDbLoginService: TMultiDbLoginService
+end
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/MultiDbLoginService_Impl.lfm b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/MultiDbLoginService_Impl.lfm
new file mode 100644
index 0000000..5892128
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/MultiDbLoginService_Impl.lfm	
@@ -0,0 +1,2 @@
+inherited MultiDbLoginService: TMultiDbLoginService
+end
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/MultiDbLoginService_Impl.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/MultiDbLoginService_Impl.pas
new file mode 100644
index 0000000..7b150a6
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/MultiDbLoginService_Impl.pas	
@@ -0,0 +1,91 @@
+unit MultiDbLoginService_Impl;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  {vcl:} Classes, SysUtils,
+  {RemObjects:} uROClientIntf, uROTypes, uROServer, uROSessions, uDAClasses,
+  {Ancestor Implementation:} BaseLoginService_Impl,
+  {Generated:} DataAbstract4_Intf;
+
+type
+  TMultiDbLoginEvent = procedure(Sender: TObject; const aUserID, aPassword, aConnectionName: Utf8String; out aUserInfo: UserInfo; var aLoginSuccessful: boolean) of object;
+
+  { TMultiDbLoginService }
+  TMultiDbLoginService = class(TBaseLoginService, IMultiDbLoginService,IMultiDbLoginServiceV5)
+  private
+    fOnLogin: TMultiDbLoginEvent;
+    FConnectionManager: TDAConnectionManager;
+    procedure SetConnectionManager(const Value: TDAConnectionManager);
+  protected
+    { IMultiDbLoginService methods }
+    function Login(const aUserID: Utf8String; const aPassword: Utf8String; const aConnectionName: Utf8String; out aUserInfo: UserInfo): Boolean;
+    { IMultiDbLoginServiceV5 methods }
+    function GetConnectionNames: StringArray;
+    function GetDefaultConnectionName: Utf8String;
+  public
+    procedure CheckProperties;
+  published
+    property OnLogin: TMultiDbLoginEvent read fOnLogin write fOnLogin;
+    property ConnectionManager: TDAConnectionManager read FConnectionManager write SetConnectionManager;
+  end;
+
+implementation
+uses
+  uROClasses;
+{ MultiDbLoginService }
+
+procedure TMultiDbLoginService.CheckProperties;
+begin
+ Check(not assigned(ConnectionManager), Name+'.ConnectionManager must be assigned.');
+ ConnectionManager.CheckProperties;
+end;
+
+function TMultiDbLoginService.GetConnectionNames: StringArray;
+var
+  i: integer;
+begin
+  CheckProperties;
+  Result:= StringArray.Create;
+  For i:=0 to ConnectionManager.Connections.Count-1 do
+    Result.Add(AnsiToUtf8(ConnectionManager.Connections[i].Name));
+end;
+
+function TMultiDbLoginService.GetDefaultConnectionName: Utf8String;
+begin
+  CheckProperties;
+  Result := AnsiToUtf8(FConnectionManager.GetDefaultConnectionName);
+end;
+
+function TMultiDbLoginService.Login(const aUserID: Utf8String; const aPassword: Utf8String; const aConnectionName: Utf8String; out aUserInfo: UserInfo): Boolean;
+var
+  lLoginSuccessful: boolean;
+begin
+  lLoginSuccessful := false;
+  if assigned(OnLogin) then
+    OnLogin(self, aUserID, aPassword, aConnectionName, aUserInfo, lLoginSuccessful);
+  result := lLoginSuccessful;
+end;
+
+procedure TMultiDbLoginService.SetConnectionManager(const Value: TDAConnectionManager);
+begin
+  if assigned(FConnectionManager) then FConnectionManager.RemoveFreeNotification(self);
+  FConnectionManager := Value;
+  if assigned(FConnectionManager) then FConnectionManager.FreeNotification(self);
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/SimpleLoginService_Impl.dfm b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/SimpleLoginService_Impl.dfm
new file mode 100644
index 0000000..775b9ce
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/SimpleLoginService_Impl.dfm	
@@ -0,0 +1,2 @@
+inherited SimpleLoginService: TSimpleLoginService
+end
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/SimpleLoginService_Impl.lfm b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/SimpleLoginService_Impl.lfm
new file mode 100644
index 0000000..775b9ce
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/SimpleLoginService_Impl.lfm	
@@ -0,0 +1,2 @@
+inherited SimpleLoginService: TSimpleLoginService
+end
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/SimpleLoginService_Impl.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/SimpleLoginService_Impl.pas
new file mode 100644
index 0000000..d059360
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/SimpleLoginService_Impl.pas	
@@ -0,0 +1,53 @@
+unit SimpleLoginService_Impl;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  {vcl:} Classes, SysUtils,
+  {RemObjects:} uROClientIntf, uROTypes, uROServer, uROSessions,
+  {Ancestor Implementation:} BaseLoginService_Impl,
+  {Generated:} DataAbstract4_Intf;
+
+type
+  TSimpleLoginEvent = procedure(Sender: TObject; aUserID, aPassword: Utf8String; out aUserInfo: UserInfo; var aLoginSuccessful: boolean) of object;
+
+  { TSimpleLoginService }
+  TSimpleLoginService = class(TBaseLoginService, ISimpleLoginService)
+  private
+    fOnLogin: TSimpleLoginEvent;
+  protected
+    { ISimpleLoginService methods }
+    function Login(const aUserID: Utf8String; const aPassword: Utf8String; out aUserInfo: UserInfo): Boolean;
+  published
+    property OnLogin: TSimpleLoginEvent read fOnLogin write fOnLogin;
+  end;
+
+implementation
+
+{ SimpleLoginService }
+
+function TSimpleLoginService.Login(const aUserID: Utf8String; const aPassword: Utf8String; out aUserInfo: UserInfo): Boolean;
+var
+  lLoginSuccessful: boolean;
+begin
+  lLoginSuccessful := false;
+  if assigned(OnLogin) then
+    OnLogin(self, aUserID, aPassword, aUserInfo, lLoginSuccessful);
+  result := lLoginSuccessful;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Unsupported/uDAJvMTable.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Unsupported/uDAJvMTable.pas
new file mode 100644
index 0000000..a7cffe6
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Unsupported/uDAJvMTable.pas	
@@ -0,0 +1,189 @@
+unit uDAJvMTable;
+
+interface
+
+uses Classes, DB, uDAInterfaces, uDADataTable, JvMemDS;
+
+type
+
+  TDAJvMDataset = class(TJvMemoryData, IDADataTableDataset)
+  private
+    function GetActive: boolean;
+
+  protected
+    function GetDataTable: TDADataTable; safecall;
+    procedure InternalRefresh; override;
+
+  published
+    property Active: boolean read GetActive;
+  end;
+
+  TDAJvMemDataTable = class(TDADataTable)
+  private
+
+    fClientDataset: TDAJvMDataset;
+
+  protected
+    function GetDatasetClass: TDatasetClass; override;
+    procedure CreateInternalFields(aDataset: TDataset; someFieldDefinitions: TDAFieldCollection); override;
+    procedure DoSort(const FieldNames: array of string; const Directions: array of TDASortDirection); override;
+
+    procedure DoBeforeOpenDataset; override;
+    procedure DoAfterCloseDataset; override;
+
+    procedure SetMasterSource(const Value: TDADataSource); override;
+    function GetMasterSource: TDADataSource; override;
+    procedure SetDetailsFields(const Value: string); override;
+    procedure SetMasterFields(const Value: string); override;
+    function GetDetailFields: string; override;
+    function GetMasterFields: string; override;
+
+    function GetIndexDefs: TIndexDefs;
+    procedure SetIndexDefs(const Value: TIndexDefs);
+    function GetIndexName: string;
+    procedure SetIndexName(const Value: string);
+
+    function GetFilter: string; override;
+    function GetFiltered: boolean; override;
+    procedure SetFilter(const Value: string); override;
+    procedure SetFiltered(const Value: boolean); override;
+
+  public
+    constructor Create(aOwner: TComponent); override;
+
+  published
+    property IndexDefs: TIndexDefs read GetIndexDefs write SetIndexDefs;
+    property IndexName: string read GetIndexName write SetIndexName;
+
+  end;
+
+implementation
+
+uses Variants;
+
+constructor TDAJvMemDataTable.Create(aOwner: TComponent);
+begin
+  inherited;
+
+  fClientDataset := TDAJvMDataset(Dataset);
+  fClientDataset.FilterOptions :=  [foCaseInsensitive];
+end;
+
+procedure TDAJvMemDataTable.CreateInternalFields(aDataset: TDataset; someFieldDefinitions: TDAFieldCollection);
+begin
+  inherited;
+
+  fClientDataset.FieldDefs.Clear;
+  fClientDataset.CreateFields;
+
+end;
+
+procedure TDAJvMemDataTable.DoSort(const FieldNames: array of string; const Directions: array of TDASortDirection);
+begin
+  with fclientDataset do begin
+      Sort(Fieldnames,Directions);
+  end;
+end;
+
+function TDAJvMemDataTable.GetDatasetClass: TDatasetClass;
+begin
+  result := TDAJvMDataset;
+end;
+
+function TDAJvMemDataTable.GetMasterSource: TDADataSource;
+begin
+  result := nil;
+end;
+
+procedure TDAJvMemDataTable.DoAfterCloseDataset;
+begin
+  inherited;
+end;
+
+function TDAJvMemDataTable.GetFilter: string;
+begin
+  result := fClientDataset.Filter
+end;
+
+
+procedure TDAJvMemDataTable.DoBeforeOpenDataset;
+begin
+  inherited;
+end;
+
+procedure TDAJvMemDataTable.SetMasterSource(const Value: TDADataSource);
+begin
+  inherited SetMasterSource(Value);
+end;
+
+procedure TDAJvMemDataTable.SetMasterFields(const Value: string);
+begin
+  inherited;
+end;
+
+procedure TDAJvMemDataTable.SetDetailsFields(const Value: string);
+begin
+end;
+
+function TDAJvMemDataTable.GetDetailFields: string;
+begin
+end;
+
+function TDAJvMemDataTable.GetMasterFields: string;
+begin
+
+end;
+
+
+function TDAJvMemDataTable.GetFiltered: boolean;
+begin
+  result := fClientDataset.Filtered
+end;
+
+procedure TDAJvMemDataTable.SetFilter(const Value: string);
+begin
+  fClientDataset.Filter := Value
+end;
+
+procedure TDAJvMemDataTable.SetFiltered(const Value: boolean);
+begin
+  fClientDataset.Filtered := Value
+end;
+
+function TDAJvMemDataTable.GetIndexDefs: TIndexDefs;
+begin
+  result := nil;
+end;
+
+procedure TDAJvMemDataTable.SetIndexDefs(const Value: TIndexDefs);
+begin
+
+end;
+
+function TDAJvMemDataTable.GetIndexName: string;
+begin
+  result := '';
+end;
+
+procedure TDAJvMemDataTable.SetIndexName(const Value: string);
+begin
+
+end;
+
+function TDAJvMDataset.GetActive: boolean;
+begin
+  result := inherited Active;
+end;
+
+function TDAJvMDataset.GetDataTable: TDADataTable;
+begin
+  result := TDADataTable(Owner);
+end;
+
+procedure TDAJvMDataset.InternalRefresh;
+begin
+
+end;
+
+end.
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Unsupported/uDAMemTablesReg.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Unsupported/uDAMemTablesReg.pas
new file mode 100644
index 0000000..15e7226
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Unsupported/uDAMemTablesReg.pas	
@@ -0,0 +1,17 @@
+unit uDAMemTablesReg;
+
+interface
+
+uses uDAJvMTable, uDASQLMemoryTable, Classes;
+
+procedure Register;
+
+implementation
+
+procedure Register;
+begin
+  RegisterComponents('Data Abstract', [TDAJvMemDataTable]);
+  RegisterComponents('Data Abstract',[TDASQLMemTable]);
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Unsupported/uDASQLMemoryTable.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Unsupported/uDASQLMemoryTable.pas
new file mode 100644
index 0000000..1d6b365
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/Unsupported/uDASQLMemoryTable.pas	
@@ -0,0 +1,233 @@
+unit uDASQLMemoryTable;
+
+interface
+
+uses SysUtils,Classes, DB, uDAInterfaces, uDADataTable, SQLMemMain;
+
+type
+  TDASQLMemDataset = class(TSQLMemTable, IDADataTableDataset)
+  private
+    function GetActive: boolean;
+
+  protected
+    function  GetDataTable: TDADataTable; safecall;
+    procedure InternalRefresh; override;
+
+  published
+    property Active: boolean read GetActive;
+  end;
+
+  TDASQLMemTable = class(TDADataTable)
+  private
+    fMasterSource : TDADataSource;
+    fSQLMemDataset: TDASQLMemdataset;
+
+  protected
+    function  GetDatasetClass: TDatasetClass; override;
+    procedure CreateInternalFields(aDataset: TDataset; someFieldDefinitions: TDAFieldCollection); override;
+    procedure DoSort(const FieldNames: array of string; const Directions: array of TDASortDirection); override;
+
+    procedure DoBeforeOpenDataset; override;
+    procedure DoAfterCloseDataset; override;
+
+    procedure SetMasterSource(const Value: TDADataSource); override;
+    function  GetMasterSource: TDADataSource; override;
+    procedure SetDetailsFields(const Value: string); override;
+    procedure SetMasterFields(const Value: string); override;
+    function  GetDetailFields: string; override;
+    function  GetMasterFields: string; override;
+
+    function  GetIndexDefs: TIndexDefs;
+    procedure SetIndexDefs(const Value: TIndexDefs);
+    function  GetIndexName: string;
+    procedure SetIndexName(const Value: string);
+
+    function  GetFilter: string; override;
+    function  GetFiltered: boolean; override;
+    procedure SetFilter(const Value: string); override;
+    procedure SetFiltered(const Value: boolean); override;
+
+  public
+    constructor Create(aOwner: TComponent); override;
+
+  published
+    property IndexDefs: TIndexDefs read GetIndexDefs write SetIndexDefs;
+    property IndexName: string read GetIndexName write SetIndexName;
+  end;
+
+implementation
+
+uses Variants;
+
+constructor TDASQLMemTable.Create(aOwner: TComponent);
+begin
+  inherited;
+  fSQLMemDataset := TDASqlMemDataset(Dataset);
+  fSQLMemDataset.FilterOptions :=  [foCaseInsensitive];
+end;
+
+procedure TDASQLMemTable.CreateInternalFields(aDataset: TDataset; someFieldDefinitions: TDAFieldCollection);
+  var tblName : String;
+begin
+  inherited;
+  if fSQLMemDataset.TableName = '' then begin
+    tblname := formatdatetime('ddddmmmmdyyyyhhmmsz',now);
+    fSQLMemDataset.TableName := 'tbl'+tblname;
+    fSQLMemDataset.CreateTable;
+  end else begin
+     fSQLMemDataset.close;
+     fSQLMemDataset.EmptyTable;
+     fSQLMemDataset.FieldDefs.clear;
+     fSQLMemDataset.IndexDefs.Clear;
+     fSQLMemDataset.RestructureFieldDefs.Clear;
+     fSQLMemDataset.RestructureIndexDefs.Clear;
+     fSQLMemDataset.ImportTable(dataset);
+  end;
+end;
+
+procedure TDASQLMemTable.DoSort(const FieldNames: array of string; const Directions: array of TDASortDirection);
+const
+  DirectionStr: array[TDASortDirection] of string = ('ASC', 'DESC');
+var
+  ascfields, descfields,
+  idxname: string;
+  i: integer;
+  idx: TIndexDef;
+begin
+  with fSQLMemDataset do begin
+    if (Length(FieldNames) = 0) then begin
+      IndexName := '';
+      Exit;
+    end;
+
+    idxname := '';
+    for i := 0 to Length(FieldNames) - 1 do
+      idxname := idxname + FieldNames[i] + '_' + DirectionStr[Directions[i]];
+
+    idx := TDefCollection(IndexDefs).Find(idxname) as TIndexDef;
+    if (idx = nil) then begin
+      ascfields := '';
+      descfields := '';
+
+      for i := 0 to Length(Directions) - 1 do
+        case Directions[i] of
+          sdAscending: ascfields := ascfields + FieldNames[i] + ';';
+          sdDescending: descfields := descfields + FieldNames[i] + ';';
+        end;
+
+      if (descfields='')
+        then fSQLMemDataset.AddIndex(idxname, ascfields, [])
+        else fSQLMemDataset.AddIndex(idxname, descfields, [ixDescending]);
+    end;
+
+    IndexName := idxname;
+  end;
+end;
+
+function TDASQLMemTable.GetDatasetClass: TDatasetClass;
+begin
+  result := TDASQLMemDataset;
+end;
+
+function TDASQLMemTable.GetMasterSource: TDADataSource;
+begin
+  result := fMasterSource;
+end;
+
+procedure TDASQLMemTable.DoAfterCloseDataset;
+begin
+  inherited;
+  fSQLMemDataset.close;
+end;
+
+function TDASQLMemTable.GetFilter: string;
+begin
+  result := fSQLMemDataset.Filter
+end;
+
+procedure TDASQLMemTable.DoBeforeOpenDataset;
+begin
+  inherited;
+end;
+
+procedure TDASQLMemTable.SetMasterSource(const Value: TDADataSource);
+begin
+  fSQLMemDataset.MasterSource := Value;
+  fMasterSource := Value;
+
+  inherited SetMasterSource(Value);
+end;
+
+procedure TDASQLMemTable.SetMasterFields(const Value: string);
+begin
+  fSQLMemDataset.MasterFields := Value;
+  inherited;
+end;
+
+procedure TDASQLMemTable.SetDetailsFields(const Value: string);
+begin
+  fSQLMemDataset.IndexFieldNames := Value
+end;
+
+function TDASQLMemTable.GetDetailFields: string;
+begin
+  result := fSQLMemDataset.IndexFieldNames
+end;
+
+function TDASQLMemTable.GetMasterFields: string;
+begin
+  result := fSQLMemDataset.MasterFields
+end;
+
+function TDASQLMemTable.GetFiltered: boolean;
+begin
+  result := fSQLMemDataset.Filtered
+end;
+
+procedure TDASQLMemTable.SetFilter(const Value: string);
+begin
+  fSQLMemDataset.Filter := Value
+end;
+
+procedure TDASQLMemTable.SetFiltered(const Value: boolean);
+begin
+  fSQLMemDataset.Filtered := Value
+end;
+
+function TDASQLMemTable.GetIndexDefs: TIndexDefs;
+begin
+  result := fSQLMemDataset.IndexDefs
+end;
+
+procedure TDASQLMemTable.SetIndexDefs(const Value: TIndexDefs);
+begin
+  fSQLMemDataset.IndexDefs.Assign(Value);
+end;
+
+function TDASQLMemTable.GetIndexName: string;
+begin
+  result := fSQLMemDataset.IndexName
+end;
+
+procedure TDASQLMemTable.SetIndexName(const Value: string);
+begin
+  fSQLMemDataset.IndexName := Value
+end;
+
+function TDASQLMemdataset.GetActive: boolean;
+begin
+  result := inherited Active;
+end;
+
+function TDASQLMemdataset.GetDataTable: TDADataTable;
+begin
+  result := TDADataTable(Owner);
+end;
+
+procedure TDASQLMemdataset.InternalRefresh;
+begin
+
+end;
+
+end.
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/eDefines.inc b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/eDefines.inc
new file mode 100644
index 0000000..90b17b7
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/eDefines.inc	
@@ -0,0 +1,459 @@
+{----------------------------------------------------------------------------}
+{file:      eDefines.inc                                                     }
+{type:      Delphi include file                                              }
+{                                                                            }
+{compiler:  Borland Pascal 7,                                                }
+{           Delphi 1-7, 2005-2007 for Win32                                  }
+{           Kylix 1-3,                                                       }
+{           C++Builder 1-6, 2006-2007                                        }
+{           Free Pascal Compiler 2.x                                         }
+{                                                                            }
+{platforms: DOS, DPMI, Win16, Win32, Win64, Linux, Mac OS X                  }
+{                                                                            }
+{author:    mh@elitedev.com                                                  }
+{                                                                            }
+{contents:  Defines that can be flexibily used to determine the exact        }
+{           compiler version used.                                           }
+{                                                                            }
+{(c)opyright elitedevelopments software. all rights reserved.                }
+{            http://www.elitedev.com                                         }
+{                                                                            }
+{ Third Party component developers are encouraged to use the set of defines  }
+{ established in this file, rather then their own system, for checking their }
+{ component libraries agains different versions of Delphi and C++Builder.    }
+{                                                                            }
+{ This file may be distributed freely with both free and commercial source   }
+{ libraries, but you are asked to please leave this comment in place, and    }
+{ to return any improvements you make to this file to the maintainer that    }
+{ is noted above.                                                            }
+{----------------------------------------------------------------------------}
+
+{----------------------------------------------------------------------------}
+{ Compiler and OS version defines:                                           }
+{                                                                            }
+{ exact compiler versions:                                                   }
+{                                                                            }
+{ BP7             Borland Pascal 7.0                                         }
+{ DELPHI1         Delphi 1.0 (any Delphi)                                    }
+{ DELPHI2         Delphi 2.0                                                 }
+{ DELPHI3         Delphi 3.0                                                 }
+{ DELPHI4         Delphi 4.0                                                 }
+{ DELPHI5         Delphi 5.0                                                 }
+{ DELPHI6         Delphi 6.0                                                 }
+{ DELPHI7         Delphi 7.0                                                 }
+{ DELPHI9         Delphi 2005                                                }
+{ DELPHI2005      Delphi 2005                                                }
+{ DELPHI2006      Delphi 2006                                                }
+{ DELPHI2007      Delphi 2007                                                }
+{ KYLIX1          Kylix 1.0                                                  }
+{ KYLIX2          Kylix 2.0                                                  }
+{ KYLIX3          Kylix 3.0                                                  }
+{ CBUILDER1       C++Builder 1.0                                             }
+{ CBUILDER3       C++Builder 3.0                                             }
+{ CBUILDER4       C++Builder 4.0                                             }
+{ CBUILDER5       C++Builder 5.0                                             }
+{                                                                            }
+{                                                                            }
+{ minimum compiler versions:                                                 }
+{                                                                            }
+{ DELPHI1UP       Delphi 1.0 and above (any Delphi)                          }
+{ DELPHI2UP       Delphi 2.0 and above                                       }
+{ DELPHI3UP       Delphi 3.0 and above                                       }
+{ DELPHI4UP       Delphi 4.0 and above                                       }
+{ DELPHI5UP       Delphi 5.0 and above                                       }
+{ DELPHI6UP       Delphi 6.0 and above                                       }
+{ DELPHI7UP       Delphi 7.0 and above                                       }
+{ DELPHI9UP       Delphi 9.0 (2005) and above                                }
+{ DELPHI10UP      Delphi 10.0 (2006) and above                               }
+{ DELPHI11UP      Delphi 11.0 (2007) and above                               }
+{ DELPHI2005UP    Delphi 2005 and above                                      }
+{ DELPHI2006UP    Delphi 2006 and above                                      }
+{ DELPHI2007UP    Delphi 2007 and above                                      }
+{ KYLIX1UP        Kylix 1.0 and above (any Kylix)                            }
+{ KYLIX2UP        Kylix 2.0 and above (any Kylix)                            }
+{ KYLIX3UP        Kylix 3.0 and above (any Kylix)                            }
+{ CBUILDER1UP     C++Builder 1.0 and above or Delphi 2 and above             }
+{ CBUILDER3UP     C++Builder 3.0 and above or Delphi 3.0 and above           }
+{ CBUILDER4UP     C++Builder 4.0 and above or Delphi 4.0 and above           }
+{ CBUILDER5UP     C++Builder 5.0 and above or Delphi 5.0 and above           }
+{ CBUILDER6UP     C++Builder 5.0 and above or Delphi 5.0 and above           }
+{                                                                            }
+{                                                                            }
+{ compiler types:                                                            }
+{                                                                            }
+{ BP              Borland Pascal (not Delphi or C++Builder)                  }
+{ DELPHI          any Delphi version (but not C++Builder or Kylix)           }
+{ KYLIX           any Kylix version (not Delphi or C++Builder for Windows)   }
+{ CBUILDER        any C++Builder for Windows (Pascal)                        }
+{                                                                            }
+{                                                                            }
+{ target platforms compiler types:                                           }
+{                                                                            }
+{ DELPHI_16BIT    16bit Delphi (but not C++Builder!)                         }
+{ DELPHI_32BIT    32bit Delphi (but not C++Builder)                          }
+{ KYLIX_32BIT     32bit Kylix (but not C++Builder)                           }
+{ CBUILDER_32BIT  32bit C++Builer's Pascal (but not Delphi)                  }
+{                                                                            }
+{                                                                            }
+{ target cpu types                                                           }
+{                                                                            }
+{ CPU16           16bit Delphi or Borland Pascal                             }
+{ CPU32           32bit Delphi or Free Pascal                                }
+{ CPU64           64bit Free Pascal                                          }
+{                                                                            }
+{ target platforms                                                           }
+{                                                                            }
+{ DOS             any DOS (plain and DPMI)                                   }
+{ REALMODE        16bit realmode DOS                                         }
+{ PROTECTEDMODE   16bit DPMI DOS                                             }
+{                                                                            }
+{ MSWINDOWS       any Windows platform                                       }
+{ WIN16           16bit Windows                                              }
+{ WIN32           32bit Windows                                              }
+{ WIN64           64bit Windows                                              }
+{ DOTNET          .NET                                                       }
+{                                                                            }
+{ LINUX           any Linux platform                                         }
+{ LINUX32         32bit Linux                                                }
+{ LINUX64         64bit Linux                                                }
+{                                                                            }
+{ DARWIN          Any Mac OS X                                               }
+{ DARWIN32        32bit Mac OS X                                             }
+{ DARWIN64        64bit Mac OS X                                             }
+{----------------------------------------------------------------------------}
+
+{ defines for Borland Pascal 7.0 }
+{$IFDEF VER70}
+  {$DEFINE BP}
+  {$DEFINE BP7}
+  {$DEFINE 16BIT}
+  {$DEFINE CPU16}
+
+  { defines for BP7 DOS real mode }
+  {$IFDEF MSDOS}
+    {$DEFINE DOS}
+    {$DEFINE REALMODE}
+  {$ENDIF}
+
+  { defines for BP7 DOS protected mode }
+  {$IFDEF DPMI}
+    {$DEFINE DOS}
+    {$DEFINE PROTECTEDMODE}
+  {$ENDIF}
+
+  { defines for BP7 Windows }
+  {$IFDEF WINDOWS}
+    {$DEFINE MSWINDOWS}
+    {$DEFINE WIN16}
+  {$ENDIF}
+{$ENDIF}
+
+{ defines for Delphi 1.0 thru 7.0 }
+{$IFDEF MSWINDOWS}
+
+  { defines for Delphi 1.0 }
+  {$IFDEF VER80}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI1}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI_16BIT}
+    {$DEFINE WIN16}
+    {$DEFINE 16BIT}
+    {$DEFINE CPU16}
+  {$ENDIF}
+
+  { defines for Delphi 2.0 }
+  {$IFDEF VER90}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI2}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+  {$ENDIF}
+
+  { defines for C++Builder 1.0 }
+  {$IFDEF VER93}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE CBUILDER}
+    {$DEFINE CBUILDER1}
+    {$DEFINE CBUILDER1UP}
+  {$ENDIF}
+
+  { defines for Delphi 3.0 }
+  {$IFDEF VER100}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI3}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+  {$ENDIF}
+
+  { defines for C++Builder 3.0 }
+  {$IFDEF VER110}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE CBUILDER}
+    {$DEFINE CBUILDER3}
+    {$DEFINE CBUILDER1UP}
+    {$DEFINE CBUILDER3UP}
+  {$ENDIF}
+
+  { defines for Delphi 4.0 }
+  {$IFDEF VER120}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI4}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+  {$ENDIF}
+
+  { defines for C++Builder 4.0 }
+  {$IFDEF VER125}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+    {$DEFINE CBUILDER}
+    {$DEFINE CBUILDER4}
+    {$DEFINE CBUILDER1UP}
+    {$DEFINE CBUILDER3UP}
+    {$DEFINE CBUILDER4UP}
+  {$ENDIF}
+  { defines for Delphi 5.0 }
+  {$IFDEF VER130}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI5}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+    {$DEFINE DELPHI5UP}
+  {$ENDIF}
+
+  { defines for C++Builder 5.0 }
+  {$IFDEF VER135}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+    {$DEFINE DELPHI5UP}
+    {$DEFINE CBUILDER}
+    {$DEFINE CBUILDER5}
+    {$DEFINE CBUILDER1UP}
+    {$DEFINE CBUILDER3UP}
+    {$DEFINE CBUILDER4UP}
+    {$DEFINE CBUILDER5UP}
+  {$ENDIF}
+
+  { defines for Delphi 6.0 }
+  {$IFDEF VER140}
+    {$DEFINE VER140UP}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI6}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+    {$DEFINE DELPHI5UP}
+    {$DEFINE DELPHI6UP}
+  {$ENDIF}
+
+  { defines for Delphi 7.0 }
+  {$IFDEF VER150}
+    {$DEFINE VER140UP}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI7}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+    {$DEFINE DELPHI5UP}
+    {$DEFINE DELPHI6UP}
+    {$DEFINE DELPHI7UP}
+  {$ENDIF}
+
+  { defines for Delphi 2005 }
+  {$IFDEF VER170}
+    {$DEFINE VER140UP}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI9}
+    {$DEFINE DELPHI2005}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+    {$DEFINE DELPHI5UP}
+    {$DEFINE DELPHI6UP}
+    {$DEFINE DELPHI7UP}
+    {$DEFINE DELPHI9UP}
+    {$DEFINE DELPHI2005UP}
+    {$DEFINE BDS}
+    {$DEFINE BDS3}
+    {$DEFINE BDS3UP}
+  {$ENDIF}
+
+  { defines for Delphi 2006 }
+  {$IFDEF VER180}
+    {$DEFINE VER140UP}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI10}
+    {$DEFINE DELPHI10A}  
+    {$DEFINE DELPHI2006}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+    {$DEFINE DELPHI5UP}
+    {$DEFINE DELPHI6UP}
+    {$DEFINE DELPHI7UP}
+    {$DEFINE DELPHI9UP}
+    {$DEFINE DELPHI10UP}
+    {$DEFINE DELPHI2005UP}
+    {$DEFINE DELPHI2006UP}
+    {$DEFINE BDS}
+    {$DEFINE BDS4}
+    {$DEFINE BDS3UP}
+    {$DEFINE BDS4UP}
+  {$ENDIF}
+
+  { defines for Delphi 2007 }
+  {$IFDEF VER185}
+    {$UNDEF DELPHI10A}  // declared in VER180
+    {$UNDEF DELPHI2006} // declared in VER180
+    {$UNDEF BDS4}       // declared in VER180
+
+    {$DEFINE DELPHI10B}    
+    {$DEFINE DELPHI10BUP}    
+    {$DEFINE DELPHI11}    
+    {$DEFINE DELPHI11UP}    
+    {$DEFINE DELPHI2007}
+    {$DEFINE DELPHI2007UP}    
+    {$DEFINE BDS5}
+    {$DEFINE BDS5UP}
+  {$ENDIF}
+
+  { defines for Delphi 2009 }
+  {$IFDEF VER200}
+    {$DEFINE VER140UP}
+    {$DEFINE DELPHI}
+
+    {$DEFINE DELPHI12}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+    {$DEFINE DELPHI5UP}
+    {$DEFINE DELPHI6UP}
+    {$DEFINE DELPHI7UP}
+    {$DEFINE DELPHI9UP}
+    {$DEFINE DELPHI10UP}
+    {$DEFINE DELPHI11UP}
+    {$DEFINE DELPHI12UP}
+
+    {$DEFINE DELPHI2009}
+    {$DEFINE DELPHI2005UP}
+    {$DEFINE DELPHI2006UP}
+    {$DEFINE DELPHI2007UP}
+    {$DEFINE DELPHI2009UP}
+
+    {$DEFINE BDS}
+    {$DEFINE BDS6}
+    {$DEFINE BDS3UP}
+    {$DEFINE BDS4UP}
+    {$DEFINE BDS5UP}
+    {$DEFINE BDS6UP}
+    {$DEFINE BDS6}
+    {$DEFINE BDS6UP}
+  {$ENDIF}
+
+  {$IFDEF WIN32}
+    {$DEFINE MSWINDOWS} //not automatically defined for Delphi 2 thru 5
+    {$DEFINE 32BIT}
+    {$DEFINE CPU32}
+  {$ENDIF}
+
+{$ENDIF MSWINDOWS}
+
+{ defines for "Delphi for .NET" }
+{$IFDEF CLR}
+  {$DEFINE DOTNET}
+{$ENDIF}
+
+{$IFDEF DELPHI}
+  {$IFDEF DELPHI2UP}
+    {$DEFINE DELPHI_32BIT}
+  {$ENDIF}
+{$ENDIF}
+
+{$IFDEF CBUILDER}
+  {$DEFINE CBUILDER_32BIT}
+{$ENDIF}
+
+{$IFNDEF FPC}
+
+  { Kylix 1.0 thru 3.0 }
+  {$IFDEF LINUX}
+
+    {$DEFINE VER140UP}
+
+    { Any Kylix }
+    {$DEFINE 32BIT}
+    {$DEFINE LINUX32}
+    {$DEFINE KYLIX_32BIT}
+    {$DEFINE KYLIX}
+    {$DEFINE KYLIX1UP}
+
+    {$IFDEF CONDITIONALEXPRESSIONS}
+      {$IF Declared(CompilerVersion)}
+
+         { Kylix 2.0 }
+         {$IF Declared(RTLVersion) and (RTLVersion = 14.1)}
+           {$DEFINE KYLIX2}
+           {$DEFINE KYLIX1UP}
+           {$DEFINE KYLIX2UP}
+         {$IFEND}
+
+         { Kylix 3.0 - Delphi portion }
+         {$IF Declared(RTLVersion) and (RTLVersion = 14.5)}
+           {$DEFINE KYLIX3}
+           {$DEFINE KYLIX1UP}
+           {$DEFINE KYLIX2UP}
+           {$DEFINE KYLIX3UP}
+         {$IFEND}
+
+      { Kylix 1.0 }
+      {$ELSE}
+        {$DEFINE KYLIX1}
+      {$IFEND}
+    {$ENDIF CONDITIONALEXPRESSIONS}
+
+  {$ENDIF LINUX}
+{$ENDIF}
+
+{ CPU }
+
+{$IFDEF FPC}
+  {$IFDEF MSWINDOWS}
+    {$IFDEF CPU64}
+      {$DEFINE WIN64}
+    {$ENDIF}
+  {$ENDIF}
+  {$IFDEF LINUX}
+    {$IFDEF CPU32}
+      {$DEFINE LINUX32}
+    {$ENDIF}
+    {$IFDEF CPU64}
+      {$DEFINE LINUX64}
+    {$ENDIF}
+  {$ENDIF}
+  {$IFDEF DARWIN}
+    {$IFDEF CPU32}
+      {$DEFINE DARWIN32}
+    {$ENDIF}
+    {$IFDEF CPU64}
+      {$DEFINE DARWIN64}
+    {$ENDIF}
+  {$ENDIF}
+{$ENDIF}
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAADODataTable.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAADODataTable.pas
new file mode 100644
index 0000000..c02dbd1
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAADODataTable.pas	
@@ -0,0 +1,285 @@
+unit uDAADODataTable;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up                                                  }
+{ platform: Win32                                                            }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses Classes, DB, uDAInterfaces, uDADataTable, ADODB;
+
+type
+  { TDAADODataset }
+  TDAADODataset = class(TADODataset, IDADataTableDataset)
+  private
+    FLocateRecordMode: Boolean;
+  protected
+    function GetDataTable: TDADataTable; safecall;
+    procedure InternalRefresh; override;
+    procedure InternalInitFieldDefs; override;
+    procedure DataEvent(Event: TDataEvent; Info: Longint); override;
+  public
+    function Locate(const KeyFields: string; const KeyValues: Variant;
+      Options: TLocateOptions): Boolean; override;
+    function Lookup(const KeyFields: string; const KeyValues: Variant;
+      const ResultFields: string): Variant; override;
+  end;
+
+  { TDAADODataTable }
+  TDAADODataTable = class(TDADataTable)
+  private
+    fADODataset: TDAADODataset;
+  protected
+    function GetDatasetClass: TDatasetClass; override;
+    procedure CreateInternalFields(aDataset: TDataset; someFieldDefinitions: TDAFieldCollection); override;
+    procedure DoAfterCloseDataset; override;
+    procedure DoSort(const FieldNames: array of string; const Directions: array of TDASortDirection); override;
+
+    procedure SetMasterSource(const Value: TDADataSource); override;
+    function GetMasterSource: TDADataSource; override;
+    procedure SetDetailsFields(const Value: string); override;
+    procedure SetMasterFields(const Value: string); override;
+    function GetDetailFields: string; override;
+    function GetMasterFields: string; override;
+
+    function GetFilter: string; override;
+    function GetFiltered: boolean; override;
+    procedure SetFilter(const Value: string); override;
+    procedure SetFiltered(const Value: boolean); override;
+  public
+    constructor Create(aOwner: TComponent); override;
+    procedure EnableConstraints; override; safecall;
+    procedure DisableConstraints; override; safecall; 
+  end;
+
+implementation
+
+uses
+  ADOInt, Variants, SysUtils;
+
+{ TDAADODataTable }
+
+constructor TDAADODataTable.Create(aOwner: TComponent);
+begin
+  inherited;
+
+  fADODataset := TDAADODataset(Dataset);
+end;
+
+procedure TDAADODataTable.CreateInternalFields(aDataset: TDataset;
+  someFieldDefinitions: TDAFieldCollection);
+var
+  i, n: Integer;
+  lDataType: DataTypeEnum;
+  TmpRecordset: _Recordset;
+
+begin
+  inherited;
+
+  { this loop should be obsolete now with fix to #1674. Keeping for backward compatibilty. mh. }
+  with fADODataset do begin
+    for i := 0 to Fields.Count - 1 do begin
+      if (Fields[i].FieldKind = fkInternalCalc) then begin
+        Fields[i].FieldKind := fkCalculated;
+        with Fields[i] do begin
+          FieldDefs.Add(FieldName, DataType, Size, Required);
+        end;
+      end;
+    end;
+  end;
+
+  fADODataset.CursorLocation := clUseClient;
+  fADODataset.CursorType := ctDynamic;
+  fADODataset.CreateDataSet;
+
+  if (fADODataset.FieldCount > 0) then begin
+    TmpRecordset := CoRecordset.Create;
+    for n := 0 to fADODataset.RecordSet.Fields.Count - 1 do begin
+      with fADODataset.RecordSet.Fields.Item[n] do begin
+        lDataType := Type_;
+        if (lDataType = adVarChar)
+          then lDataType := adVarWChar;
+        TmpRecordSet.Fields.Append(Name, lDataType, DefinedSize, Attributes);
+      end;
+    end;
+    TmpRecordset.Open(EmptyParam, EmptyParam, adOpenUnspecified, adLockUnspecified, 0);
+    fADODataset.Recordset := TmpRecordset;
+    fADODataset.Open;
+  end;
+end;
+
+function TDAADODataTable.GetDatasetClass: TDatasetClass;
+begin
+  result := TDAADODataset;
+end;
+
+procedure TDAADODataTable.DoSort(const FieldNames: array of string; const Directions: array of TDASortDirection);
+const
+  DirectionStr: array[TDASortDirection] of string = ('ASC', 'DESC');
+var
+  i: integer;
+  sortexp: string;
+begin
+  with fADODataSet do begin
+
+    if (Length(FieldNames) = 0) then
+      Sort := ''
+
+    else begin
+      sortexp := '';
+      for i := 0 to Length(FieldNames) - 1 do
+        sortexp := sortexp + FieldNames[i] + ' ' + DirectionStr[Directions[i]] + ', ';
+
+      Sort := Copy(sortexp, 1, Length(sortexp) - 2);
+    end;
+  end;
+end;
+
+function TDAADODataTable.GetDetailFields: string;
+begin
+  result := fADODataset.IndexFieldNames
+end;
+
+function TDAADODataTable.GetMasterFields: string;
+begin
+  result := fADODataset.MasterFields
+end;
+
+function TDAADODataTable.GetMasterSource: TDADataSource;
+begin
+  result := TDADataSource(fADODataset.DataSource)
+end;
+
+procedure TDAADODataTable.SetDetailsFields(const Value: string);
+begin
+  fADODataset.IndexFieldNames := Value
+end;
+
+procedure TDAADODataTable.SetMasterFields(const Value: string);
+begin
+  inherited;
+  fADODataset.MasterFields := Value
+end;
+
+procedure TDAADODataTable.SetMasterSource(const Value: TDADataSource);
+begin
+  inherited;
+  fADODataset.DataSource := Value
+end;
+
+function TDAADODataTable.GetFilter: string;
+begin
+  result := fADODataset.Filter
+end;
+
+function TDAADODataTable.GetFiltered: boolean;
+begin
+  result := fADODataset.Filtered
+end;
+
+procedure TDAADODataTable.SetFilter(const Value: string);
+begin
+  fADODataset.Filter := Value
+end;
+
+procedure TDAADODataTable.SetFiltered(const Value: boolean);
+begin
+  fADODataset.Filtered := Value
+end;
+
+procedure TDAADODataTable.DoAfterCloseDataset;
+begin
+  inherited;
+
+  // These checks prevent the error "the provider does not support the necessary interface for index functionality"
+  // that occourrs when the data table is being closed
+
+  with fADODataset do begin
+    if (IndexName<>'')
+      then fADODataset.IndexName := '';
+
+    if (IndexDefs.Count>0)
+      then IndexDefs.Clear;
+  end;
+end;
+
+procedure TDAADODataTable.DisableConstraints;
+var
+  i: Integer;
+begin
+  for i := fADODataset.Fields.Count -1 downto 0 do
+  begin
+    fADODataset.Fields[i].Required := False;
+  end;
+end;
+
+procedure TDAADODataTable.EnableConstraints;
+var
+  i: Integer;
+begin
+  for i := fADODataset.Fields.Count -1 downto 0 do
+  begin
+    if i <> 0 then
+      fADODataset.Fields[i].Required := Fields[i -1].Required;
+  end;
+end;
+
+{ TDAADODataset }
+
+procedure TDAADODataset.DataEvent(Event: TDataEvent; Info: Integer);
+begin
+  if FLocateRecordMode and (Event = deCheckBrowseMode) and (Info = 0) and (Self.State = dsBrowse) then
+    // nothing
+  else
+    inherited;
+end;
+
+function TDAADODataset.GetDataTable: TDADataTable;
+begin
+  result := TDADataTable(Owner);
+end;
+
+procedure TDAADODataset.InternalInitFieldDefs;
+begin
+  inherited;
+end;
+
+procedure TDAADODataset.InternalRefresh;
+begin
+  // Does nothing
+end;
+
+function TDAADODataset.Locate(const KeyFields: string;
+  const KeyValues: Variant; Options: TLocateOptions): Boolean;
+begin
+  FLocateRecordMode:=True;
+  try
+    Result := inherited Locate(KeyFields,KeyValues,Options);
+  finally
+    FLocateRecordMode:= False;
+  end;
+end;
+
+function TDAADODataset.Lookup(const KeyFields: string;
+  const KeyValues: Variant; const ResultFields: string): Variant;
+begin
+  FLocateRecordMode:=True;
+  try
+    Result := inherited Lookup(KeyFields, KeyValues, ResultFields);
+  finally
+    FLocateRecordMode:= False;
+  end;
+end;
+
+end.
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAADOInterfaces.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAADOInterfaces.pas
new file mode 100644
index 0000000..cf1d01d
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAADOInterfaces.pas	
@@ -0,0 +1,1277 @@
+unit uDAADOInterfaces;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up                                                  }
+{ platform: Win32                                                            }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  uDAInterfaces, uDAEngine, uROClasses;
+
+const
+  stdMSSQL_ConnectionString = 'User ID=%s;Password=%s;Initial Catalog=%s;Data Source=%s';
+
+  // OLE DB Services = -2 means we don't want ADO Connection pooling done for us!
+  stdADO_ConnectionString = 'Provider=%s;' + stdMSSQL_ConnectionString + ';OLE DB SERVICES=-2';
+
+  MSSQL_DriverType = 'MSSQL';
+  Access_DriverType = 'Access';
+  FoxPro_DriverType  ='FoxPro';
+  ODBC_DriverType = '';//'ODBC';
+  ASA_DriverType = 'ASA';
+  Sybase_DriverType = 'Sybase';
+  Informix_DriverType = 'Informix';
+  DB2_DriverType = 'DB2';
+  Paradox_DriverType = 'Paradox';
+
+const
+  // Standard OLEDB providers identifiers
+  oledb_UnknownId = '???';
+  oledb_MSSQLId = 'SQLOLEDB.1';
+  oledb_JetId = 'Microsoft.Jet.OLEDB.4.0';
+  oledb_OracleId = 'MSDAORA.1';
+  oledb_ODBCId = 'MSDASQL.1';
+  oledb_MSSQL2005Id ='SQLNCLI.1';
+  oledb_PostgresqlId = 'PostgreSQL.1';
+  oleDb_VisualFoxProId = 'VFPOLEDB.1';
+  oledb_MSSQL2008Id = 'SQLNCLI10.1';
+
+type
+  // Standard OLEDB providers enumerated
+  TDAOleDBProviderType = (oledb_Unknown,
+    oledb_MSSQL,
+    oledb_Jet,
+    oledb_Oracle,
+    oledb_ODBC,
+    oledb_MSSQL2005,
+    oledb_Postgresql,
+    oleDb_VisualFoxPro,
+    oledb_MSSQL2008
+    );
+
+const
+  // Standard OLEDB providers identifier array (useful for lookups)
+  OleDBProviders: array[TDAOleDBProviderType] of string = (
+    oledb_UnknownId,
+    oledb_MSSQLId,
+    oledb_JetId,
+    oledb_OracleId,
+    oledb_ODBCId,
+    oledb_MSSQL2005Id,
+    oledb_PostgresqlId,
+    oleDb_VisualFoxProId,
+    oledb_MSSQL2008Id
+    );
+
+type
+  { IADOConnection
+      For identification purposes. Implemented by all ADO connections and also those that target MSSQL-only such as SDAC }
+  IDAADOConnection = interface(IDAConnection)
+    ['{979D10CF-FD56-4C16-8074-338CADA9F1CD}']
+    function GetProviderName: string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetProviderType: TDAOleDBProviderType; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    property ProviderName: string read GetProviderName;
+    property ProviderType: TDAOleDBProviderType read GetProviderType;
+
+    function GetCommandTimeout: Integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetCommandTimeout(const Value: Integer); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    property CommandTimeout: Integer read GetCommandTimeout write SetCommandTimeout;
+  end;
+
+  TDAMSConnection = class(TDAEConnection,IDACanQueryDatabaseNames)
+  protected
+    fMSSQLSchemaEnabled: Boolean;
+    procedure DoGetTableNames(out List: IROStrings); override;
+    procedure DoGetStoredProcedureNames(out List: IROStrings); override;
+    procedure DoGetStoredProcedureParams(const aStoredProcedureName: string; out Params: TDAParamCollection); override;
+    procedure DoGetViewNames(out List: IROStrings); override;
+    function DoGetLastAutoInc(const GeneratorName: string): integer; override;
+    function CreateMacroProcessor: TDASQLMacroProcessor; override;
+    procedure DoGetTableFields(const aTableName: string; out Fields: TDAFieldCollection); override;
+    procedure DoGetForeignKeys(out ForeignKeys: TDADriverForeignKeyCollection); override;
+    function GetSPSelectSyntax(HasArguments: Boolean): String; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function IdentifierNeedsQuoting(const iIdentifier: string): boolean; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // IDACanQueryDatabaseNames
+    function GetDatabaseNames: IROStrings;
+  public
+    property MSSQLSchemaEnabled: Boolean read fMSSQLSchemaEnabled write fMSSQLSchemaEnabled;
+  end;
+
+  TDAMSSQLDriver = class(TDAEDriver)
+  protected
+    function GetDefaultConnectionType(const AuxDriver: string): string; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  end;
+
+function OleDBDriverIdToOleDBProviderType(const anID: string): TDAOleDBProviderType;
+procedure MSSQL_GetAuxParams(const List: IROStrings);
+procedure MSSQL_DoGetNames(Query: IDADataset; AList: IROStrings; AObjectType: TDAObjecttype; SchemaEnabled: Boolean);
+function MSSQL_DoGetLastAutoInc(const GeneratorName: string;Query: IDADataset): integer;
+function MSSQL_CreateMacroProcessor: TDASQLMacroProcessor;
+procedure MSSQL_DoGetTableFields(const aTableName: string; Query: IDADataset; out Fields: TDAFieldCollection);
+procedure MSSQL_DoGetForeignKeys(Query: IDADataset; ForeignKeys: TDADriverForeignKeyCollection; SchemaEnabled: Boolean);
+function MSSQL_GetSPSelectSyntax(HasArguments: Boolean): String;
+function MSSQL_IdentifierNeedsQuoting(const iIdentifier: string): boolean;
+function MSSQL_GetQuoteChars: TDAQuoteCharArray;
+function MSSQL_GetDatabaseNames(aConnection:TDAEConnection): IROStrings;
+function MSACCESS_GetFileExtensions: IROStrings;
+procedure MSSQL_DoGetStoredProcedureParams(const aStoredProcedureName: string; Query: IDADataset; out Params: TDAParamCollection);
+
+implementation
+
+uses
+  SysUtils, {$IFDEF MSWINDOWS} Windows,{$ENDIF}
+  uDAMacroProcessors;
+
+const
+  MSSQL_MasterDatabase = 'master';
+  MSSQL_GetDatabaseNames_SQL = 'select Name from sysdatabases order by Name';
+
+var
+  ado_reservedwords: array of string;
+
+function OleDBDriverIdToOleDBProviderType(const anID: string): TDAOleDBProviderType;
+var
+  x: TDAOleDBProviderType;
+begin
+  result := oledb_Unknown;
+
+  for x := Low(TDAOleDBProviderType) to High(TDAOleDBProviderType) do
+    if SameText(OleDBProviders[x], anID) then begin
+      result := x;
+      Exit;
+    end;
+end;
+
+procedure MSSQL_GetAuxParams(const List: IROStrings);
+begin
+  List.Add('Integrated Security=SSPI');
+  List.Add('Schemas=0,1');
+end;
+
+procedure MSSQL_DoGetNames(Query: IDADataset; AList: IROStrings; AObjectType: TDAObjecttype; SchemaEnabled: Boolean);
+var
+  fWhere: string;
+begin
+  try
+    case AObjectType of
+      dotTable: begin
+        if not SchemaEnabled then fWhere:='AND (TABLE_SCHEMA = ''dbo'') ';
+        Query.SQL := 'SELECT TABLE_SCHEMA, TABLE_NAME FROM INFORMATION_SCHEMA.TABLES ' +
+                    'WHERE (OBJECTPROPERTY(OBJECT_ID(TABLE_SCHEMA + ''.'' + TABLE_NAME), ''IsMsShipped'') = 0) ' +
+                    'AND (TABLE_TYPE = ''BASE TABLE'') ' +fWhere+
+                    'ORDER BY 1, 2';
+        end;
+      dotProcedure: begin
+        if not SchemaEnabled then fWhere:='AND (ROUTINE_SCHEMA = ''dbo'') ';
+        Query.SQL := 'SELECT ROUTINE_SCHEMA, ROUTINE_NAME ' +
+                    'FROM INFORMATION_SCHEMA.ROUTINES ' +
+                    'WHERE (OBJECTPROPERTY(OBJECT_ID(ROUTINE_SCHEMA + ''.'' + ROUTINE_NAME), ''IsMsShipped'') = 0) AND (ROUTINE_TYPE = ''PROCEDURE'') ' +fWhere+
+                    'ORDER BY 1, 2';
+        end;
+      dotView: begin
+        if not SchemaEnabled then fWhere:='AND (TABLE_SCHEMA = ''dbo'') ';
+        Query.SQL := 'SELECT TABLE_SCHEMA, TABLE_NAME FROM INFORMATION_SCHEMA.TABLES ' +
+                    'WHERE (OBJECTPROPERTY(OBJECT_ID(TABLE_SCHEMA + ''.'' + TABLE_NAME), ''IsMsShipped'') = 0) ' +
+                    'AND (TABLE_TYPE = ''VIEW'') ' +
+                    'ORDER BY 1, 2';
+        end;
+    else
+    end;
+    Query.Open;
+    while not Query.EOF do begin
+      if SchemaEnabled then
+        AList.Add(Format('%s.%s', [Trim(Query.Fields[0].AsString), Trim(Query.Fields[1].AsString)]))
+      else
+        AList.Add(Trim(Query.Fields[1].AsString));
+      Query.Next;
+    end;
+    Query.Close;
+  finally
+    Query := nil;
+  end;
+end;
+
+function MSSQL_DoGetLastAutoInc(const GeneratorName: string;Query: IDADataset): integer;
+begin
+  try
+     // Using Ident_Current is not fully safe
+     //if Trim(GeneratorName) <> '' then
+     //  Query.SQL := 'SELECT IsNull(Ident_Current(' + QuotedStr(GeneratorName) + '), 0) as LastInc'
+     //else
+    Query.SQL := 'SELECT IsNull(@@Identity, 0) as LastInc';
+    Query.Open;
+    result := Query.Fields[0].Value;
+  finally
+    Query := nil;
+  end;
+end;
+
+function MSSQL_CreateMacroProcessor: TDASQLMacroProcessor;
+begin
+  Result := TDAMSSQLMacroProcessor.Create;
+end;
+
+procedure MSSQL_DoGetStoredProcedureParams(const aStoredProcedureName: string; Query: IDADataset; out Params: TDAParamCollection);
+var
+  lProcName, lSchema: string;
+  lparam: TDAParam;
+begin
+  Params := TDAParamCollection.Create(nil);
+  try
+    lProcName := aStoredProcedureName;
+    if pos('.', lProcName) = 0 then begin
+      lSchema := ''
+    end else begin
+      lSchema := copy(lProcName, 1, pos('.', lProcName) - 1);
+      Delete(lProcName, 1, pos('.', lProcName));
+    end;
+    Query.SQL := 'exec sp_sproc_columns '+QuotedStr(lProcName);
+    if lSchema <> '' then Query.SQL := Query.SQL+', '+QuotedStr(lSchema);
+    Query.Open;
+    while not Query.EOF do begin
+      lparam := Params.Add;
+      lParam.Name:= Trim(Copy(Query.FieldByName('COLUMN_NAME').AsString,2,MaxInt));
+      case Query.FieldByName('COLUMN_TYPE').AsSmallInt of
+        1: lparam.ParamType := daptInput;
+        2: lparam.ParamType := daptInputOutput;
+        5: lparam.ParamType := daptResult;
+      else
+        lparam.ParamType := daptUnknown;
+      end;
+      lParam.Size:= Query.FieldByName('Length').AsInteger;
+      case Query.FieldByName('DATA_TYPE').AsInteger of
+        -150	{sql_variant  }   : lparam.DataType := datUnknown; // unsupported now!
+         -11	{uniqueidentifier}: lparam.DataType := datGuid;
+         -10	{ntext}           : lparam.DataType := datWideMemo;
+          -9	{nvarchar}        : lparam.DataType := datWideString;
+          -8	{nchar}           : lparam.DataType := datWideString;
+          -7	{bit}             : lparam.DataType := datBoolean;
+          -6 	{tinyint}         : lparam.DataType := datByte;
+          -5	{bigint}          : lparam.DataType := datLargeInt;
+          -4	{image}           : lparam.DataType := datBlob;
+          -3	{varbinary}       : lparam.DataType := datBlob;
+          -2	{binary}          : lparam.DataType := datBlob;
+          -1 	{text}            : lparam.DataType := datMemo;
+           1	{char}            : lparam.DataType := datString;
+           2	{numeric}         : begin
+                                    lparam.DecimalPrecision:= Query.FieldByName('PRECISION').AsInteger;
+                                    lparam.DecimalScale:= Query.FieldByName('SCALE').AsInteger;
+                                    if (lparam.DecimalPrecision <= 19) and (lparam.DecimalScale <= 4) then
+                                      lparam.DataType := datCurrency
+                                    else
+                                      lparam.DataType := datDecimal
+                                    end;
+           3  {money}           : begin
+                                    lparam.DataType := datCurrency;
+                                    lparam.DecimalPrecision:= Query.FieldByName('PRECISION').AsInteger;
+                                    lparam.DecimalScale:= Query.FieldByName('SCALE').AsInteger;
+                                  end;
+           4	{int}             : lparam.DataType := datInteger;
+           5	{smallint}        : lparam.DataType := datSmallInt;
+           6	{float}           : lparam.DataType := datFloat;
+           7	{real}            : lparam.DataType := datSingleFloat;
+          11 	{datetime}        : lparam.DataType := datDateTime;
+          12	{varchar}         : lparam.DataType := datWideString;
+      else
+        lparam.DataType := datUnknown;
+      end;
+      Query.Next;
+    end;
+  finally
+    Query := nil;
+  end;
+end;
+
+procedure MSSQL_DoGetTableFields(const aTableName: string; Query: IDADataset; out Fields: TDAFieldCollection);
+var
+  dra: TDAField;
+begin
+  Fields := TDAFieldCollection.Create(nil);
+  try
+    Query.SQL := 'SELECT * FROM ' + aTableName + ' WHERE 1=0';
+    Query.Open;
+    Fields.Assign(Query.Fields);
+    Query.Close;
+
+    Query.SQL := 'exec sp_MShelpcolumns '+QuotedStr(aTableName)+', null, ''id'', 1;';
+    Query.Open;
+    try
+      while not Query.Eof do begin
+        dra := Fields.FindField(Trim(Query.FieldByName('COL_NAME').AsString));
+        if Assigned(dra) then
+        begin
+          dra.InPrimaryKey := (Query.FieldByName('COL_FLAGS').AsInteger and $04) = $04;
+          dra.Required := not Query.FieldByName('COL_NULL').AsBoolean;
+          if Query.FieldByName('COL_IDENTITY').AsBoolean then begin
+            if (dra.DataType = datLargeInt) or (dra.DataType = datLargeUInt) then
+              dra.DataType := datLargeAutoInc
+            else
+              dra.DataType := datAutoInc;
+            dra.GeneratorName := aTableName;
+          end;
+          if (AnsiCompareText(Query.FieldByName('COL_BASETYPENAME').asString,'decimal') =0) or
+             (AnsiCompareText(Query.FieldByName('COL_BASETYPENAME').asString,'numeric') =0) then begin
+            dra.DataType := datDecimal;
+            Dra.DecimalScale := Query.FieldByName('COL_SCALE').AsInteger;
+            Dra.DecimalPrecision := Query.FieldByName('COL_PREC').AsInteger;
+          end
+          else
+          if (AnsiCompareText(Query.FieldByName('COL_BASETYPENAME').asString,'uniqueidentifier') =0) then
+            dra.DataType := datGuid
+          else
+          if (AnsiCompareText(Query.FieldByName('COL_BASETYPENAME').asString,'money') =0) or
+             (AnsiCompareText(Query.FieldByName('COL_BASETYPENAME').asString,'smallmoney') =0) then
+             dra.DataType := datCurrency
+          else
+          if (AnsiCompareText(Query.FieldByName('COL_BASETYPENAME').asString,'timestamp') =0) then begin
+             dra.DataType := datBlob;
+             dra.BlobType := dabtTimestamp;
+             dra.LogChanges := false;
+          end;
+        end;
+        Query.Next;
+      end;
+    finally
+      Query.Close;
+    end;
+  finally
+    Query:=nil;
+  end;
+end;
+
+procedure MSSQL_DoGetForeignKeys(Query: IDADataset; ForeignKeys: TDADriverForeignKeyCollection; SchemaEnabled: Boolean);
+const
+  s_fk = 'SELECT ' +
+                    'KCU1.CONSTRAINT_NAME AS CONSTRAINT_NAME, ' +
+                    'KCU1.TABLE_SCHEMA AS FK_TABLE_SCHEMA, ' +
+                    'KCU1.TABLE_NAME AS FK_TABLE_NAME, ' +
+                    'KCU1.COLUMN_NAME AS FK_COLUMN_NAME, ' +
+	                  'KCU2.TABLE_SCHEMA AS PK_TABLE_SCHEMA, ' +
+                	  'KCU2.TABLE_NAME AS PK_TABLE_NAME, ' +
+                    'KCU2.COLUMN_NAME AS PK_COLUMN_NAME ' +
+                    'FROM ' +
+                  	'INFORMATION_SCHEMA.REFERENTIAL_CONSTRAINTS RC ' +
+                  	'JOIN INFORMATION_SCHEMA.KEY_COLUMN_USAGE KCU1 ON  ' +
+                    'KCU1.CONSTRAINT_CATALOG = RC.CONSTRAINT_CATALOG AND KCU1.CONSTRAINT_SCHEMA = RC.CONSTRAINT_SCHEMA AND KCU1.CONSTRAINT_NAME = RC.CONSTRAINT_NAME ' +
+                	  'JOIN INFORMATION_SCHEMA.KEY_COLUMN_USAGE KCU2 ON  ' +
+                    'KCU2.CONSTRAINT_CATALOG = RC.UNIQUE_CONSTRAINT_CATALOG AND KCU2.CONSTRAINT_SCHEMA = RC.UNIQUE_CONSTRAINT_SCHEMA AND KCU2.CONSTRAINT_NAME = RC.UNIQUE_CONSTRAINT_NAME AND KCU2.ORDINAL_POSITION = KCU1.ORDINAL_POSITION ';
+  s_fk_where = ' AND (KCU1.TABLE_SCHEMA = ''dbo'') AND (KCU2.TABLE_SCHEMA = ''dbo'') ';
+  s_fk_Order = 'ORDER BY KCU1.TABLE_NAME, KCU1.CONSTRAINT_NAME, KCU2.TABLE_NAME, KCU1.ORDINAL_POSITION';
+var
+  fWhere: String;
+  lCurrConstraint: string;
+  lCurrFK: TDADriverForeignKey;
+  l_name: string;
+begin
+  lCurrConstraint := '';
+  lCurrFK := nil;
+  try
+    if not SchemaEnabled then fWhere:= s_fk_where;
+    Query.SQL :=  s_fk + fWhere + s_fk_Order;
+    Query.Open;
+    while not Query.Eof do begin
+      l_Name := Trim(Query.Fields[0].AsString);
+      if lCurrConstraint <> l_name then begin
+        lCurrConstraint := l_name;
+        lCurrFK := ForeignKeys.Add();
+        with lCurrFK do begin
+          Name := l_name;
+          FKField := Trim(Query.Fields[3].AsString);
+          PKField := Trim(Query.Fields[6].AsString);
+          if SchemaEnabled then begin
+            FKTable := Format('%s.%s', [Trim(Query.Fields[1].AsString), Trim(Query.Fields[2].AsString)]);
+            PKTable := Format('%s.%s', [Trim(Query.Fields[4].AsString), Trim(Query.Fields[5].AsString)]);
+          end else
+          begin
+            FKTable := Trim(Query.Fields[2].AsString);
+            PKTable := Trim(Query.Fields[5].AsString);
+          end;
+        end;
+      end else begin
+        with lCurrFK do begin
+          FKField := FKField + ';' + Trim(Query.Fields[3].AsString);
+          PKField := PKField + ';' + Trim(Query.Fields[6].AsString);
+        end;
+      end;
+      Query.Next;
+    end;
+    Query.Close;
+  finally
+    Query := nil;
+  end;
+end;
+
+function MSSQL_GetSPSelectSyntax(HasArguments: Boolean): String;
+begin
+  Result := 'EXEC {0} {1}';
+end;
+
+function MSSQL_IdentifierNeedsQuoting(const iIdentifier: string): boolean;
+begin
+  result := TestIdentifier(iIdentifier,ado_reservedwords);
+end;
+
+function MSSQL_GetQuoteChars: TDAQuoteCharArray;
+begin
+  result[0] := '[';
+  result[1] := ']';
+end;
+
+function MSSQL_GetDatabaseNames(aConnection:TDAEConnection): IROStrings;
+begin
+  Result := Engine_GetDatabaseNames(aConnection, MSSQL_MasterDatabase, MSSQL_GetDatabaseNames_SQL);
+end;
+
+{ TDAMSConnection }
+
+function TDAMSConnection.CreateMacroProcessor: TDASQLMacroProcessor;
+begin
+  Result := MSSQL_CreateMacroProcessor;
+end;
+
+procedure TDAMSConnection.DoGetForeignKeys(
+  out ForeignKeys: TDADriverForeignKeyCollection);
+begin
+  inherited;
+  MSSQL_DoGetForeignKeys(GetDatasetClass.Create(Self), ForeignKeys, MSSQLSchemaEnabled);
+end;
+
+function TDAMSConnection.DoGetLastAutoInc(const GeneratorName: string): integer;
+begin
+  Result := MSSQL_DoGetLastAutoInc(GeneratorName,GetDatasetClass.Create(Self));
+end;
+
+procedure TDAMSConnection.DoGetStoredProcedureNames(out List: IROStrings);
+begin
+  inherited DoGetStoredProcedureNames(List);
+  MSSQL_DoGetNames(GetDatasetClass.Create(Self),List,dotProcedure,MSSQLSchemaEnabled);
+end;
+
+procedure TDAMSConnection.DoGetTableFields(const aTableName: string;
+  out Fields: TDAFieldCollection);
+begin
+  MSSQL_DoGetTableFields(QuoteIdentifierIfNeeded(aTableName),GetDatasetClass.Create(Self),Fields);
+end;
+
+procedure TDAMSConnection.DoGetTableNames(out List: IROStrings);
+begin
+  inherited DoGetTableNames(List);
+  MSSQL_DoGetNames(GetDatasetClass.Create(Self),List,dotTable,MSSQLSchemaEnabled);
+end;
+
+procedure TDAMSConnection.DoGetViewNames(out List: IROStrings);
+begin
+  inherited DoGetViewNames(List);
+  MSSQL_DoGetNames(GetDatasetClass.Create(Self),List,dotView,MSSQLSchemaEnabled);
+end;
+
+function TDAMSConnection.GetDatabaseNames: IROStrings;
+begin
+  Result := MSSQL_GetDatabaseNames(Self);
+end;
+
+function TDAMSConnection.GetSPSelectSyntax(HasArguments: Boolean): String;
+begin
+  Result := MSSQL_GetSPSelectSyntax(HasArguments);
+end;
+
+procedure ADO_InitializeReservedWords;
+begin
+  // http://publib.boulder.ibm.com/infocenter/wasinfo/v6r1/index.jsp?topic=/com.ibm.etools.ejbbatchdeploy.doc/topics/rsqlMSSQLSERVER_2005.html
+  SetLength(ado_reservedwords, 747);
+  // sorted with TStringList.Sort (bds2007)
+  ado_reservedwords[0] := 'A';
+  ado_reservedwords[1] := 'ABORT';
+  ado_reservedwords[2] := 'ABS';
+  ado_reservedwords[3] := 'ABSOLUTE';
+  ado_reservedwords[4] := 'ACCESS';
+  ado_reservedwords[5] := 'ACOS';
+  ado_reservedwords[6] := 'ACQUIRE';
+  ado_reservedwords[7] := 'ACTION';
+  ado_reservedwords[8] := 'ACTIVATE';
+  ado_reservedwords[9] := 'ADA';
+  ado_reservedwords[10] := 'ADD';
+  ado_reservedwords[11] := 'ADDFORM';
+  ado_reservedwords[12] := 'ADMIN';
+  ado_reservedwords[13] := 'AFTER';
+  ado_reservedwords[14] := 'AGGREGATE';
+  ado_reservedwords[15] := 'ALIAS';
+  ado_reservedwords[16] := 'ALL';
+  ado_reservedwords[17] := 'ALLOCATE';
+  ado_reservedwords[18] := 'ALTER';
+  ado_reservedwords[19] := 'AN';
+  ado_reservedwords[20] := 'ANALYZE';
+  ado_reservedwords[21] := 'AND';
+  ado_reservedwords[22] := 'ANY';
+  ado_reservedwords[23] := 'APPEND';
+  ado_reservedwords[24] := 'ARCHIVE';
+  ado_reservedwords[25] := 'ARCHIVELOG';
+  ado_reservedwords[26] := 'ARE';
+  ado_reservedwords[27] := 'ARRAY';
+  ado_reservedwords[28] := 'ARRAYLEN';
+  ado_reservedwords[29] := 'AS';
+  ado_reservedwords[30] := 'ASC';
+  ado_reservedwords[31] := 'ASCII';
+  ado_reservedwords[32] := 'ASIN';
+  ado_reservedwords[33] := 'ASSERTION';
+  ado_reservedwords[34] := 'AT';
+  ado_reservedwords[35] := 'ATAN';
+  ado_reservedwords[36] := 'AUDIT';
+  ado_reservedwords[37] := 'AUTHORIZATION';
+  ado_reservedwords[38] := 'AVG';
+  ado_reservedwords[39] := 'AVGU';
+  ado_reservedwords[40] := 'BACKUP';
+  ado_reservedwords[41] := 'BECOME';
+  ado_reservedwords[42] := 'BEFORE';
+  ado_reservedwords[43] := 'BEGIN';
+  ado_reservedwords[44] := 'BETWEEN';
+  ado_reservedwords[45] := 'BIGINT';
+  ado_reservedwords[46] := 'BINARY';
+  ado_reservedwords[47] := 'BIND';
+  ado_reservedwords[48] := 'BINDING';
+  ado_reservedwords[49] := 'BIT';
+  ado_reservedwords[50] := 'BLOB';
+  ado_reservedwords[51] := 'BLOCK';
+  ado_reservedwords[52] := 'BODY';
+  ado_reservedwords[53] := 'BOOLEAN';
+  ado_reservedwords[54] := 'BOTH';
+  ado_reservedwords[55] := 'BREADTH';
+  ado_reservedwords[56] := 'BREAK';
+  ado_reservedwords[57] := 'BREAKDISPLAY';
+  ado_reservedwords[58] := 'BROWSE';
+  ado_reservedwords[59] := 'BUFFERPOOL';
+  ado_reservedwords[60] := 'BULK';
+  ado_reservedwords[61] := 'BY';
+  ado_reservedwords[62] := 'BYREF';
+  ado_reservedwords[63] := 'CACHE';
+  ado_reservedwords[64] := 'CALL';
+  ado_reservedwords[65] := 'CALLPROC';
+  ado_reservedwords[66] := 'CANCEL';
+  ado_reservedwords[67] := 'CAPTURE';
+  ado_reservedwords[68] := 'CASCADE';
+  ado_reservedwords[69] := 'CASCADED';
+  ado_reservedwords[70] := 'CASE';
+  ado_reservedwords[71] := 'CAST';
+  ado_reservedwords[72] := 'CATALOG';
+  ado_reservedwords[73] := 'CCSID';
+  ado_reservedwords[74] := 'CEILING';
+  ado_reservedwords[75] := 'CHANGE';
+  ado_reservedwords[76] := 'CHAR';
+  ado_reservedwords[77] := 'CHARACTER';
+  ado_reservedwords[78] := 'CHARTOROWID';
+  ado_reservedwords[79] := 'CHECK';
+  ado_reservedwords[80] := 'CHECKPOINT';
+  ado_reservedwords[81] := 'CHR';
+  ado_reservedwords[82] := 'CLASS';
+  ado_reservedwords[83] := 'CLEANUP';
+  ado_reservedwords[84] := 'CLEAR';
+  ado_reservedwords[85] := 'CLEARROW';
+  ado_reservedwords[86] := 'CLOB';
+  ado_reservedwords[87] := 'CLOSE';
+  ado_reservedwords[88] := 'CLUSTER';
+  ado_reservedwords[89] := 'CLUSTERED';
+  ado_reservedwords[90] := 'COALESCE';
+  ado_reservedwords[91] := 'COBOL';
+  ado_reservedwords[92] := 'COLGROUP';
+  ado_reservedwords[93] := 'COLLATE';
+  ado_reservedwords[94] := 'COLLATION';
+  ado_reservedwords[95] := 'COLLECTION';
+  ado_reservedwords[96] := 'COLUMN';
+  ado_reservedwords[97] := 'COMMAND';
+  ado_reservedwords[98] := 'COMMENT';
+  ado_reservedwords[99] := 'COMMIT';
+  ado_reservedwords[100] := 'COMMITTED';
+  ado_reservedwords[101] := 'COMPILE';
+  ado_reservedwords[102] := 'COMPLETION';
+  ado_reservedwords[103] := 'COMPLEX';
+  ado_reservedwords[104] := 'COMPRESS';
+  ado_reservedwords[105] := 'COMPUTE';
+  ado_reservedwords[106] := 'CONCAT';
+  ado_reservedwords[107] := 'CONFIRM';
+  ado_reservedwords[108] := 'CONNECT';
+  ado_reservedwords[109] := 'CONNECTION';
+  ado_reservedwords[110] := 'CONSTRAINT';
+  ado_reservedwords[111] := 'CONSTRAINTS';
+  ado_reservedwords[112] := 'CONSTRUCTOR';
+  ado_reservedwords[113] := 'CONTAINS';
+  ado_reservedwords[114] := 'CONTAINSTABLE';
+  ado_reservedwords[115] := 'CONTENTS';
+  ado_reservedwords[116] := 'CONTINUE';
+  ado_reservedwords[117] := 'CONTROLFILE';
+  ado_reservedwords[118] := 'CONTROLROW';
+  ado_reservedwords[119] := 'CONVERT';
+  ado_reservedwords[120] := 'COPY';
+  ado_reservedwords[121] := 'CORRESPONDING';
+  ado_reservedwords[122] := 'COS';
+  ado_reservedwords[123] := 'COUNT';
+  ado_reservedwords[124] := 'COUNTU';
+  ado_reservedwords[125] := 'CREATE';
+  ado_reservedwords[126] := 'CROSS';
+  ado_reservedwords[127] := 'CUBE';
+  ado_reservedwords[128] := 'CURRENT';
+  ado_reservedwords[129] := 'CURRENT_DATE';
+  ado_reservedwords[130] := 'CURRENT_PATH';
+  ado_reservedwords[131] := 'CURRENT_ROLE';
+  ado_reservedwords[132] := 'CURRENT_TIME';
+  ado_reservedwords[133] := 'CURRENT_TIMESTAMP';
+  ado_reservedwords[134] := 'CURRENT_USER';
+  ado_reservedwords[135] := 'CURSOR';
+  ado_reservedwords[136] := 'CVAR';
+  ado_reservedwords[137] := 'CYCLE';
+  ado_reservedwords[138] := 'DATA';
+  ado_reservedwords[139] := 'DATABASE';
+  ado_reservedwords[140] := 'DATAFILE';
+  ado_reservedwords[141] := 'DATAHANDLER';
+  ado_reservedwords[142] := 'DATAPAGES';
+  ado_reservedwords[143] := 'DATE';
+  ado_reservedwords[144] := 'DAY';
+  ado_reservedwords[145] := 'DAYOFMONTH';
+  ado_reservedwords[146] := 'DAYOFWEEK';
+  ado_reservedwords[147] := 'DAYOFYEAR';
+  ado_reservedwords[148] := 'DAYS';
+  ado_reservedwords[149] := 'DBA';
+  ado_reservedwords[150] := 'DBCC';
+  ado_reservedwords[151] := 'DBSPACE';
+  ado_reservedwords[152] := 'DEALLOCATE';
+  ado_reservedwords[153] := 'DEC';
+  ado_reservedwords[154] := 'DECIMAL';
+  ado_reservedwords[155] := 'DECLARATION';
+  ado_reservedwords[156] := 'DECLARE';
+  ado_reservedwords[157] := 'DECODE';
+  ado_reservedwords[158] := 'DEFAULT';
+  ado_reservedwords[159] := 'DEFERRABLE';
+  ado_reservedwords[160] := 'DEFERRED';
+  ado_reservedwords[161] := 'DEFINE';
+  ado_reservedwords[162] := 'DEFINITION';
+  ado_reservedwords[163] := 'DEGREES';
+  ado_reservedwords[164] := 'DELETE';
+  ado_reservedwords[165] := 'DELETEROW';
+  ado_reservedwords[166] := 'DENY';
+  ado_reservedwords[167] := 'DEPTH';
+  ado_reservedwords[168] := 'DEREF';
+  ado_reservedwords[169] := 'DESC';
+  ado_reservedwords[170] := 'DESCRIBE';
+  ado_reservedwords[171] := 'DESCRIPTOR';
+  ado_reservedwords[172] := 'DESTROY';
+  ado_reservedwords[173] := 'DESTRUCTOR';
+  ado_reservedwords[174] := 'DETERMINISTIC';
+  ado_reservedwords[175] := 'DHTYPE';
+  ado_reservedwords[176] := 'DIAGNOSTICS';
+  ado_reservedwords[177] := 'DICTIONARY';
+  ado_reservedwords[178] := 'DIRECT';
+  ado_reservedwords[179] := 'DISABLE';
+  ado_reservedwords[180] := 'DISCONNECT';
+  ado_reservedwords[181] := 'DISK';
+  ado_reservedwords[182] := 'DISMOUNT';
+  ado_reservedwords[183] := 'DISPLAY';
+  ado_reservedwords[184] := 'DISTINCT';
+  ado_reservedwords[185] := 'DISTRIBUTE';
+  ado_reservedwords[186] := 'DISTRIBUTED';
+  ado_reservedwords[187] := 'DO';
+  ado_reservedwords[188] := 'DOMAIN';
+  ado_reservedwords[189] := 'DOUBLE';
+  ado_reservedwords[190] := 'DOWN';
+  ado_reservedwords[191] := 'DROP';
+  ado_reservedwords[192] := 'DUMMY';
+  ado_reservedwords[193] := 'DUMP';
+  ado_reservedwords[194] := 'DYNAMIC';
+  ado_reservedwords[195] := 'EACH';
+  ado_reservedwords[196] := 'EDITPROC';
+  ado_reservedwords[197] := 'ELSE';
+  ado_reservedwords[198] := 'ELSEIF';
+  ado_reservedwords[199] := 'ENABLE';
+  ado_reservedwords[200] := 'END';
+  ado_reservedwords[201] := 'ENDDATA';
+  ado_reservedwords[202] := 'ENDDISPLAY';
+  ado_reservedwords[203] := 'ENDEXEC';
+  ado_reservedwords[204] := 'END-EXEC';
+  ado_reservedwords[205] := 'ENDFORMS';
+  ado_reservedwords[206] := 'ENDIF';
+  ado_reservedwords[207] := 'ENDLOOP';
+  ado_reservedwords[208] := 'ENDSELECT';
+  ado_reservedwords[209] := 'ENDWHILE';
+  ado_reservedwords[210] := 'EQUALS';
+  ado_reservedwords[211] := 'ERASE';
+  ado_reservedwords[212] := 'ERRLVL';
+  ado_reservedwords[213] := 'ERROREXIT';
+  ado_reservedwords[214] := 'ESCAPE';
+  ado_reservedwords[215] := 'EVENTS';
+  ado_reservedwords[216] := 'EVERY';
+  ado_reservedwords[217] := 'EXCEPT';
+  ado_reservedwords[218] := 'EXCEPTION';
+  ado_reservedwords[219] := 'EXCEPTIONS';
+  ado_reservedwords[220] := 'EXCLUDE';
+  ado_reservedwords[221] := 'EXCLUDING';
+  ado_reservedwords[222] := 'EXCLUSIVE';
+  ado_reservedwords[223] := 'EXEC';
+  ado_reservedwords[224] := 'EXECUTE';
+  ado_reservedwords[225] := 'EXISTS';
+  ado_reservedwords[226] := 'EXIT';
+  ado_reservedwords[227] := 'EXP';
+  ado_reservedwords[228] := 'EXPLAIN';
+  ado_reservedwords[229] := 'EXPLICIT';
+  ado_reservedwords[230] := 'EXTENT';
+  ado_reservedwords[231] := 'EXTERNAL';
+  ado_reservedwords[232] := 'EXTERNALLY';
+  ado_reservedwords[233] := 'EXTRACT';
+  ado_reservedwords[234] := 'FALSE';
+  ado_reservedwords[235] := 'FETCH';
+  ado_reservedwords[236] := 'FIELD';
+  ado_reservedwords[237] := 'FIELDPROC';
+  ado_reservedwords[238] := 'FILE';
+  ado_reservedwords[239] := 'FILLFACTOR';
+  ado_reservedwords[240] := 'FINALIZE';
+  ado_reservedwords[241] := 'FINALIZE';
+  ado_reservedwords[242] := 'FIRST';
+  ado_reservedwords[243] := 'FLOAT';
+  ado_reservedwords[244] := 'FLOOR';
+  ado_reservedwords[245] := 'FLOPPY';
+  ado_reservedwords[246] := 'FLUSH';
+  ado_reservedwords[247] := 'FOR';
+  ado_reservedwords[248] := 'FORCE';
+  ado_reservedwords[249] := 'FOREIGN';
+  ado_reservedwords[250] := 'FORMDATA';
+  ado_reservedwords[251] := 'FORMINIT';
+  ado_reservedwords[252] := 'FORMS';
+  ado_reservedwords[253] := 'FORTRAN';
+  ado_reservedwords[254] := 'FOUND';
+  ado_reservedwords[255] := 'FREE';
+  ado_reservedwords[256] := 'FREELIST';
+  ado_reservedwords[257] := 'FREELISTS';
+  ado_reservedwords[258] := 'FREETEXT';
+  ado_reservedwords[259] := 'FREETEXTTABLE';
+  ado_reservedwords[260] := 'FROM';
+  ado_reservedwords[261] := 'FULL';
+  ado_reservedwords[262] := 'FUNCTION';
+  ado_reservedwords[263] := 'GENERAL';
+  ado_reservedwords[264] := 'GET';
+  ado_reservedwords[265] := 'GETCURRENTCONNECTION';
+  ado_reservedwords[266] := 'GETFORM';
+  ado_reservedwords[267] := 'GETOPER';
+  ado_reservedwords[268] := 'GETROW';
+  ado_reservedwords[269] := 'GLOBAL';
+  ado_reservedwords[270] := 'GO';
+  ado_reservedwords[271] := 'GOTO';
+  ado_reservedwords[272] := 'GRANT';
+  ado_reservedwords[273] := 'GRANTED';
+  ado_reservedwords[274] := 'GRAPHIC';
+  ado_reservedwords[275] := 'GREATEST';
+  ado_reservedwords[276] := 'GROUP';
+  ado_reservedwords[277] := 'GROUPING';
+  ado_reservedwords[278] := 'GROUPS';
+  ado_reservedwords[279] := 'HASH';
+  ado_reservedwords[280] := 'HAVING';
+  ado_reservedwords[281] := 'HELP';
+  ado_reservedwords[282] := 'HELPFILE';
+  ado_reservedwords[283] := 'HOLDLOCK';
+  ado_reservedwords[284] := 'HOST';
+  ado_reservedwords[285] := 'HOUR';
+  ado_reservedwords[286] := 'HOURS';
+  ado_reservedwords[287] := 'IDENTIFIED';
+  ado_reservedwords[288] := 'IDENTITY';
+  ado_reservedwords[289] := 'IDENTITYCOL';
+  ado_reservedwords[290] := 'IF';
+  ado_reservedwords[291] := 'IFNULL';
+  ado_reservedwords[292] := 'IGNORE';
+  ado_reservedwords[293] := 'IIMESSAGE';
+  ado_reservedwords[294] := 'IIPRINTF';
+  ado_reservedwords[295] := 'IMMEDIATE';
+  ado_reservedwords[296] := 'IMPORT';
+  ado_reservedwords[297] := 'IN';
+  ado_reservedwords[298] := 'INCLUDE';
+  ado_reservedwords[299] := 'INCLUDING';
+  ado_reservedwords[300] := 'INCREMENT';
+  ado_reservedwords[301] := 'INDEX';
+  ado_reservedwords[302] := 'INDEXPAGES';
+  ado_reservedwords[303] := 'INDICATOR';
+  ado_reservedwords[304] := 'INITCAP';
+  ado_reservedwords[305] := 'INITIAL';
+  ado_reservedwords[306] := 'INITIALIZE';
+  ado_reservedwords[307] := 'INITIALLY';
+  ado_reservedwords[308] := 'INITRANS';
+  ado_reservedwords[309] := 'INITTABLE';
+  ado_reservedwords[310] := 'INNER';
+  ado_reservedwords[311] := 'INOUT';
+  ado_reservedwords[312] := 'INPUT';
+  ado_reservedwords[313] := 'INSENSITIVE';
+  ado_reservedwords[314] := 'INSERT';
+  ado_reservedwords[315] := 'INSERTROW';
+  ado_reservedwords[316] := 'INSTANCE';
+  ado_reservedwords[317] := 'INSTR';
+  ado_reservedwords[318] := 'INT';
+  ado_reservedwords[319] := 'INTEGER';
+  ado_reservedwords[320] := 'INTEGRITY';
+  ado_reservedwords[321] := 'INTERFACE';
+  ado_reservedwords[322] := 'INTERSECT';
+  ado_reservedwords[323] := 'INTERVAL';
+  ado_reservedwords[324] := 'INTO';
+  ado_reservedwords[325] := 'IS';
+  ado_reservedwords[326] := 'ISOLATION';
+  ado_reservedwords[327] := 'ITERATE';
+  ado_reservedwords[328] := 'JOIN';
+  ado_reservedwords[329] := 'KEY';
+  ado_reservedwords[330] := 'KILL';
+  ado_reservedwords[331] := 'LABEL';
+  ado_reservedwords[332] := 'LANGUAGE';
+  ado_reservedwords[333] := 'LARGE';
+  ado_reservedwords[334] := 'LAST';
+  ado_reservedwords[335] := 'LATERAL';
+  ado_reservedwords[336] := 'LAYER';
+  ado_reservedwords[337] := 'LEADING';
+  ado_reservedwords[338] := 'LEAST';
+  ado_reservedwords[339] := 'LEFT';
+  ado_reservedwords[340] := 'LENGTH';
+  ado_reservedwords[341] := 'LESS';
+  ado_reservedwords[342] := 'LEVEL';
+  ado_reservedwords[343] := 'LIKE';
+  ado_reservedwords[344] := 'LIMIT';
+  ado_reservedwords[345] := 'LINENO';
+  ado_reservedwords[346] := 'LINK';
+  ado_reservedwords[347] := 'LIST';
+  ado_reservedwords[348] := 'LISTS';
+  ado_reservedwords[349] := 'LOAD';
+  ado_reservedwords[350] := 'LOADTABLE';
+  ado_reservedwords[351] := 'LOCAL';
+  ado_reservedwords[352] := 'LOCALTIME';
+  ado_reservedwords[353] := 'LOCALTIMESTAMP';
+  ado_reservedwords[354] := 'LOCATE';
+  ado_reservedwords[355] := 'LOCATOR';
+  ado_reservedwords[356] := 'LOCK';
+  ado_reservedwords[357] := 'LOCKSIZE';
+  ado_reservedwords[358] := 'LOG';
+  ado_reservedwords[359] := 'LOGFILE';
+  ado_reservedwords[360] := 'LONG';
+  ado_reservedwords[361] := 'LONGINT';
+  ado_reservedwords[362] := 'LOWER';
+  ado_reservedwords[363] := 'LPAD';
+  ado_reservedwords[364] := 'LTRIM';
+  ado_reservedwords[365] := 'LVARBINARY';
+  ado_reservedwords[366] := 'LVARCHAR';
+  ado_reservedwords[367] := 'MAIN';
+  ado_reservedwords[368] := 'MANAGE';
+  ado_reservedwords[369] := 'MANUAL';
+  ado_reservedwords[370] := 'MAP';
+  ado_reservedwords[371] := 'MATCH';
+  ado_reservedwords[372] := 'MAX';
+  ado_reservedwords[373] := 'MAXDATAFILES';
+  ado_reservedwords[374] := 'MAXEXTENTS';
+  ado_reservedwords[375] := 'MAXINSTANCES';
+  ado_reservedwords[376] := 'MAXLOGFILES';
+  ado_reservedwords[377] := 'MAXLOGHISTORY';
+  ado_reservedwords[378] := 'MAXLOGMEMBERS';
+  ado_reservedwords[379] := 'MAXTRANS';
+  ado_reservedwords[380] := 'MAXVALUE';
+  ado_reservedwords[381] := 'MENUITEM';
+  ado_reservedwords[382] := 'MESSAGE';
+  ado_reservedwords[383] := 'MICROSECOND';
+  ado_reservedwords[384] := 'MICROSECONDS';
+  ado_reservedwords[385] := 'MIN';
+  ado_reservedwords[386] := 'MINEXTENTS';
+  ado_reservedwords[387] := 'MINUS';
+  ado_reservedwords[388] := 'MINUTE';
+  ado_reservedwords[389] := 'MINUTES';
+  ado_reservedwords[390] := 'MINVALUE';
+  ado_reservedwords[391] := 'MIRROREXIT';
+  ado_reservedwords[392] := 'MOD';
+  ado_reservedwords[393] := 'MODE';
+  ado_reservedwords[394] := 'MODIFIES';
+  ado_reservedwords[395] := 'MODIFY';
+  ado_reservedwords[396] := 'MODULE';
+  ado_reservedwords[397] := 'MONEY';
+  ado_reservedwords[398] := 'MONTH';
+  ado_reservedwords[399] := 'MONTHS';
+  ado_reservedwords[400] := 'MOUNT';
+  ado_reservedwords[401] := 'MOVE';
+  ado_reservedwords[402] := 'NAMED';
+  ado_reservedwords[403] := 'NAMES';
+  ado_reservedwords[404] := 'NATIONAL';
+  ado_reservedwords[405] := 'NATURAL';
+  ado_reservedwords[406] := 'NCHAR';
+  ado_reservedwords[407] := 'NCLOB';
+  ado_reservedwords[408] := 'NEW';
+  ado_reservedwords[409] := 'NEXT';
+  ado_reservedwords[410] := 'NHEADER';
+  ado_reservedwords[411] := 'NO';
+  ado_reservedwords[412] := 'NOARCHIVELOG';
+  ado_reservedwords[413] := 'NOAUDIT';
+  ado_reservedwords[414] := 'NOCACHE';
+  ado_reservedwords[415] := 'NOCHECK';
+  ado_reservedwords[416] := 'NOCOMPRESS';
+  ado_reservedwords[417] := 'NOCYCLE';
+  ado_reservedwords[418] := 'NOECHO';
+  ado_reservedwords[419] := 'NOMAXVALUE';
+  ado_reservedwords[420] := 'NOMINVALUE';
+  ado_reservedwords[421] := 'NONCLUSTERED';
+  ado_reservedwords[422] := 'NONE';
+  ado_reservedwords[423] := 'NOORDER';
+  ado_reservedwords[424] := 'NORESETLOGS';
+  ado_reservedwords[425] := 'NORMAL';
+  ado_reservedwords[426] := 'NOSORT';
+  ado_reservedwords[427] := 'NOT';
+  ado_reservedwords[428] := 'NOTFOUND';
+  ado_reservedwords[429] := 'NOTRIM';
+  ado_reservedwords[430] := 'NOWAIT';
+  ado_reservedwords[431] := 'NULL';
+  ado_reservedwords[432] := 'NULLIF';
+  ado_reservedwords[433] := 'NULLVALUE';
+  ado_reservedwords[434] := 'NUMBER';
+  ado_reservedwords[435] := 'NUMERIC';
+  ado_reservedwords[436] := 'NUMPARTS';
+  ado_reservedwords[437] := 'NVL';
+  ado_reservedwords[438] := 'OBID';
+  ado_reservedwords[439] := 'OBJECT';
+  ado_reservedwords[440] := 'ODBCINFO';
+  ado_reservedwords[441] := 'OF';
+  ado_reservedwords[442] := 'OFF';
+  ado_reservedwords[443] := 'OFFLINE';
+  ado_reservedwords[444] := 'OFFSETS';
+  ado_reservedwords[445] := 'OLD';
+  ado_reservedwords[446] := 'ON';
+  ado_reservedwords[447] := 'ONCE';
+  ado_reservedwords[448] := 'ONLINE';
+  ado_reservedwords[449] := 'ONLY';
+  ado_reservedwords[450] := 'OPEN';
+  ado_reservedwords[451] := 'OPENDATASOURCE';
+  ado_reservedwords[452] := 'OPENQUERY';
+  ado_reservedwords[453] := 'OPENROWSET';
+  ado_reservedwords[454] := 'OPERATION';
+  ado_reservedwords[455] := 'OPTIMAL';
+  ado_reservedwords[456] := 'OPTIMIZE';
+  ado_reservedwords[457] := 'OPTION';
+  ado_reservedwords[458] := 'OR';
+  ado_reservedwords[459] := 'ORDER';
+  ado_reservedwords[460] := 'ORDINALITY';
+  ado_reservedwords[461] := 'OUT';
+  ado_reservedwords[462] := 'OUTER';
+  ado_reservedwords[463] := 'OUTPUT';
+  ado_reservedwords[464] := 'OVER';
+  ado_reservedwords[465] := 'OVERLAPS';
+  ado_reservedwords[466] := 'OWN';
+  ado_reservedwords[467] := 'PACKAGE';
+  ado_reservedwords[468] := 'PAD';
+  ado_reservedwords[469] := 'PAGE';
+  ado_reservedwords[470] := 'PAGES';
+  ado_reservedwords[471] := 'PARALLEL';
+  ado_reservedwords[472] := 'PARAMETER';
+  ado_reservedwords[473] := 'PARAMETERS';
+  ado_reservedwords[474] := 'PART';
+  ado_reservedwords[475] := 'PARTIAL';
+  ado_reservedwords[476] := 'PASCAL';
+  ado_reservedwords[477] := 'PATH';
+  ado_reservedwords[478] := 'PCTFREE';
+  ado_reservedwords[479] := 'PCTINCREASE';
+  ado_reservedwords[480] := 'PCTINDEX';
+  ado_reservedwords[481] := 'PCTUSED';
+  ado_reservedwords[482] := 'PERCENT';
+  ado_reservedwords[483] := 'PERM';
+  ado_reservedwords[484] := 'PERMANENT';
+  ado_reservedwords[485] := 'PERMIT';
+  ado_reservedwords[486] := 'PI';
+  ado_reservedwords[487] := 'PIPE';
+  ado_reservedwords[488] := 'PLAN';
+  ado_reservedwords[489] := 'PLI';
+  ado_reservedwords[490] := 'POSITION';
+  ado_reservedwords[491] := 'POSTFIX';
+  ado_reservedwords[492] := 'POWER';
+  ado_reservedwords[493] := 'PRECISION';
+  ado_reservedwords[494] := 'PREFIX';
+  ado_reservedwords[495] := 'PREORDER';
+  ado_reservedwords[496] := 'PREPARE';
+  ado_reservedwords[497] := 'PRESERVE';
+  ado_reservedwords[498] := 'PRIMARY';
+  ado_reservedwords[499] := 'PRINT';
+  ado_reservedwords[500] := 'PRINTSCREEN';
+  ado_reservedwords[501] := 'PRIOR';
+  ado_reservedwords[502] := 'PRIQTY';
+  ado_reservedwords[503] := 'PRIVATE';
+  ado_reservedwords[504] := 'PRIVILEGES';
+  ado_reservedwords[505] := 'PROC';
+  ado_reservedwords[506] := 'PROCEDURE';
+  ado_reservedwords[507] := 'PROCESSEXIT';
+  ado_reservedwords[508] := 'PROFILE';
+  ado_reservedwords[509] := 'PROGRAM';
+  ado_reservedwords[510] := 'PROMPT';
+  ado_reservedwords[511] := 'PUBLIC';
+  ado_reservedwords[512] := 'PUTFORM';
+  ado_reservedwords[513] := 'PUTOPER';
+  ado_reservedwords[514] := 'PUTROW';
+  ado_reservedwords[515] := 'QUALIFICATION';
+  ado_reservedwords[516] := 'QUARTER';
+  ado_reservedwords[517] := 'QUOTA';
+  ado_reservedwords[518] := 'RADIANS';
+  ado_reservedwords[519] := 'RAISE';
+  ado_reservedwords[520] := 'RAISERROR';
+  ado_reservedwords[521] := 'RAND';
+  ado_reservedwords[522] := 'RANGE';
+  ado_reservedwords[523] := 'RAW';
+  ado_reservedwords[524] := 'READ';
+  ado_reservedwords[525] := 'READS';
+  ado_reservedwords[526] := 'READTEXT';
+  ado_reservedwords[527] := 'REAL';
+  ado_reservedwords[528] := 'RECONFIGURE';
+  ado_reservedwords[529] := 'RECORD';
+  ado_reservedwords[530] := 'RECOVER';
+  ado_reservedwords[531] := 'RECURSIVE';
+  ado_reservedwords[532] := 'REDISPLAY';
+  ado_reservedwords[533] := 'REF';
+  ado_reservedwords[534] := 'REFERENCES';
+  ado_reservedwords[535] := 'REFERENCING';
+  ado_reservedwords[536] := 'REGISTER';
+  ado_reservedwords[537] := 'RELATIVE';
+  ado_reservedwords[538] := 'RELEASE';
+  ado_reservedwords[539] := 'RELOCATE';
+  ado_reservedwords[540] := 'REMOVE';
+  ado_reservedwords[541] := 'RENAME';
+  ado_reservedwords[542] := 'REPEAT';
+  ado_reservedwords[543] := 'REPEATABLE';
+  ado_reservedwords[544] := 'REPEATED';
+  ado_reservedwords[545] := 'REPLACE';
+  ado_reservedwords[546] := 'REPLICATE';
+  ado_reservedwords[547] := 'REPLICATION';
+  ado_reservedwords[548] := 'RESET';
+  ado_reservedwords[549] := 'RESETLOGS';
+  ado_reservedwords[550] := 'RESOURCE';
+  ado_reservedwords[551] := 'RESTORE';
+  ado_reservedwords[552] := 'RESTRICT';
+  ado_reservedwords[553] := 'RESTRICTED';
+  ado_reservedwords[554] := 'RESULT';
+  ado_reservedwords[555] := 'RESUME';
+  ado_reservedwords[556] := 'RETRIEVE';
+  ado_reservedwords[557] := 'RETURN';
+  ado_reservedwords[558] := 'RETURNS';
+  ado_reservedwords[559] := 'REUSE';
+  ado_reservedwords[560] := 'REVOKE';
+  ado_reservedwords[561] := 'RIGHT';
+  ado_reservedwords[562] := 'ROLE';
+  ado_reservedwords[563] := 'ROLES';
+  ado_reservedwords[564] := 'ROLLBACK';
+  ado_reservedwords[565] := 'ROLLUP';
+  ado_reservedwords[566] := 'ROUTINE';
+  ado_reservedwords[567] := 'ROW';
+  ado_reservedwords[568] := 'ROWCOUNT';
+  ado_reservedwords[569] := 'ROWGUIDCOL';
+  ado_reservedwords[570] := 'ROWID';
+  ado_reservedwords[571] := 'ROWIDTOCHAR';
+  ado_reservedwords[572] := 'ROWLABEL';
+  ado_reservedwords[573] := 'ROWNUM';
+  ado_reservedwords[574] := 'ROWS';
+  ado_reservedwords[575] := 'ROWS';
+  ado_reservedwords[576] := 'RPAD';
+  ado_reservedwords[577] := 'RRN';
+  ado_reservedwords[578] := 'RTRIM';
+  ado_reservedwords[579] := 'RULE';
+  ado_reservedwords[580] := 'RUN';
+  ado_reservedwords[581] := 'RUNTIMESTATISTICS';
+  ado_reservedwords[582] := 'SAVE';
+  ado_reservedwords[583] := 'SAVEPOINT';
+  ado_reservedwords[584] := 'SCHEDULE';
+  ado_reservedwords[585] := 'SCHEMA';
+  ado_reservedwords[586] := 'SCN';
+  ado_reservedwords[587] := 'SCOPE';
+  ado_reservedwords[588] := 'SCREEN';
+  ado_reservedwords[589] := 'SCROLL';
+  ado_reservedwords[590] := 'SCROLLDOWN';
+  ado_reservedwords[591] := 'SCROLLUP';
+  ado_reservedwords[592] := 'SEARCH';
+  ado_reservedwords[593] := 'SECOND';
+  ado_reservedwords[594] := 'SECONDS';
+  ado_reservedwords[595] := 'SECQTY';
+  ado_reservedwords[596] := 'SECTION';
+  ado_reservedwords[597] := 'SEGMENT';
+  ado_reservedwords[598] := 'SELECT';
+  ado_reservedwords[599] := 'SEQUENCE';
+  ado_reservedwords[600] := 'SERIALIZABLE';
+  ado_reservedwords[601] := 'SERVICE';
+  ado_reservedwords[602] := 'SESSION';
+  ado_reservedwords[603] := 'SESSION_USER';
+  ado_reservedwords[604] := 'SET';
+  ado_reservedwords[605] := 'SETS';
+  ado_reservedwords[606] := 'SETUSER';
+  ado_reservedwords[607] := 'SETUSER';
+  ado_reservedwords[608] := 'SHARE';
+  ado_reservedwords[609] := 'SHARED';
+  ado_reservedwords[610] := 'SHORT';
+  ado_reservedwords[611] := 'SHUTDOWN';
+  ado_reservedwords[612] := 'SIGN';
+  ado_reservedwords[613] := 'SIMPLE';
+  ado_reservedwords[614] := 'SIN';
+  ado_reservedwords[615] := 'SIZE';
+  ado_reservedwords[616] := 'SLEEP';
+  ado_reservedwords[617] := 'SMALLINT';
+  ado_reservedwords[618] := 'SNAPSHOT';
+  ado_reservedwords[619] := 'SOME';
+  ado_reservedwords[620] := 'SORT';
+  ado_reservedwords[621] := 'SOUNDEX';
+  ado_reservedwords[622] := 'SPACE';
+  ado_reservedwords[623] := 'SPECIFIC';
+  ado_reservedwords[624] := 'SPECIFICTYPE';
+  ado_reservedwords[625] := 'SQL';
+  ado_reservedwords[626] := 'SQLBUF';
+  ado_reservedwords[627] := 'SQLCA';
+  ado_reservedwords[628] := 'SQLCODE';
+  ado_reservedwords[629] := 'SQLERROR';
+  ado_reservedwords[630] := 'SQLEXCEPTION';
+  ado_reservedwords[631] := 'SQLSTATE';
+  ado_reservedwords[632] := 'SQLWARNING';
+  ado_reservedwords[633] := 'SQRT';
+  ado_reservedwords[634] := 'START';
+  ado_reservedwords[635] := 'STATE';
+  ado_reservedwords[636] := 'STATEMENT';
+  ado_reservedwords[637] := 'STATIC';
+  ado_reservedwords[638] := 'STATISTICS';
+  ado_reservedwords[639] := 'STOGROUP';
+  ado_reservedwords[640] := 'STOP';
+  ado_reservedwords[641] := 'STORAGE';
+  ado_reservedwords[642] := 'STORPOOL';
+  ado_reservedwords[643] := 'STRUCTURE';
+  ado_reservedwords[644] := 'SUBMENU';
+  ado_reservedwords[645] := 'SUBPAGES';
+  ado_reservedwords[646] := 'SUBSTR';
+  ado_reservedwords[647] := 'SUBSTRING';
+  ado_reservedwords[648] := 'SUCCESSFUL';
+  ado_reservedwords[649] := 'SUFFIX';
+  ado_reservedwords[650] := 'SUM';
+  ado_reservedwords[651] := 'SUMU';
+  ado_reservedwords[652] := 'SWITCH';
+  ado_reservedwords[653] := 'SYNONYM';
+  ado_reservedwords[654] := 'SYSCAT';
+  ado_reservedwords[655] := 'SYSDATE';
+  ado_reservedwords[656] := 'SYSFUN';
+  ado_reservedwords[657] := 'SYSIBM';
+  ado_reservedwords[658] := 'SYSSTAT';
+  ado_reservedwords[659] := 'SYSTEM';
+  ado_reservedwords[660] := 'SYSTEM_USER';
+  ado_reservedwords[661] := 'SYSTIME';
+  ado_reservedwords[662] := 'SYSTIMESTAMP';
+  ado_reservedwords[663] := 'TABLE';
+  ado_reservedwords[664] := 'TABLEDATA';
+  ado_reservedwords[665] := 'TABLES';
+  ado_reservedwords[666] := 'TABLESPACE';
+  ado_reservedwords[667] := 'TAN';
+  ado_reservedwords[668] := 'TAPE';
+  ado_reservedwords[669] := 'TEMP';
+  ado_reservedwords[670] := 'TEMPORARY';
+  ado_reservedwords[671] := 'TERMINATE';
+  ado_reservedwords[672] := 'TEXTSIZE';
+  ado_reservedwords[673] := 'THAN';
+  ado_reservedwords[674] := 'THEN';
+  ado_reservedwords[675] := 'THREAD';
+  ado_reservedwords[676] := 'TIME';
+  ado_reservedwords[677] := 'TIMEOUT';
+  ado_reservedwords[678] := 'TIMESTAMP';
+  ado_reservedwords[679] := 'TIMEZONE_HOUR';
+  ado_reservedwords[680] := 'TIMEZONE_MINUTE';
+  ado_reservedwords[681] := 'TINYINT';
+  ado_reservedwords[682] := 'TO';
+  ado_reservedwords[683] := 'TOP';
+  ado_reservedwords[684] := 'TPE';
+  ado_reservedwords[685] := 'TRACING';
+  ado_reservedwords[686] := 'TRAILING';
+  ado_reservedwords[687] := 'TRAN';
+  ado_reservedwords[688] := 'TRANSACTION';
+  ado_reservedwords[689] := 'TRANSLATE';
+  ado_reservedwords[690] := 'TRANSLATION';
+  ado_reservedwords[691] := 'TREAT';
+  ado_reservedwords[692] := 'TRIGGER';
+  ado_reservedwords[693] := 'TRIGGERS';
+  ado_reservedwords[694] := 'TRIM';
+  ado_reservedwords[695] := 'TRUE';
+  ado_reservedwords[696] := 'TRUNCATE';
+  ado_reservedwords[697] := 'TSEQUAL';
+  ado_reservedwords[698] := 'TYPE';
+  ado_reservedwords[699] := 'UID';
+  ado_reservedwords[700] := 'UNCOMMITTED';
+  ado_reservedwords[701] := 'UNDER';
+  ado_reservedwords[702] := 'UNION';
+  ado_reservedwords[703] := 'UNIQUE';
+  ado_reservedwords[704] := 'UNKNOWN';
+  ado_reservedwords[705] := 'UNLIMITED';
+  ado_reservedwords[706] := 'UNLOADTABLE';
+  ado_reservedwords[707] := 'UNNEST';
+  ado_reservedwords[708] := 'UNSIGNED';
+  ado_reservedwords[709] := 'UNTIL';
+  ado_reservedwords[710] := 'UP';
+  ado_reservedwords[711] := 'UPDATE';
+  ado_reservedwords[712] := 'UPDATETEXT';
+  ado_reservedwords[713] := 'UPPER';
+  ado_reservedwords[714] := 'USAGE';
+  ado_reservedwords[715] := 'USE';
+  ado_reservedwords[716] := 'USER';
+  ado_reservedwords[717] := 'USING';
+  ado_reservedwords[718] := 'UUID';
+  ado_reservedwords[719] := 'VALIDATE';
+  ado_reservedwords[720] := 'VALIDPROC';
+  ado_reservedwords[721] := 'VALIDROW';
+  ado_reservedwords[722] := 'VALUE';
+  ado_reservedwords[723] := 'VALUES';
+  ado_reservedwords[724] := 'VARBINARY';
+  ado_reservedwords[725] := 'VARCHAR';
+  ado_reservedwords[726] := 'VARIABLE';
+  ado_reservedwords[727] := 'VARIABLES';
+  ado_reservedwords[728] := 'VARYING';
+  ado_reservedwords[729] := 'VCAT';
+  ado_reservedwords[730] := 'VERSION';
+  ado_reservedwords[731] := 'VIEW';
+  ado_reservedwords[732] := 'VOLUMES';
+  ado_reservedwords[733] := 'WAITFOR';
+  ado_reservedwords[734] := 'WEEK';
+  ado_reservedwords[735] := 'WHEN';
+  ado_reservedwords[736] := 'WHENEVER';
+  ado_reservedwords[737] := 'WHERE';
+  ado_reservedwords[738] := 'WHILE';
+  ado_reservedwords[739] := 'WITH';
+  ado_reservedwords[740] := 'WITHOUT';
+  ado_reservedwords[741] := 'WORK';
+  ado_reservedwords[742] := 'WRITE';
+  ado_reservedwords[743] := 'WRITETEXT';
+  ado_reservedwords[744] := 'YEAR';
+  ado_reservedwords[745] := 'YEARS';
+  ado_reservedwords[746] := 'ZONE';
+end;
+
+
+function TDAMSConnection.IdentifierNeedsQuoting(
+  const iIdentifier: string): boolean;
+begin
+  Result := inherited IdentifierNeedsQuoting(iIdentifier) or MSSQL_IdentifierNeedsQuoting(iIdentifier);
+end;
+
+procedure TDAMSConnection.DoGetStoredProcedureParams(
+  const aStoredProcedureName: string; out Params: TDAParamCollection);
+begin
+  MSSQL_DoGetStoredProcedureParams(aStoredProcedureName, GetDatasetClass.Create(Self), Params);
+end;
+
+{ TDAMSSQLDriver }
+
+function TDAMSSQLDriver.GetDefaultConnectionType(
+  const AuxDriver: string): string;
+begin
+  Result := MSSQL_DriverType;
+end;
+
+function MSACCESS_GetFileExtensions: IROStrings;
+begin
+  Result := NewROStrings;
+  Result.Add('*.mdb;MSAccess files (*.mdb)');
+  Result.Add('*.*;All files (*.*)');
+end;
+
+initialization
+  ado_InitializeReservedWords;
+finalization
+  ado_reservedwords := nil;
+end.
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDABin2DataStreamer.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDABin2DataStreamer.pas
new file mode 100644
index 0000000..c44d037
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDABin2DataStreamer.pas	
@@ -0,0 +1,1896 @@
+unit uDABin2DataStreamer;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up                                                  }
+{ platform: Win32                                                            }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+{.$DEFINE BIN2DEBUG_time}
+
+interface
+
+uses
+  Classes,
+  uDAInterfaces, uDADelta, uROClasses,
+  uDADataStreamer;
+
+type
+  TBIN2AdapterSignature = array[0..7] of ansichar;
+
+const
+  BIN2AdapterSignature: TBIN2AdapterSignature = 'DABIN200';
+type
+
+  TDASmallFieldInfo = record
+    Name: String;
+    Datatype: TDADataType;
+    Size: integer;
+  end;
+
+  TDADataForAppendBin2 = class(TDADataForAppend)
+  public
+    FieldsInfo: array of TDASmallFieldInfo;
+  end;
+
+  TDAElementType = (etDataset, etDelta);
+  { TElementInfo }
+  TDAElementInfo = class
+    ElementType: TDAElementType;
+    Name: string;
+    Offset: integer;
+  end;
+
+
+
+type
+  TDABin2DataStreamer = class(TDADataStreamer)
+  private
+	fInfoIntOffset: integer;
+    fHasReducedDelta: Boolean;
+    procedure ReadElementInfo;
+    procedure WriteElementInfo(ElementInfo: TDAElementInfo);
+    procedure AddElementInfo(ElementType: TDAElementType; ElementName: string; Offset: integer);
+    function GetElementInfo(ElementType: TDAElementType; const Name: string): TDAElementInfo;
+    procedure ReadAndApplySchema(const Destination: IDADataset; ApplySchema: boolean);
+    procedure WriteSchema(const Fields: TDAFieldCollection; const Params: TDAParamCollection; aFieldsIndex: array of integer); overload;
+    procedure WriteField(const AField: TDAField);
+    procedure WriteParam(const AParam: TDAParam);
+    procedure ReadParam(const AParam: TDAParam; const aParamPropertiesCount: integer);
+    procedure ReadField(const AField: TDAField; const aFieldPropertiesCount: integer);
+  protected
+    procedure InternalDoReadDataset(const Destination: IDAEditableDataset; ARecordCount: integer;  ARealFields: array of integer);virtual;
+    procedure InternalDoWriteDataset(const Source: IDADataset; var k: integer; const Maxrecords: integer; ARealFields: array of integer;aDataIndex: Integer; info: array of TDASmallFieldInfo);virtual;
+    procedure InternalDoWriteDataset_NonDataset(const Source: IDADataset; var k: integer; const Maxrecords: integer; ARealFields: array of integer;aDataIndex: Integer; info: array of TDASmallFieldInfo);virtual;
+    procedure CheckSignature(aSignature: TBIN2AdapterSignature);
+    // To override
+    function DoCreateStream: TStream; override;
+    procedure DoInitialize(Mode: TDAAdapterInitialization); override;
+    procedure DoFinalize; override;
+    function DoWriteDataset(const Source: IDADataset; Options: TDAWriteOptions; MaxRows: integer; ADynFieldNames: array of string): integer; override;
+
+    function DoBeginWriteDataset( const Source: IDADataset; const Schema: TDADataset;
+                                  Options: TDAWriteOptions; MaxRows: integer;
+                                  ADynFieldNames: array of string): TDADataForAppend; override;
+    function DoWriteDatasetData(const Source: IDADataset; var aDataForAppend: TDADataForAppend; aDataIndex: Integer = -1): Integer; override;
+    function DoEndWriteDataset(aDataForAppend: TDADataForAppend): Integer; override;
+
+
+    procedure DoWriteDelta(const Source: IDADelta); override;
+    procedure DoReadDataset(const DatasetName: string; const Destination: IDADataset; ApplySchema: boolean); override;
+    procedure DoReadDelta(const DeltaName: string; const Destination: IDADelta); override;
+  public
+    function HasReducedDelta: Boolean; override;
+    function GetTargetDataType: TRODataType; override;
+  published
+    property BufferSize;
+    property SendReducedDelta;
+  end;
+
+
+implementation
+{$IFNDEF MSWINDOWS}
+ {$UNDEF BIN2DEBUG_time}
+{$ENDIF}
+uses
+  {$IFDEF BIN2DEBUG_time}Windows,{$ENDIF BIN2DEBUG_time}
+  SysUtils, Variants, FMTBcd, uROBinaryHelpers, DB,
+  uDAEngine, uDAClasses;
+
+type
+{$IFDEF FPC}
+  PBoolean = ^Boolean;
+{$ENDIF}
+  PUInt64 = ^UInt64;
+
+const
+  field_count = 34;
+  param_count = 11;
+  TAlignmentStrings:  array[Low(TAlignment)..High(TAlignment)] of AnsiString =
+                      ('taLeftJustify', 'taRightJustify', 'taCenter');
+  TDABlobTypeStrings: array[Low(TDABlobType)..High(TDABlobType)] of AnsiString =
+                      ('dabtUnknown', 'dabtBlob', 'dabtMemo', 'dabtOraBlob',
+                       'dabtOraClob', 'dabtGraphic', 'dabtTypedBinary', 'dabtTimestamp');
+  TDADataTypeStrings: array[Low(TDADataType)..High(TDADataType)] of AnsiString =
+                      ('datUnknown', 'datString', 'datDateTime', 'datFloat',
+                       'datCurrency', 'datAutoInc', 'datInteger', 'datLargeInt',
+                       'datBoolean', 'datMemo', 'datBlob', 'datWideString',
+                       'datWideMemo', 'datLargeAutoInc', 'datByte', 'datShortInt',
+                       'datWord', 'datSmallInt', 'datCardinal', 'datLargeUInt',
+                       'datGuid', 'datXml', 'datDecimal', 'datSingleFloat');
+  TDAParamTypeStrings:array[Low(TDAParamType)..High(TDAParamType)] of AnsiString =
+                      ('daptUnknown', 'daptInput', 'daptOutput', 'daptInputOutput',
+                       'daptResult');
+
+
+function TAlignmentStringsToTAlignment(aValue: AnsiString): TAlignment;
+begin
+  for Result := Low(TAlignment) to High(TAlignment) do
+    if TAlignmentStrings[Result] = aValue then Exit;
+  raise Exception.CreateFmt('Unknown TAlignment value: ''%s''',[aValue]);
+end;
+
+function TDABlobTypeStringsToTDABlobType(aValue: AnsiString): TDABlobType;
+begin
+  for Result := Low(TDABlobType) to High(TDABlobType) do
+    if TDABlobTypeStrings[Result] = aValue then Exit;
+  raise Exception.CreateFmt('Unknown TDABlobType value: ''%s''',[aValue]);
+end;
+
+function TDADataTypeStringsToTDADataType(aValue: AnsiString): TDADataType;
+begin
+  for Result := Low(TDADataType) to High(TDADataType) do
+    if TDADataTypeStrings[Result] = aValue then Exit;
+  raise Exception.CreateFmt('Unknown TDADataType value: ''%s''',[aValue]);
+end;
+
+function TDAParamTypeStringsToTDAParamType(aValue: AnsiString): TDAParamType;
+begin
+  for Result := Low(TDAParamType) to High(TDAParamType) do
+    if TDAParamTypeStrings[Result] = aValue then Exit;
+  raise Exception.CreateFmt('Unknown TDAParamType value: ''%s''',[aValue]);
+end;
+
+procedure SetBitMask(Buffer: PAnsiChar; const Index: Integer; const Value: boolean);
+var
+  i: byte;
+begin
+  i := Index shr 3;
+  if Value then
+    Buffer[I] := AnsiChar(ord(Buffer[I]) or (1 shl (Index and 7)))
+  else
+    Buffer[I] := AnsiChar(ord(Buffer[I]) and not (1 shl (Index and 7)))
+end;
+
+function GetBitMask(Buffer: PAnsiChar; const Index: Integer): boolean;
+begin
+  Result := (ord(Buffer[Index shr 3]) shr (Index and 7)) and 1 = 1;
+end;
+
+procedure ClearBitMask(Buffer: PAnsiChar; BitMaskSize:integer; Value: byte = 0 );
+begin
+  FillChar(Buffer^, BitMaskSize, Value);
+end;
+
+function ReadBooleanFromStream(Stream: TStream): ByteBool;
+begin
+  Stream.Read(Result, SizeOf(ByteBool));
+end;
+
+procedure WriteBooleanToStream(Stream: TStream; const Value: ByteBool);
+begin
+  Stream.Write(Value, SizeOf(ByteBool));
+end;
+
+function ReadWordBoolFromStream(Stream: TStream): WordBool;
+begin
+  Stream.Read(Result, SizeOf(WordBool));
+end;
+
+procedure WriteWordBoolToStream(Stream: TStream; const Value: WordBool);
+begin
+  Stream.Write(Value, SizeOf(WordBool));
+end;
+
+
+function ReadByteFromStream(Stream: TStream): Byte;
+begin
+  Stream.Read(Result, SizeOf(Byte));
+end;
+
+procedure WriteByteToStream(Stream: TStream; const Value: Byte);
+begin
+  Stream.Write(Value, SizeOf(Byte));
+end;
+
+function ReadShortIntFromStream(Stream: TStream): ShortInt;
+begin
+  Stream.Read(Result, SizeOf(ShortInt));
+end;
+
+procedure WriteShortIntToStream(Stream: TStream; const Value: ShortInt);
+begin
+  Stream.Write(Value, SizeOf(ShortInt));
+end;
+
+function ReadWordFromStream(Stream: TStream): Word;
+begin
+  Stream.Read(Result, SizeOf(Word));
+end;
+
+procedure WriteWordToStream(Stream: TStream; const Value: Word);
+begin
+  Stream.Write(Value, SizeOf(Word));
+end;
+
+function ReadGUIDFromStream(Stream: TStream): Ansistring;
+begin
+  SetLength(Result,38);
+  Result[1]:='{';
+  Stream.Read(Result[2], 36 {Length(GuidString)-2});
+  Result[38]:='}'
+end;
+
+procedure WriteGUIDToStream(Stream: TStream; const Value: Ansistring);
+begin
+  if Length(Value) <> 38 then
+    raise Exception.CreateFmt('Invalid GUID: %s',[Value])
+  else
+    Stream.Write(Value[2], 36 {Length(GuidString)-2});
+end;
+
+
+function ReadDecimalFromStream(Stream: TStream): TDecimal;
+begin
+  Stream.Read(Result, Sizeof(Result));
+end;
+
+function ReadBCDFromStream(Stream: TStream): TBCD;
+begin
+  Result := DecimalToBCD(ReadDecimalFromStream(Stream));
+end;
+
+procedure WriteDecimalToStream(Stream: TStream; const Value: TDecimal);
+begin
+  Stream.Write(Value, Sizeof(Value));
+end;
+
+procedure WriteBCDToStream(Stream: TStream; const Value: TBCD);
+begin
+  WriteDecimalToStream(Stream,BCDToDecimal(Value));
+end;
+
+function ReadSingleFromStream(Stream: TStream): Single;
+begin
+  Stream.Read(Result, SizeOf(Single));
+end;
+
+procedure WriteSingleToStream(Stream: TStream; const Value: Single);
+begin
+  Stream.Write(Value, SizeOf(Single));
+end;
+
+function ReadSmallIntFromStream(Stream: TStream): SmallInt;
+begin
+  Stream.Read(Result, SizeOf(SmallInt));
+end;
+
+procedure WriteSmallIntToStream(Stream: TStream; const Value: SmallInt);
+begin
+  Stream.Write(Value, SizeOf(SmallInt));
+end;
+
+function ReadCardinalFromStream(Stream: TStream): Cardinal;
+begin
+  Stream.Read(Result, SizeOf(Cardinal));
+end;
+
+procedure WriteCardinalToStream(Stream: TStream; const Value: Cardinal);
+begin
+  Stream.Write(Value, SizeOf(Cardinal));
+end;
+
+function ReadCurrencyFromStream(Stream: TStream): Currency;
+begin
+  Stream.Read(Result, SizeOf(Currency));
+end;
+
+procedure WriteCurrencyToStream(Stream: TStream; const Value: Currency);
+begin
+  Stream.Write(Value, SizeOf(Currency));
+end;
+
+function ReadDoubleFromStream(Stream: TStream): Double;
+begin
+  Stream.Read(Result, SizeOf(Double));
+end;
+
+procedure WriteDoubleToStream(Stream: TStream; const Value: Double);
+begin
+  Stream.Write(Value, SizeOf(Double));
+end;
+
+function ReadDateTimeFromStream(Stream: TStream): TDateTime;
+begin
+  Stream.Read(Result, SizeOf(TDateTime));
+end;
+
+procedure WriteDateTimeToStream(Stream: TStream; const Value: TDateTime);
+begin
+  Stream.Write(Value, SizeOf(TDateTime));
+end;
+
+
+procedure Writeint64ToStream(Stream: TStream; const Value: int64);
+begin
+  Stream.Write(Value, SizeOf(int64));
+end;
+
+function Readint64FromStream(Stream: TStream): int64;
+begin
+  Stream.Read(Result, SizeOf(int64));
+end;
+
+procedure WriteUint64ToStream(Stream: TStream; const Value: UInt64);
+begin
+  Stream.Write(Value, SizeOf(Uint64));
+end;
+
+function ReadUint64FromStream(Stream: TStream): UInt64;
+begin
+  Stream.Read(Result, SizeOf(Uint64));
+end;
+
+procedure WriteIntegerToStream(Stream: TStream; const Value: Integer);
+begin
+  Stream.Write(Value, SizeOf(integer));
+end;
+
+function ReadIntegerFromStream(Stream: TStream): Integer;
+begin
+  Stream.Read(Result, SizeOf(integer));
+end;
+
+function ReadAnsistringFromStream(Stream: TStream): AnsiString;
+var
+  Len: Cardinal;
+begin
+  Len := ReadIntegerFromStream(Stream);
+  SetLength(Result, Len div SizeOf(AnsiChar));
+  Stream.Read(Pointer(Result)^, len);
+end;
+
+procedure WriteAnsistringToStream(Stream: TStream; const AString: AnsiString);
+var
+  Len: Cardinal;
+begin
+  Len := Length(AString);
+  WriteIntegerToStream(Stream, Len);
+  Stream.Write(Pointer(AString)^, len*SizeOf(AnsiChar));
+end;
+
+procedure WriteWidestringToStream(Stream: TStream; const AString: Widestring);
+var
+  Len: Cardinal;
+begin
+  Len := Length(AString) * sizeOf(WideChar);
+  WriteIntegerToStream(Stream, Len);
+  Stream.Write(Pointer(AString)^, len);
+end;
+
+function ReadWidestringFromStream(Stream: TStream): WideString;
+var
+  Len: Cardinal;
+begin
+  Len := ReadIntegerFromStream(Stream);
+  SetLength(Result, Len div sizeOf(WideChar));
+  Stream.Read(Pointer(Result)^, len);
+end;
+
+procedure BlobToStreamAsStr(Stream: TStream; Value: Variant);
+var
+  p: pointer;
+  lSize: cardinal;
+begin
+  case VarType(Value) of
+    varEmpty: WriteIntegerToStream(Stream, 0);
+    varUString,
+    varOleStr: WriteWidestringToStream(Stream, VarToWideStr(Value));
+    varString: WriteAnsistringToStream(Stream, GetVarAnsiString(Value));
+    8209: begin { 8209 is binary array }
+        lSize := VarArrayHighBound(Value, 1) - VarArrayLowBound(Value, 1) + 1;
+        p := VarArrayLock(Value);
+        try
+          WriteIntegerToStream(Stream, lSize);
+          Stream.Write(p^, lSize);
+        finally
+          VarArrayUnlock(Value);
+        end;
+      end;
+  else
+    raise Exception.CreateFmt('Invalid variant type (%d) for Blob.', [VarType(Value)]);
+  end;
+end;
+
+function WriteVariantToStream(Stream: TStream; Value: Variant; DataType: TDADataType): Boolean;
+begin
+  Result := True;
+
+  case Datatype of
+    datWideString, datWideMemo, datXml: WriteWidestringToStream(Stream, VarToWideStr(Value));
+    datString, datMemo: WriteAnsistringToStream(Stream, GetVarAnsiString(Value));
+    datDateTime: WriteDateTimeToStream(Stream, VarToDateTime(Value));
+    datFloat: WriteDoubleToStream(Stream, Value);
+    datBoolean: WriteBooleanToStream(Stream, Value = True);
+    datCurrency: WriteCurrencyToStream(Stream, Value);
+    datAutoInc, datInteger: WriteIntegerToStream(Stream, Value);
+    datLargeInt, datLargeAutoInc: Writeint64ToStream(Stream, Value);
+    datLargeUInt: WriteUint64ToStream(Stream, Value);
+    datBlob: BlobToStreamAsStr(Stream, Value);
+    datByte: WriteByteToStream(Stream, Value);
+    datShortInt: WriteShortIntToStream(Stream, Value);
+    datWord: WriteWordToStream(Stream, Value);
+    datSmallInt: WriteSmallIntToStream(Stream, Value);
+    datCardinal: WriteCardinalToStream(Stream, Value);
+    datGuid: WriteGuidToStream(Stream, GetVarAnsiString(Value));
+    datSingleFloat: WriteSingleToStream(Stream, Value);
+    datDecimal: WriteDecimalToStream(Stream, VariantToDecimal(Value));
+  else
+    Result := False;
+  end;
+end;
+
+function ReadVariantFromStream(Stream: TStream; DataType: TDADataType): Variant;
+begin
+  case Datatype of
+    datWideString, datWideMemo, datXml: Result := ReadWidestringFromStream(Stream);
+    datString, datMemo, DatBlob: Result := ReadAnsistringFromStream(Stream);
+    datDateTime: Result := ReadDateTimeFromStream(Stream);
+    datFloat: Result := ReadDoubleFromStream(Stream);
+    datCurrency: Result := ReadCurrencyFromStream(Stream);
+    datBoolean: Result := ReadBooleanFromStream(Stream);
+    datAutoInc, datInteger: Result := ReadIntegerFromStream(Stream);
+    datLargeInt, datLargeAutoInc: Result := Readint64FromStream(Stream);
+    datLargeUInt: Result := ReadUint64FromStream(Stream);
+    datByte: Result := ReadByteFromStream(Stream);
+    datShortInt: Result := ReadShortIntFromStream(Stream);
+    datWord: Result := ReadWordFromStream(Stream);
+    datSmallInt: Result := ReadSmallIntFromStream(Stream);
+    datCardinal: Result := ReadCardinalFromStream(Stream);
+    datGuid: Result := ReadGUIDFromStream(Stream);
+    datSingleFloat: Result := ReadSingleFromStream(Stream);
+    datDecimal: Result := DecimalToVariant(ReadDecimalFromStream(Stream));
+  else
+    Result := varNull;
+  end;
+end;
+
+{ TDABin2DataStreamer }
+
+procedure TDABin2DataStreamer.AddElementInfo(ElementType: TDAElementType;
+  ElementName: string; Offset: integer);
+var
+  element: TDAElementInfo;
+begin
+  element := TDAElementInfo.Create;
+  element.ElementType := ElementType;
+  element.Name := ElementName;
+  element.Offset := Offset;
+
+  if ElementType = etDataset then
+    AddingDataset(ElementName, element)
+  else
+    AddingDelta(ElementName, element);
+end;
+
+function TDABin2DataStreamer.DoCreateStream: TStream;
+begin
+  // outdated, for backward capability
+  result := nil;
+end;
+
+procedure TDABin2DataStreamer.DoFinalize;
+var
+  finalpos, i: integer;
+begin
+  if (AdapterInitialization in AdapterWriteModes) then try
+    finalpos := Data.Position;
+
+    // Element count. WIll be read by the DoInitialize method
+    WriteIntegerToStream(Data, DatasetCount + DeltaCount);
+
+    for i := 0 to (DatasetCount - 1) do
+      WriteElementInfo(TDAElementInfo(DatasetInfoObjects[i]));
+
+    for i := 0 to (DeltaCount - 1) do
+      WriteElementInfo(TDAElementInfo(DeltaInfoObjects[i]));
+
+    Data.Position := fInfoIntOffset;
+    WriteIntegerToStream(Data, finalpos);
+  except
+    beep;
+    raise;
+  end;
+end;
+
+procedure TDABin2DataStreamer.DoInitialize(Mode: TDAAdapterInitialization);
+var
+  signature: TBIN2AdapterSignature;
+  currpos, i: integer;
+begin
+  if (Mode in AdapterReadModes) then begin
+    // Checks the signature
+    Data.Read(signature, SizeOf(signature));
+    CheckSignature(signature);
+
+    fInfoIntOffset := ReadIntegerFromStream(Data);
+    currpos := Data.Position;
+    // Reads the information attached at the end of the stream
+    if (Data.Position = fInfoIntOffset) then Exit; // Nothing to read!
+    Data.Position := fInfoIntOffset;
+
+    // Number of elements
+    i := ReadIntegerFromStream(Data);
+    for i := i downto 1 do
+      ReadElementInfo;
+    // Restores its position and continues
+    Data.Position := currpos;
+  end
+  else if (Mode in AdapterWriteModes) then begin
+    // Writes the signature
+    signature := BIN2AdapterSignature;
+    Data.Write(signature, SizeOf(signature));
+
+    // This integer will contain the offset of the stream information (datasetcount, names, etc)
+    // which will be attached at the end of the stream since this is a sequential write
+    fInfoIntOffset := Data.Position;
+    WriteIntegerToStream(Data, 0);
+  end;
+end;
+
+
+procedure TDABin2DataStreamer.DoReadDataset(const DatasetName: string;
+  const Destination: IDADataset; ApplySchema: boolean);
+
+var
+  elementinfo: TDAElementInfo;
+  editable: IDAEditableDataset;
+  schemaend, cnt, i, k: integer;
+  fld: TDAField;
+  schemapresent: boolean;
+  readonlyfields: array of boolean;
+  //
+  Realfldcount: integer;
+  info: array of TDASmallFieldInfo;
+  RealFields: array of integer;
+  lErrorMessage: String;
+  lErrorMesCnt: integer;
+  lFldList: TStringList;
+{$IFDEF BIN2DEBUG_time}
+  t1,t2,t3: TDateTime;
+{$ENDIF BIN2DEBUG_time}
+begin
+  if Destination.Active and ApplySchema then raise Exception.Create('Cannot apply a schema if the destination is active');
+
+  elementinfo := GetElementInfo(etDataset, DatasetName);
+  Data.Position := elementinfo.Offset;
+  lErrorMessage := '';
+  lErrorMesCnt := 0;
+
+  editable := Destination as IDAEditableDataset;
+
+  Destination.DisableControls;
+  try
+    editable.DisableEventHandlers;
+    try
+      if ApplySchema then begin
+        // Checks to see if the schema is present
+        schemapresent := ReadBooleanFromStream(Data);
+        schemaend := ReadIntegerFromStream(Data);
+
+        if schemapresent and ApplySchema then begin
+          ReadAndApplySchema(Destination, ApplySchema);
+        end
+        else if (schemaend > 0) then
+          Data.Position := schemaend;
+        Exit;
+      end
+      else begin
+        {$IFDEF BIN2DEBUG_time}
+         t1 := now;
+        {$ENDIF BIN2DEBUG_time}
+        {schemapresent :=} ReadBooleanFromStream(Data);
+        schemaend := ReadIntegerFromStream(Data);
+        if (schemaend > 0) then
+          Data.Position := schemaend;
+
+        // Reads the row count
+        cnt := ReadIntegerFromStream(Data);
+        if (cnt = -1) then Exit; // Only schema is present!
+
+        if not Destination.Active then Destination.Open;
+        with editable do try
+          // Temporarily sets all fields as writable
+          Destination.DisableConstraints;
+          Realfldcount := ReadIntegerFromStream(Data);
+          SetLength(info, Realfldcount);
+          SetLength(RealFields, Realfldcount);
+          //Data.Read(pointer(info)^, Sizeof(TDASmallFieldInfo) * Realfldcount);
+          lFldList:=TStringList.Create;
+          try
+            lFldList.Sorted:=False;
+            lFldList.Duplicates:=dupIgnore;
+            For i:= 0 to Fields.Count-1 do
+              lFldList.AddObject(Fields[i].Name,Pointer(Fields[i].Index));
+            lFldList.Sorted:=True;
+
+            for i := 0 to Realfldcount - 1 do begin
+              info[i].Name := UTF8ToString(ReadAnsistringFromStream(Data));
+              info[i].Datatype := TDADataType(ReadByteFromStream(Data));
+              info[i].Size := ReadIntegerFromStream(Data);
+              k:=lFldList.IndexOf(info[i].Name);
+              if k = -1 then begin
+                inc(lErrorMesCnt);
+                if lErrorMesCnt > 5 then begin
+                  lErrorMessage := lErrorMessage + '<skip>' + sLineBreak;
+                  break;
+                end
+                else begin
+                  lErrorMessage := lErrorMessage + Format('The %s field isn''t found.' + sLineBreak,[info[i].Name])
+                end;
+              end
+              else begin
+                RealFields[i]:= Integer(lFldList.Objects[k]);
+              end;
+            end;
+          finally
+            lFldList.Free;
+          end;
+          if (Length(lErrorMessage) > 0) then begin
+            lErrorMessage := 'Format of the data in the stream doesn''t match the destination table format.'+ #10#13 + #10#13 + lErrorMessage;
+            RaiseError(lErrorMessage);
+          end;
+
+          k := 0;
+          SetLength(readonlyfields, Fields.Count);
+          for i := 0 to (Fields.Count - 1) do begin
+            readonlyfields[i] := Fields[i].ReadOnly;
+            Fields[i].ReadOnly := FALSE;
+            if Fields[i].Calculated or Fields[i].Lookup then Continue;
+            //RealFields[k] := i;
+            if (k >= Realfldcount) then begin
+              lErrorMessage := lErrorMessage + 'Fields count mismatch' + sLineBreak
+            end
+            else begin
+              fld:=Fields[RealFields[k]];
+             // if (fld.Name <> Info[k].Name) then lErrorMessage := lErrorMessage + Format('Name mismatch: %s expected but %s found in stream.', [fld.Name, Info[k].Name])+ sLineBreak
+              if (fld.DataType <> Info[k].Datatype) then lErrorMessage := lErrorMessage + Format('Data type mismatch for column ''%s.%s'': %s expected but %s found in stream.', [DatasetName, fld.Name, TDADataTypeStrings[fld.DataType], TDADataTypeStrings[Info[k].Datatype]])  + sLineBreak
+              else if (fld.Size <> Info[k].Size) then lErrorMessage := lErrorMessage + Format('Size mismatch for column ''%s.%s'': %d expected but %d found in stream.', [DatasetName, fld.Name, fld.Size, Info[k].Size])  + sLineBreak;
+            end;
+            inc(k);
+          end;
+          {$IFDEF BIN2DEBUG_time}
+           t2 := now;
+          {$ENDIF BIN2DEBUG_time}
+          try
+            if (k <> Realfldcount) then lErrorMessage := lErrorMessage + Format('Fields count mismatch: %d expected but %d found in the stream', [k, Realfldcount]) + sLineBreak;
+            if (Length(lErrorMessage) > 0) then begin
+              lErrorMessage := 'Format of the data in the stream doesn''t match the destination table format.'+ sLineBreak + sLineBreak + lErrorMessage;
+              RaiseError(lErrorMessage);
+            end;
+            // Inserts the records
+            try
+              InternalDoReadDataset(editable, cnt, RealFields);
+            except
+              raise;
+            end;
+          finally
+            // Restores the read-only property
+            for i := 0 to (Fields.Count - 1) do
+              Fields[i].ReadOnly := readonlyfields[i];
+          end;
+          {$IFDEF BIN2DEBUG_time}
+           t3 := now;
+           OutputDebugString(PAnsiChar('TDABIN2DataStreamer.DoReadDataset:'+
+              TimeToStr(t2-t1)+' | ' +FloatToStr(t2-t1)+' || '+
+              TimeToStr(t3-t2)+' | ' +FloatToStr(t3-t2)
+              ));
+          {$ENDIF BIN2DEBUG_time}
+        finally
+          Destination.EnableConstraints;
+        end;
+      end;
+    finally
+      editable.EnableEventHandlers;
+    end;
+  finally
+    Destination.EnableControls;
+  end;
+end;
+
+procedure TDABin2DataStreamer.DoReadDelta(const DeltaName: string;
+  const Destination: IDADelta);
+var
+  elementinfo: TDAElementInfo;
+  msg, str: string;
+  recid, i, cnt, x: integer;
+  change: TDADeltaChange;
+  changetype: TDAChangeType;
+  status: TDAChangeStatus;
+  BitMask: AnsiString;
+  BitMaskSize: integer;
+  lProgress: Boolean;
+begin
+  elementinfo := GetElementInfo(etDelta, DeltaName);
+  Data.Position := elementinfo.Offset;
+
+  // Number of changes
+  cnt := ReadIntegerFromStream(Data);
+
+  // Field number, names and types
+  Destination.ClearFieldNames;
+  i := ReadIntegerFromStream(Data);
+  for i := i downto 1 do begin
+    str := UTF8ToString(ReadAnsistringFromStream(Data));
+    Destination.AddFieldName(str);
+    Destination.LoggedFieldTypes[Destination.LoggedFieldCount - 1] := TDADataType(ReadByteFromStream(Data));
+  end;
+
+  // Key fields
+  Destination.ClearKeyFieldNames;
+  i := ReadIntegerFromStream(Data);
+  for i := i downto 1 do begin
+    str := UTF8ToString(ReadAnsistringFromStream(Data));
+    Destination.AddKeyFieldName(str);
+  end;
+
+  if (cnt = 0) then Exit;
+
+  BitMaskSize := (Destination.LoggedFieldCount + 7) div 8;
+  SetLength(BitMask, BitMaskSize);
+
+  // mode of Delta
+  fHasReducedDelta := ReadBooleanFromStream(Data);
+  lProgress := Assigned(OnReadDeltaProgress);
+  // Actual changes
+  cnt := ReadIntegerFromStream(Data);
+  for i := 1 to cnt do begin
+    changetype := TDAChangeType(ReadIntegerFromStream(Data));
+    recid := ReadIntegerFromStream(Data);
+    status := TDAChangeStatus(ReadIntegerFromStream(Data));
+    msg := UTF8ToString(ReadAnsistringFromStream(Data));
+    change := Destination.Add(recid, changetype, status, msg);
+
+    // bitmask has different value that in ReadDeataset/WriteDataset !!!
+    // 1 = field is not null
+    // 0 = field is null
+    Data.Read(pointer(BitMask)^, BitMaskSize);
+    // Old values
+    for x := 0 to (Destination.LoggedFieldCount - 1) do
+      if GetBitMask(PAnsiChar(BitMask),x) then
+        change.OldValues[x] := ReadVariantFromStream(Data, Destination.LoggedFieldTypes[x]);
+
+    Data.Read(pointer(BitMask)^, BitMaskSize);
+    // new values
+    for x := 0 to (Destination.LoggedFieldCount - 1) do
+      if GetBitMask(PAnsiChar(BitMask),x) then
+        change.NewValues[x] := ReadVariantFromStream(Data, Destination.LoggedFieldTypes[x]);
+    if lProgress then OnReadDeltaProgress(Self, Destination, i, cnt);
+  end;
+end;
+
+function TDABin2DataStreamer.DoWriteDataset(const Source: IDADataset;
+  Options: TDAWriteOptions; MaxRows: integer; ADynFieldNames: array of string): integer;
+var
+  lDataForAppend: TDADataForAppend;
+begin
+  lDataForAppend := DoBeginWriteDataset(Source, {schema}nil, Options, MaxRows, ADynFieldNames);
+  if woRows in Options then begin
+    DoWriteDatasetData(Source, lDataForAppend);
+    result := DoEndWriteDataset(lDataForAppend);
+  end
+  else begin
+    result := -1;
+  end;
+end;
+
+procedure TDABin2DataStreamer.DoWriteDelta(const Source: IDADelta);
+var
+  i, x: integer;
+  pk_array: array of boolean;
+  BitMask_Old,BitMask_new: AnsiString;
+  BitMaskSize: integer;
+  old_val,new_val: variant;
+  l_bitmaskflag: boolean;
+  fLocalSendReducedDelta: Boolean;
+  lProgress: Boolean;
+  lTotal: integer;
+begin
+  // This information will be used later to complete the stream (see DoInitialize)
+  AddElementInfo(etDelta, Source.LogicalName, Data.Position);
+  Source.RemoveUnchangedChanges;
+
+  // Number of changes
+  WriteIntegertoStream(Data, Source.Count);
+
+  // Numnber of fields, field names and their types
+  WriteIntegertoStream(Data, Source.LoggedFieldCount);
+  for i := 0 to (Source.LoggedFieldCount - 1) do begin
+    WriteAnsistringToStream(Data,UTF8Encode(Source.LoggedFieldNames[i]));
+    WriteByteToStream(Data, Ord(Source.LoggedFieldTypes[i]));
+  end;
+
+  // Key fields
+  WriteIntegertoStream(Data, Source.KeyFieldCount);
+  for i := 0 to (Source.KeyFieldCount - 1) do begin
+    WriteAnsistringToStream(Data, UTF8Encode(Source.KeyFieldNames[i]));
+  end;
+
+  if (Source.Count = 0) then Exit;
+
+  // mode of Delta
+  WriteBooleanToStream(Data, SendReducedDelta);
+
+  // Actual changes
+  WriteIntegertoStream(Data, Source.Count);
+
+  BitMaskSize := (Source.LoggedFieldCount + 7) div 8;
+  SetLength(BitMask_old, BitMaskSize);
+  SetLength(BitMask_new, BitMaskSize);
+  fLocalSendReducedDelta := SendReducedDelta and (Source.KeyFieldCount >0);
+  if fLocalSendReducedDelta then begin
+    SetLength(pk_array, Source.LoggedFieldCount);
+    for i := 0 to Source.LoggedFieldCount - 1 do
+      pk_array[i]:=False;
+
+    for i := 0 to Source.KeyFieldCount - 1 do begin
+      x := Source.IndexOfLoggedField(Source.KeyFieldNames[i]);
+      if x <> -1 then pk_array[x]:=True;
+    end;
+  end;
+
+  lProgress := Assigned(OnWriteDeltaProgress);
+  lTotal := Source.Count;
+  for i := 0 to (Source.Count - 1) do begin
+    // Change type, RecID, status and message
+    WriteIntegertoStream(Data, integer(Source.Changes[i].ChangeType));
+    WriteIntegertoStream(Data, Source.Changes[i].RecID);
+    WriteIntegertoStream(Data, integer(Source.Changes[i].Status));
+    WriteAnsistringToStream(Data, UTF8Encode(Source.Changes[i].Message));
+
+    // bitmask has different value that in ReadDeataset/WriteDataset !!!
+    // 1 = field is not null
+    // 0 = field is null
+    ClearBitMask(PAnsiChar(BitMask_old),BitMaskSize,0);
+    ClearBitMask(PAnsiChar(BitMask_New),BitMaskSize,0);
+    if fLocalSendReducedDelta then begin
+      for x := 0 to (Source.LoggedFieldCount - 1) do begin
+        old_val:=Source.Changes[i].OldValues[x];
+        new_val:=Source.Changes[i].NewValues[x];
+        l_bitmaskflag:=pk_array[x] or not ROVariantsEqual(old_val,new_val);
+        SetBitMask(PAnsiChar(BitMask_Old), x, l_bitmaskflag and not (VarIsNull(old_val) or (VarIsEmpty(old_val))));
+        SetBitMask(PAnsiChar(BitMask_new), x, l_bitmaskflag and not (VarIsNull(new_val) or (VarIsEmpty(new_val))));
+      end;
+    end else begin
+      for x := 0 to (Source.LoggedFieldCount - 1) do begin
+        old_val:=Source.Changes[i].OldValues[x];
+        new_val:=Source.Changes[i].NewValues[x];
+        SetBitMask(PAnsiChar(BitMask_Old), x, not (VarIsNull(old_val) or (VarIsEmpty(old_val))));
+        SetBitMask(PAnsiChar(BitMask_new), x, not (VarIsNull(new_val) or (VarIsEmpty(new_val))));
+      end;
+    end;
+
+    // old
+    Data.Write(pointer(BitMask_Old)^, BitMaskSize);
+    for x := 0 to (Source.LoggedFieldCount - 1) do
+      if GetBitMask(PAnsiChar(BitMask_Old),x) then
+        WriteVariantToStream(Data,Source.Changes[i].OldValues[x],Source.LoggedFieldTypes[x]);
+
+    // new
+    Data.Write(pointer(BitMask_new)^, BitMaskSize);
+    for x := 0 to (Source.LoggedFieldCount - 1) do
+      if GetBitMask(PAnsiChar(BitMask_new),x) then
+        WriteVariantToStream(Data,Source.Changes[i].NewValues[x],Source.LoggedFieldTypes[x]);
+    if lProgress then OnWriteDeltaProgress(Self, Source, i+1, lTotal);
+  end;
+end;
+
+function TDABin2DataStreamer.GetElementInfo(ElementType: TDAElementType;
+  const Name: string): TDAElementInfo;
+begin
+  result := nil;
+  case ElementType of
+    etDataset: result := TDAElementInfo(DatasetInfoObjects[GetDatasetIndex(Name)]);
+    etDelta: result := TDAElementInfo(DeltaInfoObjects[GetDeltaIndex(Name)]);
+  end;
+end;
+
+function TDABin2DataStreamer.HasReducedDelta: Boolean;
+begin
+  Result:= fHasReducedDelta;
+end;
+
+procedure TDABin2DataStreamer.ReadAndApplySchema(
+  const Destination: IDADataset; ApplySchema: boolean);
+var
+ lField_cnt: integer;
+ lparam_cnt: integer;
+ i: integer;
+ cnt: integer;
+begin
+  Destination.Fields.Clear;
+  cnt := ReadIntegerFromStream(Data);
+  lField_cnt:= ReadIntegerFromStream(Data);
+  for i := 0 to (cnt - 1) do
+   ReadField(Destination.Fields.Add, lField_cnt);
+
+  Destination.Params.Clear;
+  cnt := ReadIntegerFromStream(Data);
+  lparam_cnt:= ReadIntegerFromStream(Data);
+  for i := 0 to (cnt - 1) do
+   ReadParam(Destination.Params.Add, lparam_cnt);
+end;
+
+procedure TDABin2DataStreamer.ReadElementInfo;
+var
+  et: TDAElementType;
+  nme: string;
+  ofs: integer;
+begin
+  et := TDAElementType(ReadIntegerFromStream(Data));
+  nme := UTF8ToString(ReadAnsistringFromStream(Data));
+  ofs := ReadIntegerFromStream(Data);
+  AddElementInfo(et, nme, ofs);
+end;
+
+procedure TDABin2DataStreamer.WriteElementInfo(
+  ElementInfo: TDAElementInfo);
+begin
+  WriteIntegerToStream(Data, integer(ElementInfo.ElementType));
+  WriteAnsistringToStream(Data, UTF8Encode(ElementInfo.Name));
+  WriteIntegerToStream(Data, ElementInfo.Offset);
+end;
+
+procedure TDABin2DataStreamer.WriteSchema(const Fields: TDAFieldCollection; const Params: TDAParamCollection; aFieldsIndex: array of integer);
+var
+  i: integer;
+begin
+  WriteIntegerToStream(Data, Length(aFieldsIndex));
+  WriteIntegerToStream(Data, field_count);
+  for i := 0 to High(aFieldsIndex) do
+    WriteField(Fields[aFieldsIndex[i]]);
+
+  WriteIntegerToStream(Data, Params.Count);
+  WriteIntegerToStream(Data, param_count);
+  for i := 0 to Params.Count - 1 do
+    WriteParam(Params[i]);
+end;
+
+function TDABin2DataStreamer.DoBeginWriteDataset(
+                                  const Source: IDADataset; const Schema: TDADataset;
+                                  Options: TDAWriteOptions; MaxRows: integer;
+                                  ADynFieldNames: array of string): TDADataForAppend;
+var
+  max, cntpos, currpos, k, i, Realfldcnt: integer;
+  fld: TDAField;
+  wrtschema: boolean;
+  info: array of TDASmallFieldInfo;
+  RealFields: array of integer;
+  lfields: array of integer;
+  lDataForAppend : TDADataForAppendBin2;
+  lSchemaFields: TDAFieldCollection;
+  lSchemaParams: TDAParamCollection;
+  lLogicalName: String;
+begin
+  lDataForAppend := TDADataForAppendBin2.Create();
+  result := lDataForAppend;
+
+  if Assigned(Schema) then begin
+    lDataForAppend.TableSchema := Schema;
+    if Schema is TDAUnionDataTable then begin
+      fld := Schema.FindField(def_SourceTableFieldName);
+      if not Assigned(fld) then begin
+        fld := Schema.Fields.Add();
+        fld.Name := def_SourceTableFieldName;
+        fld.DataType := datInteger;
+        fld.InPrimaryKey := true;
+        fld.ServerAutoRefresh := true;
+      end;
+    end;
+    lSchemaFields := Schema.Fields;
+    lSchemaParams := Schema.Params;
+    lLogicalName := Schema.Name;
+  end else begin
+    if Assigned(Source) then begin
+      lSchemaFields := Source.Fields;
+      lSchemaParams := Source.Params;
+      lLogicalName := Source.LogicalName;
+    end else begin
+      raise EDAException.Create('Schema or source should be assigned.');
+    end;
+  end;
+
+  if Length(ADynFieldNames) > 0 then begin
+    SetLength(lfields, Length(ADynFieldNames));
+    For i:=0 to High(ADynFieldNames) do begin
+      fld := lSchemaFields.FindField(ADynFieldNames[i]);
+      if fld <> nil then
+        lfields[i]:= fld.Index
+      else
+        lfields[i]:= -1;  // TODO: shoudln't this raise an exception "field not found", or the like?
+    end;
+  end else begin
+    SetLength(lfields, lSchemaFields.Count);
+    For i:=0 to lSchemaFields.Count-1 do
+      lfields[i]:=i;
+  end;
+
+  // This information will be used later to complete the stream (see DoInitialize)
+  AddElementInfo(etDataset, lLogicalName, Data.Position);
+
+    // Writes a boolean flag that indicates if the schema is being written
+    wrtschema := (woSchema in Options) or (Length(ADynFieldNames)>0);
+    WriteBooleanToStream(Data, wrtschema);
+    // Write the offset to jump to if the reader wants to skip the schema
+    currpos := Data.Position;
+    WriteIntegerToStream(Data, 0);
+
+    if wrtschema then begin
+      WriteSchema(lSchemaFields, lSchemaParams, lfields);
+
+      // Writes the offset of the schema's end
+      k := Data.Position;
+      Data.Position := currpos;
+      WriteIntegerToStream(Data, k);
+      Data.Position := k;
+    end;
+
+    // Writes the row count
+    if not (woRows in Options) then begin
+      WriteIntegerToStream(Data, -1);
+      Exit;
+    end
+    else begin
+      cntpos := Data.Position;
+      WriteIntegerToStream(Data, 0);
+      max := MaxRows;
+    end;
+
+    // write datatypes+offsets
+    SetLength(info, lSchemaFields.Count);
+    SetLength(RealFields, lSchemaFields.Count);
+    Realfldcnt := 0;
+    for i := 0 to High(lfields) do begin
+      if lSchemaFields[lfields[i]].Calculated or lSchemaFields[lfields[i]].Lookup then Continue;
+      RealFields[Realfldcnt] := lfields[i];
+      info[Realfldcnt].Name := lSchemaFields[lfields[i]].Name;
+      info[Realfldcnt].Datatype := lSchemaFields[lfields[i]].DataType;
+      info[Realfldcnt].Size := lSchemaFields[lfields[i]].Size;
+      inc(Realfldcnt);
+    end;
+    SetLength(info, Realfldcnt);
+    SetLength(RealFields, Realfldcnt);
+
+    WriteIntegerToStream(Data, Realfldcnt);
+    //Data.Write(pointer(info)^, Sizeof(TDASmallFieldInfo) * Realfldcnt);
+    for i := 0 to Realfldcnt - 1 do begin
+      WriteAnsistringToStream(Data, UTF8Encode(info[i].Name));
+      WriteByteToStream(Data, Byte(info[i].DataType));
+      WriteIntegerToStream(Data, info[i].Size);
+    end;
+
+
+    // prepare DataForAppend structure...
+    SetLength(lDataForAppend.RealFields, Realfldcnt);
+    SetLength(lDataForAppend.FieldsInfo, Realfldcnt);
+    for i := Low(RealFields) to High(RealFields) do begin
+      lDataForAppend.RealFields[i] := RealFields[i];
+      lDataForAppend.FieldsInfo[i].Name := info[i].Name;
+      lDataForAppend.FieldsInfo[i].Datatype := info[i].Datatype;
+      lDataForAppend.FieldsInfo[i].Size := info[i].Size;
+    end;
+
+    lDataForAppend.MaxRowCount := max;
+    lDataForAppend.CountOfRecordsPosition := cntpos;
+
+    k := 0;
+
+    lDataForAppend.EndDataPosition := Data.Position;
+    lDataForAppend.RecordCount := k;
+
+    result := lDataForAppend;
+end;
+
+
+function TDABin2DataStreamer.DoWriteDatasetData(const Source: IDADataset; var aDataForAppend: TDADataForAppend; aDataIndex: Integer = -1): Integer;
+var
+  max, k, i, Realfldcnt: integer;
+  info: array of TDASmallFieldInfo;
+  RealFields: array of integer;
+  lDataForAppend: TDADataForAppendBin2;
+  lMapToFieldName: String;
+  lColumnMappings: TDAColumnMappingCollection;
+  lColumnMapping: TDAColumnMapping;
+begin
+
+  lDataForAppend := aDataForAppend as TDADataForAppendBin2;
+  Realfldcnt := Length(lDataForAppend.RealFields);
+  Data.Position := lDataForAppend.EndDataPosition;
+  SetLength(info, Realfldcnt);
+  SetLength(RealFields, Realfldcnt);
+  for i := 0 to Realfldcnt - 1 do begin
+    info[i].Name := lDataForAppend.FieldsInfo[i].Name;
+    info[i].Datatype := lDataForAppend.FieldsInfo[i].Datatype;
+    info[i].Size := lDataForAppend.FieldsInfo[i].Size;
+    // these arrays always have the same size
+    RealFields[i] := lDataForAppend.RealFields[i];
+  end;
+  max := lDataForAppend.MaxRowCount;
+  k := lDataForAppend.RecordCount;
+
+  // Mapping fields of Source table to the streamed dataset
+  if Assigned(lDataForAppend.TableSchema) and (lDataForAppend.TableSchema is TDAUnionDataTable) then begin
+    lColumnMappings := TDAUnionSourceTable(TDAUnionDataTable(lDataForAppend.TableSchema).SourceTables.ItemByName(Source.Name)).ColumnMappings;
+    for i := 0 to Realfldcnt - 1 do begin
+      if info[i].Name = def_SourceTableFieldName then begin
+        RealFields[i] := -10;
+        continue;
+      end;
+      lMapToFieldName := info[i].Name;
+      if Assigned(lColumnMappings) then begin
+        lColumnMapping := lColumnMappings.MappingByDatasetField(info[i].Name);
+        if Assigned(lColumnMapping) and (lColumnMapping.TableField <> '') then
+          lMapToFieldName := lColumnMapping.TableField;
+      end;
+      RealFields[i] := Source.FieldByName(lMapToFieldName).Index;
+    end;
+  end;
+
+  with Source do try
+    DisableControls;
+
+    if not Source.Active then Source.Open;
+    try
+      InternalDoWriteDataset_NonDataset(Source,k, max, RealFields, aDataIndex, info)
+    except
+      raise;
+    end;
+
+    lDataForAppend.EndDataPosition := Data.Position;
+    lDataForAppend.RecordCount := k;
+
+  finally
+    EnableControls;
+    result := k;
+  end;
+end;
+
+function TDABin2DataStreamer.DoEndWriteDataset(aDataForAppend: TDADataForAppend): Integer;
+begin
+  result := aDataForAppend.RecordCount;
+  Data.Position := aDataForAppend.CountOfRecordsPosition;
+  WriteIntegerToStream(Data, aDataForAppend.RecordCount);
+  Data.Position := aDataForAppend.EndDataPosition;
+  aDataForAppend.Free();
+end;
+
+function BoolToAnsiStr(B: Boolean): AnsiString;
+begin
+  if b then
+    Result:= 'True'
+  else
+    Result := 'False';
+end;
+
+
+procedure TDABin2DataStreamer.WriteField(const AField: TDAField);
+begin
+  WriteAnsistringToStream(Data, 'Alignment');
+  WriteAnsistringToStream(Data, TAlignmentStrings[AField.Alignment]);
+  WriteAnsistringToStream(Data, 'BlobType');
+  WriteAnsistringToStream(Data, TDABlobTypeStrings[AField.BlobType]);
+  WriteAnsistringToStream(Data, 'BusinessClassID');
+  WriteAnsistringToStream(Data, UTF8Encode(AField.BusinessClassID));
+  WriteAnsistringToStream(Data, 'Calculated');
+  WriteAnsistringToStream(Data, BoolToAnsiStr(AField.Calculated));
+  WriteAnsistringToStream(Data, 'CustomAttributes');
+  WriteAnsistringToStream(Data, UTF8Encode(AField.CustomAttributes.Text));
+  WriteAnsistringToStream(Data, 'DataType');
+  WriteAnsistringToStream(Data, TDADataTypeStrings[AField.DataType]);
+  WriteAnsistringToStream(Data, 'DecimalPrecision');
+  WriteAnsistringToStream(Data, UTF8Encode(IntToStr(AField.DecimalPrecision)));
+  WriteAnsistringToStream(Data, 'DecimalScale');
+  WriteAnsistringToStream(Data, UTF8Encode(IntToStr(AField.DecimalScale)));
+  WriteAnsistringToStream(Data, 'DefaultValue');
+  WriteAnsistringToStream(Data, UTF8Encode(AField.DefaultValue));
+  WriteAnsistringToStream(Data, 'Description');
+  WriteAnsistringToStream(Data, UTF8Encode(AField.Description));
+  WriteAnsistringToStream(Data, 'DictionaryEntry');
+  WriteAnsistringToStream(Data, UTF8Encode(AField.DictionaryEntry));
+  WriteAnsistringToStream(Data, 'DisplayFormat');
+  WriteAnsistringToStream(Data, UTF8Encode(AField.DisplayFormat));
+  WriteAnsistringToStream(Data, 'DisplayLabel');
+  WriteAnsistringToStream(Data, UTF8Encode(AField.DisplayLabel));
+  WriteAnsistringToStream(Data, 'DisplayWidth');
+  WriteAnsistringToStream(Data, UTF8Encode(IntToStr(AField.DisplayWidth)));
+  WriteAnsistringToStream(Data, 'EditFormat');
+  WriteAnsistringToStream(Data, UTF8Encode(AField.EditFormat));
+  WriteAnsistringToStream(Data, 'EditMask');
+  WriteAnsistringToStream(Data, UTF8Encode(AField.EditMask));
+  WriteAnsistringToStream(Data, 'Expression');
+  WriteAnsistringToStream(Data, UTF8Encode(AField.Expression));
+  WriteAnsistringToStream(Data, 'GeneratorName');
+  WriteAnsistringToStream(Data, UTF8Encode(AField.GeneratorName));
+  WriteAnsistringToStream(Data, 'InPrimaryKey');
+  WriteAnsistringToStream(Data, BoolToAnsiStr(AField.InPrimaryKey));
+  WriteAnsistringToStream(Data, 'KeyFields');
+  WriteAnsistringToStream(Data, UTF8Encode(AField.KeyFields));
+  WriteAnsistringToStream(Data, 'LogChanges');
+  WriteAnsistringToStream(Data, BoolToAnsiStr(AField.LogChanges));
+  WriteAnsistringToStream(Data, 'Lookup');
+  WriteAnsistringToStream(Data, BoolToAnsiStr(AField.Lookup));
+  WriteAnsistringToStream(Data, 'LookupCache');
+  WriteAnsistringToStream(Data, BoolToAnsiStr(AField.LookupCache));
+  WriteAnsistringToStream(Data, 'LookupKeyFields');
+  WriteAnsistringToStream(Data, UTF8Encode(AField.LookupKeyFields));
+  WriteAnsistringToStream(Data, 'LookupResultField');
+  WriteAnsistringToStream(Data, UTF8Encode(AField.LookupResultField));
+  WriteAnsistringToStream(Data, 'LookupSource');
+  WriteAnsistringToStream(Data, '');
+  WriteAnsistringToStream(Data, 'Name');
+  WriteAnsistringToStream(Data, UTF8Encode(AField.Name));
+  WriteAnsistringToStream(Data, 'ReadOnly');
+  WriteAnsistringToStream(Data, BoolToAnsiStr(AField.ReadOnly));
+  WriteAnsistringToStream(Data, 'RegExpression');
+  WriteAnsistringToStream(Data, UTF8Encode(AField.RegExpression));
+  WriteAnsistringToStream(Data, 'Required');
+  WriteAnsistringToStream(Data, BoolToAnsiStr(AField.Required));
+  WriteAnsistringToStream(Data, 'ServerAutoRefresh');
+  WriteAnsistringToStream(Data, BoolToAnsiStr(AField.ServerAutoRefresh));
+  WriteAnsistringToStream(Data, 'ServerCalculated');
+  WriteAnsistringToStream(Data, BoolToAnsiStr(AField.ServerCalculated));
+  WriteAnsistringToStream(Data, 'Size');
+  WriteAnsistringToStream(Data, UTF8Encode(IntToStr(AField.Size)));
+  WriteAnsistringToStream(Data, 'Visible');
+  WriteAnsistringToStream(Data, BoolToAnsiStr(AField.Visible));
+end;
+
+procedure TDABin2DataStreamer.WriteParam(const AParam: TDAParam);
+begin
+  WriteAnsistringToStream(Data, 'AsString');
+  WriteAnsistringToStream(Data, UTF8Encode(AParam.AsString));
+  WriteAnsistringToStream(Data, 'BlobType');
+  WriteAnsistringToStream(Data, TDABlobTypeStrings[AParam.BlobType]);
+  WriteAnsistringToStream(Data, 'DataType');
+  WriteAnsistringToStream(Data, TDADataTypeStrings[AParam.DataType]);
+  WriteAnsistringToStream(Data, 'DecimalPrecision');
+  WriteAnsistringToStream(Data, UTF8Encode(IntToStr(AParam.DecimalPrecision)));
+  WriteAnsistringToStream(Data, 'DecimalScale');
+  WriteAnsistringToStream(Data, UTF8Encode(IntToStr(AParam.DecimalScale)));
+  WriteAnsistringToStream(Data, 'Description');
+  WriteAnsistringToStream(Data, UTF8Encode(AParam.Description));
+  WriteAnsistringToStream(Data, 'GeneratorName');
+  WriteAnsistringToStream(Data, UTF8Encode(AParam.GeneratorName));
+  WriteAnsistringToStream(Data, 'Name');
+  WriteAnsistringToStream(Data, UTF8Encode(AParam.Name));
+  WriteAnsistringToStream(Data, 'ParamType');
+  WriteAnsistringToStream(Data, TDAParamTypeStrings[AParam.ParamType]);
+  WriteAnsistringToStream(Data, 'Size');
+  WriteAnsistringToStream(Data, UTF8Encode(IntToStr(AParam.Size)));
+  WriteAnsistringToStream(Data, 'Value');
+  WriteAnsistringToStream(Data, UTF8Encode(VarToStr(AParam.Value)));
+end;
+
+procedure TDABin2DataStreamer.ReadParam(const AParam: TDAParam; const aParamPropertiesCount: integer);
+var
+  i: integer;
+  sName: AnsiString;
+  sAnsiValue: AnsiString;
+  sValue: String;
+begin
+  For i := 0 to aParamPropertiesCount-1 do begin
+    sName := ReadAnsistringFromStream(Data);
+    sAnsiValue :=ReadAnsistringFromStream(Data);
+    sValue :=UTF8ToString(sAnsiValue);
+    if sName = 'AsString' then AParam.AsString:= sValue
+    else if sName = 'BlobType' then  AParam.BlobType := TDABlobTypeStringsToTDABlobType(sAnsiValue)
+    else if sName = 'DataType' then AParam.DataType := TDADataTypeStringsToTDADataType(sAnsiValue)
+    else if sName = 'DecimalPrecision' then AParam.DecimalPrecision := StrToInt(sValue)
+    else if sName = 'DecimalScale' then AParam.DecimalScale := StrToInt(sValue)
+    else if sName = 'Description' then AParam.Description := sValue
+    else if sName = 'GeneratorName' then AParam.GeneratorName := sValue
+    else if sName = 'Name' then AParam.Name := sValue
+    else if sName = 'ParamType' then AParam.ParamType := TDAParamTypeStringsToTDAParamType(sAnsiValue)
+    else if sName = 'Size' then AParam.Size := StrToInt(sValue)
+    else if sName = 'Value' then AParam.Value := sValue
+    else ;
+  end;
+end;
+
+procedure TDABin2DataStreamer.ReadField(const AField: TDAField;
+  const aFieldPropertiesCount: integer);
+var
+  i: integer;
+  sName, sAnsiValue: AnsiString;
+  sValue: string;
+begin
+  For i := 0 to aFieldPropertiesCount-1 do begin
+    sName := ReadAnsistringFromStream(Data);
+    sAnsiValue :=ReadAnsistringFromStream(Data);
+    sValue :=UTF8ToString(sAnsiValue);
+    if sName = 'Alignment' then AField.Alignment := TAlignmentStringsToTAlignment(sAnsiValue)
+    else if sName = 'BlobType' then AField.BlobType := TDABlobTypeStringsToTDABlobType(sAnsiValue)
+    else if sName = 'BusinessClassID' then AField.BusinessClassID := sValue
+    else if sName = 'Calculated' then AField.Calculated := StrToBool(sValue)
+    else if sName = 'CustomAttributes' then AField.CustomAttributes.Text := sValue
+    else if sName = 'DataType' then AField.DataType := TDADataTypeStringsToTDADataType(sAnsiValue)
+    else if sName = 'DecimalPrecision' then AField.DecimalPrecision := StrToInt(sValue)
+    else if sName = 'DecimalScale' then AField.DecimalScale := StrToInt(sValue)
+    else if sName = 'DefaultValue' then AField.DefaultValue := sValue
+    else if sName = 'Description' then AField.Description := sValue
+    else if sName = 'DictionaryEntry' then AField.DictionaryEntry := sValue
+    else if sName = 'DisplayFormat' then AField.DisplayFormat := sValue
+    else if sName = 'DisplayLabel' then AField.DisplayLabel := sValue
+    else if sName = 'DisplayWidth' then AField.DisplayWidth := StrToInt(sValue)
+    else if sName = 'EditFormat' then AField.EditFormat := sValue
+    else if sName = 'EditMask' then AField.EditMask := sValue
+    else if sName = 'Expression' then AField.Expression := sValue
+    else if sName = 'GeneratorName' then AField.GeneratorName := sValue
+    else if sName = 'InPrimaryKey' then AField.InPrimaryKey := StrToBool(sValue)
+    else if sName = 'KeyFields' then AField.KeyFields := sValue
+    else if sName = 'LogChanges' then AField.LogChanges := StrToBool(sValue)
+    else if sName = 'Lookup' then AField.Lookup := StrToBool(sValue)
+    else if sName = 'LookupCache' then AField.LookupCache := StrToBool(sValue)
+    else if sName = 'LookupKeyFields' then AField.LookupKeyFields := sValue
+    else if sName = 'LookupResultField' then AField.LookupResultField := sValue
+    else if sName = 'LookupSource' then // AField.LookupSource:=nil;
+    else if sName = 'Name' then AField.Name := sValue
+    else if sName = 'ReadOnly' then AField.ReadOnly := StrToBool(sValue)
+    else if sName = 'RegExpression' then AField.RegExpression := sValue
+    else if sName = 'Required' then AField.Required := StrToBool(sValue)
+    else if sName = 'ServerAutoRefresh' then AField.ServerAutoRefresh := StrToBool(sValue)
+    else if sName = 'ServerCalculated' then AField.ServerCalculated := StrToBool(sValue)
+    else if sName = 'Size' then AField.Size := StrToInt(sValue)
+    else if sName = 'Visible' then AField.Visible := StrToBool(sValue)
+    else ;
+  end;
+end;
+
+procedure TDABin2DataStreamer.InternalDoReadDataset(const Destination: IDAEditableDataset; ARecordCount: integer;ARealFields: array of integer);
+var
+  memdataset: IDAMemDatasetBatchAdding;
+type
+  PMemDatasetrecord_Native = ^TMemDatasetrecord_Native;
+  TMemDatasetrecord_Native = packed record
+    Ident: byte;
+    Data: PAnsichar;
+  end;
+
+  procedure BitmaskToNativeBuf(Bitmask, buf: PAnsiChar; aFields: array of integer);
+  var
+    i: integer;
+  begin
+    for i:=Low(aFields) to High(aFields) do
+      SetBitMask(buf, aFields[i], GetBitMask(Bitmask,i));
+  end;
+
+var
+  FRecordsList: TList;
+  buf1: pointer;
+  s: Ansistring;
+  Buf: PAnsiChar;
+  val: Variant;
+  memdataset_BitMaskSize: integer;
+  BindedFields: array of integer;
+  flds: array of TDAField;
+  BitMask: Ansistring;
+  streamer_BitMaskSize: integer;
+  i: integer;
+  Realfldcount: integer;
+{$IFDEF BIN2DEBUG_time}
+  t1,t2,t3: TDateTime;
+{$ENDIF BIN2DEBUG_time}
+  lProgress: Boolean;
+  lTotal: integer;
+  lCurrent: integer;
+begin
+  if Destination.QueryInterface(IDAMemDatasetBatchAdding, memdataset) <> s_ok then memdataset := nil;
+  Realfldcount := Length(ARealFields);
+  setLength(flds, Realfldcount);
+  For i:= 0 to Realfldcount-1 do
+    flds[i] := Destination.Fields[ARealFields[i]];
+
+  streamer_BitMaskSize := (Realfldcount + 7) div 8;
+  SetLength(BitMask, streamer_BitMaskSize);
+  // bitmask has different value that in ReadDelta/WriteDelta !!!
+  // 0 = field is not null
+  // 1 = field is null
+
+  lProgress := Assigned(OnReadDatasetProgress);
+  lTotal := ARecordCount;
+  lCurrent := 0;
+  if (memdataset = nil) or Assigned(OnReadFieldValue) then begin
+    // standard mode
+    while (ARecordCount > 0) do try
+      Destination.Append;
+      // read bitmask
+      Data.Read(pointer(BitMask)^, streamer_BitMaskSize);
+      for i := 0 to Realfldcount - 1 do begin
+        if GetBitMask(PAnsiChar(BitMask), i) then
+          //
+        else begin
+          case flds[i].Datatype of
+            datWideString, datWideMemo, datXml: flds[i].AsWideString := ReadWidestringFromStream(Data);
+            datString, datMemo, DatBlob: flds[i].AsAnsiString := ReadAnsistringFromStream(Data);
+            datDateTime: flds[i].AsDateTime := ReadDateTimeFromStream(Data);
+            datFloat: flds[i].AsFloat := ReadDoubleFromStream(Data);
+            datCurrency: flds[i].AsCurrency := ReadCurrencyFromStream(Data);
+            datBoolean: flds[i].AsBoolean := ReadBooleanFromStream(Data);
+            datAutoInc, datInteger: flds[i].AsInteger := ReadIntegerFromStream(Data);
+            datLargeInt, datLargeAutoInc: flds[i].AsLargeInt := Readint64FromStream(Data);
+            datLargeUInt: flds[i].AsLargeUInt := ReadUint64FromStream(Data);
+            datByte: flds[i].AsByte := ReadByteFromStream(Data);
+            datShortInt: flds[i].AsShortInt := ReadShortIntFromStream(Data);
+            datWord: flds[i].AsWord := ReadWordFromStream(Data);
+            datSmallInt: flds[i].AsSmallInt := ReadSmallIntFromStream(Data);
+            datCardinal: flds[i].AsCardinal := ReadCardinalFromStream(Data);
+            datGuid: flds[i].AsAnsiString := ReadGuidFromStream(Data);
+            datSingleFloat: flds[i].AsSingle := ReadSingleFromStream(Data);
+            datDecimal: flds[i].AsDecimal := ReadBCDFromStream(Data);
+          end;
+        end;
+        if Assigned(OnReadFieldValue) then begin
+          val := flds[i].Value;
+          OnReadFieldValue(flds[i], val);
+          flds[i].Value := val;
+        end;
+      end;
+      try
+        Destination.Post;
+      except
+        // Introduced to restore the dsBrowse state of the datatable
+        // in case of errors
+        Destination.Cancel;
+        raise;
+      end;
+      if lProgress then begin
+        inc(lCurrent);
+        OnReadDatasetProgress(Self, Destination, lCurrent, lTotal);
+      end;
+    finally
+      Dec(ARecordCount);
+    end;
+  end
+  else begin
+    // superfast mode
+    {$IFDEF BIN2DEBUG_time}
+    t1:=now;
+    {$ENDIF BIN2DEBUG_time}
+    SetLength(BindedFields, Realfldcount);
+    For i:= 0 to Realfldcount - 1 do
+      BindedFields[i]:=Destination.Fields[ARealFields[i]].BindedField.Index;
+
+    FRecordsList := TList.Create;
+    try
+      memdataset_BitMaskSize := (Realfldcount + 1 {RECID} + 7) div 8;
+      SetLength(BitMask, memdataset_BitMaskSize);
+
+      while (ARecordCount > 0) do try
+        Buf := memdataset.AllocRecordBuffer;
+        try
+          Data.Read(pointer(BitMask)^, streamer_BitMaskSize);
+          BitmaskToNativeBuf(pointer(BitMask), Pointer(PMemDatasetrecord_Native(buf)^.Data), BindedFields);
+          //Data.Read(buf^, BitMaskSize);
+          for i := 0 to Realfldcount - 1 do begin
+            if GetBitMask(PAnsiChar(BitMask), i) then
+              //
+            else begin
+              buf1 := memdataset.GetFieldNativeBuffer(Buf, flds[i].BindedField);
+              case flds[i].DataType of
+                datWideString, datXml: memdataset.SetWideString(buf1,flds[i].BindedField,ReadWidestringFromStream(Data));//PWideString(buf1)^ := ReadWidestringFromStream(Data);
+                datString: memdataset.SetAnsiString(buf1,flds[i].BindedField,ReadAnsistringFromStream(Data));//PAnsiString(buf1)^ := ReadAnsistringFromStream(Data);
+                datDateTime: PDateTime(buf1)^ := TimeStampToMSecs(DateTimeToTimeStamp(ReadDateTimeFromStream(Data)));
+                datFloat: PDouble(buf1)^ := ReadDoubleFromStream(Data);
+                datCurrency: PCurrency(buf1)^ := ReadCurrencyFromStream(Data);
+                datBoolean: PBoolean(buf1)^ := ReadBooleanFromStream(Data);
+                datLargeInt, datLargeAutoInc: PInt64(buf1)^ := Readint64FromStream(Data);
+                datLargeUInt: PUInt64(buf1)^ := ReadUint64FromStream(Data);
+                datAutoInc, datInteger: PInteger(buf1)^ := ReadIntegerFromStream(Data);
+                datCardinal: PCardinal(buf1)^ := ReadCardinalFromStream(Data);
+                datWord: PWord(buf1)^ := ReadWordFromStream(Data);
+                datShortInt: PSmallInt(buf1)^ := ReadShortIntFromStream(Data);
+                datSmallInt: PSmallInt(buf1)^ := ReadSmallIntFromStream(Data);
+                datByte: PSmallInt(buf1)^ := ReadByteFromStream(Data);
+                datSingleFloat: PDouble(buf1)^ := ReadSingleFromStream(Data);
+                datDecimal: PBCD(buf1)^ := ReadBCDFromStream(Data);
+                datGuid: begin
+                    s := ReadGUIDFromStream(Data);
+                    Move(pointer(s)^, pointer(buf1)^, 38 {Length(GuidString)});
+                  end;
+                datWideMemo, datMemo, DatBlob: begin
+                    s := ReadAnsistringFromStream(Data);
+                    PPointer(buf1)^ := memdataset.MakeBlobFromString(s);
+                  end;
+              end;
+            end;
+          end;
+          FRecordsList.Add(Buf);
+        except
+          memdataset.FreeRecordBuffer(buf);
+          For i:=0 to FRecordsList.Count-1 do begin
+            buf:=FRecordsList[i];
+            memdataset.FreeRecordBuffer(Buf);
+          end;
+          raise;
+        end;
+        if lProgress then begin
+          inc(lCurrent);
+          OnReadDatasetProgress(Self, Destination, lCurrent, lTotal);
+        end;
+      finally
+        Dec(ARecordCount);
+      end;
+      {$IFDEF BIN2DEBUG_time}
+      t2:=now;
+      {$ENDIF BIN2DEBUG_time}
+      memdataset.AddRecordsfromList(FRecordsList);
+      {$IFDEF BIN2DEBUG_time}
+      t3:=now;
+      OutputDebugString(PAnsiChar('TDABIN2DataStreamer.InternalDoReadDataset: SF Mode '+TimeToStr(t2-t1)+' | ' +FloatToStr(t2-t1) + ' ||| Adding  '+TimeToStr(t3-t2)+' | ' +FloatToStr(t3-t2)));
+      {$ENDIF BIN2DEBUG_time}
+    finally
+      FRecordsList.Free;
+    end;
+  end;
+end;
+
+procedure TDABin2DataStreamer.InternalDoWriteDataset(
+  const Source: IDADataset; var k: integer;const Maxrecords: integer;
+  ARealFields: array of integer;aDataIndex: Integer;info: array of TDASmallFieldInfo);
+var
+  currpos: integer;
+  ev1, ev2: boolean;
+  BitMask: Ansistring;
+  BitMaskSize: integer;
+  bitmaskpos : integer;
+  NeedWriteBitMask: Boolean;
+  i : integer;
+  Realfldcnt: integer;
+  flds: array of TDAField;
+  val: Variant;
+{$IFDEF BIN2DEBUG_time}
+  t1,t2: TDateTime;
+{$ENDIF BIN2DEBUG_time}
+  lProgress: Boolean;
+begin
+  Realfldcnt:= Length(ARealFields);
+  BitMaskSize := (Realfldcnt + 7) div 8;
+  SetLength(BitMask, BitMaskSize);
+  SetLength(flds,Realfldcnt);
+  for i := 0 to Realfldcnt-1 do begin
+    if ARealFields[i] = -10 then
+      flds[i]:=nil
+    else
+      flds[i]:=Source.Fields[ARealFields[i]];
+  end;
+
+
+  lProgress := Assigned(onWriteDatasetProgress);
+
+  // bitmask has different value that in ReadDelta/WriteDelta !!!
+  // 0 = field is not null
+  // 1 = field is null
+  ev1 := Assigned(OnBeforeFieldValueSerialization);
+  ev2 := Assigned(OnWriteFieldValue);
+  if ev1 or ev2 then begin
+    // with events
+    while (k <> Maxrecords) and not Source.EOF do begin
+      ClearBitMask(PAnsiChar(BitMask),BitMaskSize); // all is not Null
+      bitmaskpos := Data.Position;
+      Data.Write(pointer(BitMask)^, BitMaskSize);
+      NeedWriteBitMask := False;
+      for i := 0 to (Realfldcnt - 1) do begin
+        //ARealFields[i] = -10 then this is @SourceTable field
+        if ARealFields[i] = -10 then begin
+          //We shouldn't fire events since this is special internal field
+          val := aDataIndex;
+        end else begin
+          val := Source.FieldValues[ARealFields[i]];
+          if ev1 then OnBeforeFieldValueSerialization(flds[i], val);
+          if ev2 then OnWriteFieldValue(flds[i], val);
+        end;
+
+        if VarIsNull(Val) or VarIsEmpty(Val) then begin
+          NeedWriteBitMask := True;
+          SetBitMask(PAnsiChar(BitMask), i, True);
+        end else begin
+          if not WriteVariantToStream(Data, val, Info[i].Datatype) then begin
+            NeedWriteBitMask := True;
+            SetBitMask(PAnsiChar(BitMask), i, True);
+          end;
+        end;
+        if NeedWriteBitMask then begin
+          currpos := Data.Position;
+          Data.Position := bitmaskpos;
+          Data.Write(pointer(BitMask)^, BitMaskSize);
+          Data.Position := currpos;
+        end;
+      end;
+      //    Inc(result);
+      Inc(k);
+      if lProgress then OnWriteDatasetProgress(Self, Source, k, Maxrecords);
+      Source.Next;
+      if Source.EOF then Break;
+    end;
+  end
+  else begin
+    // Writes the actual records
+    // without events
+    {$IFDEF BIN2DEBUG_time}
+    t1:=now;
+    {$ENDIF BIN2DEBUG_time}
+    while (k <> Maxrecords) and not Source.EOF do begin
+      ClearBitMask(PAnsiChar(BitMask),BitMaskSize); // all is not Null
+
+      for i := 0 to (Realfldcnt - 1) do
+        //ARealFields[i] = -10 then this is @SourceTable field
+        if ((ARealFields[i] <> -10) and (flds[i].IsNull)) then
+          SetBitMask(PAnsiChar(BitMask), i, True);
+      Data.Write(pointer(BitMask)^, BitMaskSize);
+
+      for i := 0 to (Realfldcnt - 1) do begin
+
+        //ARealFields[i] = -10 then this is @SourceTable field
+        if ARealFields[i] = -10 then begin
+          WriteIntegerToStream(Data, aDataIndex);
+        end else begin
+          if GetBitMask(PAnsiChar(BitMask), i) then begin
+          end else begin
+            case Info[i].Datatype of
+              datWideString, datWideMemo, datXml: WriteWidestringToStream(Data, flds[i].AsWideString);
+              datString, datMemo, datBlob: WriteAnsistringToStream(Data, flds[i].AsAnsiString);
+              datDateTime: WriteDateTimeToStream(Data, flds[i].AsDateTime);
+              datFloat: WriteDoubleToStream(Data, flds[i].AsFloat);
+              datBoolean: WriteBooleanToStream(Data, flds[i].AsBoolean);
+              datCurrency: WriteCurrencyToStream(Data, flds[i].AsCurrency);
+              datAutoInc, datInteger: WriteIntegerToStream(Data, flds[i].AsInteger);
+              datLargeInt, datLargeAutoInc: Writeint64ToStream(Data, flds[i].AsLargeInt);
+              datLargeUInt: WriteUint64ToStream(Data, flds[i].AsLargeUInt);
+              datByte: WriteByteToStream(Data, flds[i].AsByte);
+              datShortInt: WriteShortIntToStream(Data, flds[i].AsShortInt);
+              datWord: WriteWordToStream(Data, flds[i].AsWord);
+              datSmallInt: WriteSmallIntToStream(Data, flds[i].AsSmallInt);
+              datCardinal: WriteCardinalToStream(Data, flds[i].AsCardinal);
+              datGuid: WriteGUIDToStream(Data, flds[i].AsAnsiString);
+              datSingleFloat: WriteSingleToStream(Data, flds[i].AsSingle);
+              datDecimal: WriteBCDToStream(Data, flds[i].AsDecimal);
+            end;
+          end;
+        end;
+      end;
+
+      //  Inc(result);
+      Inc(k);
+      if lProgress then OnWriteDatasetProgress(Self, Source, k, Maxrecords);
+      Source.Next;
+      if Source.EOF then Break;
+    end;
+    {$IFDEF BIN2DEBUG_time}
+    t2:=now;
+    OutputDebugString(PAnsiChar('TDABIN2DataStreamer.InternalDoWriteDataset:'+TimeToStr(t2-t1)+' | ' +FloatToStr(t2-t1)));
+    {$ENDIF BIN2DEBUG_time}
+  end;
+end;
+
+function TDABin2DataStreamer.GetTargetDataType: TRODataType;
+begin
+  Result := rtBinary;
+end;
+
+procedure TDABin2DataStreamer.CheckSignature(aSignature: TBIN2AdapterSignature);
+begin
+  if (asignature <> BIN2AdapterSignature) then raise Exception.Create('Incompatible binary2 adapter stream');
+end;
+
+procedure TDABin2DataStreamer.InternalDoWriteDataset_NonDataset(
+  const Source: IDADataset; var k: integer; const Maxrecords: integer;
+  ARealFields: array of integer; aDataIndex: Integer;
+  info: array of TDASmallFieldInfo);
+  
+type
+  TfldInfo = packed record
+    isNull: Boolean;
+    Data: pointer;
+    DataSize: Cardinal;
+    DataType: TFieldType;
+  end;
+
+var
+  currpos: integer;
+  ev1, ev2: boolean;
+  BitMask: Ansistring;
+  BitMaskSize: integer;
+  bitmaskpos : integer;
+  NeedWriteBitMask: Boolean;
+  i : integer;
+  Realfldcnt: integer;
+  flds: array of TDAField;
+  val: Variant;
+{$IFDEF BIN2DEBUG_time}
+  t1,t2: TDateTime;
+{$ENDIF BIN2DEBUG_time}
+  NativeDataset: IDASQLCommandNativeObject;
+  fldInfo: array of TfldInfo;
+  s: Ansistring;
+  lbcd: TBCD;
+  lCanFreeNativeData: Boolean;
+  lProgress: boolean;
+begin
+  if (Source.QueryInterface(IDASQLCommandNativeObject, NativeDataset) <> 0)
+    {$IFDEF Drivers_CompatibilityMode}or NativeDataset.IsTDatasetCompatible{$ENDIF} then begin
+    // dataset-compatible mode
+    InternalDoWriteDataset(Source, k, Maxrecords, ARealFields, aDataIndex, info);
+    exit;
+  end;
+  Realfldcnt:= Length(ARealFields);
+  BitMaskSize := (Realfldcnt + 7) div 8;
+  SetLength(BitMask, BitMaskSize);
+
+  lProgress := Assigned(onWriteDatasetProgress);
+  // bitmask has different value that in ReadDelta/WriteDelta !!!
+  // 0 = field is not null
+  // 1 = field is null
+  ev1 := Assigned(OnBeforeFieldValueSerialization);
+  ev2 := Assigned(OnWriteFieldValue);
+  if ev1 or ev2 then begin
+    // with events
+    SetLength(flds,Realfldcnt);
+    for i := 0 to Realfldcnt-1 do begin
+      if ARealFields[i] = -10 then
+        flds[i]:=nil
+      else
+        flds[i]:=Source.Fields[ARealFields[i]];
+    end;
+    while (k <> Maxrecords) and not Source.EOF do begin
+      ClearBitMask(PAnsiChar(BitMask),BitMaskSize); // all is not Null
+      bitmaskpos := Data.Position;
+      Data.Write(pointer(BitMask)^, BitMaskSize);
+      NeedWriteBitMask := False;
+      for i := 0 to (Realfldcnt - 1) do begin
+        //ARealFields[i] = -10 then this is @SourceTable field
+        if ARealFields[i] = -10 then begin
+          //We shouldn't fire events since this is special internal field
+          val := aDataIndex;
+        end else begin
+          val := Source.FieldValues[ARealFields[i]];
+          if ev1 then OnBeforeFieldValueSerialization(flds[i], val);
+          if ev2 then OnWriteFieldValue(flds[i], val);
+        end;
+
+        if VarIsNull(Val) or VarIsEmpty(Val) then begin
+          NeedWriteBitMask := True;
+          SetBitMask(PAnsiChar(BitMask), i, True);
+        end else begin
+          if not WriteVariantToStream(Data, val, Info[i].Datatype) then begin
+            NeedWriteBitMask := True;
+            SetBitMask(PAnsiChar(BitMask), i, True);
+          end;
+        end;
+        if NeedWriteBitMask then begin
+          currpos := Data.Position;
+          Data.Position := bitmaskpos;
+          Data.Write(pointer(BitMask)^, BitMaskSize);
+          Data.Position := currpos;
+        end;
+      end;
+      //    Inc(result);
+      Inc(k);
+      if lProgress then OnWriteDatasetProgress(Self, Source, k, Maxrecords);
+      Source.Next;
+      if Source.EOF then Break;
+    end;
+  end
+  else begin
+    // Writes the actual records
+    // without events
+     SetLength(fldInfo,Realfldcnt);
+     for i := 0 to (Realfldcnt - 1) do begin
+       if (ARealFields[i] = -10) then
+         fldInfo[i].DataType:= ftInteger
+       else
+         fldInfo[i].DataType:= NativeDataset.NativeFields[i].DataType;
+     end;
+    lCanFreeNativeData := NativeDataset.CanFreeNativeFieldData;
+    {$IFDEF BIN2DEBUG_time}
+    t1:=now;
+    {$ENDIF BIN2DEBUG_time}
+    while (k <> Maxrecords) and not Source.EOF do begin
+      ClearBitMask(PAnsiChar(BitMask),BitMaskSize); // all is not Null
+
+
+      for i := 0 to (Realfldcnt - 1) do begin
+        if (ARealFields[i] = -10) then begin
+          //ARealFields[i] = -10 then this is @SourceTable field
+          fldInfo[i].isNull := False;
+          GetMem(fldInfo[i].Data, SizeOf(Integer));
+          PInteger(fldInfo[i].Data)^ := aDataIndex;
+          fldInfo[i].DataSize:=4;
+        end
+        else begin
+          fldInfo[i].isNull:= not NativeDataset.GetNativeFieldData(ARealFields[i],fldInfo[i].Data, fldInfo[i].DataSize);
+        end;
+        if fldInfo[i].isNull then
+          SetBitMask(PAnsiChar(BitMask), i, True);
+      end;
+      Data.Write(pointer(BitMask)^, BitMaskSize);
+      for i := 0 to (Realfldcnt - 1) do begin
+        if not fldInfo[i].isNull then begin
+          try
+            case Info[i].Datatype of
+              datWideString, datWideMemo, datXml: begin
+                WriteIntegerToStream(Data, fldInfo[i].DataSize);
+                Data.Write(fldInfo[i].Data^, fldInfo[i].DataSize);
+              end;
+              datString, datMemo, datBlob: begin
+                if fldInfo[i].DataType in [
+                  {$IFDEF DA_WideMemoSupport}ftWideMemo,{$ENDIF}
+                  {$IFDEF DA_FixedWideCharSupport}ftFixedWideChar,{$ENDIF}
+                  ftWideString] then begin
+                  s:= WideStringToAnsiString(PWideChar(fldInfo[i].Data));
+                  WriteIntegerToStream(Data, Length(s));
+                  Data.Write(Pointer(s)^, Length(s));
+                end
+                else begin
+                  WriteIntegerToStream(Data, fldInfo[i].DataSize);
+                  Data.Write(fldInfo[i].Data^, fldInfo[i].DataSize);
+                end;
+              end;
+              datDecimal: begin
+                case fldInfo[i].DataType of
+                  ftFMTBCD: WriteBCDToStream(Data, PBCD(fldinfo[i].Data)^);
+                  ftBCD: begin
+                    CurrToBcd(PCurrency(fldinfo[i].Data)^, lbcd);
+                    WriteBCDToStream(Data, lbcd);
+                  end;
+                end;
+              end;
+              datGuid: begin
+                if fldinfo[i].DataSize <> 39 then begin
+                  SetString(s, PAnsiChar(fldinfo[i].Data),38);
+                  raise Exception.CreateFmt('Invalid GUID: %s',[s])
+                end
+                else
+                Data.Write((PAnsiChar(fldinfo[i].Data)+1)^,36);
+              end;
+              datBoolean: WriteBooleanToStream(Data, PWordBool(fldinfo[i].Data)^);
+            else
+              Data.Write((fldinfo[i].Data)^, fldinfo[i].DataSize);
+            end;
+          finally
+            if lCanFreeNativeData then FreeMem(fldinfo[i].Data);
+          end;
+        end;
+      end;
+      //  Inc(result);
+      Inc(k);
+      if lProgress then OnWriteDatasetProgress(Self, Source, k, Maxrecords);
+      Source.Next;
+      if Source.EOF then Break;
+    end;
+    {$IFDEF BIN2DEBUG_time}
+    t2:=now;
+    OutputDebugString(PAnsiChar('TDABIN2DataStreamer.InternalDoWriteDataset:'+TimeToStr(t2-t1)+' | ' +FloatToStr(t2-t1)));
+    {$ENDIF BIN2DEBUG_time}
+  end;
+end;
+
+end.
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDABinAdapter.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDABinAdapter.pas
new file mode 100644
index 0000000..c7b1d82
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDABinAdapter.pas	
@@ -0,0 +1,1286 @@
+unit uDABinAdapter;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  Classes,
+  uROClasses,
+  uDADataTable, uDAInterfaces, uDADataStreamer, uDADelta, FMTBcd;
+
+type
+  TBINAdapterSignature = array[0..7] of ansichar;
+
+const
+  BINAdapterSignature: TBINAdapterSignature = 'DABIN100';
+
+type
+  TDAElementType = (etDataset, etDelta);
+
+  { TElementInfo }
+  TDAElementInfo = class
+    ElementType: TDAElementType;
+      Name: string;
+    Offset: integer;
+  end;
+
+  { TDABinDataStreamer }
+  TDABinDataStreamer = class(TDADataStreamer)
+  private
+    fReader: TReader;
+    fWriter: TWriter;
+
+    fInfoIntOffset: integer;
+    fIsCompatibleV4: boolean;
+
+    procedure AddElementInfo(ElementType: TDAElementType; ElementName: string; Offset: integer);
+    procedure WriteElementInfo(ElementInfo: TDAElementInfo);
+    procedure ReadElementInfo;
+    function GetElementInfo(ElementType: TDAElementType; const Name: string): TDAElementInfo;
+
+    procedure ReadAndApplySchema(const Destination: IDADataset; ApplySchema: boolean);
+    procedure WriteSchema(const Fields: TDAFieldCollection; const Params: TDAParamCollection; aFieldsIndex: array of integer); overload;
+    function ReadOffset: integer;
+    procedure WriteOffset(Offset: integer);
+
+  protected
+    // Overriden
+    function DoCreateStream: TStream; override;
+    procedure DoInitialize(Mode: TDAAdapterInitialization); override;
+    procedure DoFinalize; override;
+    function DoWriteDataset(const Source: IDADataset; Options: TDAWriteOptions; MaxRows: integer;ADynFieldNames: array of string): integer; override;
+    procedure DoWriteDelta(const Source: IDADelta); override;
+    procedure DoReadDataset(const DatasetName: string; const Destination: IDADataset; ApplySchema: boolean); override;
+    procedure DoReadDelta(const DeltaName: string; const Destination: IDADelta); override;
+    procedure SetBufferSize(const Value: cardinal); override;
+
+    function DoBeginWriteDataset( const Source: IDADataset; const Schema: TDADataset;
+                                  Options: TDAWriteOptions; MaxRows: integer;
+                                  ADynFieldNames: array of string): TDADataForAppend; override;
+
+    function DoWriteDatasetData(const Source: IDADataset; var aDataForAppend: TDADataForAppend; aDataIndex: Integer = -1): Integer; override;
+    function DoEndWriteDataset(aDataForAppend: TDADataForAppend): Integer; override;
+
+  public
+    constructor Create(aOwner: TComponent); override;
+    destructor Destroy; override;
+
+    function GetTargetDataType: TRODataType; override;
+  published
+    property BufferSize;
+    property IsCompatibleV4: boolean read fIsCompatibleV4 write fIsCompatibleV4 default True;
+  end;
+
+  TDABINAdapter = class(TDABinDataStreamer) end deprecated;
+
+implementation
+
+uses Math, SysUtils, Variants, uROBinaryHelpers, uDaClasses, uDAEngine {$IFDEF DELPHI6}, RTLConsts{$ENDIF};
+
+
+{$IFDEF FPC}
+type
+  THackBinaryObjectWriter = class(TBinaryObjectWriter)
+  end;
+
+  THackBinaryObjectReader = class(TBinaryObjectReader)
+  end;
+{$ENDIF}
+
+procedure Writer_FlushBuffer(AWriter: TWriter);
+begin
+  {$IFNDEF FPC}
+  AWriter.FlushBuffer;
+  {$ELSE}
+  THackBinaryObjectWriter(AWriter.Driver).FlushBuffer;
+  {$ENDIF}
+end;
+
+function GetWriterPosition(AWriter: TWriter):Longint;
+begin
+  {$IFNDEF FPC}
+  Result := AWriter.Position
+  {$ELSE}
+  Result := THackBinaryObjectWriter(AWriter.Driver).FStream.Position;
+  {$ENDIF}
+end;
+
+Procedure SetWriterPosition(AWriter: TWriter; APosition:Longint);
+begin
+  {$IFNDEF FPC}
+  AWriter.Position:=APosition;
+  {$ELSE}
+  Writer_FlushBuffer(AWriter);
+  THackBinaryObjectWriter(AWriter.Driver).FStream.Position:=APosition;
+  {$ENDIF}
+end;
+
+{$IFDEF FPC}
+procedure Writer_WriteValue(AWriter: TWriter; aValue: TValueType);
+begin
+  THackBinaryObjectWriter(AWriter.Driver).WriteValue(aValue);
+end;
+{$ENDIF}
+
+procedure Writer_WriteVariant(AWriter: TWriter; AValue: Variant);
+begin
+  {$IFNDEF FPC}
+   AWriter.WriteVariant(AValue);
+  {$ELSE}
+  if VarIsArray(aValue) then raise EWriteError.Create('Stream write error');
+  case VarType(aValue) and varTypeMask of
+    varEmpty: Writer_WriteValue(AWriter,vaNil);
+    varNull: Writer_WriteValue(AWriter,vaNull);
+    varUString,
+    varOleStr: aWriter.WriteWideString(aValue);
+    varString: aWriter.WriteString(aValue);
+    varByte, varShortInt, varWord, varSmallInt,
+      varInteger,varLongWord, varInt64: aWriter.WriteInteger(aValue);
+    varSingle: aWriter.WriteSingle(aValue);
+    varDouble: aWriter.WriteFloat(aValue);
+    varCurrency: aWriter.WriteCurrency(aValue);
+    varDate: aWriter.WriteDate(aValue);
+    varBoolean:  aWriter.WriteBoolean(aValue);
+  else
+    aWriter.WriteString(aValue)
+  end;
+  {$ENDIF}
+end;
+
+function GetReaderPosition(AReader: TReader):Longint;
+begin
+  {$IFNDEF FPC}
+  Result := AReader.Position
+  {$ELSE}
+  Result := THackBinaryObjectReader(AReader.Driver).FStream.Position;
+  {$ENDIF}
+end;
+
+Procedure SetReaderPosition(AReader: TReader; APosition:Longint);
+begin
+  {$IFNDEF FPC}
+  AReader.Position:=APosition;
+  {$ELSE}
+  THackBinaryObjectReader(AReader.Driver).FStream.Position:=APosition;
+  {$ENDIF}
+end;
+
+
+{$IFDEF DELPHI6}
+
+function D6_Reader_ReadVariant(AReader: TReader): Variant;
+
+  function ReadCustomVariant: Variant;
+  var
+    OuterStream, InnerStream: TMemoryStream;
+    OuterReader: TReader;
+    StreamSize: Integer;
+    CustomType: TCustomVariantType;
+    CustomTypeClassName: string;
+    VarStreamer: IVarStreamable;
+  begin
+    with AReader do begin
+      CheckValue(vaBinary);
+      OuterStream := TMemoryStream.Create;
+      InnerStream := TMemoryStream.Create;
+      try
+        Read(StreamSize, SizeOf(StreamSize));
+        OuterStream.Size := StreamSize;
+        Read(OuterStream.Memory^, StreamSize);
+
+        OuterReader := TReader.Create(OuterStream, 1024);
+        try
+          CustomTypeClassName := OuterReader.ReadString;
+          OuterReader.Read(StreamSize, SizeOf(StreamSize));
+          InnerStream.Size := StreamSize;
+          OuterReader.Read(InnerStream.Memory^, StreamSize);
+
+          if not FindCustomVariantType(CustomTypeClassName, CustomType) or
+             not Supports(TObject(CustomType), IVarStreamable, VarStreamer) then
+            raise EReadError.CreateRes(@SReadError);
+          TVarData(Result).VType := CustomType.VarType;
+          VarStreamer.StreamIn(TVarData(Result), InnerStream);
+        finally
+          OuterReader.Free;
+        end;
+      finally
+        InnerStream.Free;
+        OuterStream.Free;
+      end;
+    end;
+  end;
+
+begin
+  with AReader do begin
+    VarClear(Result);
+    case NextValue of
+      vaNil, vaNull:       if ReadValue <> vaNil then
+                             Result := NULL;
+                           // Delphi 6 has a bug vaInt8: Result := Byte(ReadInteger);
+      vaInt8:              Result := Shortint(ReadInteger);
+      vaInt16:             Result := Smallint(ReadInteger);
+      vaInt32:             Result := ReadInteger;
+      vaExtended:          Result := ReadFloat;
+      vaSingle:            Result := ReadSingle;
+      vaCurrency:          Result := ReadCurrency;
+      vaDate:              Result := ReadDate;
+      vaString, vaLString: Result := ReadString;
+      vaWString,
+      vaUTF8String:        Result := ReadWideString;
+      vaFalse, vaTrue:     Result := ReadValue = vaTrue;
+      vaBinary:            Result := ReadCustomVariant;
+      vaInt64:             Result := ReadInt64;
+    else
+      raise EReadError.CreateRes(@SReadError);
+    end;
+  end;
+end;
+{$ENDIF}
+
+function Reader_ReadVariant(AReader: TReader): Variant;
+begin
+  {$IFDEF FPC}
+    Result := Null;
+    Raise Exception.Create('Not supported');
+  {$ELSE}
+    {$IFDEF DELPHI6}
+      Result:= D6_Reader_ReadVariant(AReader);
+    {$ELSE}
+      Result:= AReader.ReadVariant;
+    {$ENDIF}
+  {$ENDIF}
+end;
+
+{ TDABinDataStreamer }
+
+constructor TDABinDataStreamer.Create(aOwner: TComponent);
+begin
+  inherited;
+  fIsCompatibleV4:=True;
+end;
+
+destructor TDABinDataStreamer.Destroy;
+begin
+  // Just in case the user did not call Finalize
+
+  {if Assigned(fReader) then fReader.Free;
+  if Assigned(fWriter) then fWriter.Free;}
+
+  inherited;
+end;
+
+procedure TDABinDataStreamer.SetBufferSize(const Value: cardinal);
+begin
+  if (Value > 0) then inherited SetBufferSize(Value);
+end;
+
+procedure TDABinDataStreamer.DoFinalize;
+var
+  finalpos, i: integer;
+begin
+  try
+    if (AdapterInitialization in AdapterWriteModes) then try
+      finalpos := GetWriterPosition(FWriter);
+
+      // Element count. WIll be read by the DoInitialize method
+      fWriter.WriteInteger(DatasetCount + DeltaCount);
+
+      for i := 0 to (DatasetCount - 1) do
+        WriteElementInfo(TDAElementInfo(DatasetInfoObjects[i]));
+
+      for i := 0 to (DeltaCount - 1) do
+        WriteElementInfo(TDAElementInfo(DeltaInfoObjects[i]));
+
+      Writer_FlushBuffer(FWriter);
+
+      SetWriterPosition(FWriter, fInfoIntOffset);
+      WriteOffset(finalpos);
+    except
+      beep;
+      raise;
+    end;
+  finally
+    // Somehow I need to check because the FreeAndNIL fails on these objects even if the are set to NIL...
+    if AdapterInitialization in AdapterReadModes then
+      FreeAndNIL(fReader)
+
+    else if AdapterInitialization in AdapterWriteModes then
+      FreeAndNIL(fWriter);
+  end;
+end;
+
+procedure TDABinDataStreamer.WriteElementInfo(ElementInfo: TDAElementInfo);
+begin
+  fWriter.WriteInteger(integer(ElementInfo.ElementType));
+  fWriter.WriteString(ElementInfo.Name);
+  fWriter.WriteInteger(ElementInfo.Offset);
+end;
+
+procedure TDABinDataStreamer.ReadElementInfo;
+var
+  et: TDAElementType;
+  nme: string;
+  ofs: integer;
+begin
+  et := TDAElementType(fReader.ReadInteger);
+  nme := fReader.ReadString;
+  ofs := fReader.ReadInteger;
+  AddElementInfo(et, nme, ofs);
+end;
+
+procedure TDABinDataStreamer.DoInitialize(Mode: TDAAdapterInitialization);
+var
+  signature: TBINAdapterSignature;
+  currpos, i: integer;
+begin
+  if (Mode in AdapterReadModes) then begin
+    fReader := TReader.Create(Data, BufferSize);
+    freader.Root := Owner;
+
+    // Checks the signature
+    signature := BINAdapterSignature;
+    fReader.Read(signature, SizeOf(signature));
+    if (signature <> BINAdapterSignature) then raise Exception.Create('Incompatible binary adapter stream');
+
+    fInfoIntOffset := ReadOffset;
+    currpos := GetReaderPosition(FReader);
+
+    // Reads the information attached at the end of the stream
+    if (GetReaderPosition(FReader) = fInfoIntOffset) then Exit; // Nothing to read!
+    SetReaderPosition(FReader, fInfoIntOffset);
+
+    // Number of elements
+    i := fReader.ReadInteger;
+
+    for i := i downto 1 do
+      ReadElementInfo;
+
+    // Restores its position and continues
+    SetReaderPosition(FReader, currpos);
+  end
+  else if (Mode in AdapterWriteModes) then begin
+    fWriter := TWriter.Create(Data, BufferSize);
+
+    // Writes the signature
+    signature := BINAdapterSignature;
+    fWriter.Write(signature, SizeOf(signature));
+
+    // This integer will contain the offset of the stream information (datasetcount, names, etc)
+    // which will be attached at the end of the stream since this is a sequential write
+    fInfoIntOffset := GetWriterPosition(FWriter);
+    WriteOffset(0);
+  end;
+end;
+
+function TDABinDataStreamer.GetElementInfo(ElementType: TDAElementType; const Name: string): TDAElementInfo;
+begin
+  result := nil;
+  case ElementType of
+    etDataset: result := TDAElementInfo(DatasetInfoObjects[GetDatasetIndex(Name)]);
+    etDelta: result := TDAElementInfo(DeltaInfoObjects[GetDeltaIndex(Name)]);
+  end;
+end;
+
+procedure TDABinDataStreamer.AddElementInfo(ElementType: TDAElementType; ElementName: string; Offset: integer);
+var
+  element: TDAElementInfo;
+begin
+  element := TDAElementInfo.Create;
+  element.ElementType := ElementType;
+  element.Name := ElementName;
+  element.Offset := Offset;
+
+  if ElementType = etDataset then
+    AddingDataset(ElementName, element)
+  else
+    AddingDelta(ElementName, element);
+end;
+
+function TDABinDataStreamer.DoCreateStream: TStream;
+begin
+  result := TMemoryStream.Create;
+end;
+
+procedure TDABinDataStreamer.ReadAndApplySchema(const Destination: IDADataset; ApplySchema: boolean);
+var
+  cnt: integer;
+  fields: TDAFieldCollection;
+  params: TDAParamCollection;
+begin
+  fields := Destination.Fields;
+  params := Destination.Params;
+
+  cnt := fReader.ReadInteger;
+
+  if (cnt > 0) then begin
+    fReader.ReadValue; // Must do for ReadCollection. Do not remove.
+    fReader.ReadCollection(fields);
+  end
+  else fields.Clear;
+
+  cnt := fReader.ReadInteger;
+  if (cnt > 0) then begin
+    fReader.ReadValue; // Must do for ReadCollection. Do not remove.
+    fReader.ReadCollection(params);
+  end
+  else params.Clear;
+end;
+
+procedure TDABinDataStreamer.WriteSchema(const Fields: TDAFieldCollection; const Params: TDAParamCollection; aFieldsIndex: array of integer);
+var
+  lcoll: TDAFieldCollection;
+  i: integer;
+begin
+  fWriter.WriteInteger(Length(aFieldsIndex));
+  if Length(aFieldsIndex) > 0 then begin
+    lcoll:=TDAFieldCollection.Create(nil);
+    lcoll.IsCompatibleV4:= self.IsCompatibleV4;
+    try
+      For i:=0 to High(aFieldsIndex) do
+        lcoll.Add.AssignField(Fields[aFieldsIndex[i]]);
+      fWriter.WriteCollection(lColl);
+    finally
+      lcoll.Free;
+    end;
+  end;
+
+  fWriter.WriteInteger(Params.Count);
+  if Params.Count > 0 then fWriter.WriteCollection(Params);
+end;
+
+procedure TDABinDataStreamer.WriteOffset(Offset: integer);
+begin
+  fWriter.Write(Offset, SizeOf(integer));
+end;
+
+function TDABinDataStreamer.ReadOffset: integer;
+begin
+  fReader.Read(result, SizeOf(integer));
+end;
+
+procedure VariantToWriterAsStr(aDataType : TDADataType; const aSourceVariant : Variant; aWriter : TWriter);
+var
+  p: pointer;
+  s: Ansistring;
+  lVt: TValueType;
+  lSize: cardinal;
+begin
+  case aDataType of
+    datBlob: begin
+        case VarType(aSourceVariant) of
+          varEmpty: begin
+              lSize := 0;
+              aWriter.Write(lSize, SizeOf(lSize));
+            end;
+          varUString,
+          varOleStr:
+            awriter.WriteWideString(aSourceVariant);
+          varString, VarNull:
+            begin
+              s := GetVarAnsiString(aSourceVariant);
+              lSize := Length(s);
+              if lSize < 256 then begin
+                lVt := vaString;
+                aWriter.Write(lVt, sizeof(lVt));
+                aWriter.Write(lSize, 1);
+                awriter.Write(pointer(s)^, lSize);
+              end
+              else begin
+                lVt := vaLString;
+                aWriter.Write(lVt, sizeof(lVt));
+                aWriter.Write(lSize, sizeof(lSize));
+                awriter.Write(pointer(s)^, lSize);
+              end;
+            end;
+          8209:begin { 8209 is binary array }
+              lSize := VarArrayHighBound(aSourceVariant, 1)-VarArrayLowBound(aSourceVariant, 1)+1;
+              p := VarArrayLock(aSourceVariant);
+              try
+                if lSize < 256 then begin
+                  lVt := vaString;
+                  aWriter.Write(lVt, sizeof(lVt));
+                  aWriter.Write(lSize, 1);
+                  awriter.Write(p^, lSize);
+                end
+                else begin
+                  lVt := vaLString;
+                  aWriter.Write(lVt, sizeof(lVt));
+                  aWriter.Write(lSize, sizeof(lSize));
+                  awriter.Write(p^, lSize);
+                end;
+              finally
+                VarArrayUnlock(aSourceVariant);
+              end;
+            end;
+          else begin
+            RaiseError('Invalid variant type (%d) for Blob.',[VarType(aSourceVariant)]);
+          end;
+        end;
+      end;
+    else begin
+      Writer_WriteVariant(aWriter, aSourceVariant);
+    end;
+  end;
+end;
+
+procedure WriteGuid(aWriter: TWriter; const aVal: String);
+var
+  g: TGuid;
+begin
+  g := StringToGUID(aVal);
+  aWriter.Write(g, Sizeof(g));
+end;
+
+procedure WriteDecimal(aWriter: TWriter; const aVal: Variant);
+var
+  dec: TDecimal;
+begin
+  dec:= VariantToDecimal(aVal);
+  aWriter.Write(dec, Sizeof(Dec));
+end;
+
+
+function TDABinDataStreamer.DoWriteDataset(const Source: IDADataset;
+  Options: TDAWriteOptions;
+  MaxRows: integer;
+  ADynFieldNames: array of string): integer;
+var
+  lDataForAppend: TDADataForAppend;
+begin
+  lDataForAppend := DoBeginWriteDataset(Source, {schema}nil, Options, MaxRows, ADynFieldNames);
+  if woRows in Options then begin
+    DoWriteDatasetData(Source, lDataForAppend);
+    result := DoEndWriteDataset(lDataForAppend);
+  end
+  else begin
+    result := -1;
+  end;
+end;
+
+function CreateByteArray(const s: string): Variant;
+begin
+  result := VarArrayCreate([0, Length(s)-1], varByte);
+  if Length(s) > 0 then
+    Move(s[1], VarArrayLock(Result)^, Length(S));
+  VarArrayUnlock(Result);
+end;
+
+function ReadGuid(aReader: TReader): TGuid;
+begin
+  aReader.Read(Result, Sizeof(Result));
+end;
+
+function ReadDecimal(aReader: TReader): Variant;
+var
+  dec: TDecimal;
+begin
+  aReader.Read(dec, Sizeof(Dec));
+  Result := DecimalToVariant(dec);
+end;
+
+procedure TDABinDataStreamer.DoReadDataset(const DatasetName: string; const Destination: IDADataset; ApplySchema: boolean);
+type
+  PMemDatasetrecord_Native = ^TMemDatasetrecord_Native;
+  TMemDatasetrecord_Native = packed record
+    Ident: byte;
+    Data: PAnsichar;
+  end;
+var
+  elementinfo: TDAElementInfo;
+  editable: IDAEditableDataset;
+  schemaend, cnt, i: integer;
+  flds: array of TDAField;
+  dt: TDADataType;
+  schemapresent: boolean;
+  val: Variant;
+  readonlyfields: array of boolean;
+  //bigVal: Int64;
+  memdataset: IDAMemDatasetBatchAdding;
+  buf, buf1: PAnsiChar;
+  ws: widestring;
+  s: Ansistring;
+  bcd: TDecimal;
+  FRecordsList: TList;
+  lProgress: Boolean;
+  lTotal: integer;
+  lCurrent: integer;
+begin
+  if Destination.Active and ApplySchema then raise Exception.Create('Cannot apply a schema if the destination is active');
+
+  elementinfo := GetElementInfo(etDataset, DatasetName);
+  SetReaderPosition(FReader, elementinfo.Offset);
+
+  editable := Destination as IDAEditableDataset;
+
+  Destination.DisableControls;
+  try
+    editable.DisableEventHandlers;
+    try
+      fReader.BeginReferences;
+      try
+        // Checks to see if the schema is present
+        schemapresent := fReader.ReadBoolean;
+        schemaend := ReadOffset;
+
+        if schemapresent and ApplySchema then begin
+          ReadAndApplySchema(Destination, ApplySchema);
+        end
+        else if (schemaend > 0) then
+          SetReaderPosition(FReader, schemaend);
+        fReader.FixupReferences;
+
+        // Reads the row count
+        //cnt := fReader.ReadInteger;
+        {$IFDEF FPC}
+        cnt := 0;
+        {$ENDIF FPC}
+        fReader.Read(cnt, SizeOf(cnt));
+        if (cnt = -1) then Exit; // Only schema is present!
+
+        lProgress := Assigned(OnReadDatasetProgress);
+        lTotal := cnt;
+        lCurrent := 0;
+        // TODO: this is a nasty bug. If we read the schema AND the stream, also contains data
+        // it goes in recursion here... Temporary fix is you just do one of the two for now
+        if ApplySchema then Exit;
+
+        if not Destination.Active then Destination.Open;
+
+        with editable do try
+          // Temporarily sets all fields as writable
+          Destination.DisableConstraints;
+          SetLength(readonlyfields, Fields.Count);
+          SetLength(flds, Fields.Count);
+          for i := 0 to (Fields.Count - 1) do begin
+            flds[i] := Fields[i];
+            readonlyfields[i] := flds[i].ReadOnly;
+            flds[i].ReadOnly := FALSE;
+          end;
+
+          {$IFDEF STORERECID}
+          Destination.CurrentRecIdValue := max(1,Destination.CurrentRecIdValue);
+          {$ENDIF}
+
+          if Destination.QueryInterface(IDAMemDatasetBatchAdding, memdataset) <> s_ok then memdataset := nil;
+
+          if (memdataset = nil) or Assigned(OnReadFieldValue) then begin
+            // standard mode
+            // Inserts the records
+            while (cnt > 0) do try
+              Append;
+
+              {$IFDEF STORERECID}
+              Destination.CurrentRecIdValue := max(Destination.CurrentRecIdValue,fReader.ReadInteger);//#2
+              {$ENDIF}
+
+              for i := 0 to (Fields.Count - 1) do begin
+
+                if flds[i].Calculated or flds[i].Lookup then Continue;
+
+                val := Null; // Default (see datUnknown below)
+                dt := TDADataType(fReader.ReadInteger);
+
+                case dt of
+                  datUnknown: ; // Field was null
+                  datWideString,
+                  datWideMemo: val := fReader.ReadWideString;
+                  datString: val := fReader.ReadString;
+                  datDateTime: val := fReader.ReadDate;
+                  datFloat: val := fReader.ReadFloat;
+                  datCurrency: val := fReader.ReadCurrency;
+                  datBoolean: val := fReader.ReadBoolean;
+                  datAutoInc,
+                  datInteger: val := fReader.ReadInteger;
+                  datSingleFloat: val := fReader.ReadSingle;
+                  datLargeUInt,
+                  datLargeAutoInc,
+                  datLargeInt: val := fReader.ReadInt64;
+
+                  datByte: val := Byte(fReader.ReadInteger);
+                  datShortInt: val := ShortInt(fReader.ReadInteger);
+                  datWord: val := Word(fReader.ReadInteger);
+                  datSmallInt: val := SmallInt(fReader.ReadInteger);
+                  datCardinal: val := Cardinal(fReader.ReadInteger);
+                  datGuid: val := GuidToString(ReadGuid(fReader));
+                  datXml: val := fReader.ReadWideString;
+                  datDecimal: val := ReadDecimal(fReader);
+                  datMemo: val := fReader.ReadString;
+                  datBlob: val := fReader.ReadString;
+                end;
+
+                if Assigned(OnReadFieldValue) then OnReadFieldValue(flds[i], val);
+                if VarIsNull(val) then continue;
+                flds[i].Value := val;
+              end;
+
+              try
+                Post;
+              except
+                // Introduced to restore the dsBrowse state of the datatable
+                // in case of errors
+                Cancel;
+                raise;
+              end;
+              if lProgress then begin
+                inc(lCurrent);
+                OnReadDatasetProgress(Self,Destination,lCurrent,lTotal);
+              end;
+            finally
+              Dec(cnt);
+            end;
+          end else begin
+            // batch loading
+            // Inserts the records
+            FRecordsList := TList.Create;
+            try
+              while (cnt > 0) do try
+                //Append;
+                buf:= memdataset.AllocRecordBuffer;
+                try
+                  for i := 0 to (Fields.Count - 1) do begin
+                    if flds[i].Calculated or flds[i].Lookup then Continue;
+                    buf1:= memdataset.GetFieldNativeBuffer(buf,flds[i].BindedField);
+                    dt := TDADataType(fReader.ReadInteger);
+                    memdataset.SetNullMask(PMemDatasetrecord_Native(buf)^.Data,flds[i].BindedField, dt = datUnknown);
+                    case dt of
+                      datUnknown: ;
+                      datWideString, datXml: memdataset.SetWideString(buf1,flds[i].BindedField,fReader.ReadWideString);
+                      datString: begin
+                         {$IFDEF UNICODE}
+                           s:= WideStringToAnsiString(fReader.ReadString);
+                         {$ELSE}
+                           s:= fReader.ReadString;
+                         {$ENDIF}
+                         memdataset.SetAnsiString(buf1,flds[i].BindedField,s);
+                      end;
+                      datCurrency: PCurrency(buf1)^ := fReader.ReadCurrency;
+                      datDateTime: PDateTime(buf1)^ := TimeStampToMSecs(DateTimeToTimeStamp(fReader.ReadDate));
+                      datFloat: PDouble(buf1)^ := fReader.ReadFloat;
+                      datLargeInt, datLargeAutoInc, datLargeUInt: PInt64(buf1)^ := fReader.ReadInt64;
+                      datBoolean: PBoolean(buf1)^ := fReader.ReadBoolean;
+                      datAutoInc, datInteger: PInteger(buf1)^ := fReader.ReadInteger;
+                      datSingleFloat: PDouble(buf1)^ := fReader.ReadSingle;
+                      datDecimal: begin
+                        fReader.Read(bcd, Sizeof(bcd));
+                        PBCD(buf1)^ := DecimalToBCD(bcd);
+                      end;
+                      datCardinal: PCardinal(buf1)^ := Cardinal(fReader.ReadInteger);
+                      datByte: PSmallInt(buf1)^ := Byte(fReader.ReadInteger);
+                      datWord: PWord(buf1)^ := Word(fReader.ReadInteger);
+                      datShortInt: PSmallInt(buf1)^ := ShortInt(fReader.ReadInteger);
+                      datSmallInt: PSmallInt(buf1)^ := SmallInt(fReader.ReadInteger);
+                      datGuid: begin
+                        s:= {$IFDEF UNICODE}WideStringToAnsiString{$ENDIF}(GuidToString(ReadGuid(fReader)));
+                        Move(pointer(s)^, pointer(buf1)^, 38 {Length(GuidString)});
+                      end;
+                      datBlob,datMemo: begin
+                        s:= {$IFDEF UNICODE}WideStringToAnsiString{$ENDIF}(fReader.ReadString);
+                        PPointer(buf1)^ := memdataset.MakeBlobFromString(s);
+                      end;
+                      datWideMemo: begin
+                        ws:= fReader.ReadWideString;
+                        SetString(S,PAnsiChar(PWideChar(ws)),Length(ws)*SizeOf(WideChar));
+                        PPointer(buf1)^ := memdataset.MakeBlobFromString(s);
+                        ws:='';
+                      end;
+                    end;
+                   // val =
+                   // if Assigned(OnReadFieldValue) then OnReadFieldValue(flds[i], val);
+                   // flds[i].Value := val;
+                  end;
+                 FRecordsList.Add(Buf);
+                except
+                  memdataset.FreeRecordBuffer(buf);
+                  For i:=0 to FRecordsList.Count-1 do begin
+                    buf:=FRecordsList[i];
+                    memdataset.FreeRecordBuffer(Buf);
+                  end;
+                  raise;
+                end;
+                if lProgress then begin
+                  inc(lCurrent);
+                  OnReadDatasetProgress(Self,Destination, lCurrent,lTotal);
+                end;
+              finally
+                Dec(cnt);
+              end;
+              memdataset.AddRecordsfromList(FRecordsList);
+            finally
+              FRecordsList.Free;
+            end;
+          end;
+        finally
+          // Restores the read-only property
+          for i := 0 to (Fields.Count - 1) do
+            flds[i].ReadOnly := readonlyfields[i];
+          Destination.EnableConstraints;
+        end;
+
+        // TODO: temporary hack for the TClientDataset. Somehow if we don't do this the
+        //       cursor is locked to the last record and there's no way to move!
+        {editable.Next;
+        editable.First;}
+      finally
+        fReader.EndReferences;
+      end;
+    finally
+      editable.EnableEventHandlers;
+    end;
+  finally
+    Destination.EnableControls;
+  end;
+end;
+
+procedure VariantToWriter(aDataType : TDADataType; const aSourceVariant : Variant; aWriter : TWriter);
+var
+  p: pointer;
+  lSize: cardinal;
+begin
+  case aDataType of
+    datBlob: begin
+        case VarType(aSourceVariant) of
+          varEmpty:begin
+              lSize := 0;
+              aWriter.Write(lSize, SizeOf(lSize));
+            end;
+          8209:begin { 8209 is binary array }
+              lSize := VarArrayHighBound(aSourceVariant, 1)-VarArrayLowBound(aSourceVariant, 1)+1;
+              p := VarArrayLock(aSourceVariant);
+              try
+                aWriter.Write(lSize, SizeOf(lSize));
+                aWriter.Write(p^, lSize);
+              finally
+                VarArrayUnlock(aSourceVariant);
+              end;
+            end;
+          else begin
+            RaiseError('Invalid variant type (%d) for Blob.',[VarType(aSourceVariant)]);
+          end;
+        end;
+      end;
+    else begin
+      Writer_WriteVariant(aWriter, aSourceVariant);
+    end;
+  end;
+end;
+
+function ReaderToVariant(aDataType : TDADataType; aReader : TReader): Variant;
+var
+  p: pointer;
+  sze : cardinal;
+begin
+  case aDataType of
+    datBlob : begin
+      {$IFDEF FPC}
+      sze := 0;
+      {$ENDIF}
+      aReader.Read(sze, SizeOf(sze));
+
+        if (sze = 0) then
+          result := Unassigned
+      else try
+        result := VarArrayCreate([0, sze-1], varByte);
+        p := VarArrayLock(result);
+        aReader.Read(p^, sze);
+      finally
+        VarArrayUnlock(result);
+      end;
+    end;
+  else
+    result := Reader_ReadVariant(aReader);
+  end;
+end;
+
+procedure TDABinDataStreamer.DoWriteDelta(const Source: IDADelta);
+var
+  i, x: integer;
+  lProgress: Boolean;
+  lTotal: integer;
+begin
+  // This information will be used later to complete the stream (see DoInitialize)
+  AddElementInfo(etDelta, Source.LogicalName, GetWriterPosition(FWriter));
+  Source.RemoveUnchangedChanges;
+  // Number of changes
+  fWriter.WriteInteger(Source.Count);
+
+  // Numnber of fields, field names and their types
+  fWriter.WriteInteger(Source.LoggedFieldCount);
+  for i := 0 to (Source.LoggedFieldCount - 1) do begin
+    fWriter.WriteString(Source.LoggedFieldNames[i]);
+    fWriter.WriteInteger(integer(Source.LoggedFieldTypes[i]));
+  end;
+
+  // Key fields
+  fWriter.WriteInteger(Source.KeyFieldCount);
+  for i := 0 to (Source.KeyFieldCount - 1) do begin
+    fWriter.WriteString(Source.KeyFieldNames[i]);
+  end;
+
+  if (Source.Count = 0) then Exit;
+  lProgress := Assigned(OnWriteDeltaProgress);
+  lTotal := Source.Count;
+  // Actual changes
+  fWriter.WriteInteger(Source.Count);
+  for i := 0 to (Source.Count - 1) do begin
+    // Change type, RecID, status and message
+    x := integer(Source.Changes[i].ChangeType);
+    fWriter.WriteInteger(x);
+
+    fWriter.WriteInteger(Source.Changes[i].RecID);
+
+    x := integer(Source.Changes[i].Status);
+    fWriter.WriteInteger(x);
+
+    fWriter.WriteString(Source.Changes[i].Message);
+
+    // Old values
+    for x := 0 to (Source.LoggedFieldCount - 1) do begin
+      //fWriter.WriteVariant(Source.Changes[i].OldValues[x]);
+      VariantToWriter(Source.LoggedFieldTypes[x], Source.Changes[i].OldValues[x], fWriter);
+    end;
+
+    // New values
+    for x := 0 to (Source.LoggedFieldCount - 1) do begin
+      //fWriter.WriteVariant(Source.Changes[i].NewValues[x]);                                           }
+      VariantToWriter(Source.LoggedFieldTypes[x], Source.Changes[i].NewValues[x], fWriter);
+    end;
+    if lProgress then OnWriteDeltaProgress(Self, Source, i+1, lTotal);    
+  end;
+end;
+
+procedure TDABinDataStreamer.DoReadDelta(const DeltaName: string; const Destination: IDADelta);
+var
+  elementinfo: TDAElementInfo;
+  msg, str: string;
+  recid, i, cnt, x: integer;
+  change: TDADeltaChange;
+  changetype: TDAChangeType;
+  status: TDAChangeStatus;
+  val: Variant;
+  lProgress: boolean;
+begin
+  elementinfo := GetElementInfo(etDelta, DeltaName);
+  SetReaderPosition(FReader, elementinfo.Offset);
+
+  // Number of changes
+  cnt := fReader.ReadInteger;
+
+  // Field number, names and types
+  Destination.ClearFieldNames;
+  i := fReader.ReadInteger;
+  for i := i downto 1 do begin
+    str := fReader.ReadString;
+    Destination.AddFieldName(str);
+    Destination.LoggedFieldTypes[Destination.LoggedFieldCount-1] := TDADataType(fReader.ReadInteger);
+  end;
+
+  // Key fields
+  Destination.ClearKeyFieldNames;
+  i := fReader.ReadInteger;
+  for i := i downto 1 do begin
+    str := fReader.ReadString;
+    Destination.AddKeyFieldName(str);
+  end;
+
+  if (cnt = 0) then Exit;
+
+  lProgress := Assigned(OnReadDeltaProgress);
+  // Actual changes
+  cnt := fReader.ReadInteger;
+  for i := 1 to cnt do begin
+    x := fReader.ReadInteger;
+    changetype := TDAChangeType(x);
+    recid := fReader.ReadInteger;
+
+    x := fReader.ReadInteger;
+    status := TDAChangeStatus(x);
+
+    msg := fReader.ReadString;
+
+    change := Destination.Add(recid, changetype, status, msg);
+    //Destination.Add(change);
+
+    // Old values
+    for x := 0 to (Destination.LoggedFieldCount - 1) do begin
+      {val := fReader.ReadVariant;
+      change.OldValues[x] := val;}
+      val := ReaderToVariant(Destination.LoggedFieldTypes[x], fReader);
+      change.OldValues[x] := val;
+    end;
+
+    // New values
+    for x := 0 to (Destination.LoggedFieldCount - 1) do begin
+      {val := fReader.ReadVariant;
+      change.NewValues[x] := val;}
+        val := ReaderToVariant(Destination.LoggedFieldTypes[x], fReader);
+        change.NewValues[x] := val;
+    end;
+    if lProgress then OnReadDeltaProgress(Self, Destination, i, cnt);
+  end;
+end;
+
+function TDABinDataStreamer.GetTargetDataType: TRODataType;
+begin
+  result := rtBinary
+end;
+
+function TDABinDataStreamer.DoBeginWriteDataset( const Source: IDADataset; const Schema: TDADataset;
+                              Options: TDAWriteOptions; MaxRows: integer;
+                              ADynFieldNames: array of string): TDADataForAppend;
+var
+  cntpos, currpos, k, i: integer;
+  fld: TDAField;
+  wrtschema: boolean;
+  lfields: array of integer;
+  lDataForAppend : TDADataForAppend;
+  lSchemaFields: TDAFieldCollection;
+  lSchemaParams: TDAParamCollection;
+  lLogicalName: String;
+begin
+  lDataForAppend := TDADataForAppend.Create();
+  result := lDataForAppend;
+
+  if Assigned(Schema) then begin
+    lDataForAppend.TableSchema := Schema;
+    if Schema is TDAUnionDataTable then begin
+      fld := Schema.FindField(def_SourceTableFieldName);
+      if not Assigned(fld) then begin
+        fld := Schema.Fields.Add();
+        fld.Name := def_SourceTableFieldName;
+        fld.DataType := datInteger;
+        fld.InPrimaryKey := true;
+        fld.ServerAutoRefresh := true;
+      end;
+    end;
+    lSchemaFields := Schema.Fields;
+    lSchemaParams := Schema.Params;
+    lLogicalName := Schema.Name;
+  end else begin
+    if Assigned(Source) then begin
+      lSchemaFields := Source.Fields;
+      lSchemaParams := Source.Params;
+      lLogicalName := Source.LogicalName;
+    end else begin
+      raise EDAException.Create('Schema or source should be assigned.');
+    end;
+  end;
+
+
+  if Length(ADynFieldNames) > 0 then begin
+    SetLength(lfields, Length(ADynFieldNames));
+    For i:=0 to High(ADynFieldNames) do begin
+      fld:=lSchemaFields.FindField(ADynFieldNames[i]);
+      if fld <> nil then
+        lfields[i]:= fld.Index
+      else
+        lfields[i]:= -1;
+    end;
+  end else begin
+    SetLength(lfields, lSchemaFields.Count);
+    For i:=0 to lSchemaFields.Count-1 do
+      lfields[i]:=i;
+  end;
+
+  // This information will be used later to complete the stream (see DoInitialize)
+  AddElementInfo(etDataset, lLogicalName, GetWriterPosition(FWriter));
+
+  // Writes a boolean flag that indicates if the schema is being written
+  wrtschema := (woSchema in Options) or (Length(ADynFieldNames)>0);
+  fWriter.WriteBoolean(wrtschema);
+
+  // Write the offset to jump to if the reader wants to skip the schema
+  currpos := GetWriterPosition(FWriter);
+  WriteOffset(0);
+
+  if wrtschema then begin
+    WriteSchema(lSchemaFields, lSchemaParams, lfields);
+    Writer_FlushBuffer(FWriter);
+
+    // Writes the offset of the schema's end
+    k := GetWriterPosition(FWriter);
+    SetWriterPosition(FWriter, currpos);
+    WriteOffset(k);
+    SetWriterPosition(FWriter, k);
+  end;
+
+  // Writes the row count
+  cntpos := GetWriterPosition(FWriter);
+
+  if not (woRows in Options) then begin
+    fWriter.WriteInteger(-1);
+  end else begin
+    k := 0;
+    fWriter.Write(k, SizeOf(k));
+  end;
+
+  SetLength(lDataForAppend.RealFields, Length(lFields));
+  for i:= 0 to Length(lFields) -1 do
+  lDataForAppend.RealFields[i] := lFields[i];
+
+  lDataForAppend.MaxRowCount := MaxRows;
+  lDataForAppend.CountOfRecordsPosition := cntpos;
+  lDataForAppend.EndDataPosition := GetWriterPosition(FWriter);
+  lDataForAppend.RecordCount := k;
+end;
+
+function TDABinDataStreamer.DoWriteDatasetData(const Source: IDADataset; var aDataForAppend: TDADataForAppend; aDataIndex: Integer = -1): Integer;
+var
+  max, k, i: integer;
+  flds: array of TDAField;
+  val: Variant;
+  lDataForAppend: TDADataForAppend;
+  lFields: array of integer;
+  bigVal: Int64;
+  lFieldName: String;
+  lMapToFieldName: String;
+  lColumnMappings: TDAColumnMappingCollection;
+  lColumnMapping: TDAColumnMapping;
+  NativeDataset: IDASQLCommandNativeObject;
+  f: boolean;
+  ev: boolean;
+  lProgress: Boolean;
+begin
+  f:=(Source.QueryInterface(IDASQLCommandNativeObject, NativeDataset) = 0) and not NativeDataset.IsTDatasetCompatible;
+
+  lDataForAppend := aDataForAppend;
+  SetWriterPosition(FWriter, lDataForAppend.EndDataPosition);
+  SetLength(lfields, Length(lDataForAppend.RealFields));
+  SetLength(flds, Length(lDataForAppend.RealFields));
+  for i:= 0 to Length(lDataForAppend.RealFields) -1 do
+    lFields[i] := lDataForAppend.RealFields[i];
+
+  k := lDataForAppend.RecordCount;
+  max := lDataForAppend.MaxRowCount;
+  {$IFDEF FPC}
+  Result := 0; // else it's warn
+  {$ENDIF}
+
+  // Mapping fields of Source table to the streamed dataset
+  if Assigned(lDataForAppend.TableSchema) and (lDataForAppend.TableSchema is TDAUnionDataTable) then begin
+    lColumnMappings := TDAUnionSourceTable(TDAUnionDataTable(lDataForAppend.TableSchema).SourceTables.ItemByName(Source.Name)).ColumnMappings;
+    for i := 0 to lDataForAppend.TableSchema.Fields.Count - 1 do begin
+      lFieldName := lDataForAppend.TableSchema.Fields[lFields[i]].Name;
+      if lFieldName = def_SourceTableFieldName then begin
+        lFields[i] := -10;
+        continue;
+      end;
+      lMapToFieldName := lFieldName;
+      if Assigned(lColumnMappings) then begin
+        lColumnMapping := lColumnMappings.MappingByDatasetField(lFieldName);
+        if Assigned(lColumnMapping) and (lColumnMapping.TableField <> '') then
+          lMapToFieldName := lColumnMapping.TableField;
+      end;
+      lFields[i] := Source.FieldByName(lMapToFieldName).Index;
+    end;
+  end;
+
+
+  Source.DisableControls();
+  if not Source.active then Source.Open();
+  try
+    for i:= 0 to Length(lfields) -1 do begin
+      if lfields[i] = -10 then
+        flds[i] := lDataForAppend.TableSchema.FieldByName(def_SourceTableFieldName)
+      else
+        flds[i] := Source.Fields[lfields[i]];
+    end;
+    ev := Assigned(OnWriteFieldValue);
+    f := f or ev;
+    lProgress := Assigned(onWriteDatasetProgress);
+    // Writes the actual records
+    while (k<>max) and not Source.EOF do begin
+      {$IFDEF STORERECID}
+      fWriter.WriteInteger(Source.GetRowRecIdValue);
+      {$ENDIF}
+      for i := 0 to Length(lfields) - 1 do begin
+        //RealFields[i] = -10 then this is @SourceTable field
+        if lfields[i] = -10 then begin
+          val := aDataIndex;
+        end else begin
+          val := Source.FieldValues[lfields[i]];
+        end;
+
+        if Assigned(OnBeforeFieldValueSerialization) then OnBeforeFieldValueSerialization(flds[i], val);
+
+        if flds[i].Calculated or flds[i].Lookup then Continue;
+        if ev then OnWriteFieldValue(flds[i], val);
+
+        if (lfields[i] = -10) or ((f or not flds[i].IsNull) and (not VarIsNull(Val))) then begin
+          fWriter.WriteInteger(integer(flds[i].DataType));
+          case flds[i].DataType of
+            datWideString,
+            datWideMemo: fWriter.WriteWideString(VarToWideStr(val));
+            datString: fWriter.WriteString(VarToStr(val));
+            datDateTime: fWriter.WriteDate(val);
+            datFloat: fWriter.WriteFloat(val);
+            datBoolean: fWriter.WriteBoolean(val);
+            datCurrency: fWriter.WriteCurrency(val);
+            datByte,
+            datShortInt,
+            datWord,
+            datSmallInt,
+            datCardinal,
+            datAutoInc,
+            datInteger: fWriter.WriteInteger(val);
+            datSingleFloat: fwriter.WRiteSingle(val);
+
+            //datLargeInt: fWriter. WriteInteger(val);
+            datLargeAutoInc,
+            datLargeUInt,
+            datLargeInt: begin
+              bigVal := val;
+              fWriter.WriteInteger(bigVal);
+            end;
+            datGuid: WriteGuid(fWriter, Val);
+            datXml: fWriter.WriteWideString(Val);
+            datDecimal: WriteDecimal(fWriter, Val);
+            datMemo: fWriter.WriteString(VarToStr(val));
+            datBlob: begin
+                VariantToWriterAsStr(datBlob, val, fWriter);
+            end;
+          end;
+        end else
+          fWriter.WriteInteger(Ord(datUnknown));
+      end;
+
+      Inc(k);
+      if lProgress then OnWriteDatasetProgress(Self, Source, k, max);
+      Source.Next;
+
+      if Source.EOF then Break;
+    end;
+
+    lDataForAppend.EndDataPosition := GetWriterPosition(FWriter);
+    lDataForAppend.RecordCount := k;
+    result := k;
+  finally
+    Source.EnableControls;
+  end;
+end;
+
+function TDABinDataStreamer.DoEndWriteDataset(aDataForAppend: TDADataForAppend): Integer;
+begin
+  Writer_FlushBuffer(FWriter);
+  result := aDataForAppend.RecordCount;
+  SetWriterPosition(FWriter, aDataForAppend.CountOfRecordsPosition);
+  fWriter.Write(aDataForAppend.RecordCount, SizeOf(aDataForAppend.RecordCount));
+  SetWriterPosition(FWriter, aDataForAppend.EndDataPosition);
+  aDataForAppend.Free();
+end;
+
+
+end.
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDABusinessProcessor.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDABusinessProcessor.pas
new file mode 100644
index 0000000..fa835fd
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDABusinessProcessor.pas	
@@ -0,0 +1,2465 @@
+unit uDABusinessProcessor;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+{ ToDo: for DA3, refactor the Oracle specific stuff OUT of here again }
+
+uses
+  Classes, DB, Contnrs, SysUtils,
+  uDAInterfaces, uDADataTable, uDAClasses, uDAOracleInterfaces,
+  uDAScriptingProvider, uDADelta
+  , uDASupportClasses
+  ;
+
+type
+  // These structs are to speed up mapping between command parameters and delta fields.
+  // See TDABusinessProcessor.ProcessDelta
+  TDAMappingType = (mtNewValue, mtOldValue{, mtNullCheck});
+  TDAParamMapping = record
+    CommandIndex,
+    DeltaIndex: integer;
+    MappingType: TDAMappingType;
+
+    GeneratorName : string;
+    GeneratorValue : integer;
+  end;
+
+  TDAParamMappingArray = array of TDAParamMapping;
+
+const
+  MappingPrefix: array[TDAMappingType] of string = ('', old_FieldPrefix{, 'NULL_'});
+
+type
+  TDABusinessProcessor = class;
+  TDABusinessProcessorRules = class;
+
+  TDADeltaProcessorItemCollection = class;
+
+
+  { Events }
+  TDAProcessDeltaEvent = procedure(Sender: TDABusinessProcessor; const aDelta: IDADelta) of object;
+
+  TDABeforeProcessChangeEvent = procedure(Sender: TDABusinessProcessor; aChangeType: TDAChangeType; aChange: TDADeltaChange; var ProcessChange: boolean) of object;
+
+  TDAAfterProcessChangeEvent = procedure(Sender: TDABusinessProcessor; aChange: TDADeltaChange; Processed: boolean; var CanRemoveFromDelta: boolean) of object;
+
+  TDAProcessChangeEvent = procedure(Sender: TDABusinessProcessor; aChangeType: TDAChangeType; aChange: TDADeltaChange; const aCommand: IDASQLCommand) of object;
+
+  TDARefreshDeltaChangeEvent = procedure(Sender: TDABusinessProcessor; aChangeType: TDAChangeType; aChange: TDADeltaChange; const aRefreshDataSet: IDADataSet) of object;
+
+  TDAProcessErrorEvent = procedure(Sender: TDABusinessProcessor;
+    aChangeType: TDAChangeType;
+    aChange: TDADeltaChange;
+    const aCommand: IDASQLCommand;
+    var CanRemoveFromDelta: boolean;
+    Error: Exception) of object;
+
+  TDAGenerateSQLEvent = procedure(Sender: TDABusinessProcessor;
+    ChangeType: TDAChangeType;
+    const ReferencedStatement: TDAStatement;
+    const aDelta: IDADelta;
+    var SQL: string) of object;
+
+  { Misc }
+  TDAProcessorOption = (poAutoGenerateInsert,
+    poAutoGenerateUpdate,
+    poAutoGenerateDelete,
+    poAutoGenerateRefreshDataset,
+    poPrepareCommands,
+    poIgnoreRowsAffected);
+  TDAProcessorOptions = set of TDAProcessorOption;
+
+  TDAUpdateMode = (updWhereKeyOnly, updWhereAll, updWhereKeyAndUserDefined, updWhereUserDefined);
+
+  { TDADeltaStruct }
+  TDADeltaStruct = class
+  private
+    fDelta : IDADelta;
+    fBusinessProcessor : TDABusinessProcessor;
+    fDetailDeltas : TDADeltaList;
+    fRelationShips: TDADatasetRelationshipList;
+
+  public
+    constructor Create(const aDelta : IDADelta; aBusinessProcessor : TDABusinessProcessor);
+    destructor Destroy; override;
+
+    property Delta : IDADelta read fDelta;
+    property BusinessProcessor : TDABusinessProcessor read fBusinessProcessor;
+    property DetailDeltas : TDADeltaList read fDetailDeltas;
+    property RelationShips : TDADatasetRelationshipList read fRelationShips;
+  end;
+
+  { TDADeltaStructList }
+  TDADeltaStructList = class(TObjectList)
+  private
+    function GetDADeltaStructs(Index: integer): TDADeltaStruct;
+  protected
+  public
+    function Add(const aDelta : IDADelta; aBusinessProcessor : TDABusinessProcessor): TDADeltaStruct;
+
+    function FindStruct(const aLogicalName : string) : TDADeltaStruct;
+    function StructByLogicalName(const aLogicalName : string) : TDADeltaStruct;
+
+    property DeltaStructs[Index : integer] : TDADeltaStruct read GetDADeltaStructs; default;
+  end;
+
+  IDABusinessProcessorScriptingProvider = interface(IDAScriptingProvider)
+  ['{7BF0D886-51D7-4E91-8073-0FBA78CC11F3}']
+    procedure RunBusinessProcessorScript(aBusinessProcessor: TDABusinessProcessor; const aScript: string; const aMethod: string; aLanguage:TROSEScriptLanguage);
+  end;
+
+  { IDASQLGenerator }
+  IDASQLGenerator = interface
+  ['{EDE4E068-C300-4991-89CF-F9A81D207930}']
+    function GenerateSQL(aChangeType: TDAChangeType;
+      aChange: TDADeltaChange;
+      aDataset: TDADataset;
+      const aDelta: IDADelta;
+      aDatasetStatement: TDAStatement;
+      aConnection: IDAConnection): string;
+
+    procedure UpdateSQLForOracle(aChangeType: TDAChangeType;
+      aDataset: TDADataset; const aDelta: IDADelta;
+      aDatasetStatement: TDAStatement; aConnection: IOracleConnection;
+      var OriginalSQL: string);
+
+    function GenerateRefreshDataset(aDataset: TDADataset; const aDelta: IDADelta;
+      aDatasetStatement: TDAStatement; aConnection: IDAConnection): IDADataset;
+
+  end;
+
+  { TDABusinessProcessor }
+  TDABusinessProcessor = class(TScriptableComponent, IDASQLGenerator)
+  private
+    fOnBeforeProcessChange: TDABeforeProcessChangeEvent;
+    fOnAfterProcessChange: TDAAfterProcessChangeEvent;
+
+    fInsertCommandName: string;
+    fDeleteCommandName: string;
+    fUpdateCommandName: string;
+
+    fSchema: TDASchema;
+
+    fOnAfterProcessDelta: TDAProcessDeltaEvent;
+    fOnBeforeProcessDelta: TDAProcessDeltaEvent;
+    fOnProcessChange: TDAProcessChangeEvent;
+    fOnProcessError: TDAProcessErrorEvent;
+    fOnRefreshDeltaChange: TDARefreshDeltaChangeEvent;
+
+    fReferencedDataset: string;
+    fProcessorOptions: TDAProcessorOptions;
+    fUserUpdateFields: TStringList;
+    fUpdateMode: TDAUpdateMode;
+    fOnGenerateSQL: TDAGenerateSQLEvent;
+
+    fBusinessRules: TDABusinessProcessorRules;
+    fCurrentChange: integer;
+    fCurrentDelta: TDADelta;
+    fBusinessRulesID: string;
+    fRefreshDataset: string;
+    FRaiseExceptionAtError: boolean;
+    fHasReducedDelta: Boolean;
+    FDynamicWhereInRefreshDataset: Boolean;
+
+    procedure SetSchema(const Value: TDASchema);
+    procedure SetDeleteCommandName(const Value: string);
+    procedure SetInsertCommandName(const Value: string);
+    procedure SetUpdateCommandName(const Value: string);
+    procedure SetReferencedDataset(const Value: string);
+    function GetUserUpdateFields: TStrings;
+    procedure SetUserUpdateFields(Value: TStrings);
+    function NeedsReferencedDataset: boolean;
+    function GetCurrentChange: TDADeltaChange;
+    procedure SetBusinessRulesID(const Value: string);
+    procedure SetupParameters(const aCommand: IDASQLCommand; aReferencedDataset : TDADataset; const aConnection: IDAConnection; AUnionMapping: TDAColumnMappingCollection = nil);
+    procedure SetRefreshDataset(const Value: string);
+
+    procedure RefreshDeltaChange(const aConnection : IDAConnection; const aRefreshDataset: IDADataset;
+      const aDelta: IDADelta; aDeltaChange: TDADeltaChange; GenAutoIncValue : integer = -1);
+    function SetupRefreshDatasetForReducedDelta(const aConnection: IDAConnection; const aDelta: IDADelta):IDADataset;
+    procedure SetProcessorOptions(const Value: TDAProcessorOptions);
+  protected
+    procedure SetupCommands(const aConnection: IDAConnection; const aDelta: IDADelta;
+                            out anInsertCmd, anUpdateCmd, aDeleteCmd: IDASQLCommand;
+                            out aRefreshDs : IDADataset; out aTargetTable : string); overload;dynamic;
+    procedure SetupCommands(const aConnection: IDAConnection; const aChange: TDADeltaChange;
+                            out anCmd: IDASQLCommand; out aTargetTable : string); overload;dynamic;
+    // For unions
+    procedure SetupCommands(const aConnection: IDAConnection; const aDelta: IDADelta;
+                            out aCommandsList : TDADeltaProcessorItemCollection); overload;dynamic;
+    procedure SetupCommandsWithMapping(const aConnection: IDAConnection; const aChange: TDADeltaChange;
+              out anCmd: IDASQLCommand; out aParamMapping: TDAParamMappingArray; out aRefreshDs: IDADataset; out aTargetTable : string);
+
+
+    procedure CreateMappings(const aDelta: IDADelta; var MappingArray: TDAParamMappingArray; const aCommand: IDASQLCommand; lAdditionalMapping: TDAColumnMappingCollection = nil; AValidateCommand: Boolean = False);
+
+    { IDASQLGenerator }
+    function GenerateSQL(aChangeType: TDAChangeType;
+      aChange: TDADeltaChange;
+      aDataset: TDADataset;
+      const aDelta: IDADelta;
+      aDatasetStatement: TDAStatement;
+      aConnection: IDAConnection): string; dynamic;
+
+    procedure UpdateSQLForOracle(aChangeType: TDAChangeType;
+      aDataset: TDADataset; const aDelta: IDADelta;
+      aDatasetStatement: TDAStatement; aConnection: IOracleConnection;
+      var OriginalSQL: string);
+
+    function GenerateRefreshDataset(aDataset: TDADataset; const aDelta: IDADelta;
+      aDatasetStatement: TDAStatement; aConnection: IDAConnection): IDADataset; overload;
+
+    function GenerateRefreshDataset(aDataset: TDADataset; aConnection: IDAConnection;
+      const aTargetTable : String; aColumnMappings, AUnionMapping: TDAColumnMappingCollection): IDADataset; overload;
+
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+
+    // IInterface
+    function QueryInterface(const IID: TGUID; out Obj): HResult; override;
+
+    function GetConnectionForObject(const aConnection: IDAConnection; const aName: string): IDAConnection;
+  public
+    constructor Create(aOwner: TComponent); override;
+    destructor Destroy; override;
+
+    procedure SynchronizeAutoIncs(const aMasterDelta, aDetailDelta : IDADelta;
+                                  const aRelationship : TDADatasetRelationship);
+
+    procedure ProcessDelta(const aConnection: IDAConnection;
+      const aDelta: IDADelta;
+      ChangeTypes: TDAChangeTypes = AllChanges; ADeltaStruct : TDADeltaStruct = nil); overload;
+
+    procedure ProcessDelta(aDataTable: TDADataTable;
+      ChangeTypes: TDAChangeTypes; const aConnection : IDAConnection = NIL; ADeltaStruct : TDADeltaStruct = nil); overload;
+
+    procedure ProcessDeltaForUnion(const aConnection: IDAConnection;
+      const aDelta: IDADelta; ChangeTypes: TDAChangeTypes = AllChanges; ADeltaStruct : TDADeltaStruct = nil);
+
+
+    property CurrentDelta: TDADelta read fCurrentDelta;
+    property CurrentChange: TDADeltaChange read GetCurrentChange;
+    property HasReducedDelta: Boolean read fHasReducedDelta write fHasReducedDelta;
+    procedure CheckProperties;
+  published
+    property OnBeforeProcessDelta: TDAProcessDeltaEvent read fOnBeforeProcessDelta write fOnBeforeProcessDelta;
+    property OnAfterProcessDelta: TDAProcessDeltaEvent read fOnAfterProcessDelta write fOnAfterProcessDelta;
+    property OnBeforeProcessChange: TDABeforeProcessChangeEvent read fOnBeforeProcessChange write fOnBeforeProcessChange;
+    property OnAfterProcessChange: TDAAfterProcessChangeEvent read fOnAfterProcessChange write fOnAfterProcessChange;
+    property OnProcessChange: TDAProcessChangeEvent read fOnProcessChange write fOnProcessChange;
+    property OnProcessError: TDAProcessErrorEvent read fOnProcessError write fOnProcessError;
+    property OnGenerateSQL: TDAGenerateSQLEvent read fOnGenerateSQL write fOnGenerateSQL;
+    property OnRefreshDeltaChange: TDARefreshDeltaChangeEvent read fOnRefreshDeltaChange write fOnRefreshDeltaChange;
+
+    property Schema: TDASchema read fSchema write SetSchema;
+
+    property InsertCommandName: string read fInsertCommandName write SetInsertCommandName;
+    property DeleteCommandName: string read fDeleteCommandName write SetDeleteCommandName;
+    property UpdateCommandName: string read fUpdateCommandName write SetUpdateCommandName;
+    property RefreshDatasetName: string read fRefreshDataset write SetRefreshDataset;
+
+    property ReferencedDataset: string read fReferencedDataset write SetReferencedDataset;
+    property ProcessorOptions: TDAProcessorOptions read fProcessorOptions write SetProcessorOptions;
+
+    property UpdateMode: TDAUpdateMode read fUpdateMode write fUpdateMode;
+    property UserUpdateFields: TStrings read GetUserUpdateFields write SetUserUpdateFields;
+
+    property BusinessRulesID: string read fBusinessRulesID write SetBusinessRulesID;
+    property RaiseExceptionAtError: boolean read FRaiseExceptionAtError write FRaiseExceptionAtError default False;
+  end;
+
+  { TDABusinessProcessorRules }
+  TDABusinessProcessorRules = class(TDABusinessRules, IDAStronglyTypedDataTable)
+  private
+    fBusinessProcessor: TDABusinessProcessor;
+  protected
+    property BusinessProcessor: TDABusinessProcessor read fBusinessProcessor;
+
+    // Misc
+    procedure Attach(aBusinessProcessor: TDABusinessProcessor); virtual;
+    procedure Detach(aBusinessProcessor: TDABusinessProcessor); virtual;
+
+    // Business events
+    procedure BeforeProcessDelta(Sender: TDABusinessProcessor; const aDelta: IDADelta); virtual;
+    procedure AfterProcessDelta(Sender: TDABusinessProcessor; const aDelta: IDADelta); virtual;
+    procedure BeforeProcessChange(Sender: TDABusinessProcessor; aChangeType: TDAChangeType; aChange: TDADeltaChange; var ProcessChange: boolean); virtual;
+    procedure AfterProcessChange(Sender: TDABusinessProcessor; aChange: TDADeltaChange; Processed: boolean; var CanRemoveFromDelta: boolean); virtual;
+    procedure ProcessChange(Sender: TDABusinessProcessor; aChangeType: TDAChangeType; aChange: TDADeltaChange; const aCommand: IDASQLCommand); virtual;
+    procedure ProcessError(Sender: TDABusinessProcessor; aChangeType: TDAChangeType; aChange: TDADeltaChange;
+      const aCommand: IDASQLCommand; var CanRemoveFromDelta: boolean; Error: Exception); virtual;
+    procedure GenerateSQL(Sender: TDABusinessProcessor; ChangeType: TDAChangeType; const ReferencedStatement: TDAStatement;
+      const aDelta: IDADelta; var SQL: string); virtual;
+
+    procedure NotSupportedByBusinessProcessor;
+    procedure Open;
+    procedure Close;
+
+    function GetActive: boolean;
+    procedure SetActive(const Value: boolean);
+
+    procedure Append;
+    procedure Cancel;
+    procedure Delete;
+    procedure Edit;
+    procedure First;
+    procedure Insert;
+    procedure Last;
+    procedure Next;
+    procedure Post;
+    procedure Prior;
+    function GetBOF: Boolean;
+    function GetEOF: Boolean;
+    function GetRecordCount: Integer;
+    function Locate(const aKeyFields: String; const aKeyValues: Variant; aOptions: TLocateOptions = []): Boolean;
+    function Lookup(const KeyFields: string; const KeyValues: Variant; const ResultFields: string): Variant;
+
+    function GetMasterOptions : TDAMasterOptions;
+    procedure SetMasterOptions(Value : TDAMasterOptions);
+    function GetDetailOptions : TDADetailOptions;
+    procedure SetDetailOptions(Value : TDADetailOptions);
+    function GetState : TDatasetState;
+    function GetIsEmpty : boolean;
+
+    function IsFieldNull(const FieldIndexOrName : Variant) : boolean;
+    procedure ClearField(const FieldIndexOrName : Variant);
+
+    function GetDataTable : TDADataTable;
+
+    function GetRecNo: integer;
+    procedure SetRecNo(Value: integer);
+
+  public
+    constructor Create(aBusinessProcessor: TDABusinessProcessor); reintroduce; virtual;
+  end;
+
+  TDABusinessProcessorRulesClass = class of TDABusinessProcessorRules;
+
+  TDADeltaProcessorItem = class(TCollectionItem)
+  private
+    fName: String;
+    fRefreshDataset: IDADataset;
+
+    fInsertCommand: IDASQLCommand;
+    fUpdateCommand: IDASQLCommand;
+    fDeleteCommand: IDASQLCommand;
+
+    fInsertCommandMapping: TDAParamMappingArray;
+    fUpdateCommandMapping: TDAParamMappingArray;
+    fDeleteCommandMapping: TDAParamMappingArray;
+    fTargetTable: string;
+
+  public
+    property TargetTable: string read fTargetTable write fTargetTable;
+    property RefreshDataset: IDADataset read fRefreshDataset write fRefreshDataset;
+
+    property InsertCommand: IDASQLCommand read fInsertCommand write fInsertCommand;
+    property UpdateCommand: IDASQLCommand read fUpdateCommand write fUpdateCommand;
+    property DeleteCommand: IDASQLCommand read fDeleteCommand write fDeleteCommand;
+
+    property InsertCommandMapping: TDAParamMappingArray read fInsertCommandMapping write fInsertCommandMapping;
+    property UpdateCommandMapping: TDAParamMappingArray read fUpdateCommandMapping write fUpdateCommandMapping;
+    property DeleteCommandMapping: TDAParamMappingArray read fDeleteCommandMapping write fDeleteCommandMapping;
+  published
+    property Name: String read fName write fName;
+  end;
+
+  TDADeltaProcessorItemCollection = class(TSearcheableCollection)
+  private
+    function GetItem(Index: integer): TDADeltaProcessorItem;
+    procedure SetItem(Index: integer; const Value: TDADeltaProcessorItem);
+  protected
+    function SetItemName(anItem: TCollectionItem; const aName: string): string; override;
+    function GetItemName(anItem: TCollectionItem): string; override;
+  public
+    constructor Create(aOwner: TComponent);
+    function Add: TDADeltaProcessorItem; reintroduce;
+    function ItemByName(const aName: String): TDADeltaProcessorItem;
+    property Items[Index: integer]: TDADeltaProcessorItem read GetItem write SetItem; default;
+  end;
+
+
+// Registration routines
+procedure RegisterBusinessProcessorRules(const anID: string; const aDeltaChangeClass: TDABusinessProcessorRulesClass);
+function FindBusinessProcessorRules(const anID: string; out aDeltaChangeClass: TDABusinessProcessorRulesClass): boolean;
+
+implementation
+
+uses
+  {$IFDEF DEBUG_DATAABSTRACT_SQL}
+  eDebugServer,
+  {$ENDIF}
+  uROClasses, Variants, TypInfo, Types, uDAEngine;
+
+{$IFDEF DEBUG_DATAABSTRACT_SQL}
+const
+  cat_SQL = 'SQL Generation';
+{$ENDIF}
+
+var
+  _bizdeltachanges: TStringList;
+
+procedure RegisterBusinessProcessorRules(const anID: string; const aDeltaChangeClass: TDABusinessProcessorRulesClass);
+var
+  idx: integer;
+begin
+  idx := _bizdeltachanges.IndexOf(anID);
+
+  if (idx >= 0) then
+    _bizdeltachanges.Objects[idx] := TObject(aDeltaChangeClass)
+  else
+    _bizdeltachanges.AddObject(anID, TObject(aDeltaChangeClass));
+end;
+
+function FindBusinessProcessorRules(const anID: string; out aDeltaChangeClass: TDABusinessProcessorRulesClass): boolean;
+var
+  idx: integer;
+begin
+  result := FALSE;
+  idx := _bizdeltachanges.IndexOf(anID);
+  if (idx >= 0) then begin
+    aDeltaChangeClass := TDABusinessProcessorRulesClass(_bizdeltachanges.Objects[idx]);
+    result := TRUE;
+  end
+  else
+    aDeltaChangeClass := nil;
+end;
+
+function QuoteIdentifier(const aConnection : IDAConnection; const aFieldName: string): string;
+begin
+  {if (Pos(' ', aFieldName) > 0) then
+    result := QuoteChars[0] + aFieldName + QuoteChars[1]
+  else
+    result := aFieldName;}
+  result := aConnection.QuoteIdentifierIfNeeded(aFieldName);
+end;
+
+function QuoteFieldName(const aConnection : IDAConnection; const aTableName,aFieldName: string): string;
+begin
+  result := aConnection.QuoteFieldNameIfNeeded(aTableName, aFieldName);
+end;
+
+function QuoteParamName(const aConnection : IDAConnection; const aParamName: string): string;
+begin
+  if (pos('.',aParamName) >0) or (pos(' ',aParamName) >0) then
+    result := AnsiQuotedStr(aParamName,'"')
+  else
+    Result:= aParamName;
+end;
+
+
+{ TDADeltaStruct }
+
+constructor TDADeltaStruct.Create(const aDelta : IDADelta; aBusinessProcessor : TDABusinessProcessor);
+begin
+  inherited Create;
+
+  fDelta := aDelta;
+  fBusinessProcessor := aBusinessProcessor;
+  fDetailDeltas := TDADeltaList.Create;
+  fRelationShips := TDADatasetRelationshipList.Create;
+end;
+
+destructor TDADeltaStruct.Destroy;
+begin
+  inherited;
+
+  FreeAndNIL(fDetailDeltas);
+  FreeAndNIL(fRelationShips);
+end;
+
+{ TDADeltaStructList }
+
+function TDADeltaStructList.Add(const aDelta : IDADelta; aBusinessProcessor : TDABusinessProcessor): TDADeltaStruct;
+begin
+  result := TDADeltaStruct.Create(aDelta, aBusinessProcessor);
+  inherited Add(result);
+end;
+
+function TDADeltaStructList.FindStruct(
+  const aLogicalName: string): TDADeltaStruct;
+var i : integer;
+begin
+  result := NIL;
+  for i := 0 to (Count-1) do
+    if SameText(DeltaStructs[i].Delta.LogicalName, aLogicalName) then begin
+      result := DeltaStructs[i];
+      Exit;
+    end;
+end;
+
+function TDADeltaStructList.GetDADeltaStructs(
+  Index: integer): TDADeltaStruct;
+begin
+  result := TDADeltaStruct(inherited Items[Index])
+end;
+
+function TDADeltaStructList.StructByLogicalName(
+  const aLogicalName: string): TDADeltaStruct;
+begin
+  result := FindStruct(aLogicalName);
+  if result=NIL then raise Exception.Create('Cannot find struct '+aLogicalName);
+end;
+
+{ TDABusinessProcessor }
+
+constructor TDABusinessProcessor.Create(aOwner: TComponent);
+begin
+  inherited;
+
+  fUserUpdateFields := TStringList.Create;
+  fProcessorOptions := [poAutoGenerateInsert, poAutoGenerateUpdate, poAutoGenerateDelete, poPrepareCommands, poAutoGenerateRefreshDataset];
+  fUpdateMode := updWhereKeyOnly;
+end;
+
+destructor TDABusinessProcessor.Destroy;
+begin
+  FreeAndNIL(fUserUpdateFields);
+
+  if (fBusinessRules <> nil) then begin
+    fBusinessRules.Detach(Self);
+    fBusinessRules.Free;
+  end;
+
+  inherited;
+end;
+
+function TDABusinessProcessor.GetUserUpdateFields: TStrings;
+begin
+  result := fUserUpdateFields
+end;
+
+procedure TDABusinessProcessor.SetUserUpdateFields(Value: TStrings);
+begin
+  fUserUpdateFields.Assign((Value));
+end;
+
+procedure TDABusinessProcessor.CreateMappings(const aDelta: IDADelta; var MappingArray: TDAParamMappingArray; const aCommand: IDASQLCommand; lAdditionalMapping: TDAColumnMappingCollection = nil; AValidateCommand: Boolean = False);
+var
+  lDeltaFieldList: TStringList;
+  lAdditionalMappingList: TStringList;
+
+  function isPresentInDelta(str: string): boolean;
+  var
+    i: integer;
+  begin
+    if lAdditionalMapping <> nil then begin
+      i := lAdditionalMappingList.IndexOf(str);
+      if i <> -1 then
+        str := TDAColumnMapping(lAdditionalMappingList.Objects[i]).DatasetField;
+//      else        str := lAdditionalMapping.MappingByTableField(str).DatasetField; // raise 'native' exception
+    end;
+    Result := lDeltaFieldList.IndexOf(str) <> -1;
+  end;
+
+var
+  i,j: integer;
+  lParamName : string;
+  lDeltaIndex : integer;
+  lFieldName: String;
+begin
+  if aCommand = nil then Exit;
+
+  // The command is what determines how many mappings will be done
+  SetLength(MappingArray, aCommand.Params.Count);
+  lDeltaFieldList := TStringList.Create;
+  lAdditionalMappingList := TStringList.Create;
+  try
+    for i := 0 to aDelta.LoggedFieldCount-1 do
+      lDeltaFieldList.Add(aDelta.LoggedFieldNames[i]);
+    lDeltaFieldList.Sorted:=True;
+
+    if lAdditionalMapping <> nil then
+      for i:= 0 to lAdditionalMapping.Count -1 do
+        lAdditionalMappingList.AddObject(lAdditionalMapping[i].TableField, lAdditionalMapping[i]);
+
+    for i := 0 to (aCommand.Params.Count - 1) do begin
+      MappingArray[i].CommandIndex := 0;
+
+      lParamName := UpperCase(aCommand.Params[i].Name);
+
+      // Determines the mapping type
+      if (Pos(MappingPrefix[mtOldValue], lParamName) = 1) and not isPresentInDelta(lParamName) then
+        MappingArray[i].MappingType := mtOldValue
+
+      {else if (Pos(MappingPrefix[mtNullCheck], lParamName) = 1)
+        then MappingArray[i].MappingType := mtNullCheck}
+
+      else MappingArray[i].MappingType := mtNewValue;
+
+      if (MappingArray[i].MappingType = mtOldValue) then
+        lFieldName := Copy(aCommand.Params[i].Name, Length(MappingPrefix[mtOldValue])+1, MaxInt)
+      else
+        lFieldName := aCommand.Params[i].Name;
+
+      // if lAdditionalMapping is assigned (usually incase delta for union table)
+      // then translate it
+      if Assigned(lAdditionalMapping) then begin
+        j := lAdditionalMappingList.IndexOf(lFieldName);
+        if j <> -1 then
+          lFieldName := TDAColumnMapping(lAdditionalMappingList.Objects[j]).DatasetField
+        else
+          lFieldName := lAdditionalMapping.MappingByTableField(lFieldName).DatasetField; // raise "native" exception
+      end;
+
+      if AValidateCommand and
+         (lDeltaFieldList.IndexOf(lFieldName) = -1) then raise Exception.CreateFmt('%s command can''t be used as delta command for %s datatable: parameters mismatch',[aCommand.Name,aDelta.LogicalName]);
+
+      // Finds the index for this value in the delta
+      lDeltaIndex := aDelta.IndexOfLoggedField(lFieldName);
+
+      MappingArray[i].DeltaIndex := lDeltaIndex;
+
+      MappingArray[i].GeneratorName := aCommand.ParamByName(lParamName).GeneratorName;
+      MappingArray[i].GeneratorValue := -1;
+    end;
+  finally
+    lDeltaFieldList.Free;
+    lAdditionalMappingList.Free;
+  end;
+end;
+
+function TDABusinessProcessor.GenerateRefreshDataset(aDataset: TDADataset;
+  aConnection: IDAConnection;
+  const aTargetTable: String;
+  aColumnMappings, AUnionMapping: TDAColumnMappingCollection): IDADataset;
+var
+  i: integer;
+ // namesstr,
+  fullsql,
+  fieldsstr,
+  keystr,
+  //remotename,
+  lFieldName,
+  lParamName,
+  localname: string;
+  fld: TDAField;
+begin
+  result := aConnection.NewDataset('');
+  fieldsstr := '';
+//  namesstr := '';
+  keystr := '';
+
+  with aDataset do try
+    // Generates the SELECT
+    for i := 0 to Fields.Count-1 do begin
+      if (Fields[i].DataType <> datAutoInc) and (Fields[i].DataType <> datLargeAutoInc) and
+         (not Fields[i].ServerAutoRefresh or Fields[i].Lookup or Fields[i].ServerCalculated) then Continue;
+
+      localname := QuoteFieldName(aConnection, aTargetTable, aColumnMappings.MappingByDatasetField(Fields[i].Name).TableField);
+
+      if AUnionMapping <> nil then
+        lFieldName := AUnionMapping.MappingByTableField(Fields[i].Name).DatasetField
+      else
+        lFieldName := Fields[i].Name;
+
+      if (AUnionMapping <> nil) and (localname <> lFieldName) then
+        fieldsstr := fieldsstr+localname+' as '+QuoteFieldName(aConnection, aTargetTable, lFieldName)+','+#13
+      else
+        fieldsstr := fieldsstr+localname+','+#13;
+
+      with result.Fields.Add do begin
+        AssignField(Fields[i]);
+        Name := lFieldName;
+      end;
+    end;
+    if (fieldsstr='') then Exit;
+    fieldsstr := Copy(fieldsstr,1, Length(fieldsstr)-2)+#13;
+
+    // Generates the WHERE using the primary key fields
+    for i := 0 to Fields.Count-1 do begin
+      if not Fields[i].InPrimaryKey then Continue;
+
+      localname := QuoteFieldName(aConnection,aTargetTable, aColumnMappings.MappingByDatasetField(Fields[i].Name).TableField);
+      if AUnionMapping <> nil then
+        lParamName := AUnionMapping.MappingByTableField(Fields[i].Name).DatasetField
+      else
+        lParamName := Fields[i].Name;
+      keystr := keystr+Format('%s = :%s', [localname, lParamName])+' AND '+#13;
+    end;
+    if (keystr='') then begin
+      // try to create WHERE with AutoInc fields
+      for i := 0 to Fields.Count-1 do begin
+        if not (Fields[i].DataType in [datAutoInc,datLargeAutoInc]) then Continue;
+
+        localname := QuoteFieldName(aConnection,aTargetTable, aColumnMappings.MappingByDatasetField(Fields[i].Name).TableField);
+        if AUnionMapping <> nil then
+          lParamName := AUnionMapping.MappingByTableField(Fields[i].Name).DatasetField
+        else
+          lParamName := Fields[i].Name;
+        keystr := keystr+Format('%s = :%s', [localname, lParamName])+' AND '+#13;
+      end;
+    end;
+    if (keystr='') then Exit;
+    keystr := Copy(keystr,1, Length(keystr)-5)+#13;
+
+    // Combines the two
+    fullsql := 'SELECT '#13+fieldsstr+' FROM '+ QuoteIdentifier(aConnection, aTargetTable) +#13+' WHERE '+#13+keystr;
+    result.SQL := fullsql;
+
+    {$IFDEF DEBUG_DATAABSTRACT_SQL}DebugServer.Write([cat_SQL], result.SQL);{$ENDIF}
+
+    for i := 0 to (aColumnMappings.Count - 1) do begin
+      fld := result.FindField(aColumnMappings[i].DatasetField);
+      if Assigned(fld) then begin
+        fld.TableField := aColumnMappings[i].TableField;
+        fld.SQLOrigin := aColumnMappings[i].SQLOrigin;
+      end;
+    end;
+
+  finally
+    if (result.SQL='') then result := NIL;
+  end;
+end;
+
+function TDABusinessProcessor.GenerateSQL(aChangeType: TDAChangeType;
+  aChange: TDADeltaChange;
+  aDataset: TDADataset;
+  const aDelta: IDADelta;
+  aDatasetStatement: TDAStatement;
+  aConnection: IDAConnection): string;
+
+  function _GetTableField(aMapping: TDAColumnMappingCollection; aDatasetField: string): string;
+  begin
+    if aMapping.Count = 0 then
+      Result:= aDatasetField
+    else
+      Result:= aMapping.MappingByDatasetField(aDatasetField).TableField;
+  end;
+
+var
+  i: integer;
+  namesstr,
+  valuesstr,
+  keystr,
+  remotename,
+  localname: string;
+  oraconn : IOracleConnection;
+  fld : TDAField;
+  usegenerators : boolean;
+  //lIsUnionTable : Boolean;
+  lUnionTable: TDAUnionDataTable;
+  lSrcTable: TDAUnionSourceTable;
+  lUpdateMode: TDAUpdateMode;
+  lPKList: TStringList;
+begin
+  result := '';
+  valuesstr := '';
+  namesstr := '';
+  keystr := '';
+  lSrcTable := nil;
+  if aDatasetStatement.TargetTable = '' then raise Exception.Create(aDelta.LogicalName+'. Can''t generate a delta''s SQL. TargetTable isn''t assigned.');
+  // If passed dataset is a source table for uniontable then lSrcTable will be assigned (used for distinguish unionsourcetables)
+  lUnionTable := fSchema.UnionDataTables.FindItem(fReferencedDataset) as TDAUnionDataTable;
+  if assigned(lUnionTable) then begin
+    lSrcTable := lUnionTable.SourceTables.UnionSourceTableByName(aDataset.Name);
+  end;
+
+  usegenerators := Supports(aConnection, IDAUseGenerators);
+  lUpdateMode:=fUpdateMode;
+  if (aDelta.KeyFieldCount=0) and (lUpdateMode = updWhereKeyOnly) then
+    lUpdateMode:=updWhereAll;
+  lPKList:= TStringList.Create;
+  try
+    with aDatasetStatement, aDelta do begin
+      for i := 0 to (KeyFieldCount - 1) do
+        lPKList.Add(KeyFieldNames[i]);
+      lPKList.Sorted:=True;
+      // Generates the WHERE conditions. Done here because used by both deletes and updates
+      if (aChangeType <> ctInsert) then begin
+        case lUpdateMode of
+          updWhereKeyOnly, updWhereKeyAndUserDefined: begin
+              for i := 0 to (KeyFieldCount - 1) do begin
+                remotename := KeyFieldNames[i];
+
+                // If this is UnionSourceDataTable then we should do fields remapping
+                if Assigned(lSrcTable) then begin
+                  if SameText(remotename, def_SourceTableFieldName) then Continue;
+                  remotename := _GetTableField(lSrcTable.ColumnMappings, remotename);
+                end;
+
+                localname := QuoteFieldName(aConnection,aDatasetStatement.TargetTable, _GetTableField(ColumnMappings,remotename));
+                keystr := keystr + #13'(' + localname + '=:'+QuoteParamName(aConnection, MappingPrefix[mtOldValue] + remotename)+ ') AND ';
+              end;
+            end;
+
+          updWhereAll: begin
+              for i := 0 to (LoggedFieldCount - 1) do begin
+                remotename := LoggedFieldNames[i];
+
+                // If this is UnionSourceDataTable then we should do fields remapping
+                if Assigned(lSrcTable) then begin
+                  if SameText(remotename, def_SourceTableFieldName) then Continue;
+                  remotename := _GetTableField(lSrcTable.ColumnMappings,remotename);
+                end;
+
+                localname := QuoteFieldName(aConnection,aDatasetStatement.TargetTable, _GetTableField(ColumnMappings,remotename));
+                if (aDataset.FieldByName(remotename).DataType in [datBlob, datMemo]) then Continue;
+                if assigned(aChange) and ROVariantsEqual(aChange.OldValueByName[remotename],aChange.NewValueByName[remotename]) and (lPKList.IndexOf(remotename) = -1) then Continue;
+                keystr := keystr + #13'((' + localname + '=:'+QuoteParamName(aConnection, MappingPrefix[mtOldValue] + remotename) + ') OR (:'+QuoteParamName(aConnection, MappingPrefix[mtOldValue] + remotename) +
+                          ' IS NULL AND ' + localname + ' IS NULL)) AND ';
+              end;
+            end;
+        end;
+
+        if (lUpdateMode in [updWhereKeyAndUserDefined, updWhereUserDefined]) then begin
+          for i := 0 to (fUserUpdateFields.Count - 1) do begin
+            remotename := fUserUpdateFields[i];
+
+            // If this is UnionSourceDataTable then we should do fields remapping
+            if Assigned(lSrcTable) then begin
+              if SameText(remotename, def_SourceTableFieldName) then Continue;
+              remotename := _GetTableField(lSrcTable.ColumnMappings,remotename);
+            end;
+
+            localname := QuoteFieldName(aConnection, aDatasetStatement.TargetTable, _GetTableField(ColumnMappings,remotename));
+            if assigned(aChange) and ROVariantsEqual(aChange.OldValueByName[remotename],aChange.NewValueByName[remotename]) then Continue;
+            keystr := keystr + #13'((' + localname + '=:'+QuoteParamName(aConnection, MappingPrefix[mtOldValue] + remotename) + ') OR (:'+QuoteParamName(aConnection,MappingPrefix[mtOldValue] + remotename) + 
+                      ' IS NULL AND ' + localname + ' IS NULL)) AND ';
+          end;
+        end;
+
+        keystr := Copy(keystr, 1, Length(keystr) - 5);
+      end;
+
+      // Remaining part of the SQL command
+      case aChangeType of
+        // Insert
+        ctInsert: begin
+            result := 'INSERT INTO ' + QuoteIdentifier(aConnection, aDatasetStatement.TargetTable) + ' ('#13;
+
+            for i := 0 to (LoggedFieldCount - 1) do begin
+              remotename := LoggedFieldNames[i];
+
+              // If this is UnionSourceDataTable then we should do fields remapping
+              if Assigned(lSrcTable) then begin
+                if SameText(remotename, def_SourceTableFieldName) then Continue;
+                remotename := _GetTableField(lSrcTable.ColumnMappings,remotename);
+              end;
+
+
+              fld := aDataset.Fields.FieldByName(remotename);
+              if (((fld.DataType = datAutoInc) or (fld.DataType = datlargeAutoInc)) and not usegenerators) // Skips autoincs on DBs like MSSQL
+                or (fld.Calculated) or (fld.ReadOnly) or (fld.ServerCalculated)
+                 then Continue;
+              if (Assigned(aChange) and VarIsNull(aChange.NewValues[i])) then Continue;
+              localname := QuoteFieldName(aConnection, aDatasetStatement.TargetTable,_GetTableField(ColumnMappings,remotename));
+
+              namesstr := namesstr + localname + ', ';
+              valuesstr := valuesstr + ':' +QuoteParamName(aConnection, remotename) + ', ';
+            end;
+            if Assigned(aChange) and (namesstr = '') then begin
+              Result := '';
+            end
+            else begin
+              namesstr := Copy(namesstr, 1, Length(namesstr) - 2) + ')';
+              valuesstr := Copy(valuesstr, 1, Length(valuesstr) - 2) + ')';
+
+              result := result + namesstr + #13' VALUES (' + valuesstr;
+            end;
+          end;
+
+        // Delete
+        ctDelete: result := 'DELETE FROM ' + QuoteIdentifier(aConnection, aDatasetStatement.TargetTable) + #13' WHERE ' + keystr;
+
+        // Update
+        ctUpdate: begin
+            result := '';
+
+            for i := 0 to (LoggedFieldCount - 1) do begin
+              remotename := LoggedFieldNames[i];
+
+              // If this is UnionSourceDataTable then we should do fields remapping
+              if Assigned(lSrcTable) then begin
+                if SameText(remotename, def_SourceTableFieldName) then Continue;
+                remotename := _GetTableField(lSrcTable.ColumnMappings,remotename);
+              end;
+
+
+              fld := aDataset.Fields.FieldByName(remotename);
+              if ((fld.DataType = datAutoInc) or (fld.DataType = datlargeAutoInc)) then Continue; // Skips autoincs
+              if (fld.InPrimaryKey and not fld.LogChanges) then Continue;
+              if (fld.Calculated) or (fld.ReadOnly) or (fld.ServerCalculated) then Continue;
+              if assigned(aChange) and ROVariantsEqual(aChange.OldValues[i],aChange.NewValues[i]) then Continue;
+              localname := QuoteFieldName(aConnection, aDatasetStatement.TargetTable, _GetTableField(ColumnMappings,remotename));
+
+              if (result<>'') then result := result + ', ';
+              result := result + #13 + localname + '= :' + QuoteParamName(aConnection,remotename);
+              //if (i < LoggedFieldCount - 1) then result := result + ', ';
+            end;
+            if assigned(aChange) and (Result = '') then begin
+              //
+            end
+            else begin
+              result := 'UPDATE '+QuoteIdentifier(aConnection, aDatasetStatement.TargetTable)+' SET '+result+#13' WHERE '+keystr;
+            end;
+          end;
+      end;
+    end;
+  finally
+    lPKList.Free;
+  end;
+
+  // Exception for Oracle's SQL
+  if Supports(aConnection, IOracleConnection, oraconn)
+    then UpdateSQLForOracle(aChangeType, aDataset, aDelta, aDatasetStatement, oraconn, result);
+
+  // Events
+  if Assigned(fOnGenerateSQL) then
+    fOnGenerateSQL(Self, aChangeType, aDatasetStatement, aDelta, result)
+  else if Assigned(fBusinessRules) then
+    fBusinessRules.GenerateSQL(Self, aChangeType, aDatasetStatement, aDelta, result);
+
+  {$IFDEF DEBUG_DATAABSTRACT_SQL}DebugServer.Write([cat_SQL], Result);{$ENDIF}
+end;
+
+procedure TDABusinessProcessor.UpdateSQLForOracle(aChangeType: TDAChangeType;
+  aDataset: TDADataset;
+  const aDelta: IDADelta;
+  aDatasetStatement: TDAStatement;
+  aConnection: IOracleConnection;
+  var OriginalSQL: string);
+var i : integer;
+    returningstr, intostr : string;
+begin
+  returningstr := '';
+  intostr := '';
+
+  with aDataset do begin
+    for i := 0 to (Fields.Count-1) do begin
+
+      if not aDataset.Fields[i].LogChanges then Continue;
+
+      case Fields[i].BlobType  of
+        dabtOraBlob : begin
+          OriginalSQL := StringReplace(OriginalSQL, ':'+Fields[i].Name, 'empty_blob()', [rfIgnoreCase])
+        end;
+
+        dabtOraClob : begin
+          OriginalSQL := StringReplace(OriginalSQL, ':'+Fields[i].Name, 'empty_clob()', [rfIgnoreCase])
+        end;
+
+        else Continue;
+      end;
+
+      returningstr := returningstr+Fields[i].Name+',';
+      intostr := intostr+':'+Fields[i].Name+',';
+    end;
+  end;
+
+  if (returningstr<>'') then begin
+    Delete(returningstr, Length(returningstr), 1);
+    returningstr := 'RETURNING '+#13#10+returningstr+#13#10;
+
+    Delete(intostr, Length(intostr), 1);
+    intostr := 'INTO '+#13#10+intostr;
+
+    OriginalSQL := OriginalSQL+#13#10+returningstr+intostr;
+  end;
+
+  {$IFDEF DEBUG_DATAABSTRACT_SQL}DebugServer.Write([cat_SQL], OriginalSQL);{$ENDIF}
+end;
+
+function TDABusinessProcessor.NeedsReferencedDataset: boolean;
+begin
+  result :=
+    (
+    ((poAutoGenerateInsert in fProcessorOptions) and (InsertCommandName = '')) or
+    ((poAutoGenerateUpdate in fProcessorOptions) and (UpdateCommandName = '')) or
+    ((poAutoGenerateDelete in fProcessorOptions) and (DeleteCommandName = '')) or
+    ((poAutoGenerateRefreshDataset in fProcessorOptions) and (RefreshDatasetName = ''))
+    );
+end;
+
+procedure TDABusinessProcessor.SetupParameters(const aCommand : IDASQLCommand;
+  aReferencedDataset : TDADataset; const aConnection: IDAConnection;AUnionMapping: TDAColumnMappingCollection);
+var lParams: TParams;
+    fldname: string;
+    i: integer;
+    par: TDAParam;
+    fld : TDAField;
+begin
+  lParams := TParams.Create;
+  try
+    Params_ParseSQL(lParams,aCommand.SQL, True, aConnection.GetQuoteChars);
+
+    with aCommand do begin
+      Params.Clear; // Just in case
+
+      for i := 0 to (lParams.Count - 1) do begin
+        fldname := lParams[i].Name;
+        if AUnionMapping <> nil then fldname := AUnionMapping.FindMappingByDatasetField(fldname).TableField;
+
+        // Checks if it's one of the autogenerated params
+        fld := aReferencedDataset.Fields.FindField(fldname);
+        if fld = nil then begin
+          if (Pos(MappingPrefix[mtOldValue], fldname)=1) then Delete(fldname, 1, Length(MappingPrefix[mtOldValue]));
+          fld := aReferencedDataset.Fields.FieldByName(fldname);
+        end;
+
+        {else if (Pos(MappingPrefix[mtNullCheck], fldname)=1)
+          then Delete(fldname, 1, Length(MappingPrefix[mtNullCheck]));}
+
+        // Looks up the field and completes the param definition
+
+        par := aCommand.Params.Add;
+        par.Name := lParams[i].Name;
+        par.DataType := fld.DataType;
+        par.BlobType := fld.BlobType;
+        par.ParamType := daptInput; // ODAC Blobs require it and this is not covered by AssignField below
+        {par.Size := fld.Size;
+        par.GeneratorName := fld.GeneratorName;}
+        par.AssignField(fld);
+        par.Name := lParams[i].Name; // Leave this here! Must override the Assign
+      end;
+    end;
+  finally
+    lParams.Free;
+  end;
+end;
+
+procedure TDABusinessProcessor.SetupCommands(const aConnection: IDAConnection; const aDelta: IDADelta;
+  out anInsertCmd, anUpdateCmd, aDeleteCmd: IDASQLCommand; out aRefreshDs : IDADataset; out aTargetTable : string);
+var
+  sql: string;
+  refstmt: TDAStatement;
+  ds: TDADataset;
+  needsref: boolean;
+  i: integer;
+begin
+  anInsertCmd := nil;
+  aDeleteCmd := nil;
+  anUpdateCmd := nil;
+  ds := nil;
+  refstmt := nil;
+  CheckProperties;
+  // Looks for the referenced statement which contains field mappings and TargetTableName
+  // in case the user specifies any AutoGenerateXXX option
+  needsref := NeedsReferencedDataset;
+  if needsref then begin
+    ds := TDADataset(fSchema.Datasets.FindItem(fReferencedDataset));
+    if (ds <> nil) then begin
+      refstmt := fSchema.FindCommandStatement(aConnection,ds);
+//      refstmt := TDAStatement(ds.Statements.FindItem(aConnection.Name));
+//      if (refstmt = nil) then refstmt := ds.Statements.StatementByName(Schema.ConnectionManager.GetDefaultConnectionName);
+    end
+    else
+      RaiseError(Name + '''s referenced dataset is not speficied or does not exist. Cannot generate SQL');
+  end;
+
+
+  if refstmt <> nil then
+    aTargetTable := refstmt.TargetTable
+  else
+    aTargetTable := '';
+      
+  for i:= 0 to aDelta.Count-1 do
+    if aDelta.Changes[i].ChangeType = ctInsert then begin
+      // Tries to locate the specified commands
+      if (fInsertCommandName <> '') then anInsertCmd := fSchema.NewCommand(aConnection, fInsertCommandName);
+      // Auto generates the SQL for the undefined commands
+      if (anInsertCmd = nil) and (poAutoGenerateInsert in fProcessorOptions) then begin
+        sql := GenerateSQL(ctInsert, nil, ds, aDelta, refstmt, aConnection);
+        anInsertCmd := aConnection.NewCommand(sql, stSQL);
+        SetupParameters(anInsertCmd, ds, aConnection);
+      end;
+      Break;
+    end;
+
+  for i:= 0 to aDelta.Count-1 do
+    if aDelta.Changes[i].ChangeType = ctUpdate then begin
+      // Tries to locate the specified commands
+      if (fUpdateCommandName <> '') then anUpdateCmd := fSchema.NewCommand(aConnection, fUpdateCommandName);
+      // Auto generates the SQL for the undefined commands
+      if (anUpdateCmd = nil) and (poAutoGenerateUpdate in fProcessorOptions) then begin
+        sql := GenerateSQL(ctUpdate, nil, ds, aDelta, refstmt, aConnection);
+        anUpdateCmd := aConnection.NewCommand(sql, stSQL);
+        SetupParameters(anUpdateCmd, ds, aConnection);
+      end;
+      Break;
+    end;
+
+  for i:= 0 to aDelta.Count-1 do
+    if aDelta.Changes[i].ChangeType = ctDelete then begin
+      // Tries to locate the specified commands
+      if (fDeleteCommandName <> '') then aDeleteCmd := fSchema.NewCommand(aConnection, fDeleteCommandName);
+      // Auto generates the SQL for the undefined commands
+      if (aDeleteCmd = nil) and (poAutoGenerateDelete in fProcessorOptions) then begin
+        sql := GenerateSQL(ctDelete, nil, ds, aDelta, refstmt, aConnection);
+        aDeleteCmd := aConnection.NewCommand(sql, stSQL);
+        SetupParameters(aDeleteCmd, ds, aConnection);
+      end;
+      Break;
+    end;
+
+  if (fRefreshDataset <> '')
+    then aRefreshDs := fSchema.NewDataset(aConnection, fRefreshDataset,[],'','',False,True);
+
+  if (aRefreshDs = nil) and (poAutoGenerateRefreshDataset in fProcessorOptions) then begin
+    aRefreshDs := GenerateRefreshDataset(ds, aDelta, refstmt, aConnection);
+    if (aRefreshDs<>NIL) then SetupParameters(aRefreshDs, ds, aConnection);
+  end;
+
+  // Finally prepares them
+  if (poPrepareCommands in fProcessorOptions) then begin
+    if (anInsertCmd <> nil) then anInsertCmd.Prepared := TRUE;
+    if (anUpdateCmd <> nil) then anUpdateCmd.Prepared := TRUE;
+    if (aDeleteCmd <> nil) then aDeleteCmd.Prepared := TRUE;
+    if (aRefreshDs <> NIL) then aRefreshDs.Prepared := TRUE;
+  end;
+end;
+
+function TDABusinessProcessor.GetCurrentChange: TDADeltaChange;
+begin
+  result := fCurrentDelta.Changes[fCurrentChange]
+end;
+
+const
+  lDynWhereParamPrefix = 'dynwhere';
+
+procedure TDABusinessProcessor.RefreshDeltaChange(const aConnection : IDAConnection;
+  const aRefreshDataset : IDADataset; const aDelta : IDADelta; aDeltaChange : TDADeltaChange; GenAutoIncValue : integer = -1);
+var i : integer;
+    par : TDAParam;
+    nam: string;
+    val : Variant;
+    fld: TDAField;
+//    genname : string;
+begin
+  // Sets the parameters of the dataset
+  for i := 0 to aRefreshDataset.Params.Count-1 do begin
+    par := aRefreshDataset.Params[i];
+
+    if (aDelta.IndexOfLoggedField(par.Name) < 0) then
+      Continue;
+
+    if (aDeltaChange.ChangeType=ctInsert) then begin
+      if (par.DataType=datAutoInc) or (Par.DataType = datLargeAutoInc) then begin
+        if (GenAutoIncValue<>-1)
+          then val := GenAutoIncValue
+          else val := aConnection.GetLastAutoInc(par.GeneratorName);
+      end
+      else val := aDeltaChange.NewValueByName[par.Name]; // Fix for Schuff
+    end
+    else begin
+      val := aDeltaChange.NewValueByName[par.Name];
+    end;
+
+    par.Value := val;
+  end;
+
+  if FDynamicWhereInRefreshDataset then
+    for i := 0 to aDelta.KeyFieldCount - 1 do begin
+      par := aRefreshDataset.ParamByName(lDynWhereParamPrefix+intToStr(i));
+      if (aDeltaChange.ChangeType=ctInsert) then begin
+        if (par.DataType=datAutoInc) or (Par.DataType = datLargeAutoInc) then begin
+          if (GenAutoIncValue <> -1) then
+            par.Value := GenAutoIncValue
+          else
+            par.Value := aConnection.GetLastAutoInc(par.GeneratorName);
+        end
+        else begin
+          par.Value := aDeltaChange.NewValueByName[aDelta.KeyFieldNames[i]];
+        end;
+      end
+      else begin
+        par.Value := aDeltaChange.NewValueByName[aDelta.KeyFieldNames[i]];
+      end;
+    end;
+
+  if Assigned(fOnRefreshDeltaChange) then
+    fOnRefreshDeltaChange(Self, aDeltaChange.ChangeType, aDeltaChange, aRefreshDataset);
+
+  // Opens the dataset
+  aRefreshDataset.Open;
+  try
+{    if (aRefreshDataset.EOF) and (GenAutoIncValue <> -1) then begin
+      // user can rewrite value in trigger new new value
+      aRefreshDataset.Close;
+      For i:= 0 to aRefreshDataset.Params.Count -1 do
+        with aRefreshDataset.Params[i] do begin
+          if (DataType in [datAutoInc, datLargeAutoInc]) and (Value = GenAutoIncValue) then begin
+            Value := aConnection.GetLastAutoInc(GeneratorName);
+          end;
+        end;
+      aRefreshDataset.Open;
+    end;}
+    if (aRefreshDataset.EOF) then raise Exception.Create('Can''t refresh delta, record isn''t found');
+    case aDeltaChange.ChangeType of
+      ctUpdate : begin
+        // ctUpdate:
+        // Leaves the old values alone because they are needed on the client
+        // for merge purposes. This could probabily be optimized
+        for I := 0 to aDelta.LoggedFieldCount - 1 do begin
+          nam := aDelta.LoggedFieldNames[i];
+          fld := aRefreshDataset.FindField(nam);
+          if fld = nil then Continue;
+          aDeltaChange.OldValueByName[nam] := aDeltaChange.NewValueByName[nam];
+          aDeltaChange.NewValueByName[nam] := fld.Value;
+        end;
+      end;
+      ctInsert : begin
+        for I := 0 to aDelta.LoggedFieldCount - 1 do begin
+          nam := aDelta.LoggedFieldNames[i];
+          fld := aRefreshDataset.FindField(nam);
+          if fld = nil then Continue;
+          aDeltaChange.NewValueByName[nam] := fld.Value;
+        end;
+      end;
+    end;
+  finally
+    aRefreshDataset.Close;
+  end;
+end;
+
+procedure TDABusinessProcessor.SynchronizeAutoIncs(const aMasterDelta, aDetailDelta : IDADelta;
+                                  const aRelationship : TDADatasetRelationship);
+var x, k, z: integer;
+    masterds : TDADataset;
+    masterfields, detailfields : TStringList;
+    oldmasterval, masterval, detailval : Variant;
+begin
+  CheckProperties;
+  masterfields := TStringList.Create;
+  masterfields.Delimiter := ';';
+
+  detailfields := TStringList.Create;
+  detailfields.Delimiter := ';';
+
+  try
+    masterds := Schema.Datasets.DatasetByName(aMasterDelta.LogicalName);
+
+    masterfields.DelimitedText := aRelationship.MasterFields;
+    detailfields.DelimitedText := aRelationship.DetailFields;
+
+    for x := 0 to (aMasterDelta.Count-1) do begin
+      if not (aMasterDelta[x].Status=csResolved) then Continue;
+
+      for k := 0 to (masterfields.Count-1) do begin
+        if not (masterds.FieldByName(masterfields[k]).DataType in [datAutoInc, datLargeAutoInc, datInteger, datLargeInt]) then Continue;
+
+        masterval := aMasterDelta[x].NewValueByName[masterfields[k]];
+        oldmasterval := aMasterDelta[x].OldValueByName[masterfields[k]];
+
+        for z := 0 to (aDetailDelta.Count-1) do begin
+          if not (aDetailDelta[z].ChangeType in [ctInsert,ctUpdate]) then Continue;
+
+          detailval := aDetailDelta[z].NewValueByName[detailfields[k]];
+          if (detailval<>oldmasterval) then Continue;
+
+          aDetailDelta[z].NewValueByName[detailfields[k]] := masterval;
+          aDetailDelta[z].RefreshedByServer := TRUE;
+        end;
+      end;
+    end;
+  finally
+    masterfields.Free;
+    detailfields.Free;
+  end;
+end;
+
+procedure TDABusinessProcessor.ProcessDelta(const aConnection: IDAConnection;
+  const aDelta: IDADelta;
+  ChangeTypes: TDAChangeTypes = AllChanges;
+  ADeltaStruct : TDADeltaStruct = nil);
+var
+  i, x, rowsaffected, z: integer;
+  canremove, ok: boolean;
+  currcmd, inscmd, delcmd, updcmd: IDASQLCommand;
+  refds : IDADataset;
+  insmap, delmap, updmap, refmap: TDAParamMappingArray;
+  mapptr: ^TDAParamMappingArray;
+  change: TDADeltaChange;
+  todelete: TList;
+  val : variant;
+  parname : string;
+  autoincvalue: integer;
+  usegenerators : boolean;
+  lexpr: TDAWhereExpression;
+  lTargetTable: string;
+begin
+  Check(not Assigned(aDelta), 'Cannot process a NIL delta');
+  if (aDelta.Count=0) then Exit;
+
+  if Assigned(fSchema.UnionDataTables.FindItem(fReferencedDataset)) then begin
+    ProcessDeltaForUnion(aConnection, aDelta, ChangeTypes, ADeltaStruct);
+    exit;
+  end;
+
+  fCurrentDelta := aDelta.GetDelta;
+  fCurrentChange := 0;
+
+  usegenerators := Supports(aConnection, IDAUseGenerators);
+
+  // Fires the "before" events
+  if Assigned(fOnBeforeProcessDelta)
+    then fOnBeforeProcessDelta(Self, aDelta)
+
+  else if Assigned(fBusinessRules)
+    then fBusinessRules.BeforeProcessDelta(Self, aDelta);
+
+  // Prepares the commands
+  if not fHasReducedDelta then begin
+    SetupCommands(aConnection, aDelta, inscmd, updcmd, delcmd, refds, lTargetTable);
+
+    CreateMappings(aDelta, insmap, inscmd, nil, True);
+    CreateMappings(aDelta, updmap, updcmd, nil, True);
+    CreateMappings(aDelta, delmap, delcmd, nil, True);
+    CreateMappings(aDelta, refmap, refds);
+
+    FDynamicWhereInRefreshDataset:=False;
+    // dynwhere
+    if (refds <> nil) and refds.SQLContainsDynamicWhere then begin
+      FDynamicWhereInRefreshDataset := True;
+      refds.DynamicWhere.Expression:=nil;
+      for i := 0 to aDelta.KeyFieldCount - 1 do begin
+        with refds.Params.Add do begin
+          ParamType:=daptInput;
+          DataType := refds.FieldByName(aDelta.KeyFieldNames[i]).DataType;
+          Name:=lDynWhereParamPrefix+IntToStr(i);
+        end;
+        with refds.DynamicWhere do begin
+          lexpr:= NewBinaryExpression(NewField('',aDelta.KeyFieldNames[i]),NewParameter(lDynWhereParamPrefix+IntToStr(i)),dboEqual);
+          if Expression = nil then
+            Expression := lexpr
+          else
+            Expression:= NewBinaryExpression(Expression,lexpr,dboEqual);
+        end;
+      end;
+    end;
+  end;
+  // Processes the delta
+  todelete := TList.Create;
+  try
+    for i := 0 to (aDelta.Count - 1) do begin
+      change := aDelta[i];
+      fCurrentChange := i; // Do NOT remove!!!
+      canremove := false;
+      autoincvalue := -1;
+
+      try
+        ok := change.ChangeType in ChangeTypes; // Filters
+
+
+        // Even if there might not be a command associated, the user might want to do something with this
+        // We just give an override chance here
+        if Assigned(fOnBeforeProcessChange) then
+          fOnBeforeProcessChange(Self, change.ChangeType, aDelta[i], ok)
+
+        else if Assigned(fBusinessRules) then
+          fBusinessRules.BeforeProcessChange(Self, change.ChangeType, aDelta[i], ok);
+
+        if ok then begin
+          // Selects the right command
+          mapptr := nil;
+          if not fHasReducedDelta then begin
+            case change.ChangeType of
+              ctInsert: begin
+                  currcmd := inscmd;
+                  mapptr := @insmap;
+                end;
+              ctUpdate: begin
+                  currcmd := updcmd;
+                  mapptr := @updmap;
+                end;
+              ctDelete: begin
+                  currcmd := delcmd;
+                  mapptr := @delmap;
+                end;
+            end;
+
+          end else begin
+            SetupCommands(aConnection, Change, currCmd, lTargetTable);
+            if currCmd <> nil then begin
+              CreateMappings(aDelta, insmap, currCmd, nil, True);
+              mapptr := @insmap;
+              refds := SetupRefreshDatasetForReducedDelta(aConnection, aDelta);
+              CreateMappings(aDelta, refmap, refds);
+            end;
+          end;
+          // Assigns the values of the current change
+          if (currcmd <> nil) then
+            for x := 0 to (currcmd.Params.Count - 1) do
+              if (mapptr^[x].DeltaIndex >= 0) then begin
+                case mapptr^[x].MappingType of
+                  mtOldValue: val := change.OldValues[mapptr^[x].DeltaIndex];
+                  else val := change.NewValues[mapptr^[x].DeltaIndex];
+                end;
+
+                if (currcmd.Params[x].DataType in [datAutoinc, datLargeAutoInc]) and (usegenerators) and (change.ChangeType=ctInsert) and (mapptr^[x].MappingType=mtNewValue) then begin
+                  // Gets the next generator values from the DB. This is for DBs such as IB or Oracle which lack autoinc fields
+                  if (autoincvalue<>-1) then raise Exception.Create('Multiple auto incremental fields not supported');
+                  parname := currcmd.Params[x].Name;
+                  change.OldValueByName[parname] := val;
+                  autoincvalue := (aConnection as IDAUseGenerators).GetNextAutoinc(currcmd.Params[x].GeneratorName);
+                  currcmd.Params[x].Value := autoincvalue;
+                  change.RefreshedByServer := TRUE;
+                  if not Assigned(refds) then begin
+                    change.NewValueByName[parname] := autoincvalue;
+                  end;
+                end
+                else currcmd.Params[x].Value := val;
+              end;
+
+          // Gives the user a chance to modify it before execution
+          if Assigned(fOnProcessChange) then
+            fOnProcessChange(Self, change.ChangeType, change, currcmd)
+          else if Assigned(fBusinessRules) then
+            fBusinessRules.ProcessChange(Self, change.ChangeType, change, currcmd);
+
+          // Executes it
+          if (currcmd <> nil)
+            then rowsaffected := currcmd.Execute
+            else rowsaffected := 0;
+
+          canremove := FALSE;
+
+          // IBX returns -1 even if updates are successful! This started to happen after I plugged the GetNextAutoinc call above.
+          // If records fail, an exception is usually generated so this check for <>0 should be sufficient for all cases...
+          // DO NOT CHANGE this to >0 !!!!
+          if (rowsaffected<>0) or (poIgnoreRowsAffected in fProcessorOptions) then begin
+            if (change.ChangeType<>ctDelete) and (refds<>NIL) then begin
+              RefreshDeltaChange(aConnection, refds, aDelta, change, autoincvalue);
+              change.RefreshedByServer := TRUE;
+            end;
+
+            canremove := not change.RefreshedByServer;
+            change.Status := csResolved;
+            if (ADeltaStruct <> nil) and (change.ChangeType in [ctInsert, ctUpdate]) and (lTargetTable <> '') then begin
+              for z:=0 to ADeltaStruct.RelationShips.Count - 1 do
+                if aDelta.LogicalName = ADeltaStruct.RelationShips[z].DetailDatasetName then
+                  SynchronizeAutoIncs(aDelta,ADeltaStruct.fDetailDeltas[z], ADeltaStruct.RelationShips[z]);
+            end;
+          end
+          else begin
+            if fHasReducedDelta and (currcmd = nil) then begin
+              // no data for operations, i.e. oldvalues[] = newvalues[]
+              canremove := True;
+              change.Status := csResolved;
+            end
+            else begin
+              canremove := FALSE;
+              change.Status := csFailed;
+              change.Message := 'No rows were affected by this update';
+            end;
+          end;
+
+          // After processing gives the user a last chance to update the change and
+          // optionally set it so that it goes back to the client (i.e. updated values)
+          if Assigned(fOnAfterProcessChange)
+            then fOnAfterProcessChange(Self, change, ok, canremove)
+
+          else if Assigned(fBusinessRules)
+            then fBusinessRules.AfterProcessChange(Self, change, ok, canremove)
+        end;
+
+      except
+        on E: Exception do begin
+          change.Status := csFailed;
+          change.Message := E.Message;
+          canremove := FALSE;
+
+          if Assigned(fOnProcessError) then
+            fOnProcessError(Self, change.ChangeType, change, currcmd, canremove, E)
+          else if Assigned(fBusinessRules) then begin
+            fBusinessRules.ProcessError(Self, change.ChangeType, change, currcmd, canremove, E);
+            if FRaiseExceptionAtError then raise;
+          end
+          else if FRaiseExceptionAtError then begin
+            raise EDAApplyUpdateFailed.Create(change, E);
+          end;
+        end;
+      end;
+
+      if canremove then todelete.Add(change);
+    end;
+
+    for i := 0 to todelete.Count - 1 do
+      aDelta.RemoveChange(TDADeltaChange(todelete[i]));
+
+    if Assigned(fOnAfterProcessDelta) then
+      fOnAfterProcessDelta(Self, aDelta)
+    else if Assigned(fBusinessRules) then
+      fBusinessRules.AfterProcessDelta(Self, aDelta)
+
+  finally
+    todelete.Free;
+  end;
+end;
+
+procedure TDABusinessProcessor.SetDeleteCommandName(const Value: string);
+begin
+  if fDeleteCommandName <> Trim(Value) then begin
+    fDeleteCommandName := Trim(Value);
+    if fDeleteCommandName <> '' then
+      fProcessorOptions := fProcessorOptions - [poAutoGenerateDelete]
+    else
+      fProcessorOptions := fProcessorOptions + [poAutoGenerateDelete];
+  end;
+end;
+
+procedure TDABusinessProcessor.SetInsertCommandName(const Value: string);
+begin
+  if fInsertCommandName <> Trim(Value) then begin
+    fInsertCommandName := Trim(Value);
+    if fInsertCommandName <> '' then
+      fProcessorOptions := fProcessorOptions - [poAutoGenerateInsert]
+    else
+      fProcessorOptions := fProcessorOptions + [poAutoGenerateInsert];
+  end;
+end;
+
+procedure TDABusinessProcessor.SetUpdateCommandName(const Value: string);
+begin
+  if fUpdateCommandName <> Trim(Value) then begin
+    fUpdateCommandName := Trim(Value);
+    if fUpdateCommandName <> '' then
+      fProcessorOptions := fProcessorOptions - [poAutoGenerateUpdate]
+    else
+      fProcessorOptions := fProcessorOptions + [poAutoGenerateUpdate];
+  end;
+end;
+
+procedure TDABusinessProcessor.SetSchema(const Value: TDASchema);
+begin
+  fSchema := Value;
+
+  if (Value <> nil) then fSchema.FreeNotification(Self);
+end;
+
+procedure TDABusinessProcessor.SetReferencedDataset(const Value: string);
+begin
+  fReferencedDataset := Value;
+end;
+
+procedure TDABusinessProcessor.ProcessDelta(aDataTable: TDADataTable;
+  ChangeTypes: TDAChangeTypes; const aConnection : IDAConnection = NIL; ADeltaStruct : TDADeltaStruct = nil);
+var
+  conn: IDAConnection;
+begin
+  with aDataTable do begin
+    Check(LocalSchema = nil, 'Datatable doesn''t reference any schema');
+    Check(LocalSchema.ConnectionManager = nil, 'Datatable''s schema doesn''t reference a connection manager');
+
+    if aConnection<>NIL
+      then conn := aConnection
+      else conn := LocalSchema.ConnectionManager.NewConnection(LocalConnection);
+
+    ProcessDelta(conn, aDataTable.Delta, ChangeTypes, ADeltaStruct);
+  end;
+end;
+
+function TDABusinessProcessor.QueryInterface(const IID: TGUID; out Obj): HResult;
+begin
+  result := inherited QueryInterface(IID, Obj);
+
+  if (result <> S_OK) and Assigned(fBusinessRules) then begin
+    // Users might introduce specific interfaces at the business rule level
+    // This allows to type cast the data table to any additional business oriented interface
+    // they decide to create.
+    result := fBusinessRules.QueryInterface(IID, Obj);
+  end;
+end;
+
+procedure TDABusinessProcessor.SetBusinessRulesID(const Value: string);
+var
+  bizclass: TDABusinessProcessorRulesClass;
+begin
+  if (Value = fBusinessRulesID) then Exit;
+
+  if Assigned(fBusinessRules) then begin
+    fBusinessRules.Detach(Self);
+    FreeAndNIL(fBusinessRules);
+  end;
+
+  fBusinessRulesID := Trim(Value);
+
+  if (fBusinessRulesID <> '') and not (csDesigning in ComponentState) then begin
+    Check(not FindBusinessProcessorRules(Value, bizclass), Name+'. Invalid BusinessRulesID "%s"', [Value]);
+
+    fBusinessRules := bizclass.Create(Self);
+    fBusinessRules.Attach(Self);
+  end;
+end;
+
+procedure TDABusinessProcessor.SetRefreshDataset(const Value: string);
+begin
+  if fRefreshDataset <> Trim(Value) then begin
+    fRefreshDataset := Trim(Value);
+    if fRefreshDataset <> '' then
+      fProcessorOptions := fProcessorOptions - [poAutoGenerateRefreshDataset]
+    else
+      fProcessorOptions := fProcessorOptions + [poAutoGenerateRefreshDataset];
+  end;
+end;
+
+procedure TDABusinessProcessor.Notification(AComponent: TComponent;
+  Operation: TOperation);
+begin
+  inherited;
+  if (Operation = opRemove) then begin
+    if (AComponent = fSchema) then fSchema := nil;
+  end;
+end;
+
+procedure TDABusinessProcessor.CheckProperties;
+begin
+  Check(Schema = nil, Name + '.Schema must be assinged.');
+end;
+
+procedure TDABusinessProcessor.SetupCommandsWithMapping(
+  const aConnection: IDAConnection;
+  const aChange: TDADeltaChange;
+  out anCmd: IDASQLCommand;
+  out aParamMapping: TDAParamMappingArray;
+  out aRefreshDs: IDADataset;
+  out aTargetTable : string);
+var
+  lSql: string;
+  lDataset: TDADataset;
+  lRefStatement: TDAStatement;
+  lUnionTable: TDAUnionDataTable;
+  lVar: Variant;
+
+  lSourceTableIdx: Integer;
+  lUnionSourceTable : TDAUnionSourceTable;
+  lSourceTable : TDADataset;
+  lSourceTableName: String;
+  lSourceTableMapping: TDAColumnMappingCollection;
+  lConnection: IDAConnection;
+begin
+  anCmd := nil;
+  lRefStatement := nil;
+  lSourceTableMapping := nil;
+  aRefreshDs := nil;
+  CheckProperties;
+  lDataset := TDADataset(fSchema.FindDataset(fReferencedDataset));
+
+  // If Union table ...
+  if lDataset is TDAUnionDataTable then begin
+    lUnionTable := TDAUnionDataTable(lDataset);
+    if aChange.ChangeType = ctDelete then
+      lVar := aChange.oldValueByName[def_SourceTableFieldName]
+    else
+      lVar := aChange.NewValueByName[def_SourceTableFieldName];
+    if (VarIsNull(lVar)) then begin
+      lSourceTableName := lUnionTable.DefaultSourceTable;
+      lUnionSourceTable := TDAUnionSourceTable(lUnionTable.SourceTables.ItemByName(lSourceTableName));
+    end
+    else begin
+      lSourceTableIdx := lVar;
+      lUnionSourceTable := lUnionTable.SourceTables[lSourceTableIdx];
+      lSourceTableName := lUnionSourceTable.Name;
+    end;
+
+    // check do we have rights to change this table
+    if lUnionSourceTable.IsReadOnly then
+      raise EDAException.Create(Format('Union source table "%s" is read-only', [lSourceTableName]));
+    //------------------------------------------------------------------
+    lConnection := GetConnectionForObject(aConnection, lSourceTableName);
+
+    lSourceTableMapping := lUnionSourceTable.ColumnMappings;
+
+    lSourceTable := TDADataset(fSchema.Datasets.FindItem(lSourceTableName));
+    if Assigned(lSourceTable) then begin
+
+      lDataset := lSourceTable;
+
+      lRefStatement := lSourceTable.Statements.FindItem(lConnection.Name, '', lConnection.ConnectionType, True);
+      if (lRefStatement = nil) then lRefStatement := lSourceTable.Statements.StatementByName(Schema.ConnectionManager.GetDefaultConnectionName);
+      if lRefStatement <> nil then begin
+        // Assemble Refresh dataset  ...
+        if (fRefreshDataset <> '') then aRefreshDs := fSchema.NewDataset(lConnection, fRefreshDataset, [], [], FALSE);
+
+        if (aRefreshDs = nil) and (poAutoGenerateRefreshDataset in fProcessorOptions) then begin
+          aRefreshDs := GenerateRefreshDataset(lSourceTable, lConnection, lRefStatement.TargetTable, lRefStatement.ColumnMappings, lSourceTableMapping);
+          if (aRefreshDs <> NIL) then SetupParameters(aRefreshDs, lSourceTable, lConnection, lSourceTableMapping);
+        end;
+        if Assigned(aRefreshDs) then aRefreshDs.Prepared := True;
+      end;
+    end;
+  end
+  else begin
+    lConnection := aConnection;
+    if lDataset is TDADataset then begin // If plain table ...
+      lRefStatement := TDAStatement(lDataset.Statements.FindItem(aConnection.Name));
+      if (lRefStatement = nil) then lRefStatement := lDataset.Statements.StatementByName(Schema.ConnectionManager.GetDefaultConnectionName);
+      aRefreshDs := SetupRefreshDatasetForReducedDelta(lConnection,aChange.Delta);
+    end
+    else begin // If no dataset found
+      RaiseError(Name + '''s referenced dataset is not speficied or does not exist. Cannot generate SQL');
+    end;
+  end;
+
+  if lRefStatement <> nil then
+    aTargetTable := lRefStatement.TargetTable
+  else
+    aTargetTable := '';  
+  lSql := GenerateSQL(aChange.ChangeType, aChange, lDataset, aChange.Delta, lRefStatement, lConnection);
+  if lSql <> '' then begin
+    anCmd := lConnection.NewCommand(lSql, stSQL);
+    SetupParameters(anCmd, lDataset, aConnection);
+    if anCmd <> nil then anCmd.Prepared:=True;
+    CreateMappings(aChange.Delta, aParamMapping, anCmd, lSourceTableMapping, True);
+  end;
+end;
+
+procedure TDABusinessProcessor.SetupCommands(
+  const aConnection: IDAConnection; const aChange: TDADeltaChange;
+  out anCmd: IDASQLCommand; out aTargetTable : string);
+var
+  sql: string;
+  ds: TDADataset;
+  refstmt: TDAStatement;
+begin
+  anCmd:=nil;
+  refstmt := nil;
+  CheckProperties;
+  ds := TDADataset(fSchema.Datasets.FindItem(fReferencedDataset));
+  if (ds <> nil) then begin
+    refstmt := fSchema.FindCommandStatement(aConnection,ds,aConnection.Name);
+//    refstmt := TDAStatement(ds.Statements.FindItem(aConnection.Name));
+//    if (refstmt = nil) then refstmt := ds.Statements.StatementByName(Schema.ConnectionManager.GetDefaultConnectionName);
+  end
+  else
+    RaiseError(Name + '''s referenced dataset is not speficied or does not exist. Cannot generate SQL');
+  if refstmt <> nil then
+    aTargetTable := refstmt.TargetTable
+  else
+    aTargetTable := '';
+  sql := GenerateSQL(aChange.ChangeType, aChange, ds,aChange.Delta ,refstmt, aConnection);
+  if sql <> '' then begin
+    anCmd := aConnection.NewCommand(sql, stSQL);
+    SetupParameters(anCmd, ds, aConnection);
+    if anCmd <> nil then anCmd.Prepared:=True;
+  end;
+end;
+
+
+
+function TDABusinessProcessor.SetupRefreshDatasetForReducedDelta(
+  const aConnection: IDAConnection; const aDelta: IDADelta): IDADataset;
+var
+  ds: TDADataset;
+begin
+  Result := nil;
+  if (fRefreshDataset <> '') then Result := fSchema.NewDataset(aConnection, fRefreshDataset,[],'','',False,True);
+  if (Result = nil) and (poAutoGenerateRefreshDataset in fProcessorOptions) then begin
+    ds := TDADataset(fSchema.Datasets.FindItem(fReferencedDataset));
+    if (ds <> nil) then begin
+      Result := GenerateRefreshDataset(ds, aDelta, fSchema.FindCommandStatement(aConnection,ds), aConnection);
+      if (Result<>NIL) then SetupParameters(Result, ds, aConnection);
+    end
+    else begin
+      RaiseError(Name + '''s referenced dataset is not speficied or does not exist. Cannot generate SQL');
+    end;
+  end;
+  // Finally prepares them
+  if (poPrepareCommands in fProcessorOptions) and (Result <> NIL) then Result.Prepared := TRUE;
+end;
+
+procedure TDABusinessProcessor.SetProcessorOptions(
+  const Value: TDAProcessorOptions);
+begin
+  fProcessorOptions := Value;
+  if csLoading in ComponentState then begin
+    if fInsertCommandName <> '' then fProcessorOptions:= fProcessorOptions - [poAutoGenerateInsert];
+    if fUpdateCommandName <> '' then fProcessorOptions:= fProcessorOptions - [poAutoGenerateUpdate];
+    if fDeleteCommandName <> '' then fProcessorOptions:= fProcessorOptions - [poAutoGenerateDelete];
+    if fRefreshDataset <> '' then fProcessorOptions:= fProcessorOptions - [poAutoGenerateRefreshDataset];
+  end
+  else begin
+    if poAutoGenerateInsert in fProcessorOptions then fInsertCommandName :='';
+    if poAutoGenerateUpdate in fProcessorOptions then fUpdateCommandName :='';
+    if poAutoGenerateDelete in fProcessorOptions then fDeleteCommandName :='';
+    if poAutoGenerateRefreshDataset in fProcessorOptions then fRefreshDataset :='';
+  end;
+end;
+
+function TDABusinessProcessor.GenerateRefreshDataset(aDataset: TDADataset;
+  const aDelta: IDADelta; aDatasetStatement: TDAStatement;
+  aConnection: IDAConnection): IDADataset;
+begin
+  Result := GenerateRefreshDataset(aDataset,aConnection,aDatasetStatement.TargetTable,aDatasetStatement.ColumnMappings, nil);
+end;
+
+{ TDABusinessProcessorRules }
+
+procedure TDABusinessProcessorRules.Attach(
+  aBusinessProcessor: TDABusinessProcessor);
+begin
+
+end;
+
+constructor TDABusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);
+begin
+  inherited Create;
+  fBusinessProcessor := aBusinessProcessor;
+end;
+
+procedure TDABusinessProcessorRules.Detach(
+  aBusinessProcessor: TDABusinessProcessor);
+begin
+
+end;
+
+procedure TDABusinessProcessorRules.AfterProcessChange(
+  Sender: TDABusinessProcessor; aChange: TDADeltaChange;
+  Processed: boolean; var CanRemoveFromDelta: boolean);
+begin
+
+end;
+
+procedure TDABusinessProcessorRules.AfterProcessDelta(
+  Sender: TDABusinessProcessor; const aDelta: IDADelta);
+begin
+
+end;
+
+procedure TDABusinessProcessorRules.BeforeProcessChange(
+  Sender: TDABusinessProcessor; aChangeType: TDAChangeType;
+  aChange: TDADeltaChange; var ProcessChange: boolean);
+begin
+
+end;
+
+procedure TDABusinessProcessorRules.BeforeProcessDelta(
+  Sender: TDABusinessProcessor; const aDelta: IDADelta);
+begin
+
+end;
+
+procedure TDABusinessProcessorRules.GenerateSQL(
+  Sender: TDABusinessProcessor; ChangeType: TDAChangeType;
+  const ReferencedStatement: TDAStatement; const aDelta: IDADelta;
+  var SQL: string);
+begin
+
+end;
+
+procedure TDABusinessProcessorRules.ProcessChange(
+  Sender: TDABusinessProcessor; aChangeType: TDAChangeType;
+  aChange: TDADeltaChange; const aCommand: IDASQLCommand);
+begin
+
+end;
+
+procedure TDABusinessProcessorRules.ProcessError(
+  Sender: TDABusinessProcessor; aChangeType: TDAChangeType;
+  aChange: TDADeltaChange; const aCommand: IDASQLCommand;
+  var CanRemoveFromDelta: boolean; Error: Exception);
+begin
+  if Assigned(Error) then
+    raise Exception(Error.NewInstance).Create(Error.Message)
+  else
+    raise Exception.Create('Unknown error');
+end;
+
+//----------
+
+procedure TDABusinessProcessorRules.NotSupportedByBusinessProcessor;
+begin
+  RaiseError('This method is not supported on the Business Processor Rule, but only on the client.');
+end;
+
+procedure TDABusinessProcessorRules.Append;
+begin
+  NotSupportedByBusinessProcessor();
+end;
+
+procedure TDABusinessProcessorRules.Cancel;
+begin
+  NotSupportedByBusinessProcessor();
+end;
+
+procedure TDABusinessProcessorRules.Delete;
+begin
+  NotSupportedByBusinessProcessor();
+end;
+
+procedure TDABusinessProcessorRules.Edit;
+begin
+  NotSupportedByBusinessProcessor();
+end;
+
+procedure TDABusinessProcessorRules.First;
+begin
+  NotSupportedByBusinessProcessor();
+end;
+
+function TDABusinessProcessorRules.GetBOF: Boolean;
+begin
+  result := false; { to avoid warning; }
+  NotSupportedByBusinessProcessor();
+end;
+
+function TDABusinessProcessorRules.GetEOF: Boolean;
+begin
+  result := false; { to avoid warning; }
+  NotSupportedByBusinessProcessor();
+end;
+
+function TDABusinessProcessorRules.GetRecordCount: Integer;
+begin
+  result := -1; { to avoid warning; }
+  NotSupportedByBusinessProcessor();
+end;
+
+procedure TDABusinessProcessorRules.Insert;
+begin
+  NotSupportedByBusinessProcessor();
+end;
+
+procedure TDABusinessProcessorRules.Last;
+begin
+  NotSupportedByBusinessProcessor();
+end;
+
+function TDABusinessProcessorRules.Locate(const aKeyFields: String; const aKeyValues: Variant; aOptions: TLocateOptions): Boolean;
+begin
+  result := false; { to avoid warning; }
+  NotSupportedByBusinessProcessor();
+end;
+
+procedure TDABusinessProcessorRules.Next;
+begin
+  NotSupportedByBusinessProcessor();
+end;
+
+procedure TDABusinessProcessorRules.Post;
+begin
+  NotSupportedByBusinessProcessor();
+end;
+
+procedure TDABusinessProcessorRules.Prior;
+begin
+  NotSupportedByBusinessProcessor();
+end;
+
+function TDABusinessProcessorRules.GetDetailOptions: TDADetailOptions;
+begin
+  result := []
+end;
+
+function TDABusinessProcessorRules.GetMasterOptions: TDAMasterOptions;
+begin
+  result := []
+end;
+
+procedure TDABusinessProcessorRules.SetDetailOptions(
+  Value: TDADetailOptions);
+begin
+  NotSupportedByBusinessProcessor();
+end;
+
+procedure TDABusinessProcessorRules.SetMasterOptions(
+  Value: TDAMasterOptions);
+begin
+  NotSupportedByBusinessProcessor();
+end;
+
+function TDABusinessProcessorRules.GetRecNo: integer;
+begin
+  result := -1; { to avoid warning; }
+  NotSupportedByBusinessProcessor();
+end;
+
+procedure TDABusinessProcessorRules.SetRecNo(Value: integer);
+begin
+  NotSupportedByBusinessProcessor();
+end;
+
+function TDABusinessProcessorRules.GetIsEmpty: boolean;
+begin
+  result := FALSE;
+  NotSupportedByBusinessProcessor();
+end;
+
+function TDABusinessProcessorRules.GetState: TDatasetState;
+begin
+  result := dsBrowse
+end;
+
+function TDABusinessProcessorRules.Lookup(const KeyFields: string;
+  const KeyValues: Variant; const ResultFields: string): Variant;
+begin
+  Result:=Null;
+  NotSupportedByBusinessProcessor();
+end;
+
+procedure TDABusinessProcessorRules.ClearField(
+  const FieldIndexOrName: Variant);
+begin
+  NotSupportedByBusinessProcessor();
+end;
+
+function TDABusinessProcessorRules.IsFieldNull(
+  const FieldIndexOrName: Variant): boolean;
+begin
+  result := FALSE;
+  NotSupportedByBusinessProcessor();
+end;
+
+function TDABusinessProcessorRules.GetDataTable: TDADataTable;
+begin
+  result := NIL;
+  NotSupportedByBusinessProcessor();
+end;
+
+procedure TDABusinessProcessorRules.Close;
+begin
+  NotSupportedByBusinessProcessor();
+end;
+
+procedure TDABusinessProcessorRules.Open;
+begin
+  NotSupportedByBusinessProcessor();
+end;
+
+function TDABusinessProcessorRules.GetActive: boolean;
+begin
+  NotSupportedByBusinessProcessor();
+  result:=FALSE
+end;
+
+procedure TDABusinessProcessorRules.SetActive(const Value: boolean);
+begin
+  NotSupportedByBusinessProcessor();
+end;
+
+procedure TDABusinessProcessor.ProcessDeltaForUnion(const aConnection: IDAConnection;
+  const aDelta: IDADelta;
+  ChangeTypes: TDAChangeTypes = AllChanges;
+  ADeltaStruct : TDADeltaStruct = nil);
+var
+  i, x, rowsaffected, z: integer;
+  canremove, ok: boolean;
+  refds : IDADataset;
+  insmap: TDAParamMappingArray;
+  mapptr: ^TDAParamMappingArray;
+  change: TDADeltaChange;
+  todelete: TList;
+  val : variant;
+  parname : string;
+  autoincvalue: integer;
+  usegenerators : boolean;
+  currcmd: IDASQLCommand;
+  lCommands: TDADeltaProcessorItemCollection;
+  lUnionTable: TDAUnionDataTable;
+  lUnionSourceTable: TDAUnionSourceTable;
+  lSourceTableName: String;
+  lProcessorItem: TDADeltaProcessorItem;
+  lVar: Variant;
+  lConnection: IDAConnection;
+  lTargetTable: string;
+begin
+  Check(not Assigned(aDelta), 'Cannot process a NIL delta');
+  if (aDelta.Count=0) then Exit;
+  refds := nil;
+  fCurrentDelta := aDelta.GetDelta;
+  fCurrentChange := 0;
+
+  usegenerators := Supports(aConnection, IDAUseGenerators);
+
+  // Fires the "before" events
+  if Assigned(fOnBeforeProcessDelta)
+    then fOnBeforeProcessDelta(Self, aDelta)
+
+  else if Assigned(fBusinessRules)
+    then fBusinessRules.BeforeProcessDelta(Self, aDelta);
+
+  lUnionTable := fSchema.UnionDataTables.ItemByName(fReferencedDataset) as TDAUnionDataTable;
+  //lSourceTableFieldIdx := lUnionTable.Fields.FieldByName(def_SourceTableFieldName).Index;
+
+  try
+  // Prepares the commands
+  if not fHasReducedDelta then begin
+    SetupCommands(aConnection, aDelta, lCommands);
+  end;
+  // Processes the delta
+  todelete := TList.Create;
+  try
+    for i := 0 to (aDelta.Count - 1) do begin
+      change := aDelta[i];
+      fCurrentChange := i; // Do NOT remove!!!
+      canremove := false;
+      autoincvalue := -1;
+
+      ok := change.ChangeType in ChangeTypes; // Filters
+      try
+
+        // Even if there might not be a command associated, the user might want to do something with this
+        // We just give an override chance here
+        if Assigned(fOnBeforeProcessChange) then
+          fOnBeforeProcessChange(Self, change.ChangeType, aDelta[i], ok)
+
+        else if Assigned(fBusinessRules) then
+          fBusinessRules.BeforeProcessChange(Self, change.ChangeType, aDelta[i], ok);
+
+        if ok then begin
+          // Selects the right command
+          mapptr := nil;
+          if not fHasReducedDelta then begin
+
+            // Define appripriate source table and get its commands
+
+            //lVar := aDelta.Changes[i].NewValues[lSourceTableFieldIdx];
+            if (aDelta.Changes[i].ChangeType = ctInsert) then
+              lVar := aDelta.Changes[i].NewValueByName[def_SourceTableFieldName]
+            else
+              lVar := aDelta.Changes[i].OldValueByName[def_SourceTableFieldName];
+
+            if (VarIsNull(lVar) or VarIsClear(lVar)) then begin
+              if lUnionTable.DefaultSourceTable <> '' then
+                lSourceTableName := lUnionTable.DefaultSourceTable
+              else
+                lSourceTableName := lUnionTable.SourceTables[0].Name;
+            end else
+              lSourceTableName := lUnionTable.SourceTables[lVar].Name;
+
+            // Since we specified table for this particular change then let's
+            // check do we have rights to change this table
+            lUnionSourceTable :=
+              lUnionTable.SourceTables.UnionSourceTableByName(lSourceTableName);
+
+            if lUnionSourceTable.IsReadOnly then
+                raise EDAException.Create(Format('Union source table "%s" is read-only', [lSourceTableName]));
+            //------------------------------------------------------------------
+            lProcessorItem := TDADeltaProcessorItem(lCommands.FindItem(lSourceTableName));
+            lTargetTable := lProcessorItem.TargetTable;
+            case change.ChangeType of
+              ctInsert: begin
+                  currcmd := lProcessorItem.fInsertCommand;
+                  mapptr := @lProcessorItem.fInsertCommandMapping;
+                end;
+              ctUpdate: begin
+                  currcmd := lProcessorItem.fUpdateCommand;
+                  mapptr := @lProcessorItem.fUpdateCommandMapping;
+                end;
+              ctDelete: begin
+                  currcmd := lProcessorItem.fDeleteCommand;
+                  mapptr := @lProcessorItem.fDeleteCommandMapping;
+
+                end;
+            end;
+            refds := lProcessorItem.RefreshDataset;
+          end else begin
+            SetupCommandsWithMapping(aConnection, Change, currCmd, insmap, refds, lTargetTable);
+            mapptr := @insmap;
+          end;
+
+         //GenerateRefreshDataset(Schema.FindDataset(lSourceTableName),aConnection,lSourceTableName,lUnionSourceTable.ColumnMappings);
+
+          // Assigns the values of the current change
+          if (currcmd <> nil) then
+            for x := 0 to (currcmd.Params.Count - 1) do
+              if (mapptr^[x].DeltaIndex >= 0) then begin
+                case mapptr^[x].MappingType of
+                  mtOldValue: val := change.OldValues[mapptr^[x].DeltaIndex];
+                  else val := change.NewValues[mapptr^[x].DeltaIndex];
+                end;
+
+                if (currcmd.Params[x].DataType in [datAutoinc, datLargeAutoInc]) and (usegenerators) and (change.ChangeType=ctInsert) and (mapptr^[x].MappingType=mtNewValue) then begin
+                  // Gets the next generator values from the DB. This is for DBs such as IB or Oracle which lack autoinc fields
+                  if (autoincvalue<>-1) then raise Exception.Create('Multiple auto incremental fields not supported');
+                  parname := currcmd.Params[x].Name;
+                  change.OldValueByName[parname] := val;
+                  autoincvalue := (aConnection as IDAUseGenerators).GetNextAutoinc(currcmd.Params[x].GeneratorName);
+                  currcmd.Params[x].Value := autoincvalue;
+                  change.RefreshedByServer := TRUE;
+                  if not Assigned(refds) then begin
+                    change.NewValueByName[parname] := autoincvalue;
+                  end;
+                end
+                else currcmd.Params[x].Value := val;
+              end;
+
+          // Gives the user a chance to modify it before execution
+          if Assigned(fOnProcessChange) then
+            fOnProcessChange(Self, change.ChangeType, change, currcmd)
+          else if Assigned(fBusinessRules) then
+            fBusinessRules.ProcessChange(Self, change.ChangeType, change, currcmd);
+
+          // Executes it
+          if (currcmd <> nil)
+            then rowsaffected := currcmd.Execute
+            else rowsaffected := 0;
+
+          canremove := FALSE;
+
+          // IBX returns -1 even if updates are successful! This started to happen after I plugged the GetNextAutoinc call above.
+          // If records fail, an exception is usually generated so this check for <>0 should be sufficient for all cases...
+          // DO NOT CHANGE this to >0 !!!!
+          if (rowsaffected<>0) or (poIgnoreRowsAffected in fProcessorOptions) then begin
+            if (change.ChangeType<>ctDelete) and (refds<>NIL) then begin
+              lConnection := GetConnectionForObject(aConnection, refds.LogicalName);
+              RefreshDeltaChange(lConnection, refds, aDelta, change, autoincvalue);
+              change.RefreshedByServer := TRUE;
+            end;
+
+            canremove := not change.RefreshedByServer;
+            change.Status := csResolved;
+
+            if (ADeltaStruct <> nil) and (change.ChangeType in [ctInsert, ctUpdate]) and (lTargetTable <> '') then begin
+              for z:=0 to ADeltaStruct.RelationShips.Count - 1 do
+                if lTargetTable = ADeltaStruct.RelationShips[z].DetailDatasetName then
+                  SynchronizeAutoIncs(aDelta,ADeltaStruct.fDetailDeltas[z], ADeltaStruct.RelationShips[z]);
+            end;
+          end
+          else begin
+            if fHasReducedDelta and (currcmd = nil) then begin
+              // no data for operations, i.e. oldvalues[] = newvalues[]
+              canremove := True;
+              change.Status := csResolved;
+            end
+            else begin
+              canremove := FALSE;
+              change.Status := csFailed;
+              change.Message := 'No rows were affected by this update';
+            end;
+          end;
+
+          // After processing gives the user a last chance to update the change and
+          // optionally set it so that it goes back to the client (i.e. updated values)
+          if Assigned(fOnAfterProcessChange)
+            then fOnAfterProcessChange(Self, change, ok, canremove)
+
+          else if Assigned(fBusinessRules)
+            then fBusinessRules.AfterProcessChange(Self, change, ok, canremove)
+        end;
+
+      except
+        on E: Exception do begin
+          change.Status := csFailed;
+          change.Message := E.Message;
+          canremove := FALSE;
+
+          if Assigned(fOnProcessError) then
+            fOnProcessError(Self, change.ChangeType, change, currcmd, canremove, E)
+          else if Assigned(fBusinessRules) then begin
+            fBusinessRules.ProcessError(Self, change.ChangeType, change, currcmd, canremove, E);
+            if FRaiseExceptionAtError then raise;
+          end
+          else if FRaiseExceptionAtError then begin
+            raise EDAApplyUpdateFailed.Create(change, E);
+          end;  
+        end;
+      end;
+
+      if canremove then todelete.Add(change);
+    end;
+
+    for i := 0 to todelete.Count - 1 do
+      aDelta.RemoveChange(TDADeltaChange(todelete[i]));
+
+    if Assigned(fOnAfterProcessDelta) then
+      fOnAfterProcessDelta(Self, aDelta)
+    else if Assigned(fBusinessRules) then
+      fBusinessRules.AfterProcessDelta(Self, aDelta)
+
+  finally
+    todelete.Free;
+  end;
+  finally
+    lCommands.Free();
+  end;
+
+end;
+
+procedure TDABusinessProcessor.SetupCommands(const aConnection: IDAConnection;
+const aDelta: IDADelta; out aCommandsList : TDADeltaProcessorItemCollection);
+var i: Integer;
+  refstmt: TDAStatement;
+  lUnionTable: TDAUnionDataTable;
+  lSourceTable: TDADataset;
+  lSourceTableName: String;
+  lSourceTableIdx: integer;
+  lSourceTableMapping: TDAColumnMappingCollection;
+  lProcessorItem: TDADeltaProcessorItem;
+
+  lSql: String;
+  lVar: Variant;
+  lConnection: IDAConnection;
+begin
+  //lUnionTable := nil;
+  refstmt := nil;
+  CheckProperties;
+
+  aCommandsList := TDADeltaProcessorItemCollection.Create(Self);
+
+  lUnionTable := fSchema.UnionDataTables.ItemByName(fReferencedDataset) as TDAUnionDataTable;
+
+  if not Assigned(lUnionTable) then
+    RaiseError(Name + '''s referenced dataset is not speficied or does not exist. Cannot generate SQL');
+
+  // for each change in delta
+  for i:= 0 to aDelta.Count-1 do begin
+    case aDelta.Changes[i].ChangeType of
+      ctInsert: lVar := aDelta.Changes[i].NewValueByName[def_SourceTableFieldName];
+      ctUpdate, ctDelete: lVar := aDelta.Changes[i].OldValueByName[def_SourceTableFieldName];
+    end;
+
+    if (VarIsNull(lVar) or VarIsClear(lVar)) then begin
+      if lUnionTable.DefaultSourceTable <> '' then
+        lSourceTableName := lUnionTable.DefaultSourceTable
+      else
+        lSourceTableName := lUnionTable.SourceTables[0].Name;
+      lSourceTableIdx := lUnionTable.SourceTables.ItemByName(lSourceTableName).Index;
+    end else begin
+      lSourceTableIdx := lVar;
+      lSourceTableName := lUnionTable.SourceTables[lSourceTableIdx].Name;
+    end;
+    lSourceTableMapping := lUnionTable.SourceTables[lSourceTableIdx].ColumnMappings;
+    lConnection := GetConnectionForObject(aConnection, lSourceTableName);
+    lSourceTable := TDADataset(fSchema.Datasets.FindItem(lSourceTableName));
+    if Assigned(lSourceTable) then begin
+      refstmt := lSourceTable.Statements.FindItem(lConnection.Name, '', lConnection.ConnectionType, True);
+    end;
+
+    lProcessorItem := TDADeltaProcessorItem(aCommandsList.FindItem(lSourceTableName));
+
+    if not Assigned(lProcessorItem) then begin
+      lProcessorItem := aCommandsList.Add();
+      lProcessorItem.fName := lSourceTableName;
+      if refstmt <> nil then  lProcessorItem.TargetTable := refstmt.TargetTable;
+    end;
+
+
+    // Assemble Refresh dataset  ...
+    if (fRefreshDataset <> '') and (not Assigned(lProcessorItem.fRefreshDataset)) then
+      lProcessorItem.fRefreshDataset := fSchema.NewDataset(lConnection, fRefreshDataset, [], [], FALSE);
+
+    if (lProcessorItem.fRefreshDataset = nil) and (poAutoGenerateRefreshDataset in fProcessorOptions) then begin
+      lProcessorItem.fRefreshDataset := GenerateRefreshDataset(lSourceTable, lConnection, refstmt.TargetTable, refstmt.ColumnMappings, lSourceTableMapping);
+      if (lProcessorItem.fRefreshDataset <> NIL) then SetupParameters(lProcessorItem.fRefreshDataset, lSourceTable, lConnection, lSourceTableMapping);
+    end;
+
+    if Assigned(lProcessorItem.fRefreshDataset) and (not lProcessorItem.fRefreshDataset.Prepared) then
+      lProcessorItem.fRefreshDataset.Prepared := True;
+
+
+    // Assemble Insert command ...
+    if ((aDelta.Changes[i].ChangeType = ctInsert) and (not Assigned(lProcessorItem.fInsertCommand))) then begin
+      // Tries to locate the specified commands
+      if (fInsertCommandName <> '') then
+        lProcessorItem.fInsertCommand := fSchema.NewCommand(lConnection, fInsertCommandName);
+      // Auto generates the SQL for the undefined commands
+      if (lProcessorItem.fInsertCommand = nil) and (poAutoGenerateInsert in fProcessorOptions) then begin
+        lSql := GenerateSQL(ctInsert, nil, lSourceTable, aDelta, refstmt, lConnection);
+        lProcessorItem.fInsertCommand := lConnection.NewCommand(lSql, stSQL);
+        SetupParameters(lProcessorItem.fInsertCommand, lSourceTable, lConnection);
+      end;
+
+      if Assigned(lProcessorItem.fInsertCommand) then begin
+        CreateMappings(aDelta, lProcessorItem.fInsertCommandMapping , lProcessorItem.fInsertCommand, lSourceTableMapping, True);
+        lProcessorItem.fInsertCommand.Prepared := True;
+      end;
+    end;
+
+    // Assemble Update command ...
+    if ((aDelta.Changes[i].ChangeType = ctUpdate) and (not Assigned(lProcessorItem.fUpdateCommand))) then begin
+      // Tries to locate the specified commands
+      if (fUpdateCommandName <> '') then
+        lProcessorItem.fUpdateCommand := fSchema.NewCommand(lConnection, fUpdateCommandName);
+      // Auto generates the SQL for the undefined commands
+      if (lProcessorItem.fUpdateCommand = nil) and (poAutoGenerateUpdate in fProcessorOptions) then begin
+        lSql := GenerateSQL(ctUpdate, nil, lSourceTable, aDelta, refstmt, lConnection);
+        lProcessorItem.fUpdateCommand := lConnection.NewCommand(lSql, stSQL);
+        SetupParameters(lProcessorItem.fUpdateCommand, lSourceTable, lConnection);
+      end;
+      if Assigned(lProcessorItem.fUpdateCommand) then begin
+        CreateMappings(aDelta, lProcessorItem.fUpdateCommandMapping , lProcessorItem.fUpdateCommand, lSourceTableMapping, True);
+        lProcessorItem.fUpdateCommand.Prepared := True;
+      end;
+
+    end;
+
+    // Assemble Delete command ...
+    if ((aDelta.Changes[i].ChangeType = ctDelete) and (not Assigned(lProcessorItem.fDeleteCommand))) then begin
+      // Tries to locate the specified commands
+      if (fDeleteCommandName <> '') then
+        lProcessorItem.fDeleteCommand := fSchema.NewCommand(lConnection, fDeleteCommandName);
+      // Auto generates the SQL for the undefined commands
+      if (lProcessorItem.fDeleteCommand = nil) and (poAutoGenerateDelete in fProcessorOptions) then begin
+        lSql := GenerateSQL(ctDelete, nil, lSourceTable, aDelta, refstmt, lConnection);
+        lProcessorItem.fDeleteCommand := lConnection.NewCommand(lSql, stSQL);
+        SetupParameters(lProcessorItem.fDeleteCommand, lSourceTable, lConnection);
+      end;
+      if Assigned(lProcessorItem.fDeleteCommand) then begin
+        CreateMappings(aDelta, lProcessorItem.fDeleteCommandMapping , lProcessorItem.fDeleteCommand, lSourceTableMapping, True);
+        lProcessorItem.fDeleteCommand.Prepared := True;
+      end;
+    end;
+
+  end;
+end;
+
+function TDABusinessProcessor.GetConnectionForObject(const aConnection: IDAConnection; const aName: string): IDAConnection;
+var lHETConnection: IDAHETConnection;
+begin
+  result := aConnection;
+  if Supports(aConnection, IDAHETConnection, lHETConnection) then
+    result := lHETConnection.GetConnectionForObject(aName)
+end;
+
+
+{ TDADeltaProcessorItemCollection }
+constructor TDADeltaProcessorItemCollection.Create(aOwner: TComponent);
+begin
+  inherited Create(aOwner, TDADeltaProcessorItem);
+end;
+
+function TDADeltaProcessorItemCollection.GetItem(Index: integer): TDADeltaProcessorItem;
+begin
+  result := TDADeltaProcessorItem(inherited Items[Index])
+end;
+
+procedure TDADeltaProcessorItemCollection.SetItem(Index: integer; const Value: TDADeltaProcessorItem);
+begin
+  Items[Index].Assign(Value);
+end;
+
+function TDADeltaProcessorItemCollection.Add: TDADeltaProcessorItem;
+begin
+  result := TDADeltaProcessorItem(inherited Add);
+end;
+
+function TDADeltaProcessorItemCollection.ItemByName(const aName: String): TDADeltaProcessorItem;
+begin
+  result := TDADeltaProcessorItem(inherited ItemByName(aName));
+end;
+
+
+function TDADeltaProcessorItemCollection.GetItemName(
+  anItem: TCollectionItem): string;
+begin
+  Result := TDADeltaProcessorItem(anItem).Name;
+end;
+
+function TDADeltaProcessorItemCollection.SetItemName(
+  anItem: TCollectionItem; const aName: string): string;
+begin
+  TDADeltaProcessorItem(anItem).Name := aName;
+end;
+
+initialization
+  _bizdeltachanges := TStringList.Create;
+  _bizdeltachanges.Sorted := TRUE;
+
+finalization
+  _bizdeltachanges.Free;
+
+end.
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDACDSDataTable.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDACDSDataTable.pas
new file mode 100644
index 0000000..9a6f004
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDACDSDataTable.pas	
@@ -0,0 +1,648 @@
+unit uDACDSDataTable;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up                                                  }
+{ platform: Win32                                                            }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses Classes, DB, uDAInterfaces, uDADataTable, DBClient;
+
+
+const
+  DAFormatToCDSFormat : array[TDANativeDataFormat] of TDataPacketFormat = (dfBinary, dfXML);
+
+type
+  TDACDSDataTable = class;
+
+  { TDAClientdataset }
+  TDAClientdataset = class(TClientDataset, IDADataTableDataset)
+  private
+    FLocateRecordMode: Boolean;
+    function GetActive: boolean;
+
+  protected
+    function GetDataTable: TDADataTable; safecall;
+    procedure InternalRefresh; override;
+    function GetStateFieldValue(State: TDataSetState;
+      Field: TField): Variant; override;
+    procedure DataEvent(Event: TDataEvent; Info: Longint); override;
+  public
+    function Locate(const KeyFields: string; const KeyValues: Variant;
+      Options: TLocateOptions): Boolean; override;
+    function Lookup(const KeyFields: string; const KeyValues: Variant;
+      const ResultFields: string): Variant; override;
+{$IFDEF DELPHI7UP}
+    procedure GetFieldNames(List: TStrings); override;
+{$ENDIF}
+  published
+    property Active: boolean read GetActive;
+  end;
+
+  { TDACDSDataTable }
+  TDACDSDataTable = class(TDADataTable, IDARangeController, IDANativeDatasetStreaming)
+  private
+    fMasterSource : TDADataSource;
+    fClientDataset: TClientDataSet;
+    fWasReadonly : Boolean;
+  protected
+    function intDATypeToVCLType(aDAType: TDADataType): TFieldType; override;
+    function GetDatasetClass: TDatasetClass; override;
+    procedure CreateInternalFields(aDataset: TDataset; someFieldDefinitions: TDAFieldCollection); override;
+    procedure DoSort(const FieldNames: array of string; const Directions: array of TDASortDirection); override;
+
+    procedure DoBeforeOpenDataset; override;
+    procedure DoAfterCloseDataset; override;
+
+    procedure SetMasterSource(const Value: TDADataSource); override;
+    function GetMasterSource: TDADataSource; override;
+    procedure SetDetailsFields(const Value: string); override;
+    procedure SetMasterFields(const Value: string); override;
+    function GetDetailFields: string; override;
+    function GetMasterFields: string; override;
+
+    function GetIndexDefs: TIndexDefs;
+    procedure SetIndexDefs(const Value: TIndexDefs);
+    function GetIndexName: string;
+    procedure SetIndexName(const Value: string);
+
+    function GetFilter: string; override;
+    function GetFiltered: boolean; override;
+    procedure SetFilter(const Value: string); override;
+    procedure SetFiltered(const Value: boolean); override;
+
+    function GetReadOnly: boolean; override;
+    procedure SetReadOnly(const Value: boolean); override;
+
+  public
+    constructor Create(aOwner: TComponent); override;
+
+    procedure FindNearest(const KeyValues: array of const);
+
+    { IDAClonedCursorsSupport }
+    procedure CloneCursor(Source : TDADataTable); override; safecall;
+
+    { IDANativeDatasetStreaming }
+    procedure NativeSaveToFile(const aFileName : string; DataFormat : TDANativeDataFormat = ndfBinary);
+    procedure NativeLoadFromFile(const aFileName : string);
+    procedure NativeSaveToStream(aStream : TStream; DataFormat : TDANativeDataFormat = ndfBinary);
+    procedure NativeLoadFromStream(aStream : TStream);
+
+    { IDARangeController }
+    procedure ApplyRange; safecall;
+    procedure CancelRange; safecall;
+    procedure SetRange(const StartValues, EndValues: array of const); safecall;
+    procedure EditRangeEnd; safecall;
+    procedure EditRangeStart; safecall;
+    procedure SetRangeEnd; safecall;
+    procedure SetRangeStart; safecall;
+
+    procedure DisableConstraints; override; safecall;
+    procedure EnableConstraints; override; safecall;
+  published
+    property IndexDefs: TIndexDefs read GetIndexDefs write SetIndexDefs;
+    property IndexName: string read GetIndexName write SetIndexName;
+
+  end;
+
+// Table for quick CRC Calculations. Used to generate unique index names when sorting
+const crctable : array [0..255] of cardinal =
+(
+ $00000000, $77073096, $EE0E612C, $990951BA,
+ $076DC419, $706AF48F, $E963A535, $9E6495A3,
+ $0EDB8832, $79DCB8A4, $E0D5E91E, $97D2D988,
+ $09B64C2B, $7EB17CBD, $E7B82D07, $90BF1D91,
+ $1DB71064, $6AB020F2, $F3B97148, $84BE41DE,
+ $1ADAD47D, $6DDDE4EB, $F4D4B551, $83D385C7,
+ $136C9856, $646BA8C0, $FD62F97A, $8A65C9EC,
+ $14015C4F, $63066CD9, $FA0F3D63, $8D080DF5,
+ $3B6E20C8, $4C69105E, $D56041E4, $A2677172,
+ $3C03E4D1, $4B04D447, $D20D85FD, $A50AB56B,
+ $35B5A8FA, $42B2986C, $DBBBC9D6, $ACBCF940,
+ $32D86CE3, $45DF5C75, $DCD60DCF, $ABD13D59,
+ $26D930AC, $51DE003A, $C8D75180, $BFD06116,
+ $21B4F4B5, $56B3C423, $CFBA9599, $B8BDA50F,
+ $2802B89E, $5F058808, $C60CD9B2, $B10BE924,
+ $2F6F7C87, $58684C11, $C1611DAB, $B6662D3D,
+ $76DC4190, $01DB7106, $98D220BC, $EFD5102A,
+ $71B18589, $06B6B51F, $9FBFE4A5, $E8B8D433,
+ $7807C9A2, $0F00F934, $9609A88E, $E10E9818,
+ $7F6A0DBB, $086D3D2D, $91646C97, $E6635C01,
+ $6B6B51F4, $1C6C6162, $856530D8, $F262004E,
+ $6C0695ED, $1B01A57B, $8208F4C1, $F50FC457,
+ $65B0D9C6, $12B7E950, $8BBEB8EA, $FCB9887C,
+ $62DD1DDF, $15DA2D49, $8CD37CF3, $FBD44C65,
+ $4DB26158, $3AB551CE, $A3BC0074, $D4BB30E2,
+ $4ADFA541, $3DD895D7, $A4D1C46D, $D3D6F4FB,
+ $4369E96A, $346ED9FC, $AD678846, $DA60B8D0,
+ $44042D73, $33031DE5, $AA0A4C5F, $DD0D7CC9,
+ $5005713C, $270241AA, $BE0B1010, $C90C2086,
+ $5768B525, $206F85B3, $B966D409, $CE61E49F,
+ $5EDEF90E, $29D9C998, $B0D09822, $C7D7A8B4,
+ $59B33D17, $2EB40D81, $B7BD5C3B, $C0BA6CAD,
+ $EDB88320, $9ABFB3B6, $03B6E20C, $74B1D29A,
+ $EAD54739, $9DD277AF, $04DB2615, $73DC1683,
+ $E3630B12, $94643B84, $0D6D6A3E, $7A6A5AA8,
+ $E40ECF0B, $9309FF9D, $0A00AE27, $7D079EB1,
+ $F00F9344, $8708A3D2, $1E01F268, $6906C2FE,
+ $F762575D, $806567CB, $196C3671, $6E6B06E7,
+ $FED41B76, $89D32BE0, $10DA7A5A, $67DD4ACC,
+ $F9B9DF6F, $8EBEEFF9, $17B7BE43, $60B08ED5,
+ $D6D6A3E8, $A1D1937E, $38D8C2C4, $4FDFF252,
+ $D1BB67F1, $A6BC5767, $3FB506DD, $48B2364B,
+ $D80D2BDA, $AF0A1B4C, $36034AF6, $41047A60,
+ $DF60EFC3, $A867DF55, $316E8EEF, $4669BE79,
+ $CB61B38C, $BC66831A, $256FD2A0, $5268E236,
+ $CC0C7795, $BB0B4703, $220216B9, $5505262F,
+ $C5BA3BBE, $B2BD0B28, $2BB45A92, $5CB36A04,
+ $C2D7FFA7, $B5D0CF31, $2CD99E8B, $5BDEAE1D,
+ $9B64C2B0, $EC63F226, $756AA39C, $026D930A,
+ $9C0906A9, $EB0E363F, $72076785, $05005713,
+ $95BF4A82, $E2B87A14, $7BB12BAE, $0CB61B38,
+ $92D28E9B, $E5D5BE0D, $7CDCEFB7, $0BDBDF21,
+ $86D3D2D4, $F1D4E242, $68DDB3F8, $1FDA836E,
+ $81BE16CD, $F6B9265B, $6FB077E1, $18B74777,
+ $88085AE6, $FF0F6A70, $66063BCA, $11010B5C,
+ $8F659EFF, $F862AE69, $616BFFD3, $166CCF45,
+ $A00AE278, $D70DD2EE, $4E048354, $3903B3C2,
+ $A7672661, $D06016F7, $4969474D, $3E6E77DB,
+ $AED16A4A, $D9D65ADC, $40DF0B66, $37D83BF0,
+ $A9BCAE53, $DEBB9EC5, $47B2CF7F, $30B5FFE9,
+ $BDBDF21C, $CABAC28A, $53B39330, $24B4A3A6,
+ $BAD03605, $CDD70693, $54DE5729, $23D967BF,
+ $B3667A2E, $C4614AB8, $5D681B02, $2A6F2B94,
+ $B40BBE37, $C30C8EA1, $5A05DF1B, $2D02EF8D
+);
+
+function CRC(S : String):LongInt;
+
+implementation
+
+uses Variants, SysUtils, uDAClasses;
+
+{ TDACDSDataTable }
+
+constructor TDACDSDataTable.Create(aOwner: TComponent);
+begin
+  inherited;
+
+  fClientDataset := TClientDataSet(Dataset);
+  fClientDataset.FetchOnDemand := FALSE;
+  fClientDataset.FilterOptions :=  [foCaseInsensitive];
+end;
+
+procedure TDACDSDataTable.CreateInternalFields(aDataset: TDataset; someFieldDefinitions: TDAFieldCollection);
+begin
+  inherited;
+
+  // Creates the dataset
+  if not MasterLink.Active then begin
+    // This should actually never happen since its mutually exclusive with IndexFieldNames...
+    if (fClientDataset.IndexName<>'') then 
+      fClientDataset.IndexName := '';
+  end;
+
+  fClientDataset.CreateDataSet;
+  //fClientDataset.LogChanges := FALSE;
+  { Unfortunately a bug in the CDS provents us to disable the log.
+    Tables with multiple blob fields behave weird and lose data otherwise.
+    The Issue has been reported to Borland. }
+end;
+
+// CRC routine in ASM.
+// NOTE: This routine strips the signed bit from the CRC.
+// Written and posted on Google by Clifford Hammerschmidt
+// http://www.engr.uvic.ca/~chammers/
+// http://www.ultranet.ca/chcc/
+function CRC(S : String):LongInt;
+var
+ Len,crc : LongInt;
+ K : PChar;
+begin
+ Len := Length(S);
+ K := PChar(S);
+ asm
+  mov       dword ptr [crc],$ffffffff
+@@2:
+  dec   dword ptr [len]
+  cmp   dword ptr [len],$FFFFFFFF
+  je        @@1
+  mov       eax,dword ptr [K]
+  movsx     eax,byte ptr [eax]
+  mov       ecx,dword ptr [crc]
+  sar       ecx,$18
+  xor       eax,ecx
+  and       eax,$000000ff
+  mov       eax,dword ptr [crctable+eax*$4]
+  mov       ecx,dword ptr [crc]
+  shl       ecx,$08
+  xor       eax,ecx
+  mov       dword ptr [crc],eax
+  inc       dword ptr [K]
+  jmp       @@2
+@@1:
+// NOTE: From here on the asm is optional...
+  mov       eax,dword ptr [crc]
+  not       eax
+// Next line strips signed bit...
+  and       eax,$7fffffff
+  mov       dword ptr [crc],eax
+ end;
+
+ Result := crc;
+end;
+
+procedure TDACDSDataTable.DoSort(const FieldNames: array of string; const Directions: array of TDASortDirection);
+const
+  DirectionStr: array[TDASortDirection] of string = ('ASC', 'DESC');
+var
+  ascfields, descfields,
+  idxname: string;
+  i: integer;
+  idx: TIndexDef;
+begin
+  with fClientDataset do begin
+    if (Length(FieldNames) = 0) then begin
+      IndexName := '';
+      Exit;
+    end;
+
+    idxname := '';
+    for i := 0 to Length(FieldNames) - 1 do
+      idxname := idxname + FieldNames[i] + '_' + DirectionStr[Directions[i]];
+
+    idxname := 'IDX'+IntToStr(CRC(idxname));
+
+    idx := TDefCollection(IndexDefs).Find(idxname) as TIndexDef;
+    if (idx = nil) then begin
+      ascfields := '';
+      descfields := '';
+
+      for i := 0 to Length(Directions) - 1 do begin
+        ascfields := ascfields + FieldNames[i] + ';'; //<-- IDX.Fields must include ALL Fieldnames
+        if Directions[i] = sdDescending then
+          descfields := descfields + FieldNames[i] + ';';
+      end;
+
+      idx := fClientDataset.IndexDefs.AddIndexDef;
+      idx.Name := idxname;
+      idx.DescFields := descfields;
+      idx.Fields := ascfields;
+    end;
+
+    IndexName := idxname;
+  end;
+end;
+
+function TDACDSDataTable.GetDatasetClass: TDatasetClass;
+begin
+  result := TDAClientDataset;
+end;
+
+function TDACDSDataTable.GetMasterSource: TDADataSource;
+begin
+  result := fMasterSource;
+end;
+
+procedure TDACDSDataTable.DoAfterCloseDataset;
+begin
+  inherited;
+  fClientDataset.Data := Null;
+end;
+
+function TDACDSDataTable.GetFilter: string;
+begin
+  result := fClientDataset.Filter
+end;
+
+//////////////
+procedure TDACDSDataTable.DoBeforeOpenDataset;
+begin
+  inherited;
+
+  // This helps prevending a design time problem which results in DetailFields being reset
+  // whenever something is wrong or the dataset cannot be open properly
+  // Keep in this orders!!!
+  
+{  fClientDataset.IndexFieldNames := fDetailFields;
+  fClientDataset.MasterFields := fMasterFields;
+  fClientDataset.MasterSource := fMasterSource;}
+end;
+
+procedure TDACDSDataTable.SetMasterSource(const Value: TDADataSource);
+begin
+  fClientDataset.MasterSource := Value;
+  fMasterSource := Value;
+
+  inherited SetMasterSource(Value);
+end;
+
+procedure TDACDSDataTable.SetMasterFields(const Value: string);
+begin
+  fClientDataset.MasterFields := Value;
+
+  inherited;
+  //fMasterFields := Value;
+end;
+
+procedure TDACDSDataTable.SetDetailsFields(const Value: string);
+begin
+  fClientDataset.IndexFieldNames := Value
+  //fDetailFields := Value;
+end;
+
+function TDACDSDataTable.GetDetailFields: string;
+begin
+  result := fClientDataset.IndexFieldNames
+  //result := fDetailFields
+end;
+
+function TDACDSDataTable.GetMasterFields: string;
+begin
+  result := fClientDataset.MasterFields
+  //result := fMasterFields
+end;
+///////////
+
+function TDACDSDataTable.GetFiltered: boolean;
+begin
+  result := fClientDataset.Filtered
+end;
+
+procedure TDACDSDataTable.SetFilter(const Value: string);
+begin
+  fClientDataset.Filter := Value
+end;
+
+procedure TDACDSDataTable.SetFiltered(const Value: boolean);
+begin
+  fClientDataset.Filtered := Value
+end;
+
+function TDACDSDataTable.GetIndexDefs: TIndexDefs;
+begin
+  result := fClientDataset.IndexDefs
+end;
+
+procedure TDACDSDataTable.SetIndexDefs(const Value: TIndexDefs);
+begin
+  fClientDataset.IndexDefs.Assign(Value);
+end;
+
+function TDACDSDataTable.GetIndexName: string;
+begin
+  result := fClientDataset.IndexName
+end;
+
+procedure TDACDSDataTable.SetIndexName(const Value: string);
+begin
+  fClientDataset.IndexName := Value
+end;
+
+function TDACDSDataTable.GetReadOnly: boolean;
+begin
+  result := fClientDataset.ReadOnly
+end;
+
+procedure TDACDSDataTable.SetReadOnly(const Value: boolean);
+begin
+  fClientDataset.ReadOnly := Value
+end;
+
+procedure TDACDSDataTable.CloneCursor(Source: TDADataTable);
+var i: integer;
+begin
+  if Source = nil then Exception.Create('CloneCursor. Source should be specified.');
+  if not (Source is TDACDSDataTable) then Exception.Create('Can''t clone cursor from ' + Source.ClassName);
+  if Active then raise Exception.Create('Datatable is already open');
+
+  try
+    fCloneSource := Source;
+
+    Fields.Clear;
+    Fields.Assign(Source.Fields);
+
+    // Lookup fields are not cloned by the CDS. We must remove them
+    for i := (Fields.Count-1) downto 0 do
+      if Fields[i].Lookup then Fields.Delete(i);
+
+    // Proceeds
+    fClientDataset.CloneCursor(Source.Dataset as TClientDataset, False);
+
+    RecIDField := fClientDataset.FieldByName(RecIDFieldName) as TIntegerField;
+    RecIDField.Visible := FALSE;
+
+    Fields.Bind(fClientDataset);
+
+    // Prepares the delta
+    Delta := Source.Delta;
+
+    // Finishes to prepare the internal dataset (descendant might need additional customization and might not be open)
+    DoBeforeOpenDataset;
+    if not Dataset.Active then Dataset.Open;
+    DoAfterOpenDataset;
+  except
+    // Restores the previous state
+    fCloneSource := NIL;
+    Delta := NIL;
+
+    raise;
+  end;
+end;
+
+procedure TDACDSDataTable.ApplyRange;
+begin
+  fClientDataset.ApplyRange
+end;
+
+procedure TDACDSDataTable.CancelRange;
+begin
+  fClientDataset.CancelRange
+end;
+
+procedure TDACDSDataTable.EditRangeEnd;
+begin
+  fClientDataset.EditRangeEnd
+end;
+
+procedure TDACDSDataTable.EditRangeStart;
+begin
+  fClientDataset.EditRangeStart
+end;
+
+procedure TDACDSDataTable.SetRange(const StartValues,
+  EndValues: array of const);
+begin
+  fClientDataset.SetRange(StartValues, EndValues);
+end;
+
+procedure TDACDSDataTable.SetRangeEnd;
+begin
+  fClientDataset.SetRangeEnd
+end;
+
+procedure TDACDSDataTable.SetRangeStart;
+begin
+  fClientDataset.SetRangeStart
+end;
+
+procedure TDACDSDataTable.NativeLoadFromFile(const aFileName: string);
+var fs : TFileStream;
+begin
+  fs := TFileStream.Create(aFileName, fmOpenRead+fmShareDenyWrite);
+  try
+    NativeLoadFromStream(fs);
+  finally
+    fs.Free;
+  end;
+end;
+
+procedure TDACDSDataTable.NativeSaveToFile(const aFileName: string;
+  DataFormat: TDANativeDataFormat);
+var fs : TFileStream;
+begin
+  fs := TFileStream.Create(aFileName, fmCreate);
+  try
+    NativeSaveToStream(fs, DataFormat);
+  finally
+    fs.Free;
+  end;
+end;
+
+procedure TDACDSDataTable.NativeLoadFromStream(aStream : TStream);
+var oldrf : boolean;
+    ls : TDASchema;
+begin
+  oldrf := RemoteFetchEnabled;
+  ls := LocalSchema;
+  try
+    RemoteFetchEnabled := FALSE;
+    ls := NIL;
+
+    if not Active then Active := TRUE
+    else if DeltaInitialized  then Delta.Clear;
+
+    fClientDataset.LoadFromStream(aStream);
+  finally
+    RemoteFetchEnabled := oldrf;
+    LocalSchema := ls;
+  end;
+end;
+
+procedure TDACDSDataTable.NativeSaveToStream(aStream : TStream;
+  DataFormat: TDANativeDataFormat);
+begin
+  fClientDataset.SaveToStream(aStream, DAFormatToCDSFormat[DataFormat]);
+end;
+
+procedure TDACDSDataTable.DisableConstraints;
+begin
+  fWasReadonly := ReadOnly;
+  ReadOnly := False;
+  fClientDataset.DisableConstraints;
+end;
+
+procedure TDACDSDataTable.EnableConstraints;
+begin
+  fClientDataset.EnableConstraints;
+  ReadOnly := fWasReadonly;
+end;
+
+procedure TDACDSDataTable.FindNearest(const KeyValues: array of const);
+begin
+  fClientDataset.FindNearest(KeyValues);
+end;
+
+
+function TDACDSDataTable.intDATypeToVCLType(
+  aDAType: TDADataType): TFieldType;
+begin
+  if aDAType = datCurrency then
+   Result:= ftCurrency
+  else 
+    Result := inherited intDATypeToVCLType(aDAType);
+end;
+
+{ TDAClientdataset }
+
+procedure TDAClientdataset.DataEvent(Event: TDataEvent; Info: Integer);
+begin
+  if FLocateRecordMode and (Event = deCheckBrowseMode) and (Info = 0) and (Self.State = dsBrowse) then
+    // nothing
+  else
+    inherited;
+end;
+
+function TDAClientdataset.GetActive: boolean;
+begin
+  result := inherited Active;
+end;
+
+function TDAClientdataset.GetDataTable: TDADataTable;
+begin
+  result := TDADataTable(Owner);
+end;
+{$IFDEF DELPHI7UP}
+procedure TDAClientdataset.GetFieldNames(List: TStrings);
+var
+  i: Integer;
+begin
+  if (not inherited Active) then
+  begin
+    for i := 0 to TDADataTable(Owner).FieldCount -1 do
+      List.Add(TDADataTable(Owner).Fields[i].Name);
+    exit;
+  end;
+{$IFDEF DELPHI10UP}{$WARN SYMBOL_DEPRECATED OFF}{$ENDIF}
+  inherited GetFieldNames(List);
+{$IFDEF DELPHI10UP}{$WARN SYMBOL_DEPRECATED ON}{$ENDIF}
+end;
+{$ENDIF}
+
+function TDAClientdataset.GetStateFieldValue(State: TDataSetState;
+  Field: TField): Variant;
+begin
+  if (State = dsOldValue) and (Self.State in [dsEdit, dsInsert]) then
+    Result := TDACDSDataTable(Owner).fOldValues[Field.Index]
+  else
+    result := Inherited GetStateFieldValue(State, Field);
+end;
+
+procedure TDAClientdataset.InternalRefresh;
+begin
+  // Does nothing
+end;
+
+function TDAClientdataset.Locate(const KeyFields: string;
+  const KeyValues: Variant; Options: TLocateOptions): Boolean;
+begin
+  FLocateRecordMode:=True;
+  try
+    Result := inherited Locate(KeyFields,KeyValues,Options);
+  finally
+    FLocateRecordMode:= False;
+  end;
+end;
+
+function TDAClientdataset.Lookup(const KeyFields: string;
+  const KeyValues: Variant; const ResultFields: string): Variant;
+begin
+  FLocateRecordMode:=True;
+  try
+    Result := inherited Lookup(KeyFields, KeyValues, ResultFields);
+  finally
+    FLocateRecordMode:= False;
+  end;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDACache.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDACache.pas
new file mode 100644
index 0000000..6501789
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDACache.pas	
@@ -0,0 +1,425 @@
+unit uDACache;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  Classes, SysUtils, SyncObjs,
+  uROClasses, uROTypes, uDAInterfaces;
+
+type
+  { TDACacheElement }
+  TDACacheElementOption = (ceoFlushOnUpdate);
+  TDACacheElementOptions = set of TDACacheElementOption;
+
+  TDACacheElement = class(TCollectionItem)
+  private
+    fEnabled: boolean;
+    fMaxReads: integer;
+    fReferencedDataset: string;
+    fOptions: TDACacheElementOptions;
+    fDuration: integer;
+    procedure SetDuration(const Value: integer);
+    procedure SetMaxReads(const Value: integer);
+
+  protected
+    function GetDisplayName: string; override;
+
+  public
+    constructor Create(aCollection : TCollection); override;
+
+  published
+    property ReferencedDataset : string read fReferencedDataset write fReferencedDataset;
+    property Enabled : boolean read fEnabled write fEnabled;
+    property Options : TDACacheElementOptions read fOptions write fOptions;
+    property MaxReads : integer read fMaxReads write SetMaxReads;
+    property Duration : integer read fDuration write SetDuration;
+  end;
+
+  { TDACacheElementCollection  }
+  TDACacheElementCollection = class(TCollection)
+  private
+    function GetItems(Index: integer): TDACacheElement;
+  protected
+  public
+    constructor Create;
+    destructor Destroy; override;
+
+    function Add : TDACacheElement;
+    function FindByDatasetName(aDatasetName : string) : TDACacheElement;
+
+    property Items[Index : integer] : TDACacheElement read GetItems; default;
+  end;
+
+  { IDACacheEntry }
+  IDACacheEntry = interface
+  ['{87F5AFF3-590C-4749-A3D7-BD4F8B2D5166}']
+    function GetInvalid: boolean;
+    function GetData: TStream;
+    function GetExpirationTime: TDateTime;
+    function GetMaxReads: integer;
+    function GetName: string;
+    function GetOwnsStream: boolean;
+    function GetReadCount: integer;
+    function GetRecordCount: integer;
+    procedure SetReadCount(const Value: integer);
+
+    property Name : string read GetName;
+    property Data : TStream read GetData;
+    property ReadCount : integer read GetReadCount write SetReadCount;
+
+    property RecordCount : integer read GetRecordCount;
+
+    property ExpirationTime : TDateTime read GetExpirationTime;
+
+    property MaxReads : integer read GetMaxReads;
+    property OwnsStream : boolean read GetOwnsStream;
+    property Invalid : boolean read GetInvalid;
+ end;
+
+  { TDACacheEntry }
+  TDACacheEntry = class(TInterfacedObject, IDACacheEntry)
+  private
+    fOwnsStream : boolean;
+    fData: TStream;
+    fMaxReads: integer;
+    fReadCount: integer;
+    fName: string;
+    fExpirationTime: TDateTime;
+    fRecordCount: integer;
+
+  protected
+    { IDACacheEntry }
+    function GetInvalid: boolean;
+    function GetData: TStream;
+    function GetExpirationTime: TDateTime;
+    function GetMaxReads: integer;
+    function GetName: string;
+    function GetOwnsStream: boolean;
+    function GetReadCount: integer;
+    function GetRecordCount: integer;
+    procedure SetReadCount(const Value: integer);
+
+  public
+    constructor Create(const aName : string; aData : TStream; aRecordCount : integer;
+                       aOwnsStream : boolean; aMaxReads : integer = -1; aDuration : integer = -1);
+    destructor Destroy; override;
+  end;
+
+  { TDACache }
+  TDACache = class(TComponent)
+  private
+    fTimer : TROThreadTimer;
+    fEntries : TInterfaceList;
+    fCritical : TCriticalSection;
+
+    function GetEntries(Index: integer): IDACacheEntry;
+    function GetEntryCount: integer;
+
+  protected
+    procedure OnTimerTick(CurrentTickCount : cardinal);
+
+  public
+    constructor Create(aOwner : TComponent); override;
+    destructor Destroy; override;
+
+    procedure Store(const anEntryName : string; Data : TStream;
+                    CopyStream : boolean; RecordCount : integer = -1;
+                    MaxReads : integer = -1; Duration : integer = -1);
+    function Get(const anEntryName : string) : IDACacheEntry;
+    procedure Flush(const anEntryName : string);
+
+    function Find(const anEntryName : string) : integer;
+
+    property Entries[Index : integer] : IDACacheEntry read GetEntries;
+    property EntryCount : integer read GetEntryCount;
+
+  end;
+
+implementation
+
+uses
+  DateUtils;
+
+{ TDACacheElementCollection }
+
+function TDACacheElementCollection.Add: TDACacheElement;
+begin
+  result := TDACacheElement(inherited Add);
+end;
+
+constructor TDACacheElementCollection.Create;
+begin
+  inherited Create(TDACacheElement);
+end;
+
+destructor TDACacheElementCollection.Destroy;
+begin
+
+  inherited;
+end;
+
+function TDACacheElementCollection.FindByDatasetName(
+  aDatasetName: string): TDACacheElement;
+var i : integer;
+begin
+  result := NIL;
+
+  for i := 0 to (Count-1) do
+    if SameText(Items[i].ReferencedDataset, aDatasetName) then begin
+      result := Items[i];
+      Exit;
+    end;
+end;
+
+function TDACacheElementCollection.GetItems(
+  Index: integer): TDACacheElement;
+begin
+  result := TDACacheElement(inherited Items[Index]);
+end;
+
+{ TDACacheElement }
+
+constructor TDACacheElement.Create(aCollection: TCollection);
+begin
+  inherited;
+
+  fEnabled := TRUE;
+  fMaxReads := -1;
+  fDuration := -1;
+  fOptions := [ceoFlushOnUpdate];
+end;
+
+function TDACacheElement.GetDisplayName: string;
+begin
+  if fReferencedDataset<>''
+    then result := fReferencedDataset
+    else result := '<Unassigned>'
+end;
+
+procedure TDACacheElement.SetDuration(const Value: integer);
+begin
+  if (Value=-1) or (Value>0)
+    then fDuration := Value;
+end;
+
+procedure TDACacheElement.SetMaxReads(const Value: integer);
+begin
+  if (Value=-1) or (Value>0)
+    then fMaxReads := Value;
+end;
+
+{ TDACache }
+
+constructor TDACache.Create(aOwner: TComponent);
+begin
+  inherited;
+
+  fTimer := TROThreadTimer.Create(OnTimerTick, 60); // Checks every minute
+
+  fCritical := TCriticalSection.Create;
+  fEntries := TInterfaceList.Create;
+end;
+
+destructor TDACache.Destroy;
+begin
+  fTimer.Terminate;
+  fTimer.Free;
+
+  fEntries.Free;
+  fCritical.Free;
+
+  inherited;
+end;
+
+function TDACache.Find(const anEntryName: string): integer;
+var i : integer;
+begin
+  result := -1;
+  for i := 0 to (fEntries.Count-1) do
+    if SameText(Entries[i].Name, anEntryName) then begin
+      result := i;
+      Exit;
+    end;
+end;
+
+procedure TDACache.Flush(const anEntryName: string);
+var idx : integer;
+begin
+  fCritical.Enter;
+  try
+    idx := Find(anEntryName);
+    if (idx>=0)
+      then fEntries.Delete(idx);
+  finally
+    fCritical.Leave;
+  end;
+end;
+
+function TDACache.Get(const anEntryName: string): IDACacheEntry;
+var idx : integer;
+begin
+  result := NIL;
+  fCritical.Enter;
+  try
+    idx := Find(anEntryName);
+    if (idx>=0) then begin
+      result := Entries[idx];
+
+      if result.Invalid then begin
+        result := NIL;
+        fEntries.Delete(idx);
+        Exit;
+      end
+      else begin
+        result.ReadCount := result.ReadCount+1;
+      end;
+    end;
+  finally
+    fCritical.Leave;
+  end;
+end;
+
+function TDACache.GetEntries(Index: integer): IDACacheEntry;
+begin
+  result := fEntries[Index] as IDACacheEntry;
+end;
+
+function TDACache.GetEntryCount: integer;
+begin
+  result := fEntries.Count;
+end;
+
+procedure TDACache.OnTimerTick(CurrentTickCount: cardinal);
+var i : integer;
+begin
+  fCritical.Enter;
+  try
+    for i := fEntries.Count-1 downto 0 do begin
+      if Entries[i].Invalid
+        then fEntries.Delete(i);
+    end;
+  finally
+    fCritical.Leave;
+  end;
+end;
+
+procedure TDACache.Store(const anEntryName: string; Data: TStream; CopyStream : boolean;
+  RecordCount, MaxReads, Duration: integer);
+var entry : TDACacheEntry;
+    nme : string;
+    idx : integer;
+    newstream : Binary;
+begin
+  nme := UpperCase(anEntryName);
+
+  fCritical.Enter;
+  try
+    idx := Find(nme);
+
+    if (idx<0) then begin
+      if CopyStream then begin
+        newstream := Binary.Create;
+        newstream.CopyFrom(Data, 0);
+        entry := TDACacheEntry.Create(nme, newstream, RecordCount, TRUE, MaxReads, Duration);
+      end
+      else entry := TDACacheEntry.Create(nme, Data, RecordCount, FALSE, MaxReads, Duration);
+
+      fEntries.Add(entry);
+    end
+    else raise Exception.Create('Duplicated name '+anEntryName);
+  finally
+    fCritical.Leave;
+  end;
+end;
+
+{ TDACacheEntry }
+
+constructor TDACacheEntry.Create(const aName : string; aData : TStream; aRecordCount : integer;
+                       aOwnsStream : boolean; aMaxReads : integer = -1; aDuration : integer = -1);
+begin
+  inherited Create;
+
+  fName := aName;
+  fData := aData;
+  fRecordCount := aRecordCount;
+
+  if (aDuration>0)
+    then fExpirationTime := IncMinute(Now, aDuration)
+    else fExpirationTime := -1;
+
+  fReadCount := 0;
+  fMaxReads := aMaxReads;
+end;
+
+destructor TDACacheEntry.Destroy;
+begin
+  if fOwnsStream
+    then fData.Free;
+
+  inherited;
+end;
+
+function TDACacheEntry.GetData: TStream;
+begin
+  result := fData;
+  //Inc(fReadCount);
+end;
+
+function TDACacheEntry.GetExpirationTime: TDateTime;
+begin
+  result := fExpirationTime
+end;
+
+function TDACacheEntry.GetInvalid: boolean;
+begin
+  result := ((fMaxReads<>-1) and (fReadCount>=fMaxReads))
+            or
+            ((fExpirationTime<>-1) and (fExpirationTime<=Now));
+end;
+
+function TDACacheEntry.GetMaxReads: integer;
+begin
+  result := fMaxReads
+end;
+
+function TDACacheEntry.GetName: string;
+begin
+  result := fName
+end;
+
+function TDACacheEntry.GetOwnsStream: boolean;
+begin
+  result := fOwnsStream
+end;
+
+function TDACacheEntry.GetReadCount: integer;
+begin
+  result := fReadCount
+end;
+
+function TDACacheEntry.GetRecordCount: integer;
+begin
+  result := fRecordCount
+end;
+
+procedure TDACacheEntry.SetReadCount(const Value: integer);
+begin
+  if (Value>=0)
+    then fReadCount := Value
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAClasses.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAClasses.pas
new file mode 100644
index 0000000..fd5a2cc
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAClasses.pas	
@@ -0,0 +1,1634 @@
+unit uDAClasses;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  {$IFDEF MSWINDOWS} Windows,{$ENDIF}
+  Classes, SysUtils, uROClasses, uDAInterfaces, uDARes, uROTypes,
+  uDADriverManager, uDAXMLUtils, SyncObjs, uROXMLIntf;
+
+type
+  TDAPoolBehaviour = (pbWait, pbRaiseError, pbIgnoreAndReturn);
+  TDAPoolTransactionBehaviour = (ptNone, ptRollback, ptCommit, ptCustom);
+
+const
+  def_PoolingEnabled = TRUE;
+  def_PoolBehaviour = pbWait;
+  def_MaxPoolSize = 10;
+  def_WaitIntervalSeconds = 1;
+  def_PoolTimeoutSeconds = 60;
+
+  def_SourceTableFieldName = '@SourceTable';
+
+type
+  { Forwards }
+  TDAConnectionManager = class;
+  TDADataDictionary = class;
+
+  { TStreamableComponent }
+  TPointerArray = array of pointer;
+
+  TDAStreamableComponent = class(TComponent)
+  private
+    fTempPropertiesSaved: boolean;
+    fTempStorage: TPointerArray;
+
+  protected
+    procedure SaveNonStreamableProperties(var TempStorage: TPointerArray); virtual;
+    procedure RestoreNonStreamableProperties(const TempStorage: TPointerArray); virtual;
+
+  public
+    procedure Clear; virtual;
+
+    procedure LoadFromStream(aStream: TStream; aFormat: TDAPersistFormat=pfXML); virtual;
+    procedure LoadFromXml(aXML: string);
+    procedure SaveToStream(aStream: TStream; aFormat: TDAPersistFormat=pfXML); virtual;
+    procedure LoadFromFile(const aFileName: string; aFormat: TDAPersistFormat=pfXML);
+    procedure SaveToFile(const aFileName: string; aFormat: TDAPersistFormat=pfXML);
+  end;
+
+  { TDAConnectionManager }
+  TDAConnectionNotifyEvent = procedure(Sender: TDAConnectionManager; const Connection: IDAConnection) of object;
+  TDAConnectionFailureEvent = procedure(Sender: TDAConnectionManager; Ex: Exception) of object;
+  TDAConnectionTimeoutEvent = procedure(Sender: TDAConnectionManager) of object;
+  TDAUnknownMacroVariableEvent = procedure (Sender: TObject; const Name: string; var Value: string) of object;
+
+  TDAConnectionManager = class(TDAStreamableComponent, IDAConnectionManager, IDAConnectionPool)
+  private
+    fConnections: TDAConnectionCollection;
+    fDriverManager: TDADriverManager;
+    fConnectionWait: TROEvent;
+
+    fMaxPoolSize: Cardinal;
+    fTotalConnections: Integer;
+    fConnectionCache: TThreadList;
+    fPoolTimeoutSeconds: cardinal;
+    fTimer: TROThreadTimer;
+    fOnConnectionReleased: TDAConnectionNotifyEvent;
+    fOnConnectionTimedOut: TDAConnectionTimeoutEvent;
+    fPoolBehaviour: TDAPoolBehaviour;
+    fOnConnectionAcquired: TDAConnectionNotifyEvent;
+    fWaitIntervalSeconds: cardinal;
+    fPoolingEnabled: boolean;
+    fOnConnectionCreated: TDAConnectionNotifyEvent;
+    FOnConnectionFailure: TDAConnectionFailureEvent;
+    fPoolTransactionBehaviour: TDAPoolTransactionBehaviour;
+    fOnUnknownMacroVariable: TDAUnknownMacroVariableEvent;
+    fOnCustomPoolTransactionBehavior: TDAConnectionNotifyEvent;
+
+    procedure SetMaxPoolSize(const Value: cardinal);
+    procedure SetPoolTimeoutSeconds(const Value: cardinal);
+
+    procedure SetConnections(const Value: TDAConnectionCollection);
+    procedure SetDriverManager(const Value: TDADriverManager);
+    procedure SetPoolingEnabled(const Value: boolean);
+    function UnknownMacroIdentifier(Sender: TObject; const Name, OrgName: string; var Value: string): Boolean;
+  protected
+    procedure Loaded; override;
+    procedure OnTimerTick(CurrentTickCount: cardinal); dynamic;
+
+    function CreateNewConnection(const ConnectionName: string;
+      OpenConnection: boolean = TRUE;
+      const UserID: string = '';
+      const Password: string = ''): IDAConnection;
+
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+    procedure SaveNonStreamableProperties(var TempStorage: TPointerArray); override;
+    procedure RestoreNonStreamableProperties(const TempStorage: TPointerArray); override;
+
+    procedure ReleaseConnection(const Conn: IDAConnection);
+  public
+    constructor Create(aOwner: TComponent); override;
+    destructor Destroy; override;
+
+    procedure LoadFromStream(aStream: TStream; aFormat: TDAPersistFormat=pfXML); override;
+    procedure SaveToStream(aStream: TStream; aFormat: TDAPersistFormat=pfXML); override;
+
+    // IDAConnectionManager
+    function GetDefaultConnectionName: string;
+    function NewConnection(const aConnectionName: string;
+      OpenConnection: boolean = TRUE;
+      const UserID: string = '';
+      const Password: string = ''): IDAConnection;
+
+    procedure Clear; override;
+
+    property PoolSize: Integer read fTotalConnections;
+    procedure ClearPool;
+    procedure CheckProperties;
+  published
+    property MaxPoolSize: cardinal read fMaxPoolSize write SetMaxPoolSize default def_MaxPoolSize;
+    property PoolTimeoutSeconds: cardinal read fPoolTimeoutSeconds write SetPoolTimeoutSeconds default def_PoolTimeoutSeconds;
+    property PoolBehaviour: TDAPoolBehaviour read fPoolBehaviour write fPoolBehaviour default def_PoolBehaviour;
+
+    property OnConnectionAcquired: TDAConnectionNotifyEvent read fOnConnectionAcquired write fOnConnectionAcquired;
+    property OnConnectionTimedOut: TDAConnectionTimeoutEvent read fOnConnectionTimedOut write fOnConnectionTimedOut;
+    property OnConnectionCreated: TDAConnectionNotifyEvent read fOnConnectionCreated write fOnConnectionCreated;
+    property OnConnectionFailure: TDAConnectionFailureEvent read FOnConnectionFailure write FOnConnectionFailure;
+    property OnConnectionReleased: TDAConnectionNotifyEvent read fOnConnectionReleased write fOnConnectionReleased;
+    property OnCustomPoolTransactionBehavior: TDAConnectionNotifyEvent read fOnCustomPoolTransactionBehavior write fOnCustomPoolTransactionBehavior;
+    property OnUnknownMacroVariable: TDAUnknownMacroVariableEvent read fOnUnknownMacroVariable write fOnUnknownMacroVariable;
+
+    property WaitIntervalSeconds: cardinal read fWaitIntervalSeconds write fWaitIntervalSeconds default def_WaitIntervalSeconds;
+
+    property Connections: TDAConnectionCollection read fConnections write SetConnections;
+    property DriverManager: TDADriverManager read fDriverManager write SetDriverManager;
+
+    property PoolingEnabled: boolean read fPoolingEnabled write SetPoolingEnabled;
+    property PoolTransactionBehaviour: TDAPoolTransactionBehaviour read fPoolTransactionBehaviour write fPoolTransactionBehaviour default ptNone;
+  end;
+
+  { TDADataDictionary }
+  TDADataDictionary = class(TDAStreamableComponent, IDADataDictionary)
+  private
+    fFields: TDADataDictionaryFieldCollection;
+    procedure SetFields(const Value: TDADataDictionaryFieldCollection);
+    function GetFields: TDADataDictionaryFieldCollection;
+  protected
+    procedure SaveNonStreamableProperties(var TempStorage: TPointerArray); override;
+    procedure RestoreNonStreamableProperties(const TempStorage: TPointerArray); override;
+  public
+    constructor Create(aOwner: TComponent); override;
+    destructor Destroy; override;
+  published
+    property Fields: TDADataDictionaryFieldCollection read GetFields write SetFields;
+  end;
+
+  TDADiagrams = class(TComponent)
+  private
+    fDiagramData: string;
+    procedure ReadDiagramData(Reader: TReader);
+    procedure WriteDiagramData(Writer: TWriter);
+  protected
+    procedure DefineProperties(Filer: TFiler); override;
+  public
+    procedure LoadFromFile(const aFilename: string);
+    procedure SaveToFile(const aFilename: string);
+  end;
+
+  { TDASchema }
+  TDASchema = class;
+
+  TDASchemaElementType = (setDataset, setCommand);
+  TDAOnGetSQLEvent = procedure(Sender : TDASchema; const ElementName : string; ElementType : TDASchemaElementType; var SQL : string) of object;
+
+  TDASchema = class(TDAStreamableComponent, IDASchema, IDAHasDataDictionary)
+  private
+    fDatasets: TDADatasetCollection;
+    fJoinDataTables: TDAJoinDataTableCollection;
+    fUnionDataTables: TDAUnionDataTableCollection;
+    fCommands: TDASQLCommandCollection;
+    fConnectionManager: TDAConnectionManager;
+    fDataDictionary: TDADataDictionary;
+    fOnGetSQL: TDAOnGetSQLEvent;
+    fUpdateRules: TDAUpdateRuleCollection;
+    fRelationShips: TDADatasetRelationshipCollection;
+    fDiagrams: TDADiagrams;
+    fCustomAttributes: TStrings;
+    fVersion: Integer;
+    fMergeDataDictionaries: Boolean;
+
+    procedure SetConnectionManager(const Value: TDAConnectionManager);
+    procedure SetDataDictionary(const Value: TDADataDictionary);
+    procedure SetUpdateRules(const Value: TDAUpdateRuleCollection);
+    procedure SetRelationShips(const Value: TDADatasetRelationshipCollection);
+    procedure SetDiagrams(const Value: TDADiagrams);
+
+    function DoNewDataset(
+      const aConnection: IDAConnection;
+      const aName: string;
+      aDynSelectFields: array of string;
+      aWhereClause: WideString;
+      aStatementName: string='';
+      OpenIt: boolean = false;
+      AlwaysGenerateDynamicWhereStatement: Boolean=False;
+      anUnionMapping: TDAColumnMappingCollection = nil
+    ): IDADataset;
+
+
+  protected
+    function GetDataDictionary: IDADataDictionary;
+    function MergeDataDictionaries: Boolean;
+    function GetCommands: TDASQLCommandCollection; virtual;
+    function GetDatasets: TDADatasetCollection; virtual;
+    function GetJoinDataTables: TDAJoinDataTableCollection; virtual;
+    function GetUnionDataTables: TDAUnionDataTableCollection; virtual;
+    procedure SetCommands(const Value: TDASQLCommandCollection); virtual;
+    procedure SetDatasets(const Value: TDADatasetCollection); virtual;
+    procedure SetJoinDataTables(const Value: TDAJoinDataTableCollection); virtual;
+    procedure SetUnionDataTables(const Value: TDAUnionDataTableCollection); virtual;
+
+    procedure Notification(aComponent: TComponent; Operation: TOperation); override;
+    procedure Loaded; override;
+
+    procedure SaveNonStreamableProperties(var TempStorage: TPointerArray); override;
+    procedure RestoreNonStreamableProperties(const TempStorage: TPointerArray); override;
+
+  public
+    constructor Create(aOwner: TComponent); override;
+    destructor Destroy; override;
+
+    function FindCommandStatement(const aConnection: IDAConnection; aSQLCommand: TDASQLCommand; aStatementName: string=''): TDAStatement;
+    // IDASchema
+    function GetDatasetText(const aConnection: IDAConnection; const aName: string): string; virtual;
+    function GetCommandText(const aConnection: IDAConnection; const aName: string): string; virtual;
+
+    function NewDataset(const aConnection: IDAConnection; const aName: string;
+      aStatementName: string='';OpenIt: boolean = false): IDADataset; overload; virtual;
+    function NewDataset(const aConnection: IDAConnection; const aName: string;
+      const ParamNames: array of string;
+      const ParamValues: array of Variant;
+      OpenIt: boolean = TRUE;
+      aStatementName: string=''): IDADataset; overload;
+    function NewDataset(const aConnection: IDAConnection; const aName: string;
+      aDynSelectFields: array of string;
+      aWhereClause: WideString;
+      aStatementName: string='';
+      OpenIt: boolean = false;
+      AlwaysGenerateDynamicWhereStatement: Boolean=False): IDADataset; overload;
+    function NewDataset(
+      const aConnection: IDAConnection;
+      const aName: string;
+      const ParamNames: array of string;
+      const ParamValues: array of Variant;
+      aDynSelectFields: array of string;
+      aWhereClause: WideString;
+      OpenIt: boolean = TRUE;
+      aStatementName: string=''): IDADataset; overload;
+
+    function NewUnionItemDataset(
+      const aConnection: IDAConnection;
+      const aName: string;
+      const ParamNames: array of string;
+      const ParamValues: array of Variant;
+      aDynSelectFields: array of string;
+      aWhereClause: WideString;
+      anUnionMapping: TDAColumnMappingCollection): IDADataset;
+
+    function NewCommand(const aConnection: IDAConnection; const aName: string;
+      aStatementName: string=''): IDASQLCommand; overload; virtual;
+    function NewCommand(const aConnection: IDAConnection; const aName: string;
+      const ParamNames: array of string;
+      const ParamValues: array of Variant;
+      ExecuteIt: boolean = TRUE; aStatementName: string=''): IDASQLCommand; overload;
+
+    procedure Clear; override;
+
+    procedure Copy(aSourceSchema : TDASchema;
+                   DatasetNames : array of string;
+                   CommandNames : array of string;
+                   UpdateRuleNames : array of string;
+                   RelationShipNames : array of string); overload;
+
+    procedure Copy(aSourceSchema : TDASchema;
+                   IncludeDatasets : boolean = TRUE;
+                   IncludeCommands : boolean = TRUE;
+                   IncludeUpdateRules : boolean = TRUE;
+                   IncludeRelationShips : boolean = TRUE); overload;
+    procedure CheckProperties;
+    function FindDataset(aDatasetName: String): TDADataset;
+    procedure SaveToStream(aStream: TStream;
+      aFormat: TDAPersistFormat = pfXML); override;
+  published
+    property ConnectionManager: TDAConnectionManager read fConnectionManager write SetConnectionManager;
+    property DataDictionary: TDADataDictionary read fDataDictionary write SetDataDictionary;
+    property Diagrams: TDADiagrams read fDiagrams write SetDiagrams;
+    property Datasets: TDADatasetCollection read GetDatasets write SetDatasets;
+    property JoinDataTables: TDAJoinDataTableCollection read GetJoinDataTables write SetJoinDataTables;
+    property UnionDataTables: TDAUnionDataTableCollection read GetUnionDataTables write SetUnionDataTables;
+    property Commands: TDASQLCommandCollection read GetCommands write SetCommands;
+    property RelationShips: TDADatasetRelationshipCollection read fRelationShips write SetRelationShips;
+    property UpdateRules : TDAUpdateRuleCollection read fUpdateRules write SetUpdateRules;
+
+    property OnGetSQL : TDAOnGetSQLEvent read fOnGetSQL write fOnGetSQL;
+    property Version : Integer read fVersion write fVersion;
+    property CustomAttributes : TStrings read fCustomAttributes;
+  end;
+
+procedure FillROStruct(const aDataset: IDADataset; const aStruct: TROComplexType);
+
+implementation
+
+uses TypInfo, uDAEngine, uDAUtils, DB, uDAMemDataTable, uDAWhere;
+
+procedure FillROStruct(const aDataset: IDADataset; const aStruct: TROComplexType);
+var
+  proplist: TStringList;
+  i: integer;
+  fld: TDACustomField;
+begin
+  proplist := TStringList.Create;
+  try
+    aStruct.GetFieldNames(proplist);
+    for i := 0 to (proplist.Count - 1) do begin
+      fld := aDataset.Fields.FindField(proplist[i]);
+      if (fld <> nil) then aStruct.SetFieldValue(proplist[i], fld.Value);
+    end;
+  finally
+    proplist.Free;
+  end;
+end;
+
+{ TDAStreamableComponent }
+
+procedure TDAStreamableComponent.LoadFromStream(aStream: TStream; aFormat: TDAPersistFormat);
+var
+  oldname: string;
+begin
+  Clear;
+
+  oldname := Name;
+  try Name := ''; except end;
+  try
+    case aFormat of
+      pfBinary: aStream.ReadComponent(Self);
+      pfXML: LoadObjectFromStream(aStream, Self, ['Name']);
+    end;
+
+    if fTempPropertiesSaved then begin
+      RestoreNonStreamableProperties(fTempStorage);
+      SetLength(fTempStorage, 0);
+    end;
+  finally
+    fTempPropertiesSaved := FALSE;
+    try Name := oldname; except end;
+  end;
+end;
+
+procedure TDAStreamableComponent.LoadFromXml(aXML: string);
+var lStream:TStringStream;
+begin
+  lStream := TStringStream.Create(aXML);
+  try
+    lStream.Seek(0,soFromBeginning);
+    LoadFromStream(lStream,pfXML);
+  finally
+    lStream.Free();
+  end;
+end;
+
+procedure TDAStreamableComponent.SaveToStream(aStream: TStream; aFormat: TDAPersistFormat);
+var
+  oldname: string;
+begin
+  fTempPropertiesSaved := TRUE;
+
+  oldname := Name;
+  //Name := '';
+  try
+    try
+      SaveNonStreamableProperties(fTempStorage);
+
+      case aFormat of
+        pfBinary: aStream.WriteComponent(Self);
+        pfXML: SaveObjectToStream(Self, aStream, ['Name']);
+      end;
+    finally
+      Name := oldname;
+    end;
+  except
+    fTempPropertiesSaved := FALSE;
+    raise;
+  end;
+end;
+
+procedure TDAStreamableComponent.SaveToFile(const aFileName: string;
+  aFormat: TDAPersistFormat);
+var
+  fs: TFileStream;
+begin
+  fs := TFileStream.Create(aFileName, fmCreate);
+  try
+    SaveToStream(fs, aFormat);
+  finally
+    fs.Free;
+  end;
+end;
+
+procedure TDAStreamableComponent.LoadFromFile(const aFileName: string;
+  aFormat: TDAPersistFormat);
+var
+  fs: TFileStream;
+begin
+  fs := TFileStream.Create(aFileName, fmOpenRead);
+  try
+    LoadFromStream(fs, aFormat);
+  finally
+    fs.Free;
+  end;
+end;
+
+procedure TDAStreamableComponent.RestoreNonStreamableProperties(
+  const TempStorage: TPointerArray);
+begin
+end;
+
+procedure TDAStreamableComponent.SaveNonStreamableProperties(
+  var TempStorage: TPointerArray);
+begin
+
+end;
+
+procedure TDAStreamableComponent.Clear;
+begin
+end;
+
+type
+  TCachedConnection = class
+  private
+    fConnection: IDAConnection;
+    fLastUse: TDateTime;
+  public
+    constructor Create(const aConnection: IDAConnection);
+    property Connection: IDAConnection read fConnection write fConnection;
+    property LastUse: TDateTime read fLastUse write fLastUse;
+  end;
+
+constructor TCachedConnection.Create(const aConnection: IDAConnection);
+begin
+  inherited Create;
+  fConnection := aConnection;
+  fLastUse := Now;
+end;
+
+{ TDAConnectionManager }
+
+constructor TDAConnectionManager.Create(aOwner: TComponent);
+begin
+  inherited;
+  fConnectionWait := TROEvent.Create(nil, false, false, '');
+
+  fConnections := TDAConnectionCollection.Create(Self);
+
+  fPoolingEnabled := def_PoolingEnabled;
+  fPoolBehaviour := def_PoolBehaviour;
+  fMaxPoolSize := def_MaxPoolSize;
+  fWaitIntervalSeconds := def_WaitIntervalSeconds;
+  fPoolTimeoutSeconds := def_PoolTimeoutSeconds;
+
+  fConnectionCache := TThreadList.Create;
+end;
+
+destructor TDAConnectionManager.Destroy;
+begin
+  DriverManager := nil;
+
+  fConnections.Free;
+  ClearPool;
+  fConnectionCache.Free;
+
+  fTimer.Free;
+  fConnectionWait.Free;
+  inherited;
+end;
+
+procedure TDAConnectionManager.SetConnections(const Value: TDAConnectionCollection);
+begin
+  fConnections.Assign(Value);
+end;
+
+function TDAConnectionManager.CreateNewConnection(const ConnectionName: string;
+  OpenConnection: boolean = TRUE;
+  const UserID: string = '';
+  const Password: string = ''): IDAConnection;
+var
+  conndef: TDAConnection;
+  drv: IDADriver;
+  mac: IDAHasMacroProcessor;
+  drvid: string;
+begin
+  CheckProperties;
+
+  conndef := Connections.ItemByName(ConnectionName) as TDAConnection; // Raises exception if not found
+  drvid := TDAConnectionStringParser.ExtractDriverID(conndef.ConnectionString);
+
+  drv := fDriverManager.DriverByDriverID(drvid); // Raises exception if not found
+  result := drv.NewConnection(self, conndef);
+
+  // If not empty strings, these will override any specific UserID, Password specified below
+  result.ConnectionString := conndef.ConnectionString;
+
+  if (UserID <> '') then result.UserID := UserID;
+  if (Password <> '') then result.Password := Password;
+
+  if OpenConnection then result.Open;
+
+  if Assigned(fOnConnectionCreated) then fOnConnectionCreated(Self, result);
+  if Supports(Result, IDAHasMacroProcessor, mac) and (mac.GetMacroProcessor <> nil) then begin
+    mac.GetMacroProcessor.OnUnknownIdentifier := UnknownMacroIdentifier;
+  end;
+end;
+
+procedure TDAConnectionManager.SetDriverManager(const Value: TDADriverManager);
+begin
+  fDriverManager := Value;
+  ClearPool();
+  if (fDriverManager <> nil) then fDriverManager.FreeNotification(Self);
+end;
+
+procedure TDAConnectionManager.Notification(AComponent: TComponent;
+  Operation: TOperation);
+begin
+  inherited;
+
+  if (Operation <> opRemove) then Exit;
+  if (AComponent = fDriverManager) then DriverManager := nil;
+end;
+
+procedure TDAConnectionManager.RestoreNonStreamableProperties(
+  const TempStorage: TPointerArray);
+begin
+  DriverManager := TempStorage[0];
+end;
+
+procedure TDAConnectionManager.SaveNonStreamableProperties(
+  var TempStorage: TPointerArray);
+begin
+  SetLength(TempStorage, 1);
+  TempStorage[0] := DriverManager;
+end;
+
+function TDAConnectionManager.GetDefaultConnectionName: string;
+var
+  i: integer;
+begin
+  result := '';
+  for i := 0 to (fConnections.Count - 1) do
+    if Connections[i].Default then begin
+      result := Connections[i].Name;
+      Exit;
+    end;
+end;
+
+procedure TDAConnectionManager.Clear;
+begin
+  fConnections.Clear;
+end;
+
+procedure TDAConnectionManager.SetMaxPoolSize(const Value: cardinal);
+begin
+  fMaxPoolSize := Value;
+end;
+
+procedure TDAConnectionManager.SetPoolTimeoutSeconds(const Value: cardinal);
+begin
+  if (fPoolTimeoutSeconds = Value) and (fTimer <> nil) then Exit;
+  fPoolTimeoutSeconds := Value;
+
+  if not (csDesigning in ComponentState) then begin
+    if (PoolSize > 0) then RaiseError(err_PoolIsNotEmpty);
+
+    if Assigned(fTimer) then begin
+      fTimer.Free;
+      fTimer := nil;
+    end;
+
+    if (fPoolTimeoutSeconds > 0) then fTimer := TROThreadTimer.Create(OnTimerTick, fPoolTimeoutSeconds * 500);
+  end;
+end;
+
+procedure TDAConnectionManager.OnTimerTick(CurrentTickCount: cardinal);
+var
+  i: integer;
+  tempconn: TCachedConnection;
+  list: TList;
+begin
+  list := fConnectionCache.LockList;
+  try
+    for i := list.Count - 1 downto 0 do
+    begin
+      tempconn := TCachedConnection(list[i]);
+      if tempconn.LastUse + (fPoolTimeoutSeconds / 86400.0) < Now then begin
+        if Assigned(fOnConnectionTimedOut) then fOnConnectionTimedOut(Self);
+        list.Delete(i);
+        tempconn.Connection.ConnectionPool := nil;
+        tempconn.Free;
+        dec(fTotalConnections);
+      end;
+    end;
+  finally
+    fConnectionCache.UnlockList;
+  end;
+end;
+
+function TDAConnectionManager.NewConnection(const aConnectionName: string;
+  OpenConnection: boolean = TRUE; const UserID: string = ''; const Password: string = ''): IDAConnection;
+var
+  i: integer;
+  conn: TDAConnection;
+  list: TList;
+  tempconn: TCachedConnection;
+begin
+  try
+    // If pooling is not enable immediately creates a connection.
+    // This is the quickest way to Acquire one
+    if not fPoolingEnabled then begin
+      result := CreateNewConnection(aConnectionName, OpenConnection, UserID, Password);
+      if Assigned(fOnConnectionAcquired) then fOnConnectionAcquired(Self, result);
+      Exit;
+    end;
+
+    // Pooling is enabled and has to be thread safe
+    result := nil;
+    conn := fConnections.ConnectionByName(aConnectionName);
+    while true do begin
+      list := fConnectionCache.LockList;
+      try
+        for i := list.Count -1 downto 0 do begin
+          tempconn := TCachedConnection(list[i]);
+          if not tempconn.Connection.IsAlive then begin
+             tempconn.Connection:=nil;
+             list.Delete(i);
+          end;
+        end;
+        for i := 0 to list.Count -1 do begin
+          tempconn := TCachedConnection(list[i]);
+
+          if SameText(tempconn.Connection.ConnectionString, conn.ConnectionString) and
+             SameText(tempconn.Connection.ConnectionType, conn.ConnectionType) then begin
+            list.Delete(i);
+            Result := tempconn.Connection;
+            tempconn.Free;
+            if Assigned(fOnConnectionAcquired) then fOnConnectionAcquired(Self, result);
+            Exit;
+          end;
+        end;
+
+        // If it doesn't find one and the max poolsize is not reached then creates it...
+        if Cardinal(fTotalConnections) < fMaxPoolSize then begin
+          result := CreateNewConnection(aConnectionName, OpenConnection, UserID, Password);
+          result.ConnectionPool := self;
+          inc(fTotalConnections);
+          if Assigned(fOnConnectionAcquired) then fOnConnectionAcquired(Self, result);
+          Exit;
+        end;
+
+      finally
+        fConnectionCache.UnlockList;
+      end;
+      // Otherwise either waits and tries again or raises an error
+      case PoolBehaviour of
+        pbRaiseError: RaiseError(err_MaxPoolSizeReached);
+        pbWait: begin
+            if fConnectionWait.WaitFor(1000 * fWaitIntervalSeconds) <> wrSignaled then
+              RaiseError(err_MaxPoolSizeReached);
+          end;
+        pbIgnoreAndReturn: Exit;
+      end;
+    end;
+  except
+    on e: Exception do begin
+      if assigned(FOnConnectionFailure) then FOnConnectionFailure(self, E);
+      raise;
+    end;
+  end;
+end;
+
+procedure TDAConnectionManager.ReleaseConnection(const Conn: IDAConnection);
+var
+  list: TList;
+begin
+  case fPoolTransactionBehaviour of
+    ptRollback: if Conn.InTransaction then Conn.RollbackTransaction;
+    ptCommit: if Conn.InTransaction then Conn.CommitTransaction;
+    ptCustom: if Conn.InTransaction and assigned(fOnCustomPoolTransactionBehavior) then
+      fOnCustomPoolTransactionBehavior(Self, Conn);
+  end;
+  if assigned(fOnConnectionReleased) then
+    fOnConnectionReleased(Self, Conn);
+  if fPoolingEnabled then begin
+    list := fConnectionCache.LockList;
+    try
+      if (Cardinal(list.Count) < fMaxPoolSize) and Conn.isAlive then begin
+        fConnectionCache.Add(TCachedConnection.Create(Conn))
+      end else
+        Dec(fTotalConnections);
+    finally
+      fConnectionCache.UnlockList;
+    end;
+    fConnectionWait.SetEvent;
+  end;
+end;
+
+procedure TDAConnectionManager.SetPoolingEnabled(const Value: boolean);
+begin
+  fPoolingEnabled := Value;
+end;
+
+procedure TDAConnectionManager.ClearPool;
+var
+  i: Integer;
+  list: TList;
+begin
+  list := fConnectionCache.LockList;
+  try
+    for i := list.Count -1 downto 0 do begin
+      TCachedConnection(List[i]).Connection.ConnectionPool := nil;
+      TCachedConnection(List[i]).Free;
+    end;
+    Dec(fTotalConnections, list.Count);
+    list.Clear;
+  finally
+    fConnectionCache.UnlockList;
+  end;
+end;
+
+const
+  nn_Connections      = 'Connections';
+  nn_Definitions      = 'Definitions';
+  nn_Definition       = 'Definition';
+
+  nn_PoolingEnabled   = 'PoolingEnabled';
+  nn_PoolingBehavior  = 'PoolingBehavior';
+  nn_MaxPoolSize      = 'MaxPoolSize';
+  nn_WaitIntervalSeconds = 'WaitIntervalSeconds';
+  nn_PoolTimeoutSeconds = 'PoolTimeoutSeconds';
+
+  nn_ConnectionString = 'ConnectionString';
+  nn_Default          = 'Default';
+  nn_Name             = 'Name';
+  nn_Description      = 'Description';
+  nn_ConnectionType   = 'ConnectionType';
+
+procedure TDAConnectionManager.LoadFromStream(aStream: TStream;
+  aFormat: TDAPersistFormat);
+var buff: array[0..21] of char;
+    xmlDoc: IXMLDocument;
+    s: string;
+    i : integer;
+    connsNode, thisNode: IXMLNode;
+    conn: TDAConnection;
+begin
+  aStream.Position := 0;
+  aStream.ReadBuffer(buff, SizeOf(buff));
+  if (buff<>'<TDAConnectionManager>') then begin
+    aStream.Position := 0;
+    xmlDoc := NewROXmlDocument;
+    xmlDoc.New();
+    xmlDoc.LoadFromStream(aStream);
+
+    Clear;
+
+    PoolingEnabled := xmlDoc.DocumentNode.GetNodeValue(nn_PoolingEnabled, def_PoolingEnabled);
+    // TDAPoolBehaviour = (pbWait, pbRaiseError, pbIgnoreAndReturn);
+    s := xmlDoc.DocumentNode.GetNodeValue(nn_PoolingBehavior, GetEnumName(TypeInfo(TDAPoolBehaviour), Ord(def_PoolBehaviour)));
+    if (Pos('pb', s)<>1) then s := 'pb'+s;
+    PoolBehaviour := TDAPoolBehaviour(GetEnumValue(TypeInfo(TDAPoolBehaviour), s));
+    MaxPoolSize := xmlDoc.DocumentNode.GetNodeValue(nn_MaxPoolSize, def_MaxPoolSize);
+    WaitIntervalSeconds := xmlDoc.DocumentNode.GetNodeValue(nn_WaitIntervalSeconds, def_WaitIntervalSeconds);
+    PoolTimeoutSeconds := xmlDoc.DocumentNode.GetNodeValue(nn_PoolTimeoutSeconds, def_PoolTimeoutSeconds);
+
+    connsNode := xmlDoc.DocumentNode.GetNodeByName(nn_Definitions);
+    if (connsNode=NIL) then Exit;
+    for i := 0 to (connsNode.ChildrenCount-1) do begin
+      thisNode := connsNode.Children[i];
+      if thisNode.Name <> nn_Definition then continue;
+
+      conn := Connections.Add;
+      conn.Name := thisNode.GetNodeValue(nn_Name, 'Connection'+IntToStr(i+1));
+      conn.Description:= thisNode.GetNodeValue(nn_Description, '');
+      conn.Default := thisNode.GetNodeValue(nn_Default, FALSE);
+      conn.ConnectionString := thisNode.GetNodeValue(nn_ConnectionString, '');
+      conn.ConnectiontYPE := thisNode.GetNodeValue(nn_ConnectionType, '');
+    end;
+  end
+  else inherited;
+end;
+
+procedure TDAConnectionManager.SaveToStream(aStream: TStream;
+  aFormat: TDAPersistFormat);
+var xmlDoc : IXMLDocument;
+    connNode, thisNode: IXMLNode;
+    s: string;
+    i: integer;
+begin
+  if (aFormat=pfBinary) then begin
+    inherited;
+    Exit;
+  end;
+
+  xmlDoc := NewROXmlDocument;
+  xmlDoc.New(nn_Connections);
+  thisNode := xmlDoc.DocumentNode;
+
+  thisnode.Add(nn_PoolingEnabled).Value := PoolingEnabled;
+  s := GetEnumName(TypeInfo(TDAPoolBehaviour), Ord(PoolBehaviour));
+  thisnode.Add(nn_PoolingBehavior).Value := Copy(s, 3, MaxInt);
+  thisnode.Add(nn_MaxPoolSize).Value := MaxPoolSize;
+  thisnode.Add(nn_WaitIntervalSeconds).Value := WaitIntervalSeconds;
+  thisnode.Add(nn_PoolTimeoutSeconds).Value := PoolTimeoutSeconds;
+
+  connNode := thisNode.Add(nn_Definitions);
+  for i := 0 to (Connections.Count-1) do begin
+    thisNode := connNode.Add(nn_Definition);
+    thisNode.Add(nn_Name).Value := Connections[i].Name;
+    thisNode.Add(nn_ConnectionString).Value := Connections[i].ConnectionString;
+    thisNode.Add(nn_Default).Value :=  Connections[i].Default;
+    thisNode.Add(nn_Description).Value :=  Connections[i].Description;
+    thisNode.Add(nn_ConnectionType).Value :=  Connections[i].ConnectionType;
+  end;
+
+  xmlDoc.SaveToStream(aStream);
+end;
+
+procedure TDAConnectionManager.Loaded;
+begin
+  inherited;
+  if not (csDesigning in ComponentState) then
+  begin
+    SetPoolTimeoutSeconds(fPoolTimeoutSeconds);
+  end;
+end;
+
+function TDAConnectionManager.UnknownMacroIdentifier(Sender: TObject;
+  const Name, OrgName: string; var Value: string): Boolean;
+begin
+  Value := Name;
+  result := TRUE;
+  if assigned(fOnUnknownMacroVariable) then begin
+    fOnUnknownMacroVariable(Self, OrgName, Value);
+  end;
+end;
+
+procedure TDAConnectionManager.CheckProperties;
+begin
+  Check(not Assigned(DriverManager), Name + '. '+err_DriverManagerNotAssigned);
+end;
+
+{ TDADataDictionary }
+
+constructor TDADataDictionary.Create(aOwner: TComponent);
+begin
+  inherited;
+  fFields := TDADataDictionaryFieldCollection.Create(self, TDADataDictionaryField);
+end;
+
+destructor TDADataDictionary.Destroy;
+begin
+  fFields.Free;
+  inherited;
+end;
+
+function TDADataDictionary.GetFields: TDADataDictionaryFieldCollection;
+begin
+  result := fFields;
+end;
+
+procedure TDADataDictionary.RestoreNonStreamableProperties(const TempStorage: TPointerArray);
+begin
+
+end;
+
+procedure TDADataDictionary.SaveNonStreamableProperties(var TempStorage: TPointerArray);
+begin
+
+end;
+
+procedure TDADataDictionary.SetFields(const Value: TDADataDictionaryFieldCollection);
+begin
+  fFields.Assign(Value);
+end;
+
+{ TDASchema }
+
+constructor TDASchema.Create(aOwner: TComponent);
+begin
+  inherited;
+  fCustomAttributes := TStringList.Create;
+  fDatasets := TDADatasetCollection.Create(Self);
+  fJoinDataTables := TDAJoinDataTableCollection.Create(Self);
+  fUnionDataTables := TDAUnionDataTableCollection.Create(Self);
+  fCommands := TDASQLCommandCollection.Create(Self);
+  fRelationShips := TDADatasetRelationshipCollection.Create(Self);
+  fUpdateRules := TDAUpdateRuleCollection.Create(Self);
+end;
+
+destructor TDASchema.Destroy;
+begin
+  FreeAndNil(fDatasets);
+  FreeAndNil(fJoinDataTables);
+  FreeAndNil(fUnionDataTables);
+  FreeAndNil(fCommands);
+  FreeAndNil(fRelationShips);
+  FreeAndNil(fUpdateRules);
+  fCustomAttributes.Free;
+
+  inherited;
+end;
+
+procedure TDASchema.Notification(aComponent: TComponent; Operation: TOperation);
+begin
+  inherited;
+  if (Operation <> opRemove) then Exit;
+  if aComponent = ConnectionManager then
+    ConnectionManager := nil
+  else if aComponent = DataDictionary then
+    DataDictionary := nil
+  else if aComponent = Diagrams then
+    Diagrams := nil;
+end;
+
+function TDASchema.GetCommands: TDASQLCommandCollection;
+begin
+  Result := fCommands;
+end;
+
+function TDASchema.GetDatasets: TDADatasetCollection;
+begin
+  Result := fDatasets;
+end;
+
+function TDASchema.GetJoinDataTables: TDAJoinDataTableCollection;
+begin
+  Result := fJoinDataTables;
+end;
+
+function TDASchema.GetUnionDataTables: TDAUnionDataTableCollection;
+begin
+  Result := fUnionDataTables;
+end;
+
+procedure TDASchema.SetCommands(const Value: TDASQLCommandCollection);
+begin
+  fCommands.Assign(Value);
+end;
+
+procedure TDASchema.SetDatasets(const Value: TDADatasetCollection);
+begin
+  fDatasets.Assign(Value);
+end;
+
+procedure TDASchema.SetJoinDataTables(const Value: TDAJoinDataTableCollection);
+begin
+  fJoinDataTables.Assign(Value);
+end;
+
+procedure TDASchema.SetUnionDataTables(const Value: TDAUnionDataTableCollection);
+begin
+  fUnionDataTables.Assign(Value);
+end;
+
+procedure TDASchema.Loaded;
+begin
+  inherited;
+end;
+
+procedure TDASchema.SetConnectionManager(const Value: TDAConnectionManager);
+begin
+  if fConnectionManager <> Value then begin
+    fConnectionManager := Value;
+    if (fConnectionManager <> nil) then fConnectionManager.FreeNotification(Self);
+  end;
+end;
+
+procedure TDASchema.SetDataDictionary(const Value: TDADataDictionary);
+begin
+  if fDataDictionary <> Value then begin
+    fDataDictionary := Value;
+    if (fDataDictionary <> nil) then fDataDictionary.FreeNotification(Self);
+  end;
+end;
+
+procedure TDASchema.RestoreNonStreamableProperties(
+  const TempStorage: TPointerArray);
+begin
+  fConnectionManager := TempStorage[0];
+  fDataDictionary := TempStorage[1];
+end;
+
+procedure TDASchema.SaveNonStreamableProperties(
+  var TempStorage: TPointerArray);
+begin
+  SetLength(TempStorage, 2);
+  TempStorage[0] := fConnectionManager;
+  TempStorage[1] := fDataDictionary;
+end;
+
+function TDASchema.GetCommandText(const aConnection: IDAConnection; const aName: string): string;
+var
+  cmd: TDASQLCommand;
+begin
+  cmd := TDASQLCommand(Commands.ItemByName(aName));
+  result := FindCommandStatement(aConnection, cmd).SQL;
+end;
+
+function TDASchema.GetDatasetText(const aConnection: IDAConnection; const aName: string): string;
+var
+  ds: TDADataset;
+begin
+  ds := TDADataset(Datasets.ItemByName(aName));
+  result := FindCommandStatement(aConnection, ds).SQL;
+end;
+
+function TDASchema.FindCommandStatement(const aConnection: IDAConnection; aSQLCommand: TDASQLCommand; aStatementName: string=''): TDAStatement;
+var
+  connname: string;
+  i: integer;
+begin
+  // Tries to find the statement associated with the given connection
+
+  result := nil;
+  if (aConnection <> nil) then begin
+    connname := aConnection.Name;
+    result := TDAStatement(aSQLCommand.Statements.FindItem(connname, aStatementName));
+  end;
+
+  //check for statement matching the connection TYPE of the active connection [matching means same *non-empty* value for both]
+  if (Result = nil) and (aConnection.ConnectionType<>'') then begin
+    For i:=0 to aSQLCommand.Statements.Count-1 do
+      if AnsiSameText(aConnection.ConnectionType,aSQLCommand.Statements[i].ConnectionType) then begin
+        Result:=aSQLCommand.Statements[i];
+        Break;
+      end;
+  end;
+
+  //check for a default statement ["Default" is new property on statement]
+  if (Result = nil) then
+    For i:=0 to aSQLCommand.Statements.Count-1 do
+      if aSQLCommand.Statements[i].Default then begin
+        Result:=aSQLCommand.Statements[i];
+        Break;
+      end;
+
+  // If none is found then reverts to the default connection
+  if (result = nil) then begin
+    connname := ConnectionManager.GetDefaultConnectionName;
+    result := TDAStatement(aSQLCommand.Statements.FindItem(connname, aStatementName));
+  end;
+
+  Check(result = nil, err_CannotFindStatement, [aSQLCommand.Name, connname]);
+end;
+
+{function TDASchema.NewDataset(aConnectionName: string; const aName: string): IDADataset;
+begin
+  Check(not Assigned(ConnectionManager), err_ConnectionManagerNotAssigned);
+  result := NewDataset(ConnectionManager.NewConnection(aConnectionName), aName);
+end;}
+
+function TDASchema.NewUnionItemDataset(
+  const aConnection: IDAConnection;
+  const aName: string;
+  const ParamNames: array of string;
+  const ParamValues: array of Variant;
+  aDynSelectFields: array of string;
+  aWhereClause: WideString;
+  anUnionMapping: TDAColumnMappingCollection): IDADataset;
+var
+  i: integer;
+begin
+  if (High(ParamNames) <> High(ParamValues)) then RaiseError('Names and values counts are different');
+
+  result := Self.DoNewDataset(aConnection, aName, aDynSelectFields, aWhereClause,
+    '', false, false, //default values
+    anUnionMapping);
+
+  for i := 0 to High(ParamValues) do
+    result.ParamByName(ParamNames[i]).Value := ParamValues[i];
+
+end;
+
+function TDASchema.NewDataset(
+  const aConnection: IDAConnection;
+  const aName: string;
+  aDynSelectFields: array of string;
+  aWhereClause: WideString;
+  aStatementName: string;
+  OpenIt: boolean;
+  AlwaysGenerateDynamicWhereStatement:Boolean): IDADataset;
+begin
+  result := Self.DoNewDataset(aConnection, aName, aDynSelectFields,
+    aWhereClause, aStatementName, OpenIt, AlwaysGenerateDynamicWhereStatement,
+    nil);
+end;
+
+function TDASchema.DoNewDataset(
+  const aConnection: IDAConnection;
+  const aName: string;
+  aDynSelectFields: array of string;
+  aWhereClause: WideString;
+  aStatementName: string;
+  OpenIt: boolean;
+  AlwaysGenerateDynamicWhereStatement:Boolean;
+  anUnionMapping: TDAColumnMappingCollection): IDADataset;
+
+var
+  ds: TDADataset;
+  fld : TDAField;
+
+  function IsRealField(aFieldName: string; ACheckForCalulated: boolean): boolean;
+  begin
+    Result:=not SameText(aFieldName, def_SourceTableFieldName);
+    if Result and ACheckForCalulated then begin
+      fld:=ds.Fields.FindField(aFieldName);
+      if fld <> nil then
+        Result:= not fld.Calculated;
+    end;
+  end;
+
+var
+  sql: string;
+  statement: TDAStatement;
+  i,j: integer;
+  lConnection: IDAConnection;
+  lFields: TDAFieldCollection;
+  lFields2:TDAFieldCollection;
+  lColumnMapping: TDAColumnMapping;
+  lWhereFields: TWhereFieldsArray;
+  lWhereFlag: Boolean;
+  lstatname: string;
+  lWhereClause: WideString;
+  lserversideDynWhere: widestring;
+  lwb: TDAQueryBuilder;
+begin
+  lConnection := aConnection;
+  if not assigned(lConnection) then begin
+    CheckProperties;
+    lConnection := ConnectionManager.NewConnection(ConnectionManager.GetDefaultConnectionName);
+  end;
+  result := nil;
+  lColumnMapping := nil;
+  SetLength(lWhereFields,0);   // remove warning
+  ds := (Datasets.DatasetByName(aName) as TDADataset);
+  if Assigned(ds) then begin
+    lserversideDynWhere := Trim(ds.DynamicWhereXML);
+    statement := FindCommandStatement(lConnection, ds, aStatementName);
+    sql := statement.SQL;
+    // generate AutoSQL
+    if statement.StatementType = stAutoSQL then begin
+      if statement.TargetTable = '' then begin
+        if statement.Name = '' then
+          lstatname:= '['+statement.ConnectionType+']'
+        else
+          lstatname:= statement.Name;
+        raise Exception.Create(aName+'. Statement: '+lstatname+ '. TargetTable must be specified.');
+      end;
+      lwb := aConnection.GetQueryBuilder;
+      With lwb do try
+        if Length(aDynSelectFields) > 0 then begin
+          For i:=0 to ds.Fields.Count-1 do begin
+            fld:=ds.Fields[i];
+            if not (not Assigned(fld) or fld.Calculated or fld.Lookup or fld.ServerCalculated) then
+              for j:=Low(aDynSelectFields) to High(aDynSelectFields) do
+                if SameText(aDynSelectFields[j],Fld.Name) then begin
+                  AddSelect('',fld.Name);
+                  Break;
+                end;
+          end;
+        end
+        else begin
+          For i:=0 to ds.Fields.Count-1 do begin
+            fld:=ds.Fields[i];
+            if not (fld.Calculated or fld.Lookup or fld.ServerCalculated) then
+              AddSelect('',fld.Name);
+          end;
+        end;
+        MainTable.MasterTable:=statement.TargetTable;
+        if (aWhereClause <> '') or AlwaysGenerateDynamicWhereStatement or (lserversideDynWhere <> '') then
+          Options := Options + [qboGenerateDynamicWhereStatement];
+        ColumnMapping:=statement.ColumnMappings;
+        sql := GenerateSelectSQL;
+      finally
+        Free;
+      end;
+    end;
+
+    if Assigned(fOnGetSQL) then fOnGetSQL(Self, aName, setDataset, sql);
+
+    result := lConnection.NewDataset(sql, aName);
+
+    if (aWhereClause <> '') or (lserversideDynWhere <> '') then begin
+
+      //Do remapping for unions
+      if (aWhereClause <> '') then begin
+        if (Assigned(anUnionMapping)) then
+          lWhereClause := Where_RemapFieldNames(aWhereClause, anUnionMapping, statement.TargetTable)
+        else
+          lWhereClause := aWhereClause;
+        Result.DynamicWhere.Xml := lWhereClause;
+      end;
+
+      if lserversideDynWhere <> '' then begin
+        with Result.DynamicWhere do
+        try
+          if Expression <> nil then
+            Expression := NewBinaryExpression(Expression,XMLToExpression(lserversideDynWhere), dboAnd)
+          else
+            Expression := XMLToExpression(lserversideDynWhere);
+        except
+          raise EDAException.Create('Can''t apply Dynamic Expression:'#13#10+lserversideDynWhere);
+        end;
+      end;
+
+      // Checking conformity dynamic where fields to table fields
+      lWhereFields := Where_ExtractFieldNames(Result.DynamicWhere.Expression);
+      if Length(lWhereFields) <> 0 then begin
+      {// remapping
+        for i:=0 to High(lWhereFields) do begin
+          lColumnMapping := statement.ColumnMappings.FindMappingByDatasetField(lWhereFields[i]);
+          if Assigned(lColumnMapping) then lWhereFields[i] := lColumnMapping.TableField;
+        end;
+      }
+        if Length(aDynSelectFields) > 0 then begin
+          For i:= 0 to High(lWhereFields) do begin
+            lWhereFlag:=False;
+            for j:=0 to High(aDynSelectFields) do
+              if IsRealField(aDynSelectFields[j],True) then
+                if SameText(lWhereFields[i],aDynSelectFields[j]) then begin
+                  lWhereFlag:=True;
+                  break;
+                end;
+            if not lWhereFlag then
+              raise EDAException.CreateFmt('''%s'' field can''t be used inside the where clause',[lWhereFields[i]]);
+          end;
+        end
+        else begin
+          For i:= 0 to High(lWhereFields) do begin
+            lWhereFlag:= ds.Fields.Count = 0;
+            for j:=0 to ds.Fields.Count-1 do
+              if not ds.Fields[j].Calculated and IsRealField(ds.Fields[j].Name, False) then
+                 if SameText(lWhereFields[i],ds.Fields[j].Name) then begin
+                   lWhereFlag:=True;
+                   break;
+                 end;
+            if not lWhereFlag then
+              raise EDAException.CreateFmt('''%s'' field can''t be used inside the where clause',[lWhereFields[i]]);
+            end;
+        end;
+      end;
+      // end Checking conformity dynamic where fields to table fields
+      Result.DynamicWhere.ColumnMapping := statement.ColumnMappings;
+    end;
+    // Copies the definitions of the schema
+
+    { not sure if this is unproblematic, but we need to copy access to the data
+    dictionary. though some more explicit access (say a Fields.DataDictionary
+    property would be better. }
+
+    result.Fields.DataDictionary := self.DataDictionary;
+    if statement.StatementType <> stAutoSQL then begin
+      result.Fields.AssignFieldCollection(ds.Fields);
+
+      with statement do
+        for i := 0 to (ColumnMappings.Count - 1) do begin
+          fld := result.Fields.FieldByName(ColumnMappings[i].DatasetField);
+
+          fld.TableField := ColumnMappings[i].TableField;
+          fld.SQLOrigin := ColumnMappings[i].SQLOrigin;
+        end;
+    end else begin
+      // stAutoSQL
+      lFields:=nil;
+      if ds.Fields.Count = 0 then begin
+        lConnection.GetTableFields(statement.TargetTable,lFields);
+        lFields2:=lFields;
+      end
+      else begin
+        lFields2:=ds.Fields;
+      end;
+      try
+        if Length(aDynSelectFields) > 0 then begin
+          if statement.ColumnMappings.Count = 0 then begin
+            For i:=0 to High(aDynSelectFields) do begin
+              if aDynSelectFields[i] = def_SourceTableFieldName then Continue;
+              fld:=Result.Fields.Add;
+              fld.AssignField(lfields2.FieldByName(aDynSelectFields[i]));
+              if lColumnMapping <> nil then begin
+                fld.Name := lColumnMapping.DatasetField;
+                fld.TableField := lColumnMapping.TableField;
+                fld.SQLOrigin := lColumnMapping.SQLOrigin;
+              end;
+            end;
+          end
+          else begin
+            For i:=0 to statement.ColumnMappings.Count-1 do begin
+              lColumnMapping := statement.ColumnMappings[i];
+              for j:=Low(aDynSelectFields) to High(aDynSelectFields) do
+                if SameText(aDynSelectFields[j],lColumnMapping.DatasetField) then begin
+                  fld:=Result.Fields.Add;
+                  fld.AssignField(lfields2.FieldByName(lColumnMapping.DatasetField));
+                  fld.Name := lColumnMapping.DatasetField;
+                  fld.TableField := lColumnMapping.TableField;
+                  fld.SQLOrigin := lColumnMapping.SQLOrigin;
+                  Break;
+                end;
+            end;
+          end;
+        end
+        else begin
+          result.Fields.AssignFieldCollection(lfields2);
+          with statement do
+            for i := 0 to (ColumnMappings.Count - 1) do begin
+              fld := Result.Fields.FindField(ColumnMappings[i].DatasetField);
+              if fld = nil then Continue;
+              fld.Name := ColumnMappings[i].DatasetField;
+              fld.TableField := ColumnMappings[i].TableField;
+              fld.SQLOrigin := ColumnMappings[i].SQLOrigin;
+            end;
+        end;
+      finally
+        if lFields <> nil then lFields.Free;
+      end;
+    end;
+    // checking for DynamicFields
+    if Length(aDynSelectFields) > 0 then begin
+      For i:=0 to High(aDynSelectFields) do
+        if IsRealField(aDynSelectFields[i],True) then
+          Result.FieldByName(aDynSelectFields[i]);
+    end;
+    result.Params.AssignParamCollection(ds.Params);
+    if OpenIt then result.Open;
+
+  end;
+end;
+
+function TDASchema.NewCommand(const aConnection: IDAConnection; const aName: string; aStatementName: string=''): IDASQLCommand;
+var
+  statement: TDAStatement;
+  sql: string;
+  cmd: TDASQLCommand;
+  lConnection: IDAConnection;
+begin
+  lConnection := aConnection;
+  if not assigned(lConnection) then begin
+    CheckProperties;
+    lConnection := ConnectionManager.NewConnection(ConnectionManager.GetDefaultConnectionName);
+  end;
+  result := nil;
+  cmd := TDASQLCommand(Commands.ItemByName(aName));
+
+  statement := FindCommandStatement(lConnection, cmd, aStatementName);
+  sql := statement.SQL;
+
+  if Assigned(fOnGetSQL) then fOnGetSQL(Self, aName, setCommand, sql);
+
+  result := lConnection.NewCommand(sql, statement.StatementType, aName);
+
+  // Copies the definitions of the schema
+  result.Params.AssignParamCollection(cmd.Params);
+end;
+
+procedure TDASchema.Clear;
+begin
+  Datasets.Clear();
+  Commands.Clear();
+  JoinDataTables.Clear();
+  UnionDataTables.Clear();
+end;
+
+function TDASchema.NewDataset(
+  const aConnection: IDAConnection;
+  const aName: string;
+  const ParamNames: array of string;
+  const ParamValues: array of Variant;
+  aDynSelectFields: array of string;
+  aWhereClause: WideString;
+  OpenIt: boolean;
+  aStatementName: string): IDADataset;
+var
+  i: integer;
+begin
+  if (High(ParamNames) <> High(ParamValues)) then RaiseError('Names and values counts are different');
+
+  result := NewDataset(aConnection, aName, aDynSelectFields, aWhereClause, aStatementName, False, False);
+
+  for i := 0 to High(ParamValues) do
+    result.ParamByName(ParamNames[i]).Value := ParamValues[i];
+
+  if OpenIt then result.Open;
+end;
+
+function TDASchema.NewCommand(const aConnection: IDAConnection; const aName: string;
+  const ParamNames: array of string;
+  const ParamValues: array of Variant;
+  ExecuteIt: boolean = TRUE;
+  aStatementName: string=''): IDASQLCommand;
+var
+  i: integer;
+begin
+  if (High(ParamNames) <> High(ParamValues)) then RaiseError('Names and values counts are different');
+
+  result := NewCommand(aConnection, aName);
+
+  for i := 0 to High(ParamValues) do
+    result.ParamByName(ParamNames[i]).Value := ParamValues[i];
+
+  if ExecuteIt then result.Execute;
+end;
+
+procedure TDASchema.SetUpdateRules(const Value: TDAUpdateRuleCollection);
+begin
+  fUpdateRules.Assign(Value);
+end;
+
+procedure TDASchema.SetRelationShips(
+  const Value: TDADatasetRelationshipCollection);
+begin
+  fRelationShips.Assign(Value);
+end;
+
+procedure TDASchema.SetDiagrams(const Value: TDADiagrams);
+begin
+  if fDiagrams <> Value then begin
+    fDiagrams := Value;
+    if (fDiagrams <> nil) then fDiagrams.FreeNotification(Self);
+  end;
+
+end;
+
+procedure TDASchema.Copy(aSourceSchema : TDASchema;
+                   DatasetNames : array of string;
+                   CommandNames : array of string;
+                   UpdateRuleNames : array of string;
+                   RelationShipNames : array of string);
+var i : integer;
+    sourcedataset,
+    destdataset : TDADataset;
+    sourcecommand,
+    destcommand : TDASQLCommand;
+    sourceupdaterule,
+    destupdaterule : TDAUpdateRule;
+    sourcerelationship,
+    destrelationship : TDADatasetRelationship;
+begin
+  for i := 0 to High(DatasetNames) do begin
+    sourcedataset := aSourceSchema.Datasets.DatasetByName(DatasetNames[i]);
+    destdataset := Datasets.Add;
+    destdataset.Assign(sourcedataset);
+  end;
+
+  for i := 0 to High(CommandNames) do begin
+    sourcecommand := aSourceSchema.Commands.SQLCommandByName(CommandNames[i]);
+    destcommand := Commands.Add;
+    destcommand.Assign(sourcecommand);
+  end;
+
+  for i := 0 to High(UpdateRuleNames) do begin
+    sourceupdaterule := aSourceSchema.UpdateRules.UpdateRuleByName(UpdateRuleNames[i]);
+    destupdaterule := UpdateRules.Add;
+    destupdaterule.Assign(sourceupdaterule);
+  end;
+
+  for i := 0 to High(RelationShipNames) do begin
+    sourcerelationship := aSourceSchema.RelationShips.RelationShipByName(RelationShipNames[i]);
+    destrelationship := RelationShips.Add;
+    destrelationship.Assign(sourcerelationship);
+  end;
+end;
+
+procedure TDASchema.Copy(aSourceSchema : TDASchema;
+                   IncludeDatasets : boolean = TRUE;
+                   IncludeCommands : boolean = TRUE;
+                   IncludeUpdateRules : boolean = TRUE;
+                   IncludeRelationShips : boolean = TRUE);
+var datasetnames, commandnames, updaterulenames, relationshipnames : array of string;
+    i : integer;
+begin
+  if not IncludeDatasets then SetLength(datasetnames, 0)
+  else begin
+    SetLength(datasetnames, aSourceSchema.Datasets.Count);
+    for i := 0 to (aSourceSchema.Datasets.Count-1) do
+      datasetnames[i] := aSourceSchema.Datasets[i].Name;
+  end;
+
+  if not IncludeCommands then SetLength(commandnames, 0)
+  else begin
+    SetLength(commandnames, aSourceSchema.Commands.Count);
+    for i := 0 to (aSourceSchema.Commands.Count-1) do
+      commandnames[i] := aSourceSchema.Commands[i].Name;
+  end;
+
+  if not IncludeUpdateRules then SetLength(updaterulenames, 0)
+  else begin
+    SetLength(updaterulenames, aSourceSchema.UpdateRules.Count);
+    for i := 0 to (aSourceSchema.UpdateRules.Count-1) do
+      updaterulenames[i] := aSourceSchema.UpdateRules[i].Name;
+  end;
+
+  if not IncludeRelationShips then SetLength(relationshipnames, 0)
+  else begin
+    SetLength(relationshipnames, aSourceSchema.RelationShips.Count);
+    for i := 0 to (aSourceSchema.RelationShips.Count-1) do
+      relationshipnames[i] := aSourceSchema.RelationShips[i].Name;
+  end;
+
+  Copy(aSourceSchema, datasetnames, commandnames, updaterulenames, relationshipnames);
+end;
+
+procedure TDASchema.CheckProperties;
+begin
+ Check(not assigned(ConnectionManager), Name+'.ConnectionManager must be assigned.');
+ Check(ConnectionManager.GetDefaultConnectionName = '', Name+'.ConnectionManager does not have a default connection.');
+ ConnectionManager.CheckProperties;
+end;
+
+function TDASchema.FindDataset(aDatasetName: String): TDADataset;
+begin
+  result := Self.fDatasets.FindItem(aDatasetName) as TDADataset;
+  if not Assigned(result) then
+    result := Self.fUnionDataTables.FindItem(aDatasetName) as TDADataset;
+  if not Assigned(result) then
+    result := Self.fJoinDataTables.FindItem(aDatasetName) as TDADataset;
+end;
+
+function TDASchema.NewDataset(const aConnection: IDAConnection;
+  const aName: string;
+  aStatementName: string='';
+  OpenIt: boolean = false): IDADataset;
+begin
+  result := NewDataset(aConnection, aName, [], '', aStatementName, OpenIt);
+end;
+
+function TDASchema.NewDataset(const aConnection: IDAConnection; const aName: string;
+  const ParamNames: array of string;
+  const ParamValues: array of Variant;
+  OpenIt: boolean = TRUE;
+  aStatementName: string=''): IDADataset;
+begin
+  result := NewDataset(aConnection, aName, ParamNames, ParamValues,[],'', OpenIt,aStatementName);
+end;
+
+function TDASchema.GetDataDictionary: IDADataDictionary;
+begin
+  Result := fDataDictionary;
+end;
+
+procedure TDASchema.SaveToStream(aStream: TStream;
+  aFormat: TDAPersistFormat);
+begin
+  fMergeDataDictionaries := true;
+  try
+    inherited SaveToStream(aStream, aFormat);
+  finally
+    fMergeDataDictionaries := false;
+  end;
+end;
+
+function TDASchema.MergeDataDictionaries: Boolean;
+begin
+  result := fMergeDataDictionaries;
+end;
+
+{ TDADiagrams }
+
+procedure TDADiagrams.DefineProperties(Filer: TFiler);
+begin
+  inherited;
+  Filer.DefineProperty('DiagramData', ReadDiagramData, WriteDiagramData, fDiagramData <> '');
+end;
+
+procedure TDADiagrams.LoadFromFile(const aFilename: string);
+var
+  t: TextFile;
+  S: string;
+begin
+  AssignFile(t, aFilename);
+  Reset(t);
+  try
+    fDiagramData := '';
+    while not Eof(t) do begin
+      Readln(t, s);
+      fDiagramData := fDiagramData+s+#13#10;
+    end;
+  finally
+    CloseFile(t);
+  end;
+end;
+
+procedure TDADiagrams.SaveToFile(const aFilename: string);
+var
+  t:TextFile;
+begin
+  AssignFile(t, aFilename);
+  Rewrite(t);
+  try
+    Write(t, fDiagramData);
+  finally
+    CloseFile(t);
+  end;
+end;
+
+procedure TDADiagrams.ReadDiagramData(Reader: TReader);
+begin
+  fDiagramData := Reader.ReadString;
+end;
+
+procedure TDADiagrams.WriteDiagramData(Writer: TWriter);
+begin
+  Writer.WriteString(fDiagramData);
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAClientDataModule.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAClientDataModule.pas
new file mode 100644
index 0000000..d72017a
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAClientDataModule.pas	
@@ -0,0 +1,30 @@
+unit uDAClientDataModule {$IFNDEF FPC}deprecated{$ENDIF};
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  Classes;
+
+type
+  TDAClientDataModule = class(TDataModule)
+  private
+
+  end deprecated;
+
+implementation
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDADB2Interfaces.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDADB2Interfaces.pas
new file mode 100644
index 0000000..ec21663
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDADB2Interfaces.pas	
@@ -0,0 +1,567 @@
+unit uDADB2Interfaces;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses uDAInterfaces, uDAEngine;
+
+type
+  { IDADB2Connection
+      For identification purposes. Implemented by all DB2 connections }
+  IDADB2Connection = interface(IDAConnection)
+    ['{E1449C52-8AEF-432C-BABC-823E592A8116}']
+  end;
+
+
+function DB2_IdentifierNeedsQuoting(const iIdentifier: string): boolean;
+
+implementation
+uses
+  SysUtils;
+  
+var
+  db2_reservedwords: array of string;
+
+function DB2_IdentifierNeedsQuoting(const iIdentifier: string): boolean;
+begin
+  Result := TestIdentifier(iIdentifier, db2_reservedwords);
+end;
+
+procedure db2_InitializeReservedWords;
+begin
+// from http://publib.boulder.ibm.com/infocenter/db2luw/v9r5/topic/com.ibm.db2.luw.sql.ref.doc/doc/r0001095.html
+  SetLength(db2_reservedwords, 513);
+  // sorted with TStringList.Sort (bds2007)
+  db2_reservedwords[0] := 'ABS';
+  db2_reservedwords[1] := 'ACTIVATE';
+  db2_reservedwords[2] := 'ADD';
+  db2_reservedwords[3] := 'AFTER';
+  db2_reservedwords[4] := 'ALIAS';
+  db2_reservedwords[5] := 'ALL';
+  db2_reservedwords[6] := 'ALLOCATE';
+  db2_reservedwords[7] := 'ALLOW';
+  db2_reservedwords[8] := 'ALTER';
+  db2_reservedwords[9] := 'AND';
+  db2_reservedwords[10] := 'ANY';
+  db2_reservedwords[11] := 'ARE';
+  db2_reservedwords[12] := 'ARRAY';
+  db2_reservedwords[13] := 'AS';
+  db2_reservedwords[14] := 'ASENSITIVE';
+  db2_reservedwords[15] := 'ASSOCIATE';
+  db2_reservedwords[16] := 'ASUTIME';
+  db2_reservedwords[17] := 'ASYMMETRIC';
+  db2_reservedwords[18] := 'AT';
+  db2_reservedwords[19] := 'ATOMIC';
+  db2_reservedwords[20] := 'ATTRIBUTES';
+  db2_reservedwords[21] := 'AUDIT';
+  db2_reservedwords[22] := 'AUTHORIZATION';
+  db2_reservedwords[23] := 'AUX';
+  db2_reservedwords[24] := 'AUXILIARY';
+  db2_reservedwords[25] := 'AVG';
+  db2_reservedwords[26] := 'BEFORE';
+  db2_reservedwords[27] := 'BEGIN';
+  db2_reservedwords[28] := 'BETWEEN';
+  db2_reservedwords[29] := 'BIGINT';
+  db2_reservedwords[30] := 'BINARY';
+  db2_reservedwords[31] := 'BLOB';
+  db2_reservedwords[32] := 'BOOLEAN';
+  db2_reservedwords[33] := 'BOTH';
+  db2_reservedwords[34] := 'BUFFERPOOL';
+  db2_reservedwords[35] := 'BY';
+  db2_reservedwords[36] := 'CACHE';
+  db2_reservedwords[37] := 'CALL';
+  db2_reservedwords[38] := 'CALLED';
+  db2_reservedwords[39] := 'CAPTURE';
+  db2_reservedwords[40] := 'CARDINALITY';
+  db2_reservedwords[41] := 'CASCADED';
+  db2_reservedwords[42] := 'CASE';
+  db2_reservedwords[43] := 'CAST';
+  db2_reservedwords[44] := 'CCSID';
+  db2_reservedwords[45] := 'CEIL';
+  db2_reservedwords[46] := 'CEILING';
+  db2_reservedwords[47] := 'CHAR';
+  db2_reservedwords[48] := 'CHAR_LENGTH';
+  db2_reservedwords[49] := 'CHARACTER';
+  db2_reservedwords[50] := 'CHARACTER_LENGTH';
+  db2_reservedwords[51] := 'CHECK';
+  db2_reservedwords[52] := 'CLOB';
+  db2_reservedwords[53] := 'CLONE';
+  db2_reservedwords[54] := 'CLOSE';
+  db2_reservedwords[55] := 'CLUSTER';
+  db2_reservedwords[56] := 'COALESCE';
+  db2_reservedwords[57] := 'COLLATE';
+  db2_reservedwords[58] := 'COLLECT';
+  db2_reservedwords[59] := 'COLLECTION';
+  db2_reservedwords[60] := 'COLLID';
+  db2_reservedwords[61] := 'COLUMN';
+  db2_reservedwords[62] := 'COMMENT';
+  db2_reservedwords[63] := 'COMMIT';
+  db2_reservedwords[64] := 'CONCAT';
+  db2_reservedwords[65] := 'CONDITION';
+  db2_reservedwords[66] := 'CONNECT';
+  db2_reservedwords[67] := 'CONNECTION';
+  db2_reservedwords[68] := 'CONSTRAINT';
+  db2_reservedwords[69] := 'CONTAINS';
+  db2_reservedwords[70] := 'CONTINUE';
+  db2_reservedwords[71] := 'CONVERT';
+  db2_reservedwords[72] := 'CORR';
+  db2_reservedwords[73] := 'CORRESPONDING';
+  db2_reservedwords[74] := 'COUNT';
+  db2_reservedwords[75] := 'COUNT_BIG';
+  db2_reservedwords[76] := 'COVAR_POP';
+  db2_reservedwords[77] := 'COVAR_SAMP';
+  db2_reservedwords[78] := 'CREATE';
+  db2_reservedwords[79] := 'CROSS';
+  db2_reservedwords[80] := 'CUBE';
+  db2_reservedwords[81] := 'CUME_DIST';
+  db2_reservedwords[82] := 'CURRENT';
+  db2_reservedwords[83] := 'CURRENT_DATE';
+  db2_reservedwords[84] := 'CURRENT_DEFAULT_TRANSFORM_GROUP';
+  db2_reservedwords[85] := 'CURRENT_LC_CTYPE';
+  db2_reservedwords[86] := 'CURRENT_PATH';
+  db2_reservedwords[87] := 'CURRENT_ROLE';
+  db2_reservedwords[88] := 'CURRENT_SCHEMA';
+  db2_reservedwords[89] := 'CURRENT_SERVER';
+  db2_reservedwords[90] := 'CURRENT_TIME';
+  db2_reservedwords[91] := 'CURRENT_TIMESTAMP';
+  db2_reservedwords[92] := 'CURRENT_TIMEZONE';
+  db2_reservedwords[93] := 'CURRENT_TRANSFORM_GROUP_FOR_TYPE';
+  db2_reservedwords[94] := 'CURRENT_USER';
+  db2_reservedwords[95] := 'CURSOR';
+  db2_reservedwords[96] := 'CYCLE';
+  db2_reservedwords[97] := 'DATA';
+  db2_reservedwords[98] := 'DATABASE';
+  db2_reservedwords[99] := 'DATAPARTITIONNAME';
+  db2_reservedwords[100] := 'DATAPARTITIONNUM';
+  db2_reservedwords[101] := 'DATE';
+  db2_reservedwords[102] := 'DAY';
+  db2_reservedwords[103] := 'DAYS';
+  db2_reservedwords[104] := 'DB2GENERAL';
+  db2_reservedwords[105] := 'DB2GENRL';
+  db2_reservedwords[106] := 'DB2SQL';
+  db2_reservedwords[107] := 'DBINFO';
+  db2_reservedwords[108] := 'DBPARTITIONNAME';
+  db2_reservedwords[109] := 'DBPARTITIONNUM';
+  db2_reservedwords[110] := 'DEALLOCATE';
+  db2_reservedwords[111] := 'DEC';
+  db2_reservedwords[112] := 'DECIMAL';
+  db2_reservedwords[113] := 'DECLARE';
+  db2_reservedwords[114] := 'DEFAULT';
+  db2_reservedwords[115] := 'DEFAULTS';
+  db2_reservedwords[116] := 'DEFINITION';
+  db2_reservedwords[117] := 'DELETE';
+  db2_reservedwords[118] := 'DENSE_RANK';
+  db2_reservedwords[119] := 'DENSERANK';
+  db2_reservedwords[120] := 'DEREF';
+  db2_reservedwords[121] := 'DESCRIBE';
+  db2_reservedwords[122] := 'DESCRIPTOR';
+  db2_reservedwords[123] := 'DETERMINISTIC';
+  db2_reservedwords[124] := 'DIAGNOSTICS';
+  db2_reservedwords[125] := 'DISABLE';
+  db2_reservedwords[126] := 'DISALLOW';
+  db2_reservedwords[127] := 'DISCONNECT';
+  db2_reservedwords[128] := 'DISTINCT';
+  db2_reservedwords[129] := 'DO';
+  db2_reservedwords[130] := 'DOCUMENT';
+  db2_reservedwords[131] := 'DOUBLE';
+  db2_reservedwords[132] := 'DROP';
+  db2_reservedwords[133] := 'DSSIZE';
+  db2_reservedwords[134] := 'DYNAMIC';
+  db2_reservedwords[135] := 'EACH';
+  db2_reservedwords[136] := 'EDITPROC';
+  db2_reservedwords[137] := 'ELEMENT';
+  db2_reservedwords[138] := 'ELSE';
+  db2_reservedwords[139] := 'ELSEIF';
+  db2_reservedwords[140] := 'ENABLE';
+  db2_reservedwords[141] := 'ENCODING';
+  db2_reservedwords[142] := 'ENCRYPTION';
+  db2_reservedwords[143] := 'END';
+  db2_reservedwords[144] := 'END-EXEC';
+  db2_reservedwords[145] := 'ENDING';
+  db2_reservedwords[146] := 'ERASE';
+  db2_reservedwords[147] := 'ESCAPE';
+  db2_reservedwords[148] := 'EVERY';
+  db2_reservedwords[149] := 'EXCEPT';
+  db2_reservedwords[150] := 'EXCEPTION';
+  db2_reservedwords[151] := 'EXCLUDING';
+  db2_reservedwords[152] := 'EXCLUSIVE';
+  db2_reservedwords[153] := 'EXEC';
+  db2_reservedwords[154] := 'EXECUTE';
+  db2_reservedwords[155] := 'EXISTS';
+  db2_reservedwords[156] := 'EXIT';
+  db2_reservedwords[157] := 'EXP';
+  db2_reservedwords[158] := 'EXPLAIN';
+  db2_reservedwords[159] := 'EXTERNAL';
+  db2_reservedwords[160] := 'EXTRACT';
+  db2_reservedwords[161] := 'FALSE';
+  db2_reservedwords[162] := 'FENCED';
+  db2_reservedwords[163] := 'FETCH';
+  db2_reservedwords[164] := 'FIELDPROC';
+  db2_reservedwords[165] := 'FILE';
+  db2_reservedwords[166] := 'FILTER';
+  db2_reservedwords[167] := 'FINAL';
+  db2_reservedwords[168] := 'FLOAT';
+  db2_reservedwords[169] := 'FLOOR';
+  db2_reservedwords[170] := 'FOR';
+  db2_reservedwords[171] := 'FOREIGN';
+  db2_reservedwords[172] := 'FREE';
+  db2_reservedwords[173] := 'FROM';
+  db2_reservedwords[174] := 'FULL';
+  db2_reservedwords[175] := 'FUNCTION';
+  db2_reservedwords[176] := 'FUSION';
+  db2_reservedwords[177] := 'GENERAL';
+  db2_reservedwords[178] := 'GENERATED';
+  db2_reservedwords[179] := 'GET';
+  db2_reservedwords[180] := 'GLOBAL';
+  db2_reservedwords[181] := 'GO';
+  db2_reservedwords[182] := 'GOTO';
+  db2_reservedwords[183] := 'GRANT';
+  db2_reservedwords[184] := 'GRAPHIC';
+  db2_reservedwords[185] := 'GROUP';
+  db2_reservedwords[186] := 'GROUPING';
+  db2_reservedwords[187] := 'HANDLER';
+  db2_reservedwords[188] := 'HASH';
+  db2_reservedwords[189] := 'HASHED_VALUE';
+  db2_reservedwords[190] := 'HAVING';
+  db2_reservedwords[191] := 'HINT';
+  db2_reservedwords[192] := 'HOLD';
+  db2_reservedwords[193] := 'HOUR';
+  db2_reservedwords[194] := 'HOURS';
+  db2_reservedwords[195] := 'IDENTITY';
+  db2_reservedwords[196] := 'IF';
+  db2_reservedwords[197] := 'IMMEDIATE';
+  db2_reservedwords[198] := 'IN';
+  db2_reservedwords[199] := 'INCLUDING';
+  db2_reservedwords[200] := 'INCLUSIVE';
+  db2_reservedwords[201] := 'INCREMENT';
+  db2_reservedwords[202] := 'INDEX';
+  db2_reservedwords[203] := 'INDICATOR';
+  db2_reservedwords[204] := 'INF';
+  db2_reservedwords[205] := 'INFINITY';
+  db2_reservedwords[206] := 'INHERIT';
+  db2_reservedwords[207] := 'INNER';
+  db2_reservedwords[208] := 'INOUT';
+  db2_reservedwords[209] := 'INSENSITIVE';
+  db2_reservedwords[210] := 'INSERT';
+  db2_reservedwords[211] := 'INT';
+  db2_reservedwords[212] := 'INTEGER';
+  db2_reservedwords[213] := 'INTEGRITY';
+  db2_reservedwords[214] := 'INTERSECT';
+  db2_reservedwords[215] := 'INTERSECTION';
+  db2_reservedwords[216] := 'INTERVAL';
+  db2_reservedwords[217] := 'INTO';
+  db2_reservedwords[218] := 'IS';
+  db2_reservedwords[219] := 'ISOBID';
+  db2_reservedwords[220] := 'ISOLATION';
+  db2_reservedwords[221] := 'ITERATE';
+  db2_reservedwords[222] := 'JAR';
+  db2_reservedwords[223] := 'JAVA';
+  db2_reservedwords[224] := 'JOIN';
+  db2_reservedwords[225] := 'KEEP';
+  db2_reservedwords[226] := 'KEY';
+  db2_reservedwords[227] := 'LABEL';
+  db2_reservedwords[228] := 'LANGUAGE';
+  db2_reservedwords[229] := 'LARGE';
+  db2_reservedwords[230] := 'LATERAL';
+  db2_reservedwords[231] := 'LC_CTYPE';
+  db2_reservedwords[232] := 'LEADING';
+  db2_reservedwords[233] := 'LEAVE';
+  db2_reservedwords[234] := 'LEFT';
+  db2_reservedwords[235] := 'LIKE';
+  db2_reservedwords[236] := 'LINKTYPE';
+  db2_reservedwords[237] := 'LN';
+  db2_reservedwords[238] := 'LOCAL';
+  db2_reservedwords[239] := 'LOCALDATE';
+  db2_reservedwords[240] := 'LOCALE';
+  db2_reservedwords[241] := 'LOCALTIME';
+  db2_reservedwords[242] := 'LOCALTIMESTAMP';
+  db2_reservedwords[243] := 'LOCATOR';
+  db2_reservedwords[244] := 'LOCATORS';
+  db2_reservedwords[245] := 'LOCK';
+  db2_reservedwords[246] := 'LOCKMAX';
+  db2_reservedwords[247] := 'LOCKSIZE';
+  db2_reservedwords[248] := 'LONG';
+  db2_reservedwords[249] := 'LOOP';
+  db2_reservedwords[250] := 'LOWER';
+  db2_reservedwords[251] := 'MAINTAINED';
+  db2_reservedwords[252] := 'MATCH';
+  db2_reservedwords[253] := 'MATERIALIZED';
+  db2_reservedwords[254] := 'MAX';
+  db2_reservedwords[255] := 'MAXVALUE';
+  db2_reservedwords[256] := 'MEMBER';
+  db2_reservedwords[257] := 'MERGE';
+  db2_reservedwords[258] := 'METHOD';
+  db2_reservedwords[259] := 'MICROSECOND';
+  db2_reservedwords[260] := 'MICROSECONDS';
+  db2_reservedwords[261] := 'MIN';
+  db2_reservedwords[262] := 'MINUTE';
+  db2_reservedwords[263] := 'MINUTES';
+  db2_reservedwords[264] := 'MINVALUE';
+  db2_reservedwords[265] := 'MOD';
+  db2_reservedwords[266] := 'MODE';
+  db2_reservedwords[267] := 'MODIFIES';
+  db2_reservedwords[268] := 'MODULE';
+  db2_reservedwords[269] := 'MONTH';
+  db2_reservedwords[270] := 'MONTHS';
+  db2_reservedwords[271] := 'MULTISET';
+  db2_reservedwords[272] := 'NAN';
+  db2_reservedwords[273] := 'NATIONAL';
+  db2_reservedwords[274] := 'NATURAL';
+  db2_reservedwords[275] := 'NCHAR';
+  db2_reservedwords[276] := 'NCLOB';
+  db2_reservedwords[277] := 'NEW';
+  db2_reservedwords[278] := 'NEW_TABLE';
+  db2_reservedwords[279] := 'NEXTVAL';
+  db2_reservedwords[280] := 'NO';
+  db2_reservedwords[281] := 'NOCACHE';
+  db2_reservedwords[282] := 'NOCYCLE';
+  db2_reservedwords[283] := 'NODENAME';
+  db2_reservedwords[284] := 'NODENUMBER';
+  db2_reservedwords[285] := 'NOMAXVALUE';
+  db2_reservedwords[286] := 'NOMINVALUE';
+  db2_reservedwords[287] := 'NONE';
+  db2_reservedwords[288] := 'NOORDER';
+  db2_reservedwords[289] := 'NORMALIZE';
+  db2_reservedwords[290] := 'NORMALIZED';
+  db2_reservedwords[291] := 'NOT';
+  db2_reservedwords[292] := 'NULL';
+  db2_reservedwords[293] := 'NULLIF';
+  db2_reservedwords[294] := 'NULLS';
+  db2_reservedwords[295] := 'NUMERIC';
+  db2_reservedwords[296] := 'NUMPARTS';
+  db2_reservedwords[297] := 'OBID';
+  db2_reservedwords[298] := 'OCTET_LENGTH';
+  db2_reservedwords[299] := 'OF';
+  db2_reservedwords[300] := 'OLD';
+  db2_reservedwords[301] := 'OLD_TABLE';
+  db2_reservedwords[302] := 'ON';
+  db2_reservedwords[303] := 'ONLY';
+  db2_reservedwords[304] := 'OPEN';
+  db2_reservedwords[305] := 'OPTIMIZATION';
+  db2_reservedwords[306] := 'OPTIMIZE';
+  db2_reservedwords[307] := 'OPTION';
+  db2_reservedwords[308] := 'OR';
+  db2_reservedwords[309] := 'ORDER';
+  db2_reservedwords[310] := 'OUT';
+  db2_reservedwords[311] := 'OUTER';
+  db2_reservedwords[312] := 'OVER';
+  db2_reservedwords[313] := 'OVERLAPS';
+  db2_reservedwords[314] := 'OVERLAY';
+  db2_reservedwords[315] := 'OVERRIDING';
+  db2_reservedwords[316] := 'PACKAGE';
+  db2_reservedwords[317] := 'PADDED';
+  db2_reservedwords[318] := 'PAGESIZE';
+  db2_reservedwords[319] := 'PARAMETER';
+  db2_reservedwords[320] := 'PART';
+  db2_reservedwords[321] := 'PARTITION';
+  db2_reservedwords[322] := 'PARTITIONED';
+  db2_reservedwords[323] := 'PARTITIONING';
+  db2_reservedwords[324] := 'PARTITIONS';
+  db2_reservedwords[325] := 'PASSWORD';
+  db2_reservedwords[326] := 'PATH';
+  db2_reservedwords[327] := 'PERCENT_RANK';
+  db2_reservedwords[328] := 'PERCENTILE_CONT';
+  db2_reservedwords[329] := 'PERCENTILE_DISC';
+  db2_reservedwords[330] := 'PIECESIZE';
+  db2_reservedwords[331] := 'PLAN';
+  db2_reservedwords[332] := 'POSITION';
+  db2_reservedwords[333] := 'POWER';
+  db2_reservedwords[334] := 'PRECISION';
+  db2_reservedwords[335] := 'PREPARE';
+  db2_reservedwords[336] := 'PREVVAL';
+  db2_reservedwords[337] := 'PRIMARY';
+  db2_reservedwords[338] := 'PRIQTY';
+  db2_reservedwords[339] := 'PRIVILEGES';
+  db2_reservedwords[340] := 'PROCEDURE';
+  db2_reservedwords[341] := 'PROGRAM';
+  db2_reservedwords[342] := 'PSID';
+  db2_reservedwords[343] := 'PUBLIC';
+  db2_reservedwords[344] := 'QUERY';
+  db2_reservedwords[345] := 'QUERYNO';
+  db2_reservedwords[346] := 'RANGE';
+  db2_reservedwords[347] := 'RANK';
+  db2_reservedwords[348] := 'READ';
+  db2_reservedwords[349] := 'READS';
+  db2_reservedwords[350] := 'REAL';
+  db2_reservedwords[351] := 'RECOVERY';
+  db2_reservedwords[352] := 'RECURSIVE';
+  db2_reservedwords[353] := 'REF';
+  db2_reservedwords[354] := 'REFERENCES';
+  db2_reservedwords[355] := 'REFERENCING';
+  db2_reservedwords[356] := 'REFRESH';
+  db2_reservedwords[357] := 'REGR_AVGX';
+  db2_reservedwords[358] := 'REGR_AVGY';
+  db2_reservedwords[359] := 'REGR_COUNT';
+  db2_reservedwords[360] := 'REGR_INTERCEPT';
+  db2_reservedwords[361] := 'REGR_R2';
+  db2_reservedwords[362] := 'REGR_SLOPE';
+  db2_reservedwords[363] := 'REGR_SXX';
+  db2_reservedwords[364] := 'REGR_SXY';
+  db2_reservedwords[365] := 'REGR_SYY';
+  db2_reservedwords[366] := 'RELEASE';
+  db2_reservedwords[367] := 'RENAME';
+  db2_reservedwords[368] := 'REPEAT';
+  db2_reservedwords[369] := 'RESET';
+  db2_reservedwords[370] := 'RESIGNAL';
+  db2_reservedwords[371] := 'RESTART';
+  db2_reservedwords[372] := 'RESTRICT';
+  db2_reservedwords[373] := 'RESULT';
+  db2_reservedwords[374] := 'RESULT_SET_LOCATOR';
+  db2_reservedwords[375] := 'RETURN';
+  db2_reservedwords[376] := 'RETURNS';
+  db2_reservedwords[377] := 'REVOKE';
+  db2_reservedwords[378] := 'RIGHT';
+  db2_reservedwords[379] := 'ROLE';
+  db2_reservedwords[380] := 'ROLLBACK';
+  db2_reservedwords[381] := 'ROLLUP';
+  db2_reservedwords[382] := 'ROUND_CEILING';
+  db2_reservedwords[383] := 'ROUND_DOWN';
+  db2_reservedwords[384] := 'ROUND_FLOOR';
+  db2_reservedwords[385] := 'ROUND_HALF_DOWN';
+  db2_reservedwords[386] := 'ROUND_HALF_EVEN';
+  db2_reservedwords[387] := 'ROUND_HALF_UP';
+  db2_reservedwords[388] := 'ROUND_UP';
+  db2_reservedwords[389] := 'ROUTINE';
+  db2_reservedwords[390] := 'ROW';
+  db2_reservedwords[391] := 'ROW_NUMBER';
+  db2_reservedwords[392] := 'ROWNUMBER';
+  db2_reservedwords[393] := 'ROWS';
+  db2_reservedwords[394] := 'ROWSET';
+  db2_reservedwords[395] := 'RRN';
+  db2_reservedwords[396] := 'RUN';
+  db2_reservedwords[397] := 'SAVEPOINT';
+  db2_reservedwords[398] := 'SCHEMA';
+  db2_reservedwords[399] := 'SCOPE';
+  db2_reservedwords[400] := 'SCRATCHPAD';
+  db2_reservedwords[401] := 'SCROLL';
+  db2_reservedwords[402] := 'SEARCH';
+  db2_reservedwords[403] := 'SECOND';
+  db2_reservedwords[404] := 'SECONDS';
+  db2_reservedwords[405] := 'SECQTY';
+  db2_reservedwords[406] := 'SECURITY';
+  db2_reservedwords[407] := 'SELECT';
+  db2_reservedwords[408] := 'SENSITIVE';
+  db2_reservedwords[409] := 'SEQUENCE';
+  db2_reservedwords[410] := 'SESSION';
+  db2_reservedwords[411] := 'SESSION_USER';
+  db2_reservedwords[412] := 'SET';
+  db2_reservedwords[413] := 'SIGNAL';
+  db2_reservedwords[414] := 'SIMILAR';
+  db2_reservedwords[415] := 'SIMPLE';
+  db2_reservedwords[416] := 'SMALLINT';
+  db2_reservedwords[417] := 'SNAN';
+  db2_reservedwords[418] := 'SOME';
+  db2_reservedwords[419] := 'SOURCE';
+  db2_reservedwords[420] := 'SPECIFIC';
+  db2_reservedwords[421] := 'SPECIFICTYPE';
+  db2_reservedwords[422] := 'SQL';
+  db2_reservedwords[423] := 'SQLEXCEPTION';
+  db2_reservedwords[424] := 'SQLID';
+  db2_reservedwords[425] := 'SQLSTATE';
+  db2_reservedwords[426] := 'SQLWARNING';
+  db2_reservedwords[427] := 'SQRT';
+  db2_reservedwords[428] := 'STACKED';
+  db2_reservedwords[429] := 'STANDARD';
+  db2_reservedwords[430] := 'START';
+  db2_reservedwords[431] := 'STARTING';
+  db2_reservedwords[432] := 'STATEMENT';
+  db2_reservedwords[433] := 'STATIC';
+  db2_reservedwords[434] := 'STATMENT';
+  db2_reservedwords[435] := 'STAY';
+  db2_reservedwords[436] := 'STDDEV_POP';
+  db2_reservedwords[437] := 'STDDEV_SAMP';
+  db2_reservedwords[438] := 'STOGROUP';
+  db2_reservedwords[439] := 'STORES';
+  db2_reservedwords[440] := 'STYLE';
+  db2_reservedwords[441] := 'SUBMULTISET';
+  db2_reservedwords[442] := 'SUBSTRING';
+  db2_reservedwords[443] := 'SUM';
+  db2_reservedwords[444] := 'SUMMARY';
+  db2_reservedwords[445] := 'SYMMETRIC';
+  db2_reservedwords[446] := 'SYNONYM';
+  db2_reservedwords[447] := 'SYSFUN';
+  db2_reservedwords[448] := 'SYSIBM';
+  db2_reservedwords[449] := 'SYSPROC';
+  db2_reservedwords[450] := 'SYSTEM';
+  db2_reservedwords[451] := 'SYSTEM_USER';
+  db2_reservedwords[452] := 'TABLE';
+  db2_reservedwords[453] := 'TABLESAMPLE';
+  db2_reservedwords[454] := 'TABLESPACE';
+  db2_reservedwords[455] := 'THEN';
+  db2_reservedwords[456] := 'TIME';
+  db2_reservedwords[457] := 'TIMESTAMP';
+  db2_reservedwords[458] := 'TIMEZONE_HOUR';
+  db2_reservedwords[459] := 'TIMEZONE_MINUTE';
+  db2_reservedwords[460] := 'TO';
+  db2_reservedwords[461] := 'TRAILING';
+  db2_reservedwords[462] := 'TRANSACTION';
+  db2_reservedwords[463] := 'TRANSLATE';
+  db2_reservedwords[464] := 'TRANSLATION';
+  db2_reservedwords[465] := 'TREAT';
+  db2_reservedwords[466] := 'TRIGGER';
+  db2_reservedwords[467] := 'TRIM';
+  db2_reservedwords[468] := 'TRUE';
+  db2_reservedwords[469] := 'TRUNCATE';
+  db2_reservedwords[470] := 'TYPE';
+  db2_reservedwords[471] := 'UESCAPE';
+  db2_reservedwords[472] := 'UNDO';
+  db2_reservedwords[473] := 'UNION';
+  db2_reservedwords[474] := 'UNIQUE';
+  db2_reservedwords[475] := 'UNKNOWN';
+  db2_reservedwords[476] := 'UNNEST';
+  db2_reservedwords[477] := 'UNTIL';
+  db2_reservedwords[478] := 'UPDATE';
+  db2_reservedwords[479] := 'UPPER';
+  db2_reservedwords[480] := 'USAGE';
+  db2_reservedwords[481] := 'USER';
+  db2_reservedwords[482] := 'USING';
+  db2_reservedwords[483] := 'VALIDPROC';
+  db2_reservedwords[484] := 'VALUE';
+  db2_reservedwords[485] := 'VALUES';
+  db2_reservedwords[486] := 'VAR_POP';
+  db2_reservedwords[487] := 'VAR_SAMP';
+  db2_reservedwords[488] := 'VARCHAR';
+  db2_reservedwords[489] := 'VARIABLE';
+  db2_reservedwords[490] := 'VARIANT';
+  db2_reservedwords[491] := 'VARYING';
+  db2_reservedwords[492] := 'VCAT';
+  db2_reservedwords[493] := 'VERSION';
+  db2_reservedwords[494] := 'VIEW';
+  db2_reservedwords[495] := 'VOLATILE';
+  db2_reservedwords[496] := 'VOLUMES';
+  db2_reservedwords[497] := 'WHEN';
+  db2_reservedwords[498] := 'WHENEVER';
+  db2_reservedwords[499] := 'WHERE';
+  db2_reservedwords[500] := 'WHILE';
+  db2_reservedwords[501] := 'WIDTH_BUCKET';
+  db2_reservedwords[502] := 'WINDOW';
+  db2_reservedwords[503] := 'WITH';
+  db2_reservedwords[504] := 'WITHIN';
+  db2_reservedwords[505] := 'WITHOUT';
+  db2_reservedwords[506] := 'WLM';
+  db2_reservedwords[507] := 'WRITE';
+  db2_reservedwords[508] := 'XMLELEMENT';
+  db2_reservedwords[509] := 'XMLEXISTS';
+  db2_reservedwords[510] := 'XMLNAMESPACES';
+  db2_reservedwords[511] := 'YEAR';
+  db2_reservedwords[512] := 'YEARS';
+end;
+
+initialization
+  db2_InitializeReservedWords;
+finalization
+  db2_reservedwords := nil;
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDADBSessionManager.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDADBSessionManager.pas
new file mode 100644
index 0000000..8fcfc20
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDADBSessionManager.pas	
@@ -0,0 +1,394 @@
+unit uDADBSessionManager;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  {vcl:}SysUtils, Classes,
+  {RemObjects: SDK}uROSessions,
+  {Data Abstract:}uDAInterfaces, uDAClasses;
+
+type
+  TDAConvertGUIDEvent = function(Sender: TROCustomSessionManager; const aGUID: TGUID): string of object;
+  TDADBSessionManager = class(TROCustomSessionManager)
+  private
+    fSchema: TDASchema;
+    fDeleteSession: string;
+    fUpdateSession: string;
+    fInsertSession: string;
+    fGetSession: string;
+    fClearSessions: string;
+    fGetSessionCount: string;
+    fConnection: string;
+    fFieldNameSessionID: string;
+    fFieldNameCreated: string;
+    fFieldNameLastAccessed: string;
+    fFieldNameData: string;
+    fClearSessionsOnCreate: boolean;
+    fClearSessionsOnDestroy: boolean;
+    fGetAllSessionIDs: string;
+    fOnConvertGUID: TDAConvertGUIDEvent;
+    FForceTransaction: Boolean;
+    FNeedTransactionAction: Boolean;
+    procedure SetSchema(const Value: TDASchema);
+    { Private declarations }
+    procedure BeginTransaction(AConnection: IDAConnection);
+    procedure CommitTransaction(AConnection: IDAConnection);
+    procedure RollbackTransaction(AConnection: IDAConnection);
+    function GetConnection: IDAConnection;
+  protected
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+
+    function DoFindSession(const aSessionID: TGUID; aUpdateTime: Boolean): TROSession; override;
+    procedure DoDeleteSession(const aSessionID: TGUID; IsExpired: boolean); override;
+    procedure DoClearSessions(OnlyExpired: boolean); override;
+    function DoGetSessionCount: integer; override;
+    procedure DoReleaseSession(aSession: TROSession; NewSession: boolean); override;
+    procedure DoGetAllSessions(Dest: TStringList); override;
+
+    function DoConvertGUID(const aGUID: TGUID): string; virtual;
+  public
+    { Public declarations }
+    constructor Create(AOwner: TComponent); override;
+    destructor Destroy; override;
+    procedure CheckProperties; override;
+  published
+    property Schema: TDASchema read fSchema write SetSchema;
+
+    property FieldNameSessionID: string read fFieldNameSessionID write fFieldNameSessionID;
+    property FieldNameCreated: string read fFieldNameCreated write fFieldNameCreated;
+    property FieldNameLastAccessed: string read fFieldNameLastAccessed write fFieldNameLastAccessed;
+    property FieldNameData: string read fFieldNameData write fFieldNameData;
+
+    property InsertSessionCommand: string read fInsertSession write fInsertSession;
+    property UpdateSessionCommand: string read fUpdateSession write fUpdateSession;
+    property DeleteSessionCommand: string read fDeleteSession write fDeleteSession;
+    property ClearSessionsCommand: string read fClearSessions write fClearSessions;
+    property GetSessionCountDataSet: string read fGetSessionCount write fGetSessionCount;
+    property GetSessionDataSet: string read fGetSession write fGetSession;
+    property GetAllSessionIDsDataset: string read fGetAllSessionIDs write fGetAllSessionIDs;
+
+    property ClearSessionsOnCreate: boolean read fClearSessionsOnCreate write fClearSessionsOnCreate default true;
+    property ClearSessionsOnDestroy: boolean read fClearSessionsOnDestroy write fClearSessionsOnDestroy default true;
+
+    property Connection: string read fConnection write fConnection;
+    property OnConvertGUID: TDAConvertGUIDEvent read fOnConvertGUID write fOnConvertGUID;
+    property AutoTransaction: Boolean read FForceTransaction write FForceTransaction default false;
+    property SessionDuration;
+    property SessionCheckInterval;
+  end;
+
+implementation
+
+uses
+  uROClasses, uROTypes;
+
+constructor TDADBSessionManager.Create(AOwner: TComponent);
+begin
+  inherited Create(AOwner);
+  fClearSessionsOnDestroy := TRUE;
+  ClearSessionsOnCreate := TRUE;
+
+  fFieldNameSessionID := 'SessionID';
+  fFieldNameCreated := 'Created';
+  fFieldNameLastAccessed := 'LastAccessed';
+  fFieldNameData := 'Data';
+end;
+
+destructor TDADBSessionManager.Destroy;
+begin
+  Schema := nil;
+  inherited;
+end;
+
+procedure TDADBSessionManager.DoClearSessions(OnlyExpired: boolean);
+var
+  lCommand: IDASQLCommand;
+  lDataSet: IDADataset;
+  lConnection: IDAConnection;
+  lDate: TDateTime;
+  lFieldNameSessionID: integer;
+  lLastAccessIndex: integer;
+begin
+  if OnlyExpired then
+    lDate := ((Now * MinsPerDay) - SessionDuration) / MinsPerDay
+  else
+    lDate := Now + 30; // 30 days from now. Enough to say all! <G>
+  if Assigned(OnBeforeDeleteSession) then begin
+    lConnection := GetConnection;
+    lDataSet := Schema.NewDataset(lConnection, GetAllSessionIDsDataset);
+    BeginTransaction(lConnection);
+    try
+      lDataSet.Open;
+    except
+      RollbackTransaction(lConnection);
+      raise;
+    end;
+    CommitTransaction(lConnection);
+    lFieldNameSessionID:= lDataSet.FieldByName(FieldNameSessionID).Index;
+    lLastAccessIndex:= lDataSet.FieldByName(FieldNameLastAccessed).Index;
+    try
+      while not lDataSet.EOF do
+      try
+        if lDataSet.Fields[lLastAccessIndex].AsDateTime <= lDate then
+          DeleteSession(lDataSet.Fields[lFieldNameSessionID].AsGuid,OnlyExpired);
+      finally
+        lDataSet.Next;
+      end;
+    finally
+      lDataSet.Close();
+    end;
+  end
+  else begin
+    lConnection:=GetConnection;
+    lCommand := Schema.NewCommand(lConnection, ClearSessionsCommand);
+    lCommand.ParamByName(FieldNameLastAccessed).Value := lDate;
+    BeginTransaction(lConnection);
+    try
+      lCommand.Execute();
+    except
+      RollbackTransaction(lConnection);
+      Raise;
+    end;
+    CommitTransaction(lConnection);
+  end;
+end;
+
+procedure TDADBSessionManager.DoDeleteSession(const aSessionID: TGUID; IsExpired: boolean);
+var
+  lCommand: IDASQLCommand;
+  lConnection: IDAConnection;
+begin
+  {$IFDEF FPC}
+  if IsExpired then lConnection := GetConnection else // remove warning
+  {$ENDIF}
+  lConnection := GetConnection;
+  lCommand := Schema.NewCommand(lConnection, DeleteSessionCommand);
+  lCommand.ParamByName(FieldNameSessionID).Value := DoConvertGUID(aSessionID);
+  BeginTransaction(lConnection);
+  try
+    lCommand.Execute();
+  except
+    RollbackTransaction(lConnection);
+    raise;
+  end;
+  CommitTransaction(lConnection);
+end;
+
+function TDADBSessionManager.DoFindSession(const aSessionID: TGUID; aUpdateTime: Boolean): TROSession;
+var
+  lDataSet: IDADataSet;
+  lData: Binary;
+  lDataField: TDAField;
+  lConnection: IDAConnection;
+begin
+  {$IFDEF FPC}
+  if aUpdateTime then result := nil else //remove warning
+  {$ENDIF}
+  result := nil;
+
+  lConnection := GetConnection;
+  lDataSet := Schema.NewDataset(lConnection, GetSessionDataSet);
+  lDataSet.ParamByName(FieldNameSessionID).AsString := DoConvertGUID(aSessionID);
+
+  BeginTransaction(lConnection);
+  try
+    lDataSet.Open;
+  except
+    RollbackTransaction(lConnection);
+    raise;
+  end;
+  CommitTransaction(lConnection);
+
+  try
+    if lDataSet.EOF then Exit;
+
+    result := DoCreateSession(aSessionID);
+    result.Created := lDataSet.FieldByName(FieldNameCreated).AsDateTime;
+    result.LastAccessed := lDataSet.FieldByName(FieldNameLastAccessed).AsDateTime;
+
+    lData := Binary.Create;
+    try
+      lDataField := lDataSet.FieldByName(fFieldNameData);
+      lDataField.SaveToStream(NewROStream(lData, false));
+      //lData := BinaryFromVariant(lDataSet.FieldByName(FieldNameData).Value);
+      //try
+      lData.Seek(0, soFromBeginning);
+      result.LoadFromStream(lData, true);
+    finally
+      lData.Free;
+    end;
+  finally
+    lDataSet.Close();
+  end;
+end;
+
+procedure TDADBSessionManager.DoGetAllSessions(Dest: TStringList);
+var
+  lDataSet: IDADataSet;
+  lConnection: IDAConnection;
+begin
+  lConnection := GetConnection;
+
+  lDataSet := Schema.NewDataset(lConnection, GetAllSessionIDsDataset);
+  BeginTransaction(lConnection);
+  try
+    lDataSet.Open;
+  except
+    RollbackTransaction(lConnection);
+    raise;
+  end;
+  CommitTransaction(lConnection);
+
+  try
+    while not lDataSet.EOF do try
+      Dest.Add(lDataSet.Fields[0].AsString);
+    finally
+      lDataSet.Next;
+    end;
+  finally
+    lDataSet.Close();
+  end;
+end;
+
+function TDADBSessionManager.DoGetSessionCount: integer;
+var
+  lDataSet: IDADataSet;
+  lConnection: IDAConnection;
+begin
+  lConnection := GetConnection;
+  lDataSet := Schema.NewDataset(lConnection, GetSessionCountDataSet);
+  BeginTransaction(lConnection);
+  try
+    lDataSet.Open;
+  except
+    RollbackTransaction(lConnection);
+    raise;
+  end;
+  CommitTransaction(lConnection);
+  try
+    result := lDataSet.Fields[0].AsInteger;
+  finally
+    lDataSet.Close();
+  end;
+end;
+
+procedure TDADBSessionManager.DoReleaseSession(aSession: TROSession; NewSession: boolean);
+var
+  lCommand: IDASQLCommand;
+  lData: Binary;
+  lConnection: IDAConnection;
+begin
+  inherited;
+  lConnection := GetConnection;
+  if NewSession then begin
+    lCommand := Schema.NewCommand(lConnection, InsertSessionCommand);
+    lCommand.ParamByName(FieldNameCreated).AsDateTime := aSession.Created;
+  end
+  else begin
+    lCommand := Schema.NewCommand(lConnection, UpdateSessionCommand);
+  end;
+  lCommand.ParamByName(FieldNameSessionID).AsString := DoConvertGUID(aSession.SessionID);
+  lCommand.ParamByName(FieldNameLastAccessed).AsDateTime := aSession.LastAccessed;
+  lData := Binary.Create;
+  try
+    aSession.SaveToStream(lData, TRUE);
+    lData.Seek(0, soFromBeginning);
+    lCommand.ParamByName(FieldNameData).LoadFromStream(NewROStream(lData, false));
+  finally
+    lData.Free;
+  end;
+  BeginTransaction(lConnection);
+  try
+    lCommand.Execute();
+  except
+    RollbackTransaction(lConnection);
+    raise;
+  end;
+  CommitTransaction(lConnection);
+  if ((NewSession) and (Assigned(OnSessionCreated))) then OnSessionCreated(aSession);
+  aSession.Free();
+end;
+
+procedure TDADBSessionManager.Notification(AComponent: TComponent; Operation: TOperation);
+begin
+  inherited;
+  if Operation <> opRemove then exit;
+  if AComponent = Schema then Schema := nil;
+end;
+
+procedure TDADBSessionManager.SetSchema(const Value: TDASchema);
+begin
+  if fSchema <> Value then begin
+    fSchema := Value;
+    if Assigned(Schema) then Schema.FreeNotification(self);
+  end;
+end;
+
+function TDADBSessionManager.DoConvertGUID(const aGUID: TGUID): string;
+begin
+  if Assigned(fOnConvertGUID) then
+    try
+      Result:= fOnConvertGUID(Self, aGUID);
+    except
+      Result:= GUIDToString(aGUID);
+    end
+  else
+    Result:= GUIDToString(aGUID);
+end;
+
+procedure TDADBSessionManager.BeginTransaction(AConnection: IDAConnection);
+begin
+  with AConnection do begin
+    FNeedTransactionAction := FForceTransaction and not InTransaction;
+    if FNeedTransactionAction then BeginTransaction;
+  end;
+end;
+
+procedure TDADBSessionManager.CommitTransaction(AConnection: IDAConnection);
+begin
+  if FNeedTransactionAction then AConnection.CommitTransaction;
+end;
+
+procedure TDADBSessionManager.RollbackTransaction(AConnection: IDAConnection);
+begin
+ if FNeedTransactionAction then AConnection.RollbackTransaction;
+end;
+
+function TDADBSessionManager.GetConnection: IDAConnection;
+begin
+  CheckProperties;
+  Result := Schema.ConnectionManager.NewConnection(Connection);
+end;
+
+procedure TDADBSessionManager.CheckProperties;
+begin
+  Check(Schema = nil, Name+'.Schema must be assigned.');
+  Schema.CheckProperties;
+  Check(FieldNameSessionID = '', Name + '.FieldNameSessionID must be set.');
+  Check(FieldNameCreated = '', Name + '.FieldNameCreated must be set.');
+  Check(FieldNameLastAccessed = '', Name + '.FieldNameLastAccessed must be assigned.');
+  Check(FieldNameData = '', Name + '.FieldNameData must be set.');
+  Check(InsertSessionCommand = '', Name + '.InsertSessionCommand must be set.');
+  Check(DeleteSessionCommand = '', Name + '.DeleteSessionCommand must be set.');
+  Check(UpdateSessionCommand = '', Name + '.UpdateSessionCommand must be set.');
+  Check(ClearSessionsCommand = '', Name + '.ClearSessionsCommand must be set.');
+  Check(GetSessionCountDataSet = '', Name + '.GetSessionCountDataSet must be set.');
+  Check(GetSessionDataSet = '', Name + '.GetSessionDataSet must be set.');
+  Check(GetAllSessionIDsDataset = '', Name + '.GetAllSessionIDsDataset must be set.');
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDADataStreamer.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDADataStreamer.pas
new file mode 100644
index 0000000..578f23c
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDADataStreamer.pas	
@@ -0,0 +1,662 @@
+unit uDADataStreamer;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  Classes, SysUtils,
+  uRODL, uROClasses, uROClientIntf,
+  uDAInterfaces, uDAEngine, uDADelta,
+  DataAbstract3_Intf, DataAbstract4_Intf;
+
+const
+  AllRows = -1;
+  DEFAULT_BUFFER_SIZE = 262144; //256kb
+
+type
+  TDADataForAppend = class
+  public
+    TableSchema: TDADataset;
+    EndDataPosition: Integer;
+    CountOfRecordsPosition: Integer;
+    RecordCount: Integer;
+    MaxRowCount: Integer;
+    RealFields: array of integer;
+  end;
+
+type
+  TDAAdapterInitialization = (aiUnknown, aiRead, aiReadFromBeginning, aiWrite);
+
+  TDAWriteOption = (woRows, woSchema);
+  TDAWriteOptions = set of TDAWriteOption;
+
+const
+  AdapterReadModes = [aiRead, aiReadFromBeginning];
+  AdapterWriteModes = [aiWrite];
+
+type
+  TDADataStreamer = class;
+
+  TDADatasetOperation = procedure(DataStreamer: TDADataStreamer; const Datasetname: string; const Dataset: IDADataset) of object;
+  TDADeltaOperation = procedure(DataStreamer: TDADataStreamer; const DeltaName: string; const Delta: IDADelta) of object;
+
+  TDAReadWriteFieldValue = procedure(const aField: TDAField; var Value: Variant) of object;
+  TDADataStreamerDeltaProgress = procedure(Sender: TDADataStreamer; const aDelta: IDADelta; const aCurrent, aTotal: Integer) of object;
+  TDADataStreamerReadDatasetProgress = procedure(Sender: TDADataStreamer; const aDataset: IDADataset; const aCurrent, aTotal: Integer) of object;
+  TDADataStreamerWriteDatasetProgress = procedure(Sender: TDADataStreamer; const aDataset: IDADataset; const aCurrent, aMaxRecords: Integer) of object;
+
+  { TDADataStreamer }
+  TDADataStreamer = class(TComponent)
+  private
+    fDeltaNames,
+    fDatasetNames: TStringList;
+
+    fOnInitialized,
+    fOnFinalized: TNotifyEvent;
+
+    fOnWriteDataset,
+    fOnReadDataset: TDADatasetOperation;
+
+    fOnWriteDelta,
+    fOnReadDelta: TDADeltaOperation;
+
+    fOnWriteFieldValue,
+    fOnReadFieldValue,
+    fOnBeforeFieldValueSerialization: TDAReadWriteFieldValue;
+
+    fBusy: boolean;
+    fAdapterInitialization: TDAAdapterInitialization;
+    fData: TStream;
+    FBufferSize: cardinal;
+    FSendReducedDelta: boolean;
+    fOnReadDeltaProgress: TDADataStreamerDeltaProgress;
+    fOnReadDatasetProgress: TDADataStreamerReadDatasetProgress;
+    fOnWriteDeltaProgress: TDADataStreamerDeltaProgress;
+    fOnWriteDatasetProgress: TDADataStreamerWriteDatasetProgress;
+
+    function GetDatasetCount: integer;
+    function GetDatasetNames(Index: integer): string;
+    function GetDeltaCount: integer;
+    function GetDeltaNames(Index: integer): string;
+    procedure ClearReferences;
+    procedure CheckCanRead;
+    procedure CheckCanWrite;
+    function GetDatasetInfoObjects(Index: integer): TObject;
+    function GetDeltaInfoObjects(Index: integer): TObject;
+    procedure SetAdapterInitialization(const Value: TDAAdapterInitialization);
+
+  protected
+    // To override
+    function DoCreateStream: TStream; virtual; abstract;
+    procedure DoInitialize(Mode: TDAAdapterInitialization); virtual; abstract;
+    procedure DoFinalize; virtual; abstract;
+
+    function DoWriteDataset(const Source: IDADataset;
+                            Options: TDAWriteOptions;
+                            MaxRows: integer): integer;overload;
+
+    function DoWriteDataset(const Source: IDADataset;
+                            Options: TDAWriteOptions;
+                            MaxRows: integer;
+                            ADynFieldNames: array of string): integer; overload; virtual; abstract;
+
+    procedure DoWriteDelta(const Source: IDADelta); virtual; abstract;
+
+    procedure DoReadDataset(const DatasetName: string;
+                            const Destination: IDADataset;
+                            ApplySchema: boolean); virtual;
+
+    procedure DoReadDelta(const DeltaName: string;
+                          const Destination: IDADelta); virtual; abstract;
+
+    function DoBeginWriteDataset( const Source: IDADataset; const Schema: TDADataset;
+                                  Options: TDAWriteOptions; MaxRows: integer;
+                                  ADynFieldNames: array of string): TDADataForAppend; virtual; abstract;
+
+    function DoWriteDatasetData(const Source: IDADataset; var aDataForAppend: TDADataForAppend; aUnionSourceIndex: Integer = -1): Integer; virtual; abstract;
+    function DoEndWriteDataset(aDataForAppend: TDADataForAppend): Integer;virtual; abstract;
+
+
+    // Internal
+    procedure AddingDataset(const aDatasetName: string; InfoObject: TObject = nil);
+    procedure AddingDelta(const aDeltaName: string; InfoObject: TObject = nil);
+
+    property AdapterInitialization: TDAAdapterInitialization read fAdapterInitialization write SetAdapterInitialization;
+
+    property Data: TStream read fData;
+    property DatasetInfoObjects[Index: integer]: TObject read GetDatasetInfoObjects;
+    property DeltaInfoObjects[Index: integer]: TObject read GetDeltaInfoObjects;
+    procedure SetBufferSize(const Value: cardinal); virtual;
+  public
+    constructor Create(aOwner: TComponent); override;
+    destructor Destroy; override;
+
+    // Initialization methods
+    procedure Initialize({var }Stream: TStream; Mode: TDAAdapterInitialization);
+    procedure Finalize;
+
+    // Writing methods
+    function WriteDataset(const Source: IDADataset;
+      Options: TDAWriteOptions;
+      MaxRows: integer;
+      ADynFieldNames: array of string): integer; overload;
+
+    function WriteDataset(const Source: IDADataset;
+      Options: TDAWriteOptions;
+      MaxRows: integer = AllRows): integer; overload;
+
+    function WriteDataset(Stream: TStream;
+      const Source: IDADataset;
+      Options: TDAWriteOptions;
+      MaxRows: integer = AllRows): integer; overload;
+
+    function WriteDataset(Stream: TStream;
+      const Schema: IDASchema;
+      const Connection: IDAConnection;
+      const DatasetName: string;
+      const ParamNames: array of string;
+      const ParamValues: array of Variant;
+      InitializeStream: boolean = TRUE;
+      FinalizeStream: boolean = TRUE;
+      MaxRows: integer = AllRows): integer; overload;
+
+    function WriteDataset(Stream: TStream;
+      const Schema: IDASchema;
+      const Connection: IDAConnection;
+      const DatasetName: string;
+      InitializeStream: boolean = TRUE;
+      FinalizeStream: boolean = TRUE;
+      MaxRows: integer = AllRows): integer; overload;
+
+    procedure WriteDelta(const Source: IDADataset); overload;
+    procedure WriteDelta(const Source: IDADelta); overload;
+    procedure WriteDelta(Stream: TStream; const Source: IDADataset); overload;
+
+    // Reading methods
+    procedure ReadDelta(const DeltaName: string; const Destination: IDADelta); overload;
+    function ReadDelta(const DeltaName: string): IDADelta; overload;
+    procedure ReadDelta(const Destination: IDADataset); overload;
+    procedure ReadDelta(Stream: TStream;
+      const Destination: IDADelta;
+      DeltaName: string = '';
+      ReadFromBeginning: boolean = TRUE); overload;
+
+    procedure ReadDataset(const DatasetName: string;
+      const Destination: IDADataset;
+      ApplySchema: boolean = FALSE;
+      LoadRecords: boolean = TRUE); overload;
+    procedure ReadDataset(Stream: TStream;
+      const Destination: IDADataset;
+      ApplySchema: boolean = FALSE;
+      DatasetName: string = '';
+      LoadRecords: boolean = TRUE;
+      ReadFromBeginning: boolean = TRUE); overload;
+
+    function BeginWriteDataset(const Source: IDADataset; const Schema: TDADataset;
+                                  Options: TDAWriteOptions; MaxRows: integer;
+                                  ADynFieldNames: array of string): TDADataForAppend;
+    function WriteDatasetData(const Source: IDADataset; var aDataForAppend: TDADataForAppend; aUnionSourceIndex: Integer = -1): Integer;
+    function EndWriteDataset(aDataForAppend: TDADataForAppend): Integer;
+
+
+    // Misc
+    function FindDatasetIndex(const aName: string): integer;
+    function FindDeltaIndex(const aName: string): integer;
+
+    function GetDatasetIndex(const aName: string): integer;
+    function GetDeltaIndex(const aName: string): integer;
+
+    function GetTargetDataType: TRODataType; virtual; abstract;
+    function HasReducedDelta: Boolean; virtual;
+    property DatasetCount: integer read GetDatasetCount;
+    property DatasetNames[Index: integer]: string read GetDatasetNames;
+
+    property DeltaCount: integer read GetDeltaCount;
+    property DeltaNames[Index: integer]: string read GetDeltaNames;
+
+    property TargetDataType: TRODataType read GetTargetDataType;
+    property BufferSize: Cardinal read FBufferSize write SetBufferSize default DEFAULT_BUFFER_SIZE;
+    property SendReducedDelta: boolean read FSendReducedDelta write FSendReducedDelta default False;
+  published
+    property OnInitialized: TNotifyEvent read fOnInitialized write fOnInitialized;
+    property OnFinalized: TNotifyEvent read fOnFinalized write fOnFinalized;
+
+    property OnReadDataset: TDADatasetOperation read fOnReadDataset write fOnReadDataset;
+    property OnWriteDataset: TDADatasetOperation read fOnWriteDataset write fOnWriteDataset;
+
+    property OnReadDelta: TDADeltaOperation read fOnReadDelta write fOnReadDelta;
+    property OnWriteDelta: TDADeltaOperation read fOnWriteDelta write fOnWriteDelta;
+
+    property OnReadFieldValue: TDAReadWriteFieldValue read fOnReadFieldValue write fOnReadFieldValue;
+    property OnWriteFieldValue: TDAReadWriteFieldValue read fOnWriteFieldValue write fOnWriteFieldValue;
+    property OnBeforeFieldValueSerialization: TDAReadWriteFieldValue read fOnBeforeFieldValueSerialization write fOnBeforeFieldValueSerialization;
+    property OnReadDeltaProgress: TDADataStreamerDeltaProgress read fOnReadDeltaProgress write fOnReadDeltaProgress;
+    property OnWriteDeltaProgress: TDADataStreamerDeltaProgress read fOnWriteDeltaProgress write fOnWriteDeltaProgress;
+    property OnReadDatasetProgress: TDADataStreamerReadDatasetProgress read fOnReadDatasetProgress write fOnReadDatasetProgress;
+    property OnWriteDatasetProgress: TDADataStreamerWriteDatasetProgress read fOnWriteDatasetProgress write fOnWriteDatasetProgress;
+  end;
+
+  TDADataAdapter = TDADataStreamer;
+
+implementation
+
+{ TDADataStreamer }
+
+constructor TDADataStreamer.Create(aOwner: TComponent);
+begin
+  inherited;
+  FBufferSize := DEFAULT_BUFFER_SIZE;
+  fDeltaNames := TStringList.Create;
+  { Doesn't work correctly because it messes up the order in which the server processes the deltas!!!!
+  Fixed the methods that add elements to this down.
+
+  fDeltaNames.Sorted := TRUE;
+  fDeltaNames.Duplicates := dupError;}
+
+  fDatasetNames := TStringList.Create;
+  { Fixed for consistency with the above
+
+  fDatasetNames.Sorted := TRUE;
+  fDatasetNames.Duplicates := dupError;}
+end;
+
+destructor TDADataStreamer.Destroy;
+begin
+  ClearReferences;
+
+  FreeAndNIL(fDeltaNames);
+  FreeAndNIL(fDatasetNames);
+
+  inherited;
+end;
+
+function TDADataStreamer.GetDatasetCount: integer;
+begin
+  result := fDatasetNames.Count;
+end;
+
+function TDADataStreamer.GetDatasetNames(Index: integer): string;
+begin
+  result := fDatasetNames[Index];
+end;
+
+function TDADataStreamer.GetDeltaCount: integer;
+begin
+  result := fDeltaNames.Count;
+end;
+
+function TDADataStreamer.GetDeltaNames(Index: integer): string;
+begin
+  result := fDeltaNames[Index];
+end;
+
+procedure TDADataStreamer.ClearReferences;
+var
+  i: integer;
+begin
+  for i := 0 to (fDatasetNames.Count - 1) do
+    if (fDatasetNames.Objects[i] <> nil) then fDatasetNames.Objects[i].Free;
+
+  fDatasetNames.Clear;
+
+  for i := 0 to (fDeltaNames.Count - 1) do
+    if (fDeltaNames.Objects[i] <> nil) then fDeltaNames.Objects[i].Free;
+
+  fDeltaNames.Clear;
+end;
+
+procedure TDADataStreamer.Initialize({var }Stream: TStream; Mode: TDAAdapterInitialization);
+begin
+  if fBusy then
+    raise EDAException.Create('Cannot Initialize Streamer that is already in use.');
+
+  ClearReferences;
+  fAdapterInitialization := aiUnknown;
+  fData := nil;
+
+  if Mode = aiUnknown then raise Exception.Create('Invalid DataStreamer initialization parameter.');
+  if (Stream = nil) then raise Exception.Create('Stream parameter must assigned.');
+  if (Mode in AdapterReadModes) and (Stream.Size = 0) then raise Exception.Create('Stream may not me empty for Read mode.');
+
+  try
+    if (Mode = aiReadFromBeginning) then Stream.Position := 0;
+
+    // Sets internal references
+    fData := Stream;
+    AdapterInitialization := Mode;
+
+    fDatasetNames.Clear;
+
+    DoInitialize(Mode); // Calls descendant's implementation
+
+    if Assigned(fOnInitialized) then fOnInitialized(Self);
+
+    fBusy := true;
+  except
+    ClearReferences;
+    raise;
+  end;
+end;
+
+procedure TDADataStreamer.Finalize;
+begin
+  DoFinalize; // Calls descendant's implementation
+
+  if Assigned(fOnFinalized) then fOnFinalized(Self);
+  fBusy := false;
+end;
+
+procedure TDADataStreamer.CheckCanRead;
+begin
+  if not (AdapterInitialization in AdapterReadModes) then raise Exception.Create('Adapter was not initialized for this operation');
+end;
+
+procedure TDADataStreamer.CheckCanWrite;
+begin
+  if not (AdapterInitialization in AdapterWriteModes) then raise Exception.Create('Adapter was not initialized for this operation');
+end;
+
+procedure TDADataStreamer.ReadDelta(const DeltaName: string;
+  const Destination: IDADelta);
+begin
+  CheckCanRead;
+  if Assigned(fOnReadDelta) then fOnReadDelta(Self, DeltaName, Destination);
+
+  DoReadDelta(DeltaName, Destination); // Calls descendant's implementation
+end;
+
+function TDADataStreamer.WriteDataset(const Source: IDADataset; Options: TDAWriteOptions;
+  MaxRows: integer = AllRows): integer;
+begin
+  Result := WriteDataset(Source, Options,  MaxRows, []);
+end;
+
+procedure TDADataStreamer.WriteDelta(const Source: IDADataset);
+var
+  deltaowner: IDADeltaOwner;
+  delta: IDADelta;
+begin
+  if not Supports(Source, IDADeltaOwner, deltaowner)
+    then raise Exception.Create('Source does not have a delta')
+    else delta := deltaowner.GetDelta;
+
+  CheckCanWrite;
+  if Assigned(fOnWriteDelta) then fOnWriteDelta(Self, delta.LogicalName, delta);
+
+  DoWriteDelta(delta); // Calls descendant's implementation
+end;
+
+procedure TDADataStreamer.AddingDataset(const aDatasetName: string; InfoObject: TObject = nil);
+var i : integer;
+begin
+  i := fDatasetNames.IndexOf(aDatasetName);
+  if (i>=0)
+    then raise Exception.Create('A dataset called "'+aDatasetName+'" is already present')
+    else fDatasetNames.AddObject(aDatasetName, InfoObject)
+end;
+
+procedure TDADataStreamer.AddingDelta(const aDeltaName: string; InfoObject: TObject = nil);
+var i : integer;
+begin
+  i := fDeltaNames.IndexOf(aDeltaName);
+  if (i>=0)
+    then raise Exception.Create('A delta called "'+aDeltaName+'" is already present')
+    else fDeltaNames.AddObject(aDeltaName, InfoObject)
+end;
+
+function TDADataStreamer.GetDatasetInfoObjects(Index: integer): TObject;
+begin
+  result := fDatasetNames.Objects[Index]
+end;
+
+function TDADataStreamer.GetDeltaInfoObjects(Index: integer): TObject;
+begin
+  result := fDeltaNames.Objects[Index]
+end;
+
+function TDADataStreamer.GetDatasetIndex(const aName: string): integer;
+begin
+  result := FindDatasetIndex(aName);
+  if (result = -1) then raise Exception.Create('Unknown dataset ' + aName);
+end;
+
+function TDADataStreamer.GetDeltaIndex(const aName: string): integer;
+begin
+  result := FindDeltaIndex(aName);
+  if (result = -1) then raise Exception.Create('Unknown delta ' + aName);
+end;
+
+procedure TDADataStreamer.ReadDataset(const DatasetName: string;
+  const Destination: IDADataset; ApplySchema: boolean = FALSE; LoadRecords: boolean = TRUE);
+var editable: IDAEditableDataset;
+begin
+  CheckCanRead;
+  if Assigned(fOnReadDataset) then fOnReadDataset(Self, DatasetName, Destination);
+
+  editable := Destination as IDAEditableDataset;
+
+  Destination.DisableControls;
+  try
+    editable.DisableEventHandlers;
+    try
+      if ApplySchema then begin
+        if Destination.Active then Destination.Close;
+        DoReadDataset(DatasetName, Destination, TRUE);
+      end;
+
+      if LoadRecords then
+        DoReadDataset(DatasetName, Destination, FALSE);
+    finally
+      editable.EnableEventHandlers;
+    end;
+    if LoadRecords then editable.Dataset.Resync([]);
+  finally
+    Destination.EnableControls;
+  end;
+end;
+
+procedure TDADataStreamer.ReadDataset(Stream: TStream;
+  const Destination: IDADataset;
+  ApplySchema: boolean = FALSE;
+  DatasetName: string = '';
+  LoadRecords: boolean = TRUE;
+  ReadFromBeginning: boolean = TRUE);
+var
+  nme: string;
+begin
+  if ReadFromBeginning then
+    Initialize(Stream, aiReadFromBeginning)
+  else
+    Initialize(Stream, aiRead);
+
+  try
+    if (DatasetName = '') then
+      nme := DatasetNames[0]
+    else
+      nme := DatasetName;
+
+    ReadDataset(nme, Destination, ApplySchema, LoadRecords);
+  finally
+    Finalize;
+  end;
+end;
+
+procedure TDADataStreamer.ReadDelta(Stream: TStream;
+  const Destination: IDADelta;
+  DeltaName: string = '';
+  ReadFromBeginning: boolean = TRUE);
+var
+  nme: string;
+begin
+  if ReadFromBeginning then
+    Initialize(Stream, aiReadFromBeginning)
+  else
+    Initialize(Stream, aiRead);
+
+  try
+    if (DeltaName <> '') then
+      nme := DeltaName
+    else
+      nme := DeltaNames[0];
+    ReadDelta(nme, Destination);
+  finally
+    Finalize;
+  end;
+end;
+
+function TDADataStreamer.WriteDataset(Stream: TStream;
+  const Source: IDADataset; Options: TDAWriteOptions;
+  MaxRows: integer): integer;
+begin
+  Initialize(Stream, aiWrite);
+  try
+    result := WriteDataset(Source, Options, MaxRows);
+  finally
+    Finalize;
+  end;
+end;
+
+procedure TDADataStreamer.WriteDelta(Stream: TStream;
+  const Source: IDADataset);
+begin
+  Initialize(Stream, aiWrite);
+  try
+    WriteDelta(Source);
+  finally
+    Finalize;
+  end;
+end;
+
+procedure TDADataStreamer.WriteDelta(const Source: IDADelta);
+begin
+  DoWriteDelta(Source);
+end;
+
+procedure TDADataStreamer.ReadDelta(const Destination: IDADataset);
+var
+  deltaowner: IDADeltaOwner;
+  delta: IDADelta;
+begin
+  if not Supports(Destination, IDADeltaOwner, deltaowner)
+    then raise Exception.Create('Destination does not have a delta')
+    else delta := deltaowner.GetDelta;
+
+  ReadDelta(delta.LogicalName, delta);
+end;
+
+function TDADataStreamer.WriteDataset(Stream: TStream;
+  const Schema: IDASchema; const Connection: IDAConnection;
+  const DatasetName: string; const ParamNames: array of string;
+  const ParamValues: array of Variant; InitializeStream: boolean = TRUE;
+  FinalizeStream: boolean = TRUE; MaxRows: integer = AllRows): integer;
+var
+  ds: IDADataset;
+begin
+  if InitializeStream then Initialize(Stream, aiWrite);
+  try
+    ds := Schema.NewDataset(Connection, DatasetName, ParamNames, ParamValues, TRUE);
+    result := WriteDataset(ds, [woRows], MaxRows);
+  finally
+    if FinalizeStream then Finalize;
+  end;
+end;
+
+function TDADataStreamer.WriteDataset(Stream: TStream;
+  const Schema: IDASchema; const Connection: IDAConnection;
+  const DatasetName: string; InitializeStream, FinalizeStream: boolean;
+  MaxRows: integer): integer;
+begin
+  result := WriteDataset(Stream, Schema, Connection, DatasetName, [], [],
+    InitializeStream, FinalizeStream, MaxRows);
+end;
+
+procedure TDADataStreamer.SetAdapterInitialization(
+  const Value: TDAAdapterInitialization);
+begin
+  fAdapterInitialization := Value;
+end;
+
+function TDADataStreamer.ReadDelta(const DeltaName: string): IDADelta;
+begin
+  result := NewDelta(DeltaName);
+  ReadDelta(DeltaName, Result);
+end;
+
+function TDADataStreamer.FindDatasetIndex(const aName: string): integer;
+begin
+  result := fDatasetNames.IndexOf(aName);
+end;
+
+function TDADataStreamer.FindDeltaIndex(const aName: string): integer;
+begin
+  result := fDeltaNames.IndexOf(aName);
+end;
+
+procedure TDADataStreamer.DoReadDataset(const DatasetName: string;
+  const Destination: IDADataset; ApplySchema: boolean);
+begin
+  if Destination.Active and ApplySchema then raise Exception.Create('Cannot apply a schema if the destination is active');
+end;
+
+procedure TDADataStreamer.SetBufferSize(const Value: cardinal);
+begin
+  FBufferSize := Value;
+end;
+
+function TDADataStreamer.HasReducedDelta: Boolean;
+begin
+  Result:=False;
+end;
+
+function TDADataStreamer.DoWriteDataset(const Source: IDADataset;
+  Options: TDAWriteOptions; MaxRows: integer): integer;
+begin
+  Result:= DoWriteDataset(Source, Options, MaxRows, []);
+end;
+
+function TDADataStreamer.WriteDataset(const Source: IDADataset;
+  Options: TDAWriteOptions; MaxRows: integer;
+  ADynFieldNames: array of string): integer;
+begin
+  CheckCanWrite;
+  if Assigned(fOnWriteDataset) then fOnWriteDataset(Self, Source.LogicalName, Source);
+
+  result := DoWriteDataset(Source, Options, MaxRows, ADynFieldNames); // Calls descendant's implementation
+end;
+
+function TDADataStreamer.BeginWriteDataset(const Source: IDADataset; const Schema: TDADataset;
+                                  Options: TDAWriteOptions; MaxRows: integer;
+                                  ADynFieldNames: array of string): TDADataForAppend;
+begin
+  result := DoBeginWriteDataset(Source, Schema, Options, MaxRows, ADynFieldNames); // Calls descendant's implementation
+end;
+
+function TDADataStreamer.WriteDatasetData(const Source: IDADataset; var aDataForAppend: TDADataForAppend; aUnionSourceIndex: Integer = -1): Integer;
+begin
+  CheckCanWrite;
+  if Assigned(fOnWriteDataset) then fOnWriteDataset(Self, Source.LogicalName, Source);
+
+  result := DoWriteDatasetData(Source, aDataForAppend, aUnionSourceIndex); // Calls descendant's implementation
+end;
+
+function TDADataStreamer.EndWriteDataset(aDataForAppend: TDADataForAppend): Integer;
+begin
+  result := DoEndWriteDataset(aDataForAppend); // Calls descendant's implementation
+end;
+
+
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDADataTable.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDADataTable.pas
new file mode 100644
index 0000000..07b8db4
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDADataTable.pas	
@@ -0,0 +1,5479 @@
+unit uDADataTable;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  Classes, DB, Contnrs, SysUtils,
+  {$IFDEF MSWINDOWS}ActiveX,{$ENDIF}
+  uRODL, uROTypes, uROClasses, uROClientIntf, uRODynamicRequest,uDAExpressionEvaluator,
+  uDAInterfaces, uDAClasses, uDAEngine, uDAScriptingProvider, uDADataStreamer, uDADelta,
+  DataAbstract3_Intf, DataAbstract4_Intf,uDAWhere;
+
+const
+  RecIDFieldName = 'RecID'; // Do not change!
+  AllChanges = [ctInsert, ctUpdate, ctDelete];
+
+type
+  TDADetailOption = (dtCascadeOpenClose,
+    dtCascadeApplyUpdates,
+    dtAutoFetch,
+    dtCascadeDelete,
+    dtCascadeUpdate,
+    dtDisableLogOfCascadeDeletes,
+    dtDisableLogOfCascadeUpdates,
+    dtIncludeInAllInOneFetch);
+  TDADetailOptions = set of TDADetailOption;
+
+  TDAMasterOption = (moCascadeOpenClose,
+    moCascadeApplyUpdates,
+    moCascadeDelete,
+    moCascadeUpdate,
+    moDisableLogOfCascadeDeletes,
+    moDisableLogOfCascadeUpdates,
+    moAllInOneFetch);
+
+  TDAMasterOptions = set of TDAMasterOption;
+
+const
+  DetailOptions_Default = [dtCascadeOpenClose,
+    dtCascadeApplyUpdates,
+    dtAutoFetch,
+    dtDisableLogOfCascadeDeletes,
+    dtIncludeInAllInOneFetch // Done to avoid breaking existing apps
+    ];
+
+  MasterOptions_Default = [moCascadeOpenClose,
+    moCascadeApplyUpdates,
+    moCascadeDelete];
+
+  DetailOptions_unused = [dtCascadeDelete,
+    dtCascadeUpdate,
+    dtDisableLogOfCascadeUpdates];
+
+  MasterOptions_unused = [moCascadeUpdate,
+    moDisableLogOfCascadeDeletes,
+    moDisableLogOfCascadeUpdates];
+type
+  //ToDo: remove and replace these three with TRO(Dynamic)Request*
+  TDARemoteRequest = TRODynamicRequest;
+  TDARemoteRequestParam = TRORequestParam;
+  TDARemoteRequestParams = TRORequestParamCollection;
+
+  { Other types }
+  float = double;
+  datetime = TDateTime;
+
+  TDADataTable = class;
+  TDatasetClass = class of TDataset;
+  TDADataTableRules = class;
+
+  TDADataTableNotifyEvent = procedure(DataTable: TDADataTable) of object;
+  TDADataTableFilterEvent = procedure(DataTable: TDADataTable; var Accept: Boolean) of object;
+  TDADataTableErrorEvent = procedure(DataTable: TDADataTable; Error: EDatabaseError; var Action: TDataAction) of object;
+  TDADataTableDynamicMethodEvent = procedure(DataTable: TDADataTable; const aMessage: IROMessage) of object;
+  TDADataTableRemoteRequestEvent = procedure(DataTable: TDADataTable; Request: TDARemoteRequest) of object;
+  TDADataTableDataChangeEvent = procedure(DataTable: TDADataTable; Field: TDAField) of object;
+  TDADataRequestStreamEvent = procedure(DataTable: TDADataTable; Stream: TStream) of object;
+
+  //TDADelta = class;
+
+  TDAApplyUpdatesError = procedure(DataTable: TDADataTable; const Delta: IDADelta; var Ignore: boolean) of object;
+  TDAAfterApplyUpdatesEvent =  procedure(DataTable: TDADataTable; const Delta: IDADelta) of object;
+  TDABeforeApplyUpdatesEvent =  procedure(DataTable: TDADataTable; const Delta: IDADelta) of object;
+
+  TDAStreamingOption = (soIgnoreStreamSchema, soDisableEventsWhileStreaming);
+  TDAStreamingOptions = set of TDAStreamingOption;
+
+  TDARemoteUpdatesOption = (ruoOnPost);
+  TDARemoteUpdatesOptions = set of TDARemoteUpdatesOption;
+
+  TDAFailureBehavior = (fbNone, fbRaiseException, fbShowReconcile, fbBoth);
+  TDAApplyUpdatesEvent = procedure(Sender: TObject; aTable: TDADataTable; const Delta: IDADelta) of object;
+  TDABeforeProcessFailuresEvent = procedure(Sender: TObject; aTablesList: TList; aFailedDeltas: TList; var aFailureBehavior: TDAFailureBehavior) of object;
+  TDAShowReconcleDialogEvent = procedure(Sender: TObject; var AFailedDeltaList: TList; aTableList: TList; var aHandled: boolean) of object;
+  TDAOnGenerateRecordMessage = procedure(Sender: TObject; aChange: TDADeltaChange; ADatatable: TDADataTable; var aMessage: string) of object;
+  TDAReconcileDialogAction = (rdlgNone,rdlgSkip,rdlgCancel, rdlgRepost, rdlgRevert);
+  TDAShowReconcileRecordInAppUIEvent = procedure(Sender: TObject; aChange: TDADeltaChange; aDatatable: TDADataTable; var aHandled: Boolean; var aAction: TDAReconcileDialogAction) of object;
+
+  TDATableOptions = record
+    // Fill
+    Bookmark: TBookMark;
+    GoFirst, OldLogChanges: boolean;
+    OldPos: cardinal;
+    // FillSchema
+    FieldHandlers : TStringList;
+  end;
+
+  TDABaseRemoteDataAdapter = class(TComponent)
+  private
+    FDataStreamer: TDADataStreamer;
+    fBeforeApplyUpdates, fAfterApplyUpdates: TDAApplyUpdatesEvent;
+    FFailureBehavior: TDAFailureBehavior;
+    fBeforeProcessFailures: TDABeforeProcessFailuresEvent;
+    fOnShowReconcleDialog: TDAShowReconcleDialogEvent;
+    FOnGenerateRecordMessage: TDAOnGenerateRecordMessage;
+    fOnShowReconcleRecordInAppUI: TDAShowReconcileRecordinAppUIEvent;
+    FDynamicSelect: Boolean;
+    fAutoFillScripts: Boolean;
+    procedure SetDataStreamer(const Value: TDADataStreamer);
+    procedure ThrowFailures(ATableList,AFailedDeltas:TList);
+  protected
+    function InternalFillSchema: TRODataType; virtual; abstract;
+    procedure InternalFillSchema_ClearParams; virtual;
+    function GetSchemaStream: Binary; virtual;
+    function GetSchema: TDASchema; virtual; abstract;
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+    { backward compatibility: to provide access to these in the legacy events }
+    function Get_GetSchemaCall: TDARemoteRequest; virtual;
+    function Get_GetDataCall: TDARemoteRequest; virtual;
+    function Get_UpdateDataCall: TDARemoteRequest; virtual;
+    function Get_GetScriptsCall: TDARemoteRequest; virtual;
+    function InternalApplyUpdates(aTables,aTablesWithDetails: array of TDADataTable): boolean; virtual; abstract;
+    procedure InternalReconcileDialog(RemoteDataAdapter: TDABaseRemoteDataAdapter; var AFailedDeltaList: TList; aTableList: TList);virtual;abstract; // for removing reference to uDAReconcileDialog.pas
+  public
+    constructor Create(aOwner: TComponent); override;
+    function ApplyUpdates(aTables: array of TDADataTable; aRefetchAll: boolean = false): boolean;
+    procedure Fill(aTables: array of TDADataTable; aSaveCursor: boolean; aIncludeSchema: boolean); overload; virtual; abstract;
+    procedure Fill(aTables: array of TDADataTable; aTableRequestInfoArray: array of TableRequestInfo; aSaveCursor: boolean=false;aIncludeSchema: boolean=false); overload; virtual; abstract;
+    procedure Fill(aTables: array of TDADataTable; aWhereClauses : array of TDAWhereExpression; aSaveCursor: boolean=false; aIncludeSchema: boolean=false); overload; virtual; abstract;
+    procedure FillSchema(aTables: array of TDADataTable; aPreserveLookupFields: boolean = false; aPreserveClientCalcFields : boolean = false);
+    procedure FillScripts(aTables: array of TDADataTable); virtual; abstract;
+    procedure CheckProperties; virtual;
+    function ReadSchema(aForceReRead: boolean = false): TDASchema; virtual; abstract;
+  published
+    property DataStreamer: TDADataStreamer read FDataStreamer write SetDataStreamer;
+    property BeforeApplyUpdates: TDAApplyUpdatesEvent read fBeforeApplyUpdates write fBeforeApplyUpdates;
+    property AfterApplyUpdates: TDAApplyUpdatesEvent  read fAfterApplyUpdates  write fAfterApplyUpdates;
+    property FailureBehavior: TDAFailureBehavior read FFailureBehavior write FFailureBehavior default fbBoth;
+    property BeforeProcessFailures: TDABeforeProcessFailuresEvent read fBeforeProcessFailures write fBeforeProcessFailures;
+    property OnShowReconcleDialog:TDAShowReconcleDialogEvent read fOnShowReconcleDialog write fOnShowReconcleDialog;
+    property OnGenerateRecordMessage: TDAOnGenerateRecordMessage read FOnGenerateRecordMessage write FOnGenerateRecordMessage;
+    property OnShowReconcileRecordInAppUI: TDAShowReconcileRecordInAppUIEvent read fOnShowReconcleRecordInAppUI write fOnShowReconcleRecordInAppUI;
+    property AutoFillScripts: Boolean read fAutoFillScripts write fAutoFillScripts default false;
+    property DynamicSelect: Boolean read FDynamicSelect write FDynamicSelect default False;
+  end;
+
+  { IDADataTableDataset }
+  IDADataTableDataset = interface
+    ['{3BADA4F8-BA32-411C-A7CD-DEBD10A4AF06}']
+    function GetDataTable: TDADataTable;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  end;
+
+  { IDARangeController }
+  IDARangeController = interface
+  ['{5A182854-B824-496F-80C2-6F8064003E13}']
+    procedure ApplyRange; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure CancelRange; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetRange(const StartValues, EndValues: array of const); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure EditRangeEnd; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure EditRangeStart; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetRangeEnd; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetRangeStart; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  end;
+
+  { IDANativeDatasetStreaming }
+  TDANativeDataFormat = (ndfBinary, ndfXML);
+  IDANativeDatasetStreaming = interface
+  ['{00B37B20-23DA-49A5-BB5D-B96E50C210F4}']
+    procedure NativeSaveToFile(const aFileName : string; DataFormat : TDANativeDataFormat = ndfBinary);
+    procedure NativeLoadFromFile(const aFileName : string);
+    procedure NativeSaveToStream(aStream : TStream; DataFormat : TDANativeDataFormat = ndfBinary);
+    procedure NativeLoadFromStream(aStream : TStream);
+  end;
+
+
+  { TDADataSource }
+  TDADataSource = class(TDABaseDataSource)
+  private
+    fDataTable: TDADataTable;
+
+    function GetDataset: TDataset;
+    procedure SetDataTable(const Value: TDADataTable);
+    procedure SetDataset(const Value: TDataset);
+    function GetOpening: boolean;
+    function GetActive: boolean;
+
+  protected
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+
+    property Dataset: TDataset read GetDataset write SetDataset; // hide base class property
+  public
+    constructor Create(aOwner: TComponent); override;
+    destructor Destroy; override;
+
+    property Opening: boolean read GetOpening;
+    property Active: boolean read GetActive;
+  published
+    property DataTable: TDADataTable read fDataTable write SetDataTable;
+  end;
+
+  { TDADataTable }
+  TDASortDirection = (sdAscending, sdDescending);
+  TDAMasterMappingMode = (mmDataRequest, mmParams, mmWhere);
+
+  TDASortDirectionArray = array of TDASortDirection;
+  TStringArray = array of string;
+
+  IDADataTableScriptingProvider = interface(IDAScriptingProvider)
+  ['{E16B7359-C733-4F09-96A8-10527CFABB6D}']
+    procedure RunDataTableScript(aDataTable: TDADataTable; const aScript: string; const aMethod: string; aLanguage:TROSEScriptLanguage);
+  end;
+
+  { IDAClonedCursorsSupport }
+  IDAClonedCursorsSupport = interface(IDASimpleClonedCursorsSupport)
+  ['{A43A70A2-7438-4C21-B2E2-A5212082EFD0}']
+    function GetCloneSource : TDADataTable; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure CloneCursor(Source : TDADataTable); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetUsingClonedCursor : boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    property CloneSource : TDADataTable read GetCloneSource;
+    property UsingClonedCursor : boolean read GetUsingClonedCursor;
+  end;
+
+  TAutoIncArray = array of Int64;
+  TDALocalUpdateDataTransactionEvent = procedure(Sender: TObject; var aUseDefaultTransactionLogic: Boolean) of object;
+
+
+  {$WARN SYMBOL_DEPRECATED OFF}
+  TDADataTable = class(TScriptableComponent, {$IFDEF MSWINDOWS}ISupportErrorInfo,{$ENDIF} IDADataTable, IDASQLCommand, IDADataset, IDAEditableDataset, IDADeltaOwner, IDADataReader, IDADatasetEx,IDAClonedCursorsSupport)
+  private
+    fCurrRecId: integer;
+
+    fMasterLink: TMasterDataLink;
+
+    fDelta: IDADelta;
+    fWhere: TDAWhere;
+
+    fRecIDField: TIntegerField;
+
+    fStreamedActive,
+    fRefreshing,
+    fOpening: boolean;
+
+    fDataset: TDataset;
+
+    fFields: TDAFieldCollection;
+
+    fAfterEdit: TDADataTableNotifyEvent;
+    fAfterInsert: TDADataTableNotifyEvent;
+    fAfterDelete: TDADataTableNotifyEvent;
+    fBeforeScroll: TDADataTableNotifyEvent;
+    fAfterClose: TDADataTableNotifyEvent;
+    fBeforePost: TDADataTableNotifyEvent;
+    fAfterScroll: TDADataTableNotifyEvent;
+    fBeforeCancel: TDADataTableNotifyEvent;
+    fBeforeRefresh: TDADataTableNotifyEvent;
+    fBeforeOpen: TDADataTableNotifyEvent;
+    fAfterRefresh: TDADataTableNotifyEvent;
+    fAfterOpen: TDADataTableNotifyEvent;
+    fBeforeEdit: TDADataTableNotifyEvent;
+    fBeforeClose: TDADataTableNotifyEvent;
+    fBeforeDelete: TDADataTableNotifyEvent;
+    fAfterPost: TDADataTableNotifyEvent;
+    fOnCalcFields: TDADataTableNotifyEvent;
+    fOnNewRecord: TDADataTableNotifyEvent;
+    fAfterCancel: TDADataTableNotifyEvent;
+    fBeforeInsert: TDADataTableNotifyEvent;
+    fOnFilterRecord: TDADataTableFilterEvent;
+    fOnEditError: TDADataTableErrorEvent;
+    fOnDeleteError: TDADataTableErrorEvent;
+    fOnPostError: TDADataTableErrorEvent;
+    fBeforeFieldChange: TDADataTableDataChangeEvent;
+    fAfterFieldChange: TDADataTableDataChangeEvent;
+    fLogChanges: boolean;
+
+    fRemoteFetchEnabled: boolean;
+    fSortDirections: TDASortDirectionArray;
+    fSortFieldNames: TStringArray;
+    fParams: TDAParamCollection;
+
+    fFetchedMasters: TStringList;
+
+    fMasterParamsMappings,
+    fMasterRequestMappings: TStringList;
+    fDynamicWhere: TDAWhereBuilder;
+
+    fDetailOptions: TDADetailOptions;
+    fMasterOptions: TDAMasterOptions;
+    fLogicalName: string;
+    fClosing: boolean;
+    fFetching: boolean;
+    fStreaming: boolean;
+    fOnAfterSchemaCall: TDADataTableRemoteRequestEvent;
+    fOnAfterDataRequestCall: TDADataTableRemoteRequestEvent;
+    fOnBeforeSchemaCall: TDADataTableRemoteRequestEvent;
+    fOnBeforeDataRequestCall: TDADataTableRemoteRequestEvent;
+    fOnBeforeDataUpdateCall: TDADataTableRemoteRequestEvent;
+    fOnAfterDataUpdateCall: TDADataTableRemoteRequestEvent;
+    //fOnApplyUpdatesError: TDAApplyUpdatesError;
+    fOnReceiveDataStream: TDADataRequestStreamEvent;
+    fStreamingOptions: TDAStreamingOptions;
+    fRemoteUpdateOptions: TDARemoteUpdatesOptions;
+    fLocalSchema: TDASchema;
+    fLocalConnection: string;
+
+    fBusinessRulesID: string;
+    fBusinessRules: TDADataTableRules;
+    fFieldRules: TObjectList;
+
+    fAutoIncs : TAutoIncArray;
+    fOnAfterApplyUpdates: TDADataTableNotifyEvent;
+    fOnBeforeApplyUpdates: TDABeforeApplyUpdatesEvent;
+    fMasterMappingMode: TDAMasterMappingMode;
+    fMaxRecords: integer;
+    fOnBeforeMergeDelta: TDADataTableNotifyEvent;
+    fOnAfterMergeDelta: TDADataTableNotifyEvent;
+    fStoreActive: boolean;
+    fScriptCode: TStrings;
+    fOnBeforeScriptCall: TDADataTableRemoteRequestEvent;
+    fOnAfterScriptCall: TDADataTableRemoteRequestEvent;
+
+    fOpenTick: cardinal;
+    fAfterOpenIDataset: TDAAfterOpenDatasetEvent;
+    fBeforeOpenIDataset: TDABeforeOpenDatasetEvent;
+
+    fRemoteDataAdapter: TDABaseRemoteDataAdapter;
+    fLocalDataStreamer: TDADataStreamer;
+    fCustomAttributes: TStrings;
+    fExpressionEvaluator: TDAStdExpressionEvaluator;
+    fHasReducedDelta: Boolean;
+    fOnLocalUpdateDataBeginTransaction: TDALocalUpdateDataTransactionEvent;
+    fOnLocalUpdateDataRollBackTransaction: TDALocalUpdateDataTransactionEvent;
+    fOnLocalUpdateDataCommitTransaction: TDALocalUpdateDataTransactionEvent;
+    FLocConnection: IDAConnection;
+    procedure SetLocalDataStreamer(const Value: TDADataStreamer);
+    procedure SetRemoteDataAdapter(const Value: TDABaseRemoteDataAdapter);
+
+    procedure SetLogChanges(const Value: boolean);
+    function GetDataset: TDataset; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetFields: TDAFieldCollection; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetFields(const Value: TDAFieldCollection);
+    function GetActive: boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetActive(Value: boolean); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetLogChanges: boolean;
+    procedure SetParams(const Value: TDAParamCollection);
+    function GetEditing: boolean;
+    function GetMasterRequestMappings: TStrings;
+    procedure SetMasterRequestMappings(const Value: TStrings);
+
+    procedure TempSetRowRecIDValue(Sender: TDataset);
+
+    procedure SetLocalSchema(const Value: TDASchema);
+    procedure LoadFromLocalSchema;
+    procedure LoadLocalSchema(aPreserveLookupFields: Boolean; aPreserveClientCalcFields: Boolean);
+
+    procedure SetBusinessRulesID(const Value: string);
+    function GetHasDelta: boolean;
+    function GetHasDeltaRecursive: boolean;
+    function GetRecNo: integer;
+    procedure SetRecNo(const Value: integer);
+
+    { published property accessors cannot be safecall, so we need wrappers: }
+    function GetFieldsProperty: TDAFieldCollection;
+    function GetActiveProperty: boolean;
+    procedure SetActiveProperty(const Value: boolean);
+    function GetParamsProperty: TDAParamCollection;
+    function GetMasterParamsMappings: TStrings;
+    procedure SetMasterParamsMappings(const Value: TStrings);
+
+    procedure PackAllInOneFetchInfoArray(aDataTable : TDADataTable; OutArray: TDADatasetRequestInfoArray);
+    procedure OnWhereChange(Sender: TObject);
+    procedure SetScriptCode(const Value: TStrings);
+    function GetDeltaInitialized: boolean;
+    procedure SetCustomAttributes(const Value: TStrings);
+    function Local_ApplyUpdates(RefetchAll: boolean = FALSE): boolean;
+    procedure InternalCancelUpdateChange(Change: TDADeltaChange);
+    procedure ExpessionEvaluatorGetValue(Sender: TDAExpressionEvaluator; const aIdentifier: string; out aValue: Variant);
+    procedure DoCascadeRemoteAllInOneFetch(aStreamer: TDADataStreamer);
+    function TriggerTransactionEvent(aEvent: TDALocalUpdateDataTransactionEvent): boolean;
+    procedure SetDetailOptions(const Value: TDADetailOptions);
+    procedure SetMasterOptions(const Value: TDAMasterOptions);
+  protected
+    function intDATypeToVCLType(aDAType: TDADataType): TFieldType;virtual;
+    function GetRangeState: Boolean; virtual; 
+    function CreateAutoIncArray: TAutoIncArray;
+    function GetAutoIncs: TAutoIncArray;
+    procedure SetAutoIncs(const Value: TAutoIncArray);
+
+    property AutoIncs: TAutoIncArray read GetAutoIncs write SetAutoIncs;
+
+    function GetCurrRecId: integer;
+    procedure SetCurrRecId(const Value: integer);
+
+    procedure Loaded; override;
+
+    // To override
+    function GetDatasetClass: TDatasetClass; virtual; abstract;
+    procedure CreateInternalFields(aDataset: TDataset; someFieldDefinitions: TDAFieldCollection); virtual;
+    procedure DoRefresh(aDataset: TDataset);
+    procedure DoSort(const FieldNames: array of string; const Directions: array of TDASortDirection); virtual; abstract;
+
+    procedure SetMasterSource(const Value: TDADataSource); virtual;
+    function GetMasterSource: TDADataSource; virtual; abstract;
+    procedure SetDetailsFields(const Value: string); virtual; abstract;
+    procedure SetMasterFields(const Value: string); virtual;
+    function GetDetailFields: string; virtual; abstract;
+    function GetMasterFields: string; virtual; abstract;
+
+    function GetFilter: string; virtual; abstract;
+    function GetFiltered: boolean; virtual; abstract;
+    procedure SetFilter(const Value: string); virtual; abstract;
+    procedure SetFiltered(const Value: boolean); virtual; abstract;
+
+    function GetReadOnly: boolean; virtual;
+    procedure SetReadOnly(const Value: boolean); virtual;
+
+    procedure AttachEventHooks(aDataset: TDataset); virtual;
+    procedure DetachEventHooks(aDataset: TDataset); virtual;
+
+    // Internal
+    procedure DoBeforeOpenDataset; virtual;
+    procedure DoBeforeCloseDataset; virtual;
+    procedure DoAfterOpenDataset; virtual;
+    procedure DoAfterCloseDataset; virtual;
+    procedure DoOpen(IgnoreAutoFetchSettings: Boolean = False); virtual;
+
+    // Internal TDataset event handler hooks
+    procedure InternalAfterInsert(Sender: TDataset); dynamic;
+    procedure InternalAfterEdit(Sender: TDataset); dynamic;
+    procedure InternalBeforePost(Sender: TDataset); dynamic;
+    procedure InternalBeforeCancel(Sender: TDataset); dynamic;
+    procedure InternalAfterDelete(Sender: TDataset); dynamic;
+    procedure InternalBeforeScroll(Sender: TDataset); dynamic;
+    procedure InternalAfterScroll(Sender: TDataset); dynamic;
+    procedure InternalBeforeRefresh(Sender: TDataset); dynamic;
+    procedure InternalAfterRefresh(Sender: TDataset); dynamic;
+    procedure InternalOnCalcFields(Sender: TDataset); dynamic;
+    procedure InternalOnNewRecord(Sender: TDataset); dynamic;
+    procedure InternalAfterCancel(Sender: TDataset); dynamic;
+    procedure InternalBeforeInsert(Sender: TDataset); dynamic;
+    procedure InternalBeforeDelete(Sender: TDataset); dynamic;
+    procedure InternalBeforeEdit(Sender: TDataset); dynamic;
+    procedure InternalAfterPost(Sender: TDataset); dynamic;
+    procedure InternalBeforeFieldUpdate(Sender: TDACustomField);
+    procedure InternalAfterFieldUpdate(Sender: TDACustomField);
+
+    procedure InternalOnFilterRecord(Dataset: TDataset; var Accept: Boolean); dynamic;
+
+    procedure InternalOnDeleteError(DataSet: TDataSet; Error: EDatabaseError; var Action: TDataAction); dynamic;
+    procedure InternalOnEditError(DataSet: TDataSet; Error: EDatabaseError; var Action: TDataAction); dynamic;
+    procedure InternalOnPostError(DataSet: TDataSet; Error: EDatabaseError; var Action: TDataAction); dynamic;
+
+    // IDASQLCommand
+    function GetParams: TDAParamCollection; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure RefreshParams; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function Execute: integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetText: string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetText(const Value: string); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetName: string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    // IDADeltaOwner
+    function GetDelta: IDADelta; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    // IDADataReader
+    function IDADataReader.First = DataReaderFirst;
+    function IDADataReader.Next = DataReaderNext;
+    function DataReaderFirst: boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function DataReaderNext: boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function GetFieldNames(Index: integer): string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetFieldIndexes(const aName: string): integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsBoolean(Index: integer): boolean; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsCurrency(Index: integer): currency; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsDateTime(Index: integer): TDateTime; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsFloat(Index: integer): double; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsInteger(Index: integer): integer; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsString(Index: integer): string; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsVariant(Index: integer): variant; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsBoolean(const FieldName: string): boolean; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsCurrency(const FieldName: string): currency; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsDateTime(const FieldName: string): TDateTime; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsFloat(const FieldName: string): double; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsInteger(const FieldName: string): integer; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsString(const FieldName: string): string; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsVariant(const FieldName: string): variant; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    // IDADataset
+    function GetIsEmpty: boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetRecordCount: integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetFieldCount: integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetBOF: boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetEOF: boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetSQL: string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetSQL(const Value: string); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function SQLContainsDynamicWhere: boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetFieldValues(Index: integer): Variant; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetNames(Index: integer): string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetWhere: TDAWhere; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF} deprecated;
+    function GetDynamicWhere: TDAWhereBuilder; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetDynamicWhere(const Value: TDAWhereBuilder); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetPrepared: boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetPrepared(Value: boolean); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetState: TDataSetState; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetLogicalName: string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetLogicalName(aName : string); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+
+    procedure OnMasterChange(Sender: TObject); virtual;
+    procedure OnMasterDisable(Sender: TObject); virtual;
+
+    function GetOnAfterOpen: TDAAfterOpenDatasetEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetOnBeforeOpen: TDABeforeOpenDatasetEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnAfterOpen(const Value: TDAAfterOpenDatasetEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnBeforeOpen(const Value: TDABeforeOpenDatasetEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function GetOnAfterExecute: TDAAfterExecuteCommandEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetOnBeforeExecute: TDABeforeExecuteCommandEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnAfterExecute(const Value: TDAAfterExecuteCommandEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnBeforeExecute(const Value: TDABeforeExecuteCommandEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetOnExecuteError: TDAExecuteCommandErrorEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnExecuteError(const Value: TDAExecuteCommandErrorEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetOnOpenError: TDAOpenDatasetErrorEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnOpenError(const Value: TDAOpenDatasetErrorEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    procedure NotifyFieldsClear;
+
+    // IInterface
+    function QueryInterface(const IID: TGUID; out Obj): HResult; override;
+
+    property MasterLink: TMasterDataLink read fMasterLink;
+
+    {$IFDEF MSWINDOWS}
+  protected
+    function InterfaceSupportsErrorInfo(const iid: TGUID): HResult; stdcall;
+
+  public
+    function SafeCallException(ExceptObject: TObject; ExceptAddr: Pointer): HResult; override;
+    {$ENDIF}
+
+  // begin IDAClonedCursorsSupport
+  protected
+    fOldValues : array of Variant;
+    fCloneSource : TDADataTable;
+    function GetSimpleCloneSource : TObject;
+    procedure CloneCursor(Source : TDADataTable); virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  public
+    function GetUsingClonedCursor : boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetCloneSource : TDADataTable; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    property CloneSource : TDADataTable read GetCloneSource;
+    property UsingClonedCursor : boolean read GetUsingClonedCursor;
+  // end IDAClonedCursorsSupport
+
+  public { for Delta }
+    property RecIDField : TIntegerField read fRecIDField write fRecIDField;
+    function GetRowRecIDValue: integer;
+
+
+    procedure CallScript(const aEvent: string);
+
+    procedure InitializeDataTable;
+    procedure DoCascadeOperation(aStreamer: TDADataStreamer; aOption: TDAMasterOption);
+    procedure WriteDeltaToStream(aStreamer: TDADataStreamer);
+    procedure ReadDeltaFromStream(aStreamer: TDADataStreamer; aFailedDeltas:TList);overload;
+    procedure ReadDeltaFromStream(aStreamer: TDADataStreamer); overload;
+
+  public
+    constructor Create(aOwner: TComponent); override;
+    destructor Destroy; override;
+
+    procedure EnableConstraints; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF} abstract;
+    procedure DisableConstraints; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF} abstract;
+
+    procedure LoadFromRemoteSource(BookmarkPosition: boolean = FALSE); virtual;
+    procedure FetchMastersDetails(aMasterTable : TDADataTable = NIL; aRequestMappings : TStrings = NIL; IgnoreAutoFetchSettings : Boolean = False); dynamic;
+    procedure LoadSchema(PreserveLookupFields : boolean = FALSE; PreserveClientCalcFields : boolean = FALSE);
+    procedure LoadScript(aDatasetName : string = '');
+
+    function ApplyUpdates(RefetchAll: boolean = FALSE): boolean; dynamic;
+    procedure CancelUpdates(IncludeDetails : boolean = TRUE);
+    procedure CancelUpdateChange(Change: TDADeltaChange;IncludeDetails : boolean = TRUE);
+
+    procedure Sort(const FieldNames: array of string; const Directions: array of TDASortDirection);
+    procedure UnSort;
+
+    procedure ClearFields;
+    procedure ClearRows;
+
+    procedure CloneSelectedRecord(Source: TDADataTable; DoPost: boolean = TRUE); overload;
+    procedure CloneSelectedRecord(const Source: IDADataset; DoPost: boolean = TRUE); overload;
+
+    procedure SaveToStream(aStream: TStream);
+    procedure LoadFromStream(aStream: TStream);
+    procedure SaveToFile(const aFileName: string);
+    procedure LoadFromFile(const aFileName: string);
+
+    procedure MergeDelta; virtual;
+
+    // Master detail
+    function GetDetailDataTables: TList;
+    function GetDetailTablesforApplyUpdate(aRecursive: boolean = True): TList;
+    procedure GetDetailTablesforAllinOneFetch(aRemote, aLocal:TList; aRecursive: boolean);
+    function GetMasterDataTable : TDADataTable;
+
+    // Methods
+    procedure Open; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure Close; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    procedure EnableControls; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure DisableControls; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function  ControlsDisabled: Boolean;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    procedure Next; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    procedure Edit; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure Insert; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure Post; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure Cancel; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure Append; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure Delete; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    procedure Prior; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure First; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure Last; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    procedure Refresh; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function Locate(const KeyFields: string; const KeyValues: Variant; Options: TLocateOptions): Boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function Lookup(const KeyFields: string; const KeyValues: Variant; const ResultFields: string): Variant; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function FieldByName(const aName: string): TDAField; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function FindField(const aName: string): TDAField; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function ParamByName(const aName: string): TDAParam; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function GetBookmark: TBookmark; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GotoBookmark(Bookmark: TBookmark); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure FreeBookmark(Bookmark: TBookmark); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function BookmarkValid(Bookmark: TBookmark): Boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    procedure EnableEventHandlers; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure DisableEventHandlers; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    procedure InternalSetFetching(aFetching: boolean);
+
+    procedure AddRecord(const  FieldNames : array of string; const FieldValues : array of Variant); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function GetCurrentRecIdValue: integer;
+    procedure SetCurrentRecIdValue(Value: integer);
+
+    // Properties
+    property CurrRecId: integer read GetCurrRecId write SetCurrRecId;
+    property RecIDValue: integer read GetRowRecIDValue;
+    property Delta: IDADelta read GetDelta write fDelta;
+    property RecNo : integer read GetRecNo write SetRecNo;
+
+    property BOF: boolean read GetBOF;
+    property EOF: boolean read GetEOF;
+    property RecordCount: integer read GetRecordCount;
+    property FieldCount: integer read GetFieldCount;
+    property FieldValues[Index: integer]: Variant read GetFieldValues;
+    property Names[Index: integer]: string read GetNames;
+
+    property SortFieldNames: TStringArray read fSortFieldNames;
+    property SortDirections: TDASortDirectionArray read fSortDirections;
+
+    property Opening: boolean read fOpening;
+    property Closing: boolean read fClosing;
+    property Editing: boolean read GetEditing;
+    property Fetching: boolean read fFetching;
+
+    property State: TDataSetState read GetState;
+    property Dataset: TDataset read GetDataset;
+
+    property IsEmpty : boolean read GetIsEmpty;
+
+    property BusinessEventsObj: TDADataTableRules read fBusinessRules;
+
+    property HasDelta: boolean read GetHasDelta;
+    property HasDeltaRecursive: boolean read GetHasDeltaRecursive;
+    property DeltaInitialized: boolean read GetDeltaInitialized;
+
+    property Where : TDAWhere read GetWhere;
+    property DynamicWhere: TDAWhereBuilder read GetDynamicWhere write SetDynamicWhere;
+    procedure CheckProperties(ACheckRemoteFetching: Boolean=False); virtual;
+    property HasReducedDelta: boolean read fHasReducedDelta;
+    property LocalDAConnection: IDAConnection read FLocConnection; 
+  published
+    property Active: boolean read GetActiveProperty write SetActiveProperty stored fStoreActive default false;
+    property StoreActive: boolean read fStoreActive write fStoreActive default false;
+
+    property RemoteUpdatesOptions: TDARemoteUpdatesOptions read fRemoteUpdateOptions write fRemoteUpdateOptions;
+
+    property MaxRecords : integer read fMaxRecords write fMaxRecords default -1;
+
+    property Fields: TDAFieldCollection read GetFieldsProperty write SetFields;
+    property Params: TDAParamCollection read GetParamsProperty write SetParams;
+
+    property MasterMappingMode : TDAMasterMappingMode read fMasterMappingMode write fMasterMappingMode default mmParams;
+    property MasterParamsMappings : TStrings read GetMasterParamsMappings write SetMasterParamsMappings;
+
+    property LogChanges: boolean read GetLogChanges write SetLogChanges default true;
+    property StreamingOptions: TDAStreamingOptions read fStreamingOptions write fStreamingOptions;
+    property RemoteFetchEnabled: boolean read fRemoteFetchEnabled write fRemoteFetchEnabled default true;
+
+    property ScriptCode : TStrings read fScriptCode write SetScriptCode;
+    property CustomAttributes : TStrings read fCustomAttributes write SetCustomAttributes;
+
+    property RemoteDataAdapter: TDABaseRemoteDataAdapter read fRemoteDataAdapter write SetRemoteDataAdapter;
+
+    property BeforeOpen: TDADataTableNotifyEvent read fBeforeOpen write fBeforeOpen;
+    property AfterOpen: TDADataTableNotifyEvent read fAfterOpen write fAfterOpen;
+    property BeforeClose: TDADataTableNotifyEvent read fBeforeClose write fBeforeClose;
+    property AfterClose: TDADataTableNotifyEvent read fAfterClose write fAfterClose;
+    property BeforeInsert: TDADataTableNotifyEvent read fBeforeInsert write fBeforeInsert;
+    property AfterInsert: TDADataTableNotifyEvent read fAfterInsert write fAfterInsert;
+    property BeforeEdit: TDADataTableNotifyEvent read fBeforeEdit write fBeforeEdit;
+    property AfterEdit: TDADataTableNotifyEvent read fAfterEdit write fAfterEdit;
+    property BeforePost: TDADataTableNotifyEvent read fBeforePost write fBeforePost;
+    property AfterPost: TDADataTableNotifyEvent read fAfterPost write fAfterPost;
+    property BeforeCancel: TDADataTableNotifyEvent read fBeforeCancel write fBeforeCancel;
+    property AfterCancel: TDADataTableNotifyEvent read fAfterCancel write fAfterCancel;
+    property BeforeDelete: TDADataTableNotifyEvent read fBeforeDelete write fBeforeDelete;
+    property AfterDelete: TDADataTableNotifyEvent read fAfterDelete write fAfterDelete;
+    property BeforeScroll: TDADataTableNotifyEvent read fBeforeScroll write fBeforeScroll;
+    property AfterScroll: TDADataTableNotifyEvent read fAfterScroll write fAfterScroll;
+    property BeforeRefresh: TDADataTableNotifyEvent read fBeforeRefresh write fBeforeRefresh;
+    property AfterRefresh: TDADataTableNotifyEvent read fAfterRefresh write fAfterRefresh;
+    property OnCalcFields: TDADataTableNotifyEvent read fOnCalcFields write fOnCalcFields;
+    property OnNewRecord: TDADataTableNotifyEvent read fOnNewRecord write fOnNewRecord;
+
+    property OnFilterRecord: TDADataTableFilterEvent read fOnFilterRecord write fOnFilterRecord;
+
+    property ReadOnly : boolean read GetReadOnly write SetReadOnly default False;
+
+    property OnDeleteError: TDADataTableErrorEvent read fOnDeleteError write fOnDeleteError;
+    property OnEditError: TDADataTableErrorEvent read fOnEditError write fOnEditError;
+    property OnPostError: TDADataTableErrorEvent read fOnPostError write fOnPostError;
+
+    property LocalSchema: TDASchema read fLocalSchema write SetLocalSchema;
+    property LocalDataStreamer: TDADataStreamer read fLocalDataStreamer write SetLocalDataStreamer;
+    property LocalConnection: string read fLocalConnection write fLocalConnection;
+
+    property MasterSource: TDADataSource read GetMasterSource write SetMasterSource;
+    property MasterFields: string read GetMasterFields write SetMasterFields;
+    property DetailFields: string read GetDetailFields write SetDetailsFields;
+    property MasterRequestMappings: TStrings read GetMasterRequestMappings write SetMasterRequestMappings;
+
+    property DetailOptions: TDADetailOptions read fDetailOptions write SetDetailOptions default DetailOptions_Default;
+    property MasterOptions: TDAMasterOptions read fMasterOptions write SetMasterOptions default MasterOptions_Default;
+
+    property Filtered: boolean read GetFiltered write SetFiltered default false;
+    property Filter: string read GetFilter write SetFilter;
+
+    property LogicalName: string read fLogicalName write fLogicalName;
+
+    //property OnApplyUpdatesError: TDAApplyUpdatesError read fOnApplyUpdatesError write fOnApplyUpdatesError;
+
+    property OnAfterApplyUpdates : TDADataTableNotifyEvent read fOnAfterApplyUpdates write fOnAfterApplyUpdates;
+    property OnBeforeApplyUpdates : TDABeforeApplyUpdatesEvent read fOnBeforeApplyUpdates write fOnBeforeApplyUpdates;
+    property OnBeforeMergeDelta : TDADataTableNotifyEvent read fOnBeforeMergeDelta write fOnBeforeMergeDelta;
+    property OnAfterMergeDelta : TDADataTableNotifyEvent read fOnAfterMergeDelta write fOnAfterMergeDelta;
+
+    property OnBeforeDataRequestCall: TDADataTableRemoteRequestEvent read fOnBeforeDataRequestCall write fOnBeforeDataRequestCall;
+    property OnAfterDataRequestCall: TDADataTableRemoteRequestEvent read fOnAfterDataRequestCall write fOnAfterDataRequestCall;
+    property OnBeforeDataUpdateCall: TDADataTableRemoteRequestEvent read fOnBeforeDataUpdateCall write fOnBeforeDataUpdateCall;
+    property OnAfterDataUpdateCall: TDADataTableRemoteRequestEvent read fOnAfterDataUpdateCall write fOnAfterDataUpdateCall;
+    property OnBeforeSchemaCall: TDADataTableRemoteRequestEvent read fOnBeforeSchemaCall write fOnBeforeSchemaCall;
+    property OnAfterSchemaCall: TDADataTableRemoteRequestEvent read fOnAfterSchemaCall write fOnAfterSchemaCall;
+    property OnBeforeScriptCall: TDADataTableRemoteRequestEvent read fOnBeforeScriptCall write fOnBeforeScriptCall;
+    property OnAfterScriptCall: TDADataTableRemoteRequestEvent read fOnAfterScriptCall write fOnAfterScriptCall;
+
+    property OnReceiveDataStream: TDADataRequestStreamEvent read fOnReceiveDataStream write fOnReceiveDataStream;
+
+    property OnBeforeFieldChange: TDADataTableDataChangeEvent read fBeforeFieldChange write fBeforeFieldChange;
+    property OnAfterFieldChange: TDADataTableDataChangeEvent read fAfterFieldChange write fAfterFieldChange;
+    property BusinessRulesID: string read fBusinessRulesID write SetBusinessRulesID;
+    property OnLocalUpdateDataBeginTransaction    : TDALocalUpdateDataTransactionEvent read fOnLocalUpdateDataBeginTransaction write fOnLocalUpdateDataBeginTransaction;
+    property OnLocalUpdateDataCommitTransaction   : TDALocalUpdateDataTransactionEvent read fOnLocalUpdateDataCommitTransaction write fOnLocalUpdateDataCommitTransaction;
+    property OnLocalUpdateDataRollBackTransaction : TDALocalUpdateDataTransactionEvent read fOnLocalUpdateDataRollBackTransaction write fOnLocalUpdateDataRollBackTransaction;
+  end;
+
+  TDADataTableClass = class of TDADataTable;
+    {$WARN SYMBOL_DEPRECATED ON}
+
+  { Exceptions }
+  EDABizValidationException = class(EROException);
+
+  { TDABusinessRules }
+  TDABusinessRules = class(TDAEngineBaseObject)
+  private
+  protected
+    function _AddRef: Integer; override;
+    function _Release: Integer; override;
+
+  public
+    constructor Create; virtual;
+    destructor Destroy; override;
+
+  end;
+
+  IDAStronglyTypedDataTable = interface
+  ['{4D4063AA-DFD0-4B4D-8CC2-FCE3BE1D2F87}']
+    procedure Open;
+    procedure Close;
+
+    function GetActive: boolean;
+    procedure SetActive(const Value: boolean);
+
+    property Active: boolean read GetActive write SetActive;
+
+    procedure Append;
+    procedure Cancel;
+    procedure Delete;
+    procedure Edit;
+    procedure First;
+    procedure Insert;
+    procedure Last;
+    procedure Next;
+    procedure Post;
+    procedure Prior;
+
+    function Locate(const aKeyFields: string; const aKeyValues: Variant; aOptions: TLocateOptions = []): Boolean;
+    function Lookup(const KeyFields: string; const KeyValues: Variant; const ResultFields: string): Variant;
+
+    function GetDataTable : TDADataTable;
+
+    function GetState : TDatasetState;
+    function GetIsEmpty : boolean;
+    function GetRecNo : integer;
+    procedure SetRecNo(Value : integer);
+    function GetMasterOptions : TDAMasterOptions;
+    procedure SetMasterOptions(Value : TDAMasterOptions);
+    function GetDetailOptions : TDADetailOptions;
+    procedure SetDetailOptions(Value : TDADetailOptions);
+
+    function IsFieldNull(const FieldIndexOrName : Variant) : boolean;
+    procedure ClearField(const FieldIndexOrName : Variant);
+
+    function GetBOF: boolean;
+    function GetEOF: boolean;
+    function GetRecordCount: integer;
+
+    property BOF: boolean read GetBOF;
+    property EOF: boolean read GetEOF;
+    property RecordCount: integer read GetRecordCount;
+    property RecNo : integer read GetRecNo write SetRecNo;
+
+    property MasterOptions : TDAMasterOptions read GetMasterOptions write SetMasterOptions;
+    property DetailOptions : TDADetailOptions read GetDetailOptions write SetDetailOptions;
+
+    property IsEmpty : boolean read GetIsEmpty;
+    property State : TDatasetState read GetState;
+    property DataTable : TDADataTable read GetDataTable;
+  end;
+
+  { TDAFieldRules }
+  TDAFieldRules = class(TDABusinessRules)
+  private
+    fField : TDAField;
+    fDataTable : TDADataTable;
+
+  protected
+    // Misc
+    procedure Attach(aDataTable: TDADataTable); virtual;
+    procedure Detach(aDataTable: TDADataTable); virtual;
+
+    // Event handler hooks
+    procedure OnValidate(Sender: TDACustomField); virtual;
+    procedure OnChange(Sender: TDACustomField); virtual;
+
+    property DataTable : TDADataTable read fDataTable;
+
+  public
+    constructor Create(aField : TDAField; aDataTable : TDADataTable); reintroduce; virtual;
+    destructor Destroy; override;
+  end;
+
+  TDAFieldRulesClass = class of TDAFieldRules;
+
+  { TDADataTableRules }
+  TDADataTableRules = class(TDABusinessRules, IDAStronglyTypedDataTable, IDARangeController)
+  private
+    fDataTable: TDADataTable;
+    fDetails : TStringList;
+
+    function GetDetails(Index: integer): TDADataTable;
+    function GetDetailsCount: integer;
+
+  protected
+    // Misc
+    function GetDataTable: TDADataTable;
+    procedure Attach(aDataTable: TDADataTable); virtual;
+    procedure Detach(aDataTable: TDADataTable); virtual;
+
+    procedure RefreshDetails;
+
+    function FindDetail(const aLogicalName : string) : TDADataTable;
+    function DetailByName(const aLogicalName : string) : TDADataTable;
+
+    // Business events
+    procedure BeforeOpen(Sender: TDADataTable); virtual;
+    procedure AfterOpen(Sender: TDADataTable); virtual;
+    procedure BeforeClose(Sender: TDADataTable); virtual;
+    procedure AfterClose(Sender: TDADataTable); virtual;
+    procedure BeforeInsert(Sender: TDADataTable); virtual;
+    procedure AfterInsert(Sender: TDADataTable); virtual;
+    procedure BeforeEdit(Sender: TDADataTable); virtual;
+    procedure AfterEdit(Sender: TDADataTable); virtual;
+    procedure BeforePost(Sender: TDADataTable); virtual;
+    procedure AfterPost(Sender: TDADataTable); virtual;
+    procedure BeforeCancel(Sender: TDADataTable); virtual;
+    procedure AfterCancel(Sender: TDADataTable); virtual;
+    procedure BeforeDelete(Sender: TDADataTable); virtual;
+    procedure AfterDelete(Sender: TDADataTable); virtual;
+    procedure BeforeScroll(Sender: TDADataTable); virtual;
+    procedure AfterScroll(Sender: TDADataTable); virtual;
+    procedure BeforeRefresh(Sender: TDADataTable); virtual;
+    procedure AfterRefresh(Sender: TDADataTable); virtual;
+    procedure OnCalcFields(Sender: TDADataTable); virtual;
+    procedure OnNewRecord(Sender: TDADataTable); virtual;
+
+    procedure OnDeleteError(DataTable: TDADataTable; Error: EDatabaseError; var Action: TDataAction); virtual;
+    procedure OnEditError(DataTable: TDADataTable; Error: EDatabaseError; var Action: TDataAction); virtual;
+    procedure OnPostError(DataTable: TDADataTable; Error: EDatabaseError; var Action: TDataAction); virtual;
+    procedure OnFilterRecord(DataTable: TDADataTable; var Accept : boolean); virtual;
+
+    procedure OnAfterSchemaCall(DataTable: TDADataTable; Request: TDARemoteRequest); virtual;
+    procedure OnAfterDataRequestCall(DataTable: TDADataTable; Request: TDARemoteRequest); virtual;
+    procedure OnBeforeSchemaCall(DataTable: TDADataTable; Request: TDARemoteRequest); virtual;
+    procedure OnBeforeDataRequestCall(DataTable: TDADataTable; Request: TDARemoteRequest); virtual;
+    procedure OnBeforeDataUpdateCall(DataTable: TDADataTable; Request: TDARemoteRequest); virtual;
+    procedure OnAfterDataUpdateCall(DataTable: TDADataTable; Request: TDARemoteRequest); virtual;
+    procedure OnBeforeScriptCall(DataTable: TDADataTable; Request: TDARemoteRequest); virtual;
+    procedure OnAfterScriptCall(DataTable: TDADataTable; Request: TDARemoteRequest); virtual;
+
+    procedure OnAfterApplyUpdates(DataTable: TDADataTable); virtual;
+    procedure OnBeforeMergeDelta(DataTable: TDADataTable); virtual;
+    procedure OnAfterMergeDelta(DataTable: TDADataTable); virtual;
+
+    procedure OnReceiveDataStream(DataTable: TDADataTable; Stream: TStream); virtual;
+    procedure OnBeforeApplyUpdates(DataTable: TDADataTable; const Delta: IDADelta); virtual;
+
+    procedure Open; virtual;
+    procedure Close; virtual;
+
+    function GetActive: boolean;
+    procedure SetActive(const Value: boolean);
+
+    property Active: boolean read GetActive write SetActive;
+
+    procedure Append; virtual;
+    procedure Cancel; virtual;
+    procedure Delete; virtual;
+    procedure Edit; virtual;
+    procedure First; virtual;
+    procedure Insert; virtual;
+    procedure Last; virtual;
+    procedure Next; virtual;
+    procedure Post; virtual;
+    procedure Prior; virtual;
+
+    function GetBOF: Boolean; virtual;
+    function GetEOF: Boolean; virtual;
+    function GetRecordCount: Integer; virtual;
+    function Locate(const aKeyFields: String; const aKeyValues: Variant; aOptions: TLocateOptions = []): Boolean; virtual;
+    function Lookup(const KeyFields: string; const KeyValues: Variant; const ResultFields: string): Variant;
+
+    function GetMasterOptions : TDAMasterOptions;
+    procedure SetMasterOptions(Value : TDAMasterOptions);
+    function GetDetailOptions : TDADetailOptions;
+    procedure SetDetailOptions(Value : TDADetailOptions);
+    function GetRecNo : integer;
+    procedure SetRecNo(Value : integer);
+    function GetIsEmpty: boolean;
+    function GetState: TDatasetState;
+
+    function IsFieldNull(const FieldIndexOrName : Variant) : boolean;
+    procedure ClearField(const FieldIndexOrName : Variant);
+
+    property DataTable: TDADataTable read GetDataTable;
+    property Details[Index : integer] : TDADataTable read GetDetails;
+    property DetailCount : integer read GetDetailsCount;
+    property State : TDatasetState read GetState;
+    property IsEmpty : boolean read GetIsEmpty;
+
+    { IDARangeController }
+    procedure ApplyRange; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure CancelRange; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetRange(const StartValues, EndValues: array of const); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure EditRangeEnd; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure EditRangeStart; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetRangeEnd; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetRangeStart; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+  public
+    constructor Create(aDataTable: TDADataTable); reintroduce; virtual;
+    destructor Destroy; override;
+  end;
+
+  TDADataTableRulesClass = class of TDADataTableRules;
+
+  { TDADataTableList }
+  TDADataTableList = class(TList)
+  private
+    function GetItems(Index: integer): TDADataTable;
+    function GetPendingChangeCount: integer;
+  protected
+  public
+    constructor Create(aOwnerComponent : TComponent);
+
+    function ScanAndAdd(aOwnerComponent : TComponent) : integer;
+
+    function Add(aDataTable : TDADataTable) : integer;
+    procedure Remove(aDataTable : TDADataTable);
+
+    property Items[Index : integer] : TDADataTable read GetItems; default;
+    property PendingChangeCount : integer read GetPendingChangeCount;
+  end;
+
+// Registration routines
+procedure RegisterDataTableRules(const anID: string; const aDataTableRulesClass: TDADataTableRulesClass);
+function FindDataTableRules(const anID: string; out aDataTableRulesClass: TDADataTableRulesClass): boolean;
+
+procedure RegisterFieldRules(const anID: string; const aFieldRulesClass: TDAFieldRulesClass);
+function FindFieldRules(const anID: string; out aFieldRulesClass: TDAFieldRulesClass): boolean;
+
+// Helper functions
+function NewDelta(aDataTable: TDADataTable): IDADelta; overload;
+
+function DatatableFromStream(aStream : TStream;
+                             aDataTableClass : TDADataTableClass;
+                             anAdapter : TDADataAdapter;
+                             const aDatasetName : string = '') : TDADataTable;
+
+implementation
+
+uses
+  {$IFDEF DESIGNTIME}
+  Dialogs,
+  {$ENDIF DESIGNTIME}
+  TypInfo, Variants, uDARes,
+  uROClient, uROSessions, uROXMLIntf, uROBinaryHelpers,
+  uDARegExpr, uDABusinessProcessor;
+
+var
+  _bizfields,
+  _bizdatatables: TStringList;
+
+type
+  TDataSetHack = class(TDataSet);
+
+function NewDelta(aDataTable: TDADataTable): IDADelta;
+begin
+  result := TDADelta.Create(aDataTable);
+end;
+
+procedure RegisterDataTableRules(const anID: string; const aDataTableRulesClass: TDADataTableRulesClass);
+var
+  idx: integer;
+begin
+  idx := _bizdatatables.IndexOf(anID);
+
+  if (idx >= 0) then
+    _bizdatatables.Objects[idx] := TObject(aDataTableRulesClass)
+  else
+    _bizdatatables.AddObject(anID, TObject(aDataTableRulesClass));
+end;
+
+function FindDataTableRules(const anID: string; out aDataTableRulesClass: TDADataTableRulesClass): boolean;
+var
+  idx: integer;
+begin
+  result := FALSE;
+  idx := _bizdatatables.IndexOf(anID);
+  if (idx >= 0) then begin
+    aDataTableRulesClass := TDADataTableRulesClass(_bizdatatables.Objects[idx]);
+    result := TRUE;
+  end
+  else
+    aDataTableRulesClass := nil;
+end;
+
+procedure RegisterFieldRules(const anID: string; const aFieldRulesClass: TDAFieldRulesClass);
+var
+  idx: integer;
+begin
+  idx := _bizfields.IndexOf(anID);
+
+  if (idx >= 0) then
+    _bizfields.Objects[idx] := TObject(aFieldRulesClass)
+  else
+    _bizfields.AddObject(anID, TObject(aFieldRulesClass));
+end;
+
+function FindFieldRules(const anID: string; out aFieldRulesClass: TDAFieldRulesClass): boolean;
+var
+  idx: integer;
+begin
+  result := FALSE;
+  idx := _bizfields.IndexOf(anID);
+  if (idx >= 0) then begin
+    aFieldRulesClass := TDAFieldRulesClass(_bizfields.Objects[idx]);
+    result := TRUE;
+  end
+  else
+    aFieldRulesClass := nil;
+end;
+
+function DatatableFromStream(aStream : TStream;
+                             aDataTableClass : TDADataTableClass;
+                             anAdapter : TDADataAdapter;
+                             const aDatasetName : string = '') : TDADataTable;
+begin
+  result := aDataTableClass.Create(NIL);
+  result.RemoteFetchEnabled := FALSE;
+  anAdapter.ReadDataset(aStream, result, TRUE, aDatasetName);
+  result.First;
+end;
+
+{ TDADataTable }
+
+constructor TDADataTable.Create(aOwner: TComponent);
+begin
+  inherited;
+  fHasReducedDelta := False;
+  fScriptCode := TStringList.Create;
+  fCustomAttributes := TStringList.Create;
+  fMaxRecords := -1;
+
+  fMasterMappingMode := mmParams;
+  fMasterParamsMappings := TStringList.Create;
+
+  fFieldRules := TObjectList.Create;
+
+  fRemoteUpdateOptions := [];
+  fStreamingOptions := [soDisableEventsWhileStreaming];
+
+  fDetailOptions := DetailOptions_Default;
+  fMasterOptions := MasterOptions_Default;
+
+  fFetchedMasters := TStringList.Create;
+  fFetchedMasters.Duplicates := dupError;
+  fFetchedMasters.Sorted := TRUE;
+
+  fMasterRequestMappings := TStringList.Create;
+
+  fRemoteFetchEnabled := TRUE;
+  fStreaming := False;
+
+  SetLength(fSortDirections, 0);
+  SetLength(fSortFieldNames, 0);
+
+  fFields := TDAFieldCollection.Create(Self);
+  fFields.OnFieldBeforeUpdate := InternalBeforeFieldUpdate;
+  fFields.OnFieldAfterUpdate := InternalAfterFieldUpdate;
+  fParams := TDAParamCollection.Create(Self);
+
+  fWhere := TDAWhere.Create(fFields, TRUE);
+  fWhere.OnChange := OnWhereChange;
+
+  fDataset := GetDatasetClass.Create(Self);
+  fDataset.Name := 'Dataset';
+
+  fMasterLink := TMasterDataLink.Create(fDataset);
+  fMasterLink.OnMasterChange := OnMasterChange;
+  fMasterLink.OnMasterDisable := OnMasterDisable;
+
+  fExpressionEvaluator := TDAStdExpressionEvaluator.Create;
+  fExpressionEvaluator.OnGetValue := ExpessionEvaluatorGetValue;
+
+  fDynamicWhere := TDAWhereBuilder.Create;
+  fLogChanges := TRUE;
+  EnableEventHandlers;
+end;
+
+destructor TDADataTable.Destroy;
+begin
+  DisableEventHandlers;
+  fDynamicWhere.Free;
+  fExpressionEvaluator.Free;
+  fFields.Free;
+  fWhere.Free;
+
+  fMasterLink.Free;
+  fMasterRequestMappings.Free;
+  fMasterParamsMappings.Free;
+
+  fFetchedMasters.Free;
+
+  if (fBusinessRules <> nil) then begin
+    fBusinessRules.Detach(Self);
+    fBusinessRules.Free;
+  end;
+
+  fFieldRules.Free;
+  fParams.Free;
+
+  fDelta := NIL;
+  fScriptCode.Free;
+  fCustomAttributes.Free;
+
+  inherited;
+end;
+
+procedure TDADataTable.OnWhereChange(Sender : TObject);
+//var par : TDARemoteRequestParam;
+begin
+  //TODO: par := DataRequestCall.FindParam(par_UserFilter);
+  //if (par<>NIL) then par.AsString := fWhere.Clause;
+end;
+
+procedure TDADataTable.AttachEventHooks(aDataset: TDataset);
+var i : integer;
+    lFieldRulesClass : TDAFieldRulesClass;
+    lFieldRules : TDAFieldRules;
+    lField : TDAField;
+begin
+  if (csDesigning in ComponentState) then Exit;
+
+  aDataset.BeforeInsert := InternalBeforeInsert;
+  aDataset.AfterInsert := InternalAfterInsert;
+  aDataset.BeforeEdit := InternalBeforeEdit;
+  aDataset.AfterEdit := InternalAfterEdit;
+  aDataset.BeforePost := InternalBeforePost;
+  aDataset.AfterPost := InternalAfterPost;
+  aDataset.BeforeCancel := InternalBeforeCancel;
+  aDataset.AfterCancel := InternalAfterCancel;
+  aDataset.BeforeDelete := InternalBeforeDelete;
+  aDataset.AfterDelete := InternalAfterDelete;
+  aDataset.BeforeScroll := InternalBeforeScroll;
+  aDataset.AfterScroll := InternalAfterScroll;
+  aDataset.BeforeRefresh := InternalBeforeRefresh;
+  aDataset.AfterRefresh := InternalAfterRefresh;
+
+  aDataset.OnCalcFields := InternalOnCalcFields;
+  aDataset.OnNewRecord := InternalOnNewRecord;
+
+  aDataset.OnFilterRecord := InternalOnFilterRecord;
+
+  aDataset.OnDeleteError := InternalOnDeleteError;
+  aDataset.OnEditError := InternalOnEditError;
+  aDataset.OnPostError := InternalOnPostError;
+
+  for i := 0 to (fFields.Count-1) do begin
+    lField := Fields[i];
+    if (lField.BusinessClassID='') then Continue;
+
+    Check(not FindFieldRules(lField.BusinessClassID, lFieldRulesClass), 'Invalid BusinessClassID "%s"', [lField.BusinessClassID]);
+
+    lFieldRules := lFieldRulesClass.Create(lField, Self);
+    fFieldRules.Add(lFieldRules);
+  end;
+
+  fFields.FieldEventsDisabled := FALSE;
+end;
+
+procedure TDADataTable.DetachEventHooks(aDataset: TDataset);
+begin
+  if (csDesigning in ComponentState) then Exit;
+
+  aDataset.BeforeInsert := nil;
+  aDataset.AfterInsert := nil;
+  aDataset.BeforeEdit := nil;
+  aDataset.AfterEdit := nil;
+  aDataset.BeforePost := TempSetRowRecIDValue; // We still need to autoinc the RecID!!!
+  aDataset.AfterPost := nil;
+  aDataset.BeforeCancel := nil;
+  aDataset.AfterCancel := nil;
+  aDataset.BeforeDelete := nil;
+  aDataset.AfterDelete := nil;
+  aDataset.BeforeScroll := nil;
+  aDataset.AfterScroll := nil;
+  aDataset.BeforeRefresh := nil;
+  aDataset.AfterRefresh := nil;
+  if not Filtered then
+    aDataset.OnCalcFields := nil;
+  aDataset.OnNewRecord := nil;
+
+  aDataset.OnFilterRecord := nil;
+
+  aDataset.OnDeleteError := nil;
+  aDataset.OnEditError := nil;
+  aDataset.OnPostError := nil;
+
+  fFields.FieldEventsDisabled := TRUE;
+  fFieldRules.Clear; // Destroyes them
+end;
+
+procedure TDADataTable.InternalAfterDelete(Sender: TDataset);
+begin
+  CallScript('AfterDelete');
+  if Assigned(AfterDelete) then AfterDelete(Self);
+  if Assigned(fBusinessRules) then fBusinessRules.AfterDelete(Self);
+
+  if (ruoOnPost in RemoteUpdatesOptions) then ApplyUpdates();
+end;
+
+procedure TDADataTable.InternalAfterEdit(Sender: TDataset);
+begin
+  CallScript('AfterEdit');
+  if Assigned(AfterEdit) then AfterEdit(Self);
+  if Assigned(fBusinessRules) then fBusinessRules.AfterEdit(Self);
+end;
+
+procedure TDADataTable.InternalAfterInsert(Sender: TDataset);
+begin
+  CallScript('AfterInsert');
+
+  if Assigned(AfterInsert) then AfterInsert(Self);
+  if Assigned(fBusinessRules) then fBusinessRules.AfterInsert(Self);
+end;
+
+procedure TDADataTable.InternalAfterRefresh(Sender: TDataset);
+begin
+  CallScript('AfterRefresh');
+  if Assigned(AfterRefresh) then AfterRefresh(Self);
+  if Assigned(fBusinessRules) then fBusinessRules.AfterRefresh(Self);
+end;
+
+procedure TDADataTable.InternalAfterScroll(Sender: TDataset);
+begin
+  if fStreaming and (soDisableEventsWhileStreaming in fStreamingOptions)
+    then Exit;
+  CallScript('AfterScroll');
+  if Assigned(AfterScroll) then AfterScroll(Self);
+  if Assigned(fBusinessRules) then fBusinessRules.AfterScroll(Self);
+end;
+
+procedure TDADataTable.InternalBeforeCancel(Sender: TDataset);
+begin
+  CallScript('BeforeCancel');
+  if Assigned(BeforeCancel) then BeforeCancel(Self);
+  if Assigned(fBusinessRules) then fBusinessRules.BeforeCancel(Self);
+end;
+
+procedure TDADataTable.InternalBeforeRefresh(Sender: TDataset);
+begin
+  CallScript('BeforeRefresh');
+  if Assigned(BeforeRefresh) then BeforeRefresh(Self);
+  if Assigned(fBusinessRules) then fBusinessRules.BeforeRefresh(Self);
+  DoRefresh(fDataset);
+end;
+
+procedure TDADataTable.InternalBeforeScroll(Sender: TDataset);
+begin
+  if fStreaming and (soDisableEventsWhileStreaming in fStreamingOptions)
+    then Exit;
+  CallScript('BeforeScroll');
+  if Assigned(BeforeScroll) then BeforeScroll(Self);
+  if Assigned(fBusinessRules) then fBusinessRules.BeforeScroll(Self);
+end;
+
+procedure TDADataTable.InternalOnCalcFields(Sender: TDataset);
+var
+  i: integer;
+begin
+  CallScript('OnCalcFields');
+  if Assigned(OnCalcFields) then OnCalcFields(Self);
+  if Assigned(fBusinessRules) then fBusinessRules.OnCalcFields(Self);
+  For i:= 0 to fFields.Count-1 do
+    With fFields[i] do
+      if Calculated and (Expression <> '') then Value:= fExpressionEvaluator.Evaluate(Expression);
+end;
+
+procedure TDADataTable.InternalOnDeleteError(DataSet: TDataSet; Error: EDatabaseError; var Action: TDataAction);
+begin
+  if Assigned(OnDeleteError) then OnDeleteError(Self, Error, Action);
+  if Assigned(fBusinessRules) then fBusinessRules.OnDeleteError(Self, Error, Action);
+end;
+
+procedure TDADataTable.InternalOnEditError(DataSet: TDataSet; Error: EDatabaseError; var Action: TDataAction);
+begin
+  if Assigned(OnEditError) then OnEditError(Self, Error, Action);
+  if Assigned(fBusinessRules) then fBusinessRules.OnEditError(Self, Error, Action);
+end;
+
+procedure TDADataTable.InternalOnFilterRecord(Dataset: TDataset; var Accept: Boolean);
+begin
+  if Assigned(OnFilterRecord) then OnFilterRecord(Self, Accept);
+  if Assigned(fBusinessRules) then fBusinessRules.OnFilterRecord(Self, Accept);
+end;
+
+procedure TDADataTable.InternalOnPostError(DataSet: TDataSet; Error: EDatabaseError; var Action: TDataAction);
+begin
+  fDelta.RestoreLastChange; // ALEF: added as follow up to the Post errors (Jeff B.)
+
+  if Assigned(OnPostError) then OnPostError(Self, Error, Action);
+  if Assigned(fBusinessRules) then fBusinessRules.OnPostError(Self, Error, Action);
+end;
+
+procedure TDADataTable.SetLogChanges(const Value: boolean);
+begin
+  fLogChanges := Value;
+end;
+
+function TDADataTable.GetDataset: TDataset;
+begin
+  result := fDataset // inherited Dataset;
+end;
+
+function TDADataTable.GetFields: TDAFieldCollection;
+begin
+  result := fFields;
+end;
+
+procedure TDADataTable.SetFields(const Value: TDAFieldCollection);
+begin
+  if Active then Close;
+  fFields.Assign(Value);
+end;
+
+function TDADataTable.GetActive: boolean;
+begin
+  result := fDataset.Active;
+end;
+
+procedure TDADataTable.SetActive(Value: boolean);
+begin
+  if (csLoading in ComponentState) then
+    fStreamedActive := Value
+  else begin
+    if (Value <> Active) then begin
+      if Value then
+        Open
+      else
+        Close
+    end;
+  end;
+end;
+
+procedure TDADataTable.InternalOnNewRecord(Sender: TDataset);
+var
+  i: integer;
+begin
+  fFields.FieldEventsDisabled := TRUE;
+  try
+    try
+      for i := 0 to (fFields.Count - 1) do begin
+        if (fFields[i].DefaultValue <> '') then fFields[i].Value := fFields[i].DefaultValue;
+        // (autoinc)
+        if (fFields[i].DataType=datLargeAutoInc) then begin
+          fFields[i].AsLargeInt := AutoIncs[i];
+          AutoIncs[i] := AutoIncs[i]-1;
+        end
+        else if (fFields[i].DataType=datAutoInc) then begin
+          fFields[i].AsInteger := AutoIncs[i];
+          AutoIncs[i] := AutoIncs[i]-1;
+        end;
+      end;
+
+      fFields.FieldEventsDisabled := FALSE;
+
+      CallScript('OnNewRecord');
+      if Assigned(OnNewRecord) then OnNewRecord(Self);
+      if Assigned(fBusinessRules) then fBusinessRules.OnNewRecord(Self);
+    except
+      fDelta.CancelChange; // OnNewRecord's exception put the dataset in read mode so we must cancel the change
+      raise;
+    end;
+  finally
+    fFields.FieldEventsDisabled := FALSE; // Just in case...
+  end;
+end;
+
+procedure TDADataTable.DoCascadeOperation(aStreamer: TDADataStreamer; aOption: TDAMasterOption);
+var
+  i: integer;
+  details: TList;
+  dt: TDADataTable;
+  flag: boolean;
+  lRemoteList,lLocalList: TList;
+begin
+  if aOption = moAllInOneFetch then begin
+    DoCascadeRemoteAllInOneFetch(aStreamer);
+    exit;
+  end;
+  lRemoteList:= TList.Create;
+  lLocalList:= TList.Create;
+
+  GetDetailTablesforAllinOneFetch(lRemoteList,lLocalList, False);
+  details := GetDetailDataTables;
+  try
+    for i := 0 to (details.Count - 1) do begin
+      dt := TDADataTable(details[i]);
+      flag := dt.LogChanges;
+
+      case aOption of
+        moCascadeDelete: begin
+            if (dtDisableLogOfCascadeDeletes in dt.DetailOptions) then dt.LogChanges := FALSE;
+
+            dt.ClearRows;
+          end;
+
+        moCascadeOpenClose: begin
+            if (dtCascadeOpenClose in dt.DetailOptions) then begin
+              if Opening then begin
+                if (lLocalList.IndexOf(dt)=-1)and (lRemoteList.IndexOf(dt)=-1) then begin
+                  dt.Close;
+                  dt.DoOpen;
+                end;
+              end
+              else if Closing then
+                dt.Close;
+            end;
+          end;
+
+        moCascadeUpdate: begin
+          end;
+
+        moAllInOneFetch: begin
+          {
+          if (dtIncludeInAllInOneFetch in dt.DetailOptions) then try
+            dt.LogChanges := FALSE;
+
+            if Opening and not (soIgnoreStreamSchema in fStreamingOptions) then
+              begin
+                aStreamer.ReadDataset(dt.LogicalName, dt, TRUE, FALSE);
+                dt.InitializeDataTable;
+              end;
+
+            aStreamer.ReadDataset(dt.LogicalName, dt);
+            dt.DoCascadeOperation(aStreamer, moAllInOneFetch);
+          finally
+            dt.LogChanges := flag;
+          end; }
+        end;
+      end;
+
+      dt.LogChanges := flag;
+    end;
+  finally
+    details.Free;
+    lRemoteList.Free;
+    lLocalList.Free;
+  end;
+end;
+
+procedure TDADataTable.DoCascadeRemoteAllInOneFetch(aStreamer: TDADataStreamer);
+var
+  lFetchedMasters: TStringList;
+
+  procedure ProcessDetailTable(aTable: TDADataTable);
+  begin
+    with aTable do begin
+      fFetchedMasters.Sorted:=False;
+      fFetchedMasters.AddStrings(lFetchedMasters);
+      fFetchedMasters.Sorted:=True;
+      DoCascadeRemoteAllInOneFetch(aStreamer);
+    end;
+  end;
+
+var
+  lLocalList, lRemoteList: TList;
+  ltbl: TDADataTable;
+  i: integer;
+  lflag: boolean;
+begin
+  if moAllInOneFetch in fMasterOptions then begin
+    lRemoteList:= TList.Create;
+    lLocalList:= TList.Create;
+    try
+      GetDetailTablesforAllinOneFetch(lRemoteList,lLocalList, False);
+      if (lRemoteList.Count > 0) or (lLocalList.Count > 0) then begin
+        lFetchedMasters:= TStringList.Create;
+        try
+          First;
+          while not EOF do begin
+            lFetchedMasters.Add(IntToStr(GetRowRecIDValue));
+            Next;
+          end;
+          lFetchedMasters.Sort;
+
+          // these tables are read in RDA
+          for i := 0 to lRemoteList.Count - 1 do begin
+            ProcessDetailTable(TDADataTable(lRemoteList[i]));
+          end;
+
+          // these tables we should read manually from streamer
+          for i := 0 to lLocalList.Count - 1 do begin
+            ltbl:= TDADataTable(lLocalList[i]);
+            if aStreamer.FindDatasetIndex(ltbl.LogicalName) = -1 then Continue; // may be to better raise an exception!
+            lflag := ltbl.LogChanges;
+            try
+              ltbl.LogChanges := False;
+              if Opening and not (soIgnoreStreamSchema in fStreamingOptions) then begin
+                aStreamer.ReadDataset(ltbl.LogicalName, ltbl, TRUE, FALSE);
+                ltbl.InitializeDataTable;
+               end;
+              aStreamer.ReadDataset(ltbl.LogicalName, ltbl);
+            finally
+              ltbl.LogChanges := lflag;
+            end;
+            ProcessDetailTable(ltbl);
+          end;
+        finally
+          lFetchedMasters.Free;
+        end;
+      end;
+    finally
+      lRemoteList.Free;
+      lLocalList.Free;
+    end;
+  end;
+end;
+
+procedure TDADataTable.TempSetRowRecIDValue(Sender: TDataset);
+begin
+  if (State <> dsEdit) then begin // Somehow it's gets in dsBrowse here...
+    fRecIDField.AsInteger := CurrRecId;
+    CurrRecId := CurrRecId + 1;
+  end;
+end;
+
+procedure TDADataTable.CreateInternalFields(aDataset: TDataset; someFieldDefinitions: TDAFieldCollection);
+var
+  i, cnt: integer;
+  fld: TFieldDef;
+  fldcls: TFieldClass;
+  realfld: TField;
+begin
+  // Creates the RecID field
+  fld := aDataset.FieldDefs.AddFieldDef;
+  fld.DataType := ftInteger;
+  fld.Name := RecIDFieldName;
+
+  // Creates the autoinc map (autoinc)
+  AutoIncs := CreateAutoIncArray;
+
+  // Adds the data fields (non calculated) to the FieldDefs
+  for i := 0 to (Fields.Count - 1) do begin
+    if Fields[i].Calculated or Fields[i].Lookup then Continue; // Added as fields later
+
+    fld := aDataset.FieldDefs.AddFieldDef;
+
+    // (autoinc)
+    if (Fields[i].DataType=datLargeAutoInc)
+      then fld.DataType := ftLargeint
+    else
+    if (Fields[i].DataType=datAutoInc)
+      then fld.DataType := ftInteger
+      else fld.DataType := intDATypeToVCLType(Fields[i].DataType);
+
+    fld.Name := Fields[i].Name;
+
+    {if not (fld.DataType in [ftFloat, ftCurrency, ftBlob, ftInteger])
+      then fld.Size := Fields[i].Size;}
+
+    if (fld.DataType = ftString) or (fld.DataType = ftWideString) then fld.Size := Fields[i].Size;
+    if (fld.DataType = ftGuid) then fld.Size := 38;
+{
+    if (fld.DataType = ftBcd) then begin
+      fld.Size:=Fields[i].DecimalScale;
+      fld.Precision:=Fields[i].DecimalPrecision;
+    end;
+}
+    if (fld.DataType = ftFMTBcd) then begin
+      fld.Size:=Fields[i].DecimalScale;
+      fld.Precision:=Fields[i].DecimalPrecision;
+    end;
+
+    fld.Required := Fields[i].Required;
+  end;
+
+  // Creates the data fields
+  for i := 0 to (aDataset.FieldDefs.Count - 1) do begin
+    realfld := aDataset.FieldDefs[i].CreateField(aDataset);
+    realfld.DataSet := aDataset; // NEW
+  end;
+
+  // Creates the calculated fields
+  for i := 0 to (Fields.Count - 1) do begin
+    if not Fields[i].Calculated then Continue;
+
+    fldcls := DefaultFieldClasses[intDATypeToVCLType(Fields[i].DataType)];
+    if fldcls = nil then fldcls := TStringField;
+    realfld := fldcls.Create(Self);
+    realfld.Name := aDataset.Name + Fields[i].Name;
+    realfld.FieldName := Fields[i].Name;
+    realfld.DataSet := aDataset;
+
+    if (Fields[i].DataType = datString) or (Fields[i].DataType = datWideString) then realfld.Size := Fields[i].Size;
+
+    realfld.Required := Fields[i].Required;
+    if Fields[i].Calculated then realfld.FieldKind := fkCalculated;
+
+    realfld.DataSet := aDataset;
+  end;
+
+  // Creates the lookup fields
+  for i := 0 to (Fields.Count - 1) do begin
+    if not Fields[i].Lookup then Continue;
+
+    fldcls := DefaultFieldClasses[intDATypeToVCLType(Fields[i].DataType)];
+
+    if not Assigned(fldcls) then
+      RaiseError('No or invalid DataType specified for lookup field %s.%s',[self.Name, Fields[i].Name]);
+
+    realfld := fldcls.Create(Self);
+    realfld.Name := aDataset.Name + Fields[i].Name;
+    realfld.FieldName := Fields[i].Name;
+    realfld.DataSet := aDataset; // NEW
+
+    // Sets lookup properties
+    with Fields[i] do begin
+      {$IFNDEF FPC}
+      realfld.Lookup := TRUE;
+      {$ENDIF}
+      realfld.FieldKind:=fkLookup;
+      if (LookupSource<>NIL) then
+        with TDADataSource(LookupSource) do
+          if Assigned(DataTable)
+            then realfld.LookupDataSet := DataTable.Dataset;
+
+      realfld.LookupKeyFields := LookupKeyFields;
+      realfld.LookupCache := LookupCache;
+      realfld.LookupResultField := LookupResultField;
+      realfld.KeyFields := KeyFields;
+    end;
+
+    if (Fields[i].DataType = datString) or (Fields[i].DataType = datWideString) then realfld.Size := Fields[i].Size;
+
+    //realfld.DataSet := aDataset;
+  end;
+
+  // Adjusts field positions (less intrusive than changing the code above)
+  cnt := Fields.Count-1;
+  for i := 0 to cnt do begin
+    realfld := aDataSet.FieldByName(Fields[i].Name);
+    realfld.Index := i+1;
+    if (Fields[i].DataType = datCurrency) and (realfld is TBCDField) then TBcdField(realfld).currency := True;
+  end;
+end;
+
+procedure TDADataTable.Loaded;
+begin
+  inherited;
+
+  if Assigned(fBusinessRules)
+    then fBusinessRules.Attach(Self);
+
+  //Active := fStreamedActive;
+  if fStreamedActive then Active:=True;
+
+//  AttachEventHooks(fDataset);
+end;
+
+procedure TDADataTable.DoRefresh(aDataset: TDataset);
+begin
+  if fRefreshing then Exit;
+
+  fRefreshing := TRUE;
+  try
+    Close;
+    Open;
+  finally
+    fRefreshing := FALSE;
+  end;
+end;
+
+procedure TDADataTable.InternalBeforeInsert(Sender: TDataset);
+var
+  i: Integer;
+begin
+  if UsingClonedCursor and DeltaInitialized then Delta.AssignDataTable(Self);
+  try
+    CallScript('BeforeInsert');
+    if Assigned(BeforeInsert) then BeforeInsert(Self);
+    if Assigned(fBusinessRules) then fBusinessRules.BeforeInsert(Self);
+
+    if not LogChanges or (csDesigning in ComponentState) then Exit;
+
+    fDelta.StartChange(ctInsert);
+
+    SetLength(fOldValues, FieldCount);
+    for i := 0 to Length(fOldValues) -1 do
+      fOldValues[i] := null;
+  except
+    // Somehow the insert failed, so we restore the original data table to the delta
+    if UsingClonedCursor and HasDelta then Delta.AssignDataTable(fCloneSource);
+    raise;
+  end;
+end;
+
+procedure TDADataTable.InternalBeforeDelete(Sender: TDataset);
+begin
+  if UsingClonedCursor and DeltaInitialized then Delta.AssignDataTable(Self);
+  try
+    CallScript('BeforeDelete');
+    if Assigned(BeforeDelete) then BeforeDelete(Self);
+    if Assigned(fBusinessRules) then fBusinessRules.BeforeDelete(Self);
+
+    if not LogChanges or (csDesigning in ComponentState) then Exit;
+
+    // Deletes the records from the detail tables
+    if (moCascadeDelete in MasterOptions) then DoCascadeOperation(nil, moCascadeDelete);
+
+    // Logs the delete
+    fDelta.StartChange(ctDelete);
+    fDelta.EndChange;
+  finally
+    if UsingClonedCursor and HasDelta then Delta.AssignDataTable(fCloneSource);
+  end;    
+end;
+
+procedure TDADataTable.InternalBeforeEdit(Sender: TDataset);
+var
+  i: integer;
+begin
+  if UsingClonedCursor and DeltaInitialized then Delta.AssignDataTable(Self);
+  try
+    CallScript('BeforeEdit');
+    if Assigned(BeforeEdit) then BeforeEdit(Self);
+    if Assigned(fBusinessRules) then fBusinessRules.BeforeEdit(Self);
+
+    if not LogChanges or (csDesigning in ComponentState) then Exit;
+
+    fDelta.StartChange(ctUpdate);
+
+    SetLength(fOldValues, Dataset.Fields.Count);
+    for i := 0 to Length(fOldValues) -1 do
+      fOldValues[i] := Dataset.Fields[i].Value;
+  except
+    // Somehow the edit failed, so we restore the original data table to the delta
+    if UsingClonedCursor and HasDelta then Delta.AssignDataTable(fCloneSource);
+    raise;
+  end;
+end;
+
+procedure TDADataTable.InternalBeforePost(Sender: TDataset);
+var details : TList;
+    key : string;
+    i : integer;
+begin
+  CallScript('BeforePost');
+  if Assigned(BeforePost) then BeforePost(Self);
+  if Assigned(fBusinessRules) then fBusinessRules.BeforePost(Self);
+
+  for i := 0 to (fFields.Count - 1) do
+    if (fFields[i].RegExpression <> '') and not fFields[i].IsNull then begin
+      if not ExecRegExpr(fFields[i].RegExpression, fFields[i].AsString) then RaiseError('Invalid input value for field ' + fFields[i].Name);
+    end;
+
+  if (State <> dsEdit) then begin // Somehow it's gets in dsBrowse here...
+    fRecIDField.AsInteger := CurrRecId;
+    CurrRecId := CurrRecId + 1;
+  end;
+
+  // This was originally in AfterPost. Moved here because after a post filters might step in and the current
+  // record can change resulting in half change from record X and the remaining from record Y
+
+  if not LogChanges or (csDesigning in ComponentState) then Exit;
+  fDelta.EndChange;
+
+  // Adds a reference to the RecID of this record to avoid double fetching records
+  // This is a new master record, so it means there are no details to fetch remotely
+  if (State=dsInsert) then begin
+    key := IntToStr(GetRowRecIDValue);
+    details := GetDetailDataTables;
+    try
+      for i := 0 to (details.Count-1) do begin
+       with TDADataTable(details[i]) do
+        if Active and (fFetchedMasters.IndexOf(key)<0) then fFetchedMasters.Add(key);
+      end;
+    finally
+      details.Free;
+    end;
+  end;
+  if (ruoOnPost in RemoteUpdatesOptions) then try
+    ApplyUpdates();
+  except
+    on E: Exception do
+      begin
+        if fDelta.Count > 0 then
+          fDelta.RestoreLastChange
+        else case Self.State of
+          dsEdit: fDelta.StartChange(ctUpdate);
+          dsInsert: fDelta.StartChange(ctInsert);
+        end;
+        raise;
+      end;
+  end;
+end;
+
+procedure TDADataTable.InternalAfterPost(Sender: TDataset);
+begin
+  try
+    CallScript('AfterPost');
+    if Assigned(AfterPost) then AfterPost(Self);
+    if Assigned(fBusinessRules) then fBusinessRules.AfterPost(Self);
+
+    if not LogChanges or (csDesigning in ComponentState) then Exit;
+  finally
+    // Finally restores the original datatable to the delta
+    if UsingClonedCursor and DeltaInitialized then Delta.AssignDataTable(fCloneSource);
+  end;
+end;
+
+procedure TDADataTable.InternalAfterCancel(Sender: TDataset);
+begin
+  CallScript('AfterCancel');
+  if Assigned(AfterCancel) then AfterCancel(Self);
+  if Assigned(fBusinessRules) then fBusinessRules.AfterCancel(Self);
+
+  fDelta.CancelChange;
+end;
+
+function TDADataTable.GetLogChanges: boolean;
+begin
+  result := fLogChanges;
+end;
+
+procedure TDADataTable.DisableControls;
+begin
+  fDataset.DisableControls;
+end;
+
+procedure TDADataTable.EnableControls;
+begin
+  fDataset.EnableControls;
+end;
+
+function TDADataTable.GetBOF: boolean;
+begin
+  result := fDataset.BOF
+end;
+
+function TDADataTable.GetEOF: boolean;
+begin
+  result := fDataset.EOF
+end;
+
+function TDADataTable.GetFieldCount: integer;
+begin
+  result := fFields.Count
+end;
+
+function TDADataTable.GetFieldValues(Index: integer): Variant;
+begin
+  result := Fields[Index].Value
+end;
+
+function TDADataTable.GetNames(Index: integer): string;
+begin
+  result := Fields[Index].Name
+end;
+
+function TDADataTable.GetRecordCount: integer;
+begin
+  result := fDataset.RecordCount;
+end;
+
+function TDADataTable.GetSQL: string;
+begin
+  // Not implemented in DataTables
+  result := '';
+end;
+
+function TDADataTable.Locate(const KeyFields: string;
+  const KeyValues: Variant; Options: TLocateOptions): Boolean;
+begin
+  if VarIsArray(KeyValues) and (VarArrayHighBound(KeyValues, 1) = 0)
+    then result := fDataset.Locate(KeyFields, KeyValues[0], Options)
+    else result := fDataset.Locate(KeyFields, KeyValues, Options);
+end;
+
+procedure TDADataTable.Next;
+begin
+  fDataset.Next;
+end;
+
+procedure TDADataTable.SetSQL(const Value: string);
+begin
+  // Not implemented in DataTables
+end;
+
+function TDADataTable.Execute: integer;
+begin
+  // Not implemented in DataTables
+  result := -1;
+end;
+
+function TDADataTable.GetParams: TDAParamCollection;
+begin
+  // Not implemented in DataTables
+  result := fParams;
+end;
+
+procedure TDADataTable.RefreshParams;
+begin
+  // Not implemented in DataTables
+end;
+
+procedure TDADataTable.Append;
+begin
+  fDataset.Append;
+end;
+
+procedure TDADataTable.Delete;
+begin
+  fDataset.Delete;
+end;
+
+procedure TDADataTable.Cancel;
+begin
+  fDataset.Cancel;
+end;
+
+procedure TDADataTable.Edit;
+begin
+  fDataset.Edit;
+end;
+
+procedure TDADataTable.Insert;
+begin
+  fDataset.Insert;
+end;
+
+procedure TDADataTable.Post;
+begin
+  fDataset.Post;
+end;
+
+{$WARN SYMBOL_DEPRECATED OFF}
+function TDADataTable.GetWhere: TDAWhere;
+begin
+  result := fWhere
+end;
+{$WARN SYMBOL_DEPRECATED ON}
+
+procedure TDADataTable.SetRemoteDataAdapter(const Value: TDABaseRemoteDataAdapter);
+begin
+  if Value <> fRemoteDataAdapter then begin
+    fRemoteDataAdapter := Value;
+    if assigned(fRemoteDataAdapter) then fRemoteDataAdapter.FreeNotification(self);
+  end;
+end;
+
+procedure TDADataTable.Close;
+begin
+  if not Active then Exit;
+
+  fClosing := TRUE;
+  try
+    DoBeforeCloseDataset;
+    if Assigned(BeforeClose) then BeforeClose(Self);
+    if Assigned(fBusinessRules) then fBusinessRules.BeforeClose(Self);
+
+    if (moCascadeOpenClose in MasterOptions) then DoCascadeOperation(nil, moCascadeOpenClose);
+
+    Dataset.Close;
+    fFields.Unbind;
+
+    //Dataset.Fields.Clear;
+
+    fDelta := nil;
+
+    fFetchedMasters.Clear;
+
+    DoAfterCloseDataset;
+    if Assigned(AfterClose) then AfterClose(Self);
+    if Assigned(fBusinessRules) then fBusinessRules.AfterClose(Self);
+  finally
+    fClosing := FALSE;
+  end;
+end;
+
+procedure TDADataTable.InitializeDataTable;
+begin
+  fCurrRecId := 1;
+
+  try
+    fDataset.Fields.Clear;
+    fDataset.FieldDefs.Clear;
+  finally
+    NotifyFieldsClear;
+  end;
+  try
+    // Creates the fields for the internal dataset
+    CreateInternalFields(fDataset, Fields);
+  finally
+    NotifyFieldsClear;
+  end;
+
+  fRecIDField := fDataset.FieldByName(RecIDFieldName) as TIntegerField;
+  fRecIDField.Visible := FALSE;
+
+  fFields.Bind(fDataset);
+
+  // Prepares the delta
+  fDelta := TDADelta.Create(Self);
+
+(*
+  // Finishes to prepare the internal dataset (descendant might need additional customization and might not be open)
+  if RemoteFetchEnabled and
+     (RemoteDataAdapter<>nil) and
+     (TDARemoteDataAdapter(RemoteDataAdapter).GetDataCall.Default) then
+     LoadScript();
+*)
+  DoBeforeOpenDataset;
+  if not Dataset.Active then Dataset.Open;
+  DoAfterOpenDataset;
+end;
+
+procedure TDADataTable.LoadFromLocalSchema;
+var
+  lConnection: IDAConnection;
+  data: TStream;
+  gofirst, oldlog: boolean;
+  ds: IDADataset;
+  i: integer;
+  lDynFields: array of string;
+begin
+  if (LocalSchema = nil) or (LogicalName = '') or fStreaming then begin
+    InitializeDataTable;
+    Exit;
+  end;
+
+  // Local but from schema. Client/Server mode
+  CheckProperties;
+
+  lConnection := LocalSchema.ConnectionManager.NewConnection(fLocalConnection);
+  try
+    SetLength(lDynFields, 0);
+    ds := LocalSchema.NewDataset(lConnection, fLogicalName,lDynFields,fDynamicWhere.Xml);
+    ds.Where.AddText(Where.Clause);
+
+    oldlog := LogChanges;
+    fFetching := TRUE;
+    LogChanges := FALSE;
+  //  book := nil;
+
+    data := Binary.Create;
+    Binary(data).CapacityIncrement := LocalDataStreamer.BufferSize;
+    try
+      for i := 0 to (ds.Params.Count - 1) do
+        ds.Params[i].Value := ParamByName(ds.Params[i].Name).Value;
+
+      LocalDataStreamer.WriteDataset(data, ds, [woRows, woSchema], MaxRecords);
+
+      if Active then
+        gofirst := FALSE
+      else
+        gofirst := TRUE;
+
+      if Assigned(fOnReceiveDataStream) then fOnReceiveDataStream(Self, data);
+      if Assigned(fBusinessRules) then fBusinessRules.OnReceiveDataStream(Self, data);
+      data.Position := 0;
+
+      // Reads the data
+      LocalDataStreamer.Initialize(data, aiRead);
+      try
+        if (LocalDataStreamer.DatasetCount = 0) then RaiseError('Stream does not contain any dataset');
+
+        if Opening then begin
+          if not (soIgnoreStreamSchema in fStreamingOptions) then LocalDataStreamer.ReadDataset(LogicalName, Self, TRUE, FALSE);
+
+          InitializeDataTable;
+        end;
+
+        LocalDataStreamer.ReadDataset(LogicalName, Self, FALSE);
+        {
+        if (moAllInOneFetch in MasterOptions) then begin
+          DoCascadeOperation(LocalDataStreamer, moAllInOneFetch);
+        end;}
+      finally
+        LocalDataStreamer.Finalize;
+      end;
+
+      if gofirst then First;
+    finally
+      fFetching := FALSE;
+      data.Free;
+      LogChanges := oldlog;
+    end;
+  finally
+    lConnection := nil;
+  end;
+end;
+
+procedure TDADataTable.LoadLocalSchema(aPreserveLookupFields,
+  aPreserveClientCalcFields: Boolean);
+type
+  THandlerArray = array[0..1] of TMethod;
+  PHandlerArray = ^THandlerArray;
+
+const
+  HandlersToSave : array[0..1] of string = ('OnChange', 'OnValidate');
+
+var
+  lFieldHandlers : TStringList;
+  lHandlers : PHandlerArray;
+  lookupfields : TDAFieldCollection;
+  clientcalcfields : TDAFieldCollection;
+  i, j, lIndex: integer;
+  lConnection: IDAConnection;
+  lDataset: IDADataset;
+  data: TStream;
+begin
+  if Active then Close();
+
+  lookupfields := nil;
+  clientcalcfields := nil;
+
+  Fields.FieldEventsDisabled := true;
+
+  try
+    lFieldHandlers := TStringList.Create;
+
+    { Saves the current event handler pointers }
+    for i := 0 to Fields.Count-1 do begin
+      New(lHandlers);
+      for j := Low(HandlersToSave) to High(HandlersToSave) do
+        lHandlers[j] := GetMethodProp(Fields[i], HandlersToSave[j]);
+      lFieldHandlers.AddObject(Fields[i].Name, TObject(lHandlers));
+    end;
+
+    { Save lookup and calced fields}
+    if aPreserveLookupFields then begin
+      lookupfields := TDAFieldCollection.Create(nil);
+      lookupfields.Assign(Fields);
+      for i := (lookupfields.Count-1) downto 0 do
+        if not (lookupfields[i] as TDACustomField).Lookup then
+          lookupfields.Delete(i);
+    end;
+
+    if aPreserveClientCalcFields then begin
+      clientcalcfields := TDAFieldCollection.Create(nil);
+      clientcalcfields.Assign(Fields);
+      for i :=(clientcalcfields.Count-1) downto 0 do
+        if not (clientcalcfields[i] as TDACustomField).Calculated then
+          clientcalcfields.Delete(i);
+    end;
+
+    Fields.Clear;
+
+    try
+      lConnection := LocalSchema.ConnectionManager.NewConnection(fLocalConnection);
+      lDataset := LocalSchema.NewDataset(lConnection, fLogicalName);
+
+      data := Binary.Create;
+      Binary(data).CapacityIncrement := LocalDataStreamer.BufferSize;
+      try
+        LocalDataStreamer.WriteDataset(data, lDataset, [woSchema], MaxRecords);
+        data.Position := 0;
+        LocalDataStreamer.Initialize(data, aiRead);
+        try
+          if (LocalDataStreamer.DatasetCount = 0) then RaiseError('Stream does not contain any dataset');
+          LocalDataStreamer.ReadDataset(LogicalName, Self, true, false);
+        finally
+          LocalDataStreamer.Finalize;
+        end;
+      finally
+        data.Free;
+      end;
+
+    finally
+      if aPreserveLookupFields then
+        for i := 0 to (lookupfields.Count-1) do
+          Fields.Add.Assign(lookupfields[i]);
+      if aPreserveClientCalcFields then
+        for i := 0 to (clientcalcfields.Count-1) do
+          if not Assigned(Fields.FindField(clientcalcfields[i].Name)) then
+            Fields.Add.Assign(clientcalcfields[i]);
+
+      { restores the old event handler pointers }
+      for i := 0 to Fields.Count-1 do begin
+        lIndex := lFieldHandlers.IndexOf(Fields[i].Name);
+        if lIndex >= 0 then begin
+          lHandlers := PHandlerArray(lFieldHandlers.Objects[lIndex]);
+          for j := Low(HandlersToSave) to High(HandlersToSave) do
+            SetMethodProp(Fields[i], HandlersToSave[j], lHandlers[j]);
+          Dispose(lHandlers);
+        end;
+      end;
+      lFieldHandlers.Free;
+    end;
+  finally
+    clientcalcfields.Free;
+    lookupfields.Free;
+    Fields.FieldEventsDisabled := false;
+  end;
+end;
+
+procedure TDADataTable.DoOpen(IgnoreAutoFetchSettings: Boolean);
+
+  procedure CheckForMaster(aMasterTable, aLookupTable: TDADataTable);
+  begin
+    if aMasterTable = aLookupTable then raise Exception.Create('You can''t use master source as lookup source');
+    if aMasterTable.MasterSource <> nil then CheckForMaster(aMasterTable.MasterSource.DataTable,aLookupTable);
+  end;
+
+  procedure CheckForCloneSource(aSourceTable, aLookupTable: TDADataTable);
+  begin
+    if aSourceTable = aLookupTable then raise Exception.Create('You can''t use clone source as lookup source');
+    if aSourceTable.CloneSource <> nil then CheckForCloneSource(aSourceTable.CloneSource,aLookupTable);
+  end;
+
+var
+  i : integer;
+begin
+  if Active or fOpening then Exit;
+
+  fOpening := TRUE;
+  try
+    if (MasterSource <> nil) then
+      if (MasterSource.DataTable <> nil) then begin
+        for i := 0 to (FieldCount-1) do
+          if Fields[i].Lookup and (Fields[i].LookupSource<>NIL) and (Fields[i].LookupSource is TDADataSource) and
+             Assigned(TDADataSource(Fields[i].LookupSource).DataTable) then begin
+             CheckForMaster(MasterSource.DataTable, TDADataSource(Fields[i].LookupSource).DataTable)
+          end;
+      end;
+    if (CloneSource <> nil) then
+      for i := 0 to (FieldCount-1) do
+        if Fields[i].Lookup and (Fields[i].LookupSource<>NIL) and (Fields[i].LookupSource is TDADataSource) and
+           Assigned(TDADataSource(Fields[i].LookupSource).DataTable) then begin
+           CheckForCloneSource(CloneSource,TDADataSource(Fields[i].LookupSource).DataTable);
+        end;
+
+    { Checks that all the lookup datasets are open. If not, we would get the error "Missing Data Provider"}
+    for i := 0 to (FieldCount-1) do
+      if Fields[i].Lookup and (Fields[i].LookupSource<>NIL) then begin
+        if (Fields[i].LookupSource is TDADataSource) then begin
+          if Assigned(TDADataSource(Fields[i].LookupSource).DataTable)
+            then TDADataSource(Fields[i].LookupSource).DataTable.Open;
+        end
+        else begin
+          if Assigned(Fields[i].LookupSource.DataSet)
+            then Fields[i].LookupSource.DataSet.Open;
+        end;
+      end;
+
+
+    if Assigned(BeforeOpen) then BeforeOpen(Self);
+    if Assigned(fBusinessRules) then fBusinessRules.BeforeOpen(Self);
+
+    try
+      if not fFetching then begin
+        if fMasterLink.Active then
+          FetchMastersDetails(nil, nil, IgnoreAutoFetchSettings) // This calls InitializeDataTable possibily applying a new schema
+        else begin
+          if fCloneSource <> nil then begin
+            fCloneSource.Open;
+            if fCloneSource.Active then
+              CloneCursor(fCloneSource)
+            else
+              Exit;  
+          end  
+          else begin
+            if RemoteFetchEnabled then
+              LoadFromRemoteSource
+            else
+              LoadFromLocalSchema;
+          end;
+        end;
+      end;
+
+      if (moCascadeOpenClose in MasterOptions) then DoCascadeOperation(nil, moCascadeOpenClose);
+
+      if Assigned(AfterOpen) then AfterOpen(Self);
+      if Assigned(fBusinessRules) then fBusinessRules.AfterOpen(Self);
+    except
+      on E: Exception do begin
+        Close;
+        {$IFDEF DESIGNTIME}
+        if (csDesigning in ComponentState) then begin
+          SysUtils.Beep;
+          MessageDlg(E.Message, mtError, [mbOK], 0);
+        end
+        else
+        {$ENDIF DESIGNTIME}
+        raise;
+      end;
+    end;
+  finally
+    fOpening := FALSE;
+  end;
+end;
+
+procedure TDADataTable.Open;
+begin
+  DoOpen(True);
+end;
+
+
+procedure TDADataTable.OnMasterChange(Sender: TObject);
+begin
+  if (MasterSource <> nil) and (MasterSource.DataTable <> nil) then begin
+    if MasterSource.DataTable.fFetching then
+      exit;
+  end;
+
+  FetchMastersDetails;
+end;
+
+procedure TDADataTable.OnMasterDisable(Sender: TObject);
+begin
+
+end;
+
+procedure TDADataTable.LoadFromRemoteSource(BookmarkPosition: boolean = FALSE);
+begin
+  CheckProperties(True);
+  if Assigned(fOnBeforeDataRequestCall) then fOnBeforeDataRequestCall(Self, RemoteDataAdapter.Get_GetDataCall);
+  if Assigned(fBusinessRules) then fBusinessRules.OnBeforeDataRequestCall(Self, RemoteDataAdapter.Get_GetDataCall);
+  RemoteDataAdapter.Fill([self], BookmarkPosition, FieldCount = 0);
+  if Assigned(fOnAfterDataRequestCall) then fOnAfterDataRequestCall(Self, RemoteDataAdapter.Get_GetDataCall);
+  if Assigned(fBusinessRules) then fBusinessRules.OnAfterDataRequestCall(Self, RemoteDataAdapter.Get_GetDataCall);
+end;
+
+function TDADataTable.ApplyUpdates(RefetchAll: boolean = FALSE): boolean;
+var
+  details: TList;
+  i: integer;
+  dt: TDADataTable;
+begin
+  if (fCloneSource<>NIL) then
+    result := fCloneSource.ApplyUpdates(RefetchAll)
+  else begin
+    if not (ruoOnPost in RemoteUpdatesOptions) and (State in [dsInsert, dsEdit]) then Post;
+    details:= GetDetailTablesforApplyUpdate;
+    try
+      // check RDA
+      CheckProperties;
+      for i := 0 to details.Count-1 do begin
+        dt:= TDADataTable(details[i]);
+        {if dt.RemoteFetchEnabled then } dt.CheckProperties;
+      end;
+
+      //fOnBeforeApplyUpdates
+      if Assigned(fOnBeforeApplyUpdates) then fOnBeforeApplyUpdates(Self, fDelta);
+      for i := 0 to details.Count-1 do begin
+         dt:= TDADataTable(details[i]);
+         if Assigned(dt.fOnBeforeApplyUpdates) then dt.fOnBeforeApplyUpdates(dt, fDelta);
+      end;
+
+      //fBusinessRules.OnBeforeApplyUpdates
+      if Assigned(fBusinessRules) then fBusinessRules.OnBeforeApplyUpdates(Self, fDelta);
+      for i := 0 to details.Count-1 do begin
+         dt:= TDADataTable(details[i]);
+         if Assigned(dt.fBusinessRules) then dt.fBusinessRules.OnBeforeApplyUpdates(dt, fDelta);
+      end;
+
+      if RemoteFetchEnabled then begin
+
+        //fOnBeforeDataUpdateCall
+        if Assigned(fOnBeforeDataUpdateCall) then fOnBeforeDataUpdateCall(Self, RemoteDataAdapter.Get_UpdateDataCall);
+        for i := 0 to details.Count-1 do begin
+          dt:= TDADataTable(details[i]);
+          if Assigned(dt.fOnBeforeDataUpdateCall) then dt.fOnBeforeDataUpdateCall(dt, dt.RemoteDataAdapter.Get_UpdateDataCall);
+        end;
+
+        //fBusinessRules.OnBeforeDataUpdateCall
+        if Assigned(fBusinessRules) then fBusinessRules.OnBeforeDataUpdateCall(Self, RemoteDataAdapter.Get_UpdateDataCall);
+        for i := 0 to details.Count-1 do begin
+          dt:= TDADataTable(details[i]);
+          if Assigned(dt.fBusinessRules) then dt.fBusinessRules.OnBeforeDataUpdateCall(dt, dt.RemoteDataAdapter.Get_UpdateDataCall);
+        end;
+
+        result := RemoteDataAdapter.ApplyUpdates([self], RefetchAll);
+
+        //fOnAfterDataUpdateCall
+        if Assigned(fOnAfterDataUpdateCall) then fOnAfterDataUpdateCall(Self, RemoteDataAdapter.Get_UpdateDataCall);
+        for i := 0 to details.Count-1 do begin
+          dt:= TDADataTable(details[i]);
+          if Assigned(dt.fOnAfterDataUpdateCall) then dt.fOnAfterDataUpdateCall(dt, dt.RemoteDataAdapter.Get_UpdateDataCall);
+        end;
+
+        //fBusinessRules.OnAfterDataUpdateCall
+        if Assigned(fBusinessRules) then fBusinessRules.OnAfterDataUpdateCall(Self, RemoteDataAdapter.Get_UpdateDataCall);
+        for i := 0 to details.Count-1 do begin
+          dt:= TDADataTable(details[i]);
+          if Assigned(dt.fBusinessRules) then dt.fBusinessRules.OnAfterDataUpdateCall(dt, dt.RemoteDataAdapter.Get_UpdateDataCall);
+        end;
+
+      end
+      else begin
+        result := Local_ApplyUpdates(RefetchAll);
+      end;
+
+      //fOnAfterApplyUpdates
+      if Assigned(fOnAfterApplyUpdates) then fOnAfterApplyUpdates(Self);
+      for i := 0 to details.Count-1 do begin
+         dt:= TDADataTable(details[i]);
+         if Assigned(dt.fOnAfterApplyUpdates) then dt.fOnAfterApplyUpdates(dt);
+      end;
+
+      //fBusinessRules.OnAfterApplyUpdates
+      if Assigned(fBusinessRules) then fBusinessRules.OnAfterApplyUpdates(Self);
+      for i := 0 to details.Count-1 do begin
+         dt:= TDADataTable(details[i]);
+         if Assigned(dt.fBusinessRules) then dt.fBusinessRules.OnAfterApplyUpdates(dt);
+      end;
+    finally
+      details.Free;
+    end;
+  end;
+end;
+
+procedure TDADataTable.LoadSchema(PreserveLookupFields : boolean = FALSE; PreserveClientCalcFields : boolean = FALSE);
+begin
+  if RemoteFetchEnabled then begin
+    CheckProperties(True);
+    if Assigned(fOnBeforeSchemaCall) then fOnBeforeSchemaCall(Self, RemoteDataAdapter.Get_GetSchemaCall);
+    if Assigned(fBusinessRules) then fBusinessRules.OnBeforeSchemaCall(self, RemoteDataAdapter.Get_GetSchemaCall);
+    RemoteDataAdapter.FillSchema([self], PreserveLookupFields, PreserveClientCalcFields);
+    if Assigned(fOnAfterSchemaCall) then fOnAfterSchemaCall(Self, RemoteDataAdapter.Get_GetSchemaCall);
+    if Assigned(fBusinessRules) then fBusinessRules.OnAfterSchemaCall(self, RemoteDataAdapter.Get_GetSchemaCall);
+  end
+  else begin
+    CheckProperties;
+    LoadLocalSchema(PreserveLookupFields, PreserveClientCalcFields);
+  end;
+end;
+
+procedure TDADataTable.LoadScript(aDatasetName : string = '');
+begin
+  CheckProperties(True);
+  if Assigned(fOnBeforeScriptCall) then fOnBeforeScriptCall(Self, RemoteDataAdapter.Get_GetScriptsCall);
+  if Assigned(fBusinessRules) then fBusinessRules.OnBeforeScriptCall(Self, RemoteDataAdapter.Get_GetScriptsCall);
+  RemoteDataAdapter.FillScripts([self]);
+  if Assigned(fOnAfterScriptCall) then fOnAfterScriptCall(Self, RemoteDataAdapter.Get_GetScriptsCall);
+  if Assigned(fBusinessRules) then fBusinessRules.OnAfterScriptCall(Self, RemoteDataAdapter.Get_GetScriptsCall);
+end;
+
+procedure TDADataTable.FetchMastersDetails(aMasterTable : TDADataTable = NIL; aRequestMappings : TStrings = NIL; IgnoreAutoFetchSettings: Boolean = False);
+
+   procedure CombineDynamicWhere(aWhereExpression:TDAWhereExpression);
+   begin
+     if fMasterMappingMode = mmWhere then begin
+       if fDynamicWhere.Expression = nil then
+         fDynamicWhere.Expression:= aWhereExpression
+       else
+         fDynamicWhere.Expression:= fDynamicWhere.NewBinaryExpression(fDynamicWhere.Expression,aWhereExpression,dboAnd);
+     end;
+   end;
+
+   procedure RevertDynamicWhere(aWhereExpression:TDAWhereExpression);
+   var
+     fUserWhereExpression: TDAWhereExpression;
+   begin
+     if fMasterMappingMode = mmWhere then begin
+       fUserWhereExpression:= nil;
+       if fDynamicWhere.Expression <> aWhereExpression then begin
+          fUserWhereExpression:= TDABinaryExpression(fDynamicWhere.Expression).Left;
+          TDABinaryExpression(fDynamicWhere.Expression).Left:=nil;
+       end;
+       fDynamicWhere.Clear;
+       fDynamicWhere.Expression:= fUserWhereExpression;
+     end;
+   end;
+
+
+   function GenerateWhereStatement: TDAWhereExpression;
+   var
+     lFieldName: string;
+     pos1, pos2: integer;
+     lfld1: TDAField;
+     lfld2: TDAField;
+     lExpression: TDAWhereExpression;
+   begin
+     //fDynamicWhere.Clear;
+     Pos1 := 1;
+     pos2 := 1;
+     Result:=nil;
+     while True do begin
+       if (Pos1 > Length(DetailFields)) and (Pos2 > Length(MasterFields)) then Break;
+
+       if ((Pos1 > Length(DetailFields)) and (Pos2 <= Length(MasterFields))) or
+          ((Pos1 <= Length(DetailFields)) and (Pos2 > Length(MasterFields))) then
+            RaiseError('DetailFields should have same number of items as MasterFields');
+
+       {$WARN SYMBOL_DEPRECATED OFF}
+       lFieldName:= ExtractFieldName(DetailFields, Pos1);
+       {$WARN SYMBOL_DEPRECATED ON}
+       lfld1 := FindField(lFieldName);
+       if lfld1 = nil then RaiseError('Invalid field name %s in DetailFields', [lFieldName]);
+       {$WARN SYMBOL_DEPRECATED OFF}
+       lFieldName:= ExtractFieldName(MasterFields, Pos2);
+       {$WARN SYMBOL_DEPRECATED ON}
+       lfld2 := MasterSource.DataTable.Fields.FindField(lFieldName);
+       if lfld2 = nil then RaiseError('Invalid field name %s in MasterFields', [lFieldName]);
+
+       lExpression := fDynamicWhere.NewBinaryExpression(
+         fDynamicWhere.NewField('',lfld1.Name),
+         fDynamicWhere.NewConstant(lfld2.Value,lfld2.DataType),
+         dboEqual);
+
+       if Result <> nil then
+         Result:=fDynamicWhere.NewBinaryExpression(Result,lExpression,dboAnd)
+       else
+         Result:= lExpression;
+     end;
+   end;
+
+var
+  master: TDataset;
+  par: TDARemoteRequestParam;
+  fld: TDAField;
+  key: string;
+  i: integer;
+  dofetch: boolean;
+  mappings : TStrings;
+  detailparam : TDAParam;
+  lmmWhereExpression: TDAWhereExpression;
+begin
+  if RemoteFetchEnabled then CheckProperties
+  else if not(Assigned(LocalSchema) and Assigned(LocalDataStreamer)) then begin
+    if fOpening then InitializeDataTable;
+    Exit;
+  end;
+
+  //
+  //
+  //  TODO: this doesnt properly use the new RDA's DMB yet. we need to discuss/rethink how to handle that!
+  //
+  //
+
+  mappings := NIL;
+
+  dofetch := (((dtAutoFetch in DetailOptions) or IgnoreAutoFetchSettings) {and RemoteFetchEnabled}) or (aMasterTable<>NIL);
+
+  if (aRequestMappings<>NIL) then mappings := aRequestMappings
+  else begin
+    case fMasterMappingMode of
+      mmDataRequest : mappings := MasterRequestMappings;
+      mmParams      : mappings := MasterParamsMappings;
+    end;
+  end;
+
+  if (aMasterTable<>NIL)
+    then master := aMasterTable.Dataset
+    else master := fMasterLink.DataSet;
+
+  if master = nil then exit;
+
+  if (master.RecordCount = 0) then begin
+    if not Active then InitializeDataTable; // Master opened with 0 records and detail wasn't open yet
+
+    Exit;
+  end
+  else if (MasterSource = nil) then Exit;
+  if {(master.State=dsBrowse) and} not((MasterSource.DataTable.State = dsInsert) or MasterSource.DataTable.Delta.IsNewRecord) then begin
+    if dofetch then begin
+      // Determines if the details for this master have been fetched
+      key := IntToStr(MasterSource.DataTable.GetRowRecIDValue);
+      if (fFetchedMasters.IndexOf(key) >= 0) then Exit;
+      if (fMasterMappingMode = mmWhere) or ((mappings<>NIL) and (mappings.Count > 0)) then begin
+        lmmWhereExpression:=nil;
+        if RemoteFetchEnabled then begin
+          // remotemode
+
+          // If not, then assigns the param values from the current master record,
+          // invokes the remote call and loads the data
+          case MasterMappingMode of
+            mmWhere: begin
+              lmmWhereExpression:=GenerateWhereStatement;
+            end;
+            mmDataRequest : begin
+              for i := 0 to (mappings.Count - 1) do begin
+                par := nil;
+                if RemoteDataAdapter.Get_GetDataCall <> nil then
+                  par := RemoteDataAdapter.Get_GetDataCall.Params.ParamByName(Trim(mappings.Names[i]));
+                if (par=NIL) then RaiseError('Invalid parameter name %s in master mappings', [Trim(mappings.Names[i])]);
+
+                fld := MasterSource.DataTable.Fields.FindField(Trim(mappings.Values[mappings.Names[i]]));
+                if (fld=NIL) then RaiseError('Invalid field name %s in master mappings', [Trim(mappings.Values[mappings.Names[i]])]);
+
+                if (par <> nil) and (fld <> nil) and not VarIsNull(fld.Value)
+                  then par.AsVariant := fld.Value
+              end;
+            end;
+            mmParams : begin
+              // Fills it in
+              for i := 0 to (mappings.Count - 1) do begin
+                detailparam := Params.ParamByName(Trim(mappings.Names[i]));
+                if (detailparam=NIL) then RaiseError('Invalid parameter name %s in param mappings', [Trim(mappings.Names[i])]);
+
+                fld := MasterSource.DataTable.Fields.FindField(Trim(mappings.Values[mappings.Names[i]]));
+                if (fld=NIL) then RaiseError('Invalid field name %s in param mappings', [Trim(mappings.Values[mappings.Names[i]])]);
+
+                if (detailparam <> nil) and (fld <> nil) and not VarIsNull(fld.Value)
+                  then detailparam.Value := fld.Value
+              end;
+            end;
+          end;
+
+          CombineDynamicWhere(lmmWhereExpression);
+          try
+            LoadFromRemoteSource;
+          finally
+            RevertDynamicWhere(lmmWhereExpression);
+          end;
+
+          try
+            fFetchedMasters.Add(key);
+          except
+            raise Exception.CreateFmt('Master record %s has been fetched twice', [key]);
+          end;
+        end {  RemoteFetchEnabled  }else begin
+          // localmode
+
+          // If not, then assigns the param values from the current master record,
+          // invokes the remote call and loads the data
+          case MasterMappingMode of
+            mmWhere: begin
+              lmmWhereExpression := GenerateWhereStatement;
+            end;
+            mmParams: begin
+              // Fills it in
+              for i := 0 to (mappings.Count - 1) do begin
+                detailparam := Params.ParamByName(Trim(mappings.Names[i]));
+                if (detailparam=NIL) then RaiseError('Invalid parameter name %s in param mappings', [Trim(mappings.Names[i])]);
+
+                fld := MasterSource.DataTable.Fields.FindField(Trim(mappings.Values[mappings.Names[i]]));
+                if (fld=NIL) then RaiseError('Invalid field name %s in param mappings', [Trim(mappings.Values[mappings.Names[i]])]);
+
+                if (detailparam <> nil) and (fld <> nil) and not VarIsNull(fld.Value) then detailparam.Value := fld.Value
+              end;
+            end;
+            mmDataRequest: raise Exception.Create('mmDataRequest mode only supported in RemoteFetchEnabled mode');
+          end;
+
+          CombineDynamicWhere(lmmWhereExpression);
+          try
+            LoadFromLocalSchema;
+          finally
+            RevertDynamicWhere(lmmWhereExpression);
+          end;
+
+          try
+            fFetchedMasters.Add(key);
+          except
+            raise Exception.CreateFmt('Master record %s has been fetched twice', [key]);
+          end;
+        end;
+      end else begin
+        { ALEF: I removed the code below because it was never meant to be here to begin with. Very error prone.
+                Who added this???
+
+        // Automatics
+        for i := 0 to (DataRequestCall.Params.Count - 1) do begin
+          par := DataRequestCall.Params[i];
+          fld := MasterSource.DataTable.Fields.FindField(par.Name);
+
+          if (par <> nil) and (fld <> nil) and not VarIsNull(fld.Value) then par.Value := fld.Value;
+        end;}
+
+        RaiseError('There are no mappings defined. Cannot fetch records for detail table '+Name);
+      end;
+    end; {dofetch}
+  end;
+end;
+
+procedure TDADataTable.WriteDeltaToStream(aStreamer: TDADataStreamer);
+var
+  i: integer;
+  details: TList;
+  lHasReducedDelta: Boolean;
+  oldMode: boolean;
+begin
+  // And the details' updates (if specified)
+  details := GetDetailTablesforApplyUpdate(False);
+  try
+    lHasReducedDelta:= fHasReducedDelta;
+    if not aStreamer.SendReducedDelta then begin
+      if not lHasReducedDelta then
+        for i := 0 to (details.Count - 1) do begin
+          lHasReducedDelta:= TDADataTable(details[i]).fHasReducedDelta;
+          if lHasReducedDelta then Break;
+        end;
+    end;
+    oldMode:=aStreamer.SendReducedDelta;
+    if lHasReducedDelta then aStreamer.SendReducedDelta:=True;
+    try
+      // Writes its own updates
+      if self.HasDelta then aStreamer.WriteDelta(Self);
+      for i := 0 to (details.Count - 1) do
+        TDADataTable(details[i]).WriteDeltaToStream(aStreamer);
+    finally
+      aStreamer.SendReducedDelta := oldMode;
+    end;
+  finally
+    details.Free;
+  end;
+end;
+
+procedure TDADataTable.ReadDeltaFromStream(aStreamer: TDADataStreamer;aFailedDeltas:TList);
+var
+  i: integer;
+  details: TList;
+begin
+  // Reads its own updates
+  if aStreamer.FindDeltaIndex(Self.LogicalName) <> -1 then begin
+    Delta.Clear;
+    aStreamer.ReadDelta(Self);
+    if Delta.Count>0 then fHasReducedDelta := aStreamer.HasReducedDelta;
+
+    For i := 0 to Delta.Count-1 do
+     if Delta.Changes[i].Status = csFailed then
+       aFailedDeltas.Add(Delta.Changes[i]);
+  end;
+
+  // And the details' updates (if specified)
+  details := GetDetailTablesforApplyUpdate(False);
+  try
+    for i := 0 to (details.Count - 1) do
+      TDADataTable(details[i]).ReadDeltaFromStream(aStreamer, aFailedDeltas);
+  finally
+    details.Free;
+  end;
+end;
+
+procedure TDADataTable.ReadDeltaFromStream(aStreamer: TDADataStreamer);
+var
+  i: integer;
+  details: TList;
+begin
+  // Reads its own updates
+  if aStreamer.FindDeltaIndex(Self.LogicalName) <> -1 then begin
+    Delta.Clear;
+    aStreamer.ReadDelta(Self);
+    if Delta.Count>0 then fHasReducedDelta := aStreamer.HasReducedDelta;
+  end;
+
+  // And the details' updates (if specified)
+  details := GetDetailTablesforApplyUpdate(False);
+  try
+    for i := 0 to (details.Count - 1) do
+      TDADataTable(details[i]).ReadDeltaFromStream(aStreamer);
+  finally
+    details.Free;
+  end;
+end;
+
+procedure TDADataTable.MergeDelta;
+var
+  i, k, x: integer;
+  details: TList;
+//  dt: TDADataTable;
+//  ok : boolean;
+//  failed, pending, resolved : integer;
+  oldval, newval : Variant;
+  fld : TDAField;
+  pkfields : string;
+  oldopt : TDARemoteUpdatesOptions;
+  oldlog : boolean;
+  keynames: array of string;
+  keyvals : array of variant;
+  oldmastersource : TDADataSource;
+  lhasDelta: Boolean;
+  pk_array: array of boolean;
+  lReadOnly: boolean;
+  key_cnt: integer;
+begin
+  details:=GetDetailTablesforApplyUpdate(False);
+  try
+    //fOnBeforeMergeDelta
+    if Assigned(fOnBeforeMergeDelta) then fOnBeforeMergeDelta(Self);
+    {for i := 0 to details.Count-1 do begin
+       dt:= TDADataTable(details[i]);
+       if Assigned(dt.fOnBeforeMergeDelta) then dt.fOnBeforeMergeDelta(dt);
+    end;}
+
+    //fBusinessRules.OnBeforeMergeDelta
+    if Assigned(fBusinessRules) then fBusinessRules.OnBeforeMergeDelta(Self);
+    {for i := 0 to details.Count-1 do begin
+       dt:= TDADataTable(details[i]);
+       if Assigned(dt.fBusinessRules) then dt.fBusinessRules.OnBeforeMergeDelta(dt);
+    end;}
+
+    oldopt := RemoteUpdatesOptions;
+    oldlog := LogChanges;
+    oldmastersource := MasterSource;
+
+    lhasDelta := Delta.Count > 0;
+    if lhasDelta then begin
+      RemoteUpdatesOptions := RemoteUpdatesOptions-[ruoOnPost];
+      LogChanges := FALSE;
+      // Disables the M/D relationship so that Locates can work in all cases (master or detail tables, regardless
+      // of their positioning)
+      if not (ruoOnPost in oldopt) then MasterSource := NIL;
+    end;
+
+    try
+      pkfields := '';
+      key_cnt:=Delta.KeyFieldCount;
+      SetLength(keynames, key_cnt);
+      if key_cnt > 0 then begin
+        for i := 0 to (key_cnt-1) do
+          keynames[i]:=Delta.KeyFieldNames[i];
+      end
+      else begin
+        // use AutoInc as PK
+        SetLength(keynames, Delta.LoggedFieldCount);
+        for i := 0 to (Delta.LoggedFieldCount-1) do
+          if Delta.LoggedFieldTypes[i] in [datAutoInc, datLargeAutoInc] then begin
+            keynames[key_cnt]:=Delta.LoggedFieldNames[i];
+            inc(key_cnt);
+          end;
+        SetLength(keynames, key_cnt);          
+      end;
+
+      For i:=0 to key_cnt -1 do
+        pkfields := pkfields+keynames[i]+';';
+      if pkfields <> '' then pkfields := Copy(pkfields, 1, Length(pkfields)-1);
+      SetLength(keyvals, key_cnt);
+
+      // Merges the updates
+      if (Delta.Count>0) then begin
+        SetLength(pk_array, Delta.LoggedFieldCount);
+        for i := 0 to Delta.LoggedFieldCount - 1 do
+          pk_array[i]:=False;
+
+        for i := 0 to key_cnt - 1 do begin
+          x := Delta.IndexOfLoggedField(keynames[i]);
+          if x <> -1 then pk_array[x]:=True;
+        end;
+        for i := (Delta.Count-1) downto 0 do begin
+          if (Delta[i].Status<>csResolved)
+            then Continue;
+          if (Delta[i].ChangeType<>ctDelete) then begin
+            if (Self.State in [dsEdit, dsInsert]) and (ruoOnPost in oldopt) then begin
+              // Merge the details
+              for x := 0 to (details.Count - 1) do
+                TDADataTable(details[x]).MergeDelta;
+              for x := 0 to (Delta.LoggedFieldCount-1) do begin
+                fld := FieldByName(Delta.LoggedFieldNames[x]);
+
+                newval := Delta[i].NewValueByName[fld.Name];
+                oldval := Delta[i].OldValueByName[fld.Name];
+                if fHasReducedDelta then begin
+                  if not pk_array[x] and ROVariantsEqual(oldVal,newVal) then continue;
+                end;
+                if fld.ServerAutoRefresh or (not VarIsArray(newVal) and not ROVariantsEqual(newval,oldval)) then begin
+                  VariantToFieldValue(Delta[i].NewValueByName[fld.Name], fld);
+                end;
+              end;
+            end
+            else begin
+              for k := 0 to (key_cnt-1) do
+                keyvals[k] := Delta[i].OldValueByName[keynames[k]];
+
+              // Locates the original record
+              First;
+              if not Locate(pkfields, keyvals, []) then Continue;
+
+              // Merge the details
+              for x := 0 to (details.Count - 1) do
+                TDADataTable(details[x]).MergeDelta;
+
+              // Merges its own updates
+              Edit;
+              for x := 0 to (Delta.LoggedFieldCount-1) do begin
+                fld := FieldByName(Delta.LoggedFieldNames[x]);
+
+                newval := Delta[i].NewValueByName[fld.Name];
+                oldval := Delta[i].OldValueByName[fld.Name];
+                if fHasReducedDelta then begin
+                  if not pk_array[x] and ROVariantsEqual(oldVal,newVal) then continue;
+                end;
+                if fld.ServerAutoRefresh or (not VarIsArray(newVal) and (newval<>oldval)) then begin
+                  lReadOnly := fld.ServerAutoRefresh and fld.ReadOnly;
+                  if lReadOnly then fld.ReadOnly:=False;
+                  VariantToFieldValue(Delta[i].NewValueByName[fld.Name], fld);
+                  if lReadOnly then fld.ReadOnly:=True;
+                end;
+              end;
+              Post;
+            end;
+          end;
+          // Removes this merged change
+          Delta.Delete(i);
+        end;
+      end
+
+      // If there are no updates for this master, the children still need to be processed
+      else begin
+        // Merge the details
+        for x := 0 to (details.Count - 1) do
+          TDADataTable(details[x]).MergeDelta;
+      end;
+    finally
+      if lhasDelta then begin
+        RemoteUpdatesOptions := oldopt;
+        LogChanges := oldlog;
+
+        // Restores the M/D relationship
+        if not (ruoOnPost in oldopt) then MasterSource := oldmastersource;
+      end;
+      //fOnAfterMergeDelta
+      if Assigned(fOnAfterMergeDelta) then fOnAfterMergeDelta(Self);
+      {for i := 0 to details.Count-1 do begin
+         dt:= TDADataTable(details[i]);
+         if Assigned(dt.fOnAfterMergeDelta) then dt.fOnAfterMergeDelta(dt);
+      end;}
+
+      //fBusinessRules.OnAfterMergeDelta
+      if Assigned(fBusinessRules) then fBusinessRules.OnAfterMergeDelta(Self);
+      {for i := 0 to details.Count-1 do begin
+         dt:= TDADataTable(details[i]);
+         if Assigned(dt.fBusinessRules) then dt.fBusinessRules.OnAfterMergeDelta(dt);
+      end;}
+    end;
+  finally
+    details.Free;
+    if Delta.Count = 0 then fHasReducedDelta:=False;
+  end;
+end;
+
+
+procedure TDADataTable.PackAllInOneFetchInfoArray(aDataTable : TDADataTable; OutArray: TDADatasetRequestInfoArray);
+var outinfo : TDADatasetRequestInfo;
+    details : TList;
+    dt : TDADataTable;
+    i : integer;
+begin
+  outinfo := outarray.Add;
+  outinfo.DatasetName := UTF8Encode(aDataTable.LogicalName);
+  outinfo.MaxRecords := aDataTable.MaxRecords;
+  outinfo.IncludeSchema := TRUE;
+  outinfo.Params := NIL;
+
+  details := aDataTable.GetDetailDataTables;
+  try
+    for i := 0 to (details.Count - 1) do begin
+      dt := TDADataTable(details[i]);
+
+      if (dtIncludeInAllInOneFetch in dt.DetailOptions)
+        then PackAllInOneFetchInfoArray(dt, OutArray);
+    end;
+  finally
+    details.Free;
+  end;
+end;
+
+function TDADataTable.FieldByName(const aName: string): TDAField;
+begin
+  result := fFields.FieldByName(aName)
+end;
+
+function TDADataTable.ParamByName(const aName: string): TDAParam;
+begin
+  result := fParams.ParamByName(aName)
+end;
+
+procedure TDADataTable.First;
+begin
+  fDataset.First
+end;
+
+procedure TDADataTable.Last;
+begin
+  fDataset.Last
+end;
+
+procedure TDADataTable.Prior;
+begin
+  fDataset.Prior
+end;
+
+procedure TDADataTable.Sort(const FieldNames: array of string; const Directions: array of TDASortDirection);
+var
+  i: integer;
+begin
+  DoSort(FieldNames, Directions);
+
+  // Stores the new settings for convenience
+  SetLength(fSortDirections, Length(Directions));
+  for i := 0 to Length(Directions) - 1 do
+    fSortDirections[i] := Directions[i];
+
+  SetLength(fSortFieldNames, Length(FieldNames));
+  for i := 0 to Length(FieldNames) - 1 do
+    fSortFieldNames[i] := FieldNames[i];
+end;
+
+procedure TDADataTable.UnSort;
+begin
+  Sort([], []);
+end;
+
+procedure TDADataTable.LoadFromStream(aStream: TStream);
+var
+  //remfetch,
+  oldlogchanges, oldcascadeopenclose: boolean;
+  lStreamer: TDADataStreamer;
+  i: integer;
+begin
+  Check(RemoteFetchEnabled, Name+'. Cannot do this operation when RemoteFetchEnabled is set to TRUE');
+  if RemoteDataAdapter <> nil then
+    lStreamer:=RemoteDataAdapter.DataStreamer
+  else
+    lStreamer:=LocalDataStreamer;
+
+  Check(lStreamer = nil, Name+'. RemoteDataAdapter or LocalDataStreamer must be assigned.');
+
+  Close;
+
+  oldlogchanges := LogChanges;
+//  remfetch := RemoteFetchEnabled;
+  oldcascadeopenclose := moCascadeOpenClose in fMasterOptions;
+
+//  RemoteFetchEnabled := FALSE;
+  LogChanges := FALSE;
+  if oldcascadeopenclose then fMasterOptions := fMasterOptions - [moCascadeOpenClose];
+  try
+    fStreaming := True;
+    lStreamer.Initialize(aStream, aiRead);
+    try
+      if not (soIgnoreStreamSchema in fStreamingOptions) then
+        lStreamer.ReadDataset(LogicalName, Self, TRUE)
+      else
+        lStreamer.ReadDataset(LogicalName, Self, FALSE);
+
+      lStreamer.ReadDelta(Self);
+      if Delta <> nil then
+        For i:= 0 to Delta.Count-1 do
+          if fCurrRecId <= Delta.Changes[i].RecID then
+            fCurrRecId := Delta.Changes[i].RecID+1;
+    finally
+      lStreamer.Finalize;
+      fStreaming := False;
+    end;
+  finally
+    LogChanges := oldlogchanges;
+//    RemoteFetchEnabled := remfetch;
+    if oldcascadeopenclose then begin
+      fMasterOptions := fMasterOptions + [moCascadeOpenClose];
+      fOpening := True;
+      try
+        DoCascadeOperation(nil, moCascadeOpenClose);
+      finally
+        fOpening := False;
+      end;
+    end;
+    if Active then First;
+  end;
+end;
+
+procedure TDADataTable.SaveToStream(aStream: TStream);
+var
+  lStreamer: TDADataStreamer;
+  OldMasterSource: TDADataSource;
+begin
+  if (soDisableEventsWhileStreaming in fStreamingOptions) then DisableControls;
+  try
+    OldMasterSource := MasterSource;
+    MasterSource := nil;
+    fStreaming := True;
+    try
+      First; // Important!
+      if RemoteFetchEnabled then
+        lStreamer:= RemoteDataAdapter.DataStreamer
+      else
+        lStreamer:=LocalDataStreamer;
+      if lStreamer = nil then CheckProperties;
+      lStreamer.Initialize(aStream, aiWrite);
+      try
+        lStreamer.WriteDataset(Self, [woRows, woSchema]);
+        lStreamer.WriteDelta(Self);
+      finally
+        lStreamer.Finalize;
+      end;
+    finally
+      fStreaming := False;
+      MasterSource := OldMasterSource;
+    end;
+  finally
+    if (soDisableEventsWhileStreaming in fStreamingOptions) then EnableControls;
+  end;
+end;
+
+procedure TDADataTable.LoadFromFile(const aFileName: string);
+var
+  fs: TFileStream;
+  oldval : boolean;
+begin
+  oldval := RemoteFetchEnabled;
+  RemoteFetchEnabled := FALSE;
+  try
+    fs := TFileStream.Create(aFileName, fmOpenRead);
+    try
+      LoadFromStream(fs);
+    finally
+      fs.Free;
+    end;
+  finally
+    RemoteFetchEnabled := oldval;
+  end;
+end;
+
+procedure TDADataTable.SaveToFile(const aFileName: string);
+var
+  fs: TFileStream;
+begin
+  fs := TFileStream.Create(aFileName, fmCreate);
+  try
+    SaveToStream(fs);
+  finally
+    fs.Free;
+  end;
+end;
+
+procedure TDADataTable.SetParams(const Value: TDAParamCollection);
+begin
+  fParams.Assign(Value);
+end;
+
+procedure TDADataTable.ClearFields;
+var
+  i: integer;
+begin
+  for i := 0 to FieldCount - 1 do
+    Fields[i].Value := Null;
+end;
+
+procedure TDADataTable.ClearRows;
+var
+  lold_Filtered: Boolean;
+begin
+  lold_Filtered:= Filtered;
+//  DisableControls;
+  try
+    Filtered := False;
+    if Assigned(fDelta) and fDelta.GetInChange then fDelta.CancelChange;
+    while (RecordCount > 0) do Delete;
+  finally
+    Filtered := lold_Filtered;
+//    EnableControls;
+  end;
+end;
+
+function TDADataTable.GetState: TDataSetState;
+begin
+  result := fDataset.State
+end;
+
+function TDADataTable.GetEditing: boolean;
+begin
+  result := State in [dsEdit, dsInsert]
+end;
+
+function TDADataTable.GetPrepared: boolean;
+begin
+  result := FALSE
+end;
+
+procedure TDADataTable.SetPrepared(Value: boolean);
+begin
+
+end;
+
+function TDADataTable.GetText: string;
+begin
+  result := ''
+end;
+
+procedure TDADataTable.SetText(const Value: string);
+begin
+
+end;
+
+procedure TDADataTable.Notification(AComponent: TComponent;
+  Operation: TOperation);
+var
+  i: Integer;
+begin
+  inherited;
+
+  if (Operation = opRemove) then begin
+    if (AComponent = fLocalSchema) then fLocalSchema := nil;
+    if (AComponent = fRemoteDataAdapter) then fRemoteDataAdapter := nil;
+    if (AComponent = fLocalDataStreamer) then fLocalDataStreamer := nil;
+    if AComponent is TDataSource then begin
+      for i := 0 to Fields.Count - 1 do begin
+        if Fields[i].LookupSource = AComponent then
+          Fields[i].LookupSource := nil;
+      end;
+    end;
+
+  end;
+
+end;
+
+procedure TDADataTable.SetMasterSource(const Value: TDADataSource);
+begin
+  fMasterLink.DataSource := Value;
+end;
+
+procedure TDADataTable.SetMasterFields(const Value: string);
+begin
+  fMasterLink.FieldNames := Value;
+end;
+
+function TDADataTable.GetMasterRequestMappings: TStrings;
+begin
+  result := fMasterRequestMappings;
+end;
+
+procedure TDADataTable.SetMasterRequestMappings(const Value: TStrings);
+begin
+  fMasterRequestMappings.Assign(Value);
+end;
+
+function TDADataTable.GetDetailDataTables: TList;
+var
+  i: integer;
+  ownerdt: TDADataTable;
+  dtdataset: IDADataTableDataset;
+  tmplist: TList;
+begin
+  // This function only returns the linked datatables and removes duplicates
+  // from the GetDetailDataSets call. I assume the duplicates are because of
+  // the masterlink TDADatatables create.
+
+  result := TList.Create;
+  tmplist := TList.Create;
+
+  try
+    {$IFNDEF FPC}
+    Dataset.GetDetailDataSets(tmplist);
+    {$ENDIF}
+    for i := 0 to (tmplist.Count - 1) do begin
+      if not Supports(TDataset(tmplist[i]), IDADataTableDataset, dtdataset) then Continue;
+      ownerdt := dtdataset.GetDataTable;
+
+      if (result.IndexOf(ownerdt) < 0) then result.Add(ownerdt);
+    end;
+  finally
+    tmplist.Free;
+  end;
+end;
+
+function TDADataTable.GetDelta: IDADelta;
+begin
+  if (fDelta = nil) then raise Exception.Create('Delta has not yet been initialized by the datatable');
+  result := fDelta;
+end;
+
+function TDADataTable.GetName: string;
+begin
+  if (LogicalName = '') then
+    result := Name
+  else
+    result := LogicalName;
+end;
+
+procedure TDADataTable.DoAfterCloseDataset;
+begin
+  CallScript('AfterClose');
+  fCloneSource := NIL;
+end;
+
+procedure TDADataTable.DoAfterOpenDataset;
+begin
+  CallScript('AfterOpen');
+
+  if Assigned(fAfterOpenIDataset) then fAfterOpenIDataset(Self, '', ROGetTickCount-fOpenTick);
+end;
+
+procedure TDADataTable.DoBeforeCloseDataset;
+begin
+  if (fCloneSource<>NIL) then Fields.Clear;
+  CallScript('BeforeClose');
+end;
+
+procedure TDADataTable.CloneSelectedRecord(Source: TDADataTable; DoPost: boolean = TRUE);
+begin
+  CloneSelectedRecord(Source as IDADataset, DoPost);
+end;
+
+procedure TDADataTable.CloneSelectedRecord(const Source: IDADataset; DoPost: boolean = TRUE);
+var
+  i: integer;
+  destfld,
+    srcfld: TDAField;
+  lreadonly: boolean;
+begin
+  Insert;
+  for i := 0 to (Source.FieldCount - 1) do begin
+    srcfld := Source.Fields[i];
+    destfld := Fields.FindField(srcfld.Name);
+    lreadonly := destfld.ReadOnly;
+    destfld.ReadOnly := False;
+    try
+      if destfld <> nil then destfld.Value := srcfld.Value;
+    finally
+      destfld.ReadOnly := lreadonly;
+    end;
+  end;
+  if DoPost then Post;
+end;
+
+procedure TDADataTable.FreeBookmark(Bookmark: TBookmark);
+begin
+  Dataset.FreeBookmark(Bookmark);
+end;
+
+function TDADataTable.GetBookmark: TBookmark;
+begin
+  result := Dataset.GetBookmark;
+end;
+
+procedure TDADataTable.GotoBookmark(Bookmark: TBookmark);
+begin
+  Dataset.GotoBookmark(Bookmark);
+end;
+
+function TDADataTable.GetRowRecIDValue: integer;
+begin
+  result := fRecIDField.AsInteger
+end;
+
+procedure TDADataTable.DisableEventHandlers;
+begin
+  DetachEventHooks(Dataset);
+end;
+
+procedure TDADataTable.EnableEventHandlers;
+begin
+  AttachEventHooks(Dataset);
+end;
+
+procedure TDADataTable.Refresh;
+begin
+  fDataset.Refresh;
+end;
+
+procedure TDADataTable.SetLocalDataStreamer(const Value: TDADataStreamer);
+begin
+  fLocalDataStreamer := Value;
+  if (fLocalDataStreamer <> nil) then
+    fLocalDataStreamer.FreeNotification(Self);
+end;
+
+procedure TDADataTable.SetLocalSchema(const Value: TDASchema);
+begin
+  fLocalSchema := Value;
+  if (fLocalSchema <> nil) then begin
+    fLocalSchema.FreeNotification(Self);
+
+    if not (csLoading in ComponentState) then RemoteFetchEnabled := FALSE;
+  end;
+end;
+
+function TDADataTable.DataReaderFirst: boolean;
+begin
+  result := RecordCount > 0;
+  if result then First;
+end;
+
+function TDADataTable.DataReaderNext: boolean;
+begin
+  result := not EOF;
+  if result then Next;
+end;
+
+function TDADataTable.GetAsBoolean(Index: integer): boolean;
+begin
+  result := fFields[Index].AsBoolean;
+end;
+
+function TDADataTable.GetAsBoolean(const FieldName: string): boolean;
+begin
+  result := FieldByName(FieldName).AsBoolean;
+end;
+
+function TDADataTable.GetAsCurrency(Index: integer): Currency;
+begin
+  Result:= fFields[Index].AsCurrency;
+end;
+
+function TDADataTable.GetAsCurrency(const FieldName: string): currency;
+begin
+  result := FieldByName(FieldName).AsCurrency;
+end;
+
+function TDADataTable.GetAsDateTime(const FieldName: string): TDateTime;
+begin
+  result := FieldByName(FieldName).AsDateTime;
+end;
+
+function TDADataTable.GetAsDateTime(Index: integer): TDateTime;
+begin
+  result := fFields[Index].AsDateTime;
+end;
+
+function TDADataTable.GetAsFloat(const FieldName: string): double;
+begin
+  result := FieldByName(FieldName).AsFloat;
+end;
+
+function TDADataTable.GetAsFloat(Index: integer): double;
+begin
+  result := fFields[Index].AsFloat;
+end;
+
+function TDADataTable.GetAsInteger(Index: integer): integer;
+begin
+  result := fFields[Index].AsInteger;
+end;
+
+function TDADataTable.GetAsInteger(const FieldName: string): integer;
+begin
+  result := FieldByName(FieldName).AsInteger;
+end;
+
+function TDADataTable.GetAsString(const FieldName: string): string;
+begin
+  result := FieldByName(FieldName).AsString;
+end;
+
+function TDADataTable.GetAsString(Index: integer): string;
+begin
+  result := fFields[Index].AsString;
+end;
+
+function TDADataTable.GetAsVariant(const FieldName: string): variant;
+begin
+  result := FieldByName(FieldName).Value;
+end;
+
+function TDADataTable.GetAsVariant(Index: integer): variant;
+begin
+  result := fFields[Index].Value
+end;
+
+function TDADataTable.GetFieldIndexes(const aName: string): integer;
+begin
+  result := fFields.FindItem(aName).Index
+end;
+
+function TDADataTable.GetFieldNames(Index: integer): string;
+begin
+  result := fFields[Index].Name
+end;
+
+procedure TDADataTable.SetBusinessRulesID(const Value: string);
+var
+  bizclass: TDADataTableRulesClass;
+begin
+  if (Value = fBusinessRulesID) then Exit;
+
+  if Assigned(fBusinessRules) then begin
+    fBusinessRules.Detach(Self);
+    FreeAndNIL(fBusinessRules);
+  end;
+
+  fBusinessRulesID := Trim(Value);
+
+  if (fBusinessRulesID <> '') and not (csDesigning in ComponentState) then begin
+    Check(not FindDataTableRules(Value, bizclass), 'Invalid BusinessRulesID "%s"', [Value]);
+
+    fBusinessRules := bizclass.Create(Self);
+    fBusinessRules.Attach(Self);
+  end;
+end;
+
+function TDADataTable.QueryInterface(const IID: TGUID; out Obj): HResult;
+begin
+  result := inherited QueryInterface(IID, Obj);
+
+  if (result <> S_OK) and Assigned(fBusinessRules) then begin
+    // Users might introduce specific interfaces at the business rule level
+    // This allows to type cast the data table to any additional business oriented interface
+    // they decide to create.
+    result := fBusinessRules.QueryInterface(IID, Obj);
+  end;
+end;
+
+function TDADataTable.GetHasDelta: boolean;
+begin
+  result := Assigned(fDelta) and (fDelta.Count > 0);
+end;
+
+function TDADataTable.GetHasDeltaRecursive: boolean;
+var
+  lDetails: TList;
+  lTable: TDADataTable;
+  i: integer;
+begin
+  result := Assigned(fDelta) and (fDelta.Count > 0);
+  if not result then begin
+    lDetails := nil;
+    if (moCascadeApplyUpdates in fMasterOptions) then try
+      lDetails := GetDetailDataTables;
+      for i := 0 to (lDetails.Count-1) do begin
+        lTable := TDADataTable(lDetails[i]);
+        if lTable.HasDeltaRecursive then begin
+          result := true;
+          exit;
+        end;
+      end;
+    finally
+      lDetails.Free;
+    end;
+  end;
+end;
+
+function TDADataTable.GetMasterDataTable: TDADataTable;
+var lDatatableDataset : IDADataTableDataset;
+begin
+  if Supports(fMasterLink.DataSet, IDADataTableDataset, lDatatableDataset)
+    then result := lDatatableDataset.GetDataTable
+    else result := NIL;
+end;
+
+function TDADataTable.GetRecNo: integer;
+begin
+  result := fDataset.RecNo
+end;
+
+procedure TDADataTable.SetRecNo(const Value: integer);
+begin
+  fDataset.RecNo := Value
+end;
+
+function TDADataTable.GetFieldsProperty: TDAFieldCollection;
+begin
+  result := GetFields;
+end;
+
+function TDADataTable.GetActiveProperty: boolean;
+begin
+  result := GetActive();
+end;
+
+procedure TDADataTable.SetActiveProperty(const Value: boolean);
+begin
+  SetActive(Value);
+end;
+
+function TDADataTable.GetParamsProperty: TDAParamCollection;
+begin
+  result := GetParams();
+end;
+
+{$IFDEF MSWINDOWS}
+function TDADataTable.InterfaceSupportsErrorInfo(const iid: TGUID): HResult;
+begin
+  if GetInterfaceEntry(iid) <> nil then
+    Result := S_OK
+  else
+    Result := S_FALSE;
+end;
+
+function TDADataTable.SafeCallException(ExceptObject: TObject; ExceptAddr: Pointer): HResult;
+begin
+  Result := uDAEngine.DAHandleSafeCallException(self,ExceptObject, ExceptAddr);
+end;
+{$ENDIF}
+
+procedure TDADataTable.CancelUpdates(IncludeDetails: boolean);
+var list : TList;
+    i,  orignextinc : integer;
+    wasfiltered,
+    remotefetch : boolean;
+    lOldMasterFields: string;
+    IRC: IDARangeController;
+begin
+  if Editing then Cancel;
+  if not LogChanges then Exit;
+
+  DisableControls;
+  wasfiltered := Filtered;
+  Filtered := FALSE;
+  if GetRangeState and (QueryInterface(IDARangeController,IRC) = 0) then IRC.CancelRange else IRC := nil;
+  try
+    // Truns off the remote fetching for this datatable and its details
+    remotefetch := RemoteFetchEnabled;
+    RemoteFetchEnabled := FALSE;
+    if IncludeDetails then list := GetDetailDataTables else list := TList.Create;
+
+    // Disable the log of changes (we're about to make a bunch!)
+    LogChanges := FALSE;
+
+    // Saves the current recinc (we'll change this during the restore)
+    orignextinc := CurrRecId;
+    try
+      lOldMasterFields := MasterFields;
+      MasterFields := '';
+      try
+        // Reverts the records to the original state
+        for i := 0 to (Delta.Count-1) do
+          InternalCancelUpdateChange(Delta[i]);
+      finally
+        MasterFields := lOldMasterFields;
+      end;
+
+      // Cancels the updates for the details
+      for i := 0 to list.Count-1 do begin
+        TDADataTable(list[i]).CancelUpdates(TRUE);
+      end;
+
+      // Erases the delta
+      Delta.Clear;
+
+    finally
+      fHasReducedDelta:=False;
+      list.Free;
+      CurrRecId := orignextinc;
+      LogChanges := TRUE;
+      RemoteFetchEnabled := remotefetch;
+    end;
+  finally
+    if IRC <> nil then IRC.ApplyRange;
+    Filtered := wasfiltered;
+    EnableControls;
+  end;
+end;
+
+procedure TDADataTable.DoBeforeOpenDataset;
+begin
+  CallScript('BeforeOpen');
+
+  fOpenTick := ROGetTickCount;
+  if Assigned(fBeforeOpenIDataset) then fBeforeOpenIDataset(Self);
+end;
+
+function TDADataTable.Lookup(const KeyFields: string;
+  const KeyValues: Variant; const ResultFields: string): Variant;
+begin
+  result := fDataset.Lookup(KeyFields, KeyValues, ResultFields);
+end;
+
+function TDADataTable.GetIsEmpty: boolean;
+begin
+  result := fDataset.IsEmpty;
+end;
+
+function TDADataTable.GetMasterParamsMappings: TStrings;
+begin
+  result := fMasterParamsMappings
+end;
+
+procedure TDADataTable.SetMasterParamsMappings(const Value: TStrings);
+begin
+  fMasterParamsMappings.Assign(Value);
+end;
+
+function TDADataTable.GetLogicalName: string;
+begin
+  result := fLogicalName;
+end;
+
+function TDADataTable.GetReadOnly: boolean;
+begin
+  result := FALSE;
+end;
+
+procedure TDADataTable.SetReadOnly(const Value: boolean);
+begin
+  // By default this property cannot be set. Raising exceptions creates problems
+  // at design time and it's useless
+end;
+
+procedure TDADataTable.SetScriptCode(const Value: TStrings);
+begin
+  fScriptCode.Assign(Value);
+end;
+
+procedure TDADataTable.CallScript(const aEvent: string);
+begin
+  if Assigned(ScriptingProvider) and (ScriptCode.Count > 0) then begin
+    (ScriptingProvider as IDADataTableScriptingProvider).RunDataTableScript(self, ScriptCode.Text, aEvent, rslPascalScript);
+  end;
+end;
+
+function TDADataTable.FindField(const aName: string): TDAField;
+begin
+  result := fFields.FindField(aName);
+end;
+
+procedure TDADataTable.AddRecord(const FieldNames: array of string;
+  const FieldValues: array of Variant);
+var i : integer;
+begin
+  Insert;
+  for i := 0 to Length(FieldNames)-1 do
+    FieldByName(FieldNames[i]).Value := FieldValues[i];
+  Post;
+end;
+
+procedure TDADataTable.SetLogicalName(aName: string);
+begin
+  fLogicalName := aName;
+end;
+
+function TDADataTable.GetDeltaInitialized: boolean;
+begin
+  result := fDelta<>NIL
+end;
+
+procedure TDADataTable.NotifyFieldsClear;
+var
+  i, lLockCount: integer;
+begin
+  // This method patches VCL issue with notification
+  // of datasources when clearing fields and controls is disabled
+  lLockCount := 0;
+  while DataSet.ControlsDisabled do begin
+    inc(lLockCount);
+    DataSet.EnableControls;
+  end;
+  TDataSetHack(DataSet).DataEvent(deFieldListChange, 0);
+  for i := 0 to lLockCount - 1 do begin
+    DataSet.DisableControls;
+  end;
+end;
+
+function TDADataTable.GetOnAfterOpen: TDAAfterOpenDatasetEvent;
+begin
+  result := fAfterOpenIDataset;
+end;
+
+function TDADataTable.GetOnBeforeOpen: TDABeforeOpenDatasetEvent;
+begin
+  result := fBeforeOpenIDataset;
+end;
+
+procedure TDADataTable.SetOnAfterOpen(
+  const Value: TDAAfterOpenDatasetEvent);
+begin
+  fAfterOpenIDataset := Value;
+end;
+
+procedure TDADataTable.SetOnBeforeOpen(
+  const Value: TDABeforeOpenDatasetEvent);
+begin
+  fBeforeOpenIDataset := Value;
+end;
+
+function TDADataTable.GetOnAfterExecute: TDAAfterExecuteCommandEvent;
+begin
+  Result := nil;
+  NotSupported();
+end;
+
+function TDADataTable.GetOnBeforeExecute: TDABeforeExecuteCommandEvent;
+begin
+  Result := nil;
+  NotSupported();
+end;
+
+procedure TDADataTable.SetOnAfterExecute(
+  const Value: TDAAfterExecuteCommandEvent);
+begin
+  NotSupported();
+end;
+
+procedure TDADataTable.SetOnBeforeExecute(
+  const Value: TDABeforeExecuteCommandEvent);
+begin
+  NotSupported();
+end;
+
+function TDADataTable.GetOnExecuteError: TDAExecuteCommandErrorEvent;
+begin
+  Result := nil;
+  NotSupported();
+end;
+
+function TDADataTable.GetOnOpenError: TDAOpenDatasetErrorEvent;
+begin
+  Result := nil;
+  NotSupported();
+end;
+
+procedure TDADataTable.SetOnExecuteError(
+  const Value: TDAExecuteCommandErrorEvent);
+begin
+  NotSupported();
+end;
+
+procedure TDADataTable.SetOnOpenError(
+  const Value: TDAOpenDatasetErrorEvent);
+begin
+  NotSupported();
+end;
+
+function TDADataTable.GetCurrRecId: integer;
+begin
+  if CloneSource = nil then
+    result := fCurrRecId
+  else
+    result := CloneSource.CurrRecId;
+end;
+
+procedure TDADataTable.SetCurrRecId(const Value: integer);
+begin
+  if CloneSource = nil then
+    fCurrRecId := Value
+  else
+    CloneSource.CurrRecId := Value
+end;
+
+function TDADataTable.GetAutoIncs: TAutoIncArray;
+begin
+  if CloneSource = nil then
+    result := fAutoIncs
+  else
+    result := CloneSource.AutoIncs;
+end;
+
+procedure TDADataTable.SetAutoIncs(const Value: TAutoIncArray);
+begin
+  if CloneSource = nil then
+    fAutoIncs := Value
+  else
+    CloneSource.AutoIncs := Value
+end;
+
+function TDADataTable.CreateAutoIncArray: TAutoIncArray;
+var i: integer;
+begin
+  SetLength(result, Fields.Count);
+  for i := 0 to Fields.Count-1 do result[i] := -1;
+end;
+
+function TDADataTable.GetCurrentRecIdValue: integer;
+begin
+  result := fCurrRecId;
+end;
+
+procedure TDADataTable.SetCurrentRecIdValue(Value: integer);
+begin
+  fCurrRecId := Value;
+end;
+
+procedure TDADataTable.InternalAfterFieldUpdate(Sender: TDACustomField);
+begin
+  if assigned(fAfterFieldChange) and (Sender is TDAField) then
+    fAfterFieldChange(self, TDAField(Sender));
+end;
+
+procedure TDADataTable.InternalBeforeFieldUpdate(Sender: TDACustomField);
+begin
+  if assigned(fBeforeFieldChange) and (Sender is TDAField) then
+    fBeforeFieldChange(self, TDAField(Sender));
+end;
+
+procedure TDADataTable.InternalSetFetching(aFetching: boolean);
+begin
+ fFetching := aFetching;
+end;
+
+procedure TDADataTable.SetCustomAttributes(const Value: TStrings);
+begin
+  fCustomAttributes.Assign(Value);
+end;
+
+function TDADataTable.Local_ApplyUpdates(RefetchAll: boolean): boolean;
+
+  function UnpackDeltas(var lStruct: TDADeltaStruct): TDABusinessProcessor;
+  var
+    j: integer;
+    lBizProc: TDABusinessProcessor;
+    lDetails: TDADatasetRelationshipList;
+    lFound: boolean;
+  begin
+    result := nil;
+    lStruct := nil;
+    // Reads the deltas.
+    lFound := false;
+    { Tries to locate a user-defined business processor }
+    if LocalSchema.Owner <> nil then
+      for j := 0 to (LocalSchema.Owner.ComponentCount - 1) do begin
+        if (LocalSchema.Owner.Components[j] is TDABusinessProcessor) then begin
+          lBizProc := TDABusinessProcessor(LocalSchema.Owner.Components[j]);
+          if SameText(lBizProc.ReferencedDataset, Self.LogicalName) then begin
+            lStruct := TDADeltaStruct.Create(Self.Delta, lBizProc);
+            lFound := true;
+            Break;
+          end;
+        end;
+      end;
+    { Either creates one}
+    if not lFound then begin
+      lBizProc := TDABusinessProcessor.Create(nil);
+      lBizProc.ReferencedDataset := Self.LogicalName;
+      lBizProc.Schema := LocalSchema;
+      Result := lBizProc;
+      lStruct := TDADeltaStruct.Create(Self.Delta, lBizProc);
+    end;
+
+    { Sets the master/detail relationships }
+    if (LocalSchema.RelationShips.Count > 0) then begin
+      lDetails := TDADatasetRelationshipList.Create;
+      try
+        LocalSchema.RelationShips.GetDetails(lStruct.BusinessProcessor.ReferencedDataset, lDetails);
+        if (lDetails.Count <> 0) then begin
+          { Prepares an array with the references to the detail deltas that will be used later on to adjust
+            autoincs, etc. }
+          for j := 0 to lDetails.Count - 1 do begin
+            if lDetails[j].DetailDatasetName = LogicalName then begin
+              lStruct.DetailDeltas.Add(lStruct.Delta);
+              lStruct.RelationShips.Add(lDetails[j]);
+            end;
+          end;
+        end;
+      finally
+        lDetails.Free;
+      end;
+    end;
+  end;
+
+var
+  lProcessedDeltas: TStringList;
+  lStruct: TDADeltaStruct;
+  lBizProc: TDABusinessProcessor;
+  i, j: integer;
+begin
+  Result:=False;
+  CheckProperties;
+  FLocConnection := LocalSchema.ConnectionManager.NewConnection(LocalConnection);
+  if (Delta = nil) or (Delta.Count = 0) then Exit;
+  lBizProc := UnpackDeltas(lStruct);
+  try
+    if TriggerTransactionEvent(fOnLocalUpdateDataBeginTransaction) then FLocConnection.BeginTransaction;
+    try
+      if (LocalSchema.UpdateRules.Count = 0) then begin
+         lStruct.BusinessProcessor.ProcessDelta(FLocConnection, lStruct.Delta, AllChanges);
+      end
+      else begin
+        lProcessedDeltas := TStringList.Create;
+        try
+
+          for i := 0 to (LocalSchema.UpdateRules.Count - 1) do begin
+            // Processes them in the order defined in the schema
+            if LocalSchema.UpdateRules[i].DatasetName = LogicalName then begin
+              // Adds the dataset name to the list of processed deltas. Those that don't have update rules will be processed later
+              lProcessedDeltas.Add(LogicalName);
+
+              // Processes the delta
+              lStruct.BusinessProcessor.ProcessDelta(FLocConnection, lStruct.Delta, LocalSchema.UpdateRules[i].ChangeTypes, lStruct);
+
+              if (ctInsert in LocalSchema.UpdateRules[i].ChangeTypes) then begin
+                for j := 0 to (lStruct.DetailDeltas.Count - 1) do
+                  lStruct.BusinessProcessor.SynchronizeAutoIncs(lStruct.Delta, lStruct.DetailDeltas[j], lStruct.RelationShips[j]);
+              end;
+            end;
+          end;
+          // Processes the deltas for which update rules were not defined
+          if lProcessedDeltas.IndexOf(LogicalName) = -1 then
+            lStruct.BusinessProcessor.ProcessDelta(FLocConnection, lStruct.Delta, AllChanges);
+        finally
+          lProcessedDeltas.Free;
+        end;
+      end;
+      if FLocConnection.InTransaction and TriggerTransactionEvent(fOnLocalUpdateDataCommitTransaction) then FLocConnection.CommitTransaction;
+      MergeDelta;
+      Result:=True;
+    except
+      on E: Exception do begin
+        if FLocConnection.InTransaction and TriggerTransactionEvent(fOnLocalUpdateDataRollBackTransaction) then FLocConnection.RollbackTransaction;
+        raise;
+      end;
+    end;
+  finally
+    if lStruct <> nil then lStruct.Free;
+    if lBizProc <> nil then lBizProc.Free;
+    FLocConnection := nil;
+  end;
+  if RefetchAll and result then begin
+    if Active then Close;
+    Open;
+  end;
+end;
+
+procedure TDADataTable.GetDetailTablesforAllinOneFetch(aRemote, aLocal:TList; aRecursive: boolean);
+var
+ i: integer;
+ dt: TDADataTable;
+ dtList: TList;
+ scc: IDAClonedCursorsSupport;
+begin
+  if (moAllInOneFetch in fMasterOptions) then begin
+    dtList:=GetDetailDataTables;
+    try
+      for i := 0 to dtList.Count-1 do begin
+        dt := TDADataTable(dtList[i]);
+        if (dtIncludeInAllInOneFetch in dt.DetailOptions) then begin
+          if (dt.QueryInterface(IDAClonedCursorsSupport, scc) = S_OK) and scc.UsingClonedCursor then begin
+            dt:= scc.CloneSource;
+          end;
+
+          if self.RemoteFetchEnabled and dt.RemoteFetchEnabled and (dt.RemoteDataAdapter = Self.RemoteDataAdapter) then begin
+            if aRemote.IndexOf(dt) = -1 then aRemote.Add(dt);
+          end
+          else begin
+            if aLocal.IndexOf(dt) = -1 then aLocal.Add(dt);
+          end;
+          if aRecursive then dt.GetDetailTablesforAllinOneFetch(aRemote,aLocal, aRecursive);
+        end;
+      end;
+    finally
+      dtList.Free;
+    end;
+  end
+end;
+
+{$IFDEF FPC}
+procedure List_Union(List1,List2: TList);
+var
+  i: integer;
+begin
+  if List1 = List2 then Exit;
+  for i := 0 to List2.Count-1 do
+    if List1.IndexOf(List2[i])=-1 then
+       List1.Add(List2[i]);
+end;
+{$ENDIF}
+
+function TDADataTable.GetDetailTablesforApplyUpdate(aRecursive: boolean): TList;
+var
+ i: integer;
+ dt: TDADataTable;
+ dtList, dtlist1: TList;
+ scc: IDAClonedCursorsSupport;
+begin
+  Result:= TList.Create;
+  if (moCascadeApplyUpdates in fMasterOptions) then begin
+    dtList:=GetDetailDataTables;
+    try
+      for i := 0 to dtList.Count-1 do begin
+        dt := TDADataTable(dtList[i]);
+        if dt.Active and (dtCascadeApplyUpdates in dt.DetailOptions) then begin
+          if (dt.QueryInterface(IDAClonedCursorsSupport, scc) = S_OK) and scc.UsingClonedCursor then begin
+            dt:= scc.CloneSource;
+          end;
+          if Result.IndexOf(dt) = -1 then Result.Add(dt);
+          if aRecursive then begin
+            dtlist1:= dt.GetDetailTablesforApplyUpdate(aRecursive);
+            try
+              {$IFDEF FPC}
+              List_Union(Result, dtlist1);
+              {$ELSE}
+              Result.Assign(dtlist1,laOr);
+              {$ENDIF}
+            finally
+              dtlist1.Free;
+            end;
+          end;
+        end;
+      end;
+    finally
+      dtList.Free;
+    end;
+  end
+end;
+
+procedure TDADataTable.CancelUpdateChange(Change: TDADeltaChange;IncludeDetails : boolean = TRUE);
+var
+    orignextinc : integer;
+    wasfiltered,
+    remotefetch : boolean;
+    lOldMasterFields: string;
+    details: TList;
+    i,j,k: integer;
+    detailChange: TDADeltaChange;
+    ChangePKValueArray: array of Variant;
+    lNeedDeleteChange: boolean;
+    keyvalue: variant;
+    IRC: IDARangeController;
+begin
+  if Editing then begin
+    if (ruoOnPost in RemoteUpdatesOptions) and (fDelta.Count=1) then begin
+      InternalCancelUpdateChange(fDelta.Changes[0]);
+      fDelta.Clear;
+      Exit;
+    end else begin
+      Cancel;
+    end;
+  end;
+  if not LogChanges then Exit;
+
+  DisableControls;
+  wasfiltered := Filtered;
+  Filtered := FALSE;
+  if GetRangeState and (QueryInterface(IDARangeController,IRC) = 0) then IRC.CancelRange else IRC := nil;
+  try
+    // Truns off the remote fetching for this datatable and its details
+    remotefetch := RemoteFetchEnabled;
+    RemoteFetchEnabled := FALSE;
+
+    // Disable the log of changes (we're about to make a bunch!)
+    LogChanges := FALSE;
+    // Saves the current recinc (we'll change this during the restore)
+    orignextinc := CurrRecId;
+    try
+      lOldMasterFields := MasterFields;
+      MasterFields := '';
+      try
+        // Reverts the records to the original state
+
+        if IncludeDetails then begin
+          SetLength(ChangePKValueArray,Change.Delta.KeyFieldCount);
+          For i:=1 to Change.Delta.KeyFieldCount do begin
+            if Change.ChangeType = ctInsert then
+              keyvalue:=Change.NewValueByName[Change.Delta.KeyFieldNames[i-1]]
+            else
+              keyvalue:=Change.OldValueByName[Change.Delta.KeyFieldNames[i-1]];
+            ChangePKValueArray[0]:=keyvalue;
+          end;
+          details:=GetDetailTablesforApplyUpdate(False);
+          try
+            for i:=0 to details.Count-1 do begin
+              for j:=0 to TDADataTable(details[i]).Delta.Count-1 do begin
+                detailChange :=TDADataTable(details[i]).Delta.Changes[j];
+                if detailChange.Status <> csResolved then begin
+                  lNeedDeleteChange:= True;
+                  for k:=0 to Change.Delta.KeyFieldCount-1 do begin
+                    if detailChange.ChangeType = ctInsert then
+                      keyvalue:=detailChange.NewValueByName[Change.Delta.KeyFieldNames[k]]
+                    else
+                      keyvalue:=detailChange.oldValueByName[Change.Delta.KeyFieldNames[k]];
+                    if not VarSameValue(keyValue, ChangePKValueArray[k]) then begin
+                      lNeedDeleteChange:= False;
+                      Break;
+                    end;
+                  end;
+                  if lNeedDeleteChange then TDADataTable(details[i]).CancelUpdateChange(detailChange,IncludeDetails);
+                end;
+              end;
+            end;
+          finally
+            details.Free;
+          end;
+        end;
+        InternalCancelUpdateChange(change);
+        Delta.RemoveChange(change);
+      finally
+        if Delta.Count = 0 then fHasReducedDelta:=False;
+        MasterFields := lOldMasterFields;
+      end;
+    finally
+      CurrRecId := orignextinc;
+      LogChanges := TRUE;
+      RemoteFetchEnabled := remotefetch;
+    end;
+  finally
+    if IRC <> nil then IRC.ApplyRange;
+    Filtered := wasfiltered;
+    EnableControls;
+  end;
+end;
+
+procedure TDADataTable.InternalCancelUpdateChange(Change: TDADeltaChange);
+var
+   i, x : integer;
+    fldname : string;
+    fldvalue : Variant;
+    details: TList;
+    RecID:string;
+begin
+  case Change.ChangeType of
+    ctDelete : begin
+      CurrRecId := change.RecID; // We want the same autoinc regenerated
+      RecID:=IntToStr(Change.RecID);
+      Insert;
+      for x := 0 to (Delta.LoggedFieldCount-1) do begin
+        fldname := Delta.LoggedFieldNames[x];
+        fldvalue := change.OldValues[x];
+        VariantToFieldValue(fldValue, FieldByName(fldname));
+      end;
+      Post;
+
+      details := GetDetailDataTables;
+      try
+        for x := 0 to (details.Count-1) do begin
+          i:=TDADataTable(details[x]).fFetchedMasters.IndexOf(RecID);
+          if i<>-1 then TDADataTable(details[x]).fFetchedMasters.Delete(i);
+        end;
+      finally
+        details.Free;
+      end;
+
+
+    end;
+
+    else begin
+      if ruoOnPost in RemoteUpdatesOptions then begin
+        if Self.State = dsInsert then
+          Cancel
+        else begin
+          for x := 0 to (Delta.LoggedFieldCount-1) do begin
+            fldname := Delta.LoggedFieldNames[x];
+            fldvalue := change.OldValues[x];
+            if fHasReducedDelta and ROVariantsEqual(fldvalue, change.NewValues[x]) then Continue;
+            VariantToFieldValue(fldValue, FieldByName(fldname));
+          end;
+        end;
+      end
+      else begin
+        First;
+        if not Locate(RecIDFieldName, change.RecID, []) then RaiseError('Couldn''t find record #'+FormatRecIDString(change.RecID));
+
+        if (change.ChangeType=ctInsert) then Delete
+        else begin
+          Edit;
+          for x := 0 to (Delta.LoggedFieldCount-1) do begin
+            fldname := Delta.LoggedFieldNames[x];
+            fldvalue := change.OldValues[x];
+            if fHasReducedDelta and ROVariantsEqual(fldvalue, change.NewValues[x]) then Continue;
+            VariantToFieldValue(fldValue, FieldByName(fldname));
+          end;
+          Post;
+        end;
+      end;
+    end;
+  end;
+end;
+
+procedure TDADataTable.CheckProperties(ACheckRemoteFetching: Boolean=False);
+begin
+  if (fCloneSource<>NIL) then
+    fCloneSource.CheckProperties(ACheckRemoteFetching)
+  else begin
+    if LogicalName = '' then raise Exception.Create(Name+'.LogicalName must be specified.');
+    if RemoteFetchEnabled or ACheckRemoteFetching then begin
+      Check(RemoteDataAdapter = nil, Name+'.RemoteDataAdapter must be assigned.');
+    end
+    else begin
+      Check(LocalDataStreamer = nil , Name+'.LocalDataStreamer must be assigned.');
+      Check(LocalSchema = nil, Name+'.LocalSchema must be assigned.');
+      LocalSchema.CheckProperties;
+    end;
+  end;
+end;
+
+
+procedure TDADataTable.ExpessionEvaluatorGetValue(
+  Sender: TDAExpressionEvaluator; const aIdentifier: string;
+  out aValue: Variant);
+begin
+  aValue := Fields.FieldByName(aIdentifier).Value;
+end;
+
+function TDADataTable.GetDynamicWhere: TDAWhereBuilder;
+begin
+  Result := fDynamicWhere;
+end;
+
+procedure TDADataTable.SetDynamicWhere(const Value: TDAWhereBuilder);
+begin
+  if Value <> nil then
+    FDynamicWhere.Xml := Value.Xml
+  else
+    FDynamicWhere.Clear;
+end;
+
+function TDADataTable.SQLContainsDynamicWhere: boolean;
+begin
+  Result:=False;
+  // Not implemented in DataTables
+end;
+
+function TDADataTable.GetCloneSource: TDADataTable;
+begin
+  Result:= FCloneSource;
+end;
+
+function TDADataTable.GetUsingClonedCursor: boolean;
+begin
+  Result:=FCloneSource<>nil;
+end;
+
+function TDADataTable.GetSimpleCloneSource: TObject;
+begin
+  Result:= GetCloneSource;
+end;
+
+procedure TDADataTable.CloneCursor(Source: TDADataTable);
+begin
+  Raise Exception.Create(err_NotSupported);
+end;
+
+function TDADataTable.BookmarkValid(Bookmark: TBookmark): Boolean;
+begin
+  Result := fDataset.BookmarkValid(Bookmark);
+end;
+
+function TDADataTable.ControlsDisabled: Boolean;
+begin
+  Result := fDataset.ControlsDisabled;
+end;
+
+function TDADataTable.TriggerTransactionEvent(
+  aEvent: TDALocalUpdateDataTransactionEvent): boolean;
+begin
+  result := true;
+  if assigned(aEvent) then aEvent(self, result);
+end;
+
+procedure TDADataTable.SetDetailOptions(const Value: TDADetailOptions);
+begin
+  fDetailOptions := Value - DetailOptions_unused;
+end;
+
+procedure TDADataTable.SetMasterOptions(const Value: TDAMasterOptions);
+begin
+  fMasterOptions := Value - MasterOptions_unused;
+end;
+
+function TDADataTable.GetRangeState: Boolean;
+begin
+  Result := False;
+end;
+
+function TDADataTable.intDATypeToVCLType(aDAType: TDADataType): TFieldType;
+begin
+  Result := DATypeToVCLType(aDAType);
+end;
+
+{ TDADataSource }
+
+constructor TDADataSource.Create(aOwner: TComponent);
+begin
+  inherited;
+end;
+
+destructor TDADataSource.Destroy;
+begin
+  inherited;
+end;
+
+function TDADataSource.GetActive: boolean;
+begin
+  result := (fDataTable <> nil) and fDataTable.Active
+end;
+
+function TDADataSource.GetDataset: TDataset;
+begin
+  result := nil;
+end;
+
+function TDADataSource.GetOpening: boolean;
+begin
+  result := (fDataTable <> nil) and fDataTable.Opening
+end;
+
+procedure TDADataSource.Notification(AComponent: TComponent;
+  Operation: TOperation);
+begin
+  inherited;
+
+  if (AComponent = fDataTable) then begin
+    fDataTable := nil;
+    inherited Dataset := nil;
+  end;
+end;
+
+procedure TDADataSource.SetDataset(const Value: TDataset);
+begin
+
+end;
+
+procedure TDADataSource.SetDataTable(const Value: TDADataTable);
+begin
+  fDataTable := Value;
+  if (fDataTable <> nil) then begin
+    fDataTable.FreeNotification(Self);
+    inherited Dataset := fDataTable.Dataset;
+  end
+  else
+    inherited Dataset := nil;
+end;
+
+{ TDABusinessRules }
+
+constructor TDABusinessRules.Create;
+begin
+  inherited;
+end;
+
+destructor TDABusinessRules.Destroy;
+begin
+  inherited;
+end;
+
+function TDABusinessRules._AddRef: Integer;
+begin
+  result := -1;
+end;
+
+function TDABusinessRules._Release: Integer;
+begin
+  result := -1;
+end;
+
+{ TDADataTableRules }
+
+constructor TDADataTableRules.Create(aDataTable: TDADataTable);
+begin
+  inherited Create;
+
+  Check(not Assigned(aDatatable), 'DataTable cannot be NIL');
+
+  fDetails := TStringList.Create;
+  fDetails.Sorted := TRUE;
+  fDetails.Duplicates := dupError;
+
+  fDataTable := aDataTable;
+end;
+
+destructor TDADataTableRules.Destroy;
+begin
+  fDetails.Free;
+
+  inherited;
+end;
+
+procedure TDADataTableRules.AfterCancel(Sender: TDADataTable);
+begin
+
+end;
+
+procedure TDADataTableRules.AfterClose(Sender: TDADataTable);
+begin
+
+end;
+
+procedure TDADataTableRules.AfterDelete(Sender: TDADataTable);
+begin
+
+end;
+
+procedure TDADataTableRules.AfterEdit(Sender: TDADataTable);
+begin
+
+end;
+
+procedure TDADataTableRules.AfterInsert(Sender: TDADataTable);
+begin
+
+end;
+
+procedure TDADataTableRules.AfterOpen(Sender: TDADataTable);
+begin
+
+end;
+
+procedure TDADataTableRules.AfterPost(Sender: TDADataTable);
+begin
+
+end;
+
+procedure TDADataTableRules.AfterRefresh(Sender: TDADataTable);
+begin
+
+end;
+
+procedure TDADataTableRules.AfterScroll(Sender: TDADataTable);
+begin
+
+end;
+
+procedure TDADataTableRules.BeforeCancel(Sender: TDADataTable);
+begin
+
+end;
+
+procedure TDADataTableRules.BeforeClose(Sender: TDADataTable);
+begin
+
+end;
+
+procedure TDADataTableRules.BeforeDelete(Sender: TDADataTable);
+begin
+
+end;
+
+procedure TDADataTableRules.BeforeEdit(Sender: TDADataTable);
+begin
+
+end;
+
+procedure TDADataTableRules.BeforeInsert(Sender: TDADataTable);
+begin
+
+end;
+
+procedure TDADataTableRules.BeforeOpen(Sender: TDADataTable);
+begin
+
+end;
+
+procedure TDADataTableRules.BeforePost(Sender: TDADataTable);
+begin
+
+end;
+
+procedure TDADataTableRules.BeforeRefresh(Sender: TDADataTable);
+begin
+
+end;
+
+procedure TDADataTableRules.BeforeScroll(Sender: TDADataTable);
+begin
+
+end;
+
+procedure TDADataTableRules.OnCalcFields(Sender: TDADataTable);
+begin
+
+end;
+
+procedure TDADataTableRules.OnNewRecord(Sender: TDADataTable);
+begin
+
+end;
+
+procedure TDADataTableRules.OnDeleteError(DataTable: TDADataTable;
+  Error: EDatabaseError; var Action: TDataAction);
+begin
+
+end;
+
+procedure TDADataTableRules.OnEditError(DataTable: TDADataTable;
+  Error: EDatabaseError; var Action: TDataAction);
+begin
+
+end;
+
+procedure TDADataTableRules.Attach(aDataTable: TDADataTable);
+begin
+  RefreshDetails;
+end;
+
+procedure TDADataTableRules.Detach(aDataTable: TDADataTable);
+begin
+  fDetails.Clear;
+end;
+
+procedure TDADataTableRules.Append;
+begin
+  fDataTable.Append();
+end;
+
+procedure TDADataTableRules.Cancel;
+begin
+  fDataTable.Cancel();
+end;
+
+procedure TDADataTableRules.Delete;
+begin
+  fDataTable.Delete();
+end;
+
+procedure TDADataTableRules.Edit;
+begin
+  fDataTable.Edit();
+end;
+
+procedure TDADataTableRules.First;
+begin
+  fDataTable.First();
+end;
+
+procedure TDADataTableRules.Insert;
+begin
+  fDataTable.Insert();
+end;
+
+procedure TDADataTableRules.Last;
+begin
+  fDataTable.Last();
+end;
+
+procedure TDADataTableRules.Next;
+begin
+  fDataTable.Next();
+end;
+
+procedure TDADataTableRules.Post;
+begin
+  fDataTable.Post();
+end;
+
+procedure TDADataTableRules.Prior;
+begin
+  fDataTable.Prior();
+end;
+
+function TDADataTableRules.GetBOF: Boolean;
+begin
+  result := fDataTable.BOF;
+end;
+
+function TDADataTableRules.GetEOF: Boolean;
+begin
+  result := fDataTable.EOF;
+end;
+
+function TDADataTableRules.GetRecordCount: Integer;
+begin
+  result := fDataTable.RecordCount;
+end;
+
+function TDADataTableRules.Locate(const aKeyFields: String; const aKeyValues: Variant; aOptions: TLocateOptions = []): boolean;
+begin
+  result := fDataTable.Locate(aKeyFields, aKeyValues, aOptions);
+end;
+
+function TDADataTableRules.GetDetails(Index: integer): TDADataTable;
+begin
+  result := TDADataTable(fDetails[Index])
+end;
+
+function TDADataTableRules.GetDetailsCount: integer;
+begin
+  result := fDetails.Count
+end;
+
+function TDADataTableRules.FindDetail(
+  const aLogicalName: string): TDADataTable;
+var i : integer;
+begin
+  result := NIL;
+  i := fDetails.IndexOf(aLogicalName);
+
+  if (i>=0) then result := TDADataTable(fDetails.Objects[i]);
+end;
+
+function TDADataTableRules.DetailByName(
+  const aLogicalName: string): TDADataTable;
+begin
+  result := FindDetail(aLogicalName);
+  if (result=NIL)
+    then raise Exception.CreateFmt('Cannot find the detail DataTable %s ', [aLogicalName]);
+end;
+
+procedure TDADataTableRules.RefreshDetails;
+var lList : TList;
+    i : integer;
+    lLogicalName : string;
+begin
+  lList := DataTable.GetDetailDataTables;
+  fDetails.Clear;
+  try
+    for i := 0 to (lList.Count-1) do begin
+      lLogicalName := TDADataTable(lList[i]).LogicalName;
+
+      if (lLogicalName<>'')
+        then fDetails.AddObject(lLogicalName, lList[i]);
+    end;
+  finally
+    lList.Free;
+  end;
+end;
+
+function TDADataTableRules.GetDetailOptions: TDADetailOptions;
+begin
+  result := DataTable.DetailOptions
+end;
+
+function TDADataTableRules.GetMasterOptions: TDAMasterOptions;
+begin
+  result := DataTable.MasterOptions
+end;
+
+procedure TDADataTableRules.SetDetailOptions(Value: TDADetailOptions);
+begin
+  DataTable.DetailOptions := Value
+end;
+
+procedure TDADataTableRules.SetMasterOptions(Value: TDAMasterOptions);
+begin
+  DataTable.MasterOptions := Value
+end;
+
+function TDADataTableRules.GetRecNo: integer;
+begin
+  result := fDataTable.RecNo
+end;
+
+procedure TDADataTableRules.SetRecNo(Value: integer);
+begin
+  fDataTable.RecNo := Value
+end;
+
+procedure TDADataTableRules.OnFilterRecord(DataTable: TDADataTable;
+  var Accept: boolean);
+begin
+
+end;
+
+procedure TDADataTableRules.OnPostError(DataTable: TDADataTable;
+  Error: EDatabaseError; var Action: TDataAction);
+begin
+
+end;
+
+function TDADataTableRules.Lookup(const KeyFields: string;
+  const KeyValues: Variant; const ResultFields: string): Variant;
+begin
+  result := fDataTable.Lookup(KeyFields, KeyValues, ResultFields);
+end;
+
+function TDADataTableRules.GetIsEmpty: boolean;
+begin
+  result := fDataTable.IsEmpty
+end;
+
+function TDADataTableRules.GetState: TDatasetState;
+begin
+  result := fDataTable.State
+end;
+
+function TDADataTableRules.IsFieldNull(
+  const FieldIndexOrName: Variant): boolean;
+var fld : TDAField;
+begin
+  case VarType(FieldIndexOrName) of
+    varString, varUString, varOleStr, varStrArg : fld := DataTable.FieldByName(VarToStr(FieldIndexOrName));
+    else fld := DataTable.Fields[FieldIndexOrName];
+  end;
+
+  result := fld.IsNull;
+end;
+
+procedure TDADataTableRules.ClearField(const FieldIndexOrName: Variant);
+var fld : TDAField;
+begin
+  case VarType(FieldIndexOrName) of
+    varString, varUString, varOleStr, varStrArg : fld := DataTable.FieldByName(VarToStr(FieldIndexOrName));
+    else fld := DataTable.Fields[FieldIndexOrName];
+  end;
+
+  fld.Clear;
+end;
+
+function TDADataTableRules.GetDataTable: TDADataTable;
+begin
+  result := fDataTable;
+end;
+
+procedure TDADataTableRules.ApplyRange;
+begin
+  (fDataTable as IDARangeController).ApplyRange
+end;
+
+procedure TDADataTableRules.CancelRange;
+begin
+  (fDataTable as IDARangeController).CancelRange
+end;
+
+procedure TDADataTableRules.EditRangeEnd;
+begin
+  (fDataTable as IDARangeController).EditRangeEnd
+end;
+
+procedure TDADataTableRules.EditRangeStart;
+begin
+  (fDataTable as IDARangeController).EditRangeStart
+end;
+
+procedure TDADataTableRules.SetRange(const StartValues,
+  EndValues: array of const);
+begin
+  (fDataTable as IDARangeController).SetRange(StartValues, EndValues);
+end;
+
+procedure TDADataTableRules.SetRangeEnd;
+begin
+  (fDataTable as IDARangeController).SetRangeEnd
+end;
+
+procedure TDADataTableRules.SetRangeStart;
+begin
+  (fDataTable as IDARangeController).SetRangeStart
+end;
+
+procedure TDADataTableRules.Close;
+begin
+  fDataTable.Close;
+end;
+
+procedure TDADataTableRules.Open;
+begin
+  fDataTable.Open;
+end;
+
+function TDADataTableRules.GetActive: boolean;
+begin
+  result := fDataTable.Active;
+end;
+
+procedure TDADataTableRules.SetActive(const Value: boolean);
+begin
+  fDataTable.Active := Value;
+end;
+
+procedure TDADataTableRules.OnAfterApplyUpdates(DataTable: TDADataTable);
+begin
+
+end;
+
+procedure TDADataTableRules.OnAfterDataRequestCall(DataTable: TDADataTable;
+  Request: TDARemoteRequest);
+begin
+
+end;
+
+procedure TDADataTableRules.OnAfterDataUpdateCall(DataTable: TDADataTable;
+  Request: TDARemoteRequest);
+begin
+
+end;
+
+procedure TDADataTableRules.OnAfterMergeDelta(DataTable: TDADataTable);
+begin
+
+end;
+
+procedure TDADataTableRules.OnAfterSchemaCall(DataTable: TDADataTable;
+  Request: TDARemoteRequest);
+begin
+
+end;
+
+procedure TDADataTableRules.OnAfterScriptCall(DataTable: TDADataTable;
+  Request: TDARemoteRequest);
+begin
+
+end;
+
+procedure TDADataTableRules.OnBeforeApplyUpdates(DataTable: TDADataTable;
+  const Delta: IDADelta);
+begin
+
+end;
+
+procedure TDADataTableRules.OnBeforeDataRequestCall(
+  DataTable: TDADataTable; Request: TDARemoteRequest);
+begin
+
+end;
+
+procedure TDADataTableRules.OnBeforeDataUpdateCall(DataTable: TDADataTable;
+  Request: TDARemoteRequest);
+begin
+
+end;
+
+procedure TDADataTableRules.OnBeforeMergeDelta(DataTable: TDADataTable);
+begin
+
+end;
+
+procedure TDADataTableRules.OnBeforeSchemaCall(DataTable: TDADataTable;
+  Request: TDARemoteRequest);
+begin
+
+end;
+
+procedure TDADataTableRules.OnBeforeScriptCall(DataTable: TDADataTable;
+  Request: TDARemoteRequest);
+begin
+
+end;
+
+procedure TDADataTableRules.OnReceiveDataStream(DataTable: TDADataTable;
+  Stream: TStream);
+begin
+
+end;
+
+{ TDAFieldRules }
+constructor TDAFieldRules.Create(aField : TDAField; aDataTable : TDADataTable);
+begin
+  inherited Create;
+
+  fDataTable := aDataTable;
+
+  fField := aField;
+  fField.OnValidate := OnValidate;
+  fField.OnChange := OnChange;
+
+  Attach(fDataTable);
+end;
+
+destructor TDAFieldRules.Destroy;
+begin
+  Detach(fDataTable);
+  inherited;
+end;
+
+procedure TDAFieldRules.Attach(aDataTable: TDADataTable);
+begin
+
+end;
+
+procedure TDAFieldRules.Detach(aDataTable: TDADataTable);
+begin
+
+end;
+
+procedure TDAFieldRules.OnChange(Sender: TDACustomField);
+begin
+end;
+
+procedure TDAFieldRules.OnValidate(Sender: TDACustomField);
+begin
+end;
+
+{ TDADataTableList }
+constructor TDADataTableList.Create(aOwnerComponent: TComponent);
+begin
+  inherited Create;
+
+  ScanAndAdd(aOwnerComponent);
+end;
+
+function TDADataTableList.Add(aDataTable: TDADataTable): integer;
+begin
+  result := inherited Add(aDataTable);
+end;
+
+function TDADataTableList.GetItems(Index: integer): TDADataTable;
+begin
+  result := TDADataTable(inherited Items[Index]);
+end;
+
+procedure TDADataTableList.Remove(aDataTable: TDADataTable);
+begin
+  inherited Remove(aDataTable);
+end;
+
+
+function TDADataTableList.ScanAndAdd(aOwnerComponent: TComponent): integer;
+var i : integer;
+begin
+  result := 0;
+  with aOwnerComponent do begin
+    for i := 0 to (Count-1) do
+      if (Components[i] is TDADataTable) then begin
+        Add(TDADataTable(Components[i]));
+        Inc(result);
+      end;
+  end;
+end;
+
+function TDADataTableList.GetPendingChangeCount: integer;
+var i : integer;
+begin
+  result := 0;
+  for i := 0 to (Count-1) do
+    if Items[i].Active and Items[i].LogChanges
+      then Inc(result, Items[i].Delta.Count);
+end;
+
+{ TDABaseRemoteDataAdapter }
+
+function TDABaseRemoteDataAdapter.ApplyUpdates(aTables: array of TDADataTable;
+  aRefetchAll: boolean): boolean;
+
+  procedure CheckTable(ATable: TDADataTable);
+  begin
+    if ATable.RemoteDataAdapter <> Self then EDAException.CreateFmt('Can not do ApplyUpdate:%s.RemoteDataAdapter must use %s',[ATable.Name, Self.Name]);
+  end;
+
+  procedure List_RemoveDuplicates(AList: TList);
+  var
+    i,j: integer;
+    p: pointer;
+  begin
+    i := 0;
+    while i < AList.Count do begin
+      p:=AList[i];
+      for j := AList.Count - 1 downto i+1 do
+        if p = AList[j] then
+          AList.Delete(j);
+      inc(i);
+    end;
+  end;
+
+var
+  i,k,j : Integer;
+  details: TList;
+  lTables: TList;
+  dt: TDADataTable;
+  aTables2,aTables3: array of TDADataTable;
+  r: boolean;
+  lFailedDeltas: TList;
+begin
+  CheckProperties;
+  Result := False;
+
+  // we need to process correctly case when MasterTables and DetailTable use different RDAs
+  // currently we don't support it
+  // probably we should do apply updates for each RDA separately
+  SetLength(aTables2, Length(aTables));
+  j:=0;
+  lTables := TList.Create;
+  try
+    for i := Low(aTables) to High(aTables) do begin
+      if Assigned(aTables[i]) and aTables[i].Active and aTables[i].DeltaInitialized then begin
+        CheckTable(aTables[i]);
+        aTables2[j] := aTables[i];
+        inc(j);
+        lTables.Add(aTables[i]);
+        details:= aTables[i].GetDetailTablesforApplyUpdate;
+        try
+          for k := 0 to details.Count-1 do begin
+            CheckTable(TDADataTable(details[k]));
+            lTables.Add(TDADataTable(details[k]));
+          end;
+        finally
+          details.free;
+        end;
+      end;
+    end;
+    SetLength(aTables2,j);
+    List_RemoveDuplicates(lTables);
+    if lTables.Count = 0 then Exit;
+    SetLength(aTables3,lTables.Count);
+    for I := 0 to lTables.Count - 1 do
+       aTables3[i] := TDADataTable(lTables[i]);
+
+    // post all unposted records
+    for i := 0 to lTables.Count-1 do
+      with TDADataTable(lTables[i]) do
+        if not (ruoOnPost in RemoteUpdatesOptions) and (State in [dsInsert, dsEdit]) then Post;
+
+    // BeforeApplyUpdates
+    for i := 0 to lTables.Count-1 do begin
+      dt := TDADataTable(lTables[i]);
+      if Assigned(dt.RemoteDataAdapter) and Assigned(dt.RemoteDataAdapter.BeforeApplyUpdates) then
+        dt.RemoteDataAdapter.BeforeApplyUpdates(dt.RemoteDataAdapter, dt, dt.Delta);
+    end;
+
+    R := InternalApplyUpdates(aTables2, aTables3);
+    if not R then Exit;
+    lFailedDeltas := TList.Create;
+    try
+      for i := 0 to lTables.Count-1 do
+        with TDADataTable(lTables[i]).Delta do
+          for j := 0 to Count - 1 do
+            if Changes[j].Status = csFailed then lFailedDeltas.Add(Changes[j]);
+
+      for i := 0 to lTables.Count-1 do
+        TDADataTable(lTables[i]).MergeDelta;
+      ThrowFailures(lTables,lFailedDeltas);
+    finally
+      lFailedDeltas.Free;
+    end;
+
+    // AfterApplyUpdates
+    for i := 0 to lTables.Count-1 do begin
+      dt := TDADataTable(lTables[i]);
+      if Assigned(dt.RemoteDataAdapter) and Assigned(dt.RemoteDataAdapter.AfterApplyUpdates) then
+        dt.RemoteDataAdapter.AfterApplyUpdates(dt.RemoteDataAdapter, dt, nil);
+    end;
+
+    Result := True;
+    if aRefetchAll then begin
+      for i := 0 to lTables.Count-1 do
+        with TDADataTable(lTables[i]) do
+          if Active then Close();
+      for i := 0 to lTables.Count-1 do
+        TDADataTable(lTables[i]).Open;
+    end;
+  finally
+    lTables.Free;
+  end;
+end;
+
+procedure TDABaseRemoteDataAdapter.CheckProperties;
+begin
+  Check(not assigned(DataStreamer), Name + '.DataStreamer must be assigned.');
+end;
+
+constructor TDABaseRemoteDataAdapter.Create(aOwner: TComponent);
+begin
+  inherited;
+  FFailureBehavior := fbBoth;
+  FDynamicSelect := False;
+end;
+
+procedure TDABaseRemoteDataAdapter.FillSchema(
+  aTables: array of TDADataTable; aPreserveLookupFields,
+  aPreserveClientCalcFields: boolean);
+type
+  THandlerArray = array[0..1] of TMethod;
+  PHandlerArray = ^THandlerArray;
+
+const
+  HandlersToSave : array[0..1] of string = ('OnChange', 'OnValidate');
+
+var
+  lSavedOptions: array of TDATableOptions;
+  i, j, k, lIndex: integer;
+  lHandlers : PHandlerArray;
+  lSchema: TDASchema;
+  lDataTableSchema: TDADataset;
+  lookupfields : TDAFieldCollection;
+  clientcalcfields : TDAFieldCollection;
+  lField: TDAField;
+begin
+  CheckProperties;
+
+  SetLength(lSavedOptions, Length(aTables));
+
+  for i := Low(aTables) to High(aTables) do
+    if aTables[i].Active then aTables[i].Close();
+
+  lookupfields := nil;
+  clientcalcfields := nil;
+
+  for i := Low(aTables) to High(aTables) do
+    aTables[i].Fields.FieldEventsDisabled := true;
+  try
+
+    for i := Low(aTables) to High(aTables) do begin
+      lSavedOptions[i-Low(aTables)].FieldHandlers := TStringList.Create;
+
+      { Saves the current event handler pointers }
+      for j := 0 to aTables[i].Fields.Count-1 do begin
+        New(lHandlers);
+        for k := Low(HandlersToSave) to High(HandlersToSave) do
+          lHandlers[k] := GetMethodProp(aTables[i].Fields[j], HandlersToSave[k]);
+        lSavedOptions[i-Low(aTables)].FieldHandlers.AddObject(aTables[i].Fields[j].Name, TObject(lHandlers));
+      end;
+
+      { Save lookup and calced fields}
+      if aPreserveLookupFields then begin
+        lookupfields := TDAFieldCollection.Create(nil);
+        lookupfields.Assign(aTables[i].Fields);
+        for j := (lookupfields.Count-1) downto 0 do
+          if not (lookupfields[j] as TDACustomField).Lookup then
+            lookupfields.Delete(j);
+      end;
+
+      if aPreserveClientCalcFields then begin
+        clientcalcfields := TDAFieldCollection.Create(nil);
+        clientcalcfields.Assign(aTables[i].Fields);
+        for j :=(clientcalcfields.Count-1) downto 0 do
+          if not (clientcalcfields[j] as TDACustomField).Calculated then
+            clientcalcfields.Delete(j);
+      end;
+
+      aTables[i].Fields.Clear;
+    end;
+
+    try
+      case InternalFillSchema of
+        rtBinary:begin
+          // only RDA
+          DataStreamer.Initialize(GetSchemaStream, aiRead);
+          try
+            if (DataStreamer.DatasetCount = 0) then raise Exception.Create('Stream does not contain any dataset');
+            for i := Low(aTables) to High(aTables) do
+              DataStreamer.ReadDataset(aTables[i].LogicalName, aTables[i], true, false);
+          finally
+            DataStreamer.Finalize;
+          end;
+        end;
+        rtString:begin
+          //LDA+RDA
+          lSchema := GetSchema;
+          for i := Low(aTables) to High(aTables) do begin
+            lDataTableSchema := lSchema.Datasets.FindDatasetByName(aTables[i].LogicalName);
+            if not assigned(lDataTableSchema) then
+              lDataTableSchema := lSchema.UnionDataTables.FindUnionDataTableByName(aTables[i].LogicalName);
+            if not assigned(lDataTableSchema) then
+              lDataTableSchema := lSchema.JoinDataTables.FindJoinTableByName(aTables[i].LogicalName);
+            if not assigned(lDataTableSchema) then raise Exception.CreateFmt('Data table "%s" was not found in schema.',[aTables[i].LogicalName]);
+
+            aTables[i].Fields.AssignFieldCollection(lDataTableSchema.Fields);
+            // ToDo: the code below is shared with TableWizard. Refactor.
+            if lDataTableSchema is TDAUnionDataTable then begin
+              if not Assigned(aTables[i].Fields.FindField(def_SourceTableFieldName) as TDAField) then begin
+                lField := aTables[i].Fields.Add();
+                lField.Name := def_SourceTableFieldName;
+                lField.DataType := datInteger;
+                lField.InPrimaryKey := True;
+                lField.ServerAutoRefresh := True;
+              end;
+            end;
+            aTables[i].Params.AssignParamCollection(lDataTableSchema.Params);
+            aTables[i].CustomAttributes.Assign(lDataTableSchema.CustomAttributes);
+          end;
+        end;
+      end;
+    finally
+      { Save lookup and calced fields}
+      if aPreserveLookupFields then
+        for i := Low(aTables) to High(aTables) do
+          for j := 0 to (lookupfields.Count-1) do
+            aTables[i].Fields.Add.Assign(lookupfields[j]);
+      if aPreserveClientCalcFields then
+        for i := Low(aTables) to High(aTables) do
+          for j := 0 to (clientcalcfields.Count-1) do
+            if not Assigned(aTables[i].Fields.FindField(clientcalcfields[j].Name)) then
+              aTables[i].Fields.Add.Assign(clientcalcfields[j]);
+
+      { restores the old event handler pointers }
+      for i := Low(aTables) to High(aTables) do begin
+        for j := 0 to aTables[i].Fields.Count-1 do begin
+          lIndex := lSavedOptions[i-Low(aTables)].FieldHandlers.IndexOf(aTables[i].Fields[j].Name);
+          if lIndex >= 0 then begin
+            lHandlers := PHandlerArray(lSavedOptions[i-Low(aTables)].FieldHandlers.Objects[lIndex]);
+            for k := Low(HandlersToSave) to High(HandlersToSave) do
+              SetMethodProp(aTables[i].Fields[j], HandlersToSave[k], lHandlers[k]);
+            Dispose(lHandlers);
+          end;
+        end;
+        lSavedOptions[i-Low(aTables)].FieldHandlers.Free();
+      end;
+    end;
+  finally
+    InternalFillSchema_ClearParams; //RDA frees lResultParam if InternalFillSchema=rtBinary
+    clientcalcfields.Free;
+    lookupfields.Free;
+    for i := Low(aTables) to High(aTables) do
+      aTables[i].Fields.FieldEventsDisabled := false;
+  end;
+end;
+
+function TDABaseRemoteDataAdapter.GetSchemaStream: Binary;
+begin
+  Result := nil;
+end;
+
+function TDABaseRemoteDataAdapter.Get_GetDataCall: TDARemoteRequest;
+begin
+  result := nil;
+end;
+
+function TDABaseRemoteDataAdapter.Get_GetSchemaCall: TDARemoteRequest;
+begin
+  result := nil;
+end;
+
+function TDABaseRemoteDataAdapter.Get_GetScriptsCall: TDARemoteRequest;
+begin
+  result := nil;
+end;
+
+function TDABaseRemoteDataAdapter.Get_UpdateDataCall: TDARemoteRequest;
+begin
+  result := nil;
+end;
+
+
+procedure TDABaseRemoteDataAdapter.InternalFillSchema_ClearParams;
+begin
+  // nothing
+end;
+
+procedure TDABaseRemoteDataAdapter.Notification(AComponent: TComponent;
+  Operation: TOperation);
+begin
+  inherited;
+  if (Operation = opRemove) and (AComponent = FDataStreamer) then FDataStreamer := nil
+end;
+
+procedure TDABaseRemoteDataAdapter.SetDataStreamer(
+  const Value: TDADataStreamer);
+begin
+  if Value <> fDataStreamer then begin
+    fDataStreamer := Value;
+    if assigned(fDataStreamer) then fDataStreamer.FreeNotification(self);
+  end;
+end;
+
+procedure TDABaseRemoteDataAdapter.ThrowFailures(ATableList,
+  AFailedDeltas: TList);
+
+  function FindDatatable(ADelta: IDADelta): TDADatatable;
+  var
+    i: integer;
+  begin
+    Result := nil;
+    for i := 0 to ATableList.Count - 1 do
+      if SameText(ADelta.LogicalName, TDADatatable(ATableList[i]).LogicalName) then begin
+        Result := TDADatatable(ATableList[i]);
+        Break;
+      end;
+  end;
+
+  function _VarToStr(AValue: variant; ADataType: TDADataType): string;
+  begin
+    if ADataType = datDecimal then
+      Result := DecimalVariantToString(AValue)
+    else
+      Result := VarToStr(AValue)
+  end;
+
+var
+  lFailureBehavior: TDAFailureBehavior;
+  lExceptionMessage: string;
+  i,j: integer;
+  lHandled: boolean;
+  lMes: string;
+begin
+  // we need to process correctly case when MasterTables and DetailTable use different RDA
+  // currently we don't support it
+  // probably we should ThrowFailures for each RDA separately
+
+  if AFailedDeltas.Count >0 then begin
+    lFailureBehavior:= FFailureBehavior;
+    if Assigned(fBeforeProcessFailures) then fBeforeProcessFailures(Self, ATableList, AFailedDeltas, lFailureBehavior);
+    //(fbNone, fbRaiseException, fbShowReconcile, fbBoth);
+    if lFailureBehavior in [fbShowReconcile, fbBoth] then begin
+      lHandled := false;
+      if assigned(OnShowReconcleDialog) then OnShowReconcleDialog(self, AFailedDeltas, ATableList, lHandled);
+      if not lHandled then InternalReconcileDialog(Self, AFailedDeltas, ATableList);
+    end;
+    if (AFailedDeltas.Count >0) and (lFailureBehavior in [fbRaiseException, fbBoth]) then begin
+      lExceptionMessage := 'One or more updates failed to apply on the server.'+sLineBreak;
+      for i := 0 to AFailedDeltas.Count-1 do begin
+       lExceptionMessage := lExceptionMessage + sLineBreak ;
+       With TDADeltaChange(AFailedDeltas[i]), Delta do
+        for j := 0 to KeyFieldCount-1 do
+          begin
+
+            if ChangeType = uDAInterfaces.ctDelete then
+             lExceptionMessage := lExceptionMessage + _VarToStr(OldValueByName[KeyFieldNames[j]], LoggedFieldTypes[j])
+            else
+             lExceptionMessage := lExceptionMessage + _VarToStr(NewValueByName[KeyFieldNames[j]], LoggedFieldTypes[j]);
+
+            if j = KeyFieldCount-1 then
+              lExceptionMessage := lExceptionMessage + ': '
+            else
+              lExceptionMessage := lExceptionMessage + ', ';
+         end;
+
+        lMes := TDADeltaChange(AFailedDeltas[i]).Message;
+        if Assigned(FOnGenerateRecordMessage) then
+           FOnGenerateRecordMessage(Self, TDADeltaChange(AFailedDeltas[i]),FindDatatable(TDADeltaChange(AFailedDeltas[i]).Delta),lMes);
+        lExceptionMessage := lExceptionMessage + lMes;
+        if i = 10 then break;
+      end;
+      RaiseError(lExceptionMessage);
+    end;
+  end;
+end;
+
+initialization
+  RegisterExceptionClass(EDABizValidationException);
+
+  _bizfields := TStringList.Create;
+  _bizfields.Sorted := TRUE;
+
+  _bizdatatables := TStringList.Create;
+  _bizdatatables.Sorted := TRUE;
+
+finalization
+  UnregisterExceptionClass(EDABizValidationException);
+  _bizdatatables.Free;
+  _bizfields.Free;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDADataTableReferenceCollection.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDADataTableReferenceCollection.pas
new file mode 100644
index 0000000..f6bdd17
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDADataTableReferenceCollection.pas	
@@ -0,0 +1,201 @@
+unit uDADataTableReferenceCollection;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  Classes,
+  uDAInterfaces,uDADataTable;
+
+type
+  { TDADataTableReference }
+  TDADataTableReferenceCollection = class;
+  TDADataTableReference = class(TCollectionItem)
+  private
+    fDataTable: TComponent;
+    FDataset: IDADataset;
+    FLogicalName: string; // fro Tdataset
+    function GetIsValidReference: boolean;
+    procedure SetDataTable(const Value: TComponent);
+    function GetReferenceCollection: TDADataTableReferenceCollection;
+    function GetDataset: IDADataset;
+    function GetLogicalName: string;
+    procedure SetLogicalName(const Value: string);
+
+  protected
+    function GetDisplayName : string; override;
+  public
+    constructor Create(aCollection : TDADataTableReferenceCollection); reintroduce;
+    property IsValidReference : boolean read GetIsValidReference;
+    property ReferenceCollection : TDADataTableReferenceCollection read GetReferenceCollection;
+    property Dataset: IDADataset read GetDataset;
+    destructor Destroy; override;
+  published
+    property DataTable : TComponent read fDataTable write SetDataTable;
+    property LogicalName: string read GetLogicalName write SetLogicalName;
+  end;
+
+  { TDADataTableReferenceCollection }
+  TDADataTableReferenceCollection = class(TCollection)
+  private
+    fOwner: TComponent;
+
+    function GetItems(Index: integer): TDADataTableReference;
+  protected
+  public
+    constructor Create(aOwner: TComponent);
+    destructor Destroy; override;
+
+    function FindByDataTable(aDataTable : TComponent) : TDADataTableReference;
+    function FindByName(const aLogicalName : string) : TDADataTableReference;
+
+    property Items[Index : integer] : TDADataTableReference read GetItems; default;
+
+    property OwnerService: TComponent read fOwner;
+  end;
+
+implementation
+
+uses
+  SysUtils,DB,
+  uROClasses, uDADatasetWrapper;
+
+{ TDADataTableReferenceCollection }
+
+constructor TDADataTableReferenceCollection.Create(aOwner: TComponent);
+begin
+  inherited Create(TDADataTableReference);
+
+  fOwner := aOwner;
+end;
+
+destructor TDADataTableReferenceCollection.Destroy;
+begin
+
+  inherited;
+end;
+
+function TDADataTableReferenceCollection.FindByDataTable(aDataTable: TComponent): TDADataTableReference;
+var i : integer;
+begin
+  result := NIL;
+  if (aDataTable=NIL) then Exit;
+
+  for i := 0 to (Count-1) do
+    if (Items[i].DataTable=aDataTable) then begin
+      result := Items[i];
+      Exit;
+    end;
+end;
+
+function TDADataTableReferenceCollection.FindByName(const aLogicalName: string): TDADataTableReference;
+var i : integer;
+begin
+  result := NIL;
+
+  for i := 0 to (Count-1) do
+    if Items[i].IsValidReference and SameText(Items[i].Dataset.LogicalName, aLogicalName) then begin
+      result := Items[i];
+      Exit;
+    end;
+end;
+
+function TDADataTableReferenceCollection.GetItems(
+  Index: integer): TDADataTableReference;
+begin
+  result := TDADataTableReference(inherited Items[Index]);
+end;
+
+{ TDADataTableReference }
+
+constructor TDADataTableReference.Create(aCollection : TDADataTableReferenceCollection);
+begin
+  inherited Create(aCollection);
+end;
+
+function TDADataTableReference.GetDataset: IDADataset;
+begin
+  Result := FDataset;
+  if (Result = nil) and (fDataTable is TDADataTable) then
+    Result := fDataTable as IDADataset;
+end;
+
+procedure TDADataTableReference.SetDataTable(const Value: TComponent);
+begin
+  if (fDataTable=Value) then Exit;
+
+  if Value is TDataSet then begin
+    FDataset := TDatasetWrapper.Create(TDataSet(Value));
+    FDataset.LogicalName := FLogicalName;
+  end
+  else
+    FDataset := nil;
+
+  if (Value is TDataSet) or (Value is TDADataTable) then
+    fDataTable := Value
+  else
+    // don't supported other types
+    fDataTable := nil;
+
+  if (fDataTable<>NIL)
+    then fDataTable.FreeNotification(ReferenceCollection.OwnerService);
+end;
+
+function TDADataTableReference.GetDisplayName: string;
+var F_logicalname : string;
+begin
+  if (fDataTable<>NIL) then begin
+    F_logicalname := LogicalName;
+    if (F_logicalname='') then F_logicalname := '???';
+    result := Format('%s (%s)', [F_logicalname, fDataTable.Name])
+  end
+  else result := '<No Reference>';
+end;
+
+function TDADataTableReference.GetIsValidReference: boolean;
+begin
+  result := fDataTable<>NIL
+end;
+
+function TDADataTableReference.GetReferenceCollection: TDADataTableReferenceCollection;
+begin
+  result := TDADataTableReferenceCollection(inherited Collection);
+end;
+
+function TDADataTableReference.GetLogicalName: string;
+begin
+  if (fDataTable<>NIL) then begin
+    Result := Dataset.LogicalName;
+    if fDataTable is TDataset then Result:= FLogicalName;
+  end
+  else
+    result := '';
+end;
+
+procedure TDADataTableReference.SetLogicalName(const Value: string);
+begin
+  FLogicalName := Value;
+  if (Dataset <> nil) then Dataset.LogicalName := Value;
+end;
+
+
+destructor TDADataTableReference.Destroy;
+begin
+  FDataset:=nil;
+  inherited;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDADatasetProvider.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDADatasetProvider.pas
new file mode 100644
index 0000000..25a9818
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDADatasetProvider.pas	
@@ -0,0 +1,79 @@
+unit uDADatasetProvider;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up                                                  }
+{ platform: Win32                                                            }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  Classes, DB, Provider, uDADataTable;
+
+type
+  { TDADatasetProvider }
+  TDADatasetProvider = class(TDataSetProvider)
+  private
+    fDataTable: TDADataTable;
+    procedure SetDataTable(const Value: TDADataTable);
+    function GetDataset: TDataset;
+
+  protected
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+    function InternalGetRecords(Count: Integer; out RecsOut: Integer;
+      Options: TGetRecordOptions; const CommandText: WideString;
+      var Params: OleVariant): OleVariant; override;
+
+  published
+    property Dataset: TDataset read GetDataset;
+    property DataTable: TDADataTable read fDataTable write SetDataTable;
+  end;
+
+
+implementation
+
+{ TDADatasetProvider }
+
+function TDADatasetProvider.GetDataset: TDataset;
+begin
+  result := NIL;
+end;
+
+function TDADatasetProvider.InternalGetRecords(Count: Integer;
+  out RecsOut: Integer; Options: TGetRecordOptions;
+  const CommandText: WideString; var Params: OleVariant): OleVariant;
+begin
+  if not DataTable.Active then DataTable.Open;
+  
+  result := inherited InternalGetRecords(Count, RecsOut, Options, CommandText, Params);
+end;
+
+procedure TDADatasetProvider.Notification(AComponent: TComponent;
+  Operation: TOperation);
+begin
+  inherited;
+
+  if (Operation=opRemove) then begin
+    if (aComponent=fDatatable) then fDataTable := NIL;
+  end;
+end;
+
+procedure TDADatasetProvider.SetDataTable(const Value: TDADataTable);
+begin
+  fDataTable := Value;
+  if (fDataTable<>NIL) then begin
+    fDataTable.FreeNotification(Self);
+    inherited Dataset := fDataTable.Dataset;
+  end;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDADatasetWrapper.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDADatasetWrapper.pas
new file mode 100644
index 0000000..a77d78e
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDADatasetWrapper.pas	
@@ -0,0 +1,674 @@
+unit uDADatasetWrapper;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  Classes, DB,
+  {$IFDEF MSWINDOWS}ActiveX,{$ENDIF}
+  uDAInterfaces;
+
+type
+  TDatasetWrapper = class(TInterfacedObject, {$IFDEF MSWINDOWS}ISupportErrorInfo,{$ENDIF} IDADataset, IDAEditableDataset)
+  private
+    FDataset: TDataset;
+    FLogicalName: string;
+    fFields: TDAFieldCollection;
+    fParams: TDAParamCollection;
+    fAfterOpenIDataset: TDAAfterOpenDatasetEvent;
+    fBeforeOpenIDataset: TDABeforeOpenDatasetEvent;
+    FOld_BeforeClose: TDataSetNotifyEvent;
+    FOld_BeforeOpen: TDataSetNotifyEvent;
+    FOld_AfterOpen: TDataSetNotifyEvent;
+    procedure DatasetBeforeOpen(DataSet: TDataSet);
+    procedure DatasetBeforeClose(DataSet: TDataSet);
+    procedure DatasetAfterOpen(DataSet: TDataSet);
+    procedure AttachEventHooks(aDataset: TDataset);
+    procedure DetachEventHooks(aDataset: TDataset);
+    procedure BindFields;
+    procedure UnbindFields;
+  protected
+    function GetParams: TDAParamCollection; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetPrepared: boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetPrepared(Value: boolean); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetWhere: TDAWhere; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF} 
+    function GetDynamicWhere: TDAWhereBuilder; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetDynamicWhere(const Value: TDAWhereBuilder); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetSQL: string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetSQL(const Value: string); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function SQLContainsDynamicWhere: boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetDataset: TDataset; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetName: string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetOnAfterExecute: TDAAfterExecuteCommandEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetOnBeforeExecute: TDABeforeExecuteCommandEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnAfterExecute(const Value: TDAAfterExecuteCommandEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnBeforeExecute(const Value: TDABeforeExecuteCommandEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetOnExecuteError: TDAExecuteCommandErrorEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnExecuteError(const Value: TDAExecuteCommandErrorEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    // Methods
+    procedure RefreshParams; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function Execute: integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function ParamByName(const aName: string): TDAParam; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    // Properties readers/writers
+    function GetRecordCount: integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetFieldCount: integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetFields: TDAFieldCollection; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetActive: boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetActive(Value: boolean); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetBOF: boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetEOF: boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetFieldValues(Index: integer): Variant; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetNames(Index: integer): string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetIsEmpty: boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetState: TDatasetState; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetLogicalName: string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetLogicalName(aName: string); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function GetOnAfterOpen: TDAAfterOpenDatasetEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetOnBeforeOpen: TDABeforeOpenDatasetEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnAfterOpen(const Value: TDAAfterOpenDatasetEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnBeforeOpen(const Value: TDABeforeOpenDatasetEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetOnOpenError: TDAOpenDatasetErrorEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnOpenError(const Value: TDAOpenDatasetErrorEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    // Methods
+    procedure Open; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure Close; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    procedure EnableControls; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure DisableControls; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    procedure Refresh; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    procedure Next; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function FieldByName(const aName: string): TDAField; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function FindField(const aName: string): TDAField; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function Locate(const KeyFields: string; const KeyValues: Variant; Options: TLocateOptions): Boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function Lookup(const KeyFields: string; const KeyValues: Variant; const ResultFields: string): Variant; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function GetBookMark: TBookmark; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GotoBookmark(Bookmark: TBookmark); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure FreeBookmark(Bookmark: TBookmark); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function BookmarkValid(Bookmark: TBookmark): Boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetCurrentRecIdValue: integer;
+    procedure SetCurrentRecIdValue(Value: integer);
+
+    function GetRowRecIDValue: integer;
+
+    procedure EnableConstraints; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure DisableConstraints; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    procedure Edit; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure Insert; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure Post; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure Cancel; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure Append; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure Delete; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    procedure Prior; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure First; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure Last; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    procedure AddRecord(const FieldNames: array of string; const FieldValues: array of Variant); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    procedure EnableEventHandlers; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure DisableEventHandlers; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function  ControlsDisabled: Boolean;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    {$IFDEF MSWINDOWS}
+  protected
+    function InterfaceSupportsErrorInfo(const iid: TGUID): HResult; stdcall;
+  public
+    function SafeCallException(ExceptObject: TObject; ExceptAddr: Pointer): HResult; override;
+    {$ENDIF}
+  public
+    constructor Create(ADataset: TDataset);
+    destructor Destroy; override;
+    property RowRecIdValue: integer read GetRowRecIdValue;
+    property CurrentRecIdValue: integer read GetCurrentRecIdValue write SetCurrentRecIdValue;
+    // Properties
+    property IsEmpty: boolean read GetIsEmpty;
+    property State: TDatasetState read GetState;
+    property BOF: boolean read GetBOF;
+    property EOF: boolean read GetEOF;
+    property RecordCount: integer read GetRecordCount;
+    property Fields: TDAFieldCollection read GetFields;
+    property Active: boolean read GetActive write SetActive;
+    property FieldCount: integer read GetFieldCount;
+    property FieldValues[Index: integer]: Variant read GetFieldValues;
+    property Names[Index: integer]: string read GetNames;
+    property LogicalName: string read GetLogicalName write SetLogicalName;
+
+    property OnBeforeOpen: TDABeforeOpenDatasetEvent read GetOnBeforeOpen write SetOnBeforeOpen;
+    property OnAfterOpen: TDAAfterOpenDatasetEvent read GetOnAfterOpen write SetOnAfterOpen;
+    property OnOpenError: TDAOpenDatasetErrorEvent read GetOnOpenError write SetOnOpenError;
+    property Name: string read GetName;
+    property Dataset: TDataSet read GetDataset;
+    property SQL: string read GetSQL write SetSQL;
+    property Params: TDAParamCollection read GetParams;
+    property Prepared: boolean read GetPrepared write SetPrepared;
+    property Where: TDAWhere read GetWhere;
+    property OnBeforeExecute: TDABeforeExecuteCommandEvent read GetOnBeforeExecute write SetOnBeforeExecute;
+    property OnAfterExecute: TDAAfterExecuteCommandEvent read GetOnAfterExecute write SetOnAfterExecute;
+    property OnExecuteError: TDAExecuteCommandErrorEvent read GetOnExecuteError write SetOnExecuteError;
+  end;
+
+implementation
+
+uses
+  SysUtils,
+  uROClasses, uDARes, uDAEngine;
+
+{ TDatasetWrapper }
+
+procedure TDatasetWrapper.AddRecord(const FieldNames: array of string;
+  const FieldValues: array of Variant);
+var
+  i: integer;
+begin
+  Insert;
+  for i := 0 to Length(FieldNames) - 1 do
+    FieldByName(FieldNames[i]).Value := FieldValues[i];
+  Post;
+end;
+
+procedure TDatasetWrapper.Append;
+begin
+  FDataset.Append;
+end;
+
+procedure TDatasetWrapper.AttachEventHooks(aDataset: TDataset);
+begin
+  fFields.FieldEventsDisabled := FALSE;
+end;
+
+procedure TDatasetWrapper.BindFields;
+var
+  i: integer;
+  fld: TField;
+  daFld: TDAField;
+  l: TDABlobType;
+begin
+  fFields.Clear;
+  for i := 0 to (Fdataset.FieldCount - 1) do begin
+    fld := Fdataset.Fields[i];
+    daFld := fFields.Add;
+    with daFld do begin
+      Name := fld.FieldName;
+      Size := fld.Size;
+      DataType := VCLTypeToDAType(fld.DataType);
+      for l := dabtBlob to High(TDABlobType) do begin
+        if fld.DataType = BlobTypeMappings[l] then begin
+          BlobType:=l;
+          Break;
+        end;
+      end;
+    end;
+    dafld.Bind(fld);
+  end;
+end;
+
+procedure TDatasetWrapper.Cancel;
+begin
+  FDataset.Cancel;
+end;
+
+procedure TDatasetWrapper.Close;
+begin
+  FDataset.Close;
+end;
+
+constructor TDatasetWrapper.Create(ADataset: TDataset);
+begin
+  Check(ADataset = nil, err_InvalidDataset);
+  inherited Create;
+  FDataset := ADataset;
+  fFields := TDAFieldCollection.Create(nil);
+  fParams := TDAParamCollection.Create(nil);
+  FOld_BeforeClose := FDataset.BeforeClose;
+  FOld_BeforeOpen := FDataset.BeforeOpen;
+  FOld_AfterOpen := FDataset.AfterOpen;
+  FDataset.BeforeClose := DatasetBeforeClose;
+  FDataset.BeforeOpen := DatasetBeforeOpen;
+  FDataset.AfterOpen := DatasetAfterOpen;
+  if FDataset.Active then BindFields;
+end;
+
+procedure TDatasetWrapper.DatasetAfterOpen(DataSet: TDataSet);
+begin
+  BindFields;
+  if Assigned(fAfterOpenIDataset) then fAfterOpenIDataset(Self, '', 0);
+  if Assigned(FOld_AfterOpen) then FOld_AfterOpen(Dataset);
+end;
+
+procedure TDatasetWrapper.DatasetBeforeClose(DataSet: TDataSet);
+begin
+  UnbindFields;
+  if Assigned(FOld_BeforeClose) then FOld_BeforeClose(DataSet);
+end;
+
+procedure TDatasetWrapper.DatasetBeforeOpen(DataSet: TDataSet);
+begin
+  if Assigned(fBeforeOpenIDataset) then fBeforeOpenIDataset(Self);
+  if Assigned(FOld_BeforeOpen) then FOld_BeforeOpen(DataSet);
+end;
+
+procedure TDatasetWrapper.Delete;
+begin
+  FDataset.Delete;
+end;
+
+destructor TDatasetWrapper.Destroy;
+begin
+  UnbindFields;
+  if FDataset <> nil then begin
+    FDataset.BeforeClose := FOld_BeforeClose;
+    FDataset.BeforeOpen := FOld_BeforeOpen;
+    FDataset.AfterOpen := FOld_AfterOpen;
+  end;
+  fFields.Free;
+  fParams.Free;
+  inherited;
+end;
+
+procedure TDatasetWrapper.DetachEventHooks(aDataset: TDataset);
+begin
+  fFields.FieldEventsDisabled := TRUE;
+end;
+
+procedure TDatasetWrapper.DisableConstraints;
+begin
+  // nothing
+end;
+
+procedure TDatasetWrapper.DisableControls;
+begin
+  FDataset.DisableControls;
+end;
+
+procedure TDatasetWrapper.DisableEventHandlers;
+begin
+  DetachEventHooks(Dataset);
+end;
+
+procedure TDatasetWrapper.Edit;
+begin
+  FDataset.Edit;
+end;
+
+procedure TDatasetWrapper.EnableConstraints;
+begin
+  // nothing
+end;
+
+procedure TDatasetWrapper.EnableControls;
+begin
+  FDataset.EnableControls;
+end;
+
+procedure TDatasetWrapper.EnableEventHandlers;
+begin
+  AttachEventHooks(Dataset);
+end;
+
+function TDatasetWrapper.Execute: integer;
+begin
+  // Not implemented
+  result := -1;
+end;
+
+function TDatasetWrapper.FieldByName(const aName: string): TDAField;
+begin
+  Result := fFields.FieldByName(aName);
+end;
+
+function TDatasetWrapper.FindField(const aName: string): TDAField;
+begin
+  result := fFields.FindField(aName);
+end;
+
+procedure TDatasetWrapper.First;
+begin
+  FDataset.First;
+end;
+
+procedure TDatasetWrapper.FreeBookmark(Bookmark: TBookmark);
+begin
+  FDataset.FreeBookmark(Bookmark);
+end;
+
+function TDatasetWrapper.GetActive: boolean;
+begin
+  Result := FDataset.Active;
+end;
+
+function TDatasetWrapper.GetBOF: boolean;
+begin
+  Result := FDataset.Bof;
+end;
+
+function TDatasetWrapper.GetBookMark: TBookmark;
+begin
+  Result := FDataset.GetBookmark;
+end;
+
+function TDatasetWrapper.GetCurrentRecIdValue: integer;
+begin
+  Result := FDataset.RecNo;
+end;
+
+function TDatasetWrapper.GetDataset: TDataset;
+begin
+  Result := FDataset;
+end;
+
+function TDatasetWrapper.GetEOF: boolean;
+begin
+  Result := FDataset.Eof;
+end;
+
+function TDatasetWrapper.GetFieldCount: integer;
+begin
+  Result := fFields.Count;
+end;
+
+function TDatasetWrapper.GetFields: TDAFieldCollection;
+begin
+  result := fFields;
+end;
+
+function TDatasetWrapper.GetFieldValues(Index: integer): Variant;
+begin
+  Result := fFields[Index].Value;
+end;
+
+function TDatasetWrapper.GetIsEmpty: boolean;
+begin
+  Result := FDataset.IsEmpty;
+end;
+
+function TDatasetWrapper.GetLogicalName: string;
+begin
+  Result := FLogicalName;
+end;
+
+function TDatasetWrapper.GetName: string;
+begin
+  if (LogicalName = '') then
+    result := Fdataset.Name
+  else
+    result := LogicalName;
+end;
+
+function TDatasetWrapper.GetNames(Index: integer): string;
+begin
+  Result := Fields[Index].Name;
+end;
+
+function TDatasetWrapper.GetOnAfterExecute: TDAAfterExecuteCommandEvent;
+begin
+  Result := nil;
+  NotSupported();
+end;
+
+function TDatasetWrapper.GetOnAfterOpen: TDAAfterOpenDatasetEvent;
+begin
+  result := fAfterOpenIDataset;
+end;
+
+function TDatasetWrapper.GetOnBeforeExecute: TDABeforeExecuteCommandEvent;
+begin
+  Result := nil;
+  NotSupported();
+end;
+
+function TDatasetWrapper.GetOnBeforeOpen: TDABeforeOpenDatasetEvent;
+begin
+  result := fBeforeOpenIDataset;
+end;
+
+function TDatasetWrapper.GetOnExecuteError: TDAExecuteCommandErrorEvent;
+begin
+  Result := nil;
+  NotSupported();
+end;
+
+function TDatasetWrapper.GetOnOpenError: TDAOpenDatasetErrorEvent;
+begin
+  Result := nil;
+  NotSupported();
+end;
+
+function TDatasetWrapper.GetParams: TDAParamCollection;
+begin
+  Result := fParams;
+end;
+
+function TDatasetWrapper.GetPrepared: boolean;
+begin
+  Result := False;
+  NotSupported();
+end;
+
+function TDatasetWrapper.GetRecordCount: integer;
+begin
+  Result := FDataset.RecordCount;
+end;
+
+function TDatasetWrapper.GetRowRecIDValue: integer;
+begin
+  result := -1;
+end;
+
+function TDatasetWrapper.GetSQL: string;
+begin
+  // Not implemented
+  result := '';
+end;
+
+function TDatasetWrapper.GetState: TDatasetState;
+begin
+  Result := FDataset.State;
+end;
+
+function TDatasetWrapper.GetWhere: TDAWhere;
+begin
+  Result := nil;
+end;
+
+procedure TDatasetWrapper.GotoBookmark(Bookmark: TBookmark);
+begin
+  FDataset.GotoBookmark(Bookmark);
+end;
+
+procedure TDatasetWrapper.Insert;
+begin
+  FDataset.Insert;
+end;
+
+procedure TDatasetWrapper.Last;
+begin
+  FDataset.Last;
+end;
+
+function TDatasetWrapper.Locate(const KeyFields: string;
+  const KeyValues: Variant; Options: TLocateOptions): Boolean;
+begin
+  Result := FDataset.Locate(KeyFields, KeyValues, Options);
+end;
+
+function TDatasetWrapper.Lookup(const KeyFields: string;
+  const KeyValues: Variant; const ResultFields: string): Variant;
+begin
+  Result := FDataset.Lookup(KeyFields, KeyValues, ResultFields);
+end;
+
+procedure TDatasetWrapper.Next;
+begin
+  FDataset.Next;
+end;
+
+procedure TDatasetWrapper.Open;
+begin
+  Dataset.Open;
+end;
+
+function TDatasetWrapper.ParamByName(const aName: string): TDAParam;
+begin
+  Result := nil;
+  NotSupported();
+end;
+
+procedure TDatasetWrapper.Post;
+begin
+  FDataset.Post;
+end;
+
+procedure TDatasetWrapper.Prior;
+begin
+  FDataset.Prior;
+end;
+
+procedure TDatasetWrapper.Refresh;
+begin
+  FDataset.Refresh;
+end;
+
+procedure TDatasetWrapper.RefreshParams;
+begin
+  // Not implemented
+  NotSupported();
+end;
+
+procedure TDatasetWrapper.SetActive(Value: boolean);
+begin
+  FDataset.Active := Value;
+end;
+
+procedure TDatasetWrapper.SetCurrentRecIdValue(Value: integer);
+begin
+  FDataset.RecNo := Value;
+end;
+
+procedure TDatasetWrapper.SetLogicalName(aName: string);
+begin
+  FLogicalName := AName;
+end;
+
+procedure TDatasetWrapper.SetOnAfterExecute(
+  const Value: TDAAfterExecuteCommandEvent);
+begin
+  NotSupported();
+end;
+
+procedure TDatasetWrapper.SetOnAfterOpen(
+  const Value: TDAAfterOpenDatasetEvent);
+begin
+  fAfterOpenIDataset := Value;
+end;
+
+procedure TDatasetWrapper.SetOnBeforeExecute(
+  const Value: TDABeforeExecuteCommandEvent);
+begin
+  NotSupported();
+end;
+
+procedure TDatasetWrapper.SetOnBeforeOpen(
+  const Value: TDABeforeOpenDatasetEvent);
+begin
+  fBeforeOpenIDataset := Value;
+end;
+
+procedure TDatasetWrapper.SetOnExecuteError(
+  const Value: TDAExecuteCommandErrorEvent);
+begin
+  NotSupported();
+end;
+
+procedure TDatasetWrapper.SetOnOpenError(
+  const Value: TDAOpenDatasetErrorEvent);
+begin
+  NotSupported();
+end;
+
+procedure TDatasetWrapper.SetPrepared(Value: boolean);
+begin
+  NotSupported();
+end;
+
+procedure TDatasetWrapper.SetSQL(const Value: string);
+begin
+  // Not implemented
+end;
+
+procedure TDatasetWrapper.UnbindFields;
+var
+  i: integer;
+begin
+  for i := 0 to (FFields.Count - 1) do
+    fFields[i].Unbind;
+end;
+
+
+{$IFDEF MSWINDOWS}
+function TDatasetWrapper.InterfaceSupportsErrorInfo(const iid: TGUID): HResult;
+begin
+  if GetInterfaceEntry(iid) <> nil then
+    Result := S_OK
+  else
+    Result := S_FALSE;
+
+end;
+
+function TDatasetWrapper.SafeCallException(ExceptObject: TObject;
+  ExceptAddr: Pointer): HResult;
+begin
+  Result := uDAEngine.DAHandleSafeCallException(self,ExceptObject, ExceptAddr);
+end;
+{$ENDIF}
+
+function TDatasetWrapper.GetDynamicWhere: TDAWhereBuilder;
+begin
+  Result:=nil;
+end;
+
+procedure TDatasetWrapper.SetDynamicWhere(const Value: TDAWhereBuilder);
+begin
+  // nothing
+end;
+
+function TDatasetWrapper.SQLContainsDynamicWhere: boolean;
+begin
+  Result:=False;
+  // Not implemented
+end;
+
+function TDatasetWrapper.BookmarkValid(Bookmark: TBookmark): Boolean;
+begin
+  Result := FDataset.BookmarkValid(Bookmark);
+end;
+
+function TDatasetWrapper.ControlsDisabled: Boolean;
+begin
+  Result := FDataset.ControlsDisabled;
+end;
+
+end.
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDADelta.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDADelta.pas
new file mode 100644
index 0000000..3534394
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDADelta.pas	
@@ -0,0 +1,1072 @@
+unit uDADelta;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  Classes, DB, SysUtils,
+//  {$IFDEF MSWINDOWS}ActiveX,{$ENDIF}
+  uRODL, uROTypes, uROClasses, uROClientIntf,
+  uDAInterfaces, uDAEngine,
+  DataAbstract3_Intf, DataAbstract4_Intf;
+
+const
+  UndefinedRecordID = -1;
+
+type
+  IDADelta = interface;
+  TDADelta = class;
+  TDADeltaChange = class;
+
+  TVariantArray = array of variant;
+
+  { Exceptions }
+  EDAApplyUpdateFailed = class(EROException)
+  private
+    fRecID: integer;
+    fDeltaName: string;
+
+  public
+    constructor Create(aChange: TDADeltaChange; anOriginalException: Exception);
+
+  published
+    property RecID: integer read fRecID write fRecID;
+    property DeltaName: string read fDeltaName write fDeltaName;
+  end;
+
+  IDADataTable = interface
+    ['{BC6CD610-6D6E-4CD7-B181-73B3A5F9DE4F}']
+  end;
+
+  { IDADeltaOwner }
+  IDADeltaOwner = interface
+    ['{A92ECD00-14B2-4147-AE49-9493C56763A0}']
+    function GetDelta: IDADelta; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  end;
+
+  { TDADeltaChange }
+  TDADeltaChange = class
+  private
+    fDelta: TDADelta;
+    fRecID: integer;
+    fNewValues: TVariantArray;
+    fOldValues: TVariantArray;
+    fChangeType: TDAChangeType;
+    fStatus: TDAChangeStatus;
+    fMessage: string;
+    fRefreshedByServer: boolean;
+
+    procedure SetNewValue(const aName: string; const Value: Variant);
+    procedure SetOldValue(const aName: string; const Value: Variant);
+    function GetNewValue(const aName: string): Variant;
+    function GetOldValue(const aName: string): Variant;
+    function GetDelta: IDADelta;
+  protected
+
+  public
+    constructor Create(aDelta: TDADelta;
+      aRecID: integer;
+      aChangeType: TDAChangeType;
+      aStatus: TDAChangeStatus = csPending;
+      aMessage: string = '');
+    destructor Destroy; override;
+
+    property RecID: integer read fRecID write fRecID;
+    property ChangeType: TDAChangeType read fChangeType write fChangeType;
+    property OldValues: TVariantArray read fOldValues write fOldValues;
+    property NewValues: TVariantArray read fNewValues write fNewValues;
+
+    property OldValueByName[const aName: string]: Variant read GetOldValue write SetOldValue;
+    property NewValueByName[const aName: string]: Variant read GetNewValue write SetNewValue;
+
+    property Status: TDAChangeStatus read fStatus write fStatus;
+    property Message: string read fMessage write fMessage;
+
+    property Delta : IDADelta read GetDelta;
+
+    property RefreshedByServer : boolean read fRefreshedByServer write fRefreshedByServer;
+  end;
+
+  { IDADelta }
+  IDADelta = interface
+    ['{0FD17DDB-3C34-4520-9106-4D3D540BA3D3}']
+    // Property readers/writers
+    function GetLoggedFieldCount: integer;
+    function GetInChange: boolean;
+    function GetCount: integer;
+    function GetChange(Index: integer): TDADeltaChange;
+    function GetLoggedFieldNames(Index: integer): string;
+    function GetKeyFieldCount: integer;
+    function GetKeyFieldNames(Index: integer): string;
+    function GetLoggedFieldTypes(Index : integer): TDADataType;
+    procedure SetLoggedFieldTypes(anIndex : integer; aFieldType : TDADataType);
+    function GetLogicalName : string;
+    procedure SetLogicalName(const aName : string);
+
+    // Methods
+    procedure AssignDataTable(aDataTable : TComponent);
+
+    function FindChange(aRecID: integer): TDADeltaChange;
+    procedure RemoveChange(aChange: TDADeltaChange);
+
+    procedure Clear(DoClearFieldNames: boolean = FALSE; DoClearKeyFieldNames: boolean = FALSE);
+
+    procedure AddFieldName(const aFieldName: string);
+    procedure AddKeyFieldName(const aKeyFieldName: string);
+
+    procedure ClearFieldNames;
+    procedure ClearKeyFieldNames;
+
+    procedure StartChange(aChangeType: TDAChangeType);
+    procedure CancelChange;
+    procedure EndChange;
+    procedure RestoreLastChange;
+
+    function IsNewRecord(aRecordID: integer = -1): boolean;
+
+    procedure Add(aChange: TDADeltaChange); overload;
+    function Add(aRecordID: integer; aChangeType: TDAChangeType;
+      aStatus: TDAChangeStatus = csPending; const aMessage: string = ''): TDADeltaChange; overload;
+    procedure Delete(Index: integer);
+
+    function GetCountByStatus(aChangeStatus : TDAChangeStatus) : integer;
+
+    function IndexOfLoggedField(const aName: string): integer;
+    property LoggedFieldNames[Index: integer]: string read GetLoggedFieldNames;
+    property LoggedFieldCount: integer read GetLoggedFieldCount;
+
+    property KeyFieldNames[Index: integer]: string read GetKeyFieldNames;
+    property KeyFieldCount: integer read GetKeyFieldCount;
+
+    property LoggedFieldTypes[Index : integer]: TDADataType read GetLoggedFieldTypes write SetLoggedFieldTypes;
+
+    function GetDelta: TDADelta;
+    procedure RemoveUnchangedChanges;
+
+    property LogicalName : string read GetLogicalName write SetLogicalName;
+    property Changes[Index: integer]: TDADeltaChange read GetChange; default;
+    property Count: integer read GetCount;
+  end;
+
+  { IDADataReader }
+  IDADataReader = interface
+    ['{7D2FC996-7A04-4ECE-91B0-4F17EFEC4985}']
+    function GetFieldNames(Index: integer): string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetFieldIndexes(const aName: string): integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetFieldCount: integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetRecordCount: integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function GetAsBoolean(Index: integer): boolean; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsCurrency(Index: integer): currency; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsDateTime(Index: integer): TDateTime; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsFloat(Index: integer): double; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsInteger(Index: integer): integer; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsString(Index: integer): string; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsVariant(Index: integer): variant; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function GetAsBoolean(const FieldName: string): boolean; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsCurrency(const FieldName: string): currency; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsDateTime(const FieldName: string): TDateTime; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsFloat(const FieldName: string): double; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsInteger(const FieldName: string): integer; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsString(const FieldName: string): string; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsVariant(const FieldName: string): variant; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function First: boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function Next: boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function Locate(const KeyFields: string; const KeyValues: Variant; Options: TLocateOptions): Boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    property FieldNames[Index: integer]: string read GetFieldNames;
+    property FieldIndexes[const aFieldName: string]: integer read GetFieldIndexes;
+    property FieldCount: integer read GetFieldCount;
+
+    property RecordCount: integer read GetRecordCount;
+  end;
+
+  { TDADeltaList }
+  TDADeltaList = class(TInterfaceList)
+  private
+    function GetDeltas(Index: integer): IDADelta;
+
+  protected
+  public
+    function Add(const aDelta : IDADelta) : integer; reintroduce;
+    procedure Insert(Index: Integer; const aDelta: IDADelta); reintroduce;
+
+    function DeltaByName(const aDeltaName : string) : IDADelta;
+    function FindDelta(const aDeltaName : string) : IDADelta;
+
+    property Deltas[Index : integer] : IDADelta read GetDeltas; default;
+  end;
+
+  { TDADelta }
+  TDADelta = class(TDAEngineBaseObject, IDADelta, IDADataReader)
+  private
+    fDataTable: TComponent;
+    fChanges: TStringList;
+    fLastChange,
+    fCurrentChange: TDADeltaChange;
+    fNewChange: boolean;
+    fCurrentChangeType: TDAChangeType;
+    fKeyFields,
+    fFieldNames: TStringList;
+    fCurrPosition: integer;
+    fLogicalName : string;
+
+    function GetLoggedFieldCount: integer;
+    function GetInChange: boolean;
+    function GetCount: integer;
+    function GetChange(Index: integer): TDADeltaChange;
+    function GetLoggedFieldNames(Index: integer): string;
+    function GetKeyFieldCount: integer;
+    function GetKeyFieldNames(Index: integer): string;
+    function GetLoggedFieldTypes(Index : integer): TDADataType;
+    procedure SetLoggedFieldTypes(anIndex : integer; aFieldType : TDADataType);
+    procedure DeleteChange(anIndex : integer);
+  protected
+    function GetDelta: TDADelta;
+    function GetLogicalName : string;
+    procedure SetLogicalName(const aName : string);
+
+    // IDADataReader
+    function GetFieldNames(Index: integer): string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetFieldIndexes(const aName: string): integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetFieldCount: integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsBoolean(Index: integer): boolean; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsCurrency(Index: integer): currency; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsDateTime(Index: integer): TDateTime; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsFloat(Index: integer): double; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsInteger(Index: integer): integer; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsString(Index: integer): string; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsVariant(Index: integer): variant; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsBoolean(const FieldName: string): boolean; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsCurrency(const FieldName: string): currency; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsDateTime(const FieldName: string): TDateTime; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsFloat(const FieldName: string): double; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsInteger(const FieldName: string): integer; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsString(const FieldName: string): string; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAsVariant(const FieldName: string): variant; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetRecordCount: integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function First: boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function Next: boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function Locate(const KeyFields: string; const KeyValues: Variant; Options: TLocateOptions): Boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+  public
+    constructor Create(aDataTable: TComponent); overload;
+    constructor Create(const aLogicalName : string); overload;
+    constructor Create; overload;
+    destructor Destroy; override;
+
+    function FindChange(aRecID: integer): TDADeltaChange;
+    procedure RemoveChange(aChange: TDADeltaChange);
+
+    procedure Clear(DoClearFieldNames: boolean = FALSE; DoClearKeyFieldNames: boolean = FALSE);
+
+    procedure AssignDataTable(aDataTable : TComponent);
+
+    procedure AddFieldName(const aFieldName: string);
+    procedure AddKeyFieldName(const aKeyFieldName: string);
+    procedure ClearFieldNames;
+    procedure ClearKeyFieldNames;
+    procedure RemoveUnchangedChanges;
+
+    procedure Add(aChange: TDADeltaChange); overload;
+    function Add(aRecordID: integer; aChangeType: TDAChangeType;
+      aStatus: TDAChangeStatus = csPending; const aMessage: string = ''): TDADeltaChange; overload;
+    procedure Delete(Index: integer);
+
+    procedure StartChange(aChangeType: TDAChangeType);
+    procedure CancelChange;
+    procedure EndChange;
+    procedure RestoreLastChange;
+
+    function IsNewRecord(aRecordID: integer = -1): boolean;
+
+    function IndexOfLoggedField(const aName: string): integer;
+
+    function GetCountByStatus(aChangeStatus : TDAChangeStatus) : integer;
+
+    property CurrentChange: TDADeltaChange read fCurrentChange;
+
+    property KeyFieldNames[Index: integer]: string read GetKeyFieldNames;
+    property KeyFieldCount: integer read GetKeyFieldCount;
+
+    property LoggedFieldNames[Index: integer]: string read GetLoggedFieldNames;
+    property LoggedFieldCount: integer read GetLoggedFieldCount;
+    property LoggedFieldTypes[Index : integer]: TDADataType read GetLoggedFieldTypes write SetLoggedFieldTypes;
+    property InChange: boolean read GetInChange;
+
+    property Changes[Index: integer]: TDADeltaChange read GetChange; default;
+    property Count: integer read GetCount;
+    //property DataTable: TComponent read fDataTable;
+  end;
+
+function FormatRecIDString(aRecID: integer): string;
+function NewDelta(aDeltaName: string): IDADelta; overload;
+
+function FieldValueToVariant(aSourceField : TDAField) : Variant;
+procedure VariantToFieldValue(const aSourceVariant : Variant; aField : TDAField);
+
+
+implementation
+
+uses
+  Variants, TypInfo,
+  uROClient, uROSessions, uROXMLIntf,
+  uDARes, uDARegExpr, uDADataTable;
+
+function FormatRecIDString(aRecID: integer): string;
+begin
+  result := FormatFloat('0000000000', aRecID);
+end;
+
+function NewDelta(aDeltaName: string): IDADelta;
+begin
+  result := TDADelta.Create(aDeltaName);
+end;
+
+{ TDADeltaList }
+
+function TDADeltaList.Add(const aDelta: IDADelta): integer;
+begin
+  result := inherited Add(aDelta);
+end;
+
+function TDADeltaList.DeltaByName(const aDeltaName: string): IDADelta;
+begin
+  result := FindDelta(aDeltaName);
+  if (result=NIL) then raise Exception.Create('Cannot find delta '+aDeltaName);
+end;
+
+function TDADeltaList.FindDelta(const aDeltaName: string): IDADelta;
+var i : integer;
+begin
+  result := NIL;
+  for i := 0 to (Count-1) do
+    if SameText(Deltas[i].LogicalName, aDeltaName) then begin
+      result := Deltas[i];
+      Exit;
+    end;
+end;
+
+function TDADeltaList.GetDeltas(Index: integer): IDADelta;
+begin
+  result := inherited Items[Index] as IDADelta;
+end;
+
+procedure TDADeltaList.Insert(Index: Integer; const aDelta: IDADelta);
+begin
+  inherited Insert(Index, aDelta);
+end;
+
+{ TDADelta }
+
+constructor TDADelta.Create(const aLogicalName: string);
+begin
+  inherited Create;
+
+  // This error is often generated if the user forgets to set LogicalName in the data table
+  if (aLogicalName='') then raise Exception.Create('Cannot create a delta without a name');
+
+  fLogicalName := aLogicalName;
+
+  fKeyFields := TStringList.Create;
+  fFieldNames := TStringList.Create;
+
+  fChanges := TStringList.Create;
+  fChanges.Duplicates := dupError;
+//  fChanges.Sorted := TRUE;
+end;
+
+constructor TDADelta.Create;
+begin
+  Create(NewGuidAsString);
+end;
+
+constructor TDADelta.Create(aDataTable: TComponent);
+var i: integer;
+    dnme : string;
+    dt: TDADataTable;
+begin
+  { AleF: Changed the logic of how delta creation works. The name of the delta is required and, if using
+          this overloaded version of create, it will be taken from the datatable.LogicalName.
+          This was made to optimize the adapters which, right noiw, require a list of delta names and
+          one of deltas. Because of this change, adapters can find the name from the delta itself.
+  }
+  if (aDataTable=NIL) then raise Exception.Create('Datatable must be assigned');
+  dt:=aDataTable as TDADataTable;
+  if (dt.LogicalName<>'') then
+    dnme := dt.LogicalName
+  else
+    dnme := dt.Name;
+
+  Create(dnme); // Calls the constructor above;
+  fDataTable := aDataTable;
+
+  for i := 0 to (dt.Fields.Count - 1) do
+    with dt.Fields[i] do begin
+      if LogChanges or InPrimaryKey then fFieldNames.Add(Name);
+      if InPrimaryKey then fKeyFields.Add(Name);
+    end;
+
+  for i := 0 to (fFieldNames.Count-1) do
+    fFieldNames.Objects[i] := TObject(ord(dt.FieldByName(fFieldNames[i]).DataType));
+end;
+
+destructor TDADelta.Destroy;
+begin
+  // Removes the current change (if new and not yet in the changes list)
+  if (fCurrentChange<>NIL) then begin
+    if (FindChange(fCurrentChange.RecID)=NIL)
+      then FreeAndNIL(fCurrentChange);
+  end;
+
+  if (fChanges<>NIL) then begin
+    Clear;
+    fChanges.Free;
+  end;
+
+  fFieldNames.Free;
+  fKeyFields.Free;
+
+  inherited;
+end;
+
+function TDADelta.GetLoggedFieldCount: integer;
+begin
+  result := fFieldNames.Count;
+end;
+
+function FieldValueToVariant(aSourceField : TDAField) : Variant;
+var stream : IROStream;
+    p : pointer;
+    sze : cardinal;
+begin
+  case aSourceField.DataType of
+    datBlob : begin
+      if aSourceField.IsNull {or (aSourceField.BlobSize = 0)} then result := Unassigned
+      else begin
+        stream := NewROStream;
+        aSourceField.SaveToStream(stream);
+        sze := stream.Size;
+        if stream.Size = 0 then
+          result := Unassigned
+        else begin
+          stream.Position := 0;
+          result := VarArrayCreate([0, sze-1], varByte);
+          p := VarArrayLock(result);
+          try
+          stream.Read(p^, sze);
+          finally
+            VarArrayUnlock(result);
+          end;
+          stream.Position := 0;
+        end;
+      end;
+    end;
+    {$IFDEF DELPHI10UP}
+    datWideMemo: Result:= aSourceField.AsWideString;
+    {$ENDIF DELPHI10UP}
+    else result := aSourceField.Value;
+  end;
+end;
+
+procedure VariantToFieldValue(const aSourceVariant : Variant; aField : TDAField);
+var stream : IROStream;
+    p : pointer;
+    readcount, sze : cardinal;
+begin
+  case aField.DataType of
+    datBlob:
+      if VarIsEmpty(aSourceVariant) then begin
+        aField.Value := Unassigned;
+      end
+      else begin
+        if VarType(aSourceVariant) = varString then begin
+          aField.AsAnsiString:= VarToAnsiStr(aSourceVariant);
+        end
+        else begin
+          stream := NewROStream;
+
+          sze := VarArrayHighBound(aSourceVariant, 1) - VarArrayLowBound(aSourceVariant, 1) + 1;
+          p := VarArrayLock(aSourceVariant);
+          try
+          readcount := stream.Write(p^, sze);
+          finally
+            VarArrayUnlock(aSourceVariant);
+          end;
+
+          if (readcount<>sze)
+            then raise Exception.CreateFmt('Couldn''t read all data. Expected %d read %d', [sze, readcount]);
+
+          stream.Position := 0;
+          aField.LoadFromStream(stream);
+        end;
+      end;
+    {$IFDEF DELPHI10UP}
+    datWideMemo: aField.AsWideString:=aSourceVariant;
+    {$ENDIF DELPHI10UP}
+    else aField.Value := aSourceVariant;
+  end;
+end;
+
+procedure TDADelta.StartChange(aChangeType: TDAChangeType);
+var
+  recid: integer;
+  x, i: integer;
+begin
+  if InChange then RaiseError(err_ChangeLogAlreadyStarted);
+
+  if not Assigned(fDataTable) then RaiseError(err_NotAttachedToDataTable);
+
+  fCurrentChangeType := aChangeType;
+
+  // Checks to see if this is the first time this record was changed
+  if (aChangeType <> ctInsert) then begin
+    recid := (fDataTable as TDADataTable).RecIDField.AsInteger; // CurrRecId;
+    fCurrentChange := FindChange(recid);
+    fNewChange := (fCurrentChange = nil);
+  end
+  else begin
+    recid := UndefinedRecordID;
+    fNewChange := TRUE;
+  end;
+
+  if fNewChange then begin
+    fCurrentChange := TDADeltaChange.Create(Self, recid, aChangeType);
+
+    // For deletes and edit, we want to store the original values.
+    // This happens only once.
+    case aChangeType of
+      ctDelete, ctUpdate: begin
+          with (fDataTable as TDADataTable).Fields do begin
+            x := 0;
+            for i := 0 to ((fDataTable as TDADataTable).FieldCount - 1) do begin
+              if Fields[i].LogChanges or Fields[i].InPrimaryKey then begin
+                fCurrentChange.OldValues[x] := FieldValueToVariant(Fields[i]);
+                Inc(x);
+              end;
+            end;
+          end;
+        end
+    end;
+  end;
+end;
+
+procedure TDADelta.CancelChange;
+begin
+  //if not Assigned(fDataTable) then RaiseError(err_NotAttachedToDataTable);
+
+  if fNewChange
+    then FreeAndNIL(fCurrentChange); // if it is not a new change (i.e. cancelling an edit) should not free!
+  fCurrentChange := nil; // nil it in either case!
+end;
+
+procedure TDADelta.EndChange;
+var
+  x, i: integer;
+  lWasChanged: Boolean;
+  lLoggedFieldName: string;
+  lNewValue, lOldValue: Variant;
+  lDataTable: TDAdataTable;
+begin
+  if not Assigned(fDataTable) then RaiseError(err_NotAttachedToDataTable);
+
+  lDataTable := (fDataTable as TDADataTable);
+
+  try
+    if (fCurrentChange.RecID = UndefinedRecordID)
+      then fCurrentChange.RecID := lDataTable.RecIDField.AsInteger // Happens on inserts and first time changes (except deletes)
+
+    else if (fCurrentChange.RecID <> lDataTable.RecIDField.AsInteger)
+      then raise Exception.Create('Record pointer changed!');
+
+    // Doing a new operation on the same record
+    if (fCurrentChange.ChangeType <> fCurrentChangeType) then begin
+      case fCurrentChangeType of
+        ctDelete: begin
+            if (fCurrentChange.ChangeType = ctInsert) then begin // No need to track new records that have been deleted
+              RemoveChange(fCurrentChange);
+              Exit; // Done!
+            end
+            else begin
+              fCurrentChange.ChangeType := fCurrentChangeType; // Deletes have precedence over anything else
+              for i := 0 to (LoggedFieldCount - 1) do
+                fCurrentChange.NewValues[i] := UnAssigned;
+            end;
+          end;
+      end;
+    end;
+
+    case fCurrentChange.ChangeType of
+      ctUpdate, ctInsert: begin
+          with lDataTable.Fields do begin
+            lWasChanged := False;
+            x := 0;
+            for i := 0 to (lDataTable.FieldCount - 1) do begin
+              if Fields[i].LogChanges or Fields[i].InPrimaryKey then begin
+                fCurrentChange.NewValues[x] := FieldValueToVariant(Fields[i]);
+
+                lOldValue := fCurrentChange.OldValues[x];
+                lNewValue := fCurrentChange.NewValues[x];
+                if fCurrentChange.ChangeType = ctUpdate then begin
+                  lWasChanged := lWasChanged or not ROVariantsEqual(lOldValue, lNewValue);
+                end else begin
+                  lLoggedFieldName := fCurrentChange.Delta.LoggedFieldNames[x];
+                  if FieldByName(lLoggedFieldName).InPrimaryKey {and VarIsEmpty(lOldValue)} then begin
+                    fCurrentChange.OldValues[x] := lNewValue;
+                  end;
+                end;
+                Inc(x);
+              end;
+            end;
+            if (fCurrentChange.ChangeType = ctUpdate) and (not lWasChanged) then begin //The change doesn't affect any fields with LogChanges
+              CancelChange;
+              Exit; // Done!
+            end;
+          end;
+        end;
+    end;
+
+    if fNewChange then fChanges.AddObject(FormatRecIDString(fCurrentChange.RecID), fCurrentChange);
+
+  finally
+    // ALEF: added to keep a log of the last change in case a post fails. It will be restored in such case
+    //       via the InternalOnPostError through a call to RestoreLastChange
+    fLastChange := fCurrentChange;
+
+    fCurrentChange := nil;
+  end;
+end;
+
+function TDADelta.GetInChange: boolean;
+begin
+  result := fCurrentChange <> nil
+end;
+
+function TDADelta.FindChange(aRecID: integer): TDADeltaChange;
+var
+  idx: integer;
+begin
+  result := nil;
+  idx := fChanges.IndexOf(FormatRecIDString(aRecID));
+  if (idx >= 0) then result := TDADeltaChange(fChanges.Objects[idx]);
+end;
+
+function TDADelta.GetCount: integer;
+begin
+  result := fChanges.Count;
+end;
+
+procedure TDADelta.Clear(DoClearFieldNames: boolean = FALSE; DoClearKeyFieldNames: boolean = FALSE);
+var
+  i: integer;
+begin
+  for i := 0 to (fChanges.Count - 1) do
+    if (fChanges.Objects[i]<>NIL)
+      then fChanges.Objects[i].Free;
+
+  fChanges.Clear;
+  fLastChange := nil;
+
+  if DoClearFieldNames then ClearFieldNames;
+  if DoClearKeyFieldNames then ClearKeyFieldNames;
+
+  fCurrPosition := 0;
+end;
+
+function TDADelta.GetChange(Index: integer): TDADeltaChange;
+begin
+  result := TDADeltaChange(fChanges.Objects[Index]);
+end;
+
+procedure TDADelta.RemoveChange(aChange: TDADeltaChange);
+var
+  idx: integer;
+begin
+  idx := fChanges.IndexOfObject(aChange);
+  if (idx >= 0) then DeleteChange(idx);
+end;
+
+function TDADelta.GetLoggedFieldNames(Index: integer): string;
+begin
+  result := fFieldNames[Index]
+end;
+
+procedure TDADelta.AddFieldName(const aFieldName: string);
+begin
+  fFieldNames.Add(aFieldName);
+end;
+
+procedure TDADelta.ClearFieldNames;
+begin
+  fFieldNames.Clear;
+end;
+
+procedure TDADelta.Add(aChange: TDADeltaChange);
+begin
+  fChanges.AddObject(FormatRecIDString(aChange.RecId), aChange);
+end;
+
+procedure TDADelta.Delete(Index: integer);
+begin
+  fChanges.Objects[Index].Free;
+  fChanges.Delete(Index);
+end;
+
+function TDADelta.IndexOfLoggedField(const aName: string): integer;
+begin
+  result := fFieldNames.IndexOf(aName)
+end;
+
+function TDADelta.GetDelta: TDADelta;
+begin
+  result := Self;
+end;
+
+function TDADelta.IsNewRecord(aRecordID: integer = -1): boolean;
+var
+  recid, i: integer;
+begin
+  result := FALSE;
+  recid := aRecordID;
+
+  if (aRecordID = -1) then begin
+    if ((fDataTable as TDADataTable).RecordCount > 0) then
+      recid := (fDataTable as TDADataTable).GetRowRecIDValue
+    else
+      Exit;
+  end;
+
+  for i := 0 to Count - 1 do
+    if (Changes[i].RecID = recid) then begin
+      result := Changes[i].ChangeType = ctInsert;
+      Exit;
+    end;
+end;
+
+function TDADelta.GetKeyFieldCount: integer;
+begin
+  result := fKeyFields.Count
+end;
+
+function TDADelta.GetKeyFieldNames(Index: integer): string;
+begin
+  result := fKeyFields[Index]
+end;
+
+procedure TDADelta.ClearKeyFieldNames;
+begin
+  fKeyFields.Clear;
+end;
+
+procedure TDADelta.AddKeyFieldName(const aKeyFieldName: string);
+begin
+  fKeyFields.Add(aKeyFieldName)
+end;
+
+function TDADelta.Add(aRecordID: integer; aChangeType: TDAChangeType;
+  aStatus: TDAChangeStatus; const aMessage: string): TDADeltaChange;
+begin
+  result := TDADeltaChange.Create(Self, aRecordID, aChangeType, aStatus, aMessage);
+  Add(result);
+end;
+
+function TDADelta.GetFieldCount: integer;
+begin
+  result := fFieldNames.Count;
+end;
+
+function TDADelta.GetFieldIndexes(const aName: string): integer;
+begin
+  result := fFieldNames.IndexOf(aName);
+end;
+
+function TDADelta.GetFieldNames(Index: integer): string;
+begin
+  result := fFieldNames[Index];
+end;
+
+function TDADelta.GetAsBoolean(const FieldName: string): boolean;
+begin
+  result := GetVarBoolean(Changes[fCurrPosition].NewValueByName[FieldName]);
+end;
+
+function TDADelta.GetAsBoolean(Index: integer): boolean;
+begin
+  result := GetVarBoolean(Changes[fCurrPosition].NewValues[Index]);
+end;
+
+function TDADelta.GetAsCurrency(Index: integer): currency;
+begin
+  result := GetVarCurrency(Changes[fCurrPosition].NewValues[Index]);
+end;
+
+function TDADelta.GetAsCurrency(const FieldName: string): currency;
+begin
+  result := GetVarCurrency(Changes[fCurrPosition].NewValueByName[FieldName]);
+end;
+
+function TDADelta.GetAsDateTime(Index: integer): TDateTime;
+begin
+  result := GetVarDateTime(Changes[fCurrPosition].NewValues[Index]);
+end;
+
+function TDADelta.GetAsDateTime(const FieldName: string): TDateTime;
+begin
+  result := GetVarDateTime(Changes[fCurrPosition].NewValueByName[FieldName]);
+end;
+
+function TDADelta.GetAsFloat(Index: integer): double;
+begin
+  result := GetVarFloat(Changes[fCurrPosition].NewValues[Index]);
+end;
+
+function TDADelta.GetAsFloat(const FieldName: string): double;
+begin
+  result := GetVarFloat(Changes[fCurrPosition].NewValueByName[FieldName]);
+end;
+
+function TDADelta.GetAsInteger(Index: integer): integer;
+begin
+  result := GetVarInteger(Changes[fCurrPosition].NewValues[Index]);
+end;
+
+function TDADelta.GetAsInteger(const FieldName: string): integer;
+begin
+  result := GetVarInteger(Changes[fCurrPosition].NewValueByName[FieldName]);
+end;
+
+function TDADelta.GetAsString(const FieldName: string): string;
+begin
+  result := GetVarString(Changes[fCurrPosition].NewValueByName[FieldName]);
+end;
+
+function TDADelta.GetAsString(Index: integer): string;
+begin
+  result := GetVarString(Changes[fCurrPosition].NewValues[Index]);
+end;
+
+function TDADelta.GetAsVariant(Index: integer): variant;
+begin
+  result := Changes[fCurrPosition].NewValues[Index];
+end;
+
+function TDADelta.GetAsVariant(const FieldName: string): variant;
+begin
+  result := Changes[fCurrPosition].NewValueByName[FieldName];
+end;
+
+function TDADelta.First: boolean;
+begin
+  result := (fChanges.Count > 0);
+  if result then fCurrPosition := 0;
+end;
+
+function TDADelta.GetRecordCount: integer;
+begin
+  result := fChanges.Count;
+end;
+
+function TDADelta.Next: boolean;
+begin
+  result := (fCurrPosition < fChanges.Count - 1);
+
+  if result then Inc(fCurrPosition);
+end;
+
+function TDADelta.Locate(const KeyFields: string; const KeyValues: Variant;
+  Options: TLocateOptions): Boolean;
+begin
+  result := FALSE; // Deltas don't support searches for now
+end;
+
+function TDADelta.GetLoggedFieldTypes(Index: integer): TDADataType;
+begin
+  result := TDADataType(Cardinal(fFieldNames.Objects[Index]));
+end;
+
+procedure TDADelta.SetLoggedFieldTypes(anIndex: integer;
+  aFieldType: TDADataType);
+begin
+  fFieldNames.Objects[anIndex] := TObject(ord(aFieldType));
+end;
+
+procedure TDADelta.RestoreLastChange;
+var
+  i: integer;
+begin
+  if (fLastChange = nil) and (fChanges.Count=1) and
+     (fDataTable <>nil) and (fDataTable is TDADataTable) and
+     (ruoOnPost in TDADataTable(fDataTable).RemoteUpdatesOptions) and
+     (TDADataTable(fDataTable).State in [dsEdit,dsInsert]) then
+       fLastChange := Changes[0];
+  fCurrentChange := fLastChange;
+  if fNewChange and (fCurrentChange <> nil) then begin
+    i:=fChanges.IndexOf(FormatRecIDString(fCurrentChange.RecID));
+    if i <> -1 then fChanges.Delete(i);
+    fCurrentChange.RecID := UndefinedRecordID;
+// basically nulls this --> fChanges.AddObject(FormatRecIDString(fCurrentChange.RecID), fCurrentChange);
+  end;
+end;
+
+function TDADelta.GetCountByStatus(
+  aChangeStatus: TDAChangeStatus): integer;
+var i : integer;
+begin
+  result := 0;
+  for i := 0 to fChanges.Count-1 do begin
+    if (Changes[i].Status=aChangeStatus) then Inc(result);
+  end;
+end;
+
+function TDADelta.GetLogicalName: string;
+begin
+  result := fLogicalName;
+end;
+
+procedure TDADelta.SetLogicalName(const aName: string);
+begin
+  fLogicalName := aName;
+end;
+
+procedure TDADelta.AssignDataTable(aDataTable: TComponent);
+begin
+  fDataTable := aDataTable as TDADataTable;
+end;
+
+procedure TDADelta.RemoveUnchangedChanges;
+
+  function isUnchangedChange(aChange: TDADeltaChange): boolean;
+  var
+    i: integer;
+  begin
+    Result:= (aChange.Status = csPending) and (aChange.fChangeType = ctUpdate);
+    if result then
+      For i := 0 to LoggedFieldCount-1 do begin
+        if not ROVariantsEqual(aChange.OldValues[i],aChange.NewValues[i]) then begin
+          Result:=False;
+          Break;
+        end;
+      end;
+  end;
+
+var
+  i: integer;
+begin
+  For i:= Count-1 downto 0 do
+    if isUnchangedChange(Changes[i]) then begin
+      if fCurrentChange = Changes[i] then fCurrentChange := nil; 
+      DeleteChange(i);
+    end;
+end;
+
+procedure TDADelta.DeleteChange(anIndex: integer);
+begin
+  fChanges.Objects[anIndex].Free;
+  fChanges.Delete(anIndex);
+end;
+
+{ TDADeltaChange }
+
+constructor TDADeltaChange.Create(aDelta: TDADelta;
+  aRecID: integer;
+  aChangeType: TDAChangeType;
+  aStatus: TDAChangeStatus = csPending;
+  aMessage: string = '');
+begin
+  inherited Create;
+
+  fRefreshedByServer := FALSE;
+  fStatus := aStatus;
+  fDelta := aDelta;
+  fRecID := aRecID;
+  fChangeType := aChangeType;
+  fMessage := aMessage;
+
+  SetLength(fOldValues, aDelta.LoggedFieldCount);
+  SetLength(fNewValues, aDelta.LoggedFieldCount);
+end;
+
+destructor TDADeltaChange.Destroy;
+begin
+  inherited;
+end;
+
+function TDADeltaChange.GetDelta: IDADelta;
+begin
+  result := fDelta as IDADelta;
+end;
+
+function TDADeltaChange.GetNewValue(const aName: string): Variant;
+var
+  idx: integer;
+begin
+  idx := fDelta.IndexOfLoggedField(aName);
+  if (idx < 0) then RaiseError(err_CannotFindField, [aName]);
+  result := fNewValues[idx];
+end;
+
+function TDADeltaChange.GetOldValue(const aName: string): Variant;
+var
+  idx: integer;
+begin
+  idx := fDelta.IndexOfLoggedField(aName);
+  if (idx < 0) then RaiseError(err_CannotFindField, [aName]);
+  result := fOldValues[idx];
+end;
+
+procedure TDADeltaChange.SetNewValue(const aName: string; const Value: Variant);
+var
+  idx: integer;
+begin
+  idx := fDelta.IndexOfLoggedField(aName);
+  if (idx < 0) then RaiseError(err_CannotFindField, [aName]);
+  if idx >= Length(fNewValues) then
+    SetLength(fNewValues, idx + 1);
+  fNewValues[idx] := Value;
+end;
+
+procedure TDADeltaChange.SetOldValue(const aName: string; const Value: Variant);
+var
+  idx: integer;
+begin
+  idx := fDelta.IndexOfLoggedField(aName);
+  if (idx < 0) then RaiseError(err_CannotFindField, [aName]);
+  if idx >= Length(fOldValues) then
+    SetLength(fOldValues, idx + 1);
+  fOldValues[idx] := Value;
+end;
+
+{ EDAApplyUpdateFailed }
+
+constructor EDAApplyUpdateFailed.Create(aChange: TDADeltaChange; anOriginalException: Exception);
+begin
+  if (anOriginalException<>NIL) then begin
+    inherited Create(anOriginalException.Message);
+  end
+  else inherited Create('');
+
+  fRecID := aChange.RecID;
+  fDeltaName := aChange.Delta.LogicalName;
+end;
+
+initialization
+  RegisterExceptionClass(EDAApplyUpdateFailed);
+finalization
+  UnregisterExceptionClass(EDAApplyUpdateFailed);
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDADesigntimeCall.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDADesigntimeCall.pas
new file mode 100644
index 0000000..60b723f
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDADesigntimeCall.pas	
@@ -0,0 +1,40 @@
+unit uDADesigntimeCall;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  Classes,
+  uDADataTable, uRODynamicRequest;
+
+type
+  TDADesigntimeCall = class(TRODynamicRequest)
+  private
+  public
+    procedure MakeRequest;
+  published
+  end;
+
+implementation
+
+{ TDADesigntimeCall }
+
+procedure TDADesigntimeCall.MakeRequest;
+begin
+  Execute();
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDADriverInfo.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDADriverInfo.pas
new file mode 100644
index 0000000..8a1f586
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDADriverInfo.pas	
@@ -0,0 +1,59 @@
+unit uDADriverInfo;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  uDADriverManager;
+
+procedure ShowDriverInfo(aDriverManager: TDADriverManager);
+
+implementation
+
+uses
+  SysUtils,
+{$IFDEF LINUX}
+  FPgtkExt,
+{$ENDIF}
+  Dialogs; 
+  
+procedure ShowDriverInfo(aDriverManager: TDADriverManager);
+var
+  s: string;
+  i: integer;
+begin
+  if (aDriverManager.DriverCount = 0) then
+    MessageDlg('No drivers are currently loaded', mtWarning, [mbOK], 0)
+  else begin
+    s := 'The following ' + IntToStr(aDriverManager.DriverCount) + ' drivers are currently loaded:'#13;
+    for i := 0 to (aDriverManager.DriverCount - 1) do begin
+      with aDriverManager.DriverInfo[i] do begin
+        if (Handle = 0) then
+          s := s + #13 + Format('%s - %s %d.%d (Statically Linked)',
+            [Driver.DriverID, Driver.Description, Driver.MajVersion, Driver.MinVersion])
+
+        else
+          s := s + #13 + Format('%s - %s %d.%d (%s)',
+            [Driver.DriverID, Driver.Description, Driver.MajVersion, Driver.MinVersion, FileName]);
+      end;
+    end;
+
+    MessageDlg(s, mtInformation, [mbOK], 0);
+  end;
+end;
+
+end.
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDADriverManager.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDADriverManager.pas
new file mode 100644
index 0000000..c6b5ded
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDADriverManager.pas	
@@ -0,0 +1,495 @@
+unit uDADriverManager;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses Classes, uDAInterfaces, uROClasses;
+
+type
+  { TDriverInfo }
+  PDADriverInfo = ^TDADriverInfo;
+  TDADriverInfo = record
+    FileName: string;
+    Handle: cardinal;
+    Driver: IDADriver;
+    GetDriverObjectFunc: TDAGetDriverObject;
+  end;
+
+  TDADriverNameType = (dntFileName, dntDriverID);
+
+  { TDADriverManager }
+  TDADriverLoadNotification = procedure(DriverInfo: TDADriverInfo) of object;
+
+  TDADriverManager = class(TComponent, IDADriverManager)
+  private
+    fDriverDirectory: string;
+    fDrivers: TList;
+    fLoadingAutoLoad,
+      fAutoLoad: boolean;
+    fOnDriverUnloaded: TDADriverLoadNotification;
+    fOnDriverLoaded: TDADriverLoadNotification;
+    fStreamedTraceActive,
+      fTraceActive: boolean;
+    fTraceFlags: TDATraceOptions;
+    fOnTraceEvent: TDALogTraceEvent;
+
+    procedure SetDriverDirectory(const Value: string);
+
+    function GetDrivers(Index: integer): IDADriver;
+    function GetDriverCount: integer;
+    function GetDriverInfo(Index: integer): TDADriverInfo;
+    procedure SetAutoLoad(const Value: boolean);
+
+  protected
+    procedure Loaded; override;
+    procedure LoadStaticDrivers; virtual;
+    procedure UnloadDriver(anIndex: integer; aForceUnloadForStaticDriver: boolean); overload;
+    procedure UnloadAllDrivers(aForceUnloadForStaticDriver: boolean); overload;
+
+    //procedure HandleDriverError(anErrorCode : integer; const anErrorMessage : string); dynamic;
+
+    procedure SetTraceActive(const Value: boolean);
+    procedure SetTraceFlags(const Value: TDATraceOptions);
+
+  public
+    constructor Create(aOwner: TComponent); override;
+    destructor Destroy; override;
+
+    // IDADriverManager
+    procedure LoadDriver(const aFileName: string);
+    procedure UnloadDriver(anIndex: integer); overload;
+
+    procedure LoadDrivers;overload;
+    procedure LoadDrivers(const aDriverList: IROStrings; aIgnoreDuplicates: boolean = false; aIgnoreErrors: boolean = false);overload;
+    procedure UnloadAllDrivers; overload;
+
+    function ListDrivers(const aDirectory: string; out FileNames: IROStrings): integer;
+
+    function FindDriver(const aDriverID: string; out Driver: IDADriver): boolean;
+    function FindDriverIndex(const aDriverID: string): integer;
+
+    function DriverByDriverID(const aDriverID: string): IDADriver;
+
+    property Drivers[Index: integer]: IDADriver read GetDrivers; default;
+    property DriverInfo[Index: integer]: TDADriverInfo read GetDriverInfo;
+    property DriverCount: integer read GetDriverCount;
+
+  published
+    property DriverDirectory: string read fDriverDirectory write SetDriverDirectory;
+    property AutoLoad: boolean read fAutoLoad write SetAutoLoad default false;
+    property OnDriverLoaded: TDADriverLoadNotification read fOnDriverLoaded write fOnDriverLoaded;
+    property OnDriverUnloaded: TDADriverLoadNotification read fOnDriverUnloaded write fOnDriverUnloaded;
+
+    property TraceActive: boolean read fTraceActive write SetTraceActive;
+    property TraceFlags: TDATraceOptions read fTraceFlags write SetTraceFlags;
+    property OnTraceEvent: TDALogTraceEvent read fOnTraceEvent write fOnTraceEvent;
+  end;
+
+function DriverManager: TDADriverManager;
+
+procedure RegisterDriverProc(aDriverProc: TDAGetDriverObject);
+procedure UnregisterDriverProc(aDriverProc: TDAGetDriverObject);
+
+implementation
+
+uses
+  {$IFDEF MSWINDOWS}Windows, {$ENDIF}SysUtils,
+  {$IFDEF FPC}dynlibs,{$ENDIF}
+  uDAUtils, uDARes;
+
+var
+  _DriverManager: TDADriverManager;
+  _DriverProcs: TList;
+
+function DriverManager: TDADriverManager;
+begin
+  if (_DriverManager = nil) then RaiseError(err_DriverManagerNotAssigned);
+
+  result := _DriverManager;
+end;
+
+procedure RegisterDriverProc(aDriverProc: TDAGetDriverObject);
+var
+  p: pointer;
+begin
+  p := @aDriverProc;
+  if (_DriverProcs.IndexOf(p) >= 0) then RaiseError(err_DriverProcAlreadyRegistered, [{$IFDEF cpu64}UINT64{$ELSE}integer{$ENDIF}(p)]);
+
+  _DriverProcs.Add(p);
+end;
+
+procedure UnregisterDriverProc(aDriverProc: TDAGetDriverObject);
+var
+  idx: integer;
+begin
+  idx := _DriverProcs.IndexOf(@aDriverProc);
+  if (idx >= 0) then _DriverProcs.Delete(idx);
+end;
+
+{ TDADriverManager }
+
+constructor TDADriverManager.Create(aOwner: TComponent);
+begin
+  inherited;
+
+  // Cannot create multiple Driver Managers
+  if not (csDesigning in ComponentState) then begin
+    Check(_DriverManager <> nil, err_DriverManagerAlreadyCreated);
+    _DriverManager := Self;
+  end;
+
+  fAutoLoad := FALSE;
+  fDriverDirectory := alias_System;
+  fDrivers := TList.Create;
+
+  if not (csDesigning in ComponentState) then begin
+    LoadStaticDrivers;
+  end;
+end;
+
+destructor TDADriverManager.Destroy;
+begin
+  if (_DriverManager = Self) then _DriverManager := nil;
+
+  if (fDrivers <> nil) then begin // In case of the multplie driver exception
+    UnloadAllDrivers(true);
+    fDrivers.Free;
+  end;
+
+  inherited;
+end;
+
+function TDADriverManager.ListDrivers(const aDirectory: string; out FileNames: IROStrings): integer;
+var
+  actualdir: string;
+  dir: TSearchRec;
+begin
+  result := 0;
+  FileNames := TROStrings.Create;
+
+  if (aDirectory = '') then
+    actualdir := DriverDirectory
+  else
+    actualdir := IncludeTrailingPathDelimiter(aDirectory);
+
+  actualdir := TranslateFileName(actualdir);
+
+  // If no path is specified looks in the Windows\System32 directory
+  {if (Length(actualdir)<=1)
+    then actualdir := IncludeTrailingPathDelimiter(GetSystemDir);}
+
+  if (FindFirst(actualdir + drv_AllDrivers, faAnyFile, dir) = 0) then begin
+    repeat
+      if (dir.Attr and faDirectory) <> faDirectory then begin
+        Inc(result);
+        FileNames.Add(ExpandFileName(actualdir + dir.Name));
+      end;
+    until (FindNext(dir) <> 0);
+    SysUtils.FindClose(dir);
+  end;
+end;
+
+function TDADriverManager.FindDriver(const aDriverID: string; out Driver: IDADriver): boolean;
+var
+  i: integer;
+begin
+  result := FALSE;
+  Driver := nil;
+
+  for i := 0 to (DriverCount - 1) do
+    if SameText(Drivers[i].DriverID, aDriverID) then begin
+      Driver := Drivers[i];
+      result := TRUE;
+      Exit;
+    end;
+end;
+
+function TDADriverManager.FindDriverIndex(const aDriverID:string):integer;
+var
+  i: integer;
+begin
+  result := -1;
+  for i := 0 to (DriverCount - 1) do
+    if SameText(Drivers[i].DriverID, aDriverID) then begin
+      result := i;
+      Exit;
+    end;
+end;
+
+procedure TDADriverManager.LoadStaticDrivers;
+var
+  i: integer;
+  driver: PDADriverInfo;
+  drv: IDADriver;
+begin
+  driver := nil;
+
+  for i := 0 to (_DriverProcs.Count - 1) do try
+    New(driver);
+
+    driver^.GetDriverObjectFunc := _DriverProcs[i];
+    driver^.FileName := '';
+    driver^.Handle := 0;
+    driver^.Driver := driver^.GetDriverObjectFunc;
+
+    Check(FindDriver(driver^.Driver.DriverID, drv), err_DriverAlreadyLoaded, [driver^.Driver.DriverID]); // Checks this driver's not already loaded
+
+    driver^.Driver.Initialize; //(HandleDriverError); // Calls the initialization routine for the DLL
+
+    fDrivers.Add(driver);
+
+    if Assigned(OnDriverLoaded) then OnDriverLoaded(driver^);
+
+    driver := nil;
+  except
+    if (driver <> nil) then begin
+      if (fDrivers.IndexOf(driver) > 0) then fDrivers.Delete(fDrivers.IndexOf(driver));
+
+      Dispose(driver);
+    end;
+
+    raise;
+  end;
+end;
+
+{$IFDEF DataAbstract_SchemaModeler}
+{$INCLUDE DataAbstract_SchemaModelerOnly.inc}
+{$ENDIF DataAbstract_SchemaModeler}
+
+const function_AuthorizeSchemaModeler = 'AuthorizeSchemaModeler';
+
+procedure TDADriverManager.LoadDriver(const aFileName: string);
+var
+  lHandle: cardinal;
+  driver: PDADriverInfo;
+  ptr: pointer;
+  drv: IDADriver;
+  fname: string;
+  alreadyloaded: boolean;
+begin
+  fname := aFileName;
+
+  if not IsMemoryManagerSet then
+    raise Exception.Create(err_NeedShareMem);
+
+  New(driver);
+  try
+    driver^.FileName := aFileName;
+    pointer(driver^.Driver) := nil;
+    driver^.Handle := 0;
+    driver^.Handle := LoadLibrary(PChar(fname));
+
+    Check(driver^.Handle = 0, err_LoadPackageFailed, [fname]); // Checks LoadLibrary's ok
+
+    {$IFDEF DataAbstract_SchemaModeler}
+    ptr := GetProcAddress(driver^.Handle, function_AuthorizeSchemaModeler);
+    if Assigned(ptr) then begin
+      TAuthorizeSchemaModeler(ptr)(AuthorizeSchemaModelerKey);
+    end;
+    {$ENDIF DataAbstract_SchemaModeler}
+
+    ptr := GetProcAddress(driver^.Handle, func_GetDriverObject);
+    Check(ptr = nil, err_InvalidDLL, [fname]); // Checks the DLL exports the required function
+
+    @driver^.GetDriverObjectFunc := ptr;
+    drv := driver.GetDriverObjectFunc();
+    driver^.Driver := drv;
+    drv := nil;
+    { We need a local variable, because else the driver pointer will remain on the
+      stack with a refcount, and Release'd on the "end;".not good, if the .dad is
+      unloaded by then. }
+
+    if not Assigned(driver^.Driver) then begin
+      if GetProcAddress(driver^.Handle, function_AuthorizeSchemaModeler) <> nil then begin
+        RaiseError('Driver %s may only be used inside the Schema Modeler',[fname],EDASchemaModelerOnly);
+      end
+      else begin
+        RaiseError(err_InvalidDriverReference, [fname]);
+      end;
+    end;
+
+    Check(driver^.Driver = nil, err_InvalidDriverReference, [fname]); // Checks the reference to the driver is ok
+
+    alreadyloaded := FindDriver(driver^.Driver.DriverID, drv);
+    Check(alreadyloaded, err_DriverAlreadyLoaded, [driver^.Driver.DriverID], EDADriverAlreadyLoaded); // Checks this driver's not already loaded
+    drv := nil;
+
+    driver^.Driver.Initialize; //(HandleDriverError); // Calls the initialization routine for the DLL
+
+    fDrivers.Add(driver);
+
+    if Assigned(fOnDriverLoaded) then fOnDriverLoaded(driver^);
+  except
+    lHandle := driver^.Handle;
+    driver^.Driver := nil;
+    Dispose(driver);
+    if (lHandle <> 0) then FreeLibrary(lHandle);
+    raise;
+  end;
+end;
+
+procedure TDADriverManager.UnloadDriver(anIndex: integer; aForceUnloadForStaticDriver: boolean);
+var
+  driver: PDADriverInfo;
+begin
+
+  driver := fDrivers[anIndex];
+  if (driver^.Handle = 0) and not aForceUnloadForStaticDriver then Exit;
+
+  try
+    fDrivers.Delete(anIndex);
+
+    driver^.Driver.Finalize; // Calls the finalization routine for the DLL
+    driver^.Driver := nil;
+
+    if (driver^.Handle <> 0) then FreeLibrary(driver^.Handle);
+
+    if Assigned(OnDriverUnloaded) then OnDriverUnloaded(driver^);
+  finally
+    Dispose(driver);
+  end;
+end;
+
+procedure TDADriverManager.UnloadDriver(anIndex: integer);
+begin
+  UnloadDriver(anIndex, false);
+end;
+
+function TDADriverManager.GetDriverCount: integer;
+begin
+  result := fDrivers.Count
+end;
+
+function TDADriverManager.GetDrivers(Index: integer): IDADriver;
+begin
+  result := PDADriverInfo(fDrivers[Index])^.Driver
+end;
+
+procedure TDADriverManager.LoadDrivers;
+var
+  DriverList:IROStrings;
+begin
+   ListDrivers(DriverDirectory,DriverList);
+   LoadDrivers(DriverList,True);
+end;
+
+procedure TDADriverManager.LoadDrivers(const aDriverList: IROStrings; aIgnoreDuplicates: boolean = false; aIgnoreErrors: boolean = false);
+var
+  i: integer;
+begin
+  for i := 0 to (aDriverList.Count - 1) do try
+    LoadDriver(aDriverList[i]);
+  except
+    on E: EDADriverAlreadyLoaded do begin
+      if not aIgnoreDuplicates then raise;
+    end
+  else begin
+      if not aIgnoreErrors then raise;
+    end;
+  end;
+end;
+
+procedure TDADriverManager.UnloadAllDrivers(aForceUnloadForStaticDriver: boolean);
+var
+  i: integer;
+begin
+  for i := DriverCount - 1 downto 0 do
+    UnloadDriver(i, aForceUnloadForStaticDriver);
+end;
+
+procedure TDADriverManager.UnloadAllDrivers;
+begin
+  UnloadAllDrivers(false);
+end;
+
+function TDADriverManager.DriverByDriverID(const aDriverID: string): IDADriver;
+begin
+  Check(not FindDriver(aDriverID, result), err_UnknownDriver, [aDriverID]);
+end;
+
+procedure TDADriverManager.SetDriverDirectory(const Value: string);
+begin
+  fDriverDirectory := Trim(Value);
+  if (fDriverDirectory <> '') then
+    fDriverDirectory := IncludeTrailingPathDelimiter(fDriverDirectory)
+end;
+
+function TDADriverManager.GetDriverInfo(Index: integer): TDADriverInfo;
+begin
+  result := PDADriverInfo(fDrivers[Index])^
+end;
+
+procedure TDADriverManager.SetAutoLoad(const Value: boolean);
+var
+  sl: IROStrings;
+begin
+  if (csLoading in ComponentState) then
+    fLoadingAutoLoad := Value
+  else begin
+    //if (Value=fAutoLoad) then Exit; // Prevents a strange double set done by the IDE....
+
+    //if not Value and (DriverCount>0) then UnloadAllDrivers;
+
+    fAutoLoad := Value;
+
+    if fAutoLoad and not (csDesigning in ComponentState) then begin
+      sl := TROStrings.Create;
+      ListDrivers('', sl);
+      if sl.Count > 0 then begin
+        LoadDrivers(sl);
+      end;
+    end;
+  end;
+end;
+
+procedure TDADriverManager.Loaded;
+begin
+  inherited;
+
+  AutoLoad := fLoadingAutoLoad;
+  TraceActive := fStreamedTraceActive;
+end;
+
+procedure TDADriverManager.SetTraceActive(const Value: boolean);
+var
+  i: integer;
+begin
+  if (Value = fTraceActive) then Exit;
+
+  if (csLoading in ComponentState) then
+    fStreamedTraceActive := Value
+  else begin
+    fTraceActive := Value;
+
+    for i := 0 to (DriverCount - 1) do
+      Drivers[i].SetTraceOptions(Value, TraceFlags, OnTraceEvent);
+  end;
+end;
+
+procedure TDADriverManager.SetTraceFlags(const Value: TDATraceOptions);
+begin
+  fTraceFlags := Value;
+end;
+
+
+initialization
+  _DriverManager := nil;
+  _DriverProcs := TList.Create;
+
+finalization
+  _DriverProcs.Free;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAElevateDBInterfaces.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAElevateDBInterfaces.pas
new file mode 100644
index 0000000..385d6a2
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAElevateDBInterfaces.pas	
@@ -0,0 +1,631 @@
+unit uDAElevateDBInterfaces;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses uROClasses, uDAInterfaces, uDAEngine;
+
+type
+  IDAElevateConnection = interface(IDAConnection)
+    ['{30A997EA-0EBE-41D0-AD13-521DEFCDFE0D}']
+  end;
+
+  TDAElevateDBDriver = class(TDAEDriver)
+  protected
+    function GetDefaultConnectionType(const AuxDriver: string): string; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  end;
+
+  TDAElevateDBConnection = class(TDAEConnection, IDAConnection, IDAElevateConnection, IDADirectoryBasedDatabase)
+  protected
+    Procedure CheckConnected; virtual;
+    procedure DoGetTableNames(out List: IROStrings); override;
+    procedure DoGetViewNames(out List: IROStrings); override;
+    procedure DoGetStoredProcedureNames(out List: IROStrings); override;
+    procedure DoGetForeignKeys(out ForeignKeys: TDADriverForeignKeyCollection); override;
+    procedure DoGetTableFields(const aTableName: string; out Fields: TDAFieldCollection); override;
+    function GetSPSelectSyntax(HasArguments: Boolean): string; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function IdentifierNeedsQuoting(const iIdentifier: string): boolean; override; safecall;    
+  end;
+
+const
+  ElevateDB_DriverType = 'ElevateDB';
+  ElevateDB_ConfigDBName = 'Configuration';
+
+procedure ElevateDB_RegisterDatabase(Query: IDADataset; ADataBaseName: string;aPath: String);
+procedure ElevateDB_DoGetNames(Query: IDADataset; AList: IROStrings; AObjectType: TDAObjecttype);
+procedure ElevateDB_DoGetForeignKeys(Query: IDADataset; ForeignKeys: TDADriverForeignKeyCollection);
+procedure ElevateDB_DoGetTableFields(const aTableName: string; Query: IDADataset; out Fields: TDAFieldCollection);
+function ElevateDB_GetSPSelectSyntax(HasArguments: Boolean): String;
+function ElevateDB_IdentifierNeedsQuoting(const iIdentifier: string): boolean;
+
+implementation
+
+uses Classes,SysUtils;
+
+var
+  ElevateDB_reservedwords: array of string;
+
+
+procedure ElevateDB_RegisterDatabase(Query: IDADataset; ADataBaseName: string;aPath: String);
+const
+  s_SQL = 'Select Count(*) from Databases Where name = ''%s''';
+  s_DropDataBaseSQL = 'DROP DATABASE "%s" KEEP CONTENTS';
+  s_CreateDataBaseSQL = 'CREATE DATABASE "%s" PATH ''%s''';
+begin
+  try
+    Query.SQL := Format(s_SQL, [aDataBaseName]);
+    Query.Open;
+    if Query.Fields[0].AsInteger =0 then begin
+      Query.Close;
+      Query.SQL := Format(s_CreateDataBaseSQL, [aDataBaseName, aPath]);
+      Query.Execute;
+    end;
+  finally
+    Query := nil;
+  end;
+end;
+
+procedure ElevateDB_DoGetNames(Query: IDADataset; AList: IROStrings; AObjectType: TDAObjecttype);
+const
+  sDoGetTableNames            =   'SELECT Name FROM Information.Tables';
+  sDoGetViewNames             =   'SELECT Name FROM Information.Views';
+  sDoGetProcedures            =   'SELECT Name FROM Information.Procedures';
+begin
+  try
+    case AObjectType of
+      dotTable: Query.SQL := sDoGetTableNames;
+      dotView: Query.SQL := sDoGetViewNames;
+      dotProcedure: Query.SQL := sDoGetProcedures;
+    end;
+    Query.Open;
+    while not Query.Eof do begin
+      Alist.Add(Query.Fields[0].AsString);
+      Query.Next;
+    end;
+  finally
+    Query := nil;
+  end;
+end;
+
+procedure ElevateDB_DoGetForeignKeys(Query: IDADataset; ForeignKeys: TDADriverForeignKeyCollection);
+const
+  sFK_SQL = 'Select c.tablename,c.name, c.targettable, cc.columnname '+
+            'from Information.Constraints as c '+
+            'join Information.ConstraintColumns as cc on ((c.tablename = cc.tablename) and (cc.constraintname = c.EnforcingIndex)) '+
+            'where c.type = ''foreign key''';
+  sPK_SQL = 'Select c.tablename,c.name, c.targettable, cc.columnname '+
+            'from Information.Constraints as c '+
+            'join Information.ConstraintColumns as cc on ((c.Targettable = cc.tablename) and (cc.constraintname = c.TargetTableConstraint)) '+
+            'where c.type = ''foreign key''';
+var
+  lCurrConstraint             : string;
+  lCurrFK                     : TDADriverForeignKey;
+  lList: TStringList;
+  i: integer;
+begin
+  lList:=TstringList.Create;
+  try
+    Query.SQL := sFK_SQL;
+    Query.Open;
+
+    lCurrConstraint := '';
+    lCurrFK := nil;
+    ForeignKeys.Clear;
+    while (not Query.EOF) do begin
+      if lCurrConstraint <> Query.Fields[0].AsString + '.' + Query.Fields[1].AsString then begin
+        lCurrConstraint := Query.Fields[0].AsString + '.' + Query.Fields[1].AsString;
+        lCurrFK := ForeignKeys.Add();
+        lList.AddObject(lCurrConstraint,lCurrFK);
+        with lCurrFK do begin
+          Name:=lCurrConstraint;
+          PKTable := TrimRight(Query.Fields[2].AsString);
+          FKTable := TrimRight(Query.Fields[0].AsString);
+         // PKField := TrimRight(Query.Fields[2].AsString);
+          FKField := TrimRight(Query.Fields[3].AsString);
+        end;
+      end else begin
+        with lCurrFK do begin
+         // PKField := PKField + ';' + TrimRight(Query.Fields[2].AsString);
+          FKField := FKField + ';' + TrimRight(Query.Fields[3].AsString);
+        end;
+      end;
+      Query.Next;
+    end;
+    Llist.Sorted:=True;
+    Query.close;
+    Query.SQL := sPK_SQL;
+    Query.Open;
+    while (not Query.EOF) do begin
+      lCurrConstraint := Query.Fields[0].AsString + '.' + Query.Fields[1].AsString;
+      i:= lList.IndexOf(lCurrConstraint);
+      if i <> -1 then begin
+        lCurrFK:= TDADriverForeignKey(lList.Objects[i]);
+        if lCurrFK.PKField = '' then
+          lCurrFK.PKField := TrimRight(Query.Fields[3].AsString)
+        else
+          lCurrFK.PKField := lCurrFK.PKField + ';' +TrimRight(Query.Fields[3].AsString);
+      end;
+      Query.Next;
+    end;
+  finally
+    Query := nil;
+    LList.Free;
+  end;
+end;
+
+procedure ElevateDB_DoGetTableFields(const aTableName: string; Query: IDADataset; out Fields: TDAFieldCollection);
+const
+  s_sql = 'SELECT tc.Name, tc.Nullable, tc.Identity, cc.ColumnName, tc.scale FROM Information.TableColumns as tc '+
+          'LEFT JOIN Information.Constraints AS c ON ((c.TableName = tc.TableName) and (c.Type = ''Primary Key'')) '+
+          'LEFT JOIN Information.ConstraintColumns as cc on ((c.tablename = cc.tablename) and (cc.constraintname = c.EnforcingIndex) and (cc.ColumnName = tc.Name)) '+
+          'WHERE tc.TableName = ';
+var
+  fld: TDAField;
+begin
+  Fields := TDAFieldCollection.Create(nil);
+  try
+    Query.SQL := 'SELECT * FROM ' + aTableName +' WHERE 1=0';
+    Query.Open;
+    Fields.Assign(Query.Fields);
+    Query.Close;
+    Query.SQL := s_SQL+ '''' + aTableName+'''';
+    Query.Open;
+    While not Query.Eof do begin
+      fld := Fields.FindField(Trim(Query.Fields[0].AsString));
+      if Fld <> nil then begin
+        Fld.Required:=Query.Fields[1].AsBoolean;
+        if not Query.Fields[2].IsNull and Query.Fields[2].AsBoolean then begin
+          if fld.DataType = datInteger then fld.DataType := datAutoInc;
+          if fld.DataType = datLargeInt then fld.DataType := datLargeAutoInc;
+        end;
+        if not Query.Fields[3].IsNull then fld.InPrimaryKey:=True;
+        if fld.DataType = datDecimal then begin
+          fld.DecimalPrecision:=20;
+          fld.DecimalScale:=Query.Fields[4].AsInteger;
+        end;
+      end;
+      Query.Next;
+    end;
+  finally
+    Query:=nil;
+  end;
+end;
+
+function ElevateDB_GetSPSelectSyntax(HasArguments: Boolean): String;
+begin
+  if HasArguments then
+    Result:='CALL {0} ({1})'
+  else
+    Result:='CALL {0} ()';
+end;
+
+function ElevateDB_IdentifierNeedsQuoting(const iIdentifier: string): boolean;
+begin
+  Result := TestIdentifier(iIdentifier, ElevateDB_reservedwords);
+end;
+
+{ TDAElevateDBDriver }
+
+function TDAElevateDBDriver.GetDefaultConnectionType(
+  const AuxDriver: string): string;
+begin
+  Result:= ElevateDB_DriverType;
+end;
+
+
+{ TDAElevateDBConnection }
+
+procedure TDAElevateDBConnection.CheckConnected;
+begin
+  if not GetConnected then SetConnected(True);
+end;
+
+procedure TDAElevateDBConnection.DoGetForeignKeys(
+  out ForeignKeys: TDADriverForeignKeyCollection);
+begin
+  CheckConnected;
+  inherited;
+  ElevateDB_DoGetForeignKeys(GetDatasetClass.Create(Self),ForeignKeys);
+end;
+
+procedure TDAElevateDBConnection.DoGetStoredProcedureNames(
+  out List: IROStrings);
+begin
+  CheckConnected;
+  inherited;
+  ElevateDB_DoGetNames(GetDatasetClass.Create(Self),List,dotProcedure);
+end;
+
+procedure TDAElevateDBConnection.DoGetTableFields(const aTableName: string;
+  out Fields: TDAFieldCollection);
+begin
+  CheckConnected;
+  ElevateDB_DoGetTableFields(QuoteIdentifierIfNeeded(aTableName),GetDatasetClass.Create(Self),Fields);
+end;
+
+procedure TDAElevateDBConnection.DoGetTableNames(out List: IROStrings);
+begin
+  CheckConnected;
+  inherited;
+  ElevateDB_DoGetNames(GetDatasetClass.Create(Self),List,dotTable);
+end;
+
+procedure TDAElevateDBConnection.DoGetViewNames(out List: IROStrings);
+begin
+  CheckConnected;
+  inherited;
+  ElevateDB_DoGetNames(GetDatasetClass.Create(Self),List,dotView);
+end;
+
+function TDAElevateDBConnection.GetSPSelectSyntax(
+  HasArguments: Boolean): string;
+begin
+  Result := ElevateDB_GetSPSelectSyntax(HasArguments);
+end;
+
+procedure ElevateDB_InitializeReservedWords;
+begin
+  SetLength(ElevateDB_reservedwords, 335);
+  // sorted with TStringList.Sort (bds2007)
+  ElevateDB_reservedwords[0] := 'ABS';
+  ElevateDB_reservedwords[1] := 'ABSOLUTE';
+  ElevateDB_reservedwords[2] := 'ACOS';
+  ElevateDB_reservedwords[3] := 'ACTION';
+  ElevateDB_reservedwords[4] := 'ADD';
+  ElevateDB_reservedwords[5] := 'AFTER';
+  ElevateDB_reservedwords[6] := 'ALL';
+  ElevateDB_reservedwords[7] := 'ALLTRIM';
+  ElevateDB_reservedwords[8] := 'ALTER';
+  ElevateDB_reservedwords[9] := 'ALWAYS';
+  ElevateDB_reservedwords[10] := 'AM';
+  ElevateDB_reservedwords[11] := 'AND';
+  ElevateDB_reservedwords[12] := 'AS';
+  ElevateDB_reservedwords[13] := 'ASC';
+  ElevateDB_reservedwords[14] := 'ASCENDING';
+  ElevateDB_reservedwords[15] := 'ASENSITIVE';
+  ElevateDB_reservedwords[16] := 'ASIN';
+  ElevateDB_reservedwords[17] := 'AT';
+  ElevateDB_reservedwords[18] := 'ATAN';
+  ElevateDB_reservedwords[19] := 'ATAN2';
+  ElevateDB_reservedwords[20] := 'AVG';
+  ElevateDB_reservedwords[21] := 'BACKUP';
+  ElevateDB_reservedwords[22] := 'BACKUPS';
+  ElevateDB_reservedwords[23] := 'BEFORE';
+  ElevateDB_reservedwords[24] := 'BEGIN';
+  ElevateDB_reservedwords[25] := 'BETWEEN';
+  ElevateDB_reservedwords[26] := 'BIGINT';
+  ElevateDB_reservedwords[27] := 'BINARY';
+  ElevateDB_reservedwords[28] := 'BLOB';
+  ElevateDB_reservedwords[29] := 'BLOCK';
+  ElevateDB_reservedwords[30] := 'BOF';
+  ElevateDB_reservedwords[31] := 'BOOL';
+  ElevateDB_reservedwords[32] := 'BOOLEAN';
+  ElevateDB_reservedwords[33] := 'BOTH';
+  ElevateDB_reservedwords[34] := 'BUFFER';
+  ElevateDB_reservedwords[35] := 'BY';
+  ElevateDB_reservedwords[36] := 'BYTE';
+  ElevateDB_reservedwords[37] := 'CALL';
+  ElevateDB_reservedwords[38] := 'CASCADE';
+  ElevateDB_reservedwords[39] := 'CASE';
+  ElevateDB_reservedwords[40] := 'CAST';
+  ElevateDB_reservedwords[41] := 'CATALOG';
+  ElevateDB_reservedwords[42] := 'CATEGORY';
+  ElevateDB_reservedwords[43] := 'CEIL';
+  ElevateDB_reservedwords[44] := 'CEILING';
+  ElevateDB_reservedwords[45] := 'CHAR';
+  ElevateDB_reservedwords[46] := 'CHAR_LENGTH';
+  ElevateDB_reservedwords[47] := 'CHARACTER';
+  ElevateDB_reservedwords[48] := 'CHARACTER_LENGTH';
+  ElevateDB_reservedwords[49] := 'CHECK';
+  ElevateDB_reservedwords[50] := 'CLOB';
+  ElevateDB_reservedwords[51] := 'CLOSE';
+  ElevateDB_reservedwords[52] := 'COALESCE';
+  ElevateDB_reservedwords[53] := 'CODE';
+  ElevateDB_reservedwords[54] := 'COLLATE';
+  ElevateDB_reservedwords[55] := 'COLUMN';
+  ElevateDB_reservedwords[56] := 'COLUMNS';
+  ElevateDB_reservedwords[57] := 'COMMIT';
+  ElevateDB_reservedwords[58] := 'COMPRESSION';
+  ElevateDB_reservedwords[59] := 'COMPUTED';
+  ElevateDB_reservedwords[60] := 'CONCAT';
+  ElevateDB_reservedwords[61] := 'CONSTRAINT';
+  ElevateDB_reservedwords[62] := 'CONSTRAINTS';
+  ElevateDB_reservedwords[63] := 'CONTAIN';
+  ElevateDB_reservedwords[64] := 'CONTAINS';
+  ElevateDB_reservedwords[65] := 'CONTENTS';
+  ElevateDB_reservedwords[66] := 'COS';
+  ElevateDB_reservedwords[67] := 'COT';
+  ElevateDB_reservedwords[68] := 'COUNT';
+  ElevateDB_reservedwords[69] := 'CREATE';
+  ElevateDB_reservedwords[70] := 'CURRENT';
+  ElevateDB_reservedwords[71] := 'CURRENT_DATE';
+  ElevateDB_reservedwords[72] := 'CURRENT_GUID';
+  ElevateDB_reservedwords[73] := 'CURRENT_TIME';
+  ElevateDB_reservedwords[74] := 'CURRENT_TIMESTAMP';
+  ElevateDB_reservedwords[75] := 'CURRENT_USER';
+  ElevateDB_reservedwords[76] := 'CURSOR';
+  ElevateDB_reservedwords[77] := 'CURSOR_SENSITIVITY';
+  ElevateDB_reservedwords[78] := 'DAILY';
+  ElevateDB_reservedwords[79] := 'DATA';
+  ElevateDB_reservedwords[80] := 'DATABASE';
+  ElevateDB_reservedwords[81] := 'DATE';
+  ElevateDB_reservedwords[82] := 'DAY';
+  ElevateDB_reservedwords[83] := 'DAYOFWEEK';
+  ElevateDB_reservedwords[84] := 'DAYOFYEAR';
+  ElevateDB_reservedwords[85] := 'DAYS';
+  ElevateDB_reservedwords[86] := 'DECIMAL';
+  ElevateDB_reservedwords[87] := 'DECLARE';
+  ElevateDB_reservedwords[88] := 'DEFAULT';
+  ElevateDB_reservedwords[89] := 'DEFAULTS';
+  ElevateDB_reservedwords[90] := 'DEGREES';
+  ElevateDB_reservedwords[91] := 'DELETE';
+  ElevateDB_reservedwords[92] := 'DELIMITER';
+  ElevateDB_reservedwords[93] := 'DESC';
+  ElevateDB_reservedwords[94] := 'DESCENDING';
+  ElevateDB_reservedwords[95] := 'DESCRIPTION';
+  ElevateDB_reservedwords[96] := 'DISCONNECT';
+  ElevateDB_reservedwords[97] := 'DISTINCT';
+  ElevateDB_reservedwords[98] := 'DO';
+  ElevateDB_reservedwords[99] := 'DOES';
+  ElevateDB_reservedwords[100] := 'DOUBLE';
+  ElevateDB_reservedwords[101] := 'DROP';
+  ElevateDB_reservedwords[102] := 'ELSE';
+  ElevateDB_reservedwords[103] := 'ELSEIF';
+  ElevateDB_reservedwords[104] := 'EMPTY';
+  ElevateDB_reservedwords[105] := 'ENCRYPTED';
+  ElevateDB_reservedwords[106] := 'END';
+  ElevateDB_reservedwords[107] := 'EOF';
+  ElevateDB_reservedwords[108] := 'ERROR';
+  ElevateDB_reservedwords[109] := 'ERRORCODE';
+  ElevateDB_reservedwords[110] := 'ERRORMSG';
+  ElevateDB_reservedwords[111] := 'ESCAPE';
+  ElevateDB_reservedwords[112] := 'EVERY';
+  ElevateDB_reservedwords[113] := 'EXCEPT';
+  ElevateDB_reservedwords[114] := 'EXCEPTION';
+  ElevateDB_reservedwords[115] := 'EXCLUDING';
+  ElevateDB_reservedwords[116] := 'EXECUTE';
+  ElevateDB_reservedwords[117] := 'EXISTS';
+  ElevateDB_reservedwords[118] := 'EXP';
+  ElevateDB_reservedwords[119] := 'EXPORT';
+  ElevateDB_reservedwords[120] := 'EXTERNAL';
+  ElevateDB_reservedwords[121] := 'EXTRACT';
+  ElevateDB_reservedwords[122] := 'FALSE';
+  ElevateDB_reservedwords[123] := 'FETCH';
+  ElevateDB_reservedwords[124] := 'FILE';
+  ElevateDB_reservedwords[125] := 'FILTER';
+  ElevateDB_reservedwords[126] := 'FIRST';
+  ElevateDB_reservedwords[127] := 'FLOAT';
+  ElevateDB_reservedwords[128] := 'FLOOR';
+  ElevateDB_reservedwords[129] := 'FLUSH';
+  ElevateDB_reservedwords[130] := 'FOR';
+  ElevateDB_reservedwords[131] := 'FOREIGN';
+  ElevateDB_reservedwords[132] := 'FORMAT';
+  ElevateDB_reservedwords[133] := 'FOURTH';
+  ElevateDB_reservedwords[134] := 'FROM';
+  ElevateDB_reservedwords[135] := 'FULL';
+  ElevateDB_reservedwords[136] := 'FUNCTION';
+  ElevateDB_reservedwords[137] := 'GENERATED';
+  ElevateDB_reservedwords[138] := 'GENERATOR';
+  ElevateDB_reservedwords[139] := 'GRANT';
+  ElevateDB_reservedwords[140] := 'GROUP';
+  ElevateDB_reservedwords[141] := 'GUID';
+  ElevateDB_reservedwords[142] := 'HAVING';
+  ElevateDB_reservedwords[143] := 'HEADERS';
+  ElevateDB_reservedwords[144] := 'HOUR';
+  ElevateDB_reservedwords[145] := 'IDENTITY';
+  ElevateDB_reservedwords[146] := 'IF';
+  ElevateDB_reservedwords[147] := 'IFNULL';
+  ElevateDB_reservedwords[148] := 'IMMEDIATE';
+  ElevateDB_reservedwords[149] := 'IMPORT';
+  ElevateDB_reservedwords[150] := 'IN';
+  ElevateDB_reservedwords[151] := 'INCLUDE';
+  ElevateDB_reservedwords[152] := 'INCLUDING';
+  ElevateDB_reservedwords[153] := 'INCREMENT';
+  ElevateDB_reservedwords[154] := 'INDEX';
+  ElevateDB_reservedwords[155] := 'INDEXED';
+  ElevateDB_reservedwords[156] := 'INNER';
+  ElevateDB_reservedwords[157] := 'INOUT';
+  ElevateDB_reservedwords[158] := 'INSENSITIVE';
+  ElevateDB_reservedwords[159] := 'INSERT';
+  ElevateDB_reservedwords[160] := 'INT';
+  ElevateDB_reservedwords[161] := 'INTEGER';
+  ElevateDB_reservedwords[162] := 'INTERSECT';
+  ElevateDB_reservedwords[163] := 'INTERVAL';
+  ElevateDB_reservedwords[164] := 'INTO';
+  ElevateDB_reservedwords[165] := 'IS';
+  ElevateDB_reservedwords[166] := 'ITERATE';
+  ElevateDB_reservedwords[167] := 'JOB';
+  ElevateDB_reservedwords[168] := 'JOIN';
+  ElevateDB_reservedwords[169] := 'JOINOPTIMIZECOSTS';
+  ElevateDB_reservedwords[170] := 'KEEP';
+  ElevateDB_reservedwords[171] := 'KEY';
+  ElevateDB_reservedwords[172] := 'LARGE';
+  ElevateDB_reservedwords[173] := 'LAST';
+  ElevateDB_reservedwords[174] := 'LCASE';
+  ElevateDB_reservedwords[175] := 'LEADING';
+  ElevateDB_reservedwords[176] := 'LEAVE';
+  ElevateDB_reservedwords[177] := 'LEFT';
+  ElevateDB_reservedwords[178] := 'LENGTH';
+  ElevateDB_reservedwords[179] := 'LIKE';
+  ElevateDB_reservedwords[180] := 'LITERAL';
+  ElevateDB_reservedwords[181] := 'LOCK';
+  ElevateDB_reservedwords[182] := 'LOG';
+  ElevateDB_reservedwords[183] := 'LOG10';
+  ElevateDB_reservedwords[184] := 'LOOP';
+  ElevateDB_reservedwords[185] := 'LOWER';
+  ElevateDB_reservedwords[186] := 'LTRIM';
+  ElevateDB_reservedwords[187] := 'MAINTAIN';
+  ElevateDB_reservedwords[188] := 'MAX';
+  ElevateDB_reservedwords[189] := 'MEMORY';
+  ElevateDB_reservedwords[190] := 'MESSAGE';
+  ElevateDB_reservedwords[191] := 'MIGRATE';
+  ElevateDB_reservedwords[192] := 'MIGRATOR';
+  ElevateDB_reservedwords[193] := 'MIN';
+  ElevateDB_reservedwords[194] := 'MINUTE';
+  ElevateDB_reservedwords[195] := 'MOD';
+  ElevateDB_reservedwords[196] := 'MODULE';
+  ElevateDB_reservedwords[197] := 'MONTH';
+  ElevateDB_reservedwords[198] := 'MONTHLY';
+  ElevateDB_reservedwords[199] := 'MOVE';
+  ElevateDB_reservedwords[200] := 'MSECOND';
+  ElevateDB_reservedwords[201] := 'NAME';
+  ElevateDB_reservedwords[202] := 'NEXT';
+  ElevateDB_reservedwords[203] := 'NO';
+  ElevateDB_reservedwords[204] := 'NOJOINOPTIMIZE';
+  ElevateDB_reservedwords[205] := 'NONE';
+  ElevateDB_reservedwords[206] := 'NOT';
+  ElevateDB_reservedwords[207] := 'NULL';
+  ElevateDB_reservedwords[208] := 'NULLABLE';
+  ElevateDB_reservedwords[209] := 'NULLIF';
+  ElevateDB_reservedwords[210] := 'NUMERIC';
+  ElevateDB_reservedwords[211] := 'OBJECT';
+  ElevateDB_reservedwords[212] := 'OCCURS';
+  ElevateDB_reservedwords[213] := 'OF';
+  ElevateDB_reservedwords[214] := 'ON';
+  ElevateDB_reservedwords[215] := 'ONCE';
+  ElevateDB_reservedwords[216] := 'OPEN';
+  ElevateDB_reservedwords[217] := 'OPTIMIZE';
+  ElevateDB_reservedwords[218] := 'OPTION';
+  ElevateDB_reservedwords[219] := 'OR';
+  ElevateDB_reservedwords[220] := 'ORDER';
+  ElevateDB_reservedwords[221] := 'OUT';
+  ElevateDB_reservedwords[222] := 'OUTER';
+  ElevateDB_reservedwords[223] := 'PAGE';
+  ElevateDB_reservedwords[224] := 'PASSWORD';
+  ElevateDB_reservedwords[225] := 'PATH';
+  ElevateDB_reservedwords[226] := 'PI';
+  ElevateDB_reservedwords[227] := 'PM';
+  ElevateDB_reservedwords[228] := 'POS';
+  ElevateDB_reservedwords[229] := 'POSITION';
+  ElevateDB_reservedwords[230] := 'POWER';
+  ElevateDB_reservedwords[231] := 'PRECISION';
+  ElevateDB_reservedwords[232] := 'PREPARE';
+  ElevateDB_reservedwords[233] := 'PRIMARY';
+  ElevateDB_reservedwords[234] := 'PRIOR';
+  ElevateDB_reservedwords[235] := 'PRIVILEGES';
+  ElevateDB_reservedwords[236] := 'PROCEDURE';
+  ElevateDB_reservedwords[237] := 'QUOTE';
+  ElevateDB_reservedwords[238] := 'RADIANS';
+  ElevateDB_reservedwords[239] := 'RAISE';
+  ElevateDB_reservedwords[240] := 'RAND';
+  ElevateDB_reservedwords[241] := 'RANGE';
+  ElevateDB_reservedwords[242] := 'REDEFINE';
+  ElevateDB_reservedwords[243] := 'REFERENCES';
+  ElevateDB_reservedwords[244] := 'RELATIVE';
+  ElevateDB_reservedwords[245] := 'REMOVE';
+  ElevateDB_reservedwords[246] := 'REPAIR';
+  ElevateDB_reservedwords[247] := 'REPEAT';
+  ElevateDB_reservedwords[248] := 'REPLACE';
+  ElevateDB_reservedwords[249] := 'RESTORE';
+  ElevateDB_reservedwords[250] := 'RESTRICT';
+  ElevateDB_reservedwords[251] := 'RESULT';
+  ElevateDB_reservedwords[252] := 'RETURN';
+  ElevateDB_reservedwords[253] := 'RETURNS';
+  ElevateDB_reservedwords[254] := 'REVOKE';
+  ElevateDB_reservedwords[255] := 'RIGHT';
+  ElevateDB_reservedwords[256] := 'ROLE';
+  ElevateDB_reservedwords[257] := 'ROLLBACK';
+  ElevateDB_reservedwords[258] := 'ROUND';
+  ElevateDB_reservedwords[259] := 'ROW';
+  ElevateDB_reservedwords[260] := 'ROWCOUNT';
+  ElevateDB_reservedwords[261] := 'ROWS';
+  ElevateDB_reservedwords[262] := 'ROWSAFFECTED';
+  ElevateDB_reservedwords[263] := 'RTRIM';
+  ElevateDB_reservedwords[264] := 'RUN';
+  ElevateDB_reservedwords[265] := 'RUNSUM';
+  ElevateDB_reservedwords[266] := 'SECOND';
+  ElevateDB_reservedwords[267] := 'SELECT';
+  ElevateDB_reservedwords[268] := 'SENSITIVE';
+  ElevateDB_reservedwords[269] := 'SERVER';
+  ElevateDB_reservedwords[270] := 'SESSION';
+  ElevateDB_reservedwords[271] := 'SET';
+  ElevateDB_reservedwords[272] := 'SIGN';
+  ElevateDB_reservedwords[273] := 'SIN';
+  ElevateDB_reservedwords[274] := 'SIZE';
+  ElevateDB_reservedwords[275] := 'SMALLINT';
+  ElevateDB_reservedwords[276] := 'SQRT';
+  ElevateDB_reservedwords[277] := 'START';
+  ElevateDB_reservedwords[278] := 'STATEMENT';
+  ElevateDB_reservedwords[279] := 'STDDEV';
+  ElevateDB_reservedwords[280] := 'SUBSTR';
+  ElevateDB_reservedwords[281] := 'SUBSTRING';
+  ElevateDB_reservedwords[282] := 'SUM';
+  ElevateDB_reservedwords[283] := 'SUMSQUARE';
+  ElevateDB_reservedwords[284] := 'TABLE';
+  ElevateDB_reservedwords[285] := 'TABLES';
+  ElevateDB_reservedwords[286] := 'TAN';
+  ElevateDB_reservedwords[287] := 'TEMPORARY';
+  ElevateDB_reservedwords[288] := 'TEXT';
+  ElevateDB_reservedwords[289] := 'TEXTOCCURS';
+  ElevateDB_reservedwords[290] := 'TEXTSEARCH';
+  ElevateDB_reservedwords[291] := 'THEN';
+  ElevateDB_reservedwords[292] := 'THIRD';
+  ElevateDB_reservedwords[293] := 'TIME';
+  ElevateDB_reservedwords[294] := 'TIMESTAMP';
+  ElevateDB_reservedwords[295] := 'TO';
+  ElevateDB_reservedwords[296] := 'TOP';
+  ElevateDB_reservedwords[297] := 'TRAILING';
+  ElevateDB_reservedwords[298] := 'TRANSACTION';
+  ElevateDB_reservedwords[299] := 'TRIGGER';
+  ElevateDB_reservedwords[300] := 'TRIM';
+  ElevateDB_reservedwords[301] := 'TRUE';
+  ElevateDB_reservedwords[302] := 'TRUNC';
+  ElevateDB_reservedwords[303] := 'TRUNCATE';
+  ElevateDB_reservedwords[304] := 'TYPE';
+  ElevateDB_reservedwords[305] := 'UCASE';
+  ElevateDB_reservedwords[306] := 'UNENCRYPTED';
+  ElevateDB_reservedwords[307] := 'UNION';
+  ElevateDB_reservedwords[308] := 'UNIQUE';
+  ElevateDB_reservedwords[309] := 'UNPREPARE';
+  ElevateDB_reservedwords[310] := 'UNTIL';
+  ElevateDB_reservedwords[311] := 'UPDATE';
+  ElevateDB_reservedwords[312] := 'UPPER';
+  ElevateDB_reservedwords[313] := 'USE';
+  ElevateDB_reservedwords[314] := 'USER';
+  ElevateDB_reservedwords[315] := 'USING';
+  ElevateDB_reservedwords[316] := 'UTC';
+  ElevateDB_reservedwords[317] := 'VALUES';
+  ElevateDB_reservedwords[318] := 'VARBYTE';
+  ElevateDB_reservedwords[319] := 'VARCHAR';
+  ElevateDB_reservedwords[320] := 'VARYING';
+  ElevateDB_reservedwords[321] := 'VERSION';
+  ElevateDB_reservedwords[322] := 'VIEW';
+  ElevateDB_reservedwords[323] := 'WEEK';
+  ElevateDB_reservedwords[324] := 'WEEKLY';
+  ElevateDB_reservedwords[325] := 'WEEKS';
+  ElevateDB_reservedwords[326] := 'WHEN';
+  ElevateDB_reservedwords[327] := 'WHERE';
+  ElevateDB_reservedwords[328] := 'WHILE';
+  ElevateDB_reservedwords[329] := 'WINDOWS';
+  ElevateDB_reservedwords[330] := 'WITH';
+  ElevateDB_reservedwords[331] := 'WITHOUT';
+  ElevateDB_reservedwords[332] := 'WORD';
+  ElevateDB_reservedwords[333] := 'WORK';
+  ElevateDB_reservedwords[334] := 'YEAR';
+end;
+
+function TDAElevateDBConnection.IdentifierNeedsQuoting(
+  const iIdentifier: string): boolean;
+begin
+  Result:=inherited IdentifierNeedsQuoting(iIdentifier) or ElevateDB_IdentifierNeedsQuoting(iIdentifier);
+end;
+
+initialization
+  ElevateDB_InitializeReservedWords;
+finalization
+  ElevateDB_reservedwords := nil;
+end.
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAEngine.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAEngine.pas
new file mode 100644
index 0000000..646f9d2
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAEngine.pas	
@@ -0,0 +1,2922 @@
+unit uDAEngine;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+interface
+
+uses
+  Classes, DB, SysUtils,
+  {$IFDEF MSWINDOWS} ActiveX, ComObj,{$ENDIF} // for ISupportErrorInfo, EOleSysError
+  uDAInterfaces, uROClasses, uDARes, uROTypes, uDAMacros, uDAUtils;
+
+type
+  { Misc }
+  TCustomConnectionClass = class of TCustomConnection;
+  TDatasetClass = class of TDataset;
+  TDAEConnection = class;
+  TDAEDriver = class;
+
+  { Exceptions }
+  EDAException = class(EROException);
+  EDADriverException = class(EDAException);
+
+  { TDAConnectionWrapper
+      Internal wrapper class for frameworks whose connections don't inherit from TCustomConnection or require additional
+      supporting components. See IBO and DBISAM drivers for an example. This class provides an implementation for DoConnect
+      and DoDisconnect removing the need to further override them. }
+  TDAConnectionWrapper = class(TCustomConnection)
+  protected
+    procedure DoConnect; override;
+    procedure DoDisconnect; override;
+  end;
+
+  {$IFDEF MSWINDOWS}
+  TDAEngineBaseObject = class(TROInterfacedObject, ISupportErrorInfo)//, IServerExceptionHandler)
+  protected
+    function InterfaceSupportsErrorInfo(const iid: TGUID): HRESULT; stdcall;
+    procedure OnException(const ServerClass: WideString; const ExceptionClass: WideString;
+                          const ErrorMessage: WideString; ExceptAddr: Integer; const ErrorIID: WideString;
+                          const ProgID: WideString; var Handled: Integer; var Result: HRESULT);
+  public
+    function SafeCallException(ExceptObject: TObject; ExceptAddr: Pointer): HResult; override;
+  end;
+  {$ELSE}
+  TDAEngineBaseObject = TROInterfacedObject;
+  {$ENDIF}
+
+
+  { TDASQLMacroProcessor }
+  TDASQLMacroProcessor = class(TROMacroParser)
+  private
+    fStoredProcedurePrefix,
+      fDateFormat,
+      fStoredProcParamPrefix,
+      fDateTimeFormat: string;
+    fDoubleQuoteStrings: boolean;
+    function MyUnknownIdentifier(Sender: TObject; const Name, OrgName: string; var Value: string): Boolean;
+  protected
+    // Internal
+    procedure RegisterMacros; virtual;
+
+    // SQL Functions
+    function DateTime(Sender: TObject; const Parameters: array of string): string; virtual; abstract;
+    function Date(Sender: TObject; const Parameters: array of string): string; virtual;
+
+    function AddTime(Sender: TObject; const Parameters: array of string): string; virtual; abstract;
+
+    function FormatDateTime(Sender: TObject; const Parameters: array of string): string; virtual;
+    function FormatDate(Sender: TObject; const Parameters: array of string): string; virtual;
+
+    function Length(Sender: TObject; const Parameters: array of string): string; virtual; abstract;
+    function LowerCase(Sender: TObject; const Parameters: array of string): string; virtual; abstract;
+    function UpperCase(Sender: TObject; const Parameters: array of string): string; virtual; abstract;
+    function TrimLeft(Sender: TObject; const Parameters: array of string): string; virtual; abstract;
+    function TrimRight(Sender: TObject; const Parameters: array of string): string; virtual; abstract;
+    function Copy(Sender: TObject; const Parameters: array of string): string; virtual; abstract;
+    function Nolock(Sender: TObject; const Parameters: array of string): string; virtual;abstract;
+  public
+    constructor Create(const aDateFormat, aDateTimeFormat: string;
+      aDoubleQuoteStrings: boolean;
+      const aStoredProcParamsPrefix: string = '');overload;
+    constructor Create;overload;
+
+    property StoredProcedurePrefix: string read fStoredProcedurePrefix;
+    property DateFormat: string read fDateFormat;
+    property StoredProcParamPrefix: string read fStoredProcParamPrefix;
+    property DateTimeFormat: string read fDateTimeFormat;
+    property DoubleQuoteStrings: boolean read fDoubleQuoteStrings;
+  end;
+
+  IDAHasMacroProcessor = interface(IDAConnection)
+    ['{C18B417F-C698-4BB1-8F57-C3952E1046D1}']
+    function GetMacroProcessor: TDASQLMacroProcessor;
+  end;
+
+  IDANativeDatabaseAccess = interface
+    ['{0AC0565B-9500-4A90-B55D-25CB04568F9B}']
+    procedure ClearFieldDefs;
+    function GetRecordCount: Integer;
+    function GetBOF:Boolean;
+    function GetEOF:Boolean;
+    function GetActive:Boolean;
+    procedure SetActive(const aValue: Boolean);
+    procedure Next;
+    function Locate(const KeyFields: string; const KeyValues: Variant; Options: TLocateOptions): Boolean;
+    function Lookup(const KeyFields: string; const KeyValues: Variant; const ResultFields: string): Variant;
+    function GetFieldName(Index: Integer): string;
+    procedure DisableControls;
+    procedure EnableControls;
+    function ControlsDisabled: Boolean;
+    function GetIsEmpty: boolean;
+    procedure FreeBookmark(Bookmark: TBookmark);
+    function GetBookMark: pointer;
+    procedure GotoBookmark(Bookmark: TBookmark);
+    function GetState: TDatasetState;
+    procedure Prepare(const AValue: Boolean);
+    function GetFields(Index: integer): IDANativeField;
+    function FieldCount: Integer;
+    function FindField(const FieldName: string): IDANativeField;
+    function IsTDatasetCompatible: Boolean;
+    property Active: Boolean read GetActive write SetActive;
+    function GetNativeFieldData(Index: Integer; var Data: pointer; var DataSize: cardinal):Boolean;
+    function GetNativeFieldValue(Index: Integer): Variant;
+    function CanFreeNativeFieldData: Boolean;
+  end;
+
+  TDANativeField_Dataset = class(TInterfacedObject, IDANativeField)
+  private
+    fField: TField;
+  protected
+    function GetNativeObject: TObject;
+    function isTFieldCompatible: Boolean;
+    function GetFieldName: string;
+    function GetDataType: TFieldType;
+    function GetSize: integer;
+    function GetDecimalPrecision: Integer;
+    procedure SetDecimalPrecision(Value: integer);
+    function GetDecimalScale: Integer;
+    procedure SetDecimalScale(Value: integer);
+    procedure SetDataType(Value: TFieldType);
+    function GetFieldIndex: integer;
+    function GetValue: Variant;
+    function IsNull: Boolean;
+  public
+    constructor Create(AField: TField);
+  end;
+
+  TDANativeDatabaseAccess_Dataset = class(TInterfacedObject,IDANativeDatabaseAccess)
+  private
+    FDataset: TDataSet;
+    fList: TInterfaceList;
+  protected
+    procedure ClearFieldDefs;
+    function GetRecordCount: Integer;
+    function GetBOF:Boolean;
+    function GetEOF:Boolean;
+    function GetActive:Boolean;
+    procedure SetActive(const aValue: Boolean);
+    procedure Next;
+    function Locate(const KeyFields: string; const KeyValues: Variant; Options: TLocateOptions): Boolean;
+    function Lookup(const KeyFields: string; const KeyValues: Variant; const ResultFields: string): Variant;
+    function GetFieldName(Index: Integer): string;
+    procedure DisableControls;
+    procedure EnableControls;
+    function GetIsEmpty: boolean;
+    procedure FreeBookmark(Bookmark: TBookmark);
+    function GetBookMark: pointer;
+    procedure GotoBookmark(Bookmark: TBookmark);
+    function GetState: TDatasetState;
+    function ControlsDisabled: Boolean;
+    procedure Prepare(const AValue: Boolean);
+    function GetFields(Index: integer): IDANativeField;
+    function FieldCount: Integer;
+    function FindField(const FieldName: string): IDANativeField;
+    function IsTDatasetCompatible: Boolean;
+    function GetNativeFieldData(Index: Integer; var Data: pointer; var DataSize: cardinal):Boolean;
+    function CanFreeNativeFieldData: Boolean;
+    function GetNativeFieldValue(Index: Integer): Variant;
+  public
+    Constructor Create(ADataset: TDataSet);
+    destructor Destroy;override;
+  end;
+
+  { 20080408:
+  Dataset-compatible drivers - default mode, i.e. no changes is required.
+
+
+  non-Dataset-compatible drivers:
+
+  you should create objects that supports
+  IDANativeField, IDANativeDatabaseAccess
+
+  xxxQuery:
+  ---------
+  you should override in addition:
+    function CreateNativeDatabaseAccess: IDANativeDatabaseAccess;                      // point to IDANativeDatabaseAccess
+    function CreateNativeObject(aConnection: TDAEConnection): TObject;               // Result - point to your native object
+    function CreateDataset(aConnection: TDAEConnection): TDataset;                   //  you can raise error or return nil
+  you can use
+    property NativeDatabaseAccess: IDANativeDatabaseAccess read fNativeDatabaseAccess; // your object which you return with CreateNativeDatabaseAccess
+    property NativeObject: TObject read GetNativeObject;                             // your object created with CreateNativeObject
+
+
+  XXXStoredProcedure
+  ------------------
+  you should override in addition:
+    function CreateNativeObject(aConnection: TDAEConnection): TObject;               // Result - point to your native object
+    function CreateDataset(aConnection: TDAEConnection): TDataset;                   //  you can raise error or return nil
+  you can use
+    property NativeObject: TObject read GetNativeObject;                             // your object created with CreateNativeObject
+  }
+
+  { TDAESQLCommand }
+  {$WARN SYMBOL_DEPRECATED OFF}
+  TDAESQLCommand = class(TDAEngineBaseObject, IDASQLCommand, IDAMustSetParams, IDASQLCommandNativeObject)
+  private
+    fConnection: TDAEConnection;
+    fconn: IDAConnection;
+    fDataset: TDataset;
+    FNativeObject: TObject;
+    fParams: TDAParamCollection;
+    fWhere: TDAWhere;
+    fDynamicWhere: TDASQLWhereBuilder;
+    fChanged: boolean;
+    fSQL: string;
+    fName: string;
+    fPrepared: boolean;
+    //fOrderBy : string;
+    fOnAfterExecute: TDAAfterExecuteCommandEvent;
+    fOnBeforeExecute: TDABeforeExecuteCommandEvent;
+    fOnExecuteError: TDAExecuteCommandErrorEvent;
+    FIsPresentDynWhereVariable: Boolean;
+    function UnknownIdentifier(Sender: TObject; const Name, OrgName: string; var Value: string): Boolean;
+    procedure SetDynamicWhereParams;
+    procedure RemoveDynamicWhereParams;
+
+  { non-dataset mode}
+  protected
+    fNativeDatabaseAccess: IDANativeDatabaseAccess;
+    function CreateNativeDatabaseAccess: IDANativeDatabaseAccess; virtual;
+  { non-dataset mode end}
+
+    // Internal
+    procedure OnWhereChange(Sender: TObject);
+    procedure PrepareSQLStatement; virtual;
+    function GenerateDynamicWhereStatement: string;
+    function SQLContainsDynamicWhere: boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValuesStd(Params1: TDAParamCollection;Params2: TParams);
+    procedure SetParamValuesStd(Params1: TDAParamCollection;Params2: TParams);
+    procedure ClearParams; virtual;
+    function FindParameter(const AParams: TParams;const AParamName: string): TParam;
+
+    // To be overridden
+    function CreateNativeObject(aConnection: TDAEConnection): TObject; virtual;
+    function CreateDataset(aConnection: TDAEConnection): TDataset; virtual; abstract;
+
+    procedure DoPrepare(Value: boolean); virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF} abstract;
+    function DoExecute: integer; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF} abstract;
+    procedure DoSetSQL(const Value: string); virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF} abstract;
+    function DoGetSQL: string; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}abstract;
+
+    //IDASQLCommandNativeObject
+    function GetNativeObject: TObject; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetNativeFields(Index: integer): IDANativeField;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function NativeFieldCount: Integer;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function NativeFindField(const FieldName: string): IDANativeField;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function IsTDatasetCompatible: Boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetNativeFieldData(Index: Integer; var Data: pointer; var DataSize: cardinal):Boolean; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function CanFreeNativeFieldData: Boolean;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}    
+    // IDASQLCommand
+    function GetDataset: TDataset; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetPrepared: boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetPrepared(Value: boolean); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetParams: TDAParamCollection; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure RefreshParams; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function Execute: integer; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetWhere: TDAWhere; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF} deprecated;
+    function GetDynamicWhere: TDAWhereBuilder; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetDynamicWhere(const Value: TDAWhereBuilder); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetSQL: string; virtual;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetSQL(const Value: string); virtual;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetName: string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function ParamByName(const aName: string): TDAParam; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    property NativeObject: TObject read GetNativeObject;
+    property Dataset: TDataset read GetDataset;
+    property Changed: boolean read fChanged write fChanged;
+    property Connection: TDAEConnection read fConnection;
+
+    function GetOnAfterExecute: TDAAfterExecuteCommandEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetOnBeforeExecute: TDABeforeExecuteCommandEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnAfterExecute(const Value: TDAAfterExecuteCommandEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnBeforeExecute(const Value: TDABeforeExecuteCommandEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetOnExecuteError: TDAExecuteCommandErrorEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnExecuteError(const Value: TDAExecuteCommandErrorEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function intVCLTypeToDAType(aFieldType: TFieldType): TDADataType;virtual;
+    procedure SetParamValues(AParams: TDAParamCollection); virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF} abstract;
+    procedure GetParamValues(AParams: TDAParamCollection); virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF} abstract;
+  public
+    constructor Create(aConnection: TDAEConnection; const aName: string = ''); virtual;
+    destructor Destroy; override;
+  end;
+
+  { TDAEDataset }
+  TDAEDataset = class(TDAESQLCommand, IDASQLCommand, IDADataset)
+  private
+    fAutoFields: boolean;
+    fFields: TDAFieldCollection;
+    fLogicalName : string;
+    fOnAfterOpen: TDAAfterOpenDatasetEvent;
+    fOnBeforeOpen: TDABeforeOpenDatasetEvent;
+    fOnOpenError: TDAOpenDatasetErrorEvent;
+    FNativeIndex: array of integer;
+  protected
+    property NativeDatabaseAccess: IDANativeDatabaseAccess read fNativeDatabaseAccess;
+    function IsNeedToFixFMTBCDIssue: Boolean; virtual;
+    procedure FixKnownIssues;virtual;
+    procedure FixFMTBCDIssue;
+    // To be overridden
+    function DoGetRecordCount: integer; dynamic;
+    function DoGetActive: boolean; dynamic;
+    procedure DoSetActive(Value: boolean); dynamic;
+    function DoGetBOF: boolean; dynamic;
+    function DoGetEOF: boolean; dynamic;
+
+    procedure DoNext; dynamic;
+
+    function DoLocate(const KeyFields: string; const KeyValues: Variant; Options: TLocateOptions): Boolean; dynamic;
+    procedure DoPrepare(Value: boolean); override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    //IDASQLCommandNativeObject
+    function GetNativeFieldData(Index: Integer; var Data: pointer; var DataSize: cardinal):Boolean; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // IDADataset
+    function GetRecordCount: integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetFieldCount: integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetFields: TDAFieldCollection; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetActive: boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetActive(Value: boolean); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetBOF: boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetEOF: boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetFieldValues(Index: integer): Variant; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetNames(Index: integer): string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetIsEmpty : boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetState : TDatasetState; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    procedure Open; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure Close; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    procedure EnableControls; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure DisableControls; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function  ControlsDisabled: Boolean;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    procedure Next; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    procedure Refresh; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function Locate(const KeyFields: string; const KeyValues: Variant; Options: TLocateOptions): Boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function Lookup(const KeyFields: string; const KeyValues: Variant; const ResultFields: string): Variant; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function FieldByName(const aName: string): TDAField; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function FindField(const aName: string): TDAField; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function GetBookMark: pointer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GotoBookmark(Bookmark: TBookmark); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure FreeBookmark(Bookmark: TBookmark); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetLogicalName : string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetLogicalName(aName : string); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function GetOnAfterOpen: TDAAfterOpenDatasetEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetOnBeforeOpen: TDABeforeOpenDatasetEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnAfterOpen(const Value: TDAAfterOpenDatasetEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnBeforeOpen(const Value: TDABeforeOpenDatasetEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetOnOpenError: TDAOpenDatasetErrorEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnOpenError(const Value: TDAOpenDatasetErrorEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function GetRowRecIdValue: integer;
+    function GetCurrentRecIdValue: integer;
+    procedure SetCurrentRecIdValue(Value: integer);
+    procedure EnableConstraints; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure DisableConstraints; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  public
+    constructor Create(aConnection: TDAEConnection; const aName: string = ''); override;
+    destructor Destroy; override;
+  end;
+  {$WARN SYMBOL_DEPRECATED ON}
+
+  TDAEDatasetClass = class of TDAEDataset;
+
+  {$WARN SYMBOL_DEPRECATED OFF}
+  { TDAEStoredProcedure }
+  TDAEStoredProcedure = class(TDAESQLCommand, IDASQLCommand, IDAStoredProcedure)
+  protected
+    function CreateNativeDatabaseAccess: IDANativeDatabaseAccess; override;
+    procedure RefreshParamsStd(AParams: TParams);
+    // Internal
+    procedure DoPrepare(Value: boolean); override;
+    procedure RefreshParams; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetSQL(const Value: string); override;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    // IDAStoredProcedure
+    function GetStoredProcedureName: string; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF} abstract;
+    procedure SetStoredProcedureName(const Name: string); virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF} abstract;
+    procedure PrepareSQLStatement; override;
+  public
+  end;
+  {$WARN SYMBOL_DEPRECATED ON}
+  TDAEStoredProcedureClass = class of TDAEStoredProcedure;
+
+  { TDAEConnection }
+  TDAEConnection = class(TDAEngineBaseObject, IDAConnection, IDAConnectionObjectAccess, IDATestableObject, IDAHasMacroProcessor)
+  private
+    fConnectionObject: TCustomConnection;
+    fConnectionString: string;
+    fConnectionManager: IDAConnectionManager;
+    fConnectionDefinition: TDAConnection;
+    fDriver: TDAEDriver;
+    fUserID,
+    fPassword,
+    fName: string;
+    fMacroProcessor: TDASQLMacroProcessor;
+    fOnAfterExecuteCommand: TDAAfterExecuteCommandEvent;
+    fOnAfterOpenDataset: TDAAfterOpenDatasetEvent;
+    fOnBeforeOpenDataset: TDABeforeOpenDatasetEvent;
+    fOnBeforeExecuteCommand: TDABeforeExecuteCommandEvent;
+    fOnExecuteCommandError: TDAExecuteCommandErrorEvent;
+    fOnOpenDatasetError: TDAOpenDatasetErrorEvent;
+    fConnectionPool: IDAConnectionPool;
+    fReleasing: Boolean;
+    fUseMacroProcessor:Boolean;
+
+    function CreateConnectionObject: TCustomConnection;
+
+  protected
+    fConnectionType: string;
+    property ConnectionName: string read fName;
+    property ConnectionManager: IDAConnectionManager read fConnectionManager;
+    property ConnectionDefinition: TDAConnection read fConnectionDefinition;
+
+    function QueryInterface(const IID: TGUID; out Obj): HResult; override; stdcall;
+    function GetConnectionPool: IDAConnectionPool; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetConnectionPool(const Value: IDAConnectionPool); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // To be overridden
+    function CreateCustomConnection: TCustomConnection; virtual; abstract;
+    function CreateMacroProcessor: TDASQLMacroProcessor; virtual;
+
+    function GetDatasetClass: TDAEDatasetClass; virtual;
+    function GetStoredProcedureClass: TDAEStoredProcedureClass; virtual;
+
+    procedure DoApplyConnectionString(aConnStrParser: TDAConnectionStringParser; aConnectionObject: TCustomConnection); virtual;
+
+    function DoBeginTransaction: integer; virtual; abstract;
+    procedure DoCommitTransaction; virtual; abstract;
+    procedure DoRollbackTransaction; virtual; abstract;
+    function DoGetInTransaction: boolean; virtual; abstract;
+
+    procedure DoGetTableNames(out List: IROStrings); virtual;
+    procedure DoGetViewNames(out List: IROStrings); virtual;
+    procedure DoGetStoredProcedureNames(out List: IROStrings); virtual;
+    procedure DoGetTableFields(const aTableName: string; out Fields: TDAFieldCollection); virtual;
+    procedure DoGetQueryFields(const aSQL: string; aParamsIfNeeded: TDAParamCollection; out Fields: TDAFieldCollection); virtual;
+    procedure DoGetViewFields(const aViewName: string; out Fields: TDAFieldCollection); virtual;
+    procedure DoGetStoredProcedureParams(const aStoredProcedureName: string; out Params: TDAParamCollection); virtual;
+    procedure DoGetForeignKeys(out ForeignKeys: TDADriverForeignKeyCollection); virtual;
+
+    function DoGetLastAutoInc(const GeneratorName: string): integer; virtual;
+
+    // Misc
+    procedure ApplyConnectionString(const aConnectionString: string; aConnectionObject: TCustomConnection);
+
+    procedure AssignCommandEventHandlers(const aCommand: IDASQLCommand);
+    procedure AssignDatasetEventHandlers(const aDataset: IDADataset);
+
+    // IDAConnectionObjectAccess
+    function GetConnectionObject: TObject; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetConnectionProperties(const aPropertyName: string): Variant; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetConnectionProperties(const aPropertyName: string; const aValue: Variant); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    // IDATestableObject
+    procedure Test; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    // IDAConnection
+    function GetConnectionString: string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetConnectionString(Value: string); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetConnected: boolean; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetConnected(Value: boolean); virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetName: string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function GetOnAfterExecuteCommand: TDAAfterExecuteCommandEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetOnAfterOpenDataset: TDAAfterOpenDatasetEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetOnBeforeExecuteCommand: TDABeforeExecuteCommandEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetOnBeforeOpenDataset: TDABeforeOpenDatasetEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetOnExecuteCommandError: TDAExecuteCommandErrorEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetOnOpenDatasetError: TDAOpenDatasetErrorEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnAfterExecuteCommand(const Value: TDAAfterExecuteCommandEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnAfterOpenDataset(const Value: TDAAfterOpenDatasetEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnBeforeExecuteCommand(const Value: TDABeforeExecuteCommandEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnBeforeOpenDataset(const Value: TDABeforeOpenDatasetEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnExecuteCommandError(const Value: TDAExecuteCommandErrorEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnOpenDatasetError(const Value: TDAOpenDatasetErrorEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    procedure Open(const aUserID: string = ''; const aPassword: string = ''); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure Close; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    // UserID/Password
+    function GetUserID: string; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetUserID(const Value: string); virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetPassword: string; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetPassword(const Value: string); virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function BeginTransaction: integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure CommitTransaction; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure RollbackTransaction; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetInTransaction: boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    procedure GetTableNames(out List: IROStrings); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetViewNames(out List: IROStrings); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetStoredProcedureNames(out List: IROStrings); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetTableFields(const aTableName: string; out Fields: TDAFieldCollection); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetQueryFields(const aSQL: string; aParamsIfNeeded: TDAParamCollection; out Fields: TDAFieldCollection); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetViewFields(const aViewName: string; out Fields: TDAFieldCollection); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetStoredProcedureParams(const aStoredProcedureName: string; out Params: TDAParamCollection); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetForeignKeys(out ForeignKeys: TDADriverForeignKeyCollection); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+
+    function GetSPSelectSyntax(HasArguments: Boolean): string; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetQuoteChars: TDAQuoteCharArray; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function IdentifierIsQuoted(const iIdentifier: string): boolean; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function IdentifierNeedsQuoting(const iIdentifier: string): boolean; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function QuoteIdentifierIfNeeded(const iIdentifier: string): string; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function QuoteIdentifier(const iIdentifier: string): string; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function QuoteFieldNameIfNeeded(const aTableName, aFieldName: string): string; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function QuoteFieldName(const aTableName, aFieldName: string): string; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function NewCommand(const Text: string; CommandType: TDASQLStatementType; const aCommandName: string = ''): IDASQLCommand; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function NewDataset(const SQL: string; const aDatasetName: string = ''): IDADataset; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetLastAutoInc(const GeneratorName: string = ''): integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    property UserID: string read GetUserID write SetUserID;
+    property Password: string read GetPassword write SetPassword;
+    property ConnectionObject: TCustomConnection read fConnectionObject write fConnectionObject;
+    function GetMacroProcessor: TDASQLMacroProcessor;
+    function _Release: Integer; override; stdcall;
+    function isAlive: Boolean; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetConnectionType: string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    property ConnectionType: string read GetConnectionType;
+    function GetQueryBuilder: TDAQueryBuilder; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetWhereBuilder: TDASQLWhereBuilder; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetUseMacroProcessor: Boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetUseMacroProcessor(Value:Boolean); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  public
+    constructor Create(aDriver: TDAEDriver; aName: string = ''); virtual;
+    destructor Destroy; override;
+
+    property ConnectionPool: IDAConnectionPool read GetConnectionPool write SetConnectionPool;
+    property Driver: TDAEDriver read fDriver;
+    property MacroProcessor: TDASQLMacroProcessor read GetMacroProcessor;
+  end;
+
+  TDAEConnectionClass = class of TDAEConnection;
+
+  { TDAEDriver }
+  TDAEDriver = class(TComponent, IDADriver, IDADriver30)
+  private
+
+  protected
+    // To be overridden
+    function GetConnectionClass: TDAEConnectionClass; virtual; abstract;
+    procedure CustomizeConnectionObject(aConnection: TDAEConnection); dynamic;
+    procedure DoSetTraceOptions(TraceActive: boolean; TraceFlags: TDATraceOptions; Callback: TDALogTraceEvent); virtual;
+
+    { IDADriver }
+    function GetDriverID: string; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF} abstract;
+    function GetDescription: string; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF} abstract;
+    function GetMajVersion: byte; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetMinVersion: byte; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    procedure GetAuxDrivers(out List: IROStrings); virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetAuxParams(const AuxDriver: string; out List: IROStrings); virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetDefaultConnectionType(const AuxDriver: string): string; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    procedure SetTraceOptions(TraceActive: boolean; TraceFlags: TDATraceOptions; Callback: TDALogTraceEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function NewConnection(const aName: string = ''; const aConnectionType: string = ''): IDAConnection; overload; {deprecated;} {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function NewConnection(const aConnectionManager: IDAConnectionManager; aConnectionDefinition: TDAConnection): IDAConnection; overload; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    procedure Initialize; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure Finalize; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function GetAvailableDriverOptions: TDAAvailableDriverOptions; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAvailableDriverOptionsEx(AuxDriver: string): TDAAvailableDriverOptions; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetDefaultCustomParameters: string; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    { IDADriver30 }
+    function GetDriverHelp(aType: TDADriverHelpType): string;
+  public
+    destructor Destroy; override;
+  end;
+
+  TDAEDriverClass = class of TDAEDriver;
+
+  { TDADriverReference }
+  TDADriverReference = class(TComponent)
+  end;
+
+{$IFDEF MSWINDOWS}
+function DAHandleSafeCallException(aObject:TObject; ExceptObject: TObject; ExceptAddr: Pointer): HResult;
+{$ENDIF MSWINDOWS}
+function Engine_GetDatabaseNames(aConnection:TDAEConnection; aMasterDatabase, aGetDatabaseNamesSQL: String): IROStrings;
+function TestIdentifier(const iIdentifier: string; const ReservedWords: array of string): boolean;
+implementation
+
+uses
+  {$IFDEF MSWINDOWS}Windows,{$ENDIF} Variants,{$IFDEF FPC}dbconst,{$ELSE}DBConsts,{$ENDIF}
+  FMTBcd,{$IFNDEF Drivers_CompatibilityMode}{$IFNDEF FPC}SqlTimSt,{$ENDIF}{$ENDIF}
+  TypInfo, uDAHelpers, uROClient, uDASQL92QueryBuilder, uROBinaryHelpers;
+
+function Engine_GetDatabaseNames(aConnection:TDAEConnection; aMasterDatabase, aGetDatabaseNamesSQL: String): IROStrings;
+var
+  connStrParser             : TDAConnectionStringParser;
+  conn                      : IDAConnection;
+  ds                        : IDAdataset;
+begin
+  Result := NewROStrings;
+  connStrParser := TDAConnectionStringParser.Create((aConnection as IDAConnection).ConnectionString);
+  try
+    connStrParser.Database := aMasterDatabase;
+
+    conn := TDAEConnectionClass(aConnection.ClassType).Create(aConnection.Driver);
+    conn.ConnectionString := connStrParser.BuildString;
+    conn.Open;
+
+    ds := conn.NewDataset(aGetDatabaseNamesSQL);
+    ds.Open;
+
+    while not ds.EOF do begin
+      result.Add(VarToStr(ds.FieldValues[0]));
+      ds.Next;
+    end;
+  finally
+    connStrParser.Free;
+    conn := nil;
+    ds := nil;
+  end;
+end;
+
+{ TDAEDriver }
+
+destructor TDAEDriver.Destroy;
+begin
+  SetTraceOptions(FALSE, [], nil);
+
+  inherited;
+end;
+
+procedure TDAEDriver.Initialize;
+begin
+end;
+
+procedure TDAEDriver.Finalize;
+begin
+
+end;
+
+function TDAEDriver.GetMajVersion: byte;
+begin
+  result := 1
+end;
+
+function TDAEDriver.GetMinVersion: byte;
+begin
+  result := 0
+end;
+
+function TDAEDriver.NewConnection(const aName: string = '';const aConnectionType: string = ''): IDAConnection;
+var
+  conn: TDAEConnection;
+begin
+  conn := GetConnectionClass.Create(Self, aName);
+  conn.FConnectionType := aConnectionType;
+  CustomizeConnectionObject(conn); // In some cases the driver might need to do additional customization
+
+  result := conn;
+end;
+
+function TDAEDriver.NewConnection(const aConnectionManager: IDAConnectionManager; aConnectionDefinition: TDAConnection): IDAConnection;
+var
+  conn: TDAEConnection;
+begin
+  conn := GetConnectionClass.Create(Self, aConnectionDefinition.Name);
+  conn.fConnectionType := aConnectionDefinition.ConnectionType;
+  conn.fConnectionManager := aConnectionManager;
+  conn.fConnectionDefinition := aConnectionDefinition;
+  CustomizeConnectionObject(conn); // In some cases the driver might need to do additional customization
+
+  result := conn;
+end;
+
+function TDAEDriver.GetAvailableDriverOptions: TDAAvailableDriverOptions;
+begin
+  //result := [doAuxDriver,doServerName,doDatabaseName,doLogin,doCustom];
+  result := [doServerName, doDatabaseName, doLogin];
+end;
+
+function TDAEDriver.GetAvailableDriverOptionsEx(AuxDriver: string): TDAAvailableDriverOptions;
+begin
+  result := GetAvailableDriverOptions;
+end;
+
+function TDAEDriver.GetDefaultConnectionType(const AuxDriver: string): string;
+begin
+  result := '';
+end;
+
+function TDAEDriver.GetDefaultCustomParameters: string;
+begin
+  result := '';
+end;
+
+procedure TDAEDriver.SetTraceOptions(TraceActive: boolean; TraceFlags: TDATraceOptions; Callback: TDALogTraceEvent);
+begin
+  if (csDesigning in ComponentState) then Exit;
+
+  DoSetTraceOptions(TraceActive, TraceFlags, Callback);
+end;
+
+procedure TDAEDriver.CustomizeConnectionObject(aConnection: TDAEConnection);
+begin
+end;
+
+procedure TDAEDriver.DoSetTraceOptions(TraceActive: boolean;
+  TraceFlags: TDATraceOptions; Callback: TDALogTraceEvent);
+begin
+end;
+
+procedure TDAEDriver.GetAuxDrivers(out List: IROStrings);
+begin
+  List := NewROStrings();
+end;
+
+procedure TDAEDriver.GetAuxParams(const AuxDriver: string; out List: IROStrings);
+begin
+  List := NewROStrings();
+end;
+
+function TDAEDriver.GetDriverHelp(aType: TDADriverHelpType): string;
+begin
+  result := LoadHtmlFromResource(hInstance, 'DRIVER_HELP');
+end;
+
+{ TDAEConnection }
+
+constructor TDAEConnection.Create(aDriver: TDAEDriver; aName: string = '');
+begin
+  inherited Create;
+
+  fName := aName;
+  fDriver := aDriver;
+  fConnectionObject := CreateConnectionObject;
+  FUseMacroProcessor := True;
+end;
+
+destructor TDAEConnection.Destroy;
+begin
+  if Assigned(fConnectionObject) then begin
+    try
+      if fConnectionObject.Connected then fConnectionObject.Close;
+    except
+    end;  
+    FreeAndNIL(fConnectionObject);
+  end;
+
+  if Assigned(fMacroProcessor) then fMacroProcessor.Free;
+
+  inherited;
+end;
+
+function TDAEConnection.GetConnected: boolean;
+begin
+  result := assigned(fConnectionObject) and fConnectionObject.Connected;
+end;
+
+function TDAEConnection.GetConnectionString: string;
+begin
+  result := fConnectionString;
+end;
+
+procedure TDAEConnection.SetConnected(Value: boolean);
+begin
+  if fConnectionObject <> nil then
+    fConnectionObject.Connected := Value;
+end;
+
+procedure TDAEConnection.SetConnectionString(Value: string);
+begin
+  if (Value = fConnectionString) then Exit;
+
+  ApplyConnectionString(Value, fConnectionObject);
+end;
+
+function TDAEConnection.GetConnectionObject: TObject;
+begin
+  result := fConnectionObject;
+end;
+
+function TDAEConnection.GetConnectionProperties(
+  const aPropertyName: string): Variant;
+begin
+  if assigned(fConnectionObject) then
+    result := GetPropValue(fConnectionObject, aPropertyName, FALSE)
+  else
+    result := Unassigned;
+end;
+
+procedure TDAEConnection.SetConnectionProperties(
+  const aPropertyName: string; const aValue: Variant);
+begin
+  if assigned(fConnectionObject) then
+    SetPropValue(fConnectionObject, aPropertyName, aValue);
+end;
+
+procedure TDAEConnection.Close;
+begin
+  SetConnected(FALSE); // Exceptions are handled there
+end;
+
+procedure TDAEConnection.Open(const aUserID: string = ''; const aPassword: string = '');
+begin
+  if (aUserID <> '') then UserID := aUserID;
+  if (aPassword <> '') then Password := aPassword;
+
+  SetConnected(TRUE); // Exceptions are handled there
+end;
+
+function TDAEConnection.CreateConnectionObject: TCustomConnection;
+begin
+  result := CreateCustomConnection;
+end;
+
+function TDAEConnection.NewDataset(const SQL: string; const aDatasetName: string = ''): IDADataset;
+begin
+  result := GetDatasetClass.Create(Self, aDatasetName);
+  result.SQL := SQL;
+
+  AssignDatasetEventHandlers(result); // Propagates the event handlers to all datasets
+end;
+
+function TDAEConnection.NewCommand(const Text: string; CommandType: TDASQLStatementType; const aCommandName: string = ''): IDASQLCommand;
+var
+  sp: IDAStoredProcedure;
+  ds: IDADataset;
+begin
+  result := nil;
+
+  case CommandType of
+    stStoredProcedure: begin
+        sp := GetStoredProcedureClass.Create(Self, aCommandName);
+        sp.StoredProcedureName := Text;
+
+        result := sp;
+      end;
+    stSQL: begin
+        ds := GetDatasetClass.Create(Self, aCommandName);
+        ds.SQL := Text;
+        result := ds;
+      end;
+  end;
+
+  if Result <> nil then
+    Result.RefreshParams;
+
+  AssignCommandEventHandlers(result); // Propagates the event handlers to all commands
+end;
+
+function TDAEConnection.BeginTransaction: integer;
+begin
+  result := -1;
+
+  DoBeginTransaction;
+end;
+
+procedure TDAEConnection.CommitTransaction;
+begin
+  DoCommitTransaction;
+end;
+
+procedure TDAEConnection.RollbackTransaction;
+begin
+  DoRollbackTransaction;
+end;
+
+procedure TDAEConnection.GetStoredProcedureNames(out List: IROStrings);
+begin
+  DoGetStoredProcedureNames(List);
+end;
+
+procedure TDAEConnection.GetStoredProcedureParams(
+  const aStoredProcedureName: string; out Params: TDAParamCollection);
+begin
+  DoGetStoredProcedureParams(aStoredProcedureName, Params);
+end;
+
+procedure TDAEConnection.GetForeignKeys(out ForeignKeys: TDADriverForeignKeyCollection);
+begin
+  DoGetForeignKeys(ForeignKeys);
+end;
+
+procedure TDAEConnection.GetTableFields(const aTableName: string;
+  out Fields: TDAFieldCollection);
+begin
+  DoGetTableFields(aTableName, Fields);
+end;
+
+procedure TDAEConnection.GetQueryFields(const aSQL: string; aParamsIfNeeded: TDAParamCollection; out Fields: TDAFieldCollection);
+begin
+  DoGetQueryFields(aSQL, aParamsIfNeeded, Fields);
+end;
+
+procedure TDAEConnection.GetTableNames(out List: IROStrings);
+begin
+  DoGetTableNames(List);
+end;
+
+procedure TDAEConnection.GetViewFields(const aViewName: string;
+  out Fields: TDAFieldCollection);
+begin
+  DoGetViewFields(aViewName, Fields);
+end;
+
+procedure TDAEConnection.GetViewNames(out List: IROStrings);
+begin
+  DoGetViewNames(List);
+end;
+
+function TDAEConnection.GetWhereBuilder: TDASQLWhereBuilder;
+begin
+  Result:= TDASQL92WhereBuilder.Create(Self);
+end;
+
+function TDAEConnection.GetDatasetClass: TDAEDatasetClass;
+begin
+  result := nil;
+end;
+
+function TDAEConnection.GetStoredProcedureClass: TDAEStoredProcedureClass;
+begin
+  result := nil;
+end;
+
+procedure TDAEConnection.DoGetTableFields(const aTableName: string; out Fields: TDAFieldCollection);
+var
+  qry: IDADataset;
+begin
+  Fields := TDAFieldCollection.Create(nil);
+  qry := GetDatasetClass.Create(Self);
+  try
+    qry.SQL := 'SELECT * FROM ' + QuoteIdentifierIfNeeded(aTableName) + ' WHERE 1=0';
+    qry.Open;
+    Fields.Assign(qry.Fields);
+  finally
+    qry := nil;
+  end;
+end;
+
+procedure TDAEConnection.DoGetQueryFields(const aSQL: string; aParamsIfNeeded: TDAParamCollection; out Fields: TDAFieldCollection);
+var
+  qry: IDADataset;
+begin
+  Fields := TDAFieldCollection.Create(nil);
+  qry := GetDatasetClass.Create(Self);
+  try
+    qry.SQL := aSQL;
+    if assigned(aParamsIfNeeded) then
+      qry.Params.AssignParamCollection(aParamsIfNeeded);
+    qry.Open;
+    Fields.Assign(qry.Fields);
+  finally
+    qry := nil;
+  end;
+end;
+
+procedure TDAEConnection.DoGetStoredProcedureParams(const aStoredProcedureName: string; out Params: TDAParamCollection);
+var
+  cmd: IDASQLCommand;
+begin
+  //Params := nil;
+  cmd := NewCommand(aStoredProcedureName, stStoredProcedure);
+  cmd.RefreshParams;
+
+  {if (Params = nil) then} Params := TDAParamCollection.Create(nil);
+  Params.AssignParamCollection(cmd.Params);
+end;
+
+procedure TDAEConnection.DoGetForeignKeys(out ForeignKeys: TDADriverForeignKeyCollection);
+begin
+  ForeignKeys := TDADriverForeignKeyCollection.Create(nil);
+end;
+
+function TDAEConnection.GetName: string;
+begin
+  result := fName;
+end;
+
+procedure TDAEConnection.DoGetViewFields(const aViewName: string;
+  out Fields: TDAFieldCollection);
+begin
+  DoGetTableFields(aViewName, Fields);
+end;
+
+function TDAEConnection.GetQuoteChars: TDAQuoteCharArray;
+begin
+  result[0] := '"';
+  result[1] := '"';
+end;
+
+procedure TDAEConnection.DoGetViewNames(out List: IROStrings);
+begin
+  List := NewROStrings; // Changed from NIL.
+end;
+
+procedure TDAEConnection.DoGetStoredProcedureNames(out List: IROStrings);
+begin
+  List := NewROStrings; // Changed from NIL.
+end;
+
+procedure TDAEConnection.DoGetTableNames(out List: IROStrings);
+begin
+  List := NewROStrings; // Changed from NIL.
+end;
+
+function TDAEConnection.GetInTransaction: boolean;
+begin
+  result := DoGetInTransaction;
+end;
+
+function TDAEConnection.GetPassword: string;
+begin
+  result := fPassword;
+end;
+
+function TDAEConnection.GetUserID: string;
+begin
+  result := fUserID;
+end;
+
+procedure TDAEConnection.SetPassword(const Value: string);
+begin
+  fPassword := Value;
+
+  ApplyConnectionString(GetConnectionString, ConnectionObject); // Refreshes it
+end;
+
+procedure TDAEConnection.SetUserID(const Value: string);
+begin
+  fUserID := Value;
+
+  ApplyConnectionString(GetConnectionString, ConnectionObject); // Refreshes it
+end;
+
+function TDAEConnection.GetLastAutoInc(
+  const GeneratorName: string): integer;
+begin
+  result := DoGetLastAutoInc(GeneratorName);
+end;
+
+function TDAEConnection.DoGetLastAutoInc(
+  const GeneratorName: string): integer;
+begin
+  result := -1;
+end;
+
+function TDAEConnection.IdentifierIsQuoted(const iIdentifier: string): boolean;
+var
+  lQuoteChars: TDAQuoteCharArray;
+  lLength:integer;
+begin
+  lQuoteChars := GetQuoteChars();
+  lLength := Length(iIdentifier);
+  result := (lLength > 2) and (iIdentifier[1] = lQuoteChars[0]) and (iIdentifier[lLength] = lQuoteChars[1]);
+end;
+
+function TDAEConnection.IdentifierNeedsQuoting(const iIdentifier: string): boolean;
+var
+  i: integer;
+begin
+  result := false;
+  if IdentifierIsQuoted(iIdentifier) then Exit;
+
+  for i := 1 to Length(iIdentifier) do begin
+    if not CharInSet(iIdentifier[i], ['a'..'z', 'A'..'Z', '0'..'9', '_', '.']) then begin
+      result := true;
+      exit;
+    end;
+  end;
+  if (iIdentifier <> '') then begin
+    i := pos('.',iIdentifier);
+    if (i < Length(iIdentifier)) and CharInSet(iIdentifier[i+1], ['0'..'9']) then Result := True;
+  end;
+end;
+
+function TDAEConnection.QuoteIdentifierIfNeeded(const iIdentifier: string): string;
+begin
+  if IdentifierNeedsQuoting(iIdentifier) then
+    result := QuoteIdentifier(iIdentifier)
+  else
+    result := iIdentifier;
+end;
+
+function TDAEConnection.QuoteIdentifier(const iIdentifier: string): string;
+var
+  lQuoteChars: TDAQuoteCharArray;
+begin
+  lQuoteChars := GetQuoteChars();
+  if (Pos('.', iIdentifier)>0) then
+    result := lQuoteChars[0] + StringReplace(iIdentifier, '.', lQuoteChars[1]+'.'+ lQuoteChars[0], [rfReplaceAll]) + lQuoteChars[1]
+  else
+    result := lQuoteChars[0] + iIdentifier + lQuoteChars[1];
+end;
+
+function TDAEConnection.CreateMacroProcessor: TDASQLMacroProcessor;
+begin
+{$WARNINGS OFF}
+  result := TDASQLMacroProcessor.Create;
+{$WARNINGS ON}
+end;
+
+procedure TDAEConnection.ApplyConnectionString(
+  const aConnectionString: string; aConnectionObject: TCustomConnection);
+var
+  i: Integer;
+  lParamName: String;
+  lConnStrParser: TDAConnectionStringParser;
+begin
+  FreeAndNIL(fMacroProcessor);
+
+  lConnStrParser := TDAConnectionStringParser.Create(aConnectionString);
+  try
+    fConnectionString := aConnectionString;
+    DoApplyConnectionString(lConnStrParser, aConnectionObject);
+    //with lConnStrParser do
+    if aConnectionObject <> nil then
+    begin
+      for i := 0 to lConnStrParser.AuxParamsCount - 1 do begin
+        lParamName := lConnStrParser.AuxParamNames[i];
+        if Assigned(GetPropInfo(aConnectionObject, lParamName)) then begin
+          SetConnectionProperties(lParamName, lConnStrParser.AuxParams[lParamName]);
+        end;
+      end;
+    end;
+  finally
+    lConnStrParser.Free;
+  end;
+
+  fMacroProcessor := CreateMacroProcessor;
+end;
+
+procedure TDAEConnection.DoApplyConnectionString(
+  aConnStrParser: TDAConnectionStringParser; aConnectionObject: TCustomConnection);
+begin
+  if (aConnectionObject <> nil) then aConnectionObject.Close;
+end;
+
+function TDAEConnection.GetOnAfterExecuteCommand: TDAAfterExecuteCommandEvent;
+begin
+  result := fOnAfterExecuteCommand
+end;
+
+function TDAEConnection.GetOnAfterOpenDataset: TDAAfterOpenDatasetEvent;
+begin
+  result := fOnAfterOpenDataset
+end;
+
+function TDAEConnection.GetOnBeforeExecuteCommand: TDABeforeExecuteCommandEvent;
+begin
+  result := fOnBeforeExecuteCommand
+end;
+
+function TDAEConnection.GetOnBeforeOpenDataset: TDABeforeOpenDatasetEvent;
+begin
+  result := fOnBeforeOpenDataset
+end;
+
+function TDAEConnection.GetOnExecuteCommandError: TDAExecuteCommandErrorEvent;
+begin
+  result := fOnExecuteCommandError
+end;
+
+function TDAEConnection.GetOnOpenDatasetError: TDAOpenDatasetErrorEvent;
+begin
+  result := fOnOpenDatasetError
+end;
+
+procedure TDAEConnection.SetOnAfterExecuteCommand(
+  const Value: TDAAfterExecuteCommandEvent);
+begin
+  fOnAfterExecuteCommand := Value;
+end;
+
+procedure TDAEConnection.SetOnAfterOpenDataset(
+  const Value: TDAAfterOpenDatasetEvent);
+begin
+  fOnAfterOpenDataset := Value;
+end;
+
+procedure TDAEConnection.SetOnBeforeExecuteCommand(
+  const Value: TDABeforeExecuteCommandEvent);
+begin
+  fOnBeforeExecuteCommand := Value;
+end;
+
+procedure TDAEConnection.SetOnBeforeOpenDataset(
+  const Value: TDABeforeOpenDatasetEvent);
+begin
+  fOnBeforeOpenDataset := Value;
+end;
+
+procedure TDAEConnection.SetOnExecuteCommandError(
+  const Value: TDAExecuteCommandErrorEvent);
+begin
+  fOnExecuteCommandError := Value;
+end;
+
+procedure TDAEConnection.SetOnOpenDatasetError(
+  const Value: TDAOpenDatasetErrorEvent);
+begin
+  fOnOpenDatasetError := Value;
+end;
+
+procedure TDAEConnection.AssignCommandEventHandlers(
+  const aCommand: IDASQLCommand);
+begin
+  if aCommand=NIL then Exit;
+  aCommand.OnBeforeExecute := fOnBeforeExecuteCommand;
+  aCommand.OnAfterExecute := fOnAfterExecuteCommand;
+  aCommand.OnExecuteError := fOnExecuteCommandError;
+end;
+
+procedure TDAEConnection.AssignDatasetEventHandlers(
+  const aDataset: IDADataset);
+begin
+  if aDataset=NIL then Exit;
+  aDataset.OnBeforeOpen := fOnBeforeOpenDataset;
+  aDataset.OnAfterOpen := fOnAfterOpenDataset;
+  aDataset.OnOpenError := fOnOpenDatasetError;
+end;
+
+procedure TDAEConnection.Test;
+begin
+  Open;
+  Close;
+end;
+
+function TDAEConnection.GetSPSelectSyntax(HasArguments: Boolean): string;
+begin
+  Result := 'EXEC {0} {1}';
+end;
+
+function TDAEConnection.GetMacroProcessor: TDASQLMacroProcessor;
+begin
+  if FUseMacroProcessor then
+    result := fMacroProcessor
+  else
+    Result := nil;
+end;
+
+function TDAEConnection._Release: Integer;
+begin
+  Result := InterlockedDecrement(FRefCount);
+  if (Result = 0) and not (fReleasing) then begin
+    fReleasing := True;
+    InterlockedIncrement(fRefCount);
+    if assigned(fConnectionPool) then
+      fConnectionPool.ReleaseConnection(self);
+    Result := InterlockedDecrement(fRefCount);
+    fReleasing := False;
+  end;
+  if Result = 0 then
+    Destroy;
+end;
+
+function TDAEConnection.GetConnectionPool: IDAConnectionPool;
+begin
+  result := fConnectionPool;
+end;
+
+procedure TDAEConnection.SetConnectionPool(const Value: IDAConnectionPool);
+begin
+  fConnectionPool := Value;
+end;
+
+function TDAEConnection.QuoteFieldName(const aTableName,
+  aFieldName: string): string;
+begin
+  Result:= QuoteIdentifier(aFieldName);
+end;
+
+function TDAEConnection.QuoteFieldNameIfNeeded(const aTableName,
+  aFieldName: string): string;
+begin
+  if IdentifierNeedsQuoting(aFieldName) then
+    result := QuoteFieldName(aTableName,aFieldName)
+  else
+    result := aFieldName;
+end;
+
+function TDAEConnection.isAlive: Boolean;
+begin
+  Result:= (ConnectionObject <> nil) and ConnectionObject.Connected;
+end;
+
+function TDAEConnection.GetConnectionType: string;
+begin
+  Result:= FConnectionType;
+end;
+
+function TDAEConnection.GetQueryBuilder: TDAQueryBuilder;
+begin
+  Result:= TDASQL92QueryBuilder.Create;
+  Result.Connection:=Self;
+end;
+
+function TDAEConnection.GetUseMacroProcessor: Boolean;
+begin
+  Result := FUseMacroProcessor;
+end;
+
+procedure TDAEConnection.SetUseMacroProcessor(Value: Boolean);
+begin
+  FUseMacroProcessor := Value;
+end;
+
+function TDAEConnection.QueryInterface(const IID: TGUID; out Obj): HResult;
+begin
+  Result:= E_NOINTERFACE;
+  if IsEqualGUID(IID, IDAHasMacroProcessor) then begin
+    if not FUseMacroProcessor then Exit;
+  end;
+  Result := inherited QueryInterface(IID, Obj)
+end;
+
+{ TDAEDataset }
+
+constructor TDAEDataset.Create(aConnection: TDAEConnection; const aName: string = '');
+begin
+  inherited;
+
+  fLogicalName := aName;
+  if (fLogicalName='')
+    then fLogicalName := NewGuidAsString;
+
+  fChanged := true;
+  fFields := TDAFieldCollection.Create(nil);
+  {$WARN SYMBOL_DEPRECATED OFF}
+  GetWhere.Fields := fFields; // So it can find the mappings!
+  {$WARN SYMBOL_DEPRECATED ON}
+end;
+
+destructor TDAEDataset.Destroy;
+begin
+  FreeAndNil(fFields);
+  inherited;
+end;
+
+function TDAEDataset.GetActive: boolean;
+begin
+  result := DoGetActive
+end;
+
+function TDAEDataset.GetBOF: boolean;
+begin
+  result := DoGetBOF
+end;
+
+function TDAEDataset.GetEOF: boolean;
+begin
+  result := DoGetEOF;
+end;
+
+function TDAEDataset.GetFieldCount: integer;
+begin
+  result := fFields.Count;
+end;
+
+function TDAEDataset.GetRecordCount: integer;
+begin
+  result := DoGetRecordCount;
+end;
+
+function TDAEDataset.Locate(const KeyFields: string;
+  const KeyValues: Variant; Options: TLocateOptions): Boolean;
+begin
+  result := DoLocate(KeyFields, KeyValues, Options);
+end;
+
+procedure TDAEDataset.Next;
+begin
+  DoNext;
+end;
+
+procedure TDAEDataset.Open;
+begin
+  SetActive(TRUE); // Handles the exception there
+end;
+
+procedure TDAEDataset.Close;
+begin
+  SetActive(FALSE); // Handles the exception there
+end;
+
+procedure TDAEDataset.SetActive(Value: boolean);
+begin
+  DoSetActive(Value);
+end;
+
+function TDAEDataset.GetFields: TDAFieldCollection;
+begin
+  result := fFields;
+end;
+
+function TDAEDataset.DoGetActive: boolean;
+begin
+  result := FNativeDatabaseAccess.Active;
+end;
+
+function TDAEDataset.DoGetBOF: boolean;
+begin
+  result := FNativeDatabaseAccess.GetBOF;
+end;
+
+function TDAEDataset.DoGetEOF: boolean;
+begin
+  result := FNativeDatabaseAccess.GetEOF;
+end;
+
+function TDAEDataset.DoGetRecordCount: integer;
+begin
+  result := FNativeDatabaseAccess.GetRecordCount;
+end;
+
+function TDAEDataset.DoLocate(const KeyFields: string;
+  const KeyValues: Variant; Options: TLocateOptions): Boolean;
+begin
+  result := FNativeDatabaseAccess.Locate(KeyFields, KeyValues, Options);
+end;
+
+procedure TDAEDataset.DoNext;
+begin
+  FNativeDatabaseAccess.Next;
+end;
+
+procedure TDAEDataset.DoPrepare(Value: boolean);
+begin
+  FNativeDatabaseAccess.Prepare(Value);
+end;
+
+procedure TDAEDataset.DoSetActive(Value: boolean);
+var
+  i: integer;
+  fld: IDANativeField;
+  startTick: Cardinal;
+  s: string;
+begin
+  if (Value = GetActive) then Exit;
+
+  // Opens the dataset
+  if Value then begin
+    // Combines the custom WHERE statement and modifies the inner SQL
+    if fChanged or (fWhere.Changed) then PrepareSQLStatement;
+
+    if Assigned(fConnection.fMacroProcessor) then begin
+      i := fConnection.fMacroProcessor.IndexOfName('Where');
+      s := GenerateDynamicWhereStatement;
+      if i = -1 then
+        fConnection.fMacroProcessor.AddVariable('Where').Value:=s
+      else
+        fConnection.fMacroProcessor.Variable[i].Value:=s;
+
+      SetDynamicWhereParams;
+      SetSQL(fConnection.fMacroProcessor.Eval(GetSQL));
+    end;
+
+
+    // Writes the parameter values
+    if (fParams.Count > 0) then SetParamValues(fParams) else ClearParams;
+
+    startTick := ROGetTickCount;
+    if Assigned(fOnBeforeOpen) then fOnBeforeOpen(Self);
+    // Opens the dataset
+    fAutoFields := (fFields.Count = 0);
+    try
+      FNativeDatabaseAccess.Active := True;
+      FixKnownIssues;
+    except
+      on E:Exception do begin
+        if Assigned(fOnOpenError) then fOnOpenError(Self, DoGetSQL, E);
+        raise;
+      end;
+    end;
+
+    if Assigned(fOnAfterOpen) then fOnAfterOpen(Self, DoGetSQL, ROGetTickCount-startTick);
+
+    GetParamValues(fParams);
+
+    RemoveDynamicWhereParams;
+
+    if fAutoFields and (fFields.Count = 0)then begin
+      for i := 0 to (FNativeDatabaseAccess.FieldCount - 1) do begin
+        fld := FNativeDatabaseAccess.GetFields(i);
+        with fFields.Add(fld.FieldName, intVCLTypeToDAType(fld.DataType), fld.Size) do begin
+          if DataType = datDecimal then begin
+            case fld.DataType of
+              ftFMTBcd: begin
+                DecimalPrecision:= fld.DecimalPrecision;
+                DecimalScale:= fld.DecimalScale;
+              end;
+              ftBCD: begin
+                DecimalPrecision:= fld.DecimalPrecision;
+                DecimalScale:= fld.DecimalScale;
+              end;
+            else
+              DataType := datFloat;
+            end;
+          end;
+          // Fix ZEOS issue
+          {$IFDEF DELPHI2006UP}
+          if (DataType = datWideString) and (Size = MaxInt div 2) then begin
+            DataType:= datWideMemo;
+            Size := 0;
+          end;
+          {$ENDIF}
+          Bind(fld);
+        end;
+      end;
+    end
+    else
+      fFields.Bind(Self);
+    SetLength(FNativeIndex,fFields.Count);
+    for I := 0 to FFields.Count - 1 do begin
+      if fFields[i].BindedNativeField <> nil then
+        FNativeIndex[i] := fFields[i].BindedNativeField.Index
+      else if fFields[i].BindedField <> nil then
+        FNativeIndex[i] := fFields[i].BindedField.Index
+      else
+        FNativeIndex[i] := -1;
+    end;
+  end
+  else begin
+    if fAutoFields then
+      fFields.Clear
+    else
+      fFields.Unbind;
+
+    FNativeDatabaseAccess.Active := False;
+    SetLength(FNativeIndex,0);
+  end;
+end;
+
+{$IFNDEF FPC}
+type
+  PLargeint = ^Largeint;
+  Largeint = Int64;
+{$ENDIF}
+
+function TDAEDataset.GetFieldValues(Index: integer): Variant;
+{$IFNDEF Drivers_CompatibilityMode}
+var
+  data: pointer;
+  Datasize: Cardinal;
+  s: Ansistring;
+{$ENDIF}
+begin
+  if GetFields[Index].ServerCalculated then begin
+    Result := Null;
+  end
+  else begin
+    Index := FNativeIndex[Index];
+    if Index = -1 then
+      Result:= null
+    else begin
+      {$IFDEF Drivers_CompatibilityMode}
+      Result := fNativeDatabaseAccess.GetNativeFieldValue(Index);
+      {$ELSE}
+      {$IFDEF FPC}
+      Data := nil;
+      Datasize := 0;
+      {$ENDIF}
+      if not fNativeDatabaseAccess.GetNativeFieldData(Index, Data, Datasize) then begin
+        Result:= Null;
+      end
+      else begin
+        case fNativeDatabaseAccess.GetFields(Index).DataType of
+          ftString, {$IFDEF DELPHI10UP}ftOraInterval, {$ENDIF}
+          ftFixedChar,
+          ftGuid:        Result := AnsiString(PAnsiChar(Data));
+          ftSmallint:    Result := PSmallint(Data)^;
+          ftInteger:     Result := PInteger(Data)^;
+          ftWord:        Result := PWord(Data)^;
+          ftBoolean:     Result := PWordBool(data)^;
+          ftFloat,
+          ftCurrency:    Result := PDouble(data)^;
+          ftBcd:         Result := PCurrency(data)^;
+          ftDate:        Result := PInteger(Data)^;
+          ftTime:        Result := PInteger(Data)^;
+          ftDateTime:    Result := VarFromDateTime(PDateTime(Data)^);
+          ftBytes,
+          ftVarBytes:    Result := POleVariant(Data)^;
+          ftAutoInc:     Result := PInteger(Data)^;
+          ftBlob..ftTypedBinary, ftOraBlob, ftOraClob{$IFDEF DELPHI10UP}, ftWideMemo{$ENDIF}: begin
+            SetString(s, PChar(Data), DataSize);
+            Result := s;
+          end;
+          ftCursor:      Result := Null;
+          {$IFDEF DA_FixedWideCharSupport}
+          ftFixedWideChar,
+          {$ENDIF}
+          ftWideString:  Result := WideString(PWideChar(Data));
+          ftLargeint:    Result := PLargeint(Data)^;
+          // objects types
+          ftADT, ftArray, ftReference, ftDataSet:
+                         Result := varNull;
+          ftVariant:     Result := PVariant(Data)^;
+          ftInterface:   Result := IUnknown(Data^);
+          ftIDispatch:   Result := IDispatch(Data^);
+          {$IFNDEF FPC}
+          {$IFDEF DELPHI10UP}ftOraTimeStamp,{$ENDIF}
+          ftTimeStamp:   Result := VarFromDateTime(SQLTimeStampToDateTime(PSQLTimeStamp(data)^));
+          {$ENDIF FPC}
+          ftFMTBcd:      Result := BCDToVariant(PBcd(Data)^);
+        end;
+      end;
+      {$ENDIF}
+    end;
+  end;
+end;
+
+function TDAEDataset.GetNames(Index: integer): string;
+begin
+  result := FNativeDatabaseAccess.GetFieldName(Index);
+end;
+
+procedure TDAEDataset.DisableControls;
+begin
+  FNativeDatabaseAccess.DisableControls;
+end;
+
+procedure TDAEDataset.EnableControls;
+begin
+  FNativeDatabaseAccess.EnableControls;
+end;
+
+function TDAEDataset.FieldByName(const aName: string): TDAField;
+begin
+  result := fFields.FieldByName(aName) as TDAField;
+end;
+
+procedure TDAEDataset.FreeBookmark(Bookmark: TBookmark);
+begin
+  FNativeDatabaseAccess.FreeBookmark(Bookmark);
+end;
+
+function TDAEDataset.GetBookMark: pointer;
+begin
+  result := FNativeDatabaseAccess.GetBookmark;
+end;
+
+procedure TDAEDataset.GotoBookmark(Bookmark: TBookmark);
+begin
+  FNativeDatabaseAccess.GotoBookmark(Bookmark);
+end;
+
+procedure TDAEDataset.Refresh;
+begin
+
+end;
+
+function TDAEDataset.GetIsEmpty: boolean;
+begin
+  result := FNativeDatabaseAccess.GetIsEmpty;
+end;
+
+function TDAEDataset.GetState: TDatasetState;
+begin
+  result := FNativeDatabaseAccess.GetState;
+end;
+
+function TDAEDataset.Lookup(const KeyFields: string;
+  const KeyValues: Variant; const ResultFields: string): Variant;
+begin
+  result := FNativeDatabaseAccess.Lookup(KeyFields, KeyValues, ResultFields);
+end;
+
+function TDAEDataset.GetLogicalName: string;
+begin
+  result := fLogicalName;
+end;
+
+function TDAEDataset.FindField(const aName: string): TDAField;
+begin
+  result := fFields.FindField(aName) as TDAField;
+end;
+
+procedure TDAEDataset.SetLogicalName(aName: string);
+begin
+  fLogicalName := aName
+end;
+
+function TDAEDataset.GetOnAfterOpen: TDAAfterOpenDatasetEvent;
+begin
+  result := fOnAfterOpen
+end;
+
+function TDAEDataset.GetOnBeforeOpen: TDABeforeOpenDatasetEvent;
+begin
+  result := fOnBeforeOpen
+end;
+
+procedure TDAEDataset.SetOnAfterOpen(
+  const Value: TDAAfterOpenDatasetEvent);
+begin
+  fOnAfterOpen := Value
+end;
+
+procedure TDAEDataset.SetOnBeforeOpen(
+  const Value: TDABeforeOpenDatasetEvent);
+begin
+  fOnBeforeOpen := Value
+end;
+
+function TDAEDataset.GetOnOpenError: TDAOpenDatasetErrorEvent;
+begin
+  result := fOnOpenError;
+end;
+
+procedure TDAEDataset.SetOnOpenError(
+  const Value: TDAOpenDatasetErrorEvent);
+begin
+  fOnOpenError := Value;
+end;
+
+function TDAEDataset.GetCurrentRecIdValue: integer;
+begin
+  result := -1;
+end;
+
+procedure TDAEDataset.SetCurrentRecIdValue(Value: integer);
+begin
+
+end;
+
+function TDAEDataset.GetRowRecIdValue: integer;
+begin
+  result := -1
+end;
+
+procedure TDAEDataset.DisableConstraints;
+begin
+  // do nothing
+end;
+
+procedure TDAEDataset.EnableConstraints;
+begin
+  // do nothing
+end;
+
+{
+procedure TDAEDataset.CreateFieldDefs;
+var
+  i: integer;
+  fld: TFieldDef;
+  dafld: TDAField;
+  lNeedtoCreateFieldDefs: Boolean;
+  lFMTBCDPresent: Boolean;
+begin
+  lNeedtoCreateFieldDefs:=fDataset.FieldDefs.Count=0;
+  lFMTBCDPresent:=False;
+  // Adds the data fields (non calculated) to the FieldDefs
+  for i := 0 to (fFields.Count - 1) do begin
+    dafld:=fFields[i];
+    if dafld.Calculated or dafld.Lookup then Continue; // Added as fields later
+    if lNeedtoCreateFieldDefs then begin
+      fld := fDataset.FieldDefs.AddFieldDef;
+      fld.Name := dafld.Name;
+      fld.DataType := DATypeToVCLType(dafld.DataType);
+    end
+    else begin
+      fld := TFieldDef(fDataset.FieldDefs.Find(dafld.Name));
+    end;
+
+    // (autoinc)
+    if (dafld.DataType=datLargeAutoInc) then fld.DataType := ftLargeint
+    else if (dafld.DataType=datAutoInc) then fld.DataType := ftInteger;
+
+    if (fld.DataType = ftString) or (fld.DataType = ftWideString) then fld.Size := dafld.Size;
+    if (fld.DataType = ftGuid) then fld.Size := 38;
+    if (fld.DataType = ftFMTBcd) then begin
+      fld.Size:=dafld.DecimalScale;
+      fld.Precision:=dafld.DecimalPrecision;
+      lFMTBCDPresent:= True;
+    end;
+  end;
+  if not lFMTBCDPresent then fDataset.FieldDefs.Clear;
+  // Creates the data fields
+  for i := 0 to (fDataset.FieldDefs.Count - 1) do
+    fDataset.FieldDefs[i].CreateField(fDataset).DataSet := fDataset;
+end;
+}
+function TDAEDataset.IsNeedToFixFMTBCDIssue: Boolean;
+begin
+  Result:= False;
+end;
+
+procedure TDAEDataset.FixFMTBCDIssue;
+{$IFDEF ftFMTBCD_Support}
+var
+  i: integer;
+  lNeedToFix: Boolean;
+  fld: TFieldDef;
+  dafld: TDAField;
+{$ENDIF}
+begin
+{$IFDEF ftFMTBCD_Support}
+// this only for DBX driver => DatasetCompatible
+  if IsTDatasetCompatible then begin
+    lNeedToFix:= False;
+    for i:=0 to fDataset.FieldCount-1 do
+      if (fDataset.Fields[i].DataType = ftFMTBcd) and
+         (TFMTBCDField(fDataset.Fields[i]).Precision=15) and
+         (TFMTBCDField(fDataset.Fields[i]).Size=4) then begin
+        lNeedToFix:=True;
+        Break;
+      end;
+    if not lNeedToFix then Exit;
+    FNativeDatabaseAccess.Active := False;
+    for i := 0 to (fDataset.FieldDefs.Count - 1) do begin
+      fld := fDataset.FieldDefs[i];
+      if (fld.DataType = ftFMTBcd) then begin
+        dafld:= fFields.FindField(fld.Name);
+         if (fld.Precision = 15 ) and (fld.Size=4) then begin
+          if (dafld <> nil) and (dafld.DataType = datDecimal) then begin
+            fld.Precision := dafld.DecimalPrecision;
+            fld.Size := dafld.DecimalScale;
+          end else begin
+            fld.Precision := 24;
+            fld.Size := 8;
+          end;
+        end;
+      end;
+    end;
+    FNativeDatabaseAccess.Active := True;
+  end;
+{$ENDIF}
+end;
+
+procedure TDAEDataset.FixKnownIssues;
+begin
+  if IsNeedToFixFMTBCDIssue then FixFMTBCDIssue;
+end;
+
+function TDAEDataset.ControlsDisabled: Boolean;
+begin
+  Result := FNativeDatabaseAccess.ControlsDisabled;
+end;
+
+function TDAEDataset.GetNativeFieldData(Index: Integer; var Data: pointer;
+  var DataSize: cardinal): Boolean;
+begin
+  if GetFields[Index].ServerCalculated then begin
+    Result := False;
+    Data := nil;
+    DataSize := 0;
+  end
+  else begin
+    Result := inherited GetNativeFieldData(FNativeIndex[Index], Data, DataSize);
+  end;
+end;
+
+{ TDAESQLCommand }
+
+constructor TDAESQLCommand.Create(aConnection: TDAEConnection; const aName: string = '');
+var
+  id: TGUID;
+begin
+  inherited Create;
+
+  fName := aName;
+  if (fName = '') then begin
+    CreateGUID(id);
+    fName := GUIDToString(id);
+  end;
+
+  fWhere := TDAWhere.Create(nil, FALSE);
+  fDynamicWhere:= nil;// aConnection.GetWhereBuilder;
+  fConnection := aConnection;
+  fconn := aConnection; // increasing Refcount
+  fParams := TDAParamCollection.Create(nil);
+  fDataset := CreateDataset(fConnection);
+  FNativeObject := CreateNativeObject(fConnection);
+  FNativeDatabaseAccess := CreateNativeDatabaseAccess;
+end;
+
+destructor TDAESQLCommand.Destroy;
+begin
+  fconn := nil; // decreasing Refcount
+  FNativeDatabaseAccess:=nil;
+  if FNativeObject <> fDataset then FreeAndNil(FNativeObject) else FNativeObject := nil;
+  FreeAndNil(fDataset);
+  FreeAndNil(fParams);
+  FreeAndNil(fWhere);
+  FreeAndNil(fDynamicWhere);
+  inherited;
+end;
+
+{$WARN SYMBOL_DEPRECATED OFF}
+function TDAESQLCommand.GetWhere: TDAWhere;
+begin
+  result := fWhere;
+end;
+{$WARN SYMBOL_DEPRECATED ON}
+
+function TDAESQLCommand.GetParams: TDAParamCollection;
+begin
+  result := fParams;
+end;
+
+function TDAESQLCommand.ParamByName(const aName: string): TDAParam;
+begin
+  result := fParams.ParamByName(aName)
+end;
+
+procedure TDAESQLCommand.RefreshParams;
+var
+  lParams: TParams;
+  i: integer;
+  par: TDAParam;
+begin
+  //dsparams := GetProviderSupport.PSGetParams;
+
+  lParams := TParams.Create;
+  try
+    Params_ParseSQL(lParams, fSQL, True, fConnection.GetQuoteChars);
+
+    fParams.Clear;
+    for i := 0 to (lParams.Count - 1) do begin
+      if fParams.FindParam(lParams[i].Name) <> nil then Continue;
+      par := fParams.Add;
+      par.Name := lParams[i].Name;
+      par.DataType := intVCLTypeToDAType(lParams[i].DataType);
+      par.ParamType := TDAParamType(lParams[i].ParamType);
+      par.Size := lParams[i].Size;
+    end;
+  finally
+    lParams.Free;
+  end;
+end;
+
+procedure TDAESQLCommand.SetPrepared(Value: boolean);
+begin
+  if (fPrepared <> Value) then begin
+    fPrepared := Value;
+    if fPrepared then PrepareSQLStatement();
+  end;
+end;
+
+function TDAESQLCommand.GetPrepared: boolean;
+begin
+  result := fPrepared;
+end;
+
+procedure TDAESQLCommand.OnWhereChange(Sender: TObject);
+begin
+  Changed := true;
+  PrepareSQLStatement();
+end;
+
+function TDAESQLCommand.Execute: integer;
+var
+  startTick: cardinal;
+begin
+  //result := -1;
+  // Combines the custom WHERE statement and modifies the inner SQL
+  if fChanged then PrepareSQLStatement;
+
+  // Writes the parameter values
+  if (fParams.Count > 0) then SetParamValues(fParams) else ClearParams;
+
+  startTick := ROGetTickCount;
+  if Assigned(fOnBeforeExecute) then fOnBeforeExecute(Self);
+
+  try
+    result := DoExecute;
+  except
+    on E:Exception do begin
+      if Assigned(fOnExecuteError) then fOnExecuteError(Self, DoGetSQL, E);
+      raise;
+    end;
+  end;
+  GetParamValues(fParams);
+
+  if Assigned(fOnAfterExecute)
+    then fOnAfterExecute(Self, DoGetSQL, ROGetTickCount-startTick);
+end;
+
+procedure TDAESQLCommand.PrepareSQLStatement;
+var
+  temp, sql, wheretext: string;
+  orderbypos, wherepos: integer;
+  i: integer;
+  s: string;
+begin
+  // Commented out because done above now
+  //if not fChanged then Exit; // Avoids resetting it or repreparing
+
+  sql := fSQL;
+  try
+    fWhere.Changed := False;
+    if (fWhere.Clause = '') then Exit;
+    temp := UpperCase(sql);
+
+    // TODO: Not exactly the best way to do it. Might conflict with a field name that contains WHERE and might
+    // not work if the user writes "ORDER    BY"... We'll fix later with a tokenizer or a real parser of some sort
+    orderbypos := Pos('GROUP BY', temp);
+    if (orderbypos = 0)
+      then orderbypos := Pos('ORDER BY', temp);
+    wherepos := Pos('WHERE', temp);
+
+    if (wherepos > 0) then
+      wheretext := ' AND (' + fWhere.Clause + ') '
+    else
+      wheretext := ' WHERE ' + fWhere.Clause + ' ';
+
+    if (orderbypos > 0) then
+      Insert(wheretext, sql, orderbypos) // Adds it before the Order By
+    else
+      Insert(wheretext, sql, Length(sql) + 1); // Adds it at the end since there's no Order By
+
+  finally
+    // Sets the SQL of the wrapped dataset
+    if Assigned(fConnection.fMacroProcessor) then begin
+
+      i := fConnection.fMacroProcessor.IndexOfName('Where');
+      s := GenerateDynamicWhereStatement;
+      if i = -1 then
+        fConnection.fMacroProcessor.AddVariable('Where').Value:=s
+      else
+        fConnection.fMacroProcessor.Variable[i].Value:=s;
+      SetDynamicWhereParams;
+
+
+      sql := fConnection.fMacroProcessor.Eval(sql);
+    end;
+
+    DoSetSQL(sql);
+    DoPrepare(fPrepared);
+
+    Changed := false;
+  end;
+end;
+
+function TDAESQLCommand.GetSQL: string;
+begin
+  result := fSQL
+end;
+
+procedure TDAESQLCommand.SetSQL(const Value: string);
+begin
+  if Value <> fSQL then begin
+    fSQL := Value;
+    fChanged := true;
+    FNativeDatabaseAccess.ClearFieldDefs;
+    PrepareSQLStatement();
+  end;
+end;
+
+function TDAESQLCommand.GetDataset: TDataset;
+begin
+  result := fDataset;
+end;
+
+function TDAESQLCommand.GetName: string;
+begin
+  result := fName;
+end;
+
+function TDAESQLCommand.GetOnAfterExecute: TDAAfterExecuteCommandEvent;
+begin
+  result := fOnAfterExecute
+end;
+
+function TDAESQLCommand.GetOnBeforeExecute: TDABeforeExecuteCommandEvent;
+begin
+  result := fOnBeforeExecute
+end;
+
+procedure TDAESQLCommand.SetOnAfterExecute(
+  const Value: TDAAfterExecuteCommandEvent);
+begin
+  fOnAfterExecute := Value
+end;
+
+procedure TDAESQLCommand.SetOnBeforeExecute(
+  const Value: TDABeforeExecuteCommandEvent);
+begin
+  fOnBeforeExecute := Value
+end;
+
+function TDAESQLCommand.GetOnExecuteError: TDAExecuteCommandErrorEvent;
+begin
+  result := fOnExecuteError;
+end;
+
+procedure TDAESQLCommand.SetOnExecuteError(
+  const Value: TDAExecuteCommandErrorEvent);
+begin
+  fOnExecuteError := Value;
+end;
+
+function TDAESQLCommand.intVCLTypeToDAType(
+  aFieldType: TFieldType): TDADataType;
+begin
+  Result := VCLTypeToDAType(aFieldType);
+end;
+
+function TDAESQLCommand.GetDynamicWhere: TDAWhereBuilder;
+begin
+  if fDynamicWhere = nil then fDynamicWhere := Connection.GetWhereBuilder;
+  Result:=fDynamicWhere;
+end;
+
+procedure TDAESQLCommand.SetDynamicWhere(const Value: TDAWhereBuilder);
+begin
+  if Value <> nil then
+    GetDynamicWhere.Xml := Value.Xml
+  else if fDynamicWhere <> nil then       
+    FDynamicWhere.Clear;
+end;
+
+function TDAESQLCommand.GenerateDynamicWhereStatement: string;
+begin
+  if (fDynamicWhere <> nil) and not fDynamicWhere.IsEmpty then Result := fDynamicWhere.CreateWhereClause;
+  if Result = '' then Result:= ' (1=1)';
+end;
+
+function TDAESQLCommand.SQLContainsDynamicWhere: boolean;
+var
+  mac: IDAHasMacroProcessor;
+  lmp: TDASQLMacroProcessor;
+begin
+  FIsPresentDynWhereVariable:=False;
+  if Supports(fConnection, IDAHasMacroProcessor, mac) and (mac.GetMacroProcessor <> nil) then begin
+    lmp:=TDASQLMacroProcessor(mac.GetMacroProcessor.NewInstance).Create;
+    With lmp do try
+      OnUnknownIdentifier := UnknownIdentifier;
+      Eval(GetSQL);
+    finally
+      Free;
+    end;
+  end;
+  Result:= FIsPresentDynWhereVariable;
+end;
+
+function TDAESQLCommand.UnknownIdentifier(Sender: TObject; const Name,
+  OrgName: string; var Value: string): Boolean;
+begin
+  if SameText(OrgName,'WHERE') then
+    FIsPresentDynWhereVariable:=True;
+  Value := OrgName;
+  Result := True;
+end;
+
+procedure TDAESQLCommand.SetDynamicWhereParams;
+var
+  i: integer;
+  k: TDAParam;
+begin
+  if fDynamicWhere <> nil then
+    For i:=0 to fDynamicWhere.Params.Count-1 do begin
+      k:=Self.GetParams.FindParam(fDynamicWhere.Params[i].Name);
+      if k = nil then k:= Self.GetParams.Add;
+      k.AssignField(fDynamicWhere.Params[i]);
+    end;
+end;
+
+procedure TDAESQLCommand.RemoveDynamicWhereParams;
+var
+  i: integer;
+  k: TDAParam;
+begin
+  if fDynamicWhere <> nil then
+    For i:=0 to fDynamicWhere.Params.Count-1 do begin
+      k := Self.GetParams.FindParam(fDynamicWhere.Params[i].Name);
+      if k <> nil then Self.GetParams.Delete(k.Index);
+    end;
+end;
+
+procedure TDAESQLCommand.SetParamValuesStd(Params1: TDAParamCollection;
+  Params2: TParams);
+var
+  i: integer;
+  par: TDAParam;
+  outpar: TParam;
+  ft:     TFieldType;
+  lParIsEmpty: Boolean;
+begin
+  for i := 0 to (Params1.Count - 1) do begin
+    par := Params1[i];
+    outpar := FindParameter(Params2,par.Name);
+    ft := DATypeToVCLType(par.DataType);
+
+    if ft = ftAutoInc then ft := ftInteger;
+
+    case par.ParamType of
+      daptInput: outpar.ParamType := ptInput;
+      daptOutput: outpar.ParamType := ptOutput;
+      daptInputOutput: outpar.ParamType := ptInputOutput;
+      daptResult: outpar.ParamType := ptResult;
+    end;
+
+    lParIsEmpty := VarIsEmpty(par.Value) or VarIsNull(par.Value);
+
+    if par.DataType = datBlob then begin
+      outpar.DataType := ftBlob;
+      if not (par.ParamType in [daptOutput, daptResult]) then begin
+        if lParIsEmpty then
+           outpar.Value := Null
+        else
+           outpar.Value := VariantBinaryToString(par.Value);
+      end;
+    end
+    else begin
+      if (outpar.DataType <> ft) and (ft <> ftUnknown) then outpar.DataType := ft;
+      if not (par.ParamType in [daptOutput, daptResult]) then outpar.Value := par.Value;
+    end;
+
+    if lParIsEmpty and (par.DataType <> datUnknown) then begin
+      if (outpar.DataType <> ft) and (ft <> ftUnknown) then outpar.DataType := ft;
+    end;
+  end;
+end;
+
+procedure TDAESQLCommand.GetParamValuesStd(Params1: TDAParamCollection;
+  Params2: TParams);
+var
+  i: integer;
+  par1: TDAParam;
+begin
+  for i := 0 to Params1.Count-1 do begin
+    par1 := Params1[i];
+    if Par1.ParamType in [daptOutput, daptInputOutput, daptResult] then
+      Par1.Value := FindParameter(Params2,Par1.Name).Value;
+  end;
+end;
+
+function TDAESQLCommand.FindParameter(const AParams: TParams;
+  const AParamName: string): TParam;
+begin
+  Result := AParams.FindParam(AParamName);
+  if Result = nil then
+     Result := AParams.FindParam('@'+AParamName);
+  if Result = nil then begin
+    if AParams.Owner is TDataSet then
+      DatabaseErrorFmt(SParameterNotFound, [AParamName], TComponent(AParams.Owner))
+    else
+      DatabaseErrorFmt(SParameterNotFound, [AParamName])
+  end;
+end;
+
+procedure TDAESQLCommand.ClearParams;
+begin
+// nothing
+end;
+
+
+function TDAESQLCommand.GetNativeObject: TObject;
+begin
+  Result:= FNativeObject;
+end;
+
+function TDAESQLCommand.CreateNativeObject(
+  aConnection: TDAEConnection): TObject;
+begin
+  Result:= fDataset;
+end;
+
+function TDAESQLCommand.CreateNativeDatabaseAccess: IDANativeDatabaseAccess;
+begin
+  Result := TDANativeDatabaseAccess_Dataset.Create(GetDataset);
+end;
+
+function TDAESQLCommand.NativeFieldCount: Integer;
+begin
+  Result := FNativeDatabaseAccess.FieldCount;
+end;
+
+function TDAESQLCommand.NativeFindField(const FieldName: string): IDANativeField;
+begin
+  Result := FNativeDatabaseAccess.FindField(FieldName);
+end;
+
+function TDAESQLCommand.GetNativeFields(Index: integer): IDANativeField;
+begin
+  Result := FNativeDatabaseAccess.GetFields(Index);
+end;
+
+function TDAESQLCommand.IsTDatasetCompatible: Boolean;
+begin
+  Result :=FNativeDatabaseAccess.IsTDatasetCompatible;
+end;
+
+function TDAESQLCommand.GetNativeFieldData(Index: Integer; var Data: pointer; var DataSize: cardinal):Boolean;
+begin
+  Result := FNativeDatabaseAccess.GetNativeFieldData(Index, Data, DataSize);
+end;
+
+function TDAESQLCommand.CanFreeNativeFieldData: Boolean;
+begin
+  Result := FNativeDatabaseAccess.CanFreeNativeFieldData;
+end;
+
+{ TDAEStoredProcedure }
+
+function TDAEStoredProcedure.CreateNativeDatabaseAccess: IDANativeDatabaseAccess;
+begin
+  Result := nil;
+end;
+
+procedure TDAEStoredProcedure.DoPrepare(Value: boolean);
+begin
+  // Stored procs don't need to be prepared
+end;
+
+procedure TDAEStoredProcedure.PrepareSQLStatement;
+begin
+  // Stored procs don't need to be prepared
+end;
+
+procedure TDAEStoredProcedure.RefreshParams;
+begin
+  raise Exception.Create('RefreshParams must be implemented in descendant.');
+end;
+
+procedure TDAEStoredProcedure.RefreshParamsStd(AParams: TParams);
+var
+  par: TDAParam;
+  i: integer;
+  lname:string;
+begin
+  fParams.Clear;
+  for i := 0 to (AParams.Count - 1) do begin
+    if (AParams[i].DataType = ftInterface) and (AParams[I].ParamType in [ptOutput, ptInputOutput, ptResult]) then Continue;
+    par := fParams.Add;
+    lName :=AParams[i].Name;
+    if Pos('@', lname) = 1 then lName:=copy(lName,2, Length(lName)-1);
+    par.Name := lName;
+    par.DataType := intVCLTypeToDAType(AParams[i].DataType);
+    par.ParamType := TDAParamType(AParams[i].ParamType);
+    par.Size := AParams[i].Size;
+  end;
+end;
+
+procedure TDAEStoredProcedure.SetSQL(const Value: string);
+begin
+  // nothing:  it's removing usage of IDANativeDatabaseAccess
+end;
+
+{ TDASQLMacroProcessor }
+
+constructor TDASQLMacroProcessor.Create(const aDateFormat, aDateTimeFormat: string;
+  aDoubleQuoteStrings: boolean;
+  const aStoredProcParamsPrefix: string = '');
+begin
+  Create;
+  fDateFormat := aDateFormat;
+  fDateTimeFormat := aDateTimeFormat;
+  fDoubleQuoteStrings := aDoubleQuoteStrings;
+  fStoredProcParamPrefix := aStoredProcParamsPrefix;
+  RegisterMacros;
+end;
+
+function TDASQLMacroProcessor.FormatDate(Sender: TObject;
+  const Parameters: array of string): string;
+var
+  dte: TDateTime;
+begin
+  dte := StrToDate(StringReplace(Parameters[0], '''', '', [rfReplaceAll]));
+
+  if fDoubleQuoteStrings then
+    result := '"' + SysUtils.FormatDateTime(fDateFormat, dte) + '"'
+  else
+    result := '''' + SysUtils.FormatDateTime(fDateFormat, dte) + '''';
+end;
+
+function TDASQLMacroProcessor.FormatDateTime(Sender: TObject;
+  const Parameters: array of string): string;
+var
+  dte: TDateTime;
+begin
+  dte := StrToDateTime(StringReplace(Parameters[0], '''', '', [rfReplaceAll]));
+
+  if fDoubleQuoteStrings then
+    result := '"' + SysUtils.FormatDateTime(fDateTimeFormat, dte) + '"'
+  else
+    result := '''' + SysUtils.FormatDateTime(fDateTimeFormat, dte) + '''';
+end;
+
+procedure TDASQLMacroProcessor.RegisterMacros;
+begin
+  RegisterProc('Date', Date, 0);
+  RegisterProc('DateTime', DateTime, 0);
+  RegisterProc('AddTime', AddTime, 3);
+  RegisterProc('FormatDateTime', FormatDateTime, 1);
+  RegisterProc('FormatDate', FormatDate, 1);
+  RegisterProc('Length', Length, 1);
+  RegisterProc('LowerCase', LowerCase, 1);
+  RegisterProc('UpperCase', UpperCase, 1);
+  RegisterProc('TrimLeft', TrimLeft, 1);
+  RegisterProc('TrimRight', TrimRight, 1);
+  RegisterProc('Copy', Copy, 3);
+  RegisterProc('NoLockHint', NoLock, 0);
+end;
+
+constructor TDASQLMacroProcessor.Create;
+begin
+  inherited Create;
+  OnUnknownIdentifier := MyUnknownIdentifier;
+end;
+
+function TDASQLMacroProcessor.Date(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := Self.DateTime(Sender, Parameters);
+end;
+
+function TDASQLMacroProcessor.MyUnknownIdentifier(Sender: TObject;
+  const Name, OrgName: string; var Value: string): Boolean;
+begin
+  Value := OrgName;
+  Result := True;
+end;
+
+{ TDAConnectionWrapper }
+
+procedure TDAConnectionWrapper.DoConnect;
+begin
+  SetConnected(TRUE);
+end;
+
+procedure TDAConnectionWrapper.DoDisconnect;
+begin
+  SetConnected(FALSE);
+end;
+
+{$IFDEF MSWINDOWS}
+{ TDAEngineBaseObject }
+
+function TDAEngineBaseObject.InterfaceSupportsErrorInfo(const iid: TGUID): HRESULT;
+begin
+  if GetInterfaceEntry(iid) <> nil then
+    Result := S_OK
+  else
+    Result := S_FALSE;
+end;
+
+procedure TDAEngineBaseObject.OnException(const ServerClass, ExceptionClass, ErrorMessage: WideString;
+                                          ExceptAddr: Integer; const ErrorIID, ProgID: WideString;
+                                          var Handled: Integer; var Result: HRESULT);
+begin
+
+end;
+
+const
+  DA_ERROR_ID : TGUID = '{E479A438-2640-41D2-9DC6-1560C1D08B79}';
+
+function StringToWidestring(const aString: string): WideString;
+var
+  I: Integer;
+begin
+  SetLength(Result, Length(aString));
+  for i := 1 to Length(aString)-1 do
+    Result[i] := WideChar(aString[I]);
+end;
+
+function DAHandleSafeCallException(aObject:TObject; ExceptObject: TObject; ExceptAddr: Pointer): HResult;
+var
+  lClassName: string;
+  E: TObject;
+  CreateError: ICreateErrorInfo;
+  ErrorInfo: IErrorInfo;
+begin
+  {$IFDEF FPC}
+  if ExceptObject <> nil then Result := E_UNEXPECTED else // remove warnings
+  {$ENDIF}
+  Result := E_UNEXPECTED;
+  E := ExceptObject;
+  if Succeeded(CreateErrorInfo(CreateError)) then begin
+    CreateError.SetGUID(DA_ERROR_ID);
+    lClassName := aObject.ClassName;
+    if MainInstance <> HInstance then
+      lClassname := Format('%s in %s',[lClassName,ExtractFileName({$IFDEF FPC}ParamStr(0){$ELSE}GetModuleName(hInstance){$ENDIF})]);
+    CreateError.SetSource(PWideChar(StringToWidestring(E.ClassName+': '+lClassName)));
+    if E is Exception then begin
+      CreateError.SetDescription(PWideChar(WideString(Exception(E).Message)));
+      CreateError.SetHelpContext(Exception(E).HelpContext);
+      if (E is EOleSysError) and (EOleSysError(E).ErrorCode < 0) then
+        Result := EOleSysError(E).ErrorCode;
+    end;
+    if CreateError.QueryInterface(IErrorInfo, ErrorInfo) = S_OK then
+      SetErrorInfo(0, ErrorInfo);
+  end;
+end;
+
+function TDAEngineBaseObject.SafeCallException(ExceptObject: TObject; ExceptAddr: Pointer): HResult;
+begin
+  Result := DAHandleSafeCallException(self, ExceptObject, ExceptAddr);
+end;
+
+procedure DASafeCallError(ErrorCode: Integer; ErrorAddr: Pointer);
+var
+  lExceptionClass: ExceptClass;
+  p: Integer;
+  lSource: WideString;
+  ErrorInfo: IErrorInfo;
+  lDescription: WideString;
+  lGuid: TGUID;
+begin
+  if GetErrorInfo(0, ErrorInfo) = S_OK then begin
+    ErrorInfo.GetDescription(lDescription);
+    ErrorInfo.GetGUID(lGuid);
+    if IsEqualGUID(lGuid,DA_ERROR_ID) then begin
+      ErrorInfo.GetSource(lSource);
+      p := Pos(':', lSource);
+      if p > 0 then begin
+        lExceptionClass := GetExceptionClass(copy(lSource,1,p-1));
+        if Assigned(lExceptionClass) then
+          raise lExceptionClass.Create(lDescription);
+      end;
+    end;
+    raise Exception.Create(lDescription) at ErrorAddr;
+  end
+  else begin
+    raise Exception.Create('A "safecall" error occured, but the source object did not provide the proper error information. Sorry we cannot be more helpful at this time.') at ErrorAddr;
+  end;
+end;
+{$ENDIF MSWINDOWS}
+
+{ TDANativeDatabaseAccess_Dataset }
+
+function TDANativeDatabaseAccess_Dataset.CanFreeNativeFieldData: Boolean;
+begin
+  Result := True;
+end;
+
+procedure TDANativeDatabaseAccess_Dataset.ClearFieldDefs;
+begin
+  FDataset.FieldDefs.Clear;
+end;
+
+function TDANativeDatabaseAccess_Dataset.ControlsDisabled: Boolean;
+begin
+  Result := FDataset.ControlsDisabled;
+end;
+
+constructor TDANativeDatabaseAccess_Dataset.Create(ADataset: TDataSet);
+begin
+  inherited Create;
+  if ADataset = nil then DatabaseError('A dataset must be specified.');
+  FDataset := ADataset;
+  FList := TInterfaceList.Create;
+end;
+
+destructor TDANativeDatabaseAccess_Dataset.Destroy;
+begin
+  FList.Free;
+  inherited;
+end;
+
+procedure TDANativeDatabaseAccess_Dataset.DisableControls;
+begin
+  FDataset.DisableControls;
+end;
+
+procedure TDANativeDatabaseAccess_Dataset.EnableControls;
+begin
+  FDataset.EnableControls;
+end;
+
+function TDANativeDatabaseAccess_Dataset.FieldCount: Integer;
+begin
+  Result := FDataset.FieldCount;
+end;
+
+function TDANativeDatabaseAccess_Dataset.FindField(
+  const FieldName: string): IDANativeField;
+begin
+  Result := FList[FDataset.FindField(FieldName).Index] as IDANativeField;
+end;
+
+procedure TDANativeDatabaseAccess_Dataset.FreeBookmark(
+  Bookmark: TBookmark);
+begin
+  FDataset.FreeBookmark(Bookmark);
+end;
+
+function TDANativeDatabaseAccess_Dataset.GetActive: Boolean;
+begin
+  Result := FDataset.Active;
+end;
+
+function TDANativeDatabaseAccess_Dataset.GetBOF: Boolean;
+begin
+  Result := FDataset.Bof;
+end;
+
+function TDANativeDatabaseAccess_Dataset.GetBookMark: pointer;
+begin
+  Result := FDataset.GetBookmark;
+end;
+
+function TDANativeDatabaseAccess_Dataset.GetEOF: Boolean;
+begin
+  Result := FDataset.Eof;
+end;
+
+function TDANativeDatabaseAccess_Dataset.GetFieldName(
+  Index: Integer): string;
+begin
+  result := fDataset.Fields[Index].FieldName;
+end;
+
+function TDANativeDatabaseAccess_Dataset.GetFields(
+  Index: integer): IDANativeField;
+begin
+  Result := FList[Index] as IDANativeField;
+end;
+
+function TDANativeDatabaseAccess_Dataset.GetIsEmpty: boolean;
+begin
+  result := fDataset.IsEmpty;
+end;
+
+function TDANativeDatabaseAccess_Dataset.GetNativeFieldData(Index: Integer;
+  var Data:Pointer; var DataSize: cardinal): Boolean;
+var
+  str: TStream;
+  fld: TField;
+  {$IFNDEF DELPHI10UP}
+  temp: pointer;
+  {$ENDIF DELPHI10UP}
+begin
+  Data := nil;
+  DataSize := 0;
+  fld:= FDataset.Fields[Index];
+  try
+    if fld.IsBlob then begin
+      Str:= FDataset.CreateBlobStream(fld, bmRead);
+      try
+        DataSize := str.Size;
+        GetMem(Data, DataSize);
+        str.Read(Data^,Datasize);
+      finally
+        Str.Free;
+      end;
+      Result := True;
+    end
+    else if fld.DataType in [ftADT, ftArray, ftReference, ftDataSet] then begin
+      // not supported yet
+      Result := False;
+    end
+    else begin
+      DataSize := fld.DataSize;
+      GetMem(Data, DataSize);
+      {$IFNDEF DELPHI10UP}
+      if fld.DataType = ftWideString then FillChar(Data^,DataSize,0);
+      {$ENDIF DELPHI10UP}
+      Result := FDataset.GetFieldData(fld, Data, False);
+      case fld.DataType of
+        ftString,ftFixedChar: DataSize := StrLen(PAnsiChar(Data));
+        {$IFNDEF DELPHI10UP}
+        ftWideString: begin
+          DataSize := Length(PWideString(Data)^);
+          GetMem(temp, (DataSize+1)*SizeOf(WideChar));
+          Move(PWideChar(Data^)^, PWideChar(temp)^, datasize * SizeOf(WideChar));
+          PWideChar(temp)[datasize] := #0;
+          FreeMem(Data);
+          data := temp;
+          datasize := DataSize*SizeOf(WideChar);
+        end;
+        {$ENDIF DELPHI10UP}
+      end;
+    end;
+  except
+    raise;
+  end;
+end;
+
+function TDANativeDatabaseAccess_Dataset.GetNativeFieldValue(
+  Index: Integer): Variant;
+var
+  fld: TField;
+begin
+  fld := FDataset.Fields[Index];
+  if fld.IsNull then
+    Result := Null
+  else
+    case fld.DataType of
+      ftBcd:         Result := fld.AsCurrency;
+      {$IFNDEF FPC}
+      ftFMTBcd:      Result := DecimalToString(BCDToDecimal(fld.AsBCD),DecimalSeparator);
+      ftWideString:  Result := TWideStringField(fld).Value;
+      {$IFDEF DELPHI10UP}ftOraTimeStamp,{$ENDIF}
+      ftTimeStamp:   Result := VarFromDateTime(fld.AsDateTime);
+      {$ENDIF FPC}
+      {$IFDEF DELPHI10UP}
+      ftWideMemo:    result := TWideMemoField(fld).Value;
+      {$ENDIF DELPHI10UP}
+    else
+      Result := fld.Value;
+    end;
+end;
+
+function TDANativeDatabaseAccess_Dataset.GetRecordCount: Integer;
+begin
+  Result := FDataset.RecordCount;
+end;
+
+function TDANativeDatabaseAccess_Dataset.GetState: TDatasetState;
+begin
+  Result := FDataset.State;
+end;
+
+procedure TDANativeDatabaseAccess_Dataset.GotoBookmark(
+  Bookmark: TBookmark);
+begin
+  FDataset.GotoBookmark(Bookmark);
+end;
+
+function TDANativeDatabaseAccess_Dataset.IsTDatasetCompatible: Boolean;
+begin
+  Result := True;
+end;
+
+function TDANativeDatabaseAccess_Dataset.Locate(const KeyFields: string;
+  const KeyValues: Variant; Options: TLocateOptions): Boolean;
+begin
+  Result := FDataset.Locate(KeyFields, KeyValues, Options);
+end;
+
+function TDANativeDatabaseAccess_Dataset.Lookup(const KeyFields: string;
+  const KeyValues: Variant; const ResultFields: string): Variant;
+begin
+  Result := FDataset.Lookup(KeyFields, KeyValues, ResultFields);
+end;
+
+procedure TDANativeDatabaseAccess_Dataset.Next;
+begin
+  FDataset.Next;
+end;
+
+procedure TDANativeDatabaseAccess_Dataset.Prepare(const AValue: Boolean);
+begin
+  SetPropValue(fDataset, 'Prepared', aValue); // Works with ADO and IBX for now
+end;
+
+procedure TDANativeDatabaseAccess_Dataset.SetActive(const aValue: Boolean);
+var
+  i: integer;
+begin
+  fList.Clear;
+  FDataset.Active := aValue;
+  if FDataset.Active then
+    for i:=0 to FDataset.FieldCount-1 do
+      fList.Add(TDANativeField_Dataset.Create(FDataset.Fields[i]));
+end;
+
+{ TDANativeField_Dataset }
+
+constructor TDANativeField_Dataset.Create(AField: TField);
+begin
+  Inherited Create();
+  FField:= AField;
+end;
+
+function TDANativeField_Dataset.GetDataType: TFieldType;
+begin
+  Result := fField.DataType;
+end;
+
+function TDANativeField_Dataset.GetDecimalPrecision: Integer;
+begin
+{$IFDEF ftFMTBCD_Support}
+  if (fField is TFMTBCDField) then
+    Result := TFMTBCDField(fField).Precision
+  else
+{$ENDIF}
+  if (fField is TBCDField) then
+    Result := TBCDField(fField).Precision
+  else
+    Result := 0;
+end;
+
+function TDANativeField_Dataset.GetDecimalScale: Integer;
+begin
+{$IFDEF ftFMTBCD_Support}
+  if (fField is TFMTBCDField) then
+    Result := TFMTBCDField(fField).Size
+  else
+{$ENDIF FPC}
+  if (fField is TBCDField) then
+    Result := TBCDField(fField).Size
+  else
+    Result := 0;
+end;
+
+function TDANativeField_Dataset.GetFieldIndex: integer;
+begin
+  Result := fField.Index;
+end;
+
+function TDANativeField_Dataset.GetFieldName: string;
+begin
+  Result := fField.FieldName;
+end;
+
+function TDANativeField_Dataset.GetNativeObject: TObject;
+begin
+  Result := FField;
+end;
+
+function TDANativeField_Dataset.GetSize: integer;
+begin
+  Result := fField.Size;
+end;
+
+function TDANativeField_Dataset.GetValue: Variant;
+begin
+  Result:= fField.Value;
+end;
+
+function TDANativeField_Dataset.IsNull: Boolean;
+begin
+  Result := fField.IsNull; 
+end;
+
+function TDANativeField_Dataset.isTFieldCompatible: Boolean;
+begin
+  Result := True;
+end;
+
+procedure TDANativeField_Dataset.SetDataType(Value: TFieldType);
+begin
+  if fField is TBlobField then
+    TBlobField(fField).BlobType := Value;
+end;
+
+procedure TDANativeField_Dataset.SetDecimalPrecision(Value: integer);
+begin
+{$IFDEF ftFMTBCD_Support}
+  if (fField is TFMTBCDField) then begin
+    if TFMTBCDField(fField).Precision <> Value then
+      TFMTBCDField(fField).Precision := Value
+  end
+  else
+{$ENDIF FPC}
+  if (fField is TBCDField) then begin
+    if TBCDField(fField).Precision <> Value then
+       TBCDField(fField).Precision := Value;
+  end;
+end;
+
+procedure TDANativeField_Dataset.SetDecimalScale(Value: integer);
+begin
+{$IFDEF ftFMTBCD_Support}
+  if (fField is TFMTBCDField) then begin
+    if TFMTBCDField(fField).Size <> Value then
+       TFMTBCDField(fField).Size := Value
+  end
+  else
+{$ENDIF FPC}
+  if (fField is TBCDField) then begin
+    if TBCDField(fField).Size <> Value then
+       TBCDField(fField).Size := Value;
+  end;
+end;
+
+
+function TestIdentifier(const iIdentifier: string; const ReservedWords: array of string): boolean;
+var
+  L,H,I, r: Integer;
+  lIdent                      : string;
+begin
+  Result := False;
+  lIdent := UpperCase(iIdentifier);
+  l := 0;
+  h := Length(ReservedWords) -1;
+  while l <= h do begin
+    i := (L + H) shr 1;
+    r := CompareStr(lIdent, ReservedWords[i]);
+    if r < 0 then h := i - 1 else
+    if r > 0 then l := i + 1 else begin
+      Result := true;
+      Exit;
+    end;
+  end;
+end;
+
+{$IFDEF MSWINDOWS}
+initialization
+  SafeCallErrorProc := @DASafeCallError;
+  RegisterExceptionClass(EAbort);
+finalization
+  UnregisterExceptionClass(EAbort);
+  SafeCallErrorProc := nil;
+{$ENDIF}
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAExceptions.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAExceptions.pas
new file mode 100644
index 0000000..2484088
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAExceptions.pas	
@@ -0,0 +1,34 @@
+unit uDAExceptions;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  uROClasses;
+
+type
+  EDADatasetNotAccessible = class(EROException);
+
+implementation
+
+uses
+  uROCLient;
+
+initialization
+  RegisterExceptionClass(EDADatasetNotAccessible);
+finalization
+  UnregisterExceptionClass(EDADatasetNotAccessible);
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAExpressionEvaluator.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAExpressionEvaluator.pas
new file mode 100644
index 0000000..ba511f3
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAExpressionEvaluator.pas	
@@ -0,0 +1,691 @@
+unit uDAExpressionEvaluator;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+uses
+  {$IFDEF MSWINDOWS} Windows, {$ENDIF}
+  SysUtils, Classes, uDAMacros;
+
+type
+  EDAEvaluationException = class(Exception);
+  TDAExpressionEvaluator = class;
+  TDAEEGetValue = procedure (Sender: TDAExpressionEvaluator; const aIdentifier: string; out aValue: Variant) of object;
+  TDAEEFunctionCall = procedure (Sender: TDAExpressionEvaluator; const aIdentifier: string; const Args: array of Variant; out aValue: Variant) of object;
+  TDAEEFunction = class(TObject)
+  private
+    fName: string;
+    fOnCall: TDAEEFunctionCall;
+    fNameHash: Integer;
+    procedure SetName(const Value: string);
+  public
+    property Name: string read fName write SetName;
+    property NameHash: Integer read fNameHash;
+    property OnCall: TDAEEFunctionCall read fOnCall write fOnCall;
+  end;
+
+  TDAEEFunctionList = class(TObject)
+  private
+    fItems: TList;
+    function GetCount: Integer;
+    function GetItem(i: Integer): TDAEEFunction;
+  public
+    constructor Create;
+    destructor Destroy; override;
+
+    property Count: Integer read GetCount;
+    property Items[I: Integer]: TDAEEFunction read GetItem; default;
+
+    function Add(const aName: string): TDAEEFunction;
+    procedure Delete(I: Integer);
+    procedure Clear;
+  end;
+
+  TDAExpressionEvaluator = class(TObject)
+  private
+    fOnUnknownFunctionCall: TDAEEFunctionCall;
+    fOnGetValue: TDAEEGetValue;
+    fFunctionList: TDAEEFunctionList;
+    fParser: TROPascalParser;
+    FUseTrueFalseinVariableName: boolean;
+    FUseWildcardsInEqual: boolean;
+    FStringCaseInsensitive: Boolean;
+    function EvaluateProcCall(const aIdentifier: string; const Args: Variant): Variant;
+    function EvaluateValue(const aIdentifier: string): Variant;
+
+    function Op_In(const V1, V2: Variant): Variant;
+    function Op_Like(const V1, V2: Variant): Variant;
+    function ParseBooleanExpression: Variant;
+    function ParseComparisonExpression: Variant;
+    function ParseFactor: Variant;
+    function ParseSimpleExpression: Variant;
+    function ParseTerm: Variant;
+    function CompareValues(const V1, V2: Variant): boolean;
+    function IsStringType(const V: Variant): Boolean;
+  public
+    constructor Create;
+    destructor Destroy; override;
+
+    property OnGetValue: TDAEEGetValue read fOnGetValue write fOnGetValue;
+    property OnUnknownFunctionCall: TDAEEFunctionCall read fOnUnknownFunctionCall write fOnUnknownFunctionCall;
+    property FunctionList: TDAEEFunctionList read fFunctionList;
+
+    function Evaluate(const aString: string): Variant;
+    property UseTrueFalseinVariableName: boolean read FUseTrueFalseinVariableName write FUseTrueFalseinVariableName;
+    property UseWildcardsInEqual: boolean read FUseWildcardsInEqual write FUseWildcardsInEqual;
+    property StringCaseInsensitive: Boolean read FStringCaseInsensitive write FStringCaseInsensitive;
+  end;
+
+  TDAStdExpressionEvaluator = class(TDAExpressionEvaluator)
+  private
+     procedure Convert(Sender: TDAExpressionEvaluator; const aIdentifier: string; const Args: array of Variant; out aValue: Variant);
+     procedure Len(Sender: TDAExpressionEvaluator; const aIdentifier: string; const Args: array of Variant; out aValue: Variant);
+     procedure IsNull(Sender: TDAExpressionEvaluator; const aIdentifier: string; const Args: array of Variant; out aValue: Variant);
+     procedure IIF(Sender: TDAExpressionEvaluator; const aIdentifier: string; const Args: array of Variant; out aValue: Variant);
+     procedure Trim(Sender: TDAExpressionEvaluator; const aIdentifier: string; const Args: array of Variant; out aValue: Variant);
+     procedure Substring(Sender: TDAExpressionEvaluator; const aIdentifier: string; const Args: array of Variant; out aValue: Variant);
+  public
+    constructor Create;
+  end;
+implementation
+
+uses Variants, uROClasses;
+
+{ TDAExpressionEvaluator }
+
+constructor TDAExpressionEvaluator.Create;
+begin
+  inherited Create;
+  fFunctionList := TDAEEFunctionList.Create;
+  FUseWildcardsInEqual := False;
+  FUseTrueFalseinVariableName := False;
+  FStringCaseInsensitive := False;
+end;
+
+destructor TDAExpressionEvaluator.Destroy;
+begin
+  fFunctionList.Free;
+  inherited Destroy;
+end;
+
+function TDAExpressionEvaluator.Evaluate(const aString: string): Variant;
+begin
+  fParser := TROPascalParser.Create;
+  fParser.OpenBlockEscape := true;
+  try
+    fParser.SetText(aString);
+    Result := ParseBooleanExpression;
+
+    if fParser.CurrtokenId <> CSTI_EOF then
+      raise EDAEvaluationException.Create('End of expression expected');
+  finally
+    fParser.Free;
+  end;
+end;
+
+function TDAExpressionEvaluator.EvaluateProcCall(const aIdentifier: string;
+  const Args: Variant): Variant;
+var
+  s: string;
+  h, i: Integer;
+  lFunction: TDAEEFunction;
+  lRealArgs: array of Variant;
+begin
+  if not VarIsArray(Args) then begin
+    SetLength(lRealArgs, 1);
+    lRealArgs[0] := args;
+  end else begin
+    SetLength(lRealArgs, VarArrayHighBound(Args, 1)+1);
+    for i := 0 to Length(lRealArgs) -1 do begin
+      lRealArgs[i] := Args[i];
+    end;
+  end;
+  s := FastUppercase(aIdentifier);
+  h := MakeHash(s);
+  for i := 0 to fFunctionList.Count -1 do begin
+    lFunction := fFunctionList[i];
+    if (lFunction.NameHash = h) and (lFunction.Name = s) and (assigned(lFunction.OnCall)) then begin
+      lFunction.OnCall(self, aIdentifier, lRealArgs, Result);
+      exit;
+    end;
+  end;
+  if assigned(fOnUnknownFunctionCall) then
+    fOnUnknownFunctionCall(Self, aIdentifier, Args, Result)
+  else
+    raise EDAEvaluationException('Unknown function: '+aIdentifier);
+end;
+
+function TDAExpressionEvaluator.EvaluateValue(const aIdentifier: string): Variant;
+begin
+  if FUseTrueFalseinVariableName then begin
+    if assigned(fOnGetValue) then
+      fOnGetValue(Self, aIdentifier, Result)
+    else
+      raise EDAEvaluationException('Unknown identifier: '+aIdentifier);
+  end
+  else begin
+    if SameText(aIdentifier,'TRUE') then
+      Result:= True
+    else if SameText(aIdentifier,'FALSE') then
+      Result:= False
+    else if assigned(fOnGetValue) then
+      fOnGetValue(Self, aIdentifier, Result)
+    else
+      raise EDAEvaluationException('Unknown identifier: '+aIdentifier);
+  end;
+end;
+
+function TDAExpressionEvaluator.ParseComparisonExpression: Variant;
+
+  function _IsEqual(v1, v2: variant): boolean;
+  var
+    p1, p2: boolean;
+    w1,w2: widestring;
+  begin
+    if FUseWildcardsInEqual and IsStringType(V1) and IsStringType(V2) then begin
+      w1 := VarToWideStr(V1);
+      p1 := (Length(w1) > 1) and (pos('*', w1) > 0);
+      w2 := VarToWideStr(V2);
+      p2 := (Length(w2) > 1) and (pos('*', w2) > 0);
+      if (p1 and not p2) then
+        Result := Op_Like(v2, v1)
+      else if (p2 and not p1) then
+        Result := Op_Like(v1, v2)
+      else
+        Result := CompareValues(v1, v2);
+    end
+    else
+      Result := CompareValues(v1, v2);
+  end;
+
+var
+  V1, V2: Variant;
+  lTok: TROPasToken;
+begin
+  V1 := ParseSimpleExpression;
+  lTok := fParser.CurrTokenId;
+  while (lTok = CSTII_In) or
+    (lTok = CSTII_Like) or
+    (lTok = CSTI_Greater ) or
+    (lTok = CSTI_GreaterEqual) or
+    (lTok = CSTI_Smaller ) or
+    (lTok = CSTI_SmallerEqual) or
+    (lTok = CSTI_Equal) or
+    (lTok = CSTI_NotEqual) or
+    (lTok = CSTII_IsNull) or
+    (lTok = CSTII_IsNotNull) do
+  begin
+    FParser.Next;
+    if (lTok = CSTII_IsNull) or (lTok = CSTII_IsNotNull) then begin
+      case lTok of
+        CSTII_IsNull: v1 := VarIsNull(v1);
+        CSTII_IsNotNull: v1 := not VarIsNull(v1);
+      end;
+    end
+    else begin
+      V2 := ParseSimpleExpression;
+
+      case lTok of
+        CSTII_In: V1 := Op_In(v1, v2);
+        CSTII_Like: V1 := Op_Like(v1, v2);
+        CSTI_Greater: v1 := v1 > v2;
+        CSTI_GreaterEqual: v1 := (v1 > v2) or CompareValues(v1, v2);
+        CSTI_Smaller: v1 := v1 < v2;
+        CSTI_SmallerEqual: v1 := (v1 < v2) or CompareValues(v1, v2);
+        CSTI_Equal: v1:= _isEqual(v1, v2);
+        //CSTI_notEqual:
+      else
+        v1:= not _isEqual(v1, v2);
+      end;
+    end;
+    lTok := fParser.CurrTokenId;
+  end;
+  Result := V1;
+end;
+
+function TDAExpressionEvaluator.ParseSimpleExpression: Variant;
+var
+  V1, V2: Variant;
+  lTok: TROPasToken;
+begin
+  V1 := ParseTerm;
+  lTok := fParser.CurrTokenId;
+  while (lTok = CSTI_Plus) or
+    (lTok = CSTI_Minus) do
+  begin
+    FParser.Next;
+    V2 := ParseTerm;
+
+    case lTok of
+      CSTI_Minus: V1 := V1 - V2;
+      else v1 := v1 + v2; // CSTI_plus
+    end;
+    lTok := fParser.CurrTokenId;
+  end;
+  Result := V1;
+end;
+
+function ParseDate(s: string): TDateTime;
+begin
+  s := copy(S,2,Length(s)-2);
+  if length(s) = 10 then begin
+    if (s[3] <> '/') or (s[6] <> '/') then raise EDAEvaluationException.Create('Invalid date format');
+    Result := EncodeDate(StrToInt(copy(s, 7, 4)), StrToInt(copy(S, 1, 2)), StrToInt(copy(s, 4, 2)));
+  end else
+    raise EDAEvaluationException.Create('Invalid date format');
+end;
+
+function TDAExpressionEvaluator.ParseFactor: Variant;
+var
+  tmp: TList;
+  pv: PVariant;
+  i: Integer;
+  e: Extended;
+  s: string;
+begin
+  case fParser.CurrTokenId of
+    CSTII_Not: begin
+        FParser.Next;
+        Result := not ParseFactor;
+      end;
+    CSTI_Plus: begin
+        FParser.Next;
+        Result := + ParseFactor;
+      end;
+    CSTI_Minus: begin
+        FParser.Next;
+        Result := - ParseFactor;
+      end;
+    CSTI_OpenRound: begin
+       FParser.Next;
+       Result := ParseBooleanExpression;
+       if fParser.CurrTokenId = CSTI_Comma then begin
+         tmp := TList.Create;
+         New(pv);
+         pv^ := Result;
+         tmp.Add(pv);
+         while FPArser.CurrTokenId = CSTI_Comma do begin
+           FParser.Next;
+           try
+             result := ParseBooleanExpression;
+             New(pv);
+             pv^ := Result;
+             tmp.Add(pv);
+           except
+             for i := 0 to tmp.Count -1 do begin
+               pv := tmp[i];
+               dispose(pv);
+             end;
+             tmp.Free;
+             raise;
+           end;
+         end;
+         Result := VarArrayCreate([0, tmp.Count -1], varVariant);
+         for i := 0 to tmp.Count -1 do begin
+           pv := tmp[i];
+           Result[i] := pv^;
+           dispose(pv);
+         end;
+         tmp.Free;
+       end;
+       if fParser.CurrTokenId <> CSTI_CloseRound then
+         raise EDAEvaluationException.Create('Closing parenthesis expected');
+       FParser.Next;
+     end;
+    CSTI_HexInt, CSTI_Integer: begin
+      Result := StrToInt64(FParser.OriginalToken);
+      FParser.Next;
+    end;
+    CSTI_Real: begin
+      Val(FParser.OriginalToken, e, i); Result := e;
+      FParser.Next;
+    end;
+    CSTI_String: begin
+      Result := StringReplace(FParser.OriginalToken, #39#39, #39, [rfReplaceAll]);
+      Result := Copy(Result, 2, Length(Result) -2);
+      Fparser.Next;
+    end;
+    CSTI_Date: begin
+      Result := ParseDate(FParser.OriginalToken);
+      FParser.Next;
+    end;
+    CSTI_Identifier: begin
+      s :=  FPArser.OriginalToken;
+      FParser.Next;
+      if FParser.CurrTokenID = CSTI_OpenRound then
+        Result := EvaluateProcCall(s, ParseFactor)
+      else
+        Result := EvaluateValue(s)
+    end;
+  else
+    raise EDAEvaluationException.Create('Syntax error');
+  end;
+end;
+
+function TDAExpressionEvaluator.ParseBooleanExpression: Variant;
+var
+  V1, V2: Variant;
+  lTok: TROPasToken;
+begin
+  V1 := ParseComparisonExpression;
+  lTok := fParser.CurrTokenId;
+  while (lTok = CSTII_and) or
+    (lTok = CSTII_or) or
+    (lTok = CSTII_xor) do
+  begin
+    FParser.Next;
+    V2 := ParseComparisonExpression;
+
+    case lTok of
+      CSTII_or: V1 := V1 or V2;
+      CSTII_xor: V1 := V1 xor V2;
+      else v1 := v1 and v2; // CSTII_and
+    end;
+    lTok := fParser.CurrTokenId;
+  end;
+  Result := V1;
+end;
+
+function TDAExpressionEvaluator.ParseTerm: Variant;
+var
+  V1, V2: Variant;
+  lTok: TROPasToken;
+begin
+  V1 := ParseFactor;
+  lTok := fParser.CurrTokenId;
+  while (lTok = CSTI_multiply) or
+    (lTok = CSTI_divide) or
+    (lTok = CSTI_Modulus) do
+  begin
+    FParser.Next;
+    V2 := ParseFactor;
+
+    case lTok of
+      CSTI_Multiply: V1 := V1 * V2;
+      CSTI_Divide: V1 := V1 / V2;
+      else v1 := v1 mod v2; // CSTI_modulus
+    end;
+    lTok := fParser.CurrTokenId;
+  end;
+  Result := V1;
+end;
+
+function TDAExpressionEvaluator.Op_In(const V1, V2: Variant): Variant;
+var
+  i: Integer;
+begin
+  if VarIsArray(V2) then begin
+    for i := VarArrayLowBound(V2, 1) to VarArrayHighBound(V2, 1) do begin
+      if CompareValues(v2[i], v1) then begin
+        Result := true;
+        exit;
+      end;
+    end;
+    Result := False;
+  end
+  else
+    Result := CompareValues(v1, v2);
+//    raise EDAEvaluationException.Create('Array expected for IN expression');
+end;
+
+function WidePos(const iSubString, iString:WideString): Integer; overload;
+var i,j:integer;
+    LenS,LenS1:integer;
+    b: Boolean;
+begin
+  LenS1 := Length(iSubString);
+  LenS := Length(iString);
+
+  i := 1;
+  while i <= LenS-LenS1+1 do begin
+
+    { IsCandidate }
+    b := true;
+    for j := 1 to LenS1 do begin
+      if iString[i+j-1] <> iSubString[j] then begin
+        b := false;
+        break;
+      end;
+    end;
+
+    if b then begin
+      result := i;
+      exit;
+    end;
+
+    inc(i);
+  end;
+  result := 0;
+end;
+
+function TDAExpressionEvaluator.Op_Like(const V1, V2: Variant): Variant;
+var
+  w1, w2: WideString;
+begin
+  w1 := WideUppercase(VarToWideStr(V1));
+  W2 := WideUppercase(VarToWideStr(V2));
+  if Length(W2) = 0 then begin Result := False; exit; end;
+
+  if (Length(W2) > 0) and ((W2[1] = '%') or (W2[1] = '*')) then begin
+    if ((W2[Length(W2)] = '%') or (W2[Length(W2)] = '*')) then begin
+      W2 := Copy(W2, 2, Length(W2) -2);
+      Result := WidePos(W2, W1) > 0;
+    end else begin
+      W2 := Copy(W2, 2, Length(W2) -1);
+      Result := Copy(W1, LEngth(W1) - Length(W2)+1, Length(W2)) = W2;
+    end;
+  end else if (Length(W2)> 0) and ((W2[Length(W2)] = '%') or (W2[Length(W2)] = '*')) then begin
+    W2 := copy(W2, 1, Length(W2)-1);
+    result := Copy(W1, 1, Length(W2)) = W2;
+  end else
+    result := w1 = w2;
+end;
+
+function TDAExpressionEvaluator.CompareValues(const V1,
+  V2: Variant): boolean;
+begin
+  if IsStringType(V1) and IsStringType(V2) then begin
+    if (VarType(V1) = VarType(V2)) and (VarType(V2) <> varOleStr) then begin
+      if FStringCaseInsensitive then
+        Result := AnsiSameText(VarToStr(V1), VarToStr(V2))
+      else
+        Result := AnsiSameStr(VarToStr(V1), VarToStr(V2));
+    end
+    else begin
+      Result := ROWideCompare(VarToWideStr(V1), VarToWideStr(V2), FStringCaseInsensitive) = 0;
+    end;
+  end
+  else begin
+    Result := ROVariantsEqual(V1, V2);
+  end;
+end;
+
+function TDAExpressionEvaluator.IsStringType(const V: Variant): Boolean;
+begin
+  case VarType(V) of
+    varOleStr, varUString, varStrArg, varString: Result:=True;
+  else
+    Result := False;
+  end;
+end;
+
+{ TDAEEFunction }
+
+procedure TDAEEFunction.SetName(const Value: string);
+begin
+  fName := FastUppercase(Value);
+  fNameHash := MakeHash(fName);
+end;
+
+{ TDAEEFunctionList }
+
+function TDAEEFunctionList.Add(const aName: string): TDAEEFunction;
+begin
+  result := TDAEEFunction.Create;
+  Result.Name := aName;
+  fItems.Add(Result);
+end;
+
+procedure TDAEEFunctionList.Clear;
+var
+  i: Integer;
+begin
+  for i := fItems.Count -1 downto 0 do begin
+    TDAEEFunction(fItems[i]).Free;
+  end;
+  fItems.Clear;
+end;
+
+constructor TDAEEFunctionList.Create;
+begin
+  inherited Create;
+  fItems := TList.Create;
+end;
+
+procedure TDAEEFunctionList.Delete(I: Integer);
+begin
+  TDAEEFunction(fItems[i]).Free;
+  fItems.Delete(i);
+end;
+
+destructor TDAEEFunctionList.Destroy;
+begin
+  Clear;
+  fItems.Free;
+  inherited Destroy;
+end;
+
+function TDAEEFunctionList.GetCount: Integer;
+begin
+  result := fItems.Count;
+end;
+
+function TDAEEFunctionList.GetItem(i: Integer): TDAEEFunction;
+begin
+  result := TDAEEFunction(fItems[i]);
+end;
+
+{ TDAStdExpressionEvaluator }
+
+procedure TDAStdExpressionEvaluator.Convert(Sender: TDAExpressionEvaluator;
+  const aIdentifier: string; const Args: array of Variant;
+  out aValue: Variant);
+var
+  aType: TVarType;
+  s: string;
+begin
+  if Length(Args) <> 2 then raise EDAEvaluationException.Create('2 arguments expected for "Convert"');
+  s := FastUppercase(args[1]);
+  if (s = 'SYSTEM.BYTE') or (s = 'BYTE') then aType := varByte else
+  if (s = 'SYSTEM.SBYTE') or (s = 'SBYTE') then aType := varShortInt else
+  if (s = 'SYSTEM.INT16') or (s = 'INT16') then aType := varSmallint else
+  if (s = 'SYSTEM.UINT16') or (s = 'UINT16') then aType := varWord else
+  if (s = 'SYSTEM.INT32') or (s = 'INT32') then aType := varInteger else
+  if (s = 'SYSTEM.UINT32') or (s = 'UINT32') then aType := varLongWord else
+  if (s = 'SYSTEM.INT64') or (s = 'INT64') then aType := varInt64 else
+  if (s = 'SYSTEM.UINT64') or (s = 'UINT64') then aType := VarInt64 else
+  if (s = 'SYSTEM.STRING') or (s = 'STRING') then aType := varOleStr else
+  if (s = 'SYSTEM.SINGLE') or (s = 'SINGLE') then aType := varSIngle else
+  if (s = 'SYSTEM.DOUBLE') or (s = 'DOUBLE') then aType := varDouble else
+  if (s = 'SYSTEM.CHAR') or (s = 'CHAR') then aType := varOleStr else
+  if (s = 'SYSTEM.DATETIME') or (s = 'DATETIME') then aType := varDate else
+  raise EDAEvaluationException.Create('Unknown type used for conversion: "'+args[1]+'"');
+  VarCast(aValue, Args[0], aType);
+end;
+
+constructor TDAStdExpressionEvaluator.Create;
+begin
+  inherited Create;
+  FunctionList.Add('Convert').OnCall := Convert;
+  FunctionList.Add('Len').OnCall := Len;
+  FunctionList.Add('IsNull').OnCall := IsNull;
+  FunctionList.Add('IIF').OnCall := IIF;
+  FunctionList.Add('Trim').OnCall := Trim;
+  FunctionList.Add('SubString').OnCall := SubString;
+end;
+
+procedure TDAStdExpressionEvaluator.IIF(Sender: TDAExpressionEvaluator;
+  const aIdentifier: string; const Args: array of Variant;
+  out aValue: Variant);
+begin
+  if Length(Args) <> 3 then raise EDAEvaluationException.Create('3 arguments expected for "IIF"');
+  if Args[0] then
+    aValue := Args[1]
+  else
+    aValue := Args[2];
+end;
+
+procedure TDAStdExpressionEvaluator.IsNull(Sender: TDAExpressionEvaluator;
+  const aIdentifier: string; const Args: array of Variant;
+  out aValue: Variant);
+begin
+  if Length(Args) <> 2 then raise EDAEvaluationException.Create('2 arguments expected for "IsNull"');
+  if VarIsError(Args[0]) or VarIsNull(Args[0]) then
+    aValue := Args[1]
+  else
+    aValue := Args[0];
+end;
+
+procedure TDAStdExpressionEvaluator.Len(Sender: TDAExpressionEvaluator;
+  const aIdentifier: string; const Args: array of Variant;
+  out aValue: Variant);
+begin
+  if Length(Args) <> 1 then raise EDAEvaluationException.Create('1 argument expected for "Len"');
+  aValue := Length(WideString(Args[0]));
+end;
+
+procedure TDAStdExpressionEvaluator.Substring(
+  Sender: TDAExpressionEvaluator; const aIdentifier: string;
+  const Args: array of Variant; out aValue: Variant);
+var
+  w: WideString;
+  s: string;
+begin
+  if Length(Args) <> 3 then raise EDAEvaluationException.Create('3 arguments expected for "Substring"');
+  if VarType(Args[0]) = varOleStr then begin
+    w := Args[0];
+    aValue := Copy(w, Integer(args[1])-1, Integer(Args[2])); // zero based
+  end else begin
+    s := Args[0];
+    aValue := Copy(s, Integer(args[1])-1, Integer(Args[2])); // zero based
+  end;end;
+
+procedure TDAStdExpressionEvaluator.Trim(Sender: TDAExpressionEvaluator;
+  const aIdentifier: string; const Args: array of Variant;
+  out aValue: Variant);
+var
+  w: WideString;
+  s: string;
+begin
+  if Length(Args) <> 1 then raise EDAEvaluationException.Create('1 argument expected for "Trim"');
+  if VarType(Args[0]) = varOleStr then begin
+    w := Args[0];
+    while (length(w) > 0) and ((w[1] = #13) or (w[1] = #10) or (w[1] = #9) or (w[1] = #32)) do
+      Delete(w, 1, 1);
+    while (length(w) > 0) and ((w[Length(w)] = #13) or (w[Length(w)] = #10) or (w[Length(w)] = #9) or (w[Length(w)] = #32)) do
+      Delete(w, Length(w), 1);
+    aValue := w;
+  end else begin
+    s := Args[0];
+    while (length(s) > 0) and ((s[1] = #13) or (s[1] = #10) or (s[1] = #9) or (s[1] = #32)) do
+      Delete(s, 1, 1);
+    while (length(s) > 0) and ((s[Length(s)] = #13) or (s[Length(s)] = #10) or (s[Length(s)] = #9) or (s[Length(s)] = #32)) do
+      Delete(s, Length(s), 1);
+    aValue := s;
+  end;
+end;
+
+end.
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAHETConnections.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAHETConnections.pas
new file mode 100644
index 0000000..3d16f32
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAHETConnections.pas	
@@ -0,0 +1,69 @@
+unit uDAHETConnections;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - 'Rosetta' Library - HIGHLY CONFIDENTIAL
+{
+{ compiler: Delphi 6 and up
+{ platform: Win32
+{
+{ (c)opyright RemObjects Software. all rights reserved.
+{
+{ Using this code requires a valid license of the Data Abstract
+{ which can be obtained at http://www.remobjects.com.
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  Classes, SysUtils,
+  uDAInterfaces;
+
+type
+  TDAHETConnection = class(TDAConnection)
+  private
+    fObjectMappings: TStrings;
+    procedure SetObjectMappings(const Value: TStrings);
+  protected
+    function GetConnectionString: string; override;
+    procedure SetConnectionString(const aValue: string); override;
+  public
+    constructor Create(aCollection: TCollection); override;
+    destructor Destroy; override;
+  published
+    property ObjectMappings: TStrings read fObjectMappings write SetObjectMappings;
+  end;
+
+implementation
+
+{ TDAHETConnection }
+
+constructor TDAHETConnection.Create(aCollection: TCollection);
+begin
+  inherited Create (aCollection);
+  fObjectMappings := TStringList.Create();
+end;
+
+destructor TDAHETConnection.Destroy;
+begin
+  FreeAndNil(fObjectMappings);
+  inherited;
+end;
+
+function TDAHETConnection.GetConnectionString: string;
+begin
+  result := 'HET?';
+end;
+
+procedure TDAHETConnection.SetConnectionString(const aValue: string);
+begin
+  { no-op }
+end;
+
+procedure TDAHETConnection.SetObjectMappings(const Value: TStrings);
+begin
+  fObjectMappings.Assign(Value);
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAHETDriver.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAHETDriver.pas
new file mode 100644
index 0000000..666c68f
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAHETDriver.pas	
@@ -0,0 +1,232 @@
+unit uDAHETDriver;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - 'Rosetta' Library - HIGHLY CONFIDENTIAL
+{
+{ compiler: Delphi 6 and up
+{ platform: Win32
+{
+{ (c)opyright RemObjects Software. all rights reserved.
+{
+{ Using this code requires a valid license of the Data Abstract
+{ which can be obtained at http://www.remobjects.com.
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+// {$R DataAbstract_Rosetta_Glyphs.res}
+
+uses
+  Classes, SysUtils,
+  uDAInterfaces, uDAClasses, uDAEngine, uDARes, uDADriverManager,
+  uDAHETConnections, DB;
+
+type
+  TDAHETDriver = class(TDADriverReference)
+  end;
+
+  TDAEHETDriver = class(TDAEDriver)
+  protected
+    function GetConnectionClass: TDAEConnectionClass; override;
+
+    function GetDriverID: string; override;
+    function GetDescription: string; override;
+  public
+  end;
+
+  TDAEHETConnection = class(TDAEConnection, IDAHETConnection)
+  private
+    fInTransaction: boolean;
+    fActiveConnections: TStringList;
+    function GetConnectionByName(const aConnectionName: string; aOpenConnection: boolean = false): IDAConnection;
+  protected
+    function DoBeginTransaction: Integer; override;
+    procedure DoCommitTransaction; override;
+    procedure DoRollbackTransaction; override;
+    function DoGetInTransaction: Boolean; override;
+
+    function CreateCustomConnection: TCustomConnection; override;
+    function GetConnected: Boolean; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  public
+    constructor Create(aDriver: TDAEDriver; aName: string = ''); override;
+    destructor Destroy; override;
+
+    { IDAHETConnection }
+    function GetConnectionForObject(const aObjectName: string; aOpenConnection: boolean = false): IDAConnection;
+
+  end;
+
+  TDAHETConnectionContainer = class
+  private
+    fConnection: IDAConnection;
+    constructor Create(aConnection: IDAConnection);
+  end;
+
+procedure Register;
+function GetDriverObject: IDADriver; stdcall;
+
+implementation
+
+{ TDAEHETDriver }
+
+function TDAEHETDriver.GetConnectionClass: TDAEConnectionClass;
+begin
+  result := TDAEHETConnection;
+end;
+
+function TDAEHETDriver.GetDescription: string;
+begin
+  result := 'Connection for Heterogenous Queries across multiple databases';
+end;
+
+function TDAEHETDriver.GetDriverID: string;
+begin
+  result := 'HET';
+end;
+
+{ TDAEHETConnection }
+
+constructor TDAEHETConnection.Create(aDriver: TDAEDriver; aName: string = '');
+begin
+  inherited;
+  fActiveConnections := TStringList.Create();
+  fActiveConnections.Sorted := true;
+  fActiveConnections.Duplicates := dupError;
+end;
+
+function TDAEHETConnection.CreateCustomConnection: TCustomConnection;
+begin
+  result := nil;
+end;
+
+destructor TDAEHETConnection.Destroy;
+var
+  i: Integer;
+begin
+  for i := 0 to fActiveConnections.Count-1 do
+    fActiveConnections.Objects[i].Free();
+  FreeAndNil(fActiveConnections);
+
+  //ToDo: auto-transacton handling?
+
+  inherited;
+end;
+
+function TDAEHETConnection.DoBeginTransaction: Integer;
+var
+  i: Integer;
+begin
+  if fInTransaction then
+    raise Exception.Create('Already in a transaction');
+
+  for i := 0 to fActiveConnections.Count-1 do
+    (fActiveConnections.Objects[i] as TDAHETConnectionContainer).fConnection.BeginTransaction();
+
+  fInTransaction := true;
+  result := 0;
+end;
+
+procedure TDAEHETConnection.DoCommitTransaction;
+var
+  i: Integer;
+begin
+  inherited;
+
+  try
+    for i := 0 to fActiveConnections.Count-1 do
+      (fActiveConnections.Objects[i] as TDAHETConnectionContainer).fConnection.CommitTransaction();
+  except
+    // ToDo: we need to use  a two-phase commit here, to properly handle any single commit failing
+    //       to roll back ALL transactons (inclusing those already (tentatively) comitted. 
+    DoRollbackTransaction();
+    raise;
+  end;
+
+  fInTransaction := false;
+end;
+
+procedure TDAEHETConnection.DoRollbackTransaction;
+var
+  i: Integer;
+begin
+  inherited;
+
+  for i := 0 to fActiveConnections.Count-1 do
+    (fActiveConnections.Objects[i] as TDAHETConnectionContainer).fConnection.RollbackTransaction();
+
+  fInTransaction := false;
+end;
+
+function TDAEHETConnection.DoGetInTransaction: Boolean;
+begin
+  result := fInTransaction;
+end;
+
+function TDAEHETConnection.GetConnected: Boolean;
+begin
+  result := true;
+end;
+
+function TDAEHETConnection.GetConnectionForObject(const aObjectName: string; aOpenConnection: boolean = false): IDAConnection;
+var
+  lConnectionName: string;
+begin
+  lConnectionName := (ConnectionDefinition as TDAHETConnection).ObjectMappings.Values[aObjectName];
+  if lConnectionName = '' then
+    raise Exception.CreateFmt('HET Connection "%s" does not contain an object mapping for "%s".', [ConnectionName, aObjectName]);
+  result := GetConnectionByName(lConnectionName);
+end;
+
+function TDAEHETConnection.GetConnectionByName(const aConnectionName: string; aOpenConnection: boolean = false): IDAConnection;
+var
+  i: Integer;
+begin
+  if aConnectionName = self.ConnectionName then
+    raise Exception.CreateFmt('Cannot use HET Connection "%s" nested within itself.', [ConnectionName]);
+
+  i := fActiveConnections.IndexOf(aConnectionName);
+  if i >= 0 then begin
+    result := (fActiveConnections.Objects[i] as TDAHETConnectionContainer).fConnection
+  end
+  else begin
+    result := ConnectionManager.NewConnection(aConnectionName, true);  //todo: aOpenConnection
+    if fInTransaction then result.BeginTransaction;
+    fActiveConnections.AddObject(aConnectionName, TDAHETConnectionContainer.Create(result));
+  end;
+end;
+
+{ TDAHETConnectionContainer }
+
+constructor TDAHETConnectionContainer.Create(aConnection: IDAConnection);
+begin
+  fConnection := aConnection;
+end;
+
+{ global driver registration }
+
+var
+  _driver: TDAEDriver = nil;
+
+procedure Register;
+begin
+  RegisterComponents(DAPalettePageName, [TDAHETDriver]);
+end;
+
+function GetDriverObject: IDADriver;
+begin
+  if (_driver = nil) then _driver := TDAEHETDriver.Create(nil);
+  result := _driver;
+end;
+
+exports
+  GetDriverObject name func_GetDriverObject;
+
+initialization
+  _driver := nil;
+  RegisterDriverProc(GetDriverObject);
+finalization
+  UnregisterDriverProc(GetDriverObject);
+  FreeAndNIL(_driver);
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAHelpers.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAHelpers.pas
new file mode 100644
index 0000000..877ab10
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAHelpers.pas	
@@ -0,0 +1,374 @@
+unit uDAHelpers;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  {$IFDEF MSWINDOWS}Windows,{$ENDIF}
+  uDAInterfaces, uDAInterfacesEx, uDAClasses, Classes, uDASupportClasses;
+
+function BuildSelectStatementForTable(iTableName: string; iConnection: IDAConnection): string;
+function BuildJoinedSelectStatementForTables(iTableNames: array of string; iConnection: IDAConnection): string;
+function BuildCreateStatementForTable(aDataSet:TDADataSet; const aTableName:string; iConnection: IDAConnectionModelling): string;
+function BuildExecStatementForProcedure(const iProcedureName: string; iConnection: IDAConnection): string;
+
+function QuoteIfNeeded(iTableName: string; iConnection: IDAConnection = nil): string;
+function QuoteFieldNameIfNeeded(iTableName, iFieldName: string; iConnection: IDAConnection): string;
+
+function FindUniqueName(const iBaseName:string; iCollection: TSearcheableCollection):string;
+procedure CreateNewDatasets(aSchema: TDASchema; aConnection: IDAConnection; aTables: TStrings; aCreateComandsToo: boolean=false; aCreateRelationships: boolean=false; aListCreatedDatasets:TList=nil; aShowDataset:boolean=true);
+
+function LoadHtmlFromResource(aInstance: THandle; const aName: string): string;
+
+implementation
+
+uses
+  SysUtils, uROClasses, Contnrs;
+
+function LoadHtmlFromResource(aInstance: THandle; const aName: string): string;
+{$IFDEF MSWINDOWS}
+var
+  lResource,lData: THandle;
+  p:pChar;
+{$ENDIF}
+begin
+  result := '';
+  {$IFDEF MSWINDOWS}
+  lResource := FindResource(aInstance, pChar(aName), pChar(2110));
+  if (lResource > 0) then begin
+    lData := LoadResource(aInstance, lResource);
+    p := LockResource(lData);
+    try
+      if Assigned(p) then begin
+        result := p;
+        UniqueString(result);
+      end;
+    finally
+      UnlockResource(lData)
+    end;
+  end;
+  {$ENDIF}
+end;
+
+function BuildCreateStatementForTable(aDataSet:TDADataSet; const aTableName:string; iConnection: IDAConnectionModelling): string;
+var
+  i: integer;
+  lCurrentLine, lPrimary: string;
+begin
+
+  result := 'CREATE TABLE '+QuoteIfNeeded(aTableName, iConnection)+
+            #13#10'(';
+
+  for i := 0 to (aDataSet.Fields.Count - 1) do begin
+    lCurrentLine := '  '+
+                    QuoteIfNeeded(aDataSet.Fields[i].Name, iConnection)+
+                    ' '+
+                    iConnection.FieldToDeclaration(aDataSet.Fields[i]);
+    if (i < aDataSet.Fields.Count - 1) then lCurrentLine := lCurrentLine + ', ';
+    result := result+#13#10+lCurrentLine;
+  end;
+
+  lPrimary := '';
+  for i := 0 to (aDataSet.Fields.Count - 1) do if aDataSet.Fields[i].InPrimaryKey then begin
+    if lPrimary <> '' then lPrimary := lPrimary+','#13#10;
+    lPrimary := lPrimary+
+                 '    '+
+                 QuoteIfNeeded(aDataSet.Fields.Fields[i].Name, iConnection);
+  end;
+  if lPrimary <> '' then begin
+    result := result+','#13#10+
+                     'CONSTRAINT '+QuoteIfNeeded('PK_'+aTableName)+' PRIMARY KEY'#13#10+
+                     '  ('#13#10+
+                     lPrimary+#13#10+
+                     '  )'
+  end;
+  result := result+#13#10')';
+
+end;
+
+function BuildSelectStatementForTable(iTableName: string; iConnection: IDAConnection): string;
+var
+  lFields: TDAFieldCollection;
+  i: integer;
+  lCurrentLine, lQuery: string;
+begin
+  iConnection.GetTableFields(iTableName, lFields);
+  if Assigned(lFields) then try
+
+    lCurrentLine := '';
+    lQuery := '';
+    for i := 0 to (lFields.Count - 1) do begin
+      lCurrentLine := lCurrentLine + QuoteFieldNameIfNeeded(iTableName,lFields.Fields[i].Name, iConnection);
+      if (i < lFields.Count - 1) then begin
+        lCurrentLine := lCurrentLine + ', ';
+        if Length(lCurrentLine) > 50 then begin
+          lQuery := lQuery + lCurrentLine + #13#10'    ';
+          lCurrentLine := '';
+        end;
+      end;
+    end;
+    result := 'SELECT ' +
+      #13#10'    ' +
+      lQuery + lCurrentLine +
+      #13#10'  FROM'#13#10'    ' + QuoteIfNeeded(iTableName, iConnection)+ #13#10'  WHERE {Where}';
+  finally
+    FreeAndNil(lFields);
+  end
+  else begin
+    result := 'SELECT * FROM ' + QuoteIfNeeded(iTableName, iConnection)+ #13#10'  WHERE {Where}';
+  end;
+end;
+
+function BuildJoinedSelectStatementForTables(iTableNames: array of string; iConnection: IDAConnection): string;
+var
+  lTableName: string;
+  lFields: TDAFieldCollection;
+  i,j: integer;
+  lCurrentLine, lQuery: string;
+begin
+  Result:='';
+  for i := Low(iTableNames) to High(iTableNames) do begin
+
+    lTableName := QuoteIfNeeded(iTableNames[i], iConnection);
+
+    if result = '' then
+      result := 'SELECT '#13#10
+    else
+      result := result+', '#13#10;
+
+    iConnection.GetTableFields(iTableNames[i], lFields);
+    if Assigned(lFields) then try
+
+      lCurrentLine := '    ';
+      lQuery := '';
+      for j := 0 to (lFields.Count - 1) do begin
+        lCurrentLine := lCurrentLine + lTableName+'.'+QuoteIfNeeded(lFields.Fields[j].Name, iConnection);
+        if (j < lFields.Count - 1) then begin
+          lCurrentLine := lCurrentLine + ', ';
+          if Length(lCurrentLine) > 50 then begin
+            lQuery := lQuery + lCurrentLine + #13#10'    ';
+            lCurrentLine := '';
+          end;
+        end;
+      end;
+      result := result + lQuery + lCurrentLine;
+    finally
+      FreeAndNil(lFields);
+    end
+    else begin
+      result := result + QuoteIfNeeded(iTableNames[i], iConnection)+'*';
+    end;
+  end;
+
+  for i := Low(iTableNames) to High(iTableNames) do begin
+    if i = 0 then begin
+      result := result+#13#10'  FROM '+QuoteIfNeeded(iTableNames[i], iConnection)
+    end
+    else begin
+      result := result+#13#10'    LEFT OUTER JOIN '+QuoteIfNeeded(iTableNames[i], iConnection)+' ON <join condition>'
+    end;
+  end;
+  result := Result + #13#10'  WHERE {Where}';
+
+end;
+
+
+function BuildExecStatementForProcedure(const iProcedureName: string; iConnection: IDAConnection): string;
+var
+  lParams: TDAParamCollection;
+  lName: string;
+  i: integer;
+  lQuery: string;
+begin
+  iConnection.GetStoredProcedureParams(iProcedureName, lParams);
+  try
+    lQuery := '';
+    if lParams <> nil then begin
+      for i := 0 to (lParams.Count - 1) do begin
+        lName := ':' + QuoteIfNeeded(lParams.Params[i].Name, iConnection);
+        if not (lParams.Params[i].ParamType in [daptInput, daptInputOutput]) then continue;
+        if lQuery <> '' then lQuery := lQuery + ', ';
+        lQuery := lQuery + lName;
+      end;
+    end;
+    Result := iConnection.GetSPSelectSyntax(lQuery <> '');
+    if Result = '' then
+      Result := 'EXEC {0} {1}';
+    Result := StringReplace(Result, '{0}', QuoteIfNeeded(iProcedureName, iConnection), []);
+    Result := StringReplace(Result, '{1}', lQuery, [rfReplaceAll]);
+    Result := StringReplace(Result, '{{', '{', [rfReplaceAll]);
+  finally
+    FreeAndNil(lParams);
+  end
+end;
+
+function QuoteFieldNameIfNeeded(iTableName, iFieldName: string; iConnection: IDAConnection): string;
+begin
+  if Assigned(iConnection) then begin
+    result := iConnection.QuoteFieldNameIfNeeded(iTableName,iFieldName);
+  end
+  else if Pos(' ', iFieldName) > 0 then begin
+    result := '"' + iFieldName + '"';
+    if Pos(' ', iTableName) > 0 then Result:= '"' + iTableName + '".'+ result;
+  end
+  else begin
+    result := iFieldName;
+  end;
+end;
+
+
+function QuoteIfNeeded(iTableName: string; iConnection: IDAConnection): string;
+begin
+  if Assigned(iConnection) then begin
+    result := iConnection.QuoteIdentifierIfNeeded(iTableName);
+  end
+  else if Pos(' ', iTableName) > 0 then begin
+    result := '"' + iTableName + '"';
+  end
+  else begin
+    result := iTableName;
+  end;
+end;
+
+function FindUniqueName(const iBaseName:string; iCollection: TSearcheableCollection):string;
+var
+  lIndex:integer;
+begin
+  result := iBaseName;
+  lIndex := 0;
+  while Assigned(iCollection.FindItem(result)) do begin
+    inc(lIndex);
+    result := iBaseName+IntToStr(lIndex);
+  end;
+end;
+
+procedure CreateNewDatasets(aSchema: TDASchema; aConnection: IDAConnection; aTables: TStrings; aCreateComandsToo: boolean=false; aCreateRelationships: boolean=false; aListCreatedDatasets:TList=nil; aShowDataset:boolean=true);
+var
+  i,j: Integer;
+  lKeys: TDADriverForeignKeyCollection;
+  lSourceTableName, lDataTableName : string;
+  lFields: TDAFieldCollection;
+  k, z : integer;
+  lNewDataset, lFKDataset, lPKDataset : TDADataset;
+  lNewDatasets: TObjectList;
+begin
+
+  // keep a listof the new datasets, so we can access them by the k index when
+  // looking for FK matches
+
+  lNewDatasets := TObjectList.Create(false);
+  try
+    for k := 0 to aTables.Count-1 do begin
+      lSourceTableName := aTables[k];
+      lDataTableName := FindUniqueName(TrimAndClean(lSourceTableName), aSchema.Datasets);
+
+      // Creates the Dataset and the fields
+      aConnection.GetTableFields(lSourceTableName, lFields);
+      lNewDataset := aSchema.Datasets.Add;
+      with lNewDataset do begin
+        Name := lDataTableName;
+        Fields.AssignFieldCollection(lFields);
+      end;
+      lNewDatasets.Add(lNewDataSet);
+
+      // Adds the SQL statement
+      with lNewDataset.Statements.Add do begin
+        if aConnection.ConnectionType <> '' then begin
+          Connection := '';
+          ConnectionType := aConnection.ConnectionType;
+        end else
+        Connection := aConnection.Name;
+        //Default := true;
+        TargetTable := lSourceTableName;
+        //SQL := 'SELECT '#13#10'    ';
+        for z := 0 to (lNewDataset.Fields.Count-1) do begin
+          //SQL := SQL+newDataset.Fields[z].Name;
+          if (z < lNewDataset.Fields.Count-1) then SQL := SQL+', ';
+
+          // Creates the default mappings
+          with ColumnMappings.Add do begin
+            DatasetField := lNewDataset.Fields[z].Name;
+            TableField := lNewDataset.Fields[z].Name;
+          end;
+        end;
+        //SQL := SQL+#13#10'  FROM '+QuoteIfNeeded(tblname);
+        //SQL := BuildSelectStatementForTable(lSourceTableName, aConnection);
+        StatementType := stAutoSQL;
+      end;
+
+      // activate the LAST one
+      {if aShowDataset and (k = aTables.Count-1) then begin
+        pc_MainPages.ActivePage := ts_DatasetAndCommand;
+        pc_DatasetAndCommandTop.ActivePage := ts_Dataset2;
+        pc_DatasetAndCommandBottom.ActivePage := ts_Dataset3;
+        pc_DatasetPages.ActivePage := ts_DatasetStatements;
+        ActiveControl := insp_Dataset;
+        insp_Dataset.FocusedField := SchemaModelerData.DatasetsName;
+      end;}
+
+      // Refreshes the listview
+      //SchemaModelerData.Datasets.Refresh;
+      //SchemaModelerData.Datasets.Index := lNewDataset.Index;
+
+      //if aCreateComandsToo then
+        //DropCommandNewCommandsForDataset();
+
+    end;
+
+    if aCreateRelationships then begin
+
+      aConnection.GetForeignKeys(lKeys);
+      if assigned(lKeys) then try
+        for i := 0 to lKeys.Count - 1 do begin
+          for j := 0 to lNewDatasets.Count-1 do begin
+            lFKDataset := (lNewDatasets[j] as TDADataSet);
+            if lKeys[i].FKTable = lFKDataset.Name then begin
+              for k := 0 to lNewDatasets.Count-1 do begin
+                lPKDataset := (lNewDatasets[k] as TDADataSet);
+                if lKeys[i].PKTable = lPKDataset.Name then begin
+                  with aSchema.RelationShips.Add() do begin
+                    Name := Format('FK_%s_%s',[lFKDataset.Name, lPKDataset.Name]);
+                    MasterDatasetName := lPKDataset.Name;
+                    DetailDatasetName := lFKDataset.Name;
+                    MasterFields := lKeys[i].PKField;
+                    DetailFields := lKeys[i].FKField;
+                  end;
+                  break; { break for k }
+                end;
+              end; { for k (PKDataset)}
+              break; { break for j }
+            end; { if FK matches }
+          end; { for j (FKDaatSet) }
+        end; { for i (key) }
+
+      finally
+        lKeys.Free();
+      end;
+    end;
+
+    if Assigned(aListCreatedDatasets) then begin
+      for i := 0 to lNewDataSets.Count-1 do begin
+        aListCreatedDatasets.Add(lNewDataSets[i]);
+      end; { for }
+    end;
+
+  finally
+    FreeAndNil(lNewDatasets);
+  end;
+
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAIBInterfaces.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAIBInterfaces.pas
new file mode 100644
index 0000000..55cded8
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAIBInterfaces.pas	
@@ -0,0 +1,725 @@
+unit uDAIBInterfaces;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses uROClasses, uDAInterfaces, uDAEngine;
+
+type
+  { IDAInterbaseConnection
+      For identification purposes. Implemented by all IB connections }
+  IDAInterbaseConnection = interface(IDAConnection)
+    ['{CE1B8144-4EA6-4815-ACD2-D5A4B62F2E69}']
+  end;
+
+  { IDAIBTransactionAccess
+      Interbase connections usually refer to a separate transaction object unlike all
+      the rest of data access components. If implemented, this interfaces provides access
+      to the inner transaction object. See implementation of IBX and IBO drivers. }
+  IDAIBTransactionAccess = interface
+    ['{C1BDDDD3-749A-4D25-BD1E-43715B697959}']
+    function GetTransaction: TObject; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    procedure Commit; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure CommitRetaining; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure Rollback; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure RollbackRetaining; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    property Transaction: TObject read GetTransaction;
+  end;
+
+  { IDAIBConnectionProperties
+      Provides access to common properties of Interbase connections }
+  IDAIBConnectionProperties = interface
+    ['{5F001B6F-4FB6-46B7-BC27-3326C4658F75}']
+    function GetRole: string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetRole(const Value: string); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetSQLDialect: integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetSQLDialect(Value: integer); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function GetCharset: string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetCharset(const Value: string); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    procedure Commit; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure CommitRetaining; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure Rollback; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure RollbackRetaining; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    property Role: string read GetRole write SetRole;
+    property SQLDialect: integer read GetSQLDialect write SetSQLDialect;
+
+    property Charset: string read GetCharset write SetCharset;
+  end;
+
+  TDAIBAuxParams = (ibxp_Role, ibxp_Dialect, ibxp_Charset);
+
+  TDAIBDriver = class(TDAEDriver)
+  protected
+    procedure GetAuxParams(const AuxDriver: string; out List: IROStrings); override;
+    function GetAvailableDriverOptions: TDAAvailableDriverOptions; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetDefaultConnectionType(const AuxDriver: string): string; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  public
+  end;
+
+  TDAIBConnection = class(TDAEConnection, IDAConnection, IDAUseGenerators, IDAFileBasedDatabase, IDAInterbaseConnection,IDACanQueryGeneratorsNames)
+  private
+  protected
+    function GetSQLDialect: integer; virtual; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}abstract;
+    // IDAConnection
+    procedure DoGetTableFields(const aTableName: string; out Fields: TDAFieldCollection); override;
+    function GetSPSelectSyntax(HasArguments: Boolean): string; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function CreateMacroProcessor: TDASQLMacroProcessor; override;
+    function DoGetLastAutoInc(const GeneratorName: string): integer; override;
+    function IdentifierNeedsQuoting(const iIdentifier: string): boolean; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure DoGetForeignKeys(out ForeignKeys: TDADriverForeignKeyCollection); override;
+    procedure DoGetTableNames(out List: IROStrings); override;
+    procedure DoGetViewNames(out List: IROStrings); override;
+    procedure DoGetStoredProcedureNames(out List: IROStrings); override;
+    // IDAUseGenerators
+    function GetNextAutoinc(const GeneratorName: string): integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // IDAFileBasedDatabase
+    function GetFileExtensions: IROStrings;
+    // IDACanQueryGeneratorsNames
+    function GetGeneratorNames: IROStrings;
+  public
+  end;
+
+const
+  IBAuxParams: array[TDAIBAuxParams] of string = (
+    'Role=',
+    'Dialect=1,2,3',
+    'Charset=ASCII,BIG_5,CYRL,DOS437,DOS850,DOS852,DOS857,DOS860,DOS861,DOS863, ' +
+    'DOS865,EUCJ_0208,GB_2312,ISO8859_1,ISO8859_2,KSC_5601,NEXT,NONE, ' +
+    'OCTETS,SJIS_0208,UNICODE_FSS,WIN1250,WIN1251,WIN1252,WIN1253,WIN1254'
+    );
+const
+  IB_DriverType = 'Interbase';
+
+procedure AddIBAuxParams(const List: IROStrings);
+
+function IB_GetFileExtensions: IROStrings;
+procedure IB_GetTableFields(const aTableName: string; Query: IDADataset; out Fields: TDAFieldCollection);
+function IB_GetSPSelectSyntax(HasArguments: Boolean): String;
+function IB_GetNextAutoinc(const GeneratorName: string; Query: IDADataset): integer;
+function IB_GetLastAutoInc(const GeneratorName: string; Query: IDADataset): integer;
+function IB_CreateMacroProcessor: TDASQLMacroProcessor;
+Procedure IB_DoGetForeignKeys(Query: IDADataset;ForeignKeys: TDADriverForeignKeyCollection);
+procedure IB_GetObjectNames(Query: IDADataset;AList: IROStrings; AObjectType: TDAObjecttype);
+function IB_IdentifierNeedsQuoting(const iIdentifier: string; ASQLDialect: integer): boolean;
+function IB_GetGeneratorNames(Query: IDADataset):IROStrings;
+
+implementation
+uses
+  SysUtils, uDAMacroProcessors;
+
+var
+  ib_reservedwords: array of string;
+
+procedure AddIBAuxParams(const List: IROStrings);
+var
+  x: TDAIBAuxParams;
+begin
+  for x := Low(TDAIBAuxParams) to High(TDAIBAuxParams) do
+    List.Add(IBAuxParams[x])
+end;
+
+function IB_GetFileExtensions: IROStrings;
+begin
+  result := TROStrings.Create;
+  result.Add('*.fdb;Firebird Database (*.fdb)');
+  result.Add('*.gdb;Interbase Database (*.gdb)');
+  result.Add('*.*;All files (*.*)');  
+end;
+
+procedure IB_GetTableFields(const aTableName: string; Query: IDADataset; out Fields: TDAFieldCollection);
+const
+  IBSQL_TableInfo =
+    'select a.rdb$field_name,a.rdb$null_flag, '+
+    'b.rdb$field_precision, b.rdb$field_scale, ' +
+    'b.rdb$null_flag, b.rdb$computed_source, c.rdb$type_name '+
+    'from rdb$relation_fields a '+
+    'left join RDB$FIELDS b on (a.rdb$field_source = b.rdb$field_name) '+
+    'left join RDB$TYPES c on (b.rdb$field_type = c.rdb$type and c.rdb$field_name = ''RDB$FIELD_TYPE'') '+
+    'where (a.rdb$relation_name = ''%s'')';
+  IBSQL_PRIMARYKEY =
+    'select d.rdb$field_name from rdb$relation_constraints c '+
+    'left join rdb$index_segments d on (c.rdb$index_name = d.rdb$index_name) '+
+    'where (c.rdb$relation_name = ''%s'') and (c.rdb$constraint_type = ''PRIMARY KEY'')';
+var
+  fld: TDAField;
+begin
+  Fields := TDAFieldCollection.Create(nil);
+  try
+    // main info
+    Query.SQL := 'SELECT * FROM ' + aTableName;
+    Query.Open;
+    Fields.Assign(Query.Fields);
+
+    // required
+    Query.Close;
+    Query.SQL := Format(IBSQL_TableInfo,[aTableName]);
+    Query.Open;
+    While not Query.Eof do begin
+      fld := Fields.FindField(Trim(Query.Fields[0].AsString));
+      if Fld <> nil then begin
+        if Query.Fields[1].IsNull then
+          Fld.Required:=(Query.Fields[4].AsInteger = 1)
+        else
+          Fld.Required:=(Query.Fields[1].AsInteger = 1);
+        if (Query.Fields[6].AsString = 'INT64') and not Query.Fields[2].IsNull and not Query.Fields[3].IsNull then
+          fld.DataType := datDecimal;
+        if fld.DataType = datDecimal then begin
+          fld.DecimalPrecision:=Query.Fields[2].AsInteger;
+          fld.DecimalScale:=ABS(Query.Fields[3].AsInteger);
+        end;
+        if not Query.Fields[5].IsNull then begin
+          fld.ReadOnly:= True;
+          fld.LogChanges:= False;
+        end;
+      end;
+      Query.Next;
+    end;
+
+    // pk
+    Query.Close;
+    Query.SQL:= Format(IBSQL_PRIMARYKEY,[aTableName]);
+    Query.Open;
+    While not Query.Eof do begin
+      fld := Fields.FindField(Trim(Query.Fields[0].AsString));
+      if Fld <> nil then begin
+        fld.InPrimaryKey := True;
+        fld.Required := True;
+      end;
+      Query.Next;
+    end;
+  finally
+    Query := nil;
+  end;
+end;
+
+function IB_GetSPSelectSyntax(HasArguments: Boolean): String;
+begin
+  if HasArguments then
+    Result := 'SELECT * FROM {0}({1})'
+  else
+    Result := 'SELECT * FROM {0}';
+end;
+
+function IB_GetNextAutoinc(const GeneratorName: string; Query: IDADataset): integer;
+begin
+  try
+    Query.SQL:=Format('SELECT Gen_id(%s,1) FROM RDB$Database', [GeneratorName]);
+    Query.Open;
+    Result := Query.Fields[0].AsInteger;
+  finally
+    Query:=nil;
+  end;
+end;
+
+function IB_GetLastAutoInc(const GeneratorName: string;Query: IDADataset): integer;
+begin
+  try
+    Query.SQL:=Format('SELECT Gen_id(%s,0) FROM RDB$Database', [GeneratorName]);
+    Query.Open;
+    Result := Query.Fields[0].AsInteger;
+  finally
+    Query:=nil;
+  end;
+end;
+
+
+function IB_CreateMacroProcessor: TDASQLMacroProcessor;
+begin
+  result := TDAIBMacroProcessor.Create;
+end;
+
+Procedure IB_DoGetForeignKeys(Query: IDADataset;ForeignKeys: TDADriverForeignKeyCollection);
+var
+  lCurrConstraint: string;
+  lCurrFK: TDADriverForeignKey;
+const
+  sFK_SQL =
+    'SELECT A.RDB$CONSTRAINT_NAME, A.RDB$RELATION_NAME AS TABLE_NAME, ' +
+    //A.RDB$CONSTRAINT_NAME AS FK_NAME, B.RDB$UPDATE_RULE AS UR, B.RDB$DELETE_RULE AS DR,'+
+  'C.RDB$RELATION_NAME AS FK_TABLE, D.RDB$FIELD_NAME AS FK_FIELD, ' +
+    'E.RDB$FIELD_NAME AS ONFIELD ' +
+    'FROM ' +
+    'RDB$RELATION_CONSTRAINTS A JOIN RDB$REF_CONSTRAINTS B ON (A.RDB$CONSTRAINT_NAME = B.RDB$CONSTRAINT_NAME) ' +
+    'JOIN RDB$RELATION_CONSTRAINTS C ON (B.RDB$CONST_NAME_UQ=C.RDB$CONSTRAINT_NAME)' +
+    'JOIN RDB$INDEX_SEGMENTS D ON (C.RDB$INDEX_NAME=D.RDB$INDEX_NAME) ' +
+    'JOIN RDB$INDEX_SEGMENTS E  ON (A.RDB$INDEX_NAME=E.RDB$INDEX_NAME) AND (D.RDB$FIELD_POSITION = E.RDB$FIELD_POSITION) ' +
+    'WHERE (A.RDB$CONSTRAINT_TYPE = ''FOREIGN KEY'') ' +
+    'ORDER BY A.RDB$CONSTRAINT_NAME, A.RDB$RELATION_NAME, D.RDB$FIELD_POSITION, E.RDB$FIELD_POSITION ';
+begin
+  lCurrConstraint := '';
+  lCurrFK := nil;
+  try
+    Query.SQL := sFK_SQL;
+    Query.Open;
+
+    ForeignKeys.Clear;
+    while (not Query.EOF) do begin
+
+      if lCurrConstraint <> Query.Fields[0].AsString then begin
+        lCurrConstraint := Query.Fields[0].AsString;
+
+        lCurrFK := ForeignKeys.Add();
+        with lCurrFK do begin
+          FKField := TrimRight(Query.Fields[4].AsString);
+          PKField := TrimRight(Query.Fields[3].AsString);
+          FKTable := TrimRight(Query.Fields[1].AsString);
+          PKTable := TrimRight(Query.Fields[2].AsString);
+        end;
+      end else begin
+        with lCurrFK do begin
+          FKField := FKField + ';' + TrimRight(Query.Fields[4].AsString);
+          PKField := PKField + ';' + TrimRight(Query.Fields[3].AsString);
+        end;
+      end;
+      Query.Next;
+    end;
+  finally
+    Query := nil;
+  end;
+end;
+
+procedure IB_GetObjectNames(Query: IDADataset;AList: IROStrings; AObjectType: TDAObjecttype);
+begin
+  try
+    case AObjectType of
+      dotTable: Query.SQL := 'Select RDB$RELATION_NAME from RDB$RELATIONS WHERE (RDB$VIEW_BLR is NULL) AND (RDB$SYSTEM_FLAG = 0) ORDER BY 1';
+      dotProcedure: Query.SQL := 'Select RDB$PROCEDURE_NAME from RDB$PROCEDURES ORDER BY 1';
+      dotView: Query.SQL := 'Select RDB$RELATION_NAME from RDB$RELATIONS WHERE (RDB$VIEW_BLR is not NULL) ORDER BY 1';
+    else
+    end;
+    Query.Open;
+    while not Query.EOF do begin
+      AList.Add(Trim(Query.Fields[0].AsString));
+      Query.Next;
+    end;
+  finally
+    Query:=nil;
+  end;
+end;
+
+function IB_IdentifierNeedsQuoting(const iIdentifier: string; ASQLDialect: integer): boolean;
+var
+  i: integer;
+begin
+  Result := True;
+  if (ASQLDialect >= 3) then
+    for i := 1 to Length(iIdentifier) do
+      if not CharInSet(iIdentifier[i], ['A'..'Z', '0'..'9', '_']) then Exit;
+  Result := (pos('.', iIdentifier) > 0) or TestIdentifier(iIdentifier, ib_reservedwords);
+end;
+
+function IB_GetGeneratorNames(Query: IDADataset):IROStrings;
+const
+  sql = 'SELECT RDB$GENERATOR_NAME FROM RDB$GENERATORS WHERE RDB$SYSTEM_FLAG = 0 ORDER BY RDB$GENERATOR_NAME';
+begin
+  Result:= NewROStrings;
+  try
+    Query.SQL := sql;
+    Query.Open;
+    while not Query.EOF do begin
+      Result.Add(Trim(Query.Fields[0].AsString));
+      Query.Next;
+    end;
+  finally
+    Query:=nil;
+  end;
+end;
+
+{ TDAIBConnection }
+
+
+function TDAIBConnection.CreateMacroProcessor: TDASQLMacroProcessor;
+begin
+  result := IB_CreateMacroProcessor;
+end;
+
+procedure TDAIBConnection.DoGetForeignKeys(out ForeignKeys: TDADriverForeignKeyCollection);
+begin
+  inherited;
+  IB_DoGetForeignKeys(GetDatasetClass.Create(Self),ForeignKeys);
+end;
+
+function TDAIBConnection.DoGetLastAutoInc(const GeneratorName: string): integer;
+begin
+  Result:= IB_GetLastAutoInc(GeneratorName,GetDatasetClass.Create(Self));
+end;
+
+procedure TDAIBConnection.DoGetStoredProcedureNames(out List: IROStrings);
+begin
+  inherited;
+  IB_GetObjectNames(GetDatasetClass.Create(Self),List,dotProcedure);
+end;
+
+procedure TDAIBConnection.DoGetTableFields(const aTableName: string;
+  out Fields: TDAFieldCollection);
+begin
+  IB_GetTableFields(QuoteIdentifierIfNeeded(aTableName),GetDatasetClass.Create(Self),Fields);
+end;
+
+procedure TDAIBConnection.DoGetTableNames(out List: IROStrings);
+begin
+  inherited;
+  IB_GetObjectNames(GetDatasetClass.Create(Self),List,dotTable);
+end;
+
+procedure TDAIBConnection.DoGetViewNames(out List: IROStrings);
+begin
+  inherited;
+  IB_GetObjectNames(GetDatasetClass.Create(Self),List,dotView);
+end;
+
+function TDAIBConnection.GetFileExtensions: IROStrings;
+begin
+  Result:= IB_GetFileExtensions;
+end;
+
+function TDAIBConnection.GetGeneratorNames: IROStrings;
+begin
+  Result:= IB_GetGeneratorNames(GetDatasetClass.Create(Self));
+end;
+
+function TDAIBConnection.GetNextAutoinc(const GeneratorName: string): integer;
+begin
+  Result:= IB_GetNextAutoinc(GeneratorName,GetDatasetClass.Create(Self));
+end;
+
+function TDAIBConnection.GetSPSelectSyntax(HasArguments: Boolean): string;
+begin
+  Result:= IB_GetSPSelectSyntax(HasArguments);
+end;
+
+function TDAIBConnection.IdentifierNeedsQuoting(const iIdentifier: string): boolean;
+begin
+  result := inherited IdentifierNeedsQuoting(iIdentifier);
+  if not result then result := IB_IdentifierNeedsQuoting(iIdentifier,GetSQLDialect);
+end;
+
+{ TDAIBDriver }
+
+procedure TDAIBDriver.GetAuxParams(const AuxDriver: string;
+  out List: IROStrings);
+begin
+  inherited;
+  AddIBAuxParams(List);
+end;
+
+function TDAIBDriver.GetAvailableDriverOptions: TDAAvailableDriverOptions;
+begin
+  result := [doServerName, doDatabaseName, doLogin, doCustom];
+end;
+
+function TDAIBDriver.GetDefaultConnectionType(const AuxDriver: string): string;
+begin
+  Result:= IB_DriverType;
+end;
+
+procedure ib_InitializeReservedWords;
+begin
+  SetLength(ib_reservedwords, 281);
+  // sorted with TStringList.Sort (bds2007)
+  ib_reservedwords[0] := 'ACTION';
+  ib_reservedwords[1] := 'ACTIVE';
+  ib_reservedwords[2] := 'ADD';
+  ib_reservedwords[3] := 'ADMIN';
+  ib_reservedwords[4] := 'AFTER';
+  ib_reservedwords[5] := 'ALL';
+  ib_reservedwords[6] := 'ALTER';
+  ib_reservedwords[7] := 'AND';
+  ib_reservedwords[8] := 'ANY';
+  ib_reservedwords[9] := 'AS';
+  ib_reservedwords[10] := 'ASC';
+  ib_reservedwords[11] := 'ASCENDING';
+  ib_reservedwords[12] := 'AT';
+  ib_reservedwords[13] := 'AUTO';
+  ib_reservedwords[14] := 'AUTODDL';
+  ib_reservedwords[15] := 'AVG';
+  ib_reservedwords[16] := 'BASE_NAME';
+  ib_reservedwords[17] := 'BASED';
+  ib_reservedwords[18] := 'BASENAME';
+  ib_reservedwords[19] := 'BEFORE';
+  ib_reservedwords[20] := 'BEGIN';
+  ib_reservedwords[21] := 'BETWEEN';
+  ib_reservedwords[22] := 'BLOB';
+  ib_reservedwords[23] := 'BLOBEDIT';
+  ib_reservedwords[24] := 'BUFFER';
+  ib_reservedwords[25] := 'BY';
+  ib_reservedwords[26] := 'CACHE';
+  ib_reservedwords[27] := 'CASCADE';
+  ib_reservedwords[28] := 'CAST';
+  ib_reservedwords[29] := 'CHAR';
+  ib_reservedwords[30] := 'CHAR_LENGTH';
+  ib_reservedwords[31] := 'CHARACTER';
+  ib_reservedwords[32] := 'CHARACTER_LENGTH';
+  ib_reservedwords[33] := 'CHECK';
+  ib_reservedwords[34] := 'CHECK_POINT_LEN';
+  ib_reservedwords[35] := 'CHECK_POINT_LENGTH';
+  ib_reservedwords[36] := 'CLOSE';
+  ib_reservedwords[37] := 'COLLATE';
+  ib_reservedwords[38] := 'COLLATION';
+  ib_reservedwords[39] := 'COLUMN';
+  ib_reservedwords[40] := 'COMMIT';
+  ib_reservedwords[41] := 'COMMITTED';
+  ib_reservedwords[42] := 'COMPILETIME';
+  ib_reservedwords[43] := 'COMPUTED';
+  ib_reservedwords[44] := 'CONDITIONAL';
+  ib_reservedwords[45] := 'CONNECT';
+  ib_reservedwords[46] := 'CONSTRAINT';
+  ib_reservedwords[47] := 'CONTAINING';
+  ib_reservedwords[48] := 'CONTINUE';
+  ib_reservedwords[49] := 'COUNT';
+  ib_reservedwords[50] := 'CREATE';
+  ib_reservedwords[51] := 'CSTRING';
+  ib_reservedwords[52] := 'CURRENT';
+  ib_reservedwords[53] := 'CURRENT_DATE';
+  ib_reservedwords[54] := 'CURRENT_TIME';
+  ib_reservedwords[55] := 'CURRENT_TIMESTAMP';
+  ib_reservedwords[56] := 'CURSOR';
+  ib_reservedwords[57] := 'DATABASE';
+  ib_reservedwords[58] := 'DATE';
+  ib_reservedwords[59] := 'DAY';
+  ib_reservedwords[60] := 'DB_KEY';
+  ib_reservedwords[61] := 'DEBUG';
+  ib_reservedwords[62] := 'DEC';
+  ib_reservedwords[63] := 'DECIMAL';
+  ib_reservedwords[64] := 'DECLARE';
+  ib_reservedwords[65] := 'DEFAULT';
+  ib_reservedwords[66] := 'DELETE';
+  ib_reservedwords[67] := 'DESC';
+  ib_reservedwords[68] := 'DESCENDING';
+  ib_reservedwords[69] := 'DESCRIBE';
+  ib_reservedwords[70] := 'DESCRIPTOR';
+  ib_reservedwords[71] := 'DISCONNECT';
+  ib_reservedwords[72] := 'DISPLAY';
+  ib_reservedwords[73] := 'DISTINCT';
+  ib_reservedwords[74] := 'DO';
+  ib_reservedwords[75] := 'DOMAIN';
+  ib_reservedwords[76] := 'DOUBLE';
+  ib_reservedwords[77] := 'DROP';
+  ib_reservedwords[78] := 'ECHO';
+  ib_reservedwords[79] := 'EDIT';
+  ib_reservedwords[80] := 'ELSE';
+  ib_reservedwords[81] := 'END';
+  ib_reservedwords[82] := 'ENTRY_POINT';
+  ib_reservedwords[83] := 'ESCAPE';
+  ib_reservedwords[84] := 'EVENT';
+  ib_reservedwords[85] := 'EXCEPTION';
+  ib_reservedwords[86] := 'EXECUTE';
+  ib_reservedwords[87] := 'EXISTS';
+  ib_reservedwords[88] := 'EXIT';
+  ib_reservedwords[89] := 'EXTERN';
+  ib_reservedwords[90] := 'EXTERNAL';
+  ib_reservedwords[91] := 'EXTRACT';
+  ib_reservedwords[92] := 'FETCH';
+  ib_reservedwords[93] := 'FILE';
+  ib_reservedwords[94] := 'FILTER';
+  ib_reservedwords[95] := 'FLOAT';
+  ib_reservedwords[96] := 'FOR';
+  ib_reservedwords[97] := 'FOREIGN';
+  ib_reservedwords[98] := 'FOUND';
+  ib_reservedwords[99] := 'FREE_IT';
+  ib_reservedwords[100] := 'FROM';
+  ib_reservedwords[101] := 'FULL';
+  ib_reservedwords[102] := 'FUNCTION';
+  ib_reservedwords[103] := 'GDSCODE';
+  ib_reservedwords[104] := 'GEN_ID';
+  ib_reservedwords[105] := 'GENERATOR';
+  ib_reservedwords[106] := 'GLOBAL';
+  ib_reservedwords[107] := 'GOTO';
+  ib_reservedwords[108] := 'GRANT';
+  ib_reservedwords[109] := 'GROUP';
+  ib_reservedwords[110] := 'GROUP_COMMIT_';
+  ib_reservedwords[111] := 'GROUP_COMMIT_WAIT';
+  ib_reservedwords[112] := 'HAVING';
+  ib_reservedwords[113] := 'HELP';
+  ib_reservedwords[114] := 'HOUR';
+  ib_reservedwords[115] := 'IF';
+  ib_reservedwords[116] := 'IMMEDIATE';
+  ib_reservedwords[117] := 'IN';
+  ib_reservedwords[118] := 'INACTIVE';
+  ib_reservedwords[119] := 'INDEX';
+  ib_reservedwords[120] := 'INDICATOR';
+  ib_reservedwords[121] := 'INIT';
+  ib_reservedwords[122] := 'INNER';
+  ib_reservedwords[123] := 'INPUT';
+  ib_reservedwords[124] := 'INPUT_TYPE';
+  ib_reservedwords[125] := 'INSERT';
+  ib_reservedwords[126] := 'INT';
+  ib_reservedwords[127] := 'INTEGER';
+  ib_reservedwords[128] := 'INTO';
+  ib_reservedwords[129] := 'IS';
+  ib_reservedwords[130] := 'ISOLATION';
+  ib_reservedwords[131] := 'ISQL';
+  ib_reservedwords[132] := 'JOIN';
+  ib_reservedwords[133] := 'KEY';
+  ib_reservedwords[134] := 'LC_MESSAGES';
+  ib_reservedwords[135] := 'LC_TYPE';
+  ib_reservedwords[136] := 'LEFT';
+  ib_reservedwords[137] := 'LENGTH';
+  ib_reservedwords[138] := 'LEV';
+  ib_reservedwords[139] := 'LEVEL';
+  ib_reservedwords[140] := 'LIKE';
+  ib_reservedwords[141] := 'LOG_BUF_SIZE';
+  ib_reservedwords[142] := 'LOG_BUFFER_SIZE';
+  ib_reservedwords[143] := 'LOGFILE';
+  ib_reservedwords[144] := 'LONG';
+  ib_reservedwords[145] := 'MANUAL';
+  ib_reservedwords[146] := 'MAX';
+  ib_reservedwords[147] := 'MAX_SEGMENT';
+  ib_reservedwords[148] := 'MAXIMUM';
+  ib_reservedwords[149] := 'MAXIMUM_SEGMENT';
+  ib_reservedwords[150] := 'MERGE';
+  ib_reservedwords[151] := 'MESSAGE';
+  ib_reservedwords[152] := 'MIN';
+  ib_reservedwords[153] := 'MINIMUM';
+  ib_reservedwords[154] := 'MINUTE';
+  ib_reservedwords[155] := 'MODULE_NAME';
+  ib_reservedwords[156] := 'MONTH';
+  ib_reservedwords[157] := 'NAMES';
+  ib_reservedwords[158] := 'NATIONAL';
+  ib_reservedwords[159] := 'NATURAL';
+  ib_reservedwords[160] := 'NCHAR';
+  ib_reservedwords[161] := 'NO';
+  ib_reservedwords[162] := 'NOAUTO';
+  ib_reservedwords[163] := 'NOT';
+  ib_reservedwords[164] := 'NULL';
+  ib_reservedwords[165] := 'NUM_LOG_BUFFERS';
+  ib_reservedwords[166] := 'NUM_LOG_BUFS';
+  ib_reservedwords[167] := 'NUMERIC';
+  ib_reservedwords[168] := 'OCTET_LENGTH';
+  ib_reservedwords[169] := 'OF';
+  ib_reservedwords[170] := 'ON';
+  ib_reservedwords[171] := 'ONLY';
+  ib_reservedwords[172] := 'OPEN';
+  ib_reservedwords[173] := 'OPTION';
+  ib_reservedwords[174] := 'OR';
+  ib_reservedwords[175] := 'ORDER';
+  ib_reservedwords[176] := 'OUTER';
+  ib_reservedwords[177] := 'OUTPUT';
+  ib_reservedwords[178] := 'OUTPUT_TYPE';
+  ib_reservedwords[179] := 'OVERFLOW';
+  ib_reservedwords[180] := 'PAGE';
+  ib_reservedwords[181] := 'PAGE_SIZE';
+  ib_reservedwords[182] := 'PAGELENGTH';
+  ib_reservedwords[183] := 'PAGES';
+  ib_reservedwords[184] := 'PARAMETER';
+  ib_reservedwords[185] := 'PASSWORD';
+  ib_reservedwords[186] := 'PLAN';
+  ib_reservedwords[187] := 'POSITION';
+  ib_reservedwords[188] := 'POST_EVENT';
+  ib_reservedwords[189] := 'PRECISION';
+  ib_reservedwords[190] := 'PREPARE';
+  ib_reservedwords[191] := 'PRIMARY';
+  ib_reservedwords[192] := 'PRIVILEGES';
+  ib_reservedwords[193] := 'PROCEDURE';
+  ib_reservedwords[194] := 'PROTECTED';
+  ib_reservedwords[195] := 'PUBLIC';
+  ib_reservedwords[196] := 'QUIT';
+  ib_reservedwords[197] := 'RAW_PARTITIONS';
+  ib_reservedwords[198] := 'RDB$DB_KEY';
+  ib_reservedwords[199] := 'READ';
+  ib_reservedwords[200] := 'REAL';
+  ib_reservedwords[201] := 'RECORD_VERSION';
+  ib_reservedwords[202] := 'REFERENCES';
+  ib_reservedwords[203] := 'RELEASE';
+  ib_reservedwords[204] := 'RESERV';
+  ib_reservedwords[205] := 'RESERVING';
+  ib_reservedwords[206] := 'RESTRICT';
+  ib_reservedwords[207] := 'RETAIN';
+  ib_reservedwords[208] := 'RETURN';
+  ib_reservedwords[209] := 'RETURNING_VALUES';
+  ib_reservedwords[210] := 'RETURNS';
+  ib_reservedwords[211] := 'REVOKE';
+  ib_reservedwords[212] := 'RIGHT';
+  ib_reservedwords[213] := 'ROLE';
+  ib_reservedwords[214] := 'ROLLBACK';
+  ib_reservedwords[215] := 'RUNTIME';
+  ib_reservedwords[216] := 'SCHEMA';
+  ib_reservedwords[217] := 'SECOND';
+  ib_reservedwords[218] := 'SEGMENT';
+  ib_reservedwords[219] := 'SELECT';
+  ib_reservedwords[220] := 'SET';
+  ib_reservedwords[221] := 'SHADOW';
+  ib_reservedwords[222] := 'SHARED';
+  ib_reservedwords[223] := 'SHELL';
+  ib_reservedwords[224] := 'SHOW';
+  ib_reservedwords[225] := 'SINGULAR';
+  ib_reservedwords[226] := 'SIZE';
+  ib_reservedwords[227] := 'SMALLINT';
+  ib_reservedwords[228] := 'SNAPSHOT';
+  ib_reservedwords[229] := 'SOME';
+  ib_reservedwords[230] := 'SORT';
+  ib_reservedwords[231] := 'SQLCODE';
+  ib_reservedwords[232] := 'SQLERROR';
+  ib_reservedwords[233] := 'SQLWARNING';
+  ib_reservedwords[234] := 'STABILITY';
+  ib_reservedwords[235] := 'STARTING';
+  ib_reservedwords[236] := 'STARTS';
+  ib_reservedwords[237] := 'STATEMENT';
+  ib_reservedwords[238] := 'STATIC';
+  ib_reservedwords[239] := 'STATISTICS';
+  ib_reservedwords[240] := 'SUB_TYPE';
+  ib_reservedwords[241] := 'SUM';
+  ib_reservedwords[242] := 'SUSPEND';
+  ib_reservedwords[243] := 'TABLE';
+  ib_reservedwords[244] := 'TERMINATOR';
+  ib_reservedwords[245] := 'THEN';
+  ib_reservedwords[246] := 'TIME';
+  ib_reservedwords[247] := 'TIMESTAMP';
+  ib_reservedwords[248] := 'TO';
+  ib_reservedwords[249] := 'TRANSACTION';
+  ib_reservedwords[250] := 'TRANSLATE';
+  ib_reservedwords[251] := 'TRANSLATION';
+  ib_reservedwords[252] := 'TRIGGER';
+  ib_reservedwords[253] := 'TRIM';
+  ib_reservedwords[254] := 'TYPE';
+  ib_reservedwords[255] := 'UNCOMMITTED';
+  ib_reservedwords[256] := 'UNION';
+  ib_reservedwords[257] := 'UNIQUE';
+  ib_reservedwords[258] := 'UPDATE';
+  ib_reservedwords[259] := 'UPPER';
+  ib_reservedwords[260] := 'USER';
+  ib_reservedwords[261] := 'USING';
+  ib_reservedwords[262] := 'VALUE';
+  ib_reservedwords[263] := 'VALUES';
+  ib_reservedwords[264] := 'VARCHAR';
+  ib_reservedwords[265] := 'VARIABLE';
+  ib_reservedwords[266] := 'VARYING';
+  ib_reservedwords[267] := 'VERSION';
+  ib_reservedwords[268] := 'VIEW';
+  ib_reservedwords[269] := 'WAIT';
+  ib_reservedwords[270] := 'WAIT_TIME';
+  ib_reservedwords[271] := 'WEEKDAY';
+  ib_reservedwords[272] := 'WHEN';
+  ib_reservedwords[273] := 'WHENEVER';
+  ib_reservedwords[274] := 'WHERE';
+  ib_reservedwords[275] := 'WHILE';
+  ib_reservedwords[276] := 'WITH';
+  ib_reservedwords[277] := 'WORK';
+  ib_reservedwords[278] := 'WRITE';
+  ib_reservedwords[279] := 'YEAR';
+  ib_reservedwords[280] := 'YEARDAY';
+end;
+
+initialization
+  ib_InitializeReservedWords;
+finalization
+  ib_reservedwords := nil;
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAInterfaces.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAInterfaces.pas
new file mode 100644
index 0000000..7764640
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAInterfaces.pas	
@@ -0,0 +1,6884 @@
+unit uDAInterfaces;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  Classes, DB, uROClasses, SysUtils, uDASupportClasses,
+  DataAbstract3_Intf, DataAbstract4_Intf, uROXmlIntf, FMTBcd;
+
+const
+  func_GetDriverObject = 'GetDriverObject';
+  ClientFieldPrefix = '##';
+  old_FieldPrefix = 'OLD_';
+
+type
+{$IFDEF DELPHI6}
+  UInt64 = Int64;
+{$ENDIF}
+{$IFDEF DELPHI7}
+  UInt64 = Int64;  // otherwise C1118 error
+{$ENDIF}
+
+  TDAObjecttype = (dotTable,dotProcedure, dotView);
+  TDAChangeType = (ctInsert, ctUpdate, ctDelete);
+  TDAChangeTypes = set of TDAChangeType;
+  TDAChangeStatus = (csPending, csResolved, csFailed);
+
+  TDASQLCondition = (cEqual,
+    cDifferent,
+    cMajor,
+    cLess,
+    cMajorOrEqual,
+    cLessOrEqual,
+    cLike,
+    cIn,
+    cContaining,
+    cIsNull,
+    cIsNotNull);
+
+  TDASQLOperator = (opAND,
+    opOR,
+    opNOT);
+
+  TDADefaultOperator = (doNone, doAnd, doOr);
+
+  TDABlobType = (dabtUnknown, dabtBlob, dabtMemo, dabtOraBlob, dabtOraClob, dabtGraphic, dabtTypedBinary, dabtTimestamp);
+
+  TDAJoinType = (jtInner, jtLeftOuter, jtRightOuter, jtFullOuter, jtCross);
+
+  TDARelationshipType = (rtForeignKey, rtMasterDetail);
+
+const
+  StrSQLCondition: array[TDASQLCondition] of string = (
+    '=', '<>', '>', '<', '>=', '<=', 'LIKE', 'IN', 'CONTAINING', 'IS NULL', 'IS NOT NULL');
+
+  StrSQLOperator: array[TDASQLOperator] of string = (
+    'AND', 'OR', 'NOT');
+
+  BlobTypeMappings : array[TDABlobType] of TFieldType =
+    (ftBlob, ftBlob, ftMemo, ftOraBlob, ftOraClob, ftGraphic,ftTypedBinary, ftBlob);
+
+type
+  { Forwards }
+  IDADriver = interface;
+  IDAStoredProcedure = interface;
+  IDADataset = interface;
+  IDAConnection = interface;
+  IDASQLCommand = interface;
+  IDADataDictionary = interface;
+  IDATestableObject = interface;
+  IDAConnectionPool = interface;
+  IDAConnectionManager = interface;
+
+  TDACustomField = class;
+  TDADataset = class;
+
+  { Driver access }
+  TDAGetDriverObject = function: IDADriver; stdcall;
+
+  //TDriverErrorEvent = procedure(anErrorCode : integer; const anErrorMessage : string) of object;
+
+  EDADriverLoadException = class(Exception)
+  private
+    fErrorCode: integer;
+
+  public
+    constructor Create(anErrorCode: integer; const anErrorMessage: string);
+
+    property ErrorCode: integer read fErrorCode;
+  end;
+  EDADriverLoadExceptionClass = class of EDADriverLoadException;
+  TDADataAbstractException = EDADriverLoadException;
+  TDADataAbstractExceptionClass = class of TDADataAbstractException;
+
+  { Misc. types }
+  TDASQLStatementType = (stSQL, stStoredProcedure, stAutoSQL);
+
+  TDACommandType = (cmdInsert, cmdDelete, cmdUpdate);
+  TDACommandTypes = set of TDACommandType;
+
+  TDAPersistFormat = (pfBinary, pfXML);
+
+  TDAParamType = (daptUnknown, daptInput, daptOutput, daptInputOutput, daptResult);
+
+  TDADataType = (datUnknown,
+    datString,
+    datDateTime,
+    datFloat,
+    datCurrency,
+    datAutoInc,
+    datInteger,
+    datLargeInt,
+    datBoolean,
+    datMemo,
+    datBlob,
+    datWideString,
+    datWideMemo,
+    datLargeAutoInc,
+    datByte,
+    datShortInt,
+    datWord,
+    datSmallInt,
+    datCardinal,
+    datLargeUInt,
+    datGuid,
+    datXml,
+    datDecimal,
+    datSingleFloat);
+
+  { Forwards }
+  TDASQLCommand = class;
+  TDAStatementCollection = class;
+  TDASQLCommandCollection = class;
+  TDAParamCollection = class;
+  TDAJoinConditionCollection = class;
+  TDAUnionSourceTableCollection = class;
+
+  { TDAColumnMapping }
+  TDAColumnMapping = class(TInterfacedCollectionItem)
+  private
+    fDatasetField: string;
+    fTableField: string;
+    fSQLOrigin: string;
+    function GetSQLOrigin: string;
+    function StoreSQLOrigin: Boolean;
+    procedure SetDatasetField(const Value: string);
+    procedure SetSQLOrigin(const Value: string);
+    procedure SetTableField(const Value: string);
+
+  public
+    procedure Assign(aSource: TPersistent); override;
+    procedure AssignFieldMapping(aSource: TPersistent);
+
+  published
+    property DatasetField: string read fDatasetField write SetDatasetField;
+    property TableField: string read fTableField write SetTableField;
+    property SQLOrigin: string read GetSQLOrigin write SetSQLOrigin stored StoreSQLOrigin;
+  end;
+
+  { TDAColumnMappingCollection }
+  TDAColumnMappingCollection = class(TSearcheableCollection)
+  private
+    function GetColumnMappings(Index: integer): TDAColumnMapping;
+    procedure SetColumnMappings(Index: integer;
+      const Value: TDAColumnMapping);
+
+  protected
+    function SetItemName(anItem: TCollectionItem; const aName: string): string; override;
+    function GetItemName(anItem: TCollectionItem): string; override;
+
+  public
+    constructor Create(aOwner: TPersistent);
+
+    procedure AssignColumnMapping(aSource: TPersistent);
+
+    function Add: TDAColumnMapping; reintroduce;
+    function FindMappingByDatasetField(const aDatasetField: string): TDAColumnMapping;
+    function MappingByDatasetField(const aDatasetField: string): TDAColumnMapping;
+    function MappingByTableField(const aTableField: string): TDAColumnMapping;
+
+    property ColumnMappings[Index: integer]: TDAColumnMapping read GetColumnMappings write SetColumnMappings; default;
+  end;
+
+  { TDAStatement }
+  TDAStatement = class(TCollectionItem)
+  private
+    fSQL: string;
+    fStatementType: TDASQLStatementType;
+    fConnection: string;
+    fColumnMappings: TDAColumnMappingCollection;
+    fTargetTable: string;
+    fName: string;
+    fConnectionType: string;
+    fDefault: boolean;
+
+    procedure SetColumnMappings(const Value: TDAColumnMappingCollection);
+    function GetStatementCollection: TDAStatementCollection;
+    procedure SetSQL(const Value: string);
+    function GetNeedsParams: boolean;
+    function StoreSQL: Boolean;
+
+  protected
+    function GetDisplayName: string; override;
+
+  public
+    constructor Create(Collection: TCollection); override;
+    destructor Destroy; override;
+
+    procedure Assign(aSource: TPersistent); override;
+
+    property StatementCollection: TDAStatementCollection read GetStatementCollection;
+    property NeedsParams: boolean read GetNeedsParams;
+  published
+    property Connection: string read fConnection write fConnection;
+    property ConnectionType: string read fConnectionType write fConnectionType;
+    property Default: boolean read fDefault write fDefault default false;
+    property TargetTable: string read fTargetTable write fTargetTable;
+    property Name: string read fName write fName;
+    property SQL: string read fSQL write SetSQL stored StoreSQL;
+    property StatementType: TDASQLStatementType read fStatementType write fStatementType;
+    property ColumnMappings: TDAColumnMappingCollection read fColumnMappings write SetColumnMappings;
+  end;
+
+  { TDAStatementCollection }
+  TDAStatementCollection = class(TSearcheableCollection)
+  private
+    fSQLCommand: TDASQLCommand;
+
+    function GetStatements(Index: integer): TDAStatement;
+    procedure SetStatements(Index: integer; const Value: TDAStatement);
+
+  protected
+    function SetItemName(anItem: TCollectionItem; const aName: string): string; override;
+    function GetItemName(anItem: TCollectionItem): string; override;
+
+  public
+    constructor Create(aOwner: TPersistent; aSQLCommand: TDASQLCommand);
+
+    function Add: TDAStatement; reintroduce;
+    function FindItem(const aName: string; const aStatementName: string=''; const aConnectionType: string = ''; aReturnDefault: Boolean = false): TDAStatement; reintroduce;
+
+    function StatementByName(const aName: string): TDAStatement;
+
+    property SQLCommand: TDASQLCommand read fSQLCommand;
+    property Statements[Index: integer]: TDAStatement read GetStatements write SetStatements; default;
+  end;
+
+  { TDAUpdateRule }
+  TDAUpdateFailureBehavior = (fbRaiseException, fbLogAndContinue, fbIgnoreAndContinue);
+
+  TDAUpdateRule = class(TCollectionItem)
+  private
+    fDatasetName: string;
+    fName: string;
+    fFailureBehavior: TDAUpdateFailureBehavior;
+    fDoInsert: boolean;
+    fDoUpdate: boolean;
+    fDoDelete: boolean;
+    function GetChangeTypes: TDAChangeTypes;
+
+  protected
+    function GetDisplayName : string; override;
+
+  public
+    constructor Create(aCollection : TCollection); override;
+
+    procedure Assign(aSource: TPersistent); override;
+
+    property ChangeTypes: TDAChangeTypes read GetChangeTypes;
+
+  published
+    property Name : string read fName write fName;
+    property DoUpdate : boolean read fDoUpdate write fDoUpdate default True;
+    property DoInsert : boolean read fDoInsert write fDoInsert default True;
+    property DoDelete : boolean read fDoDelete write fDoDelete default True;
+    property DatasetName : string read fDatasetName write fDatasetName;
+
+    property FailureBehavior : TDAUpdateFailureBehavior read fFailureBehavior write fFailureBehavior;
+  end;
+
+  { TDAUpdateRuleCollection }
+  TDAUpdateRuleCollection = class(TSearcheableCollection)
+  private
+    function GetUpdateRules(Index: integer): TDAUpdateRule;
+  protected
+    function SetItemName(anItem: TCollectionItem; const aName: string): string; override;
+    function GetItemName(anItem: TCollectionItem): string; override;
+  public
+    constructor Create(aOwner : TComponent);
+
+    function Add: TDAUpdateRule; reintroduce;
+    function UpdateRuleByName(const aName : string) : TDAUpdateRule;
+
+    property UpdateRules[Index : integer] : TDAUpdateRule read GetUpdateRules; default;
+  end;
+
+  { TDABaseField }
+  TDABaseField = class(TInterfacedCollectionItem)
+  private
+    fDictionaryEntry: string;
+    fSize: integer;
+    fDescription,
+    fName: string;
+    fDataType: TDADataType;
+    fValue: Variant;
+    fBlobType: TDABlobType;
+    fGeneratorName : string;
+    FDecimalPrecision: Integer;
+    FDecimalScale: Integer;
+    //procedure FixSize;
+    procedure UpdateValueType;
+
+  protected
+    function MergeDatadictionaries: Boolean;
+    function GetBlobSize: Integer; virtual;
+    function GetName: string; virtual;
+    procedure SetName(const Value: string); virtual;
+    function GetDataType: TDADataType;
+    procedure SetDataType(aValue: TDADataType);
+    function GetSize: integer;
+    procedure SetSize(Value: integer);
+    function GetValue: Variant; virtual;
+    procedure SetValue(const aValue: Variant); virtual;
+    function GetDescription: string;
+    procedure SetDescription(const Value: string);
+    function StoreBlobType : boolean;
+    function GetBlobType: TDABlobType;
+    procedure SetBlobType(const Value: TDABlobType); virtual;
+    function GetGeneratorName: string;
+    procedure SetGeneratorName(const aValue: string);
+
+    function GetAsBoolean: boolean; virtual;
+    function GetAsCurrency: currency; virtual;
+    function GetAsDateTime: TDateTime; virtual;
+    function GetAsFloat: double; virtual;
+    function GetAsInteger: integer; virtual;
+    function GetAsString: string; virtual;
+    function GetAsVariant: variant; virtual;
+    function GetAsLargeInt: int64; virtual;
+    function GetAsWideString: Widestring; virtual;
+    function GetAsByte: Byte; virtual;
+    function GetAsCardinal: Cardinal; virtual;
+    function GetAsDecimal: TBcd; virtual;
+    function GetAsGuid: TGUID; virtual;
+    function GetAsLargeUInt: UInt64; virtual;
+    function GetAsShortInt: ShortInt; virtual;
+    function GetAsSingle: Single; virtual;
+    function GetAsSmallInt: SmallInt; virtual;
+    function GetAsWord: Word; virtual;
+    function GetAsXml: IXMLNode; virtual;
+    function GetAsAnsiString: Ansistring; virtual;
+    procedure SetAsAnsiString(const aValue: Ansistring); virtual;
+    procedure SetAsByte(const Value: Byte); virtual;
+    procedure SetAsCardinal(const Value: Cardinal); virtual;
+    procedure SetAsDecimal(const Value: TBcd); virtual;
+    procedure SetAsGuid(const Value: TGUID); virtual;
+    procedure SetAsLargeUInt(const Value: UInt64); virtual;
+    procedure SetAsShortInt(const Value: ShortInt); virtual;
+    procedure SetAsSingle(const Value: Single); virtual;
+    procedure SetAsSmallInt(const Value: SmallInt); virtual;
+    procedure SetAsWord(const Value: Word); virtual;
+    procedure SetAsXml(const Value: IXMLNode); virtual;
+    procedure SetAsBoolean(const aValue: boolean); virtual;
+    procedure SetAsCurrency(const aValue: currency); virtual;
+    procedure SetAsDateTime(const aValue: TDateTime); virtual;
+    procedure SetAsString(const aValue: string); virtual;
+    procedure SetAsVariant(const aValue: variant); virtual;
+    procedure SetAsFloat(const aValue: double); virtual;
+    procedure SetAsInteger(const aValue: integer); virtual;
+    procedure SetAsLargeInt(const aValue: Int64); virtual;
+    procedure SetAsWideString(const aValue: Widestring); virtual;
+    function GetIsNull: boolean; virtual;
+
+    function StoreDataType: Boolean;
+    function StoreDescription: Boolean;
+    function StoreGeneratorName: Boolean;
+    function StoreSize: Boolean;
+    function StoreDecimalPrecision: Boolean;
+    function StoreDecimalScale: Boolean;
+
+    function GetDictionaryEntry: string;
+    procedure SetDictionaryEntry(const Value: string);
+    function FindDictionaryField: TDACustomField;
+    function GetDictionaryField: TDACustomField;
+
+    // Internal
+    function GetDisplayName: string; override;
+    procedure SetDisplayName(const Value: string); override;
+    function GetDecimalPrecision: Integer; virtual;
+    procedure SetDecimalPrecision(const Value: Integer);virtual;
+    function GetDecimalScale: Integer;virtual;
+    procedure SetDecimalScale(const Value: Integer);virtual;
+    function IsCompatibleV4: boolean; virtual;
+  public
+    property Value: Variant read GetValue write SetValue;
+
+    procedure Assign(Source: TPersistent); override;
+    procedure AssignField(Source: TDABaseField); virtual;
+
+    function HasValidDictionaryField: Boolean;
+
+    procedure Clear;
+
+    function GetNamePath: string; override;
+
+    property AsBoolean: boolean read GetAsBoolean write SetAsBoolean;
+    property AsCurrency: currency read GetAsCurrency write SetAsCurrency;
+    property AsDateTime: TDateTime read GetAsDateTime write SetAsDateTime; //null->0
+    property AsFloat: double read GetAsFloat write SetAsFloat; //null->0
+    property AsInteger: integer read GetAsInteger write SetAsInteger; //null->0
+    property AsString: string read GetAsString write SetAsString; //null->''
+    property AsAnsiString: Ansistring read GetAsAnsiString write SetAsAnsiString; //null->''
+    property AsVariant: variant read GetAsVariant write SetAsVariant;
+    property AsLargeInt: Int64 read GetAsLargeInt write SetAsLargeInt;
+    property AsWideString: WideString read GetAsWideString write SetAsWideString;
+    property BlobSize: Integer read GetBlobSize;
+    property IsNull: boolean read GetIsNull;
+    property AsByte: Byte read GetAsByte write SetAsByte;
+    property AsShortInt: ShortInt read GetAsShortInt write SetAsShortInt;
+    property AsWord: Word read GetAsWord write SetAsWord;
+    property AsSmallInt: SmallInt read GetAsSmallInt write SetAsSmallInt;
+    property AsCardinal: Cardinal read GetAsCardinal write SetAsCardinal;
+    property AsLargeUInt: UInt64 read GetAsLargeUInt write SetAsLargeUInt;
+    property AsGuid: TGUID read GetAsGuid write SetAsGuid;
+    property AsDecimal: TBcd read GetAsDecimal write SetAsDecimal;
+    property AsXml: IXMLNode read GetAsXml write SetAsXml;
+    property AsSingle: Single read GetAsSingle write SetAsSingle;
+
+    property DictionaryEntry: string read GetDictionaryEntry write SetDictionaryEntry;
+  published
+    property Name: string read GetName write SetName;
+    property DataType: TDADataType read GetDataType write SetDataType default datUnknown;
+    property Size: integer read GetSize write SetSize default 0;
+    property Description: string read GetDescription write SetDescription;
+    property BlobType: TDABlobType read GetBlobType write SetBlobType default dabtUnknown;
+    property GeneratorName : string read GetGeneratorName write SetGeneratorName;
+    property DecimalPrecision: Integer read GetDecimalPrecision write SetDecimalPrecision stored StoreDecimalPrecision;
+    property DecimalScale: Integer read GetDecimalScale write SetDecimalScale stored StoreDecimalScale;
+  end;
+
+  { TDACustomField }
+  TDAFieldNotifyEvent = procedure(Sender: TDACustomField) of object;
+  TDAFieldGetTextEvent = procedure(Sender: TDACustomField; var Text: string; DisplayText: boolean) of object;
+  TDAFieldSetTextEvent = procedure(Sender: TDACustomField; const Text: string) of object;
+
+  TDACustomFieldCollection = class;
+
+  IDANativeField = interface;
+  IDASQLCommandNativeObject = interface;
+
+  TDACustomField = class(TDABaseField)
+  private
+    fField: TField;
+    fTableField: string;
+    fCustomAttributes: TStringList;
+
+    fRequired: boolean;
+    fInPrimaryKey: boolean;
+    fRegExpression: string;
+    fDefaultValue: string;
+    fDisplayWidth: integer;
+    fDisplayLabel: string;
+    fReadOnly: boolean;
+    fVisible: boolean;
+    fEditMask: string;
+    fLogChanges: boolean;
+    fCalculated: boolean;
+    fOnChange: TDAFieldNotifyEvent;
+    fOnValidate: TDAFieldNotifyEvent;
+    fDisplayFormat: string;
+    fBusinessClassID: string;
+    fAlignment : TAlignment;
+    fEditFormat : string;
+    fLookupCache: boolean;
+    fLookupKeyFields: string;
+    fLookupResultField: string;
+    fKeyFields: string;
+    fLookupSource: TDataSource;
+    fLookup: boolean;
+    fServerAutoRefresh: boolean;
+    fSQLOrigin: string;
+    fServerCalculated: Boolean;
+    fExpression: string;
+    FNativeField: IDANativeField;
+
+    function GetDisplayLabel: string;
+
+    function StoreDisplayLabel: Boolean;
+    
+    function StoreProperties : boolean;
+
+    function GetDefaultValue: string;
+    function GetDisplayWidth: integer;
+    function GetEditMask: string;
+    function GetReadOnly: boolean;
+    function GetVisible: boolean;
+    //procedure SetBusinessRulesID(const Value: string);
+    //function GetBusinessRulesID: string;
+    function GetDisplayFormat: string;
+    function GetAlignment: TAlignment;
+    function GetEditFormat: string;
+    procedure SetAlignment(const Value: TAlignment);
+    procedure SetEditFormat(const Value: string);
+
+    procedure SetKeyFields(const Value: string);
+    procedure SetLookupCache(const Value: boolean);
+    procedure SetLookupKeyFields(const Value: string);
+    procedure SetLookupResultField(const Value: string);
+    procedure SetLookupSource(const Value: TDataSource);
+    procedure SetCalculated(const Value: boolean);
+    procedure SetLookup(const Value: boolean);
+    function GetFieldCollection: TDACustomFieldCollection;
+    {function GetNotNull: boolean;
+    procedure SetNotNull(const Value: boolean);}
+    function GetServerAutoRefresh: boolean;
+    procedure SetServerAutoRefresh(const Value: boolean);
+    function GetLogChanges: boolean;
+    function GetOldValue: Variant;
+    function GetSQLOrigin: string;
+    function GetBusinessClassID: string;
+    procedure SetBusinessClassID(const Value: string);
+    procedure SetServerCalculated(const Value: Boolean);
+    procedure SetExpression(const Value: string);
+    function StoredServerCalculated: Boolean;
+    function StoredExpression: Boolean;
+
+  protected
+    function GetOwner: TPersistent; override;
+
+    procedure SetName(const Value: string); override;
+
+    function GetInPrimaryKey: boolean;
+    function GetRegExpression: string;
+    function GetRequired: boolean;
+    procedure SetInPrimaryKey(const Value: boolean);
+    procedure SetRegExpression(const Value: string);
+    function GetBlobSize: Integer; override;
+    function GetValue: Variant; override;
+    procedure SetValue(const Value: Variant); override;
+    function GetTableField: string;
+    procedure SetTableField(const Value: string);
+    function GetCustomAttributes: TStrings;
+    procedure SetCustomAttributes(const Value: TStrings);
+    procedure SetDisplayFormat(const Value: string);
+    procedure SetBlobType(const Value: TDABlobType); override;
+
+    procedure SetRequired(const aValue: boolean);
+    procedure SetDisplayLabel(const aValue: string);
+    procedure SetVisible(const aValue: boolean);
+    procedure SetDisplayWidth(const aValue: integer);
+    procedure SetEditMask(const aValue: string);
+    procedure SetReadOnly(const aValue: boolean);
+
+    // Event hooks
+    procedure InternalOnChange(Sender: TField);
+    procedure InternalOnValidate(Sender: TField);
+
+    function GetAsBoolean: boolean; override;
+    function GetAsCurrency: currency; override;
+    function GetAsDateTime: TDateTime; override;
+    function GetAsFloat: double; override;
+    function GetAsInteger: integer; override;
+    function GetAsString: string; override;
+    function GetAsVariant: variant; override;
+    function GetAsLargeInt: int64; override;
+    function GetAsWideString: Widestring; override;
+    function GetAsByte: Byte; override;
+    function GetAsCardinal: Cardinal; override;
+    function GetAsDecimal: TBcd; override;
+    function GetAsGuid: TGUID; override;
+    function GetAsLargeUInt: UInt64; override;
+    function GetAsShortInt: ShortInt; override;
+    function GetAsSingle: Single; override;
+    function GetAsSmallInt: SmallInt; override;
+    function GetAsWord: Word; override;
+    function GetAsXml: IXMLNode; override;
+    procedure SetAsByte(const Value: Byte); override;
+    procedure SetAsCardinal(const Value: Cardinal); override;
+    procedure SetAsDecimal(const Value: TBcd); override;
+    procedure SetAsGuid(const Value: TGUID); override;
+    procedure SetAsLargeUInt(const Value: UInt64); override;
+    procedure SetAsShortInt(const Value: ShortInt); override;
+    procedure SetAsSingle(const Value: Single); override;
+    procedure SetAsSmallInt(const Value: SmallInt); override;
+    procedure SetAsWord(const Value: Word); override;
+    procedure SetAsXml(const Value: IXMLNode); override;
+    procedure SetAsBoolean(const aValue: boolean); override;
+    procedure SetAsCurrency(const aValue: currency); override;
+    procedure SetAsDateTime(const aValue: TDateTime); override;
+    procedure SetAsString(const aValue: string); override;
+    procedure SetAsVariant(const aValue: variant); override;
+    procedure SetAsFloat(const aValue: double); override;
+    procedure SetAsInteger(const aValue: integer); override;
+    procedure SetAsLargeInt(const aValue: Int64); override;
+    procedure SetAsWideString(const aValue: Widestring); override;
+    function GetAsAnsiString: Ansistring; override;
+    procedure SetAsAnsiString(const aValue: Ansistring); override;
+    function GetIsNull: boolean; override;
+    function GetDecimalPrecision: Integer; override;
+    procedure SetDecimalPrecision(const Value: Integer);override;
+    function GetDecimalScale: Integer;override;
+    procedure SetDecimalScale(const Value: Integer);override;
+    function IsCompatibleV4: boolean; override;
+  public
+    constructor Create(Collection: TCollection); override;
+    destructor Destroy; override;
+
+    function GetNamePath: string; override;
+
+    procedure Bind(aField: TField); overload;
+    procedure Bind(aField: IDANativeField); overload;
+    procedure Unbind;
+
+    procedure SaveToStream(const aStream: IROStream); overload;
+    procedure LoadFromStream(const aStream: IROStream); overload;
+    procedure SaveToStream(const aStream: TStream); overload;
+    procedure LoadFromStream(const aStream: TStream); overload;
+    procedure SaveToFile(const aFileName: string);
+    procedure LoadFromFile(const aFileName: string);
+
+    property FieldCollection : TDACustomFieldCollection read GetFieldCollection;
+
+    procedure FocusControl;
+
+    property TableField: string read GetTableField write SetTableField;
+    property SQLOrigin: string read GetSQLOrigin write fSQLOrigin;
+
+    procedure Assign(Source: TPersistent); override;
+    procedure AssignField(Source: TDABaseField); override;
+
+    property OldValue : Variant read GetOldValue;
+    property BindedField: TField read FField;
+    Property BindedNativeField: IDANativeField read FNativeField;
+  public
+    property OnChange: TDAFieldNotifyEvent read fOnChange write fOnChange;
+    property OnValidate: TDAFieldNotifyEvent read fOnValidate write fOnValidate;
+
+    property InPrimaryKey: boolean read GetInPrimaryKey write SetInPrimaryKey default False;
+
+    property Calculated: boolean read fCalculated write SetCalculated default False;
+    property Expression: string read fExpression write SetExpression stored StoredExpression;
+    property ServerCalculated: Boolean read fServerCalculated write SetServerCalculated stored StoredServerCalculated default False;
+    property Lookup : boolean read fLookup write SetLookup default False;
+
+    property LookupSource : TDataSource read fLookupSource write SetLookupSource;
+    property LookupKeyFields : string read fLookupKeyFields write SetLookupKeyFields;
+    property LookupResultField : string read fLookupResultField write SetLookupResultField;
+    property KeyFields : string read fKeyFields write SetKeyFields;
+    property LookupCache : boolean read fLookupCache write SetLookupCache default False;
+
+  published
+
+    property LogChanges: boolean read GetLogChanges write fLogChanges stored StoreProperties default true;
+
+    property RegExpression: string read GetRegExpression write SetRegExpression               stored StoreProperties;
+    property DefaultValue: string read GetDefaultValue write fDefaultValue                    stored StoreProperties;
+    property Required: boolean read GetRequired write SetRequired                             stored StoreProperties default FALSE;
+    property DisplayWidth: integer read GetDisplayWidth write SetDisplayWidth                 stored StoreProperties default 0;
+    property DisplayLabel: string read GetDisplayLabel write SetDisplayLabel                  stored StoreDisplayLabel;
+    property EditMask: string read GetEditMask write SetEditMask                              stored StoreProperties;
+    property Visible: boolean read GetVisible write SetVisible                                stored StoreProperties default TRUE;
+    property ReadOnly: boolean read GetReadOnly write SetReadOnly                             stored StoreProperties default FALSE;
+    property CustomAttributes: TStrings read GetCustomAttributes write SetCustomAttributes    stored StoreProperties;
+    property DisplayFormat: string read GetDisplayFormat write SetDisplayFormat               stored StoreProperties;
+    //property BusinessRulesID : string read GetBusinessRulesID write SetBusinessRulesID        stored StoreProperties;
+    property BusinessClassID : string read GetBusinessClassID write SetBusinessClassID        stored StoreProperties;
+    property EditFormat : string read GetEditFormat write SetEditFormat                       stored StoreProperties;
+    property Alignment :  TAlignment read GetAlignment write SetAlignment                     stored StoreProperties default taLeftJustify;
+    property ServerAutoRefresh : boolean read GetServerAutoRefresh write SetServerAutoRefresh default FALSE;
+  end;
+
+  TDAField = class(TDACustomField)
+  protected
+    function GetDisplayName: string; override;
+  published
+    property DictionaryEntry;
+
+    property InPrimaryKey;
+    property Calculated;
+    property Expression;
+    property ServerCalculated;
+
+    property OnChange;
+    property OnValidate;
+
+    property Lookup;
+
+    property LookupSource;
+    property LookupKeyFields;
+    property LookupResultField;
+    property KeyFields;
+    property LookupCache;
+  end;
+
+  TDADataDictionaryField = class(TDACustomField)
+  end;
+
+  TDAFieldClass = class of TDACustomField;
+
+  { TDACustomFieldCollection }
+  TDACustomFieldCollection = class(TSearcheableInterfacedCollection)
+  private
+    fDataDictionary: IDADataDictionary;
+    fFieldEventsDisabled: boolean;
+    fFieldBeforeUpdate,
+    fFieldAfterUpdate: TDAFieldNotifyEvent;
+    fIsCompatibleV4: boolean;
+    function GetFields(Index: integer): TDACustomField;
+    procedure SetFields(Index: integer; const Value: TDACustomField);
+  protected
+    function SetItemName(anItem: TCollectionItem; const aName: string): string; override;
+    function GetItemName(anItem: TCollectionItem): string; override;
+  public
+    constructor Create(aOwner: TPersistent; aFieldClass: TDAFieldClass);
+
+    procedure Bind(aDataset: TDataset);overload;
+    procedure Bind(aNativeObject: IDASQLCommandNativeObject);overload;
+    procedure Unbind;
+
+    property FieldEventsDisabled:boolean read fFieldEventsDisabled write fFieldEventsDisabled default false;
+
+    function Add: TDAField; reintroduce; overload;
+    function Add(const aName: string; aType: TDADataType; aSize: integer = 0): TDACustomField; overload;
+
+    procedure Assign(Source: TPersistent); override;
+    procedure AssignFieldCollection(Source: TDACustomFieldCollection);
+
+    function FieldByName(const aName: string): TDACustomField;
+    function FindField(const aName: string): TDACustomField;
+
+    property DataDictionary: IDADataDictionary read fDataDictionary write fDataDictionary;
+
+    property Fields[Index: integer]: TDACustomField read GetFields write SetFields; default;
+
+    property OnFieldBeforeUpdate: TDAFieldNotifyEvent read fFieldBeforeUpdate write fFieldBeforeUpdate;
+    property OnFieldAfterUpdate: TDAFieldNotifyEvent read fFieldAfterUpdate write fFieldAfterUpdate;
+    property IsCompatibleV4: boolean read fIsCompatibleV4 write fIsCompatibleV4;
+  end;
+
+  TDAFieldCollection = class(TDACustomFieldCollection)
+  private
+    function GetFields(Index: integer): TDAField;
+    procedure SetFields(Index: integer; const Value: TDAField);
+  public
+    constructor Create(aOwner: TPersistent);
+
+    function FieldByName(const aName: string): TDAField; reintroduce;
+    function FindField(const aName: string): TDAField;
+    property Fields[Index: integer]: TDAField read GetFields write SetFields; default;
+  end;
+
+  TDADriverForeignKey = class(TInterfacedCollectionItem)
+  private
+    fValues:array[0..3] of string;
+    fName: string;
+    function GetValue(const Index: Integer): string;
+    procedure SetValue(const Index: Integer; const Value: string);
+  published
+    property Name: string read fName write fName;
+    property FKTable: string index 0 read GetValue write SetValue;
+    property PKTable: string index 1 read GetValue write SetValue;
+    property FKField: string index 2 read GetValue write SetValue;
+    property PKField: string index 3 read GetValue write SetValue;
+  end;
+
+  TDADriverForeignKeyCollection = class(TInterfacedCollection)
+  private
+    function GetForeignKeys(Index: integer): TDADriverForeignKey;
+    procedure SetForeignKeys(Index: integer; const Value: TDADriverForeignKey);
+  public
+    constructor Create(aOwner: TPersistent);
+    function Add: TDADriverForeignKey; reintroduce; overload;
+
+    //procedure Assign(Source: TPersistent); override;
+    //procedure AssignFieldCollection(Source: TDACustomFieldCollection);
+
+    property ForeignKeys[Index: integer]: TDADriverForeignKey read GetForeignKeys write SetForeignKeys; default;
+  end;
+
+  TDADataDictionaryFieldCollection = class(TDACustomFieldCollection)
+  end;
+
+  { TDAParam }
+  TDAParam = class(TDABaseField)
+  private
+    fParamType: TDAParamType;
+
+    function GetParamType: TDAParamType;
+    procedure SetParamType(Value: TDAParamType);
+  protected
+    procedure SetValue(const aValue: Variant); override;
+  public
+    procedure SaveToStream(const aStream: IROStream);
+    procedure LoadFromStream(const aStream: IROStream);
+    procedure SaveToFile(const aFileName: string);
+    procedure LoadFromFile(const aFileName: string);
+    procedure AssignField(Source: TDABaseField); override;
+    procedure AssignParam(Source: TDAParam); virtual;
+
+  published
+    property Value stored true;
+    property AsString stored false;
+    property ParamType: TDAParamType read GetParamType write SetParamType default daptUnknown;
+  end;
+
+  { TDAParamCollection }
+  TDAParamCollection = class(TSearcheableInterfacedCollection) // They are used also by the driver commands/datasets
+  private
+    function GetParams(Index: integer): TDAParam;
+    procedure SetParams(Index: integer; const Value: TDAParam);
+    function GetHasInputParams: boolean;
+
+  protected
+    function SetItemName(anItem: TCollectionItem; const aName: string): string; override;
+    function GetItemName(anItem: TCollectionItem): string; override;
+  public
+    constructor Create(aOwner: TPersistent);
+
+    procedure WriteValues(OutputParams: TParams);
+    procedure ReadValues(InputParams: TParams);
+
+    function Add: TDAParam; reintroduce;
+
+    function ParamByName(const aName: string): TDAParam;
+    function FindParam(const aParamName: string): TDAParam;
+
+    procedure Assign(Source: TPersistent); override;
+    procedure AssignParamCollection(Source: TDAParamCollection);
+
+    property Params[Index: integer]: TDAParam read GetParams write SetParams; default;
+    property HasInputParams:boolean read GetHasInputParams;
+  end;
+
+  { TDASQLCommand }
+  TDASQLCommand = class(TCollectionItem)
+  private
+    fName: string;
+    fDescription: string;
+    fStatements: TDAStatementCollection;
+    fParams: TDAParamCollection;
+    fCustomAttributes: TStrings;
+    fIsPublic: Boolean;
+    FDynamicWhereXML: WideString;
+
+    procedure SetName(const Value: string);
+    procedure SetCustomAttributes(const Value: TStrings);
+    procedure SetDynamicWhereXML(const Value: WideString);
+
+  protected
+    function GetDisplayName: string; override;
+    procedure SetDisplayName(const Value: string); override;
+    function GetParams: TDAParamCollection; virtual;
+    procedure SetParams(const Value: TDAParamCollection); virtual;
+    function GetStatements(): TDAStatementCollection; virtual;
+    procedure SetStatements(const Value: TDAStatementCollection); virtual;
+    function GetSQLCommandCollection: TDASQLCommandCollection; virtual;
+  public
+    constructor Create(Collection: TCollection); override;
+    destructor Destroy; override;
+
+    function ParamByName(const aName: string): TDAParam;
+
+    procedure Assign(aSource: TPersistent); override;
+
+    property SQLCommandCollection: TDASQLCommandCollection read GetSQLCommandCollection;
+
+  published
+    property IsPublic: Boolean read fIsPublic write fIsPublic default True;
+    property Params: TDAParamCollection read GetParams write SetParams;
+    property Statements: TDAStatementCollection read GetStatements write SetStatements;
+    property Name: string read fName write SetName;
+    property Description: string read fDescription write fDescription;
+    property CustomAttributes: TStrings read fCustomAttributes write SetCustomAttributes;
+    property DynamicWhereXML : WideString read FDynamicWhereXML write SetDynamicWhereXML;
+  end;
+
+  TDASQLCommandClass = class of TDASQLCommand;
+
+  { TDASQLCommandCollection }
+  TDASQLCommandCollection = class(TSearcheableCollection)
+  private
+    function GetSQLCommands(Index: integer): TDASQLCommand;
+    procedure SetSQLCommands(Index: integer; const Value: TDASQLCommand);
+
+  protected
+    function GetItemClass: TDASQLCommandClass; virtual;
+    function SetItemName(anItem: TCollectionItem; const aName: string): string; override;
+    function GetItemName(anItem: TCollectionItem): string; override;
+  public
+    constructor Create(aOwner: TComponent);
+
+    function Add: TDASQLCommand; reintroduce;
+
+    function SQLCommandByName(const aName: string): TDASQLCommand;
+
+    property SQLCommands[Index: integer]: TDASQLCommand read GetSQLCommands write SetSQLCommands; default;
+  end;
+
+  TROSEScriptLanguage = (rslPascalScript);
+
+  TDABusinessRuleScript = class(TPersistent)
+  private
+    fScriptLanguage: TROSEScriptLanguage;
+    fScript: string;
+    fDescription: string;
+  published
+    property Script: string read fScript write fScript;
+    property ScriptLanguage: TROSEScriptLanguage read fScriptLanguage write fScriptLanguage default rslPascalScript;
+    property Description: string read fDescription write fDescription;
+  end;
+
+  TDAClientBusinessRuleScript = class(TDABusinessRuleScript)
+  private
+    fRunOnClientAndServer: boolean;
+    fCompileOnServer: boolean;
+  published
+    constructor Create();
+    property CompileOnServer: boolean read fCompileOnServer write fCompileOnServer default true;
+    property RunOnClientAndServer: boolean read fRunOnClientAndServer write fRunOnClientAndServer default true;
+  end;
+
+  { TDADatasetRelationship }
+  TDADatasetRelationship = class(TCollectionItem)
+  private
+    fDetailFields: string;
+    fMasterFields: string;
+    fDetailDatasetName: string;
+    fMasterDatasetName: string;
+    fName: string;
+    fDescription: string;
+    fRelationshipType: TDARelationshipType;
+  protected
+    function GetDisplayName : string; override;
+  public
+    constructor Create(Collection: TCollection); override;
+  published
+    procedure Assign(Source : TPersistent); override;
+
+    property Name : string read fName write fName;
+    property MasterDatasetName : string read fMasterDatasetName write fMasterDatasetName;
+    property MasterFields : string read fMasterFields write fMasterFields;
+    property DetailDatasetName : string read fDetailDatasetName write fDetailDatasetName;
+    property DetailFields : string read fDetailFields write fDetailFields;
+    property Description: string read fDescription write fDescription;
+    property RelationshipType: TDARelationshipType read fRelationshipType write fRelationshipType;
+  end;
+
+  { TDADatasetRelationshipList }
+  TDADatasetRelationshipList = class(TList)
+  private
+    function GetItems(Index: integer): TDADatasetRelationship;
+  protected
+  public
+    function Add(aRelationship : TDADatasetRelationship) : integer; reintroduce;
+
+    property Items[Index : integer] : TDADatasetRelationship read GetItems; default;
+  end;
+
+  { TDADatasetRelationshipCollection }
+  TDADatasetRelationshipCollection = class(TSearcheableCollection)
+  private
+    function GetRelationShips(Index: integer): TDADatasetRelationship;
+  protected
+    function SetItemName(anItem: TCollectionItem; const aName: string): string; override;
+    function GetItemName(anItem: TCollectionItem): string; override;
+  public
+    constructor Create(aOwner : TComponent);
+    procedure GetDetails(const aMasterDatasetName: string; aList: TDADatasetRelationshipList);
+
+    function Add: TDADatasetRelationship; overload;
+    function RelationshipExists(const aMasterDatasetName, aDetailDatasetName, aMasterFields, aDetailFields: string): Boolean;
+    function RelationShipByName(const aName : string) : TDADatasetRelationship;
+
+    property RelationShips[Index : integer] : TDADatasetRelationship read GetRelationShips; default;
+  end;
+
+  { TDADataset }
+  TDADataset = class(TDASQLCommand)
+  private
+    fFields: TDAFieldCollection;
+    fBusinessClassID: string;
+    fBusinessRulesServer: TDABusinessRuleScript;
+    fBusinessRulesClient: TDAClientBusinessRuleScript;
+    fReadOnly: Boolean;
+
+    procedure SetFields(const Value: TDAFieldCollection);
+    procedure SetBusinessRulesClient(const Value: TDAClientBusinessRuleScript);
+    procedure SetBusinessRulesServer(const Value: TDABusinessRuleScript);
+
+  protected
+  public
+    constructor Create(Collection: TCollection); override;
+    destructor Destroy; override;
+
+    procedure Assign(aSource: TPersistent); override;
+
+    function FieldByName(const aName: string): TDAField;
+    function FindField(const aName: string): TDAField;
+  published
+    property Fields: TDAFieldCollection read fFields write SetFields;
+    property BusinessClassID : string read fBusinessClassID write fBusinessClassID;
+    property ReadOnly: Boolean read fReadOnly write fReadOnly default False;
+
+    property BusinessRulesClient: TDAClientBusinessRuleScript read fBusinessRulesClient write SetBusinessRulesClient;
+    property BusinessRulesServer: TDABusinessRuleScript read fBusinessRulesServer write SetBusinessRulesServer;
+  end;
+
+  { TDADatasetCollection }
+  TDADatasetCollection = class(TDASQLCommandCollection)
+  private
+    function GetDatasets(Index: integer): TDADataset;
+    procedure SetDatasets(Index: integer; const Value: TDADataset);
+  protected
+    function GetItemClass: TDASQLCommandClass; override;
+
+  public
+    function Add: TDADataset; reintroduce;
+
+    function DatasetByName(const aName: string): TDADataset;
+    function FindDatasetByName(const aName: string): TDADataset;
+
+    property Datasets[Index: integer]: TDADataset read GetDatasets write SetDatasets; default;
+  end;
+
+  { TDAJoinSourceTable }
+  TDAJoinSourceTable = class(TCollectionItem)
+  private
+    fName: String;
+    fJoinType: TDAJoinType;
+    fJoinConditions: TDAJoinConditionCollection;    
+  protected
+    function GetDisplayName : string; override;
+    procedure SetName(const Value: string);
+  public
+    constructor Create(Collection: TCollection); override;
+	  procedure Assign(aSource: TPersistent); override;
+  published
+    property Name: string read fName write SetName;
+    property JoinType: TDAJoinType read fJoinType write fJoinType;
+    property JoinConditions: TDAJoinConditionCollection read fJoinConditions;
+  end;
+
+  { TDAJoinSourceTableCollection }
+  TDAJoinSourceTableCollection = class(TSearcheableCollection)
+  private
+    function GetJoinSourceTables(Index: integer): TDAJoinSourceTable;
+    procedure SetJoinSourceTables(Index: integer; const Value: TDAJoinSourceTable);
+  protected
+    function SetItemName(anItem: TCollectionItem; const aName: string): string; override;
+    function GetItemName(anItem: TCollectionItem): string; override;
+  public
+    constructor Create(aOwner: TPersistent);
+    function Add: TDAJoinSourceTable; reintroduce;
+    function JoinSourceTableByName(const aName: string): TDAJoinSourceTable;
+    property JoinSourceTables[Index:Integer]: TDAJoinSourceTable read GetJoinSourceTables write SetJoinSourceTables;
+  end;
+
+  { TDAJoinCondition }
+  TDAJoinCondition = class(TCollectionItem)
+  private
+    fFromTableName: String;
+    fFromFieldName: String;
+    fToTableName: String;
+    fToFieldName: String;
+  published
+    property FromTableName: String read fFromTableName write fFromTableName;
+    property FromFieldName: String read fFromFieldName write fFromFieldName;
+    property ToTableName: String read fToTableName write fToTableName;
+    property ToFieldName: String read fToFieldName write fToFieldName;
+  end;
+
+  { TDAJoinConditionCollection }
+  TDAJoinConditionCollection = class(TOwnedCollection)
+  private
+  public
+    constructor Create(aOwner: TPersistent);
+    function Add: TDAJoinCondition; reintroduce;
+  end;
+
+
+  { TDAJoinDataTable }
+  TDAJoinDataTable = class(TDADataset)
+  private
+    fMasterTable: String;
+    fJoinSourceTables: TDAJoinSourceTableCollection;
+    procedure SetJoinSourceTables(const Value: TDAJoinSourceTableCollection);
+  protected
+    function GetParams: TDAParamCollection; override;
+    procedure SetParams(const Value: TDAParamCollection); override;
+    function GetStatements(): TDAStatementCollection; override;
+    procedure SetStatements(const Value: TDAStatementCollection); override;
+    function GetSQLCommandCollection: TDASQLCommandCollection; override;
+  public
+    constructor Create(Collection: TCollection); override;
+    destructor Destroy; override;
+    procedure Assign(aSource: TPersistent); override;
+    property Params;
+    property Statements;
+  published
+    property JoinSourceTables: TDAJoinSourceTableCollection read fJoinSourceTables write SetJoinSourceTables;
+    property MasterTable: String read fMasterTable write fMasterTable;
+  end;
+
+  TDAJoinDataTableClass = class of TDAJoinDataTable;
+
+  { TDAJoinedTableCollection }
+  TDAJoinDataTableCollection = class(TSearcheableCollection)
+  private
+    function GetJoinDataTables(Index: integer): TDAJoinDataTable;
+    procedure SetJoinDataTables(Index: integer; const Value: TDAJoinDataTable);
+  protected
+    //function GetItemClass: TDAJoinedTableClass; override;
+    function SetItemName(anItem: TCollectionItem; const aName: string): string; override;
+    function GetItemName(anItem: TCollectionItem): string; override;
+  public
+    constructor Create(aOwner : TComponent);
+    function Add: TDAJoinDataTable; reintroduce;
+    function JoinTableByName(const aName: string): TDAJoinDataTable;
+    function FindJoinTableByName(const aName: string): TDAJoinDataTable;
+    property JoinTables[Index: integer]: TDAJoinDataTable read GetJoinDataTables write SetJoinDataTables; default;
+  end;
+
+  {TDAUnionSourceTable}
+  TDAUnionSourceTable = class(TCollectionItem)
+  private
+    fName: string;
+    fColumnMappings: TDAColumnMappingCollection;
+    fReadOnly: Boolean;
+    procedure SetColumnMappings(const Value: TDAColumnMappingCollection);
+  public
+    constructor Create(Collection: TCollection); override;
+    destructor Destroy; override;
+    procedure Assign(Source: TPersistent); override;
+  published
+    property Name: string read fName write fName;
+    property ColumnMappings: TDAColumnMappingCollection read fColumnMappings write SetColumnMappings;
+    property IsReadOnly: Boolean read fReadOnly write fReadOnly;
+  end;
+
+  {TDAUnionSourceTableCollection}
+  TDAUnionSourceTableCollection = class(TSearcheableCollection)
+  private
+    function GetUnionSourceTables(Index: integer): TDAUnionSourceTable;
+  protected
+    function SetItemName(anItem: TCollectionItem; const aName: string): string; override;
+    function GetItemName(anItem: TCollectionItem): string; override;
+  public
+    constructor Create(aOwner : TPersistent);
+
+    function Add: TDAUnionSourceTable; reintroduce;
+    function UnionSourceTableByName(const aName : string) : TDAUnionSourceTable;
+
+    property UnionSourceTables[Index : integer] : TDAUnionSourceTable read GetUnionSourceTables; default;
+  end;
+
+  {TDAUnionDataTable}
+  TDAUnionDataTable = class(TDADataset)
+  private
+    fDefaultSourceTable: string;
+    fSourceTables: TDAUnionSourceTableCollection;
+    procedure SetSourceTables(Value: TDAUnionSourceTableCollection);
+  protected
+  public
+    constructor Create(Collection: TCollection); override;
+    destructor Destroy; override;
+    property Params;
+    property Statements;
+  published
+    property SourceTables: TDAUnionSourceTableCollection read fSourceTables write SetSourceTables;
+    property DefaultSourceTable: String read fDefaultSourceTable write fDefaultSourceTable;
+  end;
+
+  { TDAUnionDataTableCollection }
+  TDAUnionDataTableCollection = class(TSearcheableCollection)
+  private
+    function GetUnionDataTables(Index: integer): TDAUnionDataTable;
+    procedure SetUnionDataTables(Index: integer; const Value: TDAUnionDataTable);
+  protected
+    //function GetItemClass: TDAJoinedTableClass; override;
+    function SetItemName(anItem: TCollectionItem; const aName: string): string; override;
+    function GetItemName(anItem: TCollectionItem): string; override;
+  public
+    constructor Create(aOwner : TComponent);
+    function Add: TDAUnionDataTable; reintroduce;
+    function UnionDataTableByName(const aName: string): TDAUnionDataTable;
+    function FindUnionDataTableByName(const aName: string): TDAUnionDataTable;
+    property UnionDataTables[Index: integer]: TDAUnionDataTable read GetUnionDataTables write SetUnionDataTables; default;
+  end;
+
+  { TDAConnection }
+  TDAConnection = class(TCollectionItem)
+  private
+    fDescription: string;
+    fConnectionString: string;
+    fConnectionType: string;
+    fName: string;
+    fDefault: boolean;
+    fTag: integer;
+    procedure SetDefault(const Value: boolean);
+    procedure SetName(const Value: string);
+
+  protected
+    function GetDisplayName: string; override;
+    procedure SetDisplayName(const Value: string); override;
+
+    function GetConnectionString: string; virtual;
+    procedure SetConnectionString(const aValue: string); virtual;
+
+  public
+    procedure Assign(aSource: TPersistent); override;
+
+  published
+    property Name: string read fName write SetName;
+    property ConnectionString: string read GetConnectionString write SetConnectionString;
+    property Description: string read fDescription write fDescription;
+    property ConnectionType: string read fConnectionType write fConnectionType;
+    property Default: boolean read fDefault write SetDefault default False;
+    property Tag: integer read fTag write fTag default 0;
+  end;
+
+  { TDAConnectionCollection }
+  TDAConnectionCollection = class(TSearcheableCollection)
+  private
+    function GetConnections(Index: integer): TDAConnection;
+    procedure SetConnections(Index: integer; const Value: TDAConnection);
+    procedure ClearDefaults(iExceptFor: TDAConnection);
+  protected
+    function ItemName: string; override;
+    function SetItemName(anItem: TCollectionItem; const aName: string): string; override;
+    function GetItemName(anItem: TCollectionItem): string; override;
+  public
+    constructor Create(aOwner: TPersistent);
+
+    function Add: TDAConnection; reintroduce;
+    function ConnectionByName(const aName: string): TDAConnection;
+    function FindConnection(const aName: string; const aType: string): TDAConnection;
+
+    function GetDefaultConnection : TDAConnection;
+
+    property Connections[Index: integer]: TDAConnection read GetConnections write SetConnections; default;
+    property OnItemRenamed;
+    property OnItemRemoved;
+  end;
+
+  EDADriverAlreadyLoaded = class(EDADriverLoadException);
+  EDASchemaModelerOnly = class(EDADriverLoadException);
+
+  IDADataDictionary = interface
+  ['{34078D79-6310-494C-BA92-0FC187B275BE}']
+    procedure SetFields(const Value: TDADataDictionaryFieldCollection);
+    function GetFields: TDADataDictionaryFieldCollection;
+    property Fields: TDADataDictionaryFieldCollection read GetFields write SetFields;
+  end;
+
+  IDAHasDataDictionary = interface
+  ['{A25ADACE-BBD7-4A04-84A9-B9B699389E3D}']
+    function GetDataDictionary: IDADataDictionary;
+    property DataDictionary: IDADataDictionary read GetDataDictionary;
+  end;
+  { IDADriverManager
+      Provides access to all the functionality needed to load, unload and verify drivers.
+      Access to this interface is obtained using a TDADriverManager component.
+      There can only be one driver manager loaded at any give time in one application. }
+  IDADriverManager = interface
+    ['{5B6B8C91-F91A-4A25-8B6F-CF7959275682}']
+    // Properties readers/writers
+    function GetDrivers(Index: integer): IDADriver;
+    function GetDriverCount: integer;
+
+    // Methods
+    procedure LoadDriver(const aFileName: string);
+    procedure UnloadDriver(anIndex: integer);
+
+    procedure LoadDrivers;overload;
+    procedure LoadDrivers(const aDriverList: IROStrings; aIgnoreDuplicates: boolean = false; aIgnoreErrors: boolean = false);overload;
+    procedure UnloadAllDrivers;
+
+    function ListDrivers(const aDirectory: string; out FileNames: IROStrings): integer;
+
+    function FindDriver(const aDriverID: string; out Driver: IDADriver): boolean;
+    function DriverByDriverID(const aDriverID: string): IDADriver;
+
+    // Properties
+    property Drivers[Index: integer]: IDADriver read GetDrivers; default;
+    property DriverCount: integer read GetDriverCount;
+  end;
+
+  TDAAvailableDriverOption = (doAuxDriver, doServerName, doDatabaseName, doLogin, doCustom);
+  TDAAvailableDriverOptions = set of TDAAvailableDriverOption;
+
+  TDADriverHelpType = (dhConnectionWizard);
+
+  { IDADriver
+      An object implementing this interface is returned by the Data Abstract drivers. You get a reference to
+      it by calling the DLL's exported function GetDriverObject. If the DLL doesn't support this method, it is
+      not a Data Abstract driver. Once you retrieve a reference to this object you can query it for additional
+      interfaces such as IDAConnectionPool and obtain access to additional functionality. Not all drivers implement
+      the same number of interfaces. }
+
+  TDATraceSource = (tsUnknown, tsConnection, tsDataset, tsCommand);
+  TDATraceOption = (toPrepare,
+    toExecute,
+    toFetch,
+    toError,
+    toStmt,
+    toConnect,
+    toTransact,
+    toBlob,
+    toService,
+    toMisc,
+    toParams);
+  TDATraceOptions = set of TDATraceOption;
+
+  TDALogTraceEvent = procedure(Sender: TObject; const Text: string; Tag: integer) of object;
+
+  IDADriver = interface
+    ['{1829ABED-299B-4698-9803-DBABCF5443FA}']
+    // Properties readers/writers
+    function GetDriverID: string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetDescription: string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetMajVersion: byte; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetMinVersion: byte; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    // Methods
+    procedure Initialize; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure Finalize; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function NewConnection(const aName: string = '';const aConnectionType: string = ''): IDAConnection; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF} overload; {deprecated;}
+    function NewConnection(const aConnectionManager: IDAConnectionManager; aConnectionDefinition: TDAConnection): IDAConnection; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF} overload;
+
+    procedure SetTraceOptions(TraceActive: boolean; TraceOptions: TDATraceOptions; Callback: TDALogTraceEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function GetAvailableDriverOptions: TDAAvailableDriverOptions; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetAvailableDriverOptionsEx(AuxDriver: string): TDAAvailableDriverOptions; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetDefaultCustomParameters: string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    // Properties
+    property DriverID: string read GetDriverID;
+    property Description: string read GetDescription;
+    property MajVersion: byte read GetMajVersion;
+    property MinVersion: byte read GetMinVersion;
+
+    procedure GetAuxDrivers(out List: IROStrings); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetAuxParams(const AuxDriver: string; out List: IROStrings); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetDefaultConnectionType(const AuxDriver: string): string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  end;
+
+  IDADriver30 = interface(IDADriver)
+    ['{F14A6526-CE1F-4A6B-BC4D-3892BA712FE2}']
+    function GetDriverHelp(aType: TDADriverHelpType): string;
+  end;
+
+  IDADriver40 = interface(IDADriver30)
+    ['{82903957-974A-4E1F-B91C-C07F608A96A9}']
+    function GetProviderDefaultCustomParameters(Provider: string): string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  end;
+
+  IDACanQueryDatabaseNames = interface
+  ['{67870220-37E2-4510-BD6A-627EADED75ED}']
+    function GetDatabaseNames: IROStrings;
+  end;
+
+  IDAFileBasedDatabase = interface
+  ['{C37EA8EE-9AC7-44F3-863C-EFB1581D4D57}']
+    function GetFileExtensions: IROStrings;
+  end;
+
+  IDADirectoryBasedDatabase = interface
+  ['{40C102F0-B86E-4CD6-AB3D-4B0903723A5D}']
+  end;
+
+  { IDAConnectionObjectAccess
+      Provides access to the internal connection component and facilitates access to its
+      properties in form of a collection of properties. This interface is useful when you want
+      to complete control of the internal object. In order to use this interface you need
+      to use ShareMem or FastShareMem. }
+  IDAConnectionObjectAccess = interface
+    ['{FF8F2319-4EAE-4A2B-8713-A6E6B3F5E48A}']
+    // Properties readers/writers
+    function GetConnectionObject: TObject; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetConnectionProperties(const aPropertyName: string): Variant; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetConnectionProperties(const aPropertyName: string; const aValue: Variant); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    // Properties
+    property ConnectionObject: TObject read GetConnectionObject;
+    property ConnectionProperties[const aPropertyName: string]: Variant read GetConnectionProperties write SetConnectionProperties;
+  end;
+
+  TDAQuoteCharArray = array[0..1] of char;
+
+  TDABeforeOpenDatasetEvent = procedure(const Sender: IDADataset) of object;
+  TDAAfterOpenDatasetEvent = procedure(const Sender: IDADataset; ActualSQL: string; ElapsedMilliseconds: Cardinal) of object;
+  TDAOpenDatasetErrorEvent = procedure(const Sender: IDADataset; ActualSQL: string; Error: Exception) of object;
+
+  TDABeforeExecuteCommandEvent = procedure(const Sender: IDASQLCommand) of object;
+  TDAAfterExecuteCommandEvent = procedure(const Sender: IDASQLCommand; ActualSQL: string; ElapsedMilliseconds: Cardinal) of object;
+  TDAExecuteCommandErrorEvent = procedure(const Sender: IDASQLCommand; ActualSQL: string; Error: Exception) of object;
+
+  { TDAWhereBuilder }
+
+  TDAWhereBuilder = class;
+  TDAWhereExpression = class(TObject)
+  private
+  public
+    class function ParseExpression(xr: IXmlNode): TDAWhereExpression;
+
+    procedure ReadFromXml(xr: IXmlNode); virtual; abstract;
+    procedure WriteToXml(sw: IXmlNode); virtual; abstract;
+    procedure Validate; virtual;
+  end;
+
+  TDABinaryOperator = (dboAnd, dboOr, dboXor, dboLess, dboLessOrEqual, dboGreater,
+    dboGreaterOrEqual, dboNotEqual, dboEqual, dboLike, dboIn, dboAddition, dboSubtraction,
+    dboMultiply, dboDivide, dboNotIn);
+  TDAUnaryOperator = (duoNot, duoMinus);
+
+  TDAWhereBuilder = class
+  private
+    fExpression: TDAWhereExpression;
+    FColumnMapping: TDAColumnMappingCollection;// for TDAESQLCommand
+    fParams: TDAParamCollection;
+    function getXml: WideString;
+    procedure setXml(const aValue: WideString);
+    procedure SetColumnMapping(const Value: TDAColumnMappingCollection);
+    procedure SetParams(const Value: TDAParamCollection);
+  protected
+    function ReadFromXml(xr: IXmlNode): TDAWhereExpression; virtual;
+    procedure WriteToXml(sw: IXmlNode; const aExpression: TDAWhereExpression); virtual;
+  public
+    constructor Create;
+
+    destructor Destroy; override;
+
+    property Expression: TDAWhereExpression read fExpression write FExpression;
+
+    property Xml: WideString read GetXml write SetXml;
+    function NewBinaryExpression(aLeft, aRight: TDAWhereExpression; anOp: TDABinaryOperator): TDAWhereExpression;overload;
+    function NewBinaryExpression(const aTableName,aFieldName: string; anOp: TDABinaryOperator; const aValue: variant; aType: TDADataType): TDAWhereExpression; overload;
+    function NewUnaryExpression(anExpression: TDAWhereExpression; anOp: TDAUnaryOperator): TDAWhereExpression;
+    function NewConstant(const aValue: Variant; aType: TDADataType): TDAWhereExpression;
+    function NewList(const aValues: array of TDAWhereExpression): TDAWhereExpression;
+    function NewParameter(const aParameterName: string): TDAWhereExpression;
+    function NewField(const aTableName,aFieldName: string): TDAWhereExpression;
+    function NewNull: TDAWhereExpression;
+    function NewIsNotNull: TDAWhereExpression; overload;
+    function NewIsNotNull(const aTableName,aFieldName: string): TDAWhereExpression; overload;
+    function NewMacro(const aName: string): TDAWhereExpression; overload;
+    function NewMacro(const aName: string; const aValues: array of TDAWhereExpression): TDAWhereExpression; overload;
+    procedure Clear;
+    function IsEmpty:Boolean;
+    property ColumnMapping: TDAColumnMappingCollection read FColumnMapping write SetColumnMapping;
+    property Params: TDAParamCollection read fParams write SetParams;
+    function ExpressionToXmlNode(const aExpression: TDAWhereExpression): IXMLNode;
+    function XMLToExpression(const aXML: widestring):TDAWhereExpression;
+  end;
+
+  TDASimpleQueryBuilder = class;
+  TDASQLWhereBuilder = class(TDAWhereBuilder)
+  private
+    FId: Integer;
+    FConnection: IDAConnection;
+    FQueryBuilder: TDASimpleQueryBuilder;
+    function GenerateParamName: String;
+    function GenerateParameter(const aParameterName: string):string;
+    function GetMappingTableField(const aDataSetField: string): string;
+  protected
+    function GenerateFieldName(aTablename, aFieldName: string):string; virtual;
+    function ProcessExpression(AExpression: TDAWhereExpression): string;
+    function ProcessBinaryExpression(AExpression: TDAWhereExpression): string; virtual; abstract;
+    function ProcessUnaryExpression(AExpression: TDAWhereExpression): string; virtual; abstract;
+    function ProcessConstantExpression(AExpression: TDAWhereExpression): string; virtual;
+    function ProcessListExpression(AExpression: TDAWhereExpression): string; virtual;
+    function ProcessParameterExpression(AExpression: TDAWhereExpression): string; virtual;
+    function ProcessFieldExpression(AExpression: TDAWhereExpression): string; virtual;
+    function ProcessNullExpression(AExpression: TDAWhereExpression): string; virtual; abstract;
+    function ProcessMacroExpression(AExpression: TDAWhereExpression): string; virtual;
+  public
+    constructor Create(AConnection: IDAConnection); overload;
+    constructor Create(AQueryBuilder: TDASimpleQueryBuilder); overload;
+    function CreateWhereClause: string;
+    property Connection: IDAConnection read FConnection;
+    property QueryBuilder: TDASimpleQueryBuilder read FQueryBuilder;
+  end;
+
+  { TDASimpleQueryBuilder }
+
+  TDATableFieldCollectionItem = class(TCollectionItem)
+  private
+    FFieldName: string;
+    FTableName: string;
+  public
+    procedure Assign(Source: TPersistent); override;
+    property TableName: string read FTableName write FTableName;
+    property FieldName: string read FFieldName write FFieldName;
+  end;
+
+  TDASelectItem = TDATableFieldCollectionItem;
+  TDASelectCollection = TCollection;
+
+  TDAGroupByItem = TDATableFieldCollectionItem;
+  TDAGroupByCollection = TCollection;
+
+  TDAOrderByItem = TDATableFieldCollectionItem;
+  TDAOrderByCollection = TCollection;
+
+  TDAQueryBuilderOption = (qboSelectDistinct, qboGenerateSimpleSelect, qboGenerateDynamicWhereStatement);
+  TDAQueryBuilderOptions = set of TDAQueryBuilderOption;
+
+  TDASimpleQueryBuilder = class(TCollectionItem)
+  private
+    // IDAConnection
+    FMainTable: TDAJoinDataTable;
+    FSelectCollection: TDASelectCollection;
+    FGroupByCollection: TDAGroupByCollection;
+    FWhere: TDASQLWhereBuilder;
+    FOptions: TDAQueryBuilderOptions;
+    FConnection: IDAConnection;
+    FColumnMapping: TDAColumnMappingCollection;
+    procedure SetColumnMapping(const Value: TDAColumnMappingCollection);
+    function GetWhereBuilder: TDASQLWhereBuilder;
+  protected
+    function GetMappingTableField(const aDataSetField: string): string;
+    procedure Validate; virtual;
+    function CreateWhereBuilder: TDASQLWhereBuilder; virtual; abstract;
+    function CreateSelectClause: string; virtual;
+    function CreateTableClause: string; virtual;abstract;
+    function CreateGroupByClause: string; virtual;
+    function GenerateFieldName(aTablename, aFieldName: string; aProcessMapping: Boolean = True):string; virtual;
+    function QuoteFieldNameIfNeeded(const aTableName, aFieldName: string): string; virtual;
+    function QuoteIdentifierIfNeeded(const iIdentifier: string): string; virtual;
+    function QuoteIdentifier(const iIdentifier: string): string; virtual;
+    function IdentifierNeedsQuoting(const iIdentifier: string):boolean;virtual;
+  public
+    constructor Create(Collection: TCollection); override;
+    destructor Destroy; override;
+    function GenerateSelectSQL: string; virtual;
+    function CreateWhereClause: string; virtual;
+    procedure Assign(Source: TPersistent); override;
+    procedure Clear; virtual;
+    procedure AddSelect(ATable, AField: string);
+    procedure AddGroupBy(ATable, AField: string);
+    procedure AddJoin(AJoinTable, AJoinFieldName, AJoinToTableName, AJoinToFieldName: string; AJoinType: TDAJoinType = jtInner); overload;
+    procedure AddJoin(AJoinTable: string; AJoinFieldNames: array of string; AJoinToTableName: string; AJoinToFieldNames: array of string; AJoinType: TDAJoinType = jtInner); overload;
+    procedure AddCrossJoin(ATable: string);
+    property Select: TDASelectCollection read FSelectCollection;
+    property MainTable: TDAJoinDataTable read FMainTable;
+    property Where: TDASQLWhereBuilder read GetWhereBuilder;
+    property GroupBy: TDAGroupByCollection read FGroupByCollection;
+    property Options: TDAQueryBuilderOptions read FOptions write FOptions;
+    property Connection: IDAConnection read FConnection write FConnection;
+    property ColumnMapping: TDAColumnMappingCollection read FColumnMapping write SetColumnMapping;
+  end;
+
+  TDAUnionCollections = TCollection;
+
+  TDAQueryBuilder = class(TDASimpleQueryBuilder)
+  private
+    FOrderByCollection: TDAOrderByCollection;
+    FUnionCollections: TDAUnionCollections;
+  protected
+    function CreateOrderByClause: string; virtual;
+    function CreateUnionClause(const AUnion: TDASimpleQueryBuilder): string; virtual;
+  public
+    constructor Create(Collection: TCollection); overload;override;
+    constructor Create; reintroduce;overload;virtual;
+    destructor Destroy; override;
+    procedure Assign(Source: TPersistent); override;
+    procedure Clear; override;
+    procedure AddOrderBy(ATable, AField: string);
+    function AddUnion:TDASimpleQueryBuilder;
+    function GenerateSelectSQL: string; override;
+    property OrderBy: TDAOrderByCollection read FOrderByCollection;
+    property Unions: TDAUnionCollections read FUnionCollections;
+  end;
+
+
+  IDABaseConnection = interface
+    ['{B96CFC5B-CE8A-4B6F-994E-2A82509B0F18}']
+  end;
+
+  { IDAConnection
+      Provides access to a connection object in a database and vendor independent manner.
+      Objects implementing IDAConnection are returned by the driver.
+      Each connection object might also implement additional interfaces that are specific to the
+      underlying database or the data-access framework. These additional interfaces are defined in
+      separate units. To find out what interfaces a connection implements you can check the source code
+      of the relative uDAxxxDriver.pas unit. }
+  IDAConnection = interface(IDABaseConnection)
+    ['{6D9C806F-65A5-43B3-8F07-4ED782A13A0A}']
+    // Properties readers/writers
+    function GetConnectionPool: IDAConnectionPool; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetConnectionPool(const Value: IDAConnectionPool); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetConnectionString: string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetConnectionString(Value: string); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetConnected: boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetConnected(Value: boolean); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetName: string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetOnAfterExecuteCommand: TDAAfterExecuteCommandEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetOnAfterOpenDataset: TDAAfterOpenDatasetEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetOnBeforeExecuteCommand: TDABeforeExecuteCommandEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetOnBeforeOpenDataset: TDABeforeOpenDatasetEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetOnExecuteCommandError: TDAExecuteCommandErrorEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetOnOpenDatasetError: TDAOpenDatasetErrorEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnAfterExecuteCommand(const Value: TDAAfterExecuteCommandEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnAfterOpenDataset(const Value: TDAAfterOpenDatasetEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnBeforeExecuteCommand(const Value: TDABeforeExecuteCommandEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnBeforeOpenDataset(const Value: TDABeforeOpenDatasetEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnExecuteCommandError(const Value: TDAExecuteCommandErrorEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnOpenDatasetError(const Value: TDAOpenDatasetErrorEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetConnectionType: string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    // Transaction support
+    function BeginTransaction: integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure CommitTransaction; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure RollbackTransaction; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetInTransaction: boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    // UserID/Password
+    function GetUserID: string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetUserID(const Value: string); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetPassword: string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetPassword(const Value: string); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    // Connection
+    procedure Open(const aUserID: string = ''; const aPassword: string = ''); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure Close; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    // Metadata
+    procedure GetTableNames(out List: IROStrings); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetViewNames(out List: IROStrings); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetStoredProcedureNames(out List: IROStrings); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetTableFields(const aTableName: string; out Fields: TDAFieldCollection); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetQueryFields(const aSQL: string; aParamsIfNeeded: TDAParamCollection; out Fields: TDAFieldCollection); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetViewFields(const aViewName: string; out Fields: TDAFieldCollection); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetStoredProcedureParams(const aStoredProcedureName: string; out Params: TDAParamCollection); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetForeignKeys(out ForeignKeys: TDADriverForeignKeyCollection); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function GetQuoteChars: TDAQuoteCharArray; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function IdentifierNeedsQuoting(const iIdentifier: string): boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function QuoteIdentifierIfNeeded(const iIdentifier: string): string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function QuoteIdentifier(const iIdentifier: string): string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function QuoteFieldNameIfNeeded(const aTableName, aFieldName: string): string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function QuoteFieldName(const aTableName, aFieldName: string): string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetSPSelectSyntax(HasArguments: Boolean): string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    // Commands and datasets
+    function NewCommand(const Text: string; CommandType: TDASQLStatementType; const aCommandName: string = ''): IDASQLCommand; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function NewDataset(const SQL: string; const aDatasetName: string = ''): IDADataset; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetLastAutoInc(const GeneratorName: string = ''): integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function isAlive: Boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // Properties
+    property ConnectionString: string read GetConnectionString write SetConnectionString;
+    property Connected: boolean read GetConnected write SetConnected;
+    property Name: string read GetName;
+    property InTransaction: boolean read GetInTransaction;
+    property UserID: string read GetUserID write SetUserID;
+    property Password: string read GetPassword write SetPassword;
+    property ConnectionPool: IDAConnectionPool read GetConnectionPool write SetConnectionPool;
+    property ConnectionType: string read GetConnectionType;
+
+    property OnBeforeOpenDataset: TDABeforeOpenDatasetEvent read GetOnBeforeOpenDataset write SetOnBeforeOpenDataset;
+    property OnAfterOpenDataset: TDAAfterOpenDatasetEvent read GetOnAfterOpenDataset write SetOnAfterOpenDataset;
+    property OnOpenDatasetError: TDAOpenDatasetErrorEvent read GetOnOpenDatasetError write SetOnOpenDatasetError;
+    property OnBeforeExecuteCommand: TDABeforeExecuteCommandEvent read GetOnBeforeExecuteCommand write SetOnBeforeExecuteCommand;
+    property OnAfterExecuteCommand: TDAAfterExecuteCommandEvent read GetOnAfterExecuteCommand write SetOnAfterExecuteCommand;
+    property OnExecuteCommandError: TDAExecuteCommandErrorEvent read GetOnExecuteCommandError write SetOnExecuteCommandError;
+    // QueryBuilder
+    function GetQueryBuilder: TDAQueryBuilder; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetWhereBuilder: TDASQLWhereBuilder; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetUseMacroProcessor: Boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetUseMacroProcessor(Value:Boolean); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    property UseMacroProcessor: Boolean read GetUseMacroProcessor write SetUseMacroProcessor;
+  end;
+
+  IDAHETConnection = interface(IDABaseConnection)
+  ['{9471FB7A-F5C6-4420-A2E6-F2DD7C6535A7}']
+    function GetConnectionForObject(const aObjectName: string; aOpenConnection: boolean = false): IDAConnection;
+  end;
+
+  { IDATestableObject }
+  IDATestableObject = interface
+  ['{DC2C3CD1-9031-4B0A-97B9-563580611C25}']
+    procedure Test; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  end;
+
+  { IDAUseGenerators }
+  IDAUseGenerators = interface
+  ['{7963D550-361E-486A-AAD6-EFD12896F719}']
+    function GetNextAutoinc(const GeneratorName: string): integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  end;
+
+  IDACanQueryGeneratorsNames = interface
+  ['{E7C4A441-16B2-42BA-92DD-BD0F3EC39250}']
+    function GetGeneratorNames: IROStrings;
+  end;
+
+  { IDAConnectionManager }
+  IDAConnectionManager = interface
+    ['{C2C2B1DB-7D0A-4772-8DDF-5E5150A84827}']
+    function GetDefaultConnectionName: string;
+    function NewConnection(const aConnectionName: string;
+      OpenConnection: boolean = TRUE;
+      const UserID: string = '';
+      const Password: string = ''): IDAConnection;
+
+    procedure Clear;
+  end;
+  IDAConnectionPool = interface
+    ['{6E132C7B-A6AD-4ECB-B901-80000AC4B912}']
+    procedure ReleaseConnection(const Conn: IDAConnection);
+  end;
+
+  { IDASchema }
+  IDASchema = interface
+    ['{19C63BF1-9CAA-43B7-B49C-E3FE82F5A02E}']
+    function GetDatasetText(const aConnection: IDAConnection; const aName: string): string;
+    function GetCommandText(const aConnection: IDAConnection; const aName: string): string;
+
+    function NewDataset(const aConnection: IDAConnection; const aName: string;
+      aStatementName: string='';
+      OpenIt: boolean = false): IDADataset; overload;
+    function NewDataset(const aConnection: IDAConnection; const aName: string;
+      const ParamNames: array of string;
+      const ParamValues: array of Variant;
+      OpenIt: boolean = TRUE;
+      aStatementName: string=''): IDADataset; overload;
+    function NewDataset(const aConnection: IDAConnection; const aName: string;
+      aDynSelectFields: array of string;
+      aWhereClause: WideString;
+      aStatementName: string='';
+      OpenIt: boolean = false;
+      AlwaysGenerateDynamicWhereStatement: Boolean=False): IDADataset; overload;
+    function NewDataset(const aConnection: IDAConnection; const aName: string;
+      const ParamNames: array of string;
+      const ParamValues: array of Variant;
+      aDynSelectFields: array of string;
+      aWhereClause: WideString;
+      OpenIt: boolean = TRUE;
+      aStatementName: string=''): IDADataset; overload;
+
+    function NewCommand(const aConnection: IDAConnection; const aName: string;
+      aStatementName: string=''): IDASQLCommand; overload;
+    function NewCommand(const aConnection: IDAConnection; const aName: string;
+      const ParamNames: array of string;
+      const ParamValues: array of Variant;
+      ExecuteIt: boolean = TRUE;
+      aStatementName: string=''): IDASQLCommand; overload;
+
+    procedure Clear;
+    function MergeDataDictionaries: Boolean;
+  end;
+
+  { TDAWhere
+      Represents an abstraction of the WHERE condition of a SQL statement in an IDADataset. }
+  TDAWhere = class
+  private
+    fFields: TDAFieldCollection;
+    fClause: string;
+    fOnChange: TNotifyEvent;
+    fChanged,
+    fClientFields: boolean;
+    fLastWasCondition: Boolean;
+    fDefaultOperator: TDADefaultOperator;
+
+    function GetEmpty: boolean;
+    function GetNotEmpty: boolean;
+    function GetProperName(aField: TDACustomField) : string;
+
+  protected
+  public
+    constructor Create(const aFields: TDAFieldCollection; aClientFields : boolean);
+
+    procedure Clear;
+
+    procedure AddOperator(aOperator: TDASQLOperator);
+    function AddCondition(const FieldName: string;
+      Condition: TDASQLCondition;
+      const Value: Variant;
+      SkipIfEmptyValue: boolean = TRUE): boolean;overload;
+    function AddCondition(const FieldName: string;
+      Condition: TDASQLCondition): boolean;overload;
+    procedure AddValueGroup(const FieldName: string;
+      const Values: array of Variant);
+    procedure AddSpaces(Count: integer = 1);
+    procedure AddText(const someText: string; MapClientFields : boolean = TRUE);
+
+    procedure OpenBraket; deprecated;
+    procedure CloseBraket; deprecated;
+    procedure OpenBracket;
+    procedure CloseBracket;
+
+    function AddConditions(const FieldNames : array of string;
+                           const Conditions : array of TDASQLCondition;
+                           const Values: array of Variant;
+                           const Operator: TDASQLOperator) : integer;
+
+    property OnChange: TNotifyEvent read fOnChange write fOnChange;
+
+    property Clause: string read fClause;
+    property Fields: TDAFieldCollection read fFields write fFields;
+    property Empty : boolean read GetEmpty;
+    property NotEmpty : boolean read GetNotEmpty;
+
+    property ClientFields : boolean read fClientFields;
+    property DefaultOperator: TDADefaultOperator read fDefaultOperator write fDefaultOperator;
+    property LastWasCondition: Boolean read fLastWasCondition write fLastWasCondition;
+    property Changed: Boolean read fChanged write fChanged;
+  end;
+
+  IDANativeField = interface
+  ['{2F8C9C7B-EBEA-4BD1-A486-3106DC26F67A}']
+    function GetNativeObject: TObject;
+    function isTFieldCompatible: Boolean;
+    function GetFieldName: string;
+    function GetDataType: TFieldType;
+    function GetSize: integer;
+    function GetDecimalPrecision: Integer;
+    procedure SetDecimalPrecision(Value: integer);
+    function GetDecimalScale: Integer;
+    procedure SetDecimalScale(Value: integer);
+    procedure SetDataType(Value: TFieldType);
+    function GetFieldIndex: integer;
+    function GetValue: Variant;
+    function IsNull: Boolean;
+    //
+    property DecimalPrecision: Integer read GetDecimalPrecision write SetDecimalPrecision;
+    property DecimalScale: Integer read GetDecimalScale write SetDecimalScale;
+    property Size: Integer read GetSize;
+    property DataType: TFieldType read GetDataType write SetDataType;
+    property FieldName: string read GetFieldName;
+    property Index: integer read GetFieldIndex;
+    property Value: Variant read GetValue;
+  end;
+
+
+  IDASQLCommandNativeObject = interface
+    ['{990F8327-C1F2-447C-A2D0-C712ACAA11CF}']
+    function GetNativeObject: TObject; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function IsTDatasetCompatible: Boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetNativeFields(Index: integer): IDANativeField;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function NativeFieldCount: Integer;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function NativeFindField(const FieldName: string): IDANativeField;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetNativeFieldData(Index: Integer; var Data: pointer; var DataSize: cardinal):Boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function CanFreeNativeFieldData: Boolean;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    //
+    property NativeFields[Index: Integer]: IDANativeField read GetNativeFields;
+    property NativeObject: TObject read GetNativeObject;
+  end;
+
+  { IDASQLCommand
+      Base interface for SQL commands. It defines the common functionality shared by queries and stored procedures
+      that is providing access to a parameter list and being able to execute a statement which affects a certain
+      number of records. }
+  IDASQLCommand = interface
+    ['{F57D2647-2DDE-4F69-86C5-CFACD6AC601F}']
+    // Properties readers/writers
+    function GetParams: TDAParamCollection; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetPrepared: boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetPrepared(Value: boolean); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetWhere: TDAWhere; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF} deprecated;
+    function GetDynamicWhere: TDAWhereBuilder; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetDynamicWhere(const Value: TDAWhereBuilder); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function SQLContainsDynamicWhere:boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetSQL: string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetSQL(const Value: string); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetDataset: TDataset; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetName: string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetOnAfterExecute: TDAAfterExecuteCommandEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetOnBeforeExecute: TDABeforeExecuteCommandEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnAfterExecute(const Value: TDAAfterExecuteCommandEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnBeforeExecute(const Value: TDABeforeExecuteCommandEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetOnExecuteError: TDAExecuteCommandErrorEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnExecuteError(const Value: TDAExecuteCommandErrorEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    // Methods
+    procedure RefreshParams; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function Execute: integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function ParamByName(const aName: string): TDAParam; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    // Properties
+    property Name: string read GetName;
+    property Dataset: TDataSet read GetDataset;
+    property SQL: string read GetSQL write SetSQL;
+    property Params: TDAParamCollection read GetParams;
+    property Prepared: boolean read GetPrepared write SetPrepared;
+    {$WARN SYMBOL_DEPRECATED OFF}
+    property Where: TDAWhere read GetWhere;
+    {$WARN SYMBOL_DEPRECATED ON}
+    property DynamicWhere: TDAWhereBuilder read GetDynamicWhere write SetDynamicWhere;
+
+    property OnBeforeExecute: TDABeforeExecuteCommandEvent read GetOnBeforeExecute write SetOnBeforeExecute;
+    property OnAfterExecute: TDAAfterExecuteCommandEvent read GetOnAfterExecute write SetOnAfterExecute;
+    property OnExecuteError: TDAExecuteCommandErrorEvent read GetOnExecuteError write SetOnExecuteError;
+  end;
+
+  { IDAMustSetParams
+      Implemented only by few SQL commands when we need to call PSSetParams after the parameter values
+      are written. For internal use only. See TDAEDataset.DoSetActive }
+  IDAMustSetParams = interface
+    ['{575A8055-0200-44F1-AC5A-EF8604CBB489}']
+    procedure SetParamValues(Params: TDAParamCollection); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetParamValues(Params: TDAParamCollection); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  end;
+
+  { IDADataset
+      Provides access to a row set generated from a SQL select or a call to a stored procedure which
+      returns rows. IDADataset objects are created using the method IDAConnection.NewDataset.
+      Objects implementing this interface are equivalent to TDataset and in most cases simply wrap one. }
+  IDADataset = interface(IDASQLCommand)
+    ['{8A3E5056-A8B9-4455-B82C-67E48CC39EA5}']
+    // Properties readers/writers
+    function GetRecordCount: integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetFieldCount: integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetFields: TDAFieldCollection; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetActive: boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetActive(Value: boolean); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetEOF: boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetFieldValues(Index: integer): Variant; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetNames(Index: integer): string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetIsEmpty : boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetLogicalName : string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetLogicalName(aName : string); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function GetOnAfterOpen: TDAAfterOpenDatasetEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetOnBeforeOpen: TDABeforeOpenDatasetEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnAfterOpen(const Value: TDAAfterOpenDatasetEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnBeforeOpen(const Value: TDABeforeOpenDatasetEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetOnOpenError: TDAOpenDatasetErrorEvent; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetOnOpenError(const Value: TDAOpenDatasetErrorEvent); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    // Methods
+    procedure Open; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure Close; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    procedure EnableControls; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure DisableControls; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function  ControlsDisabled: Boolean;{$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+
+    procedure Next; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function FieldByName(const aName: string): TDAField; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function FindField(const aName: string): TDAField; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function GetCurrentRecIdValue: integer;
+    procedure SetCurrentRecIdValue(Value: integer);
+
+    function GetRowRecIDValue: integer;
+
+    procedure EnableConstraints; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure DisableConstraints; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    function Locate(const KeyFields: string; const KeyValues: Variant; Options: TLocateOptions): Boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function Lookup(const KeyFields: string; const KeyValues: Variant; const ResultFields: string): Variant; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    property RowRecIdValue: integer read GetRowRecIdValue;
+    property CurrentRecIdValue: integer read GetCurrentRecIdValue write SetCurrentRecIdValue;
+    // Properties
+    property IsEmpty : boolean read GetIsEmpty;
+(*    property BOF: boolean read GetBOF;*)
+    property EOF: boolean read GetEOF;
+    property RecordCount: integer read GetRecordCount;
+    property Fields: TDAFieldCollection read GetFields;
+    property Active: boolean read GetActive write SetActive;
+    property FieldCount: integer read GetFieldCount;
+    property FieldValues[Index: integer]: Variant read GetFieldValues;
+    property Names[Index: integer]: string read GetNames;
+    property LogicalName : string read GetLogicalName write SetLogicalName;
+
+    property OnBeforeOpen: TDABeforeOpenDatasetEvent read GetOnBeforeOpen write SetOnBeforeOpen;
+    property OnAfterOpen: TDAAfterOpenDatasetEvent read GetOnAfterOpen write SetOnAfterOpen;
+    property OnOpenError: TDAOpenDatasetErrorEvent read GetOnOpenError write SetOnOpenError;
+
+  end;
+
+  IDADatasetEx = interface(IDADataset)
+    ['{BB588B03-620E-43AD-B77E-EFD35F303112}']
+    function GetBOF: boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure Refresh; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetBookMark: TBookmark; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GotoBookmark(Bookmark: TBookmark); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure FreeBookmark(Bookmark: TBookmark); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function BookmarkValid(Bookmark: TBookmark): Boolean; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetState : TDatasetState; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    property State : TDatasetState read GetState;
+  end;
+
+  { IDAEditableDataset }
+  IDAEditableDataset = interface(IDADatasetEx)
+    ['{D3E2147F-65B3-4D9D-8614-7270011FA7D5}']
+    procedure Edit; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure Insert; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure Post; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure Cancel; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure Append; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure Delete; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    procedure Prior; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure First; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure Last; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    procedure AddRecord(const  FieldNames : array of string; const FieldValues : array of Variant); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    procedure EnableEventHandlers; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure DisableEventHandlers; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  end;
+
+  { IDAStoredProcedure
+      Provides access to stored database procedures.
+      IDAStoredProcedure objects are created using the method IDAConnection.NewStoredProcedure.}
+  IDAStoredProcedure = interface(IDASQLCommand)
+    ['{6D9C806F-65A5-43B3-8F07-4ED782A13A0A}']
+    // Properties readers/writers
+    function GetStoredProcedureName: string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetStoredProcedureName(const Name: string); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    // Methods
+    function Execute: integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+
+    // Properties
+    property StoredProcedureName: string read GetStoredProcedureName write SetStoredProcedureName;
+  end;
+
+  { IDADatasetPersist }
+  IDADatasetPersist = interface
+    ['{D6F850CD-9204-4953-A54F-1E622AA993B6}']
+    function Persist(const aQuery: IDADataset; MaxRecords: integer; out Data: IROStream): integer;
+  end;
+
+  { IDADatasetResolver }
+  IDADatasetResolver = interface
+    ['{D6F850CD-9204-4953-A54F-1E622AA993B6}']
+    procedure Resolve(const Data: IROStream; const aQuery: IDADataset; MaxErrors: integer);
+  end;
+
+  { IDALoginInfoAware }
+  IDALoginInfoAware = interface
+  ['{755615F0-4208-459A-B1C4-97EA5A3DB346}']
+    function GetLoginInfo : TDALoginInfo;
+    procedure SetLoginInfo(aValue : TDALoginInfo);
+
+    property LoginInfo : TDALoginInfo read GetLoginInfo write SetLoginInfo;
+  end;
+
+  { TDALoginInfoAware }
+  TDALoginInfoAware = class(TInterfacedObject, IDALoginInfoAware)
+  private
+    fLoginInfo : TDALoginInfo;
+
+  protected
+    { IDALoginInfoAware }
+    function GetLoginInfo : TDALoginInfo;
+    procedure SetLoginInfo(aValue : TDALoginInfo);
+
+    { IInterface }
+    function _AddRef: Integer; stdcall;
+    function _Release: Integer; stdcall;
+
+  end;
+
+  // not used yet
+  { IDASimpleClonedCursorsSupport }
+  IDASimpleClonedCursorsSupport = interface
+  ['{39D05665-5B13-4EC3-B31E-D39CBEA52AC6}']
+    function GetSimpleCloneSource : TObject;
+  end;
+
+  IDAMemDatasetBatchAdding = interface
+  ['{73A4A297-2938-46EB-8D0C-2F8FB58046E2}']
+    function AllocRecordBuffer: PAnsiChar;
+    procedure FreeRecordBuffer(var Buffer: PAnsiChar);
+    function GetFieldNativeBuffer(Buffer: PAnsiChar; Field: TField): Pointer;
+    function MakeBlobFromString(Blob:AnsiString): pointer;
+    procedure SetNullMask(Buffer: PAnsiChar; Field: TField; const Value: boolean);
+    procedure SetAnsiString(NativeBuf: Pointer; Field: TField; const Value: Ansistring);
+    procedure SetWideString(NativeBuf: Pointer; Field: TField; const Value: Widestring);
+    procedure AddRecordsfromList(AList: TList);
+  end;
+
+  { TDADataSource }
+  TDABaseDataSource = class(TDataSource)
+  end;
+
+const
+  DADataTypeNames: array[Low(TDADataType)..High(TDADataType)] of string = ('Unknown',
+    'String',
+    'DateTime',
+    'Float',
+    'Currency',
+    'AutoInc',
+    'Integer',
+    'LargeInt',
+    'Boolean',
+    'Memo',
+    'Blob',
+    'WideString',
+    'WideMemo',
+    'LargeAutoInc',
+    'Byte',
+    'ShortInt',
+    'Word',
+    'SmallInt',
+    'Cardinal',
+    'LargeUInt',
+    'Guid',
+    'Xml',
+    'Decimal',
+    'SingleFloat');
+  DADataTypesMappings: array[TDADataType] of TFieldType = (
+    ftUnknown, ftString, ftDateTime, ftFloat, ftBCD, ftAutoInc, ftInteger,
+    ftLargeInt, ftBoolean, ftMemo, ftBlob, ftWideString,
+    {$IFNDEF DA_WideMemoSupport}ftMemo{$ELSE}ftWideMemo{$ENDIF DA_WideMemoSupport},
+    ftLargeInt, ftSmallint, ftSmallint, ftWord, ftSmallint, ftInteger, ftLargeint,
+    ftGuid, ftWideString, ftFMTBcd, ftFloat);
+
+function VCLTypeToDAType(aFieldType: TFieldType): TDADataType;
+function DATypeToVCLType(aDAType: TDADataType): TFieldType;
+
+{ Cross-platform GetTickCount }
+function ROGetTickCount: Cardinal;
+
+{ Variant converters }
+function GetVarBoolean(const Value: Variant): boolean;
+function GetVarCurrency(const Value: Variant): currency;
+function GetVarDateTime(const Value: Variant): TDateTime;
+function GetVarFloat(const Value: Variant): double;
+function GetVarInteger(const Value: Variant): integer;
+function GetVarString(const Value: Variant): string;
+function GetVarAnsiString(const Value: Variant): Ansistring;
+function GetVarInt64(const Value: Variant): Int64;
+function GetVarWideString(const Value: Variant): WideString;
+function GetVarByte(const Value: Variant): Byte;
+function GetVarShortInt(const Value: Variant): ShortInt;
+function GetVarWord(const Value: Variant): Word;
+function GetVarSmallInt(const Value: Variant): SmallInt;
+function GetVarCardinal(const Value: Variant): Cardinal;
+function GetVarLargeUInt(const Value: Variant): UInt64;
+function GetVarGuid(const Value: Variant): TGuid;
+function GetVarXml(const Value: Variant): IXMLNode;
+function GetVarDecimal(const Value: Variant): TBCD;
+function GetVarSingleFloat(const Value: Variant): Single;
+function TestDefaultValue(const DefaultValue: string; DataType: TDADataType): Boolean;
+
+{ Misc }
+function NewDatasetParam(anArray : TDADatasetParamArray; Name : string; Value : Variant) : TDADatasetParam;
+function NewDatasetRequestInfo(anArray : TDADatasetRequestInfoArray;
+                               DatasetName : string;
+                               ParamNames : array of string;
+                               ParamValues : array of variant;
+                               IncludeSchema : boolean = FALSE;
+                               MaxRecords : integer = -1) : TDADatasetRequestInfo;
+
+procedure Params_ParseSQL(aParams: TParams; aSQL: String; DoCreate: Boolean; aQuoteChar: TDAQuoteCharArray; aUseDefaultChars: Boolean = False);
+procedure BlobVariantToBinary(const iVariant:Variant; iBinary:TStream);
+function BinaryToBlobVariant(iBinary:TStream): Variant;
+
+implementation
+
+uses
+  {$IFDEF DataAbstract_Trial}
+  Forms, Dialogs, //Windows,
+  {$ENDIF DataAbstract_Trial}
+  TypInfo, Variants,
+  uDARes, uROBinaryHelpers, {uDAClasses, uDADataTable,} uDAWhere
+  {$IFDEF MSWINDOWS}
+  ,Windows
+  {$ENDIF};
+
+{ Cross-platform GetTickCount }
+{$IFNDEF MSWINDOWS}
+// This has been grabbed from IdGlobal.pas. Needs to be tested under Kylix just in case
+function ROGetTickCount: Cardinal;
+var
+  Stamp: TTimeStamp;
+begin
+  Stamp := DateTimeToTimeStamp(Now);
+  Result := Stamp.Time;
+end;
+{$ENDIF}
+
+{$IFDEF MSWINDOWS}
+function ROGetTickCount: Cardinal;
+begin
+  result := Windows.GetTickCount;
+end;
+{$ENDIF}
+
+procedure BlobVariantToBinary(const iVariant:Variant; iBinary:TStream);
+var
+  str: AnsiString;
+  p: pointer;
+begin
+  if VarIsEmpty(iVariant) or VarIsNull(iVariant) then begin
+    // nothing, we accept "empty" blobs
+  end
+  else if VarType(iVariant) = varString then begin
+    str := VarToAnsiStr(iVariant);
+    iBinary.Write(pointer(str)^,Length(str));
+  end
+  else if VarIsArray(iVariant) and (VarArrayDimCount(iVariant) = 1) then begin
+    p := VarArrayLock(iVariant);
+    try
+      iBinary.Write(p^,VarArrayHighBound(iVariant,1)-VarArrayLowBound(iVariant,1)+1);
+    finally
+      VarArrayUnlock(iVariant);
+    end;
+  end
+  else begin
+    raise EConvertError.CreateFmt('Can''t convert %d to blob',[VarTypeAsText(VarType(iVariant))]);
+  end;
+end;
+
+function BinaryToBlobVariant(iBinary:TStream): Variant;
+var
+  i: int64;
+  p:pointer;
+begin
+  i := iBinary.Position;
+  try
+    iBinary.Position := 0;
+    Result:= VarArrayCreate([0,iBinary.Size-1],varByte);
+    p := VarArrayLock(Result);
+    try
+      iBinary.Read(p^,iBinary.Size);
+    finally
+      VarArrayUnlock(Result);
+    end;
+  finally
+    iBinary.Position := i;
+  end;
+end;
+{ Variant converters }
+
+function TestForNull(const Value: Variant): boolean;
+begin
+  Result := (Value = Unassigned) or VarIsnull(Value);
+end;
+
+function GetVarBoolean(const Value: Variant): boolean;
+begin
+  if TestForNull(Value) then
+    result := FALSE
+  else
+    result := Value;
+end;
+
+function GetVarCurrency(const Value: Variant): currency;
+begin
+  if TestForNull(Value) then
+    result := 0
+  else
+    result := Value;
+end;
+
+function GetVarDateTime(const Value: Variant): TDateTime;
+begin
+  if TestForNull(Value) then
+    result := 0
+  else
+    result := Value;
+end;
+
+function GetVarFloat(const Value: Variant): double;
+begin
+  if TestForNull(Value) then
+    result := 0
+  else
+    result := Value;
+end;
+
+function GetVarInteger(const Value: Variant): integer;
+begin
+  if TestForNull(Value) then
+    result := 0
+  else
+    result := Value;
+end;
+
+function GetVarString(const Value: Variant): string;
+begin
+  if TestForNull(Value) then
+    Result := ''
+  else
+    Result := VarToStr(Value);
+end;
+
+function GetVarAnsiString(const Value: Variant): Ansistring;
+begin
+  if TestForNull(Value) then
+    Result := ''
+  else
+    Result := VarToAnsiStr(Value);
+end;
+
+function GetVarInt64(const Value: Variant): Int64;
+begin
+  if TestForNull(Value) then
+    result := 0
+  else
+    result := Value;
+end;
+
+function GetVarWideString(const Value: Variant): WideString;
+begin
+  if TestForNull(Value) then
+    Result := ''
+  else
+    Result := VarToWideStr(Value);
+end;
+
+function GetVarByte(const Value: Variant): Byte;
+begin
+  if TestForNull(Value) then
+    Result := 0
+  else
+    Result := Value;
+end;
+
+function GetVarShortInt(const Value: Variant): ShortInt;
+begin
+  if TestForNull(Value) then
+    Result := 0
+  else
+    Result := Value;
+end;
+
+function GetVarWord(const Value: Variant): Word;
+begin
+  if TestForNull(Value) then
+    Result := 0
+  else
+    Result := Value;
+end;
+
+function GetVarSmallInt(const Value: Variant): SmallInt;
+begin
+  if TestForNull(Value) then
+    Result := 0
+  else
+    Result := Value;
+end;
+
+function GetVarCardinal(const Value: Variant): Cardinal;
+begin
+  if TestForNull(Value) then
+    Result := 0
+  else
+    Result := Value;
+end;
+
+function GetVarLargeUInt(const Value: Variant): UInt64;
+begin
+  if TestForNull(Value) then
+    Result := 0
+  else
+    Result := Value;
+end;
+
+function GetVarGuid(const Value: Variant): TGuid;
+begin
+  if TestForNull(Value) then
+    FillChar(Result, sizeof(Result), 0)
+  else
+    Result := StringToGuid(Value);
+end;
+
+function GetVarXml(const Value: Variant): IXMLNode;
+var
+  lDoc: IXMLDocument;
+begin
+  if TestForNull(Value) then
+    Result := nil
+  else begin
+    lDoc := NewROXmlDocument;
+    lDoc.New;
+    lDoc.XML := Value;
+    Result := lDoc.DocumentNode;
+  end;
+end;
+
+function GetVarDecimal(const Value: Variant): TBCD;
+begin
+  if TestForNull(Value) then
+    Result := NullBcd
+  else
+    Result := VariantToBCD(Value);
+end;
+
+function GetVarSingleFloat(const Value: Variant): Single;
+begin
+  if TestForNull(Value) then
+    Result := 0
+  else
+    Result := Value;
+end;
+
+
+function TestDefaultValue(const DefaultValue: string; DataType: TDADataType): Boolean;
+var
+  aDecimal: TDecimal;
+begin
+  try
+    case DataType of
+      datString: ;
+      datDateTime: VarAsType(DefaultValue, varDate);
+      datFloat: VarAsType(DefaultValue, varDouble);
+      datDecimal: if not VarByteArrayToDecimal(DefaultValue,aDecimal) then VarAsType(DefaultValue, VarFMTBcd);
+      datCurrency: VarAsType(DefaultValue, varCurrency);
+      datAutoInc,
+      datInteger: VarAsType(DefaultValue, varInteger);
+      datLargeInt: VarAsType(DefaultValue, varInt64);
+      datBoolean: VarAsType(DefaultValue, varBoolean);
+      datMemo: VarAsType(DefaultValue, varString);
+      datBlob: begin Result := False; exit; end;
+      datWideString: VarAsType(DefaultValue, varOleStr);
+      datWideMemo: VarAsType(DefaultValue, varOleStr);
+    else
+      begin
+        result := false;
+        exit;
+      end;
+    end;
+    result := true;
+  except
+    result := false;
+  end;
+end;
+
+{ EDADriverLoadException }
+
+constructor EDADriverLoadException.Create(anErrorCode: integer;
+  const anErrorMessage: string);
+begin
+  inherited Create(anErrorMessage);
+
+  fErrorCode := anErrorCode;
+end;
+
+function VCLTypeToDAType(aFieldType: TFieldType): TDADataType;
+begin
+  result := datUnknown;
+  case aFieldType of
+    ftUnknown: result := datUnknown;
+
+    ftAutoInc: result := datAutoInc;
+
+    ftGuid: Result:= datGuid;
+
+    ftFixedChar,
+    ftString: result := datString;
+
+    ftLargeint: result := datLargeInt;
+
+    ftSmallint: Result := datSmallInt;
+    ftWord: Result:= datWord;
+    ftInteger:  result := datInteger;
+
+    ftCurrency: result := datFloat;
+    ftFloat: result := datFloat;
+    ftBCD: Result := datCurrency;
+    ftFMTBcd: Result := datDecimal;
+
+
+    ftTimeStamp,
+      ftDate,
+      ftTime,
+      ftDateTime: result := datDateTime;
+
+    ftMemo,
+      ftFmtMemo: result := datMemo;
+
+    ftBytes, ftTypedBinary,
+      ftVarBytes,
+      ftBlob,
+      ftGraphic,
+      ftOraBlob,
+      ftOraClob: result := datBlob;
+
+    ftBoolean: result := datBoolean;
+    {$IFDEF DA_FixedWideCharSupport}
+    ftFixedWideChar,
+    {$ENDIF DA_FixedWideCharSupport}
+    ftWideString: Result := datWideString;
+    {$IFDEF DA_WideMemoSupport}
+    ftWideMemo: Result:= datWideMemo;
+    {$ENDIF DA_WideMemoSupport}
+  else
+    RaiseError(err_FieldTypeNotSupported, [GetEnumName(TypeInfo(TFieldType), Ord(aFieldType)), Ord(aFieldType)]);
+  end;
+end;
+
+function DATypeToVCLType(aDAType: TDADataType): TFieldType;
+begin
+  result := DADataTypesMappings[aDAType];
+end;
+
+{ Misc }
+function NewDatasetParam(anArray : TDADatasetParamArray; Name : string; Value : Variant) : TDADatasetParam;
+begin
+  result := anArray.Add;
+  result.Name := UTF8Encode(Name);
+  result.Value := Value;
+end;
+
+function NewDatasetRequestInfo(anArray : TDADatasetRequestInfoArray;
+                               DatasetName : string;
+                               ParamNames : array of string;
+                               ParamValues : array of variant;
+                               IncludeSchema : boolean = FALSE;
+                               MaxRecords : integer = -1) : TDADatasetRequestInfo;
+var i : integer;
+begin
+  if (Length(ParamNames)<>Length(ParamValues))
+    then raise EROUserError.Create('ParamNames and ParamValues arrays don''t contain the same number of items');
+
+  result := anArray.Add;
+
+  result.DatasetName := UTF8Encode(DatasetName);
+  result.MaxRecords := MaxRecords;
+  result.IncludeSchema := IncludeSchema;
+
+  if (Length(ParamNames)>0) then begin
+    result.Params := TDADatasetParamArray.Create;
+    for i := 0 to (Length(ParamNames)-1) do
+      NewDatasetParam(result.Params, ParamNames[i], ParamValues[i]);
+  end
+  else result.Params := NIL;
+end;
+
+{ TDAStatementCollection }
+
+function TDAStatementCollection.Add: TDAStatement;
+begin
+  result := TDAStatement(inherited Add);
+end;
+
+function TDAStatementCollection.FindItem(const aName: string; const aStatementName: string=''; const aConnectionType: string = ''; aReturnDefault: Boolean = false): TDAStatement;
+var
+  i: integer;
+  lDef, lStatement:TDAStatement;
+begin
+  result := nil;
+  lDef := nil;
+  for i := 0 to (Count - 1) do begin
+    lStatement := Items[i] as TDAStatement;
+    if lStatement.Default then lDef := lStatement;
+    if
+      ((aConnectionType <> '') and (SameText(lStatement.ConnectionType, aConnectionType))) or
+      SameText(lStatement.Connection, aName) and
+       ((aStatementName = '') or SameText(lStatement.Name, aStatementName)) then begin
+      result := lStatement;
+      exit;
+    end;
+  end;
+  if aReturnDefault then result := lDef;
+end;
+
+constructor TDAStatementCollection.Create(aOwner: TPersistent; aSQLCommand: TDASQLCommand);
+begin
+  inherited Create(aOwner, TDAStatement);
+  FAllowEmptyName := True;
+  fSQLCommand := aSQLCommand;
+end;
+
+function TDAStatementCollection.GetItemName(
+  anItem: TCollectionItem): string;
+begin
+  Result := TDAStatement(anItem).Connection;
+end;
+
+function TDAStatementCollection.GetStatements(
+  Index: integer): TDAStatement;
+begin
+  result := TDAStatement(inherited Items[Index])
+end;
+
+function TDAStatementCollection.SetItemName(anItem: TCollectionItem;
+  const aName: string): string;
+begin
+  TDAStatement(anItem).Connection := aName;
+end;
+
+procedure TDAStatementCollection.SetStatements(Index: integer;
+  const Value: TDAStatement);
+begin
+  Statements[Index].Assign(Value);
+end;
+
+function TDAStatementCollection.StatementByName(
+  const aName: string): TDAStatement;
+begin
+  result := TDAStatement(inherited ItemByName(aName));
+end;
+
+{ TDABaseField }
+
+procedure TDABaseField.Assign(Source: TPersistent);
+begin
+  if (Source is TDABaseField) then begin
+    AssignField(TDABaseField(Source));
+  end
+  else begin
+    inherited;
+  end;
+end;
+
+procedure TDABaseField.AssignField(Source: TDABaseField);
+begin
+  fSize := Source.fSize;
+  fDescription := Source.fDescription;
+  fName := Source.fName;
+  fDataType := Source.fDataType;
+  fValue := Source.fValue;
+  fBlobType := Source.fBlobType;
+  fGeneratorName := Source.GeneratorName;
+  FDecimalPrecision := Source.FDecimalPrecision;
+  FDecimalScale := Source.FDecimalScale;
+end;
+
+{procedure TDABaseField.FixSize;
+begin
+  if (fDataType <> datString) then fSize := 0;
+end;}
+
+procedure TDABaseField.UpdateValueType;
+
+  function ConvertValueAccordingToDataType(aValue: Variant; aDataType: TDADataType): Variant;
+  begin
+    case aDataType of
+      datString: result := VarAsType(aValue, varString);
+      datDateTime: result := VarAsType(aValue, varDate);
+      datFloat: result := VarAsType(aValue, varDouble);
+      datCurrency: result := VarAsType(aValue, varCurrency);
+      datAutoInc: result := VarAsType(aValue, varInteger);
+      datInteger: result := VarAsType(aValue, varInteger);
+      datLargeInt: result := VarAsType(aValue, varInt64);
+      datBoolean: result := VarAsType(aValue, varBoolean);
+      datMemo: result := VarAsType(aValue, varString);
+//      datBlob: result := VarAsType(aValue, varByte);
+      datWideString: result := VarAsType(aValue, varOleStr);
+      datWideMemo: result := VarAsType(aValue, varOleStr);
+      datLargeAutoInc: result := VarAsType(aValue, varInt64);
+      datByte: result := VarAsType(aValue, varByte);
+      datShortInt: result := VarAsType(aValue, varShortInt);
+      datWord: result := VarAsType(aValue, varWord);
+      datSmallInt: result := VarAsType(aValue, varSmallint);
+      datCardinal: result := VarAsType(aValue, varLongWord);
+      datLargeUInt: result := VarAsType(aValue, varInt64);
+      datGuid: result := VarAsType(aValue, varString);
+      datXml: result := VarAsType(aValue, varOleStr);
+      datDecimal: result := VarAsType(aValue, VarFMTBcd);
+      datSingleFloat: result := VarAsType(aValue, varSingle);
+    end;
+  end;
+
+var
+  lValue: Variant;
+begin
+  try
+    lValue := ConvertValueAccordingToDataType(fValue, fDataType);
+    if VarSameValue(fValue, lValue) then
+      fValue := lValue
+    else
+      fValue := ConvertValueAccordingToDataType(Unassigned, fDataType);
+  except
+    fValue := ConvertValueAccordingToDataType(Unassigned, fDataType);
+  end;
+end;
+
+function TDABaseField.GetDataType: TDADataType;
+begin
+  if not HasValidDictionaryField then begin
+    result := fDataType
+  end
+  else begin
+    result := GetDictionaryField().DataType;
+  end;
+end;
+
+function TDABaseField.GetDescription: string;
+begin
+  if not HasValidDictionaryField then begin
+    result := fDescription;
+  end
+  else begin
+    result := GetDictionaryField().Description;
+  end;
+end;
+
+function TDABaseField.GetName: string;
+begin
+  result := fName
+end;
+
+function TDABaseField.GetSize: integer;
+begin
+  if (DataType <> datString) and (DataType <> datWideString) then begin
+    result := 0;
+  end
+  else begin
+    if not HasValidDictionaryField then begin
+      result := fSize
+    end
+    else begin
+      result := GetDictionaryField().Size;
+    end;
+  end;
+end;
+
+function TDABaseField.GetValue: Variant;
+begin
+  result := fValue
+end;
+
+procedure TDABaseField.SetDataType(aValue: TDADataType);
+begin
+  if fDataType <> aValue then begin
+    fDataType := aValue;
+    if not (VarIsNull(Value) or VarIsEmpty(Value)) then
+      UpdateValueType;
+
+  //FixSize();
+  end;
+end;
+
+procedure TDABaseField.SetDescription(const Value: string);
+begin
+  fDescription := Value;
+end;
+
+procedure TDABaseField.SetName(const Value: string);
+var
+  lOldName: string;
+begin
+  lOldName := fName;
+  fName := Value;
+  if lOldName <> '' then
+    (Collection as TSearcheableCollection).TriggerOnItemRenamed(lOldName, fName);
+end;
+
+procedure TDABaseField.SetSize(Value: integer);
+begin
+  fSize := Value;
+  //FixSize();
+end;
+
+procedure TDABaseField.SetValue(const aValue: Variant);
+begin
+  fValue := aValue
+end;
+
+function TDABaseField.GetAsBoolean: boolean;
+begin
+  result := GetVarBoolean(Value);
+  //if VarIsNull(Value) then result := FALSE else result := Value;
+end;
+
+function TDABaseField.GetAsCurrency: currency;
+begin
+  result := GetVarCurrency(Value);
+  //if VarIsNull(Value) then result := 0 else result := Value;
+end;
+
+function TDABaseField.GetAsDateTime: TDateTime;
+begin
+  result := GetVarDateTime(Value);
+  //if VarIsNull(Value) then result := 0 else result := Value;
+end;
+
+function TDABaseField.GetAsFloat: double;
+begin
+  result := GetVarFloat(Value);
+  //if VarIsNull(Value) then result := 0 else result := Value;
+end;
+
+function TDABaseField.GetAsInteger: integer;
+begin
+  result := GetVarInteger(Value);
+  //if VarIsNull(Value) then result := 0 else result := Value;
+end;
+
+function TDABaseField.GetAsString: string;
+begin
+  result := GetVarString(Value);
+  //if VarIsNull(Value) then result := '' else result := Value;
+end;
+
+function TDABaseField.GetAsAnsiString: Ansistring;
+begin
+  Result := GetVarAnsiString(Value);
+end;
+
+procedure TDABaseField.SetAsAnsiString(const aValue: Ansistring);
+begin
+ // according _VarFromLStr we can do this
+  Value := aValue;
+end;
+
+function TDABaseField.GetAsVariant: variant;
+begin
+  result := Value
+end;
+
+procedure TDABaseField.SetAsBoolean(const aValue: boolean);
+begin
+  Value := aValue;
+end;
+
+procedure TDABaseField.SetAsCurrency(const aValue: currency);
+begin
+  Value := aValue;
+end;
+
+procedure TDABaseField.SetAsDateTime(const aValue: TDateTime);
+begin
+  Value := aValue;
+end;
+
+procedure TDABaseField.SetAsFloat(const aValue: double);
+begin
+  Value := aValue;
+end;
+
+procedure TDABaseField.SetAsString(const aValue: string);
+begin
+  Value := aValue;
+end;
+
+procedure TDABaseField.SetAsVariant(const aValue: variant);
+begin
+  Value := aValue;
+end;
+
+procedure TDABaseField.SetAsInteger(const aValue: integer);
+begin
+  Value := aValue;
+end;
+
+function TDABaseField.GetDisplayName: string;
+begin
+  //result := Format('%s %-20s [%s, %d]', [GetName, '', GetEnumName(TypeInfo(TDADataType), Ord(DataType)), Size]);
+  result := GetName;
+end;
+
+function TDABaseField.GetNamePath: string;
+begin
+  if (Collection <> nil) then
+    result := Collection.GetNamePath + Name
+  else
+    result := inherited GetNamePath;
+
+  result := inherited GetNamePath;
+end;
+
+function TDABaseField.GetDictionaryEntry: string;
+begin
+  result := fDictionaryEntry
+end;
+
+procedure TDABaseField.SetDictionaryEntry(const Value: string);
+begin
+  fDictionaryEntry := Value
+end;
+
+function TDABaseField.FindDictionaryField: TDACustomField;
+var
+  lOwner: TObject;
+  lHasDict: IDAHasDataDictionary;
+  lDictionary: IDADataDictionary;
+begin
+  result := nil;
+  if DictionaryEntry = '' then exit;
+
+  lDictionary := TDACustomFieldCollection(Collection).DataDictionary;
+
+  { No Dictionary assigned? then try getting dictionary from owning Schema }
+  if not Assigned(lDictionary) then begin
+    lOwner := TDACustomFieldCollection(Collection).Owner;
+    if not (lOwner is TDADataSet) then exit;
+
+    lOwner := TDADatasetCollection(TDADataSet(lOwner).Collection).Owner;
+//    if not (lOwner is TDASchema) then exit;
+
+//    lDictionary := TDASchema(lOwner).DataDictionary;
+    if Supports(lOwner, IDAHasDataDictionary, lHasDict) then
+      lDictionary := lHasDict.DataDictionary;
+  end;
+
+  if Assigned(lDictionary) then
+    result := lDictionary.Fields.FindField(DictionaryEntry);
+end;
+
+function TDABaseField.GetDictionaryField: TDACustomField;
+begin
+  result := FindDictionaryField();
+  if not Assigned(result) then
+    RaiseError('Dictionary entry %s not found for field %s', [DictionaryEntry, Name])
+end;
+
+function TDABaseField.HasValidDictionaryField: Boolean;
+begin
+  result := (DictionaryEntry <> '') and
+    Assigned(FindDictionaryField());
+end;
+
+function TDABaseField.IsCompatibleV4: boolean;
+begin
+  Result:=False;
+end;
+
+function TDABaseField.StoreDataType: Boolean;
+begin
+  result := MergeDatadictionaries or not HasValidDictionaryField();
+end;
+
+
+function TDABaseField.StoreDecimalPrecision: Boolean;
+begin
+  Result:= (MergeDatadictionaries or (FDecimalPrecision <>0)) and not IsCompatibleV4;
+end;
+
+function TDABaseField.StoreDecimalScale: Boolean;
+begin
+  Result:= (MergeDatadictionaries or (FDecimalScale <>0)) and not IsCompatibleV4;
+end;
+
+function TDABaseField.StoreGeneratorName: Boolean;
+begin
+  result := MergeDatadictionaries or not HasValidDictionaryField();
+end;
+
+function TDABaseField.StoreDescription: Boolean;
+begin
+  result := MergeDatadictionaries or not HasValidDictionaryField();
+end;
+
+function TDABaseField.StoreSize: Boolean;
+begin
+  result := MergeDatadictionaries or  (((DataType = datString) or (DataType = datWideString)) and (not HasValidDictionaryField()));
+end;
+
+function TDABaseField.GetBlobType: TDABlobType;
+begin
+  if HasValidDictionaryField
+    then result := GetDictionaryField().BlobType
+    else result := fBlobType
+end;
+
+function TDABaseField.GetGeneratorName: string;
+begin
+  if not HasValidDictionaryField then begin
+    result := fGeneratorName
+  end
+  else begin
+    result := GetDictionaryField().GeneratorName;
+  end;
+
+end;
+
+
+procedure TDABaseField.SetBlobType(const Value: TDABlobType);
+begin
+  fBlobType := Value;
+end;
+
+function TDABaseField.StoreBlobType: boolean;
+begin
+  result := HasValidDictionaryField;
+end;
+
+procedure TDABaseField.Clear;
+begin
+  Value := Null;
+end;
+
+procedure TDABaseField.SetGeneratorName(const aValue: string);
+begin
+  fGeneratorName := aValue
+end;
+
+procedure TDABaseField.SetDisplayName(const Value: string);
+begin
+  inherited;
+  fName := Value;
+end;
+
+function TDABaseField.GetAsLargeInt: int64;
+begin
+  Result := GetVarInt64(Value);
+end;
+
+procedure TDABaseField.SetAsLargeInt(const aValue: Int64);
+begin
+  Value := aValue;
+end;
+
+function TDABaseField.GetAsWideString: Widestring;
+begin
+  Result := GetVarWideString(Value);
+end;
+
+procedure TDABaseField.SetAsWideString(const aValue: Widestring);
+begin
+  Value := aValue;
+end;
+
+function TDABaseField.GetIsNull: boolean;
+begin
+  result := VarIsNull(Value);
+end;
+
+
+function TDABaseField.GetBlobSize: Integer;
+var
+  v: Variant;
+begin
+  v := GetValue;
+  if VarIsArray(v) then result := VarArrayHighBound(V, 1) - VarArrayLowBound(V, 1) + 1
+  else if VarIsStr(v) then result := Length(v) else
+  Result := 0;
+end;
+
+function TDABaseField.GetAsByte: Byte;
+begin
+  result := GetVarByte(Value);
+end;
+
+function TDABaseField.GetAsCardinal: Cardinal;
+begin
+  result := GetVarCardinal(Value);
+end;
+
+function TDABaseField.GetAsDecimal: TBcd;
+begin
+  result := GetVarDecimal(Value);
+end;
+
+function TDABaseField.GetAsGuid: TGUID;
+begin
+  result := GetVarGuid(Value);
+end;
+
+function TDABaseField.GetAsLargeUInt: UInt64;
+begin
+  Result := GetVarLargeUInt(Value);
+end;
+
+function TDABaseField.GetAsShortInt: ShortInt;
+begin
+  result := GetVarShortInt(Value);
+end;
+
+function TDABaseField.GetAsSingle: Single;
+begin
+  result := GetVarSingleFloat(Value);
+end;
+
+function TDABaseField.GetAsSmallInt: SmallInt;
+begin
+  result := GetVarSmallInt(Value);
+end;
+
+function TDABaseField.GetAsWord: Word;
+begin
+  result := GetVarWord(Value);
+end;
+
+function TDABaseField.GetAsXml: IXMLNode;
+begin
+  result := GetVarXml(Value);
+end;
+
+procedure TDABaseField.SetAsByte(const Value: Byte);
+begin
+  self.Value := Value;
+end;
+
+procedure TDABaseField.SetAsCardinal(const Value: Cardinal);
+begin
+  self.Value := Value;
+end;
+
+procedure TDABaseField.SetAsDecimal(const Value: TBcd);
+begin
+  self.Value := BCDToVariant(Value);
+end;
+
+procedure TDABaseField.SetAsGuid(const Value: TGUID);
+begin
+  self.Value := GuidToString(Value);
+end;
+
+procedure TDABaseField.SetAsLargeUInt(const Value: UInt64);
+begin
+  self.Value := Value;
+end;
+
+procedure TDABaseField.SetAsShortInt(const Value: ShortInt);
+begin
+  self.Value := Value;
+end;
+
+procedure TDABaseField.SetAsSingle(const Value: Single);
+begin
+  self.Value := Value;
+end;
+
+procedure TDABaseField.SetAsSmallInt(const Value: SmallInt);
+begin
+  self.Value := Value;
+end;
+
+procedure TDABaseField.SetAsWord(const Value: Word);
+begin
+  self.Value := Value;
+end;
+
+procedure TDABaseField.SetAsXml(const Value: IXMLNode);
+begin
+  if Value = nil then
+    Self.Value := null
+  else
+    self.Value := Value.XML;
+end;
+
+procedure TDABaseField.SetDecimalPrecision(const Value: Integer);
+begin
+  FDecimalPrecision := Value;
+end;
+
+function TDABaseField.GetDecimalPrecision: Integer;
+begin
+  if not HasValidDictionaryField then begin
+    result := FDecimalPrecision
+  end
+  else begin
+    result := GetDictionaryField().DecimalPrecision;
+  end;
+end;
+
+function TDABaseField.GetDecimalScale: Integer;
+begin
+  if not HasValidDictionaryField then begin
+    result := FDecimalScale
+  end
+  else begin
+    result := GetDictionaryField().DecimalScale;
+  end;
+end;
+
+procedure TDABaseField.SetDecimalScale(const Value: Integer);
+begin
+  FDecimalScale := Value;
+end;
+
+function TDABaseField.MergeDatadictionaries: Boolean;
+var
+  lOwner: TObject;
+  lSchema: IDASchema;
+begin
+  result := false;
+  if DictionaryEntry = '' then exit;
+
+  lOwner := TDACustomFieldCollection(Collection).Owner;
+  if not (lOwner is TDADataSet) then exit;
+
+  lOwner := TDADatasetCollection(TDADataSet(lOwner).Collection).Owner;
+
+  if Supports(lOwner, IDASchema, lSchema) then
+    result := lSchema.MergeDataDictionaries;
+end;
+
+{ TDACustomField }
+
+constructor TDACustomField.Create(Collection: TCollection);
+begin
+  inherited;
+
+  fServerAutoRefresh := FALSE;
+  fCustomAttributes := TStringList.Create;
+  fVisible := TRUE;
+  fLogChanges := TRUE;
+end;
+
+destructor TDACustomField.Destroy;
+begin
+  fCustomAttributes.Free;
+  inherited;
+end;
+
+function TDACustomField.GetInPrimaryKey: boolean;
+begin
+  result := fInPrimaryKey
+end;
+
+function TDACustomField.GetRegExpression: string;
+begin
+  if not HasValidDictionaryField
+    then result := fRegExpression
+    else result := GetDictionaryField().RegExpression;
+end;
+
+function TDACustomField.GetDefaultValue: string;
+begin
+  if not HasValidDictionaryField
+    then result := fDefaultValue
+    else result := GetDictionaryField().DefaultValue;
+end;
+
+function TDACustomField.GetRequired: boolean;
+begin
+  if not HasValidDictionaryField
+    then result := fRequired
+    else result := GetDictionaryField().Required;
+end;
+
+function TDACustomField.GetDisplayLabel: string;
+begin
+  if not HasValidDictionaryField
+    then result := fDisplayLabel
+    else result := GetDictionaryField().DisplayLabel;
+
+  if (result='') then result := Name;
+end;
+
+function TDACustomField.GetDisplayWidth: integer;
+begin
+  if not HasValidDictionaryField
+    then result := fDisplayWidth
+    else result := GetDictionaryField().DisplayWidth;
+end;
+
+function TDACustomField.GetEditMask: string;
+begin
+  if not HasValidDictionaryField
+    then result := fEditMask
+    else result := GetDictionaryField().EditMask;
+end;
+
+function TDACustomField.GetReadOnly: boolean;
+begin
+  if not HasValidDictionaryField
+    then result := fReadOnly
+    else result := GetDictionaryField().ReadOnly;
+end;
+
+function TDACustomField.GetVisible: boolean;
+begin
+  if not HasValidDictionaryField
+    then result := fVisible
+    else result := GetDictionaryField().Visible;
+end;
+
+function TDACustomField.GetDisplayFormat: string;
+begin
+  if not HasValidDictionaryField
+    then result := fDisplayFormat
+    else result := GetDictionaryField().DisplayFormat;
+end;
+
+function TDACustomField.GetAlignment: TAlignment;
+begin
+  if not HasValidDictionaryField
+    then result := fAlignment
+    else result := GetDictionaryField().Alignment;
+end;
+
+function TDACustomField.GetEditFormat: string;
+begin
+  if not HasValidDictionaryField
+    then result := fEditFormat
+    else result := GetDictionaryField().EditFormat;
+end;
+
+procedure TDACustomField.SetInPrimaryKey(const Value: boolean);
+begin
+  fInPrimaryKey := Value
+end;
+
+procedure TDACustomField.SetRegExpression(const Value: string);
+begin
+  fRegExpression := Value
+end;
+
+procedure TDACustomField.LoadFromFile(const aFileName: string);
+begin
+  if (fField<>nil) then begin
+    if (fField is TBlobField) then TBlobField(fField).LoadFromFile(aFileName)
+  end
+  else RaiseError(err_FieldIsNotBound);
+end;
+
+procedure TDACustomField.SaveToFile(const aFileName: string);
+begin
+  if (fField<>nil) then begin
+    if (fField is TBlobField) then TBlobField(fField).SaveToFile(aFileName)
+  end
+  else RaiseError(err_FieldIsNotBound);
+end;
+
+procedure TDACustomField.LoadFromStream(const aStream: IROStream);
+begin
+  LoadFromStream(aStream.Stream);
+end;
+
+procedure TDACustomField.SaveToStream(const aStream: IROStream);
+begin
+  SaveToStream(aStream.Stream);
+end;
+
+function TDACustomField.GetValue: Variant;
+begin
+  if Assigned(fField) then begin
+    if fField.IsNull then Result := Null else
+    {$IFNDEF FPC}
+      if fField is TWideStringField then result := TWideStringField(fField).Value else
+      if fField is TSQLTimeStampField then result := VarFromDateTime(TSQLTimeStampField(fField).AsDateTime) else
+    {$ENDIF}
+    {$IFDEF ftFMTBCD_Support}
+      if fField is TFMTBCDField then result := DecimalToString(BCDToDecimal(TFMTBCDField(fField).AsBCD),DecimalSeparator) else
+    {$ENDIF}
+    {$IFDEF DELPHI10UP}
+      if fField is TWideMemoField then result := TWideMemoField(fField).Value else
+    {$ENDIF DELPHI10UP}
+      result := fField.Value;
+  end
+  else result := Null;
+end;
+
+procedure TDACustomField.SetValue(const Value: Variant);
+var
+  aDecimal: TDecimal;
+begin
+  if Assigned(fField) then begin
+    {$IFNDEF FPC}
+    if (fField is TWideStringField) and not VarIsNull( Value ) then
+      TWideStringField(fField).Value := Value else
+    {$ENDIF}
+    {$IFDEF DELPHI10UP}
+    if (fField is TWideMemoField) and not VarIsNull( Value ) then
+      fField.AsWideString := Value else
+    {$ENDIF DELPHI10UP}
+    if (fField is TLargeintField) and not VarIsNull( Value ) then
+      TLargeintField(fField).Value := Value else
+    if DataType = datDecimal then begin
+      if VarByteArrayToDecimal(Value,aDecimal) then
+        SetAsDecimal(DecimalToBCD(aDecimal))
+      else
+        SetAsDecimal(VariantToBCD(Value))
+      end
+    else
+      fField.Value := Value
+  end
+  else RaiseError(err_FieldIsNotBound);
+end;
+
+procedure TDACustomField.Bind(aField: TField);
+begin
+  FNativeField:= nil;
+  fField := aField;
+
+  if Assigned(fField) then begin
+    fField.DisplayLabel := DisplayLabel;
+    fField.DisplayWidth := DisplayWidth;
+    {$IFNDEF FPC}
+    fField.EditMask := EditMask;
+    {$ENDIF FPC}
+    fField.ReadOnly := ReadOnly;
+    fField.Required := Required;
+    fField.Visible := Visible;
+    fField.Alignment := Alignment;
+
+    if (fField is TNumericField) then begin
+      TNumericField(fField).DisplayFormat := DisplayFormat;
+      TNumericField(fField).EditFormat := EditFormat;
+    end
+
+    else if (fField is TDateTimeField) then begin
+      TDateTimeField(fField).DisplayFormat := DisplayFormat
+    end
+{$IFDEF ftFMTBCD_Support}
+    else if (fField is TFMTBCDField) then begin
+      TFMTBCDField(fField).Precision := DecimalPrecision;
+      TFMTBCDField(fField).Size := DecimalScale;
+    end
+{$ENDIF}
+    else if (fField is TBCDField) then begin
+      TBCDField(fField).Precision := DecimalPrecision;
+      TBCDField(fField).Size := DecimalScale;
+    end
+    else if (fField is TBlobField) then begin
+{$IFDEF DA_WideMemoSupport}
+      if TBlobField(fField).BlobType <> ftWideMemo then
+{$ENDIF DA_WideMemoSupport}
+        if Datatype = datMemo then
+          TBlobField(fField).BlobType := ftMemo
+        else
+          TBlobField(fField).BlobType := BlobTypeMappings[BlobType];
+    end;
+
+    fField.OnValidate := InternalOnValidate;
+    fField.OnChange := InternalOnChange;
+
+    {fField.Lookup := Lookup;
+    if (LookupSource<>NIL) then
+      with TDADataSource(LookupSource) do
+        if Assigned(DataTable)
+          then fField.LookupDataSet := DataTable.Dataset;
+
+    fField.LookupKeyFields := LookupKeyFields;
+    fField.LookupCache := LookupCache;
+    fField.LookupResultField := LookupResultField;
+    fField.KeyFields := KeyFields;}
+  end;
+end;
+
+procedure TDACustomField.Unbind;
+begin
+  if (fField=NIL) then Exit;
+
+  fField.OnChange := nil;
+  fField.OnSetText := nil;
+  fField.OnGetText := nil;
+  fField.OnValidate := nil;
+
+  fField := nil;
+end;
+
+function TDACustomField.GetTableField: string;
+begin
+  result := fTableField
+end;
+
+procedure TDACustomField.SetTableField(const Value: string);
+begin
+  fTableField := Value;
+end;
+
+procedure TDACustomField.SetName(const Value: string);
+var
+  updatesc: boolean;
+begin
+  updatesc := (fTableField = '') or (fTableField = Name);
+
+  inherited;
+
+  if updatesc then fTableField := Value;
+end;
+
+function TDACustomField.GetCustomAttributes: TStrings;
+begin
+  if not HasValidDictionaryField then
+    result := fCustomAttributes
+  else
+    result := GetDictionaryField().fCustomAttributes;
+end;
+
+procedure TDACustomField.SetCustomAttributes(const Value: TStrings);
+begin
+  fCustomAttributes.Assign(Value);
+end;
+
+procedure TDACustomField.Assign(Source: TPersistent);
+begin
+  if (Source is TDACustomField) then begin
+    AssignField(TDACustomField(Source));
+  end
+  else begin
+    inherited;
+  end;
+end;
+
+procedure TDACustomField.AssignField(Source: TDABaseField);
+var
+  lSource: TDACustomField;
+begin
+  inherited;
+  lSource := TDACustomField(Source);
+
+  fField := nil; { Assigned DAField will always be unbound }
+  fTableField := lSource.fTableField;
+  fRequired := lSource.fRequired;
+  fInPrimaryKey := lSource.fInPrimaryKey;
+  fRegExpression := lSource.fRegExpression;
+  fDefaultValue := lSource.fDefaultValue;
+  fDictionaryEntry := lSource.fDictionaryEntry;
+  fDisplayWidth := lSource.fDisplayWidth;
+  fDisplayLabel := lSource.fDisplayLabel;
+  fDisplayFormat := lSource.DisplayFormat;
+
+  fReadOnly := lSource.fReadOnly;
+  fVisible := lSource.fVisible;
+  fEditMask := lSource.fEditMask;
+  fLogChanges := lSource.fLogChanges;
+  fCalculated := lSource.fCalculated;
+  fServerCalculated := lSource.fServerCalculated;
+
+  fEditFormat := lSource.EditFormat;
+  fAlignment := lSource.Alignment;
+
+  fOnChange := lSource.OnChange;
+  {fOnGetText  := lSource.OnGetText;
+  fOnSetText  := lSource.OnSetText;}
+  fOnValidate := lSource.OnValidate;
+
+  fLookupCache := lSource.LookupCache;
+  fLookupKeyFields := lSource.LookupKeyFields;
+  fLookupResultField := lSource.LookupResultField;
+  fKeyFields := lSource.KeyFields;
+  fLookupSource := lSource.LookupSource;
+  fLookup := lSource.Lookup;
+
+  //fCustomAttributes.Assign(lSource.fCustomAttributes);
+  fCustomAttributes.Text := lSource.fCustomAttributes.Text;
+
+  fServerAutoRefresh := lSource.ServerAutoRefresh;
+  fGeneratorName := lSource.GeneratorName;
+
+  fBusinessClassID := lSource.BusinessClassID;
+end;
+
+procedure TDACustomField.InternalOnChange(Sender: TField);
+begin
+  if not (Collection as TDACustomFieldCollection).FieldEventsDisabled then
+  begin
+    if assigned(TDACustomFieldCollection(Collection).OnFieldAfterUpdate) then
+      TDACustomFieldCollection(Collection).OnFieldAfterUpdate(Self);
+    if Assigned(fOnChange) then
+      fOnChange(Self);
+  end;
+end;
+
+procedure TDACustomField.InternalOnValidate(Sender: TField);
+begin
+  if not (Collection as TDACustomFieldCollection).FieldEventsDisabled then
+  begin
+    if assigned(TDACustomFieldCollection(Collection).OnFieldBeforeUpdate) then
+      TDACustomFieldCollection(Collection).OnFieldBeforeUpdate(Self);
+    if Assigned(fOnValidate) then
+      fOnValidate(Self);
+  end;
+end;
+
+function TDACustomField.IsCompatibleV4: boolean;
+begin
+  if Assigned(FieldCollection) then
+    Result := FieldCollection.IsCompatibleV4
+  else
+    Result := inherited IsCompatibleV4;
+end;
+
+procedure TDACustomField.SetDisplayLabel(const aValue: string);
+begin
+  fDisplayLabel := aValue;
+  if Assigned(fField) then fField.DisplayLabel := aValue;
+end;
+
+procedure TDACustomField.SetRequired(const aValue: boolean);
+begin
+  fRequired := aValue;
+  if Assigned(fField) then fField.Required := aValue;
+end;
+
+procedure TDACustomField.SetVisible(const aValue: boolean);
+begin
+  fVisible := aValue;
+  if Assigned(fField) then fField.Visible := aValue;
+end;
+
+procedure TDACustomField.SetDisplayWidth(const aValue: integer);
+begin
+  fDisplayWidth := aValue;
+  if Assigned(fField) then fField.DisplayWidth := aValue;
+end;
+
+procedure TDACustomField.SetEditMask(const aValue: string);
+begin
+  fEditMask := aValue;
+  {$IFNDEF FPC}
+  if Assigned(fField) then fField.EditMask := aValue;
+  {$ENDIF}
+end;
+
+procedure TDACustomField.SetReadOnly(const aValue: boolean);
+begin
+  fReadOnly := aValue;
+  if Assigned(fField) then fField.ReadOnly := aValue;
+end;
+
+procedure TDACustomField.SetDisplayFormat(const Value: string);
+begin
+  fDisplayFormat := Value;
+  if Assigned(fField) then begin
+    if (fField is TNumericField) then
+      TNumericField(fField).DisplayFormat := Value
+    else if (fField is TDateTimeField) then
+      TDateTimeField(fField).DisplayFormat := Value;
+  end;
+end;
+
+
+function TDACustomField.StoredExpression: Boolean;
+begin
+  Result:= not IsCompatibleV4;
+end;
+
+function TDACustomField.StoreDisplayLabel: Boolean;
+begin
+  result := MergeDatadictionaries or (not HasValidDictionaryField()) and (fDisplayLabel <> '') and (fDisplayLabel <> Name);
+end;
+
+
+function TDACustomField.StoredServerCalculated: Boolean;
+begin
+  Result:= not IsCompatibleV4;
+end;
+
+function TDAField.GetDisplayName: string;
+begin
+  result := Format('%s [%s, %d', [fName, GetEnumName(TypeInfo(TDADataType), Ord(DataType)), Size]);
+
+  if Required then
+    result := result+', REQUIRED';
+
+  result := result+']'
+end;
+
+function TDACustomField.GetOwner: TPersistent;
+begin
+  result := Collection;
+end;
+
+function TDACustomField.GetNamePath: string;
+begin
+  if (Collection <> nil) and (Collection.Owner <> nil) and (Collection.Owner is TComponent) then
+    result := TComponent(Collection.Owner).Name + '.' + FName
+  else
+    result := FName;
+end;
+
+procedure TDACustomField.SetAlignment(const Value: TAlignment);
+begin
+  fAlignment := Value;
+  if Assigned(fField) then fField.Alignment := Value;
+end;
+
+procedure TDACustomField.SetEditFormat(const Value: string);
+begin
+  fEditFormat := Value;
+
+  if Assigned(fField) then begin
+    if (fField is TNumericField) then TNumericField(fField).EditFormat := Value
+  end;
+end;
+
+procedure TDACustomField.SetKeyFields(const Value: string);
+begin
+  fKeyFields := Value;
+  if Assigned(fField)
+    then fField.KeyFields := Value;
+end;
+
+procedure TDACustomField.SetLookupCache(const Value: boolean);
+begin
+  fLookupCache := Value;
+  if Assigned(fField)
+    then fField.LookupCache := Value;
+end;
+
+procedure TDACustomField.SetLookupKeyFields(const Value: string);
+begin
+  fLookupKeyFields := Value;
+  if Assigned(fField)
+    then fField.LookupKeyFields := Value;
+end;
+
+procedure TDACustomField.SetLookupResultField(const Value: string);
+begin
+  fLookupResultField := Value;
+  if Assigned(fField)
+    then fField.LookupResultField := Value;
+end;
+
+type
+  THackField = class(TField)
+  end;
+
+procedure TDACustomField.SetLookupSource(const Value: TDataSource);
+begin
+  if Assigned(Value) and not (Value is TDABaseDataSource) then raise Exception.Create('LookupSource must be a TDADataSource');
+
+  fLookupSource := Value;
+  if Assigned(fField) then
+    if Assigned(Value)
+      then fField.LookupDataSet := Value.DataSet
+      else THackField(fField).Notification(fField.LookupDataSet,opRemove);
+end;
+
+procedure TDACustomField.SetCalculated(const Value: boolean);
+begin
+  fCalculated := Value;
+  if Value then begin
+    fLookup := FALSE;
+    fServerCalculated := false;
+  end;
+end;
+
+procedure TDACustomField.SetLookup(const Value: boolean);
+begin
+  fLookup := Value;
+  if Value then begin
+    fCalculated := FALSE;
+  end;
+end;
+
+function TDACustomField.GetFieldCollection: TDACustomFieldCollection;
+begin
+  result := TDACustomFieldCollection(Collection);
+end;
+
+procedure TDACustomField.SetBlobType(const Value: TDABlobType);
+begin
+  inherited;
+
+  if Assigned(fField) and (fField is TBlobField)
+    then TBlobField(fField).BlobType := BlobTypeMappings[Value];
+end;
+
+function TDACustomField.GetServerAutoRefresh: boolean;
+begin
+  result := fServerAutoRefresh
+end;
+
+procedure TDACustomField.SetServerAutoRefresh(const Value: boolean);
+begin
+  fServerAutoRefresh := Value;
+end;
+
+function TDACustomField.GetLogChanges: boolean;
+begin
+  if not HasValidDictionaryField
+    then result := fLogChanges
+    else result := GetDictionaryField().fLogChanges;
+  result := Result and not (fCalculated or fLookup)
+end;
+
+function TDACustomField.StoreProperties: boolean;
+begin
+  result := MergeDatadictionaries or not HasValidDictionaryField();
+end;
+
+function TDACustomField.GetOldValue: Variant;
+begin
+  if Assigned(fField)
+    then result := fField.OldValue
+    else result := Unassigned;
+end;
+
+function TDACustomField.GetSQLOrigin: string;
+begin
+  if fSQLOrigin=''
+    then result := TableField
+    else result := fSQLOrigin;
+end;
+
+procedure TDACustomField.FocusControl;
+begin
+  if Assigned(fField)
+    then fField.FocusControl;
+end;
+
+{procedure TDACustomField.SetBusinessRulesID(const Value: string);
+begin
+  BusinessClassID := Value;
+end;
+
+function TDACustomField.GetBusinessRulesID: string;
+begin
+  result := BusinessClassID;
+end;}
+
+function TDACustomField.GetBusinessClassID: string;
+begin
+  if not HasValidDictionaryField
+    then result := fBusinessClassID
+    else result := GetDictionaryField().BusinessClassID;
+end;
+
+procedure TDACustomField.SetBusinessClassID(const Value: string);
+begin
+  fBusinessClassID := Value;
+end;
+
+procedure TDACustomField.LoadFromStream(const aStream: TStream);
+begin
+  if (fField<>nil) then begin
+    if (fField is TBlobField) then TBlobField(fField).LoadFromStream(aStream)
+  end
+  else RaiseError(err_FieldIsNotBound);
+end;
+
+procedure TDACustomField.SaveToStream(const aStream: TStream);
+begin
+  if (fField<>nil) then begin
+    if (fField is TBlobField) then TBlobField(fField).SaveToStream(aStream)
+  end
+  else RaiseError(err_FieldIsNotBound);
+end;
+
+function TDACustomField.GetBlobSize: Integer;
+begin
+  if fField is TBlobField then
+    result := TBlobField(fField).BlobSize
+  else
+    Result := 0;
+end;
+
+procedure TDACustomField.SetServerCalculated(const Value: Boolean);
+begin
+  fServerCalculated := Value;
+  if Value then begin
+    Readonly := True;
+    LogChanges := False;
+    Calculated := False;
+    InPrimaryKey := False;
+  end;
+end;
+
+procedure TDACustomField.SetExpression(const Value: string);
+begin
+  fExpression := Value;
+  if value <> '' then
+    Calculated := true; // will unset lookup & server calculated
+end;
+
+
+function TDACustomField.GetAsAnsiString: Ansistring;
+begin
+  if Assigned(fField) then
+    {$IFDEF DELPHI12UP}
+      {$IFNDEF DELPHI2009_USE_AsAnsiString_for_TStringField}
+      if fField.DataType = ftString then
+        Result := VarToAnsiStr(fField.Value)
+      else
+      {$ENDIF}
+        Result := fField.AsAnsiString
+    {$ELSE}
+    Result := fField.AsString
+    {$ENDIF}
+  else
+    Result := inherited GetAsAnsiString;
+end;
+
+function TDACustomField.GetAsBoolean: boolean;
+begin
+  if Assigned(fField) then begin
+    if fField is TNumericField then
+      Result:= fField.AsInteger <> 0
+    else
+      Result:= fField.AsBoolean;
+  end
+  else if Assigned(FNativeField) then begin
+    Result := GetVarBoolean(FNativeField.Value);
+  end
+  else begin
+    Result:= inherited GetAsBoolean;
+  end;
+end;
+
+function TDACustomField.GetAsCurrency: currency;
+begin
+  if Assigned(fField) then
+    Result:= fField.AsCurrency
+  else if Assigned(FNativeField) then
+    Result := GetVarCurrency(FNativeField.Value)
+  else
+    Result:= inherited GetAsCurrency;
+end;
+
+function TDACustomField.GetAsDateTime: TDateTime;
+begin
+  if Assigned(fField) then
+    Result:= fField.AsDateTime
+  else if Assigned(FNativeField) then
+    Result := GetVarDateTime(FNativeField.Value)
+  else
+    Result:= inherited GetAsDateTime;
+end;
+
+function TDACustomField.GetAsFloat: double;
+begin
+  if Assigned(fField) then
+    Result:= fField.AsFloat
+  else if Assigned(FNativeField) then
+    Result := GetVarFloat(FNativeField.Value)
+  else
+    Result:= inherited GetAsFloat;
+end;
+
+function TDACustomField.GetAsInteger: integer;
+begin
+  if Assigned(fField) then
+    Result:= fField.AsInteger
+  else if Assigned(FNativeField) then
+    Result := GetVarInteger(FNativeField.Value)
+  else
+    Result:= inherited GetAsInteger;
+end;
+
+function TDACustomField.GetAsLargeInt: int64;
+begin
+  if Assigned(fField) and (fField.DataType = ftLargeInt) then
+    Result:= TLargeintField(fField).AsLargeint
+  else if Assigned(FNativeField) then
+    Result := GetVarInt64(FNativeField.Value)
+  else
+    result:= inherited GetAsLargeInt;
+end;
+
+function TDACustomField.GetAsString: string;
+begin
+  if Assigned(fField) then
+    Result:= fField.AsString
+  else if Assigned(FNativeField) then
+    Result := GetVarString(FNativeField.Value)
+  else
+    Result:= inherited GetAsString;
+end;
+
+function TDACustomField.GetAsVariant: variant;
+begin
+  if Assigned(fField) then
+    Result:= fField.AsVariant
+  else if Assigned(FNativeField) then
+    Result := FNativeField.Value
+  else
+    Result:= inherited GetAsVariant;
+end;
+
+function TDACustomField.GetAsWideString: Widestring;
+begin
+  if Assigned(fField) and (fField.DataType = ftWideString) then begin
+    if GetIsNull then
+      Result:=''
+    else
+     {$IFNDEF FPC}
+      Result := TWideStringField(fField).Value;
+     {$ELSE}
+      REsult:= inherited GetAsWideString;
+     {$ENDIF}
+  end
+  {$IFDEF DA_WideMemoSupport}
+  else if Assigned(fField) and (fField.DataType = ftWideMemo) then
+    Result := TWideMemoField(fField).Value
+  {$ENDIF DA_WideMemoSupport}
+  else if Assigned(FNativeField) then
+    Result := GetVarWideString(FNativeField.Value)
+  else
+    Result := inherited GetAsWideString;
+end;
+
+function TDACustomField.GetIsNull: boolean;
+begin
+  if Assigned(fField) then
+    Result:= fField.IsNull
+  else if Assigned(FNativeField) then
+    Result:= FNativeField.IsNull
+  else
+    Result:= inherited GetIsNull;
+end;
+
+procedure TDACustomField.SetAsAnsiString(const aValue: Ansistring);
+begin
+  if Assigned(fField) then
+    {$IFDEF DELPHI12UP}
+    fField.AsAnsiString := aValue
+    {$ELSE}
+    fField.AsString := aValue
+    {$ENDIF}
+  else
+    inherited SetAsAnsiString(aValue);
+end;
+
+procedure TDACustomField.SetAsBoolean(const aValue: boolean);
+begin
+  if Assigned(fField) then begin
+    if fField is TNumericField then
+      fField.AsInteger := Ord(aValue)
+    else
+      fField.AsBoolean := aValue;
+  end
+  else begin
+    inherited SetAsBoolean(aValue);
+  end;
+end;
+
+procedure TDACustomField.SetAsCurrency(const aValue: currency);
+begin
+  if Assigned(fField) then
+    fField.AsCurrency := aValue
+  else
+    inherited SetAsCurrency(aValue);
+end;
+
+procedure TDACustomField.SetAsDateTime(const aValue: TDateTime);
+begin
+  if Assigned(fField) then
+    fField.AsDateTime := aValue
+  else
+    inherited SetAsDateTime(aValue);
+end;
+
+procedure TDACustomField.SetAsFloat(const aValue: double);
+begin
+  if Assigned(fField) then
+    fField.AsFloat := aValue
+  else
+    inherited SetAsFloat(aValue);  
+end;
+
+procedure TDACustomField.SetAsInteger(const aValue: integer);
+begin
+  if Assigned(fField) then 
+    fField.AsInteger := aValue
+  else
+    inherited SetAsInteger(aValue);  
+end;
+
+procedure TDACustomField.SetAsLargeInt(const aValue: Int64);
+begin
+  if Assigned(fField) and (fField.DataType = ftLargeInt) then
+    TLargeintField(fField).AsLargeInt := aValue
+  else
+    inherited SetAsLargeInt(aValue);
+end;
+
+procedure TDACustomField.SetAsString(const aValue: string);
+begin
+  if Assigned(fField) then
+    fField.AsString := aValue
+  else
+    inherited SetAsString(aValue);
+end;
+
+procedure TDACustomField.SetAsVariant(const aValue: variant);
+begin
+  if Assigned(fField) then
+    fField.AsVariant := aValue
+  else
+    inherited SetAsVariant(aValue);
+end;
+
+procedure TDACustomField.SetAsWideString(const aValue: Widestring);
+begin
+{$IFNDEF FPC}
+  if (fField<>nil) and (fField.DataType = ftWideString) then TWideStringField(fField).Value := aValue else
+{$ENDIF}
+{$IFDEF DA_WideMemoSupport}
+  if (fField<>nil) and (fField.DataType = ftWideMemo) then TWideMemoField(fField).Value := aValue else
+{$ENDIF}
+  inherited SetAsWideString(aValue);
+end;
+
+function TDACustomField.GetAsByte: Byte;
+begin
+  Result := GetAsSmallInt;
+end;
+
+function TDACustomField.GetAsCardinal: Cardinal;
+begin
+  Result := GetAsInteger;
+end;
+
+function TDACustomField.GetAsDecimal: TBcd;
+begin
+{$IFDEF ftFMTBCD_Support}
+  if Assigned(fField) and (fField.DataType = ftFmtBcd) then
+    result := TFMTBCDField(fField).AsBCD
+  else
+{$ENDIF}
+  if Assigned(fField) and (fField.DataType = ftBcd) then
+    {$IFNDEF FPC}
+    result := TBCDField(fField).AsBCD
+    {$ELSE}
+    Result := CurrToBCD(TBCDField(fField).Value)
+    {$ENDIF}
+  else if Assigned(FNativeField) then
+    Result := GetVarDecimal(FNativeField.Value)
+  else
+    result := inherited GetAsDecimal;
+end;
+
+function TDACustomField.GetAsGuid: TGUID;
+begin
+{$IFNDEF FPC}
+  if Assigned(fField) and (fField.DataType = ftGuid) then
+    result := TGuidField(fField).AsGuid
+  else
+{$ENDIF}
+  if Assigned(FNativeField) then
+    Result := GetVarGuid(GetAsString)
+  else
+    result := inherited GetAsGuid;
+end;
+
+function TDACustomField.GetAsLargeUInt: UInt64;
+begin
+  if Assigned(FNativeField) then
+    Result := GetVarLargeUInt(FNativeField.Value)
+  else
+    result := inherited GetAsLargeUInt;
+end;
+
+function TDACustomField.GetAsShortInt: ShortInt;
+begin
+  if Assigned(FNativeField) then
+    Result := GetVarShortInt(FNativeField.Value)
+  else
+    Result := GetAsSmallInt;
+end;
+
+function TDACustomField.GetAsSingle: Single;
+begin
+  if Assigned(fField) then
+    result := fField.AsFloat
+  else if Assigned(FNativeField) then
+    Result := GetVarSingleFloat(FNativeField.Value)
+  else
+    Result := inherited GetAsSingle;
+end;
+
+function TDACustomField.GetAsSmallInt: SmallInt;
+begin
+  if Assigned(fField) and (fField.DataType = ftSmallint) then
+    result := TSmallintField(fField).Value
+  else if Assigned(FNativeField) then
+    Result := GetVarSmallInt(FNativeField.Value)
+  else
+    result := inherited GetAsSmallInt;
+end;
+
+function TDACustomField.GetAsWord: Word;
+begin
+  if Assigned(fField) and (fField.DataType = ftWord) then
+    result := TWordField(fField).AsInteger
+  else if Assigned(FNativeField) then
+    Result := GetVarWord(FNativeField.Value)
+  else
+    result := inherited GetAsWord;
+end;
+
+function TDACustomField.GetAsXml: IXMLNode;
+var
+  s: string;
+  lDoc: IXMLDocument;
+begin
+  s := GetAsWideString;
+  if s = '' then result := nil else begin
+    lDoc := NewROXmlDocument;
+    lDoc.New;
+    lDoc.XML := s;
+    Result := lDoc.DocumentNode;
+  end;
+end;
+
+procedure TDACustomField.SetAsByte(const Value: Byte);
+begin
+  SetAsSmallInt(Value);
+end;
+
+procedure TDACustomField.SetAsCardinal(const Value: Cardinal);
+begin
+  SetAsInteger(Value);
+end;
+
+procedure TDACustomField.SetAsDecimal(const Value: TBcd);
+{$IFDEF FPC}
+var
+  lCur: Currency;
+{$ENDIF}
+begin
+{$IFDEF ftFMTBCD_Support}
+  if (fField<>nil) and (fField.DataType = ftFMTBcd) then
+    TFMTBCDField(fField).AsBCD := Value
+  else
+{$ENDIF}
+  if (fField<>nil) and (fField.DataType = ftBcd) then begin
+    {$IFNDEF FPC}
+    TBCDField(fField).AsBCD := Value
+    {$ELSE}
+    lCur := 0;
+    if BCDToCurr(Value, lCur) then
+      TBCDField(fField).Value := lCur
+    else
+      TBCDField(fField).AsFloat := BCDToDouble(Value)
+    {$ENDIF}
+  end
+  else
+    inherited SetAsDecimal(Value);
+end;
+
+procedure TDACustomField.SetAsGuid(const Value: TGUID);
+begin
+{$IFNDEF FPC}
+  if (fField<>nil) and (fField.DataType = ftGuid) then
+    TGuidField(fField).AsGuid := Value
+  else
+{$ENDIF}
+    inherited SetAsGuid(Value);
+end;
+
+procedure TDACustomField.SetAsLargeUInt(const Value: UInt64);
+begin
+  SetAsLargeUInt(Value);
+end;
+
+procedure TDACustomField.SetAsShortInt(const Value: ShortInt);
+begin
+  SetAsSmallInt(Value);
+end;
+
+procedure TDACustomField.SetAsSingle(const Value: Single);
+begin
+  if Assigned(fField) then 
+    SetAsFloat(Value)
+  else
+    inherited SetAsSingle(Value);  
+end;
+
+procedure TDACustomField.SetAsSmallInt(const Value: SmallInt);
+begin
+  if Assigned(fField) and (fField.DataType = ftSmallint) then
+    TSmallintField(fField).Value := Value
+  else
+    inherited SetAsSmallInt(Value);
+end;
+
+procedure TDACustomField.SetAsWord(const Value: Word);
+begin
+  if Assigned(fField) and (fField.DataType = ftWord) then
+    TWordField(fField).AsInteger := Value
+  else
+    inherited SetAsWord(Value);
+end;
+
+procedure TDACustomField.SetAsXml(const Value: IXMLNode);
+begin
+  if (Value = nil) then
+    AsVariant := Null
+  else begin
+    SetAsWideString(Value.Xml);
+  end;
+end;
+
+procedure TDACustomField.SetDecimalPrecision(const Value: Integer);
+begin
+  inherited;
+  if Assigned(fField) then begin
+{$IFDEF ftFMTBCD_Support}
+    if fField is TFMTBCDField then TFMTBCDField(fField).Precision:=Value
+    else
+{$ENDIF}
+      if fField is TBCDField then TBCDField(fField).Precision:=Value;
+  end;
+end;
+
+function TDACustomField.GetDecimalPrecision: Integer;
+begin
+  Result:=inherited GetDecimalPrecision;
+  if Assigned(fField) then begin
+{$IFDEF ftFMTBCD_Support}
+    if fField is TFMTBCDField then Result := TFMTBCDField(fField).Precision
+    else
+{$ENDIF}
+      if fField is TBCDField then Result := TBCDField(fField).Precision;
+  end;
+end;
+
+function TDACustomField.GetDecimalScale: Integer;
+begin
+  Result:=inherited GetDecimalScale;
+  if Assigned(fField) then begin
+{$IFDEF ftFMTBCD_Support}
+    if fField is TFMTBCDField then Result := TFMTBCDField(fField).Size
+    else
+{$ENDIF}
+     if fField is TBCDField then Result := TBCDField(fField).Size;
+  end;
+end;
+
+procedure TDACustomField.SetDecimalScale(const Value: Integer);
+begin
+  inherited;
+  if Assigned(fField) then begin
+{$IFDEF ftFMTBCD_Support}
+    if fField is TFMTBCDField then TFMTBCDField(fField).Size:=Value
+    else
+{$ENDIF}
+    if fField is TBCDField then TBCDField(fField).Size:=Value;
+  end;
+end;
+
+procedure TDACustomField.Bind(aField: IDANativeField);
+begin
+  {$IFDEF Drivers_CompatibilityMode}
+  if aField.isTFieldCompatible then
+    Self.Bind(TField(aField.GetNativeObject))
+  else
+  {$ENDIF}
+  begin
+    if Assigned(aField) then begin
+      {$IFNDEF Drivers_CompatibilityMode}
+      if aField.isTFieldCompatible then fField := TField(aField.GetNativeObject);
+      {$ENDIF}
+      if DataType in [datFloat, datCurrency, datAutoInc, datInteger, datLargeInt,
+                      datShortInt, datWord, datSmallInt, datCardinal, datLargeUInt,
+                      datDecimal, datSingleFloat] then begin
+        aField.DecimalPrecision := DecimalPrecision;
+        aField.DecimalScale     := DecimalScale;
+      end;
+      if DataType in [datBlob,datMemo,datWideMemo] then
+        {$IFDEF DA_WideMemoSupport}
+        if aField.DataType <> ftWideMemo then
+        {$ENDIF}
+          if BlobType <> dabtUnknown then
+            aField.DataType := BlobTypeMappings[BlobType];
+    end;
+  end;
+  fNativeField := aField;
+end;
+
+{ TDACustomFieldCollection }
+
+constructor TDACustomFieldCollection.Create(aOwner: TPersistent; aFieldClass: TDAFieldClass);
+begin
+  inherited Create(aOwner, aFieldClass);
+end;
+
+function TDACustomFieldCollection.Add: TDAField;
+begin
+  result := TDAField(inherited Add);
+end;
+
+function TDACustomFieldCollection.Add(const aName: string; aType: TDADataType; aSize: integer): TDACustomField;
+begin
+  result := Add;
+  result.Name := aName;
+  result.DataType := aType;
+  result.Size := aSize;
+end;
+
+procedure TDACustomFieldCollection.Bind(aDataset: TDataset);
+var
+  i: integer;
+  lDAField: TDACustomField;
+  lField: TField;
+begin
+  Check(aDataset = nil, err_InvalidDataset);
+  try
+    for i := 0 to (Count - 1) do begin
+      lDAField := Fields[i];
+      lField := aDataset.FindField(lDAField.SQLOrigin);
+      if (not Assigned(lField)) and (not lDAField.Calculated) and not (lDAField.ServerCalculated) and not (lDAField.Lookup) then
+        RaiseError(err_CannotFindField, [lDAField.SQLOrigin])
+      else
+        lDAField.Bind(lField);
+    end;
+  except
+    Unbind;
+    raise;
+  end;
+end;
+
+procedure TDACustomFieldCollection.Assign(Source: TPersistent);
+begin
+  if (Source is TDACustomFieldCollection) then begin
+    AssignFieldCollection(TDACustomFieldCollection(Source));
+  end
+  else
+    inherited;
+end;
+
+procedure TDACustomFieldCollection.AssignFieldCollection(Source: TDACustomFieldCollection);
+var
+  i: integer;
+  src: TDACustomFieldCollection;
+  fld: TDAField;
+begin
+  src := TDACustomFieldCollection(Source);
+
+  Clear;
+
+  if not Assigned(Source) then Exit;
+
+  for i := 0 to (src.Count - 1) do begin
+    fld := Add;
+    fld.AssignField(src[i]);
+  end;
+end;
+
+function TDACustomFieldCollection.FieldByName(const aName: string): TDACustomField;
+begin
+  result := TDACustomField(inherited ItemByName(aName))
+end;
+
+function TDACustomFieldCollection.FindField(const aName: string): TDACustomField;
+begin
+  result := TDACustomField(inherited FindItem(aName))
+end;
+
+function TDACustomFieldCollection.GetFields(Index: integer): TDACustomField;
+begin
+  result := TDACustomField(inherited Items[Index])
+end;
+
+procedure TDACustomFieldCollection.SetFields(Index: integer; const Value: TDACustomField);
+begin
+  Fields[Index].Assign(Value);
+end;
+
+procedure TDACustomFieldCollection.Unbind;
+var
+  i: integer;
+begin
+  for i := 0 to (Count - 1) do
+    Fields[i].Unbind;
+end;
+
+function TDACustomFieldCollection.GetItemName(
+  anItem: TCollectionItem): string;
+begin
+  Result:= TDACustomField(anItem).Name;
+end;
+
+function TDACustomFieldCollection.SetItemName(anItem: TCollectionItem;
+  const aName: string): string;
+begin
+  TDACustomField(anItem).Name := aName;
+end;
+
+procedure TDACustomFieldCollection.Bind(
+  aNativeObject: IDASQLCommandNativeObject);
+var
+  i: integer;
+  lDAField: TDACustomField;
+  lField: IDANativeField;
+begin
+{$IFDEF Drivers_CompatibilityMode}
+  if (aNativeObject <> nil) and aNativeObject.IsTDatasetCompatible then
+    Bind(TDataset(aNativeObject.NativeObject))
+  else
+{$ENDIF}
+    try
+      for i := 0 to (Count - 1) do begin
+        lDAField := Fields[i];
+        lField := aNativeObject.NativeFindField(lDAField.SQLOrigin);
+        if (not Assigned(lField)) and (not lDAField.Calculated) and not (lDAField.ServerCalculated) and not (lDAField.Lookup) then
+          RaiseError(err_CannotFindField, [lDAField.SQLOrigin])
+        else if Assigned(lField) then 
+          lDAField.Bind(lField);
+      end;
+    except
+      Unbind;
+      raise;
+    end;
+end;
+
+{ TDAFieldCollection }
+
+constructor TDAFieldCollection.Create(aOwner: TPersistent);
+begin
+  inherited Create(aOwner, TDAField);
+end;
+
+function TDAFieldCollection.FieldByName(const aName: string): TDAField;
+begin
+  result := TDAField(inherited ItemByName(aName))
+end;
+
+function TDAFieldCollection.FindField(const aName: string): TDAField;
+begin
+  result := TDAField(inherited FindItem(aName))
+end;
+
+function TDAFieldCollection.GetFields(Index: integer): TDAField;
+begin
+  result := TDAField(inherited Items[Index])
+end;
+
+procedure TDAFieldCollection.SetFields(Index: integer; const Value: TDAField);
+begin
+  Fields[Index].Assign(Value);
+end;
+
+{ TDAParam }
+
+function TDAParam.GetParamType: TDAParamType;
+begin
+  result := fParamType;
+end;
+
+procedure TDAParam.LoadFromFile(const aFileName: string);
+begin
+  LoadFromStream(NewROStream(TFileStream.Create(aFileName, fmOpenRead), TRUE));
+end;
+
+procedure TDAParam.SaveToFile(const aFileName: string);
+begin
+  SaveToStream(NewROStream(TFileStream.Create(aFileName, fmCreate), TRUE));
+end;
+
+procedure TDAParam.LoadFromStream(const aStream: IROStream);
+begin
+  Value := VariantBinaryFromRawBinary(aStream.Stream);
+end;
+
+procedure TDAParam.SaveToStream(const aStream: IROStream);
+begin
+  VariantBinaryToRawBinary(Value, aStream.Stream);
+end;
+
+procedure TDAParam.SetParamType(Value: TDAParamType);
+begin
+  fParamType := Value;
+end;
+
+procedure TDAParam.AssignField(Source: TDABaseField);
+begin
+  inherited;
+  if Source is TDAParam then
+    ParamType := TDAParam(Source).ParamType;
+end;
+
+procedure TDAParam.SetValue(const aValue: Variant);
+var
+  d: TDecimal;
+begin
+  if (DataType = datDecimal) and VarByteArrayToDecimal(aValue,d) then
+    asString := DecimalToString(d,DecimalSeparator)
+  else
+    inherited SetValue(aValue);
+end;
+
+procedure TDAParam.AssignParam(Source: TDAParam);
+begin
+  inherited AssignField(Source);
+  ParamType := Source.ParamType;
+end;
+
+{ TDAParamCollection }
+
+function TDAParamCollection.Add: TDAParam;
+begin
+  result := TDAParam(inherited Add)
+end;
+
+constructor TDAParamCollection.Create(aOwner: TPersistent);
+begin
+  inherited Create(aOwner, TDAParam);
+end;
+
+function TDAParamCollection.FindParam(
+  const aParamName: string): TDAParam;
+begin
+  result := TDAParam(inherited FindItem(aParamName));
+end;
+
+function TDAParamCollection.GetParams(Index: integer): TDAParam;
+begin
+  result := TDAParam(inherited Items[Index])
+end;
+
+function TDAParamCollection.ParamByName(const aName: string): TDAParam;
+begin
+  result := TDAParam(inherited ItembyName(aName))
+end;
+
+procedure TDAParamCollection.ReadValues(InputParams: TParams);
+var
+  i: integer;
+  par: TDAParam;
+begin
+  for i := 0 to (Count - 1) do begin
+    par := Params[i];
+    par.Value := InputParams.ParamByName(par.Name).Value;
+  end;
+end;
+
+procedure TDAParamCollection.SetParams(Index: integer; const Value: TDAParam);
+begin
+  Params[Index].Assign(Value);
+end;
+
+procedure TDAParamCollection.WriteValues(OutputParams: TParams);
+var
+  i: integer;
+  par: TDAParam;
+  outpar: TParam;
+begin
+  for i := 0 to (Count - 1) do begin
+    par := Params[i];
+    outpar := OutputParams.ParamByName(par.Name);
+    if par.DataType = datBlob then begin
+      outpar.DataType := ftBlob;
+      outpar.Value := VariantBinaryToString(par.Value);
+      { ToDo: make sure this is valid for ALL Data Drivers, only tested with IBX so far. mh. }
+    end
+    else begin
+      outpar.Value := par.Value;
+    end;
+    //outpar.Size := par.Size; // Seems to fix an ADO problem with size of parameters with SDAC
+  end;
+end;
+
+procedure TDAParamCollection.Assign(Source: TPersistent);
+begin
+  if (Source is TDAParamCollection) then begin
+    AssignParamCollection(TDAParamCollection(Source))
+  end
+  else
+    inherited;
+end;
+
+procedure TDAParamCollection.AssignParamCollection(Source: TDAParamCollection);
+var
+  i: integer;
+begin
+  Clear;
+  for i := 0 to (Source.Count - 1) do
+    Add.AssignParam(Source[i]);
+end;
+
+function TDAParamCollection.GetHasInputParams: boolean;
+var
+  i: Integer;
+begin
+  result := false;
+  for i := 0 to Count-1 do begin
+    if Params[i].ParamType in [daptUnknown, daptInput, daptInputOutput] then begin
+      result := true;
+      exit;
+    end;
+  end; { for }
+end;
+
+function TDAParamCollection.GetItemName(anItem: TCollectionItem): string;
+begin
+  Result := TDAParam(anItem).Name;
+end;
+
+function TDAParamCollection.SetItemName(anItem: TCollectionItem;
+  const aName: string): string;
+begin
+  TDAParam(anItem).Name := aName;
+end;
+
+{ TDASQLCommand }
+
+procedure TDASQLCommand.Assign(aSource: TPersistent);
+var
+  lSource: TDASQLCommand;
+begin
+  if (aSource is TDASQLCommand) then begin
+    lSource := TDASQLCommand(aSource);
+    fName := lSource.fName;
+    fDescription := lSource.fDescription;
+    fStatements.Assign(lSource.fStatements);
+    fParams.Assign(lSource.fParams);
+    fCustomAttributes.Assign(lSource.CustomAttributes);
+    FDynamicWhereXML := lSource.FDynamicWhereXML;
+  end
+  else begin
+    inherited;
+  end;
+end;
+
+constructor TDASQLCommand.Create(Collection: TCollection);
+begin
+  inherited;
+  fIsPublic := true;
+  fStatements := TDAStatementCollection.Create(nil, Self);
+  fParams := TDAParamCollection.Create(nil);
+  fCustomAttributes := TStringList.Create;
+end;
+
+destructor TDASQLCommand.Destroy;
+begin
+  fCustomAttributes.Free;
+  fStatements.Free;
+  fParams.Free;
+
+  inherited;
+end;
+
+function TDASQLCommand.GetDisplayName: string;
+begin
+  result := Name;
+end;
+
+function TDASQLCommand.GetParams: TDAParamCollection;
+begin
+  result := fParams;
+end;
+
+function TDASQLCommand.GetSQLCommandCollection: TDASQLCommandCollection;
+begin
+  result := TDASQLCommandCollection(Collection);
+end;
+
+function TDASQLCommand.ParamByName(const aName: string): TDAParam;
+begin
+  result := fParams.ParamByName(aName)
+end;
+
+procedure TDASQLCommand.SetCustomAttributes(const Value: TStrings);
+begin
+  fCustomAttributes.Assign(Value);
+end;
+
+procedure TDASQLCommand.SetDisplayName(const Value: string);
+begin
+  inherited;
+  SetName(Value);
+end;
+
+procedure TDASQLCommand.SetName(const Value: string);
+var
+  lOldName: string;
+begin
+  lOldName := fName;
+  fName := Value;
+  if lOldName <> '' then
+    (Collection as TSearcheableCollection).TriggerOnItemRenamed(lOldName, fName);
+end;
+
+procedure TDASQLCommand.SetParams(const Value: TDAParamCollection);
+begin
+  fParams.Assign(Value);
+end;
+
+procedure TDASQLCommand.SetStatements(const Value: TDAStatementCollection);
+begin
+  fStatements.Assign(Value);
+end;
+
+function TDASQLCommand.GetStatements(): TDAStatementCollection;
+begin
+  result := fStatements;
+end;
+
+
+procedure TDASQLCommand.SetDynamicWhereXML(const Value: WideString);
+begin
+  FDynamicWhereXML := Value;
+end;
+
+{ TDADataset }
+
+procedure TDADataset.Assign(aSource: TPersistent);
+var
+  lSource: TDADataset;
+begin
+  if (aSource is TDADataset) then begin
+    inherited; { Need to work the TDASQLCommand, too}
+    lSource := TDADataset(aSource);
+    fFields.Assign(lSource.Fields);
+  end
+  else begin
+    inherited;
+  end;
+end;
+
+constructor TDADataset.Create(Collection: TCollection);
+begin
+  inherited;
+  fFields := TDAFieldCollection.Create(self);
+  fBusinessRulesServer := TDABusinessRuleScript.Create();
+  fBusinessRulesClient := TDAClientBusinessRuleScript.Create();
+end;
+
+destructor TDADataset.Destroy;
+begin
+  FreeAndNil(fFields);
+  FreeAndNil(fBusinessRulesServer);
+  FreeAndNil(fBusinessRulesClient);
+  inherited;
+end;
+
+function TDADataset.FieldByName(const aName: string): TDAField;
+begin
+  result := Fields.FieldByName(aName)
+end;
+
+function TDADataset.FindField(const aName: string): TDAField;
+begin
+  result := Fields.FindField(aName)
+end;
+
+procedure TDADataset.SetBusinessRulesClient(const Value: TDAClientBusinessRuleScript);
+begin
+  fBusinessRulesClient.Assign(Value);
+end;
+
+procedure TDADataset.SetBusinessRulesServer(const Value: TDABusinessRuleScript);
+begin
+  fBusinessRulesServer.Assign(Value);
+end;
+
+procedure TDADataset.SetFields(const Value: TDAFieldCollection);
+begin
+  fFields.Assign(Value);
+end;
+
+{ TDASQLCommandCollection }
+
+function TDASQLCommandCollection.Add: TDASQLCommand;
+begin
+  result := TDASQLCommand(inherited Add)
+end;
+
+constructor TDASQLCommandCollection.Create(aOwner: TComponent);
+begin
+  inherited Create(aOwner, GetItemClass);
+end;
+
+function TDASQLCommandCollection.GetItemClass: TDASQLCommandClass;
+begin
+  result := TDASQLCommand;
+end;
+
+function TDASQLCommandCollection.GetItemName(
+  anItem: TCollectionItem): string;
+begin
+  Result := TDASQLCommand(anItem).Name;
+end;
+
+function TDASQLCommandCollection.GetSQLCommands(
+  Index: integer): TDASQLCommand;
+begin
+  result := TDASQLCommand(inherited Items[Index]);
+end;
+
+function TDASQLCommandCollection.SetItemName(anItem: TCollectionItem;
+  const aName: string): string;
+begin
+  TDASQLCommand(anItem).Name := aName;
+end;
+
+procedure TDASQLCommandCollection.SetSQLCommands(Index: integer;
+  const Value: TDASQLCommand);
+begin
+  SQLCommands[Index].Assign(Value);
+end;
+
+function TDASQLCommandCollection.SQLCommandByName(
+  const aName: string): TDASQLCommand;
+begin
+  result := TDASQLCommand(inherited ItemByName(aName));
+end;
+
+{ TDADatasetCollection }
+
+function TDADatasetCollection.Add: TDADataset;
+begin
+  result := TDADataset(inherited Add);
+end;
+
+function TDADatasetCollection.DatasetByName(const aName: string): TDADataset;
+begin
+  result := TDADataset(inherited ItemByName(aName));
+end;
+
+function TDADatasetCollection.FindDatasetByName(const aName: string): TDADataset;
+begin
+  result := TDADataset(inherited FindItem(aName));
+end;
+
+function TDADatasetCollection.GetDatasets(Index: integer): TDADataset;
+begin
+  result := TDADataset(inherited Items[Index]);
+end;
+
+function TDADatasetCollection.GetItemClass: TDASQLCommandClass;
+begin
+  result := TDADataset;
+end;
+
+procedure TDADatasetCollection.SetDatasets(Index: integer;
+  const Value: TDADataset);
+begin
+  Datasets[Index].Assign(Value);
+end;
+
+{ TDAConnectionCollection }
+
+function TDAConnectionCollection.Add: TDAConnection;
+begin
+  result := TDAConnection(inherited Add);
+end;
+
+procedure TDAConnectionCollection.ClearDefaults(iExceptFor: TDAConnection);
+var
+  i: integer;
+begin
+  for i := 0 to Count - 1 do begin
+    if (Connections[i] <> iExceptFor) then Connections[i].Default := false;
+  end;
+end;
+
+function TDAConnectionCollection.ConnectionByName(
+  const aName: string): TDAConnection;
+begin
+  result := TDAConnection(inherited ItemByName(aName));
+end;
+
+constructor TDAConnectionCollection.Create(aOwner: TPersistent);
+begin
+  inherited Create(aOwner, TDAConnection);
+end;
+
+function TDAConnectionCollection.FindConnection(const aName,
+  aType: string): TDAConnection;
+var
+  i: Integer;
+begin
+  if aName <> '' then begin
+    for i := 0 to Count -1 do begin
+      if GetConnections(i).Name = aName then begin
+        Result := GetConnections(i);
+        exit;
+      end;
+    end;
+  end;
+  if aType <> '' then begin
+    for i := 0 to Count -1 do begin
+      if GetConnections(i).ConnectionType = aType then begin
+        Result := GetConnections(i);
+        exit;
+      end;
+    end;
+  end;
+  result := nil;
+end;
+
+function TDAConnectionCollection.GetConnections(
+  Index: integer): TDAConnection;
+begin
+  result := TDAConnection(inherited Items[Index]);
+end;
+
+function TDAConnectionCollection.GetDefaultConnection: TDAConnection;
+begin
+  result := inherited GetDefaultItem as TDAConnection;
+end;
+
+function TDAConnectionCollection.GetItemName(
+  anItem: TCollectionItem): string;
+begin
+  Result := TDAConnection(anItem).Name;
+end;
+
+function TDAConnectionCollection.ItemName: string;
+begin
+  result := 'connection';
+end;
+
+procedure TDAConnectionCollection.SetConnections(Index: integer;
+  const Value: TDAConnection);
+begin
+  Connections[Index].Assign(Value);
+end;
+
+function TDAConnectionCollection.SetItemName(anItem: TCollectionItem;
+  const aName: string): string;
+begin
+  TDAConnection(anItem).Name := aName;
+end;
+
+{ TDAConnection }
+
+procedure TDAConnection.Assign(aSource: TPersistent);
+var
+  lSource: TDAConnection;
+begin
+  if (aSource is TDAConnection) then begin
+    lSource := TDAConnection(aSource);
+    fDescription := lSource.fDescription;
+    ConnectionString := lSource.ConnectionString;
+    ConnectionType := lSource.ConnectionType;
+    fName := '_____' + lSource.fName;
+    fDefault := false;
+  end
+  else begin
+    inherited;
+  end;
+end;
+
+function TDAConnection.GetConnectionString: string;
+begin
+  result := fConnectionString;
+end;
+
+function TDAConnection.GetDisplayName: string;
+begin
+  if (Trim(Name) = '') then
+    result := '<Noname>'
+  else
+    result := Name;
+
+  //if Default then result := result+' - [Default]';
+end;
+
+procedure TDAConnection.SetConnectionString(const aValue: string);
+begin
+  if fConnectionString <> aValue then
+    fConnectionString := aValue;
+end;
+
+procedure TDAConnection.SetDefault(const Value: boolean);
+begin
+  if (fDefault <> Value) then begin
+    fDefault := Value;
+    if Default then begin
+      (Collection as TDAConnectionCollection).ClearDefaults(self);
+    end;
+  end;
+end;
+
+procedure TDAConnection.SetDisplayName(const Value: string);
+begin
+  inherited;
+  SetName(Value);
+end;
+
+procedure TDAConnection.SetName(const Value: string);
+var
+  lOldName: string;
+begin
+  if (Value <> fName) then begin
+    lOldName := fName;
+    fName := Value;
+    if lOldName <> '' then
+      (Collection as TDAConnectionCollection).TriggerOnItemRenamed(lOldName, fName);
+  end;
+end;
+
+{ TDAStatement }
+
+procedure TDAStatement.Assign(aSource: TPersistent);
+var
+  lSource: TDAStatement;
+begin
+  if (aSource is TDAStatement) then begin
+    lSource := TDAStatement(aSource);
+    fSQL := lSource.fSQL;
+    fStatementType := lSource.fStatementType;
+    fConnection := lSource.fConnection;
+    fConnectionType := lSource.fConnectionType;    
+    fColumnMappings.Assign(lSource.fColumnMappings);
+    fTargetTable := lSource.fTargetTable;
+    fDefault := lSource.fDefault;
+  end
+  else begin
+    inherited;
+  end;
+end;
+
+constructor TDAStatement.Create(Collection: TCollection);
+begin
+  inherited;
+  fColumnMappings := TDAColumnMappingCollection.Create(Self);
+end;
+
+destructor TDAStatement.Destroy;
+begin
+  fColumnMappings.Free;
+
+  inherited;
+end;
+
+function TDAStatement.GetDisplayName: string;
+begin
+  if Connection <> '' then
+    result := Connection
+  else
+  if ConnectionType <> '' then
+    result := '[' + ConnectionType + ']'
+  else
+  if Name <> '' then
+    result := Name
+  else
+    result := '<unnamed>';
+end;
+
+function TDAStatement.GetNeedsParams: boolean;
+const
+  arr: TDAQuoteCharArray = ('"','"');
+var
+  lParams: TParams;
+begin
+  lParams := TParams.Create;
+  try
+    Params_ParseSQL(lParams,SQL, True, arr, True);
+    result := (lParams.Count > 0);
+  finally
+    lParams.Free;
+  end;
+end;
+
+function TDAStatement.GetStatementCollection: TDAStatementCollection;
+begin
+  result := TDAStatementCollection(Collection);
+end;
+
+procedure TDAStatement.SetColumnMappings(
+  const Value: TDAColumnMappingCollection);
+begin
+  fColumnMappings.Assign(Value);
+end;
+
+procedure TDAStatement.SetSQL(const Value: string);
+begin
+  fSQL := Value;
+end;
+
+function TDAStatement.StoreSQL: Boolean;
+begin
+  Result := fStatementType <> stAutoSQL; 
+end;
+
+{ TDAColumnMappingCollection }
+
+function TDAColumnMappingCollection.Add: TDAColumnMapping;
+begin
+  result := TDAColumnMapping(inherited Add);
+end;
+
+procedure TDAColumnMappingCollection.AssignColumnMapping(aSource: TPersistent);
+var
+  i: Integer;
+begin
+  Clear;
+  for i := 0 to TDAColumnMappingCollection(aSource).Count -1 do begin
+    Add.AssignFieldMapping(TDAColumnMappingCollection(aSource)[i]);
+  end;
+end;
+
+constructor TDAColumnMappingCollection.Create(aOwner: TPersistent);
+begin
+  inherited Create(aOwner, TDAColumnMapping);
+end;
+
+function TDAColumnMappingCollection.FindMappingByDatasetField(
+  const aDatasetField: string): TDAColumnMapping;
+var
+  i: integer;
+begin
+  result := nil;
+
+  for i := 0 to (Count - 1) do
+    if SameText(ColumnMappings[i].DatasetField, aDatasetField) then begin
+      result := ColumnMappings[i];
+      Exit;
+    end;
+end;
+
+function TDAColumnMappingCollection.GetColumnMappings(
+  Index: integer): TDAColumnMapping;
+begin
+  result := TDAColumnMapping(inherited Items[Index])
+end;
+
+function TDAColumnMappingCollection.GetItemName(
+  anItem: TCollectionItem): string;
+begin
+  result := TDAColumnMapping(anItem).DatasetField;
+end;
+
+function TDAColumnMappingCollection.MappingByDatasetField(
+  const aDatasetField: string): TDAColumnMapping;
+begin
+  result := TDAColumnMapping(inherited ItemByName(aDatasetField))
+end;
+
+function TDAColumnMappingCollection.MappingByTableField(
+  const aTableField: string): TDAColumnMapping;
+var
+  i: integer;
+begin
+  result := nil;
+
+  for i := 0 to (Count - 1) do
+    if SameText(ColumnMappings[i].TableField, aTableField) then begin
+      result := ColumnMappings[i];
+      Exit;
+    end;
+
+  RaiseError('Cannot find mapping for table field %s', [aTableField]);
+end;
+
+procedure TDAColumnMappingCollection.SetColumnMappings(Index: integer;
+  const Value: TDAColumnMapping);
+begin
+  TDAColumnMapping(inherited Items[Index]).AssignTo(Value);
+end;
+
+function TDAColumnMappingCollection.SetItemName(anItem: TCollectionItem;
+  const aName: string): string;
+begin
+  TDAColumnMapping(anItem).DatasetField := aName;
+end;
+
+{ TDAWhere }
+
+function TDAWhere.GetProperName(aField: TDACustomField) : string;
+begin
+  if fClientFields
+    then result := ClientFieldPrefix+aField.Name
+    else result := aField.TableField
+end;
+
+function TDAWhere.AddCondition(const FieldName: string;
+  Condition: TDASQLCondition; const Value: Variant; SkipIfEmptyValue: boolean = TRUE): boolean;
+var
+  isstr, isnull, isfloat, isCurr: boolean;
+  fld: TDACustomField;
+  fieldnametouse : string;
+  str: string;
+  oldDecimalSeparator: Char;
+begin
+  result := FALSE;
+
+  fld := fFields.FindField(FieldName);
+
+  isnull := VarIsNull(Value) or (VarIsType(Value, [varString, varOleStr, varUString]) and (Value = ''))
+  or (VarIsType(Value, [varDate]) and (Value = 0));
+  if isnull and SkipIfEmptyValue and not (Condition in [cIsNull,cIsNotNull]) then Exit;
+  if fLastWasCondition then
+  begin
+    case fDefaultOperator of
+      doAnd: AddOperator(opAND);
+      doOr: AddOperator(opOR);
+    end;
+  end;
+  fLastWasCondition := True;
+
+  if fld <> nil then
+    fieldnametouse := GetProperName(fld) // Changed by AleF: WHERE clauses cannot work with field aliases like "FieldA as XYZ"
+      else
+    fieldnametouse := FieldName;
+
+  fClause := fClause + '(' + fieldnametouse + ' ' + StrSQLCondition[Condition] + ' ';
+
+  isstr := (fld <> nil) and (fld.DataType in [datWideString, datWideMemo, datString, datDateTime, datMemo]);
+  isfloat := (fld <> nil) and (fld.DataType in [datFloat, datSingleFloat]);
+  isCurr :=(fld <> nil) and (fld.DataType in [datCurrency, datDecimal]);
+
+  case Condition of
+    cIsNull, cIsNotNull:begin
+        fClause := TrimRight(fClause) + ')';
+      end;
+    else begin
+        if isstr then begin
+          str := VarToStr(Value);
+          if Condition = cIn then
+            fClause := fClause + '(' + str + '))'
+          else
+            fClause := fClause + '''' + str + ''')'
+        end
+        else begin
+          if isfloat or isCurr then begin
+            oldDecimalSeparator := DecimalSeparator;
+            DecimalSeparator := '.';
+            try
+              if isfloat then str:= FloatToStr(Value)
+              else str:=CurrToStrF(Value,ffGeneral,4);
+            finally
+              DecimalSeparator := oldDecimalSeparator;
+            end;
+          end
+          else
+            str := VarToStr(Value);
+          if Condition = cIn then
+            fClause := fClause + '(' + str + '))'
+          else
+            fClause := fClause + str + ')';
+        end;
+      end;
+  end;
+  result := TRUE;
+  Changed := True;
+
+  if Assigned(OnChange) then OnChange(Self);
+end;
+
+procedure TDAWhere.AddValueGroup(const FieldName: string;
+  const Values: array of Variant);
+var
+  fld: TDAField;
+  isstr: boolean;
+  cnt, i: integer;
+  fieldnametouse : string;
+begin
+  fld := fFields.FieldByName(FieldName);
+
+  if fLastWasCondition then
+  begin
+    case fDefaultOperator of
+      doAnd: AddOperator(opAND);
+      doOr: AddOperator(opOR);
+    end;
+  end;
+  fLastWasCondition := True;
+
+  fieldnametouse := GetProperName(fld); // Changed by AleF: WHERE clauses cannot work with field aliases like "FieldA as XYZ"
+
+  if (Length(Values) > 0) then begin
+    isstr := (fld.DataType in [datWideString, datWideMemo, datString, datDateTime, datMemo]);
+
+    fClause := fClause + '(' + fieldnametouse + ' ' + StrSQLCondition[cIn] + ' (';
+
+    cnt := High(Values);
+    for i := 0 to cnt do begin
+      if isstr then
+        fClause := fClause + '''' + VarToStr(Values[i]) + ''''
+      else
+        fClause := fClause + VarToStr(Values[i]) + '';
+
+      if (i < cnt) then fClause := fClause + ', ';
+    end;
+    fClause := fClause + '))';
+  end;
+  Changed := True;
+  if Assigned(OnChange) then OnChange(Self);
+end;
+
+constructor TDAWhere.Create(const aFields: TDAFieldCollection; aClientFields : boolean);
+begin
+  inherited Create;
+  fDefaultOperator := doAnd;
+  fFields := aFields;
+  fClientFields := aClientFields;
+end;
+
+{$WARN SYMBOL_DEPRECATED OFF} // Delphi warns you about implementing a method that's deprecated in the interface.
+
+procedure TDAWhere.OpenBraket;
+begin
+  OpenBracket();
+end;
+
+procedure TDAWhere.CloseBraket;
+begin
+  CloseBracket();
+end;
+
+{$WARN SYMBOL_DEPRECATED ON}
+
+procedure TDAWhere.OpenBracket;
+begin
+  fClause := fClause + '(';
+  Changed := True;
+  if Assigned(OnChange) then OnChange(Self);
+end;
+
+procedure TDAWhere.CloseBracket;
+begin
+  fClause := fClause + ')';
+  Changed := True;
+  if Assigned(OnChange) then OnChange(Self);
+end;
+
+procedure TDAWhere.AddOperator(aOperator: TDASQLOperator);
+begin
+  fClause := fClause + ' ' + StrSQLOperator[aOperator] + ' ';
+  Changed := True;
+  fLastWasCondition := False;
+  if Assigned(OnChange) then OnChange(Self);
+end;
+
+procedure TDAWhere.Clear;
+begin
+  fClause := '';
+  fLastWasCondition := false;
+  Changed := True;
+  if Assigned(OnChange) then OnChange(Self);
+end;
+
+procedure TDAWhere.AddText(const someText: string; MapClientFields : boolean = TRUE);
+var s : string;
+    i : integer;
+begin
+  s := someText;
+
+  if MapClientFields then begin
+    for i := 0 to (Fields.Count-1) do
+      s := StringReplace(s, ClientFieldPrefix+Fields[i].Name, Fields[i].TableField, [rfReplaceAll, rfIgnoreCase]);
+  end;
+
+  fClause := fClause + s;
+
+  Changed := True;
+  if Assigned(OnChange) then OnChange(Self);
+end;
+
+procedure TDAWhere.AddSpaces(Count: integer = 1);
+var
+  i: integer;
+begin
+  for i := 1 to Count do
+    fClause := fClause + ' ';
+
+  Changed := True;
+  if Assigned(OnChange) then OnChange(Self);
+end;
+
+function TDAWhere.GetEmpty: boolean;
+begin
+  result := Trim(fClause)=''
+end;
+
+function TDAWhere.GetNotEmpty: boolean;
+begin
+  result := not Empty
+end;
+
+function TDAWhere.AddConditions(const FieldNames: array of string;
+  const Conditions: array of TDASQLCondition;
+  const Values: array of Variant;
+  const Operator: TDASQLOperator): integer;
+var i : integer;
+    isnull : boolean;
+   // oldclause : string;
+    oldonchange : TNotifyEvent;
+begin
+  result := 0;
+//  oldclause := fClause;
+  oldonchange := OnChange;
+  OnChange := NIL;
+  try
+  for i := 0 to Length(FieldNames)-1 do begin
+    isnull := VarIsNull(Values[i]) or (VarIsType(Values[i], [varString, varOleStr, varUString]) and (Values[i] = ''));
+    if isnull and not (Conditions[i] in [cIsNull,cIsNotNull]) then Continue;
+
+    if NotEmpty then AddOperator(Operator);
+    AddCondition(FieldNames[i], Conditions[i], Values[i], TRUE);
+    Inc(result);
+  end;
+  finally
+    // This is to avoid OnChange fireing for each condition in the loop above
+    OnChange := oldonchange;
+    Changed := True;
+    if Assigned(OnChange) then OnChange(Self);
+  end;
+end;
+
+function TDAWhere.AddCondition(const FieldName: string;
+  Condition: TDASQLCondition): boolean;
+begin
+  Result:=AddCondition(FieldName,Condition,0);
+end;
+
+{ TDAColumnMapping }
+
+procedure TDAColumnMapping.Assign(aSource: TPersistent);
+var
+  lSource: TDAColumnMapping;
+begin
+  if (aSource is TDAColumnMapping) then begin
+    lSource := TDAColumnMapping(aSource);
+    fDatasetField := lSource.fDatasetField;
+    fTableField := lSource.fTableField;
+  end
+  else begin
+    inherited;
+  end;
+end;
+
+procedure TDAColumnMapping.AssignFieldMapping(aSource: TPersistent);
+var
+  lSource: TDAColumnMapping;
+begin
+  lSource := TDAColumnMapping(aSource);
+  fDatasetField := lSource.fDatasetField;
+  fTableField := lSource.fTableField;
+  fSQLOrigin := lSource.fSQLOrigin;
+end;
+
+function TDAColumnMapping.GetSQLOrigin: string;
+begin
+  if (fSQLOrigin='')
+    then result := TableField
+    else result := fSQLOrigin
+end;
+
+procedure TDAColumnMapping.SetDatasetField(const Value: string);
+begin
+  fDatasetField := Trim(Value);
+end;
+
+procedure TDAColumnMapping.SetSQLOrigin(const Value: string);
+begin
+  fSQLOrigin:= Trim(Value)
+end;
+
+procedure TDAColumnMapping.SetTableField(const Value: string);
+begin
+  fTableField := Trim(Value);
+end;
+
+function TDAColumnMapping.StoreSQLOrigin: Boolean;
+begin
+  result := (fSQLOrigin <> fTableField) and (Trim(fSQLOrigin)<>'')
+end;
+
+{ TDAClientBusinessRuleScript }
+
+constructor TDAClientBusinessRuleScript.Create;
+begin
+  inherited;
+  fRunOnClientAndServer := true;
+  fCompileOnServer := true;
+end;
+
+{ TDADriverForeignKey }
+
+function TDADriverForeignKey.GetValue(const Index: Integer): string;
+begin
+  result := fValues[Index];
+end;
+
+procedure TDADriverForeignKey.SetValue(const Index: Integer; const Value: string);
+begin
+  fValues[Index] := Value;
+end;
+
+{ TDADriverForeignKeyCollection }
+
+constructor TDADriverForeignKeyCollection.Create(aOwner: TPersistent);
+begin
+  inherited Create(aOwner, TDADriverForeignKey);
+end;
+
+function TDADriverForeignKeyCollection.Add: TDADriverForeignKey;
+begin
+  result := TDADriverForeignKey(inherited Add());
+end;
+
+function TDADriverForeignKeyCollection.GetForeignKeys(Index: integer): TDADriverForeignKey;
+begin
+  result := TDADriverForeignKey(inherited Items[Index]);
+end;
+
+procedure TDADriverForeignKeyCollection.SetForeignKeys(Index: integer; const Value: TDADriverForeignKey);
+begin
+  inherited Items[Index].Assign(Value);
+end;
+
+{ TDAUpdateRuleCollection }
+
+function TDAUpdateRuleCollection.Add: TDAUpdateRule;
+begin
+  result := inherited Add() as TDAUpdateRule;
+end;
+
+constructor TDAUpdateRuleCollection.Create(aOwner : TComponent);
+begin
+  inherited Create(aOwner, TDAUpdateRule);
+end;
+
+function TDAUpdateRuleCollection.GetItemName(
+  anItem: TCollectionItem): string;
+begin
+  Result := TDAUpdateRule(anItem).Name;
+end;
+
+function TDAUpdateRuleCollection.GetUpdateRules(
+  Index: integer): TDAUpdateRule;
+begin
+  result := TDAUpdateRule(inherited Items[Index]);
+end;
+
+function TDAUpdateRuleCollection.SetItemName(anItem: TCollectionItem;
+  const aName: string): string;
+begin
+  TDAUpdateRule(anItem).Name := aName;
+end;
+
+function TDAUpdateRuleCollection.UpdateRuleByName(
+  const aName: string): TDAUpdateRule;
+begin
+  result := ItemByName(aName) as TDAUpdateRule;
+end;
+
+{ TDAUpdateRule }
+
+procedure TDAUpdateRule.Assign(aSource: TPersistent);
+var
+  lSource: TDAUpdateRule;
+begin
+  lSource := aSource as TDAUpdateRule;
+  fDatasetName := lSource.fDatasetName;
+  fName := lSource.fName;
+  fDoUpdate := lSource.fDoUpdate;
+  fDoInsert := lSource.fDoInsert;
+  fDoDelete := lSource.fDoDelete;
+  fFailureBehavior := lSource.fFailureBehavior;
+end;
+
+constructor TDAUpdateRule.Create(aCollection: TCollection);
+begin
+  inherited;
+
+  fDoUpdate := true;
+  fDoInsert := true;
+  fDoDelete := true;
+  fFailureBehavior := fbRaiseException;
+end;
+
+function TDAUpdateRule.GetChangeTypes: TDAChangeTypes;
+begin
+  result := [];
+  if DoUpdate then Include(result,ctUpdate);
+  if DoInsert then Include(result,ctInsert);
+  if DoDelete then Include(result,ctDelete);
+end;
+
+function TDAUpdateRule.GetDisplayName: string;
+begin
+  result := Name;
+  if (result='') then result := '<Unknown>';
+end;
+
+{ TDADatasetRelationshipCollection }
+
+function TDADatasetRelationshipCollection.Add: TDADatasetRelationship;
+begin
+  result := inherited Add() as TDADatasetRelationship;
+end;
+
+constructor TDADatasetRelationshipCollection.Create(aOwner: TComponent);
+begin
+  inherited Create(aOwner, TDADatasetRelationship);
+end;
+
+procedure TDADatasetRelationshipCollection.GetDetails(const aMasterDatasetName: string; aList: TDADatasetRelationshipList);
+var i : integer;
+begin
+  aList.Clear;
+  for i := 0 to (Count-1) do begin
+    if SameText(aMasterDatasetName, RelationShips[i].MasterDatasetName) then begin
+      aList.Add(RelationShips[i]);
+    end;
+  end;
+end;
+
+function TDADatasetRelationshipCollection.GetItemName(
+  anItem: TCollectionItem): string;
+begin
+  Result := TDADatasetRelationship(anItem).Name;
+end;
+
+function TDADatasetRelationshipCollection.GetRelationShips(
+  Index: integer): TDADatasetRelationship;
+begin
+  result := TDADatasetRelationship(inherited Items[Index]);
+end;
+
+function TDADatasetRelationshipCollection.RelationShipByName(
+  const aName: string): TDADatasetRelationship;
+begin
+  result := ItemByName(aName) as TDADatasetRelationship;
+end;
+
+function TDADatasetRelationshipCollection.RelationshipExists(
+  const aMasterDatasetName, aDetailDatasetName, aMasterFields,
+  aDetailFields: string): Boolean;
+var
+  i: integer;
+begin
+  result := false;
+  for i := 0 to Count - 1 do
+    with RelationShips[i] do
+      if (MasterDatasetName = aMasterDatasetName) and (DetailDatasetName = aDetailDatasetName)
+      and (MasterFields = aMasterFields) and (DetailFields = aDetailFields) then begin
+        result := true;
+        exit;
+      end;
+end;
+
+function TDADatasetRelationshipCollection.SetItemName(
+  anItem: TCollectionItem; const aName: string): string;
+begin
+  TDADatasetRelationship(anItem).Name := aName;
+end;
+
+{ TDADatasetRelationship }
+
+procedure TDADatasetRelationship.Assign(Source: TPersistent);
+var src : TDADatasetRelationship;
+begin
+  if (Source is TDADatasetRelationship) then begin
+    src := TDADatasetRelationship(Source);
+
+    Name := src.Name;
+    MasterDatasetName := src.MasterDatasetName;
+    MasterFields := src.MasterFields;
+    DetailDatasetName := src.DetailDatasetName;
+    DetailFields := src.DetailFields;
+  end
+  else inherited;
+end;
+
+function TDADatasetRelationship.GetDisplayName: string;
+begin
+  result := Format('%s: %s (%s) --> %s (%s)', [fName, fDetailDatasetName, fDetailFields, fMasterDatasetName, fMasterFields]);
+end;
+
+{ TDADatasetRelationshipList }
+
+function TDADatasetRelationshipList.Add(
+  aRelationship: TDADatasetRelationship): integer;
+begin
+  result := inherited Add(aRelationship)
+end;
+
+function TDADatasetRelationshipList.GetItems(
+  Index: integer): TDADatasetRelationship;
+begin
+  result := TDADatasetRelationship(inherited Items[Index]);
+end;
+
+{ TDALoginInfoAware }
+
+function TDALoginInfoAware._AddRef: Integer;
+begin
+  result := -1;
+end;
+
+function TDALoginInfoAware._Release: Integer;
+begin
+  result := -1;
+end;
+
+function TDALoginInfoAware.GetLoginInfo: TDALoginInfo;
+begin
+  result := fLoginInfo
+end;
+
+procedure TDALoginInfoAware.SetLoginInfo(aValue: TDALoginInfo);
+begin
+  fLoginInfo := aValue;
+end;
+
+{ TDAJoinDataTableCollection }
+
+constructor TDAJoinDataTableCollection.Create(aOwner : TComponent);
+begin
+  inherited Create(aOwner, TDAJoinDataTable);
+end;
+
+function TDAJoinDataTableCollection.GetJoinDataTables(Index: integer): TDAJoinDataTable;
+begin
+  result := TDAJoinDataTable(inherited Items[Index]);
+end;
+
+procedure TDAJoinDataTableCollection.SetJoinDataTables(Index: integer; const Value: TDAJoinDataTable);
+begin
+  JoinTables[Index].Assign(Value);
+end;
+
+{
+function TDAJoinedTableCollection.GetItemClass: TDASQLCommandClass;
+begin
+  result := TDAJoinedTable;
+end;
+}
+
+function TDAJoinDataTableCollection.Add: TDAJoinDataTable;
+begin
+  result := TDAJoinDataTable(inherited Add);
+end;
+
+function TDAJoinDataTableCollection.JoinTableByName(const aName: string): TDAJoinDataTable;
+begin
+  result := TDAJoinDataTable(inherited ItemByName(aName));
+end;
+
+function TDAJoinDataTableCollection.FindJoinTableByName(const aName: string): TDAJoinDataTable;
+begin
+  result := TDAJoinDataTable(inherited FindItem(aName));
+end;
+
+function TDAJoinDataTableCollection.GetItemName(
+  anItem: TCollectionItem): string;
+begin
+  Result := TDAJoinDataTable(anItem).Name;
+end;
+
+function TDAJoinDataTableCollection.SetItemName(anItem: TCollectionItem;
+  const aName: string): string;
+begin
+  TDAJoinDataTable(anItem).Name := aName;
+end;
+
+{ TDAJoinSourceTableCollection }
+
+function TDAJoinSourceTableCollection.GetJoinSourceTables(Index: integer): TDAJoinSourceTable;
+begin
+  result := TDAJoinSourceTable(inherited Items[Index])
+end;
+
+procedure TDAJoinSourceTableCollection.SetJoinSourceTables(Index: integer; const Value: TDAJoinSourceTable);
+begin
+  TDAJoinSourceTable(inherited Items[Index]).AssignTo(Value);
+end;
+
+constructor TDAJoinSourceTableCollection.Create(aOwner: TPersistent);
+begin
+  inherited Create(aOwner, TDAJoinSourceTable);
+end;
+
+function TDAJoinSourceTableCollection.Add: TDAJoinSourceTable;
+begin
+  result := TDAJoinSourceTable(inherited Add);
+end;
+
+function TDAJoinSourceTableCollection.JoinSourceTableByName(const aName: string): TDAJoinSourceTable;
+begin
+  result := TDAJoinSourceTable(inherited ItemByName(aName));
+end;
+{
+function TDAJoinedTableItemCollection.GetItemClass: TDAJoinedTableItem;
+begin
+  result := TDAJoinedTableItem;
+end;
+}
+
+function TDAJoinSourceTableCollection.GetItemName(
+  anItem: TCollectionItem): string;
+begin
+  Result := TDAJoinSourceTable(anItem).Name;
+end;
+
+function TDAJoinSourceTableCollection.SetItemName(anItem: TCollectionItem;
+  const aName: string): string;
+begin
+  TDAJoinSourceTable(anItem).Name := aName;
+end;
+
+{ TDAJoinDataTable }
+constructor TDAJoinDataTable.Create(Collection: TCollection);
+begin
+  inherited;
+  fJoinSourceTables := TDAJoinSourceTableCollection.Create(self);
+end;
+
+destructor TDAJoinDataTable.Destroy;
+begin
+  FreeAndNil(fJoinSourceTables);
+  inherited;
+end;
+
+procedure TDAJoinDataTable.Assign(aSource: TPersistent);
+var
+  lSource: TDAJoinDataTable;
+begin
+  if (aSource is TDAJoinDataTable) then begin
+    inherited; { Need to work the TDASQLCommand, too}
+    lSource := TDAJoinDataTable(aSource);
+    fJoinSourceTables.Assign(lSource.fJoinSourceTables);
+    fMasterTable:= lSource.fMasterTable;
+  end
+  else begin
+    inherited;
+  end;
+end;
+
+procedure TDAJoinDataTable.SetJoinSourceTables(const Value: TDAJoinSourceTableCollection);
+begin
+  fJoinSourceTables.Assign(Value);
+end;
+
+function TDAJoinDataTable.GetParams: TDAParamCollection;
+begin
+  result := nil;
+end;
+
+procedure TDAJoinDataTable.SetParams(const Value: TDAParamCollection);
+begin
+  // Do Nothing
+end;
+
+function TDAJoinDataTable.GetStatements(): TDAStatementCollection;
+begin
+  result := nil;
+end;
+
+procedure TDAJoinDataTable.SetStatements(const Value: TDAStatementCollection);
+begin
+  // Do Nothing
+end;
+
+function TDAJoinDataTable.GetSQLCommandCollection: TDASQLCommandCollection;
+begin
+  result := nil;
+end;
+
+
+{ TDAJoinSourceTable }
+constructor TDAJoinSourceTable.Create(Collection: TCollection);
+begin
+  inherited;
+  fJoinConditions := TDAJoinConditionCollection.Create(Self);
+end;
+
+function TDAJoinSourceTable.GetDisplayName: string;
+begin
+  if (Trim(Name) = '') then
+    result := '<Noname>'
+  else
+    result := Name;
+end;
+
+procedure TDAJoinSourceTable.SetName(const Value: string);
+var
+  lOldName: string;
+begin
+  lOldName := fName;
+  fName := Value;
+  if lOldName <> '' then
+    (Collection as TSearcheableCollection).TriggerOnItemRenamed(lOldName, fName);
+end;
+
+procedure TDAJoinSourceTable.Assign(aSource: TPersistent);
+var
+  lSource: TDAJoinSourceTable;
+begin
+  if (aSource is TDAJoinSourceTable) then begin
+    lSource := TDAJoinSourceTable(aSource);
+    fName:= lSource.fName;
+    fJoinType:= lSource.fJoinType;
+    fJoinConditions.Assign(lSource.fJoinConditions);    
+  end
+  else begin
+    inherited;
+  end;
+end;
+
+{ TDAJoinConditionCollection }
+constructor TDAJoinConditionCollection.Create(aOwner: TPersistent);
+begin
+  inherited Create(aOwner, TDAJoinCondition);
+end;
+
+function TDAJoinConditionCollection.Add: TDAJoinCondition;
+begin
+  result := TDAJoinCondition(inherited Add);
+end;
+
+constructor TDADatasetRelationship.Create(Collection: TCollection);
+begin
+  inherited Create(Collection);
+  fRelationshipType := rtForeignKey;
+end;
+
+{ TDATableFieldCollectionItem }
+
+procedure TDATableFieldCollectionItem.Assign(Source: TPersistent);
+begin
+  inherited;
+  if Source is TDATableFieldCollectionItem then begin
+    self.FFieldName := TDATableFieldCollectionItem(Source).FieldName;
+    self.FTableName := TDATableFieldCollectionItem(Source).TableName;
+  end;
+end;
+
+
+{ TDASimpleQueryBuilder }
+
+procedure TDASimpleQueryBuilder.AddCrossJoin(ATable: string);
+begin
+  with FMainTable.JoinSourceTables.Add do begin
+    JoinType := jtCross;
+    Name := ATable;
+  end;
+end;
+
+procedure TDASimpleQueryBuilder.AddGroupBy(ATable, AField: string);
+begin
+  with TDAGroupByItem(FGroupByCollection.Add) do begin
+    TableName := aTable;
+    FieldName := AField;
+  end;
+end;
+
+procedure TDASimpleQueryBuilder.AddJoin(AJoinTable, AJoinFieldName,
+  AJoinToTableName, AJoinToFieldName: string; AJoinType: TDAJoinType);
+begin
+  with FMainTable.JoinSourceTables.Add do begin
+    JoinType := AJoinType;
+    Name := AJoinTable;
+    with JoinConditions.Add do begin
+      FromTableName := AJoinTable;
+      FromFieldName := AJoinFieldName;
+      ToTableName := AJoinToTableName;
+      ToFieldName := AJoinToFieldName;
+    end;
+  end;
+end;
+
+procedure TDASimpleQueryBuilder.AddJoin(AJoinTable: string;
+  AJoinFieldNames: array of string; AJoinToTableName: string;
+  AJoinToFieldNames: array of string; AJoinType: TDAJoinType);
+var
+  i: integer;
+begin
+  if High(AJoinToFieldNames) <> High(AJoinFieldNames) then raise Exception.Create('Can''t create join: AJoinFieldNames and AJoinToFieldNames should contain equal members count');
+  with FMainTable.JoinSourceTables.Add do begin
+    JoinType := AJoinType;
+    Name := AJoinTable;
+    For i:=0 to High(AJoinToFieldNames) do
+      with JoinConditions.Add do begin
+        FromTableName := AJoinTable;
+        FromFieldName := AJoinFieldNames[i];
+        ToTableName := AJoinToTableName;
+        ToFieldName := AJoinToFieldNames[i];
+      end;
+  end;
+end;
+
+procedure TDASimpleQueryBuilder.AddSelect(ATable, AField: string);
+begin
+  with TDASelectItem(FSelectCollection.Add) do begin
+    TableName := aTable;
+    FieldName := AField;
+  end;
+end;
+
+procedure TDASimpleQueryBuilder.Assign(Source: TPersistent);
+begin
+  inherited;
+  if Source is TDASimpleQueryBuilder then begin
+    FMainTable.Assign(TDASimpleQueryBuilder(Source).MainTable);
+    FSelectCollection.Assign(TDASimpleQueryBuilder(Source).Select);
+    FGroupByCollection.Assign(TDASimpleQueryBuilder(Source).GroupBy);
+    FOptions:=TDASimpleQueryBuilder(Source).FOptions;
+    FConnection:=TDASimpleQueryBuilder(Source).Connection;
+    if (TDASimpleQueryBuilder(Source).FWhere <> nil) or (FWhere <> nil) then
+      Where.Xml:=TDASimpleQueryBuilder(Source).Where.Xml;
+  end;
+end;
+
+procedure TDASimpleQueryBuilder.Clear;
+begin
+  FMainTable.MasterTable := '';
+  FMainTable.JoinSourceTables.Clear;
+  FSelectCollection.Clear;
+  if FWhere <> nil then FWhere.Clear;
+  FGroupByCollection.Clear;
+end;
+
+constructor TDASimpleQueryBuilder.Create(Collection: TCollection);
+begin
+  inherited;
+  FSelectCollection := TDASelectCollection.Create(TDASelectItem);
+  FMainTable := TDAJoinDataTable.Create(nil);
+  FGroupByCollection := TDAGroupByCollection.Create(TDAGroupByItem);
+  FColumnMapping := TDAColumnMappingCollection.Create(Self);
+  FWhere := nil;
+  FOptions := [];
+  Clear;
+end;
+
+function TDASimpleQueryBuilder.CreateGroupByClause: string;
+var
+  i: integer;
+begin
+  Result := '';
+  for i := 0 to GroupBy.Count - 1 do begin
+    if i <> 0 then Result := Result + ', ';
+    with TDAGroupByItem(GroupBy.Items[i]) do
+      Result := Result + GenerateFieldName(TableName, FieldName);
+  end;
+end;
+
+function TDASimpleQueryBuilder.CreateSelectClause: string;
+var
+  i,j: integer;
+  lflds: TDAFieldCollection;
+  lquotedtablename: string;
+begin
+  Result := '';
+  if Select.Count = 0 then begin
+    if not (qboGenerateSimpleSelect in FOptions) and Assigned(FConnection) then begin
+      FConnection.GetTableFields(MainTable.MasterTable, lflds);
+      if Assigned(lflds) then try
+       if MainTable.JoinSourceTables.Count =0 then
+         lquotedtablename := ''
+       else
+         lquotedtablename:=QuoteIdentifierIfNeeded(MainTable.MasterTable)+'.';
+       For i:= 0 to lflds.Count -1 do
+         Result := Result + lquotedtablename+QuoteFieldNameIfNeeded(MainTable.MasterTable, lflds.Fields[i].Name)+', '
+      finally
+        lFlds.Free;
+      end;
+      For j:= 0 to MainTable.JoinSourceTables.Count - 1 do
+        with TDAJoinSourceTable(MainTable.JoinSourceTables.Items[j]) do begin
+          lquotedtablename:=QuoteIdentifierIfNeeded(Name)+'.';
+          FConnection.GetTableFields(name, lflds);
+          if Assigned(lflds) then try
+            For i:= 0 to lflds.Count -1 do
+              Result := Result + lquotedtablename+QuoteFieldNameIfNeeded(Name, lflds.Fields[i].Name)+', '
+          finally
+            lFlds.Free;
+          end;
+        end;
+    end;
+  end else begin
+    for i := 0 to Select.Count - 1 do begin
+      with TDASelectItem(Select.Items[i]) do
+        Result := Result + GenerateFieldName(TableName, FieldName)+', ';
+    end;
+  end;
+  if Length(Result) > 2 then SetLength(Result, Length(Result)-2);
+  if Result = '' then Result:='*';
+end;
+
+function TDASimpleQueryBuilder.CreateWhereClause: string;
+begin
+  if FWhere = nil then
+    Result := ''
+  else
+    Result := FWhere.CreateWhereClause;
+end;
+
+destructor TDASimpleQueryBuilder.Destroy;
+begin
+  FColumnMapping.Free;
+  FWhere.Free;
+  FGroupByCollection.Free;
+  FSelectCollection.Free;
+  FMainTable.Free;
+  inherited;
+end;
+
+function TDASimpleQueryBuilder.GenerateFieldName(aTablename,
+  aFieldName: string; aProcessMapping: Boolean): string;
+begin
+  if aProcessMapping then aFieldName:= GetMappingTableField(aFieldName);
+  if aTableName <> '' then
+    Result := QuoteIdentifierIfNeeded(aTableName) + '.' + QuoteFieldNameIfNeeded(aTableName, aFieldName)
+  else
+    Result := QuoteFieldNameIfNeeded(aTableName, aFieldName);
+end;
+
+function TDASimpleQueryBuilder.GenerateSelectSQL: string;
+const
+  c_Indent = '   ';
+  c_Lenght = 47;
+
+  function CompactString(AStr: String): string;
+  var
+    p,p1: Pchar;
+    s: string;
+  begin
+    Result:='';
+    p:=Pchar(AStr);
+    repeat
+      p1:=p;
+      repeat
+        p1:=StrPos(p1, ',');
+        if p1 <> nil then inc(p1);
+      until (p1 = nil) or (p1-p > c_lenght);
+      if p1 = nil then begin
+        s:=p;
+      end else begin
+        inc(p1);
+        SetString(s,p, p1-p);
+      end;
+      p:=p1;
+      Result:=Result+sLineBreak +c_Indent+ s;
+    until p = nil;
+  end;
+
+var
+  lSelect, lTable, lWhere, lGroupBy: string;
+begin
+  Validate;
+  lSelect := CompactString(CreateSelectClause);
+  lTable := CreateTableClause;
+  lWhere := CreateWhereClause;
+  lGroupBy := CreateGroupByClause;
+  Result := 'SELECT';
+  if (qboSelectDistinct in Options) then Result := Result + ' DISTINCT';
+  Result := Result+lSelect + sLinebreak +
+    'FROM' + sLineBreak + c_Indent + lTable;
+  if (qboGenerateDynamicWhereStatement in Options) then begin
+    if (lWhere = '') then lWhere := '{WHERE}' else lWhere := lWhere + ' AND {WHERE}';
+  end;
+  if lWhere <> '' then Result := Result + sLineBreak + 'WHERE' + sLineBreak + c_Indent + lWhere;
+  if lGroupBy <> '' then Result := Result + sLineBreak + 'GROUP BY' + sLineBreak + c_Indent + lGroupBy;
+end;
+
+function TDASimpleQueryBuilder.GetMappingTableField(
+  const aDataSetField: string): string;
+var
+  lColumnMapping: TDAColumnMapping;
+begin
+  lColumnMapping := FColumnMapping.FindMappingByDatasetField(aDataSetField);
+  if Assigned(lColumnMapping) then
+    Result := lColumnMapping.TableField
+  else
+    Result := aDataSetField;
+end;
+
+function TDASimpleQueryBuilder.GetWhereBuilder: TDASQLWhereBuilder;
+begin
+  if FWhere = nil then FWhere := CreateWhereBuilder;
+  Result:= FWhere;
+end;
+
+function TDASimpleQueryBuilder.IdentifierNeedsQuoting(
+  const iIdentifier: string): boolean;
+var
+  i: integer;
+begin
+  if Assigned(Connection) then
+    Result := Connection.IdentifierNeedsQuoting(iIdentifier)
+  else begin
+    Result := False;
+    for i := 1 to Length(iIdentifier) do begin
+      Result := not CharInSet(iIdentifier[i], ['a'..'z', 'A'..'Z', '0'..'9', '_', '.']);
+      if Result then Break;
+    end;
+  end;
+end;
+
+function TDASimpleQueryBuilder.QuoteFieldNameIfNeeded(const aTableName,
+  aFieldName: string): string;
+begin
+  if Assigned(Connection) then
+    Result := Connection.QuoteFieldNameIfNeeded(aTableName, aFieldName)
+  else
+    Result := {aTableName + '.' +} QuoteIdentifierIfNeeded(aFieldName);
+end;
+
+function TDASimpleQueryBuilder.QuoteIdentifier(
+  const iIdentifier: string): string;
+begin
+  if Assigned(Connection) then
+    Result := Connection.QuoteIdentifier(iIdentifier)
+  else
+    Result := '''' + iIdentifier + '''';
+end;
+
+function TDASimpleQueryBuilder.QuoteIdentifierIfNeeded(
+  const iIdentifier: string): string;
+begin
+  if Assigned(Connection) then
+    Result := Connection.QuoteIdentifierIfNeeded(iIdentifier)
+  else if IdentifierNeedsQuoting(iIdentifier) then
+    Result := QuoteIdentifier(iIdentifier)
+  else
+    Result := iIdentifier;
+end;
+
+procedure TDASimpleQueryBuilder.SetColumnMapping(
+  const Value: TDAColumnMappingCollection);
+begin
+  FColumnMapping.AssignColumnMapping(Value);
+end;
+
+procedure TDASimpleQueryBuilder.Validate;
+begin
+  if FMainTable.MasterTable = '' then raise Exception.Create('Please specify MainTable.MasterTable');
+end;
+
+{ TDAWhereBuilder }
+
+const
+  c_DAWhereBuilderLocalName = 'query';
+  c_DAWhereBuilderNamespaceURI = 'http://www.remobjects.com/schemas/dataabstract/queries/5.0';
+  c_DAWhereBuilderwhere = 'where';
+procedure TDAWhereBuilder.Clear;
+begin
+  FreeAndNil(FExpression);
+  FColumnMapping.Clear;
+  fParams.Clear;
+end;
+
+constructor TDAWhereBuilder.Create;
+begin
+  inherited Create;
+  FColumnMapping := TDAColumnMappingCollection.Create(nil);
+  fParams := TDAParamCollection.Create(nil);
+end;
+
+destructor TDAWhereBuilder.Destroy;
+begin
+  Clear;
+  fParams.Free;
+  FColumnMapping.Free;
+  inherited Destroy;
+end;
+
+function TDAWhereBuilder.ExpressionToXmlNode(
+  const aExpression: TDAWhereExpression): IXMLNode;
+var
+  doc: IXMLDocument;
+  el: IXMLNode;
+begin
+  doc := NewROXmlDocument;
+  doc.New(c_DAWhereBuilderLocalName);
+  el := doc.DocumentNode;
+  el.AddAttribute('xmlns', c_DAWhereBuilderNamespaceURI);
+  el.AddAttribute('version', '5.0');
+  WriteToXml(el,aExpression);
+  result := doc.DocumentNode;
+end;
+
+function TDAWhereBuilder.getXml: WideString;
+begin
+  Result:= ExpressionToXmlNode(fExpression).Document.XML;
+end;
+
+function TDAWhereBuilder.IsEmpty: Boolean;
+begin
+  Result:= fExpression = nil;
+end;
+
+function TDAWhereBuilder.NewBinaryExpression(aLeft,
+  aRight: TDAWhereExpression; anOp: TDABinaryOperator): TDAWhereExpression;
+begin
+  Result := TDABinaryExpression.Create(aLeft, aRight, anOp);
+end;
+
+function TDAWhereBuilder.NewBinaryExpression(const aTableName,
+  aFieldName: string; anOp: TDABinaryOperator; const aValue: variant;
+  aType: TDADataType): TDAWhereExpression;
+begin
+  Result := NewBinaryExpression(
+    NewField(aTableName,aFieldName),
+    NewConstant(aValue,aType),
+    anOp
+    );
+end;
+
+function TDAWhereBuilder.NewConstant(const aValue: Variant;
+  aType: TDADataType): TDAWhereExpression;
+begin
+  Result := TDAConstantExpression.Create(aValue, aType);
+end;
+
+function TDAWhereBuilder.NewField(
+  const aTableName,aFieldName: string): TDAWhereExpression;
+begin
+  Result := TDAFieldExpression.Create(aTableName,aFieldName);
+end;
+
+function TDAWhereBuilder.NewIsNotNull: TDAWhereExpression;
+begin
+  Result := NewUnaryExpression(NewNull,duoNot);
+end;
+
+function TDAWhereBuilder.NewIsNotNull(const aTableName,
+  aFieldName: string): TDAWhereExpression;
+begin
+  Result := NewBinaryExpression(
+       NewField(aTableName,aFieldName),
+       NewIsNotNull,
+       dboEqual);
+end;
+
+function TDAWhereBuilder.NewList(
+  const aValues: array of TDAWhereExpression): TDAWhereExpression;
+begin
+  result := TDAListExpression.Create(aValues);
+end;
+
+function TDAWhereBuilder.NewMacro(const aName: string;
+  const aValues: array of TDAWhereExpression): TDAWhereExpression;
+begin
+  Result := TDAMacroExpression.Create(aName, aValues);
+end;
+
+function TDAWhereBuilder.NewMacro(const aName: string): TDAWhereExpression;
+begin
+  Result := TDAMacroExpression.Create(aName);
+end;
+
+function TDAWhereBuilder.NewNull: TDAWhereExpression;
+begin
+  Result := TDANullExpression.Create;
+end;
+
+function TDAWhereBuilder.NewParameter(
+  const aParameterName: string): TDAWhereExpression;
+begin
+  Result := TDAParameterExpression.Create(aParameterName);
+end;
+
+function TDAWhereBuilder.NewUnaryExpression(
+  anExpression: TDAWhereExpression;
+  anOp: TDAUnaryOperator): TDAWhereExpression;
+begin
+  Result := TDAUnaryExpression.Create(anExpression, anOp);
+end;
+
+function TDAWhereBuilder.ReadFromXml(xr: IXmlNode): TDAWhereExpression;
+begin
+  xr := SelectNodeLocal(xr, c_DAWhereBuilderwhere);
+  if (xr = nil) then raise Exception.Create('"'+c_DAWhereBuilderwhere+'" tag expected');
+  if xr.ChildrenCount > 0 then
+    Result := TDAWhereExpression.ParseExpression(xr.FirstChild)
+  else
+    Result := nil;  
+end;
+
+procedure TDAWhereBuilder.SetColumnMapping(
+  const Value: TDAColumnMappingCollection);
+begin
+  FColumnMapping.AssignColumnMapping(Value);
+end;
+
+procedure TDAWhereBuilder.SetParams(const Value: TDAParamCollection);
+begin
+  fParams.AssignParamCollection(Value);
+end;
+
+procedure TDAWhereBuilder.setXml(const aValue: WideString);
+begin
+  Clear;
+  fExpression:=XMLToExpression(aValue);
+end;
+
+procedure TDAWhereBuilder.WriteToXml(sw: IXmlNode; const aExpression: TDAWhereExpression);
+begin
+  sw := sw.Add(c_DAWhereBuilderwhere);
+  if aExpression <> nil then
+     aExpression.WriteToXml(sw);
+end;
+
+function TDAWhereBuilder.XMLToExpression(
+  const aXML: widestring): TDAWhereExpression;
+var
+  doc: IXMLDocument;
+  el: IXMLNode;
+begin
+  doc := NewROXmlDocument;
+  doc.New();
+  doc.XML := aXML;
+  el := doc.DocumentNode;
+  if (el.LocalName <> c_DAWhereBuilderLocalName) or (el.NamespaceURI <> c_DAWhereBuilderNamespaceURI) then raise Exception.Create('Not a DataAbstract query xml');
+  Result:= ReadFromXml(el);
+end;
+
+{ TDAWhereExpression }
+
+class function TDAWhereExpression.ParseExpression(xr: IXmlNode): TDAWhereExpression;
+begin
+  Result := CreateWhereExpression(xr.LocalName);
+  Result.ReadFromXml(xr);
+end;
+
+procedure TDAWhereExpression.Validate;
+begin
+// nothing
+end;
+
+{ TDAUnionDataTable }
+constructor TDAUnionDataTable.Create(Collection: TCollection);
+begin
+  inherited;
+  fSourceTables := TDAUnionSourceTableCollection.Create(Self);
+end;
+
+destructor TDAUnionDataTable.Destroy;
+begin
+  FreeAndNil(fSourceTables);
+  inherited;
+end;
+
+procedure TDAUnionDataTable.SetSourceTables(Value: TDAUnionSourceTableCollection);
+begin
+  fSourceTables.Assign(Value);
+end;
+
+{ TDAUnionSourceTableCollection }
+function TDAUnionSourceTableCollection.Add: TDAUnionSourceTable;
+begin
+  result := inherited Add() as TDAUnionSourceTable;
+end;
+
+constructor TDAUnionSourceTableCollection.Create(aOwner : TPersistent);
+begin
+  inherited Create(aOwner, TDAUnionSourceTable);
+end;
+
+function TDAUnionSourceTableCollection.GetItemName(
+  anItem: TCollectionItem): string;
+begin
+  Result := TDAUnionSourceTable(anItem).Name;
+end;
+
+function TDAUnionSourceTableCollection.GetUnionSourceTables(
+  Index: integer): TDAUnionSourceTable;
+begin
+  result := TDAUnionSourceTable(inherited Items[Index]);
+end;
+
+function TDAUnionSourceTableCollection.SetItemName(anItem: TCollectionItem;
+  const aName: string): string;
+begin
+  TDAUnionSourceTable(anItem).Name := aName;
+end;
+
+function TDAUnionSourceTableCollection.UnionSourceTableByName(
+  const aName: string): TDAUnionSourceTable;
+begin
+  result := ItemByName(aName) as TDAUnionSourceTable
+end;
+
+{ TDAUnionSourceTable }
+procedure TDAUnionSourceTable.Assign(Source: TPersistent);
+begin
+  if Source is TDAUnionSourceTable then begin
+    Name := TDAUnionSourceTable(Source).Name;
+    IsReadonly := TDAUnionSourceTable(Source).IsReadOnly;
+    ColumnMappings.Assign(TDAUnionSourceTable(Source).ColumnMappings);
+  end;
+end;
+
+constructor TDAUnionSourceTable.Create(Collection: TCollection);
+begin
+  inherited;
+  fColumnMappings := TDAColumnMappingCollection.Create(Self);
+end;
+
+destructor TDAUnionSourceTable.Destroy;
+begin
+  FreeAndNil(fColumnMappings);
+  inherited;
+end;
+
+procedure TDAUnionSourceTable.SetColumnMappings(const Value: TDAColumnMappingCollection);
+begin
+  fColumnMappings.Assign(Value);
+end;
+
+{ TDAUnionDataTableCollection }
+constructor TDAUnionDataTableCollection.Create(aOwner : TComponent);
+begin
+  inherited Create(aOwner, TDAUnionDataTable);
+end;
+
+function TDAUnionDataTableCollection.GetUnionDataTables(Index: integer): TDAUnionDataTable;
+begin
+  result := TDAUnionDataTable(inherited Items[Index]);
+end;
+
+procedure TDAUnionDataTableCollection.SetUnionDataTables(Index: integer; const Value: TDAUnionDataTable);
+begin
+  UnionDataTables[Index].Assign(Value);
+end;
+
+function TDAUnionDataTableCollection.Add: TDAUnionDataTable;
+begin
+  result := TDAUnionDataTable(inherited Add);
+end;
+
+function TDAUnionDataTableCollection.UnionDataTableByName(const aName: string): TDAUnionDataTable;
+begin
+  result := TDAUnionDataTable(inherited ItemByName(aName));
+end;
+
+function TDAUnionDataTableCollection.FindUnionDataTableByName(const aName: string): TDAUnionDataTable;
+begin
+  result := TDAUnionDataTable(inherited FindItem(aName));
+end;
+
+
+
+function TDAUnionDataTableCollection.GetItemName(
+  anItem: TCollectionItem): string;
+begin
+  Result := TDAUnionDataTable(anItem).Name;
+end;
+
+function TDAUnionDataTableCollection.SetItemName(anItem: TCollectionItem;
+  const aName: string): string;
+begin
+  TDAUnionDataTable(anItem).Name := aName;
+end;
+
+{ TDASQLWhereBuilder }
+
+constructor TDASQLWhereBuilder.Create(AConnection: IDAConnection);
+begin
+  inherited Create;
+  FConnection:= AConnection;
+end;
+
+constructor TDASQLWhereBuilder.Create(AQueryBuilder: TDASimpleQueryBuilder);
+begin
+  inherited Create;
+  FQueryBuilder:= AQueryBuilder;
+end;
+
+function TDASQLWhereBuilder.CreateWhereClause: string;
+begin
+  FId:=0;
+  Params.Clear;
+  Result := '';
+  if Expression <> nil then begin
+    Expression.Validate;
+    Result:= ProcessExpression(Expression);
+  end;
+end;
+
+
+function TDASQLWhereBuilder.GenerateFieldName(aTablename,
+  aFieldName: string): string;
+begin
+  aFieldName:= GetMappingTableField(aFieldName);
+  if FQueryBuilder <> nil then
+    Result := FQueryBuilder.GenerateFieldName(aTablename,aFieldName,False)
+  else
+  if FConnection <> nil then begin
+     if aTableName <> '' then
+        Result := FConnection.QuoteIdentifierIfNeeded(aTableName) + '.' + FConnection.QuoteFieldNameIfNeeded(aTableName, aFieldName)
+      else
+        Result := FConnection.QuoteFieldNameIfNeeded(aTableName, aFieldName);
+  end
+  else
+    Result:= aFieldName;
+end;
+
+function TDASQLWhereBuilder.GenerateParameter(
+  const aParameterName: string): string;
+begin
+  Result:= ':'+aParameterName;
+end;
+
+function TDASQLWhereBuilder.GenerateParamName: String;
+begin
+  fId := fId + 1;
+  result := Format('P%d', [fId]);
+end;
+
+function TDASQLWhereBuilder.GetMappingTableField(
+  const aDataSetField: string): string;
+var
+  lColumnMapping: TDAColumnMapping;
+begin
+  lColumnMapping := FColumnMapping.FindMappingByDatasetField(aDataSetField);
+  if Assigned(lColumnMapping) then
+    Result := lColumnMapping.TableField
+  else
+    Result := aDataSetField;
+end;
+
+function TDASQLWhereBuilder.ProcessConstantExpression(
+  AExpression: TDAWhereExpression): string;
+const
+  const_prefix = 'DACONST_';
+begin
+  With Params.Add do begin
+    ParamType := daptInput;
+    Value := TDAConstantExpression(AExpression).Value;
+    DataType := TDAConstantExpression(AExpression).aType;
+    Name := GenerateParamName();
+    Result:= GenerateParameter(Name);
+  end;
+end;
+
+function TDASQLWhereBuilder.ProcessExpression(
+  AExpression: TDAWhereExpression): string;
+begin
+  Result := '';
+  if AExpression = nil then Exit;
+  if AExpression is TDABinaryExpression then Result := ProcessBinaryExpression(TDABinaryExpression(AExpression))
+  else if AExpression is TDAUnaryExpression then Result := ProcessUnaryExpression(TDAUnaryExpression(AExpression))
+  else if AExpression is TDAConstantExpression then Result := ProcessConstantExpression(TDAConstantExpression(AExpression))
+  else if AExpression is TDAListExpression then Result := ProcessListExpression(TDAListExpression(AExpression))
+  else if AExpression is TDAParameterExpression then Result := ProcessParameterExpression(TDAParameterExpression(AExpression))
+  else if AExpression is TDAFieldExpression then Result := ProcessFieldExpression(TDAFieldExpression(AExpression))
+  else if AExpression is TDANullExpression then Result := ProcessNullExpression(TDANullExpression(AExpression))
+  else if AExpression is TDAMacroExpression then Result := ProcessMacroExpression(TDAMacroExpression(AExpression))
+  else ;
+end;
+
+function TDASQLWhereBuilder.ProcessFieldExpression(
+  AExpression: TDAWhereExpression): string;
+begin
+  with TDAFieldExpression(AExpression) do
+    Result:= GenerateFieldName(TableName, FieldName);
+end;
+
+function TDASQLWhereBuilder.ProcessListExpression(
+  AExpression: TDAWhereExpression): string;
+var
+  i: integer;
+begin
+  Result := '';
+  with TDAListExpression(AExpression) do
+    for i := 0 to Count - 1 do begin
+      if i > 0 then Result := Result + ', ';
+      Result := Result + ProcessExpression(Item[i]);
+    end;
+end;
+
+function TDASQLWhereBuilder.ProcessMacroExpression(
+  AExpression: TDAWhereExpression): string;
+var
+  s1: string;
+  i: integer;
+begin
+  with TDAMacroExpression(AExpression) do begin
+    Result := '{' + Name;
+    s1 := '}';
+    if Count > 0 then begin
+      Result := Result + '(';
+      for i := 0 to Count - 1 do begin
+        if i > 0 then Result := Result + ', ';
+        Result := Result + ProcessExpression(Item[i]);
+      end;
+      Result := Result + ')';
+    end;
+  end;
+  Result := Result + s1;
+end;
+
+function TDASQLWhereBuilder.ProcessParameterExpression(
+  AExpression: TDAWhereExpression): string;
+begin
+  with TDAParameterExpression(AExpression) do
+    Result := GenerateParameter(ParameterName);
+end;
+
+procedure Params_ParseSQL(aParams: TParams; aSQL: String; DoCreate: Boolean; aQuoteChar: TDAQuoteCharArray; aUseDefaultChars: Boolean = False);
+const
+  c_defaultchars = ['[',']','"','`',''''];
+var
+  lSQL: string;
+  i: integer;
+  lName: string;
+  lLen: integer;
+begin
+  { Bug in ParseSQL modified passed in string; use UniqueString to prevent corrupting the original! }
+  lSQL := aSQL;
+  UniqueString(lSQL);
+  aParams.ParseSQL(lSQL, DoCreate);
+  for i:=0 to aParams.Count -1 do begin
+    lName := aParams[i].Name;
+    lLen := Length(lName);
+    // it fixes problem when used non-standard quotes like [ and ]
+    if (lLen > 2) and (
+      (not aUseDefaultChars and (lName[1] = aQuoteChar[0]) and (lName[lLen] = aQuoteChar[1])) or
+      (aUseDefaultChars and CharInSet(lName[1], c_defaultchars) and CharInSet(lName[lLen], c_defaultchars))) then begin
+      lName := Copy(lName,2, lLen -2 );
+      aParams[i].Name:= lName;
+    end
+    // bug in BDS2006, when TParams.ParseSQL parses "ORDERS" as ORDERS"
+   {$IFDEF BDS4}
+    else if (lLen > 1) and (
+     (aUseDefaultChars and (lName[lLen] in c_defaultchars)) or (not aUseDefaultChars and (lName[lLen] = aQuoteChar[1]))) then begin
+      SetLength(lName, lLen - 1);
+      aParams[i].Name:= lName;
+    end
+   {$ENDIF}
+   ;
+  end;
+end;
+
+{ TDAQueryBuilder }
+
+procedure TDAQueryBuilder.AddOrderBy(ATable, AField: string);
+begin
+  with TDAOrderByItem(FOrderByCollection.Add) do begin
+    TableName := aTable;
+    FieldName := AField;
+  end;
+end;
+
+function TDAQueryBuilder.AddUnion: TDASimpleQueryBuilder;
+begin
+  if Connection <> nil then
+    Result := Connection.GetQueryBuilder.Create(FUnionCollections)
+  else
+    Result := TDAQueryBuilder(NewInstance).Create(FUnionCollections);
+end;
+
+
+procedure TDAQueryBuilder.Assign(Source: TPersistent);
+begin
+  inherited;
+  if Source is TDASimpleQueryBuilder then begin
+    FOrderByCollection.Assign(TDAQueryBuilder(Source).OrderBy);
+  end;
+end;
+
+procedure TDAQueryBuilder.Clear;
+begin
+  inherited;
+  FOrderByCollection.Clear;
+  FUnionCollections.Clear;
+end;
+
+
+constructor TDAQueryBuilder.Create;
+begin
+  Create(nil);
+end;
+
+constructor TDAQueryBuilder.Create(Collection: TCollection);
+begin
+  FOrderByCollection := TDAOrderByCollection.Create(TDAOrderByItem);
+  FUnionCollections := TDAUnionCollections.Create(TDASimpleQueryBuilder);
+  inherited;
+end;
+
+function TDAQueryBuilder.CreateOrderByClause: string;
+var
+  i: integer;
+begin
+  Result := '';
+  for i := 0 to OrderBy.Count - 1 do begin
+    if i <> 0 then Result := Result + ', ';
+    with TDAOrderByItem(OrderBy.Items[i]) do
+      Result := Result + GenerateFieldName(TableName, FieldName);
+  end;
+end;
+
+function TDAQueryBuilder.CreateUnionClause(const AUnion: TDASimpleQueryBuilder): string;
+begin
+  AUnion.Connection := Self.Connection;
+  Result := AUnion.GenerateSelectSQL;
+end;
+
+destructor TDAQueryBuilder.Destroy;
+begin
+  FOrderByCollection.Free;
+  FUnionCollections.Free;
+  inherited;
+end;
+
+function TDAQueryBuilder.GenerateSelectSQL: string;
+const
+  c_Indent = '   ';
+var
+  i: integer;
+  lUnion, lOrderBy: string;
+begin
+  Result := inherited GenerateSelectSQL;
+  lOrderBy := CreateOrderByClause;
+  for I := 0 to FUnionCollections.Count - 1 do begin
+    lUnion := CreateUnionClause(TDASimpleQueryBuilder(FUnionCollections.Items[i]));
+    if lUnion <> '' then
+      Result := Result + sLineBreak + 'UNION' + sLineBreak + lUnion;
+  end;
+  if lOrderBy <> '' then Result := Result + sLineBreak + 'ORDER BY' + sLineBreak + c_Indent + lOrderBy;
+end;
+
+{$IFDEF DataAbstract_Trial}
+{$INCLUDE DataAbstract_Trial.inc}
+{$ENDIF DataAbstract_Trial}
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAInterfacesEx.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAInterfacesEx.pas
new file mode 100644
index 0000000..d9ba34b
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAInterfacesEx.pas	
@@ -0,0 +1,37 @@
+unit uDAInterfacesEx;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  uDAInterfaces;
+
+type
+  IDAConnectionMetaData = interface(IDAConnection)
+    ['{ACDD5335-B7CB-4E0F-8241-4A323D4731F1}']
+  end;
+
+  IDAConnectionModelling = interface(IDAConnection)
+    ['{ACDD5335-B7CB-4E0F-8241-4A323D4731F1}']
+
+    function FieldToDeclaration(aField: TDAField): string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function BuildCreateTableSQL(aDataSet: TDADataSet; const aOverrideName: string = ''): string; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure CreateTable(aDataSet: TDADataSet; const aOverrideName: string = ''); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  end;
+
+implementation
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAKDBInfo.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAKDBInfo.pas
new file mode 100644
index 0000000..c0f4ef0
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAKDBInfo.pas	
@@ -0,0 +1,325 @@
+unit uDAKDBInfo;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  Classes,
+  kdbInfo, kdbstruc,
+  uDAInterfaces, uDAClasses;
+
+type
+  TDAKDBConnectionInfo = class(TKDBInfo)
+  private
+    fConnection: IDAConnection;
+    fDatabaseName: string;
+    procedure AddGroupWithFields(aStructure: TKDBStructure; aTable: TDSTable);
+  protected
+    procedure TablesByDatabase(TablesList : TStrings); override;
+    procedure FieldsByTable(const TableName : string; FieldsList : TDBFieldList); override;
+    procedure AvailableDatabases(DBList : TStrings); override; //NEW: replacement for GetDatabaseNames
+  public
+    property Connection: IDAConnection read fConnection write fConnection;
+    property DatabaseName: string read fDatabaseName write fDatabaseName;
+
+    procedure GetSQLValues(SQL : String; AValues,AItems : TStrings); override;
+
+    procedure FillStructure(aStructure: TKDBStructure);
+  end;
+
+  TDAKDBSchemaInfo = class(TKDBInfo)
+  private
+    fSchema: TDASchema;
+    fDatabaseName: string;
+    procedure AddGroupWithFields(aStructure: TKDBStructure; aTable: TDSTable);
+    procedure SetSchema(const Value: TDASchema);
+  protected
+    procedure TablesByDatabase(TablesList : TStrings); override;
+    procedure FieldsByTable(const TableName : string; FieldsList : TDBFieldList); override;
+    procedure AvailableDatabases(DBList : TStrings); override; //NEW: replacement for GetDatabaseNames
+
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+  public
+    property Schema: TDASchema read fSchema write SetSchema;
+    property DatabaseName: string read fDatabaseName write fDatabaseName;
+
+    procedure GetSQLValues(SQL : String; AValues,AItems : TStrings); override;
+
+    procedure FillStructure(aStructure: TKDBStructure);
+  end;
+
+implementation
+
+uses
+  uROClasses, sqglobal, SysUtils, Math;
+
+{ TDAKDBConnectionInfo }
+
+procedure TDAKDBConnectionInfo.FieldsByTable(const TableName: string; FieldsList: TDBFieldList);
+var
+  lNewField: TDBFieldInfo;
+  i: Integer;
+  lFields: TDAFieldCollection;
+begin
+  inherited;
+  fConnection.GetTableFields(TableName, lFields);
+  FieldsList.Clear();
+  for i := 0 to lFields.Count-1 do begin
+    lNewField := TDBFieldInfo.Create();
+    lNewField.FieldName := lFields[i].Name;
+    lNewField.FieldSize := lFields[i].Size;
+    lNewField.FieldType := DATypeToVCLType(lFields[i].DataType);
+    FieldsList.Add(lNewField);
+  end; { for }
+end;
+
+
+procedure TDAKDBConnectionInfo.AvailableDatabases(DBList : TStrings);
+  //NEW: previously realization of GetDatabaseNames, name Alist replaced with DBList
+begin
+  inherited;
+  DBList.Clear();
+  DBList.Add(DatabaseName);
+end;
+
+procedure TDAKDBConnectionInfo.GetSQLValues(SQL: String; AValues, AItems: TStrings);
+begin
+  inherited;
+
+end;
+
+procedure TDAKDBConnectionInfo.TablesByDatabase(TablesList: TStrings);
+var
+  lROStrings: IROStrings;
+begin
+  inherited;
+  fConnection.GetTableNames(lROStrings);
+  TablesList.Clear();
+  TablesList.Text := lROStrings.Text;
+end;
+
+
+
+
+
+
+procedure TDAKDBConnectionInfo.AddGroupWithFields(aStructure: TKDBStructure; aTable: TDSTable);
+var
+  G : TDSFieldGroup;
+  //LastRootNode, GroupNode : TTreeNode;
+  I,Idx : integer;
+  TblFields : TStrings;
+begin
+  TblFields := TStringList.Create;
+  try
+    G := TDSFieldGroup.Create(aStructure);
+    G.GroupName := ATable.TableName;
+    aStructure.FieldGroups.Add(G);
+    //FillGroupsCombo;
+
+    {LastRootNode := nil;
+    if not chbRootFirst.Checked then
+    begin
+      for I := tvFields.Items.Count - 1 downto 0 do
+        if tvFields.Items[I].Parent <> nil then
+        begin
+          if I <> tvFields.Items.Count - 1 then
+            LastRootNode := tvFields.Items[I + 1];
+          break;
+        end;
+    end;}
+
+    {if LastRootNode = nil then
+      GroupNode := tvFields.Items.AddObject(nil, G.GroupName, G)
+    else
+      GroupNode := tvFields.Items.InsertObject(LastRootNode, G.GroupName, G);}
+
+//    ShowField(tvFields);
+
+    aStructure.DatabaseInfo.GetFieldNamesByTable(aTable.TableName, TblFields);
+
+    for I := 0 to TblFields.Count - 1 do
+    begin
+      Idx := aStructure.AddField(kfkData, TblFields[I], aTable.TableName+'.'+TblFields[I], ATable);
+      aStructure.Fields[Idx].AddAppliedOperators;
+      aStructure.Fields[Idx].Group := G;
+      //AddFieldNodeTo(GroupNode, aStructure.Fields[Idx]);
+    end;
+
+  finally
+    TblFields.Free;
+  end;
+end;
+
+procedure TDAKDBConnectionInfo.FillStructure(aStructure: TKDBStructure);
+var
+  lLink: TDSLink;
+  lFKs: TDADriverForeignKeyCollection;
+  i: Integer;
+  sl: TStringList;
+  lTable: integer;
+begin
+  sl := TStringList.Create();
+  try
+
+    aStructure.ClearStructure();
+    aStructure.AddDefOperators(true);
+
+    GetTableNames(sl);
+    sl.Sort;
+    for i := 0 to (sl.Count-1) do begin
+      lTable := aStructure.AddTable(sl[i],sl[i]);
+      AddGroupWithFields(aStructure, aStructure.Tables[lTable]);
+    end;
+
+    Connection.GetForeignKeys(lFKs);
+    try
+      for i := 0 to lFKs.Count-1 do begin
+        lLink := TDSLink.Create();
+        lLink.Table1 := aStructure.TableByName(0, lFKs[i].FKTable);
+        lLink.Table2 := aStructure.TableByName(0, lFKs[i].PKTable);
+        lLink.Fields1.Text := lFKs[i].FKField;
+        lLink.Fields2.Text := lFKs[i].PKField;
+        aStructure.AddLinkByRef(lLink)
+      end;
+
+    finally
+      FreeAndNil(lFKs);
+    end;
+
+
+  finally
+    sl.Free();
+  end;
+
+end;
+
+{ TDAKDBSchemaInfo }
+
+procedure TDAKDBSchemaInfo.AddGroupWithFields(aStructure: TKDBStructure; aTable: TDSTable);
+begin
+
+end;
+
+procedure TDAKDBSchemaInfo.FieldsByTable(const TableName: string; FieldsList: TDBFieldList);
+var
+  lDataSet: TDADataSet;
+  lNewField: TDBFieldInfo;
+  i: Integer;
+begin
+  inherited;
+
+  lDataSet := Schema.Datasets.FindItem(TableName) as TDADataSet;
+  if not Assigned(lDataSet) then
+    RaiseError('DataSet %s not found in Schema',[TableName]);
+
+  FieldsList.Clear();
+  for i := 0 to lDataSet.Fields.Count-1 do begin
+    lNewField := TDBFieldInfo.Create();
+    lNewField.FieldName := lDataSet.Fields[i].Name;
+    lNewField.FieldSize := lDataSet.Fields[i].Size;
+    lNewField.FieldType := DATypeToVCLType(lDataSet.Fields[i].DataType);
+    FieldsList.Add(lNewField);
+  end; { for }
+end;
+
+procedure TDAKDBSchemaInfo.FillStructure(aStructure: TKDBStructure);
+var
+  lLink: TDSLink;
+  lFK: TDADatasetRelationship;
+  i: Integer;
+  sl: TStringList;
+  lTable: integer;
+begin
+
+  aStructure.ClearStructure();
+  aStructure.AddDefOperators(true);
+
+  sl := TStringList.Create();
+  try
+    GetTableNames(sl);
+    sl.Sort;
+    for i := 0 to (sl.Count-1) do begin
+      lTable := aStructure.AddTable(sl[i],sl[i]);
+      AddGroupWithFields(aStructure, aStructure.Tables[lTable]);
+    end;
+  finally
+    sl.Free();
+  end;
+
+  for i := 0 to Schema.Relationships.Count-1 do begin
+    lLink := TDSLink.Create();
+    lFK := Schema.Relationships[i];
+    lLink.Table1 := aStructure.TableByName(0, lFK.DetailDatasetName);
+    lLink.Table2 := aStructure.TableByName(0, lFK.MasterDatasetName);
+
+    //ToDo: add list
+    //lLink.Fields1.Text := lFK.DetailFields;
+    //lLink.Fields2.Text := lFK.MasterFields;
+    aStructure.AddLinkByRef(lLink)
+  end;
+
+end;
+
+procedure TDAKDBSchemaInfo.AvailableDatabases(DBList : TStrings);
+  //NEW: previously realization of GetDatabaseNames, name Alist replaced with DBList
+begin
+  inherited;
+  DBList.Clear();
+  DBList.Add(DatabaseName);
+end;
+
+procedure TDAKDBSchemaInfo.TablesByDatabase(TablesList: TStrings);
+var
+  i: Integer;
+begin
+  inherited;
+  TablesList.BeginUpdate();
+  try
+    TablesList.Clear();
+    for i := 0 to Schema.Datasets.Count-1 do begin
+      TablesList.Add(Schema.Datasets[i].Name);
+    end; { for }
+  finally
+    TablesList.EndUpdate();
+  end;
+end;
+
+procedure TDAKDBSchemaInfo.GetSQLValues(SQL: String; AValues,
+  AItems: TStrings);
+begin
+  inherited;
+
+end;
+
+procedure TDAKDBSchemaInfo.Notification(AComponent: TComponent;
+  Operation: TOperation);
+begin
+  inherited;
+  if Operation <> opRemove then exit;
+  if AComponent = Schema then Schema := nil;
+end;
+
+procedure TDAKDBSchemaInfo.SetSchema(const Value: TDASchema);
+begin
+  if (fSchema <> Value) then begin
+    fSchema := Value;
+    if Assigned(fSchema) then fSchema.FreeNotification(self);
+  end;
+end;
+
+end.
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAMacroProcessors.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAMacroProcessors.pas
new file mode 100644
index 0000000..c83e81b
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAMacroProcessors.pas	
@@ -0,0 +1,509 @@
+unit uDAMacroProcessors;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses uDAEngine;
+
+(*
+  Macros:
+
+    -------------------- Date --------------------
+
+       Returns the current date from the server
+
+       Syntax: {Date()}
+       Example: SELECT * FROM Table WHERE OrderDate>{Date()}
+
+       Parameters: this macro has no parameters
+
+    -------------------- Time --------------------
+
+       Returns the current time from the server
+
+       Syntax: {Time()}
+       Example: SELECT * FROM Table WHERE OrderDate>{Time()}
+
+       Parameters: this macro has no parameters
+
+    -------------------- DateTime --------------------
+
+       Returns the current datetime from the server
+
+       Syntax: {DateTime()}
+       Example: SELECT * FROM Table WHERE OrderDate>{DateTime()}
+
+       Parameters: this macro has no parameters
+
+    -------------------- AddTime --------------------
+
+       Returns a new datetime value based on adding an interval to the specified date.
+       Not all databases support this macro.
+
+       Syntax: {AddTime(<date>, <interval>, <interval_type>)}
+       Example: SELECT * FROM Table WHERE OrderDate>{AddTime(Date(), 2, day)}
+
+       Parameters: <date>: a valid date
+                   <interval>: number of days, weeks, etc as per next parameter
+                   <interval_type>: day, week, year, hour, min, sec
+
+     -------------------- FormatDateTime --------------------
+
+       Formats the specified datetime to the datetime format used by the database
+
+       Syntax: {FormatDateTime(<date>)}
+       Example: SELECT * FROM Table WHERE OrderDate>{FormatDateTime('12/22/2003 15:22:34.123')}
+
+       Parameters: <date>: a string expression representing a data in format MM/DD/YYYY HH24:MM:SS.MS
+
+     -------------------- FormatDate --------------------
+
+       Formats the specified date to the date format used by the database
+
+       Syntax: {FormatDateTime(<date>)}
+       Example: SELECT * FROM Table WHERE OrderDate>{FormatDate('12/22/2003')}
+
+       Parameters: <date>: a string expression representing a data in format MM/DD/YYYY
+
+     -------------------- Length --------------------
+
+       Returns the length of the given string
+
+       Syntax: {Length(<string>)}
+       Example: SELECT * FROM Table WHERE {Length(CustomerID)}>3
+
+       Parameters: <string>: a text string
+
+     -------------------- LowerCase --------------------
+
+       Converts the given string to lower case
+
+       Syntax: {LowerCase(<string>)}
+       Example: SELECT * FROM Table WHERE {LowerCase(CustomerID)}='alfki'
+
+       Parameters: <string>: a text string
+
+     -------------------- UpperCase --------------------
+
+       Converts the given string to upper case
+
+       Syntax: {UpperCase(<string>)}
+       Example: SELECT * FROM Table WHERE {UpperCase(CustomerID)}='ALFKI'
+
+       Parameters: <string>: a text string
+
+     -------------------- TrimLeft --------------------
+
+       Removes the leading spaces from a string
+
+       Syntax: {TrimLeft(<string>)}
+       Example: SELECT * FROM Table WHERE {TrimLeft(CustomerID)}='ALFKI'
+
+       Parameters: <string>: a text string
+
+     -------------------- TrimRight --------------------
+
+       Removes the trailing spaces from a string
+
+       Syntax: {TrimRight(<string>)}
+       Example: SELECT * FROM Table WHERE {TrimRight(CustomerID)}='ALFKI'
+
+       Parameters: <string>: a text string
+
+     -------------------- Copy --------------------
+
+       Returns <count> characters starting from <index> from <string>
+
+       Syntax: {Copy(<string>, <index>, <count>)}
+       Example: SELECT * FROM Table WHERE OrderDate>{Date()}
+
+       Parameters:
+         <string>: a field name or a string
+         <index>: the position from where to start copying
+         <count>: the number of characters to copy
+
+     -------------------- NoLockHint --------------------
+
+       Returns (NOLOCK) for MSSQL server and empty string for other databases
+
+       Syntax: {NoLockHint}
+       Example: SELECT * FROM Table {NoLockHint}
+
+*)
+
+type { TDAMSSQLMacroProcessor }
+  TDAMSSQLMacroProcessor = class(TDASQLMacroProcessor)
+  protected
+    function DateTime(Sender: TObject; const Parameters: array of string): string; override;
+
+    function AddTime(Sender: TObject; const Parameters: array of string): string; override;
+
+    function Length(Sender: TObject; const Parameters: array of string): string; override;
+    function LowerCase(Sender: TObject; const Parameters: array of string): string; override;
+    function UpperCase(Sender: TObject; const Parameters: array of string): string; override;
+    function TrimLeft(Sender: TObject; const Parameters: array of string): string; override;
+    function TrimRight(Sender: TObject; const Parameters: array of string): string; override;
+    function Copy(Sender: TObject; const Parameters: array of string): string; override;
+    function Nolock(Sender: TObject; const Parameters: array of string): string; override;
+
+  public
+    constructor Create;
+  end;
+  TMSSQLMacroProcessor = TDAMSSQLMacroProcessor;
+
+     { TDAIBMacroProcessor }
+  TDAIBMacroProcessor = class(TDASQLMacroProcessor)
+  protected
+    function DateTime(Sender: TObject; const Parameters: array of string): string; override;
+
+    function AddTime(Sender: TObject; const Parameters: array of string): string; override;
+
+    function Length(Sender: TObject; const Parameters: array of string): string; override;
+    function LowerCase(Sender: TObject; const Parameters: array of string): string; override;
+    function UpperCase(Sender: TObject; const Parameters: array of string): string; override;
+    function TrimLeft(Sender: TObject; const Parameters: array of string): string; override;
+    function TrimRight(Sender: TObject; const Parameters: array of string): string; override;
+    function Copy(Sender: TObject; const Parameters: array of string): string; override;
+    function Nolock(Sender: TObject; const Parameters: array of string): string; override;
+
+  public
+    constructor Create;
+  end;
+  TIBMacroProcessor = TDAIBMacroProcessor;
+
+     { TDAOracleMacroProcessor }
+  TDAOracleMacroProcessor = class(TDASQLMacroProcessor)
+    function DateTime(Sender: TObject; const Parameters: array of string): string; override;
+
+    function AddTime(Sender: TObject; const Parameters: array of string): string; override;
+
+    function Length(Sender: TObject; const Parameters: array of string): string; override;
+    function LowerCase(Sender: TObject; const Parameters: array of string): string; override;
+    function UpperCase(Sender: TObject; const Parameters: array of string): string; override;
+    function TrimLeft(Sender: TObject; const Parameters: array of string): string; override;
+    function TrimRight(Sender: TObject; const Parameters: array of string): string; override;
+    function Copy(Sender: TObject; const Parameters: array of string): string; override;
+    function FormatDate(Sender: TObject; const Parameters: array of string): string; override;
+    function FormatDateTime(Sender: TObject; const Parameters: array of string): string; override;
+    function Nolock(Sender: TObject; const Parameters: array of string): string; override;
+
+  public
+    constructor Create;
+  end;
+  TOracleMacroProcessor = TDAOracleMacroProcessor;
+
+     { TDADBISAMMacroProcessor }
+  TDADBISAMMacroProcessor = class(TDASQLMacroProcessor)
+    function DateTime(Sender: TObject; const Parameters: array of string): string; override;
+
+    function AddTime(Sender: TObject; const Parameters: array of string): string; override;
+
+    function Length(Sender: TObject; const Parameters: array of string): string; override;
+    function LowerCase(Sender: TObject; const Parameters: array of string): string; override;
+    function UpperCase(Sender: TObject; const Parameters: array of string): string; override;
+    function TrimLeft(Sender: TObject; const Parameters: array of string): string; override;
+    function TrimRight(Sender: TObject; const Parameters: array of string): string; override;
+    function Copy(Sender: TObject; const Parameters: array of string): string; override;
+    function Nolock(Sender: TObject; const Parameters: array of string): string; override;
+
+  public
+    constructor Create;
+  end;
+  TDBISAMMacroProcessor = TDADBISAMMacroProcessor;
+
+implementation
+
+uses SysUtils;
+
+{ TDAMSSQLMacroProcessor }
+
+constructor TDAMSSQLMacroProcessor.Create;
+begin
+  inherited Create('yyyy-mm-dd', 'yyyy-mm-dd hh:nn:ss.zzz', FALSE, '@');
+end;
+
+function TDAMSSQLMacroProcessor.AddTime(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := Format('dateadd(%s, %s, %s)', [Parameters[2], Parameters[1], Parameters[0]]);
+end;
+
+function TDAMSSQLMacroProcessor.Copy(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := Format('substring(%s, %s, %s)', [Parameters[0], Parameters[1], Parameters[2]]);
+end;
+
+function TDAMSSQLMacroProcessor.DateTime(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := 'GetDate()';
+end;
+
+function TDAMSSQLMacroProcessor.Length(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := 'len(' + Parameters[0] + ')'
+end;
+
+function TDAMSSQLMacroProcessor.LowerCase(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := 'lower(' + Parameters[0] + ')'
+end;
+
+function TDAMSSQLMacroProcessor.TrimLeft(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := 'ltrim(' + Parameters[0] + ')'
+end;
+
+function TDAMSSQLMacroProcessor.TrimRight(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := 'rtrim(' + Parameters[0] + ')'
+end;
+
+function TDAMSSQLMacroProcessor.UpperCase(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := 'upper(' + Parameters[0] + ')'
+end;
+
+function TDAMSSQLMacroProcessor.Nolock(Sender: TObject; const Parameters: array of string): string;
+begin
+  result := ' (NOLOCK) ';
+end;
+
+{ TDAIBMacroProcessor }
+
+constructor TDAIBMacroProcessor.Create;
+begin
+  inherited Create('yyyy-mm-dd', 'yyyy-mm-dd hh:mm:ss.zzz', FALSE);
+end;
+
+function TDAIBMacroProcessor.AddTime(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := '???'
+end;
+
+function TDAIBMacroProcessor.Copy(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := Format('substring(%s from %s for %s)', [Parameters[0], Parameters[1], Parameters[2]]);
+end;
+
+function TDAIBMacroProcessor.DateTime(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := '(select current_timestamp from rdb$database)';
+end;
+
+function TDAIBMacroProcessor.Length(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := Format('char_length(%s)', [Parameters[0]]);
+end;
+
+function TDAIBMacroProcessor.LowerCase(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := 'lower(' + Parameters[0] + ')'
+end;
+
+function TDAIBMacroProcessor.TrimLeft(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := 'trim ( leading from ' + Parameters[0] + ')'
+end;
+
+function TDAIBMacroProcessor.TrimRight(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := 'trim ( trailing from ' + Parameters[0] + ')'
+end;
+
+function TDAIBMacroProcessor.UpperCase(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := 'upper(' + Parameters[0] + ')'
+end;
+
+function TDAIBMacroProcessor.Nolock(Sender: TObject; const Parameters: array of string): string;
+begin
+  result := '';
+end;
+
+{ TDAOracleMacroProcessor }
+
+constructor TDAOracleMacroProcessor.Create;
+begin
+  inherited Create('MM/DD/YYYY', 'MM/DD/YYYY HH:MM:SS.ZZZ', FALSE);
+end;
+
+function TDAOracleMacroProcessor.FormatDate(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := StringReplace('TO_DATE(''' + Parameters[0] + ''', ''MM/DD/YYYY'')', '''''', '''', [rfReplaceAll]);
+end;
+
+function TDAOracleMacroProcessor.FormatDateTime(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := StringReplace('TO_DATE(''' + Parameters[0] + ''', ''MM/DD/YYYY HH24:MI:SS.FF3'')', '''''', '''', [rfReplaceAll]);
+end;
+
+function TDAOracleMacroProcessor.AddTime(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := Parameters[0] + '+';
+
+  if SameText(Parameters[2], 'DAY') then
+    result := result + Parameters[1]
+  else if SameText(Parameters[2], 'WEEK') then
+    result := result + Parameters[1] + '*7'
+  else if SameText(Parameters[2], 'YEAR') then
+    result := result + Parameters[1] + '*365'
+  else if SameText(Parameters[2], 'HOUR') then
+    result := result + Parameters[1] + '/24'
+  else if SameText(Parameters[2], 'MIN') then
+    result := result + Parameters[1] + '/1440'
+  else if SameText(Parameters[2], 'SEC') then
+    result := result + Parameters[1] + '/86400';
+end;
+
+function TDAOracleMacroProcessor.Copy(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := Format('SUBSTR(%s, %s, %s)', [Parameters[0], Parameters[1], Parameters[2]]);
+end;
+
+function TDAOracleMacroProcessor.DateTime(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := 'SYSDATE'
+end;
+
+function TDAOracleMacroProcessor.Length(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := Format('LENGTH(%s)', [Parameters[0]]);
+end;
+
+function TDAOracleMacroProcessor.LowerCase(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := Format('LOWER(%s)', [Parameters[0]]);
+end;
+
+function TDAOracleMacroProcessor.TrimLeft(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := Format('TRIM(%s)', [Parameters[0]]);
+end;
+
+function TDAOracleMacroProcessor.TrimRight(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := Format('TRIM(%s)', [Parameters[0]]);
+end;
+
+function TDAOracleMacroProcessor.UpperCase(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := Format('UPPER(%s)', [Parameters[0]]);
+end;
+
+function TDAOracleMacroProcessor.Nolock(Sender: TObject; const Parameters: array of string): string;
+begin
+  result := '';
+end;
+{ TDADBISAMMacroProcessor }
+
+constructor TDADBISAMMacroProcessor.Create;
+begin
+  inherited Create('MM/DD/YYYY', 'MM/DD/YYYY HH:MM:SS.ZZZ', FALSE);
+end;
+
+function TDADBISAMMacroProcessor.AddTime(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := Parameters[0] + '+';
+
+  if SameText(Parameters[2], 'DAY') then
+    result := result + Parameters[1]
+  else if SameText(Parameters[2], 'WEEK') then
+    result := result + Parameters[1] + '*7'
+  else if SameText(Parameters[2], 'YEAR') then
+    result := result + Parameters[1] + '*365'
+  else if SameText(Parameters[2], 'HOUR') then
+    result := result + Parameters[1] + '/24'
+  else if SameText(Parameters[2], 'MIN') then
+    result := result + Parameters[1] + '/1440'
+  else if SameText(Parameters[2], 'SEC') then
+    result := result + Parameters[1] + '/86400';
+end;
+
+function TDADBISAMMacroProcessor.Copy(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := Format('SUBSTRING(%s FROM %s FOR %s)', [Parameters[0], Parameters[1], Parameters[2]]);
+end;
+
+function TDADBISAMMacroProcessor.DateTime(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := 'CURRENT_TIMESTAMP'
+end;
+
+function TDADBISAMMacroProcessor.Length(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := Format('LENGTH(%s)', [Parameters[0]]);
+end;
+
+function TDADBISAMMacroProcessor.LowerCase(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := Format('LOWER(%s)', [Parameters[0]]);
+end;
+
+function TDADBISAMMacroProcessor.TrimLeft(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := Format('TRIM(LEADING '' '' FROM %s)', [Parameters[0]]);
+end;
+
+function TDADBISAMMacroProcessor.TrimRight(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := Format('TRIM(TRAILING '' '' FROM %s)', [Parameters[0]]);
+end;
+
+function TDADBISAMMacroProcessor.UpperCase(Sender: TObject;
+  const Parameters: array of string): string;
+begin
+  result := Format('UPPER(%s)', [Parameters[0]]);
+end;
+
+function TDADBISAMMacroProcessor.Nolock(Sender: TObject; const Parameters: array of string): string;
+begin
+  result := '';
+end;
+
+end.
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAMacros.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAMacros.pas
new file mode 100644
index 0000000..010fd51
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAMacros.pas	
@@ -0,0 +1,894 @@
+unit uDAMacros;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  SysUtils, Classes;
+
+type
+  TROPasToken = (
+    CSTI_EOF,
+  {Items that are used internally}
+    CSTIINT_Comment,
+    CSTIINT_WhiteSpace,
+  {Tokens}
+    CSTI_Identifier,
+    CSTI_SemiColon,
+    CSTI_Comma,
+    CSTI_Period,
+    CSTI_Colon,
+    CSTI_OpenRound,
+    CSTI_CloseRound,
+    CSTI_OpenBlock,
+    CSTI_CloseBlock,
+    CSTI_Assignment,
+    CSTI_Equal,
+    CSTI_NotEqual,
+    CSTI_Smaller,
+    CSTI_SmallerEqual,
+    CSTI_Greater,
+    CSTI_GreaterEqual,
+    CSTI_Plus,
+    CSTI_Minus,
+    CSTI_Divide,
+    CSTI_Multiply,
+    CSTI_Integer,
+    CSTI_Real,
+    CSTI_String,
+    CSTI_Date,
+    CSTI_HexInt,
+    CSTI_Modulus,
+    CSTII_In,
+    CSTII_like,
+    CSTII_And,
+    CSTII_Or,
+    CSTII_Xor,
+    CSTII_Not,
+    CSTII_IsNull,
+    CSTII_IsNotNull
+    );
+  {TROParserErrorKind is used to store the parser error}
+  TROParserErrorKind = (iNoError, iCommentError, iStringError, iCharError, iSyntaxError);
+  TROParserErrorEvent = procedure(Parser: TObject; Kind: TROParserErrorKind) of object;
+
+  {TROPacalParser is the parser used to parse the current script}
+  TROPascalParser = class(TObject)
+  private
+    FData: string;
+    FRow,
+      FCol: Cardinal;
+    FLastEnterPos: Longint;
+    FText: PChar;
+    FRealPosition, FTokenLength: Cardinal;
+    FTokenId: TROPasToken;
+    FToken: string;
+    FOriginalToken: string;
+    FParserError: TROParserErrorEvent;
+    fOpenBlockEscape: Boolean;
+    // only applicable when Token in [CSTI_Identifier, CSTI_Integer, CSTI_Real, CSTI_String, CSTI_Char, CSTI_HexInt]
+    procedure SkipWhiteSpaces(var ci: cardinal);
+  public
+    { means you can use [something] to escape identifiers}
+    property OpenBlockEscape: Boolean read fOpenBlockEscape write fOpenBlockEscape;
+    {Go to the next token}
+    procedure Next;
+    {Return the token in case it is a string, char, integer, number or idenTROier}
+    property GetToken: string read FToken;
+    {Return the token but do not uppercase it}
+    property OriginalToken: string read FOriginalToken;
+    {The current token position}
+    property CurrTokenPos: Cardinal read FRealPosition;
+    {The current token ID}
+    property CurrTokenID: TROPasToken read FTokenId;
+    {Row}
+    property Row: Cardinal read FRow;
+    {Column}
+    property Col: Cardinal read FCol;
+    {Load a script}
+    procedure SetText(const Data: string);
+    {Parser error event will be called on (syntax) errors in the script}
+    property OnParserError: TROParserErrorEvent read FParserError write FParserError;
+  end;
+
+  TExternalProc = function(Sender: TObject; const Parameters: array of string): string of object;
+
+  TROMacroProc = class
+  private
+    FExternalProc: TExternalProc;
+    FExternalName: string;
+    FExternalNameHash: Longint;
+    fParamCount: integer;
+  public
+    property ExternalName: string read FExternalName write FExternalName;
+    property ExternalNameHash: Integer read FExternalNameHash write FExternalNameHash;
+    property ExternalProc: TExternalProc read FExternalProc write FExternalProc;
+    property ParamCount: integer read fParamCount write fParamCount;
+  end;
+
+  TROMacroVar = class
+  private
+    FName: string;
+    FNameHash: Longint;
+    FValue: string;
+  public
+    constructor Create(const aName: string);
+    property Name: string read FName;
+    property NameHash: Longint read FNameHash;
+    property Value: string read FValue write FValue;
+  end;
+
+  TOnUnknownIdentifier = function(Sender: TObject; const Name, OrgName: string; var Value: string): Boolean of object;
+  TROMacroParser = class(TInterfacedObject)
+  private
+    FProcs: TList;
+    FVars: TList;
+    FOnUnknownIdentifier: TOnUnknownIdentifier;
+    FParser: TROPascalParser;
+    procedure ParserError(Parser: TObject; Kind: TROParserErrorKind);
+    function GetVarCount: Longint;
+    function GetVarNo(I: Integer): TROMacroVar;
+  public
+    property OnUnknownIdentifier: TOnUnknownIdentifier read FOnUnknownIdentifier write FOnUnknownIdentifier;
+
+    procedure ClearProcs;
+    procedure RegisterProc(const Name: string; ExProc: TExternalProc; aParamCount: integer);
+
+    property VariableCount: Longint read GetVarCount;
+    property Variable[I: Longint]: TROMacroVar read GetVarNo;
+
+    procedure DeleteVariable(I: Longint);
+    procedure ClearVariables;
+    function AddVariable(const Name: string): TROMacroVar;
+    function IndexOfName(const aName: string): integer;
+    constructor Create;
+
+    function EvalToken(const Text: string): string;
+    function Eval(const Text: string; TextDelimiter: char = ''''): string;
+
+    destructor Destroy; override;
+  end;
+
+function MakeHash(const s: string): Longint;
+function FastUppercase(const s: string): string;
+
+implementation
+uses
+  uROClasses;
+
+function MakeHash(const s: string): Longint;
+{small hash maker}
+var
+  I: Integer;
+begin
+  Result := 0;
+  for I := 1 to Length(s) do
+    Result := ((Result shl 7) or (Result shr 25)) + Ord(s[I]);
+end;
+
+function FastUppercase(const s: string): string;
+begin
+  Result := Uppercase(s);
+end;
+
+procedure TROPascalParser.Next;
+var
+  Err: TROParserErrorKind;
+
+  function _GetToken(CurrTokenPos, CurrTokenLen: Cardinal): string;
+  var
+    s: string;
+  begin
+    SetLength(s, CurrTokenLen);
+    Move(FText[CurrTokenPos], S[1], CurrtokenLen*sizeOf(char));
+    Result := s;
+  end;
+
+  function ParseToken(var CurrTokenPos, CurrTokenLen: Cardinal; var CurrTokenId: TROPasToken): TROParserErrorKind;
+  {Parse the token}
+  var
+    ct, ci, cx: Cardinal;
+    s: string;
+    hs: Boolean;
+  begin
+    ParseToken := iNoError;
+    ct := CurrTokenPos;
+    case FText[ct] of
+      #0: begin
+          CurrTokenId := CSTI_EOF;
+          CurrTokenLen := 0;
+        end;
+      'A'..'Z', 'a'..'z', '_', '@': begin
+          ci := ct + 1;
+          while CharInSet(FText[ci], ['_', '0'..'9', 'a'..'z', 'A'..'Z']) do begin
+            Inc(ci);
+          end;
+          CurrTokenLen := ci - ct;
+          CurrTokenId := CSTI_Identifier;
+          s :=  FastUppercase(_GetToken(CurrTokenPos, CurrTokenLen));
+          case s[1] of
+            'I': if s = 'IN' then begin
+                   CurrTokenId := CSTII_In;
+                 end
+                 else if s = 'IS' then begin
+                   SkipWhiteSpaces(ci);
+                   cx:=ci;
+                   while CharInSet(FText[ci], ['a'..'z', 'A'..'Z']) do Inc(ci);
+                   s := FastUppercase(_GetToken(cx, ci-cx));
+                   if s = 'NULL' then begin //is null
+                     CurrTokenLen := ci - ct;
+                     CurrTokenId := CSTII_IsNull;
+                   end
+                   else if s = 'NOT' then begin
+                     SkipWhiteSpaces(ci);
+                     cx:=ci;
+                     while CharInSet(FText[ci], ['a'..'z', 'A'..'Z']) do Inc(ci);
+                     s := FastUppercase(_GetToken(cx, ci-cx));
+                     if s = 'NULL' then begin //is not null
+                       CurrTokenLen := ci - ct;
+                       CurrTokenId := CSTII_IsNotNull;
+                     end
+                   end;
+                 end;
+            'L': if s = 'LIKE' then CurrTokenId := CSTII_like;
+            'A': if s = 'AND' then CurrTokenId := CSTII_And;
+            'O': if s = 'OR' then CurrTokenId := CSTII_Or;
+            'X': if s = 'XOR' then CurrTokenId := CSTII_Xor;
+            'N': if s = 'NOT' then CurrTokenId := CSTII_Not;
+          end;
+
+        end;
+      '$': begin
+          ci := ct + 1;
+
+          while CharInSet(FText[ci], ['0'..'9', 'a'..'f', 'A'..'F']) do
+            Inc(ci);
+
+          CurrTokenId := CSTI_HexInt;
+          CurrTokenLen := ci - ct;
+        end;
+
+      '0'..'9': begin
+          hs := False;
+          ci := ct;
+          while CharInSet(FText[ci], ['0'..'9']) do begin
+            Inc(ci);
+            if (FText[ci] = '.') and (not hs) then begin
+              if FText[ci + 1] = '.' then break;
+              hs := True;
+              Inc(ci);
+            end;
+          end;
+
+          if hs then
+            CurrTokenId := CSTI_Real
+          else
+            CurrTokenId := CSTI_Integer;
+
+          CurrTokenLen := ci - ct;
+        end;
+
+      #39: begin
+          ci := ct + 1;
+          while (FText[ci] <> #0) and (FText[ci] <> #13) and
+            (FText[ci] <> #10) and (FText[ci] <> #39) do begin
+            Inc(ci);
+            while (FText[ci] = #39) and (FText[ci + 1] = #39) do
+              Inc(ci, 2);
+          end;
+          if FText[ci] = #39 then
+            CurrTokenId := CSTI_String
+          else begin
+            CurrTokenId := CSTI_String;
+            ParseToken := iStringError;
+          end;
+          CurrTokenLen := ci - ct + 1;
+        end;
+      '#': begin
+          ci := ct + 1;
+          while CharInSet(FText[ci], ['0'..'9', '/']) do begin
+            Inc(ci);
+          end;
+          if FText[ci] <> '#' then begin
+            ParseToken := iCharError;
+            CurrTokenId := CSTI_Date;
+          end
+          else begin
+            inc(ci);
+            CurrTokenId := CSTI_Date;
+          end;
+          CurrTokenLen := ci - ct;
+        end;
+      '=': begin
+          CurrTokenId := CSTI_Equal;
+          CurrTokenLen := 1;
+        end;
+      '>': begin
+          if FText[ct + 1] = '=' then begin
+            CurrTokenid := CSTI_GreaterEqual;
+            CurrTokenLen := 2;
+          end
+          else begin
+            CurrTokenid := CSTI_Greater;
+            CurrTokenLen := 1;
+          end;
+        end;
+      '<': begin
+          if FText[ct + 1] = '=' then begin
+            CurrTokenId := CSTI_SmallerEqual;
+            CurrTokenLen := 2;
+          end
+          else if FText[ct + 1] = '>' then begin
+            CurrTokenId := CSTI_NotEqual;
+            CurrTokenLen := 2;
+          end
+          else begin
+            CurrTokenId := CSTI_Smaller;
+            CurrTokenLen := 1;
+          end;
+        end;
+      ')': begin
+          CurrTokenId := CSTI_CloseRound;
+          CurrTokenLen := 1;
+        end;
+      '(': begin
+          if FText[ct + 1] = '*' then begin
+            ci := ct + 1;
+            while (FText[ci] <> #0) do begin
+              if (FText[ci] = #13) then begin
+                if FText[ci + 1] = #10 then
+                  Inc(ci);
+                FLastEnterPos := ci;
+                Inc(FRow);
+              end
+              else if FText[ci] = #10 then begin
+                FLastEnterPos := ci;
+                Inc(FRow);
+              end;
+              if (FText[ci] = '*') and (FText[ci + 1] = ')') then
+                Break;
+              Inc(ci);
+            end;
+            if (FText[ci] = #0) then begin
+              CurrTokenId := CSTIINT_Comment;
+              ParseToken := iCommentError;
+            end
+            else begin
+              CurrTokenId := CSTIINT_Comment;
+              Inc(ci, 2);
+            end;
+            CurrTokenLen := ci - ct;
+          end
+          else begin
+            CurrTokenId := CSTI_OpenRound;
+            CurrTokenLen := 1;
+          end;
+        end;
+      '[': begin
+          if fOpenBlockEscape then begin
+            ci := ct + 1;
+            while not CharInSet(FText[ci], [']', #0]) do begin
+              if FText[ci] = '\' then
+                inc(Ci);
+              Inc(ci);
+            end;
+            if FText[ci] = ']' then Inc(ci);
+            CurrTokenLen := ci - ct;
+            CurrTokenId := CSTI_Identifier;
+          end else begin
+            CurrTokenId := CSTI_OpenBlock;
+            CurrTokenLen := 1;
+          end;
+        end;
+      ']': begin
+          CurrTokenId := CSTI_CloseBlock;
+          CurrTokenLen := 1;
+        end;
+      ',': begin
+          CurrTokenId := CSTI_Comma;
+          CurrTokenLen := 1;
+        end;
+      '.': begin
+          CurrTokenId := CSTI_Period;
+          CurrTokenLen := 1;
+        end;
+      ';': begin
+          CurrTokenId := CSTI_Semicolon;
+          CurrTokenLen := 1;
+        end;
+      ':': begin
+          if FText[ct + 1] = '=' then begin
+            CurrTokenId := CSTI_Assignment;
+            CurrTokenLen := 2;
+          end
+          else begin
+            CurrTokenId := CSTI_Colon;
+            CurrTokenLen := 1;
+          end;
+        end;
+      '+': begin
+          CurrTokenId := CSTI_Plus;
+          CurrTokenLen := 1;
+        end;
+      '-': begin
+          CurrTokenId := CSTI_Minus;
+          CurrTokenLen := 1;
+        end;
+      '%': begin
+          CurrTokenId := CSTI_Modulus;
+          CurrTokenLen := 1;
+        end;
+      '*': begin
+          CurrTokenId := CSTI_Multiply;
+          CurrTokenLen := 1;
+        end;
+      '/': begin
+          if FText[ct + 1] = '/' then begin
+            ci := ct + 1;
+            while (FText[ci] <> #0) and (FText[ci] <> #13) and (FText[ci] <> #10) do begin
+              Inc(ci);
+            end;
+            if (FText[ci] = #0) then begin
+              CurrTokenId := CSTIINT_Comment;
+              ParseToken := iCommentError;
+            end
+            else begin
+              if (FText[ci] = #13) and (FText[ci + 1] = #10) then
+                Inc(ci);
+              Inc(FRow);
+              FLastEnterPos := ci;
+
+              CurrTokenId := CSTIINT_Comment;
+            end;
+            CurrTokenLen := ci - ct + 1;
+          end
+          else begin
+            CurrTokenId := CSTI_Divide;
+            CurrTokenLen := 1;
+          end;
+        end;
+      #32, #9, #13, #10: begin
+          ci := ct + 1;
+          SkipWhiteSpaces(ci);
+          CurrTokenId := CSTIINT_WhiteSpace;
+          CurrTokenLen := ci - ct;
+        end;
+      '{': begin
+          ci := ct + 1;
+          while (FText[ci] <> #0) and (FText[ci] <> '}') do begin
+            if (FText[ci] = #13) then begin
+              if FText[ci + 1] = #10 then
+                Inc(ci);
+              FLastEnterPos := ci;
+              Inc(FRow);
+            end
+            else if FText[ci] = #10 then begin
+              FLastEnterPos := ci;
+              Inc(FRow);
+            end;
+            Inc(ci);
+          end;
+          if (FText[ci] = #0) then begin
+            CurrTokenId := CSTIINT_Comment;
+            ParseToken := iCommentError;
+          end
+          else
+            CurrTokenId := CSTIINT_Comment;
+          CurrTokenLen := ci - ct + 1;
+        end;
+    else begin
+        ParseToken := iSyntaxError;
+        CurrTokenId := CSTIINT_Comment;
+        CurrTokenLen := 1;
+      end;
+    end;
+  end;
+  //-------------------------------------------------------------------
+begin
+  if FText = nil then begin
+    FTokenLength := 0;
+    FRealPosition := 0;
+    FRow := 1;
+    FLastEnterPos := 0;
+    FTokenId := CSTI_EOF;
+    Exit;
+  end;
+  repeat
+    FRealPosition := FRealPosition + FTokenLength;
+    Err := ParseToken(FRealPosition, FTokenLength, FTokenID);
+    if Err <> iNoError then begin
+      FTokenLength := 0;
+      FTokenId := CSTI_EOF;
+      FToken := '';
+      FOriginalToken := '';
+      FCol := Longint(FRealPosition) - FLastEnterPos;
+      if @FParserError <> nil then FParserError(Self, Err);
+      exit;
+    end;
+    case FTokenID of
+      CSTIINT_Comment, CSTIINT_WhiteSpace: Continue;
+      CSTI_Integer, CSTI_Real, CSTI_String, CSTI_Date, CSTI_HexInt: begin
+          FOriginalToken := _GetToken(FRealPosition, FTokenLength);
+          FToken := FOriginalToken;
+        end;
+      CSTI_Identifier: begin
+          FOriginalToken := _GetToken(FRealPosition, FTokenLength);
+          FToken := FastUppercase(FOriginalToken);
+        end;
+    else begin
+        FOriginalToken := '';
+        FToken := '';
+      end;
+    end;
+    Break;
+  until False;
+  FCol := Longint(FRealPosition) - FLastEnterPos;
+end;
+
+procedure TROPascalParser.SetText(const Data: string);
+begin
+  FData := Data;
+  FText := Pointer(FData);
+  FTokenLength := 0;
+  FRealPosition := 0;
+  FRow := 1;
+  FLastEnterPos := -1;
+  FTokenId := CSTI_EOF;
+  Next;
+end;
+
+{ TROMacroParser }
+
+function TROMacroParser.AddVariable(const Name: string): TROMacroVar;
+begin
+  Result := TROMacroVar.Create(Uppercase(Name));
+  FVars.Add(Result);
+end;
+
+procedure TROMacroParser.ClearProcs;
+var
+  i: Longint;
+begin
+  for i := FProcs.Count - 1 downto 0 do begin
+    TROMacroProc(FPRocs[i]).Free;
+  end;
+  FProcs.Clear;
+end;
+
+procedure TROMacroParser.ClearVariables;
+var
+  i: Longint;
+begin
+  for i := FVars.Count - 1 downto 0 do begin
+    TROMacroVar(FVars[i]).Free;
+  end;
+  FVars.Clear;
+end;
+
+constructor TROMacroParser.Create;
+begin
+  inherited Create;
+  FProcs := TList.Create;
+  FVars := TList.Create;
+  FParser := TROPascalParser.Create;
+  FParser.OnParserError := ParserError;
+end;
+
+procedure TROMacroParser.DeleteVariable(I: Integer);
+var
+  f: TROMacroVar;
+begin
+  f := FVars[i];
+  FVars.Delete(i);
+  f.Free;
+end;
+
+destructor TROMacroParser.Destroy;
+begin
+  FParser.Free;
+  ClearProcs;
+  ClearVariables;
+  FProcs.Free;
+  FVars.Free;
+  inherited Destroy;
+end;
+
+function MKString(const s: string): string;
+begin
+  Result := StringReplace(s, #39#39, #39, [rfReplaceAll]);
+  Delete(Result, 1, 1);
+  Delete(Result, Length(Result), 1);
+end;
+
+function SQLEscapeStr(const s: string): string;
+var
+  i, l: Longint;
+  c: char;
+begin
+  SetLength(Result, Length(s) + 10);
+  Result[1] := '''';
+  i := 1;
+  l := 1;
+  while i <= length(s) do begin
+    case s[i] of
+      #13: c := 'r';
+      #10: c := 'n';
+      #9: c := 't';
+      '\': c := '\';
+      #39: c := #39;
+      '"': c := '"';
+    else
+      c := #0;
+    end;
+    if c = #0 then begin
+      inc(l);
+      if L > Length(Result) then
+        SetLength(Result, l + 10);
+      Result[l] := s[i];
+    end
+    else begin
+      inc(l, 2);
+      if L > Length(Result) then
+        SetLength(Result, l + 10);
+      Result[l - 1] := '\';
+      Result[l] := c;
+    end;
+    Inc(i);
+  end;
+  SetLength(Result, l + 1);
+  Result[l + 1] := '''';
+end;
+
+type
+  TOperator = (opFirst, opAdd);
+
+function TROMacroParser.EvalToken(const Text: string): string;
+
+  function Evaluate: string;
+  var
+    h, i: Longint;
+    b: Boolean;
+    resval: string;
+
+    procedure CheckParamCount(P: TROMacroProc; Params: array of string);
+    begin
+      if (Length(Params) < P.ParamCount) then
+        raise Exception.CreateFmt('Invalid number of parameters. %d given, %d expected.',
+          [Length(Params), P.ParamCount])
+    end;
+
+    function CallProc(P: TROMacroProc): string;
+    var
+      Params: array of string;
+      s: string;
+    begin
+      Params:=nil;
+      FParser.Next;
+      if FParser.CurrTokenId <> CSTI_OpenRound then begin
+        CheckParamCount(P, Params);
+        Result := P.ExternalProc(Self, Params);
+        exit;
+      end;
+      FParser.Next;
+      while FParser.CurrTokenID <> CSTI_CloseRound do begin
+        s := Evaluate;
+        SetLength(Params, Length(Params) + 1);
+        Params[Length(Params) - 1] := s;
+        if FParser.CurrTokenId = CSTI_CloseRound then begin
+          Break;
+        end;
+        if FParser.CurrTokenId <> CSTI_Comma then
+          raise Exception.Create('[' + IntToStr(FParser.Row) + ':' + IntToStr(FParser.Col) + ']: Closing parenthesis expected');
+        FParser.Next;
+      end;
+      FParser.Next;
+
+      CheckParamCount(P, Params);
+      Result := P.ExternalProc(Self, Params);
+    end;
+  begin
+    Result := '';
+    while true do begin
+      case FParser.CurrTokenID of
+        CSTI_Identifier: begin
+            h := MakeHash(FParser.GetToken);
+            b := False;
+            for i := 0 to FProcs.Count - 1 do begin
+              with TROMacroProc(FProcs[i]) do begin
+                if (ExternalNameHash = h) and SameText(ExternalName, FParser.GetToken) then begin
+                  resval := CallProc(TROMacroProc(FProcs[i]));
+                  b := True;
+                end;
+              end;
+            end;
+            if (not b) then begin
+              for i := 0 to FVars.Count - 1 do begin
+                with TROMacroVar(FVars[i]) do begin
+                  if (NameHash = h) and (Name = FParser.GetToken) then begin
+                    FParser.Next;
+                    resval := Value;
+                    b := True;
+                    break;
+                  end;
+                end;
+              end;
+            end;
+            if (not b) and (@FOnUnknownIdentifier <> nil) then begin
+              b := FOnUnknownIdentifier(Self, FParser.GetToken, FParser.OriginalToken, resval);
+              if b then FParser.Next;
+            end;
+            if not b then
+              raise Exception.Create('[' + IntToStr(FParser.Row) + ':' + IntToStr(FParser.Col) + ']: Unknown identifier ' + FParser.GetToken);
+          end;
+        CSTI_Real, CSTI_Integer: begin
+            Resval := FParser.GetToken;
+            FParser.Next;
+          end;
+        CSTI_HexInt: begin
+            Resval := IntToStr(StrToInt(FParser.GetToken));
+            FParser.Next;
+          end;
+        CSTI_String, CSTI_Date: begin
+            Resval := '';
+            while (FParser.CurrTokenId = CSTI_String) or (FParser.CurrTokenId = CSTI_Date) do begin
+              if FParser.CurrTokenId = CSTI_String then
+                Resval := resval + MKString(FParser.GetToken)
+              else
+                Resval := resval + FParser.GetToken;
+              FParser.Next;
+            end;
+            ResVal := SQLEscapeStr(ResVal);
+          end;
+      end;
+      Result := Result + ResVal;
+      case FParser.CurrTokenId of
+        CSTI_Minus: Result := Result + ' - ';
+        CSTI_Plus: Result := Result + ' + ';
+      else
+        Break;
+      end;
+      FParser.Next;
+    end;
+  end;
+begin
+  FParser.SetText(Text);
+  Result := Evaluate();
+  if FParser.CurrTokenID <> CSTI_EOF then
+  //  Raise Exception.Create('['+IntToStr(FParser.Row)+':'+IntToStr(FParser.Col)+']: End of expression expected');
+end;
+
+const
+  LenInc = 32;
+
+function TROMacroParser.Eval(const Text: string; TextDelimiter: char = ''''): string;
+var
+  start, i, l: Longint;
+  InStr: Boolean;
+  s: string;
+begin
+  SetLength(Result, Length(Text) + LenInc);
+  i := 1;
+  l := 0;
+  InStr := False;
+  while i <= length(Text) do begin
+    if Text[i] = '''' then
+      InStr := not InStr;
+    if (Text[i] = '{') and not (InStr) then begin
+      start := i;
+      inc(i);
+      InStr := False;
+      while i <= Length(Text) do begin
+        case Text[i] of
+          #39: InStr := not InStr;
+          '}': if not InStr then Break;
+        end;
+        Inc(i);
+      end;
+      s := EvalToken(Copy(Text, Start + 1, I - Start - 1));
+      if L + Length(s) > Length(Result) then
+        SetLength(Result, l + Length(s) + LenInc);
+      Start := 1;
+      while Start <= Length(s) do begin
+        Inc(l);
+        Result[l] := s[Start];
+        Inc(Start);
+      end;
+      Inc(i);
+    end
+    else begin
+      inc(l);
+      if L > Length(Result) then
+        SetLength(Result, l + LenInc);
+      Result[l] := Text[i];
+      Inc(i);
+    end;
+  end;
+  SetLength(Result, l);
+end;
+
+function TROMacroParser.GetVarCount: Longint;
+begin
+  Result := FVars.Count;
+end;
+
+function TROMacroParser.GetVarNo(I: Integer): TROMacroVar;
+begin
+  Result := FVars[i];
+end;
+
+procedure TROMacroParser.ParserError(Parser: TObject;
+  Kind: TROParserErrorKind);
+var
+  err: string;
+begin
+  case Kind of
+    iCommentError: err := 'Comment Error';
+    iCharError, iStringError: err := 'String error';
+  else
+    err := 'Syntax Error';
+  end;
+
+  raise Exception.Create('[' + IntToStr(FParser.Row) + ':' + IntToStr(FParser.Col) + ']: ' + err);
+end;
+
+procedure TROMacroParser.RegisterProc(const Name: string; ExProc: TExternalProc; aParamCount: integer);
+var
+  R: TROMacroProc;
+begin
+  R := TROMacroProc.Create;
+  r.ExternalName := UpperCase(Name);
+  r.ExternalNameHash := MakeHash(r.ExternalName);
+  r.ExternalProc := ExProc;
+  r.ParamCount := aParamCount;
+
+  FProcs.Add(r);
+end;
+
+function TROMacroParser.IndexOfName(const aName: string): integer;
+begin
+  For Result:= 0 to FVars.Count -1 do
+    if SameText(aName, TROMacroVar(FVars[Result]).Name) then Exit;
+  Result:=-1;
+end;
+
+{ TROMacroVar }
+
+constructor TROMacroVar.Create(const aName: string);
+begin
+  inherited Create;
+  FName := aName;
+  FNameHash := MakeHash(aName);
+end;
+
+procedure TROPascalParser.SkipWhiteSpaces(var ci: cardinal);
+begin
+  while CharInSet(FText[ci], [#32, #9, #13, #10]) do begin
+    if (FText[ci] = #13) then begin
+      if FText[ci + 1] = #10 then
+        Inc(ci);
+      FLastEnterPos := ci;
+      Inc(FRow);
+    end
+    else if FText[ci] = #10 then begin
+      FLastEnterPos := ci;
+      Inc(FRow);
+    end;
+    Inc(ci);
+  end;
+end;
+
+end.
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAMemDataTable.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAMemDataTable.pas
new file mode 100644
index 0000000..0733137
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAMemDataTable.pas	
@@ -0,0 +1,682 @@
+unit uDAMemDataTable;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  Classes,DB, uDAInterfaces,
+  uDADataTable, uDAMemDataset;
+
+type
+  TDAMemDataset = class(TDAMemoryDataset, IDADataTableDataset)
+  private
+    FDeletedRecordsList: TStringList;
+    FLogDeletedRecords: Boolean;
+    procedure ClearDeletedRecords;
+  protected
+    function GetDataTable: TDADataTable; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure InternalRefresh; override;
+    procedure InternalInitFieldDefs; override;
+    procedure InternalOpen; override;
+    function GetStateFieldValue(State: TDataSetState;Field: TField): Variant; {$IFNDEF FPC}override;{$ENDIF}
+    procedure InternalDelete; override;
+    procedure InternalInsert; override;
+    procedure InternalPost; override;
+    procedure InternalClose; override;
+    procedure AttachToSource(const Source: TDAMemoryDataset); override;
+    procedure DetachFromSource; override;
+    procedure OpenCursor(InfoQuery: Boolean); override;
+    function IsLoadingState: Boolean; override;
+  public
+    constructor Create(AOwner: TComponent); override;
+    destructor Destroy;override;
+  end;
+
+  TDAMemDataTable = class(TDADataTable,IDAMemDatasetBatchAdding,IDARangeController)
+  private
+    fMemDataset: TDAMemDataset;
+    fWasReadonly: Boolean;
+    fMemCloneSource:TDAMemDataTable;
+    function GetIndexDefs: TIndexDefs;
+    function GetIndexName: string;
+    procedure SetIndexDefs(const Value: TIndexDefs);
+    procedure SetIndexName(const Value: string);
+    function GetIndexFieldNames: string;
+    procedure SetIndexFieldNames(const Value: string);
+    function GetAutoCompactRecords: boolean;
+    procedure SetAutoPackRecords(const Value: boolean);
+    procedure SetCloneSource(const Value: TDAMemDataTable);
+    procedure CloneCursorInternalOpen;
+    function GetCloneSource: TDAMemDataTable;
+    function GetAutoSortRecords: Boolean;
+    procedure SetAutoSortRecords(const Value: Boolean);
+  protected
+    // IDAMemDatasetBatchAdding
+    function AllocRecordBuffer: PAnsiChar;
+    procedure FreeRecordBuffer(var Buffer: PAnsiChar);
+    function GetFieldNativeBuffer(Buffer: PAnsiChar; Field: TField): Pointer;
+    function MakeBlobFromString(Blob:AnsiString):pointer;
+    procedure SetNullMask(Buffer: PAnsiChar; Field: TField; const Value: boolean);
+    procedure SetAnsiString(NativeBuf: Pointer; Field: TField; const Value: Ansistring);
+    procedure SetWideString(NativeBuf: Pointer; Field: TField; const Value: Widestring);
+    procedure AddRecordsfromList(AList: TList);
+  protected
+    function GetRangeState: Boolean; override;
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+    function GetDatasetClass: TDatasetClass; override;
+    procedure CreateInternalFields(aDataset: TDataset; someFieldDefinitions: TDAFieldCollection); override;
+    procedure DoSort(const FieldNames: array of string; const Directions: array of TDASortDirection); override;
+
+    procedure SetMasterSource(const Value: TDADataSource); override;
+    function GetMasterSource: TDADataSource; override;
+    procedure SetDetailsFields(const Value: string); override;
+    procedure SetMasterFields(const Value: string); override;
+    function GetDetailFields: string; override;
+    function GetMasterFields: string; override;
+
+    function GetFilter: string; override;
+    function GetFiltered: boolean; override;
+    procedure SetFilter(const Value: string); override;
+    procedure SetFiltered(const Value: boolean); override;
+    function GetReadOnly: boolean; override;
+    procedure SetReadOnly(const Value: boolean); override;
+    procedure DoOpen(IgnoreAutoFetchSettings: Boolean = False); override;
+  public
+    constructor Create(aOwner: TComponent); override;
+    destructor Destroy; override; 
+    procedure EnableConstraints; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure DisableConstraints; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure CloneCursor(Source: TDADataTable); override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  { IDARangeController }
+    procedure ApplyRange; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure CancelRange; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetRange(const StartValues, EndValues: array of const); {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure EditRangeEnd; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure EditRangeStart; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetRangeEnd; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure SetRangeStart; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    //
+    procedure SetKey;
+    procedure EditKey;
+    function FindKey(const KeyValues: array of const): Boolean;
+    procedure FindNearest(const KeyValues: array of const);
+    function GotoKey: Boolean;
+    procedure GotoNearest;
+    function LocateByIndex(const aIndexName: string; const KeyValues: Variant): Boolean;
+    function LookupByIndex(const aIndexName: string; const KeyValues: Variant; const ResultFields: string): Variant;
+    procedure PrepareIndexForSorting(const aIndexName: string = '');
+    procedure CheckProperties(ACheckRemoteFetching: Boolean=False); override;
+  published
+    property IndexDefs: TIndexDefs read GetIndexDefs write SetIndexDefs;
+    property IndexName: string read GetIndexName write SetIndexName;
+    property IndexFieldNames: string read GetIndexFieldNames write SetIndexFieldNames;
+    property AutoCompactRecords: boolean read GetAutoCompactRecords write SetAutoPackRecords default False;
+    property CloneSource: TDAMemDataTable read GetCloneSource write SetCloneSource;
+    property AutoSortRecords: Boolean read GetAutoSortRecords write SetAutoSortRecords default False; 
+  end;
+
+
+implementation
+
+uses SysUtils;
+
+{ TDAMemDataset }
+
+
+procedure TDAMemDataset.AttachToSource(const Source: TDAMemoryDataset);
+var
+  lMemSource: TDAMemDataTable;
+begin
+  inherited;
+  if (Source <> Self) and Active and  (Source is TDAMemDataset) then begin
+    lMemSource := TDAMemDataTable(GetDataTable);
+    lMemSource.Fields.Clear;
+    lMemSource.Fields.Assign(TDAMemDataset(Source).GetDataTable.Fields);
+    lMemSource.Fields.Bind(Self);
+    if Fields.Count > 0 then begin
+      lMemSource.RecIDField := Self.FieldByName(RecIDFieldName) as TIntegerField;
+      lMemSource.RecIDField.Visible := FALSE;
+    end;
+  end;
+end;
+
+procedure TDAMemDataset.ClearDeletedRecords;
+var
+  buf: Dataset_PAnsiChar;
+begin
+  while FDeletedRecordsList.Count <> 0 do begin
+    buf := Pointer(FDeletedRecordsList.Objects[FDeletedRecordsList.Count-1]);
+    FreeRecordBuffer(Buf);
+    FDeletedRecordsList.Delete(FDeletedRecordsList.Count-1);
+  end;
+end;
+
+constructor TDAMemDataset.Create(AOwner: TComponent);
+begin
+  inherited;
+  FDeletedRecordsList := TStringList.Create;
+  FLogDeletedRecords := True;
+end;
+
+destructor TDAMemDataset.Destroy;
+begin
+  inherited;
+  ClearDeletedRecords;
+  FDeletedRecordsList.Free;
+end;
+
+procedure TDAMemDataset.DetachFromSource;
+begin
+  if GetDataTable <> nil then GetDataTable.Close;
+  inherited;
+end;
+
+function TDAMemDataset.GetDataTable: TDADataTable;
+begin
+  result := TDADataTable(Owner);
+end;
+
+function TDAMemDataset.GetStateFieldValue(State: TDataSetState;
+  Field: TField): Variant;
+begin
+  if (State = dsOldValue) and (Self.State in [dsEdit, dsInsert]) then
+    Result := TDAMemDataTable(GetDataTable).fOldValues[Field.Index]
+  else
+   {$IFNDEF FPC} result := Inherited GetStateFieldValue(State, Field){$ENDIF};
+end;
+
+procedure TDAMemDataset.InternalClose;
+begin
+  ClearDeletedRecords;
+  inherited;
+end;
+
+procedure TDAMemDataset.InternalDelete;
+var
+  buf: pointer;
+begin
+  if FLogDeletedRecords and (GetDataTable.LogChanges) then begin
+    buf := CreateMemDatasetRecord(mrEmpty,0,True);
+    RecordToBuffer(CurrentRecord, buf);
+    FDeletedRecordsList.AddObject(Self.Fields[0].AsString, buf);
+  end;
+  inherited;
+end;
+
+procedure TDAMemDataset.InternalInitFieldDefs;
+begin
+  inherited;
+end;
+
+procedure TDAMemDataset.InternalInsert;
+var
+  fCurRec: String;
+  i: integer;
+  buf1: Pointer;
+begin
+  if FLogDeletedRecords then begin
+     fCurRec := IntToStr(GetDataTable.CurrRecId);
+     i := FDeletedRecordsList.IndexOf(fCurRec);
+     if i <> -1  then begin
+       buf1:=ActiveBuffer;
+       DuplicateBuffer(Pointer(FDeletedRecordsList.Objects[i]), buf1, True);
+     end;
+  end;
+  inherited;
+end;
+
+procedure TDAMemDataset.InternalOpen;
+begin
+  inherited;
+end;
+
+procedure TDAMemDataset.InternalPost;
+var
+  i: integer;
+  buf: Dataset_PAnsiChar;
+begin
+  inherited;
+  if FLogDeletedRecords and (State = dsInsert) then begin
+     i := FDeletedRecordsList.IndexOf(Fields[0].AsString);
+     if i <> -1  then begin
+       buf := pointer(FDeletedRecordsList.Objects[i]);
+       FreeRecordBuffer(buf);
+       FDeletedRecordsList.Delete(i);
+     end;
+  end;
+end;
+
+procedure TDAMemDataset.InternalRefresh;
+begin
+  inherited;
+end;
+
+function TDAMemDataset.IsLoadingState: Boolean;
+begin
+  Result := inherited IsLoadingState or ((Owner <> nil) and ((csLoading in Owner.ComponentState)));
+end;
+
+procedure TDAMemDataset.OpenCursor(InfoQuery: Boolean);
+begin
+  inherited;
+  if (not InfoQuery) and Active then
+    FieldByName(RecIDFieldName).Visible := FALSE;
+end;
+
+{ TDAMemDataTable }
+
+
+procedure TDAMemDataTable.AddRecordsfromList(AList: TList);
+var
+  i: integer;
+  Buffer: PAnsiChar;
+  FRecIDOffset: Cardinal;
+begin
+  FRecIDOffset := fMemDataset.GetBin2FieldOffset(0);
+  // setup RecID
+  For i:=0 to AList.Count-1 do begin
+    buffer:=AList[i];
+    PCardinal(PMemDatasetrecord_Native(Buffer)^.Data+FRecIDOffset)^:=CurrRecId;
+    fMemDataset.SetNullMask(PMemDatasetrecord_Native(Buffer)^.Data,0,False);  //RECID
+    CurrRecId:=CurrRecId+1;
+  end;
+  fMemDataset.AddRecordsfromList(AList);
+  fMemDataset.ProcessFilter;
+end;
+
+function TDAMemDataTable.AllocRecordBuffer: PAnsiChar;
+begin
+  Result:= Pointer(fMemDataset.CreateMemDatasetRecord(mrBin2Style,0,False));
+end;
+
+procedure TDAMemDataTable.ApplyRange;
+begin
+  fMemDataset.ApplyRange;
+end;
+
+procedure TDAMemDataTable.CancelRange;
+begin
+  fMemDataset.CancelRange;
+end;
+
+procedure TDAMemDataTable.CheckProperties(ACheckRemoteFetching: Boolean);
+begin
+  inherited;
+//
+end;
+
+procedure TDAMemDataTable.CloneCursor(Source: TDADataTable);
+begin
+  if Source = nil then Exception.Create('CloneCursor. Source should be specified.');
+  if not (Source is TDAMemDataTable) then Exception.Create('Can''t clone cursor from ' + Source.ClassName);
+  if Source = Self then DatabaseError(Self.Name+ ': Can''t use itself as clonesource table');
+  if Active then raise Exception.Create('Datatable is already open');
+  FMemCloneSource := nil;
+  CloneSource := (Source as TDAMemDataTable);;
+  CloneCursorInternalOpen;
+end;
+
+procedure TDAMemDataTable.CloneCursorInternalOpen;
+begin
+  try
+    FMemCloneSource.Open;
+    fMemDataset.Open;
+    RecIDField := fMemDataset.FieldByName(RecIDFieldName) as TIntegerField;
+    RecIDField.Visible := FALSE;
+
+    Fields.Bind(fMemDataset);
+
+    // Prepares the delta
+    Delta := FMemCloneSource.Delta;
+
+    // Finishes to prepare the internal dataset (descendant might need additional customization and might not be open)
+    DoBeforeOpenDataset;
+    if not FMemDataset.Active then FMemDataset.Open;
+    DoAfterOpenDataset;
+  except
+    // Restores the previous state
+    fMemCloneSource := NIL;
+    Delta := NIL;
+    raise;
+  end;
+end;
+
+constructor TDAMemDataTable.Create(aOwner: TComponent);
+begin
+  inherited;
+  fMemDataset := TDAMemDataset(Dataset);
+end;
+
+procedure TDAMemDataTable.CreateInternalFields(aDataset: TDataset;
+  someFieldDefinitions: TDAFieldCollection);
+begin
+  inherited;
+  fMemDataset.Open;
+end;
+
+destructor TDAMemDataTable.Destroy;
+begin
+  CloneSource := nil;
+  inherited;
+end;
+
+procedure TDAMemDataTable.DisableConstraints;
+begin
+  fWasReadonly := ReadOnly;
+  ReadOnly := False;
+//  fMemDataset.DisableConstraints;
+end;
+
+procedure TDAMemDataTable.DoOpen(IgnoreAutoFetchSettings: Boolean);
+begin
+  fCloneSource := fMemCloneSource;
+  inherited;
+end;
+
+procedure TDAMemDataTable.DoSort(const FieldNames: array of string;
+  const Directions: array of TDASortDirection);
+var
+  i: integer;
+  s,s1: string;
+begin
+  if Length(FieldNames) <> Length(Directions) then DatabaseError('Can''t perform sorting: FieldNames and Directions should have same dimension.');
+  s := '';
+  s1:='';
+  for i := Low(FieldNames) to High(FieldNames) do begin
+    s := s + FieldNames[i] + ';';
+    if Directions[i] = sdDescending then
+      s1 :=  s1 + FieldNames[i] + ';';
+  end;
+  fMemDataset.SortOnFields(s,'',s1);
+end;
+
+procedure TDAMemDataTable.EditKey;
+begin
+  fMemDataset.EditKey;
+end;
+
+procedure TDAMemDataTable.EditRangeEnd;
+begin
+  fMemDataset.EditRangeEnd;
+end;
+
+procedure TDAMemDataTable.EditRangeStart;
+begin
+  fMemDataset.EditRangeStart;
+end;
+
+procedure TDAMemDataTable.EnableConstraints;
+begin
+  //fMemDataset.EnableConstraints;
+  ReadOnly := fWasReadonly;
+end;
+
+function TDAMemDataTable.FindKey(const KeyValues: array of const): Boolean;
+begin
+  Result := fMemDataset.FindKey(KeyValues);
+end;
+
+procedure TDAMemDataTable.FindNearest(const KeyValues: array of const);
+begin
+  fMemDataset.FindNearest(KeyValues);
+end;
+
+procedure TDAMemDataTable.FreeRecordBuffer(var Buffer: PAnsiChar);
+begin
+  fMemDataset.FreeMemDatasetRecord(PMemDatasetrecord_Native(Buffer));
+  Buffer := nil;
+end;
+
+function TDAMemDataTable.GetAutoCompactRecords: boolean;
+begin
+  Result := fMemDataset.AutoCompactRecords;
+end;
+
+function TDAMemDataTable.GetAutoSortRecords: Boolean;
+begin
+  Result := fMemDataset.AutoSortRecords;
+end;
+
+function TDAMemDataTable.GetCloneSource: TDAMemDataTable;
+begin
+  Result := fMemCloneSource;
+  if Result = nil then Result := TDAMemDataTable(fCloneSource);
+end;
+
+function TDAMemDataTable.GetDatasetClass: TDatasetClass;
+begin
+  Result := TDAMemDataset;
+end;
+
+function TDAMemDataTable.GetDetailFields: string;
+begin
+  result := fMemDataset.DetailFields;
+end;
+
+function TDAMemDataTable.GetFieldNativeBuffer(Buffer: PAnsiChar;
+  Field: TField): Pointer;
+begin
+  Result:= fMemDataset.IntFindFieldData(PMemDatasetrecord_Native(Buffer)^.Data, Field, True);
+end;
+
+function TDAMemDataTable.GetFilter: string;
+begin
+  Result := fMemDataset.Filter;
+end;
+
+function TDAMemDataTable.GetFiltered: boolean;
+begin
+  Result := fMemDataset.Filtered;
+end;
+
+function TDAMemDataTable.GetIndexDefs: TIndexDefs;
+begin
+  result := fMemDataset.IndexDefs;
+end;
+
+function TDAMemDataTable.GetIndexFieldNames: string;
+begin
+  Result := fMemDataset.IndexFieldNames;
+end;
+
+function TDAMemDataTable.GetIndexName: string;
+begin
+  result := fMemDataset.IndexName;
+end;
+
+function TDAMemDataTable.GetMasterFields: string;
+begin
+  result := fMemDataset.MasterFields
+end;
+
+function TDAMemDataTable.GetMasterSource: TDADataSource;
+begin
+  result := TDADataSource(fMemDataset.DataSource);
+end;
+
+function TDAMemDataTable.GetRangeState: Boolean;
+begin
+  Result:= fMemDataset.RangeActive;
+end;
+
+function TDAMemDataTable.GetReadOnly: boolean;
+begin
+  Result := fMemDataset.ReadOnly;
+end;
+
+function TDAMemDataTable.GotoKey: Boolean;
+begin
+  Result := fMemDataset.GotoKey;
+end;
+
+procedure TDAMemDataTable.GotoNearest;
+begin
+  fMemDataset.GotoNearest;
+end;
+
+function TDAMemDataTable.LocateByIndex(const aIndexName: string;
+  const KeyValues: Variant): Boolean;
+begin
+  Result:= fMemDataset.LocateByIndex(aIndexName,KeyValues);
+end;
+
+function TDAMemDataTable.LookupByIndex(const aIndexName: string;
+  const KeyValues: Variant; const ResultFields: string): Variant;
+begin
+  Result:= fMemDataset.LookupByIndex(aIndexName,KeyValues,ResultFields);
+end;
+
+function TDAMemDataTable.MakeBlobFromString(Blob: AnsiString): pointer;
+begin
+  Result:= fMemDataset.MakeBlobFromString(Blob);
+end;
+
+procedure TDAMemDataTable.Notification(AComponent: TComponent;
+  Operation: TOperation);
+begin
+  inherited;
+  if (Operation = opRemove) and (AComponent = FCloneSource) then
+    FCloneSource := nil;
+  if (Operation = opRemove) and (AComponent = fMemCloneSource) then
+    fMemCloneSource := nil;
+end;
+
+procedure TDAMemDataTable.PrepareIndexForSorting(const aIndexName: string);
+begin
+  fMemDataset.PrepareIndexForSorting(aIndexName);
+end;
+
+procedure TDAMemDataTable.SetAnsiString(NativeBuf: Pointer; Field: TField;
+  const Value: Ansistring);
+begin
+  fMemDataset.SetAnsiString(NativeBuf,Field, Value);
+end;
+
+procedure TDAMemDataTable.SetAutoPackRecords(const Value: boolean);
+begin
+  fMemDataset.AutoCompactRecords := Value;
+end;
+
+procedure TDAMemDataTable.SetAutoSortRecords(const Value: Boolean);
+begin
+  fMemDataset.AutoSortRecords := Value;
+end;
+
+procedure TDAMemDataTable.SetCloneSource(const Value: TDAMemDataTable);
+
+var
+  FOldActive: Boolean;
+begin
+  FOldActive := Active;
+  Close;
+  if FMemCloneSource <> Value then begin
+    if (Value <> nil) then begin
+      Fields.Clear;
+      Fields.Assign(Value.Fields);
+    end;
+    FCloneSource := Value;
+    FMemCloneSource := Value;
+    if Value <> nil then
+      fMemDataset.CloneSource := Value.fMemDataset
+    else
+      fMemDataset.CloneSource := nil;
+  end;
+  if FOldActive and (FMemCloneSource <> nil) then
+    CloneCursorInternalOpen;
+end;
+
+procedure TDAMemDataTable.SetDetailsFields(const Value: string);
+begin
+  fMemDataset.DetailFields := Value
+end;
+
+procedure TDAMemDataTable.SetFilter(const Value: string);
+begin
+  fMemDataset.Filter := Value;
+end;
+
+procedure TDAMemDataTable.SetFiltered(const Value: boolean);
+begin
+  fMemDataset.Filtered := Value;
+end;
+
+procedure TDAMemDataTable.SetIndexDefs(const Value: TIndexDefs);
+begin
+  fMemDataset.IndexDefs.Assign(Value);
+end;
+
+procedure TDAMemDataTable.SetIndexFieldNames(const Value: string);
+begin
+  fMemDataset.IndexFieldNames := Value;
+end;
+
+procedure TDAMemDataTable.SetIndexName(const Value: string);
+begin
+  fMemDataset.IndexName:=Value;
+end;
+
+procedure TDAMemDataTable.SetKey;
+begin
+  fMemDataset.SetKey;
+end;
+
+procedure TDAMemDataTable.SetMasterFields(const Value: string);
+begin
+  inherited;
+  fMemDataset.MasterFields := Value
+end;
+
+procedure TDAMemDataTable.SetMasterSource(const Value: TDADataSource);
+begin
+  fMemDataset.MasterSource := Value;
+  inherited;
+end;
+
+procedure TDAMemDataTable.SetNullMask(Buffer: PAnsiChar; Field: TField;
+  const Value: boolean);
+begin
+  fMemDataset.SetNullMask(Dataset_PAnsiChar(Buffer),Field.Index,Value);
+end;
+
+procedure TDAMemDataTable.SetRange(const StartValues,
+  EndValues: array of const);
+begin
+  fMemDataset.SetRange(StartValues, EndValues);
+end;
+
+procedure TDAMemDataTable.SetRangeEnd;
+begin
+  fMemDataset.SetRangeEnd;
+end;
+
+procedure TDAMemDataTable.SetRangeStart;
+begin
+  fMemDataset.SetRangeStart;
+end;
+
+procedure TDAMemDataTable.SetReadOnly(const Value: boolean);
+begin
+  fMemDataset.ReadOnly := Value;
+end;
+
+procedure TDAMemDataTable.SetWideString(NativeBuf: Pointer; Field: TField;
+  const Value: Widestring);
+begin
+  fMemDataset.SetWideString(NativeBuf, Field, Value);
+end;
+
+end.
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAMemDataset.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAMemDataset.pas
new file mode 100644
index 0000000..4357be4
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAMemDataset.pas	
@@ -0,0 +1,4908 @@
+unit uDAMemDataset;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up                                                  }
+{ platform: Win32                                                            }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+{.$DEFINE MEMDATASET_DEBUG}
+{$DEFINE CHECK_RANGE}
+{$DEFINE USE_REALLOC}
+// defer to .XX
+{.$DEFINE MEM_PACKETRECORDS}
+
+uses
+  {$IFDEF MSWINDOWS}Windows,{$ENDIF}
+  Classes, DB, uDAExpressionEvaluator;
+
+type
+{$IFDEF DELPHI2009UP}
+  Dataset_PAnsiChar = PByte;
+{$ELSE}
+  Dataset_PAnsiChar = PAnsiChar;
+{$ENDIF}
+
+{$IFDEF DELPHI2009UP}
+  TMemBookmarkData = TBookmark;
+{$ELSE}
+  TMemBookmarkData = TBookmarkStr;
+{$ENDIF}
+
+  TDAMemoryDataset = class;
+  PBookmarkData = ^TBookmarkData;
+  TBookmarkData = Pointer;
+
+  PRecInfo = ^TRecInfo;
+  TRecInfo = packed record
+    Bookmark: TBookmarkData;
+    BookmarkFlag: TBookmarkFlag;
+  end;
+
+  TOffsetArray = array of Cardinal;
+  PBLOBRecord = ^TBLOBRecord;
+  TBLOBRecord = packed record
+    size: Cardinal;
+    Data: WideChar;
+  end;
+
+  TSortRecord = record
+    data: PAnsiChar;
+    position: integer;
+  end;
+
+  PSortRecordList = ^TSortRecordList;
+  TSortRecordList = array[0..MaxListSize - 1] of TSortRecord;
+
+  // these operators are used in Assign and go beyond simply copying
+  //   mlaCopy = dest becomes a copy of the source
+  //   mlaAnd  = intersection of the two lists
+  //   mlaOr   = union of the two lists
+  //   mlaXor  = only those not in both lists
+  // the last two operators can actually be thought of as binary operators but
+  // their implementation has been optimized over their binary equivalent.
+  //   mlaSrcUnique  = only those unique to source (same as mlaAnd followed by mlaXor)
+  //   mlaDestUnique = only those unique to dest   (same as mlaOr followed by mlaXor)
+  TMemListAssignOp = (mlaCopy, mlaAnd, mlaOr, mlaXor, mlaSrcUnique, mlaDestUnique);
+
+  TMemList = class(TObject)
+  private
+    FList: PPointerList;
+    FSortList:PSortRecordList;
+    FCount: Integer;
+    FCapacity: Integer;
+    FNeedRefresh: boolean;
+    procedure QuickSort(L, R: Integer);
+    procedure Sort;
+    function intIndexOf(Item: PAnsiChar): Integer;
+  protected
+    function Get(Index: Integer): Pointer;
+    procedure Grow; virtual;
+    procedure Put(Index: Integer; Item: Pointer);
+    procedure SetCapacity(NewCapacity: Integer);
+    procedure SetCount(NewCount: Integer);
+  public
+    constructor Create;
+    destructor Destroy; override;
+    function Add(Item: Pointer): Integer;
+    procedure Clear; virtual;
+    procedure Delete(Index: Integer);
+    class procedure Error(const Msg: string; Data: Integer); overload; virtual;
+    class procedure Error(Msg: PResStringRec; Data: Integer); overload;
+    procedure Exchange(Index1, Index2: Integer);
+    function Expand: TMemList;
+    function Extract(Item: Pointer): Pointer;
+    function First: Pointer;
+    function IndexOf(Item: Pointer): Integer;
+    procedure Insert(Index: Integer; Item: Pointer);
+    function Last: Pointer;
+    procedure Move(CurIndex, NewIndex: Integer);
+    function Remove(Item: Pointer): Integer;
+    procedure Pack;
+    procedure Assign(ListA: TMemList; AOperator: TMemListAssignOp = mlaCopy; ListB: TMemList = nil);
+    property Capacity: Integer read FCapacity write SetCapacity;
+    property Count: Integer read FCount write SetCount;
+    property Items[Index: Integer]: Pointer read Get write Put; default;
+    property List: PPointerList read FList;
+  end;
+
+  TThreadMemList = class
+  private
+    FList: TMemList;
+    FLock: TRTLCriticalSection;
+    FReadLock: Integer;
+  public
+    constructor Create;
+    destructor Destroy; override;
+    procedure Add(Item: Pointer);
+    procedure Clear;
+    function  LockListForReading: TMemList;
+    function  LockListForWriting: TMemList;
+    procedure Remove(Item: Pointer);
+    procedure UnlockListForReading;
+    procedure UnlockListForWriting;
+  end;
+
+  TMemDataSetNotification = (mdnInsert, mdnModify, mdnDelete, mdnBatchAdding);
+
+  TDAValueStruct = record
+    Value: variant;
+    AsAnsiString: AnsiString;
+    AsWideString: WideString;
+  end;
+
+  TMemKeyIndex = (kiLookup, kiRangeStart, kiRangeEnd, kiCurRangeStart, kiCurRangeEnd, kiSave);
+
+  PMemKeyBuffer = ^TMemKeyBuffer;
+  TMemKeyBuffer = record
+    Modified: Boolean;
+    Exclusive: Boolean;
+    FieldCount: Integer;
+    Data: record end;  // native bin2 format
+  end;
+
+{$IFDEF BDS4UP}{$REGION 'MEM_PACKETRECORDS'}{$ENDIF BDS4UP}
+  {$IFDEF MEM_PACKETRECORDS}
+
+    TMemPackedRecords = class;
+
+    TMemPackedRecord = class
+    private
+      fBuffer: PAnsiChar;
+      FOwner: TMemPackedRecords;
+      function GetValues(Index: Integer): Variant;
+      procedure SetValues(Index: Integer; const Value: Variant);
+      function GetIsNull(Index: Integer): Boolean;
+      procedure SetIsNull(Index: Integer; const Value: Boolean);
+      function GetValuesByFieldName(AName: string): Variant;
+      procedure SetValuesByFieldName(AName: string; const Value: Variant);
+    public
+      constructor Create(AOwner: TMemPackedRecords);
+      destructor Destroy; override;
+      property isNull[Index: Integer]: Boolean read GetIsNull write SetIsNull;
+      property Values[Index: Integer]: Variant read GetValues write SetValues;
+      property ValuesByFieldName[AName: string]: Variant read GetValuesByFieldName write SetValuesByFieldName;
+    end;
+
+    TMemPackedRecords = class
+    private
+      fOwner: TDAMemoryDataset;
+      fList: TList;
+      function GetCount: Integer;
+      function GetItems(Index: Integer): TMemPackedRecord;
+    public
+      constructor Create(AOwner: TDAMemoryDataset);
+      destructor Destroy; override;
+      procedure Clear;
+      function Add: TMemPackedRecord;
+      procedure Delete(aIndex: integer);
+      property Items[Index: Integer]: TMemPackedRecord read GetItems;
+      property Count: Integer read GetCount;
+    end;
+  {$ENDIF MEM_PACKETRECORDS}
+
+{$IFDEF BDS4UP}{$ENDREGION}{$ENDIF BDS4UP}
+  TDAMemIndex = class
+  private
+    FOwner: TDAMemoryDataset;
+    FSortDescMode: Boolean;
+    FIndexCaseInsList: TList;
+    FIndexDescFields: TList;
+    FIndexFieldNameList: TList;
+    FDataList: TMemList;
+    FInitFromIndexDef: Boolean;
+    FLastSorted: TDateTime;
+    FIndexDef_Options: TIndexOptions;
+    FIndexDef_Fields: string;
+    FIndexDef_DescFields: string;
+    FIndexDef_CaseInsFields: String;
+    FInit_FieldNames: String;
+    FInit_CaseInsFields: String;
+    FInit_DescFields: String;
+    procedure Init(const AFieldNames: string; const CaseInsFields: string = ''; const DescFields: string='');overload;
+    procedure Init(const Fields: string; CaseInsensitive, Descending: Boolean);overload;
+    procedure Init(AIndexDef: TIndexDef); overload;
+    function GetDataList: TMemList;
+    procedure Clear;
+    function IsValid: boolean;
+    procedure UpdateIndex(AIndexDef: TIndexDef);
+    function isCanUsed(const Fields: string; CaseInsensitive: Boolean): boolean;
+    property IndexFieldNameList: TList read FIndexFieldNameList;
+    property IndexCaseInsList: TList read FIndexCaseInsList;
+    property IndexDescFields: TList read FIndexDescFields;
+    property SortDescMode : Boolean read FSortDescMode;
+    property DataList: TMemList read GetDataList;
+    property LastSorted: TDateTime read FLastSorted write FLastSorted;
+  public
+    constructor Create(AOwner: TDAMemoryDataset);
+    destructor Destroy; override;
+  end;
+
+  PMemLocateStruct = ^TMemLocateStruct;
+  TMemLocateStruct = record
+    lWorkList: TMemList;
+    lFields: TList;
+    lFieldIndexes: array of integer;
+    lOffsets: array of cardinal;
+    lValues: array of TDAValueStruct;
+    lDatatypes: array of TFieldType;
+    lnull: array of boolean;
+    ldesc: array of boolean;
+    lcaseIns: array of boolean;
+  end;
+
+  TmrMode = (mrEmpty, mrBin2Style, mrBin3Style);
+
+    {BitMask: AnsiChar;
+    offsetDataSize: byte;
+    case integer of
+     1:( byteOffset: array [0..0] of byte);
+     2:( WordOffset: array [0..0] of word);
+     4:( CardinalOffset: array [0..0] of Cardinal);
+    }
+  PMemDatasetrecord_Native = ^TMemDatasetrecord_Native;
+  TMemDatasetrecord_Native = packed record
+    Ident: TmrMode;
+    Data: Dataset_PAnsiChar;
+  end;
+
+  PMemDatasetrecord = ^TMemDatasetrecord;
+  TMemDatasetrecord = packed record
+    Ident: TmrMode;
+    Data: Dataset_PAnsiChar;
+    BookmarkData: TRecInfo;
+    CalcData: byte;
+//  FBookMarkOffset := FNativeRecordSize;
+//  FCalculatedOffset := FBookMarkOffset + SizeOf(TRecInfo);
+//  FDatasetBufferSize := FCalculatedOffset + CalcFieldsSize;
+  end;
+
+  TMemLocateCompare = function (buf1: pointer; aValue:TDAValueStruct; aDataType: TFieldType;aSortCaseInsensitive:Boolean; abin2: boolean): boolean of Object;
+  TDAMemDatasetCompare = function(p1, p2: PMemDatasetrecord_Native; AIndex: TDAMemIndex): Integer of object;
+
+  { TDAMemoryDataset }
+  TDAMemoryDataset = class(TDataset)
+  private
+    FRecordsList: TThreadMemList;
+    FDataList: TMemList;
+    FRecordPos: integer;
+    FActive: Boolean;
+    FOffsets: TOffsetArray;   // FOffset[0] = FNullMask
+    FDataSizeArray:TOffsetArray;
+    FNativeRecordSize: Cardinal;
+//    FBookMarkOffset: Integer; // = FNativeRecordSize
+//    FCalculatedOffset: Integer; // FBookMarkOffset + BookMark data size
+    FDatasetBufferSize: Cardinal; // FCalculatedOffset+ Calc fields size
+    FNullMaskSize: Cardinal;
+    FMasterDataLink: TMasterDataLink;
+    FFilterBuffer: Dataset_PAnsiChar;
+    FIndexName: string;
+    FDataTypeArray: array of TFieldType;
+    FStoreStringsAsReference: boolean;
+    FExpressionEvaluator: TDAExpressionEvaluator;
+    FExpressionBuffer: PMemDatasetrecord_Native;
+    {$IFDEF MSWINDOWS}
+    FSortLocale: LCID;
+    {$ENDIF MSWINDOWS}
+    FFieldsIndex: Boolean;
+    FIndexDefs: TIndexDefs;
+    FCloneSource: TDAMemoryDataset;
+    FCloneClientList:TThreadList;
+    FClonePermanentClientList:TThreadList;
+    FReadOnly: Boolean;
+    FDetailFields: string;
+    FDetailsFieldNameList: TList;
+    FRangeActive: boolean;
+    fUseIndexinLocate: Boolean;
+//    FNeedRefreshIndexConditional: Boolean;
+{$IFDEF MEM_PACKETRECORDS}
+    fPackedMode: Boolean;
+{$ENDIF MEM_PACKETRECORDS}
+    FHasReferencedFields: boolean;
+    FLastUpdate: TDateTime;
+    f_DefaultIndexRecord: TDAMemIndex;
+    FIndexList: TList;
+    FAutoCompactRecords: Boolean;
+    FMemCloneSource: TDAMemoryDataset;
+    FAutoSort: Boolean;
+    procedure ConvertBin3ToBin2Record(Buffer: PMemDatasetrecord_Native);
+    procedure ConvertBin2ToBin3Record(ASource : PMemDatasetrecord_Native);
+    function Bin2ToBin3(ASource: Dataset_PAnsiChar): Dataset_PAnsiChar;
+    function CalcFieldLen(aDataType: TFieldType; aSize: Integer): integer;
+    procedure CalculateOffsets;
+    procedure ClearRecords;
+    procedure ClearFieldByFieldType(FieldBuffer: pointer; ADataType: TFieldType);
+    procedure ClearBin2Field(Buffer: Dataset_PAnsiChar; AField: TField);
+    function IsReferencedField(ADataType: TFieldType):Boolean;
+    function GetNullMask(Buffer: Dataset_PAnsiChar; const AIndex: Integer): boolean;
+    function IntFindRecordID(Buf: pointer): Integer;
+    function GetActiveRecBuf(var RecBuf: Dataset_PAnsiChar): Boolean;
+    procedure InternalSetFieldData(Field: TField; Buffer: Pointer);
+    procedure IntAssignRecord(Source, Dest: PMemDatasetrecord_Native);
+    procedure SetBlobData(Field: TField; Buffer: PMemDatasetrecord_Native; Value: PBLOBRecord);
+    function GetMasterFields: string;
+    procedure SetDataSource(const Value: TDataSource);
+    procedure SetMasterFields(const Value: string);
+    function GetIndexFieldNames: string;
+    procedure SetIndexFieldNames(const Value: string);
+    function InternalGetRecord(Buffer: PMemDatasetRecord; GetMode: TGetMode; DoCheck: Boolean): TGetResult;
+    procedure DoSort(AIndex: TDAMemIndex);
+    procedure QuickSort(L, R: Integer; SCompare: TDAMemDatasetCompare; AIndex: TDAMemIndex);
+    function Compare(i1, i2: PMemDatasetrecord_Native;AIndex: TDAMemIndex): Integer;
+    function CompareValues(buf1, buf2: pointer; aDataType: TFieldType;aSortCaseInsensitive:Boolean; aBin2_1, aBin2_2: Boolean): integer;
+    function CompareValues2(buf1: pointer; aValue: TDAValueStruct; aDataType: TFieldType;aSortCaseInsensitive:Boolean; aBin2: boolean): integer;
+    function CompareValues2_full(buf1: pointer; aValue: TDAValueStruct; aDataType: TFieldType;aSortCaseInsensitive:Boolean; abin2: boolean): boolean;
+    function CompareValues2_partial(buf1: pointer; aValue: TDAValueStruct; aDataType: TFieldType;aSortCaseInsensitive: Boolean; abin2: boolean): boolean;
+    function CompareValues_Range(buf: PMemDatasetrecord_Native; keybuffer: PMemKeyBuffer): integer;
+    procedure DoFilterRecords;
+    function ApplyMasterFilter: boolean;
+    procedure ApplyRangeFilter;
+    function FilterRecord(buf: PMemDatasetrecord_Native; AUseEvent: Boolean):Boolean;
+    procedure SetStoreStringAsReference(const Value: Boolean);
+    procedure EEGetValue(Sender: TDAExpressionEvaluator; const aIdentifier: string; out aValue: Variant);
+    function GetVarValueFromBuffer(Buffer: pointer; Field: TField;abin2: boolean):variant;
+    function IsActiveFilter: Boolean;
+    function GetIndexDefs: TIndexDefs;
+    procedure SetIndexDefs(const Value: TIndexDefs);
+    function GetIndexName: string;
+    procedure SetIndexName(const Value: string);
+    procedure SetIndex(const Value: string; FieldsIndex: Boolean);
+    procedure ValidateFieldForIndex(aField: TField);
+    function IntGetRecordList: TThreadMemList;
+    procedure RegisterClient(const AClient: TDAMemoryDataset);
+    procedure RegisterPermanentClient(const AClient: TDAMemoryDataset);
+    procedure UnregisterPermanentClient(const AClient: TDAMemoryDataset);
+    procedure RegisterPermanentClients;
+    procedure UnregisterClient(const AClient: TDAMemoryDataset);
+    procedure UnregisterAllClients;
+    procedure UnregisterPermanentClients;
+    procedure NotifyClients(Buf: PMemDatasetrecord_Native; Operation: TMemDataSetNotification; ASender: TDAMemoryDataset);
+    procedure RecordNotification(Buf: PMemDatasetrecord_Native; Operation: TMemDataSetNotification);
+    procedure IntInsertBuffer(Buffer: PMemDatasetrecord_Native; ASender: TDAMemoryDataset=nil);
+    procedure IntRemoveBuffer(Buffer: PMemDatasetrecord_Native; ASender: TDAMemoryDataset = nil);
+    procedure IntUpdateBuffer(Buffer: PMemDatasetrecord_Native; ASender: TDAMemoryDataset = nil);
+    procedure SetReadOnly(const Value: Boolean);
+    procedure SetDetailsFields(const Value: string);
+    procedure InitDetailFieldNamesList;
+    function GetIndexFields: string;
+    function internalGotoKey(const KeyBuffer: PMemKeyBuffer;isNearest: Boolean):Boolean;
+    procedure RefreshIndexConditional;
+    procedure MemList_ClearRecords(aMemList: TMemList);
+    procedure IndexList_Clear;
+    function LocateWithIndex(const LocateStruct: PMemLocateStruct; Buffer: PMemDatasetrecord): boolean;
+    procedure UpdateMemIndexes(AIndex: integer = -1);
+    procedure LocalBufferToDatasetBuffer(LocalBuf: PMemDatasetrecord_Native; DatasetBuffer: PMemDatasetrecord);
+    function LocateRecordByIndex(const aIndexName: string; const KeyValues: Variant; SyncCursor: Boolean): Boolean;
+    function intLocateRecordByIndex(aIndex: TDAMemIndex; const KeyValues: Variant; SyncCursor: Boolean): Boolean;
+    procedure InitMemLocateStruct(AStruct: PMemLocateStruct; const KeyValues: Variant);
+    function CreateBin3Struct(const ASize:Cardinal): Dataset_PAnsiChar;
+    function GetBin3Offset(Buffer: Dataset_PAnsiChar;const aFieldNo:integer):cardinal;
+    Procedure FreeBin3Buffer(Buffer: Dataset_PAnsiChar);
+    procedure SetAutoPackRecords(const Value: boolean);
+    procedure SetCloneSource(const Value: TDAMemoryDataset);
+    Procedure AssignCloneSource(Source: TDAMemoryDataset);
+    procedure CheckforCircularLinks(ASource:TDataset; CheckForClone: Boolean);
+    procedure SetAutoSort(const Value: Boolean);
+    procedure IntAutoSort(ABuf : PMemDatasetrecord_Native);
+  private
+    { Set range }
+    FKeyBuffers: array[TMemKeyIndex] of PMemKeyBuffer;
+    FKeyBuffer: PMemKeyBuffer;
+    procedure AllocKeyBuffers;
+    procedure FreeKeyBuffers;
+    procedure SetKeyBuffer(KeyIndex: TMemKeyIndex; Clear: Boolean);
+    procedure SetKeyFields(KeyIndex: TMemKeyIndex; const Values: array of const);
+    function InitKeyBuffer(Buffer: PMemKeyBuffer): PMemKeyBuffer;
+  protected
+    function CreateMemDatasetRecord(const AType:TmrMode; ABin3Size: Cardinal = 0; ADatasetCompatible: Boolean =False):PMemDatasetrecord_Native;
+    procedure FreeMemDatasetRecord(Buffer: PMemDatasetrecord_Native);
+    procedure AttachToSource(const Source: TDAMemoryDataset);virtual;
+    procedure DetachFromSource; virtual;
+    function IsLoadingState: Boolean; virtual;
+
+  protected
+    // for IDAMemDatasetBatchAdding
+    procedure SetNullMask(Buffer: Dataset_PAnsiChar; const AIndex: Integer; const Value: boolean);
+    function IntFindFieldData(Buffer: PMemDatasetrecord_Native; Field: TField): Pointer; overload;
+    function IntFindFieldData(Buffer: Dataset_PAnsiChar; Field: TField; aBin2: Boolean): Pointer; overload;
+    function MakeBlobFromString(Blob: AnsiString):PBLOBRecord;
+    function GetBin2FieldOffset(const aFieldNo:integer):cardinal;
+    procedure SetAnsiString(NativeBuf: Pointer; Field: TField; const Value: Ansistring);
+    procedure SetWideString(NativeBuf: Pointer; Field: TField; const Value: Widestring);
+    procedure ProcessFilter;
+    procedure AddRecordsfromList(AList: TList);
+    procedure ClearBin2Buffer(Buffer: Dataset_PAnsiChar);
+    Procedure FreeBin2Buffer(Buffer: Dataset_PAnsiChar);
+    function CreateBin2Struct: Dataset_PAnsiChar;
+  protected
+    procedure DuplicateBuffer(Source, Dest: PMemDatasetrecord_Native; ACanPack:boolean);
+    procedure RecordToBuffer(RecNo: integer; Buffer: PMemDatasetRecord);
+    property MasterDataLink: TMasterDataLink read FMasterDataLink;
+    procedure MasterChanged(Sender: TObject); virtual;
+    procedure MasterDisabled(Sender: TObject); virtual;
+    function LocateRecord(const KeyFields: string; const KeyValues: Variant; Options: TLocateOptions; SyncCursor: Boolean): Boolean;
+  protected // tdataset
+    { IProviderSupport }
+    function PSGetIndexDefs(IndexTypes: TIndexOptions): TIndexDefs; {$IFNDEF FPC}override;{$ENDIF}
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+  protected
+    procedure PostKeyBuffer(Commit: Boolean);
+    function GetIsIndexField(Field: TField): Boolean; override;
+    procedure DoOnNewRecord; override;
+    function GetRecord(Buffer: Dataset_PAnsiChar; GetMode: TGetMode; DoCheck: Boolean): TGetResult; override;
+    procedure InternalClose; override;
+    procedure InternalHandleException; override;
+    procedure InternalInitFieldDefs; override;
+    procedure InternalOpen; override;
+    function IsCursorOpen: Boolean; override;
+    function AllocRecordBuffer: Dataset_PAnsiChar; override;
+    procedure FreeRecordBuffer(var Buffer: Dataset_PAnsiChar); override;
+    procedure GetBookmarkData(Buffer: Dataset_PAnsiChar; Data: Pointer); override;
+    function GetBookmarkFlag(Buffer: Dataset_PAnsiChar): TBookmarkFlag; override;
+    function GetRecordSize: Word; override;
+    procedure InternalAddRecord(Buffer: Pointer; Append: Boolean); override;
+    procedure InternalDelete; override;
+    procedure InternalFirst; override;
+    procedure InternalGotoBookmark(Bookmark: Pointer); override;
+    procedure InternalInitRecord(Buffer: Dataset_PAnsiChar); override;
+    procedure InternalLast; override;
+    procedure InternalPost; override;
+    procedure InternalSetToRecord(Buffer: Dataset_PAnsiChar); override;
+    procedure SetBookmarkFlag(Buffer: Dataset_PAnsiChar; Value: TBookmarkFlag); override;
+    procedure SetBookmarkData(Buffer: Dataset_PAnsiChar; Data: Pointer); override;
+    procedure SetFieldData(Field: TField; Buffer: Pointer); overload; override;
+    function GetRecordCount: Integer; override;
+    function GetRecNo: Integer; override;
+    procedure SetRecNo(Value: Integer); override;
+    procedure OpenCursor(InfoQuery: Boolean); override;
+    procedure DataConvert(Field: TField; Source, Dest: Pointer; ToNative: Boolean); override;
+    function GetDataSource: TDataSource; override;
+    procedure SetFiltered(Value: Boolean); override;
+    procedure SetFilterOptions(Value: TFilterOptions); override;
+    procedure SetFilterText(const Value: string); override;
+    procedure SetOnFilterRecord(const Value: TFilterRecordEvent); override;
+    procedure DoAfterOpen; override;
+    procedure UpdateIndexDefs; override;
+    procedure DefChanged(Sender: TObject); {$IFNDEF FPC}override;{$ENDIF}
+    procedure intInsertRecord(Buf: PMemDatasetrecord_Native);
+    function GetCanModify: Boolean; override;
+  protected
+    procedure SwitchToIndex(const IndexName: string);
+    property RangeActive:boolean read FRangeActive;
+  public //from TDataset         `
+    function GetFieldData(Field: TField; Buffer: Pointer): Boolean; override;
+    function CreateBlobStream(Field: TField; Mode: TBlobStreamMode): TStream; override;
+//    procedure GetDetailLinkFields(MasterFields, DetailFields: TList); {$IFNDEF FPC}override;{$ENDIF}
+    function Locate(const KeyFields: string; const KeyValues: Variant; Options: TLocateOptions): Boolean; override;
+    function Lookup(const KeyFields: string; const KeyValues: Variant; const ResultFields: string): Variant; override;
+    function LocateByIndex(const aIndexName: string; const KeyValues: Variant): Boolean;
+    function LookupByIndex(const aIndexName: string; const KeyValues: Variant; const ResultFields: string): Variant;
+    procedure PrepareIndexForSorting(const aIndexName: string = '');
+    function CompareBookmarks(Bookmark1, Bookmark2: TBookmark): Integer; override;
+    function BookmarkValid(Bookmark: TBookmark): Boolean; override;
+  {$IFNDEF MEMDATASET_DEBUG}
+  protected // postponed to .31
+  {$ENDIF MEMDATASET_DEBUG}
+    property UseIndexinLocate: Boolean read fUseIndexinLocate write fUseIndexinLocate;
+    procedure SortOnFields(AIndex: TDAMemIndex);overload;
+    Function CalculateRecordsSize: Cardinal;
+    procedure CompactRecords;
+  public
+    constructor Create(AOwner: TComponent); override;
+    destructor Destroy; override;
+    procedure SortOnFields(const Fields: string; CaseInsensitive: Boolean = False; Descending: Boolean = False);overload;
+    procedure SortOnFields(const Fields, CaseInsFields, DescFields: string);overload;
+    procedure SortOnFields;overload;
+    procedure GetIndexNames(List: TStrings);
+    procedure AddIndex(const Name, Fields: string; const DescFields: string = ''; const CaseInsFields: string = '');
+    procedure DeleteIndex(const Name: string);
+    procedure CloneCursor(Source: TDAMemoryDataset; Reset: Boolean; KeepSettings: Boolean = False); virtual;
+    property StoreStringAsReference: Boolean read FStoreStringsAsReference write SetStoreStringAsReference;
+    procedure Post; override;
+    procedure Cancel; override;
+    {$IFDEF MSWINDOWS}
+    property SortLocale: LCID read FSortLocale write FSortLocale;
+    {$ENDIF MSWINDOWS}
+    property AutoCompactRecords: boolean read FAutoCompactRecords write SetAutoPackRecords;
+{$IFDEF BDS4UP}{$REGION 'MEM_PACKETRECORDS'}{$ENDIF BDS4UP}
+{$IFDEF MEM_PACKETRECORDS}
+  // packed adding
+  protected
+    function GetPackedMode: Boolean;
+    procedure SetPackedMode(const Value: Boolean);
+    Property PackedMode: Boolean read GetPackedMode write SetPackedMode;
+    procedure PackedRecordListClear;
+  public
+    Procedure StartPackedMode;
+    Procedure CommitPackedMode;
+    Procedure CancelPackedMode;
+{$ENDIF MEM_PACKETRECORDS}
+{$IFDEF BDS4UP}{$ENDREGION}{$ENDIF BDS4UP}
+  public { Set range }
+    procedure ApplyRange;
+    procedure CancelRange;
+    procedure SetRange(const StartValues, EndValues: array of const);
+    procedure EditRangeEnd;
+    procedure EditRangeStart;
+    procedure SetRangeEnd;
+    procedure SetRangeStart;
+    //
+    procedure SetKey;
+    procedure EditKey;
+    function FindKey(const KeyValues: array of const): Boolean;
+    procedure FindNearest(const KeyValues: array of const);
+    function GotoKey: Boolean;
+    procedure GotoNearest;
+  published
+    property Active;
+    property FieldDefs;
+    property OnFilterRecord;
+    property IndexFieldNames: string read GetIndexFieldNames write SetIndexFieldNames;
+    property IndexName: string read GetIndexName write SetIndexName;
+    property IndexDefs: TIndexDefs read GetIndexDefs write SetIndexDefs;
+    property MasterFields: string read GetMasterFields write SetMasterFields;
+    property MasterSource: TDataSource read GetDataSource write SetDataSource;
+    property DetailFields: string read FDetailFields write SetDetailsFields;
+    property ReadOnly: Boolean read FReadOnly write SetReadOnly default False;
+    property Filter;
+    property Filtered;
+    property BeforeOpen;
+    property AfterOpen;
+    property BeforeClose;
+    property AfterClose;
+    property BeforeInsert;
+    property AfterInsert;
+    property BeforeEdit;
+    property AfterEdit;
+    property BeforePost;
+    property AfterPost;
+    property BeforeCancel;
+    property AfterCancel;
+    property BeforeDelete;
+    property AfterDelete;
+    property BeforeScroll;
+    property AfterScroll;
+    property BeforeRefresh;
+    property AfterRefresh;
+    property OnCalcFields;
+    property OnDeleteError;
+    property OnEditError;
+    property OnNewRecord;
+    property OnPostError;
+    property CloneSource: TDAMemoryDataset read FMemCloneSource write SetCloneSource;
+    property AutoSortRecords: Boolean read FAutoSort write SetAutoSort default False;
+  end;
+
+  TDABlobStream = class(TMemoryStream)
+  private
+    FField: TBlobField;
+    FDataSet: TDAMemoryDataset;
+    FBuffer:  PMemDatasetrecord_Native;
+    FMode: TBlobStreamMode;
+    FOpened: Boolean;
+    FModified: Boolean;
+    FPosition: Longint;
+    FCached: Boolean;
+    function GetBlobSize: Longint;
+    procedure GetBLOBRecordFromRecord(Field: TField; out aLocked:Boolean; out blob_size: integer; out blob_data: pointer);
+    function GetBLOBRecordFromBuffer(Buffer: PMemDatasetrecord_Native; Field: TField; out blob_size: integer; out blob_data: pointer): PBLOBRecord;
+    procedure Truncate;
+  public
+    constructor Create(Field: TBlobField; Mode: TBlobStreamMode);
+    destructor Destroy; override;
+    function Read(var Buffer; Count: Longint): Longint; override;
+    function Write(const Buffer; Count: Longint): Longint; override;
+    function Seek(Offset: Longint; Origin: Word): Longint; override;
+  end;
+
+var
+  MaxStringSizeInline : integer = 4096;
+
+implementation
+uses
+  uROClasses, uROBinaryHelpers,
+  Variants, SysUtils,{$IFDEF FPC}dbconst,{$ELSE}DBConsts,{$ENDIF}
+  {$IFNDEF FPC}Forms, SqlTimSt,{$ENDIF} FMTBcd, RTLConsts, Math;
+
+const
+  guidsize = 38; { Length(GuidString) }
+
+resourcestring
+  SNoDetailFilter = 'Filter property cannot be used for detail tables';
+const
+  ft_Inline = [ftSmallint, ftInteger, ftWord, ftBoolean, ftFloat,
+               ftCurrency, ftDate, ftTime, ftDateTime, ftAutoInc,
+               ftLargeint, {$IFNDEF FPC}ftTimeStamp,{$ENDIF} ftBCD, ftFMTBCD, ftGuid];
+  ft_BlobTypes = [ftBlob, ftMemo,{$IFDEF DA_WideMemoSupport}ftWideMemo,{$ENDIF DA_WideMemoSupport} ftGraphic, ftFmtMemo, ftParadoxOle, ftDBaseOle, ftTypedBinary, ftOraBlob, ftOraClob];
+  ft_Strings = [ftString, ftWideString,{$IFDEF DA_FixedWideCharSupport}ftFixedWideChar,{$ENDIF DA_FixedWideCharSupport} ftFixedChar];
+  ft_AnsiStringValues = [ftString, ftFixedChar, {$IFDEF DA_FixedWideCharSupport}ftFixedWideChar,{$ENDIF DA_FixedWideCharSupport}ftGuid];
+  ft_WideStringValues = [ftWideString];
+  ft_Supported = ft_Inline + ft_BlobTypes + ft_Strings;
+//  ft_UnSupported = [ftADT, ftArray, ftReference, ftDataSet, ftBytes, ftVarBytes] + [ftVariant];
+type
+  PCardinalArray = ^TCardinalArray;
+  TCardinalArray = array [0..MaxListSize - 1] of Cardinal;
+
+function CreateBlobRecord(ASize: cardinal = 0; AInit: Boolean = False): PBlobRecord;
+begin
+  {$IFDEF FPC}
+  Result := nil;
+  {$ENDIF FPC}
+  GetMem(Result, ASize + SizeOf(TBLOBRecord));
+  FillChar(Result^, sizeof(TBLOBRecord), 0);
+  Result.size:=ASize;
+  if AInit then FillChar(Result.Data, Asize, 0);
+end;
+
+procedure FreeBlobRecord(buf: Pointer);
+begin
+//  if buf = nil then Exit;
+  FreeMem(buf);
+end;
+
+{ TMemList }
+
+destructor TMemList.Destroy;
+begin
+  Clear;
+end;
+
+function TMemList.Add(Item: Pointer): Integer;
+begin
+  Result := FCount;
+  if Result = FCapacity then Grow;
+  FList^[Result] := Item;
+  Inc(FCount);
+  FNeedRefresh:=True;
+end;
+
+procedure TMemList.Clear;
+begin
+  SetCount(0);
+  SetCapacity(0);
+  ReallocMem(FSortList,0);
+  FNeedRefresh:=True;
+end;
+
+procedure TMemList.Delete(Index: Integer);
+begin
+  if (Index < 0) or (Index >= FCount) then Error(@SListIndexError, Index);
+  Dec(FCount);
+  if Index < FCount then
+    System.Move(FList^[Index + 1], FList^[Index],(FCount - Index) * SizeOf(Pointer));
+  fNeedRefresh:=True;
+end;
+
+class procedure TMemList.Error(const Msg: string; Data: Integer);
+  {$IFNDEF FPC}
+  function ReturnAddr: Pointer;
+  asm
+          MOV     EAX,[EBP+4]
+  end;
+  {$ENDIF}
+begin
+  raise EListError.CreateFmt(Msg, [Data]) at {$IFNDEF FPC}ReturnAddr{$ELSE}get_caller_addr(get_frame){$ENDIF};
+end;
+
+class procedure TMemList.Error(Msg: PResStringRec; Data: Integer);
+begin
+  TMemList.Error(LoadResString(Msg), Data);
+end;
+
+procedure TMemList.Exchange(Index1, Index2: Integer);
+var
+  Item: Pointer;
+begin
+  if (Index1 < 0) or (Index1 >= FCount) then Error(@SListIndexError, Index1);
+  if (Index2 < 0) or (Index2 >= FCount) then Error(@SListIndexError, Index2);
+  Item := FList^[Index1];
+  FList^[Index1] := FList^[Index2];
+  FList^[Index2] := Item;
+  FNeedRefresh:=True;
+end;
+
+function TMemList.Expand: TMemList;
+begin
+  if FCount = FCapacity then Grow;
+  Result := Self;
+end;
+
+function TMemList.First: Pointer;
+begin
+  Result := Get(0);
+end;
+
+function TMemList.Get(Index: Integer): Pointer;
+begin
+  if (Index < 0) or (Index >= FCount) then Error(@SListIndexError, Index);
+  Result := FList^[Index];
+end;
+
+procedure TMemList.Grow;
+var
+  Delta: Integer;
+begin
+  if FCapacity > 64 then
+    Delta := FCapacity div 4
+  else
+    if FCapacity > 8 then
+      Delta := 16
+    else
+      Delta := 4;
+  SetCapacity(FCapacity + Delta);
+end;
+
+function TMemList.IndexOf(Item: Pointer): Integer;
+begin
+  Sort;
+  Result := intIndexOf(Item);
+  if Result > -1 then Result:= FSortList^[Result].position;
+end;
+
+procedure TMemList.Insert(Index: Integer; Item: Pointer);
+begin
+  if (Index < 0) or (Index > FCount) then Error(@SListIndexError, Index);
+  if FCount = FCapacity then Grow;
+  if Index < FCount then
+    System.Move(FList^[Index], FList^[Index + 1], (FCount - Index) * SizeOf(Pointer));
+  FList^[Index] := Item;
+  Inc(FCount);
+  fNeedRefresh:=True;
+end;
+
+function TMemList.Last: Pointer;
+begin
+  Result := Get(FCount - 1);
+end;
+
+procedure TMemList.Move(CurIndex, NewIndex: Integer);
+var
+  Item: Pointer;
+begin
+  if CurIndex <> NewIndex then
+  begin
+    if (NewIndex < 0) or (NewIndex >= FCount) then Error(@SListIndexError, NewIndex);
+    Item := Get(CurIndex);
+    FList^[CurIndex] := nil;
+    Delete(CurIndex);
+    Insert(NewIndex, nil);
+    FList^[NewIndex] := Item;
+    FNeedRefresh:=True;
+  end;
+end;
+
+procedure TMemList.Put(Index: Integer; Item: Pointer);
+begin
+  if (Index < 0) or (Index >= FCount) then Error(@SListIndexError, Index);
+  if Item <> FList^[Index] then
+  begin
+    FList^[Index] := Item;
+    fNeedRefresh:=True;
+  end;
+end;
+
+function TMemList.Remove(Item: Pointer): Integer;
+begin
+  Result := IndexOf(Item);
+  if Result >= 0 then begin
+    Delete(Result);
+    FNeedRefresh:=True;
+  end
+end;
+
+procedure TMemList.Pack;
+var
+  I: Integer;
+begin
+  for I := FCount - 1 downto 0 do
+    if Items[I] = nil then
+      Delete(I);
+  FNeedRefresh:=True;    
+end;
+
+procedure TMemList.SetCapacity(NewCapacity: Integer);
+begin
+  if (NewCapacity < FCount) or (NewCapacity > MaxListSize) then Error(@SListCapacityError, NewCapacity);
+  if NewCapacity <> FCapacity then
+  begin
+    ReallocMem(FList, NewCapacity * SizeOf(Pointer));
+    FCapacity := NewCapacity;
+  end;
+end;
+
+procedure TMemList.SetCount(NewCount: Integer);
+begin
+  if (NewCount < 0) or (NewCount > MaxListSize) then Error(@SListCountError, NewCount);
+  if NewCount > FCapacity then SetCapacity(NewCount);
+  if NewCount > FCount then FillChar(FList^[FCount], (NewCount - FCount) * SizeOf(Pointer), 0);
+  FCount := NewCount;
+  FNeedRefresh:=True;
+end;
+
+procedure TMemList.QuickSort(L, R: Integer);
+var
+  I, J, P                     : integer;
+  k: TSortRecord;
+begin
+  repeat
+    I := L;
+    J := R;
+    P := (L + R) shr 1;
+    repeat
+      while FSortList^[i].Data < FSortList^[P].Data do Inc(I);
+      while FSortList^[J].Data > FSortList^[P].Data do Dec(J);
+      if I <= J then
+        begin
+          k:= FSortList^[i];
+          FSortList^[i]:=FSortList^[j];
+          FSortList^[j]:=k;
+          if P = I then P := J
+          else if P = J then P := I;
+          Inc(I);
+          Dec(J);
+        end;
+    until I > J;
+    if L < J then QuickSort(L, J);
+    L := I;
+  until I >= R;
+end;
+
+procedure TMemList.Sort;
+var
+  i: integer;
+begin
+  if FNeedRefresh and (FList <> nil) and (Count > 0) then begin
+    ReallocMem(FSortList, Capacity * SizeOf(TSortRecord));
+    For i:=0 to Count -1 do begin
+      FSortList^[i].data:= FList^[I];
+      FSortList^[i].position:= i;
+    end;
+    QuickSort(0, Count - 1);
+    FNeedRefresh:=False;
+  end;
+end;
+
+function TMemList.Extract(Item: Pointer): Pointer;
+var
+  I: Integer;
+begin
+  Result := nil;
+  I := IndexOf(Item);
+  if I >= 0 then
+  begin
+    Result := Item;
+    FList^[I] := nil;
+    Delete(I);
+  end;
+end;
+
+
+procedure TMemList.Assign(ListA: TMemList; AOperator: TMemListAssignOp; ListB: TMemList);
+var
+  I: Integer;
+  LTemp, LSource: TMemList;
+begin
+  FNeedRefresh:=True;
+  // ListB given?
+  if ListB <> nil then
+  begin
+    LSource := ListB;
+    Assign(ListA);
+  end
+  else
+    LSource := ListA;
+
+  // on with the show
+  case AOperator of
+
+    // 12345, 346 = 346 : only those in the new list
+    mlaCopy:
+      begin
+        Clear;
+        Capacity := LSource.Capacity;
+        for I := 0 to LSource.Count - 1 do
+          Add(LSource[I]);
+      end;
+
+    // 12345, 346 = 34 : intersection of the two lists
+    mlaAnd:
+      for I := Count - 1 downto 0 do
+        if LSource.IndexOf(Items[I]) = -1 then
+          Delete(I);
+
+    // 12345, 346 = 123456 : union of the two lists
+    mlaOr:
+      for I := 0 to LSource.Count - 1 do
+        if IndexOf(LSource[I]) = -1 then
+          Add(LSource[I]);
+
+    // 12345, 346 = 1256 : only those not in both lists
+    mlaXor:
+      begin
+        LTemp := TMemList.Create; // Temp holder of 4 byte values
+        try
+          LTemp.Capacity := LSource.Count;
+          for I := 0 to LSource.Count - 1 do
+            if IndexOf(LSource[I]) = -1 then
+              LTemp.Add(LSource[I]);
+          for I := Count - 1 downto 0 do
+            if LSource.IndexOf(Items[I]) <> -1 then
+              Delete(I);
+          I := Count + LTemp.Count;
+          if Capacity < I then
+            Capacity := I;
+          for I := 0 to LTemp.Count - 1 do
+            Add(LTemp[I]);
+        finally
+          LTemp.Free;
+        end;
+      end;
+
+    // 12345, 346 = 125 : only those unique to source
+    mlaSrcUnique:
+      for I := Count - 1 downto 0 do
+        if LSource.IndexOf(Items[I]) <> -1 then
+          Delete(I);
+
+    // 12345, 346 = 6 : only those unique to dest
+    mlaDestUnique:
+      begin
+        LTemp := TMemList.Create;
+        try
+          LTemp.Capacity := LSource.Count;
+          for I := LSource.Count - 1 downto 0 do
+            if IndexOf(LSource[I]) = -1 then
+              LTemp.Add(LSource[I]);
+          Assign(LTemp);
+        finally
+          LTemp.Free;
+        end;
+      end;
+  end;
+end;
+
+function TMemList.intIndexOf(Item: PAnsiChar): Integer;
+var
+  L, H, I, C                  : integer;
+  Res                         : boolean;
+begin
+  Res := False;
+  L := 0;
+  H := FCount - 1;
+  while L <= H do
+    begin
+      I := (L + H) shr 1;
+      C := FSortList^[i].Data - Item;
+      if C < 0 then
+        L := I + 1
+      else
+        begin
+          H := I - 1;
+          if C = 0 then Res := True;
+        end;
+    end;
+  if Res then
+    Result := L
+  else
+    Result := -1;
+end;
+
+constructor TMemList.Create;
+begin
+  inherited;
+end;
+
+{ TDAMemoryDataset }
+
+function TDAMemoryDataset.AllocRecordBuffer: Dataset_PAnsiChar;
+begin
+  Result:= Dataset_PAnsiChar(CreateMemDatasetRecord(mrEmpty, 0, True));
+end;
+
+procedure TDAMemoryDataset.CalculateOffsets;
+var
+  i: integer;
+  lField: TField;
+  llen: cardinal;
+begin
+  if not FStoreStringsAsReference then begin
+    for i := 0 to FieldCount - 1 do
+      with Fields[i] do
+        if (DataType in ft_Strings) and (Size >= MaxStringSizeInline) then begin
+          FStoreStringsAsReference := True;
+          Break;
+        end;
+  end;
+  SetLength(FOffsets, FieldCount + 1);
+  SetLength(FDataSizeArray,FieldCount);
+  SetLength(FDataTypeArray,FieldCount);
+  // FOffsets[FieldCount+1] = BookMarkOffset
+  FNullMaskSize := (FieldCount + 7) div 8;
+  FOffsets[0] := FNullMaskSize;
+  FHasReferencedFields := FStoreStringsAsReference;
+  for i := 0 to FieldCount - 1 do begin
+    lField := Fields[i];
+    FDataTypeArray[i]:=lField.DataType;
+    llen:=CalcFieldLen(lField.DataType,lField.Size);
+    FDataSizeArray[i] := llen;
+    FOffsets[i + 1] := FOffsets[i] + llen;
+    FHasReferencedFields := FHasReferencedFields or IsReferencedField(lField.DataType);
+  end;
+  FNativeRecordSize := FOffsets[FieldCount];
+
+  //
+
+//  FBookMarkOffset := FNativeRecordSize;
+//  FCalculatedOffset := FBookMarkOffset + SizeOf(TRecInfo);
+//  FDatasetBufferSize := FCalculatedOffset + CalcFieldsSize;
+  FDatasetBufferSize := SizeOf(TMemDatasetrecord)+CalcFieldsSize;
+end;
+
+procedure TDAMemoryDataset.ClearFieldByFieldType(FieldBuffer: pointer; ADataType: TFieldType);
+begin
+  case ADataType of
+    ftString, ftFixedChar: begin
+      PAnsiString(FieldBuffer)^ := '';
+      PPointer(FieldBuffer)^ := nil;
+    end;
+    {$IFDEF DA_FixedWideCharSupport}ftFixedWideChar,{$ENDIF DA_FixedWideCharSupport}
+    ftWideString: begin
+      PWideString(FieldBuffer)^ := '';
+      PPointer(FieldBuffer)^ := nil;
+    end;
+  else
+    if ADataType in ft_BlobTypes then  begin
+      FreeBlobRecord(PPointer(FieldBuffer)^);
+      PPointer(FieldBuffer)^ := nil;
+    end;
+  end;
+end;
+
+procedure TDAMemoryDataset.ClearBin2Field(Buffer: Dataset_PAnsiChar; AField: TField);
+begin
+  if GetNullMask(Buffer, AField.Index) then Exit;
+  if IsReferencedField(AField.DataType) then
+    ClearFieldByFieldType(IntFindFieldData(Buffer, AField, True), AField.DataType);
+  SetNullMask(Buffer, AField.Index, True);
+end;
+
+procedure TDAMemoryDataset.ClearRecords;
+var
+  aList: TMemList;
+begin
+  FDataList.Clear;
+{$IFDEF MEM_PACKETRECORDS}
+  PackedRecordListClear;  
+{$ENDIF MEM_PACKETRECORDS}
+  UnregisterAllClients;
+  AList := FRecordsList.LockListForWriting;
+  try
+    MemList_ClearRecords(aList);
+  finally
+    FRecordsList.UnlockListForWriting;
+  end;
+end;
+
+constructor TDAMemoryDataset.Create(AOwner: TComponent);
+begin
+  inherited;
+{$IFDEF MEM_PACKETRECORDS}
+  fPackedMode := False;
+{$ENDIF MEM_PACKETRECORDS}
+  FRecordsList := TThreadMemList.Create;
+  FDataList := TMemList.Create;
+  FMasterDataLink := TMasterDataLink.Create(Self);
+  FMasterDataLink.OnMasterChange := MasterChanged;
+  FMasterDataLink.OnMasterDisable := MasterDisabled;
+  f_DefaultIndexRecord := TDAMemIndex.Create(Self);
+//  FIndexFieldNameList := TList.Create;
+//  FIndexCaseInsList := TList.Create;
+//  FIndexDescFields := TList.Create;
+  FDetailsFieldNameList := TList.Create;
+
+  {$IFDEF MSWINDOWS}
+  FSortLocale := LOCALE_USER_DEFAULT;
+  {$ENDIF MSWINDOWS}
+  FStoreStringsAsReference:=False;
+  FExpressionEvaluator:= TDAStdExpressionEvaluator.Create;
+  FExpressionEvaluator.OnGetValue := EEGetValue;
+  FExpressionEvaluator.UseWildcardsInEqual:= True; // FilterOptions = []
+  FExpressionEvaluator.StringCaseInsensitive:= False; // FilterOptions = []
+  fUseIndexinLocate:=True;
+  FIndexList := TList.Create;
+  FAutoCompactRecords := False;
+  FAutoSort := False;
+end;
+
+function TDAMemoryDataset.CreateBlobStream(Field: TField;
+  Mode: TBlobStreamMode): TStream;
+begin
+  Result := TDABlobStream.Create(TBlobField(Field), Mode);
+end;
+
+destructor TDAMemoryDataset.Destroy;
+begin
+  CloneSource := nil;
+  inherited;
+  UnregisterPermanentClients;
+  IndexList_Clear;
+  FDetailsFieldNameList.Free;
+  FExpressionEvaluator.Free;
+//  FIndexFieldNameList.Free;
+//  FIndexCaseInsList.Free;
+//  FIndexDescFields.Free;
+  f_DefaultIndexRecord.Free;
+  FMasterDataLink.Free;
+  FIndexList.Free;
+  FDataList.Free;
+  FRecordsList.Free;
+  FIndexDefs.Free;
+  if FCloneClientList <> nil then FCloneClientList.Free;
+  if FClonePermanentClientList <> nil then FClonePermanentClientList.Free;  
+end;
+
+procedure TDAMemoryDataset.DuplicateBuffer(Source, Dest: PMemDatasetrecord_Native;ACanPack:boolean);
+var
+  i: Cardinal;
+  p, p2: PBlobRecord;
+  lbin3: Dataset_PAnsiChar;
+begin
+{$IFDEF MEMDATASET_DEBUG}
+//  if not ((Source.Ident in [mrEmpty..mrBin3Style]) and(Dest.Ident in [mrEmpty..mrBin3Style])) then DatabaseError('TDAMemoryDataset.DuplicateBuffer: Data are damaged');
+{$ENDIF MEMDATASET_DEBUG}
+  case Source.Ident of
+    mrEmpty: begin
+      case Dest.Ident of
+        mrEmpty :;
+        mrBin2Style: FreeBin2Buffer(Dest.Data);
+        mrBin3Style: FreeBin3Buffer(Dest.Data);
+      end;
+      Dest.Data := nil;
+      Dest.Ident := mrEmpty;
+    end;
+    mrBin3Style: begin
+      I := GetBin3Offset(Source.Data, FieldCount);
+      {$IFDEF USE_REALLOC}
+      case Dest.Ident of
+        mrEmpty : Dest.Data := CreateBin3Struct(i);
+        mrBin2Style: begin
+          ClearBin2Buffer(Dest.Data);
+          if i < FNativeRecordSize then begin
+            ReallocMem(Dest.Data,i);
+          end
+          else begin
+            FreeMem(Dest.Data);
+            Dest.Data := CreateBin3Struct(i);
+          end;
+        end;
+        mrBin3Style: begin
+          if i <= GetBin3Offset(Dest.Data, FieldCount) then begin
+            ReallocMem(Dest.Data,i)
+          end
+          else begin
+            FreeMem(Dest.Data);
+            Dest.Data := CreateBin3Struct(i);
+          end;
+        end;
+      end;
+      {$ELSE}
+      case Dest.Ident of
+        mrBin2Style: FreeBin2Buffer(Dest.Data);
+        mrBin3Style: FreeBin3Buffer(Dest.Data);
+      end;
+      Dest.Data := CreateBin3Struct(i);
+      {$ENDIF}
+      Move(pointer(Source.Data)^, pointer(Dest.Data)^, i);
+      Dest.Ident := mrBin3Style;
+    end;
+    mrBin2Style: begin
+      if Dest.Ident = mrBin3Style then FreeBin3Buffer(Dest.Data);
+      if ACanPack and FAutoCompactRecords then
+        lbin3 := Bin2ToBin3(Source.Data)
+      else
+        lbin3 := nil;
+      if lbin3 <> nil then begin
+        if Dest.Ident = mrBin2Style then FreeBin2Buffer(Dest.Data);
+        Dest.Ident := mrBin3Style;
+        Dest.Data := lbin3;
+      end
+      else begin
+        if Dest.Ident = mrBin2Style then
+          ClearBin2Buffer(Dest.Data)
+        else
+          Dest.Data := CreateBin2Struct;
+        Dest.Ident := mrBin2Style;
+        if not FHasReferencedFields then begin
+          Move(pointer(Source.Data)^, pointer(Dest.Data)^, FNativeRecordSize);
+        end
+        else begin
+          Move(pointer(Source.Data)^, pointer(Dest.Data)^, FNullMaskSize);
+
+          for I := 0 to FieldCount - 1 do begin
+            if (not GetNullMask(Source.Data, i)) then begin
+              if not IsReferencedField(FDataTypeArray[i])  then begin
+                Move(pointer(Source.Data + FOffsets[i])^, pointer(Dest.Data + FOffsets[i])^, FDataSizeArray[i])
+              end
+              else begin
+                case FDataTypeArray[i] of
+                  ftString,ftFixedChar: PAnsiString(Dest.Data + FOffsets[i])^ := PAnsiString(Source.Data + FOffsets[i])^;
+                  {$IFDEF DA_FixedWideCharSupport}ftFixedWideChar,{$ENDIF DA_FixedWideCharSupport}
+                  ftWideString: PWideString(Dest.Data + FOffsets[i])^ := PWideString(Source.Data + FOffsets[i])^;
+                else
+                  if FDataTypeArray[i] in ft_BlobTypes then begin
+                    p := PPointer(Source.Data + FOffsets[i])^;
+                    if p <> nil then begin
+                      p2 := CreateBlobRecord(PBlobRecord(p)^.size);
+                      Move(pointer(p)^, pointer(p2)^, p^.size + SizeOf(TBlobRecord));
+                      PPointer(Dest.Data + FOffsets[i])^ := p2;
+                    end
+                    else begin
+                      SetNullMask(Dest.Data, i, True);
+                    end;
+                  end;
+                end;
+              end;
+            end;
+          end;
+        end;
+      end;
+    end;
+  end;
+end;
+
+procedure TDAMemoryDataset.EEGetValue(Sender: TDAExpressionEvaluator; const aIdentifier: string; out aValue: Variant);
+begin
+  aValue:= GetVarValueFromBuffer(FExpressionBuffer^.Data, FieldByName(aIdentifier), FExpressionBuffer^.Ident = mrBin2Style);
+end;
+
+procedure TDAMemoryDataset.ProcessFilter;
+begin
+  CheckBrowseMode;
+  DoFilterRecords;
+end;
+
+function TDAMemoryDataset.FilterRecord(buf: PMemDatasetrecord_Native; AUseEvent: Boolean): Boolean;
+begin
+  Result:=True;
+  if FRangeActive then begin
+    IntGetRecordList.LockListForReading;
+    try
+      Result := (CompareValues_Range(buf,FKeyBuffers[kiCurRangeStart]) >=0) and
+                (CompareValues_Range(buf,FKeyBuffers[kiCurRangeEnd])   <=0);
+    finally
+      IntGetRecordList.UnlockListForReading;
+    end;
+  end;
+  if Result and (Filter <> '') then begin
+    IntGetRecordList.LockListForReading;
+    try
+      FExpressionBuffer:=buf;
+      Result := FExpressionEvaluator.Evaluate(Filter);
+    finally
+      IntGetRecordList.UnlockListForReading;
+    end;
+  end;
+  if Result and AUseEvent and Assigned(OnFilterRecord) then OnFilterRecord(Self, Result);
+end;
+
+procedure TDAMemoryDataset.FreeRecordBuffer(var Buffer: Dataset_PAnsiChar);
+begin
+  FreeMemDatasetRecord(pointer(Buffer));
+  Buffer := nil;
+end;
+
+function TDAMemoryDataset.GetActiveRecBuf(var RecBuf: Dataset_PAnsiChar): Boolean;
+begin
+  case State of
+    dsBrowse:
+      if IsEmpty then
+        RecBuf := nil
+      else
+        RecBuf := ActiveBuffer;
+    dsEdit, dsInsert, dsNewValue: RecBuf := ActiveBuffer;
+    dsCalcFields: RecBuf := CalcBuffer;
+    dsFilter: RecBuf := FFilterBuffer;
+    dsSetKey: RecBuf := Dataset_PAnsiChar(FKeyBuffer) + SizeOf(TMemKeyBuffer);
+  else
+    RecBuf := nil;
+  end;
+  Result := RecBuf <> nil;
+end;
+
+procedure TDAMemoryDataset.GetBookmarkData(Buffer: Dataset_PAnsiChar; Data: Pointer);
+begin
+  Move(PMemDatasetrecord(Buffer)^.BookmarkData.Bookmark, PBookmarkData(Data)^, SizeOf(TBookmarkData));
+end;
+
+function TDAMemoryDataset.GetBookmarkFlag(Buffer: Dataset_PAnsiChar): TBookmarkFlag;
+begin
+  Result := PMemDatasetrecord(Buffer)^.BookmarkData.BookmarkFlag;
+end;
+
+function TDAMemoryDataset.GetFieldData(Field: TField; Buffer: Pointer): Boolean;
+var
+  RecBuf: Dataset_PAnsiChar;
+  Data: Dataset_PAnsiChar;
+  //  VarData           : Variant;
+  Len: integer;
+  k,k1: Cardinal;
+begin
+  Result := False;
+  {$IFDEF FPC}
+  RecBuf := nil;
+  {$ENDIF FPC}
+  if not GetActiveRecBuf(RecBuf) then Exit;
+  Result := (PMemDatasetrecord_Native(RecBuf)^.Ident in [mrBin2Style, mrBin3Style]) and
+            (Field.DataType in ft_Supported) and
+            not GetNullMask(PMemDatasetrecord_Native(RecBuf)^.Data, Field.Index);
+  if Result and (Buffer <> nil) then begin
+    case PMemDatasetrecord_Native(RecBuf)^.Ident of
+      mrBin2Style: begin
+        Data := PMemDatasetrecord_Native(RecBuf)^.Data + FOffsets[Field.Index];
+        if Data = nil then begin
+          Result:=False;
+          Exit;
+        end;
+        {if Field.DataType = ftVariant then
+          begin
+            VarData := PVariant(Data)^;
+            PVariant(Buffer)^ := VarData;
+          end
+          else}
+        if not IsReferencedField(Field.DataType) then begin
+          Move(Data^, Buffer^, FDataSizeArray[Field.Index])
+        end else begin
+          case Field.DataType of
+            ftString,ftFixedChar: begin
+              len := Length(PAnsiString(Data)^);
+              if Len > Field.Size then Len := Field.Size;
+              Move(pointer(PAnsiString(Data)^)^, buffer^, len*SizeOf(AnsiChar));
+              PAnsiChar(buffer)[Len] := #0;
+            end;
+            ftWideString: begin
+              len := Length(PWideString(Data)^);
+              if Len > Field.Size then Len := Field.Size;
+              Move(pointer(PWideString(Data)^)^, buffer^, len * sizeOf(WideChar));
+              PWideChar(buffer)[Len] := #0;
+            end;
+          else
+            if Field.DataType in ft_BlobTypes then DatabaseError('GetFieldData: BlobType');
+          end;
+        end;
+      end;
+      mrBin3Style: begin
+        Data :=PMemDatasetrecord_Native(RecBuf)^.Data;
+        k  := GetBin3Offset(Data,Field.Index);
+        k1 := GetBin3Offset(Data,Field.Index+1);
+        Move((Data+k)^, buffer^, k1-k);
+      end;
+    end;
+  end;
+end;
+
+function TDAMemoryDataset.GetRecNo: Integer;
+begin
+  UpdateCursorPos;
+  if (FRecordPos = -1) and (RecordCount > 0) then
+    Result := 1
+  else
+    Result := FRecordPos + 1;
+end;
+
+function TDAMemoryDataset.InternalGetRecord(Buffer: PMemDatasetRecord; GetMode: TGetMode;
+  DoCheck: Boolean): TGetResult;
+begin
+  if Buffer = nil then begin
+    Result := grError;
+    Exit;
+  end;
+
+  Result := grOk;
+  case GetMode of
+    gmCurrent: begin
+      if (FRecordPos = -1) and (RecordCount > 0) then FRecordPos := 0;
+      if (FRecordPos < 0) or (FRecordPos >= RecordCount) then Result := grError;
+    end;
+    gmPrior:
+      if FRecordPos <= 0 then begin
+        Result := grBOF;
+        FRecordPos := -1;
+      end
+      else
+        Dec(FRecordPos);
+    gmNext:
+      if FRecordPos >= RecordCount - 1 then
+        Result := grEOF
+      else
+        Inc(FRecordPos);
+  end;
+  if Result = grOk then begin
+    RecordToBuffer(FRecordPos, Buffer);
+    GetCalcFields(Dataset_PAnsiChar(Buffer));
+  end
+  else if (Result = grError) and DoCheck then
+    DatabaseError('No data found');
+end;
+
+function TDAMemoryDataset.GetRecordCount: Integer;
+begin
+  Result := FDataList.Count;
+end;
+
+function TDAMemoryDataset.GetRecordSize: Word;
+begin
+  Result := FDatasetBufferSize;
+end;
+
+function TDAMemoryDataset.GetVarValueFromBuffer(Buffer: pointer; Field: TField; abin2: boolean): variant;
+var
+  buf: PAnsiChar;
+  p: pointer;
+  lLen: cardinal;
+begin
+  if GetNullMask(Buffer,Field.Index) then begin
+    Result := Null;
+  end
+  else begin
+    buf := IntFindFieldData(Buffer,Field,aBin2);
+    case Field.DataType of
+      ftString, ftFixedChar: begin
+        if abin2 and FStoreStringsAsReference then
+          Result := PAnsistring(Buf)^
+        else
+          Result := Ansistring(PAnsiChar(Buf));
+      end;
+      {$IFDEF DA_FixedWideCharSupport}ftFixedWideChar,{$ENDIF DA_FixedWideCharSupport}
+      ftWideString: begin
+        if abin2 and FStoreStringsAsReference then
+          Result := PWidestring(Buf)^
+        else
+          Result := WideString(PWideChar(Buf))
+      end;
+      ftSmallint: Result := PSmallint(buf)^;
+      ftInteger, ftDate, ftTime, ftAutoInc: Result := PInteger(buf)^;
+      ftWord: Result := PWord(buf)^;
+      ftBoolean: Result := PWordBool(buf)^;
+      ftFloat, ftCurrency: Result := PDouble(Buf)^;
+      ftDateTime: Result := TimeStampToDateTime(MSecsToTimeStamp({$IFDEF FPC}Trunc{$ENDIF}( PDateTime(Buf)^)));
+      ftBcd: Result := PCurrency(buf)^;
+      ftFMTBCD: Result := BCDToVariant(PBcd(buf)^);
+      ftLargeint: Result := PInt64(Buf)^;
+      {$IFNDEF FPC}
+      ftTimeStamp: Result := VarSQLTimeStampCreate(PSQLTimeStamp(Buf)^);
+      {$ENDIF FPC}
+      ftGuid: Result:= AnsiString(PAnsiChar(Buf));
+    else
+      if abin2 then
+        lLen:=PBLOBRecord(buf)^.size
+      else
+        lLen := GetBin3Offset(Buffer, Field.Index+1)-GetBin3Offset(Buffer, Field.Index);
+      Result := VarArrayCreate([0,lLen-1],varByte);
+      p := VarArrayLock(Result);
+      try
+        if abin2 then
+          move(PBLOBRecord(buf)^.Data, p^,PBLOBRecord(buf)^.size)
+        else
+          Move(buf^, p^, lLen);
+      finally
+        VarArrayUnlock(Result);
+      end;
+    end;
+  end;
+end;
+
+procedure TDAMemoryDataset.IntAssignRecord(Source, Dest: PMemDatasetrecord_Native);
+begin
+  if State = dsFilter then DatabaseError(SNotEditing);
+  DuplicateBuffer(Source, Dest,True);
+end;
+
+
+procedure TDAMemoryDataset.InternalAddRecord(Buffer: Pointer; Append: Boolean);
+var
+  RecPos: Integer;
+  Rec: PMemDatasetrecord_Native;
+begin
+  Rec := CreateMemDatasetRecord(mrEmpty,0,False);
+  if Append then
+    RecPos := FDataList.Add(Rec)
+  else begin
+    if FRecordPos = -1 then
+      RecPos := 0
+    else
+      RecPos := FRecordPos;
+    FDataList.Insert(RecNo, Rec);
+  end;
+  FRecordPos := RecPos;
+  //  SetAutoIncFields(Buffer);
+  IntAssignRecord(Buffer, Rec);
+  IntInsertBuffer(Rec);
+end;
+
+procedure TDAMemoryDataset.InternalClose;
+var
+  i: integer;
+begin
+  f_DefaultIndexRecord.Clear;
+  For i:=0 to FIndexList.Count-1 do
+    TDAMemIndex(FIndexList[i]).Clear;
+
+//  FIndexFieldNameList.Clear;
+//  FIndexCaseInsList.Clear;
+//  FIndexDescFields.Clear;
+  UnregisterClient(Self);
+  UnregisterPermanentClients;
+  ClearRecords;
+  FreeKeyBuffers;
+  FCloneSource := nil;
+  BindFields(False);
+  if DefaultFields then DestroyFields;
+  SetLength(FDataTypeArray,0);
+  SetLength(FOffsets, 0);
+  SetLength(FDataSizeArray,0);
+  FActive := False;
+end;
+
+procedure TDAMemoryDataset.InternalDelete;
+var
+  f: boolean;
+begin
+  IntRemoveBuffer(FDataList.Items[FRecordPos]);
+  f := f_DefaultIndexRecord.LastSorted > FLastUpdate;
+  FLastUpdate := Now;
+  if f then f_DefaultIndexRecord.LastSorted :=Now;
+end;
+
+procedure TDAMemoryDataset.InternalFirst;
+begin
+  FRecordPos := -1;
+end;
+
+procedure TDAMemoryDataset.InternalGotoBookmark(Bookmark: Pointer);
+var
+  lRecNo: Integer;
+begin
+  lRecNo := IntFindRecordID(PBookMarkData(Bookmark)^);
+  if lRecNo <> -1 then
+    FRecordPos := lRecNo
+  else
+    DatabaseError('Bookmark not found');
+end;
+
+procedure TDAMemoryDataset.InternalHandleException;
+begin
+ {$IFDEF FPC}
+   inherited;
+ {$ELSE}
+   Application.HandleException(Self);
+ {$ENDIF}
+end;
+
+procedure TDAMemoryDataset.InternalInitFieldDefs;
+begin
+  //  inherited InternalInitFieldDefs;
+end;
+
+procedure TDAMemoryDataset.InternalInitRecord(Buffer: Dataset_PAnsiChar);
+begin
+  with PMemDatasetrecord_Native(Buffer)^ do begin
+    case Ident of
+      mrEmpty:;
+      mrBin2Style: FreeBin2Buffer(Data);
+      mrBin3Style: FreeBin3Buffer(Data);
+    end;
+    Ident := mrEmpty;
+    Data := nil;
+  end;
+end;
+
+procedure TDAMemoryDataset.InternalLast;
+begin
+  FRecordPos := RecordCount;
+end;
+
+procedure TDAMemoryDataset.InternalOpen;
+begin
+  BookmarkSize := SizeOf(TBookmarkData);
+  FieldDefs.Update;
+  IndexDefs.Updated := False;
+  if DefaultFields then CreateFields;
+  BindFields(True);
+  CalculateOffsets;
+  RegisterClient(Self);
+  RegisterPermanentClients;
+  AllocKeyBuffers;
+  FLastUpdate:=Now;
+  if FDetailFields <> '' then InitDetailFieldNamesList;
+  if FIndexName <> '' then f_DefaultIndexRecord.Init(GetIndexFields);
+  DoFilterRecords;
+  InternalFirst;
+end;
+
+procedure TDAMemoryDataset.InternalPost;
+var
+  Rec: Pointer;
+begin
+{$IFDEF DELPHI6UP}
+  inherited InternalPost;
+{$ENDIF}
+  if State = dsEdit then begin
+    Rec:=FDataList[FRecordPos];
+    IntGetRecordList.LockListForWriting;
+    try
+      IntAssignRecord(pointer(ActiveBuffer), Rec);
+    finally
+      IntGetRecordList.UnlockListForWriting;
+    end;
+    IntUpdateBuffer(Rec);
+  end
+  else begin
+    //    if State in [dsInsert] then SetAutoIncFields(ActiveBuffer);
+    Rec := CreateMemDatasetRecord(mrEmpty,0,False);
+    IntAssignRecord(Pointer(ActiveBuffer), Rec);
+    intInsertRecord(Rec);
+    IntInsertBuffer(Rec);
+  end;
+  FLastUpdate := now;
+end;
+
+procedure TDAMemoryDataset.InternalSetFieldData(Field: TField; Buffer: Pointer);
+var
+  RecBuf: Dataset_PAnsiChar;
+  Data: PAnsiChar;
+  nativeData: Dataset_PAnsiChar;
+begin
+  {$IFDEF FPC}
+  RecBuf := nil;
+  {$ENDIF FPC}
+  GetActiveRecBuf(RecBuf);
+  ConvertBin3ToBin2Record(PMemDatasetrecord_Native(RecBuf));
+  with Field do begin
+    if State = dsSetKey then
+      nativeData := RecBuf
+    else
+      nativeData := PMemDatasetrecord_Native(RecBuf)^.Data;
+    Data := IntFindFieldData(nativeData, Field, True);
+    if Data <> nil then begin
+      {
+      if DataType = ftVariant then begin
+        if Buffer <> nil then
+          VarData := PVariant(Buffer)^
+        else
+          VarData := EmptyParam;
+        PVariant(Data)^ := VarData;
+      end else
+      }
+      if not IsReferencedField(DataType) then begin
+        if Buffer <> nil then begin
+          Move(Buffer^, Data^, FDataSizeArray[Field.Index]);
+          SetNullMask(nativeData, Index, False);
+        end
+        else
+          SetNullMask(nativeData, Index, True);
+      end
+      else begin
+        if Buffer <> nil then begin
+          if DataType in [ftString,ftFixedChar] then begin
+            PAnsiString(Data)^ := PAnsiChar(buffer);
+            SetNullMask(nativeData, Index, False);
+          end
+          else if DataType in [{$IFDEF DA_FixedWideCharSupport}ftFixedWideChar,{$ENDIF DA_FixedWideCharSupport}ftWideString] then begin
+            PWideString(Data)^ := PWideChar(buffer);
+            SetNullMask(nativeData, Index, False);
+          end;
+        end
+        else
+          SetNullMask(nativeData, Index, True);
+      end;
+    end;
+  end;
+end;
+
+procedure TDAMemoryDataset.InternalSetToRecord(Buffer: Dataset_PAnsiChar);
+begin
+  InternalGotoBookmark(@PMemDatasetRecord(Buffer)^.BookmarkData.Bookmark);
+end;
+
+function TDAMemoryDataset.IntFindFieldData(Buffer: Dataset_PAnsiChar;
+  Field: TField; aBin2: Boolean): Pointer;
+begin
+  if (Buffer <> nil) and (Field.DataType in ft_Supported) then begin
+    if aBin2 then
+      Result := (Buffer + FOffsets[Field.Index])
+    else
+      Result := Buffer + GetBin3Offset(Buffer,Field.Index);
+  end
+  else
+    Result := nil;
+end;
+
+function TDAMemoryDataset.IntFindFieldData(Buffer: PMemDatasetrecord_Native;Field: TField): Pointer;
+begin
+  if (Buffer <> nil) then
+    Result := IntFindFieldData(Buffer^.Data,Field, Buffer^.Ident = mrBin2Style)
+  else
+    Result := nil;
+end;
+
+function TDAMemoryDataset.IntFindRecordID(Buf: pointer): Integer;
+begin
+  Result := FDataList.IndexOf(Buf);
+end;
+
+function TDAMemoryDataset.IsActiveFilter: Boolean;
+begin
+  Result := (Filtered and (Filter <> '')) or FRangeActive;
+end;
+
+function TDAMemoryDataset.IsCursorOpen: Boolean;
+begin
+  Result := FActive;
+end;
+
+function TDAMemoryDataset.IsReferencedField(ADataType: TFieldType): Boolean;
+begin
+  Result:= (FStoreStringsAsReference and (ADataType in ft_Strings)) or
+           (ADataType in ft_BlobTypes);
+end;
+
+procedure TDAMemoryDataset.OpenCursor(InfoQuery: Boolean);
+var
+  i: integer;
+  lfld, lfld2: TField;
+begin
+  if not InfoQuery then begin
+    if (FMemCloneSource <> nil) and (FCloneSource = nil) then begin
+      if FMemCloneSource <> nil then FMemCloneSource.Open;
+      FMemCloneSource.RegisterClient(Self);
+    end;
+    if FCloneSource <> nil then begin
+      Fields.Clear;
+      // creating
+      FieldDefs.Assign(FCloneSource.FieldDefs);
+      for i:=0 to FieldDefs.Count-1 do
+        FieldDefs[i].CreateField(Self).DataSet := Self;
+      // creating lookups
+      For i:=0 to FCloneSource.Fields.Count-1 do begin
+        lfld2 := FCloneSource.Fields[i];
+        if lfld2.FieldKind in [fkCalculated,fkLookup] then begin
+          lfld := TField(lfld2.NewInstance).Create(Self);
+          lfld.Name := Self.Name + lfld2.FieldName;
+          lfld.FieldName := lfld2.FieldName;
+          lfld.DataSet := Self;
+          if (lfld2 is TStringField) or (lfld2 is TWideStringField) then lfld.Size := lfld2.Size;
+          lfld.FieldKind := lfld2.FieldKind;
+          lfld.Required := lfld2.Required;
+          {$IFNDEF FPC}
+          lfld.Lookup := lfld2.Lookup;
+          {$ENDIF}
+          lfld.LookupDataSet := lfld2.LookupDataSet;
+          lfld.LookupKeyFields := lfld2.LookupKeyFields;
+          lfld.LookupCache := lfld2.LookupCache;
+          lfld.LookupResultField := lfld2.LookupResultField;
+          lfld.KeyFields := lfld2.KeyFields;
+        end;
+      end;
+     for i := 0 to FCloneSource.Fields.Count-1 do
+       FieldByName(FCloneSource.Fields[i].FieldName).Index := i + 1;
+    end
+    else begin
+      if FieldCount > 0 then FieldDefs.Clear;
+      InitFieldDefsFromFields;
+    end;
+    FExpressionEvaluator.UseTrueFalseinVariableName:=False;
+    For i:=0 to Fields.Count-1 do begin
+      // eugene: 20080407 - SameText
+      if SameText(Fields[i].FieldName,'True') or SameText(Fields[i].FieldName,'False') then begin
+        FExpressionEvaluator.UseTrueFalseinVariableName:=True;
+        Break;
+      end;
+    end;
+  end;
+  FActive := True;
+  inherited OpenCursor(InfoQuery);
+end;
+
+function TDAMemoryDataset.GetNullMask(Buffer: Dataset_PAnsiChar; const AIndex: Integer): boolean;
+begin
+  Result := (ord(Buffer[AIndex shr 3]) shr (AIndex and 7)) and 1 = 1;
+end;
+
+procedure TDAMemoryDataset.RecordToBuffer(RecNo: integer; Buffer: PMemDatasetRecord);
+begin
+  IntGetRecordList.LockListForReading;
+  try
+    with Buffer^.BookmarkData do begin
+      Bookmark := TBookmarkData(FDataList[RecNo]);
+      BookmarkFlag := bfCurrent;
+    end;
+    DuplicateBuffer(FDataList[RecNo], Pointer(Buffer),False);
+  finally
+    IntGetRecordList.UnlockListForReading;
+  end;
+end;
+
+procedure TDAMemoryDataset.SetAnsiString(NativeBuf: Pointer; Field: TField;
+  const Value: Ansistring);
+var
+  len: integer;
+begin
+  if FStoreStringsAsReference then
+    PAnsiString(NativeBuf)^:=Value
+  else begin
+    len := Length(Value);
+    if Len > Field.Size then len:= Field.Size;
+    move(Pointer(Value)^,NativeBuf^,len*SizeOf(AnsiChar));
+    PAnsiChar(NativeBuf)[len]:=#0;
+  end;
+end;
+
+procedure TDAMemoryDataset.SetBlobData(Field: TField; Buffer: PMemDatasetrecord_Native;
+  Value: PBLOBRecord);
+begin
+  ConvertBin3ToBin2Record(Buffer);
+  if PPointer(Buffer.Data + FOffsets[Field.Index])^ <> Value then begin
+    PPointer(Buffer.Data + FOffsets[Field.Index])^ := Value;
+    SetNullMask(Buffer.Data, Field.Index, False);
+  end;
+end;
+
+procedure TDAMemoryDataset.SetBookmarkData(Buffer: Dataset_PAnsiChar; Data: Pointer);
+begin
+  Move(Data^, PMemDatasetRecord(Buffer)^.BookmarkData.Bookmark, SizeOf(TBookmarkData));
+end;
+
+procedure TDAMemoryDataset.SetBookmarkFlag(Buffer: Dataset_PAnsiChar; Value: TBookmarkFlag);
+begin
+  PMemDatasetRecord(Buffer)^.BookmarkData.BookmarkFlag := Value;
+end;
+
+procedure TDAMemoryDataset.SetFieldData(Field: TField; Buffer: Pointer);
+begin
+  if (State = dsSetKey) and ((Field.FieldNo < 0) or f_DefaultIndexRecord.IsValid and not Field.IsIndexField) then DatabaseErrorFmt(SNotIndexField, [Field.DisplayName]);
+  if not (State in dsWriteModes) then DatabaseError(SNotEditing);
+  with Field do begin
+    if FieldNo > 0 then begin
+      if State in [dsCalcFields, dsFilter] then DatabaseError(SNotEditing);
+      if ReadOnly and not (State in [dsSetKey, dsFilter]) then DatabaseErrorFmt({$IFDEF FPC}SReadOnlyField{$ELSE}SFieldReadOnly{$ENDIF}, [DisplayName]);
+      Validate(Buffer);
+    end;
+   if FieldKind <> fkInternalCalc then begin
+     InternalSetFieldData(Field, Buffer);
+   end;
+   if not (State in [dsCalcFields, dsInternalCalc, dsFilter, dsNewValue]) then DataEvent(deFieldChange, Longint(Field));
+  end;
+end;
+
+procedure TDAMemoryDataset.SetNullMask(Buffer: Dataset_PAnsiChar; const AIndex: Integer; const Value: boolean);
+var
+  i: byte;
+begin
+  i := AIndex shr 3;
+  if Value then
+    Buffer[I] := {$IFNDEF DELPHI2009UP}AnsiChar{$ENDIF}(ord(Buffer[I]) or (1 shl (AIndex and 7)))
+  else
+    Buffer[I] := {$IFNDEF DELPHI2009UP}AnsiChar{$ENDIF}(ord(Buffer[I]) and not (1 shl (AIndex and 7)))
+end;
+
+procedure TDAMemoryDataset.SetOnFilterRecord(const Value: TFilterRecordEvent);
+begin
+  inherited;
+  if Active and Filtered then First;
+end;
+
+procedure TDAMemoryDataset.SetRecNo(Value: Integer);
+begin
+  if (Value > 0) and (Value <= RecordCount) then begin
+    DoBeforeScroll;
+    FRecordPos := Value - 1;
+    Resync([]);
+    DoAfterScroll;
+  end;
+end;
+
+procedure TDAMemoryDataset.DataConvert(Field: TField; Source,
+  Dest: Pointer; ToNative: Boolean);
+{$IFNDEF DELPHI10UP}
+var
+  len: integer;
+{$ENDIF DELPHI10UP}
+begin
+  Case Field.Datatype of
+    ftBCD: PCurrency(Dest)^ := PCurrency(Source)^;
+{$IFNDEF DELPHI10UP}
+    ftWideString: begin
+      if ToNative then begin
+        len := Length(PWideString(Source)^);
+        Move(PWideChar(Source^)^, PWideChar(Dest)^, len * SizeOf(WideChar));
+        PWideChar(Dest)[Len] := #0;
+      end
+      else begin
+        len := Length(PWideChar(Source));
+        SetString(WideString(Dest^), PWideChar(Source), Len);
+      end;
+    end
+{$ENDIF DELPHI10UP}
+  else
+    inherited DataConvert(Field, Source, Dest, ToNative);
+  end;
+end;
+
+function TDAMemoryDataset.GetDataSource: TDataSource;
+begin
+  Result := MasterDataLink.DataSource;
+end;
+
+function TDAMemoryDataset.GetMasterFields: string;
+begin
+  Result := MasterDataLink.FieldNames;
+end;
+
+{$IFDEF FPC}
+const
+  SCircularDataLink = 'Circular datalinks are not allowed';
+{$ENDIF}
+
+procedure TDAMemoryDataset.SetDataSource(const Value: TDataSource);
+begin
+  if Value <> MasterDataLink.DataSource then begin
+    if (Value <> nil) and (Value.DataSet <> nil) then CheckforCircularLinks(Value.DataSet, False);
+    if IsLinkedTo(Value) then DatabaseError(SCircularDataLink, Self);
+    DataEvent(dePropertyChange, 0);
+    MasterDataLink.DataSource := Value;
+  end;
+end;
+
+procedure TDAMemoryDataset.SetMasterFields(const Value: string);
+begin
+  if (Value <> '') and (Filter <> '') then DatabaseError(SNoDetailFilter, Self);
+  if MasterDataLink.FieldNames <> Value then DataEvent(dePropertyChange, 0);
+  MasterDataLink.FieldNames := Value;
+end;
+
+function TDAMemoryDataset.GetIndexFieldNames: string;
+begin
+  if FFieldsIndex then Result := FIndexName else Result := '';
+end;
+
+procedure TDAMemoryDataset.SetIndexFieldNames(const Value: string);
+begin
+  SetIndex(Value, True);
+end;
+
+function TDAMemoryDataset.GetRecord(Buffer: Dataset_PAnsiChar; GetMode: TGetMode;
+  DoCheck: Boolean): TGetResult;
+var
+  Accept: Boolean;
+  SaveState: TDataSetState;
+begin
+  if Filtered and Assigned(OnFilterRecord) then begin
+    FFilterBuffer := Buffer;
+    SaveState := SetTempState(dsFilter);
+    try
+      Accept := True;
+      repeat
+        Result := InternalGetRecord(Pointer(Buffer), GetMode, DoCheck);
+        if Result = grOK then begin
+          OnFilterRecord(Self, Accept);
+          if not Accept and (GetMode = gmCurrent) then
+            Result := grError;
+        end;
+      until Accept or (Result <> grOK);
+    except
+      ApplicationHandleException(Self);
+      Result := grError;
+    end;
+    RestoreState(SaveState);
+  end else
+    Result := InternalGetRecord(Pointer(Buffer), GetMode, DoCheck)
+end;
+
+procedure TDAMemoryDataset.SetFiltered(Value: Boolean);
+begin
+  if Active and (Value <> Filtered) then begin
+    inherited;
+    if (Filter <> '') then
+      ProcessFilter
+    else if Assigned(OnFilterRecord) then First;         
+  end
+  else
+    inherited;
+end;
+
+procedure TDAMemoryDataset.SetFilterOptions(Value: TFilterOptions);
+begin
+  if (Value <> FilterOptions) then begin
+    inherited;
+    FExpressionEvaluator.StringCaseInsensitive := foCaseInsensitive in FilterOptions;
+    FExpressionEvaluator.UseWildcardsInEqual := not (foNoPartialCompare in FilterOptions);
+    if Active and Filtered then ProcessFilter;
+  end;
+end;
+
+procedure TDAMemoryDataset.SetFilterText(const Value: string);
+begin
+  if Active and Filtered and (Value <> Filter) then begin
+    inherited;
+    ProcessFilter;
+  end
+  else
+    inherited;
+end;
+
+procedure TDAMemoryDataset.DoSort(AIndex: TDAMemIndex);
+var
+  pos: TBookmarkData;
+  lRecList:TThreadMemList;
+  LList:TMemList;
+  lflag: boolean;
+  loldRangeActive: Boolean;
+begin
+  if Active and (FieldCount > 0) and (FDataList.Count <> 0) then begin
+    if AIndex = f_DefaultIndexRecord then begin
+      loldRangeActive := FRangeActive;
+      FRangeActive := False;
+      try
+        if (FRecordPos<>-1) and (FRecordPos <= FDataList.Count) then
+          pos := FDataList[FRecordPos]
+        else
+          pos := nil;
+        try
+          lRecList:=IntGetRecordList;
+          LList:=lRecList.LockListForReading;
+          try
+            lflag:=(not AIndex.IsValid) and (FDataList.Count = LList.Count);
+            if lFlag then
+              FDataList.Assign(LList)
+            else begin
+              QuickSort(0, FDataList.Count - 1, Compare, AIndex);
+            end;
+          finally
+            lRecList.UnlockListForReading;
+          end;
+          AIndex.LastSorted := Now;
+          SetBufListSize(0);
+          try
+            SetBufListSize(BufferCount + 1);
+          except
+            SetState(dsInactive);
+            CloseCursor;
+            raise;
+          end;
+         {$IFDEF FPC}
+          RecalcBufListSize;
+         {$ENDIF}
+        finally
+          if pos = nil then
+            FRecordPos := -1
+          else
+            FRecordPos := IntFindRecordID(pos);
+          if (FRecordPos = -1) and (RecordCount > 0) then FRecordPos := 0;
+        end;
+      finally
+        FRangeActive := loldRangeActive;
+      end;
+      Resync([]);
+    end
+    else begin
+      if AIndex.IsValid then begin
+        if FLastUpdate > AIndex.LastSorted then begin
+          AIndex.DataList.Assign(FDataList);
+          QuickSort(0, AIndex.DataList.Count - 1, Compare, AIndex);
+          AIndex.LastSorted := Now;
+        end;
+      end;
+    end;
+  end;
+end;
+
+procedure TDAMemoryDataset.QuickSort(L, R: Integer; SCompare: TDAMemDatasetCompare;AIndex: TDAMemIndex);
+var
+  I, J: Integer;
+  P: pointer;
+  llist: TMemList;
+begin
+  lList := AIndex.DataList;
+  repeat
+    I := L;
+    J := R;
+    P := lList[(L + R) shr 1];
+    repeat
+      while SCompare(lList[I], P, AIndex) < 0 do Inc(I);
+      while SCompare(lList[j], P, AIndex) > 0 do Dec(J);
+      if I <= J then begin
+        lList.Exchange(I, J);
+        Inc(I);
+        Dec(J);
+      end;
+    until I > J;
+    if L < J then QuickSort(L, J, SCompare, AIndex);
+    L := I;
+  until I >= R;
+end;
+
+function TDAMemoryDataset.Compare(i1, i2: PMemDatasetrecord_Native; AIndex: TDAMemIndex): Integer;
+var
+  buf1, buf2: Dataset_PAnsiChar;
+  i: integer;
+  Field: TField;
+  p1, p2: PAnsiChar;
+  lList: TMemList;
+  lbin2_1,lbin2_2: Boolean;
+begin
+  buf1 := i1^.Data;
+  buf2 := i2^.Data;
+  Result := 0;
+  if AIndex.IsValid then begin
+    lbin2_1 := i1^.Ident = mrBin2Style;
+    lbin2_2 := i2^.Ident = mrBin2Style;
+    for i := 0 to AIndex.IndexFieldNameList.Count - 1 do begin
+      Field := AIndex.IndexFieldNameList[i];
+      if not GetNullMask(buf1, Field.Index) then
+        p1 := intFindFieldData(buf1, Field, lbin2_1)
+      else
+        p1 := nil;
+      if not GetNullMask(buf2, Field.Index) then
+        p2 := intFindFieldData(buf2, Field, lbin2_2)
+      else
+        p2 := nil;
+      if (p1 <> nil) and (p2 <> nil) then begin
+        Result := CompareValues(p1, p2, Field.DataType, AIndex.IndexCaseInsList[i] <> nil, lBin2_1, lBin2_2)
+      end
+      else
+        if p1 <> nil then Result := 1
+        else if p2 <> nil then Result := -1
+        else continue;
+      if AIndex.IndexDescFields[i] <> nil then Result := -Result;
+      if Result <> 0 then Exit;
+    end;
+  end;  
+  if Result = 0 then begin
+    lList:=IntGetRecordList.LockListForReading;
+    try
+      Result := lList.IndexOf(buf1) - lList.IndexOf(buf2);
+    finally
+      IntGetRecordList.UnlockListForReading;
+    end;
+    if AIndex.SortDescMode then Result := -Result;
+  end;
+end;
+
+function WordBoolCompare(val1, val2: WordBool): integer;
+begin
+  if val2 and not val1 then Result := -1
+  else if val1 and not val2 then Result := 1
+  else Result := 0;
+end;
+
+function Int64Compare(val1, val2: Int64): integer;
+begin
+  if val1 > val2 then Result := 1
+  else if val2 > val1 then Result := -1
+  else Result := 0;
+end;
+
+function IntegerCompare(val1, val2: integer): integer;
+begin
+  if val1 > val2 then Result := 1
+  else if val2 > val1 then Result := -1
+  else Result := 0;
+end;
+
+function DoubleCompare(val1, val2: double): integer;
+begin
+  if val1 > val2 then Result := 1
+  else if val2 > val1 then Result := -1
+  else Result := 0;
+end;
+
+function TDateTimeCompare(val1, val2: TDateTime): integer;
+begin
+  if val1 > val2 then Result := 1
+  else if val2 > val1 then Result := -1
+  else Result := 0;
+end;
+
+function CurrencyCompare(val1, val2: Currency): integer;
+begin
+  if val1 > val2 then Result := 1
+  else if val2 > val1 then Result := -1
+  else Result := 0;
+end;
+
+
+function TDAMemoryDataset.CompareValues(buf1, buf2: pointer;aDataType: TFieldType;aSortCaseInsensitive:Boolean; aBin2_1, aBin2_2: Boolean): integer;
+begin
+  Result := 0;
+  case aDataType of
+    ftString, ftFixedChar: begin
+      if FStoreStringsAsReference then begin
+        case (ord(aBin2_1) shl 1) or ord(aBin2_2) of
+          0 { 00b }: Result:= ROAnsiCompare(PAnsiChar(Buf1),PAnsiChar(Buf2),aSortCaseInsensitive {$IFDEF MSWINDOWS},FSortLocale {$ENDIF MSWINDOWS});
+          1 { 01b }: Result:= ROAnsiCompare(PAnsiChar(Buf1),PAnsiString(Buf2)^,aSortCaseInsensitive {$IFDEF MSWINDOWS},FSortLocale {$ENDIF MSWINDOWS});
+          2 { 10b }: Result:= ROAnsiCompare(PAnsiString(Buf1)^,PAnsiChar(Buf2),aSortCaseInsensitive {$IFDEF MSWINDOWS},FSortLocale {$ENDIF MSWINDOWS});
+          3 { 11b }: Result:= ROAnsiCompare(PAnsiString(Buf1)^,PAnsiString(Buf2)^,aSortCaseInsensitive {$IFDEF MSWINDOWS},FSortLocale {$ENDIF MSWINDOWS});
+        end;
+      end
+      else begin
+        Result:= ROAnsiCompare(PAnsiChar(Buf1),PAnsiChar(Buf2),aSortCaseInsensitive {$IFDEF MSWINDOWS},FSortLocale {$ENDIF MSWINDOWS});
+      end;
+    end;
+    {$IFDEF DA_FixedWideCharSupport}ftFixedWideChar,{$ENDIF DA_FixedWideCharSupport}
+    ftWideString: begin
+      if FStoreStringsAsReference then begin
+        case (ord(aBin2_1) shl 1) OR ord(aBin2_2) of
+          0 { 00b }: Result:= ROWideCompare(PWideChar(Buf1),PWideChar(Buf2),aSortCaseInsensitive {$IFDEF MSWINDOWS},FSortLocale {$ENDIF MSWINDOWS});
+          1 { 01b }: Result:= ROWideCompare(PWideChar(Buf1),PWideString(Buf2)^,aSortCaseInsensitive {$IFDEF MSWINDOWS},FSortLocale {$ENDIF MSWINDOWS});
+          2 { 10b }: Result:= ROWideCompare(PWideString(Buf1)^,PWideChar(Buf2),aSortCaseInsensitive {$IFDEF MSWINDOWS},FSortLocale {$ENDIF MSWINDOWS});
+          3 { 11b }: Result:= ROWideCompare(PWideString(Buf1)^,PWideString(Buf2)^,aSortCaseInsensitive {$IFDEF MSWINDOWS},FSortLocale {$ENDIF MSWINDOWS});
+        end;
+      end
+      else begin
+        Result:= ROWideCompare(PWideChar(Buf1),PWideChar(Buf2),aSortCaseInsensitive {$IFDEF MSWINDOWS},FSortLocale {$ENDIF MSWINDOWS});
+      end;
+    end;
+    ftGuid: Result := StrLIComp(PAnsiChar(Buf1), PAnsiChar(Buf2),guidsize);
+    ftSmallint: Result := IntegerCompare(PSmallInt(buf1)^, PSmallInt(buf2)^);
+    ftInteger, ftDate, ftTime, ftAutoInc: Result := IntegerCompare(PInteger(buf1)^, PInteger(buf2)^);
+    ftWord: Result := IntegerCompare(PWord(buf1)^, PWord(buf2)^);
+    ftBoolean: Result := WordBoolCompare(PWordBool(buf1)^, PWordBool(buf2)^);
+    ftFloat, ftCurrency: Result := DoubleCompare(PDouble(Buf1)^, PDouble(Buf2)^);
+    ftDateTime: Result := TDateTimeCompare(PDateTime(Buf1)^, PDateTime(Buf2)^);
+    ftBcd: Result := CurrencyCompare(PCurrency(Buf1)^, PCurrency(Buf2)^);
+    ftFMTBCD: Result := BcdCompare(PBcd(buf1)^, PBcd(buf2)^);
+    ftLargeint: Result := Int64Compare(PInt64(Buf1)^, PInt64(Buf2)^);
+    {$IFNDEF FPC}
+    ftTimeStamp: Result := DoubleCompare(SQLTimeStampToDateTime(PSQLTimeStamp(Buf1)^), SQLTimeStampToDateTime(PSQLTimeStamp(Buf2)^));
+    {$ENDIF FPC}
+  else
+  end;
+end;
+
+procedure TDAMemoryDataset.SortOnFields(const Fields: string;
+  CaseInsensitive, Descending: Boolean);
+begin
+  if FActive then begin
+    if (Fields = '') and (FIndexName <> '') then begin
+      // default sorting
+      if FFieldsIndex then
+         SortOnFields(IndexFieldNames)
+      else
+        SwitchToIndex(IndexName);
+      f_DefaultIndexRecord.LastSorted := Now;
+    end
+    else begin
+      if Fields = '' then
+        f_DefaultIndexRecord.Init(IndexFieldNames, CaseInsensitive, Descending)
+      else
+        f_DefaultIndexRecord.Init(Fields, CaseInsensitive, Descending);
+      SortOnFields(f_DefaultIndexRecord);
+    end;
+  end;
+end;
+
+procedure TDAMemoryDataset.SetStoreStringAsReference(const Value: Boolean);
+begin
+  CheckInactive;
+  FStoreStringsAsReference := Value;
+end;
+
+procedure TDAMemoryDataset.SetWideString(NativeBuf: Pointer; Field: TField;
+  const Value: Widestring);
+var
+  len: integer;
+begin
+  if FStoreStringsAsReference then
+    PWideString(NativeBuf)^:=Value
+  else begin
+    len := Length(Value);
+    if Len > Field.Size then len:= Field.Size;
+    move(Pointer(Value)^,NativeBuf^,len*Sizeof(WideChar));
+    PWideChar(NativeBuf)[len]:=#0;
+  end;
+end;
+
+procedure TDAMemoryDataset.DoAfterOpen;
+begin
+  if not IsEmpty then SortOnFields();
+  inherited;
+end;
+
+procedure TDAMemoryDataset.MasterChanged(Sender: TObject);
+begin
+  ProcessFilter;
+end;
+
+procedure TDAMemoryDataset.MasterDisabled(Sender: TObject);
+begin
+  DataEvent(dePropertyChange, 0);
+  DoFilterRecords;
+end;
+(*
+procedure TDAMemoryDataset.GetDetailLinkFields(MasterFields,
+  DetailFields: TList);
+begin
+  { TODO : GetDetailLinkFields }
+  inherited GetDetailLinkFields(MasterFields, DetailFields);
+end;
+*)
+
+procedure TDAMemoryDataset.DoFilterRecords;
+var
+  i: integer;
+  pos: TBookmarkData;
+begin
+  if (FDataList.Count > 0) and (FRecordPos <> -1) and (FRecordPos < FDataList.Count) then
+    pos := FDataList[FRecordPos]
+  else
+    pos := nil;
+  //==============================
+  if ApplyMasterFilter then pos := nil;
+  if FRangeActive then begin
+    ApplyRangeFilter;
+    pos := nil;
+  end;
+  // apply filters
+  if IsActiveFilter then begin
+    for i := FDataList.Count-1 downto 0 do
+      if not FilterRecord(FDataList.List[i], False) then
+        FDataList.Delete(i);
+  end;
+  //==============================
+  if FIndexName <> '' then SortOnFields;
+  if Active then begin
+    if pos = nil then
+      FRecordPos := -1
+    else
+      FRecordPos := IntFindRecordID(pos);
+    if (FRecordPos = -1) then First;
+    if (RecordCount > 0) then FRecordPos := 0;
+    Resync([]);
+  end;
+end;
+
+function TDAMemoryDataset.MakeBlobFromString(Blob: AnsiString): PBLOBRecord;
+var
+  s: integer;
+begin
+  s:= Length(blob);
+  Result:=CreateBlobRecord(s);
+  Move(Pointer(blob)^, PBlobRecord(Result)^.Data, s * SizeOf(AnsiChar));
+end;
+
+procedure TDAMemoryDataset.IntInsertBuffer(Buffer: PMemDatasetrecord_Native;ASender: TDAMemoryDataset);
+begin
+  if ASender = nil then ASender:=Self;
+  if FCloneSource <> nil then
+    FCloneSource.IntInsertBuffer(Buffer, aSender)
+  else begin
+    FRecordsList.Add(Buffer);
+    NotifyClients(Buffer, mdnInsert, ASender);
+  end;
+end;
+
+function TDAMemoryDataset.GetBin2FieldOffset(
+  const aFieldNo: integer): cardinal;
+begin
+  if aFieldNo < FieldCount then
+    Result:=FOffsets[aFieldNo]
+  else
+    Result:=0;
+end;
+
+procedure TDAMemoryDataset.DoOnNewRecord;
+var
+  I: Integer;
+begin
+  if FMasterDataLink.Active and (FMasterDataLink.Fields.Count > 0) then
+    for I := 0 to FMasterDataLink.Fields.Count - 1 do
+      if FDetailsFieldNameList.Count > i then
+        TField(FDetailsFieldNameList[I]).Assign(TField(FMasterDataLink.Fields[I]));
+  inherited;
+end;
+
+function TDAMemoryDataset.Locate(const KeyFields: string;
+  const KeyValues: Variant; Options: TLocateOptions): Boolean;
+begin
+  DoBeforeScroll;
+  Result := LocateRecord(KeyFields, KeyValues, Options, True);
+  if Result then
+  begin
+    Resync([rmExact, rmCenter]);
+    DoAfterScroll;
+  end;
+end;
+
+function TDAMemoryDataset.LocateRecord(const KeyFields: string; const KeyValues: Variant; Options: TLocateOptions; SyncCursor: Boolean): Boolean;
+var
+  Buffer: PMemDatasetrecord;
+  lLocateStr: TMemLocateStruct;
+
+  function LocateWithOutIndex: boolean;
+  var
+    i,j: integer;
+    k: boolean;
+    lCaseInsensitive: boolean;
+    f: TMemLocateCompare;
+    buf: Dataset_PAnsiChar;
+    lBin2: Boolean;
+  begin
+    if loPartialKey in Options then
+      f := CompareValues2_partial
+    else
+      f := CompareValues2_full;
+    lCaseInsensitive:= loCaseInsensitive in Options;
+    with lLocateStr do begin
+      Result:=False;
+      For i:= 0 to lWorkList.Count - 1 do begin
+        k := False;
+        buf := PMemDatasetrecord_Native(lWorkList[i])^.Data;
+        lBin2 := PMemDatasetrecord_Native(lWorkList[i])^.Ident = mrBin2Style;
+        For j:=0 to lFields.Count-1 do begin
+          if ((buf = nil) or GetNullMask(buf,lFieldIndexes[j])) = lnull[j] then begin
+            if lnull[j] then
+              k := True // null | null
+            else
+              if lBin2 then
+                k := f(buf+lOffsets[j], lValues[j], lDatatypes[j], lCaseInsensitive, True)
+              else
+                k := f(buf+GetBin3Offset(buf,lFieldIndexes[j]), lValues[j], lDatatypes[j], lCaseInsensitive, False);
+          end
+          else
+            k:=False;
+          if not k then Break;
+        end;
+        if k then begin
+          RecordToBuffer(i, Buffer);
+          Result:=True;
+          Break;
+        end;
+      end;
+    end;
+  end;
+
+  function SearchIndex_Direct: TDAMemIndex;
+  var
+    i: integer;
+  begin
+    Result := f_DefaultIndexRecord;
+    if Result.isCanUsed(KeyFields,loCaseInsensitive in Options) then Exit;
+    for i:= 0 to FIndexList.Count - 1 do begin
+      Result := TDAMemIndex(FIndexList[i]);
+      if Result.isCanUsed(KeyFields,loCaseInsensitive in Options) then Exit;
+    end;
+    Result := nil;
+  end;
+
+var
+  lBookmark: TMemBookmarkData;
+  lLocalIndex: TDAMemIndex;
+begin
+  Result := False;
+  
+  // try to use indexes
+  if not (loPartialKey in Options) then begin
+    UpdateMemIndexes(-1);
+    // try to use indexes
+    lLocalIndex := SearchIndex_Direct;
+    if lLocalIndex <> nil then begin
+      Result := intLocateRecordByIndex(lLocalIndex,KeyValues,SyncCursor);
+      exit;
+    end;
+  end;
+
+  if Self.State <> dsBrowse then CheckBrowseMode;
+  CursorPosChanged;
+  Buffer := Pointer(TempBuffer);
+  if IsEmpty then Exit;
+  FillChar(lLocateStr, SizeOf(TMemLocateStruct),0);
+  try
+    lLocateStr.lFields := TList.Create;
+    try
+      GetFieldList(lLocateStr.lFields,KeyFields);
+      if lLocateStr.lFields.Count = 0 then Exit;
+      InitMemLocateStruct(@lLocateStr, KeyValues);
+      lLocateStr.lWorkList:= FDataList;
+      IntGetRecordList.LockListForReading;
+      try
+        result:= LocateWithOutIndex;
+        if Result then begin
+          SetLength(lBookmark, BookmarkSize);
+          GetBookmarkData(Pointer(Buffer), Pointer(lBookmark));
+        end;
+      finally
+        IntGetRecordList.UnlockListForReading;
+      end;
+    finally
+      lLocateStr.lFields.Free;
+    end;
+  finally
+    if Result then begin
+      if SyncCursor then begin
+        Bookmark := lBookmark;
+        UpdateCursorPos;
+        if EOF or BOF then Result := False;
+      end;
+      SetLength(lBookmark, 0);      
+    end;
+  end;
+end;
+
+function TDAMemoryDataset.Lookup(const KeyFields: string;
+  const KeyValues: Variant; const ResultFields: string): Variant;
+begin
+  Result := Null;
+  if LocateRecord(KeyFields, KeyValues, [], False) then
+  begin
+    SetTempState(dsCalcFields);
+    try
+      CalculateFields(TempBuffer);
+      Result := FieldValues[ResultFields];
+    finally
+      RestoreState(dsBrowse);
+    end;
+  end;
+end;
+
+function TDAMemoryDataset.CompareValues2(buf1: pointer; aValue: TDAValueStruct; aDataType: TFieldType; aSortCaseInsensitive: Boolean;aBin2: boolean): integer;
+var
+  str1: Ansistring;
+  wstr1: WideString;
+begin
+  Result := 0;
+  case aDataType of
+    ftString, ftFixedChar: begin
+      if abin2 and FStoreStringsAsReference then
+        str1:=PAnsiString(Buf1)^
+      else
+        str1:=PAnsiChar(Buf1);
+      Result:= ROAnsiCompare(str1, aValue.AsAnsiString, aSortCaseInsensitive {$IFDEF MSWINDOWS},FSortLocale {$ENDIF MSWINDOWS});
+    end;
+    {$IFDEF DA_FixedWideCharSupport}ftFixedWideChar,{$ENDIF DA_FixedWideCharSupport}
+    ftWideString: begin
+      if abin2 and FStoreStringsAsReference then
+        wstr1:=PWideString(Buf1)^
+      else
+        wstr1:=PWideChar(Buf1);
+      Result:= ROWideCompare(wstr1, aValue.AsWideString, aSortCaseInsensitive {$IFDEF MSWINDOWS},FSortLocale {$ENDIF MSWINDOWS});
+    end;
+    ftGuid: begin
+      SetString(str1, PAnsiChar(buf1), guidsize);
+      Result := ROAnsiCompare(str1, aValue.AsAnsiString, True);
+    end;
+    ftSmallint: Result := IntegerCompare(PSmallInt(buf1)^, aValue.value);
+    ftInteger, ftDate, ftTime, ftAutoInc: Result := IntegerCompare(PInteger(buf1)^, aValue.Value);
+    ftWord: Result := IntegerCompare(PWord(buf1)^, aValue.Value);
+    ftBoolean: Result := WordBoolCompare(PWordBool(buf1)^, aValue.Value);
+    ftFloat, ftCurrency: Result := DoubleCompare(PDouble(Buf1)^, aValue.Value);
+    ftDateTime: Result := TDateTimeCompare(PDateTime(Buf1)^, TimeStampToMSecs(DateTimeToTimeStamp(aValue.Value)));
+    ftBcd: Result := CurrencyCompare(PCurrency(buf1)^,aValue.Value);
+    ftFMTBCD: Result := BcdCompare(PBcd(buf1)^, VariantToBCD(aValue.Value));
+    ftLargeint: Result := Int64Compare(PInt64(Buf1)^, aValue.Value);
+    {$IFNDEF FPC}
+    ftTimeStamp: Result := DoubleCompare(SQLTimeStampToDateTime(PSQLTimeStamp(Buf1)^), SQLTimeStampToDateTime(VarToSQLTimeStamp(aValue.Value)));
+    {$ENDIF FPC}
+  else
+  end;
+end;
+
+
+function TDAMemoryDataset.CompareBookmarks(Bookmark1,
+  Bookmark2: TBookmark): Integer;
+var
+  idx1, idx2: integer;
+begin
+  if (Bookmark1 = nil) and (BookMark2 = nil) then
+    Result:=0
+  else if (Bookmark1 <> nil) and (BookMark2 = nil) then
+    Result := 1
+  else if (Bookmark1 = nil) and (BookMark2 <> nil) then
+    Result := -1
+  else begin
+    idx1 := IntFindRecordID(TBookMarkData(PPointer(Bookmark1)^));
+    idx2 := IntFindRecordID(TBookMarkData(PPointer(Bookmark2)^));
+    if idx1 > idx2 then
+      Result := 1
+    else if idx1 < idx2 then
+      Result := -1
+    else
+      Result:=0;
+  end;
+end;
+
+function TDAMemoryDataset.BookmarkValid(Bookmark: TBookmark): Boolean;
+begin
+  Result := IntFindRecordID(TBookMarkData(PPointer(Bookmark)^)) <> -1;
+end;
+
+function TDAMemoryDataset.GetIndexDefs: TIndexDefs;
+begin
+  if FIndexDefs = nil then
+    FIndexDefs := TIndexDefs.Create(Self);
+  Result := FIndexDefs;
+end;
+
+procedure TDAMemoryDataset.SetIndexDefs(const Value: TIndexDefs);
+begin
+  IndexDefs.Assign(Value);
+end;
+
+function TDAMemoryDataset.PSGetIndexDefs(
+  IndexTypes: TIndexOptions): TIndexDefs;
+begin
+  Result := inherited GetIndexDefs(IndexDefs, IndexTypes);
+end;
+
+procedure TDAMemoryDataset.UpdateIndexDefs;
+begin
+  inherited;
+end;
+
+function TDAMemoryDataset.GetIndexName: string;
+begin
+  if FFieldsIndex then Result := '' else Result := FIndexName;
+end;
+
+procedure TDAMemoryDataset.SetIndexName(const Value: string);
+begin
+  SetIndex(Value, Value = '');
+end;
+
+procedure TDAMemoryDataset.SetIndex(const Value: string;
+  FieldsIndex: Boolean);
+begin
+  if FActive then begin
+    CheckBrowseMode;
+    UpdateCursorPos;
+    if (FIndexName <> Value) or (FFieldsIndex <> FieldsIndex) then begin
+      FIndexName := Value;
+      FFieldsIndex := FieldsIndex;
+      if FieldsIndex or (Value = '') then begin
+        SortOnFields(Value, False, False);
+      end
+      else
+        SwitchToIndex(Value);
+   end;
+  end;
+  FIndexName := Value;
+  FFieldsIndex := FieldsIndex;
+  f_DefaultIndexRecord.LastSorted := Now;
+end;
+
+
+procedure TDAMemoryDataset.SwitchToIndex(const IndexName: string);
+var
+  i: integer;
+begin
+  if FActive then begin
+    i:= IndexDefs.IndexOf(IndexName);
+    if i = -1 then DatabaseErrorFmt(SIndexNotFound,[IndexName]);
+    f_DefaultIndexRecord.Init(IndexDefs[i]);
+    f_DefaultIndexRecord.FInitFromIndexDef:= False;
+    SortOnFields(f_DefaultIndexRecord);
+  end;
+end;
+
+procedure TDAMemoryDataset.GetIndexNames(List: TStrings);
+begin
+  IndexDefs.Update;
+  IndexDefs.GetItemNames(List);
+end;
+
+procedure TDAMemoryDataset.AddIndex(const Name, Fields, DescFields,
+  CaseInsFields: string);
+var
+  lIndexDef: TIndexDef;
+begin
+  lIndexDef := IndexDefs.AddIndexDef;
+  lIndexDef.Name := Name;
+  lIndexDef.Fields := Fields;
+  lIndexDef.DescFields := DescFields;
+  lIndexDef.CaseInsFields := CaseInsFields;
+end;
+
+procedure TDAMemoryDataset.DeleteIndex(const Name: string);
+var
+  i: integer;
+begin
+  i:=IndexDefs.IndexOf(Name);
+  if i <> -1 then IndexDefs.Delete(i);
+end;
+
+{$IFDEF FPC}
+const
+  SInvalidCalcType = 'Field ''%s'' cannot be a calculated or lookup field';
+{$ENDIF}
+
+procedure TDAMemoryDataset.ValidateFieldForIndex(aField: TField);
+begin
+  if not ((aField.FieldKind =fkData) and (aField.DataType in ft_Supported - ft_BlobTypes)) then
+    DatabaseErrorFmt(SInvalidCalcType, [aField.DisplayName]);
+end;
+
+{$IFDEF DELPHI10UP}
+{$WARN SYMBOL_DEPRECATED OFF}
+{$ENDIF DELPHI10UP}
+procedure TDAMemoryDataset.SortOnFields(const Fields, CaseInsFields, DescFields: string);
+begin
+  if FActive then begin
+    f_DefaultIndexRecord.Init(Fields,CaseInsFields,DescFields);
+    SortOnFields(f_DefaultIndexRecord);
+  end;
+end;
+{$IFDEF DELPHI10UP}
+{$WARN SYMBOL_DEPRECATED ON}
+{$ENDIF DELPHI10UP}
+
+procedure TDAMemoryDataset.SortOnFields;
+begin
+  SortOnFields('');
+end;
+
+procedure TDAMemoryDataset.DefChanged(Sender: TObject);
+begin
+  {$IFNDEF FPC}
+  inherited;
+  {$ENDIF}
+  if Sender = FIndexDefs then
+    UpdateMemIndexes;
+    if (not FFieldsIndex) and (FIndexName <> '') then begin
+      if FIndexDefs.Count = 0 then FIndexName:='';
+      SortOnFields;
+    end;
+end;
+
+function CompareAnsiStrPartial(const aStr1, aStr2: AnsiString; aSortCaseInsensitive:Boolean): boolean;
+var
+  l1: integer;
+  l2: Integer;
+  k: AnsiString;
+begin
+  l1 := Length(aStr1);
+  l2 := Length(aStr2);
+  if (l1 > l2) or (l1 = 0)  then
+    Result := False
+  else begin
+    if l1 = l2 then
+      k := aStr2
+    else
+      SetString(k,PAnsiChar(aStr2), l1);
+    Result := ROAnsiCompare(aStr1, k , aSortCaseInsensitive) = 0;
+  end;
+end;
+
+function CompareWideStrPartial(const aStr1, aStr2: WideString; aSortCaseInsensitive:Boolean): boolean;
+var
+  l1: integer;
+  l2: Integer;
+  k: WideString;
+begin
+  l1 := Length(aStr1);
+  l2 := Length(aStr2);
+  if (l1 > l2) or (l1 = 0) then
+    Result := False
+  else begin
+    if l1 = l2 then
+      k := aStr2
+    else
+      SetString(k, PWideChar(aStr2), l1);
+    Result := ROWideCompare(aStr1, k , aSortCaseInsensitive) = 0;
+  end;
+end;
+
+function TDAMemoryDataset.CompareValues2_partial(buf1: pointer; aValue: TDAValueStruct; aDataType: TFieldType; aSortCaseInsensitive:Boolean;abin2: boolean): boolean;
+var
+  str1: AnsiString;
+  wstr1: widestring;
+begin
+  Result := False;
+  case aDataType of
+    ftString, ftFixedChar: begin
+      if abin2 and FStoreStringsAsReference then
+        str1 := PAnsiString(Buf1)^
+      else
+        str1 := PAnsiChar(Buf1);
+      Result := CompareAnsiStrPartial(aValue.AsAnsiString, str1, aSortCaseInsensitive);
+    end;
+    {$IFDEF DA_FixedWideCharSupport}ftFixedWideChar,{$ENDIF DA_FixedWideCharSupport}
+    ftWideString: begin
+      if abin2 and FStoreStringsAsReference then
+        wstr1 := PWideString(Buf1)^
+      else
+        wstr1 := PWideChar(Buf1);
+      Result := CompareWideStrPartial(aValue.AsWideString, wstr1, aSortCaseInsensitive);
+    end;
+    ftGuid: begin
+      SetString(str1, PAnsiChar(buf1), guidsize);
+      Result := CompareAnsiStrPartial(aValue.AsAnsiString, str1, aSortCaseInsensitive);
+    end;
+    ftSmallint:  Result := pos(VarToStr(aValue.Value), IntToStr(PSmallInt(buf1)^)) = 1;
+    ftInteger, ftDate, ftTime, ftAutoInc: Result := pos(VarToStr(aValue.Value), IntToStr(PInteger(buf1)^)) = 1;
+    ftWord: Result := pos(VarToStr(aValue.Value), IntToStr(PWord(buf1)^)) = 1;
+    ftBoolean: Result:= PWordBool(buf1)^ =  aValue.Value;
+    ftFloat, ftCurrency: Result := pos(VarToStr(aValue.Value), FloatToStr(PDouble(buf1)^)) = 1;
+    ftDateTime: Result := pos(VarToStr(aValue.Value), DateToStr(TimeStampToDateTime(MSecsToTimeStamp({$IFDEF FPC}Trunc{$ENDIF}(PDateTime(buf1)^))))) = 1;
+    ftBcd: Result := Pos(VarToStr(aValue.Value), CurrToStr(PCurrency(Buf1)^)) = 1;
+    ftFMTBCD: Result :=pos(VarToStr(aValue.Value), BcdToStr(PBcd(buf1)^)) = 1;
+    ftLargeint: Result := pos(VarToStr(aValue.Value), IntToStr(PInt64(buf1)^)) = 1;
+    {$IFNDEF FPC}
+    ftTimeStamp: Result := pos(VarToStr(aValue.Value), DateTimeToStr(SQLTimeStampToDateTime(PSQLTimeStamp(Buf1)^)))  = 1;
+    {$ENDIF FPC}
+  else
+  end;
+end;
+
+procedure TDAMemoryDataset.Notification(AComponent: TComponent;
+  Operation: TOperation);
+begin
+  inherited;
+  if (Operation = opRemove) and (AComponent = FCloneSource) then
+    DetachFromSource;
+  if (Operation = opRemove) and (AComponent = fMemCloneSource) then
+    FMemCloneSource := nil;
+end;
+
+procedure TDAMemoryDataset.CloneCursor(Source: TDAMemoryDataset; Reset: Boolean; KeepSettings: Boolean = False);
+begin
+  if Source <> nil then CheckforCircularLinks(Source,True);
+  Source.CheckActive;
+  Close;
+  FMemCloneSource := Source;
+  FCloneSource := Source;
+  if Reset then
+    AssignCloneSource(nil)
+  else if not KeepSettings then
+    AssignCloneSource(Source);
+  Open;
+  if Reset then Resync([]);
+end;
+
+procedure TDAMemoryDataset.IntRemoveBuffer(Buffer: PMemDatasetrecord_Native; ASender: TDAMemoryDataset);
+begin
+  if FCloneSource <> nil then
+    FCloneSource.IntRemoveBuffer(Buffer,ASender)
+  else begin
+    NotifyClients(Buffer,mdnDelete,ASender);
+    with FRecordsList.LockListForWriting do try
+      Remove(Buffer);
+      FreeMemDatasetRecord(Buffer);
+    finally
+      FRecordsList.UnlockListForWriting;
+    end;
+  end;
+end;
+
+function TDAMemoryDataset.IntGetRecordList: TThreadMemList;
+begin
+  if FCloneSource <> nil then
+    Result:= FCloneSource.IntGetRecordList
+  else
+    Result:=FRecordsList;
+end;
+
+
+procedure TDAMemoryDataset.RegisterClient(const AClient: TDAMemoryDataset);
+begin
+  if FCloneSource <> nil then begin
+    FCloneSource.RegisterClient(AClient);
+  end
+  else begin
+    if FCloneClientList = nil then FCloneClientList:=TThreadList.Create;
+    FCloneClientList.Add(AClient);
+    if AClient <> self then
+      AClient.AttachToSource(Self);
+  end;
+end;
+
+procedure TDAMemoryDataset.UnregisterClient(const AClient: TDAMemoryDataset);
+begin
+  if FCloneSource <> nil then begin
+    FCloneSource.UnregisterClient(AClient);
+  end
+  else begin
+    if FCloneClientList <> nil then
+      FCloneClientList.Remove(AClient);
+    if AClient.FCloneSource <> nil then AClient.DetachFromSource;
+  end;
+end;
+
+procedure TDAMemoryDataset.UnregisterAllClients;
+var
+  i: integer;
+  lList: TList;
+  lClient: TDAMemoryDataset;
+begin
+  if FCloneClientList <> nil then begin
+    lList:= FCloneClientList.LockList;
+    try
+      for i:= lList.Count-1 downto 0 do begin
+        lClient:= TDAMemoryDataset(lList[i]);
+        if Assigned(lClient) then lClient.DetachFromSource;
+      end;
+      lList.Clear;
+    finally
+      FCloneClientList.UnlockList;
+    end;
+  end;
+end;
+
+procedure TDAMemoryDataset.DetachFromSource;
+begin
+  FCloneSource := nil;
+  if Active then begin
+    FDataList.Clear;
+    InternalFirst;
+    Resync([]);
+  end;
+end;
+
+procedure TDAMemoryDataset.NotifyClients(Buf: PMemDatasetrecord_Native; Operation: TMemDataSetNotification;ASender: TDAMemoryDataset);
+var
+  i: integer;
+begin
+  if FCloneClientList <> nil then
+    with FCloneClientList.LockList do try
+      For i:=0 to Count -1 do
+        if ASender <> TDAMemoryDataset(Items[i]) then begin
+          TDAMemoryDataset(Items[i]).RecordNotification(Buf,Operation)
+        end
+        else begin
+          if Operation in [mdnInsert, mdnModify] then IntAutoSort(Buf);
+        end;
+      finally
+        FCloneClientList.UnlockList;
+      end;
+end;
+
+
+procedure TDAMemoryDataset.RecordNotification(Buf: PMemDatasetrecord_Native; Operation: TMemDataSetNotification);
+var
+  i: integer;
+  FNeedResort: boolean;
+  f: boolean;
+begin
+  if Active then begin
+    f := f_DefaultIndexRecord.LastSorted > FLastUpdate;
+    FNeedResort := False;
+    FLastUpdate := now;
+    case Operation of
+      mdnInsert:
+         begin
+           intInsertRecord(Buf);
+           FNeedResort:= True;
+         end;
+      mdnModify:
+         if IsActiveFilter and not FilterRecord(Buf, True) then begin
+           i := FDataList.Remove(buf);
+           if (i <> -1) and (i = FRecordPos) and (FRecordPos >= RecordCount) then Dec(FRecordPos);
+         end
+         else begin
+           FNeedResort:= True;
+         end;
+      mdnDelete:
+         begin
+           if f then f_DefaultIndexRecord.LastSorted :=Now;
+           i := FDataList.Remove(buf);
+           if (i <> -1) and (i = FRecordPos) and (FRecordPos >= RecordCount) then Dec(FRecordPos);
+         end;
+      mdnBatchAdding:
+         begin
+           ProcessFilter;
+         end;
+    end;
+    DataEvent(deUpdateState, 0);
+  //  Refresh;
+    if FNeedResort then
+      IntAutoSort(Buf)
+    else
+      Resync([]);
+  end;
+end;
+
+procedure TDAMemoryDataset.IntUpdateBuffer(Buffer: PMemDatasetrecord_Native; ASender: TDAMemoryDataset);
+begin
+  if ASender = nil then ASender:=Self;
+  if FCloneSource <> nil then
+    FCloneSource.IntUpdateBuffer(Buffer, ASender)
+  else begin
+    NotifyClients(Buffer,mdnModify,ASender);
+  end;
+end;
+
+procedure TDAMemoryDataset.intInsertRecord(Buf: PMemDatasetrecord_Native);
+var
+  lCount: integer;
+  RecPos: integer;
+begin
+  if not IsActiveFilter or FilterRecord(Buf, True) then begin
+    if State = dsInsert then begin
+      lCount:= IntGetRecordList.lockListForReading.Count;
+      IntGetRecordList.UnlockListForReading;
+      if FRecordPos >= lCount then begin
+        FDataList.Add(Buf);
+        FRecordPos := RecordCount - 1;
+      end
+      else begin
+        if FRecordPos = -1 then
+          RecPos := 0
+        else
+          RecPos := FRecordPos;
+        FDataList.Insert(RecPos, Buf);
+        FRecordPos := RecPos;
+      end;
+    end
+    else begin
+      FDataList.Add(Buf);
+    end;
+  end;
+end;
+
+procedure TDAMemoryDataset.AddRecordsfromList(AList: TList);
+var
+  old_count: integer;
+  i: integer;
+begin
+  with IntGetRecordList.LockListForWriting do try
+    old_count:=Count;
+    Count:=old_count+AList.Count;
+    System.Move(AList.List^, PAnsiChar(List^[old_Count]), AList.Count*SizeOf(Pointer));
+    if FAutoCompactRecords then
+      For i := old_count to Count -1 do
+        ConvertBin2ToBin3Record(List^[i]);
+  finally
+    IntGetRecordList.UnlockListForWriting;
+  end;
+  if (AList.Count > 0) then FLastUpdate := Now;
+  AList.Clear;
+  NotifyClients(nil, mdnBatchAdding, nil);
+end;
+
+function TDAMemoryDataset.CalcFieldLen(aDataType: TFieldType;
+  aSize: Integer): integer;
+begin
+  if not (aDataType in ft_Supported) then
+    Result := 0
+  else if IsReferencedField(aDataType) then
+    Result := sizeof(Pointer)
+  else case aDataType of
+      ftSmallint:           Result := SizeOf(Smallint);
+      ftInteger, ftAutoInc: Result := SizeOf(Integer);
+      ftWord:               Result := SizeOf(Word);
+      ftBoolean:            Result := SizeOf(WordBool);
+      ftFloat, ftCurrency:  Result := SizeOf(Double);
+      ftDate, ftTime:       Result := SizeOf(Integer);
+      ftDateTime:           Result := SizeOf(TDateTime);
+      ftLargeint:           Result := SizeOf(Largeint);
+      {$IFNDEF FPC}
+      ftTimeStamp:          Result := SizeOf(TSQLTimeStamp);
+      {$ENDIF}
+      ftFMTBCD:             Result := SizeOf(TBcd);
+      ftBCD:                Result := SizeOf(Currency);
+      ftGuid:               Result := GuidSize+1;
+      ftString,ftFixedChar: Result := (aSize + 1)* Sizeof(AnsiChar);
+      {$IFDEF DA_FixedWideCharSupport}ftFixedWideChar,{$ENDIF DA_FixedWideCharSupport}
+      ftWideString:         Result := (aSize + 1) * Sizeof(WideChar);
+    else
+      Result:=0;
+    end;
+end;
+
+procedure TDAMemoryDataset.SetReadOnly(const Value: Boolean);
+begin
+  FReadOnly := Value;
+end;
+
+function TDAMemoryDataset.GetCanModify: Boolean;
+begin
+  Result := not FReadOnly;
+end;
+
+procedure TDAMemoryDataset.ApplyRange;
+begin
+  CheckBrowseMode;
+  if not (BuffersEqual(FKeyBuffers[kiRangeStart], FKeyBuffers[kiCurRangeStart], SizeOf(TMemKeyBuffer) + FNativeRecordSize) and
+          BuffersEqual(FKeyBuffers[kiRangeEnd], FKeyBuffers[kiCurRangeEnd], SizeOf(TMemKeyBuffer) + FNativeRecordSize)) then begin
+    Move(FKeyBuffers[kiRangeStart]^, FKeyBuffers[kiCurRangeStart]^, SizeOf(TMemKeyBuffer) + FNativeRecordSize);
+    Move(FKeyBuffers[kiRangeEnd]^, FKeyBuffers[kiCurRangeEnd]^, SizeOf(TMemKeyBuffer) + FNativeRecordSize);
+    FRangeActive:=(FKeyBuffers[kiCurRangeStart]<>nil) and (FKeyBuffers[kiCurRangeEnd]<>nil);
+    RefreshIndexConditional;
+    InternalFirst;
+    DoFilterRecords;
+    First;
+  end;
+end;
+
+procedure TDAMemoryDataset.CancelRange;
+begin
+  CheckBrowseMode;
+  UpdateCursorPos;
+  FRangeActive := False;
+  if FKeyBuffers[kiCurRangeStart].Modified or FKeyBuffers[kiCurRangeEnd].Modified then begin
+    InitKeyBuffer(FKeyBuffers[kiCurRangeStart]);
+    InitKeyBuffer(FKeyBuffers[kiCurRangeEnd]);
+  end;
+  DoFilterRecords;
+end;
+
+procedure TDAMemoryDataset.EditRangeEnd;
+begin
+  SetKeyBuffer(kiRangeEnd, False);
+end;
+
+procedure TDAMemoryDataset.EditRangeStart;
+begin
+  SetKeyBuffer(kiRangeStart, False);
+end;
+
+procedure TDAMemoryDataset.SetRange(const StartValues,
+  EndValues: array of const);
+begin
+  CheckBrowseMode;
+  SetKeyFields(kiRangeStart, StartValues);
+  SetKeyFields(kiRangeEnd, EndValues);
+  ApplyRange;
+end;
+
+procedure TDAMemoryDataset.SetRangeEnd;
+begin
+  SetKeyBuffer(kiRangeEnd, True);
+end;
+
+procedure TDAMemoryDataset.SetRangeStart;
+begin
+  SetKeyBuffer(kiRangeStart, True);
+end;
+
+procedure TDAMemoryDataset.SetKeyBuffer(KeyIndex: TMemKeyIndex; Clear: Boolean);
+begin
+  CheckBrowseMode;
+  RefreshIndexConditional;
+  FKeyBuffer := FKeyBuffers[KeyIndex];
+  Move(FKeyBuffer^, FKeyBuffers[kiSave]^, SizeOf(TMemKeyBuffer) + FNativeRecordSize);
+  if Clear then InitKeyBuffer(FKeyBuffer);
+  FKeyBuffer.FieldCount:= f_DefaultIndexRecord.IndexFieldNameList.Count;
+  SetState(dsSetKey);
+  SetModified(FKeyBuffer.Modified);
+  DataEvent(deDataSetChange, 0);
+end;
+
+procedure TDAMemoryDataset.SetKeyFields(KeyIndex: TMemKeyIndex; const Values: array of const);
+var
+  I: Integer;
+  k: integer;
+  SaveState: TDataSetState;
+begin
+  RefreshIndexConditional;
+  if f_DefaultIndexRecord.IndexFieldNameList.Count = 0 then DatabaseError(SNoFieldIndexes, Self);
+  SaveState := SetTempState(dsSetKey);
+  try
+    if f_DefaultIndexRecord.IndexFieldNameList.Count >= High(Values)-Low(Values)+1 then
+      k:= High(Values)-Low(Values)+1
+    else begin
+      k:= f_DefaultIndexRecord.IndexFieldNameList.Count;
+      {$IFDEF CHECK_RANGE}
+      DatabaseError('Can''t assign values: array size is larger than possible',Self);
+      {$ENDIF CHECK_RANGE}
+    end;
+    FKeyBuffer := InitKeyBuffer(FKeyBuffers[KeyIndex]);
+    for I := 0 to k-1 do
+      TField(f_DefaultIndexRecord.IndexFieldNameList[i]).AssignValue(Values[I]);
+    FKeyBuffer^.FieldCount := High(Values) + 1;
+    FKeyBuffer^.Modified := Modified;
+  finally
+    RestoreState(SaveState);
+  end;
+end;
+
+procedure TDAMemoryDataset.AllocKeyBuffers;
+var
+  KeyIndex: TMemKeyIndex;
+begin
+  try
+    for KeyIndex := Low(TMemKeyIndex) to High(TMemKeyIndex) do
+      FKeyBuffers[KeyIndex] := AllocMem(SizeOf(TMemKeyBuffer) + FNativeRecordSize);
+    if Assigned(FCloneSource) and FCloneSource.Active then
+      for KeyIndex := Low(TMemKeyIndex) to High(TMemKeyIndex) do
+        Move(FCloneSource.FKeyBuffers[KeyIndex]^, FKeyBuffers[KeyIndex]^, SizeOf(TMemKeyBuffer) + FNativeRecordSize);
+  except
+    FreeKeyBuffers;
+    raise;
+  end;
+end;
+
+procedure TDAMemoryDataset.FreeKeyBuffers;
+var
+  KeyIndex: TMemKeyIndex;
+begin
+  for KeyIndex := Low(TMemKeyIndex) to High(TMemKeyIndex) do
+    DisposeMem(FKeyBuffers[KeyIndex], SizeOf(TMemKeyBuffer) + FNativeRecordSize);
+end;
+
+function TDAMemoryDataset.InitKeyBuffer(Buffer: PMemKeyBuffer): PMemKeyBuffer;
+begin
+  FillChar(Buffer^, SizeOf(TMemKeyBuffer) + FNativeRecordSize, 0);
+  Result := Buffer;
+end;
+
+procedure TDAMemoryDataset.SetDetailsFields(const Value: string);
+begin
+  if FDetailFields <> Value then begin
+    FDetailFields := Value;
+    if Active then begin
+      InitDetailFieldNamesList;
+      DoFilterRecords;
+    end;
+    DataEvent(dePropertyChange, 0);
+  end;
+end;
+
+{$IFDEF DELPHI10UP}
+{$WARN SYMBOL_DEPRECATED OFF}
+{$ENDIF DELPHI10UP}
+procedure TDAMemoryDataset.InitDetailFieldNamesList;
+var
+  pos1: integer;
+  fld: TField;
+begin
+  FDetailsFieldNameList.Clear;
+  if FDetailFields = '' then Exit;;
+  Pos1 := 1;
+  while Pos1 <= Length(FDetailFields) do begin
+    Fld := FieldByName(ExtractFieldName(FDetailFields, Pos1));
+    ValidateFieldForIndex(Fld);
+    FDetailsFieldNameList.Add(Fld);
+  end;
+end;
+{$IFDEF DELPHI10UP}
+{$WARN SYMBOL_DEPRECATED ON}
+{$ENDIF DELPHI10UP}
+
+function TDAMemoryDataset.ApplyMasterFilter:boolean;
+var
+  i, j: integer;
+  MasterArray: array of TDAValueStruct;
+  buf: PAnsiChar;
+  flag: boolean;
+  fld_cnt: integer;
+  str: Ansistring;
+  lList: TMemList;
+  ldata: Dataset_PAnsiChar;
+  lBin2: Boolean;
+begin
+  FDataList.Clear;
+  if (MasterSource = nil) or (MasterSource.DataSet = nil) or
+    (not MasterSource.DataSet.Active) or (MasterDataLink.Fields.Count = 0) or
+    (FDetailsFieldNameList.Count = 0) then begin
+    // not filtered!
+    lList:=IntGetRecordList.LockListForReading;
+    try
+      FDataList.Assign(LList);
+    finally
+      IntGetRecordList.UnlockListForReading;
+    end;
+    SortOnFields;
+    Result := False;
+  end
+  else begin
+    fld_cnt := MasterDataLink.Fields.Count;
+    if FDetailsFieldNameList.Count < fld_cnt then fld_cnt := FDetailsFieldNameList.Count;
+    SetLength(MasterArray, fld_cnt);
+    for i := 0 to fld_cnt - 1 do begin
+      if TField(MasterDataLink.Fields[i]).DataType in ft_AnsiStringValues then
+        MasterArray[i].AsAnsiString := TField(MasterDataLink.Fields[i]).{$IFDEF DELPHI2009UP}asAnsiString{$ELSE}asString{$ENDIF}
+      else if TField(MasterDataLink.Fields[i]).DataType in ft_WideStringValues then
+        MasterArray[i].AsWideString := TWideStringField(MasterDataLink.Fields[i]).Value
+      else
+        MasterArray[i].Value := TField(MasterDataLink.Fields[i]).Value;
+    end;
+    lList:= IntGetRecordList.LockListForReading;
+    try
+      FDataList.Capacity := lList.Count;
+      for i := 0 to LList.Count - 1 do begin
+        flag := true;
+        ldata := PMemDatasetrecord_Native(LList.FList^[i])^.Data;
+        lBin2 := PMemDatasetrecord_Native(LList.FList^[i])^.Ident = mrBin2Style;
+        for j := 0 to fld_cnt - 1 do begin
+          buf := IntFindFieldData(ldata, TField(FDetailsFieldNameList[j]), lBin2);
+          if (buf <> nil) then
+            case TField(FDetailsFieldNameList[j]).DataType of
+              ftString, ftFixedChar: begin
+                if lBin2 and FStoreStringsAsReference then
+                  flag := ROAnsiCompare(PAnsistring(Buf)^, MasterArray[j].AsAnsiString, True {$IFDEF MSWINDOWS}, FSortLocale {$ENDIF}) = 0
+                else
+                  flag := ROAnsiCompare(PAnsiChar(Buf), MasterArray[j].AsAnsiString, True {$IFDEF MSWINDOWS}, FSortLocale {$ENDIF}) = 0
+              end;
+              {$IFDEF DA_FixedWideCharSupport}ftFixedWideChar,{$ENDIF DA_FixedWideCharSupport}
+              ftWideString: begin
+                if lBin2 and FStoreStringsAsReference then
+                  flag := ROWideCompare(PWidestring(Buf)^, MasterArray[j].AsWideString,True {$IFDEF MSWINDOWS}, FSortLocale {$ENDIF}) = 0
+                else
+                  flag := ROWideCompare(PWideChar(Buf), MasterArray[j].AsWideString,True {$IFDEF MSWINDOWS}, FSortLocale {$ENDIF}) = 0
+              end;
+              ftSmallint: flag := PSmallint(buf)^ = MasterArray[j].value;
+              ftInteger, ftDate, ftTime, ftAutoInc: Flag := PInteger(buf)^ = MasterArray[j].value;
+              ftWord: flag := PWord(buf)^ = MasterArray[j].value;
+              ftBoolean: flag := PWordBool(buf)^ = wordbool(MasterArray[j].value);
+              ftFloat, ftCurrency: flag := PDouble(Buf)^ = MasterArray[j].value;
+              ftDateTime: flag := PDateTime(Buf)^ = MasterArray[j].value;
+              ftBcd: flag := PCurrency(Buf)^ = MasterArray[j].value;
+              ftFMTBCD: flag := BcdCompare(PBcd(buf)^, VariantToBCD(MasterArray[j].value)) = 0;
+              ftLargeint: flag := PInt64(Buf)^ = MasterArray[j].value;
+              {$IFNDEF FPC}
+              ftTimeStamp: flag := SQLTimeStampToDateTime(PSQLTimeStamp(Buf)^) = SQLTimeStampToDateTime(VarToSQLTimeStamp(MasterArray[j].value));
+              {$ENDIF FPC}
+              ftGuid: begin
+                SetString(str, PAnsiChar(Buf), guidsize);
+                flag := ROAnsiCompare(str, MasterArray[j].AsAnsiString, True) = 0;
+              end;
+            end
+          else
+            Flag := not VarIsNull(MasterArray[j].value);
+          if not flag then Break;
+        end;
+        if flag then FDataList.Add(lList.FList^[i]);
+      end;
+    finally
+      IntGetRecordList.UnlockListForReading;
+    end;
+    Result := true;
+  end;
+end;
+
+function TDAMemoryDataset.CompareValues_Range(buf: PMemDatasetrecord_Native; keybuffer: PMemKeyBuffer): integer;
+var
+  i, lFieldCount: integer;
+  p1,p2: PAnsiChar;
+  lField: TField;
+  lBuf, lbuf2: Dataset_PAnsiChar;
+  lbin2_1,lbin2_2 :Boolean;
+begin
+  if f_DefaultIndexRecord.IndexFieldNameList.Count >= keybuffer^.FieldCount then begin
+    lFieldCount := keybuffer^.FieldCount
+  end
+  else begin
+    lFieldCount := f_DefaultIndexRecord.IndexFieldNameList.Count;
+    {$IFDEF CHECK_RANGE}
+    DatabaseError('Error during applying range');
+    {$ENDIF CHECK_RANGE}
+  end;
+  Result := 0;
+  lbuf  := buf^.Data;
+  lbuf2 := @keybuffer.Data;
+  lbin2_1 := buf^.Ident = mrBin2Style;
+  lbin2_2 := True;
+  For i:=0 to lFieldCount-1 do begin
+    lField := TField(f_DefaultIndexRecord.IndexFieldNameList[i]);
+
+    if (lBuf <> nil) and not GetNullMask(lbuf, lField.Index) then
+      p1 := intFindFieldData(lbuf, lField, lbin2_1)
+    else
+      p1 := nil;
+
+    if not GetNullMask(lbuf2, lField.Index) then
+      p2 := intFindFieldData(lbuf2, lField, lbin2_2)
+    else
+      p2 := nil;
+
+    if (p1 <> nil) and (p2 <> nil) then
+      Result := CompareValues(p1, p2, lField.DataType, f_DefaultIndexRecord.IndexCaseInsList[i] <> nil, lbin2_1, lbin2_2)
+    else if p1 <> nil then Result := 1
+    else if p2 <> nil then Result := -1
+    else Continue;
+
+    if Result <> 0 then break;
+  end;
+end;
+
+procedure TDAMemoryDataset.ApplyRangeFilter;
+begin
+  { TODO : Can be optimized here }
+end;
+
+function TDAMemoryDataset.CompareValues2_full(buf1: pointer;
+  aValue: TDAValueStruct; aDataType: TFieldType;
+  aSortCaseInsensitive: Boolean; abin2: boolean): boolean;
+begin
+  Result := CompareValues2(buf1,aValue,aDataType,aSortCaseInsensitive, abin2) = 0;
+end;
+
+
+function TDAMemoryDataset.FindKey(const KeyValues: array of const): Boolean;
+begin
+  CheckBrowseMode;
+  SetKeyFields(kiLookup, KeyValues);
+  Result := GotoKey;
+end;
+
+procedure TDAMemoryDataset.FindNearest(const KeyValues: array of const);
+begin
+  CheckBrowseMode;
+  SetKeyFields(kiLookup, KeyValues);
+  GotoNearest;
+end;
+
+function TDAMemoryDataset.GotoKey: Boolean;
+begin
+  Result := internalGotoKey(FKeyBuffers[kiLookup], False);
+end;
+
+procedure TDAMemoryDataset.GotoNearest;
+begin
+  internalGotoKey(FKeyBuffers[kiLookup], True);
+end;
+
+procedure TDAMemoryDataset.EditKey;
+begin
+  SetKeyBuffer(kiLookup, False);
+end;
+
+procedure TDAMemoryDataset.SetKey;
+begin
+  SetKeyBuffer(kiLookup, True);
+end;
+
+function TDAMemoryDataset.GetIndexFields: string;
+var
+ i: integer;
+begin
+  Result := '';
+  if FIndexName <> '' then begin
+    if FFieldsIndex then begin
+      Result:=FIndexName
+    end
+    else begin
+      i:= IndexDefs.IndexOf(FIndexName);
+      if i = -1 then DatabaseErrorFmt(SIndexNotFound,[FIndexName]);
+      Result:=IndexDefs[i].Fields;
+    end;
+  end;
+end;
+
+function TDAMemoryDataset.internalGotoKey(const KeyBuffer: PMemKeyBuffer;
+  isNearest: Boolean): Boolean;
+var
+  L, H, I, C                  : integer;
+begin
+  CheckBrowseMode;
+  DoBeforeScroll;
+  RefreshIndexConditional;
+  if not isNearest then CursorPosChanged;
+  KeyBuffer.FieldCount:= f_DefaultIndexRecord.IndexFieldNameList.Count;
+  IntGetRecordList.LockListForReading;
+  try
+    Result := False;
+    if isNearest then l:= FRecordPos else L := 0;
+    H := FDataList.Count - 1;
+    while L <= H do
+      begin
+        I := (L + H) shr 1;
+        c := CompareValues_Range(FDataList.List[i],KeyBuffer);
+        if C < 0 then
+          L := I + 1
+        else
+          begin
+            H := I - 1;
+            if C = 0 then Result := True;
+          end;
+      end;
+      if Result then
+        FRecordPos := l
+      else if isNearest then begin
+        if L + 1 <= H then
+          FRecordPos := L+1
+        else
+          FRecordPos := L;
+      end;
+  finally
+    IntGetRecordList.UnlockListForReading;
+  end;
+  if not isNearest then begin
+    if Result then begin
+      Resync([rmExact, rmCenter]);
+      DoAfterScroll;
+    end;
+  end else begin
+    Resync([rmCenter]);
+    DoAfterScroll;
+  end;
+end;
+
+function TDAMemoryDataset.GetIsIndexField(Field: TField): Boolean;
+begin
+  with Field do
+    Result:= (FieldNo > 0) and (f_DefaultIndexRecord.IndexFieldNameList.IndexOf(Field) >= 0);
+end;
+
+procedure TDAMemoryDataset.PostKeyBuffer(Commit: Boolean);
+begin
+  DataEvent(deCheckBrowseMode, 0);
+  if Commit then
+    FKeyBuffer.Modified := Modified else
+    Move(FKeyBuffers[kiSave]^, FKeyBuffer^, SizeOf(TMemKeyBuffer) + FNativeRecordSize);
+  SetState(dsBrowse);
+  DataEvent(deDataSetChange, 0);
+end;
+
+procedure TDAMemoryDataset.Post;
+begin
+  inherited;
+  if State = dsSetKey then PostKeyBuffer(True);
+end;
+
+procedure TDAMemoryDataset.Cancel;
+begin
+  inherited;
+  if State = dsSetKey then PostKeyBuffer(False);
+end;
+
+procedure TDAMemoryDataset.RefreshIndexConditional;
+begin
+  if FLastUpdate > f_DefaultIndexRecord.LastSorted then SortOnFields;
+end;                                      
+
+{$IFDEF BDS4UP}{$REGION 'MEM_PACKETRECORDS'}{$ENDIF BDS4UP}
+{$IFDEF MEM_PACKETRECORDS}
+procedure TDAMemoryDataset.CancelPackedMode;
+begin
+{ TODO : }
+  PackedRecordListClear;
+  PackedMode := False;
+end;
+
+procedure TDAMemoryDataset.CommitPackedMode;
+begin
+{ TODO : ApplyChanges }
+  PackedMode := False;
+end;
+
+procedure TDAMemoryDataset.StartPackedMode;
+begin
+  PackedMode := True;
+{ TODO : }
+end;
+
+function TDAMemoryDataset.GetPackedMode: Boolean;
+begin
+{  if FCloneSource <> nil then
+    Result:= FCloneSource.PackedMode
+  else
+}
+    Result := fPackedMode;
+end;
+
+procedure TDAMemoryDataset.SetPackedMode(const Value: Boolean);
+begin
+  if Value and (Value = GetPackedMode) then DatabaseError('Dataset already in packed mode');
+{  if FCloneSource <> nil then
+    FCloneSource.PackedMode := Value
+  else }
+    fPackedMode := Value;
+end;
+
+procedure TDAMemoryDataset.PackedRecordListClear;
+begin
+//  MemList_ClearRecords(FPackedRecordsList);
+end;
+{$ENDIF MEM_PACKETRECORDS}
+{$IFDEF BDS4UP}{$ENDREGION}{$ENDIF BDS4UP}
+
+procedure TDAMemoryDataset.MemList_ClearRecords(aMemList: TMemList);
+var
+  i: integer;
+begin
+  for i := aMemList.Count - 1 downto 0 do
+    FreeMemDatasetRecord(aMemList.List[i]);
+  aMemList.Clear;
+end;
+
+function TDAMemoryDataset.LocateByIndex(const aIndexName: string;
+  const KeyValues: Variant): Boolean;
+begin
+  DoBeforeScroll;
+  Result := LocateRecordByIndex(aIndexName, KeyValues, True);
+  if Result then
+  begin
+    Resync([rmExact, rmCenter]);
+    DoAfterScroll;
+  end;
+end;
+
+function TDAMemoryDataset.LookupByIndex(const aIndexName: string;
+  const KeyValues: Variant; const ResultFields: string): Variant;
+begin
+  Result := Null;
+  if LocateRecordByIndex(aIndexName, KeyValues, False) then
+  begin
+    SetTempState(dsCalcFields);
+    try
+      CalculateFields(TempBuffer);
+      Result := FieldValues[ResultFields];
+    finally
+      RestoreState(dsBrowse);
+    end;
+  end;
+end;
+
+function TDAMemoryDataset.LocateRecordByIndex(const aIndexName: string;
+  const KeyValues: Variant; SyncCursor: Boolean): Boolean;
+var
+  i: integer;
+  lIndex: TDAMemIndex;
+begin
+  i:= IndexDefs.IndexOf(aIndexName);
+  if i = -1 then DatabaseErrorFmt(SIndexNotFound,[aIndexName]);
+  UpdateMemIndexes(i);
+  lIndex := TDAMemIndex(FIndexList[i]);
+  DoSort(lIndex);
+  Result:= intLocateRecordByIndex(lIndex, KeyValues, SyncCursor);
+end;
+
+procedure TDAMemoryDataset.SortOnFields(AIndex: TDAMemIndex);
+begin
+  if FActive then DoSort(AIndex);
+end;
+
+procedure TDAMemoryDataset.IndexList_Clear;
+begin
+  While FIndexList.Count >0 do begin
+    TDAMemIndex(FIndexList.Last).Free;
+    FIndexList.Delete(FIndexList.Count-1);
+  end;
+end;
+
+function TDAMemoryDataset.LocateWithIndex(const LocateStruct: PMemLocateStruct; Buffer: PMemDatasetrecord): boolean;
+var
+  L, H, I, C,j                  : integer;
+  lBin2: Boolean;
+  lBuf: Dataset_PAnsiChar;
+begin
+  with LocateStruct^ do begin
+    Result := False;
+    L := 0;
+    H := lWorkList.Count - 1;
+    while L <= H do
+      begin
+        I := (L + H) shr 1;
+        c:=0;
+        lBuf:=PMemDatasetrecord_Native(lWorkList[i])^.Data;
+        lBin2:=PMemDatasetrecord_Native(lWorkList[i])^.Ident = mrBin2Style;
+        For j:=0 to lFields.Count-1 do begin
+          if GetNullMask(lBuf ,lFieldIndexes[j]) = lnull[j] then begin
+            if lnull[j] then
+              c := 0 // null | null
+            else
+              if lBin2 then
+                c :=  CompareValues2(lBuf + lOffsets[j], lValues[j], lDatatypes[j], lcaseIns[j],True) // not null | not null
+              else
+                c :=  CompareValues2(lBuf + GetBin3Offset(lBuf,lFieldIndexes[j]), lValues[j], lDatatypes[j], lcaseIns[j],True) // not null | not null
+          end
+          else begin
+            if lNull[j] then
+              c :=  1    // not null | null
+            else
+              c := -1;   //     null | not null
+          end;
+          if c <> 0 then begin
+            if ldesc[j] then c:=-c;
+            Break;
+          end;
+        end;
+        if (C < 0) then
+          L := I + 1
+        else
+          begin
+            H := I - 1;
+            if C = 0 then Result := True;
+          end;
+      end;
+    if Result then LocalBufferToDatasetBuffer(lWorkList[l],Buffer);
+  end;
+end;
+
+procedure TDAMemoryDataset.UpdateMemIndexes(AIndex: integer = -1);
+var
+  i: integer;
+begin
+  if Active then begin
+    While FIndexDefs.Count > FIndexList.Count do
+      FIndexList.Add(TDAMemIndex.Create(self));
+
+    While FIndexDefs.Count < FIndexList.Count do begin
+      TDAMemIndex(FIndexList.Last).Free;
+      FIndexList.Delete(FIndexList.Count-1);
+    end;
+
+    if AIndex <> -1 then begin
+      TDAMemIndex(FIndexList[AIndex]).UpdateIndex(FIndexDefs[AIndex]);
+    end
+    else begin
+      For i:= 0 to FIndexDefs.Count -1 do
+        TDAMemIndex(FIndexList[i]).UpdateIndex(FIndexDefs[i]);
+    end;
+  end;
+end;
+
+procedure TDAMemoryDataset.LocalBufferToDatasetBuffer(LocalBuf: PMemDatasetrecord_Native; DatasetBuffer: PMemDatasetrecord);
+begin
+  IntGetRecordList.LockListForReading;
+  try
+    with DatasetBuffer^.BookmarkData do begin
+      Bookmark := TBookmarkData(LocalBuf);
+      BookmarkFlag := bfCurrent;
+    end;
+    DuplicateBuffer(LocalBuf, Pointer(DatasetBuffer),False);
+  finally
+    IntGetRecordList.UnlockListForReading;
+  end;
+end;
+
+procedure TDAMemoryDataset.PrepareIndexForSorting(const aIndexName: string = '');
+var
+  i: integer;
+begin
+  if aIndexName = '' then begin
+    UpdateMemIndexes(-1);
+    For i := 0 to IndexDefs.Count-1 do
+      DoSort(TDAMemIndex(FIndexList[i]));
+  end
+  else begin
+    i:= IndexDefs.IndexOf(aIndexName);
+    if i = -1 then DatabaseErrorFmt(SIndexNotFound,[aIndexName]);
+    UpdateMemIndexes(i);
+    DoSort(TDAMemIndex(FIndexList[i]));
+  end;
+end;
+
+function TDAMemoryDataset.intLocateRecordByIndex(aIndex: TDAMemIndex;
+  const KeyValues: Variant; SyncCursor: Boolean): Boolean;
+var
+  i: integer;
+  Buffer: PMemDatasetrecord;
+  lBookmark: TMemBookmarkData;
+  lLocateStr: TMemLocateStruct;
+begin
+  Result := False;
+  if Self.State <> dsBrowse then CheckBrowseMode;
+  CursorPosChanged;
+  Buffer := pointer(TempBuffer);
+  if IsEmpty then Exit;
+  try
+    FillChar(lLocateStr, SizeOf(TMemLocateStruct),0);
+    lLocateStr.lFields := aIndex.IndexFieldNameList;
+    InitMemLocateStruct(@lLocateStr, KeyValues);
+    for i:=0 to lLocateStr.lFields.Count-1 do begin
+      lLocateStr.ldesc[i]:=aIndex.IndexDescFields[i]<>nil;
+      lLocateStr.lcaseIns[i] := aIndex.IndexCaseInsList[i]<>nil;
+    end;
+    lLocateStr.lWorkList:= aIndex.DataList;
+    Result := LocateWithIndex(@lLocateStr,Buffer);
+    if Result then begin
+      SetLength(lBookmark, BookmarkSize);
+      GetBookmarkData(pointer(Buffer), Pointer(lBookmark));
+    end;
+  finally
+    if Result then begin
+      if SyncCursor then begin
+        Bookmark := lBookmark;
+        UpdateCursorPos;
+        if EOF or BOF then Result := False;
+      end;
+      SetLength(lBookmark, 0);
+    end;
+  end;
+end;
+
+procedure TDAMemoryDataset.InitMemLocateStruct(AStruct: PMemLocateStruct;
+  const KeyValues: Variant);
+var
+  i: integer;  
+begin
+  with AStruct^ do begin
+    SetLength(lOffsets,lFields.Count);
+    SetLength(lDatatypes,lFields.Count);
+    SetLength(lValues,lFields.Count);
+    SetLength(lnull,lFields.Count);
+    SetLength(ldesc,lFields.Count);
+    SetLength(lcaseIns,lFields.Count);
+    SetLength(lFieldIndexes,lFields.Count);
+    for i:=0 to lFields.Count-1 do begin
+      lFieldIndexes[i]:=TField(lFields[i]).Index;
+      lOffsets[i] := GetBin2FieldOffset(lFieldIndexes[i]);
+      lDatatypes[i] := TField(lFields[i]).DataType;
+      if lFields.Count = 1 then
+        lValues[i].Value := KeyValues
+      else
+        lValues[i].Value := KeyValues[i];
+      lnull[i]:=VarIsEmpty(lValues[i].Value) or VarIsNull(lValues[i].Value);
+      if not lnull[i] then begin
+        if lDatatypes[i] in ft_AnsiStringValues then
+          lValues[i].AsAnsiString := VarToAnsiStr(lValues[i].Value)
+        else if lDatatypes[i] in ft_WideStringValues then
+          lValues[i].AsWideString := VarToWideStr(lValues[i].Value)
+        else if lDatatypes[i] = ftDateTime then begin
+          case TVarData(lValues[i].Value).VType of
+            varString, varOleStr, varUString: lValues[i].Value := StrToDate(lValues[i].Value);
+          end;
+        end;
+      end;
+    end;
+  end;
+end;
+
+
+function TDAMemoryDataset.CreateBin3Struct(const ASize: Cardinal): Dataset_PAnsiChar;
+begin
+  {$IFDEF FPC}
+  Result := nil;
+  {$ENDIF FPC}
+  GetMem(Result, ASize);
+end;
+
+function TDAMemoryDataset.GetBin3Offset(Buffer: Dataset_PAnsiChar;
+  const aFieldNo: integer): cardinal;
+begin
+  case pByte(buffer+FNullMaskSize)^ of
+    sizeOf(Byte):     Result := PByteArray(Buffer+FNullMaskSize+1)^[aFieldNo];
+    sizeOf(word):     Result := PWordArray(Buffer+FNullMaskSize+1)^[aFieldNo];
+    sizeOf(Cardinal): Result := PCardinalArray(Buffer+FNullMaskSize+1)^[aFieldNo];
+  else
+    raise Exception.Create('incompatible buffer format');
+    Result := 0;
+  end;
+end;
+
+function TDAMemoryDataset.CreateMemDatasetRecord(const AType: TmrMode;
+  ABin3Size: Cardinal;
+  ADatasetCompatible: Boolean): PMemDatasetrecord_Native;
+var
+  lRecordSize: Cardinal;
+begin
+  if ADatasetCompatible then
+    lRecordSize := SizeOf(TMemDatasetrecord)
+  else
+    lRecordSize := SizeOf(TMemDatasetrecord_Native);
+  {$IFDEF FPC}
+  Result := nil;
+  {$ENDIF}
+  GetMem(Result, lRecordSize);
+  FillChar(Result^,lRecordSize,0);
+  Result.Ident := AType;
+  case AType of
+    mrEmpty: ;
+    mrBin2Style: Result.Data := CreateBin2Struct;
+    mrBin3Style: Result.Data := CreateBin3Struct(ABin3Size);
+  end;
+end;
+
+function TDAMemoryDataset.CreateBin2Struct: Dataset_PAnsiChar;
+begin
+  {$IFDEF FPC}
+  Result := nil;
+  {$ENDIF FPC}
+  GetMem(Result, FNativeRecordSize);
+  FillChar(Result^, FNullMaskSize, $FF);
+  FillChar((Result+FNullMaskSize)^, FNativeRecordSize-FNullMaskSize, 0);
+end;
+
+procedure TDAMemoryDataset.FreeMemDatasetRecord(Buffer: PMemDatasetrecord_Native);
+begin
+  if Buffer <> nil then begin
+    with buffer^ do
+      case Ident of
+        mrBin2Style: FreeBin2Buffer(Data);
+        mrBin3Style: FreeBin3Buffer(Data);
+        mrEmpty:;
+      end;
+    FreeMem(Buffer);
+  end;
+end;
+
+procedure TDAMemoryDataset.FreeBin2Buffer(Buffer: Dataset_PAnsiChar);
+begin
+  if buffer <> nil then ClearBin2Buffer(Buffer);
+  FreeMem(buffer);
+end;
+
+procedure TDAMemoryDataset.FreeBin3Buffer(Buffer: Dataset_PAnsiChar);
+begin
+  FreeMem(buffer);
+end;
+
+procedure TDAMemoryDataset.ConvertBin3ToBin2Record(Buffer: PMemDatasetrecord_Native);
+var
+  i: integer;
+  source, dest: Dataset_PAnsiChar;
+  k,k1: cardinal;
+  p2: PBlobRecord;
+begin
+  case Buffer^.Ident of
+    mrEmpty: begin
+      Buffer^.Data  := CreateBin2Struct;
+      Buffer^.Ident := mrBin2Style;
+    end;
+    mrBin2Style: ; //nothing
+    mrBin3Style: begin
+      source := Buffer^.Data;
+      Dest := CreateBin2Struct;
+      Buffer.Data:= Pointer(dest);
+      Buffer.Ident := mrBin2Style;
+      try
+        Move(pointer(Source)^, pointer(Dest)^, FNullMaskSize);
+
+        for I := 0 to FieldCount - 1 do begin
+          if (not GetNullMask(Source, i)) then begin
+            k := GetBin3Offset(Source, i);
+            k1:= GetBin3Offset(Source, i+1);
+            if not IsReferencedField(FDataTypeArray[i]) then begin
+              Move(pointer(Source + k)^, pointer(Dest + FOffsets[i])^, k1-k)
+            end
+            else begin
+              case FDataTypeArray[i] of
+                ftString,ftFixedChar: PAnsiString(Dest + FOffsets[i])^ := PAnsiString(Source + k)^;
+                {$IFDEF DA_FixedWideCharSupport}ftFixedWideChar,{$ENDIF DA_FixedWideCharSupport}
+                ftWideString: PWideString(Dest + FOffsets[i])^ := PWideString(Source + k)^;
+              else
+                if FDataTypeArray[i] in ft_BlobTypes then begin
+                  p2 := CreateBlobRecord(k1-k);
+                  Move(pointer(Source + k)^, pointer(@p2.Data)^, k1-k);
+                  PPointer(Dest + FOffsets[i])^ := p2;
+                end;
+              end;
+            end;
+          end;
+        end;
+      finally
+        FreeBin3Buffer(source);
+      end;
+    end;
+  end;
+end;
+
+function TDAMemoryDataset.CalculateRecordsSize: Cardinal;
+var
+  i,j: integer;
+  List: TMemList;
+  buf: Dataset_PAnsiChar;
+begin
+  if FCloneSource <> nil then
+    Result := FCloneSource.CalculateRecordsSize
+  else begin
+    Result:=0;
+    List:=FRecordsList.LockListForReading;
+    try
+      inc(Result, SizeOf(TMemDatasetrecord_Native)*List.Count);
+      For i:= 0 To List.Count-1 do begin
+        buf:=PMemDatasetrecord_Native(List[i])^.Data;
+        case PMemDatasetrecord_Native(List[i])^.Ident of
+          mrBin2Style : begin
+            inc(Result,FNativeRecordSize);
+            For j := 0 to FieldCount-1 do begin
+              if not GetNullMask(buf,j) then begin
+                if FDataTypeArray[j] in ft_BlobTypes then
+                  inc(Result, PBlobRecord(PPointer(buf + FOffsets[j])^)^.size)
+                else if FStoreStringsAsReference then
+                  case FDataTypeArray[j] of
+                   ftString, ftFixedChar : inc(Result,Length(PAnsiString(buf + FOffsets[j])^)*SizeOf(AnsiChar));
+                   {$IFDEF DA_FixedWideCharSupport}ftFixedWideChar,{$ENDIF DA_FixedWideCharSupport}
+                   ftWideString:inc(Result,Length(PWideString(buf + FOffsets[j])^)*SizeOf(WideChar));
+                  end;
+              end;
+            end;
+          end;
+          mrBin3Style : inc(Result,GetBin3Offset(buf,FieldCount));
+        end;
+      end;
+    finally
+      FRecordsList.UnlockListForReading;
+    end;
+  end;
+end;
+
+procedure TDAMemoryDataset.ClearBin2Buffer(Buffer: Dataset_PAnsiChar);
+var
+  i: integer;
+begin
+  if FHasReferencedFields then begin
+    for I := 0 to FieldCount - 1 do
+      if (not GetNullMask(Buffer, i)) and
+        IsReferencedField(FDataTypeArray[i]) and
+        (PPointer(Buffer + FOffsets[i])^ <> nil) then
+        ClearFieldByFieldType(Buffer + FOffsets[i], FDataTypeArray[i]);
+  end;
+end;
+
+function WStrLen(const Str: PWideChar): Cardinal;
+var
+  P : PWideChar;
+begin
+  P := Str;
+  while (P^ <> #0) do Inc(P);
+  Result := (P - Str);
+end;
+
+procedure TDAMemoryDataset.ConvertBin2ToBin3Record(ASource : PMemDatasetrecord_Native);
+var
+  lbin2, lbin3: Dataset_PAnsiChar;
+begin
+  if ASource^.Ident = mrBin2Style then begin
+    lbin2 := ASource^.Data;
+    lBin3 := Bin2ToBin3(lBin2);
+    if lbin3 <> nil then begin
+      FreeBin2Buffer(lBin2);
+      ASource^.Data := lBin3;
+      ASource^.Ident := mrBin3Style;
+    end;
+  end;
+end;
+
+procedure TDAMemoryDataset.CompactRecords;
+var
+  List: TMemList;
+  i: integer;
+begin
+  if FCloneSource <> nil then
+    FCloneSource.CompactRecords
+  else begin
+    List := FRecordsList.LockListForWriting;
+    try
+      for i:= 0 to List.Count -1 do
+        try
+          ConvertBin2ToBin3Record(List.FList^[i]);
+        except
+          FAutoCompactRecords := FAutoCompactRecords;
+        end;
+    finally
+      FRecordsList.UnlockListForWriting;
+    end;
+  end;
+end;
+
+function TDAMemoryDataset.Bin2ToBin3(ASource: Dataset_PAnsiChar): Dataset_PAnsiChar;
+var
+  i: integer;
+  p1: Dataset_PAnsiChar;
+  lBin2RecordSize, dx: cardinal;
+  lBlobPresent: boolean;
+  loffsets: array of cardinal;
+  lBin2DataSize: array of cardinal;
+  lDatatypeSize: Byte;
+  buf: Dataset_PAnsiChar;
+begin
+  Result := nil;
+  lBin2RecordSize := 0;
+  lBlobPresent := False;
+  SetLength(loffsets, FieldCount+1);
+  SetLength(lBin2DataSize, FieldCount);
+  loffsets[0] := 0;
+  For i := 0 to FieldCount-1 do begin
+    if GetNullMask(ASource, i) then begin
+      lBin2DataSize[i] := 0;
+    end
+    else begin
+      if FDataTypeArray[i] in ft_BlobTypes then begin
+        lBlobPresent := True;
+        lBin2DataSize[i] := PBlobRecord(PPointer(ASource + FOffsets[i])^)^.size;
+      end
+      else if FDataTypeArray[i] in [ftString, ftFixedChar] then begin
+        if FStoreStringsAsReference then
+          lBin2DataSize[i] := Length(PAnsiString(ASource + FOffsets[i])^)
+        else
+          lBin2DataSize[i] := StrLen(PAnsiChar(ASource + FOffsets[i]));
+        inc(lBin2DataSize[i],SizeOf(AnsiChar)); // #0
+      end
+      else if FDataTypeArray[i] in [{$IFDEF DA_FixedWideCharSupport}ftFixedWideChar,{$ENDIF DA_FixedWideCharSupport}ftWideString] then begin
+        if FStoreStringsAsReference then
+          lBin2DataSize[i] := Length(PWideString(ASource + FOffsets[i])^)*SizeOf(WideChar)
+        else
+          lBin2DataSize[i] := WStrLen(PWideChar(ASource + FOffsets[i]))*SizeOf(WideChar);
+        inc(lBin2DataSize[i], SizeOf(WideChar)); // #0
+      end
+      else
+        lBin2DataSize[i]:= FDataSizeArray[i];
+    end;
+    loffsets[i+1] := loffsets[i]+ lBin2DataSize[i];
+    inc(lBin2RecordSize, lBin2DataSize[i]);
+  end;
+  inc(lBin2RecordSize, FNullMaskSize+SizeOf(Byte));
+  if lBin2RecordSize <= $FF - (Cardinal(FieldCount)+1)*SizeOf(Byte) then
+    lDatatypeSize := SizeOf(Byte)
+  else if lBin2RecordSize <= $FFFF - Cardinal(FieldCount+1)*SizeOf(Word) then
+    lDatatypeSize := SizeOf(Word)
+  else
+    lDatatypeSize := SizeOf(Cardinal);
+  inc(lBin2RecordSize,(FieldCount+1)*lDatatypeSize);
+  if (FNativeRecordSize > lBin2RecordSize) or FStoreStringsAsReference or lBlobPresent then begin
+    // convert it!
+    Result:=CreateBin3Struct(lBin2RecordSize);
+    p1 := Result;
+    move(ASource^, p1^, FNullMaskSize);
+    PByte(p1 + FNullMaskSize)^ := lDatatypeSize;
+    dx:=FNullMaskSize+SizeOf(Byte);
+    inc(p1, dx);
+    inc(dx,(FieldCount+1)*lDatatypeSize);
+    case lDatatypeSize of
+      SizeOf(Byte): for i:=0 to FieldCount do PBytearray(p1)^[i] := loffsets[i]+dx;
+      SizeOf(Word): for i:=0 to FieldCount do PWordArray(p1)^[i] := loffsets[i]+dx;
+      SizeOf(Cardinal): for i:=0 to FieldCount do PCardinalArray(p1)^[i] := loffsets[i]+dx;
+    end;
+    inc(p1, (FieldCount+1)*lDatatypeSize);
+    for i:=0 to FieldCount-1 do begin
+      if lBin2DataSize[i] > 0 then begin
+        buf := ASource + FOffsets[i];
+        if FDataTypeArray[i] in ft_BlobTypes then begin
+          move(PBlobRecord(PPointer(buf)^)^.Data, p1^,lBin2DataSize[i]);
+        end
+        else if FDataTypeArray[i] in [ftString, ftFixedChar] then begin
+          dx := lBin2DataSize[i]-SizeOf(AnsiChar);
+          if FStoreStringsAsReference then
+            Move(pointer(PAnsiString(buf)^)^, p1^, dx)
+          else
+            move(buf^, p1^, dx);
+          PAnsiChar(p1+dx)^ := #0;
+        end
+        else if FDataTypeArray[i] in [{$IFDEF DA_FixedWideCharSupport}ftFixedWideChar,{$ENDIF DA_FixedWideCharSupport}ftWideString] then begin
+          dx := lBin2DataSize[i] - SizeOf(WideChar);
+          if FStoreStringsAsReference then
+            Move(pointer(PWideString(buf)^)^, p1^, dx)
+          else
+            move(buf^, p1^, dx);
+          PWideChar(p1+dx)^ := #0;
+        end
+        else
+          move(buf^, p1^, lBin2DataSize[i]);
+        inc(p1, lBin2DataSize[i]);
+      end;
+    end;
+  end;
+end;
+
+
+procedure TDAMemoryDataset.SetAutoPackRecords(const Value: boolean);
+begin
+  FAutoCompactRecords := Value;
+  if FAutoCompactRecords then CompactRecords;
+end;
+
+procedure TDAMemoryDataset.AssignCloneSource(Source: TDAMemoryDataset);
+begin
+  if Source = nil then begin
+    Filtered := False;
+    Filter := '';
+    OnFilterRecord := nil;
+    IndexDefs.Clear;
+    IndexName := '';
+    MasterSource := nil;
+    MasterFields := '';
+    DetailFields := '';
+    ReadOnly := False;
+  end
+  else begin
+    Filter := Source.Filter;
+    OnFilterRecord := Source.OnFilterRecord;
+    Filtered := Source.Filtered;
+    IndexDefs.Assign(Source.IndexDefs);
+    if Source.IndexName <> '' then
+      IndexName := Source.IndexName
+    else
+      IndexFieldNames := Source.IndexFieldNames;
+    MasterSource := Source.MasterSource;
+    MasterFields := Source.MasterFields;
+    DetailFields := Source.DetailFields;
+    ReadOnly := Source.ReadOnly;
+  end;
+end;
+
+procedure TDAMemoryDataset.SetCloneSource(const Value: TDAMemoryDataset);
+var
+  FOldActive : Boolean;
+begin
+  if (Value <> nil) and (Value <> FMemCloneSource) then CheckforCircularLinks(Value,True);
+
+  if Value = Self then DatabaseError(Self.Name+ ': Can''t use itself as clonesource dataset');
+  FOldActive := Active;
+  Close;
+  if FMemCloneSource <> Value then begin
+    if not IsLoadingState then begin
+      if FMemCloneSource <> nil then begin
+        FMemCloneSource.UnregisterPermanentClient(Self);
+        AssignCloneSource(nil);
+      end;
+    end;
+    FMemCloneSource := Value;
+
+    if (FMemCloneSource <> nil) then begin
+      FMemCloneSource.RegisterPermanentClient(Self);
+      if not IsLoadingState then AssignCloneSource(FMemCloneSource);
+    end;
+
+  end;
+  if FOldActive then Open;
+end;
+
+procedure TDAMemoryDataset.RegisterPermanentClient(
+  const AClient: TDAMemoryDataset);
+begin
+  if FClonePermanentClientList = nil then FClonePermanentClientList:=TThreadList.Create;
+  FClonePermanentClientList.Add(AClient);
+end;
+
+procedure TDAMemoryDataset.RegisterPermanentClients;
+var
+  lClient: TDAMemoryDataset;
+  i: integer;
+begin
+  if FClonePermanentClientList <> nil then begin
+    with FClonePermanentClientList.LockList do try
+      For I := 0 to Count - 1 do begin
+        lClient:= TDAMemoryDataset(Items[i]);
+        if Assigned(lClient) then begin
+          RegisterClient(lClient);
+          lClient.RegisterPermanentClients;
+        end;
+      end;
+    finally
+      FClonePermanentClientList.UnlockList;
+    end;
+  end;  
+end;
+
+procedure TDAMemoryDataset.UnregisterPermanentClients;
+var
+  i: integer;
+  lList: TList;
+  lClient: TDAMemoryDataset;
+begin
+  if FClonePermanentClientList <> nil then begin
+    lList:= FClonePermanentClientList.LockList;
+    try
+      for i:= lList.Count-1 downto 0 do begin
+        lClient:= TDAMemoryDataset(lList[i]);
+        if Assigned(lClient) then UnregisterClient(lClient);
+      end;
+      lList.Clear;
+    finally
+      FClonePermanentClientList.UnlockList;
+    end;
+  end;
+end;
+
+procedure TDAMemoryDataset.UnregisterPermanentClient(
+  const AClient: TDAMemoryDataset);
+begin
+  if FClonePermanentClientList <> nil then
+    FClonePermanentClientList.Remove(AClient);
+end;
+
+procedure TDAMemoryDataset.AttachToSource(const Source: TDAMemoryDataset);
+var
+  fOldActive: Boolean;
+begin
+  if Source <> FCloneSource then begin
+    DetachFromSource;
+    fOldActive:= Active;
+    Close;
+    FCloneSource := Source;
+    if fOldActive then Open;
+  end;
+end;
+
+procedure TDAMemoryDataset.CheckforCircularLinks(ASource: TDataset; CheckForClone: Boolean);
+
+  procedure _CheckInPermanentClients(APermSource: TDAMemoryDataset);
+  var
+    i: integer;
+    lList: TList;
+    lDataset: TDAMemoryDataset;
+  begin
+    if (APermSource.FClonePermanentClientList <> nil) then begin
+      lList := APermSource.FClonePermanentClientList.LockList;
+      try
+        for i:=0 to lList.Count-1 do begin
+          lDataset := TDAMemoryDataset(lList[i]);
+          if lDataset = ASource then DatabaseError(SCircularDataLink, Self);
+          _CheckInPermanentClients(lDataset);
+        end;
+      finally
+        APermSource.FClonePermanentClientList.UnlockList;
+      end;
+    end;
+    if (APermSource.MasterSource <> nil) and
+       (APermSource.MasterSource.DataSet <> nil) and
+       (APermSource.MasterSource.DataSet is TDAMemoryDataset) then
+     _CheckInPermanentClients(TDAMemoryDataset(APermSource.MasterSource.DataSet));
+  end;
+
+begin
+  if ASource = nil then Exit;
+  if ASource = Self then DatabaseError(SCircularDataLink, Self);
+
+  if CheckForClone then begin
+    if ((MasterSource <> nil) and (ASource = MasterSource.DataSet)) then DatabaseError(SCircularDataLink, Self);
+    if ASource.IsLinkedTo(MasterSource) then DatabaseError(SCircularDataLink, Self);
+  end
+  else begin
+    if (ASource = FMemCloneSource) then DatabaseError(SCircularDataLink, Self);
+  end;
+
+  if (ASource is TDAMemoryDataset) then begin
+    // check in parent MasterSources
+    if (TDAMemoryDataset(ASource).MasterSource <> nil) then CheckforCircularLinks(TDAMemoryDataset(ASource).MasterSource.DataSet, CheckForClone);
+    // check in parent clonesources
+    CheckforCircularLinks(TDAMemoryDataset(ASource).FMemCloneSource,CheckForClone);
+  end;
+
+  _CheckInPermanentClients(Self);
+end;
+
+function TDAMemoryDataset.IsLoadingState: Boolean;
+begin
+  Result := (csLoading in ComponentState);
+end;
+
+procedure TDAMemoryDataset.SetAutoSort(const Value: Boolean);
+begin
+  FAutoSort := Value;
+  if FAutoSort then IntAutoSort(nil);
+end;
+
+procedure TDAMemoryDataset.IntAutoSort(ABuf : PMemDatasetrecord_Native);
+var
+  lbookmark: pointer;
+  k: integer;
+  st: TDataSetState;
+begin
+  if FAutoSort and (FIndexName <> '') then begin
+    if ABuf = nil then begin
+      lbookmark:=GetBookmark;
+      if lbookmark <> nil then ABuf := TBookMarkData(PPointer(lBookmark)^);
+    end;
+    SortOnFields;
+    if ABuf <> nil then
+      k := IntFindRecordID(ABuf)
+    else
+      k := -1;
+    if k <> -1 then begin
+      st := State;
+      if St = dsInsert then SetState(dsBrowse);
+      try
+        FRecordPos := k;
+        Resync([rmExact, rmCenter]);
+      finally
+        if st <> State then SetState(st);
+      end;
+    end;
+  end
+  else
+    Resync([]);
+end;
+
+{ TDABlobStream }
+
+constructor TDABlobStream.Create(Field: TBlobField; Mode: TBlobStreamMode);
+var
+  lbuf: Dataset_PAnsiChar;
+begin
+  inherited Create;
+  FMode := Mode;
+  FField := Field;
+  FDataSet := FField.DataSet as TDAMemoryDataset;
+  if not FDataSet.GetActiveRecBuf(lBuf) then Exit;
+  FBuffer := PMemDatasetrecord_Native(lBuf);
+  if not FField.Modified and (Mode <> bmRead) then begin
+    if FField.ReadOnly then DatabaseErrorFmt({$IFDEF FPC}SReadOnlyField{$ELSE}SFieldReadOnly{$ENDIF}, [FField.DisplayName]);
+    if not (FDataSet.State in [dsEdit, dsInsert]) then DatabaseError(SNotEditing);
+    FCached := True;
+  end
+  else
+    FCached := (lBuf = FDataSet.ActiveBuffer);
+  FOpened := True;
+  if Mode = bmWrite then Truncate;
+end;
+
+destructor TDABlobStream.Destroy;
+begin
+  if FOpened and FModified then FField.Modified := True;
+  if FModified then try
+    FDataSet.DataEvent(deFieldChange, Longint(FField));
+  except
+    {$IFDEF FPC}
+    if assigned(classes.ApplicationHandleException) then
+      classes.ApplicationHandleException(self)
+    else
+      ShowException(ExceptObject,ExceptAddr);
+    {$ELSE}
+    Application.HandleException(Self);
+    {$ENDIF}
+  end;
+  inherited Destroy;
+end;
+
+procedure TDABlobStream.GetBLOBRecordFromRecord(Field: TField; out aLocked:Boolean; out blob_size: integer; out blob_data: pointer);
+var
+  Pos: Integer;
+begin
+  Pos := FDataSet.FRecordPos;
+  if (Pos < 0) and (FDataSet.RecordCount > 0) then
+    Pos := 0
+  else if Pos >= FDataSet.RecordCount then
+    Pos := FDataSet.RecordCount - 1;
+  if (Pos >= 0) and (Pos < FDataSet.RecordCount) then begin
+    GetBLOBRecordFromBuffer(FDataSet.IntGetRecordList.LockListForReading[Pos], Field, blob_size, blob_data);
+    ALocked:=True;
+  end
+  else begin
+    blob_data:=nil;
+    blob_size:=0;
+  end;
+end;
+
+function TDABlobStream.GetBlobSize: Longint;
+var
+  llocked: Boolean;
+  ldata: pointer;
+begin
+  Result := 0;
+  if FOpened then begin
+    if FCached then begin
+      GetBLOBRecordFromBuffer(FBuffer, FField,Result,ldata);
+    end
+    else begin
+      GetBLOBRecordFromRecord(FField, llocked,Result, ldata);
+      if llocked then FDataSet.IntGetRecordList.UnlockListForReading;
+    end;
+  end;
+end;
+
+function TDABlobStream.GetBLOBRecordFromBuffer(Buffer: PMemDatasetrecord_Native; Field: TField;out blob_size: integer; out blob_data: pointer): PBLOBRecord;
+begin
+  case Buffer^.Ident of
+    mrBin2Style: begin
+      Result := PPointer(FDataSet.IntFindFieldData(Buffer^.Data, Field, True))^;
+      if Result <> nil then begin
+        with Result^ do begin
+          blob_data := @Data;
+          blob_size := size;
+        end;
+      end
+      else begin
+        blob_data := nil;
+        blob_size := 0;
+      end;
+    end;
+    mrBin3Style: begin
+      blob_size := FDataSet.GetBin3Offset(Buffer^.Data,Field.Index+1)-FDataSet.GetBin3Offset(Buffer^.Data,Field.Index);
+      blob_data := FDataSet.IntFindFieldData(Buffer^.Data, Field, False);
+      Result := nil;
+    end;
+  else
+    blob_data := nil;
+    blob_size := 0;
+    Result := nil;
+  end;
+end;
+
+function TDABlobStream.Read(var Buffer; Count: Integer): Longint;
+var
+  llocked: boolean;
+  lData: pointer;
+  lSize: integer;
+begin
+  llocked:=False;
+  Result := 0;
+  if FOpened then begin
+    if Count > Size - FPosition then
+      Result := Size - FPosition
+    else
+      Result := Count;
+    if Result > 0 then begin
+      if FCached then
+        GetBLOBRecordFromBuffer(FBuffer, FField,lSize,lData)
+      else
+        GetBLOBRecordFromRecord(FField,llocked,lSize,lData);
+      try
+        if lSize <> 0 then begin
+          Move(Dataset_PAnsiChar(lData)[FPosition], Buffer, Result);
+          Inc(FPosition, Result);
+        end;
+      finally
+        if llocked then FDataSet.IntGetRecordList.UnlockListForReading;
+      end;
+    end;
+  end;
+end;
+
+function TDABlobStream.Seek(Offset: Integer; Origin: Word): Longint;
+begin
+  case Origin of
+    soFromBeginning: FPosition := Offset;
+    soFromCurrent: Inc(FPosition, Offset);
+    soFromEnd: FPosition := GetBlobSize + Offset;
+  end;
+  Result := FPosition;
+end;
+
+procedure TDABlobStream.Truncate;
+begin
+  if FOpened and FCached and (FMode <> bmRead) then begin
+    FDataset.ConvertBin3ToBin2Record(FBuffer);
+    FDataset.ClearBin2Field(FBuffer^.Data, FField);
+    FModified := True;
+  end;
+end;
+
+function TDABlobStream.Write(const Buffer; Count: Integer): Longint;
+var
+  Temp: PBLOBRecord;
+  lblobSize: integer;
+  lBlobData: pointer;
+begin
+  Result := 0;
+  if FOpened and FCached and (FMode <> bmRead) then begin
+    Temp := GetBLOBRecordFromBuffer(FBuffer, FField,lblobSize,lBlobData);
+    if temp = nil then begin
+      temp := CreateBlobRecord(FPosition + Count);
+    end
+    else if Temp.size + SizeOf(TBLOBRecord) < Cardinal(FPosition + Count) then begin
+      ReallocMem(temp, SizeOf(TBLOBRecord) + FPosition); // compact date before realloc
+      ReallocMem(temp, SizeOf(TBLOBRecord) + FPosition + Count);
+      inc(Temp.size, Count);
+    end;
+    Move(Buffer, PAnsiChar(@Temp.Data)[FPosition], Count);
+    FDataset.SetBlobData(FField, FBuffer, Temp);
+    Inc(FPosition, Count);
+    Result := Count;
+    FModified := True;
+  end;
+end;
+
+{ TThreadMemList }
+
+procedure TThreadMemList.Add(Item: Pointer);
+begin
+  LockListForWriting;
+  try
+    FList.Add(Item);
+  finally
+    UnlockListForWriting;
+  end;
+end;
+
+procedure TThreadMemList.Clear;
+begin
+  LockListForWriting;
+  try
+    FList.Clear;
+  finally
+    UnlockListForWriting;
+  end;
+end;
+
+constructor TThreadMemList.Create;
+begin
+  inherited Create;
+  {$IFDEF FPC}
+  InitCriticalSection(FLock);
+  {$ELSE}
+  InitializeCriticalSection(FLock);
+  {$ENDIF}
+  FList := TMemList.Create;
+  FReadLock:=0;
+end;
+
+destructor TThreadMemList.Destroy;
+begin
+  LockListForWriting;    // Make sure nobody else is inside the list.
+  try
+    FList.Free;
+    inherited Destroy;
+  finally
+    UnlockListForWriting;
+    {$IFDEF FPC}
+    DoneCriticalSection(FLock);
+    {$ELSE}
+    DeleteCriticalSection(FLock);
+    {$ENDIF}
+  end;
+end;
+
+function TThreadMemList.LockListForReading: TMemList;
+begin
+  if FReadLock = 0 then EnterCriticalSection(FLock);
+  inc(FReadLock);
+  Result := FList;
+end;
+
+function TThreadMemList.LockListForWriting: TMemList;
+begin
+  EnterCriticalSection(FLock);
+  Result := FList;
+end;
+
+procedure TThreadMemList.Remove(Item: Pointer);
+begin
+  LockListForWriting;
+  try
+    FList.Remove(Item);
+  finally
+    UnlockListForWriting;
+  end;
+end;
+
+
+procedure TThreadMemList.UnlockListForReading;
+begin
+  Dec(FReadLock);
+  if FReadLock = 0 then LeaveCriticalSection(FLock);
+end;
+
+procedure TThreadMemList.UnlockListForWriting;
+begin
+  LeaveCriticalSection(FLock);
+end;
+
+{$IFDEF BDS4UP}{$REGION 'MEM_PACKETRECORDS'}{$ENDIF BDS4UP}
+{$IFDEF MEM_PACKETRECORDS}
+{ TMemPackedRecord }
+
+constructor TMemPackedRecord.Create(AOwner: TMemPackedRecords);
+begin
+  fOwner := AOwner;
+  if AOwner = nil then DatabaseError('AOwner should be assigned');
+  fBuffer:= AOwner.fOwner.IntAllocRecordBuffer(True);
+end;
+
+destructor TMemPackedRecord.Destroy;
+begin
+  fOwner.fOwner.IntFreeRecordBuffer(fBuffer);
+  inherited;
+end;
+
+function TMemPackedRecord.GetIsNull(Index: Integer): Boolean;
+begin
+  Result := fOwner.fOwner.GetNullMask(fBuffer,Index);
+end;
+
+function TMemPackedRecord.GetValues(Index: Integer): Variant;
+begin
+  Result := FOwner.fOwner.GetVarValueFromBuffer(fBuffer,FOwner.fOwner.Fields[Index]);
+end;
+
+function TMemPackedRecord.GetValuesByFieldName(AName: string): Variant;
+begin
+  Result := FOwner.fOwner.GetVarValueFromBuffer(fBuffer,FOwner.fOwner.FieldByName(AName));
+end;
+
+procedure TMemPackedRecord.SetIsNull(Index: Integer; const Value: Boolean);
+begin
+  fOwner.fOwner.ClearBin2Field(fBuffer,fOwner.fOwner.Fields[Index]);
+  fOwner.fOwner.SetNullMask(fBuffer,Index,Value);
+end;
+
+procedure TMemPackedRecord.SetValues(Index: Integer; const Value: Variant);
+begin
+
+end;
+
+procedure TMemPackedRecord.SetValuesByFieldName(AName: string;
+  const Value: Variant);
+begin
+
+end;
+
+{ TMemPackedRecords }
+
+function TMemPackedRecords.Add: TMemPackedRecord;
+begin
+  Result:= TMemPackedRecord.Create(Self);
+  fList.Add(Result);
+end;
+
+procedure TMemPackedRecords.Clear;
+var
+  i: integer;
+begin
+  For i:= 0 to fList.Count - 1 do
+    TMemPackedRecord(fList[i]).Free;
+  fList.Clear;
+end;
+
+constructor TMemPackedRecords.Create(AOwner: TDAMemoryDataset);
+begin
+  fOwner := AOwner;
+  fList := TList.Create;
+end;
+
+procedure TMemPackedRecords.Delete(aIndex: integer);
+var
+  lRec: TMemPackedRecord;
+begin
+  lRec := TMemPackedRecord(fList.Items[aIndex]);
+  fList.Delete(aIndex);
+  lRec.Free;
+end;
+
+destructor TMemPackedRecords.Destroy;
+begin
+  Clear;
+  fList.Free;
+  inherited;
+end;
+
+function TMemPackedRecords.GetCount: Integer;
+begin
+  Result:= fList.Count;
+end;
+
+function TMemPackedRecords.GetItems(Index: Integer): TMemPackedRecord;
+begin
+  Result := TMemPackedRecord(fList[Index]);
+end;
+{$ENDIF MEM_PACKETRECORDS}
+{$IFDEF BDS4UP}{$ENDREGION}{$ENDIF BDS4UP}
+
+{ TDAMemIndex }
+
+procedure TDAMemIndex.Clear;
+begin
+  FInit_FieldNames:= '';
+  FInit_CaseInsFields:='';
+  FInit_DescFields:='';
+  FIndexDef_Options:= [];
+  FIndexDef_Fields:='';
+  FIndexDef_DescFields:='';
+  FIndexDef_CaseInsFields:='';
+  FIndexCaseInsList.Clear;
+  FIndexDescFields.Clear;
+  FIndexFieldNameList.Clear;
+  FSortDescMode := False;
+  FDataList.Clear;
+  FLastSorted := 0;
+end;
+
+constructor TDAMemIndex.Create(AOwner: TDAMemoryDataset);
+begin
+  inherited Create;
+  FOwner := AOwner;
+  FIndexCaseInsList:= TList.Create;
+  FIndexDescFields := TList.Create;
+  FIndexFieldNameList := TList.Create;
+  FSortDescMode := False;
+  FInitFromIndexDef := False;
+  FLastSorted := 0;
+  FDataList:=TMemList.Create;
+end;
+
+destructor TDAMemIndex.Destroy;
+begin
+  Clear;
+  FIndexCaseInsList.Free;
+  FIndexDescFields.Free;
+  FIndexFieldNameList.Free;
+  FDataList.Free;
+  inherited;
+end;
+
+{$IFDEF DELPHI10UP}
+{$WARN SYMBOL_DEPRECATED OFF}
+{$ENDIF DELPHI10UP}
+procedure TDAMemIndex.Init(const AFieldNames: string; const CaseInsFields: string = ''; const DescFields: string='');
+var
+  pos1: integer;
+  fld: TField;
+  j: integer;
+begin
+  Clear;
+  FInit_FieldNames:= AFieldNames;
+  FInit_CaseInsFields:=CaseInsFields;
+  FInit_DescFields:=DescFields;
+
+  Pos1 := 1;
+  while Pos1 <= Length(AFieldNames) do begin
+    Fld := FOwner.FieldByName(ExtractFieldName(AFieldNames, Pos1));
+    FOwner.ValidateFieldForIndex(Fld);
+    FIndexFieldNameList.Add(Fld);
+  end;
+
+  //CaseInsFields
+  FIndexCaseInsList.Count := FIndexFieldNameList.Count;
+  Pos1 := 1;
+  while Pos1 <= Length(CaseInsFields) do begin
+    Fld := FOwner.FieldByName(ExtractFieldName(CaseInsFields, Pos1));
+    j := FIndexFieldNameList.IndexOf(Fld);
+    if j <> -1 then FIndexCaseInsList[j]:=pointer(1) ;
+  end;
+
+  // DescFields
+  FIndexDescFields.Count := FIndexFieldNameList.Count;
+  Pos1 := 1;
+  while Pos1 <= Length(DescFields) do begin
+    Fld := FOwner.FieldByName(ExtractFieldName(DescFields, Pos1));
+    j:= IndexFieldNameList.IndexOf(Fld);
+    if j <> -1 then FIndexDescFields[j]:=pointer(1);
+  end;
+end;
+{$IFDEF DELPHI10UP}
+{$WARN SYMBOL_DEPRECATED ON}
+{$ENDIF DELPHI10UP}
+
+
+function TDAMemIndex.GetDataList: TMemList;
+begin
+  if FInitFromIndexDef then
+    Result := FDataList
+  else
+    Result := FOwner.FDataList;
+end;
+
+procedure TDAMemIndex.Init(AIndexDef: TIndexDef);
+var
+  lCaseInsField, lDescFields: string;
+begin
+  lCaseInsField := AIndexDef.CaseInsFields;
+  if (lCaseInsField = '') and (ixCaseInsensitive in AIndexDef.Options) then
+    lCaseInsField := AIndexDef.Fields;
+  lDescFields := AIndexDef.DescFields;
+  if (lDescFields = '') and (ixDescending in AIndexDef.Options) then
+    lDescFields := AIndexDef.Fields;
+  Init(AIndexDef.Fields, lCaseInsField,lDescFields);
+  FInitFromIndexDef := True;
+  FIndexDef_Options:=AIndexDef.Options;
+  FIndexDef_Fields:=AIndexDef.Fields;
+  FIndexDef_DescFields:=AIndexDef.DescFields;
+  FIndexDef_CaseInsFields:=AIndexDef.CaseInsFields;
+end;
+
+procedure TDAMemIndex.Init(const Fields: string; CaseInsensitive,
+  Descending: Boolean);
+var
+  i: integer;
+begin
+  Init(Fields);
+
+  if CaseInsensitive then FInit_CaseInsFields := FInit_FieldNames;
+  for i:= 0 to IndexCaseInsList.Count-1 do
+    IndexCaseInsList[i]:= Pointer({$IFDEF FPC}PtrUInt{$ELSE}cardinal{$ENDIF}(ord(CaseInsensitive)));
+
+  if Descending then FInit_DescFields := FInit_FieldNames;
+  FSortDescMode:= Descending;
+  for i:= 0 to IndexDescFields.Count-1 do
+    IndexDescFields[i]:= Pointer({$IFDEF FPC}PtrUInt{$ELSE}cardinal{$ENDIF}(ord(Descending)));
+end;
+
+function TDAMemIndex.IsValid: boolean;
+begin
+  Result := FIndexFieldNameList.Count > 0;
+end;
+
+procedure TDAMemIndex.UpdateIndex(AIndexDef: TIndexDef);
+begin
+  if not ((AIndexDef.Fields = FIndexDef_Fields) and
+          (AIndexDef.CaseInsFields = FIndexDef_CaseInsFields) and
+          (AIndexDef.DescFields = FIndexDef_DescFields) and
+          (AIndexDef.Options = FIndexDef_Options)) then Init(AIndexDef);
+end;
+
+function TDAMemIndex.isCanUsed(const Fields: string; CaseInsensitive: Boolean): boolean;
+var
+  lcase: string;
+begin
+  if CaseInsensitive then lcase:= Fields else lcase := '';
+  Result :=
+    IsValid and
+    (FLastSorted > FOwner.FLastUpdate) and
+    // eugene: 20080407: AnsiSameText
+    AnsiSameText(FInit_FieldNames,Fields) and
+    AnsiSameText(FInit_CaseInsFields,lcase) and
+    (AnsiSameText(FInit_DescFields,Fields) or (FInit_DescFields=''));
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAMySQLInterfaces.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAMySQLInterfaces.pas
new file mode 100644
index 0000000..54e7fc1
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAMySQLInterfaces.pas	
@@ -0,0 +1,804 @@
+unit uDAMySQLInterfaces;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  SysUtils, DB,
+  uDAInterfaces, uDAEngine, uROClasses, uDAUtils;
+
+type
+  { IDAMySQLConnection
+      For identification purposes Implemented by all MySQL connections }
+  IDAMySQLConnection = interface(IDAConnection)
+    ['{EB62495C-E922-45B3-B8DC-5DFCD787D3C8}']
+  end;
+
+  TDAMySQLDriver = class(TDAEDriver)
+  protected
+    function GetAvailableDriverOptions: TDAAvailableDriverOptions; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure GetAuxParams(const AuxDriver: string; out List: IROStrings); override;
+    function GetDefaultCustomParameters: string; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  public
+  end;
+
+  TDAMySQLConnection = class(TDAEConnection, IDAMySQLConnection, IDACanQueryDatabaseNames)
+  private
+    FMySQLVersion: integer;
+    function GetMySQLVersion: integer;
+  protected
+    function GetTableSchema: string; virtual;
+    function useUnicode:Boolean; virtual;
+  protected
+    procedure DoApplyConnectionString(aConnStrParser: TDAConnectionStringParser; aConnectionObject: TCustomConnection); override;
+    function DoGetLastAutoInc(const GeneratorName: string): integer; override;
+    procedure DoGetStoredProcedureNames(out List: IROStrings); override;
+    function GetDatabaseNames: IROStrings;
+    procedure DoGetTableNames(out List: IROStrings); override;
+    procedure DoGetViewNames(out List: IROStrings); override;
+    procedure DoGetForeignKeys(out ForeignKeys: TDADriverForeignKeyCollection); override;
+    procedure DoGetTableFields(const aTableName: string; out Fields: TDAFieldCollection); override;
+    procedure DoGetStoredProcedureParams(const aStoredProcedureName: string; out Params: TDAParamCollection); override;
+    function IdentifierNeedsQuoting(const iIdentifier: string): boolean; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  public
+    constructor Create(aDriver: TDAEDriver; aName: string = ''); override;
+    property MySQLVersion: integer read GetMySQLVersion;
+  end;
+
+function MySQL_GetLastAutoInc(const GeneratorName: string; Query: IDADataset): integer;
+function MYSQL_GetDefaultCustomParameters: string;
+procedure MYSQL_GetAuxParams(List: IROStrings);
+function MYSQL_GetDatabaseNames(AConnection: TDAEConnection): IROStrings;
+procedure MYSQL_DoGetNames(Query: IDADataset; AList: IROStrings; AObjectType: TDAObjecttype; aSchema: string; AMySQLVersion: integer);
+procedure MYSQL_DoGetForeignKeys(Query: IDADataset; ForeignKeys: TDADriverForeignKeyCollection; aSchema: string; AMySQLVersion: integer);
+procedure MYSQL_DoGetTableFields(const aTableName: string; Query: IDADataset; out Fields: TDAFieldCollection; aSchema: string; AMySQLVersion: integer; useUnicode: Boolean=False);
+procedure MYSQL_DoGetStoredProcedureParams(const aStoredProcedureName: string; Query: IDADataset; out Params: TDAParamCollection; aSchema: string);
+function MYSQL_IdentifierNeedsQuoting(const iIdentifier: string): boolean;
+function MYSQL_GetVersion(Query: IDADataset): cardinal;
+
+const
+  MySQL_DriverType = 'MySQL';
+
+implementation
+uses
+  StrUtils;
+
+var
+  mysql_reservedwords         : array of string;
+
+function MySQL_GetLastAutoInc(const GeneratorName: string; Query: IDADataset): integer;
+begin
+  try
+    Query.SQL := 'SELECT LAST_INSERT_ID()';
+    Query.Open;
+    Result := Query.Fields[0].AsInteger;
+  finally
+    Query := nil;
+  end;
+end;
+
+function MYSQL_GetDefaultCustomParameters: string;
+begin
+  Result := 'Port=3306;';
+end;
+
+procedure MYSQL_GetAuxParams(List: IROStrings);
+begin
+  List.Add('Port=<port>');
+end;
+{ TDAMySQLDriver }
+
+procedure TDAMySQLDriver.GetAuxParams(const AuxDriver: string;
+  out List: IROStrings);
+begin
+  inherited;
+  MYSQL_GetAuxParams(List);
+end;
+
+function TDAMySQLDriver.GetAvailableDriverOptions: TDAAvailableDriverOptions;
+begin
+  result := [doServerName, doDatabaseName, doLogin, doCustom];
+end;
+
+function TDAMySQLDriver.GetDefaultCustomParameters: string;
+begin
+  Result := MYSQL_GetDefaultCustomParameters;
+end;
+
+function MYSQL_GetDatabaseNames(AConnection: TDAEConnection): IROStrings;
+begin
+  Result := Engine_GetDatabaseNames(AConnection,'MySQL','SHOW DATABASES');
+end;
+
+procedure MYSQL_DoGetNames(Query: IDADataset; AList: IROStrings; AObjectType: TDAObjecttype; aSchema: string;AMySQLVersion: integer);
+const
+  sDoGetTableNames            =
+    'SELECT TABLE_NAME ' +
+    'FROM INFORMATION_SCHEMA.TABLES ' +
+    'WHERE TABLE_TYPE = ''%s'' AND TABLE_SCHEMA = ''%s''';
+  sDOGetProcedures            =
+    'SELECT ROUTINE_NAME ' +
+    'FROM INFORMATION_SCHEMA.ROUTINES ' +
+    'WHERE ROUTINE_TYPE = ''PROCEDURE'' AND ROUTINE_SCHEMA = ''%s''';
+begin
+  try
+    if AMySQLVersion < 50000 then begin
+      case AObjectType of
+        dotTable: Query.SQL := Format('SHOW TABLES FROM %s',[aSchema]);
+        dotView:  Query.SQL := '';    // not supported
+        dotProcedure: Query.SQL := '';// not supported
+      end;
+    end
+    else begin
+      case AObjectType of
+        dotTable: Query.SQL := Format(sDoGetTableNames, ['BASE TABLE', aSchema]);
+        dotView: Query.SQL := Format(sDoGetTableNames, ['VIEW', aSchema]);
+        dotProcedure: Query.SQL := Format(sDOGetProcedures, [aSchema]);
+      end;
+    end;  
+    if Query.SQL <> '' then begin
+      Query.Open;
+      while not Query.Eof do begin
+        Alist.Add(Query.Fields[0].AsString);
+        Query.Next;
+      end;
+    end;
+  finally
+    Query := nil;
+  end;
+end;
+
+procedure MYSQL_DoGetForeignKeys(Query: IDADataset; ForeignKeys: TDADriverForeignKeyCollection; aSchema: string; AMySQLVersion: integer);
+var
+  lCurrConstraint             : string;
+  lCurrFK                     : TDADriverForeignKey;
+const
+  sFK_SQL                     =
+    'SELECT ' +
+    'TABLE_NAME, REFERENCED_TABLE_NAME, COLUMN_NAME, REFERENCED_COLUMN_NAME ' +
+    'FROM INFORMATION_SCHEMA.KEY_COLUMN_USAGE ' +
+    'WHERE CONSTRAINT_SCHEMA=''%s'' AND REFERENCED_TABLE_NAME IS NOT NULL';
+begin
+  ForeignKeys.Clear;
+  lCurrConstraint := '';
+  lCurrFK := nil;
+  try
+    if AMySQLVersion >=50000 then begin
+      Query.SQL := Format(sFK_SQL, [aSchema]);
+      Query.Open;
+
+      while (not Query.EOF) do begin
+        if lCurrConstraint <> Query.Fields[0].AsString + '|' + Query.Fields[1].AsString then begin
+          lCurrConstraint := Query.Fields[0].AsString + '|' + Query.Fields[1].AsString;
+
+          lCurrFK := ForeignKeys.Add();
+          with lCurrFK do begin
+            PKTable := TrimRight(Query.Fields[0].AsString);
+            FKTable := TrimRight(Query.Fields[1].AsString);
+            PKField := TrimRight(Query.Fields[2].AsString);
+            FKField := TrimRight(Query.Fields[3].AsString);
+          end;
+        end else begin
+          with lCurrFK do begin
+            PKField := PKField + ';' + TrimRight(Query.Fields[2].AsString);
+            FKField := FKField + ';' + TrimRight(Query.Fields[3].AsString);
+          end;
+        end;
+        Query.Next;
+      end;
+    end
+    else begin
+      // not implemented
+    end;
+  finally
+    Query := nil;
+  end;
+end;
+
+function MySQLDataTypeToDA(aDataType: string; Unicode, AutoInc, Unsigned: boolean): TDADataType;
+begin
+  aDataType := LowerCase(aDataType);
+  if (aDAtaType = 'char') or (aDAtaType = 'varchar') or
+     (aDAtaType = 'binary') or (aDAtaType = 'varbinary') or
+     (aDataType = 'enum') or (aDataType = 'set') then begin
+    if Unicode then
+      Result := datWideString
+    else
+      Result := datString;
+  end
+  else if (aDataType = 'text') or (aDataType = 'longtext') or
+          (aDataType = 'tinytext') or (aDataType = 'mediumtext') then begin
+    if Unicode then
+      Result := datWideMemo
+    else
+      Result := datMemo;
+  end
+  else if (aDataType = 'blob') or  (aDataType = 'tinyblob') or
+          (aDataType = 'mediumblob') or  (aDataType = 'longblob') then
+    Result := datBlob
+  else if (aDataType = 'date') or (aDataType = 'time') or (aDataType = 'datetime') or (aDataType = 'timestamp') then
+    result := datDateTime
+  else if (aDataType = 'bit') then
+    Result := datLargeUInt
+  else if (aDataType = 'tinyint') then begin
+    if Unsigned then
+      result := datByte
+    else
+      result := datShortInt
+  end
+  else if (aDataType = 'smallint') then begin
+    if Unsigned then
+      Result := datWord
+    else
+      Result := datSmallInt
+  end
+  else if (aDataType = 'year') then
+    Result := datWord
+  else if (aDataType = 'mediumint') or (aDataType = 'int') or (aDataType = 'integer') then begin
+    if AutoInc then
+      Result := datAutoInc
+    else if Unsigned then
+        Result := datCardinal
+      else
+        result := datInteger
+  end
+  else if (aDataType = 'bigint') then begin
+    if AutoInc then
+      Result := datLargeAutoInc
+    else if Unsigned then
+      Result := datLargeUInt
+    else
+      result := datLargeInt
+  end
+  else if (aDataType = 'float') then begin
+    Result := datSingleFloat
+  end
+  else if (aDataType = 'double') then  begin
+    Result := datFloat
+  end
+  else if (aDataType = 'decimal') then
+    result := datDecimal
+  else
+    result := datUnknown;
+end;
+
+procedure MYSQL_DoGetTableFields(const aTableName: string; Query: IDADataset; out Fields: TDAFieldCollection; aSchema: string; AMySQLVersion: integer;useUnicode: Boolean);
+const
+  sGetTableFields             =
+    'SELECT ' +
+    //TABLE_CATALOG, TABLE_SCHEMA, TABLE_NAME, COLUMN_NAME, ORDINAL_POSITION, COLUMN_DEFAULT, IS_NULLABLE, DATA_TYPE, CHARACTER_MAXIMUM_LENGTH, CHARACTER_OCTET_LENGTH,  CHARACTER_SET_NAME, COLLATION_NAME, COLUMN_TYPE, COLUMN_KEY, EXTRA, PRIVILEGES, COLUMN_COMMENT
+    'COLUMN_NAME, DATA_TYPE, IS_NULLABLE, COLUMN_DEFAULT, CHARACTER_MAXIMUM_LENGTH, CHARACTER_SET_NAME, COLUMN_KEY, COLUMN_COMMENT, EXTRA, COLUMN_TYPE,NUMERIC_PRECISION, NUMERIC_SCALE ' +
+    'FROM INFORMATION_SCHEMA.COLUMNS ' +
+    'WHERE ' +
+    '(TABLE_SCHEMA = ''%s'') AND (TABLE_NAME = ''%s'') ' +
+    'ORDER BY ORDINAL_POSITION';
+var
+  fld                         : TDAField;
+  s,s1: string;
+  i: integer;
+begin
+  try
+    if AMySQLVersion >= 50000 then begin
+      Query.SQL := Format(sGetTableFields, [aSchema, aTableName]);
+      Query.Open;
+      Fields := TDAFieldCollection.Create(nil);
+      while not Query.Eof do begin
+        fld := Fields.Add;
+        fld.Name := Query.Fields[0].AsString;
+        fld.Required := Query.Fields[2].AsString <> 'YES';
+        if not Query.Fields[3].IsNull then
+          fld.DefaultValue := Query.Fields[3].AsString;
+        fld.Size := GetVarInteger(Query.Fields[4].Value);
+        fld.InPrimaryKey := SameText(Query.Fields[6].AsString, 'PRI');
+        fld.Description := Query.Fields[7].AsString;
+        fld.DataType := MysqlDataTypeToDA(Query.Fields[1].asString, useUnicode and ( sametext(Query.Fields[5].AsString, 'utf8') or sametext(Query.Fields[5].AsString, 'ucs2')), SameText(Query.Fields[8].AsString, 'auto_increment'), pos(' unsigned',LowerCase(Query.Fields[9].AsString))>0);
+        if fld.DataType = datDecimal then begin
+          fld.DecimalPrecision:=Query.Fields[10].AsInteger;
+          fld.DecimalScale:=Query.Fields[11].AsInteger;
+        end;
+        if fld.DefaultValue <> '' then begin
+          if not TestDefaultValue(fld.DefaultValue, fld.DataType) then
+            fld.DefaultValue := '';
+        end;
+        Query.Next;
+      end;
+    end
+    else begin
+      query.SQL := Format('SHOW FULL COLUMNS FROM %s FROM %s', [ATableName, aSchema]);
+      Query.Open;
+      Fields := TDAFieldCollection.Create(nil);
+      while not Query.Eof do begin
+        fld := Fields.Add;
+        fld.Name := Query.FieldByName('Field').AsString;
+        fld.InPrimaryKey := Query.FieldByName('Key').AsString = 'PRI';
+        fld.Required := Query.FieldByName('Null').AsString <> 'YES';
+        s:=Query.FieldByName('Type').AsString;
+        i := pos('(',s);
+        if i > 0 then begin
+          s1:= copy(s,1,i-1);
+          delete(s,1,i);
+          SetLength(s, Length(s)-1);
+        end
+        else begin
+          s1:=s;
+          s:='';
+        end;
+        if not Query.FieldByName('Default').IsNull then
+          fld.DefaultValue := Query.FieldByName('Default').AsString;
+        fld.DataType := MysqlDataTypeToDA(s1, useUnicode and ( sametext(Query.FieldByName('COLLATION').AsString, 'utf8') or sametext(Query.FieldByName('Extra').AsString, 'ucs2')), SameText(Query.Fields[8].AsString, 'auto_increment'), False);
+        fld.Description := Query.FieldByNAme('Comment').AsString;
+        if s <> '' then begin
+          i:= pos(',', s);
+          if i = 0 then begin
+            fld.Size:=StrToIntDef(s,0)
+          end
+          else begin
+            fld.DecimalPrecision:=StrToIntDef(copy(s,1,i-1),0);
+            fld.DecimalScale:=StrToIntDef(copy(s,i+1, length(s)),0);
+          end;
+        end;
+        Query.Next;
+      end;
+    end;
+  finally
+    Query := nil;
+  end;
+end;
+
+procedure MYSQL_DoGetStoredProcedureParams(const aStoredProcedureName: string; Query: IDADataset; out Params: TDAParamCollection; aSchema: string);
+const
+  sSQL                        = 'SELECT PARAM_LIST FROM MYSQL.PROC WHERE DB = ''%s'' AND NAME = ''%s''';
+  sError                      = 'Can''t parse procedures params';
+  aValidChars                 = ['A'..'Z', 'a'..'z', '0'..'9','_'];
+var
+  par                         : TDAParam;
+  s, s1                       : string;
+  p, p1                       : pchar;
+begin
+  try
+    Query.SQL := Format(sSQL, [aSchema, aStoredProcedureName]);
+    Query.Open;
+    Params := TDAParamCollection.Create(nil);
+    if (not Query.Eof) and (not Query.Fields[0].IsNull) then begin
+      s := Query.Fields[0].AsString;
+      p := Pchar(s);
+      repeat
+        while p^ = ',' do inc(p);
+        while p^ = ' ' do inc(p);
+        if p^ = #0 then Exit;
+        par := Params.Add;
+        p1 := p;
+        while CharInSet(p1^ , aValidChars) do inc(p1);
+        if p1^ = #0 then exit;
+        SetString(s1, p, p1 - p);
+        s1 := Lowercase(s1);
+        if s1 = 'in' then par.ParamType := daptInput
+        else if s1 = 'out' then par.ParamType := daptOutput
+        else if s1 = 'inout' then par.ParamType := daptInputOutput;
+        if par.ParamType <> daptUnknown then begin
+          while p1^ = ' ' do inc(p1);
+          p := p1;
+          while CharInSet(p1^ , aValidChars) do inc(p1);
+          if p1^ = #0 then exit;
+          SetString(s1, p, p1 - p);
+        end
+        else begin
+          par.ParamType := daptInput;
+        end;
+        par.Name := s1;
+        while p1^ = ' ' do inc(p1);
+        p := p1;
+        while CharInSet(p1^, aValidChars) do inc(p1);
+        SetString(s1, p, p1 - p);
+        par.DataType := MysqlDataTypeToDA(s1, sametext(s1, 'utf8') or sametext(s1, 'ucs2'), False, pos(' unsigned',s1)>0);
+        if p1^ = #0 then exit;
+        while p1^ = ' ' do inc(p1);
+        p := p1;
+      until p^ <> ',';
+    end;
+  finally
+    Query := nil;
+  end;
+end;
+
+function MYSQL_IdentifierNeedsQuoting(const iIdentifier: string): boolean;
+begin
+  result := TestIdentifier(iIdentifier, mysql_reservedwords);
+end;
+
+function MYSQL_GetVersion(Query: IDADataset): cardinal;
+
+  function ExtractValue(var s:string): integer;
+  var
+    i: integer;
+  begin
+    Result := 0;
+    i := pos('.',s);
+    if i > 0 then begin
+      Result := StrToIntDef(Copy(s,1,i-1),0);
+      Delete(s,1,i);
+      exit;
+    end;
+    i := pos('-',s);
+    if i > 0 then begin
+      Result := StrToIntDef(Copy(s,1,i-1),0);
+      Delete(s,1,i);
+      exit;
+    end;
+    i:=0;
+    while CharInSet(s[i+1],['0'..'9']) do begin
+      inc(i);
+      if Length(s) >=i then break;
+    end;
+    if i > 0 then begin
+      Result := StrToIntDef(Copy(s,1,i-1),0);
+      Delete(s,1,i-1);
+    end;
+  end;
+
+var
+  s: string;
+begin
+  try
+    Query.SQL:= 'SHOW VARIABLES like "version"';
+    Query.Open;
+    if Query.EOF then
+      Result:=50000
+    else begin
+      s:= Query.Fields[1].AsString;
+      Result :=
+        ExtractValue(s)*10000 +
+        ExtractValue(s)*100 +
+        ExtractValue(s);
+    end;
+  finally
+    Query := nil;
+  end;
+end;
+{ TDAMySQLConnection }
+
+constructor TDAMySQLConnection.Create(aDriver: TDAEDriver; aName: string);
+begin
+  inherited;
+  FMySQLVersion:=-1;
+end;
+
+procedure TDAMySQLConnection.DoApplyConnectionString(
+  aConnStrParser: TDAConnectionStringParser;
+  aConnectionObject: TCustomConnection);
+begin
+  inherited;
+  FMySQLVersion := -1;
+end;
+
+procedure TDAMySQLConnection.DoGetForeignKeys(
+  out ForeignKeys: TDADriverForeignKeyCollection);
+begin
+  inherited;
+  MYSQL_DoGetForeignKeys(GetDatasetClass.Create(Self), ForeignKeys, GetTableSchema,MySQLVersion);
+end;
+
+function TDAMySQLConnection.DoGetLastAutoInc(
+  const GeneratorName: string): integer;
+begin
+  Result := MySQL_GetLastAutoInc(GeneratorName, GetDatasetClass.Create(Self));
+end;
+
+procedure TDAMySQLConnection.DoGetStoredProcedureNames(
+  out List: IROStrings);
+begin
+  inherited;
+  MYSQL_DoGetNames(GetDatasetClass.Create(Self), List, dotProcedure, GetTableSchema,MySQLVersion);
+end;
+
+procedure TDAMySQLConnection.DoGetStoredProcedureParams(
+  const aStoredProcedureName: string; out Params: TDAParamCollection);
+begin
+  MYSQL_DoGetStoredProcedureParams(aStoredProcedureName, GetDatasetClass.Create(Self), Params, GetTableSchema);
+end;
+
+procedure TDAMySQLConnection.DoGetTableFields(const aTableName: string;
+  out Fields: TDAFieldCollection);
+begin
+  MYSQL_DoGetTableFields(QuoteIdentifierIfNeeded(aTableName), GetDatasetClass.Create(Self), Fields, GetTableSchema,MySQLVersion, useUnicode);
+end;
+
+procedure TDAMySQLConnection.DoGetTableNames(out List: IROStrings);
+begin
+  inherited;
+  MYSQL_DoGetNames(GetDatasetClass.Create(Self), List, dotTable, GetTableSchema,MySQLVersion);
+end;
+
+procedure TDAMySQLConnection.DoGetViewNames(out List: IROStrings);
+begin
+  inherited;
+  MYSQL_DoGetNames(GetDatasetClass.Create(Self), List, dotView, GetTableSchema,MySQLVersion);
+end;
+
+function TDAMySQLConnection.GetDatabaseNames: IROStrings;
+begin
+  Result := MYSQL_GetDatabaseNames(Self);
+end;
+
+
+function TDAMySQLConnection.GetMySQLVersion: integer;
+begin
+  if FMySQLVersion = -1 then FMySQLVersion := MYSQL_GetVersion(GetDatasetClass.Create(Self));
+  Result := FMySQLVersion;
+end;
+
+function TDAMySQLConnection.GetTableSchema: string;
+begin
+  with TDAConnectionStringParser.Create(GetConnectionString) do try
+    Result := Database;
+  finally
+    Free;
+  end;
+end;
+
+procedure MYSQL_InitializeReservedWords;
+begin
+  SetLength(mysql_reservedwords, 230);
+  // sorted with TStringList.Sort (bds2007)
+  mysql_reservedwords[0] := '_BINARY';
+  mysql_reservedwords[1] := 'ACTION';
+  mysql_reservedwords[2] := 'ADD';
+  mysql_reservedwords[3] := 'ALL';
+  mysql_reservedwords[4] := 'ALTER';
+  mysql_reservedwords[5] := 'ANALYZE';
+  mysql_reservedwords[6] := 'AND';
+  mysql_reservedwords[7] := 'AS';
+  mysql_reservedwords[8] := 'ASC';
+  mysql_reservedwords[9] := 'ASENSITIVE';
+  mysql_reservedwords[10] := 'BEFORE';
+  mysql_reservedwords[11] := 'BETWEEN';
+  mysql_reservedwords[12] := 'BIGINT';
+  mysql_reservedwords[13] := 'BINARY';
+  mysql_reservedwords[14] := 'BIT';
+  mysql_reservedwords[15] := 'BLOB';
+  mysql_reservedwords[16] := 'BOTH';
+  mysql_reservedwords[17] := 'BY';
+  mysql_reservedwords[18] := 'CALL';
+  mysql_reservedwords[19] := 'CASCADE';
+  mysql_reservedwords[20] := 'CASE';
+  mysql_reservedwords[21] := 'CHANGE';
+  mysql_reservedwords[22] := 'CHAR';
+  mysql_reservedwords[23] := 'CHARACTER';
+  mysql_reservedwords[24] := 'CHECK';
+  mysql_reservedwords[25] := 'COLLATE';
+  mysql_reservedwords[26] := 'COLUMN';
+  mysql_reservedwords[27] := 'CONDITION';
+  mysql_reservedwords[28] := 'CONSTRAINT';
+  mysql_reservedwords[29] := 'CONTINUE';
+  mysql_reservedwords[30] := 'CONVERT';
+  mysql_reservedwords[31] := 'CREATE';
+  mysql_reservedwords[32] := 'CROSS';
+  mysql_reservedwords[33] := 'CURRENT_DATE';
+  mysql_reservedwords[34] := 'CURRENT_TIME';
+  mysql_reservedwords[35] := 'CURRENT_TIMESTAMP';
+  mysql_reservedwords[36] := 'CURRENT_USER';
+  mysql_reservedwords[37] := 'CURSOR';
+  mysql_reservedwords[38] := 'DATABASE';
+  mysql_reservedwords[39] := 'DATABASES';
+  mysql_reservedwords[40] := 'DATE';
+  mysql_reservedwords[41] := 'DAY_HOUR';
+  mysql_reservedwords[42] := 'DAY_MICROSECOND';
+  mysql_reservedwords[43] := 'DAY_MINUTE';
+  mysql_reservedwords[44] := 'DAY_SECOND';
+  mysql_reservedwords[45] := 'DEC';
+  mysql_reservedwords[46] := 'DECIMAL';
+  mysql_reservedwords[47] := 'DECLARE';
+  mysql_reservedwords[48] := 'DEFAULT';
+  mysql_reservedwords[49] := 'DELAYED';
+  mysql_reservedwords[50] := 'DELETE';
+  mysql_reservedwords[51] := 'DESC';
+  mysql_reservedwords[52] := 'DESCRIBE';
+  mysql_reservedwords[53] := 'DETERMINISTIC';
+  mysql_reservedwords[54] := 'DISTINCT';
+  mysql_reservedwords[55] := 'DISTINCTROW';
+  mysql_reservedwords[56] := 'DIV';
+  mysql_reservedwords[57] := 'DOUBLE';
+  mysql_reservedwords[58] := 'DROP';
+  mysql_reservedwords[59] := 'DUAL';
+  mysql_reservedwords[60] := 'EACH';
+  mysql_reservedwords[61] := 'ELSE';
+  mysql_reservedwords[62] := 'ELSEIF';
+  mysql_reservedwords[63] := 'ENCLOSED';
+  mysql_reservedwords[64] := 'ENUM';
+  mysql_reservedwords[65] := 'ESCAPED';
+  mysql_reservedwords[66] := 'EXISTS';
+  mysql_reservedwords[67] := 'EXIT';
+  mysql_reservedwords[68] := 'EXPLAIN';
+  mysql_reservedwords[69] := 'FALSE';
+  mysql_reservedwords[70] := 'FETCH';
+  mysql_reservedwords[71] := 'FLOAT';
+  mysql_reservedwords[72] := 'FLOAT4';
+  mysql_reservedwords[73] := 'FLOAT8';
+  mysql_reservedwords[74] := 'FOR';
+  mysql_reservedwords[75] := 'FORCE';
+  mysql_reservedwords[76] := 'FOREIGN';
+  mysql_reservedwords[77] := 'FROM';
+  mysql_reservedwords[78] := 'FULLTEXT';
+  mysql_reservedwords[79] := 'GRANT';
+  mysql_reservedwords[80] := 'GROUP';
+  mysql_reservedwords[81] := 'HAVING';
+  mysql_reservedwords[82] := 'HIGH_PRIORITY';
+  mysql_reservedwords[83] := 'HOUR_MICROSECOND';
+  mysql_reservedwords[84] := 'HOUR_MINUTE';
+  mysql_reservedwords[85] := 'HOUR_SECOND';
+  mysql_reservedwords[86] := 'IF';
+  mysql_reservedwords[87] := 'IGNORE';
+  mysql_reservedwords[88] := 'IN';
+  mysql_reservedwords[89] := 'INDEX';
+  mysql_reservedwords[90] := 'INFILE';
+  mysql_reservedwords[91] := 'INNER';
+  mysql_reservedwords[92] := 'INOUT';
+  mysql_reservedwords[93] := 'INSENSITIVE';
+  mysql_reservedwords[94] := 'INSERT';
+  mysql_reservedwords[95] := 'INT';
+  mysql_reservedwords[96] := 'INT1';
+  mysql_reservedwords[97] := 'INT2';
+  mysql_reservedwords[98] := 'INT3';
+  mysql_reservedwords[99] := 'INT4';
+  mysql_reservedwords[100] := 'INT8';
+  mysql_reservedwords[101] := 'INTEGER';
+  mysql_reservedwords[102] := 'INTERVAL';
+  mysql_reservedwords[103] := 'INTO';
+  mysql_reservedwords[104] := 'IS';
+  mysql_reservedwords[105] := 'ITERATE';
+  mysql_reservedwords[106] := 'JOIN';
+  mysql_reservedwords[107] := 'KEY';
+  mysql_reservedwords[108] := 'KEYS';
+  mysql_reservedwords[109] := 'KILL';
+  mysql_reservedwords[110] := 'LEADING';
+  mysql_reservedwords[111] := 'LEAVE';
+  mysql_reservedwords[112] := 'LEFT';
+  mysql_reservedwords[113] := 'LIKE';
+  mysql_reservedwords[114] := 'LIMIT';
+  mysql_reservedwords[115] := 'LINES';
+  mysql_reservedwords[116] := 'LOAD';
+  mysql_reservedwords[117] := 'LOCALTIME';
+  mysql_reservedwords[118] := 'LOCALTIMESTAMP';
+  mysql_reservedwords[119] := 'LOCK';
+  mysql_reservedwords[120] := 'LONG';
+  mysql_reservedwords[121] := 'LONGBLOB';
+  mysql_reservedwords[122] := 'LONGTEXT';
+  mysql_reservedwords[123] := 'LOOP';
+  mysql_reservedwords[124] := 'LOW_PRIORITY';
+  mysql_reservedwords[125] := 'MATCH';
+  mysql_reservedwords[126] := 'MEDIUMBLOB';
+  mysql_reservedwords[127] := 'MEDIUMINT';
+  mysql_reservedwords[128] := 'MEDIUMTEXT';
+  mysql_reservedwords[129] := 'MIDDLEINT';
+  mysql_reservedwords[130] := 'MINUTE_MICROSECOND';
+  mysql_reservedwords[131] := 'MINUTE_SECOND';
+  mysql_reservedwords[132] := 'MOD';
+  mysql_reservedwords[133] := 'MODIFIES';
+  mysql_reservedwords[134] := 'NATURAL';
+  mysql_reservedwords[135] := 'NO';
+  mysql_reservedwords[136] := 'NO_WRITE_TO_BINLOG';
+  mysql_reservedwords[137] := 'NOT';
+  mysql_reservedwords[138] := 'NULL';
+  mysql_reservedwords[139] := 'NUMERIC';
+  mysql_reservedwords[140] := 'ON';
+  mysql_reservedwords[141] := 'OPTIMIZE';
+  mysql_reservedwords[142] := 'OPTION';
+  mysql_reservedwords[143] := 'OPTIONALLY';
+  mysql_reservedwords[144] := 'OR';
+  mysql_reservedwords[145] := 'ORDER';
+  mysql_reservedwords[146] := 'OUT';
+  mysql_reservedwords[147] := 'OUTER';
+  mysql_reservedwords[148] := 'OUTFILE';
+  mysql_reservedwords[149] := 'PRECISION';
+  mysql_reservedwords[150] := 'PRIMARY';
+  mysql_reservedwords[151] := 'PROCEDURE';
+  mysql_reservedwords[152] := 'PURGE';
+  mysql_reservedwords[153] := 'RAID0';
+  mysql_reservedwords[154] := 'READ';
+  mysql_reservedwords[155] := 'READS';
+  mysql_reservedwords[156] := 'REAL';
+  mysql_reservedwords[157] := 'REFERENCES';
+  mysql_reservedwords[158] := 'REGEXP';
+  mysql_reservedwords[159] := 'RELEASE';
+  mysql_reservedwords[160] := 'RENAME';
+  mysql_reservedwords[161] := 'REPEAT';
+  mysql_reservedwords[162] := 'REPLACE';
+  mysql_reservedwords[163] := 'REQUIRE';
+  mysql_reservedwords[164] := 'RESTRICT';
+  mysql_reservedwords[165] := 'RETURN';
+  mysql_reservedwords[166] := 'REVOKE';
+  mysql_reservedwords[167] := 'RIGHT';
+  mysql_reservedwords[168] := 'RLIKE';
+  mysql_reservedwords[169] := 'SCHEMA';
+  mysql_reservedwords[170] := 'SCHEMAS';
+  mysql_reservedwords[171] := 'SECOND_MICROSECOND';
+  mysql_reservedwords[172] := 'SELECT';
+  mysql_reservedwords[173] := 'SENSITIVE';
+  mysql_reservedwords[174] := 'SEPARATOR';
+  mysql_reservedwords[175] := 'SET';
+  mysql_reservedwords[176] := 'SHOW';
+  mysql_reservedwords[177] := 'SMALLINT';
+  mysql_reservedwords[178] := 'SONAME';
+  mysql_reservedwords[179] := 'SPATIAL';
+  mysql_reservedwords[180] := 'SPECIFIC';
+  mysql_reservedwords[181] := 'SQL';
+  mysql_reservedwords[182] := 'SQL_BIG_RESULT';
+  mysql_reservedwords[183] := 'SQL_CALC_FOUND_ROWS';
+  mysql_reservedwords[184] := 'SQL_SMALL_RESULT';
+  mysql_reservedwords[185] := 'SQLEXCEPTION';
+  mysql_reservedwords[186] := 'SQLSTATE';
+  mysql_reservedwords[187] := 'SQLWARNING';
+  mysql_reservedwords[188] := 'SSL';
+  mysql_reservedwords[189] := 'STARTING';
+  mysql_reservedwords[190] := 'STRAIGHT_JOIN';
+  mysql_reservedwords[191] := 'TABLE';
+  mysql_reservedwords[192] := 'TERMINATED';
+  mysql_reservedwords[193] := 'TEXT';
+  mysql_reservedwords[194] := 'THEN';
+  mysql_reservedwords[195] := 'TIME';
+  mysql_reservedwords[196] := 'TIMESTAMP';
+  mysql_reservedwords[197] := 'TINYBLOB';
+  mysql_reservedwords[198] := 'TINYINT';
+  mysql_reservedwords[199] := 'TINYTEXT';
+  mysql_reservedwords[200] := 'TO';
+  mysql_reservedwords[201] := 'TRAILING';
+  mysql_reservedwords[202] := 'TRIGGER';
+  mysql_reservedwords[203] := 'TRUE';
+  mysql_reservedwords[204] := 'UNDO';
+  mysql_reservedwords[205] := 'UNION';
+  mysql_reservedwords[206] := 'UNIQUE';
+  mysql_reservedwords[207] := 'UNLOCK';
+  mysql_reservedwords[208] := 'UNSIGNED';
+  mysql_reservedwords[209] := 'UPDATE';
+  mysql_reservedwords[210] := 'USAGE';
+  mysql_reservedwords[211] := 'USE';
+  mysql_reservedwords[212] := 'USING';
+  mysql_reservedwords[213] := 'UTC_DATE';
+  mysql_reservedwords[214] := 'UTC_TIME';
+  mysql_reservedwords[215] := 'UTC_TIMESTAMP';
+  mysql_reservedwords[216] := 'VALUES';
+  mysql_reservedwords[217] := 'VARBINARY';
+  mysql_reservedwords[218] := 'VARCHAR';
+  mysql_reservedwords[219] := 'VARCHARACTER';
+  mysql_reservedwords[220] := 'VARYING';
+  mysql_reservedwords[221] := 'WHEN';
+  mysql_reservedwords[222] := 'WHERE';
+  mysql_reservedwords[223] := 'WHILE';
+  mysql_reservedwords[224] := 'WITH';
+  mysql_reservedwords[225] := 'WRITE';
+  mysql_reservedwords[226] := 'X509';
+  mysql_reservedwords[227] := 'XOR';
+  mysql_reservedwords[228] := 'YEAR_MONTH';
+  mysql_reservedwords[229] := 'ZEROFILL';
+end;
+
+function TDAMySQLConnection.IdentifierNeedsQuoting(
+  const iIdentifier: string): boolean;
+begin
+  Result := inherited IdentifierNeedsQuoting(iIdentifier) or MYSQL_IdentifierNeedsQuoting(iIdentifier);
+end;
+
+function TDAMySQLConnection.useUnicode: Boolean;
+begin
+  Result:=False;
+end;
+
+initialization
+  mysql_InitializeReservedWords;
+finalization
+  mysql_reservedwords := nil;
+end.
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAOracleInterfaces.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAOracleInterfaces.pas
new file mode 100644
index 0000000..6e3ae99
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAOracleInterfaces.pas	
@@ -0,0 +1,594 @@
+unit uDAOracleInterfaces;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  uROClasses,
+  uDAInterfaces, uDAEngine;
+
+type
+  { IDAOracleConnection
+      For identification purposes Implemented by all Oracle connections }
+  IDAOracleConnection = interface(IDAConnection)
+    ['{C7C88680-12BF-402A-8843-80016429BAC1}']
+  end;
+  IOracleConnection = IDAOracleConnection;
+
+  TDAOracleLockMode = (olmNone, olmLockImmediate, olmLockDelayed);
+
+  TDAOracleOption = (opAutoClose,
+    opDefaultValues,
+    opLongStrings,
+    opQueryRecCount,
+    opCacheLobs,
+    opDeferredLobRead,
+    opKeepPrepared);
+  TDAOracleOptions = set of TDAOracleOption;
+
+  { IOracleDataset
+       Provides access to features of ODAC mostly which might or might not be mappable
+       to other drivers for Oracle. }
+  IDAOracleDataset = interface
+    ['{D555E209-0ED7-40D4-B97B-7C2044453E70}']
+    function GetLockMode: TDAOracleLockMode;
+    procedure SetLockMode(Value: TDAOracleLockMode);
+
+    function GetOptions: TDAOracleOptions;
+    procedure SetOptions(Value: TDAOracleOptions);
+
+    property LockMode: TDAOracleLockMode read GetLockMode write SetLockMode;
+    property Options: TDAOracleOptions read GetOptions write SetOptions;
+  end;
+  IOracleDataset = IDAOracleDataset;
+
+  TDAOracleDriver = class(TDAEDriver)
+  protected
+    function GetDefaultConnectionType(const AuxDriver: string): string; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  end;
+
+  TDAOracleConnection = class(TDAEConnection, IDAOracleConnection, IDAUseGenerators)
+  protected
+    function CreateCompatibleQuery: IDADataset; virtual;
+    function IdentifierNeedsQuoting(const iIdentifier: string): boolean; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    function GetQuoteChars: TDAQuoteCharArray; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure DoGetForeignKeys(out ForeignKeys: TDADriverForeignKeyCollection); override;
+    function GetSPSelectSyntax(HasArguments: Boolean): String; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    procedure DoGetTableNames(out List: IROStrings); override;
+    procedure DoGetViewNames(out List: IROStrings); override;
+    procedure DoGetStoredProcedureNames(out List: IROStrings); override;
+    procedure DoGetTableFields(const aTableName: string; out Fields: TDAFieldCollection); override;
+    function DoGetLastAutoInc(const GeneratorName: string): integer; override;
+    function CreateMacroProcessor: TDASQLMacroProcessor; override;
+    procedure DoGetStoredProcedureParams(const aStoredProcedureName: string; out Params: TDAParamCollection); override;
+    // IDAUseGenerators
+    function GetNextAutoinc(const GeneratorName: string): integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  public
+  end;
+
+function Oracle_CreateMacroProcessor: TDASQLMacroProcessor;
+function Oracle_GetSPSelectSyntax(HasArguments: Boolean): String;
+function Oracle_DoGetLastAutoInc(const GeneratorName: string;Query: IDADataset): integer;
+function Oracle_GetNextAutoinc(const GeneratorName: string;Query: IDADataset): integer;
+procedure Oracle_DoGetNames(Query: IDADataset; AList: IROStrings; AObjectType: TDAObjecttype);
+procedure Oracle_DoGetTableFields(const aTableName: string; Query: IDADataset; out Fields: TDAFieldCollection);
+Procedure Oracle_DoGetForeignKeys(Query: IDADataset;ForeignKeys: TDADriverForeignKeyCollection);
+function Oracle_IdentifierNeedsQuoting(const iIdentifier: string): boolean;
+function Oracle_GetQuoteChars: TDAQuoteCharArray;
+procedure Oracle_DoGetStoredProcedureParams(const aStoredProcedureName: string; Query: IDADataset; out Params: TDAParamCollection);
+
+const
+  Oracle_DriverType = 'Oracle';
+
+implementation
+uses
+  uDAMacroProcessors, SysUtils;
+
+var
+  Oracle_reservedwords: array of string;
+
+function Oracle_CreateMacroProcessor: TDASQLMacroProcessor;
+begin
+  Result := TDAOracleMacroProcessor.Create;
+end;
+
+function Oracle_GetSPSelectSyntax(HasArguments: Boolean): String;
+begin
+  if HasArguments then
+    Result := 'CALL {0}({1})'
+  else
+    Result := 'CALL {0}';
+end;
+
+function Oracle_DoGetLastAutoInc(const GeneratorName: string;Query: IDADataset): integer;
+begin
+  try
+    Query.SQL := 'SELECT ' + GeneratorName + '.Currval FROM dual';
+    Query.Open;
+    result := Query.Fields[0].Value;
+  finally
+    Query := nil;
+  end;
+end;
+
+function Oracle_GetNextAutoinc(const GeneratorName: string;Query: IDADataset): integer;
+begin
+  try
+    Query.SQL := 'SELECT ' + GeneratorName + '.Nextval FROM dual';
+    Query.Open;
+    result := Query.Fields[0].Value;
+  finally
+    Query := nil;
+  end;
+end;
+
+procedure Oracle_DoGetNames(Query: IDADataset; AList: IROStrings; AObjectType: TDAObjecttype);
+const
+  sql = 'SELECT OBJECT_NAME FROM USER_OBJECTS WHERE OBJECT_TYPE = ''%s''';
+
+  procedure _ExecSQL(aObject: string);
+  begin
+    Query.Close;
+    Query.SQL := Format(sql,[aObject]);
+    Query.Open;
+    while not Query.EOF do begin
+      AList.Add(Trim(Query.Fields[0].AsString));
+      Query.Next;
+    end;
+    Query.Close;
+  end;
+
+begin
+  AList.Clear;
+  try
+    case AObjectType of
+      dotTable: _ExecSQL('TABLE');
+      dotView:  _ExecSQL('VIEW');
+      dotProcedure: begin
+        _ExecSQL('PROCEDURE');
+        _ExecSQL('FUNCTION');
+      end;
+    else
+    end;
+  finally
+    Query := nil;
+  end;
+  AList.Sorted:=True;
+  AList.Sorted:=False;
+end;
+
+function OracleTypeToDADataType(const aTypeName: string; const aDataPrecision,aDataScale: integer):TDADataType;
+begin
+  if (aTypeName = 'VARCHAR2') or (aTypeName = 'VARCHAR') or (aTypeName = 'CHAR') then Result := datString
+  else if (aTypeName = 'NVARCHAR2') or (aTypeName = 'NCHAR') OR (aTypeName = 'NCHAR VARYING') then Result := datWideString
+  else if aTypeName = 'FLOAT' then Result := datFloat
+  else if aTypeName = 'NUMBER' then begin
+    if aDataScale <= 0 then begin
+      case aDataPrecision of
+        0: Result := datFloat;
+        1,2: Result := datShortInt;
+        3,4: Result := datSmallInt;
+        5..9: Result := datInteger;
+      else
+        Result := datLargeInt;
+      end;
+    end
+    else Result:= datDecimal;
+  end
+  else if (aTypeName = 'RAW') or (aTypeName = 'LONG RAW') OR
+          (aTypeName = 'BLOB') OR (aTypeName = 'LOB') OR
+          (aTypeName = 'BFILE') OR (aTypeName = 'CFILE') then Result:= datBlob
+  else if (aTypeName = 'DATE') OR
+          (aTypeName = 'TIME') OR (aTypeName = 'TIME WITH TIME ZONE') OR
+          (aTypeName = 'TIMESTAMP') OR (aTypeName = 'TIMESTAMP WITH TIME ZONE') OR (aTypeName = 'TIMESTAMP WITH LOCAL TIME ZONE') then Result:= datDateTime
+ { else if aTypeName = 'YEAR' then Result:= datSmallInt
+  else if (aTypeName = 'MONTH') or (aTypeName = 'DAY') or (aTypeName = 'HOUR') or (aTypeName = 'MINUTE') or (aTypeName = 'TIMEZONE_MINUTE') then Result:= datByte
+  else if (aTypeName = 'SECOND') then Result:= datFloat
+  else if (aTypeName = 'TIMEZONE_HOUR') then Result:= datShortInt }
+  else if (aTypeName = 'LONG') or (aTypeName = 'CLOB') then Result:= datMemo
+  else if (aTypeName = 'NCLOB') then Result:= datWideMemo
+  else if (aTypeName = 'ROWID') or (aTypeName = 'UROWID') then Result:= datString
+  else if (aTypeName = 'BINARY_INTEGER') OR (aTypeName = 'NATIVE INTEGER') then Result := datInteger
+//else if (aTypeName = 'REF CURSOR') then Result:= ???
+//else if (aTypeName = 'MLSLABEL') then Result:= ???
+//else if (aTypeName = 'REF') then Result:= ???
+//else if (aTypeName = 'OBJECT') then Result:= ???
+//else if (aTypeName = 'TABLE') then Result:= ???
+//else if (aTypeName = 'VARRAY') then Result:= ???
+//else if (aTypeName = 'INTERVAL YEAR TO MONTH') then Result:= ???
+//else if (aTypeName = 'INTERVAL DAY TO SECOND') then Result:= ???
+//else if (aTypeName = 'PL/SQL RECORD') then Result:= ???
+//else if (aTypeName = 'PL/SQL TABLE') then Result:= ???
+  else if aTypeName = 'PL/SQL BOOLEAN' then Result := datBoolean
+  else Result:= datUnknown;
+end;
+
+procedure Oracle_DoGetStoredProcedureParams(const aStoredProcedureName: string; Query: IDADataset; out Params: TDAParamCollection);
+const
+  sSPP_SQL = 'SELECT ARGUMENT_NAME, DATA_TYPE, IN_OUT, DATA_LENGTH, DATA_PRECISION, DATA_SCALE, PLS_TYPE '+
+          'FROM USER_ARGUMENTS '+
+          'WHERE ((IN_OUT = ''IN'' AND ARGUMENT_NAME IS NOT NULL) OR IN_OUT = ''OUT'' OR IN_OUT = ''IN/OUT'') AND OBJECT_NAME = ''%S'' '+
+          'ORDER BY POSITION';
+begin
+  Params := TDAParamCollection.Create(nil);
+  try
+    Query.SQL := Format(sSPP_SQL,[aStoredProcedureName]);
+    Query.Open;
+    while not Query.EOF do begin
+      With Params.Add do begin
+        Name := Query.Fields[0].AsString;
+        if Query.Fields[2].AsString = 'IN' then
+          ParamType := daptInput
+        else if Query.Fields[2].AsString = 'IN/OUT'
+          then ParamType := daptInputOutput
+        else if Query.Fields[2].AsString = 'OUT' then begin
+          if Name = '' then begin
+            Name:= 'RESULT';
+            ParamType := daptResult;
+          end
+          else begin
+            ParamType := daptInputOutput;
+          end;
+        end
+        else
+          ParamType := daptUnknown;
+        DataType := OracleTypeToDADataType(Query.Fields[1].AsString, Query.Fields[4].AsInteger, Query.Fields[5].AsInteger);
+        Size := Query.Fields[3].AsInteger;
+
+        if DataType = datDecimal then begin
+          DecimalPrecision := Query.Fields[4].AsInteger;
+          DecimalScale := Query.Fields[5].AsInteger;
+          if DecimalScale < 0 then DecimalScale := 0;
+        end;
+      end;
+      Query.Next;
+    end;
+  finally
+    Query := nil;
+  end;
+end;
+
+
+procedure Oracle_DoGetTableFields(const aTableName: string; Query: IDADataset; out Fields: TDAFieldCollection);
+const                                                                                          // CHARACTER_SET_NAME, CHAR_LENGTH
+  SQL_TABLEINFO ='SELECT C.COLUMN_NAME, C.DATA_TYPE, C.DATA_LENGTH, C.DATA_PRECISION, C.DATA_SCALE, C.NULLABLE, C.DATA_LENGTH, CC.COMMENTS '+
+                 'FROM USER_TAB_COLUMNS C LEFT OUTER JOIN USER_COL_COMMENTS CC on (CC.TABLE_NAME = C.TABLE_NAME AND CC.COLUMN_NAME = C.COLUMN_NAME) '+
+                 'WHERE (C.TABLE_NAME=''%s'')';
+  SQL_PRIMARYKEY = 'SELECT ACC.COLUMN_NAME, ACC.POSITION FROM USER_CONSTRAINTS AC, USER_CONS_COLUMNS ACC '+
+                   'WHERE (AC.TABLE_NAME=''%s'') AND (ACC.TABLE_NAME = AC.TABLE_NAME) AND '+
+                   '(AC.CONSTRAINT_NAME = ACC.CONSTRAINT_NAME) AND AC.CONSTRAINT_TYPE = ''P''';
+var
+  fld: TDAField;
+  ltable: string;
+  ldt: TDADataType;
+begin
+  Fields := TDAFieldCollection.Create(nil);
+  try
+    ltable :=  aTableName;
+    ltable:= AnsiDequotedStr(ltable,'"');
+    Query.Close;
+    Query.SQL:= Format(SQL_TABLEINFO, [ltable]);
+    Query.Open;
+    While not Query.Eof do begin
+      fld := Fields.Add;
+      fld.Name:=Query.Fields[0].AsString;
+      ldt:=OracleTypeToDADataType(Query.Fields[1].AsString,Query.Fields[3].AsInteger,Query.Fields[4].AsInteger);
+      fld.DataType:=ldt;
+      If ldt = datDecimal then begin
+        fld.DecimalPrecision :=Query.Fields[3].AsInteger;
+        fld.DecimalScale :=Query.Fields[4].AsInteger;
+        if fld.DecimalScale < 0 then fld.DecimalScale := 0;
+      end;
+      fld.Required := Query.Fields[5].AsString = 'N';
+      if ldt in [datString, datWideString] then begin
+        if (Query.Fields[1].AsString = 'ROWID') or (Query.Fields[1].AsString = 'UROWID') then
+          fld.Size := 18
+        else
+          fld.Size := Query.Fields[6].AsInteger;
+      end;
+      fld.Description := Query.Fields[7].AsString;
+      Query.Next;
+    end;
+
+    // pk
+    Query.Close;
+    Query.SQL:= Format(SQL_PRIMARYKEY,[aTableName]);
+    Query.Open;
+    While not Query.Eof do begin
+      fld := Fields.FindField(Trim(Query.Fields[0].AsString));
+      if Fld <> nil then fld.InPrimaryKey := True;
+      Query.Next;
+    end;
+  finally
+    Query := nil;
+  end;
+end;
+
+Procedure Oracle_DoGetForeignKeys(Query: IDADataset;ForeignKeys: TDADriverForeignKeyCollection);
+var
+  lCurrConstraint: string;
+  lCurrFK: TDADriverForeignKey;
+const
+  sFK_SQL = 'SELECT AC.CONSTRAINT_NAME, AC_PK.TABLE_NAME, AC_FK.TABLE_NAME, AC_PK.COLUMN_NAME, AC_FK.COLUMN_NAME, '+
+            'AC_FK.POSITION FROM USER_CONSTRAINTS AC, USER_CONS_COLUMNS AC_PK, USER_CONS_COLUMNS AC_FK WHERE (AC.CONSTRAINT_TYPE = ''R'') AND '+
+            '((AC.CONSTRAINT_NAME = AC_PK.CONSTRAINT_NAME) ) AND ((AC.R_CONSTRAINT_NAME = AC_FK.CONSTRAINT_NAME) '+
+            ') AND (AC_FK.POSITION = AC_PK.POSITION) ORDER BY 1,2,3,6';
+begin
+  lCurrConstraint := '';
+  lCurrFK := nil;
+  try
+    Query.SQL := sFK_SQL;
+    Query.Open;
+
+    ForeignKeys.Clear;
+    while (not Query.EOF) do begin
+
+      if lCurrConstraint <> Query.Fields[0].AsString then begin
+        lCurrConstraint := Query.Fields[0].AsString;
+        lCurrFK := ForeignKeys.Add();
+        with lCurrFK do begin
+          PKTable := TrimRight(Query.Fields[1].AsString);
+          FKTable := TrimRight(Query.Fields[2].AsString);
+          PKField := TrimRight(Query.Fields[3].AsString);
+          FKField := TrimRight(Query.Fields[4].AsString);
+        end;
+      end else begin
+        with lCurrFK do begin
+          PKField := PKField + ';' + TrimRight(Query.Fields[3].AsString);
+          FKField := FKField + ';' + TrimRight(Query.Fields[4].AsString);
+        end;
+      end;
+      Query.Next;
+    end;
+  finally
+    Query := nil;
+  end;
+end;
+
+function Oracle_IdentifierIsQuoted(const iIdentifier: string): boolean;
+var
+  lQuoteChars: TDAQuoteCharArray;
+  lLength:integer;
+begin
+  lQuoteChars := Oracle_GetQuoteChars;
+  lLength := Length(iIdentifier);
+  result := (lLength > 2) and (iIdentifier[1] = lQuoteChars[0]) and (iIdentifier[lLength] = lQuoteChars[1]);
+end;
+
+function Oracle_IdentifierNeedsQuoting(const iIdentifier: string): boolean;
+begin
+  result := false;
+  if Oracle_IdentifierIsQuoted(iIdentifier) then Exit;
+  Result:=
+     ((UpperCase(iIdentifier) <> iIdentifier) and
+      (LowerCase(iIdentifier) <> iIdentifier)) or
+     (pos('_', iIdentifier) = 1);
+
+  Result := Result or TestIdentifier(iIdentifier,Oracle_reservedwords);
+end;
+
+function Oracle_GetQuoteChars: TDAQuoteCharArray;
+begin
+  Result[0] := '"';
+  Result[1] := '"';
+end;
+
+procedure Oracle_InitializeReservedWords;
+begin
+  SetLength(Oracle_reservedwords, 109);
+  // sorted with TStringList.Sort (bds2007)
+  Oracle_reservedwords[0] := 'ACCESS';
+  Oracle_reservedwords[1] := 'ADD';
+  Oracle_reservedwords[2] := 'ALL';
+  Oracle_reservedwords[3] := 'ALTER';
+  Oracle_reservedwords[4] := 'AND';
+  Oracle_reservedwords[5] := 'ANY';
+  Oracle_reservedwords[6] := 'AS';
+  Oracle_reservedwords[7] := 'ASC';
+  Oracle_reservedwords[8] := 'AUDIT';
+  Oracle_reservedwords[9] := 'BETWEEN';
+  Oracle_reservedwords[10] := 'BY';
+  Oracle_reservedwords[11] := 'CHAR';
+  Oracle_reservedwords[12] := 'CHECK';
+  Oracle_reservedwords[13] := 'CLUSTER';
+  Oracle_reservedwords[14] := 'COLUMN';
+  Oracle_reservedwords[15] := 'COMMENT';
+  Oracle_reservedwords[16] := 'COMPRESS';
+  Oracle_reservedwords[17] := 'CONNECT';
+  Oracle_reservedwords[18] := 'CREATE';
+  Oracle_reservedwords[19] := 'CURRENT';
+  Oracle_reservedwords[20] := 'DATE';
+  Oracle_reservedwords[21] := 'DECIMAL';
+  Oracle_reservedwords[22] := 'DEFAULT';
+  Oracle_reservedwords[23] := 'DELETE';
+  Oracle_reservedwords[24] := 'DESC';
+  Oracle_reservedwords[25] := 'DISTINCT';
+  Oracle_reservedwords[26] := 'DROP';
+  Oracle_reservedwords[27] := 'ELSE';
+  Oracle_reservedwords[28] := 'EXCLUSIVE';
+  Oracle_reservedwords[29] := 'EXISTS';
+  Oracle_reservedwords[30] := 'FILE';
+  Oracle_reservedwords[31] := 'FLOAT';
+  Oracle_reservedwords[32] := 'FOR';
+  Oracle_reservedwords[33] := 'FROM';
+  Oracle_reservedwords[34] := 'GRANT';
+  Oracle_reservedwords[35] := 'GROUP';
+  Oracle_reservedwords[36] := 'HAVING';
+  Oracle_reservedwords[37] := 'IDENTIFIED';
+  Oracle_reservedwords[38] := 'IMMEDIATE';
+  Oracle_reservedwords[39] := 'IN';
+  Oracle_reservedwords[40] := 'INCREMENT';
+  Oracle_reservedwords[41] := 'INDEX';
+  Oracle_reservedwords[42] := 'INITIAL';
+  Oracle_reservedwords[43] := 'INSERT';
+  Oracle_reservedwords[44] := 'INTEGER';
+  Oracle_reservedwords[45] := 'INTERSECT';
+  Oracle_reservedwords[46] := 'INTO';
+  Oracle_reservedwords[47] := 'IS';
+  Oracle_reservedwords[48] := 'LEVEL';
+  Oracle_reservedwords[49] := 'LIKE';
+  Oracle_reservedwords[50] := 'LOCK';
+  Oracle_reservedwords[51] := 'LONG';
+  Oracle_reservedwords[52] := 'MAXEXTENTS';
+  Oracle_reservedwords[53] := 'MINUS';
+  Oracle_reservedwords[54] := 'MLSLABEL';
+  Oracle_reservedwords[55] := 'MODE';
+  Oracle_reservedwords[56] := 'MODIFY';
+  Oracle_reservedwords[57] := 'NOAUDIT';
+  Oracle_reservedwords[58] := 'NOCOMPRESS';
+  Oracle_reservedwords[59] := 'NOT';
+  Oracle_reservedwords[60] := 'NOWAIT';
+  Oracle_reservedwords[61] := 'NULL';
+  Oracle_reservedwords[62] := 'NUMBER';
+  Oracle_reservedwords[63] := 'OF';
+  Oracle_reservedwords[64] := 'OFFLINE';
+  Oracle_reservedwords[65] := 'ON';
+  Oracle_reservedwords[66] := 'ONLINE';
+  Oracle_reservedwords[67] := 'OPTION';
+  Oracle_reservedwords[68] := 'OR';
+  Oracle_reservedwords[69] := 'ORDER';
+  Oracle_reservedwords[70] := 'PCTFREE';
+  Oracle_reservedwords[71] := 'PRIOR';
+  Oracle_reservedwords[72] := 'PRIVILEGES';
+  Oracle_reservedwords[73] := 'PUBLIC';
+  Oracle_reservedwords[74] := 'RAW';
+  Oracle_reservedwords[75] := 'RENAME';
+  Oracle_reservedwords[76] := 'RESOURCE';
+  Oracle_reservedwords[77] := 'REVOKE';
+  Oracle_reservedwords[78] := 'ROW';
+  Oracle_reservedwords[79] := 'ROWID';
+  Oracle_reservedwords[80] := 'ROWNUM';
+  Oracle_reservedwords[81] := 'ROWS';
+  Oracle_reservedwords[82] := 'SELECT';
+  Oracle_reservedwords[83] := 'SESSION';
+  Oracle_reservedwords[84] := 'SET';
+  Oracle_reservedwords[85] := 'SHARE';
+  Oracle_reservedwords[86] := 'SIZE';
+  Oracle_reservedwords[87] := 'SMALLINT';
+  Oracle_reservedwords[88] := 'START';
+  Oracle_reservedwords[89] := 'SUCCESSFUL';
+  Oracle_reservedwords[90] := 'SYNONYM';
+  Oracle_reservedwords[91] := 'SYSDATE';
+  Oracle_reservedwords[92] := 'TABLE';
+  Oracle_reservedwords[93] := 'THEN';
+  Oracle_reservedwords[94] := 'TO';
+  Oracle_reservedwords[95] := 'TRIGGER';
+  Oracle_reservedwords[96] := 'UID';
+  Oracle_reservedwords[97] := 'UNION';
+  Oracle_reservedwords[98] := 'UNIQUE';
+  Oracle_reservedwords[99] := 'UPDATE';
+  Oracle_reservedwords[100] := 'USER';
+  Oracle_reservedwords[101] := 'VALIDATE';
+  Oracle_reservedwords[102] := 'VALUES';
+  Oracle_reservedwords[103] := 'VARCHAR';
+  Oracle_reservedwords[104] := 'VARCHAR2';
+  Oracle_reservedwords[105] := 'VIEW';
+  Oracle_reservedwords[106] := 'WHENEVER';
+  Oracle_reservedwords[107] := 'WHERE';
+  Oracle_reservedwords[108] := 'WITH';
+end;
+{ TDAOracleDriver }
+
+function TDAOracleDriver.GetDefaultConnectionType(
+  const AuxDriver: string): string;
+begin
+  Result := Oracle_DriverType;
+end;
+
+{ TDAOracleConnection }
+
+function TDAOracleConnection.CreateCompatibleQuery: IDADataset;
+begin
+  Result := GetDatasetClass.Create(Self);
+end;
+
+function TDAOracleConnection.CreateMacroProcessor: TDASQLMacroProcessor;
+begin
+  result := Oracle_CreateMacroProcessor;
+end;
+
+procedure TDAOracleConnection.DoGetForeignKeys(
+  out ForeignKeys: TDADriverForeignKeyCollection);
+begin
+  inherited DoGetForeignKeys(ForeignKeys);
+  Oracle_DoGetForeignKeys(CreateCompatibleQuery, ForeignKeys);
+end;
+
+function TDAOracleConnection.DoGetLastAutoInc(
+  const GeneratorName: string): integer;
+begin
+  Result := Oracle_DoGetLastAutoInc(GeneratorName,CreateCompatibleQuery);
+end;
+
+procedure TDAOracleConnection.DoGetStoredProcedureNames(
+  out List: IROStrings);
+begin
+  inherited DoGetStoredProcedureNames(List);
+  Oracle_DoGetNames(CreateCompatibleQuery, List, dotProcedure);
+end;
+
+procedure TDAOracleConnection.DoGetStoredProcedureParams(
+  const aStoredProcedureName: string; out Params: TDAParamCollection);
+begin
+  Oracle_DoGetStoredProcedureParams(aStoredProcedureName,CreateCompatibleQuery,Params);
+end;
+
+procedure TDAOracleConnection.DoGetTableFields(const aTableName: string;
+  out Fields: TDAFieldCollection);
+begin
+  Oracle_DoGetTableFields(QuoteIdentifierIfNeeded(aTableName), CreateCompatibleQuery, Fields);
+end;
+
+procedure TDAOracleConnection.DoGetTableNames(out List: IROStrings);
+begin
+  inherited DoGetTableNames(List);
+  Oracle_DoGetNames(CreateCompatibleQuery, List, dotTable);
+end;
+
+procedure TDAOracleConnection.DoGetViewNames(out List: IROStrings);
+begin
+  inherited DoGetViewNames(List);
+  Oracle_DoGetNames(CreateCompatibleQuery, List, dotView);
+end;
+
+function TDAOracleConnection.GetNextAutoinc(
+  const GeneratorName: string): integer;
+begin
+  Result := Oracle_GetNextAutoinc(GeneratorName, CreateCompatibleQuery);
+end;
+
+function TDAOracleConnection.GetQuoteChars: TDAQuoteCharArray;
+begin
+  Result := Oracle_GetQuoteChars;
+end;
+
+function TDAOracleConnection.GetSPSelectSyntax(
+  HasArguments: Boolean): String;
+begin
+  Result:= Oracle_GetSPSelectSyntax(HasArguments);
+end;
+
+function TDAOracleConnection.IdentifierNeedsQuoting(
+  const iIdentifier: string): boolean;
+begin
+  Result:= inherited IdentifierNeedsQuoting(iIdentifier) or Oracle_IdentifierNeedsQuoting(iIdentifier);
+end;
+
+initialization
+  Oracle_InitializeReservedWords;
+finalization
+  Oracle_reservedwords:=nil;
+end.
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAPSScriptingProvider.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAPSScriptingProvider.pas
new file mode 100644
index 0000000..0d8eda2
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAPSScriptingProvider.pas	
@@ -0,0 +1,210 @@
+unit uDAPSScriptingProvider;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  Classes,
+  uDAScriptingProvider, uDAInterfaces, uDABusinessProcessor, uDADataTable,
+  uPSComponent, uDAPascalScript,
+  uPSComponent_DB, uPSComponent_Default,uPSUtils;
+
+type
+  TDAPSScriptingProvider = class;
+  TDAPSScript = class(TPSScript)
+  private
+    fProvider: TDAPSScriptingProvider;
+  protected
+    function  DoOnGetNotificationVariant (const Name: tbtstring): Variant; override;
+    procedure DoOnSetNotificationVariant (const Name: tbtstring; V: Variant); override;
+    procedure DoOnCompile; override;
+  end;
+  TDAPSScriptingProvider = class(TDAScriptingProvider, IDADataTableScriptingProvider, IDABusinessProcessorScriptingProvider)
+  private
+    fDataTablePlugin: TDAPSDataTableRulesPlugin;
+    fBusinessProcessor: TDABusinessProcessor;
+    fDataTable: TDADataTable;
+    fScript: TPSScript;
+    fPluginClasses: TPSImport_Classes;
+    fPluginDB: TPSImport_DB;
+    fPluginDateUtils: TPSImport_DateUtils;
+
+    procedure RunDataTableScript(aDataTable: TDADataTable; const aScript: string; const aMethod: string; aLanguage:TROSEScriptLanguage);
+    procedure RunBusinessProcessorScript(aBusinessProcessor: TDABusinessProcessor; const aScript: string; const aMethod: string; aLanguage:TROSEScriptLanguage);
+
+    procedure OnCompile(Sender: TPSScript);
+    function OnGetNotificationVariant(Sender: TPSScript; const Name: tbtstring): Variant;
+    procedure OnSetNotificationVariant(Sender: TPSScript; const Name: tbtstring; V: Variant);
+
+    //procedure OnVerifyProc(Sender: TPSScript; Proc: TPSInternalProcedure; const Decl: string; var Error: Boolean);
+
+  public
+    constructor Create(AOwner: TComponent); override;
+    destructor Destroy; override;
+
+    procedure PrepareForDataTable(aDataTable: TDADataTable);
+    procedure PrepareForBusinessProcessor(aBusinessProcessor: TDABusinessProcessor);
+
+  published
+    property ScriptEngine: TPSScript read fScript;
+    property PluginClasses: TPSImport_Classes read fPluginClasses;
+    property PluginDB: TPSImport_DB read fPluginDB;
+    property PluginDateUtils: TPSImport_DateUtils read fPluginDateUtils;
+  end;
+
+implementation
+
+uses
+  SysUtils, uROClasses;
+
+{ TDADataTableScripter }
+
+constructor TDAPSScriptingProvider.Create(AOwner: TComponent);
+begin
+  inherited;
+  fScript := TDAPSScript.Create(self);
+  TDAPSScript(fScript).fProvider := Self;
+  fScript.Name := 'ScriptEngine';
+  fScript.SetSubComponent(true);
+  //fScript.OnVerifyProc := OnVerifyProc;
+  fScript.CompilerOptions := [icAllowNoBegin, icAllowNoEnd, icBooleanShortCircuit];
+  fPluginClasses := TPSImport_Classes.Create(self);
+  fPluginClasses.Name := 'PluginClasses';
+  fPluginDB := TPSImport_DB.Create(self);
+  fPluginDB.Name := 'PluginDB';
+  fPluginDateUtils := TPSImport_DateUtils.Create(self);
+  fPluginDateUtils.Name := 'PluginDateUtils';
+  (fScript.Plugins.Add() as TPSPluginItem).Plugin := fPluginClasses;
+  (fScript.Plugins.Add() as TPSPluginItem).Plugin := fPluginDB;
+  (fScript.Plugins.Add() as TPSPluginItem).Plugin := fPluginDateUtils;
+end;
+
+destructor TDAPSScriptingProvider.Destroy;
+begin
+  FreeAndNil(fScript);
+  inherited;
+end;
+
+procedure TDAPSScriptingProvider.OnCompile(Sender: TPSScript);
+var
+  i: Integer;
+begin
+  if Assigned(fDataTable) then begin
+    for i := 0 to fDataTable.Fields.Count-1 do begin
+      fScript.AddRegisteredVariable({$IFDEF UNICODE}WideStringToAnsiString{$ENDIF}(fDataTable.Fields[i].Name), '!NOTIFICATIONVARIANT');
+    end; { for }
+  end;
+
+  if Assigned(fBusinessProcessor) then begin
+    //ToDo:
+  end;
+end;
+
+{procedure TDAPSScriptingProvider.OnVerifyProc(Sender: TPSScript; Proc: TPSInternalProcedure; const Decl: string; var Error: Boolean);
+begin
+  if Proc.Decl.ParamCount = 0 then
+    Proc.aExport := etExportDecl;
+end;}
+
+function TDAPSScriptingProvider.OnGetNotificationVariant(Sender: TPSScript; const Name: tbtstring): Variant;
+begin
+  result := fDataTable.Fields.FieldByName({$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(Name)).Value;
+end;
+
+procedure TDAPSScriptingProvider.OnSetNotificationVariant(Sender: TPSScript; const Name: tbtstring; V: Variant);
+begin
+  fDataTable.Fields.FieldByName({$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(Name)).Value := V;
+end;
+
+procedure TDAPSScriptingProvider.PrepareForBusinessProcessor(aBusinessProcessor: TDABusinessProcessor);
+begin
+
+end;
+
+procedure TDAPSScriptingProvider.PrepareForDataTable(aDataTable: TDADataTable);
+begin
+  fDataTable := aDataTable;
+  fBusinessProcessor := nil;
+  fScript.Defines.Text := 'DATA_ABSTRACT_SCRIPT'#13#10'DATA_ABSTRACT_SCRIPT_CLIENT';
+  if not assigned(fDataTablePlugin) then begin
+    fDataTablePlugin := TDAPSDataTableRulesPlugin.Create(self);
+    fDataTablePlugin.DataTable := aDataTable;
+    (fScript.Plugins.Add() as TPSPluginItem).Plugin := fDataTablePlugin;
+  end;
+end;
+
+
+procedure TDAPSScriptingProvider.RunBusinessProcessorScript(
+  aBusinessProcessor: TDABusinessProcessor; const aScript, aMethod: string;
+  aLanguage: TROSEScriptLanguage);
+begin
+  fDataTable := nil;
+  FreeAndNil(fDataTablePlugin);
+  fBusinessProcessor := aBusinessProcessor;
+  fScript.Defines.Text := 'DATA_ABSTRACT_SCRIPT'#13#10'DATA_ABSTRACT_SCRIPT_SERVER';
+  //(fScript.Plugins.Add() as TPSPluginItem).Plugin := TDAPSDataTableRulesPlugin.Create(self);
+end;
+
+type
+  TScriptMethod = procedure of object;
+
+procedure TDAPSScriptingProvider.RunDataTableScript(aDataTable: TDADataTable; const aScript: string; const aMethod: string; aLanguage: TROSEScriptLanguage);
+var
+  lMessages: tbtstring;
+  i: Integer;
+  lMethod: TScriptMethod;
+begin
+  if fDataTable <> aDataTable then begin
+    PrepareForDataTable(aDataTable);
+  end;
+  if aScript <> fScript.Script.Text then begin
+    fScript.Script.Text := aScript;
+    if not fScript.Compile then begin
+      lMessages := '';
+      for i := 0 to fScript.CompilerMessageCount-1 do begin
+        lMessages := lMessages+#13#10+fScript.CompilerMessages[i].MessageToString;
+      end; { for }
+      RaiseError('There were errors compiling the business rule script for %s.'#13'%s',[aDataTable.Name,lMessages], EDAScriptCompileError);
+    end;
+  end;
+
+  fDataTablePlugin.DataTable := aDataTable;
+  lMethod := TScriptMethod(fScript.GetProcMethod({$IFDEF UNICODE}WideStringToAnsiString{$ENDIF}(aMethod)));
+  if assigned(@lMethod) then
+    lMethod();
+end;
+
+{ TDAPSScript }
+
+procedure TDAPSScript.DoOnCompile;
+begin
+  inherited;
+  fProvider.OnCompile(Self);
+end;
+
+function TDAPSScript.DoOnGetNotificationVariant(
+  const Name: tbtstring): Variant;
+begin
+  Result := fProvider.OnGetNotificationVariant(Self, Name);
+end;
+
+procedure TDAPSScript.DoOnSetNotificationVariant(const Name: tbtstring;
+  V: Variant);
+begin
+  fProvider.OnSetNotificationVariant(Self, Name, V);
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAPascalScript.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAPascalScript.pas
new file mode 100644
index 0000000..bfe8374
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAPascalScript.pas	
@@ -0,0 +1,1206 @@
+unit uDAPascalScript;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  SysUtils, Classes, uPSComponent, uPSCompiler, uPSRuntime, uDADataTable,
+  uDAInterfaces, db, uPSUtils;
+
+type
+  TDAPSDataTableRulesPlugin = class;
+  TDAPSDataTableRules = class(TDADataTableRules)
+  private
+    FSE: TPSScript;
+    procedure SetSE(const Value: TPSScript);
+  protected
+    procedure BeforeOpen(Sender: TDADataTable); override;
+    procedure AfterOpen(Sender: TDADataTable); override;
+    procedure BeforeClose(Sender: TDADataTable); override;
+    procedure AfterClose(Sender: TDADataTable); override;
+    procedure BeforeInsert(Sender: TDADataTable); override;
+    procedure AfterInsert(Sender: TDADataTable); override;
+    procedure BeforeEdit(Sender: TDADataTable); override;
+    procedure AfterEdit(Sender: TDADataTable); override;
+    procedure BeforePost(Sender: TDADataTable); override;
+    procedure AfterPost(Sender: TDADataTable); override;
+    procedure BeforeCancel(Sender: TDADataTable); override;
+    procedure AfterCancel(Sender: TDADataTable); override;
+    procedure BeforeDelete(Sender: TDADataTable); override;
+    procedure AfterDelete(Sender: TDADataTable); override;
+    procedure BeforeScroll(Sender: TDADataTable); override;
+    procedure AfterScroll(Sender: TDADataTable); override;
+    procedure BeforeRefresh(Sender: TDADataTable); override;
+    procedure AfterRefresh(Sender: TDADataTable); override;
+    procedure OnCalcFields(Sender: TDADataTable); override;
+    procedure OnNewRecord(Sender: TDADataTable); override;
+
+    procedure Setup(const Dataset: TDADataTable);
+    procedure ExecuteProc(Dataset: TDADataTable; const Name: tbtstring);
+  public
+    property SE: TPSScript read FSE write SetSE;
+  end;
+
+  TDAPSDataTableRulesPlugin = class(TPsPlugin)
+  private
+    fDataTable: TDADataTable;
+    fScriptEngine: TPSScript;
+    procedure SetDataTable(const Value: TDADataTable);
+  public
+    procedure CompOnUses(CompExec: TPSScript); override;
+    procedure CompileImport1(CompExec: TPSScript); override;
+    procedure ExecImport2(CompExec: TPSScript; const ri: TPSRuntimeClassImporter); override;
+    property DataTable: TDADataTable read fDataTable write SetDataTable;
+  end;
+
+implementation
+
+uses
+{$IFDEF LINUX}
+  fpgtkext,
+{$ENDIF}
+  uDAScriptingProvider, Dialogs, uROClasses;
+//uses
+//  uDADataTable;
+
+procedure SIRegister_TDADataTable(CL: TIFPSPascalCompiler);
+begin
+  //with RegClassS(CL,'TComponent', 'TDADataTable') do
+  with CL.AddClassN(CL.FindClass('TComponent'), 'TDADataTable') do begin
+    RegisterProperty('Active', 'boolean', iptrw);
+    RegisterProperty('Fields', 'TDAFieldCollection', iptrw);
+    RegisterProperty('Params', 'TDAParamCollection', iptrw);
+    RegisterProperty('LogChanges', 'boolean', iptrw);
+    RegisterProperty('RemoteFetchEnabled', 'boolean', iptrw);
+    RegisterProperty('MasterFields', 'string', iptrw);
+    RegisterProperty('DetailFields', 'string', iptrw);
+    RegisterProperty('MasterRequestMappings', 'TStrings', iptrw);
+    RegisterProperty('DetailOptions', 'TDADetailOptions', iptrw);
+    RegisterProperty('MasterOptions', 'TDAMasterOptions', iptrw);
+    RegisterProperty('Filtered', 'boolean', iptrw);
+    RegisterProperty('Filter', 'string', iptrw);
+    RegisterProperty('LogicalName', 'string', iptrw);
+    RegisterProperty('BusinessRulesID', 'string', iptrw);
+    RegisterProperty('State','TDataSetState',iptR);
+  end;
+end;
+
+procedure SIRegister_TDAParamCollection(CL: TIFPSPascalCompiler);
+begin
+  //with RegClassS(CL,'TSearcheableInterfacedCollection', 'TDAParamCollection') do
+  with CL.AddClassN(CL.FindClass('TSearcheableInterfacedCollection'), 'TDAParamCollection') do begin
+    RegisterMethod('Constructor Create( aOwner : TPersistent)');
+    RegisterMethod('Procedure WriteValues( OutputParams : TParams)');
+    RegisterMethod('Procedure ReadValues( InputParams : TParams)');
+    RegisterMethod('Function Add : TDAParam');
+    RegisterMethod('Function ParamByName( const aName : string) : TDAParam');
+    RegisterMethod('Function FindParam( const aParamName : string) : TDAParam');
+    RegisterMethod('Procedure AssignParamCollection( Source : TDAParamCollection)');
+    RegisterProperty('Params', 'TDAParam integer', iptrw);
+    SetDefaultPropery('Params');
+    RegisterProperty('HasInputParams', 'boolean', iptr);
+  end;
+end;
+
+procedure SIRegister_TDAParam(CL: TIFPSPascalCompiler);
+begin
+  //with RegClassS(CL,'TDABaseField', 'TDAParam') do
+  with CL.AddClassN(CL.FindClass('TDABaseField'), 'TDAParam') do begin
+    RegisterMethod('Procedure SaveToStream( const aStream : IROStream)');
+    RegisterMethod('Procedure LoadFromStream( const aStream : IROStream)');
+    RegisterMethod('Procedure SaveToFile( const aFileName : string)');
+    RegisterMethod('Procedure LoadFromFile( const aFileName : string)');
+    RegisterProperty('ParamType', 'TDAParamType', iptrw);
+  end;
+end;
+
+procedure SIRegister_TDAFieldCollection(CL: TIFPSPascalCompiler);
+begin
+  //with RegClassS(CL,'TDACustomFieldCollection', 'TDAFieldCollection') do
+  with CL.AddClassN(CL.FindClass('TDACustomFieldCollection'), 'TDAFieldCollection') do begin
+    RegisterMethod('Constructor Create( aOwner : TPersistent)');
+    RegisterMethod('Function FieldByName( const aName : string) : TDAField');
+    RegisterMethod('Function FindField( const aName : string) : TDAField');
+    RegisterProperty('Fields', 'TDAField integer', iptrw);
+    SetDefaultPropery('Fields');
+  end;
+end;
+
+procedure SIRegister_TDACustomFieldCollection(CL: TIFPSPascalCompiler);
+begin
+  //with RegClassS(CL,'TSearcheableInterfacedCollection', 'TDACustomFieldCollection') do
+  with CL.AddClassN(CL.FindClass('TSearcheableInterfacedCollection'), 'TDACustomFieldCollection') do begin
+    RegisterMethod('Procedure Bind( aDataset : TDataset)');
+    RegisterMethod('Procedure Unbind');
+    RegisterProperty('FieldEventsDisabled', 'boolean', iptrw);
+    RegisterMethod('Procedure AssignFieldCollection( Source : TDACustomFieldCollection)');
+    RegisterMethod('Function FieldByName( const aName : string) : TDACustomField');
+    RegisterMethod('Function FindField( const aName : string) : TDACustomField');
+    RegisterMethod('Procedure MoveItem( iFromIndex, iToIndex : integer)');
+    RegisterProperty('DataDictionary', 'IDADataDictionary', iptrw);
+    RegisterProperty('Fields', 'TDACustomField integer', iptrw);
+    SetDefaultPropery('Fields');
+  end;
+end;
+
+procedure SIRegister_TDADataDictionaryField(CL: TIFPSPascalCompiler);
+begin
+  //with RegClassS(CL,'TDACustomField', 'TDADataDictionaryField') do
+  with CL.AddClassN(CL.FindClass('TDACustomField'), 'TDADataDictionaryField') do begin
+  end;
+end;
+
+procedure SIRegister_TDAField(CL: TIFPSPascalCompiler);
+begin
+  //with RegClassS(CL,'TDACustomField', 'TDAField') do
+  with CL.AddClassN(CL.FindClass('TDACustomField'), 'TDAField') do begin
+  end;
+end;
+
+procedure SIRegister_TDACustomField(CL: TIFPSPascalCompiler);
+begin
+  //with RegClassS(CL,'TDABaseField', 'TDACustomField') do
+  with CL.AddClassN(CL.FindClass('TDABaseField'), 'TDACustomField') do begin
+    RegisterMethod('Procedure Bind( aField : TField)');
+    RegisterMethod('Procedure Unbind');
+    RegisterMethod('Procedure SaveToStream( const aStream : IROStream)');
+    RegisterMethod('Procedure LoadFromStream( const aStream : IROStream)');
+    RegisterMethod('Procedure SaveToFile( const aFileName : string)');
+    RegisterMethod('Procedure LoadFromFile( const aFileName : string)');
+    RegisterProperty('FieldCollection', 'TDACustomFieldCollection', iptr);
+    RegisterProperty('TableField', 'string', iptrw);
+    RegisterProperty('IsNull', 'boolean', iptr);
+    RegisterProperty('InPrimaryKey', 'boolean', iptrw);
+    RegisterProperty('Calculated', 'boolean', iptrw);
+    RegisterProperty('Lookup', 'boolean', iptrw);
+    RegisterProperty('LookupSource', 'TDataSource', iptrw);
+    RegisterProperty('LookupKeyFields', 'string', iptrw);
+    RegisterProperty('LookupResultField', 'string', iptrw);
+    RegisterProperty('KeyFields', 'string', iptrw);
+    RegisterProperty('LookupCache', 'boolean', iptrw);
+    RegisterProperty('LogChanges', 'boolean', iptrw);
+    RegisterProperty('RegExpression', 'string', iptrw);
+    RegisterProperty('DefaultValue', 'string', iptrw);
+    RegisterProperty('Required', 'boolean', iptrw);
+    RegisterProperty('DisplayWidth', 'integer', iptrw);
+    RegisterProperty('DisplayLabel', 'string', iptrw);
+    RegisterProperty('EditMask', 'string', iptrw);
+    RegisterProperty('Visible', 'boolean', iptrw);
+    RegisterProperty('ReadOnly', 'boolean', iptrw);
+    RegisterProperty('CustomAttributes', 'TStrings', iptrw);
+    RegisterProperty('DisplayFormat', 'string', iptrw);
+    RegisterProperty('BusinessRulesID', 'string', iptrw);
+    RegisterProperty('EditFormat', 'string', iptrw);
+    RegisterProperty('Alignment', 'TAlignment', iptrw);
+  end;
+end;
+
+procedure SIRegister_TDABaseField(CL: TIFPSPascalCompiler);
+begin
+  //with RegClassS(CL,'TCollectionItem', 'TDABaseField') do
+  with CL.AddClassN(CL.FindClass('TCollectionItem'), 'TDABaseField') do begin
+    RegisterProperty('Value', 'Variant', iptrw);
+    RegisterMethod('Procedure AssignField( Source : TDABaseField)');
+    RegisterMethod('Function HasValidDictionaryField : Boolean');
+    RegisterProperty('AsBoolean', 'boolean', iptrw);
+    RegisterProperty('AsCurrency', 'currency', iptrw);
+    RegisterProperty('AsDateTime', 'TDateTime', iptrw);
+    RegisterProperty('AsFloat', 'double', iptrw);
+    RegisterProperty('AsInteger', 'integer', iptrw);
+    RegisterProperty('AsString', 'string', iptrw);
+    RegisterProperty('AsVariant', 'variant', iptrw);
+    RegisterProperty('DictionaryEntry', 'string', iptrw);
+    RegisterProperty('Name', 'string', iptrw);
+    RegisterProperty('DataType', 'TDADataType', iptrw);
+    RegisterProperty('Size', 'integer', iptrw);
+    RegisterProperty('Description', 'string', iptrw);
+    RegisterProperty('BlobType', 'TDABlobType', iptrw);
+  end;
+end;
+
+procedure SIRegister_uDA(CL: TIFPSPascalCompiler);
+begin
+  CL.AddTypeS('TDAPersistFormat', '( pfBinary, pfXML )');
+  CL.AddTypeS('TDAParamType', '( daptUnknown, daptInput, daptOutput, daptInputO'
+    + 'utput, daptResult )');
+  CL.AddTypeS('TDADataType', '( datUnknown, datString, datDateTime, datFloat, d'
+    + 'atCurrency, datAutoInc, datInteger, datLargeInt, datBoolean, datMemo, datB'
+    + 'lob, datWideString, datWideMemo, datLargeAutoInc, datByte, datShortInt, '
+    +  'datWord, datSmallInt, datCardinal, datLargeUInt, datGuid, datXml, datDecimal, datSingleFloat )');
+  CL.AddTypeS('TDABlobType', '( dabtUnknown, dabtBlob, dabtMemo, dabtOraBlob, d'
+    + 'abtOraClob, dabtGraphic,dabtTypedBinary)');
+  SIRegister_TDABaseField(CL);
+  CL.AddClassN(CL.FindClass('TOBJECT'), 'TDACustomFieldCollection');
+  SIRegister_TDACustomField(CL);
+  SIRegister_TDAField(CL);
+  SIRegister_TDADataDictionaryField(CL);
+  SIRegister_TDACustomFieldCollection(CL);
+  SIRegister_TDAFieldCollection(CL);
+  SIRegister_TDAParam(CL);
+  SIRegister_TDAParamCollection(CL);
+  SIRegister_TDADataTable(CL);
+end;
+
+(* === run-time registration functions === *)
+
+procedure TDADataTableBusinessRulesID_W(Self: TDADataTable; const T: string);
+begin
+  Self.BusinessRulesID := T;
+end;
+
+procedure TDADataTableBusinessRulesID_R(Self: TDADataTable; var T: string);
+begin
+  T := Self.BusinessRulesID;
+end;
+
+procedure TDADataTableLogicalName_W(Self: TDADataTable; const T: string);
+begin
+  Self.LogicalName := T;
+end;
+
+procedure TDADataTableLogicalName_R(Self: TDADataTable; var T: string);
+begin
+  T := Self.LogicalName;
+end;
+
+procedure TDADataTableFilter_W(Self: TDADataTable; const T: string);
+begin
+  Self.Filter := T;
+end;
+
+procedure TDADataTableFilter_R(Self: TDADataTable; var T: string);
+begin
+  T := Self.Filter;
+end;
+
+procedure TDADataTableFiltered_W(Self: TDADataTable; const T: boolean);
+begin
+  Self.Filtered := T;
+end;
+
+procedure TDADataTableFiltered_R(Self: TDADataTable; var T: boolean);
+begin
+  T := Self.Filtered;
+end;
+
+procedure TDADataTableMasterOptions_W(Self: TDADataTable; const T: TDAMasterOptions);
+begin
+  Self.MasterOptions := T;
+end;
+
+procedure TDADataTableMasterOptions_R(Self: TDADataTable; var T: TDAMasterOptions);
+begin
+  T := Self.MasterOptions;
+end;
+
+procedure TDADataTableDetailOptions_W(Self: TDADataTable; const T: TDADetailOptions);
+begin
+  Self.DetailOptions := T;
+end;
+
+procedure TDADataTableDetailOptions_R(Self: TDADataTable; var T: TDADetailOptions);
+begin
+  T := Self.DetailOptions;
+end;
+
+procedure TDADataTableMasterRequestMappings_W(Self: TDADataTable; const T: TStrings);
+begin
+  Self.MasterRequestMappings := T;
+end;
+
+procedure TDADataTableMasterRequestMappings_R(Self: TDADataTable; var T: TStrings);
+begin
+  T := Self.MasterRequestMappings;
+end;
+
+procedure TDADataTableDetailFields_W(Self: TDADataTable; const T: string);
+begin
+  Self.DetailFields := T;
+end;
+
+procedure TDADataTableDetailFields_R(Self: TDADataTable; var T: string);
+begin
+  T := Self.DetailFields;
+end;
+
+procedure TDADataTableMasterFields_W(Self: TDADataTable; const T: string);
+begin
+  Self.MasterFields := T;
+end;
+
+procedure TDADataTableMasterFields_R(Self: TDADataTable; var T: string);
+begin
+  T := Self.MasterFields;
+end;
+
+procedure TDADataTableRemoteFetchEnabled_W(Self: TDADataTable; const T: boolean);
+begin
+  Self.RemoteFetchEnabled := T;
+end;
+
+procedure TDADataTableRemoteFetchEnabled_R(Self: TDADataTable; var T: boolean);
+begin
+  T := Self.RemoteFetchEnabled;
+end;
+
+procedure TDADataTableLogChanges_W(Self: TDADataTable; const T: boolean);
+begin
+  Self.LogChanges := T;
+end;
+
+procedure TDADataTableLogChanges_R(Self: TDADataTable; var T: boolean);
+begin
+  T := Self.LogChanges;
+end;
+
+procedure TDADataTableParams_W(Self: TDADataTable; const T: TDAParamCollection);
+begin
+  Self.Params := T;
+end;
+
+procedure TDADataTableParams_R(Self: TDADataTable; var T: TDAParamCollection);
+begin
+  T := Self.Params;
+end;
+
+procedure TDADataTableFields_W(Self: TDADataTable; const T: TDAFieldCollection);
+begin
+  Self.Fields := T;
+end;
+
+procedure TDADataTableFields_R(Self: TDADataTable; var T: TDAFieldCollection);
+begin
+  T := Self.Fields;
+end;
+
+procedure TDADataTableActive_W(Self: TDADataTable; const T: boolean);
+begin
+  Self.Active := T;
+end;
+
+procedure TDADataTableActive_R(Self: TDADataTable; var T: boolean);
+begin
+  T := Self.Active;
+end;
+
+procedure TDAParamCollectionHasInputParams_R(Self: TDAParamCollection; var T: boolean);
+begin
+  T := Self.HasInputParams;
+end;
+
+procedure TDAParamCollectionParams_W(Self: TDAParamCollection; const T: TDAParam; const t1: integer);
+begin
+  Self.Params[t1] := T;
+end;
+
+procedure TDAParamCollectionParams_R(Self: TDAParamCollection; var T: TDAParam; const t1: integer);
+begin
+  T := Self.Params[t1];
+end;
+
+procedure TDAParamParamType_W(Self: TDAParam; const T: TDAParamType);
+begin
+  Self.ParamType := T;
+end;
+
+procedure TDAParamParamType_R(Self: TDAParam; var T: TDAParamType);
+begin
+  T := Self.ParamType;
+end;
+
+procedure TDAFieldCollectionFields_W(Self: TDAFieldCollection; const T: TDAField; const t1: integer);
+begin
+  Self.Fields[t1] := T;
+end;
+
+procedure TDAFieldCollectionFields_R(Self: TDAFieldCollection; var T: TDAField; const t1: integer);
+begin
+  T := Self.Fields[t1];
+end;
+
+procedure TDACustomFieldCollectionFields_W(Self: TDACustomFieldCollection; const T: TDACustomField; const t1: integer);
+begin
+  Self.Fields[t1] := T;
+end;
+
+procedure TDACustomFieldCollectionFields_R(Self: TDACustomFieldCollection; var T: TDACustomField; const t1: integer);
+begin
+  T := Self.Fields[t1];
+end;
+
+procedure TDACustomFieldCollectionDataDictionary_W(Self: TDACustomFieldCollection; const T: IDADataDictionary);
+begin
+  Self.DataDictionary := T;
+end;
+
+procedure TDACustomFieldCollectionDataDictionary_R(Self: TDACustomFieldCollection; var T: IDADataDictionary);
+begin
+  T := Self.DataDictionary;
+end;
+
+procedure TDACustomFieldCollectionFieldEventsDisabled_W(Self: TDACustomFieldCollection; const T: boolean);
+begin
+  Self.FieldEventsDisabled := T;
+end;
+
+procedure TDACustomFieldCollectionFieldEventsDisabled_R(Self: TDACustomFieldCollection; var T: boolean);
+begin
+  T := Self.FieldEventsDisabled;
+end;
+
+procedure TDACustomFieldAlignment_W(Self: TDACustomField; const T: TAlignment);
+begin
+  Self.Alignment := T;
+end;
+
+procedure TDACustomFieldAlignment_R(Self: TDACustomField; var T: TAlignment);
+begin
+  T := Self.Alignment;
+end;
+
+procedure TDACustomFieldEditFormat_W(Self: TDACustomField; const T: string);
+begin
+  Self.EditFormat := T;
+end;
+
+procedure TDACustomFieldEditFormat_R(Self: TDACustomField; var T: string);
+begin
+  T := Self.EditFormat;
+end;
+
+procedure TDACustomFieldBusinessRulesID_W(Self: TDACustomField; const T: string);
+begin
+  Self.BusinessClassID := T;
+end;
+
+procedure TDACustomFieldBusinessRulesID_R(Self: TDACustomField; var T: string);
+begin
+  T := Self.BusinessClassID;
+end;
+
+procedure TDACustomFieldDisplayFormat_W(Self: TDACustomField; const T: string);
+begin
+  Self.DisplayFormat := T;
+end;
+
+procedure TDACustomFieldDisplayFormat_R(Self: TDACustomField; var T: string);
+begin
+  T := Self.DisplayFormat;
+end;
+
+procedure TDACustomFieldCustomAttributes_W(Self: TDACustomField; const T: TStrings);
+begin
+  Self.CustomAttributes := T;
+end;
+
+procedure TDACustomFieldCustomAttributes_R(Self: TDACustomField; var T: TStrings);
+begin
+  T := Self.CustomAttributes;
+end;
+
+procedure TDACustomFieldReadOnly_W(Self: TDACustomField; const T: boolean);
+begin
+  Self.ReadOnly := T;
+end;
+
+procedure TDACustomFieldReadOnly_R(Self: TDACustomField; var T: boolean);
+begin
+  T := Self.ReadOnly;
+end;
+
+procedure TDACustomFieldVisible_W(Self: TDACustomField; const T: boolean);
+begin
+  Self.Visible := T;
+end;
+
+procedure TDACustomFieldVisible_R(Self: TDACustomField; var T: boolean);
+begin
+  T := Self.Visible;
+end;
+
+procedure TDACustomFieldEditMask_W(Self: TDACustomField; const T: string);
+begin
+  Self.EditMask := T;
+end;
+
+procedure TDACustomFieldEditMask_R(Self: TDACustomField; var T: string);
+begin
+  T := Self.EditMask;
+end;
+
+procedure TDACustomFieldDisplayLabel_W(Self: TDACustomField; const T: string);
+begin
+  Self.DisplayLabel := T;
+end;
+
+procedure TDACustomFieldDisplayLabel_R(Self: TDACustomField; var T: string);
+begin
+  T := Self.DisplayLabel;
+end;
+
+procedure TDACustomFieldDisplayWidth_W(Self: TDACustomField; const T: integer);
+begin
+  Self.DisplayWidth := T;
+end;
+
+procedure TDACustomFieldDisplayWidth_R(Self: TDACustomField; var T: integer);
+begin
+  T := Self.DisplayWidth;
+end;
+
+procedure TDACustomFieldRequired_W(Self: TDACustomField; const T: boolean);
+begin
+  Self.Required := T;
+end;
+
+procedure TDACustomFieldRequired_R(Self: TDACustomField; var T: boolean);
+begin
+  T := Self.Required;
+end;
+
+procedure TDACustomFieldDefaultValue_W(Self: TDACustomField; const T: string);
+begin
+  Self.DefaultValue := T;
+end;
+
+procedure TDACustomFieldDefaultValue_R(Self: TDACustomField; var T: string);
+begin
+  T := Self.DefaultValue;
+end;
+
+procedure TDACustomFieldRegExpression_W(Self: TDACustomField; const T: string);
+begin
+  Self.RegExpression := T;
+end;
+
+procedure TDACustomFieldRegExpression_R(Self: TDACustomField; var T: string);
+begin
+  T := Self.RegExpression;
+end;
+
+procedure TDACustomFieldLogChanges_W(Self: TDACustomField; const T: boolean);
+begin
+  Self.LogChanges := T;
+end;
+
+procedure TDACustomFieldLogChanges_R(Self: TDACustomField; var T: boolean);
+begin
+  T := Self.LogChanges;
+end;
+
+procedure TDACustomFieldLookupCache_W(Self: TDACustomField; const T: boolean);
+begin
+  Self.LookupCache := T;
+end;
+
+procedure TDACustomFieldLookupCache_R(Self: TDACustomField; var T: boolean);
+begin
+  T := Self.LookupCache;
+end;
+
+procedure TDACustomFieldKeyFields_W(Self: TDACustomField; const T: string);
+begin
+  Self.KeyFields := T;
+end;
+
+procedure TDACustomFieldKeyFields_R(Self: TDACustomField; var T: string);
+begin
+  T := Self.KeyFields;
+end;
+
+procedure TDACustomFieldLookupResultField_W(Self: TDACustomField; const T: string);
+begin
+  Self.LookupResultField := T;
+end;
+
+procedure TDACustomFieldLookupResultField_R(Self: TDACustomField; var T: string);
+begin
+  T := Self.LookupResultField;
+end;
+
+procedure TDACustomFieldLookupKeyFields_W(Self: TDACustomField; const T: string);
+begin
+  Self.LookupKeyFields := T;
+end;
+
+procedure TDACustomFieldLookupKeyFields_R(Self: TDACustomField; var T: string);
+begin
+  T := Self.LookupKeyFields;
+end;
+
+procedure TDACustomFieldLookupSource_W(Self: TDACustomField; const T: TDataSource);
+begin
+  Self.LookupSource := T;
+end;
+
+procedure TDACustomFieldLookupSource_R(Self: TDACustomField; var T: TDataSource);
+begin
+  T := Self.LookupSource;
+end;
+
+procedure TDACustomFieldLookup_W(Self: TDACustomField; const T: boolean);
+begin
+  Self.Lookup := T;
+end;
+
+procedure TDACustomFieldLookup_R(Self: TDACustomField; var T: boolean);
+begin
+  T := Self.Lookup;
+end;
+
+procedure TDACustomFieldCalculated_W(Self: TDACustomField; const T: boolean);
+begin
+  Self.Calculated := T;
+end;
+
+procedure TDACustomFieldCalculated_R(Self: TDACustomField; var T: boolean);
+begin
+  T := Self.Calculated;
+end;
+
+procedure TDACustomFieldInPrimaryKey_W(Self: TDACustomField; const T: boolean);
+begin
+  Self.InPrimaryKey := T;
+end;
+
+procedure TDACustomFieldInPrimaryKey_R(Self: TDACustomField; var T: boolean);
+begin
+  T := Self.InPrimaryKey;
+end;
+
+procedure TDACustomFieldIsNull_R(Self: TDACustomField; var T: boolean);
+begin
+  T := Self.IsNull;
+end;
+
+procedure TDACustomFieldTableField_W(Self: TDACustomField; const T: string);
+begin
+  Self.TableField := T;
+end;
+
+procedure TDACustomFieldTableField_R(Self: TDACustomField; var T: string);
+begin
+  T := Self.TableField;
+end;
+
+procedure TDACustomFieldFieldCollection_R(Self: TDACustomField; var T: TDACustomFieldCollection);
+begin
+  T := Self.FieldCollection;
+end;
+
+procedure TDABaseFieldBlobType_W(Self: TDABaseField; const T: TDABlobType);
+begin
+  Self.BlobType := T;
+end;
+
+procedure TDABaseFieldBlobType_R(Self: TDABaseField; var T: TDABlobType);
+begin
+  T := Self.BlobType;
+end;
+
+procedure TDABaseFieldDescription_W(Self: TDABaseField; const T: string);
+begin
+  Self.Description := T;
+end;
+
+procedure TDABaseFieldDescription_R(Self: TDABaseField; var T: string);
+begin
+  T := Self.Description;
+end;
+
+procedure TDABaseFieldSize_W(Self: TDABaseField; const T: integer);
+begin
+  Self.Size := T;
+end;
+
+procedure TDABaseFieldSize_R(Self: TDABaseField; var T: integer);
+begin
+  T := Self.Size;
+end;
+
+procedure TDABaseFieldDataType_W(Self: TDABaseField; const T: TDADataType);
+begin
+  Self.DataType := T;
+end;
+
+procedure TDABaseFieldDataType_R(Self: TDABaseField; var T: TDADataType);
+begin
+  T := Self.DataType;
+end;
+
+procedure TDABaseFieldName_W(Self: TDABaseField; const T: string);
+begin
+  Self.Name := T;
+end;
+
+procedure TDABaseFieldName_R(Self: TDABaseField; var T: string);
+begin
+  T := Self.Name;
+end;
+
+procedure TDABaseFieldDictionaryEntry_W(Self: TDABaseField; const T: string);
+begin
+  Self.DictionaryEntry := T;
+end;
+
+procedure TDABaseFieldDictionaryEntry_R(Self: TDABaseField; var T: string);
+begin
+  T := Self.DictionaryEntry;
+end;
+
+procedure TDABaseFieldAsVariant_W(Self: TDABaseField; const T: variant);
+begin
+  Self.AsVariant := T;
+end;
+
+procedure TDABaseFieldAsVariant_R(Self: TDABaseField; var T: variant);
+begin
+  T := Self.AsVariant;
+end;
+
+procedure TDABaseFieldAsString_W(Self: TDABaseField; const T: string);
+begin
+  Self.AsString := T;
+end;
+
+procedure TDABaseFieldAsString_R(Self: TDABaseField; var T: string);
+begin
+  T := Self.AsString;
+end;
+
+procedure TDABaseFieldAsInteger_W(Self: TDABaseField; const T: integer);
+begin
+  Self.AsInteger := T;
+end;
+
+procedure TDABaseFieldAsInteger_R(Self: TDABaseField; var T: integer);
+begin
+  T := Self.AsInteger;
+end;
+
+procedure TDABaseFieldAsFloat_W(Self: TDABaseField; const T: double);
+begin
+  Self.AsFloat := T;
+end;
+
+procedure TDABaseFieldAsFloat_R(Self: TDABaseField; var T: double);
+begin
+  T := Self.AsFloat;
+end;
+
+procedure TDABaseFieldAsDateTime_W(Self: TDABaseField; const T: TDateTime);
+begin
+  Self.AsDateTime := T;
+end;
+
+procedure TDABaseFieldAsDateTime_R(Self: TDABaseField; var T: TDateTime);
+begin
+  T := Self.AsDateTime;
+end;
+
+procedure TDABaseFieldAsCurrency_W(Self: TDABaseField; const T: currency);
+begin
+  Self.AsCurrency := T;
+end;
+
+procedure TDABaseFieldAsCurrency_R(Self: TDABaseField; var T: currency);
+begin
+  T := Self.AsCurrency;
+end;
+
+procedure TDABaseFieldAsBoolean_W(Self: TDABaseField; const T: boolean);
+begin
+  Self.AsBoolean := T;
+end;
+
+procedure TDABaseFieldAsBoolean_R(Self: TDABaseField; var T: boolean);
+begin
+  T := Self.AsBoolean;
+end;
+
+procedure TDABaseFieldValue_W(Self: TDABaseField; const T: Variant);
+begin
+  Self.Value := T;
+end;
+
+procedure TDABaseFieldValue_R(Self: TDABaseField; var T: Variant);
+begin
+  T := Self.Value;
+end;
+
+procedure TDADataTableState_R(Self: TDADataTable; var T: TDataSetState);
+begin
+  T := Self.State;
+end;
+
+procedure RIRegister_TDADataTable(CL: TIFPSRuntimeClassImporter);
+begin
+  with CL.Add(TDADataTable) do begin
+    RegisterPropertyHelper(@TDADataTableActive_R, @TDADataTableActive_W, 'Active');
+    RegisterPropertyHelper(@TDADataTableFields_R, @TDADataTableFields_W, 'Fields');
+    RegisterPropertyHelper(@TDADataTableParams_R, @TDADataTableParams_W, 'Params');
+    RegisterPropertyHelper(@TDADataTableLogChanges_R, @TDADataTableLogChanges_W, 'LogChanges');
+    RegisterPropertyHelper(@TDADataTableRemoteFetchEnabled_R, @TDADataTableRemoteFetchEnabled_W, 'RemoteFetchEnabled');
+    RegisterPropertyHelper(@TDADataTableMasterFields_R, @TDADataTableMasterFields_W, 'MasterFields');
+    RegisterPropertyHelper(@TDADataTableDetailFields_R, @TDADataTableDetailFields_W, 'DetailFields');
+    RegisterPropertyHelper(@TDADataTableMasterRequestMappings_R, @TDADataTableMasterRequestMappings_W, 'MasterRequestMappings');
+    RegisterPropertyHelper(@TDADataTableDetailOptions_R, @TDADataTableDetailOptions_W, 'DetailOptions');
+    RegisterPropertyHelper(@TDADataTableMasterOptions_R, @TDADataTableMasterOptions_W, 'MasterOptions');
+    RegisterPropertyHelper(@TDADataTableFiltered_R, @TDADataTableFiltered_W, 'Filtered');
+    RegisterPropertyHelper(@TDADataTableFilter_R, @TDADataTableFilter_W, 'Filter');
+    RegisterPropertyHelper(@TDADataTableLogicalName_R, @TDADataTableLogicalName_W, 'LogicalName');
+    RegisterPropertyHelper(@TDADataTableBusinessRulesID_R, @TDADataTableBusinessRulesID_W, 'BusinessRulesID');
+    RegisterPropertyHelper(@TDADataTableState_R, nil, 'State');
+  end;
+end;
+
+procedure RIRegister_TDAParamCollection(CL: TIFPSRuntimeClassImporter);
+begin
+  with CL.Add(TDAParamCollection) do begin
+    RegisterConstructor(@TDAParamCollection.Create, 'Create');
+    RegisterMethod(@TDAParamCollection.WriteValues, 'WriteValues');
+    RegisterMethod(@TDAParamCollection.ReadValues, 'ReadValues');
+    RegisterMethod(@TDAParamCollection.Add, 'Add');
+    RegisterMethod(@TDAParamCollection.ParamByName, 'ParamByName');
+    RegisterMethod(@TDAParamCollection.FindParam, 'FindParam');
+    RegisterMethod(@TDAParamCollection.AssignParamCollection, 'AssignParamCollection');
+    RegisterPropertyHelper(@TDAParamCollectionParams_R, @TDAParamCollectionParams_W, 'Params');
+    RegisterPropertyHelper(@TDAParamCollectionHasInputParams_R, nil, 'HasInputParams');
+  end;
+end;
+
+procedure RIRegister_TDAParam(CL: TIFPSRuntimeClassImporter);
+begin
+  with CL.Add(TDAParam) do begin
+    RegisterMethod(@TDAParam.SaveToStream, 'SaveToStream');
+    RegisterMethod(@TDAParam.LoadFromStream, 'LoadFromStream');
+    RegisterMethod(@TDAParam.SaveToFile, 'SaveToFile');
+    RegisterMethod(@TDAParam.LoadFromFile, 'LoadFromFile');
+    RegisterPropertyHelper(@TDAParamParamType_R, @TDAParamParamType_W, 'ParamType');
+  end;
+end;
+
+procedure RIRegister_TDAFieldCollection(CL: TIFPSRuntimeClassImporter);
+begin
+  with CL.Add(TDAFieldCollection) do begin
+    RegisterConstructor(@TDAFieldCollection.Create, 'Create');
+    RegisterMethod(@TDAFieldCollection.FieldByName, 'FieldByName');
+    RegisterMethod(@TDAFieldCollection.FindField, 'FindField');
+    RegisterPropertyHelper(@TDAFieldCollectionFields_R, @TDAFieldCollectionFields_W, 'Fields');
+  end;
+end;
+
+procedure RIRegister_TDACustomFieldCollection(CL: TIFPSRuntimeClassImporter);
+begin
+  with CL.Add(TDACustomFieldCollection) do begin
+    RegisterMethod(@TDACustomFieldCollection.Bind, 'Bind');
+    RegisterMethod(@TDACustomFieldCollection.Unbind, 'Unbind');
+    RegisterPropertyHelper(@TDACustomFieldCollectionFieldEventsDisabled_R, @TDACustomFieldCollectionFieldEventsDisabled_W, 'FieldEventsDisabled');
+    RegisterMethod(@TDACustomFieldCollection.AssignFieldCollection, 'AssignFieldCollection');
+    RegisterMethod(@TDACustomFieldCollection.FieldByName, 'FieldByName');
+    RegisterMethod(@TDACustomFieldCollection.FindField, 'FindField');
+    RegisterMethod(@TDACustomFieldCollection.MoveItem, 'MoveItem');
+    RegisterPropertyHelper(@TDACustomFieldCollectionDataDictionary_R, @TDACustomFieldCollectionDataDictionary_W, 'DataDictionary');
+    RegisterPropertyHelper(@TDACustomFieldCollectionFields_R, @TDACustomFieldCollectionFields_W, 'Fields');
+  end;
+end;
+
+procedure RIRegister_TDADataDictionaryField(CL: TIFPSRuntimeClassImporter);
+begin
+  with CL.Add(TDADataDictionaryField) do begin
+  end;
+end;
+
+procedure RIRegister_TDAField(CL: TIFPSRuntimeClassImporter);
+begin
+  with CL.Add(TDAField) do begin
+  end;
+end;
+
+procedure RIRegister_TDACustomField(CL: TIFPSRuntimeClassImporter);
+begin
+  with CL.Add(TDACustomField) do begin
+    RegisterMethod(@TDACustomField.Bind, 'Bind');
+    RegisterMethod(@TDACustomField.Unbind, 'Unbind');
+    RegisterMethod(@TDACustomField.SaveToStream, 'SaveToStream');
+    RegisterMethod(@TDACustomField.LoadFromStream, 'LoadFromStream');
+    RegisterMethod(@TDACustomField.SaveToFile, 'SaveToFile');
+    RegisterMethod(@TDACustomField.LoadFromFile, 'LoadFromFile');
+    RegisterPropertyHelper(@TDACustomFieldFieldCollection_R, nil, 'FieldCollection');
+    RegisterPropertyHelper(@TDACustomFieldTableField_R, @TDACustomFieldTableField_W, 'TableField');
+    RegisterPropertyHelper(@TDACustomFieldIsNull_R, nil, 'IsNull');
+    RegisterPropertyHelper(@TDACustomFieldInPrimaryKey_R, @TDACustomFieldInPrimaryKey_W, 'InPrimaryKey');
+    RegisterPropertyHelper(@TDACustomFieldCalculated_R, @TDACustomFieldCalculated_W, 'Calculated');
+    RegisterPropertyHelper(@TDACustomFieldLookup_R, @TDACustomFieldLookup_W, 'Lookup');
+    RegisterPropertyHelper(@TDACustomFieldLookupSource_R, @TDACustomFieldLookupSource_W, 'LookupSource');
+    RegisterPropertyHelper(@TDACustomFieldLookupKeyFields_R, @TDACustomFieldLookupKeyFields_W, 'LookupKeyFields');
+    RegisterPropertyHelper(@TDACustomFieldLookupResultField_R, @TDACustomFieldLookupResultField_W, 'LookupResultField');
+    RegisterPropertyHelper(@TDACustomFieldKeyFields_R, @TDACustomFieldKeyFields_W, 'KeyFields');
+    RegisterPropertyHelper(@TDACustomFieldLookupCache_R, @TDACustomFieldLookupCache_W, 'LookupCache');
+    RegisterPropertyHelper(@TDACustomFieldLogChanges_R, @TDACustomFieldLogChanges_W, 'LogChanges');
+    RegisterPropertyHelper(@TDACustomFieldRegExpression_R, @TDACustomFieldRegExpression_W, 'RegExpression');
+    RegisterPropertyHelper(@TDACustomFieldDefaultValue_R, @TDACustomFieldDefaultValue_W, 'DefaultValue');
+    RegisterPropertyHelper(@TDACustomFieldRequired_R, @TDACustomFieldRequired_W, 'Required');
+    RegisterPropertyHelper(@TDACustomFieldDisplayWidth_R, @TDACustomFieldDisplayWidth_W, 'DisplayWidth');
+    RegisterPropertyHelper(@TDACustomFieldDisplayLabel_R, @TDACustomFieldDisplayLabel_W, 'DisplayLabel');
+    RegisterPropertyHelper(@TDACustomFieldEditMask_R, @TDACustomFieldEditMask_W, 'EditMask');
+    RegisterPropertyHelper(@TDACustomFieldVisible_R, @TDACustomFieldVisible_W, 'Visible');
+    RegisterPropertyHelper(@TDACustomFieldReadOnly_R, @TDACustomFieldReadOnly_W, 'ReadOnly');
+    RegisterPropertyHelper(@TDACustomFieldCustomAttributes_R, @TDACustomFieldCustomAttributes_W, 'CustomAttributes');
+    RegisterPropertyHelper(@TDACustomFieldDisplayFormat_R, @TDACustomFieldDisplayFormat_W, 'DisplayFormat');
+    RegisterPropertyHelper(@TDACustomFieldBusinessRulesID_R, @TDACustomFieldBusinessRulesID_W, 'BusinessRulesID');
+    RegisterPropertyHelper(@TDACustomFieldEditFormat_R, @TDACustomFieldEditFormat_W, 'EditFormat');
+    RegisterPropertyHelper(@TDACustomFieldAlignment_R, @TDACustomFieldAlignment_W, 'Alignment');
+  end;
+end;
+
+procedure RIRegister_TDABaseField(CL: TIFPSRuntimeClassImporter);
+begin
+  with CL.Add(TDABaseField) do begin
+    RegisterPropertyHelper(@TDABaseFieldValue_R, @TDABaseFieldValue_W, 'Value');
+    RegisterVirtualMethod(@TDABaseField.AssignField, 'AssignField');
+    RegisterMethod(@TDABaseField.HasValidDictionaryField, 'HasValidDictionaryField');
+    RegisterPropertyHelper(@TDABaseFieldAsBoolean_R, @TDABaseFieldAsBoolean_W, 'AsBoolean');
+    RegisterPropertyHelper(@TDABaseFieldAsCurrency_R, @TDABaseFieldAsCurrency_W, 'AsCurrency');
+    RegisterPropertyHelper(@TDABaseFieldAsDateTime_R, @TDABaseFieldAsDateTime_W, 'AsDateTime');
+    RegisterPropertyHelper(@TDABaseFieldAsFloat_R, @TDABaseFieldAsFloat_W, 'AsFloat');
+    RegisterPropertyHelper(@TDABaseFieldAsInteger_R, @TDABaseFieldAsInteger_W, 'AsInteger');
+    RegisterPropertyHelper(@TDABaseFieldAsString_R, @TDABaseFieldAsString_W, 'AsString');
+    RegisterPropertyHelper(@TDABaseFieldAsVariant_R, @TDABaseFieldAsVariant_W, 'AsVariant');
+    RegisterPropertyHelper(@TDABaseFieldDictionaryEntry_R, @TDABaseFieldDictionaryEntry_W, 'DictionaryEntry');
+    RegisterPropertyHelper(@TDABaseFieldName_R, @TDABaseFieldName_W, 'Name');
+    RegisterPropertyHelper(@TDABaseFieldDataType_R, @TDABaseFieldDataType_W, 'DataType');
+    RegisterPropertyHelper(@TDABaseFieldSize_R, @TDABaseFieldSize_W, 'Size');
+    RegisterPropertyHelper(@TDABaseFieldDescription_R, @TDABaseFieldDescription_W, 'Description');
+    RegisterPropertyHelper(@TDABaseFieldBlobType_R, @TDABaseFieldBlobType_W, 'BlobType');
+  end;
+end;
+
+procedure RIRegister_uDA(CL: TIFPSRuntimeClassImporter);
+begin
+  RIRegister_TDABaseField(CL);
+  RIRegister_TDACustomField(CL);
+  RIRegister_TDAField(CL);
+  RIRegister_TDADataDictionaryField(CL);
+  RIRegister_TDACustomFieldCollection(CL);
+  RIRegister_TDAFieldCollection(CL);
+  RIRegister_TDAParam(CL);
+  RIRegister_TDAParamCollection(CL);
+  RIRegister_TDADataTable(CL);
+end;
+
+{ TDAPSDataTableRulesPlugin }
+
+function PSNewGuid: string;
+begin
+  result := NewGuidAsString();
+end;
+
+procedure PSRaiseError(const aMsg: string);
+begin
+  raise EDAScriptError.Create(aMsg);
+end;
+
+procedure PSAbort;
+begin
+  Abort;
+end;
+
+{$IFDEF LINUX}
+Procedure ShowMessage(const msg: string);
+begin
+ fpgtkext.ShowMessage('',msg);
+end;
+{$ENDIF}
+
+procedure TDAPSDataTableRulesPlugin.CompileImport1(CompExec: TPSScript);
+begin
+  fScriptEngine := CompExec;
+  SIRegister_uDA(CompExec.Comp);
+  CompExec.AddRegisteredVariable('Table', 'TDADataTable');
+  CompExec.AddFunction(@ShowMessage,'procedure ShowMessage(const Msg: string);');
+  CompExec.AddFunction(@PSRaiseError,'procedure RaiseError(const aMsg: string);');
+  CompExec.AddFunction(@PSAbort,'procedure Abort;');
+  CompExec.AddFunction(@PSNewGuid,'function NewGuid: string;');
+end;
+
+procedure TDAPSDataTableRulesPlugin.CompOnUses(CompExec: TPSScript);
+begin
+  fScriptEngine := CompExec;
+end;
+
+procedure TDAPSDataTableRulesPlugin.ExecImport2(CompExec: TPSScript;
+  const ri: TPSRuntimeClassImporter);
+begin
+  fScriptEngine := CompExec;
+  RIRegister_uDA(ri);
+  CompExec.SetVarToInstance('Table', fDataTable);
+end;
+
+procedure TDAPSDataTableRulesPlugin.SetDataTable(
+  const Value: TDADataTable);
+begin
+  fDataTable := Value;
+  if (fScriptEngine <> nil) then
+    fScriptEngine.SetVarToInstance('Table', fDataTable);
+end;
+
+{ TDAPSDataTableRules }
+
+procedure TDAPSDataTableRules.AfterCancel(Sender: TDADataTable);
+begin
+  ExecuteProc(Sender, 'AfterCancel');
+end;
+
+procedure TDAPSDataTableRules.AfterClose(Sender: TDADataTable);
+begin
+  ExecuteProc(Sender, 'AfterClose');
+end;
+
+procedure TDAPSDataTableRules.AfterDelete(Sender: TDADataTable);
+begin
+  ExecuteProc(Sender, 'AfterDelete');
+end;
+
+procedure TDAPSDataTableRules.AfterEdit(Sender: TDADataTable);
+begin
+  ExecuteProc(Sender, 'AfterEdit');
+end;
+
+procedure TDAPSDataTableRules.AfterInsert(Sender: TDADataTable);
+begin
+  ExecuteProc(Sender, 'AfterInsert');
+end;
+
+procedure TDAPSDataTableRules.AfterOpen(Sender: TDADataTable);
+begin
+  ExecuteProc(Sender, 'AfterOpen');
+end;
+
+procedure TDAPSDataTableRules.AfterPost(Sender: TDADataTable);
+begin
+  ExecuteProc(Sender, 'AfterPost');
+end;
+
+procedure TDAPSDataTableRules.AfterRefresh(Sender: TDADataTable);
+begin
+  ExecuteProc(Sender, 'AfterRefresh');
+end;
+
+procedure TDAPSDataTableRules.AfterScroll(Sender: TDADataTable);
+begin
+  ExecuteProc(Sender, 'AfterScroll');
+end;
+
+procedure TDAPSDataTableRules.BeforeCancel(Sender: TDADataTable);
+begin
+  ExecuteProc(Sender, 'BeforeCancel');
+end;
+
+procedure TDAPSDataTableRules.BeforeClose(Sender: TDADataTable);
+begin
+  ExecuteProc(Sender, 'BeforeClose');
+end;
+
+procedure TDAPSDataTableRules.BeforeDelete(Sender: TDADataTable);
+begin
+  ExecuteProc(Sender, 'BeforeDelete');
+end;
+
+procedure TDAPSDataTableRules.BeforeEdit(Sender: TDADataTable);
+begin
+  ExecuteProc(Sender, 'BeforeEdit');
+end;
+
+procedure TDAPSDataTableRules.BeforeInsert(Sender: TDADataTable);
+begin
+  ExecuteProc(Sender, 'BeforeInsert');
+end;
+
+procedure TDAPSDataTableRules.BeforeOpen(Sender: TDADataTable);
+begin
+  ExecuteProc(Sender, 'BeforeOpen');
+end;
+
+procedure TDAPSDataTableRules.BeforePost(Sender: TDADataTable);
+begin
+  ExecuteProc(Sender, 'BeforePost');
+end;
+
+procedure TDAPSDataTableRules.BeforeRefresh(Sender: TDADataTable);
+begin
+  ExecuteProc(Sender, 'BeforeRefresh');
+end;
+
+procedure TDAPSDataTableRules.BeforeScroll(Sender: TDADataTable);
+begin
+  ExecuteProc(Sender, 'BeforeScroll');
+end;
+
+procedure TDAPSDataTableRules.ExecuteProc(Dataset: TDADataTable;
+  const Name: tbtstring);
+var
+  ProcNo: Cardinal;
+begin
+  if FSE = nil then raise Exception.Create('No script engine attached');
+  Setup(Dataset);
+  ProcNo := FSE.Exec.GetProc(Name);
+  if ProcNo <> InvalidVal then {// Nothing to do} begin
+    FSE.Exec.RunProc(nil, ProcNo);
+    FSE.Exec.RaiseCurrentException;
+  end;
+end;
+
+procedure TDAPSDataTableRules.OnCalcFields(Sender: TDADataTable);
+begin
+  ExecuteProc(Sender, 'OnCalcFields');
+end;
+
+procedure TDAPSDataTableRules.OnNewRecord(Sender: TDADataTable);
+begin
+  ExecuteProc(Sender, 'OnNewRecord');
+end;
+
+procedure TDAPSDataTableRules.SetSE(const Value: TPSScript);
+var
+  lPlugin: TPSPlugin;
+  i: Integer;
+begin
+  if Value = nil then begin
+    FSE := nil
+  end
+  else begin
+    // ToDo: use GetPlugin() lateron.
+    lPlugin := nil;
+    for i := 0 to Value.Plugins.Count-1 do begin
+      if Assigned(Value.Plugins.Items[i]) and ((Value.Plugins.Items[i] as TPSPluginItem).Plugin is TDAPSDataTableRulesPlugin) then
+        lPlugin := (Value.Plugins.Items[i] as TPSPluginItem).Plugin;
+    end; { for }
+    if lPlugin = nil then begin
+      FSE := nil;
+      raise Exception.Create('No TDAPSDataTableRulesPlugin plugin attached to the script engine.');
+    end;
+    FSE := Value;
+  end;
+end;
+
+procedure TDAPSDataTableRules.Setup(const Dataset: TDADataTable);
+begin
+  FSE.SetVarToInstance('Table', Dataset);
+end;
+
+end.
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAPleaseWaitForm.lfm b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAPleaseWaitForm.lfm
new file mode 100644
index 0000000..c2110e2
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAPleaseWaitForm.lfm	
@@ -0,0 +1,208 @@
+object PleaseWaitForm: TPleaseWaitForm
+  Left = 336
+  Top = 344
+  BorderIcons = []
+  BorderStyle = bsDialog
+  Caption = 'RemObjects SDK'
+  ClientHeight = 41
+  ClientWidth = 542
+  Color = clBtnFace
+  Font.Charset = DEFAULT_CHARSET
+  Font.Color = clWindowText
+  Font.Height = -11
+  Font.Name = 'Tahoma'
+  Font.Style = []
+  FormStyle = fsStayOnTop
+  OldCreateOrder = False
+  Position = poScreenCenter
+  OnHide = FormHide
+  OnShow = FormShow
+  PixelsPerInch = 96
+  TextHeight = 13
+  object lbl_Caption: TLabel
+    Left = 64
+    Top = 14
+    Width = 66
+    Height = 13
+    Caption = 'Please wait...'
+  end
+  object img_Logo: TImage
+    Left = 2
+    Top = 0
+    Width = 48
+    Height = 41
+    Center = True
+    Picture.Data = {
+      07544269746D617006150000424D061500000000000036000000280000003000
+      0000250000000100180000000000D0140000130B0000130B0000000000000000
+      0000C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
+      C8D0D4C8D0D4C8D0D4D2D9DCCFD6D9C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0
+      D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8
+      D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
+      C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0
+      D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4E7EAECC7D9DF95BAC686B1BEE1E9ECC8
+      D0D4C8D0D4C8D0D4CBD3D7E3E7E9CFD6D9C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
+      C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0
+      D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8
+      D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4D2D9DC
+      86B1BE0B4E940A3CA40B409E86B1BED6DCDFC8D0D4CBD3D7E5ECEF5893A695BA
+      C6DFE6E9CFD6D9C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8
+      D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
+      C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0
+      D4C8D0D4C8D0D4C8D0D4C8D0D4D6DCDF679DAE092CB8091FC2091EBE1B648DE1
+      E9ECD2D9DCDBE3E73A8096093B930A3F8F1B6888B3CED6D2D9DCC8D0D4C8D0D4
+      C8D0D4C8D0D4A3AAAD3234350000000D0D0D64686AC8D0D43234350000000000
+      00262728979DA0C8D0D4979DA0323435C8D0D4C8D0D464686A64686AC8D0D4C8
+      D0D4C8D0D4C8D0D4C8D0D4C8D0D4D2D9DCD9E5E9EAEDEFCFD6D9C8D0D4D9DFE1
+      498A9E0920C6091FC2091EBD0A37A4498A9E86B1BE3A8096093798071DA5071C
+      A008329386B1BECBD3D7C8D0D4C8D0D4C8D0D4C8D0D47D8385717578C8D0D4BC
+      C4C8191A1BA3AAAD323435979DA0C8D0D4979DA0191A1BB0B7BA979DA0262728
+      C8D0D4BCC4C8191A1BBCC4C8C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4D2D9DCCEDE
+      E41C688C2B7294A4C4CEEEF0F2BFD5DB2B768E0920C6091FC2091EBD091EB909
+      2FA7092EA4092EA1071DA8071DA5071CA00A3F8DBFD5DBC8D0D4C8D0D4C8D0D4
+      C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4A3AAAD191A1BA3AAAD323435979DA0C8D0
+      D4C8D0D44B4E50717578979DA00000007D838564686A585B5DC8D0D4C8D0D4C8
+      D0D4C8D0D4C8D0D4CBD3D7CBDBE11C688C0B24DC0B24D80B41AB1B688B0C4D97
+      0A28C10920C6091FC2091EBD091EB9081EB5081CB1081DAD071DA8071DA5071C
+      A00B4C87D6E3E7C8D0D4C8D0D4C8D0D4D2D9DCC8D0D4BCC4C83F414300000026
+      2728717578C8D0D4323435979DA0C8D0D4C8D0D464686A64686A979DA0262728
+      0D0D0D0D0D0DB0B7BAC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4D9DFE1679DAE0B3D
+      B80B20E20B20DD0A20D80A20D40A1FCF0A20CB0920C6091FC1091EBD091EB908
+      1EB5081CB0081DAC071DA8071DA4071CA00936913A8096E1E9ECD2E0E4A4C4CE
+      95BAC6DCE2E47175783F4143BCC4C8C8D0D4C8D0D4C8D0D4323435979DA0C8D0
+      D4C8D0D42627288A9092979DA0323435979DA0191A1BBCC4C8C8D0D4C8D0D4C8
+      D0D4C8D0D4C8D0D4C8D0D4E1E9EC1B64920B24DB0B20DD0A20D80A20D40A1FCF
+      0A20CB0920C6091FC1091EBD091EB9081EB5081CB0071DAC071DA8071DA4071C
+      9F071C9C09368E0C5A800A4C83093F850B5180BFD5DB8D9295191A1B64686A4B
+      4E503F4143C8D0D43234354B4E5064686A323435323435C8D0D4979DA0323435
+      C8D0D464686A323435C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4D2D9DC86B1
+      BE0C41AF0B20DD0A20D80A20D30A1FCF0A20CA0920C5091FC1091EBD091EB908
+      1EB5081CB0071DAC071DA8071DA4071C9F071C9C061C97061B94061B90051B8C
+      062487498A9EE3E7E9979DA064686A717578BCC4C8C8D0D47D838564686A6468
+      6A7D8385C8D0D4C8D0D4B0B7BA7D8385C8D0D4C8D0D4717578A3AAADC8D0D4C8
+      D0D4C8D0D4C8D0D4C8D0D4C8D0D4CBDBE10C4E9C0B20DD0A20D80A20D30A1FCF
+      0A20CA0920C5091EC1091EBD091EB9081EB5081CB0071DAC071DA8071CA4071C
+      9F071C9C061C97061B94061B90051B8C051F880C597FD6E3E7C8D0D4C8D0D4C8
+      D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
+      C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4D6DCDFE3E7E9EEF0F2B8CFD65893
+      A60B30C80B20DD0A20D70A20D30A1FCE0A20CA0920C5091EC1091EBC091EB908
+      1EB5081CB0071DAC071DA8071CA4071C9F071C9C061C97061B94061B8F061F8B
+      0B5580A1C1CCD2D9DCC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0
+      D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8
+      D0D4D2E0E42B72950C529A0C46AD0B3DB80B20E10B20DD0A20D70A20D30A1FCE
+      0A20CA0920C50A34AC0C5A85498A9E3A80960B4D8D0825A6071DA7071CA3071C
+      9F071C9B061C97061B93061B8F0B5580A1C1CCD2D9DCC8D0D4C8D0D4C8D0D4C8
+      D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
+      C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4BFD5DB0C42B80B20F00B21EB0B21
+      E60B20E10B20DD0A20D70A20D30A1FCE0A20CA0A30B33A8096D6E3E7DCE2E4E0
+      E4E7BFD5DB1B68880721A5071CA3071C9F071C9B061C97061B93061B8F0B5181
+      E1E9ECC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0
+      D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8
+      D0D495BAC60C39C70B20F00B21EA0B20E50B20E10B20DC0A20D70A20D30A1FCE
+      0A20C90B4E94D9E5E9CBD3D7C8D0D4C8D0D4D2D9DCA4C4CE093B94071CA3071C
+      9F071C9B061C97061B93061B8F093F8582ADBCEAEDEFCFD6D9C8D0D4C8D0D4CB
+      D3D7CFD6D9C8D0D4C8D0D4E7EAEC86B1BE95BAC6BFD5DBDCE2E4C8D0D4C8D0D4
+      C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D495BAC60C529B0B31D30B21EA0B20
+      E50B20E10B20DC0A20D70A20D30A1FCE0A20C92B768EE3E7E9C8D0D4C8D0D4C8
+      D0D4C8D0D4D2E0E40B4D8A071CA3071C9E071C9B061C96061B93061B8F06248A
+      0A47812A718E95BAC6D8E0E4E0E4E7BFD5DBB0CBD4D2D9DCC8D0D4B0CBD40B4E
+      940A38A80C5A86DFE6E9C8D0D4C8D0D4D2D9DCC8D0D4C8D0D4C8D0D4C8D0D4C8
+      D0D4DCE2E4CBDBE1679DAE0C5A8B0B31CB0B20E00B20DC0A20D70A20D20A1FCE
+      0A20C90C568BEAEDEFC8D0D4C8D0D4C8D0D4C8D0D4BBD2D90A448F071CA3071C
+      9E071C9B061C96061B93061B8F051B8B051A87061E830B507EB3CED6498A9E0C
+      4E9D0C5690A1C1CCF1F3F45893A6092CB8091EC00B4499BBD2D9CFD6D9EAEDEF
+      95BAC6E1E9ECCBD3D7C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4D9DFE1BFD5DB0C41
+      B10B20E00B20DC0A20D60A20D20A1FCE0920C90B41A186B1BEDCE2E4C8D0D4C8
+      D0D4EAEDEF498A9E082E9C071CA3071C9E071C9B061C96061B93061B8E051B8B
+      051A87061A830B507EE0EBEE0C52970B20E10B24D50C568E0C5A880B459F091F
+      C4091EBF0A37A3498A9EA4C4CE2A72900A488C2A7290C7D9DFCBD3D7C8D0D4C8
+      D0D4C8D0D4C8D0D4CBD3D7CBDBE10C52970B20E00B20DB0A20D60A20D20A1FCD
+      0920C90924BF0C518E679DAEBFD5DBB3CED6498A9E0A4094071DA7071CA3071C
+      9E071C9B061C96061B92061B8E051B8B051A870727821B6386FFFFFF2B72940B
+      20DF0A20D90A20D40A1FCE0920C8091FC2091EBD081EB80826AC0A3F950725A2
+      071CA3093692679DAEDCE2E4C8D0D4C8D0D4C8D0D4CBD3D7E5ECEF3A7C9C0B2D
+      D10B20E00B21DB0A20D60A20D20A1FCD0920C9091FC4091EBF0A33A80B409A0A
+      40980829A5071DAA071DA6071CA3071C9E071C9A061C96061B9207288B1B6387
+      498A9E679DAEA4C4CEECF2F42B768E0B28D10A20D70A1FD20A1FCC0920C6091E
+      C0091EBB081EB6081CB0071DAB071DA6071CA10B5185BBD2D9C8D0D4C8D0D4C8
+      D0D4CBD3D7E5ECEF3A7C9D0B2DD50B20E50B20E00B21DB0A20D60A20D20A1FCD
+      0920C9091FC4091EBF091EBB091EB7081DB3081CAF071DAA071DA6071CA2071C
+      9E071C9A061C96061B920A4884C2D8DEC2D8DE4981AC1B64943A80960B3DB50B
+      20DC0A20D50A1FD0091FCA091FC4091EBF091EBA081DB4081CAF071DA9071CA5
+      07209D2B768EE7EAECC8D0D4C8D0D4C8D0D4C8D0D4BFD5DB0C4AA70B21E90B20
+      E40B20E00B21DB0A20D60A20D10A1FCD0920C8091FC3091EBF091EBB091EB708
+      1DB3081CAF071DAA071DA6071CA2071C9E071C9A061C96061B921C6C86FCFCFC
+      5893A60B29E30B20EC0B20E50B20DF0A20D90A20D40A1FCE0920C8091FC2091E
+      BD081EB8081DB2071CAD071DA8071CA3071C9D0B4C86A4C4CEC2D8DEC4D6DBD9
+      DFE1C8D0D4E3E7E9498A9E0B2DD50B20E40B28D30B35BE0A24D00A20D10A1FCD
+      0920C8091FC3091EBF091EBB081EB7081DB3081CAE071DAA071DA6071CA2071C
+      9D071C9A061C96061B92094385A4C4CE2B768E0B31D30B21EA0B20E30B20DE0A
+      20D70A1FD20A1FCC0920C60A38A80B409D0A33A5081CB1071DAB071DA6071CA1
+      071C9C072095093F88093F850C5A7FEEF0F2C8D0D4CBD3D7BBD2D90C5A8B2B72
+      945893A676A7B60C568E0A24CC0A1FCD0920C8091FC3091EBF091EBB081EB708
+      1DB3081CAE071DAA071DA6071CA2071C9D071C9A061C96061B92061F8D1B6886
+      E0EBEE3A80960B39BF0B20E10B20DC0A20D50A1FD00A1FCA0B4E94679DAEC2D8
+      DE679DAE0B4D8D071DA9071CA5071C9F071C9A061B95061B90051B8B094382BB
+      D2D9C8D0D4C8D0D4D9DFE1F1F3F4E3E7E9D9DFE1E0E4E786B1BE0B41A70A1FCD
+      0920C8091FC3091EBF091EBB081EB6081DB2081CAE071DAA071DA6071CA20832
+      93082D92061B96061B92061F8D0C5A7FCEDEE4E5ECEF0C52970B20E00A20D90A
+      20D40A1FCE0A34B2679DAEDCE2E4C8D0D4DCE2E4679DAE08329A071CA3071C9D
+      061C98061B94061B8F0731861B6387D1E1E6C8D0D4C8D0D4C8D0D4C8D0D4C8D0
+      D4C8D0D4CFD6D986B1BE0A30BB0A1FCD0920C8091FC3091EBF091EBB081EB608
+      1DB2081CAE071DAA0725A10B5187679DAE679DAE0B518308318B0B5581A4C4CE
+      DDE8EB5893A60C41B00B20DE0A20D70A1FD20A1FCC0B41A3C2D8DEC8D0D4C8D0
+      D4C8D0D4C2D8DE0A4091071CA1071C9C061C97061B92093A875893A6D2E0E4D6
+      DCDFC8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4D6DCDF679DAE0A2CC00A1FCC
+      0920C7092CB60C5E820C518D0B4993081DB2081CAE071DAA082E9C86B1BEE0E4
+      E7DCE2E4D9E5E9679DAEA4C4CEC2D8DE1B64930B39BF0B20E10B20DC0A20D60A
+      1FD00A1FCA0A34AF679DAEE0E4E7C8D0D4E0E4E7679DAE083298071C9F071C9A
+      061B95061B900A4883BBD2D9C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0
+      D4C8D0D4E0E4E7498A9E0B38B10A1FCC0A28BE1B688AC7D9DFEEF0F2679DAE09
+      2EA4081CAE071DA909379795BAC6C8D0D4C8D0D4C8D0D4DCE2E4D2D9DCBFD5DB
+      0C46AD0B20E50B20E00A20D90A20D40A1FCE0920C8091FC20B4996679DAEB3CE
+      D6679DAE0A488D071CA3071C9E071C99061B94061B8F093F84498A9EDFE6E9CB
+      D3D7C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4D2D9DCD2E0E4679DAE0C5A87
+      0C568CCEDEE4D2D9DCC8D0D4D9E5E90B518A081CAE071DA90A488DC2D8DEC8D0
+      D4C8D0D4C8D0D4C8D0D4C8D0D4DFE6E90C5A8B0C41B10B35C00A28CC0A1FD20A
+      1FCC0920C6091EC0091EBC0A33A40A3F9709329D071DA6071CA1071C9C061C97
+      061B92051B8D051A880835823A8096EAEDEFC8D0D4C8D0D4C8D0D4C8D0D4C8D0
+      D4C8D0D4C8D0D4C8D0D4D6DCDFDFE6E9CEDEE4D2D9DCC8D0D4C8D0D4DCE2E467
+      9DAE0B51893A8096679DAED2E0E4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4D9DFE1
+      D1E1E6C2D8DE76A7B60C52930A1FD00A1FCB091FC4091EBF091EBA081DB5081C
+      AF071DAA071DA5071C9F071C9A061B96061B90051B8C051A87082C815893A6DC
+      E2E4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
+      C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4EEF0F2E7EAECE3E7E9D6DCDFC8D0D4C8D0
+      D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4E7EAEC3A80960A27C409
+      20C9091FC2091EBD091EB8081DB3081CAD071DA8071CA3071C9E071C99061B94
+      0836890C5E7E0B50800C597EBBD2D9C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0
+      D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8
+      D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
+      C8D0D4C8D0D4BBD2D90B499C0A1FCC0920C6091EC1091EBC081EB7081CB1071D
+      AC071DA6071CA1071C9C061C9707288F2B768EDFE6E9EAEDEFD2E0E4D9DFE1C8
+      D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
+      C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0
+      D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4DCE2E4679DAE0B38B00A1FCB09
+      28BC0B49960A2FAB081DB5081CAF071DAA071DA5071C9F071C9B061B96061B90
+      3A8096E0E4E7C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0
+      D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8
+      D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
+      C8D0D4CBD3D7C7D9DF3A7C9B0B499A2B7292A4C4CE498A9E092EA5081CAE071D
+      A80B4D8A0C5A820A4887061B94061B8F0B5181DFE6E9C8D0D4C8D0D4C8D0D4C8
+      D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
+      C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0
+      D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4CBD3D7E1E9EC95BAC6DF
+      E6E9CBD3D7B3CED60A3F97071CAC082E9D679DAEF1F3F4A4C4CE0B55810B5182
+      5893A6D8E0E4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0
+      D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8
+      D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
+      C8D0D4C8D0D4C8D0D4C8D0D4D2D9DCC8D0D4C8D0D4D2E0E40C55870A40940B4D
+      8ABFD5DBC8D0D4DCE2E4B3CED6BBD2D9DCE2E4C8D0D4C8D0D4C8D0D4C8D0D4C8
+      D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
+      C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0
+      D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8
+      D0D4C8D0D4E0E4E7BBD2D9B3CED686B1BEE7EAECC8D0D4C8D0D4D2D9DCC8D0D4
+      C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4C8D0D4
+    }
+    Transparent = True
+  end
+end
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAPleaseWaitForm.lrs b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAPleaseWaitForm.lrs
new file mode 100644
index 0000000..85b8dd9
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAPleaseWaitForm.lrs	
@@ -0,0 +1,266 @@
+{ This is an automatically generated lazarus resource file }
+
+LazarusResources.Add('TPleaseWaitForm','FORMDATA',[
+  'TPF0'#15'TPleaseWaitForm'#14'PleaseWaitForm'#4'Left'#3'P'#1#6'Height'#2')'#3
+  +'Top'#3'X'#1#5'Width'#3#30#2#18'HorzScrollBar.Page'#3#29#2#18'VertScrollBar.'
+  +'Page'#2'('#11'BorderIcons'#11#0#11'BorderStyle'#7#8'bsDialog'#7'Caption'#6
+  +#14'RemObjects SDK'#12'ClientHeight'#2')'#11'ClientWidth'#3#30#2#11'Font.Hei'
+  +'ght'#2#245#9'Font.Name'#6#6'Tahoma'#9'FormStyle'#7#11'fsStayOnTop'#6'OnHide'
+  +#7#8'FormHide'#6'OnShow'#7#8'FormShow'#8'Position'#7#14'poScreenCenter'#10'L'
+  +'CLVersion'#6#6'0.9.25'#0#6'TLabel'#11'lbl_Caption'#4'Left'#2'@'#6'Height'#2
+  +#20#3'Top'#2#14#5'Width'#2'T'#7'Caption'#6#14'Please wait...'#11'ParentColor'
+  +#8#0#0#6'TImage'#8'img_Logo'#4'Left'#2#2#6'Height'#2')'#5'Width'#2'0'#6'Cent'
+  +'er'#9#12'Picture.Data'#10#18#21#0#0#7'TBitmap'#6#21#0#0'BM'#6#21#0#0#0#0#0#0
+  +'6'#0#0#0'('#0#0#0'0'#0#0#0'%'#0#0#0#1#0#24#0#0#0#0#0#208#20#0#0#19#11#0#0#19
+  +#11#0#0#0#0#0#0#0#0#0#0#200#208#212#200#208#212#200#208#212#200#208#212#200
+  +#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208
+  +#212#200#208#212#200#208#212#210#217#220#207#214#217#200#208#212#200#208#212
+  +#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200
+  +#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208
+  +#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212
+  +#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200
+  +#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208
+  +#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212
+  +#200#208#212#200#208#212#200#208#212#231#234#236#199#217#223#149#186#198#134
+  +#177#190#225#233#236#200#208#212#200#208#212#200#208#212#203#211#215#227#231
+  +#233#207#214#217#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212
+  +#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200
+  +#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208
+  +#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212
+  +#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200
+  +#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#210#217
+  +#220#134#177#190#11'N'#148#10'<'#164#11'@'#158#134#177#190#214#220#223#200
+  +#208#212#203#211#215#229#236#239'X'#147#166#149#186#198#223#230#233#207#214
+  +#217#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212
+  +#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200
+  +#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208
+  +#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212
+  +#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200
+  +#208#212#200#208#212#200#208#212#214#220#223'g'#157#174#9','#184#9#31#194#9
+  +#30#190#27'd'#141#225#233#236#210#217#220#219#227#231':'#128#150#9';'#147#10
+  +'?'#143#27'h'#136#179#206#214#210#217#220#200#208#212#200#208#212#200#208#212
+  +#200#208#212#163#170#173'245'#0#0#0#13#13#13'dhj'#200#208#212'245'#0#0#0#0#0
+  +#0'&''('#151#157#160#200#208#212#151#157#160'245'#200#208#212#200#208#212'dh'
+  +'jdhj'#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208
+  +#212#210#217#220#217#229#233#234#237#239#207#214#217#200#208#212#217#223#225
+  +'I'#138#158#9' '#198#9#31#194#9#30#189#10'7'#164'I'#138#158#134#177#190':'
+  +#128#150#9'7'#152#7#29#165#7#28#160#8'2'#147#134#177#190#203#211#215#200#208
+  +#212#200#208#212#200#208#212#200#208#212'}'#131#133'qux'#200#208#212#188#196
+  +#200#25#26#27#163#170#173'245'#151#157#160#200#208#212#151#157#160#25#26#27
+  +#176#183#186#151#157#160'&''('#200#208#212#188#196#200#25#26#27#188#196#200
+  +#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#210#217#220#206
+  +#222#228#28'h'#140'+r'#148#164#196#206#238#240#242#191#213#219'+v'#142#9' '
+  +#198#9#31#194#9#30#189#9#30#185#9'/'#167#9'.'#164#9'.'#161#7#29#168#7#29#165
+  +#7#28#160#10'?'#141#191#213#219#200#208#212#200#208#212#200#208#212#200#208
+  +#212#200#208#212#200#208#212#200#208#212#200#208#212#163#170#173#25#26#27#163
+  +#170#173'245'#151#157#160#200#208#212#200#208#212'KNPqux'#151#157#160#0#0#0
+  +'}'#131#133'dhjX[]'#200#208#212#200#208#212#200#208#212#200#208#212#200#208
+  +#212#203#211#215#203#219#225#28'h'#140#11'$'#220#11'$'#216#11'A'#171#27'h'
+  +#139#12'M'#151#10'('#193#9' '#198#9#31#194#9#30#189#9#30#185#8#30#181#8#28
+  +#177#8#29#173#7#29#168#7#29#165#7#28#160#11'L'#135#214#227#231#200#208#212
+  +#200#208#212#200#208#212#210#217#220#200#208#212#188#196#200'?AC'#0#0#0'&''('
+  +'qux'#200#208#212'245'#151#157#160#200#208#212#200#208#212'dhjdhj'#151#157
+  +#160'&''('#13#13#13#13#13#13#176#183#186#200#208#212#200#208#212#200#208#212
+  +#200#208#212#200#208#212#217#223#225'g'#157#174#11'='#184#11' '#226#11' '#221
+  +#10' '#216#10' '#212#10#31#207#10' '#203#9' '#198#9#31#193#9#30#189#9#30#185
+  +#8#30#181#8#28#176#8#29#172#7#29#168#7#29#164#7#28#160#9'6'#145':'#128#150
+  +#225#233#236#210#224#228#164#196#206#149#186#198#220#226#228'qux?AC'#188#196
+  ,#200#200#208#212#200#208#212#200#208#212'245'#151#157#160#200#208#212#200#208
+  +#212'&''('#138#144#146#151#157#160'245'#151#157#160#25#26#27#188#196#200#200
+  +#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#225#233
+  +#236#27'd'#146#11'$'#219#11' '#221#10' '#216#10' '#212#10#31#207#10' '#203#9
+  +' '#198#9#31#193#9#30#189#9#30#185#8#30#181#8#28#176#7#29#172#7#29#168#7#29
+  +#164#7#28#159#7#28#156#9'6'#142#12'Z'#128#10'L'#131#9'?'#133#11'Q'#128#191
+  +#213#219#141#146#149#25#26#27'dhjKNP?AC'#200#208#212'245KNPdhj245245'#200#208
+  +#212#151#157#160'245'#200#208#212'dhj245'#200#208#212#200#208#212#200#208#212
+  +#200#208#212#200#208#212#200#208#212#210#217#220#134#177#190#12'A'#175#11' '
+  +#221#10' '#216#10' '#211#10#31#207#10' '#202#9' '#197#9#31#193#9#30#189#9#30
+  +#185#8#30#181#8#28#176#7#29#172#7#29#168#7#29#164#7#28#159#7#28#156#6#28#151
+  +#6#27#148#6#27#144#5#27#140#6'$'#135'I'#138#158#227#231#233#151#157#160'dhjq'
+  +'ux'#188#196#200#200#208#212'}'#131#133'dhjdhj}'#131#133#200#208#212#200#208
+  +#212#176#183#186'}'#131#133#200#208#212#200#208#212'qux'#163#170#173#200#208
+  +#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#203#219#225
+  +#12'N'#156#11' '#221#10' '#216#10' '#211#10#31#207#10' '#202#9' '#197#9#30
+  +#193#9#30#189#9#30#185#8#30#181#8#28#176#7#29#172#7#29#168#7#28#164#7#28#159
+  +#7#28#156#6#28#151#6#27#148#6#27#144#5#27#140#5#31#136#12'Y'#214#227#231#200
+  +#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208
+  +#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212
+  +#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#214
+  +#220#223#227#231#233#238#240#242#184#207#214'X'#147#166#11'0'#200#11' '#221
+  +#10' '#215#10' '#211#10#31#206#10' '#202#9' '#197#9#30#193#9#30#188#9#30#185
+  +#8#30#181#8#28#176#7#29#172#7#29#168#7#28#164#7#28#159#7#28#156#6#28#151#6#27
+  +#148#6#27#143#6#31#139#11'U'#128#161#193#204#210#217#220#200#208#212#200#208
+  +#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212
+  +#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200
+  +#208#212#200#208#212#200#208#212#200#208#212#200#208#212#210#224#228'+r'#149
+  +#12'R'#154#12'F'#173#11'='#184#11' '#225#11' '#221#10' '#215#10' '#211#10#31
+  +#206#10' '#202#9' '#197#10'4'#172#12'Z'#133'I'#138#158':'#128#150#11'M'#141#8
+  +'%'#166#7#29#167#7#28#163#7#28#159#7#28#155#6#28#151#6#27#147#6#27#143#11'U'
+  +#128#161#193#204#210#217#220#200#208#212#200#208#212#200#208#212#200#208#212
+  +#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200
+  +#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208
+  +#212#200#208#212#200#208#212#200#208#212#191#213#219#12'B'#184#11' '#240#11
+  +'!'#235#11'!'#230#11' '#225#11' '#221#10' '#215#10' '#211#10#31#206#10' '#202
+  +#10'0'#179':'#128#150#214#227#231#220#226#228#224#228#231#191#213#219#27'h'
+  +#136#7'!'#165#7#28#163#7#28#159#7#28#155#6#28#151#6#27#147#6#27#143#11'Q'#129
+  +#225#233#236#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200
+  +#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208
+  +#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212
+  +#200#208#212#200#208#212#200#208#212#149#186#198#12'9'#199#11' '#240#11'!'
+  +#234#11' '#229#11' '#225#11' '#220#10' '#215#10' '#211#10#31#206#10' '#201#11
+  +'N'#148#217#229#233#203#211#215#200#208#212#200#208#212#210#217#220#164#196
+  +#206#9';'#148#7#28#163#7#28#159#7#28#155#6#28#151#6#27#147#6#27#143#9'?'#133
+  +#130#173#188#234#237#239#207#214#217#200#208#212#200#208#212#203#211#215#207
+  +#214#217#200#208#212#200#208#212#231#234#236#134#177#190#149#186#198#191#213
+  +#219#220#226#228#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212
+  +#200#208#212#200#208#212#200#208#212#149#186#198#12'R'#155#11'1'#211#11'!'
+  +#234#11' '#229#11' '#225#11' '#220#10' '#215#10' '#211#10#31#206#10' '#201'+'
+  +'v'#142#227#231#233#200#208#212#200#208#212#200#208#212#200#208#212#210#224
+  +#228#11'M'#138#7#28#163#7#28#158#7#28#155#6#28#150#6#27#147#6#27#143#6'$'#138
+  +#10'G'#129'*q'#142#149#186#198#216#224#228#224#228#231#191#213#219#176#203
+  +#212#210#217#220#200#208#212#176#203#212#11'N'#148#10'8'#168#12'Z'#134#223
+  +#230#233#200#208#212#200#208#212#210#217#220#200#208#212#200#208#212#200#208
+  +#212#200#208#212#200#208#212#220#226#228#203#219#225'g'#157#174#12'Z'#139#11
+  +'1'#203#11' '#224#11' '#220#10' '#215#10' '#210#10#31#206#10' '#201#12'V'#139
+  +#234#237#239#200#208#212#200#208#212#200#208#212#200#208#212#187#210#217#10
+  +'D'#143#7#28#163#7#28#158#7#28#155#6#28#150#6#27#147#6#27#143#5#27#139#5#26
+  +#135#6#30#131#11'P~'#179#206#214'I'#138#158#12'N'#157#12'V'#144#161#193#204
+  +#241#243#244'X'#147#166#9','#184#9#30#192#11'D'#153#187#210#217#207#214#217
+  +#234#237#239#149#186#198#225#233#236#203#211#215#200#208#212#200#208#212#200
+  +#208#212#200#208#212#200#208#212#217#223#225#191#213#219#12'A'#177#11' '#224
+  +#11' '#220#10' '#214#10' '#210#10#31#206#9' '#201#11'A'#161#134#177#190#220
+  ,#226#228#200#208#212#200#208#212#234#237#239'I'#138#158#8'.'#156#7#28#163#7
+  +#28#158#7#28#155#6#28#150#6#27#147#6#27#142#5#27#139#5#26#135#6#26#131#11'P~'
+  +#224#235#238#12'R'#151#11' '#225#11'$'#213#12'V'#142#12'Z'#136#11'E'#159#9#31
+  +#196#9#30#191#10'7'#163'I'#138#158#164#196#206'*r'#144#10'H'#140'*r'#144#199
+  +#217#223#203#211#215#200#208#212#200#208#212#200#208#212#200#208#212#203#211
+  +#215#203#219#225#12'R'#151#11' '#224#11' '#219#10' '#214#10' '#210#10#31#205
+  +#9' '#201#9'$'#191#12'Q'#142'g'#157#174#191#213#219#179#206#214'I'#138#158#10
+  +'@'#148#7#29#167#7#28#163#7#28#158#7#28#155#6#28#150#6#27#146#6#27#142#5#27
+  +#139#5#26#135#7''''#130#27'c'#134#255#255#255'+r'#148#11' '#223#10' '#217#10
+  +' '#212#10#31#206#9' '#200#9#31#194#9#30#189#8#30#184#8'&'#172#10'?'#149#7'%'
+  +#162#7#28#163#9'6'#146'g'#157#174#220#226#228#200#208#212#200#208#212#200#208
+  +#212#203#211#215#229#236#239':|'#156#11'-'#209#11' '#224#11'!'#219#10' '#214
+  +#10' '#210#10#31#205#9' '#201#9#31#196#9#30#191#10'3'#168#11'@'#154#10'@'#152
+  +#8')'#165#7#29#170#7#29#166#7#28#163#7#28#158#7#28#154#6#28#150#6#27#146#7'('
+  +#139#27'c'#135'I'#138#158'g'#157#174#164#196#206#236#242#244'+v'#142#11'('
+  +#209#10' '#215#10#31#210#10#31#204#9' '#198#9#30#192#9#30#187#8#30#182#8#28
+  +#176#7#29#171#7#29#166#7#28#161#11'Q'#133#187#210#217#200#208#212#200#208#212
+  +#200#208#212#203#211#215#229#236#239':|'#157#11'-'#213#11' '#229#11' '#224#11
+  +'!'#219#10' '#214#10' '#210#10#31#205#9' '#201#9#31#196#9#30#191#9#30#187#9
+  +#30#183#8#29#179#8#28#175#7#29#170#7#29#166#7#28#162#7#28#158#7#28#154#6#28
+  +#150#6#27#146#10'H'#132#194#216#222#194#216#222'I'#129#172#27'd'#148':'#128
+  +#150#11'='#181#11' '#220#10' '#213#10#31#208#9#31#202#9#31#196#9#30#191#9#30
+  +#186#8#29#180#8#28#175#7#29#169#7#28#165#7' '#157'+v'#142#231#234#236#200#208
+  +#212#200#208#212#200#208#212#200#208#212#191#213#219#12'J'#167#11'!'#233#11
+  +' '#228#11' '#224#11'!'#219#10' '#214#10' '#209#10#31#205#9' '#200#9#31#195#9
+  +#30#191#9#30#187#9#30#183#8#29#179#8#28#175#7#29#170#7#29#166#7#28#162#7#28
+  +#158#7#28#154#6#28#150#6#27#146#28'l'#134#252#252#252'X'#147#166#11')'#227#11
+  +' '#236#11' '#229#11' '#223#10' '#217#10' '#212#10#31#206#9' '#200#9#31#194#9
+  +#30#189#8#30#184#8#29#178#7#28#173#7#29#168#7#28#163#7#28#157#11'L'#134#164
+  +#196#206#194#216#222#196#214#219#217#223#225#200#208#212#227#231#233'I'#138
+  +#158#11'-'#213#11' '#228#11'('#211#11'5'#190#10'$'#208#10' '#209#10#31#205#9
+  +' '#200#9#31#195#9#30#191#9#30#187#8#30#183#8#29#179#8#28#174#7#29#170#7#29
+  +#166#7#28#162#7#28#157#7#28#154#6#28#150#6#27#146#9'C'#133#164#196#206'+v'
+  +#142#11'1'#211#11'!'#234#11' '#227#11' '#222#10' '#215#10#31#210#10#31#204#9
+  +' '#198#10'8'#168#11'@'#157#10'3'#165#8#28#177#7#29#171#7#29#166#7#28#161#7
+  +#28#156#7' '#149#9'?'#136#9'?'#133#12'Z'#238#240#242#200#208#212#203#211#215
+  +#187#210#217#12'Z'#139'+r'#148'X'#147#166'v'#167#182#12'V'#142#10'$'#204#10
+  +#31#205#9' '#200#9#31#195#9#30#191#9#30#187#8#30#183#8#29#179#8#28#174#7#29
+  +#170#7#29#166#7#28#162#7#28#157#7#28#154#6#28#150#6#27#146#6#31#141#27'h'#134
+  +#224#235#238':'#128#150#11'9'#191#11' '#225#11' '#220#10' '#213#10#31#208#10
+  +#31#202#11'N'#148'g'#157#174#194#216#222'g'#157#174#11'M'#141#7#29#169#7#28
+  +#165#7#28#159#7#28#154#6#27#149#6#27#144#5#27#139#9'C'#130#187#210#217#200
+  +#208#212#200#208#212#217#223#225#241#243#244#227#231#233#217#223#225#224#228
+  +#231#134#177#190#11'A'#167#10#31#205#9' '#200#9#31#195#9#30#191#9#30#187#8#30
+  +#182#8#29#178#8#28#174#7#29#170#7#29#166#7#28#162#8'2'#147#8'-'#146#6#27#150
+  +#6#27#146#6#31#141#12'Z'#206#222#228#229#236#239#12'R'#151#11' '#224#10' '
+  +#217#10' '#212#10#31#206#10'4'#178'g'#157#174#220#226#228#200#208#212#220#226
+  +#228'g'#157#174#8'2'#154#7#28#163#7#28#157#6#28#152#6#27#148#6#27#143#7'1'
+  +#134#27'c'#135#209#225#230#200#208#212#200#208#212#200#208#212#200#208#212
+  +#200#208#212#200#208#212#207#214#217#134#177#190#10'0'#187#10#31#205#9' '#200
+  +#9#31#195#9#30#191#9#30#187#8#30#182#8#29#178#8#28#174#7#29#170#7'%'#161#11
+  +'Q'#135'g'#157#174'g'#157#174#11'Q'#131#8'1'#139#11'U'#129#164#196#206#221
+  +#232#235'X'#147#166#12'A'#176#11' '#222#10' '#215#10#31#210#10#31#204#11'A'
+  +#163#194#216#222#200#208#212#200#208#212#200#208#212#194#216#222#10'@'#145#7
+  +#28#161#7#28#156#6#28#151#6#27#146#9':'#135'X'#147#166#210#224#228#214#220
+  +#223#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212
+  +#214#220#223'g'#157#174#10','#192#10#31#204#9' '#199#9','#182#12'^'#130#12'Q'
+  +#141#11'I'#147#8#29#178#8#28#174#7#29#170#8'.'#156#134#177#190#224#228#231
+  +#220#226#228#217#229#233'g'#157#174#164#196#206#194#216#222#27'd'#147#11'9'
+  +#191#11' '#225#11' '#220#10' '#214#10#31#208#10#31#202#10'4'#175'g'#157#174
+  +#224#228#231#200#208#212#224#228#231'g'#157#174#8'2'#152#7#28#159#7#28#154#6
+  +#27#149#6#27#144#10'H'#131#187#210#217#200#208#212#200#208#212#200#208#212
+  +#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#224#228#231'I'
+  +#138#158#11'8'#177#10#31#204#10'('#190#27'h'#138#199#217#223#238#240#242'g'
+  ,#157#174#9'.'#164#8#28#174#7#29#169#9'7'#151#149#186#198#200#208#212#200#208
+  +#212#200#208#212#220#226#228#210#217#220#191#213#219#12'F'#173#11' '#229#11
+  +' '#224#10' '#217#10' '#212#10#31#206#9' '#200#9#31#194#11'I'#150'g'#157#174
+  +#179#206#214'g'#157#174#10'H'#141#7#28#163#7#28#158#7#28#153#6#27#148#6#27
+  +#143#9'?'#132'I'#138#158#223#230#233#203#211#215#200#208#212#200#208#212#200
+  +#208#212#200#208#212#200#208#212#200#208#212#210#217#220#210#224#228'g'#157
+  +#174#12'Z'#135#12'V'#140#206#222#228#210#217#220#200#208#212#217#229#233#11
+  +'Q'#138#8#28#174#7#29#169#10'H'#141#194#216#222#200#208#212#200#208#212#200
+  +#208#212#200#208#212#200#208#212#223#230#233#12'Z'#139#12'A'#177#11'5'#192#10
+  +'('#204#10#31#210#10#31#204#9' '#198#9#30#192#9#30#188#10'3'#164#10'?'#151#9
+  +'2'#157#7#29#166#7#28#161#7#28#156#6#28#151#6#27#146#5#27#141#5#26#136#8'5'
+  +#130':'#128#150#234#237#239#200#208#212#200#208#212#200#208#212#200#208#212
+  +#200#208#212#200#208#212#200#208#212#200#208#212#214#220#223#223#230#233#206
+  +#222#228#210#217#220#200#208#212#200#208#212#220#226#228'g'#157#174#11'Q'#137
+  +':'#128#150'g'#157#174#210#224#228#200#208#212#200#208#212#200#208#212#200
+  +#208#212#200#208#212#217#223#225#209#225#230#194#216#222'v'#167#182#12'R'#147
+  +#10#31#208#10#31#203#9#31#196#9#30#191#9#30#186#8#29#181#8#28#175#7#29#170#7
+  +#29#165#7#28#159#7#28#154#6#27#150#6#27#144#5#27#140#5#26#135#8','#129'X'#147
+  +#166#220#226#228#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212
+  +#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200
+  +#208#212#200#208#212#200#208#212#200#208#212#238#240#242#231#234#236#227#231
+  +#233#214#220#223#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212
+  +#200#208#212#200#208#212#200#208#212#200#208#212#231#234#236':'#128#150#10
+  +''''#196#9' '#201#9#31#194#9#30#189#9#30#184#8#29#179#8#28#173#7#29#168#7#28
+  +#163#7#28#158#7#28#153#6#27#148#8'6'#137#12'^~'#11'P'#128#12'Y~'#187#210#217
+  +#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200
+  +#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208
+  +#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212
+  +#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200
+  +#208#212#200#208#212#200#208#212#200#208#212#187#210#217#11'I'#156#10#31#204
+  +#9' '#198#9#30#193#9#30#188#8#30#183#8#28#177#7#29#172#7#29#166#7#28#161#7#28
+  +#156#6#28#151#7'('#143'+v'#142#223#230#233#234#237#239#210#224#228#217#223
+  +#225#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212
+  +#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200
+  +#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208
+  +#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212
+  +#200#208#212#200#208#212#200#208#212#220#226#228'g'#157#174#11'8'#176#10#31
+  +#203#9'('#188#11'I'#150#10'/'#171#8#29#181#8#28#175#7#29#170#7#29#165#7#28
+  +#159#7#28#155#6#27#150#6#27#144':'#128#150#224#228#231#200#208#212#200#208
+  +#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212
+  +#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200
+  +#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208
+  +#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212
+  +#200#208#212#200#208#212#200#208#212#200#208#212#203#211#215#199#217#223':|'
+  +#155#11'I'#154'+r'#146#164#196#206'I'#138#158#9'.'#165#8#28#174#7#29#168#11
+  +'M'#138#12'Z'#130#10'H'#135#6#27#148#6#27#143#11'Q'#129#223#230#233#200#208
+  +#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212
+  +#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200
+  +#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208
+  +#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212
+  +#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#203
+  +#211#215#225#233#236#149#186#198#223#230#233#203#211#215#179#206#214#10'?'
+  +#151#7#28#172#8'.'#157'g'#157#174#241#243#244#164#196#206#11'U'#129#11'Q'#130
+  +'X'#147#166#216#224#228#200#208#212#200#208#212#200#208#212#200#208#212#200
+  +#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208
+  +#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212
+  +#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200
+  +#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208
+  +#212#200#208#212#200#208#212#200#208#212#200#208#212#210#217#220#200#208#212
+  +#200#208#212#210#224#228#12'U'#135#10'@'#148#11'M'#138#191#213#219#200#208
+  +#212#220#226#228#179#206#214#187#210#217#220#226#228#200#208#212#200#208#212
+  +#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200
+  +#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208
+  +#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212
+  ,#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200
+  +#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208
+  +#212#200#208#212#200#208#212#200#208#212#200#208#212#224#228#231#187#210#217
+  +#179#206#214#134#177#190#231#234#236#200#208#212#200#208#212#210#217#220#200
+  +#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208#212#200#208
+  +#212#0#0#0
+]);
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAPleaseWaitForm.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAPleaseWaitForm.pas
new file mode 100644
index 0000000..4dc71d3
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAPleaseWaitForm.pas	
@@ -0,0 +1,118 @@
+unit uDAPleaseWaitForm;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  {$IFDEF FPC}LResources,{$ENDIF}
+  uROPleaseWaitForm,
+  Classes;
+
+type
+  IROPleaseWaitForm = interface
+    ['{32003A95-B7F4-4ED6-B65E-78B4204DF2AF}']
+    procedure Show(const iCaption:string=''); overload;
+    procedure Hide;
+    procedure Free;
+  end;
+
+function CreatePleaseWaitForm(aOwner: TComponent; const aCaption: string; aShow: boolean; aLogo:string; aWindowCaption:string=''): IROPleaseWaitForm; overload;
+function CreatePleaseWaitForm(aOwner: TComponent; const aCaption: string; aShow: boolean = true): IROPleaseWaitForm; overload;
+function CreatePleaseWaitForm(const aCaption: string; aShow: boolean = true): IROPleaseWaitForm; overload;
+
+implementation
+
+uses
+  Graphics,
+  SysUtils;
+
+{$IFNDEF FPC}  
+  {$IFDEF MSWINDOWS}
+    {$R IDE\DataAbstract_IDE_AdditionalResources.res}
+  {$ENDIF}
+
+  {$IFNDEF MSWINDOWS}
+    {$R IDE/DataAbstract_IDE_AdditionalResources.res}
+  {$ENDIF}
+{$ENDIF FPC}
+
+type
+  TROPleaseWaitFormWrapper = class(TInterfacedObject, IROPleaseWaitForm)
+  private
+    fForm: TPleaseWaitForm;
+  public
+    constructor Create(aForm: TPleaseWaitForm);
+    destructor Destroy; override;
+    procedure Show(const iCaption:string=''); overload;
+    procedure Hide;
+    procedure Free;
+  end;
+
+function CreatePleaseWaitForm(aOwner: TComponent; const aCaption: string; aShow: boolean; aLogo:string; aWindowCaption:string): IROPleaseWaitForm; overload;
+var
+  lBitmap: TBitmap;
+begin
+  if aWindowCaption = '' then aWindowCaption := 'Data Abstract';
+  lBitmap := TBitmap.Create();
+  lBitmap.LoadFromResourceName(hInstance, aLogo);
+  result := TROPleaseWaitFormWrapper.Create(TPleaseWaitForm.Create(aOwner, aCaption, aWindowCaption, lBitmap, true));
+  if aShow then result.Show();
+end;
+
+function CreatePleaseWaitForm(aOwner: TComponent; const aCaption: string; aShow: boolean = true): IROPleaseWaitForm;
+begin
+  result := CreatePleaseWaitForm(aOWner, aCaption, aShow, 'dalogo');
+end;
+
+function CreatePleaseWaitForm(const aCaption: string; aShow: boolean = true): IROPleaseWaitForm;
+begin
+  result := CreatePleaseWaitForm(nil, aCaption, aShow);
+end;
+
+{ TROPleaseWaitFormWrapper }
+
+constructor TROPleaseWaitFormWrapper.Create(aForm: TPleaseWaitForm);
+begin
+  fForm := aForm;
+end;
+
+destructor TROPleaseWaitFormWrapper.Destroy;
+begin
+  fForm.Close;
+  FreeAndNil(fForm);
+  inherited;
+end;
+
+procedure TROPleaseWaitFormWrapper.Free;
+begin
+  { no-op }
+end;
+
+procedure TROPleaseWaitFormWrapper.Hide;
+begin
+  fForm.Hide();
+end;
+
+procedure TROPleaseWaitFormWrapper.Show(const iCaption: string='');
+begin
+  fForm.Show(iCaption);
+end;
+
+{$IFDEF FPC}
+initialization
+  {$I IDE/DataAbstract_IDE_AdditionalResources.lrs}
+{$ENDIF}
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAPostgresInterfaces.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAPostgresInterfaces.pas
new file mode 100644
index 0000000..8266dc1
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAPostgresInterfaces.pas	
@@ -0,0 +1,573 @@
+unit uDAPostgresInterfaces;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses 
+  SysUtils,
+  uDAInterfaces, uDAEngine, uROClasses;
+
+type
+  { IDAPostgresConnection
+      For identification purposes Implemented by all Postgres connections }
+  IDAPostgresConnection = interface(IDAConnection)
+    ['{D8EADB7E-7AA0-48FF-9E7D-34853F999BFC}']
+  end;
+
+  TDAPostgresDriver = class(TDAEDriver)
+  protected
+    function GetDefaultConnectionType(const AuxDriver: string): string; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  public
+  end;
+
+  TDAEPostgresConnection = class(TDAEConnection, IDAPostgresConnection, IDACanQueryDatabaseNames, IDAUseGenerators)
+  protected
+    function DoGetLastAutoInc(const GeneratorName: string): integer; override;
+    procedure DoGetTableFields(const aTableName: string; out Fields: TDAFieldCollection); override;
+    procedure DoGetTableNames(out List: IROStrings); override;
+    procedure DoGetViewNames(out List: IROStrings); override;
+    procedure DoGetStoredProcedureNames(out List: IROStrings); override;
+    procedure DoGetForeignKeys(out ForeignKeys: TDADriverForeignKeyCollection); override;
+    function GetSPSelectSyntax(HasArguments: Boolean): string; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF} 
+    procedure DoGetStoredProcedureParams(const aStoredProcedureName: string; out Params: TDAParamCollection); override;
+    function IdentifierNeedsQuoting(const iIdentifier: string): boolean; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    // IDACanQueryDatabaseNames
+    function GetDatabaseNames: IROStrings;
+    // IDAUseGenerators
+    function GetNextAutoinc(const GeneratorName: string): integer; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  end;
+
+function Postgres_GetDatabaseNames(aConnection: TDAEConnection): IROStrings;
+function Postgres_DoGetLastAutoInc(const GeneratorName: string; Query: IDADataset): integer;
+function Postgres_GetNextAutoInc(const GeneratorName: string; Query: IDADataset): integer;
+procedure Postgres_DoGetTableFields(const aTableName: string; Query: IDADataset; out Fields: TDAFieldCollection);
+procedure Postgres_DoGetNames(Query: IDADataset; AList: IROStrings; AObjectType: TDAObjecttype);
+function PostgresDataTypeToDA(aDataType: string; Unicode: Boolean=False): TDADataType;
+procedure Postgres_DoGetForeignKeys(Query: IDADataset;ForeignKeys: TDADriverForeignKeyCollection);
+function Postgres_GetSPSelectSyntax(HasArguments: Boolean): String;
+procedure Postgres_DoGetStoredProcedureParams(const aStoredProcedureName: string; Query: IDADataset; out Params: TDAParamCollection);
+function Postgres_IdentifierNeedsQuoting(const iIdentifier: string): boolean;
+
+const
+  PostgreSQL_DriverType = 'PostgreSQL';
+  
+implementation
+
+var
+  postgres_reservedwords: array of string;
+
+const
+  Postgres_MasterDatabase     = 'template1';
+  Postgres_GetDatabaseNames_SQL = 'SELECT datname FROM pg_database ORDER BY datname';
+
+function PostgresDataTypeToDA(aDataType: string; Unicode: Boolean): TDADataType;
+begin
+  aDataType := LowerCase(aDataType);
+  if pos(' ', aDataType) <> 0 then Delete(aDataType, Pos(' ', aDataType), MaxInt);
+  if (aDAtaType = 'varchar') or (aDataType = 'character varying') or
+    (aDataType = 'character') or (aDataType = 'char') or
+    (aDataType = '"char"') or (aDataType = 'name') then begin
+    if Unicode then
+      Result := datWideString
+    else
+      Result := datString;
+  end
+  else if aDataType = 'text' then begin
+    if Unicode then
+      Result := datWideMemo
+    else
+      Result := datMemo;
+  end
+  else if (aDataType = 'blob') or (aDataType = 'binary') or
+    (aDataType = 'varbinary') or (aDataType = 'bytea') or
+    (aDataType = 'binary large object') then
+    Result := datBlob
+  else if (aDataType = 'date') or (aDataType = 'absdate') or
+    (aDataType = 'time') or (aDataType = 'timetz') or
+    (aDataType = 'datetime') or
+    (aDataType = 'timestamp') or (aDataType = 'timestamptz') or
+    (aDataType = 'year') then
+    result := datDateTime
+  else if (aDataType = 'single') or
+    (aDataType = 'real') or (aDataType = 'float4') then
+    Result := datSingleFloat
+  else if (aDataType = 'double') or
+    (aDataType = 'float') or
+    (aDataType = 'doubleprecision') or (aDataType = 'float8') then
+    Result := datFloat
+  else if (aDataType = 'bit') or (aDataType = 'boolean') or (aDataType = 'bool') then
+    Result := datBoolean
+  else if (aDataType = 'bigint') or (aDataType = 'int8') then
+    result := datLargeInt
+  else if (aDataType = 'decimal') or (aDataType = 'numeric') then
+    result := datDecimal
+  else if (aDataType = 'money') then
+    result := datCurrency
+  else if (aDataType = 'serial') or (aDataType = 'serial4') then
+    result := datAutoInc
+  else if (aDataType = 'bigserial') or (aDataType = 'serial8') then
+    result := datLargeAutoInc
+  else if (aDataType = 'smallint') or (aDataType = 'int2') then
+    result := datSmallInt
+  else if (aDataType = 'shortint') or (aDataType = 'int1') then
+    result := datShortInt
+  else if (aDataType = 'enum') or
+    (aDataType = 'int4') or (adatatype = 'int') or (adatatype = 'integer') or
+    (aDataType = 'tinyint') then
+    result := datInteger
+  else
+    result := datUnknown;
+end;
+
+function Postgres_GetDatabaseNames(aConnection: TDAEConnection): IROStrings;
+begin
+  Result := Engine_GetDatabaseNames(aConnection, Postgres_MasterDatabase, Postgres_GetDatabaseNames_SQL);
+end;
+
+function Postgres_DoGetLastAutoInc(const GeneratorName: string; Query: IDADataset): integer;
+begin
+  try
+    Query.SQL := 'SELECT currval(''' + GeneratorName + ''')';
+    Query.Open;
+    result := Query.Fields[0].Value;
+  finally
+    Query := nil;
+  end;
+end;
+
+function Postgres_GetNextAutoInc(const GeneratorName: string; Query: IDADataset): integer;
+begin
+  try
+    Query.SQL := 'SELECT nextval(''' + GeneratorName + ''')';
+    Query.Open;
+    result := Query.Fields[0].Value;
+  finally
+    Query := nil;
+  end;
+end;
+
+procedure Postgres_DoGetTableFields(const aTableName: string; Query: IDADataset; out Fields: TDAFieldCollection);
+const
+  main_sql                    = 'SELECT COLUMN_NAME, DATA_TYPE, IS_NULLABLE, COLUMN_DEFAULT, CHARACTER_MAXIMUM_LENGTH, CHARACTER_SET_NAME, NUMERIC_PRECISION, NUMERIC_SCALE ' +
+    'FROM INFORMATION_SCHEMA.COLUMNS ' +
+    'WHERE TABLE_NAME=''{tbl}'' and TABLE_SCHEMA=''{schem}'' ' +
+    'ORDER BY ORDINAL_POSITION';
+  pk_sql                      = 'SELECT COLUMN_NAME ' +
+    'FROM INFORMATION_SCHEMA.KEY_COLUMN_USAGE ' +
+    'WHERE TABLE_NAME=''{tbl}'' and TABLE_SCHEMA=''{schem}'' AND CONSTRAINT_NAME like ''%_pkey''';
+var
+  fld                         : TDAField;
+  lSchema, lTable             : string;
+  p1                          : integer;
+  s                           : string;
+begin
+  Fields := TDAFieldCollection.Create(nil);
+  try
+    {
+    Query.SQL := 'SELECT * FROM ' + aTableName + ' WHERE 1=0';
+    Query.Open;
+    Fields.Assign(Query.Fields);
+    Query.Close;
+    }
+    Query.SQL := main_sql;
+    lTable := aTableName;
+    if pos('.', lTable) = 0 then begin
+      lSchema := 'public'
+    end else begin
+      lSchema := copy(lTable, 1, pos('.', lTable) - 1);
+      Delete(lTable, 1, pos('.', lTable));
+    end;
+    Query.SQL := StringReplace(Query.SQL, '{tbl}', lTable, []);
+    Query.SQL := StringReplace(Query.SQL, '{schem}', lSchema, []);
+    Query.Open;
+    while not Query.Eof do begin
+      fld := Fields.Add;
+      fld.Name:=Query.Fields[0].AsString;
+      fld.Required := Query.Fields[2].AsString <> 'YES';
+      fld.DefaultValue := Query.Fields[3].AsString;
+      fld.DataType := PostgresDataTypeToDA(Query.Fields[1].asString, sametext(Query.Fields[5].AsString, 'utf8') or sametext(Query.Fields[5].AsString, 'utf16'));
+      if fld.DataType = datDecimal then begin
+        fld.DecimalPrecision := Query.Fields[6].asInteger;
+        fld.DecimalScale := Query.Fields[7].asInteger;
+      end;
+      if Query.Fields[1].asString = '"char"' then fld.size := 1
+      else if Query.Fields[1].asString = 'name' then fld.size := 63
+      else fld.Size := Query.Fields[4].AsInteger;
+
+      if fld.DefaultValue <> '' then begin
+        if pos('nextval(', fld.DefaultValue) = 1 then begin
+          case fld.DataType of
+            datInteger: fld.DataType := datAutoInc;
+            datLargeInt: fld.DataType := datLargeAutoInc;
+          else
+            fld.DefaultValue := '';
+          end;
+          if fld.DefaultValue <> '' then begin
+            s := fld.DefaultValue;
+            p1 := pos('''', s);
+            Delete(s, 1, p1);
+            p1 := pos('''', s);
+            fld.GeneratorName := Copy(s, 1, p1 - 1);
+            fld.DefaultValue := '';
+          end;
+        end else if not TestDefaultValue(fld.DefaultValue, fld.DataType) then begin
+          fld.DefaultValue := '';
+        end;
+      end;
+      Query.Next;
+    end;
+    Query.Close;
+    Query.SQL := pk_sql;
+    Query.SQL := StringReplace(Query.SQL, '{tbl}', lTable, []);
+    Query.SQL := StringReplace(Query.SQL, '{schem}', lSchema, []);
+    Query.Open;
+    while not Query.Eof do begin
+      fld := Fields.FindField(Query.Fields[0].AsString);
+      if fld <> nil then
+        fld.InPrimaryKey := true;
+      Query.Next;
+    end;
+  finally
+    Query := nil;
+  end;
+end;
+
+procedure Postgres_DoGetNames(Query: IDADataset; AList: IROStrings; AObjectType: TDAObjecttype);
+const
+  c_select = 'SELECT pg_namespace.nspname, pg_class.relname FROM pg_class, pg_namespace '+
+             'WHERE (pg_class.relkind = ''r'') AND (pg_namespace.oid = pg_class.relnamespace) AND '+
+             '(pg_namespace.nspname NOT LIKE ''pg_%'') AND (pg_namespace.nspname NOT LIKE ''information_schema'') ORDER BY 1,2';
+  c_stored = 'SELECT pg_namespace.nspname, pg_proc.proname '+
+             'FROM pg_namespace, pg_proc '+
+             'WHERE pg_namespace.oid = pg_proc.pronamespace and '+
+             '(pg_namespace.nspname NOT LIKE ''pg_%'') AND (pg_namespace.nspname NOT LIKE ''information_schema'') ORDER BY 1,2';
+  c_view =   'SELECT pg_namespace.nspname, pg_class.relname FROM pg_class, pg_namespace '+
+             'WHERE (pg_class.relkind = ''v'') AND (pg_namespace.oid = pg_class.relnamespace) AND '+
+             '(pg_namespace.nspname NOT LIKE ''pg_%'') AND (pg_namespace.nspname NOT LIKE ''information_schema'') ORDER BY 1,2';
+begin
+  try
+    case AObjectType of
+      dotTable: Query.SQL := c_select;
+      dotProcedure: Query.SQL := c_stored;
+      dotView: Query.SQL := c_view;
+    else
+    end;
+    Query.Open;
+    while not Query.EOF do begin
+      if SameText(Query.fields[0].AsString, 'public') then
+        AList.Add(Trim(Query.Fields[1].AsString))
+      else
+        AList.Add(Trim(Query.Fields[0].AsString)+'.'+Trim(Query.Fields[1].AsString));
+      Query.Next;
+    end;
+    Query.Close;
+  finally
+    Query := nil;
+  end;
+end;
+
+procedure Postgres_DoGetForeignKeys(Query: IDADataset;ForeignKeys: TDADriverForeignKeyCollection);
+const
+  s_sql = 'select c.conname,s.seq,fn.nspname,f.relname,fa.attname,pn.nspname,p.relname,pa.attname '+
+          'from pg_constraint c join pg_class p ON (c.conrelid = p.oid) join pg_namespace pn ON (p.relnamespace = pn.oid) '+
+          'join pg_class f ON (c.confrelid = f.oid) join pg_namespace fn ON (f.relnamespace = fn.oid) '+
+          'join (select s.seq from generate_series(0,100) as s(seq)) as s on ( s.seq BETWEEN array_lower(conkey,1) and array_upper(conkey,1)) '+
+          'join pg_attribute pa ON ((c.conrelid = pa.attrelid) and (pa.attnum = c.conkey[s.seq])) '+
+          'join pg_attribute fa ON ((c.confrelid = fa.attrelid) and (fa.attnum = c.confkey[s.seq])) '+
+          'WHERE c.contype=''f'' ORDER by 1,3,4,2';
+var
+  lCurrConstraint: string;
+  lCurrFK: TDADriverForeignKey;
+begin
+  lCurrConstraint:='';
+  lCurrFK := nil;
+  ForeignKeys.Clear;
+  try
+    Query.SQL := s_sql;
+    Query.Open;
+    while not Query.Eof do begin
+      if lCurrConstraint <> Query.Fields[0].AsString then begin
+        lCurrConstraint := Query.Fields[0].AsString;
+        lCurrFK := ForeignKeys.Add();
+        with lCurrFK do begin
+          Name := Trim(Query.Fields[0].AsString);
+          if not SameText(Query.fields[2].AsString, 'public') then
+            PKTable := Format('%s.%s', [Trim(Query.Fields[2].AsString), Trim(Query.Fields[3].AsString)])
+          else
+            PKTable := Trim(Query.Fields[3].AsString);
+          if not SameText(Query.fields[5].AsString, 'public') then
+            FKTable := Format('%s.%s', [Trim(Query.fields[5].AsString), Trim(Query.fields[6].AsString)])
+          else
+            FKTable := Trim(Query.fields[6].AsString);
+          PKField := Trim(Query.Fields[4].AsString);
+          FKField := Trim(Query.Fields[7].AsString);
+        end
+      end  
+      else
+        with lCurrFK do begin
+          PKField := PKField + ';' + TrimRight(Query.Fields[4].AsString);
+          FKField := FKField + ';' + TrimRight(Query.Fields[7].AsString);
+        end;
+      Query.Next;
+    end;
+    Query.Close;
+  finally
+    Query := nil;
+  end;
+end;
+
+function Postgres_GetSPSelectSyntax(HasArguments: Boolean): String;
+begin
+  if HasArguments then
+    Result := 'SELECT * FROM {0}({1})'
+  else
+    Result := 'SELECT * FROM {0}()';
+end;
+
+procedure Postgres_DoGetStoredProcedureParams(const aStoredProcedureName: string; Query: IDADataset; out Params: TDAParamCollection);
+const
+  s_sql= 'select ns.nspname as schema,p.proname as name, ' +
+      //   '/*  p.pronargs,p.proretset,p.prorettype,p.proargtypes,p.proallargtypes,p.proargmodes,p.proargnames,*/ ' +
+         'COALESCE(s.seq,1) as paramnumber,ipt.typname as paramtype, ' +
+         'COALESCE(p.proargmodes[s.seq], case when (p.pronargs < s.seq)  then ''r'' else ''i'' end) as parammode, ' +
+         'COALESCE(p.proargnames[s.seq], case when (p.proargmodes[s.seq] is null) and (p.pronargs < s.seq)  then ''result'' else ''$''||s.seq end) as paramname '+
+         'from pg_proc p '+
+         'join pg_namespace ns on ((p.pronamespace = ns.oid)) '+ // and (ns.nspname not like ''pg_%'') and (ns.nspname <> ''information_schema'')) ' +
+         'join (select s.seq from generate_series(0,100) as s(seq)) as s on (s.seq between COALESCE(array_lower(p.proallargtypes,1),1) and COALESCE(array_upper(p.proallargtypes,1),p.pronargs+1)) ' +
+         'join pg_type ipt on (COALESCE(p.proargtypes[s.seq-1],p.proallargtypes[s.seq-1],prorettype) =ipt.oid) ';
+ s_where='where (ns.nspname = ''%s'') and (p.proname = ''%s'') ';
+ s_order='order by schema,name,paramnumber';
+var
+  schema, proc:string;
+  s: string;
+begin
+  Params := TDAParamCollection.Create(nil);
+  if Pos('.', aStoredProcedureName) > 0 then
+  begin
+    schema := Trim(Copy(aStoredProcedureName, 1, Pos('.', aStoredProcedureName) - 1));
+    proc := Trim(Copy(aStoredProcedureName, Pos('.', aStoredProcedureName) + 1, Length(aStoredProcedureName)));
+  end else
+  begin
+    schema := 'public';
+    proc := aStoredProcedureName;
+  end;
+  Query.SQL:= s_sql+ Format(s_where,[schema,proc])+s_order;
+  Query.Open;
+  while not Query.EOF do begin
+    With Params.Add do begin
+      s:= Query.Fields[4].AsString;
+      if s = 'r' then ParamType:=daptResult
+      else if s = 'o' then ParamType:=daptOutput
+      else if s = 'b' then ParamType:=daptInputOutput
+      else ParamType:=daptInput;
+      Name := Query.Fields[5].AsString;
+      DataType := PostgresDataTypeToDA(Query.Fields[3].AsString);
+    end;
+    Query.Next;
+  end;
+end;
+
+function Postgres_IdentifierNeedsQuoting(const iIdentifier: string): boolean;
+begin
+  Result:= (LowerCase(iIdentifier) <> iIdentifier) or TestIdentifier(iIdentifier, postgres_reservedwords);
+end;
+
+{ TDAEPostgresConnection }
+
+procedure TDAEPostgresConnection.DoGetForeignKeys(
+  out ForeignKeys: TDADriverForeignKeyCollection);
+begin
+  inherited;
+  Postgres_DoGetForeignKeys(GetDatasetClass.Create(Self),ForeignKeys);
+end;
+
+function TDAEPostgresConnection.DoGetLastAutoInc(
+  const GeneratorName: string): integer;
+begin
+  Result := Postgres_DoGetLastAutoInc(GeneratorName, GetDatasetClass.Create(Self));
+end;
+
+procedure TDAEPostgresConnection.DoGetStoredProcedureNames(
+  out List: IROStrings);
+begin
+  inherited;
+  Postgres_DoGetNames(GetDatasetClass.Create(Self),List,dotProcedure);
+end;
+
+procedure TDAEPostgresConnection.DoGetStoredProcedureParams(
+  const aStoredProcedureName: string; out Params: TDAParamCollection);
+begin
+  inherited;
+  exit;
+//  Postgres_DoGetStoredProcedureParams(aStoredProcedureName, GetDatasetClass.Create(Self), Params);
+end;
+
+procedure TDAEPostgresConnection.DoGetTableFields(const aTableName: string;
+  out Fields: TDAFieldCollection);
+begin
+  Postgres_DoGetTableFields(aTableName, GetDatasetClass.Create(Self), Fields);
+end;
+
+procedure TDAEPostgresConnection.DoGetTableNames(out List: IROStrings);
+begin
+  inherited;
+  Postgres_DoGetNames(GetDatasetClass.Create(Self),List,dotTable);
+end;
+
+procedure TDAEPostgresConnection.DoGetViewNames(out List: IROStrings);
+begin
+  inherited;
+  Postgres_DoGetNames(GetDatasetClass.Create(Self), List, dotView);
+end;
+
+function TDAEPostgresConnection.GetDatabaseNames: IROStrings;
+begin
+  Result := Postgres_GetDatabaseNames(Self);
+end;
+
+function TDAEPostgresConnection.GetNextAutoinc(
+  const GeneratorName: string): integer;
+begin
+  Result := Postgres_GetNextAutoInc(GeneratorName, GetDatasetClass.Create(Self));
+end;
+
+function TDAEPostgresConnection.GetSPSelectSyntax(
+  HasArguments: Boolean): string;
+begin
+  Result:= Postgres_GetSPSelectSyntax(HasArguments);
+end;
+
+function TDAEPostgresConnection.IdentifierNeedsQuoting(
+  const iIdentifier: string): boolean;
+begin
+  Result:= inherited IdentifierNeedsQuoting(iIdentifier) or Postgres_IdentifierNeedsQuoting(iIdentifier);
+end;
+
+{ TDAPostgresDriver }
+
+function TDAPostgresDriver.GetDefaultConnectionType(
+  const AuxDriver: string): string;
+begin
+  Result:= PostgreSQL_DriverType;
+end;
+
+procedure postgres_InitializeReservedWords;
+begin
+  SetLength(postgres_reservedwords, 95);
+  // sorted with TStringList.Sort (bds2007)  
+  postgres_reservedwords[0] := 'ALL';
+  postgres_reservedwords[1] := 'ANALYSE';
+  postgres_reservedwords[2] := 'ANALYZE';
+  postgres_reservedwords[3] := 'AND';
+  postgres_reservedwords[4] := 'ANY';
+  postgres_reservedwords[5] := 'ARRAY';
+  postgres_reservedwords[6] := 'AS';
+  postgres_reservedwords[7] := 'ASC';
+  postgres_reservedwords[8] := 'ASYMMETRIC';
+  postgres_reservedwords[9] := 'AUTHORIZATION';
+  postgres_reservedwords[10] := 'BETWEEN';
+  postgres_reservedwords[11] := 'BINARY';
+  postgres_reservedwords[12] := 'BOTH';
+  postgres_reservedwords[13] := 'CASE';
+  postgres_reservedwords[14] := 'CAST';
+  postgres_reservedwords[15] := 'CHECK';
+  postgres_reservedwords[16] := 'COLLATE';
+  postgres_reservedwords[17] := 'COLUMN';
+  postgres_reservedwords[18] := 'CONSTRAINT';
+  postgres_reservedwords[19] := 'CREATE';
+  postgres_reservedwords[20] := 'CROSS';
+  postgres_reservedwords[21] := 'CURRENT_DATE';
+  postgres_reservedwords[22] := 'CURRENT_ROLE';
+  postgres_reservedwords[23] := 'CURRENT_TIME';
+  postgres_reservedwords[24] := 'CURRENT_TIMESTAMP';
+  postgres_reservedwords[25] := 'CURRENT_USER';
+  postgres_reservedwords[26] := 'DEFAULT';
+  postgres_reservedwords[27] := 'DEFERRABLE';
+  postgres_reservedwords[28] := 'DESC';
+  postgres_reservedwords[29] := 'DISTINCT';
+  postgres_reservedwords[30] := 'DO';
+  postgres_reservedwords[31] := 'ELSE';
+  postgres_reservedwords[32] := 'END';
+  postgres_reservedwords[33] := 'EXCEPT';
+  postgres_reservedwords[34] := 'FALSE';
+  postgres_reservedwords[35] := 'FOR';
+  postgres_reservedwords[36] := 'FOREIGN';
+  postgres_reservedwords[37] := 'FREEZE';
+  postgres_reservedwords[38] := 'FROM';
+  postgres_reservedwords[39] := 'FULL';
+  postgres_reservedwords[40] := 'GRANT';
+  postgres_reservedwords[41] := 'GROUP';
+  postgres_reservedwords[42] := 'HAVING';
+  postgres_reservedwords[43] := 'ILIKE';
+  postgres_reservedwords[44] := 'IN';
+  postgres_reservedwords[45] := 'INITIALLY';
+  postgres_reservedwords[46] := 'INNER';
+  postgres_reservedwords[47] := 'INTERSECT';
+  postgres_reservedwords[48] := 'INTO';
+  postgres_reservedwords[49] := 'IS';
+  postgres_reservedwords[50] := 'ISNULL';
+  postgres_reservedwords[51] := 'JOIN';
+  postgres_reservedwords[52] := 'LEADING';
+  postgres_reservedwords[53] := 'LEFT';
+  postgres_reservedwords[54] := 'LIKE';
+  postgres_reservedwords[55] := 'LIMIT';
+  postgres_reservedwords[56] := 'LOCALTIME';
+  postgres_reservedwords[57] := 'LOCALTIMESTAMP';
+  postgres_reservedwords[58] := 'NATURAL';
+  postgres_reservedwords[59] := 'NEW';
+  postgres_reservedwords[60] := 'NOT';
+  postgres_reservedwords[61] := 'NOTNULL';
+  postgres_reservedwords[62] := 'NULL';
+  postgres_reservedwords[63] := 'OFF';
+  postgres_reservedwords[64] := 'OFFSET';
+  postgres_reservedwords[65] := 'OLD';
+  postgres_reservedwords[66] := 'ON';
+  postgres_reservedwords[67] := 'ONLY';
+  postgres_reservedwords[68] := 'OR';
+  postgres_reservedwords[69] := 'ORDER';
+  postgres_reservedwords[70] := 'OUTER';
+  postgres_reservedwords[71] := 'OVERLAPS';
+  postgres_reservedwords[72] := 'PLACING';
+  postgres_reservedwords[73] := 'PRIMARY';
+  postgres_reservedwords[74] := 'REFERENCES';
+  postgres_reservedwords[75] := 'RETURNING';
+  postgres_reservedwords[76] := 'RIGHT';
+  postgres_reservedwords[77] := 'SELECT';
+  postgres_reservedwords[78] := 'SESSION_USER';
+  postgres_reservedwords[79] := 'SIMILAR';
+  postgres_reservedwords[80] := 'SOME';
+  postgres_reservedwords[81] := 'SYMMETRIC';
+  postgres_reservedwords[82] := 'TABLE';
+  postgres_reservedwords[83] := 'THEN';
+  postgres_reservedwords[84] := 'TO';
+  postgres_reservedwords[85] := 'TRAILING';
+  postgres_reservedwords[86] := 'TRUE';
+  postgres_reservedwords[87] := 'UNION';
+  postgres_reservedwords[88] := 'UNIQUE';
+  postgres_reservedwords[89] := 'USER';
+  postgres_reservedwords[90] := 'USING';
+  postgres_reservedwords[91] := 'VERBOSE';
+  postgres_reservedwords[92] := 'WHEN';
+  postgres_reservedwords[93] := 'WHERE';
+  postgres_reservedwords[94] := 'WITH';
+end;
+
+initialization
+  postgres_InitializeReservedWords;
+finalization
+  postgres_reservedwords := nil;
+end.
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAPoweredByDataAbstractButton.lrs b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAPoweredByDataAbstractButton.lrs
new file mode 100644
index 0000000..4abdfa8
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAPoweredByDataAbstractButton.lrs	
@@ -0,0 +1,2689 @@
+LazarusResources.Add('POWERED_BY_DATAABSTRACT_CLIENT','BMP',[
+  'BMvw'#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#212#0#0#0'0'#0#0#0#1#0#24#0#0#0#0#0'@w'#0
+  +#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#246#246#246#229#229#229
+  +#207#207#207#196#196#196#185#185#185#163#163#163#163#163#163#163#163#163#163
+  +#163#163#163#163#163#163#163#163#163#163#163#163#163#163#163#163#163#163#163
+  +#163#163#163#163#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#151#151#151#151#151#151#151#151#151#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#151#150#150#150#150#150#150#150#150#150#150
+  +#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150
+  +#150#150#150#150#149#149#149#149#149#149#149#149#149#149#149#149#149#149#149
+  +#149#149#149#149#149#149#149#149#149#0#0#0#0#0#0#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#240
+  +#240#240#229#229#229#213#213#213#207#207#207#185#185#185#185#185#185#163#163
+  +#163#163#163#163#163#163#163#163#163#163#163#163#163#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  ,#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#150
+  +#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150
+  +#150#150#150#150#150#150#150#150#150#150#150#150#150#149#149#149#149#149#149
+  +#149#149#149#149#149#149#149#149#149#149#149#149#149#149#149#0#0#0#0#0#0#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#229#229#229#229#229#229#218#218#218
+  +#207#207#207#207#207#207#184#184#184#184#184#184#184#184#184#168#168#168#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#150#150#150#150#150#150#150#150#150#150#150
+  +#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150
+  +#150#150#150#149#149#149#149#149#149#149#149#149#149#149#149#149#149#149#149
+  +#149#149#0#0#0#0#0#0#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#240#240#240#229#229
+  +#229#229#229#229#229#229#229#201#201#201#172#172#172#172#172#172#172#172#172
+  +#172#172#172#172#172#172#229#229#229#229#229#229#228#228#228#228#228#228#228
+  +#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#240#240
+  ,#240#251#251#251#251#251#251#236#236#236#189#189#189#155#155#155#151#151#151
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#150#150
+  +#150'xxx'#140#140#140#159#159#159#159#159#159#159#159#159#159#159#159#158#158
+  +#158#149#149#149'wwwwww'#149#149#149#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#155#155#155#155#155#155'uuuuuu'#146#146#146#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#154#154#154#154#154#154
+  +#145#145#145'ttttttttt'#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#153#153#153#153#153#153#134#134
+  +#134'sss'#144#144#144#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#134#134#134'rrrrrr'#152#152
+  +#152#152#152#152#152#152#152#152#152#152#151#151#151#151#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151
+  +#151#151'rrrrrrrrr'#142#142#142#150#150#150#150#150#150#150#150#150#150#150
+  +#150#150#150#150#150#150#150#150#150#150#150#150#150'zzzqqq'#150#150#150#149
+  +#149#149#149#149#149#149#149#149#149#149#149#149#149#149#0#0#0#0#0#0#184#236
+  +#194#208#241#214#239#248#241#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251'???'#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#16#16'???'#142#142#142#236#236#236#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251'nnn'#0#0#0#0#0#0#0#0#0#0#0#0'<<<'#141#141#141#0#0#0#0#0#0#0#0#0'<<<'#159
+  +#159#159#159#159#159#159#159#159#159#159#159#130#130#130'((('#0#0#0#0#0#0#0#0
+  +#0#0#0#0#159#159#159#159#159#159#159#159#159'FFF'#0#0#0#0#0#0#0#0#0#0#0#0';;'
+  +';'#139#139#139#0#0#0#0#0#0#0#0#0';;;'#158#158#158#158#158#158#158#158#158
+  +#157#157#157#157#157#157#157#157#157#157#157#157#20#20#20#0#0#0#0#0#0#0#0#0
+  +'ccc'#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#156#156#156
+  +#147#147#147#0#0#0#0#0#0#0#0#0#0#0#0'lll'#156#156#156'uuu'#0#0#0#0#0#0#0#0#0
+  +#156#156#156'NNN'#10#10#10#0#0#0#0#0#0#0#0#0'111'#136#136#136#155#155#155#155
+  +#155#155#155#155#155#155#155#155'aaa'#29#29#29#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +'000'#135#135#135#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +'jjj'#19#19#19#0#0#0#0#0#0#0#0#0'&&&'#153#153#153#153#153#153'MMM'#0#0#0#0#0
+  +#0#0#0#0'MMM'#153#153#153#152#152#152#152#152#152#152#152#152#152#152#152#143
+  +#143#143'&&&'#0#0#0#0#0#0#0#0#0#10#10#10'LLLiii'#0#0#0#0#0#0#0#0#0'___'#151
+  +#151#151#151#151#151#151#151#151#151#151#151'{{{999'#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#19#19#19#141#141#141#150#150#150#150#150#150#150#150#150#150#150#150
+  +'KKK'#9#9#9#0#0#0#0#0#0#0#0#0'KKK'#149#149#149#149#149#149#149#149#149#149
+  +#149#149#0#0#0#0#0#0#153#229#168#153#229#168#153#229#168#165#232#178#189#237
+  +#199#214#243#220#239#248#241#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251'???'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#16#16#16'~~~'#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251'nnn'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#10#10#10#0#0#0#0#0#0#0#0#0'PPP'
+  +#160#160#160#159#159#159#159#159#159#140#140#140#10#10#10#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#159#159#159#159#159#159'FFF'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#10#10#10#0#0#0#0#0#0#0#0#0'OOO'#158#158#158#158#158#158#158#158#158#158#158
+  +#158#157#157#157#157#157#157#157#157#157'EEE'#0#0#0#0#0#0#0#0#0';;;'#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157'bbb'#0#0#0#0
+  +#0#0#0#0#0#0#0#0#147#147#147#156#156#156'uuu'#0#0#0#0#0#0#0#0#0'111'#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#10#10#10'~~~'#155#155#155#155#155#155#155#155
+  ,#155'DDD'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#10#10#10#135#135#135#154
+  +#154#154#154#154#154#154#154#154'jjj'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'&&&'#153
+  +#153#153#153#153#153'MMM'#0#0#0#0#0#0#0#0#0'MMM'#153#153#153#153#153#153#152
+  +#152#152#152#152#152#152#152#152#29#29#29#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#10#10#10#0#0#0#0#0#0#0#0#0'rrr'#151#151#151#151#151#151#151#151#151'___'#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#151#151#151#150#150#150#150#150
+  +#150#150#150#150'BBB'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'KKK'#150#150#150#149#149
+  +#149#149#149#149#149#149#149#0#0#0#0#0#0#153#230#169#153#229#168#153#229#168
+  +#153#229#168#153#229#167#152#229#167#152#228#167#164#231#177#189#237#198#208
+  +#241#214#232#247#235#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251'???'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'^^^'#251#251#251#251#251#251#251#251#251
+  +#236#236#236#0#0#0#0#0#0#0#0#0#0#0#0#26#26#26'((('#10#10#10#0#0#0#0#0#0#0#0#0
+  +#0#0#0'PPP'#160#160#160#160#160#160#159#159#159'ZZZ'#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#159#159#159#150#150#150#0#0#0#0#0#0#0#0#0#0#0#0#20#20#20'((('#10
+  +#10#10#0#0#0#0#0#0#0#0#0#0#0#0'OOO'#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#157#157#157#157#157#157#128#128#128#0#0#0#0#0#0#0#0#0#20
+  +#20#20#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157';;;'#0#0#0#0#0#0#0#0#0'111'#156#156#156#156#156#156'uuu'#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19#19#19#155#155#155#155
+  +#155#155#155#155#155'kkk'#0#0#0#0#0#0''''''''''''''#19#19#19#0#0#0#0#0#0#0#0
+  +#0'000'#154#154#154#154#154#154#154#154#154'000'#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0'&&&'#153#153#153#153#153#153'MMM'#0#0#0#0#0#0#0#0#0'MMM'#153#153#153#153
+  +#153#153#153#153#153#152#152#152'iii'#0#0#0#0#0#0#0#0#0#0#0#0#29#29#29'&&&'#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0'rrr'#151#151#151#151#151#151#133#133#133#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#28#28#28#151#151#151#151#151#151#150
+  +#150#150#150#150#150#9#9#9#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'KKK'#150#150#150#150
+  +#150#150#149#149#149#149#149#149#0#0#0#0#0#0#154#230#169#153#230#169#153#229
+  +#168#153#229#168#153#229#168#153#229#167#152#229#167#152#228#167#152#228#167
+  +#152#228#166#152#228#166#152#228#166#176#233#187#195#238#203#207#241#213#226
+  +#245#229#251#251#251#238#238#238#169#169#169'qqqDDD'#24#24#24#21#21#21#19#19
+  +#19#16#16#16',,,888POOgfepmlnhhe_^]YY_]]'#135#136#136#232#232#232#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251'???'#0#0#0#0#0#0#0#0#0#189#189#189#251#251#251#251#251#251#220#220
+  +#220#157#157#157#31#31#31#0#0#0#0#0#0#0#0#0#0#0#0'~~~'#251#251#251#251#251
+  +#251#189#189#189#0#0#0#0#0#0#0#0#0#31#31#31#194#194#194#160#160#160#151#151
+  +#151#20#20#20#0#0#0#0#0#0#0#0#0'PPP'#160#160#160#160#160#160#160#160#160'222'
+  +#0#0#0#0#0#0#0#0#0'222'#150#150#150#150#150#150#159#159#159'xxx'#0#0#0#0#0#0
+  +#0#0#0#20#20#20#150#150#150#158#158#158#149#149#149#20#20#20#0#0#0#0#0#0#0#0
+  +#0'OOO'#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#157#157#157#157#157#157#10#10#10#0#0#0#0#0#0#0#0#0#128#128#128#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#10#10#10#0#0#0#0#0#0#0#0
+  +#0'bbb'#156#156#156#156#156#156'uuu'#0#0#0#0#0#0#0#0#0#0#0#0'111'#147#147#147
+  +#156#156#156'lll'#10#10#10#0#0#0#0#0#0#0#0#0'aaa'#155#155#155#155#155#155#146
+  +#146#146'aaa'#155#155#155#155#155#155#154#154#154#145#145#145#0#0#0#0#0#0#0#0
+  +#0#10#10#10#154#154#154#154#154#154#154#154#154#10#10#10#0#0#0#0#0#0#0#0#0'M'
+  +'MM'#153#153#153#144#144#144#153#153#153#153#153#153'MMM'#0#0#0#0#0#0#0#0#0
+  +'MMM'#153#153#153#153#153#153#153#153#153#153#153#153'LLL'#0#0#0#0#0#0#0#0#0
+  +'000'#152#152#152#152#152#152'|||'#0#0#0#0#0#0#0#0#0#0#0#0'rrr'#152#152#152
+  +#151#151#151'999'#0#0#0#0#0#0#0#0#0#9#9#9'UUU'#142#142#142#151#151#151#142
+  +#142#142'rrr'#151#151#151#151#151#151#151#151#151'zzz'#0#0#0#0#0#0#0#0#0#0#0
+  +#0'qqq'#150#150#150#141#141#141#150#150#150#150#150#150#150#150#150#149#149
+  +#149#0#0#0#0#0#0#154#230#169#154#230#169#153#230#169#153#229#168#153#229#168
+  +#153#229#168#153#229#167#152#229#167#152#228#167#152#228#167#152#228#166#152
+  +#228#166#152#228#166#151#228#166#151#227#165#138#204#150'QmV###!!!'#31#31#31
+  +#28#28#28#26#26#26#24#24#24#21#21#21#31#31#31'ONM'#163#160#159#208#202#202
+  +#216#209#208#212#204#202#198#186#184#177#162#159#160#144#141#150#136#133'vmj'
+  +'OML'#175#175#175#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251'???'#0#0#0#0#0#0#0#0#0#189#189#189#251#251#251#251
+  +#251#251#251#251#251#251#251#251#236#236#236'///'#0#0#0#0#0#0#0#0#0#0#0#0#220
+  ,#220#220#251#251#251#205#205#205#0#0#0#0#0#0#0#0#0'///'#206#206#206#160#160
+  +#160#160#160#160'PPP'#0#0#0#0#0#0#0#0#0'PPP'#160#160#160#160#160#160#160#160
+  +#160'((('#0#0#0#0#0#0#0#0#0'xxx'#159#159#159#159#159#159#159#159#159#130#130
+  +#130#0#0#0#0#0#0#0#0#0#30#30#30#159#159#159#159#159#159#158#158#158'OOO'#0#0
+  +#0#0#0#0#0#0#0'OOO'#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#157#157#157';;;'#0#0#0#0#0#0#0#0#0'EEEvvvvvvvvv'
+  +'vvvccc'#0#0#0#0#0#0#0#0#0#0#0#0#137#137#137#156#156#156#156#156#156'uuu'#0#0
+  +#0#0#0#0#0#0#0#10#10#10#147#147#147#156#156#156#156#156#156#156#156#156'bbb'
+  +#0#0#0#0#0#0#0#0#0'111'#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155'WWW'#0#0#0#0#0#0#0#0#0#10#10#10#154#154#154
+  +#154#154#154#154#154#154#0#0#0#0#0#0#0#0#0#0#0#0#154#154#154#154#154#154#153
+  +#153#153#153#153#153#153#153#153'MMM'#0#0#0#0#0#0#0#0#0'MMM'#153#153#153#153
+  +#153#153#153#153#153#153#153#153'VVV'#0#0#0#0#0#0#0#0#0'CCC'#152#152#152#152
+  +#152#152#152#152#152'&&&'#0#0#0#0#0#0#0#0#0'rrr'#152#152#152#152#152#152#0#0
+  +#0#0#0#0#0#0#0#0#0#0'rrr'#151#151#151#151#151#151#151#151#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#151#151#151'rrr'#0#0#0#0#0#0#0#0#0'&&&'#150
+  +#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150
+  +#150#0#0#0#0#0#0#154#230#169#154#230#169#154#230#169#153#230#169#153#229#168
+  +#153#229#168#153#229#168#153#229#167#152#229#167#152#228#167#152#228#167#152
+  +#228#166#152#228#166#152#228#166'\}b***(((&&&###!!!'#31#31#31#28#28#28#26#26
+  +#26#29#29#29'XWW'#217#213#212#243#239#238#240#236#235#223#219#218#183#178#177
+  +#166#159#157#160#148#147#159#144#141#163#146#143#166#149#145#148#134#131'RON'
+  +#228#228#228#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251'???'#0#0#0#0#0#0#0#0#0#189#189#189#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#236#236#236#16#16#16#0#0#0#0#0#0#0#0#0'nnn'#251
+  +#251#251#251#251#251#31#31#31#0#0#0#0#0#0#0#0#0'ttt'#161#161#161#160#160#160
+  +'PPP'#0#0#0#0#0#0#0#0#0'PPP'#160#160#160#160#160#160#160#160#160'((('#0#0#0#0
+  +#0#0#0#0#0'xxx'#159#159#159#159#159#159#159#159#159#159#159#159#20#20#20#0#0
+  +#0#0#0#0#0#0#0'ZZZ'#159#159#159#159#159#159'OOO'#0#0#0#0#0#0#0#0#0'OOO'#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158'lll'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#30#30#30#156#156#156#156#156#156#156#156#156'uuu'#0#0#0#0#0
+  +#0#0#0#0''''''''#156#156#156#156#156#156#156#156#156#156#156#156#147#147#147
+  +#0#0#0#0#0#0#0#0#0#19#19#19#155#155#155#155#155#155#155#155#155#155#155#155
+  +#146#146#146'NNN'#19#19#19#0#0#0#0#0#0#0#0#0#0#0#0':::'#154#154#154#154#154
+  +#154#154#154#154#0#0#0#0#0#0#0#0#0#0#0#0#154#154#154#154#154#154#154#154#154
+  +#153#153#153#153#153#153'MMM'#0#0#0#0#0#0#0#0#0'MMM'#153#153#153#153#153#153
+  +#153#153#153#153#153#153#134#134#134#0#0#0#0#0#0#0#0#0#10#10#10'rrr'#152#152
+  +#152#152#152#152'&&&'#0#0#0#0#0#0#0#0#0'rrr'#152#152#152'rrr'#0#0#0#0#0#0#0#0
+  +#0#19#19#19#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#151#151#151'rrr'#0#0#0#0#0#0#0#0#0'&&&'#150
+  +#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150
+  +#150#0#0#0#0#0#0#154#230#170#154#230#169#154#230#169#154#230#169#153#230#169
+  +#153#229#168#153#229#168#153#229#168#153#229#167#152#229#167#152#228#167#152
+  +#228#167#140#207#152'ETH///---***((('#30'7'#30#15'V'#15#8'd'#8#0'x'#0#0'u'#0
+  +#20'N'#20#153#151#150#253#249#248#247#246#246#230#229#229#137#136#137#146#144
+  +#144#148#145#144#141#139#138'snm'#134'yw'#160#144#141#169#152#148'h`_'#141
+  +#165#145#199#237#205#199#237#205#199#237#205#212#241#216#225#244#228#225#244
+  +#228'8=9'#0#0#0#0#0#0#0#0#0#169#184#171#225#244#227#225#244#227#224#244#227
+  +#224#244#227#224#243#227#224#243#227'pzr'#0#0#0#0#0#0#0#0#0#31#31#31#251#251
+  +#251#251#251#251#173#173#173#0#0#0#0#0#0#0#0#0#0#0#0#10#10#10'((('#20#20#20#0
+  +#0#0#0#0#0#0#0#0'PPP'#160#160#160#160#160#160#160#160#160'((('#0#0#0#0#0#0#0
+  +#0#0'xxx'#159#159#159#159#159#159#159#159#159#159#159#159'nnn'#0#0#0#0#0#0#0
+  +#0#0#0#0#0#10#10#10'((('#20#20#20#0#0#0#0#0#0#0#0#0'OOO'#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#149#149#149#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0'YYY'#157#157#157#156#156#156#156#156#156'uuu'#0#0#0#0#0#0#0#0#0''''
+  +''''''#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#0#0#0#0#0
+  +#0#0#0#0#0#0#0#155#155#155#155#155#155#155#155#155'~~~'#10#10#10#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#29#29#29#145#145#145#154#154#154#154#154#154#154#154#154#0
+  +#0#0#0#0#0#0#0#0#0#0#0#154#154#154#154#154#154#154#154#154#154#154#154#153
+  +#153#153'MMM'#0#0#0#0#0#0#0#0#0'MMM'#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153'CCC'#0#0#0#0#0#0#0#0#0#0#0#0#19#19#19'&&&'#10#10#10#0#0
+  +#0#0#0#0#0#0#0'rrr'#152#152#152'rrr'#0#0#0#0#0#0#0#0#0'&&&'#151#151#151#151
+  ,#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151
+  +#151#151#151#151'rrr'#0#0#0#0#0#0#0#0#0'&&&'#150#150#150#150#150#150#150#150
+  +#150#150#150#150#150#150#150#150#150#150#150#150#150#0#0#0#0#0#0#154#230#170
+  +#154#230#170#154#230#169#154#230#169#154#230#169#153#230#169#153#229#168#153
+  +#229#168#153#229#168#153#229#167#152#229#167#134#196#147'<A=444222///---***'
+  +#30'?'#30#19'S'#19#11'a'#11#0'z'#0#0'x'#0#8'h'#8'\]Z'#231#229#229#255#255#255
+  +#213#212#212#149#146#146#223#213#211#190#176#173#202#192#190#187#181#179'kff'
+  +#157#141#137#151#136#133'IHE'#134#201#146#147#224#160#147#224#159#147#223#159
+  +#147#223#159#147#223#158#146#223#158'%8('#0#0#0#0#0#0#0#0#0'm'#167'v'#145#222
+  +#156#145#222#156#145#221#156#145#221#156#145#221#155#144#221#155'u'#180'~'#0
+  +#0#0#0#0#0#0#0#0#0#0#0#251#251#251#251#251#251#251#251#251#189#189#189#31#31
+  +#31#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'PPP'#160#160#160#160#160
+  +#160#160#160#160'((('#0#0#0#0#0#0#0#0#0'xxx'#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159'xxx'#20#20#20#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0'OOO'#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158'222'#0#0#0#0#0#0#0#0#0
+  +#30#30#30''''''''''''''''''''#0#0#0#0#0#0#0#0#0#0#0#0#128#128#128#157#157#157
+  +#157#157#157#156#156#156'uuu'#0#0#0#0#0#0#0#0#0''''''''#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#0#0#0#0#0#0#0#0#0#0#0#0#155#155#155
+  +#155#155#155#136#136#136#10#10#10#0#0#0#0#0#0#0#0#0#0#0#0#19#19#19'NNN'#145
+  +#145#145#154#154#154#154#154#154#154#154#154#154#154#154#0#0#0#0#0#0#0#0#0#0
+  +#0#0#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154'MMM'#0#0#0#0
+  +#0#0#0#0#0':::'#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153'VVV'#10#10#10#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'r'
+  +'rr'#152#152#152'|||'#0#0#0#0#0#0#0#0#0#28#28#28#151#151#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151
+  +#151'rrr'#0#0#0#0#0#0#0#0#0'&&&'#150#150#150#150#150#150#150#150#150#150#150
+  +#150#150#150#150#150#150#150#150#150#150#0#0#0#0#0#0#154#231#170#154#230#170
+  +#154#230#170#154#230#169#154#230#169#154#230#169#153#230#169#153#229#168#153
+  +#229#168#153#229#168#148#219#161'AFB999666444222///---***(((&&&'#29'4'#29#18
+  +'['#18'"J"*2*[ZZ'#153#152#152#135#136#135'`\['#130'rp'#130'jh'#150'~|'#165
+  +#144#142'ldcogeFDCl'#154't'#148#224#160#147#224#160#147#224#160#147#224#159
+  +#147#223#159#147#223#159#147#223#158'%8('#0#0#0#0#0#0#0#0#0'n'#167'v'#145#222
+  +#157#145#222#156#145#222#156#145#221#156#145#221#156#145#221#155#144#221#155
+  +#0#0#0#0#0#0#0#0#0#0#0#0#189#189#189#251#251#251#251#251#251#251#251#251#251
+  +#251#251#205#205#205'ggg===((('#20#20#20#0#0#0#0#0#0#0#0#0'PPP'#160#160#160
+  +#160#160#160#160#160#160'((('#0#0#0#0#0#0#0#0#0'xxx'#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#130#130#130'PPP'
+  +'<<<((('#20#20#20#0#0#0#0#0#0#0#0#0'OOO'#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158'YYY'
+  +#0#0#0#0#0#0#0#0#0'lll'#157#157#157#157#157#157#138#138#138#0#0#0#0#0#0#0#0#0
+  +#20#20#20#157#157#157#157#157#157#157#157#157#157#157#157'uuu'#0#0#0#0#0#0#0
+  +#0#0#20#20#20#156#156#156#156#156#156#156#156#156#156#156#156'lll'#0#0#0#0#0
+  +#0#0#0#0#29#29#29#155#155#155#155#155#155'XXX'#0#0#0#0#0#0#0#0#0#10#10#10'kk'
+  +'k'#155#155#155#155#155#155#155#155#155#154#154#154#154#154#154#154#154#154
+  +#154#154#154#0#0#0#0#0#0#0#0#0#0#0#0#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154'MMM'#0#0#0#0#0#0#0#0#0#10#10#10'}}}'#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153'jjjLLL000&&'
+  +'&'#10#10#10#0#0#0#0#0#0#0#0#0'rrr'#152#152#152#152#152#152#10#10#10#0#0#0#0
+  +#0#0#0#0#0'{{{'#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#151'rrr'#0#0#0#0#0#0#0#0#0'&&&'#150#150#150
+  +#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#0#0
+  +#0#0#0#0#155#231#170#154#231#170#154#230#170#154#230#170#154#230#169#154#230
+  +#169#154#230#169#153#230#169#153#229#168#153#229#168'ViZ===;;;999666444222//'
+  +'/---***(((---]]\'#142#135#134#155#150#153#150#143#144#130'yyxmlujiqgfiaa`VU'
+  +'`PP=77'#31'!!'#17#21#18#130#197#141#148#224#160#148#224#160#147#224#160#147
+  +#224#160#147#224#159#147#223#159#147#223#159'%8('#0#0#0#0#0#0#0#0#0'n'#167'v'
+  +#146#222#157#145#222#157#145#222#156#145#222#156#145#221#156#145#221#156#145
+  +#221#155#0#0#0#0#0#0#0#0#0#0#0#0#189#189#189#251#251#251#251#251#251#189#189
+  +#189#251#251#251#251#251#251#206#206#206#161#161#161#161#161#161#30#30#30#0#0
+  +#0#0#0#0#0#0#0'xxx'#160#160#160#160#160#160#160#160#160'((('#0#0#0#0#0#0#0#0
+  +#0'xxx'#160#160#160#159#159#159#159#159#159#159#159#159#159#159#159'xxx'#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#30#30#30#0#0#0#0#0#0
+  +#0#0#0'www'#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  ,#158#158#158#158#158#158#158#158#158#158#158#139#139#139#0#0#0#0#0#0#0#0#0'E'
+  +'EE'#157#157#157#157#157#157'YYY'#0#0#0#0#0#0#0#0#0'EEE'#157#157#157#157#157
+  +#157#157#157#157#157#157#157'vvv'#0#0#0#0#0#0#0#0#0#0#0#0';;;'#156#156#156
+  +#156#156#156#137#137#137#20#20#20#0#0#0#0#0#0#0#0#0';;;'#156#156#156#155#155
+  +#155'XXX'#0#0#0#0#0#0#0#0#0'NNN'#155#155#155#155#155#155#155#155#155#146#146
+  +#146#155#155#155#154#154#154#154#154#154#154#154#154#0#0#0#0#0#0#0#0#0#0#0#0
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154'MMM'#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0':::MMMsss'#153#153#153#153#153#153'sss'#153#153#153#153
+  +#153#153#153#153#153#152#152#152#143#143#143#0#0#0#0#0#0#0#0#0#0#0#0#152#152
+  +#152#152#152#152#152#152#152'999'#0#0#0#0#0#0#0#0#0#29#29#29'{{{'#151#151#151
+  +#151#151#151#151#151#151#142#142#142#151#151#151#151#151#151#151#151#151'rrr'
+  +#0#0#0#0#0#0#0#0#0'&&&'#151#151#151#150#150#150#150#150#150#150#150#150#150
+  +#150#150#150#150#150#150#150#150#0#0#0#0#0#0#155#231#171#155#231#170#154#231
+  +#170#154#230#170#154#230#170#154#230#169#154#230#169#154#230#169#153#230#169
+  +'t'#159'|BBB@@@===;;;999666444222///---***ZZZ'#194#193#192#151#139#134#227
+  +#206#175#248#233#213#230#221#213#214#204#201#193#184#186#179#169#176#178#168
+  +#172#176#167#168#164#158#158#136#131#131'XVU)**)8,'#148#224#160#148#224#160
+  +#148#224#160#147#224#160#147#224#160#147#224#159#147#223#159'%8('#0#0#0#0#0#0
+  +#0#0#0'n'#167'v'#146#222#157#146#222#157#145#222#157#145#222#156#145#222#156
+  +#145#221#156#145#221#156#0#0#0#0#0#0#0#0#0#0#0#0#189#189#189#251#251#251#251
+  +#251#251#31#31#31#16#16#16'???gggQQQ'#30#30#30#0#0#0#0#0#0#0#0#0#20#20#20#160
+  +#160#160#160#160#160'PPP'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'xx'
+  +'x'#159#159#159#159#159#159#20#20#20#10#10#10'(((PPPPPP'#30#30#30#0#0#0#0#0#0
+  +#0#0#0#20#20#20#159#159#159#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#30
+  +#30#30#0#0#0#0#0#0#20#20#20#157#157#157#157#157#157'111'#0#0#0#0#0#0#0#0#0'v'
+  +'vv'#157#157#157#157#157#157#157#157#157#157#157#157'vvv'#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#20#20#20''''''''#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#137#137#137#156#156
+  +#156#156#156#156#136#136#136#0#0#0#0#0#0#0#0#0#10#10#10'DDDDDD'#29#29#29#19
+  +#19#19#155#155#155#155#155#155''''''''#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#154#154#154#154#154#154'MMM'#0#0#0#0#0#0#0#0#0#19#19#19#0#0#0#0#0
+  +#0#0#0#0'MMM'#153#153#153#134#134#134#0#0#0#19#19#19'000MMMCCC'#19#19#19#0#0
+  +#0#0#0#0#0#0#0'999'#152#152#152#152#152#152#152#152#152#143#143#143#10#10#10
+  +#0#0#0#0#0#0#0#0#0#0#0#0#28#28#28'&&&'#28#28#28'///'#151#151#151#151#151#151
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'&&&'#150#150#150#150#150#150
+  +#150#150#150#150#150#150#0#0#0#0#0#0#155#231#171#155#231#171#155#231#170#154
+  +#231#170#154#230#170#154#230#170#154#230#169#154#230#169#149#221#163'LQMDDDB'
+  +'BB6S8===;;;999666444222///---lll'#210#209#210#149#136#129#229#154'#'#255#175
+  +'#'#255#181'7'#255#192'R'#254#198'j'#247#202#130#233#202#159#217#201#184#208
+  +#199#196#206#201#206#203#198#203#178#173#175'rqq?LA'#136#202#146#148#224#160
+  +#148#224#160#147#224#160#147#224#160#147#224#159'%8('#0#0#0#0#0#0#0#0#0'n'
+  +#168'w'#146#222#157#146#222#157#146#222#157#145#222#157#145#222#156#145#222
+  +#156'm'#166'u'#0#0#0#0#0#0#0#0#0#0#0#0#236#236#236#251#251#251#220#220#220#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'ooo'#161#161#161#160#160
+  +#160'PPP'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'xxx'#159#159#159
+  +#140#140#140#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'nnn'#159
+  +#159#159#159#159#159#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158'OOO'#0#0#0#0#0#0#0#0#0
+  +#138#138#138#157#157#157#0#0#0#0#0#0#0#0#0#10#10#10#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157'vvv'#0#0#0#0#0#0#0#0#0#20#20#20#10#10#10
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'NNN'#156#156#156#156#156#156#156#156#156
+  +#156#156#156'DDD'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#136#136#136#155
+  +#155#155''''''''#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#154#154#154
+  +#154#154#154'MMM'#0#0#0#0#0#0#0#0#0'VVV'#0#0#0#0#0#0#0#0#0'MMM'#153#153#153
+  +'```'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#10#10#10#134#134#134
+  +#152#152#152#152#152#152#152#152#152#152#152#152'|||'#19#19#19#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#9#9#9#151#151#151#151#151#151#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0'&&&'#150#150#150#150#150#150#150#150#150#150#150#150
+  +#0#0#0#0#0#0#155#231#171#155#231#171#155#231#171#155#231#170#154#231#170#154
+  +#230#170#154#230#170#154#230#169's'#153'zIIIGGG?R@'#31#146'''@@@===;;;999666'
+  +'444222///mmm'#218#218#219#156#144#137#228#152#30#255#167#20#254#165#21#254
+  +#166#21#255#167#21#255#168#23#255#173'#'#255#178'/'#250#184'L'#237#187'l'#221
+  +#188#143#213#196#183#214#208#210#169#167#171'LPK'#148#224#160#148#224#160#148
+  +#224#160#147#224#160#147#224#160'%8('#0#0#0#0#0#0#0#0#0'n'#168'w'#146#223#158
+  ,#146#222#157#146#222#157#146#222#157#145#222#157#145#222#156'@bE'#0#0#0#0#0#0
+  +#0#0#0#31#31#31#251#251#251#251#251#251#236#236#236#142#142#142'???'#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0'333'#131#131#131#161#161#161#161#161#161#161#161#161
+  +'PPP'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'xxx'#160#160#160#150
+  +#150#150'ZZZ((('#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'222'#130#130#130#159#159#159
+  +#159#159#159#159#159#159#159#159#159#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#129#129#129#0#0#0#0
+  +#0#0#0#0#0'cccvvv'#0#0#0#0#0#0#0#0#0';;;'#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157'vvv'#0#0#0#0#0#0#0#0#0''''''''''''''#0#0#0#0#0#0
+  +#0#0#0#20#20#20'bbb'#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156'kkk'#29#29#29#0#0#0#0#0#0#0#0#0#0#0#0'''''''~~~'#155#155#155
+  +''''''''#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#154#154#154#154#154
+  +#154'MMM'#0#0#0#0#0#0#29#29#29#154#154#154'VVV'#10#10#10#0#0#0'MMM'#153#153
+  +#153#134#134#134'CCC'#29#29#29#0#0#0#0#0#0#0#0#0#0#0#0#10#10#10'999'#143#143
+  +#143#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#143#143#143'LLL'#19#19#19#0#0#0#0#0#0#0#0#0#0#0#0#9#9#9#142#142#142#151#151
+  +#151#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'&&&'#151#151#151#150#150
+  +#150#150#150#150#150#150#150#0#0#0#0#0#0#155#232#172#155#231#171#155#231#171
+  +#155#231#171#155#231#170#154#231#170#154#230#170#154#230#170'XaYKKKIII-'#141
+  +'7$'#151'.BBB@@@===;;;999666444222ppp'#227#226#227#162#151#144#228#153'!'#255
+  +#172#30#254#175'('#254#178'/'#254#180'4'#254#181'6'#254#181'5'#254#180'2'#255
+  +#176')'#255#172#30#255#171#30#249#168'%'#237#169'B'#209#182#147'xy~'#148#225
+  +#161#148#224#160#148#224#160#148#224#160#147#224#160'%8('#0#0#0#0#0#0#0#0#0
+  +'o'#168'w'#146#223#158#146#223#158#146#222#157#146#222#157#146#222#157'v'#181
+  +#128#9#14#10#0#0#0#0#0#0#0#0#0'^^^'#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#194#194#194'yyy'#131#131#131#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#160#160
+  +#160'((('#0#0#0#0#0#0#0#0#0'xxx'#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#159#159#159#159#159#159#159#159#159#150#150#150'xxx'#130#130
+  +#130#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#20#20#20#0#0#0#0#0#0';;;OOO'#0#0
+  +#0#0#0#0#0#0#0'lll'#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157'vvv'#0#0#0#0#0#0#0#0#0''''''''#156#156#156#156#156#156#147#147#147'uuu'
+  +''#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#155#155#155#155#155#155'uuu~~~'#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#0#0#0#0#0#0
+  +#0#0#0#0#0#0#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#153#153
+  +#153'sss'#134#134#134#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#134#134#134'sss'#134#134#134#153#153#153#153#153#153#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#143#143#143'rrrrrr'#134#134#134#151#151#151#151#151
+  +#151#151#151#151#151#151#151'rrr'#0#0#0#0#0#0#0#0#0'&&&'#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#151#151#150#150#150#150#150#150#0#0#0#0#0#0
+  +#156#232#172#155#232#172#155#231#171#155#231#171#155#231#171#155#231#170#154
+  +#231#170#141#203#154'PPPNNNISK$'#189'7)'#155'5DDDBBB@@@===;;;999666444sss'
+  +#234#234#236#166#157#150#228#159'+'#255#180'.'#254#184';'#255#187'B'#255#190
+  +'G'#255#191'K'#255#191'K'#255#190'H'#255#188'C'#254#184'<'#254#180'1'#255#173
+  +'$'#255#170#14#201#154'Nmpz'#148#225#161#148#225#161#148#224#160#148#224#160
+  +#148#224#160'%8('#0#0#0#0#0#0#0#0#0'o'#168'x'#147#223#158#146#223#158#146#223
+  +#158#146#222#157'n'#167'v'#9#14#10#0#0#0#0#0#0#0#0#0#0#0#0#220#220#220#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#206#206
+  +#206#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161'((('#0#0#0#0#0#0#0#0#0'xxx'
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158';;;'#0#0#0#0#0#0#30#30#30'((('#0#0#0#0#0#0#0#0#0#148#148
+  +#148#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157'vvv'#0#0#0#0
+  +#0#0#0#0#0''''''''#157#157#157#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#155#155#155#155#155#155#155
+  ,#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#0#0#0#0#0#0#0#0#0#0#0#0#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#151#151#151#151#151#151#151#151#151
+  +'rrr'#0#0#0#0#0#0#0#0#0'&&&'#151#151#151#151#151#151#151#151#151#151#151#151
+  +#151#151#151#151#151#151#150#150#150#0#0#0#0#0#0#156#232#172#156#232#172#155
+  +#232#172#155#231#171#155#231#171#155#231#171#155#231#170'|'#167#133'SSSPPPDt'
+  +'L*'#194'?.'#160'<GGGDDDBBB@@@===;;;999666uuu'#241#242#243#171#163#156#228
+  +#166'9'#255#188'?'#255#192'L'#255#196'U'#255#199'['#255#201'^'#255#201'^'#255
+  +#200'['#255#197'V'#255#193'N'#255#188'C'#254#182'7'#255#178'"'#199#155'Uikt'
+  +#149#225#161#148#225#161#148#225#161#148#224#160#148#224#160'%8('#0#0#0#0#0#0
+  +#0#0#0'.F2JpPJpO7T;'#18#28#20#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'IoN'#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#206
+  +#206#206#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161'eee'#30#30#30#0#0#0#0#0
+  +#0'xxx'#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158'mmm'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'111'
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157'vvv'
+  +#0#0#0#0#0#0#0#0#0''''''''#157#157#157#157#157#157#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155'DDD'#19#19#19#0#0#0#0#0#0#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#151#151#151
+  +#151#151#151#133#133#133'999'#9#9#9#0#0#0'&&&'#151#151#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#151#151#151#151#151#151#0#0#0#0#0#0#156#232
+  +#172#156#232#172#156#232#172#155#232#172#155#231#171#155#231#171#155#231#171
+  +'u'#150'{UUUSSSB'#143'P0'#200'H3'#165'CIIIGGGDDDBBB@@@===;;;999www'#247#247
+  +#249#176#169#162#229#172'E'#255#196'O'#255#200'\'#255#205'g'#255#209'n'#255
+  +#210'q'#255#210'r'#255#209'n'#255#206'h'#255#201'^'#255#196'S'#255#189'F'#255
+  +#186'1'#196#155'Xefo'#149#225#162#149#225#161#148#225#161#148#225#161#148#224
+  +#160'%8('#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0'IoO'#145#222#156#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#206#206#206#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#151#151#151'ddd'#141#141#141#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'ccc'#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157'vvv'#0#0#0#0#0#0#0#0#0
+  +''''''''#157#157#157#157#157#157#157#157#157#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#136#136#136'XXX'#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  ,#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#151#151
+  +#151#151#151#151#151#151#151#151#151#151'{{{___'#151#151#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#151#151#151#151#151#151#0#0#0#0#0#0#156#232
+  +#173#156#232#172#156#232#172#156#232#172#155#232#172#155#231#171#155#231#171
+  +'j}nWWWUUUA'#179'W5'#206'Q7'#170'JKKKIIIGGGDDDBBB@@@===;;;xxx'#252#252#254
+  +#180#173#168#230#178'Q'#255#204'^'#255#208'l'#255#213'w'#255#216'}'#255#218
+  +#129#255#218#129#255#217'~'#255#214'x'#255#209'n'#255#203'b'#255#196'S'#255
+  +#192'?'#194#155'[bbi'#149#225#162#149#225#162#149#225#161#148#225#161#148#225
+  +#161'%8('#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#9#14#10'7T;'
+  +#128#195#138#146#222#157#145#222#157#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#206#206#206#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158'222'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#149#149#149#158#158#158#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157'vvv'#0#0#0#0#0#0#0#0#0''''''''#157#157#157#157#157#157#148#148#148
+  +#157#157#157#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#144#144#144#134#134#134#153#153
+  +#153#153#153#153#153#153#153#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#151#151#151#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#151#0#0#0#0#0#0#156#232#173#156#232#173#156
+  +#232#172#156#232#172#156#232#172#155#232#172#155#231#171'lpZZZWWWF'#184'^;'
+  +#211'Y<'#175'QNNNKKKIIIGGGDDDBBB@@@===xxy'#254#254#255#184#178#173#230#183'['
+  +#255#210'k'#255#214'y'#255#219#131#255#223#139#255#225#143#255#225#143#255
+  +#223#140#255#220#133#255#215'{'#255#209'o'#255#201'_'#255#198'J'#192#154'\^]'
+  +'d'#149#225#162#149#225#162#149#225#162#149#225#161#148#225#161#130#198#141
+  +'o'#169'xf'#155'nJpPJpPJpPJpPJpPo'#168'xx'#182#129#146#223#158#146#223#158
+  +#146#222#157#146#222#157#146#222#157#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#206#206#206#161#161#161#161#161
+  +#161'QQQ((('#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#158#158#158#158#158#158
+  +#158#158#158#158#158#158#139#139#139'wwwwwwwwwwwwwww'#158#158#158#158#158#158
+  +#158#158#158#157#157#157#157#157#157#157#157#157#157#157#157'vvv'#0#0#0#0#0#0
+  +#0#0#0''''''''#157#157#157'vvv'#10#10#10'ccc'#157#157#157#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +'```'#10#10#10':::'#153#153#153#153#153#153#153#153#153#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#151
+  +#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#151#151#151#151#151#0#0#0#0#0#0#156#233#173
+  +#156#232#173#156#232#173#156#232#172#156#232#172#156#232#172#155#232#172'm'
+  +#128'q\\\ZZZJ'#188'eA'#217'bA'#180'XPPPNNNKKKIIIGGGDDDBBB@@@xxx'#255#255#255
+  ,#188#183#177#230#188'd'#255#215'v'#255#220#132#255#225#143#255#230#153#255
+  +#233#158#255#233#159#255#230#154#255#226#145#255#221#134#255#214'y'#255#207
+  +'j'#255#203'T'#189#153'\YX^'#149#226#163#149#225#162#149#225#162#149#225#162
+  +#149#225#161#148#225#161#148#225#161#148#224#160#148#224#160#148#224#160#147
+  +#224#160#147#224#160#147#224#159#147#223#159#147#223#159#147#223#158#146#223
+  +#158#146#223#158#146#222#157#146#222#157#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#206#206#206#162#162#162#161
+  +#161#161'QQQ((('#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157'vvv'#20#20#20#138#138#138#157#157
+  +#157#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#144#144#144#10#10#10'}}}'#153#153#153#153#153#153
+  +#153#153#153#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#151#151#151#151#151#151#151#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#0#0
+  +#0#0#0#0#157#233#173#156#233#173#156#232#173#156#232#173#156#232#172#156#232
+  +#172#156#232#172'p'#131't___\\\P'#185'kF'#223'kB'#209'aJ'#131'VPPPNNNKKKIIIG'
+  +'GGDDDBBBxxx'#255#255#255#191#186#181#230#191'j'#255#219'|'#255#223#139#255
+  +#230#153#254#236#165#254#240#174#254#241#175#254#236#167#255#231#155#255#224
+  +#142#255#218#128#255#210'p'#255#207'['#186#151']USZ'#150#226#163#149#226#163
+  +#149#225#162#149#225#162#149#225#162#149#225#161#148#225#161#148#225#161#148
+  +#224#160#148#224#160#148#224#160#147#224#160#147#224#160#147#224#159#147#223
+  +#159#147#223#159#147#223#158#146#223#158#146#223#158#146#222#157#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#206
+  +#206#206#162#162#162#162#162#162'QQQ((('#141#141#141'QQQeee'#152#152#152#161
+  +#161#161#161#161#161#161#161#161'yyyQQQ[[['#152#152#152#161#161#161#160#160
+  +#160#160#160#160'nnnnnn'#160#160#160#160#160#160#141#141#141'PPP'#160#160#160
+  +#160#160#160#160#160#160#159#159#159#130#130#130'PPPPPPnnn'#159#159#159#159
+  +#159#159'PPP'#140#140#140#159#159#159#159#159#159#159#159#159#130#130#130'PP'
+  +'POOOmmm'#158#158#158#158#158#158#158#158#158'cccOOOwww'#139#139#139'ccc'#158
+  +#158#158#158#158#158#158#158#158#157#157#157'vvvvvv'#138#138#138'OOOYYY'#148
+  +#148#148#157#157#157#157#157#157#157#157#157'OOO;;;'#157#157#157#157#157#157
+  +#156#156#156#156#156#156#156#156#156#156#156#156'NNN'#137#137#137#156#156#156
+  +#156#156#156#137#137#137'NNN'#156#156#156#156#156#156#137#137#137'XXXNNNaaa'
+  +#146#146#146#155#155#155'aaauuu'#155#155#155#155#155#155'aaauuu'#155#155#155
+  +#154#154#154'aaattt'#154#154#154#154#154#154#154#154#154'jjjMMMMMM~~~'#154
+  +#154#154#154#154#154#154#154#154#135#135#135'```'#144#144#144'VVVMMM'#134#134
+  +#134#153#153#153#153#153#153'&&&MMM'#153#153#153#153#153#153#134#134#134'VVV'
+  +'LLL___'#143#143#143#152#152#152#152#152#152'|||LLLLLLiii'#152#152#152#152
+  +#152#152'|||LLLrrr'#133#133#133'___LLLrrr'#151#151#151#151#151#151#151#151
+  +#151#151#151#151#151#151#151#0#0#0#0#0#0#157#233#174#157#233#173#156#233#173
+  +#156#232#173#156#232#173#156#232#172#156#232#172#128#166#136'aaa___W'#163'kL'
+  +#228'sF'#223'kA'#217'b='#204'Y<'#175'Q='#147'L;'#135'FEXGGGGDDDxxx'#255#255
+  +#255#192#189#183#230#195'k'#255#225#128#255#229#144#255#235#159#255#241#173
+  +#255#248#187#255#248#189#254#241#175#254#234#160#255#226#145#255#219#131#255
+  +#211's'#255#208'^'#189#153'^VSY'#150#226#163#150#226#163#149#226#163#149#225
+  +#162#149#225#162#149#225#162#149#225#161#148#225#161#148#225#161#148#224#160
+  +#148#224#160#148#224#160#147#224#160#147#224#160#147#224#159#147#223#159#147
+  +#223#159#147#223#158#146#223#158#146#223#158#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#206#206#206#162#162#162
+  ,#162#162#162'QQQ'#10#10#10'(((QQQ333'#30#30#30#152#152#152#161#161#161'==='
+  +#20#20#20'QQQ==='#10#10#10#131#131#131#161#161#161#160#160#160#30#30#30#30#30
+  +#30#160#160#160#160#160#160'PPP'#10#10#10#131#131#131#160#160#160#160#160#160
+  +'ddd'#10#10#10'FFFPPP<<<'#159#159#159#159#159#159#0#0#0'xxx'#159#159#159#159
+  +#159#159'ddd'#10#10#10'FFFPPP;;;'#158#158#158#158#158#158'((('#30#30#30'OOO;'
+  +';;;;;((('#158#158#158#158#158#158#158#158#158#158#158#158'OOO''''''''''''OO'
+  +'O111'#30#30#30#148#148#148#157#157#157#157#157#157'OOO'#0#0#0#138#138#138
+  +#157#157#157#157#157#157#156#156#156#156#156#156#156#156#156#0#0#0'uuu'#156
+  +#156#156#156#156#156'NNN111'#156#156#156''#10#10#10';;;NNNDDD~~~'#155#155
+  +#155'''''''NNN'#155#155#155#155#155#155'''''''NNN'#155#155#155#155#155#155
+  +'''''''MMM'#154#154#154#145#145#145#29#29#29#19#19#19'MMMDDD'#10#10#10'DDD'
+  +#154#154#154#154#154#154'ttt'#29#29#29#29#29#29'MMMCCC'#10#10#10'}}}'#153#153
+  +#153'&&&MMM'#153#153#153'}}}'#10#10#10':::MMMCCC|||'#152#152#152'___'#10#10
+  +#10'CCCLLLLLL'#152#152#152#143#143#143#10#10#10'CCCrrr|||999LLL'#28#28#28'__'
+  +'_'#151#151#151#151#151#151#151#151#151#151#151#151#0#0#0#0#0#0#157#233#174
+  +#157#233#174#157#233#173#156#233#173#156#232#173#156#232#173#156#232#172#136
+  +#183#146'cccaaa\'#131'gR'#234'|L'#228'sF'#223'kA'#217'b;'#211'Y5'#206'Q0'#200
+  +'HCiIIIIGGGxxx'#255#255#255#194#192#189#181#159'p'#200#175'r'#213#190'~'#230
+  +#211#145#241#227#163#244#235#177#250#242#182#255#244#174#255#240#162#255#232
+  +#147#255#224#132#255#214't'#255#209'^'#192#157'_YW]'#150#226#163#150#226#163
+  +#150#226#163#149#226#163#149#225#162#149#225#162#149#225#162#149#225#161#148
+  +#225#161#148#225#161#148#224#160#148#224#160#148#224#160#147#224#160#147#224
+  +#160#147#224#159#147#223#159#147#223#159#147#223#158#146#223#158#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#206
+  +#206#206#162#162#162#162#162#162'QQQ'#20#20#20#161#161#161#161#161#161#161
+  +#161#161'((([[['#131#131#131#0#0#0#141#141#141#161#161#161#161#161#161'===33'
+  +'3'#161#161#161#141#141#141#20#20#20'<<<'#131#131#131#160#160#160#30#30#30'F'
+  +'FFPPP'#160#160#160#151#151#151#10#10#10'xxx'#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#0#0#0'xxx'#159#159#159#150#150#150#10#10#10'xxx'
+  +#159#159#159#159#159#159#159#159#159#158#158#158#129#129#129#10#10#10#149#149
+  +#149#158#158#158#158#158#158';;;((('#158#158#158#158#158#158#158#158#158#158
+  +#158#158'OOO'#20#20#20#157#157#157#157#157#157#157#157#157'''''''YYY'#157#157
+  +#157#157#157#157#20#20#20'''''''YYY'#157#157#157#157#157#157#157#157#157#156
+  +#156#156#156#156#156#0#0#0'uuu'#156#156#156#156#156#156#29#29#29'XXX'#156#156
+  +#156'''''''NNN'#156#156#156#156#156#156#156#156#156#155#155#155#155#155#155
+  +'''''''NNN'#155#155#155#155#155#155'''''''NNN'#155#155#155#155#155#155''''''
+  +'''MMM'#154#154#154':::'''''''#154#154#154#154#154#154#154#154#154#145#145
+  +#145#10#10#10'jjj'#154#154#154'ttt'#0#0#0#135#135#135#153#153#153#153#153#153
+  +'MMM000'#153#153#153'&&&MMM'#153#153#153'&&&MMM'#153#153#153#153#153#153#153
+  +#153#153#152#152#152#152#152#152#10#10#10'___'#152#152#152#152#152#152#152
+  +#152#152#152#152#152'rrr'#0#0#0#152#152#152#152#152#152#152#152#152#152#152
+  +#152#151#151#151'LLL&&&'#151#151#151#151#151#151#151#151#151#151#151#151#0#0
+  +#0#0#0#0#157#233#174#157#233#174#157#233#174#157#233#173#156#233#173#156#232
+  +#173#156#232#173#150#216#164'fffcccaaaX'#230#130'R'#234'|L'#228'sF'#223'kA'
+  +#217'b;'#211'Y5'#206'QA'#132'LKKKIIIxyy'#255#255#255#231#230#230#209#210#213
+  +#200#199#201#188#185#184#174#170#167#168#163#155#171#166#151#177#170#148#183
+  +#174#143#192#177#135#200#179'|'#213#183's'#232#192'j'#254#198'W'#189#154'^]['
+  +'a'#150#226#164#150#226#163#150#226#163#150#226#163#149#226#163#149#225#162
+  +#149#225#162#149#225#162#149#225#161#148#225#161#148#225#161#148#224#160#148
+  +#224#160#148#224#160#147#224#160#147#224#160#147#224#159#147#223#159#147#223
+  +#159#147#223#158#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#206#206#206#162#162#162#162#162#162'QQQ)))'#162#162
+  +#162#161#161#161#161#161#161'QQQ(((QQQ((('#161#161#161#161#161#161#161#161
+  +#161'yyy'#0#0#0#161#161#161'eee333dddFFF'#141#141#141#20#20#20#131#131#131#30
+  +#30#30#160#160#160'xxx'#0#0#0'PPPPPPPPPPPPxxx'#159#159#159#0#0#0'xxx'#159#159
+  +#159'xxx'#0#0#0'PPPPPPPPPPPPxxxOOO((('#158#158#158#158#158#158#158#158#158'O'
+  +'OO((('#158#158#158#158#158#158#158#158#158#158#158#158'OOO((('#157#157#157
+  +#157#157#157#157#157#157'OOO'''''''#157#157#157'lll'#20#20#20#128#128#128#20
+  +#20#20#157#157#157#157#157#157#157#157#157#157#157#157#156#156#156#0#0#0'uuu'
+  +#156#156#156''#0#0#0#137#137#137#156#156#156#0#0#0';;;NNNNNNNNNbbb'#155
+  +#155#155'''''''NNN'#155#155#155#155#155#155'''''''NNN'#155#155#155#155#155
+  +#155'''''''NNN'#154#154#154#0#0#0'ttt'#154#154#154#154#154#154#154#154#154
+  +#154#154#154'DDD000'#154#154#154'ttt'#0#0#0#154#154#154#154#154#154#153#153
+  +#153'sss'#0#0#0#153#153#153'&&&MMM'#153#153#153#0#0#0':::MMMMMMMMM```rrr'#0#0
+  ,#0#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152'rrr'#0#0#0#152
+  +#152#152#152#152#152#152#152#152#143#143#143'LLL'#9#9#9'hhh'#151#151#151#151
+  +#151#151#151#151#151#151#151#151#0#0#0#0#0#0#157#234#175#157#233#174#157#233
+  +#174#157#233#174#157#233#173#156#233#173#156#232#173#156#232#173't'#135'xfff'
+  +'ccc_'#171'vW'#240#133'R'#234'|L'#228'sF'#223'kA'#217'b;'#211'Y7'#198'QC|MIS'
+  +'K@@@'#186#186#186#203#203#203#220#219#219#231#230#229#233#230#231#231#228
+  +#229#228#224#224#223#218#219#210#204#205#191#185#188#179#172#174#171#163#163
+  +#162#152#150#149#139#133#147#132'u'#153#137'{hcb'#150#226#164#150#226#164#150
+  +#226#163#150#226#163#150#226#163#149#226#163#149#225#162#149#225#162#149#225
+  +#162#149#225#161#148#225#161#148#225#161#148#224#160#148#224#160#148#224#160
+  +#147#224#160#147#224#160#147#224#159#147#223#159#147#223#159#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#206#206
+  +#206#162#162#162#162#162#162'QQQ)))'#162#162#162#162#162#162#161#161#161'QQQ'
+  +'333[[['#30#30#30#161#161#161#161#161#161#161#161#161'ooo'#10#10#10#161#161
+  +#161'333[[['#141#141#141#30#30#30'dddFFF'#160#160#160#10#10#10#141#141#141
+  +#141#141#141#0#0#0'PPPPPPPPP'#20#20#20'PPP'#159#159#159#0#0#0'xxx'#159#159
+  +#159#140#140#140#0#0#0'PPPPPPPPP'#20#20#20'PPPZZZ'#30#30#30#158#158#158#158
+  +#158#158#158#158#158'OOO((('#158#158#158#158#158#158#158#158#158#158#158#158
+  +'OOO((('#158#158#158#157#157#157#157#157#157'OOO111'#157#157#157';;;OOO'#157
+  +#157#157#20#20#20#128#128#128#157#157#157#157#157#157#157#157#157#157#157#157
+  +#0#0#0#29#29#29''''''''#10#10#10'bbb'#156#156#156#156#156#156#20#20#20';;;NN'
+  +'NNNN'''''''''''''#156#156#156'''''''NNN'#155#155#155#155#155#155'''''''NNN'
+  +#155#155#155#155#155#155'''''''NNNuuu'#0#0#0#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154'ttt'#0#0#0#154#154#154'ttt'#0#0#0#154#154#154
+  +#154#154#154#154#154#154'sss'#10#10#10#153#153#153'&&&MMM'#153#153#153#19#19
+  +#19':::MMMMMM&&&&&&}}}'#0#0#0#143#143#143#152#152#152#152#152#152#152#152#152
+  +#152#152#152'rrr'#0#0#0#152#152#152#152#152#152#143#143#143#29#29#29'000'#134
+  +#134#134#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#0#0#0#0
+  +#0#0#158#234#175#157#234#175#157#233#174#157#233#174#157#233#174#157#233#173
+  +#156#233#173#156#232#173#137#185#148'hhhfffcmf]'#236#138'W'#240#133'R'#234'|'
+  +'L'#228'sF'#223'kA'#217'b;'#211'Y5'#206'Q0'#200'H.'#180'A.e50]54U79V;J\JZlZl'
+  +'wj~'#132'{'#149#146#145#162#157#156#171#165#164#180#172#171#184#175#174#181
+  +#170#170#175#164#164#143#133#133'LJH'#150#227#164#150#226#164#150#226#164#150
+  +#226#163#150#226#163#150#226#163#149#226#163#149#225#162#149#225#162#149#225
+  +#162#149#225#161#148#225#161#148#225#161#148#224#160#148#224#160#148#224#160
+  +#147#224#160#147#224#160#147#224#159#147#223#159#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#206#206#206#162#162
+  +#162#162#162#162'QQQ'#10#10#10#132#132#132#162#162#162#152#152#152#20#20#20
+  +'[[['#141#141#141#0#0#0'yyy'#161#161#161#161#161#161'333==='#161#161#161#10
+  +#10#10#131#131#131#161#161#161#30#30#30'222nnn'#160#160#160'222ZZZ'#160#160
+  +#160'(((ZZZ'#160#160#160#151#151#151#10#10#10#130#130#130#159#159#159#0#0#0
+  +'222'#159#159#159#159#159#159'(((ZZZ'#159#159#159#150#150#150#10#10#10#130
+  +#130#130#140#140#140#0#0#0'www'#158#158#158#158#158#158'(((((('#158#158#158
+  +#158#158#158#158#158#158#158#158#158'OOO'#0#0#0#129#129#129#158#158#158#148
+  +#148#148#20#20#20'YYY'#148#148#148#0#0#0#138#138#138#157#157#157'EEE;;;'#157
+  +#157#157#157#157#157#157#157#157#157#157#157#0#0#0'XXXuuuNNN'#10#10#10#137
+  +#137#137#156#156#156'NNN111'#156#156#156#156#156#156'''''''XXX'#156#156#156
+  +''''''''''''''#155#155#155#155#155#155#19#19#19''''''''#155#155#155#146#146
+  +#146#10#10#10'kkkuuu'#0#0#0#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154'ttt'#0#0#0#154#154#154'ttt'#0#0#0'WWW'#154#154#154#154#154#154
+  +'000000'#153#153#153'&&&MMM'#153#153#153'MMM000'#153#153#153#153#153#153'&&&'
+  +'VVV'#153#153#153#29#29#29'LLL'#152#152#152#152#152#152#152#152#152#152#152
+  +#152'rrr'#0#0#0#152#152#152#152#152#152'|||'#0#0#0#152#152#152#152#152#152
+  +#152#152#152#151#151#151#151#151#151#151#151#151#151#151#151#0#0#0#0#0#0#158
+  +#234#175#158#234#175#157#234#175#157#233#174#157#233#174#157#233#174#157#233
+  +#173#156#233#173#156#232#173'pzrhhhfffc'#146'r]'#245#141'W'#240#133'R'#234'|'
+  +'L'#228'sF'#223'kA'#217'b;'#211'Y5'#206'Q0'#200'H*'#194'?$'#189'7'#30#183'.'
+  +#25#178'&'#20#169#29#15#158#22#13#144#16#11'~'#12#16'o'#16#23'e'#23#30'\'#30
+  +'-H-;;:ECCJHGQcS'#130#191#142#151#227#164#150#227#164#150#226#164#150#226#164
+  +#150#226#163#150#226#163#150#226#163#149#226#163#149#225#162#149#225#162#149
+  +#225#162#149#225#161#148#225#161#148#225#161#148#224#160#148#224#160#148#224
+  +#160#147#224#160#147#224#160#147#224#159#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#207#207#207#162#162#162#162
+  +#162#162'QQQGGG))))))'#20#20#20')))'#161#161#161#161#161#161'eee'#20#20#20'('
+  ,'(('#30#30#30'((('#152#152#152'yyy'#10#10#10#161#161#161#161#161#161'[[['#10
+  +#10#10#160#160#160#160#160#160'ddd((('#160#160#160#131#131#131#20#20#20'((('
+  +#20#20#20'<<<'#160#160#160#159#159#159#0#0#0'ZZZ'#20#20#20#130#130#130#130
+  +#130#130#20#20#20'((('#20#20#20'<<<'#159#159#159#159#159#159'ddd'#10#10#10'('
+  +'(('#20#20#20#30#30#30'((('#158#158#158#158#158#158#158#158#158#158#158#158
+  +'OOO'#30#30#30'(((((('#20#20#20''''''''#157#157#157'YYY'#30#30#30#157#157#157
+  +#157#157#157#128#128#128#10#10#10#157#157#157#157#157#157#157#157#157#157#157
+  +#157#0#0#0'vvv'#156#156#156#156#156#156'EEE;;;'#156#156#156#147#147#147''''''
+  +''''#29#29#29#29#29#29#29#29#29#147#147#147#156#156#156'''''''EEE'#29#29#29
+  +#19#19#19#29#29#29'aaa'#29#29#29#19#19#19#29#29#29#155#155#155#155#155#155#0
+  +#0#0'~~~'#154#154#154#154#154#154#154#154#154#154#154#154'aaa'#29#29#29#154
+  +#154#154'ttt'#0#0#0':::'''''''#29#29#29#19#19#19#135#135#135#153#153#153'&&&'
+  +'MMM'#153#153#153#144#144#144'&&&'#29#29#29#29#29#29#29#29#29#144#144#144#153
+  +#153#153'}}}'#29#29#29#29#29#29'&&&&&&|||'#29#29#29#0#0#0'&&&CCC'#152#152#152
+  +'000'#29#29#29#29#29#29'iii'#152#152#152#151#151#151#151#151#151#151#151#151
+  +#0#0#0#0#0#0#158#234#175#158#234#175#158#234#175#157#234#175#157#233#174#157
+  +#233#174#157#233#174#157#233#173#156#233#173#144#201#157'jjjhhhfffb'#174'|]'
+  +#245#141'W'#240#133'R'#234'|L'#228'sF'#223'kA'#217'b;'#211'Y5'#206'Q0'#200'H'
+  +'*'#194'?$'#189'7'#30#183'.'#25#178'&'#19#172#29#13#166#20#8#161#12#2#155#3#0
+  +#151#0#10#130#10'444222///\}b'#151#227#165#151#227#165#151#227#165#151#227
+  +#164#150#227#164#150#226#164#150#226#164#150#226#163#150#226#163#150#226#163
+  +#149#226#163#149#225#162#149#225#162#149#225#162#149#225#161#148#225#161#148
+  +#225#161#148#224#160#148#224#160#148#224#160#147#224#160#147#224#160#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#207#207#207#162#162#162#162#162#162#142#142#142#142#142#142#162#162#162'zzz'
+  +#132#132#132#162#162#162#162#162#162#161#161#161#161#161#161#161#161#161'yyy'
+  +#131#131#131#161#161#161#161#161#161#141#141#141#131#131#131#161#161#161#161
+  +#161#161#152#152#152#131#131#131#161#161#161#160#160#160#151#151#151'xxx'#160
+  +#160#160#160#160#160#160#160#160'xxx'#131#131#131#160#160#160#160#160#160#160
+  +#160#160'xxx'#159#159#159#140#140#140#150#150#150#159#159#159#159#159#159'xx'
+  +'x'#130#130#130#159#159#159#159#159#159#159#159#159#159#159#159#150#150#150
+  +'xxx'#149#149#149'OOO((('#158#158#158#158#158#158#158#158#158#158#158#158'OO'
+  +'O((('#158#158#158'www'#129#129#129#158#158#158#157#157#157#128#128#128#138
+  +#138#138#157#157#157#157#157#157#157#157#157'vvv'#148#148#148#157#157#157#157
+  +#157#157#157#157#157#0#0#0'vvv'#157#157#157#156#156#156'EEE111'#156#156#156
+  +#156#156#156#156#156#156'uuu'#156#156#156#156#156#156#156#156#156''#147
+  +#147#147#137#137#137'uuu'#155#155#155#155#155#155#136#136#136'uuu'#155#155
+  +#155#155#155#155#155#155#155'::::::'#155#155#155#154#154#154#154#154#154#154
+  +#154#154#19#19#19'MMM'#154#154#154'ttt'#0#0#0#154#154#154'~~~ttt'#154#154#154
+  +#154#154#154#154#154#154'}}}'#134#134#134#153#153#153#153#153#153#153#153#153
+  +'}}}sss'#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153'}}}rrr'
+  +#143#143#143#143#143#143'VVV'#0#0#0'rrr|||'#152#152#152#152#152#152'||||||'
+  +#152#152#152#152#152#152#152#152#152#151#151#151#151#151#151#0#0#0#0#0#0#158
+  +#234#176#158#234#175#158#234#175#158#234#175#157#234#175#157#233#174#157#233
+  +#174#157#233#174#157#233#173#156#233#173#129#162#136'jjjhhhfffb'#174'|]'#245
+  +#141'W'#240#133'R'#234'|L'#228'sF'#223'kA'#217'b;'#211'Y5'#206'Q0'#200'H*'
+  +#194'?$'#189'7'#30#183'.'#25#178'&'#19#172#29#13#166#20#8#161#12#16#131#17'5'
+  +'>5666444ETH'#146#217#159#151#228#166#151#227#165#151#227#165#151#227#165#151
+  +#227#164#150#227#164#150#226#164#150#226#164#150#226#163#150#226#163#150#226
+  +#163#149#226#163#149#225#162#149#225#162#149#225#162#149#225#161#148#225#161
+  +#148#225#161#148#224#160#148#224#160#148#224#160#147#224#160#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#207#207
+  +#207#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159'OOO((('#158#158
+  +#158#158#158#158#158#158#158#158#158#158'OOO((('#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#0#0#0'YYYvvvccc'#10#10#10'lll'#156#156#156#156#156#156#156#156#156#156#156
+  ,#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#146#146#146#19#19#19':::uuujjj'''''''#29#29
+  +#29#145#145#145#154#154#154'ttt'#0#0#0#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154'MMMMMM'#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#152#152#152#152#152#152#134#134#134'000'
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#151#151#151#0#0#0#0#0#0#158#235
+  +#176#158#234#176#158#234#175#158#234#175#158#234#175#157#234#175#157#233#174
+  +#157#233#174#157#233#174#157#233#173#156#233#173'w'#138'|jjjhhhfffc'#146'r]'
+  +#236#138'W'#240#133'R'#234'|L'#228'sF'#223'kA'#217'b;'#211'Y5'#206'Q0'#200'H'
+  +'*'#194'?$'#189'7'#30#183'.'#25#178'&'#19#172#29'&s*===;;;999<A='#140#207#152
+  +#152#228#166#152#228#166#151#228#166#151#227#165#151#227#165#151#227#165#151
+  +#227#164#150#227#164#150#226#164#150#226#164#150#226#163#150#226#163#150#226
+  +#163#149#226#163#149#225#162#149#225#162#149#225#162#149#225#161#148#225#161
+  +#148#225#161#148#224#160#148#224#160#148#224#160#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#207#207#207#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159'PPP((('#158#158#158#158#158
+  +#158#158#158#158#158#158#158'OOO((('#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157';;;'''''''''
+  +'''''111lll'#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#146#146#146'NNN''''''''''''WWW'#145#145
+  +#145#154#154#154#154#154#154'ttt'#0#0#0#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154'aaaaaa'#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#0#0#0#0#0#0
+  +#158#235#176#158#235#176#158#234#176#158#234#175#158#234#175#158#234#175#157
+  +#234#175#157#233#174#157#233#174#157#233#174#157#233#173#153#226#169'z'#146
+  +#128'jjjhhhfffcmf_'#171'vX'#230#130'R'#234'|L'#228'sF'#223'kA'#217'b;'#211'Y'
+  +'5'#206'Q0'#200'H*'#194'?$'#189'7-'#141'7?R@BBB@@@===AFB'#134#196#147#152#228
+  +#167#152#228#166#152#228#166#152#228#166#151#228#166#151#227#165#151#227#165
+  +#151#227#165#151#227#164#150#227#164#150#226#164#150#226#164#150#226#163#150
+  +#226#163#150#226#163#149#226#163#149#225#162#149#225#162#149#225#162#149#225
+  +#161#148#225#161#148#225#161#148#224#160#148#224#160#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#207#207#207#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#140#140#140#130#130#130
+  +#158#158#158#158#158#158#158#158#158#158#158#158#139#139#139#129#129#129#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  ,#155#155#155#155#154#154#154#154#154#154#154#154#154#145#145#145'ttt'#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#0#0#0#0#0#0#159#235#176#158#235#176#158#235
+  +#176#158#234#176#158#234#175#158#234#175#158#234#175#157#234#175#157#233#174
+  +#157#233#174#157#233#174#157#233#173#156#233#173#129#162#136'jjjhhhfffcccaaa'
+  +'\'#131'gW'#163'kP'#185'kJ'#188'eF'#184'^A'#179'WA'#151'PB|KISKIIIGGGDDDBBBV'
+  +'iZ'#148#219#161#152#229#167#152#228#167#152#228#167#152#228#166#152#228#166
+  +#152#228#166#151#228#166#151#227#165#151#227#165#151#227#165#151#227#164#150
+  +#227#164#150#226#164#150#226#164#150#226#163#150#226#163#150#226#163#149#226
+  +#163#149#225#162#149#225#162#149#225#162#149#225#161#148#225#161#148#225#161
+  +#148#224#160#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#207#207#207#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#0#0#0#0#0#0#159#235#177#159#235#176#158#235#176#158#235#176#158#234#176#158
+  +#234#175#158#234#175#158#234#175#157#234#175#157#233#174#157#233#174#157#233
+  +#174#157#233#173#156#233#173#144#201#157'pzrhhhfffcccaaa___\\\ZZZWWWUUUSSSPP'
+  +'PNNNKKKIIILQMt'#159'|'#153#229#168#153#229#168#153#229#167#152#229#167#152
+  +#228#167#152#228#167#152#228#166#152#228#166#152#228#166#151#228#166#151#227
+  +#165#151#227#165#151#227#165#151#227#164#150#227#164#150#226#164#150#226#164
+  +#150#226#163#150#226#163#150#226#163#149#226#163#149#225#162#149#225#162#149
+  +#225#162#149#225#161#148#225#161#148#225#161#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#207#207#207#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#154#154#154#154#154#154#154#154#154#154#154
+  ,#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#0#0#0#0#0#0#159#235#177#159#235#177#159#235
+  +#176#158#235#176#158#235#176#158#234#176#158#234#175#158#234#175#158#234#175
+  +#157#234#175#157#233#174#157#233#174#157#233#174#157#233#173#156#233#173#156
+  +#232#173#137#185#148't'#135'xfffcccaaa___\\\ZZZWWWUUUSSSPPPXaYs'#153'z'#149
+  +#221#163#153#230#169#153#229#168#153#229#168#153#229#168#153#229#167#152#229
+  +#167#152#228#167#152#228#167#152#228#166#152#228#166#152#228#166#151#228#166
+  +#151#227#165#151#227#165#151#227#165#151#227#164#150#227#164#150#226#164#150
+  +#226#164#150#226#163#150#226#163#150#226#163#149#226#163#149#225#162#149#225
+  +#162#149#225#162#149#225#161#148#225#161#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#207#207#207#163#163#163#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#0#0#0#0#0#0#159#235#177#159#235#177#159#235#177
+  +#159#235#176#158#235#176#158#235#176#158#234#176#158#234#175#158#234#175#158
+  +#234#175#157#234#175#157#233#174#157#233#174#157#233#174#157#233#173#156#233
+  +#173#156#232#173#156#232#173#150#216#164#136#183#146#128#166#136'p'#131'tm'
+  +#128'qlpj}nu'#150'{|'#167#133#141#203#154#154#230#170#154#230#169#154#230
+  +#169#154#230#169#153#230#169#153#229#168#153#229#168#153#229#168#153#229#167
+  +#152#229#167#152#228#167#152#228#167#152#228#166#152#228#166#152#228#166#151
+  +#228#166#151#227#165#151#227#165#151#227#165#151#227#164#150#227#164#150#226
+  +#164#150#226#164#150#226#163#150#226#163#150#226#163#149#226#163#149#225#162
+  +#149#225#162#149#225#162#149#225#161#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#207#207#207#163#163#163#163#163
+  +#163#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  ,#155#155#155#155#155#155#155#155#155#155#155#155#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#0#0#0#0#0#0#159#236#178#159#235#177#159#235#177#159
+  +#235#177#159#235#176#158#235#176#158#235#176#158#234#176#158#234#175#158#234
+  +#175#158#234#175#157#234#175#157#233#174#157#233#174#157#233#174#157#233#173
+  +#156#233#173#156#232#173#156#232#173#156#232#172#156#232#172#156#232#172#155
+  +#232#172#155#231#171#155#231#171#155#231#171#155#231#170#154#231#170#154#230
+  +#170#154#230#170#154#230#169#154#230#169#154#230#169#153#230#169#153#229#168
+  +#153#229#168#153#229#168#153#229#167#152#229#167#152#228#167#152#228#167#152
+  +#228#166#152#228#166#152#228#166#151#228#166#151#227#165#151#227#165#151#227
+  +#165#151#227#164#150#227#164#150#226#164#150#226#164#150#226#163#150#226#163
+  +#150#226#163#149#226#163#149#225#162#149#225#162#149#225#162#245#249#245#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#223#223
+  +#223#163#163#163#163#163#163#163#163#163#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#0#0#0#0#0#0#160#236#178#159
+  +#236#178#159#235#177#159#235#177#159#235#177#159#235#176#158#235#176#158#235
+  +#176#158#234#176#158#234#175#158#234#175#158#234#175#157#234#175#157#233#174
+  +#157#233#174#157#233#174#157#233#173#156#233#173#156#232#173#156#232#173#156
+  +#232#172#156#232#172#156#232#172#155#232#172#155#231#171#155#231#171#155#231
+  +#171#155#231#170#154#231#170#154#230#170#154#230#170#154#230#169#154#230#169
+  +#154#230#169#153#230#169#153#229#168#153#229#168#153#229#168#153#229#167#152
+  +#229#167#152#228#167#152#228#167#152#228#166#152#228#166#152#228#166#151#228
+  +#166#151#227#165#151#227#165#151#227#165#151#227#164#150#227#164#150#226#164
+  +#150#226#164#150#226#163#150#226#163#150#226#163#149#226#163#149#225#162#149
+  +#225#162#226#245#229#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#234#234#234#163#163#163#163#163#163#163#163#163#163#163#163
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#156#156#156#156#156#156#156
+  ,#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#0#0
+  +#0#0#0#0#160#236#178#160#236#178#159#236#178#159#235#177#159#235#177#159#235
+  +#177#159#235#176#158#235#176#158#235#176#158#234#176#158#234#175#158#234#175
+  +#158#234#175#157#234#175#157#233#174#157#233#174#157#233#174#157#233#173#156
+  +#233#173#156#232#173#156#232#173#156#232#172#156#232#172#156#232#172#155#232
+  +#172#155#231#171#155#231#171#155#231#171#155#231#170#154#231#170#154#230#170
+  +#154#230#170#154#230#169#154#230#169#154#230#169#153#230#169#153#229#168#153
+  +#229#168#153#229#168#153#229#167#152#229#167#152#228#167#152#228#167#152#228
+  +#166#152#228#166#152#228#166#151#228#166#151#227#165#151#227#165#151#227#165
+  +#151#227#164#150#227#164#150#226#164#150#226#164#150#226#163#150#226#163#150
+  +#226#163#149#226#163#149#225#162#219#243#223#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#174#174#174#163#163#163
+  +#163#163#163#163#163#163#163#163#163#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#0#0#0#0#0#0#160#236#178#160#236#178#160#236#178#159#236
+  +#178#159#235#177#159#235#177#159#235#177#159#235#176#158#235#176#158#235#176
+  +#158#234#176#158#234#175#158#234#175#158#234#175#157#234#175#157#233#174#157
+  +#233#174#157#233#174#157#233#173#156#233#173#156#232#173#156#232#173#156#232
+  +#172#156#232#172#156#232#172#155#232#172#155#231#171#155#231#171#155#231#171
+  +#155#231#170#154#231#170#154#230#170#154#230#170#154#230#169#154#230#169#154
+  +#230#169#153#230#169#153#229#168#153#229#168#153#229#168#153#229#167#152#229
+  +#167#152#228#167#152#228#167#152#228#166#152#228#166#152#228#166#151#228#166
+  +#151#227#165#151#227#165#151#227#165#151#227#164#150#227#164#150#226#164#150
+  +#226#164#150#226#163#150#226#163#150#226#163#149#226#163#200#238#207#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#207#207#207#163#163#163#163#163#163#163#163#163#163#163#163#163#163#163#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  ,#158#158#158#158#158#158#158#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#0#0#0#0#0#0#160#236#179#160#236
+  +#178#160#236#178#160#236#178#159#236#178#159#235#177#159#235#177#159#235#177
+  +#159#235#176#158#235#176#158#235#176#158#234#176#158#234#175#158#234#175#158
+  +#234#175#157#234#175#157#233#174#157#233#174#157#233#174#157#233#173#156#233
+  +#173#156#232#173#156#232#173#156#232#172#156#232#172#156#232#172#155#232#172
+  +#155#231#171#155#231#171#155#231#171#155#231#170#154#231#170#154#230#170#154
+  +#230#170#154#230#169#154#230#169#154#230#169#153#230#169#153#229#168#153#229
+  +#168#153#229#168#153#229#167#152#229#167#152#228#167#152#228#167#152#228#166
+  +#152#228#166#152#228#166#151#228#166#151#227#165#151#227#165#151#227#165#151
+  +#227#164#150#227#164#150#226#164#150#226#164#150#226#163#150#226#163#150#226
+  +#163#168#230#179#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#246#246#246#174#174#174#163#163#163#163#163#163#163
+  +#163#163#163#163#163#163#163#163#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#152#152#152#152#152#152#152#152#152#152#152#152#0#0#0#0
+  +#0#0#160#237#179#160#236#179#160#236#178#160#236#178#160#236#178#159#236#178
+  +#159#235#177#159#235#177#159#235#177#159#235#176#158#235#176#158#235#176#158
+  +#234#176#158#234#175#158#234#175#158#234#175#157#234#175#157#233#174#157#233
+  +#174#157#233#174#157#233#173#156#233#173#156#232#173#156#232#173#156#232#172
+  +#156#232#172#156#232#172#155#232#172#155#231#171#155#231#171#155#231#171#155
+  +#231#170#154#231#170#154#230#170#154#230#170#154#230#169#154#230#169#154#230
+  +#169#153#230#169#153#229#168#153#229#168#153#229#168#153#229#167#152#229#167
+  +#152#228#167#152#228#167#152#228#166#152#228#166#152#228#166#151#228#166#151
+  +#227#165#151#227#165#151#227#165#151#227#164#150#227#164#150#226#164#150#226
+  +#164#150#226#163#150#226#163#150#226#163#238#247#240#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#235#235#235#169
+  +#169#169#163#163#163#163#163#163#163#163#163#163#163#163#163#163#163#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  ,#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#152#152#152#152#152
+  +#152#152#152#152#0#0#0#0#0#0#161#237#179#160#237#179#160#236#179#160#236#178
+  +#160#236#178#160#236#178#159#236#178#159#235#177#159#235#177#159#235#177#159
+  +#235#176#158#235#176#158#235#176#158#234#176#158#234#175#158#234#175#158#234
+  +#175#157#234#175#157#233#174#157#233#174#157#233#174#157#233#173#156#233#173
+  +#156#232#173#156#232#173#156#232#172#156#232#172#156#232#172#155#232#172#155
+  +#231#171#155#231#171#155#231#171#155#231#170#154#231#170#154#230#170#154#230
+  +#170#154#230#169#154#230#169#154#230#169#153#230#169#153#229#168#153#229#168
+  +#153#229#168#153#229#167#152#229#167#152#228#167#152#228#167#152#228#166#152
+  +#228#166#152#228#166#151#228#166#151#227#165#151#227#165#151#227#165#151#227
+  +#164#150#227#164#150#226#164#150#226#164#150#226#163#150#226#163#194#237#201
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#218#218#218#163#163#163#163#163#163#163#163#163#163#163
+  +#163#163#163#163#163#163#163#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#152#152#152#152#152#152#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0
+]);
+LazarusResources.Add('POWERED_BY_DATAABSTRACT_SERVER','BMP',[
+  'BMvw'#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#212#0#0#0'0'#0#0#0#1#0#24#0#0#0#0#0'@w'#0
+  +#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#246#246#246#229#229#229
+  +#207#207#207#196#196#196#185#185#185#163#163#163#163#163#163#163#163#163#163
+  +#163#163#163#163#163#163#163#163#163#163#163#163#163#163#163#163#163#163#163
+  +#163#163#163#163#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#151#151#151#151#151#151#151#151#151#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#151#150#150#150#150#150#150#150#150#150#150
+  +#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150
+  +#150#150#150#150#149#149#149#149#149#149#149#149#149#149#149#149#149#149#149
+  +#149#149#149#149#149#149#149#149#149#0#0#0#0#0#0#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#240
+  +#240#240#229#229#229#213#213#213#207#207#207#185#185#185#185#185#185#163#163
+  +#163#163#163#163#163#163#163#163#163#163#163#163#163#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  ,#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#150
+  +#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150
+  +#150#150#150#150#150#150#150#150#150#150#150#150#150#149#149#149#149#149#149
+  +#149#149#149#149#149#149#149#149#149#149#149#149#149#149#149#0#0#0#0#0#0#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#229#229#229#229#229#229#218#218#218
+  +#207#207#207#207#207#207#184#184#184#184#184#184#184#184#184#168#168#168#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#150#150#150#150#150#150#150#150#150#150#150
+  +#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150
+  +#150#150#150#149#149#149#149#149#149#149#149#149#149#149#149#149#149#149#149
+  +#149#149#0#0#0#0#0#0#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#240#240#240#229#229
+  +#229#229#229#229#229#229#229#201#201#201#172#172#172#172#172#172#172#172#172
+  +#172#172#172#172#172#172#229#229#229#229#229#229#228#228#228#228#228#228#228
+  +#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#240#240
+  ,#240#251#251#251#251#251#251#236#236#236#189#189#189#155#155#155#151#151#151
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#150#150
+  +#150'xxx'#140#140#140#159#159#159#159#159#159#159#159#159#159#159#159#158#158
+  +#158#149#149#149'wwwwww'#149#149#149#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#155#155#155#155#155#155'uuuuuu'#146#146#146#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#154#154#154#154#154#154
+  +#145#145#145'ttttttttt'#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#153#153#153#153#153#153#134#134
+  +#134'sss'#144#144#144#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#134#134#134'rrrrrr'#152#152
+  +#152#152#152#152#152#152#152#152#152#152#151#151#151#151#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151
+  +#151#151'rrrrrrrrr'#142#142#142#150#150#150#150#150#150#150#150#150#150#150
+  +#150#150#150#150#150#150#150#150#150#150#150#150#150'zzzqqq'#150#150#150#149
+  +#149#149#149#149#149#149#149#149#149#149#149#149#149#149#0#0#0#0#0#0#184#236
+  +#194#208#241#214#239#248#241#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251'???'#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#16#16'???'#142#142#142#236#236#236#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251'nnn'#0#0#0#0#0#0#0#0#0#0#0#0'<<<'#141#141#141#0#0#0#0#0#0#0#0#0'<<<'#159
+  +#159#159#159#159#159#159#159#159#159#159#159#130#130#130'((('#0#0#0#0#0#0#0#0
+  +#0#0#0#0#159#159#159#159#159#159#159#159#159'FFF'#0#0#0#0#0#0#0#0#0#0#0#0';;'
+  +';'#139#139#139#0#0#0#0#0#0#0#0#0';;;'#158#158#158#158#158#158#158#158#158
+  +#157#157#157#157#157#157#157#157#157#157#157#157#20#20#20#0#0#0#0#0#0#0#0#0
+  +'ccc'#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#156#156#156
+  +#147#147#147#0#0#0#0#0#0#0#0#0#0#0#0'lll'#156#156#156'uuu'#0#0#0#0#0#0#0#0#0
+  +#156#156#156'NNN'#10#10#10#0#0#0#0#0#0#0#0#0'111'#136#136#136#155#155#155#155
+  +#155#155#155#155#155#155#155#155'aaa'#29#29#29#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +'000'#135#135#135#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +'jjj'#19#19#19#0#0#0#0#0#0#0#0#0'&&&'#153#153#153#153#153#153'MMM'#0#0#0#0#0
+  +#0#0#0#0'MMM'#153#153#153#152#152#152#152#152#152#152#152#152#152#152#152#143
+  +#143#143'&&&'#0#0#0#0#0#0#0#0#0#10#10#10'LLLiii'#0#0#0#0#0#0#0#0#0'___'#151
+  +#151#151#151#151#151#151#151#151#151#151#151'{{{999'#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#19#19#19#141#141#141#150#150#150#150#150#150#150#150#150#150#150#150
+  +'KKK'#9#9#9#0#0#0#0#0#0#0#0#0'KKK'#149#149#149#149#149#149#149#149#149#149
+  +#149#149#0#0#0#0#0#0#153#229#168#153#229#168#153#229#168#165#232#178#189#237
+  +#199#214#243#220#239#248#241#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251'???'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#16#16#16'~~~'#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251'nnn'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#10#10#10#0#0#0#0#0#0#0#0#0'PPP'
+  +#160#160#160#159#159#159#159#159#159#140#140#140#10#10#10#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#159#159#159#159#159#159'FFF'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#10#10#10#0#0#0#0#0#0#0#0#0'OOO'#158#158#158#158#158#158#158#158#158#158#158
+  +#158#157#157#157#157#157#157#157#157#157'EEE'#0#0#0#0#0#0#0#0#0';;;'#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157'bbb'#0#0#0#0
+  +#0#0#0#0#0#0#0#0#147#147#147#156#156#156'uuu'#0#0#0#0#0#0#0#0#0'111'#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#10#10#10'~~~'#155#155#155#155#155#155#155#155
+  ,#155'DDD'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#10#10#10#135#135#135#154
+  +#154#154#154#154#154#154#154#154'jjj'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'&&&'#153
+  +#153#153#153#153#153'MMM'#0#0#0#0#0#0#0#0#0'MMM'#153#153#153#153#153#153#152
+  +#152#152#152#152#152#152#152#152#29#29#29#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#10#10#10#0#0#0#0#0#0#0#0#0'rrr'#151#151#151#151#151#151#151#151#151'___'#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#151#151#151#150#150#150#150#150
+  +#150#150#150#150'BBB'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'KKK'#150#150#150#149#149
+  +#149#149#149#149#149#149#149#0#0#0#0#0#0#153#230#169#153#229#168#153#229#168
+  +#153#229#168#153#229#167#152#229#167#152#228#167#164#231#177#189#237#198#208
+  +#241#214#232#247#235#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251'???'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'^^^'#251#251#251#251#251#251#251#251#251
+  +#236#236#236#0#0#0#0#0#0#0#0#0#0#0#0#26#26#26'((('#10#10#10#0#0#0#0#0#0#0#0#0
+  +#0#0#0'PPP'#160#160#160#160#160#160#159#159#159'ZZZ'#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#159#159#159#150#150#150#0#0#0#0#0#0#0#0#0#0#0#0#20#20#20'((('#10
+  +#10#10#0#0#0#0#0#0#0#0#0#0#0#0'OOO'#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#157#157#157#157#157#157#128#128#128#0#0#0#0#0#0#0#0#0#20
+  +#20#20#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157';;;'#0#0#0#0#0#0#0#0#0'111'#156#156#156#156#156#156'uuu'#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19#19#19#155#155#155#155
+  +#155#155#155#155#155'kkk'#0#0#0#0#0#0''''''''''''''#19#19#19#0#0#0#0#0#0#0#0
+  +#0'000'#154#154#154#154#154#154#154#154#154'000'#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0'&&&'#153#153#153#153#153#153'MMM'#0#0#0#0#0#0#0#0#0'MMM'#153#153#153#153
+  +#153#153#153#153#153#152#152#152'iii'#0#0#0#0#0#0#0#0#0#0#0#0#29#29#29'&&&'#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0'rrr'#151#151#151#151#151#151#133#133#133#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#28#28#28#151#151#151#151#151#151#150
+  +#150#150#150#150#150#9#9#9#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'KKK'#150#150#150#150
+  +#150#150#149#149#149#149#149#149#0#0#0#0#0#0#154#230#169#153#230#169#153#229
+  +#168#153#229#168#153#229#168#153#229#167#152#229#167#152#228#167#152#228#167
+  +#152#228#166#152#228#166#152#228#166#176#233#187#195#238#203#207#241#213#226
+  +#245#229#251#251#251#238#238#238#169#169#169'qqqDDD'#24#24#24#21#21#21#19#19
+  +#19#16#16#16',,,HHH'#146#146#146#163#162#162'cefY`Ycefcef'#238#238#238#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251'???'#0#0#0#0#0#0#0#0#0#189#189#189
+  +#251#251#251#251#251#251#220#220#220#157#157#157#31#31#31#0#0#0#0#0#0#0#0#0#0
+  +#0#0'~~~'#251#251#251#251#251#251#189#189#189#0#0#0#0#0#0#0#0#0#31#31#31#194
+  +#194#194#160#160#160#151#151#151#20#20#20#0#0#0#0#0#0#0#0#0'PPP'#160#160#160
+  +#160#160#160#160#160#160'222'#0#0#0#0#0#0#0#0#0'222'#150#150#150#150#150#150
+  +#159#159#159'xxx'#0#0#0#0#0#0#0#0#0#20#20#20#150#150#150#158#158#158#149#149
+  +#149#20#20#20#0#0#0#0#0#0#0#0#0'OOO'#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#157#157#157#157#157#157#10#10#10#0#0#0#0#0#0
+  +#0#0#0#128#128#128#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#10#10#10#0#0#0#0#0#0#0#0#0'bbb'#156#156#156#156#156#156'uuu'#0#0#0#0#0#0
+  +#0#0#0#0#0#0'111'#147#147#147#156#156#156'lll'#10#10#10#0#0#0#0#0#0#0#0#0'aa'
+  +'a'#155#155#155#155#155#155#146#146#146'aaa'#155#155#155#155#155#155#154#154
+  +#154#145#145#145#0#0#0#0#0#0#0#0#0#10#10#10#154#154#154#154#154#154#154#154
+  +#154#10#10#10#0#0#0#0#0#0#0#0#0'MMM'#153#153#153#144#144#144#153#153#153#153
+  +#153#153'MMM'#0#0#0#0#0#0#0#0#0'MMM'#153#153#153#153#153#153#153#153#153#153
+  +#153#153'LLL'#0#0#0#0#0#0#0#0#0'000'#152#152#152#152#152#152'|||'#0#0#0#0#0#0
+  +#0#0#0#0#0#0'rrr'#152#152#152#151#151#151'999'#0#0#0#0#0#0#0#0#0#9#9#9'UUU'
+  +#142#142#142#151#151#151#142#142#142'rrr'#151#151#151#151#151#151#151#151#151
+  +'zzz'#0#0#0#0#0#0#0#0#0#0#0#0'qqq'#150#150#150#141#141#141#150#150#150#150
+  +#150#150#150#150#150#149#149#149#0#0#0#0#0#0#154#230#169#154#230#169#153#230
+  +#169#153#229#168#153#229#168#153#229#168#153#229#167#152#229#167#152#228#167
+  +#152#228#167#152#228#166#152#228#166#152#228#166#151#228#166#151#227#165#138
+  +#204#150'QmV###!!!'#31#31#31#28#28#28#26#26#26#24#24#24#21#21#21#19#19#19#16
+  +#16#16#14#14#14' '#31#31'cef'#182#175#181'cef'#148#148#148#148#148#148'cefce'
+  +'fcef'#211#211#211#241#241#241#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251'???'#0#0#0#0#0#0#0#0#0#189#189#189#251#251#251
+  +#251#251#251#251#251#251#251#251#251#236#236#236'///'#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#220#220#220#251#251#251#205#205#205#0#0#0#0#0#0#0#0#0'///'#206#206#206#160
+  +#160#160#160#160#160'PPP'#0#0#0#0#0#0#0#0#0'PPP'#160#160#160#160#160#160#160
+  +#160#160'((('#0#0#0#0#0#0#0#0#0'xxx'#159#159#159#159#159#159#159#159#159#130
+  +#130#130#0#0#0#0#0#0#0#0#0#30#30#30#159#159#159#159#159#159#158#158#158'OOO'
+  +#0#0#0#0#0#0#0#0#0'OOO'#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#157#157#157';;;'#0#0#0#0#0#0#0#0#0'EEEvvvvv'
+  +'vvvvvvvccc'#0#0#0#0#0#0#0#0#0#0#0#0#137#137#137#156#156#156#156#156#156'uuu'
+  +#0#0#0#0#0#0#0#0#0#10#10#10#147#147#147#156#156#156#156#156#156#156#156#156
+  +'bbb'#0#0#0#0#0#0#0#0#0'111'#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155'WWW'#0#0#0#0#0#0#0#0#0#10#10#10#154#154
+  +#154#154#154#154#154#154#154#0#0#0#0#0#0#0#0#0#0#0#0#154#154#154#154#154#154
+  +#153#153#153#153#153#153#153#153#153'MMM'#0#0#0#0#0#0#0#0#0'MMM'#153#153#153
+  +#153#153#153#153#153#153#153#153#153'VVV'#0#0#0#0#0#0#0#0#0'CCC'#152#152#152
+  +#152#152#152#152#152#152'&&&'#0#0#0#0#0#0#0#0#0'rrr'#152#152#152#152#152#152
+  +#0#0#0#0#0#0#0#0#0#0#0#0'rrr'#151#151#151#151#151#151#151#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#151#151#151#151'rrr'#0#0#0#0#0#0#0#0#0'&&&'
+  +#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150
+  +#150#150#0#0#0#0#0#0#154#230#169#154#230#169#154#230#169#153#230#169#153#229
+  +#168#153#229#168#153#229#168#153#229#167#152#229#167#152#228#167#152#228#167
+  +#152#228#166#152#228#166#152#228#166'\}b***(((&&&###!!!'#31#31#31#28#28#28#26
+  +#26#26#24#24#24#21#21#21#19#19#19'%%%cef'#129'~'#129#188#182#187'cef'#148#148
+  +#148#148#148#148#148#148#148#148#148#148#148#148#148'cefcefcef'#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251'???'#0#0#0#0#0#0#0#0#0#189
+  +#189#189#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#236#236
+  +#236#16#16#16#0#0#0#0#0#0#0#0#0'nnn'#251#251#251#251#251#251#31#31#31#0#0#0#0
+  +#0#0#0#0#0'ttt'#161#161#161#160#160#160'PPP'#0#0#0#0#0#0#0#0#0'PPP'#160#160
+  +#160#160#160#160#160#160#160'((('#0#0#0#0#0#0#0#0#0'xxx'#159#159#159#159#159
+  +#159#159#159#159#159#159#159#20#20#20#0#0#0#0#0#0#0#0#0'ZZZ'#159#159#159#159
+  +#159#159'OOO'#0#0#0#0#0#0#0#0#0'OOO'#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158'lll'#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#30#30#30#156#156#156
+  +#156#156#156#156#156#156'uuu'#0#0#0#0#0#0#0#0#0''''''''#156#156#156#156#156
+  +#156#156#156#156#156#156#156#147#147#147#0#0#0#0#0#0#0#0#0#19#19#19#155#155
+  +#155#155#155#155#155#155#155#155#155#155#146#146#146'NNN'#19#19#19#0#0#0#0#0
+  +#0#0#0#0#0#0#0':::'#154#154#154#154#154#154#154#154#154#0#0#0#0#0#0#0#0#0#0#0
+  +#0#154#154#154#154#154#154#154#154#154#153#153#153#153#153#153'MMM'#0#0#0#0#0
+  +#0#0#0#0'MMM'#153#153#153#153#153#153#153#153#153#153#153#153#134#134#134#0#0
+  +#0#0#0#0#0#0#0#10#10#10'rrr'#152#152#152#152#152#152'&&&'#0#0#0#0#0#0#0#0#0
+  +'rrr'#152#152#152'rrr'#0#0#0#0#0#0#0#0#0#19#19#19#151#151#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151
+  +#151'rrr'#0#0#0#0#0#0#0#0#0'&&&'#150#150#150#150#150#150#150#150#150#150#150
+  +#150#150#150#150#150#150#150#150#150#150#0#0#0#0#0#0#154#230#170#154#230#169
+  +#154#230#169#154#230#169#153#230#169#153#229#168#153#229#168#153#229#168#153
+  +#229#167#152#229#167#152#228#167#152#228#167#140#207#152'ETH///---***((('#30
+  +'7'#30#15'V'#15#8'd'#8#0'x'#0#0'u'#0#0'r'#0#0'o'#0'%U$cef'#204#199#204'cef'
+  +#194#189#194'cef'#148#148#148#148#148#148#148#148#148#148#148#148#148#148#148
+  +#148#148#148#169#169#169'ddd'#199#237#205#199#237#205#212#241#216#225#244#228
+  +#225#244#228'8=9'#0#0#0#0#0#0#0#0#0#169#184#171#225#244#227#225#244#227#224
+  +#244#227#224#244#227#224#243#227#224#243#227'pzr'#0#0#0#0#0#0#0#0#0#31#31#31
+  +#251#251#251#251#251#251#173#173#173#0#0#0#0#0#0#0#0#0#0#0#0#10#10#10'((('#20
+  +#20#20#0#0#0#0#0#0#0#0#0'PPP'#160#160#160#160#160#160#160#160#160'((('#0#0#0
+  +#0#0#0#0#0#0'xxx'#159#159#159#159#159#159#159#159#159#159#159#159'nnn'#0#0#0
+  +#0#0#0#0#0#0#0#0#0#10#10#10'((('#20#20#20#0#0#0#0#0#0#0#0#0'OOO'#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#149#149#149#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0'YYY'#157#157#157#156#156#156#156#156#156'uuu'#0#0#0#0#0#0#0
+  +#0#0''''''''#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#0#0
+  +#0#0#0#0#0#0#0#0#0#0#155#155#155#155#155#155#155#155#155'~~~'#10#10#10#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#29#29#29#145#145#145#154#154#154#154#154#154#154#154
+  +#154#0#0#0#0#0#0#0#0#0#0#0#0#154#154#154#154#154#154#154#154#154#154#154#154
+  +#153#153#153'MMM'#0#0#0#0#0#0#0#0#0'MMM'#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153'CCC'#0#0#0#0#0#0#0#0#0#0#0#0#19#19#19'&&&'#10#10#10
+  +#0#0#0#0#0#0#0#0#0'rrr'#152#152#152'rrr'#0#0#0#0#0#0#0#0#0'&&&'#151#151#151
+  +#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151
+  ,#151#151#151#151#151'rrr'#0#0#0#0#0#0#0#0#0'&&&'#150#150#150#150#150#150#150
+  +#150#150#150#150#150#150#150#150#150#150#150#150#150#150#0#0#0#0#0#0#154#230
+  +#170#154#230#170#154#230#169#154#230#169#154#230#169#153#230#169#153#229#168
+  +#153#229#168#153#229#168#153#229#167#152#229#167#134#196#147'<A=444222///---'
+  +'***'#30'?'#30#19'S'#19#11'a'#11#0'z'#0#0'x'#0#4'v'#4'''_&cef'#204#199#204
+  +#204#199#204'cef'#200#195#201'cef'#148#148#148#23#176'#'#23#176'#gg'#150'gg'
+  +#150#148#148#148#169#169#169'ddd'#147#224#159#147#223#159#147#223#159#147#223
+  +#158#146#223#158'%8('#0#0#0#0#0#0#0#0#0'm'#167'v'#145#222#156#145#222#156#145
+  +#221#156#145#221#156#145#221#155#144#221#155'u'#180'~'#0#0#0#0#0#0#0#0#0#0#0
+  +#0#251#251#251#251#251#251#251#251#251#189#189#189#31#31#31#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'PPP'#160#160#160#160#160#160#160#160#160'((('
+  +#0#0#0#0#0#0#0#0#0'xxx'#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159'xxx'#20#20#20#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'OOO'
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158'222'#0#0#0#0#0#0#0#0#0#30#30#30''''''''''''
+  +''''''''''#0#0#0#0#0#0#0#0#0#0#0#0#128#128#128#157#157#157#157#157#157#156
+  +#156#156'uuu'#0#0#0#0#0#0#0#0#0''''''''#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#0#0#0#0#0#0#0#0#0#0#0#0#155#155#155#155#155#155#136
+  +#136#136#10#10#10#0#0#0#0#0#0#0#0#0#0#0#0#19#19#19'NNN'#145#145#145#154#154
+  +#154#154#154#154#154#154#154#154#154#154#0#0#0#0#0#0#0#0#0#0#0#0#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154'MMM'#0#0#0#0#0#0#0#0#0':::'
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153'VVV'
+  +#10#10#10#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'rrr'#152#152#152'|'
+  +'||'#0#0#0#0#0#0#0#0#0#28#28#28#151#151#151#151#151#151#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151'rrr'#0#0#0#0
+  +#0#0#0#0#0'&&&'#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150
+  +#150#150#150#150#150#150#0#0#0#0#0#0#154#231#170#154#230#170#154#230#170#154
+  +#230#169#154#230#169#154#230#169#153#230#169#153#229#168#153#229#168#153#229
+  +#168#148#219#161'AFB999666444222///---***(((&&&'#29'4'#29#2'u'#2'A'#139'Acef'
+  +#204#199#204#204#199#204#204#199#204'cef'#206#202#206'cef'#148#148#148#148
+  +#148#148'U'#162'['#148#148#148'}}'#149#148#148#148#169#169#169'ddd'#147#224
+  +#160#147#224#159#147#223#159#147#223#159#147#223#158'%8('#0#0#0#0#0#0#0#0#0
+  +'n'#167'v'#145#222#157#145#222#156#145#222#156#145#221#156#145#221#156#145
+  +#221#155#144#221#155#0#0#0#0#0#0#0#0#0#0#0#0#189#189#189#251#251#251#251#251
+  +#251#251#251#251#251#251#251#205#205#205'ggg===((('#20#20#20#0#0#0#0#0#0#0#0
+  +#0'PPP'#160#160#160#160#160#160#160#160#160'((('#0#0#0#0#0#0#0#0#0'xxx'#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#130#130#130'PPP<<<((('#20#20#20#0#0#0#0#0#0#0#0#0'OOO'#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158'YYY'#0#0#0#0#0#0#0#0#0'lll'#157#157#157#157#157#157#138#138
+  +#138#0#0#0#0#0#0#0#0#0#20#20#20#157#157#157#157#157#157#157#157#157#157#157
+  +#157'uuu'#0#0#0#0#0#0#0#0#0#20#20#20#156#156#156#156#156#156#156#156#156#156
+  +#156#156'lll'#0#0#0#0#0#0#0#0#0#29#29#29#155#155#155#155#155#155'XXX'#0#0#0#0
+  +#0#0#0#0#0#10#10#10'kkk'#155#155#155#155#155#155#155#155#155#154#154#154#154
+  +#154#154#154#154#154#154#154#154#0#0#0#0#0#0#0#0#0#0#0#0#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154'MMM'#0#0#0#0#0#0#0#0#0#10#10#10'}}}'
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153'jjjLLL000&&&'#10#10#10#0#0#0#0#0#0#0#0#0'rrr'#152#152#152#152#152
+  +#152#10#10#10#0#0#0#0#0#0#0#0#0'{{{'#151#151#151#151#151#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#151#151#151#151#151#151'rrr'#0#0#0#0#0#0#0#0
+  +#0'&&&'#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150#150
+  +#150#150#150#150#0#0#0#0#0#0#155#231#170#154#231#170#154#230#170#154#230#170
+  +#154#230#169#154#230#169#154#230#169#153#230#169#153#229#168#153#229#168'ViZ'
+  +'===;;;999666444222///---***(((&&&'#9'g'#9'cef'#204#199#204#204#199#204#204
+  +#199#204#204#199#204'cef'#211#208#212'cef'#148#148#148#148#148#148#148#148
+  +#148#148#148#148#148#148#148#148#148#148#169#169#169'ddd'#147#224#160#147#224
+  +#160#147#224#159#147#223#159#147#223#159'%8('#0#0#0#0#0#0#0#0#0'n'#167'v'#146
+  +#222#157#145#222#157#145#222#156#145#222#156#145#221#156#145#221#156#145#221
+  +#155#0#0#0#0#0#0#0#0#0#0#0#0#189#189#189#251#251#251#251#251#251#189#189#189
+  +#251#251#251#251#251#251#206#206#206#161#161#161#161#161#161#30#30#30#0#0#0#0
+  +#0#0#0#0#0'xxx'#160#160#160#160#160#160#160#160#160'((('#0#0#0#0#0#0#0#0#0'x'
+  +'xx'#160#160#160#159#159#159#159#159#159#159#159#159#159#159#159'xxx'#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#30#30#30#0#0#0#0#0#0#0#0
+  +#0'www'#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  ,#158#158#158#158#158#158#158#158#158#158#139#139#139#0#0#0#0#0#0#0#0#0'EEE'
+  +#157#157#157#157#157#157'YYY'#0#0#0#0#0#0#0#0#0'EEE'#157#157#157#157#157#157
+  +#157#157#157#157#157#157'vvv'#0#0#0#0#0#0#0#0#0#0#0#0';;;'#156#156#156#156
+  +#156#156#137#137#137#20#20#20#0#0#0#0#0#0#0#0#0';;;'#156#156#156#155#155#155
+  +'XXX'#0#0#0#0#0#0#0#0#0'NNN'#155#155#155#155#155#155#155#155#155#146#146#146
+  +#155#155#155#154#154#154#154#154#154#154#154#154#0#0#0#0#0#0#0#0#0#0#0#0#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154'MMM'#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0':::MMMsss'#153#153#153#153#153#153'sss'#153#153#153#153#153
+  +#153#153#153#153#152#152#152#143#143#143#0#0#0#0#0#0#0#0#0#0#0#0#152#152#152
+  +#152#152#152#152#152#152'999'#0#0#0#0#0#0#0#0#0#29#29#29'{{{'#151#151#151#151
+  +#151#151#151#151#151#142#142#142#151#151#151#151#151#151#151#151#151'rrr'#0#0
+  +#0#0#0#0#0#0#0'&&&'#151#151#151#150#150#150#150#150#150#150#150#150#150#150
+  +#150#150#150#150#150#150#150#0#0#0#0#0#0#155#231#171#155#231#170#154#231#170
+  +#154#230#170#154#230#170#154#230#169#154#230#169#154#230#169#153#230#169't'
+  +#159'|BBB@@@===;;;999666444222///---***((('#9'i'#9'cef'#204#199#204#204#199
+  +#204#204#199#204#204#199#204'cef'#217#214#217'cef'#148#148#148#148#148#148
+  +#148#148#148#148#148#148#148#148#148#148#148#148#169#169#169'ddd'#148#224#160
+  +#147#224#160#147#224#160#147#224#159#147#223#159'%8('#0#0#0#0#0#0#0#0#0'n'
+  +#167'v'#146#222#157#146#222#157#145#222#157#145#222#156#145#222#156#145#221
+  +#156#145#221#156#0#0#0#0#0#0#0#0#0#0#0#0#189#189#189#251#251#251#251#251#251
+  +#31#31#31#16#16#16'???gggQQQ'#30#30#30#0#0#0#0#0#0#0#0#0#20#20#20#160#160#160
+  +#160#160#160'PPP'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'xxx'#159
+  +#159#159#159#159#159#20#20#20#10#10#10'(((PPPPPP'#30#30#30#0#0#0#0#0#0#0#0#0
+  +#20#20#20#159#159#159#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#30#30#30#0#0
+  +#0#0#0#0#20#20#20#157#157#157#157#157#157'111'#0#0#0#0#0#0#0#0#0'vvv'#157#157
+  +#157#157#157#157#157#157#157#157#157#157'vvv'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#20#20#20''''''''#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#137#137#137#156#156#156#156
+  +#156#156#136#136#136#0#0#0#0#0#0#0#0#0#10#10#10'DDDDDD'#29#29#29#19#19#19#155
+  +#155#155#155#155#155''''''''#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#154#154#154#154#154#154'MMM'#0#0#0#0#0#0#0#0#0#19#19#19#0#0#0#0#0#0#0#0#0'M'
+  +'MM'#153#153#153#134#134#134#0#0#0#19#19#19'000MMMCCC'#19#19#19#0#0#0#0#0#0#0
+  +#0#0'999'#152#152#152#152#152#152#152#152#152#143#143#143#10#10#10#0#0#0#0#0
+  +#0#0#0#0#0#0#0#28#28#28'&&&'#28#28#28'///'#151#151#151#151#151#151#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'&&&'#150#150#150#150#150#150#150#150
+  +#150#150#150#150#0#0#0#0#0#0#155#231#171#155#231#171#155#231#170#154#231#170
+  +#154#230#170#154#230#170#154#230#169#154#230#169#149#221#163'LQMDDDBBB6S8==='
+  +';;;999666444222///---***(((cef'#206#201#206#204#199#204#204#199#204#204#199
+  +#204'cef'#222#219#222'cef'#148#148#148#148#148#148#148#148#148#148#148#148
+  +#148#148#148#148#148#148#169#169#169'ddd'#148#224#160#148#224#160#147#224#160
+  +#147#224#160#147#224#159'%8('#0#0#0#0#0#0#0#0#0'n'#168'w'#146#222#157#146#222
+  +#157#146#222#157#145#222#157#145#222#156#145#222#156'm'#166'u'#0#0#0#0#0#0#0
+  +#0#0#0#0#0#236#236#236#251#251#251#220#220#220#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0'ooo'#161#161#161#160#160#160'PPP'#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'xxx'#159#159#159#140#140#140#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'nnn'#159#159#159#159#159#159#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158'OOO'#0#0#0#0#0#0#0#0#0#138#138#138#157#157#157#0#0#0#0#0
+  +#0#0#0#0#10#10#10#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +'vvv'#0#0#0#0#0#0#0#0#0#20#20#20#10#10#10#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +'NNN'#156#156#156#156#156#156#156#156#156#156#156#156'DDD'#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#136#136#136#155#155#155''''''''#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#154#154#154#154#154#154'MMM'#0#0#0#0#0#0#0#0#0
+  +'VVV'#0#0#0#0#0#0#0#0#0'MMM'#153#153#153'```'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#10#10#10#134#134#134#152#152#152#152#152#152#152#152#152#152
+  +#152#152'|||'#19#19#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#9#9#9#151#151#151
+  +#151#151#151#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'&&&'#150#150#150
+  +#150#150#150#150#150#150#150#150#150#0#0#0#0#0#0#155#231#171#155#231#171#155
+  +#231#171#155#231#170#154#231#170#154#230#170#154#230#170#154#230#169's'#153
+  +'zIIIGGG?R@'#31#146'''@@@===;;;999666444222///---***cef'#209#204#208#206#201
+  +#206#204#199#204#204#199#204'cef'#226#224#227'cef'#148#148#148#148#148#148
+  +#148#148#148#148#148#148#148#148#148#148#148#148#169#169#169'ddd'#148#224#160
+  +#148#224#160#148#224#160#147#224#160#147#224#160'%8('#0#0#0#0#0#0#0#0#0'n'
+  +#168'w'#146#223#158#146#222#157#146#222#157#146#222#157#145#222#157#145#222
+  ,#156'@bE'#0#0#0#0#0#0#0#0#0#31#31#31#251#251#251#251#251#251#236#236#236#142
+  +#142#142'???'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'333'#131#131#131#161#161#161#161
+  +#161#161#161#161#161'PPP'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'xx'
+  +'x'#160#160#160#150#150#150'ZZZ((('#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'222'#130
+  +#130#130#159#159#159#159#159#159#159#159#159#159#159#159#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#129#129#129#0#0#0#0#0#0#0#0#0'cccvvv'#0#0#0#0#0#0#0#0#0';;;'#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157'vvv'#0#0#0#0#0#0#0#0#0''''''''
+  +''''''''#0#0#0#0#0#0#0#0#0#20#20#20'bbb'#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156'kkk'#29#29#29#0#0#0#0#0#0#0#0#0#0#0#0
+  +'''''''~~~'#155#155#155''''''''#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#154#154#154#154#154#154'MMM'#0#0#0#0#0#0#29#29#29#154#154#154'VVV'#10#10
+  +#10#0#0#0'MMM'#153#153#153#134#134#134'CCC'#29#29#29#0#0#0#0#0#0#0#0#0#0#0#0
+  +#10#10#10'999'#143#143#143#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#143#143#143'LLL'#19#19#19#0#0#0#0#0#0#0#0#0#0#0#0#9
+  +#9#9#142#142#142#151#151#151#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +'&&&'#151#151#151#150#150#150#150#150#150#150#150#150#0#0#0#0#0#0#155#232#172
+  +#155#231#171#155#231#171#155#231#171#155#231#170#154#231#170#154#230#170#154
+  +#230#170'XaYKKKIII-'#141'7$'#151'.BBB@@@===;;;999666444222///---cef'#211#207
+  +#211#208#204#208#206#201#206#204#199#204'cef'#230#229#232'cef'#148#148#148
+  +#148#148#148#148#148#148#148#148#148#148#148#148#148#148#148#169#169#169'cef'
+  +#148#225#161#148#224#160#148#224#160#148#224#160#147#224#160'%8('#0#0#0#0#0#0
+  +#0#0#0'o'#168'w'#146#223#158#146#223#158#146#222#157#146#222#157#146#222#157
+  +'v'#181#128#9#14#10#0#0#0#0#0#0#0#0#0'^^^'#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#194#194#194'yyy'#131#131#131#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#160#160#160'((('#0#0#0#0#0#0#0#0#0'xxx'#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#159#159#159#159#159#159#159#159#159#150#150#150'xxx'
+  +#130#130#130#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#20#20#20#0#0#0#0#0#0';;'
+  +';OOO'#0#0#0#0#0#0#0#0#0'lll'#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157'vvv'#0#0#0#0#0#0#0#0#0''''''''#156#156#156#156#156#156#147#147
+  +#147'uuu'#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#155#155#155#155#155#155'uuu~~~'
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#0#0
+  +#0#0#0#0#0#0#0#0#0#0#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#153#153#153'sss'#134#134#134#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#134#134#134'sss'#134#134#134#153#153#153#153#153#153#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#143#143#143'rrrrrr'#134#134#134#151#151#151
+  +#151#151#151#151#151#151#151#151#151'rrr'#0#0#0#0#0#0#0#0#0'&&&'#151#151#151
+  +#151#151#151#151#151#151#151#151#151#151#151#151#150#150#150#150#150#150#0#0
+  +#0#0#0#0#156#232#172#155#232#172#155#231#171#155#231#171#155#231#171#155#231
+  +#170#154#231#170#141#203#154'PPPNNNISK$'#189'7)'#155'5DDDBBB@@@===;;;9996664'
+  +'44222///cef'#215#210#215#211#206#211#208#203#208#206#201#206'cef'#234#233
+  +#236'cef'#148#148#148#148#148#148#148#148#148#148#148#148#148#148#148#148#148
+  +#148#169#169#169'cef'#148#225#161#148#225#161#148#224#160#148#224#160#148#224
+  +#160'%8('#0#0#0#0#0#0#0#0#0'o'#168'x'#147#223#158#146#223#158#146#223#158#146
+  +#222#157'n'#167'v'#9#14#10#0#0#0#0#0#0#0#0#0#0#0#0#220#220#220#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#206#206#206#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161'((('#0#0#0#0#0#0#0#0#0'xxx'#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158';;;'#0#0#0#0#0#0#30#30#30'((('#0#0#0#0#0#0#0#0#0#148#148#148#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157'vvv'#0#0#0#0#0#0#0#0
+  +#0''''''''#157#157#157#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#151#151#151#151#151#151#151#151#151'rrr'#0#0
+  +#0#0#0#0#0#0#0'&&&'#151#151#151#151#151#151#151#151#151#151#151#151#151#151
+  +#151#151#151#151#150#150#150#0#0#0#0#0#0#156#232#172#156#232#172#155#232#172
+  +#155#231#171#155#231#171#155#231#171#155#231#170'|'#167#133'SSSPPPDtL*'#194
+  +'?.'#160'<GGGDDDBBB@@@===;;;999666444222cef'#217#214#217#214#210#214#211#207
+  +#211#209#203#209'cef'#237#236#239'cef'#148#148#148#148#148#148#148#148#148
+  +#148#148#148#148#148#148#148#148#148#169#169#169'cef'#149#225#161#148#225#161
+  +#148#225#161#148#224#160#148#224#160'%8('#0#0#0#0#0#0#0#0#0'.F2JpPJpO7T;'#18
+  +#28#20#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'IoN'#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#206#206#206#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161'eee'#30#30#30#0#0#0#0#0#0'xxx'#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158'mmm'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'111'#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157'vvv'#0#0#0#0#0#0#0#0#0''''''
+  +''''#157#157#157#157#157#157#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155'DDD'#19#19
+  +#19#0#0#0#0#0#0#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#151#151#151#151#151#151#133#133#133
+  +'999'#9#9#9#0#0#0'&&&'#151#151#151#151#151#151#151#151#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#0#0#0#0#0#0#156#232#172#156#232#172#156#232
+  +#172#155#232#172#155#231#171#155#231#171#155#231#171'u'#150'{UUUSSSB'#143'P0'
+  +#200'H3'#165'CIIIGGGDDDBBB@@@===;;;999666444cef'#222#219#222#218#214#218#215
+  +#210#214#211#206#211'cef'#240#239#241'cef'#157#157#157#157#157#157#157#157
+  +#157#168#168#168#148#148#148#148#148#148#169#169#169'cef'#149#225#162#149#225
+  +#161#148#225#161#148#225#161#148#224#160'%8('#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'IoO'#145#222#156#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#206#206#206
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#151#151
+  +#151'ddd'#141#141#141#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0'ccc'#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157'vvv'#0#0#0#0#0#0#0#0#0''''''''#157#157#157#157#157#157#157#157
+  +#157#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#136#136#136'XXX'#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#151#151#151#151#151#151#151#151#151#151#151#151
+  ,'{{{___'#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151
+  +#151#151#151#151#0#0#0#0#0#0#156#232#173#156#232#172#156#232#172#156#232#172
+  +#155#232#172#155#231#171#155#231#171'j}nWWWUUUA'#179'W5'#206'Q7'#170'JKKKIII'
+  +'GGGDDDBBB@@@===;;;999666cef'#226#223#225#222#219#222#218#214#218#215#210#214
+  +'cef'#241#241#243'cef'#148#148#148#148#148#148#148#148#148#137#137#137#157
+  +#157#157#157#157#157#186#186#186'cef'#149#225#162#149#225#162#149#225#161#148
+  +#225#161#148#225#161'%8('#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#9#14#10'7T;'#128#195#138#146#222#157#145#222#157#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#206#206#206#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158'222'#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#149#149#149#158#158#158#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157'vvv'#0#0#0#0#0#0#0#0#0''''''''#157#157#157#157#157
+  +#157#148#148#148#157#157#157#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#144#144#144#134
+  +#134#134#153#153#153#153#153#153#153#153#153#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#151#151#151#151
+  +#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#151#151#151#151#151#0#0#0#0#0#0#156#232#173
+  +#156#232#173#156#232#172#156#232#172#156#232#172#155#232#172#155#231#171'lp'
+  +'ZZZWWWF'#184'^;'#211'Y<'#175'QNNNKKKIIIGGGDDDBBB@@@===;;;999cef'#230#227#229
+  +#226#223#226#238#237#239#218#214#218'cef'#242#241#244'cef'#163#163#163#163
+  +#163#163#168#168#168#148#148#148#148#148#148#148#148#148#165#165#165'cef'#149
+  +#225#162#149#225#162#149#225#162#149#225#161#148#225#161#130#198#141'o'#169
+  +'xf'#155'nJpPJpPJpPJpPJpPo'#168'xx'#182#129#146#223#158#146#223#158#146#222
+  +#157#146#222#157#146#222#157#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#206#206#206#161#161#161#161#161#161'QQQ'
+  +'((('#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#158#158#158#158#158#158#158#158
+  +#158#158#158#158#139#139#139'wwwwwwwwwwwwwww'#158#158#158#158#158#158#158#158
+  +#158#157#157#157#157#157#157#157#157#157#157#157#157'vvv'#0#0#0#0#0#0#0#0#0
+  +''''''''#157#157#157'vvv'#10#10#10'ccc'#157#157#157#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153'```'
+  +#10#10#10':::'#153#153#153#153#153#153#153#153#153#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#151#151
+  +#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#151#151#151#151#0#0#0#0#0#0#156#233#173#156
+  +#232#173#156#232#173#156#232#172#156#232#172#156#232#172#155#232#172'm'#128
+  +'q\\\ZZZJ'#188'eA'#217'bA'#180'XPPPNNNKKKIIIGGGDDDBBB@@@===;;;cef'#234#231
+  +#234#242#241#242#176#175#176#221#218#221'cef'#241#241#243'cefoqr}~~'#136#136
+  +#136#163#163#163#163#163#163#163#163#163#185#185#185'cef'#149#226#163#149#225
+  ,#162#149#225#162#149#225#162#149#225#161#148#225#161#148#225#161#148#224#160
+  +#148#224#160#148#224#160#147#224#160#147#224#160#147#224#159#147#223#159#147
+  +#223#159#147#223#158#146#223#158#146#223#158#146#222#157#146#222#157#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#206#206#206#162#162#162#161#161#161'QQQ((('#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157'vvv'#20
+  +#20#20#138#138#138#157#157#157#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#144#144#144#10#10#10'}}'
+  +'}'#153#153#153#153#153#153#153#153#153#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151
+  +#151#151#151#151#151#151#0#0#0#0#0#0#157#233#173#156#233#173#156#232#173#156
+  +#232#173#156#232#172#156#232#172#156#232#172'p'#131't___\\\P'#185'kF'#223'kB'
+  +#209'aJ'#131'VPPPNNNKKKIIIGGGDDDBBB@@@===cef'#237#236#237#166#166#168#178#177
+  +#178#225#222#225'cef'#217#218#219#218#218#218#157#158#158'}iklhjkwxx'#133
+  +#133#134#168#168#168'cef'#150#226#163#149#226#163#149#225#162#149#225#162#149
+  +#225#162#149#225#161#148#225#161#148#225#161#148#224#160#148#224#160#148#224
+  +#160#147#224#160#147#224#160#147#224#159#147#223#159#147#223#159#147#223#158
+  +#146#223#158#146#223#158#146#222#157#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#206#206#206#162#162#162#162#162
+  +#162'QQQ((('#141#141#141'QQQeee'#152#152#152#161#161#161#161#161#161#161#161
+  +#161'yyyQQQ[[['#152#152#152#161#161#161#160#160#160#160#160#160'nnnnnn'#160
+  +#160#160#160#160#160#141#141#141'PPP'#160#160#160#160#160#160#160#160#160#159
+  +#159#159#130#130#130'PPPPPPnnn'#159#159#159#159#159#159'PPP'#140#140#140#159
+  +#159#159#159#159#159#159#159#159#130#130#130'PPPOOOmmm'#158#158#158#158#158
+  +#158#158#158#158'cccOOOwww'#139#139#139'ccc'#158#158#158#158#158#158#158#158
+  +#158#157#157#157'vvvvvv'#138#138#138'OOOYYY'#148#148#148#157#157#157#157#157
+  +#157#157#157#157'OOO;;;'#157#157#157#157#157#157#156#156#156#156#156#156#156
+  +#156#156#156#156#156'NNN'#137#137#137#156#156#156#156#156#156#137#137#137'NN'
+  +'N'#156#156#156#156#156#156#137#137#137'XXXNNNaaa'#146#146#146#155#155#155'a'
+  +'aauuu'#155#155#155#155#155#155'aaauuu'#155#155#155#154#154#154'aaattt'#154
+  +#154#154#154#154#154#154#154#154'jjjMMMMMM~~~'#154#154#154#154#154#154#154
+  +#154#154#135#135#135'```'#144#144#144'VVVMMM'#134#134#134#153#153#153#153#153
+  +#153'&&&MMM'#153#153#153#153#153#153#134#134#134'VVVLLL___'#143#143#143#152
+  +#152#152#152#152#152'|||LLLLLLiii'#152#152#152#152#152#152'|||LLLrrr'#133#133
+  +#133'___LLLrrr'#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#0
+  +#0#0#0#0#0#157#233#174#157#233#173#156#233#173#156#232#173#156#232#173#156
+  +#232#172#156#232#172#128#166#136'aaa___W'#163'kL'#228'sF'#223'kA'#217'b='#204
+  +'Y<'#175'Q='#147'L;'#135'FEXGGGGDDDBBB@@@cef'#241#240#241#168#168#169#234#231
+  +#233#255#255#255#193#193#195'lmnpqr'#142#143#144#187#188#188#221#221#222#204
+  +#204#205#151#152#153'vwxeghcef'#150#226#163#150#226#163#149#226#163#149#225
+  +#162#149#225#162#149#225#162#149#225#161#148#225#161#148#225#161#148#224#160
+  +#148#224#160#148#224#160#147#224#160#147#224#160#147#224#159#147#223#159#147
+  +#223#159#147#223#158#146#223#158#146#223#158#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#206#206#206#162#162#162
+  +#162#162#162'QQQ'#10#10#10'(((QQQ333'#30#30#30#152#152#152#161#161#161'==='
+  +#20#20#20'QQQ==='#10#10#10#131#131#131#161#161#161#160#160#160#30#30#30#30#30
+  +#30#160#160#160#160#160#160'PPP'#10#10#10#131#131#131#160#160#160#160#160#160
+  +'ddd'#10#10#10'FFFPPP<<<'#159#159#159#159#159#159#0#0#0'xxx'#159#159#159#159
+  ,#159#159'ddd'#10#10#10'FFFPPP;;;'#158#158#158#158#158#158'((('#30#30#30'OOO;'
+  +';;;;;((('#158#158#158#158#158#158#158#158#158#158#158#158'OOO''''''''''''OO'
+  +'O111'#30#30#30#148#148#148#157#157#157#157#157#157'OOO'#0#0#0#138#138#138
+  +#157#157#157#157#157#157#156#156#156#156#156#156#156#156#156#0#0#0'uuu'#156
+  +#156#156#156#156#156'NNN111'#156#156#156''#10#10#10';;;NNNDDD~~~'#155#155
+  +#155'''''''NNN'#155#155#155#155#155#155'''''''NNN'#155#155#155#155#155#155
+  +'''''''MMM'#154#154#154#145#145#145#29#29#29#19#19#19'MMMDDD'#10#10#10'DDD'
+  +#154#154#154#154#154#154'ttt'#29#29#29#29#29#29'MMMCCC'#10#10#10'}}}'#153#153
+  +#153'&&&MMM'#153#153#153'}}}'#10#10#10':::MMMCCC|||'#152#152#152'___'#10#10
+  +#10'CCCLLLLLL'#152#152#152#143#143#143#10#10#10'CCCrrr|||999LLL'#28#28#28'__'
+  +'_'#151#151#151#151#151#151#151#151#151#151#151#151#0#0#0#0#0#0#157#233#174
+  +#157#233#174#157#233#173#156#233#173#156#232#173#156#232#173#156#232#172#136
+  +#183#146'cccaaa\'#131'gR'#234'|L'#228'sF'#223'kA'#217'b;'#211'Y5'#206'Q0'#200
+  +'HCiIIIIGGGDDDBBBcef'#244#244#245#241#240#241#255#255#255#238#238#240#233#232
+  +#235#228#226#229#205#202#205#172#170#173#137#136#139'stuikl'#130#131#132#169
+  +#170#171#219#220#220'cef'#150#226#163#150#226#163#150#226#163#149#226#163#149
+  +#225#162#149#225#162#149#225#162#149#225#161#148#225#161#148#225#161#148#224
+  +#160#148#224#160#148#224#160#147#224#160#147#224#160#147#224#159#147#223#159
+  +#147#223#159#147#223#158#146#223#158#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#206#206#206#162#162#162#162#162
+  +#162'QQQ'#20#20#20#161#161#161#161#161#161#161#161#161'((([[['#131#131#131#0
+  +#0#0#141#141#141#161#161#161#161#161#161'===333'#161#161#161#141#141#141#20
+  +#20#20'<<<'#131#131#131#160#160#160#30#30#30'FFFPPP'#160#160#160#151#151#151
+  +#10#10#10'xxx'#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#0
+  +#0#0'xxx'#159#159#159#150#150#150#10#10#10'xxx'#159#159#159#159#159#159#159
+  +#159#159#158#158#158#129#129#129#10#10#10#149#149#149#158#158#158#158#158#158
+  +';;;((('#158#158#158#158#158#158#158#158#158#158#158#158'OOO'#20#20#20#157
+  +#157#157#157#157#157#157#157#157'''''''YYY'#157#157#157#157#157#157#20#20#20
+  +'''''''YYY'#157#157#157#157#157#157#157#157#157#156#156#156#156#156#156#0#0#0
+  +'uuu'#156#156#156#156#156#156#29#29#29'XXX'#156#156#156'''''''NNN'#156#156
+  +#156#156#156#156#156#156#156#155#155#155#155#155#155'''''''NNN'#155#155#155
+  +#155#155#155'''''''NNN'#155#155#155#155#155#155'''''''MMM'#154#154#154':::'''
+  +''''''#154#154#154#154#154#154#154#154#154#145#145#145#10#10#10'jjj'#154#154
+  +#154'ttt'#0#0#0#135#135#135#153#153#153#153#153#153'MMM000'#153#153#153'&&&M'
+  +'MM'#153#153#153'&&&MMM'#153#153#153#153#153#153#153#153#153#152#152#152#152
+  +#152#152#10#10#10'___'#152#152#152#152#152#152#152#152#152#152#152#152'rrr'#0
+  +#0#0#152#152#152#152#152#152#152#152#152#152#152#152#151#151#151'LLL&&&'#151
+  +#151#151#151#151#151#151#151#151#151#151#151#0#0#0#0#0#0#157#233#174#157#233
+  +#174#157#233#174#157#233#173#156#233#173#156#232#173#156#232#173#150#216#164
+  +'fffcccaaaX'#230#130'R'#234'|L'#228'sF'#223'kA'#217'b;'#211'Y5'#206'QA'#132
+  +'LKKKIIIGGGDDDcef'#248#248#248#255#255#255#242#242#244#245#245#247#242#241
+  +#243#235#234#237#226#224#227#215#212#216#204#199#204#191#186#191#174#167#172
+  +#174#167#172#147#140#142'cefj'#153'r'#150#226#164#150#226#163#150#226#163#150
+  +#226#163#149#226#163#149#225#162#149#225#162#149#225#162#149#225#161#148#225
+  +#161#148#225#161#148#224#160#148#224#160#148#224#160#147#224#160#147#224#160
+  +#147#224#159#147#223#159#147#223#159#147#223#158#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#206#206#206#162#162
+  +#162#162#162#162'QQQ)))'#162#162#162#161#161#161#161#161#161'QQQ(((QQQ((('
+  +#161#161#161#161#161#161#161#161#161'yyy'#0#0#0#161#161#161'eee333dddFFF'#141
+  +#141#141#20#20#20#131#131#131#30#30#30#160#160#160'xxx'#0#0#0'PPPPPPPPPPPPxx'
+  +'x'#159#159#159#0#0#0'xxx'#159#159#159'xxx'#0#0#0'PPPPPPPPPPPPxxxOOO((('#158
+  +#158#158#158#158#158#158#158#158'OOO((('#158#158#158#158#158#158#158#158#158
+  +#158#158#158'OOO((('#157#157#157#157#157#157#157#157#157'OOO'''''''#157#157
+  +#157'lll'#20#20#20#128#128#128#20#20#20#157#157#157#157#157#157#157#157#157
+  +#157#157#157#156#156#156#0#0#0'uuu'#156#156#156''#0#0#0#137#137#137#156
+  +#156#156#0#0#0';;;NNNNNNNNNbbb'#155#155#155'''''''NNN'#155#155#155#155#155
+  +#155'''''''NNN'#155#155#155#155#155#155'''''''NNN'#154#154#154#0#0#0'ttt'#154
+  +#154#154#154#154#154#154#154#154#154#154#154'DDD000'#154#154#154'ttt'#0#0#0
+  +#154#154#154#154#154#154#153#153#153'sss'#0#0#0#153#153#153'&&&MMM'#153#153
+  +#153#0#0#0':::MMMMMMMMM```rrr'#0#0#0#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152'rrr'#0#0#0#152#152#152#152#152#152#152#152#152#143#143
+  +#143'LLL'#9#9#9'hhh'#151#151#151#151#151#151#151#151#151#151#151#151#0#0#0#0
+  +#0#0#157#234#175#157#233#174#157#233#174#157#233#174#157#233#173#156#233#173
+  +#156#232#173#156#232#173't'#135'xfffccc_'#171'vW'#240#133'R'#234'|L'#228'sF'
+  ,#223'kA'#217'b;'#211'Y7'#198'QC|MISKIIIGGGcef'#255#255#255#241#241#243#250
+  +#250#251#252#252#253#248#247#249#239#239#241#229#228#231#218#216#219#206#202
+  +#207#193#188#193#180#173#178'cefcef###'#143#216#156#150#226#164#150#226#164
+  +#150#226#163#150#226#163#150#226#163#149#226#163#149#225#162#149#225#162#149
+  +#225#162#149#225#161#148#225#161#148#225#161#148#224#160#148#224#160#148#224
+  +#160#147#224#160#147#224#160#147#224#159#147#223#159#147#223#159#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#206
+  +#206#206#162#162#162#162#162#162'QQQ)))'#162#162#162#162#162#162#161#161#161
+  +'QQQ333[[['#30#30#30#161#161#161#161#161#161#161#161#161'ooo'#10#10#10#161
+  +#161#161'333[[['#141#141#141#30#30#30'dddFFF'#160#160#160#10#10#10#141#141
+  +#141#141#141#141#0#0#0'PPPPPPPPP'#20#20#20'PPP'#159#159#159#0#0#0'xxx'#159
+  +#159#159#140#140#140#0#0#0'PPPPPPPPP'#20#20#20'PPPZZZ'#30#30#30#158#158#158
+  +#158#158#158#158#158#158'OOO((('#158#158#158#158#158#158#158#158#158#158#158
+  +#158'OOO((('#158#158#158#157#157#157#157#157#157'OOO111'#157#157#157';;;OOO'
+  +#157#157#157#20#20#20#128#128#128#157#157#157#157#157#157#157#157#157#157#157
+  +#157#0#0#0#29#29#29''''''''#10#10#10'bbb'#156#156#156#156#156#156#20#20#20';'
+  +';;NNNNNN'''''''''''''#156#156#156'''''''NNN'#155#155#155#155#155#155''''''''
+  +'NNN'#155#155#155#155#155#155'''''''NNNuuu'#0#0#0#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154'ttt'#0#0#0#154#154#154'ttt'#0#0#0#154#154
+  +#154#154#154#154#154#154#154'sss'#10#10#10#153#153#153'&&&MMM'#153#153#153#19
+  +#19#19':::MMMMMM&&&&&&}}}'#0#0#0#143#143#143#152#152#152#152#152#152#152#152
+  +#152#152#152#152'rrr'#0#0#0#152#152#152#152#152#152#143#143#143#29#29#29'000'
+  +#134#134#134#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#0#0
+  +#0#0#0#0#158#234#175#157#234#175#157#233#174#157#233#174#157#233#174#157#233
+  +#173#156#233#173#156#232#173#137#185#148'hhhfffcmf]'#236#138'W'#240#133'R'
+  +#234'|L'#228'sF'#223'kA'#217'b;'#211'Y5'#206'Q0'#200'H.'#180'A.'#160'<J'#157
+  +'Scefcef'#238#238#239#253#253#253#248#248#249#240#239#242#230#228#231#219#216
+  +#219#207#202#207'cefcef***(((QmV'#151#227#164#150#227#164#150#226#164#150#226
+  +#164#150#226#163#150#226#163#150#226#163#149#226#163#149#225#162#149#225#162
+  +#149#225#162#149#225#161#148#225#161#148#225#161#148#224#160#148#224#160#148
+  +#224#160#147#224#160#147#224#160#147#224#159#147#223#159#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#206#206#206
+  +#162#162#162#162#162#162'QQQ'#10#10#10#132#132#132#162#162#162#152#152#152#20
+  +#20#20'[[['#141#141#141#0#0#0'yyy'#161#161#161#161#161#161'333==='#161#161
+  +#161#10#10#10#131#131#131#161#161#161#30#30#30'222nnn'#160#160#160'222ZZZ'
+  +#160#160#160'(((ZZZ'#160#160#160#151#151#151#10#10#10#130#130#130#159#159#159
+  +#0#0#0'222'#159#159#159#159#159#159'(((ZZZ'#159#159#159#150#150#150#10#10#10
+  +#130#130#130#140#140#140#0#0#0'www'#158#158#158#158#158#158'(((((('#158#158
+  +#158#158#158#158#158#158#158#158#158#158'OOO'#0#0#0#129#129#129#158#158#158
+  +#148#148#148#20#20#20'YYY'#148#148#148#0#0#0#138#138#138#157#157#157'EEE;;;'
+  +#157#157#157#157#157#157#157#157#157#157#157#157#0#0#0'XXXuuuNNN'#10#10#10
+  +#137#137#137#156#156#156'NNN111'#156#156#156#156#156#156'''''''XXX'#156#156
+  +#156''''''''''''''#155#155#155#155#155#155#19#19#19''''''''#155#155#155#146
+  +#146#146#10#10#10'kkkuuu'#0#0#0#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154'ttt'#0#0#0#154#154#154'ttt'#0#0#0'WWW'#154#154#154#154#154
+  +#154'000000'#153#153#153'&&&MMM'#153#153#153'MMM000'#153#153#153#153#153#153
+  +'&&&VVV'#153#153#153#29#29#29'LLL'#152#152#152#152#152#152#152#152#152#152
+  +#152#152'rrr'#0#0#0#152#152#152#152#152#152'|||'#0#0#0#152#152#152#152#152
+  +#152#152#152#152#151#151#151#151#151#151#151#151#151#151#151#151#0#0#0#0#0#0
+  +#158#234#175#158#234#175#157#234#175#157#233#174#157#233#174#157#233#174#157
+  +#233#173#156#233#173#156#232#173'pzrhhhfffc'#146'r]'#245#141'W'#240#133'R'
+  +#234'|L'#228'sF'#223'kA'#217'b;'#211'Y5'#206'Q0'#200'H*'#194'?$'#189'7'#30
+  +#182'.'#27#169'''cefcefcefcefcefcefcef'#24'a'#24'///---***'#138#204#150#151
+  +#227#165#151#227#164#150#227#164#150#226#164#150#226#164#150#226#163#150#226
+  +#163#150#226#163#149#226#163#149#225#162#149#225#162#149#225#162#149#225#161
+  +#148#225#161#148#225#161#148#224#160#148#224#160#148#224#160#147#224#160#147
+  +#224#160#147#224#159#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#207#207#207#162#162#162#162#162#162'QQQGGG)))))'
+  +')'#20#20#20')))'#161#161#161#161#161#161'eee'#20#20#20'((('#30#30#30'((('
+  +#152#152#152'yyy'#10#10#10#161#161#161#161#161#161'[[['#10#10#10#160#160#160
+  +#160#160#160'ddd((('#160#160#160#131#131#131#20#20#20'((('#20#20#20'<<<'#160
+  +#160#160#159#159#159#0#0#0'ZZZ'#20#20#20#130#130#130#130#130#130#20#20#20'(('
+  +'('#20#20#20'<<<'#159#159#159#159#159#159'ddd'#10#10#10'((('#20#20#20#30#30
+  +#30'((('#158#158#158#158#158#158#158#158#158#158#158#158'OOO'#30#30#30'((((('
+  ,'('#20#20#20''''''''#157#157#157'YYY'#30#30#30#157#157#157#157#157#157#128
+  +#128#128#10#10#10#157#157#157#157#157#157#157#157#157#157#157#157#0#0#0'vvv'
+  +#156#156#156#156#156#156'EEE;;;'#156#156#156#147#147#147''''''''#29#29#29#29
+  +#29#29#29#29#29#147#147#147#156#156#156'''''''EEE'#29#29#29#19#19#19#29#29#29
+  +'aaa'#29#29#29#19#19#19#29#29#29#155#155#155#155#155#155#0#0#0'~~~'#154#154
+  +#154#154#154#154#154#154#154#154#154#154'aaa'#29#29#29#154#154#154'ttt'#0#0#0
+  +':::'''''''#29#29#29#19#19#19#135#135#135#153#153#153'&&&MMM'#153#153#153#144
+  +#144#144'&&&'#29#29#29#29#29#29#29#29#29#144#144#144#153#153#153'}}}'#29#29
+  +#29#29#29#29'&&&&&&|||'#29#29#29#0#0#0'&&&CCC'#152#152#152'000'#29#29#29#29
+  +#29#29'iii'#152#152#152#151#151#151#151#151#151#151#151#151#0#0#0#0#0#0#158
+  +#234#175#158#234#175#158#234#175#157#234#175#157#233#174#157#233#174#157#233
+  +#174#157#233#173#156#233#173#144#201#157'jjjhhhfffb'#174'|]'#245#141'W'#240
+  +#133'R'#234'|L'#228'sF'#223'kA'#217'b;'#211'Y5'#206'Q0'#200'H*'#194'?$'#189
+  +'7'#30#183'.'#25#178'&'#19#172#29#13#166#20#8#161#12#2#155#3#0#151#0#10#130
+  +#10'444222///\}b'#151#227#165#151#227#165#151#227#165#151#227#164#150#227#164
+  +#150#226#164#150#226#164#150#226#163#150#226#163#150#226#163#149#226#163#149
+  +#225#162#149#225#162#149#225#162#149#225#161#148#225#161#148#225#161#148#224
+  +#160#148#224#160#148#224#160#147#224#160#147#224#160#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#207#207#207#162
+  +#162#162#162#162#162#142#142#142#142#142#142#162#162#162'zzz'#132#132#132#162
+  +#162#162#162#162#162#161#161#161#161#161#161#161#161#161'yyy'#131#131#131#161
+  +#161#161#161#161#161#141#141#141#131#131#131#161#161#161#161#161#161#152#152
+  +#152#131#131#131#161#161#161#160#160#160#151#151#151'xxx'#160#160#160#160#160
+  +#160#160#160#160'xxx'#131#131#131#160#160#160#160#160#160#160#160#160'xxx'
+  +#159#159#159#140#140#140#150#150#150#159#159#159#159#159#159'xxx'#130#130#130
+  +#159#159#159#159#159#159#159#159#159#159#159#159#150#150#150'xxx'#149#149#149
+  +'OOO((('#158#158#158#158#158#158#158#158#158#158#158#158'OOO((('#158#158#158
+  +'www'#129#129#129#158#158#158#157#157#157#128#128#128#138#138#138#157#157#157
+  +#157#157#157#157#157#157'vvv'#148#148#148#157#157#157#157#157#157#157#157#157
+  +#0#0#0'vvv'#157#157#157#156#156#156'EEE111'#156#156#156#156#156#156#156#156
+  +#156'uuu'#156#156#156#156#156#156#156#156#156''#147#147#147#137#137#137
+  +'uuu'#155#155#155#155#155#155#136#136#136'uuu'#155#155#155#155#155#155#155
+  +#155#155'::::::'#155#155#155#154#154#154#154#154#154#154#154#154#19#19#19'MM'
+  +'M'#154#154#154'ttt'#0#0#0#154#154#154'~~~ttt'#154#154#154#154#154#154#154
+  +#154#154'}}}'#134#134#134#153#153#153#153#153#153#153#153#153'}}}sss'#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153'}}}rrr'#143#143#143#143
+  +#143#143'VVV'#0#0#0'rrr|||'#152#152#152#152#152#152'||||||'#152#152#152#152
+  +#152#152#152#152#152#151#151#151#151#151#151#0#0#0#0#0#0#158#234#176#158#234
+  +#175#158#234#175#158#234#175#157#234#175#157#233#174#157#233#174#157#233#174
+  +#157#233#173#156#233#173#129#162#136'jjjhhhfffb'#174'|]'#245#141'W'#240#133
+  +'R'#234'|L'#228'sF'#223'kA'#217'b;'#211'Y5'#206'Q0'#200'H*'#194'?$'#189'7'#30
+  +#183'.'#25#178'&'#19#172#29#13#166#20#8#161#12#16#131#17'5>5666444ETH'#146
+  +#217#159#151#228#166#151#227#165#151#227#165#151#227#165#151#227#164#150#227
+  +#164#150#226#164#150#226#164#150#226#163#150#226#163#150#226#163#149#226#163
+  +#149#225#162#149#225#162#149#225#162#149#225#161#148#225#161#148#225#161#148
+  +#224#160#148#224#160#148#224#160#147#224#160#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#207#207#207#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159'OOO((('#158#158#158#158#158#158
+  +#158#158#158#158#158#158'OOO((('#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#0#0#0'YYYvvvccc'
+  +#10#10#10'lll'#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#146#146#146#19#19#19':::uuujjj'''''''#29#29#29#145#145#145
+  +#154#154#154'ttt'#0#0#0#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154'MMMMMM'#153#153#153#153#153#153#153#153#153#153#153#153
+  ,#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#152#152#152#152#152#152#134#134#134'000'#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#151#151#151#0#0#0#0#0#0#158#235#176#158#234#176
+  +#158#234#175#158#234#175#158#234#175#157#234#175#157#233#174#157#233#174#157
+  +#233#174#157#233#173#156#233#173'w'#138'|jjjhhhfffc'#146'r]'#236#138'W'#240
+  +#133'R'#234'|L'#228'sF'#223'kA'#217'b;'#211'Y5'#206'Q0'#200'H*'#194'?$'#189
+  +'7'#30#183'.'#25#178'&'#19#172#29'&s*===;;;999<A='#140#207#152#152#228#166
+  +#152#228#166#151#228#166#151#227#165#151#227#165#151#227#165#151#227#164#150
+  +#227#164#150#226#164#150#226#164#150#226#163#150#226#163#150#226#163#149#226
+  +#163#149#225#162#149#225#162#149#225#162#149#225#161#148#225#161#148#225#161
+  +#148#224#160#148#224#160#148#224#160#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#207#207#207#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159'PPP((('#158#158#158#158#158#158#158#158
+  +#158#158#158#158'OOO((('#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157';;;''''''''''''111lll'
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#146#146#146'NNN''''''''''''WWW'#145#145#145#154#154
+  +#154#154#154#154'ttt'#0#0#0#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154'aaaaaa'#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#0#0#0#0#0#0#158#235#176
+  +#158#235#176#158#234#176#158#234#175#158#234#175#158#234#175#157#234#175#157
+  +#233#174#157#233#174#157#233#174#157#233#173#153#226#169'z'#146#128'jjjhhhff'
+  +'fcmf_'#171'vX'#230#130'R'#234'|L'#228'sF'#223'kA'#217'b;'#211'Y5'#206'Q0'
+  +#200'H*'#194'?$'#189'7-'#141'7?R@BBB@@@===AFB'#134#196#147#152#228#167#152
+  +#228#166#152#228#166#152#228#166#151#228#166#151#227#165#151#227#165#151#227
+  +#165#151#227#164#150#227#164#150#226#164#150#226#164#150#226#163#150#226#163
+  +#150#226#163#149#226#163#149#225#162#149#225#162#149#225#162#149#225#161#148
+  +#225#161#148#225#161#148#224#160#148#224#160#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#207#207#207#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#140#140#140#130#130#130#158#158
+  +#158#158#158#158#158#158#158#158#158#158#139#139#139#129#129#129#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#154#154#154#154#154#154#154#154#154#145#145#145'ttt'#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  ,#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#0#0#0#0#0#0#159#235#176#158#235#176#158#235#176#158
+  +#234#176#158#234#175#158#234#175#158#234#175#157#234#175#157#233#174#157#233
+  +#174#157#233#174#157#233#173#156#233#173#129#162#136'jjjhhhfffcccaaa\'#131'g'
+  +'W'#163'kP'#185'kJ'#188'eF'#184'^A'#179'WA'#151'PB|KISKIIIGGGDDDBBBViZ'#148
+  +#219#161#152#229#167#152#228#167#152#228#167#152#228#166#152#228#166#152#228
+  +#166#151#228#166#151#227#165#151#227#165#151#227#165#151#227#164#150#227#164
+  +#150#226#164#150#226#164#150#226#163#150#226#163#150#226#163#149#226#163#149
+  +#225#162#149#225#162#149#225#162#149#225#161#148#225#161#148#225#161#148#224
+  +#160#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#207#207#207#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#0#0#0#0
+  +#0#0#159#235#177#159#235#176#158#235#176#158#235#176#158#234#176#158#234#175
+  +#158#234#175#158#234#175#157#234#175#157#233#174#157#233#174#157#233#174#157
+  +#233#173#156#233#173#144#201#157'pzrhhhfffcccaaa___\\\ZZZWWWUUUSSSPPPNNNKKKI'
+  +'IILQMt'#159'|'#153#229#168#153#229#168#153#229#167#152#229#167#152#228#167
+  +#152#228#167#152#228#166#152#228#166#152#228#166#151#228#166#151#227#165#151
+  +#227#165#151#227#165#151#227#164#150#227#164#150#226#164#150#226#164#150#226
+  +#163#150#226#163#150#226#163#149#226#163#149#225#162#149#225#162#149#225#162
+  +#149#225#161#148#225#161#148#225#161#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#207#207#207#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  ,#152#152#152#152#152#152#0#0#0#0#0#0#159#235#177#159#235#177#159#235#176#158
+  +#235#176#158#235#176#158#234#176#158#234#175#158#234#175#158#234#175#157#234
+  +#175#157#233#174#157#233#174#157#233#174#157#233#173#156#233#173#156#232#173
+  +#137#185#148't'#135'xfffcccaaa___\\\ZZZWWWUUUSSSPPPXaYs'#153'z'#149#221#163
+  +#153#230#169#153#229#168#153#229#168#153#229#168#153#229#167#152#229#167#152
+  +#228#167#152#228#167#152#228#166#152#228#166#152#228#166#151#228#166#151#227
+  +#165#151#227#165#151#227#165#151#227#164#150#227#164#150#226#164#150#226#164
+  +#150#226#163#150#226#163#150#226#163#149#226#163#149#225#162#149#225#162#149
+  +#225#162#149#225#161#148#225#161#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#207#207#207#163#163#163#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#0#0#0#0#0#0#159#235#177#159#235#177#159#235#177#159#235
+  +#176#158#235#176#158#235#176#158#234#176#158#234#175#158#234#175#158#234#175
+  +#157#234#175#157#233#174#157#233#174#157#233#174#157#233#173#156#233#173#156
+  +#232#173#156#232#173#150#216#164#136#183#146#128#166#136'p'#131'tm'#128'qlp'
+  +'j}nu'#150'{|'#167#133#141#203#154#154#230#170#154#230#169#154#230#169#154
+  +#230#169#153#230#169#153#229#168#153#229#168#153#229#168#153#229#167#152#229
+  +#167#152#228#167#152#228#167#152#228#166#152#228#166#152#228#166#151#228#166
+  +#151#227#165#151#227#165#151#227#165#151#227#164#150#227#164#150#226#164#150
+  +#226#164#150#226#163#150#226#163#150#226#163#149#226#163#149#225#162#149#225
+  +#162#149#225#162#149#225#161#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#207#207#207#163#163#163#163#163#163#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#152#152#152#152
+  ,#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#0#0#0#0#0#0#159#236#178#159#235#177#159#235#177#159#235#177
+  +#159#235#176#158#235#176#158#235#176#158#234#176#158#234#175#158#234#175#158
+  +#234#175#157#234#175#157#233#174#157#233#174#157#233#174#157#233#173#156#233
+  +#173#156#232#173#156#232#173#156#232#172#156#232#172#156#232#172#155#232#172
+  +#155#231#171#155#231#171#155#231#171#155#231#170#154#231#170#154#230#170#154
+  +#230#170#154#230#169#154#230#169#154#230#169#153#230#169#153#229#168#153#229
+  +#168#153#229#168#153#229#167#152#229#167#152#228#167#152#228#167#152#228#166
+  +#152#228#166#152#228#166#151#228#166#151#227#165#151#227#165#151#227#165#151
+  +#227#164#150#227#164#150#226#164#150#226#164#150#226#163#150#226#163#150#226
+  +#163#149#226#163#149#225#162#149#225#162#149#225#162#245#249#245#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#223#223#223#163
+  +#163#163#163#163#163#163#163#163#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#0#0#0#0#0#0#160#236#178#159#236#178
+  +#159#235#177#159#235#177#159#235#177#159#235#176#158#235#176#158#235#176#158
+  +#234#176#158#234#175#158#234#175#158#234#175#157#234#175#157#233#174#157#233
+  +#174#157#233#174#157#233#173#156#233#173#156#232#173#156#232#173#156#232#172
+  +#156#232#172#156#232#172#155#232#172#155#231#171#155#231#171#155#231#171#155
+  +#231#170#154#231#170#154#230#170#154#230#170#154#230#169#154#230#169#154#230
+  +#169#153#230#169#153#229#168#153#229#168#153#229#168#153#229#167#152#229#167
+  +#152#228#167#152#228#167#152#228#166#152#228#166#152#228#166#151#228#166#151
+  +#227#165#151#227#165#151#227#165#151#227#164#150#227#164#150#226#164#150#226
+  +#164#150#226#163#150#226#163#150#226#163#149#226#163#149#225#162#149#225#162
+  +#226#245#229#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#234#234#234#163#163#163#163#163#163#163#163#163#163#163#163#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  ,#154#154#154#154#154#154#154#154#154#154#154#154#154#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152#0#0#0#0#0#0
+  +#160#236#178#160#236#178#159#236#178#159#235#177#159#235#177#159#235#177#159
+  +#235#176#158#235#176#158#235#176#158#234#176#158#234#175#158#234#175#158#234
+  +#175#157#234#175#157#233#174#157#233#174#157#233#174#157#233#173#156#233#173
+  +#156#232#173#156#232#173#156#232#172#156#232#172#156#232#172#155#232#172#155
+  +#231#171#155#231#171#155#231#171#155#231#170#154#231#170#154#230#170#154#230
+  +#170#154#230#169#154#230#169#154#230#169#153#230#169#153#229#168#153#229#168
+  +#153#229#168#153#229#167#152#229#167#152#228#167#152#228#167#152#228#166#152
+  +#228#166#152#228#166#151#228#166#151#227#165#151#227#165#151#227#165#151#227
+  +#164#150#227#164#150#226#164#150#226#164#150#226#163#150#226#163#150#226#163
+  +#149#226#163#149#225#162#219#243#223#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#174#174#174#163#163#163#163#163
+  +#163#163#163#163#163#163#163#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#152#152#152#152#152#152#152#152#152#152#152#152#152#152#152
+  +#152#152#152#0#0#0#0#0#0#160#236#178#160#236#178#160#236#178#159#236#178#159
+  +#235#177#159#235#177#159#235#177#159#235#176#158#235#176#158#235#176#158#234
+  +#176#158#234#175#158#234#175#158#234#175#157#234#175#157#233#174#157#233#174
+  +#157#233#174#157#233#173#156#233#173#156#232#173#156#232#173#156#232#172#156
+  +#232#172#156#232#172#155#232#172#155#231#171#155#231#171#155#231#171#155#231
+  +#170#154#231#170#154#230#170#154#230#170#154#230#169#154#230#169#154#230#169
+  +#153#230#169#153#229#168#153#229#168#153#229#168#153#229#167#152#229#167#152
+  +#228#167#152#228#167#152#228#166#152#228#166#152#228#166#151#228#166#151#227
+  +#165#151#227#165#151#227#165#151#227#164#150#227#164#150#226#164#150#226#164
+  +#150#226#163#150#226#163#150#226#163#149#226#163#200#238#207#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#207#207
+  +#207#163#163#163#163#163#163#163#163#163#163#163#163#163#163#163#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#155#155#155#155#155#155
+  ,#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#152#152#152#152#152#152
+  +#152#152#152#152#152#152#152#152#152#0#0#0#0#0#0#160#236#179#160#236#178#160
+  +#236#178#160#236#178#159#236#178#159#235#177#159#235#177#159#235#177#159#235
+  +#176#158#235#176#158#235#176#158#234#176#158#234#175#158#234#175#158#234#175
+  +#157#234#175#157#233#174#157#233#174#157#233#174#157#233#173#156#233#173#156
+  +#232#173#156#232#173#156#232#172#156#232#172#156#232#172#155#232#172#155#231
+  +#171#155#231#171#155#231#171#155#231#170#154#231#170#154#230#170#154#230#170
+  +#154#230#169#154#230#169#154#230#169#153#230#169#153#229#168#153#229#168#153
+  +#229#168#153#229#167#152#229#167#152#228#167#152#228#167#152#228#166#152#228
+  +#166#152#228#166#151#228#166#151#227#165#151#227#165#151#227#165#151#227#164
+  +#150#227#164#150#226#164#150#226#164#150#226#163#150#226#163#150#226#163#168
+  +#230#179#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#246#246#246#174#174#174#163#163#163#163#163#163#163#163#163
+  +#163#163#163#163#163#163#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#152#152#152#152#152#152#152#152#152#152#152#152#0#0#0#0#0#0#160
+  +#237#179#160#236#179#160#236#178#160#236#178#160#236#178#159#236#178#159#235
+  +#177#159#235#177#159#235#177#159#235#176#158#235#176#158#235#176#158#234#176
+  +#158#234#175#158#234#175#158#234#175#157#234#175#157#233#174#157#233#174#157
+  +#233#174#157#233#173#156#233#173#156#232#173#156#232#173#156#232#172#156#232
+  +#172#156#232#172#155#232#172#155#231#171#155#231#171#155#231#171#155#231#170
+  +#154#231#170#154#230#170#154#230#170#154#230#169#154#230#169#154#230#169#153
+  +#230#169#153#229#168#153#229#168#153#229#168#153#229#167#152#229#167#152#228
+  +#167#152#228#167#152#228#166#152#228#166#152#228#166#151#228#166#151#227#165
+  +#151#227#165#151#227#165#151#227#164#150#227#164#150#226#164#150#226#164#150
+  +#226#163#150#226#163#150#226#163#238#247#240#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#235#235#235#169#169#169
+  +#163#163#163#163#163#163#163#163#163#163#163#163#163#163#163#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  ,#157#157#157#157#157#157#157#157#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#152#152#152#152#152#152#152
+  +#152#152#0#0#0#0#0#0#161#237#179#160#237#179#160#236#179#160#236#178#160#236
+  +#178#160#236#178#159#236#178#159#235#177#159#235#177#159#235#177#159#235#176
+  +#158#235#176#158#235#176#158#234#176#158#234#175#158#234#175#158#234#175#157
+  +#234#175#157#233#174#157#233#174#157#233#174#157#233#173#156#233#173#156#232
+  +#173#156#232#173#156#232#172#156#232#172#156#232#172#155#232#172#155#231#171
+  +#155#231#171#155#231#171#155#231#170#154#231#170#154#230#170#154#230#170#154
+  +#230#169#154#230#169#154#230#169#153#230#169#153#229#168#153#229#168#153#229
+  +#168#153#229#167#152#229#167#152#228#167#152#228#167#152#228#166#152#228#166
+  +#152#228#166#151#228#166#151#227#165#151#227#165#151#227#165#151#227#164#150
+  +#227#164#150#226#164#150#226#164#150#226#163#150#226#163#194#237#201#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#218#218#218#163#163#163#163#163#163#163#163#163#163#163#163#163
+  +#163#163#163#163#163#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162#162
+  +#162#162#162#162#162#162#162#162#162#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161#161
+  +#161#161#161#161#161#161#161#161#161#161#161#161#161#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160#160
+  +#160#160#160#160#160#160#160#160#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159#159
+  +#159#159#159#159#159#159#159#159#159#159#159#159#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158#158
+  +#158#158#158#158#158#158#158#158#158#158#158#158#158#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156#156
+  +#156#156#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155
+  +#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#155#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154#154
+  +#154#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153
+  +#153#153#152#152#152#152#152#152#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0
+]);
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAPoweredByDataAbstractButton.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAPoweredByDataAbstractButton.pas
new file mode 100644
index 0000000..cdc87e3
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAPoweredByDataAbstractButton.pas	
@@ -0,0 +1,55 @@
+unit uDAPoweredByDataAbstractButton;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  {$IFDEF FPC}LResources,{$ENDIF}
+  {$IFDEF MSWINDOWS} Windows, {$ENDIF}
+  uROPoweredByRemObjectsButton,SysUtils,Classes,
+  Graphics, Controls;   
+
+{$IFNDEF FPC}  
+  {$R uDAPoweredByDataAbstractButton.res}
+{$ENDIF FPC}
+
+type
+  TDAPoweredByDataAbstractButton = class(TROPoweredByRemObjectsButton)
+  protected
+    procedure GetBitmap; override;
+  end;
+
+implementation
+
+const
+  STR_POWERED_BY_DATAABSTRACT_CLIENT = 'POWERED_BY_DATAABSTRACT_CLIENT';
+  STR_POWERED_BY_DATAABSTRACT_SERVER = 'POWERED_BY_DATAABSTRACT_SERVER';
+
+{ TDAPoweredByDataAbstractButton }
+
+procedure TDAPoweredByDataAbstractButton.GetBitmap;
+begin
+  case ApplicationType of
+    atServer: Bitmap.LoadFromResourceName(hInstance,STR_POWERED_BY_DATAABSTRACT_SERVER);
+    atClient: Bitmap.LoadFromResourceName(hInstance,STR_POWERED_BY_DATAABSTRACT_CLIENT);
+  end; { case }
+end;
+
+{$IFDEF FPC}
+initialization
+  {$I uDAPoweredByDataAbstractButton.lrs}
+{$ENDIF}
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAPoweredByDataAbstractButton.res b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAPoweredByDataAbstractButton.res
new file mode 100644
index 0000000..fa1fb3d
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAPoweredByDataAbstractButton.res differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAReconcileDialog.dfm b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAReconcileDialog.dfm
new file mode 100644
index 0000000..ae8fe93
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAReconcileDialog.dfm	
@@ -0,0 +1,551 @@
+object ReconcileDialogForm: TReconcileDialogForm
+  Left = 354
+  Top = 231
+  Width = 541
+  Height = 403
+  BorderStyle = bsSizeToolWin
+  BorderWidth = 5
+  Caption = 'One or more updates failed to apply on the server...'
+  Color = clBtnFace
+  ParentFont = True
+  OldCreateOrder = False
+  Position = poOwnerFormCenter
+  OnCreate = FormCreate
+  OnDestroy = FormDestroy
+  DesignSize = (
+    515
+    357)
+  PixelsPerInch = 96
+  TextHeight = 13
+  object Label1: TLabel
+    Left = 264
+    Top = 154
+    Width = 238
+    Height = 39
+    Anchors = [akLeft, akRight, akBottom]
+    Caption = 
+      'Skip over this change and ignore the error. You can try and corr' +
+      'ect the problem by modifying data, or reapply the change again a' +
+      't a later time.'
+    WordWrap = True
+  end
+  object Label2: TLabel
+    Left = 264
+    Top = 210
+    Width = 225
+    Height = 26
+    Anchors = [akLeft, akRight, akBottom]
+    Caption = 
+      'Cancel the changes you made and restore the record to its origin' +
+      'al values.'
+    WordWrap = True
+  end
+  object Label3: TLabel
+    Left = 264
+    Top = 266
+    Width = 230
+    Height = 39
+    Anchors = [akLeft, akRight, akBottom]
+    Caption = 
+      'Show a dialog with details of the changes made to the record sin' +
+      'ce it was last retrieved from or applied to the server.'
+    WordWrap = True
+  end
+  object SkipButton: TButton
+    Left = 161
+    Top = 154
+    Width = 96
+    Height = 25
+    Anchors = [akLeft, akBottom]
+    Caption = '&Skip Change'
+    TabOrder = 3
+    OnClick = SkipButtonClick
+  end
+  object CancelButton: TButton
+    Left = 161
+    Top = 210
+    Width = 96
+    Height = 25
+    Anchors = [akLeft, akBottom]
+    Caption = '&Cancel Change'
+    TabOrder = 4
+    OnClick = CancelButtonClick
+  end
+  object SkipAllButton: TButton
+    Left = 0
+    Top = 332
+    Width = 75
+    Height = 25
+    Anchors = [akLeft, akBottom]
+    Caption = 'Skip &All'
+    TabOrder = 1
+    OnClick = SkipAllButtonClick
+  end
+  object CancelAllButton: TButton
+    Left = 80
+    Top = 332
+    Width = 75
+    Height = 25
+    Anchors = [akLeft, akBottom]
+    Caption = 'Cancel A&ll'
+    TabOrder = 2
+    OnClick = CancelAllButtonClick
+  end
+  object ShowDetailButton: TButton
+    Left = 161
+    Top = 266
+    Width = 96
+    Height = 25
+    Anchors = [akLeft, akBottom]
+    Caption = 'Show &Details'
+    TabOrder = 5
+    OnClick = ShowDetailButtonClick
+  end
+  object TreeView: TTreeView
+    Left = 0
+    Top = 0
+    Width = 155
+    Height = 327
+    Anchors = [akLeft, akTop, akBottom]
+    HideSelection = False
+    Indent = 20
+    MultiSelectStyle = []
+    ReadOnly = True
+    RowSelect = True
+    ShowButtons = False
+    ShowLines = False
+    ShowRoot = False
+    StateImages = ImageList
+    TabOrder = 0
+    OnClick = ListBoxClick
+  end
+  object btn_Cancel: TButton
+    Left = 440
+    Top = 332
+    Width = 75
+    Height = 25
+    Anchors = [akRight, akBottom]
+    Cancel = True
+    Caption = 'Close'
+    ModalResult = 2
+    TabOrder = 6
+  end
+  object memMessageError: TMemo
+    Left = 160
+    Top = 0
+    Width = 353
+    Height = 145
+    Anchors = [akLeft, akTop, akRight, akBottom]
+    Color = clBtnFace
+    ReadOnly = True
+    ScrollBars = ssVertical
+    TabOrder = 7
+  end
+  object ImageList: TImageList
+    Left = 59
+    Top = 124
+    Bitmap = {
+      494C010105000900040010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
+      0000000000003600000028000000400000003000000001002000000000000030
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000D6C00000D
+      6C00000C5D00000A5100000A4F00000A4F00000A4F00000A4F00000A4F00000A
+      4F00000A4F000008400000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000001397000017B9000016
+      B5000015AA000013A0000013A00000139700001397000013A000001397000013
+      97000013A000000F7A0000084000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000017B900001CE200001A
+      D5000018CA000018C6000016B5000016B5000015AA000015AA000016B5000015
+      AA000016B5000013A000000A4F00000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000018C600001EF000001C
+      E200001AD5000018C6000018C6000016B5000016B5000015AA000013A0000015
+      AA000015AA000013A000000A4F00000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000018CA000224FF00001E
+      F000001CE200001AD5000018CA000018C6000016B5000016B5000015AA000013
+      A0000017B90000139700000A4F00000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000018CA00163BFF000528
+      FF00001EF000001CE200001AD5000018CA000018CA000017B9000016B5000015
+      AA000015AA000013A000000A4F00000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000018CA003559FF000F35
+      FF000224FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000017
+      B9000016B5000013A000000A4F00000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000018CA004E6EFF00193F
+      FF000224FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000018
+      C6000018C60000139D00000C5D00000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000018CA005A79FF002146
+      FF00092DFF000224FF00001EF000001DEE00001DEE00001CE200001AD5000018
+      CA000018CA000016B500000D6C00000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000018CA006682FF002D51
+      FF00163BFF000F35FF000224FF00001FFF00001EF000001EF000001DEE00001C
+      DE00001CDE000017B900000F7A00000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000018CA007690FF004163
+      FF00193FFF00163BFF00092DFF000528FF000224FF000224FF00001DEE00001D
+      EE00001CE2000018C60000118700000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000018CA007F98FF00728C
+      FF005676FF004163FF003559FF00284CFF00163BFF000224FF00001FFF00001D
+      EE00001DEE00001CDE0000139700000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000018CA005877FF007F98
+      FF00839CFF007690FF006682FF004E6EFF00284CFF000F35FF000224FF00001F
+      FF00001DEE00001CE2000013A000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000001DEE00092D
+      FF000F35FF00092DFF000528FF000224FF00001DEE00001CDE00001AD5000018
+      CA00001AD5000016B50000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000015F05000269090002640700005E0400004D0300000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000002C2C6C0005056300000065000000600000004F00000000000000
+      0000000000000000000000000000000000000000000000000000000D6C00000D
+      6C00000C5D00000A5100000A4F00000A4F00000A4F00000A4F00000A4F00000A
+      4F00000A4F000008400000000000000000000000000000000000000D6C00000D
+      6C00000C5D00000A5100000A4F00000A4F00000A4F00000A4F00000A4F00000A
+      4F00000A4F000008400000000000000000000000000000000000000000000271
+      08000C98220011B62F000DB4250009B21C0006B0160001AE0B0000910700005B
+      0400000000000000000000000000000000000000000000000000000000002929
+      AC000000840000008E0000008E0000008F0000008C0000008800000081000101
+      54000000000000000000000000000000000000000000001397000017B9000016
+      B5000015AA000013A0000013A00000139700001397000013A000001397000013
+      97000013A000000F7A00000840000000000000000000001397000017B9000016
+      B5000015AA000013A0000013A00000139700001397000013A000001397000013
+      97000013A000000F7A0000084000000000000000000000000000078414001CB6
+      45001BBA440017B83A0012B630000EB426001AB72D0008B21B0004AF110000AD
+      09000067050000000000000000000000000000000000000000002929AC000000
+      96000000970000009B0000009F000000A00000009D000000970000008F000000
+      880000006200000000000000000000000000000000000017B900001CE200001A
+      D5000018CA000018C6000016B5000016B5000015AA000015AA000016B5000015
+      AA000016B5000013A000000A4F0000000000000000000017B900001CE200001A
+      D1000019CC000018C6000016B5000016B5000015AA000015AA000016B5000015
+      AA000016B5000013A000000A4F00000000000000000004860B0023B7530024BE
+      580021BD51001CBA45001ABA430012B630000EB426000EB426000AB21D0007B1
+      180002AE0D00005F04000000000000000000000000002929AC000101A3000808
+      9E009999D4006868D0000000AC000000AE000000A9004848B800B7B7E3002727
+      A50000008C00010152000000000000000000000000000018C600001EF000001C
+      E200001AD5000018C6000018C6000016B5000016B5000015AA000013A0000015
+      AA000015AA000013A000000A4F0000000000000000000018C600001EF000001C
+      E200001AD1000018C6003653D300EAEEFA008899E000061FAF000013A0000015
+      AA000015AA000013A000000A4F00000000000000000017A437002EC26B002CC1
+      660025BF5A0021BD5100FFFFFF001ABA430012B6300013B6310011B62E000BB3
+      210009B21C00059712000000000000000000000000002929AC000000AB002828
+      A300DEDED200FEFEFF006464D4000000B3004646C000E7E7EC00FFFFF7005E5E
+      B70000009A00020287000000000000000000000000000018CA000224FF00001E
+      F000001CE200001AD5000018C600FFFFFF00F4F7FF000016B5000015AA000013
+      A0000017B90000139700000A4F0000000000000000000019CC000224FF00001E
+      F0009AACF6000624D7000019CC009AAAEB00FFFFFF008899E0000015AA000015
+      AA000015AA000013A000000A4F00000000000091020028BB5E002EC26B002EC2
+      6B002EC26B00FFFFFF00FFFFFF00FFFFFF001ABA43001ABA430015B8380012B6
+      30000FB52A000AB21D0002670800000000004B4BD3000707B1000303B9000000
+      C2004C4CA700E6E6D900FCFCFF009E9EE600E8E9F400FFFFF1007575B9000606
+      B1000101AB000202A00013145D0000000000000000000018CA00163BFF000528
+      FF00001EF000001CE200001BD900FFFFFF00FFFFFF000017B9000016B5000015
+      AA000015AA000013A000000A4F0000000000000000000019CC00163BFF000528
+      FF00FFFFFF00768FF300001AD1003654DE00FFFFFF00ADBBEE000016B5000015
+      AA000016B50000139700000A4F0000000000009701002EC26B002EC26B002EC2
+      6B00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF001ABA43001ABA43000EB4
+      260014B7340011B62F0005771000000000004B4BD3000808BB000707C8000505
+      D1000000C8005353B600F2F2ED00FFFFFF00FFFFFC007575C9000000BE000101
+      C3000303B8000303AC0010106F0000000000000000000018CA003559FF000F35
+      FF000224FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000017
+      B9000016B5000013A000000A4F0000000000000000000019CC003559FF000F35
+      FF00FFFFFF00FFFFFF00768FF300EAEEFA00FFFFFF00889CEB000018C6000016
+      B5000016B5000013A000000A4F000000000000A001002EC26B002EC26B002EC2
+      6B00FFFFFF00FFFFFF002EC26B00FFFFFF00FFFFFF00FFFFFF001ABA43001ABA
+      43001BBA440017B83A000A8D1B00000000004B4BD3000C0CC9000D0DD8000B0B
+      DC000000D6003C3DCE00EEEFED00FFFFFF00FFFFFD005858DB000000CA000303
+      CB000606C5000606B8001212790000000000000000000018CA004E6EFF00193F
+      FF000224FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF000018
+      C6000018C6000013A000000A510000000000000000000019CC004D6DFF00193F
+      FF004D6DFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00EAEEFA001C3BD5000018
+      C6000017B9000015AA00000A51000000000000A4010033C36E002EC26B002EC2
+      6B00FFFFFF002EC26B002EC26B002EC26B00FFFFFF00FFFFFF00FFFFFF002BBF
+      640021BD51001CBA4500077F1300000000004B4BD3001414D8001717EA000B0B
+      F1004343DB00E4E4EA00FDFDF500BABAD400EAEAE800FEFEFF006363E5000303
+      D7000A0ACF000A0AC30021217F0000000000000000000018CA005A79FF002146
+      FF00092DFF000224FF00001EF000FFFFFF00FFFFFF00001CE200001BD9000018
+      CA000018CA000016B500000D6C0000000000000000000019CC005A79FF002146
+      FF00092DFF00294DFF006681F8004565F400C1CCFB00FFFFFF00EAEEFA001C3B
+      D5000019CC000016B500000D6C000000000000AD000044C665003FC776002EC2
+      6B003AC573002EC26B002EC26B002EC26B002EC26B00FFFFFF00FFFFFF002BBF
+      640025BF5A0023BE5700047E0D00000000004B4BD3002626E5002222FB003F3F
+      E900DCDCE500FDFDEE007373C5000303D7005151B000E3E3D600FFFFFE006161
+      E5000808DB000F0FCA001212790000000000000000000018CA006682FF002D51
+      FF00163BFF000F35FF000224FF00FFFFFF00FFFFFF00001DEE00001CE200001C
+      E200001BD9000017B900000F7A0000000000000000000019CC006681F8002D51
+      FF00163BFF000F35FF000224FF00001FFF000528FF00EAEEFA00FFFFFF00EAEE
+      FA00001BD9000017B900000F7A00000000000000000031BE3C0072D5950052CC
+      820035C470003AC573002EC26B002EC26B002EC26B002EC26B00FFFFFF002BBF
+      64002DC26A001AA73E000000000000000000000000003131FB003232FF005252
+      ED00B3B3C2007777CA000000EA000000EC000000E8005252B400ADADB0004D4D
+      E1001818ED001818B1000000000000000000000000000018CA007690FF004163
+      FF00193FFF00163BFF00092DFF000528FF000224FF000224FF00001EF000001D
+      EE00001CE2000018CA000011870000000000000000000019CC007690FF004163
+      FF00193FFF00163BFF00092DFF000528FF000224FF001C41FF00EAEEFA00C1CC
+      FB00001CE2000019CC0000118700000000000000000000B7000075D6830082DA
+      A00066D28E0044C879003AC573002EC26B002EC26B002EC26B0028BD5E002BBF
+      64002BBF640003870A000000000000000000000000003131FB003E3EFB005353
+      FF006868EF005757F9003838FF002525FD002929FF003838FC004242EB003232
+      FF001F1FE9003131FB000000000000000000000000000018CA007F98FF00728C
+      FF005676FF004163FF003559FF00284CFF00163BFF000224FF00001FF900001D
+      EE00001EF000001BD9000013A00000000000000000000019CC007F98FF00728C
+      FF005676FF004163FF003559FF002449FF00193FFF000224FF000224FF00001E
+      F000001EF000001BD9000013A0000000000000000000000000000FBC100077D7
+      800098E0AD0076D798005ACE86003AC573002EC26B002EC26B002EC26B0028BD
+      5E000998170000000000000000000000000000000000000000003131FB004949
+      FD006E6EFF009191FF009393FF008484FF007676FF006767FF005151FF003131
+      FB003131FB00000000000000000000000000000000000018CA005877FF007F98
+      FF00839CFF007690FF006682FF004E6EFF00284CFF000F35FF000224FF00001F
+      F900001FF900001CE2000013A00000000000000000000019CC005877FF007F98
+      FF00839CFF007690FF006681F8004D6DFF00294DFF000F35FF00001FFF00001F
+      FF00001FFF00001BD9000013A0000000000000000000000000000000000000B8
+      000047CB490084DA91008CDCA6006AD391004ECB7F002DBF610017B13600049C
+      0A00000000000000000000000000000000000000000000000000000000003131
+      FB003131FB006969FE008787FF009292FF007676FF005353FF005151F3003131
+      FB00000000000000000000000000000000000000000000000000001DEE00092D
+      FF000F35FF00092DFF000528FF000224FF00001DEE00001BD900001AD5000018
+      CA00001AD5000016B50000000000000000000000000000000000001DEE00092D
+      FF000F35FF00092DFF000528FF000224FF00001DEE00001BD900001AD1000019
+      CC000019CC000017B90000000000000000000000000000000000000000000000
+      00000000000000B8000000B6000000AE000000AD000000A60100000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000003131FB003131FB003131FB003131FB003131FB00000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000424D3E000000000000003E000000
+      2800000040000000300000000100010000000000800100000000000000000000
+      000000000000000000000000FFFFFF0000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000FFFF000000000000C003000000000000
+      8001000000000000800100000000000080010000000000008001000000000000
+      8001000000000000800100000000000080010000000000008001000000000000
+      8001000000000000800100000000000080010000000000008001000000000000
+      C003000000000000FFFF000000000000FFFFFFFFFFFFFFFFF83FF83FC003C003
+      E00FE00F80018001C007C0078001800180038003800180018003800380018001
+      0001000180018001000100018001800100010001800180010001000180018001
+      000100018001800180038003800180018003800380018001C007C00780018001
+      E00FE00FC003C003F83FF83FFFFFFFFF00000000000000000000000000000000
+      000000000000}
+  end
+end
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAReconcileDialog.lfm b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAReconcileDialog.lfm
new file mode 100644
index 0000000..19e884d
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAReconcileDialog.lfm	
@@ -0,0 +1,406 @@
+object ReconcileDialogForm: TReconcileDialogForm
+  Left = 327
+  Height = 357
+  Top = 206
+  Width = 515
+  HorzScrollBar.Page = 514
+  VertScrollBar.Page = 356
+  ActiveControl = TreeView
+  BorderStyle = bsDialog
+  Caption = 'One or more updates failed to apply on the server...'
+  Font.Height = -11
+  Font.Name = 'Tahoma'
+  OnCreate = FormCreate
+  OnDestroy = FormDestroy
+  Position = poOwnerFormCenter
+  object lMessageError: TLabel
+    Left = 164
+    Height = 133
+    Top = 6
+    Width = 345
+    Anchors = [akTop, akLeft, akRight]
+    AutoSize = False
+    Color = clNone
+    ParentColor = False
+    WordWrap = True
+  end
+  object Label1: TLabel
+    Left = 264
+    Height = 91
+    Top = 154
+    Width = 238
+    Caption = 'Skip over this change and ignore the error. You can try and correct the problem by modifying data, or reapply the change again at a later time.'
+    Color = clNone
+    ParentColor = False
+    WordWrap = True
+  end
+  object Label2: TLabel
+    Left = 264
+    Height = 55
+    Top = 210
+    Width = 209
+    Caption = 'Cancel the changes you made  and restore the record to it''s original values.'
+    Color = clNone
+    ParentColor = False
+    WordWrap = True
+  end
+  object Label3: TLabel
+    Left = 264
+    Height = 73
+    Top = 266
+    Width = 230
+    Caption = 'Show a dialog with details of the changes made to the record since it was last retrieved from or applied to the server.'
+    Color = clNone
+    ParentColor = False
+    WordWrap = True
+  end
+  object SkipButton: TButton
+    Left = 161
+    Height = 25
+    Top = 154
+    Width = 96
+    BorderSpacing.InnerBorder = 4
+    Caption = '&Skip Change'
+    OnClick = SkipButtonClick
+    TabOrder = 3
+  end
+  object CancelButton: TButton
+    Left = 161
+    Height = 25
+    Top = 210
+    Width = 96
+    BorderSpacing.InnerBorder = 4
+    Caption = '&Cancel Change'
+    OnClick = CancelButtonClick
+    TabOrder = 4
+  end
+  object SkipAllButton: TButton
+    Height = 25
+    Top = 332
+    Width = 75
+    Anchors = [akLeft, akBottom]
+    BorderSpacing.InnerBorder = 4
+    Caption = 'Skip &All'
+    OnClick = SkipAllButtonClick
+    TabOrder = 1
+  end
+  object CancelAllButton: TButton
+    Left = 80
+    Height = 25
+    Top = 332
+    Width = 75
+    Anchors = [akLeft, akBottom]
+    BorderSpacing.InnerBorder = 4
+    Caption = 'Cancel A&ll'
+    OnClick = CancelAllButtonClick
+    TabOrder = 2
+  end
+  object ShowDetailButton: TButton
+    Left = 161
+    Height = 25
+    Top = 266
+    Width = 96
+    BorderSpacing.InnerBorder = 4
+    Caption = 'Show &Details'
+    OnClick = ShowDetailButtonClick
+    TabOrder = 5
+  end
+  object TreeView: TTreeView
+    Height = 327
+    Width = 155
+    Anchors = [akTop, akLeft, akBottom]
+    HideSelection = False
+    Indent = 20
+    RightClickSelect = True
+    RowSelect = True
+    ShowButtons = False
+    ShowLines = False
+    ShowRoot = False
+    StateImages = ImageList
+    TabOrder = 0
+    OnClick = ListBoxClick
+    Options = [tvoAutoItemHeight, tvoKeepCollapsedNodes, tvoRightClickSelect, tvoRowSelect, tvoToolTips]
+  end
+  object btn_Cancel: TButton
+    Left = 440
+    Height = 25
+    Top = 332
+    Width = 75
+    Anchors = [akRight, akBottom]
+    BorderSpacing.InnerBorder = 4
+    Cancel = True
+    Caption = 'Cancel'
+    ModalResult = 2
+    TabOrder = 6
+  end
+  object ImageList: TImageList
+    left = 59
+    top = 124
+    Bitmap = {
+      6C69050000001000000010000000700800002F2A2058504D202A2F0A73746174
+      69632063686172202A677261706869635B5D203D207B0A223136203136203936
+      2032222C0A222E2E2063204E6F6E65222C0A222E2C2063202330304238303022
+      2C0A222E2D20632023303042363030222C0A222E2A2063202330304145303022
+      2C0A222E6120632023303041443030222C0A222E622063202330314136303022
+      2C0A222E6320632023343943423437222C0A222E642063202339314441383422
+      2C0A222E6520632023413644433843222C0A222E662063202339314433364122
+      2C0A222E6720632023374643423445222C0A222E682063202336314246324422
+      2C0A222E6920632023333642313137222C0A222E6A2063202330413943303422
+      2C0A222E6B20632023313042433046222C0A222E6C2063202338304437373722
+      2C0A222E6D20632023414445303938222C0A222E6E2063202339384437373622
+      2C0A222E6F20632023383643453541222C0A222E702063202337334335334122
+      2C0A222E7120632023364243323245222C0A222E722063202335454244323822
+      2C0A222E7320632023313739383039222C0A222E742063202330304237303022
+      2C0A222E7520632023383344363735222C0A222E762063202341304441383222
+      2C0A222E7720632023384544323636222C0A222E782063202337394338343422
+      2C0A222E7920632023363442463242222C0A222E7A2063202330413837303322
+      2C0A222E4120632023334342453331222C0A222E422063202339354435373222
+      2C0A222E4320632023383243433532222C0A222E442063202337304334333522
+      2C0A222E4520632023464646464646222C0A222E462063202336414332324422
+      2C0A222E4720632023334541373141222C0A222E482063202336354336343422
+      2C0A222E4920632023373643373346222C0A222E4A2063202335414246323522
+      2C0A222E4B20632023353742453233222C0A222E4C2063202330443745303422
+      2C0A222E4D20632023303141343030222C0A222E4E2063202336454333333322
+      2C0A222E4F20632023353142443231222C0A222E502063202334354241314322
+      2C0A222E5120632023313337463037222C0A222E522063202330314130303022
+      2C0A222E5320632023343342413141222C0A222E542063202334344241314222
+      2C0A222E5520632023334142383137222C0A222E562063202331423844304122
+      2C0A222E5720632023303139373030222C0A222E582063202332364234304522
+      2C0A222E5920632023333442373134222C0A222E5A2063202332464236313122
+      2C0A222E3020632023313037373035222C0A222E312063202330323931303022
+      2C0A222E3220632023354542423238222C0A222E332063202333384238313522
+      2C0A222E3420632023333042363132222C0A222E352063202332414235304622
+      2C0A222E3620632023314442323041222C0A222E372063202330383637303222
+      2C0A222E3820632023333741343137222C0A222E392063202336364331324322
+      2C0A222E4020632023333142363133222C0A222E232063202332454236313122
+      2C0A222E3B20632023323142333042222C0A222E3A2063202331434232303922
+      2C0A222E3D20632023313239373035222C0A222E2B2063202330423836303422
+      2C0A222E2520632023353342373233222C0A222E242063202335384245323422
+      2C0A222E2820632023313842313037222C0A222E292063202330444145303222
+      2C0A222E5B20632023303435463030222C0A222E5D2063202331343834303722
+      2C0A222C2E20632023343542363143222C0A222C2C2063202332444237314122
+      2C0A222C2D20632023314242323038222C0A222C2A2063202331314146303422
+      2C0A222C6120632023303941443030222C0A222C622063202330353637303022
+      2C0A222C6320632023303837313032222C0A222C642063202332323938304322
+      2C0A222C6520632023323542343044222C0A222C662063202331364230303622
+      2C0A222C6720632023304241453031222C0A222C682063202330373931303022
+      2C0A222C6920632023303435423030222C0A222C6A2063202330353546303122
+      2C0A222C6B20632023303936393032222C0A222C6C2063202330373634303222
+      2C0A222C6D20632023303435453030222C0A222C6E2063202330333444303022
+      2C0A222E2E2E2E2E2E2E2E2E2E2E2C2E2D2E2A2E612E622E2E2E2E2E2E2E2E2E
+      2E2E2E222C0A222E2E2E2E2E2E2E2C2E632E642E652E662E672E682E692E6A2E
+      2E2E2E2E2E2E2E222C0A222E2E2E2E2E6B2E6C2E6D2E6E2E6F2E702E712E712E
+      712E722E732E2E2E2E2E2E222C0A222E2E2E742E752E762E772E782E702E712E
+      712E712E722E792E792E7A2E2E2E2E222C0A222E2E2E412E422E432E442E702E
+      712E712E712E712E452E792E462E472E2E2E2E222C0A222E612E482E492E712E
+      702E712E712E712E712E452E452E792E4A2E4B2E4C2E2E222C0A222E4D2E4E2E
+      712E712E452E712E712E712E452E452E452E792E4F2E502E512E2E222C0A222E
+      522E712E712E712E452E452E712E452E452E452E532E532E542E552E562E2E22
+      2C0A222E572E712E712E712E452E452E452E452E452E532E532E582E592E5A2E
+      302E2E222C0A222E312E322E712E712E712E452E452E452E532E532E332E342E
+      352E362E372E2E222C0A222E2E2E382E712E392E4A2E4F2E452E532E342E402E
+      232E3B2E3A2E3D2E2E2E2E222C0A222E2E2E2B2E252E242E4F2E502E532E342E
+      582E582E362E282E292E5B2E2E2E2E222C0A222E2E2E2E2E5D2C2E2E542E552E
+      342E582C2C2C2D2C2A2C612C622E2E2E2E2E2E222C0A222E2E2E2E2E2E2C632C
+      642E5A2C652E3A2C662C672C682C692E2E2E2E2E2E2E2E222C0A222E2E2E2E2E
+      2E2E2E2E2E2C6A2C6B2C6C2C6D2C6E2E2E2E2E2E2E2E2E2E2E2E2E222C0A222E
+      2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E22
+      7D0A910B00002F2A2058504D202A2F0A7374617469632063686172202A677261
+      706869635B5D203D207B0A223136203136203134362032222C0A222E2E206320
+      4E6F6E65222C0A222E2C20632023464233313331222C0A222E2D206320234645
+      36393639222C0A222E2A20632023464638373837222C0A222E61206320234646
+      39323932222C0A222E6220632023464637363736222C0A222E63206320234646
+      35333533222C0A222E6420632023463335313531222C0A222E65206320234644
+      34393439222C0A222E6620632023464636453645222C0A222E67206320234646
+      39313931222C0A222E6820632023464639333933222C0A222E69206320234646
+      38343834222C0A222E6A20632023464636373637222C0A222E6B206320234646
+      35313531222C0A222E6C20632023464233453345222C0A222E6D206320234546
+      36383638222C0A222E6E20632023463935373537222C0A222E6F206320234646
+      33383338222C0A222E7020632023464432353235222C0A222E71206320234646
+      32393239222C0A222E7220632023464333383338222C0A222E73206320234542
+      34323432222C0A222E7420632023464633323332222C0A222E75206320234539
+      31463146222C0A222E7620632023454435323532222C0A222E77206320234332
+      42334233222C0A222E7820632023434137373737222C0A222E79206320234541
+      30303030222C0A222E7A20632023454330303030222C0A222E41206320234538
+      30303030222C0A222E4220632023423435323532222C0A222E43206320234230
+      41444144222C0A222E4420632023453134443444222C0A222E45206320234544
+      31383138222C0A222E4620632023423131383138222C0A222E47206320234433
+      34423442222C0A222E4820632023453532363236222C0A222E49206320234642
+      32323232222C0A222E4A20632023453933463346222C0A222E4B206320234535
+      44434443222C0A222E4C20632023454546444644222C0A222E4D206320234335
+      37333733222C0A222E4E20632023443730333033222C0A222E4F206320234230
+      35313531222C0A222E5020632023443645334533222C0A222E51206320234645
+      46464646222C0A222E5220632023453536313631222C0A222E53206320234442
+      30383038222C0A222E5420632023434130463046222C0A222E55206320233739
+      31323132222C0A222E5620632023443831343134222C0A222E57206320234541
+      31373137222C0A222E5820632023463130423042222C0A222E59206320234442
+      34333433222C0A222E5A20632023454145344534222C0A222E30206320234635
+      46444644222C0A222E3120632023443442414241222C0A222E32206320234538
+      45414541222C0A222E3320632023464646454645222C0A222E34206320234535
+      36333633222C0A222E3520632023434630413041222C0A222E36206320234333
+      30413041222C0A222E3720632023374632313231222C0A222E38206320234339
+      30433043222C0A222E3920632023443830443044222C0A222E40206320234443
+      30423042222C0A222E2320632023443630303030222C0A222E3B206320234345
+      33443343222C0A222E3A20632023454445464545222C0A222E3D206320234646
+      46464646222C0A222E2B20632023464446464646222C0A222E25206320234442
+      35383538222C0A222E2420632023434130303030222C0A222E28206320234342
+      30333033222C0A222E2920632023433530363036222C0A222E5B206320234238
+      30363036222C0A222E5D20632023424230383038222C0A222C2E206320234338
+      30373037222C0A222C2C20632023443130353035222C0A222C2D206320234338
+      30303030222C0A222C2A20632023423635333533222C0A222C61206320234544
+      46324632222C0A222C6220632023464346464646222C0A222C63206320234339
+      37353735222C0A222C6420632023424530303030222C0A222C65206320234333
+      30313031222C0A222C6620632023423830333033222C0A222C67206320234143
+      30333033222C0A222C6820632023364631303130222C0A222C69206320234231
+      30373037222C0A222C6A20632023423930333033222C0A222C6B206320234332
+      30303030222C0A222C6C20632023413734433443222C0A222C6D206320234439
+      45364536222C0A222C6E20632023464646434643222C0A222C6F206320234536
+      39453945222C0A222C7020632023463445394538222C0A222C71206320234631
+      46464646222C0A222C7220632023423937353735222C0A222C73206320234231
+      30363036222C0A222C7420632023414230313031222C0A222C75206320234130
+      30323032222C0A222C7620632023354431343133222C0A222C77206320234143
+      32393239222C0A222C7820632023414230303030222C0A222C79206320234133
+      32383238222C0A222C7A20632023443244454445222C0A222C41206320234434
+      36343634222C0A222C4220632023423330303030222C0A222C43206320234330
+      34363436222C0A222C4420632023454345374537222C0A222C45206320234637
+      46464646222C0A222C4620632023423735453545222C0A222C47206320233941
+      30303030222C0A222C4820632023383730323032222C0A222C49206320234133
+      30313031222C0A222C4A20632023394530383038222C0A222C4B206320234434
+      39393939222C0A222C4C20632023443036383638222C0A222C4D206320234143
+      30303030222C0A222C4E20632023414530303030222C0A222C4F206320234139
+      30303030222C0A222C5020632023423834383438222C0A222C51206320234533
+      42374237222C0A222C5220632023413532373237222C0A222C53206320233843
+      30303030222C0A222C5420632023353230313031222C0A222C55206320233936
+      30303030222C0A222C5620632023393730303030222C0A222C57206320233942
+      30303030222C0A222C5820632023394630303030222C0A222C59206320234130
+      30303030222C0A222C5A20632023394430303030222C0A222C30206320233846
+      30303030222C0A222C3120632023383830303030222C0A222C32206320233632
+      30303030222C0A222C3320632023383430303030222C0A222C34206320233845
+      30303030222C0A222C3520632023383130303030222C0A222C36206320233534
+      30313031222C0A222C3720632023364332433243222C0A222C38206320233633
+      30353035222C0A222C3920632023363530303030222C0A222C40206320233630
+      30303030222C0A222C2320632023344630303030222C0A222E2E2E2E2E2E2E2E
+      2E2E2E2C2E2C2E2C2E2C2E2C2E2E2E2E2E2E2E2E2E2E2E2E222C0A222E2E2E2E
+      2E2E2E2C2E2C2E2D2E2A2E612E622E632E642E2C2E2E2E2E2E2E2E2E222C0A22
+      2E2E2E2E2E2C2E652E662E672E682E692E622E6A2E6B2E2C2E2C2E2E2E2E2E2E
+      222C0A222E2E2E2C2E6C2E632E6D2E6E2E6F2E702E712E722E732E742E752E2C
+      2E2E2E2E222C0A222E2E2E2C2E742E762E772E782E792E7A2E412E422E432E44
+      2E452E462E2E2E2E222C0A222E472E482E492E4A2E4B2E4C2E4D2E4E2E4F2E50
+      2E512E522E532E542E552E2E222C0A222E472E562E572E582E592E5A2E302E31
+      2E322E332E342E4E2E352E362E372E2E222C0A222E472E382E392E402E232E3B
+      2E3A2E3D2E2B2E252E242E282E292E5B2E552E2E222C0A222E472E5D2C2E2C2C
+      2C2D2C2A2C612E3D2C622C632C642C652C662C672C682E2E222C0A222E472C69
+      2C6A2C6B2C6C2C6D2C6E2C6F2C702C712C722C732C742C752C762E2E222C0A22
+      2E2E2C772C782C792C7A2E332C412C422C432C442C452C462C472C482E2E2E2E
+      222C0A222E2E2C772C492C4A2C4B2C4C2C4D2C4E2C4F2C502C512C522C532C54
+      2E2E2E2E222C0A222E2E2E2E2C772C552C562C572C582C592C5A2C562C302C31
+      2C322E2E2E2E2E2E222C0A222E2E2E2E2E2E2C772C332C342C342C302C532C31
+      2C352C362E2E2E2E2E2E2E2E222C0A222E2E2E2E2E2E2E2E2E2E2C372C382C39
+      2C402C232E2E2E2E2E2E2E2E2E2E2E2E222C0A222E2E2E2E2E2E2E2E2E2E2E2E
+      2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E227D0AF50300002F2A205850
+      4D202A2F0A7374617469632063686172202A677261706869635B5D203D207B0A
+      2231362031362034332031222C0A222E2063204E6F6E65222C0A222C20632023
+      454531443030222C0A222D20632023464632443039222C0A222A206320234646
+      33353046222C0A226120632023464632383035222C0A22622063202346463234
+      3032222C0A226320632023443931423030222C0A226420632023443531413030
+      222C0A226520632023434131383030222C0A226620632023423531363030222C
+      0A226720632023464637373538222C0A226820632023464639383746222C0A22
+      6920632023464639433833222C0A226A20632023464639303736222C0A226B20
+      632023464638323636222C0A226C20632023464636453445222C0A226D206320
+      23464634433238222C0A226E20632023463931463030222C0A226F2063202345
+      3231433030222C0A227020632023413031333030222C0A227120632023464638
+      433732222C0A227220632023464637363536222C0A2273206320234646363334
+      31222C0A227420632023464635393335222C0A22752063202346463342313622
+      2C0A227620632023463031453030222C0A227720632023464633463139222C0A
+      227820632023383731313030222C0A227920632023464635313244222C0A227A
+      20632023464646464646222C0A224120632023423931373030222C0A22422063
+      2023374130463030222C0A224320632023464637393541222C0A224420632023
+      464634363231222C0A224520632023364330443030222C0A2246206320234336
+      31383030222C0A224720632023353130413030222C0A22482063202334463041
+      3030222C0A224920632023414131353030222C0A224A20632023464646374634
+      222C0A224B20632023393731333030222C0A224C20632023343030383030222C
+      0A224D20632023354430433030222C0A222E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+      2E222C0A222E2E2C2D2A2D61622C63646564662E2E222C0A222E656768696A6B
+      6C6D2A626E6E6F702E222C0A222E6568717273746D75626E2C7663702E222C0A
+      222E656A7377752D616262762C6F65782E222C0A222E656B79752A627A7A2C6F
+      6F6341422E222C0A222E6543442D62767A7A6F63656566452E222C0A222E656C
+      77627A7A7A7A7A7A464670472E222C0A222E65742A627A7A7A7A7A7A41667048
+      2E222C0A222E657561766F637A7A4166494970482E222C0A222E6562766F6446
+      7A4A664970414B482E222C0A222E46766F64464666664970494970482E222C0A
+      222E416F6465466666494966496670482E222C0A222E4B41664970704B4B704B
+      4B70424C2E222C0A222E2E45454D47484848484848484C2E2E222C0A222E2E2E
+      2E2E2E2E2E2E2E2E2E2E2E2E2E227D0AD60400002F2A2058504D202A2F0A7374
+      617469632063686172202A677261706869635B5D203D207B0A22313620313620
+      35382031222C0A222E2063204E6F6E65222C0A222C2063202345453144303022
+      2C0A222D20632023464632443039222C0A222A20632023464633353046222C0A
+      226120632023464632383035222C0A226220632023464632343032222C0A2263
+      20632023443931423030222C0A226420632023443131413030222C0A22652063
+      2023434331393030222C0A226620632023423931373030222C0A226720632023
+      464637373538222C0A226820632023464639383746222C0A2269206320234646
+      39433833222C0A226A20632023464639303736222C0A226B2063202346383831
+      3636222C0A226C20632023464636443444222C0A226D20632023464634443239
+      222C0A226E20632023464631463030222C0A226F20632023413031333030222C
+      0A227020632023464638433732222C0A227120632023464637363536222C0A22
+      7220632023464636333431222C0A227320632023464635393335222C0A227420
+      632023464634393234222C0A227520632023464633463139222C0A2276206320
+      23463031453030222C0A227720632023464633423136222C0A22782063202346
+      4634313143222C0A227920632023464145454541222C0A227A20632023464243
+      434331222C0A224120632023453231433030222C0A2242206320233837313130
+      30222C0A224320632023464635313244222C0A22442063202346464646464622
+      2C0A224520632023374130463030222C0A224620632023464637393541222C0A
+      224720632023464634363231222C0A224820632023463436353435222C0A2249
+      20632023443533423143222C0A224A20632023423531363030222C0A224B2063
+      2023364330443030222C0A224C20632023433631383030222C0A224D20632023
+      414131353030222C0A224E20632023353130413030222C0A224F206320234633
+      38463736222C0A225020632023454239433838222C0A22512063202334463041
+      3030222C0A225220632023444535343336222C0A225320632023454542424144
+      222C0A225420632023393731333030222C0A225520632023463641433941222C
+      0A225620632023443732343036222C0A225720632023454241413941222C0A22
+      5820632023453039393838222C0A225920632023443335333336222C0A225A20
+      632023414631463036222C0A223020632023343030383030222C0A2231206320
+      23354430433030222C0A222E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E222C0A222E
+      2E2C2D2A2D61622C63646565662E2E222C0A222E656768696A6B6C6D2A6E6E6E
+      636F2E222C0A222E656870717273747562627676636F2E222C0A222E656A7275
+      772D616278797A4165422E222C0A222E656B43772A626E617944796366452E22
+      2C0A222E6546472D6D6B487A447949654A4B2E222C0A222E656C756C44444444
+      79494C664D4E2E222C0A222E65732A44444F7944504C4A4A6F512E222C0A222E
+      657761444F645244534A4D4A54512E222C0A222E6562765556655744584D4D4D
+      6F512E222C0A222E4C7641644C5979585A6F4D4D6F512E222C0A222E66416465
+      4C4A4A4D4D4A4D4A6F512E222C0A222E54664A4D6F6F54546F54546F45302E22
+      2C0A222E2E4B4B314E51515151515151302E2E222C0A222E2E2E2E2E2E2E2E2E
+      2E2E2E2E2E2E2E227D0AF50300002F2A2058504D202A2F0A7374617469632063
+      686172202A677261706869635B5D203D207B0A2231362031362034332031222C
+      0A222E2063204E6F6E65222C0A222C20632023454531443030222C0A222D2063
+      2023464632443039222C0A222A20632023464633353046222C0A226120632023
+      464632383035222C0A226220632023464632343032222C0A2263206320234445
+      31433030222C0A226420632023443531413030222C0A22652063202343413138
+      3030222C0A226620632023423531363030222C0A226720632023464637373538
+      222C0A226820632023464639383746222C0A226920632023464639433833222C
+      0A226A20632023464639303736222C0A226B20632023464638323636222C0A22
+      6C20632023464636453445222C0A226D20632023464634433238222C0A226E20
+      632023464631463030222C0A226F20632023453231433030222C0A2270206320
+      23413031333030222C0A227120632023464638433732222C0A22722063202346
+      4637363536222C0A227320632023464636333431222C0A227420632023464635
+      393335222C0A227520632023464633423136222C0A2276206320233937313330
+      30222C0A227720632023464633463139222C0A22782063202343363138303022
+      2C0A227920632023383731313030222C0A227A20632023464635313244222C0A
+      224120632023463031453030222C0A224220632023423931373030222C0A2243
+      20632023374130463030222C0A224420632023464637393541222C0A22452063
+      2023464634363231222C0A224620632023364330443030222C0A224720632023
+      464646464646222C0A224820632023394431333030222C0A2249206320233544
+      30433030222C0A224A20632023344630413030222C0A224B2063202341413135
+      3030222C0A224C20632023343030383030222C0A224D20632023353130413030
+      222C0A222E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E222C0A222E2E2C2D2A2D6162
+      2C63646564662E2E222C0A222E656768696A6B6C6D2A626E2C6F702E222C0A22
+      2E6568717273746D75626E2C2C63762E222C0A222E656A7377752D6162622C2C
+      6F78792E222C0A222E656B7A752A626E41412C636342432E222C0A222E654445
+      2D62412C2C6F64656566462E222C0A222E656C7762474747474747787848492E
+      222C0A222E65742A624747474747474266704A2E222C0A222E657561416F6465
+      6542664B4B704A2E222C0A222E6562416F64657866664B7042764A2E222C0A22
+      2E78416F64787866664B704B4B704A2E222C0A222E426F64657866664B4B664B
+      66704A2E222C0A222E7642664B7070767670767670434C2E222C0A222E2E4646
+      494D4A4A4A4A4A4A4A4C2E2E222C0A222E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+      227D0A
+    }
+  end
+end
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAReconcileDialog.lrs b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAReconcileDialog.lrs
new file mode 100644
index 0000000..be5b536
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAReconcileDialog.lrs	
@@ -0,0 +1,258 @@
+{ This is an automatically generated lazarus resource file }
+
+LazarusResources.Add('TReconcileDialogForm','FORMDATA',[
+  'TPF0'#20'TReconcileDialogForm'#19'ReconcileDialogForm'#4'Left'#3'G'#1#6'Heig'
+  +'ht'#3'e'#1#3'Top'#3#206#0#5'Width'#3#3#2#18'HorzScrollBar.Page'#3#2#2#18'Ve'
+  +'rtScrollBar.Page'#3'd'#1#13'ActiveControl'#7#8'TreeView'#11'BorderStyle'#7#8
+  +'bsDialog'#7'Caption'#6'4One or more updates failed to apply on the server..'
+  +'.'#12'ClientHeight'#3'e'#1#11'ClientWidth'#3#3#2#11'Font.Height'#2#245#9'Fo'
+  +'nt.Name'#6#6'Tahoma'#8'OnCreate'#7#10'FormCreate'#9'OnDestroy'#7#11'FormDes'
+  +'troy'#8'Position'#7#17'poOwnerFormCenter'#10'LCLVersion'#6#6'0.9.25'#0#6'TL'
+  +'abel'#13'lMessageError'#4'Left'#3#164#0#6'Height'#3#133#0#3'Top'#2#6#5'Widt'
+  +'h'#3'Y'#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#8'AutoSize'#8#11'Pa'
+  +'rentColor'#8#8'WordWrap'#9#0#0#6'TLabel'#6'Label1'#4'Left'#3#8#1#6'Height'#2
+  +'p'#3'Top'#3#154#0#5'Width'#3#235#0#7'Caption'#6#143'Skip over this change a'
+  +'nd ignore the error. You can try and correct the problem by modifying data,'
+  +' or reapply the change again at a later time.'#11'ParentColor'#8#8'WordWrap'
+  +#9#0#0#6'TLabel'#6'Label2'#4'Left'#3#8#1#6'Height'#2'B'#3'Top'#3#210#0#5'Wid'
+  +'th'#3#195#0#7'Caption'#6'LCancel the changes you made  and restore the reco'
+  +'rd to it''s original values.'#11'ParentColor'#8#8'WordWrap'#9#0#0#6'TLabel'
+  +#6'Label3'#4'Left'#3#8#1#6'Height'#2'Y'#3'Top'#3#10#1#5'Width'#3#226#0#7'Cap'
+  +'tion'#6'wShow a dialog with details of the changes made to the record since'
+  +' it was last retrieved from or applied to the server.'#11'ParentColor'#8#8
+  +'WordWrap'#9#0#0#7'TButton'#10'SkipButton'#4'Left'#3#161#0#6'Height'#2#25#3
+  +'Top'#3#154#0#5'Width'#2'`'#25'BorderSpacing.InnerBorder'#2#4#7'Caption'#6#12
+  +'&Skip Change'#7'OnClick'#7#15'SkipButtonClick'#8'TabOrder'#2#3#0#0#7'TButto'
+  +'n'#12'CancelButton'#4'Left'#3#161#0#6'Height'#2#25#3'Top'#3#210#0#5'Width'#2
+  +'`'#25'BorderSpacing.InnerBorder'#2#4#7'Caption'#6#14'&Cancel Change'#7'OnCl'
+  +'ick'#7#17'CancelButtonClick'#8'TabOrder'#2#4#0#0#7'TButton'#13'SkipAllButto'
+  +'n'#6'Height'#2#25#3'Top'#3'L'#1#5'Width'#2'K'#7'Anchors'#11#6'akLeft'#8'akB'
+  +'ottom'#0#25'BorderSpacing.InnerBorder'#2#4#7'Caption'#6#9'Skip &All'#7'OnCl'
+  +'ick'#7#18'SkipAllButtonClick'#8'TabOrder'#2#1#0#0#7'TButton'#15'CancelAllBu'
+  +'tton'#4'Left'#2'P'#6'Height'#2#25#3'Top'#3'L'#1#5'Width'#2'K'#7'Anchors'#11
+  +#6'akLeft'#8'akBottom'#0#25'BorderSpacing.InnerBorder'#2#4#7'Caption'#6#11'C'
+  +'ancel A&ll'#7'OnClick'#7#20'CancelAllButtonClick'#8'TabOrder'#2#2#0#0#7'TBu'
+  +'tton'#16'ShowDetailButton'#4'Left'#3#161#0#6'Height'#2#25#3'Top'#3#10#1#5'W'
+  +'idth'#2'`'#25'BorderSpacing.InnerBorder'#2#4#7'Caption'#6#13'Show &Details'
+  +#7'OnClick'#7#21'ShowDetailButtonClick'#8'TabOrder'#2#5#0#0#9'TTreeView'#8'T'
+  +'reeView'#6'Height'#3'G'#1#5'Width'#3#155#0#7'Anchors'#11#5'akTop'#6'akLeft'
+  +#8'akBottom'#0#17'DefaultItemHeight'#2#19#13'HideSelection'#8#6'Indent'#2#20
+  +#16'RightClickSelect'#9#9'RowSelect'#9#11'ShowButtons'#8#9'ShowLines'#8#8'Sh'
+  +'owRoot'#8#11'StateImages'#7#9'ImageList'#8'TabOrder'#2#0#7'OnClick'#7#12'Li'
+  +'stBoxClick'#7'Options'#11#17'tvoAutoItemHeight'#21'tvoKeepCollapsedNodes'#19
+  +'tvoRightClickSelect'#12'tvoRowSelect'#11'tvoToolTips'#0#0#0#7'TButton'#10'b'
+  +'tn_Cancel'#4'Left'#3#184#1#6'Height'#2#25#3'Top'#3'L'#1#5'Width'#2'K'#7'Anc'
+  +'hors'#11#7'akRight'#8'akBottom'#0#25'BorderSpacing.InnerBorder'#2#4#6'Cance'
+  +'l'#9#7'Caption'#6#6'Cancel'#11'ModalResult'#2#2#8'TabOrder'#2#6#0#0#10'TIma'
+  +'geList'#9'ImageList'#4'left'#2';'#3'top'#2'|'#6'Bitmap'#10#14#20#0#0'Li'#5#0
+  +#0#0#16#0#0#0#16#0#0#0#239#255#255#0#255#255#255#0#255#255#255#0#255#255#255
+  +#0#255#0#0#0#0#184#0#255#0#182#0#255#0#174#0#255#0#173#0#255#0#166#1#255#0#0
+  +#0#0#0#0#255#0#255#0#0#0#0#0#0#0#0#0#0#0#0#0#255#0#255#0#0#0#0#0#0#0#0#0#0#0
+  +#0#184#0#255'G'#203'I'#255#132#218#145#255#140#220#166#255'j'#211#145#255'N'
+  +#203''#255'-'#191'a'#255#23#177'6'#255#4#156#10#255#255#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#255#0#255#0#0#0#0#0#0#0#15#188#16#255'w'#215#128#255#152#224#173#255
+  +'v'#215#152#255'Z'#206#134#255':'#197's'#255'.'#194'k'#255'.'#194'k'#255'.'
+  +#194'k'#255'('#189'^'#255#9#152#23#255#0#0#0#0#0#0#0#0#0#0#255#0#255#0#0#0#0
+  +#183#0#255'u'#214#131#255#130#218#160#255'f'#210#142#255'D'#200'y'#255':'#197
+  +'s'#255'.'#194'k'#255'.'#194'k'#255'.'#194'k'#255'('#189'^'#255'+'#191'd'#255
+  +'+'#191'd'#255#3#135#10#255#0#0#0#0#0#0#255#0#255#0#0#0'1'#190'<'#255'r'#213
+  +#149#255'R'#204#130#255'5'#196'p'#255':'#197's'#255'.'#194'k'#255'.'#194'k'
+  +#255'.'#194'k'#255'.'#194'k'#255#255#255#255#255'+'#191'd'#255'-'#194'j'#255
+  +#26#167'>'#255#0#0#0#0#0#0#255#0#0#173#0#255'D'#198'e'#255'?'#199'v'#255'.'
+  +#194'k'#255':'#197's'#255'.'#194'k'#255'.'#194'k'#255'.'#194'k'#255'.'#194'k'
+  +#255#255#255#255#255#255#255#255#255'+'#191'd'#255'%'#191'Z'#255'#'#190'W'
+  +#255#4'~'#13#255#0#0#255#0#0#164#1#255'3'#195'n'#255'.'#194'k'#255'.'#194'k'
+  +#255#255#255#255#255'.'#194'k'#255'.'#194'k'#255'.'#194'k'#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255'+'#191'd'#255'!'#189'Q'#255#28#186'E'
+  +#255#7''#19#255#0#0#255#0#0#160#1#255'.'#194'k'#255'.'#194'k'#255'.'#194'k'
+  ,#255#255#255#255#255#255#255#255#255'.'#194'k'#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#26#186'C'#255#26#186'C'#255#27#186'D'#255#23#184':'
+  +#255#10#141#27#255#0#0#255#0#0#151#1#255'.'#194'k'#255'.'#194'k'#255'.'#194
+  +'k'#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#26#186'C'#255#26#186'C'#255#14#180'&'#255#20#183'4'#255#17#182
+  +'/'#255#5'w'#16#255#0#0#255#0#0#145#2#255'('#187'^'#255'.'#194'k'#255'.'#194
+  +'k'#255'.'#194'k'#255#255#255#255#255#255#255#255#255#255#255#255#255#26#186
+  +'C'#255#26#186'C'#255#21#184'8'#255#18#182'0'#255#15#181'*'#255#10#178#29#255
+  +#2'g'#8#255#0#0#255#0#255#0#0#0#23#164'7'#255'.'#194'k'#255','#193'f'#255'%'
+  +#191'Z'#255'!'#189'Q'#255#255#255#255#255#26#186'C'#255#18#182'0'#255#19#182
+  +'1'#255#17#182'.'#255#11#179'!'#255#9#178#28#255#5#151#18#255#0#0#0#0#0#0#255
+  +#0#255#0#0#0#4#134#11#255'#'#183'S'#255'$'#190'X'#255'!'#189'Q'#255#28#186'E'
+  +#255#26#186'C'#255#18#182'0'#255#14#180'&'#255#14#180'&'#255#10#178#29#255#7
+  +#177#24#255#2#174#13#255#0'_'#4#255#0#0#0#0#0#0#255#0#255#0#0#0#0#0#0#0#7#132
+  +#20#255#28#182'E'#255#27#186'D'#255#23#184':'#255#18#182'0'#255#14#180'&'#255
+  +#26#183'-'#255#8#178#27#255#4#175#17#255#0#173#9#255#0'g'#5#255#0#0#0#0#0#0#0
+  +#0#0#0#255#0#255#0#0#0#0#0#0#0#0#0#0#0#2'q'#8#255#12#152'"'#255#17#182'/'#255
+  +#13#180'%'#255#9#178#28#255#6#176#22#255#1#174#11#255#0#145#7#255#0'['#4#255
+  +#255#0#0#0#0#0#0#0#0#0#0#0#0#0#255#0#255#0#0#0#0#0#0#0#0#0#0#0#0#0#255#0#255
+  +#0#0#0#1'_'#5#255#2'i'#9#255#2'd'#7#255#0'^'#4#255#0'M'#3#255#0#0#0#0#0#0#255
+  +#0#255#0#0#0#0#0#0#0#0#0#0#0#0#0#255#0#255#0#0#0#0#0#0#0#0#0#0#0#0#0#255#0
+  +#255#0#0#0#0#0#0#0#0#0#0#0#0#0#255#0#255#0#0#0#0#0#0#0#0#0#0#0#0#0#255#0#255
+  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#239#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#255#0#0#0'11'#251#255'11'#251#255'11'#251
+  +#255'11'#251#255'11'#251#255#0#0#0#0#0#0#255#0#255#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#255#0#255#0#0#0#0#0#0#0#0#0#0#0'11'#251#255'11'#251#255'ii'#254#255#135#135
+  +#255#255#146#146#255#255'vv'#255#255'SS'#255#255'QQ'#243#255'11'#251#255#255
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#255#0#255#0#0#0#0#0#0#0'11'#251#255'II'#253#255'n'
+  +'n'#255#255#145#145#255#255#147#147#255#255#132#132#255#255'vv'#255#255'gg'
+  +#255#255'QQ'#255#255'11'#251#255'11'#251#255#0#0#0#0#0#0#0#0#0#0#255#0#255#0
+  +#0#0'11'#251#255'>>'#251#255'SS'#255#255'hh'#239#255'WW'#249#255'88'#255#255
+  +'%%'#253#255'))'#255#255'88'#252#255'BB'#235#255'22'#255#255#31#31#233#255'1'
+  +'1'#251#255#0#0#0#0#0#0#255#0#255#0#0#0'11'#251#255'22'#255#255'RR'#237#255
+  +#179#179#194#255'ww'#202#255#0#0#234#255#0#0#236#255#0#0#232#255'RR'#180#255
+  +#173#173#176#255'MM'#225#255#24#24#237#255#24#24#177#255#0#0#0#0#0#0#255#0'K'
+  +'K'#211#255'&&'#229#255'""'#251#255'??'#233#255#220#220#229#255#253#253#238
+  +#255'ss'#197#255#3#3#215#255'QQ'#176#255#227#227#214#255#255#255#254#255'aa'
+  +#229#255#8#8#219#255#15#15#202#255#18#18'y'#255#0#0#255#0'KK'#211#255#20#20
+  +#216#255#23#23#234#255#11#11#241#255'CC'#219#255#228#228#234#255#253#253#245
+  +#255#186#186#212#255#234#234#232#255#254#254#255#255'cc'#229#255#3#3#215#255
+  +#10#10#207#255#10#10#195#255'!!'#255#0#0#255#0'KK'#211#255#12#12#201#255#13
+  +#13#216#255#11#11#220#255#0#0#214#255'<='#206#255#238#239#237#255#255#255#255
+  +#255#255#255#253#255'XX'#219#255#0#0#202#255#3#3#203#255#6#6#197#255#6#6#184
+  +#255#18#18'y'#255#0#0#255#0'KK'#211#255#8#8#187#255#7#7#200#255#5#5#209#255#0
+  +#0#200#255'SS'#182#255#242#242#237#255#255#255#255#255#255#255#252#255'uu'
+  +#201#255#0#0#190#255#1#1#195#255#3#3#184#255#3#3#172#255#16#16'o'#255#0#0#255
+  +#0'KK'#211#255#7#7#177#255#3#3#185#255#0#0#194#255'LL'#167#255#230#230#217
+  +#255#252#252#255#255#158#158#230#255#232#233#244#255#255#255#241#255'uu'#185
+  +#255#6#6#177#255#1#1#171#255#2#2#160#255#19#20']'#255#0#0#255#0#255#0#0#0'))'
+  +#172#255#0#0#171#255'(('#163#255#222#222#210#255#254#254#255#255'dd'#212#255
+  +#0#0#179#255'FF'#192#255#231#231#236#255#255#255#247#255'^^'#183#255#0#0#154
+  +#255#2#2#135#255#0#0#0#0#0#0#255#0#255#0#0#0'))'#172#255#1#1#163#255#8#8#158
+  +#255#153#153#212#255'hh'#208#255#0#0#172#255#0#0#174#255#0#0#169#255'HH'#184
+  +#255#183#183#227#255''''''#165#255#0#0#140#255#1#1'R'#255#0#0#0#0#0#0#255#0
+  +#255#0#0#0#0#0#0#0'))'#172#255#0#0#150#255#0#0#151#255#0#0#155#255#0#0#159
+  +#255#0#0#160#255#0#0#157#255#0#0#151#255#0#0#143#255#0#0#136#255#0#0'b'#255#0
+  +#0#0#0#0#0#0#0#0#0#255#0#255#0#0#0#0#0#0#0#0#0#0#0'))'#172#255#0#0#132#255#0
+  +#0#142#255#0#0#142#255#0#0#143#255#0#0#140#255#0#0#136#255#0#0#129#255#1#1'T'
+  +#255#255#0#0#0#0#0#0#0#0#0#0#0#0#0#255#0#255#0#0#0#0#0#0#0#0#0#0#0#0#0#255#0
+  +#255#0#0#0',,l'#255#5#5'c'#255#0#0'e'#255#0#0'`'#255#0#0'O'#255#0#0#0#0#0#0
+  +#255#0#255#0#0#0#0#0#0#0#0#0#0#0#0#0#255#0#255#0#0#0#0#0#0#0#0#0#0#0#0#0#255
+  +#0#255#0#0#0#0#0#0#0#0#0#0#0#0#0#255#0#255#0#0#0#0#0#0#0#0#0#0#0#0#0#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#239#255#255#0#255
+  +#255#255#0#255#255#255#0#255#255#255#0#255#0#0#0'11'#251#0'11'#251#0'11'#251
+  ,#0'11'#251#0'11'#251#0#0#0#0#0#0#0#255#0#255#0#0#0#0#0#0#0#0#0#0#0#0#0#255#0
+  +#255#0#0#0#0#0#0#0#0#29#238#255#9'-'#255#255#15'5'#255#255#9'-'#255#255#5'('
+  +#255#255#2'$'#255#255#0#29#238#255#0#27#217#255#0#26#213#255#0#24#202#255#0
+  +#26#213#255#0#22#181#255#0#0#0#0#0#0#255#0#255#0#0#0#0#24#202#255'Xw'#255#255
+  +''#152#255#255#131#156#255#255'v'#144#255#255'f'#130#255#255'Nn'#255#255'(L'
+  +#255#255#15'5'#255#255#2'$'#255#255#0#31#249#255#0#31#249#255#0#28#226#255#0
+  +#19#160#255#0#0#255#0#255#0#0#0#0#24#202#255''#152#255#255'r'#140#255#255'V'
+  +'v'#255#255'Ac'#255#255'5Y'#255#255'(L'#255#255#22';'#255#255#2'$'#255#255#0
+  +#31#249#255#0#29#238#255#0#30#240#255#0#27#217#255#0#19#160#255#0#0#255#0#255
+  +#0#0#0#0#24#202#255'v'#144#255#255'Ac'#255#255#25'?'#255#255#22';'#255#255#9
+  +'-'#255#255#5'('#255#255#2'$'#255#255#2'$'#255#255#0#30#240#255#0#29#238#255
+  +#0#28#226#255#0#24#202#255#0#17#135#255#0#0#255#0'KK'#211#0#0#24#202#255'f'
+  +#130#255#255'-Q'#255#255#22';'#255#255#15'5'#255#255#2'$'#255#255#255#255#255
+  +#255#255#255#255#255#0#29#238#255#0#28#226#255#0#28#226#255#0#27#217#255#0#23
+  +#185#255#0#15'z'#255#0#0#255#0'KK'#211#0#0#24#202#255'Zy'#255#255'!F'#255#255
+  +#9'-'#255#255#2'$'#255#255#0#30#240#255#255#255#255#255#255#255#255#255#0#28
+  +#226#255#0#27#217#255#0#24#202#255#0#24#202#255#0#22#181#255#0#13'l'#255#0#0
+  +#255#0'KK'#211#0#0#24#202#255'Nn'#255#255#25'?'#255#255#2'$'#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#0#24#198#255#0#24#198#255#0#19#160#255#0#10'Q'#255#0#0#255#0'KK'
+  +#211#0#0#24#202#255'5Y'#255#255#15'5'#255#255#2'$'#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#0#23#185#255#0#22#181#255#0#19#160#255#0#10'O'#255#0#0#255#0'KK'#211#0#0
+  +#24#202#255#22';'#255#255#5'('#255#255#0#30#240#255#0#28#226#255#0#27#217#255
+  +#255#255#255#255#255#255#255#255#0#23#185#255#0#22#181#255#0#21#170#255#0#21
+  +#170#255#0#19#160#255#0#10'O'#255#0#0#255#0#255#0#0#0#0#24#202#255#2'$'#255
+  +#255#0#30#240#255#0#28#226#255#0#26#213#255#0#24#198#255#255#255#255#255#244
+  +#247#255#255#0#22#181#255#0#21#170#255#0#19#160#255#0#23#185#255#0#19#151#255
+  +#0#10'O'#255#0#0#255#0#255#0#0#0#0#24#198#255#0#30#240#255#0#28#226#255#0#26
+  +#213#255#0#24#198#255#0#24#198#255#0#22#181#255#0#22#181#255#0#21#170#255#0
+  +#19#160#255#0#21#170#255#0#21#170#255#0#19#160#255#0#10'O'#255#0#0#255#0#255
+  +#0#0#0#0#23#185#255#0#28#226#255#0#26#213#255#0#24#202#255#0#24#198#255#0#22
+  +#181#255#0#22#181#255#0#21#170#255#0#21#170#255#0#22#181#255#0#21#170#255#0
+  +#22#181#255#0#19#160#255#0#10'O'#255#0#0#255#0#255#0#0#0#0#19#151#255#0#23
+  +#185#255#0#22#181#255#0#21#170#255#0#19#160#255#0#19#160#255#0#19#151#255#0
+  +#19#151#255#0#19#160#255#0#19#151#255#0#19#151#255#0#19#160#255#0#15'z'#255#0
+  +#8'@'#255#0#0#255#0#255#0#0#0#0#0#0#0#0#13'l'#255#0#13'l'#255#0#12']'#255#0
+  +#10'Q'#255#0#10'O'#255#0#10'O'#255#0#10'O'#255#0#10'O'#255#0#10'O'#255#0#10
+  +'O'#255#0#10'O'#255#0#8'@'#255#0#0#0#0#0#0#255#0#255#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#255#0#255#0#0#0#0#0#0#0#0#0#0#0#0#0#255#0#255#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#239#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#0#0#0'11'#251#0'11'#251#0'11'
+  +#251#0'11'#251#0'11'#251#0#0#0#0#0#0#0#255#0#255#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#255#0#255#0#0#0#0#0#0#0#0#29#238#255#9'-'#255#255#15'5'#255#255#9'-'#255#255
+  +#5'('#255#255#2'$'#255#255#0#29#238#255#0#27#217#255#0#26#209#255#0#25#204
+  +#255#0#25#204#255#0#23#185#255#0#0#0#0#0#0#255#0#255#0#0#0#0#25#204#255'Xw'
+  +#255#255''#152#255#255#131#156#255#255'v'#144#255#255'f'#129#248#255'Mm'#255
+  +#255')M'#255#255#15'5'#255#255#0#31#255#255#0#31#255#255#0#31#255#255#0#27
+  +#217#255#0#19#160#255#0#0#255#0#255#0#0#0#0#25#204#255''#152#255#255'r'#140
+  +#255#255'Vv'#255#255'Ac'#255#255'5Y'#255#255'$I'#255#255#25'?'#255#255#2'$'
+  +#255#255#2'$'#255#255#0#30#240#255#0#30#240#255#0#27#217#255#0#19#160#255#0#0
+  +#255#0#255#0#0#0#0#25#204#255'v'#144#255#255'Ac'#255#255#25'?'#255#255#22';'
+  +#255#255#9'-'#255#255#5'('#255#255#2'$'#255#255#28'A'#255#255#234#238#250#255
+  +#193#204#251#255#0#28#226#255#0#25#204#255#0#17#135#255#0#0#255#0'KK'#211#0#0
+  +#25#204#255'f'#129#248#255'-Q'#255#255#22';'#255#255#15'5'#255#255#2'$'#255
+  +#255#0#31#255#255#5'('#255#255#234#238#250#255#255#255#255#255#234#238#250
+  +#255#0#27#217#255#0#23#185#255#0#15'z'#255#0#0#255#0'KK'#211#0#0#25#204#255
+  +'Zy'#255#255'!F'#255#255#9'-'#255#255')M'#255#255'f'#129#248#255'Ee'#244#255
+  +#193#204#251#255#255#255#255#255#234#238#250#255#28';'#213#255#0#25#204#255#0
+  +#22#181#255#0#13'l'#255#0#0#255#0'KK'#211#0#0#25#204#255'Mm'#255#255#25'?'
+  +#255#255'Mm'#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#234#238#250#255#28';'#213#255#0#24#198#255#0#23#185#255#0#21#170#255
+  +#0#10'Q'#255#0#0#255#0'KK'#211#0#0#25#204#255'5Y'#255#255#15'5'#255#255#255
+  +#255#255#255#255#255#255#255'v'#143#243#255#234#238#250#255#255#255#255#255
+  ,#136#156#235#255#0#24#198#255#0#22#181#255#0#22#181#255#0#19#160#255#0#10'O'
+  +#255#0#0#255#0'KK'#211#0#0#25#204#255#22';'#255#255#5'('#255#255#255#255#255
+  +#255'v'#143#243#255#0#26#209#255'6T'#222#255#255#255#255#255#173#187#238#255
+  +#0#22#181#255#0#21#170#255#0#22#181#255#0#19#151#255#0#10'O'#255#0#0#255#0
+  +#255#0#0#0#0#25#204#255#2'$'#255#255#0#30#240#255#154#172#246#255#6'$'#215
+  +#255#0#25#204#255#154#170#235#255#255#255#255#255#136#153#224#255#0#21#170
+  +#255#0#21#170#255#0#21#170#255#0#19#160#255#0#10'O'#255#0#0#255#0#255#0#0#0#0
+  +#24#198#255#0#30#240#255#0#28#226#255#0#26#209#255#0#24#198#255'6S'#211#255
+  +#234#238#250#255#136#153#224#255#6#31#175#255#0#19#160#255#0#21#170#255#0#21
+  +#170#255#0#19#160#255#0#10'O'#255#0#0#255#0#255#0#0#0#0#23#185#255#0#28#226
+  +#255#0#26#209#255#0#25#204#255#0#24#198#255#0#22#181#255#0#22#181#255#0#21
+  +#170#255#0#21#170#255#0#22#181#255#0#21#170#255#0#22#181#255#0#19#160#255#0
+  +#10'O'#255#0#0#255#0#255#0#0#0#0#19#151#255#0#23#185#255#0#22#181#255#0#21
+  +#170#255#0#19#160#255#0#19#160#255#0#19#151#255#0#19#151#255#0#19#160#255#0
+  +#19#151#255#0#19#151#255#0#19#160#255#0#15'z'#255#0#8'@'#255#0#0#255#0#255#0
+  +#0#0#0#0#0#0#0#13'l'#255#0#13'l'#255#0#12']'#255#0#10'Q'#255#0#10'O'#255#0#10
+  +'O'#255#0#10'O'#255#0#10'O'#255#0#10'O'#255#0#10'O'#255#0#10'O'#255#0#8'@'
+  +#255#0#0#0#0#0#0#255#0#255#0#0#0#0#0#0#0#0#0#0#0#0#0#255#0#255#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#255#0#255#0#0#0#0#0#0#0#0#0#0#0#0#0#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#239#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#0#0#0'11'#251#0'11'#251#0'11'#251#0'11'#251#0'11'#251#0#0
+  +#0#0#0#0#0#255#0#255#0#0#0#0#0#0#0#0#0#0#0#0#0#255#0#255#0#0#0#0#0#0#0#0#29
+  +#238#255#9'-'#255#255#15'5'#255#255#9'-'#255#255#5'('#255#255#2'$'#255#255#0
+  +#29#238#255#0#28#222#255#0#26#213#255#0#24#202#255#0#26#213#255#0#22#181#255
+  +#0#0#0#0#0#0#255#0#255#0#0#0#0#24#202#255'Xw'#255#255''#152#255#255#131#156
+  +#255#255'v'#144#255#255'f'#130#255#255'Nn'#255#255'(L'#255#255#15'5'#255#255
+  +#2'$'#255#255#0#31#255#255#0#29#238#255#0#28#226#255#0#19#160#255#0#0#255#0
+  +#255#0#0#0#0#24#202#255''#152#255#255'r'#140#255#255'Vv'#255#255'Ac'#255#255
+  +'5Y'#255#255'(L'#255#255#22';'#255#255#2'$'#255#255#0#31#255#255#0#29#238#255
+  +#0#29#238#255#0#28#222#255#0#19#151#255#0#0#255#0#255#0#0#0#0#24#202#255'v'
+  +#144#255#255'Ac'#255#255#25'?'#255#255#22';'#255#255#9'-'#255#255#5'('#255
+  +#255#2'$'#255#255#2'$'#255#255#0#29#238#255#0#29#238#255#0#28#226#255#0#24
+  +#198#255#0#17#135#255#0#0#255#0'KK'#211#0#0#24#202#255'f'#130#255#255'-Q'#255
+  +#255#22';'#255#255#15'5'#255#255#2'$'#255#255#0#31#255#255#0#30#240#255#0#30
+  +#240#255#0#29#238#255#0#28#222#255#0#28#222#255#0#23#185#255#0#15'z'#255#0#0
+  +#255#0'KK'#211#0#0#24#202#255'Zy'#255#255'!F'#255#255#9'-'#255#255#2'$'#255
+  +#255#0#30#240#255#0#29#238#255#0#29#238#255#0#28#226#255#0#26#213#255#0#24
+  +#202#255#0#24#202#255#0#22#181#255#0#13'l'#255#0#0#255#0'KK'#211#0#0#24#202
+  +#255'Nn'#255#255#25'?'#255#255#2'$'#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#0#24#198#255
+  +#0#24#198#255#0#19#157#255#0#12']'#255#0#0#255#0'KK'#211#0#0#24#202#255'5Y'
+  +#255#255#15'5'#255#255#2'$'#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#0#23#185#255#0#22
+  +#181#255#0#19#160#255#0#10'O'#255#0#0#255#0'KK'#211#0#0#24#202#255#22';'#255
+  +#255#5'('#255#255#0#30#240#255#0#28#226#255#0#26#213#255#0#24#202#255#0#24
+  +#202#255#0#23#185#255#0#22#181#255#0#21#170#255#0#21#170#255#0#19#160#255#0
+  +#10'O'#255#0#0#255#0#255#0#0#0#0#24#202#255#2'$'#255#255#0#30#240#255#0#28
+  +#226#255#0#26#213#255#0#24#202#255#0#24#198#255#0#22#181#255#0#22#181#255#0
+  +#21#170#255#0#19#160#255#0#23#185#255#0#19#151#255#0#10'O'#255#0#0#255#0#255
+  +#0#0#0#0#24#198#255#0#30#240#255#0#28#226#255#0#26#213#255#0#24#198#255#0#24
+  +#198#255#0#22#181#255#0#22#181#255#0#21#170#255#0#19#160#255#0#21#170#255#0
+  +#21#170#255#0#19#160#255#0#10'O'#255#0#0#255#0#255#0#0#0#0#23#185#255#0#28
+  +#226#255#0#26#213#255#0#24#202#255#0#24#198#255#0#22#181#255#0#22#181#255#0
+  +#21#170#255#0#21#170#255#0#22#181#255#0#21#170#255#0#22#181#255#0#19#160#255
+  +#0#10'O'#255#0#0#255#0#255#0#0#0#0#19#151#255#0#23#185#255#0#22#181#255#0#21
+  +#170#255#0#19#160#255#0#19#160#255#0#19#151#255#0#19#151#255#0#19#160#255#0
+  +#19#151#255#0#19#151#255#0#19#160#255#0#15'z'#255#0#8'@'#255#0#0#255#0#255#0
+  +#0#0#0#0#0#0#0#13'l'#255#0#13'l'#255#0#12']'#255#0#10'Q'#255#0#10'O'#255#0#10
+  +'O'#255#0#10'O'#255#0#10'O'#255#0#10'O'#255#0#10'O'#255#0#10'O'#255#0#8'@'
+  +#255#0#0#0#0#0#0#255#0#255#0#0#0#0#0#0#0#0#0#0#0#0#0#255#0#255#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#255#0#255#0#0#0#0#0#0#0#0#0#0#0#0#0#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#0#0#0
+]);
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAReconcileDialog.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAReconcileDialog.pas
new file mode 100644
index 0000000..4abb42e
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAReconcileDialog.pas	
@@ -0,0 +1,380 @@
+unit uDAReconcileDialog;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  {$IFDEF MSWINDOWS} Windows,{$ENDIF} SysUtils, Variants, Classes, Graphics, Controls, Forms,
+  Dialogs, StdCtrls, uDADelta, uDADatatable, ComCtrls,
+  {$IFDEF FPC} buttons,LResources,LCLType,{$ENDIF}
+  ImgList;
+
+type
+  TReconcileDialogForm = class(TForm)
+    SkipButton: TButton;
+    CancelButton: TButton;
+    SkipAllButton: TButton;
+    CancelAllButton: TButton;
+    ShowDetailButton: TButton;
+    TreeView: TTreeView;
+    ImageList: TImageList;
+    Label1: TLabel;
+    Label2: TLabel;
+    Label3: TLabel;
+    btn_Cancel: TButton;
+    memMessageError: TMemo;
+    procedure SkipButtonClick(Sender: TObject);
+    procedure CancelButtonClick(Sender: TObject);
+    procedure SkipAllButtonClick(Sender: TObject);
+    procedure CancelAllButtonClick(Sender: TObject);
+    procedure FormCreate(Sender: TObject);
+    procedure FormDestroy(Sender: TObject);
+    procedure ShowDetailButtonClick(Sender: TObject);
+    procedure ListBoxClick(Sender: TObject);
+  private
+    { Private declarations }
+    ChangeList: TList;
+    TableList: TList;
+    RDA: TDABaseRemoteDataAdapter;
+    procedure CancelChange(aNode: TTreeNode);
+    procedure SkipChange(aNode: TTreeNode);
+    procedure SkipAllChanges;
+    procedure CancelAllChanges;
+    procedure Setup;
+    function FindDatatable(ADelta: IDADelta): TDADatatable;
+    procedure DeleteNodeFromTreeView(aNode: TTreeNode);
+  end;
+
+var
+  ReconcileDialogForm: TReconcileDialogForm;
+
+procedure ReconcileDialog(RemoteDataAdapter: TDABaseRemoteDataAdapter; var AFailedDeltaList: TList; aTableList: TList);
+
+implementation
+
+uses
+  uDAReconcileDialogDetails, uDAInterfaces, uROBinaryHelpers;
+
+{$IFNDEF FPC}
+  {$R *.dfm}
+{$ENDIF}
+
+
+function GenerateNodeCaption(aChange: TDADeltaChange): String;
+
+  function _VarToStr(AValue: variant; ADataType: TDADataType): string;
+  begin
+    if ADataType = datDecimal then
+      Result := DecimalVariantToString(AValue)
+    else
+      Result := VarToStr(AValue)
+  end;
+
+var
+  j: integer;
+begin
+  Result := aChange.Delta.LogicalName + ':';
+  for j := 0 to aChange.Delta.KeyFieldCount - 1 do begin
+    if j > 0 then Result := Result + ';';
+    if aChange.ChangeType = ctDelete then
+      Result := Result + _VarToStr(aChange.OldValueByName[aChange.Delta.KeyFieldNames[j]], aChange.Delta.LoggedFieldTypes[j])
+    else
+      Result := Result + _VarToStr(aChange.NewValueByName[aChange.Delta.KeyFieldNames[j]], aChange.Delta.LoggedFieldTypes[j]);
+  end;
+end;
+
+
+procedure ReconcileDialog_ruoOnPost(RemoteDataAdapter: TDABaseRemoteDataAdapter; aChange: TDADeltaChange; aTable: TDADataTable);
+var
+  lAction: TDAReconcileDialogAction;
+  lHandled: Boolean;
+begin
+  lAction := rdlgRevert;
+  lHandled:=False;
+  if Assigned(RemoteDataAdapter) and Assigned(RemoteDataAdapter.OnShowReconcileRecordInAppUI) then
+     RemoteDataAdapter.OnShowReconcileRecordInAppUI(RemoteDataAdapter, aChange, aTable, lHandled,lAction);
+  if not lHandled then
+     ReconcileDialogShowDetails(aChange, aTable, GenerateNodeCaption(aChange), lAction);
+  case lAction of
+    rdlgSkip:   Raise Exception.Create('rdlgSkip can''t be used for tables in the ruoOnPost mode.');
+    rdlgCancel: Raise Exception.Create('rdlgCancel can''t be used for tables in the ruoOnPost mode.');
+    rdlgNone:   Raise Exception.Create('rdlgNone can''t be used for tables in the ruoOnPost mode.');
+    rdlgRepost: begin
+                  aChange.Status := csPending;
+                  aTable.ApplyUpdates();
+                end;
+    rdlgRevert: aTable.CancelUpdateChange(aChange);
+  end;
+end;
+
+procedure ReconcileDialog(RemoteDataAdapter: TDABaseRemoteDataAdapter; var AFailedDeltaList: TList; aTableList: TList);
+begin
+  if (AFailedDeltaList.Count = 1) and (aTableList.Count = 1) and
+     (AnsiSameText(TDADeltaChange(AFailedDeltaList[0]).Delta.LogicalName, TDADataTable(aTableList[0]).LogicalName)) and
+     (ruoOnPost in TDADataTable(aTableList[0]).RemoteUpdatesOptions) then begin
+    ReconcileDialog_ruoOnPost(RemoteDataAdapter,TDADeltaChange(AFailedDeltaList[0]), TDADataTable(aTableList[0]));
+    AFailedDeltaList.Clear;
+  end
+  else begin
+    with TReconcileDialogForm.Create(Application) do try
+      RDA:=RemoteDataAdapter;
+      ChangeList.Assign(AFailedDeltaList);
+      TableList.Assign(aTableList);
+      Setup;
+      ShowModal;
+      AFailedDeltaList.Assign(ChangeList);
+    finally
+      Release;
+    end;
+  end;
+end;
+
+procedure TReconcileDialogForm.SkipButtonClick(Sender: TObject);
+begin
+  SkipChange(TreeView.Selected);
+end;
+
+procedure TReconcileDialogForm.CancelButtonClick(Sender: TObject);
+begin
+  CancelChange(TreeView.Selected);
+end;
+
+procedure TReconcileDialogForm.SkipAllButtonClick(Sender: TObject);
+begin
+  SkipAllChanges;
+end;
+
+procedure TReconcileDialogForm.CancelAllButtonClick(Sender: TObject);
+begin
+  CancelAllChanges;
+end;
+
+procedure TReconcileDialogForm.CancelAllChanges;
+begin
+  if Application.MessageBox('Do you want cancel all changes?', 'Cancel All', MB_YESNO) = IDYES then begin
+    while TreeView.Items.Count > 0 do
+      CancelChange(TreeView.Items[0]);
+    ModalResult := mrOk;
+  end;
+end;
+
+procedure TReconcileDialogForm.SkipAllChanges;
+begin
+  if Application.MessageBox('Do you want skip all changes?', 'Skip All', MB_YESNO) = IDYES then
+    ModalResult := mrOk;
+end;
+
+procedure TReconcileDialogForm.FormCreate(Sender: TObject);
+begin
+  inherited;
+  ChangeList := TList.Create;
+  TableList := TList.Create;
+end;
+
+procedure TReconcileDialogForm.FormDestroy(Sender: TObject);
+begin
+  ChangeList.Free;
+  TableList.Free;
+  inherited;
+end;
+
+procedure TReconcileDialogForm.ShowDetailButtonClick(Sender: TObject);
+var
+  lChange: TDADeltaChange;
+  lHandled: Boolean;
+  lAction: TDAReconcileDialogAction;
+begin
+  lChange := TDADeltaChange(Treeview.Selected.Data);
+  Hide;
+  try
+    lAction:= rdlgNone;
+    lHandled:=False;
+    if Assigned(rda) and Assigned(rda.OnShowReconcileRecordInAppUI) then
+       rda.OnShowReconcileRecordInAppUI(RDA, lChange, FindDatatable(lChange.Delta),lHandled,lAction);
+    if not lHandled then
+       ReconcileDialogShowDetails(lChange, FindDatatable(lChange.Delta), Treeview.Selected.Text, lAction);
+  finally
+    Show;
+  end;
+  case lAction of
+    rdlgSkip: SkipButton.Click;
+    rdlgCancel: CancelButton.Click;
+    rdlgRepost: Raise Exception.Create('rdlgRepost can be used only for tables in the ruoOnPost mode.');
+    rdlgRevert: Raise Exception.Create('rdlgRevert can be used only for tables in the ruoOnPost mode.');
+  end;
+end;
+
+procedure TReconcileDialogForm.Setup;
+var
+  i: integer;
+  change: TDADeltaChange;
+  anode: TTreeNode;
+begin
+  TreeView.Items.Clear;
+  for i := 0 to ChangeList.Count - 1 do begin
+    change := TDADeltaChange(ChangeList[i]);
+    anode := TreeView.Items.AddChildObject(nil, GenerateNodeCaption(Change), Change);
+    case Change.ChangeType of
+      ctInsert: aNode.StateIndex := 2;
+      ctUpdate: aNode.StateIndex := 3;
+      ctDelete: aNode.StateIndex := 4;
+    end;
+  end;
+  if TreeView.Items.Count > 0 then begin
+    TreeView.Items[0].Selected := True;
+    ListBoxClick(TreeView);
+  end;
+end;
+
+procedure TReconcileDialogForm.CancelChange(aNode: TTreeNode);
+
+  procedure DeleteChangeFromTreeView(aChange: TDADeltaChange);
+  var
+    i: integer;
+  begin
+    for i := TreeView.Items.Count - 1 downto 0 do
+      if TreeView.Items[i].Data = aChange then begin
+        TreeView.Items[i].Delete;
+        Break;
+      end;
+  end;
+
+var
+  lTable: TDADatatable;
+  details: TList;
+  detailChange: TDADeltaChange;
+  i, j, k: integer;
+  ChangePKValueArray: array of Variant;
+  lNeedDeleteChange: boolean;
+  keyvalue: variant;
+  aChange: TDADeltaChange;
+begin
+  aChange := TDADeltaChange(ANode.Data);
+  if aChange <> nil then begin
+    ChangeList.Remove(aChange);
+    lTable := FindDatatable(aChange.Delta);
+    if lTable <> nil then begin
+      // remove changes for detail tables
+      details := lTable.GetDetailTablesforApplyUpdate;
+      try
+        if Details.Count > 0 then begin
+          SetLength(ChangePKValueArray, aChange.Delta.KeyFieldCount);
+          for i := 1 to aChange.Delta.KeyFieldCount do begin
+            if aChange.ChangeType = ctInsert then
+              keyvalue := aChange.NewValueByName[aChange.Delta.KeyFieldNames[i - 1]]
+            else
+              keyvalue := aChange.OldValueByName[aChange.Delta.KeyFieldNames[i - 1]];
+            ChangePKValueArray[0] := keyvalue;
+          end;
+
+          for i := 0 to details.Count - 1 do begin
+            for j := 0 to TDADataTable(details[i]).Delta.Count - 1 do begin
+              detailChange := TDADataTable(details[i]).Delta.Changes[j];
+              if detailChange.Status <> csResolved then begin
+                lNeedDeleteChange := True;
+                for k := 0 to aChange.Delta.KeyFieldCount - 1 do begin
+                  if detailChange.ChangeType = ctInsert then
+                    keyvalue := detailChange.NewValueByName[aChange.Delta.KeyFieldNames[k]]
+                  else
+                    keyvalue := detailChange.oldValueByName[aChange.Delta.KeyFieldNames[k]];
+                  if not VarSameValue(keyValue, ChangePKValueArray[k]) then begin
+                    lNeedDeleteChange := False;
+                    Break;
+                  end;
+                end;
+                if lNeedDeleteChange then DeleteChangeFromTreeView(detailChange);
+              end;
+            end;
+          end;
+        end;
+      finally
+        details.Free;
+      end;
+      DeleteNodeFromTreeView(aNode);
+      lTable.CancelUpdateChange(aChange);
+    end;
+  end;
+  if Treeview.Items.Count = 0 then ModalResult := MrOk;
+end;
+
+procedure TReconcileDialogForm.SkipChange(aNode: TTreeNode);
+begin
+  DeleteNodeFromTreeView(ANode);
+  if Treeview.Items.Count = 0 then ModalResult := MrOk;
+end;
+
+procedure TReconcileDialogForm.ListBoxClick(Sender: TObject);
+
+  function _VarToStr(AValue: variant; ADataType: TDADataType): string;
+  begin
+    if ADataType = datDecimal then
+      Result := DecimalVariantToString(AValue)
+    else
+      Result := VarToStr(AValue)
+  end;
+
+var
+  s: string;
+  change: TDADeltaChange;
+  i: integer;
+begin
+  if Treeview.Selected <> nil then begin
+    change := TDADeltaChange(Treeview.Selected.Data);
+    s := 'A problem occured while ';
+    case change.ChangeType of
+      ctInsert: s := s + 'inserting';
+      ctUpdate: s := s + 'updating';
+      ctDelete: s := s + 'deleting';
+    end;
+    s := s + ' a record in table "' + change.Delta.LogicalName + '", record "';
+    for i := 1 to Change.Delta.KeyFieldCount do begin
+      if i <> 1 then s := s + ';';
+      if Change.ChangeType = ctInsert then
+        s := s + _VarToStr(Change.NewValueByName[Change.Delta.KeyFieldNames[i - 1]],Change.Delta.LoggedFieldTypes[i-1])
+      else
+        s := s + _VarToStr(Change.OldValueByName[Change.Delta.KeyFieldNames[i - 1]],Change.Delta.LoggedFieldTypes[i-1]);
+    end;
+    s := s + '"'+ sLineBreak + sLineBreak + change.Message;
+    if Assigned(RDA) and Assigned(RDA.OnGenerateRecordMessage) then RDA.OnGenerateRecordMessage(RDA, change,FindDatatable(change.Delta),s);
+    //lMessageError.Caption:=s;
+    memMessageError.Lines.Text := s;
+  end;
+end;
+
+function TReconcileDialogForm.FindDatatable(ADelta: IDADelta): TDADatatable;
+var
+  i: integer;
+begin
+  Result := nil;
+  for i := 0 to TableList.Count - 1 do
+    if AnsiSameText(ADelta.LogicalName, TDADatatable(TableList[i]).LogicalName) then begin
+      Result := TDADatatable(TableList[i]);
+      Break;
+    end;
+end;
+
+procedure TReconcileDialogForm.DeleteNodeFromTreeView(aNode: TTreeNode);
+begin
+  aNode.Delete;
+  ListBoxClick(TreeView);
+end;
+
+{$IFDEF FPC}
+initialization
+  {$I uDAReconcileDialog.lrs}
+{$ENDIF}
+end.
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAReconcileDialogDetails.dfm b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAReconcileDialogDetails.dfm
new file mode 100644
index 0000000..4508539
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAReconcileDialogDetails.dfm	
@@ -0,0 +1,95 @@
+object ReconcileDialogDetailsForm: TReconcileDialogDetailsForm
+  Left = 358
+  Top = 218
+  Width = 500
+  Height = 299
+  BorderIcons = [biSystemMenu]
+  Caption = 'Details for Change to '#39'%s'#39
+  Color = clBtnFace
+  ParentFont = True
+  OldCreateOrder = False
+  Position = poOwnerFormCenter
+  OnCreate = FormCreate
+  PixelsPerInch = 96
+  TextHeight = 13
+  object ScrollBox: TScrollBox
+    Left = 0
+    Top = 49
+    Width = 484
+    Height = 179
+    Align = alClient
+    BevelInner = bvNone
+    BevelOuter = bvNone
+    BorderStyle = bsNone
+    TabOrder = 0
+  end
+  object BottomPanel: TPanel
+    Left = 0
+    Top = 228
+    Width = 484
+    Height = 35
+    Align = alBottom
+    BevelOuter = bvNone
+    TabOrder = 1
+    DesignSize = (
+      484
+      35)
+    object OkButton: TButton
+      Left = 185
+      Top = 5
+      Width = 95
+      Height = 25
+      Anchors = [akLeft, akBottom]
+      Caption = '&Skip Change'
+      Default = True
+      ModalResult = 1
+      TabOrder = 0
+    end
+    object CloseButton: TButton
+      Left = 385
+      Top = 5
+      Width = 95
+      Height = 25
+      Anchors = [akLeft, akBottom]
+      Cancel = True
+      Caption = 'Close'
+      ModalResult = 7
+      TabOrder = 1
+    end
+    object CancelButton: TButton
+      Left = 285
+      Top = 5
+      Width = 95
+      Height = 25
+      Anchors = [akLeft, akBottom]
+      Caption = '&Cancel Change'
+      ModalResult = 2
+      TabOrder = 2
+    end
+  end
+  object TopPanel: TPanel
+    Left = 0
+    Top = 0
+    Width = 484
+    Height = 49
+    Align = alTop
+    BevelOuter = bvNone
+    TabOrder = 2
+    DesignSize = (
+      484
+      49)
+    object memMessageError: TMemo
+      Left = 0
+      Top = 0
+      Width = 484
+      Height = 49
+      Anchors = [akLeft, akTop, akRight, akBottom]
+      BevelInner = bvNone
+      BevelOuter = bvNone
+      BorderStyle = bsNone
+      Color = clBtnFace
+      ScrollBars = ssVertical
+      TabOrder = 0
+    end
+  end
+end
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAReconcileDialogDetails.lfm b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAReconcileDialogDetails.lfm
new file mode 100644
index 0000000..70ec6e7
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAReconcileDialogDetails.lfm	
@@ -0,0 +1,89 @@
+object ReconcileDialogDetailsForm: TReconcileDialogDetailsForm
+  Left = 301
+  Height = 300
+  Top = 164
+  Width = 500
+  HorzScrollBar.Page = 499
+  VertScrollBar.Page = 299
+  ActiveControl = OkButton
+  BorderIcons = [biSystemMenu]
+  Caption = 'Details for Change ''%s'''
+  Font.Height = -11
+  Font.Name = 'Tahoma'
+  OnCreate = FormCreate
+  Position = poOwnerFormCenter
+  object ScrollBox: TScrollBox
+    Height = 216
+    Top = 49
+    Width = 500
+    HorzScrollBar.Page = 495
+    VertScrollBar.Page = 211
+    Align = alClient
+    TabOrder = 0
+  end
+  object BottomPanel: TPanel
+    Height = 35
+    Top = 265
+    Width = 500
+    Align = alBottom
+    BevelOuter = bvNone
+    TabOrder = 1
+    object OkButton: TButton
+      Left = 241
+      Height = 25
+      Top = 5
+      Width = 75
+      Anchors = [akRight, akBottom]
+      BorderSpacing.InnerBorder = 4
+      Caption = '&Ok'
+      Default = True
+      ModalResult = 1
+      OnClick = OkButtonClick
+      TabOrder = 0
+    end
+    object CloseButton: TButton
+      Left = 420
+      Height = 25
+      Top = 5
+      Width = 75
+      Anchors = [akRight, akBottom]
+      BorderSpacing.InnerBorder = 4
+      Cancel = True
+      Caption = 'Close'
+      ModalResult = 7
+      OnClick = CloseButtonClick
+      TabOrder = 1
+    end
+    object CancelButton: TButton
+      Left = 320
+      Height = 25
+      Top = 5
+      Width = 95
+      Anchors = [akRight, akBottom]
+      BorderSpacing.InnerBorder = 4
+      Caption = '&Cancel Change'
+      ModalResult = 2
+      OnClick = CancelButtonClick
+      TabOrder = 2
+    end
+  end
+  object TopPanel: TPanel
+    Height = 49
+    Width = 500
+    Align = alTop
+    BevelOuter = bvNone
+    TabOrder = 2
+    object lMessageError: TLabel
+      Left = 5
+      Height = 39
+      Top = 5
+      Width = 495
+      Align = alCustom
+      Anchors = [akTop, akLeft, akRight, akBottom]
+      AutoSize = False
+      Color = clNone
+      ParentColor = False
+      WordWrap = True
+    end
+  end
+end
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAReconcileDialogDetails.lrs b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAReconcileDialogDetails.lrs
new file mode 100644
index 0000000..f974671
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAReconcileDialogDetails.lrs	
@@ -0,0 +1,29 @@
+{ This is an automatically generated lazarus resource file }
+
+LazarusResources.Add('TReconcileDialogDetailsForm','FORMDATA',[
+  'TPF0'#27'TReconcileDialogDetailsForm'#26'ReconcileDialogDetailsForm'#4'Left'
+  +#3'-'#1#6'Height'#3','#1#3'Top'#3#164#0#5'Width'#3#244#1#18'HorzScrollBar.Pa'
+  +'ge'#3#243#1#18'VertScrollBar.Page'#3'+'#1#13'ActiveControl'#7#8'OkButton'#11
+  +'BorderIcons'#11#12'biSystemMenu'#0#7'Caption'#6#23'Details for Change ''%s'
+  +''''#11'Font.Height'#2#245#9'Font.Name'#6#6'Tahoma'#8'OnCreate'#7#10'FormCre'
+  +'ate'#8'Position'#7#17'poOwnerFormCenter'#0#10'TScrollBox'#9'ScrollBox'#6'He'
+  +'ight'#3#216#0#3'Top'#2'1'#5'Width'#3#244#1#18'HorzScrollBar.Page'#3#239#1#18
+  +'VertScrollBar.Page'#3#211#0#5'Align'#7#8'alClient'#8'TabOrder'#2#0#0#0#6'TP'
+  +'anel'#11'BottomPanel'#6'Height'#2'#'#3'Top'#3#9#1#5'Width'#3#244#1#5'Align'
+  +#7#8'alBottom'#10'BevelOuter'#7#6'bvNone'#8'TabOrder'#2#1#0#7'TButton'#8'OkB'
+  +'utton'#4'Left'#3#241#0#6'Height'#2#25#3'Top'#2#5#5'Width'#2'K'#7'Anchors'#11
+  +#7'akRight'#8'akBottom'#0#25'BorderSpacing.InnerBorder'#2#4#7'Caption'#6#3'&'
+  +'Ok'#7'Default'#9#11'ModalResult'#2#1#7'OnClick'#7#13'OkButtonClick'#8'TabOr'
+  +'der'#2#0#0#0#7'TButton'#11'CloseButton'#4'Left'#3#164#1#6'Height'#2#25#3'To'
+  +'p'#2#5#5'Width'#2'K'#7'Anchors'#11#7'akRight'#8'akBottom'#0#25'BorderSpacin'
+  +'g.InnerBorder'#2#4#6'Cancel'#9#7'Caption'#6#5'Close'#11'ModalResult'#2#7#7
+  +'OnClick'#7#16'CloseButtonClick'#8'TabOrder'#2#1#0#0#7'TButton'#12'CancelBut'
+  +'ton'#4'Left'#3'@'#1#6'Height'#2#25#3'Top'#2#5#5'Width'#2'_'#7'Anchors'#11#7
+  +'akRight'#8'akBottom'#0#25'BorderSpacing.InnerBorder'#2#4#7'Caption'#6#14'&C'
+  +'ancel Change'#11'ModalResult'#2#2#7'OnClick'#7#17'CancelButtonClick'#8'TabO'
+  +'rder'#2#2#0#0#0#6'TPanel'#8'TopPanel'#6'Height'#2'1'#5'Width'#3#244#1#5'Ali'
+  +'gn'#7#5'alTop'#10'BevelOuter'#7#6'bvNone'#8'TabOrder'#2#2#0#6'TLabel'#13'lM'
+  +'essageError'#4'Left'#2#5#6'Height'#2''''#3'Top'#2#5#5'Width'#3#239#1#5'Alig'
+  +'n'#7#8'alCustom'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#8
+  +'AutoSize'#8#5'Color'#7#6'clNone'#11'ParentColor'#8#8'WordWrap'#9#0#0#0#0
+]);
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAReconcileDialogDetails.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAReconcileDialogDetails.pas
new file mode 100644
index 0000000..acf57b9
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAReconcileDialogDetails.pas	
@@ -0,0 +1,288 @@
+unit uDAReconcileDialogDetails;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library					     }	
+{									     }
+{ compiler: Delphi 6 and up, Kylix 3 and up				     }
+{ platform: Win32, Linux					             }
+{									     }
+{ (c)opyright RemObjects Software. all rights reserved.			     }
+{									     }
+{ Using this code requires a valid license of the Data Abstract		     }
+{ which can be obtained at http://www.remobjects.com.			     }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+uses
+  SysUtils, Variants, Classes, Graphics, Controls, Forms,
+  Dialogs, StdCtrls, ExtCtrls, uDADelta, uDADataTable, DB,
+  {$IFDEF FPC} buttons,LResources,{$ENDIF}
+  uDARemoteDataAdapter;
+
+type
+  TReconcileDialogDetailsForm = class(TForm)
+    ScrollBox: TScrollBox;
+    BottomPanel: TPanel;
+    OkButton: TButton;
+    CloseButton: TButton;
+    TopPanel: TPanel;
+    CancelButton: TButton;
+    memMessageError: TMemo;
+    procedure FormCreate(Sender: TObject);
+  private
+    { Private declarations }
+    dbeditHeight, labelheight: integer;
+    FChange: TDADeltaChange;
+    Datasource: TDADataSource;
+    procedure Setup;
+    procedure GenerateControls;
+    procedure OnFieldValueChanged(Sender: TObject);
+  public
+    { Public declarations }
+
+  end;
+
+var
+  ReconcileDialogDetailsForm: TReconcileDialogDetailsForm;
+
+procedure ReconcileDialogShowDetails(AChange: TDADeltaChange; aTable: TDADataTable; aCaption: string; var AAction: TDAReconcileDialogAction);
+implementation
+uses
+  uDAInterfaces, uROClasses, dbCtrls, uROBinaryHelpers;
+
+{$IFNDEF FPC}
+  {$R *.dfm}
+{$ENDIF}
+
+const
+  labelWidth = 100;
+  editWidth = 200;
+  c_Color: TColor = clMoneyGreen;
+
+procedure ReconcileDialogShowDetails(AChange: TDADeltaChange; aTable: TDADataTable; aCaption: string; var AAction: TDAReconcileDialogAction);
+var
+  FFiltered: Boolean;
+  FMasterDS: TDADataSource;
+  FRemoteFetchEnabled: Boolean;
+  FMasterFields: string;
+  r: integer;
+begin
+  with TReconcileDialogDetailsForm.Create(Application) do try
+    Caption := Format(Caption, [aCaption]);
+    FChange := AChange;
+    FFiltered := ATable.Filtered;
+    FMasterDS := aTable.MasterSource;
+    FMasterFields := aTable.MasterFields;
+    FRemoteFetchEnabled := aTable.RemoteFetchEnabled;
+    try
+      ATable.Filtered := False;
+      aTable.MasterSource := nil;
+      aTable.MasterFields := '';
+      aTable.RemoteFetchEnabled := False;
+      DataSource.DataTable := aTable;
+      Setup;
+      r := ShowModal;
+      if (ruoOnPost in aTable.RemoteUpdatesOptions) then begin
+        case r of
+          mrOk: AAction := rdlgRepost;
+          mrCancel: AAction := rdlgRevert;
+        end;
+        DataSource.DataTable.Delta.EndChange;
+      end
+      else begin
+        case r of
+          mrOk: AAction := rdlgSkip;
+          mrCancel: AAction := rdlgCancel;
+          else AAction := rdlgNone;
+        end;
+        if DataSource.DataTable.State in [dsEdit, dsInsert] then DataSource.DataTable.Post;
+      end;
+    finally
+      aTable.RemoteFetchEnabled := FRemoteFetchEnabled;
+      aTable.Filtered := FFiltered;
+      aTable.MasterSource := FMasterDS;
+      aTable.MasterFields := FMasterFields
+    end;
+  finally
+    Release;
+  end;
+end;
+
+{ TShowDetailsForm }
+
+procedure TReconcileDialogDetailsForm.Setup;
+begin
+  if FChange.ChangeType <> ctDelete then
+    with DataSource.DataTable do
+      if not (ruoOnPost in RemoteUpdatesOptions) and not Locate(RecIDFieldName, FChange.RecID, []) then RaiseError('Couldn''t find record #' + FormatRecIDString(FChange.RecID));
+  GenerateControls;
+  memMessageError.Lines.Text := FChange.Message;
+
+  if (ruoOnPost in DataSource.DataTable.RemoteUpdatesOptions) then begin
+    OkButton.Left := CancelButton.Left;
+    OkButton.Enabled := False;
+    OkButton.Visible := FChange.ChangeType <> ctDelete ;
+    OkButton.Caption := 'Update';
+    CancelButton.Left := CloseButton.Left;
+    CancelButton.Caption := 'Revert';
+    CloseButton.Visible := False;
+    CloseButton.Enabled := False;
+    ActiveControl := CancelButton;
+    DataSource.DataTable.Delta.StartChange(ctUpdate);
+  end;
+end;
+
+procedure TReconcileDialogDetailsForm.OnFieldValueChanged(Sender: TObject);
+begin
+  OkButton.Enabled := True;
+  OkButton.Caption := 'Update';
+end;
+
+procedure TReconcileDialogDetailsForm.GenerateControls;
+
+  function _VarToStr(AValue: variant; ADataType: TDADataType): string;
+  begin
+    if ADataType = datDecimal then
+      Result := DecimalVariantToString(AValue)
+    else
+      Result := VarToStr(AValue)
+  end;
+
+var
+  i: integer;
+  aField: string;
+  aField2: string;
+  aTop, aleft: integer;
+  FLabel: TLabel;
+  FdbEdit: TDBEdit;
+  FEdit: TEdit;
+begin
+  aleft := 7;
+  aTop := 7;
+  for i := 0 to FChange.Delta.LoggedFieldCount - 1 do begin
+    aField := FChange.Delta.LoggedFieldNames[i];
+    aField2 := StringReplace(aField,'@','___replaced___',[rfReplaceAll]); // it should be unique
+    aTop := 7 + (3 + dbeditHeight) * i;
+    aleft := 7;
+
+    FLabel := TLabel.Create(Self);
+    with FLabel do begin
+      Parent := ScrollBox;
+      Name := 'l_' + aField2;
+      Caption := aField;
+      Left := aleft;
+      Top := (dbeditHeight - Height) div 2 + aTop + 1;
+      Width := labelWidth;
+      aleft := aleft + 7 + labelWidth;
+      Font.Name := 'Tahoma';
+    end;
+
+    if FChange.ChangeType in [ctInsert, ctUpdate] then begin
+      if Self.DataSource.DataTable.FieldByName(aField).DataType = datBlob then begin
+        FEdit := TEdit.Create(Self);
+        with FEdit do begin
+          Name := 'dbe_' + aField2;
+          Parent := ScrollBox;
+          Left := aleft;
+          aleft := aleft + 7 + editWidth;
+          Top := aTop;
+          Width := editWidth;
+          ReadOnly := True;
+          Text := '[blob]';
+          Font.Name := 'Tahoma';
+        end;
+      end
+      else begin
+        FdbEdit := TDBEdit.Create(Self);
+        with FdbEdit do begin
+          Name := 'dbe_' + aField2;
+          DataSource := Self.DataSource;
+          Parent := ScrollBox;
+          DataField := aField;
+          Left := aleft;
+          Top := aTop;
+          Width := editWidth;
+          aleft := aleft + 7 + editWidth;
+          OnChange := OnFieldValueChanged;
+          if (FChange.ChangeType = ctUpdate) and
+            not ROVariantsEqual(FChange.OldValues[i], FChange.NewValues[i]) then
+            Color := c_Color;
+          Font.Name := 'Tahoma';
+        end;
+      end;
+    end;
+
+    if FChange.ChangeType in [ctUpdate, ctDelete] then begin
+      FEdit := TEdit.Create(Self);
+      with FEdit do begin
+        Name := 'e_' + aField2;
+        Parent := ScrollBox;
+        Left := aleft;
+        aleft := aleft + 7 + editWidth;
+        Top := aTop;
+        Width := editWidth;
+        ReadOnly := True;
+        Color := clBtnFace;
+        Font.Name := 'Tahoma';
+        if Self.DataSource.DataTable.FieldByName(aField).DataType = datBlob then begin
+          Text := '[blob]'
+        end
+        else begin
+          case FChange.ChangeType of
+            ctDelete: text := _VarToStr(FChange.OldValues[i],FChange.Delta.LoggedFieldTypes[i]);
+            ctUpdate: begin
+              if not Self.DataSource.DataTable.HasReducedDelta then
+                text := _VarToStr(FChange.OldValues[i],FChange.Delta.LoggedFieldTypes[i])
+              else
+                if not VarIsEmpty(FChange.OldValues[i]) then
+                  text := _VarToStr(FChange.OldValues[i],FChange.Delta.LoggedFieldTypes[i])
+                else text :=  Self.DataSource.DataTable.FieldByName(aField).AsString;
+            end;
+          end;
+        end;
+      end;
+    end;
+  end;
+  inc(aTop, 20);
+  inc(aLeft, 7);
+  //ScrollBox.HorzScrollBar.Range := aleft;
+  Self.ClientWidth := aleft + ScrollBox.VertScrollBar.Size + 2;
+  Self.Constraints.MinWidth := Self.Width;
+  Self.Constraints.MaxWidth := Self.Width;
+
+
+  CloseButton.left := Self.ClientWidth - 7 - CloseButton.Width;
+  CancelButton.Left := CloseButton.left - 5 - CancelButton.Width;
+  OkButton.Left := CancelButton.left - 5 - OkButton.Width;
+
+  ScrollBox.VertScrollBar.Range := aTop;
+  if Screen.Height > Self.Height + (aTop - ScrollBox.Height) then
+    Self.Height := Self.Height + (aTop - ScrollBox.Height)
+  else
+    Self.Height := Screen.Height;
+end;
+
+procedure TReconcileDialogDetailsForm.FormCreate(Sender: TObject);
+begin
+  inherited;
+  with TDBEdit.Create(Self) do try
+    dbeditHeight := Height;
+  finally
+    free;
+  end;
+  with TLabel.Create(Self) do try
+    labelheight := Height;
+  finally
+    free;
+  end;
+  Datasource := TDADataSource.Create(Self);
+end;
+
+{$IFDEF FPC}
+initialization
+  {$I uDAReconcileDialogDetails.lrs}
+{$ENDIF}
+end.
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDARegExpr.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDARegExpr.pas
new file mode 100644
index 0000000..697ae22
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDARegExpr.pas	
@@ -0,0 +1,4287 @@
+unit uDARegExpr;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright 1999-2000 by Andrey V. Sorokin <anso@mail.ru>                  }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Please see the comments below for licensing issues of this source file.    }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+{$B-}
+
+(*
+     TRegExpr library
+     Regular Expressions for Delphi
+
+     Author:
+     Andrey V. Sorokin
+     St-Petersburg
+     Russia
+     anso@mail.ru, anso@usa.net
+     http://anso.da.ru
+     http://anso.virtualave.net
+
+This library is derived from Henry Spencer sources.
+I translated the C sources into Object Pascal,
+implemented object wrapper and some new features.
+Many features suggested or partially implemented
+by TRegExpr's users (see Gratitude below).
+
+---------------------------------------------------------------
+     Legal issues
+---------------------------------------------------------------
+ Copyright (c) 1999-00 by Andrey V. Sorokin <anso@mail.ru>
+
+ This software is provided as it is, without any kind of warranty
+ given. Use it at your own risk.
+
+ You may use this software in any kind of development, including
+ comercial, redistribute, and modify it freely, under the
+ following restrictions :
+ 1. The origin of this software may not be mispresented, you must
+    not claim that you wrote the original software. If you use
+    this software in any kind of product, it would be appreciated
+    that there in a information box, or in the documentation would
+    be an acknowledgmnent like this
+           Partial Copyright (c) 2000 by Andrey V. Sorokin
+ 2. You may not have any income from distributing this source
+    to other developers. When you use this product in a comercial
+    package, the source may not be charged seperatly.
+
+
+---------------------------------------------------------------
+     Legal issues for the original C sources:
+---------------------------------------------------------------
+ *  Copyright (c) 1986 by University of Toronto.
+ *  Written by Henry Spencer.  Not derived from licensed software.
+ *
+ *  Permission is granted to anyone to use this software for any
+ *  purpose on any computer system, and to redistribute it freely,
+ *  subject to the following restrictions:
+ *  1. The author is not responsible for the consequences of use of
+ *      this software, no matter how awful, even if they arise
+ *      from defects in it.
+ *  2. The origin of this software must not be misrepresented, either
+ *      by explicit claim or by omission.
+ *  3. Altered versions must be plainly marked as such, and must not
+ *      be misrepresented as being the original software.
+
+
+---------------------------------------------------------------
+     Gratitudes
+---------------------------------------------------------------
+  Guido Muehlwitz
+    found and fixed ugly bug in big string processing
+  Stephan Klimek
+    testing in CPPB and suggesting/implementing many features
+  Steve Mudford
+    implemented Offset parameter
+  Martin Baur
+    usefull suggetions, help translation into German
+  Yury Finkel
+    Implemented UniCode support, found and fixed some bugs
+  Ralf Junker
+    Implemented some features, many optimization suggestions
+  Filip Jirsák and Matthew Winter (wintermi@yahoo.com)
+    Help in Implementation non-greedy mode
+  Kit Eason
+    many examples for introduction help section
+  Juergen Schroth
+    bug hunting and usefull suggestions
+  Simeon Lilov
+    help translation into Bulgarian
+  Martin Ledoux
+    help translation into French
+  Diego Calp (mail@diegocalp.com), Argentina
+    help translation into Spanish
+
+  And many others - for big work of bug hunting !
+
+I am still looking for person who can help me to translate
+this documentation into other languages (especially German)
+
+
+---------------------------------------------------------------
+     To do
+---------------------------------------------------------------
+
+-=- VCL-version of TRegExpr - for dummies ;) and TRegExprEdit
+(replacement for TMaskEdit).
+Actually, I am writing non-VCL aplications (with web-based
+interfaces), so I don't need VCL's TRegExpr for myself.
+Will it be really usefull ?
+
+-=- working with pascal-style string.
+Now pascal-strings converted into PChar, so
+you can't find r.e. in strings with #0 -chars.
+(suggested by Pavel O).
+
+-=- put precalculated lengths into EXACTLY[CI] !
+
+-=- fInputString as string (suggested by Ralf Junker)
+
+-=- Add regstart optimization for case-insensitive mode ?
+ Or complitely remove because FirstCharSet is faster ?
+
+-=- "Russian Ranges" --> National ranges (use property WordChars ?
+for ordering letters in ranges by its order in WirdsChars if modifier /r is On)
+
+-=- FirstCharSet as array [#0 .. #255] of REChar ?
+(2x faster then set of REChar)
+
+-=- p-code optimization (remove BRANCH-to-EEND, COMMENT, BACK(?)
+    merge EXACTLY etc).
+
+-=- !!!!!!!! bug found by Lars Karlslund
+    "If I do '(something|^$)' on '' I get false (which is wrong ...)."
+
+-=- There are no special command for files (Johan Smit).
+
+I need your suggestions !
+What are more importent in this list ?
+Did I forget anything ?
+
+
+---------------------------------------------------------------
+     History
+---------------------------------------------------------------
+Legend:
+ (+) added feature
+ (-) fixed bug
+ (^) upgraded implementation
+
+ v. 0.947 2001.10.03
+ -=- (+) Word boundary (\b & \B) metachar
+ -=- (-) Bug in processing predefined char.classes in non-UseSetOfChar mode
+ -=- (+) Spanish help - translated by Diego Calp (mail@diegocalp.com), Argentina
+ -=- (+) VersionMajor/Minor class method of TRegExpr ;)
+ -=- (-) Bug in CompileRegExpr, Thanks to Oleg Orlov <orlov@diasoft.ru>
+ -=- (^) Method RegExprSubExpressions wasn't compatible with D2-D3.
+  Thanks to Eugene Tarasov for bug report.
+ -=- (+) Method Replace can now do substitution as well (see documentation)
+  Thanks to Warren Bare, Ken Friesen and many others who suggested it.
+ -=- (+) Updated ReplaceRegExpr to use new Replace method functionality
+ -=- (^) Restored UniCode compatibility lost in some previous version
+  Thanks to Stephan Klimek for bug report
+ -=- (^) Updated TestRE project, new examples for Replace with substitution
+  included.
+
+ v. 0.942+ 2001.03.01
+ -=- (+) Published French help for TRegExpr,
+  translated by Martin Ledoux
+
+ v. 0.942 2001.02.12
+ -=- (-) Range-check error in DEMO-project (due to bug in
+  RegExprSubExpressions), Thanks to Juergen Schroth
+ -=- (^) RegExprSubExpressions - added error codes for "unclosed "[" error
+ -=- (^) Help file bug fixing
+
+ v. 0.941 2001.02.01
+ -=- (^) Attension! Behaviour of '\w', '\W' was changed! Now it really
+  match alphanum characters and '_' as described in documentation,
+  not only alpha as it was before. Thanks to Vadim Alexandrov.
+  If You want to restore previous behaviour, reassign
+  RegExprWordChars (exclude '0123456789' from it).
+ -=- (+) Full compatible with recommended at unicode.org implementation
+  of modifier /m, including DOS-styled line separators (\r\n) mixed
+  with Unix styled (\n) - see properties LineSeparators, LinePairedSeparator
+ -=- (^) Attension! Behaviour of '.' was changed! Now if modifier /s is off
+  it doesn't match all chars from LineSeparators and LinePairedSeparator (by
+  default \r and \n)
+ -=- (^) Attension! To prevent unneeded recompilation of r.e., now assignment
+  to Expression or changing modifiers doesn't cause immidiate [re]compilation.
+  So, now You don't get exception while assigning wrong expression, but can
+  get exception while calling Exec[Next], Substitute, Dump, etc if there
+  are errors in Expression or other properties.
+ -=- (+) Non-greedy style iterators (like '*?'), modifier /g.
+  Implemented with help from Matthew Winter and Filip Jirsák
+ -=- (+) /x modifier (eXtended syntax - allow formating r.e., see description
+  in the help)
+ -=- (+) Procedure Compile to [re]compile r.e. Usefull for GUI r.e. editors
+  and so on (to check all properties validity).
+ -=- (+) FAQ in documentation. I am too lazy to answer to the same
+  questions again and again :( Please, read the FAQ before sending
+  question to me!
+ -=- (^) DEMO project have been significantly improved. Now this is the
+  real r.e. debugger! Thanks to Jon Smith for his ideas.
+ -=- (+) function RegExprSubExpressions, usefull for GUI editors of
+  r.e. (see example of using in TestRExp.dpr project)
+ -=- (+) HyperLinkDecorator unit - practical example of TRegExpr
+  using (see description in the help file)
+ -=- (-) Range checking error in some cases if ComplexBraces defined
+  Thanks to Juergen Schroth
+ -=- (^) 'ComplexBraces' now is defined by default
+ -=- (+) Kit Eason sent to me many examples for 'Syntax' help section
+  and I decided to complitely rewrite this section. I hope, You'll enjoy
+  the results ;)
+ -=- (+) The \A and \Z metacharacters are just like "^" and "$", except
+  that they won't match multiple times when the modifier /m is used
+
+ v. 0.939 2000.10.04
+ -=- (-) Bug in Substitute method ($10.. didn't work properly)
+ Thanks to Serge S Klochkovski
+
+ v. 0.938 2000.07.23
+ -=- (^) Exeptions now jump to appropriate source line, not
+     to Error procedure (I am not quite sure this is safe for
+     all compiler versions. You can turn it off - remove
+     reRealExceptionAddr definition below).
+ -=- (^) Forgotten BSUBEXP[CI] in FillFirstCharSet caused
+     exeption 'memory corruption' in case if back reference can
+     be first op, like this: (a)*\1 (first subexpression can be
+     skipped and we'll start matching with back reference..).
+
+ v. 0.937 2000.06.12
+ -=- (-) Bug in optimization engine (since v.0.934). In some cases
+     TRegExpr didn't catch right strings.
+     Thanks to Matthias Fichtner
+
+ v. 0.936 2000.04.22
+ -=- (+) Back references, like <font size=(['"]?)(\d+)\1>, see
+     manual for details
+ -=- (+) Wide hex char support, like '\x{263a}'
+
+ v. 0.935 2000.04.19 (by Yury Finkel)
+ -=- (-) fInvertCase now isn't readonly ;)
+ -=- (-) UniCode mode compiling errors
+
+ v. 0.934 2000.04.17
+ -=- (^) New ranges implementation (range matching now is very fast
+      - uses one(!) CPU instruction)
+ -=- (^) Internal p-code structure converted into 32-bits - works
+      faster and now there is no 64K limit for compiled r.e.
+ -=- (^) '{m,n}' now use 32-bits arguments (up to 2147483646) - specially
+      for Dmitry Veprintsev ;)
+ -=- (^) Ranges now support metachars: [\n-\x0D] -> #10,#11,#12,#13;
+     Changed '-' processing, now it's like in Perl:
+     [\d-t] -> '0'..'9','-','t'; []-a] -> ']'..'a'
+ -=- (-) Bug with \t and etc macro (they worked only in ranges)
+     Thanks to Yury Finkel
+ -=- (^) Added new preprocessing optimization (see FirstCharSet).
+      Incredible fast (!). But be carefull it isn's properly tested.
+      You can switch it Off - remove UseFirstCharSet definition.
+ -=- (^) Many other speed optimizations
+ -=- (-) Case-insensitive mode now support system-defined national
+      charset (due to bug in v.0.90 .. 0.926 supported only english one)
+ -=- (^) Case-insensitive mode implemented with InvertCase (param &
+      result of REChar type) - works 10 .. 100 times faster.
+ -=- (^) Match and ExecNext interfaces optimized, added IsProgrammOk
+      by Ralf Junker
+ -=- (^) Increased NSUBEXP (now 15) and fixed code for this, now you
+      can simply increase NSUBEXP constant by yourself.
+      Suggested by Alexander V. Akimov.
+ -=- (^+) Substitute adapted for NSUBEXP > 10 and significant (!)
+      optimized, improved error checking.
+      ATTENTION! Read new Substitute description - syntax was changed !
+ -=- (+) SpaceChars & WordChars property - now you may change chars
+      treated as \s & \w. By defauled assigned RegExprSpaceChars/WordChars
+ -=- (+) Now \s and \w supported in ranges
+ -=- (-) Infinite loop if end of range=#$FF
+      Thanks to Andrey Kolegov
+ -=- (+) Function QuoteRegExprMetaChars (see description)
+ -=- (+) UniCode support - sorry, works VERY slow (remove '.' from
+     {.$DEFINE UniCode} after this comment for unicode version).
+     Implemented by Yury Finkel
+
+ v. 0.926 2000.02.26
+ -=- (-) Old bug derived from H.Spencer sources - SPSTART was
+     set for '?' and '*' instead of '*', '{m,n}' and '+'.
+ -=- (-^) Now {m,n} works like Perl's one - error occures only
+     if m > n or n > BracesMax (BracesMax = 255 in this version).
+     In other cases (no m or nondigit symbols in m or n values,
+     or no '}') symbol '{' will be compiled as literal.
+     Note: so, you must include m value (use {0,n} instead of {,n}).
+     Note: {m,} will be compiled as {m,BracesMax}.
+ -=- (-^) CaseInsensitive mode now support ranges
+     '(?i)[a]' == '[aA]'
+ -=- (^) Roman-number template in TestRExp ;)
+ -=- (+^) Beta version of complex-braces - like ((abc){1,2}|d){3}
+     By default its turned off. If you want take part in beta-testing,
+     please, remove '.' from {.$DEFINE ComplexBraces} below this comments.
+ -=- (-^) Removed \b metachar (in Perl it isn't BS as in my implementation,
+     but word bound)
+ -=- (+) Add /s modifier. Bu I am not sure that it's ok for Windows.
+     I implemented it as [^\n] for '.' metachar in non-/s mode.
+     But lines separated by \n\r in windows. I need you suggestions !
+ -=- (^) Sorry, but I had to rename Modifiers to ModifierStr
+     (ModifierS uses for /s now)
+
+ v. 0.91 2000.02.02
+ -=- (^) some changes in documentation and demo-project.
+
+ v. 0.90 2000.01.31
+ -=- (+) implemented braces repetitions {min,max}.
+     Sorry - only simple cases now - like '\d{2,3}'
+     or '[a-z1-9]{,7}', but not (abc){2,3} ..
+     I still too short in time.
+     Wait for future versions of TRegExpr or
+     implement it by youself and share with me ;)
+ -=- (+) implemented case-insensitive modifier and way
+     to work with other modifiers - see properties
+     Modifiers, Modifier, ModifierI
+     and (?ismx-ismx) Perl extension.
+     You may use global variables RegExpr* for assigning
+     default modifier values.
+ -=- (+) property ExtSyntaxEnabled changed to 'r'-modifier
+     (russian extensions - see documentation)
+ -=- (+) implemented (?#comment) Perl extension - very hard
+     and usefull work ;)
+ -=- (^) property MatchCount renamed to SubExprMatchCount.
+     Sorry for any inconvenients, but it's because new
+     version works slightly different and if you used
+     MatchCount in your programms you have to rethink
+     it ! (see comments to this property)
+ -=- (+) add InputString property - stores input string
+     from last Exec call. You may directly assign values
+     to this property for using in ExecPos method.
+ -=- (+) add ExecPos method - for working with assigned
+     to InputString property. You may use it like this
+        InputString := AString;
+        ExecPos;
+     or this
+        InputString := AString;
+        ExecPos (AOffset);
+     Note: ExecPos without parameter works only in
+     Delphi 4 or higher.
+ -=- (+) add ExecNext method - simple and fast (!) way to finding
+     multiple occurences of r.e. in big input string.
+ -=- (^) Offset parameter removed from Exec method, if you
+     used it in your programs, please replace all
+        Exec (AString, AOffset)
+     with combination
+        InputString := AString; ExecPos (AOffset)
+     Sorry for any inconvenients, but old design
+     (see v.0.81) was too ugly :(
+     In addition, multiple Exec calls with same input
+     string produce fool overhead because each Exec
+     reallocate input string buffer.
+ -=- (^) optimized implementation of Substitution,
+     Replace and Split methods
+ -=- (-) fixed minor bug - if r.e. compilation raise error
+     during second pass (!!! I think it's impossible
+     in really practice), TRegExpr stayed in 'compiled'
+     state.
+ -=- (-) fixed bug - Dump method didn't check program existance
+     and raised 'access violation' if previouse Exec
+     was finished with error.
+ -=- (+) changed error handling (see functions Error, ErrorMsg,
+     LastError, property CompilerErrorPos, type ERegExpr).
+ -=- (-^) TRegExpr.Replace, Split and ExecNext made a infinite
+     loop in case of r.e. match empty-string.
+     Now ExecNext moves by MatchLen if MatchLen <> 0
+     and by +1 if MatchLen = 0
+     Thanks to Jon Smith and George Tasker for bugreports.
+ -=- (-) While playing with null-matchs I discovered, that
+     null-match at tail of input string is never found.
+     Well, I fixed this, but I am not sure this is safe
+     (MatchPos[0]=length(AInputString)+1, MatchLen = 0).
+     Any suggetions are very appreciated.
+ -=- (^) Demo project and documentation was upgraded
+ -=- (^) Documentation and this version was published on my home page
+     http://anso.da.ru
+
+
+ v. 0.81 1999.12.25 // Merry Christmas ! :)
+ -=- added \s (AnySpace) and \S (NotSpace) meta-symbols
+     - implemented by Stephan Klimek with minor fixes by AVS
+ -=- added \f, \a and \b chars (translates into FF, BEL, BS)
+ -=- removed meta-symbols 'ö' & 'Ö' - sorry for any inconvenients
+ -=- added Match property (== copy (InputStr, MatchPos [Idx], MatchLen [Idx]))
+ -=- added extra parameter Offset to Exec method
+     (thanks to Steve Mudford)
+
+ v. 0.7 1999.08.22
+ -=- fixed bug - in some cases the r.e. [^...]
+     incorrectly processed (as any symbol)
+     (thanks to Jan Korycan)
+ -=- Some changes and improvements in TestRExp.dpr
+
+ v. 0.6 1999.08.13 (Friday 13 !)
+ -=- changed header of TRegExpr.Substitute
+ -=- added Split, Replace & appropriate
+     global wrappers (thanks to Stephan Klimek for suggetions)
+
+ v. 0.5 1999.08.12
+ -=- TRegExpr.Substitute routine added
+ -=- Some changes and improvements in TestRExp.dpr
+ -=- Fixed bug in english version of documentation
+     (Thanks to Jon Buckheit)
+
+ v. 0.4 1999.07.20
+ -=- Fixed bug with parsing of strings longer then 255 bytes
+     (thanks to Guido Muehlwitz)
+ -=- Fixed bug in RegMatch - mathes only first occurence of r.e.
+     (thanks to Stephan Klimek)
+
+ v. 0.3 1999.06.13
+ -=- ExecRegExpr function
+
+ v. 0.2 1999.06.10
+ -=- packed into object-pascal class
+ -=- code slightly rewriten for pascal
+ -=- now macro correct proceeded in ranges
+ -=- r.e.ranges syntax extended for russian letters ranges:
+     à-ÿ - replaced with all small russian letters (Win1251)
+     À-ß - replaced with all capital russian letters (Win1251)
+     à-ß - replaced with all russian letters (Win1251)
+ -=- added macro '\d' (opcode ANYDIGIT) - match any digit
+ -=- added macro '\D' (opcode NOTDIGIT) - match not digit
+ -=- added macro '\w' (opcode ANYLETTER) - match any english letter or '_'
+ -=- added macro '\W' (opcode NOTLETTER) - match not english letter or '_'
+ (all r.e.syntax extensions may be turned off by flag ExtSyntax)
+
+ v. 0.1 1999.06.09
+ first version, with bugs, without help => must die :(
+
+*)
+
+interface
+
+{$DEFINE DebugRegExpr} // define for dump/trace enabling
+
+{$IFNDEF cpu64}
+{$DEFINE reRealExceptionAddr} // if defined then exceptions will
+// jump to appropriate source line, not to Error procedure
+{$ENDIF}
+
+{$DEFINE ComplexBraces} // define for beta-version of braces
+// (in stable version it works only for simple cases)
+
+{.$DEFINE UniCode} // define for Unicode support
+
+{$IFNDEF UniCode} // optionts applicable only for non-UniCode
+ {$DEFINE UseSetOfChar} // Significant optimization by using set of char
+{$ENDIF}
+
+{$IFDEF UseSetOfChar}
+ {$DEFINE UseFirstCharSet} // Significant optimization inm some cases
+{$ENDIF}
+
+// Determine version (for using 'params by default')
+{$IFNDEF FPC}
+  {$IFNDEF VER80}         { Delphi 1.0}
+   {$IFNDEF VER90}        { Delphi 2.0}
+    {$IFNDEF VER93}       { C++Builder 1.0}
+      {$IFNDEF VER100}    { Borland Delphi 3.0}
+        {$DEFINE D4_}   { Delphi 4.0 or higher}
+      {$ENDIF}
+    {$ENDIF}
+   {$ENDIF}
+  {$ENDIF}
+{$ENDIF}
+{.$IFNDEF VER110}  { Borland C++Builder 3.0}
+{.$IFNDEF VER120}  {Borland Delphi 4.0}
+
+
+uses
+ Classes, // TStrings in Split method
+ SysUtils; // Exception
+
+type
+ {$IFDEF UniCode}
+ PRegExprChar = PWideChar;
+ RegExprString = WideString;
+ REChar = WideChar;
+ {$ELSE}
+ PRegExprChar = PChar;
+ RegExprString = string;
+ REChar = Char;
+ {$ENDIF}
+ TREOp = REChar; // internal p-code type //###0.933
+ PREOp = ^TREOp;
+ TRENextOff = integer; // internal Next "pointer" (offset to current p-code) //###0.933
+ PRENextOff = ^TRENextOff; // used for extracting Next "pointers" from compiled r.e. //###0.933
+ TREBracesArg = integer; // type of {m,n} arguments
+ PREBracesArg = ^TREBracesArg;
+
+const
+ REOpSz = SizeOf (TREOp) div SizeOf (REChar); // size of p-code in RegExprString units
+ RENextOffSz = SizeOf (TRENextOff) div SizeOf (REChar); // size of Next 'pointer' -"-
+ REBracesArgSz = SizeOf (TREBracesArg) div SizeOf (REChar); // size of BRACES arguments -"-
+
+type
+ TRegExprInvertCaseFunction = function (const Ch : REChar) : REChar
+                               of object;
+
+const
+  RegExprModifierI : boolean = False;    // default value for ModifierI
+  RegExprModifierR : boolean = True;     // default value for ModifierR
+  RegExprModifierS : boolean = True;     // default value for ModifierS
+  RegExprModifierG : boolean = True;     // default value for ModifierG
+  RegExprModifierM : boolean = False;    // default value for ModifierM
+  RegExprModifierX : boolean = False;    // default value for ModifierX
+  RegExprSpaceChars : RegExprString =    // default value for SpaceChars
+  ' '#$9#$A#$D#$C;
+  RegExprWordChars : RegExprString =     // default value for WordChars
+    '0123456789' //###0.940
+  + 'abcdefghijklmnopqrstuvwxyz'
+  + 'ABCDEFGHIJKLMNOPQRSTUVWXYZ_';
+  RegExprLineSeparators : RegExprString =// default value for LineSeparators
+   #$d#$a{$IFDEF UniCode}+#$b#$c#$2028#$2029#$85{$ENDIF}; //###0.947
+  RegExprLinePairedSeparator : RegExprString =// default value for LinePairedSeparator
+   #$d#$a;
+  { if You need Unix-styled line separators (only \n), then use:
+  RegExprLineSeparators = #$a;
+  RegExprLinePairedSeparator = '';
+  }
+
+
+const
+ NSUBEXP = 15; // max number of subexpression //###0.929
+ // Cannot be more than NSUBEXPMAX
+ // Be carefull - don't use values which overflow CLOSE opcode
+ // (in this case you'll get compiler erorr).
+ // Big NSUBEXP will cause more slow work and more stack required
+ NSUBEXPMAX = 255; // Max possible value for NSUBEXP. //###0.945
+ // Don't change it! It's defined by internal TRegExpr design.
+
+ MaxBracesArg = $7FFFFFFF - 1; // max value for {n,m} arguments //###0.933
+
+ {$IFDEF ComplexBraces}
+ LoopStackMax = 10; // max depth of loops stack //###0.925
+ {$ENDIF}
+
+ TinySetLen = 3;
+ // if range includes more then TinySetLen chars, //###0.934
+ // then use full (32 bytes) ANYOFFULL instead of ANYOF[BUT]TINYSET
+ // !!! Attension ! If you change TinySetLen, you must
+ // change code marked as "//!!!TinySet"
+
+
+type
+
+{$IFDEF UseSetOfChar}
+ PSetOfREChar = ^TSetOfREChar;
+ TSetOfREChar = set of REChar;
+{$ENDIF}
+
+ TRegExpr = class
+   private
+    startp : array [0 .. NSUBEXP - 1] of PRegExprChar; // founded expr starting points
+    endp : array [0 .. NSUBEXP - 1] of PRegExprChar; // founded expr end points
+
+    {$IFDEF ComplexBraces}
+    LoopStack : array [1 .. LoopStackMax] of integer; // state before entering loop
+    LoopStackIdx : integer; // 0 - out of all loops
+    {$ENDIF}
+
+    // The "internal use only" fields to pass info from compile
+    // to execute that permits the execute phase to run lots faster on
+    // simple cases.
+    regstart : REChar; // char that must begin a match; '\0' if none obvious
+    reganch : REChar; // is the match anchored (at beginning-of-line only)?
+    regmust : PRegExprChar; // string (pointer into program) that match must include, or nil
+    regmlen : integer; // length of regmust string
+    // Regstart and reganch permit very fast decisions on suitable starting points
+    // for a match, cutting down the work a lot.  Regmust permits fast rejection
+    // of lines that cannot possibly match.  The regmust tests are costly enough
+    // that regcomp() supplies a regmust only if the r.e. contains something
+    // potentially expensive (at present, the only such thing detected is * or +
+    // at the start of the r.e., which can involve a lot of backup).  Regmlen is
+    // supplied because the test in regexec() needs it and regcomp() is computing
+    // it anyway.
+    {$IFDEF UseFirstCharSet} //###0.929
+    FirstCharSet : TSetOfREChar;
+    {$ENDIF}
+
+    // work variables for Exec's routins - save stack in recursion}
+    reginput : PRegExprChar; // String-input pointer.
+    fInputStart : PRegExprChar; // Pointer to first char of input string.
+    fInputEnd : PRegExprChar; // Pointer to char AFTER last char of input string
+
+    // work variables for compiler's routines
+    regparse : PRegExprChar;  // Input-scan pointer.
+    regnpar : integer; // count.
+    regdummy : char;
+    regcode : PRegExprChar;   // Code-emit pointer; @regdummy = don't.
+    regsize : integer; // Code size.
+
+    regexpbeg : PRegExprChar; // only for error handling. Contains
+    // pointer to beginning of r.e. while compiling
+    fExprIsCompiled : boolean; // true if r.e. successfully compiled
+
+    // programm is essentially a linear encoding
+    // of a nondeterministic finite-state machine (aka syntax charts or
+    // "railroad normal form" in parsing technology).  Each node is an opcode
+    // plus a "next" pointer, possibly plus an operand.  "Next" pointers of
+    // all nodes except BRANCH implement concatenation; a "next" pointer with
+    // a BRANCH on both ends of it is connecting two alternatives.  (Here we
+    // have one of the subtle syntax dependencies:  an individual BRANCH (as
+    // opposed to a collection of them) is never concatenated with anything
+    // because of operator precedence.)  The operand of some types of node is
+    // a literal string; for others, it is a node leading into a sub-FSM.  In
+    // particular, the operand of a BRANCH node is the first node of the branch.
+    // (NB this is *not* a tree structure:  the tail of the branch connects
+    // to the thing following the set of BRANCHes.)  The opcodes are:
+    programm : PRegExprChar; // Unwarranted chumminess with compiler.
+
+    fExpression : PRegExprChar; // source of compiled r.e.
+    fInputString : PRegExprChar; // input string
+
+    fLastError : integer; // see Error, LastError
+
+    fModifiers : integer; // modifiers
+    fCompModifiers : integer; // compiler's copy of modifiers
+    fProgModifiers : integer; // modifiers values from last programm compilation
+
+    fSpaceChars : RegExprString; //###0.927
+    fWordChars : RegExprString; //###0.929
+    fInvertCase : TRegExprInvertCaseFunction; //###0.927
+
+    fLineSeparators : RegExprString; //###0.941
+    fLinePairedSeparatorAssigned : boolean;
+    fLinePairedSeparatorHead,
+    fLinePairedSeparatorTail : REChar;
+    {$IFNDEF UniCode}
+    fLineSeparatorsSet : set of REChar;
+    {$ENDIF}
+
+    procedure InvalidateProgramm;
+    // Mark programm as have to be [re]compiled
+
+    function IsProgrammOk : boolean; //###0.941
+    // Check if we can use precompiled r.e. or
+    // [re]compile it if something changed
+
+    function GetExpression : RegExprString;
+    procedure SetExpression (const s : RegExprString);
+
+    function GetModifierStr : RegExprString;
+    class function ParseModifiersStr (const AModifiers : RegExprString;
+      var AModifiersInt : integer) : boolean; //###0.941 class function now
+    // Parse AModifiers string and return true and set AModifiersInt
+    // if it's in format 'ismxrg-ismxrg'.
+    procedure SetModifierStr (const AModifiers : RegExprString);
+
+    function GetModifier (AIndex : integer) : boolean;
+    procedure SetModifier (AIndex : integer; ASet : boolean);
+
+    procedure Error (AErrorID : integer); virtual; // error handler.
+    // Default handler raise exception ERegExpr with
+    // Message = ErrorMsg (AErrorID), ErrorCode = AErrorID
+    // and CompilerErrorPos = value of property CompilerErrorPos.
+
+
+    {==================== Compiler section ===================}
+    function CompileRegExpr (exp : PRegExprChar) : boolean;
+    // compile a regular expression into internal code
+
+    procedure Tail (p : PRegExprChar; val : PRegExprChar);
+    // set the next-pointer at the end of a node chain
+
+    procedure OpTail (p : PRegExprChar; val : PRegExprChar);
+    // regoptail - regtail on operand of first argument; nop if operandless
+
+    function EmitNode (op : TREOp) : PRegExprChar;
+    // regnode - emit a node, return location
+
+    procedure EmitC (b : REChar);
+    // emit (if appropriate) a byte of code
+
+    procedure InsertOperator (op : TREOp; opnd : PRegExprChar; sz : integer); //###0.90
+    // insert an operator in front of already-emitted operand
+    // Means relocating the operand.
+
+    function ParseReg (paren : integer; var flagp : integer) : PRegExprChar;
+    // regular expression, i.e. main body or parenthesized thing
+
+    function ParseBranch (var flagp : integer) : PRegExprChar;
+    // one alternative of an | operator
+
+    function ParsePiece (var flagp : integer) : PRegExprChar;
+    // something followed by possible [*+?]
+
+    function ParseAtom (var flagp : integer) : PRegExprChar;
+    // the lowest level
+
+    function GetCompilerErrorPos : integer;
+    // current pos in r.e. - for error hanling
+
+    {$IFDEF UseFirstCharSet} //###0.929
+    procedure FillFirstCharSet (prog : PRegExprChar);
+    {$ENDIF}
+
+    {===================== Mathing section ===================}
+    function regrepeat (p : PRegExprChar; AMax : integer) : integer;
+    // repeatedly match something simple, report how many
+
+    function regnext (p : PRegExprChar) : PRegExprChar;
+    // dig the "next" pointer out of a node
+
+    function MatchPrim (prog : PRegExprChar) : boolean;
+    // recursively matching routine
+
+    function RegMatch (str : PRegExprChar) : boolean;
+    // try match at specific point, uses MatchPrim for real work
+
+    function ExecPrim (AOffset: integer) : boolean;
+    // Exec for stored InputString
+
+    {$IFDEF DebugRegExpr}
+    function DumpOp (op : REChar) : RegExprString;
+    {$ENDIF}
+
+    function GetSubExprMatchCount : integer;
+    function GetMatchPos (Idx : integer) : integer;
+    function GetMatchLen (Idx : integer) : integer;
+    function GetMatch (Idx : integer) : RegExprString;
+
+    function GetInputString : RegExprString;
+    procedure SetInputString (const AInputString : RegExprString);
+
+    {$IFNDEF UseSetOfChar}
+    function StrScanCI (s : PRegExprChar; ch : REChar) : PRegExprChar; //###0.928
+    {$ENDIF}
+
+    procedure SetLineSeparators (const AStr : RegExprString);
+    procedure SetLinePairedSeparator (const AStr : RegExprString);
+    function GetLinePairedSeparator : RegExprString;
+
+   public
+    constructor Create;
+    destructor Destroy; override;
+
+    class function VersionMajor : integer; //###0.944
+    class function VersionMinor : integer; //###0.944
+
+    property Expression : RegExprString read GetExpression write SetExpression;
+    // Regular expression.
+    // For optimization, TRegExpr will automatically compiles it into 'P-code'
+    // (You can see it with help of Dump method) and stores in internal
+    // structures. Real [re]compilation occures only when it really needed -
+    // while calling Exec[Next], Substitute, Dump, etc
+    // and only if Expression or other P-code affected properties was changed
+    // after last [re]compilation.
+    // If any errors while [re]compilation occures, Error method is called
+    // (by default Error raises exception - see below)
+
+    property ModifierStr : RegExprString read GetModifierStr write SetModifierStr;
+    // Set/get default values of r.e.syntax modifiers. Modifiers in
+    // r.e. (?ismx-ismx) will replace this default values.
+    // If you try to set unsupported modifier, Error will be called
+    // (by defaul Error raises exception ERegExpr).
+
+    property ModifierI : boolean index 1 read GetModifier write SetModifier;
+    // Modifier /i - caseinsensitive, initialized from RegExprModifierI
+
+    property ModifierR : boolean index 2 read GetModifier write SetModifier;
+    // Modifier /r - use r.e.syntax extended for russian,
+    // (was property ExtSyntaxEnabled in previous versions)
+    // If true, then à-ÿ  additional include russian letter '¸',
+    // À-ß  additional include '¨', and à-ß include all russian symbols.
+    // You have to turn it off if it may interfere with you national alphabet.
+    // , initialized from RegExprModifierR
+
+    property ModifierS : boolean index 3 read GetModifier write SetModifier;
+    // Modifier /s - '.' works as any char (else as [^\n]),
+    // , initialized from RegExprModifierS
+
+    property ModifierG : boolean index 4 read GetModifier write SetModifier;
+    // Switching off modifier /g switchs all operators in
+    // non-greedy style, so if ModifierG = False, then
+    // all '*' works as '*?', all '+' as '+?' and so on.
+    // , initialized from RegExprModifierG
+
+    property ModifierM : boolean index 5 read GetModifier write SetModifier;
+    // Treat string as multiple lines. That is, change `^' and `$' from
+    // matching at only the very start or end of the string to the start
+    // or end of any line anywhere within the string.
+    // , initialized from RegExprModifierM
+
+    property ModifierX : boolean index 6 read GetModifier write SetModifier;
+    // Modifier /x - eXtended syntax, allow r.e. text formatting,
+    // see description in the help. Initialized from RegExprModifierX
+
+    function Exec (const AInputString : RegExprString) : boolean;
+    // match a programm against a string AInputString
+    // !!! Exec store AInputString into InputString property
+
+    function ExecNext : boolean;
+    // find next match:
+    //    Exec (AString); ExecNext;
+    // works same as
+    //    Exec (AString);
+    //    if MatchLen [0] = 0 then ExecPos (MatchPos [0] + 1)
+    //     else ExecPos (MatchPos [0] + MatchLen [0]);
+    // but it's more simpler !
+
+    function ExecPos (AOffset: integer {$IFDEF D4_}= 1{$ENDIF}) : boolean;
+    // find match for InputString starting from AOffset position
+    // (AOffset=1 - first char of InputString)
+
+    property InputString : RegExprString read GetInputString write SetInputString;
+    // returns current input string (from last Exec call or last assign
+    // to this property).
+    // Any assignment to this property clear Match* properties !
+
+    function Substitute (const ATemplate : RegExprString) : RegExprString;
+    // Returns ATemplate with '$&' or '$0' replaced by whole r.e.
+    // occurence and '$n' replaced by occurence of subexpression #n.
+    // Since v.0.929 '$' used instead of '\' (for future extensions
+    // and for more Perl-compatibility) and accept more then one digit.
+    // If you want place into template raw '$' or '\', use prefix '\'
+    // Example: '1\$ is $2\\rub\\' -> '1$ is <Match[2]>\rub\'
+    // If you want to place raw digit after '$n' you must delimit
+    // n with curly braces '{}'.
+    // Example: 'a$12bc' -> 'a<Match[12]>bc'
+    // 'a${1}2bc' -> 'a<Match[1]>2bc'.
+
+    procedure Split (AInputStr : RegExprString; APieces : TStrings);
+    // Split AInputStr into APieces by r.e. occurencies
+    // Internally calls Exec[Next]
+
+    function Replace (AInputStr : RegExprString;
+      const AReplaceStr : RegExprString;
+      AUseSubstitution : boolean{$IFDEF D4_}= False{$ENDIF}) //###0.946
+     : RegExprString;
+    // Returns AInputStr with r.e. occurencies replaced by AReplaceStr
+    // If AUseSubstitution is true, then AReplaceStr will be used
+    // as template for Substitution methods.
+    // For example:
+    //  Expression := '({-i}block|var)\s*\(\s*([^ ]*)\s*\)\s*';
+    //  Replace ('BLOCK( test1)', 'def "$1" value "$2"', True);
+    //   will return:  def 'BLOCK' value 'test1'
+    //  Replace ('BLOCK( test1)', 'def "$1" value "$2"')
+    //   will return:  def "$1" value "$2"
+    // Internally calls Exec[Next]
+
+    property SubExprMatchCount : integer read GetSubExprMatchCount;
+    // Number of subexpressions has been found in last Exec* call.
+    // If there are no subexpr. but whole expr was found (Exec* returned True),
+    // then SubExprMatchCount=0, if no subexpressions nor whole
+    // r.e. found (Exec* returned false) then SubExprMatchCount=-1.
+    // Note, that some subexpr. may be not found and for such
+    // subexpr. MathPos=MatchLen=-1 and Match=''.
+    // For example: Expression := '(1)?2(3)?';
+    //  Exec ('123'): SubExprMatchCount=2, Match[0]='123', [1]='1', [2]='3'
+    //  Exec ('12'): SubExprMatchCount=1, Match[0]='12', [1]='1'
+    //  Exec ('23'): SubExprMatchCount=2, Match[0]='23', [1]='', [2]='3'
+    //  Exec ('2'): SubExprMatchCount=0, Match[0]='2'
+    //  Exec ('7') - return False: SubExprMatchCount=-1
+
+    property MatchPos [Idx : integer] : integer read GetMatchPos;
+    // pos of entrance subexpr. #Idx into tested in last Exec*
+    // string. First subexpr. have Idx=1, last - MatchCount,
+    // whole r.e. have Idx=0.
+    // Returns -1 if in r.e. no such subexpr. or this subexpr.
+    // not found in input string.
+
+    property MatchLen [Idx : integer] : integer read GetMatchLen;
+    // len of entrance subexpr. #Idx r.e. into tested in last Exec*
+    // string. First subexpr. have Idx=1, last - MatchCount,
+    // whole r.e. have Idx=0.
+    // Returns -1 if in r.e. no such subexpr. or this subexpr.
+    // not found in input string.
+    // Remember - MatchLen may be 0 (if r.e. match empty string) !
+
+    property Match [Idx : integer] : RegExprString read GetMatch;
+    // == copy (InputString, MatchPos [Idx], MatchLen [Idx])
+    // Returns '' if in r.e. no such subexpr. or this subexpr.
+    // not found in input string.
+
+    function LastError : integer;
+    // Returns ID of last error, 0 if no errors (unusable if
+    // Error method raises exception) and clear internal status
+    // into 0 (no errors).
+
+    function ErrorMsg (AErrorID : integer) : RegExprString; virtual;
+    // Returns Error message for error with ID = AErrorID.
+
+    property CompilerErrorPos : integer read GetCompilerErrorPos;
+    // Returns pos in r.e. there compiler stopped.
+    // Usefull for error diagnostics
+
+    property SpaceChars : RegExprString read fSpaceChars write fSpaceChars; //###0.927
+    // Contains chars, treated as /s (initially filled with RegExprSpaceChars
+    // global constant)
+
+    property WordChars : RegExprString read fWordChars write fWordChars; //###0.929
+    // Contains chars, treated as /w (initially filled with RegExprWordChars
+    // global constant)
+
+    property LineSeparators : RegExprString read fLineSeparators write SetLineSeparators; //###0.941
+    // line separators (like \n in Unix)
+
+    property LinePairedSeparator : RegExprString read GetLinePairedSeparator write SetLinePairedSeparator; //###0.941
+    // paired line separator (like \r\n in DOS and Windows).
+    // must contain exactly two chars or no chars at all
+
+    class function InvertCaseFunction  (const Ch : REChar) : REChar;
+    // Converts Ch into upper case if it in lower case or in lower
+    // if it in upper (uses current system local setings)
+
+    property InvertCase : TRegExprInvertCaseFunction read fInvertCase write fInvertCase; //##0.935
+    // Set this property if you want to override case-insensitive functionality.
+    // Create set it to RegExprInvertCaseFunction (InvertCaseFunction by default)
+
+    procedure Compile; //###0.941
+    // [Re]compile r.e. Usefull for example for GUI r.e. editors (to check
+    // all properties validity).
+
+    {$IFDEF DebugRegExpr}
+    function Dump : RegExprString;
+    // dump a compiled regexp in vaguely comprehensible form
+    {$ENDIF}
+  end;
+
+ ERegExpr = class (Exception)
+   public
+    ErrorCode : integer;
+    CompilerErrorPos : integer;
+  end;
+
+const
+  RegExprInvertCaseFunction : TRegExprInvertCaseFunction = nil;//TRegExpr.InvertCaseFunction;
+  // defaul for InvertCase property
+
+function ExecRegExpr (const ARegExpr, AInputStr : RegExprString) : boolean;
+// true if string AInputString match regular expression ARegExpr
+// ! will raise exeption if syntax errors in ARegExpr
+
+procedure SplitRegExpr (const ARegExpr, AInputStr : RegExprString; APieces : TStrings);
+// Split AInputStr into APieces by r.e. ARegExpr occurencies
+
+function ReplaceRegExpr (const ARegExpr, AInputStr, AReplaceStr : RegExprString;
+      AUseSubstitution : boolean{$IFDEF D4_}= False{$ENDIF}) : RegExprString; //###0.947
+// Returns AInputStr with r.e. occurencies replaced by AReplaceStr
+// If AUseSubstitution is true, then AReplaceStr will be used
+// as template for Substitution methods.
+// For example:
+//  ReplaceRegExpr ('({-i}block|var)\s*\(\s*([^ ]*)\s*\)\s*',
+//   'BLOCK( test1)', 'def "$1" value "$2"', True)
+//  will return:  def 'BLOCK' value 'test1'
+//  ReplaceRegExpr ('({-i}block|var)\s*\(\s*([^ ]*)\s*\)\s*',
+//   'BLOCK( test1)', 'def "$1" value "$2"')
+//   will return:  def "$1" value "$2"
+
+function QuoteRegExprMetaChars (const AStr : RegExprString) : RegExprString;
+// Replace all metachars with its safe representation,
+// for example 'abc$cd.(' converts into 'abc\$cd\.\('
+// This function usefull for r.e. autogeneration from
+// user input
+
+function RegExprSubExpressions (const ARegExpr : string;
+ ASubExprs : TStrings; AExtendedSyntax : boolean{$IFDEF D4_}= False{$ENDIF}) : integer;
+// Makes list of subexpressions found in ARegExpr r.e.
+// In ASubExps every item represent subexpression,
+// from first to last, in format:
+//  String - subexpression text (without '()')
+//  low word of Object - starting position in ARegExpr, including '('
+//   if exists! (first position is 1)
+//  high word of Object - length, including starting '(' and ending ')'
+//   if exist!
+// AExtendedSyntax - must be True if modifier /m will be On while
+// using the r.e.
+// Usefull for GUI editors of r.e. etc (You can find example of using
+// in TestRExp.dpr project)
+// Returns
+//  0      Success. No unbalanced brackets was found;
+//  -1     There are not enough closing brackets ')';
+//  -(n+1) At position n was found opening '[' without  //###0.942
+//         corresponding closing ']';
+//  n      At position n was found closing bracket ')' without
+//         corresponding opening '('.
+// If Result <> 0, then ASubExpr can contain empty items or illegal ones
+
+
+implementation
+
+uses
+  uROClasses;
+
+const
+ TRegExprVersionMajor : integer = 0;
+ TRegExprVersionMinor : integer = 947;
+ // don't use this const directly, use TRegExpr.VersionXXX instead
+
+ MaskModI = 1;  // modifier /i bit in fModifiers
+ MaskModR = 2;  // -"- /r
+ MaskModS = 4;  // -"- /s
+ MaskModG = 8;  // -"- /g
+ MaskModM = 16; // -"- /m
+ MaskModX = 32; // -"- /x
+
+ {$IFDEF UniCode}
+ XIgnoredChars = ' '#9#$d#$a;
+ {$ELSE}
+ XIgnoredChars = [' ', #9, #$d, #$a];
+ {$ENDIF}
+
+{=============================================================}
+{=================== WideString functions ====================}
+{=============================================================}
+
+{$IFDEF UniCode}
+
+function StrPCopy (Dest: PRegExprChar; const Source: RegExprString): PRegExprChar;
+ var
+  i, Len : Integer;
+ begin
+  Len := length (Source); //###0.932
+  for i := 1 to Len do
+   Dest [i - 1] := Source [i];
+  Dest [Len] := #0;
+  Result := Dest;
+ end; { of function StrPCopy
+--------------------------------------------------------------}
+
+function StrLCopy (Dest, Source: PRegExprChar; MaxLen: Cardinal): PRegExprChar;
+ var i: Integer;
+ begin
+  for i := 0 to MaxLen - 1 do
+   Dest [i] := Source [i];
+  Result := Dest;
+ end; { of function StrLCopy
+--------------------------------------------------------------}
+
+function StrLen (Str: PRegExprChar): Cardinal;
+ begin
+  Result:=0;
+  while Str [result] <> #0
+   do Inc (Result);
+ end; { of function StrLen
+--------------------------------------------------------------}
+
+function StrPos (Str1, Str2: PRegExprChar): PRegExprChar;
+ var n: Integer;
+ begin
+  Result := nil;
+  n := Pos (RegExprString (Str2), RegExprString (Str1));
+  if n = 0
+   then EXIT;
+  Result := Str1 + n - 1;
+ end; { of function StrPos
+--------------------------------------------------------------}
+
+function StrLComp (Str1, Str2: PRegExprChar; MaxLen: Cardinal): Integer;
+ var S1, S2: RegExprString;
+ begin
+  S1 := Str1;
+  S2 := Str2;
+  if Copy (S1, 1, MaxLen) > Copy (S2, 1, MaxLen)
+   then Result := 1
+   else
+    if Copy (S1, 1, MaxLen) < Copy (S2, 1, MaxLen)
+     then Result := -1
+     else Result := 0;
+ end; { function StrLComp
+--------------------------------------------------------------}
+
+function StrScan (Str: PRegExprChar; Chr: WideChar): PRegExprChar;
+ begin
+  Result := nil;
+  while (Str^ <> #0) and (Str^ <> Chr)
+   do Inc (Str);
+  if (Str^ <> #0)
+   then Result := Str;
+ end; { of function StrScan
+--------------------------------------------------------------}
+
+{$ENDIF}
+
+
+{=============================================================}
+{===================== Global functions ======================}
+{=============================================================}
+
+function ExecRegExpr (const ARegExpr, AInputStr : RegExprString) : boolean;
+ var r : TRegExpr;
+ begin
+  r := TRegExpr.Create;
+  try
+    r.Expression := ARegExpr;
+    Result := r.Exec (AInputStr);
+    finally r.Free;
+   end;
+ end; { of function ExecRegExpr
+--------------------------------------------------------------}
+
+procedure SplitRegExpr (const ARegExpr, AInputStr : RegExprString; APieces : TStrings);
+ var r : TRegExpr;
+ begin
+  APieces.Clear;
+  r := TRegExpr.Create;
+  try
+    r.Expression := ARegExpr;
+    r.Split (AInputStr, APieces);
+    finally r.Free;
+   end;
+ end; { of procedure SplitRegExpr
+--------------------------------------------------------------}
+
+function ReplaceRegExpr (const ARegExpr, AInputStr, AReplaceStr : RegExprString;
+      AUseSubstitution : boolean{$IFDEF D4_}= False{$ENDIF}) : RegExprString;
+ var r : TRegExpr;
+ begin
+  r := TRegExpr.Create;
+  try
+    r.Expression := ARegExpr;
+    Result := r.Replace (AInputStr, AReplaceStr, AUseSubstitution); //###0.947
+    finally r.Free;
+   end;
+ end; { of function ReplaceRegExpr
+--------------------------------------------------------------}
+
+function QuoteRegExprMetaChars (const AStr : RegExprString) : RegExprString;
+ const
+  RegExprMetaSet : RegExprString = '^$.[()|?+*\{'
+  + ']}'; // - this last are additional to META.
+  // Very similar to META array, but slighly changed.
+  // !Any changes in META array must be synchronized with this set.
+ var
+  i, i0, Len : integer;
+ begin
+  Result := '';
+  Len := length (AStr);
+  i := 1;
+  i0 := i;
+  while i <= Len do begin
+    if Pos (AStr [i], RegExprMetaSet) > 0 then begin
+      Result := Result + System.Copy (AStr, i0, i - i0)
+                 + '\' + AStr [i];
+      i0 := i + 1;
+     end;
+    inc (i);
+   end;
+  Result := Result + System.Copy (AStr, i0, MaxInt); // Tail
+ end; { of function QuoteRegExprMetaChars
+--------------------------------------------------------------}
+
+function RegExprSubExpressions (const ARegExpr : string;
+ ASubExprs : TStrings; AExtendedSyntax : boolean{$IFDEF D4_}= False{$ENDIF}) : integer;
+ type
+  TStackItemRec =  record //###0.945
+    SubExprIdx : integer;
+    StartPos : integer;
+   end;
+  TStackArray = packed array [0 .. NSUBEXPMAX - 1] of TStackItemRec;
+ var
+  Len, SubExprLen : integer;
+  i, i0 : integer;
+  Modif : integer;
+  Stack : ^TStackArray; //###0.945
+  StackIdx, StackSz : integer;
+ begin
+  Result := 0; // no unbalanced brackets found at this very moment
+
+  ASubExprs.Clear; // I don't think that adding to non empty list
+  // can be usefull, so I simplified algorithm to work only with empty list
+
+  Len := length (ARegExpr); // some optimization tricks
+
+  // first we have to calculate number of subexpression to reserve
+  // space in Stack array (may be we'll reserve more then need, but
+  // it's faster then memory reallocation during parsing)
+  StackSz := 1; // add 1 for entire r.e.
+  for i := 1 to Len do
+   if ARegExpr [i] = '('
+    then inc (StackSz);
+//  SetLength (Stack, StackSz); //###0.945
+  GetMem (Stack, SizeOf (TStackItemRec) * StackSz);
+  try
+
+  StackIdx := 0;
+  i := 1;
+  while (i <= Len) do begin
+    case ARegExpr [i] of
+      '(': begin
+        if (i < Len) and (ARegExpr [i + 1] = '?') then begin
+           // this is not subexpression, but comment or other
+           // Perl extension. We must check is it (?ismxrg-ismxrg)
+           // and change AExtendedSyntax if /x is changed.
+           inc (i, 2); // skip '(?'
+           i0 := i;
+           while (i <= Len) and (ARegExpr [i] <> ')')
+            do inc (i);
+           if i > Len
+            then Result := -1 // unbalansed '('
+            else
+             if TRegExpr.ParseModifiersStr (System.Copy (ARegExpr, i, i - i0), Modif)
+              then AExtendedSyntax := (Modif and MaskModX) <> 0;
+          end
+         else begin // subexpression starts
+           ASubExprs.Add (''); // just reserve space
+           with Stack [StackIdx] do begin
+             SubExprIdx := ASubExprs.Count - 1;
+             StartPos := i;
+            end;
+           inc (StackIdx);
+          end;
+       end;
+      ')': begin
+        if StackIdx = 0
+         then Result := i // unbalanced ')'
+         else begin
+           dec (StackIdx);
+           with Stack [StackIdx] do begin
+             SubExprLen := i - StartPos + 1;
+             ASubExprs.Objects [SubExprIdx] :=
+              TObject (StartPos or (SubExprLen ShL 16));
+             ASubExprs [SubExprIdx] := System.Copy (
+              ARegExpr, StartPos + 1, SubExprLen - 2); // add without brackets
+            end;
+          end;
+       end;
+      '\': inc (i); // skip quoted symbol
+      '[': begin
+        // we have to skip character ranges at once, because they can
+        // contain '#', and '#' in it must NOT be recognized as eXtended
+        // comment beginning!
+        i0 := i;
+        inc (i);
+        if ARegExpr [i] = ']' // cannot be 'emty' ranges - this interpretes
+         then inc (i);        // as ']' by itself
+        while (i <= Len) and (ARegExpr [i] <> ']') do
+         if ARegExpr [i] = '\' //###0.942
+          then inc (i, 2) // skip 'escaped' char to prevent stopping at '\]'
+          else inc (i);
+        if (i > Len) or (ARegExpr [i] <> ']') //###0.942
+         then Result := - (i0 + 1); // unbalansed '[' //###0.942
+       end;
+      '#': if AExtendedSyntax then begin
+        // skip eXtended comments
+        while (i <= Len) and (ARegExpr [i] <> #$d) and (ARegExpr [i] <> #$a)
+         // do not use [#$d, #$a] due to UniCode compatibility
+         do inc (i);
+        while (i + 1 <= Len) and ((ARegExpr [i + 1] = #$d) or (ARegExpr [i + 1] = #$a))
+         do inc (i); // attempt to work with different kinds of line separators
+        // now we are at the line separator that must be skipped.
+       end;
+      // here is no 'else' clause - we simply skip ordinary chars
+     end; // of case
+    inc (i); // skip scanned char
+    // ! can move after Len due to skipping quoted symbol
+   end;
+
+  // check brackets balance
+  if StackIdx <> 0
+   then Result := -1; // unbalansed '('
+
+  // check if entire r.e. added
+  if (ASubExprs.Count = 0)
+   or ((integer (ASubExprs.Objects [0]) and $FFFF) <> 1)
+   or (((integer (ASubExprs.Objects [0]) ShR 16) and $FFFF) <> Len)
+    // whole r.e. wasn't added because it isn't bracketed
+    // well, we add it now:
+    then ASubExprs.InsertObject (0, ARegExpr, TObject ((Len ShL 16) or 1));
+
+  finally FreeMem (Stack);
+  end;
+ end; { of function RegExprSubExpressions
+--------------------------------------------------------------}
+
+
+
+const
+ MAGIC       = TREOp (216);// programm signature
+
+// name            opcode    opnd? meaning
+ EEND        = TREOp (0);  // -    End of program
+ BOL         = TREOp (1);  // -    Match "" at beginning of line
+ EOL         = TREOp (2);  // -    Match "" at end of line
+ ANY         = TREOp (3);  // -    Match any one character
+ ANYOF       = TREOp (4);  // Str  Match any character in string Str
+ ANYBUT      = TREOp (5);  // Str  Match any char. not in string Str
+ BRANCH      = TREOp (6);  // Node Match this alternative, or the next
+ BACK        = TREOp (7);  // -    Jump backward (Next < 0)
+ EXACTLY     = TREOp (8);  // Str  Match string Str
+ NOTHING     = TREOp (9);  // -    Match empty string
+ STAR        = TREOp (10); // Node Match this (simple) thing 0 or more times
+ PLUS        = TREOp (11); // Node Match this (simple) thing 1 or more times
+ ANYDIGIT    = TREOp (12); // -    Match any digit (equiv [0-9])
+ NOTDIGIT    = TREOp (13); // -    Match not digit (equiv [0-9])
+ ANYLETTER   = TREOp (14); // -    Match any letter from property WordChars
+ NOTLETTER   = TREOp (15); // -    Match not letter from property WordChars
+ ANYSPACE    = TREOp (16); // -    Match any space char (see property SpaceChars)
+ NOTSPACE    = TREOp (17); // -    Match not space char (see property SpaceChars)
+ BRACES      = TREOp (18); // Node,Min,Max Match this (simple) thing from Min to Max times.
+                           //      Min and Max are TREBracesArg
+ COMMENT     = TREOp (19); // -    Comment ;)
+ EXACTLYCI   = TREOp (20); // Str  Match string Str case insensitive
+ ANYOFCI     = TREOp (21); // Str  Match any character in string Str, case insensitive
+ ANYBUTCI    = TREOp (22); // Str  Match any char. not in string Str, case insensitive
+ LOOPENTRY   = TREOp (23); // Node Start of loop (Node - LOOP for this loop)
+ LOOP        = TREOp (24); // Node,Min,Max,LoopEntryJmp - back jump for LOOPENTRY.
+                           //      Min and Max are TREBracesArg
+                           //      Node - next node in sequence,
+                           //      LoopEntryJmp - associated LOOPENTRY node addr
+ ANYOFTINYSET= TREOp (25); // Chrs Match any one char from Chrs (exactly TinySetLen chars)
+ ANYBUTTINYSET=TREOp (26); // Chrs Match any one char not in Chrs (exactly TinySetLen chars)
+ ANYOFFULLSET= TREOp (27); // Set  Match any one char from set of char
+                           // - very fast (one CPU instruction !) but takes 32 bytes of p-code
+ BSUBEXP     = TREOp (28); // Idx  Match previously matched subexpression #Idx (stored as REChar) //###0.936
+ BSUBEXPCI   = TREOp (29); // Idx  -"- in case-insensitive mode
+
+ // Non-Greedy Style Ops //###0.940
+ STARNG      = TREOp (30); // Same as START but in non-greedy mode
+ PLUSNG      = TREOp (31); // Same as PLUS but in non-greedy mode
+ BRACESNG    = TREOp (32); // Same as BRACES but in non-greedy mode
+ LOOPNG      = TREOp (33); // Same as LOOP but in non-greedy mode
+
+ // Multiline mode \m
+ BOLML       = TREOp (34);  // -    Match "" at beginning of line
+ EOLML       = TREOp (35);  // -    Match "" at end of line
+ ANYML       = TREOp (36);  // -    Match any one character
+
+ // Word boundary
+ BOUND       = TREOp (37);  // Match "" between words //###0.943
+ NOTBOUND    = TREOp (38);  // Match "" not between words //###0.943
+
+ // !!! Change OPEN value if you add new opcodes !!!
+
+ OPEN        = TREOp (39); // -    Mark this point in input as start of \n
+                           //      OPEN + 1 is \1, etc.
+ CLOSE       = TREOp (ord (OPEN) + NSUBEXP);
+                           // -    Analogous to OPEN.
+
+ // !!! Don't add new OpCodes after CLOSE !!!
+
+// We work with p-code thru pointers, compatible with PRegExprChar.
+// Note: all code components (TRENextOff, TREOp, TREBracesArg, etc)
+// must have lengths that can be divided by SizeOf (REChar) !
+// A node is TREOp of opcode followed Next "pointer" of TRENextOff type.
+// The Next is a offset from the opcode of the node containing it.
+// An operand, if any, simply follows the node. (Note that much of
+// the code generation knows about this implicit relationship!)
+// Using TRENextOff=integer speed up p-code processing.
+
+// Opcodes description:
+//
+// BRANCH The set of branches constituting a single choice are hooked
+//      together with their "next" pointers, since precedence prevents
+//      anything being concatenated to any individual branch.  The
+//      "next" pointer of the last BRANCH in a choice points to the
+//      thing following the whole choice.  This is also where the
+//      final "next" pointer of each individual branch points; each
+//      branch starts with the operand node of a BRANCH node.
+// BACK Normal "next" pointers all implicitly point forward; BACK
+//      exists to make loop structures possible.
+// STAR,PLUS,BRACES '?', and complex '*' and '+', are implemented as
+//      circular BRANCH structures using BACK. Complex '{min,max}'
+//      - as pair LOOPENTRY-LOOP (see below). Simple cases (one
+//      character per match) are implemented with STAR, PLUS and
+//      BRACES for speed and to minimize recursive plunges.
+// LOOPENTRY,LOOP {min,max} are implemented as special pair
+//      LOOPENTRY-LOOP. Each LOOPENTRY initialize loopstack for
+//      current level.
+// OPEN,CLOSE are numbered at compile time.
+
+
+{=============================================================}
+{================== Error handling section ===================}
+{=============================================================}
+
+const
+ reeOk = 0;
+ reeCompNullArgument = 100;
+ reeCompRegexpTooBig = 101;
+ reeCompParseRegTooManyBrackets = 102;
+ reeCompParseRegUnmatchedBrackets = 103;
+ reeCompParseRegUnmatchedBrackets2 = 104;
+ reeCompParseRegJunkOnEnd = 105;
+ reePlusStarOperandCouldBeEmpty = 106;
+ reeNestedSQP = 107;
+ reeBadHexDigit = 108;
+ reeInvalidRange = 109;
+ reeParseAtomTrailingBackSlash = 110;
+ reeNoHexCodeAfterBSlashX = 111;
+ reeHexCodeAfterBSlashXTooBig = 112;
+ reeUnmatchedSqBrackets = 113;
+ reeInternalUrp = 114;
+ reeQPSBFollowsNothing = 115;
+ reeTrailingBackSlash = 116;
+ reeRarseAtomInternalDisaster = 119;
+ reeBRACESArgTooBig = 122;
+ reeBracesMinParamGreaterMax = 124;
+ reeUnclosedComment = 125;
+ reeComplexBracesNotImplemented = 126;
+ reeUrecognizedModifier = 127;
+ reeBadLinePairedSeparator = 128;
+ reeRegRepeatCalledInappropriately = 1000;
+ reeMatchPrimMemoryCorruption = 1001;
+ reeMatchPrimCorruptedPointers = 1002;
+ reeNoExpression = 1003;
+ reeCorruptedProgram = 1004;
+ reeNoInpitStringSpecified = 1005;
+ reeOffsetMustBeGreaterThen0 = 1006;
+ reeExecNextWithoutExec = 1007;
+ reeGetInputStringWithoutInputString = 1008;
+ reeDumpCorruptedOpcode = 1011;
+ reeModifierUnsupported = 1013;
+ reeLoopStackExceeded = 1014;
+ reeLoopWithoutEntry = 1015;
+
+function TRegExpr.ErrorMsg (AErrorID : integer) : RegExprString;
+ begin
+  case AErrorID of
+    reeOk: Result := 'No errors';
+    reeCompNullArgument: Result := 'TRegExpr(comp): Null Argument';
+    reeCompRegexpTooBig: Result := 'TRegExpr(comp): Regexp Too Big';
+    reeCompParseRegTooManyBrackets: Result := 'TRegExpr(comp): ParseReg Too Many ()';
+    reeCompParseRegUnmatchedBrackets: Result := 'TRegExpr(comp): ParseReg Unmatched ()';
+    reeCompParseRegUnmatchedBrackets2: Result := 'TRegExpr(comp): ParseReg Unmatched ()';
+    reeCompParseRegJunkOnEnd: Result := 'TRegExpr(comp): ParseReg Junk On End';
+    reePlusStarOperandCouldBeEmpty: Result := 'TRegExpr(comp): *+ Operand Could Be Empty';
+    reeNestedSQP: Result := 'TRegExpr(comp): Nested *?+';
+    reeBadHexDigit: Result := 'TRegExpr(comp): Bad Hex Digit';
+    reeInvalidRange: Result := 'TRegExpr(comp): Invalid [] Range';
+    reeParseAtomTrailingBackSlash: Result := 'TRegExpr(comp): Parse Atom Trailing \';
+    reeNoHexCodeAfterBSlashX: Result := 'TRegExpr(comp): No Hex Code After \x';
+    reeHexCodeAfterBSlashXTooBig: Result := 'TRegExpr(comp): Hex Code After \x Is Too Big';
+    reeUnmatchedSqBrackets: Result := 'TRegExpr(comp): Unmatched []';
+    reeInternalUrp: Result := 'TRegExpr(comp): Internal Urp';
+    reeQPSBFollowsNothing: Result := 'TRegExpr(comp): ?+*{ Follows Nothing';
+    reeTrailingBackSlash: Result := 'TRegExpr(comp): Trailing \';
+    reeRarseAtomInternalDisaster: Result := 'TRegExpr(comp): RarseAtom Internal Disaster';
+    reeBRACESArgTooBig: Result := 'TRegExpr(comp): BRACES Argument Too Big';
+    reeBracesMinParamGreaterMax: Result := 'TRegExpr(comp): BRACE Min Param Greater then Max';
+    reeUnclosedComment: Result := 'TRegExpr(comp): Unclosed (?#Comment)';
+    reeComplexBracesNotImplemented: Result := 'TRegExpr(comp): If you want take part in beta-testing BRACES ''{min,max}'' and non-greedy ops ''*?'', ''+?'', ''??'' for complex cases - remove ''.'' from {.$DEFINE ComplexBraces}';
+    reeUrecognizedModifier: Result := 'TRegExpr(comp): Urecognized Modifier';
+    reeBadLinePairedSeparator: Result := 'TRegExpr(comp): LinePairedSeparator must countain two different chars or no chars at all';
+
+    reeRegRepeatCalledInappropriately: Result := 'TRegExpr(exec): RegRepeat Called Inappropriately';
+    reeMatchPrimMemoryCorruption: Result := 'TRegExpr(exec): MatchPrim Memory Corruption';
+    reeMatchPrimCorruptedPointers: Result := 'TRegExpr(exec): MatchPrim Corrupted Pointers';
+    reeNoExpression: Result := 'TRegExpr(exec): Not Assigned Expression Property';
+    reeCorruptedProgram: Result := 'TRegExpr(exec): Corrupted Program';
+    reeNoInpitStringSpecified: Result := 'TRegExpr(exec): No Inpit String Specified';
+    reeOffsetMustBeGreaterThen0: Result := 'TRegExpr(exec): Offset Must Be Greater Then 0';
+    reeExecNextWithoutExec: Result := 'TRegExpr(exec): ExecNext Without Exec[Pos]';
+    reeGetInputStringWithoutInputString: Result := 'TRegExpr(exec): GetInputString Without InputString';
+    reeDumpCorruptedOpcode: Result := 'TRegExpr(dump): Corrupted Opcode';
+    reeLoopStackExceeded: Result := 'TRegExpr(exec): Loop Stack Exceeded';
+    reeLoopWithoutEntry: Result := 'TRegExpr(exec): Loop Without LoopEntry !';
+    else Result := 'Unknown error';
+   end;
+ end; { of procedure TRegExpr.Error
+--------------------------------------------------------------}
+
+function TRegExpr.LastError : integer;
+ begin
+  Result := fLastError;
+  fLastError := reeOk;
+ end; { of function TRegExpr.LastError
+--------------------------------------------------------------}
+
+
+{=============================================================}
+{===================== Common section ========================}
+{=============================================================}
+
+class function TRegExpr.VersionMajor : integer; //###0.944
+ begin
+  Result := TRegExprVersionMajor;
+ end; { of class function TRegExpr.VersionMajor
+--------------------------------------------------------------}
+
+class function TRegExpr.VersionMinor : integer; //###0.944
+ begin
+  Result := TRegExprVersionMinor;
+ end; { of class function TRegExpr.VersionMinor
+--------------------------------------------------------------}
+
+constructor TRegExpr.Create;
+ begin
+  inherited;
+  programm := nil;
+  fExpression := nil;
+  fInputString := nil;
+
+  regexpbeg := nil;
+  fExprIsCompiled := false;
+
+  ModifierI := RegExprModifierI;
+  ModifierR := RegExprModifierR;
+  ModifierS := RegExprModifierS;
+  ModifierG := RegExprModifierG;
+  ModifierM := RegExprModifierM; //###0.940
+
+  SpaceChars := RegExprSpaceChars; //###0.927
+  WordChars := RegExprWordChars; //###0.929
+  fInvertCase := RegExprInvertCaseFunction; //###0.927
+
+  fLineSeparators := RegExprLineSeparators; //###0.941
+  LinePairedSeparator := RegExprLinePairedSeparator; //###0.941
+ end; { of constructor TRegExpr.Create
+--------------------------------------------------------------}
+
+destructor TRegExpr.Destroy;
+ begin
+  if programm <> nil
+   then FreeMem (programm);
+  if fExpression <> nil
+   then FreeMem (fExpression);
+  if fInputString <> nil
+   then FreeMem (fInputString);
+ end; { of destructor TRegExpr.Destroy
+--------------------------------------------------------------}
+
+function LoCase (ch: Char): Char;
+begin
+   if CharInSet(ch, ['A'..'Z']) then
+      LoCase := chr(ord(ch) xor 32)
+   else
+      LoCase := ch
+end; { LoCase }
+
+class function TRegExpr.InvertCaseFunction (const Ch : REChar) : REChar;
+ begin
+  {$IFDEF UniCode}
+  if Ch >= #128
+   then Result := Ch
+  else
+  {$ENDIF}
+   begin
+    Result := REChar (UpCase(Ch));
+    if Result = Ch
+     then Result := REChar (LoCase(Ch));
+   end;
+ end; { of function TRegExpr.InvertCaseFunction
+--------------------------------------------------------------}
+
+function TRegExpr.GetExpression : RegExprString;
+ begin
+  if fExpression <> nil
+   then Result := fExpression
+   else Result := '';
+ end; { of function TRegExpr.GetExpression
+--------------------------------------------------------------}
+
+procedure TRegExpr.SetExpression (const s : RegExprString);
+ begin
+  if (s <> fExpression) or not fExprIsCompiled then begin
+    fExprIsCompiled := false;
+    if fExpression <> nil then begin
+      FreeMem (fExpression);
+      fExpression := nil;
+     end;
+    if s <> '' then begin
+      GetMem (fExpression, (length (s) + 1) * SizeOf (REChar));
+      StrPCopy (fExpression, s);
+      InvalidateProgramm; //###0.941
+     end;
+   end;
+ end; { of procedure TRegExpr.SetExpression
+--------------------------------------------------------------}
+
+function TRegExpr.GetSubExprMatchCount : integer;
+ begin
+  if Assigned (fInputString) then begin
+     Result := NSUBEXP - 1;
+     while (Result > 0) and ((startp [Result] = nil)
+                             or (endp [Result] = nil))
+      do dec (Result);
+    end
+   else Result := -1;
+ end; { of function TRegExpr.GetSubExprMatchCount
+--------------------------------------------------------------}
+
+function TRegExpr.GetMatchPos (Idx : integer) : integer;
+ begin
+  if (Idx >= 0) and (Idx < NSUBEXP) and Assigned (fInputString)
+     and Assigned (startp [Idx]) and Assigned (endp [Idx]) then begin
+     Result := (startp [Idx] - fInputString) + 1;
+    end
+   else Result := -1;
+ end; { of function TRegExpr.GetMatchPos
+--------------------------------------------------------------}
+
+function TRegExpr.GetMatchLen (Idx : integer) : integer;
+ begin
+  if (Idx >= 0) and (Idx < NSUBEXP) and Assigned (fInputString)
+     and Assigned (startp [Idx]) and Assigned (endp [Idx]) then begin
+     Result := endp [Idx] - startp [Idx];
+    end
+   else Result := -1;
+ end; { of function TRegExpr.GetMatchLen
+--------------------------------------------------------------}
+
+function TRegExpr.GetMatch (Idx : integer) : RegExprString;
+ begin
+  if (Idx >= 0) and (Idx < NSUBEXP) and Assigned (fInputString)
+     and Assigned (startp [Idx]) and Assigned (endp [Idx])
+   //then Result := copy (fInputString, MatchPos [Idx], MatchLen [Idx]) //###0.929
+   then SetString (Result, startp [idx], endp [idx] - startp [idx])
+   else Result := '';
+ end; { of function TRegExpr.GetMatch
+--------------------------------------------------------------}
+
+function TRegExpr.GetModifierStr : RegExprString;
+ begin
+  Result := '-';
+
+  if ModifierI
+   then Result := 'i' + Result
+   else Result := Result + 'i';
+  if ModifierR
+   then Result := 'r' + Result
+   else Result := Result + 'r';
+  if ModifierS
+   then Result := 's' + Result
+   else Result := Result + 's';
+  if ModifierG
+   then Result := 'g' + Result
+   else Result := Result + 'g';
+  if ModifierM
+   then Result := 'm' + Result
+   else Result := Result + 'm';
+  if ModifierX
+   then Result := 'x' + Result
+   else Result := Result + 'x';
+
+  if Result [length (Result)] = '-' // remove '-' if all modifiers are 'On'
+   then System.Delete (Result, length (Result), 1);
+ end; { of function TRegExpr.GetModifierStr
+--------------------------------------------------------------}
+
+class function TRegExpr.ParseModifiersStr (const AModifiers : RegExprString;
+var AModifiersInt : integer) : boolean;
+// !!! Be carefull - this is class function and must not use object instance fields
+ var
+  i : integer;
+  IsOn : boolean;
+  Mask : integer;
+ begin
+  Result := true;
+  IsOn := true;
+  Mask := 0; // prevent compiler warning
+  for i := 1 to length (AModifiers) do
+   if AModifiers [i] = '-'
+    then IsOn := false
+    else begin
+      if Pos (AModifiers [i], 'iI') > 0
+       then Mask := MaskModI
+      else if Pos (AModifiers [i], 'rR') > 0
+       then Mask := MaskModR
+      else if Pos (AModifiers [i], 'sS') > 0
+       then Mask := MaskModS
+      else if Pos (AModifiers [i], 'gG') > 0
+       then Mask := MaskModG
+      else if Pos (AModifiers [i], 'mM') > 0
+       then Mask := MaskModM
+      else if Pos (AModifiers [i], 'xX') > 0
+       then Mask := MaskModX
+      else begin
+        Result := false;
+        EXIT;
+       end;
+      if IsOn
+       then AModifiersInt := AModifiersInt or Mask
+       else AModifiersInt := AModifiersInt and not Mask;
+     end;
+ end; { of function TRegExpr.ParseModifiersStr
+--------------------------------------------------------------}
+
+procedure TRegExpr.SetModifierStr (const AModifiers : RegExprString);
+ begin
+  if not ParseModifiersStr (AModifiers, fModifiers)
+   then Error (reeModifierUnsupported);
+ end; { of procedure TRegExpr.SetModifierStr
+--------------------------------------------------------------}
+
+function TRegExpr.GetModifier (AIndex : integer) : boolean;
+ var
+  Mask : integer;
+ begin
+  Result := false;
+  case AIndex of
+    1: Mask := MaskModI;
+    2: Mask := MaskModR;
+    3: Mask := MaskModS;
+    4: Mask := MaskModG;
+    5: Mask := MaskModM;
+    6: Mask := MaskModX;
+    else begin
+      Error (reeModifierUnsupported);
+      EXIT;
+     end;
+   end;
+  Result := (fModifiers and Mask) <> 0;
+ end; { of function TRegExpr.GetModifier
+--------------------------------------------------------------}
+
+procedure TRegExpr.SetModifier (AIndex : integer; ASet : boolean);
+ var
+  Mask : integer;
+ begin
+  case AIndex of
+    1: Mask := MaskModI;
+    2: Mask := MaskModR;
+    3: Mask := MaskModS;
+    4: Mask := MaskModG;
+    5: Mask := MaskModM;
+    6: Mask := MaskModX;
+    else begin
+      Error (reeModifierUnsupported);
+      EXIT;
+     end;
+   end;
+  if ASet
+   then fModifiers := fModifiers or Mask
+   else fModifiers := fModifiers and not Mask;
+ end; { of procedure TRegExpr.SetModifier
+--------------------------------------------------------------}
+
+
+{=============================================================}
+{==================== Compiler section =======================}
+{=============================================================}
+
+procedure TRegExpr.InvalidateProgramm;
+ begin
+  if programm <> nil then begin
+    FreeMem (programm);
+    programm := nil;
+   end;
+ end; { of procedure TRegExpr.InvalidateProgramm
+--------------------------------------------------------------}
+
+procedure TRegExpr.Compile; //###0.941
+ begin
+  if fExpression = nil then begin // No Expression assigned
+    Error (reeNoExpression);
+    EXIT;
+   end;
+  CompileRegExpr (fExpression);
+ end; { of procedure TRegExpr.Compile
+--------------------------------------------------------------}
+
+function TRegExpr.IsProgrammOk : boolean;
+ {$IFNDEF UniCode}
+ var
+  i : integer;
+ {$ENDIF}
+ begin
+  Result := false;
+
+  // check modifiers
+  if fModifiers <> fProgModifiers //###0.941
+   then InvalidateProgramm;
+
+  // can we optimize line separators by using sets?
+  {$IFNDEF UniCode}
+  fLineSeparatorsSet := [];
+  for i := 1 to length (fLineSeparators)
+   do System.Include (fLineSeparatorsSet, fLineSeparators [i]);
+  {$ENDIF}
+
+  // [Re]compile if needed
+  if programm = nil
+   then Compile; //###0.941
+
+  // check [re]compiled programm
+  if programm = nil
+   then EXIT // error was set/raised by Compile (was reeExecAfterCompErr)
+  else if programm [0] <> MAGIC // Program corrupted.
+   then Error (reeCorruptedProgram)
+  else Result := true;
+ end; { of function TRegExpr.IsProgrammOk
+--------------------------------------------------------------}
+
+procedure TRegExpr.Tail (p : PRegExprChar; val : PRegExprChar);
+// set the next-pointer at the end of a node chain
+ var
+  scan : PRegExprChar;
+  temp : PRegExprChar;
+ begin
+  if p = @regdummy
+   then EXIT;
+  // Find last node.
+  scan := p;
+  REPEAT
+   temp := regnext (scan);
+   if temp = nil
+    then BREAK;
+   scan := temp;
+  UNTIL false;
+  // Set Next 'pointer'
+  PRENextOff (scan + REOpSz)^ := val - scan; //###0.933
+ end; { of procedure TRegExpr.Tail
+--------------------------------------------------------------}
+
+procedure TRegExpr.OpTail (p : PRegExprChar; val : PRegExprChar);
+// regtail on operand of first argument; nop if operandless
+ begin
+  // "Operandless" and "op != BRANCH" are synonymous in practice.
+  if (p = nil) or (p = @regdummy) or (PREOp (p)^ <> BRANCH)
+   then EXIT;
+  Tail (p + REOpSz + RENextOffSz, val); //###0.933
+ end; { of procedure TRegExpr.OpTail
+--------------------------------------------------------------}
+
+function TRegExpr.EmitNode (op : TREOp) : PRegExprChar; //###0.933
+// emit a node, return location
+ begin
+  Result := regcode;
+  if Result <> @regdummy then begin
+     PREOp (regcode)^ := op;
+     inc (regcode, REOpSz);
+     PRENextOff (regcode)^ := 0; // Next "pointer" := nil
+     inc (regcode, RENextOffSz);
+    end
+   else inc (regsize, REOpSz + RENextOffSz); // compute code size without code generation
+ end; { of function TRegExpr.EmitNode
+--------------------------------------------------------------}
+
+procedure TRegExpr.EmitC (b : REChar);
+// emit a byte to code
+ begin
+  if regcode <> @regdummy then begin
+     regcode^ := b;
+     inc (regcode);
+    end
+   else inc (regsize); // Type of p-code pointer always is ^REChar
+ end; { of procedure TRegExpr.EmitC
+--------------------------------------------------------------}
+
+procedure TRegExpr.InsertOperator (op : TREOp; opnd : PRegExprChar; sz : integer);
+// insert an operator in front of already-emitted operand
+// Means relocating the operand.
+ var
+  src, dst, place : PRegExprChar;
+  i : integer;
+ begin
+  if regcode = @regdummy then begin
+    inc (regsize, sz);
+    EXIT;
+   end;
+  src := regcode;
+  inc (regcode, sz);
+  dst := regcode;
+  while src > opnd do begin
+    dec (dst);
+    dec (src);
+    dst^ := src^;
+   end;
+  place := opnd; // Op node, where operand used to be.
+  PREOp (place)^ := op;
+  inc (place, REOpSz);
+  for i := 1 + REOpSz to sz do begin
+    place^ := #0;
+    inc (place);
+   end;
+ end; { of procedure TRegExpr.InsertOperator
+--------------------------------------------------------------}
+
+function strcspn (s1 : PRegExprChar; s2 : PRegExprChar) : integer;
+// find length of initial segment of s1 consisting
+// entirely of characters not from s2
+ var scan1, scan2 : PRegExprChar;
+ begin
+  Result := 0;
+  scan1 := s1;
+  while scan1^ <> #0 do begin
+    scan2 := s2;
+    while scan2^ <> #0 do
+     if scan1^ = scan2^
+      then EXIT
+      else inc (scan2);
+    inc (Result);
+    inc (scan1)
+   end;
+ end; { of function strcspn
+--------------------------------------------------------------}
+
+const
+// Flags to be passed up and down.
+ HASWIDTH =   01; // Known never to match nil string.
+ SIMPLE   =   02; // Simple enough to be STAR/PLUS/BRACES operand.
+ SPSTART  =   04; // Starts with * or +.
+ WORST    =   0;  // Worst case.
+ META : array [0 .. 12] of REChar = (
+  '^', '$', '.', '[', '(', ')', '|', '?', '+', '*', '\', '{', #0);
+ // Any modification must be synchronized with QuoteRegExprMetaChars !!!
+
+{$IFDEF UniCode}
+ RusRangeLo : array [0 .. 33] of REChar =
+  (#$430,#$431,#$432,#$433,#$434,#$435,#$451,#$436,#$437,
+   #$438,#$439,#$43A,#$43B,#$43C,#$43D,#$43E,#$43F,
+   #$440,#$441,#$442,#$443,#$444,#$445,#$446,#$447,
+   #$448,#$449,#$44A,#$44B,#$44C,#$44D,#$44E,#$44F,#0);
+ RusRangeHi : array [0 .. 33] of REChar =
+  (#$410,#$411,#$412,#$413,#$414,#$415,#$401,#$416,#$417,
+   #$418,#$419,#$41A,#$41B,#$41C,#$41D,#$41E,#$41F,
+   #$420,#$421,#$422,#$423,#$424,#$425,#$426,#$427,
+   #$428,#$429,#$42A,#$42B,#$42C,#$42D,#$42E,#$42F,#0);
+ RusRangeLoLow = #$430{'à'};
+ RusRangeLoHigh = #$44F{'ÿ'};
+ RusRangeHiLow = #$410{'À'};
+ RusRangeHiHigh = #$42F{'ß'};
+{$ELSE}
+ RusRangeLo = 'àáâãäå¸æçèéêëìíîïðñòóôõö÷øùúûüýþÿ';
+ RusRangeHi = 'ÀÁÂÃÄŨÆÇÈÉÊËÌÍÎÏÐÑÒÓÔÕÖ×ØÙÚÛÜÝÞß';
+ RusRangeLoLow = 'à';
+ RusRangeLoHigh = 'ÿ';
+ RusRangeHiLow = 'À';
+ RusRangeHiHigh = 'ß';
+{$ENDIF}
+
+function TRegExpr.CompileRegExpr (exp : PRegExprChar) : boolean;
+// compile a regular expression into internal code
+// We can't allocate space until we know how big the compiled form will be,
+// but we can't compile it (and thus know how big it is) until we've got a
+// place to put the code.  So we cheat:  we compile it twice, once with code
+// generation turned off and size counting turned on, and once "for real".
+// This also means that we don't allocate space until we are sure that the
+// thing really will compile successfully, and we never have to move the
+// code and thus invalidate pointers into it.  (Note that it has to be in
+// one piece because free() must be able to free it all.)
+// Beware that the optimization-preparation code in here knows about some
+// of the structure of the compiled regexp.
+ var
+  scan, longest : PRegExprChar;
+  len : cardinal;
+  flags : integer;
+ begin
+  Result := false; // life too dark
+
+  regparse := nil; // for correct error handling
+  regexpbeg := exp;
+  try
+
+  if programm <> nil then begin
+    FreeMem (programm);
+    programm := nil;
+   end;
+
+  if exp = nil then begin
+    Error (reeCompNullArgument);
+    EXIT;
+   end;
+
+  fProgModifiers := fModifiers;
+  // well, may it's paranoia. I'll check it later... !!!!!!!!
+
+  // First pass: determine size, legality.
+  fCompModifiers := fModifiers;
+  regparse := exp;
+  regnpar := 1;
+  regsize := 0;
+  regcode := @regdummy;
+  EmitC (MAGIC);
+  if ParseReg (0, flags) = nil
+   then EXIT;
+
+  // Small enough for 2-bytes programm pointers ?
+  // ###0.933 no real p-code length limits now :)))
+//  if regsize >= 64 * 1024 then begin
+//    Error (reeCompRegexpTooBig);
+//    EXIT;
+//   end;
+
+  // Allocate space.
+  GetMem (programm, regsize * SizeOf (REChar));
+
+  // Second pass: emit code.
+  fCompModifiers := fModifiers;
+  regparse := exp;
+  regnpar := 1;
+  regcode := programm;
+  EmitC (MAGIC);
+  if ParseReg (0, flags) = nil
+   then EXIT;
+
+  // Dig out information for optimizations.
+  {$IFDEF UseFirstCharSet} //###0.929
+  FirstCharSet := [];
+  FillFirstCharSet (programm + REOpSz);
+  {$ENDIF}
+  regstart := #0; // Worst-case defaults.
+  reganch := #0;
+  regmust := nil;
+  regmlen := 0;
+  scan := programm + REOpSz; // First BRANCH.
+  if PREOp (regnext (scan))^ = EEND then begin // Only one top-level choice.
+    scan := scan + REOpSz + RENextOffSz;
+
+    // Starting-point info.
+    if PREOp (scan)^ = EXACTLY
+     then regstart := (scan + REOpSz + RENextOffSz)^
+     else if PREOp (scan)^ = BOL
+           then inc (reganch);
+
+    // If there's something expensive in the r.e., find the longest
+    // literal string that must appear and make it the regmust.  Resolve
+    // ties in favor of later strings, since the regstart check works
+    // with the beginning of the r.e. and avoiding duplication
+    // strengthens checking.  Not a strong reason, but sufficient in the
+    // absence of others.
+    if (flags and SPSTART) <> 0 then begin
+        longest := nil;
+        len := 0;
+        while scan <> nil do begin
+          if (PREOp (scan)^ = EXACTLY)
+             and (strlen (scan + REOpSz + RENextOffSz) >= len) then begin
+              longest := scan + REOpSz + RENextOffSz;
+              len := strlen (longest);
+           end;
+          scan := regnext (scan);
+         end;
+        regmust := longest;
+        regmlen := len;
+     end;
+   end;
+
+  Result := true;
+
+  finally begin
+    if not Result
+     then InvalidateProgramm;
+    regexpbeg := nil;
+    fExprIsCompiled := Result; //###0.944
+   end;
+  end;
+
+ end; { of function TRegExpr.CompileRegExpr
+--------------------------------------------------------------}
+
+function TRegExpr.ParseReg (paren : integer; var flagp : integer) : PRegExprChar;
+// regular expression, i.e. main body or parenthesized thing
+// Caller must absorb opening parenthesis.
+// Combining parenthesis handling with the base level of regular expression
+// is a trifle forced, but the need to tie the tails of the branches to what
+// follows makes it hard to avoid.
+ var
+  ret, br, ender : PRegExprChar;
+  parno : integer;
+  flags : integer;
+  SavedModifiers : integer;
+ begin
+  Result := nil;
+  flagp := HASWIDTH; // Tentatively.
+  parno := 0; // eliminate compiler stupid warning
+  SavedModifiers := fCompModifiers;
+
+  // Make an OPEN node, if parenthesized.
+  if paren <> 0 then begin
+      if regnpar >= NSUBEXP then begin
+        Error (reeCompParseRegTooManyBrackets);
+        EXIT;
+       end;
+      parno := regnpar;
+      inc (regnpar);
+      ret := EmitNode (TREOp (ord (OPEN) + parno));
+    end
+   else ret := nil;
+
+  // Pick up the branches, linking them together.
+  br := ParseBranch (flags);
+  if br = nil then begin
+    Result := nil;
+    EXIT;
+   end;
+  if ret <> nil
+   then Tail (ret, br) // OPEN -> first.
+   else ret := br;
+  if (flags and HASWIDTH) = 0
+   then flagp := flagp and not HASWIDTH;
+  flagp := flagp or flags and SPSTART;
+  while (regparse^ = '|') do begin
+    inc (regparse);
+    br := ParseBranch (flags);
+    if br = nil then begin
+       Result := nil;
+       EXIT;
+      end;
+    Tail (ret, br); // BRANCH -> BRANCH.
+    if (flags and HASWIDTH) = 0
+     then flagp := flagp and not HASWIDTH;
+    flagp := flagp or flags and SPSTART;
+   end;
+
+  // Make a closing node, and hook it on the end.
+  if paren <> 0
+   then ender := EmitNode (TREOp (ord (CLOSE) + parno))
+   else ender := EmitNode (EEND);
+  Tail (ret, ender);
+
+  // Hook the tails of the branches to the closing node.
+  br := ret;
+  while br <> nil do begin
+    OpTail (br, ender);
+    br := regnext (br);
+   end;
+
+  // Check for proper termination.
+  if paren <> 0 then
+   if regparse^ <> ')' then begin
+      Error (reeCompParseRegUnmatchedBrackets);
+      EXIT;
+     end
+    else inc (regparse); // skip trailing ')'
+  if (paren = 0) and (regparse^ <> #0) then begin
+      if regparse^ = ')'
+       then Error (reeCompParseRegUnmatchedBrackets2)
+       else Error (reeCompParseRegJunkOnEnd);
+      EXIT;
+    end;
+  fCompModifiers := SavedModifiers; // restore modifiers of parent
+  Result := ret;
+ end; { of function TRegExpr.ParseReg
+--------------------------------------------------------------}
+
+function TRegExpr.ParseBranch (var flagp : integer) : PRegExprChar;
+// one alternative of an | operator
+// Implements the concatenation operator.
+ var
+  ret, chain, latest : PRegExprChar;
+  flags : integer;
+ begin
+  flagp := WORST; // Tentatively.
+
+  ret := EmitNode (BRANCH);
+  chain := nil;
+  while (regparse^ <> #0) and (regparse^ <> '|')
+        and (regparse^ <> ')') do begin
+    latest := ParsePiece (flags);
+    if latest = nil then begin
+      Result := nil;
+      EXIT;
+     end;
+    flagp := flagp or flags and HASWIDTH;
+    if chain = nil // First piece.
+     then flagp := flagp or flags and SPSTART
+     else Tail (chain, latest);
+    chain := latest;
+   end;
+  if chain = nil // Loop ran zero times.
+   then EmitNode (NOTHING);
+  Result := ret;
+ end; { of function TRegExpr.ParseBranch
+--------------------------------------------------------------}
+
+function TRegExpr.ParsePiece (var flagp : integer) : PRegExprChar;
+// something followed by possible [*+?{]
+// Note that the branching code sequences used for ? and the general cases
+// of * and + and { are somewhat optimized:  they use the same NOTHING node as
+// both the endmarker for their branch list and the body of the last branch.
+// It might seem that this node could be dispensed with entirely, but the
+// endmarker role is not redundant.
+ function parsenum (AStart, AEnd : PRegExprChar) : TREBracesArg;
+  begin
+   Result := 0;
+   if AEnd - AStart + 1 > 8 then begin // prevent stupid scanning
+     Error (reeBRACESArgTooBig);
+     EXIT;
+    end;
+   while AStart <= AEnd do begin
+       Result := Result * 10 + (ord (AStart^) - ord ('0'));
+       inc (AStart);
+      end;
+   if (Result > MaxBracesArg) or (Result < 0) then begin
+     Error (reeBRACESArgTooBig);
+     EXIT;
+    end;
+  end;
+
+ var
+  op : REChar;
+  NonGreedyOp, NonGreedyCh : boolean; //###0.940
+  TheOp : TREOp; //###0.940
+  NextNode : PRegExprChar;
+  flags : integer;
+  BracesMin, Bracesmax : TREBracesArg;
+  p, savedparse : PRegExprChar;
+
+ procedure EmitComplexBraces (ABracesMin, ABracesMax : TREBracesArg;
+   ANonGreedyOp : boolean); //###0.940
+  {$IFDEF ComplexBraces}
+  var
+   off : integer;
+  {$ENDIF}
+   begin
+   {$IFNDEF ComplexBraces}
+   Error (reeComplexBracesNotImplemented);
+   {$ELSE}
+   if ANonGreedyOp
+    then TheOp := LOOPNG
+    else TheOp := LOOP;
+   InsertOperator (LOOPENTRY, Result, REOpSz + RENextOffSz);
+   NextNode := EmitNode (TheOp);
+   if regcode <> @regdummy then begin
+      off := (Result + REOpSz + RENextOffSz)
+       - (regcode - REOpSz - RENextOffSz); // back to Atom after LOOPENTRY
+      PREBracesArg (regcode)^ := ABracesMin;
+      inc (regcode, REBracesArgSz);
+      PREBracesArg (regcode)^ := ABracesMax;
+      inc (regcode, REBracesArgSz);
+      PRENextOff (regcode)^ := off;
+      inc (regcode, RENextOffSz);
+     end
+    else inc (regsize, REBracesArgSz * 2 + RENextOffSz);
+   Tail (Result, NextNode); // LOOPENTRY -> LOOP
+   if regcode <> @regdummy then
+    Tail (Result + REOpSz + RENextOffSz, NextNode); // Atom -> LOOP
+   {$ENDIF}
+  end;
+
+ procedure EmitSimpleBraces (ABracesMin, ABracesMax : TREBracesArg;
+   ANonGreedyOp : boolean); //###0.940
+  begin
+   if ANonGreedyOp //###0.940
+    then TheOp := BRACESNG
+    else TheOp := BRACES;
+   InsertOperator (TheOp, Result, REOpSz + RENextOffSz + REBracesArgSz * 2);
+   if regcode <> @regdummy then begin
+     PREBracesArg (Result + REOpSz + RENextOffSz)^ := ABracesMin;
+     PREBracesArg (Result + REOpSz + RENextOffSz + REBracesArgSz)^ := ABracesMax;
+    end;
+  end;
+
+ begin
+  Result := ParseAtom (flags);
+  if Result = nil
+   then EXIT;
+
+  op := regparse^;
+  if not ((op = '*') or (op = '+') or (op = '?') or (op = '{')) then begin
+    flagp := flags;
+    EXIT;
+   end;
+  if ((flags and HASWIDTH) = 0) and (op <> '?') then begin
+    Error (reePlusStarOperandCouldBeEmpty);
+    EXIT;
+   end;
+
+  case op of
+    '*': begin
+      flagp := WORST or SPSTART;
+      NonGreedyCh := (regparse + 1)^ = '?'; //###0.940
+      NonGreedyOp := NonGreedyCh or ((fCompModifiers and MaskModG) = 0); //###0.940
+      if (flags and SIMPLE) = 0 then begin
+         if NonGreedyOp //###0.940
+          then EmitComplexBraces (0, MaxBracesArg, NonGreedyOp)
+          else begin // Emit x* as (x&|), where & means "self".
+            InsertOperator (BRANCH, Result, REOpSz + RENextOffSz); // Either x
+            OpTail (Result, EmitNode (BACK)); // and loop
+            OpTail (Result, Result); // back
+            Tail (Result, EmitNode (BRANCH)); // or
+            Tail (Result, EmitNode (NOTHING)); // nil.
+           end
+        end
+       else begin // Simple
+         if NonGreedyOp //###0.940
+          then TheOp := STARNG
+          else TheOp := STAR;
+         InsertOperator (TheOp, Result, REOpSz + RENextOffSz);
+        end;
+      if NonGreedyCh //###0.940
+       then inc (regparse); // Skip extra char ('?')
+     end; { of case '*'}
+    '+': begin
+      flagp := WORST or SPSTART or HASWIDTH;
+      NonGreedyCh := (regparse + 1)^ = '?'; //###0.940
+      NonGreedyOp := NonGreedyCh or ((fCompModifiers and MaskModG) = 0); //###0.940
+      if (flags and SIMPLE) = 0 then begin
+         if NonGreedyOp //###0.940
+          then EmitComplexBraces (1, MaxBracesArg, NonGreedyOp)
+          else begin // Emit x+ as x(&|), where & means "self".
+            NextNode := EmitNode (BRANCH); // Either
+            Tail (Result, NextNode);
+            Tail (EmitNode (BACK), Result);    // loop back
+            Tail (NextNode, EmitNode (BRANCH)); // or
+            Tail (Result, EmitNode (NOTHING)); // nil.
+           end
+        end
+       else begin // Simple
+         if NonGreedyOp //###0.940
+          then TheOp := PLUSNG
+          else TheOp := PLUS;
+         InsertOperator (TheOp, Result, REOpSz + RENextOffSz);
+        end;
+      if NonGreedyCh //###0.940
+       then inc (regparse); // Skip extra char ('?')
+     end; { of case '+'}
+    '?': begin
+      flagp := WORST;
+      NonGreedyCh := (regparse + 1)^ = '?'; //###0.940
+      NonGreedyOp := NonGreedyCh or ((fCompModifiers and MaskModG) = 0); //###0.940
+      if NonGreedyOp then begin //###0.940  // We emit x?? as x{0,1}?
+         if (flags and SIMPLE) = 0
+          then EmitComplexBraces (0, 1, NonGreedyOp)
+          else EmitSimpleBraces (0, 1, NonGreedyOp);
+        end
+       else begin // greedy '?'
+         InsertOperator (BRANCH, Result, REOpSz + RENextOffSz); // Either x
+         Tail (Result, EmitNode (BRANCH));  // or
+         NextNode := EmitNode (NOTHING); // nil.
+         Tail (Result, NextNode);
+         OpTail (Result, NextNode);
+        end;
+      if NonGreedyCh //###0.940
+       then inc (regparse); // Skip extra char ('?')
+     end; { of case '?'}
+   '{': begin
+      savedparse := regparse;
+      // !!!!!!!!!!!!
+      // Filip Jirsak's note - what will happen, when we are at the end of regparse?
+      inc (regparse);
+      p := regparse;
+      while Pos (regparse^, '0123456789') > 0  // <min> MUST appear
+       do inc (regparse);
+      if (regparse^ <> '}') and (regparse^ <> ',') or (p = regparse) then begin
+        regparse := savedparse;
+        flagp := flags;
+        EXIT;
+       end;
+      BracesMin := parsenum (p, regparse - 1);
+      if regparse^ = ',' then begin
+         inc (regparse);
+         p := regparse;
+         while Pos (regparse^, '0123456789') > 0
+          do inc (regparse);
+         if regparse^ <> '}' then begin
+           regparse := savedparse;
+           EXIT;
+          end;
+         if p = regparse
+          then BracesMax := MaxBracesArg
+          else BracesMax := parsenum (p, regparse - 1);
+        end
+       else BracesMax := BracesMin; // {n} == {n,n}
+      if BracesMin > BracesMax then begin
+        Error (reeBracesMinParamGreaterMax);
+        EXIT;
+       end;
+      if BracesMin > 0
+       then flagp := WORST;
+      if BracesMax > 0
+       then flagp := flagp or HASWIDTH or SPSTART;
+
+      NonGreedyCh := (regparse + 1)^ = '?'; //###0.940
+      NonGreedyOp := NonGreedyCh or ((fCompModifiers and MaskModG) = 0); //###0.940
+      if (flags and SIMPLE) <> 0
+       then EmitSimpleBraces (BracesMin, BracesMax, NonGreedyOp)
+       else EmitComplexBraces (BracesMin, BracesMax, NonGreedyOp);
+      if NonGreedyCh //###0.940
+       then inc (regparse); // Skip extra char '?'
+     end; // of case '{'
+//    else // here we can't be
+   end; { of case op}
+
+  inc (regparse);
+  if (regparse^ = '*') or (regparse^ = '+') or (regparse^ = '?') or (regparse^ = '{') then begin
+    Error (reeNestedSQP);
+    EXIT;
+   end;
+ end; { of function TRegExpr.ParsePiece
+--------------------------------------------------------------}
+
+function TRegExpr.ParseAtom (var flagp : integer) : PRegExprChar;
+// the lowest level
+// Optimization:  gobbles an entire sequence of ordinary characters so that
+// it can turn them into a single node, which is smaller to store and
+// faster to run.  Backslashed characters are exceptions, each becoming a
+// separate node; the code is simpler that way and it's not worth fixing.
+ var
+  ret : PRegExprChar;
+  flags : integer;
+  RangeBeg, RangeEnd : REChar;
+  CanBeRange : boolean;
+  len : integer;
+  ender : REChar;
+  begmodfs : PRegExprChar;
+
+  {$IFDEF UseSetOfChar} //###0.930
+  RangePCodeBeg : PRegExprChar;
+  RangePCodeIdx : integer;
+  RangeIsCI : boolean;
+  RangeSet : TSetOfREChar;
+  RangeLen : integer;
+  RangeChMin, RangeChMax : REChar;
+  {$ENDIF}
+
+ procedure EmitExactly (ch : REChar);
+  begin
+   if (fCompModifiers and MaskModI) <> 0
+    then ret := EmitNode (EXACTLYCI)
+    else ret := EmitNode (EXACTLY);
+   EmitC (ch);
+   EmitC (#0);
+   flagp := flagp or HASWIDTH or SIMPLE;
+  end;
+
+ procedure EmitStr (const s : RegExprString);
+  var i : integer;
+  begin
+   for i := 1 to length (s)
+    do EmitC (s [i]);
+  end;
+
+ function HexDig (ch : REChar) : integer;
+  begin
+   Result := 0;
+   if (ch >= 'a') and (ch <= 'f')
+    then ch := REChar (ord (ch) - (ord ('a') - ord ('A')));
+   if (ch < '0') or (ch > 'F') or ((ch > '9') and (ch < 'A')) then begin
+     Error (reeBadHexDigit);
+     EXIT;
+    end;
+   Result := ord (ch) - ord ('0');
+   if ch >= 'A'
+    then Result := Result - (ord ('A') - ord ('9') - 1);
+  end;
+
+ function EmitRange (AOpCode : REChar) : PRegExprChar;
+  begin
+   {$IFDEF UseSetOfChar}
+   case AOpCode of
+     ANYBUTCI, ANYBUT:
+       Result := EmitNode (ANYBUTTINYSET);
+     else // ANYOFCI, ANYOF
+       Result := EmitNode (ANYOFTINYSET);
+    end;
+   case AOpCode of
+     ANYBUTCI, ANYOFCI:
+       RangeIsCI := True;
+     else // ANYBUT, ANYOF
+       RangeIsCI := False;
+    end;
+   RangePCodeBeg := regcode;
+   RangePCodeIdx := regsize;
+   RangeLen := 0;
+   RangeSet := [];
+   RangeChMin := #255;
+   RangeChMax := #0;
+   {$ELSE}
+   Result := EmitNode (AOpCode);
+   // ToDo:
+   // !!!!!!!!!!!!! Implement ANYOF[BUT]TINYSET generation for UniCode !!!!!!!!!!
+   {$ENDIF}
+  end;
+
+{$IFDEF UseSetOfChar}
+ procedure EmitRangeCPrim (b : REChar); //###0.930
+  begin
+   if b in RangeSet
+    then EXIT;
+   inc (RangeLen);
+   if b < RangeChMin
+    then RangeChMin := b;
+   if b > RangeChMax
+    then RangeChMax := b;
+   Include (RangeSet, b);
+  end;
+ {$ENDIF}
+
+ procedure EmitRangeC (b : REChar);
+  {$IFDEF UseSetOfChar}
+  var
+   Ch : REChar;
+  {$ENDIF}
+  begin
+   CanBeRange := false;
+   {$IFDEF UseSetOfChar}
+    if b <> #0 then begin
+       EmitRangeCPrim (b); //###0.930
+       if RangeIsCI
+        then EmitRangeCPrim (InvertCase (b)); //###0.930
+      end
+     else begin
+       Assert (RangeLen > 0, 'TRegExpr.ParseAtom(subroutine EmitRangeC): empty range'); // impossible, but who knows..
+       Assert (RangeChMin <= RangeChMax, 'TRegExpr.ParseAtom(subroutine EmitRangeC): RangeChMin > RangeChMax'); // impossible, but who knows..
+       if RangeLen <= TinySetLen then begin // emit "tiny set"
+          if regcode = @regdummy then begin
+            regsize := RangePCodeIdx + TinySetLen; // RangeChMin/Max !!!
+            EXIT;
+           end;
+          regcode := RangePCodeBeg;
+          for Ch := RangeChMin to RangeChMax do //###0.930
+           if Ch in RangeSet then begin
+             regcode^ := Ch;
+             inc (regcode);
+            end;
+          // fill rest:
+          while regcode < RangePCodeBeg + TinySetLen do begin
+            regcode^ := RangeChMax;
+            inc (regcode);
+           end;
+         end
+        else begin
+          if regcode = @regdummy then begin
+            regsize := RangePCodeIdx + SizeOf (TSetOfREChar);
+            EXIT;
+           end;
+          if (RangePCodeBeg - REOpSz - RENextOffSz)^ = ANYBUTTINYSET
+           then RangeSet := [#0 .. #255] - RangeSet;
+          PREOp (RangePCodeBeg - REOpSz - RENextOffSz)^ := ANYOFFULLSET;
+          regcode := RangePCodeBeg;
+          Move (RangeSet, regcode^, SizeOf (TSetOfREChar));
+          inc (regcode, SizeOf (TSetOfREChar));
+         end;
+      end;
+   {$ELSE}
+   EmitC (b);
+   {$ENDIF}
+  end;
+
+ procedure EmitSimpleRangeC (b : REChar);
+  begin
+   RangeBeg := b;
+   EmitRangeC (b);
+   CanBeRange := true;
+  end;
+
+ procedure EmitRangeStr (const s : RegExprString);
+  var i : integer;
+  begin
+   for i := 1 to length (s)
+    do EmitRangeC (s [i]);
+  end;
+
+ function UnQuoteChar (var APtr : PRegExprChar) : REChar; //###0.934
+  begin
+   case APtr^ of
+     't': Result := #$9;  // tab (HT/TAB)
+     'n': Result := #$a;  // newline (NL)
+     'r': Result := #$d;  // car.return (CR)
+     'f': Result := #$c;  // form feed (FF)
+     'a': Result := #$7;  // alarm (bell) (BEL)
+     'e': Result := #$1b; // escape (ESC)
+     'x': begin // hex char
+       Result := #0;
+       inc (APtr);
+       if APtr^ = #0 then begin
+         Error (reeNoHexCodeAfterBSlashX);
+         EXIT;
+        end;
+       if APtr^ = '{' then begin // \x{nnnn} //###0.936
+          REPEAT
+           inc (APtr);
+           if APtr^ = #0 then begin
+             Error (reeNoHexCodeAfterBSlashX);
+             EXIT;
+            end;
+           if APtr^ <> '}' then begin
+              if (Ord (Result)
+                  ShR (SizeOf (REChar) * 8 - 4)) and $F <> 0 then begin
+                Error (reeHexCodeAfterBSlashXTooBig);
+                EXIT;
+               end;
+              Result := REChar ((Ord (Result) ShL 4) or HexDig (APtr^));
+              // HexDig will cause Error if bad hex digit found
+             end
+            else BREAK;
+          UNTIL False;
+         end
+        else begin
+          Result := REChar (HexDig (APtr^));
+          // HexDig will cause Error if bad hex digit found
+          inc (APtr);
+          if APtr^ = #0 then begin
+            Error (reeNoHexCodeAfterBSlashX);
+            EXIT;
+           end;
+          Result := REChar ((Ord (Result) ShL 4) or HexDig (APtr^));
+          // HexDig will cause Error if bad hex digit found
+         end;
+      end;
+     else Result := APtr^;
+    end;
+  end;
+
+ begin
+  Result := nil;
+  flagp := WORST; // Tentatively.
+
+  inc (regparse);
+  case (regparse - 1)^ of
+    '^': if ((fCompModifiers and MaskModM) = 0)
+           or ((fLineSeparators = '') and not fLinePairedSeparatorAssigned)
+          then ret := EmitNode (BOL)
+          else ret := EmitNode (BOLML);
+    '$': if ((fCompModifiers and MaskModM) = 0)
+           or ((fLineSeparators = '') and not fLinePairedSeparatorAssigned)
+          then ret := EmitNode (EOL)
+          else ret := EmitNode (EOLML);
+    '.':
+       if (fCompModifiers and MaskModS) <> 0 then begin
+          ret := EmitNode (ANY);
+          flagp := flagp or HASWIDTH or SIMPLE;
+         end
+        else begin // not /s, so emit [^:LineSeparators:]
+          ret := EmitNode (ANYML);
+          flagp := flagp or HASWIDTH; // not so simple ;)
+//          ret := EmitRange (ANYBUT);
+//          EmitRangeStr (LineSeparators); //###0.941
+//          EmitRangeStr (LinePairedSeparator); // !!! isn't correct if have to accept only paired
+//          EmitRangeC (#0);
+//          flagp := flagp or HASWIDTH or SIMPLE;
+         end;
+    '[': begin
+        if regparse^ = '^' then begin // Complement of range.
+           if (fCompModifiers and MaskModI) <> 0
+            then ret := EmitRange (ANYBUTCI)
+            else ret := EmitRange (ANYBUT);
+           inc (regparse);
+          end
+         else
+          if (fCompModifiers and MaskModI) <> 0
+           then ret := EmitRange (ANYOFCI)
+           else ret := EmitRange (ANYOF);
+
+        CanBeRange := false;
+
+        if (regparse^ = ']') then begin
+          EmitSimpleRangeC (regparse^); // []-a] -> ']' .. 'a'
+          inc (regparse);
+         end;
+
+        while (regparse^ <> #0) and (regparse^ <> ']') do begin
+          if (regparse^ = '-')
+              and ((regparse + 1)^ <> #0) and ((regparse + 1)^ <> ']')
+              and CanBeRange then begin
+             inc (regparse);
+             RangeEnd := regparse^;
+             if RangeEnd = '\' then begin
+// Eugene: 20080407
+//               {$IFDEF UniCode} //###0.935
+//               if (ord ((regparse + 1)^) < 256)
+//                  and (char ((regparse + 1)^) in ['d', 'D', 's', 'S', 'w', 'W']) then begin
+//               {$ELSE}
+               if CharInSet((regparse + 1)^ , ['d', 'D', 's', 'S', 'w', 'W']) then begin
+//               {$ENDIF}
+                 EmitRangeC ('-'); // or treat as error ?!!
+                 CONTINUE;
+                end;
+               inc (regparse);
+               RangeEnd := UnQuoteChar (regparse);
+              end;
+
+             // r.e.ranges extension for russian
+             if ((fCompModifiers and MaskModR) <> 0)
+                and (RangeBeg = RusRangeLoLow) and (RangeEnd = RusRangeLoHigh) then begin
+               EmitRangeStr (RusRangeLo);
+              end
+             else if ((fCompModifiers and MaskModR) <> 0)
+                 and (RangeBeg = RusRangeHiLow) and (RangeEnd = RusRangeHiHigh) then begin
+               EmitRangeStr (RusRangeHi);
+              end
+             else if ((fCompModifiers and MaskModR) <> 0)
+                  and (RangeBeg = RusRangeLoLow) and (RangeEnd = RusRangeHiHigh) then begin
+               EmitRangeStr (RusRangeLo);
+               EmitRangeStr (RusRangeHi);
+              end
+             else begin // standard r.e. handling
+               if RangeBeg > RangeEnd then begin
+                 Error (reeInvalidRange);
+                 EXIT;
+                end;
+               inc (RangeBeg);
+               EmitRangeC (RangeEnd); // prevent infinite loop if RangeEnd=$ff
+               while RangeBeg < RangeEnd do begin //###0.929
+                 EmitRangeC (RangeBeg);
+                 inc (RangeBeg);
+                end;
+              end;
+             inc (regparse);
+            end
+           else begin
+             if regparse^ = '\' then begin
+                inc (regparse);
+                if regparse^ = #0 then begin
+                  Error (reeParseAtomTrailingBackSlash);
+                  EXIT;
+                 end;
+                case regparse^ of // r.e.extensions
+                  'd': EmitRangeStr ('0123456789');
+                  'w': EmitRangeStr (WordChars);
+                  's': EmitRangeStr (SpaceChars);
+                  else EmitSimpleRangeC (UnQuoteChar (regparse));
+                 end; { of case}
+               end
+              else EmitSimpleRangeC (regparse^);
+             inc (regparse);
+            end;
+         end; { of while}
+        EmitRangeC (#0);
+        if regparse^ <> ']' then begin
+          Error (reeUnmatchedSqBrackets);
+          EXIT;
+         end;
+        inc (regparse);
+        flagp := flagp or HASWIDTH or SIMPLE;
+      end;
+    '(': begin
+        if regparse^ = '?' then begin
+           // check for extended Perl syntax : (?..)
+           if (regparse + 1)^ = '#' then begin // (?#comment)
+              inc (regparse, 2); // find closing ')'
+              while (regparse^ <> #0) and (regparse^ <> ')')
+               do inc (regparse);
+              if regparse^ <> ')' then begin
+                Error (reeUnclosedComment);
+                EXIT;
+               end;
+              inc (regparse); // skip ')'
+              ret := EmitNode (COMMENT); // comment
+             end
+           else begin // modifiers ?
+             inc (regparse); // skip '?'
+             begmodfs := regparse;
+             while (regparse^ <> #0) and (regparse^ <> ')')
+              do inc (regparse);
+             if (regparse^ <> ')')
+                or not ParseModifiersStr (copy (begmodfs, 1, (regparse - begmodfs)), fCompModifiers) then begin
+               Error (reeUrecognizedModifier);
+               EXIT;
+              end;
+             inc (regparse); // skip ')'
+             ret := EmitNode (COMMENT); // comment
+//             Error (reeQPSBFollowsNothing);
+//             EXIT;
+            end;
+          end
+         else begin
+           ret := ParseReg (1, flags);
+           if ret = nil then begin
+             Result := nil;
+             EXIT;
+            end;
+           flagp := flagp or flags and (HASWIDTH or SPSTART);
+          end;
+      end;
+    #0, '|', ')': begin // Supposed to be caught earlier.
+       Error (reeInternalUrp);
+       EXIT;
+      end;
+    '?', '+', '*': begin
+       Error (reeQPSBFollowsNothing);
+       EXIT;
+      end;
+    '\': begin
+        if regparse^ = #0 then begin
+          Error (reeTrailingBackSlash);
+          EXIT;
+         end;
+        case regparse^ of // r.e.extensions
+          'b': ret := EmitNode (BOUND); //###0.943
+          'B': ret := EmitNode (NOTBOUND); //###0.943
+          'A': ret := EmitNode (BOL); //###0.941
+          'Z': ret := EmitNode (EOL); //###0.941
+          'd': begin // r.e.extension - any digit ('0' .. '9')
+             ret := EmitNode (ANYDIGIT);
+             flagp := flagp or HASWIDTH or SIMPLE;
+            end;
+          'D': begin // r.e.extension - not digit ('0' .. '9')
+             ret := EmitNode (NOTDIGIT);
+             flagp := flagp or HASWIDTH or SIMPLE;
+            end;
+          's': begin // r.e.extension - any space char
+             {$IFDEF UseSetOfChar}
+             ret := EmitRange (ANYOF);
+             EmitRangeStr (SpaceChars);
+             EmitRangeC (#0);
+             {$ELSE}
+             ret := EmitNode (ANYSPACE);
+             {$ENDIF}
+             flagp := flagp or HASWIDTH or SIMPLE;
+            end;
+          'S': begin // r.e.extension - not space char
+             {$IFDEF UseSetOfChar}
+             ret := EmitRange (ANYBUT);
+             EmitRangeStr (SpaceChars);
+             EmitRangeC (#0);
+             {$ELSE}
+             ret := EmitNode (NOTSPACE);
+             {$ENDIF}
+             flagp := flagp or HASWIDTH or SIMPLE;
+            end;
+          'w': begin // r.e.extension - any english char / digit / '_'
+             {$IFDEF UseSetOfChar}
+             ret := EmitRange (ANYOF);
+             EmitRangeStr (WordChars);
+             EmitRangeC (#0);
+             {$ELSE}
+             ret := EmitNode (ANYLETTER);
+             {$ENDIF}
+             flagp := flagp or HASWIDTH or SIMPLE;
+            end;
+          'W': begin // r.e.extension - not english char / digit / '_'
+             {$IFDEF UseSetOfChar}
+             ret := EmitRange (ANYBUT);
+             EmitRangeStr (WordChars);
+             EmitRangeC (#0);
+             {$ELSE}
+             ret := EmitNode (NOTLETTER);
+             {$ENDIF}
+             flagp := flagp or HASWIDTH or SIMPLE;
+            end;
+           '1' .. '9': begin //###0.936
+             if (fCompModifiers and MaskModI) <> 0
+              then ret := EmitNode (BSUBEXPCI)
+              else ret := EmitNode (BSUBEXP);
+             EmitC (REChar (ord (regparse^) - ord ('0')));
+             flagp := flagp or HASWIDTH or SIMPLE;
+            end;
+          else EmitExactly (UnQuoteChar (regparse));
+         end; { of case}
+        inc (regparse);
+      end;
+    else begin
+      dec (regparse);
+      if ((fCompModifiers and MaskModX) <> 0) and // check for eXtended syntax
+          ((regparse^ = '#')
+           or ({$IFDEF UniCode}StrScan (XIgnoredChars, regparse^) <> nil //###0.947
+               {$ELSE}regparse^ in XIgnoredChars{$ENDIF})) then begin //###0.941 \x
+         if regparse^ = '#' then begin // Skip eXtended comment
+            // find comment terminator (group of \n and/or \r)
+            while (regparse^ <> #0) and (regparse^ <> #$d) and (regparse^ <> #$a)
+             do inc (regparse);
+            while (regparse^ = #$d) or (regparse^ = #$a) // skip comment terminator
+             do inc (regparse); // attempt to support different type of line separators
+           end
+          else begin // Skip the blanks!
+            while {$IFDEF UniCode}StrScan (XIgnoredChars, regparse^) <> nil //###0.947
+                  {$ELSE}regparse^ in XIgnoredChars{$ENDIF}
+             do inc (regparse);
+           end;
+         ret := EmitNode (COMMENT); // comment
+        end
+       else begin
+         len := strcspn (regparse, META);
+         if len <= 0 then
+          if regparse^ <> '{' then begin
+             Error (reeRarseAtomInternalDisaster);
+             EXIT;
+            end
+           else len := strcspn (regparse + 1, META) + 1; // bad {n,m} - compile as EXATLY
+         ender := (regparse + len)^;
+         if (len > 1)
+            and ((ender = '*') or (ender = '+') or (ender = '?') or (ender = '{'))
+          then dec (len); // Back off clear of ?+*{ operand.
+         flagp := flagp or HASWIDTH;
+         if len = 1
+         then flagp := flagp or SIMPLE;
+         if (fCompModifiers and MaskModI) <> 0
+          then ret := EmitNode (EXACTLYCI)
+          else ret := EmitNode (EXACTLY);
+         while (len > 0)
+          and (((fCompModifiers and MaskModX) = 0) or (regparse^ <> '#')) do begin
+           if ((fCompModifiers and MaskModX) = 0) or not ( //###0.941
+              {$IFDEF UniCode}StrScan (XIgnoredChars, regparse^) <> nil //###0.947
+              {$ELSE}regparse^ in XIgnoredChars{$ENDIF} )
+            then EmitC (regparse^);
+           inc (regparse);
+           dec (len);
+          end;
+         EmitC (#0);
+        end; { of if not comment}
+     end; { of case else}
+   end; { of case}
+
+  Result := ret;
+ end; { of function TRegExpr.ParseAtom
+--------------------------------------------------------------}
+
+function TRegExpr.GetCompilerErrorPos : integer;
+ begin
+  Result := 0;
+  if (regexpbeg = nil) or (regparse = nil)
+   then EXIT; // not in compiling mode ?
+  Result := regparse - regexpbeg;
+ end; { of function TRegExpr.GetCompilerErrorPos
+--------------------------------------------------------------}
+
+
+{=============================================================}
+{===================== Matching section ======================}
+{=============================================================}
+
+{$IFNDEF UseSetOfChar}
+function TRegExpr.StrScanCI (s : PRegExprChar; ch : REChar) : PRegExprChar; //###0.928 - now method of TRegExpr
+ begin
+  while (s^ <> #0) and (s^ <> ch) and (s^ <> InvertCase (ch))
+   do inc (s);
+  if s^ <> #0
+   then Result := s
+   else Result := nil;
+ end; { of function TRegExpr.StrScanCI
+--------------------------------------------------------------}
+{$ENDIF}
+
+function TRegExpr.regrepeat (p : PRegExprChar; AMax : integer) : integer;
+// repeatedly match something simple, report how many
+ var
+  scan : PRegExprChar;
+  opnd : PRegExprChar;
+  TheMax : integer;
+  {Ch,} InvCh : REChar; //###0.931
+  sestart, seend : PRegExprChar; //###0.936
+ begin
+  Result := 0;
+  scan := reginput;
+  opnd := p + REOpSz + RENextOffSz; //OPERAND
+  TheMax := fInputEnd - scan;
+  if TheMax > AMax
+   then TheMax := AMax;
+  case PREOp (p)^ of
+    ANY: begin
+    // note - ANYML cannot be proceeded in regrepeat because can skip
+    // more than one char at once
+      Result := TheMax;
+      inc (scan, Result);
+     end;
+    EXACTLY: begin // in opnd can be only ONE char !!!
+//      Ch := opnd^; // store in register //###0.931
+      while (Result < TheMax) and (opnd^ = scan^) do begin
+        inc (Result);
+        inc (scan);
+       end;
+     end;
+    EXACTLYCI: begin // in opnd can be only ONE char !!!
+//      Ch := opnd^; // store in register //###0.931
+      while (Result < TheMax) and (opnd^ = scan^) do begin // prevent unneeded InvertCase //###0.931
+        inc (Result);
+        inc (scan);
+       end;
+      if Result < TheMax then begin //###0.931
+        InvCh := InvertCase (opnd^); // store in register
+        while (Result < TheMax) and
+              ((opnd^ = scan^) or (InvCh = scan^)) do begin
+          inc (Result);
+          inc (scan);
+         end;
+       end;
+     end;
+    BSUBEXP: begin //###0.936
+      sestart := startp [ord (opnd^)];
+      if sestart = nil
+       then EXIT;
+      seend := endp [ord (opnd^)];
+      if seend = nil
+       then EXIT;
+      REPEAT
+        opnd := sestart;
+        while opnd < seend do begin
+          if (scan >= fInputEnd) or (scan^ <> opnd^)
+           then EXIT;
+          inc (scan);
+          inc (opnd);
+         end;
+        inc (Result);
+        reginput := scan;
+      UNTIL Result >= AMax;
+     end;
+    BSUBEXPCI: begin //###0.936
+      sestart := startp [ord (opnd^)];
+      if sestart = nil
+       then EXIT;
+      seend := endp [ord (opnd^)];
+      if seend = nil
+       then EXIT;
+      REPEAT
+        opnd := sestart;
+        while opnd < seend do begin
+          if (scan >= fInputEnd) or
+             ((scan^ <> opnd^) and (scan^ <> InvertCase (opnd^)))
+           then EXIT;
+          inc (scan);
+          inc (opnd);
+         end;
+        inc (Result);
+        reginput := scan;
+      UNTIL Result >= AMax;
+     end;
+    ANYDIGIT:
+      while (Result < TheMax) and
+         (scan^ >= '0') and (scan^ <= '9') do begin
+        inc (Result);
+        inc (scan);
+       end;
+    NOTDIGIT:
+      while (Result < TheMax) and
+         ((scan^ < '0') or (scan^ > '9')) do begin
+        inc (Result);
+        inc (scan);
+       end;
+    {$IFNDEF UseSetOfChar} //###0.929
+    ANYLETTER:
+      while (Result < TheMax) and
+       (Pos (scan^, fWordChars) > 0) //###0.940
+     {  ((scan^ >= 'a') and (scan^ <= 'z') !! I've forgotten (>='0') and (<='9')
+       or (scan^ >= 'A') and (scan^ <= 'Z') or (scan^ = '_'))} do begin
+        inc (Result);
+        inc (scan);
+       end;
+    NOTLETTER:
+      while (Result < TheMax) and
+       (Pos (scan^, fWordChars) <= 0)  //###0.940
+     {   not ((scan^ >= 'a') and (scan^ <= 'z') !! I've forgotten (>='0') and (<='9')
+         or (scan^ >= 'A') and (scan^ <= 'Z')
+         or (scan^ = '_'))} do begin
+        inc (Result);
+        inc (scan);
+       end;
+    ANYSPACE:
+      while (Result < TheMax) and
+         (Pos (scan^, fSpaceChars) > 0) do begin
+        inc (Result);
+        inc (scan);
+       end;
+    NOTSPACE:
+      while (Result < TheMax) and
+         (Pos (scan^, fSpaceChars) <= 0) do begin
+        inc (Result);
+        inc (scan);
+       end;
+    {$ENDIF}
+    ANYOFTINYSET: begin
+      while (Result < TheMax) and //!!!TinySet
+       ((scan^ = opnd^) or (scan^ = (opnd + 1)^)
+        or (scan^ = (opnd + 2)^)) do begin
+        inc (Result);
+        inc (scan);
+       end;
+     end;
+    ANYBUTTINYSET: begin
+      while (Result < TheMax) and //!!!TinySet
+       (scan^ <> opnd^) and (scan^ <> (opnd + 1)^)
+        and (scan^ <> (opnd + 2)^) do begin
+        inc (Result);
+        inc (scan);
+       end;
+     end;
+    {$IFDEF UseSetOfChar} //###0.929
+    ANYOFFULLSET: begin
+      while (Result < TheMax) and
+       (scan^ in PSetOfREChar (opnd)^) do begin
+        inc (Result);
+        inc (scan);
+       end;
+     end;
+    {$ELSE}
+    ANYOF:
+      while (Result < TheMax) and
+         (StrScan (opnd, scan^) <> nil) do begin
+        inc (Result);
+        inc (scan);
+       end;
+    ANYBUT:
+      while (Result < TheMax) and
+         (StrScan (opnd, scan^) = nil) do begin
+        inc (Result);
+        inc (scan);
+       end;
+    ANYOFCI:
+      while (Result < TheMax) and (StrScanCI (opnd, scan^) <> nil) do begin
+        inc (Result);
+        inc (scan);
+       end;
+    ANYBUTCI:
+      while (Result < TheMax) and (StrScanCI (opnd, scan^) = nil) do begin
+        inc (Result);
+        inc (scan);
+       end;
+    {$ENDIF}
+    else begin // Oh dear. Called inappropriately.
+      Result := 0; // Best compromise.
+      Error (reeRegRepeatCalledInappropriately);
+      EXIT;
+     end;
+   end; { of case}
+  reginput := scan;
+ end; { of function TRegExpr.regrepeat
+--------------------------------------------------------------}
+
+function TRegExpr.regnext (p : PRegExprChar) : PRegExprChar;
+// dig the "next" pointer out of a node
+ var offset : TRENextOff;
+ begin
+  if p = @regdummy then begin
+    Result := nil;
+    EXIT;
+   end;
+  offset := PRENextOff (p + REOpSz)^; //###0.933 inlined NEXT
+  if offset = 0
+   then Result := nil
+   else Result := p + offset;
+ end; { of function TRegExpr.regnext
+--------------------------------------------------------------}
+
+function TRegExpr.MatchPrim (prog : PRegExprChar) : boolean;
+// recursively matching routine
+// Conceptually the strategy is simple:  check to see whether the current
+// node matches, call self recursively to see whether the rest matches,
+// and then act accordingly.  In practice we make some effort to avoid
+// recursion, in particular by going through "ordinary" nodes (that don't
+// need to know whether the rest of the match failed) by a loop instead of
+// by recursion.
+ var
+  scan : PRegExprChar; // Current node.
+  next : PRegExprChar; // Next node.
+  len : integer;
+  opnd : PRegExprChar;
+  no : integer;
+  save : PRegExprChar;
+  nextch : REChar;
+  BracesMin, BracesMax : integer; // we use integer instead of TREBracesArg for better support */+
+  {$IFDEF ComplexBraces}
+  SavedLoopStack : array [1 .. LoopStackMax] of integer; // :(( very bad for recursion
+  SavedLoopStackIdx : integer; //###0.925
+  {$ENDIF}
+ begin
+  Result := false;
+  scan := prog;
+
+  while scan <> nil do begin
+     len := PRENextOff (scan + 1)^; //###0.932 inlined regnext
+     if len = 0
+      then next := nil
+      else next := scan + len;
+
+     case scan^ of
+         NOTBOUND, //###0.943 //!!! think about UseSetOfChar !!!
+         BOUND:
+         if (scan^ = BOUND)
+          xor (
+          ((reginput = fInputStart) or (Pos ((reginput - 1)^, fWordChars) <= 0))
+            and (reginput^ <> #0) and (Pos (reginput^, fWordChars) > 0)
+           or
+            (reginput <> fInputStart) and (Pos ((reginput - 1)^, fWordChars) > 0)
+            and ((reginput^ = #0) or (Pos (reginput^, fWordChars) <= 0)))
+          then EXIT;
+
+         BOL: if reginput <> fInputStart
+               then EXIT;
+         EOL: if reginput^ <> #0
+               then EXIT;
+         BOLML: if reginput > fInputStart then begin
+            nextch := (reginput - 1)^;
+            if (nextch <> fLinePairedSeparatorTail)
+               or ((reginput - 1) <= fInputStart)
+               or ((reginput - 2)^ <> fLinePairedSeparatorHead)
+              then begin
+               if (nextch = fLinePairedSeparatorHead)
+                 and (reginput^ = fLinePairedSeparatorTail)
+                then EXIT; // don't stop between paired separator
+               if
+                 {$IFNDEF UniCode}
+                 not (nextch in fLineSeparatorsSet)
+                 {$ELSE}
+                 (pos (nextch, fLineSeparators) <= 0)
+                 {$ENDIF}
+                then EXIT;
+              end;
+           end;
+         EOLML: if reginput^ <> #0 then begin
+            nextch := reginput^;
+            if (nextch <> fLinePairedSeparatorHead)
+               or ((reginput + 1)^ <> fLinePairedSeparatorTail)
+             then begin
+               if (nextch = fLinePairedSeparatorTail)
+                 and (reginput > fInputStart)
+                 and ((reginput - 1)^ = fLinePairedSeparatorHead)
+                then EXIT; // don't stop between paired separator
+               if
+                 {$IFNDEF UniCode}
+                 not (nextch in fLineSeparatorsSet)
+                 {$ELSE}
+                 (pos (nextch, fLineSeparators) <= 0)
+                 {$ENDIF}
+                then EXIT;
+              end;
+           end;
+         ANY: begin
+            if reginput^ = #0
+             then EXIT;
+            inc (reginput);
+           end;
+         ANYML: begin //###0.941
+            if (reginput^ = #0)
+             or ((reginput^ = fLinePairedSeparatorHead)
+                 and ((reginput + 1)^ = fLinePairedSeparatorTail))
+             or {$IFNDEF UniCode} (reginput^ in fLineSeparatorsSet)
+                {$ELSE} (pos (reginput^, fLineSeparators) > 0) {$ENDIF}
+             then EXIT;
+            inc (reginput);
+           end;
+         ANYDIGIT: begin
+            if (reginput^ = #0) or (reginput^ < '0') or (reginput^ > '9')
+             then EXIT;
+            inc (reginput);
+           end;
+         NOTDIGIT: begin
+            if (reginput^ = #0) or ((reginput^ >= '0') and (reginput^ <= '9'))
+             then EXIT;
+            inc (reginput);
+           end;
+         {$IFNDEF UseSetOfChar} //###0.929
+         ANYLETTER: begin
+            if (reginput^ = #0) or (Pos (reginput^, fWordChars) <= 0) //###0.943
+             then EXIT;
+            inc (reginput);
+           end;
+         NOTLETTER: begin
+            if (reginput^ = #0) or (Pos (reginput^, fWordChars) > 0) //###0.943
+             then EXIT;
+            inc (reginput);
+           end;
+         ANYSPACE: begin
+            if (reginput^ = #0) or not (Pos (reginput^, fSpaceChars) > 0) //###0.943
+             then EXIT;
+            inc (reginput);
+           end;
+         NOTSPACE: begin
+            if (reginput^ = #0) or (Pos (reginput^, fSpaceChars) > 0) //###0.943
+             then EXIT;
+            inc (reginput);
+           end;
+         {$ENDIF}
+         EXACTLYCI: begin
+            opnd := scan + REOpSz + RENextOffSz; // OPERAND
+            // Inline the first character, for speed.
+            if (opnd^ <> reginput^)
+               and (InvertCase (opnd^) <> reginput^)
+             then EXIT;
+            len := strlen (opnd);
+            //###0.929 begin
+            no := len;
+            save := reginput;
+            while no > 1 do begin
+              inc (save);
+              inc (opnd);
+              if (opnd^ <> save^)
+                 and (InvertCase (opnd^) <> save^)
+               then EXIT;
+              dec (no);
+             end;
+            //###0.929 end
+            inc (reginput, len);
+           end;
+         EXACTLY: begin
+            opnd := scan + REOpSz + RENextOffSz; // OPERAND
+            // Inline the first character, for speed.
+            if opnd^ <> reginput^
+             then EXIT;
+            len := strlen (opnd);
+            //###0.929 begin
+            no := len;
+            save := reginput;
+            while no > 1 do begin
+              inc (save);
+              inc (opnd);
+              if opnd^ <> save^
+               then EXIT;
+              dec (no);
+             end;
+            //###0.929 end
+            inc (reginput, len);
+           end;
+         BSUBEXP: begin //###0.936
+           no := ord ((scan + REOpSz + RENextOffSz)^);
+           if startp [no] = nil
+            then EXIT;
+           if endp [no] = nil
+            then EXIT;
+           save := reginput;
+           opnd := startp [no];
+           while opnd < endp [no] do begin
+             if (save >= fInputEnd) or (save^ <> opnd^)
+              then EXIT;
+             inc (save);
+             inc (opnd);
+            end;
+           reginput := save;
+          end;
+         BSUBEXPCI: begin //###0.936
+           no := ord ((scan + REOpSz + RENextOffSz)^);
+           if startp [no] = nil
+            then EXIT;
+           if endp [no] = nil
+            then EXIT;
+           save := reginput;
+           opnd := startp [no];
+           while opnd < endp [no] do begin
+             if (save >= fInputEnd) or
+                ((save^ <> opnd^) and (save^ <> InvertCase (opnd^)))
+              then EXIT;
+             inc (save);
+             inc (opnd);
+            end;
+           reginput := save;
+          end;
+         ANYOFTINYSET: begin
+           if (reginput^ = #0) or //!!!TinySet
+             ((reginput^ <> (scan + REOpSz + RENextOffSz)^)
+             and (reginput^ <> (scan + REOpSz + RENextOffSz + 1)^)
+             and (reginput^ <> (scan + REOpSz + RENextOffSz + 2)^))
+            then EXIT;
+           inc (reginput);
+          end;
+         ANYBUTTINYSET: begin
+           if (reginput^ = #0) or //!!!TinySet
+             (reginput^ = (scan + REOpSz + RENextOffSz)^)
+             or (reginput^ = (scan + REOpSz + RENextOffSz + 1)^)
+             or (reginput^ = (scan + REOpSz + RENextOffSz + 2)^)
+            then EXIT;
+           inc (reginput);
+          end;
+         {$IFDEF UseSetOfChar} //###0.929
+         ANYOFFULLSET: begin
+           if (reginput^ = #0)
+              or not (reginput^ in PSetOfREChar (scan + REOpSz + RENextOffSz)^)
+            then EXIT;
+           inc (reginput);
+          end;
+         {$ELSE}
+         ANYOF: begin
+            if (reginput^ = #0) or (StrScan (scan + REOpSz + RENextOffSz, reginput^) = nil)
+             then EXIT;
+            inc (reginput);
+           end;
+         ANYBUT: begin
+            if (reginput^ = #0) or (StrScan (scan + REOpSz + RENextOffSz, reginput^) <> nil)
+             then EXIT;
+            inc (reginput);
+           end;
+         ANYOFCI: begin
+            if (reginput^ = #0) or (StrScanCI (scan + REOpSz + RENextOffSz, reginput^) = nil)
+             then EXIT;
+            inc (reginput);
+           end;
+         ANYBUTCI: begin
+            if (reginput^ = #0) or (StrScanCI (scan + REOpSz + RENextOffSz, reginput^) <> nil)
+             then EXIT;
+            inc (reginput);
+           end;
+         {$ENDIF}
+         NOTHING: ;
+         COMMENT: ;
+         BACK: ;
+         Succ (OPEN) .. TREOp (Ord (OPEN) + NSUBEXP - 1) : begin //###0.929
+            no := ord (scan^) - ord (OPEN);
+//            save := reginput;
+            save := startp [no]; //###0.936
+            startp [no] := reginput; //###0.936
+            Result := MatchPrim (next);
+            if not Result //###0.936
+             then startp [no] := save;
+//            if Result and (startp [no] = nil)
+//             then startp [no] := save;
+             // Don't set startp if some later invocation of the same
+             // parentheses already has.
+            EXIT;
+           end;
+         Succ (CLOSE) .. TREOp (Ord (CLOSE) + NSUBEXP - 1): begin //###0.929
+            no := ord (scan^) - ord (CLOSE);
+//            save := reginput;
+            save := endp [no]; //###0.936
+            endp [no] := reginput; //###0.936
+            Result := MatchPrim (next);
+            if not Result //###0.936
+             then endp [no] := save;
+//            if Result and (endp [no] = nil)
+//             then endp [no] := save;
+             // Don't set endp if some later invocation of the same
+             // parentheses already has.
+            EXIT;
+           end;
+         BRANCH: begin
+            if (next^ <> BRANCH) // No choice.
+             then next := scan + REOpSz + RENextOffSz // Avoid recursion
+             else begin
+               REPEAT
+                save := reginput;
+                Result := MatchPrim (scan + REOpSz + RENextOffSz);
+                if Result
+                 then EXIT;
+                reginput := save;
+                scan := regnext (scan);
+               UNTIL (scan = nil) or (scan^ <> BRANCH);
+               EXIT;
+              end;
+           end;
+         {$IFDEF ComplexBraces}
+         LOOPENTRY: begin //###0.925
+           no := LoopStackIdx;
+           inc (LoopStackIdx);
+           if LoopStackIdx > LoopStackMax then begin
+             Error (reeLoopStackExceeded);
+             EXIT;
+            end;
+           save := reginput;
+           LoopStack [LoopStackIdx] := 0; // init loop counter
+           Result := MatchPrim (next); // execute LOOP
+           LoopStackIdx := no; // cleanup
+           if Result
+            then EXIT;
+           reginput := save;
+           EXIT;
+          end;
+         LOOP, LOOPNG: begin //###0.940
+           if LoopStackIdx <= 0 then begin
+             Error (reeLoopWithoutEntry);
+             EXIT;
+            end;
+           opnd := scan + PRENextOff (scan + REOpSz + RENextOffSz + 2 * REBracesArgSz)^;
+           BracesMin := PREBracesArg (scan + REOpSz + RENextOffSz)^;
+           BracesMax := PREBracesArg (scan + REOpSz + RENextOffSz + REBracesArgSz)^;
+           save := reginput;
+           if LoopStack [LoopStackIdx] >= BracesMin then begin // Min alredy matched - we can work
+              if scan^ = LOOP then begin
+                 // greedy way - first try to max deep of greed ;)
+                 if LoopStack [LoopStackIdx] < BracesMax then begin
+                   inc (LoopStack [LoopStackIdx]);
+                   no := LoopStackIdx;
+                   Result := MatchPrim (opnd);
+                   LoopStackIdx := no;
+                   if Result
+                    then EXIT;
+                   reginput := save;
+                  end;
+                 dec (LoopStackIdx); // Fail. May be we are too greedy? ;)
+                 Result := MatchPrim (next);
+                 if not Result
+                  then reginput := save;
+                 EXIT;
+                end
+               else begin
+                 // non-greedy - try just now
+                 Result := MatchPrim (next);
+                 if Result
+                  then EXIT
+                  else reginput := save; // failed - move next and try again
+                 if LoopStack [LoopStackIdx] < BracesMax then begin
+                   inc (LoopStack [LoopStackIdx]);
+                   no := LoopStackIdx;
+                   Result := MatchPrim (opnd);
+                   LoopStackIdx := no;
+                   if Result
+                    then EXIT;
+                   reginput := save;
+                  end;
+                 dec (LoopStackIdx); // Failed - back up
+                 EXIT;
+                end
+             end
+            else begin // first match a min_cnt times
+              inc (LoopStack [LoopStackIdx]);
+              no := LoopStackIdx;
+              Result := MatchPrim (opnd);
+              LoopStackIdx := no;
+              if Result
+               then EXIT;
+              dec (LoopStack [LoopStackIdx]);
+              reginput := save;
+              EXIT;
+             end;
+          end;
+         {$ENDIF}
+         STAR, PLUS, BRACES, STARNG, PLUSNG, BRACESNG: begin
+           // Lookahead to avoid useless match attempts when we know
+           // what character comes next.
+           nextch := #0;
+           if next^ = EXACTLY
+            then nextch := (next + REOpSz + RENextOffSz)^;
+           BracesMax := MaxInt; // infinite loop for * and + //###0.92
+           if (scan^ = STAR) or (scan^ = STARNG)
+            then BracesMin := 0  // STAR
+            else if (scan^ = PLUS) or (scan^ = PLUSNG)
+             then BracesMin := 1 // PLUS
+             else begin // BRACES
+               BracesMin := PREBracesArg (scan + REOpSz + RENextOffSz)^;
+               BracesMax := PREBracesArg (scan + REOpSz + RENextOffSz + REBracesArgSz)^;
+              end;
+           save := reginput;
+           opnd := scan + REOpSz + RENextOffSz;
+           if (scan^ = BRACES) or (scan^ = BRACESNG)
+            then inc (opnd, 2 * REBracesArgSz);
+
+           if (scan^ = PLUSNG) or (scan^ = STARNG) or (scan^ = BRACESNG) then begin
+             // non-greedy mode
+              BracesMax := regrepeat (opnd, BracesMax); // don't repeat more than BracesMax
+              // Now we know real Max limit to move forward (for recursion 'back up')
+              // In some cases it can be faster to check only Min positions first,
+              // but after that we have to check every position separtely instead
+              // of fast scannig in loop.
+              no := BracesMin;
+              while no <= BracesMax do begin
+                reginput := save + no;
+                // If it could work, try it.
+                if (nextch = #0) or (reginput^ = nextch) then begin
+                  {$IFDEF ComplexBraces}
+                  System.Move (LoopStack, SavedLoopStack, SizeOf (LoopStack)); //###0.925
+                  SavedLoopStackIdx := LoopStackIdx;
+                  {$ENDIF}
+                  if MatchPrim (next) then begin
+                    Result := true;
+                    EXIT;
+                   end;
+                  {$IFDEF ComplexBraces}
+                  System.Move (SavedLoopStack, LoopStack, SizeOf (LoopStack));
+                  LoopStackIdx := SavedLoopStackIdx;
+                  {$ENDIF}
+                 end;
+                inc (no); // Couldn't or didn't - move forward.
+               end; { of while}
+              EXIT;
+             end
+            else begin // greedy mode
+              no := regrepeat (opnd, BracesMax); // don't repeat more than max_cnt
+              while no >= BracesMin do begin
+                // If it could work, try it.
+                if (nextch = #0) or (reginput^ = nextch) then begin
+                  {$IFDEF ComplexBraces}
+                  System.Move (LoopStack, SavedLoopStack, SizeOf (LoopStack)); //###0.925
+                  SavedLoopStackIdx := LoopStackIdx;
+                  {$ENDIF}
+                  if MatchPrim (next) then begin
+                    Result := true;
+                    EXIT;
+                   end;
+                  {$IFDEF ComplexBraces}
+                  System.Move (SavedLoopStack, LoopStack, SizeOf (LoopStack));
+                  LoopStackIdx := SavedLoopStackIdx;
+                  {$ENDIF}
+                 end;
+                dec (no); // Couldn't or didn't - back up.
+                reginput := save + no;
+               end; { of while}
+              EXIT;
+             end;
+          end;
+         EEND: begin
+           Result := true;  // Success!
+           EXIT;
+          end;
+        else begin
+            Error (reeMatchPrimMemoryCorruption);
+            EXIT;
+          end;
+        end; { of case scan^}
+        scan := next;
+    end; { of while scan <> nil}
+
+  // We get here only if there's trouble -- normally "case EEND" is the
+  // terminating point.
+  Error (reeMatchPrimCorruptedPointers);
+ end; { of function TRegExpr.MatchPrim
+--------------------------------------------------------------}
+
+{$IFDEF UseFirstCharSet} //###0.929
+procedure TRegExpr.FillFirstCharSet (prog : PRegExprChar);
+ var
+  scan : PRegExprChar; // Current node.
+  next : PRegExprChar; // Next node.
+  opnd : PRegExprChar;
+  min_cnt : integer;
+ begin
+  scan := prog;
+  while scan <> nil do begin
+     next := regnext (scan);
+     case PREOp (scan)^ of
+         BSUBEXP, BSUBEXPCI: begin //###0.938
+           FirstCharSet := [#0 .. #255]; // :((( we cannot
+           // optimize r.e. if it starts with back reference
+           EXIT;
+          end;
+         BOL, BOLML: ; // EXIT; //###0.937
+         EOL, EOLML: ; // EXIT; //###0.937
+         BOUND, NOTBOUND: ; //###0.943 ?!!
+         ANY, ANYML: begin // we can better define ANYML !!!
+           FirstCharSet := [#0 .. #255]; //###0.930
+           EXIT;
+          end;
+         ANYDIGIT: begin
+           FirstCharSet := FirstCharSet + ['0' .. '9'];
+           EXIT;
+          end;
+         NOTDIGIT: begin
+           FirstCharSet := [#0 .. #255] - ['0' .. '9'];
+           EXIT;
+          end;
+         EXACTLYCI: begin
+           Include (FirstCharSet, (scan + REOpSz + RENextOffSz)^);
+           Include (FirstCharSet, InvertCase ((scan + REOpSz + RENextOffSz)^));
+           EXIT;
+          end;
+         EXACTLY: begin
+           Include (FirstCharSet, (scan + REOpSz + RENextOffSz)^);
+           EXIT;
+          end;
+         ANYOFFULLSET: begin
+           FirstCharSet := FirstCharSet + PSetOfREChar (scan + REOpSz + RENextOffSz)^;
+           EXIT;
+          end;
+         ANYOFTINYSET: begin
+           //!!!TinySet
+           Include (FirstCharSet, (scan + REOpSz + RENextOffSz)^);
+           Include (FirstCharSet, (scan + REOpSz + RENextOffSz + 1)^);
+           Include (FirstCharSet, (scan + REOpSz + RENextOffSz + 2)^);
+           // ...                                                      // up to TinySetLen
+           EXIT;
+          end;
+         ANYBUTTINYSET: begin
+           //!!!TinySet
+           FirstCharSet := [#0 .. #255];
+           Exclude (FirstCharSet, (scan + REOpSz + RENextOffSz)^);
+           Exclude (FirstCharSet, (scan + REOpSz + RENextOffSz + 1)^);
+           Exclude (FirstCharSet, (scan + REOpSz + RENextOffSz + 2)^);
+           // ...                                                      // up to TinySetLen
+           EXIT;
+          end;
+         NOTHING: ;
+         COMMENT: ;
+         BACK: ;
+         Succ (OPEN) .. TREOp (Ord (OPEN) + NSUBEXP - 1) : begin //###0.929
+            FillFirstCharSet (next);
+            EXIT;
+           end;
+         Succ (CLOSE) .. TREOp (Ord (CLOSE) + NSUBEXP - 1): begin //###0.929
+            FillFirstCharSet (next);
+            EXIT;
+           end;
+         BRANCH: begin
+            if (PREOp (next)^ <> BRANCH) // No choice.
+             then next := scan + REOpSz + RENextOffSz // Avoid recursion.
+             else begin
+               REPEAT
+                FillFirstCharSet (scan + REOpSz + RENextOffSz);
+                scan := regnext (scan);
+               UNTIL (scan = nil) or (PREOp (scan)^ <> BRANCH);
+               EXIT;
+              end;
+           end;
+         {$IFDEF ComplexBraces}
+         LOOPENTRY: begin //###0.925
+//           LoopStack [LoopStackIdx] := 0; //###0.940 line removed
+           FillFirstCharSet (next); // execute LOOP
+           EXIT;
+          end;
+         LOOP, LOOPNG: begin //###0.940
+           opnd := scan + PRENextOff (scan + REOpSz + RENextOffSz + REBracesArgSz * 2)^;
+           min_cnt := PREBracesArg (scan + REOpSz + RENextOffSz)^;
+           FillFirstCharSet (opnd);
+           if min_cnt = 0
+            then FillFirstCharSet (next);
+           EXIT;
+          end;
+         {$ENDIF}
+         STAR, STARNG: //###0.940
+           FillFirstCharSet (scan + REOpSz + RENextOffSz);
+         PLUS, PLUSNG: begin //###0.940
+           FillFirstCharSet (scan + REOpSz + RENextOffSz);
+           EXIT;
+          end;
+         BRACES, BRACESNG: begin //###0.940
+           opnd := scan + REOpSz + RENextOffSz + REBracesArgSz * 2;
+           min_cnt := PREBracesArg (scan + REOpSz + RENextOffSz)^; // BRACES
+           FillFirstCharSet (opnd);
+           if min_cnt > 0
+            then EXIT;
+          end;
+         EEND: begin
+            EXIT;
+           end;
+        else begin
+            Error (reeMatchPrimMemoryCorruption);
+            EXIT;
+          end;
+        end; { of case scan^}
+        scan := next;
+    end; { of while scan <> nil}
+ end; { of procedure FillFirstCharSet;
+--------------------------------------------------------------}
+{$ENDIF}
+
+function TRegExpr.RegMatch (str : PRegExprChar) : boolean;
+// try match at specific point
+ var i : integer;
+ begin
+  for i := 0 to NSUBEXP - 1 do begin
+    startp [i] := nil;
+    endp [i] := nil;
+   end;
+  reginput := str;
+  Result := MatchPrim (programm + REOpSz);
+  if Result then begin
+    startp [0] := str;
+    endp [0] := reginput;
+   end;
+ end; { of function TRegExpr.RegMatch
+--------------------------------------------------------------}
+
+function TRegExpr.Exec (const AInputString : RegExprString) : boolean;
+ begin
+  InputString := AInputString;
+  Result := ExecPrim (1);
+ end; { of function TRegExpr.Exec
+--------------------------------------------------------------}
+
+function TRegExpr.ExecPrim (AOffset: integer) : boolean;
+ var
+  s : PRegExprChar;
+  StartPtr: PRegExprChar;
+  InputLen : integer;
+ begin
+  Result := false; // Be paranoid...
+
+  if not IsProgrammOk //###0.929
+   then EXIT;
+
+  // Check InputString presence
+  if not Assigned (fInputString) then begin
+    Error (reeNoInpitStringSpecified);
+    EXIT;
+   end;
+
+  InputLen := length (fInputString);
+
+  //Check that the start position is not negative
+  if AOffset < 1 then begin
+    Error (reeOffsetMustBeGreaterThen0);
+    EXIT;
+   end;
+  // Check that the start position is not longer than the line
+  // If so then exit with nothing found
+  if AOffset > (InputLen + 1) // for matching empty string after last char.
+   then EXIT;
+
+  StartPtr := fInputString + AOffset - 1;
+
+  // If there is a "must appear" string, look for it.
+  if regmust <> nil then begin
+    s := StartPtr;
+    REPEAT
+     s := StrScan (s, regmust [0]);
+     if s <> nil then begin
+       if StrLComp (s, regmust, regmlen) = 0
+        then BREAK; // Found it.
+       inc (s);
+      end;
+    UNTIL s = nil;
+    if s = nil // Not present.
+     then EXIT;
+   end;
+
+  // Mark beginning of line for ^ .
+  fInputStart := fInputString;
+
+  // Pointer to end of input stream - for
+  // pascal-style string processing (may include #0)
+  fInputEnd := fInputString + InputLen;
+
+  {$IFDEF ComplexBraces}
+  // no loops started
+  LoopStackIdx := 0; //###0.925
+  {$ENDIF}
+
+  // Simplest case:  anchored match need be tried only once.
+  if reganch <> #0 then begin
+    Result := RegMatch (StartPtr);
+    EXIT;
+   end;
+
+  // Messy cases:  unanchored match.
+  s := StartPtr;
+  if regstart <> #0 then // We know what char it must start with.
+    REPEAT
+     s := StrScan (s, regstart);
+     if s <> nil then begin
+       Result := RegMatch (s);
+       if Result
+        then EXIT;
+       inc (s);
+      end;
+    UNTIL s = nil
+   else begin // We don't - general case.
+     {$IFDEF UseFirstCharSet} //###0.929
+     while s^ <> #0 do begin
+       if s^ in FirstCharSet
+        then Result := RegMatch (s);
+       if Result
+        then EXIT;
+       inc (s);
+      end;
+     {$ELSE}
+     REPEAT
+      Result := RegMatch (s);
+      if Result
+       then EXIT;
+      inc (s);
+     UNTIL s^ = #0;
+     {$ENDIF}
+    end;
+  // Failure
+ end; { of function TRegExpr.ExecPrim
+--------------------------------------------------------------}
+
+function TRegExpr.ExecNext : boolean;
+ var offset : integer;
+ begin
+  Result := false;
+  if not Assigned (startp[0]) or not Assigned (endp[0]) then begin
+    Error (reeExecNextWithoutExec);
+    EXIT;
+   end;
+//  Offset := MatchPos [0] + MatchLen [0];
+//  if MatchLen [0] = 0
+  Offset := endp [0] - fInputString + 1; //###0.929
+  if endp [0] = startp [0] //###0.929
+   then inc (Offset); // prevent infinite looping if empty string match r.e.
+  Result := ExecPrim (Offset);
+ end; { of function TRegExpr.ExecNext
+--------------------------------------------------------------}
+
+function TRegExpr.ExecPos (AOffset: integer {$IFDEF D4_}= 1{$ENDIF}) : boolean;
+ begin
+  Result := ExecPrim (AOffset);
+ end; { of function TRegExpr.ExecPos
+--------------------------------------------------------------}
+
+function TRegExpr.GetInputString : RegExprString;
+ begin
+  if not Assigned (fInputString) then begin
+    Error (reeGetInputStringWithoutInputString);
+    EXIT;
+   end;
+  Result := fInputString;
+ end; { of function TRegExpr.GetInputString
+--------------------------------------------------------------}
+
+procedure TRegExpr.SetInputString (const AInputString : RegExprString);
+ var
+  Len : integer;
+  i : integer;
+ begin
+  // clear Match* - before next Exec* call it's undefined
+  for i := 0 to NSUBEXP - 1 do begin
+    startp [i] := nil;
+    endp [i] := nil;
+   end;
+
+  // need reallocation of input string buffer ?
+  Len := length (AInputString);
+  if Assigned (fInputString) and (Length (fInputString) <> Len) then begin
+    FreeMem (fInputString);
+    fInputString := nil;
+   end;
+  // buffer [re]allocation
+  if not Assigned (fInputString)
+   then GetMem (fInputString, (Len + 1) * SizeOf (REChar));
+
+  // copy input string into buffer
+  {$IFDEF UniCode}
+  StrPCopy (fInputString, Copy (AInputString, 1, Len)); //###0.927
+  {$ELSE}
+  StrLCopy (fInputString, PRegExprChar (AInputString), Len);
+  {$ENDIF}
+
+  {
+  fInputString : string;
+  fInputStart, fInputEnd : PRegExprChar;
+
+  SetInputString:
+  fInputString := AInputString;
+  UniqueString (fInputString);
+  fInputStart := PChar (fInputString);
+  Len := length (fInputString);
+  fInputEnd := PRegExprChar (integer (fInputStart) + Len); ??
+  !! startp/endp âñå ðàâíî áóäåò îïàñíî èñïîëüçîâàòü ?
+  }
+ end; { of procedure TRegExpr.SetInputString
+--------------------------------------------------------------}
+
+procedure TRegExpr.SetLineSeparators (const AStr : RegExprString);
+ begin
+  if AStr <> fLineSeparators then begin
+    fLineSeparators := AStr;
+    InvalidateProgramm;
+   end;
+ end; { of procedure TRegExpr.SetLineSeparators
+--------------------------------------------------------------}
+
+procedure TRegExpr.SetLinePairedSeparator (const AStr : RegExprString);
+ begin
+  if length (AStr) = 2 then begin
+     if AStr [1] = AStr [2] then begin
+      // it's impossible for our 'one-point' checking to support
+      // two chars separator for identical chars
+       Error (reeBadLinePairedSeparator);
+       EXIT;
+      end;
+     if not fLinePairedSeparatorAssigned
+      or (AStr [1] <> fLinePairedSeparatorHead)
+      or (AStr [2] <> fLinePairedSeparatorTail) then begin
+       fLinePairedSeparatorAssigned := true;
+       fLinePairedSeparatorHead := AStr [1];
+       fLinePairedSeparatorTail := AStr [2];
+       InvalidateProgramm;
+      end;
+    end
+   else if length (AStr) = 0 then begin
+     if fLinePairedSeparatorAssigned then begin
+       fLinePairedSeparatorAssigned := false;
+       InvalidateProgramm;
+      end;
+    end
+   else Error (reeBadLinePairedSeparator);
+ end; { of procedure TRegExpr.SetLinePairedSeparator
+--------------------------------------------------------------}
+
+function TRegExpr.GetLinePairedSeparator : RegExprString;
+ begin
+  if fLinePairedSeparatorAssigned then begin
+     {$IFDEF UniCode}
+     // Here is some UniCode 'magic'
+     // If You do know better decision to concatenate
+     // two WideChars, please, let me know!
+     Result := fLinePairedSeparatorHead; //###0.947
+     Result := Result + fLinePairedSeparatorTail;
+     {$ELSE}
+     Result := fLinePairedSeparatorHead + fLinePairedSeparatorTail;
+     {$ENDIF}
+    end
+   else Result := '';
+ end; { of function TRegExpr.GetLinePairedSeparator
+--------------------------------------------------------------}
+
+function TRegExpr.Substitute (const ATemplate : RegExprString) : RegExprString;
+// perform substitutions after a regexp match
+// completely rewritten in 0.929
+ var
+  TemplateLen : integer;
+  TemplateBeg, TemplateEnd : PRegExprChar;
+  p, p0, ResultPtr : PRegExprChar;
+  ResultLen : integer;
+  n : integer;
+  Ch : REChar;
+ function ParseVarName (var APtr : PRegExprChar) : integer;
+  // extract name of variable (digits, may be enclosed with
+  // curly braces) from APtr^, uses TemplateEnd !!!
+  const
+   Digits = ['0' .. '9'];
+  var
+   p : PRegExprChar;
+   Delimited : boolean;
+  begin
+   Result := 0;
+   p := APtr;
+   Delimited := (p < TemplateEnd) and (p^ = '{');
+   if Delimited
+    then inc (p); // skip left curly brace
+   if (p < TemplateEnd) and (p^ = '&')
+    then inc (p) // this is '$&' or '${&}'
+    else
+     while (p < TemplateEnd) and
+// Eugene: 20080407
+//      {$IFDEF UniCode} //###0.935
+//      (ord (p^) < 256) and (char (p^) in Digits)
+//      {$ELSE}
+      CharInSet(p^ , Digits)
+//      {$ENDIF}
+       do begin
+       Result := Result * 10 + (ord (p^) - ord ('0')); //###0.939
+       inc (p);
+      end;
+   if Delimited then
+    if (p < TemplateEnd) and (p^ = '}')
+     then inc (p) // skip right curly brace
+     else p := APtr; // isn't properly terminated
+   if p = APtr
+    then Result := -1; // no valid digits found or no right curly brace
+   APtr := p;
+  end;
+ begin
+  // Check programm and input string
+  if not IsProgrammOk
+   then EXIT;
+  if not Assigned (fInputString) then begin
+    Error (reeNoInpitStringSpecified);
+    EXIT;
+   end;
+  // Prepare for working
+  TemplateLen := length (ATemplate);
+  if TemplateLen = 0 then begin // prevent nil pointers
+    Result := '';
+    EXIT;
+   end;
+  TemplateBeg := pointer (ATemplate);
+  TemplateEnd := TemplateBeg + TemplateLen;
+  // Count result length for speed optimization.
+  ResultLen := 0;
+  p := TemplateBeg;
+  while p < TemplateEnd do begin
+    Ch := p^;
+    inc (p);
+    if Ch = '$'
+     then n := ParseVarName (p)
+     else n := -1;
+    if n >= 0 then begin
+       if (n < NSUBEXP) and Assigned (startp [n]) and Assigned (endp [n])
+        then inc (ResultLen, endp [n] - startp [n]);
+      end
+     else begin
+       if (Ch = '\') and (p < TemplateEnd)
+        then inc (p); // quoted or special char followed
+       inc (ResultLen);
+      end;
+   end;
+  // Get memory. We do it once and it significant speed up work !
+  if ResultLen = 0 then begin
+    Result := '';
+    EXIT;
+   end;
+  SetString (Result, nil, ResultLen);
+  // Fill Result
+  ResultPtr := pointer (Result);
+  p := TemplateBeg;
+  while p < TemplateEnd do begin
+    Ch := p^;
+    inc (p);
+    if Ch = '$'
+     then n := ParseVarName (p)
+     else n := -1;
+    if n >= 0 then begin
+       p0 := startp [n];
+       if (n < NSUBEXP) and Assigned (p0) and Assigned (endp [n]) then
+        while p0 < endp [n] do begin
+          ResultPtr^ := p0^;
+          inc (ResultPtr);
+          inc (p0);
+         end;
+      end
+     else begin
+       if (Ch = '\') and (p < TemplateEnd) then begin // quoted or special char followed
+         Ch := p^;
+         inc (p);
+        end;
+       ResultPtr^ := Ch;
+       inc (ResultPtr);
+      end;
+   end;
+ end; { of function TRegExpr.Substitute
+--------------------------------------------------------------}
+
+procedure TRegExpr.Split (AInputStr : RegExprString; APieces : TStrings);
+ var PrevPos : integer;
+ begin
+  PrevPos := 1;
+  if Exec (AInputStr) then
+   REPEAT
+    APieces.Add (System.Copy (AInputStr, PrevPos, MatchPos [0] - PrevPos));
+    PrevPos := MatchPos [0] + MatchLen [0];
+   UNTIL not ExecNext;
+  APieces.Add (System.Copy (AInputStr, PrevPos, MaxInt)); // Tail
+ end; { of procedure TRegExpr.Split
+--------------------------------------------------------------}
+
+function TRegExpr.Replace (AInputStr : RegExprString; const AReplaceStr : RegExprString;
+      AUseSubstitution : boolean{$IFDEF D4_}= False{$ENDIF}) : RegExprString;
+ var PrevPos : integer;
+ begin
+  Result := '';
+  PrevPos := 1;
+  if Exec (AInputStr) then
+   REPEAT
+    Result := Result + System.Copy (AInputStr, PrevPos,
+      MatchPos [0] - PrevPos);
+    if AUseSubstitution //###0.946
+    then Result := Result + Substitute (AReplaceStr)
+    else Result := Result + AReplaceStr;
+    PrevPos := MatchPos [0] + MatchLen [0];
+   UNTIL not ExecNext;
+  Result := Result + System.Copy (AInputStr, PrevPos, MaxInt); // Tail
+ end; { of function TRegExpr.Replace
+--------------------------------------------------------------}
+
+
+{=============================================================}
+{====================== Debug section ========================}
+{=============================================================}
+
+{$IFDEF DebugRegExpr}
+function TRegExpr.DumpOp (op : TREOp) : RegExprString;
+// printable representation of opcode
+ begin
+  case op of
+    BOL:          Result := 'BOL';
+    EOL:          Result := 'EOL';
+    BOLML:        Result := 'BOLML';
+    EOLML:        Result := 'EOLML';
+    BOUND:        Result := 'BOUND'; //###0.943
+    NOTBOUND:     Result := 'NOTBOUND'; //###0.943
+    ANY:          Result := 'ANY';
+    ANYML:        Result := 'ANYML'; //###0.941
+    ANYLETTER:    Result := 'ANYLETTER';
+    NOTLETTER:    Result := 'NOTLETTER';
+    ANYDIGIT:     Result := 'ANYDIGIT';
+    NOTDIGIT:     Result := 'NOTDIGIT';
+    ANYSPACE:     Result := 'ANYSPACE';
+    NOTSPACE:     Result := 'NOTSPACE';
+    ANYOF:        Result := 'ANYOF';
+    ANYBUT:       Result := 'ANYBUT';
+    ANYOFCI:      Result := 'ANYOF/CI';
+    ANYBUTCI:     Result := 'ANYBUT/CI';
+    BRANCH:       Result := 'BRANCH';
+    EXACTLY:      Result := 'EXACTLY';
+    EXACTLYCI:    Result := 'EXACTLY/CI';
+    NOTHING:      Result := 'NOTHING';
+    COMMENT:      Result := 'COMMENT';
+    BACK:         Result := 'BACK';
+    EEND:         Result := 'END';
+    BSUBEXP:      Result := 'BSUBEXP';
+    BSUBEXPCI:    Result := 'BSUBEXP/CI';
+    Succ (OPEN) .. TREOp (Ord (OPEN) + NSUBEXP - 1): //###0.929
+                  Result := Format ('OPEN[%d]', [ord (op) - ord (OPEN)]);
+    Succ (CLOSE) .. TREOp (Ord (CLOSE) + NSUBEXP - 1): //###0.929
+                  Result := Format ('CLOSE[%d]', [ord (op) - ord (CLOSE)]);
+    STAR:         Result := 'STAR';
+    PLUS:         Result := 'PLUS';
+    BRACES:       Result := 'BRACES';
+    {$IFDEF ComplexBraces}
+    LOOPENTRY:    Result := 'LOOPENTRY'; //###0.925
+    LOOP:         Result := 'LOOP'; //###0.925
+    LOOPNG:       Result := 'LOOPNG'; //###0.940
+    {$ENDIF}
+    ANYOFTINYSET: Result:= 'ANYOFTINYSET';
+    ANYBUTTINYSET:Result:= 'ANYBUTTINYSET';
+    {$IFDEF UseSetOfChar} //###0.929
+    ANYOFFULLSET: Result:= 'ANYOFFULLSET';
+    {$ENDIF}
+    STARNG:       Result := 'STARNG'; //###0.940
+    PLUSNG:       Result := 'PLUSNG'; //###0.940
+    BRACESNG:     Result := 'BRACESNG'; //###0.940
+    else Error (reeDumpCorruptedOpcode);
+   end; {of case op}
+  Result := ':' + Result;
+ end; { of function TRegExpr.DumpOp
+--------------------------------------------------------------}
+
+function TRegExpr.Dump : RegExprString;
+// dump a regexp in vaguely comprehensible form
+ var
+  s : PRegExprChar;
+  op : TREOp; // Arbitrary non-END op.
+  next : PRegExprChar;
+  i : integer;
+{$IFDEF UseSetOfChar} //###0.929
+  Ch : REChar;
+{$ENDIF}
+ begin
+  if not IsProgrammOk //###0.929
+   then EXIT;
+
+  op := EXACTLY;
+  Result := '';
+  s := programm + REOpSz;
+  while op <> EEND do begin // While that wasn't END last time...
+     op := s^;
+     Result := Result + Format ('%2d%s', [s - programm, DumpOp (s^)]); // Where, what.
+     next := regnext (s);
+     if next = nil // Next ptr.
+      then Result := Result + ' (0)'
+      else Result := Result + Format (' (%d) ', [(s - programm) + (next - s)]);
+     inc (s, REOpSz + RENextOffSz);
+     if (op = ANYOF) or (op = ANYOFCI) or (op = ANYBUT) or (op = ANYBUTCI)
+        or (op = EXACTLY) or (op = EXACTLYCI) then begin
+         // Literal string, where present.
+         while s^ <> #0 do begin
+           Result := Result + s^;
+           inc (s);
+          end;
+         inc (s);
+      end;
+     if (op = ANYOFTINYSET) or (op = ANYBUTTINYSET) then begin
+       for i := 1 to TinySetLen do begin
+         Result := Result + s^;
+         inc (s);
+        end;
+      end;
+     if (op = BSUBEXP) or (op = BSUBEXPCI) then begin
+       Result := Result + ' \' + IntToStr (Ord (s^));
+       inc (s);
+      end;
+     {$IFDEF UseSetOfChar} //###0.929
+     if op = ANYOFFULLSET then begin
+       for Ch := #0 to #255 do
+        if Ch in PSetOfREChar (s)^ then
+         if Ch < ' '
+          then Result := Result + '#' + IntToStr (Ord (Ch)) //###0.936
+          else Result := Result + Ch;
+       inc (s, SizeOf (TSetOfREChar));
+      end;
+     {$ENDIF}
+     if (op = BRACES) or (op = BRACESNG) then begin //###0.941
+       // show min/max argument of BRACES operator
+       Result := Result + Format ('{%d,%d}', [PREBracesArg (s)^, PREBracesArg (s + REBracesArgSz)^]);
+       inc (s, REBracesArgSz * 2);
+      end;
+     {$IFDEF ComplexBraces}
+     if (op = LOOP) or (op = LOOPNG) then begin //###0.940
+       Result := Result + Format (' -> (%d) {%d,%d}', [
+        (s - programm - (REOpSz + RENextOffSz)) + PRENextOff (s + 2 * REBracesArgSz)^,
+        PREBracesArg (s)^, PREBracesArg (s + REBracesArgSz)^]);
+       inc (s, 2 * REBracesArgSz + RENextOffSz);
+      end;
+     {$ENDIF}
+     Result := Result + #$d#$a;
+   end; { of while}
+
+  // Header fields of interest.
+
+  if regstart <> #0
+   then Result := Result + 'start ' + regstart;
+  if reganch <> #0
+   then Result := Result + 'anchored ';
+  if regmust <> nil
+   then Result := Result + 'must have ' + regmust;
+  {$IFDEF UseFirstCharSet} //###0.929
+  Result := Result + #$d#$a'FirstCharSet:';
+  for Ch := #0 to #255 do
+   if Ch in FirstCharSet
+    then Result := Result + Ch;
+  {$ENDIF}
+  Result := Result + #$d#$a;
+ end; { of function TRegExpr.Dump
+--------------------------------------------------------------}
+{$ENDIF}
+
+{$IFDEF reRealExceptionAddr}
+{$OPTIMIZATION ON}
+// ReturnAddr works correctly only if compiler optimization is ON
+// I placed this method at very end of unit because there are no
+// way to restore compiler optimization flag ...
+{$ENDIF}
+procedure TRegExpr.Error (AErrorID : integer);
+{$IFDEF reRealExceptionAddr}
+ function ReturnAddr : pointer; //###0.938
+  asm
+   mov  eax,[ebp+4]
+  end;
+{$ENDIF}
+ var
+  e : ERegExpr;
+ begin
+  fLastError := AErrorID; // dummy stub - useless because will raise exception
+  if AErrorID < 1000 // compilation error ?
+   then e := ERegExpr.Create (ErrorMsg (AErrorID) // yes - show error pos
+             + ' (pos ' + IntToStr (CompilerErrorPos) + ')')
+   else e := ERegExpr.Create (ErrorMsg (AErrorID));
+  e.ErrorCode := AErrorID;
+  e.CompilerErrorPos := CompilerErrorPos;
+  raise e
+   {$IFDEF reRealExceptionAddr}
+   At ReturnAddr; //###0.938
+   {$ENDIF}
+ end; { of procedure TRegExpr.Error
+--------------------------------------------------------------}
+
+// be carefull - placed here code will be always compiled with
+// compiler optimization flag
+initialization
+  RegExprInvertCaseFunction := TRegExpr.InvertCaseFunction;
+end.
+
+
+
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDARemoteCommand.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDARemoteCommand.pas
new file mode 100644
index 0000000..e8ad92b
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDARemoteCommand.pas	
@@ -0,0 +1,160 @@
+unit uDARemoteCommand;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up                                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+    Classes, uRORemoteService, DataAbstract4_Intf, 
+    uDAInterfaces, uRODynamicRequest, uROClasses;
+
+type
+  { TRORemoteCommandRequest }
+  TRORemoteCommandRequest = class(TRODynamicRequest)
+  private
+    fOutgoingCommandNameParameter: string;
+    fOutgoingParametersParameter: string;
+    fIncomingAffectedRowsParameter: string;
+    fIncomingParametersParameter: string;
+  public
+    constructor Create(aOwner : TComponent); override;
+    procedure SetupDefaultRequest; virtual;
+  published
+    property OutgoingCommandNameParameter: string read fOutgoingCommandNameParameter write fOutgoingCommandNameParameter;
+    property OutgoingParametersParameter: string read fOutgoingParametersParameter write fOutgoingParametersParameter;
+    property IncomingAffectedRowsParameter: string read fIncomingAffectedRowsParameter write fIncomingAffectedRowsParameter;
+    property IncomingParametersParameter: string read fIncomingParametersParameter write fIncomingParametersParameter;
+  end;
+
+  { TDARemoteCommand }
+  TDARemoteCommand = class(TComponent)
+  private
+    fRemoteService: TRORemoteService;
+    fExecuteCall: TRORemoteCommandRequest;
+    procedure SetRemoteService(const Value: TRORemoteService);
+    procedure FillCommandParams(aDataParameterArray: DataParameterArray; aCommandParam: TRORequestParam);
+  public
+    constructor Create(aOwner: TComponent); override;
+    destructor Destroy; override;
+    function Execute(aCommandName: string; aInputParameters: DataParameterArray): integer; overload;
+    function Execute(aCommandName: string; aParamNames: array of string; aParamValues: array of variant): integer; overload;
+  published
+    property RemoteService: TRORemoteService read fRemoteService write SetRemoteService;
+    property ExecuteCall: TRORemoteCommandRequest read fExecuteCall write fExecuteCall;
+  end;
+
+implementation
+
+uses
+  SysUtils, Dialogs, uRODL;
+
+{ TRORemoteCommandRequest }
+constructor TRORemoteCommandRequest.Create(aOwner : TComponent);
+begin
+  inherited;
+  Self.SetupDefaultRequest();
+end;
+
+procedure TRORemoteCommandRequest.SetupDefaultRequest;
+begin
+  Params.Clear();
+  OutgoingCommandNameParameter := Params.Add('aCommandName', rtString, fIn).Name;
+  OutgoingParametersParameter := Params.Add('aParameterArray', rtUserDefined, fIn, 'DataParameterArray').Name;
+  IncomingAffectedRowsParameter := Params.Add('Result', rtInteger, fResult).Name;
+  IncomingParametersParameter := '';
+
+  MethodName := 'ExecuteCommand';
+end;
+
+{ TDARemoteCommand }
+constructor TDARemoteCommand.Create(aOwner: TComponent);
+begin
+  inherited;
+  fExecuteCall := TRORemoteCommandRequest.Create(Self);
+  fExecuteCall.Name := 'RemoteCommandRequest';
+end;
+
+destructor TDARemoteCommand.Destroy;
+begin
+  if Assigned(fExecuteCall) then fExecuteCall.Free();
+  inherited;
+end;
+
+procedure TDARemoteCommand.SetRemoteService(const Value: TRORemoteService);
+begin
+  if Value <> fRemoteService then begin
+    fRemoteService := Value;
+    if assigned(fRemoteService) then fRemoteService.FreeNotification(self);
+    fExecuteCall.RemoteService := fRemoteService;
+  end;
+end;
+
+function TDARemoteCommand.Execute(aCommandName: string; aInputParameters: DataParameterArray): integer;
+var
+  lParam : TRORequestParam;
+begin
+  result := 0;
+  if not Assigned(fExecuteCall) then raise Exception.Create('ExecuteCall is unassigned');
+  if (Length(fExecuteCall.OutgoingCommandNameParameter)>0) then
+    fExecuteCall.ParamByName(fExecuteCall.OutgoingCommandNameParameter).Value := aCommandName;
+  if (Length(fExecuteCall.OutgoingParametersParameter)>0) then begin
+      lParam := fExecuteCall.Params.FindParam(fExecuteCall.OutgoingParametersParameter);
+      if Assigned(lParam) then FillCommandParams(aInputParameters, lparam);
+  end;
+
+  fExecuteCall.Execute();
+
+  if (Length(fExecuteCall.IncomingAffectedRowsParameter)>0) then
+    result := Integer(fExecuteCall.ParamByName(fExecuteCall.IncomingAffectedRowsParameter).Value);
+end;
+
+function TDARemoteCommand.Execute(aCommandName: string; aParamNames: array of string; aParamValues: array of variant): integer;
+var
+  i, idx: Integer;
+  lInputParameters: DataParameterArray;
+begin
+  lInputParameters := DataParameterArray.Create();
+  if (High(aParamNames) <> High(aParamValues)) then raise Exception.Create('Error in parameters. Count of parameter values doesn''t correspond to count of parameters');
+
+  for i := Low(aParamNames) to High(aParamNames) do begin
+    idx := lInputParameters.Add(DataParameter.Create());
+    lInputParameters[idx].Name := UTF8Encode(aParamNames[i]);
+    lInputParameters[idx].Value := aParamValues[i];
+  end;
+
+  result := Self.Execute(aCommandName, lInputParameters);
+end;
+
+procedure TDARemoteCommand.FillCommandParams(aDataParameterArray: DataParameterArray; aCommandParam: TRORequestParam);
+var
+  lArray: DataParameterArray;
+  lParam: DataParameter;
+  i: integer;
+begin
+  if (aCommandParam.DataType <> rtUserDefined) or (aCommandParam.TypeName <> 'DataParameterArray') then exit;
+
+  lArray := DataParameterArray.Create();
+
+  for i := 0 to aDataParameterArray.Count - 1 do begin
+    lParam := lArray.Add();
+    lParam.Name := aDataParameterArray[i].Name;
+    lParam.Value := aDataParameterArray[i].Value;
+  end;
+
+  aCommandParam.AsComplexType := lArray;
+  aCommandParam.OwnsComplexType := true;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDARemoteDataAdapter.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDARemoteDataAdapter.pas
new file mode 100644
index 0000000..408d38f
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDARemoteDataAdapter.pas	
@@ -0,0 +1,932 @@
+unit uDARemoteDataAdapter;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  Classes,
+  uRODynamicRequest, uRORemoteService, uROTypes, uROClasses,
+  uDAInterfaces, uDAClasses, uDADataStreamer, uDADataTable,
+  uDARemoteDataAdapterRequests, DataAbstract4_Intf;
+
+// for backward compatibility
+const
+  fbNone           = uDADataTable.fbNone;
+  fbRaiseException = uDADataTable.fbRaiseException;
+  fbShowReconcile  = uDADataTable.fbShowReconcile;
+  fbBoth           = uDADataTable.fbBoth;
+  rdlgNone         = uDADataTable.rdlgNone;
+  rdlgSkip         = uDADataTable.rdlgSkip;
+  rdlgCancel       = uDADataTable.rdlgCancel;
+  rdlgRepost       = uDADataTable.rdlgRepost;
+  rdlgRevert       = uDADataTable.rdlgRevert;
+type
+  TDAApplyUpdatesEvent = uDADataTable.TDAApplyUpdatesEvent;
+  TDAFailureBehavior = uDADataTable.TDAFailureBehavior;
+  TDABeforeProcessFailuresEvent = uDADataTable.TDABeforeProcessFailuresEvent;
+  TDAOnGenerateRecordMessage = uDADataTable.TDAOnGenerateRecordMessage;
+  TDAShowReconcleDialogEvent = uDADataTable.TDAShowReconcleDialogEvent;
+  TDAShowReconcileRecordInAppUIEvent = uDADataTable.TDAShowReconcileRecordInAppUIEvent;
+  TDAReconcileDialogAction = uDADataTable.TDAReconcileDialogAction;
+// end for backward compatibility
+
+type
+  TDARequestEvent = procedure(Sender: TObject; Request: TRODynamicRequest) of object;
+
+  { TDARemoteDataAdapter }
+  TDARemoteDataAdapter = class(TDABaseRemoteDataAdapter)
+  private
+    fGetDataCall: TDAGetDataRequest;
+    fGetSchemaCall: TDAGetSchemaRequest;
+    fUpdateDataCall: TDAUpdateDataRequest;
+    fGetScriptsCall: TDAGetScriptsRequest;
+    fRemoteService: TRORemoteService;
+    fSchema: TDASchema;
+    fCacheSchema: boolean;
+
+    fBeforeGetDataCall,    fAfterGetDataCall,
+    fBeforeGetSchemaCall,  fAfterGetSchemaCall,
+    fBeforeGetScriptsCall, fAfterGetScriptsCall,
+    fBeforeUpdateDataCall, fAfterUpdateDataCall: TDARequestEvent;
+
+    procedure SetCacheSchema(const Value: boolean);
+    function CreateTableRequestInfo(aTable: TDADataTable; aIncludeSchema: boolean; aDynamicWhereExpression: TDAWhereExpression = nil): TableRequestInfo;
+    procedure DoGetSchemaCall;
+
+    procedure FillTableNamesParam(aTables: array of TDADataTable; aParam: TRORequestParam);
+    procedure SetRemoteService(const Value: TRORemoteService);
+    procedure FillTableParams(aTables: array of TDADataTable; aParam: TRORequestParam);
+  protected
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+    procedure Loaded; override;
+    function InternalFillSchema: TRODataType; override;
+    procedure InternalFillSchema_ClearParams; override;
+    function InternalApplyUpdates(aTables,aTablesWithDetails: array of TDADataTable): boolean; override;
+    procedure InternalReconcileDialog(RemoteDataAdapter: TDABaseRemoteDataAdapter; var AFailedDeltaList: TList; aTableList: TList);override;
+    function GetSchemaStream: Binary; override;
+    { backward compatibility: to provide access to these in the legacy events in TDADataTable}
+    function Get_GetSchemaCall: TDARemoteRequest; override;
+    function Get_GetDataCall: TDARemoteRequest; override;
+    function Get_UpdateDataCall: TDARemoteRequest; override;
+    function Get_GetScriptsCall: TDARemoteRequest; override;
+    function GetSchema: TDASchema; override;
+  public
+    constructor Create(aOwner: TComponent); override;
+    destructor Destroy; override;
+    procedure SetupDefaultRequestV3;
+    procedure SetupDefaultRequest;
+
+    procedure CheckProperties; override;
+
+
+    procedure Fill(aTables: array of TDADataTable; aSaveCursor: boolean=false; aIncludeSchema: boolean=false); overload; override;
+    procedure Fill(aTables: array of TDADataTable; aTableRequestInfoArray: array of TableRequestInfo; aSaveCursor: boolean=false; aIncludeSchema: boolean=false); overload; override;
+    procedure Fill(aTables: array of TDADataTable; aWhereClauses : array of TDAWhereExpression; aSaveCursor: boolean=false; aIncludeSchema: boolean=false); overload; override;
+   // procedure FillSchema(aTables: array of TDADataTable; aPreserveLookupFields: boolean = false; aPreserveClientCalcFields : boolean = false); override;
+    procedure FillScripts(aTables: array of TDADataTable); override;
+
+    function ReadSchema(aForceReRead: boolean = false): TDASchema;override;
+    procedure FlushSchema;
+    property Schema: TDASchema read GetSchema;
+
+  published
+    property GetSchemaCall: TDAGetSchemaRequest read fGetSchemaCall;
+    property GetDataCall: TDAGetDataRequest read fGetDataCall;
+    property UpdateDataCall: TDAUpdateDataRequest read fUpdateDataCall;
+    property GetScriptsCall: TDAGetScriptsRequest read fGetScriptsCall;
+    property RemoteService: TRORemoteService read fRemoteService write SetRemoteService;
+    property CacheSchema: boolean read fCacheSchema write SetCacheSchema default false;
+
+    property BeforeGetDataCall: TDARequestEvent    read fBeforeGetDataCall    write fBeforeGetDataCall;
+    property AfterGetDataCall: TDARequestEvent     read fAfterGetDataCall     write fAfterGetDataCall;
+    property BeforeGetSchemaCall: TDARequestEvent  read fBeforeGetSchemaCall  write fBeforeGetSchemaCall;
+    property AfterGetSchemaCall: TDARequestEvent   read fAfterGetSchemaCall   write fAfterGetSchemaCall;
+    property BeforeGetScriptsCall: TDARequestEvent read fBeforeGetScriptsCall write fBeforeGetScriptsCall;
+    property AfterGetScriptsCall: TDARequestEvent  read fAfterGetScriptsCall  write fAfterGetScriptsCall;
+    property BeforeUpdateDataCall: TDARequestEvent read fBeforeUpdateDataCall write fBeforeUpdateDataCall;
+    property AfterUpdateDataCall: TDARequestEvent  read fAfterUpdateDataCall  write fAfterUpdateDataCall;
+  end;
+
+implementation
+
+uses
+  SysUtils, DB, TypInfo, Variants,
+  uRODL, uROXMLIntf, uDAReconcileDialog, uROBinaryHelpers;
+
+{ TDARemoteDataAdapter }
+
+procedure TDARemoteDataAdapter.FillTableNamesParam(aTables: array of TDADataTable; aParam: TRORequestParam);
+var
+  lArray: StringArray;
+  i: integer;
+begin
+  case aParam.DataType of
+    rtString: begin // v3 style string
+        if Length(aTables) <> 1 then
+          raise Exception.Create('The current GetDataCall configuration does not allow fetching multiple data tables at once.');
+        aParam.AsString := aTables[Low(aTables)].LogicalName;
+      end;
+    rtUserDefined: begin // v4 style string array
+        lArray := StringArray.Create();
+        lArray.Resize(Length(aTables));
+        for i := Low(aTables) to High(aTables) do
+          lArray[i-Low(aTables)] := AnsiToUtf8(aTables[i].LogicalName);
+        aParam.AsComplexType := lArray;
+        aParam.OwnsComplexType := true;
+      end;
+  end;
+end;
+
+procedure TDARemoteDataAdapter.FillTableParams(
+  aTables: array of TDADataTable; aParam: TRORequestParam);
+var
+  lArray: DataParameterArray;
+  lParam: DataParameter;
+  lTable: TDADataTable;
+  j: integer;
+  lList: TStringList;
+begin
+  lArray:=nil; // prevert "W1036 Variable 'lArray' might not have been initialized"
+  case aParam.DataType of
+    rtString: begin // v3 style string
+      if Length(aTables) <> 1 then raise Exception.Create('The current GetDataCall configuration does not allow fetching multiple data tables');
+      with aTables[Low(aTables)].Params do begin
+        if Count<>0 then begin
+          lList:= TStringList.Create;
+          try
+            for j := 0 to Count - 1 do
+              lList.Values[Params[j].Name]:=Params[j].AsString;
+            aParam.AsString:= lList.Text;
+          finally
+            lList.Free;
+          end;
+        end;
+      end;
+    end;
+    rtUserDefined: begin
+      if aParam.TypeName = 'DataParameterArray' then
+        lArray := DataParameterArray.Create();
+
+        lTable := aTables[Low(aTables)];
+        for j := 0 to lTable.Params.Count-1 do begin
+          lParam := lArray.Add();
+          lParam.Name := AnsiToUtf8(lTable.Params[j].Name);
+          lParam.Value := lTable.Params[j].Value;
+        end;
+
+        aParam.AsComplexType := lArray;
+        aParam.OwnsComplexType := true;
+    end;
+  end;
+end;
+
+procedure TDARemoteDataAdapter.Fill(aTables: array of TDADataTable; aTableRequestInfoArray: array of TableRequestInfo; aSaveCursor: boolean=false; aIncludeSchema: boolean=false);
+var
+  lSavedOptions: array of TDATableOptions;
+  lHasTableNamesParameter: Boolean;
+  lParam, lResultParam: TRORequestParam;
+  i: integer;
+  ltablearray: array of TDADataTable;
+  ltableList: TList;
+  llocalList: TList;
+  ltbl: TDADataTable;
+  lArray: TableRequestInfoArray;
+begin
+  if Length(aTables) <> Length(aTableRequestInfoArray) then raise Exception.Create('aTables and aTableRequestInfoArray should contain equal members count.');
+
+  CheckProperties;
+
+  lArray:= TableRequestInfoArray.Create;
+  try
+    ltableList := TList.Create;
+    llocalList := TList.Create;
+    try
+      for i := Low(aTables) to High(aTables) do begin
+        ltbl:=aTables[i];
+        if ltbl = nil then continue;
+        if ltableList.IndexOf(ltbl) = -1 then ltableList.Add(ltbl);
+        ltbl.GetDetailTablesforAllinOneFetch(ltableList,llocalList,True);
+      end;
+      SetLength(ltablearray,ltableList.Count);
+      for i := 0 to ltableList.Count - 1 do
+        ltablearray[i]:=TDADataTable(ltableList[i]);
+      for i := 0 to High(ltablearray) do
+        lArray.Add(nil);
+      for i := 0 to High(aTableRequestInfoArray) do
+        lArray.Items[ltableList.IndexOf(aTables[i])]:=aTableRequestInfoArray[i];
+      for i := 0 to lArray.Count-1 do
+        if lArray.Items[i] = nil then lArray.Items[i]:= CreateTableRequestInfo(ltablearray[i],aIncludeSchema);
+    finally
+      ltableList.Free;
+      llocalList.Free;
+    end;
+    if length(ltablearray) = 0 then Exit;
+    SetLength(lSavedOptions, length(ltablearray));
+    try
+      for i := 0 to High(ltablearray) do begin
+        ltbl:= ltablearray[i];
+        lSavedOptions[i].OldLogChanges := ltbl.LogChanges;
+        ltbl.LogChanges := false;
+        ltbl.InternalSetFetching(true);
+
+        if ltbl.Active then begin
+          lSavedOptions[i].GoFirst := false;
+          if aSaveCursor then
+            lSavedOptions[i].Bookmark := ltbl.GetBookMark;
+        end
+        else begin
+          lSavedOptions[i].GoFirst := true;
+        end;
+      end;
+
+      try
+
+        lParam := GetDataCall.Params.FindParam(GetDataCall.OutgoingTableNamesParameter);
+        lHasTableNamesParameter := assigned(lParam);
+        if lHasTableNamesParameter then
+          FillTableNamesParam(ltablearray, lParam)
+        else if Length(ltablearray) <> 1 then
+          raise Exception.Create('The current GetDataCall configuration does not allow fetching multiple data tables');
+
+        if Length(GetDataCall.OutgoingTableRequestInfosParameter) > 0 then begin
+          lParam := GetDataCall.Params.FindParam(GetDataCall.OutgoingTableRequestInfosParameter);
+          if Assigned(lParam) then begin
+            if (lParam.DataType = rtUserDefined) and (lParam.TypeName = 'TableRequestInfoArray') then begin
+              lParam.AsComplexType := lArray;
+            end;
+          end;
+        end;
+
+        if (GetDataCall.OutgoingParamsParameter <> '') then begin // v3 style call
+          lParam := GetDataCall.Params.FindParam(GetDataCall.OutgoingParamsParameter);
+          if Assigned(lParam) then
+            FillTableParams(ltablearray, lParam);
+        end;
+
+        if (GetDataCall.OutgoingMaxRecordsParameter <> '') then begin // v3 style call
+          if Length(ltablearray) <> 1 then
+            for i := 0 to High(ltablearray) do
+              if ltablearray[i].MaxRecords <> -1 then
+                raise Exception.Create('The current GetDataCall configuration does not allow fetching multiple data tables with a limited record count.');
+          lParam := GetDataCall.Params.FindParam(GetDataCall.OutgoingMaxRecordsParameter);
+          if Assigned(lParam) and (Length(ltablearray) > 0) then lParam.AsInteger := ltablearray[0].MaxRecords;
+        end;
+
+        if (GetDataCall.OutgoingIncludeSchemaParameter <> '') then begin // v3 style call
+          lParam := GetDataCall.Params.FindParam(GetDataCall.OutgoingIncludeSchemaParameter);
+          if Assigned(lParam) then lParam.AsBoolean := aIncludeSchema;
+        end;
+
+        if Assigned(fBeforeGetDataCall) then fBeforeGetDataCall(Self, GetDataCall);
+
+        GetDataCall.Execute();
+        lResultParam := GetDataCall.Params.FindParam(GetDataCall.IncomingDataParameter);
+
+        if Assigned(fAfterGetDataCall) then fAfterGetDataCall(Self, GetDataCall);
+
+        if not assigned(lResultParam) or (lResultParam.DataType <> rtBinary) then
+          raise Exception.Create('Result parameter of GetDataCall is not properly defined.');
+
+        if not assigned(lResultParam.AsBinary) then raise Exception.Create('The server returned a nil buffer.');
+
+        {todo?: oldpos := lResultParam.AsBinary.Position;
+        if Assigned(fOnAfterDataRequestCall) then fOnAfterDataRequestCall(Self, DataRequestCall);
+        if Assigned(fOnReceiveDataStream) then fOnReceiveDataStream(Self, data);
+        lResultParam.AsBinary.Position := oldpos;}
+
+        // Reads the data
+        DataStreamer.Initialize(lResultParam.AsBinary, aiRead);
+        try
+
+          // part 1 - reading schema
+          for i := Low(ltablearray) to High(ltablearray) do
+          begin
+            //if aTables[i].Opening then begin
+            ltbl:= ltablearray[i];
+            if lArray[i].IncludeSchema  and not (soIgnoreStreamSchema in ltbl.StreamingOptions) then begin
+              if not lHasTableNamesParameter and (DataStreamer.DatasetCount = 1) then
+                DataStreamer.ReadDataset(DataStreamer.DatasetNames[0],  ltbl, true, false)
+              else
+                DataStreamer.ReadDataset(ltbl.LogicalName,  ltbl, true, false);
+            end;
+            if not ltbl.Active then  ltbl.InitializeDataTable;
+            //end;
+          end;
+
+          // part 2 - reading data
+          for i := Low(ltablearray) to High(ltablearray) do begin
+            ltbl:= ltablearray[i];
+            if not lHasTableNamesParameter and (DataStreamer.DatasetCount = 1) then
+              DataStreamer.ReadDataset(DataStreamer.DatasetNames[0],  ltbl, false, true)
+            else
+              DataStreamer.ReadDataset(ltbl.LogicalName, ltbl, false, true);
+            if (moAllInOneFetch in ltbl.MasterOptions) then begin
+              ltbl.DoCascadeOperation(DataStreamer, moAllInOneFetch);
+            end;
+          end;
+        finally
+          DataStreamer.Finalize;
+        end;
+
+      finally
+        lParam := GetDataCall.Params.FindParam(GetDataCall.OutgoingTableRequestInfosParameter);
+        if Assigned(lParam) then lParam.ClearValue;
+        lParam := GetDataCall.Params.FindParam(GetDataCall.OutgoingParamsParameter);
+        if Assigned(lParam) then lParam.ClearValue;
+        lParam := GetDataCall.Params.FindParam(GetDataCall.IncomingDataParameter);
+        if Assigned(lParam) then lParam.ClearValue;
+
+
+        for i := 0 to High(ltablearray) do begin
+          ltbl:= ltablearray[i];
+          if ltbl.Active then begin
+            if lSavedOptions[i].GoFirst then begin
+              ltbl.First;
+            end
+            else begin
+              if aSaveCursor then begin
+                ltbl.GotoBookmark(lSavedOptions[i].Bookmark);
+                ltbl.FreeBookmark(lSavedOptions[i].Bookmark);
+              end;
+            end;
+          end;
+
+          ltbl.LogChanges := lSavedOptions[i].OldLogChanges;
+          ltbl.InternalSetFetching(false);
+        end;
+
+      end;
+      if AutoFillScripts then FillScripts(ltablearray);
+    finally
+      SetLength(lSavedOptions,0);
+      SetLength(ltablearray,0);
+    end;
+  finally
+    lArray.Free;
+  end;
+end;
+
+procedure TDARemoteDataAdapter.DoGetSchemaCall;
+begin
+  //ToDo: handle aFilter parameter?
+  if Assigned(fBeforeGetSchemaCall) then fBeforeGetSchemaCall(Self, GetSchemaCall);
+  GetSchemaCall.Execute();
+  if Assigned(fAfterGetSchemaCall) then fAfterGetSchemaCall(Self, GetSchemaCall);
+end;
+
+procedure TDARemoteDataAdapter.Fill(aTables: array of TDADataTable; aSaveCursor: boolean=false; aIncludeSchema: boolean=false);
+var
+  lTableRequestInfoArray: array of TableRequestInfo;
+  lTables: array of TDADataTable;
+  i,j: integer;
+begin
+  SetLength(lTableRequestInfoArray, Length(aTables));
+  SetLength(lTables, Length(aTables));
+  j:=0;
+  for i := 0 to High(aTables) do begin
+    if aTables[i] <> nil then begin
+      lTables[j]:=aTables[i];
+      lTableRequestInfoArray[j]:= CreateTableRequestInfo(aTables[j],aIncludeSchema);
+      inc(j);
+    end;
+  end;
+  SetLength(lTables, j);
+  SetLength(lTableRequestInfoArray, j);
+  Fill(lTables, lTableRequestInfoArray, aSaveCursor, aIncludeSchema);
+end;
+
+procedure TDARemoteDataAdapter.Fill(aTables: array of TDADataTable; aWhereClauses: array of TDAWhereExpression; aSaveCursor, aIncludeSchema: boolean);
+var
+  lTableRequestInfoArray: array of TableRequestInfo;
+  lTables: array of TDADataTable;
+  i,j: integer;
+begin
+  if Length(aTables) <> Length(aWhereClauses) then raise Exception.Create('aTables and aWhereClauses should contain equal members count.');
+  SetLength(lTableRequestInfoArray, Length(aTables));
+  SetLength(lTables, Length(aTables));
+  j:=0;
+  for i := 0 to High(aTables) do begin
+    if aTables[i] <> nil then begin
+      lTables[j]:=aTables[i];
+      lTableRequestInfoArray[j]:= CreateTableRequestInfo(aTables[j],aIncludeSchema, aWhereClauses[i]);
+      inc(j);
+    end;
+  end;
+  SetLength(lTables, j);
+  SetLength(lTableRequestInfoArray, j);
+  Fill(lTables, lTableRequestInfoArray, aSaveCursor,aIncludeSchema);
+end;
+(*
+procedure TDARemoteDataAdapter.FillSchema(aTables: array of TDADataTable; aPreserveLookupFields, aPreserveClientCalcFields: boolean);
+type
+  THandlerArray = array[0..1] of TMethod;
+  PHandlerArray = ^THandlerArray;
+
+const
+  HandlersToSave : array[0..1] of string = ('OnChange', 'OnValidate');
+
+var
+  lSavedOptions: array of TDATableOptions;
+  i, j, k, lIndex: integer;
+  lHandlers : PHandlerArray;
+  lResultParam: TRORequestParam;
+  lSchema: TDASchema;
+  lDataTableSchema: TDADataset;
+  lookupfields : TDAFieldCollection;
+  clientcalcfields : TDAFieldCollection;
+  lField: TDAField;
+begin
+  CheckProperties;
+
+  SetLength(lSavedOptions, Length(aTables));
+
+  for i := Low(aTables) to High(aTables) do
+    if aTables[i].Active then aTables[i].Close();
+
+  lookupfields := nil;
+  clientcalcfields := nil;
+
+  for i := Low(aTables) to High(aTables) do
+    aTables[i].Fields.FieldEventsDisabled := true;
+  try
+
+    for i := Low(aTables) to High(aTables) do begin
+      lSavedOptions[i-Low(aTables)].FieldHandlers := TStringList.Create;
+
+      { Saves the current event handler pointers }
+      for j := 0 to aTables[i].Fields.Count-1 do begin
+        New(lHandlers);
+        for k := Low(HandlersToSave) to High(HandlersToSave) do
+          lHandlers[k] := GetMethodProp(aTables[i].Fields[j], HandlersToSave[k]);
+        lSavedOptions[i-Low(aTables)].FieldHandlers.AddObject(aTables[i].Fields[j].Name, TObject(lHandlers));
+      end;
+
+      { Save lookup and calced fields}
+      if aPreserveLookupFields then begin
+        lookupfields := TDAFieldCollection.Create(nil);
+        lookupfields.Assign(aTables[i].Fields);
+        for j := (lookupfields.Count-1) downto 0 do
+          if not (lookupfields[j] as TDACustomField).Lookup then
+            lookupfields.Delete(j);
+      end;
+
+      if aPreserveClientCalcFields then begin
+        clientcalcfields := TDAFieldCollection.Create(nil);
+        clientcalcfields.Assign(aTables[i].Fields);
+        for j :=(clientcalcfields.Count-1) downto 0 do
+          if not (clientcalcfields[j] as TDACustomField).Calculated then
+            clientcalcfields.Delete(j);
+      end;
+
+      aTables[i].Fields.Clear;
+    end;
+
+    try
+      lResultParam := GetSchemaCall.Params.FindParam(GetSchemaCall.IncomingSchemaParameter);
+      if not assigned(lResultParam) then
+        raise Exception.Create('Result parameter of GetSchemaCall is not defined.');
+
+      case lResultParam.DataType of
+        rtBinary:begin
+            DoGetSchemaCall();
+            if not assigned(lResultParam.AsBinary) or (lResultParam.AsBinary.Size = 0 ) then
+              raise Exception.Create('Server returned an empty buffer for schema.');
+            DataStreamer.Initialize(lResultParam.AsBinary, aiRead);
+            try
+              if (DataStreamer.DatasetCount = 0) then raise Exception.Create('Stream does not contain any dataset');
+              for i := Low(aTables) to High(aTables) do
+                DataStreamer.ReadDataset(aTables[i].LogicalName, aTables[i], true, false);
+            finally
+              DataStreamer.Finalize;
+            end;
+          end;
+        rtString:begin
+          lSchema := Schema;
+          for i := Low(aTables) to High(aTables) do begin
+            lDataTableSchema := lSchema.Datasets.FindDatasetByName(aTables[i].LogicalName);
+            if not assigned(lDataTableSchema) then
+              lDataTableSchema := lSchema.UnionDataTables.FindUnionDataTableByName(aTables[i].LogicalName);
+            if not assigned(lDataTableSchema) then
+              lDataTableSchema := lSchema.JoinDataTables.FindJoinTableByName(aTables[i].LogicalName);
+            if not assigned(lDataTableSchema) then raise Exception.CreateFmt('Data table "%s" was not found in schema.',[aTables[i].LogicalName]);
+
+            aTables[i].Fields.AssignFieldCollection(lDataTableSchema.Fields);
+            // ToDo: the code below is shared with TableWizard. Refactor.
+            if lDataTableSchema is TDAUnionDataTable then begin
+              if not Assigned(aTables[i].Fields.FindField(def_SourceTableFieldName) as TDAField) then begin
+                lField := aTables[i].Fields.Add();
+                lField.Name := def_SourceTableFieldName;
+                lField.DataType := datInteger;
+                lField.InPrimaryKey := True;
+                lField.ServerAutoRefresh := True;
+              end;
+            end;
+            aTables[i].Params.AssignParamCollection(lDataTableSchema.Params);
+            aTables[i].CustomAttributes.Assign(lDataTableSchema.CustomAttributes);
+          end;
+        end;
+      else
+        raise Exception.Create('Result parameter of GetSchemaCall is not properly defined as String or Binary.');
+      end;
+    finally
+      { Save lookup and calced fields}
+      if aPreserveLookupFields then
+        for i := Low(aTables) to High(aTables) do
+          for j := 0 to (lookupfields.Count-1) do
+            aTables[i].Fields.Add.Assign(lookupfields[j]);
+      if aPreserveClientCalcFields then
+        for i := Low(aTables) to High(aTables) do
+          for j := 0 to (clientcalcfields.Count-1) do
+            if not Assigned(aTables[i].Fields.FindField(clientcalcfields[j].Name)) then
+              aTables[i].Fields.Add.Assign(clientcalcfields[j]);
+
+      { restores the old event handler pointers }
+      for i := Low(aTables) to High(aTables) do begin
+        for j := 0 to aTables[i].Fields.Count-1 do begin
+          lIndex := lSavedOptions[i-Low(aTables)].FieldHandlers.IndexOf(aTables[i].Fields[j].Name);
+          if lIndex >= 0 then begin
+            lHandlers := PHandlerArray(lSavedOptions[i-Low(aTables)].FieldHandlers.Objects[lIndex]);
+            for k := Low(HandlersToSave) to High(HandlersToSave) do
+              SetMethodProp(aTables[i].Fields[j], HandlersToSave[k], lHandlers[k]);
+            Dispose(lHandlers);
+          end;
+        end;
+        lSavedOptions[i-Low(aTables)].FieldHandlers.Free();
+      end;
+    end;
+    
+  finally
+    lResultParam := GetSchemaCall.Params.FindParam(GetSchemaCall.IncomingSchemaParameter);
+    if Assigned(lResultParam) then lResultParam.ClearValue;
+    
+    clientcalcfields.Free;
+    lookupfields.Free;
+    for i := Low(aTables) to High(aTables) do
+      aTables[i].Fields.FieldEventsDisabled := false;
+  end;
+end;
+*)
+procedure TDARemoteDataAdapter.FillScripts(aTables: array of TDADataTable);
+var
+  lXml: IXMLDocument;
+  lScriptNode: IXMLNode;
+  lParam: TDARemoteRequestParam;
+  lResultParam: TRORequestParam;
+  i: integer;
+begin
+  CheckProperties;
+
+  if GetScriptsCall.MethodName = '' then
+    raise Exception.Create('GetScriptsCall.MethodName must be configured to retrieve scripts.');
+
+  try
+    lParam := GetScriptsCall.Params.FindParam(GetScriptsCall.OutgoingTableNamesParameter);
+    if assigned(lParam) then FillTableNamesParam(aTables, lParam);
+
+    GetScriptsCall.Execute();
+
+    lResultParam := GetScriptsCall.Params.FindParam(GetScriptsCall.IncomingScriptParameter);
+
+    if not assigned(lResultParam) or (lResultParam.DataType <> rtString) then
+      raise Exception.Create('Result parameter of GetScriptsCall is not properly defined.');
+
+    if Assigned(fBeforeGetScriptsCall) then fBeforeGetScriptsCall(Self, GetScriptsCall);
+    GetScriptsCall.Execute();
+    if Assigned(fAfterGetScriptsCall) then fAfterGetScriptsCall(Self, GetScriptsCall);
+
+    lXml := NewROXmlDocument;
+    lXml.New;
+
+    lXml.XML := UTF8ToString(lResultParam.AsAnsiString);
+    for i := Low(aTables) to High(aTables) do begin
+      lScriptNode := lXml.DocumentNode.GetNodeByName(aTables[i].Logicalname);
+      if assigned(lScriptNode) then
+        aTables[i].ScriptCode.Text := VarToWideStr(lScriptNode.Value)
+      else
+        aTables[i].ScriptCode.Text := '';
+    end;
+  finally
+    lParam := GetScriptsCall.Params.FindParam(GetScriptsCall.OutgoingTableNamesParameter);
+    if assigned(lParam) then lParam.ClearValue;
+    lParam := GetScriptsCall.Params.FindParam(GetScriptsCall.IncomingScriptParameter);
+    if assigned(lParam) then lParam.ClearValue;
+  end;
+end;
+
+
+{$IFDEF FPC}
+procedure List_Union(List1,List2: TList);
+var
+  i: integer;
+begin
+  if List1 = List2 then Exit;
+  for i := 0 to List2.Count-1 do
+    if List1.IndexOf(List2[i])=-1 then
+       List1.Add(List2[i]);
+end;
+{$ENDIF}
+
+function TDARemoteDataAdapter.InternalApplyUpdates(aTables,aTablesWithDetails: array of TDADataTable): boolean;
+var
+  i: integer;
+  lParam, lResultparam: TRORequestParam;
+begin
+  result := false;
+
+  try
+    { Fill Input Parameters }
+    lParam := UpdateDataCall.Params.FindParam(UpdateDataCall.OutgoingDeltaParameter);
+    if not assigned(lParam) or (lParam.DataType <> rtBinary) then
+      raise Exception.Create('OutgoingDeltaParameter parameter of UpdateDataCall is not properly defined.');
+    lParam.ClearValue();
+
+    DataStreamer.Initialize(lParam.AsBinary, aiWrite);
+    try
+      for i := Low(aTables) to High(aTables) do
+        aTables[i].WriteDeltaToStream(DataStreamer);
+    finally
+      DataStreamer.Finalize;
+    end;
+
+    { Make call }
+    if DataStreamer.DeltaCount > 0 then begin
+      if Assigned(fBeforeUpdateDataCall) then fBeforeUpdateDataCall(Self, UpdateDataCall);
+      UpdateDataCall.Execute();
+      if Assigned(fAfterUpdateDataCall) then fAfterUpdateDataCall(Self, UpdateDataCall);
+
+      { Get Output Parameters }
+      if UpdateDataCall.IncomingDeltaParameter <> '' then begin // If the result parameter isn't set, we shouldn't check for a result.
+
+        lResultParam := UpdateDataCall.Params.FindParam(UpdateDataCall.IncomingDeltaParameter);
+        if not assigned(lResultParam) or (lResultParam.DataType <> rtBinary) then
+          raise Exception.Create('IncomingDeltaParameter parameter of UpdateDataCall is not properly defined.');
+
+        // Reads the incoming delta, including the details
+        if assigned(lResultParam.AsBinary) and (lResultParam.AsBinary.Size > 0) then begin
+            DataStreamer.Initialize(lResultParam.AsBinary, aiReadFromBeginning);
+            try
+              for i := Low(aTables) to High(aTables) do
+                aTables[i].ReadDeltaFromStream(DataStreamer);
+            finally
+              DataStreamer.Finalize;
+            end;
+        end;
+      end;
+    end;
+
+    result := true;
+  finally
+    lResultParam := UpdateDataCall.Params.FindParam(UpdateDataCall.IncomingDeltaParameter);
+    if assigned(lResultParam) then lResultParam.ClearValue;
+    lParam := UpdateDataCall.Params.FindParam(UpdateDataCall.OutgoingDeltaParameter);
+    if assigned(lParam) then lParam.ClearValue;
+  end;
+end;
+
+constructor TDARemoteDataAdapter.Create(aOwner: TComponent);
+begin
+  inherited;
+  fGetSchemaCall := TDAGetSchemaRequest.Create(self);
+  fGetDataCall := TDAGetDataRequest.Create(self);
+  fUpdateDataCall := TDAUpdateDataRequest.Create(self);
+  fGetScriptsCall := TDAGetScriptsRequest.Create(self);
+
+  fGetSchemaCall.Name := 'GetSchemaCall';
+  fGetDataCall.Name := 'GetDataCall';
+  fUpdateDataCall.Name := 'UpdateDataCall';
+  fGetScriptsCall.Name := 'GetScriptsCall';
+  SetupDefaultRequest;
+end;
+
+function TDARemoteDataAdapter.CreateTableRequestInfo(aTable: TDADataTable; aIncludeSchema: boolean; aDynamicWhereExpression: TDAWhereExpression = nil): TableRequestInfo;
+var
+  lParam: DataParameter;
+  j: integer;
+  lExpression: TDAWhereExpression;
+begin
+  if aDynamicWhereExpression <> nil then
+    lExpression := aDynamicWhereExpression
+  else
+    lExpression := aTable.DynamicWhere.Expression;
+  if lExpression <> nil then lExpression.Validate;
+
+  if DynamicSelect or (lExpression <> nil) then begin
+    Result := TableRequestInfoV5.Create();
+    if DynamicSelect then begin
+      TableRequestInfoV5(Result).DynamicSelectFieldNames := StringArray.Create;
+      For j:=0 to aTable.FieldCount-1 do
+        if not (aTable.Fields[j].Lookup or (aTable.Fields[j].Calculated and not aTable.Fields[j].ServerCalculated)) then
+          TableRequestInfoV5(Result).DynamicSelectFieldNames.Add(AnsiToUtf8(aTable.Fields[j].Name));
+    end;
+    if lExpression <> nil then
+      TableRequestInfoV5(Result).WhereClause:=aTable.DynamicWhere.ExpressionToXmlNode(lExpression);
+  end
+  else
+    Result := TableRequestInfo.Create();
+
+  Result.MaxRecords := aTable.MaxRecords;
+  Result.IncludeSchema := aIncludeSchema and not (soIgnoreStreamSchema in aTable.StreamingOptions);
+  Result.UserFilter := AnsiToUtf8(aTable.Where.Clause);
+  for j := 0 to aTable.Params.Count-1 do begin
+    lParam := Result.Parameters.Add();
+    lParam.Name := AnsiToUtf8(aTable.Params[j].Name);
+    lParam.Value := aTable.Params[j].Value;
+  end;
+end;
+
+destructor TDARemoteDataAdapter.Destroy;
+begin
+  FreeAndNil(fGetSchemaCall);
+  FreeAndNil(fGetDataCall);
+  FreeAndNil(fUpdateDataCall);
+  FreeAndNil(fGetScriptsCall);
+  FreeAndNil(fSchema);
+  inherited;
+end;
+
+procedure TDARemoteDataAdapter.Notification(AComponent: TComponent; Operation: TOperation);
+begin
+  inherited;
+  if (Operation = opRemove) and (AComponent = RemoteService) then RemoteService := nil;
+end;
+
+
+procedure TDARemoteDataAdapter.SetRemoteService(const Value: TRORemoteService);
+begin
+  if Value <> fRemoteService then begin
+    fRemoteService := Value;
+    if assigned(fRemoteService) then fRemoteService.FreeNotification(self);
+    GetSchemaCall.RemoteService := fRemoteService;
+    GetDataCall.RemoteService := fRemoteService;
+    UpdateDataCall.RemoteService := fRemoteService;
+    GetScriptsCall.RemoteService := fRemoteService;
+  end;
+end;
+
+{ Schema }
+
+procedure TDARemoteDataAdapter.SetCacheSchema(const Value: boolean);
+begin
+  fCacheSchema := Value;
+  if not fCacheSchema then
+    FlushSchema();
+end;
+
+function TDARemoteDataAdapter.GetSchema: TDASchema;
+begin
+  result := ReadSchema(not fCacheSchema);
+end;
+
+function TDARemoteDataAdapter.Get_GetDataCall: TDARemoteRequest;
+begin
+  result := GetDataCall;
+end;
+
+function TDARemoteDataAdapter.Get_GetSchemaCall: TDARemoteRequest;
+begin
+  result := GetSchemaCall;
+end;
+
+function TDARemoteDataAdapter.Get_GetScriptsCall: TDARemoteRequest;
+begin
+  result := GetScriptsCall;
+end;
+
+function TDARemoteDataAdapter.Get_UpdateDataCall: TDARemoteRequest;
+begin
+  result := UpdateDataCall; 
+end;
+
+function TDARemoteDataAdapter.ReadSchema(aForceReRead: boolean): TDASchema;
+var
+  lResultParam: TRORequestParam;
+begin
+  CheckProperties;
+
+  lResultParam := GetSchemaCall.Params.FindParam(GetSchemaCall.IncomingSchemaParameter);
+  if not assigned(lResultParam) then
+    raise Exception.Create('Result parameter of GetSchemaCall is not defined.');
+  if not (lResultParam.DataType in [rtString]) then
+    raise Exception.Create('Result parameter of GetSchemaCall is not properly defined as String.');
+
+  if aForceReRead then
+    FreeAndNil(fSchema);
+
+  if not assigned(fSchema) then try
+    DoGetSchemaCall();
+
+    FreeAndNil(fSchema);
+    fSchema := TDASchema.Create(nil);
+    try
+      fSchema.LoadFromXml(Utf8ToAnsi(lResultParam.AsAnsiString));
+    except
+      fSchema.LoadFromXml(lResultParam.AsString); // try to load schema as plain text
+    end;
+  finally
+    if Assigned(lResultParam) then lResultParam.ClearValue;
+  end;
+  result := fSchema;
+end;
+
+procedure TDARemoteDataAdapter.FlushSchema;
+begin
+  FreeAndNil(fSchema);
+end;
+
+procedure TDARemoteDataAdapter.SetupDefaultRequest;
+begin
+  GetSchemaCall.SetupDefaultRequest();
+  GetDataCall.SetupDefaultRequest();
+  UpdateDataCall.SetupDefaultRequest();
+  GetScriptsCall.SetupDefaultRequest();
+end;
+
+procedure TDARemoteDataAdapter.SetupDefaultRequestV3;
+begin
+  GetSchemaCall.SetupDefaultRequestV3();
+  GetDataCall.SetupDefaultRequestV3();
+  UpdateDataCall.SetupDefaultRequestV3();
+  GetScriptsCall.SetupDefaultRequestV3();
+end;
+
+procedure TDARemoteDataAdapter.CheckProperties;
+begin
+  inherited;
+  Check(not assigned(RemoteService), Name + '.RemoteService must be assigned.');
+  RemoteService.CheckProperties();
+end;
+
+procedure TDARemoteDataAdapter.Loaded;
+begin
+  inherited;
+  {$IFDEF DELPHI6}
+  // Delphi 6 doesn't call Loaded of any of the sub components.
+  fGetDataCall.Loaded;
+  fGetSchemaCall.Loaded;
+  fUpdateDataCall.Loaded;
+  fGetScriptsCall.Loaded;
+  {$ENDIF}
+end;
+
+
+function TDARemoteDataAdapter.InternalFillSchema: TRODataType;
+var
+  lResultParam: TRORequestParam;
+begin
+  lResultParam := GetSchemaCall.Params.FindParam(GetSchemaCall.IncomingSchemaParameter);
+  if not assigned(lResultParam) then
+    raise Exception.Create('Result parameter of GetSchemaCall is not defined.');
+  Result := lResultParam.DataType;
+  case Result of
+    rtBinary:begin
+        DoGetSchemaCall();
+        if not assigned(lResultParam.AsBinary) or (lResultParam.AsBinary.Size = 0 ) then
+          raise Exception.Create('Server returned an empty buffer for schema.');
+      end;
+    rtString: begin
+        Schema;
+      end;
+  end;
+end;
+
+function TDARemoteDataAdapter.GetSchemaStream: Binary;
+var
+  lResultParam: TRORequestParam;
+begin
+  lResultParam := GetSchemaCall.Params.FindParam(GetSchemaCall.IncomingSchemaParameter);
+  if not assigned(lResultParam) then
+    raise Exception.Create('Result parameter of GetSchemaCall is not defined.');
+  if not assigned(lResultParam.AsBinary) or (lResultParam.AsBinary.Size = 0 ) then
+    raise Exception.Create('Server returned an empty buffer for schema.');
+  Result := lResultParam.AsBinary;
+end;
+
+procedure TDARemoteDataAdapter.InternalFillSchema_ClearParams;
+var
+  lResultParam: TRORequestParam;
+begin
+  lResultParam := GetSchemaCall.Params.FindParam(GetSchemaCall.IncomingSchemaParameter);
+  if Assigned(lResultParam) then lResultParam.ClearValue;
+end;
+
+procedure TDARemoteDataAdapter.InternalReconcileDialog(
+  RemoteDataAdapter: TDABaseRemoteDataAdapter; var AFailedDeltaList: TList;
+  aTableList: TList);
+begin
+  ReconcileDialog(Self,AFailedDeltaList,aTableList);
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDARemoteDataAdapterRequests.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDARemoteDataAdapterRequests.pas
new file mode 100644
index 0000000..7c28fb1
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDARemoteDataAdapterRequests.pas	
@@ -0,0 +1,317 @@
+unit uDARemoteDataAdapterRequests;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  Classes,
+  uRODynamicRequest;
+
+type
+  { TDARemoteDataAdapterRequest }
+  TDARemoteDataAdapterRequest = class(TRODynamicRequest)
+  private
+    fDefault: boolean;
+    procedure SetDefault(const Value: boolean);
+  protected
+    function IsNotDefault: boolean;
+    procedure MethodNameChanged; override;
+  public
+    procedure Loaded; override;
+    constructor Create(aOwner: TComponent); override;
+    procedure SetupDefaultRequestV3; virtual; abstract;
+    procedure SetupDefaultRequest; virtual;
+  published
+    property Default: boolean read fDefault write SetDefault default true;
+    property Params stored IsNotDefault;
+    property MethodName stored IsNotDefault;
+  end;
+
+  TDAGetSchemaRequest = class(TDARemoteDataAdapterRequest)
+  private
+    fIncomingSchemaParameter: string;
+    fOutgoingFilterParameter: string;
+    procedure SetIncomingSchemaParameter(const Value: string);
+    procedure SetOutgoingFilterParameter(const Value: string);
+  public
+    procedure SetupDefaultRequestV3; override;
+    procedure SetupDefaultRequest; override;
+  published
+    property IncomingSchemaParameter: string read fIncomingSchemaParameter write SetIncomingSchemaParameter stored IsNotDefault;
+    property OutgoingFilterParameter: string read fOutgoingFilterParameter write SetOutgoingFilterParameter stored IsNotDefault;
+  end;
+
+  TDAGetDataRequest = class(TDARemoteDataAdapterRequest)
+  private
+    fIncomingDataParameter: string;
+    fOutgoingTableNamesParameter: string;
+    fOutgoingIncludeSchemaParameter: string;
+    fOutgoingMaxRecordsParameter: string;
+    fOutgoingParamsParameter: string;
+    fOutgoingTableRequestInfosParameter: string;
+    procedure SetIncomingDataParameter(const Value: string);
+    procedure SetOutgoingIncludeSchemaParameter(const Value: string);
+    procedure SetOutgoingMaxRecordsParameter(const Value: string);
+    procedure SetOutgoingParamsParameter(const Value: string);
+    procedure SetOutgoingTableNamesParameter(const Value: string);
+    procedure SetOutgoingTableRequestInfosParameter(const Value: string);
+  public
+    procedure SetupDefaultRequestV3; override;
+    procedure SetupDefaultRequest; override;
+  published
+    property OutgoingTableNamesParameter: string read fOutgoingTableNamesParameter write SetOutgoingTableNamesParameter stored IsNotDefault;
+    property OutgoingTableRequestInfosParameter: string read fOutgoingTableRequestInfosParameter write SetOutgoingTableRequestInfosParameter stored IsNotDefault;
+    property IncomingDataParameter: string read fIncomingDataParameter write SetIncomingDataParameter stored IsNotDefault;
+
+    property OutgoingParamsParameter: string read fOutgoingParamsParameter write SetOutgoingParamsParameter stored IsNotDefault;
+    property OutgoingIncludeSchemaParameter: string read fOutgoingIncludeSchemaParameter write SetOutgoingIncludeSchemaParameter stored IsNotDefault;
+    property OutgoingMaxRecordsParameter: string read fOutgoingMaxRecordsParameter write SetOutgoingMaxRecordsParameter stored IsNotDefault;
+
+  end;
+
+  TDAUpdateDataRequest = class(TDARemoteDataAdapterRequest)
+  private
+    fOutgoingDeltaParameter: string;
+    fIncomingDeltaParameter: string;
+    procedure SetIncomingDeltaParameter(const Value: string);
+    procedure SetOutgoingDeltaParameter(const Value: string);
+  public
+    procedure SetupDefaultRequestV3; override;
+    procedure SetupDefaultRequest; override;
+  published
+    property OutgoingDeltaParameter: string read fOutgoingDeltaParameter write SetOutgoingDeltaParameter stored IsNotDefault;
+    property IncomingDeltaParameter: string read fIncomingDeltaParameter write SetIncomingDeltaParameter stored IsNotDefault;
+  end;
+
+  TDAGetScriptsRequest = class(TDARemoteDataAdapterRequest)
+  private
+    fIncomingScriptParameter: string;
+    fOutgoingTableNamesParameter: string;
+    procedure SetIncomingScriptParameter(const Value: string);
+    procedure SetOutgoingTableNamesParameter(const Value: string);
+  public
+    procedure SetupDefaultRequestV3; override;
+    procedure SetupDefaultRequest; override;
+  published
+    property OutgoingTableNamesParameter: string read fOutgoingTableNamesParameter write SetOutgoingTableNamesParameter stored IsNotDefault;
+    property IncomingScriptParameter: string read fIncomingScriptParameter write SetIncomingScriptParameter stored IsNotDefault;
+  end;
+
+implementation
+
+uses
+  uRODL, uROClasses;
+
+{ TDARemoteDataAdapterRequest }
+
+constructor TDARemoteDataAdapterRequest.Create(aOwner: TComponent);
+begin
+  inherited;
+  SetSubComponent(true);
+  fDefault := true;
+end;
+
+function TDARemoteDataAdapterRequest.IsNotDefault: boolean;
+begin
+  result := not fDefault;
+end;
+
+procedure TDARemoteDataAdapterRequest.Loaded;
+begin
+  inherited;
+  if Default then
+    SetupDefaultRequest();
+end;
+
+procedure TDARemoteDataAdapterRequest.MethodNameChanged;
+begin
+  inherited;
+  Default := false;
+end;
+
+procedure TDARemoteDataAdapterRequest.SetDefault(const Value: boolean);
+begin
+  if fDefault <> Value then begin
+    fDefault := Value;
+    if fDefault then SetupDefaultRequest;
+  end;
+end;
+
+procedure TDARemoteDataAdapterRequest.SetupDefaultRequest;
+begin
+  fDefault := true;
+end;
+
+{ TDAGetSchemaRequest }
+
+procedure TDAGetSchemaRequest.SetIncomingSchemaParameter(const Value: string);
+begin
+  fIncomingSchemaParameter := Value;
+  Default := false;
+end;
+
+procedure TDAGetSchemaRequest.SetOutgoingFilterParameter(const Value: string);
+begin
+  fOutgoingFilterParameter := Value;
+  Default := false;
+end;
+
+procedure TDAGetSchemaRequest.SetupDefaultRequest;
+begin
+  Params.Clear();
+  OutgoingFilterParameter := Params.Add('aFilter', rtString, fIn).Name;
+  IncomingSchemaParameter := Params.Add('Result', rtString, fResult).Name;
+  MethodName := 'GetSchema';
+  inherited;
+end;
+
+procedure TDAGetSchemaRequest.SetupDefaultRequestV3;
+begin
+  Params.Clear();
+  OutgoingFilterParameter := '';
+  IncomingSchemaParameter := Params.Add('Result', rtString, fResult).Name;
+  MethodName := 'GetSchemaAsXML';
+  Default := false;
+end;
+
+{ TDAGetDataRequest }
+
+procedure TDAGetDataRequest.SetIncomingDataParameter(const Value: string);
+begin
+  fIncomingDataParameter := Value;
+  Default := false;
+end;
+
+procedure TDAGetDataRequest.SetOutgoingIncludeSchemaParameter(const Value: string);
+begin
+  fOutgoingIncludeSchemaParameter := Value;
+  Default := false;
+end;
+
+procedure TDAGetDataRequest.SetOutgoingMaxRecordsParameter(const Value: string);
+begin
+  fOutgoingMaxRecordsParameter := Value;
+  Default := false;
+end;
+
+procedure TDAGetDataRequest.SetOutgoingParamsParameter(const Value: string);
+begin
+  fOutgoingParamsParameter := Value;
+  Default := false;
+end;
+
+procedure TDAGetDataRequest.SetOutgoingTableNamesParameter(const Value: string);
+begin
+  fOutgoingTableNamesParameter := Value;
+  Default := false;
+end;
+
+procedure TDAGetDataRequest.SetOutgoingTableRequestInfosParameter(const Value: string);
+begin
+  fOutgoingTableRequestInfosParameter := Value;
+  Default := false;
+end;
+
+procedure TDAGetDataRequest.SetupDefaultRequest;
+begin
+  Params.Clear();
+  OutgoingTableNamesParameter        := Params.Add('aTableNameArray', rtUserDefined, fIn, 'StringArray').Name;
+  OutgoingTableRequestInfosParameter := Params.Add('aTableRequestInfoArray', rtUserDefined, fIn, 'TableRequestInfoArray').Name;
+  OutgoingParamsParameter            := '';
+  OutgoingIncludeSchemaParameter     := '';
+  OutgoingMaxRecordsParameter        := '';
+  IncomingDataParameter              := Params.Add('Result', rtBinary, fResult).Name;
+  MethodName := 'GetData';
+  inherited;
+end;
+
+procedure TDAGetDataRequest.SetupDefaultRequestV3;
+begin
+  Params.Clear();
+  OutgoingTableNamesParameter    := Params.Add('DatasetName', rtString, fIn).Name;
+  OutgoingParamsParameter        := Params.Add('Params', rtString, fIn).Name;
+  OutgoingIncludeSchemaParameter := Params.Add('IncludeSchema', rtBoolean, fIn).Name;
+  OutgoingMaxRecordsParameter    := Params.Add('MaxRecords', rtInteger, fIn).Name;
+  IncomingDataParameter          := Params.Add('Result', rtBinary, fResult).Name;
+  MethodName := 'GetDatasetData';
+  Default := false;
+end;
+
+{ TDAUpdateDataRequest }
+
+procedure TDAUpdateDataRequest.SetIncomingDeltaParameter(const Value: string);
+begin
+  fIncomingDeltaParameter := Value;
+  Default := false;
+end;
+
+procedure TDAUpdateDataRequest.SetOutgoingDeltaParameter(const Value: string);
+begin
+  fOutgoingDeltaParameter := Value;
+  Default := false;
+end;
+
+procedure TDAUpdateDataRequest.SetupDefaultRequest;
+begin
+  Params.Clear();
+  OutgoingDeltaParameter := Params.Add('aDelta', rtBinary, fIn).Name;
+  IncomingDeltaParameter := Params.Add('Result', rtBinary, fResult).Name;
+  MethodName := 'UpdateData';
+  inherited;
+end;
+
+procedure TDAUpdateDataRequest.SetupDefaultRequestV3;
+begin
+  Params.Clear();
+  OutgoingDeltaParameter := Params.Add('Delta', rtBinary, fIn).Name;
+  IncomingDeltaParameter := Params.Add('Result', rtBinary, fResult).Name;
+  MethodName := 'UpdateData';
+  Default := false;
+end;
+
+{ TDAGetScriptsRequest }
+
+procedure TDAGetScriptsRequest.SetIncomingScriptParameter(const Value: string);
+begin
+  fIncomingScriptParameter := Value;
+  Default := false;
+end;
+
+procedure TDAGetScriptsRequest.SetOutgoingTableNamesParameter(const Value: string);
+begin
+  fOutgoingTableNamesParameter := Value;
+  Default := false;
+end;
+
+procedure TDAGetScriptsRequest.SetupDefaultRequest;
+begin
+  Params.Clear();
+  OutgoingTableNamesParameter := Params.Add('DatasetNames', rtString, fIn).Name;
+  IncomingScriptParameter     := Params.Add('Result', rtString, fResult).Name;
+  MethodName := 'GetDatasetScripts';
+  inherited;
+end;
+
+procedure TDAGetScriptsRequest.SetupDefaultRequestV3;
+begin
+  Params.Clear();
+  OutgoingTableNamesParameter := Params.Add('DatasetNames', rtString, fIn).Name;
+  IncomingScriptParameter     := Params.Add('Result', rtString, fResult).Name;
+  MethodName := 'GetDatasetScripts';
+  Default := false;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDARes.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDARes.pas
new file mode 100644
index 0000000..18a745f
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDARes.pas	
@@ -0,0 +1,99 @@
+unit uDARes;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+//uses uDAInterfaces;
+
+resourcestring
+  err_ChangeLogAlreadyStarted = 'StartChange has already been called; cannot log more than one change at a time.';
+  err_NotAttachedToDataTable = 'Delta is not attached to a DataTable';
+  err_DeltaAttachedToDataTable = 'Cannot perform this operation on a delta that is attached to a DataTable';
+  err_DriverProcAlreadyRegistered = 'DriverProc 0x%0.8x is already registered';
+  err_DriverManagerNotCreated = 'A Data Abstract DriverManager is not currently instantiated';
+  err_DriverManagerAlreadyCreated = 'An instance of a TDADriverManager was already initialized. Only one driver manager per module is allowed';
+  err_DatasetNotAssigned = 'Dataset is not assigned';
+  err_VariantNotSupported = 'Variant type %d is not supported';
+  err_InvalidDestination = 'Invalid destination';
+  err_DriverManagerNotAssigned = 'Driver Manager is not assigned';
+  err_ConnectionManagerNotAssigned = 'Connection Manager is not assigned';
+  err_FieldTypeNotSupported = 'FieldType %s (%d) is not supported';
+  err_NotSupported = 'Not supported';
+  err_DataTypeNotSupportedByRemoteRequest = 'DataType is not supported by RemoteRequest';
+  err_InvalidDataset = 'Invalid or NIL dataset';
+  err_CannotMakeNILDefault = 'Cannot set NIL';
+  err_DifferentOwnerCollection = 'The connection definition is not owned by this collection';
+  err_CannotFindItem = 'Cannot find %s "%s" in collection of type %s';
+  err_InvalidCollectionType = 'Invalid collection type';
+  err_InvalidOwner = 'Invalid owner';
+  err_DriverAlreadyLoaded = 'Driver %s is already loaded';
+  err_DriverIsNotLoaded = 'Driver %s was not loaded';
+  err_InvalidDLL = '%s is not a valid Data Abstract driver';
+  err_UnknownDriver = 'Unknown driver %s';
+  err_UnknownParameter = 'Unknown parameter %s';
+  err_FieldIsNotBound = 'Field is not bound';
+  err_CannotFindField = 'Cannot find field %s';
+  err_LoadPackageFailed = 'LoadPackage failed for file %s';
+  err_InvalidDriverReference = 'The driver in %s could not be loaded';
+  err_CannotFindStatement = 'Cannot find statement %s for connection %s';
+  err_CannotFindDefaultItem = 'Cannot find default %s';
+  err_PoolIsNotEmpty = 'Cannot perform this operation when connections are pooled';
+  err_MaxPoolSizeReached = 'Maximum pool size reached. Cannot create a new connection';
+  err_CannotAccessThisProperty = 'Cannot access this property with the current DataType value';
+  err_LAMEDataset = '%s does not implement IProviderSupport or implements it incorrectly';
+  err_HETConnectionNotSupportedInV3 = 'HET Connections are not supported by te legacy v3 DARemoteService';
+  err_DARDMInvalidSchema = 'Schema must be assigned and must point to a ConnectionManager';
+  err_DARDMMissingConnectionName = 'Cannot acquire a connection without a ConnectionName or a OnBeforeAcquireConnection event handler';
+  err_DARDMUnassignedAdapter = 'DataAdapter is not assigned';
+  err_DARDMConnectionIsNotAssigned = 'Connection is not assigned';
+  err_DARDMCannotFindProxessorForDelta = 'Cannot find a business processor for delta "%s"';
+
+  err_NeedShareMem = 'To use dynamically loaded drivers, you must build your application with ShareMem.';
+
+  err_ExecuteSQLCommandNotAllowed = 'ExecuteSQLCommand is not enabled for this server.';
+
+  err_DatasetNotAccessible = 'Access to dataset %s has not been permitted.';
+  err_CommandNotAccessible = 'executon of command %s has not been permitted.';
+  err_SQLNotPermitted = 'Execution of the specified SQL statement has not been permitted.';
+  err_UTF8DecodeError = 'Can''t decode UTF8 string: "%s"';
+
+const
+  // Connection strings
+  ds_Separator = '?';
+  ds_Database = 'Database';
+  ds_UserID = 'UserID';
+  ds_Password = 'Password';
+  ds_Server = 'Server';
+  ds_AuxDriver = 'AuxDriver';
+
+  // IDE
+  DAPalettePageName = 'RemObjects Data Abstract';
+
+  // Driver access
+  DAFileExtDriver = '.dad';
+  drv_AllDrivers = 'DA*Drv' + DAFileExtDriver; // Driver names are in the format DAxxxxDrv.dad
+
+  // Schema Modeler related
+  DAFileExtSchemaFile = '.daSchema';
+  DAFileExtConnectionMgrFile = '.daConnections';
+  DAFileExtDataDictionaryFile = '.daDictionary';
+  DAFileExtDiagramsFile = '.daDiagrams';
+  DAFileExtConfigFile = '.daConfig';
+
+implementation
+
+end.
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDASQL92Interfaces.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDASQL92Interfaces.pas
new file mode 100644
index 0000000..80ca567
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDASQL92Interfaces.pas	
@@ -0,0 +1,269 @@
+unit uDASQL92Interfaces;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Driver Library                                     }
+{                                                                            }
+{ compiler: Delphi 6 and up                                                  }
+{ platform: Win32                                                            }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+function SQL92_IdentifierNeedsQuoting(const iIdentifier: string): boolean;
+
+implementation
+uses
+  SysUtils, uDAEngine;
+
+var
+  sql92_reservedwords         : array of string;
+
+function SQL92_IdentifierNeedsQuoting(const iIdentifier: string): boolean;
+begin
+  Result := (pos('.', iIdentifier) > 0) or TestIdentifier(iIdentifier,sql92_reservedwords);
+end;
+
+procedure SQL92_InitializeReservedWords;
+begin
+  SetLength(sql92_reservedwords, 225);
+  // sorted with TStringList.Sort (bds2007)
+  sql92_reservedwords[0] := 'ABSOLUTE';
+  sql92_reservedwords[1] := 'ACTION';
+  sql92_reservedwords[2] := 'ADD';
+  sql92_reservedwords[3] := 'ALL';
+  sql92_reservedwords[4] := 'ALLOCATE';
+  sql92_reservedwords[5] := 'ALTER';
+  sql92_reservedwords[6] := 'AND';
+  sql92_reservedwords[7] := 'ANY';
+  sql92_reservedwords[8] := 'ARE';
+  sql92_reservedwords[9] := 'AS';
+  sql92_reservedwords[10] := 'ASC';
+  sql92_reservedwords[11] := 'ASSERTION';
+  sql92_reservedwords[12] := 'AT';
+  sql92_reservedwords[13] := 'AUTHORIZATION';
+  sql92_reservedwords[14] := 'AVG';
+  sql92_reservedwords[15] := 'BEGIN';
+  sql92_reservedwords[16] := 'BETWEEN';
+  sql92_reservedwords[17] := 'BIT';
+  sql92_reservedwords[18] := 'BIT_LENGTH';
+  sql92_reservedwords[19] := 'BOTH';
+  sql92_reservedwords[20] := 'BY';
+  sql92_reservedwords[21] := 'CASCADE';
+  sql92_reservedwords[22] := 'CASCADED';
+  sql92_reservedwords[23] := 'CASE';
+  sql92_reservedwords[24] := 'CAST';
+  sql92_reservedwords[25] := 'CATALOG';
+  sql92_reservedwords[26] := 'CHAR';
+  sql92_reservedwords[27] := 'CHAR_LENGTH';
+  sql92_reservedwords[28] := 'CHARACTER';
+  sql92_reservedwords[29] := 'CHARACTER_LENGTH';
+  sql92_reservedwords[30] := 'CHECK';
+  sql92_reservedwords[31] := 'CLOSE';
+  sql92_reservedwords[32] := 'COALESCE';
+  sql92_reservedwords[33] := 'COLLATE';
+  sql92_reservedwords[34] := 'COLLATION';
+  sql92_reservedwords[35] := 'COLUMN';
+  sql92_reservedwords[36] := 'COMMIT';
+  sql92_reservedwords[37] := 'CONNECT';
+  sql92_reservedwords[38] := 'CONNECTION';
+  sql92_reservedwords[39] := 'CONSTRAINT';
+  sql92_reservedwords[40] := 'CONSTRAINTS';
+  sql92_reservedwords[41] := 'CONTINUE';
+  sql92_reservedwords[42] := 'CONVERT';
+  sql92_reservedwords[43] := 'CORRESPONDING';
+  sql92_reservedwords[44] := 'COUNT';
+  sql92_reservedwords[45] := 'CREATE';
+  sql92_reservedwords[46] := 'CROSS';
+  sql92_reservedwords[47] := 'CURRENT';
+  sql92_reservedwords[48] := 'CURRENT_DATE';
+  sql92_reservedwords[49] := 'CURRENT_TIME';
+  sql92_reservedwords[50] := 'CURRENT_TIMESTAMP';
+  sql92_reservedwords[51] := 'CURRENT_USER';
+  sql92_reservedwords[52] := 'DATE';
+  sql92_reservedwords[53] := 'DAY';
+  sql92_reservedwords[54] := 'DEALLOCATE';
+  sql92_reservedwords[55] := 'DEC';
+  sql92_reservedwords[56] := 'DECIMAL';
+  sql92_reservedwords[57] := 'DECLARE';
+  sql92_reservedwords[58] := 'DEFAULT';
+  sql92_reservedwords[59] := 'DEFERRABLE';
+  sql92_reservedwords[60] := 'DEFERRED';
+  sql92_reservedwords[61] := 'DELETE';
+  sql92_reservedwords[62] := 'DESC';
+  sql92_reservedwords[63] := 'DESCRIBE';
+  sql92_reservedwords[64] := 'DESCRIPTOR';
+  sql92_reservedwords[65] := 'DIAGNOSTICS';
+  sql92_reservedwords[66] := 'DISCONNECT';
+  sql92_reservedwords[67] := 'DISTINCT';
+  sql92_reservedwords[68] := 'DOMAIN';
+  sql92_reservedwords[69] := 'DOUBLE';
+  sql92_reservedwords[70] := 'DROP';
+  sql92_reservedwords[71] := 'ELSE';
+  sql92_reservedwords[72] := 'END';
+  sql92_reservedwords[73] := 'END-EXEC';
+  sql92_reservedwords[74] := 'ESCAPE';
+  sql92_reservedwords[75] := 'EXCEPT';
+  sql92_reservedwords[76] := 'EXCEPTION';
+  sql92_reservedwords[77] := 'EXEC';
+  sql92_reservedwords[78] := 'EXECUTE';
+  sql92_reservedwords[79] := 'EXISTS';
+  sql92_reservedwords[80] := 'EXTERNAL';
+  sql92_reservedwords[81] := 'EXTRACT';
+  sql92_reservedwords[82] := 'FALSE';
+  sql92_reservedwords[83] := 'FETCH';
+  sql92_reservedwords[84] := 'FLOAT';
+  sql92_reservedwords[85] := 'FOR';
+  sql92_reservedwords[86] := 'FOREIGN';
+  sql92_reservedwords[87] := 'FOUND';
+  sql92_reservedwords[88] := 'FROM';
+  sql92_reservedwords[89] := 'FULL';
+  sql92_reservedwords[90] := 'GET';
+  sql92_reservedwords[91] := 'GLOBAL';
+  sql92_reservedwords[92] := 'GO';
+  sql92_reservedwords[93] := 'GOTO';
+  sql92_reservedwords[94] := 'GRANT';
+  sql92_reservedwords[95] := 'GROUP';
+  sql92_reservedwords[96] := 'HAVING';
+  sql92_reservedwords[97] := 'HOUR';
+  sql92_reservedwords[98] := 'IDENTITY';
+  sql92_reservedwords[99] := 'IMMEDIATE';
+  sql92_reservedwords[100] := 'IN';
+  sql92_reservedwords[101] := 'INDICATOR';
+  sql92_reservedwords[102] := 'INITIALLY';
+  sql92_reservedwords[103] := 'INNER';
+  sql92_reservedwords[104] := 'INPUT';
+  sql92_reservedwords[105] := 'INSENSITIVE';
+  sql92_reservedwords[106] := 'INSERT';
+  sql92_reservedwords[107] := 'INT';
+  sql92_reservedwords[108] := 'INTEGER';
+  sql92_reservedwords[109] := 'INTERSECT';
+  sql92_reservedwords[110] := 'INTERVAL';
+  sql92_reservedwords[111] := 'INTO';
+  sql92_reservedwords[112] := 'IS';
+  sql92_reservedwords[113] := 'ISOLATION';
+  sql92_reservedwords[114] := 'JOIN';
+  sql92_reservedwords[115] := 'KEY';
+  sql92_reservedwords[116] := 'LANGUAGE';
+  sql92_reservedwords[117] := 'LAST';
+  sql92_reservedwords[118] := 'LEADING';
+  sql92_reservedwords[119] := 'LEFT';
+  sql92_reservedwords[120] := 'LEVEL';
+  sql92_reservedwords[121] := 'LIKE';
+  sql92_reservedwords[122] := 'LOCAL';
+  sql92_reservedwords[123] := 'LOWER';
+  sql92_reservedwords[124] := 'MATCH';
+  sql92_reservedwords[125] := 'MAX';
+  sql92_reservedwords[126] := 'MIN';
+  sql92_reservedwords[127] := 'MINUTE';
+  sql92_reservedwords[128] := 'MODULE';
+  sql92_reservedwords[129] := 'MONTH';
+  sql92_reservedwords[130] := 'NAMES';
+  sql92_reservedwords[131] := 'NATIONAL';
+  sql92_reservedwords[132] := 'NATURAL';
+  sql92_reservedwords[133] := 'NCHAR';
+  sql92_reservedwords[134] := 'NEXT';
+  sql92_reservedwords[135] := 'NO';
+  sql92_reservedwords[136] := 'NOT';
+  sql92_reservedwords[137] := 'NULL';
+  sql92_reservedwords[138] := 'NULLIF';
+  sql92_reservedwords[139] := 'NUMERIC';
+  sql92_reservedwords[140] := 'OCTET_LENGTH';
+  sql92_reservedwords[141] := 'OF';
+  sql92_reservedwords[142] := 'ON';
+  sql92_reservedwords[143] := 'ONLY';
+  sql92_reservedwords[144] := 'OPEN';
+  sql92_reservedwords[145] := 'OPTION';
+  sql92_reservedwords[146] := 'OR';
+  sql92_reservedwords[147] := 'ORDER';
+  sql92_reservedwords[148] := 'OUTER';
+  sql92_reservedwords[149] := 'OUTPUT';
+  sql92_reservedwords[150] := 'OVERLAPS';
+  sql92_reservedwords[151] := 'PAD';
+  sql92_reservedwords[152] := 'PARTIAL';
+  sql92_reservedwords[153] := 'POSITION';
+  sql92_reservedwords[154] := 'PRECISION';
+  sql92_reservedwords[155] := 'PREPARE';
+  sql92_reservedwords[156] := 'PRESERVE';
+  sql92_reservedwords[157] := 'PRIMARY';
+  sql92_reservedwords[158] := 'PRIOR';
+  sql92_reservedwords[159] := 'PRIVILEGES';
+  sql92_reservedwords[160] := 'PROCEDURE';
+  sql92_reservedwords[161] := 'PUBLIC';
+  sql92_reservedwords[162] := 'READ';
+  sql92_reservedwords[163] := 'REAL';
+  sql92_reservedwords[164] := 'REFERENCES';
+  sql92_reservedwords[165] := 'RELATIVE';
+  sql92_reservedwords[166] := 'RESTRICT';
+  sql92_reservedwords[167] := 'REVOKE';
+  sql92_reservedwords[168] := 'RIGHT';
+  sql92_reservedwords[169] := 'ROLLBACK';
+  sql92_reservedwords[170] := 'ROWS';
+  sql92_reservedwords[171] := 'SCHEMA';
+  sql92_reservedwords[172] := 'SCROLL';
+  sql92_reservedwords[173] := 'SECTION';
+  sql92_reservedwords[174] := 'SELECT';
+  sql92_reservedwords[175] := 'SESSION';
+  sql92_reservedwords[176] := 'SESSION_USER';
+  sql92_reservedwords[177] := 'SET';
+  sql92_reservedwords[178] := 'SIZE';
+  sql92_reservedwords[179] := 'SMALLINT';
+  sql92_reservedwords[180] := 'SOME';
+  sql92_reservedwords[181] := 'SPACE';
+  sql92_reservedwords[182] := 'SQL';
+  sql92_reservedwords[183] := 'SQLCODE';
+  sql92_reservedwords[184] := 'SQLERROR';
+  sql92_reservedwords[185] := 'SQLSTATE';
+  sql92_reservedwords[186] := 'SQLWARNING';
+  sql92_reservedwords[187] := 'SUBSTRING';
+  sql92_reservedwords[188] := 'SUM';
+  sql92_reservedwords[189] := 'SYSTEM_USER';
+  sql92_reservedwords[190] := 'TABLE';
+  sql92_reservedwords[191] := 'TEMPORARY';
+  sql92_reservedwords[192] := 'THEN';
+  sql92_reservedwords[193] := 'TIME';
+  sql92_reservedwords[194] := 'TIMESTAMP';
+  sql92_reservedwords[195] := 'TIMEZONE_HOUR';
+  sql92_reservedwords[196] := 'TIMEZONE_MINUTE';
+  sql92_reservedwords[197] := 'TO';
+  sql92_reservedwords[198] := 'TRAILING';
+  sql92_reservedwords[199] := 'TRANSACTION';
+  sql92_reservedwords[200] := 'TRANSLATE';
+  sql92_reservedwords[201] := 'TRANSLATION';
+  sql92_reservedwords[202] := 'TRIM';
+  sql92_reservedwords[203] := 'TRUE';
+  sql92_reservedwords[204] := 'UNION';
+  sql92_reservedwords[205] := 'UNIQUE';
+  sql92_reservedwords[206] := 'UNKNOWN';
+  sql92_reservedwords[207] := 'UPDATE';
+  sql92_reservedwords[208] := 'UPPER';
+  sql92_reservedwords[209] := 'USAGE';
+  sql92_reservedwords[210] := 'USER';
+  sql92_reservedwords[211] := 'USING';
+  sql92_reservedwords[212] := 'VALUE';
+  sql92_reservedwords[213] := 'VALUES';
+  sql92_reservedwords[214] := 'VARCHAR';
+  sql92_reservedwords[215] := 'VARYING';
+  sql92_reservedwords[216] := 'VIEW';
+  sql92_reservedwords[217] := 'WHEN';
+  sql92_reservedwords[218] := 'WHENEVER';
+  sql92_reservedwords[219] := 'WHERE';
+  sql92_reservedwords[220] := 'WITH';
+  sql92_reservedwords[221] := 'WORK';
+  sql92_reservedwords[222] := 'WRITE';
+  sql92_reservedwords[223] := 'YEAR';
+  sql92_reservedwords[224] := 'ZONE';
+end;
+
+initialization
+  sql92_InitializeReservedWords;
+finalization
+  sql92_reservedwords := nil;
+end.
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDASQL92QueryBuilder.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDASQL92QueryBuilder.pas
new file mode 100644
index 0000000..3e56fe0
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDASQL92QueryBuilder.pas	
@@ -0,0 +1,181 @@
+unit uDASQL92QueryBuilder;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  Classes,
+  uDAInterfaces,
+  uDAWhere;
+
+type
+  TDASQL92WhereBuilder = class(TDASQLWhereBuilder)
+  protected
+    function ProcessBinaryExpression(AExpression: TDAWhereExpression): string; override;
+    function ProcessUnaryExpression(AExpression: TDAWhereExpression): string; override;
+    function ProcessNullExpression(AExpression: TDAWhereExpression): string; override;
+  end;
+
+  TDASQL92QueryBuilder = class(TDAQueryBuilder)
+  protected
+    function CreateWhereBuilder: TDASQLWhereBuilder; override;
+    function CreateTableClause: string; override;
+    function IdentifierNeedsQuoting(const iIdentifier: string):boolean;override;
+    function QuoteStringId(aValue: string): string;
+  end;
+
+implementation
+uses
+  SysUtils, uROXMLIntf, uDASQL92Interfaces;
+
+const
+  c_Indent = '   ';
+
+  { TDASQL92QueryBuilder }
+
+function TDASQL92QueryBuilder.CreateTableClause: string;
+var
+  i, j: integer;
+  s: string;
+begin
+  Result := QuoteIdentifierIfNeeded(MainTable.MasterTable);
+  for i := 0 to MainTable.JoinSourceTables.Count - 1 do
+    with TDAJoinSourceTable(MainTable.JoinSourceTables.Items[i]) do begin
+      if (JoinConditions.Count = 0) or (JoinType = jtCross) then
+        Result := Result + ',' + QuoteIdentifierIfNeeded(Name)
+      else begin
+        case JoinType of
+          jtInner: s := 'INNER';
+          jtLeftOuter: s := 'LEFT OUTER';
+          jtRightOuter: s := 'RIGHT OUTER';
+          jtFullOuter: s := 'FULL OUTER';
+        end;
+        Result := Result + sLineBreak + c_Indent + Format('%s JOIN %s ON (', [s, QuoteIdentifierIfNeeded(Name)]);
+        for j := 0 to JoinConditions.Count - 1 do begin
+          if J > 0 then Result := Result + ' and ';
+          with TDAJoinCondition(JoinConditions.Items[j]) do begin
+            Result := Result + Format('(%s = %s)', [
+              GenerateFieldName(FromTableName, FromFieldName),
+              GenerateFieldName(ToTableName, ToFieldName)]);
+          end;
+          Result := Result + ')';
+        end;
+      end;
+    end;
+end;
+
+function TDASQL92QueryBuilder.CreateWhereBuilder: TDASQLWhereBuilder;
+begin
+  Result := TDASQL92WhereBuilder.Create(Self);
+end;
+
+function TDASQL92QueryBuilder.IdentifierNeedsQuoting(
+  const iIdentifier: string): boolean;
+begin
+  Result:= inherited IdentifierNeedsQuoting(iIdentifier) or SQL92_IdentifierNeedsQuoting(iIdentifier);
+end;
+
+function TDASQL92QueryBuilder.QuoteStringId(aValue: string): string;
+begin
+  Result:= AnsiQuotedStr(aValue,'''');
+end;
+
+{ TDASQL92WhereBuilder }
+
+function TDASQL92WhereBuilder.ProcessBinaryExpression(
+  AExpression: TDAWhereExpression): string;
+const
+  TDABinaryOperatorStr: array[TDABinaryOperator] of string =
+  ('AND', 'OR', '' {dboXor}, '<', '<=', '>', '>=', '<>', '=', 'LIKE', '' {dboIn}, '+', '-', '*', '/', '' {dboNotIn});
+
+  function ExpressionisNull(aExpr: TDAWhereExpression): boolean;
+  begin
+    result := (AExpr is TDANullExpression);
+  end;
+
+  function ExpressionisNotNull(aExpr: TDAWhereExpression): boolean;
+  begin
+    result :=
+      ((AExpr is TDAUnaryExpression) and
+      (TDAUnaryExpression(AExpr).Operator = duoNot) and
+      (TDAUnaryExpression(AExpr).Expression is TDANullExpression));
+  end;
+
+var
+  lLeft, lRight: string;
+  lLeftisNull, lRightisNull: boolean;
+  s,s1,s2: string;
+  s_Null: string;
+begin
+  Result := '';
+  With TDABinaryExpression(AExpression) do begin
+    lLeft := ProcessExpression(Left);
+    lRight := ProcessExpression(Right);
+    lRightisNull := ExpressionisNull(Right) or ExpressionisNotNull(Right);
+    lLeftisNull := ExpressionisNull(Left) or ExpressionisNotNull(Left);
+
+    if Operator = dboXor then
+      // A xor B = (A and not B) or (not A and B)
+      result := Format('((%s AND NOT %s) OR' + sLineBreak + '(NOT %0:s AND %1:s))', [lLeft, lRight])
+    else if lRightisNull or lLeftisNull then begin
+      s_Null:= ProcessNullExpression(nil);
+      if lRightisNull then s2:= '%0:s' else s2:='%1:s';
+      if (lRightisNull and ExpressionisNotNull(Right)) or (lLeftisNull and ExpressionisNotNull(Left)) then begin
+        s :=  '('+s2+' IS NOT '+s_Null+')';
+        s1 := '('+s2+' IS '+s_Null+')';
+      end
+      else begin
+        s :=  '('+s2+' IS '+s_Null+')';
+        s1 := '('+s2+' IS NOT '+s_Null+')';
+      end;
+      if Operator in [dboNotEqual,dboLess,dboGreater] then
+        Result := Format(s1, [lLeft, lRight])
+      else
+        Result := Format(s, [lLeft, lRight]);
+    end
+    else case Operator of
+      dboIn:  result := Format('(%s IN (%s))', [lLeft, lRight]);
+      dboNotIn:  result := Format('(%s NOT IN (%s))', [lLeft, lRight]);
+    else
+      result := Format('(%s %s %s)', [lLeft, TDABinaryOperatorStr[Operator], lRight]);
+    end;
+  end;
+end;
+
+function TDASQL92WhereBuilder.ProcessNullExpression(
+  AExpression: TDAWhereExpression): string;
+begin
+  Result := 'NULL';
+end;
+
+function TDASQL92WhereBuilder.ProcessUnaryExpression(
+  AExpression: TDAWhereExpression): string;
+var
+  lExpr: string;
+begin
+  with TDAUnaryExpression(AExpression) do begin
+    lExpr := ProcessExpression(Expression);
+    case Operator of
+      duoNot: Result := 'NOT ' + lExpr;
+      duoMinus: Result := '-' + lExpr;
+    else
+      Result := '';
+    end;
+  end;
+end;
+
+end.
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDASQLiteInterfaces.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDASQLiteInterfaces.pas
new file mode 100644
index 0000000..b4ae054
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDASQLiteInterfaces.pas	
@@ -0,0 +1,254 @@
+unit uDASQLiteInterfaces;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  uDAInterfaces, uDAEngine, uROClasses;
+
+type
+  { IDASQLiteConnection
+      For identification purposes Implemented by all SQLite connections }
+  IDASQLiteConnection = interface(IDAConnection)
+    ['{C6249278-7BBB-4E4F-849B-A9AA7C9ACD66}']
+  end;
+
+  TDASQLiteDriver = class(TDAEDriver)
+  protected
+    function GetDefaultConnectionType(const AuxDriver: string): string; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+  end;
+
+  TDASQLiteConnection = class(TDAEConnection, IDAFileBasedDatabase, IDASQLiteConnection)
+  protected
+    procedure DoGetTableNames(out List: IROStrings); override;
+    procedure DoGetStoredProcedureNames(out List: IROStrings); override;
+    procedure DoGetViewNames(out List: IROStrings); override;
+    function IdentifierNeedsQuoting(const iIdentifier: string): boolean; override; {$IFNDEF FPC_SAFECALL_BUG}safecall;{$ENDIF}
+    //IDAFileBasedDatabase
+    function GetFileExtensions: IROStrings;
+  end;
+
+
+function SQLite_GetFileExtensions: IROStrings;
+procedure SQLite_GetObjectNames(Query: IDADataset;AList: IROStrings; AObjectType: TDAObjecttype);
+function SQLite_IdentifierNeedsQuoting(const iIdentifier: string): boolean;
+
+const
+  SQLite_DriverType = 'SQLite';
+
+implementation
+uses
+  SysUtils;
+
+var
+  sqlite_reservedwords         : array of string;
+
+function SQLite_GetFileExtensions: IROStrings;
+begin
+  Result := TROStrings.Create;
+  result.Add('*.SQB;*.DB3;*.DB;*.DBB;SQLite Database (*.sqb,*.db3,*.db,*.dbb)');
+  result.Add('*.*;All files (*.*)');
+end;
+
+procedure SQLite_GetObjectNames(Query: IDADataset;AList: IROStrings; AObjectType: TDAObjecttype);
+begin
+  try
+    case AObjectType of
+      dotTable: Query.SQL := 'SELECT name FROM sqlite_master WHERE type="table" ORDER BY name';
+      dotView: Query.SQL := 'SELECT name FROM sqlite_master WHERE type="view" ORDER BY name';
+      dotProcedure: Exit;
+    else
+    end;
+    Query.Open;
+    while not Query.EOF do begin
+      AList.Add(Trim(Query.Fields[0].AsString));
+      Query.Next;
+    end;
+  finally
+    Query:=nil;
+  end;
+end;
+
+function SQLite_IdentifierNeedsQuoting(const iIdentifier: string): boolean;
+begin
+  result := TestIdentifier(iIdentifier, sqlite_reservedwords);
+end;
+
+{ TDASQLiteDriver }
+
+function TDASQLiteDriver.GetDefaultConnectionType(
+  const AuxDriver: string): string;
+begin
+  Result:= SQLite_DriverType;
+end;
+
+{ TDASQLiteConnection }
+
+procedure TDASQLiteConnection.DoGetStoredProcedureNames(out List: IROStrings);
+begin
+  inherited;
+  SQLite_GetObjectNames(GetDatasetClass.Create(Self),List,dotProcedure);
+end;
+
+procedure TDASQLiteConnection.DoGetTableNames(out List: IROStrings);
+begin
+  inherited;
+  SQLite_GetObjectNames(GetDatasetClass.Create(Self),List,dotTable);
+end;
+
+procedure TDASQLiteConnection.DoGetViewNames(out List: IROStrings);
+begin
+  inherited;
+  SQLite_GetObjectNames(GetDatasetClass.Create(Self),List,dotView);
+end;
+
+function TDASQLiteConnection.GetFileExtensions: IROStrings;
+begin
+  Result:=SQLite_GetFileExtensions;
+end;
+
+function TDASQLiteConnection.IdentifierNeedsQuoting(
+  const iIdentifier: string): boolean;
+begin
+  Result := inherited IdentifierNeedsQuoting(iIdentifier) or SQLite_IdentifierNeedsQuoting(iIdentifier);
+end;
+
+
+procedure sqlite_InitializeReservedWords;
+begin
+  SetLength(sqlite_reservedwords,113);
+  // sorted with TStringList.Sort (bds2007)  
+  sqlite_reservedwords[0] := 'ABORT';
+  sqlite_reservedwords[1] := 'ADD';
+  sqlite_reservedwords[2] := 'AFTER';
+  sqlite_reservedwords[3] := 'ALL';
+  sqlite_reservedwords[4] := 'ALTER';
+  sqlite_reservedwords[5] := 'ANALYZE';
+  sqlite_reservedwords[6] := 'AND';
+  sqlite_reservedwords[7] := 'AS';
+  sqlite_reservedwords[8] := 'ASC';
+  sqlite_reservedwords[9] := 'ATTACH';
+  sqlite_reservedwords[10] := 'AUTOINCREMENT';
+  sqlite_reservedwords[11] := 'BEFORE';
+  sqlite_reservedwords[12] := 'BEGIN';
+  sqlite_reservedwords[13] := 'BETWEEN';
+  sqlite_reservedwords[14] := 'BY';
+  sqlite_reservedwords[15] := 'CASCADE';
+  sqlite_reservedwords[16] := 'CASE';
+  sqlite_reservedwords[17] := 'CAST';
+  sqlite_reservedwords[18] := 'CHECK';
+  sqlite_reservedwords[19] := 'COLLATE';
+  sqlite_reservedwords[20] := 'COMMIT';
+  sqlite_reservedwords[21] := 'CONFLICT';
+  sqlite_reservedwords[22] := 'CONSTRAINT';
+  sqlite_reservedwords[23] := 'CREATE';
+  sqlite_reservedwords[24] := 'CROSS';
+  sqlite_reservedwords[25] := 'CURRENT_DATE';
+  sqlite_reservedwords[26] := 'CURRENT_TIME';
+  sqlite_reservedwords[27] := 'CURRENT_TIMESTAMP';
+  sqlite_reservedwords[28] := 'DATABASE';
+  sqlite_reservedwords[29] := 'DEFAULT';
+  sqlite_reservedwords[30] := 'DEFERRABLE';
+  sqlite_reservedwords[31] := 'DEFERRED';
+  sqlite_reservedwords[32] := 'DELETE';
+  sqlite_reservedwords[33] := 'DESC';
+  sqlite_reservedwords[34] := 'DETACH';
+  sqlite_reservedwords[35] := 'DISTINCT';
+  sqlite_reservedwords[36] := 'DROP';
+  sqlite_reservedwords[37] := 'EACH';
+  sqlite_reservedwords[38] := 'ELSE';
+  sqlite_reservedwords[39] := 'END';
+  sqlite_reservedwords[40] := 'ESCAPE';
+  sqlite_reservedwords[41] := 'EXCEPT';
+  sqlite_reservedwords[42] := 'EXCLUSIVE';
+  sqlite_reservedwords[43] := 'EXPLAIN';
+  sqlite_reservedwords[44] := 'FAIL';
+  sqlite_reservedwords[45] := 'FOR';
+  sqlite_reservedwords[46] := 'FOREIGN';
+  sqlite_reservedwords[47] := 'FROM';
+  sqlite_reservedwords[48] := 'FULL';
+  sqlite_reservedwords[49] := 'GLOB';
+  sqlite_reservedwords[50] := 'GROUP';
+  sqlite_reservedwords[51] := 'HAVING';
+  sqlite_reservedwords[52] := 'IF';
+  sqlite_reservedwords[53] := 'IGNORE';
+  sqlite_reservedwords[54] := 'IMMEDIATE';
+  sqlite_reservedwords[55] := 'IN';
+  sqlite_reservedwords[56] := 'INDEX';
+  sqlite_reservedwords[57] := 'INITIALLY';
+  sqlite_reservedwords[58] := 'INNER';
+  sqlite_reservedwords[59] := 'INSERT';
+  sqlite_reservedwords[60] := 'INSTEAD';
+  sqlite_reservedwords[61] := 'INTERSECT';
+  sqlite_reservedwords[62] := 'INTO';
+  sqlite_reservedwords[63] := 'IS';
+  sqlite_reservedwords[64] := 'ISNULL';
+  sqlite_reservedwords[65] := 'JOIN';
+  sqlite_reservedwords[66] := 'KEY';
+  sqlite_reservedwords[67] := 'LEFT';
+  sqlite_reservedwords[68] := 'LIKE';
+  sqlite_reservedwords[69] := 'LIMIT';
+  sqlite_reservedwords[70] := 'MATCH';
+  sqlite_reservedwords[71] := 'NATURAL';
+  sqlite_reservedwords[72] := 'NOT';
+  sqlite_reservedwords[73] := 'NOTNULL';
+  sqlite_reservedwords[74] := 'NULL';
+  sqlite_reservedwords[75] := 'OF';
+  sqlite_reservedwords[76] := 'OFFSET';
+  sqlite_reservedwords[77] := 'ON';
+  sqlite_reservedwords[78] := 'OR';
+  sqlite_reservedwords[79] := 'ORDER';
+  sqlite_reservedwords[80] := 'OUTER';
+  sqlite_reservedwords[81] := 'PLAN';
+  sqlite_reservedwords[82] := 'PRAGMA';
+  sqlite_reservedwords[83] := 'PRIMARY';
+  sqlite_reservedwords[84] := 'QUERY';
+  sqlite_reservedwords[85] := 'RAISE';
+  sqlite_reservedwords[86] := 'REFERENCES';
+  sqlite_reservedwords[87] := 'REINDEX';
+  sqlite_reservedwords[88] := 'RENAME';
+  sqlite_reservedwords[89] := 'REPLACE';
+  sqlite_reservedwords[90] := 'RESTRICT';
+  sqlite_reservedwords[91] := 'RIGHT';
+  sqlite_reservedwords[92] := 'ROLLBACK';
+  sqlite_reservedwords[93] := 'ROW';
+  sqlite_reservedwords[94] := 'SELECT';
+  sqlite_reservedwords[95] := 'SET';
+  sqlite_reservedwords[96] := 'TABLE';
+  sqlite_reservedwords[97] := 'TEMP';
+  sqlite_reservedwords[98] := 'TEMPORARY';
+  sqlite_reservedwords[99] := 'THEN';
+  sqlite_reservedwords[100] := 'TO';
+  sqlite_reservedwords[101] := 'TRANSACTION';
+  sqlite_reservedwords[102] := 'TRIGGER';
+  sqlite_reservedwords[103] := 'UNION';
+  sqlite_reservedwords[104] := 'UNIQUE';
+  sqlite_reservedwords[105] := 'UPDATE';
+  sqlite_reservedwords[106] := 'USING';
+  sqlite_reservedwords[107] := 'VACUUM';
+  sqlite_reservedwords[108] := 'VALUES';
+  sqlite_reservedwords[109] := 'VIEW';
+  sqlite_reservedwords[110] := 'VIRTUAL';
+  sqlite_reservedwords[111] := 'WHEN';
+  sqlite_reservedwords[112] := 'WHERE';
+end;
+
+initialization
+  sqlite_InitializeReservedWords;
+finalization
+  sqlite_reservedwords := nil;
+end.
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAScriptingProvider.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAScriptingProvider.pas
new file mode 100644
index 0000000..5b31d51
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAScriptingProvider.pas	
@@ -0,0 +1,102 @@
+unit uDAScriptingProvider;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  Classes, SysUtils;
+
+type
+  TScriptableComponent = class;
+  TDAScriptingProvider = class(TComponent)
+  private
+    FScriptableComponent: TScriptableComponent;
+    procedure SetScriptableComponent(const Value: TScriptableComponent);
+  protected
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+  published
+    property ScriptableComponent: TScriptableComponent read FScriptableComponent write SetScriptableComponent;
+  end;
+
+  IDAScriptingProvider = interface
+  ['{6D19A2F9-233A-4EE6-95EC-CDFCD7410C15}']
+  end;
+
+  EDAScriptError = class(Exception);
+  EDAScriptCompileError = class(EDAScriptError);
+
+  TScriptableComponent = class(TComponent)
+  private
+    fScriptingProvider: TDAScriptingProvider;
+    procedure SetScriptingProvider(const Value: TDAScriptingProvider);
+  protected
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+  published
+    property ScriptingProvider: TDAScriptingProvider read fScriptingProvider write SetScriptingProvider;
+  end;
+
+
+
+implementation
+
+{ TScriptableComponent }
+
+procedure TScriptableComponent.Notification(AComponent: TComponent;
+  Operation: TOperation);
+begin
+  inherited;
+  if (Operation = opRemove) then begin
+    if (AComponent = fScriptingProvider) then fScriptingProvider := nil;
+  end;
+end;
+
+procedure TScriptableComponent.SetScriptingProvider(const Value: TDAScriptingProvider);
+begin
+  if fScriptingProvider <> Value then begin
+    if fScriptingProvider <> nil then fScriptingProvider.ScriptableComponent:=nil;
+    if Value <> nil then Value.ScriptableComponent := Self;
+    if Assigned(fScriptingProvider) then fScriptingProvider.FreeNotification(self);
+  end;
+end;
+
+{ TDAScriptingProvider }
+
+procedure TDAScriptingProvider.Notification(AComponent: TComponent;
+  Operation: TOperation);
+begin
+  inherited;
+  if (Operation = opRemove) then begin
+    if (AComponent = FScriptableComponent) then FScriptableComponent := nil;
+  end;
+end;
+
+procedure TDAScriptingProvider.SetScriptableComponent(
+  const Value: TScriptableComponent);
+begin
+  if FScriptableComponent <> Value then begin
+    if FScriptableComponent <> nil then begin
+      FScriptableComponent.fScriptingProvider:=nil;
+      FScriptableComponent.RemoveFreeNotification(Self);
+    end;
+    FScriptableComponent := Value;
+    if Assigned(FScriptableComponent) then begin
+      FScriptableComponent.fScriptingProvider := Self;
+      FScriptableComponent.FreeNotification(Self);
+    end;
+  end;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAServerLog.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAServerLog.pas
new file mode 100644
index 0000000..73bcea9
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAServerLog.pas	
@@ -0,0 +1,615 @@
+unit uDAServerLog;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  Classes, Contnrs, SysUtils, uROSessions, SyncObjs, uROTypes, uDAInterfaces,
+  uROXMLIntf, uROXMLSerializer;
+
+const
+  EmptyGUID: TGUID = '{00000000-0000-0000-0000-000000000000}';
+
+type
+  TDAServerLog = class;
+
+  { TDALogItem }
+  TDALogItem = class(TROComplexType)
+  private
+    fServerLog: TDAServerLog;
+    fCreationTime: TDateTime;
+    fSessionID: TGUID;
+    function GetSessionIDAsString: string;
+
+  protected
+    procedure AssignSession(aSession: TROSession); virtual;
+
+  public
+    constructor Create(aServerLog: TDAServerLog; aSession: TROSession); reintroduce;
+    destructor Destroy; override;
+
+    property ServerLog: TDAServerLog read fServerLog;
+    {$IFDEF FPC}
+    property SessionID: TGUID read fSessionID;
+    {$ENDIF}
+
+  published
+    {$IFNDEF FPC}
+    property SessionID: TGUID read fSessionID;
+    {$ENDIF}
+    property SessionIDAsString: string read GetSessionIDAsString;
+    property CreationTime: TDateTime read fCreationTime;
+  end;
+
+  { TDASessionLog }
+  TDASessionLog = class(TDALogItem)
+  private
+    fLoginInfo: TROComplexType;
+
+  protected
+    procedure AssignLoginInfo(aLoginInfo: TROComplexType); virtual;
+
+  public
+    constructor Create(aServerLog: TDAServerLog; aSession: TROSession; aLoginInfo: TROComplexType);
+    destructor Destroy; override;
+
+  published
+    property LoginInfo: TROComplexType read fLoginInfo;
+  end;
+
+  TDASessionLogClass = class of TDASessionLog;
+
+  { TDASQLCommandLog }
+  TDASQLCommandLog = class(TDALogItem)
+  private
+    fActualSQLText: string;
+    fElapsedMilliseconds: Cardinal;
+    fOriginalSQLText: string;
+    fParams: TDAParamCollection;
+  protected
+  public
+    constructor Create(aServerLog: TDAServerLog; aSession: TROSession;
+                       const aCommand: IDASQLCommand;
+                       aActualSQLText: string; aElapsedMilliseconds: Cardinal);
+    destructor Destroy; override;
+
+    property Params: TDAParamCollection read fParams;
+
+  published
+
+    property OriginalSQLText: string read fOriginalSQLText;
+    property ActualSQLText: string read fActualSQLText;
+    property ElapsedMilliseconds: cardinal read fElapsedMilliseconds;
+  end;
+
+  TDASQLCommandLogClass = class of TDASQLCommandLog;
+
+  { TDASQLErrorLog }
+  TDASQLErrorLog = class(TDASQLCommandLog)
+  private
+    fErrorMessage: string;
+  protected
+  public
+    constructor Create(aServerLog: TDAServerLog; aSession: TROSession;
+                       aError: Exception; const aCommand: IDASQLCommand;
+                       aActualSQLText: string);
+
+    property ErrorMessage: string read fErrorMessage;
+  end;
+
+  TDASQLErrorLogClass = class of TDASQLErrorLog;
+
+  { Events }
+  TDASessionLogEvent = procedure(Sender: TDAServerLog; SessionLog: TDASessionLog) of object;
+  TDASessionLogRemoveEvent = procedure(Sender: TDAServerLog; SessionLog: TDASessionLog; var RemoveRelatedLogs: boolean) of object;
+  TDASQLCommandLogEvent = procedure(Sender: TDAServerLog; SQLCommandLog: TDASQLCommandLog) of object;
+  TDASQLErrorLogEvent = procedure(Sender: TDAServerLog; SQLErrorLog: TDASQLErrorLog) of object;
+  TDALogClassesDefinitionEvent = procedure(Sender: TDAServerLog;
+                                         var aSessionLogClass: TDASessionLogClass;
+                                         var aSQLCommandLogClass: TDASQLCommandLogClass;
+                                         var aSQLErrorLogClass: TDASQLErrorLogClass) of object;
+
+  { TDAServerLog }
+  TDAServerLog = class(TComponent)
+  private
+    fSessionsLogs: TStringList;
+    fSQLCommandLogs,
+    fSQLErrorsLogs: TObjectList;
+    fOnAddSQLCommandLog: TDASQLCommandLogEvent;
+    fOnAddSQLErrorLog: TDASQLErrorLogEvent;
+    fOnAddSessionLog: TDASessionLogEvent;
+    fActive: boolean;
+    fOnRemoveSessionLog: TDASessionLogRemoveEvent;
+
+    fCriticalSessions,
+    fCriticalSQLCommands,
+    fCriticalSQLErrors: TCriticalSection;
+    fOnLogClassesDefinition: TDALogClassesDefinitionEvent;
+
+    fSessionLogClass: TDASessionLogClass;
+    fSQLCommandLogClass: TDASQLCommandLogClass;
+    fSQLErrorLogClass: TDASQLErrorLogClass;
+
+    function GetSQLCommandLogsCount: integer;
+    function GetSQLCommandLogs(Index: integer): TDASQLCommandLog;
+    function GetSQLErrorLogs(Index: integer): TDASQLErrorLog;
+    function GetSessionLogsCount: integer;
+    function GetSessionLogs(Index: integer): TDASessionLog;
+    function GetSQLErrorLogsCount: integer;
+
+  protected
+    procedure RegisterLogServer;
+    procedure UnRegisterLogServer;
+
+    procedure Loaded; override;
+
+  public
+    constructor Create(aOwner: TComponent); override;
+    destructor Destroy; override;
+
+    procedure SaveToXML(aFileName: string); overload;
+    procedure SaveToXML(const aXMLDocument: IXMLDocument); overload; virtual;
+
+    { Session logs }
+    function FindSessionLog(aSession: TROSession): TDASessionLog; overload;
+    function FindSessionLog(aSessionID: TGUID): TDASessionLog; overload;
+
+    function AddSessionLog(aSession: TROSession; aLoginInfo: TROComplexType): TDASessionLog;
+    procedure RemoveSessionLog(aSessionID: TGUID; aRemoveRelatedLogs: boolean); overload;
+    procedure RemoveSessionLog(aSession: TROSession; aRemoveRelatedLogs: boolean); overload;
+    procedure ClearSessionLogs(aRemoveRelatedLogs: boolean);
+
+    { SQL command logs }
+    function AddSQLCommandLog(aSession: TROSession; const aCommand: IDASQLCommand;
+                              anActualSQLText: string; aElapsedMilliseconds: Cardinal): TDASQLCommandLog;
+    procedure ClearSQLCommandLogs; overload;
+    procedure ClearSQLCommandLogs(aSessionID: TGUID); overload;
+
+    { SQL error logs }
+    function AddSQLErrorLog(aSession: TROSession; aError: Exception; const aCommand: IDASQLCommand;
+                            aActualSQLText: string): TDASQLErrorLog;
+    procedure ClearSQLErrorLogs; overload;
+    procedure ClearSQLErrorLogs(aSessionID: TGUID); overload;
+
+    { Properties }
+    property SessionLogs[Index: integer]: TDASessionLog read GetSessionLogs;
+    property SessionLogsCount: integer read GetSessionLogsCount;
+
+    property SQLCommandLogs[Index: integer]: TDASQLCommandLog read GetSQLCommandLogs;
+    property SQLCommandLogsCount: integer read GetSQLCommandLogsCount;
+
+    property SQLErrorLogs[Index: integer]: TDASQLErrorLog read GetSQLErrorLogs;
+    property SQLErrorLogsCount: integer read GetSQLErrorLogsCount;
+
+  published
+    property Active: boolean read fActive write fActive;
+
+    property OnAddSessionLog: TDASessionLogEvent read fOnAddSessionLog write fOnAddSessionLog;
+    property OnRemoveSessionLog: TDASessionLogRemoveEvent read fOnRemoveSessionLog write fOnRemoveSessionLog;
+    property OnAddSQLCommandLog: TDASQLCommandLogEvent read fOnAddSQLCommandLog write fOnAddSQLCommandLog;
+    property OnAddSQLErrorLog: TDASQLErrorLogEvent read fOnAddSQLErrorLog write fOnAddSQLErrorLog;
+    property OnLogClassesDefinition: TDALogClassesDefinitionEvent read fOnLogClassesDefinition write fOnLogClassesDefinition;
+  end;
+
+function ServerLog: TDAServerLog;
+
+implementation
+
+var _ServerLog: TDAServerLog;
+
+function ServerLog: TDAServerLog;
+begin
+  if not Assigned(_ServerLog)
+    then raise Exception.Create('No TDAServerLog have been registered');
+
+  result := _ServerLog;
+end;
+
+{ TDALogItem }
+
+procedure TDALogItem.AssignSession(aSession: TROSession);
+begin
+  if Assigned(aSession)
+    then fSessionID := aSession.SessionID
+    else fSessionID := EmptyGUID;
+end;
+
+constructor TDALogItem.Create(aServerLog: TDAServerLog; aSession: TROSession);
+begin
+  fCreationTime := Now;
+  fServerLog := aServerLog;
+  AssignSession(aSession);
+end;
+
+destructor TDALogItem.Destroy;
+begin
+  inherited;
+end;
+
+function TDALogItem.GetSessionIDAsString: string;
+begin
+  result := GUIDToString(fSessionID)
+end;
+
+{ TDASessionLog }
+
+procedure TDASessionLog.AssignLoginInfo(aLoginInfo: TROComplexType);
+begin
+  fLoginInfo := TROComplexTypeClass(aLoginInfo.ClassType).Create;
+  fLoginInfo.Assign(aLoginInfo);
+end;
+
+constructor TDASessionLog.Create(aServerLog: TDAServerLog; aSession: TROSession; aLoginInfo: TROComplexType);
+begin
+  inherited Create(aServerLog, aSession);
+
+  AssignLoginInfo(aLoginInfo);
+end;
+
+destructor TDASessionLog.Destroy;
+begin
+  FreeAndNIL(fLoginInfo);
+  inherited;
+end;
+
+{ TDASQLCommandLog }
+
+constructor TDASQLCommandLog.Create(aServerLog: TDAServerLog; aSession: TROSession;
+  const aCommand: IDASQLCommand; aActualSQLText: string; aElapsedMilliseconds: Cardinal);
+begin
+  inherited Create(aServerLog, aSession);
+
+  fElapsedMilliseconds := aElapsedMilliseconds;
+  fOriginalSQLText := aCommand.SQL;
+  fActualSQLText := aActualSQLText;
+  fParams := TDAParamCollection.Create(NIL);
+  if (aCommand.Params.Count>0)
+    then fParams.Assign(aCommand.Params);
+end;
+
+destructor TDASQLCommandLog.Destroy;
+begin
+  FreeAndNIL(fParams);
+  inherited;
+end;
+
+{ TDASQLErrorLog }
+
+constructor TDASQLErrorLog.Create(aServerLog: TDAServerLog; aSession: TROSession;
+  aError: Exception; const aCommand: IDASQLCommand; aActualSQLText: string);
+begin
+  inherited Create(aServerLog, aSession, aCommand, aActualSQLText, 0);
+
+  fErrorMessage := aError.Message;
+end;
+
+{ TDAServerLog }
+constructor TDAServerLog.Create(aOwner: TComponent);
+begin
+  inherited;
+
+  fCriticalSessions := TCriticalSection.Create;
+  fCriticalSQLCommands := TCriticalSection.Create;
+  fCriticalSQLErrors := TCriticalSection.Create;
+
+  fSessionsLogs := TStringList.Create;
+  fSessionsLogs.Sorted := TRUE;
+
+  fSQLCommandLogs := TObjectList.Create;
+  fSQLErrorsLogs := TObjectList.Create;
+end;
+
+destructor TDAServerLog.Destroy;
+begin
+  if not (csDesigning in ComponentState) then UnRegisterLogServer;
+
+  ClearSessionLogs(FALSE);
+  FreeAndNIL(fSessionsLogs);
+
+  ClearSQLCommandLogs;
+  FreeAndNIL(fSQLCommandLogs);
+
+  ClearSQLErrorLogs;
+  FreeAndNIL(fSQLErrorsLogs);
+
+  FreeAndNIL(fCriticalSessions);
+  FreeAndNIL(fCriticalSQLCommands);
+  FreeAndNIL(fCriticalSQLErrors);
+
+  inherited;
+end;
+
+procedure TDAServerLog.Loaded;
+begin
+  if (csDesigning in ComponentState) then Exit;
+
+  RegisterLogServer;
+
+  fSessionLogClass := TDASessionLog;
+  fSQLCommandLogClass := TDASQLCommandLog;
+  fSQLErrorLogClass := TDASQLErrorLog;
+
+  if Assigned(fOnLogClassesDefinition)
+    then fOnLogClassesDefinition(Self, fSessionLogClass, fSQLCommandLogClass, fSQLErrorLogClass);
+end;
+
+function TDAServerLog.AddSQLCommandLog(aSession: TROSession; const aCommand: IDASQLCommand;
+                           anActualSQLText: string; aElapsedMilliseconds: Cardinal): TDASQLCommandLog;
+begin
+  result := NIL;
+  if not Active then Exit;
+
+  result := fSQLCommandLogClass.Create(Self, aSession, aCommand, anActualSQLText, aElapsedMilliseconds);
+
+  fCriticalSQLCommands.Enter;
+  try
+    fSQLCommandLogs.Add(result);
+
+    if Assigned(fOnAddSQLCommandLog)
+      then fOnAddSQLCommandLog(Self, result);
+  finally
+    fCriticalSQLCommands.Leave;
+  end;
+end;
+
+function TDAServerLog.AddSQLErrorLog(aSession: TROSession; aError: Exception; const aCommand: IDASQLCommand;
+  aActualSQLText: string): TDASQLErrorLog;
+begin
+  result := NIL;
+  if not Active then Exit;
+
+  result := fSQLErrorLogClass.Create(Self, aSession, aError, aCommand, aActualSQLText);
+  fCriticalSQLErrors.Enter;
+  try
+    fSQLErrorsLogs.Add(result);
+
+    if Assigned(OnAddSQLErrorLog)
+      then OnAddSQLErrorLog(Self, result);
+  finally
+    fCriticalSQLErrors.Leave;
+  end;
+end;
+
+function TDAServerLog.AddSessionLog(aSession: TROSession; aLoginInfo: TROComplexType): TDASessionLog;
+begin
+  result := NIL;
+  if not Active then Exit;
+
+  result := fSessionLogClass.Create(Self, aSession, aLoginInfo);
+
+  fCriticalSessions.Enter;
+  try
+    fSessionsLogs.AddObject(GUIDToString(aSession.SessionID), result);
+
+    if Assigned(fOnAddSessionLog)
+      then fOnAddSessionLog(Self, result);
+  finally
+    fCriticalSessions.Leave;
+  end;
+end;
+
+procedure TDAServerLog.RemoveSessionLog(aSessionID: TGUID; aRemoveRelatedLogs: boolean);
+var idx: integer;
+    removeRelated: boolean;
+begin
+  fCriticalSessions.Enter;
+  try
+    idx := fSessionsLogs.IndexOf(GUIDToString(aSessionID));
+    if (idx>=0) then begin
+      removeRelated := aRemoveRelatedLogs;
+
+      if Assigned(fOnRemoveSessionLog)
+        then fOnRemoveSessionLog(Self, TDASessionLog(fSessionsLogs.Objects[idx]), removeRelated);
+
+      fSessionsLogs.Objects[idx].Free;
+      fSessionsLogs.Delete(idx);
+
+      { Removes the entries associated to this session in the sql and errors lists }
+      if removeRelated then begin
+        ClearSQLCommandLogs(aSessionID);
+        ClearSQLErrorLogs(aSessionID);
+      end;
+    end;
+  finally
+    fCriticalSessions.Leave;
+  end;
+end;
+
+procedure TDAServerLog.RemoveSessionLog(aSession: TROSession; aRemoveRelatedLogs: boolean);
+begin
+  RemoveSessionLog(aSession.SessionID, aRemoveRelatedLogs);
+end;
+
+function TDAServerLog.GetSQLCommandLogsCount: integer;
+begin
+  result := fSQLCommandLogs.Count
+end;
+
+function TDAServerLog.GetSQLCommandLogs(Index: integer): TDASQLCommandLog;
+begin
+  result := TDASQLCommandLog(fSQLCommandLogs[Index])
+end;
+
+function TDAServerLog.GetSQLErrorLogsCount: integer;
+begin
+  result := fSQLErrorsLogs.Count
+end;
+
+function TDAServerLog.GetSQLErrorLogs(Index: integer): TDASQLErrorLog;
+begin
+  result := TDASQLErrorLog(fSQLErrorsLogs[Index])
+end;
+
+function TDAServerLog.GetSessionLogsCount: integer;
+begin
+  result := fSessionsLogs.Count
+end;
+
+function TDAServerLog.GetSessionLogs(Index: integer): TDASessionLog;
+begin
+  result := TDASessionLog(fSessionsLogs.Objects[Index])
+end;
+
+procedure TDAServerLog.RegisterLogServer;
+begin
+  if (_ServerLog<>NIL)
+    then raise Exception.Create('Only one instance of TDAServerLog is allowed');
+
+  _ServerLog := Self;
+end;
+
+procedure TDAServerLog.UnRegisterLogServer;
+begin
+  _ServerLog := NIL;
+end;
+
+procedure TDAServerLog.ClearSQLCommandLogs;
+begin
+  fCriticalSQLCommands.Enter;
+  try
+    fSQLCommandLogs.Clear;
+  finally
+    fCriticalSQLCommands.Leave;
+  end;
+end;
+
+procedure TDAServerLog.ClearSQLErrorLogs;
+begin
+  fCriticalSQLErrors.Enter;
+  try
+    fSQLErrorsLogs.Clear;
+  finally
+    fCriticalSQLErrors.Leave;
+  end;
+end;
+
+
+procedure TDAServerLog.ClearSQLCommandLogs(aSessionID: TGUID);
+var i: integer;
+begin
+  fCriticalSQLCommands.Enter;
+  try
+    for i := fSQLCommandLogs.Count-1 downto 0 do
+      if IsEqualGUID(TDASQLCommandLog(fSQLCommandLogs[i]).SessionID, aSessionID)
+        then fSQLCommandLogs.Delete(i);
+  finally
+    fCriticalSQLCommands.Leave;
+  end;
+end;
+
+procedure TDAServerLog.ClearSQLErrorLogs(aSessionID: TGUID);
+var i: integer;
+begin
+  fCriticalSQLErrors.Enter;
+  try
+    for i := fSQLErrorsLogs.Count-1 downto 0 do
+      if IsEqualGUID(TDASQLErrorLog(fSQLErrorsLogs[i]).SessionID, aSessionID)
+        then fSQLErrorsLogs.Delete(i);
+  finally
+    fCriticalSQLErrors.Leave;
+  end;
+end;
+
+procedure TDAServerLog.ClearSessionLogs(aRemoveRelatedLogs: boolean);
+var i: integer;
+    thisLog: TDASessionLog;
+begin
+  fCriticalSessions.Enter;
+  try
+    for i := 0 to (fSessionsLogs.Count-1) do begin
+      thisLog := TDASessionLog(fSessionsLogs.Objects[i]);
+
+      if aRemoveRelatedLogs then begin
+        ClearSQLCommandLogs(thisLog.SessionID);
+        ClearSQLErrorLogs(thisLog.SessionID);
+      end;
+
+      thisLog.Free;
+    end;
+
+    fSessionsLogs.Clear;
+  finally
+    fCriticalSessions.Leave;
+  end;
+end;
+
+
+function TDAServerLog.FindSessionLog(aSession: TROSession): TDASessionLog;
+begin
+  if (aSession<>NIL)
+    then result := FindSessionLog(aSession.SessionID)
+    else result := NIL;
+end;
+
+function TDAServerLog.FindSessionLog(aSessionID: TGUID): TDASessionLog;
+var idx: integer;
+begin
+  result := NIL;
+  idx := fSessionsLogs.IndexOf(GUIDToString(aSessionID));
+  if (idx>=0) then result := TDASessionLog(fSessionsLogs.Objects[idx]);
+end;
+
+procedure TDAServerLog.SaveToXML(aFileName: string);
+var doc: IXMLDocument;
+begin
+  doc := NewROXmlDocument;
+  doc.New('Log');
+  SaveToXML(doc);
+  doc.SaveToFile(aFileName);
+end;
+
+procedure TDAServerLog.SaveToXML(const aXMLDocument: IXMLDocument);
+var i: integer;
+    sessionLog: TDASessionLog;
+    sqlLog: TDASQLCommandLog;
+    errorLog: TDASQLErrorLog;
+begin
+  with TROXMLSerializer.Create(pointer(aXMLDocument.DocumentNode)) do try
+    SerializationOptions := [xsoSendUntyped];
+
+    for i := 0 to SessionLogsCount-1 do begin
+      sessionLog := SessionLogs[i];
+      Write(sessionLog.ClassName, sessionLog.ClassInfo, sessionLog);
+    end;
+
+    for i := 0 to SQLCommandLogsCount-1 do begin
+      sqlLog := SQLCommandLogs[i];
+      Write(sqlLog.ClassName, sqlLog.ClassInfo, sqlLog);
+    end;
+
+    for i := 0 to SQLErrorLogsCount-1 do begin
+      errorLog := SQLErrorLogs[i];
+      Write(errorLog.ClassName, errorLog.ClassInfo, errorLog);
+    end;
+
+  finally
+    Free;
+  end;
+end;
+
+initialization
+  RegisterROClass(TDASessionLog);
+  RegisterROClass(TDASQLCommandLog);
+  RegisterROClass(TDASQLErrorLog);
+
+finalization
+  FreeAndNIL(_ServerLog);
+
+  UnRegisterROClass(TDASessionLog);
+  UnRegisterROClass(TDASQLCommandLog);
+  UnRegisterROClass(TDASQLErrorLog);
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDASupportClasses.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDASupportClasses.pas
new file mode 100644
index 0000000..d848454
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDASupportClasses.pas	
@@ -0,0 +1,412 @@
+unit uDASupportClasses;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses Classes;
+
+type
+  { TCollectionEvents }
+  TCollectionNotificationEvent = procedure(Item: TCollectionItem; Action: TCollectionNotification) of object;
+
+  { TInterfacedCollectionItem }
+  TInterfacedCollectionItem = class(TCollectionItem, IUnknown)
+  protected
+    function QueryInterface(const IID: TGUID; out Obj): HResult; stdcall;
+    function _AddRef: Integer; stdcall;
+    function _Release: Integer; stdcall;
+  end;
+
+  TDAItemRenamedEvent = procedure(aSender: TObject; const aOldName, aNewName: string) of object;
+  TDAItemRemovedEvent = procedure(aSender: TObject; const aName: string) of object;
+
+  { TSearcheableCollection }
+  TSearcheableCollection = class(TOwnedCollection)
+  private
+    fOnNotification: TCollectionNotificationEvent;
+    fOnItemRemoved: TDAItemRemovedEvent;
+    fOnItemRenamed: TDAItemRenamedEvent;
+
+  protected
+    FAllowEmptyName: Boolean;
+    function SetItemName(anItem: TCollectionItem; const aName: string): string; reintroduce; dynamic;
+    function GetItemName(anItem: TCollectionItem): string; reintroduce; dynamic;
+    function GetItemDefault(anItem: TCollectionItem): boolean; dynamic;
+
+    procedure Notify(Item: TCollectionItem; Action: TCollectionNotification); override;
+
+    function ItemName: string; virtual;
+
+  public
+    constructor Create(AOwner: TPersistent; ItemClass: TCollectionItemClass);
+    function ItemByName(const aName: string): TCollectionItem;
+    function FindItem(const aName: string): TCollectionItem; virtual;
+    function GetDefaultItem: TCollectionItem;
+
+    procedure TriggerOnItemRenamed(const iOldName, iNewName: string); virtual;
+    procedure TriggerOnItemRemoved(const iName: string); virtual;
+
+    function FindUniqueName(const iBaseName: string): string;
+    function FindUniqueNameEx(const iBaseName, iNumberedName: string): string;
+    function CloneItem(iIndex: integer): integer;
+
+    procedure MoveItem(iFromIndex, iToIndex: integer);
+
+    property OnNotification: TCollectionNotificationEvent read fOnNotification write fOnNotification;
+
+    property OnItemRenamed: TDAItemRenamedEvent read fOnItemRenamed write fOnItemRenamed;
+    property OnItemRemoved: TDAItemRemovedEvent read fOnItemRemoved write fOnItemRemoved;
+  end;
+
+  TSearcheableCollectionCached = class(TSearcheableCollection)
+  private
+    FNameList: TStringList;
+    fNeedRebuild: Boolean;
+    procedure RebuildList;
+  protected
+    procedure Notify(Item: TCollectionItem; Action: TCollectionNotification); override;
+  public
+    constructor Create(AOwner: TPersistent; ItemClass: TCollectionItemClass);
+    destructor Destroy; override;
+    procedure TriggerOnItemRenamed(const iOldName, iNewName: string); override;
+    procedure TriggerOnItemRemoved(const iName: string); override;
+    function FindItem(const aName: string): TCollectionItem; override;
+  end;
+
+  { TSearcheableInterfacedCollection }
+  TSearcheableInterfacedCollection = class(TSearcheableCollectionCached, IUnknown)
+  protected
+    function QueryInterface(const IID: TGUID; out Obj): HResult; stdcall;
+    function _AddRef: Integer; stdcall;
+    function _Release: Integer; stdcall;
+
+    // Required by most interfaces
+    function GetCount: integer;
+
+  end;
+
+  { TSearcheableInterfacedCollection }
+  TInterfacedCollection = class(TOwnedCollection, IUnknown)
+  protected
+    function QueryInterface(const IID: TGUID; out Obj): HResult; stdcall;
+    function _AddRef: Integer; stdcall;
+    function _Release: Integer; stdcall;
+
+    // Required by most interfaces
+    function GetCount: integer;
+
+  end;
+
+
+implementation
+
+uses uROClasses, uDARes, TypInfo, SysUtils;
+
+{ TInterfacedCollectionItem }
+
+function TInterfacedCollectionItem._AddRef: Integer;
+begin
+  result := -1;
+end;
+
+function TInterfacedCollectionItem._Release: Integer;
+begin
+  result := -1;
+end;
+
+function TInterfacedCollectionItem.QueryInterface(const IID: TGUID; out Obj): HResult;
+begin
+  if GetInterface(IID, Obj) then
+    Result := 0
+  else
+    Result := E_NOINTERFACE;
+end;
+
+{ TSearcheableInterfacedCollection }
+
+function TSearcheableInterfacedCollection._AddRef: Integer;
+begin
+  result := -1;
+end;
+
+function TSearcheableInterfacedCollection._Release: Integer;
+begin
+  result := -1;
+end;
+
+function TSearcheableInterfacedCollection.QueryInterface(const IID: TGUID;
+  out Obj): HResult;
+begin
+  if GetInterface(IID, Obj) then
+    Result := 0
+  else
+    Result := E_NOINTERFACE;
+end;
+
+function TSearcheableInterfacedCollection.GetCount: integer;
+begin
+  result := Count;
+end;
+
+{ TSearcheableCollection }
+
+function TSearcheableCollection.GetDefaultItem: TCollectionItem;
+var
+  i: integer;
+begin
+  result := nil;
+  for i := 0 to (Count - 1) do
+    if GetItemDefault(Items[i]) then begin
+      result := Items[i];
+      Exit;
+    end;
+
+  RaiseError(err_CannotFindDefaultItem,[ItemName]);
+end;
+
+function TSearcheableCollection.FindItem(
+  const aName: string): TCollectionItem;
+var
+  i: integer;
+  nme: string;
+begin
+  result := nil;
+  for i := 0 to (Count - 1) do begin
+    nme := GetItemName(Items[i]);
+    if SameText(nme, aName) then begin
+      result := Items[i];
+      Exit;
+    end;
+  end;
+end;
+
+function TSearcheableCollection.GetItemDefault(
+  anItem: TCollectionItem): boolean;
+begin
+  try
+    result := GetPropValue(anItem, 'Default', TRUE); // Defaul implementation. Not super-fast but for now's ok
+  except
+    on e: EPropertyError do
+      raise EPropertyError.CreateFmt('The %s collection doesn''t support Default items',[ClassName]);
+    else
+      raise;
+  end;
+end;
+
+function TSearcheableCollection.GetItemName(
+  anItem: TCollectionItem): string;
+begin
+  result := GetPropValue(anItem, 'Name', TRUE); // Defaul implementation. Not super-fast but for now's ok
+end;
+
+function TSearcheableCollection.ItemByName(
+  const aName: string): TCollectionItem;
+begin
+  { ToDo: This is not perfect, since not all collections will properly support GetDefaultItem. }
+  if (aName = '') then
+    result := GetDefaultItem
+  else
+    result := FindItem(aName);
+
+  Check(result = nil, err_CannotFindItem, [ItemName, aName, ClassName]);
+end;
+
+procedure TSearcheableCollection.Notify(Item: TCollectionItem;
+  Action: TCollectionNotification);
+begin
+  inherited;
+
+  if (not FAllowEmptyName) and (Action = cnAdded) then begin
+    if (GetItemName(Item) = '') then SetItemName(Item, 'Item' + IntToStr(Count));
+  end;
+
+  if Action = cnDeleting then
+    TriggerOnItemRemoved(GetItemName(Item));
+
+  if Assigned(fOnNotification) then fOnNotification(Item, Action);
+end;
+
+function TSearcheableCollection.SetItemName(anItem: TCollectionItem; const aName: string): string;
+begin
+  SetPropValue(anItem, 'Name', aName); // Defaul implementation. Not super-fast but for now's ok
+end;
+
+function TSearcheableCollection.CloneItem(iIndex: integer): integer;
+var
+  lOldItem, lNewItem: TCollectionItem;
+begin
+  lOldItem := Items[iIndex];
+  lNewItem := Add();
+  lNewItem.Assign(lOldItem);
+  lNewItem.DisplayName := FindUniqueNameEx('Copy of ' + lOldItem.DisplayName, 'Copy (%d) of ' + lOldItem.DisplayName);
+  result := lNewItem.Index;
+end;
+
+procedure TSearcheableCollection.MoveItem(iFromIndex, iToIndex: integer);
+var
+  lSave: TCollectionItem;
+  lOld: TCollectionItem;
+begin
+  if (iFromIndex < 0) or (iFromIndex >= Count) then raise ERangeError.CreateFmt('iFromIndex out of range (%d).', [iFromIndex]);
+  if (iToIndex < 0) or (iToIndex >= Count) then raise ERangeError.CreateFmt('iToIndex out of range (%d).', [iToIndex]);
+
+  lOld := Items[iFromIndex];
+
+  if iToIndex > iFromIndex then inc(iToIndex); //account for the old item that will be removed later
+
+  lSave := Insert(iToIndex);
+  lSave.Assign(lOld);
+  Delete(lOld.Index);
+end;
+
+function TSearcheableCollection.FindUniqueName(const iBaseName: string): string;
+var
+  lIndex: integer;
+begin
+  result := iBaseName;
+  lIndex := 0;
+  while Assigned(FindItem(result)) do begin
+    inc(lIndex);
+    result := iBaseName + IntToStr(lIndex);
+  end;
+end;
+
+function TSearcheableCollection.FindUniqueNameEx(const iBaseName, iNumberedName: string): string;
+var
+  lIndex: integer;
+begin
+  result := iBaseName;
+  lIndex := 0;
+  while Assigned(FindItem(result)) do begin
+    inc(lIndex);
+    result := Format(iNumberedName, [lIndex]);
+  end;
+end;
+
+function TSearcheableCollection.ItemName: string;
+begin
+  result := 'item';
+end;
+
+procedure TSearcheableCollection.TriggerOnItemRemoved(const iName: string);
+begin
+  if Assigned(OnItemRemoved) then OnItemRemoved(self, iName);
+end;
+
+procedure TSearcheableCollection.TriggerOnItemRenamed(const iOldName, iNewName: string);
+begin
+  if Assigned(OnItemRenamed) then OnItemRenamed(self, iOldName, iNewName);
+end;
+
+constructor TSearcheableCollection.Create(AOwner: TPersistent;
+  ItemClass: TCollectionItemClass);
+begin
+  inherited Create(AOwner,ItemClass);
+  FAllowEmptyName:=False; 
+end;
+
+{ TInterfacedCollection }
+
+function TInterfacedCollection._AddRef: Integer;
+begin
+  result := -1;
+end;
+
+function TInterfacedCollection._Release: Integer;
+begin
+  result := -1;
+end;
+
+function TInterfacedCollection.GetCount: integer;
+begin
+  result := -1;
+end;
+
+function TInterfacedCollection.QueryInterface(const IID: TGUID;
+  out Obj): HResult;
+begin
+  if GetInterface(IID, Obj) then
+    Result := 0
+  else
+    Result := E_NOINTERFACE;
+end;
+
+{ TSearcheableCollectionCached }
+
+constructor TSearcheableCollectionCached.Create(AOwner: TPersistent;
+  ItemClass: TCollectionItemClass);
+begin
+  inherited Create(AOwner,ItemClass);
+  FNameList := TStringList.Create;
+  FNameList.CaseSensitive:=False;
+  fNeedRebuild := True;
+end;
+
+destructor TSearcheableCollectionCached.Destroy;
+begin
+  FNameList.Free;
+  inherited;
+end;
+
+function TSearcheableCollectionCached.FindItem(
+  const aName: string): TCollectionItem;
+var
+  i: integer;
+begin
+  if fNeedRebuild then RebuildList;
+  i := FNameList.IndexOf(aName);
+  if i = -1 then
+    Result := nil
+  else
+    Result := TCollectionItem(FNameList.Objects[i]);
+end;
+
+procedure TSearcheableCollectionCached.Notify(Item: TCollectionItem;
+  Action: TCollectionNotification);
+begin
+  fNeedRebuild := True;
+  inherited;
+end;
+
+procedure TSearcheableCollectionCached.RebuildList;
+var
+  i: integer;
+begin
+  FNameList.Sorted:=False;
+  FNameList.Clear;
+  FNameList.Capacity:= Self.Count;
+  for i := 0 to Count -1 do
+    FNameList.AddObject(GetItemName(Items[i]),Items[i]);
+  FNameList.Sorted:=True;
+  fNeedRebuild := False;
+end;
+
+procedure TSearcheableCollectionCached.TriggerOnItemRenamed(const iOldName,
+  iNewName: string);
+begin
+  fNeedRebuild := True;
+  inherited TriggerOnItemRenamed(iOldName, iNewName);
+end;
+
+procedure TSearcheableCollectionCached.TriggerOnItemRemoved(
+  const iName: string);
+begin
+  fNeedRebuild := True;
+  inherited TriggerOnItemRemoved(iName);
+end;
+
+end.
+
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDASybaseInterfaces.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDASybaseInterfaces.pas
new file mode 100644
index 0000000..247807b
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDASybaseInterfaces.pas	
@@ -0,0 +1,801 @@
+unit uDASybaseInterfaces;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses uDAInterfaces, uDAEngine;
+
+type
+  { IDASybaseConnection
+      For identification purposes. Implemented by all Sybase connections }
+  IDASybaseConnection = interface(IDAConnection)
+    ['{901F16BC-4A56-4ADB-BFF9-87D23590C326}']
+  end;
+
+
+function Sybase_IdentifierNeedsQuoting(const iIdentifier: string): boolean;
+
+implementation
+uses
+  SysUtils;
+  
+var
+  Sybase_reservedwords: array of string;
+
+function Sybase_IdentifierNeedsQuoting(const iIdentifier: string): boolean;
+begin
+  Result := TestIdentifier(iIdentifier, Sybase_reservedwords);
+end;
+
+procedure Sybase_InitializeReservedWords;
+begin
+// from http://publib.boulder.ibm.com/infocenter/Sybaseluw/v9r5/topic/com.ibm.Sybase.luw.sql.ref.doc/doc/r0001095.html
+  SetLength(Sybase_reservedwords, 747);
+  // sorted with TStringList.Sort (bds2007)    
+  Sybase_reservedwords[0] := 'A';
+  Sybase_reservedwords[1] := 'ABORT';
+  Sybase_reservedwords[2] := 'ABS';
+  Sybase_reservedwords[3] := 'ABSOLUTE';
+  Sybase_reservedwords[4] := 'ACCESS';
+  Sybase_reservedwords[5] := 'ACOS';
+  Sybase_reservedwords[6] := 'ACQUIRE';
+  Sybase_reservedwords[7] := 'ACTION';
+  Sybase_reservedwords[8] := 'ACTIVATE';
+  Sybase_reservedwords[9] := 'ADA';
+  Sybase_reservedwords[10] := 'ADD';
+  Sybase_reservedwords[11] := 'ADDFORM';
+  Sybase_reservedwords[12] := 'ADMIN';
+  Sybase_reservedwords[13] := 'AFTER';
+  Sybase_reservedwords[14] := 'AGGREGATE';
+  Sybase_reservedwords[15] := 'ALIAS';
+  Sybase_reservedwords[16] := 'ALL';
+  Sybase_reservedwords[17] := 'ALLOCATE';
+  Sybase_reservedwords[18] := 'ALTER';
+  Sybase_reservedwords[19] := 'AN';
+  Sybase_reservedwords[20] := 'ANALYZE';
+  Sybase_reservedwords[21] := 'AND';
+  Sybase_reservedwords[22] := 'ANY';
+  Sybase_reservedwords[23] := 'APPEND';
+  Sybase_reservedwords[24] := 'ARCHIVE';
+  Sybase_reservedwords[25] := 'ARCHIVELOG';
+  Sybase_reservedwords[26] := 'ARE';
+  Sybase_reservedwords[27] := 'ARRAY';
+  Sybase_reservedwords[28] := 'ARRAYLEN';
+  Sybase_reservedwords[29] := 'AS';
+  Sybase_reservedwords[30] := 'ASC';
+  Sybase_reservedwords[31] := 'ASCII';
+  Sybase_reservedwords[32] := 'ASIN';
+  Sybase_reservedwords[33] := 'ASSERTION';
+  Sybase_reservedwords[34] := 'AT';
+  Sybase_reservedwords[35] := 'ATAN';
+  Sybase_reservedwords[36] := 'AUDIT';
+  Sybase_reservedwords[37] := 'AUTHORIZATION';
+  Sybase_reservedwords[38] := 'AVG';
+  Sybase_reservedwords[39] := 'AVGU';
+  Sybase_reservedwords[40] := 'BACKUP';
+  Sybase_reservedwords[41] := 'BECOME';
+  Sybase_reservedwords[42] := 'BEFORE';
+  Sybase_reservedwords[43] := 'BEGIN';
+  Sybase_reservedwords[44] := 'BETWEEN';
+  Sybase_reservedwords[45] := 'BIGINT';
+  Sybase_reservedwords[46] := 'BINARY';
+  Sybase_reservedwords[47] := 'BIND';
+  Sybase_reservedwords[48] := 'BINDING';
+  Sybase_reservedwords[49] := 'BIT';
+  Sybase_reservedwords[50] := 'BLOB';
+  Sybase_reservedwords[51] := 'BLOCK';
+  Sybase_reservedwords[52] := 'BODY';
+  Sybase_reservedwords[53] := 'BOOLEAN';
+  Sybase_reservedwords[54] := 'BOTH';
+  Sybase_reservedwords[55] := 'BREADTH';
+  Sybase_reservedwords[56] := 'BREAK';
+  Sybase_reservedwords[57] := 'BREAKDISPLAY';
+  Sybase_reservedwords[58] := 'BROWSE';
+  Sybase_reservedwords[59] := 'BUFFERPOOL';
+  Sybase_reservedwords[60] := 'BULK';
+  Sybase_reservedwords[61] := 'BY';
+  Sybase_reservedwords[62] := 'BYREF';
+  Sybase_reservedwords[63] := 'CACHE';
+  Sybase_reservedwords[64] := 'CALL';
+  Sybase_reservedwords[65] := 'CALLPROC';
+  Sybase_reservedwords[66] := 'CANCEL';
+  Sybase_reservedwords[67] := 'CAPTURE';
+  Sybase_reservedwords[68] := 'CASCADE';
+  Sybase_reservedwords[69] := 'CASCADED';
+  Sybase_reservedwords[70] := 'CASE';
+  Sybase_reservedwords[71] := 'CAST';
+  Sybase_reservedwords[72] := 'CATALOG';
+  Sybase_reservedwords[73] := 'CCSID';
+  Sybase_reservedwords[74] := 'CEILING';
+  Sybase_reservedwords[75] := 'CHANGE';
+  Sybase_reservedwords[76] := 'CHAR';
+  Sybase_reservedwords[77] := 'CHARACTER';
+  Sybase_reservedwords[78] := 'CHARTOROWID';
+  Sybase_reservedwords[79] := 'CHECK';
+  Sybase_reservedwords[80] := 'CHECKPOINT';
+  Sybase_reservedwords[81] := 'CHR';
+  Sybase_reservedwords[82] := 'CLASS';
+  Sybase_reservedwords[83] := 'CLEANUP';
+  Sybase_reservedwords[84] := 'CLEAR';
+  Sybase_reservedwords[85] := 'CLEARROW';
+  Sybase_reservedwords[86] := 'CLOB';
+  Sybase_reservedwords[87] := 'CLOSE';
+  Sybase_reservedwords[88] := 'CLUSTER';
+  Sybase_reservedwords[89] := 'CLUSTERED';
+  Sybase_reservedwords[90] := 'COALESCE';
+  Sybase_reservedwords[91] := 'COBOL';
+  Sybase_reservedwords[92] := 'COLGROUP';
+  Sybase_reservedwords[93] := 'COLLATE';
+  Sybase_reservedwords[94] := 'COLLATION';
+  Sybase_reservedwords[95] := 'COLLECTION';
+  Sybase_reservedwords[96] := 'COLUMN';
+  Sybase_reservedwords[97] := 'COMMAND';
+  Sybase_reservedwords[98] := 'COMMENT';
+  Sybase_reservedwords[99] := 'COMMIT';
+  Sybase_reservedwords[100] := 'COMMITTED';
+  Sybase_reservedwords[101] := 'COMPILE';
+  Sybase_reservedwords[102] := 'COMPLETION';
+  Sybase_reservedwords[103] := 'COMPLEX';
+  Sybase_reservedwords[104] := 'COMPRESS';
+  Sybase_reservedwords[105] := 'COMPUTE';
+  Sybase_reservedwords[106] := 'CONCAT';
+  Sybase_reservedwords[107] := 'CONFIRM';
+  Sybase_reservedwords[108] := 'CONNECT';
+  Sybase_reservedwords[109] := 'CONNECTION';
+  Sybase_reservedwords[110] := 'CONSTRAINT';
+  Sybase_reservedwords[111] := 'CONSTRAINTS';
+  Sybase_reservedwords[112] := 'CONSTRUCTOR';
+  Sybase_reservedwords[113] := 'CONTAINS';
+  Sybase_reservedwords[114] := 'CONTAINSTABLE';
+  Sybase_reservedwords[115] := 'CONTENTS';
+  Sybase_reservedwords[116] := 'CONTINUE';
+  Sybase_reservedwords[117] := 'CONTROLFILE';
+  Sybase_reservedwords[118] := 'CONTROLROW';
+  Sybase_reservedwords[119] := 'CONVERT';
+  Sybase_reservedwords[120] := 'COPY';
+  Sybase_reservedwords[121] := 'CORRESPONDING';
+  Sybase_reservedwords[122] := 'COS';
+  Sybase_reservedwords[123] := 'COUNT';
+  Sybase_reservedwords[124] := 'COUNTU';
+  Sybase_reservedwords[125] := 'CREATE';
+  Sybase_reservedwords[126] := 'CROSS';
+  Sybase_reservedwords[127] := 'CUBE';
+  Sybase_reservedwords[128] := 'CURRENT';
+  Sybase_reservedwords[129] := 'CURRENT_DATE';
+  Sybase_reservedwords[130] := 'CURRENT_PATH';
+  Sybase_reservedwords[131] := 'CURRENT_ROLE';
+  Sybase_reservedwords[132] := 'CURRENT_TIME';
+  Sybase_reservedwords[133] := 'CURRENT_TIMESTAMP';
+  Sybase_reservedwords[134] := 'CURRENT_USER';
+  Sybase_reservedwords[135] := 'CURSOR';
+  Sybase_reservedwords[136] := 'CVAR';
+  Sybase_reservedwords[137] := 'CYCLE';
+  Sybase_reservedwords[138] := 'DATA';
+  Sybase_reservedwords[139] := 'DATABASE';
+  Sybase_reservedwords[140] := 'DATAFILE';
+  Sybase_reservedwords[141] := 'DATAHANDLER';
+  Sybase_reservedwords[142] := 'DATAPAGES';
+  Sybase_reservedwords[143] := 'DATE';
+  Sybase_reservedwords[144] := 'DAY';
+  Sybase_reservedwords[145] := 'DAYOFMONTH';
+  Sybase_reservedwords[146] := 'DAYOFWEEK';
+  Sybase_reservedwords[147] := 'DAYOFYEAR';
+  Sybase_reservedwords[148] := 'DAYS';
+  Sybase_reservedwords[149] := 'DBA';
+  Sybase_reservedwords[150] := 'DBCC';
+  Sybase_reservedwords[151] := 'DBSPACE';
+  Sybase_reservedwords[152] := 'DEALLOCATE';
+  Sybase_reservedwords[153] := 'DEC';
+  Sybase_reservedwords[154] := 'DECIMAL';
+  Sybase_reservedwords[155] := 'DECLARATION';
+  Sybase_reservedwords[156] := 'DECLARE';
+  Sybase_reservedwords[157] := 'DECODE';
+  Sybase_reservedwords[158] := 'DEFAULT';
+  Sybase_reservedwords[159] := 'DEFERRABLE';
+  Sybase_reservedwords[160] := 'DEFERRED';
+  Sybase_reservedwords[161] := 'DEFINE';
+  Sybase_reservedwords[162] := 'DEFINITION';
+  Sybase_reservedwords[163] := 'DEGREES';
+  Sybase_reservedwords[164] := 'DELETE';
+  Sybase_reservedwords[165] := 'DELETEROW';
+  Sybase_reservedwords[166] := 'DENY';
+  Sybase_reservedwords[167] := 'DEPTH';
+  Sybase_reservedwords[168] := 'DEREF';
+  Sybase_reservedwords[169] := 'DESC';
+  Sybase_reservedwords[170] := 'DESCRIBE';
+  Sybase_reservedwords[171] := 'DESCRIPTOR';
+  Sybase_reservedwords[172] := 'DESTROY';
+  Sybase_reservedwords[173] := 'DESTRUCTOR';
+  Sybase_reservedwords[174] := 'DETERMINISTIC';
+  Sybase_reservedwords[175] := 'DHTYPE';
+  Sybase_reservedwords[176] := 'DIAGNOSTICS';
+  Sybase_reservedwords[177] := 'DICTIONARY';
+  Sybase_reservedwords[178] := 'DIRECT';
+  Sybase_reservedwords[179] := 'DISABLE';
+  Sybase_reservedwords[180] := 'DISCONNECT';
+  Sybase_reservedwords[181] := 'DISK';
+  Sybase_reservedwords[182] := 'DISMOUNT';
+  Sybase_reservedwords[183] := 'DISPLAY';
+  Sybase_reservedwords[184] := 'DISTINCT';
+  Sybase_reservedwords[185] := 'DISTRIBUTE';
+  Sybase_reservedwords[186] := 'DISTRIBUTED';
+  Sybase_reservedwords[187] := 'DO';
+  Sybase_reservedwords[188] := 'DOMAIN';
+  Sybase_reservedwords[189] := 'DOUBLE';
+  Sybase_reservedwords[190] := 'DOWN';
+  Sybase_reservedwords[191] := 'DROP';
+  Sybase_reservedwords[192] := 'DUMMY';
+  Sybase_reservedwords[193] := 'DUMP';
+  Sybase_reservedwords[194] := 'DYNAMIC';
+  Sybase_reservedwords[195] := 'EACH';
+  Sybase_reservedwords[196] := 'EDITPROC';
+  Sybase_reservedwords[197] := 'ELSE';
+  Sybase_reservedwords[198] := 'ELSEIF';
+  Sybase_reservedwords[199] := 'ENABLE';
+  Sybase_reservedwords[200] := 'END';
+  Sybase_reservedwords[201] := 'ENDDATA';
+  Sybase_reservedwords[202] := 'ENDDISPLAY';
+  Sybase_reservedwords[203] := 'ENDEXEC';
+  Sybase_reservedwords[204] := 'END-EXEC';
+  Sybase_reservedwords[205] := 'ENDFORMS';
+  Sybase_reservedwords[206] := 'ENDIF';
+  Sybase_reservedwords[207] := 'ENDLOOP';
+  Sybase_reservedwords[208] := 'ENDSELECT';
+  Sybase_reservedwords[209] := 'ENDWHILE';
+  Sybase_reservedwords[210] := 'EQUALS';
+  Sybase_reservedwords[211] := 'ERASE';
+  Sybase_reservedwords[212] := 'ERRLVL';
+  Sybase_reservedwords[213] := 'ERROREXIT';
+  Sybase_reservedwords[214] := 'ESCAPE';
+  Sybase_reservedwords[215] := 'EVENTS';
+  Sybase_reservedwords[216] := 'EVERY';
+  Sybase_reservedwords[217] := 'EXCEPT';
+  Sybase_reservedwords[218] := 'EXCEPTION';
+  Sybase_reservedwords[219] := 'EXCEPTIONS';
+  Sybase_reservedwords[220] := 'EXCLUDE';
+  Sybase_reservedwords[221] := 'EXCLUDING';
+  Sybase_reservedwords[222] := 'EXCLUSIVE';
+  Sybase_reservedwords[223] := 'EXEC';
+  Sybase_reservedwords[224] := 'EXECUTE';
+  Sybase_reservedwords[225] := 'EXISTS';
+  Sybase_reservedwords[226] := 'EXIT';
+  Sybase_reservedwords[227] := 'EXP';
+  Sybase_reservedwords[228] := 'EXPLAIN';
+  Sybase_reservedwords[229] := 'EXPLICIT';
+  Sybase_reservedwords[230] := 'EXTENT';
+  Sybase_reservedwords[231] := 'EXTERNAL';
+  Sybase_reservedwords[232] := 'EXTERNALLY';
+  Sybase_reservedwords[233] := 'EXTRACT';
+  Sybase_reservedwords[234] := 'FALSE';
+  Sybase_reservedwords[235] := 'FETCH';
+  Sybase_reservedwords[236] := 'FIELD';
+  Sybase_reservedwords[237] := 'FIELDPROC';
+  Sybase_reservedwords[238] := 'FILE';
+  Sybase_reservedwords[239] := 'FILLFACTOR';
+  Sybase_reservedwords[240] := 'FINALIZE';
+  Sybase_reservedwords[241] := 'FINALIZE';
+  Sybase_reservedwords[242] := 'FIRST';
+  Sybase_reservedwords[243] := 'FLOAT';
+  Sybase_reservedwords[244] := 'FLOOR';
+  Sybase_reservedwords[245] := 'FLOPPY';
+  Sybase_reservedwords[246] := 'FLUSH';
+  Sybase_reservedwords[247] := 'FOR';
+  Sybase_reservedwords[248] := 'FORCE';
+  Sybase_reservedwords[249] := 'FOREIGN';
+  Sybase_reservedwords[250] := 'FORMDATA';
+  Sybase_reservedwords[251] := 'FORMINIT';
+  Sybase_reservedwords[252] := 'FORMS';
+  Sybase_reservedwords[253] := 'FORTRAN';
+  Sybase_reservedwords[254] := 'FOUND';
+  Sybase_reservedwords[255] := 'FREE';
+  Sybase_reservedwords[256] := 'FREELIST';
+  Sybase_reservedwords[257] := 'FREELISTS';
+  Sybase_reservedwords[258] := 'FREETEXT';
+  Sybase_reservedwords[259] := 'FREETEXTTABLE';
+  Sybase_reservedwords[260] := 'FROM';
+  Sybase_reservedwords[261] := 'FULL';
+  Sybase_reservedwords[262] := 'FUNCTION';
+  Sybase_reservedwords[263] := 'GENERAL';
+  Sybase_reservedwords[264] := 'GET';
+  Sybase_reservedwords[265] := 'GETCURRENTCONNECTION';
+  Sybase_reservedwords[266] := 'GETFORM';
+  Sybase_reservedwords[267] := 'GETOPER';
+  Sybase_reservedwords[268] := 'GETROW';
+  Sybase_reservedwords[269] := 'GLOBAL';
+  Sybase_reservedwords[270] := 'GO';
+  Sybase_reservedwords[271] := 'GOTO';
+  Sybase_reservedwords[272] := 'GRANT';
+  Sybase_reservedwords[273] := 'GRANTED';
+  Sybase_reservedwords[274] := 'GRAPHIC';
+  Sybase_reservedwords[275] := 'GREATEST';
+  Sybase_reservedwords[276] := 'GROUP';
+  Sybase_reservedwords[277] := 'GROUPING';
+  Sybase_reservedwords[278] := 'GROUPS';
+  Sybase_reservedwords[279] := 'HASH';
+  Sybase_reservedwords[280] := 'HAVING';
+  Sybase_reservedwords[281] := 'HELP';
+  Sybase_reservedwords[282] := 'HELPFILE';
+  Sybase_reservedwords[283] := 'HOLDLOCK';
+  Sybase_reservedwords[284] := 'HOST';
+  Sybase_reservedwords[285] := 'HOUR';
+  Sybase_reservedwords[286] := 'HOURS';
+  Sybase_reservedwords[287] := 'IDENTIFIED';
+  Sybase_reservedwords[288] := 'IDENTITY';
+  Sybase_reservedwords[289] := 'IDENTITYCOL';
+  Sybase_reservedwords[290] := 'IF';
+  Sybase_reservedwords[291] := 'IFNULL';
+  Sybase_reservedwords[292] := 'IGNORE';
+  Sybase_reservedwords[293] := 'IIMESSAGE';
+  Sybase_reservedwords[294] := 'IIPRINTF';
+  Sybase_reservedwords[295] := 'IMMEDIATE';
+  Sybase_reservedwords[296] := 'IMPORT';
+  Sybase_reservedwords[297] := 'IN';
+  Sybase_reservedwords[298] := 'INCLUDE';
+  Sybase_reservedwords[299] := 'INCLUDING';
+  Sybase_reservedwords[300] := 'INCREMENT';
+  Sybase_reservedwords[301] := 'INDEX';
+  Sybase_reservedwords[302] := 'INDEXPAGES';
+  Sybase_reservedwords[303] := 'INDICATOR';
+  Sybase_reservedwords[304] := 'INITCAP';
+  Sybase_reservedwords[305] := 'INITIAL';
+  Sybase_reservedwords[306] := 'INITIALIZE';
+  Sybase_reservedwords[307] := 'INITIALLY';
+  Sybase_reservedwords[308] := 'INITRANS';
+  Sybase_reservedwords[309] := 'INITTABLE';
+  Sybase_reservedwords[310] := 'INNER';
+  Sybase_reservedwords[311] := 'INOUT';
+  Sybase_reservedwords[312] := 'INPUT';
+  Sybase_reservedwords[313] := 'INSENSITIVE';
+  Sybase_reservedwords[314] := 'INSERT';
+  Sybase_reservedwords[315] := 'INSERTROW';
+  Sybase_reservedwords[316] := 'INSTANCE';
+  Sybase_reservedwords[317] := 'INSTR';
+  Sybase_reservedwords[318] := 'INT';
+  Sybase_reservedwords[319] := 'INTEGER';
+  Sybase_reservedwords[320] := 'INTEGRITY';
+  Sybase_reservedwords[321] := 'INTERFACE';
+  Sybase_reservedwords[322] := 'INTERSECT';
+  Sybase_reservedwords[323] := 'INTERVAL';
+  Sybase_reservedwords[324] := 'INTO';
+  Sybase_reservedwords[325] := 'IS';
+  Sybase_reservedwords[326] := 'ISOLATION';
+  Sybase_reservedwords[327] := 'ITERATE';
+  Sybase_reservedwords[328] := 'JOIN';
+  Sybase_reservedwords[329] := 'KEY';
+  Sybase_reservedwords[330] := 'KILL';
+  Sybase_reservedwords[331] := 'LABEL';
+  Sybase_reservedwords[332] := 'LANGUAGE';
+  Sybase_reservedwords[333] := 'LARGE';
+  Sybase_reservedwords[334] := 'LAST';
+  Sybase_reservedwords[335] := 'LATERAL';
+  Sybase_reservedwords[336] := 'LAYER';
+  Sybase_reservedwords[337] := 'LEADING';
+  Sybase_reservedwords[338] := 'LEAST';
+  Sybase_reservedwords[339] := 'LEFT';
+  Sybase_reservedwords[340] := 'LENGTH';
+  Sybase_reservedwords[341] := 'LESS';
+  Sybase_reservedwords[342] := 'LEVEL';
+  Sybase_reservedwords[343] := 'LIKE';
+  Sybase_reservedwords[344] := 'LIMIT';
+  Sybase_reservedwords[345] := 'LINENO';
+  Sybase_reservedwords[346] := 'LINK';
+  Sybase_reservedwords[347] := 'LIST';
+  Sybase_reservedwords[348] := 'LISTS';
+  Sybase_reservedwords[349] := 'LOAD';
+  Sybase_reservedwords[350] := 'LOADTABLE';
+  Sybase_reservedwords[351] := 'LOCAL';
+  Sybase_reservedwords[352] := 'LOCALTIME';
+  Sybase_reservedwords[353] := 'LOCALTIMESTAMP';
+  Sybase_reservedwords[354] := 'LOCATE';
+  Sybase_reservedwords[355] := 'LOCATOR';
+  Sybase_reservedwords[356] := 'LOCK';
+  Sybase_reservedwords[357] := 'LOCKSIZE';
+  Sybase_reservedwords[358] := 'LOG';
+  Sybase_reservedwords[359] := 'LOGFILE';
+  Sybase_reservedwords[360] := 'LONG';
+  Sybase_reservedwords[361] := 'LONGINT';
+  Sybase_reservedwords[362] := 'LOWER';
+  Sybase_reservedwords[363] := 'LPAD';
+  Sybase_reservedwords[364] := 'LTRIM';
+  Sybase_reservedwords[365] := 'LVARBINARY';
+  Sybase_reservedwords[366] := 'LVARCHAR';
+  Sybase_reservedwords[367] := 'MAIN';
+  Sybase_reservedwords[368] := 'MANAGE';
+  Sybase_reservedwords[369] := 'MANUAL';
+  Sybase_reservedwords[370] := 'MAP';
+  Sybase_reservedwords[371] := 'MATCH';
+  Sybase_reservedwords[372] := 'MAX';
+  Sybase_reservedwords[373] := 'MAXDATAFILES';
+  Sybase_reservedwords[374] := 'MAXEXTENTS';
+  Sybase_reservedwords[375] := 'MAXINSTANCES';
+  Sybase_reservedwords[376] := 'MAXLOGFILES';
+  Sybase_reservedwords[377] := 'MAXLOGHISTORY';
+  Sybase_reservedwords[378] := 'MAXLOGMEMBERS';
+  Sybase_reservedwords[379] := 'MAXTRANS';
+  Sybase_reservedwords[380] := 'MAXVALUE';
+  Sybase_reservedwords[381] := 'MENUITEM';
+  Sybase_reservedwords[382] := 'MESSAGE';
+  Sybase_reservedwords[383] := 'MICROSECOND';
+  Sybase_reservedwords[384] := 'MICROSECONDS';
+  Sybase_reservedwords[385] := 'MIN';
+  Sybase_reservedwords[386] := 'MINEXTENTS';
+  Sybase_reservedwords[387] := 'MINUS';
+  Sybase_reservedwords[388] := 'MINUTE';
+  Sybase_reservedwords[389] := 'MINUTES';
+  Sybase_reservedwords[390] := 'MINVALUE';
+  Sybase_reservedwords[391] := 'MIRROREXIT';
+  Sybase_reservedwords[392] := 'MOD';
+  Sybase_reservedwords[393] := 'MODE';
+  Sybase_reservedwords[394] := 'MODIFIES';
+  Sybase_reservedwords[395] := 'MODIFY';
+  Sybase_reservedwords[396] := 'MODULE';
+  Sybase_reservedwords[397] := 'MONEY';
+  Sybase_reservedwords[398] := 'MONTH';
+  Sybase_reservedwords[399] := 'MONTHS';
+  Sybase_reservedwords[400] := 'MOUNT';
+  Sybase_reservedwords[401] := 'MOVE';
+  Sybase_reservedwords[402] := 'NAMED';
+  Sybase_reservedwords[403] := 'NAMES';
+  Sybase_reservedwords[404] := 'NATIONAL';
+  Sybase_reservedwords[405] := 'NATURAL';
+  Sybase_reservedwords[406] := 'NCHAR';
+  Sybase_reservedwords[407] := 'NCLOB';
+  Sybase_reservedwords[408] := 'NEW';
+  Sybase_reservedwords[409] := 'NEXT';
+  Sybase_reservedwords[410] := 'NHEADER';
+  Sybase_reservedwords[411] := 'NO';
+  Sybase_reservedwords[412] := 'NOARCHIVELOG';
+  Sybase_reservedwords[413] := 'NOAUDIT';
+  Sybase_reservedwords[414] := 'NOCACHE';
+  Sybase_reservedwords[415] := 'NOCHECK';
+  Sybase_reservedwords[416] := 'NOCOMPRESS';
+  Sybase_reservedwords[417] := 'NOCYCLE';
+  Sybase_reservedwords[418] := 'NOECHO';
+  Sybase_reservedwords[419] := 'NOMAXVALUE';
+  Sybase_reservedwords[420] := 'NOMINVALUE';
+  Sybase_reservedwords[421] := 'NONCLUSTERED';
+  Sybase_reservedwords[422] := 'NONE';
+  Sybase_reservedwords[423] := 'NOORDER';
+  Sybase_reservedwords[424] := 'NORESETLOGS';
+  Sybase_reservedwords[425] := 'NORMAL';
+  Sybase_reservedwords[426] := 'NOSORT';
+  Sybase_reservedwords[427] := 'NOT';
+  Sybase_reservedwords[428] := 'NOTFOUND';
+  Sybase_reservedwords[429] := 'NOTRIM';
+  Sybase_reservedwords[430] := 'NOWAIT';
+  Sybase_reservedwords[431] := 'NULL';
+  Sybase_reservedwords[432] := 'NULLIF';
+  Sybase_reservedwords[433] := 'NULLVALUE';
+  Sybase_reservedwords[434] := 'NUMBER';
+  Sybase_reservedwords[435] := 'NUMERIC';
+  Sybase_reservedwords[436] := 'NUMPARTS';
+  Sybase_reservedwords[437] := 'NVL';
+  Sybase_reservedwords[438] := 'OBID';
+  Sybase_reservedwords[439] := 'OBJECT';
+  Sybase_reservedwords[440] := 'ODBCINFO';
+  Sybase_reservedwords[441] := 'OF';
+  Sybase_reservedwords[442] := 'OFF';
+  Sybase_reservedwords[443] := 'OFFLINE';
+  Sybase_reservedwords[444] := 'OFFSETS';
+  Sybase_reservedwords[445] := 'OLD';
+  Sybase_reservedwords[446] := 'ON';
+  Sybase_reservedwords[447] := 'ONCE';
+  Sybase_reservedwords[448] := 'ONLINE';
+  Sybase_reservedwords[449] := 'ONLY';
+  Sybase_reservedwords[450] := 'OPEN';
+  Sybase_reservedwords[451] := 'OPENDATASOURCE';
+  Sybase_reservedwords[452] := 'OPENQUERY';
+  Sybase_reservedwords[453] := 'OPENROWSET';
+  Sybase_reservedwords[454] := 'OPERATION';
+  Sybase_reservedwords[455] := 'OPTIMAL';
+  Sybase_reservedwords[456] := 'OPTIMIZE';
+  Sybase_reservedwords[457] := 'OPTION';
+  Sybase_reservedwords[458] := 'OR';
+  Sybase_reservedwords[459] := 'ORDER';
+  Sybase_reservedwords[460] := 'ORDINALITY';
+  Sybase_reservedwords[461] := 'OUT';
+  Sybase_reservedwords[462] := 'OUTER';
+  Sybase_reservedwords[463] := 'OUTPUT';
+  Sybase_reservedwords[464] := 'OVER';
+  Sybase_reservedwords[465] := 'OVERLAPS';
+  Sybase_reservedwords[466] := 'OWN';
+  Sybase_reservedwords[467] := 'PACKAGE';
+  Sybase_reservedwords[468] := 'PAD';
+  Sybase_reservedwords[469] := 'PAGE';
+  Sybase_reservedwords[470] := 'PAGES';
+  Sybase_reservedwords[471] := 'PARALLEL';
+  Sybase_reservedwords[472] := 'PARAMETER';
+  Sybase_reservedwords[473] := 'PARAMETERS';
+  Sybase_reservedwords[474] := 'PART';
+  Sybase_reservedwords[475] := 'PARTIAL';
+  Sybase_reservedwords[476] := 'PASCAL';
+  Sybase_reservedwords[477] := 'PATH';
+  Sybase_reservedwords[478] := 'PCTFREE';
+  Sybase_reservedwords[479] := 'PCTINCREASE';
+  Sybase_reservedwords[480] := 'PCTINDEX';
+  Sybase_reservedwords[481] := 'PCTUSED';
+  Sybase_reservedwords[482] := 'PERCENT';
+  Sybase_reservedwords[483] := 'PERM';
+  Sybase_reservedwords[484] := 'PERMANENT';
+  Sybase_reservedwords[485] := 'PERMIT';
+  Sybase_reservedwords[486] := 'PI';
+  Sybase_reservedwords[487] := 'PIPE';
+  Sybase_reservedwords[488] := 'PLAN';
+  Sybase_reservedwords[489] := 'PLI';
+  Sybase_reservedwords[490] := 'POSITION';
+  Sybase_reservedwords[491] := 'POSTFIX';
+  Sybase_reservedwords[492] := 'POWER';
+  Sybase_reservedwords[493] := 'PRECISION';
+  Sybase_reservedwords[494] := 'PREFIX';
+  Sybase_reservedwords[495] := 'PREORDER';
+  Sybase_reservedwords[496] := 'PREPARE';
+  Sybase_reservedwords[497] := 'PRESERVE';
+  Sybase_reservedwords[498] := 'PRIMARY';
+  Sybase_reservedwords[499] := 'PRINT';
+  Sybase_reservedwords[500] := 'PRINTSCREEN';
+  Sybase_reservedwords[501] := 'PRIOR';
+  Sybase_reservedwords[502] := 'PRIQTY';
+  Sybase_reservedwords[503] := 'PRIVATE';
+  Sybase_reservedwords[504] := 'PRIVILEGES';
+  Sybase_reservedwords[505] := 'PROC';
+  Sybase_reservedwords[506] := 'PROCEDURE';
+  Sybase_reservedwords[507] := 'PROCESSEXIT';
+  Sybase_reservedwords[508] := 'PROFILE';
+  Sybase_reservedwords[509] := 'PROGRAM';
+  Sybase_reservedwords[510] := 'PROMPT';
+  Sybase_reservedwords[511] := 'PUBLIC';
+  Sybase_reservedwords[512] := 'PUTFORM';
+  Sybase_reservedwords[513] := 'PUTOPER';
+  Sybase_reservedwords[514] := 'PUTROW';
+  Sybase_reservedwords[515] := 'QUALIFICATION';
+  Sybase_reservedwords[516] := 'QUARTER';
+  Sybase_reservedwords[517] := 'QUOTA';
+  Sybase_reservedwords[518] := 'RADIANS';
+  Sybase_reservedwords[519] := 'RAISE';
+  Sybase_reservedwords[520] := 'RAISERROR';
+  Sybase_reservedwords[521] := 'RAND';
+  Sybase_reservedwords[522] := 'RANGE';
+  Sybase_reservedwords[523] := 'RAW';
+  Sybase_reservedwords[524] := 'READ';
+  Sybase_reservedwords[525] := 'READS';
+  Sybase_reservedwords[526] := 'READTEXT';
+  Sybase_reservedwords[527] := 'REAL';
+  Sybase_reservedwords[528] := 'RECONFIGURE';
+  Sybase_reservedwords[529] := 'RECORD';
+  Sybase_reservedwords[530] := 'RECOVER';
+  Sybase_reservedwords[531] := 'RECURSIVE';
+  Sybase_reservedwords[532] := 'REDISPLAY';
+  Sybase_reservedwords[533] := 'REF';
+  Sybase_reservedwords[534] := 'REFERENCES';
+  Sybase_reservedwords[535] := 'REFERENCING';
+  Sybase_reservedwords[536] := 'REGISTER';
+  Sybase_reservedwords[537] := 'RELATIVE';
+  Sybase_reservedwords[538] := 'RELEASE';
+  Sybase_reservedwords[539] := 'RELOCATE';
+  Sybase_reservedwords[540] := 'REMOVE';
+  Sybase_reservedwords[541] := 'RENAME';
+  Sybase_reservedwords[542] := 'REPEAT';
+  Sybase_reservedwords[543] := 'REPEATABLE';
+  Sybase_reservedwords[544] := 'REPEATED';
+  Sybase_reservedwords[545] := 'REPLACE';
+  Sybase_reservedwords[546] := 'REPLICATE';
+  Sybase_reservedwords[547] := 'REPLICATION';
+  Sybase_reservedwords[548] := 'RESET';
+  Sybase_reservedwords[549] := 'RESETLOGS';
+  Sybase_reservedwords[550] := 'RESOURCE';
+  Sybase_reservedwords[551] := 'RESTORE';
+  Sybase_reservedwords[552] := 'RESTRICT';
+  Sybase_reservedwords[553] := 'RESTRICTED';
+  Sybase_reservedwords[554] := 'RESULT';
+  Sybase_reservedwords[555] := 'RESUME';
+  Sybase_reservedwords[556] := 'RETRIEVE';
+  Sybase_reservedwords[557] := 'RETURN';
+  Sybase_reservedwords[558] := 'RETURNS';
+  Sybase_reservedwords[559] := 'REUSE';
+  Sybase_reservedwords[560] := 'REVOKE';
+  Sybase_reservedwords[561] := 'RIGHT';
+  Sybase_reservedwords[562] := 'ROLE';
+  Sybase_reservedwords[563] := 'ROLES';
+  Sybase_reservedwords[564] := 'ROLLBACK';
+  Sybase_reservedwords[565] := 'ROLLUP';
+  Sybase_reservedwords[566] := 'ROUTINE';
+  Sybase_reservedwords[567] := 'ROW';
+  Sybase_reservedwords[568] := 'ROWCOUNT';
+  Sybase_reservedwords[569] := 'ROWGUIDCOL';
+  Sybase_reservedwords[570] := 'ROWID';
+  Sybase_reservedwords[571] := 'ROWIDTOCHAR';
+  Sybase_reservedwords[572] := 'ROWLABEL';
+  Sybase_reservedwords[573] := 'ROWNUM';
+  Sybase_reservedwords[574] := 'ROWS';
+  Sybase_reservedwords[575] := 'ROWS';
+  Sybase_reservedwords[576] := 'RPAD';
+  Sybase_reservedwords[577] := 'RRN';
+  Sybase_reservedwords[578] := 'RTRIM';
+  Sybase_reservedwords[579] := 'RULE';
+  Sybase_reservedwords[580] := 'RUN';
+  Sybase_reservedwords[581] := 'RUNTIMESTATISTICS';
+  Sybase_reservedwords[582] := 'SAVE';
+  Sybase_reservedwords[583] := 'SAVEPOINT';
+  Sybase_reservedwords[584] := 'SCHEDULE';
+  Sybase_reservedwords[585] := 'SCHEMA';
+  Sybase_reservedwords[586] := 'SCN';
+  Sybase_reservedwords[587] := 'SCOPE';
+  Sybase_reservedwords[588] := 'SCREEN';
+  Sybase_reservedwords[589] := 'SCROLL';
+  Sybase_reservedwords[590] := 'SCROLLDOWN';
+  Sybase_reservedwords[591] := 'SCROLLUP';
+  Sybase_reservedwords[592] := 'SEARCH';
+  Sybase_reservedwords[593] := 'SECOND';
+  Sybase_reservedwords[594] := 'SECONDS';
+  Sybase_reservedwords[595] := 'SECQTY';
+  Sybase_reservedwords[596] := 'SECTION';
+  Sybase_reservedwords[597] := 'SEGMENT';
+  Sybase_reservedwords[598] := 'SELECT';
+  Sybase_reservedwords[599] := 'SEQUENCE';
+  Sybase_reservedwords[600] := 'SERIALIZABLE';
+  Sybase_reservedwords[601] := 'SERVICE';
+  Sybase_reservedwords[602] := 'SESSION';
+  Sybase_reservedwords[603] := 'SESSION_USER';
+  Sybase_reservedwords[604] := 'SET';
+  Sybase_reservedwords[605] := 'SETS';
+  Sybase_reservedwords[606] := 'SETUSER';
+  Sybase_reservedwords[607] := 'SETUSER';
+  Sybase_reservedwords[608] := 'SHARE';
+  Sybase_reservedwords[609] := 'SHARED';
+  Sybase_reservedwords[610] := 'SHORT';
+  Sybase_reservedwords[611] := 'SHUTDOWN';
+  Sybase_reservedwords[612] := 'SIGN';
+  Sybase_reservedwords[613] := 'SIMPLE';
+  Sybase_reservedwords[614] := 'SIN';
+  Sybase_reservedwords[615] := 'SIZE';
+  Sybase_reservedwords[616] := 'SLEEP';
+  Sybase_reservedwords[617] := 'SMALLINT';
+  Sybase_reservedwords[618] := 'SNAPSHOT';
+  Sybase_reservedwords[619] := 'SOME';
+  Sybase_reservedwords[620] := 'SORT';
+  Sybase_reservedwords[621] := 'SOUNDEX';
+  Sybase_reservedwords[622] := 'SPACE';
+  Sybase_reservedwords[623] := 'SPECIFIC';
+  Sybase_reservedwords[624] := 'SPECIFICTYPE';
+  Sybase_reservedwords[625] := 'SQL';
+  Sybase_reservedwords[626] := 'SQLBUF';
+  Sybase_reservedwords[627] := 'SQLCA';
+  Sybase_reservedwords[628] := 'SQLCODE';
+  Sybase_reservedwords[629] := 'SQLERROR';
+  Sybase_reservedwords[630] := 'SQLEXCEPTION';
+  Sybase_reservedwords[631] := 'SQLSTATE';
+  Sybase_reservedwords[632] := 'SQLWARNING';
+  Sybase_reservedwords[633] := 'SQRT';
+  Sybase_reservedwords[634] := 'START';
+  Sybase_reservedwords[635] := 'STATE';
+  Sybase_reservedwords[636] := 'STATEMENT';
+  Sybase_reservedwords[637] := 'STATIC';
+  Sybase_reservedwords[638] := 'STATISTICS';
+  Sybase_reservedwords[639] := 'STOGROUP';
+  Sybase_reservedwords[640] := 'STOP';
+  Sybase_reservedwords[641] := 'STORAGE';
+  Sybase_reservedwords[642] := 'STORPOOL';
+  Sybase_reservedwords[643] := 'STRUCTURE';
+  Sybase_reservedwords[644] := 'SUBMENU';
+  Sybase_reservedwords[645] := 'SUBPAGES';
+  Sybase_reservedwords[646] := 'SUBSTR';
+  Sybase_reservedwords[647] := 'SUBSTRING';
+  Sybase_reservedwords[648] := 'SUCCESSFUL';
+  Sybase_reservedwords[649] := 'SUFFIX';
+  Sybase_reservedwords[650] := 'SUM';
+  Sybase_reservedwords[651] := 'SUMU';
+  Sybase_reservedwords[652] := 'SWITCH';
+  Sybase_reservedwords[653] := 'SYNONYM';
+  Sybase_reservedwords[654] := 'SYSCAT';
+  Sybase_reservedwords[655] := 'SYSDATE';
+  Sybase_reservedwords[656] := 'SYSFUN';
+  Sybase_reservedwords[657] := 'SYSIBM';
+  Sybase_reservedwords[658] := 'SYSSTAT';
+  Sybase_reservedwords[659] := 'SYSTEM';
+  Sybase_reservedwords[660] := 'SYSTEM_USER';
+  Sybase_reservedwords[661] := 'SYSTIME';
+  Sybase_reservedwords[662] := 'SYSTIMESTAMP';
+  Sybase_reservedwords[663] := 'TABLE';
+  Sybase_reservedwords[664] := 'TABLEDATA';
+  Sybase_reservedwords[665] := 'TABLES';
+  Sybase_reservedwords[666] := 'TABLESPACE';
+  Sybase_reservedwords[667] := 'TAN';
+  Sybase_reservedwords[668] := 'TAPE';
+  Sybase_reservedwords[669] := 'TEMP';
+  Sybase_reservedwords[670] := 'TEMPORARY';
+  Sybase_reservedwords[671] := 'TERMINATE';
+  Sybase_reservedwords[672] := 'TEXTSIZE';
+  Sybase_reservedwords[673] := 'THAN';
+  Sybase_reservedwords[674] := 'THEN';
+  Sybase_reservedwords[675] := 'THREAD';
+  Sybase_reservedwords[676] := 'TIME';
+  Sybase_reservedwords[677] := 'TIMEOUT';
+  Sybase_reservedwords[678] := 'TIMESTAMP';
+  Sybase_reservedwords[679] := 'TIMEZONE_HOUR';
+  Sybase_reservedwords[680] := 'TIMEZONE_MINUTE';
+  Sybase_reservedwords[681] := 'TINYINT';
+  Sybase_reservedwords[682] := 'TO';
+  Sybase_reservedwords[683] := 'TOP';
+  Sybase_reservedwords[684] := 'TPE';
+  Sybase_reservedwords[685] := 'TRACING';
+  Sybase_reservedwords[686] := 'TRAILING';
+  Sybase_reservedwords[687] := 'TRAN';
+  Sybase_reservedwords[688] := 'TRANSACTION';
+  Sybase_reservedwords[689] := 'TRANSLATE';
+  Sybase_reservedwords[690] := 'TRANSLATION';
+  Sybase_reservedwords[691] := 'TREAT';
+  Sybase_reservedwords[692] := 'TRIGGER';
+  Sybase_reservedwords[693] := 'TRIGGERS';
+  Sybase_reservedwords[694] := 'TRIM';
+  Sybase_reservedwords[695] := 'TRUE';
+  Sybase_reservedwords[696] := 'TRUNCATE';
+  Sybase_reservedwords[697] := 'TSEQUAL';
+  Sybase_reservedwords[698] := 'TYPE';
+  Sybase_reservedwords[699] := 'UID';
+  Sybase_reservedwords[700] := 'UNCOMMITTED';
+  Sybase_reservedwords[701] := 'UNDER';
+  Sybase_reservedwords[702] := 'UNION';
+  Sybase_reservedwords[703] := 'UNIQUE';
+  Sybase_reservedwords[704] := 'UNKNOWN';
+  Sybase_reservedwords[705] := 'UNLIMITED';
+  Sybase_reservedwords[706] := 'UNLOADTABLE';
+  Sybase_reservedwords[707] := 'UNNEST';
+  Sybase_reservedwords[708] := 'UNSIGNED';
+  Sybase_reservedwords[709] := 'UNTIL';
+  Sybase_reservedwords[710] := 'UP';
+  Sybase_reservedwords[711] := 'UPDATE';
+  Sybase_reservedwords[712] := 'UPDATETEXT';
+  Sybase_reservedwords[713] := 'UPPER';
+  Sybase_reservedwords[714] := 'USAGE';
+  Sybase_reservedwords[715] := 'USE';
+  Sybase_reservedwords[716] := 'USER';
+  Sybase_reservedwords[717] := 'USING';
+  Sybase_reservedwords[718] := 'UUID';
+  Sybase_reservedwords[719] := 'VALIDATE';
+  Sybase_reservedwords[720] := 'VALIDPROC';
+  Sybase_reservedwords[721] := 'VALIDROW';
+  Sybase_reservedwords[722] := 'VALUE';
+  Sybase_reservedwords[723] := 'VALUES';
+  Sybase_reservedwords[724] := 'VARBINARY';
+  Sybase_reservedwords[725] := 'VARCHAR';
+  Sybase_reservedwords[726] := 'VARIABLE';
+  Sybase_reservedwords[727] := 'VARIABLES';
+  Sybase_reservedwords[728] := 'VARYING';
+  Sybase_reservedwords[729] := 'VCAT';
+  Sybase_reservedwords[730] := 'VERSION';
+  Sybase_reservedwords[731] := 'VIEW';
+  Sybase_reservedwords[732] := 'VOLUMES';
+  Sybase_reservedwords[733] := 'WAITFOR';
+  Sybase_reservedwords[734] := 'WEEK';
+  Sybase_reservedwords[735] := 'WHEN';
+  Sybase_reservedwords[736] := 'WHENEVER';
+  Sybase_reservedwords[737] := 'WHERE';
+  Sybase_reservedwords[738] := 'WHILE';
+  Sybase_reservedwords[739] := 'WITH';
+  Sybase_reservedwords[740] := 'WITHOUT';
+  Sybase_reservedwords[741] := 'WORK';
+  Sybase_reservedwords[742] := 'WRITE';
+  Sybase_reservedwords[743] := 'WRITETEXT';
+  Sybase_reservedwords[744] := 'YEAR';
+  Sybase_reservedwords[745] := 'YEARS';
+  Sybase_reservedwords[746] := 'ZONE';
+end;
+
+initialization
+  Sybase_InitializeReservedWords;
+finalization
+  Sybase_reservedwords := nil;
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAUtils.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAUtils.pas
new file mode 100644
index 0000000..93de6f0
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAUtils.pas	
@@ -0,0 +1,259 @@
+unit uDAUtils;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses Classes, DB, SysUtils, uDARes;
+
+const
+  // Directory aliases. DEFINE THEM IN UPPERCASE and do not translate
+  alias_System = '%SYSTEM%';
+  alias_ModuleDir = '%MODULE%';
+  alias_DABinDir = '%DABINDIR%';
+
+type
+  { TDAConnectionStringParser
+      Simple class that provides all the methods to work with Data Abstract connection strings.
+      Connection objects make use of this class in the method ApplyConnectionString. }
+  TDAConnectionStringParser = class
+  private
+    fServer: string;
+    fAuxDriver: string;
+    fPassword: string;
+    fUserID: string;
+    fDriverID: string;
+    fAuxParams: TStringList;
+    fDatabase: string;
+
+    function GetAuxParamNames(Index: integer): string;
+    function GetAuxParamsCount: integer;
+    function GetAuxParams(const Name: string): string;
+    procedure SetAuxParams(const Name, Value: string);
+    function GetAuxParamsString: string;
+
+  protected
+  public
+    constructor Create(const aConnectionString: string = '');
+    destructor Destroy; override;
+
+    procedure Clear;
+
+    class function ExtractDriverID(const aConnectionString: string): string;
+
+    procedure Parse(const aConnectionString: string);
+    function BuildString: string;
+
+    property DriverID: string read fDriverID write fDriverID;
+    property Server: string read fServer write fServer;
+    property Database: string read fDatabase write fDatabase;
+    property UserID: string read fUserID write fUserID;
+    property Password: string read fPassword write fPassword;
+    property AuxDriver: string read fAuxDriver write fAuxDriver;
+
+    property AuxParams[const Name: string]: string read GetAuxParams write SetAuxParams;
+    property AuxParamNames[Index: integer]: string read GetAuxParamNames;
+    property AuxParamsCount: integer read GetAuxParamsCount;
+    property AuxParamsString: string read GetAuxParamsString;
+  end;
+
+// Misc
+function TranslateFileName(const aFileName: string): string;
+function GetSystemDir: string;
+function GetModulePath: string;
+
+{$IFDEF FPC}
+type
+  IProviderSupport = interface
+    procedure PSExecute;
+    function PSGetParams: TParams;
+  end;
+{$ENDIF}
+function GetProviderSupport(aDataset: TDataset): IProviderSupport;
+
+implementation
+
+uses
+  {$IFDEF MSWINDOWS}Windows, {$ENDIF}
+  TypInfo, uROClasses;
+
+// Misc
+
+function TranslateFileName(const aFileName: string): string;
+var
+  i: integer;
+begin
+  result := aFileName;
+  i := Pos(alias_System, UpperCase(aFileName));
+  if (i > 0) then begin
+    Delete(result, i, Length(alias_System));
+    Insert(GetSystemDir, result, i);
+  end;
+
+  i := Pos(alias_ModuleDir, UpperCase(aFileName));
+  if (i > 0) then begin
+    Delete(result, i, Length(alias_ModuleDir));
+    Insert(GetModulePath, result, i);
+  end;
+end;
+
+function GetSystemDir: string;
+{$IFDEF MSWINDOWS}
+var
+  osdir: array[0..MAX_PATH] of char;
+  {$ENDIF}
+begin
+  {$IFDEF MSWINDOWS}
+  GetSystemDirectory(osdir, SizeOf(osdir));
+  result := ExcludeTrailingPathDelimiter(osdir);
+  {$ELSE}
+  Result := '';
+  RaiseError(err_NotSupported);
+  {$ENDIF}
+end;
+
+function GetModulePath: string;
+begin
+  result := ExcludeTrailingPathDelimiter(ExtractFilePath({$IFDEF FPC}ParamStr(0){$ELSE}GetModuleName(hInstance){$ENDIF}));
+end;
+
+function GetProviderSupport(aDataset: TDataset): IProviderSupport;
+begin
+  {$IFDEF DELPHI7UP}
+  result := aDataset as IProviderSupport;
+  {$ELSE}{$IFNDEF FPC}
+   result := IProviderSupport(aDataset);
+  {$ELSE}
+   result:=nil;
+  {$ENDIF}{$ENDIF}
+end;
+
+{ TDAConnectionStringParser }
+
+constructor TDAConnectionStringParser.Create(const aConnectionString: string = '');
+begin
+  inherited Create;
+
+  fAuxParams := TStringList.Create;
+  {fAuxParams.Duplicates := dupError;
+  fAuxParams.Sorted := TRUE;}
+
+  if (aConnectionString <> '') then Parse(aConnectionString);
+end;
+
+destructor TDAConnectionStringParser.Destroy;
+begin
+  fAuxParams.Free;
+
+  inherited;
+end;
+
+procedure TDAConnectionStringParser.Clear;
+begin
+  fServer := '';
+  fDatabase := '';
+  fAuxDriver := '';
+  fPassword := '';
+  fUserID := '';
+  fDriverID := '';
+  fAuxParams.Clear;
+end;
+
+procedure TDAConnectionStringParser.Parse(const aConnectionString: string);
+var
+  pars: IROStrings;
+  i: integer;
+  str: string;
+begin
+  Clear;
+
+  // ADO?Server=127.0.0.1;UserID=sa;Password=lemmein;AuxDriver=SQLOLEDB.1;Params1=abc;Param2=CDE
+  str := Trim(aConnectionString);
+
+  // Extracts the driver name
+  fDriverID := ExtractDriverID(str);
+  Delete(str, 1, Pos(ds_Separator, str));
+
+  // Extracts the rest of the parameters
+  pars := ListStringElements(str);
+
+  fAuxDriver := pars.ExtractValue(ds_AuxDriver);
+  fDatabase := pars.ExtractValue(ds_Database);
+  fUserID := pars.ExtractValue(ds_UserID);
+  fPassword := pars.ExtractValue(ds_Password);
+  fServer := pars.ExtractValue(ds_Server);
+
+  for i := 0 to (pars.Count - 1) do
+    AuxParams[pars.Names[i]] := pars.Values[pars.Names[i]];
+end;
+
+function TDAConnectionStringParser.GetAuxParamNames(
+  Index: integer): string;
+begin
+  result := fAuxParams.Names[Index]
+end;
+
+function TDAConnectionStringParser.GetAuxParamsCount: integer;
+begin
+  result := fAuxParams.Count
+end;
+
+function TDAConnectionStringParser.GetAuxParams(
+  const Name: string): string;
+begin
+  result := fAuxParams.Values[Name]
+end;
+
+procedure TDAConnectionStringParser.SetAuxParams(const Name,
+  Value: string);
+begin
+  fAuxParams.Values[Name] := Value
+end;
+
+function TDAConnectionStringParser.BuildString: string;
+var
+  i: integer;
+begin
+  result := fDriverID + ds_Separator;
+
+  if (fAuxDriver <> '') then result := result + ds_AuxDriver + '=' + fAuxDriver+';';
+  if (fDatabase <> '') then result := result + ds_Database + '=' + fDatabase+';';
+  if (fUserID <> '') then result := result + ds_UserID + '=' + fUserID+';';
+  if (fPassword <> '') then result := result + ds_Password + '=' + fPassword+';';
+  if (fServer <> '') then result := result + ds_Server + '=' + fServer+';';
+
+  for i := 0 to (fAuxParams.Count - 1) do
+    result := result + fAuxParams.Names[i] + '=' + fAuxParams.Values[fAuxParams.Names[i]]+';';
+end;
+
+class function TDAConnectionStringParser.ExtractDriverID(
+  const aConnectionString: string): string;
+var
+  str: string;
+begin
+  str := Trim(aConnectionString);
+  result := Trim(Copy(str, 1, Pos(ds_Separator, str) - 1));
+end;
+
+function TDAConnectionStringParser.GetAuxParamsString: string;
+var
+  i: integer;
+begin
+  result := '';
+  for i := 0 to (AuxParamsCount - 1) do
+    result := result + AuxParamNames[i] + '=' + AuxParams[AuxParamNames[i]] +';';
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAWhere.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAWhere.pas
new file mode 100644
index 0000000..fdc8e38
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAWhere.pas	
@@ -0,0 +1,1228 @@
+unit uDAWhere;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  SysUtils, Classes, uDAInterfaces, DateUtils, uROBinaryHelpers,
+  uROCompression, uROXMLIntf, uROClientIntf, FMTBcd;
+
+type
+  TDABinaryExpression = class(TDAWhereExpression)
+  private
+    fLeft,
+    fRight: TDAWhereExpression;
+    fOperator: TDABinaryOperator;
+  public
+    constructor Create(aLeft, aRight: TDAWhereExpression; anOp: TDABinaryOperator); overload;
+    destructor Destroy; override;
+
+    property Left: TDAWhereExpression read fLeft write fLeft;
+    property Right: TDAWhereExpression read fRight write fRight;
+    property Operator: TDABinaryOperator read fOperator write fOperator;
+
+    procedure ReadFromXml(xr: IXmlNode); override;
+    procedure WriteToXml(sw: IXmlNode); override;
+    procedure Validate; override;
+  end;
+
+  TDAUnaryExpression = class(TDAWhereExpression)
+  private
+    fExpression: TDAWhereExpression;
+    fOperator: TDAUnaryOperator;
+  public
+    constructor Create(anExpression: TDAWhereExpression; anOp: TDAUnaryOperator); overload;
+
+    destructor Destroy; override;
+
+    property Expression: TDAWhereExpression read fExpression write fExpression;
+    property Operator: TDAUnaryOperator read fOperator write fOperator;
+
+    procedure ReadFromXml(xr: IXmlNode); override;
+    procedure WriteToXml(sw: IXmlNode); override;
+    procedure Validate; override;
+  end;
+
+  TDAConstantExpression = class(TDAWhereExpression)
+  private
+    fType: TDADataType;
+    fValue: Variant;
+    procedure SetValue(const Value: Variant);
+  public
+    class function SerializeObject(const v: Variant; dt: TDADataType): string;
+    class function DeserializeObject(const s: string; dt: TDADataType): Variant;
+
+    constructor Create(const aValue: Variant); overload;
+    constructor Create(const aValue: Variant; aType: TDADataType); overload;
+
+    property aType: TDADataType read fType write fType;
+    property Value: Variant read fValue write SetValue;
+
+    procedure ReadFromXml(xr: IXmlNode); override;
+    procedure WriteToXml(sw: IXmlNode); override;
+  end;
+
+  TDAListExpression = class(TDAWhereExpression)
+  private
+    FItems: TList;
+    function GetItem(idx: Integer): TDAWhereExpression;
+    procedure SetItem(idx: Integer; aValue: TDAWhereExpression);
+    function GetCount: Integer;
+  public
+    constructor Create(const aValues: array of TDAWhereExpression); overload;
+    constructor Create; overload;
+
+    destructor Destroy; override;
+
+    property Count: Integer read GetCount;
+    property Item[idx: Integer]: TDAWhereExpression read getItem write setItem; default;
+
+    procedure Add(aValue: TDAWhereExpression);
+    procedure Delete(index: Integer);
+    procedure Remove(aValue: TDAWhereExpression);
+    procedure Insert(Position: Integer; aValue: TDAWhereExpression);
+
+    procedure ReadFromXml(xr: IXmlNode); override;
+    procedure WriteToXml(sw: IXmlNode); override;
+    procedure Validate; override;
+  end;
+
+  TDAParameterExpression = class(TDAWhereExpression)
+  private
+    fParameterName: string;
+  public
+    constructor Create(const aParameterName: string); overload;
+
+    property ParameterName: string read fParameterName write fParameterName;
+
+    procedure ReadFromXml(xr: IXmlNode); override;
+    procedure WriteToXml(sw: IXmlNode); override;
+    procedure Validate; override;
+  end;
+
+  TDAFieldExpression = class(TDAWhereExpression)
+  private
+    fFieldName: string;
+    fTableName: string;
+  public
+    constructor Create(const aTableName, aFieldName: string); overload;
+
+    property TableName: string read fTableName write fTableName;
+    property FieldName: string read fFieldName write fFieldName;
+
+    procedure ReadFromXml(xr: IXmlNode); override;
+    procedure WriteToXml(sw: IXmlNode); override;
+    procedure Validate; override;
+  end;
+
+  TDANullExpression = class(TDAWhereExpression)
+  public
+    procedure ReadFromXml(xr: IXmlNode); override;
+    procedure WriteToXml(sw: IXmlNode); override;
+  end;
+
+  TDAMacroExpression = class(TDAWhereExpression)
+  private
+    FItems: TList;
+    fName: string;
+    function GetItem(idx: Integer): TDAWhereExpression;
+    procedure SetItem(idx: Integer; aValue: TDAWhereExpression);
+    function GetCount: Integer;
+  public
+    constructor Create; overload;
+    constructor Create(const aName: string); overload;
+    constructor Create(const aName: string; const aValues: array of TDAWhereExpression); overload;
+
+    destructor Destroy; override;
+
+    property Name: string read fName write fName;
+
+    property Count: Integer read GetCount;
+    property Item[idx: Integer]: TDAWhereExpression read GetItem write SetItem; default;
+
+    procedure Add(aValue: TDAWhereExpression);
+    procedure Delete(index: Integer);
+    procedure Remove(aValue: TDAWhereExpression);
+    procedure Insert(Position: Integer; aValue: TDAWhereExpression);
+
+    procedure ReadFromXml(xr: IXmlNode); override;
+    procedure WriteToXml(sw: IXmlNode); override;
+    procedure Validate; override;
+  end;
+
+  TDASelectWhereBuilder = class;
+  TDASelectWhereItem = class(TObject) // abstract
+  private
+    fOwner: TDASelectWhereBuilder;
+  public
+    constructor Create(anOwner: TDASelectWhereBuilder);
+
+    property Owner: TDASelectWhereBuilder read fOwner;
+
+    procedure ReadFromXml(xr: IXmlNode); virtual; abstract;
+    procedure WriteToXml(sw: IXmlNode); virtual; abstract;
+  end;
+
+  TDASelectWhereField = class(TDASelectWhereItem)
+  private
+    fAlias, fFieldName: string;
+  public
+    constructor Create(anOwner: TDASelectWhereBuilder); overload;
+    constructor Create(anOwner: TDASelectWhereBuilder; const aFieldName: String); overload;
+    constructor Create(anOwner: TDASelectWhereBuilder; const aFieldName, anAlias: string); overload;
+
+    property FieldName: string read fFieldName write fFieldName;
+    property Alias: string read fAlias write fAlias;
+
+    procedure ReadFromXml(xr: IXmlNode); override;
+    procedure WriteToXml(sw: IXmlNode); override;
+  end;
+
+  TDASelectWhereBuilder = class(TDAWhereBuilder)
+  private
+    fFields: TList;
+    fTableName: string;
+    function GetCount: Integer;
+    function GetItem(i: Integer): TDASelectWhereItem;
+  protected
+    function ReadFromXml(xr: IXmlNode):TDAWhereExpression; override;
+    procedure WriteToXml(sw: IXmlNode; const aExpression: TDAWhereExpression); override;
+  public
+    constructor Create;
+    destructor Destroy; override;
+
+
+    property TableName: string read fTableName write fTableName;
+    property Fields[i: Integer]: TDASelectWhereItem read GetItem;
+    property FieldCount: Integer read GetCount;
+
+    function AddField(aField: TDASelectWhereItem): Integer;
+    procedure DeleteField(index: Integer);
+  end;
+
+
+function CreateWhereExpression(AName: string): TDAWhereExpression;
+
+type
+  TWhereFieldsArray = array of string;
+
+function Where_ExtractFieldNames(const AWhereExpression: TDAWhereExpression): TWhereFieldsArray;
+function Where_RemapFieldNames(const aXML: widestring; aMappings: TDAColumnMappingCollection; aTargetTableName: String): widestring;
+function ProcessDAWhereForUnions(aSourceTableID: Integer; var aDAWhereString: WideString): Boolean;
+
+implementation
+
+uses Variants, TypInfo, uROClasses, uDAClasses;
+
+
+function Where_ExtractFieldNames(const AWhereExpression: TDAWhereExpression): TWhereFieldsArray;
+
+  procedure ProcessExpression(aExpression: TDAWhereExpression);
+  var
+    i: integer;
+  begin
+    if aExpression = nil then Exit;   
+    if aExpression is TDABinaryExpression then begin
+      ProcessExpression(TDABinaryExpression(aExpression).fLeft);
+      ProcessExpression(TDABinaryExpression(aExpression).fRight);
+    end
+    else if aExpression is TDAUnaryExpression then begin
+      ProcessExpression(TDAUnaryExpression(aExpression).Expression);
+    end
+    else if aExpression is TDAListExpression then begin
+      with TDAListExpression(aExpression) do
+        for i := 0 to Count - 1 do
+          ProcessExpression(Item[i]);
+    end
+    else if aExpression is TDAFieldExpression then begin
+      SetLength(Result,Length(Result)+1);
+      with TDAFieldExpression(AExpression) do begin
+        //Result[High(Result)]:=TableName +'.'+ FieldName;
+        Result[High(Result)]:=FieldName;
+      end;
+    end;
+  end;
+
+begin
+  SetLength(Result,0);
+  ProcessExpression(AWhereExpression);
+end;
+
+function Where_RemapFieldNames(const aXML: widestring; aMappings: TDAColumnMappingCollection; aTargetTableName: String): widestring;
+
+  procedure ProcessExpression(aExpression: TDAWhereExpression);
+  var
+    i: integer;
+    lMapping : TDAColumnMapping;
+  begin
+    if aExpression = nil then Exit;                              
+    if aExpression is TDABinaryExpression then begin
+      ProcessExpression(TDABinaryExpression(aExpression).fLeft);
+      ProcessExpression(TDABinaryExpression(aExpression).fRight);
+    end
+    else if aExpression is TDAUnaryExpression then begin
+      ProcessExpression(TDAUnaryExpression(aExpression).Expression);
+    end
+    else if aExpression is TDAListExpression then begin
+      with TDAListExpression(aExpression) do
+        for i := 0 to Count - 1 do
+          ProcessExpression(Item[i]);
+    end
+    else if aExpression is TDAFieldExpression then begin
+      SetLength(Result,Length(Result)+1);
+      with TDAFieldExpression(AExpression) do begin
+        TableName := aTargetTableName;
+        lMapping := aMappings.FindMappingByDatasetField(FieldName);
+        if (assigned(lMapping)) then FieldName := lMapping.TableField;
+      end;
+    end;
+  end;
+
+begin
+  SetLength(Result,0);
+  if aXML <> '' then
+    with TDAWhereBuilder.Create do try
+      Xml:=aXML;
+      ProcessExpression(Expression);
+      result := Xml;
+    finally
+      free;
+    end;
+end;
+
+function CreateWhereExpression(AName: string): TDAWhereExpression;
+begin
+  if AName = 'binaryoperation' then
+    Result :=  TDABinaryExpression.Create
+  else if AName = 'unaryoperation' then
+    Result :=  TDAUnaryExpression.Create
+  else if AName = 'constant' then
+    Result :=  TDAConstantExpression.Create
+  else if AName = 'list' then
+    Result :=  TDAListExpression.Create
+  else if AName = 'parameter' then
+    Result :=  TDAParameterExpression.Create
+  else if AName = 'field' then
+    Result :=  TDAFieldExpression.Create
+  else if AName = 'null' then
+    Result :=  TDANullExpression.Create
+  else if AName = 'macro' then
+    Result :=  TDAMacroExpression.Create
+  else
+    raise Exception.Create('Unknown element type: '+AName);
+end;
+
+{ TDABinaryExpression }
+
+constructor TDABinaryExpression.Create(aLeft,aRight: TDAWhereExpression; anOp: TDABinaryOperator);
+begin
+  inherited Create;
+  fLeft := aLeft;
+  fRight := aRight;
+  fOperator := anOp;
+end;
+
+destructor TDABinaryExpression.Destroy;
+begin
+  fLeft.Free;
+  fRight.Free;
+  inherited Destroy;
+end;
+
+procedure TDABinaryExpression.ReadFromXml(xr: IXmlNode);
+begin
+  fOperator := TDABinaryOperator(GetEnumValue(typeinfo(TDABinaryOperator), 'dbo'+xr.GetAttributeValue('operator', 'Addition')));
+  FreeAndNil(fLeft);
+  FreeAndNil(fRight);
+  Left := TDAWhereExpression.ParseExpression(xr.FirstChild);
+  Right := TDAWhereExpression.ParseExpression(xr.FirstChild.NextSibling);
+end;
+
+procedure TDABinaryExpression.Validate;
+begin
+  inherited;
+  if Left = nil then raise Exception.Create('TDABinaryExpression.Left must be assigned.');
+  Left.Validate;
+  if Right = nil then raise Exception.Create('TDABinaryExpression.Right must be assigned.');
+  Right.Validate;
+end;
+
+procedure TDABinaryExpression.WriteToXml(sw: IXmlNode);
+var
+  lNode: IXMLNode;
+begin
+  lNode := sw.Add('binaryoperation');
+  lNode.AddAttribute('operator', Copy(GetEnumName(typeinfo(TDABinaryOperator), ord(fOperator)), 4, MaxInt));
+  if Left <> nil then Left.WriteToXml(lNode);
+  if Right <> nil then Right.WriteToXml(lNode);
+end;
+
+{ TDAUnaryExpression }
+
+constructor TDAUnaryExpression.Create(anExpression: TDAWhereExpression; anOp: TDAUnaryOperator);
+begin
+  inherited Create;
+  fExpression := anExpression;
+  fOperator := anOp;
+end;
+
+destructor TDAUnaryExpression.Destroy;
+begin
+  fExpression.Free;
+  inherited;
+end;
+
+procedure TDAUnaryExpression.ReadFromXml(xr: IXmlNode);
+begin
+  FreeAndNil(fExpression);
+  fOperator := TDAUnaryOperator(GetEnumValue(typeinfo(TDAUnaryOperator), 'duo'+xr.GetAttributeValue('operator', 'Not')));
+  fExpression := TDAWhereExpression.ParseExpression(xr.FirstChild);
+end;
+
+procedure TDAUnaryExpression.Validate;
+begin
+  inherited;
+  if Expression = nil then raise Exception.Create('TDAUnaryExpression.Expression must be assigned.');
+  Expression.Validate;
+end;
+
+procedure TDAUnaryExpression.WriteToXml(sw: IXmlNode);
+var
+  lNode: IXMLNode;
+begin
+  lNode := sw.Add('unaryoperation');
+  lNode.AddAttribute('operator', Copy(GetEnumName(typeinfo(TDAUnaryOperator), ord(fOperator)), 4, MaxInt));
+  if fExpression <> nil then fExpression.WriteToXml(lNode);
+end;
+
+{ TDAConstantExpression }
+
+constructor TDAConstantExpression.Create(const aValue: Variant);
+begin
+  inherited Create;
+  Value := aValue;
+end;
+
+constructor TDAConstantExpression.Create(const aValue: Variant; aType: TDADataType);
+begin
+  Create(aValue);
+  fType := aType;
+end;
+
+function GetVariantBase64(s: string): Variant;
+var ss: TStringStream;
+    binstream : TMemoryStream;
+begin
+  binstream := TMemoryStream.Create;
+  ss := TStringStream.Create(s);
+
+  try
+
+    DecodeStream(ss, binstream);
+    binstream.Position := 0;
+
+    Result := ReadVariantFromBinary(binstream);
+  finally
+    FreeAndNIL(ss);
+    FreeAndNIL(binstream);
+  end;
+end;
+
+class function TDAConstantExpression.DeserializeObject(const s: string;
+  dt: TDADataType): Variant;
+var
+  lTemp: Currency;
+  c: Integer;
+  lTemp2: Double;
+  lTemp3: Single;
+begin
+  case dt of
+    datGuid: if copy(s,1,1) <> '{' then result := '{'+s+'}' else result := s;
+    datXml: result := s;
+    datDecimal: result := BCDToVariant(StrToBcd(StringReplace(s, '.', DecimalSeparator, [])));
+    datSingleFloat:
+      begin
+        Val(s, lTemp3, c);
+        Result := lTemp3;
+      end;
+    datLargeAutoInc,
+    datCardinal,
+    datLargeUInt,
+    datLargeInt: Result := StrToInt64(s);
+    datBoolean: result := Lowercase(S) = 'true';
+    datAutoInc,
+    datByte,
+    datShortInt,
+    datWord,
+    datSmallInt,
+    datInteger: Result := STrToInt(S);
+    datBlob: Result := GetVariantBase64(s);
+    datCurrency:
+    begin
+      Int64((@lTemp)^) := StrToInt64(s);
+      Result := lTemp;
+    end;
+    datDateTime: Result := UnixToDateTime(StrToInt64(s));
+    datFloat:
+    begin
+      Val(s, lTemp2, c);
+      Result := lTemp2;
+    end;
+{
+    DataType.Memo: ;
+    DataType.String: ;
+    DataType.Unknown: ;
+    DataType.WideMemo: ;
+    DataType.WideString: ;
+  }
+    else
+      Result := s;
+  end;
+end;
+
+function GetBase64Variant(v: Variant): string;
+var ss: TStringStream;
+    binstream : TMemoryStream;
+begin
+  binstream := TMemoryStream.Create;
+  ss := TStringStream.Create('');
+
+  try
+    WriteVariantToBinary(v, binstream);
+    binstream.Position := 0;
+
+    EncodeStream(binstream, ss);
+    result := ss.DataString;
+  finally
+    FreeAndNIL(ss);
+    FreeAndNIL(binstream);
+  end;
+end;
+
+class function TDAConstantExpression.SerializeObject(const v: Variant;
+  dt: TDADataType): string;
+var
+  lTemp: Int64;
+begin
+  case dt of
+    datBoolean: if v then Result := 'True' else Result := 'False';
+    datGuid: begin Result := v; if Copy(Result, 1,1) = '{' then Result := Copy(Result, 2, Length(Result) -2); end;
+    datXml: result := v;
+    datDecimal: Result := StringReplace(BcdToStr(VariantToBCD(v)), DecimalSeparator, '.', []);
+    datSingleFloat: Result:= FloatToStr(Single(V));  //Str(Single(v), Result);
+
+    datLargeAutoInc,
+    datByte,
+    datShortInt,
+    datWord,
+    datSmallInt,
+    datCardinal,
+    datLargeUInt,
+    datLargeInt,
+    datAutoInc,
+    datInteger: begin
+        lTemp := v;
+        Result := IntTostr(lTemp);
+      end;
+    datBlob:
+      begin
+        Result :=  GetBase64Variant(v);
+      end;
+    datCurrency:
+      begin
+        Currency((@lTemp)^) := Currency(v);
+        Result := IntToStr(lTemp)
+      end;
+    datDateTime: Result := IntToStr(DateTimeToUnix(v));
+    datFloat: Result:= FloatToStr(Double(V)); //Str(Double(v), Result); // System.Str always emits .
+{
+    DataType.Memo: ;
+    DataType.String: ;
+    DataType.Unknown: ;
+    DataType.WideMemo: ;
+    DataType.WideString: ;
+}
+    else
+      Result := v;
+  end;
+end;
+
+procedure TDAConstantExpression.ReadFromXml(xr: IXmlNode);
+var
+  s: string;
+begin
+  s := xr.GetAttributeValue('type', '');
+  if s <> '' then begin
+    s := 'dat' + s;
+    fType := TDADataType(GetEnumValue(typeinfo(TDADataType), s));
+  end;
+  if xr.GetAttributeValue('null', '0') = '1' then begin
+    fValue := null;
+  end else begin
+    fValue := DeserializeObject(xr.Value, fType);
+  end;
+end;
+
+procedure TDAConstantExpression.WriteToXml(sw: IXmlNode);
+var
+  lNode: IXMLNode;
+begin
+  lNode := sw.Add('constant');
+  lNode.AddAttribute('type', Copy(GetEnumName(typeinfo(TDADataType), ord(fType)), 4, MaxInt));
+  if VarIsNull(fValue) or VarIsError(fValue) then
+    lNode.AddAttribute('null', '1')
+  else begin
+    lNode.AddAttribute('null', '0');
+    LNode.Value := SerializeObject(fValue, fType);
+  end;
+end;
+
+procedure TDAConstantExpression.SetValue(const Value: Variant);
+var
+  d: TDecimal;
+begin
+  if not ROVariantsEqual(fValue,Value) then begin
+    fValue := Value;
+    case VarType(fValue) of
+      varSmallint: fType := datSmallInt;
+      varInteger:  fType := datInteger;
+      varSingle:   fType := datSingleFloat;
+      varDouble:   fType := datFloat;
+      varCurrency: fType := datCurrency;
+      varDate:     fType := datDateTime;
+      varUString,
+      varOleStr:   fType := datWideString;
+      //varDispatch:
+      //varError:
+      varBoolean:  fType := datBoolean;
+      //varVariant:
+      //varUnknown:
+      varShortInt: fType := datShortInt;
+      varByte:     fType := datByte;
+      varWord:     fType := datWord;
+      varLongWord: fType := datCardinal;
+      varInt64:    fType := datLargeInt;
+      //varStrArg:
+      varString:   fType := datString;
+      //varAny:
+      //varTypeMask:
+      //varByRef:
+      //:   fType := datGuid;
+      //:   fType := datXml;
+      //:   fType := datDecimal;
+      //:   fType := datLargeAutoInc;
+      //:   fType := datLargeUInt;
+      //:   fType := datAutoInc;
+      //:   fType := datMemo;
+      //:   fType := datWideMemo;
+    else
+      if fValue = varArray or varByte then begin
+        if VarByteArrayToDecimal(fValue,d) then
+          fType:= datDecimal
+        else
+          fType := datBlob;
+      end
+      else begin
+        fType:= datUnknown;
+      end;
+    end;
+  end;
+end;
+
+{ TDAListExpression }
+
+procedure TDAListExpression.Add(aValue: TDAWhereExpression);
+begin
+  FItems.Add(aValue);
+end;
+
+constructor TDAListExpression.Create(const aValues: array of TDAWhereExpression);
+var
+  i: Integer;
+begin
+  Create;
+  for i := 0 to Length(aValues) -1 do
+    Add(aValues[i]);
+end;
+
+constructor TDAListExpression.Create;
+begin
+  inherited Create;
+  FItems := TList.Create;
+end;
+
+function TDAListExpression.GetCount: Integer;
+begin
+  Result := FItems.Count;
+end;
+
+function TDAListExpression.GetItem(idx: Integer): TDAWhereExpression;
+begin
+  Result := TDAWhereExpression(fItems[idx]);
+end;
+
+procedure TDAListExpression.Insert(Position: Integer;
+  aValue: TDAWhereExpression);
+begin
+  fItems.Insert(Position, aValue);
+end;
+
+procedure TDAListExpression.ReadFromXml(xr: IXmlNode);
+var
+  i: Integer;
+  el: IXMLNode;
+begin
+  for i := 0 to xr.ChildrenCount -1 do begin
+    el := xr.Children[i];
+    Add(TDAWhereExpression.ParseExpression(el));
+  end;
+end;
+
+procedure TDAListExpression.WriteToXml(sw: IXmlNode);
+var
+  i: Integer;
+  el: IXMLNode;
+begin
+  el := sw.Add('list');
+  for i := 0 to Count -1 do begin
+    Item[i].WriteToXml(el);
+  end;
+end;
+
+procedure TDAListExpression.Remove(aValue: TDAWhereExpression);
+var
+  lIndex: Integer;
+begin
+  lIndex := FItems.IndexOf(aValue);
+  if lIndex <> -1 then
+    Delete(lIndex);
+end;
+
+procedure TDAListExpression.Delete(index: Integer);
+begin
+  TObject(FItems[index]).Free;
+  fItems.Delete(index);
+end;
+
+procedure TDAListExpression.SetItem(idx: Integer;
+  aValue: TDAWhereExpression);
+begin
+  fItems[idx] := aValue;
+end;
+
+destructor TDAListExpression.Destroy;
+var
+  i: Integer;
+begin
+  for i := fItems.Count -1 downto 0 do
+    TDAWhereExpression(fItems[i]).Free;
+  fItems.Free;
+  inherited Destroy;
+end;
+
+procedure TDAListExpression.Validate;
+var
+  i: Integer;
+begin
+  inherited;
+  for i:=0 to Count-1 do begin
+    if Item[i] = nil then raise Exception.CreateFmt('TDAListExpression.Item[%d] must be assigned.',[i]);
+    Item[i].Validate;
+  end;
+end;
+
+{ TDAParameterExpression }
+
+constructor TDAParameterExpression.Create(const aParameterName: string);
+begin
+  inherited Create;
+  fParameterName := aParameterName;
+end;
+
+procedure TDAParameterExpression.ReadFromXml(xr: IXmlNode);
+begin
+  fParameterName := xr.Value;
+end;
+
+procedure TDAParameterExpression.Validate;
+begin
+  inherited;
+  if ParameterName = '' then raise Exception.Create('TDAParameterExpression.ParameterName must be assigned.');
+end;
+
+procedure TDAParameterExpression.WriteToXml(sw: IXmlNode);
+var
+  el: IXmlNode;
+begin
+  el := sw.Add('parameter');
+  el.Value := fParameterName;
+end;
+
+{ TDAFieldExpression }
+
+constructor TDAFieldExpression.Create(const aTableName, aFieldName: string);
+begin
+  inherited Create;
+  fTableName := aTableName;
+  fFieldName := aFieldName;
+end;
+
+procedure TDAFieldExpression.ReadFromXml(xr: IXmlNode);
+begin
+  if xr.LocalName <> 'field' then raise Exception.Create('field tag expected');
+  fFieldName := VarToStr(xr.Value);
+  fTableName := xr.GetAttributeValue('tablename', '');
+end;
+
+procedure TDAFieldExpression.Validate;
+begin
+  inherited;
+  if FieldName = '' then raise Exception.Create('TDAFieldExpression.FieldName must be assigned.');
+end;
+
+procedure TDAFieldExpression.WriteToXml(sw: IXmlNode);
+var
+  el: IXMLNode;
+begin
+  el := sw.Add('field');
+  el.Value := fFieldName;
+  if fTableName <> '' then
+    el.AddAttribute('tablename', fTableName);
+end;
+
+{ TDANullExpression }
+
+procedure TDANullExpression.ReadFromXml(xr: IXmlNode);
+begin
+  // nothing to do.
+end;
+
+procedure TDANullExpression.WriteToXml(sw: IXmlNode);
+begin
+  sw.Add('null');
+end;
+
+{ TDAMacroExpression }
+
+procedure TDAMacroExpression.Add(aValue: TDAWhereExpression);
+begin
+  FItems.Add(aValue);
+end;
+
+constructor TDAMacroExpression.Create;
+begin
+  inherited Create;
+  FItems := TList.Create;
+end;
+
+constructor TDAMacroExpression.Create(const aName: string);
+begin
+  Create;
+  fName := aName;
+end;
+
+constructor TDAMacroExpression.Create(const aName: string; const aValues: array of TDAWhereExpression);
+var
+  i: Integer;
+begin
+  Create(aName);
+  for i := 0 to Length(aValues) -1 do
+    Add(aValues[i]);
+end;
+
+destructor TDAMacroExpression.Destroy;
+var
+  i: Integer;
+begin
+  for i := fItems.Count -1 downto 0 do
+    TObject(FItems[i]).Free;
+  fItems.Free;
+  inherited Destroy;
+end;
+
+function TDAMacroExpression.GetCount: Integer;
+begin
+  Result := FItems.Count;
+end;
+
+function TDAMacroExpression.GetItem(idx: Integer): TDAWhereExpression;
+begin
+  result := TDAWhereExpression(FItems[idx]);
+end;
+
+procedure TDAMacroExpression.Insert(Position: Integer;
+  aValue: TDAWhereExpression);
+begin
+  FItems.Insert(Position, aValue);
+end;
+
+procedure TDAMacroExpression.Remove(aValue: TDAWhereExpression);
+var
+  lIndex: Integer;
+begin
+  lIndex := FItems.IndexOf(aValue);
+  if lIndex <> -1 then
+    Delete(lIndex);
+end;
+
+procedure TDAMacroExpression.Delete(index: Integer);
+begin
+  TDAWhereExpression(FItems[index]).Free;
+  FItems.Delete(index);
+end;
+
+procedure TDAMacroExpression.SetItem(idx: Integer;
+  aValue: TDAWhereExpression);
+begin
+  FItems[idx] := aValue;
+end;
+
+procedure TDAMacroExpression.ReadFromXml(xr: IXmlNode);
+var
+  i: Integer;
+begin
+  fName := xr.GetAttributeValue('name', '');
+  for i := 0 to xr.ChildrenCount -1 do
+   Add(TDAWhereExpression.ParseExpression(xr.Children[i]));
+end;
+
+procedure TDAMacroExpression.WriteToXml(sw: IXmlNode);
+var
+  el: IXMLNode;
+  i: Integer;
+begin
+  el := sw.Add('macro');
+  el.AddAttribute('name', fName);
+  for i := 0 to Count -1 do
+    Item[i].WriteToXml(el);
+end;
+
+procedure TDAMacroExpression.Validate;
+var
+  i: integer;
+begin
+  inherited;
+  if Name = '' then raise Exception.Create('TDAMacroExpression.Name must be assigned.');
+  for i := 0 to Count -1 do begin
+    if Item[i] = nil then raise Exception.CreateFmt('TDAMacroExpression.Item[%d] must be assigned.',[i]);
+    Item[i].Validate;
+  end;
+end;
+
+{ TDASelectWhereItem }
+
+constructor TDASelectWhereItem.Create(anOwner: TDASelectWhereBuilder);
+begin
+  inherited Create;
+  fOwner := anOwner;
+end;
+
+{ TDASelectWhereField }
+
+constructor TDASelectWhereField.Create(anOwner: TDASelectWhereBuilder);
+begin
+  inherited Create(anOwner);
+end;
+
+constructor TDASelectWhereField.Create(anOwner: TDASelectWhereBuilder;
+  const aFieldName: String);
+begin
+  inherited Create(anOwner);
+  fFieldName := aFieldName;
+end;
+
+constructor TDASelectWhereField.Create(anOwner: TDASelectWhereBuilder;
+  const aFieldName, anAlias: string);
+begin
+  inherited Create(anOwner);
+  fFieldName := aFieldName;
+  fAlias := anAlias;
+end;
+
+procedure TDASelectWhereField.ReadFromXml(xr: IXmlNode);
+begin
+  if xr.LocalName <> 'field' then raise Exception.Create('field tag expected');
+  Alias := xr.GetAttributeValue('alias', '');
+  fFieldName := VarToStr(xr.Value);
+end;
+
+procedure TDASelectWhereField.WriteToXml(sw: IXmlNode);
+var
+  el: IXMLNode;
+begin
+  el := sw.Add('field');
+  el.Value := fFieldName;
+  if fAlias <> '' then
+    el.AddAttribute('alias', fAlias);
+end;
+
+{ TDASelectWhereBuilder }
+
+function TDASelectWhereBuilder.AddField(
+  aField: TDASelectWhereItem): Integer;
+begin
+  Result := fFields.Add(aField);
+end;
+
+constructor TDASelectWhereBuilder.Create;
+begin
+  inherited Create;
+  fFields := TList.Create;
+end;
+
+procedure TDASelectWhereBuilder.DeleteField(index: Integer);
+begin
+  TDASelectWhereItem(fFields[index]).Free;
+  fFields.Delete(index);
+end;
+
+destructor TDASelectWhereBuilder.Destroy;
+var
+  i: Integer;
+begin
+  for i := fFields.Count -1 downto 0 do
+    TDASelectWhereItem(fFields[i]).Free;
+  fFields.Free;
+  inherited Destroy;
+end;
+
+function TDASelectWhereBuilder.GetCount: Integer;
+begin
+  result := fFields.Count;
+end;
+
+function TDASelectWhereBuilder.GetItem(i: Integer): TDASelectWhereItem;
+begin
+  result := TDASelectWhereItem(fFields[i]);
+end;
+
+function TDASelectWhereBuilder.ReadFromXml(xr: IXmlNode):TDAWhereExpression;
+var
+  el: IXMLNode;
+  i: Integer;
+  sw: TDASelectWhereField;
+begin
+  el := SelectNodeLocal(xr, 'select');
+  if el = nil then raise Exception.Create('"select" node expected');
+  fTableName := el.GetNodeValue('table', '');
+  el := SelectNodeLocal(el, 'fields');
+  if el <> nil then begin
+    for i := 0 to el.ChildrenCount -1 do begin
+      sw := TDASelectWhereField.Create(self);
+      fFields.Add(sw);
+      sw.ReadFromXml(el.Children[i]);
+    end;
+  end;
+  Result:= inherited ReadFromXml(xr);
+end;
+
+procedure TDASelectWhereBuilder.WriteToXml(sw: IXmlNode; const aExpression: TDAWhereExpression);
+var
+  el: IXMLNode;
+  i: Integer;
+begin
+  el := sw.Add('where');
+  el.Add('table').Value := fTableName;
+  el := el.Add('fields');
+  for i := 0 to fFields.Count -1 do
+    Fields[i].WriteToXml(el);
+
+  inherited WriteToXml(sw,aExpression);
+end;
+
+function ProcessDAWhereForUnions(aSourceTableID: Integer; var aDAWhereString: WideString): Boolean;
+var
+  // 0 initial state
+  // 1 all OR
+  // 2 all AND
+  // 3 mixed
+  gFlag: Integer;
+
+  gFalseFound: Boolean;
+  gTrueFound: Boolean;
+
+  // Just replace TDAFieldExpression of the SourceTableName field to its real value
+  procedure ResolveSourceTableFieldExpression(var anExpression: TDAWhereExpression);
+  begin
+    if (SameText(TDAFieldExpression(anExpression).FieldName, def_SourceTableFieldName)) then
+      anExpression := TDAConstantExpression.Create(aSourceTableID, datInteger);
+  end;
+
+  procedure ProcessExpression(var aExpression: TDAWhereExpression);
+  var
+    lTempExpr: TDAWhereExpression;
+  begin
+    if aExpression = nil then Exit;
+
+    if aExpression is TDAFieldExpression then begin
+      ResolveSourceTableFieldExpression(aExpression);
+    end else
+
+    if aExpression is TDABinaryExpression then begin
+
+      lTempExpr := TDABinaryExpression(aExpression).Left;
+      ProcessExpression(lTempExpr);
+      TDABinaryExpression(aExpression).Left := lTempExpr;
+
+      lTempExpr := TDABinaryExpression(aExpression).Right;
+      ProcessExpression(lTempExpr);
+      TDABinaryExpression(aExpression).Right := lTempExpr;
+
+    end;
+  end;
+
+  // Returns:
+  // -1 unknown
+  //  0 false
+  //  1 true
+  function ScanExpressionIsTrueOrFalse(anExpression: TDAWhereExpression): integer;
+  var lBinExpr: TDABinaryExpression;
+  var lLeftValue, lRightValue: Variant;
+  var lResult : TVariantRelationship;
+  begin
+    result := -1;
+    lBinExpr := anExpression as TDABinaryExpression;
+    if not assigned(lBinExpr) then exit;
+    if not ((lBinExpr.Left is TDAConstantExpression) and (lBinExpr.Right is TDAConstantExpression)) then exit;
+
+    lLeftValue := (lBinExpr.Left as TDAConstantExpression).Value;
+    lRightValue  := (lBinExpr.Right as TDAConstantExpression).Value;
+
+    lResult := VarCompareValue(lLeftValue, lRightValue);
+
+    if ((lBinExpr.Operator in [dboEqual, dboGreaterOrEqual, dboLessOrEqual]) and (lResult = vrEqual)) then
+      result := 1
+    else
+    if ((lBinExpr.Operator in [dboGreater, dboGreaterOrEqual]) and (lResult = vrGreaterThan)) then
+      result := 1
+    else
+    if ((lBinExpr.Operator in [dboLess, dboLessOrEqual]) and (lResult = vrLessThan)) then
+      result := 1
+    else
+      result := 0;
+  end;
+
+  // this sub proc goes throw all bin exp and operates with global variables
+  // declared in parent proc
+  procedure TestExpressionRecursive(anExpression: TDAWhereExpression);
+  var
+    lFound: Integer;
+    lInnerOp: TDABinaryOperator;
+  begin
+    if anExpression is TDABinaryExpression then begin
+
+      lInnerOp := TDABinaryExpression(anExpression).Operator;
+      case gFlag of
+        0: begin
+          if lInnerOp = dboOr then gFlag := 1;
+          if lInnerOp = dboAnd then gFlag := 2;
+        end;
+        1: begin
+          if lInnerOp = dboAnd then gFlag := 3;
+        end;
+        2: begin
+          if lInnerOp = dboOr then gFlag := 3;
+        end;
+      end;
+      if gFlag = 3 then exit;
+
+      lFound := ScanExpressionIsTrueOrFalse(anExpression);
+      case lFound of
+        -1:{Unknown} begin
+             TestExpressionRecursive(TDABinaryExpression(anExpression).Left);
+             TestExpressionRecursive(TDABinaryExpression(anExpression).Right);
+         end;
+         0: {found FALSE} begin
+          gFalseFound := true;
+         end;
+         1: {found TRUE} begin
+          gTrueFound := true;
+         end;
+      end;
+    end;
+  end;
+
+  // gFlag
+  // 0 initial state
+  // 1 all OR
+  // 2 all AND
+  // 3 mixed
+
+  // Rules I found
+  // If *ALL* binexp joined by "OR" and TRUE was found then get ALL records     : -1
+  // If *ALL* binexp joined by "AND" and FALSE was found then get NONE records  :  0
+  // All other cases need to apply where query                                  :  1
+  function TestExpression(anExpression: TDAWhereExpression): Integer;
+  begin
+    // initialize
+    gFlag := 0;
+    gFalseFound := false;
+    gTrueFound := false;
+    result := 1; // apply query
+
+    TestExpressionRecursive(anExpression);
+
+    case gFlag of
+
+        0: begin
+            if gTrueFound then begin
+              result := -1;
+              exit;
+            end;
+            if gFalseFound then begin
+              result := 0;
+              exit;
+            end;
+        end;
+
+        1: begin
+          if gTrueFound then begin
+              result := -1;
+              exit;
+            end;
+        end;
+
+        2: begin
+          if gFalseFound then begin
+              result := 0;
+              exit;
+            end;
+        end;
+    end;
+  end;
+
+
+var lTempExpr: TDAWhereExpression;
+lResult : Integer;
+begin
+  Result := True;
+  if aDAWhereString <> '' then
+    with TDAWhereBuilder.Create do try
+      Xml := aDAWhereString;
+      lTempExpr := Expression;
+      ProcessExpression(lTempExpr);
+      Expression := lTempExpr;
+
+      aDAWhereString := Xml;
+      lResult := TestExpression(Expression);
+      if lResult = -1 then aDAWhereString := '';
+      result := (0 <> lResult);
+    finally
+      free;
+    end;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAXMLAdapter.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAXMLAdapter.pas
new file mode 100644
index 0000000..3c33c98
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAXMLAdapter.pas	
@@ -0,0 +1,984 @@
+unit uDAXMLAdapter;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses
+  Classes, TypInfo, SysUtils,
+  uROClasses, uROXMLIntf,
+  uDAInterfaces, uDADataStreamer, uDADelta;
+
+const
+  // Data stream node names
+  nn_DocumentName = 'XMLData';
+  nn_Schema       = 'Schema';
+  nn_Datasets     = 'Datasets';
+  nn_Fields       = 'Fields';
+  nn_Field        = 'Field';
+  nn_Params       = 'Params';
+  nn_Param        = 'Param';
+  nn_Row          = 'Row';
+
+  // Delta stream node names
+  nn_Deltas = 'Deltas';
+
+  attr_RecId = 'RecId';
+  nn_SourceTableFieldName = '___SourceTableFieldName';
+
+type
+
+  TDADataForAppendXML = class(TDADataForAppend)
+  public
+    Node: iXMLNode;
+  end;
+
+  TDAXMLSchemaOption = (soIncludeEmptyAttributes);
+  TDAXMLSchemaOptions = set of TDAXMLSchemaOption;
+
+  TDAXMLRowOption = (roCompressBlobs);
+  TDAXMLRowOptions = set of TDAXMLRowOption;
+
+  TDAXmlDataStreamerOption = (xaoUseDatasetXSLTs, xaoUseDeltaXSLTs);
+  TDAXmlDataStreamerOptions = set of TDAXmlDataStreamerOption;
+
+  { TDAXmlDataStreamer }
+  TDAXmlDataStreamer = class(TDADataStreamer)
+  private
+    fWriteXSLT,
+    fReadXSLT{,
+    fWriteDeltaXSLT,
+    fReadDeltaXSLT} : IXMLDocument;
+
+    fXMLDocument : IXMLDocument;
+    fSchemaRoot,
+    fRootNode,
+    fDatasetSchemaNode,
+    fDeltaSchemaNode,
+    fDatasetNode,
+    fDeltaNode : IXMLNode;
+
+    fDAFieldPropInfoList : PPropList;
+    fDAMemPropCount,
+    fDAFieldPropCount : integer;
+    fSchemaOptions: TDAXMLSchemaOptions;
+    fRowOptions: TDAXMLRowOptions;
+    fOptions: TDAXmlDataStreamerOptions;
+    fDocumentName: string;
+    fSkipNull: boolean;
+    param_proplistcount: integer;
+    param_PropList: PPropList;
+
+    procedure WriteBlobValue(const aDestination : IXMLNode; const anAttributeName : string; const aBlobValue : Variant);
+    function ReadBlobValue(const aSource: IXMLNode; const anAttributeName : string) : Variant;
+    function GetReadXSLT: IXMLDocument;
+    function GetWriteXSLT: IXMLDocument;
+    {function GetReadDeltaXSLT: IXMLDocument;
+    function GetWriteDeltaXSLT: IXMLDocument;}
+
+    function GetXMLDocument(var XMLDocument: IXMLDocument): IXMLDocument;
+    function SaveDocumentName: Boolean;
+    procedure SetDocumentName(const Value: string);
+    procedure ClearXMLNodes;
+
+  protected
+    function DoCreateStream: TStream; override;
+    procedure DoInitialize(Mode: TDAAdapterInitialization); override;
+    procedure DoFinalize; override;
+    function DoWriteDataset(const Source: IDADataset; Options: TDAWriteOptions; MaxRows: integer;ADynFieldNames: array of string): integer; override;
+    procedure DoWriteDelta(const Source: IDADelta); override;
+    procedure DoReadDataset(const DatasetName: string; const Destination: IDADataset; ApplySchema: boolean); override;
+    procedure DoReadDelta(const DeltaName: string; const Destination: IDADelta); override;
+    function DoBeginWriteDataset( const Source: IDADataset; const Schema: TDADataset;
+                                  Options: TDAWriteOptions; MaxRows: integer;
+                                  ADynFieldNames: array of string): TDADataForAppend; override;
+    function DoWriteDatasetData(const Source: IDADataset; var aDataForAppend: TDADataForAppend; aDataIndex: Integer = -1): Integer; override;
+    function DoEndWriteDataset(aDataForAppend: TDADataForAppend): Integer; override;
+  public
+    constructor Create(aOwner : TComponent); override;
+    destructor Destroy; override;
+
+    function GetTargetDataType: TRODataType; override;
+
+    property ReadXSLT : IXMLDocument read GetReadXSLT write fReadXSLT;
+    property WriteXSLT : IXMLDocument read GetWriteXSLT write fWriteXSLT;
+    {property ReadDeltaXSLT : IXMLDocument read GetReadDeltaXSLT write fReadDeltaXSLT;
+    property WriteDeltaXSLT : IXMLDocument read GetWriteDeltaXSLT write fWriteDeltaXSLT;}
+
+  published
+    property SkipNull : boolean read fSkipNull write fSkipNull default true;
+    property SchemaOptions : TDAXMLSchemaOptions read fSchemaOptions write fSchemaOptions;
+    property RowOptions : TDAXMLRowOptions read fRowOptions write fRowOptions;
+    property Options : TDAXmlDataStreamerOptions read fOptions write fOptions;
+    property DocumentName : string read fDocumentName write SetDocumentName stored SaveDocumentName;
+  end;
+
+  TDAXMLAdapter = class(TDAXmlDataStreamer) end deprecated;
+
+implementation
+
+uses
+  Variants, uROXMLSerializer, uROCompression, uROBinaryHelpers
+  ,uDAClasses, uDAEngine
+  {$IFDEF MSWINDOWS}
+  ,uROZLib
+  {$ENDIF};
+
+const
+  XML_DateTimeFormat       = 'yyyy-mm-dd"T"hh":"nn":"ss"."zzz';
+
+function XMLDateTimeToDateTime(const aXMLDateTime : string) : TDateTime;
+var year, month, day, hour, min, sec, msec : word;
+begin {yyyy-mm-ddThh:nn:ss.zzz}
+  year  := StrToInt(Copy(aXMLDateTime,1,4));
+  month := StrToInt(Copy(aXMLDateTime,6,2));
+  day   := StrToInt(Copy(aXMLDateTime,9,2));
+  hour  := StrToInt(Copy(aXMLDateTime,12,2));
+  min   := StrToInt(Copy(aXMLDateTime,15,2));
+  sec   := StrToInt(Copy(aXMLDateTime,18,2));
+  msec   := StrToInt(Copy(aXMLDateTime,21,3));
+
+  result := EncodeDate(year, month, day);
+  // The code below is required! Do not adjust
+  if (result<0)
+    then result := result-EncodeTime(hour, min, sec, msec)
+    else result := result+EncodeTime(hour, min, sec, msec)
+end;
+
+function DateTimeToXMLDateTime(aDateTime : TDateTime) : string;
+begin
+  Result := FormatDateTime(XML_DateTimeFormat, aDateTime);
+end;
+
+function WriteFloat(Val: Variant): String;
+begin
+  Result := FloatToStr(Val{$IFDEF DELPHI7UP},SOAPFormatSettings{$ENDIF});
+
+  {$IFNDEF DELPHI7UP}
+    if DecimalSeparator <> '.' then
+      ReplaceChar(Result, [DecimalSeparator], '.');
+  {$ENDIF}
+end;
+
+
+function ReadFloat(text: String): Variant;
+begin
+  {$IFNDEF DELPHI7UP}
+    if DecimalSeparator <> '.' then
+      ReplaceChar(text, ['.'], DecimalSeparator);
+  {$ENDIF}
+
+  Result := SOAPStrToFloat(text);
+end;
+
+{ TDAXmlDataStreamer }
+
+constructor TDAXmlDataStreamer.Create(aOwner: TComponent);
+begin
+  inherited;
+
+  fDocumentName := nn_DocumentName;
+
+  fSchemaOptions := [soIncludeEmptyAttributes];
+
+  fXMLDocument := NewROXmlDocument;
+
+  fWriteXSLT := NIL;
+  fReadXSLT := NIL;
+  {fWriteDeltaXSLT := NIL;
+  fReadDeltaXSLT := NIL;}
+
+  fOptions := [xaoUseDatasetXSLTs, xaoUseDeltaXSLTs];
+
+  fDAMemPropCount := GetTypeData(TDAField.ClassInfo).PropCount;
+  GetMem(fDAFieldPropInfoList, fDAMemPropCount*SizeOf(PPropInfo));
+  fDAFieldPropCount := GetPropList(TDAField.ClassInfo, tkProperties, fDAFieldPropInfoList);
+
+  GetMem(param_PropList, GetTypeData(TDAParam.ClassInfo).PropCount * SizeOf(PPropInfo));
+  param_proplistcount := GetPropList(TDAParam.ClassInfo, tkProperties, param_PropList);
+  fSkipNull := true;
+end;
+
+destructor TDAXmlDataStreamer.Destroy;
+begin
+  fWriteXSLT := NIL;
+  fReadXSLT := NIL;
+  {fWriteDeltaXSLT := NIL;
+  fReadDeltaXSLT := NIL;}
+
+  FreeMem(fDAFieldPropInfoList, fDAMemPropCount*SizeOf(PPropInfo));
+  FreeMem(param_PropList);
+
+  ClearXMLNodes;
+
+  inherited;
+end;
+
+function TDAXmlDataStreamer.GetTargetDataType: TRODataType;
+begin
+  result := rtString;
+end;
+
+function TDAXmlDataStreamer.DoCreateStream: TStream;
+begin
+  result := NIL;
+end;
+
+procedure TDAXmlDataStreamer.DoInitialize(Mode: TDAAdapterInitialization);
+var
+  i : integer;
+begin
+  ClearXMLNodes;
+  fXMLDocument.New(fDocumentName);
+
+  if (Mode in AdapterReadModes) then begin
+
+    fXMLDocument.LoadFromStream(Data);
+
+    // Applies the XSLT (if any). The resulting document MUST be a valid XML document
+    // that conforms to the Data Abstract XML format
+    if (fReadXSLT<>NIL)
+      then fXMLDocument.XML := fXMLDocument.Transform(fReadXSLT.XML);
+
+    // Parses the document
+    fRootNode := fXMLDocument.DocumentNode;
+
+    // Schema sections
+    fSchemaRoot := fRootNode.GetNodeByName(nn_Schema);
+    if (fSchemaRoot<>NIL) then begin
+      fDatasetSchemaNode := fSchemaRoot.GetNodeByName(nn_Datasets);
+      fDeltaSchemaNode := fSchemaRoot.GetNodeByName(nn_Deltas);
+    end;
+
+    // Data sections
+    fDatasetNode := fRootNode.GetNodeByName(nn_Datasets);
+    fDeltaNode := fRootNode.GetNodeByName(nn_Deltas);
+
+    if (fDatasetSchemaNode<>NIL) and (fDatasetSchemaNode.ChildrenCount>0) then begin
+      for i := 0 to (fDatasetSchemaNode.ChildrenCount-1) do
+        AddingDataset(fDatasetSchemaNode.Children[i].Name);
+    end
+    else if (fDatasetNode<>NIL) then begin
+      for i := 0 to (fDatasetNode.ChildrenCount-1) do
+        AddingDataset(fDatasetNode.Children[i].Name);
+    end;
+
+    if (fDeltaSchemaNode<>NIL) and (fDeltaSchemaNode.ChildrenCount>0) then begin
+      for i := 0 to (fDeltaSchemaNode.ChildrenCount-1) do
+        AddingDelta(fDeltaSchemaNode.Children[i].Name);
+    end
+    else if (fDeltaNode<>NIL) then begin
+      for i := 0 to (fDeltaNode.ChildrenCount-1) do
+        AddingDataset(fDeltaNode.Children[i].Name);
+    end;
+
+  end
+  else if (Mode in AdapterWriteModes) then begin
+    fRootNode := fXMLDocument.DocumentNode;
+    // Schema sections
+    fSchemaRoot := fRootNode.Add(nn_Schema);
+    fDatasetSchemaNode := fSchemaRoot.Add(nn_Datasets);
+    fDeltaSchemaNode := fSchemaRoot.Add(nn_Deltas);
+
+    // Data sections
+    fDatasetNode := fRootNode.Add(nn_Datasets);
+    fDeltaNode := fRootNode.Add(nn_Deltas);
+  end;
+end;
+
+procedure TDAXmlDataStreamer.DoFinalize;
+var finaldocument : string;
+begin
+  if (AdapterInitialization in AdapterWriteModes) then begin
+    // Removes the delta sections if they don't contain data
+    if (fDeltaSchemaNode.ChildrenCount=0) then begin
+      fSchemaRoot.Remove(fDeltaSchemaNode);
+      fDeltaSchemaNode := NIL;
+    end;
+
+    if (fDeltaNode.ChildrenCount=0) then begin
+      fRootNode.Remove(fDeltaNode);
+      fDeltaNode := NIL;
+    end;
+
+    // Removes the datasets sections if they don't contain data
+    if (fDatasetSchemaNode.ChildrenCount=0) then begin
+      fSchemaRoot.Remove(fDatasetSchemaNode);
+      fDatasetSchemaNode := NIL;
+    end;
+
+    if (fDatasetNode.ChildrenCount=0) then begin
+      fRootNode.Remove(fDatasetNode);
+      fDeltaNode := NIL;
+    end;
+
+    // Applies the XSLT (if any)
+    if (fWriteXSLT<>NIL)
+      then begin
+        // The resulting document might not be a valid XML document!!
+        finaldocument := fXMLDocument.Transform(fWriteXSLT.XML);
+        if (finaldocument<>'')
+          then Data.Write(finaldocument[1], Length(finaldocument)*SizeOf(char));
+      end
+      else fXMLDocument.SaveToStream(Data);
+  end;
+  ClearXMLNodes;
+end;
+
+procedure TDAXmlDataStreamer.WriteBlobValue(const aDestination : IXMLNode; const anAttributeName : string; const aBlobValue : Variant);
+var ss, compressedstream : TStringStream;
+    binstream : TROBinaryMemoryStream;
+begin
+  compressedstream := NIL;
+  binstream := TROBinaryMemoryStream.Create;
+  ss := TStringStream.Create('');
+
+  try
+    //binstream := BinaryFromVariant(aBlobValue);//, ms.Stream);
+    WriteVariantToBinary(aBlobValue, binstream);
+    binstream.Position := 0;
+
+    if (roCompressBlobs in fRowOptions) then begin
+      compressedstream := TStringStream.Create('');
+      ZCompressStream(binstream, compressedstream);
+      compressedstream.Position := 0;
+
+      EncodeStream(compressedstream, ss);
+    end
+    else begin
+      EncodeStream(binstream, ss);
+    end;
+
+    aDestination.AddAttribute(anAttributeName, ss.DataString);
+
+  finally
+    FreeAndNIL(ss);
+    FreeAndNIL(compressedstream);
+    FreeAndNIL(binstream);
+  end;
+end;
+
+function TDAXmlDataStreamer.ReadBlobValue(const aSource: IXMLNode; const anAttributeName : string) : Variant;
+var data, compressedstream : TStringStream;
+    finaldata : IROStream;
+begin
+  compressedstream := NIL;
+
+  data := TStringStream.Create(aSource.GetAttributeValue(anAttributeName, NULL));
+  finaldata := NewROStream;
+
+  try
+    data.Position := 0;
+
+    if (roCompressBlobs in fRowOptions) then begin
+      compressedstream := TStringStream.Create('');
+      DecodeStream(data, compressedstream);
+      compressedstream.Position := 0;
+
+      ZDecompressStream(compressedstream, finaldata.Stream);
+      finaldata.Position := 0;
+    end
+    else begin
+      DecodeStream(data, finaldata.Stream);
+    end;
+
+    finaldata.Position := 0;
+    result := ReadVariantFromBinary(finaldata.Stream);
+
+  finally
+    FreeAndNIL(data);
+    FreeAndNIL(compressedstream);
+  end;
+end;
+
+procedure TDAXmlDataStreamer.DoReadDataset(const DatasetName: string;
+  const Destination: IDADataset; ApplySchema: boolean);
+var sourcenode : IXMLNode;
+    i, x : integer;
+    attr, node, scNode : IXMLNode;
+    fld : TDAField;
+    par: TDAParam;
+    val: Variant;
+    editable : IDAEditableDataset;
+    lName: string;
+    lProgress: Boolean;
+    lTotal: integer;
+begin
+  // Reads and applies the schema
+  if ApplySchema then begin
+    scNode := fDatasetSchemaNode.GetNodeByName(DatasetName);
+    if (scNode=NIL) then exit;//raise EROException.Create('Cannot find schema for dataset '+DatasetName)
+    sourcenode := scNode.GetNodeByName(nn_Fields); // For now we only have fields, so this is ok
+    if sourcenode <> nil then begin
+      Destination.Fields.Clear;
+
+      for i := 0 to (sourcenode.ChildrenCount-1) do begin
+        fld := Destination.Fields.Add;
+        node := sourcenode.Children[i];
+
+        for x := 0 to (fDAFieldPropCount-1) do begin
+          lName:= {$IFDEF UNICODE}UTF8ToString{$ENDIF}(fDAFieldPropInfoList^[x].Name);
+          attr := node.GetAttributeByName(lName);
+          if (attr=NIL) then Continue;
+
+          if (fDAFieldPropInfoList^[x].PropType^.Kind<>tkClass) then SetPropValue(fld, lName, VarToStr(attr.Value));
+        end;
+      end;
+    end;
+
+    sourcenode := scNode.GetNodeByName(nn_Params); // For now we only have fields, so this is ok
+    if sourcenode <> nil then begin
+      Destination.Params.Clear;
+
+      for i := 0 to (sourcenode.ChildrenCount-1) do begin
+        par := Destination.Params.Add;
+        node := sourcenode.Children[i];
+
+        for x := 0 to (param_proplistcount-1) do begin
+          lName :=  {$IFDEF UNICODE}UTF8ToString{$ENDIF}(param_PropList^[x].Name);
+          attr := node.GetAttributeByName(lName);
+          if (attr=NIL) then Continue;
+
+          if (param_PropList^[x].PropType^.Kind<>tkClass) then SetPropValue(par, lName, VarToStr(attr.Value));
+        end;
+      end;
+    end;
+
+  end
+  else begin
+    editable := Destination as IDAEditableDataset;
+    sourcenode := fDatasetNode.GetNodeByName(DatasetName);
+    if (sourcenode=NIL)
+      then raise EROException.Create('Cannot find schema for dataset '+DatasetName);
+
+    if not Destination.Active then Destination.Open;
+
+    {$IFDEF STORERECID}
+    Destination.CurrentRecIdValue := 0;
+    {$ENDIF}
+
+    lProgress := Assigned(OnReadDatasetProgress);
+    lTotal := sourcenode.ChildrenCount;
+
+    Destination.DisableConstraints;
+    try
+      for i := 0 to sourcenode.ChildrenCount-1 do begin
+        editable.Append;
+
+        node := sourcenode.Children[i];
+
+        {$IFDEF STORERECID}
+        Destination.CurrentRecIdValue := node.GetAttributeValue(attr_RecId, -1);
+        for x := 1 to node.AttributeCount-1 do begin
+        {$ELSE}
+        for x := 0 to node.AttributeCount-1 do begin
+        {$ENDIF}
+          attr := node.Attributes[x];
+          if attr.Name = nn_SourceTableFieldName then
+            fld := Destination.Fields.FieldByName(def_SourceTableFieldName)
+          else
+            fld := Destination.Fields.FieldByName(attr.Name);
+
+          if fld.Calculated or fld.Lookup then Continue;
+          if (attr.Value = '') and (fld.DataType <> datBlob) then begin
+            val := NULL;
+          end else begin
+            case fld.DataType of
+              datBlob : val := ReadBlobValue(node, attr.Name); // <--- MARC!!!
+              datDateTime : val := XMLDateTimeToDateTime(attr.Value);
+              datFloat,
+              datCurrency: val := ReadFloat(attr.Value);
+              // TODO -cAleF: remember to use the proper XML conversion routines here!
+              else val := attr.Value;
+            end;
+          end;
+
+          if Assigned(OnReadFieldValue) then OnReadFieldValue(fld, val);
+          fld.Value := val;
+
+        end;
+
+        editable.Post;
+        if lProgress then OnReadDatasetProgress(Self, Destination, i, lTotal);
+      end;
+    finally
+      Destination.EnableConstraints;
+    end;
+  end;
+end;
+
+function TDAXmlDataStreamer.DoWriteDataset(const Source: IDADataset;
+  Options: TDAWriteOptions; MaxRows: integer; ADynFieldNames: array of string): integer;
+var
+  lDataForAppend: TDADataForAppend;
+begin
+  lDataForAppend := DoBeginWriteDataset(Source, {schema}nil, Options, MaxRows, ADynFieldNames);
+  if woRows in Options then begin
+    DoWriteDatasetData(Source, lDataForAppend);
+    result := DoEndWriteDataset(lDataForAppend);
+  end
+  else begin
+    result := -1;
+  end;
+end;
+
+function TDAXmlDataStreamer.DoBeginWriteDataset( const Source: IDADataset; const Schema: TDADataset;
+                                  Options: TDAWriteOptions; MaxRows: integer;
+                                  ADynFieldNames: array of string): TDADataForAppend;
+var
+  i: integer;
+  fld: TDAField;
+  lfields: array of integer;
+  lDataForAppend : TDADataForAppendXML;
+  lSchemaFields: TDAFieldCollection;
+  lSchemaParams: TDAParamCollection;
+  lLogicalName: String;
+  x : integer;
+  subnode, node, scNode : IXMLNode;
+  s : string;
+  lName: string;
+
+begin
+  lDataForAppend := TDADataForAppendXML.Create();
+  result := lDataForAppend;
+
+  if Assigned(Schema) then begin
+    lDataForAppend.TableSchema := Schema;
+    if Schema is TDAUnionDataTable then begin
+      fld := Schema.FindField(def_SourceTableFieldName);
+      if not Assigned(fld) then begin
+        fld := Schema.Fields.Add();
+        fld.Name := def_SourceTableFieldName;
+        fld.DataType := datInteger;
+        fld.InPrimaryKey := true;
+        fld.ServerAutoRefresh := true;
+      end;
+    end;
+    lSchemaFields := Schema.Fields;
+    lSchemaParams := Schema.Params;
+    lLogicalName := Schema.Name;
+  end else begin
+    if Assigned(Source) then begin
+      lSchemaFields := Source.Fields;
+      lSchemaParams := Source.Params;
+      lLogicalName := Source.LogicalName;
+    end else begin
+      raise EDAException.Create('Schema or source should be assigned.');
+    end;
+  end;
+
+
+  if Length(ADynFieldNames) > 0 then begin
+    SetLength(lfields, Length(ADynFieldNames));
+    For i:=0 to High(ADynFieldNames) do begin
+      fld:=lSchemaFields.FindField(ADynFieldNames[i]);
+      if fld <> nil then
+        lfields[i]:= fld.Index
+      else
+        lfields[i]:= -1;
+    end;
+  end else begin
+    SetLength(lfields, lSchemaFields.Count);
+    For i:=0 to lSchemaFields.Count-1 do
+      lfields[i]:=i;
+  end;
+
+  // Writes the schema
+  if (woSchema in Options) or (Length(ADynFieldNames)>0) then begin
+    scNode := fDatasetSchemaNode.Add(lLogicalName);
+    node := scNode.Add(nn_Fields);
+
+    for i := 0 to high(lfields) do begin
+      subnode := node.Add(nn_Field);
+
+      for x := 0 to (fDAFieldPropCount-1) do begin
+        lName :=  {$IFDEF UNICODE}UTF8ToString{$ENDIF}(fDAFieldPropInfoList^[x].Name);
+        s := VarToStr(GetPropValue(lSchemaFields[lfields[i]], lName, TRUE));
+
+        if (s<>'') or (soIncludeEmptyAttributes in SchemaOptions) then subnode.AddAttribute(lName, s);
+      end;
+    end;
+    node := scNode.Add(nn_Params);
+
+    for i := 0 to (lSchemaParams.Count-1) do begin
+      subnode := node.Add(nn_Param);
+
+      for x := 0 to (param_proplistcount-1) do begin
+        lName :=  {$IFDEF UNICODE}UTF8ToString{$ENDIF}(param_PropList^[x].Name);
+        s := VarToStr(GetPropValue(lSchemaParams.Params[i], lName, TRUE));
+
+        if (s<>'') or (soIncludeEmptyAttributes in SchemaOptions) then subnode.AddAttribute(lName, s);
+      end;
+    end;
+  end;
+
+  SetLength(lDataForAppend.RealFields, Length(lFields));
+  for i:= 0 to Length(lFields) -1 do
+    lDataForAppend.RealFields[i] := lFields[i];
+
+  lDataForAppend.node := fDatasetNode.Add(lLogicalName);
+  lDataForAppend.MaxRowCount := MaxRows;
+  lDataForAppend.RecordCount := 0;
+end;
+
+function TDAXmlDataStreamer.DoWriteDatasetData(const Source: IDADataset; var aDataForAppend: TDADataForAppend; aDataIndex: Integer = -1): Integer;
+var
+  i, max, k : integer;
+  subnode, node : IXMLNode;
+  val: Variant;
+  lfields: array of integer;
+  flds: array of TDAField;
+  flds_names: array of string;
+  lProgress: Boolean;
+  f,ev, ev1: boolean;
+  NativeDataset: IDASQLCommandNativeObject;
+  lColumnMappings: TDAColumnMappingCollection;
+  lColumnMapping: TDAColumnMapping;
+  lFieldName: string;
+  lDataForAppend: TDADataForAppendXML;
+  lMapToFieldName: String;
+begin
+  f:=(Source.QueryInterface(IDASQLCommandNativeObject, NativeDataset) = 0) and not NativeDataset.IsTDatasetCompatible;
+  lDataForAppend := TDADataForAppendXML(aDataForAppend);
+
+  SetLength(lfields, Length(lDataForAppend.RealFields));
+  SetLength(flds, Length(lDataForAppend.RealFields));
+  SetLength(flds_names, Length(lDataForAppend.RealFields));
+  for i:= 0 to Length(lDataForAppend.RealFields) -1 do
+    lFields[i] := lDataForAppend.RealFields[i];
+
+
+  k := lDataForAppend.RecordCount;
+  max := lDataForAppend.MaxRowCount;
+
+  // Mapping fields of Source table to the streamed dataset
+  if Assigned(lDataForAppend.TableSchema) and (lDataForAppend.TableSchema is TDAUnionDataTable) then begin
+    lColumnMappings := TDAUnionSourceTable(TDAUnionDataTable(lDataForAppend.TableSchema).SourceTables.ItemByName(Source.Name)).ColumnMappings;
+    for i := 0 to lDataForAppend.TableSchema.Fields.Count - 1 do begin
+      lFieldName := lDataForAppend.TableSchema.Fields[lFields[i]].Name;
+      if lFieldName = def_SourceTableFieldName then begin
+        lFields[i] := -10;
+        flds_names[i] := nn_SourceTableFieldName;
+        continue;
+      end;
+      flds_names[i] := lFieldName;
+      lMapToFieldName := lFieldName;
+      if Assigned(lColumnMappings) then begin
+        lColumnMapping := lColumnMappings.MappingByDatasetField(lFieldName);
+        if Assigned(lColumnMapping) and (lColumnMapping.TableField <> '') then
+          lMapToFieldName := lColumnMapping.TableField;
+      end;
+      lFields[i] := Source.FieldByName(lMapToFieldName).Index;
+    end;
+  end
+  else begin
+    for i := 0 to Length(lfields) -1 do
+      flds_names[i] := Source.Fields[lfields[i]].Name;
+  end;
+
+  Source.DisableControls;
+  try
+    if not Source.Active then Source.Open;
+    for i:= 0 to Length(lfields) -1 do begin
+      if lfields[i] = -10 then
+        flds[i] := lDataForAppend.TableSchema.FieldByName(def_SourceTableFieldName)
+      else
+        flds[i] := Source.Fields[lfields[i]];
+    end;
+
+
+    ev1 := Assigned(OnBeforeFieldValueSerialization);
+    ev := Assigned(OnWriteFieldValue);
+    f := f or ev or ev1;
+    lProgress := Assigned(onWriteDatasetProgress);
+    node := lDataForAppend.Node;
+    // Writes the actual records
+    while (k<>max) and not source.EOF do begin
+
+      subnode := node.Add(nn_Row);
+
+      {$IFDEF STORERECID}
+      subnode.AddAttribute(attr_RecId, Source.GetRowRecIdValue);
+      {$ENDIF}
+
+      for i := 0 to Length(lfields) - 1 do begin
+        //RealFields[i] = -10 then this is @SourceTable field
+        if lfields[i] = -10 then
+          val := aDataIndex
+        else
+          val := Source.FieldValues[lfields[i]];
+        if ev1 then OnBeforeFieldValueSerialization(flds[i], val);
+        if flds[i].Calculated or flds[i].Lookup then Continue;
+        if fSkipNull and
+           (lfields[i] <> -10) and
+           ((f and VarIsNull(Val)) or (flds[i].IsNull)) then continue;
+        if ev then OnWriteFieldValue(flds[i], val);
+        if (VarIsEmpty(val) or VarIsNull(val)) and (flds[i].DataType <> datBlob) then begin
+          subnode.AddAttribute(flds_names[i], VarToStr(Null))
+        end else begin
+          case flds[i].DataType of
+            datBlob : WriteBlobValue(subnode, flds_names[i], val);// <--- MARC!!!
+            datDateTime : subnode.AddAttribute(flds_names[i], DateTimeToXMLDateTime(val));
+            datFloat,
+            datCurrency: subnode.AddAttribute(flds_names[i], WriteFloat(val));
+          else
+            // TODO -cAleF: remember to use the proper XML conversion reoutines here!
+            subnode.AddAttribute(flds_names[i], VarToStr(val));
+          end;
+        end;
+      end;
+      Inc(k);
+      if lProgress then OnWriteDatasetProgress(Self, Source, k, max);
+      Source.Next;
+      if Source.EOF then Break;
+    end;
+    aDataForAppend.RecordCount := k;
+    Result := k;
+  finally
+    Source.EnableControls;
+  end;
+end;
+
+function TDAXmlDataStreamer.DoEndWriteDataset(aDataForAppend: TDADataForAppend): Integer;
+begin
+  result := aDataForAppend.RecordCount;
+  TDADataForAppendXML(aDataForAppend).Node := nil;
+  aDataForAppend.Free();
+end;
+
+procedure TDAXmlDataStreamer.DoReadDelta(const DeltaName: string;
+   const Destination: IDADelta);
+var schema, rootnode, node, subnode : IXMLNode;
+     x, i : integer;
+     fieldname : string;
+     datatype : TDADataType;
+     changetype : TDAChangeType;
+     changestatus : TDAChangeStatus;
+     changemessage : string;
+     recid : integer;
+     change : TDADeltaChange;
+     val : Variant;
+     lProgress: Boolean;
+     lTotal : integer;
+begin
+   Destination.Clear(TRUE, TRUE);
+   schema := fDeltaSchemaNode.GetNodeByName(DeltaName);
+
+   // Logged fields and their types
+   rootnode := schema.GetNodeByName('LoggedFields');
+   for i := 0 to (rootnode.ChildrenCount-1) do begin
+     fieldname := rootnode.Children[i].GetAttributeByName('Name').Value;
+     datatype := TDADataType(GetEnumValue(TypeInfo(TDADataType), rootnode.Children[i].GetAttributeByName('DataType').Value));
+
+     Destination.AddFieldName(fieldname);
+     Destination.LoggedFieldTypes[i] := datatype;
+   end;
+
+   // Key fields
+   rootnode := schema.GetNodeByName('KeyFields');
+   for i := 0 to (rootnode.ChildrenCount-1) do begin
+     fieldname := rootnode.Children[i].GetAttributeByName('Name').Value;
+     Destination.AddKeyFieldName(fieldname);
+   end;
+
+   // Actual changes
+   rootnode := fDeltaNode.GetNodeByName(DeltaName);
+   lProgress := Assigned(OnReadDeltaProgress);
+   lTotal := rootnode.ChildrenCount;
+   for i := 0 to (rootnode.ChildrenCount-1) do begin
+     node := rootnode.Children[i];
+
+     recid := node.GetNodeByName('RecID').Value;
+     changetype := TDAChangeType(GetEnumValue(TypeInfo(TDAChangeType), node.GetNodeByName('ChangeType').Value));
+     changestatus := TDAChangeStatus(GetEnumValue(TypeInfo(TDAChangeStatus), node.GetNodeByName('Status').Value));
+     changemessage := node.GetNodeByName('Message').Value;
+
+     change := Destination.Add(recid, changetype, changestatus, changemessage);
+
+     subnode := node.GetNodeByName('OldValues');
+     for x := 0 to Destination.LoggedFieldCount-1 do begin
+       val := subnode.GetAttributeValue(Destination.LoggedFieldNames[x], Null);
+       if (val = '') and (Destination.LoggedFieldTypes[x] <> datblob) then begin
+         change.OldValues[x] := NULL;
+       end else begin
+         case Destination.LoggedFieldTypes[x] of
+           datBlob : change.OldValues[x] := ReadBlobValue(subnode, Destination.LoggedFieldNames[x]);
+           datDateTime : change.OldValues[x] := XMLDateTimeToDateTime(val);
+           datFloat,
+           datCurrency: change.OldValues[x] := ReadFloat(val);
+         else
+           change.OldValues[x] := val;
+         end;
+       end;
+     end;
+
+     subnode := node.GetNodeByName('NewValues');
+     for x := 0 to Destination.LoggedFieldCount-1 do begin
+       val := subnode.GetAttributeValue(Destination.LoggedFieldNames[x], Null);
+       if (val = '') and (Destination.LoggedFieldTypes[x] <> datblob) then begin
+         change.NewValues[x] := NULL;
+       end else begin
+         case Destination.LoggedFieldTypes[x] of
+           datBlob : change.NewValues[x] := ReadBlobValue(subnode, Destination.LoggedFieldNames[x]);
+           datDateTime : change.NewValues[x] := XMLDateTimeToDateTime(val);
+           datFloat,
+           datCurrency: change.NewValues[x] := ReadFloat(val);
+         else
+           change.NewValues[x] := val;
+         end;
+       end;
+     end;
+     if lProgress then OnReadDeltaProgress(Self, Destination, i, lTotal);
+   end;
+end;
+
+
+procedure TDAXmlDataStreamer.DoWriteDelta(const Source: IDADelta);
+var
+  rootnode, node, subnode : IXMLNode;
+  x, i : integer;
+  lProgress: Boolean;
+  lTotal : integer;
+begin
+   {
+     <XMLData>
+       <Schema>
+         <Datasets/>
+         <Deltas/>
+       </Schema>
+       <Datasets/>
+       <Deltas/>
+     </XMLData>
+   }
+
+   // Writes the schema of the delta
+   rootnode := fDeltaSchemaNode.Add(Source.LogicalName);
+   node := rootnode.Add('LoggedFields');
+   for i := 0 to (Source.LoggedFieldCount-1) do begin
+     subnode := node.Add('Field');
+     subnode.AddAttribute('Name', Source.LoggedFieldNames[i]);
+     subnode.AddAttribute('DataType', GetEnumName(TypeInfo(TDADataType), Ord(Source.LoggedFieldTypes[i])));
+   end;
+   node := rootnode.Add('KeyFields');
+   for i := 0 to (Source.KeyFieldCount-1) do begin
+     subnode := node.Add('Field');
+     subnode.AddAttribute('Name', Source.KeyFieldNames[i]);
+   end;
+
+   lProgress := Assigned(OnWriteDeltaProgress);
+   lTotal := Source.Count;
+   // Writes the actual changes
+   rootnode := fDeltaNode.Add(Source.LogicalName);
+   Source.RemoveUnchangedChanges;
+   for i := 0 to (Source.Count-1) do begin
+     node := rootnode.Add(nn_Row);
+
+     node.Add('RecID').Value := Source[i].RecID;
+     node.Add('ChangeType').Value := GetEnumName(TypeInfo(TDAChangeType), Ord(Source[i].ChangeType));
+     node.Add('Status').Value := GetEnumName(TypeInfo(TDAChangeStatus), Ord(Source[i].Status));
+     node.Add('Message').Value := Source[i].Message;
+
+     subnode := node.Add('OldValues');
+     for x := 0 to Source.LoggedFieldCount-1 do begin
+       if VarIsNull(Source.Changes[i].OldValues[x]) and (Source.LoggedFieldTypes[x] <> datblob) then begin
+          subnode.AddAttribute(Source.LoggedFieldNames[x], VarToStr(Null))
+       end else begin
+         case Source.LoggedFieldTypes[x] of
+            datblob: WriteBlobValue(subnode, Source.LoggedFieldNames[x], Source.Changes[i].OldValues[x]);
+            datDateTime : subnode.AddAttribute(Source.LoggedFieldNames[x], DateTimeToXMLDateTime(Source.Changes[i].OldValues[x]));
+            datFloat,
+            datCurrency: subnode.AddAttribute(Source.LoggedFieldNames[x], WriteFloat(Source.Changes[i].OldValues[x]));
+           // TODO -cAleF: remember to use the proper XML conversion reoutines here!
+           else subnode.AddAttribute(Source.LoggedFieldNames[x], VarToStr(Source.Changes[i].OldValues[x]));
+         end;
+       end;
+     end;
+
+     subnode := node.Add('NewValues');
+     for x := 0 to Source.LoggedFieldCount-1 do begin
+       if VarIsNull(Source.Changes[i].NewValues[x]) and (Source.LoggedFieldTypes[x] <> datblob) then begin
+         subnode.AddAttribute(Source.LoggedFieldNames[x], VarToStr(Null))
+       end else begin
+         case Source.LoggedFieldTypes[x] of
+           datblob: WriteBlobValue(subnode, Source.LoggedFieldNames[x], Source.Changes[i].NewValues[x]);
+           datDateTime : subnode.AddAttribute(Source.LoggedFieldNames[x], DateTimeToXMLDateTime(Source.Changes[i].NewValues[x]));
+           datFloat,
+           datCurrency: subnode.AddAttribute(Source.LoggedFieldNames[x], WriteFloat(Source.Changes[i].NewValues[x]));
+           // TODO -cAleF: remember to use the proper XML conversion reoutines here!
+           else subnode.AddAttribute(Source.LoggedFieldNames[x], VarToStr(Source.Changes[i].NewValues[x]));
+         end;
+       end;
+     end;
+     if lProgress then OnWriteDeltaProgress(Self, Source, i+1, lTotal);
+   end;
+end;
+
+function TDAXmlDataStreamer.GetXMLDocument(var XMLDocument : IXMLDocument) : IXMLDocument;
+begin
+  if (XMLDocument=NIL) then begin
+    XMLDocument := NewROXmlDocument;
+    XMLDocument.New();
+  end;
+
+  result := XMLDocument;
+end;
+
+function TDAXmlDataStreamer.GetReadXSLT: IXMLDocument;
+begin
+  result := GetXMLDocument(fReadXSLT)
+end;
+
+{function TDAXmlDataStreamer.GetReadDeltaXSLT: IXMLDocument;
+begin
+  result := GetXMLDocument(fReadDeltaXSLT);
+end;}
+
+function TDAXmlDataStreamer.GetWriteXSLT: IXMLDocument;
+begin
+  result := GetXMLDocument(fWriteXSLT);
+end;
+
+{function TDAXmlDataStreamer.GetWriteDeltaXSLT: IXMLDocument;
+begin
+  result := GetXMLDocument(fWriteDeltaXSLT);
+end;}
+
+function TDAXmlDataStreamer.SaveDocumentName: Boolean;
+begin
+  result := fDocumentName<>nn_DocumentName
+end;
+
+procedure TDAXmlDataStreamer.SetDocumentName(const Value: string);
+var n : string;
+begin
+  n := Trim(Value);
+  if (n<>'')
+    then fDocumentName := n;
+end;
+
+procedure TDAXmlDataStreamer.ClearXMLNodes;
+begin
+  fXMLDocument := NIL;
+  fXMLDocument := NewROXmlDocument;
+
+  fSchemaRoot := NIL;
+  fRootNode := NIL;
+  fDatasetSchemaNode := NIL;
+  fDeltaSchemaNode := NIL;
+  fDatasetNode := NIL;
+  fDeltaNode := NIL;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAXMLUtils.pas b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAXMLUtils.pas
new file mode 100644
index 0000000..bfc9419
--- /dev/null
+++ b/internal/5.0.35.741/1/Data Abstract for Delphi/Source/uDAXMLUtils.pas	
@@ -0,0 +1,642 @@
+unit uDAXMLUtils;
+
+{----------------------------------------------------------------------------}
+{ Data Abstract Library - Core Library                                       }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the Data Abstract              }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I DataAbstract.inc}
+
+interface
+
+uses Classes, TypInfo, uROXMLIntf, uDAInterfaces;
+
+const
+  // Misc
+  ValueNIL = 'NIL';
+
+  // Attribute names
+  attr_Type = 'Type';
+  attr_IsObject = 'IsObject';
+  attr_ByRef = 'ByRef';
+  attr_RefName = 'RefName';
+  attr_Owner = 'Owner';
+  attr_IsCollection = 'IsCollection';
+  attr_IsArray = 'IsArray';
+  attr_Count = 'Count';
+  attr_ItemClass = 'ItemClass';
+  attr_Item = 'Item';
+  attr_ClassName = 'ClassName';
+  attr_IsNull = 'IsNull';
+
+type
+  { Misc }
+  TROXMLStreamerOption = (soIncludeType);
+  TROXMLStreamerOptions = set of TROXMLStreamerOption;
+
+  { TROXMLStreamer }
+  TROXMLStreamer = class(TComponent)
+  private
+    fXMLStreamerOptions: TROXMLStreamerOptions;
+    fPropertiesToIgnore: TStringList;
+
+    procedure SetPropertiesToIgnore(const Value: TStrings);
+    function GetPropertiesToIgnore: TStrings;
+
+  protected
+    procedure SerializeSimpleType(const aTargetNode: IXMLNode; anObject: TObject; aPropertyInfo: PPropInfo);
+    procedure SerializeObject(const anObjectNode: IXMLNode; anObject: TObject; IsRoot: boolean = FALSE);
+
+    procedure DeserializeObject(const anObjectNode: IXMLNode; anObject: TObject; IsRoot: boolean = FALSE);
+
+  public
+    constructor Create(aOwner: TComponent); override;
+    destructor Destroy; override;
+
+    procedure Serialize(const aSource: TObject; const anObjectNode: IXMLNode; IsRoot: boolean = True); overload;
+    procedure Serialize(const aSource: TObject; aStream: TStream); overload;
+    procedure Deserialize(aStream: TStream; aDestination: TObject);
+
+  published
+    property StreamerOptions: TROXMLStreamerOptions read fXMLStreamerOptions write fXMLStreamerOptions;
+    property PropertiesToIgnore: TStrings read GetPropertiesToIgnore write SetPropertiesToIgnore;
+  end;
+
+// Quick access functions
+procedure SaveObjectToXMLNode(aSource: TObject; anObjectNode: IXMLNode; somePropertiesToIgnore: array of string; someStreamerOptions: TROXMLStreamerOptions = []; IsRoot: boolean = True);
+procedure SaveObjectToStream(aSource: TObject; aStream: TStream; somePropertiesToIgnore: array of string; someStreamerOptions: TROXMLStreamerOptions = []);
+procedure LoadObjectFromStream(aStream: TStream; aDestination: TObject; somePropertiesToIgnore: array of string);
+
+procedure SaveObjectToFile(aSource: TObject; const aFileName: string; somePropertiesToIgnore: array of string; someStreamerOptions: TROXMLStreamerOptions = []);
+procedure LoadObjectFromFile(const aFileName: string; aDestination: TObject; somePropertiesToIgnore: array of string);
+
+// Dataset oriented functions
+function DatasetToXML(
+  const aDataset : IDADataset;
+  const RootNodeName : string = '';
+  const RecordNodeName : string = 'Record';
+  IncludeSchema : boolean = TRUE) : IXMLDocument;
+
+procedure XMLToCommandParams(const aCommand : IDASQLCommand; const XML : string);
+function XMLToUpdateCommand(const aConnection : IDAConnection;
+                            const aReferencedDataset : TDADataset;
+                            const aTargetTableName : string;
+                            const aXML : string) : IDASQLCommand;
+
+
+implementation
+
+uses SysUtils, uROTypes, Variants;
+
+procedure SaveObjectToXMLNode(aSource: TObject; anObjectNode: IXMLNode; somePropertiesToIgnore: array of string; someStreamerOptions: TROXMLStreamerOptions = []; IsRoot: boolean = True);
+var
+  i: integer;
+begin
+  with TROXMLStreamer.Create(nil) do try
+    for i := 0 to High(somePropertiesToIgnore) do
+      PropertiesToIgnore.Add(somePropertiesToIgnore[i]);
+
+    StreamerOptions := someStreamerOptions;
+    Serialize(aSource, anObjectNode,IsRoot);
+  finally
+    Free;
+  end;
+end;
+
+procedure SaveObjectToStream(aSource: TObject; aStream: TStream; somePropertiesToIgnore: array of string; someStreamerOptions: TROXMLStreamerOptions = []);
+var
+  i: integer;
+begin
+  with TROXMLStreamer.Create(nil) do try
+    for i := 0 to High(somePropertiesToIgnore) do
+      PropertiesToIgnore.Add(somePropertiesToIgnore[i]);
+
+    StreamerOptions := someStreamerOptions;
+    Serialize(aSource, aStream);
+  finally
+    Free;
+  end;
+end;
+
+procedure LoadObjectFromStream(aStream: TStream; aDestination: TObject; somePropertiesToIgnore: array of string);
+var
+  i: integer;
+begin
+  with TROXMLStreamer.Create(nil) do try
+    for i := 0 to High(somePropertiesToIgnore) do
+      PropertiesToIgnore.Add(somePropertiesToIgnore[i]);
+
+    Deserialize(aStream, aDestination);
+  finally
+    Free;
+  end;
+end;
+
+procedure SaveObjectToFile(aSource: TObject; const aFileName: string; somePropertiesToIgnore: array of string; someStreamerOptions: TROXMLStreamerOptions = []);
+var
+  fs: TFileStream;
+begin
+  fs := TFileStream.Create(aFileName, fmCreate);
+  try
+    SaveObjectToStream(aSource, fs, somePropertiesToIgnore, someStreamerOptions);
+  finally
+    fs.Free;
+  end;
+end;
+
+procedure LoadObjectFromFile(const aFileName: string; aDestination: TObject; somePropertiesToIgnore: array of string);
+var
+  fs: TFileStream;
+begin
+  fs := TFileStream.Create(aFileName, fmOpenRead + fmShareDenyWrite);
+  try
+    LoadObjectFromStream(fs, aDestination, somePropertiesToIgnore);
+  finally
+    fs.Free;
+  end;
+end;
+
+{ TROXMLStreamer }
+
+constructor TROXMLStreamer.Create(aOwner: TComponent);
+begin
+  inherited;
+
+  fPropertiesToIgnore := TStringList.Create;
+  fPropertiesToIgnore.Sorted := TRUE;
+  fPropertiesToIgnore.Duplicates := dupError;
+
+  fXMLStreamerOptions := [soIncludeType];
+end;
+
+destructor TROXMLStreamer.Destroy;
+begin
+  fPropertiesToIgnore.Free;
+
+  inherited;
+end;
+
+procedure TROXMLStreamer.Deserialize(aStream: TStream; aDestination: TObject);
+var
+  xml: IXMLDocument;
+begin
+  if (aStream = nil) then raise Exception.Create('Invalid stream');
+
+  xml := NewROXmlDocument;
+  xml.New('');
+  xml.LoadFromStream(aStream);
+
+  if (xml.DocumentNode.Value = ValueNIL) then
+    FreeAndNIL(aDestination)
+  else
+    DeserializeObject(xml.DocumentNode, aDestination, TRUE);
+end;
+
+procedure TROXMLStreamer.Serialize(const aSource: TObject; aStream: TStream);
+var
+  xml: IXMLDocument;
+begin
+  if (aStream = nil) then raise Exception.Create('Invalid stream');
+
+  xml := NewROXmlDocument;
+  try
+    if (aSource = nil) then begin
+      xml.New(ValueNIL);
+      Exit;
+    end
+    else
+      xml.New(aSource.ClassName);
+
+    // Serializes the object
+    SerializeObject(xml.DocumentNode, aSource, TRUE);
+  finally
+    xml.SaveToStream(aStream);
+  end;
+end;
+
+procedure TROXMLStreamer.SerializeSimpleType(const aTargetNode: IXMLNode; anObject: TObject; aPropertyInfo: PPropInfo);
+var
+  int64val: int64;
+  intval: integer;
+  dblval: double;
+  strval: string;
+  {$IFNDEF DELPHI5}wstrval: widestring;
+  {$ENDIF}
+  lName: string;
+begin
+  lName := {$IFDEF UNICODE}UTF8ToString{$ENDIF}(aPropertyInfo^.Name);
+  case aPropertyInfo^.PropType^.Kind of
+    {$IFDEF FPC}tkBool,{$ENDIF}
+    tkEnumeration: begin
+      //enuval := GetOrdProp(anObject, lName);
+        aTargetNode.Value := GetPropValue(anObject, lName, TRUE);
+      end;
+
+    tkInteger: begin
+        intval := GetOrdProp(anObject, lName);
+        aTargetNode.Value := intval;
+      end;
+
+    tkFloat: begin
+        dblval := GetFloatProp(anObject, lName);
+        aTargetNode.Value := dblval;
+      end;
+
+    tkLString,
+     {$IFDEF FPC}tkAString,{$ENDIF}
+    tkString: begin
+        strval := GetStrProp(anObject, lName);
+        aTargetNode.Value := strval;
+      end;
+
+    tkInt64: begin
+        int64val := GetInt64Prop(anObject, lName);
+        aTargetNode.Value := int64val;
+      end;
+    {$IFDEF UNICODE}tkUString,{$ENDIF}
+    tkWString: begin
+        {$IFDEF DELPHI5}
+        strval := GetStrProp(anObject, lName);
+        aTargetNode.Value := strval;
+        {$ELSE}
+        wstrval := GetWideStrProp(anObject, lName);
+        aTargetNode.Value := wstrval;
+        {$ENDIF}
+      end;
+
+    tkVariant, tkSet: begin
+        aTargetNode.Value := GetVariantProp(anObject, lName);
+      end;
+
+  else
+    raise Exception.Create(Format('Type not supported %s', [GetEnumName(TypeInfo(TTypeKind), Ord(aPropertyInfo^.PropType^.Kind))]))
+  end;
+end;
+
+procedure TROXMLStreamer.SerializeObject(const anObjectNode: IXMLNode; anObject: TObject; IsRoot: boolean = FALSE);
+var
+  props: PPropList;
+  x, cnt, i: integer;
+  subnode, node: IXMLNode;
+  coll: TCollection;
+    // Temporary variables
+  objval: TObject;
+  pdata: PTypeData;
+  lname: string;
+begin
+  if (anObject <> nil) and (anObject.ClassInfo <> nil) then begin
+    pdata := GetTypeData(anObject.ClassInfo);
+
+    if (pdata <> nil) then begin
+
+      cnt := pdata.PropCount;
+
+      if (cnt > 0) then begin
+        GetMem(props, cnt * SizeOf(PPropInfo));
+
+        try
+          cnt := GetPropList(PTypeInfo(anObject.ClassInfo), tkProperties, props);
+
+          for i := 0 to (cnt - 1) do begin
+            lName := {$IFDEF UNICODE}UTF8ToString{$ENDIF}(props^[i]^.Name);
+            if IsRoot and (fPropertiesToIgnore.IndexOf(lName) >= 0)
+              or not IsStoredProp(anObject, props^[i]) then Continue;
+
+            node := anObjectNode.Add(lName);
+
+            with props^[i]^ do
+              // Class types
+              if (PropType^.Kind = tkClass) then begin
+                node.AddAttribute(attr_Type, props^[i]^.PropType^.Name); // Always set fo object types
+                objval := GetObjectProp(anObject, lName);
+                node.AddAttribute(attr_IsObject, XMLBooleans[TRUE]);
+
+                if Assigned(objval) then begin
+                  // TComponent
+
+                  if (objval is TStrings) then begin
+                    node.Value := TStrings(objval).Text;
+                  end else
+                  if (objval is TComponent) then begin
+                    if (TComponent(objval).Owner = anObject) then
+                      SerializeObject(node, objval) // Owned sub-component
+                    else begin
+                      // Reference to another component
+                      node.AddAttribute(attr_ByRef, XMLBooleans[TRUE]);
+                      node.AddAttribute(attr_RefName, TComponent(objval).Name);
+                      if (TComponent(objval).Owner <> nil) then node.AddAttribute(attr_Owner, TComponent(objval).Owner.Name);
+                    end;
+                  end
+
+                  // TCollection
+                  else if (objval is TCollection) then begin
+                    coll := TCollection(objval);
+                    node.AddAttribute(attr_IsCollection, XMLBooleans[TRUE]);
+                    node.AddAttribute(attr_Count, coll.Count);
+                    node.AddAttribute(attr_ItemClass, coll.ItemClass.ClassName);
+
+                    for x := 0 to (coll.Count - 1) do begin
+                      subnode := node.Add(attr_Item + IntToStr(x));
+                      SerializeObject(subnode, coll.Items[x]);
+                    end;
+                  end
+
+                  // Standard persistent class
+                  else
+                    SerializeObject(node, objval);
+                end
+
+                // NIL object
+                else
+                  node.AddAttribute(attr_IsNull, XMLBooleans[TRUE]);
+              end
+
+            // Simple types
+              else begin
+                if (soIncludeType in fXMLStreamerOptions) then node.AddAttribute(attr_Type, props^[i]^.PropType^.Name);
+                SerializeSimpleType(node, anObject, props^[i]);
+              end;
+          end;
+        finally
+          FreeMem(props, cnt * SizeOf(PPropInfo));
+        end;
+      end
+
+(*      // TROArray (they don't have properties so they will not fall in the previous block)
+      else if (anObject is TROArray) then begin
+        arr := TROArray(anObject);
+        anObjectNode.AddAttribute(attr_IsArray, XMLBooleans[TRUE]);
+        anObjectNode.AddAttribute(attr_Count, arr.Count);
+
+        if (arr.GetItemType<>NIL) then begin
+          anObjectNode.AddAttribute(attr_ItemClass, arr.GetItemType^.Name);
+          for x := 0 to (arr.Count-1) do begin
+            subnode := anObjectNode.Add(attr_Item+IntToStr(x));
+            SerializeObject(subnode, TObject(arr.GetItemRef(x)));
+          end;
+        end;
+      end*)
+    end;
+  end
+
+  else
+    anObjectNode.AddAttribute(attr_IsNull, XMLBooleans[TRUE]);
+end;
+
+procedure TROXMLStreamer.DeserializeObject(const anObjectNode: IXMLNode;
+  anObject: TObject; IsRoot: boolean = FALSE);
+var
+  props: PPropList;
+  x, cnt, i: integer;
+  node: IXMLNode;
+  coll: TCollection;
+
+  // Temporary variables
+  objval: TObject;
+  pdata: PTypeData;
+  collitem: TCollectionItem;
+  strVal: string;
+  lName: string;
+begin
+  if (anObjectNode.GetAttributeValue(attr_IsNull, XMLBooleans[FALSE]) = XMLBooleans[TRUE]) then begin
+    //anObject := NIL;
+    Exit;
+  end;
+
+  pdata := GetTypeData(anObject.ClassInfo);
+
+  if (pdata <> nil) then begin
+
+    cnt := pdata.PropCount;
+
+    if (cnt > 0) then begin
+      GetMem(props, cnt * SizeOf(PPropInfo));
+
+      try
+        cnt := GetPropList(PTypeInfo(anObject.ClassInfo), tkProperties, props);
+
+        for i := 0 to (cnt - 1) do begin
+          lname:= {$IFDEF UNICODE}UTF8ToString {$ENDIF}(props^[i]^.Name);
+          if IsRoot and (fPropertiesToIgnore.IndexOf(lName) >= 0) then Continue;
+
+          node := anObjectNode.GetNodeByName(lName);
+          if (node = nil) then Continue; // Property was not streamed
+
+          with props^[i]^ do
+            // Class types
+            if (PropType^.Kind = tkClass) then begin
+              objval := GetObjectProp(anObject, lName);
+
+              if (objval = nil) then
+                Continue
+
+              else begin
+                // TComponent
+                  if (objval is TStrings) then begin
+                    TStrings(objval).Text := node.Value;
+                  end else
+                if (objval is TComponent) then begin
+                  if (TComponent(objval).Owner = anObject) then
+                    DeserializeObject(node, objval) // Owned sub-component
+                  else begin
+                    // Reference to another component
+                    {node.AddAttribute(attr_ByRef, XMLBooleans[TRUE]);
+                    node.AddAttribute(attr_RefName, TComponent(objval).Name);
+                    if (TComponent(objval).Owner<>NIL)
+                      then node.AddAttribute(attr_Owner, TComponent(objval).Owner.Name);}
+                  end;
+                end
+
+                // TCollection
+                else if (objval is TCollection) then begin
+                  coll := TCollection(objval);
+                  coll.Clear;
+
+                  for x := 0 to (node.ChildrenCount - 1) do try
+                    if SameText(Copy(node.Children[x].Name, 1, 4), attr_Item) then begin
+                      collitem := coll.Add;
+                      DeserializeObject(node.Children[x], collitem);
+                    end;
+                  except
+                    raise
+                  end;
+                end
+
+                // Standard persistent class
+                else
+                  DeserializeObject(node, objval);
+              end
+            end
+
+          // Simple types
+            else begin
+              case PropType^.Kind of
+                tkEnumeration: begin
+                  // If enumerated values are empty, it should just skip and leave the defaults.
+                  // Not doing so generates a range check error.
+                  strVal := VarToStr(node.Value);
+                  if (strVal<>'')
+                    then SetPropValue(anObject, lName, GetEnumValue(props^[i]^.PropType{$IFNDEF FPC}^{$ENDIF}, strVal));
+                end;
+              else
+                SetPropValue(anObject, lName, node.Value);
+              end;
+            end;
+        end;
+      finally
+        FreeMem(props, cnt * SizeOf(PPropInfo));
+      end;
+    end
+
+    // TROArray (they don't have properties so they will not fall in the previous block)
+(*    else if (anObject is TROArray) then begin
+      arr := TROArray(anObject);
+      arr.Resize(anObjectNode.ChildrenCount-1);
+
+      if (arr.GetItemType<>NIL) then begin
+        arr.GetItemClass.Create
+        anObjectNode.AddAttribute(attr_ItemClass, arr.GetItemType^.Name);
+        for x := 0 to (arr.Count-1) do begin
+          subnode := anObjectNode.Add(attr_Item+IntToStr(x));
+          SerializeObject(subnode, TObject(arr.GetItemRef(x)));
+        end;
+      end;
+    end*)
+  end;
+end;
+
+procedure TROXMLStreamer.SetPropertiesToIgnore(const Value: TStrings);
+begin
+  fPropertiesToIgnore.Assign(Value);
+end;
+
+function TROXMLStreamer.GetPropertiesToIgnore: TStrings;
+begin
+  result := fPropertiesToIgnore;
+end;
+
+// Dataset oriented functions
+function DatasetToXML(
+  const aDataset : IDADataset;
+  const RootNodeName : string = '';
+  const RecordNodeName : string = 'Record';
+  IncludeSchema : boolean = TRUE) : IXMLDocument;
+var root, node : IXMLNode;
+    i : integer;
+begin
+  result := NewROXmlDocument;
+
+  if (RootNodeName<>'') then result.New(RootNodeName)
+  else begin
+    if (Trim(aDataset.Name)<>'') then result.New(aDataset.Name)
+                                 else result.New('Dataset');
+  end;
+
+  if not aDataset.Active then Exit;
+
+  root := result.DocumentNode;
+
+  if IncludeSchema then begin
+  end;
+
+  while not aDataset.EOF do try
+    node := root.Add(RecordNodeName);
+    for i := 0 to aDataset.FieldCount-1 do begin
+      node.Add(aDataset.Fields[i].Name).Value := aDataset.Fields[i].AsString;
+    end;
+  finally
+    aDataset.Next;
+  end;
+end;
+
+procedure XMLToCommandParams(const aCommand : IDASQLCommand; const XML : string);
+var xmldoc : IXMLDocument;
+    i : integer;
+    node : IXMLNode;
+    param : TDAParam;
+begin
+  xmldoc := NewROXmlDocument;
+  xmldoc.New('CommandParams');
+  xmldoc.XML := XML;
+
+  for i := 0 to (aCommand.Params.Count-1) do
+    aCommand.Params[i].Value := Null;
+
+  for i := 0 to (xmldoc.DocumentNode.ChildrenCount-1) do begin
+    node := xmldoc.DocumentNode.Children[i];
+    param := aCommand.Params.FindParam(node.Name);
+    if (param=NIL) then Continue;
+
+    param.Value := node.Value;
+  end;
+end;
+
+function XMLToUpdateCommand(const aConnection : IDAConnection;
+                            const aReferencedDataset : TDADataset;
+                            const aTargetTableName : string;
+                            const aXML : string) : IDASQLCommand;
+const CRLF = #13#10;
+var fld : TDAField;
+    i : integer;
+    xmldoc : IXMLDocument;
+    nme, where, sql : string;
+begin
+  xmldoc := NewROXmlDocument;
+  xmldoc.New;
+  xmldoc.XML := aXML;
+
+  result := NIL;
+  if (xmldoc.DocumentNode.ChildrenCount=0)
+    then raise Exception.Create('Invalid XML document. Cannot generate an update statement');
+
+  sql := 'UPDATE '+aTargetTableName+' SET'+CRLF;
+  where := '';
+
+  with xmldoc do begin
+    for i := 0 to (DocumentNode.ChildrenCount-1) do begin
+      nme := DocumentNode.Children[i].Name;
+      fld := aReferencedDataset.Fields.FindField(nme);
+
+      if (fld=NIL) then begin
+        if (Pos(old_FieldPrefix, UpperCase(nme))=1) then begin
+          if (where<>'') then where := where+' AND ';
+          nme := Copy(nme, Length(old_FieldPrefix)+1, MaxInt);
+          fld := aReferencedDataset.Fields.FindField(nme);
+          if (fld=NIL) then Continue;
+          if (fld.DataType in [datWideString, datString, datDateTime])
+            then where := where+nme+'='+''''+VarToStr(DocumentNode.Children[i].Value)+''''
+            else where := where+nme+'='+VarToStr(DocumentNode.Children[i].Value);
+
+        end;
+        Continue;
+      end
+      else begin
+        sql := sql+fld.Name+'=';
+        if (fld.DataType in [datWideString, datString, datDateTime])
+          then sql := sql+''''+VarToStr(DocumentNode.Children[i].Value)+''''
+          else sql := sql+VarToStr(DocumentNode.Children[i].Value);
+        sql := sql+','+CRLF;
+      end;
+    end;
+  end;
+  sql := Copy(sql, 1, Length(sql)-3)+CRLF;
+
+  if (where<>'') then sql := sql+' WHERE '+where;
+
+  result := aConnection.NewCommand(sql, stSQL, 'UPDATE_'+aTargetTableName);
+end;
+
+procedure TROXMLStreamer.Serialize(const aSource: TObject; const anObjectNode: IXMLNode; IsRoot: boolean = True);
+begin
+  if (anObjectNode = nil) then raise Exception.Create('Invalid XMLNode.');
+  if (aSource <> nil) then SerializeObject(anObjectNode, aSource, IsRoot);
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/Thumbs.db b/internal/5.0.35.741/1/Data Abstract for Delphi/Thumbs.db
new file mode 100644
index 0000000..050b896
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/Thumbs.db differ
diff --git a/internal/5.0.35.741/1/Data Abstract for Delphi/da.png b/internal/5.0.35.741/1/Data Abstract for Delphi/da.png
new file mode 100644
index 0000000..e42fedc
Binary files /dev/null and b/internal/5.0.35.741/1/Data Abstract for Delphi/da.png differ
diff --git a/internal/5.0.35.741/1/Everwood/Bin/1033/RemObjects.Everwood.Resources.dll b/internal/5.0.35.741/1/Everwood/Bin/1033/RemObjects.Everwood.Resources.dll
new file mode 100644
index 0000000..08c7cf4
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Bin/1033/RemObjects.Everwood.Resources.dll differ
diff --git a/internal/5.0.35.741/1/Everwood/Bin/EWSetRegistryPath.exe b/internal/5.0.35.741/1/Everwood/Bin/EWSetRegistryPath.exe
new file mode 100644
index 0000000..49b5a72
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Bin/EWSetRegistryPath.exe differ
diff --git a/internal/5.0.35.741/1/Everwood/Bin/GacInstall.exe b/internal/5.0.35.741/1/Everwood/Bin/GacInstall.exe
new file mode 100644
index 0000000..46ce7c0
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Bin/GacInstall.exe differ
diff --git a/internal/5.0.35.741/1/Everwood/Bin/Microsoft.VisualStudio.OLE.Interop.dll b/internal/5.0.35.741/1/Everwood/Bin/Microsoft.VisualStudio.OLE.Interop.dll
new file mode 100644
index 0000000..bcdd96d
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Bin/Microsoft.VisualStudio.OLE.Interop.dll differ
diff --git a/internal/5.0.35.741/1/Everwood/Bin/Microsoft.VisualStudio.Shell.Interop.8.0.dll b/internal/5.0.35.741/1/Everwood/Bin/Microsoft.VisualStudio.Shell.Interop.8.0.dll
new file mode 100644
index 0000000..778b6ad
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Bin/Microsoft.VisualStudio.Shell.Interop.8.0.dll differ
diff --git a/internal/5.0.35.741/1/Everwood/Bin/Microsoft.VisualStudio.Shell.Interop.dll b/internal/5.0.35.741/1/Everwood/Bin/Microsoft.VisualStudio.Shell.Interop.dll
new file mode 100644
index 0000000..a4b7afe
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Bin/Microsoft.VisualStudio.Shell.Interop.dll differ
diff --git a/internal/5.0.35.741/1/Everwood/Bin/Microsoft.VisualStudio.TextManager.Interop.dll b/internal/5.0.35.741/1/Everwood/Bin/Microsoft.VisualStudio.TextManager.Interop.dll
new file mode 100644
index 0000000..553e141
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Bin/Microsoft.VisualStudio.TextManager.Interop.dll differ
diff --git a/internal/5.0.35.741/1/Everwood/Bin/Microsoft.VisualStudio.VSIP.Helper.dll b/internal/5.0.35.741/1/Everwood/Bin/Microsoft.VisualStudio.VSIP.Helper.dll
new file mode 100644
index 0000000..9ffccfb
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Bin/Microsoft.VisualStudio.VSIP.Helper.dll differ
diff --git a/internal/5.0.35.741/1/Everwood/Bin/RemObjects.Everwood.BDS2.dll b/internal/5.0.35.741/1/Everwood/Bin/RemObjects.Everwood.BDS2.dll
new file mode 100644
index 0000000..c9d1a3a
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Bin/RemObjects.Everwood.BDS2.dll differ
diff --git a/internal/5.0.35.741/1/Everwood/Bin/RemObjects.Everwood.BDS3.dll b/internal/5.0.35.741/1/Everwood/Bin/RemObjects.Everwood.BDS3.dll
new file mode 100644
index 0000000..bf349ab
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Bin/RemObjects.Everwood.BDS3.dll differ
diff --git a/internal/5.0.35.741/1/Everwood/Bin/RemObjects.Everwood.BDS4.dll b/internal/5.0.35.741/1/Everwood/Bin/RemObjects.Everwood.BDS4.dll
new file mode 100644
index 0000000..135edc1
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Bin/RemObjects.Everwood.BDS4.dll differ
diff --git a/internal/5.0.35.741/1/Everwood/Bin/RemObjects.Everwood.BDS5.dll b/internal/5.0.35.741/1/Everwood/Bin/RemObjects.Everwood.BDS5.dll
new file mode 100644
index 0000000..18f8ba3
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Bin/RemObjects.Everwood.BDS5.dll differ
diff --git a/internal/5.0.35.741/1/Everwood/Bin/RemObjects.Everwood.ShDocWv.dll b/internal/5.0.35.741/1/Everwood/Bin/RemObjects.Everwood.ShDocWv.dll
new file mode 100644
index 0000000..d5528f0
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Bin/RemObjects.Everwood.ShDocWv.dll differ
diff --git a/internal/5.0.35.741/1/Everwood/Bin/RemObjects.Everwood.VarReplacer.exe b/internal/5.0.35.741/1/Everwood/Bin/RemObjects.Everwood.VarReplacer.exe
new file mode 100644
index 0000000..8d01880
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Bin/RemObjects.Everwood.VarReplacer.exe differ
diff --git a/internal/5.0.35.741/1/Everwood/Bin/RemObjects.Everwood.VisualStudio.2005.dll b/internal/5.0.35.741/1/Everwood/Bin/RemObjects.Everwood.VisualStudio.2005.dll
new file mode 100644
index 0000000..40947d7
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Bin/RemObjects.Everwood.VisualStudio.2005.dll differ
diff --git a/internal/5.0.35.741/1/Everwood/Bin/RemObjects.Everwood.VisualStudio.dll b/internal/5.0.35.741/1/Everwood/Bin/RemObjects.Everwood.VisualStudio.dll
new file mode 100644
index 0000000..8a516d6
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Bin/RemObjects.Everwood.VisualStudio.dll differ
diff --git a/internal/5.0.35.741/1/Everwood/Bin/RemObjects.Everwood.dll b/internal/5.0.35.741/1/Everwood/Bin/RemObjects.Everwood.dll
new file mode 100644
index 0000000..b228b29
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Bin/RemObjects.Everwood.dll differ
diff --git a/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D10.bpl b/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D10.bpl
new file mode 100644
index 0000000..c394e34
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D10.bpl differ
diff --git a/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D10.dcp b/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D10.dcp
new file mode 100644
index 0000000..c199d52
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D10.dcp differ
diff --git a/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D11.bpl b/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D11.bpl
new file mode 100644
index 0000000..7a0ad14
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D11.bpl differ
diff --git a/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D11.dcp b/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D11.dcp
new file mode 100644
index 0000000..6ae9555
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D11.dcp differ
diff --git a/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D12.bpl b/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D12.bpl
new file mode 100644
index 0000000..6c38618
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D12.bpl differ
diff --git a/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D12.dcp b/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D12.dcp
new file mode 100644
index 0000000..17f1893
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D12.dcp differ
diff --git a/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D6.bpl b/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D6.bpl
new file mode 100644
index 0000000..3690b0e
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D6.bpl differ
diff --git a/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D6.dcp b/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D6.dcp
new file mode 100644
index 0000000..9dfa77f
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D6.dcp differ
diff --git a/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D7.bpl b/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D7.bpl
new file mode 100644
index 0000000..8609bac
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D7.bpl differ
diff --git a/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D7.dcp b/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D7.dcp
new file mode 100644
index 0000000..6286311
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D7.dcp differ
diff --git a/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D9.bpl b/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D9.bpl
new file mode 100644
index 0000000..7c96fb6
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D9.bpl differ
diff --git a/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D9.dcp b/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D9.dcp
new file mode 100644
index 0000000..f3a79d5
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Bin/RemObjects_Everwood_D9.dcp differ
diff --git a/internal/5.0.35.741/1/Everwood/Bin/SHDocVw.dll b/internal/5.0.35.741/1/Everwood/Bin/SHDocVw.dll
new file mode 100644
index 0000000..77b0ae8
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Bin/SHDocVw.dll differ
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/Everwood.inc b/internal/5.0.35.741/1/Everwood/Source/Delphi/Everwood.inc
new file mode 100644
index 0000000..7f6a92f
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/Everwood.inc
@@ -0,0 +1,6 @@
+{$INCLUDE eDefines.inc}
+
+{$IFDEF FPC}
+  {$MODE DELPHI}
+{$ENDIF}
+
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/EverwoodIDEResources.lrs b/internal/5.0.35.741/1/Everwood/Source/Delphi/EverwoodIDEResources.lrs
new file mode 100644
index 0000000..b0fbd11
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/EverwoodIDEResources.lrs
@@ -0,0 +1,524 @@
+LazarusResources.Add('EverwoodWizardStandardIcon','ICO',[
+  #0#0#1#0#3#0'00'#0#0#1#0' '#0#168'%'#0#0'6'#0#0#0'  '#0#0#1#0' '#0#168#16#0#0
+  +#222'%'#0#0#16#16#0#0#1#0' '#0'h'#4#0#0#134'6'#0#0'('#0#0#0'0'#0#0#0'`'#0#0#0
+  +#1#0' '#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#31#0#255#0'{'#0
+  +#255#0'}'#0#255#1'|'#0#255#1'|'#0#255#1'|'#0#255#1'{'#0#255#2'{'#0#255#2'z'#0
+  +#255#2'z'#0#255#3'z'#0#255#3'y'#0#255#4'y'#0#255#4'x'#0#255#4'x'#0#255#5'w'#0
+  +#255#5'v'#0#255#6'v'#0#255#6'u'#0#255#7'u'#0#255#7'u'#0#255#8's'#0#255#8's'#0
+  +#255#9's'#0#255#9'r'#0#255#9'r'#0#255#10'q'#0#255#10'o'#0#255#11'o'#0#255#11
+  +'o'#0#255#12'n'#0#255#12'm'#0#255#13'm'#0#255#14'l'#0#255#14'k'#0#255#15'j'#0
+  +#255#16'i'#0#255#16'i'#0#255#17'h'#0#255#18'g'#0#255#18'f'#0#255#19'e'#0#255
+  +#20'e'#0#255#20'd'#0#255#21'c'#0#255#22'b'#0#255#22'a'#0#255#23'`'#0#255#0#31
+  +#0#255#1'z'#0#255#1'|'#0#255#1'|'#0#255#1'|'#0#255#2'{'#0#255#2'{'#0#255#2'z'
+  +#0#255#3'z'#0#255#3'y'#0#255#3'y'#0#255#4'x'#0#255#4'x'#0#255#5'w'#0#255#5'w'
+  +#0#255#5'v'#0#255#6'u'#0#255#6'u'#0#255#7't'#0#255#7't'#0#255#8't'#0#255#8'r'
+  +#0#255#8'r'#0#255#10'r'#0#255#10'p'#0#255#10'p'#0#255#11'p'#0#255#11'n'#0#255
+  +#12'n'#0#255#12'n'#0#255#13'm'#0#255#13'l'#0#255#14'k'#0#255#15'j'#0#255#15
+  +'j'#0#255#16'i'#0#255#17'h'#0#255#17'g'#0#255#18'f'#0#255#19'f'#0#255#19'e'#0
+  +#255#20'd'#0#255#21'c'#0#255#21'b'#0#255#22'a'#0#255#23'a'#0#255#24'`'#0#255
+  +#24'_'#0#255#0#31#0#255#1'z'#0#255#1'|'#0#255#2'{'#0#255#2'{'#0#255#2'z'#0
+  +#255#3'z'#0#255#3'y'#0#255#3'y'#0#255#4'x'#0#255#4'x'#0#255#5'w'#0#255#5'w'#0
+  +#255#5'v'#0#255#6'v'#0#255#6'u'#0#255#7't'#0#255#7't'#0#255#8's'#0#255#8's'#0
+  +#255#9's'#0#255#9'q'#0#255#10'q'#0#255#10'q'#0#255#10'p'#0#255#12'n'#0#255#12
+  +'n'#0#255#12'n'#0#255#13'm'#0#255#13'l'#0#255#14'k'#0#255#15'k'#0#255#15'j'#0
+  +#255#16'i'#0#255#17'h'#0#255#17'g'#0#255#18'g'#0#255#19'f'#0#255#19'e'#0#255
+  +#20'd'#0#255#21'c'#0#255#21'b'#0#255#22'b'#0#255#23'a'#0#255#24'`'#0#255#24
+  +'_'#0#255#25'^'#0#255#25']'#0#255#0#31#0#255#1'y'#0#255#2'{'#0#255#2'z'#0#255
+  +#2'z'#0#255#3'z'#0#255#3'y'#0#255#4'y'#0#255#4'x'#0#255#4'w'#0#255#5'w'#0#255
+  +#5'v'#0#255#6'v'#0#255#6'u'#0#255#7't'#0#255#7't'#0#255#8's'#0#255#8's'#0#255
+  +#9'r'#0#255#9'r'#0#255#10'r'#0#255#10'p'#0#255#11'o'#0#255#11'o'#0#255#11'o'
+  +#0#255#13'n'#0#255#13'l'#0#255#13'l'#0#255#14'l'#0#255#14'k'#0#255#15'j'#0
+  +#255#16'i'#0#255#16'h'#0#255#17'h'#0#255#18'g'#0#255#18'f'#0#255#19'e'#0#255
+  +#20'd'#0#255#20'c'#0#255#21'c'#0#255#22'b'#0#255#23'a'#0#255#23'`'#0#255#24
+  +'_'#0#255#25'^'#0#255#25']'#0#255#26'\'#0#255#27'['#0#255#0#30#0#255#2'x'#0
+  +#255#2'z'#0#255#3'z'#0#255#3'y'#0#255#4'y'#0#255#4'x'#0#255#4'x'#0#255#5'w'#0
+  +#255#5'v'#0#255#6'v'#0#255#6'u'#0#255#7'u'#0#255#7't'#0#255#8't'#0#255#8's'#0
+  +#255#8'r'#0#255#9'r'#0#255#10'q'#0#255#10'p'#0#255#11'o'#0#255#11'o'#0#255#12
+  +'o'#0#255#12'm'#0#255#12'm'#0#255#14'm'#0#255#14'l'#0#255#14'k'#0#255#16'j'#0
+  +#255#16'i'#0#255#16'i'#0#255#17'h'#0#255#18'g'#0#255#18'f'#0#255#19'e'#0#255
+  +#20'e'#0#255#20'd'#0#255#21'c'#0#255#22'b'#0#255#22'a'#0#255#23'`'#0#255#24
+  +'_'#0#255#24'^'#0#255#25']'#0#255#26'\'#0#255#27'\'#0#255#27'['#0#255#28'Z'#0
+  +#255#0#30#0#255#3'x'#0#255#3'y'#0#255#3'y'#0#255#4'x'#0#255#4'x'#0#255#5'w'#0
+  +#255#5'w'#0#255#5'v'#0#255#6'v'#0#255#6'u'#0#255#7't'#0#255#7't'#0#255#8's'#0
+  +#255#8's'#0#255#9'r'#0#255#9'q'#0#255#10'p'#0#255#11'p'#0#255#11'p'#0#255#12
+  +'n'#0#255#12'n'#0#255#13'n'#0#255#13'm'#0#255#13'l'#0#255#15'j'#0#255#15'j'#0
+  +#255#15'j'#0#255#17'i'#0#255#17'h'#0#255#17'g'#0#255#18'f'#0#255#19'f'#0#255
+  +#19'e'#0#255#20'd'#0#255#21'c'#0#255#21'b'#0#255#22'a'#0#255#23'a'#0#255#24
+  +'`'#0#255#24'_'#0#255#25'^'#0#255#26']'#0#255#26'\'#0#255#27'['#0#255#28'Z'#0
+  +#255#29'Y'#0#255#30'X'#0#255#0#30#0#255#3'w'#0#255#4'x'#0#255#4'x'#0#255#5'w'
+  +#0#255#5'w'#0#255#5'v'#0#255#6'v'#0#255#6'u'#0#255#7't'#0#255#7't'#0#255#8's'
+  +#0#255#8's'#0#255#9'r'#0#255#9'q'#0#255#10'q'#0#255#10'p'#0#255#11'o'#0#255
+  +#12'n'#0#255#12'n'#0#255#13'n'#0#255#13'l'#0#255#13'k'#0#255#15'k'#0#255#15
+  +'k'#0#255#15'j'#0#255#17'i'#0#255#17'g'#0#255#17'g'#0#255#18'g'#0#255#19'f'#0
+  +#255#19'e'#0#255#20'd'#0#255#20'c'#0#255#21'b'#0#255#22'b'#0#255#23'a'#0#255
+  +#23'`'#0#255#24'_'#0#255#25'^'#0#255#25']'#0#255#26'\'#0#255#27'['#0#255#28
+  +'Z'#0#255#29'Y'#0#255#29'X'#0#255#30'W'#0#255#31'V'#0#255#1#30#0#255#4'v'#0
+  +#255#4'w'#0#255#5'w'#0#255#5'v'#0#255#6'v'#0#255#6'u'#0#255#7'u'#0#255#7't'#0
+  +#255#8's'#0#255#8's'#0#255#9'r'#0#255#9'r'#0#255#10'q'#0#255#10'p'#0#255#11
+  +'o'#0#255#11'o'#0#255#12'n'#0#255#13'm'#0#255#13'l'#0#255#14'l'#0#255#14'l'#0
+  +#255#14'j'#0#255#16'j'#0#255#16'h'#0#255#16'h'#0#255#18'h'#0#255#18'g'#0#255
+  +#18'f'#0#255#19'e'#0#255#20'e'#0#255#20'd'#0#255#21'c'#0#255#22'b'#0#255#22
+  +'a'#0#255#23'`'#0#255#24'_'#0#255#25'^'#0#255#25']'#0#255#26'\'#0#255#27'['#0
+  +#255#28'['#0#255#28'Z'#0#255#29'Y'#0#255#30'X'#0#255#31'W'#0#255' V'#0#255' '
+  +'U'#0#255#1#29#0#255#5'u'#0#255#5'w'#0#255#5'v'#0#255#6'u'#0#255#6'u'#0#255#7
+  +'t'#0#255#7't'#0#255#8's'#0#255#8'r'#0#255#9'r'#0#255#10'q'#0#255#10'p'#0#255
+  +#11'o'#0#255#11'o'#0#255#12'n'#0#255#12'm'#0#255#13'm'#0#255#14'l'#0#255#14
+  ,'k'#0#255#14'j'#0#255#16'k'#0#255#16'j'#0#255#17'i'#0#255#17'h'#0#255#17'f'#0
+  +#255#19'f'#0#255#19'f'#0#255#19'e'#0#255#20'd'#0#255#21'c'#0#255#21'b'#0#255
+  +#22'a'#0#255#23'`'#0#255#24'_'#0#255#24'^'#0#255#25']'#0#255#26'\'#0#255#27
+  +'\'#0#255#27'['#0#255#28'Z'#0#255#29'Y'#0#255#30'X'#0#255#31'W'#0#255#31'V'#0
+  +#255' U'#0#255'!T'#0#255'"S'#0#255#1#29#0#255#5't'#0#255#6'v'#0#255#6'u'#0
+  +#255#7't'#0#255#7't'#0#255#8's'#0#255#8's'#0#255#9'r'#0#255#9'q'#0#255#10'p'
+  +#0#255#11'p'#0#255#11'o'#0#255#12'n'#0#255#12'n'#0#255#13'm'#0#255#13'l'#0
+  +#255#14'k'#0#255#15'k'#0#255#15'k'#0#255#15'i'#0#255#17'h'#0#255#17'h'#0#255
+  +#17'g'#0#255#19'g'#0#255#19'f'#0#255#19'e'#0#255#21'e'#0#255#20'c'#0#255#21
+  +'b'#0#255#22'a'#0#255#23'a'#0#255#24'`'#0#255#24'_'#0#255#25'^'#0#255#26']'#0
+  +#255#26'\'#0#255#27'['#0#255#28'Z'#0#255#29'Y'#0#255#30'X'#0#255#30'W'#0#255
+  +#31'V'#0#255' U'#0#255'!T'#0#255'!S'#0#255'"R'#0#255'#Q'#0#255#1#29#0#255#6
+  +'s'#0#255#7't'#0#255#7't'#0#255#8's'#0#255#8's'#0#255#9'r'#0#255#9'q'#0#255
+  +#10'q'#0#255#10'p'#0#255#11'o'#0#255#12'n'#0#255#12'n'#0#255#13'm'#0#255#13
+  +'l'#0#255#14'l'#0#255#15'k'#0#255#15'j'#0#255#16'i'#0#255#16'i'#0#255#16'h'#0
+  +#255#18'h'#0#255#18'f'#0#255#18'f'#0#255#20'e'#0#255#20'e'#0#255#20'c'#0#255
+  +#21'b'#0#255#23'b'#0#255#23'a'#0#255#23'`'#0#255#24'`'#0#255#25'_'#0#255#25
+  +'^'#0#255#26'\'#0#255#27'['#0#255#28'Z'#0#255#29'Y'#0#255#29'Y'#0#255#30'X'#0
+  +#255#31'W'#0#255' V'#0#255' U'#0#255'!T'#0#255'"S'#0#255'#R'#0#255'$Q'#0#255
+  +'$P'#0#255#1#29#0#255#7'r'#0#255#8's'#0#255#8's'#0#255#9'r'#0#255#9'r'#0#255
+  +#10'q'#0#255#10'p'#0#255#11'p'#0#255#11'o'#0#255#12'n'#0#255#13'm'#0#255#13
+  +'m'#0#255#14'l'#0#255#14'k'#0#255#15'k'#0#255#16'j'#0#255#16'i'#0#255#17'h'#0
+  +#255#17'g'#0#255#17'f'#0#255#18'f'#0#255#19'e'#0#255#19'e'#0#255#20'd'#0#255
+  +#22'c'#0#255#21'b'#0#255#22'a'#0#255#23'a'#0#255#24'`'#0#255#24'_'#0#255#25
+  +']'#0#255#26'\'#0#255#26'['#0#255#27'['#0#255#28'Z'#0#255#29'Y'#0#255#30'X'#0
+  +#255#30'X'#0#255#31'W'#0#255' V'#0#255'!U'#0#255'!T'#0#255'"S'#0#255'#R'#0
+  +#255'$P'#0#255'%N'#0#255'%M'#0#255#2#29#0#255#8'q'#0#255#8'r'#0#255#9'r'#0
+  +#255#10'q'#0#255#10'q'#0#255#11'p'#0#255#11'o'#0#255#12'n'#0#255#12'n'#0#255
+  +#13'm'#0#255#13'l'#0#255#14'l'#0#255#15'k'#0#255#15'j'#0#255#16'i'#0#255#17
+  +'h'#0#255#17'h'#0#255#18'g'#0#255#19'f'#0#255#19'f'#0#255#19'd'#0#255#21'd'#0
+  +#255#21'd'#0#255#20'c'#0#255#22'b'#0#255#24'a'#0#255#23'`'#0#255#24'_'#0#255
+  +#25'^'#0#255#26']'#0#255#26'\'#0#255#27'['#0#255#28'Z'#0#255#29'Z'#0#255#29
+  +'Y'#0#255#30'X'#0#255#31'W'#0#255' V'#0#255' U'#0#255'!T'#0#255'"S'#0#255'#R'
+  +#0#255'$Q'#0#255'$P'#0#255'%N'#0#255'&M'#0#255'''L'#0#255#2#28#0#255#9'p'#0
+  +#255#9'q'#0#255#10'q'#0#255#11'p'#0#255#11'o'#0#255#12'n'#0#255#12'n'#0#255
+  +#13'm'#0#255#13'm'#0#255#14'l'#0#255#14'k'#0#255#15'j'#0#255#16'i'#0#255#16
+  +'i'#0#255#17'h'#0#255#18'g'#0#255#18'f'#0#255#19'e'#0#255#20'e'#0#255#20'd'#0
+  +#255#20'b'#0#255#21'b'#0#255#23'b'#0#255#23'a'#0#255#23'`'#0#255#24'_'#0#255
+  +#26'_'#0#255#25']'#0#255#26'\'#0#255#27'['#0#255#28'['#0#255#28'Z'#0#255#29
+  +'Y'#0#255#30'X'#0#255#31'W'#0#255#31'V'#0#255' U'#0#255'!T'#0#255'"S'#0#255
+  +'#R'#0#255'#Q'#0#255'$P'#0#255'%O'#0#255'&N'#0#255'''M'#0#255'(L'#0#255'(K'#0
+  +#255#2#28#0#255#10'o'#0#255#10'p'#0#255#11'o'#0#255#11'o'#0#255#12'n'#0#255
+  +#13'm'#0#255#13'm'#0#255#14'l'#0#255#14'k'#0#255#15'j'#0#255#16'j'#0#255#16
+  +'i'#0#255#17'h'#0#255#18'g'#0#255#18'f'#0#255#19'f'#0#255#20'e'#0#255#20'd'#0
+  +#255#21'c'#0#255#22'b'#0#255#22'b'#0#255#22'`'#0#255#23'`'#0#255#25'`'#0#255
+  +#25'_'#0#255#24'^'#0#255#26'\'#0#255#28'\'#0#255#27'['#0#255#28'Z'#0#255#29
+  +'Y'#0#255#30'X'#0#255#30'W'#0#255#31'V'#0#255' U'#0#255'!T'#0#255'"S'#0#255
+  +'"S'#0#255'#Q'#0#255'$P'#0#255'%O'#0#255'&N'#0#255'''M'#0#255'''L'#0#255'(K'
+  +#0#255')J'#0#255'*I'#0#255#2#28#0#255#11'n'#0#255#11'o'#0#255#12'n'#0#255#12
+  +'n'#0#255#13'm'#0#255#14'l'#0#255#14'k'#0#255#15'k'#0#255#15'j'#0#255#16'i'#0
+  +#255#17'h'#0#255#17'g'#0#255#18'g'#0#255#19'f'#0#255#19'e'#0#255#20'd'#0#255
+  +#21'c'#0#255#21'b'#0#255#22'a'#0#255#22'a'#0#255#24'`'#0#255#24'_'#0#255#24
+  +'_'#0#255#25']'#0#255#26']'#0#255#26'\'#0#255#26'['#0#255#28'Z'#0#255#29'Z'#0
+  +#255#29'Y'#0#255#30'X'#0#255#31'W'#0#255' V'#0#255'!U'#0#255'!T'#0#255'"S'#0
+  +#255'#R'#0#255'$P'#0#255'%O'#0#255'%N'#0#255'&M'#0#255'''L'#0#255'(K'#0#255
+  +')J'#0#255'*I'#0#255'+H'#0#255',G'#0#255#2#27#0#255#12'l'#0#255#12'o'#0#255
+  +#13'n'#0#255#13'l'#0#255#14'l'#0#255#15'k'#0#255#15'k'#0#255#16'i'#0#255#17
+  +'h'#0#255#17'h'#0#255#18'g'#0#255#19'g'#0#255#19'e'#0#255#20'd'#0#255#21'd'#0
+  +#255#21'c'#0#255#22'b'#0#255#23'b'#0#255#23'a'#0#255#23'_'#0#255#24'^'#0#255
+  +#26']'#0#255#26']'#0#255#25'\'#0#255#27'['#0#255#28'['#0#255#29'Z'#0#255#29
+  +'Y'#0#255#30'X'#0#255#31'W'#0#255' V'#0#255' U'#0#255'!T'#0#255'"S'#0#255'#R'
+  +#0#255'$Q'#0#255'$P'#0#255'%N'#0#255'&M'#0#255'''L'#0#255'(K'#0#255')J'#0#255
+  +'*I'#0#255'+H'#0#255'+G'#0#255',F'#0#255'-E'#0#255#3#27#0#255#13'k'#0#255#13
+  +'m'#0#255#14'l'#0#255#14'l'#0#255#15'j'#0#255#16'i'#0#255#16'i'#0#255#17'h'#0
+  ,#255#18'h'#0#255#18'f'#0#255#19'e'#0#255#20'e'#0#255#20'd'#0#255#21'c'#0#255
+  +#22'b'#0#255#22'a'#0#255#22'`'#0#255#24'`'#0#255#25'_'#0#255#25'^'#0#255#24
+  +']'#0#255#27'\'#0#255#27'\'#0#255#28'['#0#255#28'Z'#0#255#28'Y'#0#255#30'X'#0
+  +#255#31'W'#0#255#31'V'#0#255' U'#0#255' T'#0#255'"S'#0#255'#R'#0#255'#Q'#0
+  +#255'$P'#0#255'%O'#0#255'&N'#0#255'''M'#0#255'(L'#0#255'(K'#0#255')J'#0#255
+  +'*I'#0#255'*G'#0#255'+G'#0#255'-E'#0#255'.D'#0#255'/C'#0#255#3#27#0#255#14'k'
+  +#0#255#13'k'#0#255#15'j'#0#255#16'j'#0#255#15'i'#0#255#17'i'#0#255#18'g'#0
+  +#255#17'f'#0#255#19'f'#0#255#20'f'#0#255#20'e'#0#255#21'c'#0#255#22'b'#0#255
+  +#21'a'#0#255#23'a'#0#255#24'`'#0#255#24'_'#0#255#24'^'#0#255#26']'#0#255#26
+  +'\'#0#255#27'['#0#255#27'['#0#255#28'Z'#0#255#29'Y'#0#255#30'X'#0#255#31'W'#0
+  +#255#31'V'#0#255#31'U'#0#255'!T'#0#255'"S'#0#255'"R'#0#255'#Q'#0#255'#P'#0
+  +#255'%O'#0#255'&N'#0#255'''M'#0#255'''L'#0#255'(K'#0#255')J'#0#255'*I'#0#255
+  +'+H'#0#255',G'#0#255',F'#0#255'-D'#0#255'.C'#0#255'/B'#0#255'0A'#0#255#3#26#0
+  +#255#15'i'#0#255#15'j'#0#255#16'j'#0#255#17'h'#0#255#17'g'#0#255#18'g'#0#255
+  +#19'g'#0#255#19'f'#0#255#20'd'#0#255#21'd'#0#255#20'c'#0#255#21'b'#0#255#23
+  +'a'#0#255#23'`'#0#255#23'_'#0#255#25'^'#0#255#26']'#0#255#26'\'#0#255#26'\'#0
+  +#255#27'Z'#0#255#29'Z'#0#255#29'Y'#0#255#30'Y'#0#255#30'X'#0#255#30'W'#0#255
+  +' V'#0#255'!U'#0#255'"T'#0#255'"S'#0#255'"R'#0#255'$P'#0#255'%O'#0#255'%N'#0
+  +#255'&M'#0#255'&M'#0#255'''L'#0#255')J'#0#255'*I'#0#255'+H'#0#255'+G'#0#255
+  +',F'#0#255'-E'#0#255'/D'#0#255'/C'#0#255'0A'#0#255'1@'#0#255'2?'#0#255#4#26#0
+  +#255#16'g'#0#255#17'h'#0#255#17'h'#0#255#18'h'#0#255#19'g'#0#255#19'e'#0#255
+  +#20'e'#0#255#21'd'#0#255#20'c'#0#255#22'b'#0#255#22'a'#0#255#23'`'#0#255#24
+  +'_'#0#255#25'^'#0#255#25']'#0#255#25'\'#0#255#26'['#0#255#28'['#0#255#28'Z'#0
+  +#255#29'Y'#0#255#29'X'#0#255#30'W'#0#255' W'#0#255' V'#0#255'!U'#0#255'!T'#0
+  +#255'!S'#0#255'#R'#0#255'$Q'#0#255'$P'#0#255'%O'#0#255'%N'#0#255'''M'#0#255
+  +'(L'#0#255'(J'#0#255')I'#0#255'*H'#0#255'+G'#0#255',F'#0#255'-E'#0#255'.D'#0
+  +#255'0E'#0#255'2E'#0#255'-<'#0#255'1?'#0#255'2>'#0#255'3='#0#255#4#26#0#255
+  +#17'g'#0#255#18'h'#0#255#17'f'#0#255#19'h'#0#255#21'n'#0#255#20'g'#0#255#21
+  +'c'#0#255#22'b'#0#255#22'a'#0#255#22'`'#0#255#24'`'#0#255#25'_'#0#255#24'^'#0
+  +#255#25']'#0#255#27'\'#0#255#27'['#0#255#28'Z'#0#255#28'Y'#0#255#30'X'#0#255
+  +#31'W'#0#255#31'V'#0#255' U'#0#255' U'#0#255' T'#0#255'"T'#0#255'#R'#0#255'#'
+  +'P'#0#255'#P'#0#255'$O'#0#255'&N'#0#255'''M'#0#255'''L'#0#255'(K'#0#255')J'#0
+  +#255'*H'#0#255'+G'#0#255',G'#0#255'-E'#0#255'-D'#0#255'/C'#0#255'1D'#0#255','
+  +';'#0#255#22#28#0#255')3'#0#255'4='#0#255'4<'#0#255'5;'#0#255#4#25#0#255#18
+  +'e'#0#255#19'f'#0#255#19'f'#0#255#17'Z'#0#255#10'7'#0#255#18'V'#0#255#22'f'#0
+  +#255#23'c'#0#255#24'`'#0#255#24'_'#0#255#24'^'#0#255#26']'#0#255#26'\'#0#255
+  +#27'['#0#255#27'Z'#0#255#29'Y'#0#255#30'X'#0#255#30'W'#0#255#31'V'#0#255#31
+  +'U'#0#255' T'#0#255'"T'#0#255'"T'#0#255'"S'#0#255'"Q'#0#255'$O'#0#255'%N'#0
+  +#255'%N'#0#255'&M'#0#255'''L'#0#255'(K'#0#255')J'#0#255'*I'#0#255'+H'#0#255
+  +',G'#0#255',F'#0#255'-D'#0#255'.C'#0#255'0B'#0#255'1B'#0#255'''2'#0#255#15#20
+  +#0#244#0#0#0#218')0'#0#255'6<'#0#255'6:'#0#255'79'#0#255#4#25#0#255#18'd'#0
+  +#255#20'e'#0#255#21'e'#0#255#16'N'#0#255#0#3#0#211#6#28#0#235#15'B'#0#255#24
+  +'`'#0#255#25'a'#0#255#26']'#0#255#26'\'#0#255#26'\'#0#255#28'['#0#255#29'Z'#0
+  +#255#29'Y'#0#255#30'X'#0#255#30'W'#0#255' V'#0#255'!U'#0#255'!T'#0#255'!S'#0
+  +#255'"R'#0#255'$R'#0#255'$Q'#0#255'$O'#0#255'&N'#0#255'&N'#0#255'''M'#0#255
+  +'(K'#0#255')J'#0#255'*I'#0#255'+H'#0#255'+G'#0#255',F'#0#255'-E'#0#255'.D'#0
+  +#255'.B'#0#255'0A'#0#255'2A'#0#255'&1'#0#255#11#13#0#232#0#0#0'c'#3#3#0#154
+  +'+/'#0#255'89'#0#255'78'#0#255'87'#0#255#4#25#0#255#20'b'#0#255#20'c'#0#255
+  +#21'c'#0#255#17'N'#0#255#2#6#0#149#0#0#0'W'#3#11#0#174#11'+'#0#255#22'P'#0
+  +#255#28'_'#0#255#28']'#0#255#28'Z'#0#255#29'Y'#0#255#29'X'#0#255#31'W'#0#255
+  +' V'#0#255' U'#0#255' T'#0#255'!S'#0#255'#R'#0#255'#Q'#0#255'#P'#0#255'%P'#0
+  +#255'%O'#0#255'&N'#0#255'''M'#0#255'''L'#0#255'(K'#0#255')H'#0#255'*H'#0#255
+  +'+G'#0#255',F'#0#255'-E'#0#255'.D'#0#255'/C'#0#255'/B'#0#255'1A'#0#255'3A'#0
+  +#255'&0'#0#255#11#14#0#232#0#0#0'V'#0#0#0#0#3#3#0#140'--'#0#255'87'#0#255'96'
+  +#0#255':5'#0#255#5#25#0#255#22'a'#0#255#22'b'#0#255#22'b'#0#255#18'N'#0#255#2
+  +#7#0#146#0#0#0#0#0#0#0#29#0#0#0'y'#8#27#0#224#18'>'#0#255#28'Y'#0#255#31']'#0
+  +#255#31'Y'#0#255#31'V'#0#255#31'V'#0#255' U'#0#255'"S'#0#255'"S'#0#255'#R'#0
+  +#255'#P'#0#255'$O'#0#255'&N'#0#255'&N'#0#255'&M'#0#255'''L'#0#255'(K'#0#255
+  +')J'#0#255'*H'#0#255'*G'#0#255'+F'#0#255',E'#0#255'.D'#0#255'/C'#0#255'/B'#0
+  +#255'0A'#0#255'2@'#0#255'3?'#0#255'''0'#0#255#11#14#0#229#0#0#0'X'#0#0#0#0#0
+  +#0#0#10#3#3#0#144'-,'#0#255':5'#0#255':4'#0#255';3'#0#255#5#24#0#255#22'_'#0
+  +#255#24'`'#0#255#24'`'#0#255#20'M'#0#255#2#7#0#148#0#0#0#14#0#0#0#0#0#0#0#0#0
+  +#0#0'O'#3#9#0#178#14'*'#0#253#25'I'#0#255'!Z'#0#255'!X'#0#255'!T'#0#255'"S'#0
+  +#255'"S'#0#255'#R'#0#255'$P'#0#255'%N'#0#255'%M'#0#255'''L'#0#255'(L'#0#255
+  ,'(K'#0#255')J'#0#255')I'#0#255'+H'#0#255'+G'#0#255',F'#0#255'-E'#0#255'.D'#0
+  +#255'.B'#0#255'/A'#0#255'0@'#0#255'2?'#0#255'4?'#0#255',4'#0#255#12#13#0#235
+  +#0#0#0'Y'#0#0#0#0#0#0#0#0#0#0#0#11#3#3#0#144'.*'#0#255'<3'#0#255'<2'#0#255'='
+  +'1'#0#255#5#24#0#255#23']'#0#255#24'_'#0#255#26'_'#0#255#22'L'#0#255#2#7#0
+  +#148#0#0#0#13#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#27#0#0#0'{'#8#21#0#215#20'4'#0
+  +#255' Q'#0#255'$W'#0#255'$R'#0#255'$Q'#0#255'%O'#0#255'&M'#0#255'&L'#0#255
+  +'''L'#0#255'*M'#0#255',O'#0#255'.O'#0#255'-L'#0#255',I'#0#255',F'#0#255'-E'#0
+  +#255'-D'#0#255'.C'#0#255'/B'#0#255'0@'#0#255'1?'#0#255'2>'#0#255'5>'#0#255'1'
+  +'8'#0#255#19#21#0#243#0#0#0'o'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#3#3#0#144'/'
+  +''''#0#255'>1'#0#255'>0'#0#255'?/'#0#255#6#23#0#255#25'\'#0#255#25']'#0#255
+  +#26']'#0#255#22'K'#0#255#2#7#0#148#0#0#0#13#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0'D'#0#1#0#163#15'$'#0#246#27'@'#0#255'%Q'#0#255'''R'#0#255'''M'#0
+  +#255'''L'#0#255')M'#0#255'*O'#0#255'&B'#0#255#28'/'#0#255#25'+'#0#251#30'1'#0
+  +#255'*@'#0#255'0G'#0#255'/C'#0#255'/B'#0#255'0A'#0#255'1@'#0#255'2>'#0#255'3'
+  +'='#0#255'5='#0#255'4:'#0#255#28#30#0#249#0#0#0#144#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#11#3#3#0#144'1&'#0#255'?/'#0#255'?.'#0#255'@,'#0#255#6#23#0#255
+  +#26'Z'#0#255#27'\'#0#255#27'\'#0#255#23'I'#0#255#2#6#0#148#0#0#0#13#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#4#0#0#0'u'#6#12#0#202#22'.'#0
+  +#255'"E'#0#255')N'#0#255',O'#0#255'(F'#0#255#30'3'#0#255#16#26#0#219#0#0#0
+  +#150#0#0#0'}'#2#3#0#166#19#28#0#239')9'#0#255'4E'#0#255'1@'#0#255'2?'#0#255
+  +'3>'#0#255'4<'#0#255'5<'#0#255'7;'#0#255'''('#0#255#2#3#0#193#0#0#0#22#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#4#3#0#144'3$'#0#255'A-'#0#255'A,'#0#255
+  +'B*'#0#255#6#23#0#255#26'Y'#0#255#29'Z'#0#255#29'Z'#0#255#24'H'#0#255#2#6#0
+  +#148#0#0#0#13#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0'*'#0#0#0#150#12#23#0#222#28'2'#0#255#31'5'#0#255#19' '#0#239#2#2#0#176
+  +#0#0#0'H'#0#0#0#0#0#0#0#0#0#0#0#3#0#0#0#132#18#23#0#241'2>'#0#255'4@'#0#255
+  +'3='#0#255'4;'#0#255'6:'#0#255'8:'#0#255'-/'#0#255#13#13#0#226#0#0#0'I'#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#4#2#0#144'3#'#0#255'C+'#0#255'C*'
+  +#0#255'D('#0#255#7#22#0#255#28'W'#0#255#29'X'#0#255#30'X'#0#255#25'F'#0#255#2
+  +#6#0#148#0#0#0#13#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0'N'#3#7#0#164#3#5#0#169#0#0#0'o'#0#0#0#11#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#15#2#3#0#153#28'!'#0#255'7@'#0#255'5;'#0#255'69'
+  +#0#255'9:'#0#255'54'#0#255#21#21#0#247#0#0#0'v'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#11#4#2#0#144'5!'#0#255'D)'#0#255'E'''#0#255'F&'#0
+  +#255#7#22#0#255#29'U'#0#255#31'V'#0#255' V'#0#255#26'E'#0#255#2#6#0#148#0#0#0
+  +#13#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0'('#9#10#0#209'.1'#0#255';<'#0#255'98'#0#255':7'#0#255'" '#0
+  +#252#0#0#0#168#0#0#0#4#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#11#4#2#0#144'6 '#0#255'F&'#0#255'G%'#0#255'H$'#0#255#7#21#0#255#30'T'#0#255
+  +' U'#0#255'!U'#0#255#27'C'#0#255#2#6#0#148#0#0#0#13#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'b'
+  +#19#19#0#243'87'#0#255';7'#0#255'$!'#0#255#4#4#0#192#0#0#0'+'#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#4#2#0#144'7'#30#0#255'I$'#0
+  +#255'H#'#0#255'I!'#0#255#8#21#0#255' S'#0#255'"S'#0#255'"S'#0#255#28'B'#0#255
+  +#2#6#0#148#0#0#0#13#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#20#2#1#0#145#25#22#0#240'#'#31#0#245
+  +#5#4#0#196#0#0#0'?'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#11#4#2#0#144'9'#28#0#255'J"'#0#255'J '#0#255'K'#31#0#255#8#21#0
+  +#255'!R'#0#255'#Q'#0#255'$Q'#0#255#29'@'#0#255#3#6#0#148#0#0#0#13#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#17#0#0#0'w'#0#0#0#134#0#0#0'/'#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#4#2#0#144'<'#26#0#255
+  +'L'#31#0#255'L'#30#0#255'M'#29#0#255#8#20#0#255'"O'#0#255'$O'#0#255'%O'#0#255
+  +#30'?'#0#255#3#5#0#148#0#0#0#13#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#11#4#2#0#144'<'#24#0#255'M'#29#0#255'N'#28#0#255'O'#27#0#255#9
+  +#20#0#255'#M'#0#255'%M'#0#255'&M'#0#255#31'>'#0#255#3#5#0#148#0#0#0#13#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#4#2#0#144'='#23#0#255
+  +'O'#27#0#255'P'#26#0#255'Q'#24#0#255#9#19#0#255'%L'#0#255'''L'#0#255'(L'#0
+  +#255'!='#0#255#3#5#0#148#0#0#0#13#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#11#4#1#0#144'?'#20#0#255'Q'#25#0#255'Q'#23#0#255'R'#23#0#255#9
+  +#19#0#255'&K'#0#255'(J'#0#255')J'#0#255'";'#0#255#3#5#0#148#0#0#0#13#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#4#1#0#144'@'#19#0#255
+  +'R'#22#0#255'R'#22#0#255'T'#20#0#255#10#18#0#255'(I'#0#255'*H'#0#255'+H'#0
+  +#255'#9'#0#255#3#5#0#147#0#0#0#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#9#5#1#0#143'B'#18#0#255'T'#21#0#255'T'#19#0#255'V'#18#0#255#10
+  +#18#0#255'*G'#0#255'+G'#0#255',G'#0#255'%7'#0#255#3#5#0#153#0#0#0#25#0#0#0#13
+  +#0#0#0#13#0#0#0#13#0#0#0#13#0#0#0#13#0#0#0#13#0#0#0#13#0#0#0#13#0#0#0#13#0#0
+  +#0#13#0#0#0#13#0#0#0#13#0#0#0#13#0#0#0#13#0#0#0#13#0#0#0#13#0#0#0#13#0#0#0#13
+  +#0#0#0#13#0#0#0#13#0#0#0#13#0#0#0#13#0#0#0#13#0#0#0#13#0#0#0#13#0#0#0#13#0#0
+  +#0#13#0#0#0#13#0#0#0#13#0#0#0#13#0#0#0#13#0#0#0#13#0#0#0#13#0#0#0#13#0#0#0#13
+  +#0#0#0#23#4#1#0#150'C'#16#0#255'V'#19#0#255'V'#17#0#255'W'#16#0#255#11#17#0
+  +#255'+E'#0#255'-E'#0#255'.E'#0#255'''7'#0#255#6#9#0#211#4#4#0#153#4#4#0#147#4
+  +#4#0#148#4#4#0#148#4#4#0#148#4#4#0#148#4#4#0#148#4#4#0#148#4#4#0#148#4#4#0
+  +#148#4#4#0#148#4#4#0#148#4#3#0#148#4#3#0#148#5#3#0#148#5#3#0#148#5#3#0#148#5
+  +#3#0#148#5#3#0#148#5#3#0#148#5#3#0#148#5#3#0#148#5#3#0#148#5#2#0#148#5#2#0
+  +#148#5#2#0#148#5#2#0#148#5#2#0#148#5#2#0#148#6#2#0#148#6#2#0#148#6#2#0#148#6
+  +#2#0#148#6#2#0#148#6#1#0#148#6#1#0#147#6#1#0#153#11#2#0#209'F'#14#0#255'X'#16
+  +#0#255'X'#15#0#255'Y'#14#0#255#11#17#0#255'-C'#0#255'.C'#0#255'/B'#0#255'/>'
+  +#0#255')4'#0#255')3'#0#255')2'#0#255'*1'#0#255'+0'#0#255',.'#0#255'--'#0#255
+  +'.,'#0#255'.+'#0#255'/*'#0#255'0*'#0#255'1)'#0#255'1('#0#255'2'''#0#255'3&'#0
+  +#255'4%'#0#255'4$'#0#255'4#'#0#255'6"'#0#255'7!'#0#255'7 '#0#255'8'#31#0#255
+  +'9'#30#0#255':'#29#0#255';'#28#0#255'<'#27#0#255'<'#26#0#255'='#25#0#255'>'
+  +#24#0#255'?'#23#0#255'@'#22#0#255'A'#20#0#255'A'#19#0#255'B'#18#0#255'C'#17#0
+  +#255'D'#16#0#255'E'#15#0#255'E'#14#0#255'G'#13#0#255'T'#14#0#255'Y'#14#0#255
+  +'Z'#13#0#255'['#11#0#255#11#16#0#255'.A'#0#255'0A'#0#255'1@'#0#255'2?'#0#255
+  +'4>'#0#255'5<'#0#255'6;'#0#255'7:'#0#255'89'#0#255'88'#0#255'97'#0#255':5'#0
+  +#255';4'#0#255'<3'#0#255'=2'#0#255'>0'#0#255'?/'#0#255'@.'#0#255'A.'#0#255'B'
+  +','#0#255'C*'#0#255'D)'#0#255'E)'#0#255'E'''#0#255'G%'#0#255'I%'#0#255'I#'#0
+  +#255'J!'#0#255'K!'#0#255'L'#31#0#255'M'#30#0#255'N'#29#0#255'O'#27#0#255'P'
+  +#26#0#255'Q'#25#0#255'R'#23#0#255'S'#22#0#255'T'#21#0#255'U'#20#0#255'V'#19#0
+  +#255'X'#17#0#255'X'#16#0#255'Z'#14#0#255'Z'#13#0#255'['#12#0#255'\'#10#0#255
+  +']'#9#0#255#12#16#0#255'0?'#0#255'2?'#0#255'3>'#0#255'4='#0#255'5;'#0#255'6:'
+  +#0#255'69'#0#255'78'#0#255'87'#0#255'95'#0#255':4'#0#255';3'#0#255'<2'#0#255
+  +'=1'#0#255'>0'#0#255'?/'#0#255'@-'#0#255'A,'#0#255'B,'#0#255'C*'#0#255'D('#0
+  +#255'E('#0#255'F&'#0#255'G$'#0#255'G$'#0#255'H"'#0#255'I '#0#255'J '#0#255'K'
+  +#30#0#255'L'#28#0#255'N'#28#0#255'O'#26#0#255'P'#25#0#255'Q'#24#0#255'R'#23#0
+  +#255'S'#21#0#255'T'#20#0#255'U'#19#0#255'V'#18#0#255'W'#16#0#255'X'#15#0#255
+  +'Z'#13#0#255'['#12#0#255'\'#11#0#255']'#9#0#255'^'#8#0#255'_'#6#0#255#12#15#0
+  +#255'0<'#0#255'2<'#0#255'3;'#0#255'4:'#0#255'58'#0#255'67'#0#255'76'#0#255'8'
+  +'5'#0#255'94'#0#255':3'#0#255';2'#0#255'<0'#0#255'=/'#0#255'>.'#0#255'?-'#0
+  +#255'@+'#0#255'A*'#0#255'B*'#0#255'C('#0#255'D&'#0#255'E&'#0#255'F$'#0#255'G'
+  +'"'#0#255'H"'#0#255'H '#0#255'I'#30#0#255'J'#30#0#255'K'#28#0#255'L'#26#0#255
+  +'N'#26#0#255'O'#24#0#255'P'#23#0#255'Q'#23#0#255'R'#22#0#255'S'#20#0#255'T'
+  +#19#0#255'T'#18#0#255'U'#16#0#255'V'#15#0#255'W'#14#0#255'X'#12#0#255'Y'#11#0
+  +#255'Z'#9#0#255'\'#8#0#255']'#7#0#255'^'#5#0#255'_'#4#0#255#3#3#0#255#13#15#0
+  +#255#13#15#0#255#13#14#0#255#13#14#0#255#13#14#0#255#14#13#0#255#14#13#0#255
+  +#14#13#0#255#14#13#0#255#15#12#0#255#15#12#0#255#15#12#0#255#15#11#0#255#16
+  +#11#0#255#16#11#0#255#16#10#0#255#16#10#0#255#17#10#0#255#17#9#0#255#17#9#0
+  +#255#17#9#0#255#18#8#0#255#18#8#0#255#18#8#0#255#18#8#0#255#18#7#0#255#19#7#0
+  ,#255#19#7#0#255#19#6#0#255#20#6#0#255#20#6#0#255#20#5#0#255#20#5#0#255#21#5#0
+  +#255#21#4#0#255#21#4#0#255#21#4#0#255#22#3#0#255#22#3#0#255#22#3#0#255#23#2#0
+  +#255#23#2#0#255#23#2#0#255#23#1#0#255#24#1#0#255#24#1#0#255#24#0#0#255#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0' '#0#0#2#0#0#0#0'@'#0#0#1#128#0#0#0#192#0#0#1#192#0#0#1#192#0#0#1
+  +#240#0#0#3#192#0#0#1#248#0#0#3#192#0#0#1#254#1#128#7#192#0#0#1#255#131#192#15
+  +#192#0#0#1#255#255#224#15#192#0#0#1#255#255#240#31#192#0#0#1#255#255#240'?'
+  +#192#0#0#1#255#255#248''#192#0#0#1#255#255#255#255#192#0#0#1#255#255#255#255
+  +#192#0#0#1#255#255#255#255#192#0#0#1#255#255#255#255#192#0#0#1#255#255#255
+  +#255#192#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'('#0#0#0' '#0#0#0'@'#0#0#0#1
+  +#0' '#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'F'#0#255#0']'#0#255
+  +#0']'#0#255#0']'#0#255#1'\'#0#255#1'\'#0#255#2'['#0#255#2'['#0#255#2'['#0#255
+  +#3'Z'#0#255#3'Y'#0#255#4'Y'#0#255#4'X'#0#255#5'W'#0#255#5'W'#0#255#6'V'#0#255
+  +#7'U'#0#255#7'U'#0#255#8'T'#0#255#8'S'#0#255#9'R'#0#255#10'Q'#0#255#10'P'#0
+  +#255#11'O'#0#255#12'O'#0#255#13'N'#0#255#13'M'#0#255#14'L'#0#255#15'K'#0#255
+  +#16'J'#0#255#16'I'#0#255#13'6'#0#255#0']'#0#255#1'|'#0#255#1'|'#0#255#1'{'#0
+  +#255#2'z'#0#255#2'z'#0#255#3'y'#0#255#4'y'#0#255#4'x'#0#255#5'w'#0#255#6'v'#0
+  +#255#6'u'#0#255#7't'#0#255#8's'#0#255#9'r'#0#255#9'q'#0#255#10'p'#0#255#11'o'
+  +#0#255#12'n'#0#255#13'm'#0#255#14'l'#0#255#14'k'#0#255#15'j'#0#255#16'h'#0
+  +#255#17'g'#0#255#18'f'#0#255#19'e'#0#255#20'c'#0#255#21'b'#0#255#23'a'#0#255
+  +#24'`'#0#255#18'G'#0#255#1']'#0#255#1'{'#0#255#2'{'#0#255#2'z'#0#255#3'y'#0
+  +#255#4'y'#0#255#4'x'#0#255#5'w'#0#255#5'v'#0#255#6'u'#0#255#7't'#0#255#8't'#0
+  +#255#8's'#0#255#9'r'#0#255#10'q'#0#255#11'o'#0#255#12'n'#0#255#12'm'#0#255#13
+  +'l'#0#255#14'k'#0#255#15'j'#0#255#16'i'#0#255#17'h'#0#255#18'f'#0#255#19'e'#0
+  +#255#20'd'#0#255#21'b'#0#255#22'a'#0#255#23'`'#0#255#24'^'#0#255#25']'#0#255
+  +#20'E'#0#255#1'\'#0#255#2'z'#0#255#3'z'#0#255#3'y'#0#255#4'x'#0#255#5'w'#0
+  +#255#5'v'#0#255#6'v'#0#255#7'u'#0#255#7't'#0#255#8's'#0#255#9'r'#0#255#10'q'
+  +#0#255#11'p'#0#255#11'o'#0#255#12'n'#0#255#13'm'#0#255#14'k'#0#255#15'j'#0
+  +#255#16'i'#0#255#17'h'#0#255#18'g'#0#255#19'e'#0#255#20'd'#0#255#21'c'#0#255
+  +#22'b'#0#255#23'`'#0#255#24'_'#0#255#25']'#0#255#26'\'#0#255#27'['#0#255#21
+  +'C'#0#255#2'['#0#255#3'y'#0#255#4'x'#0#255#4'w'#0#255#5'w'#0#255#6'v'#0#255#6
+  +'u'#0#255#7't'#0#255#8's'#0#255#9'r'#0#255#9'q'#0#255#10'p'#0#255#11'o'#0#255
+  +#12'n'#0#255#13'm'#0#255#14'l'#0#255#15'k'#0#255#16'i'#0#255#17'h'#0#255#18
+  +'g'#0#255#19'f'#0#255#20'e'#0#255#21'c'#0#255#22'b'#0#255#23'a'#0#255#24'_'#0
+  +#255#25'^'#0#255#26'\'#0#255#27'['#0#255#28'Z'#0#255#29'X'#0#255#23'A'#0#255
+  +#3'Z'#0#255#4'x'#0#255#5'w'#0#255#6'v'#0#255#6'u'#0#255#7't'#0#255#8's'#0#255
+  +#8'r'#0#255#9'r'#0#255#10'p'#0#255#11'o'#0#255#12'n'#0#255#13'm'#0#255#13'l'
+  +#0#255#14'k'#0#255#15'j'#0#255#16'h'#0#255#17'g'#0#255#18'f'#0#255#19'e'#0
+  +#255#20'd'#0#255#21'b'#0#255#22'a'#0#255#24'`'#0#255#25'^'#0#255#26']'#0#255
+  +#27'['#0#255#28'Z'#0#255#29'Y'#0#255#30'W'#0#255#31'V'#0#255#24'?'#0#255#3'Y'
+  +#0#255#5'v'#0#255#6'u'#0#255#7't'#0#255#8't'#0#255#8's'#0#255#9'r'#0#255#10
+  +'q'#0#255#11'o'#0#255#12'n'#0#255#12'n'#0#255#13'l'#0#255#14'k'#0#255#15'j'#0
+  +#255#16'i'#0#255#17'h'#0#255#18'f'#0#255#19'e'#0#255#20'd'#0#255#21'b'#0#255
+  +#22'a'#0#255#23'`'#0#255#24'_'#0#255#25']'#0#255#26'\'#0#255#28'['#0#255#29
+  +'Y'#0#255#30'X'#0#255#31'V'#0#255' U'#0#255'"S'#0#255#26'='#0#255#4'X'#0#255
+  +#7'u'#0#255#7't'#0#255#8's'#0#255#9'r'#0#255#10'q'#0#255#11'p'#0#255#11'o'#0
+  +#255#12'n'#0#255#13'm'#0#255#14'k'#0#255#15'j'#0#255#16'i'#0#255#17'h'#0#255
+  +#18'g'#0#255#19'f'#0#255#20'd'#0#255#21'c'#0#255#22'b'#0#255#23'`'#0#255#24
+  +'_'#0#255#25']'#0#255#26'\'#0#255#27'['#0#255#28'Z'#0#255#30'X'#0#255#31'W'#0
+  +#255' U'#0#255'!T'#0#255'"R'#0#255'$P'#0#255#27';'#0#255#5'W'#0#255#8's'#0
+  +#255#9'r'#0#255#9'q'#0#255#10'p'#0#255#11'o'#0#255#12'n'#0#255#13'm'#0#255#14
+  +'l'#0#255#15'k'#0#255#16'i'#0#255#17'h'#0#255#18'g'#0#255#19'f'#0#255#20'e'#0
+  +#255#21'c'#0#255#21'b'#0#255#23'a'#0#255#24'_'#0#255#25'^'#0#255#26'\'#0#255
+  +#27'['#0#255#28'Z'#0#255#29'X'#0#255#30'W'#0#255' V'#0#255'!T'#0#255'"S'#0
+  +#255'#Q'#0#255'$O'#0#255'&N'#0#255#29'9'#0#255#6'V'#0#255#9'r'#0#255#10'p'#0
+  +#255#11'o'#0#255#12'n'#0#255#13'm'#0#255#13'l'#0#255#14'k'#0#255#15'j'#0#255
+  +#16'i'#0#255#17'g'#0#255#18'f'#0#255#19'e'#0#255#20'd'#0#255#21'b'#0#255#22
+  +'a'#0#255#24'`'#0#255#25'^'#0#255#25']'#0#255#27'\'#0#255#28'Z'#0#255#29'Y'#0
+  +#255#30'W'#0#255#31'V'#0#255'!T'#0#255'"S'#0#255'#R'#0#255'$P'#0#255'%N'#0
+  ,#255'''M'#0#255'(K'#0#255#31'7'#0#255#7'T'#0#255#11'p'#0#255#11'o'#0#255#12
+  +'n'#0#255#13'l'#0#255#14'k'#0#255#15'j'#0#255#16'i'#0#255#17'h'#0#255#18'g'#0
+  +#255#19'e'#0#255#20'd'#0#255#21'c'#0#255#22'a'#0#255#23'`'#0#255#24'_'#0#255
+  +#25']'#0#255#26'\'#0#255#28'['#0#255#29'Y'#0#255#30'X'#0#255#31'V'#0#255' U'
+  +#0#255'!S'#0#255'#R'#0#255'$P'#0#255'%N'#0#255'&M'#0#255'(L'#0#255')J'#0#255
+  +'*H'#0#255' 5'#0#255#8'S'#0#255#12'n'#0#255#13'm'#0#255#14'l'#0#255#15'j'#0
+  +#255#16'i'#0#255#17'h'#0#255#18'g'#0#255#19'f'#0#255#20'd'#0#255#21'c'#0#255
+  +#22'b'#0#255#23'a'#0#255#24'_'#0#255#25'^'#0#255#26'\'#0#255#27'['#0#255#28
+  +'Z'#0#255#30'X'#0#255#31'W'#0#255' U'#0#255'!T'#0#255'"R'#0#255'#Q'#0#255'%O'
+  +#0#255'&M'#0#255'''L'#0#255')J'#0#255'*I'#0#255'+G'#0#255',F'#0#255'"3'#0#255
+  +#10'R'#0#255#14'l'#0#255#15'k'#0#255#16'j'#0#255#17'h'#0#255#17'g'#0#255#18
+  +'f'#0#255#19'e'#0#255#20'c'#0#255#21'b'#0#255#23'a'#0#255#24'_'#0#255#25'^'#0
+  +#255#26']'#0#255#27'['#0#255#28'Z'#0#255#29'Y'#0#255#30'W'#0#255' V'#0#255'!'
+  +'T'#0#255'"S'#0#255'#Q'#0#255'$O'#0#255'&N'#0#255'''L'#0#255'(K'#0#255'*I'#0
+  +#255'+G'#0#255',F'#0#255'.D'#0#255'/B'#0#255'$1'#0#255#11'P'#0#255#15'j'#0
+  +#255#16'i'#0#255#17'g'#0#255#18'f'#0#255#19'e'#0#255#20'd'#0#255#21'b'#0#255
+  +#22'a'#0#255#23'`'#0#255#24'^'#0#255#25']'#0#255#27'\'#0#255#28'Z'#0#255#29
+  +'Y'#0#255#30'X'#0#255#31'V'#0#255' U'#0#255'"S'#0#255'#R'#0#255'$P'#0#255'%N'
+  +#0#255'''M'#0#255'(K'#0#255')J'#0#255'+H'#0#255',F'#0#255'-E'#0#255'.C'#0#255
+  +'0A'#0#255'1?'#0#255'&/'#0#255#12'N'#0#255#17'h'#0#255#18'g'#0#255#19'e'#0
+  +#255#20'd'#0#255#21'c'#0#255#22'a'#0#255#23'`'#0#255#24'_'#0#255#25']'#0#255
+  +#26'\'#0#255#27'['#0#255#29'Y'#0#255#30'X'#0#255#31'V'#0#255' U'#0#255'!S'#0
+  +#255'"R'#0#255'$P'#0#255'%O'#0#255'&M'#0#255'''L'#0#255')J'#0#255'*H'#0#255
+  +'+G'#0#255'-E'#0#255'.C'#0#255'/B'#0#255'*8'#0#255'2>'#0#255'4='#0#255'(,'#0
+  +#255#13'M'#0#255#19'f'#0#255#20'e'#0#255#14'D'#0#255#20'\'#0#255#23'a'#0#255
+  +#24'_'#0#255#25'^'#0#255#26'\'#0#255#27'['#0#255#28'Z'#0#255#29'X'#0#255#31
+  +'W'#0#255' U'#0#255'!T'#0#255'"R'#0#255'#Q'#0#255'%O'#0#255'&M'#0#255'''L'#0
+  +#255'(K'#0#255'*I'#0#255'+G'#0#255',F'#0#255'.D'#0#255'/B'#0#255'0@'#0#255'!'
+  +'*'#0#239#19#22#0#175'5;'#0#255'6:'#0#255')*'#0#255#15'K'#0#255#20'c'#0#255
+  +#21'b'#0#255#11'1'#0''#6#24#0''#18'G'#0#255#26']'#0#255#27'['#0#255#28'Z'#0
+  +#255#29'Y'#0#255#30'W'#0#255' V'#0#255'!T'#0#255'"S'#0#255'#Q'#0#255'$O'#0
+  +#255'&N'#0#255'''L'#0#255'(K'#0#255'*I'#0#255'+G'#0#255',F'#0#255'-D'#0#255
+  +'/C'#0#255'0A'#0#255'1?'#0#255#23#29#0#207#0#0#0#31#27#28#0'78'#0#255'87'#0
+  +#255'+('#0#255#16'J'#0#255#22'a'#0#255#23'`'#0#255#12'/'#0''#0#0#0#0#0#0#0
+  +'/'#15'1'#0#207#27'S'#0#255#30'X'#0#255#31'V'#0#255' U'#0#255'"S'#0#255'#R'#0
+  +#255'$P'#0#255'%N'#0#255'&M'#0#255'(K'#0#255')J'#0#255'*H'#0#255',F'#0#255'-'
+  +'E'#0#255'.C'#0#255'0A'#0#255'1@'#0#255'2>'#0#255#27'!'#0#207#0#0#0#15#0#0#0
+  +#0#28#27#0'95'#0#255';3'#0#255'-%'#0#255#17'H'#0#255#24'_'#0#255#25']'#0#255
+  +#13'.'#0''#0#0#0#0#0#0#0#0#0#0#0#0#7#21#0''#24'@'#0#255'!T'#0#255'"R'#0#255
+  +'$P'#0#255'%O'#0#255'&M'#0#255'''L'#0#255')J'#0#255'*H'#0#255'+G'#0#255'-E'#0
+  +#255'.C'#0#255'/B'#0#255'1@'#0#255'2>'#0#255'4='#0#255'#('#0#239#0#0#0'/'#0#0
+  +#0#0#0#0#0#0#29#25#0'<2'#0#255'=0'#0#255'/#'#0#255#19'F'#0#255#26'\'#0#255
+  +#27'['#0#255#14'-'#0''#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'/'#19','#0#207
+  +'"J'#0#255'&N'#0#255'''L'#0#255'(K'#0#255'$@'#0#255#24')'#0#223#28'-'#0#223
+  +'+@'#0#255'/B'#0#255'0A'#0#255'2?'#0#255'3='#0#255'5;'#0#255',/'#0#255#11#11
+  +#0'O'#0#0#0#0#0#0#0#0#0#0#0#0#31#24#0'>/'#0#255'@-'#0#255'1 '#0#255#20'D'#0
+  +#255#28'Z'#0#255#29'Y'#0#255#15','#0''#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#5#11#0'o'#26'2'#0#239')I'#0#255#25'+'#0#239#7#12#0'_'#0#0#0#0#0#0
+  +#0#0#14#19#0#159'.;'#0#255'3>'#0#255'4<'#0#255'6:'#0#255'78'#0#255#18#18#0
+  +#143#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0' '#22#0'A,'#0#255'B*'#0#255'3'#30#0#255
+  +#22'C'#0#255#30'X'#0#255#31'V'#0#255#16'+'#0''#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#15#0#0#0'?'#0#0#0#15#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#26#30#0#223'5;'#0#255'79'#0#255'87'#0#255#30#29#0#207#0#0#0#15#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0'!'#21#0'D('#0#255'E&'#0#255'5'#28#0#255#23'A'#0
+  +#255' U'#0#255'!T'#0#255#17')'#0''#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +'?--'#0#255'96'#0#255'&#'#0#239#0#0#0'/'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0'"'#19#0'G%'#0#255'H#'#0#255'7'#25#0#255#25'?'#0#255'"S'#0#255'#Q'#0#255
+  +#18'('#0''#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#9#8#0'_"'#30#0#191#0#0
+  +#0'/'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'$'#17#0'I"'#0#255'K '
+  +#0#255'9'#22#0#255#26'='#0#255'$P'#0#255'%N'#0#255#19'&'#0''#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0'%'#16#0'L'#30#0#255'M'#28#0#255';'#20#0#255#28';'#0
+  +#255'&M'#0#255'''L'#0#255#20'%'#0''#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +''''#14#0'O'#27#0#255'P'#25#0#255'='#17#0#255#29'9'#0#255')J'#0#255'*I'#0
+  +#255#21'$'#0''#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'('#12#0'Q'#23#0#255
+  +'S'#21#0#255'?'#15#0#255#31'7'#0#255'+G'#0#255',F'#0#255#22'"'#0''#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0')'#10#0'T'#20#0#255'V'#18#0#255'A'#12#0#255
+  +'!5'#0#255'-E'#0#255'.C'#0#255#28'&'#0#191#25#31#0''#26#30#0''#26#29#0''
+  +#27#28#0''#27#28#0''#28#27#0''#29#26#0''#30#25#0''#30#24#0''#31#23#0''
+  +' '#22#0'!'#21#0'!'#20#0'"'#19#0'#'#18#0'$'#17#0'%'#16#0'%'#15#0'&'
+  +#14#0''''#13#0'('#12#0')'#11#0')'#10#0'*'#9#0'2'#10#0#191'W'#16#0#255
+  +'Y'#14#0#255'D'#9#0#255'#2'#0#255'/B'#0#255'1@'#0#255'2>'#0#255'4='#0#255'5;'
+  +#0#255'69'#0#255'87'#0#255'96'#0#255':4'#0#255'<2'#0#255'=0'#0#255'?.'#0#255
+  +'@,'#0#255'B+'#0#255'C)'#0#255'E'''#0#255'G%'#0#255'H#'#0#255'J!'#0#255'K'#31
+  +#0#255'M'#29#0#255'N'#27#0#255'P'#25#0#255'R'#23#0#255'S'#21#0#255'U'#19#0
+  +#255'W'#17#0#255'X'#15#0#255'Z'#13#0#255'['#11#0#255'F'#7#0#255'$0'#0#255'2?'
+  +#0#255'3='#0#255'5;'#0#255'6:'#0#255'78'#0#255'96'#0#255':4'#0#255'<2'#0#255
+  +'=1'#0#255'?/'#0#255'@-'#0#255'A+'#0#255'C)'#0#255'E'''#0#255'F%'#0#255'H#'#0
+  +#255'I!'#0#255'K'#31#0#255'L'#29#0#255'N'#28#0#255'P'#26#0#255'Q'#24#0#255'S'
+  +#22#0#255'T'#20#0#255'V'#18#0#255'X'#15#0#255'Z'#13#0#255'['#11#0#255']'#9#0
+  +#255'^'#7#0#255'H'#4#0#255#28'#'#0#255'''-'#0#255'(,'#0#255')*'#0#255'*)'#0
+  +#255'+('#0#255',&'#0#255'-%'#0#255'.$'#0#255'/"'#0#255'0!'#0#255'2 '#0#255'3'
+  +#30#0#255'4'#29#0#255'5'#27#0#255'6'#26#0#255'7'#24#0#255'9'#23#0#255':'#21#0
+  +#255';'#20#0#255'<'#18#0#255'='#17#0#255'>'#15#0#255'@'#14#0#255'A'#12#0#255
+  +'B'#11#0#255'D'#9#0#255'E'#8#0#255'F'#6#0#255'G'#5#0#255'I'#3#0#255'7'#1#0
+  +#255#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#8#0#0#16#14
+  +#0#0'0'#15#0#0'p'#15#193#128#240#15#227#192#240#15#255#193#240#15#255#227#240
+  +#15#255#255#240#15#255#255#240#15#255#255#240#15#255#255#240#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0'('#0#0#0#16#0#0#0' '#0#0#0#1#0' '#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0'}'#0#255#1'|'#0#255#2'z'#0#255#3'y'#0#255#4'x'#0
+  +#255#6'v'#0#255#7't'#0#255#8'r'#0#255#10'p'#0#255#12'n'#0#255#13'l'#0#255#15
+  +'j'#0#255#17'g'#0#255#19'e'#0#255#21'b'#0#255#23'`'#0#255#2'{'#0#255#3'z'#0
+  +#255#4'x'#0#255#5'v'#0#255#7'u'#0#255#8's'#0#255#10'q'#0#255#11'o'#0#255#13
+  +'m'#0#255#15'j'#0#255#17'h'#0#255#19'f'#0#255#21'c'#0#255#23'a'#0#255#25'^'#0
+  +#255#27'['#0#255#4'x'#0#255#5'w'#0#255#6'u'#0#255#8's'#0#255#9'r'#0#255#11'o'
+  +#0#255#13'm'#0#255#14'k'#0#255#16'i'#0#255#18'f'#0#255#20'd'#0#255#22'a'#0
+  +#255#24'^'#0#255#27'\'#0#255#29'Y'#0#255#31'V'#0#255#6'v'#0#255#7't'#0#255#9
+  +'r'#0#255#10'p'#0#255#12'n'#0#255#14'l'#0#255#16'i'#0#255#18'g'#0#255#20'e'#0
+  +#255#22'b'#0#255#24'_'#0#255#26']'#0#255#28'Z'#0#255#31'W'#0#255'!T'#0#255'#'
+  +'Q'#0#255#8's'#0#255#10'p'#0#255#12'n'#0#255#13'l'#0#255#15'j'#0#255#17'h'#0
+  +#255#19'e'#0#255#21'c'#0#255#23'`'#0#255#25']'#0#255#28'['#0#255#30'X'#0#255
+  +' U'#0#255'#R'#0#255'%O'#0#255'(L'#0#255#11'o'#0#255#13'm'#0#255#15'j'#0#255
+  +#17'h'#0#255#19'f'#0#255#21'c'#0#255#23'a'#0#255#25'^'#0#255#27'['#0#255#29
+  +'Y'#0#255' V'#0#255'"S'#0#255'$O'#0#255'''L'#0#255'*I'#0#255',F'#0#255#14'k'
+  +#0#255#16'i'#0#255#18'f'#0#255#20'd'#0#255#22'a'#0#255#24'_'#0#255#26'\'#0
+  +#255#29'Y'#0#255#31'V'#0#255'!S'#0#255'$P'#0#255'&M'#0#255')J'#0#255'+G'#0
+  +#255'.C'#0#255'1@'#0#255#18'g'#0#255#20'e'#0#255#21'b'#0#255#24'_'#0#255#26
+  +']'#0#255#28'Z'#0#255#30'W'#0#255'!T'#0#255'#Q'#0#255'&N'#0#255'(K'#0#255'+H'
+  +#0#255'-D'#0#255'0A'#0#255'3>'#0#239'6:'#0#255#21'c'#0#255#23'`'#0#207#25'^'
+  +#0#143#27'['#0#255#30'X'#0#255' U'#0#255'"R'#0#255'%O'#0#255'''L'#0#255'*I'#0
+  +#255'-E'#0#255'/B'#0#255'2?'#0#255'3='#0'_87'#0#191':4'#0#255#25'^'#0#255#27
+  +'\'#0#191#0#0#0#0#31'W'#0'?"S'#0#223'$P'#0#255'''M'#0#255')I'#0#255',F'#0#255
+  +'.C'#0#255'1?'#0#255'4<'#0#255'6:'#0''#0#0#0#0'=1'#0#191'?.'#0#255#29'Y'#0
+  +#255#31'W'#0#191#0#0#0#0#0#0#0#0#0#0#0#0'(K'#0'*H'#0#175'+G'#0#31'0A'#0'?3='
+  +#0#255'6:'#0#255'87'#0#191#0#0#0#0#0#0#0#0'B+'#0#191'E'''#0#255'!T'#0#255'#R'
+  +#0#191#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'87'#0#143';4'
+  +#0#239';3'#0#31#0#0#0#0#0#0#0#0'G$'#0#191'J!'#0#255'%O'#0#255'''L'#0#191#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0'L'#30#0#191'O'#26#0#255')J'#0#255'+G'#0#191#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0'R'#23#0#191'U'#19#0#255'.D'#0#255'0A'#0#239'4='#0#191'69'#0#191'96'#0
+  +#191'<2'#0#191'?.'#0#191'B+'#0#191'E'''#0#191'H#'#0#191'K'#31#0#191'N'#27#0
+  +#191'R'#23#0#191'U'#19#0#191'W'#16#0#239'Z'#12#0#255'2>'#0#255'5;'#0#255'87'
+  +#0#255';4'#0#255'=0'#0#255'@,'#0#255'C)'#0#255'G%'#0#255'J!'#0#255'M'#29#0
+  +#255'P'#25#0#255'S'#21#0#255'V'#17#0#255'Z'#13#0#255']'#9#0#255'`'#5#0#255#0
+  +#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0#255#0#0#0
+  +#255#0#0#0#255' '#4#0#255'8'#12#0#255'?'#140#0#255'?'#252#0#255'?'#252#0#255
+  +#0#0#0#255#0#0#0#255
+]);
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/EverwoodIDEResources.res b/internal/5.0.35.741/1/Everwood/Source/Delphi/EverwoodIDEResources.res
new file mode 100644
index 0000000..12dee92
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Source/Delphi/EverwoodIDEResources.res differ
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D10.bdsproj b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D10.bdsproj
new file mode 100644
index 0000000..786d0f4
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D10.bdsproj
@@ -0,0 +1,180 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality" Type="String">Delphi.Personality</Option>
+			<Option Name="ProjectType" Type="String"></Option>
+			<Option Name="Version" Type="String">1.0</Option>
+			<Option Name="GUID" Type="String">{C239782A-EA39-4CF9-91C2-955D92AF0504}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource" Type="String">RemObjects_Everwood_D10.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version" Type="String">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A" Type="Integer">8</Compiler>
+			<Compiler Name="B" Type="Integer">0</Compiler>
+			<Compiler Name="C" Type="Integer">1</Compiler>
+			<Compiler Name="D" Type="Integer">1</Compiler>
+			<Compiler Name="E" Type="Integer">0</Compiler>
+			<Compiler Name="F" Type="Integer">0</Compiler>
+			<Compiler Name="G" Type="Integer">1</Compiler>
+			<Compiler Name="H" Type="Integer">1</Compiler>
+			<Compiler Name="I" Type="Integer">1</Compiler>
+			<Compiler Name="J" Type="Integer">0</Compiler>
+			<Compiler Name="K" Type="Integer">0</Compiler>
+			<Compiler Name="L" Type="Integer">1</Compiler>
+			<Compiler Name="M" Type="Integer">0</Compiler>
+			<Compiler Name="N" Type="Integer">1</Compiler>
+			<Compiler Name="O" Type="Integer">1</Compiler>
+			<Compiler Name="P" Type="Integer">1</Compiler>
+			<Compiler Name="Q" Type="Integer">0</Compiler>
+			<Compiler Name="R" Type="Integer">0</Compiler>
+			<Compiler Name="S" Type="Integer">0</Compiler>
+			<Compiler Name="T" Type="Integer">0</Compiler>
+			<Compiler Name="U" Type="Integer">0</Compiler>
+			<Compiler Name="V" Type="Integer">1</Compiler>
+			<Compiler Name="W" Type="Integer">1</Compiler>
+			<Compiler Name="X" Type="Integer">1</Compiler>
+			<Compiler Name="Y" Type="Integer">1</Compiler>
+			<Compiler Name="Z" Type="Integer">1</Compiler>
+			<Compiler Name="ShowHints" Type="Boolean">True</Compiler>
+			<Compiler Name="ShowWarnings" Type="Boolean">True</Compiler>
+			<Compiler Name="UnitAliases" Type="String">WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;</Compiler>
+			<Compiler Name="NamespacePrefix" Type="String"></Compiler>
+			<Compiler Name="GenerateDocumentation" Type="Boolean">False</Compiler>
+			<Compiler Name="DefaultNamespace" Type="String"></Compiler>
+			<Compiler Name="SymbolDeprecated" Type="Boolean">False</Compiler>
+			<Compiler Name="SymbolLibrary" Type="Boolean">False</Compiler>
+			<Compiler Name="SymbolPlatform" Type="Boolean">False</Compiler>
+			<Compiler Name="SymbolExperimental" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitLibrary" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitPlatform" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitDeprecated" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitExperimental" Type="Boolean">False</Compiler>
+			<Compiler Name="HResultCompat" Type="Boolean">True</Compiler>
+			<Compiler Name="HidingMember" Type="Boolean">True</Compiler>
+			<Compiler Name="HiddenVirtual" Type="Boolean">True</Compiler>
+			<Compiler Name="Garbage" Type="Boolean">True</Compiler>
+			<Compiler Name="BoundsError" Type="Boolean">True</Compiler>
+			<Compiler Name="ZeroNilCompat" Type="Boolean">True</Compiler>
+			<Compiler Name="StringConstTruncated" Type="Boolean">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar" Type="Boolean">True</Compiler>
+			<Compiler Name="TypedConstVarPar" Type="Boolean">True</Compiler>
+			<Compiler Name="AsgToTypedConst" Type="Boolean">True</Compiler>
+			<Compiler Name="CaseLabelRange" Type="Boolean">True</Compiler>
+			<Compiler Name="ForVariable" Type="Boolean">True</Compiler>
+			<Compiler Name="ConstructingAbstract" Type="Boolean">True</Compiler>
+			<Compiler Name="ComparisonFalse" Type="Boolean">True</Compiler>
+			<Compiler Name="ComparisonTrue" Type="Boolean">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned" Type="Boolean">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned" Type="Boolean">True</Compiler>
+			<Compiler Name="UnsupportedConstruct" Type="Boolean">True</Compiler>
+			<Compiler Name="FileOpen" Type="Boolean">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc" Type="Boolean">True</Compiler>
+			<Compiler Name="BadGlobalSymbol" Type="Boolean">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor" Type="Boolean">True</Compiler>
+			<Compiler Name="InvalidDirective" Type="Boolean">True</Compiler>
+			<Compiler Name="PackageNoLink" Type="Boolean">True</Compiler>
+			<Compiler Name="PackageThreadVar" Type="Boolean">True</Compiler>
+			<Compiler Name="ImplicitImport" Type="Boolean">True</Compiler>
+			<Compiler Name="HPPEMITIgnored" Type="Boolean">True</Compiler>
+			<Compiler Name="NoRetVal" Type="Boolean">True</Compiler>
+			<Compiler Name="UseBeforeDef" Type="Boolean">True</Compiler>
+			<Compiler Name="ForLoopVarUndef" Type="Boolean">True</Compiler>
+			<Compiler Name="UnitNameMismatch" Type="Boolean">True</Compiler>
+			<Compiler Name="NoCFGFileFound" Type="Boolean">True</Compiler>
+			<Compiler Name="MessageDirective" Type="Boolean">True</Compiler>
+			<Compiler Name="ImplicitVariants" Type="Boolean">True</Compiler>
+			<Compiler Name="UnicodeToLocale" Type="Boolean">True</Compiler>
+			<Compiler Name="LocaleToUnicode" Type="Boolean">True</Compiler>
+			<Compiler Name="ImagebaseMultiple" Type="Boolean">True</Compiler>
+			<Compiler Name="SuspiciousTypecast" Type="Boolean">True</Compiler>
+			<Compiler Name="PrivatePropAccessor" Type="Boolean">True</Compiler>
+			<Compiler Name="UnsafeType" Type="Boolean">False</Compiler>
+			<Compiler Name="UnsafeCode" Type="Boolean">False</Compiler>
+			<Compiler Name="UnsafeCast" Type="Boolean">False</Compiler>
+			<Compiler Name="OptionTruncated" Type="Boolean">True</Compiler>
+			<Compiler Name="WideCharReduced" Type="Boolean">True</Compiler>
+			<Compiler Name="DuplicatesIgnored" Type="Boolean">True</Compiler>
+			<Compiler Name="UnitInitSeq">True</Compiler>
+			<Compiler Name="LocalPInvoke">True</Compiler>
+			<Compiler Name="CodePage"></Compiler>
+		</Compiler>
+		<Linker>
+			<Linker Name="MapFile" Type="Integer">0</Linker>
+			<Linker Name="OutputObjs" Type="Integer">0</Linker>
+			<Linker Name="ConsoleApp" Type="Integer">1</Linker>
+			<Linker Name="DebugInfo" Type="Boolean">False</Linker>
+			<Linker Name="RemoteSymbols" Type="Boolean">False</Linker>
+			<Linker Name="GenerateDRC" Type="Boolean">False</Linker>
+			<Linker Name="MinStackSize" Type="Integer">16384</Linker>
+			<Linker Name="MaxStackSize" Type="Integer">1048576</Linker>
+			<Linker Name="ImageBase" Type="Integer">4194304</Linker>
+			<Linker Name="ExeDescription" Type="String">RemObjects Everwood for Delphi</Linker>
+			<Linker Name="GenerateHpps">False</Linker>
+		</Linker>
+		<Directories>
+			<Directories Name="OutputDir" Type="String"></Directories>
+			<Directories Name="UnitOutputDir" Type="String">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDLLOutputDir" Type="String">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDCPOutputDir" Type="String">..\..\Dcu\D10</Directories>
+			<Directories Name="SearchPath" Type="String">..\;..\..\Dcu\D10</Directories>
+			<Directories Name="Packages" Type="String"></Directories>
+			<Directories Name="Conditionals" Type="String">xDEBUG_EVERWOOD_SHOW_NEW_MODULE_CODE</Directories>
+			<Directories Name="DebugSourceDirs" Type="String"></Directories>
+			<Directories Name="UsePackages" Type="Boolean">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams" Type="String"></Parameters>
+			<Parameters Name="HostApplication" Type="String"></Parameters>
+			<Parameters Name="Launcher" Type="String"></Parameters>
+			<Parameters Name="UseLauncher" Type="Boolean">False</Parameters>
+			<Parameters Name="DebugCWD" Type="String"></Parameters>
+			<Parameters Name="RemoteHost" Type="String"></Parameters>
+			<Parameters Name="RemotePath" Type="String"></Parameters>
+			<Parameters Name="RemoteLauncher" Type="String"></Parameters>
+			<Parameters Name="RemoteCWD" Type="String"></Parameters>
+			<Parameters Name="RemoteDebug" Type="Boolean">False</Parameters>
+			<Parameters Name="Debug Symbols Search Path"></Parameters>
+			<Parameters Name="LoadAllSymbols">True</Parameters>
+			<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+		</Parameters>
+		<Language>
+			<Language Name="ActiveLang" Type="String"></Language>
+			<Language Name="ProjectLang" Type="String">$00000000</Language>
+			<Language Name="RootDir" Type="String"></Language>
+		</Language>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo" Type="Boolean">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="MajorVer" Type="Integer">1</VersionInfo>
+			<VersionInfo Name="MinorVer" Type="Integer">0</VersionInfo>
+			<VersionInfo Name="Release" Type="Integer">1</VersionInfo>
+			<VersionInfo Name="Build" Type="Integer">56</VersionInfo>
+			<VersionInfo Name="Debug" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="PreRelease" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="Special" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="Private" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="DLL" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="Locale" Type="Integer">1033</VersionInfo>
+			<VersionInfo Name="CodePage" Type="Integer">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion" Type="String">1.0.1.56</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion" Type="String">1.0.0.0</VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName" Type="String"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription" Type="String"></VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName" Type="String"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright" Type="String"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks" Type="String"></VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename" Type="String"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName" Type="String"></VersionInfoKeys>
+		</VersionInfoKeys>
+	</Delphi.Personality>
+	<ModelSupport>True</ModelSupport>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D10.cfg b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D10.cfg
new file mode 100644
index 0000000..9692106
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D10.cfg
@@ -0,0 +1,45 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N0"..\..\Dcu\D10"
+-LE"..\..\Bin"
+-LN"..\..\Bin"
+-U"..\;..\..\Dcu\D10"
+-O"..\;..\..\Dcu\D10"
+-I"..\;..\..\Dcu\D10"
+-R"..\;..\..\Dcu\D10"
+-DxDEBUG_EVERWOOD_SHOW_NEW_MODULE_CODE
+-Z
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D10.dpk b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D10.dpk
new file mode 100644
index 0000000..9465b2d
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D10.dpk
@@ -0,0 +1,53 @@
+package RemObjects_Everwood_D10;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Everwood for Delphi'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+{$DEFINE xDEBUG_EVERWOOD_SHOW_NEW_MODULE_CODE}
+
+requires
+  rtl,
+  vcl,
+  vclie,
+  designide,
+  vclx;
+
+contains
+  uEWOTAWizards in 'uEWOTAWizards.pas',
+  uEWOTAHelpers in 'uEWOTAHelpers.pas',
+  uEWSampleInfo in 'uEWSampleInfo.pas' {SampleInfoForm},
+  uEWOTANewModuleExpert in 'uEWOTANewModuleExpert.pas',
+  RemObjects_Everwood_Reg in 'RemObjects_Everwood_Reg.pas',
+  uEWOTANewProjectExpert in 'uEWOTANewProjectExpert.pas',
+  uEWOTARepositoryExpert in 'uEWOTARepositoryExpert.pas',
+  uEWMenuManager in 'uEWMenuManager.pas',
+  uEWAbout in 'uEWAbout.pas',
+  uEWWizard in 'uEWWizard.pas' {EWWizardForm},
+  uEWTools in 'uEWTools.pas',
+  uEWOTAMessages in 'uEWOTAMessages.pas',
+  uEWStringTools in 'uEWStringTools.pas',
+  uEWHelpers in 'uEWHelpers.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D10.res b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D10.res
new file mode 100644
index 0000000..45e1f26
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D10.res differ
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D11.dpk b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D11.dpk
new file mode 100644
index 0000000..0ac7aae
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D11.dpk
@@ -0,0 +1,53 @@
+package RemObjects_Everwood_D11;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Everwood for Delphi'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+{$DEFINE xDEBUG_EVERWOOD_SHOW_NEW_MODULE_CODE}
+
+requires
+  rtl,
+  vcl,
+  vclie,
+  designide,
+  vclx;
+
+contains
+  uEWOTAWizards in 'uEWOTAWizards.pas',
+  uEWOTAHelpers in 'uEWOTAHelpers.pas',
+  uEWSampleInfo in 'uEWSampleInfo.pas' {SampleInfoForm},
+  uEWOTANewModuleExpert in 'uEWOTANewModuleExpert.pas',
+  RemObjects_Everwood_Reg in 'RemObjects_Everwood_Reg.pas',
+  uEWOTANewProjectExpert in 'uEWOTANewProjectExpert.pas',
+  uEWOTARepositoryExpert in 'uEWOTARepositoryExpert.pas',
+  uEWMenuManager in 'uEWMenuManager.pas',
+  uEWAbout in 'uEWAbout.pas',
+  uEWWizard in 'uEWWizard.pas' {EWWizardForm},
+  uEWTools in 'uEWTools.pas',
+  uEWOTAMessages in 'uEWOTAMessages.pas',
+  uEWStringTools in 'uEWStringTools.pas',
+  uEWHelpers in 'uEWHelpers.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D11.dproj b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D11.dproj
new file mode 100644
index 0000000..29a0ca5
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D11.dproj
@@ -0,0 +1,93 @@
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{b7956419-311f-4137-a85b-371bb0f78d5d}</ProjectGuid>
+    <MainSource>RemObjects_Everwood_D11.dpk</MainSource>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+    <DCC_DependencyCheckOutputName>..\..\Dcu\D11\RemObjects_Everwood_D11.bpl</DCC_DependencyCheckOutputName>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DebugInformation>False</DCC_DebugInformation>
+    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+    <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Bin</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Bin</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\;..\..\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\;..\..\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\;..\..\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\;..\..\Dcu\D11</DCC_IncludePath>
+    <DCC_Define>xDEBUG_EVERWOOD_SHOW_NEW_MODULE_CODE;RELEASE</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_SYMBOL_EXPERIMENTAL>False</DCC_SYMBOL_EXPERIMENTAL>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+    <DCC_UNIT_EXPERIMENTAL>False</DCC_UNIT_EXPERIMENTAL>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Bin</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Bin</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\;..\..\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\;..\..\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\;..\..\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\;..\..\Dcu\D11</DCC_IncludePath>
+    <DCC_Define>xDEBUG_EVERWOOD_SHOW_NEW_MODULE_CODE</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_SYMBOL_EXPERIMENTAL>False</DCC_SYMBOL_EXPERIMENTAL>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+    <DCC_UNIT_EXPERIMENTAL>False</DCC_UNIT_EXPERIMENTAL>
+  </PropertyGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Delphi.Personality</Borland.Personality>
+    <Borland.ProjectType>Package</Borland.ProjectType>
+    <BorlandProject>
+<BorlandProject><Delphi.Personality><Compiler><Compiler Name="UsePackages">False</Compiler><Compiler Name="Packages"></Compiler></Compiler><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">RemObjects Everwood for Delphi</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">True</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">1</VersionInfo><VersionInfo Name="Build">53</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.1.53</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="CompanyName"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">RemObjects_Everwood_D11.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
+  <ItemGroup>
+    <DelphiCompile Include="RemObjects_Everwood_D11.dpk">
+      <MainSource>MainSource</MainSource>
+    </DelphiCompile>
+    <DCCReference Include="..\..\..\..\Stardock\Object Desktop\DeskScapes\designide.dcp" />
+    <DCCReference Include="..\..\..\..\Stardock\Object Desktop\DeskScapes\rtl.dcp" />
+    <DCCReference Include="..\..\..\..\Stardock\Object Desktop\DeskScapes\vcl.dcp" />
+    <DCCReference Include="..\..\..\..\Stardock\Object Desktop\DeskScapes\vclie.dcp" />
+    <DCCReference Include="..\..\..\..\Stardock\Object Desktop\DeskScapes\vclx.dcp" />
+    <DCCReference Include="RemObjects_Everwood_Reg.pas" />
+    <DCCReference Include="uEWAbout.pas" />
+    <DCCReference Include="uEWHelpers.pas" />
+    <DCCReference Include="uEWMenuManager.pas" />
+    <DCCReference Include="uEWOTAHelpers.pas" />
+    <DCCReference Include="uEWOTAMessages.pas" />
+    <DCCReference Include="uEWOTANewModuleExpert.pas" />
+    <DCCReference Include="uEWOTANewProjectExpert.pas" />
+    <DCCReference Include="uEWOTARepositoryExpert.pas" />
+    <DCCReference Include="uEWOTAWizards.pas" />
+    <DCCReference Include="uEWSampleInfo.pas">
+      <Form>SampleInfoForm</Form>
+    </DCCReference>
+    <DCCReference Include="uEWStringTools.pas" />
+    <DCCReference Include="uEWTools.pas" />
+    <DCCReference Include="uEWWizard.pas">
+      <Form>EWWizardForm</Form>
+    </DCCReference>
+    <None Include="ModelSupport_RemObjects_Everwood_D10\default.txaPackage" />
+  </ItemGroup>
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D11.res b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D11.res
new file mode 100644
index 0000000..45e1f26
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D11.res differ
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D12.dpk b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D12.dpk
new file mode 100644
index 0000000..d2e1eb9
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D12.dpk
@@ -0,0 +1,53 @@
+package RemObjects_Everwood_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Everwood for Delphi'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+{$DEFINE xDEBUG_EVERWOOD_SHOW_NEW_MODULE_CODE}
+
+requires
+  rtl,
+  vcl,
+  vclie,
+  designide,
+  vclx;
+
+contains
+  uEWOTAWizards in 'uEWOTAWizards.pas',
+  uEWOTAHelpers in 'uEWOTAHelpers.pas',
+  uEWSampleInfo in 'uEWSampleInfo.pas' {SampleInfoForm},
+  uEWOTANewModuleExpert in 'uEWOTANewModuleExpert.pas',
+  RemObjects_Everwood_Reg in 'RemObjects_Everwood_Reg.pas',
+  uEWOTANewProjectExpert in 'uEWOTANewProjectExpert.pas',
+  uEWOTARepositoryExpert in 'uEWOTARepositoryExpert.pas',
+  uEWMenuManager in 'uEWMenuManager.pas',
+  uEWAbout in 'uEWAbout.pas',
+  uEWWizard in 'uEWWizard.pas' {EWWizardForm},
+  uEWTools in 'uEWTools.pas',
+  uEWOTAMessages in 'uEWOTAMessages.pas',
+  uEWStringTools in 'uEWStringTools.pas',
+  uEWHelpers in 'uEWHelpers.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D12.dproj b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D12.dproj
new file mode 100644
index 0000000..452c01f
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D12.dproj
@@ -0,0 +1,183 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{b7956419-311f-4137-a85b-371bb0f78d5d}</ProjectGuid>
+			<MainSource>RemObjects_Everwood_D12.dpk</MainSource>
+			<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+			<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+			<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D11\RemObjects_Everwood_D11.bpl</DCC_DependencyCheckOutputName>
+			<ProjectVersion>11.1</ProjectVersion>
+			<Config Condition="'$(Config)'==''">Debug</Config>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Release' or '$(Cfg_Release)'!=''">
+			<Cfg_Release>true</Cfg_Release>
+			<CfgParent>Base</CfgParent>
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Debug' or '$(Cfg_Debug)'!=''">
+			<Cfg_Debug>true</Cfg_Debug>
+			<CfgParent>Base</CfgParent>
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base)'!=''">
+			<DCC_SymbolReferenceInfo>1</DCC_SymbolReferenceInfo>
+			<DCC_IMPLICIT_STRING_CAST_LOSS>error</DCC_IMPLICIT_STRING_CAST_LOSS>
+			<DCC_EXPLICIT_STRING_CAST_LOSS>error</DCC_EXPLICIT_STRING_CAST_LOSS>
+			<DCC_IMPLICIT_STRING_CAST>error</DCC_IMPLICIT_STRING_CAST>
+			<DCC_CVT_WIDENING_STRING_LOST>error</DCC_CVT_WIDENING_STRING_LOST>
+			<DCC_CVT_ACHAR_TO_WCHAR>error</DCC_CVT_ACHAR_TO_WCHAR>
+			<DCC_CVT_WCHAR_TO_ACHAR>error</DCC_CVT_WCHAR_TO_ACHAR>
+			<DCC_EXPLICIT_STRING_CAST>error</DCC_EXPLICIT_STRING_CAST>
+			<DCC_BplOutput>..\..\Bin</DCC_BplOutput>
+			<DCC_DcuOutput>..\..\Dcu\D12</DCC_DcuOutput>
+			<DCC_CVT_NARROWING_STRING_LOST>error</DCC_CVT_NARROWING_STRING_LOST>
+			<DCC_DcpOutput>..\..\Bin</DCC_DcpOutput>
+			<GenDll>true</GenDll>
+			<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+			<GenPackage>true</GenPackage>
+			<DCC_GenerateStackFrames>true</DCC_GenerateStackFrames>
+			<DesignOnlyPackage>true</DesignOnlyPackage>
+			<DCC_ImageBase>00400000</DCC_ImageBase>
+			<DCC_DependencyCheckOutputName>..\..\Bin\RemObjects_Everwood_D12.bpl</DCC_DependencyCheckOutputName>
+			<DCC_Description>RemObjects Everwood for Delphi</DCC_Description>
+			<DCC_Define>xDEBUG_EVERWOOD_SHOW_NEW_MODULE_CODE;$(DCC_Define)</DCC_Define>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Cfg_Release)'!=''">
+			<DCC_EXPLICIT_STRING_CAST_LOSS>false</DCC_EXPLICIT_STRING_CAST_LOSS>
+			<DCC_IMPLICIT_STRING_CAST_LOSS>true</DCC_IMPLICIT_STRING_CAST_LOSS>
+			<DCC_IMPLICIT_STRING_CAST>true</DCC_IMPLICIT_STRING_CAST>
+			<DCC_CVT_WCHAR_TO_ACHAR>true</DCC_CVT_WCHAR_TO_ACHAR>
+			<DCC_EXPLICIT_STRING_CAST>false</DCC_EXPLICIT_STRING_CAST>
+			<DCC_CVT_WIDENING_STRING_LOST>true</DCC_CVT_WIDENING_STRING_LOST>
+			<DCC_CVT_ACHAR_TO_WCHAR>true</DCC_CVT_ACHAR_TO_WCHAR>
+			<DCC_CVT_NARROWING_STRING_LOST>true</DCC_CVT_NARROWING_STRING_LOST>
+			<DCC_SYMBOL_EXPERIMENTAL>False</DCC_SYMBOL_EXPERIMENTAL>
+			<DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+			<Version>7.0</Version>
+			<DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+			<DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+			<DCC_UNIT_EXPERIMENTAL>False</DCC_UNIT_EXPERIMENTAL>
+			<DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+			<DCC_DebugInformation>False</DCC_DebugInformation>
+			<DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+			<DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+			<DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+			<DCC_ObjPath>..\;..\..\Dcu\D11;$(DCC_ObjPath)</DCC_ObjPath>
+			<DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+			<DCC_ResourcePath>..\;..\..\Dcu\D11;$(DCC_ResourcePath)</DCC_ResourcePath>
+			<DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+			<DCC_Define>RELEASE;$(DCC_Define)</DCC_Define>
+			<DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+			<DCC_IncludePath>..\;..\..\Dcu\D11;$(DCC_IncludePath)</DCC_IncludePath>
+			<DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Cfg_Debug)'!=''">
+			<DCC_SYMBOL_EXPERIMENTAL>False</DCC_SYMBOL_EXPERIMENTAL>
+			<DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+			<Version>7.0</Version>
+			<DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+			<DCC_UNIT_EXPERIMENTAL>False</DCC_UNIT_EXPERIMENTAL>
+			<DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+			<DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+			<DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+			<DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+			<DCC_ObjPath>..\;..\..\Dcu\D11;$(DCC_ObjPath)</DCC_ObjPath>
+			<DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+			<DCC_ResourcePath>..\;..\..\Dcu\D11;$(DCC_ResourcePath)</DCC_ResourcePath>
+			<DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+			<DCC_IncludePath>..\;..\..\Dcu\D11;$(DCC_IncludePath)</DCC_IncludePath>
+			<DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+		</PropertyGroup>
+		<ItemGroup>
+			<DelphiCompile Include="RemObjects_Everwood_D12.dpk">
+				<MainSource>MainSource</MainSource>
+			</DelphiCompile>
+			<DCCReference Include="rtl.dcp"/>
+			<DCCReference Include="vcl.dcp"/>
+			<DCCReference Include="vclie.dcp"/>
+			<DCCReference Include="designide.dcp"/>
+			<DCCReference Include="vclx.dcp"/>
+			<DCCReference Include="uEWOTAWizards.pas"/>
+			<DCCReference Include="uEWOTAHelpers.pas"/>
+			<DCCReference Include="uEWSampleInfo.pas">
+				<Form>SampleInfoForm</Form>
+			</DCCReference>
+			<DCCReference Include="uEWOTANewModuleExpert.pas"/>
+			<DCCReference Include="RemObjects_Everwood_Reg.pas"/>
+			<DCCReference Include="uEWOTANewProjectExpert.pas"/>
+			<DCCReference Include="uEWOTARepositoryExpert.pas"/>
+			<DCCReference Include="uEWMenuManager.pas"/>
+			<DCCReference Include="uEWAbout.pas"/>
+			<DCCReference Include="uEWWizard.pas">
+				<Form>EWWizardForm</Form>
+			</DCCReference>
+			<DCCReference Include="uEWTools.pas"/>
+			<DCCReference Include="uEWOTAMessages.pas"/>
+			<DCCReference Include="uEWStringTools.pas"/>
+			<DCCReference Include="uEWHelpers.pas"/>
+			<None Include="ModelSupport_RemObjects_Everwood_D10\default.txaPackage"/>
+			<BuildConfiguration Include="Base">
+				<Key>Base</Key>
+			</BuildConfiguration>
+			<BuildConfiguration Include="Release">
+				<Key>Cfg_Release</Key>
+				<CfgParent>Base</CfgParent>
+			</BuildConfiguration>
+			<BuildConfiguration Include="Debug">
+				<Key>Cfg_Debug</Key>
+				<CfgParent>Base</CfgParent>
+			</BuildConfiguration>
+		</ItemGroup>
+		<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+		<ProjectExtensions>
+			<Borland.Personality>Delphi.Personality.12</Borland.Personality>
+			<Borland.ProjectType>Package</Borland.ProjectType>
+			<BorlandProject>
+				<Delphi.Personality>
+					<Compiler>
+						<Compiler Name="UsePackages">False</Compiler>
+						<Compiler Name="Packages"/>
+					</Compiler>
+					<Parameters>
+						<Parameters Name="UseLauncher">False</Parameters>
+						<Parameters Name="LoadAllSymbols">True</Parameters>
+						<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+					</Parameters>
+					<VersionInfo>
+						<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+						<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+						<VersionInfo Name="MajorVer">2</VersionInfo>
+						<VersionInfo Name="MinorVer">0</VersionInfo>
+						<VersionInfo Name="Release">1</VersionInfo>
+						<VersionInfo Name="Build">109</VersionInfo>
+						<VersionInfo Name="Debug">False</VersionInfo>
+						<VersionInfo Name="PreRelease">False</VersionInfo>
+						<VersionInfo Name="Special">False</VersionInfo>
+						<VersionInfo Name="Private">False</VersionInfo>
+						<VersionInfo Name="DLL">False</VersionInfo>
+						<VersionInfo Name="Locale">1033</VersionInfo>
+						<VersionInfo Name="CodePage">1252</VersionInfo>
+					</VersionInfo>
+					<VersionInfoKeys>
+						<VersionInfoKeys Name="FileVersion">2.0.1.109</VersionInfoKeys>
+						<VersionInfoKeys Name="ProductVersion">2.0.1.109</VersionInfoKeys>
+						<VersionInfoKeys Name="CompanyName"/>
+						<VersionInfoKeys Name="FileDescription"/>
+						<VersionInfoKeys Name="InternalName"/>
+						<VersionInfoKeys Name="LegalCopyright"/>
+						<VersionInfoKeys Name="LegalTrademarks"/>
+						<VersionInfoKeys Name="OriginalFilename"/>
+						<VersionInfoKeys Name="ProductName"/>
+					</VersionInfoKeys>
+					<Source>
+						<Source Name="MainSource">RemObjects_Everwood_D12.dpk</Source>
+					</Source>
+					<Excluded_Packages />
+				</Delphi.Personality>
+			</BorlandProject>
+			<ProjectFileVersion>12</ProjectFileVersion>
+		</ProjectExtensions>
+	</Project>
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D12.res b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D12.res
new file mode 100644
index 0000000..45e1f26
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D12.res differ
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D6.cfg b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D6.cfg
new file mode 100644
index 0000000..8758c38
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D6.cfg
@@ -0,0 +1,38 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D6"
+-LE"..\..\Bin"
+-LN"..\..\Bin"
+-DxDEBUG_EVERWOOD_SHOW_NEW_MODULE_CODE
+-Z
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D6.dof b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D6.dof
new file mode 100644
index 0000000..32497d8
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D6.dof
@@ -0,0 +1,165 @@
+[FileVersion]
+Version=7.0
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=1
+SymbolLibrary=1
+SymbolPlatform=1
+UnitLibrary=1
+UnitPlatform=1
+UnitDeprecated=1
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=1
+UnsafeCode=1
+UnsafeCast=1
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects Everwood for Delphi
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D6
+PackageDLLOutputDir=..\..\Bin
+PackageDCPOutputDir=..\..\Bin
+SearchPath=
+Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;vcldb;dsnapcon;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;dclOfficeXP;CDKSmp;CDKDesignTimeSupport;ES_CodeSite20;CDK;ESDelphiCommandCompiler;ESFileSearch;ESVisualCompositeExpert;EaglWk;ESGraphUtils;ESBase;ESVsCp;ESSampleComposites70;ESSampleCompositeEditors7;RzBz4070;cxCommonEditingVCLD7;cxEditorsVCLD7;dxThemeD7;cxLibraryVCLD7;cxDataD7;cxExtEditorsVCLD7;cxGridUtilsVCLD7;cxGridVCLD7;cxPageControlVCLD7;cxTreeListVCLD7;addict3_d6;dxBarD7;dxComnD7;dxBarDBNavD7;dxBarExtDBItemsD7;dxBarExtItemsD7;dxDockingD7;dxEdtrD7;dxELibD7;dxExELD7;EQGridD7;dxExRwD7;dxGrEdD7;dxDBEdD7;dxInsD7;dxLayoutControlD7;dxMasterViewD7;dxmdsd7;dxNavBarD7;dxObjInsD7;dxPageControlD7;dxPSCoreD7;dxsbD7;SynEdit_D7;tb2kComplete_70;EzSpecials_D7;PurposesoftD7;Rz252D70;Rz252N70;RemObjects_DataSnap_D7;DataAbstract_IDE_D7;DataAbstract_Core_D7;DataAbstract_DBXDriver_D7;DataAbstract_DiskDriver_D7;Nexus100ts70;Nexus100ll70;Nexus100tn70;Nexus100pt70;Nexus100tw70;ECQDBCD7;EQTLD7;sq7;cxExportVCLD7;SchemaModelerUtils_d7;CrTb2k;ESCore;CR_Standard;madBasic_;madDisAsm_;CSP20I70.bpl;
+Conditionals=xDEBUG_EVERWOOD_SHOW_NEW_MODULE_CODE
+DebugSourceDirs=
+UsePackages=0
+[Parameters]
+RunParams=
+HostApplication=
+Launcher=
+UseLauncher=0
+DebugCWD=
+[Language]
+ActiveLang=
+ProjectLang=
+RootDir=
+[Version Info]
+IncludeVerInfo=1
+AutoIncBuild=0
+MajorVer=0
+MinorVer=0
+Release=0
+Build=0
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+[Version Info Keys]
+CompanyName=
+FileDescription=
+FileVersion=0.0.0.0
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+[Excluded Packages]
+R:\RemObjects SDK\Dcu\D6\RemObjects_Core_D6.bpl=RemObjects SDK - Core Library
+R:\Hydra\Trial\D6\Hydra_RO_D6.bpl=RemObjects' Hydra - RemObjects SDK Integration Library TRIAL
+R:\RemObjects SDK\Dcu\D6\RemObjects_RODX_D6.bpl=RemObjects SDK - RODXSock Library
+R:\RemObjects SDK\Dcu\D6\RemObjects_BPDX_D6.bpl=RemObjects SDK - BPDX Library
+R:\RemObjects SDK\Dcu\D6\RemObjects_DataSnap_D6.bpl=RemObjects SDK - DataSnap Integration Pack
+r:\RemObjects SDK\Dcu\d6\RemObjects_Indy_D6.bpl=RemObjects SDK - Indy Library
+R:\RemObjects SDK for Delphi\Dcu\D6\RemObjects_IDE_D6.bpl=RemObjects SDK - IDE Integration
+R:\Data Abstract\Dcu\D6\DataAbstract_Core_D6.bpl=RemObjects Data Abstract - Core Library
+R:\Data Abstract\Dcu\D6\DataAbstract_DBXDriver_D6.bpl=RemObjects Data Abstract - dbExpress Driver
+R:\Data Abstract\Dcu\D6\DataAbstract_DiskDriver_D6.bpl=RemObjects Data Abstract - Disk Driver
+R:\Data Abstract\Dcu\D6\DataAbstract_IBXDriver_D6.bpl=RemObjects Data Abstract - InterBase Express Driver
+R:\Data Abstract\Dcu\D6\DataAbstract_IDE_D6.bpl=RemObjects Data Abstract - IDE Package
+R:\RemObjects SDK\Dcu\D6\RemObjects_Enterprise_D6.bpl=RemObjects SDK - Enterprise Edition
+R:\Data Abstract\Dcu\D6\DataAbstract_ADODriver_D6.bpl=RemObjects Data Abstract - ADOExpress/dbGo Driver
+[HistoryLists\hlConditionals]
+Count=1
+Item0=xDEBUG_EVERWOOD_SHOW_NEW_MODULE_CODE
+[HistoryLists\hlUnitAliases]
+Count=1
+Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+[HistoryLists\hlUnitOutputDirectory]
+Count=1
+Item0=..\..\Dcu\D6
+[HistoryLists\hlBPLOutput]
+Count=1
+Item0=..\..\Dcu\D6
+[HistoryLists\hlDCPOutput]
+Count=1
+Item0=..\..\Dcu\D6
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D6.dpk b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D6.dpk
new file mode 100644
index 0000000..cef08c6
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D6.dpk
@@ -0,0 +1,53 @@
+package RemObjects_Everwood_D6;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Everwood for Delphi'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+{$DEFINE xDEBUG_EVERWOOD_SHOW_NEW_MODULE_CODE}
+
+requires
+  rtl,
+  vcl,
+  vclie,
+  designide,
+  vclx;
+
+contains
+  uEWOTAWizards in 'uEWOTAWizards.pas',
+  uEWOTAHelpers in 'uEWOTAHelpers.pas',
+  uEWSampleInfo in 'uEWSampleInfo.pas' {SampleInfoForm},
+  uEWOTANewModuleExpert in 'uEWOTANewModuleExpert.pas',
+  RemObjects_Everwood_Reg in 'RemObjects_Everwood_Reg.pas',
+  uEWOTANewProjectExpert in 'uEWOTANewProjectExpert.pas',
+  uEWOTARepositoryExpert in 'uEWOTARepositoryExpert.pas',
+  uEWMenuManager in 'uEWMenuManager.pas',
+  uEWAbout in 'uEWAbout.pas',
+  uEWWizard in 'uEWWizard.pas' {EWWizardForm},
+  uEWTools in 'uEWTools.pas',
+  uEWOTAMessages in 'uEWOTAMessages.pas',
+  uEWStringTools in 'uEWStringTools.pas',
+  uEWHelpers in 'uEWHelpers.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D6.res b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D6.res
new file mode 100644
index 0000000..45e1f26
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D6.res differ
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D7.cfg b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D7.cfg
new file mode 100644
index 0000000..2132da9
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D7.cfg
@@ -0,0 +1,47 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D7"
+-LE"..\..\Bin"
+-LN"..\..\Bin"
+-DxDEBUG_EVERWOOD_SHOW_NEW_MODULE_CODE
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D7.dof b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D7.dof
new file mode 100644
index 0000000..5a17516
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D7.dof
@@ -0,0 +1,135 @@
+[FileVersion]
+Version=7.0
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects Everwood for Delphi
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D7
+PackageDLLOutputDir=..\..\Bin
+PackageDCPOutputDir=..\..\Bin
+SearchPath=
+Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;vcldb;dsnapcon;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;dclOfficeXP;CDKSmp;CDKDesignTimeSupport;ES_CodeSite20;CDK;ESDelphiCommandCompiler;ESFileSearch;ESVisualCompositeExpert;EaglWk;ESGraphUtils;ESBase;ESVsCp;ESSampleComposites70;ESSampleCompositeEditors7;RzBz4070;cxCommonEditingVCLD7;cxEditorsVCLD7;dxThemeD7;cxLibraryVCLD7;cxDataD7;cxExtEditorsVCLD7;cxGridUtilsVCLD7;cxGridVCLD7;cxPageControlVCLD7;cxTreeListVCLD7;addict3_d6;dxBarD7;dxComnD7;dxBarDBNavD7;dxBarExtDBItemsD7;dxBarExtItemsD7;dxDockingD7;dxEdtrD7;dxELibD7;dxExELD7;EQGridD7;dxExRwD7;dxGrEdD7;dxDBEdD7;dxInsD7;dxLayoutControlD7;dxMasterViewD7;dxmdsd7;dxNavBarD7;dxObjInsD7;dxPageControlD7;dxPSCoreD7;dxsbD7;SynEdit_D7;tb2kComplete_70;EzSpecials_D7;PurposesoftD7;Rz252D70;Rz252N70;RemObjects_DataSnap_D7;DataAbstract_IDE_D7;DataAbstract_Core_D7;DataAbstract_DBXDriver_D7;DataAbstract_DiskDriver_D7;Nexus100ts70;Nexus100ll70;Nexus100tn70;Nexus100pt70;Nexus100tw70;ECQDBCD7;EQTLD7;sq7;cxExportVCLD7;SchemaModelerUtils_d7;CrTb2k;ESCore;CR_Standard;madBasic_;madDisAsm_;CSP20I70.bpl;
+Conditionals=xDEBUG_EVERWOOD_SHOW_NEW_MODULE_CODE
+DebugSourceDirs=
+UsePackages=0
+[Parameters]
+RunParams=
+HostApplication=
+Launcher=
+UseLauncher=0
+DebugCWD=
+[Language]
+ActiveLang=
+ProjectLang=
+RootDir=
+[Version Info]
+IncludeVerInfo=1
+AutoIncBuild=0
+MajorVer=1
+MinorVer=0
+Release=0
+Build=0
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+[Version Info Keys]
+CompanyName=
+FileDescription=
+FileVersion=1.0.1.50
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D7.dpk b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D7.dpk
new file mode 100644
index 0000000..ab11329
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D7.dpk
@@ -0,0 +1,53 @@
+package RemObjects_Everwood_D7;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Everwood for Delphi'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+{$DEFINE xDEBUG_EVERWOOD_SHOW_NEW_MODULE_CODE}
+
+requires
+  rtl,
+  vcl,
+  vclie,
+  designide,
+  vclx;
+
+contains
+  uEWOTAWizards in 'uEWOTAWizards.pas',
+  uEWOTAHelpers in 'uEWOTAHelpers.pas',
+  uEWSampleInfo in 'uEWSampleInfo.pas' {SampleInfoForm},
+  uEWOTANewModuleExpert in 'uEWOTANewModuleExpert.pas',
+  RemObjects_Everwood_Reg in 'RemObjects_Everwood_Reg.pas',
+  uEWOTANewProjectExpert in 'uEWOTANewProjectExpert.pas',
+  uEWOTARepositoryExpert in 'uEWOTARepositoryExpert.pas',
+  uEWMenuManager in 'uEWMenuManager.pas',
+  uEWAbout in 'uEWAbout.pas',
+  uEWWizard in 'uEWWizard.pas' {EWWizardForm},
+  uEWTools in 'uEWTools.pas',
+  uEWOTAMessages in 'uEWOTAMessages.pas',
+  uEWStringTools in 'uEWStringTools.pas',
+  uEWHelpers in 'uEWHelpers.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D7.res b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D7.res
new file mode 100644
index 0000000..45e1f26
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D7.res differ
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D9.bdsproj b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D9.bdsproj
new file mode 100644
index 0000000..1f3a8c7
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D9.bdsproj
@@ -0,0 +1,176 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality" Type="String">Delphi.Personality</Option>
+			<Option Name="ProjectType" Type="String"></Option>
+			<Option Name="Version" Type="String">1.0</Option>
+			<Option Name="GUID" Type="String">{C239782A-EA39-4CF9-91C2-955D92AF0504}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource" Type="String">RemObjects_Everwood_D9.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version" Type="String">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A" Type="Integer">8</Compiler>
+			<Compiler Name="B" Type="Integer">0</Compiler>
+			<Compiler Name="C" Type="Integer">1</Compiler>
+			<Compiler Name="D" Type="Integer">1</Compiler>
+			<Compiler Name="E" Type="Integer">0</Compiler>
+			<Compiler Name="F" Type="Integer">0</Compiler>
+			<Compiler Name="G" Type="Integer">1</Compiler>
+			<Compiler Name="H" Type="Integer">1</Compiler>
+			<Compiler Name="I" Type="Integer">1</Compiler>
+			<Compiler Name="J" Type="Integer">0</Compiler>
+			<Compiler Name="K" Type="Integer">0</Compiler>
+			<Compiler Name="L" Type="Integer">1</Compiler>
+			<Compiler Name="M" Type="Integer">0</Compiler>
+			<Compiler Name="N" Type="Integer">1</Compiler>
+			<Compiler Name="O" Type="Integer">1</Compiler>
+			<Compiler Name="P" Type="Integer">1</Compiler>
+			<Compiler Name="Q" Type="Integer">0</Compiler>
+			<Compiler Name="R" Type="Integer">0</Compiler>
+			<Compiler Name="S" Type="Integer">0</Compiler>
+			<Compiler Name="T" Type="Integer">0</Compiler>
+			<Compiler Name="U" Type="Integer">0</Compiler>
+			<Compiler Name="V" Type="Integer">1</Compiler>
+			<Compiler Name="W" Type="Integer">1</Compiler>
+			<Compiler Name="X" Type="Integer">1</Compiler>
+			<Compiler Name="Y" Type="Integer">1</Compiler>
+			<Compiler Name="Z" Type="Integer">1</Compiler>
+			<Compiler Name="ShowHints" Type="Boolean">True</Compiler>
+			<Compiler Name="ShowWarnings" Type="Boolean">True</Compiler>
+			<Compiler Name="UnitAliases" Type="String">WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;</Compiler>
+			<Compiler Name="NamespacePrefix" Type="String"></Compiler>
+			<Compiler Name="GenerateDocumentation" Type="Boolean">False</Compiler>
+			<Compiler Name="DefaultNamespace" Type="String"></Compiler>
+			<Compiler Name="SymbolDeprecated" Type="Boolean">False</Compiler>
+			<Compiler Name="SymbolLibrary" Type="Boolean">False</Compiler>
+			<Compiler Name="SymbolPlatform" Type="Boolean">False</Compiler>
+			<Compiler Name="SymbolExperimental" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitLibrary" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitPlatform" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitDeprecated" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitExperimental" Type="Boolean">False</Compiler>
+			<Compiler Name="HResultCompat" Type="Boolean">True</Compiler>
+			<Compiler Name="HidingMember" Type="Boolean">True</Compiler>
+			<Compiler Name="HiddenVirtual" Type="Boolean">True</Compiler>
+			<Compiler Name="Garbage" Type="Boolean">True</Compiler>
+			<Compiler Name="BoundsError" Type="Boolean">True</Compiler>
+			<Compiler Name="ZeroNilCompat" Type="Boolean">True</Compiler>
+			<Compiler Name="StringConstTruncated" Type="Boolean">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar" Type="Boolean">True</Compiler>
+			<Compiler Name="TypedConstVarPar" Type="Boolean">True</Compiler>
+			<Compiler Name="AsgToTypedConst" Type="Boolean">True</Compiler>
+			<Compiler Name="CaseLabelRange" Type="Boolean">True</Compiler>
+			<Compiler Name="ForVariable" Type="Boolean">True</Compiler>
+			<Compiler Name="ConstructingAbstract" Type="Boolean">True</Compiler>
+			<Compiler Name="ComparisonFalse" Type="Boolean">True</Compiler>
+			<Compiler Name="ComparisonTrue" Type="Boolean">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned" Type="Boolean">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned" Type="Boolean">True</Compiler>
+			<Compiler Name="UnsupportedConstruct" Type="Boolean">True</Compiler>
+			<Compiler Name="FileOpen" Type="Boolean">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc" Type="Boolean">True</Compiler>
+			<Compiler Name="BadGlobalSymbol" Type="Boolean">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor" Type="Boolean">True</Compiler>
+			<Compiler Name="InvalidDirective" Type="Boolean">True</Compiler>
+			<Compiler Name="PackageNoLink" Type="Boolean">True</Compiler>
+			<Compiler Name="PackageThreadVar" Type="Boolean">True</Compiler>
+			<Compiler Name="ImplicitImport" Type="Boolean">True</Compiler>
+			<Compiler Name="HPPEMITIgnored" Type="Boolean">True</Compiler>
+			<Compiler Name="NoRetVal" Type="Boolean">True</Compiler>
+			<Compiler Name="UseBeforeDef" Type="Boolean">True</Compiler>
+			<Compiler Name="ForLoopVarUndef" Type="Boolean">True</Compiler>
+			<Compiler Name="UnitNameMismatch" Type="Boolean">True</Compiler>
+			<Compiler Name="NoCFGFileFound" Type="Boolean">True</Compiler>
+			<Compiler Name="MessageDirective" Type="Boolean">True</Compiler>
+			<Compiler Name="ImplicitVariants" Type="Boolean">True</Compiler>
+			<Compiler Name="UnicodeToLocale" Type="Boolean">True</Compiler>
+			<Compiler Name="LocaleToUnicode" Type="Boolean">True</Compiler>
+			<Compiler Name="ImagebaseMultiple" Type="Boolean">True</Compiler>
+			<Compiler Name="SuspiciousTypecast" Type="Boolean">True</Compiler>
+			<Compiler Name="PrivatePropAccessor" Type="Boolean">True</Compiler>
+			<Compiler Name="UnsafeType" Type="Boolean">False</Compiler>
+			<Compiler Name="UnsafeCode" Type="Boolean">False</Compiler>
+			<Compiler Name="UnsafeCast" Type="Boolean">False</Compiler>
+			<Compiler Name="OptionTruncated" Type="Boolean">True</Compiler>
+			<Compiler Name="WideCharReduced" Type="Boolean">True</Compiler>
+			<Compiler Name="DuplicatesIgnored" Type="Boolean">True</Compiler>  <Compiler Name="UnitInitSeq">True</Compiler>
+      <Compiler Name="LocalPInvoke">True</Compiler>
+      <Compiler Name="CodePage"></Compiler>
+    </Compiler>
+		<Linker>
+			<Linker Name="MapFile" Type="Integer">0</Linker>
+			<Linker Name="OutputObjs" Type="Integer">0</Linker>
+			<Linker Name="ConsoleApp" Type="Integer">1</Linker>
+			<Linker Name="DebugInfo" Type="Boolean">False</Linker>
+			<Linker Name="RemoteSymbols" Type="Boolean">False</Linker>
+			<Linker Name="GenerateDRC" Type="Boolean">False</Linker>
+			<Linker Name="MinStackSize" Type="Integer">16384</Linker>
+			<Linker Name="MaxStackSize" Type="Integer">1048576</Linker>
+			<Linker Name="ImageBase" Type="Integer">4194304</Linker>
+			<Linker Name="ExeDescription" Type="String">RemObjects Everwood for Delphi</Linker>  <Linker Name="GenerateHpps">False</Linker>
+    </Linker>
+		<Directories>
+			<Directories Name="OutputDir" Type="String"></Directories>
+			<Directories Name="UnitOutputDir" Type="String">..\..\Dcu\D9</Directories>
+			<Directories Name="PackageDLLOutputDir" Type="String">..\..\Dcu\D9</Directories>
+			<Directories Name="PackageDCPOutputDir" Type="String">..\..\Dcu\D9</Directories>
+			<Directories Name="SearchPath" Type="String">..\;..\..\Dcu\D9</Directories>
+			<Directories Name="Packages" Type="String"></Directories>
+			<Directories Name="Conditionals" Type="String">xDEBUG_EVERWOOD_SHOW_NEW_MODULE_CODE</Directories>
+			<Directories Name="DebugSourceDirs" Type="String"></Directories>
+			<Directories Name="UsePackages" Type="Boolean">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams" Type="String"></Parameters>
+			<Parameters Name="HostApplication" Type="String"></Parameters>
+			<Parameters Name="Launcher" Type="String"></Parameters>
+			<Parameters Name="UseLauncher" Type="Boolean">False</Parameters>
+			<Parameters Name="DebugCWD" Type="String"></Parameters>
+			<Parameters Name="RemoteHost" Type="String"></Parameters>
+			<Parameters Name="RemotePath" Type="String"></Parameters>
+			<Parameters Name="RemoteLauncher" Type="String"></Parameters>
+			<Parameters Name="RemoteCWD" Type="String"></Parameters>
+			<Parameters Name="RemoteDebug" Type="Boolean">False</Parameters>  <Parameters Name="Debug Symbols Search Path"></Parameters>
+      <Parameters Name="LoadAllSymbols">True</Parameters>
+      <Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+    </Parameters>
+		<Language>
+			<Language Name="ActiveLang" Type="String"></Language>
+			<Language Name="ProjectLang" Type="String">$00000000</Language>
+			<Language Name="RootDir" Type="String"></Language>
+		</Language>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo" Type="Boolean">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="MajorVer" Type="Integer">3</VersionInfo>
+			<VersionInfo Name="MinorVer" Type="Integer">0</VersionInfo>
+			<VersionInfo Name="Release" Type="Integer">1</VersionInfo>
+			<VersionInfo Name="Build" Type="Integer">282</VersionInfo>
+			<VersionInfo Name="Debug" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="PreRelease" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="Special" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="Private" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="DLL" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="Locale" Type="Integer">1033</VersionInfo>
+			<VersionInfo Name="CodePage" Type="Integer">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion" Type="String">3.0.1.282</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion" Type="String">1.0.0.0</VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName" Type="String"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription" Type="String"></VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName" Type="String"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright" Type="String"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks" Type="String"></VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename" Type="String"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName" Type="String"></VersionInfoKeys>
+		</VersionInfoKeys>
+	</Delphi.Personality>  <ModelSupport>True</ModelSupport>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D9.cfg b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D9.cfg
new file mode 100644
index 0000000..cbc338d
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D9.cfg
@@ -0,0 +1,45 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N"..\..\Dcu\D9"
+-LE"..\..\Bin"
+-LN"..\..\Bin"
+-U"..\;..\..\Dcu\D9"
+-O"..\;..\..\Dcu\D9"
+-I"..\;..\..\Dcu\D9"
+-R"..\;..\..\Dcu\D9"
+-DxDEBUG_EVERWOOD_SHOW_NEW_MODULE_CODE
+-Z
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D9.dof b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D9.dof
new file mode 100644
index 0000000..6e0a739
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D9.dof
@@ -0,0 +1,136 @@
+[FileVersion]
+Version=7.0
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=1
+SymbolLibrary=1
+SymbolPlatform=1
+UnitLibrary=1
+UnitPlatform=1
+UnitDeprecated=1
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects Everwood for Delphi
+[Directories]
+OutputDir=
+UnitOutputDir=
+PackageDLLOutputDir=
+PackageDCPOutputDir=
+SearchPath=
+Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;IntrawebDB_50_70;Intraweb_50_70;Rave50CLX;Rave50VCL;dclOfficeXP;RemObjects_WebBroker_D7;RemObjects_Indy_D7;RemObjects_RODX_D7;RemObjects_BPDX_D7;DataAbstract_DBXDriver_D7;DataAbstract_Scripting_D7;PascalScript_RO_D7;IBO40FTS_D7;IBO40TRT_D7;IBO40CRT_D7;IBO40RPL_D7;IBO40VRT_D7;IBO40FRT_D7;IBO40XRT_D7;IBO40WRT_D7;IBO40WXDT_D7;IBO40WXRT_D7;CRControls70;dac70;dacvcl70;sdacvcl70;sdac70;DataAbstract_IDE_D7;cxLibraryVCLD7;dxBarD7;dxComnD7;dxBarDBNavD7;dxBarExtDBItemsD7;dxBarExtItemsD7;dxDockingD7;dxsbD7;cxEditorsVCLD7;dxThemeD7;cxDataD7;cxExtEditorsVCLD7;cxPageControlVCLD7;cxGridVCLD7;cxSchedulerVCLD7;cxTreeListVCLD7;cxVerticalGridVCLD7;cxSpreadSheetVCLD7;dxNavBarD7;cxWebD7;cxWebPascalScriptD7;cxWebSnapD7;cxWebTeeChartD7;dxMasterViewD7;dxmdsD7;dxdbtrD7;dxtrmdD7;dxorgcD7;dxdborD7;dxFlowChartD7;dxLayoutControlD7;dxLayoutControlcxEditAdaptersD7;dxPSCoreD7;dxPSTeeChartD7;dxPsPrVwAdvD7;dxPSLnksD7;dxPSdxOCLnkD7;dxPSdxMVLnkD7;dxPSdxLCLnkD7;dxPSdxFCLnkD7;dxPSdxDBTVLnkD7;dxPSdxDBOCLnkD7;dxPSDBTeeChartD7;dxPScxCommonD7;dxPScxTLLnkD7;dxPScxSSLnkD7;dxPScxScheduler2LnkD7;dxPScxPCProdD7;dxPScxGridLnkD7;dxPScxExtCommonD7;dxPScxVGridLnkD7;DataAbstract_Core_D7;Hydra_Core_D7;Hydra_RO_D7
+Conditionals=xDEBUG_EVERWOOD_SHOW_NEW_MODULE_CODE
+DebugSourceDirs=
+UsePackages=0
+[Parameters]
+RunParams=
+HostApplication=
+Launcher=
+UseLauncher=0
+DebugCWD=
+[Language]
+ActiveLang=
+ProjectLang=
+RootDir=C:\Program Files\Borland\Delphi7\Bin\
+[Version Info]
+IncludeVerInfo=1
+AutoIncBuild=0
+MajorVer=1
+MinorVer=0
+Release=0
+Build=0
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1058
+CodePage=1251
+[Version Info Keys]
+CompanyName=
+FileDescription=
+FileVersion=1.0.0.0
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+Comments=
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D9.dpk b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D9.dpk
new file mode 100644
index 0000000..71083c0
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D9.dpk
@@ -0,0 +1,53 @@
+package RemObjects_Everwood_D9;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Everwood for Delphi'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+{$DEFINE xDEBUG_EVERWOOD_SHOW_NEW_MODULE_CODE}
+
+requires
+  rtl,
+  vcl,
+  vclie,
+  designide,
+  vclx;
+
+contains
+  uEWOTAWizards in 'uEWOTAWizards.pas',
+  uEWOTAHelpers in 'uEWOTAHelpers.pas',
+  uEWSampleInfo in 'uEWSampleInfo.pas' {SampleInfoForm},
+  uEWOTANewModuleExpert in 'uEWOTANewModuleExpert.pas',
+  RemObjects_Everwood_Reg in 'RemObjects_Everwood_Reg.pas',
+  uEWOTANewProjectExpert in 'uEWOTANewProjectExpert.pas',
+  uEWOTARepositoryExpert in 'uEWOTARepositoryExpert.pas',
+  uEWMenuManager in 'uEWMenuManager.pas',
+  uEWAbout in 'uEWAbout.pas',
+  uEWWizard in 'uEWWizard.pas' {EWWizardForm},
+  uEWTools in 'uEWTools.pas',
+  uEWOTAMessages in 'uEWOTAMessages.pas',
+  uEWStringTools in 'uEWStringTools.pas',
+  uEWHelpers in 'uEWHelpers.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D9.res b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D9.res
new file mode 100644
index 0000000..45e1f26
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_D9.res differ
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_Lazarus_Unix.lpk b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_Lazarus_Unix.lpk
new file mode 100644
index 0000000..2cebc1e
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_Lazarus_Unix.lpk
@@ -0,0 +1,85 @@
+<?xml version="1.0"?>
+<CONFIG>
+  <Package Version="3">
+    <PathDelim Value="\"/>
+    <Name Value="RemObjects_Everwood_Lazarus_Unix"/>
+    <Author Value="RemObjects Software"/>
+    <CompilerOptions>
+      <Version Value="5"/>
+      <PathDelim Value="\"/>
+      <SearchPaths>
+        <UnitOutputDirectory Value="units\$(TargetCPU)-$(TargetOS)"/>
+      </SearchPaths>
+      <CodeGeneration>
+        <Generate Value="Faster"/>
+      </CodeGeneration>
+      <Other>
+        <CompilerPath Value="$(CompPath)"/>
+      </Other>
+    </CompilerOptions>
+    <Description Value="RemObjects Everwood for Lazarus
+"/>
+    <Files Count="12">
+      <Item1>
+        <Filename Value="RemObjects_Everwood_Reg.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="RemObjects_Everwood_Reg"/>
+      </Item1>
+      <Item2>
+        <Filename Value="uEWAbout.pas"/>
+        <UnitName Value="uEWAbout"/>
+      </Item2>
+      <Item3>
+        <Filename Value="uEWAbout.lfm"/>
+        <Type Value="LFM"/>
+      </Item3>
+      <Item4>
+        <Filename Value="uEWAbout.lrs"/>
+        <Type Value="LRS"/>
+      </Item4>
+      <Item5>
+        <Filename Value="uEWHelpers.pas"/>
+        <UnitName Value="uEWHelpers"/>
+      </Item5>
+      <Item6>
+        <Filename Value="uEWMenuManager_laz.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="uEWMenuManager_laz"/>
+      </Item6>
+      <Item7>
+        <Filename Value="uEWOTAHelpers_laz.pas"/>
+        <UnitName Value="uEWOTAHelpers_laz"/>
+      </Item7>
+      <Item8>
+        <Filename Value="uEWStringTools.pas"/>
+        <UnitName Value="uEWStringTools"/>
+      </Item8>
+      <Item9>
+        <Filename Value="uEWTools.pas"/>
+        <UnitName Value="uEWTools"/>
+      </Item9>
+      <Item10>
+        <Filename Value="uEWWizard.pas"/>
+        <UnitName Value="uEWWizard"/>
+      </Item10>
+      <Item11>
+        <Filename Value="uEWWizard.lfm"/>
+        <Type Value="LFM"/>
+      </Item11>
+      <Item12>
+        <Filename Value="uEWWizard.lrs"/>
+        <Type Value="LRS"/>
+      </Item12>
+    </Files>
+    <Type Value="DesignTime"/>
+    <RequiredPkgs Count="1">
+      <Item1>
+        <PackageName Value="IDEIntf"/>
+      </Item1>
+    </RequiredPkgs>
+    <PublishOptions>
+      <Version Value="2"/>
+      <DestinationDirectory Value="$(TestDir)\publishedpackage\"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_Lazarus_Windows.lpk b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_Lazarus_Windows.lpk
new file mode 100644
index 0000000..3d3d02b
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_Lazarus_Windows.lpk
@@ -0,0 +1,87 @@
+<?xml version="1.0"?>
+<CONFIG>
+  <Package Version="3">
+    <PathDelim Value="\"/>
+    <Name Value="RemObjects_Everwood_Lazarus_Windows"/>
+    <Author Value="RemObjects Software"/>
+    <CompilerOptions>
+      <Version Value="8"/>
+      <PathDelim Value="\"/>
+      <SearchPaths>
+        <UnitOutputDirectory Value="..\..\Dcu\Lazarus\$(TargetCPU)-$(TargetOS)"/>
+      </SearchPaths>
+      <Parsing>
+        <SyntaxOptions>
+          <CStyleOperator Value="False"/>
+        </SyntaxOptions>
+      </Parsing>
+      <Other>
+        <CompilerPath Value="$(CompPath)"/>
+      </Other>
+    </CompilerOptions>
+    <Description Value="RemObjects Everwood for Lazarus
+"/>
+    <Files Count="12">
+      <Item1>
+        <Filename Value="RemObjects_Everwood_Reg.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="RemObjects_Everwood_Reg"/>
+      </Item1>
+      <Item2>
+        <Filename Value="uEWAbout.pas"/>
+        <UnitName Value="uEWAbout"/>
+      </Item2>
+      <Item3>
+        <Filename Value="uEWAbout.lfm"/>
+        <Type Value="LFM"/>
+      </Item3>
+      <Item4>
+        <Filename Value="uEWAbout.lrs"/>
+        <Type Value="LRS"/>
+      </Item4>
+      <Item5>
+        <Filename Value="uEWHelpers.pas"/>
+        <UnitName Value="uEWHelpers"/>
+      </Item5>
+      <Item6>
+        <Filename Value="uEWMenuManager_laz.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="uEWMenuManager_laz"/>
+      </Item6>
+      <Item7>
+        <Filename Value="uEWOTAHelpers_laz.pas"/>
+        <UnitName Value="uEWOTAHelpers_laz"/>
+      </Item7>
+      <Item8>
+        <Filename Value="uEWStringTools.pas"/>
+        <UnitName Value="uEWStringTools"/>
+      </Item8>
+      <Item9>
+        <Filename Value="uEWTools.pas"/>
+        <UnitName Value="uEWTools"/>
+      </Item9>
+      <Item10>
+        <Filename Value="uEWWizard.pas"/>
+        <UnitName Value="uEWWizard"/>
+      </Item10>
+      <Item11>
+        <Filename Value="uEWWizard.lfm"/>
+        <Type Value="LFM"/>
+      </Item11>
+      <Item12>
+        <Filename Value="uEWWizard.lrs"/>
+        <Type Value="LRS"/>
+      </Item12>
+    </Files>
+    <Type Value="DesignTime"/>
+    <RequiredPkgs Count="1">
+      <Item1>
+        <PackageName Value="IDEIntf"/>
+      </Item1>
+    </RequiredPkgs>
+    <PublishOptions>
+      <Version Value="2"/>
+      <DestinationDirectory Value="$(TestDir)\publishedpackage\"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_Reg.pas b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_Reg.pas
new file mode 100644
index 0000000..454629b
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/RemObjects_Everwood_Reg.pas
@@ -0,0 +1,29 @@
+unit RemObjects_Everwood_Reg;
+
+interface
+
+{$IFNDEF FPC}
+  {$R 'EverwoodIDEResources.res' 'EverwoodIDEResources.rc'}
+{$ENDIF}
+
+{$IFDEF FPC}
+procedure Register;
+{$ENDIF}
+implementation
+
+{$IFDEF FPC}
+uses
+    LResources,FormEditingIntf,
+    uEWWizard;
+    
+    
+procedure Register;
+begin
+  FormEditingHook.RegisterDesignerBaseClass(TEWWizardForm);
+end;
+
+initialization
+  {$I EverwoodIDEResources.lrs}
+{$ENDIF}
+end.
+ 
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/eDefines.inc b/internal/5.0.35.741/1/Everwood/Source/Delphi/eDefines.inc
new file mode 100644
index 0000000..12fb96f
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/eDefines.inc
@@ -0,0 +1,459 @@
+{----------------------------------------------------------------------------}
+{file:      eDefines.inc                                                     }
+{type:      Delphi include file                                              }
+{                                                                            }
+{compiler:  Borland Pascal 7,                                                }
+{           Delphi 1-7, 2005-2007 for Win32                                  }
+{           Kylix 1-3,                                                       }
+{           C++Builder 1-6, 2006-2007                                        }
+{           Free Pascal Compiler 2.x                                         }
+{                                                                            }
+{platforms: DOS, DPMI, Win16, Win32, Win64, Linux, Mac OS X                  }
+{                                                                            }
+{author:    mh@elitedev.com                                                  }
+{                                                                            }
+{contents:  Defines that can be flexibily used to determine the exact        }
+{           compiler version used.                                           }
+{                                                                            }
+{(c)opyright elitedevelopments software. all rights reserved.                }
+{            http://www.elitedev.com                                         }
+{                                                                            }
+{ Third Party component developers are encouraged to use the set of defines  }
+{ established in this file, rather then their own system, for checking their }
+{ component libraries agains different versions of Delphi and C++Builder.    }
+{                                                                            }
+{ This file may be distributed freely with both free and commercial source   }
+{ libraries, but you are asked to please leave this comment in place, and    }
+{ to return any improvements you make to this file to the maintainer that    }
+{ is noted above.                                                            }
+{----------------------------------------------------------------------------}
+
+{----------------------------------------------------------------------------}
+{ Compiler and OS version defines:                                           }
+{                                                                            }
+{ exact compiler versions:                                                   }
+{                                                                            }
+{ BP7             Borland Pascal 7.0                                         }
+{ DELPHI1         Delphi 1.0 (any Delphi)                                    }
+{ DELPHI2         Delphi 2.0                                                 }
+{ DELPHI3         Delphi 3.0                                                 }
+{ DELPHI4         Delphi 4.0                                                 }
+{ DELPHI5         Delphi 5.0                                                 }
+{ DELPHI6         Delphi 6.0                                                 }
+{ DELPHI7         Delphi 7.0                                                 }
+{ DELPHI9         Delphi 2005                                                }
+{ DELPHI2005      Delphi 2005                                                }
+{ DELPHI2006      Delphi 2006                                                }
+{ DELPHI2007      Delphi 2007                                                }
+{ KYLIX1          Kylix 1.0                                                  }
+{ KYLIX2          Kylix 2.0                                                  }
+{ KYLIX3          Kylix 3.0                                                  }
+{ CBUILDER1       C++Builder 1.0                                             }
+{ CBUILDER3       C++Builder 3.0                                             }
+{ CBUILDER4       C++Builder 4.0                                             }
+{ CBUILDER5       C++Builder 5.0                                             }
+{                                                                            }
+{                                                                            }
+{ minimum compiler versions:                                                 }
+{                                                                            }
+{ DELPHI1UP       Delphi 1.0 and above (any Delphi)                          }
+{ DELPHI2UP       Delphi 2.0 and above                                       }
+{ DELPHI3UP       Delphi 3.0 and above                                       }
+{ DELPHI4UP       Delphi 4.0 and above                                       }
+{ DELPHI5UP       Delphi 5.0 and above                                       }
+{ DELPHI6UP       Delphi 6.0 and above                                       }
+{ DELPHI7UP       Delphi 7.0 and above                                       }
+{ DELPHI9UP       Delphi 9.0 (2005) and above                                }
+{ DELPHI10UP      Delphi 10.0 (2006) and above                               }
+{ DELPHI11UP      Delphi 11.0 (2007) and above                               }
+{ DELPHI2005UP    Delphi 2005 and above                                      }
+{ DELPHI2006UP    Delphi 2006 and above                                      }
+{ DELPHI2007UP    Delphi 2007 and above                                      }
+{ KYLIX1UP        Kylix 1.0 and above (any Kylix)                            }
+{ KYLIX2UP        Kylix 2.0 and above (any Kylix)                            }
+{ KYLIX3UP        Kylix 3.0 and above (any Kylix)                            }
+{ CBUILDER1UP     C++Builder 1.0 and above or Delphi 2 and above             }
+{ CBUILDER3UP     C++Builder 3.0 and above or Delphi 3.0 and above           }
+{ CBUILDER4UP     C++Builder 4.0 and above or Delphi 4.0 and above           }
+{ CBUILDER5UP     C++Builder 5.0 and above or Delphi 5.0 and above           }
+{ CBUILDER6UP     C++Builder 5.0 and above or Delphi 5.0 and above           }
+{                                                                            }
+{                                                                            }
+{ compiler types:                                                            }
+{                                                                            }
+{ BP              Borland Pascal (not Delphi or C++Builder)                  }
+{ DELPHI          any Delphi version (but not C++Builder or Kylix)           }
+{ KYLIX           any Kylix version (not Delphi or C++Builder for Windows)   }
+{ CBUILDER        any C++Builder for Windows (Pascal)                        }
+{                                                                            }
+{                                                                            }
+{ target platforms compiler types:                                           }
+{                                                                            }
+{ DELPHI_16BIT    16bit Delphi (but not C++Builder!)                         }
+{ DELPHI_32BIT    32bit Delphi (but not C++Builder)                          }
+{ KYLIX_32BIT     32bit Kylix (but not C++Builder)                           }
+{ CBUILDER_32BIT  32bit C++Builer's Pascal (but not Delphi)                  }
+{                                                                            }
+{                                                                            }
+{ target cpu types                                                           }
+{                                                                            }
+{ CPU16           16bit Delphi or Borland Pascal                             }
+{ CPU32           32bit Delphi or Free Pascal                                }
+{ CPU64           64bit Free Pascal                                          }
+{                                                                            }
+{ target platforms                                                           }
+{                                                                            }
+{ DOS             any DOS (plain and DPMI)                                   }
+{ REALMODE        16bit realmode DOS                                         }
+{ PROTECTEDMODE   16bit DPMI DOS                                             }
+{                                                                            }
+{ MSWINDOWS       any Windows platform                                       }
+{ WIN16           16bit Windows                                              }
+{ WIN32           32bit Windows                                              }
+{ WIN64           64bit Windows                                              }
+{ DOTNET          .NET                                                       }
+{                                                                            }
+{ LINUX           any Linux platform                                         }
+{ LINUX32         32bit Linux                                                }
+{ LINUX64         64bit Linux                                                }
+{                                                                            }
+{ DARWIN          Any Mac OS X                                               }
+{ DARWIN32        32bit Mac OS X                                             }
+{ DARWIN64        64bit Mac OS X                                             }
+{----------------------------------------------------------------------------}
+
+{ defines for Borland Pascal 7.0 }
+{$IFDEF VER70}
+  {$DEFINE BP}
+  {$DEFINE BP7}
+  {$DEFINE 16BIT}
+  {$DEFINE CPU16}
+
+  { defines for BP7 DOS real mode }
+  {$IFDEF MSDOS}
+    {$DEFINE DOS}
+    {$DEFINE REALMODE}
+  {$ENDIF}
+
+  { defines for BP7 DOS protected mode }
+  {$IFDEF DPMI}
+    {$DEFINE DOS}
+    {$DEFINE PROTECTEDMODE}
+  {$ENDIF}
+
+  { defines for BP7 Windows }
+  {$IFDEF WINDOWS}
+    {$DEFINE MSWINDOWS}
+    {$DEFINE WIN16}
+  {$ENDIF}
+{$ENDIF}
+
+{ defines for Delphi 1.0 thru 7.0 }
+{$IFNDEF LINUX}
+
+  { defines for Delphi 1.0 }
+  {$IFDEF VER80}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI1}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI_16BIT}
+    {$DEFINE WIN16}
+    {$DEFINE 16BIT}
+    {$DEFINE CPU16}
+  {$ENDIF}
+
+  { defines for Delphi 2.0 }
+  {$IFDEF VER90}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI2}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+  {$ENDIF}
+
+  { defines for C++Builder 1.0 }
+  {$IFDEF VER93}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE CBUILDER}
+    {$DEFINE CBUILDER1}
+    {$DEFINE CBUILDER1UP}
+  {$ENDIF}
+
+  { defines for Delphi 3.0 }
+  {$IFDEF VER100}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI3}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+  {$ENDIF}
+
+  { defines for C++Builder 3.0 }
+  {$IFDEF VER110}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE CBUILDER}
+    {$DEFINE CBUILDER3}
+    {$DEFINE CBUILDER1UP}
+    {$DEFINE CBUILDER3UP}
+  {$ENDIF}
+
+  { defines for Delphi 4.0 }
+  {$IFDEF VER120}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI4}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+  {$ENDIF}
+
+  { defines for C++Builder 4.0 }
+  {$IFDEF VER125}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+    {$DEFINE CBUILDER}
+    {$DEFINE CBUILDER4}
+    {$DEFINE CBUILDER1UP}
+    {$DEFINE CBUILDER3UP}
+    {$DEFINE CBUILDER4UP}
+  {$ENDIF}
+  { defines for Delphi 5.0 }
+  {$IFDEF VER130}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI5}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+    {$DEFINE DELPHI5UP}
+  {$ENDIF}
+
+  { defines for C++Builder 5.0 }
+  {$IFDEF VER135}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+    {$DEFINE DELPHI5UP}
+    {$DEFINE CBUILDER}
+    {$DEFINE CBUILDER5}
+    {$DEFINE CBUILDER1UP}
+    {$DEFINE CBUILDER3UP}
+    {$DEFINE CBUILDER4UP}
+    {$DEFINE CBUILDER5UP}
+  {$ENDIF}
+
+  { defines for Delphi 6.0 }
+  {$IFDEF VER140}
+    {$DEFINE VER140UP}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI6}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+    {$DEFINE DELPHI5UP}
+    {$DEFINE DELPHI6UP}
+  {$ENDIF}
+
+  { defines for Delphi 7.0 }
+  {$IFDEF VER150}
+    {$DEFINE VER140UP}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI7}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+    {$DEFINE DELPHI5UP}
+    {$DEFINE DELPHI6UP}
+    {$DEFINE DELPHI7UP}
+  {$ENDIF}
+
+  { defines for Delphi 2005 }
+  {$IFDEF VER170}
+    {$DEFINE VER140UP}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI9}
+    {$DEFINE DELPHI2005}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+    {$DEFINE DELPHI5UP}
+    {$DEFINE DELPHI6UP}
+    {$DEFINE DELPHI7UP}
+    {$DEFINE DELPHI9UP}
+    {$DEFINE DELPHI2005UP}
+    {$DEFINE BDS}
+    {$DEFINE BDS3}
+    {$DEFINE BDS3UP}
+  {$ENDIF}
+
+  { defines for Delphi 2006 }
+  {$IFDEF VER180}
+    {$DEFINE VER140UP}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI10}
+    {$DEFINE DELPHI10A}  
+    {$DEFINE DELPHI2006}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+    {$DEFINE DELPHI5UP}
+    {$DEFINE DELPHI6UP}
+    {$DEFINE DELPHI7UP}
+    {$DEFINE DELPHI9UP}
+    {$DEFINE DELPHI10UP}
+    {$DEFINE DELPHI2005UP}
+    {$DEFINE DELPHI2006UP}
+    {$DEFINE BDS}
+    {$DEFINE BDS4}
+    {$DEFINE BDS3UP}
+    {$DEFINE BDS4UP}
+  {$ENDIF}
+
+  { defines for Delphi 2007 }
+  {$IFDEF VER185}
+    {$UNDEF DELPHI10A}  // declared in VER180
+    {$UNDEF DELPHI2006} // declared in VER180
+    {$UNDEF BDS4}       // declared in VER180
+
+    {$DEFINE DELPHI10B}    
+    {$DEFINE DELPHI10BUP}    
+    {$DEFINE DELPHI11}    
+    {$DEFINE DELPHI11UP}    
+    {$DEFINE DELPHI2007}
+    {$DEFINE DELPHI2007UP}    
+    {$DEFINE BDS5}
+    {$DEFINE BDS5UP}
+  {$ENDIF}
+
+  { defines for Delphi 2009 }
+  {$IFDEF VER200}
+    {$DEFINE VER140UP}
+    {$DEFINE DELPHI}
+
+    {$DEFINE DELPHI12}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+    {$DEFINE DELPHI5UP}
+    {$DEFINE DELPHI6UP}
+    {$DEFINE DELPHI7UP}
+    {$DEFINE DELPHI9UP}
+    {$DEFINE DELPHI10UP}
+    {$DEFINE DELPHI11UP}
+    {$DEFINE DELPHI12UP}
+
+    {$DEFINE DELPHI2009}
+    {$DEFINE DELPHI2005UP}
+    {$DEFINE DELPHI2006UP}
+    {$DEFINE DELPHI2007UP}
+    {$DEFINE DELPHI2009UP}
+
+    {$DEFINE BDS}
+    {$DEFINE BDS6}
+    {$DEFINE BDS3UP}
+    {$DEFINE BDS4UP}
+    {$DEFINE BDS5UP}
+    {$DEFINE BDS6UP}
+    {$DEFINE BDS6}
+    {$DEFINE BDS6UP}
+  {$ENDIF}
+
+  {$IFDEF WIN32}
+    {$DEFINE MSWINDOWS} //not automatically defined for Delphi 2 thru 5
+    {$DEFINE 32BIT}
+    {$DEFINE CPU32}
+  {$ENDIF}
+
+{$ENDIF MSWINDOWS}
+
+{ defines for "Delphi for .NET" }
+{$IFDEF CLR}
+  {$DEFINE DOTNET}
+{$ENDIF}
+
+{$IFDEF DELPHI}
+  {$IFDEF DELPHI2UP}
+    {$DEFINE DELPHI_32BIT}
+  {$ENDIF}
+{$ENDIF}
+
+{$IFDEF CBUILDER}
+  {$DEFINE CBUILDER_32BIT}
+{$ENDIF}
+
+{$IFNDEF FPC}
+
+  { Kylix 1.0 thru 3.0 }
+  {$IFDEF LINUX}
+
+    {$DEFINE VER140UP}
+
+    { Any Kylix }
+    {$DEFINE 32BIT}
+    {$DEFINE LINUX32}
+    {$DEFINE KYLIX_32BIT}
+    {$DEFINE KYLIX}
+    {$DEFINE KYLIX1UP}
+
+    {$IFDEF CONDITIONALEXPRESSIONS}
+      {$IF Declared(CompilerVersion)}
+
+         { Kylix 2.0 }
+         {$IF Declared(RTLVersion) and (RTLVersion = 14.1)}
+           {$DEFINE KYLIX2}
+           {$DEFINE KYLIX1UP}
+           {$DEFINE KYLIX2UP}
+         {$IFEND}
+
+         { Kylix 3.0 - Delphi portion }
+         {$IF Declared(RTLVersion) and (RTLVersion = 14.5)}
+           {$DEFINE KYLIX3}
+           {$DEFINE KYLIX1UP}
+           {$DEFINE KYLIX2UP}
+           {$DEFINE KYLIX3UP}
+         {$IFEND}
+
+      { Kylix 1.0 }
+      {$ELSE}
+        {$DEFINE KYLIX1}
+      {$IFEND}
+    {$ENDIF CONDITIONALEXPRESSIONS}
+
+  {$ENDIF LINUX}
+{$ENDIF}
+
+{ CPU }
+
+{$IFDEF FPC}
+  {$IFDEF MSWINDOWS}
+    {$IFDEF CPU64}
+      {$DEFINE WIN64}
+    {$ENDIF}
+  {$ENDIF}
+  {$IFDEF LINUX}
+    {$IFDEF CPU32}
+      {$DEFINE LINUX32}
+    {$ENDIF}
+    {$IFDEF CPU64}
+      {$DEFINE LINUX64}
+    {$ENDIF}
+  {$ENDIF}
+  {$IFDEF DARWIN}
+    {$IFDEF CPU32}
+      {$DEFINE DARWIN32}
+    {$ENDIF}
+    {$IFDEF CPU64}
+      {$DEFINE DARWIN64}
+    {$ENDIF}
+  {$ENDIF}
+{$ENDIF}
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWAbout.dfm b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWAbout.dfm
new file mode 100644
index 0000000..27f554a
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWAbout.dfm
@@ -0,0 +1,4830 @@
+object AboutForm: TAboutForm
+  Left = 366
+  Top = 242
+  BorderIcons = []
+  BorderStyle = bsNone
+  Caption = 'About RemObjects SDK'
+  ClientHeight = 300
+  ClientWidth = 500
+  Color = clBtnFace
+  Font.Charset = DEFAULT_CHARSET
+  Font.Color = clWhite
+  Font.Height = -11
+  Font.Name = 'Tahoma'
+  Font.Style = []
+  OldCreateOrder = False
+  Position = poMainFormCenter
+  OnClick = OnCloseClick
+  OnCreate = FormCreate
+  PixelsPerInch = 96
+  TextHeight = 13
+  object Image1: TImage
+    Left = 0
+    Top = 0
+    Width = 500
+    Height = 300
+    AutoSize = True
+    Picture.Data = {
+      07544269746D6170264E0200424D264E0200000000003604000028000000F401
+      00002C0100000100080000000000F0490200C21E0000C21E0000000100000000
+      000000000000000080000080000000808000800000008000800080800000C0C0
+      C000C0DCC000F0CAA600000000000B0B0B00151515001B1B1B00222222002B2B
+      2B00333333003B3B3B00037F0100434343004B4B4B00535353005B5B5B006060
+      60006A6A6A00727272007E7E7E000A81030017850800248A0D002C8D1000328E
+      1200359014003B91160033921D003E9318003C96250037983200439419004996
+      1B004D981C0053991E0044972300579B20005C9C2200539C2900449D3700629F
+      24004FA03B0065A0250068A126006CA2280073A42A007AA72D007DA82E0067A3
+      30006BA4310077A8360074AA3F007BAA3800429F40004DA244005BA5430062A7
+      42006AAA450076AC44006FB15B0078B1540062AF600067B0620074B567007FB6
+      61007DBA740080A92F0084AA31008BAC330087AE3C008BAF3D0091AE350094B0
+      370095B038009BB23900A3B53C00A9B63E0083B24E008EB349009EB6450094B5
+      4B009BB84E008CB5520085B5590090B95D00A2B74600AEB84000A3B94B00A8B9
+      4800B3BA4200BABC4500A4BB5400B1BF560082BA6C009ABC610082BC760091BE
+      7100C0BE4700C1BF4800ACC05E00B4C05700BEC15100B1C25F009AC27600AFC3
+      6900BBC56500A3C57800BBCA7700BECB7800C4C04800CBC24B00D2C44D00D6C6
+      5000D8C75000DCC85200E2CA5400E8CC5600ECCD5800F0CF5900F4D05B00F8D1
+      5C00CDCB6A00D6CB6400D3CD6C00CBCD7300C4CD7B00DAD27800E8CF6000E4D0
+      6900EDD36C00F4D36500F8D46600E3D27200EBD57500E3D57C00FAD87100FAD9
+      7A00828282008D8D8D00929292009D9D9D0081BF8000A3A3A300ABABAB00B4B4
+      B400BEBEBE0088C1830096C6890098C99200A6C98400BDCD8200BFD18D00A1CE
+      9C00ACD09A00BBD29500B8D49E00A9D1A200B3D5A600B8D7A800BED8AA00BFDF
+      BF00C1D28D00D3D58B00C0D49700CDD59200C4D59800CCD89C00D4DB9F00F4DA
+      8200F8DC8400F0DC8B00E3DA9000ECDD9400F0DF9500ECE09E00F5E09700FAE2
+      9800C2D7A200C1D9AB00C8DCAE00D6DCA000DADCA100D3DDA800D8DFAA00C0DE
+      BC00D0DFB100DEE0AC00CEE1BA00D3E0B200D9E1B400D6E3BD00E9E2A600F5E6
+      AB00F9E7AC00FBE8AD00ECE5B200F5E8B500FBEBB700F3EABE00FCEBB800C4C4
+      C400CDCDCD00C1DFC000D4D4D400DCDCDC00C7E1C200D7E6C800D1E7D000D3E8
+      D000DBEAD300E2E7C200E4EBCC00E9ECCE00F7ECC000FBEDC100F2EDC800FDF0
+      CC00E1ECD500ECEDD000F0EFD100EEF0DA00F4F0D300FAF2D500F5F3DD00F8F4
+      DE00E3E3E300EDEDED00E4F0E000EBF2E300F2F5E600FDF6E000F0F7EF00FCF8
+      E900F1F2F100F4F8F000FBFAF300FFFFFF000000000000000000F0FBFF00A4A0
+      A000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFF
+      FF00000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000010161717150E0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0E0E0E0E11
+      1717171717171717141311100E0C0B000000000B1617171717150E0E0E0E0E0E
+      0E0C0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0C0C0C0C0C0C
+      0C0C0D0E0E0E0E10171717170C00000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000013
+      171717150E0F0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0E0F0E0E0E161717171717171717171717
+      1717171713110F1417171717150F0E0F0E0F0E0E0C0D0D0D0D0D0D0D0C0D0D0C
+      0D0C0D0C0D0C0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0D0E0F0E0E1317171717
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000D0B0000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000013171717140E0E0F0E0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0D0D
+      0D0D0D0E0E0F0E0E111717171717171717171717171717171717171717171716
+      0F0E0F0E0E0E0E0D0D0C0D0D0C0D0D0D0D0C0D0C0D0D0C0D0D0C0D0D0C0D0C0D
+      0C0D0C0D0C0D0C0D0C0C0D0E0E0F0E1317171714000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000000000F17160F0B00
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000015171717130E0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0E0E0F0E0E161617
+      17171717171717171717171717171717171716100E0E0E0E0F0D0D0D0D0D0C0D
+      0D0D0C0D0D0D0D0C0D0C0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0E0E
+      0E0E0E1517171713000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000001117171717160F0B0000000000000000000000
+      0000000000000000000000000000000000000000000000000000001717171713
+      0E0F0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0E0E0E0E0F0E0E10101010131314151617171717
+      171717171717100E0F0E0F0E0E0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D
+      0C0D0C0D0C0D0C0D0C0C0C0C0C0C0C0C0D0C0E0E0F0E0E161717171000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000000000000000B
+      1117171717171717160F0B000000000000000000000000000000000000000000
+      00000000000000000000000000000017171717100E0E0F0E0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D
+      0E0E0F0E0E0E0F0E0E0E0F0E0E0E0E0E0E0F10131415171717110E0E0E0E0E0E
+      0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0C0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C
+      0D0C0D0C0C0D0E0E0E0F0E171717170E00000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000B1417171717171717171717160F
+      0B00000000000000000000000000000000000000000000000000000000000000
+      00000C17171717100E0F0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0E0E0F0E0E0E0F0E0E0E
+      0F0E0F0E0F0E0E0E0F0E0E10100E0F0E0F0E0E0D0D0D0D0C0D0D0D0D0C0D0D0D
+      0C0D0D0C0D0C0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0C0E0F0E0E1017
+      1717170C00000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000C1516171717171617171717171717160F0B000000000000000000
+      000000000000000000000000000000000000000000000C171717170F0E0E0E0F
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0E0D0D0D
+      0D0D0D0D0D0D0D0D0D0E0E0E0E0F0E0E0E0F0E0E0E0F0E0E0E0F0E0E0E0E0F0E
+      0E0E0E0E0E0E0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0C0D0C0D0C0D0C
+      0D0C0D0C0D0C0D0C0D0C0D0C0D0D0E0E0E0F1116171717000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000C15171717171711
+      0E111517171717171717160F0B00000000000000000000000000000000000000
+      000000000000000000000E171717170E0F0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0D0D0D0E0D0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0E
+      0E0E0E0F0E0E0F0E0E0E0E0F0E0E0F0E0F0E0E0E0F0E0F0E0E0E0C0D0D0D0D0C
+      0D0D0D0C0D0D0D0D0C0D0D0C0D0D0C0D0D0C0D0D0C0D0C0D0C0C0C0C0C0C0C0D
+      0C0D0F0E0E0E1317171715000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000C151717171717110E0E0F0E111517171717171717
+      150E000000000000000000000000000000000000000000000000000000001016
+      1717170E0E0F0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0D0E0D0D0D0D0D0D
+      0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0D0E0E0E
+      0E0E0E0E0E0E0F0E0E0E0E0F0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D
+      0C0D0C0D0C0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0D0E0F0E0E151717171300
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000E16
+      17171717160F0F0E0E0E0E0E0F101617171717171717150E0000000000000000
+      00000000000000000000000000000000000010171717150E0E0E0E0E0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0E0E0E0E0F0E0E0D
+      0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0D0C0D0D0C0D0C0D0C
+      0D0C0D0C0D0C0C0C0C0E0E0E0F0E161617171000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000E171717171716100E0E0F0E0F0E0E
+      0E0F0E111517171717171717150E000000000000000000000000000000000000
+      000000000B1016171717140F0E0F0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D
+      0E0D0D0E0D0E0D0E0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0E0D0C0D0D0D0C0D0D0D0C0D0D0D
+      0D0C0D0D0D0D0C0D0C0D0C0D0D0C0D0D0C0D0C0C0C0D0C0D0C0D0C0D0C0E0F0E
+      0E0E171717170F00000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000E1717171717150F0E0E0F0E0E0E0F0E0E0E0E0E0F13161717171717
+      1717150E0000000000000000000000000000000000000B10171717171717130E
+      0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0E0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0C0D
+      0C0D0C0D0D0C0D0D0C0C0C0C0C0D0C0D0C0E0E0E0F10171717170C0000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000E1717171717150F0E
+      0F0E0E0E0F0E0E0F0E0F0E0E0E0E0F111617171717171717150E000000000000
+      00000000000000000B0F1617171717171717130E0F0E0E0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C
+      0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0C0D0D0C0D0D0C0D0C0D0C0C0D0C0D0C
+      0D0C0D0C0D0F0E0E0E10171717170B0000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000E1717171717150F0E0E0E0E0F0E0E0E0E0E0E0E0F0E
+      0F0E0E0F0E131617171717171717150E00000000000000000000000F15171717
+      1717171716100F0E0E0F0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0E
+      0D0E0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D
+      0D0D0C0D0C0D0C0D0C0D0D0C0D0D0D0C0D0C0D0C0C0C0C0C0D0E0F0E0F131617
+      1716000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000000000000000C1717
+      171717150F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0F0E0E0E0F1116171717
+      17171717130C000000000000000C151717171717171716100F0E0E0E0F0E0E0D
+      0E0D0D0D0D0D0D0D0D0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0C0D0C0D0D0C0D0C0D
+      0C0D0C0D0C0D0C0D0C0D0C0D0D0E0E0E0E141717171300000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000C1517171717150F0E0E0E0E0F0E0E0E
+      0E0E0E0D0E0E0E0E0F0E0E0E0F0E0E0E0F131617171717171717130C0000000B
+      131717171717171716100F0E0E0E0F0E0E0E0F0D0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0D0E0D0D0D0D0D0D0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D
+      0D0C0D0D0D0D0C0D0D0C0D0D0C0D0C0D0D0C0D0D0C0D0C0C0C0C0C0D0C0D0C0D
+      0E0E0F0E0E151717171100000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000C1517171717150F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0F0E
+      0E0E0F0E0E0E0F111617171717171717130C0F1517171717171716100F0E0E0E
+      0F0E0E0E0F0E0E0D0E0D0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0E0D0E0D0E0D0D
+      0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0D0C0D0C
+      0D0D0C0D0C0D0C0D0D0C0D0D0C0D0C0C0D0C0D0C0E0E0E0F0E17171717100000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000B1617171717150F0E0E
+      0E0E0F0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0F0E0E0E0F0E0E0E0F131717
+      17171717171717171717171716130E0E0E0E0F0E0E0E0F0E0E0D0D0E0D0D0E0D
+      0D0D0D0D0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0C0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0D0C0D0C0D0C0D
+      0C0D0C0D0C0C0C0C0E0F0E0E0F171717170C0000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000B1417171717150F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0D0E0E0E0E0E0D0E0E0F0E0E0E0F0E0E0F0F13171717171717171717171714
+      0E0E0F0E0F0E0E0E0F0E0E0D0D0E0D0D0E0D0D0E0D0E0D0E0D0E0D0D0E0D0D0E
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C
+      0D0D0D0C0D0D0C0D0C0D0C0D0C0D0D0C0D0D0C0C0D0C0D0C0D0C0D0D0E0E0E0F
+      10161717170B0000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000141717
+      171716100E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0E0E
+      0E0F0E0E0E0E0E0F0F131717171717171715100E0F0E0E0E0E0E0F0E0E0D0E0D
+      0E0D0D0E0D0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0D0D0E0D0E0D0D0D0E0D0D0E
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0D0C
+      0D0C0D0D0C0D0D0C0C0D0C0C0D0C0C0D0F0E0E0E131717171700000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000001117171717160F0E0F0E0F0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0E0E0F0E0F0E0E0E0F0F13
+      17171716130E0E0F0E0E0F0E0F0E0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D
+      0E0D0D0E0D0D0E0D0E0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D
+      0D0D0C0D0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0C0D0C
+      0C0D0C0D0E0F0E0E141717171300000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000101617171717100E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E
+      0D0E0E0E0E0E0E0D0E0E0E0E0E0E0E0F0E0E0E0F0F13150F0E0F0E0E0E0F0E0E
+      0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0D0D0D0D
+      0E0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D
+      0D0C0D0C0D0C0D0C0D0D0C0D0D0C0C0D0C0D0C0D0C0D0C0E0E0E0F0E15171717
+      1300000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000E1717171717110E0E0E
+      0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E
+      0E0E0E0E0F0E0E0E0E0F0E0E0E0E0E0F0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0D
+      0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0C0D0D0C0D0D0C0D0D0C
+      0D0D0C0D0C0C0C0D0C0D0C0E0E0F0E0E17171717100000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000C1517171717130E0F0E0F0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0E0E0E0F0E0F0E0E0E0F
+      0E0F0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0D0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D
+      0C0D0D0D0C0D0D0D0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0C0D0C0D0C0D0C0D0E
+      0E0E0E0F171717170D0000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000000000B151717
+      1717140E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E
+      0E0E0E0D0E0E0D0E0E0D0E0E0E0E0E0E0E0F0E0E0E0E0E0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0E0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D
+      0C0D0C0D0D0C0D0D0C0D0C0D0C0D0C0C0C0C0C0F0E0F0E10171717170C000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000001317171717150F0E0E0E0F0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0D0E0E0E0E0E0F0E0F0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0C0D0C0D0D0C0D0C
+      0D0C0D0C0D0C0D0E0E0E0E11171717170B000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000001017171717160F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0D0E0E0E0E0E0D0E0E0E0E0D0E0E0D0E0E0D0E0E0E0D0E0E0E0E0E0E0E0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D
+      0D0D0C0D0D0C0D0D0C0D0D0C0D0D0C0D0C0D0C0C0C0C0D0C0D0C0D0F0E0F0E13
+      17171717140B0000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000C1717171717100E0F0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0D0E0E0D0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D0C0D0C0D0C
+      0D0C0D0D0C0D0C0D0C0D0C0D0C0D0E0E0E0E0F131717171717160B0000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000B1517171717130E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0E0D0E0E0D0E0E0D0E0E0E0D0E0E
+      0D0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D
+      0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0C0D0D0C0D0C0D0C0C0C
+      0C0C0E0E0F0E0E0E131717171717160D00000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000131717
+      1717140E0F0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D
+      0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E
+      0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D
+      0C0D0C0D0C0D0C0D0D0C0D0C0D0D0C0D0C0D0C0D0C0D0E0E0E0E0F0E0E101617
+      171717170E000000000000000000000000000000000000000000000000000000
+      00000000000000000C0E110E0000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000F17171717160E0F0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0E0D0E0E0D0E
+      0E0D0E0E0E0D0E0E0D0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0E0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0C0D0D0C0D
+      0C0D0C0C0C0D0C0D0C0C0C0E0E0F0E0E0F0E0F1617171717170E000000000000
+      00000000000000000000000000000000000000000000000B0D0F141617171716
+      0B00000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000C17171717150E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0E0D0E0E0E0D
+      0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E
+      0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D
+      0C0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C
+      0E0E0E0E0E0E0F0F1517171717170E0000000000000000000000000000000000
+      000000000000000C0F1315161717171717171717130000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000001317171717110E
+      0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D
+      0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0C
+      0D0C0D0D0C0D0C0D0D0C0D0C0C0C0C0C0D0C0C0D0C0D0E0F0E0E0E0E0F151717
+      171717110000000000000000000000000000000000000C0E1014171717171717
+      1717171717171717171000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000B17171717160F0E0E0F0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0C0D0C0D0D0C0D0C0D0D0C0D
+      0C0D0C0D0C0D0C0C0C0D0D0E0E0F0E0E0E0F1417171717171100000000000000
+      00000000000B0D0F141517171717171717171717171717171717171717170C00
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00001016171717130E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D
+      0D0D0D0D0D0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D
+      0D0D0C0D0D0D0C0D0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0C0C0D0C0D0C0C0C0D
+      0E0E0F0E0E0E0F1317171717170E000000000000000C0F131516171717171717
+      1717171717171717171615131013171717171400000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000B15161717170F0F0E0F
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0E0D0D0E0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0C0D0C0D0D0C
+      0D0C0D0D0C0D0C0C0D0C0D0C0D0C0D0C0D0C0D0C0C0E0E0F0E0E0E0F13171717
+      17170E000C0E101417171717171717171717171717171717171513110F0E0E0E
+      0E0E151717171710000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000E17171717150E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D
+      0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0C0D0D0C0D0C0C0C0D0C
+      0C0D0C0D0C0D0C0D0C0C0E0E0E0F0E0E0E141717171717161717171717171717
+      1717171717171717151411100E0E0E0F0E0F0E0F0E0E0F16171717170B000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      1317171717100E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D
+      0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D
+      0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D
+      0C0D0D0C0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0D0C0C0C0D0C0C0E
+      0E0E0E0F0E0E1417171717171717171717171717171717171413100F0E0F0E0E
+      0F0E0E0E0E0E0E0E0F0E0E111717171713000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000C16171717160E0E0F0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0E0D0D0E0D0D0E0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0C0D0D0C0D0C0D0D0C
+      0D0C0D0C0D0C0C0D0C0D0C0D0C0D0C0D0C0D0C0D0E0E0E0E0F0E0E1517171717
+      17171717171717151410100E0E0F0E0E0E0E0E0F0E0E0F0E0F0E0F0E0E0E0F0E
+      15171717170E0000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000001117171717130E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D
+      0C0D0D0D0C0D0D0D0D0C0D0D0C0D0D0C0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0C
+      0C0D0C0C0D0C0D0C0D0E0E0E0E0E0F0E151717171717161413100E0E0E0F0E0E
+      0E0E0E0F0E0F0E0E0E0F0E0E0E0E0E0E0E0E0E0E101617171716000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000000000000000B1517
+      1717160F0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0D0E
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0E0D
+      0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D
+      0C0D0C0D0D0C0D0D0C0D0C0C0C0C0D0C0D0C0D0C0D0C0D0C0C0D0C0C0C0D0E0E
+      0F0E0E0E0F151413100F0E0E0E0E0E0F0E0E0E0F0E0F0E0E0E0E0E0F0E0E0D0D
+      0C0C0C0D0E0F0E0E0E1317171717110000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000001016171717140E0F0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0C0D0D0C0D0C0D0D0C0D0C0D0C0D
+      0C0D0C0C0C0C0D0C0C0C0D0C0D0C0D0C0D0C0D0D0E0E0F0E0E0E0F0E0E0F0E0F
+      0E0F0E0E0E0F0E0E0E0E0E0F0E0D0D0C0C0C0C0C0C0C0C0C0E0E0E0F0E0F1517
+      1717170C00000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000015171717170F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D
+      0D0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D
+      0D0D0C0D0D0C0D0C0D0D0C0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0C0D0C0D0C0D
+      0C0C0D0C0C0C0D0C0E0E0E0E0F0E0E0E0F0E0E0E0E0E0E0F0E0E0E0E0E0D0D0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0E0E1017171717130000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000C17171717
+      150E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0C0D0D
+      0C0D0D0C0D0C0C0D0C0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0D0C0C0C0E0E0F
+      0E0E0F0E0E0E0F0E0F0E0E0E0D0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0D0F0E0F0E0E14171717170E00000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000001317171717110E0F0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D
+      0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0C0D0D0C0D0C0D0D0C0C0D0C0C0D
+      0C0D0C0D0C0C0C0C0C0D0C0D0C0C0D0C0C0C0E0E0E0F0E0E0F0E0E0D0D0D0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0E0F0F17171717
+      1500000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000B17171717160E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D
+      0C0D0C0D0D0C0D0C0D0C0D0D0C0D0C0D0C0D0C0C0D0C0C0C0D0C0D0C0D0C0D0C
+      0D0C0C0D0C0C0C0E0E0E0E0D0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0F0E0E0E0E13171717170F00000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000001016171717130E
+      0F0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0E0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0C0D0D0C0D0D0C0D0C
+      0D0D0C0C0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0D0C0C0D0C0D0C0C0C0C
+      0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D
+      0F0E0F0E0F161717171600000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000B15171717160F0E0E0F0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D
+      0C0D0D0D0C0D0D0D0C0D0D0C0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0C0C0D0C0C
+      0D0C0D0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0E0E11171717171000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000E17171717140F0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0E0D0D0D
+      0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0C0D0D
+      0C0D0D0C0D0C0D0D0C0D0C0D0C0C0D0C0D0C0D0C0C0C0C0D0C0D0C0D0C0D0C0D
+      0C0D0C0D0C0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0D0F0E0F0E0E16171717150B000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000001417171717100E0F0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C
+      0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0C0D0D0C0D0D0C0D0C0D0D0C0D0C
+      0D0C0D0C0C0C0D0C0D0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0D0C0C0C0C0C0C0D
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E
+      0F0E111717171711000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000C17171717150E0E0F0E0E0E0E0E0E0E0E0E0D0E0E
+      0E0E0E0D0E0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D
+      0D0D0C0D0D0C0D0C0D0C0D0C0D0D0C0D0C0D0C0C0D0C0C0D0C0D0C0D0C0D0C0D
+      0C0D0C0D0C0D0C0C0C0C0C0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0E0E0E0E16161717170B000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      1117171717110F0E0E0F0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0E0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0C0D0D0C0D
+      0C0D0D0C0D0C0D0C0C0D0C0D0C0C0D0C0D0C0C0C0C0D0C0D0C0C0D0C0D0C0D0C
+      0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0E0F0E0F0E111717171710000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000B16171717160F0E0E0E0E0E
+      0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D
+      0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0C0D0D0C0D0C0D0C0C0D0C0D0C0C
+      0D0C0C0C0C0D0C0D0C0C0D0C0D0C0C0C0C0C0C0C0C0C0D0C0D0C0D0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0E0E0E0E
+      1616171716000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000001016171717130E0F0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E
+      0E0D0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0D0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D
+      0D0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C
+      0D0C0D0C0D0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C
+      0D0C0D0C0D0C0C0C0C0C0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0F0E0E111717171710000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000001517
+      1717170F0E0F0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0C0D0C0D0C0D0C0D0D
+      0C0D0C0D0C0C0D0C0D0C0D0C0C0D0C0D0C0D0C0D0C0D0C0C0C0C0D0C0D0C0C0C
+      0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0D0E0E0F0E0E1616171716000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000D17171717150E0E0F0E0E0E0E0E
+      0E0E0E0D0E0E0E0E0E0D0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D
+      0D0E0D0D0D0D0D0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C
+      0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0D0C0D0C0D0D0C0C0C0D0C0C0D0C0D0C0D
+      0C0C0C0C0D0C0D0C0C0C0C0C0D0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0E0F101717
+      17170E0000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000001317171717100F0E0E0F0E0E0E0D0E0E0E0E0E0D0E0E0E0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D
+      0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0D0C
+      0D0D0C0D0D0C0D0C0D0C0D0C0C0D0C0C0C0C0C0D0C0D0C0D0C0D0C0D0C0D0C0C
+      0C0C0D0C0D0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0D0E0F0E0E0E1617171715000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000C16171717
+      160E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0E0D0D0E0D0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C
+      0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D0C0D0C0D0C0D0C0D0D0C0D0C0D0C
+      0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0E0E0E0F0E13171717170D0000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000001017171717130E0F0E0E0E0E0E0E0E0E
+      0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D
+      0D0E0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D
+      0D0C0D0D0D0C0D0D0C0D0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D
+      0C0D0C0C0D0C0C0C0D0C0C0C0C0D0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0E0E0E0F1617171713
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000B15171717160F0E0F0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D
+      0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0E0D0D0E0D0D0D0E0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0C0D0C0D0C0D0D
+      0C0D0C0D0C0C0D0C0C0C0D0C0D0C0C0C0C0C0C0D0C0D0C0D0C0D0C0C0C0C0D0C
+      0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0E0F0E0E0E14171717170B0000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000001117171717110E
+      0E0F0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E
+      0D0D0E0D0D0E0D0E0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D
+      0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0C0D0D0C0D0D0D0C0C0D0C0D0C0C
+      0C0D0C0D0C0D0C0C0D0C0D0C0D0C0D0C0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E
+      0F0E0E0F17171717100000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000B15171717160F0E0E0E0E0E0E0E0E0D0E0E0E0E
+      0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C
+      0D0D0C0D0D0C0D0C0D0D0C0D0C0D0C0D0C0C0D0C0D0C0D0C0D0C0D0C0C0D0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0F0E0E1517171716000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      1017171717110E0F0E0F0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0C0D0C0D0D0C0D0C0D0C
+      0D0C0D0C0D0C0D0C0C0D0C0D0C0D0C0D0C0C0D0C0D0C0C0C0C0D0C0D0C0D0C0C
+      0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0E0E0E0E0F10171717170E0000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000B15171717160E0E0E0F0E0E0E
+      0E0E0D0E0E0E0E0E0D0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D
+      0D0E0D0E0D0D0E0D0D0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C
+      0D0D0D0C0D0D0D0D0C0D0D0C0D0C0D0D0C0D0D0C0D0C0C0C0D0C0C0D0C0C0C0C
+      0C0C0D0C0D0C0D0C0D0C0D0C0C0C0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0F0E0F0E0E
+      0F16171717140000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000001017171717110E0F0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0E0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D
+      0C0D0C0D0C0D0C0D0D0C0D0C0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C
+      0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0E0E0E0F151717171716000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000000000B1517171716
+      0E0E0E0E0F0E0E0D0E0E0E0E0E0D0E0E0E0E0E0E0D0E0E0D0E0D0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C
+      0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0C0D0C0D0D0C0D0D0C0D0C0D0C0D0C
+      0D0C0D0C0D0C0D0C0D0C0C0C0D0C0C0C0D0C0C0D0C0D0C0C0C0D0C0D0C0D0E15
+      1415141514151415110C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0E0E0F0E0F0E0F1517171717150C000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000001017171717110E0F0E0E0E0E0E0E0E0E0D0E
+      0E0E0E0E0D0E0E0E0E0D0E0E0E0D0E0E0D0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D
+      0D0E0D0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D
+      0D0C0D0D0D0C0D0D0C0D0D0C0D0D0C0D0D0C0D0C0C0D0C0D0C0D0C0D0C0D0C0D
+      0C0D0C0D0C0D0C0C0C0E151A9197CFE8F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      CFCF939114130C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0F0E0E0E0F151717171716
+      0B00000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000015171717160E0E0E0F0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D
+      0E0E0D0E0E0E0D0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0E0D0D0E0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0C0D0C0D
+      0C0D0D0C0D0C0C0D0C0C0C0C0C0C0C0C0C0D0C0C0C0D0C0C0E1791CFF0F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3D29518130C
+      0C0C0C0C0C0C0E0E0F0E0E0F0E1517171717160C000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000E17171717110E0F0E0E0E
+      0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0D0D0D0E0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D
+      0D0C0D0D0D0C0D0D0D0C0D0D0C0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D
+      0C0D0C0D0C0C0D0C0F1693D2F3F3F3F3F3F3F3F3F3F0CFCF9091901614141414
+      141414131990909507D2F3F3F3F3F3F3F3F3F3F0971A130C0C0E0E0F0E0E0E0F
+      1517171717160B00000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000014171717160F0E0E0E0F0E0E0E0E0D0E0E0E0E0D0E0E0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0E
+      0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D
+      0C0D0D0C0D0C0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C101ACFF3F3F3F3
+      F3F3F3E8CF9116140C0C0C0C0C0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B0B0B0F
+      131995D0F3F3F3F3F3F3F3E893180E0E0E0F0E1517171717160C000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000000000C171717
+      17130E0F0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0C0D0D0C0D0D0C0D0C0D
+      0D0C0D0C0D0C0D0C0D0C0F1AD2F3F3F3F3F3F3D29316100C0C0C0C0C0C0C0C0C
+      0C0C0B0C0C0B0C0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B139097E9F3F3F3
+      F3F3F096140F1517171717160B00000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000011171717170F0E0E0F0E0E0E0E0E0E0E
+      0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C
+      0D0D0D0C0D0D0D0C0D0C0D0C0D0D0C0D0D0C0D0C0D0C0C0C0C0C0C0C1797F3F3
+      F3F3F3F096180F0C0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0C0B0C0B0B0C
+      0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B1392D0F3F3F3F3F3E995181717150C
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000B0C0E17171717140E0F0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0E0D0D
+      0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0D0C
+      0D0C0D0C0D0D0C0D0C0D0C0D0C0F91E8F3F3F3F3E996170D0D0D0D0D0D0D0C0C
+      0D0C0C0C0C0C0C0C0C0C0C0C0B0C0B0C0B0C0B0B0C0B0B0B0B0B0B0B0B0B0B0B
+      0B000B0B000B00000E19D0F3F3F3F3F3CF900C00000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000B0C1010131616171717171717100E0E0F
+      0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D
+      0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0C0D0D0C0D0D0C0D0C0D0D0C0D0C10
+      96E9F3F3F3F397190E0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B
+      0C0C0C0B0C0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B0B000B0010
+      92E9F3F3F3F30714000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000000000000000C0D0F
+      131317171717171717171717171717160E0F0E0E0E0E0E0E0E0E0E0E0E0D0E0E
+      0E0E0D0E0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D
+      0D0D0D0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D
+      0D0C0D0D0C0D0C0D0C0D0C0D0D0C0D0C0D1096F3F3F3F3F091110E0E0D0D0D0D
+      0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0C0B0C
+      0B0B0B0B0B0B0B0B0B0B0B000B0B000B00000B0000001707F3F3F3F3D3170000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000B0C0E10131517171717171717171717171717171717
+      171717130E0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0C
+      0D0D0C0F95F3F3F3F3E8190E0E0D0E0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D
+      0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B0B
+      000B0B000B0B000B000B00001093F3F3F3F3D311000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000B0C101013161617
+      17171717171717171717171717171717171717171614130F0E0F0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0D0E0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D
+      0C0D0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0D0C0D0C0F91E9F3F3F3E8190E0E0E
+      0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C
+      0C0B0C0B0C0B0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B000B0B000B00000B000B00
+      00000EF7F3F3F3F3070F00000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000C0D0F1313171717171717171717171717171717171717171717
+      171715141311100E0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E
+      0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D
+      0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C
+      0D0C0D0C0D0C0D0D17E8F3F3F3E8190E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D
+      0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0B0C0B0B0B
+      0B0B0B0B0B0B0B0B0B0B000B0B000B0B000B00000B0000000EF7F3F3F3F3910B
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000B161717171717
+      17171717171717171717171717171717151313100F0E0E0F0E0E0E0E0F0E0E0E
+      0E0E0F0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0E0D0D0D0E0D0D0E0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0C0D0D0C0D0D10CFF3F3F3F0
+      190E0F0E0E0E0E0E0E0E0E0E0D0E0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C
+      0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B0B00
+      0B0B000B00000B00000B000000000E98F3F3F3E9170000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000D171717171717171717171717171717161413
+      11100F0E0E0E0E0F0E0F0E0E0E0F0E0E0E0E0F0E0F0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0D0E0E0E0E0D0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D
+      0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0D0E0E0E0D0E0E
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D
+      0D0D0C0D0D0D0D0C0D0C0D0D0C1AF0F3F3F392100F0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B
+      0C0C0B0C0B0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B000B0B000B0B000B00000B00
+      0000000013D3F3F3F3070D000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      001016171717171717171715141311100E0E0F0E0E0E0E0E0F0E0E0E0E0E0E0F
+      0E0E0F0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0E0D0D0D0E0D0D0E0D
+      0D0E0D0D0D0D0D0E0E0E0F0E0E0F0E0E0E0F0E0E0E0F0E0E0E0E0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0C10
+      CFF3F3F3D0130E0F0E0F0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D
+      0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0C0B0B0B0B0B
+      0B0B0B0B0B0B0B0B0B000B0B000B000B000B00000B0000000000F8F3F3F3E917
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000013171717161413100F0E0E
+      0E0E0E0E0F0E0E0F0E0F0E0E0E0F0E0F0E0F0E0E0E0F0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0E0D0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0E0E0E0E0E0F0E0E0E
+      0F0E0E0F0E0E0E0F0E0E0E0E0E0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D
+      0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C19F0F3F3F0900F0F0E0F0E0F0E0E
+      0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C
+      0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B
+      0B000B000B000B00000B00000000000E98F3F3F3960B00000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000017171717130E0E0E0E0E0F0E0F0E0E0E0E0F0E0E0E0F0E
+      0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E
+      0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0E0D0E0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D
+      0D0D0D0E0D0D0E0D0E0E0E0E0E0F0E0E0E0E0F0E0E0E0F0E0E0F0E0E0E0F0E0F
+      0E0F0E0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0D
+      0C0D0D0C0F95F3F3F3D0130F0F0F0F0E0F0F0E0F0E0F0E0E0E0E0E0E0E0E0E0E
+      0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B
+      0C0B0C0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B000B000B0000000B
+      000000000019F3F3F3E80F000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000000000C171717
+      17100E0F0E0F0E0E0E0E0F0E0F0E0E0E0F0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0E0D0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0E0E0E0E0F
+      0E0E0F0E0F0E0E0E0F0E0E0E0F0E0E0F0E0E0E0E0E0E0F0E0F0E0F0E0E0D0D0D
+      0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0D0D10D2F3F3F3910F0F0F
+      0F0E0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D
+      0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0C0B0B0B0B
+      0B0B0B0B0B0B0B0B000B0B000B0000000B000B000000000000000FD0F3F3F319
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000010161717170E0E0E0F0E0E0F0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0D0E0D0D0E0E0E0E0F0E0E0E0F0E0E0E0E0F111313151515
+      151515141313100F0E0E0E0E0E0E0E0E0E0F0E0D0D0D0D0D0D0D0C0D0D0D0C0D
+      0D0D0D0C0D0D0D0D0C0D15F0F3F3E8150F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F
+      0E0E0E0E0E0E0E0E0E0E0D0E0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C
+      0C0C0C0C0C0C0B0C0C0B0C0B0C0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B
+      000B0B000B00000B000000000000000C93F3F3F3930000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000013171717150F0E0E0E0E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E
+      0D0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0E
+      0E0E0E0F0E0E0F0E0E0E1114151717171717171717171717171717171513100E
+      0F0E0F0E0E0E0E0E0E0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D18F3F3
+      F398110F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E
+      0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C
+      0B0C0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B00000B00000B000B00
+      000000000017E9F3F3D00B000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000015171717130E0F0E
+      0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0E0E0E0F0E0E0E0F0E0F13161717
+      1717171717171717171717171717171717171715110F0E0E0F0E0F0E0E0E0D0D
+      0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C96F3F3F392100F0F0F0F0F0F0F0F0F0F
+      0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D
+      0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0B0B0C0B0B0B0B0B
+      0B0B0B0B0B0B0B000B0B000B0B000B00000B00000000000000000FE8F3F3D30F
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000B16171717110E0E0E0E0E0E0F0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E
+      0D0D0E0D0D0E0E0F0E0E0E0F0E0F141717171717171717171717171717171717
+      17171717171717171716130F0E0E0E0E0F0E0E0E0C0D0D0D0C0D0D0D0C0D0D0D
+      0C0D0D96F3F3F01A100F100F0F0F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E
+      0E0E0E0E0E0E0E0E0E0D0E0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C
+      0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B00
+      0B000B000B00000B000000000000000BD0F3F3E90F0000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000000000000000C
+      171717170F0F0E0F0E0E0E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0F0E0E0E0F0E0F
+      1317171717171717171717171313100F100F1013141717171717171717171716
+      110F0E0E0E0E0F0E0E0C0D0D0D0D0C0D0D0D0C0D0D0ED2F3F3F015100F100F10
+      0F100F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E
+      0D0E0D0E0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B
+      0C0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B000B000B0000000B0000
+      000000000BF7F3F3E90F00000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000010161717170E0E0E0E0E0F0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0E0D0E0E0E0E0F0E0E11161717171717171716110E0B00
+      000000000000000000000C0F14171717171717171715100E0F0E0E0E0E0E0D0D
+      0C0D0D0D0C0D0D0D0ED2F3F3F016100F100F100F100F0F0F0F0F0F0F0F0F0F0F
+      0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D
+      0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0C0B0B0B0B0B0B
+      0B0B0B0B0B0B000B0B000B000B000B000B00000000000000000093F3F3F31700
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000011171717150E0F0E0F0E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E
+      0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0F
+      0E0F0E0E0F1417171717171717130E0000000000000000000000000000000000
+      000B101516171717171716110E0E0F0E0E0E0E0D0D0D0C0D0D0D0C0FD2F3F3D2
+      11101010100F100F100F100F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E
+      0E0E0E0E0E0E0E0E0D0E0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C
+      0C0C0C0C0B0C0C0B0C0B0C0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B
+      0000000B00000B000000000000000091F3F3F317000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000001417171714
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0F0E0E0E0E101517171717171713
+      0C00000000000000000000000000000000000000000000000E15171717171717
+      140E0E0F0E0E0E0E0D0D0D0C0D0D0FD2F3F3D2131010101010100F100F100F0F
+      100F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D
+      0E0D0E0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C
+      0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B0B00000B0000000B000000
+      0000000017F3F3F3110000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000017171717130E0F0E0E0E0F0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0E0E0E0E0F0E10161717171717150C00000000000000000000000000
+      000000000000000000000000000010151717171717150F0E0E0F0E0E0E0C0D0D
+      0D0CCFF3F3D31110101010101010100F100F100F0F0F0F0F0F0F0F0F0F0F0F0F
+      0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D
+      0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0B0B0C0B0B0B0B0B0B0B
+      0B0B0B0B0B000B0B000B000B000B000B00000000000000000017F3F3E90F0000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000B17171717100E0E0F0E0E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E
+      0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0E0F0E0E0E101617
+      1717171710000000000000000000000000000000000000000000000000000000
+      0000000B141717171717150F0E0E0E0F0E0D0D0D0D96F3F3D213101010101010
+      101010100F100F100F100F0F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E
+      0E0E0E0E0E0E0E0D0E0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C
+      0C0C0C0C0C0B0C0C0B0C0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B00
+      0B000B00000B00000000000000001AF3F3E90F00000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000C171717170F0E0F0E0E
+      0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0E0E0E0E0F0E101617171717150D0000000000000000
+      0000000000000000000000000000000000000000000000000011171717171715
+      0F0E0E0E0E0E0D0D93F3F3F0131011101010101010101010100F100F100F100F
+      0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E
+      0D0E0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B
+      0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B000B000B0000000B00000000
+      00000093F3F3E90B000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000010161717170E0E0E0E0F0E0E0E0E0E0F0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0F
+      0E0E0E0F1617171717160C000000000000000000000000000000000000000000
+      00000000000000000000000000000E1717171717140F0E0F0E0E0E19F3F3E916
+      11101010101010101010101010100F100F100F0F100F0F0F0F0F0F0F0F0F0E0F
+      0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D
+      0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0C0B0B0B0B0B0B0B0B
+      0B0B0B0B000B0B000B000B000B000B00000000000000000093F3F3D00B000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000001017
+      1717150E0F0E0E0E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0E0E0F0E0F1517171717140B0000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000E1717171717130E0E0F0E16F3F3F31611101110111010101010101010
+      1010100F100F100F0F0F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E
+      0E0E0E0E0E0E0D0E0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C
+      0C0C0B0C0C0B0C0B0C0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B0000
+      000B00000B0000000000000000D0F3F393000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000013171717150E0E0F0E0E0E0F0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0F0E0E0E0E1317171717160B000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000E1717171717100E
+      0E13E9F3F3901111101110101110101010101010101010100F100F100F100F0F
+      0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D
+      0E0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C
+      0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B0B00000B0000000B0000000000
+      000BD0F3F31A0000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000013171717130F0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E
+      0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D0E0E0E0F0E0F101717
+      1717160B00000000000000000000000000000000000000000000000000000000
+      000000000000000000000000001016171717160E0FD2F3F39610111110111110
+      101110101010101010101010100F100F100F100F0F0F0F0F0F0F0F0F0F0F0F0E
+      0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D
+      0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0B0B0C0B0B0B0B0B0B0B0B0B
+      0B0B0B000B0B000B000B000B000B000000000000000010E9F3F3110000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000017171717130E
+      0E0F0E0E0E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E
+      0D0D0D0D0E0D0D0E0D0D0D0E0E0E0E0E0F15171717170E000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000013171717171393F3F3D01111111111101110111011101010101010101010
+      10100F100F100F0F100F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E
+      0E0E0E0E0E0D0E0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C
+      0C0C0C0B0C0C0B0C0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B000B00
+      0B00000B0000000000000014F3F3E90B00000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000017171717100E0F0E0E0E0E0E0F0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D0E
+      0F0E0F0E13171717171300000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000B1517171792F3F3F014
+      11111110111110111011101011101010101010101010100F100F100F0F0F0F0F
+      0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E
+      0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0B0B
+      0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B000B000B0000000B000000000000
+      91F3F30700000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000C16171717100E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E
+      0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0E0E0E0E0F16171717150B0000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000D171718F0F3F31811111111111111111011101110
+      1010101010101010101010100F100F100F100F0F0F0F0F0F0F0F0F0F0E0F0F0E
+      0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0C
+      0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0C0B0B0B0B0B0B0B0B0B0B
+      0B0B000B0B000B000B000B000B0000000000000000D0F3F31900000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000111314131314131314131314100F100F0C0C0B0000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000C171717170F0F0E0E0E0E
+      0F0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D
+      0D0E0D0D0E0D0E0F0E0F0E13171717170E000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      1317D0F3F3931111111111111111111110111011101110101010101010101010
+      100F100F100F100F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E
+      0E0E0E0E0D0E0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C
+      0B0C0C0B0C0B0C0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B0000000B
+      00000B0000000000000EE9F3F30F000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000B17171717
+      17171717171717171717171717171717151310100C0B00000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000C171717170E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0E0E0E0E0F16
+      1717171500000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000C93F3F3D213111111111111
+      111111111110111011101110101010101010101010100F100F100F0F100F0F0F
+      0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D
+      0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0C
+      0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B0B00000B0000000B000000000014F3
+      F3D0000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000001017171717171717171717171717171717
+      171717171717171717171713100E0C0000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000101617
+      17170E0F0E0E0F0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0D0E0D0D0E0D0D0E0D0E0E0F0E0E11171717170E0000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000BF0F3F31711111111111111111111111111101110111010
+      11101010101010101010100F100F100F0F0F0F0F0F0F0F0F0F0F0F0F0F0E0F0E
+      0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0C0C
+      0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B
+      0B000B0B000B000B000B000B0000000000000096F3F31A000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000001617171717171717171717171717171717171717171717171717171717
+      1717171713000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000010171717160E0E0E0F0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0D0E0E0E0F0E1517171715000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000096F3F393
+      1311131111111111111111111111111011101110101010101010101010101010
+      0F100F100F100F0F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E
+      0E0E0E0D0E0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C
+      0C0B0C0C0B0C0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B000B000B00
+      000B00000000000CE9F3E90E0000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000E171717171413111313
+      131514151514171717171717171717171717171717171717170B000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000010161717150E0F0E0E0E0E0E0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E
+      0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0E0E0F0E0E0F171717171000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000011F3F3D313111311131111111111111111
+      1111111110111011101110101010101010101010100F100F100F100F0F0F0F0F
+      0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D
+      0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0B0B0C0B
+      0B0B0B0B0B0B0B0B0B0B0B000B0B000B000B000B0000000B0000000019F3F398
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000013171717160E0E0F0E0E0E0E0F0E0E0E0E0E0E101011
+      131415171717171717171717170D000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000010171717150E0E
+      0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E
+      0D0D0D0D0E0D0D0E0D0E0E0E0F11171717170B00000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000D3F3F31913111313111311111111111111111111111110111011101110
+      101010101010101010100F100F100F0F100F0F0F0F0F0F0F0F0F0E0F0F0E0F0F
+      0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0C0C0D
+      0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B
+      000B0B000B000B000B000B00000000000007F3F3110000000000000000000000
+      00000000000000000000000000000000000000000000000000000000000B1717
+      1717130F0E0E0E0F0E0E0E0E0F0E0F0E0E0E0F0E0E0E0E0E0F10131515171717
+      1710000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000013171717150E0F0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0E0F0E0E
+      0E14171717150000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000019F3F397131313111311
+      131113111111111111111111111110111011101011101010101010101010100F
+      100F100F0F0F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E
+      0E0E0D0E0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C
+      0C0B0C0B0C0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B0000000B0000
+      0B0000000010F3F3D30000000000000000000000000000000000000000000000
+      000000000000000000000000000000000010171717170F0E0E0F0E0E0F0E0F0E
+      0E0E0E0F0E0E0E0E0F0E0F0E0E0F0E0E0E151717171300000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0013171717150E0E0E0F0E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D
+      0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0E0F0E0E1717171710000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000BF0F3F014131313111313111311111111111111111111
+      11111110111011101010101010101010101010100F100F100F100F0F0F0F0F0F
+      0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D
+      0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0C0B0B
+      0B0B0B0B0B0B0B0B0B0B000B0B000B0B00000B0000000B00000093F3F3170000
+      00000C0000000000000000000000000000000000000000000000000000000000
+      000000000016171717140E0F0E0E0E0F0E0E0E0E0F0E0E0E0F0E0F0E0E0E0E0E
+      0F0E0E0F0E131717171600000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000013171717140E0F0E0E0E0E
+      0F0E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0E
+      0D0D0E0D0E0F0E0E0F171717170E000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000000000000001AF3F3
+      F713131313131113131113111311111111111111111111111011101110111010
+      1010101010101010100F100F100F100F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E
+      0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C
+      0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B00
+      0B0B000B000B000B000B000000000CE9F3E90B000C1317150C00000000000000
+      0000000000000000000000000000000000000000000000000E17171717110E0E
+      0E0F0E0D0E0E0E0E0E0E0E0E0E0E0E0E0F0E0F0E0E0E0F0E0E10171717170B00
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000013171717130E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0D0E0E0E0E0E0D0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0E0D0D0E0D0D0E0E0E0E0F10171717
+      170C000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000BF0F3E8151313131313111311131311
+      1113111111111111111111111110111011101110101010101010101010100F10
+      0F100F0F100F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E
+      0E0D0E0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B
+      0C0C0B0C0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B000B000B00000B
+      000000F8F3F3921417171717160B000000000000000000000000000000000000
+      00000000000000000000000013171717160E0F0E0E0E0E0D0D0D0D0D0D0D0E0D
+      0E0D0E0D0E0E0E0E0E0E0E0E0F0F171717170D00000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000131717
+      17130E0F0E0E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0D0E0D0E0D0D0E0D0E0E0F0E0E11171717170000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000001AF3F391131313131313131313111311131111111111111111111111
+      111110111011101011101010101010101010100F100F100F0F0F0F0F0F0F0F0F
+      0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D
+      0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0B0B0C0B0B0B
+      0B0B0B0B0B0B0B0B0B000B0B000B000B000B0000000B000CE9F3F01817171717
+      17160C000000000000000000000000000000000000000000000000000000000B
+      17171717130E0E0F0E0E0D0E0D0E0D0E0D0E0D0D0E0D0D0D0D0D0D0D0E0E0E0F
+      0E0E171717171000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000013171717130E0E0E0F0E0F0E0E0E0E
+      0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0D0D0E0D0D0D0E
+      0E0E0E0F13161717160000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000BF0F3E81313131313
+      1313131311131311131113111111111111111111111111101110111010101010
+      10101010101010100F100F100F100F0F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E
+      0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C
+      0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B
+      0B000B000B000B000B000000F8F3F396171717171717160B0000000000000000
+      0000000000000000000000000000000000000011171717170F0F0E0E0E0E0E0D
+      0D0E0D0E0D0D0E0D0D0E0D0D0D0D0E0D0D0E0E0E0E0F14171717130000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000013171717130E0F0E0E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E
+      0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0E0D0D0E0D0E0D0D0E0D0E0D0E0F0E0E1317171713000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000001AF3F3911313131313131313131313111313111311
+      13111111111111111111111110111011101110101010101010101010100F100F
+      100F100F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E
+      0D0E0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B
+      0C0B0C0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B0000000B00000B00
+      0CE9F3E917171617171717170E00000000000000000000000000000000000000
+      0000000000000B15171717150E0E0E0F0E0D0D0E0D0D0D0D0E0D0D0E0D0D0D0E
+      0D0D0D0D0D0E0E0F0E0E13171717150000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000001417171716130F
+      0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0D0E0D0D0E0D0E0E0E0E0F1117171713000000000000000000000000000000
+      00000000000000000000000000000000000000000000000000000000000000D3
+      F3F0141314131313131313131313131113131113111111111111111111111111
+      1110111011101110101010101010101010100F100F100F0F100F0F0F0F0F0F0F
+      0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D
+      0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0C0B0B0B0B
+      0B0B0B0B0B0B0B0B000B0B000B0B00000B0000000090F3F3910F0F1617171717
+      170E0000000000000000000000000000000000000000000000000E1717171711
+      0E0F0E0E0E0E0D0D0E0D0E0D0D0E0D0D0D0E0D0D0D0D0D0E0D0E0E0E0E0F1116
+      1717170B00000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000001717171717171714100E0E0E0F0E0E0F0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0E0D0D0E0D0D0D0E0E0F0E0E
+      1317171713000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000017F3F39513141313131313131313
+      1313131311131311131113111111111111111111111110111011101011101010
+      101010101010100F100F100F0F0F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F
+      0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C
+      0C0C0C0C0C0C0B0C0C0B0C0B0C0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B
+      000B000B000B000B000CF3F3D20E0E0F1517171717170E000000000000000000
+      000000000000000000000000000014171717160E0F0E0E0E0E0D0D0E0D0D0D0E
+      0D0D0E0D0E0D0D0E0D0E0D0D0D0D0E0F0E0E0F171717170C0000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0016171717171717171715110E0E0E0F0E0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D
+      0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0D0E0D0D0E0D0E0D0E0E0E0F111717171300000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000D0F3F31514131413141313131313131313131311131113111311
+      111111111111111111111110111011101010101010101010101010100F100F10
+      0F100F0F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D
+      0E0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C
+      0B0C0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B000B000B000000F7F3
+      F3160E0E0F1517171717170F0000000000000000000000000000000000000000
+      000C17171717130E0E0E0F0E0D0E0D0D0E0D0E0D0E0D0D0E0D0D0D0D0D0D0D0D
+      0D0E0E0E0E0F0E17171717100000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000B0E151717171717171717
+      16130F0E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D
+      0E0D0D0E0E0F0E0E131717171600000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000FF3F398131413
+      1413131413131313131313131313131113111311131111111111111111111111
+      10111011101110101010101010101010100F100F100F100F0F0F0F0F0F0F0F0F
+      0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D
+      0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0B0B0C0B0B0B0B0B
+      0B0B0B0B0B0B0B000B0B000B000B000B000010F3F3960F0E0E0F151717171717
+      11000000000000000000000000000000000000000011171717170F0E0F0E0E0E
+      0D0D0E0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0E0D0D0D0E0F0E0E0E1517171713
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000E13171717171717171716140F0E0F0E0E0F0E0F
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0E0D0E0E0E0E0F11171717
+      1700000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000093F3F318141413141314131313131313131313
+      1313131113131111131111111111111111111111111011101110111010101010
+      1010101010100F100F100F0F100F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E
+      0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C
+      0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B00
+      0B000B000B0000D0F3F3100E0E0E0F1417171717171100000000000000000000
+      00000000000000000B15171717150E0E0E0F0E0D0E0D0D0E0D0D0E0D0E0D0D0E
+      0D0D0E0D0E0D0D0D0D0D0E0E0E0F0E1417171714000000000000000000000000
+      000000000000000000000000000000000000000B0B0000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000C1117171717171717171714100E0E0E0E0E0E0F0E0E0F0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0D0D0E0D0E0D0D0D0D0F0E0E0E10171717170C00000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00E9F3E814141414131413141314131313131313131313131113131111131111
+      1111111111111111111110111011101011101010101010101010100F100F100F
+      0F0F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E
+      0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B
+      0C0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B00000B000B17F3F3190F
+      0E0E0E0F1317171717171100000000000000000000000000000000000E171717
+      17100F0E0E0E0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0E0D0E0D0D0E
+      0F0E0E1117171717000000000000000000000000000000000000000000000000
+      0000000000000E16150F00000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000B10161717171717
+      17171715110F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0D0E0D0E0D
+      0E0F0E0E0F171717170D00000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000014F3F3931414131414131413
+      1413131313131313131313131311131311111311111111111111111111111110
+      111011101010101010101010101010100F100F100F100F0F0F0F0F0F0F0F0F0F
+      0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D
+      0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0C0B0B0B0B0B0B
+      0B0B0B0B0B0B000B0B000B0B000B000CE9F3D20E0F0E0E0E0F13171717171713
+      0B00000000000000000000000000000014171717160E0E0F0E0E0E0D0E0D0E0D
+      0D0E0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0E0E0E0E0F10171717170C000000
+      0000000000000000000000000000000000000000000000000B13171717171300
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000B0E15171717171717171715130F0E0E0E0E
+      0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E
+      0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0E0D0E0D0E0E0E0F0E0E16171717100000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000093F3F3171414141414131414131413141313131313131313
+      1313111313111311131111111111111111111111101110111011101010101010
+      10101010100F100F100F100F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E
+      0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C
+      0C0C0C0C0B0C0C0B0C0B0C0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B
+      00000B00F7F3F3110E0F0E0E0E0F131717171717140B00000000000000000000
+      0000000C17171717130E0E0E0F0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0D0D0E0D
+      0E0D0D0D0D0D0D0E0F0E0E0E171717170F000000000000000000000000000000
+      00000000000000000000001017171717171717160C0000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000E13171717171717171716140F0E0F0E0E0F0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D
+      0E0D0D0D0D0D0D0D0E0E0E0E0F14171717140000000000000000000000000000
+      00000000000000000000000000000000000000000000000000000000E9F3CF14
+      1414141414141314131413131413131313131313131313111313111311111111
+      11111111111111111110111011101110101010101010101010100F100F100F0F
+      100F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D
+      0E0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C
+      0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B0B000B15F3F3900E0E0F0E
+      0E0E0F111717171717140B00000000000000000000000011171717170F0E0F0E
+      0E0E0D0D0E0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0E0D0D0D0D0E0E0E0F0E
+      15171717110000000000000000000000000000000000000000000000000C1417
+      1717171717171717171000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000C11161717
+      17171717171714100E0E0E0E0F0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0E0D0E0D0E0D0F0E0E
+      0E11171717170B00000000000000000000000000000000000000000000000000
+      00000000000000000000000000000014F3F39114141414141414141413141314
+      1313131313131313131313131113131113111311111111111111111111111011
+      1011101011101010101010101010100F100F100F0F0F0F0F0F0F0F0F0F0F0F0F
+      0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D
+      0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0B0B0C0B0B0B0B0B0B0B
+      0B0B0B0B0B000B0B000B00000BE9F3CF0E0E0E0F0E0E0E0F101717171717140B
+      000000000000000000000B15171717140E0F0E0E0E0D0E0D0D0E0D0D0E0D0D0E
+      0D0D0E0D0E0D0D0D0D0D0D0D0D0D0D0E0E0E0E0E141717171400000000000000
+      0000000000000000000000000000000B1017171717171717171717171717130B
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000B1015171717171717171716110E0E
+      0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D
+      0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0D0E0D0E0D0D0E0D0E0D0E0D0E0F0E0F0F171717170F0000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000093F3F31714141414141414141413141413141314131313131313131313
+      1311131113111311111111111111111111111110111011101010101010101010
+      101010100F100F100F100F0F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E
+      0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C
+      0C0C0C0C0C0B0C0C0B0C0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B0B
+      00F7F3F30F0E0E0E0F0E0E0E0F101717171717160B0000000000000C0E101417
+      171717100F0E0E0F0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0E0D0E0D0D0D
+      0D0D0D0E0E0F0E0E131717171700000000000000000000000000000000000000
+      00000D16171717171717150F10161617171717160B0000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000B0E15171717171717171716130F0E0E0E0E0E0F0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D
+      0D0D0D0D0E0E0E0E0E0E15171717150000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000E9F3D3151414141414
+      1414141414131413141313131313131313131313131313111311131113111111
+      111111111111111110111011101110101010101010101010100F100F100F100F
+      0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E
+      0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B
+      0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B0017F3F3190E0E0E0E0F0E0E
+      0E0F101717171717160B000C0F131617171717171717160E0E0E0F0E0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0E0D0D0D0D0D0E0E0F0E10171717
+      170C0000000000000000000000000000000000000B1317171717171716110E0F
+      0E0F141717171717170E00000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000D13
+      171717171717171717140F0E0F0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E
+      0E0E0D0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0E0D0E0D0D0E0E0F0E0E1117
+      1717170D00000000000000000000000000000000000000000000000000000000
+      000000000000000000000FF3F395151414141414141414141414141314131413
+      1413131313131313131313111313111113111111111111111111111111101110
+      11101110101010101010101010100F100F100F0F100F0F0F0F0F0F0F0F0F0E0F
+      0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D
+      0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0C0B0B0B0B0B0B0B0B
+      0B0B0B0B000B0B000B0CF3F3960E0E0E0E0E0E0F0E0E0E101617171717161517
+      17171717171717171717130E0F0E0E0E0E0D0E0D0D0E0D0D0E0D0D0E0D0E0D0E
+      0D0D0D0D0E0D0D0D0D0D0D0D0F0E0E0E0F161717170E00000000000000000000
+      000000000000001015171717171717140F0F0E0E0E0E0E111717171717171100
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000C1116171717171717171715
+      100E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0D0E0D0D0E0D0E0D0E0D0E0E0E0F0E0F16171717130000000000000000
+      00000000000000000000000000000000000000000000000000000000000019F3
+      F319141415141414141414141414141314141314131413131313131313131313
+      1113131111131111111111111111111111111011101110101110101010101010
+      1010100F100F100F0F0F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E
+      0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C
+      0C0C0B0C0C0B0C0B0C0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000BD0F3
+      E80E0E0E0D0E0E0E0E0F0E0E0F16171717171717171717171717171717170F0E
+      0E0E0F0D0D0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D
+      0E0E0F0E0E16171717100000000000000000000000000000000C141717171717
+      1716100E0E0E0E0F0E0F0E0E10161717171717130B0000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000B101517171717171717160E0E0E0F0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0D0D0D0D
+      0D0D0E0F0E0E0E14171717170D00000000000000000000000000000000000000
+      00000000000000000000000000000000000096F3F01514151414141414141414
+      1414141413141314131313131313131313131313131113131111131111111111
+      1111111111111110111011101010101010101010101010100F100F100F100F0F
+      0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0E
+      0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C
+      0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B0090F3F3110E0E0E0D0E0E0E0E0F0E
+      0E101617171717171717171717151413100F0F0E0F0E0E0E0D0E0D0D0E0D0D0E
+      0D0D0E0D0D0D0D0E0D0D0D0D0D0E0D0D0D0D0D0D0E0E0E0E0F14171717150E0B
+      00000000000000000000000B1017171717171717130F0E0F0E0F0E0E0E0E0F0E
+      0E0F151717171717140B00000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0B0E151717171717170E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E
+      0E0E0D0E0E0E0E0D0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0E0D0E0D0E0D0E0E0E0F0E0F17171717
+      150B000000000000000000000000000000000000000000000000000000000000
+      000000000000E9F3CF1514151415141414141414141414141414131413141314
+      1313131313131313131311131311131113111111111111111111111110111011
+      101110101010101010101010100F100F100F100F0F0F0F0F0F0F0F0F0F0F0F0E
+      0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D
+      0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0B0B0C0B0B0B0B0B0B0B0B0B
+      0B0B0B000B0B13F3F3190E0E0E0D0E0E0E0E0E0F0E0E0F161717171717151310
+      0F0E0E0E0F0E0E0E0E0E0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0E0D0E
+      0D0D0D0D0D0D0D0D0E0E0F0E0E13171717171715110C00000000000000000D16
+      171717171717150F0E0E0E0E0E0E0E0E0F0E0E0E0F0E0E141717171717150B00
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000D13171717170F0E0E
+      0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0D0E0E0E0D0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D
+      0D0D0D0E0D0E0D0E0D0E0D0E0E0E0E0E13171717171000000000000000000000
+      000000000000000000000000000000000000000000000000000FF3F396141514
+      1514151414141414141414141414131413141313141313131313131313131311
+      1313111311111111111111111111111111101110111011101010101010101010
+      10100F100F100F0F100F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E
+      0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C
+      0C0C0C0B0C0C0B0C0B0C0B0C0B0F0B0B0B0B0B0B0B0B0B0B000B0BF3F3960E0D
+      0E0E0D0E0E0E0E0E0E0F0E0F151514100F0E0E0E0E0F0E0E0E0F0E0F0E0E0E0D
+      0D0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0E0E
+      0F101617171717171717140E000000000B1317171717171716110E0F0E0F0E0F
+      0E0F0D0D0D0E0F0E0E0E0F0E111717171717160B000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000C17171717100E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0D0D0D0D0D0D0E0E
+      0E0F0E0F0E16171717170C000000000000000000000000000000000000000000
+      0000000000000000000000000017F3F31A151514151414151414141414141414
+      1414141413141314131313131313131313131313111313111311131111111111
+      11111111111110111011101011101010101010101010100F100F100F0F0F0F0F
+      0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0E0D
+      0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0B0D
+      95970B0B0B0B0B0B0B0B0B0B0B000BD0F3D20E0E0D0E0E0D0E0E0E0F0E0E0E0E
+      0E0F0E0E0E0E0F0E0E0E0F0E0E0E0E0E0F0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D
+      0D0D0E0D0D0D0D0D0E0D0D0D0D0D0D0D0D0F0E0E0E0F15171717171717171717
+      150E0B0E16171717171717140F0F0E0E0E0E0E0E0E0D0D0C0D0C0E0E0F0E0E0E
+      0F101617171717160C0000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0017171717110F0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0D0E0D0D0E0D0E0D0E0D0E0D0E0D0D0E0E0E0E0E0F1017171717160B
+      0000000000000000000000000000000000000000000000000000000000000000
+      0091F3F315151514151514151414141414171414141414141314141314131413
+      1313131313131313131113111311131111111111111111111111111011101110
+      1010101010101010101010100F100F100F100F0F0F0F0F0F0F0F0F0F0E0F0F0E
+      0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0C
+      0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C0DD2F3F00B0B0B0B0B0B0B0B0B0B
+      0B0B0092F3F30E0E0E0D0E0E0D0E0E0E0E0F0E0F0E0E0E0F0E0E0E0F0E0E0E0F
+      0E0F0E0E0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0E0D0E0D0D0D0D0D
+      0D0D0D0D0D0E0E0F0E0E0E0F131616171717171717171717171717171716100E
+      0E0E0E0F0E0F0E0E0C0D0C0D0D0C0D0E0E0E0F0E0E0E101617171717150C0000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000014171717130E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0D0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0D0D0E
+      0D0E0D0E0D0E0D0D0E0E0F0E0E0E1417171717140B0000000000000000000000
+      00000000000000000000000000000000000000000007F3D31515151514151415
+      1415141414D29815141414141413141314131314131313131313131313131311
+      1311131113111111111111111111111110111011101110101010101010101010
+      100F100F100F100F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E
+      0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C
+      0B0C0C0B0C11E8F3F3F3110B0B0B0B0B0B0B0B0B0B0B0B19F3F3160D0E0E0D0E
+      0E0D0E0E0E0E0E0E0E0F0E0E0F0E0E0E0F0E0E0E0E0D0D0E0D0E0D0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0E0E0E0F0E0E
+      0E0E1114171717171717171717171717130F0E0F0E0F0E0E0E0E0D0C0D0D0C0D
+      0C0D0C0D0D0E0E0E0F0E0E0F1617171717160B00000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000013171717150E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E
+      0E0E0E0D0E0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0D0D0D0D0D0E0D0E0E0E0E
+      0F0E0F1517171717140B00000000000000000000000000000000000000000000
+      000000000000000000E9F3D015151415151514151415141514F3F3F090141414
+      1414141314131413131313131313131313131311131311111311111111111111
+      111111111110111011101110101010101010101010100F100F100F0F100F0F0F
+      0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0E0D0D
+      0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B11F0F3F3F3F31A0B
+      0C0B0B0B0B0B0B0B0B0B0B13F3F3190E0E0D0E0E0D0E0E0D0E0E0F0E0E0E0F0E
+      0E0E0E0E0D0E0D0E0D0E0D0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0D0D
+      0D0D0D0E0D0D0D0D0D0D0D0D0D0E0E0F0E0E0E0F0E0E0E0E0F13161717171717
+      1717150F0E0E0E0E0E0E0E0E0D0D0D0D0D0C0D0D0C0D0D0C0D0D0E0F0E0E0F0E
+      101617171717160B000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000101617
+      17160E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0D0E0D0E0D0D0E0D0E0D0E0D0E0D0D0D0E0E0E0E0E0E101617171717140B00
+      000000000000000000000000000000000000000000000000000000000BF3F396
+      15151515151514151514151419F3F3F3F3CF1514141414131414131413141313
+      1313131313131313111313111113111111111111111111111111101110111010
+      11101010101010101010100F100F100F0F0F0F0F0F0F0F0F0F0F0F0F0F0E0F0E
+      0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0C0C
+      0D0C0C0C0C0C0C0C0C0C0B17F0F3F39FF3F3950B0B0B0B0B0B0B0B0B0B0B0B0B
+      F3F3910E0D0E0E0D0E0E0D0E0E0D0E0F0E0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0E0D0E0D0D0D0D0D0D0D0D0D0D
+      0D0D0E0E0E0F0E0E0F0E0F0E0E0E0F111617171716130E0F0E0F0E0F0E0F0D0D
+      0D0D0D0C0D0D0C0D0D0C0D0C0D0C0D0E0E0F0E0E0E0F1517171717160B000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000D171717170F0E0E0E0F0E0E0E0E0E
+      0E0E0E0D0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0E0D
+      0E0D0D0E0D0D0E0E0F0E0E0E101717171717160B000000000000000000000000
+      0000000000000000000000000000000011F3F391151515151515151415141415
+      91F3F3F3F3F3F090141414141314131413131413131313131313131313111313
+      1111131111111111111111111111111011101110101010101010101010101010
+      0F100F100F100F0F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E
+      0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C18F3
+      F3F39A02A7F3CF0B0C0B0C0B0B0B0B0B0B0B0B0BD3F3CF0E0E0D0E0E0D0E0E0D
+      0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0E0E0E0E0E0E
+      0F0E0E0F0E1316150F0E0E0E0E0E0E0E0E0D0D0D0D0C0D0D0C0D0C0D0C0D0D0C
+      0D0D0C0D0E0E0E0F0E0E0F1517171717160B0000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000B17171717100F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E
+      0D0E0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0D0D0D0D0E0D0D0E0D0E0E0E0F0E0E
+      0E111717171717170F0000000000000000000000000000000000000000000000
+      0000000017F3F31A15151515151515151514151495F3F370E3F3F3F3CF151414
+      1414131413141313131313131313131313131113131113111311111111111111
+      1111111110111011101110101010101010101010100F100F100F100F0F0F0F0F
+      0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0E0D0D0D
+      0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C18F3F3F34402129FF3F30C0B0B0B0B
+      0B0B0B0B0B0B0B0B07F3CF0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0E0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0E0E0F0E0E0E0F0E0E0E0E0E0E0F0E0F
+      0E0F0E0E0C0D0D0C0D0D0D0D0C0D0D0C0D0C0D0D0C0D0C0C0D0E0E0E0E0F0E0F
+      1617171717160000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000016171717130E
+      0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D
+      0E0D0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0E0F0E0E0E11161717171717130C00
+      0000000000000000000000000000000000000000000000001AF3F31515151515
+      1515151515141515D2F3EC605DAEF3F3F3F09014141413141413141314131313
+      1313131313131311131311131111111111111111111111111110111011101110
+      101010101010101010100F100F100F0F100F0F0F0F0F0F0F0F0F0E0F0F0E0F0F
+      0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0C0C0D
+      0C0C0C0C18F3F3F34412121294F3F30F0C0B0C0B0C0B0B0B0B0B0B0B95F3F30E
+      0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0E0D0E0D0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0E0E0F0E0E0E0F0E0F0E0E0E0E0E0E0E0D0C0D0D0D0D0D0C0D0D
+      0C0D0C0D0D0C0D0C0D0C0D0C0C0D0E0E0F0E0E0E0F1617171717140B00000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000013171717150E0E0F0E0E0E0E0E0E0E0E0E0E
+      0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0E0D0E0D0D0E
+      0D0D0E0D0E0E0E0F0E0E0E1016171717171717110B0000000000000000000000
+      00000000000000000000000096F3F315151515151515151515151415D2F3DB60
+      5D5D70E3F3F3F3CF151414131413141313131313131313131313131311131311
+      131113111111111111111111111110111011101011101010101010101010100F
+      100F100F0F0F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E
+      0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C19F3F3F34412121212
+      3CF3F3140C0B0B0C0B0B0B0B0B0B0B0B90F3F30E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0F0E
+      0E0E0E0F0E0F0E0E0D0D0D0D0D0C0D0D0D0D0C0D0D0C0D0C0D0D0C0D0D0C0D0C
+      0D0C0D0E0E0E0F0E0E101617171717140B000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000010161717170E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E
+      0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0D0E0D0D0E0D0D0D0D0D0D0E0D0D0E0D0D0E0D0E0E0E0F0E0E0E
+      0F1417171717171717110C0000000000000000000000000000000000000B0E14
+      D2F3D216151515151515151515151514F3F3C16060605D5DAEF3F3F3F0901414
+      1413141314131413131313131313131313111311131113111111111111111111
+      11111110111011101010101010101010101010100F100F100F100F0F0F0F0F0F
+      0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0E0D0D0D0D
+      0D0D0D0D0D0D0D0C0C0D18F3F3F3441B1212121225F3F3180B0C0B0B0C0B0B0B
+      0B0B0B0B18F3F3150E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0E0D0E0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0F0E0E0E0E0E0E0D0D0D0C0D
+      0D0D0D0C0D0D0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0C0C0C0E0E0E0F0E0E0F16
+      171717170F000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000C17171717100E0F0E0E
+      0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E
+      0D0E0D0E0D0D0E0D0D0E0D0D0D0D0D0E0E0F0E0E0F0E13171717171717171715
+      100D0000000000000000000000000B0E13151717D2F3D2151615151515151515
+      15151515F3F3BC606060605D5D70E3F3F3F3CF15141413141314131413131313
+      1313131313131311131113111311111111111111111111111011101110111010
+      1010101010101010100F100F100F100F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E
+      0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0C19F3F3
+      F3441B1B121B121212F3F3910B0C0B0C0B0C0B0C0B0B0B0B14F3F3150E0E0D0E
+      0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0E0D0D0E0D0D0E
+      0D0E0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0E0F0E0E0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0C0D0C0D
+      0C0D0D0C0D0C0D0C0D0C0D0C0D0E0E0E0E0F0E15171717170B00000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000B16171717110E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D
+      0E0D0E0D0E0E0F0E0E0E0E0F151717171717171717171714130F100F100F1010
+      1316171717171717F1F3D015151615151515151515151519F3F3A96160606060
+      5D5D53AEF3F3F3F0901414131413141313131313131313131313131113131111
+      1311111111111111111111111110111011101110101010101010101010100F10
+      0F100F0F100F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E
+      0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D15F3F3F3441B1B1B121B121212F3F391
+      0B0C0C0B0B0B0C0B0B0B0B0B14F3F3150E0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E
+      0D0E0D0E0D0E0D0D0E0D0E0D0D0D0E0D0D0E0D0D0D0D0E0D0E0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E
+      0C0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C0C0D0C0D0C
+      0C0E0E0F0E0E1017171717110000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000E17
+      171717140F0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0D0E0D0D0D0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0E0E0E0F0E0E0E
+      0E101517171717171717171717171717171717171717171717171717F3F39616
+      15161515151515151515151AF3F3836161606060605D5D536BDBF3F3F3CF1514
+      1314131413141313131313131313131311131311111311111111111111111111
+      111110111011101011101010101010101010100F100F100F0F0F0F0F0F0F0F0F
+      0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0E0D0D0D0D0D
+      0D0D0D13F0F3F3451B1B1B1B1B121B1212D6F3CF0C0B0C0B0C0B0B0C0B0B0B0B
+      11F3F3900E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E
+      0D0E0D0D0E0D0D0E0D0E0D0D0D0D0E0D0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0D
+      0C0D0D0C0D0D0C0D0D0C0D0D0C0C0D0C0C0D0C0D0C0E0E0E0E0F14171717170B
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000E1717171717150E0E0F0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0E0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0D0D0D0D0D0E0E0E0E0F0E0F0E0E0E101417171717171717
+      17171717171717171717171717171715F3F3961615161516151515151515151A
+      F3F383616161606060605D5D5353ABF2F3F3F091141413141313131313131313
+      1313131313111313111113111111111111111111111111101110111010101010
+      10101010101010100F100F100F100F0F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E
+      0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D11E9F3F3451B1B1B1B1B
+      1B1B121B12A7F3CF0C0C0B0C0C0B0C0B0C0B0C0B0BF3F3910E0E0D0E0E0D0E0E
+      0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D
+      0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0C0D0C0D0C0D0D0C0D
+      0C0D0C0D0C0C0C0D0D0F0E0F0E0F171717171100000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000E1717171717150F0E0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D
+      0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D
+      0D0D0D0E0E0E0E0E0E0F0E0E0E0F101417171717171717171717171717171717
+      1613100FF3F3961615161516151515151515151AF3F38368616161606060605D
+      5D53536BDBF3F3F3D21614131413141313131313131313131313111313111311
+      13111111111111111111111110111011101110101010101010101010100F100F
+      100F100F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E
+      0D0E0D0E0D0D0D0D0D0FD2F3F39F1C1B1B1B1B1B1B1B1B121BA7F3CF0C0C0B0C
+      0B0C0B0C0B0B0B0B0BF3F3910E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0E0D0D0D0D0E0D0D0D0D0E0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D
+      0D0C0D0D0D0D0C0D0D0D0C0D0C0D0D0C0D0C0D0D0C0C0C0D0C0D0C0D0E0E0E0E
+      0E14171717170B00000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000E1717171717150F0E
+      0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D
+      0D0D0D0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0E0E0E0F0E0E0E0F
+      0E0E0F0E0E10111315151717171716151413100F0E0F0E0EF3F3961616151615
+      1615161515151593F3F3806868616161606060605D5D535353ABF2F3F3F09313
+      1413141314131313131313131313131113131113111111111111111111111111
+      1110111011101110101010101010101010100F100F100F0F100F0F0F0F0F0F0F
+      0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0E0D0D0D97F3F3
+      A31B1B1C1B1B1B1B1B1B1B1B12D1F3CF0C0C0C0B0C0C0B0B0C0B0C0B0BF3F391
+      0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D
+      0D0E0D0E0D0D0E0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0C
+      0D0C0D0D0C0D0C0C0D0C0D0C0D0C0D0D0E0F0E0F0F1717171713000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000E1717171717150F0E0E0E0E0F0E0E0E0E0E0E0E0E0E
+      0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D
+      0D0E0D0D0D0D0D0D0E0D0D0D0D0D0E0E0E0F0E0E0E0F0E0E0E0F0E0E0E0E0E0E
+      0E0E0E0F0E0E0F0E0E0E0E0FF3F39615161615161516151515151596F3F36869
+      6868616161606060605D5D53535363DBF3F3F3D0171413141313131313131313
+      1313131311131311131113111111111111111111111110111011101011101010
+      101010101010100F100F100F0F0F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F
+      0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E93F3F3D61D1C1B1C1B1B1B1B1B1B1B1B
+      1BA7F3CF0C0C0C0C0B0C0C0B0C0B0B0C0BF3F3910E0E0D0E0E0D0E0E0D0E0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0E0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0C0D0C0D0C0D0D0C0D0C0C0D
+      0C0D0C0E0E0E0E0E14171717170C000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000000000000000E1717
+      171717150F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0D0D0E0D
+      0D0D0D0D0E0E0E0F0E0E0E0F0E0E0E0F0E0F0E0F0E0F0E0E0E0F0E0E0F0E0E0E
+      F3F39616161615161615161516151596F3F37474686868616161606060605D5D
+      53535352ABF2F3F3F09514131413141313131313131313131311131113111311
+      111111111111111111111110111011101010101010101010101010100F100F10
+      0F100F0F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D
+      0E0D0E19F3F3EE1D1C1C1B1C1B1C1B1B1B1B1B1B1BD1F3CF0C0C0C0C0C0B0C0C
+      0B0C0B0B0CF3F3910E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0E0D0D0E0D0E0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D
+      0D0D0D0C0D0C0D0C0D0D0C0D0D0C0D0C0C0D0C0C0C0C0D0F0E0F0E0F16171717
+      1300000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000E1717171717150F0E0E0E0E0F0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0D0D0D0D
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0E0D0D0D0D0D0D0E0E0E0E0E
+      0F0E0E0E0F0E0E0E0E0E0E0F0E0E0E0F0E0E0F0EF3F396161616161516151615
+      15151596F3F3747474696868616161606060605D5D535353525FD9F3F3F3D318
+      1314131313131313131313131313131113111311131111111111111111111111
+      10111011101110101010101010101010100F100F100F100F0F0F0F0F0F0F0F0F
+      0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E14E9F3F32E1C1C1C1C1B
+      1C1B1C1B1B1B1B1B1BD1F3CF0C0C0C0C0B0C0C0B0C0B0C0B0BF3F3910E0E0D0E
+      0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E
+      0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0C0D0D0C
+      0D0C0C0D0C0D0C0D0C0D0E0E0E0E0E13171717170E0000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000E1717171717150F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0D0D0D0D0E0D0D0D0D0D0E0D0D0D0D0D0D0E0D0E0E0F0E0E0E0E0F0E0F0E0E0E
+      0F0E0E0E0E0E0D0DF3F39616161616161516151615161593F3F3827474746968
+      68616161606060605D5D535353535273F2F3F3F3951314131413131313131313
+      1313131113131111131111111111111111111111111011101110111010101010
+      1010101010100F100F100F0F100F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E
+      0E0E0E0E0E0E0E0E0E0FD2F3F3461C1C1C1C1C1C1B1C1B1C1B1B1B1B1BD1F3CF
+      0C0C0C0C0C0C0C0B0C0C0B0C0BF3F3910E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0D0D0E0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D
+      0D0C0D0D0D0D0C0D0D0D0C0D0C0D0C0D0C0D0C0D0D0D0C0D0C0D0C0D0C0D0E0E
+      0F0E0F1617171715000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000E1717171717150F0E0E
+      0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0D0D0E0D0D0D0D0D
+      0E0D0D0D0D0D0D0D0D0D0E0E0E0E0E0E0E0E0E0E0E0D0E0D0D0D0D0DF3F39616
+      161616161615161615161590F3F38575747474686868616161606060605D5D53
+      535352525FD9F3F3F3E819141314131313131313131313131113131111131111
+      1111111111111111111110111011101011101010101010101010100F100F100F
+      0F0F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E96F3F3
+      A31C1C1C1C1C1C1C1C1B1C1B1C1B1B1B1BD1F3CF0C0C0C0C0C0C0B0C0C0B0C0B
+      0CF3F3910E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0D0D0D0E0D0D0D0D0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0D
+      0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0E0E0E0E0F11171717170E00000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000E1717171717150F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0D0D0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0D0D0D0E0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0DF3F3961616161616161615161515161A
+      F3F3857575747474696868616161606060605D5D53535352525270ECF3F3F396
+      1513131313131313131313131311131311111311111111111111111111111110
+      111011101010101010101010101010100F100F100F100F0F0F0F0F0F0F0F0F0F
+      0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E19F3F3D71E1C1C1C1C1C1C1C1C1C1B1C
+      1B1C1B1B1BD1F3CF0C0C0C0C0C0C0C0C0C0B0C0C0BF3F3910E0E0D0E0E0D0E0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0D
+      0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0C0D0D0C0D0D0C0D0C0C0C
+      0C0C0C0C0D0E0F0E0E0E16161717150000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000000000E171717
+      1717150F0E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D
+      0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D0E0D0D0D0D
+      0E0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0DF3F39616161616161616161516161590F3F385757575747474696868
+      616161606060605D5D5353535252525FBDF3F3F3F09014131313131313131313
+      1313111313111311131111111111111111111111101791939393181010101010
+      10101010100F100F100F100F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E
+      0E0E0E14F0F3EE2E1D1C1D1C1C1C1C1C1C1C1C1B1C1B1C1B1BD7F3CF0C0C0C0C
+      0C0C0C0C0B0C0C0B13F3F31A0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D
+      0D0D0D0C0D0D0D0C0D0C0D0C0D0C0D0D0C0D0C0D0C0D0C0D0E0E0E0F0E111717
+      1717100000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000E1717171717150F0E0E0F0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D
+      0E0D0D0E0D0D0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0DF0F3D01616161616
+      1616161615161590F3F3B275757575747474696868616161606060605D5D5353
+      53535252516DE3F3F3F3D2161413131313131313131313111313111311111111
+      1111111111111596F0F3F3F3F3F3F3F0971410101010101010100F100F100F0F
+      100F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E10D2F3F3461D1C1D1C1C
+      1C1C1C1C1C1C1B1C1B1C1B1C1BF3F3930C0C0C0C0C0C0C0C0C0C0C0B14F3F315
+      0E0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D
+      0D0D0E0D0E0D0E0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0C0D0D0C0D
+      0D0C0D0C0D0C0D0C0D0C0D0C0E0F0E0E0E16171717150B000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000E1717171717150F0E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0D0D0E0D0D0E0D0E0D0D0E0D0D
+      0E0D0D0D0E0D0D0D0D0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0DCFF3D216161616161616161616151615F3F3C676
+      76757575747474696868616161606060605D5D5353535252525251ADF2F3F3F0
+      9513131313131313131313131113131113111311111111111597F3F3F3F3F3F3
+      F3F3F3F3F3F395131010101010100F10100F100F0F0F0F0F0F0F0F0F0F0F0F0F
+      0F0E0F0E0F0E0E0F0E0E93F3F3A31D1D1C1D1C1D1C1C1C1C1C1C1C1C1C1B1C1B
+      1BF3F3910C0C0C0C0C0C0C0C0C0C0B0C14F3F3150E0E0D0E0E0D0E0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0D0D0D0E0D0D0E0D0D0E0D0E0D0D0D0D0D0D0D0E0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0C0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0E
+      0E0E0E0F10171717171000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000E1717171717150F0E0E0F
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0D0E0D0D0D0E0D0D0E0D0D0E0D0E0D0D0D0E0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      CFF3D217161616161616161616161516F3F3CA76767575757574747469686861
+      6161606060605D5D535353535252515262DAF3F3F3D319131313131313131313
+      131113111311131111111493F0F3F3F3D5713A2F2F3A6ED5F3F3F3D315101010
+      1010100F100F100F100F0F0F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F18F3F3
+      EA221D1D1D1C1D1C1D1C1C1C1C1C1C1C1C1C1B1C25F3F31A0C0D0C0C0C0C0C0C
+      0C0C0C0C18F3F3150E0E0D0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E
+      0D0D0E0D0D0E0D0D0D0E0D0D0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D
+      0C0D0C0D0D0C0D0D0C0D0C0D0C0C0C0C0C0C0D0E0F0E0E0E1517171716000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000E1717171717150F0E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D
+      0E0D0E0D0E0D0D0E0D0D0E0D0D0D0D0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D96F3F3161716161616161616
+      16161615D3F3E477767676757575747474696868616161606060605D5D535353
+      52525252515172F2F3F3F398151313131313131313131311131113111318E8F3
+      F3F3D55B323231312F2F2C2C5AE0F3F3F016101010101010100F100F100F100F
+      0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E10F0F3F3301D1D1D1D1D1C1D1C1D1C1C
+      1C1C1C1C1C1C1C1B3DF3F3150D0C0D0C0C0C0C0C0C0C0C0C90F3F30E0D0E0E0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0E0D0E0D
+      0E0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0C0D0C0D0C0D0D0C
+      0D0C0D0C0D0C0E0E0E0F0E101717171711000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000E17171717
+      17150F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0E0D0D0D
+      0E0D0D0E0D0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D91F3F317161716161616161616161616D2F3EF7776767676
+      757575747474696868616161606060605D5D5353535352525251515CBDF3F3F3
+      F0921313131313131313131113131114CFF3F3F3F171333333323231312F2F2F
+      2C37B9F3F3F016101010101010100F100F100F100F0F0F0F0F0F0F0F0F0F0E0F
+      0F0E0F0ED0F3F3661D1D1D1D1D1D1D1C1D1C1D1C1C1C1C1C1C1C1C1C99F3F310
+      0D0C0C0D0C0C0C0C0C0C0C0C93F3F30D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D
+      0D0D0D0C0D0D0D0D0C0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0E0F0E0E0E15
+      171717170B000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000E1717171717150F0E0E0E0E0F0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0D0D0E0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D1AF3F31A
+      17161716161616161616161696F3F37777777676757575757474746968686161
+      61606060605D5D535353525252525151516ADAF3F3F3E8191313131313131313
+      111392F0F3F3F3B83B3434333333323231312F2F2C2C2CB9F3F3E81310101010
+      10100F10100F100F0F100F0F0F0F0F0F0F0F0F0F0F0E0F92F3F3D41E1E1D1D1D
+      1D1D1D1D1C1D1C1D1C1C1C1C1C1C1C1B9BF3F30D0C0D0D0C0D0C0C0C0C0C0C0C
+      07F3D20E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0E0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D
+      0C0D0D0C0D0C0D0C0C0D0C0D0C0E0E0E0E0F0F17171717110000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000E1717171717150F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D
+      0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D15F3F390171716171616161616161616
+      92F3F38D787777767676757575747474696868616161606060605D5D53535352
+      525252515151519DF2F3F3F3D01913131313131319D3F3F3F3E0653434343433
+      333333323231312F2F2F2C2CB9F3F3D0101010101010100F10100F100F0F0F0F
+      0F0F0F0F0F0F0F0F0E0F15F3F3EE231E1D1E1D1D1D1D1D1D1D1C1D1C1D1C1C1C
+      1C1C1C1CD1F3D20D0D0C0D0C0C0D0C0C0C0C0C0CE8F3CF0E0D0E0E0D0E0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0E
+      0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D0C0D0C0D0C0D0C0D0D0C0D0C0C0C0C
+      0C0E0F0E0E0E14171717170B0000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000E1717171717150F0E0E0E0E
+      0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D
+      0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0E0D0D0D0D0D0D0E
+      0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D10F3F39716171716171616161616161690F3F3B57878777776767575
+      7575747474696868616161606060605D5D535353525252525151515156ADF3F3
+      F3F3CF19131692D3F3F3F3F1AA3535353434343433333333323231312F2F2C2C
+      2CD5F3F393101010101010100F100F100F100F0F0F0F0F0F0F0F0F0F0F10E8F3
+      F3421E1E1E1E1D1E1D1D1D1D1D1D1C1D1C1D1C1C1C1C1C1CF3F3960D0D0D0C0D
+      0D0C0D0C0C0C0C0CF3F3910E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D
+      0E0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D
+      0C0D0D0D0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0D0E0E0F0E0F171717171300
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000E1717171717150F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0DF3F30717171717
+      161716161616161616F3F3CD7978787777767676757575747474696868616161
+      606060605D5D53535352525252515151515062C5F3F3F3F3F3F3F3F3F3F3C04C
+      36363535343434343434333333323231312F2F2F2C37F1F3F318101010101010
+      10100F100F100F100F0F0F0F0F0F0F0F0F96F3F39F1F1E1E1E1E1E1D1D1D1D1D
+      1D1D1D1C1D1C1D1C1C1C1C2EF3F31A0D0D0D0D0C0D0C0C0D0C0C0C15F3F3190E
+      0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0D0C
+      0D0D0C0D0C0D0C0D0E0F0E0E0E14171717170C00000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000000000E1717171717
+      150F0E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D
+      0E0D0E0D0E0D0D0D0E0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0DCFF3E817171717171617161616161616D2F3EF
+      797978787777767675757575747474696868616161606060605D5D5353535252
+      52525151515150516FDAF3F3F3F3F3EBAC574A49493636353535343434343333
+      3333323231312F2F2C2C5AF3F3E81310101010101010100F100F100F100F0F0F
+      0F0F0F0F1AF3F3D81F1F1E1E1E1E1E1E1D1E1D1D1D1D1D1D1C1D1C1D1C1C1C48
+      F3F3150D0D0D0D0D0C0D0D0C0D0C0C18F3F3150E0E0D0E0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0E0D0D0E0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C
+      0D0D0D0C0D0D0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0C0D0C0D0D0E0E0E0F
+      0E17171717170C00000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000E1717171717150F0E0E0F0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0E0D0D0E0D0D0D0E0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D93F3F31717171717171617161616161697F3F3877979787877777676767575
+      75747474696868616161606060605D5D535353525252525151515150504F5E9E
+      AC9E624B4A4A4A4A494936363535343434343433333333323231312F2F2F2CA2
+      F3F3931010101010101010100F100F100F0F100F0F0F0F13F0F3EE3E1F1F1F1F
+      1E1E1E1E1E1D1E1D1D1D1D1D1D1C1D1C1D1C1CA3F3F30D0D0D0D0D0D0D0C0D0C
+      0C0D0C93F3F30E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0D0D0C
+      0D0C0D0D0C0D0D0C0D0C0D0C0C0C0C0D0F0E0E0E0E1317171717130000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0E1717171717150F0E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0E0D0D0D0D0D0D0D0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D19F3F39017171717171716
+      171616161691F3F3B37A79797878777776767575757574747469686861616160
+      6060605D5D535353525252525151515150504F4E4E4E4B4B4B4B4A4A4A494936
+      363535353434343434333333323231312F2F2C37EBF3F3161010101010101010
+      100F100F100F0F0F0F0F0FD2F3F3642020201F1F1F1E1E1E1E1E1D1D1D1D1D1D
+      1D1D1C1D1C1D1CEEF3CF0D0D0D0D0D0D0D0D0C0D0D0C0DCFF3D20E0E0D0E0E0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D
+      0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0C0D0C0D0C0D0C0D0D0C0D0C0D
+      0C0D0C0C0E0E0F0E0E0E15171717170F00000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000E1717171717150F0E0E0F0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D
+      0E0E0E0E0E0D0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D
+      0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D13F3F39517171717171717161716161618F3F3CD7A7979
+      7978787777767676757575747474696868616161606060605D5D535353525252
+      525151515150504F4E4E4E4B4B4B4A4A4A4A4949363635353434343434333333
+      33323231312F2F2F5AF3F3D0101010101010101010100F100F100F100F0F95F3
+      F3BF20211F201F1F1F1F1E1E1E1E1E1D1E1D1D1D1D1D1D1C1D1C2EF3F3920D0D
+      0D0D0D0D0D0D0D0C0D0C0CF3F3960E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D
+      0D0C0D0D0D0C0D0D0C0D0D0C0D0D0C0D0C0C0D0C0D0C0D0C0D0E0E0F0E0E1017
+      171717150B000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000B1717171717150F0E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0E0D0D0E0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0DF3F3
+      D017171717171717171617161716D2F3F27A7A7A797978787777767675757575
+      747474696868616161606060605D5D535353525252525151515150504F4E4E4E
+      4B4B4B4B4A4A4A494936363535353434343433333333323231312F2F2CA2F3F3
+      91101010101010101010100F100F100F1018F3F3EA2A2121202020201F1F1F1E
+      1E1E1E1E1D1E1D1D1D1D1D1D1C1D48F3F3140E0D0D0D0D0D0D0D0D0D0C0D15F3
+      F3F80E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D
+      0D0E0D0E0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0C0D0D0C0D0D
+      0C0D0C0D0C0D0C0D0C0D0C0D0C0D0E0E0F0E0E13171717171100000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000001517171717
+      0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0E0D0E0D0D0D0E0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0DCFF3F11717171717171717171617
+      161695F3F38C7A7A7A7979787877777676767575757474746968686161616060
+      60605D5D535353525252525151515150504F4E4E4E4B4B4B4A4A4A4A49493636
+      3535343434343434333333323231312F2F38F1F3F01310101010101010101010
+      0F100F1013F0F3F33F232121212020201F1F1F1F1E1E1E1E1E1D1D1D1D1D1D1D
+      1D1CD7F3E80E0D0E0D0D0D0D0D0D0D0D0D0C91F3F3140D0E0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0D0D0D0D0E
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C
+      0D0D0D0C0D0D0D0D0C0D0D0D0D0D0C0D0C0D0C0D0C0D0D0C0D0C0C0C0C0C0D0C
+      0C0D0E0E0E0E0F0E16161717170C000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000F17171717100E0E0E0F0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E
+      0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0E0D0D0D0E0D0D
+      0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D91F3F39017171717171717171716171619F3F3CB7B7A7A7A7979
+      78787777767675757575747474696868616161606060605D5D53535352525252
+      5151515150504F4E4E4E4B4B4B4B4A4A4A494936363535353434343433333333
+      323231312F2F6EF3F30710101010101010101010100F1011D2F3F36E23232121
+      2121202020201F1F1F1E1E1E1E1E1D1E1D1D1D1D1D24F3F3960E0D0E0D0E0D0D
+      0D0D0D0D0D0DCFF3F00E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D
+      0D0C0D0C0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0C0C0E0F0E0E0E10171717
+      1713000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000B15171717140F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0E0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D13F3F3951817
+      1717171717171717161716E8F3EF7A7B7A7A7A79797878777776767575757574
+      7474696868616161606060605D5D535353525252525151515150504F4E4E4E4B
+      4B4B4A4A4A4A494936363535343434343433333333323231312F2FD5F3F39010
+      101010101010101010100F97F3F3A52326232321212121202020201F1F1F1E1E
+      1E1E1E1D1E1D1D1D1D48F3F3180D0E0E0D0E0D0D0D0D0D0D0D0FF3F3960D0E0E
+      0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0D0D0C0D0D0C0D0D0C0D0C0D0C
+      0C0D0C0D0C0C0C0C0D0C0D0D0E0E0F0E0E15171717170C000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000011171717170F0E0F
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0E0D
+      0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0DF0F3D21717171717171717171717161795
+      F3F3B17B7B7A7A7A797978787777767676757575747474696868616161606060
+      605D5D535353525252525151515150504F4E4E4E4B4B4B4B4A4A4A4949363635
+      35353434343434333333323231312F3AF1F3F0151010101010101010101091F3
+      F3D82D2623262323212121212020201F1F1F1F1E1E1E1E1E1D1D1D1D1DEAF3F0
+      0E0E0D0E0D0E0D0E0D0D0D0D0D17F3F3190E0E0D0E0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D
+      0D0C0D0D0D0C0D0D0D0C0D0C0D0C0D0C0D0D0C0D0C0C0D0C0D0C0D0C0D0C0C0D
+      0E0E0E0E0F0F1617171715000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000C16171717130E0E0E0F0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0E0D0D0D0D0D0D0D0D0D0E
+      0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D96F3F31818171717171717171717171619F3F3DC7C7B7A7A7A7A797978
+      787777767675757575747474696868616161606060605D5D5353535252525251
+      51515150504F4E4E4E4B4B4B4A4A4A4A49493636353534343434343333333332
+      3231312F9CF3F3D31310101010101010101AF3F3F14026262626232323212121
+      21202020201F1F1F1E1E1E1E1E1D1E1D3EF3F3930E0E0E0E0D0E0D0E0D0D0D0D
+      0D96F3F3110E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0D0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0C0D
+      0D0C0D0D0C0D0C0C0D0C0C0C0D0C0D0C0C0D0C0C0D0E0F0E0E0E141717171717
+      1717171717151313140F100F0F0C0C0C0B000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0013171717160F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0D0D0D0E0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D19F3F3931718171717
+      1717171717171716D2F3F3887C7B7B7A7A7A7979787877777676767575757474
+      74696868616161606060605D5D535353525252525151515150504F4E4E4E4B4B
+      4B4B4A4A4A494936363535353434343433333333323231312FC2F3F307101110
+      101010101AF3F3F343272727262626262323212121212020201F1F1F1F1E1E1E
+      1E1E1D1EA3F3F3110E0E0E0E0E0D0E0D0E0D0D0D0DF0F3D20E0D0E0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D
+      0C0D0C0D0C0D0C0D0C0E0E0E0F0E0F1617171717171717171717171717171717
+      1717171717171717131413130000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000E17171717130E0F0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D
+      0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0E0D0D
+      0D0D0D0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0FF3F3D01717181717171717171717171793F3F3C7
+      7B7B7B7B7A7A7A79797878777776767575757574747469686861616160606060
+      5D5D535353525252525151515150504F4E4E4E4B4B4B4A4A4A4A494936363535
+      3434343434343333333232313138E0F3F3D0131010101397F3F3F36727272727
+      2626262623232321212121202020201F1F1F1E1E1E1E1E22F3F3CF0E0E0E0E0E
+      0E0D0E0D0E0D0E0D17F3F3900E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D
+      0D0D0D0D0C0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C0C0C0C0D0C0D0C0C0D0C0E0E
+      0E0E0E1317171717171717171717171717171717171717171717171717171717
+      0D00000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000015171717160E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      97F3F31917171817171717171717171716E9F3F27C7C7B7B7B7A7A7A79797878
+      7777767676757575747474696868616161606060605D5D535353525252525151
+      515150504F4E4E4E4B4B4B4B4A4A4A4949363635353534343434333333333232
+      313138E0F3F3F0969395F0F3F3F1672828282827272726262626232321212121
+      2020201F1F1F1F1E1E1E1E9AF3F3190E0E0E0E0E0E0E0E0D0E0D0E0D96F3F311
+      0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E
+      0D0D0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0C0D0C0D0D0C0D0D0C
+      0D0D0C0C0C0D0C0D0C0D0C0C0D0C0D0C0C0D0D0F0E0F0E0F1617171717171717
+      1717171717171717171717171717171717171717110000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000F17
+      171717110E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0D0D0E0D0D0D0D0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D19F3F3931817171817171717
+      171717171796F3F3B67C7C7C7B7A7A7A7A797978787777767675757575747474
+      696868616161606060605D5D535353525252525151515150504F4E4E4E4B4B4B
+      4A4A4A4A4949363635353434343434333333333232313138D5F3F3F3F3F3F3F3
+      E041292828282827272727262626232323212121212020201F1F1F1F1E1E24EE
+      F3E80E0E0E0E0E0E0E0E0E0E0D0E0D0EE9F3D20E0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0D0E0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D
+      0D0C0D0D0D0C0D0D0D0D0D0C0D0D0C0D0C0D0C0D0C0C0D0C0D0C0C0D0C0D0C0D
+      0C0C0D0C0D0C0D0E0E0E0E0E0E0E0E0F10101010131313141514151717171717
+      1717171717171717160000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000B15171717160E0E0E0E0F0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E
+      0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0E0D0E0D0D0D
+      0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0FE9F3E81718171718171717171717171718F0F3EF7D7C7C
+      7C7B7B7A7A7A797978787777767676757575747474696868616161606060605D
+      5D535353525252525151515150504F4E4E4E4B4B4B4B4A4A4A49493636353535
+      3434343434333333323231312F6EE0F3F3F3E06E292B29292928282827272727
+      262626232323212121212020201F1F1F1F1E9AF3F3920E0F0E0E0E0E0E0E0E0E
+      0D0E0D19F3F3900E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0C
+      0D0C0D0D0C0D0C0D0D0C0D0C0C0D0C0C0D0C0D0C0D0C0D0C0C0D0C0D0F0E0F0E
+      0F0E0E0E0E0E0E0F0E0E0E0E0E0F0E0E0E0E0F101010131313171717170D0000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000001016171717110E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0D
+      0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D96F3F3
+      901718171718171717171717171796F3F3B67D7C7C7C7B7A7A7A7A7979787877
+      77767675757575747474696868616161606060605D5D53535352525252515151
+      5150504F4E4E4E4B4B4B4A4A4A4A494936363535343434343433333333323231
+      31312F2C2C2C2C2B2B2B29292929282828272727272626262323232121212120
+      20201F1F1F24EEF3F0100E0E0E0E0E0E0E0E0E0E0E0E0ECFF3F30F0E0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0E
+      0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0C0D0C0D0D0C0D0C0D0C0C0D
+      0C0C0D0C0C0D0C0C0C0D0C0D0C0C0C0C0E0E0E0E0E0F0E0F0E0F0E0E0E0F0E0F
+      0E0E0E0F0E0E0E0E0E0E0E0F0E16171717110000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000B15171717
+      160E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0D0E0D0D0E0D0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D15F3F3CF1817181717181717171717
+      171718F1F3EF897D7C7C7B7B7B7A7A7A79797878777776767675757574747469
+      6868616161606060605D5D535353525252525151515150504F4E4E4E4B4B4B4B
+      4A4A4A494936363535353434343433333333323231312F2F2F2C2C2C2B2B2B29
+      29292928282827272727262626232323212121212020201F1F9AF3F3920F0E0E
+      0F0E0E0E0E0E0E0E0E0E11F3F3960E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D
+      0D0D0D0C0D0D0C0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0D0C0C0D
+      0C0D0C0C0E0E0F0E0E0E0E0E0E0E0E0F0E0E0E0E0E0F0E0E0F0E0F0E0F0E0E0E
+      0E14171717150000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000001016171717110E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0D0D0E0D0D0E0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0DE8F3F0191718171817171817171717171797F3F3C77D7D7C7C7B
+      7B7B7A7A7A797978787777767675757575747474696868616161606060605D5D
+      535353525252525151515150504F4E4E4E4B4B4B4A4A4A4A4949363635353434
+      34343434333333323231312F2F2C2C2C2C2B2B2B292929292828282727272726
+      2626232323212121212020202AEEF3F0100F0E0F0E0E0E0E0E0E0E0E0E0E93F3
+      F3150E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D
+      0D0E0D0E0D0D0D0E0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0D0D0C0D0D0C0D0C
+      0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0C0D0C0C0C0C0E0D0E0E0E0E0E
+      0F0E0E0E0F0E0F0E0E0E0F0E0E0E0E0E0E0F0E0F0E10171717170C0000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000B15171717160E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D19F3F3961817
+      181717181717171717171718F1F3F2897D7D7C7C7C7B7A7A7A7A797978787777
+      767676757575747474696868616161606060605D5D5353535252525251515151
+      50504F4E4E4E4B4B4B4B4A4A4A49493636353535343434343333333332323131
+      2F2F2F2C2C2C2B2B2B2929292928282827272727262626232323212121212020
+      A4F3F31A0E0F0E0E0F0E0F0E0E0E0E0E0E0FF0F3E80E0D0E0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0E0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0C0D0D0D0C0D0D0D0D0C0D0D0C0D0C0D0C0D0D0C0D0D0C0C0D0C0D0C0C0C0D
+      0C0D0C0D0C0C0D0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0D0C0D0C0E0D0D0E0E
+      0E0E0E0F0E0E0E0E0E0F17171717100000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000001016171717110E
+      0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D
+      0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D
+      0E0D0D0E0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0FE9F3E91817181718171718171717171717
+      95F3F3DD7E7D7D7C7C7C7B7B7A7A7A7979787877777676757575757474746968
+      68616161606060605D5D535353525252525151515150504F4E4E4E4B4B4B4A4A
+      4A4A494936363535343434343433333333323231312F2F2C2C2C2C2B2B2B2929
+      292928282827272727262626232323212121213EF3F3E80F0E0F0F0E0E0F0E0E
+      0E0E0E0E0E92F3F3190E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0D
+      0D0C0D0D0C0D0C0D0D0C0D0C0D0C0C0C0D0C0D0C0D0C0C0D0C0D0C0D0C0C0C0D
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0F0E0E0E1417
+      1717140000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000B15171717160F0E0E0E0F0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0E0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D91F3F3931817181718171718171717171717E8F3F3AF7E7D7D7C7C7C7B
+      7A7A7A7A797978787777767676757575747474696868616161606060605D5D53
+      5353525252525151515150504F4E4E4E4B4B4B4B4A4A4A494936363535353434
+      343434333333323231312F2F2F2C2C2C2B2B2B29292929282828272727272626
+      26232323212121D8F3F3170F0F0E0F0E0F0E0F0E0F0E0E0E0EE8F3F00F0E0D0E
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0C0D0C0D0D0C0D0C0D0D0C
+      0C0D0C0D0C0D0C0C0C0D0C0D0C0C0D0C0D0C0C0C0C0D0C0D0C0D0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0F0E0F11171717170B0000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00001016171717130E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0E0D0D0E0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0EF3F3E91818171817
+      18171718171717171791F3F3EF8A7E7D7D7C7C7B7B7B7A7A7A79797878777776
+      7675757575747474696868616161606060605D5D535353525252525151515150
+      504F4E4E4E4B4B4B4A4A4A4A494936363535343434343433333333323231312F
+      2F2C2C2C2C2B2B2B2929292928282827272727262626232323219AF3F3980F0E
+      0F0F0F0E0F0E0E0F0E0E0E0E19F3F3910E0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D
+      0D0D0D0C0D0D0D0C0D0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C
+      0D0C0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0E0E0E0E0F171717170E0000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000B15161717160F0E0E0F
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E
+      0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D
+      0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D96F3F393181718171817181717181717171797F3
+      F3CC7E7E7D7D7C7C7C7B7A7A7A7A797978787777767676757575747474696868
+      616161606060605D5D535353525252525151515150504F4E4E4E4B4B4B4B4A4A
+      4A494936363535353434343433333333323231312F2F2F2C2C2C2B2B2B292929
+      292828282727272726262623233FF3F3F0110F0F0F0E0F0F0E0F0F0E0F0E0F0E
+      E8F3F00F0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0E0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0D0D0D0D0E0E0E0E0E0E0F0E0E0E0E0E0E0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0C0D0D0C
+      0D0C0D0C0D0D0C0D0C0D0C0C0C0C0D0C0C0C0C0C0D0C0D0C0D0C0C0C0C0D0C0D
+      0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0F0E0E0E1617171711
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000E17171717140E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0E0E0E0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0D
+      0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      10F3F3E9181817181817171817171718171718E9F3F3B07E7E7D7D7C7C7B7B7B
+      7A7A7A797978787777767675757575747474696868616161606060605D5D5353
+      53525252525151515150504F4E4E4E4B4B4B4A4A4A4A49493636353534343434
+      3434333333323231312F2F2C2C2C2C2B2B2B2929292928282827272727262626
+      23D8F3F3180F0F0F0F0F0F0F0E0F0E0F0E0F0E92F3F3910E0E0E0D0E0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0E0F0E
+      0E0E0F0E0E0E0F0E0F0E0E0E0F0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0C0D0D0D0C0D0D0D0D0C0D0D0D0D0D0C0D0C0D0D0C0D0D0C0D0C0C0C0C0D0C
+      0D0C0C0D0C0D0C0D0C0D0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0E0E0E0F0E1417171715000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      1417171717100F0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0D0E0E0E0E0E0E0E0E0E0E0F0E0F0E0E0E0E0D0E0E0D0E0E0D0E0E0E0D0E0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0D0D0D0E0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C91F3F39618181718171817
+      1817171717171791F3F3F28A7E7E7D7D7C7C7B7B7B7A7A7A7979787877777676
+      76757575747474696868616161606060605D5D53535352525252515151515050
+      4F4E4E4E4B4B4B4B4A4A4A494936363535353434343433333333323231312F2F
+      2F2C2C2C2B2B2B29292929282828272727272626A0F3F3980F0F0F0F0F0F0F0E
+      0F0F0E0F0E0E10F0F3F00F0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0E0E0E0E0F0E0E0F0E0E0F0E0E0E0E0E0E0F0E
+      0E0E0E0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D
+      0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0C0C
+      0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E
+      0E0E0E11171717170B0000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000C17171717150E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0F0E0F0E
+      0E0E0E0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0E
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0EF0F3F119181718181718171817181717171797F3F3E5
+      7F7E7E7D7D7C7C7B7B7B7A7A7A79797878777776767575757574747469686861
+      6161606060605D5D535353525252525151515150504F4E4E4E4B4B4B4A4A4A4A
+      494936363535343434343433333333323231312F2F2C2C2C2C2B2B2B29292929
+      2828282727272747F3F3F0110F0F0F0F0F0F0F0F0F0F0E0F0E0F92F3F3910E0E
+      0D0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0E0E0F0E0E0E0F0E0E0E0E0F0E0F0E0F0E0E0E0F0E0F0E0E0E0E0E0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0D0C0D0C0D0D0C0D0D0C
+      0D0D0C0D0C0C0D0C0D0C0D0C0D0C0D0C0C0D0C0D0C0D0C0C0C0D0C0D0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0F0E0F0E0F171717170D000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000001317171717110F0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0F0E0F0E0E0E0E0E0E0F0E0F0E0F0E0E0E0E0D0E0E
+      0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D91F3
+      F398181817181817181717171817171717E8F3F3CC7F7E7E7D7D7C7C7C7B7A7A
+      7A7A797978787777767676757575747474696868616161606060605D5D535353
+      525252525151515150504F4E4E4E4B4B4B4B4A4A4A4949363635353534343434
+      34333333323231312F2F2F2C2C2C2B2B2B29292929282828272740F1F3F3170F
+      0F0F0F0F0F0F0F0F0F0E0F0F0E13F3F3E80F0E0E0D0E0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0E0F0E0E0E0E0F0E0E0E0F0E10
+      10111110100F0E0F0E0E0E0F0E0F0E0E0F0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D
+      0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0D0C0C0D0C0D0C0C0C0C0D0C0C
+      0C0C0D0C0D0C0C0C0C0C0C0D0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0E0E0E0E0E1617171710000000000000000000000000000000
+      00000000000000000000000000000000000000000000000000000000000B1617
+      1717160F0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0F0E0F0E0E
+      0E0E0F0E0F0E0F0E0E0E0E0E0E0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D
+      0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0DE8F3F390181817181718171817
+      171817171718F1F3F3B77F7E7E7D7D7C7C7C7B7B7A7A7A797978787777767675
+      757575747474696868616161606060605D5D535353525252525151515150504F
+      4E4E4E4B4B4B4A4A4A4A494936363535343434343433333333323231312F2F2C
+      2C2C2C2B2B2B292929292828282DD8F3F3910F0F100F0F0F0F0F0F0F0F0F0F0F
+      0ED0F3F3190E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0D0E0D
+      0D0E0D0D0E0E0E0E0E0F0E0F0E0E0F13141617171717171717171715110F0E0E
+      0E0E0E0F0E0E0E0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D
+      0C0D0C0D0C0D0C0D0D0C0C0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0C0C0C0C0C
+      0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0F0E0E
+      1517171713000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000001016171717140E0F0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0F0E0F0E0E0E0F0E0E0F0E0E0E0E0E10111415150F0E
+      0F0E0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0D0D0D0E0D0D0E0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0C17F3F3D317181818181718171817171817171791F3F3F38F7F
+      7E7E7D7D7C7C7C7B7A7A7A7A7979787877777676767575757474746968686161
+      61606060605D5D535353525252525151515150504F4E4E4E4B4B4B4B4A4A4A49
+      4936363535353434343433333333323231312F2F2F2C2C2C2B2B2B2929292928
+      28D8F3F3970F100F0F0F0F0F0F0F0F0F0F0F0F0E18F3F3CF0E0D0E0E0D0E0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0E0E0F0E0E0E0E0E
+      10151717171717171717171717171717171715110F0E0E0E0E0F0E0E0E0C0D0D
+      0D0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0C0D0C0D0D0C0D0D0C0D0C0D0C0D
+      0C0D0C0D0C0C0D0C0D0C0C0D0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0E0F0E131717171700000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000001517171717100E0E0F0E0E0E0E0E0E0E0E0E0F0E0F0E0E0E0F
+      0E0E0F0E0E0E0F0E0F111315171717171717150F0E0E0F0E0E0E0E0E0D0E0E0D
+      0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0DCFF3F396
+      18181718181718171817171817171793F3F3F28F7F7E7E7D7D7C7C7C7B7B7A7A
+      7A797978787777767675757575747474696868616161606060605D5D53535352
+      5252525151515150504F4E4E4E4B4B4B4A4A4A4A494936363535343434343434
+      333333323231312F2F2C2C2C2C2B2B2B29292929A5F3F3D21110100F100F0F0F
+      0F0F0F0F0F0F0F10F0F3F3140E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0E0E0E0F0E0E0F0E1016171717171717171717171717
+      171717171717171715110F0E0E0E0E0F0E0E0D0D0D0D0C0D0D0D0D0C0D0D0D0D
+      0C0D0D0D0D0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0D0C0D
+      0C0D0C0C0C0C0C0D0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0D0E0E0E0E10171717170C000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000C17171717
+      160F0E0E0E0E0E0E0F0E0F0E0E0E0E0E0F0E0E0E0E0F0E0E1013141616171717
+      17171717171717150F0E0E0E0F0E0E0E0E0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0D0D
+      0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D10F0F3F01A1818171818171817181717
+      1817171798F3F3F28F7F7E7E7D7D7C7C7C7B7A7A7A7A79797878777776767675
+      7575747474696868616161606060605D5D535353525252525151515150504F4E
+      4E4E4B4B4B4B4A4A4A494936363535353434343433333333323231312F2F2F2C
+      2C2C2B2B2B2929A6F3F3E8130F100F100F100F100F0F0F0F0F0F0F95F3F3910E
+      0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0E0F
+      0E0E0E0F0E141717171717171717171717171717171717171717171717171510
+      0E0F0E0E0E0E0E0D0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0C0D0C0D0C0D0D
+      0C0D0D0C0C0D0C0C0C0C0C0C0C0D0C0C0C0D0C0C0D0C0C0D0C0D0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0F0E0F0E0F171717
+      170D000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000001017171717140F0E0F0E0F0E0E0E0E0F
+      0E0F0E0E0E0F0E101113151717171717171717171717171717171717150F0E0E
+      0E0E0E0E0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D
+      0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0C0D0D0D0D1AF3F3D318181817181817181718171718171717CFF3F3ED8A7F7E
+      7E7D7D7C7C7C7B7B7A7A7A797978787777767675757575747474696868616161
+      606060605D5D535353525252525151515150504F4E4E4E4B4B4B4A4A4A4A4949
+      36363535343434343433333333323231312F2F2C2C2C2C2B2B2BA6F3F3F01610
+      10100F100F100F0F0F0F0F0F0F0F18F3F3E80F0E0E0D0E0E0D0E0E0D0E0D0E0D
+      0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0E0E0E0E0E0F0E101617171717171717
+      15100D0C000000000C0D0F141717171717171717110E0E0F0E0E0E0E0C0D0D0D
+      0D0C0D0D0D0D0C0D0D0D0D0C0D0D0C0D0D0C0D0C0D0C0D0D0C0C0D0C0D0C0D0C
+      0D0C0D0C0D0C0D0C0C0C0C0C0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0E0E161717171000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000B1516171717100E0E0E0E0E0F0E0E0E0E0E0F111314171717171717
+      1717171717171717171717151717171717150F0E0F0E0E0F0E0E0E0D0E0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0CCFF3F3961818
+      1817181817181718171718171717CFF3F3ED8E7F7E7E7D7D7C7C7C7B7A7A7A7A
+      797978787777767676757575747474696868616161606060605D5D5353535252
+      52525151515150504F4E4E4E4B4B4B4B4A4A4A49493636353535343434343433
+      3333323231312F2F2F2C2C2C2BB9F3F3F0161010100F10100F100F100F0F0F0F
+      0F11F0F3F3150E0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D
+      0D0E0D0E0E0E0F0E0E0E1117171717171717110C000000000000000000000000
+      0B1015171717171717140E0E0F0E0E0E0E0C0D0D0D0D0C0D0D0D0D0C0D0D0D0D
+      0C0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0D0C0C0D0C0C0D0C0C
+      0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0E0E0F0E0E151717171300000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000D17171717160F
+      0E0F0E0E0E0F10131416171717171717171717171717171717171613100C0000
+      0E1717171717150F0E0E0F0E0E0E0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0C0D0D0D0D0D10F0F3F39018181818171818171817181717
+      181717CFF3F3F28F7F7E7E7D7D7C7C7C7B7B7A7A7A7979787877777676757575
+      75747474696868616161606060605D5D535353525252525151515150504F4E4E
+      4E4B4B4B4A4A4A4A494936363535343434343433333333323231312F2F2C2C2C
+      B9F3F3F0161010101010100F10100F100F100F0F0FD0F3F3910E0D0E0E0D0E0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0D0E0E0F0E0E0F111617
+      17171717110B000000000000000000000000000000000B0F161717171717140E
+      0E0F0E0E0E0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0C0D0C0D0C0D0D0C0C
+      0D0C0C0D0C0D0C0D0C0C0D0C0D0C0C0D0C0C0C0D0C0C0C0D0C0D0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0E0F0E14171717130000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000001117171717140E0F11141517171717171717
+      1717171717171717171713100E0B000000000000000E1717171717150F0E0E0E
+      0F0E0E0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D
+      0D0C0D19F3F3E81918181718181718171817171817171717CFF3F3F28F7F7E7E
+      7D7D7C7C7C7B7A7A7A7A79797878777776767675757574747469686861616160
+      6060605D5D535353525252525151515150504F4E4E4E4B4B4B4B4A4A4A494936
+      363535353434343433333333323231312F2F2FB9F3F3F0161010101010101010
+      0F10100F100F100F91F3F3D20D0E0E0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E
+      0D0D0E0D0D0E0D0D0E0D0E0E0E0E0E0F101717171717150C0000000000000000
+      0000000000000000000000000B141717171717140E0E0F0E0E0E0D0D0D0D0C0D
+      0D0D0C0D0D0D0D0C0D0C0D0D0C0D0D0C0D0C0D0C0C0D0C0C0C0C0C0D0C0D0C0C
+      0C0D0C0C0C0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0D0E0F0E0E13171717170000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000B1516171717171717171717171717171717171717171715110F0C000000
+      000000000000000000000E171717171715100E0E0E0E0E0E0E0E0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0D0C0D96F3F3D018181818
+      18171818171817171817171717CFF3F3F2B77F7E7E7D7D7C7C7C7B7B7A7A7A79
+      7978787777767675757575747474696868616161606060605D5D535353525252
+      525151515150504F4E4E4E4B4B4B4A4A4A4A4949363635353434343434343333
+      333232313138E0F3F3F016101010101010101010100F10100F0F1017F3F3F011
+      0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0E0F
+      0E0F0E101717171717130B000000000000000000000000000000000000000000
+      0000111717171717110F0E0E0F0E0D0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0C
+      0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0D0C0D0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0E0E
+      0F10161717170B00000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000C1717171717171717
+      17171717171717171613100C000000000000000000000000000000000000000E
+      171717171716100E0F0E0F0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0C0D0D0D0D0C0FD2F3F396181817181817181718171817181718
+      1717CFF3F3F3C97F7E7E7D7D7C7C7C7B7A7A7A7A797978787777767676757575
+      747474696868616161606060605D5D535353525252525151515150504F4E4E4E
+      4B4B4B4B4A4A4A494936363535353434343433333333323254EBF3F3E8161110
+      101010101010101010100F10100F14F0F3F3170E0E0E0D0E0E0D0E0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0E0E0E0E0E0F161717171711000000
+      0000000000000000000000000000000000000000000000111717171717100E0E
+      0E0E0E0D0D0D0D0D0C0D0D0D0D0C0D0C0D0D0C0D0D0C0D0C0D0D0C0D0C0D0C0D
+      0C0D0C0C0D0C0D0C0C0D0C0D0C0C0D0C0D0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0F0E0E0E10171717170C0000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000010171717171717171717171714100E0B00000000
+      00000000000000000000000000000000000000000E171717171716110E0E0E0E
+      0F0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D
+      0C13F0F3F392181818181817181817181717181717171793F3F3F3DF8A7E7E7D
+      7D7C7C7C7B7B7A7A7A7979787877777676757575757474746968686161616060
+      60605D5D535353525252525151515150504F4E4E4E4B4B4B4A4A4A4A49493636
+      353534343434343333333371F1F3F3D31311101110111010101010101010100F
+      1011D2F3F3930E0D0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0D0E0D0D0E0E0F0E0F0E15171717171300000000000000000000000000000000
+      0000000000000000000000001117171717160E0F0E0F0E0E0C0D0D0D0D0C0D0D
+      0D0D0D0C0D0C0D0C0D0D0C0D0C0D0C0C0D0C0D0C0D0C0D0C0D0C0C0D0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0D0E0F0E0E0E171717170D0000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0014171717171715130F0C000000000000000000000000000000000000000000
+      0000000000000000000C151717171717110F0E0E0E0E0E0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D
+      0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D17F3F3F1901818181818
+      17181817181717181717171792F1F3F3EF8F7E7E7D7D7C7C7C7B7A7A7A7A7979
+      78787777767676757575747474696868616161606060605D5D53535352525252
+      5151515150504F4E4E4E4B4B4B4B4A4A4A49493636353535343434343439BAF3
+      F3F39713111011101110101010101010101010100F97F3F3CF0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0E0E0E0E0E101717
+      1717150B00000000000000000000000000000000000000000000000000000000
+      001317171717130E0E0E0E0E0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0C0D0C0D
+      0D0C0D0C0C0C0C0C0C0C0D0C0C0D0C0D0C0D0C0D0C0C0C0C0D0C0D0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0E0E0E0F0E0E1717
+      1717100000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000C1513100D0B0000000000
+      0000000000000000000000000000000000000000000000000000000000000C15
+      1717171717110F0E0F0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0C0D0D0D0C0D0D0D0C0D0D91F3F3F01918181718181718171817181718171817
+      17F8E8F3F3F3C87E7E7D7D7C7C7C7B7B7A7A7A79797878777776767575757574
+      7474696868616161606060605D5D535353525252525151515150504F4E4E4E4B
+      4B4B4A4A4A4A4949363635353434343459E0F3F3F39211101111101110111010
+      101010101010101097F3F3D20F0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E
+      0D0E0D0D0E0D0E0D0D0E0D0E0E0F0E0F0E16171717170B000000000000000000
+      0000000000000000000000000000000000000000000B15171717160F0F0E0E0F
+      0D0D0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0D0C0D0C0C0D0C0D0C0D0C0D0C0C0D
+      0C0D0C0D0C0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0E0E0E0F0E0E0E0F0E1517171710000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000B1417171717110E0E0E0E0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D
+      96F3F3E819181818181817181817181717181717171718CFF3F3F3ED8F7E7D7D
+      7C7C7C7B7A7A7A7A797978787777767676757575747474696868616161606060
+      605D5D535353525252525151515150504F4E4E4E4B4B4B4B4A4A4A4949363635
+      353534A1F3F3F3E81711111111101110111011101110101010101091F3F3F014
+      0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E
+      0E0E0E0E11171717171000000000000000000000000000000000000000000000
+      000000000000000000000E17171717130E0F0E0E0E0D0D0C0D0D0D0C0D0D0C0D
+      0C0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0C0C0C
+      0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0E0F
+      0E0E0F0E0F111717171713000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000C17171717100F0E0F0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0E
+      0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0CCFF3F3E819181818181817
+      18181718171718171717171792F1F3F3F3C8897D7D7C7C7B7B7B7A7A7A797978
+      787777767675757575747474696868616161606060605D5D5353535252525251
+      51515150504F4E4E4E4B4B4B4A4A4A4A494936363565EBF3F3F3971411111111
+      11111110111011101010101010101AF3F3F0140D0E0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0E0F0E0F0E1517171716000000
+      0000000000000000000000000000000000000000000000000000000000000015
+      171717160E0E0E0F0E0D0D0D0D0C0D0D0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D
+      0C0D0C0D0C0D0C0D0C0C0C0C0C0D0C0C0D0C0C0D0C0C0C0D0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0E0E0F0E0E0E0F0E111617171717171300
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000000000D171717
+      170F0E0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D
+      0D0D0C0D0D0D0C0D0D0FD2F3F3E8191818171818171817181718171817181717
+      1718D0F3F3F3EFB77D7D7C7C7C7B7A7A7A7A7979787877777676767575757474
+      74696868616161606060605D5D535353525252525151515150504F4E4E4E4B4B
+      4B4B4A4A4A494955C5F3F3F3F01A111111111111111111111011101110111010
+      10F8F3F3F3190E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0D0E0D0D0E0E0E0E0E0F1717171710000000000000000000000000000000
+      000000000000000000000000000000000000000E17171717110E0F0E0E0D0D0D
+      0D0D0C0D0D0C0D0C0D0D0C0D0D0C0D0D0C0C0C0C0C0C0C0C0D0C0C0C0D0C0D0C
+      0D0C0C0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D
+      0E0F0E0F0E0E0E0F0E1116171717171717171000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000010161717170E0E0F0E0E0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D
+      0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0ED2
+      F3F3E8191818181818171818171817171817171717171792E9F3F3F3E5AF7D7C
+      7C7B7B7B7A7A7A79797878777776767575757574747469686861616160606060
+      5D5D535353525252525151515150504F4E4E4E4B4B4B4A4A4A4DAAF3F3F3F396
+      141111111111111111111111111011101110111090F3F3F3190E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0E0E0F0E0F13
+      161717170B000000000000000000000000000000000000000000000000000000
+      000000000000000016171717140E0E0E0F0D0D0D0C0D0D0D0D0C0D0D0C0D0C0D
+      0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0D0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0E0E0E0E0E0E0F0E1015171717
+      17171717130C0000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000013171717150E0E0E0F0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0E0D0D0D0D0D0D0E0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0ED2F3F3E81918181718181817
+      1817181717181717181717171897F3F3F3F3E4AF7C7C7B7B7B7A7A7A79797878
+      7777767676757575747474696868616161606060605D5D535353525252525151
+      515150504F4E4E4E4B4B4B4DACF1F3F3F3D01713111311111111111111111111
+      1111101110111090F3F3F3190E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0D0E0D0D0D0E0E0E0E0E15171717140000000000000000
+      0000000000000000000000000000000000000000000000000000000011171717
+      160F0E0E0F0E0D0D0D0C0D0D0D0C0D0C0D0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C
+      0C0D0C0C0D0C0D0C0C0C0C0C0C0D0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0E0E0E0F0E0F0E0F0E0F1417171717171717150E0000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000013171717140E0F0E
+      0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0D0D0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D
+      0C0D0D0D0C0D0D0D0ED2F3F3E819181818181718181718171817181717171717
+      171719CFF3F3F3F3E5B67C7B7B7B7A7A7A797978787777767675757575747474
+      696868616161606060605D5D535353525252525151515150504F4E4E4E58C3F3
+      F3F3F3E89113111311111311111111111111111111111110111091F3F3F3190E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0E0D0D0E
+      0D0E0E0E0F0E0E17171717100000000000000000000000000000000000000000
+      000000000000000000000000000000000D171717170F0F0E0E0E0D0D0D0D0C0D
+      0D0C0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0C0C0C0C0D0C0C0C
+      0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0F0E0E0E0E0E0F
+      1317171717171717160F00000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000017171717130E0E0E0F0D0E0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0E0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0ED2F3
+      F3E99018181818171818171817181718171717171717171719CFF3F3F3F3EFC7
+      887B7A7A7A7A797978787777767676757575747474696868616161606060605D
+      5D535353525252525151515150504F9DDAF3F3F3F3E891131113131113131113
+      1111111111111111111111111097F3F3F3190E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0E0E0E0F0F171717170C
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000B16171717110E0E0F0E0D0D0D0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C
+      0C0C0C0C0C0C0C0C0D0C0D0C0D0C0D0C0C0C0D0C0C0C0C0C0D0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0D0E0E0F0E0E0E0F0E0F1316171717171717170F0B000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000000000000000B
+      17171717100E0F0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0E0D0D0D0E0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0D0ED2F3F3F1911818181817181817
+      181717171817181717171717171719CFF3F3F3F3F3E5B4867A7A7A7979787877
+      77767675757575747474696868616161606060605D5D53535352525252515151
+      6AC4F1F3F3F3F3D3911313131313131113111311131111111111111111111113
+      07F3F3F0180E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0D0E0D0D0E0D0D0E0E0F0E0E10171717170B000000000000000000000000
+      0000000000000000000000000000000000000000000000000016171717130E0E
+      0E0E0D0D0D0C0D0D0C0D0D0C0D0D0C0D0D0C0C0D0C0D0C0D0C0D0C0D0C0D0C0D
+      0C0D0C0C0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0F0E0E0E
+      0E0F0E0E111616171717171717110B0000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000C171717170F0E0E0E0F0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D
+      0D0D0D0E0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D
+      0D0D0C0D0D0D0C0D95F3F3F3F718181818171818171817181717171717171717
+      171717171896E9F3F3F3F3F3E4B5877A79797878777776767675757574747469
+      6868616161606060605D5D53535352525F73C4F2F3F3F3F3F397191313131313
+      13131313131113111311131111111111111115D3F3F3F0140D0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0E0E
+      0E0F111717171700000000000000000000000000000000000000000000000000
+      0000000000000000000000000013171717130E0F0E0E0E0C0D0D0D0C0D0C0D0C
+      0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0C0D0C0D0C0D0C0D0C0C0C0C0C0D0C0D0C
+      0D0C0C0C0C0C0C0C0C0C0C0C0D0E0E0E0E0F0E0F0E0E10151717171717171713
+      0C00000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000010161717170E0F0E0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0E0D0D0E0D0D0D
+      0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D93F3F3
+      F3CF191818181817181817181718171718171717171717171717169207F3F3F3
+      F3F3F3EFCDB58B78787777767675757575747474696868616161606060605D5D
+      6B84BEE3F3F3F3F3F3F3D3921514131313131313131313131311131311131111
+      111111111118F0F3F3D2140E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D
+      0E0D0E0D0E0D0E0D0D0E0D0D0D0E0D0D0E0D0E0F0E0E13171717170000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0013171717150E0E0F0E0E0D0C0D0D0D0C0D0D0C0D0D0C0D0C0D0C0C0D0C0D0C
+      0D0C0D0C0C0C0C0C0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D
+      0E0E0F0E0E0E0E0E0F1517171717171717150D00000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000001017171715
+      0E0E0F0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D
+      0D0C0D0D0D0D0C0D0D0D0C0D0D0D0C0D0C0D18F0F3F3E81A1817181817181817
+      18171817171717171717171717171716171892CFF0F3F3F3F3F3F3F3E7DEC6B2
+      858176757575747474696868616C8383BBC1DBF2F3F3F3F3F3F3F3D393161414
+      13141314131313131313131313131113131113111311111193F3F3F3970F0E0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D
+      0E0D0D0E0D0E0E0E0E0F11171717170000000000000000000000000000000000
+      00000000000000000000000000000000000000000013171717150E0E0E0E0E0C
+      0D0D0D0C0D0C0D0D0C0D0D0C0D0C0D0C0C0C0C0C0C0C0D0C0D0C0D0C0D0C0C0D
+      0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0E0E0F0E0F0E1417171717
+      171717160F000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000013171717140F0E0E0E0E0E0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D
+      0D0E0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D
+      0C0D0D0C0D0D0D14E8F3F3F1F718181818171817181717181717181717171717
+      1717171716171616169096D2F3F3F3F3F3F3F3F3F3F3F3F3F3E6E2E2E2E2F3F3
+      F3F3F3F3F3F3F3F3F3F3F3E89891151414131413141314131313131313131313
+      1313131113111311131115D0F3F3F3920E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0E0F0E0E1317
+      1717170000000000000000000000000000000000000000000000000000000000
+      00000000000000000013171717140E0F0E0E0E0D0D0C0D0D0C0D0C0D0C0D0C0D
+      0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0D0C0C0C0C0D0C0C0C0C0C
+      0C0C0C0C0C0C0C0D0E0F0E0E0F11171717171717171510000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000016171717130E0E0F0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0C0D0E0E1098F3F3
+      F3D0191818181718181718171817171717171717171717171716171617161616
+      16909507D2F0F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3D3CF95901614
+      14141414141414141314131413141313131313131313131313111311131AF0F3
+      F3F0180D0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0D0E0D0D0E0D0E0E0E0E0F1017171717000000000000000000
+      0000000000000000000000000000000000000000000000000000000000141717
+      17130E0E0F0E0D0D0D0D0C0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C
+      0D0C0D0C0D0C0C0C0C0C0D0C0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0D0E0E0E0F
+      1317171717171717110B00000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000B16171717100E0F0E0E
+      0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0E0D0E0D0D0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C
+      0D0D0D0C0D0D0D0D0C0D0D0C0D0E0E0E0E0E90F3F3F3F1921818181718181718
+      1718171718171717171717171717161716161616161616161616159090F79696
+      96D2D2D2D2D298969596901A1715141514151414141414141414141314141314
+      13131313131313131313131313111314CFF3F3F3CF110E0E0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0E0D0D0E0D0D
+      0D0D0E0F0E0E10171717170C0000000000000000000000000000000000000000
+      000000000000000000000000000000000017171717110F0E0E0E0D0D0D0D0C0D
+      0C0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0C0C0C0C0C0C0C0C0C0D0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0F0E0E131717171717130C00000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000C17171717100E0E0E0F0D0E0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0E0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D
+      0C0E0E0F0E0E0F14D3F3F3F3D019181817181718171817181717171717171717
+      1717171617161616161616161616161516151516151515151515151515151515
+      1514151415141414141414141414141414131413141314131313131313131313
+      131390F0F3F3F3920E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0E0D0E0D0D0E0D0D0E0D0E0D0E0E0E0F0E171717170E
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000C17171717100E0E0F0E0D0D0D0D0C0D0D0C0D0C0D0C0D0C0C0C0C0C
+      0C0C0C0C0D0C0D0C0D0C0D0C0D0C0C0D0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0D0E0E0E0F11171717160C000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000F17
+      1717170E0F0E0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0E0D0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C
+      0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0E0E0E0F0E15171796F3F3
+      F3F1961818181817181718171718171717171717171717171617161716161616
+      1616161615161615161515151515151515151515151415151415141414141414
+      141414141414141314131413141313131313131317D2F3F3F3D2140E0E0E0E0D
+      0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D
+      0D0E0D0D0E0D0D0E0D0E0E0F0E0E0E1617171711000000000000000000000000
+      0000000000000000000000000000000000000000000000000F171717170E0F0E
+      0E0E0D0D0C0D0D0C0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D
+      0C0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0F0E0E13171717
+      1300000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000010161717160E0E0F0E0E0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E
+      0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D
+      0D0C0D0D0D0C0D0D0C0E0F0E0E0E171717171AE8F3F3F3E99118171818171718
+      1717181717171717171717171716171616161616161616161615161515161516
+      1515151515151515151514151414151415141414141414141414141314141314
+      1313131313131697F3F3F3F0920E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0D0D0E0E
+      0E0F0E1417171715000000000000000000000000000000000000000000000000
+      00000000000000000000000014171717150E0E0E0F0E0C0D0D0C0D0C0D0C0D0C
+      0D0D0C0D0C0D0C0D0C0D0C0C0D0C0D0C0D0C0D0C0C0D0C0C0C0C0C0D0C0D0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0D0E0E0E0F13171717130000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000013171717150E0E0E0E0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0E0D0D0E0E0E0E0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0C0E0E0E
+      0F0E17171717171390E9F3F3F3D3911718181718171817171817171717171717
+      1717161716161616161616161616151616151615151515151515151515151515
+      14151415141414141414141414141414131413141314131315F7F0F3F3F39811
+      0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0E0D0E0E0E0E0E10171717170E000000
+      000000000000000000000000000000000000000000000000000000000000000C
+      17171717110F0E0E0E0E0D0C0D0D0C0D0D0C0D0D0C0D0C0C0D0C0D0C0D0C0D0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E
+      0E0F0E0E15171717130000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000015171717130E
+      0F0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0E0D0D0D0D0E0F0E0E0E0F0E0E0E0E0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D
+      0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0E0F0E0E10171717170E00000BF7F3
+      F3F3F3D391171818171718171717171717171717171717161716161616161616
+      1616161516151516151615151515151515151515141515141514151414141414
+      1414141414141314131415F7F0F3F3F3E8160E0D0E0E0E0E0E0D0E0E0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0E0D
+      0D0E0D0D0D0E0D0E0F0E0F0E1617171715000000000000000000000000000000
+      0000000000000000000000000000000000000011171717170F0E0F0E0E0D0D0D
+      0C0D0D0C0D0D0C0D0C0D0D0C0C0C0C0C0C0C0D0C0D0C0D0C0D0C0D0C0C0D0C0C
+      0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0E0E0F1417171710000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000017171717110E0E0F0E0E0E0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D
+      0E0E0E0E0E0F0E0E0E0F0E0E0E0E0E0E0E0E0E0D0D0E0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C
+      0D0D0D0C0D0E0E0E0F101717171700000000000E96F3F3F3F3D3921817181718
+      1717181717171717171717171617161616161616161616161516161516151515
+      151515151515151515141514151414141414141414141414141413141696F0F3
+      F3F3E8190E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0E0D0D0E0E0E0E0E
+      13171717170E0000000000000000000000000000000000000000000000000000
+      0000000000000B17171717150E0E0E0F0E0D0D0D0C0D0C0D0C0D0C0D0D0C0C0D
+      0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0D0C0D0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0E0F0E0E0E1617171710000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000C17171717100F0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D
+      0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0E0D0E0E0F0E0E0E0F0E0E0E0E0F
+      0E0E0F0E0E0E0E0E0F0E0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0C0D0F0E0E0E131717
+      1717000000000000001107F3F3F3F3E996181817181717171717171717171717
+      1716171616161616161616161615161515161516151515151515151515151514
+      15141514151414141414141414141998F3F3F3F3E8190E0E0E0E0E0E0E0E0E0D
+      0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0F0E0F0E0F17171717150B0000000000
+      0000000000000000000000000000000000000000000000000000131717171710
+      0E0F0E0E0E0C0D0D0D0C0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C0C0D0C0D0C0D0C
+      0D0C0C0C0C0C0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0F0E0E
+      171717170F000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000D171717170F0E0E0F0E0E
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D
+      0D0E0D0E0D0E0D0E0E0E0E0F0E0E0E0F0E0F0E0E0F0E0E0E0F0E0F0E0E0E0F0E
+      0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C
+      0D0D0D0C0D0D0D0C0D0D0D0C0D0E0F0E0E131717171500000000000000000011
+      F7F3F3F3F3F0CF91171817171817171717171717171716171616161616161616
+      1616151616151615151515151515151515151514151514151414141414141415
+      93E8F3F3F3F3E8190E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0E0D0E0E0E0E0E1317171717110000000000000000000000000000000000
+      000000000000000000000000000F17171717150E0E0E0E0F0D0D0C0D0C0D0C0D
+      0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0C0C0C0C0D0C0C0D0C0C0C0D0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0F0F171717170C00000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000010161717160E0E0F0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0E0E0F0E0E
+      0F1111100E0E0E0F0E0E0F0E0E0E0E0E0F0E0E0F0E0E0E0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D
+      0E0E0E0F0E141717171300000000000000000000000E91E9F3F3F3F3E998F817
+      1717171717171717171717161716161616161616161616151615151615161515
+      151515151515151514151415141514141691CFF3F3F3F3F3CF190E0E0E0E0E0E
+      0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0E0F0E0F0E0F1617
+      1717170E00000000000000000000000000000000000000000000000000000000
+      0C17171717170F0F0E0F0E0E0C0D0D0C0D0D0C0D0C0D0D0C0D0C0C0C0C0C0C0C
+      0D0C0D0C0D0C0D0C0D0C0C0C0C0C0D0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0F0E0E0E10171717170C00000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000131717
+      17150E0E0E0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0D0D0E0E0F0E0E0E0F131717171715141311100E0F
+      0E0F0E0E0E0F0E0E0F0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C
+      0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0D0E0F0E0E15171717130000
+      00000000000000000000000B17D0F3F3F3F3F3E9989217171717171717171717
+      1617161616161616161616161516161516151515151515151515151515151415
+      141793CFF3F3F3F3F3F093110E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0E0D0E0D0E0E0E0E0E1017171717170E00000000000000
+      000000000000000000000000000000000000000C1517171717130E0E0E0E0E0D
+      0D0D0D0D0C0D0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C
+      0D0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0F0E0E1117171717
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000014171717130F0E0F0E0E0E0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E
+      0D0E0E0E0E0F0E131717171717171717171717171515141313130F0E0E0E0E0E
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D
+      0D0C0D0D0D0D0C0D0E0E0E0E0F14171717100000000000000000000000000000
+      00000E91D3F3F3F3F3F3F3D39790171717171717171617161616161616161616
+      1615161515161516151515151515151515189298E8F3F3F3F3F3F398170E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D
+      0D0E0E0F0E0F0E1317171717170E000000000000000000000000000000000000
+      0000000000000C1517171717150E0F0E0F0E0E0D0C0D0C0D0C0D0C0D0D0C0D0C
+      0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0D0C0C0C0C0C0C0D0C0D0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0D0E0E0F0E13171717170E0000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000017171717130E0E0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0F0E0F0E0E111717171717
+      1717171717171717171717171717140E0F0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0E0E0F0E
+      0E1717171710000000000000000000000000000000000000000F92D3F3F3F3F3
+      F3F3F3E807959118161716171616161616161616161615161615161515151515
+      199195D2F0F3F3F3F3F3F3F098190F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D
+      0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0E0E0E0E0E0E15171717
+      171710000000000000000000000000000000000000000000000F171717171716
+      0E0E0E0E0E0E0D0D0D0D0D0C0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0C0C0C0C0C
+      0C0C0C0D0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E
+      0E0E0F1417171717171100000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000C16171717100E0F
+      0E0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0E0E0E0E0E11171717171717171717171717171717171717
+      1717170F0E0F0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D
+      0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0C0E0E0E0F0E171717170E000000000000
+      000000000000000000000000000000000E1896F0F3F3F3F3F3F3F3F3F3D2D296
+      9695909090909090909090909091969607D2E9F3F3F3F3F3F3F3F3F3D293160E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0E0D0E0D0D0E0E0F0E0F0E0F151717171717140C00000000000000
+      00000000000000000000000B131717171717160F0F0E0F0E0F0D0D0D0C0D0D0C
+      0D0D0C0D0C0D0C0D0C0C0C0C0C0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0C0D0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0F0E0E0E10151717171717130B
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000C171717170F0E0E0F0E0E0D0E0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0D0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0E0E0F0E0F0E
+      101617171717110C0F1013161717171717171717171717140E0E0F0E0E0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C
+      0D0D0D0C0E0F0E0E0F171717170C000000000000000000000000000000000000
+      00000000000000000F1793D0F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F0CF9216100E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0E0D0E0D0D0D0D0D0E
+      0E0E0E0E0E0F15171717171717110C00000000000000000000000000000B1117
+      1717171717160F0E0E0F0E0E0E0C0D0D0D0C0D0D0C0D0D0C0D0D0C0D0C0D0C0D
+      0C0D0C0D0C0D0C0D0C0D0C0C0C0D0C0C0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0E0E0F0E0E0F0E151717171717140C0000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      10161717170E0F0E0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0E0E0E0E0E0E10161717171714000000000000
+      000C0C100F131315171717170F0E0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0E0E0E0F10161717
+      170C000000000000000000000000000000000000000000000000000000000000
+      000F151A9307D3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F307CF979590180E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E
+      0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0D0D
+      0E0D0D0E0D0D0D0E0D0D0D0D0D0D0D0E0D0D0D0D0E0F0E0F0E0E0F1317171717
+      171717140F0B00000000000000000B0E1317171717171717150F0E0F0E0E0E0E
+      0D0D0D0C0D0D0C0D0C0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C
+      0C0C0C0C0D0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0E0F0E0E
+      0E0E141717171717160B00000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000011171717150E0E0E0F0E0D0E
+      0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0E0F0E0F0E0F1617171717140B000000000000000000000000000C17171717
+      140E0F0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C
+      0D0D0D0C0D0D0D0C0D0D0C0D0E0F0E0E10171717170000000000000000000000
+      00000000000000000000000000000000000000000000000000000000000F1311
+      111311111311111311110B0000000C17171717100E0F0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0E0D0D0E0D0E
+      0D0E0D0D0D0E0D0D0D0E0E0E0E0F0E0E11161717171717171717171314100F14
+      1316171717171717171717130E0E0E0E0E0F0E0D0C0D0D0D0D0C0D0D0C0D0D0C
+      0D0C0D0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0D0C0C0D0C0C0C0C0D0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0E0E0F0E0E0E111717171717170E00
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000013171717140F0E0E0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0F0E0E0E0F151717171715
+      0B00000000000000000000000000000013171717170F0E0F0E0E0E0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D
+      0E0E0E0F13161717170000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000B16171717110E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0D0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0E0D0E0D0D0E0D0D0D0D0D0D0E0F
+      0E0E0E0F0E0F1417171717171717171717171717171717171717171717150F0E
+      0F0E0F0E0E0E0D0D0D0D0C0D0C0D0C0D0D0C0D0D0C0D0C0D0C0C0C0C0D0C0D0C
+      0D0C0D0C0D0C0D0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0E0E0E0F0E0F0E1016171717171710000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000017171717
+      130E0F0E0E0F0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D
+      0D0E0D0D0E0D0E0E0E0E0E0F0E1517171717160C000000000000000000000000
+      000000000C17171717140E0E0F0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0C0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0D0F0E0E0E1317171714000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000016171717130F0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0E0D0D0E
+      0D0D0E0D0D0D0D0D0D0D0D0D0D0D0E0D0E0D0D0E0E0F0E0E0E0E0E1014171717
+      17171717171717171717171717171715100E0F0E0E0E0E0F0E0C0D0D0C0D0D0D
+      0D0C0D0C0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0C0C
+      0C0D0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0E0E0E
+      0F0F161617171717130000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000B16171717100E0E0F0E0E0E0E0E0E0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0D0D0E0D0D0E0D0D0E0E0E0F0E0E0E
+      1417171717160B00000000000000000000000000000000000013171717170F0E
+      0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0D
+      0D0C0D0D0D0C0D0D0E0F0E0E1417171713000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000013171717150E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0E0D0E0D0E0D0D
+      0E0D0D0D0D0D0D0D0E0E0E0F0E0F0E0E0E0F1115171717171717171717171717
+      16130F0E0E0E0E0E0F0E0E0E0D0D0C0D0D0D0C0D0D0C0D0D0C0D0D0C0D0C0D0C
+      0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0F0E0F0E0E0E0F151717171717140B00
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000C1717171716110E0E0E0F0E0E0F0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0D0E0D0E0D0D0E0D0D0E0E0E0E0E0F0E1417171717170E000000000000
+      000000000000000000000000000C17171717140E0F0E0E0E0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0C0E0E0E0F0E
+      1517171713000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000010
+      161717170E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D
+      0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0D0E0D0D0E0D0D0E0D0E0D0E0D0D0D0D0D0D0D0D0E0D0D0D0E0E0E
+      0E0E0E0F0E0E0F0E0F101114151415141413100F0E0E0F0E0F0E0F0E0E0E0E0C
+      0D0D0D0D0C0D0D0C0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0D0C0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0D0E0E0E0F0E0E0E141717171717160B000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000F171717171717150F
+      0E0E0F0E0E0E0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D
+      0E0E0F0E0E0E1316171717170E00000000000000000000000000000000000000
+      000013171717170F0E0F0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D
+      0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0E0E0E0E0E151717171000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000C17171717100E0F0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D
+      0D0D0D0D0D0D0D0D0D0E0D0E0D0D0D0D0D0D0D0E0E0F0E0E0E0F0E0E0E0E0F0E
+      0E0E0F0E0E0E0F0E0F0E0E0E0E0E0E0E0E0D0D0D0D0C0D0D0D0D0D0C0D0C0D0C
+      0D0C0D0C0D0C0D0C0C0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0C0D0C0D0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0E0E0F0E0E
+      0E111717171717170E0000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000B1317171717171717130F0E0E0F0E0F0E0E0E0E0E
+      0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0F0E0E0F0E11171717171710
+      000000000000000000000000000000000000000000000C17171717140E0E0F0E
+      0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D
+      0D0C0D0E0E0F0E0E171717171000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000B16171717110E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0E0D0E0D0D0D0D
+      0D0E0D0D0D0D0D0D0D0E0E0F0E0E0E0F0E0E0E0E0F0E0E0F0E0E0E0E0E0E0F0E
+      0F0E0E0D0D0D0C0D0D0D0D0C0D0D0D0C0D0C0D0D0C0D0C0D0D0C0C0D0C0D0C0D
+      0C0D0C0D0C0D0C0D0C0D0C0C0C0C0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0F0E0F0E11161717171717100000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000D1517171717171716110F0E0E0E0E0F0E0E0E0E0E0D0E0D0E0D0E0D0D0E0D
+      0E0D0D0E0D0D0E0E0E0E0F0E1017171717171100000000000000000000000000
+      000000000000000000000013171717170F0E0E0E0F0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0C0E0E0E0F0E17171717
+      0D00000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000014171717
+      140F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E
+      0E0E0F0E0E0F0E0E0E0F0E0E0F0E0F0E0F0E0E0E0E0D0D0D0D0D0D0C0D0D0D0D
+      0C0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C
+      0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0E0E0E0E0E0E0E0F1617171717171300000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000B101717171717171715
+      110E0F0E0E0E0F0E0E0E0E0E0D0E0D0E0D0E0D0D0D0E0D0D0E0E0E0F0E0E0E10
+      161717171713000000000000000000000000000000000000000000000000000C
+      17171717140E0F0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C
+      0D0D0D0D0C0D0D0D0D0C0D0E0F0E0E0F171717170C0000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000010171717160E0E0F0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D
+      0D0D0D0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0E0E0E0F0E0E0E0E0F
+      0E0E0E0E0E0E0D0D0D0D0C0D0D0C0D0D0D0C0D0D0D0D0C0D0C0D0C0D0C0D0D0C
+      0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0F0E0F0E0F0E
+      0F151717171717140B0000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000C131717171717171715100E0F0E0E0E0F0E0E0F
+      0E0E0D0E0D0D0E0D0E0D0D0E0E0E0E0E0F0E101617171717140B000000000000
+      000000000000000000000000000000000000000013171717170F0E0E0F0E0E0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0C0D0E
+      0E0E0F10171717170B0000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000D17171717100E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D
+      0E0E0E0E0D0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0E0D0E0D0E0D0E0D0D0D0D0D0E0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0E0E0E0D0E0D0E0D0D0C0D0D0D0D0D0C
+      0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0D0C0D0C0C0D0C0D0C0D0C0D0C
+      0D0C0D0C0D0C0D0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0E0E0E0F131717171717160B0000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000D151717171717171715100E0F0E0E0E0F0E0E0E0E0E0E0D0D0E0D0D0E0D
+      0E0E0F0E0E0F1517171717140B00000000000000000000000000000000000000
+      00000000000000000C17171717150E0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0C0D
+      0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0D0D0C0D0F0E0E0E111717171700000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000B16171717110E0F
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0E0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D
+      0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0C0D0C0C0C
+      0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0E0F0E0F0E0E0E131717171717160E00000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000B0F16171717171717
+      1714100E0F0E0E0E0F0E0E0E0E0E0E0D0E0D0E0E0F0E0E0E0F1517171717160B
+      0000000000000000000000000000000000000000000000000000000000131717
+      1717100F0E0F0E0E0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D
+      0D0C0D0D0D0C0D0E0F0E0E131717171700000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000014171717150E0E0F0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0E
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0C0D0C0D0C0D0C0D0D0C0D0C0D0C0D
+      0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0E0F0E0E
+      1116171717171600000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000B10171717171717171715100E0F0E0E0F0E0F
+      0E0E0E0E0E0E0E0E0E0E0F0E1517171717150C00000000000000000000000000
+      00000000000000000000000000000000000C17171717150E0E0E0E0E0D0D0D0D
+      0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0E0E0F0E13
+      1717171300000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0010161717170F0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E
+      0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0D0E0D0D0E0D0D0E0D0E0D0E0D0E0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C
+      0D0D0D0D0D0C0D0C0D0D0C0D0C0D0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0D0C0C0C0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0E0F0E0E0F17171717130000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000B11171717171717171716100F0E0E0E0E0F0E0F0E0E0E0F0E0F0E0E14
+      17171717170C0000000000000000000000000000000000000000000000000000
+      0000000000001317171717100E0F0E0E0E0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D
+      0C0D0D0D0C0D0D0D0C0D0D0D0D0C0E0E0E0E0E15171717130000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000C17171717110E0F0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0D
+      0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0E
+      0D0E0D0D0D0D0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0C0D0D0C0D0C0D0D
+      0C0D0D0C0C0C0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0D0C0C0D0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0D0F0E0E0E0F0F171717170E0000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000B111717171717
+      17171716130F0F0E0E0E0E0E0F0E0E0E0E0E1317171717170E00000000000000
+      00000000000000000000000000000000000000000000000000000B1717171715
+      0E0E0F0E0E0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D
+      0D0C0E0E0F0E0E15171717110000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000016171717140E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0D0E0E0E0D0E0D0E0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0E0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D
+      0D0D0C0D0D0D0C0D0D0D0D0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C
+      0D0C0D0C0D0C0D0C0C0D0C0C0D0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0F0E0E131717
+      17170B0000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000B1117171717171717171714100F0E0F0E
+      0E0E0F0E0F1117171717170E0000000000000000000000000000000000000000
+      0000000000000000000000000000001117171717100E0E0E0F0D0D0D0D0D0D0D
+      0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0D0E0E0E0F0E1616171710
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000001117
+      1717160F0E0E0E0E0F0E0F0E0F0E0F0E0F0E0E0F0E0F0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0D0E0D0E0E0E0D0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D
+      0C0D0D0C0D0D0C0D0D0C0D0C0D0C0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0F0E161717171300000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000B1116171717171717171716130F0E0F0E0E0E1117171717171100
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000B17171717150E0F0E0E0E0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D
+      0D0D0C0D0D0D0D0E0E0E0E0F0E0E0E1717171710000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000D17171717110E0F0E0E0E0F0E0E
+      0E0E0E0E0E0F0E0E0E0E0E0F0E0F0E0F0E0F0E0F0E0E0E0E0D0E0E0D0E0E0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D
+      0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0C0D0C0D0C0D0C0D0D0C0D
+      0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0D0C0C0D0C0C0D0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D
+      0E0F0E0E10161717170E00000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000B0F151717
+      1717171717171715110F0E101617171717110000000000000000000000000000
+      0000000000000000000000000000000000000000000000001117171717100E0E
+      0F0E0E0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0E0D0E0E0E0E0E0F0E0E
+      0E0F0E171717170C000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000016171717150F0E0E0F0E0E0E0F0E0F0E0F0E0E0E0F0E0F0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C
+      0D0D0D0D0C0D0D0C0D0C0D0D0C0D0D0C0D0C0C0C0C0D0C0D0C0D0C0D0C0D0C0D
+      0C0D0C0C0C0C0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0E0F13171717170B0000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000E14171717171717171717171516
+      1717171713000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000B17171717150E0E0E0E0E0D0D0D0D0D0D0D0C0D
+      0D0D0C0D0D0D0E0E0E0E0E0E0F0E0F0E0E0E0E0F0E0E10171717170C00000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000001117171717
+      1717171715151514131313101010100E0E0E0E0F0E0F0E0F0E0F0E0F0E0E0E0E
+      0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E
+      0D0D0E0D0D0D0E0D0D0D0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0D0D0C0D0D0C0D
+      0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0D0C0C0D0C0C0D0C0C
+      0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0E0E0F0E0E1617171713000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000C1115171717171717171717171717140B00000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      001117171717100F0E0F0E0E0D0D0D0D0D0D0D0D0E0E0E0E0E0E0E0E0F0E0F0E
+      0E0E0E0F0E0F0E0E0E1113171717170B00000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000D17171717171717171717171717171717
+      17171717171716151514131313100E0E0E0F0E0E0D0E0E0D0E0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0E0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0C0D0D0D0C0D0D0D0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C
+      0D0C0D0C0D0C0D0C0D0C0C0C0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0F0E0E10
+      171717170E000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000B0E
+      14171717171717171717140B0000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000B17171717150E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0F0E0F0E0E0E0E0E0E0F0E0E0E0E0F111417171717
+      1717170000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000016171717171717171717171717171717171717171717171717171717
+      17160F0E0E0E0E0E0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D
+      0D0D0C0D0D0C0D0C0D0D0C0D0D0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0D0C0C0C
+      0C0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0E0F14171717160000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000B10151617171717160C00
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000001117171717100E0F0E0E0E0E0E0E0F0E0F0E0F0E0E0E
+      0E0E0F0E0F0E0F0E0E0F11141617171717171717171716000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000001017171717171717
+      17171717171717171717171717171717171717171717130E0F0E0E0E0E0D0E0E
+      0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0D0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0C0D0C0D0D0C0D0C0D0C
+      0C0C0C0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0C0C0D0C0C0D0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0E0F0E0E0F16171717110000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000C101517160B0000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000B17
+      171717150E0E0F0E0F0E0F0E0E0E0E0E0E0F0E0F0E0E0E0E0E10131416171717
+      1717171717171717171711000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000B0C0C0C100F101013131415171717171717
+      17171717171717171717160F0E0F0E0E0E0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C
+      0D0D0D0D0C0D0D0D0C0D0D0C0D0C0D0D0C0D0D0D0C0D0C0D0C0D0C0D0C0D0C0D
+      0C0D0C0D0C0C0D0C0C0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0F0E11171717170C
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000C0C000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000001117171717100E0E0E0E0E0E0E
+      0F0E0F0E0E0E0E0F10131415171717171717171717171717171716130E0B0000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000C0C0C0D100F101114141717171714
+      0E0E0F0E0E0E0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0C0D0D
+      0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0D0C0D0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0E0F0E0E0E161717171500000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000B17171717150F0E0F0E0F0E0E101011131415171717171717
+      171717171717171717171714100D000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000001417171717100E0E0F0E0E0E0D0E0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0E
+      0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0D0D0C0D0C0D0D0C0D0C0D0D0C0C0D0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0D0C0C0C0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0E0E
+      0F10171717170F00000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000011171717
+      17141314151517171717171717171717171717171717171717171715110E0B00
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000C17171717150E0E0E0E0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D
+      0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C
+      0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0F0E0F0E0E15171717150B0000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000B171717171717171717171717171717
+      171717171717171717171714100E0B0000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000001317171717110F0E
+      0F0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E
+      0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0D0D0C0D0C0D0D0C0D0D
+      0C0D0D0C0C0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0D0C0D0C0C0D0C0D0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0D0E0E0E0E101717171711000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000011171717171717171717171717171717171717171713110F0C0000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000B17171717160F0E0E0E0F0E0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0E0D0E0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C
+      0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0D0C0C0D0C0D0C0D0C0D0C0D
+      0C0D0C0D0C0D0C0C0C0C0C0C0D0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0F0E0F0E14171717
+      170B000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000B151717171717
+      17171717171717151311100C0B00000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      001016171717140E0F0E0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D
+      0D0C0D0C0D0C0D0C0D0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0D0C0D0C0D0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0D0E0E0E0E0F17171717130000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000010161715131411100F0D0C0B000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000001517171717100E0E0F0E
+      0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D
+      0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0C0D0C0D0D0C0D0D0C0D0C0D0C
+      0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0C0C0C0C0D0C0D0C0C0C0C0C0C0C0C
+      0C0C0C0C0E0E0F0E0E0E0E0D0D0D0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0F
+      0E0F0E14171717170C0000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000F17171717110F0E0E0E0E0E0D0E0D0E0D0E0D0E0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D
+      0D0C0D0D0D0D0D0C0D0D0C0D0C0D0C0D0C0D0C0C0D0C0D0C0D0C0D0C0D0C0D0C
+      0C0D0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0F0E0E0E0F0E0E0E
+      0F0E0E0E0E0E0E0D0D0D0C0C0C0C0C0C0C0D0E0E0E0E0F171717171300000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000000000000110B0000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000001517
+      1717160F0E0E0F0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0C0D0C0D0D
+      0C0D0D0C0D0C0D0C0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0C0C0C0C0C0D0C0D
+      0C0C0C0C0C0C0C0C0C0C0E0E0E0E0F0E0E0E0F0E0E0E0F0E0E0E0E0F0E0E0E0E
+      0E0E0E0D0D0F0E0F0E0E14171717170C00000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000BF3F3070F000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000E17171717130E0E0F0E0E0E0D0E0D
+      0E0D0E0D0E0D0E0D0D0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0E0D0D0D
+      0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0C0D0C0D0D0C0D0D0C0D0C0D0C0C0C0C
+      0C0C0C0C0C0C0C0D0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0E
+      0F0E0E0E0F0E0E0E0F0E0E0F0E0F0E0E0E0F0E0F0E0E0E0E0E0E0E0E0F0F1717
+      1717130000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000E93D3F3F3140000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000013171717160F0E0E0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C
+      0D0D0C0D0C0D0D0C0D0C0D0C0D0C0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C
+      0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0D0E0F0E0E0E0F100F0F0E0E0E0F0E0E
+      0E0E0E0F0E0E0E0E0E0F0E0F0E0F0E0E0E15171717170C000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000096F3E90B0000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000C17171717130E0F
+      0E0F0E0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D
+      0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0D0D0C0D0D0C0D0C0D0D0C0D
+      0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0D0C0C0C0D0C0C0C0C0C0C
+      0C0C0C0D0E0E0E0E0F0E15171717161514131110100E0E0E0F0E0F0E0E0E0F0E
+      0E0E0F0E10171717171300000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000EF3F3170000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000013171717170F0E0E0E0E0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0E0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D
+      0D0C0D0D0D0D0C0D0D0C0D0C0D0C0D0D0C0D0C0D0C0C0D0C0D0C0D0C0D0C0D0C
+      0D0C0D0C0C0C0C0D0C0C0C0D0C0C0D0C0C0C0C0C0C0C0C0E0E0F0E0E0E141717
+      17171717171717171717171514131110100E0E0E0F0E0E0E16171717170B0000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000D3F3910000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000000000000000C
+      17171717140E0F0E0F0E0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0D0D0C0D0D
+      0C0D0C0D0C0D0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0C0D0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0E0E0F0E0E0F11171717171717171717171717171717
+      1717171717171715141313131717171711000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00001A1A1100000000000011F81A00000000000E1A9607961A140B000000171A
+      17000000000011F81A00000000000E1A1A0D0000000000000B1791079891170B
+      0000000000000011F811000E1A96071A0E00000000000007F307000000000000
+      11F80798931A1100000000000000171A079891170B000000000B1998981A0000
+      0F19960793190B00000000000000000000171A1A1A1A1A1A1A1A1A1700000000
+      0011F8190000000000000000000B199307981A90191717171792920E0E0E0E0D
+      0E0D0E0D1491910E0D0E0D0D0E1991170E0D0E0D0D0E0D0D11F896CF93170D0D
+      0D0E0D0D0D0D0D139197CF91130D0D0D0D0D0D0D0D0D1995CF93150D0D91910D
+      0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0C0D0C0D0D0C0D0D0C0D0C0D0C0D0C
+      0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0C0D0C0C0C0D0C0C0C0C0C0C0C0C0E0E0E
+      0E0E0F1017171717171717171717171717171717171717171717171717171717
+      1717171600000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000F3F31A00000000000007
+      F3960000000B92F3F3F3F3F3F3F39200000007F39800000000001AF3F3000000
+      000011F3F311000000000017E9F3F3F3F3F3F3E91A0000000000001AF31A17F3
+      F3F3F3F3F391000000000007F398000000000E98F3F3F3F3F3F3F31400000000
+      14F0F3F3F3F3F3F31A0000000BF0F3F3F3F3000FF3F3F3F3F3F3E91700000000
+      000000000007F3F3F3F3F3F3F3F3F3980000000000D3F3F30F00000000000000
+      19E9F3F3F3F3F3F3E817171492F3F30E0E0E0D0E0D0E0D0E96F3F3130E0D0E0D
+      0DF0F3E80D0D0D0E0D0D0E1AF0F3F3F3F3F3E8140D0D0D0E0D0F93F3F3F3F3F3
+      F3CF0F0D0D0D0D0D13D2F3F3F3F3F39717F3F30D0D0D0C0D0D0D0C0D0D0D0D0C
+      0D0D0D0C0D0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C
+      0C0C0D0C0C0D0C0C0C0C0C0C0C0C0C0C0E0E0F0E0F0E0F1717171717110E1011
+      1315171717171717171717171717171717171717171717100000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000F3F31A00000000000BF3F31900000007F3F31A0E0000
+      11191100000007F39800000000001AF3F3000000000011F3F3110000000093F3
+      F3071400000F92F3F3D00B000000001AF3E9F39610000E1AF3F3910000000007
+      F3980000000BF0F3E9170B000B13910B00000014F3F3D3170B000E160F000000
+      19F3F316000E000007170D000E93F3E90E000000000000000007F3D011131111
+      131111100000000011F3F3F3930000000000001AF3F396100000179393161710
+      92F3F30E0E0E0E0D0E0D0E0DE8F0F3930E0D0D0E17F3F3F3110D0E0D0E0D91F3
+      F393100D15D2F3F0130E0D0D0DCFF3F01A0F0D19E9F3D20F0D0D0D0FE8F3F019
+      0D0E19F0E8F3F30D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0C0D0D0C0D0C0D0C
+      0D0D0C0C0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0C0C0D0C0D0C0C0C
+      0C0C0C0E0E0E0E0F0E0F171717171713000000000000000B0C0E101113151717
+      1717171717171717171715000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000000000000F3F3
+      1A000000000011F3F30F000017F3F3110000000000000000000007F398000000
+      00001AF3F3000000000011F3F3110000001AF3F31A00000000000011F0F39600
+      0000001AF3F396000000000019F3F30D00000007F39800000093F3E90B000000
+      0000000000000BF0F3D00B00000000000000000096F3D0000000000000000000
+      000BF3F319000000000000000007F30700000000000000000000000093F393F3
+      E90B000000000EF3F31A0000000B17171717150E92F3F30E0E0D0E0D0E0D0E13
+      F3CFD2E80E0D0E0D96F393F31A0E0D0D0D11F3F3910D0E0D0D0FD2F3E80D0D0D
+      19F3F3150D0D0D0D13F0F3960D0D0D91F3F3130D0D0D0D15F3F3F30D0D0D0C0D
+      0D0D0C0D0D0D0C0D0D0D0D0D0C0D0C0D0D0C0D0D0C0D0C0D0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0D0C0C0D0C0C0D0C0C0C0C0C0C0C0C0C0C0E0E0F0E0E0E10161717
+      1717140B0000000000000000000000000000000B0C0E10111315171717170D00
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000F3F31A00000000001AF3E9000000
+      D0F393000000000000000000000007F39800000000001AF3F3000000000011F3
+      F31100000EF3F396000000000000000019F3F3110000001AF3F30E0000000000
+      00D3F39100000007F39800000BF3F3170000000000000000000017F3F3110000
+      000000000000000007F307000000000000000000000BF3F31A00000000000000
+      0007F39800000000000000000000000BF0F31197F3170000000091F3D3000000
+      001016171717100E92F3F30E0E0E0D0E0D0E0D92F39193F3130E0D0DF0F311F3
+      D20D0E0D0E93F3E90D0D0D0D0D0D15F3F3170E0DD2F3970D0D0D0D0D0D91F3F3
+      0F0D0DE8F3960D0D0D0D0D0D97F3F30D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0C
+      0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0C0C0C0C
+      0C0C0C0C0D0C0C0C0D0E0E0E0E0F0E0F1517171717150B000000000000000000
+      0000000000000000000000000000000B0C0C0000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000F3F31A000000000007F396000000F3F317000000000000000000
+      000007F39800000000001AF3F3000000000011F3F311000091F3F30E00000000
+      0000000000D0F3960000001AF3F30000000000000093F30700000007F3980000
+      11F3F30E0000000000000000000091F3D3000000000000000000000007F39800
+      00000000000000000E96F3F30F000000000000000007F3980000000000000000
+      00000017F3E90017F3D00000000007F3930000000B15171717160E0E92F3F30E
+      0D0E0D0E0D0E0DD2F31717F3930D0E13F3970EE8F3100E0D0DCFF3960D0D0D0E
+      0D0D0DF0F3930D0DF3F3190D0D0D0D0D0D13F3F3170D0FF3F3180D0D0D0D0D0D
+      91F3F30D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0C0D0D0C0D0D0C0D0C0D0C
+      0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0D0C0C0C0C0C0C0D0E0F0E
+      0E0E0F1517171717160B00000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000F3F31A000000
+      000EF3F317000011F3F31911111311111311110E000007F39800000000001AF3
+      F3000000000011F3F3110000D0F3960000000000000000000019F3F30B00001A
+      F3F3000000000000001AF3E900000007F39800001AF3F3111311111311111311
+      0B0007F307000000000000000000000007F3980000000000000011F7F3F3F31A
+      00000000000000000007F3980000000000000000000000D0F3910000E9F30F00
+      0000F3F3931113111791909091160E0E92F3F30E0D0E0D0E0D0E11F3F30F0EF0
+      E80D0D93F3F80D96F3F80D0E0DF3F3910E0D0D0D0D0E0DCFF3CF0D15F3F3150D
+      0D0D0D0D0D0DF3F3910D15F3F3150D0D0D0D0D0D91F3F30D0D0D0D0C0D0D0D0C
+      0D0D0D0D0C0D0D0D0C0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D
+      0C0D0C0C0C0D0C0C0C0C0D0C0C0C0C0C0C0E0E0F0E0F1617171717150C000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000F3F31A0000000B97F3D30B000013F3F3F3F3
+      F3F3F3F3F3F3F31A000007F39800000000001AF3F3000000000011F3F311000B
+      F3F319000000000000000000000FF3F31100001AF3F3000000000000001AF3F3
+      00000007F39800001AF3F3F3F3F3F3F3F3F3F3F3110096F30700000000000000
+      0000000007F39800000000000093F3F3F398110000000000000000000007F398
+      000000000000000000000EF3F30F000093F393000000F3F3F3F3F3F3F3F3F3F3
+      F3CF0F0E92F3F30E0D0E0D0E0D0E1AF3D20E0D97F3140DE8F3110D17F3D20E0D
+      0DF3F3910D0D0D0D0D0D0DCFF3CF0D15F3F3150D0D0D0D0D0D0DF3F3910D15F3
+      F3150D0D0D0D0D0D91F3F30D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0C0D0C
+      0D0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0C0C0C0C0C0C0D0C0C0C0C
+      0C0C0C0C0C0E0E0E0E0E16171717160C00000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000F3F3071A1A92D3F3E91000000000F3F3931A1A1A1A1A1AF3F31A000007F3
+      9800000000001AF3F3000000000011F3F3110013F3F311000000000000000000
+      0000F3F31900001AF3F30000000000000093F3D000000007F398000011F3F31A
+      1A1A1A1A1A93F3F31100F8F3E9000000000000000000000007F3980000000000
+      91F3F3961000000000000000000000000007F3980000000000000000000091F3
+      D300000014F3E90B000007F3981A1A92969697E8F3CF0E0E92F3F30F0E0D0E0D
+      0E0D97F3910E0D19F39313F3D20D0E0FF3F3110D0ECFF3960D0E0D0E0D0D0EE9
+      F3960D0DF3F3190D0D0D0D0D0D13F3F3190D0DF3F3190D0D0D0D0D0D91F3F30C
+      0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0D
+      0C0D0C0D0C0D0C0D0C0C0D0C0C0C0C0C0C0C0D0C0C0C0C0C0C0E0E0F0E0E1417
+      1717140000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000F3F3F3F3F3F3F3F31A00
+      00000000D0F31A00000000000BF3F311000007F3D3000000000091F3F30B0000
+      000017F3F30E0011F3F3110000000000000000000000F3F31A00001AF3F31100
+      0000000000D3F39300000007F39800000BF3F311000000000014F3F300000FF3
+      F3110000000000000000000007F3980000000000E9F396000000000000000000
+      000000000007F3E907980798079891000000E9F31A00000000E9F317000091F3
+      07000015171717E8F3920E0F91F3F3190E0D0E0D0E0FF3F3150E0D0FF3D290F3
+      910E0D0DCFF3F80D0D93F3F00D0D0D0D0D0D15F3F3190D0DD2F3970D0D0D0D0D
+      0D91F3F3110D0DD2F3970D0D0D0D0D0D96F3F30D0D0C0D0D0D0C0D0D0D0C0D0D
+      0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0C0D
+      0C0D0C0D0C0C0C0C0C0C0C0C0C0D0E0E0F0E11171717170B0000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000F3F39311131119D3F3D00B00000017F3E90B00000000
+      19F3E900000007F3F31900000000D3F3F31A0000000007F3D3000011F3F31100
+      00000000000000000000F3F31A00001AF3F3D0000000000019F3F31100000007
+      F39800000093F307000000000096F39600000007F3D30B000000000000000000
+      07F3980000000000E9F31A000000000000000000000000000007F3F3F3F3F3F3
+      F3F307000014F3F30E0000000093F3D000000EF3F3110E1717171AF3F3140E0E
+      92F3F3F0110E0D0E0D17F3F30E0D0E0D97F397F3130E0D0E1AF3D20E0D11F3F3
+      910D0D0D0E0DCFF3F00D0D0D19F3F3150D0D0D0D0FF0F3970D0D0D19F3F3150D
+      0D0D0D13F3F3F30D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0C0D0C0D0C0D0D0C
+      0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0C0C0C0D0C0D0C0C0C0C0C
+      0C0C0F0E0E0F0F171717170D0000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000000000000F3F3
+      F8000000000BD0F3070000000096F3D011000019F3F31800000007F3E9E9190B
+      0E93F3F393F31A0B0BF8F3F31A000000F3F319000000000000000000000EF3F3
+      1100001AF3F3D3D011000E1AF3F3960000000007F3980000000BE8F3960E000B
+      F7F3F30F0000000EE9F3D3170B000E160F000F13D0F3D01113110B0092F3E914
+      000E161700000000000000000007F39800000000000000000096F3D000000000
+      000FF3F30E000019F3E991171790F1F3980E0F0E92F3D2F0F093910E0D96F397
+      0E0D0D0E19F3F3E80D0D0D0D13F3F3110D0D19F3F393110D13CFF3F3170D0D0D
+      0D96F3F01A0F0D17E8F3F0110D0D0D0DCFF3F0190E0F18F0F3F3F30D0D0C0D0D
+      0D0C0D0D0D0C0D0D0D0C0D0C0D0D0C0D0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0D0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0F0E0E1617171710
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000F3F31A000000000010F3F30F0000
+      000093F3F3F3F3F3F3910000000007F31A93F3F3F3F3F393001AF3F3F3F3F307
+      00000000D3F3930000000000000000000017F3F30D00001AF3F30FE8F3F3F3F3
+      F3070B0000000007F398000000000BD0F3F3F3F3F3E91700000000000E98F3F3
+      F3F3F3F3190007F3F3F3F3F3F3F311000B07F3F3F3F3F3D00000000000000000
+      0007F39800000000000000000EF3F318000000000000D3F39100000017F3F3F3
+      F3F3F3CF100E0E0E91F39317F3F3F30E0DF0F3900E0D0E0D0FF3F3930D0E0D0E
+      0DE8F3F80E0D0D19F0F3F3F3F3F3F0170D0D0D0D0D0D93F3F3F3F3F3F3D2130D
+      0D0D0D0D0FCFF3F3F3F3F3D293F3F30C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D
+      0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0D0C0C0C0D0C0C
+      0C0C0C0C0C0C0C0C0C0C0E0E0E0E0F1417171714000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000F3F31A000000000000F3F31A00000000000F929898910F000000
+      0000171A0E0011929893110000000F92989317000000000091F3E90B00000000
+      000000000096F3D30000001AF3F3000B1793079111000000000000171A170000
+      0000000014F79898190D00000000000000000FF8930793190F00171AD3F3D31A
+      1AF80E00000011929896190D00000000000000000007F3980000000000000000
+      0FF81A0E00000000000014F819000000001695D2D2CF180E0F0E0E0E1691150E
+      1196CF0E119191110E0D0D0D0D1991110D0E0D0D0E1991170D0D0D0D0F1993CF
+      93190F0D0D0D0D0D0D0D0D111A96CF91170D0D0D0D0D0D0D0D0D1593CF96180D
+      91F3F30D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0C0D0C0D0D0C0D0C0D0C0D
+      0C0D0C0D0C0D0C0D0C0D0C0C0C0C0C0D0C0C0D0C0D0C0C0C0C0C0C0C0C0C0D0E
+      0F0E0E11171717170B0000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000F3F31A000000
+      00000BF3F31A0000000000000000000000000000000000000000000000000000
+      0000000000000000000000000EF3F31A000000000000000011F3F31A0000001A
+      F3F3000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000007F30700000000000000000000000000
+      00000000000000000007F3980000000000000000000000000000000000000000
+      000000000C17171717140E0E0E0F0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0D0E0D0D0E0D0D0D0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D91F3F30C0D0D0DCF150D9118
+      0DD2190CCF150D0C0D0D0C0D0C0D0C0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C
+      0C0C0C0C0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0E0E0F0E10161717170D000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000F3F31A000000000017F3F30F000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      001AF3F3110000000000000BE8F3D30B0000001AF3F300000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000007F3980000000000000000000000000000000000000000000007F398
+      00000000000000000000000000000000000000000000000013171717170F0E0F
+      0E0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D
+      0E0D0D0D0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D91F3F30D0D0C0DCF150D919110CF970DCF150D0C0D0C0D0D
+      0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0D0C0D0C0D0C0C0D0C0D0C0C0C0C0C
+      0C0C0C0C0C0C0C0E0E0E0E0E1717171710000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000F3F31A0000000017E9F3D000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000093F3F31A0B00000014F0
+      F3E910000000001AF3F30000000000000000000000000091F391000000000000
+      000000000000000000000000000000000000000000000000000F170000000000
+      000000000000000000000000000000000007F398000000000000000000000000
+      00000000000000000000000B17171717160F0E0E0E0F0E0E0E0D0E0D0E0D0E0D
+      0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0D0D0E0E0E0F0E0E0F0E0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D91F3F30C
+      0D0D0DCF150D1A911A1A9710CF100D0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C
+      0D0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0F0E0E
+      1417171714000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000F3F3F3079807F3F3F3D0
+      1000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000001AF3F3F30798E9F3F3D01000000000001AF3F30000
+      0000000000000000000000F3F3F3000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000007F3F3F3F3F3F3F3F3F3110000000000000000000000000000000B
+      1517171717150F0E0E0E0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0D0D0E0D0E0D0E0E0E0E0E0E0F0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D91F3F30D0C0D0DCF150D1591D210191A
+      F30D0C0D0D0C0D0C0D0D0C0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0D0C0D0C0C
+      0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0D0E0E0F0E11171717170B000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000009307D0F3F3F3D0961700000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0E9198E9F3D39617000000000000001AF3F3000000000000000000000000001A
+      F31A000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000091079807980798
+      0798070F000000000000000000000000000000000C1517171717150F0E0F0E0E
+      0F0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0E0E0E0F
+      0E0F0E0E0E0F0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D91F3F30C0D0D0DCF150D1596D20C0F07F30D0C0D0C0D0D0C0D0C0D0C
+      0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0F0E0E0F0F171717170D000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000001798070000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000C1517171717150F0E0E0F0E0E0E0E0D0E0D0E0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0E0D0E0D0D0E0E0F0E0E0E0F0E0E0F0E0E0E0F0E0E0E0E
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D18CFCF0D0D1891E8
+      969117E8180D0C96E90D0D0C0D0C0D0D0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0D
+      0C0C0C0C0C0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0F0E0E161717
+      1710000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000D17
+      17171717150F0E0E0E0F0E0E0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D
+      0E0E0E0E0E0F0E0E0E10130F0E0F0E0E0E0F0E0E0F0E0E0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D13151515150E150F0C0D10130D0C0D
+      0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0D0C0D0C0D0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0E0F141717171400000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000E1717171717150F0E0E0E0E0E
+      0E0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0E0E0E0E0F0E0E0E0F0E13171717
+      140F0E0F0E0E0E0F0E0E0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C
+      0D0D0C0D0D0C0D0D0C0D0D0D0D0D0C0D0C0D0D0C0D0D0C0D0C0C0D0C0D0C0D0D
+      0D0C0D0C0D0C0D0C0C0C0C0C0C0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0D0E0F0E0E11171717170B000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000E1717171717150F0E0F0E0E0E0E0E0D0E0D0D0D0E0D0D0E
+      0D0D0E0D0D0E0E0E0E0F0E0E0F0E1016171717171717130F0F0E0E0E0E0F0E0E
+      0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0D0C0D0D
+      0C0D0D0C0D0C0D0C0D0C0D0C0D0C0C0D0E0E0E0E0E0D0C0D0C0D0C0D0C0C0D0C
+      0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0F0E10161717170D00
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000000000000000E1717
+      171717150F0E0E0F0E0E0E0E0D0E0D0E0D0E0D0D0E0D0D0E0E0E0E0F0E0E0E0F
+      0E141717171717171717171715110E0F0E0E0F0E0F0E0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0C0D0D0C0D0D0D0C0D0D0D0D0C0D0D0C0D0C0D0D0C0D0C0D0D0D
+      0E0E0E0E0E0E0E0F0E0E0D0C0C0C0D0C0D0C0C0C0D0C0C0C0C0C0D0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0E0E0E0E0E171717171000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000E1717171717150F0E0E0E0F0E0E
+      0E0E0D0D0D0D0E0D0D0E0E0E0E0F0E0E0E0F0E11161717171717171717171717
+      171716130F0E0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D
+      0D0D0D0C0D0D0D0D0D0C0D0D0C0D0E0D0E0E0E0E0E0E0F0E0F0E0E0E0F0E0E0D
+      0D0C0C0D0C0C0D0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0F
+      0E0E141717171400000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000E171717171716100E0E0E0F0E0E0E0E0D0E0D0D0E0D0E0E0E
+      0E0E0E0F0E0F15171717171717160F13171717171717171717130F0E0F0E0E0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0C0D0D0D0E
+      0E0F0E0E0E0F0E0F0E0E0E0E0E0F0E0E0E0E0F0E0D0D0C0C0C0C0C0C0C0D0C0C
+      0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0E0F0E11171717170B00000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000000000E171717
+      171716100F0E0E0E0F0E0E0E0D0E0D0E0E0E0F0E0F0E0E0E1317171717171717
+      110B00000C1317171717171717150E0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0C0D0E0E0E0E0E0F0E0E0E0E0F0E0F0E
+      0E0E0F0E0F0E0E0E0E0D0D0C0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0F0E0E0F0F171717170D00000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000E161717171717110E0F0E0E0E0E0E
+      0E0D0E0E0F0E0E0E0E0F1016161717171717150C0000000000000B1016171717
+      17170E0F0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D
+      0D0D0D0D0C0D0E0F0E0F0E0E0E0F0E0E0E0E0F10131517110E0E0F0E0F0E0D0C
+      0C0C0C0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0F0E0E16
+      1717171000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000C151717171717140E0E0F0E0E0F0E0E0F0E0E0E0F0E0F131717
+      171717171710000000000000000000000B0F171717170F0E0F0E0E0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0C0D0E0E0E0E0E0E0F
+      0E0E10131415171717171717110E0E0E0E0E0E0E0C0D0C0C0D0C0C0C0C0D0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0E0F14171717140000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000}
+    OnClick = OnCloseClick
+  end
+  object Label1: TLabel
+    Left = 8
+    Top = 264
+    Width = 312
+    Height = 13
+    Caption = 'Copyright RemObjects Software, 2002-2008. All rights reserved.'
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWhite
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    Font.Style = []
+    ParentFont = False
+    Transparent = True
+    OnClick = OnCloseClick
+  end
+  object lbl_Version: TLabel
+    Left = 0
+    Top = 31
+    Width = 500
+    Height = 16
+    Alignment = taCenter
+    AutoSize = False
+    Caption = '[]'
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWhite
+    Font.Height = -13
+    Font.Name = 'Tahoma'
+    Font.Style = []
+    ParentFont = False
+    Transparent = True
+  end
+  object Label7: TLabel
+    Left = 8
+    Top = 280
+    Width = 91
+    Height = 13
+    Caption = 'Visit our website at'
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWhite
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    Font.Style = []
+    ParentFont = False
+    Transparent = True
+  end
+  object Label3: TLabel
+    Left = 102
+    Top = 280
+    Width = 136
+    Height = 13
+    Cursor = crHandPoint
+    Caption = 'http://www.remobjects.com'
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWhite
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    Font.Style = [fsUnderline]
+    ParentFont = False
+    Transparent = True
+    OnClick = Label3Click
+  end
+  object btn_Cancel: TButton
+    Left = 418
+    Top = 272
+    Width = 77
+    Height = 25
+    Cancel = True
+    Caption = 'btn_Cancel'
+    Default = True
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWhite
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    Font.Style = []
+    ParentFont = False
+    TabOrder = 0
+    OnClick = OnCloseClick
+  end
+end
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWAbout.lfm b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWAbout.lfm
new file mode 100644
index 0000000..48e442b
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWAbout.lfm
@@ -0,0 +1,4815 @@
+object AboutForm: TAboutForm
+  Left = 281
+  Height = 300
+  Top = 181
+  Width = 500
+  HorzScrollBar.Page = 499
+  VertScrollBar.Page = 299
+  ActiveControl = btn_Cancel
+  BorderIcons = []
+  BorderStyle = bsNone
+  Caption = 'About RemObjects SDK'
+  ClientHeight = 300
+  ClientWidth = 500
+  Font.Color = clWhite
+  Font.Height = -11
+  Font.Name = 'Tahoma'
+  OnClick = OnCloseClick
+  OnCreate = FormCreate
+  Position = poMainFormCenter
+  LCLVersion = '0.9.25'
+  object Image1: TImage
+    Height = 300
+    Width = 500
+    AutoSize = True
+    OnClick = OnCloseClick
+    Picture.Data = {
+      07544269746D6170264E0200424D264E0200000000003604000028000000F401
+      00002C0100000100080000000000F0490200C21E0000C21E0000000100000000
+      000000000000000080000080000000808000800000008000800080800000C0C0
+      C000C0DCC000F0CAA600000000000B0B0B00151515001B1B1B00222222002B2B
+      2B00333333003B3B3B00037F0100434343004B4B4B00535353005B5B5B006060
+      60006A6A6A00727272007E7E7E000A81030017850800248A0D002C8D1000328E
+      1200359014003B91160033921D003E9318003C96250037983200439419004996
+      1B004D981C0053991E0044972300579B20005C9C2200539C2900449D3700629F
+      24004FA03B0065A0250068A126006CA2280073A42A007AA72D007DA82E0067A3
+      30006BA4310077A8360074AA3F007BAA3800429F40004DA244005BA5430062A7
+      42006AAA450076AC44006FB15B0078B1540062AF600067B0620074B567007FB6
+      61007DBA740080A92F0084AA31008BAC330087AE3C008BAF3D0091AE350094B0
+      370095B038009BB23900A3B53C00A9B63E0083B24E008EB349009EB6450094B5
+      4B009BB84E008CB5520085B5590090B95D00A2B74600AEB84000A3B94B00A8B9
+      4800B3BA4200BABC4500A4BB5400B1BF560082BA6C009ABC610082BC760091BE
+      7100C0BE4700C1BF4800ACC05E00B4C05700BEC15100B1C25F009AC27600AFC3
+      6900BBC56500A3C57800BBCA7700BECB7800C4C04800CBC24B00D2C44D00D6C6
+      5000D8C75000DCC85200E2CA5400E8CC5600ECCD5800F0CF5900F4D05B00F8D1
+      5C00CDCB6A00D6CB6400D3CD6C00CBCD7300C4CD7B00DAD27800E8CF6000E4D0
+      6900EDD36C00F4D36500F8D46600E3D27200EBD57500E3D57C00FAD87100FAD9
+      7A00828282008D8D8D00929292009D9D9D0081BF8000A3A3A300ABABAB00B4B4
+      B400BEBEBE0088C1830096C6890098C99200A6C98400BDCD8200BFD18D00A1CE
+      9C00ACD09A00BBD29500B8D49E00A9D1A200B3D5A600B8D7A800BED8AA00BFDF
+      BF00C1D28D00D3D58B00C0D49700CDD59200C4D59800CCD89C00D4DB9F00F4DA
+      8200F8DC8400F0DC8B00E3DA9000ECDD9400F0DF9500ECE09E00F5E09700FAE2
+      9800C2D7A200C1D9AB00C8DCAE00D6DCA000DADCA100D3DDA800D8DFAA00C0DE
+      BC00D0DFB100DEE0AC00CEE1BA00D3E0B200D9E1B400D6E3BD00E9E2A600F5E6
+      AB00F9E7AC00FBE8AD00ECE5B200F5E8B500FBEBB700F3EABE00FCEBB800C4C4
+      C400CDCDCD00C1DFC000D4D4D400DCDCDC00C7E1C200D7E6C800D1E7D000D3E8
+      D000DBEAD300E2E7C200E4EBCC00E9ECCE00F7ECC000FBEDC100F2EDC800FDF0
+      CC00E1ECD500ECEDD000F0EFD100EEF0DA00F4F0D300FAF2D500F5F3DD00F8F4
+      DE00E3E3E300EDEDED00E4F0E000EBF2E300F2F5E600FDF6E000F0F7EF00FCF8
+      E900F1F2F100F4F8F000FBFAF300FFFFFF000000000000000000F0FBFF00A4A0
+      A000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFF
+      FF00000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000010161717150E0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0E0E0E0E11
+      1717171717171717141311100E0C0B000000000B1617171717150E0E0E0E0E0E
+      0E0C0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0C0C0C0C0C0C
+      0C0C0D0E0E0E0E10171717170C00000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000013
+      171717150E0F0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0E0F0E0E0E161717171717171717171717
+      1717171713110F1417171717150F0E0F0E0F0E0E0C0D0D0D0D0D0D0D0C0D0D0C
+      0D0C0D0C0D0C0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0D0E0F0E0E1317171717
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000D0B0000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000013171717140E0E0F0E0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0D0D
+      0D0D0D0E0E0F0E0E111717171717171717171717171717171717171717171716
+      0F0E0F0E0E0E0E0D0D0C0D0D0C0D0D0D0D0C0D0C0D0D0C0D0D0C0D0D0C0D0C0D
+      0C0D0C0D0C0D0C0D0C0C0D0E0E0F0E1317171714000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000000000F17160F0B00
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000015171717130E0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0E0E0F0E0E161617
+      17171717171717171717171717171717171716100E0E0E0E0F0D0D0D0D0D0C0D
+      0D0D0C0D0D0D0D0C0D0C0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0E0E
+      0E0E0E1517171713000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000001117171717160F0B0000000000000000000000
+      0000000000000000000000000000000000000000000000000000001717171713
+      0E0F0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0E0E0E0E0F0E0E10101010131314151617171717
+      171717171717100E0F0E0F0E0E0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D
+      0C0D0C0D0C0D0C0D0C0C0C0C0C0C0C0C0D0C0E0E0F0E0E161717171000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000000000000000B
+      1117171717171717160F0B000000000000000000000000000000000000000000
+      00000000000000000000000000000017171717100E0E0F0E0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D
+      0E0E0F0E0E0E0F0E0E0E0F0E0E0E0E0E0E0F10131415171717110E0E0E0E0E0E
+      0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0C0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C
+      0D0C0D0C0C0D0E0E0E0F0E171717170E00000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000B1417171717171717171717160F
+      0B00000000000000000000000000000000000000000000000000000000000000
+      00000C17171717100E0F0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0E0E0F0E0E0E0F0E0E0E
+      0F0E0F0E0F0E0E0E0F0E0E10100E0F0E0F0E0E0D0D0D0D0C0D0D0D0D0C0D0D0D
+      0C0D0D0C0D0C0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0C0E0F0E0E1017
+      1717170C00000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000C1516171717171617171717171717160F0B000000000000000000
+      000000000000000000000000000000000000000000000C171717170F0E0E0E0F
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0E0D0D0D
+      0D0D0D0D0D0D0D0D0D0E0E0E0E0F0E0E0E0F0E0E0E0F0E0E0E0F0E0E0E0E0F0E
+      0E0E0E0E0E0E0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0C0D0C0D0C0D0C
+      0D0C0D0C0D0C0D0C0D0C0D0C0D0D0E0E0E0F1116171717000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000C15171717171711
+      0E111517171717171717160F0B00000000000000000000000000000000000000
+      000000000000000000000E171717170E0F0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0D0D0D0E0D0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0E
+      0E0E0E0F0E0E0F0E0E0E0E0F0E0E0F0E0F0E0E0E0F0E0F0E0E0E0C0D0D0D0D0C
+      0D0D0D0C0D0D0D0D0C0D0D0C0D0D0C0D0D0C0D0D0C0D0C0D0C0C0C0C0C0C0C0D
+      0C0D0F0E0E0E1317171715000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000C151717171717110E0E0F0E111517171717171717
+      150E000000000000000000000000000000000000000000000000000000001016
+      1717170E0E0F0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0D0E0D0D0D0D0D0D
+      0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0D0E0E0E
+      0E0E0E0E0E0E0F0E0E0E0E0F0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D
+      0C0D0C0D0C0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0D0E0F0E0E151717171300
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000E16
+      17171717160F0F0E0E0E0E0E0F101617171717171717150E0000000000000000
+      00000000000000000000000000000000000010171717150E0E0E0E0E0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0E0E0E0E0F0E0E0D
+      0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0D0C0D0D0C0D0C0D0C
+      0D0C0D0C0D0C0C0C0C0E0E0E0F0E161617171000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000E171717171716100E0E0F0E0F0E0E
+      0E0F0E111517171717171717150E000000000000000000000000000000000000
+      000000000B1016171717140F0E0F0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D
+      0E0D0D0E0D0E0D0E0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0E0D0C0D0D0D0C0D0D0D0C0D0D0D
+      0D0C0D0D0D0D0C0D0C0D0C0D0D0C0D0D0C0D0C0C0C0D0C0D0C0D0C0D0C0E0F0E
+      0E0E171717170F00000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000E1717171717150F0E0E0F0E0E0E0F0E0E0E0E0E0F13161717171717
+      1717150E0000000000000000000000000000000000000B10171717171717130E
+      0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0E0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0C0D
+      0C0D0C0D0D0C0D0D0C0C0C0C0C0D0C0D0C0E0E0E0F10171717170C0000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000E1717171717150F0E
+      0F0E0E0E0F0E0E0F0E0F0E0E0E0E0F111617171717171717150E000000000000
+      00000000000000000B0F1617171717171717130E0F0E0E0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C
+      0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0C0D0D0C0D0D0C0D0C0D0C0C0D0C0D0C
+      0D0C0D0C0D0F0E0E0E10171717170B0000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000E1717171717150F0E0E0E0E0F0E0E0E0E0E0E0E0F0E
+      0F0E0E0F0E131617171717171717150E00000000000000000000000F15171717
+      1717171716100F0E0E0F0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0E
+      0D0E0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D
+      0D0D0C0D0C0D0C0D0C0D0D0C0D0D0D0C0D0C0D0C0C0C0C0C0D0E0F0E0F131617
+      1716000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000000000000000C1717
+      171717150F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0F0E0E0E0F1116171717
+      17171717130C000000000000000C151717171717171716100F0E0E0E0F0E0E0D
+      0E0D0D0D0D0D0D0D0D0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0C0D0C0D0D0C0D0C0D
+      0C0D0C0D0C0D0C0D0C0D0C0D0D0E0E0E0E141717171300000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000C1517171717150F0E0E0E0E0F0E0E0E
+      0E0E0E0D0E0E0E0E0F0E0E0E0F0E0E0E0F131617171717171717130C0000000B
+      131717171717171716100F0E0E0E0F0E0E0E0F0D0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0D0E0D0D0D0D0D0D0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D
+      0D0C0D0D0D0D0C0D0D0C0D0D0C0D0C0D0D0C0D0D0C0D0C0C0C0C0C0D0C0D0C0D
+      0E0E0F0E0E151717171100000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000C1517171717150F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0F0E
+      0E0E0F0E0E0E0F111617171717171717130C0F1517171717171716100F0E0E0E
+      0F0E0E0E0F0E0E0D0E0D0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0E0D0E0D0E0D0D
+      0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0D0C0D0C
+      0D0D0C0D0C0D0C0D0D0C0D0D0C0D0C0C0D0C0D0C0E0E0E0F0E17171717100000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000B1617171717150F0E0E
+      0E0E0F0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0F0E0E0E0F0E0E0E0F131717
+      17171717171717171717171716130E0E0E0E0F0E0E0E0F0E0E0D0D0E0D0D0E0D
+      0D0D0D0D0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0C0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0D0C0D0C0D0C0D
+      0C0D0C0D0C0C0C0C0E0F0E0E0F171717170C0000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000B1417171717150F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0D0E0E0E0E0E0D0E0E0F0E0E0E0F0E0E0F0F13171717171717171717171714
+      0E0E0F0E0F0E0E0E0F0E0E0D0D0E0D0D0E0D0D0E0D0E0D0E0D0E0D0D0E0D0D0E
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C
+      0D0D0D0C0D0D0C0D0C0D0C0D0C0D0D0C0D0D0C0C0D0C0D0C0D0C0D0D0E0E0E0F
+      10161717170B0000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000141717
+      171716100E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0E0E
+      0E0F0E0E0E0E0E0F0F131717171717171715100E0F0E0E0E0E0E0F0E0E0D0E0D
+      0E0D0D0E0D0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0D0D0E0D0E0D0D0D0E0D0D0E
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0D0C
+      0D0C0D0D0C0D0D0C0C0D0C0C0D0C0C0D0F0E0E0E131717171700000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000001117171717160F0E0F0E0F0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0E0E0F0E0F0E0E0E0F0F13
+      17171716130E0E0F0E0E0F0E0F0E0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D
+      0E0D0D0E0D0D0E0D0E0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D
+      0D0D0C0D0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0C0D0C
+      0C0D0C0D0E0F0E0E141717171300000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000101617171717100E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E
+      0D0E0E0E0E0E0E0D0E0E0E0E0E0E0E0F0E0E0E0F0F13150F0E0F0E0E0E0F0E0E
+      0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0D0D0D0D
+      0E0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D
+      0D0C0D0C0D0C0D0C0D0D0C0D0D0C0C0D0C0D0C0D0C0D0C0E0E0E0F0E15171717
+      1300000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000E1717171717110E0E0E
+      0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E
+      0E0E0E0E0F0E0E0E0E0F0E0E0E0E0E0F0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0D
+      0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0C0D0D0C0D0D0C0D0D0C
+      0D0D0C0D0C0C0C0D0C0D0C0E0E0F0E0E17171717100000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000C1517171717130E0F0E0F0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0E0E0E0F0E0F0E0E0E0F
+      0E0F0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0D0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D
+      0C0D0D0D0C0D0D0D0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0C0D0C0D0C0D0C0D0E
+      0E0E0E0F171717170D0000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000000000B151717
+      1717140E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E
+      0E0E0E0D0E0E0D0E0E0D0E0E0E0E0E0E0E0F0E0E0E0E0E0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0E0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D
+      0C0D0C0D0D0C0D0D0C0D0C0D0C0D0C0C0C0C0C0F0E0F0E10171717170C000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000001317171717150F0E0E0E0F0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0D0E0E0E0E0E0F0E0F0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0C0D0C0D0D0C0D0C
+      0D0C0D0C0D0C0D0E0E0E0E11171717170B000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000001017171717160F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0D0E0E0E0E0E0D0E0E0E0E0D0E0E0D0E0E0D0E0E0E0D0E0E0E0E0E0E0E0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D
+      0D0D0C0D0D0C0D0D0C0D0D0C0D0D0C0D0C0D0C0C0C0C0D0C0D0C0D0F0E0F0E13
+      17171717140B0000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000C1717171717100E0F0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0D0E0E0D0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D0C0D0C0D0C
+      0D0C0D0D0C0D0C0D0C0D0C0D0C0D0E0E0E0E0F131717171717160B0000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000B1517171717130E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0E0D0E0E0D0E0E0D0E0E0E0D0E0E
+      0D0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D
+      0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0C0D0D0C0D0C0D0C0C0C
+      0C0C0E0E0F0E0E0E131717171717160D00000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000131717
+      1717140E0F0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D
+      0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E
+      0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D
+      0C0D0C0D0C0D0C0D0D0C0D0C0D0D0C0D0C0D0C0D0C0D0E0E0E0E0F0E0E101617
+      171717170E000000000000000000000000000000000000000000000000000000
+      00000000000000000C0E110E0000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000F17171717160E0F0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0E0D0E0E0D0E
+      0E0D0E0E0E0D0E0E0D0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0E0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0C0D0D0C0D
+      0C0D0C0C0C0D0C0D0C0C0C0E0E0F0E0E0F0E0F1617171717170E000000000000
+      00000000000000000000000000000000000000000000000B0D0F141617171716
+      0B00000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000C17171717150E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0E0D0E0E0E0D
+      0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E
+      0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D
+      0C0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C
+      0E0E0E0E0E0E0F0F1517171717170E0000000000000000000000000000000000
+      000000000000000C0F1315161717171717171717130000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000001317171717110E
+      0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D
+      0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0C
+      0D0C0D0D0C0D0C0D0D0C0D0C0C0C0C0C0D0C0C0D0C0D0E0F0E0E0E0E0F151717
+      171717110000000000000000000000000000000000000C0E1014171717171717
+      1717171717171717171000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000B17171717160F0E0E0F0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0C0D0C0D0D0C0D0C0D0D0C0D
+      0C0D0C0D0C0D0C0C0C0D0D0E0E0F0E0E0E0F1417171717171100000000000000
+      00000000000B0D0F141517171717171717171717171717171717171717170C00
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00001016171717130E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D
+      0D0D0D0D0D0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D
+      0D0D0C0D0D0D0C0D0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0C0C0D0C0D0C0C0C0D
+      0E0E0F0E0E0E0F1317171717170E000000000000000C0F131516171717171717
+      1717171717171717171615131013171717171400000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000B15161717170F0F0E0F
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0E0D0D0E0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0C0D0C0D0D0C
+      0D0C0D0D0C0D0C0C0D0C0D0C0D0C0D0C0D0C0D0C0C0E0E0F0E0E0E0F13171717
+      17170E000C0E101417171717171717171717171717171717171513110F0E0E0E
+      0E0E151717171710000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000E17171717150E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D
+      0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0C0D0D0C0D0C0C0C0D0C
+      0C0D0C0D0C0D0C0D0C0C0E0E0E0F0E0E0E141717171717161717171717171717
+      1717171717171717151411100E0E0E0F0E0F0E0F0E0E0F16171717170B000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      1317171717100E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D
+      0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D
+      0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D
+      0C0D0D0C0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0D0C0C0C0D0C0C0E
+      0E0E0E0F0E0E1417171717171717171717171717171717171413100F0E0F0E0E
+      0F0E0E0E0E0E0E0E0F0E0E111717171713000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000C16171717160E0E0F0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0E0D0D0E0D0D0E0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0C0D0D0C0D0C0D0D0C
+      0D0C0D0C0D0C0C0D0C0D0C0D0C0D0C0D0C0D0C0D0E0E0E0E0F0E0E1517171717
+      17171717171717151410100E0E0F0E0E0E0E0E0F0E0E0F0E0F0E0F0E0E0E0F0E
+      15171717170E0000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000001117171717130E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D
+      0C0D0D0D0C0D0D0D0D0C0D0D0C0D0D0C0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0C
+      0C0D0C0C0D0C0D0C0D0E0E0E0E0E0F0E151717171717161413100E0E0E0F0E0E
+      0E0E0E0F0E0F0E0E0E0F0E0E0E0E0E0E0E0E0E0E101617171716000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000000000000000B1517
+      1717160F0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0D0E
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0E0D
+      0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D
+      0C0D0C0D0D0C0D0D0C0D0C0C0C0C0D0C0D0C0D0C0D0C0D0C0C0D0C0C0C0D0E0E
+      0F0E0E0E0F151413100F0E0E0E0E0E0F0E0E0E0F0E0F0E0E0E0E0E0F0E0E0D0D
+      0C0C0C0D0E0F0E0E0E1317171717110000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000001016171717140E0F0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0C0D0D0C0D0C0D0D0C0D0C0D0C0D
+      0C0D0C0C0C0C0D0C0C0C0D0C0D0C0D0C0D0C0D0D0E0E0F0E0E0E0F0E0E0F0E0F
+      0E0F0E0E0E0F0E0E0E0E0E0F0E0D0D0C0C0C0C0C0C0C0C0C0E0E0E0F0E0F1517
+      1717170C00000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000015171717170F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D
+      0D0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D
+      0D0D0C0D0D0C0D0C0D0D0C0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0C0D0C0D0C0D
+      0C0C0D0C0C0C0D0C0E0E0E0E0F0E0E0E0F0E0E0E0E0E0E0F0E0E0E0E0E0D0D0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0E0E1017171717130000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000C17171717
+      150E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0C0D0D
+      0C0D0D0C0D0C0C0D0C0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0D0C0C0C0E0E0F
+      0E0E0F0E0E0E0F0E0F0E0E0E0D0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0D0F0E0F0E0E14171717170E00000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000001317171717110E0F0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D
+      0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0C0D0D0C0D0C0D0D0C0C0D0C0C0D
+      0C0D0C0D0C0C0C0C0C0D0C0D0C0C0D0C0C0C0E0E0E0F0E0E0F0E0E0D0D0D0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0E0F0F17171717
+      1500000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000B17171717160E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D
+      0C0D0C0D0D0C0D0C0D0C0D0D0C0D0C0D0C0D0C0C0D0C0C0C0D0C0D0C0D0C0D0C
+      0D0C0C0D0C0C0C0E0E0E0E0D0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0F0E0E0E0E13171717170F00000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000001016171717130E
+      0F0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0E0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0C0D0D0C0D0D0C0D0C
+      0D0D0C0C0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0D0C0C0D0C0D0C0C0C0C
+      0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D
+      0F0E0F0E0F161717171600000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000B15171717160F0E0E0F0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D
+      0C0D0D0D0C0D0D0D0C0D0D0C0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0C0C0D0C0C
+      0D0C0D0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0E0E11171717171000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000E17171717140F0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0E0D0D0D
+      0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0C0D0D
+      0C0D0D0C0D0C0D0D0C0D0C0D0C0C0D0C0D0C0D0C0C0C0C0D0C0D0C0D0C0D0C0D
+      0C0D0C0D0C0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0D0F0E0F0E0E16171717150B000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000001417171717100E0F0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C
+      0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0C0D0D0C0D0D0C0D0C0D0D0C0D0C
+      0D0C0D0C0C0C0D0C0D0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0D0C0C0C0C0C0C0D
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E
+      0F0E111717171711000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000C17171717150E0E0F0E0E0E0E0E0E0E0E0E0D0E0E
+      0E0E0E0D0E0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D
+      0D0D0C0D0D0C0D0C0D0C0D0C0D0D0C0D0C0D0C0C0D0C0C0D0C0D0C0D0C0D0C0D
+      0C0D0C0D0C0D0C0C0C0C0C0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0E0E0E0E16161717170B000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      1117171717110F0E0E0F0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0E0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0C0D0D0C0D
+      0C0D0D0C0D0C0D0C0C0D0C0D0C0C0D0C0D0C0C0C0C0D0C0D0C0C0D0C0D0C0D0C
+      0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0E0F0E0F0E111717171710000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000B16171717160F0E0E0E0E0E
+      0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D
+      0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0C0D0D0C0D0C0D0C0C0D0C0D0C0C
+      0D0C0C0C0C0D0C0D0C0C0D0C0D0C0C0C0C0C0C0C0C0C0D0C0D0C0D0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0E0E0E0E
+      1616171716000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000001016171717130E0F0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E
+      0E0D0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0D0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D
+      0D0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C
+      0D0C0D0C0D0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C
+      0D0C0D0C0D0C0C0C0C0C0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0F0E0E111717171710000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000001517
+      1717170F0E0F0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0C0D0C0D0C0D0C0D0D
+      0C0D0C0D0C0C0D0C0D0C0D0C0C0D0C0D0C0D0C0D0C0D0C0C0C0C0D0C0D0C0C0C
+      0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0D0E0E0F0E0E1616171716000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000D17171717150E0E0F0E0E0E0E0E
+      0E0E0E0D0E0E0E0E0E0D0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D
+      0D0E0D0D0D0D0D0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C
+      0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0D0C0D0C0D0D0C0C0C0D0C0C0D0C0D0C0D
+      0C0C0C0C0D0C0D0C0C0C0C0C0D0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0E0F101717
+      17170E0000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000001317171717100F0E0E0F0E0E0E0D0E0E0E0E0E0D0E0E0E0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D
+      0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0D0C
+      0D0D0C0D0D0C0D0C0D0C0D0C0C0D0C0C0C0C0C0D0C0D0C0D0C0D0C0D0C0D0C0C
+      0C0C0D0C0D0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0D0E0F0E0E0E1617171715000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000C16171717
+      160E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0E0D0D0E0D0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C
+      0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D0C0D0C0D0C0D0C0D0D0C0D0C0D0C
+      0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0E0E0E0F0E13171717170D0000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000001017171717130E0F0E0E0E0E0E0E0E0E
+      0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D
+      0D0E0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D
+      0D0C0D0D0D0C0D0D0C0D0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D
+      0C0D0C0C0D0C0C0C0D0C0C0C0C0D0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0E0E0E0F1617171713
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000B15171717160F0E0F0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D
+      0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0E0D0D0E0D0D0D0E0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0C0D0C0D0C0D0D
+      0C0D0C0D0C0C0D0C0C0C0D0C0D0C0C0C0C0C0C0D0C0D0C0D0C0D0C0C0C0C0D0C
+      0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0E0F0E0E0E14171717170B0000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000001117171717110E
+      0E0F0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E
+      0D0D0E0D0D0E0D0E0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D
+      0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0C0D0D0C0D0D0D0C0C0D0C0D0C0C
+      0C0D0C0D0C0D0C0C0D0C0D0C0D0C0D0C0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E
+      0F0E0E0F17171717100000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000B15171717160F0E0E0E0E0E0E0E0E0D0E0E0E0E
+      0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C
+      0D0D0C0D0D0C0D0C0D0D0C0D0C0D0C0D0C0C0D0C0D0C0D0C0D0C0D0C0C0D0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0F0E0E1517171716000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      1017171717110E0F0E0F0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0C0D0C0D0D0C0D0C0D0C
+      0D0C0D0C0D0C0D0C0C0D0C0D0C0D0C0D0C0C0D0C0D0C0C0C0C0D0C0D0C0D0C0C
+      0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0E0E0E0E0F10171717170E0000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000B15171717160E0E0E0F0E0E0E
+      0E0E0D0E0E0E0E0E0D0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D
+      0D0E0D0E0D0D0E0D0D0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C
+      0D0D0D0C0D0D0D0D0C0D0D0C0D0C0D0D0C0D0D0C0D0C0C0C0D0C0C0D0C0C0C0C
+      0C0C0D0C0D0C0D0C0D0C0D0C0C0C0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0F0E0F0E0E
+      0F16171717140000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000001017171717110E0F0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0E0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D
+      0C0D0C0D0C0D0C0D0D0C0D0C0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C
+      0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0E0E0E0F151717171716000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000000000B1517171716
+      0E0E0E0E0F0E0E0D0E0E0E0E0E0D0E0E0E0E0E0E0D0E0E0D0E0D0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C
+      0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0C0D0C0D0D0C0D0D0C0D0C0D0C0D0C
+      0D0C0D0C0D0C0D0C0D0C0C0C0D0C0C0C0D0C0C0D0C0D0C0C0C0D0C0D0C0D0E15
+      1415141514151415110C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0E0E0F0E0F0E0F1517171717150C000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000001017171717110E0F0E0E0E0E0E0E0E0E0D0E
+      0E0E0E0E0D0E0E0E0E0D0E0E0E0D0E0E0D0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D
+      0D0E0D0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D
+      0D0C0D0D0D0C0D0D0C0D0D0C0D0D0C0D0D0C0D0C0C0D0C0D0C0D0C0D0C0D0C0D
+      0C0D0C0D0C0D0C0C0C0E151A9197CFE8F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      CFCF939114130C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0F0E0E0E0F151717171716
+      0B00000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000015171717160E0E0E0F0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D
+      0E0E0D0E0E0E0D0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0E0D0D0E0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0C0D0C0D
+      0C0D0D0C0D0C0C0D0C0C0C0C0C0C0C0C0C0D0C0C0C0D0C0C0E1791CFF0F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3D29518130C
+      0C0C0C0C0C0C0E0E0F0E0E0F0E1517171717160C000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000E17171717110E0F0E0E0E
+      0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0D0D0D0E0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D
+      0D0C0D0D0D0C0D0D0D0C0D0D0C0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D
+      0C0D0C0D0C0C0D0C0F1693D2F3F3F3F3F3F3F3F3F3F0CFCF9091901614141414
+      141414131990909507D2F3F3F3F3F3F3F3F3F3F0971A130C0C0E0E0F0E0E0E0F
+      1517171717160B00000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000014171717160F0E0E0E0F0E0E0E0E0D0E0E0E0E0D0E0E0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0E
+      0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D
+      0C0D0D0C0D0C0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C101ACFF3F3F3F3
+      F3F3F3E8CF9116140C0C0C0C0C0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B0B0B0F
+      131995D0F3F3F3F3F3F3F3E893180E0E0E0F0E1517171717160C000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000000000C171717
+      17130E0F0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0C0D0D0C0D0D0C0D0C0D
+      0D0C0D0C0D0C0D0C0D0C0F1AD2F3F3F3F3F3F3D29316100C0C0C0C0C0C0C0C0C
+      0C0C0B0C0C0B0C0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B139097E9F3F3F3
+      F3F3F096140F1517171717160B00000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000011171717170F0E0E0F0E0E0E0E0E0E0E
+      0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C
+      0D0D0D0C0D0D0D0C0D0C0D0C0D0D0C0D0D0C0D0C0D0C0C0C0C0C0C0C1797F3F3
+      F3F3F3F096180F0C0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0C0B0C0B0B0C
+      0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B1392D0F3F3F3F3F3E995181717150C
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000B0C0E17171717140E0F0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0E0D0D
+      0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0D0C
+      0D0C0D0C0D0D0C0D0C0D0C0D0C0F91E8F3F3F3F3E996170D0D0D0D0D0D0D0C0C
+      0D0C0C0C0C0C0C0C0C0C0C0C0B0C0B0C0B0C0B0B0C0B0B0B0B0B0B0B0B0B0B0B
+      0B000B0B000B00000E19D0F3F3F3F3F3CF900C00000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000B0C1010131616171717171717100E0E0F
+      0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D
+      0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0C0D0D0C0D0D0C0D0C0D0D0C0D0C10
+      96E9F3F3F3F397190E0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B
+      0C0C0C0B0C0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B0B000B0010
+      92E9F3F3F3F30714000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000000000000000C0D0F
+      131317171717171717171717171717160E0F0E0E0E0E0E0E0E0E0E0E0E0D0E0E
+      0E0E0D0E0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D
+      0D0D0D0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D
+      0D0C0D0D0C0D0C0D0C0D0C0D0D0C0D0C0D1096F3F3F3F3F091110E0E0D0D0D0D
+      0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0C0B0C
+      0B0B0B0B0B0B0B0B0B0B0B000B0B000B00000B0000001707F3F3F3F3D3170000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000B0C0E10131517171717171717171717171717171717
+      171717130E0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0C
+      0D0D0C0F95F3F3F3F3E8190E0E0D0E0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D
+      0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B0B
+      000B0B000B0B000B000B00001093F3F3F3F3D311000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000B0C101013161617
+      17171717171717171717171717171717171717171614130F0E0F0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0D0E0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D
+      0C0D0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0D0C0D0C0F91E9F3F3F3E8190E0E0E
+      0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C
+      0C0B0C0B0C0B0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B000B0B000B00000B000B00
+      00000EF7F3F3F3F3070F00000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000C0D0F1313171717171717171717171717171717171717171717
+      171715141311100E0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E
+      0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D
+      0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C
+      0D0C0D0C0D0C0D0D17E8F3F3F3E8190E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D
+      0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0B0C0B0B0B
+      0B0B0B0B0B0B0B0B0B0B000B0B000B0B000B00000B0000000EF7F3F3F3F3910B
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000B161717171717
+      17171717171717171717171717171717151313100F0E0E0F0E0E0E0E0F0E0E0E
+      0E0E0F0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0E0D0D0D0E0D0D0E0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0C0D0D0C0D0D10CFF3F3F3F0
+      190E0F0E0E0E0E0E0E0E0E0E0D0E0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C
+      0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B0B00
+      0B0B000B00000B00000B000000000E98F3F3F3E9170000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000D171717171717171717171717171717161413
+      11100F0E0E0E0E0F0E0F0E0E0E0F0E0E0E0E0F0E0F0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0D0E0E0E0E0D0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D
+      0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0D0E0E0E0D0E0E
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D
+      0D0D0C0D0D0D0D0C0D0C0D0D0C1AF0F3F3F392100F0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B
+      0C0C0B0C0B0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B000B0B000B0B000B00000B00
+      0000000013D3F3F3F3070D000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      001016171717171717171715141311100E0E0F0E0E0E0E0E0F0E0E0E0E0E0E0F
+      0E0E0F0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0E0D0D0D0E0D0D0E0D
+      0D0E0D0D0D0D0D0E0E0E0F0E0E0F0E0E0E0F0E0E0E0F0E0E0E0E0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0C10
+      CFF3F3F3D0130E0F0E0F0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D
+      0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0C0B0B0B0B0B
+      0B0B0B0B0B0B0B0B0B000B0B000B000B000B00000B0000000000F8F3F3F3E917
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000013171717161413100F0E0E
+      0E0E0E0E0F0E0E0F0E0F0E0E0E0F0E0F0E0F0E0E0E0F0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0E0D0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0E0E0E0E0E0F0E0E0E
+      0F0E0E0F0E0E0E0F0E0E0E0E0E0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D
+      0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C19F0F3F3F0900F0F0E0F0E0F0E0E
+      0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C
+      0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B
+      0B000B000B000B00000B00000000000E98F3F3F3960B00000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000017171717130E0E0E0E0E0F0E0F0E0E0E0E0F0E0E0E0F0E
+      0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E
+      0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0E0D0E0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D
+      0D0D0D0E0D0D0E0D0E0E0E0E0E0F0E0E0E0E0F0E0E0E0F0E0E0F0E0E0E0F0E0F
+      0E0F0E0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0D
+      0C0D0D0C0F95F3F3F3D0130F0F0F0F0E0F0F0E0F0E0F0E0E0E0E0E0E0E0E0E0E
+      0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B
+      0C0B0C0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B000B000B0000000B
+      000000000019F3F3F3E80F000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000000000C171717
+      17100E0F0E0F0E0E0E0E0F0E0F0E0E0E0F0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0E0D0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0E0E0E0E0F
+      0E0E0F0E0F0E0E0E0F0E0E0E0F0E0E0F0E0E0E0E0E0E0F0E0F0E0F0E0E0D0D0D
+      0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0D0D10D2F3F3F3910F0F0F
+      0F0E0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D
+      0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0C0B0B0B0B
+      0B0B0B0B0B0B0B0B000B0B000B0000000B000B000000000000000FD0F3F3F319
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000010161717170E0E0E0F0E0E0F0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0D0E0D0D0E0E0E0E0F0E0E0E0F0E0E0E0E0F111313151515
+      151515141313100F0E0E0E0E0E0E0E0E0E0F0E0D0D0D0D0D0D0D0C0D0D0D0C0D
+      0D0D0D0C0D0D0D0D0C0D15F0F3F3E8150F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F
+      0E0E0E0E0E0E0E0E0E0E0D0E0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C
+      0C0C0C0C0C0C0B0C0C0B0C0B0C0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B
+      000B0B000B00000B000000000000000C93F3F3F3930000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000013171717150F0E0E0E0E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E
+      0D0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0E
+      0E0E0E0F0E0E0F0E0E0E1114151717171717171717171717171717171513100E
+      0F0E0F0E0E0E0E0E0E0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D18F3F3
+      F398110F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E
+      0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C
+      0B0C0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B00000B00000B000B00
+      000000000017E9F3F3D00B000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000015171717130E0F0E
+      0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0E0E0E0F0E0E0E0F0E0F13161717
+      1717171717171717171717171717171717171715110F0E0E0F0E0F0E0E0E0D0D
+      0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C96F3F3F392100F0F0F0F0F0F0F0F0F0F
+      0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D
+      0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0B0B0C0B0B0B0B0B
+      0B0B0B0B0B0B0B000B0B000B0B000B00000B00000000000000000FE8F3F3D30F
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000B16171717110E0E0E0E0E0E0F0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E
+      0D0D0E0D0D0E0E0F0E0E0E0F0E0F141717171717171717171717171717171717
+      17171717171717171716130F0E0E0E0E0F0E0E0E0C0D0D0D0C0D0D0D0C0D0D0D
+      0C0D0D96F3F3F01A100F100F0F0F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E
+      0E0E0E0E0E0E0E0E0E0D0E0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C
+      0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B00
+      0B000B000B00000B000000000000000BD0F3F3E90F0000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000000000000000C
+      171717170F0F0E0F0E0E0E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0F0E0E0E0F0E0F
+      1317171717171717171717171313100F100F1013141717171717171717171716
+      110F0E0E0E0E0F0E0E0C0D0D0D0D0C0D0D0D0C0D0D0ED2F3F3F015100F100F10
+      0F100F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E
+      0D0E0D0E0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B
+      0C0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B000B000B0000000B0000
+      000000000BF7F3F3E90F00000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000010161717170E0E0E0E0E0F0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0E0D0E0E0E0E0F0E0E11161717171717171716110E0B00
+      000000000000000000000C0F14171717171717171715100E0F0E0E0E0E0E0D0D
+      0C0D0D0D0C0D0D0D0ED2F3F3F016100F100F100F100F0F0F0F0F0F0F0F0F0F0F
+      0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D
+      0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0C0B0B0B0B0B0B
+      0B0B0B0B0B0B000B0B000B000B000B000B00000000000000000093F3F3F31700
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000011171717150E0F0E0F0E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E
+      0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0F
+      0E0F0E0E0F1417171717171717130E0000000000000000000000000000000000
+      000B101516171717171716110E0E0F0E0E0E0E0D0D0D0C0D0D0D0C0FD2F3F3D2
+      11101010100F100F100F100F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E
+      0E0E0E0E0E0E0E0E0D0E0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C
+      0C0C0C0C0B0C0C0B0C0B0C0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B
+      0000000B00000B000000000000000091F3F3F317000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000001417171714
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0F0E0E0E0E101517171717171713
+      0C00000000000000000000000000000000000000000000000E15171717171717
+      140E0E0F0E0E0E0E0D0D0D0C0D0D0FD2F3F3D2131010101010100F100F100F0F
+      100F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D
+      0E0D0E0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C
+      0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B0B00000B0000000B000000
+      0000000017F3F3F3110000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000017171717130E0F0E0E0E0F0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0E0E0E0E0F0E10161717171717150C00000000000000000000000000
+      000000000000000000000000000010151717171717150F0E0E0F0E0E0E0C0D0D
+      0D0CCFF3F3D31110101010101010100F100F100F0F0F0F0F0F0F0F0F0F0F0F0F
+      0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D
+      0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0B0B0C0B0B0B0B0B0B0B
+      0B0B0B0B0B000B0B000B000B000B000B00000000000000000017F3F3E90F0000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000B17171717100E0E0F0E0E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E
+      0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0E0F0E0E0E101617
+      1717171710000000000000000000000000000000000000000000000000000000
+      0000000B141717171717150F0E0E0E0F0E0D0D0D0D96F3F3D213101010101010
+      101010100F100F100F100F0F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E
+      0E0E0E0E0E0E0E0D0E0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C
+      0C0C0C0C0C0B0C0C0B0C0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B00
+      0B000B00000B00000000000000001AF3F3E90F00000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000C171717170F0E0F0E0E
+      0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0E0E0E0E0F0E101617171717150D0000000000000000
+      0000000000000000000000000000000000000000000000000011171717171715
+      0F0E0E0E0E0E0D0D93F3F3F0131011101010101010101010100F100F100F100F
+      0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E
+      0D0E0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B
+      0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B000B000B0000000B00000000
+      00000093F3F3E90B000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000010161717170E0E0E0E0F0E0E0E0E0E0F0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0F
+      0E0E0E0F1617171717160C000000000000000000000000000000000000000000
+      00000000000000000000000000000E1717171717140F0E0F0E0E0E19F3F3E916
+      11101010101010101010101010100F100F100F0F100F0F0F0F0F0F0F0F0F0E0F
+      0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D
+      0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0C0B0B0B0B0B0B0B0B
+      0B0B0B0B000B0B000B000B000B000B00000000000000000093F3F3D00B000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000001017
+      1717150E0F0E0E0E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0E0E0F0E0F1517171717140B0000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000E1717171717130E0E0F0E16F3F3F31611101110111010101010101010
+      1010100F100F100F0F0F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E
+      0E0E0E0E0E0E0D0E0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C
+      0C0C0B0C0C0B0C0B0C0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B0000
+      000B00000B0000000000000000D0F3F393000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000013171717150E0E0F0E0E0E0F0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0F0E0E0E0E1317171717160B000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000E1717171717100E
+      0E13E9F3F3901111101110101110101010101010101010100F100F100F100F0F
+      0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D
+      0E0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C
+      0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B0B00000B0000000B0000000000
+      000BD0F3F31A0000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000013171717130F0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E
+      0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D0E0E0E0F0E0F101717
+      1717160B00000000000000000000000000000000000000000000000000000000
+      000000000000000000000000001016171717160E0FD2F3F39610111110111110
+      101110101010101010101010100F100F100F100F0F0F0F0F0F0F0F0F0F0F0F0E
+      0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D
+      0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0B0B0C0B0B0B0B0B0B0B0B0B
+      0B0B0B000B0B000B000B000B000B000000000000000010E9F3F3110000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000017171717130E
+      0E0F0E0E0E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E
+      0D0D0D0D0E0D0D0E0D0D0D0E0E0E0E0E0F15171717170E000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000013171717171393F3F3D01111111111101110111011101010101010101010
+      10100F100F100F0F100F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E
+      0E0E0E0E0E0D0E0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C
+      0C0C0C0B0C0C0B0C0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B000B00
+      0B00000B0000000000000014F3F3E90B00000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000017171717100E0F0E0E0E0E0E0F0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D0E
+      0F0E0F0E13171717171300000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000B1517171792F3F3F014
+      11111110111110111011101011101010101010101010100F100F100F0F0F0F0F
+      0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E
+      0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0B0B
+      0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B000B000B0000000B000000000000
+      91F3F30700000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000C16171717100E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E
+      0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0E0E0E0E0F16171717150B0000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000D171718F0F3F31811111111111111111011101110
+      1010101010101010101010100F100F100F100F0F0F0F0F0F0F0F0F0F0E0F0F0E
+      0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0C
+      0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0C0B0B0B0B0B0B0B0B0B0B
+      0B0B000B0B000B000B000B000B0000000000000000D0F3F31900000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000111314131314131314131314100F100F0C0C0B0000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000C171717170F0F0E0E0E0E
+      0F0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D
+      0D0E0D0D0E0D0E0F0E0F0E13171717170E000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      1317D0F3F3931111111111111111111110111011101110101010101010101010
+      100F100F100F100F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E
+      0E0E0E0E0D0E0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C
+      0B0C0C0B0C0B0C0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B0000000B
+      00000B0000000000000EE9F3F30F000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000B17171717
+      17171717171717171717171717171717151310100C0B00000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000C171717170E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0E0E0E0E0F16
+      1717171500000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000C93F3F3D213111111111111
+      111111111110111011101110101010101010101010100F100F100F0F100F0F0F
+      0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D
+      0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0C
+      0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B0B00000B0000000B000000000014F3
+      F3D0000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000001017171717171717171717171717171717
+      171717171717171717171713100E0C0000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000101617
+      17170E0F0E0E0F0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0D0E0D0D0E0D0D0E0D0E0E0F0E0E11171717170E0000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000BF0F3F31711111111111111111111111111101110111010
+      11101010101010101010100F100F100F0F0F0F0F0F0F0F0F0F0F0F0F0F0E0F0E
+      0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0C0C
+      0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B
+      0B000B0B000B000B000B000B0000000000000096F3F31A000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000001617171717171717171717171717171717171717171717171717171717
+      1717171713000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000010171717160E0E0E0F0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0D0E0E0E0F0E1517171715000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000096F3F393
+      1311131111111111111111111111111011101110101010101010101010101010
+      0F100F100F100F0F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E
+      0E0E0E0D0E0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C
+      0C0B0C0C0B0C0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B000B000B00
+      000B00000000000CE9F3E90E0000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000E171717171413111313
+      131514151514171717171717171717171717171717171717170B000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000010161717150E0F0E0E0E0E0E0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E
+      0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0E0E0F0E0E0F171717171000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000011F3F3D313111311131111111111111111
+      1111111110111011101110101010101010101010100F100F100F100F0F0F0F0F
+      0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D
+      0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0B0B0C0B
+      0B0B0B0B0B0B0B0B0B0B0B000B0B000B000B000B0000000B0000000019F3F398
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000013171717160E0E0F0E0E0E0E0F0E0E0E0E0E0E101011
+      131415171717171717171717170D000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000010171717150E0E
+      0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E
+      0D0D0D0D0E0D0D0E0D0E0E0E0F11171717170B00000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000D3F3F31913111313111311111111111111111111111110111011101110
+      101010101010101010100F100F100F0F100F0F0F0F0F0F0F0F0F0E0F0F0E0F0F
+      0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0C0C0D
+      0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B
+      000B0B000B000B000B000B00000000000007F3F3110000000000000000000000
+      00000000000000000000000000000000000000000000000000000000000B1717
+      1717130F0E0E0E0F0E0E0E0E0F0E0F0E0E0E0F0E0E0E0E0E0F10131515171717
+      1710000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000013171717150E0F0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0E0F0E0E
+      0E14171717150000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000019F3F397131313111311
+      131113111111111111111111111110111011101011101010101010101010100F
+      100F100F0F0F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E
+      0E0E0D0E0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C
+      0C0B0C0B0C0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B0000000B0000
+      0B0000000010F3F3D30000000000000000000000000000000000000000000000
+      000000000000000000000000000000000010171717170F0E0E0F0E0E0F0E0F0E
+      0E0E0E0F0E0E0E0E0F0E0F0E0E0F0E0E0E151717171300000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0013171717150E0E0E0F0E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D
+      0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0E0F0E0E1717171710000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000BF0F3F014131313111313111311111111111111111111
+      11111110111011101010101010101010101010100F100F100F100F0F0F0F0F0F
+      0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D
+      0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0C0B0B
+      0B0B0B0B0B0B0B0B0B0B000B0B000B0B00000B0000000B00000093F3F3170000
+      00000C0000000000000000000000000000000000000000000000000000000000
+      000000000016171717140E0F0E0E0E0F0E0E0E0E0F0E0E0E0F0E0F0E0E0E0E0E
+      0F0E0E0F0E131717171600000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000013171717140E0F0E0E0E0E
+      0F0E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0E
+      0D0D0E0D0E0F0E0E0F171717170E000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000000000000001AF3F3
+      F713131313131113131113111311111111111111111111111011101110111010
+      1010101010101010100F100F100F100F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E
+      0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C
+      0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B00
+      0B0B000B000B000B000B000000000CE9F3E90B000C1317150C00000000000000
+      0000000000000000000000000000000000000000000000000E17171717110E0E
+      0E0F0E0D0E0E0E0E0E0E0E0E0E0E0E0E0F0E0F0E0E0E0F0E0E10171717170B00
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000013171717130E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0D0E0E0E0E0E0D0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0E0D0D0E0D0D0E0E0E0E0F10171717
+      170C000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000BF0F3E8151313131313111311131311
+      1113111111111111111111111110111011101110101010101010101010100F10
+      0F100F0F100F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E
+      0E0D0E0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B
+      0C0C0B0C0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B000B000B00000B
+      000000F8F3F3921417171717160B000000000000000000000000000000000000
+      00000000000000000000000013171717160E0F0E0E0E0E0D0D0D0D0D0D0D0E0D
+      0E0D0E0D0E0E0E0E0E0E0E0E0F0F171717170D00000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000131717
+      17130E0F0E0E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0D0E0D0E0D0D0E0D0E0E0F0E0E11171717170000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000001AF3F391131313131313131313111311131111111111111111111111
+      111110111011101011101010101010101010100F100F100F0F0F0F0F0F0F0F0F
+      0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D
+      0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0B0B0C0B0B0B
+      0B0B0B0B0B0B0B0B0B000B0B000B000B000B0000000B000CE9F3F01817171717
+      17160C000000000000000000000000000000000000000000000000000000000B
+      17171717130E0E0F0E0E0D0E0D0E0D0E0D0E0D0D0E0D0D0D0D0D0D0D0E0E0E0F
+      0E0E171717171000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000013171717130E0E0E0F0E0F0E0E0E0E
+      0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0D0D0E0D0D0D0E
+      0E0E0E0F13161717160000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000BF0F3E81313131313
+      1313131311131311131113111111111111111111111111101110111010101010
+      10101010101010100F100F100F100F0F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E
+      0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C
+      0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B
+      0B000B000B000B000B000000F8F3F396171717171717160B0000000000000000
+      0000000000000000000000000000000000000011171717170F0F0E0E0E0E0E0D
+      0D0E0D0E0D0D0E0D0D0E0D0D0D0D0E0D0D0E0E0E0E0F14171717130000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000013171717130E0F0E0E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E
+      0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0E0D0D0E0D0E0D0D0E0D0E0D0E0F0E0E1317171713000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000001AF3F3911313131313131313131313111313111311
+      13111111111111111111111110111011101110101010101010101010100F100F
+      100F100F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E
+      0D0E0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B
+      0C0B0C0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B0000000B00000B00
+      0CE9F3E917171617171717170E00000000000000000000000000000000000000
+      0000000000000B15171717150E0E0E0F0E0D0D0E0D0D0D0D0E0D0D0E0D0D0D0E
+      0D0D0D0D0D0E0E0F0E0E13171717150000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000001417171716130F
+      0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0D0E0D0D0E0D0E0E0E0E0F1117171713000000000000000000000000000000
+      00000000000000000000000000000000000000000000000000000000000000D3
+      F3F0141314131313131313131313131113131113111111111111111111111111
+      1110111011101110101010101010101010100F100F100F0F100F0F0F0F0F0F0F
+      0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D
+      0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0C0B0B0B0B
+      0B0B0B0B0B0B0B0B000B0B000B0B00000B0000000090F3F3910F0F1617171717
+      170E0000000000000000000000000000000000000000000000000E1717171711
+      0E0F0E0E0E0E0D0D0E0D0E0D0D0E0D0D0D0E0D0D0D0D0D0E0D0E0E0E0E0F1116
+      1717170B00000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000001717171717171714100E0E0E0F0E0E0F0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0E0D0D0E0D0D0D0E0E0F0E0E
+      1317171713000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000017F3F39513141313131313131313
+      1313131311131311131113111111111111111111111110111011101011101010
+      101010101010100F100F100F0F0F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F
+      0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C
+      0C0C0C0C0C0C0B0C0C0B0C0B0C0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B
+      000B000B000B000B000CF3F3D20E0E0F1517171717170E000000000000000000
+      000000000000000000000000000014171717160E0F0E0E0E0E0D0D0E0D0D0D0E
+      0D0D0E0D0E0D0D0E0D0E0D0D0D0D0E0F0E0E0F171717170C0000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0016171717171717171715110E0E0E0F0E0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D
+      0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0D0E0D0D0E0D0E0D0E0E0E0F111717171300000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000D0F3F31514131413141313131313131313131311131113111311
+      111111111111111111111110111011101010101010101010101010100F100F10
+      0F100F0F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D
+      0E0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C
+      0B0C0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B000B000B000000F7F3
+      F3160E0E0F1517171717170F0000000000000000000000000000000000000000
+      000C17171717130E0E0E0F0E0D0E0D0D0E0D0E0D0E0D0D0E0D0D0D0D0D0D0D0D
+      0D0E0E0E0E0F0E17171717100000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000B0E151717171717171717
+      16130F0E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D
+      0E0D0D0E0E0F0E0E131717171600000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000FF3F398131413
+      1413131413131313131313131313131113111311131111111111111111111111
+      10111011101110101010101010101010100F100F100F100F0F0F0F0F0F0F0F0F
+      0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D
+      0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0B0B0C0B0B0B0B0B
+      0B0B0B0B0B0B0B000B0B000B000B000B000010F3F3960F0E0E0F151717171717
+      11000000000000000000000000000000000000000011171717170F0E0F0E0E0E
+      0D0D0E0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0E0D0D0D0E0F0E0E0E1517171713
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000E13171717171717171716140F0E0F0E0E0F0E0F
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0E0D0E0E0E0E0F11171717
+      1700000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000093F3F318141413141314131313131313131313
+      1313131113131111131111111111111111111111111011101110111010101010
+      1010101010100F100F100F0F100F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E
+      0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C
+      0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B00
+      0B000B000B0000D0F3F3100E0E0E0F1417171717171100000000000000000000
+      00000000000000000B15171717150E0E0E0F0E0D0E0D0D0E0D0D0E0D0E0D0D0E
+      0D0D0E0D0E0D0D0D0D0D0E0E0E0F0E1417171714000000000000000000000000
+      000000000000000000000000000000000000000B0B0000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000C1117171717171717171714100E0E0E0E0E0E0F0E0E0F0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0D0D0E0D0E0D0D0D0D0F0E0E0E10171717170C00000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00E9F3E814141414131413141314131313131313131313131113131111131111
+      1111111111111111111110111011101011101010101010101010100F100F100F
+      0F0F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E
+      0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B
+      0C0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B00000B000B17F3F3190F
+      0E0E0E0F1317171717171100000000000000000000000000000000000E171717
+      17100F0E0E0E0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0E0D0E0D0D0E
+      0F0E0E1117171717000000000000000000000000000000000000000000000000
+      0000000000000E16150F00000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000B10161717171717
+      17171715110F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0D0E0D0E0D
+      0E0F0E0E0F171717170D00000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000014F3F3931414131414131413
+      1413131313131313131313131311131311111311111111111111111111111110
+      111011101010101010101010101010100F100F100F100F0F0F0F0F0F0F0F0F0F
+      0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D
+      0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0C0B0B0B0B0B0B
+      0B0B0B0B0B0B000B0B000B0B000B000CE9F3D20E0F0E0E0E0F13171717171713
+      0B00000000000000000000000000000014171717160E0E0F0E0E0E0D0E0D0E0D
+      0D0E0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0E0E0E0E0F10171717170C000000
+      0000000000000000000000000000000000000000000000000B13171717171300
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000B0E15171717171717171715130F0E0E0E0E
+      0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E
+      0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0E0D0E0D0E0E0E0F0E0E16171717100000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000093F3F3171414141414131414131413141313131313131313
+      1313111313111311131111111111111111111111101110111011101010101010
+      10101010100F100F100F100F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E
+      0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C
+      0C0C0C0C0B0C0C0B0C0B0C0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B
+      00000B00F7F3F3110E0F0E0E0E0F131717171717140B00000000000000000000
+      0000000C17171717130E0E0E0F0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0D0D0E0D
+      0E0D0D0D0D0D0D0E0F0E0E0E171717170F000000000000000000000000000000
+      00000000000000000000001017171717171717160C0000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000E13171717171717171716140F0E0F0E0E0F0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D
+      0E0D0D0D0D0D0D0D0E0E0E0E0F14171717140000000000000000000000000000
+      00000000000000000000000000000000000000000000000000000000E9F3CF14
+      1414141414141314131413131413131313131313131313111313111311111111
+      11111111111111111110111011101110101010101010101010100F100F100F0F
+      100F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D
+      0E0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C
+      0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B0B000B15F3F3900E0E0F0E
+      0E0E0F111717171717140B00000000000000000000000011171717170F0E0F0E
+      0E0E0D0D0E0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0E0D0D0D0D0E0E0E0F0E
+      15171717110000000000000000000000000000000000000000000000000C1417
+      1717171717171717171000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000C11161717
+      17171717171714100E0E0E0E0F0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0E0D0E0D0E0D0F0E0E
+      0E11171717170B00000000000000000000000000000000000000000000000000
+      00000000000000000000000000000014F3F39114141414141414141413141314
+      1313131313131313131313131113131113111311111111111111111111111011
+      1011101011101010101010101010100F100F100F0F0F0F0F0F0F0F0F0F0F0F0F
+      0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D
+      0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0B0B0C0B0B0B0B0B0B0B
+      0B0B0B0B0B000B0B000B00000BE9F3CF0E0E0E0F0E0E0E0F101717171717140B
+      000000000000000000000B15171717140E0F0E0E0E0D0E0D0D0E0D0D0E0D0D0E
+      0D0D0E0D0E0D0D0D0D0D0D0D0D0D0D0E0E0E0E0E141717171400000000000000
+      0000000000000000000000000000000B1017171717171717171717171717130B
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000B1015171717171717171716110E0E
+      0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D
+      0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0D0E0D0E0D0D0E0D0E0D0E0D0E0F0E0F0F171717170F0000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000093F3F31714141414141414141413141413141314131313131313131313
+      1311131113111311111111111111111111111110111011101010101010101010
+      101010100F100F100F100F0F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E
+      0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C
+      0C0C0C0C0C0B0C0C0B0C0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B0B
+      00F7F3F30F0E0E0E0F0E0E0E0F101717171717160B0000000000000C0E101417
+      171717100F0E0E0F0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0E0D0E0D0D0D
+      0D0D0D0E0E0F0E0E131717171700000000000000000000000000000000000000
+      00000D16171717171717150F10161617171717160B0000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000B0E15171717171717171716130F0E0E0E0E0E0F0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D
+      0D0D0D0D0E0E0E0E0E0E15171717150000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000E9F3D3151414141414
+      1414141414131413141313131313131313131313131313111311131113111111
+      111111111111111110111011101110101010101010101010100F100F100F100F
+      0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E
+      0E0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B
+      0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000B0017F3F3190E0E0E0E0F0E0E
+      0E0F101717171717160B000C0F131617171717171717160E0E0E0F0E0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0E0D0D0D0D0D0E0E0F0E10171717
+      170C0000000000000000000000000000000000000B1317171717171716110E0F
+      0E0F141717171717170E00000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000D13
+      171717171717171717140F0E0F0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E
+      0E0E0D0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0E0D0E0D0D0E0E0F0E0E1117
+      1717170D00000000000000000000000000000000000000000000000000000000
+      000000000000000000000FF3F395151414141414141414141414141314131413
+      1413131313131313131313111313111113111111111111111111111111101110
+      11101110101010101010101010100F100F100F0F100F0F0F0F0F0F0F0F0F0E0F
+      0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D
+      0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0C0B0B0B0B0B0B0B0B
+      0B0B0B0B000B0B000B0CF3F3960E0E0E0E0E0E0F0E0E0E101617171717161517
+      17171717171717171717130E0F0E0E0E0E0D0E0D0D0E0D0D0E0D0D0E0D0E0D0E
+      0D0D0D0D0E0D0D0D0D0D0D0D0F0E0E0E0F161717170E00000000000000000000
+      000000000000001015171717171717140F0F0E0E0E0E0E111717171717171100
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000C1116171717171717171715
+      100E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0D0E0D0D0E0D0E0D0E0D0E0E0E0F0E0F16171717130000000000000000
+      00000000000000000000000000000000000000000000000000000000000019F3
+      F319141415141414141414141414141314141314131413131313131313131313
+      1113131111131111111111111111111111111011101110101110101010101010
+      1010100F100F100F0F0F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E
+      0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C
+      0C0C0B0C0C0B0C0B0C0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B000BD0F3
+      E80E0E0E0D0E0E0E0E0F0E0E0F16171717171717171717171717171717170F0E
+      0E0E0F0D0D0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D
+      0E0E0F0E0E16171717100000000000000000000000000000000C141717171717
+      1716100E0E0E0E0F0E0F0E0E10161717171717130B0000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000B101517171717171717160E0E0E0F0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0D0D0D0D
+      0D0D0E0F0E0E0E14171717170D00000000000000000000000000000000000000
+      00000000000000000000000000000000000096F3F01514151414141414141414
+      1414141413141314131313131313131313131313131113131111131111111111
+      1111111111111110111011101010101010101010101010100F100F100F100F0F
+      0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0E
+      0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C
+      0B0C0B0B0B0B0B0B0B0B0B0B0B0B000B0B0090F3F3110E0E0E0D0E0E0E0E0F0E
+      0E101617171717171717171717151413100F0F0E0F0E0E0E0D0E0D0D0E0D0D0E
+      0D0D0E0D0D0D0D0E0D0D0D0D0D0E0D0D0D0D0D0D0E0E0E0E0F14171717150E0B
+      00000000000000000000000B1017171717171717130F0E0F0E0F0E0E0E0E0F0E
+      0E0F151717171717140B00000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0B0E151717171717170E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E
+      0E0E0D0E0E0E0E0D0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0E0D0E0D0E0D0E0E0E0F0E0F17171717
+      150B000000000000000000000000000000000000000000000000000000000000
+      000000000000E9F3CF1514151415141414141414141414141414131413141314
+      1313131313131313131311131311131113111111111111111111111110111011
+      101110101010101010101010100F100F100F100F0F0F0F0F0F0F0F0F0F0F0F0E
+      0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D
+      0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0B0B0C0B0B0B0B0B0B0B0B0B
+      0B0B0B000B0B13F3F3190E0E0E0D0E0E0E0E0E0F0E0E0F161717171717151310
+      0F0E0E0E0F0E0E0E0E0E0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0E0D0E
+      0D0D0D0D0D0D0D0D0E0E0F0E0E13171717171715110C00000000000000000D16
+      171717171717150F0E0E0E0E0E0E0E0E0F0E0E0E0F0E0E141717171717150B00
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000D13171717170F0E0E
+      0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0D0E0E0E0D0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D
+      0D0D0D0E0D0E0D0E0D0E0D0E0E0E0E0E13171717171000000000000000000000
+      000000000000000000000000000000000000000000000000000FF3F396141514
+      1514151414141414141414141414131413141313141313131313131313131311
+      1313111311111111111111111111111111101110111011101010101010101010
+      10100F100F100F0F100F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E
+      0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C
+      0C0C0C0B0C0C0B0C0B0C0B0C0B0F0B0B0B0B0B0B0B0B0B0B000B0BF3F3960E0D
+      0E0E0D0E0E0E0E0E0E0F0E0F151514100F0E0E0E0E0F0E0E0E0F0E0F0E0E0E0D
+      0D0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0E0E
+      0F101617171717171717140E000000000B1317171717171716110E0F0E0F0E0F
+      0E0F0D0D0D0E0F0E0E0E0F0E111717171717160B000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000C17171717100E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0D0D0D0D0D0D0E0E
+      0E0F0E0F0E16171717170C000000000000000000000000000000000000000000
+      0000000000000000000000000017F3F31A151514151414151414141414141414
+      1414141413141314131313131313131313131313111313111311131111111111
+      11111111111110111011101011101010101010101010100F100F100F0F0F0F0F
+      0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0E0D
+      0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0C0B0B0D
+      95970B0B0B0B0B0B0B0B0B0B0B000BD0F3D20E0E0D0E0E0D0E0E0E0F0E0E0E0E
+      0E0F0E0E0E0E0F0E0E0E0F0E0E0E0E0E0F0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D
+      0D0D0E0D0D0D0D0D0E0D0D0D0D0D0D0D0D0F0E0E0E0F15171717171717171717
+      150E0B0E16171717171717140F0F0E0E0E0E0E0E0E0D0D0C0D0C0E0E0F0E0E0E
+      0F101617171717160C0000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0017171717110F0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0D0E0D0D0E0D0E0D0E0D0E0D0E0D0D0E0E0E0E0E0F1017171717160B
+      0000000000000000000000000000000000000000000000000000000000000000
+      0091F3F315151514151514151414141414171414141414141314141314131413
+      1313131313131313131113111311131111111111111111111111111011101110
+      1010101010101010101010100F100F100F100F0F0F0F0F0F0F0F0F0F0E0F0F0E
+      0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0C
+      0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C0DD2F3F00B0B0B0B0B0B0B0B0B0B
+      0B0B0092F3F30E0E0E0D0E0E0D0E0E0E0E0F0E0F0E0E0E0F0E0E0E0F0E0E0E0F
+      0E0F0E0E0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0E0D0E0D0D0D0D0D
+      0D0D0D0D0D0E0E0F0E0E0E0F131616171717171717171717171717171716100E
+      0E0E0E0F0E0F0E0E0C0D0C0D0D0C0D0E0E0E0F0E0E0E101617171717150C0000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000014171717130E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0D0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0D0D0E
+      0D0E0D0E0D0E0D0D0E0E0F0E0E0E1417171717140B0000000000000000000000
+      00000000000000000000000000000000000000000007F3D31515151514151415
+      1415141414D29815141414141413141314131314131313131313131313131311
+      1311131113111111111111111111111110111011101110101010101010101010
+      100F100F100F100F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E
+      0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C
+      0B0C0C0B0C11E8F3F3F3110B0B0B0B0B0B0B0B0B0B0B0B19F3F3160D0E0E0D0E
+      0E0D0E0E0E0E0E0E0E0F0E0E0F0E0E0E0F0E0E0E0E0D0D0E0D0E0D0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0E0E0E0F0E0E
+      0E0E1114171717171717171717171717130F0E0F0E0F0E0E0E0E0D0C0D0D0C0D
+      0C0D0C0D0D0E0E0E0F0E0E0F1617171717160B00000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000013171717150E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E
+      0E0E0E0D0E0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0D0D0D0D0D0E0D0E0E0E0E
+      0F0E0F1517171717140B00000000000000000000000000000000000000000000
+      000000000000000000E9F3D015151415151514151415141514F3F3F090141414
+      1414141314131413131313131313131313131311131311111311111111111111
+      111111111110111011101110101010101010101010100F100F100F0F100F0F0F
+      0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0E0D0D
+      0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B11F0F3F3F3F31A0B
+      0C0B0B0B0B0B0B0B0B0B0B13F3F3190E0E0D0E0E0D0E0E0D0E0E0F0E0E0E0F0E
+      0E0E0E0E0D0E0D0E0D0E0D0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0D0D
+      0D0D0D0E0D0D0D0D0D0D0D0D0D0E0E0F0E0E0E0F0E0E0E0E0F13161717171717
+      1717150F0E0E0E0E0E0E0E0E0D0D0D0D0D0C0D0D0C0D0D0C0D0D0E0F0E0E0F0E
+      101617171717160B000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000101617
+      17160E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0D0E0D0E0D0D0E0D0E0D0E0D0E0D0D0D0E0E0E0E0E0E101617171717140B00
+      000000000000000000000000000000000000000000000000000000000BF3F396
+      15151515151514151514151419F3F3F3F3CF1514141414131414131413141313
+      1313131313131313111313111113111111111111111111111111101110111010
+      11101010101010101010100F100F100F0F0F0F0F0F0F0F0F0F0F0F0F0F0E0F0E
+      0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0C0C
+      0D0C0C0C0C0C0C0C0C0C0B17F0F3F39FF3F3950B0B0B0B0B0B0B0B0B0B0B0B0B
+      F3F3910E0D0E0E0D0E0E0D0E0E0D0E0F0E0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0E0D0E0D0D0D0D0D0D0D0D0D0D
+      0D0D0E0E0E0F0E0E0F0E0F0E0E0E0F111617171716130E0F0E0F0E0F0E0F0D0D
+      0D0D0D0C0D0D0C0D0D0C0D0C0D0C0D0E0E0F0E0E0E0F1517171717160B000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000D171717170F0E0E0E0F0E0E0E0E0E
+      0E0E0E0D0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0E0D
+      0E0D0D0E0D0D0E0E0F0E0E0E101717171717160B000000000000000000000000
+      0000000000000000000000000000000011F3F391151515151515151415141415
+      91F3F3F3F3F3F090141414141314131413131413131313131313131313111313
+      1111131111111111111111111111111011101110101010101010101010101010
+      0F100F100F100F0F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E
+      0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0C18F3
+      F3F39A02A7F3CF0B0C0B0C0B0B0B0B0B0B0B0B0BD3F3CF0E0E0D0E0E0D0E0E0D
+      0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0E0E0E0E0E0E
+      0F0E0E0F0E1316150F0E0E0E0E0E0E0E0E0D0D0D0D0C0D0D0C0D0C0D0C0D0D0C
+      0D0D0C0D0E0E0E0F0E0E0F1517171717160B0000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000B17171717100F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E
+      0D0E0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0D0D0D0D0E0D0D0E0D0E0E0E0F0E0E
+      0E111717171717170F0000000000000000000000000000000000000000000000
+      0000000017F3F31A15151515151515151514151495F3F370E3F3F3F3CF151414
+      1414131413141313131313131313131313131113131113111311111111111111
+      1111111110111011101110101010101010101010100F100F100F100F0F0F0F0F
+      0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0E0D0D0D
+      0D0D0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C18F3F3F34402129FF3F30C0B0B0B0B
+      0B0B0B0B0B0B0B0B07F3CF0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0E0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0E0E0F0E0E0E0F0E0E0E0E0E0E0F0E0F
+      0E0F0E0E0C0D0D0C0D0D0D0D0C0D0D0C0D0C0D0D0C0D0C0C0D0E0E0E0E0F0E0F
+      1617171717160000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000016171717130E
+      0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D
+      0E0D0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0E0F0E0E0E11161717171717130C00
+      0000000000000000000000000000000000000000000000001AF3F31515151515
+      1515151515141515D2F3EC605DAEF3F3F3F09014141413141413141314131313
+      1313131313131311131311131111111111111111111111111110111011101110
+      101010101010101010100F100F100F0F100F0F0F0F0F0F0F0F0F0E0F0F0E0F0F
+      0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0C0C0D
+      0C0C0C0C18F3F3F34412121294F3F30F0C0B0C0B0C0B0B0B0B0B0B0B95F3F30E
+      0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0E0D0E0D0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0E0E0F0E0E0E0F0E0F0E0E0E0E0E0E0E0D0C0D0D0D0D0D0C0D0D
+      0C0D0C0D0D0C0D0C0D0C0D0C0C0D0E0E0F0E0E0E0F1617171717140B00000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000013171717150E0E0F0E0E0E0E0E0E0E0E0E0E
+      0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0E0D0E0D0D0E
+      0D0D0E0D0E0E0E0F0E0E0E1016171717171717110B0000000000000000000000
+      00000000000000000000000096F3F315151515151515151515151415D2F3DB60
+      5D5D70E3F3F3F3CF151414131413141313131313131313131313131311131311
+      131113111111111111111111111110111011101011101010101010101010100F
+      100F100F0F0F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E
+      0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0C0C0D0C0C19F3F3F34412121212
+      3CF3F3140C0B0B0C0B0B0B0B0B0B0B0B90F3F30E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0F0E
+      0E0E0E0F0E0F0E0E0D0D0D0D0D0C0D0D0D0D0C0D0D0C0D0C0D0D0C0D0D0C0D0C
+      0D0C0D0E0E0E0F0E0E101617171717140B000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000010161717170E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E
+      0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0D0E0D0D0E0D0D0D0D0D0D0E0D0D0E0D0D0E0D0E0E0E0F0E0E0E
+      0F1417171717171717110C0000000000000000000000000000000000000B0E14
+      D2F3D216151515151515151515151514F3F3C16060605D5DAEF3F3F3F0901414
+      1413141314131413131313131313131313111311131113111111111111111111
+      11111110111011101010101010101010101010100F100F100F100F0F0F0F0F0F
+      0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0E0D0D0D0D
+      0D0D0D0D0D0D0D0C0C0D18F3F3F3441B1212121225F3F3180B0C0B0B0C0B0B0B
+      0B0B0B0B18F3F3150E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0E0D0E0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0F0E0E0E0E0E0E0D0D0D0C0D
+      0D0D0D0C0D0D0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0C0C0C0E0E0E0F0E0E0F16
+      171717170F000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000C17171717100E0F0E0E
+      0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E
+      0D0E0D0E0D0D0E0D0D0E0D0D0D0D0D0E0E0F0E0E0F0E13171717171717171715
+      100D0000000000000000000000000B0E13151717D2F3D2151615151515151515
+      15151515F3F3BC606060605D5D70E3F3F3F3CF15141413141314131413131313
+      1313131313131311131113111311111111111111111111111011101110111010
+      1010101010101010100F100F100F100F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E
+      0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0C19F3F3
+      F3441B1B121B121212F3F3910B0C0B0C0B0C0B0C0B0B0B0B14F3F3150E0E0D0E
+      0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0E0D0D0E0D0D0E
+      0D0E0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0E0F0E0E0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0C0D0C0D
+      0C0D0D0C0D0C0D0C0D0C0D0C0D0E0E0E0E0F0E15171717170B00000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000B16171717110E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D
+      0E0D0E0D0E0E0F0E0E0E0E0F151717171717171717171714130F100F100F1010
+      1316171717171717F1F3D015151615151515151515151519F3F3A96160606060
+      5D5D53AEF3F3F3F0901414131413141313131313131313131313131113131111
+      1311111111111111111111111110111011101110101010101010101010100F10
+      0F100F0F100F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E
+      0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D15F3F3F3441B1B1B121B121212F3F391
+      0B0C0C0B0B0B0C0B0B0B0B0B14F3F3150E0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E
+      0D0E0D0E0D0E0D0D0E0D0E0D0D0D0E0D0D0E0D0D0D0D0E0D0E0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E
+      0C0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C0C0D0C0D0C
+      0C0E0E0F0E0E1017171717110000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000E17
+      171717140F0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0D0E0D0D0D0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0E0E0E0F0E0E0E
+      0E101517171717171717171717171717171717171717171717171717F3F39616
+      15161515151515151515151AF3F3836161606060605D5D536BDBF3F3F3CF1514
+      1314131413141313131313131313131311131311111311111111111111111111
+      111110111011101011101010101010101010100F100F100F0F0F0F0F0F0F0F0F
+      0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0E0D0D0D0D0D
+      0D0D0D13F0F3F3451B1B1B1B1B121B1212D6F3CF0C0B0C0B0C0B0B0C0B0B0B0B
+      11F3F3900E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E
+      0D0E0D0D0E0D0D0E0D0E0D0D0D0D0E0D0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0D
+      0C0D0D0C0D0D0C0D0D0C0D0D0C0C0D0C0C0D0C0D0C0E0E0E0E0F14171717170B
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000E1717171717150E0E0F0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0E0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0D0D0D0D0D0E0E0E0E0F0E0F0E0E0E101417171717171717
+      17171717171717171717171717171715F3F3961615161516151515151515151A
+      F3F383616161606060605D5D5353ABF2F3F3F091141413141313131313131313
+      1313131313111313111113111111111111111111111111101110111010101010
+      10101010101010100F100F100F100F0F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E
+      0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0D0D11E9F3F3451B1B1B1B1B
+      1B1B121B12A7F3CF0C0C0B0C0C0B0C0B0C0B0C0B0BF3F3910E0E0D0E0E0D0E0E
+      0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D
+      0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0C0D0C0D0C0D0D0C0D
+      0C0D0C0D0C0C0C0D0D0F0E0F0E0F171717171100000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000E1717171717150F0E0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D
+      0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D
+      0D0D0D0E0E0E0E0E0E0F0E0E0E0F101417171717171717171717171717171717
+      1613100FF3F3961615161516151515151515151AF3F38368616161606060605D
+      5D53536BDBF3F3F3D21614131413141313131313131313131313111313111311
+      13111111111111111111111110111011101110101010101010101010100F100F
+      100F100F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E
+      0D0E0D0E0D0D0D0D0D0FD2F3F39F1C1B1B1B1B1B1B1B1B121BA7F3CF0C0C0B0C
+      0B0C0B0C0B0B0B0B0BF3F3910E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0E0D0D0D0D0E0D0D0D0D0E0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D
+      0D0C0D0D0D0D0C0D0D0D0C0D0C0D0D0C0D0C0D0D0C0C0C0D0C0D0C0D0E0E0E0E
+      0E14171717170B00000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000E1717171717150F0E
+      0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D
+      0D0D0D0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0E0E0E0F0E0E0E0F
+      0E0E0F0E0E10111315151717171716151413100F0E0F0E0EF3F3961616151615
+      1615161515151593F3F3806868616161606060605D5D535353ABF2F3F3F09313
+      1413141314131313131313131313131113131113111111111111111111111111
+      1110111011101110101010101010101010100F100F100F0F100F0F0F0F0F0F0F
+      0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0E0D0D0D97F3F3
+      A31B1B1C1B1B1B1B1B1B1B1B12D1F3CF0C0C0C0B0C0C0B0B0C0B0C0B0BF3F391
+      0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D
+      0D0E0D0E0D0D0E0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0C
+      0D0C0D0D0C0D0C0C0D0C0D0C0D0C0D0D0E0F0E0F0F1717171713000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000E1717171717150F0E0E0E0E0F0E0E0E0E0E0E0E0E0E
+      0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D
+      0D0E0D0D0D0D0D0D0E0D0D0D0D0D0E0E0E0F0E0E0E0F0E0E0E0F0E0E0E0E0E0E
+      0E0E0E0F0E0E0F0E0E0E0E0FF3F39615161615161516151515151596F3F36869
+      6868616161606060605D5D53535363DBF3F3F3D0171413141313131313131313
+      1313131311131311131113111111111111111111111110111011101011101010
+      101010101010100F100F100F0F0F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F
+      0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E93F3F3D61D1C1B1C1B1B1B1B1B1B1B1B
+      1BA7F3CF0C0C0C0C0B0C0C0B0C0B0B0C0BF3F3910E0E0D0E0E0D0E0E0D0E0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0E0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0C0D0C0D0C0D0D0C0D0C0C0D
+      0C0D0C0E0E0E0E0E14171717170C000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000000000000000E1717
+      171717150F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0D0D0E0D
+      0D0D0D0D0E0E0E0F0E0E0E0F0E0E0E0F0E0F0E0F0E0F0E0E0E0F0E0E0F0E0E0E
+      F3F39616161615161615161516151596F3F37474686868616161606060605D5D
+      53535352ABF2F3F3F09514131413141313131313131313131311131113111311
+      111111111111111111111110111011101010101010101010101010100F100F10
+      0F100F0F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D
+      0E0D0E19F3F3EE1D1C1C1B1C1B1C1B1B1B1B1B1B1BD1F3CF0C0C0C0C0C0B0C0C
+      0B0C0B0B0CF3F3910E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0E0D0D0E0D0E0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D
+      0D0D0D0C0D0C0D0C0D0D0C0D0D0C0D0C0C0D0C0C0C0C0D0F0E0F0E0F16171717
+      1300000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000E1717171717150F0E0E0E0E0F0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0D0D0D0D
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0E0D0D0D0D0D0D0E0E0E0E0E
+      0F0E0E0E0F0E0E0E0E0E0E0F0E0E0E0F0E0E0F0EF3F396161616161516151615
+      15151596F3F3747474696868616161606060605D5D535353525FD9F3F3F3D318
+      1314131313131313131313131313131113111311131111111111111111111111
+      10111011101110101010101010101010100F100F100F100F0F0F0F0F0F0F0F0F
+      0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E14E9F3F32E1C1C1C1C1B
+      1C1B1C1B1B1B1B1B1BD1F3CF0C0C0C0C0B0C0C0B0C0B0C0B0BF3F3910E0E0D0E
+      0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E
+      0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0C0D0D0C
+      0D0C0C0D0C0D0C0D0C0D0E0E0E0E0E13171717170E0000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000E1717171717150F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0D0D0D0D0E0D0D0D0D0D0E0D0D0D0D0D0D0E0D0E0E0F0E0E0E0E0F0E0F0E0E0E
+      0F0E0E0E0E0E0D0DF3F39616161616161516151615161593F3F3827474746968
+      68616161606060605D5D535353535273F2F3F3F3951314131413131313131313
+      1313131113131111131111111111111111111111111011101110111010101010
+      1010101010100F100F100F0F100F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E
+      0E0E0E0E0E0E0E0E0E0FD2F3F3461C1C1C1C1C1C1B1C1B1C1B1B1B1B1BD1F3CF
+      0C0C0C0C0C0C0C0B0C0C0B0C0BF3F3910E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0D0D0E0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D
+      0D0C0D0D0D0D0C0D0D0D0C0D0C0D0C0D0C0D0C0D0D0D0C0D0C0D0C0D0C0D0E0E
+      0F0E0F1617171715000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000E1717171717150F0E0E
+      0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0D0D0E0D0D0D0D0D
+      0E0D0D0D0D0D0D0D0D0D0E0E0E0E0E0E0E0E0E0E0E0D0E0D0D0D0D0DF3F39616
+      161616161615161615161590F3F38575747474686868616161606060605D5D53
+      535352525FD9F3F3F3E819141314131313131313131313131113131111131111
+      1111111111111111111110111011101011101010101010101010100F100F100F
+      0F0F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E96F3F3
+      A31C1C1C1C1C1C1C1C1B1C1B1C1B1B1B1BD1F3CF0C0C0C0C0C0C0B0C0C0B0C0B
+      0CF3F3910E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0D0D0D0E0D0D0D0D0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0D
+      0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0E0E0E0E0F11171717170E00000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000E1717171717150F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0D0D0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0D0D0D0E0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0DF3F3961616161616161615161515161A
+      F3F3857575747474696868616161606060605D5D53535352525270ECF3F3F396
+      1513131313131313131313131311131311111311111111111111111111111110
+      111011101010101010101010101010100F100F100F100F0F0F0F0F0F0F0F0F0F
+      0E0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E19F3F3D71E1C1C1C1C1C1C1C1C1C1B1C
+      1B1C1B1B1BD1F3CF0C0C0C0C0C0C0C0C0C0B0C0C0BF3F3910E0E0D0E0E0D0E0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0D
+      0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0C0D0D0C0D0D0C0D0C0C0C
+      0C0C0C0C0D0E0F0E0E0E16161717150000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000000000E171717
+      1717150F0E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D
+      0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D0E0D0D0D0D
+      0E0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0DF3F39616161616161616161516161590F3F385757575747474696868
+      616161606060605D5D5353535252525FBDF3F3F3F09014131313131313131313
+      1313111313111311131111111111111111111111101791939393181010101010
+      10101010100F100F100F100F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E
+      0E0E0E14F0F3EE2E1D1C1D1C1C1C1C1C1C1C1C1B1C1B1C1B1BD7F3CF0C0C0C0C
+      0C0C0C0C0B0C0C0B13F3F31A0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D
+      0D0D0D0C0D0D0D0C0D0C0D0C0D0C0D0D0C0D0C0D0C0D0C0D0E0E0E0F0E111717
+      1717100000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000E1717171717150F0E0E0F0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D
+      0E0D0D0E0D0D0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0DF0F3D01616161616
+      1616161615161590F3F3B275757575747474696868616161606060605D5D5353
+      53535252516DE3F3F3F3D2161413131313131313131313111313111311111111
+      1111111111111596F0F3F3F3F3F3F3F0971410101010101010100F100F100F0F
+      100F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F0E0E0E10D2F3F3461D1C1D1C1C
+      1C1C1C1C1C1C1B1C1B1C1B1C1BF3F3930C0C0C0C0C0C0C0C0C0C0C0B14F3F315
+      0E0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D
+      0D0D0E0D0E0D0E0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0C0D0D0C0D
+      0D0C0D0C0D0C0D0C0D0C0D0C0E0F0E0E0E16171717150B000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000E1717171717150F0E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0D0D0E0D0D0E0D0E0D0D0E0D0D
+      0E0D0D0D0E0D0D0D0D0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0DCFF3D216161616161616161616151615F3F3C676
+      76757575747474696868616161606060605D5D5353535252525251ADF2F3F3F0
+      9513131313131313131313131113131113111311111111111597F3F3F3F3F3F3
+      F3F3F3F3F3F395131010101010100F10100F100F0F0F0F0F0F0F0F0F0F0F0F0F
+      0F0E0F0E0F0E0E0F0E0E93F3F3A31D1D1C1D1C1D1C1C1C1C1C1C1C1C1C1B1C1B
+      1BF3F3910C0C0C0C0C0C0C0C0C0C0B0C14F3F3150E0E0D0E0E0D0E0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0D0D0D0E0D0D0E0D0D0E0D0E0D0D0D0D0D0D0D0E0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0C0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0E
+      0E0E0E0F10171717171000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000E1717171717150F0E0E0F
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0D0E0D0D0D0E0D0D0E0D0D0E0D0E0D0D0D0E0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      CFF3D217161616161616161616161516F3F3CA76767575757574747469686861
+      6161606060605D5D535353535252515262DAF3F3F3D319131313131313131313
+      131113111311131111111493F0F3F3F3D5713A2F2F3A6ED5F3F3F3D315101010
+      1010100F100F100F100F0F0F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0F18F3F3
+      EA221D1D1D1C1D1C1D1C1C1C1C1C1C1C1C1C1B1C25F3F31A0C0D0C0C0C0C0C0C
+      0C0C0C0C18F3F3150E0E0D0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E
+      0D0D0E0D0D0E0D0D0D0E0D0D0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D
+      0C0D0C0D0D0C0D0D0C0D0C0D0C0C0C0C0C0C0D0E0F0E0E0E1517171716000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000E1717171717150F0E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D
+      0E0D0E0D0E0D0D0E0D0D0E0D0D0D0D0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D96F3F3161716161616161616
+      16161615D3F3E477767676757575747474696868616161606060605D5D535353
+      52525252515172F2F3F3F398151313131313131313131311131113111318E8F3
+      F3F3D55B323231312F2F2C2C5AE0F3F3F016101010101010100F100F100F100F
+      0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E10F0F3F3301D1D1D1D1D1C1D1C1D1C1C
+      1C1C1C1C1C1C1C1B3DF3F3150D0C0D0C0C0C0C0C0C0C0C0C90F3F30E0D0E0E0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0E0D0E0D
+      0E0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0C0D0C0D0C0D0D0C
+      0D0C0D0C0D0C0E0E0E0F0E101717171711000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000E17171717
+      17150F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0E0D0D0D
+      0E0D0D0E0D0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D91F3F317161716161616161616161616D2F3EF7776767676
+      757575747474696868616161606060605D5D5353535352525251515CBDF3F3F3
+      F0921313131313131313131113131114CFF3F3F3F171333333323231312F2F2F
+      2C37B9F3F3F016101010101010100F100F100F100F0F0F0F0F0F0F0F0F0F0E0F
+      0F0E0F0ED0F3F3661D1D1D1D1D1D1D1C1D1C1D1C1C1C1C1C1C1C1C1C99F3F310
+      0D0C0C0D0C0C0C0C0C0C0C0C93F3F30D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D
+      0D0D0D0C0D0D0D0D0C0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0E0F0E0E0E15
+      171717170B000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000E1717171717150F0E0E0E0E0F0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0D0D0E0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D1AF3F31A
+      17161716161616161616161696F3F37777777676757575757474746968686161
+      61606060605D5D535353525252525151516ADAF3F3F3E8191313131313131313
+      111392F0F3F3F3B83B3434333333323231312F2F2C2C2CB9F3F3E81310101010
+      10100F10100F100F0F100F0F0F0F0F0F0F0F0F0F0F0E0F92F3F3D41E1E1D1D1D
+      1D1D1D1D1C1D1C1D1C1C1C1C1C1C1C1B9BF3F30D0C0D0D0C0D0C0C0C0C0C0C0C
+      07F3D20E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0E0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D
+      0C0D0D0C0D0C0D0C0C0D0C0D0C0E0E0E0E0F0F17171717110000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000E1717171717150F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D
+      0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D15F3F390171716171616161616161616
+      92F3F38D787777767676757575747474696868616161606060605D5D53535352
+      525252515151519DF2F3F3F3D01913131313131319D3F3F3F3E0653434343433
+      333333323231312F2F2F2C2CB9F3F3D0101010101010100F10100F100F0F0F0F
+      0F0F0F0F0F0F0F0F0E0F15F3F3EE231E1D1E1D1D1D1D1D1D1D1C1D1C1D1C1C1C
+      1C1C1C1CD1F3D20D0D0C0D0C0C0D0C0C0C0C0C0CE8F3CF0E0D0E0E0D0E0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0E
+      0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D0C0D0C0D0C0D0C0D0D0C0D0C0C0C0C
+      0C0E0F0E0E0E14171717170B0000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000E1717171717150F0E0E0E0E
+      0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D
+      0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0E0D0D0D0D0D0D0E
+      0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D10F3F39716171716171616161616161690F3F3B57878777776767575
+      7575747474696868616161606060605D5D535353525252525151515156ADF3F3
+      F3F3CF19131692D3F3F3F3F1AA3535353434343433333333323231312F2F2C2C
+      2CD5F3F393101010101010100F100F100F100F0F0F0F0F0F0F0F0F0F0F10E8F3
+      F3421E1E1E1E1D1E1D1D1D1D1D1D1C1D1C1D1C1C1C1C1C1CF3F3960D0D0D0C0D
+      0D0C0D0C0C0C0C0CF3F3910E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D
+      0E0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D
+      0C0D0D0D0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0D0E0E0F0E0F171717171300
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000E1717171717150F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0DF3F30717171717
+      161716161616161616F3F3CD7978787777767676757575747474696868616161
+      606060605D5D53535352525252515151515062C5F3F3F3F3F3F3F3F3F3F3C04C
+      36363535343434343434333333323231312F2F2F2C37F1F3F318101010101010
+      10100F100F100F100F0F0F0F0F0F0F0F0F96F3F39F1F1E1E1E1E1E1D1D1D1D1D
+      1D1D1D1C1D1C1D1C1C1C1C2EF3F31A0D0D0D0D0C0D0C0C0D0C0C0C15F3F3190E
+      0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0D0C
+      0D0D0C0D0C0D0C0D0E0F0E0E0E14171717170C00000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000000000E1717171717
+      150F0E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D
+      0E0D0E0D0E0D0D0D0E0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0DCFF3E817171717171617161616161616D2F3EF
+      797978787777767675757575747474696868616161606060605D5D5353535252
+      52525151515150516FDAF3F3F3F3F3EBAC574A49493636353535343434343333
+      3333323231312F2F2C2C5AF3F3E81310101010101010100F100F100F100F0F0F
+      0F0F0F0F1AF3F3D81F1F1E1E1E1E1E1E1D1E1D1D1D1D1D1D1C1D1C1D1C1C1C48
+      F3F3150D0D0D0D0D0C0D0D0C0D0C0C18F3F3150E0E0D0E0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0E0D0D0E0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C
+      0D0D0D0C0D0D0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0C0D0C0D0D0E0E0E0F
+      0E17171717170C00000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000E1717171717150F0E0E0F0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0E0D0D0E0D0D0D0E0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D93F3F31717171717171617161616161697F3F3877979787877777676767575
+      75747474696868616161606060605D5D535353525252525151515150504F5E9E
+      AC9E624B4A4A4A4A494936363535343434343433333333323231312F2F2F2CA2
+      F3F3931010101010101010100F100F100F0F100F0F0F0F13F0F3EE3E1F1F1F1F
+      1E1E1E1E1E1D1E1D1D1D1D1D1D1C1D1C1D1C1CA3F3F30D0D0D0D0D0D0D0C0D0C
+      0C0D0C93F3F30E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0D0D0C
+      0D0C0D0D0C0D0D0C0D0C0D0C0C0C0C0D0F0E0E0E0E1317171717130000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0E1717171717150F0E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0E0D0D0D0D0D0D0D0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D19F3F39017171717171716
+      171616161691F3F3B37A79797878777776767575757574747469686861616160
+      6060605D5D535353525252525151515150504F4E4E4E4B4B4B4B4A4A4A494936
+      363535353434343434333333323231312F2F2C37EBF3F3161010101010101010
+      100F100F100F0F0F0F0F0FD2F3F3642020201F1F1F1E1E1E1E1E1D1D1D1D1D1D
+      1D1D1C1D1C1D1CEEF3CF0D0D0D0D0D0D0D0D0C0D0D0C0DCFF3D20E0E0D0E0E0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D
+      0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0C0D0C0D0C0D0C0D0D0C0D0C0D
+      0C0D0C0C0E0E0F0E0E0E15171717170F00000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000E1717171717150F0E0E0F0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D
+      0E0E0E0E0E0D0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D
+      0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D13F3F39517171717171717161716161618F3F3CD7A7979
+      7978787777767676757575747474696868616161606060605D5D535353525252
+      525151515150504F4E4E4E4B4B4B4A4A4A4A4949363635353434343434333333
+      33323231312F2F2F5AF3F3D0101010101010101010100F100F100F100F0F95F3
+      F3BF20211F201F1F1F1F1E1E1E1E1E1D1E1D1D1D1D1D1D1C1D1C2EF3F3920D0D
+      0D0D0D0D0D0D0D0C0D0C0CF3F3960E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D
+      0D0C0D0D0D0C0D0D0C0D0D0C0D0D0C0D0C0C0D0C0D0C0D0C0D0E0E0F0E0E1017
+      171717150B000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000B1717171717150F0E0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0E0D0D0E0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0DF3F3
+      D017171717171717171617161716D2F3F27A7A7A797978787777767675757575
+      747474696868616161606060605D5D535353525252525151515150504F4E4E4E
+      4B4B4B4B4A4A4A494936363535353434343433333333323231312F2F2CA2F3F3
+      91101010101010101010100F100F100F1018F3F3EA2A2121202020201F1F1F1E
+      1E1E1E1E1D1E1D1D1D1D1D1D1C1D48F3F3140E0D0D0D0D0D0D0D0D0D0C0D15F3
+      F3F80E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D
+      0D0E0D0E0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0C0D0D0C0D0D
+      0C0D0C0D0C0D0C0D0C0D0C0D0C0D0E0E0F0E0E13171717171100000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000001517171717
+      0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0E0D0E0D0D0D0E0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0DCFF3F11717171717171717171617
+      161695F3F38C7A7A7A7979787877777676767575757474746968686161616060
+      60605D5D535353525252525151515150504F4E4E4E4B4B4B4A4A4A4A49493636
+      3535343434343434333333323231312F2F38F1F3F01310101010101010101010
+      0F100F1013F0F3F33F232121212020201F1F1F1F1E1E1E1E1E1D1D1D1D1D1D1D
+      1D1CD7F3E80E0D0E0D0D0D0D0D0D0D0D0D0C91F3F3140D0E0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0D0D0D0D0E
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C
+      0D0D0D0C0D0D0D0D0C0D0D0D0D0D0C0D0C0D0C0D0C0D0D0C0D0C0C0C0C0C0D0C
+      0C0D0E0E0E0E0F0E16161717170C000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000F17171717100E0E0E0F0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E
+      0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0E0D0D0D0E0D0D
+      0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D91F3F39017171717171717171716171619F3F3CB7B7A7A7A7979
+      78787777767675757575747474696868616161606060605D5D53535352525252
+      5151515150504F4E4E4E4B4B4B4B4A4A4A494936363535353434343433333333
+      323231312F2F6EF3F30710101010101010101010100F1011D2F3F36E23232121
+      2121202020201F1F1F1E1E1E1E1E1D1E1D1D1D1D1D24F3F3960E0D0E0D0E0D0D
+      0D0D0D0D0D0DCFF3F00E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D
+      0D0C0D0C0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0C0C0E0F0E0E0E10171717
+      1713000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000B15171717140F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0E0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D13F3F3951817
+      1717171717171717161716E8F3EF7A7B7A7A7A79797878777776767575757574
+      7474696868616161606060605D5D535353525252525151515150504F4E4E4E4B
+      4B4B4A4A4A4A494936363535343434343433333333323231312F2FD5F3F39010
+      101010101010101010100F97F3F3A52326232321212121202020201F1F1F1E1E
+      1E1E1E1D1E1D1D1D1D48F3F3180D0E0E0D0E0D0D0D0D0D0D0D0FF3F3960D0E0E
+      0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0D0D0C0D0D0C0D0D0C0D0C0D0C
+      0C0D0C0D0C0C0C0C0D0C0D0D0E0E0F0E0E15171717170C000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000011171717170F0E0F
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0E0D
+      0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0DF0F3D21717171717171717171717161795
+      F3F3B17B7B7A7A7A797978787777767676757575747474696868616161606060
+      605D5D535353525252525151515150504F4E4E4E4B4B4B4B4A4A4A4949363635
+      35353434343434333333323231312F3AF1F3F0151010101010101010101091F3
+      F3D82D2623262323212121212020201F1F1F1F1E1E1E1E1E1D1D1D1D1DEAF3F0
+      0E0E0D0E0D0E0D0E0D0D0D0D0D17F3F3190E0E0D0E0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D
+      0D0C0D0D0D0C0D0D0D0C0D0C0D0C0D0C0D0D0C0D0C0C0D0C0D0C0D0C0D0C0C0D
+      0E0E0E0E0F0F1617171715000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000C16171717130E0E0E0F0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0E0D0D0D0D0D0D0D0D0D0E
+      0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D96F3F31818171717171717171717171619F3F3DC7C7B7A7A7A7A797978
+      787777767675757575747474696868616161606060605D5D5353535252525251
+      51515150504F4E4E4E4B4B4B4A4A4A4A49493636353534343434343333333332
+      3231312F9CF3F3D31310101010101010101AF3F3F14026262626232323212121
+      21202020201F1F1F1E1E1E1E1E1D1E1D3EF3F3930E0E0E0E0D0E0D0E0D0D0D0D
+      0D96F3F3110E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0D0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0C0D
+      0D0C0D0D0C0D0C0C0D0C0C0C0D0C0D0C0C0D0C0C0D0E0F0E0E0E141717171717
+      1717171717151313140F100F0F0C0C0C0B000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0013171717160F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0D0D0D0E0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D19F3F3931718171717
+      1717171717171716D2F3F3887C7B7B7A7A7A7979787877777676767575757474
+      74696868616161606060605D5D535353525252525151515150504F4E4E4E4B4B
+      4B4B4A4A4A494936363535353434343433333333323231312FC2F3F307101110
+      101010101AF3F3F343272727262626262323212121212020201F1F1F1F1E1E1E
+      1E1E1D1EA3F3F3110E0E0E0E0E0D0E0D0E0D0D0D0DF0F3D20E0D0E0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D
+      0C0D0C0D0C0D0C0D0C0E0E0E0F0E0F1617171717171717171717171717171717
+      1717171717171717131413130000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000E17171717130E0F0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D
+      0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0E0D0D
+      0D0D0D0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0FF3F3D01717181717171717171717171793F3F3C7
+      7B7B7B7B7A7A7A79797878777776767575757574747469686861616160606060
+      5D5D535353525252525151515150504F4E4E4E4B4B4B4A4A4A4A494936363535
+      3434343434343333333232313138E0F3F3D0131010101397F3F3F36727272727
+      2626262623232321212121202020201F1F1F1E1E1E1E1E22F3F3CF0E0E0E0E0E
+      0E0D0E0D0E0D0E0D17F3F3900E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D
+      0D0D0D0D0C0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C0C0C0C0D0C0D0C0C0D0C0E0E
+      0E0E0E1317171717171717171717171717171717171717171717171717171717
+      0D00000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000015171717160E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      97F3F31917171817171717171717171716E9F3F27C7C7B7B7B7A7A7A79797878
+      7777767676757575747474696868616161606060605D5D535353525252525151
+      515150504F4E4E4E4B4B4B4B4A4A4A4949363635353534343434333333333232
+      313138E0F3F3F0969395F0F3F3F1672828282827272726262626232321212121
+      2020201F1F1F1F1E1E1E1E9AF3F3190E0E0E0E0E0E0E0E0D0E0D0E0D96F3F311
+      0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E
+      0D0D0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0C0D0C0D0D0C0D0D0C
+      0D0D0C0C0C0D0C0D0C0D0C0C0D0C0D0C0C0D0D0F0E0F0E0F1617171717171717
+      1717171717171717171717171717171717171717110000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000F17
+      171717110E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0D0D0E0D0D0D0D0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D19F3F3931817171817171717
+      171717171796F3F3B67C7C7C7B7A7A7A7A797978787777767675757575747474
+      696868616161606060605D5D535353525252525151515150504F4E4E4E4B4B4B
+      4A4A4A4A4949363635353434343434333333333232313138D5F3F3F3F3F3F3F3
+      E041292828282827272727262626232323212121212020201F1F1F1F1E1E24EE
+      F3E80E0E0E0E0E0E0E0E0E0E0D0E0D0EE9F3D20E0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0D0E0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D
+      0D0C0D0D0D0C0D0D0D0D0D0C0D0D0C0D0C0D0C0D0C0C0D0C0D0C0C0D0C0D0C0D
+      0C0C0D0C0D0C0D0E0E0E0E0E0E0E0E0F10101010131313141514151717171717
+      1717171717171717160000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000B15171717160E0E0E0E0F0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E
+      0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0E0D0E0D0D0D
+      0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0FE9F3E81718171718171717171717171718F0F3EF7D7C7C
+      7C7B7B7A7A7A797978787777767676757575747474696868616161606060605D
+      5D535353525252525151515150504F4E4E4E4B4B4B4B4A4A4A49493636353535
+      3434343434333333323231312F6EE0F3F3F3E06E292B29292928282827272727
+      262626232323212121212020201F1F1F1F1E9AF3F3920E0F0E0E0E0E0E0E0E0E
+      0D0E0D19F3F3900E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0C
+      0D0C0D0D0C0D0C0D0D0C0D0C0C0D0C0C0D0C0D0C0D0C0D0C0C0D0C0D0F0E0F0E
+      0F0E0E0E0E0E0E0F0E0E0E0E0E0F0E0E0E0E0F101010131313171717170D0000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000001016171717110E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0D
+      0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D96F3F3
+      901718171718171717171717171796F3F3B67D7C7C7C7B7A7A7A7A7979787877
+      77767675757575747474696868616161606060605D5D53535352525252515151
+      5150504F4E4E4E4B4B4B4A4A4A4A494936363535343434343433333333323231
+      31312F2C2C2C2C2B2B2B29292929282828272727272626262323232121212120
+      20201F1F1F24EEF3F0100E0E0E0E0E0E0E0E0E0E0E0E0ECFF3F30F0E0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0E
+      0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0C0D0C0D0D0C0D0C0D0C0C0D
+      0C0C0D0C0C0D0C0C0C0D0C0D0C0C0C0C0E0E0E0E0E0F0E0F0E0F0E0E0E0F0E0F
+      0E0E0E0F0E0E0E0E0E0E0E0F0E16171717110000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000B15171717
+      160E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0D0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0D0E0D0D0E0D0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D15F3F3CF1817181717181717171717
+      171718F1F3EF897D7C7C7B7B7B7A7A7A79797878777776767675757574747469
+      6868616161606060605D5D535353525252525151515150504F4E4E4E4B4B4B4B
+      4A4A4A494936363535353434343433333333323231312F2F2F2C2C2C2B2B2B29
+      29292928282827272727262626232323212121212020201F1F9AF3F3920F0E0E
+      0F0E0E0E0E0E0E0E0E0E11F3F3960E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D
+      0D0D0D0C0D0D0C0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0D0C0C0D
+      0C0D0C0C0E0E0F0E0E0E0E0E0E0E0E0F0E0E0E0E0E0F0E0E0F0E0F0E0F0E0E0E
+      0E14171717150000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000001016171717110E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0D0D0E0D0D0E0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0DE8F3F0191718171817171817171717171797F3F3C77D7D7C7C7B
+      7B7B7A7A7A797978787777767675757575747474696868616161606060605D5D
+      535353525252525151515150504F4E4E4E4B4B4B4A4A4A4A4949363635353434
+      34343434333333323231312F2F2C2C2C2C2B2B2B292929292828282727272726
+      2626232323212121212020202AEEF3F0100F0E0F0E0E0E0E0E0E0E0E0E0E93F3
+      F3150E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D
+      0D0E0D0E0D0D0D0E0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0D0D0C0D0D0C0D0C
+      0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0C0D0C0C0C0C0E0D0E0E0E0E0E
+      0F0E0E0E0F0E0F0E0E0E0F0E0E0E0E0E0E0F0E0F0E10171717170C0000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000B15171717160E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D19F3F3961817
+      181717181717171717171718F1F3F2897D7D7C7C7C7B7A7A7A7A797978787777
+      767676757575747474696868616161606060605D5D5353535252525251515151
+      50504F4E4E4E4B4B4B4B4A4A4A49493636353535343434343333333332323131
+      2F2F2F2C2C2C2B2B2B2929292928282827272727262626232323212121212020
+      A4F3F31A0E0F0E0E0F0E0F0E0E0E0E0E0E0FF0F3E80E0D0E0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0E0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0C0D0D0D0C0D0D0D0D0C0D0D0C0D0C0D0C0D0D0C0D0D0C0C0D0C0D0C0C0C0D
+      0C0D0C0D0C0C0D0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0D0C0D0C0E0D0D0E0E
+      0E0E0E0F0E0E0E0E0E0F17171717100000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000001016171717110E
+      0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D
+      0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D
+      0E0D0D0E0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0FE9F3E91817181718171718171717171717
+      95F3F3DD7E7D7D7C7C7C7B7B7A7A7A7979787877777676757575757474746968
+      68616161606060605D5D535353525252525151515150504F4E4E4E4B4B4B4A4A
+      4A4A494936363535343434343433333333323231312F2F2C2C2C2C2B2B2B2929
+      292928282827272727262626232323212121213EF3F3E80F0E0F0F0E0E0F0E0E
+      0E0E0E0E0E92F3F3190E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0D
+      0D0C0D0D0C0D0C0D0D0C0D0C0D0C0C0C0D0C0D0C0D0C0C0D0C0D0C0D0C0C0C0D
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0F0E0E0E1417
+      1717140000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000B15171717160F0E0E0E0F0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0E0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D91F3F3931817181718171718171717171717E8F3F3AF7E7D7D7C7C7C7B
+      7A7A7A7A797978787777767676757575747474696868616161606060605D5D53
+      5353525252525151515150504F4E4E4E4B4B4B4B4A4A4A494936363535353434
+      343434333333323231312F2F2F2C2C2C2B2B2B29292929282828272727272626
+      26232323212121D8F3F3170F0F0E0F0E0F0E0F0E0F0E0E0E0EE8F3F00F0E0D0E
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0C0D0C0D0D0C0D0C0D0D0C
+      0C0D0C0D0C0D0C0C0C0D0C0D0C0C0D0C0D0C0C0C0C0D0C0D0C0D0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0F0E0F11171717170B0000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00001016171717130E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0E0D0D0E0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0EF3F3E91818171817
+      18171718171717171791F3F3EF8A7E7D7D7C7C7B7B7B7A7A7A79797878777776
+      7675757575747474696868616161606060605D5D535353525252525151515150
+      504F4E4E4E4B4B4B4A4A4A4A494936363535343434343433333333323231312F
+      2F2C2C2C2C2B2B2B2929292928282827272727262626232323219AF3F3980F0E
+      0F0F0F0E0F0E0E0F0E0E0E0E19F3F3910E0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D
+      0D0D0D0C0D0D0D0C0D0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C
+      0D0C0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0E0E0E0E0F171717170E0000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000B15161717160F0E0E0F
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E
+      0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D
+      0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D96F3F393181718171817181717181717171797F3
+      F3CC7E7E7D7D7C7C7C7B7A7A7A7A797978787777767676757575747474696868
+      616161606060605D5D535353525252525151515150504F4E4E4E4B4B4B4B4A4A
+      4A494936363535353434343433333333323231312F2F2F2C2C2C2B2B2B292929
+      292828282727272726262623233FF3F3F0110F0F0F0E0F0F0E0F0F0E0F0E0F0E
+      E8F3F00F0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0E0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0D0D0D0D0E0E0E0E0E0E0F0E0E0E0E0E0E0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0C0D0D0C
+      0D0C0D0C0D0D0C0D0C0D0C0C0C0C0D0C0C0C0C0C0D0C0D0C0D0C0C0C0C0D0C0D
+      0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0F0E0E0E1617171711
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000E17171717140E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0E0E0E0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0D
+      0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      10F3F3E9181817181817171817171718171718E9F3F3B07E7E7D7D7C7C7B7B7B
+      7A7A7A797978787777767675757575747474696868616161606060605D5D5353
+      53525252525151515150504F4E4E4E4B4B4B4A4A4A4A49493636353534343434
+      3434333333323231312F2F2C2C2C2C2B2B2B2929292928282827272727262626
+      23D8F3F3180F0F0F0F0F0F0F0E0F0E0F0E0F0E92F3F3910E0E0E0D0E0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0E0F0E
+      0E0E0F0E0E0E0F0E0F0E0E0E0F0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0C0D0D0D0C0D0D0D0D0C0D0D0D0D0D0C0D0C0D0D0C0D0D0C0D0C0C0C0C0D0C
+      0D0C0C0D0C0D0C0D0C0D0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0E0E0E0F0E1417171715000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      1417171717100F0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0D0E0E0E0E0E0E0E0E0E0E0F0E0F0E0E0E0E0D0E0E0D0E0E0D0E0E0E0D0E0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0D0D0D0E0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C91F3F39618181718171817
+      1817171717171791F3F3F28A7E7E7D7D7C7C7B7B7B7A7A7A7979787877777676
+      76757575747474696868616161606060605D5D53535352525252515151515050
+      4F4E4E4E4B4B4B4B4A4A4A494936363535353434343433333333323231312F2F
+      2F2C2C2C2B2B2B29292929282828272727272626A0F3F3980F0F0F0F0F0F0F0E
+      0F0F0E0F0E0E10F0F3F00F0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0E0E0E0E0F0E0E0F0E0E0F0E0E0E0E0E0E0F0E
+      0E0E0E0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D
+      0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0C0C
+      0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E
+      0E0E0E11171717170B0000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000C17171717150E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0F0E0F0E
+      0E0E0E0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0E
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0EF0F3F119181718181718171817181717171797F3F3E5
+      7F7E7E7D7D7C7C7B7B7B7A7A7A79797878777776767575757574747469686861
+      6161606060605D5D535353525252525151515150504F4E4E4E4B4B4B4A4A4A4A
+      494936363535343434343433333333323231312F2F2C2C2C2C2B2B2B29292929
+      2828282727272747F3F3F0110F0F0F0F0F0F0F0F0F0F0E0F0E0F92F3F3910E0E
+      0D0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0E0E0F0E0E0E0F0E0E0E0E0F0E0F0E0F0E0E0E0F0E0F0E0E0E0E0E0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0D0C0D0C0D0D0C0D0D0C
+      0D0D0C0D0C0C0D0C0D0C0D0C0D0C0D0C0C0D0C0D0C0D0C0C0C0D0C0D0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0F0E0F0E0F171717170D000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000001317171717110F0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0F0E0F0E0E0E0E0E0E0F0E0F0E0F0E0E0E0E0D0E0E
+      0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D91F3
+      F398181817181817181717171817171717E8F3F3CC7F7E7E7D7D7C7C7C7B7A7A
+      7A7A797978787777767676757575747474696868616161606060605D5D535353
+      525252525151515150504F4E4E4E4B4B4B4B4A4A4A4949363635353534343434
+      34333333323231312F2F2F2C2C2C2B2B2B29292929282828272740F1F3F3170F
+      0F0F0F0F0F0F0F0F0F0E0F0F0E13F3F3E80F0E0E0D0E0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0E0F0E0E0E0E0F0E0E0E0F0E10
+      10111110100F0E0F0E0E0E0F0E0F0E0E0F0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D
+      0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0D0C0C0D0C0D0C0C0C0C0D0C0C
+      0C0C0D0C0D0C0C0C0C0C0C0D0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0E0E0E0E0E1617171710000000000000000000000000000000
+      00000000000000000000000000000000000000000000000000000000000B1617
+      1717160F0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0F0E0F0E0E
+      0E0E0F0E0F0E0F0E0E0E0E0E0E0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D
+      0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0DE8F3F390181817181718171817
+      171817171718F1F3F3B77F7E7E7D7D7C7C7C7B7B7A7A7A797978787777767675
+      757575747474696868616161606060605D5D535353525252525151515150504F
+      4E4E4E4B4B4B4A4A4A4A494936363535343434343433333333323231312F2F2C
+      2C2C2C2B2B2B292929292828282DD8F3F3910F0F100F0F0F0F0F0F0F0F0F0F0F
+      0ED0F3F3190E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0D0E0D
+      0D0E0D0D0E0E0E0E0E0F0E0F0E0E0F13141617171717171717171715110F0E0E
+      0E0E0E0F0E0E0E0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D
+      0C0D0C0D0C0D0C0D0D0C0C0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0C0C0C0C0C
+      0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0F0E0E
+      1517171713000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000001016171717140E0F0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0F0E0F0E0E0E0F0E0E0F0E0E0E0E0E10111415150F0E
+      0F0E0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0D0D0D0E0D0D0E0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0C17F3F3D317181818181718171817171817171791F3F3F38F7F
+      7E7E7D7D7C7C7C7B7A7A7A7A7979787877777676767575757474746968686161
+      61606060605D5D535353525252525151515150504F4E4E4E4B4B4B4B4A4A4A49
+      4936363535353434343433333333323231312F2F2F2C2C2C2B2B2B2929292928
+      28D8F3F3970F100F0F0F0F0F0F0F0F0F0F0F0F0E18F3F3CF0E0D0E0E0D0E0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0E0E0F0E0E0E0E0E
+      10151717171717171717171717171717171715110F0E0E0E0E0F0E0E0E0C0D0D
+      0D0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0C0D0C0D0D0C0D0D0C0D0C0D0C0D
+      0C0D0C0D0C0C0D0C0D0C0C0D0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0E0F0E131717171700000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000001517171717100E0E0F0E0E0E0E0E0E0E0E0E0F0E0F0E0E0E0F
+      0E0E0F0E0E0E0F0E0F111315171717171717150F0E0E0F0E0E0E0E0E0D0E0E0D
+      0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0DCFF3F396
+      18181718181718171817171817171793F3F3F28F7F7E7E7D7D7C7C7C7B7B7A7A
+      7A797978787777767675757575747474696868616161606060605D5D53535352
+      5252525151515150504F4E4E4E4B4B4B4A4A4A4A494936363535343434343434
+      333333323231312F2F2C2C2C2C2B2B2B29292929A5F3F3D21110100F100F0F0F
+      0F0F0F0F0F0F0F10F0F3F3140E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0E0E0E0F0E0E0F0E1016171717171717171717171717
+      171717171717171715110F0E0E0E0E0F0E0E0D0D0D0D0C0D0D0D0D0C0D0D0D0D
+      0C0D0D0D0D0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0D0C0D
+      0C0D0C0C0C0C0C0D0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0D0E0E0E0E10171717170C000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000C17171717
+      160F0E0E0E0E0E0E0F0E0F0E0E0E0E0E0F0E0E0E0E0F0E0E1013141616171717
+      17171717171717150F0E0E0E0F0E0E0E0E0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0D0D
+      0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D10F0F3F01A1818171818171817181717
+      1817171798F3F3F28F7F7E7E7D7D7C7C7C7B7A7A7A7A79797878777776767675
+      7575747474696868616161606060605D5D535353525252525151515150504F4E
+      4E4E4B4B4B4B4A4A4A494936363535353434343433333333323231312F2F2F2C
+      2C2C2B2B2B2929A6F3F3E8130F100F100F100F100F0F0F0F0F0F0F95F3F3910E
+      0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0E0F
+      0E0E0E0F0E141717171717171717171717171717171717171717171717171510
+      0E0F0E0E0E0E0E0D0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0C0D0C0D0C0D0D
+      0C0D0D0C0C0D0C0C0C0C0C0C0C0D0C0C0C0D0C0C0D0C0C0D0C0D0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0F0E0F0E0F171717
+      170D000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000001017171717140F0E0F0E0F0E0E0E0E0F
+      0E0F0E0E0E0F0E101113151717171717171717171717171717171717150F0E0E
+      0E0E0E0E0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D
+      0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0C0D0D0D0D1AF3F3D318181817181817181718171718171717CFF3F3ED8A7F7E
+      7E7D7D7C7C7C7B7B7A7A7A797978787777767675757575747474696868616161
+      606060605D5D535353525252525151515150504F4E4E4E4B4B4B4A4A4A4A4949
+      36363535343434343433333333323231312F2F2C2C2C2C2B2B2BA6F3F3F01610
+      10100F100F100F0F0F0F0F0F0F0F18F3F3E80F0E0E0D0E0E0D0E0E0D0E0D0E0D
+      0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0E0E0E0E0E0F0E101617171717171717
+      15100D0C000000000C0D0F141717171717171717110E0E0F0E0E0E0E0C0D0D0D
+      0D0C0D0D0D0D0C0D0D0D0D0C0D0D0C0D0D0C0D0C0D0C0D0D0C0C0D0C0D0C0D0C
+      0D0C0D0C0D0C0D0C0C0C0C0C0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0E0E161717171000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000B1516171717100E0E0E0E0E0F0E0E0E0E0E0F111314171717171717
+      1717171717171717171717151717171717150F0E0F0E0E0F0E0E0E0D0E0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0CCFF3F3961818
+      1817181817181718171718171717CFF3F3ED8E7F7E7E7D7D7C7C7C7B7A7A7A7A
+      797978787777767676757575747474696868616161606060605D5D5353535252
+      52525151515150504F4E4E4E4B4B4B4B4A4A4A49493636353535343434343433
+      3333323231312F2F2F2C2C2C2BB9F3F3F0161010100F10100F100F100F0F0F0F
+      0F11F0F3F3150E0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D
+      0D0E0D0E0E0E0F0E0E0E1117171717171717110C000000000000000000000000
+      0B1015171717171717140E0E0F0E0E0E0E0C0D0D0D0D0C0D0D0D0D0C0D0D0D0D
+      0C0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0D0C0C0D0C0C0D0C0C
+      0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0E0E0F0E0E151717171300000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000D17171717160F
+      0E0F0E0E0E0F10131416171717171717171717171717171717171613100C0000
+      0E1717171717150F0E0E0F0E0E0E0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0C0D0D0D0D0D10F0F3F39018181818171818171817181717
+      181717CFF3F3F28F7F7E7E7D7D7C7C7C7B7B7A7A7A7979787877777676757575
+      75747474696868616161606060605D5D535353525252525151515150504F4E4E
+      4E4B4B4B4A4A4A4A494936363535343434343433333333323231312F2F2C2C2C
+      B9F3F3F0161010101010100F10100F100F100F0F0FD0F3F3910E0D0E0E0D0E0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0D0E0E0F0E0E0F111617
+      17171717110B000000000000000000000000000000000B0F161717171717140E
+      0E0F0E0E0E0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0C0D0C0D0C0D0D0C0C
+      0D0C0C0D0C0D0C0D0C0C0D0C0D0C0C0D0C0C0C0D0C0C0C0D0C0D0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0E0F0E14171717130000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000001117171717140E0F11141517171717171717
+      1717171717171717171713100E0B000000000000000E1717171717150F0E0E0E
+      0F0E0E0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D
+      0D0C0D19F3F3E81918181718181718171817171817171717CFF3F3F28F7F7E7E
+      7D7D7C7C7C7B7A7A7A7A79797878777776767675757574747469686861616160
+      6060605D5D535353525252525151515150504F4E4E4E4B4B4B4B4A4A4A494936
+      363535353434343433333333323231312F2F2FB9F3F3F0161010101010101010
+      0F10100F100F100F91F3F3D20D0E0E0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E
+      0D0D0E0D0D0E0D0D0E0D0E0E0E0E0E0F101717171717150C0000000000000000
+      0000000000000000000000000B141717171717140E0E0F0E0E0E0D0D0D0D0C0D
+      0D0D0C0D0D0D0D0C0D0C0D0D0C0D0D0C0D0C0D0C0C0D0C0C0C0C0C0D0C0D0C0C
+      0C0D0C0C0C0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0D0E0F0E0E13171717170000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000B1516171717171717171717171717171717171717171715110F0C000000
+      000000000000000000000E171717171715100E0E0E0E0E0E0E0E0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0D0C0D96F3F3D018181818
+      18171818171817171817171717CFF3F3F2B77F7E7E7D7D7C7C7C7B7B7A7A7A79
+      7978787777767675757575747474696868616161606060605D5D535353525252
+      525151515150504F4E4E4E4B4B4B4A4A4A4A4949363635353434343434343333
+      333232313138E0F3F3F016101010101010101010100F10100F0F1017F3F3F011
+      0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0E0F
+      0E0F0E101717171717130B000000000000000000000000000000000000000000
+      0000111717171717110F0E0E0F0E0D0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0C
+      0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0D0C0D0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0E0E
+      0F10161717170B00000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000C1717171717171717
+      17171717171717171613100C000000000000000000000000000000000000000E
+      171717171716100E0F0E0F0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0C0D0D0D0D0C0FD2F3F396181817181817181718171817181718
+      1717CFF3F3F3C97F7E7E7D7D7C7C7C7B7A7A7A7A797978787777767676757575
+      747474696868616161606060605D5D535353525252525151515150504F4E4E4E
+      4B4B4B4B4A4A4A494936363535353434343433333333323254EBF3F3E8161110
+      101010101010101010100F10100F14F0F3F3170E0E0E0D0E0E0D0E0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0E0E0E0E0E0F161717171711000000
+      0000000000000000000000000000000000000000000000111717171717100E0E
+      0E0E0E0D0D0D0D0D0C0D0D0D0D0C0D0C0D0D0C0D0D0C0D0C0D0D0C0D0C0D0C0D
+      0C0D0C0C0D0C0D0C0C0D0C0D0C0C0D0C0D0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0F0E0E0E10171717170C0000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000010171717171717171717171714100E0B00000000
+      00000000000000000000000000000000000000000E171717171716110E0E0E0E
+      0F0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D
+      0C13F0F3F392181818181817181817181717181717171793F3F3F3DF8A7E7E7D
+      7D7C7C7C7B7B7A7A7A7979787877777676757575757474746968686161616060
+      60605D5D535353525252525151515150504F4E4E4E4B4B4B4A4A4A4A49493636
+      353534343434343333333371F1F3F3D31311101110111010101010101010100F
+      1011D2F3F3930E0D0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0D0E0D0D0E0E0F0E0F0E15171717171300000000000000000000000000000000
+      0000000000000000000000001117171717160E0F0E0F0E0E0C0D0D0D0D0C0D0D
+      0D0D0D0C0D0C0D0C0D0D0C0D0C0D0C0C0D0C0D0C0D0C0D0C0D0C0C0D0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0D0E0F0E0E0E171717170D0000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0014171717171715130F0C000000000000000000000000000000000000000000
+      0000000000000000000C151717171717110F0E0E0E0E0E0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D
+      0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D17F3F3F1901818181818
+      17181817181717181717171792F1F3F3EF8F7E7E7D7D7C7C7C7B7A7A7A7A7979
+      78787777767676757575747474696868616161606060605D5D53535352525252
+      5151515150504F4E4E4E4B4B4B4B4A4A4A49493636353535343434343439BAF3
+      F3F39713111011101110101010101010101010100F97F3F3CF0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0E0E0E0E0E101717
+      1717150B00000000000000000000000000000000000000000000000000000000
+      001317171717130E0E0E0E0E0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0C0D0C0D
+      0D0C0D0C0C0C0C0C0C0C0D0C0C0D0C0D0C0D0C0D0C0C0C0C0D0C0D0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0E0E0E0F0E0E1717
+      1717100000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000C1513100D0B0000000000
+      0000000000000000000000000000000000000000000000000000000000000C15
+      1717171717110F0E0F0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0C0D0D0D0C0D0D0D0C0D0D91F3F3F01918181718181718171817181718171817
+      17F8E8F3F3F3C87E7E7D7D7C7C7C7B7B7A7A7A79797878777776767575757574
+      7474696868616161606060605D5D535353525252525151515150504F4E4E4E4B
+      4B4B4A4A4A4A4949363635353434343459E0F3F3F39211101111101110111010
+      101010101010101097F3F3D20F0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E
+      0D0E0D0D0E0D0E0D0D0E0D0E0E0F0E0F0E16171717170B000000000000000000
+      0000000000000000000000000000000000000000000B15171717160F0F0E0E0F
+      0D0D0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0D0C0D0C0C0D0C0D0C0D0C0D0C0C0D
+      0C0D0C0D0C0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0E0E0E0F0E0E0E0F0E1517171710000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000B1417171717110E0E0E0E0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D
+      96F3F3E819181818181817181817181717181717171718CFF3F3F3ED8F7E7D7D
+      7C7C7C7B7A7A7A7A797978787777767676757575747474696868616161606060
+      605D5D535353525252525151515150504F4E4E4E4B4B4B4B4A4A4A4949363635
+      353534A1F3F3F3E81711111111101110111011101110101010101091F3F3F014
+      0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E
+      0E0E0E0E11171717171000000000000000000000000000000000000000000000
+      000000000000000000000E17171717130E0F0E0E0E0D0D0C0D0D0D0C0D0D0C0D
+      0C0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0C0C0C
+      0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0E0F
+      0E0E0F0E0F111717171713000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000C17171717100F0E0F0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0E
+      0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0CCFF3F3E819181818181817
+      18181718171718171717171792F1F3F3F3C8897D7D7C7C7B7B7B7A7A7A797978
+      787777767675757575747474696868616161606060605D5D5353535252525251
+      51515150504F4E4E4E4B4B4B4A4A4A4A494936363565EBF3F3F3971411111111
+      11111110111011101010101010101AF3F3F0140D0E0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0E0F0E0F0E1517171716000000
+      0000000000000000000000000000000000000000000000000000000000000015
+      171717160E0E0E0F0E0D0D0D0D0C0D0D0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D
+      0C0D0C0D0C0D0C0D0C0C0C0C0C0D0C0C0D0C0C0D0C0C0C0D0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0E0E0F0E0E0E0F0E111617171717171300
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000000000D171717
+      170F0E0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D
+      0D0D0C0D0D0D0C0D0D0FD2F3F3E8191818171818171817181718171817181717
+      1718D0F3F3F3EFB77D7D7C7C7C7B7A7A7A7A7979787877777676767575757474
+      74696868616161606060605D5D535353525252525151515150504F4E4E4E4B4B
+      4B4B4A4A4A494955C5F3F3F3F01A111111111111111111111011101110111010
+      10F8F3F3F3190E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0D0E0D0D0E0E0E0E0E0F1717171710000000000000000000000000000000
+      000000000000000000000000000000000000000E17171717110E0F0E0E0D0D0D
+      0D0D0C0D0D0C0D0C0D0D0C0D0D0C0D0D0C0C0C0C0C0C0C0C0D0C0C0C0D0C0D0C
+      0D0C0C0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D
+      0E0F0E0F0E0E0E0F0E1116171717171717171000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000010161717170E0E0F0E0E0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D
+      0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0ED2
+      F3F3E8191818181818171818171817171817171717171792E9F3F3F3E5AF7D7C
+      7C7B7B7B7A7A7A79797878777776767575757574747469686861616160606060
+      5D5D535353525252525151515150504F4E4E4E4B4B4B4A4A4A4DAAF3F3F3F396
+      141111111111111111111111111011101110111090F3F3F3190E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0E0E0F0E0F13
+      161717170B000000000000000000000000000000000000000000000000000000
+      000000000000000016171717140E0E0E0F0D0D0D0C0D0D0D0D0C0D0D0C0D0C0D
+      0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0D0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0E0E0E0E0E0E0F0E1015171717
+      17171717130C0000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000013171717150E0E0E0F0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0E0D0D0D0D0D0D0E0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0ED2F3F3E81918181718181817
+      1817181717181717181717171897F3F3F3F3E4AF7C7C7B7B7B7A7A7A79797878
+      7777767676757575747474696868616161606060605D5D535353525252525151
+      515150504F4E4E4E4B4B4B4DACF1F3F3F3D01713111311111111111111111111
+      1111101110111090F3F3F3190E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0D0E0D0D0D0E0E0E0E0E15171717140000000000000000
+      0000000000000000000000000000000000000000000000000000000011171717
+      160F0E0E0F0E0D0D0D0C0D0D0D0C0D0C0D0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C
+      0C0D0C0C0D0C0D0C0C0C0C0C0C0D0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0E0E0E0F0E0F0E0F0E0F1417171717171717150E0000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000013171717140E0F0E
+      0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0D0D0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D
+      0C0D0D0D0C0D0D0D0ED2F3F3E819181818181718181718171817181717171717
+      171719CFF3F3F3F3E5B67C7B7B7B7A7A7A797978787777767675757575747474
+      696868616161606060605D5D535353525252525151515150504F4E4E4E58C3F3
+      F3F3F3E89113111311111311111111111111111111111110111091F3F3F3190E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0E0D0D0E
+      0D0E0E0E0F0E0E17171717100000000000000000000000000000000000000000
+      000000000000000000000000000000000D171717170F0F0E0E0E0D0D0D0D0C0D
+      0D0C0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0C0C0C0C0D0C0C0C
+      0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0F0E0E0E0E0E0F
+      1317171717171717160F00000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000017171717130E0E0E0F0D0E0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0E0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0ED2F3
+      F3E99018181818171818171817181718171717171717171719CFF3F3F3F3EFC7
+      887B7A7A7A7A797978787777767676757575747474696868616161606060605D
+      5D535353525252525151515150504F9DDAF3F3F3F3E891131113131113131113
+      1111111111111111111111111097F3F3F3190E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0E0E0E0F0F171717170C
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000B16171717110E0E0F0E0D0D0D0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C
+      0C0C0C0C0C0C0C0C0D0C0D0C0D0C0D0C0C0C0D0C0C0C0C0C0D0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0D0E0E0F0E0E0E0F0E0F1316171717171717170F0B000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000000000000000B
+      17171717100E0F0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0E0D0D0D0E0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0D0ED2F3F3F1911818181817181817
+      181717171817181717171717171719CFF3F3F3F3F3E5B4867A7A7A7979787877
+      77767675757575747474696868616161606060605D5D53535352525252515151
+      6AC4F1F3F3F3F3D3911313131313131113111311131111111111111111111113
+      07F3F3F0180E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0D0E0D0D0E0D0D0E0E0F0E0E10171717170B000000000000000000000000
+      0000000000000000000000000000000000000000000000000016171717130E0E
+      0E0E0D0D0D0C0D0D0C0D0D0C0D0D0C0D0D0C0C0D0C0D0C0D0C0D0C0D0C0D0C0D
+      0C0D0C0C0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0F0E0E0E
+      0E0F0E0E111616171717171717110B0000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000C171717170F0E0E0E0F0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D
+      0D0D0D0E0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D
+      0D0D0C0D0D0D0C0D95F3F3F3F718181818171818171817181717171717171717
+      171717171896E9F3F3F3F3F3E4B5877A79797878777776767675757574747469
+      6868616161606060605D5D53535352525F73C4F2F3F3F3F3F397191313131313
+      13131313131113111311131111111111111115D3F3F3F0140D0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0E0E
+      0E0F111717171700000000000000000000000000000000000000000000000000
+      0000000000000000000000000013171717130E0F0E0E0E0C0D0D0D0C0D0C0D0C
+      0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0C0D0C0D0C0D0C0D0C0C0C0C0C0D0C0D0C
+      0D0C0C0C0C0C0C0C0C0C0C0C0D0E0E0E0E0F0E0F0E0E10151717171717171713
+      0C00000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000010161717170E0F0E0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0E0D0D0E0D0D0D
+      0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D93F3F3
+      F3CF191818181817181817181718171718171717171717171717169207F3F3F3
+      F3F3F3EFCDB58B78787777767675757575747474696868616161606060605D5D
+      6B84BEE3F3F3F3F3F3F3D3921514131313131313131313131311131311131111
+      111111111118F0F3F3D2140E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D
+      0E0D0E0D0E0D0E0D0D0E0D0D0D0E0D0D0E0D0E0F0E0E13171717170000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0013171717150E0E0F0E0E0D0C0D0D0D0C0D0D0C0D0D0C0D0C0D0C0C0D0C0D0C
+      0D0C0D0C0C0C0C0C0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D
+      0E0E0F0E0E0E0E0E0F1517171717171717150D00000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000001017171715
+      0E0E0F0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D
+      0D0C0D0D0D0D0C0D0D0D0C0D0D0D0C0D0C0D18F0F3F3E81A1817181817181817
+      18171817171717171717171717171716171892CFF0F3F3F3F3F3F3F3E7DEC6B2
+      858176757575747474696868616C8383BBC1DBF2F3F3F3F3F3F3F3D393161414
+      13141314131313131313131313131113131113111311111193F3F3F3970F0E0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D
+      0E0D0D0E0D0E0E0E0E0F11171717170000000000000000000000000000000000
+      00000000000000000000000000000000000000000013171717150E0E0E0E0E0C
+      0D0D0D0C0D0C0D0D0C0D0D0C0D0C0D0C0C0C0C0C0C0C0D0C0D0C0D0C0D0C0C0D
+      0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0E0E0F0E0F0E1417171717
+      171717160F000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000013171717140F0E0E0E0E0E0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D
+      0D0E0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D
+      0C0D0D0C0D0D0D14E8F3F3F1F718181818171817181717181717181717171717
+      1717171716171616169096D2F3F3F3F3F3F3F3F3F3F3F3F3F3E6E2E2E2E2F3F3
+      F3F3F3F3F3F3F3F3F3F3F3E89891151414131413141314131313131313131313
+      1313131113111311131115D0F3F3F3920E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0E0F0E0E1317
+      1717170000000000000000000000000000000000000000000000000000000000
+      00000000000000000013171717140E0F0E0E0E0D0D0C0D0D0C0D0C0D0C0D0C0D
+      0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0D0C0C0C0C0D0C0C0C0C0C
+      0C0C0C0C0C0C0C0D0E0F0E0E0F11171717171717171510000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000016171717130E0E0F0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0C0D0E0E1098F3F3
+      F3D0191818181718181718171817171717171717171717171716171617161616
+      16909507D2F0F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3D3CF95901614
+      14141414141414141314131413141313131313131313131313111311131AF0F3
+      F3F0180D0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0D0E0D0D0E0D0E0E0E0E0F1017171717000000000000000000
+      0000000000000000000000000000000000000000000000000000000000141717
+      17130E0E0F0E0D0D0D0D0C0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C
+      0D0C0D0C0D0C0C0C0C0C0D0C0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0D0E0E0E0F
+      1317171717171717110B00000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000B16171717100E0F0E0E
+      0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0E0D0E0D0D0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C
+      0D0D0D0C0D0D0D0D0C0D0D0C0D0E0E0E0E0E90F3F3F3F1921818181718181718
+      1718171718171717171717171717161716161616161616161616159090F79696
+      96D2D2D2D2D298969596901A1715141514151414141414141414141314141314
+      13131313131313131313131313111314CFF3F3F3CF110E0E0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0E0D0D0E0D0D
+      0D0D0E0F0E0E10171717170C0000000000000000000000000000000000000000
+      000000000000000000000000000000000017171717110F0E0E0E0D0D0D0D0C0D
+      0C0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0C0C0C0C0C0C0C0C0C0D0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0F0E0E131717171717130C00000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000C17171717100E0E0E0F0D0E0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0E0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D
+      0C0E0E0F0E0E0F14D3F3F3F3D019181817181718171817181717171717171717
+      1717171617161616161616161616161516151516151515151515151515151515
+      1514151415141414141414141414141414131413141314131313131313131313
+      131390F0F3F3F3920E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0E0D0E0D0D0E0D0D0E0D0E0D0E0E0E0F0E171717170E
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000C17171717100E0E0F0E0D0D0D0D0C0D0D0C0D0C0D0C0D0C0C0C0C0C
+      0C0C0C0C0D0C0D0C0D0C0D0C0D0C0C0D0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0D0E0E0E0F11171717160C000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000F17
+      1717170E0F0E0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0E0D0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C
+      0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0E0E0E0F0E15171796F3F3
+      F3F1961818181817181718171718171717171717171717171617161716161616
+      1616161615161615161515151515151515151515151415151415141414141414
+      141414141414141314131413141313131313131317D2F3F3F3D2140E0E0E0E0D
+      0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D
+      0D0E0D0D0E0D0D0E0D0E0E0F0E0E0E1617171711000000000000000000000000
+      0000000000000000000000000000000000000000000000000F171717170E0F0E
+      0E0E0D0D0C0D0D0C0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D
+      0C0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0F0E0E13171717
+      1300000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000010161717160E0E0F0E0E0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E
+      0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D
+      0D0C0D0D0D0C0D0D0C0E0F0E0E0E171717171AE8F3F3F3E99118171818171718
+      1717181717171717171717171716171616161616161616161615161515161516
+      1515151515151515151514151414151415141414141414141414141314141314
+      1313131313131697F3F3F3F0920E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0D0D0E0E
+      0E0F0E1417171715000000000000000000000000000000000000000000000000
+      00000000000000000000000014171717150E0E0E0F0E0C0D0D0C0D0C0D0C0D0C
+      0D0D0C0D0C0D0C0D0C0D0C0C0D0C0D0C0D0C0D0C0C0D0C0C0C0C0C0D0C0D0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0D0E0E0E0F13171717130000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000013171717150E0E0E0E0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0E0D0D0E0E0E0E0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0C0E0E0E
+      0F0E17171717171390E9F3F3F3D3911718181718171817171817171717171717
+      1717161716161616161616161616151616151615151515151515151515151515
+      14151415141414141414141414141414131413141314131315F7F0F3F3F39811
+      0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0E0D0E0E0E0E0E10171717170E000000
+      000000000000000000000000000000000000000000000000000000000000000C
+      17171717110F0E0E0E0E0D0C0D0D0C0D0D0C0D0D0C0D0C0C0D0C0D0C0D0C0D0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E
+      0E0F0E0E15171717130000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000015171717130E
+      0F0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0E0D0D0D0D0E0F0E0E0E0F0E0E0E0E0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D
+      0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0E0F0E0E10171717170E00000BF7F3
+      F3F3F3D391171818171718171717171717171717171717161716161616161616
+      1616161516151516151615151515151515151515141515141514151414141414
+      1414141414141314131415F7F0F3F3F3E8160E0D0E0E0E0E0E0D0E0E0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0E0D
+      0D0E0D0D0D0E0D0E0F0E0F0E1617171715000000000000000000000000000000
+      0000000000000000000000000000000000000011171717170F0E0F0E0E0D0D0D
+      0C0D0D0C0D0D0C0D0C0D0D0C0C0C0C0C0C0C0D0C0D0C0D0C0D0C0D0C0C0D0C0C
+      0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0E0E0F1417171710000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000017171717110E0E0F0E0E0E0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D
+      0E0E0E0E0E0F0E0E0E0F0E0E0E0E0E0E0E0E0E0D0D0E0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C
+      0D0D0D0C0D0E0E0E0F101717171700000000000E96F3F3F3F3D3921817181718
+      1717181717171717171717171617161616161616161616161516161516151515
+      151515151515151515141514151414141414141414141414141413141696F0F3
+      F3F3E8190E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0E0D0D0E0E0E0E0E
+      13171717170E0000000000000000000000000000000000000000000000000000
+      0000000000000B17171717150E0E0E0F0E0D0D0D0C0D0C0D0C0D0C0D0D0C0C0D
+      0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0D0C0D0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0E0F0E0E0E1617171710000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000C17171717100F0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D
+      0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0E0D0E0E0F0E0E0E0F0E0E0E0E0F
+      0E0E0F0E0E0E0E0E0F0E0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0C0D0F0E0E0E131717
+      1717000000000000001107F3F3F3F3E996181817181717171717171717171717
+      1716171616161616161616161615161515161516151515151515151515151514
+      15141514151414141414141414141998F3F3F3F3E8190E0E0E0E0E0E0E0E0E0D
+      0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0F0E0F0E0F17171717150B0000000000
+      0000000000000000000000000000000000000000000000000000131717171710
+      0E0F0E0E0E0C0D0D0D0C0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C0C0D0C0D0C0D0C
+      0D0C0C0C0C0C0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0F0E0E
+      171717170F000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000D171717170F0E0E0F0E0E
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D
+      0D0E0D0E0D0E0D0E0E0E0E0F0E0E0E0F0E0F0E0E0F0E0E0E0F0E0F0E0E0E0F0E
+      0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C
+      0D0D0D0C0D0D0D0C0D0D0D0C0D0E0F0E0E131717171500000000000000000011
+      F7F3F3F3F3F0CF91171817171817171717171717171716171616161616161616
+      1616151616151615151515151515151515151514151514151414141414141415
+      93E8F3F3F3F3E8190E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0E0D0E0E0E0E0E1317171717110000000000000000000000000000000000
+      000000000000000000000000000F17171717150E0E0E0E0F0D0D0C0D0C0D0C0D
+      0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0C0C0C0C0D0C0C0D0C0C0C0D0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0F0F171717170C00000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000010161717160E0E0F0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0E0E0F0E0E
+      0F1111100E0E0E0F0E0E0F0E0E0E0E0E0F0E0E0F0E0E0E0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D
+      0E0E0E0F0E141717171300000000000000000000000E91E9F3F3F3F3E998F817
+      1717171717171717171717161716161616161616161616151615151615161515
+      151515151515151514151415141514141691CFF3F3F3F3F3CF190E0E0E0E0E0E
+      0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0E0F0E0F0E0F1617
+      1717170E00000000000000000000000000000000000000000000000000000000
+      0C17171717170F0F0E0F0E0E0C0D0D0C0D0D0C0D0C0D0D0C0D0C0C0C0C0C0C0C
+      0D0C0D0C0D0C0D0C0D0C0C0C0C0C0D0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0F0E0E0E10171717170C00000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000131717
+      17150E0E0E0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0D0D0E0E0F0E0E0E0F131717171715141311100E0F
+      0E0F0E0E0E0F0E0E0F0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C
+      0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0D0E0F0E0E15171717130000
+      00000000000000000000000B17D0F3F3F3F3F3E9989217171717171717171717
+      1617161616161616161616161516161516151515151515151515151515151415
+      141793CFF3F3F3F3F3F093110E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0E0D0E0D0E0E0E0E0E1017171717170E00000000000000
+      000000000000000000000000000000000000000C1517171717130E0E0E0E0E0D
+      0D0D0D0D0C0D0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C
+      0D0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0F0E0E1117171717
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000014171717130F0E0F0E0E0E0E0D0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E
+      0D0E0E0E0E0F0E131717171717171717171717171515141313130F0E0E0E0E0E
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D
+      0D0C0D0D0D0D0C0D0E0E0E0E0F14171717100000000000000000000000000000
+      00000E91D3F3F3F3F3F3F3D39790171717171717171617161616161616161616
+      1615161515161516151515151515151515189298E8F3F3F3F3F3F398170E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D
+      0D0E0E0F0E0F0E1317171717170E000000000000000000000000000000000000
+      0000000000000C1517171717150E0F0E0F0E0E0D0C0D0C0D0C0D0C0D0D0C0D0C
+      0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0D0C0C0C0C0C0C0D0C0D0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0D0E0E0F0E13171717170E0000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000017171717130E0E0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0F0E0F0E0E111717171717
+      1717171717171717171717171717140E0F0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0E0E0F0E
+      0E1717171710000000000000000000000000000000000000000F92D3F3F3F3F3
+      F3F3F3E807959118161716171616161616161616161615161615161515151515
+      199195D2F0F3F3F3F3F3F3F098190F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D
+      0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0E0E0E0E0E0E15171717
+      171710000000000000000000000000000000000000000000000F171717171716
+      0E0E0E0E0E0E0D0D0D0D0D0C0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0C0C0C0C0C
+      0C0C0C0D0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E
+      0E0E0F1417171717171100000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000C16171717100E0F
+      0E0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0E0E0E0E0E11171717171717171717171717171717171717
+      1717170F0E0F0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D
+      0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0C0E0E0E0F0E171717170E000000000000
+      000000000000000000000000000000000E1896F0F3F3F3F3F3F3F3F3F3D2D296
+      9695909090909090909090909091969607D2E9F3F3F3F3F3F3F3F3F3D293160E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0E0D0E0D0D0E0E0F0E0F0E0F151717171717140C00000000000000
+      00000000000000000000000B131717171717160F0F0E0F0E0F0D0D0D0C0D0D0C
+      0D0D0C0D0C0D0C0D0C0C0C0C0C0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0C0D0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0F0E0E0E10151717171717130B
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000C171717170F0E0E0F0E0E0D0E0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0D0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0E0E0F0E0F0E
+      101617171717110C0F1013161717171717171717171717140E0E0F0E0E0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C
+      0D0D0D0C0E0F0E0E0F171717170C000000000000000000000000000000000000
+      00000000000000000F1793D0F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F0CF9216100E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0E0D0E0D0D0D0D0D0E
+      0E0E0E0E0E0F15171717171717110C00000000000000000000000000000B1117
+      1717171717160F0E0E0F0E0E0E0C0D0D0D0C0D0D0C0D0D0C0D0D0C0D0C0D0C0D
+      0C0D0C0D0C0D0C0D0C0D0C0C0C0D0C0C0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0E0E0F0E0E0F0E151717171717140C0000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      10161717170E0F0E0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0E0E0E0E0E0E10161717171714000000000000
+      000C0C100F131315171717170F0E0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0E0E0E0F10161717
+      170C000000000000000000000000000000000000000000000000000000000000
+      000F151A9307D3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F307CF979590180E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E
+      0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0D0D
+      0E0D0D0E0D0D0D0E0D0D0D0D0D0D0D0E0D0D0D0D0E0F0E0F0E0E0F1317171717
+      171717140F0B00000000000000000B0E1317171717171717150F0E0F0E0E0E0E
+      0D0D0D0C0D0D0C0D0C0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C
+      0C0C0C0C0D0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0E0F0E0E
+      0E0E141717171717160B00000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000011171717150E0E0E0F0E0D0E
+      0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0E0F0E0F0E0F1617171717140B000000000000000000000000000C17171717
+      140E0F0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C
+      0D0D0D0C0D0D0D0C0D0D0C0D0E0F0E0E10171717170000000000000000000000
+      00000000000000000000000000000000000000000000000000000000000F1311
+      111311111311111311110B0000000C17171717100E0F0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0E0D0D0E0D0E
+      0D0E0D0D0D0E0D0D0D0E0E0E0E0F0E0E11161717171717171717171314100F14
+      1316171717171717171717130E0E0E0E0E0F0E0D0C0D0D0D0D0C0D0D0C0D0D0C
+      0D0C0D0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0D0C0C0D0C0C0C0C0D0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0E0E0F0E0E0E111717171717170E00
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000013171717140F0E0E0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0F0E0E0E0F151717171715
+      0B00000000000000000000000000000013171717170F0E0F0E0E0E0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D
+      0E0E0E0F13161717170000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000B16171717110E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0D0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0E0D0E0D0D0E0D0D0D0D0D0D0E0F
+      0E0E0E0F0E0F1417171717171717171717171717171717171717171717150F0E
+      0F0E0F0E0E0E0D0D0D0D0C0D0C0D0C0D0D0C0D0D0C0D0C0D0C0C0C0C0D0C0D0C
+      0D0C0D0C0D0C0D0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0E0E0E0F0E0F0E1016171717171710000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000017171717
+      130E0F0E0E0F0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D
+      0D0E0D0D0E0D0E0E0E0E0E0F0E1517171717160C000000000000000000000000
+      000000000C17171717140E0E0F0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0C0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0D0F0E0E0E1317171714000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000016171717130F0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0E0D0D0E
+      0D0D0E0D0D0D0D0D0D0D0D0D0D0D0E0D0E0D0D0E0E0F0E0E0E0E0E1014171717
+      17171717171717171717171717171715100E0F0E0E0E0E0F0E0C0D0D0C0D0D0D
+      0D0C0D0C0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0C0C
+      0C0D0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0E0E0E
+      0F0F161617171717130000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000B16171717100E0E0F0E0E0E0E0E0E0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0D0D0E0D0D0E0D0D0E0E0E0F0E0E0E
+      1417171717160B00000000000000000000000000000000000013171717170F0E
+      0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0D
+      0D0C0D0D0D0C0D0D0E0F0E0E1417171713000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000013171717150E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0E0D0E0D0E0D0D
+      0E0D0D0D0D0D0D0D0E0E0E0F0E0F0E0E0E0F1115171717171717171717171717
+      16130F0E0E0E0E0E0F0E0E0E0D0D0C0D0D0D0C0D0D0C0D0D0C0D0D0C0D0C0D0C
+      0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0F0E0F0E0E0E0F151717171717140B00
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000C1717171716110E0E0E0F0E0E0F0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0D0E0D0E0D0D0E0D0D0E0E0E0E0E0F0E1417171717170E000000000000
+      000000000000000000000000000C17171717140E0F0E0E0E0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0C0E0E0E0F0E
+      1517171713000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000010
+      161717170E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D
+      0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0D0E0D0D0E0D0D0E0D0E0D0E0D0D0D0D0D0D0D0D0E0D0D0D0E0E0E
+      0E0E0E0F0E0E0F0E0F101114151415141413100F0E0E0F0E0F0E0F0E0E0E0E0C
+      0D0D0D0D0C0D0D0C0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0D0C0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0D0E0E0E0F0E0E0E141717171717160B000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000F171717171717150F
+      0E0E0F0E0E0E0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D
+      0E0E0F0E0E0E1316171717170E00000000000000000000000000000000000000
+      000013171717170F0E0F0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D
+      0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0E0E0E0E0E151717171000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000C17171717100E0F0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E
+      0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D
+      0D0D0D0D0D0D0D0D0D0E0D0E0D0D0D0D0D0D0D0E0E0F0E0E0E0F0E0E0E0E0F0E
+      0E0E0F0E0E0E0F0E0F0E0E0E0E0E0E0E0E0D0D0D0D0C0D0D0D0D0D0C0D0C0D0C
+      0D0C0D0C0D0C0D0C0C0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0C0D0C0D0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0E0E0F0E0E
+      0E111717171717170E0000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000B1317171717171717130F0E0E0F0E0F0E0E0E0E0E
+      0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0F0E0E0F0E11171717171710
+      000000000000000000000000000000000000000000000C17171717140E0E0F0E
+      0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D
+      0D0C0D0E0E0F0E0E171717171000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000B16171717110E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0E0D0E0D0D0D0D
+      0D0E0D0D0D0D0D0D0D0E0E0F0E0E0E0F0E0E0E0E0F0E0E0F0E0E0E0E0E0E0F0E
+      0F0E0E0D0D0D0C0D0D0D0D0C0D0D0D0C0D0C0D0D0C0D0C0D0D0C0C0D0C0D0C0D
+      0C0D0C0D0C0D0C0D0C0D0C0C0C0C0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0F0E0F0E11161717171717100000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000D1517171717171716110F0E0E0E0E0F0E0E0E0E0E0D0E0D0E0D0E0D0D0E0D
+      0E0D0D0E0D0D0E0E0E0E0F0E1017171717171100000000000000000000000000
+      000000000000000000000013171717170F0E0E0E0F0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0C0E0E0E0F0E17171717
+      0D00000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000014171717
+      140F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0D0E0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E
+      0E0E0F0E0E0F0E0E0E0F0E0E0F0E0F0E0F0E0E0E0E0D0D0D0D0D0D0C0D0D0D0D
+      0C0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C
+      0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0E0E0E0E0E0E0E0F1617171717171300000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000B101717171717171715
+      110E0F0E0E0E0F0E0E0E0E0E0D0E0D0E0D0E0D0D0D0E0D0D0E0E0E0F0E0E0E10
+      161717171713000000000000000000000000000000000000000000000000000C
+      17171717140E0F0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C
+      0D0D0D0D0C0D0D0D0D0C0D0E0F0E0E0F171717170C0000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000010171717160E0E0F0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D
+      0D0D0D0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0E0E0E0F0E0E0E0E0F
+      0E0E0E0E0E0E0D0D0D0D0C0D0D0C0D0D0D0C0D0D0D0D0C0D0C0D0C0D0C0D0D0C
+      0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0F0E0F0E0F0E
+      0F151717171717140B0000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000C131717171717171715100E0F0E0E0E0F0E0E0F
+      0E0E0D0E0D0D0E0D0E0D0D0E0E0E0E0E0F0E101617171717140B000000000000
+      000000000000000000000000000000000000000013171717170F0E0E0F0E0E0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0C0D0E
+      0E0E0F10171717170B0000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000D17171717100E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D
+      0E0E0E0E0D0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0E0D0E0D0E0D0E0D0D0D0D0D0E0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0E0E0E0E0D0E0D0E0D0D0C0D0D0D0D0D0C
+      0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0D0C0D0C0C0D0C0D0C0D0C0D0C
+      0D0C0D0C0D0C0D0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0E0E0E0F131717171717160B0000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000D151717171717171715100E0F0E0E0E0F0E0E0E0E0E0E0D0D0E0D0D0E0D
+      0E0E0F0E0E0F1517171717140B00000000000000000000000000000000000000
+      00000000000000000C17171717150E0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0C0D
+      0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0D0D0C0D0F0E0E0E111717171700000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000B16171717110E0F
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E
+      0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0E0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D
+      0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0C0D0C0C0C
+      0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0E0F0E0F0E0E0E131717171717160E00000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000B0F16171717171717
+      1714100E0F0E0E0E0F0E0E0E0E0E0E0D0E0D0E0E0F0E0E0E0F1517171717160B
+      0000000000000000000000000000000000000000000000000000000000131717
+      1717100F0E0F0E0E0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D
+      0D0C0D0D0D0C0D0E0F0E0E131717171700000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000014171717150E0E0F0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0E
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0C0D0C0D0C0D0C0D0D0C0D0C0D0C0D
+      0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0E0F0E0E
+      1116171717171600000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000B10171717171717171715100E0F0E0E0F0E0F
+      0E0E0E0E0E0E0E0E0E0E0F0E1517171717150C00000000000000000000000000
+      00000000000000000000000000000000000C17171717150E0E0E0E0E0D0D0D0D
+      0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0E0E0F0E13
+      1717171300000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0010161717170F0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E
+      0E0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0D0E0D0D0E0D0D0E0D0E0D0E0D0E0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C
+      0D0D0D0D0D0C0D0C0D0D0C0D0C0D0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0D0C0C0C0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0E0F0E0E0F17171717130000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000B11171717171717171716100F0E0E0E0E0F0E0F0E0E0E0F0E0F0E0E14
+      17171717170C0000000000000000000000000000000000000000000000000000
+      0000000000001317171717100E0F0E0E0E0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D
+      0C0D0D0D0C0D0D0D0C0D0D0D0D0C0E0E0E0E0E15171717130000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000C17171717110E0F0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0D0E0E0D0E0D
+      0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0E
+      0D0E0D0D0D0D0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0C0D0D0C0D0C0D0D
+      0C0D0D0C0C0C0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0D0C0C0D0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0D0F0E0E0E0F0F171717170E0000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000B111717171717
+      17171716130F0F0E0E0E0E0E0F0E0E0E0E0E1317171717170E00000000000000
+      00000000000000000000000000000000000000000000000000000B1717171715
+      0E0E0F0E0E0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D
+      0D0C0E0E0F0E0E15171717110000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000016171717140E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0D0E0E0E0D0E0D0E0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0D0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0E0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D
+      0D0D0C0D0D0D0C0D0D0D0D0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C
+      0D0C0D0C0D0C0D0C0C0D0C0C0D0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0F0E0E131717
+      17170B0000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000B1117171717171717171714100F0E0F0E
+      0E0E0F0E0F1117171717170E0000000000000000000000000000000000000000
+      0000000000000000000000000000001117171717100E0E0E0F0D0D0D0D0D0D0D
+      0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0D0E0E0E0F0E1616171710
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000001117
+      1717160F0E0E0E0E0F0E0F0E0F0E0F0E0F0E0E0F0E0F0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0D0E0D0E0E0E0D0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D
+      0C0D0D0C0D0D0C0D0D0C0D0C0D0C0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0F0E161717171300000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000B1116171717171717171716130F0E0F0E0E0E1117171717171100
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000B17171717150E0F0E0E0E0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D
+      0D0D0C0D0D0D0D0E0E0E0E0F0E0E0E1717171710000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000D17171717110E0F0E0E0E0F0E0E
+      0E0E0E0E0E0F0E0E0E0E0E0F0E0F0E0F0E0F0E0F0E0E0E0E0D0E0E0D0E0E0E0D
+      0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D
+      0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0C0D0C0D0C0D0C0D0D0C0D
+      0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0D0C0C0D0C0C0D0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D
+      0E0F0E0E10161717170E00000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000B0F151717
+      1717171717171715110F0E101617171717110000000000000000000000000000
+      0000000000000000000000000000000000000000000000001117171717100E0E
+      0F0E0E0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0C0D0E0D0E0E0E0E0E0F0E0E
+      0E0F0E171717170C000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000016171717150F0E0E0F0E0E0E0F0E0F0E0F0E0E0E0F0E0F0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E
+      0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C
+      0D0D0D0D0C0D0D0C0D0C0D0D0C0D0D0C0D0C0C0C0C0D0C0D0C0D0C0D0C0D0C0D
+      0C0D0C0C0C0C0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0E0F13171717170B0000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000E14171717171717171717171516
+      1717171713000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000B17171717150E0E0E0E0E0D0D0D0D0D0D0D0C0D
+      0D0D0C0D0D0D0E0E0E0E0E0E0F0E0F0E0E0E0E0F0E0E10171717170C00000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000001117171717
+      1717171715151514131313101010100E0E0E0E0F0E0F0E0F0E0F0E0F0E0E0E0E
+      0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E
+      0D0D0E0D0D0D0E0D0D0D0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0D0D0C0D0D0C0D
+      0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0D0C0C0D0C0C0D0C0C
+      0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0E0E0F0E0E1617171713000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000C1115171717171717171717171717140B00000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      001117171717100F0E0F0E0E0D0D0D0D0D0D0D0D0E0E0E0E0E0E0E0E0F0E0F0E
+      0E0E0E0F0E0F0E0E0E1113171717170B00000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000D17171717171717171717171717171717
+      17171717171716151514131313100E0E0E0F0E0E0D0E0E0D0E0E0D0E0D0E0D0E
+      0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0E0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0C0D0D0D0C0D0D0D0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C
+      0D0C0D0C0D0C0D0C0D0C0C0C0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0F0E0E10
+      171717170E000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000B0E
+      14171717171717171717140B0000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000B17171717150E0E0E0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0F0E0F0E0E0E0E0E0E0F0E0E0E0E0F111417171717
+      1717170000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000016171717171717171717171717171717171717171717171717171717
+      17160F0E0E0E0E0E0E0E0D0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D
+      0D0D0C0D0D0C0D0C0D0D0C0D0D0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0D0C0C0C
+      0C0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0E0F14171717160000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000B10151617171717160C00
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000001117171717100E0F0E0E0E0E0E0E0F0E0F0E0F0E0E0E
+      0E0E0F0E0F0E0F0E0E0F11141617171717171717171716000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000001017171717171717
+      17171717171717171717171717171717171717171717130E0F0E0E0E0E0D0E0E
+      0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0D0E0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0C0D0C0D0D0C0D0C0D0C
+      0C0C0C0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0C0C0D0C0C0D0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0E0F0E0E0F16171717110000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000C101517160B0000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000B17
+      171717150E0E0F0E0F0E0F0E0E0E0E0E0E0F0E0F0E0E0E0E0E10131416171717
+      1717171717171717171711000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000B0C0C0C100F101013131415171717171717
+      17171717171717171717160F0E0F0E0E0E0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E
+      0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C
+      0D0D0D0D0C0D0D0D0C0D0D0C0D0C0D0D0C0D0D0D0C0D0C0D0C0D0C0D0C0D0C0D
+      0C0D0C0D0C0C0D0C0C0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0F0E11171717170C
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000C0C000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000001117171717100E0E0E0E0E0E0E
+      0F0E0F0E0E0E0E0F10131415171717171717171717171717171716130E0B0000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000C0C0C0D100F101114141717171714
+      0E0E0F0E0E0E0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0C0D0D
+      0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0D0C0D0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0E0F0E0E0E161717171500000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000B17171717150F0E0F0E0F0E0E101011131415171717171717
+      171717171717171717171714100D000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000001417171717100E0E0F0E0E0E0D0E0E0D0E
+      0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0E
+      0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0D0D0C0D0C0D0D0C0D0C0D0D0C0C0D0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0D0C0C0C0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0E0E
+      0F10171717170F00000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000011171717
+      17141314151517171717171717171717171717171717171717171715110E0B00
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000C17171717150E0E0E0E0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D
+      0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C
+      0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0F0E0F0E0E15171717150B0000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000B171717171717171717171717171717
+      171717171717171717171714100E0B0000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000001317171717110F0E
+      0F0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E
+      0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0D0D0C0D0C0D0D0C0D0D
+      0C0D0D0C0C0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0D0C0D0C0C0D0C0D0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0D0E0E0E0E101717171711000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000011171717171717171717171717171717171717171713110F0C0000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000B17171717160F0E0E0E0F0E0E0D0E0D0E0D0E0D
+      0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0E0D0E0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C
+      0D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0D0C0C0D0C0D0C0D0C0D0C0D
+      0C0D0C0D0C0D0C0C0C0C0C0C0D0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0F0E0F0E14171717
+      170B000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000B151717171717
+      17171717171717151311100C0B00000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      001016171717140E0F0E0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0D0D0E0D0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D
+      0D0C0D0C0D0C0D0C0D0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0D0C0D0C0D0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0D0E0E0E0E0F17171717130000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000010161715131411100F0D0C0B000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000001517171717100E0E0F0E
+      0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D
+      0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0C0D0C0D0D0C0D0D0C0D0C0D0C
+      0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0C0C0C0C0D0C0D0C0C0C0C0C0C0C0C
+      0C0C0C0C0E0E0F0E0E0E0E0D0D0D0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0F
+      0E0F0E14171717170C0000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000F17171717110F0E0E0E0E0E0D0E0D0E0D0E0D0E0D0E
+      0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D
+      0D0C0D0D0D0D0D0C0D0D0C0D0C0D0C0D0C0D0C0C0D0C0D0C0D0C0D0C0D0C0D0C
+      0C0D0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0F0E0E0E0F0E0E0E
+      0F0E0E0E0E0E0E0D0D0D0C0C0C0C0C0C0C0D0E0E0E0E0F171717171300000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000000000000110B0000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000001517
+      1717160F0E0E0F0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0C0D0C0D0D
+      0C0D0D0C0D0C0D0C0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0C0C0C0C0C0D0C0D
+      0C0C0C0C0C0C0C0C0C0C0E0E0E0E0F0E0E0E0F0E0E0E0F0E0E0E0E0F0E0E0E0E
+      0E0E0E0D0D0F0E0F0E0E14171717170C00000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000BF3F3070F000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000E17171717130E0E0F0E0E0E0D0E0D
+      0E0D0E0D0E0D0E0D0D0D0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D0D0D0E0D0D0D
+      0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0C0D0C0D0D0C0D0D0C0D0C0D0C0C0C0C
+      0C0C0C0C0C0C0C0D0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0E
+      0F0E0E0E0F0E0E0E0F0E0E0F0E0F0E0E0E0F0E0F0E0E0E0E0E0E0E0E0F0F1717
+      1717130000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000E93D3F3F3140000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000013171717160F0E0E0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C
+      0D0D0C0D0C0D0D0C0D0C0D0C0D0C0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C
+      0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0D0E0F0E0E0E0F100F0F0E0E0E0F0E0E
+      0E0E0E0F0E0E0E0E0E0F0E0F0E0F0E0E0E15171717170C000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000096F3E90B0000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000C17171717130E0F
+      0E0F0E0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D
+      0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0D0D0C0D0D0C0D0C0D0D0C0D
+      0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0D0C0C0C0D0C0C0C0C0C0C
+      0C0C0C0D0E0E0E0E0F0E15171717161514131110100E0E0E0F0E0F0E0E0E0F0E
+      0E0E0F0E10171717171300000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000EF3F3170000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000013171717170F0E0E0E0E0E0D0E0D0E0D0E0D0E0D
+      0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0D0D0E0D0D0E0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D
+      0D0C0D0D0D0D0C0D0D0C0D0C0D0C0D0D0C0D0C0D0C0C0D0C0D0C0D0C0D0C0D0C
+      0D0C0D0C0C0C0C0D0C0C0C0D0C0C0D0C0C0C0C0C0C0C0C0E0E0F0E0E0E141717
+      17171717171717171717171514131110100E0E0E0F0E0E0E16171717170B0000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000D3F3910000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000000000000000C
+      17171717140E0F0E0F0E0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0D0D0C0D0D
+      0C0D0C0D0C0D0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0C0D0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0E0E0F0E0E0F11171717171717171717171717171717
+      1717171717171715141313131717171711000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00001A1A1100000000000011F81A00000000000E1A9607961A140B000000171A
+      17000000000011F81A00000000000E1A1A0D0000000000000B1791079891170B
+      0000000000000011F811000E1A96071A0E00000000000007F307000000000000
+      11F80798931A1100000000000000171A079891170B000000000B1998981A0000
+      0F19960793190B00000000000000000000171A1A1A1A1A1A1A1A1A1700000000
+      0011F8190000000000000000000B199307981A90191717171792920E0E0E0E0D
+      0E0D0E0D1491910E0D0E0D0D0E1991170E0D0E0D0D0E0D0D11F896CF93170D0D
+      0D0E0D0D0D0D0D139197CF91130D0D0D0D0D0D0D0D0D1995CF93150D0D91910D
+      0C0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0D0C0D0C0D0D0C0D0D0C0D0C0D0C0D0C
+      0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0C0D0C0C0C0D0C0C0C0C0C0C0C0C0E0E0E
+      0E0E0F1017171717171717171717171717171717171717171717171717171717
+      1717171600000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000F3F31A00000000000007
+      F3960000000B92F3F3F3F3F3F3F39200000007F39800000000001AF3F3000000
+      000011F3F311000000000017E9F3F3F3F3F3F3E91A0000000000001AF31A17F3
+      F3F3F3F3F391000000000007F398000000000E98F3F3F3F3F3F3F31400000000
+      14F0F3F3F3F3F3F31A0000000BF0F3F3F3F3000FF3F3F3F3F3F3E91700000000
+      000000000007F3F3F3F3F3F3F3F3F3980000000000D3F3F30F00000000000000
+      19E9F3F3F3F3F3F3E817171492F3F30E0E0E0D0E0D0E0D0E96F3F3130E0D0E0D
+      0DF0F3E80D0D0D0E0D0D0E1AF0F3F3F3F3F3E8140D0D0D0E0D0F93F3F3F3F3F3
+      F3CF0F0D0D0D0D0D13D2F3F3F3F3F39717F3F30D0D0D0C0D0D0D0C0D0D0D0D0C
+      0D0D0D0C0D0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C
+      0C0C0D0C0C0D0C0C0C0C0C0C0C0C0C0C0E0E0F0E0F0E0F1717171717110E1011
+      1315171717171717171717171717171717171717171717100000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000F3F31A00000000000BF3F31900000007F3F31A0E0000
+      11191100000007F39800000000001AF3F3000000000011F3F3110000000093F3
+      F3071400000F92F3F3D00B000000001AF3E9F39610000E1AF3F3910000000007
+      F3980000000BF0F3E9170B000B13910B00000014F3F3D3170B000E160F000000
+      19F3F316000E000007170D000E93F3E90E000000000000000007F3D011131111
+      131111100000000011F3F3F3930000000000001AF3F396100000179393161710
+      92F3F30E0E0E0E0D0E0D0E0DE8F0F3930E0D0D0E17F3F3F3110D0E0D0E0D91F3
+      F393100D15D2F3F0130E0D0D0DCFF3F01A0F0D19E9F3D20F0D0D0D0FE8F3F019
+      0D0E19F0E8F3F30D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0C0D0D0C0D0C0D0C
+      0D0D0C0C0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0C0C0D0C0D0C0C0C
+      0C0C0C0E0E0E0E0F0E0F171717171713000000000000000B0C0E101113151717
+      1717171717171717171715000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000000000000F3F3
+      1A000000000011F3F30F000017F3F3110000000000000000000007F398000000
+      00001AF3F3000000000011F3F3110000001AF3F31A00000000000011F0F39600
+      0000001AF3F396000000000019F3F30D00000007F39800000093F3E90B000000
+      0000000000000BF0F3D00B00000000000000000096F3D0000000000000000000
+      000BF3F319000000000000000007F30700000000000000000000000093F393F3
+      E90B000000000EF3F31A0000000B17171717150E92F3F30E0E0D0E0D0E0D0E13
+      F3CFD2E80E0D0E0D96F393F31A0E0D0D0D11F3F3910D0E0D0D0FD2F3E80D0D0D
+      19F3F3150D0D0D0D13F0F3960D0D0D91F3F3130D0D0D0D15F3F3F30D0D0D0C0D
+      0D0D0C0D0D0D0C0D0D0D0D0D0C0D0C0D0D0C0D0D0C0D0C0D0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0D0C0C0D0C0C0D0C0C0C0C0C0C0C0C0C0C0E0E0F0E0E0E10161717
+      1717140B0000000000000000000000000000000B0C0E10111315171717170D00
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000F3F31A00000000001AF3E9000000
+      D0F393000000000000000000000007F39800000000001AF3F3000000000011F3
+      F31100000EF3F396000000000000000019F3F3110000001AF3F30E0000000000
+      00D3F39100000007F39800000BF3F3170000000000000000000017F3F3110000
+      000000000000000007F307000000000000000000000BF3F31A00000000000000
+      0007F39800000000000000000000000BF0F31197F3170000000091F3D3000000
+      001016171717100E92F3F30E0E0E0D0E0D0E0D92F39193F3130E0D0DF0F311F3
+      D20D0E0D0E93F3E90D0D0D0D0D0D15F3F3170E0DD2F3970D0D0D0D0D0D91F3F3
+      0F0D0DE8F3960D0D0D0D0D0D97F3F30D0D0D0D0C0D0D0D0D0C0D0D0D0C0D0D0C
+      0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0C0C0C0C
+      0C0C0C0C0D0C0C0C0D0E0E0E0E0F0E0F1517171717150B000000000000000000
+      0000000000000000000000000000000B0C0C0000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000F3F31A000000000007F396000000F3F317000000000000000000
+      000007F39800000000001AF3F3000000000011F3F311000091F3F30E00000000
+      0000000000D0F3960000001AF3F30000000000000093F30700000007F3980000
+      11F3F30E0000000000000000000091F3D3000000000000000000000007F39800
+      00000000000000000E96F3F30F000000000000000007F3980000000000000000
+      00000017F3E90017F3D00000000007F3930000000B15171717160E0E92F3F30E
+      0D0E0D0E0D0E0DD2F31717F3930D0E13F3970EE8F3100E0D0DCFF3960D0D0D0E
+      0D0D0DF0F3930D0DF3F3190D0D0D0D0D0D13F3F3170D0FF3F3180D0D0D0D0D0D
+      91F3F30D0D0C0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0C0D0D0C0D0D0C0D0C0D0C
+      0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0D0C0C0C0C0C0C0D0E0F0E
+      0E0E0F1517171717160B00000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000F3F31A000000
+      000EF3F317000011F3F31911111311111311110E000007F39800000000001AF3
+      F3000000000011F3F3110000D0F3960000000000000000000019F3F30B00001A
+      F3F3000000000000001AF3E900000007F39800001AF3F3111311111311111311
+      0B0007F307000000000000000000000007F3980000000000000011F7F3F3F31A
+      00000000000000000007F3980000000000000000000000D0F3910000E9F30F00
+      0000F3F3931113111791909091160E0E92F3F30E0D0E0D0E0D0E11F3F30F0EF0
+      E80D0D93F3F80D96F3F80D0E0DF3F3910E0D0D0D0D0E0DCFF3CF0D15F3F3150D
+      0D0D0D0D0D0DF3F3910D15F3F3150D0D0D0D0D0D91F3F30D0D0D0D0C0D0D0D0C
+      0D0D0D0D0C0D0D0D0C0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D
+      0C0D0C0C0C0D0C0C0C0C0D0C0C0C0C0C0C0E0E0F0E0F1617171717150C000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000F3F31A0000000B97F3D30B000013F3F3F3F3
+      F3F3F3F3F3F3F31A000007F39800000000001AF3F3000000000011F3F311000B
+      F3F319000000000000000000000FF3F31100001AF3F3000000000000001AF3F3
+      00000007F39800001AF3F3F3F3F3F3F3F3F3F3F3110096F30700000000000000
+      0000000007F39800000000000093F3F3F398110000000000000000000007F398
+      000000000000000000000EF3F30F000093F393000000F3F3F3F3F3F3F3F3F3F3
+      F3CF0F0E92F3F30E0D0E0D0E0D0E1AF3D20E0D97F3140DE8F3110D17F3D20E0D
+      0DF3F3910D0D0D0D0D0D0DCFF3CF0D15F3F3150D0D0D0D0D0D0DF3F3910D15F3
+      F3150D0D0D0D0D0D91F3F30D0D0C0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0C0D0C
+      0D0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0C0C0C0C0C0C0D0C0C0C0C
+      0C0C0C0C0C0E0E0E0E0E16171717160C00000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000F3F3071A1A92D3F3E91000000000F3F3931A1A1A1A1A1AF3F31A000007F3
+      9800000000001AF3F3000000000011F3F3110013F3F311000000000000000000
+      0000F3F31900001AF3F30000000000000093F3D000000007F398000011F3F31A
+      1A1A1A1A1A93F3F31100F8F3E9000000000000000000000007F3980000000000
+      91F3F3961000000000000000000000000007F3980000000000000000000091F3
+      D300000014F3E90B000007F3981A1A92969697E8F3CF0E0E92F3F30F0E0D0E0D
+      0E0D97F3910E0D19F39313F3D20D0E0FF3F3110D0ECFF3960D0E0D0E0D0D0EE9
+      F3960D0DF3F3190D0D0D0D0D0D13F3F3190D0DF3F3190D0D0D0D0D0D91F3F30C
+      0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0D
+      0C0D0C0D0C0D0C0D0C0C0D0C0C0C0C0C0C0C0D0C0C0C0C0C0C0E0E0F0E0E1417
+      1717140000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000F3F3F3F3F3F3F3F31A00
+      00000000D0F31A00000000000BF3F311000007F3D3000000000091F3F30B0000
+      000017F3F30E0011F3F3110000000000000000000000F3F31A00001AF3F31100
+      0000000000D3F39300000007F39800000BF3F311000000000014F3F300000FF3
+      F3110000000000000000000007F3980000000000E9F396000000000000000000
+      000000000007F3E907980798079891000000E9F31A00000000E9F317000091F3
+      07000015171717E8F3920E0F91F3F3190E0D0E0D0E0FF3F3150E0D0FF3D290F3
+      910E0D0DCFF3F80D0D93F3F00D0D0D0D0D0D15F3F3190D0DD2F3970D0D0D0D0D
+      0D91F3F3110D0DD2F3970D0D0D0D0D0D96F3F30D0D0C0D0D0D0C0D0D0D0C0D0D
+      0D0D0C0D0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0C0D
+      0C0D0C0D0C0C0C0C0C0C0C0C0C0D0E0E0F0E11171717170B0000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000F3F39311131119D3F3D00B00000017F3E90B00000000
+      19F3E900000007F3F31900000000D3F3F31A0000000007F3D3000011F3F31100
+      00000000000000000000F3F31A00001AF3F3D0000000000019F3F31100000007
+      F39800000093F307000000000096F39600000007F3D30B000000000000000000
+      07F3980000000000E9F31A000000000000000000000000000007F3F3F3F3F3F3
+      F3F307000014F3F30E0000000093F3D000000EF3F3110E1717171AF3F3140E0E
+      92F3F3F0110E0D0E0D17F3F30E0D0E0D97F397F3130E0D0E1AF3D20E0D11F3F3
+      910D0D0D0E0DCFF3F00D0D0D19F3F3150D0D0D0D0FF0F3970D0D0D19F3F3150D
+      0D0D0D13F3F3F30D0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0C0D0C0D0C0D0D0C
+      0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0C0C0C0D0C0D0C0C0C0C0C
+      0C0C0F0E0E0F0F171717170D0000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000000000000F3F3
+      F8000000000BD0F3070000000096F3D011000019F3F31800000007F3E9E9190B
+      0E93F3F393F31A0B0BF8F3F31A000000F3F319000000000000000000000EF3F3
+      1100001AF3F3D3D011000E1AF3F3960000000007F3980000000BE8F3960E000B
+      F7F3F30F0000000EE9F3D3170B000E160F000F13D0F3D01113110B0092F3E914
+      000E161700000000000000000007F39800000000000000000096F3D000000000
+      000FF3F30E000019F3E991171790F1F3980E0F0E92F3D2F0F093910E0D96F397
+      0E0D0D0E19F3F3E80D0D0D0D13F3F3110D0D19F3F393110D13CFF3F3170D0D0D
+      0D96F3F01A0F0D17E8F3F0110D0D0D0DCFF3F0190E0F18F0F3F3F30D0D0C0D0D
+      0D0C0D0D0D0C0D0D0D0C0D0C0D0D0C0D0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0D0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0F0E0E1617171710
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000F3F31A000000000010F3F30F0000
+      000093F3F3F3F3F3F3910000000007F31A93F3F3F3F3F393001AF3F3F3F3F307
+      00000000D3F3930000000000000000000017F3F30D00001AF3F30FE8F3F3F3F3
+      F3070B0000000007F398000000000BD0F3F3F3F3F3E91700000000000E98F3F3
+      F3F3F3F3190007F3F3F3F3F3F3F311000B07F3F3F3F3F3D00000000000000000
+      0007F39800000000000000000EF3F318000000000000D3F39100000017F3F3F3
+      F3F3F3CF100E0E0E91F39317F3F3F30E0DF0F3900E0D0E0D0FF3F3930D0E0D0E
+      0DE8F3F80E0D0D19F0F3F3F3F3F3F0170D0D0D0D0D0D93F3F3F3F3F3F3D2130D
+      0D0D0D0D0FCFF3F3F3F3F3D293F3F30C0D0D0D0C0D0D0D0C0D0D0D0C0D0D0C0D
+      0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0D0C0C0C0D0C0C
+      0C0C0C0C0C0C0C0C0C0C0E0E0E0E0F1417171714000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000F3F31A000000000000F3F31A00000000000F929898910F000000
+      0000171A0E0011929893110000000F92989317000000000091F3E90B00000000
+      000000000096F3D30000001AF3F3000B1793079111000000000000171A170000
+      0000000014F79898190D00000000000000000FF8930793190F00171AD3F3D31A
+      1AF80E00000011929896190D00000000000000000007F3980000000000000000
+      0FF81A0E00000000000014F819000000001695D2D2CF180E0F0E0E0E1691150E
+      1196CF0E119191110E0D0D0D0D1991110D0E0D0D0E1991170D0D0D0D0F1993CF
+      93190F0D0D0D0D0D0D0D0D111A96CF91170D0D0D0D0D0D0D0D0D1593CF96180D
+      91F3F30D0D0C0D0D0D0C0D0D0D0C0D0D0C0D0D0C0D0C0D0C0D0D0C0D0C0D0C0D
+      0C0D0C0D0C0D0C0D0C0D0C0C0C0C0C0D0C0C0D0C0D0C0C0C0C0C0C0C0C0C0D0E
+      0F0E0E11171717170B0000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000F3F31A000000
+      00000BF3F31A0000000000000000000000000000000000000000000000000000
+      0000000000000000000000000EF3F31A000000000000000011F3F31A0000001A
+      F3F3000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000007F30700000000000000000000000000
+      00000000000000000007F3980000000000000000000000000000000000000000
+      000000000C17171717140E0E0E0F0E0E0D0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D
+      0E0D0D0E0D0D0E0D0D0D0D0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D91F3F30C0D0D0DCF150D9118
+      0DD2190CCF150D0C0D0D0C0D0C0D0C0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C
+      0C0C0C0C0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0E0E0F0E10161717170D000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000F3F31A000000000017F3F30F000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      001AF3F3110000000000000BE8F3D30B0000001AF3F300000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000007F3980000000000000000000000000000000000000000000007F398
+      00000000000000000000000000000000000000000000000013171717170F0E0F
+      0E0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D
+      0E0D0D0D0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D91F3F30D0D0C0DCF150D919110CF970DCF150D0C0D0C0D0D
+      0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0D0C0D0C0D0C0C0D0C0D0C0C0C0C0C
+      0C0C0C0C0C0C0C0E0E0E0E0E1717171710000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000F3F31A0000000017E9F3D000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000093F3F31A0B00000014F0
+      F3E910000000001AF3F30000000000000000000000000091F391000000000000
+      000000000000000000000000000000000000000000000000000F170000000000
+      000000000000000000000000000000000007F398000000000000000000000000
+      00000000000000000000000B17171717160F0E0E0E0F0E0E0E0D0E0D0E0D0E0D
+      0E0D0E0D0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0D0D0E0E0E0F0E0E0F0E0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D91F3F30C
+      0D0D0DCF150D1A911A1A9710CF100D0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C
+      0D0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0F0E0E
+      1417171714000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000F3F3F3079807F3F3F3D0
+      1000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000001AF3F3F30798E9F3F3D01000000000001AF3F30000
+      0000000000000000000000F3F3F3000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000007F3F3F3F3F3F3F3F3F3110000000000000000000000000000000B
+      1517171717150F0E0E0E0E0E0E0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D
+      0E0D0D0D0D0E0D0E0D0E0E0E0E0E0E0F0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D91F3F30D0C0D0DCF150D1591D210191A
+      F30D0C0D0D0C0D0C0D0D0C0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0D0C0D0C0C
+      0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0D0E0E0F0E11171717170B000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000009307D0F3F3F3D0961700000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0E9198E9F3D39617000000000000001AF3F3000000000000000000000000001A
+      F31A000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000091079807980798
+      0798070F000000000000000000000000000000000C1517171717150F0E0F0E0E
+      0F0E0D0E0D0E0D0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0E0D0D0D0E0E0E0F
+      0E0F0E0E0E0F0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D91F3F30C0D0D0DCF150D1596D20C0F07F30D0C0D0C0D0D0C0D0C0D0C
+      0C0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0F0E0E0F0F171717170D000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000001798070000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000C1517171717150F0E0E0F0E0E0E0E0D0E0D0E0D0E0D0D
+      0E0D0D0E0D0D0E0D0D0E0D0E0D0D0E0E0F0E0E0E0F0E0E0F0E0E0E0F0E0E0E0E
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D18CFCF0D0D1891E8
+      969117E8180D0C96E90D0D0C0D0C0D0D0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0D
+      0C0C0C0C0C0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0F0E0E161717
+      1710000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000D17
+      17171717150F0E0E0E0F0E0E0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0D0D0D
+      0E0E0E0E0E0F0E0E0E10130F0E0F0E0E0E0F0E0E0F0E0E0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D13151515150E150F0C0D10130D0C0D
+      0D0C0D0C0D0D0C0D0C0D0C0D0C0D0C0D0C0D0C0C0D0C0D0C0D0C0D0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0E0F141717171400000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000E1717171717150F0E0E0E0E0E
+      0E0E0D0E0D0E0D0E0D0D0E0D0D0E0D0D0E0D0E0E0E0E0F0E0E0E0F0E13171717
+      140F0E0F0E0E0E0F0E0E0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C
+      0D0D0C0D0D0C0D0D0C0D0D0D0D0D0C0D0C0D0D0C0D0D0C0D0C0C0D0C0D0C0D0D
+      0D0C0D0C0D0C0D0C0C0C0C0C0C0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0D0E0F0E0E11171717170B000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000E1717171717150F0E0F0E0E0E0E0E0D0E0D0D0D0E0D0D0E
+      0D0D0E0D0D0E0E0E0E0F0E0E0F0E1016171717171717130F0F0E0E0E0E0F0E0E
+      0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0D0C0D0D
+      0C0D0D0C0D0C0D0C0D0C0D0C0D0C0C0D0E0E0E0E0E0D0C0D0C0D0C0D0C0C0D0C
+      0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0F0E10161717170D00
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000000000000000000E1717
+      171717150F0E0E0F0E0E0E0E0D0E0D0E0D0E0D0D0E0D0D0E0E0E0E0F0E0E0E0F
+      0E141717171717171717171715110E0F0E0E0F0E0F0E0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0C0D0D0C0D0D0D0C0D0D0D0D0C0D0D0C0D0C0D0D0C0D0C0D0D0D
+      0E0E0E0E0E0E0E0F0E0E0D0C0C0C0D0C0D0C0C0C0D0C0C0C0C0C0D0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0C0E0E0E0E0E171717171000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000E1717171717150F0E0E0E0F0E0E
+      0E0E0D0D0D0D0E0D0D0E0E0E0E0F0E0E0E0F0E11161717171717171717171717
+      171716130F0E0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D
+      0D0D0D0C0D0D0D0D0D0C0D0D0C0D0E0D0E0E0E0E0E0E0F0E0F0E0E0E0F0E0E0D
+      0D0C0C0D0C0C0D0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0F
+      0E0E141717171400000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000E171717171716100E0E0E0F0E0E0E0E0D0E0D0D0E0D0E0E0E
+      0E0E0E0F0E0F15171717171717160F13171717171717171717130F0E0F0E0E0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0C0D0D0D0E
+      0E0F0E0E0E0F0E0F0E0E0E0E0E0F0E0E0E0E0F0E0D0D0C0C0C0C0C0C0C0D0C0C
+      0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0D0E0E0F0E11171717170B00000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000000000E171717
+      171716100F0E0E0E0F0E0E0E0D0E0D0E0E0E0F0E0F0E0E0E1317171717171717
+      110B00000C1317171717171717150E0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0C0D0D0D0D0C0D0D0D0D0C0D0D0C0D0E0E0E0E0E0F0E0E0E0E0F0E0F0E
+      0E0E0F0E0F0E0E0E0E0D0D0C0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0F0E0E0F0F171717170D00000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000E161717171717110E0F0E0E0E0E0E
+      0E0D0E0E0F0E0E0E0E0F1016161717171717150C0000000000000B1016171717
+      17170E0F0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D
+      0D0D0D0D0C0D0E0F0E0F0E0E0E0F0E0E0E0E0F10131517110E0E0F0E0F0E0D0C
+      0C0C0C0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0F0E0E16
+      1717171000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000C151717171717140E0E0F0E0E0F0E0E0F0E0E0E0F0E0F131717
+      171717171710000000000000000000000B0F171717170F0E0F0E0E0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0D0D0C0D0D0C0D0E0E0E0E0E0E0F
+      0E0E10131415171717171717110E0E0E0E0E0E0E0C0D0C0C0D0C0C0C0C0D0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0C0C0E0E0E0E0F14171717140000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000
+    }
+    Transparent = False
+  end
+  object Label1: TLabel
+    Left = 8
+    Height = 17
+    Top = 254
+    Width = 463
+    Caption = 'Copyright RemObjects Software, 2002-2008. All rights reserved.'#10
+    Font.Color = clWhite
+    Font.Height = -9
+    Font.Name = 'Tahoma'
+    ParentColor = False
+    OnClick = OnCloseClick
+  end
+  object lbl_Version: TLabel
+    Height = 16
+    Top = 31
+    Width = 500
+    Alignment = taCenter
+    AutoSize = False
+    Caption = '[]'
+    Font.Color = clWhite
+    Font.Height = -13
+    Font.Name = 'Tahoma'
+    ParentColor = False
+  end
+  object Label7: TLabel
+    Left = 8
+    Height = 17
+    Top = 280
+    Width = 138
+    Caption = 'Visit our website at'
+    Font.Color = clWhite
+    Font.Height = -9
+    Font.Name = 'Tahoma'
+    ParentColor = False
+  end
+  object Label3: TLabel
+    Cursor = crHandPoint
+    Left = 152
+    Height = 17
+    Top = 280
+    Width = 198
+    Caption = 'http://www.remobjects.com'
+    Font.Color = clWhite
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    Font.Style = [fsUnderline]
+    ParentColor = False
+    OnClick = Label3Click
+  end
+  object btn_Cancel: TButton
+    Left = 418
+    Height = 25
+    Top = 272
+    Width = 77
+    Cancel = True
+    Caption = 'btn_Cancel'
+    Default = True
+    Font.Color = clWhite
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    OnClick = OnCloseClick
+    TabOrder = 0
+  end
+end
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWAbout.lrs b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWAbout.lrs
new file mode 100644
index 0000000..f99e3a5
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWAbout.lrs
@@ -0,0 +1,5159 @@
+{ This is an automatically generated lazarus resource file }
+
+LazarusResources.Add('TAboutForm','FORMDATA',[
+  'TPF0'#10'TAboutForm'#9'AboutForm'#4'Left'#3#25#1#6'Height'#3','#1#3'Top'#3
+  +#181#0#5'Width'#3#244#1#18'HorzScrollBar.Page'#3#243#1#18'VertScrollBar.Page'
+  +#3'+'#1#13'ActiveControl'#7#10'btn_Cancel'#11'BorderIcons'#11#0#11'BorderSty'
+  +'le'#7#6'bsNone'#7'Caption'#6#20'About RemObjects SDK'#12'ClientHeight'#3','
+  +#1#11'ClientWidth'#3#244#1#10'Font.Color'#7#7'clWhite'#11'Font.Height'#2#245
+  +#9'Font.Name'#6#6'Tahoma'#7'OnClick'#7#12'OnCloseClick'#8'OnCreate'#7#10'For'
+  +'mCreate'#8'Position'#7#16'poMainFormCenter'#10'LCLVersion'#6#6'0.9.25'#0#6
+  +'TImage'#6'Image1'#6'Height'#3','#1#5'Width'#3#244#1#8'AutoSize'#9#7'OnClick'
+  +#7#12'OnCloseClick'#12'Picture.Data'#10'2N'#2#0#7'TBitmap&N'#2#0'BM&N'#2#0#0
+  +#0#0#0'6'#4#0#0'('#0#0#0#244#1#0#0','#1#0#0#1#0#8#0#0#0#0#0#240'I'#2#0#194#30
+  +#0#0#194#30#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#128#0#0#128#0#0#0#128#128#0#128#0
+  +#0#0#128#0#128#0#128#128#0#0#192#192#192#0#192#220#192#0#240#202#166#0#0#0#0
+  +#0#11#11#11#0#21#21#21#0#27#27#27#0'"""'#0'+++'#0'333'#0';;;'#0#3''#1#0'CCC'
+  +#0'KKK'#0'SSS'#0'[[['#0'```'#0'jjj'#0'rrr'#0'~~~'#0#10#129#3#0#23#133#8#0'$'
+  +#138#13#0','#141#16#0'2'#142#18#0'5'#144#20#0';'#145#22#0'3'#146#29#0'>'#147
+  +#24#0'<'#150'%'#0'7'#152'2'#0'C'#148#25#0'I'#150#27#0'M'#152#28#0'S'#153#30#0
+  +'D'#151'#'#0'W'#155' '#0'\'#156'"'#0'S'#156')'#0'D'#157'7'#0'b'#159'$'#0'O'
+  +#160';'#0'e'#160'%'#0'h'#161'&'#0'l'#162'('#0's'#164'*'#0'z'#167'-'#0'}'#168
+  +'.'#0'g'#163'0'#0'k'#164'1'#0'w'#168'6'#0't'#170'?'#0'{'#170'8'#0'B'#159'@'#0
+  +'M'#162'D'#0'['#165'C'#0'b'#167'B'#0'j'#170'E'#0'v'#172'D'#0'o'#177'['#0'x'
+  +#177'T'#0'b'#175'`'#0'g'#176'b'#0't'#181'g'#0''#182'a'#0'}'#186't'#0#128#169
+  +'/'#0#132#170'1'#0#139#172'3'#0#135#174'<'#0#139#175'='#0#145#174'5'#0#148
+  +#176'7'#0#149#176'8'#0#155#178'9'#0#163#181'<'#0#169#182'>'#0#131#178'N'#0
+  +#142#179'I'#0#158#182'E'#0#148#181'K'#0#155#184'N'#0#140#181'R'#0#133#181'Y'
+  +#0#144#185']'#0#162#183'F'#0#174#184'@'#0#163#185'K'#0#168#185'H'#0#179#186
+  +'B'#0#186#188'E'#0#164#187'T'#0#177#191'V'#0#130#186'l'#0#154#188'a'#0#130
+  +#188'v'#0#145#190'q'#0#192#190'G'#0#193#191'H'#0#172#192'^'#0#180#192'W'#0
+  +#190#193'Q'#0#177#194'_'#0#154#194'v'#0#175#195'i'#0#187#197'e'#0#163#197'x'
+  +#0#187#202'w'#0#190#203'x'#0#196#192'H'#0#203#194'K'#0#210#196'M'#0#214#198
+  +'P'#0#216#199'P'#0#220#200'R'#0#226#202'T'#0#232#204'V'#0#236#205'X'#0#240
+  +#207'Y'#0#244#208'['#0#248#209'\'#0#205#203'j'#0#214#203'd'#0#211#205'l'#0
+  +#203#205's'#0#196#205'{'#0#218#210'x'#0#232#207'`'#0#228#208'i'#0#237#211'l'
+  +#0#244#211'e'#0#248#212'f'#0#227#210'r'#0#235#213'u'#0#227#213'|'#0#250#216
+  +'q'#0#250#217'z'#0#130#130#130#0#141#141#141#0#146#146#146#0#157#157#157#0
+  +#129#191#128#0#163#163#163#0#171#171#171#0#180#180#180#0#190#190#190#0#136
+  +#193#131#0#150#198#137#0#152#201#146#0#166#201#132#0#189#205#130#0#191#209
+  +#141#0#161#206#156#0#172#208#154#0#187#210#149#0#184#212#158#0#169#209#162#0
+  +#179#213#166#0#184#215#168#0#190#216#170#0#191#223#191#0#193#210#141#0#211
+  +#213#139#0#192#212#151#0#205#213#146#0#196#213#152#0#204#216#156#0#212#219
+  +#159#0#244#218#130#0#248#220#132#0#240#220#139#0#227#218#144#0#236#221#148#0
+  +#240#223#149#0#236#224#158#0#245#224#151#0#250#226#152#0#194#215#162#0#193
+  +#217#171#0#200#220#174#0#214#220#160#0#218#220#161#0#211#221#168#0#216#223
+  +#170#0#192#222#188#0#208#223#177#0#222#224#172#0#206#225#186#0#211#224#178#0
+  +#217#225#180#0#214#227#189#0#233#226#166#0#245#230#171#0#249#231#172#0#251
+  +#232#173#0#236#229#178#0#245#232#181#0#251#235#183#0#243#234#190#0#252#235
+  +#184#0#196#196#196#0#205#205#205#0#193#223#192#0#212#212#212#0#220#220#220#0
+  +#199#225#194#0#215#230#200#0#209#231#208#0#211#232#208#0#219#234#211#0#226
+  +#231#194#0#228#235#204#0#233#236#206#0#247#236#192#0#251#237#193#0#242#237
+  +#200#0#253#240#204#0#225#236#213#0#236#237#208#0#240#239#209#0#238#240#218#0
+  +#244#240#211#0#250#242#213#0#245#243#221#0#248#244#222#0#227#227#227#0#237
+  +#237#237#0#228#240#224#0#235#242#227#0#242#245#230#0#253#246#224#0#240#247
+  +#239#0#252#248#233#0#241#242#241#0#244#248#240#0#251#250#243#0#255#255#255#0
+  +#0#0#0#0#0#0#0#0#240#251#255#0#164#160#160#0#128#128#128#0#0#0#255#0#0#255#0
+  +#0#0#255#255#0#255#0#0#0#255#0#255#0#255#255#0#0#255#255#255#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#22#23#23#21#14#14#14#14#14#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#14#14#14#14#14#17#23#23#23#23#23#23#23#23
+  +#20#19#17#16#14#12#11#0#0#0#0#11#22#23#23#23#23#21#14#14#14#14#14#14#14#12#13
+  +#13#12#13#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12#13#12#12#12#12#12#12
+  +#12#12#12#12#12#12#13#14#14#14#14#16#23#23#23#23#12#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19#23#23#23#21#14#15#14#14#14#14#13#14#13#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#14#14#15#14#14#14#22#23#23#23#23#23#23#23#23#23#23#23
+  +#23#23#23#23#19#17#15#20#23#23#23#23#21#15#14#15#14#15#14#14#12#13#13#13#13
+  +#13#13#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12#13#13#12#13#12#13#12#13
+  +#12#13#12#13#13#14#15#14#14#19#23#23#23#23#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#13#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#19#23#23#23#20#14#14#15#14#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#14#13#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13
+  +#13#13#13#13#13#13#14#14#15#14#14#17#23#23#23#23#23#23#23#23#23#23#23#23#23
+  +#23#23#23#23#23#23#23#23#23#22#15#14#15#14#14#14#14#13#13#12#13#13#12#13#13
+  +#13#13#12#13#12#13#13#12#13#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12#13
+  +#12#12#13#14#14#15#14#19#23#23#23#20#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#15#23#22#15#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#21#23#23#23#19#14#14#14#14#14#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#14#14#14#15#14#14#22#22#23#23#23#23#23#23#23#23#23#23#23#23
+  +#23#23#23#23#23#23#23#22#16#14#14#14#14#15#13#13#13#13#13#12#13#13#13#12#13
+  +#13#13#13#12#13#12#13#12#13#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12#13
+  +#12#14#14#14#14#14#21#23#23#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#17
+  +#23#23#23#23#22#15#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#23#23#23#23#19#14#15#14#14#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#14#14#14#14#15#14#14#16#16#16#16#19#19#20#21#22#23#23#23#23
+  +#23#23#23#23#23#23#16#14#15#14#15#14#14#13#13#13#12#13#13#13#12#13#13#13#12
+  +#13#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12#12#12#12#12#12#12#12#13#12
+  +#14#14#15#14#14#22#23#23#23#16#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#17#23
+  +#23#23#23#23#23#23#22#15#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#23#23#23#23#16#14#14#15#14#14#13#14#13#14#13#14#13#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#13#13
+  +#13#13#13#13#13#13#14#14#15#14#14#14#15#14#14#14#15#14#14#14#14#14#14#15#16
+  +#19#20#21#23#23#23#17#14#14#14#14#14#14#13#13#12#13#13#13#12#13#13#13#12#13
+  +#13#13#12#13#12#13#13#12#13#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12#12
+  +#13#14#14#14#15#14#23#23#23#23#14#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#20#23
+  +#23#23#23#23#23#23#23#23#23#22#15#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#12#23#23#23#23#16#14#15#14#14#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#14#14#14#15#14#14#14#15#14#14#14#15#14#15#14#15
+  +#14#14#14#15#14#14#16#16#14#15#14#15#14#14#13#13#13#13#12#13#13#13#13#12#13
+  +#13#13#12#13#13#12#13#12#13#13#12#13#13#12#13#13#12#13#12#13#12#13#12#13#12
+  +#13#12#12#14#15#14#14#16#23#23#23#23#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12
+  +#21#22#23#23#23#23#22#23#23#23#23#23#23#23#22#15#11#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#23#23#23#23#15#14#14#14#15#13#14#13
+  +#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#13#13#13#13#13#13#13#13#13
+  +#14#13#13#13#13#13#13#13#13#13#13#13#13#14#14#14#14#15#14#14#14#15#14#14#14
+  +#15#14#14#14#15#14#14#14#14#15#14#14#14#14#14#14#14#13#13#13#12#13#13#13#12
+  +#13#13#13#13#12#13#13#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13
+  +#12#13#12#13#12#13#13#14#14#14#15#17#22#23#23#23#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#12#21#23#23#23#23#23#17#14#17#21#23#23#23#23#23#23#23#22#15#11#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23#14#15#14#14
+  +#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#13#14#13#14#13#14
+  +#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#14#14#14#14#14#15#14
+  +#14#15#14#14#14#14#15#14#14#15#14#15#14#14#14#15#14#15#14#14#14#12#13#13#13
+  +#13#12#13#13#13#12#13#13#13#13#12#13#13#12#13#13#12#13#13#12#13#13#12#13#12
+  +#13#12#12#12#12#12#12#12#13#12#13#15#14#14#14#19#23#23#23#21#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#12#21#23#23#23#23#23#17#14#14#15#14#17#21#23#23#23#23#23#23
+  +#23#21#14#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#22#23#23
+  ,#23#14#14#15#14#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#14#13#14#13
+  +#13#13#13#13#13#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#14#13#14#14#14#14#14#14#14#14#14#15#14#14#14#14#15#13
+  +#13#13#13#12#13#13#13#13#12#13#13#13#12#13#13#13#13#12#13#12#13#12#13#12#13
+  +#12#13#12#13#13#12#13#12#13#12#13#12#13#12#13#13#14#15#14#14#21#23#23#23#19#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#22#23#23#23#23#22#15#15#14#14#14#14#14#15#16
+  +#22#23#23#23#23#23#23#23#21#14#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#16#23#23#23#21#14#14#14#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#13#13#13#13#13#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#14#14#14#14
+  +#14#15#14#14#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#13#12#13#13#12#13
+  +#13#12#13#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12#12#12#12#14#14#14#15
+  +#14#22#22#23#23#16#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23#23#22#16#14#14
+  +#15#14#15#14#14#14#15#14#17#21#23#23#23#23#23#23#23#21#14#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#11#16#22#23#23#23#20#15#14#15#14#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#14#13#14#13#13#13#13#14#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#14#14#13#12#13#13#13#12#13#13#13#12#13#13#13
+  +#13#12#13#13#13#13#12#13#12#13#12#13#13#12#13#13#12#13#12#12#12#13#12#13#12
+  +#13#12#13#12#14#15#14#14#14#23#23#23#23#15#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23
+  +#23#23#23#21#15#14#14#15#14#14#14#15#14#14#14#14#14#15#19#22#23#23#23#23#23
+  +#23#23#21#14#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#16#23#23#23#23#23#23#19
+  +#14#14#14#14#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#14#13#13#13#13#13
+  +#13#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12
+  +#13#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#13#12#13#13#12#13#12#13#12
+  +#13#13#12#13#13#12#12#12#12#12#13#12#13#12#14#14#14#15#16#23#23#23#23#12#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23#23#21#15#14#15#14#14#14#15#14#14#15#14#15
+  +#14#14#14#14#15#17#22#23#23#23#23#23#23#23#21#14#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#11#15#22#23#23#23#23#23#23#23#19#14#15#14#14#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#14#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  ,#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#13#12#13#13#13
+  +#13#12#13#13#12#13#13#12#13#13#12#13#12#13#12#12#13#12#13#12#13#12#13#12#13
+  +#15#14#14#14#16#23#23#23#23#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23#23#21#15
+  +#14#14#14#14#15#14#14#14#14#14#14#14#15#14#15#14#14#15#14#19#22#23#23#23#23
+  +#23#23#23#21#14#0#0#0#0#0#0#0#0#0#0#0#15#21#23#23#23#23#23#23#23#22#16#15#14
+  +#14#15#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#14#13
+  +#14#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13
+  +#13#13#12#13#13#13#13#12#13#13#13#12#13#13#13#12#13#12#13#12#13#12#13#13#12
+  +#13#13#13#12#13#12#13#12#12#12#12#12#13#14#15#14#15#19#22#23#23#22#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#12#23#23#23#23#23#21#15#14#14#15#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#15#14#14#14#15#17#22#23#23#23#23#23#23#23#19#12#0#0#0#0#0#0#0#12
+  +#21#23#23#23#23#23#23#23#22#16#15#14#14#14#15#14#14#13#14#13#13#13#13#13#13
+  +#13#13#13#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#13#12#13
+  +#13#13#12#13#13#12#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12
+  +#13#13#14#14#14#14#20#23#23#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#21#23#23#23#23#21#15
+  +#14#14#14#14#15#14#14#14#14#14#14#13#14#14#14#14#15#14#14#14#15#14#14#14#15
+  +#19#22#23#23#23#23#23#23#23#19#12#0#0#0#11#19#23#23#23#23#23#23#23#22#16#15
+  +#14#14#14#15#14#14#14#15#13#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13
+  +#13#13#13#13#13#13#13#14#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#12#13#13#12#13#12
+  +#13#13#12#13#13#12#13#12#12#12#12#12#13#12#13#12#13#14#14#15#14#14#21#23#23
+  +#23#17#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#12#21#23#23#23#23#21#15#14#14#15#14#14#14#14#14#14
+  +#14#14#14#14#14#13#14#14#14#14#15#14#14#14#15#14#14#14#15#17#22#23#23#23#23
+  +#23#23#23#19#12#15#21#23#23#23#23#23#23#22#16#15#14#14#14#15#14#14#14#15#14
+  +#14#13#14#13#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#14#13#14#13#14#13
+  +#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#13#12#13
+  +#13#13#12#13#13#13#12#13#13#13#13#13#12#13#12#13#13#12#13#12#13#12#13#13#12
+  ,#13#13#12#13#12#12#13#12#13#12#14#14#14#15#14#23#23#23#23#16#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#11#22#23#23#23#23#21#15#14#14#14#14#15#14#14#14#14#14#14#14#14#13#14#14#14
+  +#14#13#14#14#14#15#14#14#14#15#14#14#14#15#19#23#23#23#23#23#23#23#23#23#23
+  +#23#23#23#23#22#19#14#14#14#14#15#14#14#14#15#14#14#13#13#14#13#13#14#13#13
+  +#13#13#13#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#14#13#13#13#14#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#13#12#13#13#13#12#13#13
+  +#13#12#13#13#13#12#13#13#12#13#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12
+  +#12#12#12#14#15#14#14#15#23#23#23#23#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#20#23#23#23#23#21#15
+  +#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14
+  +#15#14#14#14#15#14#14#15#15#19#23#23#23#23#23#23#23#23#23#23#23#20#14#14#15
+  +#14#15#14#14#14#15#14#14#13#13#14#13#13#14#13#13#14#13#14#13#14#13#14#13#13
+  +#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#12
+  +#13#12#13#12#13#12#13#13#12#13#13#12#12#13#12#13#12#13#12#13#13#14#14#14#15
+  +#16#22#23#23#23#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#20#23#23#23#23#22#16#14#14#14#14#15#14#14#14
+  +#14#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14#14#14#14#14#14#15#14#14#14
+  +#14#14#15#15#19#23#23#23#23#23#23#23#21#16#14#15#14#14#14#14#14#15#14#14#13
+  +#14#13#14#13#13#14#13#13#14#13#13#14#13#14#13#13#14#13#13#14#13#13#13#13#14
+  +#13#14#13#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12
+  +#13#13#13#12#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#12#13#13#12#13#12
+  +#13#13#12#13#13#12#12#13#12#12#13#12#12#13#15#14#14#14#19#23#23#23#23#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#17#23#23#23#23#22#15#14#15#14#15#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#13#14#14#14#14#14#13#14#14#13#14#14#14#14#15#14#15#14#14#14#15#15#19
+  +#23#23#23#22#19#14#14#15#14#14#15#14#15#14#14#13#14#13#14#13#13#14#13#13#14
+  +#13#13#14#13#13#13#13#14#13#13#14#13#13#14#13#14#13#13#13#13#13#14#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13
+  +#13#13#13#12#13#13#13#12#13#13#12#13#13#12#13#13#12#13#12#13#12#13#12#13#12
+  +#12#13#12#12#13#12#13#14#15#14#14#20#23#23#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#22#23#23#23
+  +#23#16#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13
+  +#14#14#14#14#14#14#13#14#14#14#14#14#14#14#15#14#14#14#15#15#19#21#15#14#15
+  +#14#14#14#15#14#14#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13
+  +#14#13#13#14#13#13#14#13#13#13#13#13#13#14#13#13#13#14#13#13#14#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#13#12
+  +#13#13#13#12#13#12#13#12#13#12#13#13#12#13#13#12#12#13#12#13#12#13#12#13#12
+  +#14#14#14#15#14#21#23#23#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23#23#17#14#14#14#14#15
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#13
+  +#14#14#13#14#14#14#14#14#14#15#14#14#14#14#15#14#14#14#14#14#15#14#14#14#14
+  +#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#14#13#13#14#13#13#14#13
+  +#13#14#13#14#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#12#13
+  +#13#12#13#13#12#13#13#12#13#13#12#13#12#12#12#13#12#13#12#14#14#15#14#14#23
+  +#23#23#23#16#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#12#21#23#23#23#23#19#14#15#14#15#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14
+  +#14#14#14#14#15#14#15#14#14#14#15#14#15#14#14#14#14#13#14#13#14#13#14#13#14
+  +#13#14#13#13#14#13#13#14#13#13#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13
+  +#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12
+  +#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#13#12#13#12#13#13#12#13#12#13
+  +#12#13#12#13#12#12#13#12#13#12#13#12#13#14#14#14#14#15#23#23#23#23#13#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11
+  +#21#23#23#23#23#20#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#13#14#14#14#14#14#13#14#14#14#14#13#14#14#13#14#14#13#14#14#14#14#14
+  +#14#14#15#14#14#14#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13
+  +#14#13#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#14#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12
+  +#13#13#13#12#13#13#13#12#13#13#13#12#13#12#13#12#13#13#12#13#13#12#13#12#13
+  +#12#13#12#12#12#12#12#15#14#15#14#16#23#23#23#23#12#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19#23#23#23#23#21#15
+  +#14#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13
+  +#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#14#14#14#14#15#14#15
+  +#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#14#13#13#14#13#14#13#13
+  +#14#13#13#14#13#13#14#13#13#14#13#14#13#13#13#14#13#13#14#13#13#14#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12
+  +#13#13#13#12#13#13#12#13#13#12#13#12#13#12#13#13#12#13#12#13#12#13#12#13#12
+  +#13#14#14#14#14#17#23#23#23#23#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#23#23#23#23#22#15#14#14#15#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14
+  +#14#14#13#14#14#13#14#14#13#14#14#14#13#14#14#14#14#14#14#14#14#13#14#13#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#13#14#13#13#14#13#13#14
+  +#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#12
+  +#13#13#12#13#13#12#13#13#12#13#12#13#12#12#12#12#13#12#13#12#13#15#14#15#14
+  +#19#23#23#23#23#20#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#12#23#23#23#23#23#16#14#15#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14
+  +#14#13#14#14#13#14#13#14#14#13#14#14#14#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#13#14#13#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14
+  +#13#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#13#12#13#12#13#12#13
+  +#12#13#12#13#13#12#13#12#13#12#13#12#13#12#13#14#14#14#14#15#19#23#23#23#23
+  +#23#22#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#11#21#23#23#23#23#19#14#14#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#14#13#14#14#13#14#14#13
+  +#14#14#14#13#14#14#13#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13
+  +#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#12#13#13#12#13#12
+  +#13#13#12#13#12#13#12#12#12#12#12#14#14#15#14#14#14#19#23#23#23#23#23#22#13#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19#23#23
+  +#23#23#20#14#15#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#13#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14
+  +#14#13#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#14#13#13#14#13
+  +#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13
+  +#13#13#12#13#13#13#12#13#13#13#12#13#12#13#12#13#12#13#13#12#13#12#13#13#12
+  +#13#12#13#12#13#12#13#14#14#14#14#15#14#14#16#22#23#23#23#23#23#14#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#14#17#14#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#15#23#23#23#23
+  +#22#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#13#14#14#14#14#14#13#14#14#14#14#13#14#14#13#14#14#13#14#14#14#13#14
+  +#14#13#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12
+  +#13#13#13#12#13#13#13#12#13#13#13#12#13#13#12#13#12#13#13#12#13#12#13#12#12
+  +#12#13#12#13#12#12#12#14#14#15#14#14#15#14#15#22#23#23#23#23#23#14#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#13#15#20#22#23#23#23#22
+  +#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#23#23#23
+  +#23#21#14#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#13#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14
+  +#14#13#14#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13
+  +#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#14#13#13#14#13#13#14#13
+  +#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13
+  +#13#13#12#13#13#13#12#13#13#13#12#13#13#12#13#13#12#13#12#13#13#12#13#12#13
+  +#12#13#12#13#12#13#12#13#12#14#14#14#14#14#14#15#15#21#23#23#23#23#23#14#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#15#19#21#22#23#23#23#23#23#23
+  +#23#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19
+  +#23#23#23#23#17#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13
+  +#13#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13
+  +#13#13#12#13#13#13#12#13#13#13#12#13#13#12#13#12#13#12#13#13#12#13#12#13#13
+  +#12#13#12#12#12#12#12#13#12#12#13#12#13#14#15#14#14#14#14#15#21#23#23#23#23
+  +#23#17#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#14#16#20#23#23#23#23#23#23#23
+  +#23#23#23#23#23#23#23#23#16#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#11#23#23#23#23#22#15#14#14#15#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14
+  +#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14
+  +#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#12#13#12#13
+  +#13#12#13#12#13#13#12#13#12#13#12#13#12#13#12#12#12#13#13#14#14#15#14#14#14
+  +#15#20#23#23#23#23#23#17#0#0#0#0#0#0#0#0#0#0#0#0#11#13#15#20#21#23#23#23#23
+  +#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#12#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#22#23#23#23#19#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14
+  +#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13
+  +#13#14#13#13#14#13#13#13#13#13#13#13#13#13#14#13#13#14#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13
+  +#13#12#13#13#12#13#12#13#13#12#13#12#13#12#13#12#13#12#12#12#13#12#13#12#12
+  +#12#13#14#14#15#14#14#14#15#19#23#23#23#23#23#14#0#0#0#0#0#0#0#12#15#19#21#22
+  +#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#22#21#19#16#19#23#23#23#23#20#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#21#22#23#23
+  +#23#15#15#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14
+  +#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#14#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#13#14#13#13#14#13#13#14#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12
+  +#13#13#13#12#13#13#13#12#13#12#13#12#13#13#12#13#12#13#13#12#13#12#12#13#12
+  +#13#12#13#12#13#12#13#12#13#12#12#14#14#15#14#14#14#15#19#23#23#23#23#23#14#0
+  +#12#14#16#20#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#21#19#17#15
+  +#14#14#14#14#14#21#23#23#23#23#16#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#14#23#23#23#23#21#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#13#14#14#13#14
+  +#14#13#14#14#13#14#14#13#14#14#13#14#14#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13
+  +#13#13#13#13#13#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12
+  +#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#12#13#13
+  +#12#13#12#13#13#12#13#12#12#12#13#12#12#13#12#13#12#13#12#13#12#12#14#14#14
+  +#15#14#14#14#20#23#23#23#23#23#22#23#23#23#23#23#23#23#23#23#23#23#23#23#23
+  ,#23#23#21#20#17#16#14#14#14#15#14#15#14#15#14#14#15#22#23#23#23#23#11#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19#23#23#23#23#16#14
+  +#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13
+  +#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#14#13#13#14#13#13
+  +#14#13#13#14#13#13#14#13#13#14#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12
+  +#13#13#13#12#13#13#12#13#12#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12#12
+  +#12#12#13#12#12#12#13#12#12#14#14#14#14#15#14#14#20#23#23#23#23#23#23#23#23
+  +#23#23#23#23#23#23#23#23#23#20#19#16#15#14#15#14#14#15#14#14#14#14#14#14#14
+  +#15#14#14#17#23#23#23#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#12#22#23#23#23#22#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#13#14#14#13#14#14#13#14
+  +#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13
+  +#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13
+  +#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#12#13#12#13#13#12#13#12#13#13
+  +#12#13#12#13#12#13#12#12#13#12#13#12#13#12#13#12#13#12#13#12#13#14#14#14#14
+  +#15#14#14#21#23#23#23#23#23#23#23#23#23#23#23#21#20#16#16#14#14#15#14#14#14
+  +#14#14#15#14#14#15#14#15#14#15#14#14#14#15#14#21#23#23#23#23#14#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#17#23#23#23#23#19#14#14#15
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14
+  +#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14
+  +#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13
+  +#13#12#13#13#12#13#13#12#13#12#13#12#13#13#12#13#12#13#12#13#12#13#12#12#12
+  +#13#12#12#13#12#13#12#13#14#14#14#14#14#15#14#21#23#23#23#23#23#22#20#19#16
+  +#14#14#14#15#14#14#14#14#14#15#14#15#14#14#14#15#14#14#14#14#14#14#14#14#14
+  +#14#16#22#23#23#23#22#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#11#21#23#23#23#22#15#14#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14
+  +#13#14#14#14#14#13#14#14#14#14#13#14#14#14#13#14#14#13#14#14#13#14#14#13#14
+  +#14#13#14#14#13#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14
+  +#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#14#13#13#14
+  +#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13
+  +#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#12#13#12#13#13#12#13#13#12#13
+  ,#12#12#12#12#13#12#13#12#13#12#13#12#13#12#12#13#12#12#12#13#14#14#15#14#14
+  +#14#15#21#20#19#16#15#14#14#14#14#14#15#14#14#14#15#14#15#14#14#14#14#14#15
+  +#14#14#13#13#12#12#12#13#14#15#14#14#14#19#23#23#23#23#17#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#22#23#23#23#20#14#15#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14#14#13
+  +#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14
+  +#13#14#13#14#13#14#13#14#13#14#13#13#14#13#14#13#13#14#13#13#14#13#13#14#13
+  +#13#14#13#13#13#14#13#13#13#13#13#13#13#13#13#14#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#12
+  +#13#13#12#13#12#13#13#12#13#12#13#12#13#12#13#12#12#12#12#13#12#12#12#13#12
+  +#13#12#13#12#13#12#13#13#14#14#15#14#14#14#15#14#14#15#14#15#14#15#14#14#14
+  +#15#14#14#14#14#14#15#14#13#13#12#12#12#12#12#12#12#12#12#14#14#14#15#14#15
+  +#21#23#23#23#23#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#21#23#23#23#23#15#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#13#14#14#14#14#14#13#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14
+  +#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#14#13#13#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#14#13#13#14#13#13#14
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13
+  +#13#13#12#13#13#13#12#13#13#12#13#12#13#13#12#13#12#13#12#13#13#12#13#12#13
+  +#12#13#12#13#12#12#13#12#13#12#13#12#12#13#12#12#12#13#12#14#14#14#14#15#14
+  +#14#14#15#14#14#14#14#14#14#15#14#14#14#14#14#13#13#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#14#14#14#14#14#16#23#23#23#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#23#23#23#23#21#14#14#14#14#15#14#14
+  +#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14
+  +#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#12#13#12
+  +#13#13#12#13#13#12#13#12#12#13#12#12#13#12#13#12#13#12#13#12#13#12#13#12#12
+  +#13#12#13#12#12#12#14#14#15#14#14#15#14#14#14#15#14#15#14#14#14#13#13#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#13#15#14#15#14#14#20#23
+  +#23#23#23#14#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19
+  +#23#23#23#23#17#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14
+  +#14#14#14#13#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14
+  +#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#14#13#13#14
+  +#13#13#14#13#13#14#13#13#14#13#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  ,#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#13#12#13#13#13#12#13#13#13#12
+  +#13#13#13#12#13#13#12#13#13#12#13#12#13#13#12#13#12#13#13#12#12#13#12#12#13
+  +#12#13#12#13#12#12#12#12#12#13#12#13#12#12#13#12#12#12#14#14#14#15#14#14#15
+  +#14#14#13#13#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#14#14#14#14#15#15#23#23#23#23#21#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#23#23#23#23#22#14#14#14#15#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#14#13#13#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12
+  +#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#12#13#13#12#13#12#13
+  +#12#13#13#12#13#12#13#12#13#12#12#13#12#12#12#13#12#13#12#13#12#13#12#13#12
+  +#12#13#12#12#12#14#14#14#14#13#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#15#14#14#14#14#19#23#23#23
+  +#23#15#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#22#23
+  +#23#23#19#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14
+  +#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#14#13#14#13#13#14#13#13#14#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#14#13#13#14#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#13#12#13#13#13
+  +#12#13#13#12#13#12#13#13#12#13#13#12#13#12#13#13#12#12#12#13#12#13#12#13#12
+  +#13#12#13#12#13#12#13#12#12#13#12#13#12#12#13#12#13#12#12#12#12#12#12#13#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#13#15#14#15#14#15#22#23#23#23#22#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#11#21#23#23#23#22#15#14#14#15#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13
+  +#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13
+  +#12#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#12#13#12#13#12#13#13#12#13
+  +#12#13#12#13#12#13#12#12#12#13#12#12#13#12#13#12#12#12#13#12#13#12#12#12#12
+  +#12#12#12#12#12#13#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#14#14#14#14#14#17#23#23#23#23#16#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23
+  +#20#15#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14#14
+  +#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#14#13#14#13#14
+  +#13#14#13#14#13#14#13#14#13#14#13#13#14#13#14#13#14#13#13#14#13#13#14#13#13
+  ,#14#13#13#14#13#13#13#14#13#13#14#13#13#13#14#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#13#12#13#13
+  +#12#13#13#12#13#13#12#13#12#13#13#12#13#12#13#12#12#13#12#13#12#13#12#12#12
+  +#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#12#12#12#12#12#13#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#13#15#14#15#14#14#22#23#23#23#21#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#20#23#23#23#23#16#14#15#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13
+  +#13#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13
+  +#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13
+  +#13#12#13#13#13#13#12#13#13#13#12#13#12#13#13#12#13#13#12#13#12#13#13#12#13
+  +#12#13#12#13#12#12#12#13#12#13#12#13#12#13#12#12#12#12#12#12#12#12#12#12#12
+  +#13#12#12#12#12#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#14#14#14#15#14#17#23#23#23#23#17#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#23#23#23#23#21#14
+  +#14#15#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#14#14#14#13
+  +#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14
+  +#13#14#13#14#13#14#13#14#13#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14
+  +#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#12#13#12
+  +#13#12#13#12#13#13#12#13#12#13#12#12#13#12#12#13#12#13#12#13#12#13#12#13#12
+  +#13#12#13#12#13#12#12#12#12#12#12#12#12#13#12#13#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#13#14
+  +#14#14#14#14#22#22#23#23#23#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#17#23#23#23#23#17#15#14#14#15#14#14#14#14#14#14#14#14#14#13
+  +#14#14#14#14#14#13#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#14#13#14
+  +#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#14
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13
+  +#13#13#12#13#13#13#13#12#13#13#12#13#13#12#13#12#13#13#12#13#12#13#12#12#13
+  +#12#13#12#12#13#12#13#12#12#12#12#13#12#13#12#12#13#12#13#12#13#12#13#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#14#15#14#15#14#17#23#23#23#23#16#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#22#23#23#23#22#15#14#14
+  +#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14
+  ,#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#14#13#14#13#13#13#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13
+  +#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12
+  +#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#12#13#12
+  +#13#13#12#13#12#13#12#12#13#12#13#12#12#13#12#12#12#12#13#12#13#12#12#13#12
+  +#13#12#12#12#12#12#12#12#12#12#13#12#13#12#13#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#13#14#14#14
+  +#14#14#22#22#23#23#22#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#16#22#23#23#23#19#14#15#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14
+  +#14#13#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#14#13#14#13#14#13#13#14#13
+  +#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#14#13#13#14#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13
+  +#13#13#12#13#12#13#12#13#13#12#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12
+  +#13#12#13#12#13#12#13#12#12#12#13#12#13#12#13#12#12#12#12#12#12#12#12#12#12
+  +#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#14#14#15#14#14#17#23#23#23#23#16#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#21#23#23#23#23#15#14#15#14#14#14
+  +#14#14#14#14#13#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13
+  +#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12
+  +#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#12#13#12#13#12#13#12#13
+  +#13#12#13#12#13#12#12#13#12#13#12#13#12#12#13#12#13#12#13#12#13#12#13#12#12
+  +#12#12#13#12#13#12#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#13#14#14#15#14#14#22
+  +#22#23#23#22#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#13#23#23#23#23#21#14#14#15#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14
+  +#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13
+  +#13#14#13#13#14#13#13#13#13#13#13#13#13#14#13#13#14#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12
+  +#13#13#12#13#13#12#13#13#12#13#12#13#13#12#12#12#13#12#12#13#12#13#12#13#12
+  +#12#12#12#13#12#13#12#12#12#12#12#13#12#12#12#12#12#13#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#14#14#14#14#15#16#23#23#23#23#14#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19#23#23#23#23#16#15#14#14#15#14#14#14
+  +#13#14#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13
+  +#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13
+  +#12#13#13#13#12#13#13#13#12#13#13#12#13#13#12#13#13#12#13#13#12#13#12#13#12
+  +#13#12#12#13#12#12#12#12#12#13#12#13#12#13#12#13#12#13#12#13#12#12#12#12#13
+  +#12#13#12#12#12#13#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#13#14#15#14#14#14#22#23#23
+  +#23#21#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#22
+  +#23#23#23#22#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#14
+  +#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13
+  +#14#13#13#14#13#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#13#12#13#12
+  +#13#12#13#12#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12
+  +#12#12#12#13#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#14#14#14#15#14#19#23#23#23#23#13#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#23#23#23#23#19#14#15#14#14#14#14#14#14#14
+  +#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14
+  +#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#14#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13
+  +#13#12#13#13#13#12#13#13#13#12#13#13#12#13#13#12#13#12#13#13#12#13#12#13#12
+  +#13#12#13#12#13#12#13#12#13#12#13#12#13#12#12#13#12#12#12#13#12#12#12#12#13
+  +#12#12#13#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#13#14#14#14#14#15#22#23#23#23#19#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#21#23#23#23
+  +#22#15#14#15#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13
+  +#13#13#13#14#13#13#14#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#12#13#12#13#12#13
+  +#13#12#13#12#13#12#12#13#12#12#12#13#12#13#12#12#12#12#12#12#13#12#13#12#13
+  +#12#13#12#12#12#12#13#12#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#14#15#14#14#14#20#23#23#23#23#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#17#23#23#23#23#17#14#14#15#14#14#14#14#14#14#14#14#13#14
+  +#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13
+  +#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13
+  +#13#14#13#13#14#13#13#14#13#14#13#13#13#13#13#13#13#13#14#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13
+  +#12#13#13#13#12#13#13#12#13#12#13#13#12#13#13#13#12#12#13#12#13#12#12#12#13
+  +#12#13#12#13#12#12#13#12#13#12#13#12#13#12#13#12#12#13#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#13#14#15#14#14#15#23#23#23#23#16#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#21#23#23#23#22#15#14#14
+  +#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#13#14#14#13#14#14#13#14#14
+  +#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13
+  +#14#13#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13
+  +#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#12#13#13#12#13#12#13#13#12
+  +#13#12#13#12#13#12#12#13#12#13#12#13#12#13#12#13#12#12#13#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#13#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#14#14#15
+  +#14#14#21#23#23#23#22#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#16#23#23#23#23#17#14#15#14#15#14#14#14#14#14#14#14#13#14#14#14#14#14
+  +#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14
+  +#13#14#13#14#13#14#13#14#13#14#13#13#13#14#13#13#14#13#13#14#13#13#14#13#13
+  +#14#13#13#14#13#13#13#13#13#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13
+  +#12#13#12#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12#13#12#12#13#12#13#12
+  +#13#12#13#12#12#13#12#13#12#12#12#12#13#12#13#12#13#12#12#12#12#13#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#14#14#14#14#15#16#23#23#23#23#14#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#21#23#23#23#22#14#14#14#15#14#14#14
+  +#14#14#13#14#14#14#14#14#13#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14
+  +#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#14#13#13#14#13#13#13#13
+  +#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13
+  +#13#13#12#13#13#13#12#13#13#13#13#12#13#13#12#13#12#13#13#12#13#13#12#13#12
+  +#12#12#13#12#12#13#12#12#12#12#12#12#13#12#13#12#13#12#13#12#13#12#12#12#12
+  +#12#12#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#14#15#14#15#14#14#15
+  +#22#23#23#23#20#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16
+  +#23#23#23#23#17#14#15#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#13
+  +#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14
+  +#13#14#13#14#13#14#13#14#13#14#13#13#13#14#13#13#14#13#13#14#13#13#14#13#13
+  +#14#13#13#13#13#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12
+  +#13#13#12#13#12#13#12#13#12#13#13#12#13#12#12#13#12#13#12#13#12#13#12#13#12
+  +#13#12#13#12#13#12#13#12#12#12#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#14#14#14#14#14#14#15#21#23#23#23#23#22#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#21#23#23#23#22#14#14#14#14#15#14#14#13#14
+  +#14#14#14#14#13#14#14#14#14#14#14#13#14#14#13#14#13#14#14#13#14#14#13#14#14
+  +#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#14
+  +#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#14#13#13#13#13#13#13#14#13
+  +#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13
+  +#13#12#13#13#13#12#13#13#13#12#13#12#13#12#13#13#12#13#13#12#13#12#13#12#13
+  +#12#13#12#13#12#13#12#13#12#13#12#12#12#13#12#12#12#13#12#12#13#12#13#12#12
+  +#12#13#12#13#12#13#14#21#20#21#20#21#20#21#20#21#17#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#14#14#15#14#15#14#15#21#23#23
+  +#23#23#21#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#23#23
+  +#23#23#17#14#15#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#14#13
+  +#14#14#14#13#14#14#13#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14
+  +#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13
+  +#14#13#13#13#13#14#13#13#13#13#13#13#13#13#13#14#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13
+  +#13#12#13#13#12#13#13#12#13#13#12#13#12#12#13#12#13#12#13#12#13#12#13#12#13
+  +#12#13#12#13#12#13#12#12#12#14#21#26#145#151#207#232#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#207#207#147#145#20#19#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#14#14#15#14#14#14#15#21#23#23#23#23#22#11#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#21#23#23#23#22#14#14#14#15
+  +#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14
+  +#14#14#13#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#14#13#13
+  +#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12
+  +#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#12#13#12#13#12#13#12
+  +#13#13#12#13#12#12#13#12#12#12#12#12#12#12#12#12#13#12#12#12#13#12#12#14#23
+  +#145#207#240#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#210#149#24#19#12#12
+  +#12#12#12#12#12#14#14#15#14#14#15#14#21#23#23#23#23#22#12#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23#17#14#15#14#14#14#14#14
+  +#14#14#14#13#14#14#14#14#13#14#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#14#13#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13
+  +#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#14#13#13#13
+  +#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13
+  +#13#13#12#13#13#13#12#13#13#13#12#13#13#12#13#12#13#13#12#13#13#12#13#12#13
+  +#12#13#12#13#12#13#12#13#12#13#12#13#12#12#13#12#15#22#147#210#243#243#243
+  +#243#243#243#243#243#243#240#207#207#144#145#144#22#20#20#20#20#20#20#20#19
+  +#25#144#144#149#7#210#243#243#243#243#243#243#243#243#243#240#151#26#19#12#12
+  +#14#14#15#14#14#14#15#21#23#23#23#23#22#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#20#23#23#23#22#15#14#14#14#15#14#14#14#14#13#14#14
+  +#14#14#13#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14
+  +#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#14#13#13#14#13#13
+  +#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13
+  +#12#13#13#13#12#13#13#13#13#12#13#13#12#13#12#13#12#13#12#13#13#12#13#12#13
+  +#12#13#12#13#12#13#12#13#12#16#26#207#243#243#243#243#243#243#243#232#207#145
+  +#22#20#12#12#12#12#12#11#12#11#12#11#11#11#11#11#11#11#11#11#11#11#11#11#11
+  +#15#19#25#149#208#243#243#243#243#243#243#243#232#147#24#14#14#14#15#14#21#23
+  +#23#23#23#22#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12
+  +#23#23#23#23#19#14#15#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14#14
+  +#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14
+  +#13#14#13#14#13#14#13#14#13#14#13#13#13#14#13#13#14#13#13#14#13#13#14#13#13
+  +#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#14#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13
+  +#13#12#13#12#13#13#12#13#13#12#13#12#13#13#12#13#12#13#12#13#12#13#12#15#26
+  +#210#243#243#243#243#243#243#210#147#22#16#12#12#12#12#12#12#12#12#12#12#12
+  +#11#12#12#11#12#11#12#11#12#11#11#11#11#11#11#11#11#11#11#11#11#0#11#19#144
+  +#151#233#243#243#243#243#243#240#150#20#15#21#23#23#23#23#22#11#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#17#23#23#23#23#15#14#14#15
+  +#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14
+  +#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13
+  +#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#12#13#12#13#13#12
+  +#13#13#12#13#12#13#12#12#12#12#12#12#12#23#151#243#243#243#243#243#240#150#24
+  ,#15#12#13#12#12#13#12#12#12#12#12#12#12#12#12#11#12#12#11#12#12#11#12#11#11
+  +#12#11#11#11#11#11#11#11#11#11#11#11#11#0#11#11#0#11#19#146#208#243#243#243
+  +#243#243#233#149#24#23#23#21#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#11#12#14#23#23#23#23#20#14#15#14#14#14#14#14#14#14#14#14#14#13
+  +#14#14#14#14#13#14#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14
+  +#14#13#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14
+  +#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#14#13#13#13
+  +#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#13#12#13#13#13#12#13
+  +#13#13#12#13#13#13#12#13#13#12#13#13#12#13#12#13#12#13#13#12#13#12#13#12#13
+  +#12#15#145#232#243#243#243#243#233#150#23#13#13#13#13#13#13#13#12#12#13#12#12
+  +#12#12#12#12#12#12#12#12#12#11#12#11#12#11#12#11#11#12#11#11#11#11#11#11#11
+  +#11#11#11#11#11#0#11#11#0#11#0#0#14#25#208#243#243#243#243#243#207#144#12#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#12#16#16#19#22#22#23#23#23#23
+  +#23#23#16#14#14#15#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14
+  +#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#13#14#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#12#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12
+  +#13#12#13#13#12#13#13#12#13#12#13#13#12#13#12#16#150#233#243#243#243#243#151
+  +#25#14#13#13#13#13#13#13#13#13#13#13#12#12#13#12#12#12#12#12#12#12#12#12#11
+  +#12#12#12#11#12#11#12#11#12#11#11#11#11#11#11#11#11#11#11#11#11#11#0#11#11#0
+  +#11#11#0#11#0#16#146#233#243#243#243#243#7#20#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#12#13#15#19#19#23#23#23#23#23#23#23#23#23#23#23#23#23#22#14#15#14#14#14#14
+  +#14#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14#14#14#14#13#14#14#13#14#14
+  +#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13
+  +#13#13#13#13#14#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13
+  +#13#12#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#12#13#12#13#12#13#12#13
+  +#13#12#13#12#13#16#150#243#243#243#243#240#145#17#14#14#13#13#13#13#13#13#13
+  +#13#13#13#13#13#12#12#13#12#12#12#12#12#12#12#12#12#12#11#12#12#11#12#11#12
+  +#11#12#11#12#11#11#11#11#11#11#11#11#11#11#11#0#11#11#0#11#0#0#11#0#0#0#23#7
+  +#243#243#243#243#211#23#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#12#14#16#19#21#23#23#23#23#23#23#23
+  +#23#23#23#23#23#23#23#23#23#23#23#23#19#14#14#14#15#14#14#14#14#14#14#14#14
+  +#14#14#13#14#14#14#14#14#13#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13
+  +#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  ,#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13
+  +#13#13#12#13#13#13#12#13#13#13#12#13#13#12#13#13#12#13#12#13#13#12#15#149#243
+  +#243#243#243#232#25#14#14#13#14#13#14#14#13#13#13#13#13#13#13#13#13#13#13#12
+  +#12#13#12#12#12#12#12#12#12#12#12#12#12#11#12#12#11#12#11#11#12#11#11#11#11
+  +#11#11#11#11#11#11#11#11#11#0#11#11#0#11#11#0#11#0#11#0#0#16#147#243#243#243
+  +#243#211#17#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#11#12#16#16#19#22#22#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23
+  +#23#23#23#23#23#23#22#20#19#15#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#13#14#14#14#14#14#13#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14
+  +#13#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#14#13#13#13#14#13#13#14
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13
+  +#13#12#13#13#13#12#13#13#12#13#13#12#13#13#12#13#12#15#145#233#243#243#243
+  +#232#25#14#14#14#14#14#14#13#14#13#14#13#13#13#13#13#13#13#13#13#13#13#12#12
+  +#13#12#12#12#12#12#12#12#12#12#11#12#12#11#12#11#12#11#11#12#11#12#11#11#11
+  +#11#11#11#11#11#11#11#11#0#11#11#0#11#0#0#11#0#11#0#0#0#14#247#243#243#243
+  +#243#7#15#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#13#15
+  +#19#19#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23
+  +#21#20#19#17#16#14#14#15#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#13#14
+  +#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13
+  +#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#14#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13
+  +#13#13#13#12#13#13#13#12#13#12#13#12#13#12#13#13#23#232#243#243#243#232#25#14
+  +#14#14#14#14#14#14#14#14#13#14#13#14#13#13#13#13#13#13#13#13#13#13#13#12#12
+  +#13#12#12#12#12#12#12#12#12#12#12#12#11#12#12#11#12#11#11#12#11#11#11#11#11
+  +#11#11#11#11#11#11#11#11#0#11#11#0#11#11#0#11#0#0#11#0#0#0#14#247#243#243#243
+  +#243#145#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#22#23#23
+  +#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#21#19#19#16#15#14
+  +#14#15#14#14#14#14#15#14#14#14#14#14#15#14#14#14#14#14#14#14#14#13#14#14#14
+  +#14#13#14#14#14#14#13#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14
+  +#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#14#13#13#14#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#14#13#13#13#14#13#13#14
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13
+  +#12#13#13#13#13#12#13#13#12#13#13#12#13#13#16#207#243#243#243#240#25#14#15#14
+  +#14#14#14#14#14#14#14#14#13#14#13#14#14#13#13#13#13#13#13#13#13#13#13#13#12
+  +#12#13#12#12#12#12#12#12#12#12#12#11#12#12#11#12#11#12#11#11#12#11#11#11#11
+  +#11#11#11#11#11#11#11#11#11#0#11#11#0#11#0#0#11#0#0#11#0#0#0#0#14#152#243#243
+  +#243#233#23#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#13#23#23#23#23
+  +#23#23#23#23#23#23#23#23#23#23#23#22#20#19#17#16#15#14#14#14#14#15#14#15#14
+  +#14#14#15#14#14#14#14#15#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14
+  ,#14#14#14#13#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14
+  +#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14
+  +#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#14#13#14#14#14#13#14#14#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13
+  +#13#12#13#13#13#13#12#13#12#13#13#12#26#240#243#243#243#146#16#15#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#13#14#13#14#13#13#13#13#13#13#13#13#13#13#12
+  +#12#13#12#12#12#12#12#12#12#12#12#12#12#11#12#12#11#12#11#11#12#11#12#11#11
+  +#11#11#11#11#11#11#11#11#11#0#11#11#0#11#11#0#11#0#0#11#0#0#0#0#0#19#211#243
+  +#243#243#7#13#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#22#23#23#23
+  +#23#23#23#23#23#21#20#19#17#16#14#14#15#14#14#14#14#14#15#14#14#14#14#14#14
+  +#15#14#14#15#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14
+  +#14#13#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13
+  +#14#13#13#14#13#13#14#13#13#14#13#14#13#14#13#13#13#14#13#13#14#13#13#14#13
+  +#13#13#13#13#14#14#14#15#14#14#15#14#14#14#15#14#14#14#15#14#14#14#14#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#13#12#13#13#13#12#13#13#13#12
+  +#13#13#13#12#13#13#13#12#13#12#16#207#243#243#243#208#19#14#15#14#15#14#15#14
+  +#14#14#14#14#14#14#14#14#14#13#14#13#14#13#13#13#13#13#13#13#13#13#13#13#13
+  +#12#12#13#12#12#12#12#12#12#12#12#12#11#12#12#11#12#11#12#11#12#11#11#11#11
+  +#11#11#11#11#11#11#11#11#11#11#0#11#11#0#11#0#11#0#11#0#0#11#0#0#0#0#0#248
+  +#243#243#243#233#23#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19#23#23#23
+  +#22#20#19#16#15#14#14#14#14#14#14#15#14#14#15#14#15#14#14#14#15#14#15#14#15
+  +#14#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13
+  +#14#14#14#14#14#13#14#14#14#14#13#14#13#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13
+  +#14#13#13#14#13#13#14#13#13#14#13#13#13#14#13#13#14#13#13#13#13#13#13#13#13
+  +#13#14#14#14#14#14#15#14#14#14#15#14#14#15#14#14#14#15#14#14#14#14#14#14#14
+  +#14#14#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#13#12#13#13#13#12#13
+  +#13#13#12#13#13#13#12#13#13#12#25#240#243#243#240#144#15#15#14#15#14#15#14#14
+  +#15#14#14#14#14#14#14#14#14#14#14#13#14#13#14#14#13#13#13#13#13#13#13#13#13
+  +#13#13#12#12#13#12#12#12#12#12#12#12#12#12#12#12#11#12#12#11#12#11#12#11#12
+  +#11#11#11#11#11#11#11#11#11#11#11#11#0#11#11#0#11#0#11#0#11#0#0#11#0#0#0#0#0
+  +#14#152#243#243#243#150#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#23#23#23
+  +#23#19#14#14#14#14#14#15#14#15#14#14#14#14#15#14#14#14#15#14#14#14#15#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14
+  +#14#14#14#13#14#14#14#14#14#13#14#14#14#13#14#14#13#14#14#13#14#14#13#14#13
+  +#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14
+  +#13#13#14#13#13#14#13#13#14#13#13#14#13#14#13#13#13#13#13#14#13#13#14#13#14
+  +#14#14#14#14#15#14#14#14#14#15#14#14#14#15#14#14#15#14#14#14#15#14#15#14#15
+  +#14#14#14#14#14#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#13#12#13#13#13
+  +#13#12#13#13#13#12#13#13#12#15#149#243#243#243#208#19#15#15#15#15#14#15#15#14
+  +#15#14#15#14#14#14#14#14#14#14#14#14#14#14#14#13#14#13#14#13#13#13#13#13#13
+  +#13#13#13#13#12#12#13#12#12#12#12#12#12#12#12#12#11#12#12#11#12#11#12#11#11
+  +#11#12#11#11#11#11#11#11#11#11#11#11#11#11#0#11#11#0#11#0#11#0#11#0#0#0#11#0
+  +#0#0#0#0#25#243#243#243#232#15#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#23#23
+  +#23#23#16#14#15#14#15#14#14#14#14#15#14#15#14#14#14#15#14#14#14#15#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#13#14#14#14#14#14#13#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#14
+  +#13#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#14
+  +#14#14#14#15#14#14#15#14#15#14#14#14#15#14#14#14#15#14#14#15#14#14#14#14#14
+  +#14#15#14#15#14#15#14#14#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#13#12
+  +#13#13#13#13#12#13#13#13#13#16#210#243#243#243#145#15#15#15#15#14#15#15#14#15
+  +#14#15#14#14#15#14#14#14#14#14#14#14#14#14#14#13#14#13#14#13#13#13#13#13#13
+  +#13#13#13#13#13#13#12#12#13#12#12#12#12#12#12#12#12#12#12#12#11#12#12#11#12
+  +#11#12#11#12#11#11#11#11#11#11#11#11#11#11#11#11#0#11#11#0#11#0#0#0#11#0#11#0
+  +#0#0#0#0#0#0#15#208#243#243#243#25#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#22
+  +#23#23#23#14#14#14#15#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#13#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14
+  +#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13
+  +#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#14#13#13#14#14#14
+  +#14#15#14#14#14#15#14#14#14#14#15#17#19#19#21#21#21#21#21#21#20#19#19#16#15
+  +#14#14#14#14#14#14#14#14#14#15#14#13#13#13#13#13#13#13#12#13#13#13#12#13#13
+  +#13#13#12#13#13#13#13#12#13#21#240#243#243#232#21#15#15#15#15#15#15#15#15#15
+  +#14#15#14#15#14#14#15#14#14#14#14#14#14#14#14#14#14#13#14#13#14#14#13#13#13
+  +#13#13#13#13#13#13#13#13#12#12#13#12#12#12#12#12#12#12#12#12#11#12#12#11#12
+  +#11#12#11#11#11#12#11#11#11#11#11#11#11#11#11#11#11#11#0#11#11#0#11#11#0#11#0
+  +#0#11#0#0#0#0#0#0#0#12#147#243#243#243#147#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#19#23#23#23#21#15#14#14#14#14#14#14#14#15#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#13#14#14#14#14#14#13#14#14#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#14#14
+  +#14#14#15#14#14#15#14#14#14#17#20#21#23#23#23#23#23#23#23#23#23#23#23#23#23
+  +#23#23#21#19#16#14#15#14#15#14#14#14#14#14#14#13#13#12#13#13#13#13#12#13#13
+  +#13#12#13#13#13#13#12#13#13#13#24#243#243#243#152#17#15#15#15#15#15#15#15#15
+  +#15#14#15#15#14#15#15#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#13#14#13
+  +#14#13#13#13#13#13#13#13#13#13#13#12#12#13#12#12#12#12#12#12#12#12#12#12#12
+  +#11#12#12#11#12#11#12#11#12#11#11#11#11#11#11#11#11#11#11#11#11#0#11#11#0#11
+  +#0#0#11#0#0#11#0#11#0#0#0#0#0#0#23#233#243#243#208#11#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#21#23#23#23#19#14#15#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#13#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#14#13#13#14
+  +#14#14#15#14#14#14#15#14#15#19#22#23#23#23#23#23#23#23#23#23#23#23#23#23#23
+  +#23#23#23#23#23#23#23#21#17#15#14#14#15#14#15#14#14#14#13#13#13#13#12#13#13
+  +#13#12#13#13#13#12#13#13#13#13#12#150#243#243#243#146#16#15#15#15#15#15#15#15
+  +#15#15#15#15#15#15#14#15#14#15#14#14#15#14#14#14#14#14#14#14#14#14#14#13#14
+  +#13#14#13#13#13#13#13#13#13#13#13#13#13#13#12#12#13#12#12#12#12#12#12#12#12
+  +#12#11#12#12#11#12#11#12#11#11#11#12#11#11#11#11#11#11#11#11#11#11#11#11#0#11
+  ,#11#0#11#11#0#11#0#0#11#0#0#0#0#0#0#0#0#15#232#243#243#211#15#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#11#22#23#23#23#17#14#14#14#14#14#14#15#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13
+  +#14#14#15#14#14#14#15#14#15#20#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23
+  +#23#23#23#23#23#23#23#23#23#23#23#22#19#15#14#14#14#14#15#14#14#14#12#13#13
+  +#13#12#13#13#13#12#13#13#13#12#13#13#150#243#243#240#26#16#15#16#15#15#15#15
+  +#15#15#15#15#15#15#15#14#15#15#14#15#15#14#14#15#14#14#14#14#14#14#14#14#14
+  +#14#13#14#13#14#14#13#13#13#13#13#13#13#13#13#13#13#12#12#13#12#12#12#12#12
+  +#12#12#12#12#12#12#11#12#12#11#12#11#12#11#12#11#11#11#11#11#11#11#11#11#11
+  +#11#11#0#11#11#0#11#0#11#0#11#0#0#11#0#0#0#0#0#0#0#11#208#243#243#233#15#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#12#23#23#23#23#15#15#14#15#14#14#14#14#14#14#15#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14
+  +#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13
+  +#13#13#14#15#14#14#14#15#14#15#19#23#23#23#23#23#23#23#23#23#23#23#19#19#16
+  +#15#16#15#16#19#20#23#23#23#23#23#23#23#23#23#23#22#17#15#14#14#14#14#15#14
+  +#14#12#13#13#13#13#12#13#13#13#12#13#13#14#210#243#243#240#21#16#15#16#15#16
+  +#15#16#15#15#15#15#15#15#15#15#15#15#15#14#15#14#15#14#14#15#14#14#14#14#14
+  +#14#14#14#14#14#14#14#13#14#13#14#13#13#13#13#13#13#13#13#13#13#12#12#13#12
+  +#12#12#12#12#12#12#12#12#11#12#12#11#12#11#12#11#11#11#12#11#11#11#11#11#11
+  +#11#11#11#11#11#11#0#11#11#0#11#0#11#0#11#0#0#0#11#0#0#0#0#0#0#11#247#243#243
+  +#233#15#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#22#23#23#23#14#14#14#14#14#15#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#13
+  +#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14
+  +#13#13#14#13#14#14#14#14#15#14#14#17#22#23#23#23#23#23#23#23#22#17#14#11#0#0
+  +#0#0#0#0#0#0#0#0#0#12#15#20#23#23#23#23#23#23#23#23#21#16#14#15#14#14#14#14
+  +#14#13#13#12#13#13#13#12#13#13#13#14#210#243#243#240#22#16#15#16#15#16#15#16
+  +#15#15#15#15#15#15#15#15#15#15#15#14#15#15#14#15#15#14#14#15#14#14#14#14#14
+  +#14#14#14#14#14#13#14#13#14#13#13#13#13#13#13#13#13#13#13#13#13#12#12#13#12
+  +#12#12#12#12#12#12#12#12#12#12#11#12#12#11#12#11#12#11#12#11#11#11#11#11#11
+  +#11#11#11#11#11#11#0#11#11#0#11#0#11#0#11#0#11#0#0#0#0#0#0#0#0#0#147#243#243
+  +#243#23#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#17#23#23#23#21#14#15#14#15#14#14#14#14#15#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14#14#14#13#14#14
+  +#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13
+  +#14#13#14#15#14#15#14#14#15#20#23#23#23#23#23#23#23#19#14#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#11#16#21#22#23#23#23#23#23#22#17#14#14#15#14#14#14#14#13#13
+  ,#13#12#13#13#13#12#15#210#243#243#210#17#16#16#16#16#15#16#15#16#15#16#15#15
+  +#15#15#15#15#15#15#15#15#15#15#14#15#14#15#14#14#15#14#14#14#14#14#14#14#14
+  +#14#14#13#14#13#14#14#13#13#13#13#13#13#13#13#13#13#13#12#12#13#12#12#12#12
+  +#12#12#12#12#12#11#12#12#11#12#11#12#11#11#11#12#11#11#11#11#11#11#11#11#11
+  +#11#11#11#0#11#11#0#11#0#0#0#11#0#0#11#0#0#0#0#0#0#0#0#145#243#243#243#23#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#20#23#23#23#20#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#13#14#14#13#14#14
+  +#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#15#14
+  +#14#14#14#16#21#23#23#23#23#23#23#19#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#14#21#23#23#23#23#23#23#20#14#14#15#14#14#14#14#13#13#13#12#13#13#15
+  +#210#243#243#210#19#16#16#16#16#16#16#15#16#15#16#15#15#16#15#15#15#15#15#15
+  +#15#15#15#14#15#15#14#15#15#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#13
+  +#14#13#14#13#13#13#13#13#13#13#13#13#13#12#12#13#12#12#12#12#12#12#12#12#12
+  +#12#12#11#12#12#11#12#11#12#11#12#11#11#11#11#11#11#11#11#11#11#11#11#0#11#11
+  +#0#11#11#0#0#11#0#0#0#11#0#0#0#0#0#0#0#23#243#243#243#17#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#23
+  +#23#23#23#19#14#15#14#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#13#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14
+  +#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13
+  +#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#14#14#14#14#15#14#16#22#23
+  +#23#23#23#23#21#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16
+  +#21#23#23#23#23#23#21#15#14#14#15#14#14#14#12#13#13#13#12#207#243#243#211#17
+  +#16#16#16#16#16#16#16#16#15#16#15#16#15#15#15#15#15#15#15#15#15#15#15#15#15
+  +#15#14#15#14#15#14#14#15#14#14#14#14#14#14#14#14#14#14#13#14#13#14#13#13#13
+  +#13#13#13#13#13#13#13#13#13#12#12#13#12#12#12#12#12#12#12#12#12#11#12#12#11
+  +#12#11#12#11#11#11#12#11#11#11#11#11#11#11#11#11#11#11#11#0#11#11#0#11#0#11#0
+  +#11#0#11#0#0#0#0#0#0#0#0#0#23#243#243#233#15#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#23#23#23#23#16#14
+  +#14#15#14#14#14#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13
+  +#14#14#14#14#14#13#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14
+  +#13#13#14#13#13#14#13#13#14#13#14#14#15#14#14#14#16#22#23#23#23#23#23#16#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#20#23#23#23#23#23
+  +#21#15#14#14#14#15#14#13#13#13#13#150#243#243#210#19#16#16#16#16#16#16#16#16
+  +#16#16#15#16#15#16#15#16#15#15#15#15#15#15#15#15#15#15#14#15#15#14#15#15#14
+  +#14#15#14#14#14#14#14#14#14#14#14#14#13#14#13#14#14#13#13#13#13#13#13#13#13
+  +#13#13#13#12#12#13#12#12#12#12#12#12#12#12#12#12#12#11#12#12#11#12#11#12#11
+  +#12#11#11#11#11#11#11#11#11#11#11#11#11#0#11#11#0#11#0#11#0#11#0#0#11#0#0#0#0
+  +#0#0#0#0#26#243#243#233#15#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#23#23#23#23#15#14#15#14#14#14#15#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14
+  +#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13
+  ,#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13
+  +#14#13#13#14#14#14#14#15#14#16#22#23#23#23#23#21#13#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#17#23#23#23#23#23#21#15#14#14#14#14
+  +#14#13#13#147#243#243#240#19#16#17#16#16#16#16#16#16#16#16#16#16#15#16#15#16
+  +#15#16#15#15#15#15#15#15#15#15#15#15#15#15#14#15#14#15#14#14#15#14#14#14#14
+  +#14#14#14#14#14#14#14#14#13#14#13#14#13#13#13#13#13#13#13#13#13#13#12#12#13
+  +#12#12#12#12#12#12#12#12#12#11#12#12#11#12#11#12#11#11#11#12#11#11#11#11#11
+  +#11#11#11#11#11#11#11#0#11#11#0#11#0#11#0#11#0#0#0#11#0#0#0#0#0#0#0#147#243
+  +#243#233#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#16#22#23#23#23#14#14#14#14#15#14#14#14#14#14#15#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#13#14#14
+  +#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#14#15#14
+  +#14#14#15#22#23#23#23#23#22#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23#23#20#15#14#15#14#14#14#25#243#243
+  +#233#22#17#16#16#16#16#16#16#16#16#16#16#16#16#16#15#16#15#16#15#15#16#15#15
+  +#15#15#15#15#15#15#15#14#15#15#14#15#15#14#14#15#14#14#14#14#14#14#14#14#14
+  +#14#13#14#13#14#13#13#13#13#13#13#13#13#13#13#13#13#12#12#13#12#12#12#12#12
+  +#12#12#12#12#12#12#11#12#12#11#12#11#12#11#12#11#11#11#11#11#11#11#11#11#11
+  +#11#11#0#11#11#0#11#0#11#0#11#0#11#0#0#0#0#0#0#0#0#0#147#243#243#208#11#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#16#23#23#23#21#14#15#14#14#14#14#14#14#15#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#13#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#14#14#15#14#15#21#23#23#23
+  +#23#20#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#14#23#23#23#23#23#19#14#14#15#14#22#243#243#243#22#17#16#17#16#17#16
+  +#16#16#16#16#16#16#16#16#16#16#15#16#15#16#15#15#15#15#15#15#15#15#15#15#15
+  +#15#15#15#14#15#14#15#14#14#15#14#14#14#14#14#14#14#14#14#14#13#14#13#14#14
+  +#13#13#13#13#13#13#13#13#13#13#13#12#12#13#12#12#12#12#12#12#12#12#12#11#12
+  +#12#11#12#11#12#11#11#11#12#11#11#11#11#11#11#11#11#11#11#11#11#0#11#11#0#11
+  +#0#0#0#11#0#0#11#0#0#0#0#0#0#0#0#208#243#243#147#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19#23#23#23#21#14#14
+  +#15#14#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13
+  +#14#14#14#14#14#13#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13
+  +#14#13#13#14#13#13#14#13#15#14#14#14#14#19#23#23#23#23#22#11#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23
+  +#23#16#14#14#19#233#243#243#144#17#17#16#17#16#16#17#16#16#16#16#16#16#16#16
+  +#16#16#16#15#16#15#16#15#16#15#15#15#15#15#15#15#15#15#15#14#15#15#14#15#15
+  +#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#13#14#13#14#13#13#13#13#13#13
+  +#13#13#13#13#12#12#13#12#12#12#12#12#12#12#12#12#12#12#11#12#12#11#12#11#12
+  +#11#12#11#11#11#11#11#11#11#11#11#11#11#11#0#11#11#0#11#11#0#0#11#0#0#0#11#0
+  +#0#0#0#0#0#11#208#243#243#26#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19#23#23#23#19#15#14#14#14#15#14#14#14#14#14
+  ,#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14#14#14
+  +#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#14#13#13#14#13#13#14#13#14#14
+  +#14#15#14#15#16#23#23#23#23#22#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#22#23#23#23#22#14#15#210#243#243
+  +#150#16#17#17#16#17#17#16#16#17#16#16#16#16#16#16#16#16#16#16#16#15#16#15#16
+  +#15#16#15#15#15#15#15#15#15#15#15#15#15#15#14#15#14#15#14#14#15#14#14#14#14
+  +#14#14#14#14#14#14#13#14#13#14#13#13#13#13#13#13#13#13#13#13#13#13#12#12#13
+  +#12#12#12#12#12#12#12#12#12#11#12#12#11#12#11#12#11#11#11#12#11#11#11#11#11
+  +#11#11#11#11#11#11#11#0#11#11#0#11#0#11#0#11#0#11#0#0#0#0#0#0#0#0#16#233#243
+  +#243#17#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#23#23#23#23#19#14#14#15#14#14#14#14#14#14#15#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#13#13#14#13#13#13#13#14#13#13#14#13#13#13#14#14#14#14#14#15#21#23#23#23
+  +#23#14#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#19#23#23#23#23#19#147#243#243#208#17#17#17#17#17#16#17#16#17
+  +#16#17#16#16#16#16#16#16#16#16#16#16#16#15#16#15#16#15#15#16#15#15#15#15#15
+  +#15#15#15#15#14#15#15#14#15#15#14#14#15#14#14#14#14#14#14#14#14#14#14#13#14
+  +#13#14#14#13#13#13#13#13#13#13#13#13#13#13#12#12#13#12#12#12#12#12#12#12#12
+  +#12#12#12#11#12#12#11#12#11#12#11#12#11#11#11#11#11#11#11#11#11#11#11#11#0#11
+  +#11#0#11#0#11#0#11#0#0#11#0#0#0#0#0#0#0#20#243#243#233#11#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#23#23#23#23#16#14#15
+  +#14#14#14#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14
+  +#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14
+  +#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#14#13
+  +#13#14#13#13#14#13#14#15#14#15#14#19#23#23#23#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#21#23#23#23
+  +#146#243#243#240#20#17#17#17#16#17#17#16#17#16#17#16#16#17#16#16#16#16#16#16
+  +#16#16#16#16#15#16#15#16#15#15#15#15#15#15#15#15#15#15#15#15#15#15#14#15#14
+  +#15#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#13#14#13#14#13#13#13#13#13
+  +#13#13#13#13#13#12#12#13#12#12#12#12#12#12#12#12#12#11#12#12#11#12#11#12#11
+  +#11#11#12#11#11#11#11#11#11#11#11#11#11#11#11#0#11#11#0#11#0#11#0#11#0#0#0#11
+  +#0#0#0#0#0#0#145#243#243#7#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#12#22#23#23#23#16#14#14#14#15#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14
+  +#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#14#13#14#13#14#13#14
+  +#13#14#13#14#13#14#13#14#13#13#14#13#14#13#13#14#13#13#14#13#13#14#14#14#14
+  +#14#15#22#23#23#23#21#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#13#23#23#24#240#243#243#24#17#17#17#17
+  +#17#17#17#17#16#17#16#17#16#16#16#16#16#16#16#16#16#16#16#16#16#15#16#15#16
+  +#15#16#15#15#15#15#15#15#15#15#15#15#14#15#15#14#15#15#14#14#15#14#14#14#14
+  +#14#14#14#14#14#14#13#14#13#14#13#13#13#13#13#13#13#13#13#13#13#13#12#12#13
+  +#12#12#12#12#12#12#12#12#12#12#12#11#12#12#11#12#11#12#11#12#11#11#11#11#11
+  +#11#11#11#11#11#11#11#0#11#11#0#11#0#11#0#11#0#11#0#0#0#0#0#0#0#0#208#243#243
+  +#25#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#17#19#20#19#19#20#19#19#20#19#19#20#16#15#16#15#12#12#11
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#12#23#23#23#23#15#15#14#14#14#14#15#14#14#14#15#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14#14#14#13#14#14#13
+  +#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#13#13#14#13#13#14#13#13#14#13#14#15#14#15#14#19#23
+  +#23#23#23#14#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19#23#208#243#243#147#17#17#17#17#17#17#17#17
+  +#17#17#16#17#16#17#16#17#16#16#16#16#16#16#16#16#16#16#16#15#16#15#16#15#16
+  +#15#15#15#15#15#15#15#15#15#15#15#15#14#15#14#15#14#14#15#14#14#14#14#14#14
+  +#14#14#14#14#13#14#13#14#14#13#13#13#13#13#13#13#13#13#13#13#12#12#13#12#12
+  +#12#12#12#12#12#12#12#11#12#12#11#12#11#12#11#11#11#12#11#11#11#11#11#11#11
+  +#11#11#11#11#11#0#11#11#0#11#0#0#0#11#0#0#11#0#0#0#0#0#0#14#233#243#243#15#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#11#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23
+  +#21#19#16#16#12#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#12#23#23#23#23#14#14#15#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#13#14
+  +#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#14#14#14#14#15#22
+  +#23#23#23#21#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#147#243#243#210#19#17#17#17#17#17#17#17
+  +#17#17#17#17#16#17#16#17#16#17#16#16#16#16#16#16#16#16#16#16#16#15#16#15#16
+  +#15#15#16#15#15#15#15#15#15#15#15#15#14#15#15#14#15#15#14#14#15#14#14#14#14
+  +#14#14#14#14#14#14#14#14#13#14#13#14#13#13#13#13#13#13#13#13#13#13#12#12#13
+  +#12#12#12#12#12#12#12#12#12#12#12#11#12#12#11#12#11#12#11#12#11#11#11#11#11
+  +#11#11#11#11#11#11#11#0#11#11#0#11#11#0#0#11#0#0#0#11#0#0#0#0#0#20#243#243
+  +#208#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#16#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23
+  +#23#23#23#23#23#23#23#23#23#19#16#14#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#22#23#23#23#14#15#14#14#15#14#14#14#15#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14#14
+  +#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#14#14#15
+  +#14#14#17#23#23#23#23#14#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#240#243#243#23#17#17#17#17#17
+  +#17#17#17#17#17#17#17#17#16#17#16#17#16#16#17#16#16#16#16#16#16#16#16#16#16
+  +#15#16#15#16#15#15#15#15#15#15#15#15#15#15#15#15#15#15#14#15#14#15#14#14#15
+  +#14#14#14#14#14#14#14#14#14#14#13#14#13#14#13#13#13#13#13#13#13#13#13#13#13
+  +#13#12#12#13#12#12#12#12#12#12#12#12#12#11#12#12#11#12#11#12#11#11#11#12#11
+  +#11#11#11#11#11#11#11#11#11#11#11#0#11#11#0#11#0#11#0#11#0#11#0#0#0#0#0#0#0
+  +#150#243#243#26#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#22#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23
+  +#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#23#23#23#22#14#14#14#15#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14
+  +#13#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#14#13#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#13#14
+  +#14#14#15#14#21#23#23#23#21#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#150#243#243#147#19#17#19#17
+  +#17#17#17#17#17#17#17#17#17#17#17#16#17#16#17#16#16#16#16#16#16#16#16#16#16
+  +#16#16#16#15#16#15#16#15#16#15#15#15#15#15#15#15#15#15#15#14#15#15#14#15#15
+  +#14#14#15#14#14#14#14#14#14#14#14#14#14#13#14#13#14#14#13#13#13#13#13#13#13
+  +#13#13#13#13#12#12#13#12#12#12#12#12#12#12#12#12#12#12#11#12#12#11#12#11#12
+  ,#11#12#11#11#11#11#11#11#11#11#11#11#11#11#0#11#11#0#11#0#11#0#11#0#0#11#0#0
+  +#0#0#0#12#233#243#233#14#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23#20#19#17#19#19#19#21#20#21#21
+  +#20#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#11#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#22#23#23#21#14#15#14#14
+  +#14#14#14#14#15#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14
+  +#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#14#13#13
+  +#14#13#14#14#15#14#14#15#23#23#23#23#16#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#17#243#243#211#19
+  +#17#19#17#19#17#17#17#17#17#17#17#17#17#17#17#17#16#17#16#17#16#17#16#16#16
+  +#16#16#16#16#16#16#16#16#15#16#15#16#15#16#15#15#15#15#15#15#15#15#15#15#15
+  +#15#14#15#14#15#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#13#14#13#14#13
+  +#13#13#13#13#13#13#13#13#13#12#12#13#12#12#12#12#12#12#12#12#12#11#12#12#11
+  +#12#11#12#11#11#11#12#11#11#11#11#11#11#11#11#11#11#11#11#0#11#11#0#11#0#11#0
+  +#11#0#0#0#11#0#0#0#0#25#243#243#152#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19#23#23#23#22#14#14#15#14#14#14
+  +#14#15#14#14#14#14#14#14#16#16#17#19#20#21#23#23#23#23#23#23#23#23#23#23#13#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#23#23#23#21
+  +#14#14#14#15#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#13#14#14#14#14#14#13#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#14#13#13
+  +#13#13#14#13#13#14#13#14#14#14#15#17#23#23#23#23#11#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#211
+  +#243#243#25#19#17#19#19#17#19#17#17#17#17#17#17#17#17#17#17#17#17#16#17#16#17
+  +#16#17#16#16#16#16#16#16#16#16#16#16#16#15#16#15#16#15#15#16#15#15#15#15#15
+  +#15#15#15#15#14#15#15#14#15#15#14#14#15#14#14#14#14#14#14#14#14#14#14#13#14
+  +#13#14#13#13#13#13#13#13#13#13#13#13#13#13#12#12#13#12#12#12#12#12#12#12#12
+  +#12#12#12#11#12#12#11#12#11#12#11#12#11#11#11#11#11#11#11#11#11#11#11#11#0#11
+  +#11#0#11#0#11#0#11#0#11#0#0#0#0#0#0#7#243#243#17#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#23#23#23#23#19#15#14
+  +#14#14#15#14#14#14#14#15#14#15#14#14#14#15#14#14#14#14#14#15#16#19#21#21#23
+  +#23#23#23#16#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19
+  +#23#23#23#21#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#13#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14
+  +#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#13#14#13#14#13#13#14#13#14#15#14#14#14#20#23#23#23#21#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#25#243#243#151#19#19#19#17#19#17#19#17#19#17#17#17#17#17#17#17#17#17#17
+  +#17#16#17#16#17#16#16#17#16#16#16#16#16#16#16#16#16#16#15#16#15#16#15#15#15
+  +#15#15#15#15#15#15#15#15#15#15#15#14#15#14#15#14#14#15#14#14#14#14#14#14#14
+  +#14#14#14#13#14#13#14#14#13#13#13#13#13#13#13#13#13#13#13#12#12#13#12#12#12
+  +#12#12#12#12#12#12#11#12#12#11#12#11#12#11#11#11#12#11#11#11#11#11#11#11#11
+  +#11#11#11#11#0#11#11#0#11#0#0#0#11#0#0#11#0#0#0#0#16#243#243#211#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#23#23
+  +#23#23#15#14#14#15#14#14#15#14#15#14#14#14#14#15#14#14#14#14#15#14#15#14#14
+  +#15#14#14#14#21#23#23#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#19#23#23#23#21#14#14#14#15#14#14#14#14#15#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#14#13#14#14#13
+  +#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#13#14#13#14#13#13#14#13#13#14#14#15#14#14#23#23#23#23#16#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#11#240#243#240#20#19#19#19#17#19#19#17#19#17#17#17#17#17#17
+  +#17#17#17#17#17#17#17#16#17#16#17#16#16#16#16#16#16#16#16#16#16#16#16#16#15
+  +#16#15#16#15#16#15#15#15#15#15#15#15#15#15#15#14#15#15#14#15#15#14#14#15#14
+  +#14#14#14#14#14#14#14#14#14#14#14#13#14#13#14#13#13#13#13#13#13#13#13#13#13
+  +#12#12#13#12#12#12#12#12#12#12#12#12#12#12#11#12#12#11#12#11#12#11#12#11#11
+  +#11#11#11#11#11#11#11#11#11#11#0#11#11#0#11#11#0#0#11#0#0#0#11#0#0#0#147#243
+  +#243#23#0#0#0#0#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#22#23#23#23#20#14#15#14#14#14#15#14#14#14#14#15#14#14#14#15#14#15
+  +#14#14#14#14#14#15#14#14#15#14#19#23#23#23#22#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19#23#23#23#20#14#15#14#14#14#14#15#14#14#14
+  +#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14#14#14
+  +#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#13#14#13#13#14#13#14#15#14#14
+  +#15#23#23#23#23#14#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#26#243#243#247#19#19#19#19#19#17#19#19
+  +#17#19#17#19#17#17#17#17#17#17#17#17#17#17#17#16#17#16#17#16#17#16#16#16#16
+  +#16#16#16#16#16#16#16#15#16#15#16#15#16#15#15#15#15#15#15#15#15#15#15#15#15
+  +#14#15#14#15#14#14#15#14#14#14#14#14#14#14#14#14#14#13#14#13#14#13#13#13#13
+  +#13#13#13#13#13#13#13#13#12#12#13#12#12#12#12#12#12#12#12#12#11#12#12#11#12
+  +#11#12#11#11#11#12#11#11#11#11#11#11#11#11#11#11#11#11#0#11#11#0#11#0#11#0#11
+  +#0#11#0#0#0#0#12#233#243#233#11#0#12#19#23#21#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23#17#14#14#14#15#14#13#14#14
+  +#14#14#14#14#14#14#14#14#14#14#15#14#15#14#14#14#15#14#14#16#23#23#23#23#11#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19#23#23#23#19#14
+  +#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#13#14#14#14#14#14#13#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14
+  +#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#14#13#14#13
+  +#13#14#13#13#14#14#14#14#15#16#23#23#23#23#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#240#243#232
+  +#21#19#19#19#19#19#17#19#17#19#19#17#17#19#17#17#17#17#17#17#17#17#17#17#17
+  +#16#17#16#17#16#17#16#16#16#16#16#16#16#16#16#16#16#15#16#15#16#15#15#16#15
+  +#15#15#15#15#15#15#15#15#14#15#15#14#15#15#14#14#15#14#14#14#14#14#14#14#14
+  +#14#14#13#14#13#14#14#13#13#13#13#13#13#13#13#13#13#13#12#12#13#12#12#12#12
+  +#12#12#12#12#12#12#12#11#12#12#11#12#11#12#11#12#11#11#11#11#11#11#11#11#11
+  +#11#11#11#0#11#11#0#11#0#11#0#11#0#0#11#0#0#0#248#243#243#146#20#23#23#23#23
+  +#22#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19#23#23
+  +#23#22#14#15#14#14#14#14#13#13#13#13#13#13#13#14#13#14#13#14#13#14#14#14#14
+  +#14#14#14#14#15#15#23#23#23#23#13#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#19#23#23#23#19#14#15#14#14#14#14#14#15#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14
+  +#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#14#13#14#13#13#14#13#14#13#13#14#13#14#14#15#14#14#17#23#23#23#23#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#26#243#243#145#19#19#19#19#19#19#19#19#19#17#19#17#19#17#17
+  +#17#17#17#17#17#17#17#17#17#17#17#16#17#16#17#16#16#17#16#16#16#16#16#16#16
+  +#16#16#16#15#16#15#16#15#15#15#15#15#15#15#15#15#15#15#15#15#15#14#15#14#15
+  +#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#13#14#13#14#13#13#13#13#13#13
+  +#13#13#13#13#12#12#13#12#12#12#12#12#12#12#12#12#11#12#12#11#12#11#12#11#11
+  +#11#12#11#11#11#11#11#11#11#11#11#11#11#11#0#11#11#0#11#0#11#0#11#0#0#0#11#0
+  +#12#233#243#240#24#23#23#23#23#23#22#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#11#23#23#23#23#19#14#14#15#14#14#13#14#13#14#13#14#13#14
+  +#13#13#14#13#13#13#13#13#13#13#14#14#14#15#14#14#23#23#23#23#16#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19#23#23#23#19#14#14#14#15#14
+  ,#15#14#14#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14
+  +#14#14#13#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#13#13#14#13#13#13
+  +#14#14#14#14#15#19#22#23#23#22#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#240#243#232#19#19#19#19#19
+  +#19#19#19#19#17#19#19#17#19#17#19#17#17#17#17#17#17#17#17#17#17#17#17#16#17
+  +#16#17#16#16#16#16#16#16#16#16#16#16#16#16#16#15#16#15#16#15#16#15#15#15#15
+  +#15#15#15#15#15#15#14#15#15#14#15#15#14#14#15#14#14#14#14#14#14#14#14#14#14
+  +#13#14#13#14#13#13#13#13#13#13#13#13#13#13#13#13#12#12#13#12#12#12#12#12#12
+  +#12#12#12#12#12#11#12#12#11#12#11#12#11#12#11#11#11#11#11#11#11#11#11#11#11
+  +#11#0#11#11#0#11#0#11#0#11#0#11#0#0#0#248#243#243#150#23#23#23#23#23#23#22#11
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#17#23#23#23#23#15#15
+  +#14#14#14#14#14#13#13#14#13#14#13#13#14#13#13#14#13#13#13#13#14#13#13#14#14
+  +#14#14#15#20#23#23#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#19#23#23#23#19#14#15#14#14#14#14#14#15#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14
+  +#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#14#13#13#14#13#14#13#13#14#13#14#13#14#15#14#14#19#23#23#23#19#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#26#243#243#145#19#19#19#19#19#19#19#19#19#19#19#17#19#19#17#19#17#19
+  +#17#17#17#17#17#17#17#17#17#17#17#16#17#16#17#16#17#16#16#16#16#16#16#16#16
+  +#16#16#16#15#16#15#16#15#16#15#15#15#15#15#15#15#15#15#15#15#15#14#15#14#15
+  +#14#14#15#14#14#14#14#14#14#14#14#14#14#13#14#13#14#14#13#13#13#13#13#13#13
+  +#13#13#13#13#12#12#13#12#12#12#12#12#12#12#12#12#11#12#12#11#12#11#12#11#11
+  +#11#12#11#11#11#11#11#11#11#11#11#11#11#11#0#11#11#0#11#0#0#0#11#0#0#11#0#12
+  +#233#243#233#23#23#22#23#23#23#23#23#14#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#11#21#23#23#23#21#14#14#14#15#14#13#13#14#13#13#13#13#14#13#13
+  +#14#13#13#13#14#13#13#13#13#13#14#14#15#14#14#19#23#23#23#21#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#20#23#23#23#22#19#15#14#15#14#15
+  +#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14
+  +#14#13#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#14#13
+  +#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#14
+  +#14#14#14#15#17#23#23#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#211#243#240#20#19#20#19#19#19#19
+  +#19#19#19#19#19#19#17#19#19#17#19#17#17#17#17#17#17#17#17#17#17#17#17#17#16
+  +#17#16#17#16#17#16#16#16#16#16#16#16#16#16#16#16#15#16#15#16#15#15#16#15#15
+  +#15#15#15#15#15#15#15#14#15#15#14#15#15#14#14#15#14#14#14#14#14#14#14#14#14
+  +#14#14#14#13#14#13#14#13#13#13#13#13#13#13#13#13#13#12#12#13#12#12#12#12#12
+  +#12#12#12#12#12#12#11#12#12#11#12#11#12#11#12#11#11#11#11#11#11#11#11#11#11
+  +#11#11#0#11#11#0#11#11#0#0#11#0#0#0#0#144#243#243#145#15#15#22#23#23#23#23#23
+  +#14#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23#17#14#15
+  +#14#14#14#14#13#13#14#13#14#13#13#14#13#13#13#14#13#13#13#13#13#14#13#14#14
+  +#14#14#15#17#22#23#23#23#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#23#23#23#23#23#23#23#20#16#14#14#14#15#14#14#15#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14
+  +#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#13#13#13#14#13#13#14#13#13#13#14#14#15#14#14#19#23#23#23#19#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#23#243#243#149#19#20#19#19#19#19#19#19#19#19#19#19#19#19#17#19#19#17#19
+  +#17#19#17#17#17#17#17#17#17#17#17#17#17#16#17#16#17#16#16#17#16#16#16#16#16
+  +#16#16#16#16#16#15#16#15#16#15#15#15#15#15#15#15#15#15#15#15#15#15#15#14#15
+  +#14#15#14#14#15#14#14#14#14#14#14#14#14#14#14#13#14#13#14#13#13#13#13#13#13
+  +#13#13#13#13#13#13#12#12#13#12#12#12#12#12#12#12#12#12#11#12#12#11#12#11#12
+  +#11#11#11#12#11#11#11#11#11#11#11#11#11#11#11#11#0#11#11#0#11#0#11#0#11#0#11
+  ,#0#12#243#243#210#14#14#15#21#23#23#23#23#23#14#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#20#23#23#23#22#14#15#14#14#14#14#13#13#14#13#13#13#14#13#13
+  +#14#13#14#13#13#14#13#14#13#13#13#13#14#15#14#14#15#23#23#23#23#12#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#22#23#23#23#23#23#23#23#23
+  +#21#17#14#14#14#15#14#14#15#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14
+  +#14#14#14#13#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13
+  +#14#13#14#14#14#15#17#23#23#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#208#243#243#21#20#19#20#19#20
+  +#19#19#19#19#19#19#19#19#19#19#17#19#17#19#17#19#17#17#17#17#17#17#17#17#17
+  +#17#17#17#16#17#16#17#16#16#16#16#16#16#16#16#16#16#16#16#16#15#16#15#16#15
+  +#16#15#15#15#15#15#15#15#15#15#15#14#15#15#14#15#15#14#14#15#14#14#14#14#14
+  +#14#14#14#14#14#13#14#13#14#14#13#13#13#13#13#13#13#13#13#13#13#12#12#13#12
+  +#12#12#12#12#12#12#12#12#12#12#11#12#12#11#12#11#12#11#12#11#11#11#11#11#11
+  +#11#11#11#11#11#11#0#11#11#0#11#0#11#0#11#0#0#0#247#243#243#22#14#14#15#21#23
+  +#23#23#23#23#15#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#23#23#23#23#19
+  +#14#14#14#15#14#13#14#13#13#14#13#14#13#14#13#13#14#13#13#13#13#13#13#13#13
+  +#13#14#14#14#14#15#14#23#23#23#23#16#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#11#14#21#23#23#23#23#23#23#23#23#22#19#15#14#14#14#14#15
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14#14#14#13#14#14#13
+  +#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14
+  +#13#14#13#14#13#14#13#13#14#13#13#14#13#14#13#13#14#14#15#14#14#19#23#23#23
+  +#22#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#15#243#243#152#19#20#19#20#19#19#20#19#19#19#19#19#19#19#19#19
+  +#19#19#17#19#17#19#17#19#17#17#17#17#17#17#17#17#17#17#17#16#17#16#17#16#17
+  +#16#16#16#16#16#16#16#16#16#16#16#15#16#15#16#15#16#15#15#15#15#15#15#15#15
+  +#15#15#15#15#14#15#14#15#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#13#14
+  +#13#14#13#13#13#13#13#13#13#13#13#13#12#12#13#12#12#12#12#12#12#12#12#12#11
+  +#12#12#11#12#11#12#11#11#11#12#11#11#11#11#11#11#11#11#11#11#11#11#0#11#11#0
+  +#11#0#11#0#11#0#0#16#243#243#150#15#14#14#15#21#23#23#23#23#23#17#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#17#23#23#23#23#15#14#15#14#14#14#13#13#14#13#13
+  +#14#13#13#13#14#13#13#13#13#13#13#13#13#14#13#13#13#14#15#14#14#14#21#23#23
+  +#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#19
+  +#23#23#23#23#23#23#23#23#22#20#15#14#15#14#14#15#14#15#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#13#14#14#14#14#14#13#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14
+  +#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#13#13#13#14#13#14#14#14#14#15#17#23#23#23#23#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#147#243#243#24#20#20
+  +#19#20#19#20#19#19#19#19#19#19#19#19#19#19#19#19#17#19#19#17#17#19#17#17#17
+  +#17#17#17#17#17#17#17#17#17#16#17#16#17#16#17#16#16#16#16#16#16#16#16#16#16
+  +#16#15#16#15#16#15#15#16#15#15#15#15#15#15#15#15#15#14#15#15#14#15#15#14#14
+  +#15#14#14#14#14#14#14#14#14#14#14#13#14#13#14#13#13#13#13#13#13#13#13#13#13
+  +#13#13#12#12#13#12#12#12#12#12#12#12#12#12#12#12#11#12#12#11#12#11#12#11#12
+  +#11#11#11#11#11#11#11#11#11#11#11#11#0#11#11#0#11#0#11#0#11#0#0#208#243#243
+  +#16#14#14#14#15#20#23#23#23#23#23#17#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11
+  +#21#23#23#23#21#14#14#14#15#14#13#14#13#13#14#13#13#14#13#14#13#13#14#13#13
+  +#14#13#14#13#13#13#13#13#14#14#14#15#14#20#23#23#23#20#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#17#23#23#23#23#23#23#23
+  +#23#23#20#16#14#14#14#14#14#14#15#14#14#15#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14#14
+  +#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#14#13#14#13#13#13#13#15#14#14
+  +#14#16#23#23#23#23#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#233#243#232#20#20#20#20#19#20#19#20#19#20#19
+  +#19#19#19#19#19#19#19#19#19#17#19#19#17#17#19#17#17#17#17#17#17#17#17#17#17
+  +#17#17#16#17#16#17#16#16#17#16#16#16#16#16#16#16#16#16#16#15#16#15#16#15#15
+  +#15#15#15#15#15#15#15#15#15#15#15#15#14#15#14#15#14#14#15#14#14#14#14#14#14
+  +#14#14#14#14#13#14#13#14#14#13#13#13#13#13#13#13#13#13#13#13#12#12#13#12#12
+  +#12#12#12#12#12#12#12#11#12#12#11#12#11#12#11#11#11#12#11#11#11#11#11#11#11
+  +#11#11#11#11#11#0#11#11#0#11#0#0#11#0#11#23#243#243#25#15#14#14#14#15#19#23
+  +#23#23#23#23#17#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23#16#15#14#14
+  +#14#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#14#13#14#13
+  +#13#14#15#14#14#17#23#23#23#23#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#14#22#21#15#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#16#22#23#23#23#23#23#23#23#23#21#17#15#14
+  +#15#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#13#14#14#13#14#14
+  +#13#14#14#13#14#14#13#14#14#13#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#13#14#13#14#13#13#13#14#13#14#13#14#15#14#14#15#23#23#23#23#13#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#20#243#243#147#20#20#19#20#20#19#20#19#20#19#19#19#19#19#19#19#19#19#19
+  +#19#19#17#19#19#17#17#19#17#17#17#17#17#17#17#17#17#17#17#17#16#17#16#17#16
+  +#16#16#16#16#16#16#16#16#16#16#16#16#15#16#15#16#15#16#15#15#15#15#15#15#15
+  +#15#15#15#14#15#15#14#15#15#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#13
+  +#14#13#14#13#13#13#13#13#13#13#13#13#13#12#12#13#12#12#12#12#12#12#12#12#12
+  +#12#12#11#12#12#11#12#11#12#11#12#11#11#11#11#11#11#11#11#11#11#11#11#0#11#11
+  +#0#11#11#0#11#0#12#233#243#210#14#15#14#14#14#15#19#23#23#23#23#23#19#11#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#20#23#23#23#22#14#14#15#14#14#14#13#14#13#14#13#13
+  +#14#13#13#14#13#13#13#14#13#13#13#13#13#13#13#13#13#14#14#14#14#15#16#23#23
+  +#23#23#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#19#23#23
+  +#23#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#11#14#21#23#23#23#23#23#23#23#23#21#19#15#14#14#14#14#15#14#14
+  +#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13
+  +#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14
+  +#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#14
+  +#13#14#13#14#13#14#14#14#15#14#14#22#23#23#23#16#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#147#243#243#23#20#20
+  +#20#20#20#19#20#20#19#20#19#20#19#19#19#19#19#19#19#19#19#19#17#19#19#17#19
+  +#17#19#17#17#17#17#17#17#17#17#17#17#17#16#17#16#17#16#17#16#16#16#16#16#16
+  +#16#16#16#16#16#15#16#15#16#15#16#15#15#15#15#15#15#15#15#15#15#15#15#14#15
+  +#14#15#14#14#15#14#14#14#14#14#14#14#14#14#14#13#14#13#14#13#13#13#13#13#13
+  +#13#13#13#13#13#13#12#12#13#12#12#12#12#12#12#12#12#12#11#12#12#11#12#11#12
+  +#11#11#11#12#11#11#11#11#11#11#11#11#11#11#11#11#0#11#11#0#11#0#0#11#0#247
+  +#243#243#17#14#15#14#14#14#15#19#23#23#23#23#23#20#11#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#12#23#23#23#23#19#14#14#14#15#14#13#14#13#13#13#14#13#13#14#13#13#14#13#13
+  +#13#13#14#13#14#13#13#13#13#13#13#14#15#14#14#14#23#23#23#23#15#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#23#23#23#23#23#23#23#22#12#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#14#19#23#23#23#23#23#23#23#23#22#20#15#14#15#14#14#15#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14
+  +#13#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13
+  +#14#13#14#13#14#13#14#13#14#13#14#13#13#13#14#13#14#13#13#13#13#13#13#13#14
+  +#14#14#14#15#20#23#23#23#20#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#233#243#207#20#20#20#20#20#20#20#19#20#19
+  +#20#19#19#20#19#19#19#19#19#19#19#19#19#19#17#19#19#17#19#17#17#17#17#17#17
+  +#17#17#17#17#17#17#17#16#17#16#17#16#17#16#16#16#16#16#16#16#16#16#16#16#15
+  +#16#15#16#15#15#16#15#15#15#15#15#15#15#15#15#14#15#15#14#15#15#14#14#15#14
+  +#14#14#14#14#14#14#14#14#14#13#14#13#14#14#13#13#13#13#13#13#13#13#13#13#13
+  +#12#12#13#12#12#12#12#12#12#12#12#12#12#12#11#12#12#11#12#11#12#11#12#11#11
+  +#11#11#11#11#11#11#11#11#11#11#0#11#11#0#11#11#0#11#21#243#243#144#14#14#15
+  +#14#14#14#15#17#23#23#23#23#23#20#11#0#0#0#0#0#0#0#0#0#0#0#0#17#23#23#23#23
+  +#15#14#15#14#14#14#13#13#14#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13
+  +#13#14#13#13#13#13#14#14#14#15#14#21#23#23#23#17#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#12#20#23#23#23#23#23#23#23#23#23#23#16#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#17#22
+  +#23#23#23#23#23#23#23#23#20#16#14#14#14#14#15#14#15#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14#14#14#13#14
+  +#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#14#13#13#13#14#13#14#13#14#13#14#13#15#14#14#14#17
+  +#23#23#23#23#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#20#243#243#145#20#20#20#20#20#20#20#20#20#19#20#19#20#19
+  +#19#19#19#19#19#19#19#19#19#19#19#17#19#19#17#19#17#19#17#17#17#17#17#17#17
+  +#17#17#17#17#16#17#16#17#16#16#17#16#16#16#16#16#16#16#16#16#16#15#16#15#16
+  +#15#15#15#15#15#15#15#15#15#15#15#15#15#15#14#15#14#15#14#14#15#14#14#14#14
+  +#14#14#14#14#14#14#14#14#13#14#13#14#13#13#13#13#13#13#13#13#13#13#12#12#13
+  +#12#12#12#12#12#12#12#12#12#11#12#12#11#12#11#12#11#11#11#12#11#11#11#11#11
+  +#11#11#11#11#11#11#11#0#11#11#0#11#0#0#11#233#243#207#14#14#14#15#14#14#14#15
+  +#16#23#23#23#23#23#20#11#0#0#0#0#0#0#0#0#0#0#11#21#23#23#23#20#14#15#14#14#14
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#14#13#13#13#13#13#13#13#13#13
+  +#13#14#14#14#14#14#20#23#23#23#20#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#11#16#23#23#23#23#23#23#23#23#23#23#23#23#23#19#11#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#16#21#23#23
+  +#23#23#23#23#23#23#22#17#14#14#14#15#14#14#15#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#13#14#14#13#14
+  +#14#13#14#14#13#14#14#13#14#14#13#14#14#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#13#14#13#14#13#13#14#13#14#13#14#13#14#15#14#15#15#23#23#23#23
+  +#15#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#147#243#243#23#20#20#20#20#20#20#20#20#20#19#20#20#19#20#19#20#19#19
+  +#19#19#19#19#19#19#19#19#17#19#17#19#17#19#17#17#17#17#17#17#17#17#17#17#17
+  +#17#16#17#16#17#16#16#16#16#16#16#16#16#16#16#16#16#16#15#16#15#16#15#16#15
+  +#15#15#15#15#15#15#15#15#15#14#15#15#14#15#15#14#14#15#14#14#14#14#14#14#14
+  +#14#14#14#13#14#13#14#13#13#13#13#13#13#13#13#13#13#13#13#12#12#13#12#12#12
+  +#12#12#12#12#12#12#12#12#11#12#12#11#12#11#12#11#12#11#11#11#11#11#11#11#11
+  +#11#11#11#11#0#11#11#0#11#11#0#247#243#243#15#14#14#14#15#14#14#14#15#16#23
+  +#23#23#23#23#22#11#0#0#0#0#0#0#12#14#16#20#23#23#23#23#16#15#14#14#15#14#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#14#13#14#13#13#13#13#13#13
+  +#14#14#15#14#14#19#23#23#23#23#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#13
+  +#22#23#23#23#23#23#23#21#15#16#22#22#23#23#23#23#22#11#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#14#21
+  +#23#23#23#23#23#23#23#23#22#19#15#14#14#14#14#14#15#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14
+  +#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#13#13#14#13#13#13#13#13#13#14#14#14#14#14#14#21#23#23#23
+  +#21#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#233#243#211#21#20#20#20#20#20#20#20#20#20#20#19#20#19#20#19#19#19#19
+  +#19#19#19#19#19#19#19#19#19#19#17#19#17#19#17#19#17#17#17#17#17#17#17#17#17
+  +#17#17#16#17#16#17#16#17#16#16#16#16#16#16#16#16#16#16#16#15#16#15#16#15#16
+  +#15#15#15#15#15#15#15#15#15#15#15#15#14#15#14#15#14#14#15#14#14#14#14#14#14
+  +#14#14#14#14#13#14#13#14#14#13#13#13#13#13#13#13#13#13#13#13#12#12#13#12#12
+  +#12#12#12#12#12#12#12#11#12#12#11#12#11#12#11#11#11#12#11#11#11#11#11#11#11
+  +#11#11#11#11#11#0#11#11#0#11#0#23#243#243#25#14#14#14#14#15#14#14#14#15#16#23
+  +#23#23#23#23#22#11#0#12#15#19#22#23#23#23#23#23#23#23#22#14#14#14#15#14#13#14
+  +#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#14#13#13#13#13
+  +#13#14#14#15#14#16#23#23#23#23#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#19
+  +#23#23#23#23#23#23#22#17#14#15#14#15#20#23#23#23#23#23#23#14#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#13#19#23#23#23#23#23#23#23#23#23#20#15#14#15#14#14#14#15#14#14#14#14#14#14
+  +#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14#14#13#14#14#14#13#14#14#13#14
+  +#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#14#13#13#14#13#13#14#13#14#13#14#13#13#14#14#15#14#14#17#23#23#23
+  +#23#13#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#15#243#243#149#21#20#20#20#20#20#20#20#20#20#20#20#20#19#20#19#20#19
+  +#20#19#19#19#19#19#19#19#19#19#19#17#19#19#17#17#19#17#17#17#17#17#17#17#17
+  +#17#17#17#17#16#17#16#17#16#17#16#16#16#16#16#16#16#16#16#16#16#15#16#15#16
+  ,#15#15#16#15#15#15#15#15#15#15#15#15#14#15#15#14#15#15#14#14#15#14#14#14#14
+  +#14#14#14#14#14#14#14#14#13#14#13#14#13#13#13#13#13#13#13#13#13#13#12#12#13
+  +#12#12#12#12#12#12#12#12#12#12#12#11#12#12#11#12#11#12#11#12#11#11#11#11#11
+  +#11#11#11#11#11#11#11#0#11#11#0#11#12#243#243#150#14#14#14#14#14#14#15#14#14
+  +#14#16#22#23#23#23#23#22#21#23#23#23#23#23#23#23#23#23#23#23#19#14#15#14#14
+  +#14#14#13#14#13#13#14#13#13#14#13#13#14#13#14#13#14#13#13#13#13#14#13#13#13
+  +#13#13#13#13#15#14#14#14#15#22#23#23#23#14#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#16#21#23#23#23#23#23#23#20#15#15#14#14#14#14#14#17#23#23#23#23#23#23#17#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#12#17#22#23#23#23#23#23#23#23#23#21#16#14#15#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14#14#13#14#14#13
+  +#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#13#14#13#13#14#13#14#13#14#13#14#14#14#15#14#15#22
+  +#23#23#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#25#243#243#25#20#20#21#20#20#20#20#20#20#20#20#20#20#19#20#20#19
+  +#20#19#20#19#19#19#19#19#19#19#19#19#19#17#19#19#17#17#19#17#17#17#17#17#17
+  +#17#17#17#17#17#17#16#17#16#17#16#16#17#16#16#16#16#16#16#16#16#16#16#15#16
+  +#15#16#15#15#15#15#15#15#15#15#15#15#15#15#15#15#14#15#14#15#14#14#15#14#14
+  +#14#14#14#14#14#14#14#14#13#14#13#14#13#13#13#13#13#13#13#13#13#13#13#13#12
+  +#12#13#12#12#12#12#12#12#12#12#12#11#12#12#11#12#11#12#11#11#11#12#11#11#11
+  +#11#11#11#11#11#11#11#11#11#0#11#11#0#11#208#243#232#14#14#14#13#14#14#14#14
+  +#15#14#14#15#22#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#15#14#14#14
+  +#15#13#13#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#14#13#13#13#13#13
+  +#13#13#13#13#13#14#14#15#14#14#22#23#23#23#16#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#12#20#23#23#23#23#23#23#22#16#14#14#14#14#15#14#15#14#14#16#22#23#23#23#23
+  +#23#19#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#11#16#21#23#23#23#23#23#23#23#22#14#14#14#15#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14#14#13#14#14#13
+  +#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13#14#15#14#14
+  +#14#20#23#23#23#23#13#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#150#243#240#21#20#21#20#20#20#20#20#20#20#20#20#20#20#20
+  +#19#20#19#20#19#19#19#19#19#19#19#19#19#19#19#19#19#17#19#19#17#17#19#17#17
+  +#17#17#17#17#17#17#17#17#17#17#16#17#16#17#16#16#16#16#16#16#16#16#16#16#16
+  +#16#16#15#16#15#16#15#16#15#15#15#15#15#15#15#15#15#15#14#15#15#14#15#15#14
+  +#14#15#14#14#14#14#14#14#14#14#14#14#13#14#13#14#14#13#13#13#13#13#13#13#13
+  +#13#13#13#12#12#13#12#12#12#12#12#12#12#12#12#12#12#11#12#12#11#12#11#12#11
+  +#12#11#11#11#11#11#11#11#11#11#11#11#11#0#11#11#0#144#243#243#17#14#14#14#13
+  +#14#14#14#14#15#14#14#16#22#23#23#23#23#23#23#23#23#23#23#21#20#19#16#15#15
+  +#14#15#14#14#14#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#14#13#13#13#13
+  +#13#14#13#13#13#13#13#13#14#14#14#14#15#20#23#23#23#21#14#11#0#0#0#0#0#0#0#0
+  +#0#0#0#11#16#23#23#23#23#23#23#23#19#15#14#15#14#15#14#14#14#14#15#14#14#15
+  +#21#23#23#23#23#23#20#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#14#21#23#23#23#23#23#23#14#15
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14
+  +#14#14#14#13#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#14#13#14#13#14#13#14#13
+  +#14#14#14#15#14#15#23#23#23#23#21#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#233#243#207#21#20#21#20#21#20#20#20#20#20#20
+  +#20#20#20#20#20#20#19#20#19#20#19#20#19#19#19#19#19#19#19#19#19#19#17#19#19
+  +#17#19#17#19#17#17#17#17#17#17#17#17#17#17#17#16#17#16#17#16#17#16#16#16#16
+  +#16#16#16#16#16#16#16#15#16#15#16#15#16#15#15#15#15#15#15#15#15#15#15#15#15
+  +#14#15#14#15#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#13#14#13#14#13#13
+  +#13#13#13#13#13#13#13#13#12#12#13#12#12#12#12#12#12#12#12#12#11#12#12#11#12
+  +#11#12#11#11#11#12#11#11#11#11#11#11#11#11#11#11#11#11#0#11#11#19#243#243#25
+  +#14#14#14#13#14#14#14#14#14#15#14#14#15#22#23#23#23#23#23#21#19#16#15#14#14
+  +#14#15#14#14#14#14#14#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#14#13#13
+  +#13#14#13#14#13#13#13#13#13#13#13#13#14#14#15#14#14#19#23#23#23#23#23#21#17
+  +#12#0#0#0#0#0#0#0#0#13#22#23#23#23#23#23#23#21#15#14#14#14#14#14#14#14#14#15
+  +#14#14#14#15#14#14#20#23#23#23#23#23#21#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#13#19#23
+  +#23#23#23#15#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14
+  +#14#13#14#14#14#14#13#14#14#14#13#14#13#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#13#13#14#13
+  +#14#13#14#13#14#13#14#14#14#14#14#19#23#23#23#23#16#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#15#243#243#150#20#21#20#21#20#21
+  +#20#20#20#20#20#20#20#20#20#20#20#19#20#19#20#19#19#20#19#19#19#19#19#19#19
+  +#19#19#19#17#19#19#17#19#17#17#17#17#17#17#17#17#17#17#17#17#17#16#17#16#17
+  +#16#17#16#16#16#16#16#16#16#16#16#16#16#15#16#15#16#15#15#16#15#15#15#15#15
+  +#15#15#15#15#14#15#15#14#15#15#14#14#15#14#14#14#14#14#14#14#14#14#14#13#14
+  +#13#14#13#13#13#13#13#13#13#13#13#13#13#13#12#12#13#12#12#12#12#12#12#12#12
+  +#12#12#12#11#12#12#11#12#11#12#11#12#11#15#11#11#11#11#11#11#11#11#11#11#0#11
+  +#11#243#243#150#14#13#14#14#13#14#14#14#14#14#14#15#14#15#21#21#20#16#15#14
+  +#14#14#14#15#14#14#14#15#14#15#14#14#14#13#13#13#13#14#13#13#14#13#13#14#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#14#14#14#15#16#22#23
+  +#23#23#23#23#23#23#20#14#0#0#0#0#11#19#23#23#23#23#23#23#22#17#14#15#14#15#14
+  +#15#14#15#13#13#13#14#15#14#14#14#15#14#17#23#23#23#23#23#22#11#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#12#23#23#23#23#16#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#13#14#14#14#14#14#13#14#14#14#13#14#14#14#13#14#14#13#14#14#13#14
+  +#14#13#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14
+  +#13#14#13#13#13#13#13#13#13#13#14#14#14#15#14#15#14#22#23#23#23#23#12#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#23#243#243#26#21
+  +#21#20#21#20#20#21#20#20#20#20#20#20#20#20#20#20#20#20#19#20#19#20#19#19#19
+  +#19#19#19#19#19#19#19#19#19#17#19#19#17#19#17#19#17#17#17#17#17#17#17#17#17
+  +#17#17#16#17#16#17#16#16#17#16#16#16#16#16#16#16#16#16#16#15#16#15#16#15#15
+  +#15#15#15#15#15#15#15#15#15#15#15#15#14#15#14#15#14#14#15#14#14#14#14#14#14
+  +#14#14#14#14#13#14#13#14#14#13#13#13#13#13#13#13#13#13#13#13#12#12#13#12#12
+  +#12#12#12#12#12#12#12#11#12#12#11#12#11#12#11#11#13#149#151#11#11#11#11#11#11
+  +#11#11#11#11#11#0#11#208#243#210#14#14#13#14#14#13#14#14#14#15#14#14#14#14#14
+  +#15#14#14#14#14#15#14#14#14#15#14#14#14#14#14#15#14#13#14#13#14#13#13#14#13
+  +#13#14#13#13#14#13#13#13#14#13#13#13#13#13#14#13#13#13#13#13#13#13#13#15#14
+  +#14#14#15#21#23#23#23#23#23#23#23#23#23#21#14#11#14#22#23#23#23#23#23#23#20
+  +#15#15#14#14#14#14#14#14#14#13#13#12#13#12#14#14#15#14#14#14#15#16#22#23#23
+  +#23#23#22#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#23#23#23#23#17#15#14#15#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14
+  +#14#13#14#14#13#14#14#13#14#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#13#14#13#13#14#13#14#13#14#13#14#13#14#13#13#14#14#14#14#14#15
+  +#16#23#23#23#23#22#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#145#243#243#21#21#21#20#21#21#20#21#20#20#20#20#20#23#20#20#20#20
+  +#20#20#19#20#20#19#20#19#20#19#19#19#19#19#19#19#19#19#19#17#19#17#19#17#19
+  +#17#17#17#17#17#17#17#17#17#17#17#17#16#17#16#17#16#16#16#16#16#16#16#16#16
+  +#16#16#16#16#15#16#15#16#15#16#15#15#15#15#15#15#15#15#15#15#14#15#15#14#15
+  +#15#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#13#14#13#14#13#13#13#13#13
+  +#13#13#13#13#13#12#12#13#12#12#12#12#12#12#12#12#12#12#12#11#12#12#11#12#13
+  +#210#243#240#11#11#11#11#11#11#11#11#11#11#11#11#0#146#243#243#14#14#14#13#14
+  +#14#13#14#14#14#14#15#14#15#14#14#14#15#14#14#14#15#14#14#14#15#14#15#14#14
+  +#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#14#13#14#13#13
+  +#13#13#13#13#13#13#13#13#14#14#15#14#14#14#15#19#22#22#23#23#23#23#23#23#23
+  +#23#23#23#23#23#23#23#22#16#14#14#14#14#15#14#15#14#14#12#13#12#13#13#12#13
+  +#14#14#14#15#14#14#14#16#22#23#23#23#23#21#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#20#23#23
+  +#23#19#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14
+  +#14#13#14#14#14#13#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#13#13#14#13#14#13
+  +#14#13#14#13#13#14#14#15#14#14#14#20#23#23#23#23#20#11#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#7#243#211#21#21#21#21#20#21#20#21
+  +#20#21#20#20#20#210#152#21#20#20#20#20#20#19#20#19#20#19#19#20#19#19#19#19#19
+  +#19#19#19#19#19#19#17#19#17#19#17#19#17#17#17#17#17#17#17#17#17#17#17#16#17
+  +#16#17#16#17#16#16#16#16#16#16#16#16#16#16#16#15#16#15#16#15#16#15#15#15#15
+  ,#15#15#15#15#15#15#15#15#14#15#14#15#14#14#15#14#14#14#14#14#14#14#14#14#14
+  +#13#14#13#14#13#13#13#13#13#13#13#13#13#13#13#13#12#12#13#12#12#12#12#12#12
+  +#12#12#12#11#12#12#11#12#17#232#243#243#243#17#11#11#11#11#11#11#11#11#11#11
+  +#11#11#25#243#243#22#13#14#14#13#14#14#13#14#14#14#14#14#14#14#15#14#14#15#14
+  +#14#14#15#14#14#14#14#13#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13
+  +#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#14#14#14#14#15#14#14
+  +#14#14#17#20#23#23#23#23#23#23#23#23#23#23#23#23#19#15#14#15#14#15#14#14#14
+  +#14#13#12#13#13#12#13#12#13#12#13#13#14#14#14#15#14#14#15#22#23#23#23#23#22
+  +#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#19#23#23#23#21#14#15#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#13#14#14#14#14#13#14#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#13#14#13#14#13#13#13#13#13#13#13#14#13#14#14#14#14#15#14#15#21#23#23
+  +#23#23#20#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#233#243#208#21#21#20#21#21#21#20#21#20#21#20#21#20#243#243#240#144#20#20#20
+  +#20#20#20#19#20#19#20#19#19#19#19#19#19#19#19#19#19#19#19#17#19#19#17#17#19
+  +#17#17#17#17#17#17#17#17#17#17#17#17#16#17#16#17#16#17#16#16#16#16#16#16#16
+  +#16#16#16#16#15#16#15#16#15#15#16#15#15#15#15#15#15#15#15#15#14#15#15#14#15
+  +#15#14#14#15#14#14#14#14#14#14#14#14#14#14#13#14#13#14#14#13#13#13#13#13#13
+  +#13#13#13#13#13#12#12#13#12#12#12#12#12#12#12#12#12#12#12#11#17#240#243#243
+  +#243#243#26#11#12#11#11#11#11#11#11#11#11#11#11#19#243#243#25#14#14#13#14#14
+  +#13#14#14#13#14#14#15#14#14#14#15#14#14#14#14#14#13#14#13#14#13#14#13#13#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#13#14#13#13#13#13#13#13#13#14#13#13
+  +#13#13#13#13#13#13#13#14#14#15#14#14#14#15#14#14#14#14#15#19#22#23#23#23#23
+  +#23#23#23#21#15#14#14#14#14#14#14#14#14#13#13#13#13#13#12#13#13#12#13#13#12
+  +#13#13#14#15#14#14#15#14#16#22#23#23#23#23#22#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#22#23
+  +#23#22#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14
+  +#14#13#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#14#13#13#14#13#14#13
+  +#14#13#14#13#13#13#14#14#14#14#14#14#16#22#23#23#23#23#20#11#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#243#243#150#21#21#21#21#21#21
+  +#20#21#21#20#21#20#25#243#243#243#243#207#21#20#20#20#20#19#20#20#19#20#19#20
+  +#19#19#19#19#19#19#19#19#19#19#17#19#19#17#17#19#17#17#17#17#17#17#17#17#17
+  +#17#17#17#16#17#16#17#16#16#17#16#16#16#16#16#16#16#16#16#16#15#16#15#16#15
+  +#15#15#15#15#15#15#15#15#15#15#15#15#15#14#15#14#15#14#14#15#14#14#14#14#14
+  +#14#14#14#14#14#14#14#13#14#13#14#13#13#13#13#13#13#13#13#13#13#12#12#13#12
+  +#12#12#12#12#12#12#12#12#11#23#240#243#243#159#243#243#149#11#11#11#11#11#11
+  +#11#11#11#11#11#11#11#243#243#145#14#13#14#14#13#14#14#13#14#14#13#14#15#14
+  +#14#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14
+  +#13#13#14#13#13#13#13#13#13#14#13#14#13#13#13#13#13#13#13#13#13#13#13#13#14
+  +#14#14#15#14#14#15#14#15#14#14#14#15#17#22#23#23#23#22#19#14#15#14#15#14#15
+  +#14#15#13#13#13#13#13#12#13#13#12#13#13#12#13#12#13#12#13#14#14#15#14#14#14
+  +#15#21#23#23#23#23#22#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#13#23#23#23#23#15#14#14#14#15#14#14
+  +#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#13#13#14#13#13#14#13#14#13#14#13#13#14#13#13#14#14
+  +#15#14#14#14#16#23#23#23#23#23#22#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#17#243#243#145#21#21#21#21#21#21#21#20#21#20#20#21#145#243
+  +#243#243#243#243#240#144#20#20#20#20#19#20#19#20#19#19#20#19#19#19#19#19#19
+  +#19#19#19#19#17#19#19#17#17#19#17#17#17#17#17#17#17#17#17#17#17#17#16#17#16
+  +#17#16#16#16#16#16#16#16#16#16#16#16#16#16#15#16#15#16#15#16#15#15#15#15#15
+  +#15#15#15#15#15#14#15#15#14#15#15#14#14#15#14#14#14#14#14#14#14#14#14#14#13
+  +#14#13#14#13#13#13#13#13#13#13#13#13#13#13#13#12#12#13#12#12#12#12#12#12#12
+  +#12#24#243#243#243#154#2#167#243#207#11#12#11#12#11#11#11#11#11#11#11#11#11
+  +#211#243#207#14#14#13#14#14#13#14#14#13#14#14#13#14#14#14#13#14#13#14#13#14
+  +#13#14#13#14#13#13#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#14#14#14#14#14
+  +#14#14#15#14#14#15#14#19#22#21#15#14#14#14#14#14#14#14#14#13#13#13#13#12#13
+  +#13#12#13#12#13#12#13#13#12#13#13#12#13#14#14#14#15#14#14#15#21#23#23#23#23
+  ,#22#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#11#23#23#23#23#16#15#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#13#14#14#14#14#14#13#14#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#13#14#13#13#14#13#13#13#13#13#13#14#13#13#14#13#14#14#14#15#14#14#14#17#23
+  +#23#23#23#23#23#15#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#23
+  +#243#243#26#21#21#21#21#21#21#21#21#21#20#21#20#149#243#243'p'#227#243#243
+  +#243#207#21#20#20#20#20#19#20#19#20#19#19#19#19#19#19#19#19#19#19#19#19#17#19
+  +#19#17#19#17#19#17#17#17#17#17#17#17#17#17#17#17#16#17#16#17#16#17#16#16#16
+  +#16#16#16#16#16#16#16#16#15#16#15#16#15#16#15#15#15#15#15#15#15#15#15#15#15
+  +#15#14#15#14#15#14#14#15#14#14#14#14#14#14#14#14#14#14#13#14#13#14#14#13#13
+  +#13#13#13#13#13#13#13#13#13#12#12#13#12#12#12#12#12#12#24#243#243#243'D'#2#18
+  +#159#243#243#12#11#11#11#11#11#11#11#11#11#11#11#11#7#243#207#14#13#14#14#13
+  +#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#14#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#14#14#14#15#14#14#14#15#14#14#14#14
+  +#14#14#15#14#15#14#15#14#14#12#13#13#12#13#13#13#13#12#13#13#12#13#12#13#13
+  +#12#13#12#12#13#14#14#14#14#15#14#15#22#23#23#23#23#22#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#22#23
+  +#23#23#19#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14
+  +#14#13#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#14#13
+  +#14#13#13#14#13#13#14#13#13#14#14#15#14#14#14#17#22#23#23#23#23#23#19#12#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#26#243#243#21#21#21#21#21#21
+  +#21#21#21#21#20#21#21#210#243#236'`]'#174#243#243#243#240#144#20#20#20#19#20
+  +#20#19#20#19#20#19#19#19#19#19#19#19#19#19#19#17#19#19#17#19#17#17#17#17#17
+  +#17#17#17#17#17#17#17#17#16#17#16#17#16#17#16#16#16#16#16#16#16#16#16#16#16
+  +#15#16#15#16#15#15#16#15#15#15#15#15#15#15#15#15#14#15#15#14#15#15#14#14#15
+  +#14#14#14#14#14#14#14#14#14#14#14#14#13#14#13#14#13#13#13#13#13#13#13#13#13
+  +#13#12#12#13#12#12#12#12#24#243#243#243'D'#18#18#18#148#243#243#15#12#11#12
+  +#11#12#11#11#11#11#11#11#11#149#243#243#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13
+  +#13#14#13#13#14#13#14#13#13#14#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#14#14#15#14#14#14#15#14#15#14#14#14#14#14#14#14
+  +#13#12#13#13#13#13#13#12#13#13#12#13#12#13#13#12#13#12#13#12#13#12#12#13#14
+  +#14#15#14#14#14#15#22#23#23#23#23#20#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19#23#23#23#21#14#14#15#14
+  +#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14#14#14#13#14#14
+  +#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#14#13#14#13#13#13#14#13#13#14#13#13#14#13#14#13#14#13#13#14#13#13
+  +#14#13#14#14#14#15#14#14#14#16#22#23#23#23#23#23#23#17#11#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#150#243#243#21#21#21#21#21#21#21#21#21#21#21#20#21
+  +#210#243#219'`]]p'#227#243#243#243#207#21#20#20#19#20#19#20#19#19#19#19#19#19
+  +#19#19#19#19#19#19#19#17#19#19#17#19#17#19#17#17#17#17#17#17#17#17#17#17#17
+  +#16#17#16#17#16#16#17#16#16#16#16#16#16#16#16#16#16#15#16#15#16#15#15#15#15
+  +#15#15#15#15#15#15#15#15#15#15#14#15#14#15#14#14#15#14#14#14#14#14#14#14#14
+  +#14#14#13#14#13#14#13#13#13#13#13#13#13#13#13#13#13#13#12#12#13#12#12#25#243
+  +#243#243'D'#18#18#18#18'<'#243#243#20#12#11#11#12#11#11#11#11#11#11#11#11#144
+  +#243#243#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#13#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#14#15#14#14#14#14#15#14#15#14#14#13#13#13#13#13#12#13#13#13#13#12#13#13
+  +#12#13#12#13#13#12#13#13#12#13#12#13#12#13#14#14#14#15#14#14#16#22#23#23#23
+  +#23#20#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#16#22#23#23#23#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#13#14#14#14#14#14#13#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14
+  +#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13
+  +#14#13#13#14#13#13#13#13#13#13#14#13#13#14#13#13#14#13#14#14#14#15#14#14#14
+  +#15#20#23#23#23#23#23#23#23#17#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#14
+  +#20#210#243#210#22#21#21#21#21#21#21#21#21#21#21#21#20#243#243#193'```]]'#174
+  ,#243#243#243#240#144#20#20#20#19#20#19#20#19#20#19#19#19#19#19#19#19#19#19#19
+  +#17#19#17#19#17#19#17#17#17#17#17#17#17#17#17#17#17#17#16#17#16#17#16#16#16
+  +#16#16#16#16#16#16#16#16#16#16#15#16#15#16#15#16#15#15#15#15#15#15#15#15#15
+  +#15#14#15#15#14#15#15#14#14#15#14#14#14#14#14#14#14#14#14#14#13#14#13#14#14
+  +#13#13#13#13#13#13#13#13#13#13#13#12#12#13#24#243#243#243'D'#27#18#18#18#18
+  +'%'#243#243#24#11#12#11#11#12#11#11#11#11#11#11#11#24#243#243#21#14#14#13#14
+  +#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#14#13#14#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#14#15#14#14
+  +#14#14#14#14#13#13#13#12#13#13#13#13#12#13#13#13#12#13#12#13#13#12#13#12#13
+  +#12#13#12#13#12#12#12#12#14#14#14#15#14#14#15#22#23#23#23#23#15#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12
+  +#23#23#23#23#16#14#15#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13
+  +#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14
+  +#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#14
+  +#13#14#13#13#14#13#13#14#13#13#13#13#13#14#14#15#14#14#15#14#19#23#23#23#23
+  +#23#23#23#23#21#16#13#0#0#0#0#0#0#0#0#0#0#0#0#11#14#19#21#23#23#210#243#210
+  +#21#22#21#21#21#21#21#21#21#21#21#21#21#243#243#188'````]]p'#227#243#243#243
+  +#207#21#20#20#19#20#19#20#19#20#19#19#19#19#19#19#19#19#19#19#19#17#19#17#19
+  +#17#19#17#17#17#17#17#17#17#17#17#17#17#16#17#16#17#16#17#16#16#16#16#16#16
+  +#16#16#16#16#16#15#16#15#16#15#16#15#15#15#15#15#15#15#15#15#15#15#15#14#15
+  +#14#15#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#13#14#13#14#13#13#13#13
+  +#13#13#13#13#13#13#12#25#243#243#243'D'#27#27#18#27#18#18#18#243#243#145#11
+  +#12#11#12#11#12#11#12#11#11#11#11#20#243#243#21#14#14#13#14#13#14#14#13#14#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#14#13#14#13#13#14#13#13
+  +#14#13#14#13#13#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#14#15#14#14#13#13#13#12
+  +#13#13#13#12#13#13#13#13#12#13#13#12#13#12#13#12#13#13#12#13#12#13#12#13#12
+  +#13#12#13#14#14#14#14#15#14#21#23#23#23#23#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#22#23#23#23#17#14
+  +#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14
+  +#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#14#13#14#13#13#14#13#13#14
+  +#13#13#14#13#14#13#14#13#14#14#15#14#14#14#14#15#21#23#23#23#23#23#23#23#23
+  +#23#23#20#19#15#16#15#16#15#16#16#19#22#23#23#23#23#23#23#241#243#208#21#21
+  +#22#21#21#21#21#21#21#21#21#21#25#243#243#169'a````]]S'#174#243#243#243#240
+  +#144#20#20#19#20#19#20#19#19#19#19#19#19#19#19#19#19#19#19#17#19#19#17#17#19
+  +#17#17#17#17#17#17#17#17#17#17#17#17#16#17#16#17#16#17#16#16#16#16#16#16#16
+  +#16#16#16#16#15#16#15#16#15#15#16#15#15#15#15#15#15#15#15#15#14#15#15#14#15
+  +#15#14#14#15#14#14#14#14#14#14#14#14#14#14#13#14#13#14#13#13#13#13#13#13#13
+  +#13#13#13#13#21#243#243#243'D'#27#27#27#18#27#18#18#18#243#243#145#11#12#12
+  +#11#11#11#12#11#11#11#11#11#20#243#243#21#14#14#14#13#14#14#13#14#14#13#14#14
+  +#13#14#13#14#13#14#13#14#13#14#13#13#14#13#14#13#13#13#14#13#13#14#13#13#13
+  +#13#14#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#14#12#13#13#13#13#13#12
+  +#13#13#13#12#13#13#13#12#13#13#12#13#13#12#13#12#13#12#13#12#12#13#12#13#12
+  +#12#14#14#15#14#14#16#23#23#23#23#17#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23#20#15#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14#14#14#13#14#14
+  +#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#14#13#14#13#14#13#13#14#13#13#13#13#13#13#14#13#13#14#13#13#14#13
+  +#13#14#13#13#13#14#13#14#14#14#15#14#14#14#14#16#21#23#23#23#23#23#23#23#23
+  +#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#243#243#150#22#21#22#21
+  +#21#21#21#21#21#21#21#21#26#243#243#131'aa````]]Sk'#219#243#243#243#207#21#20
+  +#19#20#19#20#19#20#19#19#19#19#19#19#19#19#19#19#17#19#19#17#17#19#17#17#17
+  +#17#17#17#17#17#17#17#17#17#16#17#16#17#16#16#17#16#16#16#16#16#16#16#16#16
+  +#16#15#16#15#16#15#15#15#15#15#15#15#15#15#15#15#15#15#15#14#15#14#15#14#14
+  +#15#14#14#14#14#14#14#14#14#14#14#13#14#13#14#14#13#13#13#13#13#13#13#13#19
+  +#240#243#243'E'#27#27#27#27#27#18#27#18#18#214#243#207#12#11#12#11#12#11#11
+  +#12#11#11#11#11#17#243#243#144#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#14#13#13#13#14#13#14#13#13#14#13#13#14#13#14#13#13
+  ,#13#13#14#13#13#14#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#13#12#13#13
+  +#13#13#12#13#13#12#13#13#12#13#13#12#13#13#12#12#13#12#12#13#12#13#12#14#14
+  +#14#14#15#20#23#23#23#23#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23#23#21#14#14#15#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#13#14#14#13#14
+  +#14#13#14#14#13#14#14#13#14#14#13#14#14#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#13#14#13#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#13
+  +#13#13#13#13#14#14#14#14#15#14#15#14#14#14#16#20#23#23#23#23#23#23#23#23#23
+  +#23#23#23#23#23#23#23#23#23#23#23#23#23#21#243#243#150#22#21#22#21#22#21#21
+  +#21#21#21#21#21#26#243#243#131'aaa````]]SS'#171#242#243#243#240#145#20#20#19
+  +#20#19#19#19#19#19#19#19#19#19#19#19#19#19#17#19#19#17#17#19#17#17#17#17#17
+  +#17#17#17#17#17#17#17#16#17#16#17#16#16#16#16#16#16#16#16#16#16#16#16#16#15
+  +#16#15#16#15#16#15#15#15#15#15#15#15#15#15#15#14#15#15#14#15#15#14#14#15#14
+  +#14#14#14#14#14#14#14#14#14#14#14#13#14#13#14#13#13#13#13#13#17#233#243#243
+  +'E'#27#27#27#27#27#27#27#18#27#18#167#243#207#12#12#11#12#12#11#12#11#12#11
+  +#12#11#11#243#243#145#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#14#13#13#13#14#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#13#12#13#13#13#13#12#13#13#13
+  +#12#13#12#13#12#13#12#13#13#12#13#12#13#12#13#12#12#12#13#13#15#14#15#14#15
+  +#23#23#23#23#17#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23#23#21#15#14#14#14#15#14#14#14#14#14
+  +#14#14#14#14#14#13#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14
+  +#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#14#13#13#13
+  +#13#13#13#14#14#14#14#14#14#15#14#14#14#15#16#20#23#23#23#23#23#23#23#23#23
+  +#23#23#23#23#23#23#23#22#19#16#15#243#243#150#22#21#22#21#22#21#21#21#21#21
+  +#21#21#26#243#243#131'haaa````]]SSk'#219#243#243#243#210#22#20#19#20#19#20#19
+  +#19#19#19#19#19#19#19#19#19#19#17#19#19#17#19#17#19#17#17#17#17#17#17#17#17
+  +#17#17#17#16#17#16#17#16#17#16#16#16#16#16#16#16#16#16#16#16#15#16#15#16#15
+  +#16#15#15#15#15#15#15#15#15#15#15#15#15#14#15#14#15#14#14#15#14#14#14#14#14
+  +#14#14#14#14#14#13#14#13#14#13#13#13#13#13#15#210#243#243#159#28#27#27#27#27
+  +#27#27#27#27#18#27#167#243#207#12#12#11#12#11#12#11#12#11#11#11#11#11#243#243
+  +#145#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#13#14#13#13#14#13#13#14#13#13#13#13#14#13#13#13#13#14#13#13#13#13#14#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#12#13#13#13#13#12#13#13#13#13#12#13#13#13#12#13#12#13#13
+  +#12#13#12#13#13#12#12#12#13#12#13#12#13#14#14#14#14#14#20#23#23#23#23#11#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#14#23#23#23#23#23#21#15#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#13#14#14#14#14#14#13#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14
+  +#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13
+  +#13#13#13#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#14#14
+  +#14#15#14#14#14#15#14#14#15#14#14#16#17#19#21#21#23#23#23#23#22#21#20#19#16
+  +#15#14#15#14#14#243#243#150#22#22#21#22#21#22#21#22#21#21#21#21#147#243#243
+  +#128'hhaaa````]]SSS'#171#242#243#243#240#147#19#20#19#20#19#20#19#19#19#19#19
+  +#19#19#19#19#19#17#19#19#17#19#17#17#17#17#17#17#17#17#17#17#17#17#17#16#17
+  +#16#17#16#17#16#16#16#16#16#16#16#16#16#16#16#15#16#15#16#15#15#16#15#15#15
+  +#15#15#15#15#15#15#14#15#15#14#15#15#14#14#15#14#14#14#14#14#14#14#14#14#14
+  +#13#14#13#14#14#13#13#13#151#243#243#163#27#27#28#27#27#27#27#27#27#27#27#18
+  +#209#243#207#12#12#12#11#12#12#11#11#12#11#12#11#11#243#243#145#14#14#13#14
+  +#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13
+  +#13#14#13#13#14#13#14#13#13#14#13#13#13#13#13#14#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12
+  +#13#13#13#12#13#13#13#13#12#13#13#13#13#12#13#13#12#13#12#13#13#12#13#12#12
+  +#13#12#13#12#13#12#13#13#14#15#14#15#15#23#23#23#23#19#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23
+  +#23#21#15#14#14#14#14#15#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13
+  +#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14
+  ,#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#14#13#14#13#14#13#14#13
+  +#13#14#13#13#14#13#13#14#13#13#13#13#13#13#14#13#13#13#13#13#14#14#14#15#14
+  +#14#14#15#14#14#14#15#14#14#14#14#14#14#14#14#14#15#14#14#15#14#14#14#14#15
+  +#243#243#150#21#22#22#21#22#21#22#21#21#21#21#21#150#243#243'hihhaaa````]]SS'
+  +'Sc'#219#243#243#243#208#23#20#19#20#19#19#19#19#19#19#19#19#19#19#19#19#17
+  +#19#19#17#19#17#19#17#17#17#17#17#17#17#17#17#17#17#16#17#16#17#16#16#17#16
+  +#16#16#16#16#16#16#16#16#16#15#16#15#16#15#15#15#15#15#15#15#15#15#15#15#15
+  +#15#15#14#15#14#15#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#13#14#13#14
+  +#147#243#243#214#29#28#27#28#27#27#27#27#27#27#27#27#27#167#243#207#12#12#12
+  +#12#11#12#12#11#12#11#11#12#11#243#243#145#14#14#13#14#14#13#14#14#13#14#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13
+  +#14#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13
+  +#13#13#13#12#13#13#13#12#13#13#12#13#12#13#12#13#13#12#13#12#12#13#12#13#12
+  +#14#14#14#14#14#20#23#23#23#23#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23#23#21#15#14#14#15#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#13
+  +#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#14#13#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13
+  +#13#14#13#14#13#13#13#13#13#14#13#13#13#13#13#14#14#14#15#14#14#14#15#14#14
+  +#14#15#14#15#14#15#14#15#14#14#14#15#14#14#15#14#14#14#243#243#150#22#22#22
+  +#21#22#22#21#22#21#22#21#21#150#243#243'tthhhaaa````]]SSSR'#171#242#243#243
+  +#240#149#20#19#20#19#20#19#19#19#19#19#19#19#19#19#19#17#19#17#19#17#19#17#17
+  +#17#17#17#17#17#17#17#17#17#17#16#17#16#17#16#16#16#16#16#16#16#16#16#16#16
+  +#16#16#15#16#15#16#15#16#15#15#15#15#15#15#15#15#15#15#14#15#15#14#15#15#14
+  +#14#15#14#14#14#14#14#14#14#14#14#14#13#14#13#14#25#243#243#238#29#28#28#27
+  +#28#27#28#27#27#27#27#27#27#27#209#243#207#12#12#12#12#12#11#12#12#11#12#11
+  +#11#12#243#243#145#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#14#13
+  +#13#14#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#12#13#13#13#13#12#13#13#13#12#13#13#13#13#12#13#12
+  +#13#12#13#13#12#13#13#12#13#12#12#13#12#12#12#12#13#15#14#15#14#15#22#23#23
+  +#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#14#23#23#23#23#23#21#15#14#14#14#14#15#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#13#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14
+  +#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#13#14#13#13#13#13#13#13#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13
+  +#13#13#13#13#14#13#13#13#13#13#13#14#14#14#14#14#15#14#14#14#15#14#14#14#14
+  +#14#14#15#14#14#14#15#14#14#15#14#243#243#150#22#22#22#22#21#22#21#22#21#21
+  +#21#21#150#243#243'tttihhaaa````]]SSSR_'#217#243#243#243#211#24#19#20#19#19
+  +#19#19#19#19#19#19#19#19#19#19#19#17#19#17#19#17#19#17#17#17#17#17#17#17#17
+  +#17#17#17#16#17#16#17#16#17#16#16#16#16#16#16#16#16#16#16#16#15#16#15#16#15
+  +#16#15#15#15#15#15#15#15#15#15#15#15#15#14#15#14#15#14#14#15#14#14#14#14#14
+  +#14#14#14#14#14#13#14#20#233#243#243'.'#28#28#28#28#27#28#27#28#27#27#27#27
+  +#27#27#209#243#207#12#12#12#12#11#12#12#11#12#11#12#11#11#243#243#145#14#14
+  +#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13
+  +#14#13#13#14#13#13#14#13#14#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#12#13#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#12#13#13#12#13#12
+  +#12#13#12#13#12#13#12#13#14#14#14#14#14#19#23#23#23#23#14#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23
+  +#23#21#15#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13
+  +#14#14#14#14#14#13#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#14#13#14
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#14#13#13#13#13#13#14#13
+  +#13#13#13#13#13#14#13#14#14#15#14#14#14#14#15#14#15#14#14#14#15#14#14#14#14
+  +#14#13#13#243#243#150#22#22#22#22#22#21#22#21#22#21#22#21#147#243#243#130'tt'
+  +'tihhaaa````]]SSSSRs'#242#243#243#243#149#19#20#19#20#19#19#19#19#19#19#19#19
+  +#19#19#17#19#19#17#17#19#17#17#17#17#17#17#17#17#17#17#17#17#16#17#16#17#16
+  +#17#16#16#16#16#16#16#16#16#16#16#16#15#16#15#16#15#15#16#15#15#15#15#15#15
+  +#15#15#15#14#15#15#14#15#15#14#14#15#14#14#14#14#14#14#14#14#14#14#15#210#243
+  ,#243'F'#28#28#28#28#28#28#27#28#27#28#27#27#27#27#27#209#243#207#12#12#12#12
+  +#12#12#12#11#12#12#11#12#11#243#243#145#14#14#13#14#14#13#14#14#13#14#13#14
+  +#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#14
+  +#13#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#13#12
+  +#13#13#13#12#13#12#13#12#13#12#13#12#13#13#13#12#13#12#13#12#13#12#13#14#14
+  +#15#14#15#22#23#23#23#21#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23#23#21#15#14#14#14#14#15#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14#14#14#13#14
+  +#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13
+  +#13#14#13#14#13#13#13#13#13#14#13#13#13#13#13#14#13#13#13#13#13#13#13#13#13
+  +#14#14#14#14#14#14#14#14#14#14#14#13#14#13#13#13#13#13#243#243#150#22#22#22
+  +#22#22#22#21#22#22#21#22#21#144#243#243#133'uttthhhaaa````]]SSSRR_'#217#243
+  +#243#243#232#25#20#19#20#19#19#19#19#19#19#19#19#19#19#17#19#19#17#17#19#17
+  +#17#17#17#17#17#17#17#17#17#17#17#16#17#16#17#16#16#17#16#16#16#16#16#16#16
+  +#16#16#16#15#16#15#16#15#15#15#15#15#15#15#15#15#15#15#15#15#15#14#15#14#15
+  +#14#14#15#14#14#14#14#14#14#14#14#14#150#243#243#163#28#28#28#28#28#28#28#28
+  +#27#28#27#28#27#27#27#27#209#243#207#12#12#12#12#12#12#11#12#12#11#12#11#12
+  +#243#243#145#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#14#13#13#13#13#13#14#13
+  +#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#12#13#13#13#13#12#13#13#13#13#12#13#13#13#12#13#13#12
+  +#13#12#13#12#13#12#13#12#13#12#13#12#13#14#14#14#14#15#17#23#23#23#23#14#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14
+  +#23#23#23#23#23#21#15#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#14#13#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13
+  +#13#13#13#13#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#14#13#13#13
+  +#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#243#243#150#22#22#22#22#22#22#22#21#22#21#21#22
+  +#26#243#243#133'uutttihhaaa````]]SSSRRRp'#236#243#243#243#150#21#19#19#19#19
+  +#19#19#19#19#19#19#19#19#17#19#19#17#17#19#17#17#17#17#17#17#17#17#17#17#17
+  +#17#16#17#16#17#16#16#16#16#16#16#16#16#16#16#16#16#16#15#16#15#16#15#16#15
+  +#15#15#15#15#15#15#15#15#15#14#15#15#14#15#15#14#14#15#14#14#14#14#14#14#14
+  +#25#243#243#215#30#28#28#28#28#28#28#28#28#28#27#28#27#28#27#27#27#209#243
+  +#207#12#12#12#12#12#12#12#12#12#11#12#12#11#243#243#145#14#14#13#14#14#13#14
+  +#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#13#14#13#13#14#13#13#14#13
+  +#13#14#13#14#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13
+  +#13#13#13#12#13#13#13#13#12#13#13#12#13#13#12#13#13#12#13#12#12#12#12#12#12
+  +#12#13#14#15#14#14#14#22#22#23#23#21#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23#23#21#15#14#14#14#14#15
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14#14
+  +#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#14
+  +#13#13#14#13#13#14#13#14#13#13#13#13#14#13#13#13#13#13#14#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#243#243
+  +#150#22#22#22#22#22#22#22#22#21#22#22#21#144#243#243#133'uuutttihhaaa````]]S'
+  +'SSRRR_'#189#243#243#243#240#144#20#19#19#19#19#19#19#19#19#19#19#19#17#19#19
+  +#17#19#17#19#17#17#17#17#17#17#17#17#17#17#17#16#23#145#147#147#147#24#16#16
+  +#16#16#16#16#16#16#16#16#15#16#15#16#15#16#15#15#15#15#15#15#15#15#15#15#15
+  +#15#14#15#14#15#14#14#15#14#14#14#14#14#20#240#243#238'.'#29#28#29#28#28#28
+  +#28#28#28#28#28#27#28#27#28#27#27#215#243#207#12#12#12#12#12#12#12#12#11#12
+  +#12#11#19#243#243#26#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#14#13#13#14#13#13#14#13#13#14#13#14#13#13#13#13#13#13#13#13#14#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#13#12#13#12
+  +#13#12#13#12#13#13#12#13#12#13#12#13#12#13#14#14#14#15#14#17#23#23#23#23#16#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14
+  ,#23#23#23#23#23#21#15#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#13#14#14#13#14#14#13#14
+  +#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#13#14#13#14#13#14#13#13#14#13#13#13#13#14#13#13#14#13#13#14#13#13#13#14#13
+  +#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#240#243#208#22#22#22#22#22#22#22#22#22#21
+  +#22#21#144#243#243#178'uuuutttihhaaa````]]SSSSRRQm'#227#243#243#243#210#22#20
+  +#19#19#19#19#19#19#19#19#19#19#17#19#19#17#19#17#17#17#17#17#17#17#17#17#17
+  +#21#150#240#243#243#243#243#243#243#240#151#20#16#16#16#16#16#16#16#16#15#16
+  +#15#16#15#15#16#15#15#15#15#15#15#15#15#15#14#15#15#14#15#15#14#14#15#14#14
+  +#14#16#210#243#243'F'#29#28#29#28#28#28#28#28#28#28#28#27#28#27#28#27#28#27
+  +#243#243#147#12#12#12#12#12#12#12#12#12#12#12#11#20#243#243#21#14#14#14#13#14
+  +#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#14#13#13#14#13#13#14
+  +#13#13#13#13#14#13#14#13#14#13#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#13
+  +#12#13#13#13#12#13#13#13#13#12#13#12#13#13#12#13#13#12#13#12#13#12#13#12#13
+  +#12#13#12#14#15#14#14#14#22#23#23#23#21#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23#23#21#15#14#14#14#14
+  +#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14
+  +#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#13#13#13#14#13#13#14
+  +#13#14#13#13#14#13#13#14#13#13#13#14#13#13#13#13#13#13#13#14#13#13#14#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#207#243#210#22#22#22#22#22#22#22#22#22#22#21#22#21#243#243#198'vvuuuttti'
+  +'hhaaa````]]SSSRRRRQ'#173#242#243#243#240#149#19#19#19#19#19#19#19#19#19#19
+  +#19#17#19#19#17#19#17#19#17#17#17#17#17#21#151#243#243#243#243#243#243#243
+  +#243#243#243#243#243#149#19#16#16#16#16#16#16#15#16#16#15#16#15#15#15#15#15
+  +#15#15#15#15#15#15#15#15#15#14#15#14#15#14#14#15#14#14#147#243#243#163#29#29
+  +#28#29#28#29#28#28#28#28#28#28#28#28#28#27#28#27#27#243#243#145#12#12#12#12
+  +#12#12#12#12#12#12#11#12#20#243#243#21#14#14#13#14#14#13#14#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#13#13#13#14#13#13#14#13#13#14#13#14#13#13#13#13#13
+  +#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#13#12#13#13#13#12#13
+  +#13#13#13#12#13#12#13#12#13#13#12#13#12#13#12#13#12#13#12#14#14#14#14#15#16
+  +#23#23#23#23#16#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#14#23#23#23#23#23#21#15#14#14#15#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#13
+  +#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#13#14#13#13#14#13#13
+  +#14#13#14#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#207#243#210#23#22#22
+  +#22#22#22#22#22#22#22#22#21#22#243#243#202'vvuuuutttihhaaa````]]SSSSRRQRb'
+  +#218#243#243#243#211#25#19#19#19#19#19#19#19#19#19#19#17#19#17#19#17#19#17#17
+  +#17#20#147#240#243#243#243#213'q://:n'#213#243#243#243#211#21#16#16#16#16#16
+  +#16#15#16#15#16#15#16#15#15#15#15#15#15#15#15#15#15#15#14#15#15#14#15#15#14
+  +#14#15#24#243#243#234'"'#29#29#29#28#29#28#29#28#28#28#28#28#28#28#28#28#27
+  +#28'%'#243#243#26#12#13#12#12#12#12#12#12#12#12#12#12#24#243#243#21#14#14#13
+  +#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#14#13#13#14#13
+  +#13#14#13#13#13#14#13#13#13#13#14#13#13#13#14#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13
+  +#13#12#13#13#13#13#12#13#13#13#12#13#12#13#13#12#13#13#12#13#12#13#12#12#12
+  +#12#12#12#13#14#15#14#14#14#21#23#23#23#22#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23#23#21#15#14#14#14#14
+  +#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14
+  +#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14
+  +#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13
+  +#13#14#13#14#13#14#13#13#14#13#13#14#13#13#13#13#13#13#14#13#13#13#14#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#150#243#243#22#23#22#22#22#22#22#22#22#22#22#22#21#211#243#228'wvv'
+  +'vuuutttihhaaa````]]SSSRRRRQQr'#242#243#243#243#152#21#19#19#19#19#19#19#19
+  +#19#19#19#17#19#17#19#17#19#24#232#243#243#243#213'[2211//,,Z'#224#243#243
+  ,#240#22#16#16#16#16#16#16#16#15#16#15#16#15#16#15#15#15#15#15#15#15#15#15#15
+  +#15#15#14#15#14#15#14#16#240#243#243'0'#29#29#29#29#29#28#29#28#29#28#28#28
+  +#28#28#28#28#28#28#27'='#243#243#21#13#12#13#12#12#12#12#12#12#12#12#12#144
+  +#243#243#14#13#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#13#14#13#13#14#13#13#14#13#14#13#14#13#14#13#13#13#13#13#13#13#14#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#12#13#13#13#13#12#13#13#13#13#12#13#13#13#12#13#12#13#12#13#12
+  +#13#13#12#13#12#13#12#13#12#14#14#14#15#14#16#23#23#23#23#17#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23#23#21
+  +#15#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#13#13#14#13#13#14#13#13#14#13#13#13#14#13#13#14#13#13#13#14#13#13#14#13#13
+  +#13#14#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#145#243#243#23#22#23#22#22#22#22#22#22#22#22#22
+  +#22#210#243#239'wvvvvuuutttihhaaa````]]SSSSRRRQQ\'#189#243#243#243#240#146#19
+  +#19#19#19#19#19#19#19#19#17#19#19#17#20#207#243#243#243#241'q3332211///,7'
+  +#185#243#243#240#22#16#16#16#16#16#16#16#15#16#15#16#15#16#15#15#15#15#15#15
+  +#15#15#15#15#14#15#15#14#15#14#208#243#243'f'#29#29#29#29#29#29#29#28#29#28
+  +#29#28#28#28#28#28#28#28#28#28#153#243#243#16#13#12#12#13#12#12#12#12#12#12
+  +#12#12#147#243#243#13#14#14#13#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#13#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#14#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#13#13#12#13#13#12#13
+  +#13#12#13#13#12#13#12#13#12#13#12#13#12#14#15#14#14#14#21#23#23#23#23#11#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23
+  +#23#23#23#21#15#14#14#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14
+  +#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#14#13
+  +#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#26#243#243#26#23#22#23#22#22#22#22
+  +#22#22#22#22#22#150#243#243'wwwvvuuuutttihhaaa````]]SSSRRRRQQQj'#218#243#243
+  +#243#232#25#19#19#19#19#19#19#19#19#17#19#146#240#243#243#243#184';443332211'
+  +'//,,,'#185#243#243#232#19#16#16#16#16#16#16#15#16#16#15#16#15#15#16#15#15#15
+  +#15#15#15#15#15#15#15#15#14#15#146#243#243#212#30#30#29#29#29#29#29#29#29#28
+  +#29#28#29#28#28#28#28#28#28#28#27#155#243#243#13#12#13#13#12#13#12#12#12#12
+  +#12#12#12#7#243#210#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13
+  +#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#14#13#13#14#13#13#13#14#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#13#12#13#13#12
+  +#13#13#12#13#12#13#12#12#13#12#13#12#14#14#14#14#15#15#23#23#23#23#17#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23
+  +#23#21#15#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#13#14#14#13#14#14
+  +#13#14#14#13#14#14#13#14#14#13#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#14#13#13#14#13#13#14#13#13#14
+  +#13#13#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#21#243#243#144#23#23#22#23#22#22#22
+  +#22#22#22#22#22#146#243#243#141'xwwvvvuuutttihhaaa````]]SSSRRRRQQQQ'#157#242
+  +#243#243#243#208#25#19#19#19#19#19#19#25#211#243#243#243#224'e444433332211//'
+  +'/,,'#185#243#243#208#16#16#16#16#16#16#16#15#16#16#15#16#15#15#15#15#15#15
+  +#15#15#15#15#15#15#14#15#21#243#243#238'#'#30#29#30#29#29#29#29#29#29#29#28
+  +#29#28#29#28#28#28#28#28#28#28#209#243#210#13#13#12#13#12#12#13#12#12#12#12
+  +#12#12#232#243#207#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13#14#13#13#13
+  +#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#13#12#13#12#13#12#13
+  +#12#13#12#13#13#12#13#12#12#12#12#12#14#15#14#14#14#20#23#23#23#23#11#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23
+  ,#23#21#15#14#14#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14
+  +#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#13#14#13#13#14#13#13#13#13
+  +#13#13#14#13#13#14#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#16#243#243#151#22#23#23#22#23#22
+  +#22#22#22#22#22#22#144#243#243#181'xxwwvvuuuutttihhaaa````]]SSSRRRRQQQQV'#173
+  +#243#243#243#243#207#25#19#22#146#211#243#243#243#241#170'555444433332211//,'
+  +',,'#213#243#243#147#16#16#16#16#16#16#16#15#16#15#16#15#16#15#15#15#15#15#15
+  +#15#15#15#15#15#16#232#243#243'B'#30#30#30#30#29#30#29#29#29#29#29#29#28#29
+  +#28#29#28#28#28#28#28#28#243#243#150#13#13#13#12#13#13#12#13#12#12#12#12#12
+  +#243#243#145#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13
+  +#14#13#14#13#13#14#13#13#14#13#13#14#13#13#13#14#13#13#13#13#13#14#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#12#13#13#13#13#12#13#13#13#12#13#13#13#13#12#13#12#13#13#12
+  +#13#12#13#12#13#12#13#12#13#13#14#14#15#14#15#23#23#23#23#19#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23#23#21#15
+  +#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#13#13#14#13#13#14#13#13#14#13#13#14#13#14#13#13#14#13#13#14#13#13#13#13
+  +#13#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#243#243#7#23#23#23#23#22#23#22#22#22
+  +#22#22#22#22#243#243#205'yxxwwvvvuuutttihhaaa````]]SSSRRRRQQQQPb'#197#243#243
+  +#243#243#243#243#243#243#243#243#192'L66554444443332211///,7'#241#243#243#24
+  +#16#16#16#16#16#16#16#16#15#16#15#16#15#16#15#15#15#15#15#15#15#15#15#150#243
+  +#243#159#31#30#30#30#30#30#29#29#29#29#29#29#29#29#28#29#28#29#28#28#28#28'.'
+  +#243#243#26#13#13#13#13#12#13#12#12#13#12#12#12#21#243#243#25#14#13#14#14#13
+  +#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#13#13#14#13#13#14#13#13
+  +#14#13#13#14#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13
+  +#13#13#13#12#13#13#13#12#13#13#12#13#13#12#13#13#12#13#13#12#13#12#13#12#13
+  +#14#15#14#14#14#20#23#23#23#23#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23#23#21#15#14#14#14#14#15#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14
+  +#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14
+  +#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14
+  +#13#13#14#13#13#13#14#13#13#14#13#14#13#14#13#13#13#14#13#13#13#13#13#14#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#207#243#232#23#23#23#23#23#22#23#22#22#22#22#22#22#210#243#239
+  +'yyxxwwvvuuuutttihhaaa````]]SSSRRRRQQQQPQo'#218#243#243#243#243#243#235#172
+  +'WJII66555444433332211//,,Z'#243#243#232#19#16#16#16#16#16#16#16#16#15#16#15
+  +#16#15#16#15#15#15#15#15#15#15#26#243#243#216#31#31#30#30#30#30#30#30#29#30
+  +#29#29#29#29#29#29#28#29#28#29#28#28#28'H'#243#243#21#13#13#13#13#13#12#13#13
+  +#12#13#12#12#24#243#243#21#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#14#13
+  +#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#12#13#13#12
+  +#13#12#13#12#13#12#13#12#12#13#12#13#13#14#14#14#15#14#23#23#23#23#23#12#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23
+  +#23#21#15#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#14#13#14
+  +#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13
+  +#13#14#13#13#14#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#147#243#243#23#23#23
+  +#23#23#23#22#23#22#22#22#22#22#151#243#243#135'yyxxwwvvvuuutttihhaaa````]]SS'
+  +'SRRRRQQQQPPO^'#158#172#158'bKJJJJII66554444433332211///,'#162#243#243#147#16
+  +#16#16#16#16#16#16#16#16#15#16#15#16#15#15#16#15#15#15#15#19#240#243#238'>'
+  +#31#31#31#31#30#30#30#30#30#29#30#29#29#29#29#29#29#28#29#28#29#28#28#163#243
+  +#243#13#13#13#13#13#13#13#12#13#12#12#13#12#147#243#243#14#13#14#14#13#14#13
+  ,#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14
+  +#13#13#14#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#13#12#13#13
+  +#13#12#13#13#13#13#13#12#13#12#13#13#12#13#13#12#13#12#13#12#12#12#12#13#15
+  +#14#14#14#14#19#23#23#23#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#14#23#23#23#23#23#21#15#14#14#14#14#15#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14
+  +#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14
+  +#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14
+  +#13#13#14#13#13#14#13#13#14#13#14#13#13#13#13#13#13#13#13#13#13#14#13#13#14
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#25#243#243#144#23#23#23#23#23#23#22#23#22#22#22#22#145#243#243
+  +#179'zyyxxwwvvuuuutttihhaaa````]]SSSRRRRQQQQPPONNNKKKKJJJII66555444443332211'
+  +'//,7'#235#243#243#22#16#16#16#16#16#16#16#16#16#15#16#15#16#15#15#15#15#15
+  +#15#210#243#243'd   '#31#31#31#30#30#30#30#30#29#29#29#29#29#29#29#29#28#29
+  +#28#29#28#238#243#207#13#13#13#13#13#13#13#13#12#13#13#12#13#207#243#210#14
+  +#14#13#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13
+  +#14#13#13#14#13#13#14#13#13#13#13#13#14#13#13#13#14#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#12#13#13#13#13#12#13#13#13#12#13#13#13#12#13#12#13#12#13#12#13#13#12#13#12
+  +#13#12#13#12#12#14#14#15#14#14#14#21#23#23#23#23#15#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23#23#21#15#14#14#15#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#13#14#14#14#14#14#13#14#14#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13
+  +#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#14#13#14#13#13#14#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#19#243#243#149#23#23#23#23#23#23#23#22#23#22
+  +#22#22#24#243#243#205'zyyyxxwwvvvuuutttihhaaa````]]SSSRRRRQQQQPPONNNKKKJJJJI'
+  +'I66554444433332211///Z'#243#243#208#16#16#16#16#16#16#16#16#16#16#15#16#15
+  +#16#15#16#15#15#149#243#243#191' !'#31' '#31#31#31#31#30#30#30#30#30#29#30#29
+  +#29#29#29#29#29#28#29#28'.'#243#243#146#13#13#13#13#13#13#13#13#13#12#13#12
+  +#12#243#243#150#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#14#13#13#13#14#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#13#12#13#13#12#13#13#12#13
+  +#13#12#13#12#12#13#12#13#12#13#12#13#14#14#15#14#14#16#23#23#23#23#21#11#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#23#23#23#23#23#21#15#14
+  +#14#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14
+  +#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13
+  +#13#13#13#13#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#243#243#208#23#23#23
+  +#23#23#23#23#23#22#23#22#23#22#210#243#242'zzzyyxxwwvvuuuutttihhaaa````]]SSS'
+  +'RRRRQQQQPPONNNKKKKJJJII66555444433332211//,'#162#243#243#145#16#16#16#16#16
+  +#16#16#16#16#16#15#16#15#16#15#16#24#243#243#234'*!!    '#31#31#31#30#30#30
+  +#30#30#29#30#29#29#29#29#29#29#28#29'H'#243#243#20#14#13#13#13#13#13#13#13#13
+  +#13#12#13#21#243#243#248#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#14#13#13#13#13#14#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#12#13#13#13#13#12#13#13#13#13#12#13#13#12#13#13#12
+  +#13#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#14#14#15#14#14#19#23#23#23
+  +#23#17#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#21#23#23#23#23
+  +#15#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#14
+  +#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14
+  +#13#14#13#14#13#13#13#14#13#13#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#207#243#241
+  ,#23#23#23#23#23#23#23#23#23#22#23#22#22#149#243#243#140'zzzyyxxwwvvvuuutttih'
+  +'haaa````]]SSSRRRRQQQQPPONNNKKKJJJJII66554444443332211//8'#241#243#240#19#16
+  +#16#16#16#16#16#16#16#16#16#15#16#15#16#19#240#243#243'?#!!!   '#31#31#31#31
+  +#30#30#30#30#30#29#29#29#29#29#29#29#29#28#215#243#232#14#13#14#13#13#13#13
+  +#13#13#13#13#13#12#145#243#243#20#13#14#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#14#13#13#13#13
+  +#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#13#13#13#12
+  +#13#12#13#12#13#12#13#13#12#13#12#12#12#12#12#13#12#12#13#14#14#14#14#15#14
+  +#22#22#23#23#23#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#15
+  +#23#23#23#23#16#14#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14
+  +#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#14#13#14#14#13#13#14#13#13#14#13#13#14#13#13#14#13
+  +#13#14#13#14#13#14#13#13#13#14#13#13#13#14#13#13#14#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#145#243#243#144#23#23#23#23#23#23#23#23#23#22#23#22#25#243#243#203'{zzzyyxx'
+  +'wwvvuuuutttihhaaa````]]SSSRRRRQQQQPPONNNKKKKJJJII66555444433332211//n'#243
+  +#243#7#16#16#16#16#16#16#16#16#16#16#16#15#16#17#210#243#243'n##!!!!    '#31
+  +#31#31#30#30#30#30#30#29#30#29#29#29#29#29'$'#243#243#150#14#13#14#13#14#13
+  +#13#13#13#13#13#13#13#207#243#240#14#14#13#14#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#14#13
+  +#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#12
+  +#13#12#13#13#12#13#13#12#13#13#12#13#12#13#12#13#12#13#12#12#12#14#15#14#14
+  +#14#16#23#23#23#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11
+  +#21#23#23#23#20#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13
+  +#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13
+  +#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14
+  +#13#13#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#14#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#19#243#243#149#24#23#23#23#23#23#23#23#23#23#22#23#22#232#243#239'z{zzzyyxx'
+  +'wwvvuuuutttihhaaa````]]SSSRRRRQQQQPPONNNKKKJJJJII66554444433332211//'#213
+  +#243#243#144#16#16#16#16#16#16#16#16#16#16#16#15#151#243#243#165'#&##!!!!   '
+  +' '#31#31#31#30#30#30#30#30#29#30#29#29#29#29'H'#243#243#24#13#14#14#13#14#13
+  +#13#13#13#13#13#13#15#243#243#150#13#14#14#13#14#14#13#14#13#14#13#14#13#14
+  +#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13
+  +#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#12#13#13#13#13#12#13#13#13#12#13#13#13#13#13#12
+  +#13#13#12#13#13#12#13#12#13#12#12#13#12#13#12#12#12#12#13#12#13#13#14#14#15
+  +#14#14#21#23#23#23#23#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#17#23#23#23#23#15#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14
+  +#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#14#13#13#14#13#13#14#13#13
+  +#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#240#243#210#23#23#23#23#23#23#23#23#23#23#23#22#23#149#243#243#177'{{zzz'
+  +'yyxxwwvvvuuutttihhaaa````]]SSSRRRRQQQQPPONNNKKKKJJJII66555444443332211/:'
+  +#241#243#240#21#16#16#16#16#16#16#16#16#16#16#145#243#243#216'-&#&##!!!!   '
+  +#31#31#31#31#30#30#30#30#30#29#29#29#29#29#234#243#240#14#14#13#14#13#14#13
+  +#14#13#13#13#13#13#23#243#243#25#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#14#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#12#13#13#13#13#12#13#13#13#12#13#13#13#12#13
+  +#12#13#12#13#12#13#13#12#13#12#12#13#12#13#12#13#12#13#12#12#13#14#14#14#14
+  +#15#15#22#23#23#23#21#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12
+  +#22#23#23#23#19#14#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14
+  ,#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#14#13#13#14#13#13#14#13#13
+  +#14#13#14#13#14#13#13#13#13#13#13#13#13#13#14#13#13#14#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#150#243#243#24#24#23#23#23#23#23#23#23#23#23#23#22#25#243#243#220'|{zzzzyyx'
+  +'xwwvvuuuutttihhaaa````]]SSSRRRRQQQQPPONNNKKKJJJJII66554444433332211/'#156
+  +#243#243#211#19#16#16#16#16#16#16#16#16#26#243#243#241'@&&&&###!!!!    '#31
+  +#31#31#30#30#30#30#30#29#30#29'>'#243#243#147#14#14#14#14#13#14#13#14#13#13
+  +#13#13#13#150#243#243#17#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#14#13#13#13#14#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#13#12#13#13#12#13#13
+  +#12#13#13#12#13#12#12#13#12#12#12#13#12#13#12#12#13#12#12#13#14#15#14#14#14
+  +#20#23#23#23#23#23#23#23#23#23#23#21#19#19#20#15#16#15#15#12#12#12#11#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#19#23#23#23#22#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13
+  +#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#14#13#14#13#13#14#13#13
+  +#14#13#13#14#13#13#13#13#13#14#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#25#243#243#147#23#24#23#23#23#23#23#23#23#23#23#23#22#210#243
+  +#243#136'|{{zzzyyxxwwvvvuuutttihhaaa````]]SSSRRRRQQQQPPONNNKKKKJJJII66555444'
+  +'433332211/'#194#243#243#7#16#17#16#16#16#16#16#26#243#243#243'C''''''&&&&##'
+  +'!!!!   '#31#31#31#31#30#30#30#30#30#29#30#163#243#243#17#14#14#14#14#14#13
+  +#14#13#14#13#13#13#13#240#243#210#14#13#14#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#13#12#13#13#13#13#12#13#13#12
+  +#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#14
+  +#14#14#15#14#15#22#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23
+  +#23#23#23#23#23#19#20#19#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23#19#14#15#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#13#14#14#14#14#14#13#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#14#13#14#13#13#13#13#13#13#13#14#13#13
+  +#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#15#243#243#208#23#23#24#23#23#23#23#23#23#23
+  +#23#23#23#147#243#243#199'{{{{zzzyyxxwwvvuuuutttihhaaa````]]SSSRRRRQQQQPPONN'
+  +'NKKKJJJJII665544444433322118'#224#243#243#208#19#16#16#16#19#151#243#243#243
+  +'g''''''''&&&&###!!!!    '#31#31#31#30#30#30#30#30'"'#243#243#207#14#14#14#14
+  +#14#14#13#14#13#14#13#14#13#23#243#243#144#14#14#13#14#14#13#14#13#14#13#14
+  +#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13
+  +#13#13#14#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#13
+  +#13#13#12#13#13#12#13#13#12#13#13#12#13#12#13#12#13#12#12#12#12#13#12#13#12
+  +#12#13#12#14#14#14#14#14#19#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23
+  +#23#23#23#23#23#23#23#23#23#23#23#23#13#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#21#23#23#23#22#14#14#15#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#13#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14
+  +#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#14#13#13#13#14#13#13#14#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#151#243#243#25#23#23#24#23#23#23
+  +#23#23#23#23#23#23#22#233#243#242'||{{{zzzyyxxwwvvvuuutttihhaaa````]]SSSRRRR'
+  +'QQQQPPONNNKKKKJJJII665554444333322118'#224#243#243#240#150#147#149#240#243
+  +#243#241'g((((''''''&&&&##!!!!   '#31#31#31#31#30#30#30#30#154#243#243#25#14
+  +#14#14#14#14#14#14#14#13#14#13#14#13#150#243#243#17#14#13#14#14#13#14#13#14
+  +#13#14#13#14#13#14#13#14#13#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13
+  +#13#13#13#14#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13
+  +#13#12#13#13#12#13#12#13#13#12#13#13#12#13#13#12#12#12#13#12#13#12#13#12#12
+  ,#13#12#13#12#12#13#13#15#14#15#14#15#22#23#23#23#23#23#23#23#23#23#23#23#23
+  +#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#17#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#15#23#23#23#23#17#14
+  +#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#13#14#14#13#14#14
+  +#13#14#14#13#14#14#13#14#14#13#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#14#13#13#13
+  +#13#13#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#25#243#243#147#24#23
+  +#23#24#23#23#23#23#23#23#23#23#23#150#243#243#182'|||{zzzzyyxxwwvvuuuutttihh'
+  +'aaa````]]SSSRRRRQQQQPPONNNKKKJJJJII665544444333322118'#213#243#243#243#243
+  +#243#243#243#224'A)((((''''''''&&&###!!!!   '#31#31#31#31#30#30'$'#238#243
+  +#232#14#14#14#14#14#14#14#14#14#14#13#14#13#14#233#243#210#14#14#13#14#13#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13
+  +#14#13#13#13#14#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#13#12#13#13
+  +#13#12#13#13#13#13#13#12#13#13#12#13#12#13#12#13#12#12#13#12#13#12#12#13#12
+  +#13#12#13#12#12#13#12#13#12#13#14#14#14#14#14#14#14#14#15#16#16#16#16#19#19
+  +#19#20#21#20#21#23#23#23#23#23#23#23#23#23#23#23#23#23#22#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#21#23#23#23
+  +#22#14#14#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14
+  +#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#14#13#14#13#13#14#13#14#13#13#14#13#13#14#13#13#14#13#14#13#13#14
+  +#13#14#13#13#13#13#13#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#15#233#243#232
+  +#23#24#23#23#24#23#23#23#23#23#23#23#23#24#240#243#239'}|||{{zzzyyxxwwvvvuuu'
+  +'tttihhaaa````]]SSSRRRRQQQQPPONNNKKKKJJJII66555444443332211/n'#224#243#243
+  +#243#224'n)+)))(((''''''''&&&###!!!!   '#31#31#31#31#30#154#243#243#146#14#15
+  +#14#14#14#14#14#14#14#14#13#14#13#25#243#243#144#14#13#14#14#14#13#14#13#14
+  +#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14
+  +#13#13#13#13#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#13#12#13#13#13
+  +#12#13#13#13#12#13#12#13#13#12#13#12#13#13#12#13#12#12#13#12#12#13#12#13#12
+  +#13#12#13#12#12#13#12#13#15#14#15#14#15#14#14#14#14#14#14#15#14#14#14#14#14
+  +#15#14#14#14#14#15#16#16#16#19#19#19#23#23#23#23#13#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#22#23#23#23#17#14
+  +#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#13#13#14#13#13#13#13#14#13#13#14#13#13#14#13#13#14#13#14#13#13#13#13#13
+  +#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#150#243#243#144#23#24
+  +#23#23#24#23#23#23#23#23#23#23#23#150#243#243#182'}|||{zzzzyyxxwwvvuuuutttih'
+  +'haaa````]]SSSRRRRQQQQPPONNNKKKJJJJII665544444333322111/,,,,+++))))((('''''''
+  +'''&&&###!!!!   '#31#31#31'$'#238#243#240#16#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#207#243#243#15#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#14#13#13#13#14#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#13#12#13#13#12#13#12#13
+  +#13#12#13#12#13#12#12#13#12#12#13#12#12#13#12#12#12#13#12#13#12#12#12#12#14
+  +#14#14#14#14#15#14#15#14#15#14#14#14#15#14#15#14#14#14#15#14#14#14#14#14#14
+  +#14#15#14#22#23#23#23#17#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#21#23#23#23#22#14#14#14#15#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14
+  +#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#14
+  +#13#13#14#13#13#14#13#13#14#13#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13
+  +#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#21#243#243#207#24#23#24#23#23#24#23#23#23#23
+  +#23#23#23#24#241#243#239#137'}||{{{zzzyyxxwwvvvuuutttihhaaa````]]SSSRRRRQQQQ'
+  +'PPONNNKKKKJJJII66555444433332211///,,,+++))))(((''''''''&&&###!!!!   '#31#31
+  +#154#243#243#146#15#14#14#15#14#14#14#14#14#14#14#14#14#17#243#243#150#14#13
+  +#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13
+  ,#14#13#13#14#13#13#13#13#14#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13
+  +#13#13#13#12#13#13#13#13#12#13#13#12#13#12#13#13#12#13#13#12#13#12#13#12#13
+  +#12#13#12#13#12#12#13#12#13#12#12#13#12#13#12#12#14#14#15#14#14#14#14#14#14
+  +#14#14#15#14#14#14#14#14#15#14#14#15#14#15#14#15#14#14#14#14#20#23#23#23#21#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#16#22#23#23#23#17#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14
+  +#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#14#13#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13
+  +#14#13#14#13#13#13#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#232#243#240#25#23#24#23#24#23#23#24#23#23#23#23#23#23#151#243#243#199
+  +'}}||{{{zzzyyxxwwvvuuuutttihhaaa````]]SSSRRRRQQQQPPONNNKKKJJJJII665544444433'
+  +'32211//,,,,+++))))(((''''''''&&&###!!!!   *'#238#243#240#16#15#14#15#14#14
+  +#14#14#14#14#14#14#14#14#147#243#243#21#14#14#13#14#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#14#13#13#13
+  +#14#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#13#13
+  +#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#12#13
+  +#12#12#13#12#12#12#12#14#13#14#14#14#14#14#15#14#14#14#15#14#15#14#14#14#15
+  +#14#14#14#14#14#14#15#14#15#14#16#23#23#23#23#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#21#23#23#23#22#14
+  +#15#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#13#14#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14
+  +#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13
+  +#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#25#243#243#150#24#23
+  +#24#23#23#24#23#23#23#23#23#23#23#24#241#243#242#137'}}|||{zzzzyyxxwwvvvuuut'
+  +'ttihhaaa````]]SSSRRRRQQQQPPONNNKKKKJJJII66555444433332211///,,,+++))))((('''
+  +'''''''&&&###!!!!  '#164#243#243#26#14#15#14#14#15#14#15#14#14#14#14#14#14#15
+  +#240#243#232#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13
+  +#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#14#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#12#13#12#13#12#13#13#12
+  +#13#13#12#12#13#12#13#12#12#12#13#12#13#12#13#12#12#13#12#12#12#13#12#12#12
+  +#12#12#12#12#12#12#12#12#12#13#12#13#12#14#13#13#14#14#14#14#14#15#14#14#14
+  +#14#14#15#23#23#23#23#16#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#22#23#23#23#17#14#15#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14
+  +#14#14#14#14#13#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14
+  +#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13
+  +#14#13#13#14#13#13#14#13#13#14#13#13#13#14#13#13#14#13#13#13#13#13#14#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#15#233#243#233#24#23#24#23#24#23#23#24#23#23#23
+  +#23#23#23#149#243#243#221'~}}|||{{zzzyyxxwwvvuuuutttihhaaa````]]SSSRRRRQQQQP'
+  +'PONNNKKKJJJJII66554444433332211//,,,,+++))))(((''''''''&&&###!!!!>'#243#243
+  +#232#15#14#15#15#14#14#15#14#14#14#14#14#14#14#146#243#243#25#14#14#13#14#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13
+  +#13#14#13#13#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#13#12#13
+  +#13#13#12#13#13#13#13#13#12#13#13#12#13#12#13#13#12#13#12#13#12#12#12#13#12
+  +#13#12#13#12#12#13#12#13#12#13#12#12#12#13#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#14#15#14#14#14#20#23#23#23#20#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#11#21#23#23#23#22#15#14#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#14#14#13#14
+  +#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13
+  +#13#14#13#13#13#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#145#243#243#147#24#23#24#23#24#23#23#24#23#23#23#23#23#23#232#243#243#175
+  +'~}}|||{zzzzyyxxwwvvvuuutttihhaaa````]]SSSRRRRQQQQPPONNNKKKKJJJII66555444443'
+  ,'332211///,,,+++))))(((''''''''&&&###!!!'#216#243#243#23#15#15#14#15#14#15#14
+  +#15#14#15#14#14#14#14#232#243#240#15#14#13#14#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13
+  +#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#13#12#13#13#13#12#13#13#13
+  +#12#13#12#13#13#12#13#12#13#13#12#12#13#12#13#12#13#12#12#12#13#12#13#12#12
+  +#13#12#13#12#12#12#12#13#12#13#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#13#14#15#14#15#17#23#23#23#23#11#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#22#23#23#23#19
+  +#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#13#14#14#13#14#14#13#14#14
+  +#13#14#14#13#14#14#13#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#14#13#13#14
+  +#13#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#14#243#243#233#24#24
+  +#23#24#23#24#23#23#24#23#23#23#23#23#145#243#243#239#138'~}}||{{{zzzyyxxwwvv'
+  +'uuuutttihhaaa````]]SSSRRRRQQQQPPONNNKKKJJJJII66554444433332211//,,,,+++))))'
+  +'(((''''''''&&&###!'#154#243#243#152#15#14#15#15#15#14#15#14#14#15#14#14#14
+  +#14#25#243#243#145#14#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#14#13#13#14#13#13#14#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#13#12#13#13#12#13#12#13
+  +#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#12#12#12#12#12
+  +#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#14#14#14#14#15#23#23#23#23#14#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#21#22#23#23#22#15#14#14#15#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13
+  +#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14
+  +#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13
+  +#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13#14#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#150#243#243#147#24#23#24#23#24#23
+  +#24#23#23#24#23#23#23#23#151#243#243#204'~~}}|||{zzzzyyxxwwvvvuuutttihhaaa``'
+  +'``]]SSSRRRRQQQQPPONNNKKKKJJJII66555444433332211///,,,+++))))(((''''''''&&&#'
+  +'#?'#243#243#240#17#15#15#15#14#15#15#14#15#15#14#15#14#15#14#232#243#240#15
+  +#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#13#14#13#13#14#13
+  +#13#14#13#13#14#13#13#14#13#13#13#13#13#13#14#14#14#14#14#14#15#14#14#14#14
+  +#14#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#12#13#13#13#13#12#13#13#13#13#12#13#13#12#13#13#12#13#12#13#12#13#13#12#13
+  +#12#13#12#12#12#12#13#12#12#12#12#12#13#12#13#12#13#12#12#12#12#13#12#13#12
+  +#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#14#15#14#14
+  +#14#22#23#23#23#17#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23#20#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14
+  +#14#13#14#14#14#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#14#13
+  +#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#13#13#14#13#13#14#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#14#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#16#243#243#233#24#24#23#24#24#23#23#24#23#23#23#24
+  +#23#23#24#233#243#243#176'~~}}||{{{zzzyyxxwwvvuuuutttihhaaa````]]SSSRRRRQQQQ'
+  +'PPONNNKKKJJJJII66554444443332211//,,,,+++))))(((''''''''&&&#'#216#243#243#24
+  +#15#15#15#15#15#15#15#14#15#14#15#14#15#14#146#243#243#145#14#14#14#13#14#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13
+  +#14#13#13#14#13#13#14#14#15#14#14#14#15#14#14#14#15#14#15#14#14#14#15#14#14
+  +#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13
+  +#13#13#12#13#13#13#13#13#12#13#12#13#13#12#13#13#12#13#12#12#12#12#13#12#13
+  +#12#12#13#12#13#12#13#12#13#12#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#14#14#14#15#14#20#23#23#23
+  +#21#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#20#23#23#23#23#16#15#14#15#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#14#14#14#14#14#15#14
+  +#15#14#14#14#14#13#14#14#13#14#14#13#14#14#14#13#14#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#14#13#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13
+  +#14#13#13#13#13#13#14#13#13#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13
+  ,#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#12#145#243#243#150#24#24#23#24#23#24#23#24#23#23#23#23#23#23#145#243
+  +#243#242#138'~~}}||{{{zzzyyxxwwvvvuuutttihhaaa````]]SSSRRRRQQQQPPONNNKKKKJJJ'
+  +'II66555444433332211///,,,+++))))(((''''''''&&'#160#243#243#152#15#15#15#15
+  +#15#15#15#14#15#15#14#15#14#14#16#240#243#240#15#14#13#14#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13
+  +#14#14#14#14#15#14#14#15#14#14#15#14#14#14#14#14#14#15#14#14#14#14#14#14#14
+  +#14#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13
+  +#13#12#13#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13
+  +#12#13#12#12#13#12#12#12#12#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#13#14#14#14#14#17#23#23#23#23#11#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#12#23#23#23#23#21#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#15#14#15#14#14#14#14#14
+  +#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#14#13#13#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14
+  +#13#13#14#13#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#14#240#243#241#25#24#23#24#24#23#24#23#24#23#24#23#23#23#23#151#243#243
+  +#229'~~}}||{{{zzzyyxxwwvvuuuutttihhaaa````]]SSSRRRRQQQQPPONNNKKKJJJJII66554'
+  +'444433332211//,,,,+++))))(((''''''''G'#243#243#240#17#15#15#15#15#15#15#15
+  +#15#15#15#14#15#14#15#146#243#243#145#14#14#13#14#13#14#14#13#14#13#14#13#14
+  +#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#14#14#15
+  +#14#14#14#15#14#14#14#14#15#14#15#14#15#14#14#14#15#14#15#14#14#14#14#14#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#13
+  +#13#12#13#12#13#13#12#13#13#12#13#13#12#13#12#12#13#12#13#12#13#12#13#12#13
+  +#12#12#13#12#13#12#13#12#12#12#13#12#13#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#15#14#15#14#15#23#23#23#23#13#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19
+  +#23#23#23#23#17#15#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#15#14#15#14#14#14#14#14#14#15#14#15#14#15#14#14#14
+  +#14#13#14#14#13#14#14#13#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#13#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13
+  +#14#13#13#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#145#243
+  +#243#152#24#24#23#24#24#23#24#23#23#23#24#23#23#23#23#232#243#243#204'~~}}|'
+  +'||{zzzzyyxxwwvvvuuutttihhaaa````]]SSSRRRRQQQQPPONNNKKKKJJJII665554444433322'
+  +'11///,,,+++))))(((''''@'#241#243#243#23#15#15#15#15#15#15#15#15#15#15#14#15
+  +#15#14#19#243#243#232#15#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#13#14#13#14#13#13#14#13#13#14#13#13#14#14#15#14#14#14#14#15#14#14
+  +#14#15#14#16#16#17#17#16#16#15#14#15#14#14#14#15#14#15#14#14#15#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#12#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13
+  +#12#13#13#12#13#13#12#12#13#12#13#12#12#12#12#13#12#12#12#12#13#12#13#12#12
+  +#12#12#12#12#13#12#12#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#14#14#14#14#14#22#23#23#23#16#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#22#23#23#23
+  +#22#15#14#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#15#14#15#14#14#14#14#15#14#15#14#15#14#14#14#14#14#14#14#14#14#14#14#13#14
+  +#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13
+  +#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#14#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#232#243#243#144
+  +#24#24#23#24#23#24#23#24#23#23#24#23#23#23#24#241#243#243#183'~~}}|||{{zzzy'
+  +'yxxwwvvuuuutttihhaaa````]]SSSRRRRQQQQPPONNNKKKJJJJII66554444433332211//,,,,'
+  +'+++))))(((-'#216#243#243#145#15#15#16#15#15#15#15#15#15#15#15#15#15#15#14
+  +#208#243#243#25#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#13#14#13#13#13#14#13#13#14#13#13#14#14#14#14#14#15#14#15#14#14#15#19#20#22
+  +#23#23#23#23#23#23#23#23#23#21#17#15#14#14#14#14#14#15#14#14#14#13#13#13#13
+  +#13#13#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#13#12#13#13#12#13#12#13
+  +#12#13#12#13#13#12#12#12#13#12#13#12#13#12#13#12#13#12#13#12#12#13#12#12#12
+  +#12#12#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#14#14#15#14#14#21#23#23#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#22#23#23#23#20
+  +#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#15#14#15#14#14#14#15
+  ,#14#14#15#14#14#14#14#14#16#17#20#21#21#15#14#15#14#14#14#14#14#14#13#14#14
+  +#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14
+  +#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#14#13#13#13#13#13#13#14#13
+  +#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#23#243#243#211#23#24
+  +#24#24#24#23#24#23#24#23#23#24#23#23#23#145#243#243#243#143'~~}}|||{zzzzyyx'
+  +'xwwvvvuuutttihhaaa````]]SSSRRRRQQQQPPONNNKKKKJJJII66555444433332211///,,,++'
+  +'+))))(('#216#243#243#151#15#16#15#15#15#15#15#15#15#15#15#15#15#15#14#24#243
+  +#243#207#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13
+  +#14#13#14#13#13#14#13#13#14#14#14#15#14#14#14#14#14#16#21#23#23#23#23#23#23
+  +#23#23#23#23#23#23#23#23#23#23#21#17#15#14#14#14#14#15#14#14#14#12#13#13#13
+  +#13#13#13#13#12#13#13#13#13#12#13#13#13#13#12#13#13#12#13#12#13#13#12#13#13
+  +#12#13#12#13#12#13#12#13#12#13#12#12#13#12#13#12#12#13#12#12#12#13#12#13#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#13#14#14#15#14#19#23#23#23#23#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#21#23#23#23#23#16#14
+  +#14#15#14#14#14#14#14#14#14#14#14#15#14#15#14#14#14#15#14#14#15#14#14#14#15
+  +#14#15#17#19#21#23#23#23#23#23#23#21#15#14#14#15#14#14#14#14#14#13#14#14#13
+  +#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#14#13#13#14#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#207#243#243#150#24#24#23
+  +#24#24#23#24#23#24#23#23#24#23#23#23#147#243#243#242#143'~~}}|||{{zzzyyxxww'
+  +'vvuuuutttihhaaa````]]SSSRRRRQQQQPPONNNKKKJJJJII66554444443332211//,,,,+++))'
+  +'))'#165#243#243#210#17#16#16#15#16#15#15#15#15#15#15#15#15#15#15#16#240#243
+  +#243#20#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13
+  +#13#14#13#13#14#13#13#14#14#14#15#14#14#15#14#16#22#23#23#23#23#23#23#23#23
+  +#23#23#23#23#23#23#23#23#23#23#23#23#21#17#15#14#14#14#14#15#14#14#13#13#13
+  +#13#12#13#13#13#13#12#13#13#13#13#12#13#13#13#13#13#12#13#13#12#13#12#13#12
+  +#13#12#13#12#13#12#13#12#13#12#13#12#12#13#12#13#12#13#12#13#12#12#12#12#12
+  +#13#12#13#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#13#14#14#14#14#16#23#23#23#23#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#23#23#23#23#22#15
+  +#14#14#14#14#14#14#15#14#15#14#14#14#14#14#15#14#14#14#14#15#14#14#16#19#20
+  +#22#22#23#23#23#23#23#23#23#23#23#23#21#15#14#14#14#15#14#14#14#14#13#14#14
+  +#13#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#14
+  +#13#13#14#13#13#14#13#13#14#13#13#14#13#14#13#13#13#13#13#13#13#14#13#13#14
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#16#240#243#240#26#24#24
+  +#23#24#24#23#24#23#24#23#23#24#23#23#23#152#243#243#242#143'~~}}|||{zzzzyyx'
+  +'xwwvvvuuutttihhaaa````]]SSSRRRRQQQQPPONNNKKKKJJJII66555444433332211///,,,++'
+  +'+))'#166#243#243#232#19#15#16#15#16#15#16#15#16#15#15#15#15#15#15#15#149#243
+  +#243#145#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13
+  +#14#13#13#14#13#13#14#13#14#15#14#14#14#15#14#20#23#23#23#23#23#23#23#23#23
+  +#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#21#16#14#15#14#14#14#14#14#13
+  +#13#13#13#13#12#13#13#13#13#12#13#13#13#13#12#13#13#12#13#12#13#12#13#13#12
+  +#13#13#12#12#13#12#12#12#12#12#12#12#13#12#12#12#13#12#12#13#12#12#13#12#13
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#15#14#15#14#15#23#23#23#23#13#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#23#23#23#23
+  +#20#15#14#15#14#15#14#14#14#14#15#14#15#14#14#14#15#14#16#17#19#21#23#23#23
+  +#23#23#23#23#23#23#23#23#23#23#23#23#23#23#21#15#14#14#14#14#14#14#14#14#13
+  +#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#14#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#13#26#243#243#211#24
+  +#24#24#23#24#24#23#24#23#24#23#23#24#23#23#23#207#243#243#237#138'~~}}|||{{'
+  +'zzzyyxxwwvvuuuutttihhaaa````]]SSSRRRRQQQQPPONNNKKKJJJJII66554444433332211//'
+  +',,,,+++'#166#243#243#240#22#16#16#16#15#16#15#16#15#15#15#15#15#15#15#15#24
+  +#243#243#232#15#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#13
+  +#13#14#13#13#14#13#13#14#13#14#14#14#14#14#15#14#16#22#23#23#23#23#23#23#23
+  +#21#16#13#12#0#0#0#0#12#13#15#20#23#23#23#23#23#23#23#23#17#14#14#15#14#14#14
+  +#14#12#13#13#13#13#12#13#13#13#13#12#13#13#13#13#12#13#13#12#13#13#12#13#12
+  +#13#12#13#13#12#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#12#12#12#12#12
+  ,#12#12#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#14#14#14#14#14#22#23#23#23#16#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#21#22#23
+  +#23#23#16#14#14#14#14#14#15#14#14#14#14#14#15#17#19#20#23#23#23#23#23#23#23
+  +#23#23#23#23#23#23#23#23#23#23#21#23#23#23#23#23#21#15#14#15#14#14#15#14#14
+  +#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#14#13#13#14#13
+  +#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#12#207#243#243
+  +#150#24#24#24#23#24#24#23#24#23#24#23#23#24#23#23#23#207#243#243#237#142'~~'
+  +'}}|||{zzzzyyxxwwvvvuuutttihhaaa````]]SSSRRRRQQQQPPONNNKKKKJJJII665554444433'
+  +'32211///,,,+'#185#243#243#240#22#16#16#16#15#16#16#15#16#15#16#15#15#15#15
+  +#15#17#240#243#243#21#14#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#14#13#13#14#13#13#14#13#14#14#14#15#14#14#14#17#23#23#23#23#23#23
+  +#23#17#12#0#0#0#0#0#0#0#0#0#0#0#0#11#16#21#23#23#23#23#23#23#20#14#14#15#14
+  +#14#14#14#12#13#13#13#13#12#13#13#13#13#12#13#13#13#13#12#13#13#12#13#13#12
+  +#13#13#12#13#12#13#12#13#12#13#12#13#12#12#13#12#13#12#12#13#12#12#13#12#12
+  +#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#14#14#15#14#14#21#23#23#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#13#23#23
+  +#23#23#22#15#14#15#14#14#14#15#16#19#20#22#23#23#23#23#23#23#23#23#23#23#23
+  +#23#23#23#23#23#22#19#16#12#0#0#14#23#23#23#23#23#21#15#14#14#15#14#14#14#14
+  +#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#14#13#13#14
+  +#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#13#13#16#240#243#243
+  +#144#24#24#24#24#23#24#24#23#24#23#24#23#23#24#23#23#207#243#243#242#143'~~'
+  +'}}|||{{zzzyyxxwwvvuuuutttihhaaa````]]SSSRRRRQQQQPPONNNKKKJJJJII665544444333'
+  +'32211//,,,'#185#243#243#240#22#16#16#16#16#16#16#15#16#16#15#16#15#16#15#15
+  +#15#208#243#243#145#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#13#14#13#13#14#13#13#13#14#14#15#14#14#15#17#22#23#23#23#23#23#17
+  +#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#15#22#23#23#23#23#23#20#14#14#15#14#14
+  +#14#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#13#12#13#12#13#12#13#12#13
+  +#13#12#12#13#12#12#13#12#13#12#13#12#12#13#12#13#12#12#13#12#12#12#13#12#12
+  +#12#13#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#13#14#14#15#14#20#23#23#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#17#23#23#23
+  +#23#20#14#15#17#20#21#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#19
+  +#16#14#11#0#0#0#0#0#0#0#14#23#23#23#23#23#21#15#14#14#14#15#14#14#14#14#13#14
+  +#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13
+  +#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#14#13#13#14#13#13#14#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#12#13#25#243#243#232#25#24#24
+  +#23#24#24#23#24#23#24#23#23#24#23#23#23#23#207#243#243#242#143'~~}}|||{zzzz'
+  +'yyxxwwvvvuuutttihhaaa````]]SSSRRRRQQQQPPONNNKKKKJJJII66555444433332211///'
+  +#185#243#243#240#22#16#16#16#16#16#16#16#16#15#16#16#15#16#15#16#15#145#243
+  +#243#210#13#14#14#13#14#14#13#14#14#14#13#14#13#14#13#14#13#14#13#14#13#13#14
+  +#13#13#14#13#13#14#13#14#14#14#14#14#15#16#23#23#23#23#23#21#12#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#11#20#23#23#23#23#23#20#14#14#15#14#14#14#13#13#13
+  +#13#12#13#13#13#12#13#13#13#13#12#13#12#13#13#12#13#13#12#13#12#13#12#12#13
+  +#12#12#12#12#12#13#12#13#12#12#12#13#12#12#12#13#12#12#13#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#13#14#15#14#14#19#23#23#23#23#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#21#22#23#23#23#23#23#23
+  +#23#23#23#23#23#23#23#23#23#23#23#23#23#23#21#17#15#12#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#14#23#23#23#23#23#21#16#14#14#14#14#14#14#14#14#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13
+  +#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#12#13#13#13#13#13#12#13#150#243#243#208#24#24#24#24#24#23#24#24#23
+  +#24#23#23#24#23#23#23#23#207#243#243#242#183'~~}}|||{{zzzyyxxwwvvuuuutttihh'
+  +'aaa````]]SSSRRRRQQQQPPONNNKKKJJJJII665544444433322118'#224#243#243#240#22#16
+  +#16#16#16#16#16#16#16#16#16#15#16#16#15#15#16#23#243#243#240#17#14#13#14#14
+  +#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13
+  ,#14#14#15#14#15#14#16#23#23#23#23#23#19#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#17#23#23#23#23#23#17#15#14#14#15#14#13#13#13#13#13#12#13#13#13
+  +#13#12#13#13#13#13#12#13#12#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12#13
+  +#12#12#13#12#13#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#13#14#14#14#15#16
+  +#22#23#23#23#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#23#23#23#23#23#23#23#23#23#23#23#23#23
+  +#23#23#23#22#19#16#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23#23
+  +#22#16#14#15#14#15#14#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#14#13#14#13
+  +#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13
+  +#13#13#12#15#210#243#243#150#24#24#23#24#24#23#24#23#24#23#24#23#24#23#24#23
+  +#23#207#243#243#243#201'~~}}|||{zzzzyyxxwwvvvuuutttihhaaa````]]SSSRRRRQQQQP'
+  +'PONNNKKKKJJJII665554444333322T'#235#243#243#232#22#17#16#16#16#16#16#16#16
+  +#16#16#16#16#15#16#16#15#20#240#243#243#23#14#14#14#13#14#14#13#14#14#13#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#14#14#14#14#14#15
+  +#22#23#23#23#23#17#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#17#23
+  +#23#23#23#23#16#14#14#14#14#14#13#13#13#13#13#12#13#13#13#13#12#13#12#13#13
+  +#12#13#13#12#13#12#13#13#12#13#12#13#12#13#12#13#12#12#13#12#13#12#12#13#12
+  +#13#12#12#13#12#13#12#13#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#15#14#14#14#16#23#23#23#23#12#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#16#23#23#23#23#23#23#23#23#23#23#23#20#16#14#11#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23#23#22#17#14#14#14#14#15#14
+  +#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14
+  +#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#19#240#243#243
+  +#146#24#24#24#24#24#23#24#24#23#24#23#23#24#23#23#23#23#147#243#243#243#223
+  +#138'~~}}|||{{zzzyyxxwwvvuuuutttihhaaa````]]SSSRRRRQQQQPPONNNKKKJJJJII665544'
+  +'4443333q'#241#243#243#211#19#17#16#17#16#17#16#16#16#16#16#16#16#16#16#15#16
+  +#17#210#243#243#147#14#13#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#14#13#14#13#13#14#13#13#14#14#15#14#15#14#21#23#23#23#23#19#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#17#23#23#23#23#22#14#15#14
+  +#15#14#14#12#13#13#13#13#12#13#13#13#13#13#12#13#12#13#12#13#13#12#13#12#13
+  +#12#12#13#12#13#12#13#12#13#12#13#12#12#13#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#13#14#15#14#14#14#23#23#23#23#13#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#20#23#23
+  +#23#23#23#21#19#15#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#12#21#23#23#23#23#23#17#15#14#14#14#14#14#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14
+  +#13#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#12#13#13#13#12#13#13#13#23#243#243#241#144#24#24#24#24#24#23#24#24#23
+  +#24#23#23#24#23#23#23#23#146#241#243#243#239#143'~~}}|||{zzzzyyxxwwvvvuuuttt'
+  +'ihhaaa````]]SSSRRRRQQQQPPONNNKKKKJJJII66555444449'#186#243#243#243#151#19#17
+  +#16#17#16#17#16#16#16#16#16#16#16#16#16#16#16#15#151#243#243#207#14#14#13#14
+  +#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#14#13#13
+  +#14#13#14#14#14#14#14#16#23#23#23#23#21#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#19#23#23#23#23#19#14#14#14#14#14#13#13#13#12#13#13
+  +#13#12#13#13#13#12#13#13#12#13#12#13#12#13#13#12#13#12#12#12#12#12#12#12#13
+  +#12#12#13#12#13#12#13#12#13#12#12#12#12#13#12#13#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#13#14#14#14#14#15#14
+  +#14#23#23#23#23#16#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#21#19#16#13#11#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#21#23#23#23#23#23
+  +#17#15#14#15#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12
+  +#13#13#145#243#243#240#25#24#24#23#24#24#23#24#23#24#23#24#23#24#23#24#23#23
+  +#248#232#243#243#243#200'~~}}|||{{zzzyyxxwwvvuuuutttihhaaa````]]SSSRRRRQQQQP'
+  ,'PONNNKKKJJJJII66554444Y'#224#243#243#243#146#17#16#17#17#16#17#16#17#16#16
+  +#16#16#16#16#16#16#16#16#151#243#243#210#15#14#14#13#14#14#13#14#14#13#14#14
+  +#13#14#13#14#13#14#13#14#13#14#13#13#14#13#14#13#13#14#13#14#14#15#14#15#14
+  +#22#23#23#23#23#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#11#21#23#23#23#22#15#15#14#14#15#13#13#13#13#13#12#13#13#13#12#13#13#12#13
+  +#13#12#13#13#12#13#12#12#13#12#13#12#13#12#13#12#12#13#12#13#12#13#12#12#12
+  +#12#13#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#14#14#14#15#14#14#14#15#14#21#23#23#23#16#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#11#20#23#23#23#23#17#14#14#14#14#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13
+  +#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#150#243#243#232#25#24#24
+  +#24#24#24#23#24#24#23#24#23#23#24#23#23#23#23#24#207#243#243#243#237#143'~}}'
+  +'|||{zzzzyyxxwwvvvuuutttihhaaa````]]SSSRRRRQQQQPPONNNKKKKJJJII665554'#161#243
+  +#243#243#232#23#17#17#17#17#16#17#16#17#16#17#16#17#16#16#16#16#16#16#145#243
+  +#243#240#20#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#13#14#13#13#14#13#13#14#14#14#14#14#17#23#23#23#23#16#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23#19#14#15#14
+  +#14#14#13#13#12#13#13#13#12#13#13#12#13#12#13#12#13#12#13#13#12#13#12#13#12
+  +#13#12#13#12#13#12#13#12#13#12#13#12#13#12#12#12#12#12#12#12#12#12#13#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#14#14#14
+  +#14#15#14#14#15#14#15#17#23#23#23#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12
+  +#23#23#23#23#16#15#14#15#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13
+  +#13#13#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12
+  +#13#13#13#12#13#13#13#12#207#243#243#232#25#24#24#24#24#24#23#24#24#23#24#23
+  +#23#24#23#23#23#23#23#146#241#243#243#243#200#137'}}||{{{zzzyyxxwwvvuuuuttti'
+  +'hhaaa````]]SSSRRRRQQQQPPONNNKKKJJJJII665e'#235#243#243#243#151#20#17#17#17
+  +#17#17#17#17#16#17#16#17#16#16#16#16#16#16#16#26#243#243#240#20#13#14#14#14
+  +#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13
+  +#13#14#13#14#15#14#15#14#21#23#23#23#22#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#21#23#23#23#22#14#14#14#15#14#13#13#13#13#12
+  +#13#13#13#13#12#13#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12
+  +#13#12#12#12#12#12#13#12#12#13#12#12#13#12#12#12#13#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#13#14#14#14#15#14#14#14#15#14#17#22
+  +#23#23#23#23#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#13#23#23#23#23#15#14#14
+  +#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#13#14#13#13#14#13#13#14#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13
+  +#13#15#210#243#243#232#25#24#24#23#24#24#23#24#23#24#23#24#23#24#23#24#23#23
+  +#23#24#208#243#243#243#239#183'}}|||{zzzzyyxxwwvvvuuutttihhaaa````]]SSSRRRRQ'
+  +'QQQPPONNNKKKKJJJIIU'#197#243#243#243#240#26#17#17#17#17#17#17#17#17#17#17#16
+  +#17#16#17#16#17#16#16#16#248#243#243#243#25#14#14#13#14#14#13#14#14#13#14#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#14#14#14
+  +#14#15#23#23#23#23#16#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#14#23#23#23#23#17#14#15#14#14#13#13#13#13#13#12#13#13#12#13#12
+  +#13#13#12#13#13#12#13#13#12#12#12#12#12#12#12#12#13#12#12#12#13#12#13#12#13
+  +#12#12#12#12#12#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#13#14#15#14#15#14#14#14#15#14#17#22#23#23#23#23#23#23#23#16#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#22#23#23#23#14#14#15#14#14#14#13#14#13#14
+  +#13#14#13#14#13#14#13#14#13#14#13#13#13#13#14#13#13#14#13#13#14#13#13#14#13
+  +#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#14#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  ,#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#14#210#243#243
+  +#232#25#24#24#24#24#24#23#24#24#23#24#23#23#24#23#23#23#23#23#23#146#233#243
+  +#243#243#229#175'}||{{{zzzyyxxwwvvuuuutttihhaaa````]]SSSRRRRQQQQPPONNNKKKJJJ'
+  +'M'#170#243#243#243#243#150#20#17#17#17#17#17#17#17#17#17#17#17#17#16#17#16
+  +#17#16#17#16#144#243#243#243#25#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14
+  +#13#14#13#14#13#14#13#14#13#14#13#13#13#14#13#13#14#13#14#14#15#14#15#19#22
+  +#23#23#23#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#22#23#23#23#20#14#14#14#15#13#13#13#12#13#13#13#13#12#13#13#12#13#12
+  +#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#12#13#12
+  +#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#13#14#14#14#14#14#14#14#15#14#16#21#23#23#23#23#23#23#23#19#12#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#19#23#23#23#21#14#14#14#15#14#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13
+  +#14#13#13#13#14#13#13#14#13#13#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#13#14#210#243#243#232#25
+  +#24#24#23#24#24#24#23#24#23#24#23#23#24#23#23#24#23#23#23#24#151#243#243#243
+  +#243#228#175'||{{{zzzyyxxwwvvvuuutttihhaaa````]]SSSRRRRQQQQPPONNNKKKM'#172
+  +#241#243#243#243#208#23#19#17#19#17#17#17#17#17#17#17#17#17#17#17#17#16#17#16
+  +#17#16#144#243#243#243#25#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13
+  +#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#13#14#14#14#14#14#21#23#23
+  +#23#20#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#17#23#23#23#22#15#14#14#15#14#13#13#13#12#13#13#13#12#13#12#13#13#12#13#12
+  +#13#13#12#13#12#13#12#13#12#13#12#12#13#12#12#13#12#13#12#12#12#12#12#12#13
+  +#12#12#13#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#14#14#14
+  +#15#14#15#14#15#14#15#20#23#23#23#23#23#23#23#21#14#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#19#23#23#23#20#14#15#14#14#14#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13
+  +#13#13#13#13#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#14#210#243#243#232#25#24#24
+  +#24#24#23#24#24#23#24#23#24#23#24#23#23#23#23#23#23#23#25#207#243#243#243#243
+  +#229#182'|{{{zzzyyxxwwvvuuuutttihhaaa````]]SSSRRRRQQQQPPONNNX'#195#243#243
+  +#243#243#232#145#19#17#19#17#17#19#17#17#17#17#17#17#17#17#17#17#17#17#16#17
+  +#16#145#243#243#243#25#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#13#13#13#14#13#13#14#13#14#14#14#15#14#14#23#23#23
+  +#23#16#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#13#23#23#23#23#15#15#14#14#14#13#13#13#13#12#13#13#12#13#12#13#12#13#13#12
+  +#13#12#13#12#13#12#13#12#13#12#13#12#12#13#12#12#12#12#12#13#12#12#12#12#12
+  +#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#14#14#14#15#14
+  +#14#14#14#14#15#19#23#23#23#23#23#23#23#22#15#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#23#23#23#23#19#14#14#14#15#13#14#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14
+  +#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#14#210#243#243#233#144#24
+  +#24#24#24#23#24#24#23#24#23#24#23#24#23#23#23#23#23#23#23#23#25#207#243#243
+  +#243#243#239#199#136'{zzzzyyxxwwvvvuuutttihhaaa````]]SSSRRRRQQQQPPO'#157#218
+  +#243#243#243#243#232#145#19#17#19#19#17#19#19#17#19#17#17#17#17#17#17#17#17
+  +#17#17#17#17#16#151#243#243#243#25#14#14#13#14#14#13#14#14#13#14#14#13#14#14
+  +#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#14#14#14
+  +#15#15#23#23#23#23#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#11#22#23#23#23#17#14#14#15#14#13#13#13#13#13#12#13#13#12#13
+  +#13#12#13#12#13#12#13#12#12#12#12#12#12#12#12#12#13#12#13#12#13#12#13#12#12
+  +#12#13#12#12#12#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#13#14
+  +#14#15#14#14#14#15#14#15#19#22#23#23#23#23#23#23#23#15#11#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#11#23#23#23#23#16#14#15#14#14#14#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13
+  +#14#13#13#14#13#13#13#13#13#13#13#14#13#13#13#14#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#13#13#14#210
+  +#243#243#241#145#24#24#24#24#23#24#24#23#24#23#23#23#24#23#24#23#23#23#23#23
+  +#23#23#25#207#243#243#243#243#243#229#180#134'zzzyyxxwwvvuuuutttihhaaa````]]'
+  +'SSSRRRRQQQj'#196#241#243#243#243#243#211#145#19#19#19#19#19#19#17#19#17#19
+  +#17#19#17#17#17#17#17#17#17#17#17#17#19#7#243#243#240#24#14#13#14#14#13#14#14
+  +#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13
+  +#13#14#13#13#14#14#15#14#14#16#23#23#23#23#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#22#23#23#23#19#14#14#14#14#13#13
+  +#13#12#13#13#12#13#13#12#13#13#12#13#13#12#12#13#12#13#12#13#12#13#12#13#12
+  +#13#12#13#12#13#12#12#13#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#13#14#15#14#14#14#14#15#14#14#17#22#22#23#23#23#23#23#23#17#11#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#23#23#23#23#15#14#14#14#15
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14
+  +#13#13#14#13#13#14#13#13#14#13#13#13#13#14#13#13#13#13#13#13#14#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#13#12#13#13#13#12#13#13
+  +#13#12#13#13#13#12#13#149#243#243#243#247#24#24#24#24#23#24#24#23#24#23#24#23
+  +#23#23#23#23#23#23#23#23#23#23#23#24#150#233#243#243#243#243#243#228#181#135
+  +'zyyxxwwvvvuuutttihhaaa````]]SSSRR_s'#196#242#243#243#243#243#243#151#25#19
+  +#19#19#19#19#19#19#19#19#19#17#19#17#19#17#19#17#17#17#17#17#17#17#21#211#243
+  +#243#240#20#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#14#14#14#14#15#17#23#23#23#23#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19
+  +#23#23#23#19#14#15#14#14#14#12#13#13#13#12#13#12#13#12#13#12#13#12#13#13#12
+  +#13#12#13#12#13#12#13#12#12#13#12#13#12#13#12#13#12#12#12#12#12#13#12#13#12
+  +#13#12#12#12#12#12#12#12#12#12#12#12#13#14#14#14#14#15#14#15#14#14#16#21#23
+  +#23#23#23#23#23#23#19#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#16#22#23#23#23#14#15#14#14#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13
+  +#14#13#13#14#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13
+  +#12#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#12#13#147#243#243#243#207#25
+  +#24#24#24#24#23#24#24#23#24#23#24#23#23#24#23#23#23#23#23#23#23#23#23#22#146
+  +#7#243#243#243#243#243#243#239#205#181#139'xxwwvvuuuutttihhaaa````]]k'#132
+  +#190#227#243#243#243#243#243#243#211#146#21#20#19#19#19#19#19#19#19#19#19#19
+  +#19#17#19#19#17#19#17#17#17#17#17#17#17#24#240#243#243#210#20#14#14#14#13#14
+  +#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#13
+  +#14#13#13#13#14#13#13#14#13#14#15#14#14#19#23#23#23#23#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19#23#23#23#21#14#14
+  +#15#14#14#13#12#13#13#13#12#13#13#12#13#13#12#13#12#13#12#12#13#12#13#12#13
+  +#12#13#12#12#12#12#12#12#12#12#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#13#14#14#15#14#14#14#14#14#15#21#23#23#23#23#23#23#23#21#13#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#23#23#23#21#14#14
+  +#15#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13
+  +#14#13#13#14#13#13#14#13#13#14#13#13#14#13#14#13#14#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#13
+  +#12#13#13#13#12#13#13#13#12#13#12#13#24#240#243#243#232#26#24#23#24#24#23#24
+  +#24#23#24#23#24#23#23#23#23#23#23#23#23#23#23#23#23#22#23#24#146#207#240#243
+  +#243#243#243#243#243#243#231#222#198#178#133#129'vuuutttihhal'#131#131#187
+  +#193#219#242#243#243#243#243#243#243#243#211#147#22#20#20#19#20#19#20#19#19
+  +#19#19#19#19#19#19#19#19#17#19#19#17#19#17#19#17#17#17#147#243#243#243#151#15
+  +#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#13#14#13#14#13#13#14#13#14#14#14#14#15#17#23#23#23#23#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19
+  +#23#23#23#21#14#14#14#14#14#12#13#13#13#12#13#12#13#13#12#13#13#12#13#12#13
+  +#12#12#12#12#12#12#12#13#12#13#12#13#12#13#12#12#13#12#12#12#12#13#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#13#14#14#14#15#14#15#14#20#23#23#23#23#23
+  +#23#23#22#15#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19
+  +#23#23#23#20#15#14#14#14#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#14
+  +#13#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12
+  +#13#13#13#12#13#13#13#13#12#13#13#13#12#13#13#12#13#13#13#20#232#243#243#241
+  +#247#24#24#24#24#23#24#23#24#23#23#24#23#23#24#23#23#23#23#23#23#23#23#23#22
+  +#23#22#22#22#144#150#210#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#230#226#226#226#226#243#243#243#243#243#243#243#243#243#243#243#243#243#232
+  +#152#145#21#20#20#19#20#19#20#19#20#19#19#19#19#19#19#19#19#19#19#19#19#17#19
+  +#17#19#17#19#17#21#208#243#243#243#146#14#14#14#14#13#14#14#13#14#14#13#14#14
+  +#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13
+  +#14#13#13#14#14#15#14#14#19#23#23#23#23#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19#23#23#23#20#14#15#14#14#14#13#13#12
+  +#13#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12
+  +#13#12#13#12#12#12#13#12#12#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#13
+  +#14#15#14#14#15#17#23#23#23#23#23#23#23#21#16#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#22#23#23#23#19#14#14#15#14#14#14#13#14#13#14
+  +#13#14#13#14#13#14#13#14#13#14#13#13#13#14#13#13#14#13#13#14#13#13#14#13#13
+  +#14#13#13#14#13#14#13#13#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#13
+  +#12#13#12#13#14#14#16#152#243#243#243#208#25#24#24#24#23#24#24#23#24#23#24#23
+  +#23#23#23#23#23#23#23#23#23#23#23#22#23#22#23#22#22#22#22#144#149#7#210#240
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#211#207#149#144#22#20#20#20#20#20#20#20#20#20#19#20#19#20#19#20#19#19#19
+  +#19#19#19#19#19#19#19#19#17#19#17#19#26#240#243#243#240#24#13#14#14#14#14#13
+  +#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#14#13#13#14#13#13#14#13#14#14#14#14#15#16#23#23#23#23#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#20#23#23#23#19
+  +#14#14#15#14#13#13#13#13#12#13#13#12#13#13#12#13#13#12#13#12#13#12#13#12#13
+  +#12#13#12#13#12#13#12#13#12#13#12#12#12#12#12#13#12#13#12#12#13#12#12#12#12
+  +#12#12#12#12#12#12#12#13#14#14#14#15#19#23#23#23#23#23#23#23#17#11#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#22#23#23#23#16#14
+  +#15#14#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#14#13#14#13#13#13#13#13#14#13
+  +#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13
+  +#13#13#12#13#13#13#13#12#13#13#12#13#14#14#14#14#14#144#243#243#243#241#146
+  +#24#24#24#23#24#24#23#24#23#24#23#23#24#23#23#23#23#23#23#23#23#23#22#23#22
+  +#22#22#22#22#22#22#22#22#22#21#144#144#247#150#150#150#210#210#210#210#210
+  +#152#150#149#150#144#26#23#21#20#21#20#21#20#20#20#20#20#20#20#20#20#19#20#20
+  +#19#20#19#19#19#19#19#19#19#19#19#19#19#19#19#17#19#20#207#243#243#243#207#17
+  +#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#13#13#13#14#13#13#14#13#13#13#13#14#15#14#14#16#23
+  +#23#23#23#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#23#23#23#23#17#15#14#14#14#13#13#13#13#12#13#12#13#12#13#13#12#13
+  +#13#12#13#12#13#12#13#12#13#12#12#12#12#12#12#12#12#12#12#13#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#13#14#15#14#14#19#23#23#23#23
+  +#23#19#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#12#23#23#23#23#16#14#14#14#15#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13
+  ,#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12
+  +#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#13#12#13#12#14#14#15#14#14#15
+  +#20#211#243#243#243#208#25#24#24#23#24#23#24#23#24#23#24#23#23#23#23#23#23#23
+  +#23#23#23#23#22#23#22#22#22#22#22#22#22#22#22#22#21#22#21#21#22#21#21#21#21
+  +#21#21#21#21#21#21#21#21#21#20#21#20#21#20#20#20#20#20#20#20#20#20#20#20#20
+  +#19#20#19#20#19#20#19#19#19#19#19#19#19#19#19#19#19#144#240#243#243#243#146
+  +#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13
+  +#14#13#14#13#14#13#14#13#14#14#13#14#13#13#14#13#13#14#13#14#13#14#14#14#15
+  +#14#23#23#23#23#14#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#12#23#23#23#23#16#14#14#15#14#13#13#13#13#12#13#13#12#13#12#13
+  +#12#13#12#12#12#12#12#12#12#12#12#13#12#13#12#13#12#13#12#13#12#12#13#12#12
+  +#12#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#13#14#14#14#15#17#23#23
+  +#23#22#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#15#23#23#23#23#14#15#14#14#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#14#13#13
+  +#14#13#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13
+  +#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#14#14#14#15#14
+  +#21#23#23#150#243#243#243#241#150#24#24#24#24#23#24#23#24#23#23#24#23#23#23
+  +#23#23#23#23#23#23#23#22#23#22#23#22#22#22#22#22#22#22#22#21#22#22#21#22#21
+  +#21#21#21#21#21#21#21#21#21#21#21#20#21#21#20#21#20#20#20#20#20#20#20#20#20
+  +#20#20#20#20#19#20#19#20#19#20#19#19#19#19#19#19#19#23#210#243#243#243#210#20
+  +#14#14#14#14#13#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14
+  +#13#14#13#14#13#14#13#14#13#14#13#13#13#14#13#13#14#13#13#14#13#14#14#15#14
+  +#14#14#22#23#23#23#17#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#15#23#23#23#23#14#15#14#14#14#13#13#12#13#13#12#13#13#12#13
+  +#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#12#12#12#13
+  +#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#13#14#15#14#14#19#23
+  +#23#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#16#22#23#23#22#14#14#15#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#14
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#12#14#15#14#14
+  +#14#23#23#23#23#26#232#243#243#243#233#145#24#23#24#24#23#23#24#23#23#24#23
+  +#23#23#23#23#23#23#23#23#23#22#23#22#22#22#22#22#22#22#22#22#22#21#22#21#21
+  +#22#21#22#21#21#21#21#21#21#21#21#21#21#20#21#20#20#21#20#21#20#20#20#20#20
+  +#20#20#20#20#20#19#20#20#19#20#19#19#19#19#19#19#22#151#243#243#243#240#146
+  +#14#13#14#14#14#14#14#13#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14
+  +#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#13#13#14
+  +#14#14#15#14#20#23#23#23#21#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#20#23#23#23#21#14#14#14#15#14#12#13#13#12#13#12#13#12
+  +#13#12#13#13#12#13#12#13#12#13#12#13#12#12#13#12#13#12#13#12#13#12#12#13#12
+  +#12#12#12#12#13#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#13#14#14#14#15
+  +#19#23#23#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#19#23#23#23#21#14#14#14#14#14#14#14#14#13#14#13#14#13#14#13#14
+  +#13#14#13#14#13#14#13#13#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13
+  +#13#13#13#13#14#13#13#14#14#14#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#12#13#12#14#14
+  +#14#15#14#23#23#23#23#23#19#144#233#243#243#243#211#145#23#24#24#23#24#23#24
+  +#23#23#24#23#23#23#23#23#23#23#23#23#22#23#22#22#22#22#22#22#22#22#22#22#21
+  +#22#22#21#22#21#21#21#21#21#21#21#21#21#21#21#21#21#20#21#20#21#20#20#20#20
+  +#20#20#20#20#20#20#20#20#19#20#19#20#19#20#19#19#21#247#240#243#243#243#152
+  +#17#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#14#13#13#14#13#14
+  +#13#14#14#14#14#14#16#23#23#23#23#14#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#23#23#23#23#17#15#14#14#14#14#13#12#13#13#12
+  +#13#13#12#13#13#12#13#12#12#13#12#13#12#13#12#13#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#14#14
+  +#15#14#14#21#23#23#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#21#23#23#23#19#14#15#14#14#14#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14
+  +#13#13#14#13#14#13#13#13#13#14#15#14#14#14#15#14#14#14#14#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#13#12#13
+  +#13#14#15#14#14#16#23#23#23#23#14#0#0#11#247#243#243#243#243#211#145#23#24#24
+  +#23#23#24#23#23#23#23#23#23#23#23#23#23#23#23#22#23#22#22#22#22#22#22#22#22
+  +#22#22#21#22#21#21#22#21#22#21#21#21#21#21#21#21#21#21#21#20#21#21#20#21#20
+  +#21#20#20#20#20#20#20#20#20#20#20#20#19#20#19#20#21#247#240#243#243#243#232
+  +#22#14#13#14#14#14#14#14#13#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14
+  +#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#14#13#14#13#13#14#13
+  +#13#13#14#13#14#15#14#15#14#22#23#23#23#21#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#17#23#23#23#23#15#14#15#14#14#13#13#13#12
+  +#13#13#12#13#13#12#13#12#13#13#12#12#12#12#12#12#12#13#12#13#12#13#12#13#12
+  +#13#12#12#13#12#12#12#12#12#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#13#14#14#14#15#20#23#23#23#16#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#23#23#23#23#17#14#14#15#14#14#14#14#13#14#13#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13
+  +#14#13#13#14#13#14#13#13#13#14#14#14#14#14#15#14#14#14#15#14#14#14#14#14#14
+  +#14#14#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13
+  +#13#12#13#14#14#14#15#16#23#23#23#23#0#0#0#0#0#14#150#243#243#243#243#211#146
+  +#24#23#24#23#24#23#23#24#23#23#23#23#23#23#23#23#23#22#23#22#22#22#22#22#22
+  +#22#22#22#22#21#22#22#21#22#21#21#21#21#21#21#21#21#21#21#21#21#20#21#20#21
+  +#20#20#20#20#20#20#20#20#20#20#20#20#20#19#20#22#150#240#243#243#243#232#25
+  +#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#14#13#13
+  +#14#13#14#13#13#14#14#14#14#14#19#23#23#23#23#14#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#23#23#23#23#21#14#14#14#15#14#13#13
+  +#13#12#13#12#13#12#13#12#13#13#12#12#13#12#13#12#13#12#13#12#13#12#13#12#13
+  +#12#13#12#13#12#12#13#12#13#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#14#15#14#14#14#22#23#23#23#16#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#23#23#23#23#16#15#14#14#14#14#13#14#13#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#13#14#13#13#14#13#13#14#13#13
+  +#14#13#13#14#13#13#13#13#13#14#13#14#14#15#14#14#14#15#14#14#14#14#15#14#14
+  +#15#14#14#14#14#14#15#14#14#14#14#14#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13
+  +#13#12#13#12#13#15#14#14#14#19#23#23#23#23#0#0#0#0#0#0#0#17#7#243#243#243#243
+  +#233#150#24#24#23#24#23#23#23#23#23#23#23#23#23#23#23#23#22#23#22#22#22#22#22
+  +#22#22#22#22#22#21#22#21#21#22#21#22#21#21#21#21#21#21#21#21#21#21#21#20#21
+  +#20#21#20#21#20#20#20#20#20#20#20#20#20#25#152#243#243#243#243#232#25#14#14
+  +#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14
+  +#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13
+  +#13#14#13#13#14#13#15#14#15#14#15#23#23#23#23#21#11#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19#23#23#23#23#16#14#15#14#14#14#12#13
+  +#13#13#12#13#13#12#13#13#12#13#13#12#13#12#13#12#13#12#12#13#12#13#12#13#12
+  +#13#12#12#12#12#12#12#12#12#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#14#14#15#14#14#23#23#23#23#15#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#13#23#23#23#23#15#14#14#15#14#14#14#13#14#13
+  +#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13
+  +#13#14#13#13#14#13#14#13#14#13#14#14#14#14#15#14#14#14#15#14#15#14#14#15#14
+  +#14#14#15#14#15#14#14#14#15#14#14#14#13#13#13#13#13#13#13#13#13#13#13#13#13
+  ,#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12
+  +#13#13#13#12#13#14#15#14#14#19#23#23#23#21#0#0#0#0#0#0#0#0#0#17#247#243#243
+  +#243#243#240#207#145#23#24#23#23#24#23#23#23#23#23#23#23#23#23#22#23#22#22#22
+  +#22#22#22#22#22#22#22#21#22#22#21#22#21#21#21#21#21#21#21#21#21#21#21#21#20
+  +#21#21#20#21#20#20#20#20#20#20#20#21#147#232#243#243#243#243#232#25#14#14#14
+  +#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13
+  +#14#13#13#14#13#14#13#14#14#14#14#14#19#23#23#23#23#17#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#15#23#23#23#23#21#14#14#14#14#15#13#13
+  +#12#13#12#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12#13#12#12#12#12#12#12
+  +#12#12#13#12#12#13#12#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#14#14#14#15#15#23#23#23#23#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#22#23#23#22#14#14#15#14#14#14#14#13#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13
+  +#14#13#13#14#13#13#14#13#14#13#13#14#14#15#14#14#15#17#17#16#14#14#14#15#14
+  +#14#15#14#14#14#14#14#15#14#14#15#14#14#14#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13
+  +#13#13#12#13#13#14#14#14#15#14#20#23#23#23#19#0#0#0#0#0#0#0#0#0#0#0#14#145
+  +#233#243#243#243#243#233#152#248#23#23#23#23#23#23#23#23#23#23#23#23#22#23#22
+  +#22#22#22#22#22#22#22#22#22#21#22#21#21#22#21#22#21#21#21#21#21#21#21#21#21
+  +#21#20#21#20#21#20#21#20#20#22#145#207#243#243#243#243#243#207#25#14#14#14#14
+  +#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14
+  +#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14
+  +#13#13#14#13#13#13#13#13#14#15#14#15#14#15#22#23#23#23#23#14#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#23#23#23#23#23#15#15#14#15#14#14
+  +#12#13#13#12#13#13#12#13#12#13#13#12#13#12#12#12#12#12#12#12#13#12#13#12#13
+  +#12#13#12#13#12#12#12#12#12#13#12#12#12#12#13#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#15#14#14#14#16#23#23#23#23#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19#23#23#23#21#14#14#14#14#14#14#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13
+  +#14#13#13#14#13#13#14#13#13#13#13#14#14#15#14#14#14#15#19#23#23#23#23#21#20
+  +#19#17#16#14#15#14#15#14#14#14#15#14#14#15#14#14#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13
+  +#13#13#12#13#13#12#13#13#14#15#14#14#21#23#23#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#11#23#208#243#243#243#243#243#233#152#146#23#23#23#23#23#23#23#23#23#23#22
+  +#23#22#22#22#22#22#22#22#22#22#22#21#22#22#21#22#21#21#21#21#21#21#21#21#21
+  +#21#21#21#21#20#21#20#23#147#207#243#243#243#243#243#240#147#17#14#14#14#14
+  +#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14#14#14#13#14#14#13#14#14#13#14
+  +#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14
+  +#13#13#14#13#13#14#13#14#13#14#13#14#14#14#14#14#16#23#23#23#23#23#14#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#21#23#23#23#23#19#14#14#14#14
+  +#14#13#13#13#13#13#12#13#13#12#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12
+  +#13#12#13#12#13#12#13#12#12#13#12#12#12#13#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#13#14#15#14#14#17#23#23#23#23#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#20#23#23#23#19#15#14#15#14#14
+  +#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#13#14#13#13
+  +#14#13#13#14#13#13#14#13#13#14#13#14#13#14#14#14#14#15#14#19#23#23#23#23#23
+  +#23#23#23#23#23#23#23#21#21#20#19#19#19#15#14#14#14#14#14#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13
+  +#13#13#12#13#13#13#13#12#13#14#14#14#14#15#20#23#23#23#16#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#14#145#211#243#243#243#243#243#243#211#151#144#23#23#23#23#23#23
+  +#23#22#23#22#22#22#22#22#22#22#22#22#22#21#22#21#21#22#21#22#21#21#21#21#21
+  +#21#21#21#21#24#146#152#232#243#243#243#243#243#243#152#23#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14
+  +#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13
+  +#13#14#13#13#14#13#13#14#13#14#13#13#14#14#15#14#15#14#19#23#23#23#23#23#14#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#21#23#23#23#23#21#14#15#14
+  +#15#14#14#13#12#13#12#13#12#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12#13
+  ,#12#13#12#13#12#13#12#12#12#13#12#12#12#12#12#12#13#12#13#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#13#14#14#15#14#19#23#23#23#23#14#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#23#23#23#23#19#14#14#14
+  +#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13
+  +#14#13#13#14#13#13#14#13#13#14#13#13#14#13#14#15#14#15#14#14#17#23#23#23#23
+  +#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#20#14#15#14#14#14#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13
+  +#13#13#12#13#13#13#12#13#13#13#12#14#14#15#14#14#23#23#23#23#16#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#15#146#211#243#243#243#243#243#243#243#232#7#149#145
+  +#24#22#23#22#23#22#22#22#22#22#22#22#22#22#22#21#22#22#21#22#21#21#21#21#21
+  +#25#145#149#210#240#243#243#243#243#243#243#240#152#25#15#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#13#14#14#13#14
+  +#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#14#14#14#14#14#14#21#23#23#23
+  +#23#23#16#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#15#23#23#23#23#23#22#14
+  +#14#14#14#14#14#13#13#13#13#13#12#13#12#13#12#13#13#12#13#12#13#12#13#12#13
+  +#12#12#12#12#12#12#12#12#12#13#12#12#12#12#12#13#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#14#14#14#14#15#20#23#23#23#23#23#17#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#22#23#23#23
+  +#16#14#15#14#14#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#14#14#14#14#14#17#23
+  +#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#15#14#15#14#14
+  +#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13
+  +#12#13#13#13#12#13#13#13#12#13#13#13#12#13#12#14#14#14#15#14#23#23#23#23#14#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#24#150#240#243#243#243#243#243
+  +#243#243#243#243#210#210#150#150#149#144#144#144#144#144#144#144#144#144#144
+  +#144#145#150#150#7#210#233#243#243#243#243#243#243#243#243#243#210#147#22#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14
+  +#14#13#14#14#13#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#13#13#14#13#13#14#13#13#14#13#13#14#13#14#13#14#13#13#14
+  +#14#15#14#15#14#15#21#23#23#23#23#23#20#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#11#19#23#23#23#23#23#22#15#15#14#15#14#15#13#13#13#12#13#13#12#13#13#12#13
+  +#12#13#12#13#12#12#12#12#12#12#13#12#13#12#13#12#13#12#13#12#13#12#12#13#12
+  +#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#14#15#14#14
+  +#14#16#21#23#23#23#23#23#19#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#12#23#23#23#23#15#14#14#15#14#14#13#14#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#14#13#13#13#13#13#14#13#13#14#13#13#14#13#13#14#13
+  +#13#14#14#14#15#14#15#14#16#22#23#23#23#23#17#12#15#16#19#22#23#23#23#23#23
+  +#23#23#23#23#23#23#20#14#14#15#14#14#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13
+  +#12#14#15#14#14#15#23#23#23#23#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#15#23#147#208#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#240
+  +#207#146#22#16#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#13#14#14#14#14#14#13#14#14#14#13#14#14#13#14#14#13#14#14#13#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#14#13#13#14#13
+  +#14#13#14#13#13#13#13#13#14#14#14#14#14#14#15#21#23#23#23#23#23#23#17#12#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#11#17#23#23#23#23#23#23#22#15#14#14#15#14#14#14#12
+  +#13#13#13#12#13#13#12#13#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12#13#12
+  +#13#12#13#12#12#12#13#12#12#12#12#12#13#12#13#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#14#14#15#14#14#15#14#21#23#23#23#23#23#20#12#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#22#23#23#23#14#15#14#14
+  +#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13
+  +#14#13#13#14#13#13#14#13#13#14#13#14#14#14#14#14#14#16#22#23#23#23#23#20#0#0
+  +#0#0#0#0#0#12#12#16#15#19#19#21#23#23#23#23#15#14#14#14#14#14#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13
+  ,#13#12#13#13#13#12#13#13#14#14#14#15#16#22#23#23#23#12#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#15#21#26#147#7#211#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#7#207#151#149#144#24
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#13#14#14#14#14#14#13#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#13#14#13#14#13#14#13#14#13#13#13#14#13#13#14#13#13#13#14#13#13
+  +#13#13#13#13#13#14#13#13#13#13#14#15#14#15#14#14#15#19#23#23#23#23#23#23#23
+  +#20#15#11#0#0#0#0#0#0#0#0#11#14#19#23#23#23#23#23#23#23#21#15#14#15#14#14#14
+  +#14#13#13#13#12#13#13#12#13#12#13#12#13#12#13#13#12#13#12#13#12#13#12#13#12
+  +#13#12#13#12#13#12#13#12#12#12#12#12#13#12#12#12#12#12#13#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#13#14#14#15#14#14#14#14#20#23#23#23#23#23#22#11#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#17#23#23#23#21#14
+  +#14#14#15#14#13#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#14#14#15#14#15#14#15#22#23#23#23#23
+  +#20#11#0#0#0#0#0#0#0#0#0#0#0#0#0#12#23#23#23#23#20#14#15#14#14#14#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13
+  +#12#13#13#13#12#13#13#12#13#14#15#14#14#16#23#23#23#23#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#15#19#17#17#19#17
+  +#17#19#17#17#19#17#17#11#0#0#0#12#23#23#23#23#16#14#15#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14
+  +#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#14#13#13#14#13#13#14#13#14#13#13#14#13#14#13#14#13#13#13#14#13#13
+  +#13#14#14#14#14#15#14#14#17#22#23#23#23#23#23#23#23#23#23#19#20#16#15#20#19
+  +#22#23#23#23#23#23#23#23#23#23#19#14#14#14#14#14#15#14#13#12#13#13#13#13#12
+  +#13#13#12#13#13#12#13#12#13#12#12#13#12#13#12#12#12#12#12#12#12#12#12#12#12
+  +#13#12#12#13#12#12#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#13#14#14#14#15#14#14#14#17#23#23#23#23#23#23#14#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19#23#23#23#20#15#14#14#14#14#14#14#13
+  +#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13
+  +#13#14#13#13#14#13#14#15#14#14#14#15#21#23#23#23#23#21#11#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#19#23#23#23#23#15#14#15#14#14#14#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#12#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#13#12
+  +#13#14#14#14#15#19#22#23#23#23#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#22#23
+  +#23#23#17#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#13#14#14#14#14#13#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14
+  +#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13
+  +#14#13#14#13#14#13#13#14#13#13#13#13#13#13#14#15#14#14#14#15#14#15#20#23#23
+  +#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#21#15#14#15#14
+  +#15#14#14#14#13#13#13#13#12#13#12#13#12#13#13#12#13#13#12#13#12#13#12#12#12
+  +#12#13#12#13#12#13#12#13#12#13#12#13#12#12#12#12#12#13#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#14#14#14#15#14#15#14#16
+  +#22#23#23#23#23#23#16#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#23#23#23#23#19#14#15#14#14#15#14#14#14#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#14#13#13#14#13#14#13#13#14#13#13#14#13#14#14#14#14#14#15#14#21
+  +#23#23#23#23#22#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#23#23#23#23#20#14#14#15
+  +#14#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#13
+  +#12#13#13#13#13#12#13#13#13#12#13#13#13#13#15#14#14#14#19#23#23#23#20#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#22#23#23#23#19#15#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14
+  +#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#13#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#14#13#14
+  +#13#13#14#14#15#14#14#14#14#14#16#20#23#23#23#23#23#23#23#23#23#23#23#23#23
+  +#23#23#23#23#23#21#16#14#15#14#14#14#14#15#14#12#13#13#12#13#13#13#13#12#13
+  +#12#13#12#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#12
+  +#13#12#12#12#12#13#12#13#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#14#14#14#14#14#14#15#15#22#22#23#23#23#23#19#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#22#23#23#23#16#14#14#15#14#14#14#14
+  +#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#14#13#13#13#13#14#13
+  +#13#14#13#13#14#14#14#15#14#14#14#20#23#23#23#23#22#11#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#19#23#23#23#23#15#14#14#14#14#14#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#12#13#13#13#13#12#13#13#13#13#12#13#13#13#13#12#13#13#13#12#13
+  +#13#14#15#14#14#20#23#23#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19#23
+  +#23#23#21#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#13#14#14#14#14#13#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14
+  +#13#14#13#14#13#14#13#13#14#13#13#13#13#13#13#13#14#14#14#15#14#15#14#14#14
+  +#15#17#21#23#23#23#23#23#23#23#23#23#23#23#23#22#19#15#14#14#14#14#14#15#14
+  +#14#14#13#13#12#13#13#13#12#13#13#12#13#13#12#13#13#12#13#12#13#12#13#12#13
+  +#12#13#12#13#12#13#12#13#12#13#12#13#12#12#12#13#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#13#15#14#15#14#14
+  +#14#15#21#23#23#23#23#23#20#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#12#23#23#23#23#22#17#14#14#14#15#14#14#15#14#14#14#13#14#13#14#13#14#13#14
+  +#13#14#13#14#13#14#13#13#14#13#14#13#13#14#13#13#14#14#14#14#14#15#14#20#23
+  +#23#23#23#23#14#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#23#23#23#23#20#14#15
+  +#14#14#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#13#12
+  +#13#13#13#13#12#13#13#13#13#12#13#13#12#14#14#14#15#14#21#23#23#23#19#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#22#23#23#23#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14
+  +#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#14#13#14#13#13#14#13#13#14#13#13#14#13#14#13#14#13#13#13#13#13#13#13#13
+  +#14#13#13#13#14#14#14#14#14#14#15#14#14#15#14#15#16#17#20#21#20#21#20#20#19
+  +#16#15#14#14#15#14#15#14#15#14#14#14#14#12#13#13#13#13#12#13#13#12#13#13#12
+  +#13#13#12#13#13#12#13#12#13#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#13#12#12#12#12#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#13#14#14#14#15#14#14#14#20#23#23#23#23#23#22#11#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#15#23#23#23#23#23#23#21#15#14#14#15#14
+  +#14#14#14#14#14#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#14#13#13#14#13
+  +#13#14#13#14#14#15#14#14#14#19#22#23#23#23#23#14#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#19#23#23#23#23#15#14#15#14#14#14#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#12#13#13#13#13#12#13#13#13#13#12#13#13#13#13#12#13#13#14
+  +#14#14#14#14#21#23#23#23#16#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#23#23
+  +#23#23#16#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#13#14#14#14#14#14#13#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14
+  +#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#14#13#13#14#13#13#14#13#13
+  +#13#13#13#13#13#13#13#13#14#13#14#13#13#13#13#13#13#13#14#14#15#14#14#14#15
+  +#14#14#14#14#15#14#14#14#15#14#14#14#15#14#15#14#14#14#14#14#14#14#14#13#13
+  +#13#13#12#13#13#13#13#13#12#13#12#13#12#13#12#13#12#13#12#13#12#12#12#13#12
+  +#13#12#13#12#13#12#13#12#13#12#12#12#12#12#13#12#13#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#13#14#14#14#15
+  +#14#14#14#17#23#23#23#23#23#23#14#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#11#19#23#23#23#23#23#23#23#19#15#14#14#15#14#15#14#14#14#14#14#13#14#13#14
+  +#13#14#13#14#13#14#13#13#13#14#13#13#14#13#13#14#15#14#14#15#14#17#23#23#23
+  +#23#23#16#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#23#23#23#23#20#14#14
+  +#15#14#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13
+  +#13#12#13#13#13#13#12#13#13#13#12#13#14#14#15#14#14#23#23#23#23#16#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#22#23#23#23#17#14#14#15#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14
+  +#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  ,#13#14#13#14#13#13#14#13#13#14#13#13#14#13#14#13#13#14#13#14#13#13#13#13#13
+  +#14#13#13#13#13#13#13#13#14#14#15#14#14#14#15#14#14#14#14#15#14#14#15#14#14
+  +#14#14#14#14#15#14#15#14#14#13#13#13#12#13#13#13#13#12#13#13#13#12#13#12#13
+  +#13#12#13#12#13#13#12#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#12
+  +#12#12#12#12#12#13#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#14#14#14#15#14#15#14#17#22#23#23#23#23#23#16#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#13#21#23#23#23#23#23#23#22#17#15
+  +#14#14#14#14#15#14#14#14#14#14#13#14#13#14#13#14#13#13#14#13#14#13#13#14#13
+  +#13#14#14#14#14#15#14#16#23#23#23#23#23#17#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#19#23#23#23#23#15#14#14#14#15#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#12#13#13#13#13#12#13#13#13#13#12#13#13#13#13#12#13#13#12#14#14
+  +#14#15#14#23#23#23#23#13#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#20#23#23
+  +#23#20#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#13#14#14#14#14#13#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#14
+  +#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#14#14#14#15
+  +#14#14#15#14#14#14#15#14#14#15#14#15#14#15#14#14#14#14#13#13#13#13#13#13#12
+  +#13#13#13#13#12#13#13#12#13#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12#13
+  +#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#14#14#14
+  +#14#14#14#14#15#22#23#23#23#23#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#11#16#23#23#23#23#23#23#23#21#17#14#15#14#14#14#15#14#14#14#14#14#13
+  +#14#13#14#13#14#13#13#13#14#13#13#14#14#14#15#14#14#14#16#22#23#23#23#23#19#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#23#23#23#23#20#14#15#14
+  +#14#14#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#13#12#13
+  +#13#13#13#12#13#13#13#13#12#13#14#15#14#14#15#23#23#23#23#12#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#16#23#23#23#22#14#14#15#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13
+  +#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#14#13#14#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#14#14#14#14#15#14#14#14#14#15#14#14#14#14#14
+  +#14#13#13#13#13#12#13#13#12#13#13#13#12#13#13#13#13#12#13#12#13#12#13#12#13
+  +#13#12#13#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#13#15#14#15#14#15#14#15#21#23#23#23#23#23#20#11#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#19#23#23#23#23#23#23#23#21#16
+  +#14#15#14#14#14#15#14#14#15#14#14#13#14#13#13#14#13#14#13#13#14#14#14#14#14
+  +#15#14#16#22#23#23#23#23#20#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#19#23#23#23#23#15#14#14#15#14#14#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#12#13#13#13#12#13#13#13#13#12#13#13#13#13#12#13#13#12#13#14#14#14#15#16
+  +#23#23#23#23#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#13#23#23#23#23#16#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14
+  +#13#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13
+  +#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#14#13#14#13#14#13
+  +#14#13#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#14#14#14#14#13#14#13#14#13#13#12#13#13#13#13#13#12#13#13#13#12#13#13#13#12
+  +#13#13#13#12#13#13#12#13#13#12#13#13#12#13#12#12#13#12#13#12#13#12#13#12#13
+  +#12#13#12#13#12#13#12#12#12#13#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#14#14#14#14
+  +#14#14#15#19#23#23#23#23#23#22#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#13#21#23#23#23#23#23#23#23#21#16#14#15#14#14#14#15#14#14#14#14#14#14#13
+  +#13#14#13#13#14#13#14#14#15#14#14#15#21#23#23#23#23#20#11#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#23#23#23#23#21#14#14#14#14#14#13#13#13
+  ,#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#13
+  +#13#13#12#13#15#14#14#14#17#23#23#23#23#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#11#22#23#23#23#17#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13
+  +#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#13#14#13#13#14#13#13#14
+  +#13#13#14#13#14#13#13#13#13#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13
+  +#13#12#13#13#13#13#12#13#13#13#12#13#13#12#13#13#12#13#12#13#12#13#12#13#12
+  +#13#12#13#12#13#12#13#12#13#12#13#12#12#12#12#12#13#12#12#12#12#13#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#14#15#14#15#14#14#14#19#23#23#23#23#23#22#14#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#15#22#23#23#23#23#23#23#23#20#16#14#15
+  +#14#14#14#15#14#14#14#14#14#14#13#14#13#14#14#15#14#14#14#15#21#23#23#23#23
+  +#22#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19#23#23#23
+  +#23#16#15#14#15#14#14#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13
+  +#13#13#12#13#13#13#13#12#13#13#13#12#13#14#15#14#14#19#23#23#23#23#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#20#23#23#23#21#14#14#15#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#13#14#14
+  +#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#14#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#12#13#13#13#13#12#13#13#13#13#12#13#13#12#13#12#13#12#13
+  +#12#13#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#12#13#12
+  +#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#14#14#14#14#15#14#14#17#22
+  +#23#23#23#23#22#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#16#23
+  +#23#23#23#23#23#23#23#21#16#14#15#14#14#15#14#15#14#14#14#14#14#14#14#14#14
+  +#14#15#14#21#23#23#23#23#21#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#12#23#23#23#23#21#14#14#14#14#14#13#13#13#13#13#13#13#13#13#13
+  +#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#13#14#14#15#14
+  +#19#23#23#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#22#23#23#23
+  +#15#14#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14
+  +#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#13#14
+  +#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#14#13#14#13#14
+  +#13#13#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#13
+  +#13#13#12#13#12#13#13#12#13#12#13#12#12#13#12#13#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#13#12#12#12#12#12#12#12#12#13#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#14#14#14#14#15#14#14#15#23#23#23#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#11#17#23#23#23#23#23#23#23#23#22#16#15#14#14#14#14#15#14
+  +#15#14#14#14#15#14#15#14#14#20#23#23#23#23#23#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19#23#23#23#23#16#14#15#14#14#14#13#13
+  +#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13
+  +#13#12#14#14#14#14#14#21#23#23#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#12#23#23#23#23#17#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#13#14#14#14#14#14#13#14#14#13#14#14#13#14#14#13#14#13#14#14#13#14#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#14#13#13#14#13#13#14#13
+  +#13#14#13#14#13#13#13#13#13#14#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13
+  +#12#13#13#13#13#12#13#13#12#13#13#12#13#12#13#13#12#13#13#12#12#12#12#13#12
+  +#13#12#13#12#13#12#13#12#13#12#13#12#12#12#13#12#12#13#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#13#15#14#14#14#15#15#23#23#23#23#14#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#17#23#23#23#23#23#23#23#23#22
+  +#19#15#15#14#14#14#14#14#15#14#14#14#14#14#19#23#23#23#23#23#14#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#23#23#23#23#21#14#14
+  +#15#14#14#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#13#12
+  +#13#13#13#12#13#13#12#14#14#15#14#14#21#23#23#23#17#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#22#23#23#23#20#14#14#14#15#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#13#14#14#14#13#14
+  +#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#14#13#14#13#13#14#13
+  +#13#14#13#13#14#13#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13
+  +#13#13#12#13#13#13#12#13#13#13#13#13#12#13#12#13#13#12#13#12#13#12#13#12#13
+  +#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#12#13#12#12#13#12#12#13#12#13
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#13#14#15#14#14#19#23#23#23#23#11#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#17#23#23#23
+  +#23#23#23#23#23#23#20#16#15#14#15#14#14#14#15#14#15#17#23#23#23#23#23#14#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#17#23#23
+  +#23#23#16#14#14#14#15#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13
+  +#13#12#13#13#13#12#13#13#13#13#13#14#14#14#15#14#22#22#23#23#16#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#17#23#23#23#22#15#14#14#14#14#15#14#15#14
+  +#15#14#15#14#15#14#14#15#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14
+  +#13#14#14#14#13#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#14#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#12#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#12#13#13#12#13#13
+  +#12#13#12#13#12#12#13#12#13#12#13#12#13#12#13#12#13#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#14#14#14#15#14#22#23#23
+  +#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#11#17#22#23#23#23#23#23#23#23#23#22#19#15#14#15#14#14#14#17#23#23#23#23#23
+  +#17#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#11#23#23#23#23#21#14#15#14#14#14#13#13#13#13#13#13#13#13#12#13#13#13#12#13
+  +#13#13#12#13#13#13#12#13#13#13#13#14#14#14#14#15#14#14#14#23#23#23#23#16#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#13#23#23#23#23#17#14#15#14#14#14
+  +#15#14#14#14#14#14#14#14#15#14#14#14#14#14#15#14#15#14#15#14#15#14#15#14#14
+  +#14#14#13#14#14#13#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#14#13#13#14#13#14#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#13#12#13#13#12#13#12#13#12
+  +#13#12#13#13#12#13#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#13#12#12#13
+  +#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#13#14#15#14#14#16
+  +#22#23#23#23#14#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#11#15#21#23#23#23#23#23#23#23#23#23#21#17#15#14#16#22#23#23#23
+  +#23#17#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#17#23#23#23#23#16#14#14#15#14#14#13#13#13#13#13#13#13#13#13#12#13#13
+  +#13#12#13#13#13#12#13#14#13#14#14#14#14#14#15#14#14#14#15#14#23#23#23#23#12#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#22#23#23#23#21#15#14#14#15
+  +#14#14#14#15#14#15#14#15#14#14#14#15#14#15#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#13#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  ,#13#13#13#13#13#13#12#13#13#13#13#12#13#13#13#13#12#13#13#12#13#12#13#13#12
+  +#13#13#12#13#12#12#12#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#12#12#12
+  +#12#12#12#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#14#14#14#14#15
+  +#19#23#23#23#23#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#14#20#23#23#23#23#23#23#23#23#23#23#21#22#23#23#23#23
+  +#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#11#23#23#23#23#21#14#14#14#14#14#13#13#13#13#13#13#13#12#13#13#13#12#13
+  +#13#13#14#14#14#14#14#14#15#14#15#14#14#14#14#15#14#14#16#23#23#23#23#12#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#17#23#23#23#23#23#23#23#23#21
+  +#21#21#20#19#19#19#16#16#16#16#14#14#14#14#15#14#15#14#15#14#15#14#15#14#14
+  +#14#14#14#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14
+  +#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#14#13#13#13#13#14#13#14#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#13#13#13#12#13#13#12#13#13#12
+  +#13#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#12#12#13#12#12#13
+  +#12#12#13#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#14#14#15#14#14#22
+  +#23#23#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#12#17#21#23#23#23#23#23#23#23#23#23#23#23#23#20#11#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#17#23#23#23#23#16#15#14#15#14#14#13#13#13#13#13#13#13#13#14#14#14#14#14#14
+  +#14#14#15#14#15#14#14#14#14#15#14#15#14#14#14#17#19#23#23#23#23#11#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#13#23#23#23#23#23#23#23#23#23#23#23
+  +#23#23#23#23#23#23#23#23#23#23#23#22#21#21#20#19#19#19#16#14#14#14#15#14#14
+  +#13#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#14#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#14#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#12#13#12#13#12#13#12#13#12#13
+  +#12#13#12#13#12#12#13#12#13#12#13#12#13#12#13#12#13#12#12#12#13#12#12#13#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#13#14#15#14#14#16#23#23#23
+  +#23#14#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#11#14#20#23#23#23#23#23#23#23#23#23#20#11#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#23#23
+  +#23#23#21#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#15#14#15#14#14#14
+  +#14#14#14#15#14#14#14#14#15#17#20#23#23#23#23#23#23#23#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#22#23#23#23#23#23#23#23#23#23#23#23#23#23#23
+  +#23#23#23#23#23#23#23#23#23#23#23#23#23#23#22#15#14#14#14#14#14#14#14#13#14
+  +#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#14#13#13#14#13#13#14
+  +#13#13#14#13#13#14#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13
+  +#13#12#13#13#13#12#13#13#13#13#13#12#13#13#12#13#12#13#13#12#13#13#12#13#12
+  +#13#12#12#12#12#12#12#12#12#12#12#12#13#12#12#12#12#12#12#12#12#12#13#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#14#14#14#14#15#20#23#23#23#22#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#11#16#21#22#23#23#23#23#22#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#17#23#23#23#23#16#14#15
+  +#14#14#14#14#14#14#15#14#15#14#15#14#14#14#14#14#15#14#15#14#15#14#14#15#17
+  +#20#22#23#23#23#23#23#23#23#23#23#22#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#16#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23
+  ,#23#23#23#23#23#23#23#23#23#19#14#15#14#14#14#14#13#14#14#13#14#14#13#14#13
+  +#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13
+  +#13#14#13#13#13#14#13#14#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#13#12#13#13
+  +#13#12#13#13#13#12#13#12#13#13#12#13#12#13#12#12#12#12#12#13#12#13#12#13#12
+  +#13#12#13#12#13#12#12#13#12#12#12#13#12#12#13#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#14#15#14#14#15#22#23#23#23#17#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#12#16#21#23#22#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#23#23#23#23#21#14#14#15#14#15#14#15#14#14
+  +#14#14#14#14#15#14#15#14#14#14#14#14#16#19#20#22#23#23#23#23#23#23#23#23#23
+  +#23#23#23#23#17#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11
+  +#12#12#12#16#15#16#16#19#19#20#21#23#23#23#23#23#23#23#23#23#23#23#23#23#23
+  +#23#23#22#15#14#15#14#14#14#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#13#12#13#13#12
+  +#13#12#13#13#12#13#13#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12
+  +#12#13#12#12#12#12#12#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#14#14
+  +#14#15#14#17#23#23#23#23#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#12#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#17#23#23#23#23#16#14#14#14#14#14#14#14#15#14#15#14#14#14#14#15#16#19
+  +#20#21#23#23#23#23#23#23#23#23#23#23#23#23#23#23#22#19#14#11#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12
+  +#12#12#13#16#15#16#17#20#20#23#23#23#23#20#14#14#15#14#14#14#14#14#13#14#14
+  +#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13
+  +#14#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#13#12
+  +#13#13#13#13#12#13#13#12#13#13#12#13#12#13#13#12#13#12#13#12#13#12#13#12#13
+  +#12#13#12#13#12#13#12#13#12#12#12#12#13#12#13#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#14#15#14#14#14#22#23#23#23#21#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#23#23#23#23#21#15#14#15#14#15#14#14#16
+  +#16#17#19#20#21#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#20#16#13#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#20#23#23#23#23#16#14#14#15#14#14#14
+  +#13#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#13#14#13#13#14#13#13#14
+  +#13#13#14#13#13#14#13#13#13#13#13#14#13#14#13#14#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13
+  +#12#13#13#13#13#12#13#13#13#13#13#12#13#12#13#13#12#13#12#13#13#12#12#13#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#13#12#12#12#12#12#12#13#12#13#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#13#14#14#14#15#16#23#23#23#23#15#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#17#23#23#23#23#20#19#20#21
+  +#21#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#21#17#14
+  +#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#23#23#23#23#21#14#14#14
+  +#14#14#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#12#13#13#13#12#13#13#13#13#12#13#13#12#13#13#12#13#12#13#12#13#12#13#12
+  +#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#15#14#15#14#14#21#23#23#23#21#11#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#23#23#23#23#23#23
+  +#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#20#16#14#11#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19#23#23#23#23#17#15
+  +#14#15#14#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13
+  +#13#14#13#13#14#13#13#14#13#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12
+  +#13#13#13#13#12#13#13#13#12#13#13#13#13#13#12#13#12#13#13#12#13#13#12#13#13
+  +#12#12#12#13#12#13#12#13#12#13#12#13#12#13#12#12#12#12#13#12#13#12#12#13#12
+  +#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#13#14#14#14#14#16#23#23#23#23#17#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#17#23#23#23#23
+  +#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#19#17#15#12#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#23#23#23#23#22#15#14
+  +#14#14#15#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14
+  +#13#13#14#13#13#14#13#13#14#13#13#13#13#13#14#13#14#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#12#13#13#13#13#12#13#13#13#12#13#13#13#12#13#13#12#13#13#12#13#13#12#12#13
+  +#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#12#12#12#12#12#13#12#12#12#12
+  +#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#14#15#14#15#14#20#23#23#23#23#11#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#21#23#23#23#23
+  +#23#23#23#23#23#23#23#23#21#19#17#16#12#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#22#23#23#23#20#14#15#14#14
+  +#14#14#14#13#14#13#14#13#14#13#14#13#14#13#13#13#14#13#13#14#13#13#14#13#13
+  +#14#13#13#14#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12
+  +#13#13#13#13#12#13#13#13#12#13#13#12#13#12#13#12#13#12#13#13#12#13#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#13#12#13#12#13#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#13#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#13#14#14#14#14#15#23#23#23#23#19#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#16#22#23#21#19#20#17#16#15
+  +#13#12#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#21#23#23#23#23#16#14#14#15#14#14#14#13#14#13#14
+  +#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#14#13
+  +#13#13#14#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#13#12
+  +#13#13#12#13#12#13#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12
+  +#13#12#13#12#12#12#12#12#12#12#12#13#12#13#12#12#12#12#12#12#12#12#12#12#12
+  +#12#14#14#15#14#14#14#14#13#13#13#13#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#14#15#14#15#14#20#23#23#23#23#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#15
+  +#23#23#23#23#17#15#14#14#14#14#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13
+  +#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#13#13#14#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#12#13#13#13#13#12#13#13#13#12#13#13#13#13#13#12#13#13#12#13#12#13#12
+  +#13#12#13#12#12#13#12#13#12#13#12#13#12#13#12#13#12#12#13#12#12#12#13#12#13
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#14#15#14#14#14#15#14#14#14#15
+  +#14#14#14#14#14#14#13#13#13#12#12#12#12#12#12#12#13#14#14#14#14#15#23#23#23
+  +#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#17
+  +#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#21#23#23#23#22#15#14#14#15#14#14
+  +#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13
+  +#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#13#12
+  +#13#13#13#12#13#13#13#12#13#12#13#13#12#13#13#12#13#12#13#12#12#13#12#13#12
+  +#13#12#13#12#13#12#13#12#12#13#12#12#12#12#12#12#13#12#13#12#12#12#12#12#12
+  +#12#12#12#12#14#14#14#14#15#14#14#14#15#14#14#14#15#14#14#14#14#15#14#14#14
+  +#14#14#14#14#13#13#15#14#15#14#14#20#23#23#23#23#12#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#243#243#7#15#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#14#23#23#23#23#19#14#14#15#14#14#14#13#14#13#14#13#14#13#14#13
+  +#14#13#13#13#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#13#13#13#14#13#13
+  +#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#13#12#13#13#12
+  +#13#12#13#13#12#13#13#12#13#12#13#12#12#12#12#12#12#12#12#12#12#12#13#12#12
+  +#12#13#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#13#14#14#15#14#14
+  +#14#15#14#14#14#15#14#14#15#14#15#14#14#14#15#14#15#14#14#14#14#14#14#14#14
+  +#15#15#23#23#23#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#14#147#211#243#243#20#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19#23#23
+  ,#23#22#15#14#14#14#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13
+  +#14#13#13#14#13#13#14#13#13#14#13#14#13#13#13#13#13#14#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#12#13#13#13#13#12#13#13#13#13#12#13#13#12#13#12#13#13#12#13#12#13#12
+  +#13#12#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#12#12#12#12#12#12#13#12
+  +#12#12#12#12#12#12#12#12#12#12#12#13#14#15#14#14#14#15#16#15#15#14#14#14#15
+  +#14#14#14#14#14#15#14#14#14#14#14#15#14#15#14#15#14#14#14#21#23#23#23#23#12#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#150
+  +#243#233#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#23#23#23#23#19#14#15#14#15#14#14#13
+  +#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13
+  +#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#13
+  +#12#13#13#13#13#13#12#13#13#12#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12
+  +#13#12#13#12#13#12#13#12#13#12#12#12#13#12#12#12#13#12#12#12#12#12#12#12#12
+  +#12#13#14#14#14#14#15#14#21#23#23#23#22#21#20#19#17#16#16#14#14#14#15#14#15
+  +#14#14#14#15#14#14#14#15#14#16#23#23#23#23#19#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#243#243#23#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#19#23#23#23#23#15#14#14#14#14#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#13#13#14#13#13
+  +#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#12#13#12#13
+  +#12#13#13#12#13#12#13#12#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#12#12
+  +#12#13#12#12#12#13#12#12#13#12#12#12#12#12#12#12#12#14#14#15#14#14#14#20#23
+  +#23#23#23#23#23#23#23#23#23#23#23#23#21#20#19#17#16#16#14#14#14#15#14#14#14
+  +#22#23#23#23#23#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#211#243#145#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#23#23#23#23#20
+  +#14#15#14#15#14#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14
+  +#13#13#14#13#13#14#13#13#14#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13
+  +#13#13#13#12#13#13#13#12#13#13#13#13#13#12#13#13#12#13#12#13#12#13#13#12#13
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#13#12#13#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#14#14#15#14#14#15#17#23#23#23#23#23#23#23#23#23#23
+  +#23#23#23#23#23#23#23#23#23#23#23#23#21#20#19#19#19#23#23#23#23#17#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#26#26#17#0#0#0#0#0#0#17
+  +#248#26#0#0#0#0#0#14#26#150#7#150#26#20#11#0#0#0#23#26#23#0#0#0#0#0#17#248#26
+  +#0#0#0#0#0#14#26#26#13#0#0#0#0#0#0#11#23#145#7#152#145#23#11#0#0#0#0#0#0#0#17
+  +#248#17#0#14#26#150#7#26#14#0#0#0#0#0#0#7#243#7#0#0#0#0#0#0#17#248#7#152#147
+  +#26#17#0#0#0#0#0#0#0#23#26#7#152#145#23#11#0#0#0#0#11#25#152#152#26#0#0#15#25
+  +#150#7#147#25#11#0#0#0#0#0#0#0#0#0#0#23#26#26#26#26#26#26#26#26#26#23#0#0#0#0
+  +#0#17#248#25#0#0#0#0#0#0#0#0#0#11#25#147#7#152#26#144#25#23#23#23#23#146#146
+  ,#14#14#14#14#13#14#13#14#13#20#145#145#14#13#14#13#13#14#25#145#23#14#13#14
+  +#13#13#14#13#13#17#248#150#207#147#23#13#13#13#14#13#13#13#13#13#19#145#151
+  +#207#145#19#13#13#13#13#13#13#13#13#13#25#149#207#147#21#13#13#145#145#13#12
+  +#13#13#13#12#13#13#13#13#12#13#13#13#12#13#13#13#12#13#12#13#13#12#13#13#12
+  +#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#12#12#12#12#13#12#12
+  +#12#13#12#12#12#12#12#12#12#12#14#14#14#14#14#15#16#23#23#23#23#23#23#23#23
+  +#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#23#22#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#243#243#26#0#0#0
+  +#0#0#0#7#243#150#0#0#0#11#146#243#243#243#243#243#243#243#146#0#0#0#7#243#152
+  +#0#0#0#0#0#26#243#243#0#0#0#0#0#17#243#243#17#0#0#0#0#0#23#233#243#243#243
+  +#243#243#243#233#26#0#0#0#0#0#0#26#243#26#23#243#243#243#243#243#243#145#0#0
+  +#0#0#0#7#243#152#0#0#0#0#14#152#243#243#243#243#243#243#243#20#0#0#0#0#20#240
+  +#243#243#243#243#243#243#26#0#0#0#11#240#243#243#243#243#0#15#243#243#243#243
+  +#243#243#233#23#0#0#0#0#0#0#0#0#0#7#243#243#243#243#243#243#243#243#243#152#0
+  +#0#0#0#0#211#243#243#15#0#0#0#0#0#0#0#25#233#243#243#243#243#243#243#232#23
+  +#23#20#146#243#243#14#14#14#13#14#13#14#13#14#150#243#243#19#14#13#14#13#13
+  +#240#243#232#13#13#13#14#13#13#14#26#240#243#243#243#243#243#232#20#13#13#13
+  +#14#13#15#147#243#243#243#243#243#243#207#15#13#13#13#13#13#19#210#243#243
+  +#243#243#243#151#23#243#243#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#13
+  +#12#13#13#12#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12
+  +#13#12#12#12#12#12#13#12#12#13#12#12#12#12#12#12#12#12#12#12#14#14#15#14#15
+  +#14#15#23#23#23#23#23#17#14#16#17#19#21#23#23#23#23#23#23#23#23#23#23#23#23
+  +#23#23#23#23#23#23#23#23#23#16#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#243#243#26#0#0#0#0#0#11#243#243#25#0#0#0#7#243#243#26#14#0
+  +#0#17#25#17#0#0#0#7#243#152#0#0#0#0#0#26#243#243#0#0#0#0#0#17#243#243#17#0#0
+  +#0#0#147#243#243#7#20#0#0#15#146#243#243#208#11#0#0#0#0#26#243#233#243#150#16
+  +#0#14#26#243#243#145#0#0#0#0#7#243#152#0#0#0#11#240#243#233#23#11#0#11#19#145
+  +#11#0#0#0#20#243#243#211#23#11#0#14#22#15#0#0#0#25#243#243#22#0#14#0#0#7#23
+  +#13#0#14#147#243#233#14#0#0#0#0#0#0#0#0#7#243#208#17#19#17#17#19#17#17#16#0#0
+  +#0#0#17#243#243#243#147#0#0#0#0#0#0#26#243#243#150#16#0#0#23#147#147#22#23#16
+  +#146#243#243#14#14#14#14#13#14#13#14#13#232#240#243#147#14#13#13#14#23#243
+  +#243#243#17#13#14#13#14#13#145#243#243#147#16#13#21#210#243#240#19#14#13#13
+  +#13#207#243#240#26#15#13#25#233#243#210#15#13#13#13#15#232#243#240#25#13#14
+  +#25#240#232#243#243#13#12#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#12#13
+  +#13#12#13#12#13#12#13#13#12#12#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12
+  +#13#12#12#12#12#12#12#13#12#13#12#12#12#12#12#12#14#14#14#14#15#14#15#23#23
+  +#23#23#23#19#0#0#0#0#0#0#0#11#12#14#16#17#19#21#23#23#23#23#23#23#23#23#23#23
+  +#23#23#21#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#243#243#26#0#0#0#0#0#17#243#243#15#0#0#23#243#243#17#0#0#0#0#0#0#0#0#0#0#7
+  +#243#152#0#0#0#0#0#26#243#243#0#0#0#0#0#17#243#243#17#0#0#0#26#243#243#26#0#0
+  +#0#0#0#0#17#240#243#150#0#0#0#0#26#243#243#150#0#0#0#0#0#25#243#243#13#0#0#0
+  +#7#243#152#0#0#0#147#243#233#11#0#0#0#0#0#0#0#0#0#11#240#243#208#11#0#0#0#0#0
+  +#0#0#0#0#150#243#208#0#0#0#0#0#0#0#0#0#0#11#243#243#25#0#0#0#0#0#0#0#0#7#243
+  +#7#0#0#0#0#0#0#0#0#0#0#0#0#147#243#147#243#233#11#0#0#0#0#14#243#243#26#0#0#0
+  +#11#23#23#23#23#21#14#146#243#243#14#14#13#14#13#14#13#14#19#243#207#210#232
+  +#14#13#14#13#150#243#147#243#26#14#13#13#13#17#243#243#145#13#14#13#13#15#210
+  +#243#232#13#13#13#25#243#243#21#13#13#13#13#19#240#243#150#13#13#13#145#243
+  +#243#19#13#13#13#13#21#243#243#243#13#13#13#12#13#13#13#12#13#13#13#12#13#13
+  +#13#13#13#12#13#12#13#13#12#13#13#12#13#12#13#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#13#12#12#13#12#12#13#12#12#12#12#12#12#12#12#12#12#14#14#15#14#14
+  +#14#16#22#23#23#23#23#20#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#12#14#16#17#19
+  +#21#23#23#23#23#13#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#243#243#26#0#0#0#0#0#26#243#233#0#0#0#208#243#147#0#0#0#0#0#0#0#0#0
+  +#0#0#7#243#152#0#0#0#0#0#26#243#243#0#0#0#0#0#17#243#243#17#0#0#14#243#243
+  +#150#0#0#0#0#0#0#0#0#25#243#243#17#0#0#0#26#243#243#14#0#0#0#0#0#0#211#243
+  +#145#0#0#0#7#243#152#0#0#11#243#243#23#0#0#0#0#0#0#0#0#0#0#23#243#243#17#0#0
+  +#0#0#0#0#0#0#0#0#7#243#7#0#0#0#0#0#0#0#0#0#0#11#243#243#26#0#0#0#0#0#0#0#0#7
+  +#243#152#0#0#0#0#0#0#0#0#0#0#0#11#240#243#17#151#243#23#0#0#0#0#145#243#211#0
+  +#0#0#0#16#22#23#23#23#16#14#146#243#243#14#14#14#13#14#13#14#13#146#243#145
+  +#147#243#19#14#13#13#240#243#17#243#210#13#14#13#14#147#243#233#13#13#13#13
+  +#13#13#21#243#243#23#14#13#210#243#151#13#13#13#13#13#13#145#243#243#15#13#13
+  +#232#243#150#13#13#13#13#13#13#151#243#243#13#13#13#13#12#13#13#13#13#12#13
+  +#13#13#12#13#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12
+  +#13#12#13#12#13#12#12#12#12#12#12#12#12#12#12#12#12#13#12#12#12#13#14#14#14
+  +#14#15#14#15#21#23#23#23#23#21#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#11#12#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#243#243#26#0#0#0#0#0#7#243#150#0#0#0#243#243#23#0#0#0#0#0#0#0#0#0#0#0#7
+  +#243#152#0#0#0#0#0#26#243#243#0#0#0#0#0#17#243#243#17#0#0#145#243#243#14#0#0
+  +#0#0#0#0#0#0#0#208#243#150#0#0#0#26#243#243#0#0#0#0#0#0#0#147#243#7#0#0#0#7
+  +#243#152#0#0#17#243#243#14#0#0#0#0#0#0#0#0#0#0#145#243#211#0#0#0#0#0#0#0#0#0
+  +#0#0#7#243#152#0#0#0#0#0#0#0#0#0#14#150#243#243#15#0#0#0#0#0#0#0#0#7#243#152
+  +#0#0#0#0#0#0#0#0#0#0#0#23#243#233#0#23#243#208#0#0#0#0#7#243#147#0#0#0#11#21
+  +#23#23#23#22#14#14#146#243#243#14#13#14#13#14#13#14#13#210#243#23#23#243#147
+  +#13#14#19#243#151#14#232#243#16#14#13#13#207#243#150#13#13#13#14#13#13#13#240
+  +#243#147#13#13#243#243#25#13#13#13#13#13#13#19#243#243#23#13#15#243#243#24#13
+  +#13#13#13#13#13#145#243#243#13#13#12#13#13#13#12#13#13#13#13#12#13#13#13#13
+  +#12#13#12#13#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12
+  +#13#12#13#12#13#12#12#13#12#13#12#12#12#12#12#12#13#14#15#14#14#14#15#21#23
+  +#23#23#23#22#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#243#243#26#0#0
+  +#0#0#14#243#243#23#0#0#17#243#243#25#17#17#19#17#17#19#17#17#14#0#0#7#243#152
+  +#0#0#0#0#0#26#243#243#0#0#0#0#0#17#243#243#17#0#0#208#243#150#0#0#0#0#0#0#0#0
+  +#0#0#25#243#243#11#0#0#26#243#243#0#0#0#0#0#0#0#26#243#233#0#0#0#7#243#152#0
+  +#0#26#243#243#17#19#17#17#19#17#17#19#17#11#0#7#243#7#0#0#0#0#0#0#0#0#0#0#0#7
+  +#243#152#0#0#0#0#0#0#0#17#247#243#243#243#26#0#0#0#0#0#0#0#0#0#7#243#152#0#0
+  +#0#0#0#0#0#0#0#0#0#208#243#145#0#0#233#243#15#0#0#0#243#243#147#17#19#17#23
+  +#145#144#144#145#22#14#14#146#243#243#14#13#14#13#14#13#14#17#243#243#15#14
+  +#240#232#13#13#147#243#248#13#150#243#248#13#14#13#243#243#145#14#13#13#13#13
+  +#14#13#207#243#207#13#21#243#243#21#13#13#13#13#13#13#13#243#243#145#13#21
+  +#243#243#21#13#13#13#13#13#13#145#243#243#13#13#13#13#12#13#13#13#12#13#13#13
+  +#13#12#13#13#13#12#13#12#13#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12#13
+  +#12#13#12#13#12#13#12#12#12#13#12#12#12#12#13#12#12#12#12#12#12#14#14#15#14
+  +#15#22#23#23#23#23#21#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#243#243#26#0#0#0#11#151#243#211#11#0#0#19#243#243#243#243#243#243#243#243
+  +#243#243#243#26#0#0#7#243#152#0#0#0#0#0#26#243#243#0#0#0#0#0#17#243#243#17#0
+  +#11#243#243#25#0#0#0#0#0#0#0#0#0#0#15#243#243#17#0#0#26#243#243#0#0#0#0#0#0#0
+  +#26#243#243#0#0#0#7#243#152#0#0#26#243#243#243#243#243#243#243#243#243#243
+  +#243#17#0#150#243#7#0#0#0#0#0#0#0#0#0#0#0#7#243#152#0#0#0#0#0#0#147#243#243
+  +#243#152#17#0#0#0#0#0#0#0#0#0#0#7#243#152#0#0#0#0#0#0#0#0#0#0#14#243#243#15#0
+  +#0#147#243#147#0#0#0#243#243#243#243#243#243#243#243#243#243#243#207#15#14
+  +#146#243#243#14#13#14#13#14#13#14#26#243#210#14#13#151#243#20#13#232#243#17
+  +#13#23#243#210#14#13#13#243#243#145#13#13#13#13#13#13#13#207#243#207#13#21
+  +#243#243#21#13#13#13#13#13#13#13#243#243#145#13#21#243#243#21#13#13#13#13#13
+  +#13#145#243#243#13#13#12#13#13#13#12#13#13#13#12#13#13#13#13#12#13#13#12#13
+  +#12#13#12#13#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#13#12#12#12
+  +#12#12#12#13#12#12#12#12#12#12#12#12#12#14#14#14#14#14#22#23#23#23#22#12#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#243#243#7#26#26#146#211#243
+  +#233#16#0#0#0#0#243#243#147#26#26#26#26#26#26#243#243#26#0#0#7#243#152#0#0#0
+  +#0#0#26#243#243#0#0#0#0#0#17#243#243#17#0#19#243#243#17#0#0#0#0#0#0#0#0#0#0#0
+  +#243#243#25#0#0#26#243#243#0#0#0#0#0#0#0#147#243#208#0#0#0#7#243#152#0#0#17
+  +#243#243#26#26#26#26#26#26#147#243#243#17#0#248#243#233#0#0#0#0#0#0#0#0#0#0#0
+  +#7#243#152#0#0#0#0#0#145#243#243#150#16#0#0#0#0#0#0#0#0#0#0#0#0#7#243#152#0#0
+  +#0#0#0#0#0#0#0#0#145#243#211#0#0#0#20#243#233#11#0#0#7#243#152#26#26#146#150
+  +#150#151#232#243#207#14#14#146#243#243#15#14#13#14#13#14#13#151#243#145#14#13
+  +#25#243#147#19#243#210#13#14#15#243#243#17#13#14#207#243#150#13#14#13#14#13
+  +#13#14#233#243#150#13#13#243#243#25#13#13#13#13#13#13#19#243#243#25#13#13#243
+  +#243#25#13#13#13#13#13#13#145#243#243#12#13#13#13#12#13#13#13#12#13#13#13#12
+  +#13#13#12#13#12#13#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12
+  +#13#12#13#12#12#13#12#12#12#12#12#12#12#13#12#12#12#12#12#12#14#14#15#14#14
+  +#20#23#23#23#20#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#243#243
+  +#243#243#243#243#243#243#26#0#0#0#0#0#208#243#26#0#0#0#0#0#11#243#243#17#0#0
+  +#7#243#211#0#0#0#0#0#145#243#243#11#0#0#0#0#23#243#243#14#0#17#243#243#17#0#0
+  +#0#0#0#0#0#0#0#0#0#243#243#26#0#0#26#243#243#17#0#0#0#0#0#0#211#243#147#0#0#0
+  +#7#243#152#0#0#11#243#243#17#0#0#0#0#0#20#243#243#0#0#15#243#243#17#0#0#0#0#0
+  +#0#0#0#0#0#7#243#152#0#0#0#0#0#233#243#150#0#0#0#0#0#0#0#0#0#0#0#0#0#0#7#243
+  +#233#7#152#7#152#7#152#145#0#0#0#233#243#26#0#0#0#0#233#243#23#0#0#145#243#7
+  +#0#0#21#23#23#23#232#243#146#14#15#145#243#243#25#14#13#14#13#14#15#243#243
+  +#21#14#13#15#243#210#144#243#145#14#13#13#207#243#248#13#13#147#243#240#13#13
+  +#13#13#13#13#21#243#243#25#13#13#210#243#151#13#13#13#13#13#13#145#243#243#17
+  +#13#13#210#243#151#13#13#13#13#13#13#150#243#243#13#13#12#13#13#13#12#13#13
+  +#13#12#13#13#13#13#12#13#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12#13#12
+  +#13#12#13#12#13#12#12#12#12#12#13#12#13#12#13#12#12#12#12#12#12#12#12#12#13
+  +#14#14#15#14#17#23#23#23#23#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#243#243#147#17#19#17#25#211#243#208#11#0#0#0#23#243#233#11#0#0#0#0#25
+  +#243#233#0#0#0#7#243#243#25#0#0#0#0#211#243#243#26#0#0#0#0#7#243#211#0#0#17
+  +#243#243#17#0#0#0#0#0#0#0#0#0#0#0#243#243#26#0#0#26#243#243#208#0#0#0#0#0#25
+  +#243#243#17#0#0#0#7#243#152#0#0#0#147#243#7#0#0#0#0#0#150#243#150#0#0#0#7#243
+  +#211#11#0#0#0#0#0#0#0#0#0#7#243#152#0#0#0#0#0#233#243#26#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#7#243#243#243#243#243#243#243#243#7#0#0#20#243#243#14#0#0#0#0#147
+  +#243#208#0#0#14#243#243#17#14#23#23#23#26#243#243#20#14#14#146#243#243#240#17
+  +#14#13#14#13#23#243#243#14#13#14#13#151#243#151#243#19#14#13#14#26#243#210#14
+  +#13#17#243#243#145#13#13#13#14#13#207#243#240#13#13#13#25#243#243#21#13#13#13
+  +#13#15#240#243#151#13#13#13#25#243#243#21#13#13#13#13#19#243#243#243#13#13#13
+  +#13#12#13#13#13#12#13#13#13#12#13#13#12#13#12#13#12#13#12#13#13#12#13#12#13
+  +#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#12#12#12#12#12#12#13#12#13#12
+  +#12#12#12#12#12#12#15#14#14#15#15#23#23#23#23#13#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#243#243#248#0#0#0#0#11#208#243#7#0#0#0#0#150#243#208
+  +#17#0#0#25#243#243#24#0#0#0#7#243#233#233#25#11#14#147#243#243#147#243#26#11
+  +#11#248#243#243#26#0#0#0#243#243#25#0#0#0#0#0#0#0#0#0#0#14#243#243#17#0#0#26
+  +#243#243#211#208#17#0#14#26#243#243#150#0#0#0#0#7#243#152#0#0#0#11#232#243
+  +#150#14#0#11#247#243#243#15#0#0#0#14#233#243#211#23#11#0#14#22#15#0#15#19#208
+  +#243#208#17#19#17#11#0#146#243#233#20#0#14#22#23#0#0#0#0#0#0#0#0#0#7#243#152
+  +#0#0#0#0#0#0#0#0#0#150#243#208#0#0#0#0#0#15#243#243#14#0#0#25#243#233#145#23
+  +#23#144#241#243#152#14#15#14#146#243#210#240#240#147#145#14#13#150#243#151#14
+  ,#13#13#14#25#243#243#232#13#13#13#13#19#243#243#17#13#13#25#243#243#147#17#13
+  +#19#207#243#243#23#13#13#13#13#150#243#240#26#15#13#23#232#243#240#17#13#13
+  +#13#13#207#243#240#25#14#15#24#240#243#243#243#13#13#12#13#13#13#12#13#13#13
+  +#12#13#13#13#12#13#12#13#13#12#13#13#12#13#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#13#12#12#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#14
+  +#14#15#14#14#22#23#23#23#16#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#243#243#26#0#0#0#0#0#16#243#243#15#0#0#0#0#147#243#243#243#243#243#243#145
+  +#0#0#0#0#7#243#26#147#243#243#243#243#243#147#0#26#243#243#243#243#243#7#0#0
+  +#0#0#211#243#147#0#0#0#0#0#0#0#0#0#0#23#243#243#13#0#0#26#243#243#15#232#243
+  +#243#243#243#243#7#11#0#0#0#0#7#243#152#0#0#0#0#11#208#243#243#243#243#243
+  +#233#23#0#0#0#0#0#14#152#243#243#243#243#243#243#25#0#7#243#243#243#243#243
+  +#243#243#17#0#11#7#243#243#243#243#243#208#0#0#0#0#0#0#0#0#0#7#243#152#0#0#0
+  +#0#0#0#0#0#14#243#243#24#0#0#0#0#0#0#211#243#145#0#0#0#23#243#243#243#243#243
+  +#243#207#16#14#14#14#145#243#147#23#243#243#243#14#13#240#243#144#14#13#14#13
+  +#15#243#243#147#13#14#13#14#13#232#243#248#14#13#13#25#240#243#243#243#243
+  +#243#240#23#13#13#13#13#13#13#147#243#243#243#243#243#243#210#19#13#13#13#13
+  +#13#15#207#243#243#243#243#243#210#147#243#243#12#13#13#13#12#13#13#13#12#13
+  +#13#13#12#13#13#12#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12
+  +#13#12#13#12#12#13#12#13#12#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#14
+  +#14#14#14#15#20#23#23#23#20#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#243#243#26#0#0#0#0#0#0#243#243#26#0#0#0#0#0#15#146#152#152#145#15#0#0#0#0
+  +#0#23#26#14#0#17#146#152#147#17#0#0#0#15#146#152#147#23#0#0#0#0#0#145#243#233
+  +#11#0#0#0#0#0#0#0#0#0#150#243#211#0#0#0#26#243#243#0#11#23#147#7#145#17#0#0#0
+  +#0#0#0#23#26#23#0#0#0#0#0#0#20#247#152#152#25#13#0#0#0#0#0#0#0#0#15#248#147#7
+  +#147#25#15#0#23#26#211#243#211#26#26#248#14#0#0#0#17#146#152#150#25#13#0#0#0
+  +#0#0#0#0#0#0#7#243#152#0#0#0#0#0#0#0#0#15#248#26#14#0#0#0#0#0#0#20#248#25#0#0
+  +#0#0#22#149#210#210#207#24#14#15#14#14#14#22#145#21#14#17#150#207#14#17#145
+  +#145#17#14#13#13#13#13#25#145#17#13#14#13#13#14#25#145#23#13#13#13#13#15#25
+  +#147#207#147#25#15#13#13#13#13#13#13#13#13#17#26#150#207#145#23#13#13#13#13
+  +#13#13#13#13#13#21#147#207#150#24#13#145#243#243#13#13#12#13#13#13#12#13#13
+  +#13#12#13#13#12#13#13#12#13#12#13#12#13#13#12#13#12#13#12#13#12#13#12#13#12
+  +#13#12#13#12#13#12#12#12#12#12#13#12#12#13#12#13#12#12#12#12#12#12#12#12#12
+  +#13#14#15#14#14#17#23#23#23#23#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#243#243#26#0#0#0#0#0#11#243#243#26#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#243#243#26#0#0#0#0#0#0#0#0#17#243
+  +#243#26#0#0#0#26#243#243#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#7#243#7#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#7#243#152#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12
+  +#23#23#23#23#20#14#14#14#15#14#14#13#14#14#13#14#13#14#13#14#13#14#13#14#13
+  +#14#13#14#13#13#14#13#13#14#13#13#13#13#14#13#14#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#145#243#243#12#13#13#13#207#21#13#145#24#13#210#25#12#207#21#13
+  +#12#13#13#12#13#12#13#12#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12
+  +#12#12#12#12#12#12#12#12#12#13#12#12#12#12#12#12#12#12#12#14#14#15#14#16#22
+  +#23#23#23#13#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#243#243#26#0#0
+  +#0#0#0#23#243#243#15#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#26#243#243#17#0#0#0#0#0#0#11#232#243#211#11#0#0#0#26
+  +#243#243#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#7#243#152#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#7#243#152#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#19#23#23#23#23
+  +#15#14#15#14#14#14#14#14#13#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13
+  +#14#13#13#14#13#13#14#13#14#13#14#13#13#13#14#14#14#14#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#145#243#243#13#13#12#13#207#21#13#145#145#16#207#151#13#207#21#13#12#13#12
+  +#13#13#12#13#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#13#12#13#12#13#12
+  +#12#13#12#13#12#12#12#12#12#12#12#12#12#12#12#12#14#14#14#14#14#23#23#23#23
+  +#16#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#243#243#26#0#0#0#0#23
+  +#233#243#208#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#147#243#243#26#11#0#0#0#20#240#243#233#16#0#0#0#0#26#243
+  +#243#0#0#0#0#0#0#0#0#0#0#0#0#0#145#243#145#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#15#23#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#7#243#152#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#23#23#23#23#22
+  +#15#14#14#14#15#14#14#14#13#14#13#14#13#14#13#14#13#14#13#13#14#13#13#14#13
+  +#13#14#13#13#14#13#14#13#13#13#13#13#14#14#14#15#14#14#15#14#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#145#243#243#12#13#13#13#207#21#13#26#145#26#26#151#16#207#16#13#13#12#13#12
+  +#13#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#14#14#15#14#14#20#23#23#23#20#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#243#243#243#7#152#7#243#243
+  +#243#208#16#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#26#243#243#243#7#152#233#243#243#208#16#0#0#0#0#0#26#243
+  +#243#0#0#0#0#0#0#0#0#0#0#0#0#0#243#243#243#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#7#243#243#243#243#243#243#243#243#243#17#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#21
+  +#23#23#23#23#21#15#14#14#14#14#14#14#14#13#14#13#14#13#14#13#14#13#14#13#13
+  +#14#13#13#14#13#13#14#13#13#13#13#14#13#14#13#14#14#14#14#14#14#15#14#14#14
+  +#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#145#243#243#13#12#13#13#207#21#13#21#145#210#16#25#26#243#13#12
+  +#13#13#12#13#12#13#13#12#12#13#12#13#12#13#12#13#12#13#12#13#12#12#12#12#13
+  +#12#13#12#12#12#12#13#12#13#12#12#12#12#12#12#12#12#12#12#13#14#14#15#14#17
+  +#23#23#23#23#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#147#7#208#243
+  +#243#243#208#150#23#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#145#152#233#243#211#150#23#0#0#0#0#0#0#0
+  +#26#243#243#0#0#0#0#0#0#0#0#0#0#0#0#0#26#243#26#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#145#7#152#7#152#7#152#7#152#7#15#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#12#21
+  +#23#23#23#23#21#15#14#15#14#14#15#14#13#14#13#14#13#14#13#14#13#14#13#14#13
+  +#13#14#13#13#14#13#13#14#13#14#13#13#13#14#14#14#15#14#15#14#14#14#15#14#14
+  +#14#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#145#243#243#12#13#13#13#207#21#13#21#150#210#12#15#7#243#13#12#13
+  +#12#13#13#12#13#12#13#12#12#13#12#13#12#13#12#13#12#13#12#13#12#13#12#12#12
+  +#12#13#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#15#14#14#15#15#23
+  +#23#23#23#13#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#23#152#7#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#12#21#23#23#23#23#21#15#14#14#15#14#14#14#14#13#14
+  +#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13#14#13#14#13#13#14#14#15#14#14
+  +#14#15#14#14#15#14#14#14#15#14#14#14#14#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#24#207#207#13#13#24#145#232#150#145#23
+  +#232#24#13#12#150#233#13#13#12#13#12#13#13#12#12#12#13#12#12#12#12#12#12#12
+  +#12#12#12#12#13#12#12#12#12#12#12#12#12#12#12#13#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#14#14#15#14#14#22#23#23#23#16#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#13#23#23#23#23#23#21
+  +#15#14#14#14#15#14#14#14#13#14#13#14#13#14#13#13#14#13#13#14#13#13#14#13#13
+  +#13#13#14#14#14#14#14#15#14#14#14#16#19#15#14#15#14#14#14#15#14#14#15#14#14
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#19#21#21#21#21#14#21#15#12#13#16#19#13#12#13#13#12#13#12#13#13#12#13#12
+  +#13#12#13#12#13#12#13#12#13#12#12#13#12#13#12#13#12#13#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#14#14#14#14#15#20#23#23#23#20#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14
+  +#23#23#23#23#23#21#15#14#14#14#14#14#14#14#13#14#13#14#13#14#13#13#14#13#13
+  +#14#13#13#14#13#14#14#14#14#15#14#14#14#15#14#19#23#23#23#20#15#14#15#14#14
+  +#14#15#14#14#14#14#14#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#12#13#13#12#13#13#12#13#13#12#13#13#13#13#13#12#13#12#13#13#12#13#13#12#13
+  +#12#12#13#12#13#12#13#13#13#12#13#12#13#12#13#12#12#12#12#12#12#12#12#12#13
+  +#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#13#14#15#14#14#17#23#23#23#23
+  +#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#14#23#23#23#23#23#21#15#14#15#14#14#14#14#14#13#14#13#13#13
+  +#14#13#13#14#13#13#14#13#13#14#14#14#14#15#14#14#15#14#16#22#23#23#23#23#23
+  +#23#19#15#15#14#14#14#14#15#14#14#14#14#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#12#13#13#13#13#13#12#13#13#12#13#13#12#13#12#13
+  +#12#13#12#13#12#13#12#12#13#14#14#14#14#14#13#12#13#12#13#12#13#12#12#13#12
+  +#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#14#14#15#14
+  +#16#22#23#23#23#13#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23#23#21#15#14#14#15#14#14#14
+  +#14#13#14#13#14#13#14#13#13#14#13#13#14#14#14#14#15#14#14#14#15#14#20#23#23
+  ,#23#23#23#23#23#23#23#23#21#17#14#15#14#14#15#14#15#14#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#12#13#13#12#13#13#13#12#13#13#13#13#12#13#13#12
+  +#13#12#13#13#12#13#12#13#13#13#14#14#14#14#14#14#14#15#14#14#13#12#12#12#13
+  +#12#13#12#12#12#13#12#12#12#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#14#14#14#14#14#23#23#23#23#16#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23#23#23#21#15#14
+  +#14#14#15#14#14#14#14#13#13#13#13#14#13#13#14#14#14#14#15#14#14#14#15#14#17
+  +#22#23#23#23#23#23#23#23#23#23#23#23#23#23#22#19#15#14#14#14#14#14#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#13#12#13#13
+  +#13#13#13#12#13#13#12#13#14#13#14#14#14#14#14#14#15#14#15#14#14#14#15#14#14
+  +#13#13#12#12#13#12#12#13#12#12#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#14#14#15#14#14#20#23#23#23#20#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#23#23#23
+  +#23#23#22#16#14#14#14#15#14#14#14#14#13#14#13#13#14#13#14#14#14#14#14#14#15
+  +#14#15#21#23#23#23#23#23#23#22#15#19#23#23#23#23#23#23#23#23#23#19#15#14#15
+  +#14#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#13#12#13#13
+  +#13#13#12#13#13#12#13#13#13#14#14#15#14#14#14#15#14#15#14#14#14#14#14#15#14
+  +#14#14#14#15#14#13#13#12#12#12#12#12#12#12#13#12#12#13#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#13#14#14#15#14#17#23#23#23#23#11#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#14#23#23#23#23#23#22#16#15#14#14#14#15#14#14#14#13#14#13#14#14#14#15#14
+  +#15#14#14#14#19#23#23#23#23#23#23#23#17#11#0#0#12#19#23#23#23#23#23#23#23#21
+  +#14#14#14#14#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13
+  +#13#12#13#13#13#13#12#13#13#12#13#14#14#14#14#14#15#14#14#14#14#15#14#15#14
+  +#14#14#15#14#15#14#14#14#14#13#13#12#13#12#12#13#12#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#15#14#14#15#15#23#23#23#23#13#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#14#22#23#23#23#23#23#17#14#15#14#14#14#14#14#14#13#14#14#15#14
+  +#14#14#14#15#16#22#22#23#23#23#23#23#21#12#0#0#0#0#0#0#11#16#22#23#23#23#23
+  +#23#14#15#14#14#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12
+  +#13#13#13#13#12#13#13#13#13#13#12#13#14#15#14#15#14#14#14#15#14#14#14#14#15
+  +#16#19#21#23#17#14#14#15#14#15#14#13#12#12#12#12#12#12#12#13#12#13#12#12#12
+  ,#12#12#12#12#12#12#12#12#12#12#12#12#12#12#14#14#15#14#14#22#23#23#23#16#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#12#21#23#23#23#23#23#20#14#14#15#14#14#15#14#14#15#14#14
+  +#14#15#14#15#19#23#23#23#23#23#23#23#16#0#0#0#0#0#0#0#0#0#0#11#15#23#23#23#23
+  +#15#14#15#14#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13
+  +#12#13#13#13#13#12#13#13#12#13#14#14#14#14#14#14#15#14#14#16#19#20#21#23#23
+  +#23#23#23#23#17#14#14#14#14#14#14#14#12#13#12#12#13#12#12#12#12#13#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#14#14#14#14#15#20#23#23#23#20#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11'Transparent'#8#0#0#6'TLabel'#6'Label1'#4
+  +'Left'#2#8#6'Height'#2#17#3'Top'#3#254#0#5'Width'#3#207#1#7'Caption'#6'?Copy'
+  +'right RemObjects Software, 2002-2008. All rights reserved.'#10#10'Font.Colo'
+  +'r'#7#7'clWhite'#11'Font.Height'#2#247#9'Font.Name'#6#6'Tahoma'#11'ParentCol'
+  +'or'#8#7'OnClick'#7#12'OnCloseClick'#0#0#6'TLabel'#11'lbl_Version'#6'Height'
+  +#2#16#3'Top'#2#31#5'Width'#3#244#1#9'Alignment'#7#8'taCenter'#8'AutoSize'#8#7
+  +'Caption'#6#2'[]'#10'Font.Color'#7#7'clWhite'#11'Font.Height'#2#243#9'Font.N'
+  +'ame'#6#6'Tahoma'#11'ParentColor'#8#0#0#6'TLabel'#6'Label7'#4'Left'#2#8#6'He'
+  +'ight'#2#17#3'Top'#3#24#1#5'Width'#3#138#0#7'Caption'#6#20'Visit our website'
+  +' at'#10'Font.Color'#7#7'clWhite'#11'Font.Height'#2#247#9'Font.Name'#6#6'Tah'
+  +'oma'#11'ParentColor'#8#0#0#6'TLabel'#6'Label3'#6'Cursor'#7#11'crHandPoint'#4
+  +'Left'#3#152#0#6'Height'#2#17#3'Top'#3#24#1#5'Width'#3#198#0#7'Caption'#6#25
+  +'http://www.remobjects.com'#10'Font.Color'#7#7'clWhite'#11'Font.Height'#2#245
+  +#9'Font.Name'#6#6'Tahoma'#10'Font.Style'#11#11'fsUnderline'#0#11'ParentColor'
+  +#8#7'OnClick'#7#11'Label3Click'#0#0#7'TButton'#10'btn_Cancel'#4'Left'#3#162#1
+  +#6'Height'#2#25#3'Top'#3#16#1#5'Width'#2'M'#6'Cancel'#9#7'Caption'#6#10'btn_'
+  +'Cancel'#7'Default'#9#10'Font.Color'#7#7'clWhite'#11'Font.Height'#2#245#9'Fo'
+  +'nt.Name'#6#6'Tahoma'#7'OnClick'#7#12'OnCloseClick'#8'TabOrder'#2#0#0#0#0
+]);
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWAbout.pas b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWAbout.pas
new file mode 100644
index 0000000..098cd55
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWAbout.pas
@@ -0,0 +1,147 @@
+unit uEWAbout;
+
+{$I Everwood.inc}
+interface
+
+uses
+  {$IFDEF FPC}LCLIntf, LResources,{$ENDIF}
+  {$IFDEF MSWINDOWS}Windows,{$ENDIF}
+  SysUtils, Classes, Graphics, Controls, Forms,
+  Dialogs, StdCtrls, ExtCtrls;
+
+type
+
+  { TAboutForm }
+
+  TAboutForm = class(TForm)
+    Image1: TImage;
+    Label1: TLabel;
+    Label3: TLabel;
+    btn_Cancel: TButton;
+    lbl_Version: TLabel;
+    Label7: TLabel;
+    procedure FormCreate(Sender: TObject);
+    procedure OnCloseClick(Sender: TObject);
+    procedure Label3Click(Sender: TObject);
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+function VersionBuildNo(iInstance:THandle):integer;
+
+var
+  AboutForm: TAboutForm;
+  sVersionName : string = '';
+
+implementation
+
+
+{$IFDEF FPC}
+uses uEWTools;
+{$ELSE}
+uses ShellAPI;
+{$ENDIF}
+
+{$IFNDEF FPC}
+  {$R *.dfm}
+{$ENDIF}
+
+{$IFNDEF FPC}
+type TVersion = record
+       Major,Minor,Release,Build:word;
+     end;
+
+function GetFileVersion(iFileName:string):TVersion;
+var whocares:dword;
+    Size:dword;
+    Data:pointer;
+    FixedData:pVSFixedFileInfo;
+begin
+  {$IFDEF FPC}
+  Data := nil;
+  FixedData := nil;
+  whocares := 0;
+  {$ENDIF}
+  Size := GetFileVersionInfoSize(pChar(iFileName), whocares);
+  if Size > 0 then begin
+    GetMem(Data,Size);
+    try
+      if GetFileVersionInfo(pChar(iFileName),0,Size,Data) then begin
+        Size := sizeof(TVSFixedFileInfo);
+        if VerQueryValue(Data,'\',pointer(FixedData),Size) then begin
+          result.Major := HiWord(FixedData^.dwFileVersionMS);
+          result.Minor := LoWord(FixedData^.dwFileVersionMS);
+          result.Release := HiWord(FixedData^.dwFileVersionLS);
+          result.Build := LoWord(FixedData^.dwFileVersionLS);
+        end;
+      end;
+    finally
+      FreeMem(Data);
+    end;
+  end;
+end;
+
+function GetModuleName(iInstance:THandle):string;
+var Buffer: array[0..MAX_PATH] of Char;
+begin
+  SetString(result, Buffer, GetModuleFileName(iInstance, Buffer, MAX_PATH));
+end;
+
+function VersionStringLong:string;
+var Version:TVersion;
+begin
+  Version := GetFileVersion(GetModuleName(hInstance));
+  result := IntToStr(Version.Major)+'.'+IntToStr(Version.Minor)+'.'+
+            IntToStr(Version.Release)+'.'+IntToStr(Version.Build){+'.'+
+            FormatDateTime('yymmdd', CompileTime);}
+end;
+
+function VersionBuildNo(iInstance:THandle):integer;
+var Version:TVersion;
+begin
+  Version := GetFileVersion(GetModuleName(iInstance));
+  result := Version.Build;
+end;
+
+{$ELSE}
+function VersionBuildNo(iInstance:THandle):integer;
+begin
+  Result := 0;
+end;
+{$ENDIF}
+
+procedure TAboutForm.OnCloseClick(Sender: TObject);
+begin
+  Close();
+end;
+
+procedure TAboutForm.FormCreate(Sender: TObject);
+begin
+  {$IFDEF FPC}
+  // hide lbl_version: we can't correctly detect version!
+  lbl_Version.Visible:= False;
+  {$ELSE}
+  lbl_Version.Caption := 'Version '+VersionStringLong();
+  if sVersionName <> '' then
+    lbl_Version.Caption := sVersionName+' - '+lbl_Version.Caption;
+  {$ENDIF}
+  btn_Cancel.Left := Width + 10;
+end;
+
+procedure TAboutForm.Label3Click(Sender: TObject);
+begin
+  {$IFDEF FPC}
+  RO_ShellExecute
+  {$ELSE}
+  ShellExecute
+  {$ENDIF}
+  (Handle,'open','http://www.remobjects.com',nil,nil,SW_SHOWNORMAL);
+end;
+
+{$IFDEF FPC}
+initialization
+  {$i uEWAbout.lrs}
+{$ENDIF FPC}
+end.
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWHelpers.pas b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWHelpers.pas
new file mode 100644
index 0000000..83a9d2a
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWHelpers.pas
@@ -0,0 +1,108 @@
+unit uEWHelpers;
+
+{$I Everwood.inc}
+
+interface
+
+{$IFDEF DELPHI5}
+uses
+  FileCtrl;
+
+type
+  THandle = Integer;
+{$ENDIF}
+
+function SelectDirectory(const AppHandle: THandle; const Caption: string;
+  const Root: WideString; var Directory: string): Boolean;
+
+implementation
+
+{$IFDEF FPC}
+uses Dialogs;
+{$ELSE}
+uses {$IFDEF MSWINDOWS}Windows, ActiveX, ShlObj, {$ENDIF} SysUtils, Forms;
+{$ENDIF}
+
+{$IFDEF FPC}
+function SelectDirectory(const AppHandle: THandle; const Caption: string;
+  const Root: WideString; var Directory: string): Boolean;
+var
+  str: Ansistring;
+begin
+  // now only Ansi version
+  str := Directory;
+  Result := Dialogs.SelectDirectory(Caption, Root, str);
+  if Result then Directory := str;
+end;
+{$ELSE}
+function SelectDirCB(Wnd: HWND; uMsg: UINT; lParam, lpData: LPARAM): Integer stdcall;
+begin
+  if (uMsg = BFFM_INITIALIZED) and (lpData <> 0) then
+    SendMessage(Wnd, BFFM_SETSELECTION, Integer(True), lpdata);
+  result := 0;
+end;
+
+function SelectDirectory(const AppHandle: THandle; const Caption: string;
+  const Root: WideString; var Directory: string): Boolean;
+var
+  WindowList: Pointer;
+  BrowseInfo: TBrowseInfo;
+  Buffer: PChar;
+  OldErrorMode: Cardinal;
+  RootItemIDList, ItemIDList: PItemIDList;
+  ShellMalloc: IMalloc;
+  IDesktopFolder: IShellFolder;
+  Eaten, Flags: LongWord;
+begin
+  Result := False;
+  if not DirectoryExists(Directory) then
+    Directory := '';
+  FillChar(BrowseInfo, SizeOf(BrowseInfo), 0);
+  if (ShGetMalloc(ShellMalloc) = S_OK) and (ShellMalloc <> nil) then
+  begin
+    Buffer := ShellMalloc.Alloc(MAX_PATH);
+    try
+      RootItemIDList := nil;
+      if Root <> '' then
+      begin
+        SHGetDesktopFolder(IDesktopFolder);
+        IDesktopFolder.ParseDisplayName(AppHandle, nil,
+          POleStr(Root), Eaten, RootItemIDList, Flags);
+      end;
+      with BrowseInfo do
+      begin
+        hwndOwner := AppHandle;
+        pidlRoot := RootItemIDList;
+        pszDisplayName := Buffer;
+        lpszTitle := PChar(Caption);
+        ulFlags := BIF_RETURNONLYFSDIRS or
+          {$IFDEF DELPHI7UP} BIF_NEWDIALOGSTYLE {$ELSE} $0040 {$ENDIF};
+        if Directory <> '' then
+        begin
+          lpfn := SelectDirCB;
+          lParam := Integer(PChar(Directory));
+        end;
+      end;
+      WindowList := DisableTaskWindows(0);
+      OldErrorMode := SetErrorMode(SEM_FAILCRITICALERRORS);
+      try
+        ItemIDList := ShBrowseForFolder(BrowseInfo);
+      finally
+        SetErrorMode(OldErrorMode);
+        EnableTaskWindows(WindowList);
+      end;
+      Result :=  ItemIDList <> nil;
+      if Result then
+      begin
+        ShGetPathFromIDList(ItemIDList, Buffer);
+        ShellMalloc.Free(ItemIDList);
+        Directory := Buffer;
+      end;
+    finally
+      ShellMalloc.Free(Buffer);
+    end;
+  end;
+end;
+{$ENDIF}
+
+end.
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWMenuManager.pas b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWMenuManager.pas
new file mode 100644
index 0000000..a485aea
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWMenuManager.pas
@@ -0,0 +1,346 @@
+unit uEWMenuManager;
+
+{$INCLUDE eDefines.inc}
+
+interface
+
+uses
+  Classes, Menus, ToolsAPI, ExtCtrls, Controls;
+
+const
+  sPersonalityDelphiWin32  = 'Delphi.Personality';
+  sPersonalityDelphiDotNet = 'DelphiDotNet.Personality';
+  sPersonalityCSharpDotNet = 'CSharp.Personality';
+  sPersonalityCppBuilderWin32 = 'CPlusPlusBuilder.Personality';
+  sPersonalityVisualBasicDotNet = 'VB.Personality';
+
+type
+  TEWPersonality = (pAny, pNone, pUnknown, pDelphiWin32, pDelphiDotNet, pCSharpDotNet, pCppBuilderWin32, pVisualBasicDotNet);
+  TEWPersonalitySet = set of TEWPersonality;
+
+  TMenuItemEx = class;
+
+  TEWMenuItem = class
+  private
+    fMenuItem: TMenuItemEx;
+    fPersonality: TEWPersonalitySet;
+    fVisible: boolean;
+  public
+    constructor Create(aMenuItem: TMenuItemEx);
+    procedure SetGlyph(aImageList: TImageList; aIndex: integer);
+    property MenuItem: TMenuItemEx read fMenuItem;
+    property Personality: TEWPersonalitySet read fPersonality write fPersonality;
+    property Visible: boolean read fVisible write fVisible;
+  end;
+
+  TMenuItemEx = class(TMenuItem)
+  private
+    fInfo: TEWMenuItem;
+  public
+    property Info: TEWMenuItem read fInfo write fInfo;
+  end;
+
+  TEWMenu = class
+  private
+    fName: string;
+    fMenu: TMenuItem;
+    fRefCount: integer;
+    fOnPopup: TNotifyEvent;
+    procedure _OnPopup(aSender: TObject);
+  public
+    constructor Create(const aName: string);
+    destructor Destroy; override;
+
+    function CreateMenuItem(const aCaption: string; aImageIndex: integer; aPersonality: TEWPersonalitySet): TEWMenuItem;
+    function DestroyMenuItem(var aMenu: TEWMenuItem): boolean;
+
+    property Name: string read fName;
+    property Menu: TMenuItem read fMenu;
+
+    property OnPopup: TNotifyEvent read fOnPopup write fOnPopup;
+
+  end;
+
+  TEWMenuManager = class
+  private
+    fMenus: TStringList;
+    fEWMenu: TMenuItem;
+    procedure OnABoutclick(Sender: TObject);
+  public
+    constructor Create;
+    Destructor Destroy; override;
+    procedure Initialize;
+
+    function CreateMenu(const aName: string): TEWMenu;
+    function DestroyMenu(var aMenu: TEWMenu): boolean;
+  end;
+
+var
+  MenuManager: TEWMenuManager;
+
+implementation
+
+uses
+  {$IFDEF DELPHI5}DsgnIntf, Windows,{$ENDIF}
+  {$IFDEF DELPHI6UP}DesignEditors, DesignIntf, ExtActns,{$ENDIF}
+  Forms, SysUtils, Dialogs, uEWAbout, Graphics, uEWOTAHelpers;
+
+{ TEWMenuManager }
+
+{ TODO: use
+
+    procedure MenuBeginUpdate;
+    procedure MenuEndUpdate;
+}
+
+constructor TEWMenuManager.Create;
+begin
+  {fTimer := TTimer.Create(nil);
+  fTimer.OnTimer := TimerInitialize;
+  fTimer.Interval := 60000;
+  fTimer.Enabled := true;
+  ShowMessage('Create!');}
+end;
+
+procedure TEWMenuManager.Initialize;
+var
+  lMainMenu: TMainMenu;
+  lHelpMenu: TMenuItem;
+  lServices: INTAServices;
+  i: integer;
+begin
+  if Assigned(fMenus) then exit;
+
+  fMenus := TStringList.Create();
+
+  //try
+
+    if not Assigned(BorlandIDEServices) then
+      raise Exception.Create('Cannot access BorlandIDEServices.');
+
+    //{$IFDEF BDS}
+    //lServices := BorlandIDEServices.GetService(INTAServices) as INTAServices;
+    //{$ELSE}
+    lServices := (BorlandIDEServices as INTAServices);
+    //{$ENDIF}
+
+    if not Assigned(lServices) then
+      raise Exception.Create('Cannot access INTAServices.');
+
+    lMainMenu := lServices.MainMenu;
+
+    for i := 0 to lMainMenu.Items.Count-1 do begin
+
+      if lMainMenu.Items[i].Name = 'HelpMenu' then begin
+        lHelpMenu := lMainMenu.Items[i];
+
+        fEWMenu := TMenuItem.Create(nil);
+        fEWMenu.Caption := 'About RemObjects Everwood™';
+        fEWMenu.OnClick := OnAboutClick;
+
+        lHelpMenu.Insert(lHelpMenu.Count-1, fEWMenu);
+      end;
+    end; { for }
+  {except
+    ShowMessage('Error getting Main Menu');
+  end;}
+
+end;
+
+destructor TEWMenuManager.Destroy;
+var
+  i: Integer;
+begin
+  if Assigned(fMenus) then begin
+    for i := 0 to fMenus.Count-1 do begin
+      fMenus.Objects[i].Free();
+      fMenus.Objects[i] := nil;
+    end; { for }
+  end;
+  FreeAndNil(fMenus);
+  FreeAndNil(fEWMenu);
+end;
+
+function TEWMenuManager.CreateMenu(const aName: string): TEWMenu;
+var
+  lIndex: integer;
+begin
+  Initialize();
+  lIndex := fMenus.IndexOf(aName);
+  if lIndex > -1 then begin
+    result := fMenus.Objects[lIndex] as TEWMenu
+  end
+  else begin
+    result := TEWMenu.Create(aName);
+    fMenus.AddObject(aName, result);
+  end;
+end;
+
+
+function TEWMenuManager.DestroyMenu(var aMenu: TEWMenu): boolean;
+var
+  lIndex: integer;
+begin
+  Initialize();
+  lIndex := fMenus.IndexOfObject(aMenu);
+  if lIndex > -1 then begin
+    dec(aMenu.fRefCount);
+    if aMenu.fRefCount = 0 then begin
+      fMenus.Delete(lIndex);
+      aMenu.Free();
+      result := true;
+    end
+    else begin
+      result := false;
+    end;
+  end
+  else
+    result := false;
+  aMenu := nil;
+end;
+
+{ TEWMenu }
+
+constructor TEWMenu.Create(const aName: string);
+var
+  lMainMenu: TMainMenu;
+begin
+  inherited Create();
+  fName := aName;
+  fRefCount := 1;
+
+  fMenu := TMenuItem.Create(nil);
+  fMenu.Caption := aName;
+  fMenu.OnClick := _OnPopup;
+
+  lMainMenu := (BorlandIDEServices as INTAServices).MainMenu;
+  lMainMenu.Items.Insert(lMainMenu.Items.Count-2, fMenu);
+
+  with CreateMenuItem('NOOPTIONS', -1, [pAny]) do begin
+    MenuItem.Enabled := false;
+  end;
+
+end;
+
+function TEWMenu.CreateMenuItem(const aCaption: string; aImageIndex: integer; aPersonality: TEWPersonalitySet): TEWMenuItem;
+var
+  lMenuItem: TMenuItemEx;
+begin
+  lMenuItem := TMenuItemEx.Create(fMenu);
+  lMenuItem.Caption := aCaption;
+  lMenuItem.ImageIndex := aImageIndex;
+  result := TEWMenuItem.Create(lMenuItem);
+  result.Personality := aPersonality;
+  lMenuItem.Info := result;
+  fMenu.Add(lMenuItem);
+end;
+
+destructor TEWMenu.Destroy;
+begin
+  FreeAndNil(fMenu);
+  inherited;
+end;
+
+function TEWMenu.DestroyMenuItem(var aMenu: TEWMenuItem): boolean;
+begin
+  result := false;
+end;
+
+procedure TEWMenu._OnPopup(aSender: TObject);
+var
+  i: integer;
+  s: string;
+  lPersonality: TEWPersonality;
+  lAnyMenusVisible: boolean;
+begin
+  if assigned(OnPopup) then OnPopup(self);
+
+  //ToDo: optimize 2 calls to CurrentProject
+  if CurrentProject <> nil then begin
+    {$IFDEF DELPHI9UP}
+    s := CurrentProject.Personality;
+
+    if SameText(s, sPersonalityDelphiWin32) then
+      lPersonality := pDelphiWin32
+    else if SameText(s, sPersonalityDelphiDotNet) then
+      lPersonality := pDelphiDotNet
+    else if SameText(s, sPersonalityDelphiDotNet) then
+      lPersonality := pDelphiDotNet
+    else if SameText(s, sPersonalityCSharpDotNet) then
+      lPersonality := pCSharpDotNet
+    else if SameText(s, sPersonalityVisualBasicDotNet) then
+      lPersonality := pVisualBasicDotNet
+    else if SameText(s, sPersonalityCppBuilderWin32) then
+      lPersonality := pCppBuilderWin32
+    else
+      lPersonality := pUnknown;
+
+    s := LanguageFromPersonality(CurrentProject);
+
+    fMenu.Items[0].Caption := Format('<No options available for %s Projects>',[s]);
+    {$ELSE}
+    lPersonality := pDelphiWin32;
+    fMenu.Items[0].Caption := Format('<No options available>',[s]);
+    {$ENDIF DELPHI9UP}
+  end
+  else begin
+    lPersonality := pNone;
+    fMenu.Items[0].Caption := '<No options available without open project>';
+  end;
+
+  lAnyMenusVisible := false;
+  for i := 1 to fMenu.Count-1 do begin
+    if fMenu.Items[i] is TMenuItemEx then begin
+      with (fMenu.Items[i] as TMenuItemEx).Info do begin
+        fMenu.Items[i].Visible := Visible
+                                  and
+                                  ((pAny in Personality) or (lPersonality in Personality));
+        if fMenu.Items[i].Visible then lAnyMenusVisible := true;
+
+      end;
+    end;
+  end;
+
+  fMenu.Items[0].Visible := not lAnyMenusVisible;
+
+end;
+
+{ TEWMenuItem }
+
+constructor TEWMenuItem.Create(aMenuItem: TMenuItemEx);
+begin
+  inherited Create();
+  fMenuItem := aMenuItem;
+  fVisible := true;
+end;
+
+procedure TEWMenuManager.OnABoutclick(Sender: TObject);
+begin
+  with TAboutForm.Create(Application) do try
+    Position := poScreenCenter;
+    ShowModal();
+  finally
+    Free();
+  end
+end;
+
+procedure TEWMenuItem.SetGlyph(aImageList: TImageList; aIndex: integer);
+var
+  lBitmap: TBitmap;
+begin
+  lBitmap := TBitmap.Create();
+  try
+    aImageList.GetBitmap(aIndex ,lBitmap);
+    MenuItem.ImageIndex := (BorlandIDEServices as INTAServices).AddMasked(lBitmap, clFuchsia);
+  finally
+    lBitmap.Free();
+  end;
+end;
+
+initialization
+  MenuManager := TEWMenuManager.Create();
+finalization
+  FreeAndNil(MenuManager);
+end.
+
+
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWMenuManager_laz.pas b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWMenuManager_laz.pas
new file mode 100644
index 0000000..24bf371
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWMenuManager_laz.pas
@@ -0,0 +1,252 @@
+unit uEWMenuManager_laz;
+
+{$I Everwood.inc}
+
+interface
+
+uses
+  MenuIntf, IDECommands,
+  Classes, Menus, ExtCtrls, Controls;
+
+type
+  TEWPersonality = (pAny, pNone, pUnknown, pDelphiWin32, pDelphiDotNet, pCSharpDotNet, pCppBuilderWin32, pVisualBasicDotNet, pLazarusWin, pLazarusUnix);
+  TEWPersonalitySet = set of TEWPersonality;
+  TEWMenu = class;
+
+  TEWMenuItem = class(TIDEMenuCommand)
+  private
+    fPersonality: TEWPersonalitySet;
+  public
+    procedure SetGlyph(aImageList: TImageList; aIndex: integer);
+    property Personality: TEWPersonalitySet read fPersonality write fPersonality;
+  end;
+
+  { TEWMenu }
+
+  TEWMenu = class(TIDEMenuSection)
+  private
+    fOnPopup: TNotifyEvent;
+    fCat : TIDECommandCategory;
+    function GetOnPopup: TNotifyEvent;
+    procedure SetOnPopup(const AValue: TNotifyEvent);
+    procedure _OnPopup(aSender: TObject);
+  public
+    constructor Create(const aName: string);override;
+    function CreateMenuItem(const aCaption: string; aImageIndex: integer; aPersonality: TEWPersonalitySet; AutoAdd: boolean = True): TEWMenuItem; overload;
+    function DestroyMenuItem(var aMenu: TEWMenuItem): boolean;
+    property OnPopup: TNotifyEvent read fOnPopup write fOnPopup;
+    property CommandCategory: TIDECommandCategory read fCat;
+  end;
+
+  TEWMenuManager = class
+  private
+    fMenus: TStringList;
+    procedure OnAboutClick(Sender: TObject);
+  public
+    constructor Create;
+    Destructor Destroy; override;
+    procedure Initialize;
+
+    function CreateMenu(const aName: string): TEWMenu;
+    function DestroyMenu(var aMenu: TEWMenu): boolean;
+  end;
+
+var
+  MenuManager: TEWMenuManager;
+
+procedure Register;
+implementation
+
+uses
+  Forms, SysUtils, Dialogs, uEWAbout, Graphics, uEWOTAHelpers_laz,IDEImagesIntf;
+
+
+procedure Register;
+begin
+  RegisterIDEMenuCommand(mnuHelp,'EverWood','About RemObjects Everwood',MenuManager.OnAboutClick)
+end;
+
+{ TEWMenuManager }
+
+{ TODO: use
+
+    procedure MenuBeginUpdate;
+    procedure MenuEndUpdate;
+}
+
+constructor TEWMenuManager.Create;
+begin
+  fMenus := TStringList.Create();
+end;
+
+procedure TEWMenuManager.Initialize;
+begin
+  // nothing, for compatibility with Delphi version
+end;
+
+destructor TEWMenuManager.Destroy;
+//var  i: Integer;
+begin
+(*  if Assigned(fMenus) then begin
+    for i := 0 to fMenus.Count-1 do begin
+      fMenus.Objects[i].Free();
+      fMenus.Objects[i] := nil;
+    end; { for }
+  end;      *)
+  FreeAndNil(fMenus);
+//  FreeAndNil(fEWMenu);
+end;
+
+function TEWMenuManager.CreateMenu(const aName: string): TEWMenu;
+var
+  lIndex: integer;
+begin
+  Initialize();
+  lIndex := fMenus.IndexOf(aName);
+  if lIndex > -1 then begin
+    Result := fMenus.Objects[lIndex] as TEWMenu
+  end
+  else begin
+    // similar to RegisterIDESubMenu
+    Result := TEWMenu.Create(aName);
+    Result.ChildsAsSubMenu:=true;
+    Result.SubMenuImages := IDEImages.Images_16;
+    fMenus.AddObject(aName, result);
+  end;
+end;
+
+
+function TEWMenuManager.DestroyMenu(var aMenu: TEWMenu): boolean;
+{var   lIndex: integer;}
+begin
+  // only static packages in lazarus
+  Result := (aMenu <> nil) and False;    // always false
+ {
+  Initialize();
+  lIndex := fMenus.IndexOfObject(aMenu);
+  if lIndex > -1 then begin
+    dec(aMenu.fRefCount);
+    if aMenu.fRefCount = 0 then begin
+      fMenus.Delete(lIndex);
+      aMenu.Free();
+      result := true;
+    end
+    else begin
+      result := false;
+    end;
+  end
+  else
+    result := false;
+  aMenu := nil;
+  }
+end;
+
+{ TEWMenu }
+
+constructor TEWMenu.Create(const aName: string);
+begin
+  inherited Create(aName);
+  Caption := aName;
+  OnClick := _OnPopup;
+  CreateMenuItem;
+  mnuMain.Insert(mnuWindow.SectionIndex, self);
+  fcat := RegisterIDECommandCategory(nil, Caption,'');
+  with CreateMenuItem('NOOPTIONS', -1, [pAny]) do begin
+    MenuItem.Enabled := false;
+  end;
+end;
+
+function TEWMenu.CreateMenuItem(const aCaption: string; aImageIndex: integer; aPersonality: TEWPersonalitySet; AutoAdd: boolean = True): TEWMenuItem;
+begin
+  // same as RegisterIDEMenuCommand
+  Result := TEWMenuItem.Create(aCaption);
+  Result.Caption := aCaption;
+  result.Personality := aPersonality;
+  Result.CreateMenuItem;
+  Result.MenuItem.ImageIndex:=aImageIndex;
+  if AutoAdd then Self.AddLast(Result);
+end;
+
+function TEWMenu.DestroyMenuItem(var aMenu: TEWMenuItem): boolean;
+begin
+  result := (aMenu<> nil) and false;
+end;
+
+procedure TEWMenu._OnPopup(aSender: TObject);
+var
+  i: integer;
+  lPersonality: TEWPersonality;
+  lAnyMenusVisible: boolean;
+begin
+  if assigned(fOnPopup) then fOnPopup(aSender); // aSender = Self
+
+  if CurrentProject <> nil then begin
+  {$IFDEF MSWINDOWS}
+    lPersonality := pLazarusWin;
+  {$ELSE}
+    lPersonality := pLazarusUnix;
+  {$ENDIF}
+    Items[0].Caption := '<No options available>';
+  end
+  else begin
+    lPersonality := pNone;
+    Items[0].Caption := '<No options available without open project>';
+  end;
+
+  lAnyMenusVisible := false;
+  for i := 1 to Count-1 do begin
+    if Items[i] is TEWMenuItem then begin
+      with (Items[i] as TEWMenuItem) do begin
+        Items[i].Visible := Visible and ((pAny in Personality) or (lPersonality in Personality));
+        if Items[i].Visible then lAnyMenusVisible := true;
+      end;
+    end;
+  end;
+
+  Items[0].Visible := not lAnyMenusVisible;
+end;
+
+function TEWMenu.GetOnPopup: TNotifyEvent;
+begin
+  Result := OnClick;
+end;
+
+procedure TEWMenu.SetOnPopup(const AValue: TNotifyEvent);
+begin
+  OnClick := AValue;
+end;
+
+{ TEWMenuItem }
+
+
+procedure TEWMenuManager.OnAboutClick(Sender: TObject);
+begin
+  with TAboutForm.Create(Application) do try
+    Position := poScreenCenter;
+    ShowModal();
+  finally
+    release();
+  end;
+end;
+
+procedure TEWMenuItem.SetGlyph(aImageList: TImageList; aIndex: integer);
+var
+  lBitmap: TBitmap;
+begin
+  lBitmap := TBitmap.Create();
+  try
+    aImageList.GetBitmap(aIndex ,lBitmap);
+    if Section.SubMenuImages <> nil then
+      MenuItem.ImageIndex := Section.SubMenuImages.AddMasked(lBitmap, clFuchsia);
+  finally
+    lBitmap.Free();
+  end;
+end;
+
+initialization
+  MenuManager := TEWMenuManager.Create();
+finalization
+  FreeAndNil(MenuManager);
+end.
+
+
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWOTAHelpers.pas b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWOTAHelpers.pas
new file mode 100644
index 0000000..40d1194
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWOTAHelpers.pas
@@ -0,0 +1,414 @@
+unit uEWOTAHelpers;
+
+{$I Everwood.inc}
+
+interface
+
+uses
+  {$IFDEF DELPHI5}ComObj,{$ENDIF}
+  ToolsAPI, Classes;
+
+function GetDelphiVersion: Integer;
+
+function GetDllPath: String;
+
+function ModuleServices: IOTAModuleServices;
+function CurrentProject: IOTAProject;
+function ProjectByName(const aName: string): IOTAProject;
+function CurrentProjectGroup: IOTAProjectGroup;
+
+function GetUniqueProjectFilename(aProject: IOTAProject; aName: string): string;
+
+function FindModuleByUnitName(const aProject: IOTAProject; const aModuleName: string): IOTAModule;
+
+function RemoveInitialT(const aString:string):string;
+function AddInitialT(const aString:string):string;
+
+function ProjectName: string;
+
+function LoadStringFromFile(iFilename:string):string;
+procedure SaveStringToFile(const iFilename,iString:string);
+
+function ReplaceVariables(const aString: string; aVariables: TStrings): string;
+
+function ReadModuleSource(const aModule: IOTAModule): string;
+procedure WriteModuleSource(const aModule: IOTAModule; const aCode, aHeader: string);
+procedure AddOrReplaceNamedModule(const aProject: IOTAProject; aName, aCode: string);
+
+function LanguageFromPersonality(aProject: IOTAProject): string;
+function LanguageFromPersonalityEx(aProject: IOTAProject): string;
+
+implementation
+
+uses {$IFDEF MSWINDOWS}Windows, ActiveX, {$ENDIF} SysUtils, Forms, uEWHelpers;
+
+function LoadStringFromFile(iFilename:string):string;
+{$IFDEF DELPHI2009UP}
+begin
+  With TStringList.Create do try
+    LoadFromFile(iFilename);
+    Result := Text;
+  finally
+    Free;
+  end;
+end;
+{$ELSE}
+var t:text;
+    s:string;
+begin
+  try
+    AssignFile(t,iFilename);
+    Reset(t);
+    try
+      result := '';
+      while not Eof(t) do begin
+        Readln(t,s);
+        result := result+s+#13#10;
+      end;
+    finally
+      CloseFile(t);
+    end;
+  except
+    on E:Exception do
+      raise EInOutError.Create('Error loading file '+iFilename+' ('+E.ClassName+': '+E.Message+')');
+  end;
+end;
+{$ENDIF}
+
+procedure SaveStringToFile(const iFilename,iString:string);
+{$IFDEF DELPHI2009UP}
+begin
+  With TStringList.Create do try
+    Text := iString;
+    SaveToFile(iFilename);
+  finally
+    free;
+  end;
+end;
+{$ELSE}
+var t:TextFile;
+begin
+  try
+    AssignFile(t,iFilename);
+    Rewrite(t);
+    try
+      Write(t,iString);
+    finally
+      CloseFile(t);
+    end;
+  except
+    on E:Exception do
+      raise EInOutError.Create('Error saving file '+iFilename+' ('+E.ClassName+': '+E.Message+')');
+  end;
+end;
+{$ENDIF}
+
+function NewGuid:TGUID;
+begin
+  {$IFDEF MSWINDOWS}
+  CoCreateGuid(result);
+  {$ENDIF MSWINDOWS}
+  {$IFDEF LINUX}
+  CreateGuid(result);
+  {$ENDIF}
+end;
+
+function NewGuidAsString:string;
+begin
+  result := GuidToString(NewGuid());
+end;
+
+function NewGuidAsStringNoBrackets:string;
+begin
+  result := GuidToString(NewGuid());
+  result := Copy(result,2,Length(result)-2);
+end;
+
+function ReplaceVariables(const aString: string; aVariables: TStrings): string;
+var
+  i:integer;
+begin
+  { No, this isn't efficient code. But given the fact that this is used at designtime and
+    in a place where the execution is abolutely not time-critical, clarity is preferable to
+    efficiency, imho. mh. }
+
+  result := aString;
+  if Assigned(aVariables) then begin
+    for i := 0 to aVariables.Count-1 do begin
+      result := StringReplace(result,'$('+aVariables.Names[i]+')',aVariables.Values[aVariables.Names[i]],[rfReplaceAll,rfIgnoreCase]);
+    end;
+  end;
+  result := StringReplace(result,'$(NewID)',NewGuidAsString(),[rfReplaceAll,rfIgnoreCase]);
+  result := StringReplace(result,'$(NewID2)',NewGuidAsStringNoBrackets(),[rfReplaceAll,rfIgnoreCase]);
+end;
+
+function ProjectName: string;
+var
+  lProjectName:string;
+begin
+  if Assigned(CurrentProject()) then begin
+    lProjectName := (CurrentProject as IOTAModule).FileName;
+    lProjectName := ChangeFileExt(ExtractFileName(lProjectName),'');
+  end
+  else begin
+    lProjectName := '';
+  end;
+  result := lProjectName;
+end;
+
+function RemoveInitialT(const aString:string):string;
+begin
+  result := aString;
+  if (result <> '') and (result[1] = 'T') then Delete(result,1,1);
+end;
+
+function AddInitialT(const aString:string):string;
+begin
+  result := aString;
+  if (result <> '') and (result[1] <> 'T') then result := 'T'+result;
+end;
+
+function GetDllPath: String;
+var TheFileName : array[0..MAX_PATH] of char;
+begin
+  FillChar(TheFileName, SizeOf(TheFileName), #0);
+  {$IFDEF KYLIX}System.{$ENDIF}GetModuleFileName(hInstance, TheFileName, sizeof(TheFileName));
+  Result := ExtractFilePath(TheFileName);
+end;
+
+function ModuleServices: IOTAModuleServices;
+begin
+  result := (BorlandIDEServices as IOTAModuleServices);
+end;
+
+function CurrentProject: IOTAProject;
+var
+  services: IOTAModuleServices;
+  module: IOTAModule;
+  project: IOTAProject;
+  projectgroup: IOTAProjectGroup;
+  multipleprojects: Boolean;
+  i: Integer;
+begin
+  result := nil;
+
+  multipleprojects := False;
+  services := ModuleServices;
+
+  if (services = nil) then Exit;
+
+  for I := 0 to (services.ModuleCount - 1) do begin
+    module := services.Modules[I];
+    if (module.QueryInterface(IOTAProjectGroup, ProjectGroup) = S_OK) then begin
+      result := ProjectGroup.ActiveProject;
+      Exit;
+    end
+
+    else if module.QueryInterface(IOTAProject, Project) = S_OK then begin
+      if (result = nil) then
+        result := Project // Found the first project, so save it
+      else
+        multipleprojects := True; // It doesn't look good, but keep searching for a project group
+    end;
+  end;
+
+  if multipleprojects then result := nil;
+end;
+
+function ProjectByName(const aName: string): IOTAProject;
+var
+  services: IOTAModuleServices;
+  module: IOTAModule;
+  project: IOTAProject;
+  i: Integer;
+begin
+  result := nil;
+
+  services := ModuleServices;
+
+  if (services = nil) then Exit;
+
+  for I := 0 to (services.ModuleCount - 1) do begin
+    module := services.Modules[I];
+    if module.QueryInterface(IOTAProject, Project) = S_OK then begin
+      if module.FileName = aName then begin
+        result := Project;
+        exit;
+      end;
+    end;
+  end;
+end;
+
+function CurrentProjectGroup: IOTAProjectGroup;
+var
+  services: IOTAModuleServices;
+  i: Integer;
+begin
+  Result := nil;
+  services := ModuleServices;
+  for i := 0 to ModuleServices.ModuleCount - 1 do begin
+    if Supports(ModuleServices.Modules[i], IOTAProjectGroup, Result) then begin
+      Break;
+    end;
+  end;
+end;
+
+function GetUniqueProjectFilename(aProject: IOTAProject; aName: string): string;
+var
+  lBaseName, lName: string;
+  lCount: integer;
+
+  function ProjectHasFile: boolean;
+  var
+    i: integer;
+  begin
+    result := false;
+    for i := 0 to aProject.GetModuleCount-1 do begin
+      if (aProject.GetModule(i).Name = lName) or (aProject.GetModule(i).Name = ChangeFileExt(lName, '')) then begin
+        result := true;
+        break;
+      end;
+    end;
+  end;
+
+begin
+  lName := aName;
+  lBaseName := ChangeFileExt(aName, '');
+  lCount := 0;
+  while ProjectHasFile() do begin
+    inc(lCount);
+    lName := lBaseName+IntToStr(lCount)+ExtractFileExt(aName);
+  end;
+  result := lName;
+end;
+
+function FindModuleByUnitName(const aProject: IOTAProject; const aModuleName: string): IOTAModule;
+var
+  i: integer;
+begin
+  result := nil;
+  for i := 0 to aProject.GetModuleCount - 1 do
+    if (CompareText(ExtractFileName(aModuleName), ExtractFileName(aProject.GetModule(i).FileName)) = 0) then begin
+      result := aProject.GetModule(i).OpenModule;
+      Exit;
+    end;
+end;
+
+
+const
+  MaxSourceSize = 10000;
+
+function ReadModuleSource(const aModule: IOTAModule): String;
+var
+  l, i: integer;
+  editor: IOTASourceEditor;
+  reader: IOTAEditReader;
+  lSource: AnsiString;
+begin
+  result := '';
+  with aModule do
+    for i := 0 to GetModuleFileCount - 1 do begin
+      if Supports(GetModuleFileEditor(i), IOTASourceEditor, editor) then begin
+        // TODO: find a way not to depend on files smaller than 10k... I only use this for DPRs so it's fine for now
+        SetLength(lSource, MaxSourceSize);
+        //l := 0; to remove warning
+
+        reader := editor.CreateReader;
+        l := reader.GetText(0, @lSource[1], MaxSourceSize);
+        reader := nil;
+        SetLength(lSource, l);
+
+        result := {$IFDEF DELPHI2009UP}UTF8ToString{$ENDIF}(lSource);
+        Exit;
+      end;
+    end;
+end;
+
+procedure WriteModuleSource(const aModule: IOTAModule; const aCode, aHeader: string);
+var
+  i: integer;
+  lEditor: IOTASourceEditor;
+  writer: IOTAEditWriter;
+begin
+  with aModule do begin
+    for i := 0 to GetModuleFileCount - 1 do begin
+      if Supports(GetModuleFileEditor(i), IOTASourceEditor, lEditor) then begin
+        if LowerCase(ExtractFileExt(GetModuleFileEditor(i).FileName)) = '.h' then begin
+          if aHeader <> '' then begin
+            writer := lEditor.CreateWriter;
+            writer.DeleteTo(MaxInt);
+            writer.Insert(PAnsiChar({$IFDEF DELPHI2009UP}UTF8Encode{$ENDIF}(aHeader)));
+            writer := nil;
+          end;
+        end
+        else begin
+          writer := lEditor.CreateWriter;
+          writer.DeleteTo(MaxInt);
+          writer.Insert(PAnsiChar({$IFDEF DELPHI2009UP}UTF8Encode{$ENDIF}(aCode)));
+          writer := nil;
+        end;
+      end;
+    end;
+  end;
+end;
+
+procedure AddOrReplaceNamedModule(const aProject: IOTAProject; aName, aCode: string);
+var
+  lModule: IOTAModule;
+begin
+  lModule := FindModuleByUnitName(aProject, aName);
+  if assigned(lModule) then begin
+    WriteModuleSource(lModule, aCode, '');
+  end
+  else begin
+    aName :=  ExtractFilePath(CurrentProject.FileName)+aName;
+    SaveStringToFile(aName, aCode);
+    CurrentProject.AddFile(aName, true);
+    lModule := FindModuleByUnitName(CurrentProject, aName);
+    {$IFDEF DELPHI9UP}
+    if assigned(lModule) then lModule.Show();
+    {$ENDIF DELPHI9UP}
+  end;
+end;
+
+function GetDelphiVersion: Integer;
+begin
+{$IFDEF DELPHI5}
+  result := 5;
+{$ELSE}
+{$IFDEF DELPHI2007}
+  result := 11;
+{$ELSE}
+  result := Trunc(RTLVersion)-8;
+{$ENDIF}
+{$ENDIF}
+end;
+
+function LanguageFromPersonality(aProject: IOTAProject): string;
+{$IFDEF BDS}
+var s: string;
+{$ENDIF}
+begin
+  {$IFDEF BDS}
+  s := aProject.Personality;
+  if s = sDelphiPersonality then result := 'Delphi for Win32'
+  else if s = sDelphiDotNetPersonality then result := 'Delphi for .NET'
+  else if s = sCSharpPersonality then result := 'C#'
+  else if s = sVBPersonality then result := 'Visual Basic'
+  else if s = sCBuilderPersonality then result := 'C++'
+  else result := 'Unknown';
+  {$ELSE}
+  result := 'Delphi for Win32';
+  {$ENDIF}
+end;
+
+function LanguageFromPersonalityEx(aProject: IOTAProject): string;
+begin
+  result := LanguageFromPersonality(aProject);
+  {$IFDEF BDS}
+  if result = 'Delphi for .NET' then
+    result := result+'/'+IntToStr(GetDelphiVersion);
+  {$ENDIF}
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWOTAHelpers_laz.pas b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWOTAHelpers_laz.pas
new file mode 100644
index 0000000..1cfb579
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWOTAHelpers_laz.pas
@@ -0,0 +1,233 @@
+unit uEWOTAHelpers_laz;
+
+{$I Everwood.inc}
+
+interface
+
+uses
+  LazIDEIntf, ProjectIntf, Classes;
+
+function GetDllPath: String;
+function CurrentProject: TLazProject;
+function ProjectByName(const aName: string): TLazProject;
+
+function GetUniqueProjectFilename(aProject: TLazProject; aName: string): string;
+
+function FindModuleByUnitName(const aProject: TLazProject; const aModuleName: string): TLazProjectFile;
+
+function RemoveInitialT(const aString:string):string;
+function AddInitialT(const aString:string):string;
+
+function ProjectName: string;
+
+function LoadStringFromFile(iFilename:string):string;
+procedure SaveStringToFile(const iFilename,iString:string);
+
+function ReplaceVariables(const aString: string; aVariables: TStrings): string;
+
+function ReadModuleSource(const aModule: TLazProjectFile): string;
+procedure WriteModuleSource(const aModule: TLazProjectFile; const aCode, aHeader: string);
+procedure AddOrReplaceNamedModule(const aProject: TLazProject; aName, aCode: string);
+
+implementation
+
+uses {$IFDEF MSWINDOWS}Windows, ActiveX, {$ENDIF} SysUtils;
+
+function LoadStringFromFile(iFilename:string):string;
+var t:text;
+    s:string;
+begin
+  try
+    AssignFile(t,iFilename);
+    Reset(t);
+    try
+      result := '';
+      while not Eof(t) do begin
+        Readln(t,s);
+        result := result+s+#13#10;
+      end;
+    finally
+      CloseFile(t);
+    end;
+  except
+    on E:Exception do
+      raise EInOutError.Create('Error loading file '+iFilename+' ('+E.ClassName+': '+E.Message+')');
+  end;
+end;
+
+procedure SaveStringToFile(const iFilename,iString:string);
+var t:TextFile;
+begin
+  try
+    AssignFile(t,iFilename);
+    Rewrite(t);
+    try
+      Write(t,iString);
+    finally
+      CloseFile(t);
+    end;
+  except
+    on E:Exception do
+      raise EInOutError.Create('Error saving file '+iFilename+' ('+E.ClassName+': '+E.Message+')');
+  end;
+end;
+
+function NewGuid:TGUID;
+begin
+  {$IFDEF MSWINDOWS}
+  CoCreateGuid(result);
+  {$ENDIF MSWINDOWS}
+  {$IFDEF LINUX}
+  CreateGuid(result);
+  {$ENDIF}
+end;
+
+function NewGuidAsString:string;
+begin
+  result := GuidToString(NewGuid());
+end;
+
+function NewGuidAsStringNoBrackets:string;
+begin
+  result := GuidToString(NewGuid());
+  result := Copy(result,2,Length(result)-2);
+end;
+
+function ReplaceVariables(const aString: string; aVariables: TStrings): string;
+var
+  i:integer;
+begin
+  { No, this isn't efficient code. But given the fact that this is used at designtime and
+    in a place where the execution is abolutely not time-critical, clarity is preferable to
+    efficiency, imho. mh. }
+
+  result := aString;
+  if Assigned(aVariables) then begin
+    for i := 0 to aVariables.Count-1 do begin
+      result := StringReplace(result,'$('+aVariables.Names[i]+')',aVariables.Values[aVariables.Names[i]],[rfReplaceAll,rfIgnoreCase]);
+    end;
+  end;
+  result := StringReplace(result,'$(NewID)',NewGuidAsString(),[rfReplaceAll,rfIgnoreCase]);
+  result := StringReplace(result,'$(NewID2)',NewGuidAsStringNoBrackets(),[rfReplaceAll,rfIgnoreCase]);
+end;
+
+function ProjectName: string;
+begin
+  if Assigned(CurrentProject) and Assigned(CurrentProject.MainFile) then
+    Result := ChangeFileExt(ExtractFileName(CurrentProject.MainFile.Filename),'')
+  else
+    Result := '';
+end;
+
+function RemoveInitialT(const aString:string):string;
+begin
+  result := aString;
+  if (result <> '') and (result[1] = 'T') then Delete(result,1,1);
+end;
+
+function AddInitialT(const aString:string):string;
+begin
+  result := aString;
+  if (result <> '') and (result[1] <> 'T') then result := 'T'+result;
+end;
+
+function GetDllPath: String;
+{$IFDEF MSWINDOWS}
+var
+  TheFileName : array[0..MAX_PATH] of char;
+{$ENDIF}
+begin
+  {$IFDEF MSWINDOWS}
+  {$IFDEF FPC}
+  TheFileName[0]:=#0;
+  {$ENDIF}
+  FillChar(TheFileName, SizeOf(TheFileName), #0);
+  GetModuleFileName(hInstance, TheFileName, sizeof(TheFileName));
+  Result := ExtractFilePath(TheFileName);
+  {$ELSE}
+  Result := '';
+  {$ENDIF}
+end;
+
+function CurrentProject: TLazProject;
+begin
+  result := LazarusIDE.ActiveProject;
+end;
+
+function ProjectByName(const aName: string): TLazProject;
+begin
+  if CurrentProject.MainFile.Filename = aName then
+    Result := CurrentProject
+  else
+    Result := nil;
+end;
+
+
+function GetUniqueProjectFilename(aProject: TLazProject; aName: string): string;
+var
+  lBaseName, lName: string;
+  lCount: integer;
+
+  function ProjectHasFile: boolean;
+  var
+    i: integer;
+  begin
+    result := false;
+    for i := 0 to aProject.FileCount - 1 do begin
+      if (aProject.Files[i].Filename = lName) or (aProject.Files[i].Filename = ChangeFileExt(lName, '')) then begin
+        result := true;
+        break;
+      end;
+    end;
+  end;
+
+begin
+  lName := aName;
+  lBaseName := ChangeFileExt(aName, '');
+  lCount := 0;
+  while ProjectHasFile() do begin
+    inc(lCount);
+    lName := lBaseName+IntToStr(lCount)+ExtractFileExt(aName);
+  end;
+  result := lName;
+end;
+
+function FindModuleByUnitName(const aProject: TLazProject; const aModuleName: string): TLazProjectFile;
+var
+  i: integer;
+begin
+  result := nil;
+  for i := 0 to aProject.FileCount - 1 do
+    if (CompareText(ExtractFileName(aModuleName), ExtractFileName(aProject.Files[i].Filename)) = 0) then begin
+      result := aProject.Files[i];
+      Break;
+    end;
+end;
+
+function ReadModuleSource(const aModule: TLazProjectFile): string;
+begin
+  result := aModule.GetSourceText;
+end;
+
+procedure WriteModuleSource(const aModule: TLazProjectFile; const aCode, aHeader: string);
+begin
+  aModule.SetSourceText(aCode);
+end;
+
+procedure AddOrReplaceNamedModule(const aProject: TLazProject; aName, aCode: string);
+var
+  lModule: TLazProjectFile;
+begin
+  lModule := FindModuleByUnitName(aProject, aName);
+  if assigned(lModule) then begin
+    WriteModuleSource(lModule, aCode, '');
+  end
+  else begin
+    aName :=  ExtractFilePath(CurrentProject.MainFile.Filename)+aName;
+    SaveStringToFile(aName, aCode);
+    lModule:= CurrentProject.CreateProjectFile(aName);
+    CurrentProject.AddFile(lModule, False);
+  end;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWOTAMessages.pas b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWOTAMessages.pas
new file mode 100644
index 0000000..13097d0
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWOTAMessages.pas
@@ -0,0 +1,56 @@
+unit uEWOTAMessages;
+
+{$INCLUDE eDefines.inc}
+
+interface
+
+procedure ClearIDEMessages(const aGroupName: string);
+procedure AddIDEMessage(const aGroupName: string; const aMessageStr: string; aLine : integer = -1; aColumn: integer = -1; const aFileName: string = ''; const aPrefixStr: string = '');
+
+implementation
+
+uses
+  ToolsAPI;
+
+{$IFDEF DELPHI7UP}
+procedure ClearIDEMessages(const aGroupName: string);
+var
+  lGroup: IOTAMessageGroup;
+begin
+  with BorlandIDEServices as IOTAMessageServices60 do begin
+    lGroup := GetGroup(aGroupName);
+    if Assigned(lGroup) then
+      RemoveMessageGroup(lGroup);
+  end;
+end;
+
+procedure AddIDEMessage(const aGroupName: string; const aMessageStr: string; aLine: integer = -1; aColumn: integer = -1; const aFileName: string = ''; const aPrefixStr: string = '');
+var
+  lGroup: IOTAMessageGroup;
+  lDummyLineRef: pointer;
+  lPrefix: string;
+begin
+  with BorlandIDEServices as IOTAMessageServices60 do begin
+    lGroup := GetGroup(aGroupName);
+    ShowMessageView(lGroup);
+    if not Assigned(lGroup) then lGroup := AddMessageGroup(aGroupName);
+
+    lPrefix := aPrefixStr;
+    if lPrefix = '' then lPrefix := 'Note';
+    AddToolMessage(aFilename, aMessageStr, lPrefix, aLine, aColumn, nil, lDummyLineRef, lGroup);
+  end;
+end;
+
+{$ELSE}
+
+procedure ClearIDEMessages(const aGroupName: string);
+begin
+end;
+
+procedure AddIDEMessage(const aGroupName: string; const aMessageStr: string; aLine : integer = -1; aColumn: integer = -1; const aFileName: string = ''; const aPrefixStr: string = '');
+begin
+end;
+
+{$ENDIF}
+
+end.
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWOTANewModuleExpert.pas b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWOTANewModuleExpert.pas
new file mode 100644
index 0000000..bd6e6ea
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWOTANewModuleExpert.pas
@@ -0,0 +1,16 @@
+unit uEWOTANewModuleExpert;
+
+interface
+
+uses
+  {$IFDEF DELPHI5}DsgnIntf,{$ENDIF}
+  {$IFDEF DELPHI6UP}DesignEditors,{$ENDIF}
+  ToolsAPI, Classes, uEWOTARepositoryExpert;
+
+type
+  TEWNewModuleExpert = class(TEWRepositoryExpert, IOTAFormWizard)
+  end;
+
+implementation
+
+end.
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWOTANewProjectExpert.pas b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWOTANewProjectExpert.pas
new file mode 100644
index 0000000..a089160
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWOTANewProjectExpert.pas
@@ -0,0 +1,16 @@
+unit uEWOTANewProjectExpert;
+
+interface
+
+uses
+  {$IFDEF DELPHI5}DsgnIntf,{$ENDIF}
+  {$IFDEF DELPHI6UP}DesignEditors,{$ENDIF}
+  ToolsAPI, Classes, uEWOTARepositoryExpert;
+
+type
+  TEWNewProjectExpert = class(TEWRepositoryExpert, IOTAProjectWizard)
+  end;
+
+implementation
+
+end.
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWOTARepositoryExpert.pas b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWOTARepositoryExpert.pas
new file mode 100644
index 0000000..7b7ecde
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWOTARepositoryExpert.pas
@@ -0,0 +1,284 @@
+unit uEWOTARepositoryExpert;
+
+{$I Everwood.inc}
+
+interface
+
+uses
+  {$IFDEF DELPHI5}DsgnIntf,{$ENDIF}
+  {$IFDEF DELPHI6UP}DesignEditors,{$ENDIF}
+  Windows, Classes, ToolsAPI;
+
+{$IFNDEF BDS}
+const
+  sDelphiPersonality = 'Delphi.Personality';
+{$ENDIF}
+
+{$IFDEF DELPHI5}
+  dAny = 'Any';
+{$ENDIF}
+
+type
+  TEWRepositoryExpert = class(TInterfacedObject, IOTAWizard, IOTARepositoryWizard{$IFDEF DELPHI6UP}, IOTARepositoryWizard60{$ENDIF} {$IFDEF BDS}, IOTARepositoryWizard80{$ENDIF})
+  private
+    fIcon: Cardinal;
+    fPersonality: string;
+  protected
+    procedure AfterSave; virtual;
+    procedure BeforeSave; virtual;
+    procedure Destroyed; virtual;
+    procedure Modified; virtual;
+
+    procedure Execute; virtual;
+    function GetAuthor: String; virtual;
+    function GetComment: String; virtual;
+    function GetGlyph: {$IFDEF DELPHI5}HICON{$ELSE}Cardinal{$ENDIF};
+    function GetIDString: String;
+    function GetInternalIDString: String; virtual; abstract;
+    function GetName: String; virtual; abstract;
+    function GetPage: String; virtual; abstract;
+    function GetState: TWizardState; virtual;
+    function GetDesigner: String; virtual;
+
+    {$IFDEF BDS}
+    function GetGalleryCategory: IOTAGalleryCategory; virtual;
+    {$ENDIF}
+    function GetPersonality: string; virtual;
+
+    function LoadGlyph: Cardinal; virtual;
+
+    function CreateNewModuleFromTemplateFile(const aTemplateFile: string; const aName, aAncestor: string; aVariables: TStrings=nil):IOTAModule;
+    function CreateNewModuleFromString(const aTemplateString: string; const aName, aAncestor: string; aVariables: TStrings=nil):IOTAModule;
+    function CreateNewProject:IOTAProject;
+    function CreateNewProjectFromTemplateFile(aTemplateFile: string; aProjectFileName: string; aVariables: TStrings=nil):IOTAProject;
+    function CreateNewProjectFromTemplateFolder(const aTemplateFileName: string; const aProjectFileName: string; aVariables: TStrings=nil):IOTAProject;
+
+  public
+    constructor Create(aPersonality: string = sDelphiPersonality);
+  end;
+
+
+implementation
+
+uses
+  SysUtils, uEWOTAWizards, Dialogs, uEWOTAHelpers;
+
+{ TEWRepositoryExpert }
+
+procedure TEWRepositoryExpert.AfterSave;
+begin
+
+end;
+
+procedure TEWRepositoryExpert.BeforeSave;
+begin
+
+end;
+
+constructor TEWRepositoryExpert.Create(aPersonality: string);
+begin
+  fPersonality := aPersonality;
+end;
+
+function TEWRepositoryExpert.CreateNewModuleFromString(const aTemplateString, aName, aAncestor: string; aVariables: TStrings): IOTAModule;
+var
+  lModuleServices: IOTAModuleServices;
+//  lSourceTemplate,lDfmTemplate: string;
+//  lDfmTemplateFile: string;
+begin
+  if BorlandIDEServices.QueryInterface(IOTAModuleServices, lModuleServices) = S_OK then
+    result := lModuleServices.CreateModule(TEWFormCreator.Create(aTemplateString,
+                                                                 '',
+                                                                 aName, aAncestor, aVariables));
+end;
+
+function TEWRepositoryExpert.CreateNewModuleFromTemplateFile(const aTemplateFile: string; const aName, aAncestor: string; aVariables: TStrings):IOTAModule;
+var
+  lModuleServices: IOTAModuleServices;
+  lSourceTemplate,lDfmTemplate: string;
+  lDfmTemplateFile: string;
+begin
+  lSourceTemplate := LoadStringFromFile(aTemplateFile);
+
+  lDfmTemplate := '';
+  lDfmTemplateFile := ChangeFileExt(aTemplateFile,'.dfm');
+  if FileExists(lDfmTemplateFile) then begin
+    lDfmTemplate := LoadStringFromFile(lDfmTemplateFile);
+  end;
+
+  if BorlandIDEServices.QueryInterface(IOTAModuleServices, lModuleServices) = S_OK then
+    result := lModuleServices.CreateModule(TEWFormCreator.Create(lSourceTemplate,
+                                                                 lDfmTemplate,
+                                                                 aName, aAncestor, aVariables));
+end;
+
+function TEWRepositoryExpert.CreateNewProject: IOTAProject;
+var
+  lModuleServices: IOTAModuleServices;
+begin
+  if BorlandIDEServices.QueryInterface(IOTAModuleServices, lModuleServices) = S_OK then
+    result := lModuleServices.CreateModule(TEWProjectCreator.Create('', '', nil)) as IOTAProject;
+end;
+
+function TEWRepositoryExpert.CreateNewProjectFromTemplateFile(aTemplateFile: string; aProjectFileName: string; aVariables: TStrings): IOTAProject;
+{$IFNDEF BDS}
+var
+  lModuleServices: IOTAModuleServices;
+{$ENDIF}
+begin
+  result := NIL;
+  {$IFDEF BDS} // AleF: Fixed a typo here. It said BSD!!!
+  aProjectFileName := ChangeFileExt(aProjectFileName, '.bdsproj');
+  if FileExists(aProjectFileName) then begin
+    (BorlandIDEServices as IOTAActionServices).OpenProject(aProjectFileName, false); // Vynnyk: Rolled back - because not compilable
+     result := (BorlandIDEServices as IOTAModuleServices).GetActiveProject;
+  end;
+  {$ELSE}
+  if BorlandIDEServices.QueryInterface(IOTAModuleServices, lModuleServices) = S_OK then begin
+    result := lModuleServices.CreateModule(TEWProjectCreator.Create(aTemplateFile, aProjectFileName, aVariables)) as IOTAProject;
+  end;
+  {$ENDIF}
+end;
+
+function TEWRepositoryExpert.CreateNewProjectFromTemplateFolder(const aTemplateFileName: string; const aProjectFileName: string; aVariables: TStrings): IOTAProject;
+var
+  lString, lName, lFileExt: string;
+  lOk: dword;
+  lTemplateFolder, lProjectFolder: string;
+  lSearch: TSearchRec;
+begin
+  lTemplateFolder := ExtractFilePath(aTemplateFileName);
+  lProjectFolder := ExtractFilePath(aProjectFileName);
+
+  if not FileExists(aTemplateFileName) then
+    raise Exception.Create('Template not found at '+ExtractFilePath(aTemplateFileName));
+
+  lOk := FindFirst(lTemplateFolder+'*.*',faAnyFile,lSearch);
+  try
+    while lOk = 0 do try
+      if (lSearch.Attr and faDirectory) = 0 then begin
+        {$IFNDEF BDS}
+        if ExtractFileExt(lSearch.Name) = '.bdsproj' then
+          Continue;
+        {$ENDIF}
+
+        lFileExt := ExtractFileExt(lSearch.Name);
+        lName := ReplaceVariables(lSearch.Name, aVariables);
+        if SameText(lFileExt,'.res') then begin
+          CopyFile(pChar(lTemplateFolder+lSearch.Name), pChar(lProjectFolder+lName),false);
+        end
+        else begin
+          lString := ReplaceVariables(LoadStringFromFile(lTemplateFolder+lSearch.Name), aVariables);
+          SaveStringToFile(lProjectFolder+lName,lString);
+        end;
+      end;
+    finally
+      lOk := FindNext(lSearch);
+    end;    { while }
+  finally
+    FindClose(lSearch);
+  end;
+  result := CreateNewProjectFromTemplateFile(aTemplateFileName, aProjectFileName, aVariables);
+end;
+
+procedure TEWRepositoryExpert.Destroyed;
+begin
+end;
+
+procedure TEWRepositoryExpert.Execute;
+begin
+end;
+
+function TEWRepositoryExpert.GetAuthor: String;
+begin
+  result := 'RemObjects Software'
+end;
+
+function TEWRepositoryExpert.GetComment: String;
+begin
+
+end;
+
+function TEWRepositoryExpert.GetDesigner: String;
+begin
+  Result := dAny;
+end;
+
+function TEWRepositoryExpert.GetGlyph: {$IFDEF DELPHI5}HICON{$ELSE}Cardinal{$ENDIF};
+begin
+  { We'll cache the Glpyh locally so it won't be loaded again and again.
+    Apparently Delphi doesn't free the Glpyh, so this would leak otherwise }
+
+  if fIcon = 0 then fIcon := LoadGlyph();
+  result := fIcon;
+end;
+
+function TEWRepositoryExpert.GetIDString: String;
+begin
+  result := GetInternalIDString+'.'+fPersonality;
+end;
+
+function TEWRepositoryExpert.LoadGlyph: Cardinal;
+begin
+  result := LoadIcon(hInstance,'EverwoodWizardStandardIcon');
+end;
+
+
+function TEWRepositoryExpert.GetState: TWizardState;
+begin
+  result := [wsEnabled];
+end;
+
+procedure TEWRepositoryExpert.Modified;
+begin
+
+end;
+
+{$IFDEF BDS}
+function TEWRepositoryExpert.GetGalleryCategory: IOTAGalleryCategory;
+var
+  lGalleryCategory: string;
+  lGalleryManager: IOTAGalleryCategoryManager;
+  lGallery: IOTAGalleryCategory;
+begin
+  if fPersonality = sDelphiPersonality then
+    lGalleryCategory := sCategoryDelphiNew
+  else if fPersonality = sCBuilderPersonality then
+    lGalleryCategory := sCategoryCBuilderNew
+  else if fPersonality = sDelphiDotNetPersonality then
+    lGalleryCategory := sCategoryDelphiDotNetNew
+  else if fPersonality = sCSharpPersonality then
+    lGalleryCategory := sCategoryCSharpNew
+  else if fPersonality = sVBPersonality then
+    lGalleryCategory := sCategoryVBNew
+  else
+    exit;
+
+  lGalleryManager := (BorlandIDEServices as IOTAGalleryCategoryManager);
+
+  lGallery := lGalleryManager.FindCategory(lGalleryCategory);
+  if assigned(lGallery) then begin
+
+    if fPersonality = sVBPersonality then
+      ShowMessage(lGalleryCategory+' '+fPersonality+' '+GetName+ ' - '+lGallery.DisplayName);
+
+    result := lGalleryManager.FindCategory(GetPage());
+    if not assigned(result) then begin
+      lGalleryManager.AddCategory(lGallery, GetPage()+'.'+fPersonality, GetPage());
+    end;
+  end
+  else begin
+    result := lGalleryManager.FindCategory(sCategoryGalileoOther);
+  end;
+
+end;
+{$ENDIF}
+
+function TEWRepositoryExpert.GetPersonality: string;
+begin
+  result := fPersonality;
+end;
+
+end.
+
+
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWOTAWizards.pas b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWOTAWizards.pas
new file mode 100644
index 0000000..987617c
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWOTAWizards.pas
@@ -0,0 +1,345 @@
+unit uEWOTAWizards;
+
+{----------------------------------------------------------------------------}
+{ RemObjects' Everwood - IDE Library
+{
+{ compiler: Delphi 6 and up, Kylix 3 and up
+{ platform: Win32, Linux
+{
+{ (c)opyright RemObjects Software. all rights reserved.
+{
+{ Using this code requires a valid license of Everwood
+{ which can be obtained at http://www.remobjects.com.
+{----------------------------------------------------------------------------}
+
+{$I Everwood.inc}
+
+interface
+
+uses
+  {$IFDEF DELPHI5}DsgnIntf,{$ENDIF}
+  {$IFDEF DELPHI6UP}DesignEditors,{$ENDIF}
+  SysUtils, Classes,
+  Dialogs, ToolsAPI;
+
+type
+  TEWSourceFile = class(TInterfacedObject, IOTAFile)
+  private
+    fAge: TDateTime;
+    fSource:string;
+  public
+    function GetSource: string;
+    function GetAge: TDateTime;
+    constructor Create(const iSource:string);
+  end;
+
+  TEWCreator = class(TInterfacedObject, IOTACreator)
+  private
+    fVariables: TStrings;
+    fAncestorName: String;
+    fName: string;
+  public
+    constructor Create(const aName, aAncestorName:string; aVariables:TStrings);
+    destructor Destroy; override;
+
+    function GetCreatorType: string; virtual; abstract;
+    function GetExisting: Boolean;
+    function GetFileSystem: string;
+    function GetOwner: IOTAModule; virtual;
+    function GetUnnamed: Boolean; virtual;
+
+    function CreateOTAFile(const aTemplate: string; const ModuleIdent: string=''; const FormIdent: string =''; const AncestorIdent: string=''): IOTAFile;
+
+  end;
+
+  TEWFormCreator = class(TEWCreator, IOTAModuleCreator)
+  public
+    constructor Create(const aCodeTemplate, aDfmTemplate, aName, aAncestor:string; aVariables:TStrings);
+
+    function GetCreatorType: string; override;
+
+    function GetAncestorName: string;
+    function GetImplFileName: string;
+    function GetIntfFileName: string;
+    function GetFormName: string;
+    function GetMainForm: Boolean;
+    function GetShowForm: Boolean;
+    function GetShowSource: Boolean;
+    function NewFormFile(const FormIdent, AncestorIdent: string): IOTAFile;
+    function NewImplSource(const ModuleIdent, FormIdent, AncestorIdent: string): IOTAFile;
+    function NewIntfSource(const ModuleIdent, FormIdent, AncestorIdent: string): IOTAFile;
+
+    procedure FormCreated(const FormEditor: IOTAFormEditor);
+
+  private
+    fCodeTemplate, fDfmTemplate: String;
+  end;
+
+  TEWProjectCreator = class(TEWCreator, IOTAProjectCreator, IOTAProjectCreator50{$IFDEF BDS}, IOTAProjectCreator80{$ENDIF})
+  public
+    constructor Create(const aCodeTemplateFile, aName:string; aVariables:TStrings);
+
+    function GetCreatorType: string; override;
+    function GetOwner: IOTAModule; override;
+    function GetUnnamed: Boolean; override;
+
+    function GetFileName: string;
+    function GetOptionFileName: string;
+    function GetShowSource: Boolean;
+    procedure NewDefaultModule;
+    function NewOptionSource(const ProjectName: string): IOTAFile;
+    procedure NewProjectResource(const Project: IOTAProject);
+    function NewProjectSource(const ProjectName: string): IOTAFile;
+
+    procedure NewDefaultProjectModule(const Project: IOTAProject); virtual;
+
+    {$IFDEF BDS}
+    function GetProjectPersonality: string;
+    {$ENDIF}
+
+  private
+    fCodeTemplateFile: string;
+  end;
+
+implementation
+
+uses
+  uEWOTAHelpers, Windows;
+
+{ TEWCreator }
+
+constructor TEWCreator.Create(const aName, aAncestorName:string; aVariables:TStrings);
+begin
+  fName := aName;
+  fAncestorName := aAncestorName;
+  fVariables := aVariables;
+end;
+
+destructor TEWCreator.Destroy;
+begin
+  inherited;
+end;
+
+function TEWCreator.GetExisting: Boolean;
+begin
+  result := false;
+end;
+
+function TEWCreator.GetFileSystem: string;
+begin
+  result := '';
+end;
+
+function TEWCreator.GetOwner: IOTAModule;
+begin
+  result := CurrentProject();
+end;
+
+function TEWCreator.GetUnnamed: Boolean;
+begin
+  result := true;
+end;
+
+function TEWCreator.CreateOTAFile(const aTemplate: string; const ModuleIdent, FormIdent, AncestorIdent: string): IOTAFile;
+var
+  i: integer;
+  lCode: string;
+begin
+  lCode := aTemplate;
+
+  { No, this isn't efficient code. But given the fact that this is used at designtime and
+    in a place where the execution is abolutely not time-critical, clarity is preferable to
+    efficiency, imho. mh. }
+
+  if ModuleIdent <> '' then begin
+    lCode := StringReplace(lCode,'$(Module)',ModuleIdent,[rfReplaceAll,rfIgnoreCase]);
+  end;
+  if FormIdent <> '' then begin
+    lCode := StringReplace(lCode,'$(FormName)',RemoveInitialT(FormIdent),[rfReplaceAll,rfIgnoreCase]);
+    lCode := StringReplace(lCode,'$(FormClass)',AddInitialT(FormIdent),[rfReplaceAll,rfIgnoreCase]);
+  end;
+  if AncestorIdent <> ''then begin
+    lCode := StringReplace(lCode,'$(Ancestor)',AncestorIdent,[rfReplaceAll,rfIgnoreCase]);
+  end;
+  lCode := StringReplace(lCode,'$(Project)',ProjectName,[rfReplaceAll,rfIgnoreCase]);
+  if Assigned(fVariables) then begin
+    for i := 0 to fVariables.Count-1 do begin
+      lCode := StringReplace(lCode,'$('+fVariables.Names[i]+')',fVariables.Values[fVariables.Names[i]],[rfReplaceAll,rfIgnoreCase]);
+    end;
+  end;
+  lCode := StringReplace(lCode,'$((','$(',[rfReplaceAll,rfIgnoreCase]);
+  {$IFDEF DEBUG_EVERWOOD_SHOW_NEW_MODULE_CODE}
+  ShowMessage(lCode);
+  {$ENDIF DEBUG_EVERWOOD_SHOW_NEW_MODULE_CODE}
+  result := TEWSourceFile.Create(lCode);
+end;
+
+{ TEWFormCreator }
+
+constructor TEWFormCreator.Create(const aCodeTemplate, aDfmTemplate, aName, aAncestor: string; aVariables: TStrings);
+begin
+  inherited Create(aName, aAncestor, aVariables);
+  fCodeTemplate := aCodeTemplate;
+  fDfmTemplate := aDfmTemplate;
+end;
+
+function TEWFormCreator.GetCreatorType: string;
+begin
+  result := sForm;
+end;
+
+procedure TEWFormCreator.FormCreated(const FormEditor: IOTAFormEditor);
+begin
+
+end;
+
+function TEWFormCreator.GetAncestorName: string;
+begin
+  result := fAncestorName;
+end;
+
+function TEWFormCreator.GetFormName: string;
+begin
+  result := '';
+end;
+
+function TEWFormCreator.GetImplFileName: string;
+begin
+  result := IncludeTrailingBackslash(ExtractFilePath(CurrentProject.FileName))+GetUniqueProjectFilename(CurrentProject, fName);
+end;
+
+function TEWFormCreator.GetIntfFileName: string;
+begin
+  result := '';
+end;
+
+function TEWFormCreator.GetMainForm: Boolean;
+begin
+  result := false;
+end;
+
+function TEWFormCreator.GetShowForm: Boolean;
+begin
+  result := true;
+end;
+
+function TEWFormCreator.GetShowSource: Boolean;
+begin
+  result := true;
+end;
+
+function TEWFormCreator.NewFormFile(const FormIdent, AncestorIdent: string): IOTAFile;
+begin
+  {$IFDEF DEBUG_EVERWOOD_SHOW_NEW_MODULE_CODE}
+  ShowMessage('dfm: '+FormIdent+' - '+AncestorIdent);
+  {$ENDIF DEBUG_EVERWOOD_SHOW_NEW_MODULE_CODE}
+  result := TEWSourceFile.Create(Format(fDfmTemplate,['',RemoveInitialT(FormIdent),ProjectName]));
+  result := CreateOTAFile(fDfmTemplate, '$(Module)', FormIdent, AncestorIdent);
+end;
+
+function TEWFormCreator.NewImplSource(const ModuleIdent, FormIdent, AncestorIdent: string): IOTAFile;
+begin
+  {$IFDEF DEBUG_EVERWOOD_SHOW_NEW_MODULE_CODE}
+  ShowMessage('pas: '+ModuleIdent+' - '+FormIdent+' - '+AncestorIdent);
+  {$ENDIF DEBUG_EVERWOOD_SHOW_NEW_MODULE_CODE}
+  result := CreateOTAFile(fCodeTemplate, ModuleIdent, FormIdent, AncestorIdent);
+end;
+
+function TEWFormCreator.NewIntfSource(const ModuleIdent, FormIdent, AncestorIdent: string): IOTAFile;
+begin
+  result := nil;
+end;
+
+{ TEWProjectCreator }
+
+constructor TEWProjectCreator.Create(const aCodeTemplateFile, aName: string; aVariables: TStrings);
+begin
+  inherited Create(aName, '', aVariables);
+  fCodeTemplateFile := aCodeTemplateFile;
+end;
+
+function TEWProjectCreator.GetCreatorType: string;
+begin
+  result := sLibrary;
+end;
+
+function TEWProjectCreator.GetFileName: string;
+begin
+  result := fName;
+end;
+
+function TEWProjectCreator.GetOptionFileName: string;
+begin
+  result := '';
+end;
+
+function TEWProjectCreator.GetOwner: IOTAModule;
+begin
+  result := CurrentProjectGroup;
+end;
+
+function TEWProjectCreator.GetShowSource: Boolean;
+begin
+  result := false;
+end;
+
+function TEWProjectCreator.GetUnnamed: Boolean;
+begin
+  result := (fName = '');
+end;
+
+procedure TEWProjectCreator.NewDefaultModule;
+begin
+
+end;
+
+procedure TEWProjectCreator.NewDefaultProjectModule(const Project: IOTAProject);
+begin
+end;
+
+{$IFDEF BDS}
+function TEWProjectCreator.GetProjectPersonality: string;
+begin
+  result := sDelphiPersonality;
+end;
+{$ENDIF}
+
+function TEWProjectCreator.NewOptionSource(const ProjectName: string): IOTAFile;
+begin
+  result := nil;
+end;
+
+procedure TEWProjectCreator.NewProjectResource(const Project: IOTAProject);
+begin
+  CopyFile(pChar(ChangeFileExt(fCodeTemplateFile,'.res')),pChar(ChangeFileExt(Project.FileName,'.res')),false);
+end;
+
+function TEWProjectCreator.NewProjectSource(const ProjectName: string): IOTAFile;
+begin
+  //ShowMessage('x:'+ProjectName);
+  if fCodeTemplateFile <> '' then
+    result := CreateOTAFile(LoadStringFromFile(fCodeTemplateFile),ProjectName)
+  else
+    result := nil;
+end;
+
+{ TEWSourceFile }
+
+constructor TEWSourceFile.Create(const iSource: string);
+begin
+  inherited Create();
+  fSource := iSource;
+  fAge := Now;
+end;
+
+function TEWSourceFile.GetAge: TDateTime;
+begin
+  result := fAge;
+end;
+
+function TEWSourceFile.GetSource: string;
+begin
+  result := fSource;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWSampleInfo.dfm b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWSampleInfo.dfm
new file mode 100644
index 0000000..4b59d08
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWSampleInfo.dfm
@@ -0,0 +1,566 @@
+object SampleInfoForm: TSampleInfoForm
+  Left = 283
+  Top = 227
+  AutoScroll = False
+  BorderWidth = 3
+  Caption = 'SampleInfoForm'
+  ClientHeight = 358
+  ClientWidth = 578
+  Color = clBtnFace
+  Font.Charset = DEFAULT_CHARSET
+  Font.Color = clWindowText
+  Font.Height = -11
+  Font.Name = 'Tahoma'
+  Font.Style = []
+  FormStyle = fsStayOnTop
+  Icon.Data = {
+    0000010003003030000001002000A8250000360000002020000001002000A810
+    0000DE2500001010000001002000680400008636000028000000300000006000
+    0000010020000000000080250000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    000000000000000000001616163F1414144F1212127F1111117F0F0F0F7F0D0D
+    0D7F0C0C0C7F0A0A0A6F0909093F0808080F0000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    00000000000000000000000000000000000000000000000000001E1E1E1F1C1C
+    1C6F1A1A1ABF181818FF171717FF151515FF131313FF121212FF101010FF0F0F
+    0FFF0D0D0DFF0B0B0BFF0A0A0AFF080808FF060606DF0505059F0404044F0000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000002222225F202020BF1F1F1FFF1D1D
+    1DFF1C1C1CFF1A1A1AFF181818FF171717FF151515FF131313FF121212FF1010
+    10FF0F0F0FFF0D0D0DFF0B0B0BFF0A0A0AFF080808FF060606FF050505FF0303
+    03DF0202027F0202020F00000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    000000000000000000002727273F252525CF242424FF222222FF202020FF1F1F
+    1FFF1D1D1DFF1C1C1CFF1A1A1AFF181818FF171717FF151515FF131313FF1212
+    12FF101010FF0F0F0FFF0D0D0DFF0B0B0BFF0A0A0AFF080808FF060606FF0505
+    05FF030303FF020202EF0000007F000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    00002C2C2C0F2A2A2AAF292929FF272727FF252525FF242424FF222222FF2020
+    20FF1F1F1FFF1D1D1DFF1C1C1CFF1A1A1AFF181818FF171717FF151515FF1313
+    13FF121212FF101010FF0F0F0FFF0D0D0DFF0B0B0BFF0A0A0AFF080808FF0606
+    06FF050505FF030303FF020202FF000000CF0000002F00000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000002F2F
+    2F2F2E2E2EDF2C2C2CFF2A2A2AFF292929FF272727FF252525FF242424FF2222
+    22FF202020FF1F1F1FFF1D1D1DFF1C1C1CFF1A1A1AFF181818FF171717FF1515
+    15FF131313FF121212FF101010FF0F0F0FFF0D0D0DFF0B0B0BFF0A0A0AFF0808
+    08FF060606FF050505FF030303FF020202FF000000FF0000006F000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    00000000000000000000000000000000000000000000000000003232324F3131
+    31EF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF252525FF2424
+    24FF222222FF202020FF1F1F1FFF1D1D1DFF1C1C1CFF1A1A1AFF181818FF1717
+    17FF151515FF131313FF121212FF101010FF0F0F0FFF0D0D0DFF0B0B0BFF0A0A
+    0AFF080808FF060606FF050505FF030303FF020202FF000000FF0000009F0000
+    0000000000000000000000000000000000000000000000000000000000000000
+    000000000000000000000000000000000000000000003636365F343434FF3232
+    32FF313131FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF2525
+    25FF242424FF222222FF202020FF1F1F1FFF1D1D1DFF1C1C1CFF1A1A1AFF1818
+    18FF171717FF151515FF131313FF121212FF101010FF0F0F0FFF0D0D0DFF0B0B
+    0BFF0A0A0AFF080808FF060606FF050505FF030303FF020202FF000000FF0000
+    009F000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000003939393F373737FF363636FF3434
+    34FF323232FF313131FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF2727
+    27FF252525FF242424FF222222FF202020FF1F1F1FFF1D1D1DFF1C1C1CFF1A1A
+    1AFF181818FF171717FF151515FF131313FF121212FF101010FF0F0F0FFF0D0D
+    0DFF0B0B0BFF0A0A0AFF080808FF060606FF050505FF030303FF020202FF0000
+    00FF0000009F0000000000000000000000000000000000000000000000000000
+    00000000000000000000000000003C3C3C1F3B3B3BEF393939FF373737FF3636
+    36FF343434FF323232FF313131FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF2929
+    29FF272727FF252525FF242424FF222222FF202020FF1F1F1FFF1D1D1DFF1C1C
+    1CFF1A1A1AFF181818FF171717FF151515FF131313FF121212FF101010FF0F0F
+    0FFF0D0D0DFF0B0B0BFF0A0A0AFF080808FF060606FF050505FF030303FF0202
+    02FF000000FF0000005F00000000000000000000000000000000000000000000
+    00000000000000000000000000003E3E3ECF3C3C3CFF3B3B3BFF393939FF3737
+    37FF363636FF343434FF323232FF313131FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A
+    2AFF292929FF272727FF252525FF242424FF222222FF202020FF1F1F1FFF1D1D
+    1DFF1C1C1CFF1A1A1AFF181818FF171717FF151515FF131313FF121212FF1010
+    10FF0F0F0FFF0D0D0DFF0B0B0BFF0A0A0AFF080808FF060606FF050505FF0303
+    03FF020202FF000000FF0000002F000000000000000000000000000000000000
+    000000000000000000004141417F404040FF3E3E3EFF3C3C3CFF3B3B3BFF3939
+    39FF373737FF363636FF343434FF323232FF313131FF2F2F2FFF2E2E2EFF2C2C
+    2CFF2A2A2AFF292929FF272727FF252525FF242424FF222222FF202020FF1F1F
+    1FFF1D1D1DFF1C1C1CFF1A1A1AFF181818FF171717FF151515FF131313FF1212
+    12FF101010FF0F0F0FFF0D0D0DFF0B0B0BFF0A0A0AFF080808FF060606FF0505
+    05FF030303FF020202FF000000CF000000000000000000000000000000000000
+    0000000000004444441F424242EF414141FF404040FF3E3E3EFF3C3C3CFF3B3B
+    3BFF393939FF373737FF363636FF343434FF323232FF313131FF2F2F2FFF2E2E
+    2EFF2C2C2CFF2A2A2AFF292929FF272727FF252525FF242424FF222222FF2020
+    20FF1F1F1FFF1D1D1DFF1C1C1CFF1A1A1AFF181818FF171717FF151515FF1313
+    13FF121212FF101010FF0F0F0FFF0D0D0DFF0B0B0BFF0A0A0AFF080808FF0606
+    06FF050505FF030303FF020202FF0101015F0000000000000000000000000000
+    0000000000004646469F444444FF424242FF414141FF404040FF3E3E3EFF3C3C
+    3CFF3B3B3BFF393939FF373737FF363636FF343434FF323232FF313131FF2F2F
+    2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF252525FF242424FF2222
+    22FF202020FF1F1F1FFF1D1D1DFF1C1C1CFF1A1A1AFF181818FF171717FF1515
+    15FF131313FF121212FF101010FF0F0F0FFF0D0D0DFF0B0B0BFF0A0A0AFF0808
+    08FF060606FF050505FF030303FF020202EF0202020F00000000000000000000
+    00004949491F474747FF464646FF444444FF424242FF414141FF404040FF3E3E
+    3EFF3C3C3CFF3B3B3BFF393939FF373737FF363636FF343434FF323232FF3131
+    31FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF252525FF2424
+    24FF222222FF202020FF1F1F1FFF1D1D1DFF1C1C1CFF1A1A1AFF181818FF1717
+    17FF151515FF131313FF121212FF101010FF0F0F0FFF0D0D0DFF0B0B0BFF0A0A
+    0AFF080808FF060606FF050505FF030303FF0202025F00000000000000000000
+    00004B4B4B7F494949FF474747FF464646FF444444FF424242FF414141FF4040
+    40FF3E3E3EFF3C3C3CFF3B3B3BFF393939FF373737FF363636FF343434FF3232
+    32FF313131FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF2525
+    25FF242424FF222222FF202020FF1F1F1FFF1D1D1DFF1C1C1CFF1A1A1AFF1818
+    18FF171717FF151515FF131313FF121212FF101010FF0F0F0FFF0D0D0DFF0B0B
+    0BFF0A0A0AFF080808FF060606FF050505FF030303DF00000000000000000000
+    00004C4C4CDF4B4B4BFF494949FF474747FF464646FF444444FF424242FF4141
+    41FF404040FF3E3E3EFF3C3C3CFF3B3B3BFF393939FF373737FF363636FF3434
+    34FF323232FF313131FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF2727
+    27FF252525FF242424FF222222FF202020FF1F1F1FFF1D1D1DFF1C1C1CFF1A1A
+    1AFF181818FF171717FF151515FF131313FF121212FF101010FF0F0F0FFF0D0D
+    0DFF0B0B0BFF0A0A0AFF080808FF060606FF050505FF0404042F000000004F4F
+    4F2F4E4E4EFF4C4C4CFF4B4B4BFF494949FF474747FF464646FF444444FF4242
+    42FF414141FF404040FF3E3E3EFF3C3C3CFF3B3B3BFF393939FF373737FF3636
+    36FF343434FF323232FF313131FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF2929
+    29FF272727FF252525FF242424FF222222FF202020FF1F1F1FFF1D1D1DFF1C1C
+    1CFF1A1A1AFF181818FF171717FF151515FF131313FF121212FF101010FF0F0F
+    0FFF0D0D0DFF0B0B0BFF0A0A0AFF080808FF060606FF0505058F000000005151
+    516F505050FF4E4E4EFF4C4C4CFF4B4B4BFF494949FF474747FF464646FF4444
+    44FF424242FF414141FF404040FF3E3E3EFF3C3C3CFF3B3B3BFF393939FF3737
+    37FF363636FF343434FF323232FF313131FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A
+    2AFF292929FF272727FF252525FF242424FF222222FF202020FF1F1F1FFF1D1D
+    1DFF1C1C1CFF1A1A1AFF181818FF171717FF151515FF131313FF121212FF1010
+    10FF0F0F0FFF0D0D0DFF0B0B0BFF0A0A0AFF080808FF070707CF000000005353
+    53AF515151FF505050FF4E4E4EFF4C4C4CFF4B4B4BFF494949FF474747FF4646
+    46FF444444FF424242FF414141FF404040FF3E3E3EFF3C3C3CFF3B3B3BFF3939
+    39FF373737FF363636FF343434FF323232FF313131FF2F2F2FFF2E2E2EFF2C2C
+    2CFF2A2A2AFF292929FF272727FF252525FF242424FF222222FF202020FF1F1F
+    1FFF1D1D1DFF1C1C1CFF1A1A1AFF181818FF171717FF151515FF131313FF1212
+    12FF0F170FFF0C230CFF0D0D0DFF0B0B0BFF0A0A0AFF080808FF000000005454
+    54CF535353FF515151FF505050FF61624CFF7C8246FF4B4B4BFF494949FF4747
+    47FF464646FF444444FF424242FF414141FF404040FF3E3E3EFF3C3C3CFF3B3B
+    3BFF393939FF373737FF363636FF343434FF323232FF313131FF2F2F2FFF2E2E
+    2EFF2C2C2CFF2A2A2AFF292929FF272727FF252525FF242424FF222222FF2020
+    20FF1F1F1FFF1D1D1DFF1C1C1CFF1A1A1AFF181818FF171717FF151515FF121A
+    12FF056A04FF065406FF0F0F0FFF0D0D0DFF0B0B0BFF0A0A0AFF0909092F5656
+    56FF545454FF535353FF515151FF83864AFFB2BA42FF9AA342FF5C5F48FF4949
+    49FF474747FF464646FF444444FF424242FF414141FF404040FF3E3E3EFF3C3C
+    3CFF3B3B3BFF393939FF373737FF363636FF343434FF323232FF313131FF2F2F
+    2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF252525FF242424FF2222
+    22FF202020FF1F1F1FFF1D1D1DFF1C1C1CFF1A1A1AFF181818FF161D15FF0A6C
+    06FF057F01FF066305FF101010FF0F0F0FFF0D0D0DFF0B0B0BFF0A0A0A3F5858
+    58FF565656FF545454FF535353FF87874CFFB8BC44FFB2BA42FFABB73FFF7880
+    44FF494949FF474747FF464646FF444444FF424242FF414141FF404040FF3E3E
+    3EFF3C3C3CFF3B3B3BFF393939FF373737FF363636FF343434FF323232FF3131
+    31FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF252525FF2424
+    24FF222222FF202020FF1F1F1FFF1D1D1DFF1C1C1CFF192019FF0F6E08FF0A81
+    03FF078002FF057802FF121212FF101010FF0F0F0FFF0D0D0DFF0C0C0C7F5959
+    59FF585858FF565656FF545454FF8B894EFFBEBE47FFB8BC44FFB2BA42FFABB7
+    3FFF9AA83FFF5F6446FF474747FF464646FF444444FF424242FF414141FF4040
+    40FF3E3E3EFF3C3C3CFF3B3B3BFF393939FF373737FF363636FF343434FF3232
+    32FF313131FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF272727FF2525
+    25FF242424FF222222FF202020FF1F1F1FFF1D1D1DFF156A0CFF108306FF0C82
+    04FF0A8103FF078002FF131313FF121212FF101010FF0F0F0FFF0D0D0D7F5B5B
+    5BFF595959FF585858FF565656FF9E994FFFC5C049FFBEBE47FFB8BC44FFB2BA
+    42FFABB73FFFA5B53DFF7A8541FF4D4E46FF464646FF444444FF424242FF4141
+    41FF404040FF3E3E3EFF3C3C3CFF3B3B3BFF393939FF373737FF363636FF3434
+    34FF323232FF313131FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF292929FF2727
+    27FF252525FF242424FF222222FF202020FF1C5913FF168508FF138407FF1083
+    06FF0C8204FF0A8103FF151515FF131313FF121212FF101010FF0F0F0F7F5D5D
+    5DFF5B5B5BFF595959FF585858FF938D52FFCCC24CFFC5C049FFBEBE47FFB8BC
+    44FFB2BA42FFABB73FFFA5B53DFF94A63DFF5C6244FF464646FF444444FF4242
+    42FF414141FF404040FF3E3E3EFF3C3C3CFF3B3B3BFF393939FF373737FF3636
+    36FF343434FF323232FF313131FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A2AFF2929
+    29FF272727FF252525FF242424FF22421BFF1E880BFF1A8609FF168508FF1384
+    07FF108306FF0C8204FF171717FF151515FF131313FF121212FF1111117F5E5E
+    5EFF5D5D5DFF5B5B5BFF595959FF988F54FFD2C54EFFCCC24CFFC5C049FFBEBE
+    47FFB8BC44FFB2BA42FFABB73FFFA5B53DFF9FB33BFF80903DFF4B4C45FF4444
+    44FF424242FF414141FF404040FF3E3E3EFF506335FF64942AFF64A025FF5E9E
+    23FF4A6F2AFF363A32FF323232FF313131FF2F2F2FFF2E2E2EFF2C2C2CFF2A2A
+    2AFF292929FF272727FF263222FF26840FFF22890CFF1E880BFF1A8609FF1685
+    08FF138407FF126F09FF181818FF171717FF151515FF131313FF1212124F6060
+    60EF5E5E5EFF5D5D5DFF5B5B5BFF8B8357FFD9C751FFD2C54EFFCCC24CFFC5C0
+    49FFBEBE47FFB8BC44FFB2BA42FFABB73FFFA5B53DFF9FB33BFF94AA3AFF6D7A
+    3EFF444444FF424242FF494E3FFF6C8D32FF75A52BFF6FA329FF6AA127FF64A0
+    25FF5E9E23FF518226FF343434FF323232FF313131FF2F2F2FFF2E2E2EFF2C2C
+    2CFF2A2A2AFF292929FF2C7416FF2A8C0FFF268B0EFF22890CFF1E880BFF1A86
+    09FF168508FF156A0CFF1A1A1AFF181818FF171717FF151515FF1414143F6161
+    61BF606060FF5E5E5EFF5D5D5DFF75705AFFE0C953FFD9C751FFD2C54EFFCCC2
+    4CFFC5C049FFBEBE47FFB8BC44FFB2BA42FFABB73FFFA5B53DFF9FB33BFF98B1
+    39FF89A238FF7B9338FF86AB32FF80A930FF7BA72DFF75A52BFF6FA329FF6AA1
+    27FF64A025FF5E9E23FF48692BFF343434FF323232FF313131FF2F2F2FFF2E2E
+    2EFF2C2C2CFF305D1FFF338F13FF2E8D11FF2A8C0FFF268B0EFF22890CFF1E88
+    0BFF1A8609FF1A5113FF1C1C1CFF1A1A1AFF181818FF171717FF1515150F6363
+    638F616161FF606060FF5E5E5EFF5D5D5DFFDEC456FFE0C953FFD9C751FFD2C5
+    4EFFCCC24CFFC5C049FFBEBE47FFB8BC44FFB2BA42FFABB73FFFA5B53DFF9FB3
+    3BFF98B139FF92AF36FF8CAD34FF86AB32FF80A930FF7BA72DFF75A52BFF6FA3
+    29FF6AA127FF64A025FF5E9E23FF3A4233FF343434FF323232FF313131FF2F2F
+    2FFF324728FF3C9216FF379014FF338F13FF2E8D11FF2A8C0FFF268B0EFF2289
+    0CFF1E880BFF1E3919FF1D1D1DFF1C1C1CFF1A1A1AFF181818DF000000006464
+    644F636363FF616161FF606060FF5E5E5EFFB6A35AFFE7CB56FFE0C953FFD9C7
+    51FFD2C54EFFCCC24CFFC5C049FFBEBE47FFB8BC44FFB2BA42FFABB73FFFA5B5
+    3DFF9FB33BFF98B139FF92AF36FF8CAD34FF86AB32FF80A930FF7BA72DFF75A5
+    2BFF6FA329FF6AA127FF64A025FF558428FF363636FF343434FF323232FF3237
+    2FFF448F1BFF409318FF3C9216FF379014FF338F13FF2E8D11FF2A8C0FFF268B
+    0EFF22820EFF202020FF1F1F1FFF1D1D1DFF1C1C1CFF1A1A1A9F000000006666
+    660F656565FF636363FF616161FF606060FF837B5DFFEDCE58FFE7CB56FFE0C9
+    53FFD9C751FFD2C54EFFCCC24CFFC5C049FFBEBE47FFB8BC44FFB2BA42FFABB7
+    3FFFA5B53DFF9FB33BFF98B139FF92AF36FF8CAD34FF86AB32FF80A930FF7BA7
+    2DFF75A52BFF6FA329FF6AA127FF64A025FF50772BFF363636FF363A33FF4A85
+    21FF4A971BFF459519FF409318FF3C9216FF379014FF338F13FF2E8D11FF2A8C
+    0FFF256416FF222222FF202020FF1F1F1FFF1D1D1DFF1C1C1C5F000000000000
+    0000666666AF656565FF636363FF616161FF606060FFE1C25BFFEDCE58FFE7CB
+    56FFE0C953FFD9C751FFD2C54EFFCCC24CFFC5C049FFBEBE47FFB8BC44FFB2BA
+    42FFABB73FFFA5B53DFF9FB33BFF98B139FF92AF36FF8CAD34FF86AB32FF80A9
+    30FF7BA72DFF75A52BFF6FA329FF6AA127FF64A025FF578B27FF579522FF549A
+    1FFF4F981DFF4A971BFF459519FF409318FF3C9216FF379014FF338F13FF2E8D
+    11FF263222FF242424FF222222FF202020FF1F1F1FFF1E1E1E0F000000000000
+    00006767674F666666FF656565FF636363FF616161FF90845FFFF4D05BFFEDCE
+    58FFE7CB56FFE0C953FFD9C751FFD2C54EFFCCC24CFFC5C049FFBEBE47FFB8BC
+    44FFB2BA42FFABB73FFFA5B53DFF9FB33BFF98B139FF92AF36FF8CAD34FF86AB
+    32FF80A930FF7BA72DFF75A52BFF6FA329FF6AA127FF64A025FF5E9E23FF599C
+    21FF549A1FFF4F981DFF4A971BFF459519FF409318FF3C9216FF379014FF2F68
+    1BFF272727FF252525FF242424FF222222FF2121219F00000000000000000000
+    000000000000686868DF666666FF656565FF636363FF616161FFD4B65EFFF4D0
+    5BFFEDCE58FFE7CB56FFE0C953FFD9C751FFD2C54EFFCCC24CFFC5C049FFBEBE
+    47FFB8BC44FFB2BA42FFABB73FFFA5B53DFF9FB33BFF98B139FF92AF36FF8CAD
+    34FF86AB32FF80A930FF7BA72DFF75A52BFF6FA329FF6AA127FF64A025FF5E9E
+    23FF599C21FF549A1FFF4F981DFF4A971BFF459519FF409318FF3B8B17FF2C37
+    27FF292929FF272727FF252525FF242424FF2222221F00000000000000000000
+    0000000000006969695F686868FF666666FF656565FF636363FF757061FFF2CB
+    5DFFF4D05BFFEDCE58FFE7CB56FFE0C953FFD9C751FFD2C54EFFCCC24CFFC5C0
+    49FFBEBE47FFB8BC44FFB2BA42FFABB73FFFA5B53DFF9FB33BFF98B139FF92AF
+    36FF8CAD34FF86AB32FF80A930FF7BA72DFF75A52BFF6FA329FF6AA127FF64A0
+    25FF5E9E23FF599C21FF549A1FFF4F981DFF4A971BFF459519FF345425FF2C2C
+    2CFF2A2A2AFF292929FF272727FF2525259F0000000000000000000000000000
+    00000000000000000000696969BF686868FF666666FF656565FF636363FF9385
+    61FFFBD35DFFF4D05BFFEDCE58FFE7CB56FFE0C953FFD9C751FFD2C54EFFCCC2
+    4CFFC5C049FFBEBE47FFB8BC44FFB2BA42FFABB73FFFA5B53DFF9FB33BFF98B1
+    39FF92AF36FF8CAD34FF86AB32FF80A930FF7BA72DFF75A52BFF6FA329FF6AA1
+    27FF64A025FF5E9E23FF599C21FF549A1FFF4F981DFF417023FF2F2F2FFF2E2E
+    2EFF2C2C2CFF2A2A2AFF292929FF2727271F0000000000000000000000000000
+    000000000000000000006B6B6B2F6A6A6AFF686868FF666666FF656565FF6363
+    63FF9D8C61FFFBD35DFFF4D05BFFEDCE58FFE7CB56FFE0C953FFD9C751FFD2C5
+    4EFFCCC24CFFC5C049FFBEBE47FFB8BC44FFB2BA42FFABB73FFFA5B53DFF9FB3
+    3BFF98B139FF92AF36FF8CAD34FF86AB32FF80A930FF7BA72DFF75A52BFF6FA3
+    29FF6AA127FF64A025FF5E9E23FF599C21FF4C8124FF323232FF313131FF2F2F
+    2FFF2E2E2EFF2C2C2CFF2A2A2A7F000000000000000000000000000000000000
+    00000000000000000000000000006B6B6B6F6A6A6AFF686868FF666666FF6565
+    65FF636363FF9D8C61FFFBD35DFFF4D05BFFEDCE58FFE7CB56FFE0C953FFD9C7
+    51FFD2C54EFFCCC24CFFC5C049FFBEBE47FFB8BC44FFB2BA42FFABB73FFFA5B5
+    3DFF9FB33BFF98B139FF92AF36FF8CAD34FF86AB32FF80A930FF7BA72DFF75A5
+    2BFF6FA329FF6AA127FF64A025FF50772BFF383C34FF343434FF323232FF3131
+    31FF2F2F2FFF2E2E2EBF00000000000000000000000000000000000000000000
+    0000000000000000000000000000000000006B6B6B9F6A6A6AFF686868FF6666
+    66FF656565FF636363FF938561FFF2CB5DFFF4D05BFFEDCE58FFE7CB56FFE0C9
+    53FFD9C751FFD2C54EFFCCC24CFFC5C049FFBEBE47FFB8BC44FFB2BA42FFABB7
+    3FFFA5B53DFF9FB33BFF98B139FF92AF36FF8CAD34FF86AB32FF80A930FF7BA7
+    2DFF75A52BFF6FA329FF557430FF393939FF373737FF363636FF343434FF3232
+    32FF313131EF3030300F00000000000000000000000000000000000000000000
+    000000000000000000000000000000000000000000006B6B6BCF6A6A6AFF6868
+    68FF666666FF656565FF636363FF6B6961FFCAAF5EFFF4D05BFFEDCE58FFE7CB
+    56FFE0C953FFD9C751FFD2C54EFFCCC24CFFC5C049FFBEBE47FFB8BC44FFB2BA
+    42FFABB73FFFA5B53DFF9FB33BFF98B139FF92AF36FF8CAD34FF86AB32FF80A9
+    30FF739A30FF4B5839FF3C3C3CFF3B3B3BFF393939FF373737FF363636FF3434
+    34EF3232322F0000000000000000000000000000000000000000000000000000
+    000000000000000000000000000000000000000000006B6B6B0F6B6B6BBF6A6A
+    6AFF686868FF666666FF656565FF636363FF616161FF867D5FFFCEB45BFFEDCE
+    58FFE7CB56FFE0C953FFD9C751FFD2C54EFFCCC24CFFC5C049FFBEBE47FFB8BC
+    44FFB2BA42FFABB73FFFA5B53DFF9FB33BFF98B139FF92AF36FF83A036FF6477
+    3AFF414141FF404040FF3E3E3EFF3C3C3CFF3B3B3BFF393939FF373737EF3636
+    362F000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000006B6B
+    6B9F6A6A6AFF686868FF666666FF656565FF636363FF616161FF606060FF7A74
+    5EFFAD9C5AFFD5BD56FFE0C953FFD9C751FFD2C54EFFCCC24CFFC5C049FFBEBE
+    47FFB8BC44FFB2BA42FFABB73FFF9FAF3EFF83923FFF606843FF464646FF4444
+    44FF424242FF414141FF404040FF3E3E3EFF3C3C3CFF3B3B3BCF3939392F0000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    00006B6B6B6F6A6A6AEF686868FF666666FF656565FF636363FF616161FF6060
+    60FF5E5E5EFF5D5D5DFF6C695AFF7A7558FF988F54FF938D52FF8F8B50FF8B89
+    4EFF87874CFF70714CFF61624CFF4C4C4CFF4B4B4BFF494949FF474747FF4646
+    46FF444444FF424242FF414141FF404040FF3E3E3EAF3D3D3D0F000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000006B6B6B1F696969BF686868FF666666FF656565FF636363FF6161
+    61FF606060FF5E5E5EFF5D5D5DFF5B5B5BFF595959FF585858FF565656FF5454
+    54FF535353FF515151FF505050FF4E4E4EFF4C4C4CFF4B4B4BFF494949FF4747
+    47FF464646FF444444FF424242DF4141414F0000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    00000000000000000000000000006969693F686868BF666666FF656565FF6363
+    63FF616161FF606060FF5E5E5EFF5D5D5DFF5B5B5BFF595959FF585858FF5656
+    56FF545454FF535353FF515151FF505050FF4E4E4EFF4C4C4CFF4B4B4BFF4949
+    49FF474747EF4646467F4545450F000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    000000000000000000000000000000000000000000006767673F6666669F6565
+    65EF636363FF616161FF606060FF5E5E5EFF5D5D5DFF5B5B5BFF595959FF5858
+    58FF565656FF545454FF535353FF515151FF505050FF4E4E4EFF4C4C4CAF4A4A
+    4A5F000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    00006464643F6363637F616161AF606060CF5E5E5EFF5D5D5DFF5B5B5BFF5959
+    59FF585858FF565656DF545454BF5252528F5151514F5050500F000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    000000000000000000000000000000000000000000000000000000000000FFFF
+    E007FFFF0000FFFE0000FFFF0000FFF800001FFF0000FFE000000FFF0000FF80
+    000003FF0000FF00000001FF0000FE00000000FF0000FC000000007F0000F800
+    0000003F0000F0000000001F0000F0000000000F0000E0000000000F0000C000
+    000000070000C000000000030000800000000003000080000000000300008000
+    0000000100000000000000010000000000000001000000000000000100000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000010000000000000001000000000000000100008000
+    0000000100008000000000030000C000000000030000C000000000070000E000
+    000000070000E0000000000F0000F0000000001F0000F8000000001F0000FC00
+    0000003F0000FC000000007F0000FF00000000FF0000FF80000001FF0000FFC0
+    000007FF0000FFF000000FFF0000FFFC00007FFF0000FFFF8001FFFF00002800
+    0000200000004000000001002000000000008010000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000001A1A1A2F1717176F1515158F1212
+    12BF101010BF0D0D0DBF0B0B0BAF0909097F0707074F0505050F000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000002424240F2121217F1E1E1EDF1C1C1CFF191919FF171717FF1414
+    14FF121212FF101010FF0D0D0DFF0B0B0BFF080808FF060606FF040404AF0202
+    023F000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    00002828287F252525EF232323FF212121FF1E1E1EFF1C1C1CFF191919FF1717
+    17FF141414FF121212FF101010FF0D0D0DFF0B0B0BFF080808FF060606FF0303
+    03FF010101BF0000002F00000000000000000000000000000000000000000000
+    00000000000000000000000000000000000000000000000000003030301F2D2D
+    2DCF2A2A2AFF282828FF252525FF232323FF212121FF1E1E1EFF1C1C1CFF1919
+    19FF171717FF141414FF121212FF101010FF0D0D0DFF0B0B0BFF080808FF0606
+    06FF030303FF010101FF0000007F000000000000000000000000000000000000
+    000000000000000000000000000000000000000000003434342F323232EF2F2F
+    2FFF2D2D2DFF2A2A2AFF282828FF252525FF232323FF212121FF1E1E1EFF1C1C
+    1CFF191919FF171717FF141414FF121212FF101010FF0D0D0DFF0B0B0BFF0808
+    08FF060606FF030303FF010101FF0000009F0000000000000000000000000000
+    0000000000000000000000000000000000003939392F373737EF343434FF3232
+    32FF2F2F2FFF2D2D2DFF2A2A2AFF282828FF252525FF232323FF212121FF1E1E
+    1EFF1C1C1CFF191919FF171717FF141414FF121212FF101010FF0D0D0DFF0B0B
+    0BFF080808FF060606FF030303FF010101FF0000009F00000000000000000000
+    00000000000000000000000000003E3E3E0F3C3C3CCF393939FF373737FF3434
+    34FF323232FF2F2F2FFF2D2D2DFF2A2A2AFF282828FF252525FF232323FF2121
+    21FF1E1E1EFF1C1C1CFF191919FF171717FF141414FF121212FF101010FF0D0D
+    0DFF0B0B0BFF080808FF060606FF030303FF010101FF0000007F000000000000
+    00000000000000000000000000004040408F3E3E3EFF3C3C3CFF393939FF3737
+    37FF343434FF323232FF2F2F2FFF2D2D2DFF2A2A2AFF282828FF252525FF2323
+    23FF212121FF1E1E1EFF1C1C1CFF191919FF171717FF141414FF121212FF1010
+    10FF0D0D0DFF0B0B0BFF080808FF060606FF030303FF010101FF0000002F0000
+    000000000000000000004545453F434343FF404040FF3E3E3EFF3C3C3CFF3939
+    39FF373737FF343434FF323232FF2F2F2FFF2D2D2DFF2A2A2AFF282828FF2525
+    25FF232323FF212121FF1E1E1EFF1C1C1CFF191919FF171717FF141414FF1212
+    12FF101010FF0D0D0DFF0B0B0BFF080808FF060606FF030303FF010101BF0000
+    00000000000000000000474747BF454545FF434343FF404040FF3E3E3EFF3C3C
+    3CFF393939FF373737FF343434FF323232FF2F2F2FFF2D2D2DFF2A2A2AFF2828
+    28FF252525FF232323FF212121FF1E1E1EFF1C1C1CFF191919FF171717FF1414
+    14FF121212FF101010FF0D0D0DFF0B0B0BFF080808FF060606FF030303FF0202
+    023F000000004C4C4C1F4A4A4AFF484848FF454545FF434343FF404040FF3E3E
+    3EFF3C3C3CFF393939FF373737FF343434FF323232FF2F2F2FFF2D2D2DFF2A2A
+    2AFF282828FF252525FF232323FF212121FF1E1E1EFF1C1C1CFF191919FF1717
+    17FF141414FF121212FF101010FF0D0D0DFF0B0B0BFF080808FF060606FF0404
+    04AF000000004E4E4E6F4D4D4DFF4A4A4AFF484848FF454545FF434343FF4040
+    40FF3E3E3EFF3C3C3CFF393939FF373737FF343434FF323232FF2F2F2FFF2D2D
+    2DFF2A2A2AFF282828FF252525FF232323FF212121FF1E1E1EFF1C1C1CFF1919
+    19FF171717FF141414FF121212FF101010FF0D0D0DFF0B0B0BFF080808FF0606
+    06FF0505050F515151BF4F4F4FFF4D4D4DFF4A4A4AFF484848FF454545FF4343
+    43FF404040FF3E3E3EFF3C3C3CFF393939FF373737FF343434FF323232FF2F2F
+    2FFF2D2D2DFF2A2A2AFF282828FF252525FF232323FF212121FF1E1E1EFF1C1C
+    1CFF191919FF171717FF141414FF121212FF101010FF0D0D0DFF0B0B0BFF0808
+    08FF0707073F545454EF515151FF4F4F4FFF777B47FF4A4A4AFF484848FF4545
+    45FF434343FF404040FF3E3E3EFF3C3C3CFF393939FF373737FF343434FF3232
+    32FF2F2F2FFF2D2D2DFF2A2A2AFF282828FF252525FF232323FF212121FF1E1E
+    1EFF1C1C1CFF191919FF171717FF141414FF0C3B0BFF093F08FF0D0D0DFF0B0B
+    0BFF0909097F565656FF545454FF515151FFB5BB44FF9BA442FF5B5E47FF4848
+    48FF454545FF434343FF404040FF3E3E3EFF3C3C3CFF393939FF373737FF3434
+    34FF323232FF2F2F2FFF2D2D2DFF2A2A2AFF282828FF252525FF232323FF2121
+    21FF1E1E1EFF1C1C1CFF191919FF0F530CFF068002FF094F08FF101010FF0D0D
+    0DFF0B0B0B8F595959FF565656FF545454FFBFBE47FFB5BB44FFACB840FF7D86
+    43FF4D4E47FF454545FF434343FF404040FF3E3E3EFF3C3C3CFF393939FF3737
+    37FF343434FF323232FF2F2F2FFF2D2D2DFF2A2A2AFF282828FF252525FF2323
+    23FF212121FF1E1E1EFF194314FF0E8305FF0A8103FF0A6506FF121212FF1010
+    10FF0D0D0DBF5B5B5BFF595959FF565656FFC9C24BFFBFBE47FFB5BB44FFACB8
+    40FF98A73EFF5D6244FF454545FF434343FF404040FF3E3E3EFF3C3C3CFF3939
+    39FF373737FF343434FF323232FF2F2F2FFF2D2D2DFF2A2A2AFF282828FF2525
+    25FF232323FF203A1BFF198609FF138407FF0E8305FF0D6608FF141414FF1212
+    12FF101010BF5E5E5EFF5B5B5BFF595959FFD3C54FFFC9C24BFFBFBE47FFB5BB
+    44FFACB840FFA2B43CFF7B8A3EFF4A4C44FF434343FF404040FF3E3E3EFF4F62
+    34FF5B862AFF517D29FF3B4730FF323232FF2F2F2FFF2D2D2DFF2A2A2AFF2828
+    28FF262C24FF24830FFF1E880BFF198609FF138407FF135B0DFF171717FF1414
+    14FF1212129F606060FF5E5E5EFF5B5B5BFFD5C153FFD3C54FFFC9C24BFFBFBE
+    47FFB5BB44FFACB840FFA2B43CFF94AB3AFF67733FFF58633DFF6F8E33FF76A5
+    2CFF6DA228FF65A025FF5A9724FF363B33FF323232FF2F2F2FFF2D2D2DFF2A2A
+    2AFF2E6E19FF2A8C10FF248A0DFF1E880BFF198609FF185011FF191919FF1717
+    17FF1515157F626262BF606060FF5E5E5EFFBBA857FFDDC852FFD3C54FFFC9C2
+    4BFFBFBE47FFB5BB44FFACB840FFA2B43CFF99B139FF90AE35FF87AB32FF7EA8
+    2FFF76A52CFF6DA228FF65A025FF517D29FF343434FF323232FF2F2F2FFF3459
+    23FF389115FF318E12FF2A8C10FF248A0DFF1E880BFF1D3819FF1C1C1CFF1919
+    19FF1717175F6464648F626262FF606060FF94885CFFE7CC56FFDDC852FFD3C5
+    4FFFC9C24BFFBFBE47FFB5BB44FFACB840FFA2B43CFF99B139FF90AE35FF87AB
+    32FF7EA82FFF76A52CFF6DA228FF65A025FF465D2FFF343434FF37452EFF4695
+    1AFF3F9317FF389115FF318E12FF2A8C10FF24830FFF212121FF1E1E1EFF1C1C
+    1CFF1919191F6666662F656565FF626262FF6A6760FFE8C85AFFE7CC56FFDDC8
+    52FFD3C54FFFC9C24BFFBFBE47FFB5BB44FFACB840FFA2B43CFF99B139FF90AE
+    35FF87AB32FF7EA82FFF76A52CFF6DA228FF65A025FF4F772AFF539421FF4E98
+    1DFF46951AFF3F9317FF389115FF318E12FF296618FF232323FF212121FF1E1E
+    1ECF0000000000000000676767DF656565FF626262FFAD995FFFF2D05AFFE7CC
+    56FFDDC852FFD3C54FFFC9C24BFFBFBE47FFB5BB44FFACB840FFA2B43CFF99B1
+    39FF90AE35FF87AB32FF7EA82FFF76A52CFF6DA228FF65A025FF5D9D22FF559A
+    1FFF4E981DFF46951AFF3F9317FF378A16FF293525FF252525FF232323FF2121
+    215F00000000000000006969695F676767FF656565FF6C6A62FFE8C45EFFF2D0
+    5AFFE7CC56FFDDC852FFD3C54FFFC9C24BFFBFBE47FFB5BB44FFACB840FFA2B4
+    3CFF99B139FF90AE35FF87AB32FF7EA82FFF76A52CFF6DA228FF65A025FF5D9D
+    22FF559A1FFF4E981DFF46951AFF355923FF2A2A2AFF282828FF252525DF2424
+    240F000000000000000000000000696969CF676767FF656565FF807862FFF2CC
+    5DFFF2D05AFFE7CC56FFDDC852FFD3C54FFFC9C24BFFBFBE47FFB5BB44FFACB8
+    40FFA2B43CFF99B139FF90AE35FF87AB32FF7EA82FFF76A52CFF6DA228FF65A0
+    25FF5D9D22FF559A1FFF437124FF2F2F2FFF2D2D2DFF2A2A2AFF2929295F0000
+    00000000000000000000000000006B6B6B2F6A6A6AFF676767FF656565FF8078
+    62FFF2CC5DFFF2D05AFFE7CC56FFDDC852FFD3C54FFFC9C24BFFBFBE47FFB5BB
+    44FFACB840FFA2B43CFF99B139FF90AE35FF87AB32FF7EA82FFF76A52CFF6DA2
+    28FF65A025FF517D29FF363B33FF323232FF2F2F2FFF2D2D2DAF000000000000
+    0000000000000000000000000000000000006B6B6B5F6A6A6AFF676767FF6565
+    65FF807862FFDEBD5EFFF2D05AFFE7CC56FFDDC852FFD3C54FFFC9C24BFFBFBE
+    47FFB5BB44FFACB840FFA2B43CFF99B139FF90AE35FF87AB32FF7EA82FFF76A5
+    2CFF577531FF393939FF373737FF343434FF323232CF3030300F000000000000
+    000000000000000000000000000000000000000000006B6B6B5F6A6A6AFF6767
+    67FF656565FF626262FFAD995FFFE8C85AFFE7CC56FFDDC852FFD3C54FFFC9C2
+    4BFFBFBE47FFB5BB44FFACB840FFA2B43CFF99B139FF90AE35FF769136FF505A
+    3CFF3E3E3EFF3C3C3CFF393939FF363636DF3535350F00000000000000000000
+    00000000000000000000000000000000000000000000000000006B6B6B5F6A6A
+    6AEF676767FF656565FF626262FF6A6760FF94885CFFBBA857FFCCBA53FFD3C5
+    4FFFC9C24BFFBFBE47FFB5BB44FF939D43FF7B8642FF575B45FF454545FF4343
+    43FF404040FF3E3E3EFF3C3C3CCF3939390F0000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000006B6B
+    6B2F696969BF676767FF656565FF626262FF606060FF5E5E5EFF5B5B5BFF5959
+    59FF565656FF545454FF515151FF4F4F4FFF4D4D4DFF4A4A4AFF484848FF4545
+    45FF434343FF4040407F00000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000006969695F676767CF656565FF626262FF606060FF5E5E5EFF5B5B
+    5BFF595959FF565656FF545454FF515151FF4F4F4FFF4D4D4DFF4A4A4AFF4747
+    479F4545451F0000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    00000000000000000000000000006666662F6464647F626262BF606060EF5E5E
+    5EFF5B5B5BFF595959FF565656FF545454CF5151519F4E4E4E5F4D4D4D0F0000
+    0000000000000000000000000000000000000000000000000000000000000000
+    000000000000FFE007FFFF0001FFFE00007FF800003FF000001FE000000FC000
+    0007C00000038000000380000001000000010000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000018000
+    000180000001C0000003C0000007E0000007F000000FF800001FFC00007FFF00
+    00FFFFC003FF2800000010000000200000000100200000000000400400000000
+    0000000000000000000000000000000000000000000000000000000000002222
+    223F1D1D1D9F181818CF131313FF0E0E0EFF090909BF0505058F0202021F0000
+    000000000000000000000000000000000000000000003030300F2B2B2BAF2626
+    26FF212121FF1C1C1CFF171717FF131313FF0E0E0EFF090909FF040404FF0101
+    017F000000000000000000000000000000003A3A3A0F353535CF303030FF2B2B
+    2BFF262626FF212121FF1C1C1CFF171717FF131313FF0E0E0EFF090909FF0404
+    04FF0101019F0000000000000000000000003E3E3EBF3A3A3AFF353535FF3030
+    30FF2B2B2BFF262626FF212121FF1C1C1CFF171717FF131313FF0E0E0EFF0909
+    09FF040404FF0101017F000000004747475F434343FF3E3E3EFF3A3A3AFF3535
+    35FF303030FF2B2B2BFF262626FF212121FF1C1C1CFF171717FF131313FF0E0E
+    0EFF090909FF040404FF0202021F4D4D4DAF484848FF434343FF3E3E3EFF3A3A
+    3AFF353535FF303030FF2B2B2BFF262626FF212121FF1C1C1CFF171717FF1313
+    13FF0E0E0EFF090909FF0505057F525252FF595B4CFF484848FF434343FF3E3E
+    3EFF3A3A3AFF353535FF303030FF2B2B2BFF262626FF212121FF1C1C1CFF1717
+    17FF10270FFF0C1B0CFF090909BF575757FF88884DFF9DA443FF5F6345FF4343
+    43FF3E3E3EFF3A3A3AFF353535FF303030FF2B2B2BFF262626FF212121FF1B30
+    18FF0C7B05FF0C420BFF0E0E0EEF5C5C5CFF948E53FFC2BF48FFAEB841FF7984
+    40FF484A42FF3E3E3EFF4C6032FF41552EFF303030FF2B2B2BFF262C25FF207C
+    0EFF158508FF12460FFF131313EF616161FFA19459FFD6C64FFFC2BF48FFAEB8
+    41FF97AB3BFF819F35FF78A62DFF67A126FF3F4E30FF303030FF346B1DFF2C8D
+    10FF20890CFF1B3617FF181818BF656565CF7D7660FFEACD57FFD6C64FFFC2BF
+    48FFAEB841FF9BB23AFF89AC33FF78A62DFF659A28FF496E29FF48961AFF3991
+    15FF2C8611FF212121FF1D1D1D8F6969695F656565FFD5B65EFFEACD57FFD6C6
+    4FFFC2BF48FFAEB841FF9BB23AFF89AC33FF78A62DFF67A126FF579B20FF4896
+    1AFF335E20FF262626FF2222221F000000006A6A6ACF6F6D65FFDEBE5EFFEACD
+    57FFD6C64FFFC2BF48FFAEB841FF9BB23AFF89AC33FF78A62DFF67A126FF4C7B
+    26FF303030FF2B2B2B8F00000000000000006B6B6B2F6A6A6AEF6F6D65FFD5B6
+    5EFFEACD57FFD6C64FFFC2BF48FFAEB841FF9BB23AFF89AC33FF5E7934FF3A3A
+    3AFF353535CF3030300F0000000000000000000000006B6B6B2F6A6A6ACF6565
+    65FF7D7660FFA19459FF948E53FF88884DFF767C47FF525546FF434343FF3E3E
+    3EAF3A3A3A0F0000000000000000000000000000000000000000000000006969
+    695F656565BF616161FF5C5C5CFF575757FF525252EF4D4D4DAF4848483F0000
+    0000000000000000000000000000F00F0000C007000080030000800100000000
+    0000000000000000000000000000000000000000000000000000000000008001
+    000080010000C0030000F00F0000}
+  OldCreateOrder = False
+  Position = poScreenCenter
+  OnClose = FormClose
+  PixelsPerInch = 96
+  TextHeight = 13
+  object Panel1: TPanel
+    Left = 0
+    Top = 333
+    Width = 578
+    Height = 25
+    Align = alBottom
+    BevelOuter = bvNone
+    TabOrder = 0
+    DesignSize = (
+      578
+      25)
+    object sbPrint: TSpeedButton
+      Left = 0
+      Top = 4
+      Width = 52
+      Height = 21
+      Caption = 'Print'
+      Flat = True
+      Glyph.Data = {
+        36030000424D3603000000000000360000002800000010000000100000000100
+        18000000000000030000120B0000120B00000000000000000000FF00FFFF00FF
+        FF00FFFF00FF6C6A6A6C6A6AFF00FFFF00FF6C6A6A6C6A6AFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6C6A6AAAA7A7A19F9F6C6A6A6C
+        6A6A6C6A6AE5E3E36C6A6A6C6A6A6C6A6AFF00FFFF00FFFF00FFFF00FFFF00FF
+        6C6A6ADAD9D9A19F9FA19F9FA19F9F3736363535356C6D6DBFBFBFE1E2E2B7B6
+        B66C6A6A6C6A6A6C6A6AFF00FF6C6A6AD4D3D3CACACA8E8C8C8E8C8C8E8C8C3C
+        3B3B0A090A0707070B0B0B0707077A7A7ABBBBBB6C6A6AFF00FF6C6A6ACACACA
+        CACACA8E8C8CD7D4D4CECBCBBFBCBCB1AFAFA3A0A08886865E5B5C0707070909
+        090808086C6A6A7673736C6A6ACACACA8E8C8CEFEEEEFFFEFEFBFAFAE3E0E1DE
+        DEDEDEDDDDCFCECEBDBCBCADABAB8B89895856567A78787573736C6A6A8E8C8C
+        FFFFFFFEFCFCFAFAFAD5D4D5989193A09899B2ABACC4C0C1D7D7D7D8D8D8C7C6
+        C6B7B6B6918F8F6C6969FF00FF6C6A6A6C6A6AEDEBEBB1A6A77A6F728A838896
+        92959690919D97989A93959E9899BBBABAD1D1D1C2C2C26C6A6AFF00FFFF00FF
+        FF00FF6C6A6ABB897FA7876D8B6F647D67606F62657973798F8B8EA9A3A4CBCA
+        CAC1C1C16C6A6AFF00FFFF00FFFF00FFFF00FFFF00FFBD8281FFE3B4FFD39FE9
+        B281C99973BA916CBD8281807D7E6C6A6A6C6A6AFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFBD8281FFE0B8FFD3A7FFD09DFFCE90FFC688BD8281FF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFC08683FFE7CFFFE0C0FFD9B2FF
+        D3A5FFD099BD8281FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFBD8281FEEBD8FFE6CCFFDEBDFFD8B1FED3A4BD8281FF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFBD8281FFFFF2FFFFF2FFEBD8FFE5CAFF
+        E1BDF3C7A7BD8281FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        BD8281BD8281BD8281FBEFE2FBE3CFFBDDC2BD8281FF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFBD8281BD8281BD
+        8281FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
+      OnClick = sbPrintClick
+    end
+    object cb_DontShow: TCheckBox
+      Left = 451
+      Top = 5
+      Width = 126
+      Height = 18
+      Anchors = [akTop, akRight]
+      Caption = 'Don'#39't Show This Again'
+      TabOrder = 0
+      OnClick = cb_DontShowClick
+    end
+  end
+  object wb_Browser: TWebBrowser
+    Left = 0
+    Top = 0
+    Width = 578
+    Height = 333
+    Align = alClient
+    TabOrder = 1
+    ControlData = {
+      4C000000BD3B00006B2200000000000000000000000000000000000000000000
+      000000004C000000000000000000000001000000E0D057007335CF11AE690800
+      2B2E126208000000000000004C0000000114020000000000C000000000000046
+      8000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000100000000000000000000000000000000000000}
+  end
+end
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWSampleInfo.pas b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWSampleInfo.pas
new file mode 100644
index 0000000..7eeb3d5
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWSampleInfo.pas
@@ -0,0 +1,140 @@
+unit uEWSampleInfo;
+
+interface
+
+uses
+  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms,
+  Dialogs, StdCtrls, OleCtrls, SHDocVw, ExtCtrls, ToolsApi, Buttons;
+
+type
+  TSampleInfoForm = class(TForm)
+    Panel1: TPanel;
+    wb_Browser: TWebBrowser;
+    cb_DontShow: TCheckBox;
+    sbPrint: TSpeedButton;
+    procedure FormClose(Sender: TObject; var Action: TCloseAction);
+    procedure sbPrintClick(Sender: TObject);
+    procedure cb_DontShowClick(Sender: TObject);
+  private
+    fIniFile: string;
+  public
+    class procedure RunSampleInfo(const aFilename:string);
+  end;
+
+  TProjectNotification = class(TInterfacedObject, IOTAIDENotifier)
+  public
+    procedure AfterCompile(Succeeded: Boolean);
+    procedure AfterSave;
+    procedure BeforeCompile(const Project: IOTAProject; var Cancel: Boolean);
+    procedure BeforeSave;
+    procedure Destroyed;
+    procedure FileNotification(NotifyCode: TOTAFileNotification; const FileName: String; var Cancel: Boolean);
+    procedure Modified;
+  end;
+
+implementation
+
+uses
+  IniFiles;
+
+{$R *.dfm}
+
+{ TProjectNotification }
+
+procedure TProjectNotification.AfterCompile(Succeeded: Boolean);
+begin
+end;
+
+procedure TProjectNotification.AfterSave;
+begin
+end;
+
+procedure TProjectNotification.BeforeCompile(const Project: IOTAProject; var Cancel: Boolean);
+begin
+end;
+
+procedure TProjectNotification.BeforeSave;
+begin
+end;
+
+procedure TProjectNotification.Destroyed;
+begin
+end;
+
+procedure TProjectNotification.FileNotification(NotifyCode: TOTAFileNotification; const FileName: String; var Cancel: Boolean);
+var
+  lFileExt: string;
+begin
+  case NotifyCode of    { }
+    ofnFileOpened:begin
+        lFileExt := ExtractFileExt(Filename);
+        if SameText(lFileExt,'.dpr') or SameText(lFileExt,'.dpk') or SameText(lFileExt,'.bpg') or SameText(lFileExt,'.bdsproj') or SameText(lFileExt,'.bdsgroup') or SameText(lFileExt,'.dproj') or SameText(lFileExt,'.groupproj') then begin
+          TSampleInfoForm.RunSampleInfo(Filename);
+        end;
+      end;
+  end;    { case }
+end;
+
+procedure TProjectNotification.Modified;
+begin
+end;
+
+{ TSampleInfoForm }
+
+var
+  gLastForm: TSampleInfoForm;
+
+class procedure TSampleInfoForm.RunSampleInfo(const aFilename: string);
+var
+  lHelpFile,lIniFile: string;
+begin
+  lHelpFile := ChangeFileExt(aFilename,'.sample.html');
+  lIniFile := ChangeFileExt(lHelpFile,'.ini');
+  if FileExists(lHelpFile) then begin
+
+    with TMemIniFile.Create(lIniFile) do try
+      if ReadBool('Options','DontShow',false) then exit;
+    finally
+      Free();
+    end;
+
+    FreeAndNil(gLastForm);
+    gLastForm := self.Create(Application);
+    with gLastForm do begin
+      Caption := 'Helpful tips about the '+ChangeFileExt(ExtractFileName(aFilename),'')+' project';
+      wb_Browser.Navigate(lHelpFile);
+      fIniFile := lIniFile;
+      Show();
+    end;
+  end;
+end;
+
+procedure TSampleInfoForm.FormClose(Sender: TObject; var Action: TCloseAction);
+begin
+  gLastForm := nil;
+  Release();
+end;
+
+var gNotify:integer;
+
+procedure TSampleInfoForm.sbPrintClick(Sender: TObject);
+var temp : OleVariant;
+begin
+  wb_Browser.ExecWB(OLECMDID_PRINT, OLECMDEXECOPT_PROMPTUSER, temp, temp);
+end;
+
+procedure TSampleInfoForm.cb_DontShowClick(Sender: TObject);
+begin
+  with TMemIniFile.Create(fIniFile) do try
+    WriteBool('Options','DontShow',cb_DontShow.Checked);
+    UpdateFile();
+  finally
+    Free();
+  end;
+end;
+
+initialization
+  gNotify := (BorlandIDEServices as IOTAServices).AddNotifier(TProjectNotification.Create());
+finalization
+  (BorlandIDEServices as IOTAServices).RemoveNotifier(gNotify);
+end.
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWStringTools.pas b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWStringTools.pas
new file mode 100644
index 0000000..2397b22
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWStringTools.pas
@@ -0,0 +1,49 @@
+unit uEWStringTools;
+
+{$I Everwood.inc}
+
+interface
+
+type
+  TStringArray = array of string;
+
+function SplitString(const iString:string; iSeparator:char):TStringArray; overload;
+
+implementation
+
+uses
+  SysUtils;
+
+function SplitString(const iString:string; iSeparator:char):TStringArray;
+var i,Len,Start,Count:integer;
+begin
+  if iString = '' then begin
+    SetLength(result,0);
+    exit;
+  end;
+
+  SetLength(result,2);
+  i := 1;//0;
+  Len := Length(iString);
+  Start := 1;
+  Count := 0;
+  while i <= Len do begin
+    if iString[i] = iSeparator then begin
+      if Count > Length(result)-1 then SetLength(result,Length(result)*2);
+      result[Count] := Trim(Copy(iString,Start,i-Start));
+      Start := i+1;
+      inc(Count);
+    end;
+    inc(i);
+  end;
+
+  if Count < Length(result)+1 then SetLength(result,Length(result)*2);
+  result[Count] := Trim(Copy(iString,Start,Len-Start+1));
+  inc(Count);
+
+  if Count > 0 then begin
+    SetLength(result,Count);
+  end;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWTools.pas b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWTools.pas
new file mode 100644
index 0000000..c9bbb02
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWTools.pas
@@ -0,0 +1,83 @@
+unit uEWTools;
+
+{$I Everwood.inc}
+
+interface
+{$IFDEF MSWINDOWS}
+uses
+  Windows;
+function IsKeyDown(VirtualKeyCode:Integer=VK_SHIFT): Boolean;
+{$ENDIF}
+
+{$IFDEF FPC}
+
+{$IFNDEF MSWINDOWS}
+type
+  HWND = cardinal;
+  HINST = integer;
+const
+  SW_NORMAL = 1;
+  SW_SHOWNORMAL = 1;
+{$ENDIF}
+function RO_ShellExecute(hWnd: HWND; Operation, FileName, Parameters,  Directory: PChar; ShowCmd: Integer): HINST;
+function RO_ShellExecuteA(hWnd: HWND; Operation, FileName, Parameters, Directory: PAnsiChar; ShowCmd: Integer): HINST;
+function RO_ShellExecuteW(hWnd: HWND; Operation, FileName, Parameters, Directory: PWideChar; ShowCmd: Integer): HINST;
+{$ENDIF}
+
+implementation
+
+{$IFDEF FPC}
+uses
+  {$IFDEF MSWINDOWS}
+  ShellAPI;
+  {$ELSE}
+  SysUtils;
+  {$ENDIF}
+{$ENDIF}
+
+{$IFDEF MSWINDOWS}
+function IsKeyDown(VirtualKeyCode:Integer=VK_SHIFT): Boolean;
+begin
+  Result := GetKeyState(VirtualKeyCode) and $80 <> 0;
+end;
+{$ENDIF}
+
+{$IFDEF FPC}
+function RO_ShellExecute(hWnd: HWND; Operation, FileName, Parameters,  Directory: PChar; ShowCmd: Integer): HINST;
+begin
+  {$IFDEF MSWINDOWS}
+  Result:=ShellExecute(hWnd, Operation,FileName,Parameters,Directory,ShowCmd);
+  {$ELSE}
+  if Parameters <> nil then
+    Result:=ExecuteProcess(String(Directory),String(Filename)+' '+String(Parameters))
+  else
+    Result:=ExecuteProcess(String(Directory),String(Filename))
+  {$ENDIF}
+end;
+
+function RO_ShellExecuteA(hWnd: HWND; Operation, FileName, Parameters,Directory: PAnsiChar; ShowCmd: Integer): HINST;
+begin
+  {$IFDEF MSWINDOWS}
+  Result:=ShellExecuteA(hWnd, Operation,FileName,Parameters,Directory,ShowCmd);
+  {$ELSE}
+  if Parameters <> nil then
+    Result:=ExecuteProcess(Ansistring(Directory),Ansistring(Filename)+' '+Ansistring(Parameters))
+  else
+    Result:=ExecuteProcess(Ansistring(Directory),Ansistring(Filename))
+  {$ENDIF}
+end;
+
+function RO_ShellExecuteW(hWnd: HWND; Operation, FileName, Parameters,Directory: PWideChar; ShowCmd: Integer): HINST;
+begin
+  {$IFDEF MSWINDOWS}
+  Result:=ShellExecuteW(hWnd, Operation,FileName,Parameters,Directory,ShowCmd);
+  {$ELSE}
+  if Parameters <> nil then
+    Result:=ExecuteProcess(WideString(Directory),WideString(Filename)+' '+WideString(Parameters))
+  else
+    Result:=ExecuteProcess(WideString(Directory),WideString(Filename))
+  {$ENDIF}
+end;
+{$ENDIF}
+
+end.
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWWizard.dfm b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWWizard.dfm
new file mode 100644
index 0000000..4f8e8cb
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWWizard.dfm
@@ -0,0 +1,412 @@
+object EWWizardForm: TEWWizardForm
+  Left = 344
+  Top = 238
+  BorderStyle = bsDialog
+  Caption = 'New Wizard...'
+  ClientHeight = 292
+  ClientWidth = 452
+  Color = clBtnFace
+  Font.Charset = DEFAULT_CHARSET
+  Font.Color = clWindowText
+  Font.Height = -11
+  Font.Name = 'Tahoma'
+  Font.Style = []
+  OldCreateOrder = False
+  Position = poScreenCenter
+  OnCreate = FormCreate
+  OnDestroy = FormDestroy
+  PixelsPerInch = 96
+  TextHeight = 13
+  object Bevel1: TBevel
+    Left = 0
+    Top = 42
+    Width = 452
+    Height = 2
+    Align = alTop
+    Shape = bsBottomLine
+  end
+  object Panel1: TPanel
+    Left = 0
+    Top = 0
+    Width = 452
+    Height = 42
+    Align = alTop
+    BevelOuter = bvNone
+    Color = clWhite
+    TabOrder = 0
+    object Image1: TImage
+      Left = 5
+      Top = 5
+      Width = 32
+      Height = 32
+      AutoSize = True
+    end
+    object Label1: TLabel
+      Left = 43
+      Top = 5
+      Width = 111
+      Height = 13
+      Caption = 'RemObjects Wizard'
+      Font.Charset = DEFAULT_CHARSET
+      Font.Color = clWindowText
+      Font.Height = -11
+      Font.Name = 'Tahoma'
+      Font.Style = [fsBold]
+      ParentFont = False
+    end
+    object Label2: TLabel
+      Left = 45
+      Top = 21
+      Width = 48
+      Height = 13
+      Caption = 'Bla Bla Bla'
+    end
+  end
+  object pc_Pages: TPageControl
+    Left = 0
+    Top = 44
+    Width = 452
+    Height = 213
+    ActivePage = ts_Welcome
+    Align = alClient
+    Style = tsFlatButtons
+    TabOrder = 1
+    object ts_Welcome: TTabSheet
+      Caption = 'Welcome'
+      object Label3: TLabel
+        Left = 8
+        Top = 8
+        Width = 201
+        Height = 13
+        Caption = 'Welcome to the New Project Wizard'
+        Font.Charset = DEFAULT_CHARSET
+        Font.Color = clWindowText
+        Font.Height = -11
+        Font.Name = 'Tahoma'
+        Font.Style = [fsBold]
+        ParentFont = False
+      end
+      object Label4: TLabel
+        Left = 24
+        Top = 24
+        Width = 31
+        Height = 13
+        Caption = 'Bla Bla'
+      end
+    end
+    object ts_Finish: TTabSheet
+      Caption = 'Finish'
+      ImageIndex = 2
+      object Label5: TLabel
+        Left = 8
+        Top = 8
+        Width = 32
+        Height = 13
+        Caption = 'Done!'
+        Font.Charset = DEFAULT_CHARSET
+        Font.Color = clWindowText
+        Font.Height = -11
+        Font.Name = 'Tahoma'
+        Font.Style = [fsBold]
+        ParentFont = False
+      end
+      object Label6: TLabel
+        Left = 24
+        Top = 24
+        Width = 413
+        Height = 13
+        Caption = 
+          'The Wizard is now ready to create your <whatever> with the optio' +
+          'ns selected below:'
+      end
+      object lv_Options: TListView
+        Left = 24
+        Top = 40
+        Width = 393
+        Height = 161
+        Color = clBtnFace
+        Columns = <
+          item
+            Caption = 'Option'
+            Width = -1
+            WidthType = (
+              -1)
+          end
+          item
+            Caption = 'Value'
+            Width = -1
+            WidthType = (
+              -1)
+          end>
+        ColumnClick = False
+        ReadOnly = True
+        RowSelect = True
+        TabOrder = 0
+        ViewStyle = vsReport
+      end
+    end
+  end
+  object Panel2: TPanel
+    Left = 0
+    Top = 257
+    Width = 452
+    Height = 35
+    Align = alBottom
+    BevelOuter = bvNone
+    TabOrder = 2
+    object btn_Finish: TBitBtn
+      Left = 372
+      Top = 5
+      Width = 75
+      Height = 25
+      Hint = 'This is Finish, but not the End'
+      Anchors = [akTop, akRight]
+      Caption = 'Finish'
+      Default = True
+      ModalResult = 1
+      TabOrder = 0
+      Visible = False
+      Glyph.Data = {
+        36060000424D3606000000000000360000002800000020000000100000000100
+        18000000000000060000220B0000220B00000000000000000000FF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF811E00FF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FF787878FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF811E00
+        811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FF787878787878FF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        811E00811E00811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FF787878787878787878FF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FF811E0095440F811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF787878898989787878FF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FF811E00A7632F811E00811E00FF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF7878789F9F9F78787878
+        7878FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FF811E00BF8B62CCA17E811E00811E00FF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF787878B8B8B8C6
+        C6C6787878787878FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FF811E00D8B69CE6D1BFE7D3C4811E00FF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF787878D1
+        D1D1E0E0E0E2E2E2787878FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FF811E00F0E2D9FCF7F2FAF0E6811E00811E
+        00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF78
+        7878EBEBEBF5F5F5F1F1F1787878787878FF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FF811E00D8AF96F4E2CFF0D7BDD8A784811E
+        00811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF78
+        7878D0D0D0E9E9E9E3E3E3CACACA787878787878FF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FF811E00F3DECAEFD4B8EBC9A7DAA67D811E00FF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF787878E7
+        E7E7E1E1E1DBDBDBC9C9C9787878FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FF811E00E7BB92E3B081E0A672D5925A811E
+        00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF78
+        7878D3D3D3CDCDCDC6C6C6BCBCBC787878FF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF811E00DA995ED78F50D38441CF7B
+        35811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FF787878BFBFBFB8B8B8B2B2B2ACACAC787878FF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF811E00811E00811E00811E
+        00811E00811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FF787878787878787878787878787878787878FF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
+      NumGlyphs = 2
+    end
+    object btn_Cancel: TBitBtn
+      Left = 5
+      Top = 5
+      Width = 75
+      Height = 25
+      Cancel = True
+      Caption = 'Cancel'
+      ModalResult = 2
+      TabOrder = 1
+      Glyph.Data = {
+        36060000424D3606000000000000360000002800000020000000100000000100
+        18000000000000060000C40E0000C40E00000000000000000000FF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A00009AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00009A0000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        00009A174AFD103BF400009AFF00FFFF00FFFF00FFFF00FF00009A002CF80030
+        FC00009AFF00FFFF00FFFF00FFFF00FF6B6B6BA8A8A8A0A0A06B6B6BFF00FFFF
+        00FFFF00FFFF00FF6B6B6B9A9A9A9C9C9C6B6B6BFF00FFFF00FFFF00FFFF00FF
+        00009A1A47F81A4CFF123BF100009AFF00FFFF00FF00009A012DF60132FF002A
+        F300009AFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7AAAAAA9F9F9F6B6B6BFF
+        00FFFF00FF6B6B6B9999999E9E9E9797976B6B6BFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A1C47F61B4DFF143EF400009A00009A002DF80134FF032BF20000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7ABABABA2A2A26B
+        6B6B6B6B6B9A9A9A9E9E9E9898986B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FF00009A1D48F61D50FF103DFB0431FE0132FF002CF600009AFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7ACACACA3
+        A3A39F9F9F9E9E9E9999996B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FF00009A1A48F91342FF0C3CFF0733F600009AFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7A7
+        A7A7A3A3A39C9C9C6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FF00009A214EFC1D4BFF1847FF1743F600009AFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BACACACAC
+        ACACA9A9A9A4A4A46B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FF00009A2E5BF92C5FFF224DF8204BF82355FF1B46F600009AFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BB1B1B1B3B3B3AB
+        ABABAAAAAAAFAFAFA6A6A66B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A3664FA386BFF2D59F400009A00009A224CF42558FF1D49F60000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BB6B6B6B9B9B9AEAEAE6B
+        6B6B6B6B6BA9A9A9B0B0B0A7A7A76B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        00009A4071FA4274FF325DF100009AFF00FFFF00FF00009A224DF1275AFF204C
+        F800009AFF00FFFF00FFFF00FFFF00FF6B6B6BBBBBBBBEBEBEAFAFAF6B6B6BFF
+        00FFFF00FF6B6B6BA7A7A7B1B1B1AAAAAA6B6B6BFF00FFFF00FFFF00FFFF00FF
+        00009A497AFC3B66F300009AFF00FFFF00FFFF00FFFF00FF00009A2550F42655
+        FA00009AFF00FFFF00FFFF00FFFF00FF6B6B6BC0C0C0B5B5B56B6B6BFF00FFFF
+        00FFFF00FFFF00FF6B6B6BAAAAAAAEAEAE6B6B6BFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A00009AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00009A0000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
+      NumGlyphs = 2
+    end
+    object btn_Next: TBitBtn
+      Left = 372
+      Top = 5
+      Width = 75
+      Height = 25
+      Anchors = [akTop, akRight]
+      Caption = '&Next'
+      Default = True
+      TabOrder = 2
+      OnClick = btn_NextClick
+      Glyph.Data = {
+        36060000424D3606000000000000360000002800000020000000100000000100
+        18000000000000060000130B0000130B00000000000000000000FF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        0B7C15097A14087110056A0C04670B04670C04670C04670C04670C04670C0467
+        0C045709FF00FFFF00FFFF00FFFF00FF9C9C9C9C9C9C98989896969695959595
+        9595959595959595959595959595959595909090FF00FFFF00FFFF00FF129A28
+        1AB03A15AF3211AB270DA81F08A61808A51608A51608A61708A61708A51708AB
+        18078D12045708FF00FFFF00FFA8A8A8B0B0B0AEAEAEACACACAAAAAAA8A8A8A8
+        A8A8A8A8A8A8A8A8A8A8A8A8A8A8A9A9A9A0A0A0909090FF00FFFF00FF1BAD3C
+        25C5541EC0451ABE3A15BD3110BA270BB81D09B81909B81A09B81A09B71A09BE
+        1C08AB1704670CFF00FFFF00FFB0B0B0B9B9B9B5B5B5B4B4B4B2B2B2B0B0B0AD
+        ADADADADADADADADADADADADADADAFAFAFA9A9A9959595FF00FFFF00FF20B445
+        31C46429BF5322BB481BBA3D17B73312B4290DB3200AB21909B11809B01809B7
+        1A08A61704680CFF00FFFF00FFB3B3B3BCBCBCB8B8B8B5B5B5B3B3B3B1B1B1AF
+        AFAFADADADACACACACACACABABABADADADA8A8A8959595FF00FFFF00FF22B548
+        3FC87635C367FEFEFE23BC4E1DBA4218B838FEFEFE0EB4240AB31C09B11809B8
+        1A08A61704670CFF00FFFF00FFB3B3B3C0C0C0BCBCBCFEFEFEB5B5B5B3B3B3B1
+        B1B1FEFEFEADADADACACACACACACADADADA8A8A8959595FF00FFFF00FF21B548
+        58D08A46C97AFEFEFEFEFEFE24BD501FBB46FEFEFEFEFEFE10B4290CB21F09B7
+        1A08A61604670CFF00FFFF00FFB3B3B3CACACAC3C3C3FEFEFEFEFEFEB6B6B6B4
+        B4B4FEFEFEFEFEFEAEAEAEACACACADADADA8A8A8959595FF00FFFF00FF21B548
+        77D89F52CC813BC772FEFEFEFEFEFE26BE5421BD4AFEFEFEFEFEFE13B52D0DBA
+        230AA71804680BFF00FFFF00FFB3B3B3D5D5D5C8C8C8C0C0C0FEFEFEFEFEFEB7
+        B7B7B5B5B5FEFEFEFEFEFEB0B0B0AFAFAFA8A8A8959595FF00FFFF00FF21B548
+        8ADEAC5DD08A42C87637C56EFEFEFEFEFEFE27BF5822BD4FFEFEFEFEFEFE14BB
+        310EA922066F0EFF00FFFF00FFB3B3B3DCDCDCCCCCCCC2C2C2BEBEBEFEFEFEFE
+        FEFEB8B8B8B5B5B5FEFEFEFEFEFEB1B1B1AAAAAA989898FF00FFFF00FF21B548
+        95E0B365D28F48CA7AFEFEFEFEFEFE30C3692EC265FEFEFEFEFEFE1FBB461BBE
+        3E14AE2F0A7A14FF00FFFF00FFB3B3B3E0E0E0CECECEC4C4C4FEFEFEFEFEFEBB
+        BBBBBBBBBBFEFEFEFEFEFEB4B4B4B4B4B4ADADAD9C9C9CFF00FFFF00FF21B548
+        9DE3B96FD597FEFEFEFEFEFE40C87439C570FEFEFEFEFEFE2BC16027BF5523C0
+        4E1BB23C0D851AFF00FFFF00FFB3B3B3E3E3E3D2D2D2FEFEFEFEFEFEC1C1C1BF
+        BFBFFEFEFEFEFEFEB9B9B9B8B8B8B7B7B7B0B0B0A0A0A0FF00FFFF00FF21B548
+        A9E6C280DAA3FEFEFE59CF874DCC7E44C978FEFEFE39C57032C36B2DC1632AC2
+        5D20B548108F1FFF00FFFF00FFB3B3B3E7E7E7D8D8D8FEFEFECACACAC6C6C6C2
+        C2C2FEFEFEBFBFBFBCBCBCBABABAB9B9B9B3B3B3A4A4A4FF00FFFF00FF21B549
+        AEE8C5A6E5BF91DFAF86DBA778D79D67D39159CF8744C97836C56E32C36C30C5
+        6A27BB57139C26FF00FFFF00FFB3B3B3E9E9E9E6E6E6DFDFDFDADADAD5D5D5D0
+        D0D0CACACAC2C2C2BDBDBDBCBCBCBCBCBCB7B7B7A8A8A8FF00FFFF00FF22B548
+        92E0B3AEE8C6B1E9C8A9E6C29BE3B887DDAA6AD5964FCD823BC77436C57034C8
+        732BBF5E14A428FF00FFFF00FFB3B3B3DFDFDFE9E9E9EAEAEAE7E7E7E2E2E2DB
+        DBDBD0D0D0C7C7C7C0C0C0BDBDBDBEBEBEB9B9B9ABABABFF00FFFF00FFFF00FF
+        38BB5A51C57053C57151C56F4CC36B42C06437BC5A2EB95325B74A23B54B23B7
+        4A1AAF39FF00FFFF00FFFF00FFFF00FFBBBBBBC5C5C5C6C6C6C5C5C5C3C3C3C0
+        C0C0BBBBBBB8B8B8B5B5B5B4B4B4B4B4B4B0B0B0FF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
+      Layout = blGlyphRight
+      NumGlyphs = 2
+    end
+    object btn_Back: TBitBtn
+      Left = 292
+      Top = 5
+      Width = 75
+      Height = 25
+      Anchors = [akTop, akRight]
+      Caption = 'Back'
+      Enabled = False
+      TabOrder = 3
+      OnClick = btn_BackClick
+      Glyph.Data = {
+        36060000424D3606000000000000360000002800000020000000100000000100
+        18000000000000060000130B0000130B00000000000000000000FF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        0B7C15097A14087110056A0C04670B04670C04670C04670C04670C04670C0467
+        0C045709FF00FFFF00FFFF00FFFF00FF9D9D9D9C9C9C99999996969695959595
+        9595959595959595959595959595959595919191FF00FFFF00FFFF00FF129A28
+        1AB03A15AF3211AB270DA81F08A61808A51608A51608A61708A61708A51708AB
+        18078D12045708FF00FFFF00FFA8A8A8B1B1B1AEAEAEADADADAAAAAAA9A9A9A8
+        A8A8A8A8A8A9A9A9A9A9A9A8A8A8A9A9A9A1A1A1919191FF00FFFF00FF1BAD3C
+        25C5541EC0451ABE3A15BD3110BA270BB81D09B81909B81A09B81A09B71A09BE
+        1C08AB1704670CFF00FFFF00FFB0B0B0B9B9B9B6B6B6B4B4B4B2B2B2B1B1B1AE
+        AEAEADADADADADADADADADADADADAFAFAFA9A9A9959595FF00FFFF00FF20B445
+        31C46429BF5322BB481BBA3D17B73312B4290DB3200AB21909B11809B01809B7
+        1A08A61704680CFF00FFFF00FFB3B3B3BCBCBCB9B9B9B5B5B5B3B3B3B1B1B1AF
+        AFAFADADADADADADACACACABABABADADADA9A9A9969696FF00FFFF00FF22B548
+        3FC87635C3672BBF5723BC4E1DBA42FEFEFE13B72E0EB4240AB31CFEFEFE09B8
+        1A08A61704670CFF00FFFF00FFB4B4B4C1C1C1BDBDBDB9B9B9B6B6B6B4B4B4FE
+        FEFEB1B1B1AEAEAEADADADFEFEFEADADADA9A9A9959595FF00FFFF00FF21B548
+        58D08A46C97A34C5692CBF5DFEFEFEFEFEFE1ABA3D16B733FEFEFEFEFEFE09B7
+        1A08A61604670CFF00FFFF00FFB4B4B4CBCBCBC3C3C3BDBDBDB9B9B9FEFEFEFE
+        FEFEB3B3B3B1B1B1FEFEFEFEFEFEADADADA9A9A9959595FF00FFFF00FF21B548
+        77D89F52CC813BC772FEFEFEFEFEFE26BE5421BD4AFEFEFEFEFEFE13B52D0DBA
+        230AA71804680BFF00FFFF00FFB4B4B4D5D5D5C8C8C8C0C0C0FEFEFEFEFEFEB8
+        B8B8B6B6B6FEFEFEFEFEFEB0B0B0AFAFAFA9A9A9969696FF00FFFF00FF21B548
+        8ADEAC5DD08AFEFEFEFEFEFE2FC3682CC162FEFEFEFEFEFE1EBB4418B93A14BB
+        310EA922066F0EFF00FFFF00FFB4B4B4DDDDDDCCCCCCFEFEFEFEFEFEBCBCBCBA
+        BABAFEFEFEFEFEFEB4B4B4B2B2B2B1B1B1ABABAB989898FF00FFFF00FF21B548
+        95E0B365D28F48CA7AFEFEFEFEFEFE30C3692EC265FEFEFEFEFEFE1FBB461BBE
+        3E14AE2F0A7A14FF00FFFF00FFB4B4B4E0E0E0CECECEC5C5C5FEFEFEFEFEFEBC
+        BCBCBBBBBBFEFEFEFEFEFEB5B5B5B4B4B4AEAEAE9D9D9DFF00FFFF00FF21B548
+        9DE3B96FD59757CE854ECC7FFEFEFEFEFEFE35C56D30C368FEFEFEFEFEFE23C0
+        4E1BB23C0D851AFF00FFFF00FFB4B4B4E3E3E3D2D2D2C9C9C9C7C7C7FEFEFEFE
+        FEFEBDBDBDBCBCBCFEFEFEFEFEFEB7B7B7B1B1B1A1A1A1FF00FFFF00FF21B548
+        A9E6C280DAA35ED08A59CF874DCC7EFEFEFE43C87739C57032C36BFEFEFE2AC2
+        5D20B548108F1FFF00FFFF00FFB4B4B4E7E7E7D9D9D9CDCDCDCBCBCBC6C6C6FE
+        FEFEC2C2C2BFBFBFBCBCBCFEFEFEBABABAB3B3B3A4A4A4FF00FFFF00FF21B549
+        AEE8C5A6E5BF91DFAF86DBA778D79D67D39159CF8744C97836C56E32C36C30C5
+        6A27BB57139C26FF00FFFF00FFB4B4B4E9E9E9E6E6E6DFDFDFDADADAD5D5D5D0
+        D0D0CBCBCBC3C3C3BDBDBDBCBCBCBCBCBCB7B7B7A9A9A9FF00FFFF00FF22B548
+        92E0B3AEE8C6B1E9C8A9E6C29BE3B887DDAA6AD5964FCD823BC77436C57034C8
+        732BBF5E14A428FF00FFFF00FFB4B4B4E0E0E0E9E9E9EBEBEBE7E7E7E3E3E3DC
+        DCDCD1D1D1C7C7C7C0C0C0BDBDBDBEBEBEB9B9B9ABABABFF00FFFF00FFFF00FF
+        38BB5A51C57053C57151C56F4CC36B42C06437BC5A2EB95325B74A23B54B23B7
+        4A1AAF39FF00FFFF00FFFF00FFFF00FFBCBCBCC5C5C5C6C6C6C5C5C5C3C3C3C0
+        C0C0BCBCBCB8B8B8B5B5B5B4B4B4B5B5B5B0B0B0FF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
+      NumGlyphs = 2
+    end
+  end
+end
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWWizard.lfm b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWWizard.lfm
new file mode 100644
index 0000000..0863322
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWWizard.lfm
@@ -0,0 +1,410 @@
+object EWWizardForm: TEWWizardForm
+  Left = 344
+  Height = 310
+  Top = 238
+  Width = 484
+  HorzScrollBar.Page = 483
+  VertScrollBar.Page = 309
+  ActiveControl = pc_Pages
+  BorderStyle = bsDialog
+  Caption = 'New Wizard...'
+  ClientHeight = 310
+  ClientWidth = 484
+  Font.Height = -11
+  Font.Name = 'Tahoma'
+  OnCreate = FormCreate
+  OnDestroy = FormDestroy
+  Position = poScreenCenter
+  LCLVersion = '0.9.25'
+  object Bevel1: TBevel
+    Height = 2
+    Top = 42
+    Width = 484
+    Align = alTop
+    Shape = bsBottomLine
+  end
+  object Panel1: TPanel
+    Height = 42
+    Width = 484
+    Align = alTop
+    BevelOuter = bvNone
+    ClientHeight = 42
+    ClientWidth = 484
+    Color = clWhite
+    ParentColor = False
+    TabOrder = 0
+    object Image1: TImage
+      Left = 5
+      Height = 32
+      Top = 5
+      Width = 32
+      AutoSize = True
+      Transparent = False
+    end
+    object Label1: TLabel
+      Left = 43
+      Height = 14
+      Top = 5
+      Width = 112
+      Caption = 'RemObjects Wizard'
+      Font.Height = -11
+      Font.Name = 'Tahoma'
+      Font.Style = [fsBold]
+      ParentColor = False
+    end
+    object Label2: TLabel
+      Left = 45
+      Height = 16
+      Top = 21
+      Width = 55
+      Caption = 'Bla Bla Bla'
+      ParentColor = False
+    end
+  end
+  object pc_Pages: TPageControl
+    Height = 231
+    Top = 44
+    Width = 484
+    ActivePage = ts_Welcome
+    Align = alClient
+    TabIndex = 0
+    TabOrder = 1
+    object ts_Welcome: TTabSheet
+      Caption = 'Welcome'
+      ClientHeight = 205
+      ClientWidth = 476
+      object Label3: TLabel
+        Left = 8
+        Height = 14
+        Top = 8
+        Width = 202
+        Caption = 'Welcome to the New Project Wizard'
+        Font.Height = -11
+        Font.Name = 'Tahoma'
+        Font.Style = [fsBold]
+        ParentColor = False
+      end
+      object Label4: TLabel
+        Left = 24
+        Height = 16
+        Top = 24
+        Width = 36
+        Caption = 'Bla Bla'
+        ParentColor = False
+      end
+    end
+    object ts_Finish: TTabSheet
+      Caption = 'Finish'
+      ClientHeight = 205
+      ClientWidth = 476
+      ImageIndex = 2
+      object Label5: TLabel
+        Left = 8
+        Height = 14
+        Top = 8
+        Width = 33
+        Caption = 'Done!'
+        Font.Height = -11
+        Font.Name = 'Tahoma'
+        Font.Style = [fsBold]
+        ParentColor = False
+      end
+      object Label6: TLabel
+        Left = 24
+        Height = 16
+        Top = 24
+        Width = 445
+        Caption = 'The Wizard is now ready to create your <whatever> with the options selected below:'
+        ParentColor = False
+      end
+      object lv_Options: TListView
+        Left = 24
+        Height = 161
+        Top = 40
+        Width = 445
+        Color = clBtnFace
+        Columns = <        
+          item
+            Caption = 'Option'
+            Width = 25
+          end        
+          item
+            Caption = 'Value'
+            Width = 25
+          end>
+        ColumnClick = False
+        ReadOnly = True
+        RowSelect = True
+        TabOrder = 0
+        ViewStyle = vsReport
+      end
+    end
+  end
+  object Panel2: TPanel
+    Height = 35
+    Top = 275
+    Width = 484
+    Align = alBottom
+    BevelOuter = bvNone
+    ClientHeight = 35
+    ClientWidth = 484
+    TabOrder = 2
+    object btn_Finish: TBitBtn
+      Left = 404
+      Height = 25
+      Hint = 'This is Finish, but not the End'
+      Top = 5
+      Width = 75
+      Anchors = [akTop, akRight]
+      Caption = 'Finish'
+      Glyph.Data = {
+        36060000424D3606000000000000360000002800000020000000100000000100
+        18000000000000060000220B0000220B00000000000000000000FF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF811E00FF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FF787878FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF811E00
+        811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FF787878787878FF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        811E00811E00811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FF787878787878787878FF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FF811E0095440F811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF787878898989787878FF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FF811E00A7632F811E00811E00FF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF7878789F9F9F78787878
+        7878FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FF811E00BF8B62CCA17E811E00811E00FF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF787878B8B8B8C6
+        C6C6787878787878FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FF811E00D8B69CE6D1BFE7D3C4811E00FF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF787878D1
+        D1D1E0E0E0E2E2E2787878FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FF811E00F0E2D9FCF7F2FAF0E6811E00811E
+        00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF78
+        7878EBEBEBF5F5F5F1F1F1787878787878FF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FF811E00D8AF96F4E2CFF0D7BDD8A784811E
+        00811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF78
+        7878D0D0D0E9E9E9E3E3E3CACACA787878787878FF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FF811E00F3DECAEFD4B8EBC9A7DAA67D811E00FF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF787878E7
+        E7E7E1E1E1DBDBDBC9C9C9787878FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FF811E00E7BB92E3B081E0A672D5925A811E
+        00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF78
+        7878D3D3D3CDCDCDC6C6C6BCBCBC787878FF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF811E00DA995ED78F50D38441CF7B
+        35811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FF787878BFBFBFB8B8B8B2B2B2ACACAC787878FF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF811E00811E00811E00811E
+        00811E00811E00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FF787878787878787878787878787878787878FF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      }
+      ModalResult = 1
+      NumGlyphs = 2
+      TabOrder = 0
+      Visible = False
+    end
+    object btn_Cancel: TBitBtn
+      Left = 5
+      Height = 25
+      Top = 5
+      Width = 75
+      Cancel = True
+      Caption = 'Cancel'
+      Glyph.Data = {
+        36060000424D3606000000000000360000002800000020000000100000000100
+        18000000000000060000C40E0000C40E00000000000000000000FF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A00009AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00009A0000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        00009A174AFD103BF400009AFF00FFFF00FFFF00FFFF00FF00009A002CF80030
+        FC00009AFF00FFFF00FFFF00FFFF00FF6B6B6BA8A8A8A0A0A06B6B6BFF00FFFF
+        00FFFF00FFFF00FF6B6B6B9A9A9A9C9C9C6B6B6BFF00FFFF00FFFF00FFFF00FF
+        00009A1A47F81A4CFF123BF100009AFF00FFFF00FF00009A012DF60132FF002A
+        F300009AFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7AAAAAA9F9F9F6B6B6BFF
+        00FFFF00FF6B6B6B9999999E9E9E9797976B6B6BFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A1C47F61B4DFF143EF400009A00009A002DF80134FF032BF20000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7ABABABA2A2A26B
+        6B6B6B6B6B9A9A9A9E9E9E9898986B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FF00009A1D48F61D50FF103DFB0431FE0132FF002CF600009AFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7ACACACA3
+        A3A39F9F9F9E9E9E9999996B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FF00009A1A48F91342FF0C3CFF0733F600009AFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7A7
+        A7A7A3A3A39C9C9C6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FF00009A214EFC1D4BFF1847FF1743F600009AFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BACACACAC
+        ACACA9A9A9A4A4A46B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FF00009A2E5BF92C5FFF224DF8204BF82355FF1B46F600009AFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BB1B1B1B3B3B3AB
+        ABABAAAAAAAFAFAFA6A6A66B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A3664FA386BFF2D59F400009A00009A224CF42558FF1D49F60000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BB6B6B6B9B9B9AEAEAE6B
+        6B6B6B6B6BA9A9A9B0B0B0A7A7A76B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        00009A4071FA4274FF325DF100009AFF00FFFF00FF00009A224DF1275AFF204C
+        F800009AFF00FFFF00FFFF00FFFF00FF6B6B6BBBBBBBBEBEBEAFAFAF6B6B6BFF
+        00FFFF00FF6B6B6BA7A7A7B1B1B1AAAAAA6B6B6BFF00FFFF00FFFF00FFFF00FF
+        00009A497AFC3B66F300009AFF00FFFF00FFFF00FFFF00FF00009A2550F42655
+        FA00009AFF00FFFF00FFFF00FFFF00FF6B6B6BC0C0C0B5B5B56B6B6BFF00FFFF
+        00FFFF00FFFF00FF6B6B6BAAAAAAAEAEAE6B6B6BFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A00009AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00009A0000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      }
+      ModalResult = 2
+      NumGlyphs = 2
+      TabOrder = 1
+    end
+    object btn_Next: TBitBtn
+      Left = 404
+      Height = 25
+      Top = 5
+      Width = 75
+      Anchors = [akTop, akRight]
+      Caption = '&Next'
+      Default = True
+      Glyph.Data = {
+        36060000424D3606000000000000360000002800000020000000100000000100
+        18000000000000060000130B0000130B00000000000000000000FF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        0B7C15097A14087110056A0C04670B04670C04670C04670C04670C04670C0467
+        0C045709FF00FFFF00FFFF00FFFF00FF9C9C9C9C9C9C98989896969695959595
+        9595959595959595959595959595959595909090FF00FFFF00FFFF00FF129A28
+        1AB03A15AF3211AB270DA81F08A61808A51608A51608A61708A61708A51708AB
+        18078D12045708FF00FFFF00FFA8A8A8B0B0B0AEAEAEACACACAAAAAAA8A8A8A8
+        A8A8A8A8A8A8A8A8A8A8A8A8A8A8A9A9A9A0A0A0909090FF00FFFF00FF1BAD3C
+        25C5541EC0451ABE3A15BD3110BA270BB81D09B81909B81A09B81A09B71A09BE
+        1C08AB1704670CFF00FFFF00FFB0B0B0B9B9B9B5B5B5B4B4B4B2B2B2B0B0B0AD
+        ADADADADADADADADADADADADADADAFAFAFA9A9A9959595FF00FFFF00FF20B445
+        31C46429BF5322BB481BBA3D17B73312B4290DB3200AB21909B11809B01809B7
+        1A08A61704680CFF00FFFF00FFB3B3B3BCBCBCB8B8B8B5B5B5B3B3B3B1B1B1AF
+        AFAFADADADACACACACACACABABABADADADA8A8A8959595FF00FFFF00FF22B548
+        3FC87635C367FEFEFE23BC4E1DBA4218B838FEFEFE0EB4240AB31C09B11809B8
+        1A08A61704670CFF00FFFF00FFB3B3B3C0C0C0BCBCBCFEFEFEB5B5B5B3B3B3B1
+        B1B1FEFEFEADADADACACACACACACADADADA8A8A8959595FF00FFFF00FF21B548
+        58D08A46C97AFEFEFEFEFEFE24BD501FBB46FEFEFEFEFEFE10B4290CB21F09B7
+        1A08A61604670CFF00FFFF00FFB3B3B3CACACAC3C3C3FEFEFEFEFEFEB6B6B6B4
+        B4B4FEFEFEFEFEFEAEAEAEACACACADADADA8A8A8959595FF00FFFF00FF21B548
+        77D89F52CC813BC772FEFEFEFEFEFE26BE5421BD4AFEFEFEFEFEFE13B52D0DBA
+        230AA71804680BFF00FFFF00FFB3B3B3D5D5D5C8C8C8C0C0C0FEFEFEFEFEFEB7
+        B7B7B5B5B5FEFEFEFEFEFEB0B0B0AFAFAFA8A8A8959595FF00FFFF00FF21B548
+        8ADEAC5DD08A42C87637C56EFEFEFEFEFEFE27BF5822BD4FFEFEFEFEFEFE14BB
+        310EA922066F0EFF00FFFF00FFB3B3B3DCDCDCCCCCCCC2C2C2BEBEBEFEFEFEFE
+        FEFEB8B8B8B5B5B5FEFEFEFEFEFEB1B1B1AAAAAA989898FF00FFFF00FF21B548
+        95E0B365D28F48CA7AFEFEFEFEFEFE30C3692EC265FEFEFEFEFEFE1FBB461BBE
+        3E14AE2F0A7A14FF00FFFF00FFB3B3B3E0E0E0CECECEC4C4C4FEFEFEFEFEFEBB
+        BBBBBBBBBBFEFEFEFEFEFEB4B4B4B4B4B4ADADAD9C9C9CFF00FFFF00FF21B548
+        9DE3B96FD597FEFEFEFEFEFE40C87439C570FEFEFEFEFEFE2BC16027BF5523C0
+        4E1BB23C0D851AFF00FFFF00FFB3B3B3E3E3E3D2D2D2FEFEFEFEFEFEC1C1C1BF
+        BFBFFEFEFEFEFEFEB9B9B9B8B8B8B7B7B7B0B0B0A0A0A0FF00FFFF00FF21B548
+        A9E6C280DAA3FEFEFE59CF874DCC7E44C978FEFEFE39C57032C36B2DC1632AC2
+        5D20B548108F1FFF00FFFF00FFB3B3B3E7E7E7D8D8D8FEFEFECACACAC6C6C6C2
+        C2C2FEFEFEBFBFBFBCBCBCBABABAB9B9B9B3B3B3A4A4A4FF00FFFF00FF21B549
+        AEE8C5A6E5BF91DFAF86DBA778D79D67D39159CF8744C97836C56E32C36C30C5
+        6A27BB57139C26FF00FFFF00FFB3B3B3E9E9E9E6E6E6DFDFDFDADADAD5D5D5D0
+        D0D0CACACAC2C2C2BDBDBDBCBCBCBCBCBCB7B7B7A8A8A8FF00FFFF00FF22B548
+        92E0B3AEE8C6B1E9C8A9E6C29BE3B887DDAA6AD5964FCD823BC77436C57034C8
+        732BBF5E14A428FF00FFFF00FFB3B3B3DFDFDFE9E9E9EAEAEAE7E7E7E2E2E2DB
+        DBDBD0D0D0C7C7C7C0C0C0BDBDBDBEBEBEB9B9B9ABABABFF00FFFF00FFFF00FF
+        38BB5A51C57053C57151C56F4CC36B42C06437BC5A2EB95325B74A23B54B23B7
+        4A1AAF39FF00FFFF00FFFF00FFFF00FFBBBBBBC5C5C5C6C6C6C5C5C5C3C3C3C0
+        C0C0BBBBBBB8B8B8B5B5B5B4B4B4B4B4B4B0B0B0FF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      }
+      Layout = blGlyphRight
+      NumGlyphs = 2
+      OnClick = btn_NextClick
+      TabOrder = 2
+    end
+    object btn_Back: TBitBtn
+      Left = 324
+      Height = 25
+      Top = 5
+      Width = 75
+      Anchors = [akTop, akRight]
+      Caption = 'Back'
+      Enabled = False
+      Glyph.Data = {
+        36060000424D3606000000000000360000002800000020000000100000000100
+        18000000000000060000130B0000130B00000000000000000000FF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        0B7C15097A14087110056A0C04670B04670C04670C04670C04670C04670C0467
+        0C045709FF00FFFF00FFFF00FFFF00FF9D9D9D9C9C9C99999996969695959595
+        9595959595959595959595959595959595919191FF00FFFF00FFFF00FF129A28
+        1AB03A15AF3211AB270DA81F08A61808A51608A51608A61708A61708A51708AB
+        18078D12045708FF00FFFF00FFA8A8A8B1B1B1AEAEAEADADADAAAAAAA9A9A9A8
+        A8A8A8A8A8A9A9A9A9A9A9A8A8A8A9A9A9A1A1A1919191FF00FFFF00FF1BAD3C
+        25C5541EC0451ABE3A15BD3110BA270BB81D09B81909B81A09B81A09B71A09BE
+        1C08AB1704670CFF00FFFF00FFB0B0B0B9B9B9B6B6B6B4B4B4B2B2B2B1B1B1AE
+        AEAEADADADADADADADADADADADADAFAFAFA9A9A9959595FF00FFFF00FF20B445
+        31C46429BF5322BB481BBA3D17B73312B4290DB3200AB21909B11809B01809B7
+        1A08A61704680CFF00FFFF00FFB3B3B3BCBCBCB9B9B9B5B5B5B3B3B3B1B1B1AF
+        AFAFADADADADADADACACACABABABADADADA9A9A9969696FF00FFFF00FF22B548
+        3FC87635C3672BBF5723BC4E1DBA42FEFEFE13B72E0EB4240AB31CFEFEFE09B8
+        1A08A61704670CFF00FFFF00FFB4B4B4C1C1C1BDBDBDB9B9B9B6B6B6B4B4B4FE
+        FEFEB1B1B1AEAEAEADADADFEFEFEADADADA9A9A9959595FF00FFFF00FF21B548
+        58D08A46C97A34C5692CBF5DFEFEFEFEFEFE1ABA3D16B733FEFEFEFEFEFE09B7
+        1A08A61604670CFF00FFFF00FFB4B4B4CBCBCBC3C3C3BDBDBDB9B9B9FEFEFEFE
+        FEFEB3B3B3B1B1B1FEFEFEFEFEFEADADADA9A9A9959595FF00FFFF00FF21B548
+        77D89F52CC813BC772FEFEFEFEFEFE26BE5421BD4AFEFEFEFEFEFE13B52D0DBA
+        230AA71804680BFF00FFFF00FFB4B4B4D5D5D5C8C8C8C0C0C0FEFEFEFEFEFEB8
+        B8B8B6B6B6FEFEFEFEFEFEB0B0B0AFAFAFA9A9A9969696FF00FFFF00FF21B548
+        8ADEAC5DD08AFEFEFEFEFEFE2FC3682CC162FEFEFEFEFEFE1EBB4418B93A14BB
+        310EA922066F0EFF00FFFF00FFB4B4B4DDDDDDCCCCCCFEFEFEFEFEFEBCBCBCBA
+        BABAFEFEFEFEFEFEB4B4B4B2B2B2B1B1B1ABABAB989898FF00FFFF00FF21B548
+        95E0B365D28F48CA7AFEFEFEFEFEFE30C3692EC265FEFEFEFEFEFE1FBB461BBE
+        3E14AE2F0A7A14FF00FFFF00FFB4B4B4E0E0E0CECECEC5C5C5FEFEFEFEFEFEBC
+        BCBCBBBBBBFEFEFEFEFEFEB5B5B5B4B4B4AEAEAE9D9D9DFF00FFFF00FF21B548
+        9DE3B96FD59757CE854ECC7FFEFEFEFEFEFE35C56D30C368FEFEFEFEFEFE23C0
+        4E1BB23C0D851AFF00FFFF00FFB4B4B4E3E3E3D2D2D2C9C9C9C7C7C7FEFEFEFE
+        FEFEBDBDBDBCBCBCFEFEFEFEFEFEB7B7B7B1B1B1A1A1A1FF00FFFF00FF21B548
+        A9E6C280DAA35ED08A59CF874DCC7EFEFEFE43C87739C57032C36BFEFEFE2AC2
+        5D20B548108F1FFF00FFFF00FFB4B4B4E7E7E7D9D9D9CDCDCDCBCBCBC6C6C6FE
+        FEFEC2C2C2BFBFBFBCBCBCFEFEFEBABABAB3B3B3A4A4A4FF00FFFF00FF21B549
+        AEE8C5A6E5BF91DFAF86DBA778D79D67D39159CF8744C97836C56E32C36C30C5
+        6A27BB57139C26FF00FFFF00FFB4B4B4E9E9E9E6E6E6DFDFDFDADADAD5D5D5D0
+        D0D0CBCBCBC3C3C3BDBDBDBCBCBCBCBCBCB7B7B7A9A9A9FF00FFFF00FF22B548
+        92E0B3AEE8C6B1E9C8A9E6C29BE3B887DDAA6AD5964FCD823BC77436C57034C8
+        732BBF5E14A428FF00FFFF00FFB4B4B4E0E0E0E9E9E9EBEBEBE7E7E7E3E3E3DC
+        DCDCD1D1D1C7C7C7C0C0C0BDBDBDBEBEBEB9B9B9ABABABFF00FFFF00FFFF00FF
+        38BB5A51C57053C57151C56F4CC36B42C06437BC5A2EB95325B74A23B54B23B7
+        4A1AAF39FF00FFFF00FFFF00FFFF00FFBCBCBCC5C5C5C6C6C6C5C5C5C3C3C3C0
+        C0C0BCBCBCB8B8B8B5B5B5B4B4B4B5B5B5B0B0B0FF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      }
+      NumGlyphs = 2
+      OnClick = btn_BackClick
+      TabOrder = 3
+    end
+  end
+end
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWWizard.lrs b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWWizard.lrs
new file mode 100644
index 0000000..1300661
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWWizard.lrs
@@ -0,0 +1,337 @@
+{ This is an automatically generated lazarus resource file }
+
+LazarusResources.Add('TEWWizardForm','FORMDATA',[
+  'TPF0'#13'TEWWizardForm'#12'EWWizardForm'#4'Left'#3'X'#1#6'Height'#3'6'#1#3'T'
+  +'op'#3#238#0#5'Width'#3#228#1#18'HorzScrollBar.Page'#3#227#1#18'VertScrollBa'
+  +'r.Page'#3'5'#1#13'ActiveControl'#7#8'pc_Pages'#11'BorderStyle'#7#8'bsDialog'
+  +#7'Caption'#6#13'New Wizard...'#12'ClientHeight'#3'6'#1#11'ClientWidth'#3#228
+  +#1#11'Font.Height'#2#245#9'Font.Name'#6#6'Tahoma'#8'OnCreate'#7#10'FormCreat'
+  +'e'#9'OnDestroy'#7#11'FormDestroy'#8'Position'#7#14'poScreenCenter'#10'LCLVe'
+  +'rsion'#6#6'0.9.25'#0#6'TBevel'#6'Bevel1'#6'Height'#2#2#3'Top'#2'*'#5'Width'
+  +#3#228#1#5'Align'#7#5'alTop'#5'Shape'#7#12'bsBottomLine'#0#0#6'TPanel'#6'Pan'
+  +'el1'#6'Height'#2'*'#5'Width'#3#228#1#5'Align'#7#5'alTop'#10'BevelOuter'#7#6
+  +'bvNone'#12'ClientHeight'#2'*'#11'ClientWidth'#3#228#1#5'Color'#7#7'clWhite'
+  +#11'ParentColor'#8#8'TabOrder'#2#0#0#6'TImage'#6'Image1'#4'Left'#2#5#6'Heigh'
+  +'t'#2' '#3'Top'#2#5#5'Width'#2' '#8'AutoSize'#9#11'Transparent'#8#0#0#6'TLab'
+  +'el'#6'Label1'#4'Left'#2'+'#6'Height'#2#14#3'Top'#2#5#5'Width'#2'p'#7'Captio'
+  +'n'#6#17'RemObjects Wizard'#11'Font.Height'#2#245#9'Font.Name'#6#6'Tahoma'#10
+  +'Font.Style'#11#6'fsBold'#0#11'ParentColor'#8#0#0#6'TLabel'#6'Label2'#4'Left'
+  +#2'-'#6'Height'#2#16#3'Top'#2#21#5'Width'#2'7'#7'Caption'#6#11'Bla Bla Bla'
+  +#11'ParentColor'#8#0#0#0#12'TPageControl'#8'pc_Pages'#6'Height'#3#231#0#3'To'
+  +'p'#2','#5'Width'#3#228#1#10'ActivePage'#7#10'ts_Welcome'#5'Align'#7#8'alCli'
+  +'ent'#8'TabIndex'#2#0#8'TabOrder'#2#1#0#9'TTabSheet'#10'ts_Welcome'#7'Captio'
+  +'n'#6#7'Welcome'#12'ClientHeight'#3#205#0#11'ClientWidth'#3#220#1#0#6'TLabel'
+  +#6'Label3'#4'Left'#2#8#6'Height'#2#14#3'Top'#2#8#5'Width'#3#202#0#7'Caption'
+  +#6'!Welcome to the New Project Wizard'#11'Font.Height'#2#245#9'Font.Name'#6#6
+  +'Tahoma'#10'Font.Style'#11#6'fsBold'#0#11'ParentColor'#8#0#0#6'TLabel'#6'Lab'
+  +'el4'#4'Left'#2#24#6'Height'#2#16#3'Top'#2#24#5'Width'#2'$'#7'Caption'#6#7'B'
+  +'la Bla'#11'ParentColor'#8#0#0#0#9'TTabSheet'#9'ts_Finish'#7'Caption'#6#6'Fi'
+  +'nish'#12'ClientHeight'#3#205#0#11'ClientWidth'#3#220#1#10'ImageIndex'#2#2#0
+  +#6'TLabel'#6'Label5'#4'Left'#2#8#6'Height'#2#14#3'Top'#2#8#5'Width'#2'!'#7'C'
+  +'aption'#6#5'Done!'#11'Font.Height'#2#245#9'Font.Name'#6#6'Tahoma'#10'Font.S'
+  +'tyle'#11#6'fsBold'#0#11'ParentColor'#8#0#0#6'TLabel'#6'Label6'#4'Left'#2#24
+  +#6'Height'#2#16#3'Top'#2#24#5'Width'#3#189#1#7'Caption'#6'RThe Wizard is now'
+  +' ready to create your <whatever> with the options selected below:'#11'Paren'
+  +'tColor'#8#0#0#9'TListView'#10'lv_Options'#4'Left'#2#24#6'Height'#3#161#0#3
+  +'Top'#2'('#5'Width'#3#189#1#5'Color'#7#9'clBtnFace'#7'Columns'#14#1#7'Captio'
+  +'n'#6#6'Option'#5'Width'#2#25#0#1#7'Caption'#6#5'Value'#5'Width'#2#25#0#0#11
+  +'ColumnClick'#8#8'ReadOnly'#9#9'RowSelect'#9#8'TabOrder'#2#0#9'ViewStyle'#7#8
+  +'vsReport'#0#0#0#0#6'TPanel'#6'Panel2'#6'Height'#2'#'#3'Top'#3#19#1#5'Width'
+  +#3#228#1#5'Align'#7#8'alBottom'#10'BevelOuter'#7#6'bvNone'#12'ClientHeight'#2
+  +'#'#11'ClientWidth'#3#228#1#8'TabOrder'#2#2#0#7'TBitBtn'#10'btn_Finish'#4'Le'
+  +'ft'#3#148#1#6'Height'#2#25#4'Hint'#6#31'This is Finish, but not the End'#3
+  +'Top'#2#5#5'Width'#2'K'#7'Anchors'#11#5'akTop'#7'akRight'#0#7'Caption'#6#6'F'
+  +'inish'#10'Glyph.Data'#10':'#6#0#0'6'#6#0#0'BM6'#6#0#0#0#0#0#0'6'#0#0#0'('#0
+  +#0#0' '#0#0#0#16#0#0#0#1#0#24#0#0#0#0#0#0#6#0#0'"'#11#0#0'"'#11#0#0#0#0#0#0#0
+  +#0#0#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#129#30#0#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255'xxx'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#129#30#0#129#30#0#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'xxxxxx'#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#129#30#0#129#30
+  +#0#129#30#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'xxxxxxxxx'
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#129#30#0#149
+  +'D'#15#129#30#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'xxx'
+  +#137#137#137'xxx'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#129#30#0#167'c/'#129#30#0#129#30#0#255#0#255#255#0#255#255#0#255#255#0
+  ,#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255'xxx'#159#159#159'xxxxxx'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#129#30#0#191#139'b'#204#161'~'#129#30#0#129#30#0#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255'xxx'#184#184#184#198#198#198'xxxxxx'#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#129#30#0#216#182#156#230#209#191#231#211#196#129#30
+  +#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255'xxx'#209#209#209#224#224#224#226#226#226
+  +'xxx'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#129#30#0#240#226#217#252
+  +#247#242#250#240#230#129#30#0#129#30#0#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'xxx'#235#235
+  +#235#245#245#245#241#241#241'xxxxxx'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#129#30#0#216#175
+  +#150#244#226#207#240#215#189#216#167#132#129#30#0#129#30#0#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'x'
+  +'xx'#208#208#208#233#233#233#227#227#227#202#202#202'xxxxxx'#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#129#30#0#243
+  +#222#202#239#212#184#235#201#167#218#166'}'#129#30#0#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +'xxx'#231#231#231#225#225#225#219#219#219#201#201#201'xxx'#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#129#30#0#231#187#146#227#176#129#224#166'r'#213#146'Z'
+  +#129#30#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255'xxx'#211#211#211#205#205#205#198#198#198
+  +#188#188#188'xxx'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#129#30#0#218#153'^'#215
+  +#143'P'#211#132'A'#207'{5'#129#30#0#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'xxx'#191#191#191
+  +#184#184#184#178#178#178#172#172#172'xxx'#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#129#30#0#129#30#0#129#30#0#129#30#0#129#30#0#129#30#0#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255'xxxxxxxxxxxxxxxxxx'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#11
+  +'ModalResult'#2#1#9'NumGlyphs'#2#2#8'TabOrder'#2#0#7'Visible'#8#0#0#7'TBitBt'
+  +'n'#10'btn_Cancel'#4'Left'#2#5#6'Height'#2#25#3'Top'#2#5#5'Width'#2'K'#6'Can'
+  +'cel'#9#7'Caption'#6#6'Cancel'#10'Glyph.Data'#10':'#6#0#0'6'#6#0#0'BM6'#6#0#0
+  +#0#0#0#0'6'#0#0#0'('#0#0#0' '#0#0#0#16#0#0#0#1#0#24#0#0#0#0#0#0#6#0#0#196#14
+  +#0#0#196#14#0#0#0#0#0#0#0#0#0#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#0#0#154#0#0#154#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#0#0#154#0#0#154#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255'kkkkkk'#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255'kkkkkk'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0
+  +#0#154#23'J'#253#16';'#244#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255#0
+  +#0#154#0','#248#0'0'#252#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255'kkk'
+  +#168#168#168#160#160#160'kkk'#255#0#255#255#0#255#255#0#255#255#0#255'kkk'
+  ,#154#154#154#156#156#156'kkk'#255#0#255#255#0#255#255#0#255#255#0#255#0#0#154
+  +#26'G'#248#26'L'#255#18';'#241#0#0#154#255#0#255#255#0#255#0#0#154#1'-'#246#1
+  +'2'#255#0'*'#243#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255'kkk'#167#167
+  +#167#170#170#170#159#159#159'kkk'#255#0#255#255#0#255'kkk'#153#153#153#158
+  +#158#158#151#151#151'kkk'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0
+  +#0#154#28'G'#246#27'M'#255#20'>'#244#0#0#154#0#0#154#0'-'#248#1'4'#255#3'+'
+  +#242#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'kkk'
+  +#167#167#167#171#171#171#162#162#162'kkkkkk'#154#154#154#158#158#158#152#152
+  +#152'kkk'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#0#0#154#29'H'#246#29'P'#255#16'='#251#4'1'#254#1'2'#255#0','#246#0#0#154
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255'kkk'#167#167#167#172#172#172#163#163#163#159#159#159#158#158#158#153#153
+  +#153'kkk'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#0#0#154#26'H'#249#19'B'#255#12'<'#255#7'3'#246#0#0
+  +#154#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255'kkk'#167#167#167#167#167#167#163#163#163#156
+  +#156#156'kkk'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#0#0#154'!N'#252#29'K'#255#24'G'#255#23
+  +'C'#246#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255'kkk'#172#172#172#172#172#172#169#169
+  +#169#164#164#164'kkk'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#0#0#154'.['#249',_'#255'"M'#248' K'#248'#'
+  +'U'#255#27'F'#246#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255'kkk'#177#177#177#179#179#179#171#171#171#170
+  +#170#170#175#175#175#166#166#166'kkk'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#0#0#154'6d'#250'8k'#255'-Y'#244#0#0#154#0#0
+  +#154'"L'#244'%X'#255#29'I'#246#0#0#154#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255'kkk'#182#182#182#185#185#185#174#174#174'kkkkkk'#169
+  +#169#169#176#176#176#167#167#167'kkk'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#0#0#154'@q'#250'Bt'#255'2]'#241#0#0#154#255#0#255#255#0#255#0#0
+  +#154'"M'#241'''Z'#255' L'#248#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255
+  +'kkk'#187#187#187#190#190#190#175#175#175'kkk'#255#0#255#255#0#255'kkk'#167
+  +#167#167#177#177#177#170#170#170'kkk'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#0#0#154'Iz'#252';f'#243#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255#0#0
+  +#154'%P'#244'&U'#250#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255'kkk'#192
+  +#192#192#181#181#181'kkk'#255#0#255#255#0#255#255#0#255#255#0#255'kkk'#170
+  +#170#170#174#174#174'kkk'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0
+  +#0#154#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0
+  +#0#154#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'k'
+  +'kkkkk'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'kkkkkk'
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#11'Mo'
+  +'dalResult'#2#2#9'NumGlyphs'#2#2#8'TabOrder'#2#1#0#0#7'TBitBtn'#8'btn_Next'#4
+  +'Left'#3#148#1#6'Height'#2#25#3'Top'#2#5#5'Width'#2'K'#7'Anchors'#11#5'akTop'
+  +#7'akRight'#0#7'Caption'#6#5'&Next'#7'Default'#9#10'Glyph.Data'#10':'#6#0#0
+  +'6'#6#0#0'BM6'#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0' '#0#0#0#16#0#0#0#1#0#24#0#0#0
+  +#0#0#0#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#11'|'#21#9'z'#20#8'q'#16#5'j'#12#4'g'#11#4'g'#12#4'g'#12#4'g'
+  +#12#4'g'#12#4'g'#12#4'g'#12#4'W'#9#255#0#255#255#0#255#255#0#255#255#0#255
+  +#156#156#156#156#156#156#152#152#152#150#150#150#149#149#149#149#149#149#149
+  +#149#149#149#149#149#149#149#149#149#149#149#149#149#149#144#144#144#255#0
+  +#255#255#0#255#255#0#255#18#154'('#26#176':'#21#175'2'#17#171''''#13#168#31#8
+  +#166#24#8#165#22#8#165#22#8#166#23#8#166#23#8#165#23#8#171#24#7#141#18#4'W'#8
+  ,#255#0#255#255#0#255#168#168#168#176#176#176#174#174#174#172#172#172#170#170
+  +#170#168#168#168#168#168#168#168#168#168#168#168#168#168#168#168#168#168#168
+  +#169#169#169#160#160#160#144#144#144#255#0#255#255#0#255#27#173'<%'#197'T'#30
+  +#192'E'#26#190':'#21#189'1'#16#186''''#11#184#29#9#184#25#9#184#26#9#184#26#9
+  +#183#26#9#190#28#8#171#23#4'g'#12#255#0#255#255#0#255#176#176#176#185#185#185
+  +#181#181#181#180#180#180#178#178#178#176#176#176#173#173#173#173#173#173#173
+  +#173#173#173#173#173#173#173#173#175#175#175#169#169#169#149#149#149#255#0
+  +#255#255#0#255' '#180'E1'#196'd)'#191'S"'#187'H'#27#186'='#23#183'3'#18#180
+  +')'#13#179' '#10#178#25#9#177#24#9#176#24#9#183#26#8#166#23#4'h'#12#255#0#255
+  +#255#0#255#179#179#179#188#188#188#184#184#184#181#181#181#179#179#179#177
+  +#177#177#175#175#175#173#173#173#172#172#172#172#172#172#171#171#171#173#173
+  +#173#168#168#168#149#149#149#255#0#255#255#0#255'"'#181'H?'#200'v5'#195'g'
+  +#254#254#254'#'#188'N'#29#186'B'#24#184'8'#254#254#254#14#180'$'#10#179#28#9
+  +#177#24#9#184#26#8#166#23#4'g'#12#255#0#255#255#0#255#179#179#179#192#192#192
+  +#188#188#188#254#254#254#181#181#181#179#179#179#177#177#177#254#254#254#173
+  +#173#173#172#172#172#172#172#172#173#173#173#168#168#168#149#149#149#255#0
+  +#255#255#0#255'!'#181'HX'#208#138'F'#201'z'#254#254#254#254#254#254'$'#189'P'
+  +#31#187'F'#254#254#254#254#254#254#16#180')'#12#178#31#9#183#26#8#166#22#4'g'
+  +#12#255#0#255#255#0#255#179#179#179#202#202#202#195#195#195#254#254#254#254
+  +#254#254#182#182#182#180#180#180#254#254#254#254#254#254#174#174#174#172#172
+  +#172#173#173#173#168#168#168#149#149#149#255#0#255#255#0#255'!'#181'Hw'#216
+  +#159'R'#204#129';'#199'r'#254#254#254#254#254#254'&'#190'T!'#189'J'#254#254
+  +#254#254#254#254#19#181'-'#13#186'#'#10#167#24#4'h'#11#255#0#255#255#0#255
+  +#179#179#179#213#213#213#200#200#200#192#192#192#254#254#254#254#254#254#183
+  +#183#183#181#181#181#254#254#254#254#254#254#176#176#176#175#175#175#168#168
+  +#168#149#149#149#255#0#255#255#0#255'!'#181'H'#138#222#172']'#208#138'B'#200
+  +'v7'#197'n'#254#254#254#254#254#254''''#191'X"'#189'O'#254#254#254#254#254
+  +#254#20#187'1'#14#169'"'#6'o'#14#255#0#255#255#0#255#179#179#179#220#220#220
+  +#204#204#204#194#194#194#190#190#190#254#254#254#254#254#254#184#184#184#181
+  +#181#181#254#254#254#254#254#254#177#177#177#170#170#170#152#152#152#255#0
+  +#255#255#0#255'!'#181'H'#149#224#179'e'#210#143'H'#202'z'#254#254#254#254#254
+  +#254'0'#195'i.'#194'e'#254#254#254#254#254#254#31#187'F'#27#190'>'#20#174'/'
+  +#10'z'#20#255#0#255#255#0#255#179#179#179#224#224#224#206#206#206#196#196#196
+  +#254#254#254#254#254#254#187#187#187#187#187#187#254#254#254#254#254#254#180
+  +#180#180#180#180#180#173#173#173#156#156#156#255#0#255#255#0#255'!'#181'H'
+  +#157#227#185'o'#213#151#254#254#254#254#254#254'@'#200't9'#197'p'#254#254#254
+  +#254#254#254'+'#193'`'''#191'U#'#192'N'#27#178'<'#13#133#26#255#0#255#255#0
+  +#255#179#179#179#227#227#227#210#210#210#254#254#254#254#254#254#193#193#193
+  +#191#191#191#254#254#254#254#254#254#185#185#185#184#184#184#183#183#183#176
+  +#176#176#160#160#160#255#0#255#255#0#255'!'#181'H'#169#230#194#128#218#163
+  +#254#254#254'Y'#207#135'M'#204'~D'#201'x'#254#254#254'9'#197'p2'#195'k-'#193
+  +'c*'#194'] '#181'H'#16#143#31#255#0#255#255#0#255#179#179#179#231#231#231#216
+  +#216#216#254#254#254#202#202#202#198#198#198#194#194#194#254#254#254#191#191
+  +#191#188#188#188#186#186#186#185#185#185#179#179#179#164#164#164#255#0#255
+  +#255#0#255'!'#181'I'#174#232#197#166#229#191#145#223#175#134#219#167'x'#215
+  +#157'g'#211#145'Y'#207#135'D'#201'x6'#197'n2'#195'l0'#197'j'''#187'W'#19#156
+  +'&'#255#0#255#255#0#255#179#179#179#233#233#233#230#230#230#223#223#223#218
+  +#218#218#213#213#213#208#208#208#202#202#202#194#194#194#189#189#189#188#188
+  +#188#188#188#188#183#183#183#168#168#168#255#0#255#255#0#255'"'#181'H'#146
+  +#224#179#174#232#198#177#233#200#169#230#194#155#227#184#135#221#170'j'#213
+  +#150'O'#205#130';'#199't6'#197'p4'#200's+'#191'^'#20#164'('#255#0#255#255#0
+  +#255#179#179#179#223#223#223#233#233#233#234#234#234#231#231#231#226#226#226
+  +#219#219#219#208#208#208#199#199#199#192#192#192#189#189#189#190#190#190#185
+  +#185#185#171#171#171#255#0#255#255#0#255#255#0#255'8'#187'ZQ'#197'pS'#197'qQ'
+  +#197'oL'#195'kB'#192'd7'#188'Z.'#185'S%'#183'J#'#181'K#'#183'J'#26#175'9'#255
+  +#0#255#255#0#255#255#0#255#255#0#255#187#187#187#197#197#197#198#198#198#197
+  +#197#197#195#195#195#192#192#192#187#187#187#184#184#184#181#181#181#180#180
+  +#180#180#180#180#176#176#176#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#6'Lay'
+  +'out'#7#12'blGlyphRight'#9'NumGlyphs'#2#2#7'OnClick'#7#13'btn_NextClick'#8'T'
+  +'abOrder'#2#2#0#0#7'TBitBtn'#8'btn_Back'#4'Left'#3'D'#1#6'Height'#2#25#3'Top'
+  ,#2#5#5'Width'#2'K'#7'Anchors'#11#5'akTop'#7'akRight'#0#7'Caption'#6#4'Back'#7
+  +'Enabled'#8#10'Glyph.Data'#10':'#6#0#0'6'#6#0#0'BM6'#6#0#0#0#0#0#0'6'#0#0#0
+  +'('#0#0#0' '#0#0#0#16#0#0#0#1#0#24#0#0#0#0#0#0#6#0#0#19#11#0#0#19#11#0#0#0#0
+  +#0#0#0#0#0#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#11'|'#21#9'z'#20#8'q'#16#5
+  +'j'#12#4'g'#11#4'g'#12#4'g'#12#4'g'#12#4'g'#12#4'g'#12#4'g'#12#4'W'#9#255#0
+  +#255#255#0#255#255#0#255#255#0#255#157#157#157#156#156#156#153#153#153#150
+  +#150#150#149#149#149#149#149#149#149#149#149#149#149#149#149#149#149#149#149
+  +#149#149#149#149#145#145#145#255#0#255#255#0#255#255#0#255#18#154'('#26#176
+  +':'#21#175'2'#17#171''''#13#168#31#8#166#24#8#165#22#8#165#22#8#166#23#8#166
+  +#23#8#165#23#8#171#24#7#141#18#4'W'#8#255#0#255#255#0#255#168#168#168#177#177
+  +#177#174#174#174#173#173#173#170#170#170#169#169#169#168#168#168#168#168#168
+  +#169#169#169#169#169#169#168#168#168#169#169#169#161#161#161#145#145#145#255
+  +#0#255#255#0#255#27#173'<%'#197'T'#30#192'E'#26#190':'#21#189'1'#16#186''''
+  +#11#184#29#9#184#25#9#184#26#9#184#26#9#183#26#9#190#28#8#171#23#4'g'#12#255
+  +#0#255#255#0#255#176#176#176#185#185#185#182#182#182#180#180#180#178#178#178
+  +#177#177#177#174#174#174#173#173#173#173#173#173#173#173#173#173#173#173#175
+  +#175#175#169#169#169#149#149#149#255#0#255#255#0#255' '#180'E1'#196'd)'#191
+  +'S"'#187'H'#27#186'='#23#183'3'#18#180')'#13#179' '#10#178#25#9#177#24#9#176
+  +#24#9#183#26#8#166#23#4'h'#12#255#0#255#255#0#255#179#179#179#188#188#188#185
+  +#185#185#181#181#181#179#179#179#177#177#177#175#175#175#173#173#173#173#173
+  +#173#172#172#172#171#171#171#173#173#173#169#169#169#150#150#150#255#0#255
+  +#255#0#255'"'#181'H?'#200'v5'#195'g+'#191'W#'#188'N'#29#186'B'#254#254#254#19
+  +#183'.'#14#180'$'#10#179#28#254#254#254#9#184#26#8#166#23#4'g'#12#255#0#255
+  +#255#0#255#180#180#180#193#193#193#189#189#189#185#185#185#182#182#182#180
+  +#180#180#254#254#254#177#177#177#174#174#174#173#173#173#254#254#254#173#173
+  +#173#169#169#169#149#149#149#255#0#255#255#0#255'!'#181'HX'#208#138'F'#201'z'
+  +'4'#197'i,'#191']'#254#254#254#254#254#254#26#186'='#22#183'3'#254#254#254
+  +#254#254#254#9#183#26#8#166#22#4'g'#12#255#0#255#255#0#255#180#180#180#203
+  +#203#203#195#195#195#189#189#189#185#185#185#254#254#254#254#254#254#179#179
+  +#179#177#177#177#254#254#254#254#254#254#173#173#173#169#169#169#149#149#149
+  +#255#0#255#255#0#255'!'#181'Hw'#216#159'R'#204#129';'#199'r'#254#254#254#254
+  +#254#254'&'#190'T!'#189'J'#254#254#254#254#254#254#19#181'-'#13#186'#'#10#167
+  +#24#4'h'#11#255#0#255#255#0#255#180#180#180#213#213#213#200#200#200#192#192
+  +#192#254#254#254#254#254#254#184#184#184#182#182#182#254#254#254#254#254#254
+  +#176#176#176#175#175#175#169#169#169#150#150#150#255#0#255#255#0#255'!'#181
+  +'H'#138#222#172']'#208#138#254#254#254#254#254#254'/'#195'h,'#193'b'#254#254
+  +#254#254#254#254#30#187'D'#24#185':'#20#187'1'#14#169'"'#6'o'#14#255#0#255
+  +#255#0#255#180#180#180#221#221#221#204#204#204#254#254#254#254#254#254#188
+  +#188#188#186#186#186#254#254#254#254#254#254#180#180#180#178#178#178#177#177
+  +#177#171#171#171#152#152#152#255#0#255#255#0#255'!'#181'H'#149#224#179'e'#210
+  +#143'H'#202'z'#254#254#254#254#254#254'0'#195'i.'#194'e'#254#254#254#254#254
+  +#254#31#187'F'#27#190'>'#20#174'/'#10'z'#20#255#0#255#255#0#255#180#180#180
+  +#224#224#224#206#206#206#197#197#197#254#254#254#254#254#254#188#188#188#187
+  +#187#187#254#254#254#254#254#254#181#181#181#180#180#180#174#174#174#157#157
+  +#157#255#0#255#255#0#255'!'#181'H'#157#227#185'o'#213#151'W'#206#133'N'#204
+  +''#254#254#254#254#254#254'5'#197'm0'#195'h'#254#254#254#254#254#254'#'#192
+  +'N'#27#178'<'#13#133#26#255#0#255#255#0#255#180#180#180#227#227#227#210#210
+  +#210#201#201#201#199#199#199#254#254#254#254#254#254#189#189#189#188#188#188
+  +#254#254#254#254#254#254#183#183#183#177#177#177#161#161#161#255#0#255#255#0
+  +#255'!'#181'H'#169#230#194#128#218#163'^'#208#138'Y'#207#135'M'#204'~'#254
+  +#254#254'C'#200'w9'#197'p2'#195'k'#254#254#254'*'#194'] '#181'H'#16#143#31
+  +#255#0#255#255#0#255#180#180#180#231#231#231#217#217#217#205#205#205#203#203
+  +#203#198#198#198#254#254#254#194#194#194#191#191#191#188#188#188#254#254#254
+  +#186#186#186#179#179#179#164#164#164#255#0#255#255#0#255'!'#181'I'#174#232
+  +#197#166#229#191#145#223#175#134#219#167'x'#215#157'g'#211#145'Y'#207#135'D'
+  +#201'x6'#197'n2'#195'l0'#197'j'''#187'W'#19#156'&'#255#0#255#255#0#255#180
+  +#180#180#233#233#233#230#230#230#223#223#223#218#218#218#213#213#213#208#208
+  +#208#203#203#203#195#195#195#189#189#189#188#188#188#188#188#188#183#183#183
+  +#169#169#169#255#0#255#255#0#255'"'#181'H'#146#224#179#174#232#198#177#233
+  +#200#169#230#194#155#227#184#135#221#170'j'#213#150'O'#205#130';'#199't6'#197
+  ,'p4'#200's+'#191'^'#20#164'('#255#0#255#255#0#255#180#180#180#224#224#224#233
+  +#233#233#235#235#235#231#231#231#227#227#227#220#220#220#209#209#209#199#199
+  +#199#192#192#192#189#189#189#190#190#190#185#185#185#171#171#171#255#0#255
+  +#255#0#255#255#0#255'8'#187'ZQ'#197'pS'#197'qQ'#197'oL'#195'kB'#192'd7'#188
+  +'Z.'#185'S%'#183'J#'#181'K#'#183'J'#26#175'9'#255#0#255#255#0#255#255#0#255
+  +#255#0#255#188#188#188#197#197#197#198#198#198#197#197#197#195#195#195#192
+  +#192#192#188#188#188#184#184#184#181#181#181#180#180#180#181#181#181#176#176
+  +#176#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#9'NumGlyphs'#2#2#7'OnClick'#7#13
+  +'btn_BackClick'#8'TabOrder'#2#3#0#0#0#0
+]);
diff --git a/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWWizard.pas b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWWizard.pas
new file mode 100644
index 0000000..28d5587
--- /dev/null
+++ b/internal/5.0.35.741/1/Everwood/Source/Delphi/uEWWizard.pas
@@ -0,0 +1,259 @@
+unit uEWWizard;
+
+{----------------------------------------------------------------------------}
+{ RemObjects' Hydra - IDE Library                                            }
+{                                                                            }
+{ compiler: Delphi 6 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of Hydra                          }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I Everwood.inc}
+
+interface
+
+uses
+  {$IFDEF FPC}LCLIntf, LResources,{$ENDIF}
+  SysUtils, Classes, Graphics, Controls, Forms,
+  Dialogs, StdCtrls, Buttons, ExtCtrls, ComCtrls;
+
+type
+  TEWWizardForm = class(TForm)
+    Panel1: TPanel;
+    Image1: TImage;
+    Label1: TLabel;
+    Label2: TLabel;
+    Bevel1: TBevel;
+    pc_Pages: TPageControl;
+    ts_Welcome: TTabSheet;
+    ts_Finish: TTabSheet;
+    Panel2: TPanel;
+    btn_Finish: TBitBtn;
+    btn_Cancel: TBitBtn;
+    Label3: TLabel;
+    Label4: TLabel;
+    btn_Next: TBitBtn;
+    btn_Back: TBitBtn;
+    Label5: TLabel;
+    Label6: TLabel;
+    lv_Options: TListView;
+    procedure btn_NextClick(Sender: TObject);
+    procedure FormCreate(Sender: TObject);
+    procedure btn_BackClick(Sender: TObject);
+    procedure FormDestroy(Sender: TObject);
+  private
+    fInEnterPage: boolean;
+    fActiveControl: TWinControl;
+    fValues: TStrings;
+    fNextPage: integer;
+    fPreviousPage: integer;
+    function GetActiveControl: TWinControl;
+    procedure SetActiveControl(const Value: TWinControl);
+    function GetNextPage: integer;
+    function GetPreviousPage: integer;
+  protected
+    procedure OnEnterPage(aPage:TTabSheet; aMovingForward:boolean); virtual;
+    procedure OnLeavePage(aPage:TTabSheet; aMovingForward:boolean); virtual;
+    procedure AfterEnterPage(aPage:TTabSheet; aMovingForward:boolean); virtual;
+
+    function CleanPascalString(const aString: string): string;
+  public
+    property Values:TStrings read fValues;
+    function Execute:boolean; overload;
+    class function Execute(aOwner: TComponent): boolean; overload;
+    property ActiveControl: TWinControl read GetActiveControl write SetActiveControl;
+    property NextPage: integer read GetNextPage write fNextPage;
+    property PreviousPage: integer read GetPreviousPage write fPreviousPage;
+  end;
+
+implementation
+
+// uses  FileCtrl;
+{$IFNDEF FPC}
+{$R *.dfm}
+{$ENDIF FPC}
+
+{ THYNewProjectWizardForm }
+
+procedure TEWWizardForm.FormCreate(Sender: TObject);
+var
+  i: integer;
+begin
+  for i := 0 to ComponentCount-1 do begin
+    if Components[i] is TTabSheet then TTabSheet(Components[i]).TabVisible := false;
+  end;
+
+  fValues := TStringList.Create();
+
+  Height := Height-16;
+  pc_Pages.ActivePageIndex := 0;
+  OnEnterPage(pc_Pages.Pages[0],true);
+
+  fNextPage := -1;
+  fPreviousPage := -1;
+end;
+
+procedure TEWWizardForm.FormDestroy(Sender: TObject);
+begin
+  FreeAndNil(fValues);
+end;
+
+function TEWWizardForm.CleanPascalString(const aString:string):string;
+begin
+  result := aString;
+  result := StringReplace(result,'''','''''',[rfReplaceAll]); { replace quotes with double quotes }
+  result := StringReplace(result,#13#10,'''#13#10''',[rfReplaceAll]);
+  result := ''''+result+'''';
+end;
+
+
+procedure TEWWizardForm.btn_NextClick(Sender: TObject);
+begin
+  if pc_Pages.ActivePageIndex+1 < pc_Pages.PageCount then begin
+    fInEnterPage := true;
+    try
+      OnLeavePage(pc_Pages.Pages[pc_Pages.ActivePageIndex],true);
+      OnEnterPage(pc_Pages.Pages[NextPage],true);
+    finally
+      fInEnterPage := false;
+    end;
+    fPreviousPage := pc_Pages.ActivePageIndex;
+    pc_Pages.ActivePageIndex := NextPage;
+    if Assigned(fActiveControl) then begin
+      inherited ActiveControl := fActiveControl;
+      fActiveControl := nil;
+    end;
+  end;
+  fNextPage := -1;
+  AfterEnterPage(pc_Pages.ActivePage, true);
+end;
+
+procedure TEWWizardForm.btn_BackClick(Sender: TObject);
+begin
+  if pc_Pages.ActivePageIndex > 0 then begin
+    fInEnterPage := true;
+    try
+      OnLeavePage(pc_Pages.Pages[pc_Pages.ActivePageIndex],false);
+      OnEnterPage(pc_Pages.Pages[PreviousPage],false);
+    finally
+      fInEnterPage := false;
+    end;
+    pc_Pages.ActivePageIndex := PreviousPage;
+    if Assigned(fActiveControl) then begin
+      inherited ActiveControl := fActiveControl;
+      fActiveControl := nil;
+    end;
+  end;
+  fNextPage := -1;
+  fPreviousPage := -1;
+  AfterEnterPage(pc_Pages.ActivePage, false);
+end;
+
+
+procedure TEWWizardForm.OnEnterPage(aPage: TTabSheet; aMovingForward: boolean);
+var
+  i: integer;
+begin
+  {$IFDEF FPC}
+  if aMovingForward then btn_Finish.Visible := false else // for prevent warnings
+  {$ENDIF}
+  btn_Finish.Visible := false;
+  btn_Next.Visible := true;
+  if aPage = ts_Welcome then begin
+    btn_Back.Enabled := false;
+    btn_Next.Enabled := true;
+    ActiveControl := btn_Next;
+  end
+  else if aPage = ts_Finish then begin
+    {$IFNDEF FPC}
+    lv_Options.Items.BeginUpdate();
+    {$ENDIF}
+    try
+      lv_Options.Items.Clear();
+      for i := 0 to Values.Count-1 do begin
+        with lv_Options.Items.Add() do begin
+          Caption := Values.Names[i];
+          SubItems.Add(Values.Values[Values.Names[i]]);
+        end;
+      end; { for }
+      btn_Finish.Visible := true;
+      btn_Finish.Enabled := true;
+      btn_Next.Visible := false;
+      ActiveControl := btn_Finish;
+    finally
+      {$IFNDEF FPC}
+      lv_Options.Items.EndUpdate();
+      {$ENDIF}
+    end;
+  end
+  else { default for custom added pages } begin
+    btn_Back.Enabled := true;
+    btn_Next.Enabled := true;
+  end;
+end;
+
+procedure TEWWizardForm.OnLeavePage(aPage: TTabSheet; aMovingForward: boolean);
+begin
+end;
+
+function TEWWizardForm.Execute: boolean;
+begin
+  result := (ShowModal() = 1); // idOk=1
+end;
+
+class function TEWWizardForm.Execute(aOwner: TComponent): boolean;
+begin
+  with self.Create(aOwner) do try
+    result := Execute();
+  finally
+    Free();
+  end;
+end;
+
+function TEWWizardForm.GetActiveControl: TWinControl;
+begin
+  if Assigned(fActiveControl) then
+    result := fActiveControl
+  else
+    result := inherited ActiveControl;
+end;
+
+procedure TEWWizardForm.SetActiveControl(const Value: TWinControl);
+begin
+  if fInEnterPage then begin
+    fActiveControl := Value;
+  end
+  else begin
+    inherited ActiveControl := Value;
+    fActiveControl := nil;
+  end;
+end;
+
+function TEWWizardForm.GetNextPage: integer;
+begin
+  Result := fNextPage;
+  if result = -1 then result := pc_Pages.ActivePageIndex+1;
+end;
+
+function TEWWizardForm.GetPreviousPage: integer;
+begin
+  Result := fPreviousPage;
+  if result = -1 then result := pc_Pages.ActivePageIndex-1;
+end;
+
+procedure TEWWizardForm.AfterEnterPage(aPage: TTabSheet;
+  aMovingForward: boolean);
+begin
+
+end;
+
+{$IFDEF FPC}
+initialization
+  {$i uEWWizard.lrs}
+{$ENDIF}
+end.
+
diff --git a/internal/5.0.35.741/1/Everwood/Welcome/Data Abstract/Welcome.png b/internal/5.0.35.741/1/Everwood/Welcome/Data Abstract/Welcome.png
new file mode 100644
index 0000000..249fb6f
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Welcome/Data Abstract/Welcome.png differ
diff --git a/internal/5.0.35.741/1/Everwood/Welcome/Hydra/Welcome.png b/internal/5.0.35.741/1/Everwood/Welcome/Hydra/Welcome.png
new file mode 100644
index 0000000..e763228
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Welcome/Hydra/Welcome.png differ
diff --git a/internal/5.0.35.741/1/Everwood/Welcome/RemObjects SDK/Welcome.png b/internal/5.0.35.741/1/Everwood/Welcome/RemObjects SDK/Welcome.png
new file mode 100644
index 0000000..bfcac33
Binary files /dev/null and b/internal/5.0.35.741/1/Everwood/Welcome/RemObjects SDK/Welcome.png differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Bin/PSUnitImporter.exe b/internal/5.0.35.741/1/Pascal Script for Delphi/Bin/PSUnitImporter.exe
new file mode 100644
index 0000000..f45f31d
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Bin/PSUnitImporter.exe differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Changes.txt b/internal/5.0.35.741/1/Pascal Script for Delphi/Changes.txt
new file mode 100644
index 0000000..386b89d
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Changes.txt	
@@ -0,0 +1,187 @@
+==========
+ 3.0.3.57
+==========
+
+- NEW Support for Borland Developer Studio 2006
+
+==========
+ 3.0.3.53
+==========
+- Updated RemObjects SDk integration for Indy 10 / RO .349
+
+==========
+ 3.0.3.51
+==========
+- Support for Delphi 2005
+- Allow overriding internal procs.
+- Add importdecl to old style AddFunction ImportDecl.
+- New compiletime support functions
+- getconst/getconstcount
+- allow interface to be registered more than once and in any order 
+- widestring published properties support.
+- Fix. Var parameter types weren't always checked.
+- fixes for CHAR consts.
+- Eliminate "Comparing signed and unsigned types" warnings (on D5) (jr)
+
+
+==========
+ 3.0.3.39
+==========
+- strtoint now throws an exception for invalid numbers.
+- Compiler fix: Check var parameters.
+- Docs update
+- Fixes in the import tool
+- Added a few new functions to make it earlier to add variable pointers to the script.
+- Added a few new samples
+- New Help system
+
+==========
+ 3.0.3.37
+==========
+
+- Classes and units renamed 
+- product integrated into RemObjects Software product line
+
+==========
+ 3.0.1.33 (17 January 2004)
+==========
+- IDispatch Support now uses Variant for dynamic invocation
+- Smaller tweaks related to IDispatch
+
+==========
+ 3.0.1.32 (16 January 2004)
+==========
+- IDispatch type support
+- Dynamic Invoke using IDispatch
+- Removed Export mode, no need to set it anymore
+- RunProcP, RunProcPN functions, invoke IFPS3 functions with with 1 command
+- TIFPS3CompExec.ExecuteFunction wrapper for RunProcPN
+- Small Fix
+- Included missing .dpk
+
+==========
+ 3.0.1.31 (16 December 2003)
+==========
+- Fixes release
+
+==========
+ 3.0.1.30 (25 November 2003)
+==========
+- Better Interface support
+- Lot's of fixes and improvements
+- Records and other complex types passing to events
+- Adding regular variables to the script
+- PreProcessing
+
+==========
+ 3.0.1.21 (28 August 2003)
+==========
+- Speed Improvements
+- Default array properties
+- A few D5/BCC5 compatiblity changes
+- Help files update
+- SET properties
+- A few other fixes
+- Static arrays
+- With
+- Sets
+- Calling Interfaces (IUnknown etc)
+- AS/IS support (classes)
+- fixes
+- Speed Improvements
+- A small fix.
+
+==========
+ 3.0.1.20 beta 5 (31 July 2003)
+==========
+- Fix in codegen with some expressions
+- All Get* and Add* Method of the exec are now uppercasing their params
+- Removed AddExportVariable, now all variables are "exported"
+- Added an VGetAsString function that returns the string value of any variant.
+- Default array properties.
+
+==========
+ 3.0.1.20 beta 4 (26 July 2003)
+==========
+This release doesn't contain any new features, only fixes.
+
+==========
+ 3.0.1.20 beta 3 (05 May 2003)
+==========
+Changes since last beta:
+- A few D5/BCC5 compatiblity changes
+- Help files update
+- SET properties
+- A few other fixes
+
+==========
+ 3.0.1.20 beta 2 (02 April 2003)
+==========
+What's new: - Static arrays
+- With
+- Sets
+- Calling Interfaces (IUnknown etc)
+- AS/IS support (classes)
+- Assigned fixed
+- IFPS3 raises an exception when one of the Add* functions fail or when a scripted Event fails
+- A lot of fixes
+
+==========
+ 3.0.1.04 stable (09 March 2003)
+==========
+- A few fixes
+
+==========
+ 3.0.1.03 stable (14 January 2003)
+==========
+- New datetime library
+- Besides Open Array now also Dynamic Array (D4+) support
+- A few fixes
+
+==========
+ 3.0.1.02.1 stable (07 November 2002)
+==========
+- WideString/WideChar support
+- Some small fixes
+
+==========
+ 3.0.1.02 stable (26 August 2002)
+==========
+- Compiler speed improvements.
+- Couple of small changes.
+
+==========
+ 3.0.1.01.1 (08 July 2002)
+==========
+- Additions/Changes: Variant and Int64 support in calling library
+- Forward procedures
+- Automaticly adding published properties
+- Try/Finally/Except/End support
+- Open Array parameters in calling library
+- Component Wrapper
+
+==========
+ 3.0.1.01 (20 June 2002)
+==========
+- Added a lot of new imported classes
+- Added support for casting
+- Some fixes and changes
+
+==========
+ 3.0.1.00.3 stable (07 June 2002)
+==========
+- Kylix Demo
+- Dll Library updated for Kylix
+- Variant type
+- array constants
+- Procedural Variables
+- Nil
+- Events
+- Some fixes
+
+==========
+ 3.0.1.00.2 (15 May 2002)
+==========
+- Record support for class calling library.
+- Couple of new support functions.
+- Couple of fixes. 
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D10/PascalScript_Core_D10.bpl b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D10/PascalScript_Core_D10.bpl
new file mode 100644
index 0000000..cef5650
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D10/PascalScript_Core_D10.bpl differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D10/PascalScript_Core_D10.dcp b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D10/PascalScript_Core_D10.dcp
new file mode 100644
index 0000000..ca251e0
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D10/PascalScript_Core_D10.dcp differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D10/PascalScript_RO_D10.bpl b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D10/PascalScript_RO_D10.bpl
new file mode 100644
index 0000000..29ea1d1
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D10/PascalScript_RO_D10.bpl differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D10/PascalScript_RO_D10.dcp b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D10/PascalScript_RO_D10.dcp
new file mode 100644
index 0000000..6ddb9ab
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D10/PascalScript_RO_D10.dcp differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D11/PascalScript_Core_D11.bpl b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D11/PascalScript_Core_D11.bpl
new file mode 100644
index 0000000..744447b
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D11/PascalScript_Core_D11.bpl differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D11/PascalScript_Core_D11.dcp b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D11/PascalScript_Core_D11.dcp
new file mode 100644
index 0000000..82a2203
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D11/PascalScript_Core_D11.dcp differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D11/PascalScript_RO_D11.bpl b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D11/PascalScript_RO_D11.bpl
new file mode 100644
index 0000000..c0f36bf
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D11/PascalScript_RO_D11.bpl differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D11/PascalScript_RO_D11.dcp b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D11/PascalScript_RO_D11.dcp
new file mode 100644
index 0000000..d07949b
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D11/PascalScript_RO_D11.dcp differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/PascalScript_Core_D12.bpl b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/PascalScript_Core_D12.bpl
new file mode 100644
index 0000000..953503e
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/PascalScript_Core_D12.bpl differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/PascalScript_Core_D12.dcp b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/PascalScript_Core_D12.dcp
new file mode 100644
index 0000000..e11ba1d
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/PascalScript_Core_D12.dcp differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/PascalScript_Core_D12.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/PascalScript_Core_D12.dcu
new file mode 100644
index 0000000..21e42bd
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/PascalScript_Core_D12.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/PascalScript_Core_Reg.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/PascalScript_Core_Reg.dcu
new file mode 100644
index 0000000..956af84
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/PascalScript_Core_Reg.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/PascalScript_RO_D12.bpl b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/PascalScript_RO_D12.bpl
new file mode 100644
index 0000000..4327a28
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/PascalScript_RO_D12.bpl differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/PascalScript_RO_D12.dcp b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/PascalScript_RO_D12.dcp
new file mode 100644
index 0000000..74be7d0
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/PascalScript_RO_D12.dcp differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_DB.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_DB.dcu
new file mode 100644
index 0000000..272e516
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_DB.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_buttons.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_buttons.dcu
new file mode 100644
index 0000000..69e2eef
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_buttons.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_classes.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_classes.dcu
new file mode 100644
index 0000000..8e1a088
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_classes.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_comobj.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_comobj.dcu
new file mode 100644
index 0000000..0add626
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_comobj.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_controls.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_controls.dcu
new file mode 100644
index 0000000..99ddb52
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_controls.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_dateutils.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_dateutils.dcu
new file mode 100644
index 0000000..395dce6
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_dateutils.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_dll.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_dll.dcu
new file mode 100644
index 0000000..9a82432
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_dll.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_extctrls.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_extctrls.dcu
new file mode 100644
index 0000000..3b7dae9
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_extctrls.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_forms.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_forms.dcu
new file mode 100644
index 0000000..d94d1b2
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_forms.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_graphics.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_graphics.dcu
new file mode 100644
index 0000000..aa4c846
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_graphics.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_menus.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_menus.dcu
new file mode 100644
index 0000000..2830b29
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_menus.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_std.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_std.dcu
new file mode 100644
index 0000000..508b7f6
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_std.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_stdctrls.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_stdctrls.dcu
new file mode 100644
index 0000000..08c1d72
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSC_stdctrls.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSCompiler.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSCompiler.dcu
new file mode 100644
index 0000000..23036b5
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSCompiler.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSComponent.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSComponent.dcu
new file mode 100644
index 0000000..7b25fe6
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSComponent.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSComponent_COM.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSComponent_COM.dcu
new file mode 100644
index 0000000..12e8b6d
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSComponent_COM.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSComponent_Controls.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSComponent_Controls.dcu
new file mode 100644
index 0000000..a5509d5
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSComponent_Controls.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSComponent_DB.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSComponent_DB.dcu
new file mode 100644
index 0000000..254d46e
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSComponent_DB.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSComponent_Default.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSComponent_Default.dcu
new file mode 100644
index 0000000..f34cb2d
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSComponent_Default.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSComponent_Forms.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSComponent_Forms.dcu
new file mode 100644
index 0000000..f30c3be
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSComponent_Forms.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSComponent_StdCtrls.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSComponent_StdCtrls.dcu
new file mode 100644
index 0000000..2bf9895
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSComponent_StdCtrls.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSDebugger.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSDebugger.dcu
new file mode 100644
index 0000000..9190bd3
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSDebugger.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSDisassembly.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSDisassembly.dcu
new file mode 100644
index 0000000..8311a8e
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSDisassembly.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSPreProcessor.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSPreProcessor.dcu
new file mode 100644
index 0000000..02ef2da
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSPreProcessor.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_DB.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_DB.dcu
new file mode 100644
index 0000000..0dd1142
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_DB.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_buttons.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_buttons.dcu
new file mode 100644
index 0000000..fe62d8a
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_buttons.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_classes.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_classes.dcu
new file mode 100644
index 0000000..d7cc0a7
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_classes.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_comobj.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_comobj.dcu
new file mode 100644
index 0000000..0cfcadd
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_comobj.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_controls.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_controls.dcu
new file mode 100644
index 0000000..35850f4
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_controls.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_dateutils.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_dateutils.dcu
new file mode 100644
index 0000000..390824c
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_dateutils.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_dll.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_dll.dcu
new file mode 100644
index 0000000..413308c
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_dll.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_extctrls.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_extctrls.dcu
new file mode 100644
index 0000000..20e2b9a
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_extctrls.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_forms.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_forms.dcu
new file mode 100644
index 0000000..a4bfe02
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_forms.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_graphics.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_graphics.dcu
new file mode 100644
index 0000000..6271069
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_graphics.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_menus.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_menus.dcu
new file mode 100644
index 0000000..7850957
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_menus.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_std.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_std.dcu
new file mode 100644
index 0000000..4ed135f
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_std.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_stdctrls.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_stdctrls.dcu
new file mode 100644
index 0000000..961f8c1
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSR_stdctrls.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSRuntime.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSRuntime.dcu
new file mode 100644
index 0000000..6cf415c
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSRuntime.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSUtils.dcu b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSUtils.dcu
new file mode 100644
index 0000000..7a786a4
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D12/uPSUtils.dcu differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D6/PascalScript_Core_D6.bpl b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D6/PascalScript_Core_D6.bpl
new file mode 100644
index 0000000..bf1032b
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D6/PascalScript_Core_D6.bpl differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D6/PascalScript_Core_D6.dcp b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D6/PascalScript_Core_D6.dcp
new file mode 100644
index 0000000..7c9914d
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D6/PascalScript_Core_D6.dcp differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D7/PascalScript_Core_D7.bpl b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D7/PascalScript_Core_D7.bpl
new file mode 100644
index 0000000..a6d4abf
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D7/PascalScript_Core_D7.bpl differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D7/PascalScript_Core_D7.dcp b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D7/PascalScript_Core_D7.dcp
new file mode 100644
index 0000000..56314a4
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D7/PascalScript_Core_D7.dcp differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D7/PascalScript_RO_D7.bpl b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D7/PascalScript_RO_D7.bpl
new file mode 100644
index 0000000..6f1a986
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D7/PascalScript_RO_D7.bpl differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D7/PascalScript_RO_D7.dcp b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D7/PascalScript_RO_D7.dcp
new file mode 100644
index 0000000..3b11bf1
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Dcu/D7/PascalScript_RO_D7.dcp differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Help/RegisterDelphiHelp.exe b/internal/5.0.35.741/1/Pascal Script for Delphi/Help/RegisterDelphiHelp.exe
new file mode 100644
index 0000000..9536667
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Help/RegisterDelphiHelp.exe differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Launch.exe b/internal/5.0.35.741/1/Pascal Script for Delphi/Launch.exe
new file mode 100644
index 0000000..4b346d2
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Launch.exe differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/License.txt b/internal/5.0.35.741/1/Pascal Script for Delphi/License.txt
new file mode 100644
index 0000000..0c68c76
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/License.txt	
@@ -0,0 +1,86 @@
+*** REMOBJECTS SOFTWARE END USER LICENSE AGREEMENT ***
+
+Updated May 1, 2008
+
+IMPORTANT: PLEASE READ THIS DOCUMENT CAREFULLY AND IN ITS ENTIRETY BEFORE USING ANY SOFTWARE PRODUCT ACQUIRED FROM REMOBJECTS SOFTWARE.
+
+This document constitutes a LEGAL AGREEMENT between you, the End User (either an individual or an entity), and RemObjects Software, LLC.
+
+
+1. SCOPE
+
+This End User License Agreement ("EULA") covers all SOFTWARE PRODUCTS produced and sold by RemObjects Software, LLC. The sections of this EULA that contain information that pertain specifically to a certain product are properly marked as such.
+
+SOFTWARE PRODUCTS covered this EULA:
+
+* RemObjects AnyDAC
+* RemObjects Oxygene
+* RemObjects Data Abstract 
+* RemObjects DebugServer
+* RemObjects Developer Studio
+* RemObjects Everwood
+* RemObjects Floss
+* RemObjects Internet Pack 
+* RemObjects Hydra
+* RemObjects Pascal Script
+* RemObjects SDK 
+
+
+2. DEFINITIONS
+
+SOFTWARE PRODUCTS: refers to one or more product as made available as a unified installation package.
+
+(LIBRARY) SOURCE CODE: refers to the source code shipped with any of the SOFTWARE PRODUCTS licensed to you, the End User, in the “Source” folder of the product installation. 
+
+TOOLS: refers to ANY of the applications deployed with the SOFTWARE PRODUCTS in executable form, whether as auxiliary helper programs of a Library product or as main product. This includes but is not limited to any .EXE files and IDE integration.
+
+SAMPLE CODE: sample code is provided to you as part of the SOFTWARE PRODUCT license inside the “Samples” folder
+
+EXECUTABLE FORMAT refers to executable files such as .EXE and .DLL files build from your own source code, linking in code provided as part of the LIBRARY SOURCE CODE. It does not encompass Delphi .DCU or .BPL/.DCP files or any other format that would allow a third party to the provided file as a replacement for the LIBRARY SOURCE CODE
+
+
+3. COPYRIGHT
+
+This SOFTWARE PRODUCT is owned by RemObjects Software, LLC and is protected by copyright laws and international copyright treaties. 
+
+All copyrights of this SOFTWARE PRODUCT, including but not limited to any source code, tools, documentation, images, text, and samples incorporated into the SOFTWARE PRODUCT, as well as those provided via Support Services or any of the RemObjects websites, are proprietary products of RemObjects Software, LLC and are protected by copyright law. You acquire only the right to use the SOFTWARE PRODUCT and do not acquire any rights of ownership. You acknowledge that the SOFTWARE PRODUCT and its source code remains a confidential trade secret of RemObjects Software, LLC. RemObjects Software, LLC may have trademarks, copyrights, patents or other intellectual property rights covering the SOFTWARE PRODUCT. You are not granted any license to these patents, trademarks, copyrights, or other intellectual property rights except as expressly provided herein. RemObjects Software, LLC reserves all rights not expressly granted.
+
+All names and logos of the SOFTWARE PRODUCTS defined in the SCOPE section of this EULA are trademarks or registered trademarks of RemObjects Software, LLC. These names and logos may only be used by the End User when referring to RemObjects Software, LLC or any of its products. These names and logos may not be used by the End User for branding or marketing purposes, without written consent from RemObjects Software, LLC.
+
+
+2.  GRANT OF LICENSE
+
+BY INSTALLING, COPYING, OR OTHERWISE USING THE SOFTWARE PRODUCT, YOU AGREE TO BE BOUND BY ALL OF THE TERMS AND CONDITIONS OF THIS END USER LICENSE AGREEMENT. IF YOU DO NOT AGREE TO THE TERMS OF THIS AGREEMENT, YOU ARE NOT PERMITTED TO INSTALL, COPY, OR USE THE SOFTWARE PRODUCT. IF YOU REJECT THE TERMS OF THIS AGREEMENT WITHIN THIRTY (30) DAYS AFTER PURCHASING THE SOFTWARE PRODUCT, YOU MAY SEND AN EMAIL TO sales@remobjects.com AND REQUEST A FULL REFUND OF THE PURCHASE PRICE.  IN ORDER TO RECEIVE THE REFUND, YOU MUST IRREVOCABLY UNINSTALL AND/OR DELETE ANY AND ALL COPIES OF THE SOFTWARE PRODUCT(S) YOU HAVE PURCHASED, AND PROVIDE CERTIFICATION OF SUCH TO REMOBJECTS.
+You may make one copy of the SOFTWARE PRODUCT solely for backup or archival purposes or transfer the SOFTWARE PRODUCT to a single hard disk provided you keep the original solely for backup or archival purposes. 
+
+You may install the software on up to five computers, providing you are the only person using the software on these computers.
+
+You may not alter any of the programs or accompanying files without written permission from RemObjects Software, LLC. Any resale or commercial distribution of the SOFTWARE PRODUCT is strictly prohibited, unless RemObjects Software, LLC has given explicit written permission.
+
+You are not obtaining title to the SOFTWARE PRODUCT or any copyrights. You may not sublicense, rent, lease, convey, modify, translate, convert to another programming language, decompile, or disassemble the SOFTWARE PRODUCT for any purpose. RemObjects Software, LLC grants you as an individual, a personal, non exclusive license to install and use the SOFTWARE PRODUCT for the sole purpose of developing systems that are not in competition with the SOFTWARE PRODUCT, or any other products developed and sold by RemObjects Software, LLC. 
+
+If you are an entity, RemObjects Software, LLC grants you the right to designate one individual within your organization to have the right to use the SOFTWARE PRODUCT in the manner described above.
+The named License you acquired is not transferrable to another individual or entity, unless you are given written permission by RemObjects Software, LLC.
+
+You may link against the LIBRARY SOURCE CODE and deploy it in EXECUTABLE FORMAT as part of your application; you may make changes to the LIBRARY SOURCE CODE and write extensions for your own use, and link against and deploy your changes in EXECUTABLE FORMAT. You may NOT deploy RemObjects Software’s source code to anyone.
+SAMPLE CODE for provided for your convenience and you may use it at your discretion. You may create your own products starting from the samples provided and consider this derived work as your own. You may also deploy such derived work in any way you see fit, including in source code form.
+
+Unless specifically stated on a per-tool basis, you may not deploy the TOOLS included with the SOFTWARE PRODUCT to anyone, neither standalone or as part of your own application; the tools are intended solely for use by yourself.
+In general, you may not distribute any part of the installed product, nor any license codes, license files or your website login to third parties. 
+
+
+3. SUPPORT SERVICES
+
+RemObjects Software, LLC may provide the End User with Support Services related to the SOFTWARE PRODUCT. Support Services include free downloading of upgrades as covered by the original purchase, as well as technical support offered via NNTP-based newsgroups, e-mail or telephone. Use of Support Services is governed by RemObjects Software policies and programs described on the RemObjects website (www.remobjects.com/support) and may be subject to additional support charges depending on the type and level of support provided. Any supplemental software code provided to you as part of the Support Services shall be considered part of the SOFTWARE PRODUCT and is subject to the terms and conditions of this EULA.
+
+
+4. TERMINATION
+
+This License shall remain in effect only for so long as you are in compliance with the terms and conditions of this EULA. This License will terminate if you fail to comply with any of its terms or conditions. You may terminate it at any time by destroying your copies of the SOFTWARE PRODUCT. You agree, upon termination, to destroy all copies of the Product. Without prejudice to any other rights, RemObjects Software, LLC may terminate this EULA if you fail to comply with the terms. The provisions of this EULA that protect the proprietary rights of RemObjects Software, LLC and the LIMITATIONS OF WARRANTIES will continue to be in force even after any termination. Upon termination, RemObjects Software, LLC may also enforce any rights provided by law.
+
+
+5. LIMITATIONS OF WARRANTIES AND LIABILITY
+
+THIS SOFTWARE PRODUCT IS PROVIDED TO YOU "AS IS" WITHOUT WARRANTIES OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE APPLIED WARRANTIES OF MERCHANTABILITY AND/OR FITNESS FOR A PARTICULAR PURPOSE. YOU ASSUME THE ENTIRE RISK AS TO THE ACCURACY AND THE USE OF THE SOFTWARE PRODUCT AND ALL OTHER RISK ARISING FROMTHE USE OR PERFORMANCE OF THIS SOFTWARE PRODUCT AND DOCUMENTATION. 
+
+RemObjects Software, LLC SHALL NOT BE LIABLE FOR ANY DAMAGES WHATSOEVER ARISING FROM USE OF OR INABILITY TO USE THIS SOFTWARE PRODUCT, EVEN IF RemObjects Software, LLC HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. TO THE MAXIMUM EXTENT PERMITTED BY APPLICABLE LAW, IN NO EVENT SHALL RemObjects Software, LLC BE LIABLE FOR ANY CONSEQUENTIAL, INCIDENTAL, DIRECT, INDIRECT, SPECIAL, PUNITIVE, OR OTHER DAMAGES WHATSOEVER, INCLUDING BUT NOT LIMITED TO DAMAGES OR LOSS OF BUSINESS PROFITS, BUSINESS INTERRUPTION, LOSS OF BUSINESS INFORMATION, OR OTHER PECUNIARY LOSS, EVEN IF RemObjects Software, LLC HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES. BECAUSE SOME STATES/JURISDICTIONS DO NOT ALLOW THE EXCLUSION OR LIMITATION OF LIABILITY FOR CONSEQUENTIAL OR INCIDENTAL DAMAGES, THE ABOVE LIMITATION MAY NOT APPLY.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Pascal Script.ico b/internal/5.0.35.741/1/Pascal Script for Delphi/Pascal Script.ico
new file mode 100644
index 0000000..26e084f
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Pascal Script.ico differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/README.html b/internal/5.0.35.741/1/Pascal Script for Delphi/README.html
new file mode 100644
index 0000000..68821f9
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/README.html	
@@ -0,0 +1,58 @@
+<style>
+body, table, tr, td
+{
+margin: 15px;
+font-family: Tahoma, Verdana, sans-serif;
+font-size: 10pt;
+background-color: #f7f7f7;
+}
+p { margin-bottom: 0.75em; margin-top: 0; }
+p.h1, p.h2, p.h3
+{
+margin-top: 1em;
+margin-bottom: 0;
+padding-bottom: 0;
+}
+a { text-decoration: none }
+.h1 { font-size: 13pt; font-weight: bold; }
+.h2 { font-size: 11pt; font-weight: bold; }
+.h3 { font-size: 10pt; font-weight: bold; }
+ul { margin-top: 5px; margin-bottom: 3px; }
+pre { margin: 0 }
+.spaced
+{
+letter-spacing: 1px;
+color: #000060;
+}
+</style>
+
+<img src="ps.png" align="right" />
+<p class="h1">Welcome to the RemObjects Pascal Script&trade; 3.0</p>
+
+<p class="h2">Support</p>
+
+<p>Support for RemObjects Pascal Script is available via our newsgroups at 
+<a href="news://news.remobjects.com/remobjects.public.pascalscript">remobjects.public.pascalscript</a>.</p> 
+
+<p>You can use these newsgroups to report any problems or suggestions you might have in regards to PS, you can communicate with fellow Pascal Script users, and exchange ideas and solutions.</p>
+
+<p>
+  Updates, additional sample projects and additional third-party contributions for Pascal Script will be available on our website at <a href="http://www.remobjects.com/ps">www.remobjects.com/ps</a>.
+</p>
+
+<p class="h2">Where to go from here</p>
+<p>
+  To get started using the Pascal Script, please visit our extensive article library available at 
+  <a href="http://devcenter.remobjects.com/articles">http://www.remobjects.com/articles</a>.
+</p>
+
+
+<hr width="25%" align="left" style="color: black; height: 1px;"/>
+
+<p>Thank you very much,
+<br />
+Your RemObjects Team
+<br />
+<a href="http://www.remobjects.com">http://www.remobjects.com</a></p>
+
+
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Console/sample1.dpr b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Console/sample1.dpr
new file mode 100644
index 0000000..dfc5f21
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Console/sample1.dpr	
@@ -0,0 +1,59 @@
+program sample1;
+
+uses
+  uPSCompiler, uPSRuntime;
+
+function ScriptOnUses(Sender: TPSPascalCompiler; const Name: string): Boolean;
+{ the OnUses callback function is called for each "uses" in the script.
+  It's always called with the parameter 'SYSTEM' at the top of the script. 
+  For example: uses ii1, ii2;   
+  This will call this function 3 times. First with 'SYSTEM' then 'II1' and then 'II2'.
+}
+begin
+  if Name = 'SYSTEM' then
+  begin
+    Result := True;
+  end else
+    Result := False;
+end;
+
+procedure ExecuteScript(const Script: string);
+var
+  Compiler: TPSPascalCompiler;
+  { TPSPascalCompiler is the compiler part of the script engine. This will
+    translate a Pascal script into compiled data for the executer. }
+  Exec: TPSExec;
+   { TPSExec is the executer part of the script engine. It uses the output of
+    the compiler to run a script. }
+  Data: string;
+begin
+  Compiler := TPSPascalCompiler.Create;      // create an instance of the compiler.
+  Compiler.OnUses := ScriptOnUses;           // assign the OnUses event.
+  if not Compiler.Compile(Script) then begin // Compile the Pascal script into bytecode.
+    Compiler.Free;
+     // You could raise an exception here.
+    Exit;
+  end;
+
+  Compiler.GetOutput(Data); // Save the output of the compiler in the string Data.
+  Compiler.Free;            // After compiling the script, there is no further need for the compiler.
+
+  Exec := TPSExec.Create;                // Create an instance of the executer.
+  if not Exec.LoadData(Data) then begin  // Load the data from the Data string.
+    { For some reason, the script could not be loaded. This is usually the case when a
+      library that has been used at compile time isn't registered at runtime. }
+    Exec.Free;
+     // You could raise an exception here.
+    Exit;
+  end;
+
+  Exec.RunScript; // Run the script.
+  Exec.Free;      // Free the executer.
+end;
+
+const
+  Script = 'var s: string; begin s := ''Test''; S := s + ''ing;''; end.';
+
+begin
+  ExecuteScript(Script);
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Console/sample2.dpr b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Console/sample2.dpr
new file mode 100644
index 0000000..c85f5df
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Console/sample2.dpr	
@@ -0,0 +1,80 @@
+program sample2;
+
+uses
+  uPSCompiler,
+  uPSRuntime,
+
+  Dialogs
+
+  ;
+
+procedure MyOwnFunction(const Data: string);
+begin
+  // Do something with Data
+  ShowMessage(Data);
+end;
+
+function ScriptOnUses(Sender: TPSPascalCompiler; const Name: string): Boolean;
+{ the OnUses callback function is called for each "uses" in the script.
+  It's always called with the parameter 'SYSTEM' at the top of the script.
+  For example: uses ii1, ii2;
+  This will call this function 3 times. First with 'SYSTEM' then 'II1' and then 'II2'.
+}
+begin
+  if Name = 'SYSTEM' then begin
+    Sender.AddDelphiFunction('procedure MyOwnFunction(Data: string)');
+    { This will register the function to the script engine. Now it can be used from
+      within the script.}
+
+    Result := True;
+  end else
+    Result := False;
+end;
+
+procedure ExecuteScript(const Script: string);
+var
+  Compiler: TPSPascalCompiler;
+  { TPSPascalCompiler is the compiler part of the script engine. This will
+    translate a Pascal script into compiled data for the executer. }
+  Exec: TPSExec;
+   { TPSExec is the executer part of the script engine. It uses the output of
+    the compiler to run a script. }
+  Data: string;
+begin
+  Compiler := TPSPascalCompiler.Create;       // create an instance of the compiler.
+  Compiler.OnUses := ScriptOnUses;            // assign the OnUses event.
+  if not Compiler.Compile(Script) then begin  // Compile the Pascal script into bytecode.
+    Compiler.Free;
+     // You could raise an exception here.
+    Exit;
+  end;
+
+  Compiler.GetOutput(Data); // Save the output of the compiler in the string Data.
+  Compiler.Free;            // After compiling the script, there is no further need for the compiler.
+
+  Exec := TPSExec.Create;   // Create an instance of the executer.
+  Exec.RegisterDelphiFunction(@MyOwnFunction, 'MYOWNFUNCTION', cdRegister);
+  { This will register the function to the executer. The first parameter is the executer. The second parameter is a 
+    pointer to the function. The third parameter is the name of the function (in uppercase). And the last parameter is the
+    calling convention (usually Register). }  
+
+  if not  Exec.LoadData(Data) then begin // Load the data from the Data string.
+    { For some reason the script could not be loaded. This is usually the case when a
+      library that has been used at compile time isn't registered at runtime. }
+    Exec.Free;
+     // You could raise an exception here.
+    Exit;
+  end;
+
+  Exec.RunScript; // Run the script.
+  Exec.Free;      // Free the executer.
+end;
+
+
+
+const
+  Script = 'var s: string; begin s := ''Test''; S := s + ''ing;''; MyOwnFunction(s); end.';
+
+begin
+  ExecuteScript(Script);
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Console/sample3.dpr b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Console/sample3.dpr
new file mode 100644
index 0000000..f622656
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Console/sample3.dpr	
@@ -0,0 +1,77 @@
+program sample3;
+
+uses
+  uPSC_dll,
+  uPSR_dll,
+  uPSCompiler,
+  uPSRuntime;
+  
+function ScriptOnUses(Sender: TPSPascalCompiler; const Name: string): Boolean;
+{ the OnUses callback function is called for each "uses" in the script. 
+  It's always called with the parameter 'SYSTEM' at the top of the script. 
+  For example: uses ii1, ii2;   
+  This will call this function 3 times. First with 'SYSTEM' then 'II1' and then 'II2'.
+}
+begin
+  if Name = 'SYSTEM' then begin
+    Sender.OnExternalProc := @DllExternalProc;
+    { Assign the dll library to the script engine. This function can be found in the uPSC_dll.pas file.
+      When you have assigned this, it's possible to do this in the script:
+    
+        Function FindWindow(c1, c2: PChar): Cardinal; external 'FindWindow@user32.dll stdcall';
+        
+        The syntax for the external string is 'functionname@dllname callingconvention'.
+    }
+
+    Result := True;
+  end else
+    Result := False;
+end;
+
+procedure ExecuteScript(const Script: string);
+var
+  Compiler: TPSPascalCompiler;
+  { TPSPascalCompiler is the compiler part of the script engine. This will
+    translate a Pascal script into compiled data for the executer. }
+  Exec: TPSExec;
+   { TPSExec is the executer part of the script engine. It uses the output of
+    the compiler to run a script. }
+  Data: string;
+begin
+  Compiler := TPSPascalCompiler.Create;      // create an instance of the compiler.
+  Compiler.OnUses := ScriptOnUses;           // assign the OnUses event.
+  if not Compiler.Compile(Script) then begin // Compile the Pascal script into bytecode.
+    Compiler.Free;
+     // You could raise an exception here.
+    Exit;
+  end;
+
+  Compiler.GetOutput(Data); // Save the output of the compiler in the string Data.
+  Compiler.Free;            // After compiling the script, there is no further need for the compiler.
+
+  Exec := TPSExec.Create;   // Create an instance of the executer.
+
+  RegisterDLLRuntime(Exec);
+  { Register the DLL runtime library. This can be found in the uPSR_dll.pas file.}
+
+  if not  Exec.LoadData(Data) then begin // Load the data from the Data string.
+    { For some reason the script could not be loaded. This is usually the case when a
+      library that has been used at compile time isn't registered at runtime. }
+    Exec.Free;
+     // You could raise an exception here.
+    Exit;
+  end;
+
+  Exec.RunScript; // Run the script.
+  Exec.Free;      // Free the executer.
+end;
+
+
+const
+  Script =
+    'function MessageBox(hWnd: Longint; lpText, lpCaption: PChar; uType: Longint): Longint; external ''MessageBoxA@user32.dll stdcall'';'#13#10 +
+    'var s: string; begin s := ''Test''; MessageBox(0, s, ''Caption Here!'', 0);end.';
+
+begin
+  ExecuteScript(Script);
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Console/sample4.dpr b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Console/sample4.dpr
new file mode 100644
index 0000000..f66827d
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Console/sample4.dpr	
@@ -0,0 +1,107 @@
+program sample4;
+
+uses
+  uPSCompiler,
+  uPSRuntime,
+  uPSC_std,
+  uPSC_controls,
+  uPSC_stdctrls,
+  uPSC_forms,
+  uPSR_std,
+  uPSR_controls,
+  uPSR_stdctrls,
+  uPSR_forms,
+  forms
+
+  ;
+
+function ScriptOnUses(Sender: TPSPascalCompiler; const Name: string): Boolean;
+{ the OnUses callback function is called for each "uses" in the script. 
+  It's always called with the parameter 'SYSTEM' at the top of the script. 
+  For example: uses ii1, ii2;   
+  This will call this function 3 times. First with 'SYSTEM' then 'II1' and then 'II2'.
+}
+begin
+  if Name = 'SYSTEM' then
+  begin
+    SIRegister_Std(Sender);
+    { This will register the declarations of these classes:
+      TObject, TPersistent, TComponent.
+      This procedure can be found in the uPSC_std.pas unit. }
+
+    SIRegister_Controls(Sender);
+    { This will register the declarations of these classes:
+      TControl, TWinControl, TFont, TStrings, TStringList, TCanvas, TGraphicControl.
+      This procedure can be found in the uPSC_controls.pas unit. }
+
+    SIRegister_Forms(Sender);
+    { This will register: TScrollingWinControl, TCustomForm, TForm and TApplication.
+      This procedure can be found in the uPSC_forms.pas unit. }
+
+    SIRegister_stdctrls(Sender);
+     { This will register: TButtonContol, TButton, TCustomCheckbox, TCheckBox, TCustomEdit, TEdit,
+       TCustomMemo, TMemo, TCustomLabel and TLabel.
+       This procedure can be found in the uPSC_stdctrls.pas unit. }
+
+    Result := True;
+  end else
+    Result := False;
+end;
+
+procedure ExecuteScript(const Script: string);
+var
+  Compiler: TPSPascalCompiler;
+  { TPSPascalCompiler is the compiler part of the script engine. This will
+    translate a Pascal script into compiled data for the executer. }
+  Exec: TPSExec;
+   { TPSExec is the executer part of the scriptengine. It uses the output of
+    the compiler to run a script. }
+  Data: string;
+  CI: TPSRuntimeClassImporter; 
+begin
+  Compiler := TPSPascalCompiler.Create;       // create an instance of the compiler.
+  Compiler.OnUses := ScriptOnUses;            // assign the OnUses event.
+  if not Compiler.Compile(Script) then begin  // Compile the Pascal script into bytecode.
+    Compiler.Free;
+     // You could raise an exception here.
+    Exit;
+  end;
+
+  Compiler.GetOutput(Data); // Save the output of the compiler in the string Data.
+  Compiler.Free;            // After compiling the script, there is no need for the compiler anymore.
+
+  CI := TPSRuntimeClassImporter.Create;
+  { Create an instance of the runtime class importer.}
+  
+  RIRegister_Std(CI);       // uPSR_std.pas unit.
+  RIRegister_stdctrls(CI);  // uPSR_stdctrls.pas unit.
+  RIRegister_Controls(CI);  // uPSR_controls.pas unit.
+  RIRegister_Forms(CI);     // uPSR_forms.pas unit.
+
+  Exec := TPSExec.Create;   // Create an instance of the executer.
+
+  RegisterClassLibraryRuntime(Exec, CI);
+  // Assign the runtime class importer to the executer.
+  
+  if not  Exec.LoadData(Data) then begin // Load the data from the Data string.
+    { For some reason the script could not be loaded. This is usually the case when a
+      library that has been used at compile time isn't registered at runtime. }
+    Exec.Free;
+     // You could raise an exception here.
+    Exit;
+  end;
+
+  Exec.RunScript; // Run the script.
+  Exec.Free;      // Free the executer.
+  CI.Free;        // Free the runtime class importer.
+end;
+
+
+
+const
+  Script =
+    'var f: TForm; i: Longint; begin f := TForm.CreateNew(f,0); f.Show; for i := 0 to 1000000 do; f.Hide; f.free;  end.';
+
+begin
+  ExecuteScript(Script);
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Console/sample5.dpr b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Console/sample5.dpr
new file mode 100644
index 0000000..e9b969f
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Console/sample5.dpr	
@@ -0,0 +1,112 @@
+program sample5;
+
+uses
+  uPSCompiler,
+  uPSRuntime,
+  uPSC_std,
+  uPSC_controls,
+  uPSC_stdctrls,
+  uPSC_forms,
+  uPSR_std,
+  uPSR_controls,
+  uPSR_stdctrls,
+  uPSR_forms,
+  forms
+
+  ;
+
+function ScriptOnUses(Sender: TPSPascalCompiler; const Name: string): Boolean;
+{ the OnUses callback function is called for each "uses" in the script. 
+  It's always called with the parameter 'SYSTEM' at the top of the script.
+  For example: uses ii1, ii2;   
+  This will call this function 3 times. First with 'SYSTEM' then 'II1' and then 'II2'.
+}
+begin
+  if Name = 'SYSTEM' then begin
+    SIRegister_Std(Sender);
+    { This will register the declarations of these classes:
+      TObject, TPersisent.
+      This procedure can be found in the uPSC_std.pas unit. }
+    SIRegister_Controls(Sender);
+    { This will register the declarations of these classes:
+      TControl, TWinControl, TFont, TStrings, TStringList, TGraphicControl.
+      This procedure can be found in the uPSC_controls.pas unit. }
+
+    SIRegister_Forms(Sender);
+    { This will register: TScrollingWinControl, TCustomForm, TForm and TApplication.
+      This procedure can be found in the uPSC_forms.pas unit. }
+
+    SIRegister_stdctrls(Sender);
+     { This will register: TButtonContol, TButton, TCustomCheckbox, TCheckBox, TCustomEdit,
+       TEdit, TCustomMemo, TMemo, TCustomLabel and TLabel.
+       This procedure can be found in the uPSC_stdctrls.pas unit. }
+
+    AddImportedClassVariable(Sender, 'Application', 'TApplication');
+    // Registers the application variable to the script engine.
+
+    Result := True;
+  end else
+    Result := False;
+end;
+
+procedure ExecuteScript(const Script: string);
+var
+  Compiler: TPSPascalCompiler;
+  { TPSPascalCompiler is the compiler part of the script engine. This will
+    translate a Pascal script into compiled data for the executer. }
+  Exec: TPSExec;
+   { TPSExec is the executer part of the script engine. It uses the output of
+    the compiler to run a script. }
+  Data: string;
+  CI: TPSRuntimeClassImporter; 
+begin
+  Compiler := TPSPascalCompiler.Create;      // create an instance of the compiler.
+  Compiler.OnUses := ScriptOnUses;           // assign the OnUses event.
+  if not Compiler.Compile(Script) then begin // Compile the Pascal script into bytecode.
+    Compiler.Free;
+     // You could raise an exception here.
+    Exit;
+  end;
+
+  Compiler.GetOutput(Data); // Save the output of the compiler in the string Data.
+  Compiler.Free;            // After compiling the script, there is no need for the compiler anymore.
+
+  CI := TPSRuntimeClassImporter.Create;
+  { Create an instance of the runtime class importer.}
+  
+  RIRegister_Std(CI);       // uPSR_std.pas unit.
+  RIRegister_Controls(CI);  // uPSR_controls.pas unti.
+  RIRegister_stdctrls(CI);  // uPSR_stdctrls.pas unit.
+  RIRegister_Forms(CI);     // uPSR_forms.pas unit.
+
+  Exec := TPSExec.Create;   // Create an instance of the executer.
+
+  RegisterClassLibraryRuntime(Exec, CI);
+  // Assign the runtime class importer to the executer.
+  
+  if not  Exec.LoadData(Data) then begin // Load the data from the Data string.
+    { For some reason the script could not be loaded. This is usually the case when a
+      library that has been used at compile time isn't registered at runtime. }
+    Exec.Free;
+     // You could raise an exception here.
+    Exit;
+  end;
+
+  SetVariantToClass(Exec.GetVarNo(Exec.GetVar('APPLICATION')), Application);
+   // This will set the script's Application variable to the real Application variable.
+
+  Exec.RunScript; // Run the script.
+  Exec.Free;      // Free the executer.
+  CI.Free;        // Free the runtime class importer. 
+end;
+
+
+
+
+const
+  Script =
+    'var f: TForm; i: Longint; begin f := TForm.CreateNew(f, 0); f.Show; while f.Visible do Application.ProcessMessages; F.free;  end.';
+
+begin
+  ExecuteScript(Script);
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Console/sample6.dpr b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Console/sample6.dpr
new file mode 100644
index 0000000..af5fa9d
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Console/sample6.dpr	
@@ -0,0 +1,130 @@
+program sample6;
+
+uses
+  uPSCompiler,
+  uPSUtils,
+  uPSRuntime,
+
+  Dialogs
+
+  ;
+
+procedure MyOwnFunction(const Data: string);
+begin
+  // Do something with Data
+  ShowMessage(Data);
+end;
+
+function ScriptOnExportCheck(Sender: TPSPascalCompiler; Proc: TPSInternalProcedure; const ProcDecl: string): Boolean;
+{
+  The OnExportCheck callback function is called for each function in the script
+  (also for the main proc, with '!MAIN' as a Proc^.Name). ProcDecl contains the
+  function's result type and parameter types using this format:
+  ProcDecl: ResultType + ' ' + Parameter1 + ' ' + Parameter2 + ' '+Parameter3 + .....
+  Parameter: ParameterType+TypeName
+  ParameterType is @ for a normal parameter and ! for a var parameter.
+  A result type of 0 means no result.
+}
+begin
+  if Proc.Name = 'TEST' then begin // Check if the proc is the Test proc we want.
+    // Check if the proc has the correct params.
+    if not ExportCheck(Sender, Proc, [0, btString], [pmIn]) then begin
+      { Something is wrong, so cause an error at the declaration position of the proc. }
+      Sender.MakeError('', ecTypeMismatch, '');
+      Result := False;
+      Exit;
+    end;
+    Result := True;
+  end else Result := True;
+end;
+
+function ScriptOnUses(Sender: TPSPascalCompiler; const Name: string): Boolean;
+{ the OnUses callback function is called for each "uses" in the script.
+  It's always called with the parameter 'SYSTEM' at the top of the script. 
+  For example: uses ii1, ii2;   
+  This will call this function 3 times. First with 'SYSTEM' then 'II1' and then 'II2'.
+}
+begin
+  if Name = 'SYSTEM' then begin
+    Sender.AddDelphiFunction('procedure MyOwnFunction(Data: string)');
+    { This will register the function to the script engine.
+      Now it can be used from within the script. }
+
+    Result := True;
+  end else
+    Result := False;
+end;
+
+procedure ExecuteScript(const Script: string);
+var
+  Compiler: TPSPascalCompiler;
+  { TPSPascalCompiler is the compiler part of the script engine. This will
+    translate a Pascal script into compiled data for the executer. }
+  Exec: TPSExec;
+   { TPSExec is the executer part of the script engine. It uses the output of
+    the compiler to run a script. }
+  Data: string;
+
+  N: PIfVariant;      // the variant in which we are going to store the parameter
+  ParamList: TIfList; // the parameter list
+begin
+  Compiler := TPSPascalCompiler.Create; // create an instance of the compiler.
+  Compiler.OnUses := ScriptOnUses;      // assign the OnUses event.
+
+  Compiler.OnExportCheck := ScriptOnExportCheck; // Assign the onExportCheck event.
+
+  if not Compiler.Compile(Script) then begin // Compile the Pascal script into bytecode.
+    Compiler.Free;
+     // You could raise an exception here.
+    Exit;
+  end;
+
+  Compiler.GetOutput(Data); // Save the output of the compiler in the string Data.
+  Compiler.Free;            // After compiling the script, there is no further need for the compiler.
+
+  Exec := TPSExec.Create;   // Create an instance of the executer.
+
+  Exec.RegisterDelphiFunction(@MyOwnFunction, 'MYOWNFUNCTION', cdRegister);
+  { This will register the function to the executer. The first parameter is the executer.
+    The second parameter is a pointer to the function.
+    The third parameter is the name of the function (in uppercase).
+    The last parameter is the calling convention (usually Register). }
+
+  if not Exec.LoadData(Data) then begin // Load the data from the Data string.
+    { For some reason the script could not be loaded. This is usually the case when a
+      library that has been used at compile time isn't registered at runtime. }
+    Exec.Free;
+     // You could raise an exception here.
+    Exit;
+  end;
+
+  ParamList := TIfList.Create; // Create the parameter list
+
+  N := CreateHeapVariant(Exec.FindType2(btString)); // create a variant for the string parameter 
+  if n = nil then begin
+    { Something is wrong. Exit here }
+    ParamList.Free;
+    Exec.Free;
+    Exit;
+  end;
+  VSetString(n, 'Test Parameter!');
+  // Put something in the string parameter.
+
+  ParamList.Add(n); // Add it to the parameter list.
+
+  Exec.RunProc(ParamList, Exec.GetProc('TEST'));
+  { This will call the test proc that was exported before }
+
+  FreePIFVariantList(ParamList); // Cleanup the parameters (This will also free N)
+
+  Exec.Free; // Free the executer.
+end;
+
+
+
+const
+  Script = 'procedure test(s: string); begin MyOwnFunction(''Test is called: ''+s);end; begin end.';
+
+begin
+  ExecuteScript(Script);
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Console/sample7.dpr b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Console/sample7.dpr
new file mode 100644
index 0000000..a0f42d3
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Console/sample7.dpr	
@@ -0,0 +1,142 @@
+program sample7;
+
+uses
+  uPSCompiler,
+  uPSRuntime,
+  uPSUtils,
+
+  Dialogs
+
+  ;
+
+procedure MyOwnFunction(const Data: string);
+begin
+  // Do something with Data
+  ShowMessage(Data);
+end;
+
+function ScriptOnExportCheck(Sender: TPSPascalCompiler; Proc: TPSInternalProcedure; const ProcDecl: string): Boolean;
+{
+  The OnExportCheck callback function is called for each function in the script
+  (also for the main proc, with '!MAIN' as a Proc^.Name). ProcDecl contains the
+  function's result type and parameter types using this format:
+  ProcDecl: ResultType + ' ' + Parameter1 + ' ' + Parameter2 + ' '+Parameter3 + .....
+  Parameter: ParameterType+TypeName
+  ParameterType is @ for a normal parameter and ! for a var parameter.
+  A result type of 0 means no result.
+}
+begin
+  if Proc.Name = 'TEST' then begin // Check if the proc is the Test proc we want.
+    if ProcDecl <> '0 @TSTRINGARRAY' then begin // Check if the proc has the correct params.
+      { Something is wrong, so cause an error. }
+      Sender.MakeError('', ecTypeMismatch, '');
+      Result := False;
+      Exit;
+    end;
+    { Export the proc; This is needed because PS doesn't store the name of a
+      function by default }
+    Result := True;
+  end else Result := True;
+end;
+
+function ScriptOnUses(Sender: TPSPascalCompiler; const Name: string): Boolean;
+{ the OnUses callback function is called for each "uses" in the script.
+  It's always called with the parameter 'SYSTEM' at the top of the script. 
+  For example: uses ii1, ii2;
+  This will call this function 3 times. First with 'SYSTEM' then 'II1' and then 'II2'.
+}
+begin
+  if Name = 'SYSTEM' then begin
+
+    Sender.AddDelphiFunction('procedure MyOwnFunction(Data: string)');
+    { This will register the function to the script engine.
+      Now it can be used from within the script. }
+
+    Sender.AddTypeS('TSTRINGARRAY', 'array of string').ExportName := True;
+    { Add the type to the script engine (and export it) }
+
+    Result := True;
+  end else
+    Result := False;
+end;
+
+type
+  TStringArr = array[0..1] of string;
+
+procedure ExecuteScript(const Script: string);
+var
+  Compiler: TPSPascalCompiler;
+  { TPSPascalCompiler is the compiler part of the script engine. This will
+    translate a Pascal script into compiled data for the executer. }
+  Exec: TPSExec;
+   { TPSExec is the executer part of the script engine. It uses the output of
+    the compiler to run a script. }
+  Data: string;
+
+  N: PIfVariant;
+  { The variant in which we are going to store the parameter }
+  ParamList: TIfList;
+  { The parameter list}
+begin
+  Compiler := TPSPascalCompiler.Create; // create an instance of the compiler.
+  Compiler.OnUses := ScriptOnUses;      // assign the OnUses event.
+
+  Compiler.OnExportCheck := ScriptOnExportCheck; // Assign the onExportCheck event.
+
+  if not Compiler.Compile(Script) then begin     // Compile the Pascal script into bytecode.
+    Compiler.Free;
+     // You could raise an exception here.
+    Exit;
+  end;
+
+  Compiler.GetOutput(Data); // Save the output of the compiler in the string Data.
+  Compiler.Free;            // After compiling the script, there is no need for the compiler anymore.
+
+  Exec := TPSExec.Create;   // Create an instance of the executer.
+
+  Exec.RegisterDelphiFunction(@MyOwnFunction, 'MYOWNFUNCTION', cdRegister);
+
+  if not Exec.LoadData(Data) then // Load the data from the Data string.
+  begin
+    { For some reason the script could not be loaded. This is usually the case when a 
+      library that has been used at compile time isn't registered at runtime. }
+    Exec.Free;
+     // You could raise an exception here.
+    Exit;
+  end;
+
+  ParamList := TIfList.Create; // Create the parameter list
+
+  n := CreateHeapVariant(Exec.GetTypeNo(Exec.GetType('TSTRINGARRAY')));
+  { Create a variant for the array parameter }
+  if n = nil then begin
+    { Something is wrong. Exit here }
+    ParamList.Free;
+    Exec.Free;
+    Exit;
+  end;
+
+  // Put two items in the array
+  PSDynArraySetLength(PPSVariantDynamicArray(n).Data, PPSVariantDynamicArray(n).VI.FType, 2);
+  TStringArr(PPSVariantDynamicArray(n).Data^)[0] := 'First item';
+  TStringArr(PPSVariantDynamicArray(n).Data^)[1] := 'Second item';
+  // Put something in the string parameter.
+
+  ParamList.Add(n); // Add it to the parameter list.
+
+  Exec.RunProc(ParamList, Exec.GetProc('TEST'));
+  { This will call the test proc that was exported before }
+
+  FreePIFVariantList(ParamList); // Cleanup the parameters (This will also free N)
+
+  Exec.Free; // Free the executer.
+end;
+
+
+
+const
+  Script = 'procedure test(s: tstringarray); var i: Longint; begin for i := 0 to GetArrayLength(S) -1 do MyOwnFunction(''Test is called: ''+s[i]);end; begin end.';
+
+begin
+  ExecuteScript(Script);
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Console/sample8.dpr b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Console/sample8.dpr
new file mode 100644
index 0000000..0df1366
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Console/sample8.dpr	
@@ -0,0 +1,120 @@
+program sample8;
+
+uses
+  uPSCompiler,
+  uPSRuntime,
+  uPSUtils,
+
+  Dialogs
+
+  ;
+
+procedure MyOwnFunction(const Data: string);
+begin
+  // Do something with Data
+  ShowMessage(Data);
+end;
+
+function ScriptOnExportCheck(Sender: TPSPascalCompiler; Proc: TPSInternalProcedure; const ProcDecl: string): Boolean;
+{
+  The OnExportCheck callback function is called for each function in the script
+  (also for the main proc, with '!MAIN' as a Proc^.Name). ProcDecl contains the
+  function's result type and parameter types using this format:
+  ProcDecl: ResultType + ' ' + Parameter1 + ' ' + Parameter2 + ' '+Parameter3 + .....
+  Parameter: ParameterType+TypeName
+  ParameterType is @ for a normal parameter and ! for a var parameter.
+  A result type of 0 means no result.
+}
+begin
+  if Proc.Name = 'TEST' then begin // Check if the proc is the Test proc we want.
+    // Check if the proc has the correct params.
+    if not ExportCheck(Sender, Proc, [btString, btString], [pmIn]) then begin
+      { Something is wrong, so cause an error. }
+      Sender.MakeError('', ecTypeMismatch, '');
+      Result := False;
+      Exit;
+    end;
+    Result := True;
+  end else Result := True;
+end;
+
+function ScriptOnUses(Sender: TPSPascalCompiler; const Name: string): Boolean;
+{ the OnUses callback function is called for each "uses" in the script.
+  It's always called with the parameter 'SYSTEM' at the top of the script.
+  For example: uses ii1, ii2;
+  This will call this function 3 times. First with 'SYSTEM' then 'II1' and then 'II2'.
+}
+begin
+  if Name = 'SYSTEM' then begin
+
+    Sender.AddDelphiFunction('procedure MyOwnFunction(Data: string)');
+    { This will register the function to the script engine.
+      Now it can be used from within the script. }
+
+
+    Result := True;
+  end else
+    Result := False;
+end;
+
+type
+  TTestFunction = function (const s: string): string of object;
+  // Header of the test function  added.
+
+procedure ExecuteScript(const Script: string);
+var
+  Compiler: TPSPascalCompiler;
+  { TPSPascalCompiler is the compiler part of the script engine. This will
+    translate a Pascal script into compiled data for the executer. }
+  Exec: TPSExec;
+   { TPSExec is the executer part of the script engine. It uses the output of
+    the compiler to run a script. }
+  Data: string;
+
+  TestFunc: TTestFunction;
+begin
+  Compiler := TPSPascalCompiler.Create; // create an instance of the compiler.
+  Compiler.OnUses := ScriptOnUses;      // assign the OnUses event.
+
+  Compiler.OnExportCheck := ScriptOnExportCheck; // Assign the onExportCheck event.
+
+  // AllowNoBegin and AllowNoEnd allows it that begin and end are not required in a script.
+  Compiler.AllowNoBegin := True;
+  Compiler.AllowNoEnd := True;
+
+  if not Compiler.Compile(Script) then begin  // Compile the Pascal script into bytecode.
+    Compiler.Free;
+     // You could raise an exception here.
+    Exit;
+  end;
+
+  Compiler.GetOutput(Data); // Save the output of the compiler in the string Data.
+  Compiler.Free;            // After compiling the script, there is no need for the compiler anymore.
+
+  Exec := TPSExec.Create;   // Create an instance of the executer.
+
+  Exec.RegisterDelphiFunction(@MyOwnFunction, 'MYOWNFUNCTION', cdRegister);
+
+  if not Exec.LoadData(Data) then begin // Load the data from the Data string.
+    { For some reason the script could not be loaded. This is usually the case when a 
+      library that has been used at compile time isn't registered at runtime. }
+    Exec.Free;
+     // You could raise an exception here.
+    Exit;
+  end;
+
+  TestFunc := TTestFunction(Exec.GetProcAsMethodN('Test'));
+  if @TestFunc <> nil then
+    ShowMessage('Result from TestFunc(''test indata''): '+TestFunc('test indata'));
+
+  Exec.Free; // Free the executer.
+end;
+
+
+
+const
+  Script = 'function test(s: string): string; begin MyOwnFunction(''Test Called with param: ''+s); Result := ''Test Result: ''+s; end;';
+
+begin
+  ExecuteScript(Script);
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Debug/ide.dpr b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Debug/ide.dpr
new file mode 100644
index 0000000..e140813
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Debug/ide.dpr	
@@ -0,0 +1,15 @@
+program ide;
+
+uses
+  Forms,
+  ide_editor in 'ide_editor.pas' {editor},
+  ide_debugoutput in 'ide_debugoutput.pas' {debugoutput};
+
+{$R *.res}
+
+begin
+  Application.Initialize;
+  Application.CreateForm(Teditor, editor);
+  Application.CreateForm(Tdebugoutput, debugoutput);
+  Application.Run;
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Debug/ide.res b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Debug/ide.res
new file mode 100644
index 0000000..a808583
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Debug/ide.res differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Debug/ide_debugoutput.dfm b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Debug/ide_debugoutput.dfm
new file mode 100644
index 0000000..ef3b9e8
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Debug/ide_debugoutput.dfm	
@@ -0,0 +1,27 @@
+object debugoutput: Tdebugoutput
+  Left = 192
+  Top = 107
+  Width = 530
+  Height = 366
+  Caption = 'Debug Output'
+  Color = clBtnFace
+  Font.Charset = DEFAULT_CHARSET
+  Font.Color = clWindowText
+  Font.Height = -11
+  Font.Name = 'MS Sans Serif'
+  Font.Style = []
+  OldCreateOrder = False
+  PixelsPerInch = 96
+  TextHeight = 13
+  object output: TMemo
+    Left = 0
+    Top = 0
+    Width = 522
+    Height = 339
+    Align = alClient
+    ReadOnly = True
+    ScrollBars = ssBoth
+    TabOrder = 0
+    WordWrap = False
+  end
+end
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Debug/ide_debugoutput.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Debug/ide_debugoutput.pas
new file mode 100644
index 0000000..c25a91b
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Debug/ide_debugoutput.pas	
@@ -0,0 +1,33 @@
+unit ide_debugoutput;
+
+interface
+
+uses
+  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
+  Dialogs, StdCtrls;
+
+type
+  Tdebugoutput = class(TForm)
+    output: TMemo;
+  private
+  public
+  protected
+    procedure CreateParams(var Params: TCreateParams); override;
+  end;
+
+var
+  debugoutput: Tdebugoutput;
+
+implementation
+
+{$R *.dfm}
+
+{ Tdebugoutput }
+
+procedure Tdebugoutput.CreateParams(var Params: TCreateParams);
+begin
+  inherited CreateParams(Params);
+  Params.ExStyle  := Params.ExStyle or WS_EX_APPWINDOW;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Debug/ide_editor.dfm b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Debug/ide_editor.dfm
new file mode 100644
index 0000000..4cfab63
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Debug/ide_editor.dfm	
@@ -0,0 +1,253 @@
+object editor: Teditor
+  Left = 234
+  Top = 166
+  Width = 696
+  Height = 480
+  Caption = 'Editor'
+  Color = clBtnFace
+  Font.Charset = DEFAULT_CHARSET
+  Font.Color = clWindowText
+  Font.Height = -11
+  Font.Name = 'MS Sans Serif'
+  Font.Style = []
+  Menu = MainMenu1
+  OldCreateOrder = False
+  OnClick = FormClick
+  PixelsPerInch = 96
+  TextHeight = 13
+  object Splitter1: TSplitter
+    Left = 0
+    Top = 346
+    Width = 688
+    Height = 3
+    Cursor = crVSplit
+    Align = alBottom
+  end
+  object ed: TSynEdit
+    Left = 0
+    Top = 0
+    Width = 688
+    Height = 346
+    Align = alClient
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWindowText
+    Font.Height = -13
+    Font.Name = 'Courier New'
+    Font.Style = []
+    PopupMenu = PopupMenu1
+    TabOrder = 0
+    Gutter.Font.Charset = DEFAULT_CHARSET
+    Gutter.Font.Color = clWindowText
+    Gutter.Font.Height = -11
+    Gutter.Font.Name = 'Terminal'
+    Gutter.Font.Style = []
+    Highlighter = pashighlighter
+    Lines.Strings = (
+      'Program test;'
+      'begin'
+      'end.')
+    OnSpecialLineColors = edSpecialLineColors
+    OnStatusChange = edStatusChange
+    RemovedKeystrokes = <
+      item
+        Command = ecContextHelp
+        ShortCut = 112
+      end>
+    AddedKeystrokes = <
+      item
+        Command = ecContextHelp
+        ShortCut = 16496
+      end>
+  end
+  object messages: TListBox
+    Left = 0
+    Top = 349
+    Width = 688
+    Height = 66
+    Align = alBottom
+    ItemHeight = 13
+    TabOrder = 1
+  end
+  object StatusBar1: TStatusBar
+    Left = 0
+    Top = 415
+    Width = 688
+    Height = 19
+    Panels = <
+      item
+        Width = 50
+      end>
+  end
+  object ce: TPSScriptDebugger
+    CompilerOptions = []
+    OnCompile = ceCompile
+    OnExecute = ceExecute
+    OnAfterExecute = ceAfterExecute
+    Plugins = <
+      item
+        Plugin = IFPS3CE_DateUtils1
+      end
+      item
+        Plugin = IFPS3CE_Std1
+      end
+      item
+        Plugin = IFPS3CE_Controls1
+      end
+      item
+        Plugin = IFPS3CE_StdCtrls1
+      end
+      item
+        Plugin = IFPS3CE_Forms1
+      end
+      item
+        Plugin = IFPS3DllPlugin1
+      end
+      item
+        Plugin = IFPS3CE_ComObj1
+      end>
+    MainFileName = 'Unnamed'
+    UsePreProcessor = True
+    OnNeedFile = ceNeedFile
+    OnIdle = ceIdle
+    OnLineInfo = ceLineInfo
+    OnBreakpoint = ceBreakpoint
+    Left = 592
+    Top = 112
+  end
+  object IFPS3DllPlugin1: TPSDllPlugin
+    Left = 560
+    Top = 112
+  end
+  object pashighlighter: TSynPasSyn
+    Left = 592
+    Top = 64
+  end
+  object PopupMenu1: TPopupMenu
+    Left = 592
+    Top = 16
+    object BreakPointMenu: TMenuItem
+      Caption = '&Set/Clear Breakpoint'
+      ShortCut = 116
+      OnClick = BreakPointMenuClick
+    end
+  end
+  object MainMenu1: TMainMenu
+    Left = 592
+    Top = 160
+    object File1: TMenuItem
+      Caption = '&File'
+      object New1: TMenuItem
+        Caption = '&New'
+        ShortCut = 16462
+        OnClick = New1Click
+      end
+      object N3: TMenuItem
+        Caption = '-'
+      end
+      object Open1: TMenuItem
+        Caption = '&Open'
+        ShortCut = 16463
+        OnClick = Open1Click
+      end
+      object Save1: TMenuItem
+        Caption = '&Save'
+        ShortCut = 16467
+        OnClick = Save1Click
+      end
+      object Saveas1: TMenuItem
+        Caption = 'Save &as'
+        OnClick = Saveas1Click
+      end
+      object N4: TMenuItem
+        Caption = '-'
+      end
+      object Exit1: TMenuItem
+        Caption = '&Exit'
+        OnClick = Exit1Click
+      end
+    end
+    object Run1: TMenuItem
+      Caption = '&Run'
+      object Decompile1: TMenuItem
+        Caption = '&Decompile'
+        OnClick = Decompile1Click
+      end
+      object N5: TMenuItem
+        Caption = '-'
+      end
+      object StepOver1: TMenuItem
+        Caption = '&Step Over'
+        ShortCut = 119
+        OnClick = StepOver1Click
+      end
+      object StepInto1: TMenuItem
+        Caption = '&Step Into'
+        ShortCut = 118
+        OnClick = StepInto1Click
+      end
+      object N1: TMenuItem
+        Caption = '-'
+      end
+      object Reset1: TMenuItem
+        Caption = '&Reset'
+        ShortCut = 16497
+        OnClick = Reset1Click
+      end
+      object N2: TMenuItem
+        Caption = '-'
+      end
+      object Run2: TMenuItem
+        Caption = '&Run'
+        ShortCut = 120
+        OnClick = Run2Click
+      end
+    end
+  end
+  object SaveDialog1: TSaveDialog
+    DefaultExt = 'ROPS'
+    Filter = 'ROPS Files|*.ROPS'
+    Options = [ofHideReadOnly, ofPathMustExist, ofEnableSizing]
+    Left = 200
+    Top = 104
+  end
+  object OpenDialog1: TOpenDialog
+    DefaultExt = 'ROPS'
+    Filter = 'ROPS Files|*.ROPS'
+    Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist, ofEnableSizing]
+    Left = 168
+    Top = 104
+  end
+  object IFPS3CE_Controls1: TPSImport_Controls
+    EnableStreams = True
+    EnableGraphics = True
+    EnableControls = True
+    Left = 328
+    Top = 40
+  end
+  object IFPS3CE_DateUtils1: TPSImport_DateUtils
+    Left = 328
+    Top = 72
+  end
+  object IFPS3CE_Std1: TPSImport_Classes
+    EnableStreams = True
+    EnableClasses = True
+    Left = 328
+    Top = 104
+  end
+  object IFPS3CE_Forms1: TPSImport_Forms
+    EnableForms = True
+    EnableMenus = True
+    Left = 328
+    Top = 136
+  end
+  object IFPS3CE_StdCtrls1: TPSImport_StdCtrls
+    EnableExtCtrls = True
+    EnableButtons = True
+    Left = 328
+    Top = 168
+  end
+  object IFPS3CE_ComObj1: TPSImport_ComObj
+    Left = 328
+    Top = 200
+  end
+end
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Debug/ide_editor.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Debug/ide_editor.pas
new file mode 100644
index 0000000..8f3b12b
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Debug/ide_editor.pas	
@@ -0,0 +1,410 @@
+unit ide_editor;
+
+interface
+
+uses
+  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
+  Dialogs, SynEdit, SynEditHighlighter, SynHighlighterPas,
+  Menus, uPSCompiler, uPSRuntime, uPSDisassembly, uPSUtils, ExtCtrls,
+  StdCtrls, ComCtrls, uPSComponent_COM, uPSComponent_StdCtrls,
+  uPSComponent_Forms, uPSComponent_Default, uPSComponent_Controls, uPSComponent,
+  uPSDebugger;
+
+type
+  Teditor = class(TForm)
+    ce: TPSScriptDebugger;
+    IFPS3DllPlugin1: TPSDllPlugin;
+    pashighlighter: TSynPasSyn;
+    ed: TSynEdit;
+    PopupMenu1: TPopupMenu;
+    BreakPointMenu: TMenuItem;
+    MainMenu1: TMainMenu;
+    File1: TMenuItem;
+    Run1: TMenuItem;
+    StepOver1: TMenuItem;
+    StepInto1: TMenuItem;
+    N1: TMenuItem;
+    Reset1: TMenuItem;
+    N2: TMenuItem;
+    Run2: TMenuItem;
+    Exit1: TMenuItem;
+    messages: TListBox;
+    Splitter1: TSplitter;
+    SaveDialog1: TSaveDialog;
+    OpenDialog1: TOpenDialog;
+    N3: TMenuItem;
+    N4: TMenuItem;
+    New1: TMenuItem;
+    Open1: TMenuItem;
+    Save1: TMenuItem;
+    Saveas1: TMenuItem;
+    StatusBar1: TStatusBar;
+    Decompile1: TMenuItem;
+    N5: TMenuItem;
+    IFPS3CE_Controls1: TPSImport_Controls;
+    IFPS3CE_DateUtils1: TPSImport_DateUtils;
+    IFPS3CE_Std1: TPSImport_Classes;
+    IFPS3CE_Forms1: TPSImport_Forms;
+    IFPS3CE_StdCtrls1: TPSImport_StdCtrls;
+    IFPS3CE_ComObj1: TPSImport_ComObj;
+    procedure edSpecialLineColors(Sender: TObject; Line: Integer;
+      var Special: Boolean; var FG, BG: TColor);
+    procedure BreakPointMenuClick(Sender: TObject);
+    procedure ceLineInfo(Sender: TObject; const FileName: String; Position, Row, Col: Cardinal);
+    procedure Exit1Click(Sender: TObject);
+    procedure StepOver1Click(Sender: TObject);
+    procedure StepInto1Click(Sender: TObject);
+    procedure Reset1Click(Sender: TObject);
+    procedure ceIdle(Sender: TObject);
+    procedure Run2Click(Sender: TObject);
+    procedure ceExecute(Sender: TPSScript);
+    procedure ceAfterExecute(Sender: TPSScript);
+    procedure ceCompile(Sender: TPSScript);
+    procedure New1Click(Sender: TObject);
+    procedure Open1Click(Sender: TObject);
+    procedure Save1Click(Sender: TObject);
+    procedure Saveas1Click(Sender: TObject);
+    procedure edStatusChange(Sender: TObject; Changes: TSynStatusChanges);
+    procedure Decompile1Click(Sender: TObject);
+    function ceNeedFile(Sender: TObject; const OrginFileName: String;
+      var FileName, Output: String): Boolean;
+    procedure ceBreakpoint(Sender: TObject; const FileName: String; Position, Row, Col: Cardinal);
+    procedure FormClick(Sender: TObject);
+  private
+    FActiveLine: Longint;
+    FResume: Boolean;
+    FActiveFile: string;
+    function Compile: Boolean;
+    function Execute: Boolean;
+
+    procedure Writeln(const s: string);
+    procedure Readln(var s: string);
+    procedure SetActiveFile(const Value: string);
+
+    property aFile: string read FActiveFile write SetActiveFile;
+  public
+    function SaveCheck: Boolean;
+  end;
+
+var
+  editor: Teditor;
+
+implementation
+
+uses ide_debugoutput;
+
+{$R *.dfm}
+
+procedure Teditor.edSpecialLineColors(Sender: TObject; Line: Integer;
+  var Special: Boolean; var FG, BG: TColor);
+begin
+  if ce.HasBreakPoint(ce.MainFileName, Line) then
+  begin
+    Special := True;
+    if Line = FActiveLine then
+    begin
+      BG := clWhite;
+      FG := clRed;
+    end else
+    begin
+      FG := clWhite;
+      BG := clRed;
+    end;
+  end else
+  if Line = FActiveLine then
+  begin
+    Special := True;
+    FG := clWhite;
+    bg := clBlue;
+  end else Special := False;
+end;
+
+procedure Teditor.BreakPointMenuClick(Sender: TObject);
+var
+  Line: Longint;
+begin
+  Line := Ed.CaretY;
+  if ce.HasBreakPoint(ce.MainFileName, Line) then
+    ce.ClearBreakPoint(ce.MainFileName, Line)
+  else
+    ce.SetBreakPoint(ce.MainFileName, Line);
+  ed.Refresh;
+end;
+
+procedure Teditor.ceLineInfo(Sender: TObject; const FileName: String; Position, Row,
+  Col: Cardinal);
+begin
+  if ce.Exec.DebugMode <> dmRun then
+  begin
+    FActiveLine := Row;
+    if (FActiveLine < ed.TopLine +2) or (FActiveLine > Ed.TopLine + Ed.LinesInWindow -2) then
+    begin
+      Ed.TopLine := FActiveLine - (Ed.LinesInWindow div 2);
+    end;
+    ed.CaretY := FActiveLine;
+    ed.CaretX := 1;
+
+    ed.Refresh;
+  end;
+end;
+
+procedure Teditor.Exit1Click(Sender: TObject);
+begin
+  Close;
+end;
+
+procedure Teditor.StepOver1Click(Sender: TObject);
+begin
+  if ce.Exec.Status = isRunning then
+    ce.StepOver
+  else
+  begin
+    if Compile then
+    begin
+      ce.StepInto;
+      Execute;
+    end;
+  end;
+end;
+
+procedure Teditor.StepInto1Click(Sender: TObject);
+begin
+  if ce.Exec.Status = isRunning then
+    ce.StepInto
+  else
+  begin
+    if Compile then
+    begin
+      ce.StepInto;
+      Execute;
+    end;
+  end;
+end;
+
+procedure Teditor.Reset1Click(Sender: TObject);
+begin
+  if ce.Exec.Status = isRunning then
+    ce.Stop;
+end;
+
+function Teditor.Compile: Boolean;
+var
+  i: Longint;
+begin
+  ce.Script.Assign(ed.Lines);
+  Result := ce.Compile;
+  messages.Clear;
+  for i := 0 to ce.CompilerMessageCount -1 do
+  begin
+    Messages.Items.Add(ce.CompilerMessages[i].MessageToString);
+  end;
+  if Result then
+    Messages.Items.Add('Succesfully compiled');
+end;
+
+procedure Teditor.ceIdle(Sender: TObject);
+begin
+  Application.HandleMessage;
+  if FResume then
+  begin
+    FResume := False;
+    ce.Resume;
+    FActiveLine := 0;
+    ed.Refresh;
+  end;
+end;
+
+procedure Teditor.Run2Click(Sender: TObject);
+begin
+  if CE.Running then
+  begin
+    FResume := True
+  end else
+  begin
+    if Compile then
+      Execute;
+  end;
+end;
+
+procedure Teditor.ceExecute(Sender: TPSScript);
+begin
+  ce.SetVarToInstance('SELF', Self);
+  ce.SetVarToInstance('APPLICATION', Application);
+  Caption := 'Editor - Running';
+end;
+
+procedure Teditor.ceAfterExecute(Sender: TPSScript);
+begin
+  Caption := 'Editor';
+  FActiveLine := 0;
+  ed.Refresh;
+end;
+
+function Teditor.Execute: Boolean;
+begin
+  debugoutput.Output.Clear;
+  if CE.Execute then
+  begin
+    Messages.Items.Add('Succesfully Execute');
+    Result := True; 
+  end else
+  begin
+    messages.Items.Add('Runtime Error: '+ce.ExecErrorToString + ' at ['+IntToStr(ce.ExecErrorRow)+':'+IntToStr(ce.ExecErrorCol)+'] bytecode pos:'+inttostr(ce.ExecErrorProcNo)+':'+inttostr(ce.ExecErrorByteCodePosition));
+    Result := False;
+  end;
+end;
+
+procedure Teditor.Writeln(const s: string);
+begin
+  debugoutput.output.Lines.Add(S);
+  debugoutput.Visible := True;
+end;
+
+procedure Teditor.ceCompile(Sender: TPSScript);
+begin
+  Sender.AddMethod(Self, @TEditor.Writeln, 'procedure Writeln(s: string)');
+  Sender.AddMethod(Self, @TEditor.Readln, 'procedure readln(var s: string)');
+  Sender.AddRegisteredVariable('Self', 'TForm');
+  Sender.AddRegisteredVariable('Application', 'TApplication');
+end;
+
+procedure Teditor.Readln(var s: string);
+begin
+  s := InputBox('Script', '', '');
+end;
+
+procedure Teditor.New1Click(Sender: TObject);
+begin
+  if SaveCheck then
+  begin
+    ed.ClearAll;
+    ed.Lines.Text := 'Program test;'#13#10'begin'#13#10'end.';
+    ed.Modified := False;
+    aFile := '';
+  end;
+end;
+
+procedure Teditor.Open1Click(Sender: TObject);
+begin
+  if SaveCheck then
+  begin
+    if OpenDialog1.Execute then
+    begin
+      ed.ClearAll;
+      ed.Lines.LoadFromFile(OpenDialog1.FileName);
+      ed.Modified := False;
+      aFile := OpenDialog1.FileName;
+    end;
+  end;
+end;
+
+procedure Teditor.Save1Click(Sender: TObject);
+begin
+  if aFile <> '' then
+  begin
+    ed.Lines.SaveToFile(aFile);
+    ed.Modified := False;
+  end else
+    SaveAs1Click(nil);
+end;
+
+procedure Teditor.Saveas1Click(Sender: TObject);
+begin
+  if SaveDialog1.Execute then
+  begin
+    aFile := SaveDialog1.FileName;
+    ed.Lines.SaveToFile(aFile);
+    ed.Modified := False;
+  end;
+end;
+
+function Teditor.SaveCheck: Boolean;
+begin
+  if ed.Modified then
+  begin
+    case MessageDlg('File has not been saved, save now?', mtConfirmation, mbYesNoCancel, 0) of
+      idYes:
+        begin
+          Save1Click(nil);
+          Result := aFile <> '';
+        end;
+      IDNO: Result := True;
+      else
+        Result := False;
+    end;
+  end else Result := True;
+end;
+
+procedure Teditor.edStatusChange(Sender: TObject;
+  Changes: TSynStatusChanges);
+begin
+  StatusBar1.Panels[0].Text := IntToStr(ed.CaretY)+':'+IntToStr(ed.CaretX)
+end;
+
+procedure Teditor.Decompile1Click(Sender: TObject);
+var
+  s: string;
+begin
+  if Compile then
+  begin
+    ce.GetCompiled(s);
+    IFPS3DataToText(s, s);
+    debugoutput.output.Lines.Text := s;
+    debugoutput.visible := true;
+  end;
+end;
+
+function Teditor.ceNeedFile(Sender: TObject; const OrginFileName: String;
+  var FileName, Output: String): Boolean;
+var
+  path: string;
+  f: TFileStream;
+begin
+  if aFile <> '' then
+    Path := ExtractFilePath(aFile)
+  else
+    Path := ExtractFilePath(ParamStr(0));
+  Path := Path + FileName;
+  try
+    F := TFileStream.Create(Path, fmOpenRead or fmShareDenyWrite);
+  except
+    Result := false;
+    exit;
+  end;
+  try
+    SetLength(Output, f.Size);
+    f.Read(Output[1], Length(Output));
+  finally
+    f.Free;
+  end;
+  Result := True;
+end;
+
+procedure Teditor.ceBreakpoint(Sender: TObject; const FileName: String; Position, Row,
+  Col: Cardinal);
+begin
+  FActiveLine := Row;
+  if (FActiveLine < ed.TopLine +2) or (FActiveLine > Ed.TopLine + Ed.LinesInWindow -2) then
+  begin
+    Ed.TopLine := FActiveLine - (Ed.LinesInWindow div 2);
+  end;
+  ed.CaretY := FActiveLine;
+  ed.CaretX := 1;
+
+  ed.Refresh;
+end;
+
+procedure Teditor.SetActiveFile(const Value: string);
+begin
+  FActiveFile := Value;
+  ce.MainFileName := ExtractFileName(FActiveFile);
+  if Ce.MainFileName = '' then
+    Ce.MainFileName := 'Unnamed';
+end;
+
+procedure Teditor.FormClick(Sender: TObject);
+begin
+  ShowMessage('BLA');
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Debug/readme.txt b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Debug/readme.txt
new file mode 100644
index 0000000..e4a5045
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Debug/readme.txt	
@@ -0,0 +1 @@
+This demo requires SynEdit (http://synedit.sf.net) to compile.
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/Import.dpr b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/Import.dpr
new file mode 100644
index 0000000..f85d43c
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/Import.dpr	
@@ -0,0 +1,17 @@
+program Import;
+
+uses
+  Forms,
+  fMain in 'fMain.pas' {MainForm},
+  fDwin in 'fDwin.pas' {dwin};
+
+{$R *.RES}
+
+begin
+  Application.Initialize;
+  Application.Title := 'Import Sample';
+  Application.CreateForm(TMainForm, MainForm);
+  Application.CreateForm(Tdwin, dwin);
+  Application.Run;
+end.
+
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/Import.res b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/Import.res
new file mode 100644
index 0000000..67a114d
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/Import.res differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/arraytest.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/arraytest.rops
new file mode 100644
index 0000000..667646e
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/arraytest.rops	
@@ -0,0 +1,22 @@
+Program IFSTest;
+type
+  TArrayOfByte = array of byte;
+
+procedure Test(x: TARrayOfByte);
+var
+  i: Integer;
+begin
+  for i := 0 to Getarraylength(X) -1 do
+  begin
+     writeln(inttostr(x[i]));
+  end;
+end;
+var
+  temp: TArrayOfByte;
+
+Begin
+  setarraylength(temp, 2);
+  temp[0] := 1;
+  temp[1] :=23;
+  test(temp);
+End.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/booleantest.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/booleantest.rops
new file mode 100644
index 0000000..f09d50b
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/booleantest.rops	
@@ -0,0 +1,15 @@
+Program IFSTest;
+var
+  x1, x2: integer;
+  b: boolean;
+Begin
+  x1 := 2;
+  x2 := 2;
+  b := x1 = x2;
+  if b then begin writeln('true'); end else begin writeln('false');end;
+  x1 := 2;
+  x2 := 4;
+  b := x1 = x2;
+  if b then begin writeln('true'); end else begin writeln('false');end;
+  writeln('done');
+End.
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/bytearray.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/bytearray.rops
new file mode 100644
index 0000000..a970225
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/bytearray.rops	
@@ -0,0 +1,14 @@
+Program IFSTest;
+type
+  TByteArray = array of byte;
+var
+  x: TByteARray;
+Begin
+  try
+    x[0] := 1;
+   // will cause an runtime error (Out Of Record Fields Range)
+    writeln('Not supposed to be here');
+  except
+     Writeln('Error, which is ok since we accessed a field outside it''s bounds');
+  end;
+End.
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/casetest.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/casetest.rops
new file mode 100644
index 0000000..b45c335
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/casetest.rops	
@@ -0,0 +1,12 @@
+Program IFSTest;
+var
+  b: Byte;
+Begin
+  for b := 0 to 2 do begin
+  case b of 
+    0: writeln('0');
+    1: writeln('1');
+    else writeln('>1');
+  end;
+  end;
+End.
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/dlltest.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/dlltest.rops
new file mode 100644
index 0000000..c2bd052
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/dlltest.rops	
@@ -0,0 +1,19 @@
+Program IFSTest;
+// compile the demo application, minimize delphi and run this. 
+function FindWindow(C1, C2: PChar): Longint; external 'FindWindowA@user32.dll stdcall';
+function ShowWindow(hWnd, nCmdShow: Longint): Integer; external 'ShowWindow@user32.dll stdcall';
+function SetWindowText(hWnd: Longint; Text: PChar): Longint; external 'SetWindowTextA@user32.dll stdcall';
+var 
+  i: Longint;
+  wnd: Longint;
+Begin
+  wnd := Findwindow('', 'Innerfuse Pascal Script III');
+  SetWindowText(Wnd, 'This is DLL demo, it calls some windows user32 routines. This will hide this window for a few seconds');
+  for i := 0 to 200000 do begin end;
+  ShowWindow(Wnd, 0); // hide it
+  for i := 0 to 200000 do begin end;
+  SetWindowText(Wnd, 'Wasn''t that nice?');
+  ShowWindow(Wnd, 5); // show it
+  for i := 0 to 200000 do begin end;
+  SetWindowText(Wnd, 'Innerfuse Pascal Script III');
+End.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/exittest.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/exittest.rops
new file mode 100644
index 0000000..682b825
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/exittest.rops	
@@ -0,0 +1,14 @@
+Program IFSTest;
+procedure test;
+begin
+  writeln('1');
+  exit;
+  writeln('2');
+end;
+Begin
+  test;
+  writeln('3');
+  exit;
+  writeln('4');
+  
+End.
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/fDwin.dfm b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/fDwin.dfm
new file mode 100644
index 0000000..e736445
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/fDwin.dfm differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/fDwin.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/fDwin.pas
new file mode 100644
index 0000000..1f20539
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/fDwin.pas	
@@ -0,0 +1,27 @@
+unit fDwin;
+
+interface
+
+uses
+  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
+  ExtCtrls, StdCtrls;
+
+type
+  Tdwin = class(TForm)
+    Memo1: TMemo;
+    Panel1: TPanel;
+    Button1: TButton;
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+var
+  dwin: Tdwin;
+
+implementation
+
+{$R *.dfm}
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/fMain.dfm b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/fMain.dfm
new file mode 100644
index 0000000..e5fc931
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/fMain.dfm differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/fMain.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/fMain.pas
new file mode 100644
index 0000000..81cb696
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/fMain.pas	
@@ -0,0 +1,471 @@
+unit fMain;
+
+interface
+
+uses
+  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
+  ExtCtrls, StdCtrls, uPSCompiler, uPSRuntime, uPSPreprocessor, uPSUtils,
+  Menus, uPSC_comobj, uPSR_comobj;
+
+type
+  TMainForm = class(TForm)
+    Memo1: TMemo;
+    Memo2: TMemo;
+    Splitter1: TSplitter;
+    MainMenu1: TMainMenu;
+    Toosl1: TMenuItem;
+    Compile1: TMenuItem;
+    CompilewithTimer1: TMenuItem;
+    File1: TMenuItem;
+    Exit1: TMenuItem;
+    N1: TMenuItem;
+    SaveAs1: TMenuItem;
+    Save1: TMenuItem;
+    Open1: TMenuItem;
+    New1: TMenuItem;
+    OpenDialog1: TOpenDialog;
+    SaveDialog1: TSaveDialog;
+    N2: TMenuItem;
+    Stop1: TMenuItem;
+    N3: TMenuItem;
+    CompileandDisassemble1: TMenuItem;
+    procedure Compile1Click(Sender: TObject);
+    procedure FormCreate(Sender: TObject);
+    procedure Exit1Click(Sender: TObject);
+    procedure New1Click(Sender: TObject);
+    procedure Open1Click(Sender: TObject);
+    procedure Save1Click(Sender: TObject);
+    procedure SaveAs1Click(Sender: TObject);
+    procedure Memo1Change(Sender: TObject);
+    procedure FormCloseQuery(Sender: TObject; var CanClose: Boolean);
+    procedure Stop1Click(Sender: TObject);
+    procedure CompileandDisassemble1Click(Sender: TObject);
+    procedure CompilewithTimer1Click(Sender: TObject);
+  private
+    fn: string;
+    changed: Boolean;
+    function SaveTest: Boolean;
+  public
+    { Public declarations }
+  end;
+
+var
+  MainForm: TMainForm;
+
+implementation
+
+uses
+  uPSDisassembly, uPSC_dll, uPSR_dll, uPSDebugger,
+  uPSR_std, uPSC_std, uPSR_stdctrls, uPSC_stdctrls,
+  uPSR_forms, uPSC_forms,
+
+  uPSC_graphics,
+  uPSC_controls,
+  uPSC_classes,
+  uPSR_graphics,
+  uPSR_controls,
+  uPSR_classes,
+  fDwin;
+
+{$R *.DFM}
+
+var
+  Imp: TPSRuntimeClassImporter;
+
+function StringLoadFile(const Filename: string): string;
+var
+  Stream: TStream;
+begin
+  Stream := TFileStream.Create(Filename, fmOpenread or fmSharedenywrite);
+  try
+    SetLength(Result, Stream.Size);
+    Stream.Read(Result[1], Length(Result));
+  finally
+    Stream.Free;
+  end;
+end;
+
+function OnNeedFile(Sender: TPSPreProcessor; const callingfilename: string; var FileName, Output: string): Boolean;
+var
+  s: string;
+begin
+  s := ExtractFilePath(callingfilename);
+  if s = '' then s := ExtractFilePath(Paramstr(0));
+  Filename := s + Filename;
+  if FileExists(Filename) then
+  begin
+    Output := StringLoadFile(Filename);
+    Result := True;
+  end else
+    Result := False;
+end;
+
+function MyOnUses(Sender: TPSPascalCompiler; const Name: string): Boolean;
+begin
+  if Name = 'SYSTEM' then
+  begin
+    TPSPascalCompiler(Sender).AddFunction('procedure Writeln(s: string);');
+    TPSPascalCompiler(Sender).AddFunction('function Readln(question: string): string;');
+    Sender.AddDelphiFunction('function ImportTest(S1: string; s2: Longint; s3: Byte; s4: word; var s5: string): string;');
+
+    Sender.AddConstantN('NaN', 'extended').Value.textended := 0.0 / 0.0;
+    Sender.AddConstantN('Infinity', 'extended').Value.textended := 1.0 / 0.0;
+    Sender.AddConstantN('NegInfinity', 'extended').Value.textended := - 1.0 / 0.0;
+
+    SIRegister_Std(Sender);
+    SIRegister_Classes(Sender, True);
+    SIRegister_Graphics(Sender, True);
+    SIRegister_Controls(Sender);
+    SIRegister_stdctrls(Sender);
+    SIRegister_Forms(Sender);
+    SIRegister_ComObj(Sender);
+
+    AddImportedClassVariable(Sender, 'Memo1', 'TMemo');
+    AddImportedClassVariable(Sender, 'Memo2', 'TMemo');
+    AddImportedClassVariable(Sender, 'Self', 'TForm');
+    AddImportedClassVariable(Sender, 'Application', 'TApplication');
+
+    Result := True;
+  end
+  else
+  begin
+    TPSPascalCompiler(Sender).MakeError('', ecUnknownIdentifier, '');
+    Result := False;
+  end;
+end;
+
+function MyWriteln(Caller: TPSExec; p: TIFExternalProcRec; Global, Stack: TPSStack): Boolean;
+var
+  PStart: Cardinal;
+begin
+  if Global = nil then begin result := false; exit; end;
+  PStart := Stack.Count - 1;
+  MainForm.Memo2.Lines.Add(Stack.GetString(PStart));
+  Result := True;
+end;
+
+function MyReadln(Caller: TPSExec; p: TIFExternalProcRec; Global, Stack: TPSStack): Boolean;
+var
+  PStart: Cardinal;
+begin
+  if Global = nil then begin result := false; exit; end;
+  PStart := Stack.Count - 2;
+  Stack.SetString(PStart + 1, InputBox(MainForm.Caption, Stack.GetString(PStart), ''));
+  Result := True;
+end;
+
+function ImportTest(S1: string; s2: Longint; s3: Byte; s4: word; var s5: string): string;
+begin
+  Result := s1 + ' ' + IntToStr(s2) + ' ' + IntToStr(s3) + ' ' + IntToStr(s4) + ' - OK!';
+  S5 := s5 + ' '+ result + ' -   OK2!';
+end;
+
+var
+  IgnoreRunline: Boolean = False;
+  I: Integer;
+
+procedure RunLine(Sender: TPSExec);
+begin
+  if IgnoreRunline then Exit;
+  i := (i + 1) mod 15;
+  Sender.GetVar('');
+  if i = 0 then Application.ProcessMessages;
+end;
+
+function MyExportCheck(Sender: TPSPascalCompiler; Proc: TPSInternalProcedure; const ProcDecl: string): Boolean;
+begin
+  Result := True;
+end;
+
+
+procedure TMainForm.Compile1Click(Sender: TObject);
+var
+  x1: TPSPascalCompiler;
+  x2: TPSDebugExec;
+  xpre: TPSPreProcessor;
+  s, d: string;
+
+  procedure Outputtxt(const s: string);
+  begin
+    Memo2.Lines.Add(s);
+  end;
+
+  procedure OutputMsgs;
+  var
+    l: Longint;
+    b: Boolean;
+  begin
+    b := False;
+    for l := 0 to x1.MsgCount - 1 do
+    begin
+      Outputtxt(x1.Msg[l].MessageToString);
+      if (not b) and (x1.Msg[l] is TPSPascalCompilerError) then
+      begin
+        b := True;
+        Memo1.SelStart := X1.Msg[l].Pos;
+      end;
+    end;
+  end;
+begin
+  if tag <> 0 then exit;
+  Memo2.Clear;
+  xpre := TPSPreProcessor.Create;
+  try
+    xpre.OnNeedFile := OnNeedFile;
+    xpre.MainFileName := fn;
+    xpre.MainFile := Memo1.Text;
+    xpre.PreProcess(xpre.MainFileName, s);
+
+    x1 := TPSPascalCompiler.Create;
+    x1.OnExportCheck := MyExportCheck;
+    x1.OnUses := MyOnUses;
+    x1.OnExternalProc := DllExternalProc;
+    if x1.Compile(s) then
+    begin
+      Outputtxt('Succesfully compiled');
+      xpre.AdjustMessages(x1);
+      OutputMsgs;
+      if not x1.GetOutput(s) then
+      begin
+        x1.Free;
+        Outputtxt('[Error] : Could not get data');
+        exit;
+      end;
+      x1.GetDebugOutput(d);
+      x1.Free;
+      x2 := TPSDebugExec.Create;
+      try
+        RegisterDLLRuntime(x2);
+        RegisterClassLibraryRuntime(x2, Imp);
+        RIRegister_ComObj(x2);
+
+        tag := longint(x2);
+        if sender <> nil then
+          x2.OnRunLine := RunLine;
+        x2.RegisterFunctionName('WRITELN', MyWriteln, nil, nil);
+        x2.RegisterFunctionName('READLN', MyReadln, nil, nil);
+        x2.RegisterDelphiFunction(@ImportTest, 'IMPORTTEST', cdRegister);
+        if not x2.LoadData(s) then
+        begin
+          Outputtxt('[Error] : Could not load data: '+TIFErrorToString(x2.ExceptionCode, x2.ExceptionString));
+          tag := 0;
+          exit;
+        end;
+        x2.LoadDebugData(d);
+        SetVariantToClass(x2.GetVarNo(x2.GetVar('MEMO1')), Memo1);
+        SetVariantToClass(x2.GetVarNo(x2.GetVar('MEMO2')), Memo2);
+        SetVariantToClass(x2.GetVarNo(x2.GetVar('SELF')), Self);
+        SetVariantToClass(x2.GetVarNo(x2.GetVar('APPLICATION')), Application);
+
+        x2.RunScript;
+        if x2.ExceptionCode <> erNoError then
+          Outputtxt('[Runtime Error] : ' + TIFErrorToString(x2.ExceptionCode, x2.ExceptionString) +
+            ' in ' + IntToStr(x2.ExceptionProcNo) + ' at ' + IntToSTr(x2.ExceptionPos))
+        else
+          OutputTxt('Successfully executed');
+      finally
+        tag := 0;
+        x2.Free;
+      end;
+    end
+    else
+    begin
+      Outputtxt('Failed when compiling');
+      xpre.AdjustMessages(x1);
+      OutputMsgs;
+      x1.Free;
+    end;
+  finally
+    Xpre.Free;
+  end;
+end;
+
+procedure TMainForm.FormCreate(Sender: TObject);
+begin
+  Caption := 'RemObjects Pascal Script';
+  fn := '';
+  changed := False;
+  Memo1.Lines.Text := 'Program Test;'#13#10'Begin'#13#10'End.';
+end;
+
+procedure TMainForm.Exit1Click(Sender: TObject);
+begin
+  Close;
+end;
+
+procedure TMainForm.New1Click(Sender: TObject);
+begin
+  if not SaveTest then
+    exit;
+  Memo1.Lines.Text := 'Program Test;'#13#10'Begin'#13#10'End.';
+  Memo2.Lines.Clear;
+  fn := '';
+end;
+
+function TMainForm.SaveTest: Boolean;
+begin
+  if changed then
+  begin
+    case MessageDlg('File is not saved, save now?', mtWarning, mbYesNoCancel, 0) of
+      mrYes:
+        begin
+          Save1Click(nil);
+          Result := not changed;
+        end;
+      mrNo: Result := True;
+    else
+      Result := False;
+    end;
+  end
+  else
+    Result := True;
+end;
+
+procedure TMainForm.Open1Click(Sender: TObject);
+begin
+  if not SaveTest then
+    exit;
+  if OpenDialog1.Execute then
+  begin
+    Memo1.Lines.LoadFromFile(OpenDialog1.FileName);
+    changed := False;
+    Memo2.Lines.Clear;
+    fn := OpenDialog1.FileName;
+  end;
+end;
+
+procedure TMainForm.Save1Click(Sender: TObject);
+begin
+  if fn = '' then
+  begin
+    Saveas1Click(nil);
+  end
+  else
+  begin
+    Memo1.Lines.SaveToFile(fn);
+    changed := False;
+  end;
+end;
+
+procedure TMainForm.SaveAs1Click(Sender: TObject);
+begin
+  SaveDialog1.FileName := '';
+  if SaveDialog1.Execute then
+  begin
+    fn := SaveDialog1.FileName;
+    Memo1.Lines.SaveToFile(fn);
+    changed := False;
+  end;
+end;
+
+procedure TMainForm.Memo1Change(Sender: TObject);
+begin
+  changed := True;
+end;
+
+procedure TMainForm.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
+begin
+  CanClose := SaveTest;
+end;
+
+procedure TMainForm.Stop1Click(Sender: TObject);
+begin
+  if tag <> 0 then
+    TPSExec(tag).Stop;
+end;
+
+procedure TMainForm.CompileandDisassemble1Click(Sender: TObject);
+var
+  x1: TPSPascalCompiler;
+  xpre: TPSPreProcessor;
+  s, s2: string;
+
+  procedure OutputMsgs;
+  var
+    l: Integer;
+    b: Boolean;
+  begin
+    b := False;
+    for l := 0 to x1.MsgCount - 1 do
+    begin
+      Memo2.Lines.Add(x1.Msg[l].MessageToString);
+      if (not b) and (x1.Msg[l] is TPSPascalCompilerError) then
+      begin
+        b := True;
+        Memo1.SelStart := X1.Msg[l].Pos;
+      end;
+    end;
+  end;
+begin
+  if tag <> 0 then exit;
+  Memo2.Clear;
+  xpre := TPSPreProcessor.Create;
+  try
+    xpre.OnNeedFile := OnNeedFile;
+    xpre.MainFileName := fn;
+    xpre.MainFile := Memo1.Text;
+    xpre.PreProcess(xpre.MainFileName, s);
+    x1 := TPSPascalCompiler.Create;
+    x1.OnExternalProc := DllExternalProc;
+    x1.OnUses := MyOnUses;
+    if x1.Compile(s) then
+    begin
+      Memo2.Lines.Add('Successfully compiled');
+      xpre.AdjustMessages(x1);
+      OutputMsgs;
+      if not x1.GetOutput(s) then
+      begin
+        x1.Free;
+        Memo2.Lines.Add('[Error] : Could not get data');
+        exit;
+      end;
+      x1.Free;
+      IFPS3DataToText(s, s2);
+      dwin.Memo1.Text := s2;
+      dwin.showmodal;
+    end
+    else
+    begin
+      Memo2.Lines.Add('Failed when compiling');
+      xpre.AdjustMessages(x1);
+      OutputMsgs;
+      x1.Free;
+    end;
+  finally
+    xPre.Free;
+  end;
+end;
+
+
+procedure TMainForm.CompilewithTimer1Click(Sender: TObject);
+var
+  Freq, Time1, Time2: Comp;
+begin
+  if not QueryPerformanceFrequency(TLargeInteger((@Freq)^)) then
+  begin
+    ShowMessage('Your computer does not support Performance Timers!');
+    exit;
+  end;
+  QueryPerformanceCounter(TLargeInteger((@Time1)^));
+  IgnoreRunline := True;
+  try
+    Compile1Click(nil);
+  except
+  end;
+  IgnoreRunline := False;
+  QueryPerformanceCounter(TLargeInteger((@Time2)^));
+  Memo2.Lines.Add('Time: ' + Sysutils.FloatToStr((Time2 - Time1) / Freq) +
+    ' sec');
+end;
+
+initialization
+  Imp := TPSRuntimeClassImporter.Create;
+  RIRegister_Std(Imp);
+  RIRegister_Classes(Imp, True);
+  RIRegister_Graphics(Imp, True);
+  RIRegister_Controls(Imp);
+  RIRegister_stdctrls(imp);
+  RIRegister_Forms(Imp);
+finalization
+  Imp.Free;
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/fortest.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/fortest.rops
new file mode 100644
index 0000000..5695ff5
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/fortest.rops	
@@ -0,0 +1,9 @@
+Program IFSTest;
+var
+  i: Longint;
+Begin
+  for i := 0 to 9 do 
+  begin
+    writeln('hello'+inttostr(i));
+  end;
+End.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/if.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/if.rops
new file mode 100644
index 0000000..0db351c
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/if.rops	
@@ -0,0 +1,9 @@
+Program IFSTest;
+var
+  a: boolean;
+Begin
+  a := true;
+  if a then begin ;end else
+  if a then begin ;end else;
+  writeln('5');
+End.
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/iformtest.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/iformtest.rops
new file mode 100644
index 0000000..e8e14ba
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/iformtest.rops	
@@ -0,0 +1,104 @@
+Program IFSTest;
+var
+  F, Form: TForm;
+  Labl: TLabel;
+  Button: TButton;
+  Edit: TEdit;
+  Memo: TMemo;
+  Stop: Boolean;
+procedure MyOnCloseQuery(Sender: TObject; var CanClose: Boolean);
+begin
+  CanClose := Stop;
+end;
+procedure c2(sender: TObject);
+begin
+  f.Close;
+end;
+
+procedure buttonclick(sender: TObject);
+var
+  l: TLabel;
+  b: TButton;
+begin
+  if Length(Edit.Text) < 5 then 
+  begin
+    f := TForm.Create(self);
+    f.Width := 100;
+    f.Height := 100;
+    f.Position := poScreenCenter;
+    f.BorderStyle := bsDialog;
+    f.Caption := 'Error';
+    l := TLabel.Create(F);
+    l.parent := f;
+    l.Left := 10;
+    l.Top := 10;
+    l.Width := 100;
+    l.Height := 50;
+    l.Caption := 'Invalid name';
+    b := TButton.Create(f);
+    b.parent := f;
+    b.Left:=10;
+    b.Top := 40;
+    b.Caption := 'OK';
+    b.Default := True;
+    b.Cancel := True;
+    b.OnClick := @C2;
+    f.Visible := True;
+    form.Visible := False;
+    while f.Visible do
+     begin
+       Application.HandleMessage;
+     end;
+      Form.Visible := True;
+  end else begin
+    writeln('debug:'+Edit.Text);
+    Stop := True;
+    Form.Close;
+  end;
+end;
+Begin
+  Form := TForm.Create(self);
+  Form.Width := 400;
+  Form.Height := 300;
+  Form.BorderStyle := bsDialog;
+  Form.BorderIcons := [];
+  Form.OnCloseQuery := @MyOnCloseQuery;
+  Form.Caption := 'Name';
+  Form.Position := poScreenCenter;
+  Labl := TLabel.Create(Form);
+  Labl.Top := 120;
+  Labl.Left := 160;
+  Labl.Caption := 'Please type in your name:';
+  Labl.Parent := Form;
+  Edit := TEdit.Create(Form);
+  Edit.Font.Name := 'Tahoma';
+  Edit.SetBounds(160,160,80,24);
+  Edit.Parent := Form;
+  Button := TButton.Create(Form);
+  Button.Left := 160;
+  Button.Top := 200;
+  Button.Width := 80;
+  Button.Height := 24;
+  Button.Caption := '&OK';
+  Button.OnClick := @buttonclick;
+  Button.Parent := Form;
+  Button.Default := True;
+  Memo := TMemo.Create(Form);
+  Memo.Left := 10;
+  Memo.Width := 380; 
+  Memo.Top := 10;
+  Memo.Height := 100;
+  Memo.Text := 'Welcome to Form Test.'#13#10#13#10'Type here your name (min 5 letters).  You can''t exit this demo without it.';
+  Memo.Color := 0;
+  Memo.Font.Color := $FFFFFF;
+  Memo.Parent := Form;
+  Memo.Readonly := True;
+  Form.Visible := true;
+  stop := false;
+  while Form.Visible  do
+  begin
+    Application.HandleMessage;
+  end;
+  Button.Free;
+  Form.Free;
+End.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/importtest.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/importtest.rops
new file mode 100644
index 0000000..7564c50
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/importtest.rops	
@@ -0,0 +1,16 @@
+Program IFSTest;
+var
+  a,b :string;
+Begin
+  a := 'test: ';
+  b := ImportTest('1', 2, 3, 4, a);
+  writeln(b);
+  writeln(a);
+{ 
+Output should be:
+
+1 2 3 4 - OK!
+1 2 3 4 - OK! -  OK2!
+
+}
+End.
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/longfortest.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/longfortest.rops
new file mode 100644
index 0000000..94eece2
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/longfortest.rops	
@@ -0,0 +1,10 @@
+Program IFSTest;
+var
+  i, i2: Longint;
+Begin
+  for i := 0 to 1000000 do
+  begin
+    i2 := i -1;
+  end;
+  writeln(inttostr(i2));
+End.
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/rectest.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/rectest.rops
new file mode 100644
index 0000000..79efab7
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/rectest.rops	
@@ -0,0 +1,11 @@
+Program IFSTest;
+type
+  TMyRec = record a: Integer; b: string; end;
+var
+  s: TMyRec;
+Begin
+  s.a := 1234;
+  s.b := 'abc';
+  writeln(s.b);
+  writeln(inttostr(s.a));
+End.
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/stringtest.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/stringtest.rops
new file mode 100644
index 0000000..76b4372
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/stringtest.rops	
@@ -0,0 +1,8 @@
+Program test;
+var s: string;
+begin
+s:='123456789';
+s[1]:=s[2];
+writeln(s);
+end.
+
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/t1.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/t1.rops
new file mode 100644
index 0000000..07a4d54
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/t1.rops	
@@ -0,0 +1,6 @@
+Program test;
+var
+  i: Longint;
+begin
+  writeln('Really simple test');
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/t10.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/t10.rops
new file mode 100644
index 0000000..403890a
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/t10.rops	
@@ -0,0 +1,12 @@
+Program test;
+begin
+  writeln('1');
+  try
+    writeln('2');
+    raiseexception(erCustomError, 'TEST EXCEPTION');
+    writeln('3');
+  finally
+    writeln('4');
+  end;
+  writeln('5');
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/t11.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/t11.rops
new file mode 100644
index 0000000..fd3b929
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/t11.rops	
@@ -0,0 +1,57 @@
+Program IFSTest;
+var
+  F, Form: TForm;
+  i: Longint;
+  Labl: TLabel;
+  Button: TButton;
+  Edit: TEdit;
+  Memo: TMemo;
+  Stop: Boolean;
+  
+Begin
+  Form := TForm.Create(self);
+  Form.Width := 400;
+  Form.Height := 300;
+  Form.BorderStyle := bsDialog;
+  Form.BorderIcons := [];
+  Form.Caption := 'Name';
+  Form.Position := poScreenCenter;
+  Labl := TLabel.Create(Form);
+  Labl.Top := 120;
+  Labl.Left := 160;
+  Labl.Caption := 'Please type in your name:';
+  Labl.Parent := Form;
+  Edit := TEdit.Create(Form);
+  Edit.Font.Name := 'Tahoma';
+  Edit.SetBounds(160,160,80,24);
+  Edit.Parent := Form;
+  Button := TButton.Create(Form);
+  Button.Left := 160;
+  Button.Top := 200;
+  Button.Width := 80;
+  Button.Height := 24;
+  Button.Caption := '&OK';
+  Button.Parent := Form;
+  Button.Default := True;
+  Memo := TMemo.Create(Form);
+  Memo.Left := 10;
+  Memo.Width := 380; 
+  Memo.Top := 10;
+  Memo.Height := 100;
+  Memo.Text := 'Welcome to Form Test.'#13#10#13#10'Plase wait till the loop is over.';
+  Memo.Color := 0;
+  Memo.Font.Color := $FFFFFF;
+  Memo.Parent := Form;
+  Memo.Readonly := True;
+  Form.Visible := true;
+  Form.Refresh;
+  stop := false;
+  while Form.Visible  do
+  begin
+    Application.ProcessMessages;
+    i := i + 1;
+    if i > 100000 then Break;
+  end;
+  Button.Free;
+  Form.Free;
+End.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/t2.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/t2.rops
new file mode 100644
index 0000000..7904b33
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/t2.rops	
@@ -0,0 +1,6 @@
+Program test;
+var
+  i: Longint;
+begin
+  for i := 0 to 100000 do ;
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/t3.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/t3.rops
new file mode 100644
index 0000000..2819850
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/t3.rops	
@@ -0,0 +1,4 @@
+Program test;
+begin
+  writeln('test');
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/t4.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/t4.rops
new file mode 100644
index 0000000..f622aa5
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/t4.rops	
@@ -0,0 +1,8 @@
+Program test;
+var
+  s: string;
+begin
+  s := 'test';
+  s := s + 'TESTED';
+  writeln(s);
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/t5.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/t5.rops
new file mode 100644
index 0000000..a3ddab9
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/t5.rops	
@@ -0,0 +1,9 @@
+Program test;
+var
+  s: string;
+begin
+  Writeln('Your name?');
+  s := readln(s);
+  s := s + 'TESTED';
+  writeln(s);
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/t6.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/t6.rops
new file mode 100644
index 0000000..17617c1
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/t6.rops	
@@ -0,0 +1,22 @@
+Program IFSTest;
+type
+   TArrayOfByte = array of byte;
+
+procedure Test(x: TARrayOfByte);
+var
+  i: Integer;
+begin
+  for i := 0 to Getarraylength(X) -1 do
+  begin
+     writeln(inttostr(x[i]));
+  end;
+end;
+var
+  temp: TArrayOfByte;
+
+Begin
+  setarraylength(temp, 2);
+  temp[0] := 1;
+  temp[1] :=23;
+  test(temp);
+End.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/t7.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/t7.rops
new file mode 100644
index 0000000..5f54b91
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/t7.rops	
@@ -0,0 +1,7 @@
+Program test;
+var
+  r: TObject;
+begin
+  r := TObject.Create;
+  r.Free;
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/t8.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/t8.rops
new file mode 100644
index 0000000..2d6e691
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/t8.rops	
@@ -0,0 +1,16 @@
+Program test;
+var
+  r: TObject;
+begin
+  if r = nil then Writeln('(r = nil) = true') else Writeln('(r = nil) = false');
+  if r <> nil then Writeln('(r <> nil) = true') else Writeln('(r <> nil) = false');
+  r := TObject.Create;
+  if r = nil then Writeln('(r = nil) = true') else Writeln('(r = nil) = false');
+  if r <> nil then Writeln('(r <> nil) = true') else Writeln('(r <> nil) = false');
+  r.Free;
+  if r = nil then Writeln('(r = nil) = true') else Writeln('(r = nil) = false');
+  if r <> nil then Writeln('(r <> nil) = true') else Writeln('(r <> nil) = false');
+  r := nil;
+  if r = nil then Writeln('(r = nil) = true') else Writeln('(r = nil) = false');
+  if r <> nil then Writeln('(r <> nil) = true') else Writeln('(r <> nil) = false');
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/t9.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/t9.rops
new file mode 100644
index 0000000..c4e54ce
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/t9.rops	
@@ -0,0 +1,16 @@
+Program test;
+var
+  t: TObject;
+  i: IUnknown;
+begin
+  t := TObject.Create;
+  try
+    try
+      i := t;
+    except
+      writeln('Expected Exception: Interface not supported');
+    end;
+  finally
+    t.Free;
+  end;
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/testdefine.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/testdefine.rops
new file mode 100644
index 0000000..718bd69
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/testdefine.rops	
@@ -0,0 +1,10 @@
+{.$DEFINE ERROR} 
+
+// Remove the . before the define to 
+// cause an error in textinclude.rops
+
+{$I testinclude.rops}
+begin
+  testproc();
+  writeln('test');
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/testinclude.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/testinclude.rops
new file mode 100644
index 0000000..c9ae677
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/testinclude.rops	
@@ -0,0 +1,12 @@
+{
+  This file is part of a DEFINE / INCLUDE test. Use 
+  testdefine.rops file to execute this file.
+}
+
+procedure TestProc;
+begin
+  Writeln('Test Proc Called');
+  {$IFDEF ERROR}
+  Error!
+  {$ENDIF}
+end;
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/vartype.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/vartype.rops
new file mode 100644
index 0000000..89f21a9
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/vartype.rops	
@@ -0,0 +1,14 @@
+Program IFSTest;
+var
+  e: variant;
+Begin
+  e := null;
+  case VarType(e) of
+varempty :writeln('unassigned');
+varNull: Writeln('null');
+varstring: Writeln('String');
+  varInteger : writeln('VarInteger');
+varSingle: Writeln('Single');
+varDouble: Writeln('Double');
+  end;
+End.
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/wordole.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/wordole.rops
new file mode 100644
index 0000000..9c8612d
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Import/wordole.rops	
@@ -0,0 +1,7 @@
+Program test;
+var
+  WordDoc: Variant;
+begin
+  WordDoc := CreateOleObject('Word.Application');
+  WordDoc.Visible := True;
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/Import.dpr b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/Import.dpr
new file mode 100644
index 0000000..83a86d3
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/Import.dpr	
@@ -0,0 +1,16 @@
+program Import;
+
+uses
+  QForms,
+  fMain in 'fMain.pas' {MainForm},
+  fDwin in 'fDwin.pas' {dwin};
+
+{$R *.res}
+
+begin
+  Application.Initialize;
+  Application.CreateForm(TMainForm, MainForm);
+  Application.CreateForm(Tdwin, dwin);
+  Application.Run;
+end.
+
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/arraytest.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/arraytest.rops
new file mode 100644
index 0000000..314bb89
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/arraytest.rops	
@@ -0,0 +1,22 @@
+Program IFSTest;
+type
+   TArrayOfByte = array of byte;
+
+procedure Test(x: TARrayOfByte);
+var
+  i: Integer;
+begin
+  for i := 0 to Getarraylength(X) -1 do
+  begin
+     writeln(inttostr(x[i]));
+  end;
+end;
+var
+  temp: TArrayOfByte;
+
+Begin
+  setarraylength(temp, 2);
+  temp[0] := 1;
+  temp[1] :=23;
+  test(temp);
+End.
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/booleantest.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/booleantest.rops
new file mode 100644
index 0000000..f09d50b
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/booleantest.rops	
@@ -0,0 +1,15 @@
+Program IFSTest;
+var
+  x1, x2: integer;
+  b: boolean;
+Begin
+  x1 := 2;
+  x2 := 2;
+  b := x1 = x2;
+  if b then begin writeln('true'); end else begin writeln('false');end;
+  x1 := 2;
+  x2 := 4;
+  b := x1 = x2;
+  if b then begin writeln('true'); end else begin writeln('false');end;
+  writeln('done');
+End.
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/bytearray.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/bytearray.rops
new file mode 100644
index 0000000..d4cd198
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/bytearray.rops	
@@ -0,0 +1,9 @@
+Program IFSTest;
+type
+  TByteArray = array of byte;
+var
+  x: TByteARray;
+Begin
+  x[0] := 1;
+ // will cause an runtime error (Out Of Record Fields Range)
+End.
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/casetest.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/casetest.rops
new file mode 100644
index 0000000..b45c335
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/casetest.rops	
@@ -0,0 +1,12 @@
+Program IFSTest;
+var
+  b: Byte;
+Begin
+  for b := 0 to 2 do begin
+  case b of 
+    0: writeln('0');
+    1: writeln('1');
+    else writeln('>1');
+  end;
+  end;
+End.
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/exittest.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/exittest.rops
new file mode 100644
index 0000000..682b825
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/exittest.rops	
@@ -0,0 +1,14 @@
+Program IFSTest;
+procedure test;
+begin
+  writeln('1');
+  exit;
+  writeln('2');
+end;
+Begin
+  test;
+  writeln('3');
+  exit;
+  writeln('4');
+  
+End.
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/fDwin.dfm b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/fDwin.dfm
new file mode 100644
index 0000000..c34c1b0
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/fDwin.dfm differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/fDwin.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/fDwin.pas
new file mode 100644
index 0000000..12138dc
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/fDwin.pas	
@@ -0,0 +1,27 @@
+unit fDwin;
+
+interface
+
+uses
+  SysUtils, Classes, QGraphics, QControls, QForms, QDialogs, QStdCtrls,
+  QExtCtrls;
+
+type
+  Tdwin = class(TForm)
+    Memo1: TMemo;
+    Panel1: TPanel;
+    Button1: TButton;
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+var
+  dwin: Tdwin;
+
+implementation
+
+{$R *.dfm}
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/fMain.dfm b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/fMain.dfm
new file mode 100644
index 0000000..91fa017
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/fMain.dfm differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/fMain.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/fMain.pas
new file mode 100644
index 0000000..9da7ed7
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/fMain.pas	
@@ -0,0 +1,330 @@
+unit fMain;
+
+interface
+
+uses
+  Classes, QGraphics, QControls, QForms, QDialogs,
+  uPSCompiler, uPSRuntime, uPSUtils, QMenus, QTypes, QStdCtrls, QExtCtrls;
+
+type
+  TMainForm = class(TForm)
+    Memo1: TMemo;
+    Memo2: TMemo;
+    Splitter1: TSplitter;
+    MainMenu1: TMainMenu;
+    Toosl1: TMenuItem;
+    Compile1: TMenuItem;
+    File1: TMenuItem;
+    Exit1: TMenuItem;
+    N1: TMenuItem;
+    SaveAs1: TMenuItem;
+    Save1: TMenuItem;
+    Open1: TMenuItem;
+    New1: TMenuItem;
+    OpenDialog1: TOpenDialog;
+    SaveDialog1: TSaveDialog;
+    N2: TMenuItem;
+    Stop1: TMenuItem;
+    N3: TMenuItem;
+    CompileandDisassemble1: TMenuItem;
+    procedure Compile1Click(Sender: TObject);
+    procedure FormCreate(Sender: TObject);
+    procedure Exit1Click(Sender: TObject);
+    procedure New1Click(Sender: TObject);
+    procedure Open1Click(Sender: TObject);
+    procedure Save1Click(Sender: TObject);
+    procedure SaveAs1Click(Sender: TObject);
+    procedure Memo1Change(Sender: TObject);
+    procedure FormCloseQuery(Sender: TObject; var CanClose: Boolean);
+    procedure Stop1Click(Sender: TObject);
+    procedure CompileandDisassemble1Click(Sender: TObject);
+  private
+    fn: string;
+    changed: Boolean;
+    function SaveTest: Boolean;
+  public
+    { Public declarations }
+  end;
+
+var
+  MainForm: TMainForm;
+
+implementation
+uses
+  fDwin, uPSDisassembly, uPSC_dll, uPSR_dll;
+{$R *.dfm}
+
+function MyOnUses(Sender: TIFPSPascalCompiler; const Name: string): Boolean;
+begin
+  if Name = 'SYSTEM' then
+  begin
+    TIFPSPascalCompiler(Sender).AddFunction('procedure Writeln(s: string);');
+    TIFPSPascalCompiler(Sender).AddFunction('function Readln(question: string): string;');
+    Sender.AddConstantN('NaN', 'extended').SetExtended(0.0 / 0.0);
+    Sender.AddConstantN('Infinity', 'extended').SetExtended(1.0 / 0.0);
+    Sender.AddConstantN('NegInfinity', 'extended').SetExtended(1.0 / 0.0);
+    Sender.AddDelphiFunction('function ImportTest(S1: string; s2: Longint; s3: Byte; s4: word; var s5: string): string;');
+    Result := True;
+  end
+  else
+  begin
+    TIFPSPascalCompiler(Sender).MakeError('', ecUnknownIdentifier, '');
+    Result := False;
+  end;
+end;
+
+function MyWriteln(Caller: TIFPSExec; p: TPSExternalProcRec; Global, Stack: TIFPSStack): Boolean;
+begin
+  MainForm.Memo2.Lines.Add(Stack.GetString(-1));
+  Result := True;
+end;
+
+function MyReadln(Caller: TIFPSExec; p: TPSExternalProcRec; Global, Stack: TIFPSStack): Boolean;
+begin
+  Stack.SetString(-1,InputBox(MainForm.Caption, Stack.GetString(-2), ''));
+  Result := True;
+end;
+
+function ImportTest(S1: string; s2: Longint; s3: Byte; s4: word; var s5: string): string;
+begin
+  Result := s1 + ' ' + IntToStr(s2) + ' ' + IntToStr(s3) + ' ' + IntToStr(s4) + ' - OK!';
+  S5 := s5 + ' '+ result + ' -   OK2!';
+end;
+
+var
+  I: Integer;
+
+procedure RunLine(Sender: TIFPSExec);
+begin
+  i := (i + 1) mod 15;
+  if i = 0 then Application.ProcessMessages;
+end;
+
+function MyExportCheck(Sender: TIFPSPascalCompiler; Proc: TIFPSInternalProcedure; const ProcDecl: string): Boolean;
+begin
+  Result := TRue;
+end;
+
+
+procedure TMainForm.Compile1Click(Sender: TObject);
+var
+  x1: TIFPSPascalCompiler;
+  x2: TIFPSExec;
+  s: string;
+
+  procedure Outputtxt(const s: string);
+  begin
+    Memo2.Lines.Add(s);
+  end;
+
+  procedure OutputMsgs;
+  var
+    l: Longint;
+    b: Boolean;
+  begin
+    b := False;
+    for l := 0 to x1.MsgCount - 1 do
+    begin
+      Outputtxt(x1.Msg[l].MessageToString);
+      if (not b) and (x1.Msg[l] is TPSPascalCompilerError) then
+      begin
+        b := True;
+        Memo1.SelStart := X1.Msg[l].Pos;
+      end;
+    end;
+  end;
+begin
+  if tag <> 0 then exit;
+  Memo2.Clear;
+  x1 := TIFPSPascalCompiler.Create;
+  x1.OnExportCheck := MyExportCheck;
+  x1.OnUses := MyOnUses;
+  x1.OnExternalProc := DllExternalProc;
+  if x1.Compile(Memo1.Text) then
+  begin
+    Outputtxt('Succesfully compiled');
+    OutputMsgs;
+    if not x1.GetOutput(s) then
+    begin
+      x1.Free;
+      Outputtxt('[Error] : Could not get data');
+      exit;
+    end;
+    x1.Free;
+    x2 := TIFPSExec.Create;
+    RegisterDLLRuntime(x2);
+    tag := longint(x2);
+    if sender <> nil then
+      x2.OnRunLine := RunLine;
+    x2.RegisterFunctionName('WRITELN', MyWriteln, nil, nil);
+    x2.RegisterFunctionName('READLN', MyReadln, nil, nil);
+    x2.RegisterDelphiFunction(@importtest, 'IMPORTTEST', cdRegister);
+    if not x2.LoadData(s) then begin
+      Outputtxt('[Error] : Could not load data');
+      x2.Free;
+      exit;
+    end;
+    x2.RunScript;
+    if x2.ExceptionCode <> ENoError then
+      Outputtxt('[Runtime Error] : ' + TIFErrorToString(x2.ExceptionCode, x2.ExceptionString) +
+        ' in ' + IntToStr(x2.ExceptionProcNo) + ' at ' + IntToSTr(x2.ExceptionPos))
+    else
+      OutputTxt('Successfully executed');
+
+    tag := 0;
+    x2.Free;
+  end
+  else
+  begin
+    Outputtxt('Failed when compiling');
+    OutputMsgs;
+    x1.Free;
+  end;
+end;
+
+procedure TMainForm.FormCreate(Sender: TObject);
+begin
+  Caption := 'RemObjects Pascal Script';
+  fn := '';
+  changed := False;
+  Memo1.Lines.Text := 'Program ROTEST;'#13#10'Begin'#13#10'End.';
+end;
+
+
+procedure TMainForm.Exit1Click(Sender: TObject);
+begin
+  Close;
+end;
+
+procedure TMainForm.New1Click(Sender: TObject);
+begin
+  if not SaveTest then
+    exit;
+  Memo1.Lines.Text := 'Program ROTEST;'#13#10'Begin'#13#10'End.';
+  Memo2.Lines.Clear;
+  fn := '';
+end;
+
+function TMainForm.SaveTest: Boolean;
+begin
+  if changed then
+  begin
+    case MessageDlg('File is not saved, save now?', mtWarning, mbYesNoCancel, 0) of
+      mrYes:
+        begin
+          Save1Click(nil);
+          Result := not changed;
+        end;
+      mrNo: Result := True;
+    else
+      Result := False;
+    end;
+  end
+  else
+    Result := True;
+end;
+
+procedure TMainForm.Open1Click(Sender: TObject);
+begin
+  if not SaveTest then
+    exit;
+  if OpenDialog1.Execute then
+  begin
+    Memo1.Lines.LoadFromFile(OpenDialog1.FileName);
+    changed := False;
+    Memo2.Lines.Clear;
+    fn := OpenDialog1.FileName;
+  end;
+end;
+
+procedure TMainForm.Save1Click(Sender: TObject);
+begin
+  if fn = '' then
+  begin
+    Saveas1Click(nil);
+  end
+  else
+  begin
+    Memo1.Lines.SaveToFile(fn);
+    changed := False;
+  end;
+end;
+
+procedure TMainForm.SaveAs1Click(Sender: TObject);
+begin
+  SaveDialog1.FileName := '';
+  if SaveDialog1.Execute then
+  begin
+    fn := SaveDialog1.FileName;
+    Memo1.Lines.SaveToFile(fn);
+    changed := False;
+  end;
+end;
+
+procedure TMainForm.Memo1Change(Sender: TObject);
+begin
+  changed := True;
+end;
+
+procedure TMainForm.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
+begin
+  CanClose := SaveTest;
+end;
+
+procedure TMainForm.Stop1Click(Sender: TObject);
+begin
+  if tag <> 0 then
+    TIFPSExec(tag).Stop;
+end;
+
+procedure TMainForm.CompileandDisassemble1Click(Sender: TObject);
+var
+  x1: TIFPSPascalCompiler;
+  s, s2: string;
+
+  procedure OutputMsgs;
+  var
+    l: Longint;
+    b: Boolean;
+  begin
+    b := False;
+    for l := 0 to x1.MsgCount - 1 do
+    begin
+      Memo2.Lines.Add(x1.Msg[l].MessageToString);
+      if (not b) and (x1.Msg[l] is TPSPascalCompilerError) then
+      begin
+        b := True;
+        Memo1.SelStart := X1.Msg[l].Pos;
+      end;
+    end;
+  end;
+begin
+  if tag <> 0 then exit;
+  Memo2.Clear;
+  x1 := TIFPSPascalCompiler.Create;
+  x1.OnExternalProc := DllExternalProc;
+  x1.OnUses := MyOnUses;
+  if x1.Compile(Memo1.Text) then
+  begin
+    Memo2.Lines.Add('Successfully compiled');
+    OutputMsgs;
+    if not x1.GetOutput(s) then
+    begin
+      x1.Free;
+      Memo2.Lines.Add('[Error] : Could not get data');
+      exit;
+    end;
+    x1.Free;
+    IFPS3DataToText(s, s2);
+    dwin.Memo1.Text := s2;
+    dwin.showmodal;
+  end
+  else
+  begin
+    Memo2.Lines.Add('Failed when compiling');
+    OutputMsgs;
+    x1.Free;
+  end;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/fortest.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/fortest.rops
new file mode 100644
index 0000000..5695ff5
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/fortest.rops	
@@ -0,0 +1,9 @@
+Program IFSTest;
+var
+  i: Longint;
+Begin
+  for i := 0 to 9 do 
+  begin
+    writeln('hello'+inttostr(i));
+  end;
+End.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/if.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/if.rops
new file mode 100644
index 0000000..0db351c
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/if.rops	
@@ -0,0 +1,9 @@
+Program IFSTest;
+var
+  a: boolean;
+Begin
+  a := true;
+  if a then begin ;end else
+  if a then begin ;end else;
+  writeln('5');
+End.
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/importtest.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/importtest.rops
new file mode 100644
index 0000000..7564c50
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/importtest.rops	
@@ -0,0 +1,16 @@
+Program IFSTest;
+var
+  a,b :string;
+Begin
+  a := 'test: ';
+  b := ImportTest('1', 2, 3, 4, a);
+  writeln(b);
+  writeln(a);
+{ 
+Output should be:
+
+1 2 3 4 - OK!
+1 2 3 4 - OK! -  OK2!
+
+}
+End.
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/longfortest.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/longfortest.rops
new file mode 100644
index 0000000..94eece2
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/longfortest.rops	
@@ -0,0 +1,10 @@
+Program IFSTest;
+var
+  i, i2: Longint;
+Begin
+  for i := 0 to 1000000 do
+  begin
+    i2 := i -1;
+  end;
+  writeln(inttostr(i2));
+End.
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/rectest.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/rectest.rops
new file mode 100644
index 0000000..79efab7
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/rectest.rops	
@@ -0,0 +1,11 @@
+Program IFSTest;
+type
+  TMyRec = record a: Integer; b: string; end;
+var
+  s: TMyRec;
+Begin
+  s.a := 1234;
+  s.b := 'abc';
+  writeln(s.b);
+  writeln(inttostr(s.a));
+End.
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/vartype.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/vartype.rops
new file mode 100644
index 0000000..ad4e635
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/Kylix/vartype.rops	
@@ -0,0 +1,14 @@
+Program IFSTest;
+var
+  e: variant;
+Begin
+  e := null;
+  case VarType(e) of
+varempty :writeln('unassigned');
+varNull: Writeln('null');
+varstring: Writeln('String');
+  varInteger : writeln('VarInteger');
+varSingle: Writeln('Single');
+varDouble: Writeln('Double');
+  end;
+End.
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/RemObjects SDK Client/MegaDemo.RODL b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/RemObjects SDK Client/MegaDemo.RODL
new file mode 100644
index 0000000..1bcf01a
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/RemObjects SDK Client/MegaDemo.RODL	
@@ -0,0 +1,109 @@
+<Library Name="NewLibrary" UID="{D9821C1A-A084-4120-93F3-BCE6CF2AE0F4}" Documentation="">
+   <Services>
+      <Service Name="NewService">
+      <Interfaces>
+         <Interface Name="Default" UID="{D9821C1A-A084-4120-93F3-BCE6CF2AE0F4}" Documentation="Service_NewService__This_service_has_been_automatically_generated_using_the_RODL_template_you_can_find_in_the_Templates_directory_">
+      <Operations>
+         <Operation Name="Sum" UID="{D9821C1A-A084-4120-93F3-BCE6CF2AE0F4}" Documentation="">
+      <Parameters>
+         <Parameter Name="A" DataType="Integer" Flag="In" />
+         <Parameter Name="B" DataType="Integer" Flag="In" />
+         <Parameter Name="Result" DataType="Integer" Flag="Result" />
+      </Parameters>
+         </Operation>
+         <Operation Name="GetServerTime" UID="{D9821C1A-A084-4120-93F3-BCE6CF2AE0F4}" Documentation="">
+      <Parameters>
+         <Parameter Name="Result" DataType="DateTime" Flag="Result" />
+      </Parameters>
+         </Operation>
+         <Operation Name="EchoPerson" UID="{B8717BF0-B874-4C94-8756-A734840FE445}" Documentation="">
+      <Parameters>
+         <Parameter Name="aPerson" DataType="TPerson" Flag="In" />
+         <Parameter Name="anotherPerson" DataType="TPerson" Flag="Out" />
+      </Parameters>
+         </Operation>
+         <Operation Name="TestIntegerArray" UID="{2A0CA87E-11DC-45FE-8288-30EEDDE8EC4E}" Documentation="">
+      <Parameters>
+         <Parameter Name="anArray" DataType="TIntegerArray" Flag="In" />
+         <Parameter Name="Result" DataType="TIntegerArray" Flag="Result" />
+      </Parameters>
+         </Operation>
+         <Operation Name="TestStringArray" UID="{C54A4879-EBA7-4AA3-B4CC-05A66580DB8C}" Documentation="">
+      <Parameters>
+         <Parameter Name="anArray" DataType="TStringArray" Flag="In" />
+         <Parameter Name="Result" DataType="TStringArray" Flag="Result" />
+      </Parameters>
+         </Operation>
+         <Operation Name="TestPersonArray" UID="{50565130-EA3B-408A-A230-B55AB11F7743}" Documentation="">
+      <Parameters>
+         <Parameter Name="anArray" DataType="TPersonArray" Flag="In" />
+         <Parameter Name="Result" DataType="TPersonArray" Flag="Result" />
+      </Parameters>
+         </Operation>
+         <Operation Name="EchoBinary" UID="{6007A623-9D43-4AB2-8CE5-E337316FE8DD}" Documentation="">
+      <Parameters>
+         <Parameter Name="BinIN" DataType="binary" Flag="In" />
+         <Parameter Name="BinOUT" DataType="Binary" Flag="Out" />
+      </Parameters>
+         </Operation>
+         <Operation Name="SomeTypes" UID="{86B5581B-EDB0-4039-9EF4-2F4155BF28F0}" Documentation="">
+      <Parameters>
+         <Parameter Name="aString" DataType="String" Flag="InOut" />
+         <Parameter Name="aWidestring" DataType="Widestring" Flag="InOut" />
+         <Parameter Name="anInteger" DataType="Integer" Flag="InOut" />
+         <Parameter Name="aCurrency" DataType="Currency" Flag="InOut" />
+         <Parameter Name="aDatetime" DataType="DateTime" Flag="InOut" />
+      </Parameters>
+         </Operation>
+         <Operation Name="CustomObjectAsString" UID="{D26D93E6-8FA8-447F-B927-604A542DCC43}" Documentation="">
+      <Parameters>
+         <Parameter Name="Result" DataType="String" Flag="Result" />
+      </Parameters>
+         </Operation>
+         <Operation Name="CustomObjectAsStream" UID="{F5048214-9949-41D2-B6FC-76E707E9E645}" Documentation="">
+      <Parameters>
+         <Parameter Name="Result" DataType="Binary" Flag="Result" />
+      </Parameters>
+         </Operation>
+         <Operation Name="RaiseError" UID="{6FF781AC-4A73-40FE-9760-216C2F460FF2}" Documentation="">
+      <Parameters>
+      </Parameters>
+         </Operation>
+      </Operations>
+         </Interface>
+      </Interfaces>
+      </Service>
+   </Services>
+   <Structs>
+      <Struct Name="TPerson" UID="{94B3E0BD-4AB9-4C93-8507-C1762CDA32C7}" Documentation="">
+   <Elements>
+         <Element Name="FirstName" DataType="String" />
+         <Element Name="LastName" DataType="String" />
+         <Element Name="Age" DataType="Integer" />
+         <Element Name="Sex" DataType="TSex" />
+   </Elements>
+      </Struct>
+   </Structs>
+   <Enums>
+      <Enum Name="TSex" UID="{9B0938FA-35F8-49DE-91E1-DB9E0DD5E1A3}" Documentation="">
+   <EnumValues>
+         <EnumValue Name="sxMale" />
+         <EnumValue Name="sxFemale" />
+   </EnumValues>
+      </Enum>
+   </Enums>
+   <Arrays>
+      <Array Name="TPersonArray" UID="{3DDF0AF8-EA63-4DD1-A23F-4AA0427A1DCA}" Documentation="">
+   <ElementType DataType="TPerson" />
+      </Array>
+      <Array Name="TIntegerArray" UID="{54E4F9ED-83DD-42E3-9611-D2617163B733}" Documentation="">
+   <ElementType DataType="Integer" />
+      </Array>
+      <Array Name="TStringArray" UID="{A4EE5636-DAD1-45B4-A46C-993664EB279F}" Documentation="">
+   <ElementType DataType="String" />
+      </Array>
+   </Arrays>
+   <Exceptions>
+      <Exception Name="TestException" UID="{DFB108B7-C8D8-4E25-AAFC-8546094E1623}" Documentation="" />
+   </Exceptions>
+</Library>
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/RemObjects SDK Client/MegaDemo.rops b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/RemObjects SDK Client/MegaDemo.rops
new file mode 100644
index 0000000..27545a6
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/RemObjects SDK Client/MegaDemo.rops	
@@ -0,0 +1,91 @@
+var
+  Message: TROBINMessage;
+  Channel: TRoIndyHttpChannel;
+  Service: NewService;
+  s: string;
+  i1, i2, i3: Integer;
+  
+procedure TestPerson;
+var
+  inp, outp: TPerson;
+begin
+  inp.FirstName := 'First_Name';
+  inp.FirstName := 'Last_Name';
+  inp.Age := 100;
+  inp.Sex := sxFemale;
+  Writeln('Calling TestPerson:');
+  Service.EchoPerson(inp, outp);
+  Writeln('Test Result: FirstName: '+outp.FirstName+
+  ' LastName: '+outp.LastName + ' Age: '+inttostr(outp.Age));
+  if inp.Sex = sxMale then
+    Writeln('Male')
+  else
+    Writeln('Female');
+end;
+
+procedure TestStringArray;
+var
+  Str, Str2: TStringArray;
+  i: Longint;
+  s: string;
+begin
+  Str := ['first', 'second', 'third', 'fourth', 'fifth'];
+  Writeln('Passing [''first'', ''second'', ''third'', ''fourth'', ''fifth''] to TestStringArray:');
+  str2 := Service.TestStringArray(str);
+  for i := 0 to GetArrayLength(str2) -1 do
+    S := s + str2[i]+' ';
+  Writeln('Result: '+s);
+end;
+  
+procedure TestIntegerArray;
+var
+  Str, Str2: TIntegerArray;
+  i: Longint;
+  s: string;
+begin
+  Str := [12, 34, 45, 67, 89];
+  Writeln('Passing [12, 34, 45, 67, 89] to TestIntegerArray:');
+  str2 := Service.TestIntegerArray(str);
+  for i := 0 to GetArrayLength(str2) -1 do
+    S := s + inttostr(str2[i])+' ';
+  Writeln('Result: '+s);
+end;
+
+begin
+  Message := TROBINMessage.Create(nil);
+  Message.UseCompression := False;
+  Channel := TRoIndyHTTPChannel.Create(nil);
+  Channel.TargetURL := 'http://localhost:8099/BIN';
+  Service := NewService.Create(Message, Channel);
+  try
+    TestPerson;
+    Writeln('MegaDemo Test');
+    Writeln('First number:');
+    readln(s);
+    i1 := StrToInt(s);
+    Writeln('Second number:');
+    readln(s);
+    i2 := StrToInt(s);
+    i3 := Service.Sum(i1,i2);
+    writeln(inttostr(i1)+'+'+inttostr(i2)+' -> Server, Result:'+inttostr(i3));
+
+    Writeln('Server Time:'+DateToStr(Service.GetServerTime));
+
+    TestStringArray;
+    TestIntegerArray;
+
+    Writeln('Custom Object As String: '+Service.CustomObjectAsString);
+
+    try
+      Writeln('Trying to raise an exception:');
+      Service.RaiseError;
+      Writeln('Exception Failed');
+    except
+      Writeln('Exception: '+ExceptionToString(ExceptionType, ExceptionParam));
+    end;
+  finally
+    Service := nil;
+    channel.Free;
+    message.Free;
+  end;
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/RemObjects SDK Client/TestApplication.dpr b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/RemObjects SDK Client/TestApplication.dpr
new file mode 100644
index 0000000..3108f9c
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/RemObjects SDK Client/TestApplication.dpr	
@@ -0,0 +1,14 @@
+program TestApplication;
+
+uses
+  Forms,
+  fMain in 'fMain.pas' {Form1};
+
+{$R *.RES}
+
+begin
+  Application.Initialize;
+  Application.Title := 'Test Application';
+  Application.CreateForm(TForm1, Form1);
+  Application.Run;
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/RemObjects SDK Client/TestApplication.res b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/RemObjects SDK Client/TestApplication.res
new file mode 100644
index 0000000..67a114d
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/RemObjects SDK Client/TestApplication.res differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/RemObjects SDK Client/fMain.dfm b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/RemObjects SDK Client/fMain.dfm
new file mode 100644
index 0000000..8e7ea80
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/RemObjects SDK Client/fMain.dfm differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/RemObjects SDK Client/fMain.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/RemObjects SDK Client/fMain.pas
new file mode 100644
index 0000000..c1aad1e
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/RemObjects SDK Client/fMain.pas	
@@ -0,0 +1,174 @@
+unit fMain;
+
+interface
+
+uses
+  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
+  ExtCtrls, StdCtrls, uPSComponent, uPSCompiler, Menus, uPSRuntime,
+  uROPSServerLink, uPSComponent_Default;
+
+type
+  TForm1 = class(TForm)
+    Memo1: TMemo;
+    Memo2: TMemo;
+    Splitter1: TSplitter;
+    PSScript: TPSScript;
+    PS3DllPlugin: TPSDllPlugin;
+    MainMenu1: TMainMenu;
+    Program1: TMenuItem;
+    Compile1: TMenuItem;
+    PS3RemObjectsPlugin1: TPSRemObjectsSdkPlugin;
+    OpenDialog1: TOpenDialog;
+    OpenDialog2: TOpenDialog;
+    N1: TMenuItem;
+    OpenScript1: TMenuItem;
+    OpenRODL1: TMenuItem;
+    PSImport_Classes1: TPSImport_Classes;
+    PSImport_DateUtils1: TPSImport_DateUtils;
+    procedure IFPS3ClassesPlugin1CompImport(Sender: TObject;
+      x: TPSPascalCompiler);
+    procedure IFPS3ClassesPlugin1ExecImport(Sender: TObject; Exec: TPSExec;
+      x: TPSRuntimeClassImporter);
+    procedure PSScriptCompile(Sender: TPSScript);
+    procedure Compile1Click(Sender: TObject);
+    procedure PSScriptExecute(Sender: TPSScript);
+    procedure OpenRODL1Click(Sender: TObject);
+    procedure OpenScript1Click(Sender: TObject);
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+var
+  Form1: TForm1;
+
+implementation
+uses
+  uPSR_std,
+  uPSC_std,
+  uPSR_stdctrls,
+  uPSC_stdctrls,
+  uPSR_forms,
+  uPSC_forms,
+  uPSC_graphics,
+  uPSC_controls,
+  uPSC_classes,
+  uPSR_graphics,
+  uPSR_controls,
+  uPSR_classes;
+
+{$R *.DFM}
+
+procedure TForm1.IFPS3ClassesPlugin1CompImport(Sender: TObject;
+  x: TIFPSPascalcompiler);
+begin
+  SIRegister_Std(x);
+  SIRegister_Classes(x, true);
+  SIRegister_Graphics(x, true);
+  SIRegister_Controls(x);
+  SIRegister_stdctrls(x);
+  SIRegister_Forms(x);
+end;
+
+procedure TForm1.IFPS3ClassesPlugin1ExecImport(Sender: TObject; Exec: TIFPSExec;
+  x: TIFPSRuntimeClassImporter);
+begin
+  RIRegister_Std(x);
+  RIRegister_Classes(x, True);
+  RIRegister_Graphics(x, True);
+  RIRegister_Controls(x);
+  RIRegister_stdctrls(x);
+  RIRegister_Forms(x);
+end;
+
+function ImportTest(S1: string; s2: Longint; s3: Byte; s4: word; var s5: string): string;
+begin
+  Result := s1 + ' ' + IntToStr(s2) + ' ' + IntToStr(s3) + ' ' + IntToStr(s4) + ' - OK!';
+  S5 := s5 + ' '+ result + ' -   OK2!';
+end;
+
+procedure MyWriteln(const s: string);
+begin
+  Form1.Memo2.Lines.Add(s);
+end;
+
+function MyReadln(const question: string): string;
+begin
+  Result := InputBox(question, '', '');
+end;
+
+procedure TForm1.PSScriptCompile(Sender: TPSScript);
+begin
+  Sender.AddFunction(@MyWriteln, 'procedure Writeln(s: string);');
+  Sender.AddFunction(@MyReadln, 'function Readln(question: string): string;');
+  Sender.AddFunction(@ImportTest, 'function ImportTest(S1: string; s2: Longint; s3: Byte; s4: word; var s5: string): string;');
+  Sender.AddRegisteredVariable('Application', 'TApplication');
+  Sender.AddRegisteredVariable('Self', 'TForm');
+  Sender.AddRegisteredVariable('Memo1', 'TMemo');
+  Sender.AddRegisteredVariable('Memo2', 'TMemo');
+end;
+
+procedure TForm1.Compile1Click(Sender: TObject);
+  procedure OutputMessages;
+  var
+    l: Longint;
+    b: Boolean;
+  begin
+    b := False;
+
+    for l := 0 to PSScript.CompilerMessageCount - 1 do
+    begin
+      Memo2.Lines.Add('Compiler: '+ PSScript.CompilerErrorToStr(l));
+      if (not b) and (PSScript.CompilerMessages[l] is TIFPSPascalCompilerError) then
+      begin
+        b := True;
+        Memo1.SelStart := PSScript.CompilerMessages[l].Pos;
+      end;
+    end;
+  end;
+begin
+  Memo2.Lines.Clear;
+  PSScript.Script.Assign(Memo1.Lines);
+  Memo2.Lines.Add('Compiling');
+  if PSScript.Compile then
+  begin
+    OutputMessages;
+    Memo2.Lines.Add('Compiled succesfully');
+    if not PSScript.Execute then
+    begin
+      Memo1.SelStart := PSScript.ExecErrorPosition;
+      Memo2.Lines.Add(PSScript.ExecErrorToString +' at '+Inttostr(PSScript.ExecErrorProcNo)+'.'+Inttostr(PSScript.ExecErrorByteCodePosition));
+    end else Memo2.Lines.Add('Succesfully executed');
+  end else
+  begin
+    OutputMessages;
+    Memo2.Lines.Add('Compiling failed');
+  end;
+end;
+
+procedure TForm1.PSScriptExecute(Sender: TPSScript);
+begin
+  PSScript.SetVarToInstance('APPLICATION', Application);
+  PSScript.SetVarToInstance('SELF', Self);
+  PSScript.SetVarToInstance('MEMO1', Memo1);
+  PSScript.SetVarToInstance('MEMO2', Memo2);
+end;
+
+procedure TForm1.OpenRODL1Click(Sender: TObject);
+begin
+  if OpenDialog2.Execute then
+  begin
+    PS3RemObjectsPlugin1.RODLLoadFromFile(OpenDialog2.FileName);
+  end;
+end;
+
+procedure TForm1.OpenScript1Click(Sender: TObject);
+begin
+  if OpenDialog1.Execute then
+  begin
+    Memo1.Lines.LoadFromFile(OpenDialog1.FileName);
+  end;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/TestApp/TestApplication.dpr b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/TestApp/TestApplication.dpr
new file mode 100644
index 0000000..3108f9c
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/TestApp/TestApplication.dpr	
@@ -0,0 +1,14 @@
+program TestApplication;
+
+uses
+  Forms,
+  fMain in 'fMain.pas' {Form1};
+
+{$R *.RES}
+
+begin
+  Application.Initialize;
+  Application.Title := 'Test Application';
+  Application.CreateForm(TForm1, Form1);
+  Application.Run;
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/TestApp/TestApplication.res b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/TestApp/TestApplication.res
new file mode 100644
index 0000000..67a114d
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/TestApp/TestApplication.res differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/TestApp/fMain.dfm b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/TestApp/fMain.dfm
new file mode 100644
index 0000000..86c520a
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/TestApp/fMain.dfm differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/TestApp/fMain.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/TestApp/fMain.pas
new file mode 100644
index 0000000..a5b69fe
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Samples/TestApp/fMain.pas	
@@ -0,0 +1,147 @@
+unit fMain;
+
+interface
+
+uses
+  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
+  ExtCtrls, StdCtrls, uPSComponent, uPSCompiler, Menus, uPSRuntime;
+
+type
+  TForm1 = class(TForm)
+    Memo1: TMemo;
+    Memo2: TMemo;
+    Splitter1: TSplitter;
+    PSScript: TPSScript;
+    PS3DllPlugin: TPSDllPlugin;
+    MainMenu1: TMainMenu;
+    Program1: TMenuItem;
+    Compile1: TMenuItem;
+    procedure IFPS3ClassesPlugin1CompImport(Sender: TObject;
+      x: TPSPascalCompiler);
+    procedure IFPS3ClassesPlugin1ExecImport(Sender: TObject; Exec: TPSExec;
+      x: TPSRuntimeClassImporter);
+    procedure PSScriptCompile(Sender: TPSScript);
+    procedure Compile1Click(Sender: TObject);
+    procedure PSScriptExecute(Sender: TPSScript);
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+var
+  Form1: TForm1;
+
+implementation
+uses
+  uPSR_std,
+  uPSC_std,
+  uPSR_stdctrls,
+  uPSC_stdctrls,
+  uPSR_forms,
+  uPSC_forms,
+  uPSC_graphics,
+  uPSC_controls,
+  uPSC_classes,
+  uPSR_graphics,
+  uPSR_controls,
+  uPSR_classes;
+
+{$R *.DFM}
+
+procedure TForm1.IFPS3ClassesPlugin1CompImport(Sender: TObject;
+  x: TIFPSPascalcompiler);
+begin
+  SIRegister_Std(x);
+  SIRegister_Classes(x, true);
+  SIRegister_Graphics(x, true);
+  SIRegister_Controls(x);
+  SIRegister_stdctrls(x);
+  SIRegister_Forms(x);
+end;
+
+procedure TForm1.IFPS3ClassesPlugin1ExecImport(Sender: TObject; Exec: TIFPSExec;
+  x: TIFPSRuntimeClassImporter);
+begin
+  RIRegister_Std(x);
+  RIRegister_Classes(x, True);
+  RIRegister_Graphics(x, True);
+  RIRegister_Controls(x);
+  RIRegister_stdctrls(x);
+  RIRegister_Forms(x);
+end;
+
+function ImportTest(S1: string; s2: Longint; s3: Byte; s4: word; var s5: string): string;
+begin
+  Result := s1 + ' ' + IntToStr(s2) + ' ' + IntToStr(s3) + ' ' + IntToStr(s4) + ' - OK!';
+  S5 := s5 + ' '+ result + ' -   OK2!';
+end;
+
+procedure MyWriteln(const s: string);
+begin
+  Form1.Memo2.Lines.Add(s);
+end;
+
+function MyReadln(const question: string): string;
+begin
+  Result := InputBox(question, '', '');
+end;
+
+procedure TForm1.PSScriptCompile(Sender: TPSScript);
+begin
+  Sender.AddFunction(@MyWriteln, 'procedure Writeln(s: string);');
+  Sender.AddFunction(@MyReadln, 'function Readln(question: string): string;');
+  Sender.AddFunction(@ImportTest, 'function ImportTest(S1: string; s2: Longint; s3: Byte; s4: word; var s5: string): string;');
+  Sender.AddRegisteredVariable('Application', 'TApplication');
+  Sender.AddRegisteredVariable('Self', 'TForm');
+  Sender.AddRegisteredVariable('Memo1', 'TMemo');
+  Sender.AddRegisteredVariable('Memo2', 'TMemo');
+end;
+
+procedure TForm1.Compile1Click(Sender: TObject);
+  procedure OutputMessages;
+  var
+    l: Longint;
+    b: Boolean;
+  begin
+    b := False;
+
+    for l := 0 to PSScript.CompilerMessageCount - 1 do
+    begin
+      Memo2.Lines.Add('Compiler: '+ PSScript.CompilerErrorToStr(l));
+      if (not b) and (PSScript.CompilerMessages[l] is TIFPSPascalCompilerError) then
+      begin
+        b := True;
+        Memo1.SelStart := PSScript.CompilerMessages[l].Pos;
+      end;
+    end;
+  end;
+begin
+  Memo2.Lines.Clear;
+  PSScript.Script.Assign(Memo1.Lines);
+  Memo2.Lines.Add('Compiling');
+  if PSScript.Compile then
+  begin
+    OutputMessages;
+    Memo2.Lines.Add('Compiled succesfully');
+    if not PSScript.Execute then
+    begin
+      Memo1.SelStart := PSScript.ExecErrorPosition;
+      Memo2.Lines.Add(PSScript.ExecErrorToString +' at '+Inttostr(PSScript.ExecErrorProcNo)+'.'+Inttostr(PSScript.ExecErrorByteCodePosition));
+    end else Memo2.Lines.Add('Succesfully executed');
+  end else
+  begin
+    OutputMessages;
+    Memo2.Lines.Add('Compiling failed');
+  end;
+end;
+
+procedure TForm1.PSScriptExecute(Sender: TPSScript);
+begin
+  PSScript.SetVarToInstance('APPLICATION', Application);
+  PSScript.SetVarToInstance('SELF', Self);
+  PSScript.SetVarToInstance('MEMO1', Memo1);
+  PSScript.SetVarToInstance('MEMO2', Memo2);
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/BuildPackages_D10.bdsgroup b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/BuildPackages_D10.bdsgroup
new file mode 100644
index 0000000..2f606c0
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/BuildPackages_D10.bdsgroup	
@@ -0,0 +1,23 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality">Default.Personality</Option>
+			<Option Name="ProjectType"></Option>
+			<Option Name="Version">1.0</Option>
+			<Option Name="GUID">{1AAFA68F-D7AE-44BA-927F-310105A7A640}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Default.Personality>  
+    
+    
+    
+    <Projects>
+      <Projects Name="PascalScript_Core_D10.bpl">PascalScript_Core_D10.bdsproj</Projects>
+      <Projects Name="PascalScript_RO_D10.bpl">PascalScript_RO_D10.bdsproj</Projects>
+      <Projects Name="Targets">PascalScript_Core_D10.bpl PascalScript_RO_D10.bpl</Projects>
+    </Projects>
+    <Dependencies/>
+  </Default.Personality>  <StarTeamAssociation></StarTeamAssociation>
+  <StarTeamNonRelativeFiles></StarTeamNonRelativeFiles>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/BuildPackages_D11.groupproj b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/BuildPackages_D11.groupproj
new file mode 100644
index 0000000..8bf0c0a
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/BuildPackages_D11.groupproj	
@@ -0,0 +1,44 @@
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{301d154e-a852-4e08-89a3-6bfb2774fb38}</ProjectGuid>
+  </PropertyGroup>
+  <ItemGroup />
+  <ItemGroup>
+    <Projects Include="PascalScript_Core_D11.dproj" />
+    <Projects Include="PascalScript_RO_D11.dproj" />
+  </ItemGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Default.Personality</Borland.Personality>
+    <Borland.ProjectType />
+    <BorlandProject>
+<BorlandProject xmlns=""><Default.Personality></Default.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Target Name="PascalScript_Core_D11">
+    <MSBuild Projects="PascalScript_Core_D11.dproj" Targets="" />
+  </Target>
+  <Target Name="PascalScript_Core_D11:Clean">
+    <MSBuild Projects="PascalScript_Core_D11.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="PascalScript_Core_D11:Make">
+    <MSBuild Projects="PascalScript_Core_D11.dproj" Targets="Make" />
+  </Target>
+  <Target Name="PascalScript_RO_D11">
+    <MSBuild Projects="PascalScript_RO_D11.dproj" Targets="" />
+  </Target>
+  <Target Name="PascalScript_RO_D11:Clean">
+    <MSBuild Projects="PascalScript_RO_D11.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="PascalScript_RO_D11:Make">
+    <MSBuild Projects="PascalScript_RO_D11.dproj" Targets="Make" />
+  </Target>
+  <Target Name="Build">
+    <CallTarget Targets="PascalScript_Core_D11;PascalScript_RO_D11" />
+  </Target>
+  <Target Name="Clean">
+    <CallTarget Targets="PascalScript_Core_D11:Clean;PascalScript_RO_D11:Clean" />
+  </Target>
+  <Target Name="Make">
+    <CallTarget Targets="PascalScript_Core_D11:Make;PascalScript_RO_D11:Make" />
+  </Target>
+  <Import Condition="Exists('$(MSBuildBinPath)\Borland.Group.Targets')" Project="$(MSBuildBinPath)\Borland.Group.Targets" />
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/BuildPackages_D12.groupproj b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/BuildPackages_D12.groupproj
new file mode 100644
index 0000000..4a8272f
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/BuildPackages_D12.groupproj	
@@ -0,0 +1,44 @@
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{301d154e-a852-4e08-89a3-6bfb2774fb38}</ProjectGuid>
+  </PropertyGroup>
+  <ItemGroup />
+  <ItemGroup>
+    <Projects Include="PascalScript_Core_D12.dproj" />
+    <Projects Include="PascalScript_RO_D12.dproj" />
+  </ItemGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Default.Personality</Borland.Personality>
+    <Borland.ProjectType />
+    <BorlandProject>
+<BorlandProject xmlns=""><Default.Personality></Default.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Target Name="PascalScript_Core_D12">
+    <MSBuild Projects="PascalScript_Core_D12.dproj" Targets="" />
+  </Target>
+  <Target Name="PascalScript_Core_D12:Clean">
+    <MSBuild Projects="PascalScript_Core_D12.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="PascalScript_Core_D12:Make">
+    <MSBuild Projects="PascalScript_Core_D12.dproj" Targets="Make" />
+  </Target>
+  <Target Name="PascalScript_RO_D12">
+    <MSBuild Projects="PascalScript_RO_D12.dproj" Targets="" />
+  </Target>
+  <Target Name="PascalScript_RO_D12:Clean">
+    <MSBuild Projects="PascalScript_RO_D12.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="PascalScript_RO_D12:Make">
+    <MSBuild Projects="PascalScript_RO_D12.dproj" Targets="Make" />
+  </Target>
+  <Target Name="Build">
+    <CallTarget Targets="PascalScript_Core_D12;PascalScript_RO_D12" />
+  </Target>
+  <Target Name="Clean">
+    <CallTarget Targets="PascalScript_Core_D12:Clean;PascalScript_RO_D12:Clean" />
+  </Target>
+  <Target Name="Make">
+    <CallTarget Targets="PascalScript_Core_D12:Make;PascalScript_RO_D12:Make" />
+  </Target>
+  <Import Condition="Exists('$(MSBuildBinPath)\Borland.Group.Targets')" Project="$(MSBuildBinPath)\Borland.Group.Targets" />
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/BuildPackages_D6.bpg b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/BuildPackages_D6.bpg
new file mode 100644
index 0000000..3fe0ddd
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/BuildPackages_D6.bpg	
@@ -0,0 +1,23 @@
+#------------------------------------------------------------------------------
+VERSION = BWS.01
+#------------------------------------------------------------------------------
+!ifndef ROOT
+ROOT = $(MAKEDIR)\..
+!endif
+#------------------------------------------------------------------------------
+MAKE = $(ROOT)\bin\make.exe -$(MAKEFLAGS) -f$**
+DCC = $(ROOT)\bin\dcc32.exe $**
+BRCC = $(ROOT)\bin\brcc32.exe $**
+#------------------------------------------------------------------------------
+PROJECTS = PascalScript_Core_D6.bpl PascalScript_RO_D6.bpl
+#------------------------------------------------------------------------------
+default: $(PROJECTS)
+#------------------------------------------------------------------------------
+
+PascalScript_Core_D6.bpl: PascalScript_Core_D6.dpk
+  $(DCC)
+
+PascalScript_RO_D6.bpl: PascalScript_RO_D6.dpk
+  $(DCC)
+
+
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/BuildPackages_D7.bpg b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/BuildPackages_D7.bpg
new file mode 100644
index 0000000..8e45715
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/BuildPackages_D7.bpg	
@@ -0,0 +1,23 @@
+#------------------------------------------------------------------------------
+VERSION = BWS.01
+#------------------------------------------------------------------------------
+!ifndef ROOT
+ROOT = $(MAKEDIR)\..
+!endif
+#------------------------------------------------------------------------------
+MAKE = $(ROOT)\bin\make.exe -$(MAKEFLAGS) -f$**
+DCC = $(ROOT)\bin\dcc32.exe $**
+BRCC = $(ROOT)\bin\brcc32.exe $**
+#------------------------------------------------------------------------------
+PROJECTS = PascalScript_Core_D7.bpl PascalScript_RO_D7.bpl
+#------------------------------------------------------------------------------
+default: $(PROJECTS)
+#------------------------------------------------------------------------------
+
+PascalScript_Core_D7.bpl: PascalScript_Core_D7.dpk
+  $(DCC)
+
+PascalScript_RO_D7.bpl: PascalScript_RO_D7.dpk
+  $(DCC)
+
+
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript.inc b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript.inc
new file mode 100644
index 0000000..ebf48ae
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript.inc	
@@ -0,0 +1,67 @@
+{----------------------------------------------------------------------------}
+{ RemObjects Pascal Script                                                   }
+{                                                                            }
+{ compiler: Delphi 2 and up, Kylix 3 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{----------------------------------------------------------------------------}
+
+
+{$INCLUDE eDefines.inc}
+
+{$IFDEF FPC}{$MODE DELPHI}{$ENDIF}
+
+{$IFDEF VER125}{C4}{$B-}{$X+}{$T-}{$H+}{$ENDIF}
+{$IFDEF VER110}{C3}{$B-}{$X+}{$T-}{$H+}{$ENDIF}
+{$IFDEF VER93}{C1}{$B-}{$X+}{$T-}{$H+}{$ENDIF}
+
+{$IFDEF DELPHI4UP}
+  {$DEFINE PS_HAVEVARIANT}
+  {$DEFINE PS_DYNARRAY}
+{$ENDIF}
+
+{$IFNDEF FPC}
+  {$B-}{$X+}{$T-}{$H+}
+{$ELSE}
+  {$R-}{$Q-}
+{$ENDIF}
+
+{$IFNDEF FPC}
+{$IFNDEF DELPHI4UP}
+{$IFNDEF LINUX}
+  {$DEFINE PS_NOINT64}
+{$ENDIF}
+{$ENDIF}
+
+{$IFDEF DELPHI2}
+  {$DEFINE PS_NOINT64}
+  {$DEFINE PS_NOWIDESTRING}
+  {$B-}{$X+}{$T-}{$H+}
+{$ENDIF}
+
+{$IFDEF LINUX}{KYLIX}{$DEFINE CLX}{$DEFINE DELPHI3UP}{$DEFINE DELPHI6UP}{$ENDIF}
+{$ENDIF}
+{$R-}{$Q-}
+
+
+{
+Defines:
+  IFPS3_NOSMARTLIST    - Don't use the smart list option
+}
+
+{$UNDEF DEBUG}
+
+{$IFDEF CLX}
+{$DEFINE PS_NOIDISPATCH} // not implemented
+{$ENDIF}
+
+{$IFDEF FPC}
+  {$DEFINE PS_HAVEVARIANT}
+  {$DEFINE PS_DYNARRAY}
+  {$DEFINE PS_NOIDISPATCH}
+  {$DEFINE PS_FPCSTRINGWORKAROUND}
+  {$DEFINE DELPHI3UP}
+  {$DEFINE DELPHI6UP}
+{$ENDIF}
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D10.bdsproj b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D10.bdsproj
new file mode 100644
index 0000000..053bbb7
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D10.bdsproj	
@@ -0,0 +1,181 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality">Delphi.Personality</Option>
+			<Option Name="ProjectType"></Option>
+			<Option Name="Version">1.0</Option>
+			<Option Name="GUID">{7803B416-C1B3-4801-BCDB-CB1C64840119}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource">PascalScript_Core_D10.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A">8</Compiler>
+			<Compiler Name="B">0</Compiler>
+			<Compiler Name="C">1</Compiler>
+			<Compiler Name="D">1</Compiler>
+			<Compiler Name="E">0</Compiler>
+			<Compiler Name="F">0</Compiler>
+			<Compiler Name="G">1</Compiler>
+			<Compiler Name="H">1</Compiler>
+			<Compiler Name="I">1</Compiler>
+			<Compiler Name="J">0</Compiler>
+			<Compiler Name="K">0</Compiler>
+			<Compiler Name="L">1</Compiler>
+			<Compiler Name="M">0</Compiler>
+			<Compiler Name="N">1</Compiler>
+			<Compiler Name="O">1</Compiler>
+			<Compiler Name="P">1</Compiler>
+			<Compiler Name="Q">0</Compiler>
+			<Compiler Name="R">0</Compiler>
+			<Compiler Name="S">0</Compiler>
+			<Compiler Name="T">0</Compiler>
+			<Compiler Name="U">0</Compiler>
+			<Compiler Name="V">1</Compiler>
+			<Compiler Name="W">1</Compiler>
+			<Compiler Name="X">1</Compiler>
+			<Compiler Name="Y">1</Compiler>
+			<Compiler Name="Z">1</Compiler>
+			<Compiler Name="ShowHints">True</Compiler>
+			<Compiler Name="ShowWarnings">True</Compiler>
+			<Compiler Name="UnitAliases"></Compiler>
+			<Compiler Name="NamespacePrefix"></Compiler>
+			<Compiler Name="GenerateDocumentation">False</Compiler>
+			<Compiler Name="DefaultNamespace"></Compiler>
+			<Compiler Name="SymbolDeprecated">False</Compiler>
+			<Compiler Name="SymbolLibrary">False</Compiler>
+			<Compiler Name="SymbolPlatform">False</Compiler>
+			<Compiler Name="SymbolExperimental">False</Compiler>
+			<Compiler Name="UnitLibrary">False</Compiler>
+			<Compiler Name="UnitPlatform">False</Compiler>
+			<Compiler Name="UnitDeprecated">False</Compiler>
+			<Compiler Name="UnitExperimental">False</Compiler>
+			<Compiler Name="HResultCompat">True</Compiler>
+			<Compiler Name="HidingMember">True</Compiler>
+			<Compiler Name="HiddenVirtual">True</Compiler>
+			<Compiler Name="Garbage">True</Compiler>
+			<Compiler Name="BoundsError">True</Compiler>
+			<Compiler Name="ZeroNilCompat">True</Compiler>
+			<Compiler Name="StringConstTruncated">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar">True</Compiler>
+			<Compiler Name="TypedConstVarPar">True</Compiler>
+			<Compiler Name="AsgToTypedConst">True</Compiler>
+			<Compiler Name="CaseLabelRange">True</Compiler>
+			<Compiler Name="ForVariable">True</Compiler>
+			<Compiler Name="ConstructingAbstract">True</Compiler>
+			<Compiler Name="ComparisonFalse">True</Compiler>
+			<Compiler Name="ComparisonTrue">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned">True</Compiler>
+			<Compiler Name="UnsupportedConstruct">True</Compiler>
+			<Compiler Name="FileOpen">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc">True</Compiler>
+			<Compiler Name="BadGlobalSymbol">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor">True</Compiler>
+			<Compiler Name="InvalidDirective">True</Compiler>
+			<Compiler Name="PackageNoLink">True</Compiler>
+			<Compiler Name="PackageThreadVar">True</Compiler>
+			<Compiler Name="ImplicitImport">True</Compiler>
+			<Compiler Name="HPPEMITIgnored">True</Compiler>
+			<Compiler Name="NoRetVal">True</Compiler>
+			<Compiler Name="UseBeforeDef">True</Compiler>
+			<Compiler Name="ForLoopVarUndef">True</Compiler>
+			<Compiler Name="UnitNameMismatch">True</Compiler>
+			<Compiler Name="NoCFGFileFound">True</Compiler>
+			<Compiler Name="MessageDirective">True</Compiler>
+			<Compiler Name="ImplicitVariants">True</Compiler>
+			<Compiler Name="UnicodeToLocale">True</Compiler>
+			<Compiler Name="LocaleToUnicode">True</Compiler>
+			<Compiler Name="ImagebaseMultiple">True</Compiler>
+			<Compiler Name="SuspiciousTypecast">True</Compiler>
+			<Compiler Name="PrivatePropAccessor">True</Compiler>
+			<Compiler Name="UnsafeType">False</Compiler>
+			<Compiler Name="UnsafeCode">False</Compiler>
+			<Compiler Name="UnsafeCast">False</Compiler>
+			<Compiler Name="OptionTruncated">True</Compiler>
+			<Compiler Name="WideCharReduced">True</Compiler>
+			<Compiler Name="DuplicatesIgnored">True</Compiler>
+			<Compiler Name="UnitInitSeq">True</Compiler>
+			<Compiler Name="LocalPInvoke">True</Compiler>
+			<Compiler Name="CodePage"></Compiler>
+		</Compiler>
+		<Linker>
+			<Linker Name="MapFile">0</Linker>
+			<Linker Name="OutputObjs">0</Linker>
+			<Linker Name="ConsoleApp">1</Linker>
+			<Linker Name="DebugInfo">False</Linker>
+			<Linker Name="RemoteSymbols">False</Linker>
+			<Linker Name="GenerateDRC">False</Linker>
+			<Linker Name="MinStackSize">16384</Linker>
+			<Linker Name="MaxStackSize">1048576</Linker>
+			<Linker Name="ImageBase">4194304</Linker>
+			<Linker Name="ExeDescription">RemObjects Pascal Script - Core Package</Linker>
+			<Linker Name="GenerateHpps">False</Linker>
+		</Linker>
+		<Directories>
+			<Directories Name="OutputDir"></Directories>
+			<Directories Name="UnitOutputDir">..\Dcu\D10</Directories>
+			<Directories Name="PackageDLLOutputDir">..\Dcu\D10</Directories>
+			<Directories Name="PackageDCPOutputDir">..\Dcu\D10</Directories>
+			<Directories Name="SearchPath">..\Dcu\D10</Directories>
+			<Directories Name="Packages"></Directories>
+			<Directories Name="Conditionals"></Directories>
+			<Directories Name="DebugSourceDirs"></Directories>
+			<Directories Name="UsePackages">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams"></Parameters>
+			<Parameters Name="HostApplication"></Parameters>
+			<Parameters Name="Launcher"></Parameters>
+			<Parameters Name="UseLauncher">False</Parameters>
+			<Parameters Name="DebugCWD"></Parameters>
+			<Parameters Name="RemoteHost"></Parameters>
+			<Parameters Name="RemotePath"></Parameters>
+			<Parameters Name="RemoteLauncher"></Parameters>
+			<Parameters Name="RemoteCWD"></Parameters>
+			<Parameters Name="RemoteDebug">False</Parameters>
+			<Parameters Name="Debug Symbols Search Path"></Parameters>
+			<Parameters Name="LoadAllSymbols">True</Parameters>
+			<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+		</Parameters>
+		<Language>
+			<Language Name="ActiveLang"></Language>
+			<Language Name="ProjectLang">$00000000</Language>
+			<Language Name="RootDir"></Language>
+		</Language>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo">741</VersionInfo>
+			<VersionInfo Name="AutoIncBuild">0</VersionInfo>
+			<VersionInfo Name="MajorVer">3</VersionInfo>
+			<VersionInfo Name="MinorVer">0</VersionInfo>
+			<VersionInfo Name="Release">6</VersionInfo>
+			<VersionInfo Name="Build">442</VersionInfo>
+			<VersionInfo Name="Debug">0</VersionInfo>
+			<VersionInfo Name="PreRelease">0</VersionInfo>
+			<VersionInfo Name="Special">0</VersionInfo>
+			<VersionInfo Name="Private">0</VersionInfo>
+			<VersionInfo Name="DLL">0</VersionInfo>
+			<VersionInfo Name="Locale">1033</VersionInfo>
+			<VersionInfo Name="CodePage">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName">3.0.35.741</VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion">3.0.6.442</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName">Pascal Script</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion">3.0.0.0</VersionInfoKeys>
+			<VersionInfoKeys Name="CompileDate">Tuesday, March 21, 2006 1:32 PM</VersionInfoKeys>
+			<VersionInfoKeys Name="Compile Date">Monday, February 28, 2005 3:33 PM</VersionInfoKeys>
+		</VersionInfoKeys>
+	</Delphi.Personality>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D10.cfg b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D10.cfg
new file mode 100644
index 0000000..a58e901
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D10.cfg	
@@ -0,0 +1,51 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N0"..\Dcu\D10"
+-LE"..\Dcu\D10"
+-LN"..\Dcu\D10"
+-U"..\Dcu\D10"
+-O"..\Dcu\D10"
+-I"..\Dcu\D10"
+-R"..\Dcu\D10"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-SYMBOL_EXPERIMENTAL
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNIT_EXPERIMENTAL
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D10.dpk b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D10.dpk
new file mode 100644
index 0000000..27aaec8
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D10.dpk	
@@ -0,0 +1,76 @@
+package PascalScript_Core_D10;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Pascal Script - Core Package'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl;
+
+contains
+  uPSC_extctrls in 'uPSC_extctrls.pas',
+  uPSC_forms in 'uPSC_forms.pas',
+  uPSC_graphics in 'uPSC_graphics.pas',
+  uPSC_menus in 'uPSC_menus.pas',
+  uPSC_std in 'uPSC_std.pas',
+  uPSC_stdctrls in 'uPSC_stdctrls.pas',
+  uPSCompiler in 'uPSCompiler.pas',
+  uPSComponent in 'uPSComponent.pas',
+  uPSComponent_COM in 'uPSComponent_COM.pas',
+  uPSComponent_Controls in 'uPSComponent_Controls.pas',
+  uPSComponent_DB in 'uPSComponent_DB.pas',
+  uPSComponent_Default in 'uPSComponent_Default.pas',
+  uPSComponent_Forms in 'uPSComponent_Forms.pas',
+  uPSComponent_StdCtrls in 'uPSComponent_StdCtrls.pas',
+  uPSDebugger in 'uPSDebugger.pas',
+  uPSDisassembly in 'uPSDisassembly.pas',
+  uPSPreProcessor in 'uPSPreProcessor.pas',
+  uPSR_buttons in 'uPSR_buttons.pas',
+  uPSR_classes in 'uPSR_classes.pas',
+  uPSR_comobj in 'uPSR_comobj.pas',
+  uPSR_controls in 'uPSR_controls.pas',
+  uPSR_dateutils in 'uPSR_dateutils.pas',
+  uPSR_DB in 'uPSR_DB.pas',
+  uPSR_dll in 'uPSR_dll.pas',
+  uPSR_extctrls in 'uPSR_extctrls.pas',
+  uPSR_forms in 'uPSR_forms.pas',
+  uPSR_graphics in 'uPSR_graphics.pas',
+  uPSR_menus in 'uPSR_menus.pas',
+  uPSR_std in 'uPSR_std.pas',
+  uPSR_stdctrls in 'uPSR_stdctrls.pas',
+  uPSRuntime in 'uPSRuntime.pas',
+  uPSUtils in 'uPSUtils.pas',
+  uPSC_buttons in 'uPSC_buttons.pas',
+  uPSC_classes in 'uPSC_classes.pas',
+  uPSC_comobj in 'uPSC_comobj.pas',
+  uPSC_controls in 'uPSC_controls.pas',
+  uPSC_dateutils in 'uPSC_dateutils.pas',
+  uPSC_DB in 'uPSC_DB.pas',
+  uPSC_dll in 'uPSC_dll.pas',
+  PascalScript_Core_Reg in 'PascalScript_Core_Reg.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D10.res b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D10.res
new file mode 100644
index 0000000..9377a73
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D10.res differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D11.dpk b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D11.dpk
new file mode 100644
index 0000000..b76593c
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D11.dpk	
@@ -0,0 +1,76 @@
+package PascalScript_Core_D11;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Pascal Script - Core Package'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl;
+
+contains
+  uPSC_extctrls in 'uPSC_extctrls.pas',
+  uPSC_forms in 'uPSC_forms.pas',
+  uPSC_graphics in 'uPSC_graphics.pas',
+  uPSC_menus in 'uPSC_menus.pas',
+  uPSC_std in 'uPSC_std.pas',
+  uPSC_stdctrls in 'uPSC_stdctrls.pas',
+  uPSCompiler in 'uPSCompiler.pas',
+  uPSComponent in 'uPSComponent.pas',
+  uPSComponent_COM in 'uPSComponent_COM.pas',
+  uPSComponent_Controls in 'uPSComponent_Controls.pas',
+  uPSComponent_DB in 'uPSComponent_DB.pas',
+  uPSComponent_Default in 'uPSComponent_Default.pas',
+  uPSComponent_Forms in 'uPSComponent_Forms.pas',
+  uPSComponent_StdCtrls in 'uPSComponent_StdCtrls.pas',
+  uPSDebugger in 'uPSDebugger.pas',
+  uPSDisassembly in 'uPSDisassembly.pas',
+  uPSPreProcessor in 'uPSPreProcessor.pas',
+  uPSR_buttons in 'uPSR_buttons.pas',
+  uPSR_classes in 'uPSR_classes.pas',
+  uPSR_comobj in 'uPSR_comobj.pas',
+  uPSR_controls in 'uPSR_controls.pas',
+  uPSR_dateutils in 'uPSR_dateutils.pas',
+  uPSR_DB in 'uPSR_DB.pas',
+  uPSR_dll in 'uPSR_dll.pas',
+  uPSR_extctrls in 'uPSR_extctrls.pas',
+  uPSR_forms in 'uPSR_forms.pas',
+  uPSR_graphics in 'uPSR_graphics.pas',
+  uPSR_menus in 'uPSR_menus.pas',
+  uPSR_std in 'uPSR_std.pas',
+  uPSR_stdctrls in 'uPSR_stdctrls.pas',
+  uPSRuntime in 'uPSRuntime.pas',
+  uPSUtils in 'uPSUtils.pas',
+  uPSC_buttons in 'uPSC_buttons.pas',
+  uPSC_classes in 'uPSC_classes.pas',
+  uPSC_comobj in 'uPSC_comobj.pas',
+  uPSC_controls in 'uPSC_controls.pas',
+  uPSC_dateutils in 'uPSC_dateutils.pas',
+  uPSC_DB in 'uPSC_DB.pas',
+  uPSC_dll in 'uPSC_dll.pas',
+  PascalScript_Core_Reg in 'PascalScript_Core_Reg.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D11.dproj b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D11.dproj
new file mode 100644
index 0000000..0ffb246
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D11.dproj	
@@ -0,0 +1,112 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+	<PropertyGroup>
+		<ProjectGuid>{634be604-b73a-4b3d-bc81-719c905199e6}</ProjectGuid>
+		<MainSource>PascalScript_Core_D11.dpk</MainSource>
+		<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+		<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+		<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+		<DCC_DependencyCheckOutputName>..\Dcu\D11\PascalScript_Core_D11.bpl</DCC_DependencyCheckOutputName>
+	</PropertyGroup>
+	<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+		<Version>7.0</Version>
+		<DCC_DebugInformation>False</DCC_DebugInformation>
+		<DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+		<DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+		<DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+		<DCC_DcuOutput>..\Dcu\D10</DCC_DcuOutput>
+		<DCC_ObjOutput>..\Dcu\D10</DCC_ObjOutput>
+		<DCC_HppOutput>..\Dcu\D10</DCC_HppOutput>
+		<DCC_BplOutput>..\Dcu\D10</DCC_BplOutput>
+		<DCC_DcpOutput>..\Dcu\D10</DCC_DcpOutput>
+		<DCC_UnitSearchPath>..\Dcu\D10</DCC_UnitSearchPath>
+		<DCC_ResourcePath>..\Dcu\D10</DCC_ResourcePath>
+		<DCC_ObjPath>..\Dcu\D10</DCC_ObjPath>
+		<DCC_IncludePath>..\Dcu\D10</DCC_IncludePath>
+		<DCC_Define>RELEASE</DCC_Define>
+		<DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+		<DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+		<DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+		<DCC_SYMBOL_EXPERIMENTAL>False</DCC_SYMBOL_EXPERIMENTAL>
+		<DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+		<DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+		<DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+		<DCC_UNIT_EXPERIMENTAL>False</DCC_UNIT_EXPERIMENTAL>
+	</PropertyGroup>
+	<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+		<Version>7.0</Version>
+		<DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+		<DCC_DcuOutput>..\Dcu\D11</DCC_DcuOutput>
+		<DCC_ObjOutput>..\Dcu\D11</DCC_ObjOutput>
+		<DCC_HppOutput>..\Dcu\D11</DCC_HppOutput>
+		<DCC_BplOutput>..\Dcu\D11</DCC_BplOutput>
+		<DCC_DcpOutput>..\Dcu\D11</DCC_DcpOutput>
+		<DCC_UnitSearchPath>..\Dcu\D11</DCC_UnitSearchPath>
+		<DCC_ResourcePath>..\Dcu\D11</DCC_ResourcePath>
+		<DCC_ObjPath>..\Dcu\D11</DCC_ObjPath>
+		<DCC_IncludePath>..\Dcu\D11</DCC_IncludePath>
+		<DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+		<DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+		<DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+		<DCC_SYMBOL_EXPERIMENTAL>False</DCC_SYMBOL_EXPERIMENTAL>
+		<DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+		<DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+		<DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+		<DCC_UNIT_EXPERIMENTAL>False</DCC_UNIT_EXPERIMENTAL>
+	</PropertyGroup>
+	<ProjectExtensions>
+		<Borland.Personality>Delphi.Personality</Borland.Personality>
+		<Borland.ProjectType>Package</Borland.ProjectType>
+		<BorlandProject>
+			<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">RemObjects Pascal Script - Core Package</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">True</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">3</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">35</VersionInfo><VersionInfo Name="Build">741</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">3.0.35.741</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">Pascal Script</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">3.0.0.0</VersionInfoKeys><VersionInfoKeys Name="CompileDate">Tuesday, March 21, 2006 1:32 PM</VersionInfoKeys><VersionInfoKeys Name="Compile Date">Monday, February 28, 2005 3:33 PM</VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">PascalScript_Core_D11.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
+	</ProjectExtensions>
+	<Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets"/>
+	<ItemGroup>
+		<DelphiCompile Include="PascalScript_Core_D11.dpk">
+			<MainSource>MainSource</MainSource>
+		</DelphiCompile>
+		<DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\dbrtl.dcp"/>
+		<DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\rtl.dcp"/>
+		<DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\vcl.dcp"/>
+		<DCCReference Include="PascalScript_Core_Reg.pas"/>
+		<DCCReference Include="uPSCompiler.pas"/>
+		<DCCReference Include="uPSComponent.pas"/>
+		<DCCReference Include="uPSComponent_COM.pas"/>
+		<DCCReference Include="uPSComponent_Controls.pas"/>
+		<DCCReference Include="uPSComponent_DB.pas"/>
+		<DCCReference Include="uPSComponent_Default.pas"/>
+		<DCCReference Include="uPSComponent_Forms.pas"/>
+		<DCCReference Include="uPSComponent_StdCtrls.pas"/>
+		<DCCReference Include="uPSC_buttons.pas"/>
+		<DCCReference Include="uPSC_classes.pas"/>
+		<DCCReference Include="uPSC_comobj.pas"/>
+		<DCCReference Include="uPSC_controls.pas"/>
+		<DCCReference Include="uPSC_dateutils.pas"/>
+		<DCCReference Include="uPSC_DB.pas"/>
+		<DCCReference Include="uPSC_dll.pas"/>
+		<DCCReference Include="uPSC_extctrls.pas"/>
+		<DCCReference Include="uPSC_forms.pas"/>
+		<DCCReference Include="uPSC_graphics.pas"/>
+		<DCCReference Include="uPSC_menus.pas"/>
+		<DCCReference Include="uPSC_std.pas"/>
+		<DCCReference Include="uPSC_stdctrls.pas"/>
+		<DCCReference Include="uPSDebugger.pas"/>
+		<DCCReference Include="uPSDisassembly.pas"/>
+		<DCCReference Include="uPSPreProcessor.pas"/>
+		<DCCReference Include="uPSRuntime.pas"/>
+		<DCCReference Include="uPSR_buttons.pas"/>
+		<DCCReference Include="uPSR_classes.pas"/>
+		<DCCReference Include="uPSR_comobj.pas"/>
+		<DCCReference Include="uPSR_controls.pas"/>
+		<DCCReference Include="uPSR_dateutils.pas"/>
+		<DCCReference Include="uPSR_DB.pas"/>
+		<DCCReference Include="uPSR_dll.pas"/>
+		<DCCReference Include="uPSR_extctrls.pas"/>
+		<DCCReference Include="uPSR_forms.pas"/>
+		<DCCReference Include="uPSR_graphics.pas"/>
+		<DCCReference Include="uPSR_menus.pas"/>
+		<DCCReference Include="uPSR_std.pas"/>
+		<DCCReference Include="uPSR_stdctrls.pas"/>
+		<DCCReference Include="uPSUtils.pas"/>
+	</ItemGroup>
+</Project>
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D11.res b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D11.res
new file mode 100644
index 0000000..9377a73
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D11.res differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D12.dpk b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D12.dpk
new file mode 100644
index 0000000..e75959d
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D12.dpk	
@@ -0,0 +1,76 @@
+package PascalScript_Core_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Pascal Script - Core Package'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl;
+
+contains
+  uPSC_extctrls in 'uPSC_extctrls.pas',
+  uPSC_forms in 'uPSC_forms.pas',
+  uPSC_graphics in 'uPSC_graphics.pas',
+  uPSC_menus in 'uPSC_menus.pas',
+  uPSC_std in 'uPSC_std.pas',
+  uPSC_stdctrls in 'uPSC_stdctrls.pas',
+  uPSCompiler in 'uPSCompiler.pas',
+  uPSComponent in 'uPSComponent.pas',
+  uPSComponent_COM in 'uPSComponent_COM.pas',
+  uPSComponent_Controls in 'uPSComponent_Controls.pas',
+  uPSComponent_DB in 'uPSComponent_DB.pas',
+  uPSComponent_Default in 'uPSComponent_Default.pas',
+  uPSComponent_Forms in 'uPSComponent_Forms.pas',
+  uPSComponent_StdCtrls in 'uPSComponent_StdCtrls.pas',
+  uPSDebugger in 'uPSDebugger.pas',
+  uPSDisassembly in 'uPSDisassembly.pas',
+  uPSPreProcessor in 'uPSPreProcessor.pas',
+  uPSR_buttons in 'uPSR_buttons.pas',
+  uPSR_classes in 'uPSR_classes.pas',
+  uPSR_comobj in 'uPSR_comobj.pas',
+  uPSR_controls in 'uPSR_controls.pas',
+  uPSR_dateutils in 'uPSR_dateutils.pas',
+  uPSR_DB in 'uPSR_DB.pas',
+  uPSR_dll in 'uPSR_dll.pas',
+  uPSR_extctrls in 'uPSR_extctrls.pas',
+  uPSR_forms in 'uPSR_forms.pas',
+  uPSR_graphics in 'uPSR_graphics.pas',
+  uPSR_menus in 'uPSR_menus.pas',
+  uPSR_std in 'uPSR_std.pas',
+  uPSR_stdctrls in 'uPSR_stdctrls.pas',
+  uPSRuntime in 'uPSRuntime.pas',
+  uPSUtils in 'uPSUtils.pas',
+  uPSC_buttons in 'uPSC_buttons.pas',
+  uPSC_classes in 'uPSC_classes.pas',
+  uPSC_comobj in 'uPSC_comobj.pas',
+  uPSC_controls in 'uPSC_controls.pas',
+  uPSC_dateutils in 'uPSC_dateutils.pas',
+  uPSC_DB in 'uPSC_DB.pas',
+  uPSC_dll in 'uPSC_dll.pas',
+  PascalScript_Core_Reg in 'PascalScript_Core_Reg.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D12.dproj b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D12.dproj
new file mode 100644
index 0000000..788bf29
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D12.dproj	
@@ -0,0 +1,126 @@
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+	<PropertyGroup>
+		<ProjectGuid>{634be604-b73a-4b3d-bc81-719c905199e6}</ProjectGuid>
+		<MainSource>PascalScript_Core_D12.dpk</MainSource>
+		<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+		<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+		<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+		<DCC_DependencyCheckOutputName>..\Dcu\D12\PascalScript_Core_D12.bpl</DCC_DependencyCheckOutputName>
+		<ProjectVersion>11.1</ProjectVersion>
+		<Config Condition="'$(Config)'==''">Base</Config>
+	</PropertyGroup>
+	<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+		<Base>true</Base>
+	</PropertyGroup>
+	<PropertyGroup Condition="'$(Base)'!=''">
+		<DCC_Description>RemObjects Pascal Script - Core Package</DCC_Description>
+		<DCC_DependencyCheckOutputName>..\Dcu\D12\PascalScript_Core_D12.bpl</DCC_DependencyCheckOutputName>
+		<DCC_UnitSearchPath>..\Dcu\D12;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+		<DCC_BplOutput>..\Dcu\D12</DCC_BplOutput>
+		<DCC_DcuOutput>..\Dcu\D12</DCC_DcuOutput>
+		<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+		<GenDll>true</GenDll>
+		<DCC_DcpOutput>..\Dcu\D12</DCC_DcpOutput>
+		<DCC_ImageBase>00400000</DCC_ImageBase>
+		<DesignOnlyPackage>true</DesignOnlyPackage>
+		<GenPackage>true</GenPackage>
+		<DCC_GenerateStackFrames>true</DCC_GenerateStackFrames>
+	</PropertyGroup>
+	<ItemGroup>
+		<DelphiCompile Include="PascalScript_Core_D12.dpk">
+			<MainSource>MainSource</MainSource>
+		</DelphiCompile>
+		<DCCReference Include="rtl.dcp"/>
+		<DCCReference Include="vcl.dcp"/>
+		<DCCReference Include="dbrtl.dcp"/>
+		<DCCReference Include="uPSC_extctrls.pas"/>
+		<DCCReference Include="uPSC_forms.pas"/>
+		<DCCReference Include="uPSC_graphics.pas"/>
+		<DCCReference Include="uPSC_menus.pas"/>
+		<DCCReference Include="uPSC_std.pas"/>
+		<DCCReference Include="uPSC_stdctrls.pas"/>
+		<DCCReference Include="uPSCompiler.pas"/>
+		<DCCReference Include="uPSComponent.pas"/>
+		<DCCReference Include="uPSComponent_COM.pas"/>
+		<DCCReference Include="uPSComponent_Controls.pas"/>
+		<DCCReference Include="uPSComponent_DB.pas"/>
+		<DCCReference Include="uPSComponent_Default.pas"/>
+		<DCCReference Include="uPSComponent_Forms.pas"/>
+		<DCCReference Include="uPSComponent_StdCtrls.pas"/>
+		<DCCReference Include="uPSDebugger.pas"/>
+		<DCCReference Include="uPSDisassembly.pas"/>
+		<DCCReference Include="uPSPreProcessor.pas"/>
+		<DCCReference Include="uPSR_buttons.pas"/>
+		<DCCReference Include="uPSR_classes.pas"/>
+		<DCCReference Include="uPSR_comobj.pas"/>
+		<DCCReference Include="uPSR_controls.pas"/>
+		<DCCReference Include="uPSR_dateutils.pas"/>
+		<DCCReference Include="uPSR_DB.pas"/>
+		<DCCReference Include="uPSR_dll.pas"/>
+		<DCCReference Include="uPSR_extctrls.pas"/>
+		<DCCReference Include="uPSR_forms.pas"/>
+		<DCCReference Include="uPSR_graphics.pas"/>
+		<DCCReference Include="uPSR_menus.pas"/>
+		<DCCReference Include="uPSR_std.pas"/>
+		<DCCReference Include="uPSR_stdctrls.pas"/>
+		<DCCReference Include="uPSRuntime.pas"/>
+		<DCCReference Include="uPSUtils.pas"/>
+		<DCCReference Include="uPSC_buttons.pas"/>
+		<DCCReference Include="uPSC_classes.pas"/>
+		<DCCReference Include="uPSC_comobj.pas"/>
+		<DCCReference Include="uPSC_controls.pas"/>
+		<DCCReference Include="uPSC_dateutils.pas"/>
+		<DCCReference Include="uPSC_DB.pas"/>
+		<DCCReference Include="uPSC_dll.pas"/>
+		<DCCReference Include="PascalScript_Core_Reg.pas"/>
+		<BuildConfiguration Include="Base">
+			<Key>Base</Key>
+		</BuildConfiguration>
+	</ItemGroup>
+	<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+	<ProjectExtensions>
+		<Borland.Personality>Delphi.Personality.12</Borland.Personality>
+		<Borland.ProjectType>Package</Borland.ProjectType>
+		<BorlandProject>
+			<Delphi.Personality>
+				<Parameters>
+					<Parameters Name="UseLauncher">False</Parameters>
+					<Parameters Name="LoadAllSymbols">True</Parameters>
+					<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+				</Parameters>
+				<VersionInfo>
+					<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+					<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+					<VersionInfo Name="MajorVer">3</VersionInfo>
+					<VersionInfo Name="MinorVer">0</VersionInfo>
+					<VersionInfo Name="Release">35</VersionInfo>
+					<VersionInfo Name="Build">741</VersionInfo>
+					<VersionInfo Name="Debug">False</VersionInfo>
+					<VersionInfo Name="PreRelease">False</VersionInfo>
+					<VersionInfo Name="Special">False</VersionInfo>
+					<VersionInfo Name="Private">False</VersionInfo>
+					<VersionInfo Name="DLL">False</VersionInfo>
+					<VersionInfo Name="Locale">1033</VersionInfo>
+					<VersionInfo Name="CodePage">1252</VersionInfo>
+				</VersionInfo>
+				<VersionInfoKeys>
+					<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+					<VersionInfoKeys Name="FileDescription"/>
+					<VersionInfoKeys Name="FileVersion">3.0.35.741</VersionInfoKeys>
+					<VersionInfoKeys Name="InternalName"/>
+					<VersionInfoKeys Name="LegalCopyright"/>
+					<VersionInfoKeys Name="LegalTrademarks"/>
+					<VersionInfoKeys Name="OriginalFilename"/>
+					<VersionInfoKeys Name="ProductName">Pascal Script</VersionInfoKeys>
+					<VersionInfoKeys Name="ProductVersion">3.0.0.0</VersionInfoKeys>
+					<VersionInfoKeys Name="CompileDate">Friday, March 21, 2008 1:24 PM</VersionInfoKeys>
+					<VersionInfoKeys Name="Compile Date">Monday, February 28, 2005 3:33 PM</VersionInfoKeys>
+				</VersionInfoKeys>
+				<Source>
+					<Source Name="MainSource">PascalScript_Core_D12.dpk</Source>
+				</Source>
+			</Delphi.Personality>
+		</BorlandProject>
+		<ProjectFileVersion>12</ProjectFileVersion>
+	</ProjectExtensions>
+</Project>
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D12.res b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D12.res
new file mode 100644
index 0000000..9377a73
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D12.res differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D3.dof b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D3.dof
new file mode 100644
index 0000000..a71ae03
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D3.dof	
@@ -0,0 +1,115 @@
+[FileVersion]
+Version=3.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects Pascal Script - Core Package
+
+[Directories]
+OutputDir=s:\exe
+UnitOutputDir=..\Dcu\D3
+PackageDLLOutputDir=..\Dcu\D3
+PackageDCPOutputDir=..\Dcu\D3
+SearchPath=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+ProductName=Pascal Script
+ProductVersion=3.0.0.0
+FileDescription=
+FileVersion=3.0.2.34
+OriginalFilename=
+
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D3.dpk b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D3.dpk
new file mode 100644
index 0000000..6fa0e11
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D3.dpk	
@@ -0,0 +1,76 @@
+package PascalScript_Core_D3;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Pascal Script - Core Package'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl;
+
+contains
+  uPSC_extctrls in 'uPSC_extctrls.pas',
+  uPSC_forms in 'uPSC_forms.pas',
+  uPSC_graphics in 'uPSC_graphics.pas',
+  uPSC_menus in 'uPSC_menus.pas',
+  uPSC_std in 'uPSC_std.pas',
+  uPSC_stdctrls in 'uPSC_stdctrls.pas',
+  uPSCompiler in 'uPSCompiler.pas',
+  uPSComponent in 'uPSComponent.pas',
+  uPSComponent_COM in 'uPSComponent_COM.pas',
+  uPSComponent_Controls in 'uPSComponent_Controls.pas',
+  uPSComponent_DB in 'uPSComponent_DB.pas',
+  uPSComponent_Default in 'uPSComponent_Default.pas',
+  uPSComponent_Forms in 'uPSComponent_Forms.pas',
+  uPSComponent_StdCtrls in 'uPSComponent_StdCtrls.pas',
+  uPSDebugger in 'uPSDebugger.pas',
+  uPSDisassembly in 'uPSDisassembly.pas',
+  uPSPreProcessor in 'uPSPreProcessor.pas',
+  uPSR_buttons in 'uPSR_buttons.pas',
+  uPSR_classes in 'uPSR_classes.pas',
+  uPSR_comobj in 'uPSR_comobj.pas',
+  uPSR_controls in 'uPSR_controls.pas',
+  uPSR_dateutils in 'uPSR_dateutils.pas',
+  uPSR_DB in 'uPSR_DB.pas',
+  uPSR_dll in 'uPSR_dll.pas',
+  uPSR_extctrls in 'uPSR_extctrls.pas',
+  uPSR_forms in 'uPSR_forms.pas',
+  uPSR_graphics in 'uPSR_graphics.pas',
+  uPSR_menus in 'uPSR_menus.pas',
+  uPSR_std in 'uPSR_std.pas',
+  uPSR_stdctrls in 'uPSR_stdctrls.pas',
+  uPSRuntime in 'uPSRuntime.pas',
+  uPSUtils in 'uPSUtils.pas',
+  uPSC_buttons in 'uPSC_buttons.pas',
+  uPSC_classes in 'uPSC_classes.pas',
+  uPSC_comobj in 'uPSC_comobj.pas',
+  uPSC_controls in 'uPSC_controls.pas',
+  uPSC_dateutils in 'uPSC_dateutils.pas',
+  uPSC_DB in 'uPSC_DB.pas',
+  uPSC_dll in 'uPSC_dll.pas',
+  PascalScript_Core_Reg in 'PascalScript_Core_Reg.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D4.dof b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D4.dof
new file mode 100644
index 0000000..735a460
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D4.dof	
@@ -0,0 +1,114 @@
+[FileVersion]
+Version=4.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects Pascal Script - Core Package
+
+[Directories]
+UnitOutputDir=..\Dcu\D4
+PackageDLLOutputDir=..\Dcu\D4
+PackageDCPOutputDir=..\Dcu\D4
+SearchPath=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+ProductName=Pascal Script
+ProductVersion=3.0.0.0
+FileDescription=
+FileVersion=3.0.2.34
+OriginalFilename=
+
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D4.dpk b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D4.dpk
new file mode 100644
index 0000000..d300a0e
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D4.dpk	
@@ -0,0 +1,76 @@
+package PascalScript_Core_D4
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Pascal Script - Core Package'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl;
+
+contains
+  uPSC_extctrls in 'uPSC_extctrls.pas',
+  uPSC_forms in 'uPSC_forms.pas',
+  uPSC_graphics in 'uPSC_graphics.pas',
+  uPSC_menus in 'uPSC_menus.pas',
+  uPSC_std in 'uPSC_std.pas',
+  uPSC_stdctrls in 'uPSC_stdctrls.pas',
+  uPSCompiler in 'uPSCompiler.pas',
+  uPSComponent in 'uPSComponent.pas',
+  uPSComponent_COM in 'uPSComponent_COM.pas',
+  uPSComponent_Controls in 'uPSComponent_Controls.pas',
+  uPSComponent_DB in 'uPSComponent_DB.pas',
+  uPSComponent_Default in 'uPSComponent_Default.pas',
+  uPSComponent_Forms in 'uPSComponent_Forms.pas',
+  uPSComponent_StdCtrls in 'uPSComponent_StdCtrls.pas',
+  uPSDebugger in 'uPSDebugger.pas',
+  uPSDisassembly in 'uPSDisassembly.pas',
+  uPSPreProcessor in 'uPSPreProcessor.pas',
+  uPSR_buttons in 'uPSR_buttons.pas',
+  uPSR_classes in 'uPSR_classes.pas',
+  uPSR_comobj in 'uPSR_comobj.pas',
+  uPSR_controls in 'uPSR_controls.pas',
+  uPSR_dateutils in 'uPSR_dateutils.pas',
+  uPSR_DB in 'uPSR_DB.pas',
+  uPSR_dll in 'uPSR_dll.pas',
+  uPSR_extctrls in 'uPSR_extctrls.pas',
+  uPSR_forms in 'uPSR_forms.pas',
+  uPSR_graphics in 'uPSR_graphics.pas',
+  uPSR_menus in 'uPSR_menus.pas',
+  uPSR_std in 'uPSR_std.pas',
+  uPSR_stdctrls in 'uPSR_stdctrls.pas',
+  uPSRuntime in 'uPSRuntime.pas',
+  uPSUtils in 'uPSUtils.pas',
+  uPSC_buttons in 'uPSC_buttons.pas',
+  uPSC_classes in 'uPSC_classes.pas',
+  uPSC_comobj in 'uPSC_comobj.pas',
+  uPSC_controls in 'uPSC_controls.pas',
+  uPSC_dateutils in 'uPSC_dateutils.pas',
+  uPSC_DB in 'uPSC_DB.pas',
+  uPSC_dll in 'uPSC_dll.pas',
+  PascalScript_Core_Reg in 'PascalScript_Core_Reg.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D5.dof b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D5.dof
new file mode 100644
index 0000000..5b2a54e
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D5.dof	
@@ -0,0 +1,114 @@
+[FileVersion]
+Version=5.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects Pascal Script - Core Package
+
+[Directories]
+UnitOutputDir=..\Dcu\D5
+PackageDLLOutputDir=..\Dcu\D5
+PackageDCPOutputDir=..\Dcu\D5
+SearchPath=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+ProductName=Pascal Script
+ProductVersion=3.0.0.0
+FileDescription=
+FileVersion=3.0.2.34
+OriginalFilename=
+
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D5.dpk b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D5.dpk
new file mode 100644
index 0000000..6c09f9a
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D5.dpk	
@@ -0,0 +1,76 @@
+package PascalScript_Core_D5;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Pascal Script - Core Package'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl;
+
+contains
+  uPSC_extctrls in 'uPSC_extctrls.pas',
+  uPSC_forms in 'uPSC_forms.pas',
+  uPSC_graphics in 'uPSC_graphics.pas',
+  uPSC_menus in 'uPSC_menus.pas',
+  uPSC_std in 'uPSC_std.pas',
+  uPSC_stdctrls in 'uPSC_stdctrls.pas',
+  uPSCompiler in 'uPSCompiler.pas',
+  uPSComponent in 'uPSComponent.pas',
+  uPSComponent_COM in 'uPSComponent_COM.pas',
+  uPSComponent_Controls in 'uPSComponent_Controls.pas',
+  uPSComponent_DB in 'uPSComponent_DB.pas',
+  uPSComponent_Default in 'uPSComponent_Default.pas',
+  uPSComponent_Forms in 'uPSComponent_Forms.pas',
+  uPSComponent_StdCtrls in 'uPSComponent_StdCtrls.pas',
+  uPSDebugger in 'uPSDebugger.pas',
+  uPSDisassembly in 'uPSDisassembly.pas',
+  uPSPreProcessor in 'uPSPreProcessor.pas',
+  uPSR_buttons in 'uPSR_buttons.pas',
+  uPSR_classes in 'uPSR_classes.pas',
+  uPSR_comobj in 'uPSR_comobj.pas',
+  uPSR_controls in 'uPSR_controls.pas',
+  uPSR_dateutils in 'uPSR_dateutils.pas',
+  uPSR_DB in 'uPSR_DB.pas',
+  uPSR_dll in 'uPSR_dll.pas',
+  uPSR_extctrls in 'uPSR_extctrls.pas',
+  uPSR_forms in 'uPSR_forms.pas',
+  uPSR_graphics in 'uPSR_graphics.pas',
+  uPSR_menus in 'uPSR_menus.pas',
+  uPSR_std in 'uPSR_std.pas',
+  uPSR_stdctrls in 'uPSR_stdctrls.pas',
+  uPSRuntime in 'uPSRuntime.pas',
+  uPSUtils in 'uPSUtils.pas',
+  uPSC_buttons in 'uPSC_buttons.pas',
+  uPSC_classes in 'uPSC_classes.pas',
+  uPSC_comobj in 'uPSC_comobj.pas',
+  uPSC_controls in 'uPSC_controls.pas',
+  uPSC_dateutils in 'uPSC_dateutils.pas',
+  uPSC_DB in 'uPSC_DB.pas',
+  uPSC_dll in 'uPSC_dll.pas',
+  PascalScript_Core_Reg in 'PascalScript_Core_Reg.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D6.dof b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D6.dof
new file mode 100644
index 0000000..8c2de7b
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D6.dof	
@@ -0,0 +1,120 @@
+[FileVersion]
+Version=6.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects Pascal Script - Core Package
+
+[Directories]
+UnitOutputDir=..\Dcu\D6
+PackageDLLOutputDir=..\Dcu\D6
+PackageDCPOutputDir=..\Dcu\D6
+SearchPath=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+ProductName=Pascal Script
+ProductVersion=3.0.0.0
+FileDescription=
+FileVersion=3.0.35.741
+OriginalFilename=
+
+[Version Info]
+IncludeVerInfo=1
+MajorVer=3
+MinorVer=0
+Release=35
+Build=741
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D6.dpk b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D6.dpk
new file mode 100644
index 0000000..4bf9c7b
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D6.dpk	
@@ -0,0 +1,76 @@
+package PascalScript_Core_D6;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Pascal Script - Core Package'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl;
+
+contains
+  uPSC_extctrls in 'uPSC_extctrls.pas',
+  uPSC_forms in 'uPSC_forms.pas',
+  uPSC_graphics in 'uPSC_graphics.pas',
+  uPSC_menus in 'uPSC_menus.pas',
+  uPSC_std in 'uPSC_std.pas',
+  uPSC_stdctrls in 'uPSC_stdctrls.pas',
+  uPSCompiler in 'uPSCompiler.pas',
+  uPSComponent in 'uPSComponent.pas',
+  uPSComponent_COM in 'uPSComponent_COM.pas',
+  uPSComponent_Controls in 'uPSComponent_Controls.pas',
+  uPSComponent_DB in 'uPSComponent_DB.pas',
+  uPSComponent_Default in 'uPSComponent_Default.pas',
+  uPSComponent_Forms in 'uPSComponent_Forms.pas',
+  uPSComponent_StdCtrls in 'uPSComponent_StdCtrls.pas',
+  uPSDebugger in 'uPSDebugger.pas',
+  uPSDisassembly in 'uPSDisassembly.pas',
+  uPSPreProcessor in 'uPSPreProcessor.pas',
+  uPSR_buttons in 'uPSR_buttons.pas',
+  uPSR_classes in 'uPSR_classes.pas',
+  uPSR_comobj in 'uPSR_comobj.pas',
+  uPSR_controls in 'uPSR_controls.pas',
+  uPSR_dateutils in 'uPSR_dateutils.pas',
+  uPSR_DB in 'uPSR_DB.pas',
+  uPSR_dll in 'uPSR_dll.pas',
+  uPSR_extctrls in 'uPSR_extctrls.pas',
+  uPSR_forms in 'uPSR_forms.pas',
+  uPSR_graphics in 'uPSR_graphics.pas',
+  uPSR_menus in 'uPSR_menus.pas',
+  uPSR_std in 'uPSR_std.pas',
+  uPSR_stdctrls in 'uPSR_stdctrls.pas',
+  uPSRuntime in 'uPSRuntime.pas',
+  uPSUtils in 'uPSUtils.pas',
+  uPSC_buttons in 'uPSC_buttons.pas',
+  uPSC_classes in 'uPSC_classes.pas',
+  uPSC_comobj in 'uPSC_comobj.pas',
+  uPSC_controls in 'uPSC_controls.pas',
+  uPSC_dateutils in 'uPSC_dateutils.pas',
+  uPSC_DB in 'uPSC_DB.pas',
+  uPSC_dll in 'uPSC_dll.pas',
+  PascalScript_Core_Reg in 'PascalScript_Core_Reg.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D6.res b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D6.res
new file mode 100644
index 0000000..9377a73
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D6.res differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D7.dof b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D7.dof
new file mode 100644
index 0000000..38bd460
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D7.dof	
@@ -0,0 +1,123 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects Pascal Script - Core Package
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\Dcu\D7
+PackageDLLOutputDir=..\Dcu\D7
+PackageDCPOutputDir=..\Dcu\D7
+SearchPath=
+Packages=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+ProductName=Pascal Script
+ProductVersion=3.0.0.0
+FileDescription=
+FileVersion=3.0.35.741
+OriginalFilename=
+CompileDate=Tuesday, March 21, 2006 1:32 PM
+
+[Version Info]
+IncludeVerInfo=1
+MajorVer=3
+MinorVer=0
+Release=35
+Build=741
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D7.dpk b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D7.dpk
new file mode 100644
index 0000000..4695586
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D7.dpk	
@@ -0,0 +1,76 @@
+package PascalScript_Core_D7;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Pascal Script - Core Package'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl;
+
+contains
+  uPSC_extctrls in 'uPSC_extctrls.pas',
+  uPSC_forms in 'uPSC_forms.pas',
+  uPSC_graphics in 'uPSC_graphics.pas',
+  uPSC_menus in 'uPSC_menus.pas',
+  uPSC_std in 'uPSC_std.pas',
+  uPSC_stdctrls in 'uPSC_stdctrls.pas',
+  uPSCompiler in 'uPSCompiler.pas',
+  uPSComponent in 'uPSComponent.pas',
+  uPSComponent_COM in 'uPSComponent_COM.pas',
+  uPSComponent_Controls in 'uPSComponent_Controls.pas',
+  uPSComponent_DB in 'uPSComponent_DB.pas',
+  uPSComponent_Default in 'uPSComponent_Default.pas',
+  uPSComponent_Forms in 'uPSComponent_Forms.pas',
+  uPSComponent_StdCtrls in 'uPSComponent_StdCtrls.pas',
+  uPSDebugger in 'uPSDebugger.pas',
+  uPSDisassembly in 'uPSDisassembly.pas',
+  uPSPreProcessor in 'uPSPreProcessor.pas',
+  uPSR_buttons in 'uPSR_buttons.pas',
+  uPSR_classes in 'uPSR_classes.pas',
+  uPSR_comobj in 'uPSR_comobj.pas',
+  uPSR_controls in 'uPSR_controls.pas',
+  uPSR_dateutils in 'uPSR_dateutils.pas',
+  uPSR_DB in 'uPSR_DB.pas',
+  uPSR_dll in 'uPSR_dll.pas',
+  uPSR_extctrls in 'uPSR_extctrls.pas',
+  uPSR_forms in 'uPSR_forms.pas',
+  uPSR_graphics in 'uPSR_graphics.pas',
+  uPSR_menus in 'uPSR_menus.pas',
+  uPSR_std in 'uPSR_std.pas',
+  uPSR_stdctrls in 'uPSR_stdctrls.pas',
+  uPSRuntime in 'uPSRuntime.pas',
+  uPSUtils in 'uPSUtils.pas',
+  uPSC_buttons in 'uPSC_buttons.pas',
+  uPSC_classes in 'uPSC_classes.pas',
+  uPSC_comobj in 'uPSC_comobj.pas',
+  uPSC_controls in 'uPSC_controls.pas',
+  uPSC_dateutils in 'uPSC_dateutils.pas',
+  uPSC_DB in 'uPSC_DB.pas',
+  uPSC_dll in 'uPSC_dll.pas',
+  PascalScript_Core_Reg in 'PascalScript_Core_Reg.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D7.res b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D7.res
new file mode 100644
index 0000000..9377a73
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_D7.res differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_Glyphs.RES b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_Glyphs.RES
new file mode 100644
index 0000000..aa4c040
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_Glyphs.RES differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_K3.dpk b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_K3.dpk
new file mode 100644
index 0000000..bbc6bb3
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_K3.dpk	
@@ -0,0 +1,76 @@
+package PascalScript_Core_K3;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Pascal Script - Core Package'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  dbrtl;
+
+contains
+  uPSC_extctrls in 'uPSC_extctrls.pas',
+  uPSC_forms in 'uPSC_forms.pas',
+  uPSC_graphics in 'uPSC_graphics.pas',
+  uPSC_menus in 'uPSC_menus.pas',
+  uPSC_std in 'uPSC_std.pas',
+  uPSC_stdctrls in 'uPSC_stdctrls.pas',
+  uPSCompiler in 'uPSCompiler.pas',
+  uPSComponent in 'uPSComponent.pas',
+  uPSComponent_COM in 'uPSComponent_COM.pas',
+  uPSComponent_Controls in 'uPSComponent_Controls.pas',
+  uPSComponent_DB in 'uPSComponent_DB.pas',
+  uPSComponent_Default in 'uPSComponent_Default.pas',
+  uPSComponent_Forms in 'uPSComponent_Forms.pas',
+  uPSComponent_StdCtrls in 'uPSComponent_StdCtrls.pas',
+  uPSDebugger in 'uPSDebugger.pas',
+  uPSDisassembly in 'uPSDisassembly.pas',
+  uPSPreProcessor in 'uPSPreProcessor.pas',
+  uPSR_buttons in 'uPSR_buttons.pas',
+  uPSR_classes in 'uPSR_classes.pas',
+  uPSR_comobj in 'uPSR_comobj.pas',
+  uPSR_controls in 'uPSR_controls.pas',
+  uPSR_dateutils in 'uPSR_dateutils.pas',
+  uPSR_DB in 'uPSR_DB.pas',
+  uPSR_dll in 'uPSR_dll.pas',
+  uPSR_extctrls in 'uPSR_extctrls.pas',
+  UPSR_forms in 'uPSR_forms.pas',
+  UPSR_graphics in 'uPSR_graphics.pas',
+  uPSR_menus in 'uPSR_menus.pas',
+  uPSR_std in 'uPSR_std.pas',
+  uPSR_stdctrls in 'uPSR_stdctrls.pas',
+  uPSRuntime in 'uPSRuntime.pas',
+  uPSUtils in 'uPSUtils.pas',
+  uPSC_buttons in 'uPSC_buttons.pas',
+  uPSC_classes in 'uPSC_classes.pas',
+  uPSC_comobj in 'uPSC_comobj.pas',
+  uPSC_controls in 'uPSC_controls.pas',
+  uPSC_dateutils in 'uPSC_dateutils.pas',
+  uPSC_DB in 'uPSC_DB.pas',
+  uPSC_dll in 'uPSC_dll.pas',
+  PascalScript_Core_Reg in 'PascalScript_Core_Reg.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_K3.kof b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_K3.kof
new file mode 100644
index 0000000..ee8a4da
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_K3.kof	
@@ -0,0 +1,114 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects Pascal Script - Core Package
+
+[Directories]
+UnitOutputDir=../Dcu/K3
+PackageDLLOutputDir=../Dcu/K3
+PackageDCPOutputDir=../Dcu/K3
+SearchPath=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+ProductName=Pascal Script
+ProductVersion=3.0.0.0
+FileDescription=
+FileVersion=3.0.2.34
+OriginalFilename=
+
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_Reg.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_Reg.pas
new file mode 100644
index 0000000..5987b51
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_Core_Reg.pas	
@@ -0,0 +1,65 @@
+unit PascalScript_Core_Reg;
+
+{----------------------------------------------------------------------------
+/ RemObjects Pascal Script
+/
+/ compiler: Delphi 2 and up, Kylix 3 and up
+/ platform: Win32, Linux
+/
+/ (c)opyright RemObjects Software. all rights reserved.
+/
+----------------------------------------------------------------------------}
+
+{$I PascalScript.inc}
+
+interface
+
+{$IFNDEF FPC}
+{$R PascalScript_Core_Glyphs.res}
+{$ENDIF}
+
+procedure Register;
+
+implementation
+
+uses
+  Classes,
+  {$IFDEF FPC}
+   LResources,
+  {$ENDIF}
+  uPSComponent,
+  uPSDebugger,
+  uPSComponent_Default,
+ {$IFNDEF FPC}
+  uPSComponent_COM,
+ {$ENDIF}
+  uPSComponent_DB,
+  uPSComponent_Forms,
+  uPSComponent_Controls,
+  uPSComponent_StdCtrls;
+
+procedure Register;
+begin
+  RegisterComponents('Pascal Script', [TPSScript,
+                                       TPSScriptDebugger,
+                                       TPSDllPlugin,
+                                       TPSImport_Classes,
+                                       TPSImport_DateUtils,
+                                       {$IFNDEF FPC}
+                                       TPSImport_ComObj,
+                                       {$ENDIF}
+                                       TPSImport_DB,
+                                       TPSImport_Forms,
+                                       TPSImport_Controls,
+                                       TPSImport_StdCtrls,
+                                       TPSCustumPlugin]);
+end;
+
+
+{$IFDEF FPC}
+ initialization;
+ {$i pascalscript.lrs}
+{$ENDIF}
+
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D10.bdsproj b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D10.bdsproj
new file mode 100644
index 0000000..69c8b3c
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D10.bdsproj	
@@ -0,0 +1,179 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality">Delphi.Personality</Option>
+			<Option Name="ProjectType"></Option>
+			<Option Name="Version">1.0</Option>
+			<Option Name="GUID">{5B47E7C8-6AAF-4215-8EC3-60B739B2B5F3}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource">PascalScript_RO_D10.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A">8</Compiler>
+			<Compiler Name="B">0</Compiler>
+			<Compiler Name="C">1</Compiler>
+			<Compiler Name="D">1</Compiler>
+			<Compiler Name="E">0</Compiler>
+			<Compiler Name="F">0</Compiler>
+			<Compiler Name="G">1</Compiler>
+			<Compiler Name="H">1</Compiler>
+			<Compiler Name="I">1</Compiler>
+			<Compiler Name="J">0</Compiler>
+			<Compiler Name="K">0</Compiler>
+			<Compiler Name="L">1</Compiler>
+			<Compiler Name="M">0</Compiler>
+			<Compiler Name="N">1</Compiler>
+			<Compiler Name="O">1</Compiler>
+			<Compiler Name="P">1</Compiler>
+			<Compiler Name="Q">0</Compiler>
+			<Compiler Name="R">0</Compiler>
+			<Compiler Name="S">0</Compiler>
+			<Compiler Name="T">0</Compiler>
+			<Compiler Name="U">0</Compiler>
+			<Compiler Name="V">1</Compiler>
+			<Compiler Name="W">1</Compiler>
+			<Compiler Name="X">1</Compiler>
+			<Compiler Name="Y">1</Compiler>
+			<Compiler Name="Z">1</Compiler>
+			<Compiler Name="ShowHints">True</Compiler>
+			<Compiler Name="ShowWarnings">True</Compiler>
+			<Compiler Name="UnitAliases"></Compiler>
+			<Compiler Name="NamespacePrefix"></Compiler>
+			<Compiler Name="GenerateDocumentation">False</Compiler>
+			<Compiler Name="DefaultNamespace"></Compiler>
+			<Compiler Name="SymbolDeprecated">False</Compiler>
+			<Compiler Name="SymbolLibrary">False</Compiler>
+			<Compiler Name="SymbolPlatform">False</Compiler>
+			<Compiler Name="SymbolExperimental">False</Compiler>
+			<Compiler Name="UnitLibrary">False</Compiler>
+			<Compiler Name="UnitPlatform">False</Compiler>
+			<Compiler Name="UnitDeprecated">False</Compiler>
+			<Compiler Name="UnitExperimental">False</Compiler>
+			<Compiler Name="HResultCompat">True</Compiler>
+			<Compiler Name="HidingMember">True</Compiler>
+			<Compiler Name="HiddenVirtual">True</Compiler>
+			<Compiler Name="Garbage">True</Compiler>
+			<Compiler Name="BoundsError">True</Compiler>
+			<Compiler Name="ZeroNilCompat">True</Compiler>
+			<Compiler Name="StringConstTruncated">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar">True</Compiler>
+			<Compiler Name="TypedConstVarPar">True</Compiler>
+			<Compiler Name="AsgToTypedConst">True</Compiler>
+			<Compiler Name="CaseLabelRange">True</Compiler>
+			<Compiler Name="ForVariable">True</Compiler>
+			<Compiler Name="ConstructingAbstract">True</Compiler>
+			<Compiler Name="ComparisonFalse">True</Compiler>
+			<Compiler Name="ComparisonTrue">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned">True</Compiler>
+			<Compiler Name="UnsupportedConstruct">True</Compiler>
+			<Compiler Name="FileOpen">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc">True</Compiler>
+			<Compiler Name="BadGlobalSymbol">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor">True</Compiler>
+			<Compiler Name="InvalidDirective">True</Compiler>
+			<Compiler Name="PackageNoLink">True</Compiler>
+			<Compiler Name="PackageThreadVar">True</Compiler>
+			<Compiler Name="ImplicitImport">True</Compiler>
+			<Compiler Name="HPPEMITIgnored">True</Compiler>
+			<Compiler Name="NoRetVal">True</Compiler>
+			<Compiler Name="UseBeforeDef">True</Compiler>
+			<Compiler Name="ForLoopVarUndef">True</Compiler>
+			<Compiler Name="UnitNameMismatch">True</Compiler>
+			<Compiler Name="NoCFGFileFound">True</Compiler>
+			<Compiler Name="MessageDirective">True</Compiler>
+			<Compiler Name="ImplicitVariants">True</Compiler>
+			<Compiler Name="UnicodeToLocale">True</Compiler>
+			<Compiler Name="LocaleToUnicode">True</Compiler>
+			<Compiler Name="ImagebaseMultiple">True</Compiler>
+			<Compiler Name="SuspiciousTypecast">True</Compiler>
+			<Compiler Name="PrivatePropAccessor">True</Compiler>
+			<Compiler Name="UnsafeType">False</Compiler>
+			<Compiler Name="UnsafeCode">False</Compiler>
+			<Compiler Name="UnsafeCast">False</Compiler>
+			<Compiler Name="OptionTruncated">True</Compiler>
+			<Compiler Name="WideCharReduced">True</Compiler>
+			<Compiler Name="DuplicatesIgnored">True</Compiler>
+			<Compiler Name="UnitInitSeq">True</Compiler>
+			<Compiler Name="LocalPInvoke">True</Compiler>
+			<Compiler Name="CodePage"></Compiler>
+		</Compiler>
+		<Linker>
+			<Linker Name="MapFile">0</Linker>
+			<Linker Name="OutputObjs">0</Linker>
+			<Linker Name="ConsoleApp">1</Linker>
+			<Linker Name="DebugInfo">False</Linker>
+			<Linker Name="RemoteSymbols">False</Linker>
+			<Linker Name="GenerateDRC">False</Linker>
+			<Linker Name="MinStackSize">16384</Linker>
+			<Linker Name="MaxStackSize">1048576</Linker>
+			<Linker Name="ImageBase">4194304</Linker>
+			<Linker Name="ExeDescription">RemObjects Pascal Script - RemObjects SDK 3.0 Integration</Linker>
+			<Linker Name="GenerateHpps">False</Linker>
+		</Linker>
+		<Directories>
+			<Directories Name="OutputDir"></Directories>
+			<Directories Name="UnitOutputDir">..\Dcu\D9</Directories>
+			<Directories Name="PackageDLLOutputDir">..\Dcu\D9</Directories>
+			<Directories Name="PackageDCPOutputDir"></Directories>
+			<Directories Name="SearchPath">..\Dcu\D9;$(BDS)\lib\Indy9;..\..\RemObjects SDK for Dephi\Dcu\D9</Directories>
+			<Directories Name="Packages"></Directories>
+			<Directories Name="Conditionals"></Directories>
+			<Directories Name="DebugSourceDirs"></Directories>
+			<Directories Name="UsePackages">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams"></Parameters>
+			<Parameters Name="HostApplication"></Parameters>
+			<Parameters Name="Launcher"></Parameters>
+			<Parameters Name="UseLauncher">False</Parameters>
+			<Parameters Name="DebugCWD"></Parameters>
+			<Parameters Name="RemoteHost"></Parameters>
+			<Parameters Name="RemotePath"></Parameters>
+			<Parameters Name="RemoteLauncher"></Parameters>
+			<Parameters Name="RemoteCWD"></Parameters>
+			<Parameters Name="RemoteDebug">False</Parameters>
+			<Parameters Name="Debug Symbols Search Path"></Parameters>
+			<Parameters Name="LoadAllSymbols">True</Parameters>
+			<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+		</Parameters>
+		<Language>
+			<Language Name="ActiveLang"></Language>
+			<Language Name="ProjectLang">$00000000</Language>
+			<Language Name="RootDir"></Language>
+		</Language>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo">741</VersionInfo>
+			<VersionInfo Name="AutoIncBuild">0</VersionInfo>
+			<VersionInfo Name="MajorVer">3</VersionInfo>
+			<VersionInfo Name="MinorVer">0</VersionInfo>
+			<VersionInfo Name="Release">6</VersionInfo>
+			<VersionInfo Name="Build">442</VersionInfo>
+			<VersionInfo Name="Debug">0</VersionInfo>
+			<VersionInfo Name="PreRelease">0</VersionInfo>
+			<VersionInfo Name="Special">0</VersionInfo>
+			<VersionInfo Name="Private">0</VersionInfo>
+			<VersionInfo Name="DLL">0</VersionInfo>
+			<VersionInfo Name="Locale">1033</VersionInfo>
+			<VersionInfo Name="CodePage">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName">3.0.35.741</VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion">3.0.6.442</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName">Pascal Script</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion">3.0.0.0</VersionInfoKeys>
+			<VersionInfoKeys Name="CompileDate">Tuesday, March 21, 2006 1:32 PM</VersionInfoKeys></VersionInfoKeys>
+	</Delphi.Personality>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D10.cfg b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D10.cfg
new file mode 100644
index 0000000..347e85d
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D10.cfg	
@@ -0,0 +1,50 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N0"..\Dcu\D10"
+-LE"..\Dcu\D10"
+-U"..\Dcu\D10;c:\program files\borland\bds\4.0\lib\Indy9;..\..\RemObjects SDK for Dephi\Dcu\D10"
+-O"..\Dcu\D10;c:\program files\borland\bds\4.0\lib\Indy9;..\..\RemObjects SDK for Dephi\Dcu\D10"
+-I"..\Dcu\D10;c:\program files\borland\bds\4.0\lib\Indy9;..\..\RemObjects SDK for Dephi\Dcu\D10"
+-R"..\Dcu\D10;c:\program files\borland\bds\4.0\lib\Indy9;..\..\RemObjects SDK for Dephi\Dcu\D10"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-SYMBOL_EXPERIMENTAL
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNIT_EXPERIMENTAL
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D10.dpk b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D10.dpk
new file mode 100644
index 0000000..414bd0c
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D10.dpk	
@@ -0,0 +1,47 @@
+package PascalScript_RO_D10;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Pascal Script - RemObjects SDK 4.0 Integration'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  {$IFDEF RemObjects_INDY9}
+  Indy,
+  {$ELSE}
+  IndyCore, IndySystem, IndyProtocols,
+  {$ENDIF}
+  PascalScript_Core_D10,
+  RemObjects_Core_D10,
+  RemObjects_Indy_D10,
+  dbrtl,
+  vcl,
+  vclx;
+
+contains
+  PascalScript_RO_Reg in 'PascalScript_RO_Reg.pas',
+  uROPSServerLink in 'uROPSServerLink.pas',
+  uROPSImports in 'uROPSImports.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D11.dpk b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D11.dpk
new file mode 100644
index 0000000..f0e2e8a
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D11.dpk	
@@ -0,0 +1,47 @@
+package PascalScript_RO_D11;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Pascal Script - RemObjects SDK 5.0 Integration'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  {$IFDEF RemObjects_INDY9}
+  Indy,
+  {$ELSE}
+  IndyCore, IndySystem, IndyProtocols,
+  {$ENDIF}
+  PascalScript_Core_D11,
+  RemObjects_Core_D11,
+  RemObjects_Indy_D11,
+  dbrtl,
+  vcl,
+  vclx;
+
+contains
+  PascalScript_RO_Reg in 'PascalScript_RO_Reg.pas',
+  uROPSServerLink in 'uROPSServerLink.pas',
+  uROPSImports in 'uROPSImports.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D11.dproj b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D11.dproj
new file mode 100644
index 0000000..42359d3
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D11.dproj	
@@ -0,0 +1,81 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+	<PropertyGroup>
+		<ProjectGuid>{0eefdf9b-7853-40e5-9b29-b631f51beeda}</ProjectGuid>
+		<MainSource>PascalScript_RO_D11.dpk</MainSource>
+		<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+		<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+		<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+		<DCC_DependencyCheckOutputName>..\Dcu\D11\PascalScript_RO_D11.bpl</DCC_DependencyCheckOutputName>
+	</PropertyGroup>
+	<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+		<Version>7.0</Version>
+		<DCC_DebugInformation>False</DCC_DebugInformation>
+		<DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+		<DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+		<DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+		<DCC_DcuOutput>..\Dcu\D9</DCC_DcuOutput>
+		<DCC_ObjOutput>..\Dcu\D9</DCC_ObjOutput>
+		<DCC_HppOutput>..\Dcu\D9</DCC_HppOutput>
+		<DCC_BplOutput>..\Dcu\D9</DCC_BplOutput>
+		<DCC_UnitSearchPath>..\Dcu\D9;$(BDS)\lib\Indy9;..\..\RemObjects SDK for Dephi\Dcu\D9</DCC_UnitSearchPath>
+		<DCC_ResourcePath>..\Dcu\D9;$(BDS)\lib\Indy9;..\..\RemObjects SDK for Dephi\Dcu\D9</DCC_ResourcePath>
+		<DCC_ObjPath>..\Dcu\D9;$(BDS)\lib\Indy9;..\..\RemObjects SDK for Dephi\Dcu\D9</DCC_ObjPath>
+		<DCC_IncludePath>..\Dcu\D9;$(BDS)\lib\Indy9;..\..\RemObjects SDK for Dephi\Dcu\D9</DCC_IncludePath>
+		<DCC_Define>RELEASE</DCC_Define>
+		<DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+		<DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+		<DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+		<DCC_SYMBOL_EXPERIMENTAL>False</DCC_SYMBOL_EXPERIMENTAL>
+		<DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+		<DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+		<DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+		<DCC_UNIT_EXPERIMENTAL>False</DCC_UNIT_EXPERIMENTAL>
+	</PropertyGroup>
+	<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+		<Version>7.0</Version>
+		<DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+		<DCC_DcuOutput>..\Dcu\D11</DCC_DcuOutput>
+		<DCC_ObjOutput>..\Dcu\D11</DCC_ObjOutput>
+		<DCC_HppOutput>..\Dcu\D11</DCC_HppOutput>
+		<DCC_BplOutput>..\Dcu\D11</DCC_BplOutput>
+		<DCC_UnitSearchPath>..\Dcu\D11;..\..\RemObjects SDK for Dephi\Dcu\D11</DCC_UnitSearchPath>
+		<DCC_ResourcePath>..\Dcu\D11;..\..\RemObjects SDK for Dephi\Dcu\D11</DCC_ResourcePath>
+		<DCC_ObjPath>..\Dcu\D11;..\..\RemObjects SDK for Dephi\Dcu\D11</DCC_ObjPath>
+		<DCC_IncludePath>..\Dcu\D11;..\..\RemObjects SDK for Dephi\Dcu\D11</DCC_IncludePath>
+		<DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+		<DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+		<DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+		<DCC_SYMBOL_EXPERIMENTAL>False</DCC_SYMBOL_EXPERIMENTAL>
+		<DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+		<DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+		<DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+		<DCC_UNIT_EXPERIMENTAL>False</DCC_UNIT_EXPERIMENTAL>
+		<DCC_DcpOutput>..\Dcu\D11</DCC_DcpOutput>
+	</PropertyGroup>
+	<ProjectExtensions>
+		<Borland.Personality>Delphi.Personality</Borland.Personality>
+		<Borland.ProjectType>Package</Borland.ProjectType>
+		<BorlandProject>
+			<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">RemObjects Pascal Script - RemObjects SDK 5.0 Integration</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">3</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">35</VersionInfo><VersionInfo Name="Build">741</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">3.0.35.741</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">Pascal Script</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">3.0.0.0</VersionInfoKeys><VersionInfoKeys Name="CompileDate">Tuesday, March 21, 2006 1:32 PM</VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">PascalScript_RO_D11.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
+	</ProjectExtensions>
+	<Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets"/>
+	<ItemGroup>
+		<DelphiCompile Include="PascalScript_RO_D11.dpk">
+			<MainSource>MainSource</MainSource>
+		</DelphiCompile>
+		<DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\dbrtl.dcp"/>
+		<DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\IndyCore.dcp"/>
+		<DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\IndyProtocols.dcp"/>
+		<DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\IndySystem.dcp"/>
+		<DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\PascalScript_Core_D11.dcp"/>
+		<DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\RemObjects_Core_D11.dcp"/>
+		<DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\RemObjects_Indy_D11.dcp"/>
+		<DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\rtl.dcp"/>
+		<DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\vcl.dcp"/>
+		<DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\vclx.dcp"/>
+		<DCCReference Include="PascalScript_RO_Reg.pas"/>
+		<DCCReference Include="uROPSImports.pas"/>
+		<DCCReference Include="uROPSServerLink.pas"/>
+	</ItemGroup>
+</Project>
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D12.dpk b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D12.dpk
new file mode 100644
index 0000000..25dd8aa
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D12.dpk	
@@ -0,0 +1,47 @@
+package PascalScript_RO_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Pascal Script - RemObjects SDK 5.0 Integration'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  {$IFDEF RemObjects_INDY9}
+  Indy,
+  {$ELSE}
+  IndyCore, IndySystem, IndyProtocols,
+  {$ENDIF}
+  PascalScript_Core_D12,
+  RemObjects_Core_D12,
+  RemObjects_Indy_D12,
+  dbrtl,
+  vcl,
+  vclx;
+
+contains
+  PascalScript_RO_Reg in 'PascalScript_RO_Reg.pas',
+  uROPSServerLink in 'uROPSServerLink.pas',
+  uROPSImports in 'uROPSImports.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D12.dproj b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D12.dproj
new file mode 100644
index 0000000..2f4116a
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D12.dproj	
@@ -0,0 +1,103 @@
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+	<PropertyGroup>
+		<ProjectGuid>{0eefdf9b-7853-40e5-9b29-b631f51beeda}</ProjectGuid>
+		<MainSource>PascalScript_RO_D12.dpk</MainSource>
+		<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+		<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+		<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+		<DCC_DependencyCheckOutputName>..\Dcu\D12\PascalScript_RO_D12.bpl</DCC_DependencyCheckOutputName>
+		<ProjectVersion>11.1</ProjectVersion>
+		<Config Condition="'$(Config)'==''">Base</Config>
+	</PropertyGroup>
+	<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+		<Base>true</Base>
+	</PropertyGroup>
+	<PropertyGroup Condition="'$(Base)'!=''">
+		<DCC_CVT_WIDENING_STRING_LOST>error</DCC_CVT_WIDENING_STRING_LOST>
+		<DCC_IMPLICIT_STRING_CAST_LOSS>error</DCC_IMPLICIT_STRING_CAST_LOSS>
+		<DCC_Description>RemObjects Pascal Script - RemObjects SDK 5.0 Integration</DCC_Description>
+		<DCC_DependencyCheckOutputName>..\Dcu\D12\PascalScript_RO_D12.bpl</DCC_DependencyCheckOutputName>
+		<DCC_UnitSearchPath>..\Dcu\D12;..\..\RemObjects SDK for Dephi\Dcu\D12;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+		<DCC_CVT_WCHAR_TO_ACHAR>error</DCC_CVT_WCHAR_TO_ACHAR>
+		<DCC_BplOutput>..\Dcu\D12</DCC_BplOutput>
+		<DCC_CVT_ACHAR_TO_WCHAR>error</DCC_CVT_ACHAR_TO_WCHAR>
+		<DCC_EXPLICIT_STRING_CAST_LOSS>error</DCC_EXPLICIT_STRING_CAST_LOSS>
+		<DCC_EXPLICIT_STRING_CAST>error</DCC_EXPLICIT_STRING_CAST>
+		<DCC_CVT_NARROWING_STRING_LOST>error</DCC_CVT_NARROWING_STRING_LOST>
+		<DCC_DcuOutput>..\Dcu\D12</DCC_DcuOutput>
+		<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+		<GenDll>true</GenDll>
+		<DCC_DcpOutput>..\Dcu\D12</DCC_DcpOutput>
+		<DCC_ImageBase>00400000</DCC_ImageBase>
+		<DCC_IMPLICIT_STRING_CAST>error</DCC_IMPLICIT_STRING_CAST>
+		<DesignOnlyPackage>false</DesignOnlyPackage>
+		<GenPackage>true</GenPackage>
+		<DCC_GenerateStackFrames>true</DCC_GenerateStackFrames>
+	</PropertyGroup>
+	<ItemGroup>
+		<DelphiCompile Include="PascalScript_RO_D12.dpk">
+			<MainSource>MainSource</MainSource>
+		</DelphiCompile>
+		<DCCReference Include="t:\rtl.dcp"/>
+		<DCCReference Include="t:\IndyCore.dcp"/>
+		<DCCReference Include="t:\IndySystem.dcp"/>
+		<DCCReference Include="t:\IndyProtocols.dcp"/>
+		<DCCReference Include="t:\PascalScript_Core_D12.dcp"/>
+		<DCCReference Include="t:\RemObjects_Core_D12.dcp"/>
+		<DCCReference Include="t:\RemObjects_Indy_D12.dcp"/>
+		<DCCReference Include="t:\dbrtl.dcp"/>
+		<DCCReference Include="t:\vcl.dcp"/>
+		<DCCReference Include="t:\vclx.dcp"/>
+		<DCCReference Include="PascalScript_RO_Reg.pas"/>
+		<DCCReference Include="uROPSServerLink.pas"/>
+		<DCCReference Include="uROPSImports.pas"/>
+		<BuildConfiguration Include="Base">
+			<Key>Base</Key>
+		</BuildConfiguration>
+	</ItemGroup>
+	<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+	<ProjectExtensions>
+		<Borland.Personality>Delphi.Personality</Borland.Personality>
+		<Borland.ProjectType>Package</Borland.ProjectType>
+		<BorlandProject><BorlandProject>
+				<Delphi.Personality>
+					<Parameters>
+						<Parameters Name="UseLauncher">False</Parameters>
+						<Parameters Name="LoadAllSymbols">True</Parameters>
+						<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+					</Parameters>
+					<VersionInfo>
+						<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+						<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+						<VersionInfo Name="MajorVer">3</VersionInfo>
+						<VersionInfo Name="MinorVer">0</VersionInfo>
+						<VersionInfo Name="Release">6</VersionInfo>
+						<VersionInfo Name="Build">442</VersionInfo>
+						<VersionInfo Name="Debug">False</VersionInfo>
+						<VersionInfo Name="PreRelease">False</VersionInfo>
+						<VersionInfo Name="Special">False</VersionInfo>
+						<VersionInfo Name="Private">False</VersionInfo>
+						<VersionInfo Name="DLL">False</VersionInfo>
+						<VersionInfo Name="Locale">1033</VersionInfo>
+						<VersionInfo Name="CodePage">1252</VersionInfo>
+					</VersionInfo>
+					<VersionInfoKeys>
+						<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+						<VersionInfoKeys Name="FileVersion">3.0.6.442</VersionInfoKeys>
+						<VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+						<VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys>
+						<VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys>
+						<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+						<VersionInfoKeys Name="ProductName">Pascal Script</VersionInfoKeys>
+						<VersionInfoKeys Name="ProductVersion">3.0.0.0</VersionInfoKeys>
+						<VersionInfoKeys Name="CompileDate">Tuesday, March 21, 2006 1:32 PM</VersionInfoKeys>
+					</VersionInfoKeys>
+					<Source>
+						<Source Name="MainSource">PascalScript_RO_D12.dpk</Source>
+					</Source>
+				</Delphi.Personality>
+			</BorlandProject>
+		</BorlandProject>
+	</ProjectExtensions>
+</Project>
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D12.res b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D12.res
new file mode 100644
index 0000000..9377a73
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D12.res differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D6.dof b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D6.dof
new file mode 100644
index 0000000..0706699
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D6.dof	
@@ -0,0 +1,114 @@
+[FileVersion]
+Version=6.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects Pascal Script - RemObjects SDK 3.0 Integration
+
+[Directories]
+UnitOutputDir=..\Dcu\D6
+PackageDLLOutputDir=..\Dcu\D6
+PackageDCPOutputDir=
+SearchPath=..\Dcu\D6
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+ProductName=Pascal Script
+ProductVersion=3.0.0.0
+FileDescription=
+FileVersion=3.0.2.36
+OriginalFilename=
+
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D6.dpk b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D6.dpk
new file mode 100644
index 0000000..4d22bec
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D6.dpk	
@@ -0,0 +1,43 @@
+package PascalScript_RO_D6;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Pascal Script - RemObjects SDK 4.0 Integration'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  indy,
+  PascalScript_Core_D6,
+  RemObjects_Core_D6,
+  RemObjects_Indy_D6,
+  dbrtl,
+  vcl,
+  vclx;
+
+contains
+  PascalScript_RO_Reg in 'PascalScript_RO_Reg.pas',
+  uROPSServerLink in 'uROPSServerLink.pas',
+  uROPSImports in 'uROPSImports.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D6.res b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D6.res
new file mode 100644
index 0000000..30e8017
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D6.res differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D7.dof b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D7.dof
new file mode 100644
index 0000000..629ea90
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D7.dof	
@@ -0,0 +1,123 @@
+[FileVersion]
+Version=7.0
+
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects Pascal Script - RemObjects SDK 3.0 Integration
+
+[Directories]
+OutputDir=
+UnitOutputDir=..\Dcu\D7
+PackageDLLOutputDir=..\Dcu\D7
+PackageDCPOutputDir=
+SearchPath=..\Dcu\D7
+Packages=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+
+[Version Info Keys]
+CompanyName=RemObjects Software
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+ProductName=Pascal Script
+ProductVersion=3.0.0.0
+FileDescription=
+FileVersion=3.0.35.741
+OriginalFilename=
+Compile Date=Monday, February 28, 2005 3:33 PM
+
+[Version Info]
+IncludeVerInfo=1
+MajorVer=3
+MinorVer=0
+Release=35
+Build=741
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D7.dpk b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D7.dpk
new file mode 100644
index 0000000..8ece2b8
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D7.dpk	
@@ -0,0 +1,43 @@
+package PascalScript_RO_D7;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects Pascal Script - RemObjects SDK 4.0 Integration'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  indy,
+  PascalScript_Core_D7,
+  RemObjects_Core_D7,
+  RemObjects_Indy_D7,
+  dbrtl,
+  vcl,
+  vclx;
+
+contains
+  PascalScript_RO_Reg in 'PascalScript_RO_Reg.pas',
+  uROPSServerLink in 'uROPSServerLink.pas',
+  uROPSImports in 'uROPSImports.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D7.res b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D7.res
new file mode 100644
index 0000000..9377a73
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_D7.res differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_Glyphs.RES b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_Glyphs.RES
new file mode 100644
index 0000000..3fcd355
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_Glyphs.RES differ
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_Reg.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_Reg.pas
new file mode 100644
index 0000000..1369293
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/PascalScript_RO_Reg.pas	
@@ -0,0 +1,34 @@
+unit PascalScript_RO_Reg;
+
+{----------------------------------------------------------------------------}
+{ RemObjects Pascal Script
+{
+{ compiler: Delphi 2 and up, Kylix 3 and up
+{ platform: Win32, Linux
+{
+{ (c)opyright RemObjects Software. all rights reserved.
+{
+{ Using this code requires a valid license of Pascal Script
+{ which can be obtained at http://www.remobjects.com.
+{----------------------------------------------------------------------------}
+
+{$I PascalScript.inc}
+
+interface
+
+{$R PascalScript_RO_Glyphs.res}
+
+procedure Register;
+
+implementation
+
+uses
+  Classes,
+  uROPSServerLink;
+
+procedure Register;
+begin
+  RegisterComponents('Pascal Script', [TPSRemObjectsSdkPlugin]);
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/eDefines.inc b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/eDefines.inc
new file mode 100644
index 0000000..12fb96f
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/eDefines.inc	
@@ -0,0 +1,459 @@
+{----------------------------------------------------------------------------}
+{file:      eDefines.inc                                                     }
+{type:      Delphi include file                                              }
+{                                                                            }
+{compiler:  Borland Pascal 7,                                                }
+{           Delphi 1-7, 2005-2007 for Win32                                  }
+{           Kylix 1-3,                                                       }
+{           C++Builder 1-6, 2006-2007                                        }
+{           Free Pascal Compiler 2.x                                         }
+{                                                                            }
+{platforms: DOS, DPMI, Win16, Win32, Win64, Linux, Mac OS X                  }
+{                                                                            }
+{author:    mh@elitedev.com                                                  }
+{                                                                            }
+{contents:  Defines that can be flexibily used to determine the exact        }
+{           compiler version used.                                           }
+{                                                                            }
+{(c)opyright elitedevelopments software. all rights reserved.                }
+{            http://www.elitedev.com                                         }
+{                                                                            }
+{ Third Party component developers are encouraged to use the set of defines  }
+{ established in this file, rather then their own system, for checking their }
+{ component libraries agains different versions of Delphi and C++Builder.    }
+{                                                                            }
+{ This file may be distributed freely with both free and commercial source   }
+{ libraries, but you are asked to please leave this comment in place, and    }
+{ to return any improvements you make to this file to the maintainer that    }
+{ is noted above.                                                            }
+{----------------------------------------------------------------------------}
+
+{----------------------------------------------------------------------------}
+{ Compiler and OS version defines:                                           }
+{                                                                            }
+{ exact compiler versions:                                                   }
+{                                                                            }
+{ BP7             Borland Pascal 7.0                                         }
+{ DELPHI1         Delphi 1.0 (any Delphi)                                    }
+{ DELPHI2         Delphi 2.0                                                 }
+{ DELPHI3         Delphi 3.0                                                 }
+{ DELPHI4         Delphi 4.0                                                 }
+{ DELPHI5         Delphi 5.0                                                 }
+{ DELPHI6         Delphi 6.0                                                 }
+{ DELPHI7         Delphi 7.0                                                 }
+{ DELPHI9         Delphi 2005                                                }
+{ DELPHI2005      Delphi 2005                                                }
+{ DELPHI2006      Delphi 2006                                                }
+{ DELPHI2007      Delphi 2007                                                }
+{ KYLIX1          Kylix 1.0                                                  }
+{ KYLIX2          Kylix 2.0                                                  }
+{ KYLIX3          Kylix 3.0                                                  }
+{ CBUILDER1       C++Builder 1.0                                             }
+{ CBUILDER3       C++Builder 3.0                                             }
+{ CBUILDER4       C++Builder 4.0                                             }
+{ CBUILDER5       C++Builder 5.0                                             }
+{                                                                            }
+{                                                                            }
+{ minimum compiler versions:                                                 }
+{                                                                            }
+{ DELPHI1UP       Delphi 1.0 and above (any Delphi)                          }
+{ DELPHI2UP       Delphi 2.0 and above                                       }
+{ DELPHI3UP       Delphi 3.0 and above                                       }
+{ DELPHI4UP       Delphi 4.0 and above                                       }
+{ DELPHI5UP       Delphi 5.0 and above                                       }
+{ DELPHI6UP       Delphi 6.0 and above                                       }
+{ DELPHI7UP       Delphi 7.0 and above                                       }
+{ DELPHI9UP       Delphi 9.0 (2005) and above                                }
+{ DELPHI10UP      Delphi 10.0 (2006) and above                               }
+{ DELPHI11UP      Delphi 11.0 (2007) and above                               }
+{ DELPHI2005UP    Delphi 2005 and above                                      }
+{ DELPHI2006UP    Delphi 2006 and above                                      }
+{ DELPHI2007UP    Delphi 2007 and above                                      }
+{ KYLIX1UP        Kylix 1.0 and above (any Kylix)                            }
+{ KYLIX2UP        Kylix 2.0 and above (any Kylix)                            }
+{ KYLIX3UP        Kylix 3.0 and above (any Kylix)                            }
+{ CBUILDER1UP     C++Builder 1.0 and above or Delphi 2 and above             }
+{ CBUILDER3UP     C++Builder 3.0 and above or Delphi 3.0 and above           }
+{ CBUILDER4UP     C++Builder 4.0 and above or Delphi 4.0 and above           }
+{ CBUILDER5UP     C++Builder 5.0 and above or Delphi 5.0 and above           }
+{ CBUILDER6UP     C++Builder 5.0 and above or Delphi 5.0 and above           }
+{                                                                            }
+{                                                                            }
+{ compiler types:                                                            }
+{                                                                            }
+{ BP              Borland Pascal (not Delphi or C++Builder)                  }
+{ DELPHI          any Delphi version (but not C++Builder or Kylix)           }
+{ KYLIX           any Kylix version (not Delphi or C++Builder for Windows)   }
+{ CBUILDER        any C++Builder for Windows (Pascal)                        }
+{                                                                            }
+{                                                                            }
+{ target platforms compiler types:                                           }
+{                                                                            }
+{ DELPHI_16BIT    16bit Delphi (but not C++Builder!)                         }
+{ DELPHI_32BIT    32bit Delphi (but not C++Builder)                          }
+{ KYLIX_32BIT     32bit Kylix (but not C++Builder)                           }
+{ CBUILDER_32BIT  32bit C++Builer's Pascal (but not Delphi)                  }
+{                                                                            }
+{                                                                            }
+{ target cpu types                                                           }
+{                                                                            }
+{ CPU16           16bit Delphi or Borland Pascal                             }
+{ CPU32           32bit Delphi or Free Pascal                                }
+{ CPU64           64bit Free Pascal                                          }
+{                                                                            }
+{ target platforms                                                           }
+{                                                                            }
+{ DOS             any DOS (plain and DPMI)                                   }
+{ REALMODE        16bit realmode DOS                                         }
+{ PROTECTEDMODE   16bit DPMI DOS                                             }
+{                                                                            }
+{ MSWINDOWS       any Windows platform                                       }
+{ WIN16           16bit Windows                                              }
+{ WIN32           32bit Windows                                              }
+{ WIN64           64bit Windows                                              }
+{ DOTNET          .NET                                                       }
+{                                                                            }
+{ LINUX           any Linux platform                                         }
+{ LINUX32         32bit Linux                                                }
+{ LINUX64         64bit Linux                                                }
+{                                                                            }
+{ DARWIN          Any Mac OS X                                               }
+{ DARWIN32        32bit Mac OS X                                             }
+{ DARWIN64        64bit Mac OS X                                             }
+{----------------------------------------------------------------------------}
+
+{ defines for Borland Pascal 7.0 }
+{$IFDEF VER70}
+  {$DEFINE BP}
+  {$DEFINE BP7}
+  {$DEFINE 16BIT}
+  {$DEFINE CPU16}
+
+  { defines for BP7 DOS real mode }
+  {$IFDEF MSDOS}
+    {$DEFINE DOS}
+    {$DEFINE REALMODE}
+  {$ENDIF}
+
+  { defines for BP7 DOS protected mode }
+  {$IFDEF DPMI}
+    {$DEFINE DOS}
+    {$DEFINE PROTECTEDMODE}
+  {$ENDIF}
+
+  { defines for BP7 Windows }
+  {$IFDEF WINDOWS}
+    {$DEFINE MSWINDOWS}
+    {$DEFINE WIN16}
+  {$ENDIF}
+{$ENDIF}
+
+{ defines for Delphi 1.0 thru 7.0 }
+{$IFNDEF LINUX}
+
+  { defines for Delphi 1.0 }
+  {$IFDEF VER80}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI1}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI_16BIT}
+    {$DEFINE WIN16}
+    {$DEFINE 16BIT}
+    {$DEFINE CPU16}
+  {$ENDIF}
+
+  { defines for Delphi 2.0 }
+  {$IFDEF VER90}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI2}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+  {$ENDIF}
+
+  { defines for C++Builder 1.0 }
+  {$IFDEF VER93}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE CBUILDER}
+    {$DEFINE CBUILDER1}
+    {$DEFINE CBUILDER1UP}
+  {$ENDIF}
+
+  { defines for Delphi 3.0 }
+  {$IFDEF VER100}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI3}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+  {$ENDIF}
+
+  { defines for C++Builder 3.0 }
+  {$IFDEF VER110}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE CBUILDER}
+    {$DEFINE CBUILDER3}
+    {$DEFINE CBUILDER1UP}
+    {$DEFINE CBUILDER3UP}
+  {$ENDIF}
+
+  { defines for Delphi 4.0 }
+  {$IFDEF VER120}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI4}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+  {$ENDIF}
+
+  { defines for C++Builder 4.0 }
+  {$IFDEF VER125}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+    {$DEFINE CBUILDER}
+    {$DEFINE CBUILDER4}
+    {$DEFINE CBUILDER1UP}
+    {$DEFINE CBUILDER3UP}
+    {$DEFINE CBUILDER4UP}
+  {$ENDIF}
+  { defines for Delphi 5.0 }
+  {$IFDEF VER130}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI5}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+    {$DEFINE DELPHI5UP}
+  {$ENDIF}
+
+  { defines for C++Builder 5.0 }
+  {$IFDEF VER135}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+    {$DEFINE DELPHI5UP}
+    {$DEFINE CBUILDER}
+    {$DEFINE CBUILDER5}
+    {$DEFINE CBUILDER1UP}
+    {$DEFINE CBUILDER3UP}
+    {$DEFINE CBUILDER4UP}
+    {$DEFINE CBUILDER5UP}
+  {$ENDIF}
+
+  { defines for Delphi 6.0 }
+  {$IFDEF VER140}
+    {$DEFINE VER140UP}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI6}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+    {$DEFINE DELPHI5UP}
+    {$DEFINE DELPHI6UP}
+  {$ENDIF}
+
+  { defines for Delphi 7.0 }
+  {$IFDEF VER150}
+    {$DEFINE VER140UP}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI7}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+    {$DEFINE DELPHI5UP}
+    {$DEFINE DELPHI6UP}
+    {$DEFINE DELPHI7UP}
+  {$ENDIF}
+
+  { defines for Delphi 2005 }
+  {$IFDEF VER170}
+    {$DEFINE VER140UP}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI9}
+    {$DEFINE DELPHI2005}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+    {$DEFINE DELPHI5UP}
+    {$DEFINE DELPHI6UP}
+    {$DEFINE DELPHI7UP}
+    {$DEFINE DELPHI9UP}
+    {$DEFINE DELPHI2005UP}
+    {$DEFINE BDS}
+    {$DEFINE BDS3}
+    {$DEFINE BDS3UP}
+  {$ENDIF}
+
+  { defines for Delphi 2006 }
+  {$IFDEF VER180}
+    {$DEFINE VER140UP}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI10}
+    {$DEFINE DELPHI10A}  
+    {$DEFINE DELPHI2006}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+    {$DEFINE DELPHI5UP}
+    {$DEFINE DELPHI6UP}
+    {$DEFINE DELPHI7UP}
+    {$DEFINE DELPHI9UP}
+    {$DEFINE DELPHI10UP}
+    {$DEFINE DELPHI2005UP}
+    {$DEFINE DELPHI2006UP}
+    {$DEFINE BDS}
+    {$DEFINE BDS4}
+    {$DEFINE BDS3UP}
+    {$DEFINE BDS4UP}
+  {$ENDIF}
+
+  { defines for Delphi 2007 }
+  {$IFDEF VER185}
+    {$UNDEF DELPHI10A}  // declared in VER180
+    {$UNDEF DELPHI2006} // declared in VER180
+    {$UNDEF BDS4}       // declared in VER180
+
+    {$DEFINE DELPHI10B}    
+    {$DEFINE DELPHI10BUP}    
+    {$DEFINE DELPHI11}    
+    {$DEFINE DELPHI11UP}    
+    {$DEFINE DELPHI2007}
+    {$DEFINE DELPHI2007UP}    
+    {$DEFINE BDS5}
+    {$DEFINE BDS5UP}
+  {$ENDIF}
+
+  { defines for Delphi 2009 }
+  {$IFDEF VER200}
+    {$DEFINE VER140UP}
+    {$DEFINE DELPHI}
+
+    {$DEFINE DELPHI12}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+    {$DEFINE DELPHI5UP}
+    {$DEFINE DELPHI6UP}
+    {$DEFINE DELPHI7UP}
+    {$DEFINE DELPHI9UP}
+    {$DEFINE DELPHI10UP}
+    {$DEFINE DELPHI11UP}
+    {$DEFINE DELPHI12UP}
+
+    {$DEFINE DELPHI2009}
+    {$DEFINE DELPHI2005UP}
+    {$DEFINE DELPHI2006UP}
+    {$DEFINE DELPHI2007UP}
+    {$DEFINE DELPHI2009UP}
+
+    {$DEFINE BDS}
+    {$DEFINE BDS6}
+    {$DEFINE BDS3UP}
+    {$DEFINE BDS4UP}
+    {$DEFINE BDS5UP}
+    {$DEFINE BDS6UP}
+    {$DEFINE BDS6}
+    {$DEFINE BDS6UP}
+  {$ENDIF}
+
+  {$IFDEF WIN32}
+    {$DEFINE MSWINDOWS} //not automatically defined for Delphi 2 thru 5
+    {$DEFINE 32BIT}
+    {$DEFINE CPU32}
+  {$ENDIF}
+
+{$ENDIF MSWINDOWS}
+
+{ defines for "Delphi for .NET" }
+{$IFDEF CLR}
+  {$DEFINE DOTNET}
+{$ENDIF}
+
+{$IFDEF DELPHI}
+  {$IFDEF DELPHI2UP}
+    {$DEFINE DELPHI_32BIT}
+  {$ENDIF}
+{$ENDIF}
+
+{$IFDEF CBUILDER}
+  {$DEFINE CBUILDER_32BIT}
+{$ENDIF}
+
+{$IFNDEF FPC}
+
+  { Kylix 1.0 thru 3.0 }
+  {$IFDEF LINUX}
+
+    {$DEFINE VER140UP}
+
+    { Any Kylix }
+    {$DEFINE 32BIT}
+    {$DEFINE LINUX32}
+    {$DEFINE KYLIX_32BIT}
+    {$DEFINE KYLIX}
+    {$DEFINE KYLIX1UP}
+
+    {$IFDEF CONDITIONALEXPRESSIONS}
+      {$IF Declared(CompilerVersion)}
+
+         { Kylix 2.0 }
+         {$IF Declared(RTLVersion) and (RTLVersion = 14.1)}
+           {$DEFINE KYLIX2}
+           {$DEFINE KYLIX1UP}
+           {$DEFINE KYLIX2UP}
+         {$IFEND}
+
+         { Kylix 3.0 - Delphi portion }
+         {$IF Declared(RTLVersion) and (RTLVersion = 14.5)}
+           {$DEFINE KYLIX3}
+           {$DEFINE KYLIX1UP}
+           {$DEFINE KYLIX2UP}
+           {$DEFINE KYLIX3UP}
+         {$IFEND}
+
+      { Kylix 1.0 }
+      {$ELSE}
+        {$DEFINE KYLIX1}
+      {$IFEND}
+    {$ENDIF CONDITIONALEXPRESSIONS}
+
+  {$ENDIF LINUX}
+{$ENDIF}
+
+{ CPU }
+
+{$IFDEF FPC}
+  {$IFDEF MSWINDOWS}
+    {$IFDEF CPU64}
+      {$DEFINE WIN64}
+    {$ENDIF}
+  {$ENDIF}
+  {$IFDEF LINUX}
+    {$IFDEF CPU32}
+      {$DEFINE LINUX32}
+    {$ENDIF}
+    {$IFDEF CPU64}
+      {$DEFINE LINUX64}
+    {$ENDIF}
+  {$ENDIF}
+  {$IFDEF DARWIN}
+    {$IFDEF CPU32}
+      {$DEFINE DARWIN32}
+    {$ENDIF}
+    {$IFDEF CPU64}
+      {$DEFINE DARWIN64}
+    {$ENDIF}
+  {$ENDIF}
+{$ENDIF}
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/powerpc.inc b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/powerpc.inc
new file mode 100644
index 0000000..de25edc
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/powerpc.inc	
@@ -0,0 +1,338 @@
+{ implementation of the powerpc osx abi for function calls in pascal script
+  Copyright (c) 2007 by Henry Vermaak (henry.vermaak@gmail.com) }
+
+{$ifndef darwin}
+  {$fatal This code is Darwin specific at the moment!}
+{$endif}
+
+{$ifndef cpu32}
+  {$fatal This code is 32bit specific at the moment!}
+{$endif}
+
+const
+  rtINT = 0;
+  rtINT64 = 1;
+  rtFLOAT = 2;
+
+type
+  Trint = array[1..8] of dword;
+  Trfloat = array[1..13] of double;
+
+{$goto on}
+{ define labels }
+label
+  rfloat_loop,
+  stack_loop,
+  load_regs,
+  int_result,
+  int64_result,
+  float_result,
+  asmcall_end;
+
+{ call a function from a pointer }
+{ resulttype: 0 = int, 1 = int64, 2 = float }
+function ppcasmcall(rint: Trint; rfloat: Trfloat; proc, stack: pointer; stacksize, resulttype: integer): pointer; assembler; nostackframe;
+asm
+	mflr	r0
+	stw	r0, 8(r1)
+
+	{ save non-volatile register/s - make sure the stack size is sufficient! }
+	stw	r31, -4(r1)	{ stacksize }
+
+	stwu	r1, -240(r1)	{ create stack }
+
+	{ get all the params into the stack }
+	stw	r3, 48(r1)	{ rint }
+	stw	r4, 52(r1)	{ rfloat }
+	stw	r5, 56(r1)	{ proc }
+	stw	r6, 60(r1)	{ stack }
+	stw	r7, 64(r1)	{ stacksize }
+	stw	r8, 68(r1)	{ resulttype }
+	{ result is stored in 72(r1) and 76(r1) (if returning int64) }
+
+	{ write rint array into stack }
+	lwz	r2, 48(r1)	{ rint }
+	lfd	f0, 0(r2)
+	stfd	f0, 80(r1)	{ rint[1], rint[2] }
+	lfd	f0, 8(r2)
+	stfd	f0, 88(r1)	{ rint[3], rint[4] }
+	lfd	f0, 16(r2)
+	stfd	f0, 96(r1)	{ rint[5], rint[6] }
+	lfd	f0, 24(r2)
+	stfd	f0, 104(r1)	{ rint[7], rint[8] }
+
+	{ write rfloat array into stack }
+	lwz	r2, 52(r1)	{ rfloat }
+	addi	r4, r1, 112	{ rfloat[1] from here upwards (8 bytes apart) }
+	subi	r2, r2, 8	{ src }
+	subi	r4, r4, 8	{ dest }
+	li	r3, 13		{ counter }
+
+rfloat_loop:
+	subic.	r3, r3, 1	{ dec counter }
+	lfdu	f0, 8(r2)	{ load rfloat[x] + update }
+	stfdu	f0, 8(r4)	{ store rfloat[x] + update }
+	bne	cr0, rfloat_loop
+
+	{ create new stack }
+	mflr	r0
+	stw	r0, 8(r1)
+	mr	r12, r1		{ remember previous stack to fill in regs later }
+
+	lwz	r31, 64(r12)	{ load stacksize into r31 }
+	neg	r3, r31		{ negate }
+	stwux	r1, r1, r3	{ create new stack }
+
+	{ build up the stack here }
+	mr	r3, r31		{ counter }
+	subic.	r3, r3, 24	{ don't write first 24 }
+	blt	cr0, load_regs	{ don't fill in stack if there is none }
+
+	lwz	r2, 60(r12)	{ pointer to stack }
+	addi	r2, r2, 24	{ start of params }
+	subi	r2, r2, 1	{ src }
+
+	addi	r4, r1, 24	{ start of params }
+	subi	r4, r4, 1	{ dest }
+
+stack_loop:
+	subic.	r3, r3, 1	{ dec counter }
+	lbzu	r5, 1(r2)	{ load stack + update }
+	stbu	r5, 1(r4)	{ store stack + update }
+	bne	cr0, stack_loop
+
+load_regs:			{ now load the registers from the previous stack in r12 }
+	lwz	r3, 80(r12)
+	lwz	r4, 84(r12)
+	lwz	r5, 88(r12)
+	lwz	r6, 92(r12)
+	lwz	r7, 96(r12)
+	lwz	r8, 100(r12)
+	lwz	r9, 104(r12)
+	lwz	r10, 108(r12)
+
+	lfd	f1, 112(r12)
+	lfd	f2, 120(r12)
+	lfd	f3, 128(r12)
+	lfd	f4, 136(r12)
+	lfd	f5, 144(r12)
+	lfd	f6, 152(r12)
+	lfd	f7, 160(r12)
+	lfd	f8, 168(r12)
+	lfd	f9, 176(r12)
+	lfd	f10, 184(r12)
+	lfd	f11, 192(r12)
+	lfd	f12, 200(r12)
+	lfd	f13, 208(r12)
+
+	{ now call this function }
+	lwz	r2, 56(r12)	{ proc }
+	mtctr	r2		{ move to ctr }
+	bctrl			{ branch and link to ctr }
+
+	{ restore stack - use stacksize in r31 }
+	add	r1, r1, r31
+	lwz	r0, 8(r1)
+	mtlr	r0
+
+	{ check resulttype and put appropriate pointer into r3 }
+	lwz	r2, 68(r1)		{ resulttype }
+	cmpwi	cr0, r2, 0		{ int result? }
+	beq	cr0, int_result		{ branch if equal }
+
+	cmpwi	cr0, r2, 1		{ single result? }
+	beq	cr0, int64_result	{ branch if equal }
+
+
+float_result:			{ the result is a double}
+	stfd	f1, 72(r1)	{ write f1 to result on stack }
+	b	asmcall_end
+
+
+int64_result:			{ the result is a single }
+	stw	r3, 72(r1)	{ write high dword to result on stack }
+	stw	r4, 76(r1)	{ write low dword to result on stack }
+	b	asmcall_end
+
+
+int_result:			{ the result is dword }
+	stw	r3, 72(r1)	{ write r3 to result on stack }
+
+
+asmcall_end:			{ epilogue }
+	addi	r3, r1, 72	{ pointer to result on the stack }
+	addi	r1, r1, 240	{ restore stack }
+
+	{ restore non-volatile register/s }
+	lwz	r31, -4(r1)
+
+	lwz	r0, 8(r1)
+	mtlr	r0
+	blr
+end;
+
+function TPSExec.InnerfuseCall(_Self, Address: Pointer; CallingConv: TPSCallingConvention; Params: TPSList; res: PPSVariantIFC): Boolean;
+var
+  rint: Trint;			{ registers r3 to r10 }
+  rfloat: Trfloat;		{ registers f1 to f13 }
+  st: packed array of byte;	{ stack }
+  i, j, rindex, findex, stindex: integer;
+  fvar: PPSVariantIFC;
+
+  { add a dword to stack }
+  procedure addstackdword(value: dword);
+  begin
+    setlength(st, stindex+4);
+    pdword(@st[stindex])^ := value;
+    inc(stindex, 4);
+  end;
+
+  { add a float to stack }
+  procedure addstackfloat(value: pointer; size: integer);
+  begin
+    setlength(st, stindex + (size * 4));
+    if size = 1
+      then psingle(@st[stindex])^ := single(value^)
+      else pdouble(@st[stindex])^ := double(value^);
+    inc(stindex, size*4);
+  end;
+
+  { add to the general registers or overflow to stack }
+  procedure addgen(value: dword);
+  begin
+    if rindex <= 8
+      then begin
+        rint[rindex] := value;
+        inc(rindex);
+        addstackdword(value);
+      end
+      else begin
+        addstackdword(value);
+      end;
+  end;
+  { add to the float registers or overflow to stack }
+  { size = 1 for single, 2 for double }
+  procedure addfloat(value: pointer; size: integer);
+  begin
+    if findex <= 13
+      then begin
+        if size = 1
+          then rfloat[findex] := single(value^)
+          else rfloat[findex] := double(value^);
+        inc(findex);
+        inc(rindex, size);
+        addstackfloat(value, size);
+      end
+      else begin
+        addstackfloat(value, size);
+      end;
+  end;
+
+begin
+  rindex := 1;
+  findex := 1;
+  stindex := 24;
+  setlength(st, stindex);
+  Result := False;
+
+  { the pointer of the result needs to be passed first in the case of some result types }
+  if assigned(res)
+    then begin
+      case res.atype.basetype of
+        btStaticArray, btRecord: addgen(dword(res.dta));
+      end;
+    end;
+
+  { process all parameters }
+  for i := 0 to Params.Count-1 do begin
+    if Params[i] = nil
+      then Exit;
+    fvar := Params[i];
+
+    { cook dynamic arrays - fpc stores size-1 at @array-4 }
+    if (fvar.aType.BaseType = btArray)
+      then dec(pdword(pointer(fvar.dta^)-4)^);
+
+    if fvar.varparam
+      then begin  { var param }
+        case fvar.aType.BaseType of
+          { add var params here }
+          btArray, btVariant, btSet, btStaticArray, btRecord, btInterface, btClass, {$IFNDEF PS_NOWIDESTRING} btWideString, btWideChar, {$ENDIF}
+          btU8, btS8, btU16, btS16, btU32, btS32, btSingle, btDouble, btExtended, btString, btPChar, btChar, btCurrency
+          {$IFNDEF PS_NOINT64}, bts64{$ENDIF}: addgen(dword(fvar.dta));  { TODO: test all }
+          else begin
+            writeln(stderr, 'Parameter type not recognised!');
+            Exit;
+          end;
+        end;  { case }
+      end else begin  { not a var param }
+        case fvar.aType.BaseType of
+//          btArray, btVariant, btSet, btStaticArray, btRecord, btInterface, btClass, {$IFNDEF PS_NOWIDESTRING} btWideString, btWideChar, {$ENDIF}
+//          btU8, btS8, btU16, btS16, btU32, btS32, btSingle, btDouble, btExtended, btString, btPChar, btChar, btCurrency
+//          {$IFNDEF PS_NOINT64}, bts64{$ENDIF}: writeln('normal param');
+
+          { add normal params here }
+          btString:                            addgen(dword(pstring(fvar.dta)^));
+          btU8, btS8:                          addgen(dword(pbyte(fvar.dta)^));
+          btU16, BtS16:                        addgen(dword(pword(fvar.dta)^));
+          btU32, btS32:                        addgen(dword(pdword(fvar.dta)^));
+          btSingle:                            addfloat(fvar.dta, 1);
+          btDouble, btExtended:                addfloat(fvar.dta, 2);
+          btPChar:                             addgen(dword(ppchar(fvar.dta)^));
+          btChar:                              addgen(dword(pchar(fvar.dta)^));
+          {$IFNDEF PS_NOINT64}bts64:{$ENDIF}   begin
+                                                 addgen(dword(pint64(fvar.dta)^ shr 32));
+                                                 addgen(dword(pint64(fvar.dta)^ and $ffffffff));
+                                               end;
+          btStaticArray:                       addgen(dword(fvar.dta));
+          btRecord:                            for j := 0 to (fvar.atype.realsize div 4)-1 do
+                                                 addgen(pdword(fvar.dta + j*4)^);
+          btArray:                             addgen(dword(fvar.dta^));
+
+          { TODO add and test }
+{          btVariant, btSet, btInterface, btClass  }
+
+          else begin
+            writeln(stderr, 'Parameter type not implemented!');
+            Exit;
+          end;
+        end;  { case }
+      end;  { else }
+  end;  { for }
+
+  if not assigned(res)
+    then begin
+      ppcasmcall(rint, rfloat, address, st, stindex, rtINT);  { ignore return }
+    end
+    else begin
+      case res.atype.basetype of
+        { add result types here }
+        btString:                pstring(res.dta)^ := pstring(ppcasmcall(rint, rfloat, address, st, stindex, rtINT))^;
+        btU8, btS8:              pbyte(res.dta)^ := byte(pdword(ppcasmcall(rint, rfloat, address, st, stindex, rtINT))^);
+        btU16, btS16:            pword(res.dta)^ := word(pdword(ppcasmcall(rint, rfloat, address, st, stindex, rtINT))^);
+        btU32, btS32:            pdword(res.dta)^ := pdword(ppcasmcall(rint, rfloat, address, st, stindex, rtINT))^;
+        btSingle:                psingle(res.dta)^ := pdouble(ppcasmcall(rint, rfloat, address, st, stindex, rtFLOAT))^;
+        btDouble, btExtended:    pdouble(res.dta)^ := pdouble(ppcasmcall(rint, rfloat, address, st, stindex, rtFLOAT))^;
+        btPChar:                 ppchar(res.dta)^ := pchar(pdword(ppcasmcall(rint, rfloat, address, st, stindex, rtINT))^);
+        btChar:                  pchar(res.dta)^ := char(pdword(ppcasmcall(rint, rfloat, address, st, stindex, rtINT))^);
+        btStaticArray, btRecord: ppcasmcall(rint, rfloat, address, st, stindex, rtINT);
+        btArray:                 res.dta := ppcasmcall(rint, rfloat, address, st, stindex, rtINT);
+
+        { TODO add and test }
+
+        else begin
+          writeln(stderr, 'Result type not implemented!');
+          exit;
+        end;  { else }
+      end;  { case }
+    end;
+
+  { cook dynamic arrays - fpc stores size-1 at @array-4 }
+  for i := 0 to Params.Count-1 do begin
+    fvar := Params[i];
+    if (fvar.aType.BaseType = btArray)
+      then inc(pdword(pointer(fvar.dta^)-4)^);
+   end;
+
+  Result := True;
+end;
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_DB.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_DB.pas
new file mode 100644
index 0000000..3a0cc81
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_DB.pas	
@@ -0,0 +1,892 @@
+{ Compiletime DB support }
+Unit uPSC_DB;
+{
+This file has been generated by UnitParser v0.4, written by M. Knight.
+Source Code from Carlo Kok has been used to implement various sections of
+UnitParser. Components of ifps3 are used in the construction of UnitParser,
+code implementing the class wrapper is taken from Carlo Kok''s conv unility
+
+Licence :
+This software is provided 'as-is', without any expressed or implied
+warranty. In no event will the author be held liable for any damages
+arising from the use of this software.
+Permission is granted to anyone to use this software for any kind of
+application, and to alter it and redistribute it freely, subject to
+the following restrictions:
+1. The origin of this software must not be misrepresented, you must
+   not claim that you wrote the original software.
+2. Altered source versions must be plainly marked as such, and must
+   not be misrepresented as being the original software.
+3. You may not create a library that uses this library as a main part
+   of the program and sell that library.
+4. You must have a visible line in your programs aboutbox or
+   documentation that it is made using Innerfuse Script and where
+   Innerfuse Pascal Script can be found.
+5. This notice may not be removed or altered from any source
+   distribution.
+
+If you have any questions concerning this license write to Carlo Kok:
+  ck@carlo-kok.com or try the newsserver:
+  news://news.carlo-kok.com/
+}
+{$I PascalScript.inc}
+Interface
+uses
+  uPSCompiler;
+
+procedure SIRegisterTDATASET(CL: TPSPascalCompiler);
+procedure SIRegisterTPARAMS(CL: TPSPascalCompiler);
+procedure SIRegisterTPARAM(CL: TPSPascalCompiler);
+procedure SIRegisterTGUIDFIELD(CL: TPSPascalCompiler);
+procedure SIRegisterTVARIANTFIELD(CL: TPSPascalCompiler);
+procedure SIRegisterTREFERENCEFIELD(CL: TPSPascalCompiler);
+procedure SIRegisterTDATASETFIELD(CL: TPSPascalCompiler);
+procedure SIRegisterTARRAYFIELD(CL: TPSPascalCompiler);
+procedure SIRegisterTADTFIELD(CL: TPSPascalCompiler);
+procedure SIRegisterTOBJECTFIELD(CL: TPSPascalCompiler);
+procedure SIRegisterTGRAPHICFIELD(CL: TPSPascalCompiler);
+procedure SIRegisterTMEMOFIELD(CL: TPSPascalCompiler);
+procedure SIRegisterTBLOBFIELD(CL: TPSPascalCompiler);
+{$IFDEF DELPHI6UP}
+procedure SIRegisterTFMTBCDFIELD(CL: TPSPascalCompiler);
+{$ENDIF}
+procedure SIRegisterTBCDFIELD(CL: TPSPascalCompiler);
+procedure SIRegisterTVARBYTESFIELD(CL: TPSPascalCompiler);
+procedure SIRegisterTBYTESFIELD(CL: TPSPascalCompiler);
+procedure SIRegisterTBINARYFIELD(CL: TPSPascalCompiler);
+procedure SIRegisterTTIMEFIELD(CL: TPSPascalCompiler);
+procedure SIRegisterTDATEFIELD(CL: TPSPascalCompiler);
+procedure SIRegisterTDATETIMEFIELD(CL: TPSPascalCompiler);
+procedure SIRegisterTBOOLEANFIELD(CL: TPSPascalCompiler);
+procedure SIRegisterTCURRENCYFIELD(CL: TPSPascalCompiler);
+procedure SIRegisterTFLOATFIELD(CL: TPSPascalCompiler);
+procedure SIRegisterTAUTOINCFIELD(CL: TPSPascalCompiler);
+procedure SIRegisterTWORDFIELD(CL: TPSPascalCompiler);
+procedure SIRegisterTLARGEINTFIELD(CL: TPSPascalCompiler);
+procedure SIRegisterTSMALLINTFIELD(CL: TPSPascalCompiler);
+procedure SIRegisterTINTEGERFIELD(CL: TPSPascalCompiler);
+procedure SIRegisterTNUMERICFIELD(CL: TPSPascalCompiler);
+procedure SIRegisterTWIDESTRINGFIELD(CL: TPSPascalCompiler);
+procedure SIRegisterTSTRINGFIELD(CL: TPSPascalCompiler);
+procedure SIRegisterTFIELD(CL: TPSPascalCompiler);
+procedure SIRegisterTLOOKUPLIST(CL: TPSPascalCompiler);
+procedure SIRegisterTFIELDS(CL: TPSPascalCompiler);
+procedure SIRegisterTFIELDLIST(CL: TPSPascalCompiler);
+procedure SIRegisterTFIELDDEFLIST(CL: TPSPascalCompiler);
+procedure SIRegisterTFLATLIST(CL: TPSPascalCompiler);
+procedure SIRegisterTINDEXDEFS(CL: TPSPascalCompiler);
+procedure SIRegisterTINDEXDEF(CL: TPSPascalCompiler);
+procedure SIRegisterTFIELDDEFS(CL: TPSPascalCompiler);
+procedure SIRegisterTFIELDDEF(CL: TPSPascalCompiler);
+procedure SIRegisterTDEFCOLLECTION(CL: TPSPascalCompiler);
+procedure SIRegisterTNAMEDITEM(CL: TPSPascalCompiler);
+procedure SIRegister_DB(Cl: TPSPascalCompiler);
+
+implementation
+Uses Sysutils;
+
+Function RegClassS(cl : TPSPascalCompiler;Const InheritsFrom,Classname : String) : TPSCompileTimeClass;
+begin
+Result := cl.FindClass(Classname);
+if Result = nil then
+  Result := cl.AddClassN(cl.FindClass(InheritsFrom),Classname)
+else
+  Result.ClassInheritsFrom := cl.FindClass(InheritsFrom);
+end;
+
+procedure SIRegisterTDATASET(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TCOMPONENT','TDATASET') do
+  begin
+  RegisterMethod('Function ACTIVEBUFFER : PCHAR');
+  RegisterMethod('Procedure APPEND');
+  RegisterMethod('Procedure APPENDRECORD( const VALUES : array of const)');
+//  RegisterMethod('Function BOOKMARKVALID( BOOKMARK : TBOOKMARK) : BOOLEAN');
+  RegisterMethod('Procedure CANCEL');
+  RegisterMethod('Procedure CHECKBROWSEMODE');
+  RegisterMethod('Procedure CLEARFIELDS');
+  RegisterMethod('Procedure CLOSE');
+  RegisterMethod('Function CONTROLSDISABLED : BOOLEAN');
+//  RegisterMethod('Function COMPAREBOOKMARKS( BOOKMARK1, BOOKMARK2 : TBOOKMARK) : INTEGER');
+  RegisterMethod('Function CREATEBLOBSTREAM( FIELD : TFIELD; MODE : TBLOBSTREAMMODE) : TSTREAM');
+  RegisterMethod('Procedure CURSORPOSCHANGED');
+  RegisterMethod('Procedure DELETE');
+  RegisterMethod('Procedure DISABLECONTROLS');
+  RegisterMethod('Procedure EDIT');
+  RegisterMethod('Procedure ENABLECONTROLS');
+{$IFDEF DELPHI2006UP}
+  RegisterMethod('Function FIELDBYNAME( const FIELDNAME : WIDESTRING) : TFIELD');
+  RegisterMethod('Function FINDFIELD( const FIELDNAME : WideString) : TFIELD');
+{$ELSE}
+  RegisterMethod('Function FIELDBYNAME( const FIELDNAME : STRING) : TFIELD');
+  RegisterMethod('Function FINDFIELD( const FIELDNAME : STRING) : TFIELD');
+{$ENDIF}
+  RegisterMethod('Function FINDFIRST : BOOLEAN');
+  RegisterMethod('Function FINDLAST : BOOLEAN');
+  RegisterMethod('Function FINDNEXT : BOOLEAN');
+  RegisterMethod('Function FINDPRIOR : BOOLEAN');
+  RegisterMethod('Procedure FIRST');
+//  RegisterMethod('Procedure FREEBOOKMARK( BOOKMARK : TBOOKMARK)');
+//  RegisterMethod('Function GETBOOKMARK : TBOOKMARK');
+  RegisterMethod('Function GETCURRENTRECORD( BUFFER : PCHAR) : BOOLEAN');
+//  RegisterMethod('Procedure GETDETAILDATASETS( LIST : TLIST)');
+//  RegisterMethod('Procedure GETFIELDLIST( LIST : TLIST; const FIELDNAMES : STRING)');
+//  RegisterMethod('Procedure GETDETAILLINKFIELDS( MASTERFIELDS, DETAILFIELDS : TLIST)');
+//  RegisterMethod('Function GETBLOBFIELDDATA( FIELDNO : INTEGER; var BUFFER : TBLOBBYTEDATA) : INTEGER');
+  RegisterMethod('Procedure GETFIELDNAMES( LIST : TSTRINGS)');
+//  RegisterMethod('Procedure GOTOBOOKMARK( BOOKMARK : TBOOKMARK)');
+  RegisterMethod('Procedure INSERT');
+  RegisterMethod('Procedure INSERTRECORD( const VALUES : array of const)');
+  RegisterMethod('Function ISEMPTY : BOOLEAN');
+  RegisterMethod('Function ISLINKEDTO( DATASOURCE : TDATASOURCE) : BOOLEAN');
+  RegisterMethod('Function ISSEQUENCED : BOOLEAN');
+  RegisterMethod('Procedure LAST');
+  RegisterMethod('Function LOCATE( const KEYFIELDS : String; const KEYVALUES : VARIANT; OPTIONS : TLOCATEOPTIONS) : BOOLEAN');
+  RegisterMethod('Function LOOKUP( const KEYFIELDS : String; const KEYVALUES : VARIANT; const RESULTFIELDS : String) : VARIANT');
+  RegisterMethod('Function MOVEBY( DISTANCE : INTEGER) : INTEGER');
+  RegisterMethod('Procedure NEXT');
+  RegisterMethod('Procedure OPEN');
+  RegisterMethod('Procedure POST');
+  RegisterMethod('Procedure PRIOR');
+  RegisterMethod('Procedure REFRESH');
+//  RegisterMethod('Procedure RESYNC( MODE : TRESYNCMODE)');
+  RegisterMethod('Procedure SETFIELDS( const VALUES : array of const)');
+  RegisterMethod('Function TRANSLATE( SRC, DEST : PCHAR; TOOEM : BOOLEAN) : INTEGER');
+  RegisterMethod('Procedure UPDATECURSORPOS');
+  RegisterMethod('Procedure UPDATERECORD');
+  RegisterMethod('Function UPDATESTATUS : TUPDATESTATUS');
+  RegisterProperty('AGGFIELDS', 'TFIELDS', iptr);
+  RegisterProperty('BOF', 'BOOLEAN', iptr);
+//  RegisterProperty('BOOKMARK', 'TBOOKMARKSTR', iptrw);
+  RegisterProperty('CANMODIFY', 'BOOLEAN', iptr);
+  RegisterProperty('DATASETFIELD', 'TDATASETFIELD', iptrw);
+  RegisterProperty('DATASOURCE', 'TDATASOURCE', iptr);
+  RegisterProperty('DEFAULTFIELDS', 'BOOLEAN', iptr);
+  RegisterProperty('DESIGNER', 'TDATASETDESIGNER', iptr);
+  RegisterProperty('EOF', 'BOOLEAN', iptr);
+  RegisterProperty('BLOCKREADSIZE', 'INTEGER', iptrw);
+  RegisterProperty('FIELDCOUNT', 'INTEGER', iptr);
+  RegisterProperty('FIELDDEFS', 'TFIELDDEFS', iptrw);
+  RegisterProperty('FIELDDEFLIST', 'TFIELDDEFLIST', iptr);
+  RegisterProperty('FIELDS', 'TFIELDS', iptr);
+  RegisterProperty('FIELDLIST', 'TFIELDLIST', iptr);
+  RegisterProperty('FIELDVALUES', 'VARIANT String', iptrw);
+  RegisterProperty('FOUND', 'BOOLEAN', iptr);
+{$IFDEF DELPHI6UP}
+  RegisterProperty('ISUNIDIRECTIONAL', 'BOOLEAN', iptr);
+{$ENDIF}
+  RegisterProperty('MODIFIED', 'BOOLEAN', iptr);
+  RegisterProperty('OBJECTVIEW', 'BOOLEAN', iptrw);
+  RegisterProperty('RECORDCOUNT', 'INTEGER', iptr);
+  RegisterProperty('RECNO', 'INTEGER', iptrw);
+  RegisterProperty('RECORDSIZE', 'WORD', iptr);
+  RegisterProperty('SPARSEARRAYS', 'BOOLEAN', iptrw);
+  RegisterProperty('STATE', 'TDATASETSTATE', iptr);
+  RegisterProperty('FILTER', 'String', iptrw);
+  RegisterProperty('FILTERED', 'BOOLEAN', iptrw);
+  RegisterProperty('FILTEROPTIONS', 'TFILTEROPTIONS', iptrw);
+  RegisterProperty('ACTIVE', 'BOOLEAN', iptrw);
+  RegisterProperty('AUTOCALCFIELDS', 'BOOLEAN', iptrw);
+  RegisterProperty('BEFOREOPEN', 'TDATASETNOTIFYEVENT', iptrw);
+  RegisterProperty('AFTEROPEN', 'TDATASETNOTIFYEVENT', iptrw);
+  RegisterProperty('BEFORECLOSE', 'TDATASETNOTIFYEVENT', iptrw);
+  RegisterProperty('AFTERCLOSE', 'TDATASETNOTIFYEVENT', iptrw);
+  RegisterProperty('BEFOREINSERT', 'TDATASETNOTIFYEVENT', iptrw);
+  RegisterProperty('AFTERINSERT', 'TDATASETNOTIFYEVENT', iptrw);
+  RegisterProperty('BEFOREEDIT', 'TDATASETNOTIFYEVENT', iptrw);
+  RegisterProperty('AFTEREDIT', 'TDATASETNOTIFYEVENT', iptrw);
+  RegisterProperty('BEFOREPOST', 'TDATASETNOTIFYEVENT', iptrw);
+  RegisterProperty('AFTERPOST', 'TDATASETNOTIFYEVENT', iptrw);
+  RegisterProperty('BEFORECANCEL', 'TDATASETNOTIFYEVENT', iptrw);
+  RegisterProperty('AFTERCANCEL', 'TDATASETNOTIFYEVENT', iptrw);
+  RegisterProperty('BEFOREDELETE', 'TDATASETNOTIFYEVENT', iptrw);
+  RegisterProperty('AFTERDELETE', 'TDATASETNOTIFYEVENT', iptrw);
+  RegisterProperty('BEFORESCROLL', 'TDATASETNOTIFYEVENT', iptrw);
+  RegisterProperty('AFTERSCROLL', 'TDATASETNOTIFYEVENT', iptrw);
+  RegisterProperty('BEFOREREFRESH', 'TDATASETNOTIFYEVENT', iptrw);
+  RegisterProperty('AFTERREFRESH', 'TDATASETNOTIFYEVENT', iptrw);
+  RegisterProperty('ONCALCFIELDS', 'TDATASETNOTIFYEVENT', iptrw);
+  RegisterProperty('ONDELETEERROR', 'TDATASETERROREVENT', iptrw);
+  RegisterProperty('ONEDITERROR', 'TDATASETERROREVENT', iptrw);
+  RegisterProperty('ONFILTERRECORD', 'TFILTERRECORDEVENT', iptrw);
+  RegisterProperty('ONNEWRECORD', 'TDATASETNOTIFYEVENT', iptrw);
+  RegisterProperty('ONPOSTERROR', 'TDATASETERROREVENT', iptrw);
+  end;
+end;
+
+procedure SIRegisterTPARAMS(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TCOLLECTION','TPARAMS') do
+  begin
+  RegisterMethod('Procedure ASSIGNVALUES( VALUE : TPARAMS)');
+  RegisterMethod('Procedure ADDPARAM( VALUE : TPARAM)');
+  RegisterMethod('Procedure REMOVEPARAM( VALUE : TPARAM)');
+  RegisterMethod('Function CREATEPARAM( FLDTYPE : TFIELDTYPE; const PARAMNAME : String; PARAMTYPE : TPARAMTYPE) : TPARAM');
+//  RegisterMethod('Procedure GETPARAMLIST( LIST : TLIST; const PARAMNAMES : STRING)');
+  RegisterMethod('Function ISEQUAL( VALUE : TPARAMS) : BOOLEAN');
+  RegisterMethod('Function PARSESQL( SQL : String; DOCREATE : BOOLEAN) : String');
+  RegisterMethod('Function PARAMBYNAME( const VALUE : String) : TPARAM');
+  RegisterMethod('Function FINDPARAM( const VALUE : String) : TPARAM');
+  RegisterProperty('ITEMS', 'TPARAM INTEGER', iptrw);
+  RegisterProperty('PARAMVALUES', 'VARIANT String', iptrw);
+  end;
+end;
+
+procedure SIRegisterTPARAM(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TCOLLECTIONITEM','TPARAM') do
+  begin
+  RegisterMethod('Procedure ASSIGNFIELD( FIELD : TFIELD)');
+  RegisterMethod('Procedure ASSIGNFIELDVALUE( FIELD : TFIELD; const VALUE : VARIANT)');
+  RegisterMethod('Procedure CLEAR');
+//  RegisterMethod('Procedure GETDATA( BUFFER : POINTER)');
+  RegisterMethod('Function GETDATASIZE : INTEGER');
+  RegisterMethod('Procedure LOADFROMFILE( const FILENAME : String; BLOBTYPE : TBLOBTYPE)');
+  RegisterMethod('Procedure LOADFROMSTREAM( STREAM : TSTREAM; BLOBTYPE : TBLOBTYPE)');
+//  RegisterMethod('Procedure SETBLOBDATA( BUFFER : POINTER; SIZE : INTEGER)');
+//  RegisterMethod('Procedure SETDATA( BUFFER : POINTER)');
+{$IFDEF DELPHI6UP}
+  RegisterProperty('ASBCD', 'CURRENCY', iptrw);
+{$ENDIF}
+{$IFDEF DELPHI6UP}
+  RegisterProperty('ASFMTBCD', 'TBCD', iptrw);
+{$ENDIF}
+  RegisterProperty('ASBLOB', 'TBLOBDATA', iptrw);
+  RegisterProperty('ASBOOLEAN', 'BOOLEAN', iptrw);
+  RegisterProperty('ASCURRENCY', 'CURRENCY', iptrw);
+  RegisterProperty('ASDATE', 'TDATETIME', iptrw);
+  RegisterProperty('ASDATETIME', 'TDATETIME', iptrw);
+  RegisterProperty('ASFLOAT', 'DOUBLE', iptrw);
+  RegisterProperty('ASINTEGER', 'LONGINT', iptrw);
+  RegisterProperty('ASSMALLINT', 'LONGINT', iptrw);
+  RegisterProperty('ASMEMO', 'String', iptrw);
+  RegisterProperty('ASSTRING', 'String', iptrw);
+  RegisterProperty('ASTIME', 'TDATETIME', iptrw);
+  RegisterProperty('ASWORD', 'LONGINT', iptrw);
+  RegisterProperty('BOUND', 'BOOLEAN', iptrw);
+  RegisterProperty('ISNULL', 'BOOLEAN', iptr);
+  RegisterProperty('NATIVESTR', 'String', iptrw);
+  RegisterProperty('TEXT', 'String', iptrw);
+  RegisterProperty('DATATYPE', 'TFIELDTYPE', iptrw);
+{$IFDEF DELPHI6UP}
+  RegisterProperty('PRECISION', 'INTEGER', iptrw);
+  RegisterProperty('NUMERICSCALE', 'INTEGER', iptrw);
+  RegisterProperty('SIZE', 'INTEGER', iptrw);
+{$ENDIF}
+  RegisterProperty('NAME', 'String', iptrw);
+  RegisterProperty('PARAMTYPE', 'TPARAMTYPE', iptrw);
+  RegisterProperty('VALUE', 'VARIANT', iptrw);
+  end;
+end;
+
+procedure SIRegisterTGUIDFIELD(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TFIELD','TGUIDFIELD') do
+  begin
+  end;
+end;
+
+procedure SIRegisterTVARIANTFIELD(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TFIELD','TVARIANTFIELD') do
+  begin
+  end;
+end;
+
+procedure SIRegisterTREFERENCEFIELD(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TDATASETFIELD','TREFERENCEFIELD') do
+  begin
+  RegisterProperty('REFERENCETABLENAME', 'String', iptrw);
+  end;
+end;
+
+procedure SIRegisterTDATASETFIELD(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TOBJECTFIELD','TDATASETFIELD') do
+  begin
+  RegisterProperty('NESTEDDATASET', 'TDATASET', iptr);
+  RegisterProperty('INCLUDEOBJECTFIELD', 'BOOLEAN', iptrw);
+  end;
+end;
+
+procedure SIRegisterTARRAYFIELD(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TOBJECTFIELD','TARRAYFIELD') do
+  begin
+  end;
+end;
+
+procedure SIRegisterTADTFIELD(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TOBJECTFIELD','TADTFIELD') do
+  begin
+  end;
+end;
+
+procedure SIRegisterTOBJECTFIELD(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TFIELD','TOBJECTFIELD') do
+  begin
+  RegisterProperty('FIELDCOUNT', 'INTEGER', iptr);
+  RegisterProperty('FIELDS', 'TFIELDS', iptr);
+  RegisterProperty('FIELDVALUES', 'VARIANT INTEGER', iptrw);
+  RegisterProperty('UNNAMED', 'BOOLEAN', iptr);
+  RegisterProperty('OBJECTTYPE', 'String', iptrw);
+  end;
+end;
+
+procedure SIRegisterTGRAPHICFIELD(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TBLOBFIELD','TGRAPHICFIELD') do
+  begin
+  end;
+end;
+
+procedure SIRegisterTMEMOFIELD(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TBLOBFIELD','TMEMOFIELD') do
+  begin
+  end;
+end;
+
+procedure SIRegisterTBLOBFIELD(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TFIELD','TBLOBFIELD') do
+  begin
+  RegisterMethod('Procedure LOADFROMFILE( const FILENAME : String)');
+  RegisterMethod('Procedure LOADFROMSTREAM( STREAM : TSTREAM)');
+  RegisterMethod('Procedure SAVETOFILE( const FILENAME : String)');
+  RegisterMethod('Procedure SAVETOSTREAM( STREAM : TSTREAM)');
+  RegisterProperty('BLOBSIZE', 'INTEGER', iptr);
+  RegisterProperty('MODIFIED', 'BOOLEAN', iptrw);
+  RegisterProperty('VALUE', 'String', iptrw);
+  RegisterProperty('TRANSLITERATE', 'BOOLEAN', iptrw);
+  RegisterProperty('BLOBTYPE', 'TBLOBTYPE', iptrw);
+{$IFDEF DELPHI6UP}
+  RegisterProperty('GRAPHICHEADER', 'BOOLEAN', iptrw);
+{$ENDIF}
+  end;
+end;
+
+{$IFDEF DELPHI6UP}
+procedure SIRegisterTFMTBCDFIELD(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TNUMERICFIELD','TFMTBCDFIELD') do
+  begin
+  RegisterProperty('VALUE', 'TBCD', iptrw);
+  RegisterProperty('CURRENCY', 'BOOLEAN', iptrw);
+  RegisterProperty('MAXVALUE', 'String', iptrw);
+  RegisterProperty('MINVALUE', 'String', iptrw);
+  RegisterProperty('PRECISION', 'INTEGER', iptrw);
+  end;
+end;
+{$ENDIF}
+
+procedure SIRegisterTBCDFIELD(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TNUMERICFIELD','TBCDFIELD') do
+  begin
+  RegisterProperty('VALUE', 'CURRENCY', iptrw);
+  RegisterProperty('CURRENCY', 'BOOLEAN', iptrw);
+  RegisterProperty('MAXVALUE', 'CURRENCY', iptrw);
+  RegisterProperty('MINVALUE', 'CURRENCY', iptrw);
+  RegisterProperty('PRECISION', 'INTEGER', iptrw);
+  end;
+end;
+
+procedure SIRegisterTVARBYTESFIELD(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TBYTESFIELD','TVARBYTESFIELD') do
+  begin
+  end;
+end;
+
+procedure SIRegisterTBYTESFIELD(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TBINARYFIELD','TBYTESFIELD') do
+  begin
+  end;
+end;
+
+procedure SIRegisterTBINARYFIELD(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TFIELD','TBINARYFIELD') do
+  begin
+  end;
+end;
+
+procedure SIRegisterTTIMEFIELD(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TDATETIMEFIELD','TTIMEFIELD') do
+  begin
+  end;
+end;
+
+procedure SIRegisterTDATEFIELD(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TDATETIMEFIELD','TDATEFIELD') do
+  begin
+  end;
+end;
+
+procedure SIRegisterTDATETIMEFIELD(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TFIELD','TDATETIMEFIELD') do
+  begin
+  RegisterProperty('VALUE', 'TDATETIME', iptrw);
+  RegisterProperty('DISPLAYFORMAT', 'String', iptrw);
+  end;
+end;
+
+procedure SIRegisterTBOOLEANFIELD(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TFIELD','TBOOLEANFIELD') do
+  begin
+  RegisterProperty('VALUE', 'BOOLEAN', iptrw);
+  RegisterProperty('DISPLAYVALUES', 'String', iptrw);
+  end;
+end;
+
+procedure SIRegisterTCURRENCYFIELD(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TFLOATFIELD','TCURRENCYFIELD') do
+  begin
+  end;
+end;
+
+procedure SIRegisterTFLOATFIELD(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TNUMERICFIELD','TFLOATFIELD') do
+  begin
+  RegisterProperty('VALUE', 'DOUBLE', iptrw);
+  RegisterProperty('CURRENCY', 'BOOLEAN', iptrw);
+  RegisterProperty('MAXVALUE', 'DOUBLE', iptrw);
+  RegisterProperty('MINVALUE', 'DOUBLE', iptrw);
+  RegisterProperty('PRECISION', 'INTEGER', iptrw);
+  end;
+end;
+
+procedure SIRegisterTAUTOINCFIELD(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TINTEGERFIELD','TAUTOINCFIELD') do
+  begin
+  end;
+end;
+
+procedure SIRegisterTWORDFIELD(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TINTEGERFIELD','TWORDFIELD') do
+  begin
+  end;
+end;
+
+procedure SIRegisterTLARGEINTFIELD(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TNUMERICFIELD','TLARGEINTFIELD') do
+  begin
+  RegisterProperty('ASLARGEINT', 'LARGEINT', iptrw);
+  RegisterProperty('VALUE', 'LARGEINT', iptrw);
+  RegisterProperty('MAXVALUE', 'LARGEINT', iptrw);
+  RegisterProperty('MINVALUE', 'LARGEINT', iptrw);
+  end;
+end;
+
+procedure SIRegisterTSMALLINTFIELD(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TINTEGERFIELD','TSMALLINTFIELD') do
+  begin
+  end;
+end;
+
+procedure SIRegisterTINTEGERFIELD(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TNUMERICFIELD','TINTEGERFIELD') do
+  begin
+  RegisterProperty('VALUE', 'LONGINT', iptrw);
+  RegisterProperty('MAXVALUE', 'LONGINT', iptrw);
+  RegisterProperty('MINVALUE', 'LONGINT', iptrw);
+  end;
+end;
+
+procedure SIRegisterTNUMERICFIELD(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TFIELD','TNUMERICFIELD') do
+  begin
+  RegisterProperty('DISPLAYFORMAT', 'String', iptrw);
+  RegisterProperty('EDITFORMAT', 'String', iptrw);
+  end;
+end;
+
+procedure SIRegisterTWIDESTRINGFIELD(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TSTRINGFIELD','TWIDESTRINGFIELD') do
+  begin
+  RegisterProperty('VALUE', 'WIDESTRING', iptrw);
+  end;
+end;
+
+procedure SIRegisterTSTRINGFIELD(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TFIELD','TSTRINGFIELD') do
+  begin
+  RegisterProperty('VALUE', 'String', iptrw);
+  RegisterProperty('FIXEDCHAR', 'BOOLEAN', iptrw);
+  RegisterProperty('TRANSLITERATE', 'BOOLEAN', iptrw);
+  end;
+end;
+
+procedure SIRegisterTFIELD(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TCOMPONENT','TFIELD') do
+  begin
+//RegisterMethod('Procedure ASSIGNVALUE( const VALUE : TVARREC)');
+  RegisterMethod('Procedure CLEAR');
+  RegisterMethod('Procedure FOCUSCONTROL');
+//  RegisterMethod('Function GETDATA( BUFFER : POINTER; NATIVEFORMAT : BOOLEAN) : BOOLEAN');
+  RegisterMethod('Function ISVALIDCHAR( INPUTCHAR : CHAR) : BOOLEAN');
+  RegisterMethod('Procedure REFRESHLOOKUPLIST');
+//  RegisterMethod('Procedure SETDATA( BUFFER : POINTER; NATIVEFORMAT : BOOLEAN)');
+  RegisterMethod('Procedure SETFIELDTYPE( VALUE : TFIELDTYPE)');
+//  RegisterMethod('Procedure VALIDATE( BUFFER : POINTER)');
+{$IFDEF DELPHI6UP}
+  RegisterProperty('ASBCD', 'TBCD', iptrw);
+{$ENDIF}
+  RegisterProperty('ASBOOLEAN', 'BOOLEAN', iptrw);
+  RegisterProperty('ASCURRENCY', 'CURRENCY', iptrw);
+  RegisterProperty('ASDATETIME', 'TDATETIME', iptrw);
+  RegisterProperty('ASFLOAT', 'DOUBLE', iptrw);
+  RegisterProperty('ASINTEGER', 'LONGINT', iptrw);
+  RegisterProperty('ASSTRING', 'String', iptrw);
+  RegisterProperty('ASVARIANT', 'VARIANT', iptrw);
+  RegisterProperty('ATTRIBUTESET', 'String', iptrw);
+  RegisterProperty('CALCULATED', 'BOOLEAN', iptrw);
+  RegisterProperty('CANMODIFY', 'BOOLEAN', iptr);
+  RegisterProperty('CURVALUE', 'VARIANT', iptr);
+  RegisterProperty('DATASET', 'TDATASET', iptrw);
+  RegisterProperty('DATASIZE', 'INTEGER', iptr);
+  RegisterProperty('DATATYPE', 'TFIELDTYPE', iptr);
+  RegisterProperty('DISPLAYNAME', 'String', iptr);
+  RegisterProperty('DISPLAYTEXT', 'String', iptr);
+  RegisterProperty('EDITMASK', 'TEDITMASK', iptrw);
+  RegisterProperty('EDITMASKPTR', 'TEDITMASK', iptr);
+  RegisterProperty('EDITMASK', 'String', iptrw);
+  RegisterProperty('EDITMASKPTR', 'String', iptr);
+  RegisterProperty('FIELDNO', 'INTEGER', iptr);
+  RegisterProperty('FULLNAME', 'String', iptr);
+  RegisterProperty('ISINDEXFIELD', 'BOOLEAN', iptr);
+  RegisterProperty('ISNULL', 'BOOLEAN', iptr);
+  RegisterProperty('LOOKUP', 'BOOLEAN', iptrw);
+  RegisterProperty('LOOKUPLIST', 'TLOOKUPLIST', iptr);
+  RegisterProperty('NEWVALUE', 'VARIANT', iptrw);
+  RegisterProperty('OFFSET', 'INTEGER', iptr);
+  RegisterProperty('OLDVALUE', 'VARIANT', iptr);
+  RegisterProperty('PARENTFIELD', 'TOBJECTFIELD', iptrw);
+  RegisterProperty('SIZE', 'INTEGER', iptrw);
+  RegisterProperty('TEXT', 'String', iptrw);
+  RegisterProperty('VALIDCHARS', 'TFIELDCHARS', iptrw);
+  RegisterProperty('VALUE', 'VARIANT', iptrw);
+  RegisterProperty('ALIGNMENT', 'TALIGNMENT', iptrw);
+  RegisterProperty('AUTOGENERATEVALUE', 'TAUTOREFRESHFLAG', iptrw);
+  RegisterProperty('CUSTOMCONSTRAINT', 'String', iptrw);
+  RegisterProperty('CONSTRAINTERRORMESSAGE', 'String', iptrw);
+  RegisterProperty('DEFAULTEXPRESSION', 'String', iptrw);
+  RegisterProperty('DISPLAYLABEL', 'String', iptrw);
+  RegisterProperty('DISPLAYWIDTH', 'INTEGER', iptrw);
+  RegisterProperty('FIELDKIND', 'TFIELDKIND', iptrw);
+  RegisterProperty('FIELDNAME', 'String', iptrw);
+  RegisterProperty('HASCONSTRAINTS', 'BOOLEAN', iptr);
+  RegisterProperty('INDEX', 'INTEGER', iptrw);
+  RegisterProperty('IMPORTEDCONSTRAINT', 'String', iptrw);
+  RegisterProperty('LOOKUPDATASET', 'TDATASET', iptrw);
+  RegisterProperty('LOOKUPKEYFIELDS', 'String', iptrw);
+  RegisterProperty('LOOKUPRESULTFIELD', 'String', iptrw);
+  RegisterProperty('KEYFIELDS', 'String', iptrw);
+  RegisterProperty('LOOKUPCACHE', 'BOOLEAN', iptrw);
+  RegisterProperty('ORIGIN', 'String', iptrw);
+  RegisterProperty('PROVIDERFLAGS', 'TPROVIDERFLAGS', iptrw);
+  RegisterProperty('READONLY', 'BOOLEAN', iptrw);
+  RegisterProperty('REQUIRED', 'BOOLEAN', iptrw);
+  RegisterProperty('VISIBLE', 'BOOLEAN', iptrw);
+  RegisterProperty('ONCHANGE', 'TFIELDNOTIFYEVENT', iptrw);
+  RegisterProperty('ONGETTEXT', 'TFIELDGETTEXTEVENT', iptrw);
+  RegisterProperty('ONSETTEXT', 'TFIELDSETTEXTEVENT', iptrw);
+  RegisterProperty('ONVALIDATE', 'TFIELDNOTIFYEVENT', iptrw);
+  end;
+end;
+
+procedure SIRegisterTLOOKUPLIST(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TOBJECT','TLOOKUPLIST') do
+  begin
+  RegisterMethod('Constructor CREATE');
+  RegisterMethod('Procedure ADD( const AKEY, AVALUE : VARIANT)');
+  RegisterMethod('Procedure CLEAR');
+  RegisterMethod('Function VALUEOFKEY( const AKEY : VARIANT) : VARIANT');
+  end;
+end;
+
+procedure SIRegisterTFIELDS(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TOBJECT','TFIELDS') do
+  begin
+  RegisterMethod('Constructor CREATE( ADATASET : TDATASET)');
+  RegisterMethod('Procedure ADD( FIELD : TFIELD)');
+  RegisterMethod('Procedure CHECKFIELDNAME( const FIELDNAME : String)');
+  RegisterMethod('Procedure CHECKFIELDNAMES( const FIELDNAMES : String)');
+  RegisterMethod('Procedure CLEAR');
+  RegisterMethod('Function FINDFIELD( const FIELDNAME : String) : TFIELD');
+  RegisterMethod('Function FIELDBYNAME( const FIELDNAME : String) : TFIELD');
+  RegisterMethod('Function FIELDBYNUMBER( FIELDNO : INTEGER) : TFIELD');
+  RegisterMethod('Procedure GETFIELDNAMES( LIST : TSTRINGS)');
+  RegisterMethod('Function INDEXOF( FIELD : TFIELD) : INTEGER');
+  RegisterMethod('Procedure REMOVE( FIELD : TFIELD)');
+  RegisterProperty('COUNT', 'INTEGER', iptr);
+  RegisterProperty('DATASET', 'TDATASET', iptr);
+  RegisterProperty('FIELDS', 'TFIELD INTEGER', iptrw);
+  end;
+end;
+
+procedure SIRegisterTFIELDLIST(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TFLATLIST','TFIELDLIST') do
+  begin
+  RegisterMethod('Function FIELDBYNAME( const NAME : String) : TFIELD');
+  RegisterMethod('Function FIND( const NAME : String) : TFIELD');
+  RegisterProperty('FIELDS', 'TFIELD INTEGER', iptr);
+  end;
+end;
+
+procedure SIRegisterTFIELDDEFLIST(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TFLATLIST','TFIELDDEFLIST') do
+  begin
+  RegisterMethod('Function FIELDBYNAME( const NAME : String) : TFIELDDEF');
+  RegisterMethod('Function FIND( const NAME : String) : TFIELDDEF');
+  RegisterProperty('FIELDDEFS', 'TFIELDDEF INTEGER', iptr);
+  end;
+end;
+
+procedure SIRegisterTFLATLIST(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TSTRINGLIST','TFLATLIST') do
+  begin
+  RegisterMethod('Constructor CREATE( ADATASET : TDATASET)');
+  RegisterMethod('Procedure UPDATE');
+  RegisterProperty('DATASET', 'TDATASET', iptr);
+  end;
+end;
+
+procedure SIRegisterTINDEXDEFS(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TDEFCOLLECTION','TINDEXDEFS') do
+  begin
+  RegisterMethod('Constructor CREATE( ADATASET : TDATASET)');
+  RegisterMethod('Function ADDINDEXDEF : TINDEXDEF');
+  RegisterMethod('Function FIND( const NAME : String) : TINDEXDEF');
+  RegisterMethod('Procedure UPDATE');
+  RegisterMethod('Function FINDINDEXFORFIELDS( const FIELDS : String) : TINDEXDEF');
+  RegisterMethod('Function GETINDEXFORFIELDS( const FIELDS : String; CASEINSENSITIVE : BOOLEAN) : TINDEXDEF');
+  RegisterMethod('Procedure ADD( const NAME, FIELDS : String; OPTIONS : TINDEXOPTIONS)');
+  RegisterProperty('ITEMS', 'TINDEXDEF INTEGER', iptrw);
+  end;
+end;
+
+procedure SIRegisterTINDEXDEF(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TNAMEDITEM','TINDEXDEF') do
+  begin
+  RegisterMethod('Constructor CREATE( OWNER : TINDEXDEFS; const NAME, FIELDS : String; OPTIONS : TINDEXOPTIONS)');
+  RegisterProperty('FIELDEXPRESSION', 'String', iptr);
+  RegisterProperty('CASEINSFIELDS', 'String', iptrw);
+  RegisterProperty('DESCFIELDS', 'String', iptrw);
+  RegisterProperty('EXPRESSION', 'String', iptrw);
+  RegisterProperty('FIELDS', 'String', iptrw);
+  RegisterProperty('OPTIONS', 'TINDEXOPTIONS', iptrw);
+  RegisterProperty('SOURCE', 'String', iptrw);
+  RegisterProperty('GROUPINGLEVEL', 'INTEGER', iptrw);
+  end;
+end;
+
+procedure SIRegisterTFIELDDEFS(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TDEFCOLLECTION','TFIELDDEFS') do
+  begin
+  RegisterMethod('Constructor CREATE( AOWNER : TPERSISTENT)');
+  RegisterMethod('Function ADDFIELDDEF : TFIELDDEF');
+  RegisterMethod('Function FIND( const NAME : String) : TFIELDDEF');
+  RegisterMethod('Procedure UPDATE');
+  RegisterMethod('Procedure ADD( const NAME : String; DATATYPE : TFIELDTYPE; SIZE : INTEGER; REQUIRED : BOOLEAN)');
+  RegisterProperty('HIDDENFIELDS', 'BOOLEAN', iptrw);
+  RegisterProperty('ITEMS', 'TFIELDDEF INTEGER', iptrw);
+  RegisterProperty('PARENTDEF', 'TFIELDDEF', iptr);
+  end;
+end;
+
+procedure SIRegisterTFIELDDEF(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TNAMEDITEM','TFIELDDEF') do
+  begin
+//  RegisterMethod('Constructor CREATE( OWNER : TFIELDDEFS; const NAME : STRING; DATATYPE : TFIELDTYPE; SIZE : INTEGER; REQUIRED : BOOLEAN; FIELDNO : INTEGER)');
+  RegisterMethod('Function ADDCHILD : TFIELDDEF');
+  RegisterMethod('Function CREATEFIELD( OWNER : TCOMPONENT; PARENTFIELD : TOBJECTFIELD; const FIELDNAME : String; CREATECHILDREN : BOOLEAN) : TFIELD');
+  RegisterMethod('Function HASCHILDDEFS : BOOLEAN');
+  RegisterProperty('FIELDCLASS', 'TFIELDCLASS', iptr);
+  RegisterProperty('FIELDNO', 'INTEGER', iptrw);
+  RegisterProperty('INTERNALCALCFIELD', 'BOOLEAN', iptrw);
+  RegisterProperty('PARENTDEF', 'TFIELDDEF', iptr);
+  RegisterProperty('REQUIRED', 'BOOLEAN', iptrw);
+  RegisterProperty('ATTRIBUTES', 'TFIELDATTRIBUTES', iptrw);
+  RegisterProperty('CHILDDEFS', 'TFIELDDEFS', iptrw);
+  RegisterProperty('DATATYPE', 'TFIELDTYPE', iptrw);
+  RegisterProperty('PRECISION', 'INTEGER', iptrw);
+  RegisterProperty('SIZE', 'INTEGER', iptrw);
+  end;
+end;
+
+procedure SIRegisterTDEFCOLLECTION(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TOWNEDCOLLECTION','TDEFCOLLECTION') do
+  begin
+//  RegisterMethod('Constructor CREATE( ADATASET : TDATASET; AOWNER : TPERSISTENT; ACLASS : TCOLLECTIONITEMCLASS)');
+  RegisterMethod('Function FIND( const ANAME : String) : TNAMEDITEM');
+  RegisterMethod('Procedure GETITEMNAMES( LIST : TSTRINGS)');
+  RegisterMethod('Function INDEXOF( const ANAME : String) : INTEGER');
+  RegisterProperty('DATASET', 'TDATASET', iptr);
+  RegisterProperty('UPDATED', 'BOOLEAN', iptrw);
+  end;
+end;
+
+procedure SIRegisterTNAMEDITEM(CL: TPSPascalCompiler);
+Begin
+With RegClassS(cl,'TCOLLECTIONITEM','TNAMEDITEM') do
+  begin
+  RegisterProperty('NAME', 'String', iptrw);
+  end;
+end;
+
+procedure SIRegister_DB(Cl: TPSPascalCompiler);
+Begin
+cl.AddTypeS('TFieldType', '(ftUnknown, ftString, ftSmallint, ftInteger, ftWord, ftBoolean, ftFloat, ftCurrency, ftBCD, ftDate, ftTime, ftDateTime,'+
+    'ftBytes, ftVarBytes, ftAutoInc, ftBlob, ftMemo, ftGraphic, ftFmtMemo, ftParadoxOle, ftDBaseOle, ftTypedBinary, ftCursor, ftFixedChar, ftWideString,'+
+    'ftLargeint, ftADT, ftArray, ftReference, ftDataSet, ftOraBlob, ftOraClob, ftVariant, ftInterface, ftIDispatch, ftGuid, ftTimeStamp, ftFMTBcd)');
+
+  CL.AddTypeS('TDataSetState', '(dsInactive, dsBrowse, dsEdit, dsInsert, dsSetKey, dsCalcFields, dsFilter, dsNewValue, dsOldValue, dsCurValue, dsBlockRead, dsInternalCalc, dsOpening)');
+
+cl.addTypeS('TLocateOption','(loCaseInsensitive, loPartialKey)');
+cl.addtypes('TLocateOptions','set of TLocateOption');
+cl.addtypes('TUpdateStatus','(usUnmodified, usModified, usInserted, usDeleted)');
+cl.addtypes('TUpdateStatusSet', 'set of TUpdateStatus');
+
+    cl.addTypeS('TPARAMTYPE', 'BYTE');
+RegClassS(cl,'TComponent','TDATASET');
+RegClassS(cl,'TComponent','TFIELD');
+RegClassS(cl,'TComponent','TFIELDDEFS');
+RegClassS(cl,'TComponent','TINDEXDEFS');
+RegClassS(cl, 'TComponent', 'TObjectField');
+RegClassS(cl, 'TComponent', 'TDataLink');
+RegClassS(cl, 'TComponent', 'TDataSource');
+RegClassS(cl, 'TComponent', 'TParam');
+
+SIRegisterTNAMEDITEM(Cl);
+Cl.addTypeS('TDEFUPDATEMETHOD', 'Procedure');
+SIRegisterTDEFCOLLECTION(Cl);
+cl.AddConstantN('FAHIDDENCOL','LONGINT').Value.tu32 := 1;
+cl.AddConstantN('FAREADONLY','LONGINT').Value.tu32 := 2;
+cl.AddConstantN('FAREQUIRED','LONGINT').Value.tu32 := 4;
+cl.AddConstantN('FALINK','LONGINT').Value.tu32 := 8;
+cl.AddConstantN('FAUNNAMED','LONGINT').Value.tu32 := 16;
+cl.AddConstantN('FAFIXED','LONGINT').Value.tu32 := 32;
+cl.addTypeS('TFIELDATTRIBUTES', 'BYTE');
+SIRegisterTFIELDDEF(Cl);
+SIRegisterTFIELDDEFS(Cl);
+cl.AddConstantN('IXPRIMARY','LONGINT').Value.tu32 := 1;
+cl.AddConstantN('IXUNIQUE','LONGINT').Value.tu32 := 2;
+cl.AddConstantN('IXDESCENDING','LONGINT').Value.tu32 := 4;
+cl.AddConstantN('IXCASEINSENSITIVE','LONGINT').Value.tu32 := 8;
+cl.AddConstantN('IXEXPRESSION','LONGINT').Value.tu32 := 16;
+cl.AddConstantN('IXNONMAINTAINED','LONGINT').Value.tu32 := 32;
+cl.addTypeS('TINDEXOPTIONS', 'BYTE');
+SIRegisterTINDEXDEF(Cl);
+SIRegisterTINDEXDEFS(Cl);
+SIRegisterTFLATLIST(Cl);
+SIRegisterTFIELDDEFLIST(Cl);
+SIRegisterTFIELDLIST(Cl);
+cl.AddConstantN('FKDATA','LONGINT').Value.tu32 := 1;
+cl.AddConstantN('FKCALCULATED','LONGINT').Value.tu32 := 2;
+cl.AddConstantN('FKLOOKUP','LONGINT').Value.tu32 := 4;
+cl.AddConstantN('FKINTERNALCALC','LONGINT').Value.tu32 := 8;
+cl.AddConstantN('FKAGGREGATE','LONGINT').Value.tu32 := 16;
+cl.addTypeS('TFIELDKINDS', 'BYTE');
+SIRegisterTFIELDS(Cl);
+cl.AddConstantN('PFINUPDATE','LONGINT').Value.tu32 := 1;
+cl.AddConstantN('PFINWHERE','LONGINT').Value.tu32 := 2;
+cl.AddConstantN('PFINKEY','LONGINT').Value.tu32 := 4;
+cl.AddConstantN('PFHIDDEN','LONGINT').Value.tu32 :=8;
+cl.addTypeS('TPROVIDERFLAGS', 'BYTE');
+cl.addTypeS('TFIELDNOTIFYEVENT', 'Procedure ( SENDER : TFIELD)');
+cl.addTypeS('TFIELDGETTEXTEVENT', 'Procedure ( SENDER : TFIELD; var TEXT : S'
+   +'TRING; DISPLAYTEXT : BOOLEAN)');
+cl.addTypeS('TFIELDSETTEXTEVENT', 'Procedure ( SENDER : TFIELD; const TEXT :'
+   +' String)');
+cl.addTypeS('TAUTOREFRESHFLAG', '( ARNONE, ARAUTOINC, ARDEFAULT )');
+SIRegisterTLOOKUPLIST(Cl);
+SIRegisterTFIELD(Cl);
+SIRegisterTSTRINGFIELD(Cl);
+SIRegisterTWIDESTRINGFIELD(Cl);
+SIRegisterTNUMERICFIELD(Cl);
+SIRegisterTINTEGERFIELD(Cl);
+SIRegisterTSMALLINTFIELD(Cl);
+cl.addTypeS('LARGEINT', 'INT64');
+SIRegisterTLARGEINTFIELD(Cl);
+SIRegisterTWORDFIELD(Cl);
+SIRegisterTAUTOINCFIELD(Cl);
+SIRegisterTFLOATFIELD(Cl);
+SIRegisterTCURRENCYFIELD(Cl);
+SIRegisterTBOOLEANFIELD(Cl);
+SIRegisterTDATETIMEFIELD(Cl);
+SIRegisterTDATEFIELD(Cl);
+SIRegisterTTIMEFIELD(Cl);
+SIRegisterTBINARYFIELD(Cl);
+SIRegisterTBYTESFIELD(Cl);
+SIRegisterTVARBYTESFIELD(Cl);
+SIRegisterTBCDFIELD(Cl);
+{$IFDEF DELPHI6UP}
+SIRegisterTFMTBCDFIELD(Cl);
+{$ENDIF}
+cl.addTypeS('TBLOBTYPE', 'BYTE');
+SIRegisterTBLOBFIELD(Cl);
+SIRegisterTMEMOFIELD(Cl);
+SIRegisterTGRAPHICFIELD(Cl);
+SIRegisterTOBJECTFIELD(Cl);
+SIRegisterTADTFIELD(Cl);
+SIRegisterTARRAYFIELD(Cl);
+SIRegisterTDATASETFIELD(Cl);
+SIRegisterTREFERENCEFIELD(Cl);
+SIRegisterTVARIANTFIELD(Cl);
+SIRegisterTGUIDFIELD(Cl);
+cl.addTypeS('TBLOBDATA', 'STRING');
+cl.AddConstantN('PTUNKNOWN','LONGINT').Value.tu32 := 1;
+cl.AddConstantN('PTINPUT','LONGINT').Value.tu32 := 2;
+cl.AddConstantN('PTOUTPUT','LONGINT').Value.tu32 := 4;
+cl.AddConstantN('PTINPUTOUTPUT','LONGINT').Value.tu32 := 8;
+cl.AddConstantN('PTRESULT','LONGINT').Value.tu32 := 16;
+RegClassS(cl,'TObject','TPARAMS');
+SIRegisterTPARAM(Cl);
+SIRegisterTPARAMS(Cl);
+cl.addTypeS('TDATAACTION', '( DAFAIL, DAABORT, DARETRY )');
+cl.addTypeS('TBLOBSTREAMMODE', '( BMREAD, BMWRITE, BMREADWRITE )');
+cl.addTypeS('TDATAOPERATION', 'Procedure');
+cl.addTypeS('TDATASETNOTIFYEVENT', 'Procedure ( DATASET : TDATASET)');
+cl.addTypeS('TDATASETERROREVENT', 'Procedure ( DATASET : TDATASET; E : TObject'
+   +'; var ACTION : TDATAACTION)');
+cl.addTypeS('TFILTERRECORDEVENT', 'Procedure ( DATASET : TDATASET; var ACCEP'
+   +'T : BOOLEAN)');
+SIRegisterTDATASET(Cl);
+end;
+
+{$IFDEF USEIMPORTER}
+initialization
+CIImporter.AddCallBack(@SIRegister_DB,PT_ClassImport);
+{$ENDIF}
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_buttons.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_buttons.pas
new file mode 100644
index 0000000..52c0873
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_buttons.pas	
@@ -0,0 +1,87 @@
+{ Compiletime Buttons support }
+unit uPSC_buttons;
+{$I PascalScript.inc}
+interface
+uses
+  uPSCompiler, uPSUtils;
+
+{
+  Will register files from:
+    Buttons
+ 
+  Requires
+      STD, classes, controls and graphics and StdCtrls
+}
+procedure SIRegister_Buttons_TypesAndConsts(Cl: TPSPascalCompiler);
+
+procedure SIRegisterTSPEEDBUTTON(Cl: TPSPascalCompiler);
+procedure SIRegisterTBITBTN(Cl: TPSPascalCompiler);
+
+procedure SIRegister_Buttons(Cl: TPSPascalCompiler);
+
+implementation
+
+procedure SIRegisterTSPEEDBUTTON(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TGRAPHICCONTROL'), 'TSPEEDBUTTON') do
+  begin
+    RegisterProperty('ALLOWALLUP', 'BOOLEAN', iptrw);
+    RegisterProperty('GROUPINDEX', 'INTEGER', iptrw);
+    RegisterProperty('DOWN', 'BOOLEAN', iptrw);
+    RegisterProperty('CAPTION', 'String', iptrw);
+    RegisterProperty('FONT', 'TFont', iptrw);
+    RegisterProperty('GLYPH', 'TBITMAP', iptrw);
+    RegisterProperty('LAYOUT', 'TBUTTONLAYOUT', iptrw);
+    RegisterProperty('MARGIN', 'INTEGER', iptrw);
+    RegisterProperty('NUMGLYPHS', 'BYTE', iptrw);
+    RegisterProperty('PARENTFONT', 'Boolean', iptrw);
+    RegisterProperty('PARENTSHOWHINT', 'Boolean', iptrw);
+    RegisterProperty('SPACING', 'INTEGER', iptrw);
+    RegisterProperty('ONCLICK', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONDBLCLICK', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONMOUSEDOWN', 'TMouseEvent', iptrw);
+    RegisterProperty('ONMOUSEMOVE', 'TMouseMoveEvent', iptrw);
+    RegisterProperty('ONMOUSEUP', 'TMouseEvent', iptrw);
+  end;
+end;
+
+procedure SIRegisterTBITBTN(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TBUTTON'), 'TBITBTN') do
+  begin
+    RegisterProperty('GLYPH', 'TBITMAP', iptrw);
+    RegisterProperty('KIND', 'TBITBTNKIND', iptrw);
+    RegisterProperty('LAYOUT', 'TBUTTONLAYOUT', iptrw);
+    RegisterProperty('MARGIN', 'INTEGER', iptrw);
+    RegisterProperty('NUMGLYPHS', 'BYTE', iptrw);
+    RegisterProperty('STYLE', 'TBUTTONSTYLE', iptrw);
+    RegisterProperty('SPACING', 'INTEGER', iptrw);
+  end;
+end;
+
+
+
+procedure SIRegister_Buttons_TypesAndConsts(Cl: TPSPascalCompiler);
+begin
+  Cl.AddTypeS('TButtonLayout', '(blGlyphLeft, blGlyphRight, blGlyphTop, blGlyphBottom)');
+  Cl.AddTypeS('TButtonState', '(bsUp, bsDisabled, bsDown, bsExclusive)');
+  Cl.AddTypeS('TButtonStyle', '(bsAutoDetect, bsWin31, bsNew)');
+  Cl.AddTypeS('TBitBtnKind', '(bkCustom, bkOK, bkCancel, bkHelp, bkYes, bkNo, bkClose, bkAbort, bkRetry, bkIgnore, bkAll)');
+
+end;
+
+procedure SIRegister_Buttons(Cl: TPSPascalCompiler);
+begin
+  SIRegister_Buttons_TypesAndConsts(cl);
+  SIRegisterTSPEEDBUTTON(cl);
+  SIRegisterTBITBTN(cl);
+end;
+
+// PS_MINIVCL changes by Martijn Laan (mlaan at wintax _dot_ nl)
+
+
+end.
+
+
+
+
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_classes.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_classes.pas
new file mode 100644
index 0000000..d615a3c
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_classes.pas	
@@ -0,0 +1,320 @@
+{ Compiletime Classes support }
+unit uPSC_classes;
+
+{$I PascalScript.inc}
+interface
+uses
+  uPSCompiler, uPSUtils;
+
+{
+  Will register files from:
+    Classes (exception TPersistent and TComponent)
+ 
+  Register STD first
+
+}
+
+procedure SIRegister_Classes_TypesAndConsts(Cl: TPSPascalCompiler);
+
+procedure SIRegisterTStrings(cl: TPSPascalCompiler; Streams: Boolean);
+procedure SIRegisterTStringList(cl: TPSPascalCompiler);
+{$IFNDEF PS_MINIVCL}
+procedure SIRegisterTBITS(Cl: TPSPascalCompiler);
+{$ENDIF}
+procedure SIRegisterTSTREAM(Cl: TPSPascalCompiler);
+procedure SIRegisterTHANDLESTREAM(Cl: TPSPascalCompiler);
+{$IFNDEF PS_MINIVCL}
+procedure SIRegisterTMEMORYSTREAM(Cl: TPSPascalCompiler);
+{$ENDIF}
+procedure SIRegisterTFILESTREAM(Cl: TPSPascalCompiler);
+{$IFNDEF PS_MINIVCL}
+procedure SIRegisterTCUSTOMMEMORYSTREAM(Cl: TPSPascalCompiler);
+procedure SIRegisterTRESOURCESTREAM(Cl: TPSPascalCompiler);
+procedure SIRegisterTPARSER(Cl: TPSPascalCompiler);
+procedure SIRegisterTCOLLECTIONITEM(CL: TPSPascalCompiler);
+procedure SIRegisterTCOLLECTION(CL: TPSPascalCompiler);
+{$IFDEF DELPHI3UP}
+procedure SIRegisterTOWNEDCOLLECTION(CL: TPSPascalCompiler);
+{$ENDIF}
+{$ENDIF}
+
+procedure SIRegister_Classes(Cl: TPSPascalCompiler; Streams: Boolean{$IFDEF D4PLUS}=True{$ENDIF});
+
+implementation
+
+procedure SIRegisterTStrings(cl: TPSPascalCompiler; Streams: Boolean); // requires TPersistent
+begin
+  with Cl.AddClassN(cl.FindClass('TPersistent'), 'TSTRINGS') do
+  begin
+    IsAbstract := True;
+    RegisterMethod('function Add(S: String): Integer;');
+    RegisterMethod('procedure Append(S: String);');
+    RegisterMethod('procedure AddStrings(String: TStrings);');
+    RegisterMethod('procedure Clear;');
+    RegisterMethod('procedure Delete(Index: Integer);');
+    RegisterMethod('function IndexOf(const S: String): Integer; ');
+    RegisterMethod('procedure Insert(Index: Integer; S: String); ');
+    RegisterProperty('Count', 'Integer', iptR);
+    RegisterProperty('Text', 'String', iptrw);
+    RegisterProperty('CommaText', 'String', iptrw);
+    if Streams then
+    begin
+      RegisterMethod('procedure LoadFromFile(FileName: String); ');
+      RegisterMethod('procedure SaveToFile(FileName: String); ');
+    end;
+    RegisterProperty('Strings', 'String Integer', iptRW);
+    SetDefaultPropery('Strings');
+    RegisterProperty('Objects', 'TObject Integer', iptRW);
+
+    {$IFNDEF PS_MINIVCL}
+    RegisterMethod('procedure BeginUpdate;');
+    RegisterMethod('procedure EndUpdate;');
+    RegisterMethod('function Equals(Strings: TStrings): Boolean;');
+    RegisterMethod('procedure Exchange(Index1, Index2: Integer);');
+    RegisterMethod('function IndexOfName(Name: String): Integer;');
+    if Streams then
+      RegisterMethod('procedure LoadFromStream(Stream: TStream); ');
+    RegisterMethod('procedure Move(CurIndex, NewIndex: Integer); ');
+    if Streams then
+      RegisterMethod('procedure SaveToStream(Stream: TStream); ');
+    RegisterMethod('procedure SetText(Text: PChar); ');
+    RegisterProperty('Names', 'String Integer', iptr);
+    RegisterProperty('Values', 'String String', iptRW);
+    RegisterMethod('function ADDOBJECT(S:String;AOBJECT:TOBJECT):INTEGER');
+    RegisterMethod('function GETTEXT:PCHAR');
+    RegisterMethod('function INDEXOFOBJECT(AOBJECT:TOBJECT):INTEGER');
+    RegisterMethod('procedure INSERTOBJECT(INDEX:INTEGER;S:String;AOBJECT:TOBJECT)');
+    {$ENDIF}
+  end;
+end;
+
+procedure SIRegisterTSTRINGLIST(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TSTRINGS'), 'TSTRINGLIST') do
+  begin
+    RegisterMethod('function FIND(S:STRING;var INDEX:INTEGER):BOOLEAN');
+    RegisterMethod('procedure SORT');
+    RegisterProperty('DUPLICATES', 'TDUPLICATES', iptrw);
+    RegisterProperty('SORTED', 'BOOLEAN', iptrw);
+    RegisterProperty('ONCHANGE', 'TNOTIFYEVENT', iptrw);
+    RegisterProperty('ONCHANGING', 'TNOTIFYEVENT', iptrw);
+  end;
+end;
+
+{$IFNDEF PS_MINIVCL}
+procedure SIRegisterTBITS(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TObject'), 'TBITS') do
+  begin
+    RegisterMethod('function OPENBIT:INTEGER');
+    RegisterProperty('BITS', 'BOOLEAN INTEGER', iptrw);
+    RegisterProperty('SIZE', 'INTEGER', iptrw);
+  end;
+end;
+{$ENDIF}
+
+procedure SIRegisterTSTREAM(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TOBJECT'), 'TSTREAM') do
+  begin
+    IsAbstract := True;
+    RegisterMethod('function READ(BUFFER:STRING;COUNT:LONGINT):LONGINT');
+    RegisterMethod('function WRITE(BUFFER:STRING;COUNT:LONGINT):LONGINT');
+    RegisterMethod('function SEEK(OFFSET:LONGINT;ORIGIN:WORD):LONGINT');
+    RegisterMethod('procedure READBUFFER(BUFFER:STRING;COUNT:LONGINT)');
+    RegisterMethod('procedure WRITEBUFFER(BUFFER:STRING;COUNT:LONGINT)');
+    {$IFDEF DELPHI4UP}
+    RegisterMethod('function COPYFROM(SOURCE:TSTREAM;COUNT:INT64):LONGINT');
+    {$ELSE}
+    RegisterMethod('function COPYFROM(SOURCE:TSTREAM;COUNT:Integer):LONGINT');
+    {$ENDIF}
+    RegisterProperty('POSITION', 'LONGINT', iptrw);
+    RegisterProperty('SIZE', 'LONGINT', iptrw);
+  end;
+end;
+
+procedure SIRegisterTHANDLESTREAM(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TSTREAM'), 'THANDLESTREAM') do
+  begin
+    RegisterMethod('constructor CREATE(AHANDLE:INTEGER)');
+    RegisterProperty('HANDLE', 'INTEGER', iptr);
+  end;
+end;
+
+{$IFNDEF PS_MINIVCL}
+procedure SIRegisterTMEMORYSTREAM(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TCUSTOMMEMORYSTREAM'), 'TMEMORYSTREAM') do
+  begin
+    RegisterMethod('procedure CLEAR');
+    RegisterMethod('procedure LOADFROMSTREAM(STREAM:TSTREAM)');
+    RegisterMethod('procedure LOADFROMFILE(FILENAME:String)');
+    RegisterMethod('procedure SETSIZE(NEWSIZE:LONGINT)');
+  end;
+end;
+{$ENDIF}
+
+procedure SIRegisterTFILESTREAM(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('THANDLESTREAM'), 'TFILESTREAM') do
+  begin
+    RegisterMethod('constructor CREATE(FILENAME:String;MODE:WORD)');
+  end;
+end;
+
+{$IFNDEF PS_MINIVCL}
+procedure SIRegisterTCUSTOMMEMORYSTREAM(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TSTREAM'), 'TCUSTOMMEMORYSTREAM') do
+  begin
+    IsAbstract := True;
+    RegisterMethod('procedure SAVETOSTREAM(STREAM:TSTREAM)');
+    RegisterMethod('procedure SAVETOFILE(FILENAME:String)');
+  end;
+end;
+
+procedure SIRegisterTRESOURCESTREAM(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TCUSTOMMEMORYSTREAM'), 'TRESOURCESTREAM') do
+  begin
+    RegisterMethod('constructor CREATE(INSTANCE:THANDLE;RESNAME:String;RESTYPE:String)');
+    RegisterMethod('constructor CREATEFROMID(INSTANCE:THANDLE;RESID:INTEGER;RESTYPE:String)');
+  end;
+end;
+
+procedure SIRegisterTPARSER(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TOBJECT'), 'TPARSER') do
+  begin
+    RegisterMethod('constructor CREATE(STREAM:TSTREAM)');
+    RegisterMethod('procedure CHECKTOKEN(T:CHAR)');
+    RegisterMethod('procedure CHECKTOKENSYMBOL(S:String)');
+    RegisterMethod('procedure ERROR(IDENT:INTEGER)');
+    RegisterMethod('procedure ERRORSTR(MESSAGE:String)');
+    RegisterMethod('procedure HEXTOBINARY(STREAM:TSTREAM)');
+    RegisterMethod('function NEXTTOKEN:CHAR');
+    RegisterMethod('function SOURCEPOS:LONGINT');
+    RegisterMethod('function TOKENCOMPONENTIDENT:String');
+    RegisterMethod('function TOKENFLOAT:EXTENDED');
+    RegisterMethod('function TOKENINT:LONGINT');
+    RegisterMethod('function TOKENSTRING:String');
+    RegisterMethod('function TOKENSYMBOLIS(S:String):BOOLEAN');
+    RegisterProperty('SOURCELINE', 'INTEGER', iptr);
+    RegisterProperty('TOKEN', 'CHAR', iptr);
+  end;
+end;
+
+procedure SIRegisterTCOLLECTIONITEM(CL: TPSPascalCompiler);
+Begin
+  if cl.FindClass('TCOLLECTION') = nil then cl.AddClassN(cl.FindClass('TPERSISTENT'), 'TCOLLECTION');
+  With cl.AddClassN(cl.FindClass('TPERSISTENT'),'TCOLLECTIONITEM') do
+  begin
+  RegisterMethod('Constructor CREATE( COLLECTION : TCOLLECTION)');
+  RegisterProperty('COLLECTION', 'TCOLLECTION', iptrw);
+{$IFDEF DELPHI3UP}  RegisterProperty('ID', 'INTEGER', iptr); {$ENDIF}
+  RegisterProperty('INDEX', 'INTEGER', iptrw);
+{$IFDEF DELPHI3UP}  RegisterProperty('DISPLAYNAME', 'String', iptrw); {$ENDIF}
+  end;
+end;
+
+procedure SIRegisterTCOLLECTION(CL: TPSPascalCompiler);
+var
+  cr: TPSCompileTimeClass;
+Begin
+  cr := CL.FindClass('TCOLLECTION');
+  if cr = nil then cr := cl.AddClassN(cl.FindClass('TPERSISTENT'), 'TCOLLECTION');
+With cr do
+  begin
+//  RegisterMethod('Constructor CREATE( ITEMCLASS : TCOLLECTIONITEMCLASS)');
+{$IFDEF DELPHI3UP}  RegisterMethod('Function OWNER : TPERSISTENT'); {$ENDIF}
+  RegisterMethod('Function ADD : TCOLLECTIONITEM');
+  RegisterMethod('Procedure BEGINUPDATE');
+  RegisterMethod('Procedure CLEAR');
+{$IFDEF DELPHI5UP}  RegisterMethod('Procedure DELETE( INDEX : INTEGER)'); {$ENDIF}
+  RegisterMethod('Procedure ENDUPDATE');
+{$IFDEF DELPHI3UP}  RegisterMethod('Function FINDITEMID( ID : INTEGER) : TCOLLECTIONITEM'); {$ENDIF}
+{$IFDEF DELPHI3UP}  RegisterMethod('Function INSERT( INDEX : INTEGER) : TCOLLECTIONITEM'); {$ENDIF}
+  RegisterProperty('COUNT', 'INTEGER', iptr);
+{$IFDEF DELPHI3UP}  RegisterProperty('ITEMCLASS', 'TCOLLECTIONITEMCLASS', iptr); {$ENDIF}
+  RegisterProperty('ITEMS', 'TCOLLECTIONITEM INTEGER', iptrw);
+  end;
+end;
+
+{$IFDEF DELPHI3UP}
+procedure SIRegisterTOWNEDCOLLECTION(CL: TPSPascalCompiler);
+Begin
+With Cl.AddClassN(cl.FindClass('TCOLLECTION'),'TOWNEDCOLLECTION') do
+  begin
+//  RegisterMethod('Constructor CREATE( AOWNER : TPERSISTENT; ITEMCLASS : TCOLLECTIONITEMCLASS)');
+  end;
+end;
+{$ENDIF}
+{$ENDIF}
+
+procedure SIRegister_Classes_TypesAndConsts(Cl: TPSPascalCompiler);
+begin
+  cl.AddConstantN('soFromBeginning', 'Longint').Value.ts32 := 0;
+  cl.AddConstantN('soFromCurrent', 'Longint').Value.ts32 := 1;
+  cl.AddConstantN('soFromEnd', 'Longint').Value.ts32 := 2;
+  cl.AddConstantN('toEOF', 'Char').Value.tchar := #0;
+  cl.AddConstantN('toSymbol', 'Char').Value.tchar := #1;
+  cl.AddConstantN('toString', 'Char').Value.tchar := #2;
+  cl.AddConstantN('toInteger', 'Char').Value.tchar := #3;
+  cl.AddConstantN('toFloat', 'Char').Value.tchar := #4;
+  cl.AddConstantN('fmCreate', 'Longint').Value.ts32 := $FFFF;
+  cl.AddConstantN('fmOpenRead', 'Longint').Value.ts32 := 0;
+  cl.AddConstantN('fmOpenWrite', 'Longint').Value.ts32 := 1;
+  cl.AddConstantN('fmOpenReadWrite', 'Longint').Value.ts32 := 2;
+  cl.AddConstantN('fmShareCompat', 'Longint').Value.ts32 := 0;
+  cl.AddConstantN('fmShareExclusive', 'Longint').Value.ts32 := $10;
+  cl.AddConstantN('fmShareDenyWrite', 'Longint').Value.ts32 := $20;
+  cl.AddConstantN('fmShareDenyRead', 'Longint').Value.ts32 := $30;
+  cl.AddConstantN('fmShareDenyNone', 'Longint').Value.ts32 := $40;
+  cl.AddConstantN('SecsPerDay', 'Longint').Value.ts32 := 86400;
+  cl.AddConstantN('MSecPerDay', 'Longint').Value.ts32 := 86400000;
+  cl.AddConstantN('DateDelta', 'Longint').Value.ts32 := 693594;
+  cl.AddTypeS('TAlignment', '(taLeftJustify, taRightJustify, taCenter)');
+  cl.AddTypeS('THelpEvent', 'function (Command: Word; Data: Longint; var CallHelp: Boolean): Boolean');
+  cl.AddTypeS('TGetStrProc', 'procedure(const S: String)');
+  cl.AddTypeS('TDuplicates', '(dupIgnore, dupAccept, dupError)');
+  cl.AddTypeS('TOperation', '(opInsert, opRemove)');
+  cl.AddTypeS('THANDLE', 'Longint');
+
+  cl.AddTypeS('TNotifyEvent', 'procedure (Sender: TObject)');
+end;
+
+procedure SIRegister_Classes(Cl: TPSPascalCompiler; Streams: Boolean);
+begin
+  SIRegister_Classes_TypesAndConsts(Cl);
+  if Streams then
+    SIRegisterTSTREAM(Cl);
+  SIRegisterTStrings(cl, Streams);
+  SIRegisterTStringList(cl);
+  {$IFNDEF PS_MINIVCL}
+  SIRegisterTBITS(cl);
+  {$ENDIF}
+  if Streams then
+  begin
+    SIRegisterTHANDLESTREAM(Cl);
+    SIRegisterTFILESTREAM(Cl);
+    {$IFNDEF PS_MINIVCL}
+    SIRegisterTCUSTOMMEMORYSTREAM(Cl);
+    SIRegisterTMEMORYSTREAM(Cl);
+    SIRegisterTRESOURCESTREAM(Cl);
+    {$ENDIF}
+  end;
+  {$IFNDEF PS_MINIVCL}
+  SIRegisterTPARSER(Cl);
+  SIRegisterTCOLLECTIONITEM(Cl);
+  SIRegisterTCOLLECTION(Cl);
+  {$IFDEF DELPHI3UP}
+  SIRegisterTOWNEDCOLLECTION(Cl);
+  {$ENDIF}
+  {$ENDIF}
+end;
+
+// PS_MINIVCL changes by Martijn Laan (mlaan at wintax _dot_ nl)
+
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_comobj.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_comobj.pas
new file mode 100644
index 0000000..16dd254
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_comobj.pas	
@@ -0,0 +1,28 @@
+{ compiletime ComObj support }
+unit uPSC_comobj;
+
+{$I PascalScript.inc}
+interface
+uses
+  uPSCompiler, uPSUtils;
+
+{
+ 
+Will register:
+ 
+function CreateOleObject(const ClassName: String): IDispatch;
+function GetActiveOleObject(const ClassName: String): IDispatch;
+
+}
+
+procedure SIRegister_ComObj(cl: TPSPascalCompiler);
+
+implementation
+
+procedure SIRegister_ComObj(cl: TPSPascalCompiler);
+begin
+  cl.AddDelphiFunction('function CreateOleObject(const ClassName: String): IDispatch;');
+  cl.AddDelphiFunction('function GetActiveOleObject(const ClassName: String): IDispatch;');
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_controls.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_controls.pas
new file mode 100644
index 0000000..14d734b
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_controls.pas	
@@ -0,0 +1,236 @@
+{ Compiletime Controls support }
+unit uPSC_controls;
+{$I PascalScript.inc}
+interface
+uses
+  uPSCompiler, uPSUtils;
+
+{
+  Will register files from:
+    Controls
+ 
+  Register the STD, Classes (at least the types&consts) and Graphics libraries first
+ 
+}
+
+procedure SIRegister_Controls_TypesAndConsts(Cl: TPSPascalCompiler);
+
+procedure SIRegisterTControl(Cl: TPSPascalCompiler);
+procedure SIRegisterTWinControl(Cl: TPSPascalCompiler); 
+procedure SIRegisterTGraphicControl(cl: TPSPascalCompiler); 
+procedure SIRegisterTCustomControl(cl: TPSPascalCompiler); 
+procedure SIRegisterTDragObject(cl: TPSPascalCompiler);
+
+procedure SIRegister_Controls(Cl: TPSPascalCompiler);
+
+
+implementation
+
+procedure SIRegisterTControl(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TComponent'), 'TCONTROL') do
+  begin
+    RegisterMethod('constructor Create(AOwner: TComponent);');
+    RegisterMethod('procedure BringToFront;');
+    RegisterMethod('procedure Hide;');
+    RegisterMethod('procedure Invalidate;virtual;');
+    RegisterMethod('procedure refresh;');
+    RegisterMethod('procedure Repaint;virtual;');
+    RegisterMethod('procedure SendToBack;');
+    RegisterMethod('procedure Show;');
+    RegisterMethod('procedure Update;virtual;');
+    RegisterMethod('procedure SetBounds(x,y,w,h: Integer);virtual;');
+    RegisterProperty('Left', 'Integer', iptRW);
+    RegisterProperty('Top', 'Integer', iptRW);
+    RegisterProperty('Width', 'Integer', iptRW);
+    RegisterProperty('Height', 'Integer', iptRW);
+    RegisterProperty('Hint', 'String', iptRW);
+    RegisterProperty('Align', 'TAlign', iptRW);
+    RegisterProperty('ClientHeight', 'Longint', iptRW);
+    RegisterProperty('ClientWidth', 'Longint', iptRW);
+    RegisterProperty('ShowHint', 'Boolean', iptRW);
+    RegisterProperty('Visible', 'Boolean', iptRW);
+    RegisterProperty('ENABLED', 'BOOLEAN', iptrw);
+    RegisterProperty('CURSOR', 'TCURSOR', iptrw);
+
+    {$IFNDEF PS_MINIVCL}
+    RegisterMethod('function Dragging: Boolean;');
+    RegisterMethod('function HasParent: Boolean');
+    RegisterMethod('procedure BEGINDRAG(IMMEDIATE:BOOLEAN)');
+    RegisterMethod('function CLIENTTOSCREEN(POINT:TPOINT):TPOINT');
+    RegisterMethod('procedure ENDDRAG(DROP:BOOLEAN)');
+    {$IFNDEF CLX}
+    RegisterMethod('function GETTEXTBUF(BUFFER:PCHAR;BUFSIZE:INTEGER):INTEGER');
+    RegisterMethod('function GETTEXTLEN:INTEGER');
+    RegisterMethod('procedure SETTEXTBUF(BUFFER:PCHAR)');
+    RegisterMethod('function PERFORM(MSG:CARDINAL;WPARAM,LPARAM:LONGINT):LONGINT');
+    {$ENDIF}
+    RegisterMethod('function SCREENTOCLIENT(POINT:TPOINT):TPOINT');
+    {$ENDIF}
+  end;
+end;
+
+procedure SIRegisterTWinControl(Cl: TPSPascalCompiler); // requires TControl
+begin
+  with Cl.AddClassN(cl.FindClass('TControl'), 'TWINCONTROL') do
+  begin
+
+    with Cl.FindClass('TControl') do
+    begin
+      RegisterProperty('Parent', 'TWinControl', iptRW);
+    end;
+
+    {$IFNDEF CLX}
+    RegisterProperty('Handle', 'Longint', iptR);
+    {$ENDIF}
+    RegisterProperty('Showing', 'Boolean', iptR);
+    RegisterProperty('TabOrder', 'Integer', iptRW);
+    RegisterProperty('TabStop', 'Boolean', iptRW);
+    RegisterMethod('function CANFOCUS:BOOLEAN');
+    RegisterMethod('function FOCUSED:BOOLEAN');
+    RegisterProperty('CONTROLS', 'TCONTROL INTEGER', iptr);
+    RegisterProperty('CONTROLCOUNT', 'INTEGER', iptr);
+
+    {$IFNDEF PS_MINIVCL}
+    RegisterMethod('function HandleAllocated: Boolean;');
+    RegisterMethod('procedure HandleNeeded;');
+    RegisterMethod('procedure EnableAlign;');
+    RegisterMethod('procedure RemoveControl(AControl: TControl);');
+    RegisterMethod('procedure InsertControl(AControl: TControl);');
+    RegisterMethod('procedure Realign;');
+    RegisterMethod('procedure ScaleBy(M, D: Integer);');
+    RegisterMethod('procedure ScrollBy(DeltaX, DeltaY: Integer);');
+    RegisterMethod('procedure SetFocus; virtual;');
+    {$IFNDEF CLX}
+    RegisterMethod('procedure PAINTTO(DC:Longint;X,Y:INTEGER)');
+    {$ENDIF}
+
+    RegisterMethod('function CONTAINSCONTROL(CONTROL:TCONTROL):BOOLEAN');
+    RegisterMethod('procedure DISABLEALIGN');
+    RegisterMethod('procedure UPDATECONTROLSTATE');
+
+    RegisterProperty('BRUSH', 'TBRUSH', iptr);
+    RegisterProperty('HELPCONTEXT', 'LONGINT', iptrw);
+    {$ENDIF}
+  end;
+end;
+procedure SIRegisterTGraphicControl(cl: TPSPascalCompiler); // requires TControl
+begin
+  Cl.AddClassN(cl.FindClass('TControl'), 'TGRAPHICCONTROL');
+end;
+
+procedure SIRegisterTCustomControl(cl: TPSPascalCompiler); // requires TWinControl
+begin
+  Cl.AddClassN(cl.FindClass('TWinControl'), 'TCUSTOMCONTROL');
+end;
+
+procedure SIRegister_Controls_TypesAndConsts(Cl: TPSPascalCompiler);
+begin
+{$IFNDEF FPC}
+  Cl.addTypeS('TEShiftState','(ssShift, ssAlt, ssCtrl, ssLeft, ssRight, ssMiddle, ssDouble)');
+  {$ELSE}
+  Cl.addTypeS('TEShiftState','(ssShift, ssAlt, ssCtrl, ssLeft, ssRight, ssMiddle, ssDouble,' +
+  'ssMeta, ssSuper, ssHyper, ssAltGr, ssCaps, ssNum,ssScroll,ssTriple,ssQuad)');
+  {$ENDIF}
+  Cl.addTypeS('TShiftState','set of TEShiftState');
+  cl.AddTypeS('TMouseButton', '(mbLeft, mbRight, mbMiddle)');
+  cl.AddTypeS('TDragMode', '(dmManual, dmAutomatic)');
+  cl.AddTypeS('TDragState', '(dsDragEnter, dsDragLeave, dsDragMove)');
+  cl.AddTypeS('TDragKind', '(dkDrag, dkDock)');
+  cl.AddTypeS('TMouseEvent', 'procedure (Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);');
+  cl.AddTypeS('TMouseMoveEvent', 'procedure(Sender: TObject; Shift: TShiftState; X, Y: Integer);');
+  cl.AddTypeS('TKeyEvent', 'procedure (Sender: TObject; var Key: Word; Shift: TShiftState);');
+  cl.AddTypeS('TKeyPressEvent', 'procedure(Sender: TObject; var Key: Char);');
+  cl.AddTypeS('TDragOverEvent', 'procedure(Sender, Source: TObject; X, Y: Integer; State: TDragState; var Accept: Boolean)');
+  cl.AddTypeS('TDragDropEvent', 'procedure(Sender, Source: TObject;X, Y: Integer)');
+  cl.AddTypeS('HWND', 'Longint');
+
+  cl.AddTypeS('TEndDragEvent', 'procedure(Sender, Target: TObject; X, Y: Integer)');
+
+  cl.addTypeS('TAlign', '(alNone, alTop, alBottom, alLeft, alRight, alClient)');
+
+  cl.addTypeS('TAnchorKind', '(akTop, akLeft, akRight, akBottom)');
+  cl.addTypeS('TAnchors','set of TAnchorKind');
+  cl.AddTypeS('TModalResult', 'Integer');
+  cl.AddTypeS('TCursor', 'Integer');
+  cl.AddTypeS('TPoint', 'record x,y: Longint; end;');
+
+  cl.AddConstantN('mrNone', 'Integer').Value.ts32 := 0;
+  cl.AddConstantN('mrOk', 'Integer').Value.ts32 := 1;
+  cl.AddConstantN('mrCancel', 'Integer').Value.ts32 := 2;
+  cl.AddConstantN('mrAbort', 'Integer').Value.ts32 := 3;
+  cl.AddConstantN('mrRetry', 'Integer').Value.ts32 := 4;
+  cl.AddConstantN('mrIgnore', 'Integer').Value.ts32 := 5;
+  cl.AddConstantN('mrYes', 'Integer').Value.ts32 := 6;
+  cl.AddConstantN('mrNo', 'Integer').Value.ts32 := 7;
+  cl.AddConstantN('mrAll', 'Integer').Value.ts32 := 8;
+  cl.AddConstantN('mrNoToAll', 'Integer').Value.ts32 := 9;
+  cl.AddConstantN('mrYesToAll', 'Integer').Value.ts32 := 10;
+  cl.AddConstantN('crDefault', 'Integer').Value.ts32 := 0;
+  cl.AddConstantN('crNone', 'Integer').Value.ts32 := -1;
+  cl.AddConstantN('crArrow', 'Integer').Value.ts32 := -2;
+  cl.AddConstantN('crCross', 'Integer').Value.ts32 := -3;
+  cl.AddConstantN('crIBeam', 'Integer').Value.ts32 := -4;
+  cl.AddConstantN('crSizeNESW', 'Integer').Value.ts32 := -6;
+  cl.AddConstantN('crSizeNS', 'Integer').Value.ts32 := -7;
+  cl.AddConstantN('crSizeNWSE', 'Integer').Value.ts32 := -8;
+  cl.AddConstantN('crSizeWE', 'Integer').Value.ts32 := -9;
+  cl.AddConstantN('crUpArrow', 'Integer').Value.ts32 := -10;
+  cl.AddConstantN('crHourGlass', 'Integer').Value.ts32 := -11;
+  cl.AddConstantN('crDrag', 'Integer').Value.ts32 := -12;
+  cl.AddConstantN('crNoDrop', 'Integer').Value.ts32 := -13;
+  cl.AddConstantN('crHSplit', 'Integer').Value.ts32 := -14;
+  cl.AddConstantN('crVSplit', 'Integer').Value.ts32 := -15;
+  cl.AddConstantN('crMultiDrag', 'Integer').Value.ts32 := -16;
+  cl.AddConstantN('crSQLWait', 'Integer').Value.ts32 := -17;
+  cl.AddConstantN('crNo', 'Integer').Value.ts32 := -18;
+  cl.AddConstantN('crAppStart', 'Integer').Value.ts32 := -19;
+  cl.AddConstantN('crHelp', 'Integer').Value.ts32 := -20;
+{$IFDEF DELPHI3UP}
+  cl.AddConstantN('crHandPoint', 'Integer').Value.ts32 := -21;
+{$ENDIF}
+{$IFDEF DELPHI4UP}
+  cl.AddConstantN('crSizeAll', 'Integer').Value.ts32 := -22;
+{$ENDIF}
+end;
+
+procedure SIRegisterTDragObject(cl: TPSPascalCompiler);
+begin
+  with CL.AddClassN(CL.FindClass('TObject'),'TDragObject') do
+  begin
+{$IFNDEF PS_MINIVCL}
+{$IFDEF DELPHI4UP}
+    RegisterMethod('Procedure Assign( Source : TDragObject)');
+{$ENDIF}
+{$IFNDEF FPC}
+    RegisterMethod('Function GetName : String');
+    RegisterMethod('Function Instance : Longint');
+{$ENDIF}
+    RegisterMethod('Procedure HideDragImage');
+    RegisterMethod('Procedure ShowDragImage');
+{$IFDEF DELPHI4UP}
+    RegisterProperty('Cancelling', 'Boolean', iptrw);
+    RegisterProperty('DragHandle', 'Longint', iptrw);
+    RegisterProperty('DragPos', 'TPoint', iptrw);
+    RegisterProperty('DragTargetPos', 'TPoint', iptrw);
+    RegisterProperty('MouseDeltaX', 'Double', iptr);
+    RegisterProperty('MouseDeltaY', 'Double', iptr);
+{$ENDIF}
+{$ENDIF}
+  end;
+  Cl.AddTypeS('TStartDragEvent', 'procedure (Sender: TObject; var DragObject: TDragObject)');
+end;
+
+procedure SIRegister_Controls(Cl: TPSPascalCompiler);
+begin
+  SIRegister_Controls_TypesAndConsts(cl);
+  SIRegisterTDragObject(cl);
+  SIRegisterTControl(Cl);
+  SIRegisterTWinControl(Cl);
+  SIRegisterTGraphicControl(cl);
+  SIRegisterTCustomControl(cl);
+end;
+
+// PS_MINIVCL changes by Martijn Laan (mlaan at wintax _dot_ nl)
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_dateutils.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_dateutils.pas
new file mode 100644
index 0000000..f6213c7
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_dateutils.pas	
@@ -0,0 +1,34 @@
+{ Compile time Date Time library }
+unit uPSC_dateutils;
+
+interface
+uses
+  SysUtils, uPSCompiler, uPSUtils;
+
+
+procedure RegisterDateTimeLibrary_C(S: TPSPascalCompiler);
+
+implementation
+
+procedure RegisterDatetimeLibrary_C(S: TPSPascalCompiler);
+begin
+  s.AddType('TDateTime', btDouble).ExportName := True;
+  s.AddDelphiFunction('function EncodeDate(Year, Month, Day: Word): TDateTime;');
+  s.AddDelphiFunction('function EncodeTime(Hour, Min, Sec, MSec: Word): TDateTime;');
+  s.AddDelphiFunction('function TryEncodeDate(Year, Month, Day: Word; var Date: TDateTime): Boolean;');
+  s.AddDelphiFunction('function TryEncodeTime(Hour, Min, Sec, MSec: Word; var Time: TDateTime): Boolean;');
+  s.AddDelphiFunction('procedure DecodeDate(const DateTime: TDateTime; var Year, Month, Day: Word);');
+  s.AddDelphiFunction('procedure DecodeTime(const DateTime: TDateTime; var Hour, Min, Sec, MSec: Word);');
+  s.AddDelphiFunction('function DayOfWeek(const DateTime: TDateTime): Word;');
+  s.AddDelphiFunction('function Date: TDateTime;');
+  s.AddDelphiFunction('function Time: TDateTime;');
+  s.AddDelphiFunction('function Now: TDateTime;');
+  s.AddDelphiFunction('function DateTimeToUnix(D: TDateTime): Int64;');
+  s.AddDelphiFunction('function UnixToDateTime(U: Int64): TDateTime;');
+
+  s.AddDelphiFunction('function DateToStr(D: TDateTime): String;');
+  s.AddDelphiFunction('function StrToDate(const s: String): TDateTime;');
+  s.AddDelphiFunction('function FormatDateTime(const fmt: String; D: TDateTime): String;');
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_dll.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_dll.pas
new file mode 100644
index 0000000..36e14fe
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_dll.pas	
@@ -0,0 +1,142 @@
+{ Compiletime DLL importing support }
+unit uPSC_dll;
+
+{$I PascalScript.inc}
+interface
+{
+
+  Function FindWindow(c1, c2: PChar): Cardinal; external 'FindWindow@user32.dll stdcall';
+
+}
+uses
+  uPSCompiler, uPSUtils;
+
+  
+{$IFDEF DELPHI3UP }
+resourceString
+{$ELSE }
+const
+{$ENDIF }
+
+  RPS_Invalid_External = 'Invalid External';
+  RPS_InvalidCallingConvention = 'Invalid Calling Convention';
+
+
+
+function DllExternalProc(Sender: TPSPascalCompiler; Decl: TPSParametersDecl; const OriginalName, FExternal: tbtstring): TPSRegProc;
+type
+
+  TDllCallingConvention = (clRegister
+  , clPascal
+  , ClCdecl
+  , ClStdCall
+  );
+
+var
+  DefaultCC: TDllCallingConvention;
+
+procedure RegisterDll_Compiletime(cs: TPSPascalCompiler);
+
+implementation
+
+function rpos(ch: tbtchar; const s: tbtstring): Longint;
+var
+  i: Longint;
+begin
+  for i := length(s) downto 1 do
+  if s[i] = ch then begin Result := i; exit; end;
+  result := 0;
+end;
+
+function RemoveQuotes(s: tbtstring): tbtstring;
+begin
+  result := s;
+  if result = '' then exit;
+  if Result[1] = '"' then delete(result ,1,1);
+  if (Result <> '') and (Result[Length(result)] = '"') then delete(result, length(result), 1);
+end;
+
+function DllExternalProc(Sender: TPSPascalCompiler; Decl: TPSParametersDecl; const OriginalName, FExternal: tbtstring): TPSRegProc;
+var
+  FuncName,
+  Name,
+  FuncCC, s: AnsiString;
+  CC: TDllCallingConvention;
+  DelayLoad: Boolean;
+
+begin
+  Name := FastUpperCase(OriginalName);
+  DelayLoad := False;
+  FuncCC := FExternal;
+
+  if (pos(tbtChar('@'), FuncCC) = 0) then
+  begin
+    Sender.MakeError('', ecCustomError, tbtString(RPS_Invalid_External));
+    Result := nil;
+    exit;
+  end;
+  FuncName := copy(FuncCC, 1, rpos('@', FuncCC)-1)+#0;
+  delete(FuncCc, 1, length(FuncName));
+  if pos(tbtchar(' '), Funccc) <> 0 then
+  begin
+    if FuncCC[1] = '"' then
+    begin
+      Delete(FuncCC, 1, 1);
+      FuncName := RemoveQuotes(copy(FuncCC, 1, pos(tbtchar('"'), FuncCC)-1))+#0+FuncName;
+      Delete(FuncCC,1, pos(tbtchar('"'), FuncCC));
+      if (FuncCC <> '') and( FuncCC[1] = ' ') then delete(FuncCC,1,1);
+    end else
+    begin
+      FuncName := copy(FuncCc, 1, pos(tbtchar(' '),FuncCC)-1)+#0+FuncName;
+      Delete(FuncCC, 1, pos(tbtchar(' '), FuncCC));
+    end;
+    if pos(tbtchar(' '), FuncCC) > 0 then
+    begin
+      s := Copy(FuncCC, pos(tbtchar(' '), Funccc)+1, MaxInt);
+      FuncCC := FastUpperCase(Copy(FuncCC, 1, pos(tbtchar(' '), FuncCC)-1));
+      Delete(FuncCC, pos(tbtchar(' '), Funccc), MaxInt);
+      if FastUppercase(s) = 'DELAYLOAD' then
+        DelayLoad := True
+      else
+      begin
+        Sender.MakeError('', ecCustomError, tbtstring(RPS_Invalid_External));
+        Result := nil;
+        exit;
+      end;
+    end else
+      FuncCC := FastUpperCase(FuncCC);
+    if FuncCC = 'STDCALL' then cc := ClStdCall else
+    if FuncCC = 'CDECL' then cc := ClCdecl else
+    if FuncCC = 'REGISTER' then cc := clRegister else
+    if FuncCC = 'PASCAL' then cc := clPascal else
+    begin
+      Sender.MakeError('', ecCustomError, tbtstring(RPS_InvalidCallingConvention));
+      Result := nil;
+      exit;
+    end;
+  end else
+  begin
+    FuncName := RemoveQuotes(FuncCC)+#0+FuncName;
+    FuncCC := '';
+    cc := DefaultCC;
+  end;
+  FuncName := 'dll:'+FuncName+tbtchar(cc)+tbtchar(bytebool(DelayLoad)) + declToBits(Decl);
+  Result := TPSRegProc.Create;
+  Result.ImportDecl := FuncName;
+  Result.Decl.Assign(Decl);
+  Result.Name := Name;
+  Result.OrgName := OriginalName;
+  Result.ExportName := False;
+end;
+
+procedure RegisterDll_Compiletime(cs: TPSPascalCompiler);
+begin
+  cs.OnExternalProc := DllExternalProc;
+  cs.AddFunction('procedure UnloadDll(s: string)');
+  cs.AddFunction('function DLLGetLastError: Longint');
+end;
+
+begin
+  DefaultCc := clRegister;
+end.
+
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_extctrls.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_extctrls.pas
new file mode 100644
index 0000000..785b5d3
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_extctrls.pas	
@@ -0,0 +1,327 @@
+{ Compiletime Extctrls support }
+unit uPSC_extctrls;
+
+{$I PascalScript.inc}
+interface
+uses
+  uPSCompiler, uPSUtils;
+
+(*
+   Will register files from:
+     ExtCtrls
+ 
+Requires:
+  STD, classes, controls, graphics {$IFNDEF PS_MINIVCL}, stdctrls {$ENDIF}
+*)
+
+procedure SIRegister_ExtCtrls_TypesAndConsts(cl: TPSPascalCompiler);
+
+procedure SIRegisterTSHAPE(Cl: TPSPascalCompiler);
+procedure SIRegisterTIMAGE(Cl: TPSPascalCompiler);
+procedure SIRegisterTPAINTBOX(Cl: TPSPascalCompiler);
+procedure SIRegisterTBEVEL(Cl: TPSPascalCompiler);
+procedure SIRegisterTTIMER(Cl: TPSPascalCompiler);
+procedure SIRegisterTCUSTOMPANEL(Cl: TPSPascalCompiler);
+procedure SIRegisterTPANEL(Cl: TPSPascalCompiler);
+{$IFNDEF CLX}
+procedure SIRegisterTPAGE(Cl: TPSPascalCompiler);
+procedure SIRegisterTNOTEBOOK(Cl: TPSPascalCompiler);
+procedure SIRegisterTHEADER(Cl: TPSPascalCompiler);
+{$ENDIF}
+procedure SIRegisterTCUSTOMRADIOGROUP(Cl: TPSPascalCompiler);
+procedure SIRegisterTRADIOGROUP(Cl: TPSPascalCompiler);
+
+procedure SIRegister_ExtCtrls(cl: TPSPascalCompiler);
+
+implementation
+procedure SIRegisterTSHAPE(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TGRAPHICCONTROL'), 'TSHAPE') do
+  begin
+    RegisterProperty('BRUSH', 'TBRUSH', iptrw);
+    RegisterProperty('PEN', 'TPEN', iptrw);
+    RegisterProperty('SHAPE', 'TSHAPETYPE', iptrw);
+
+    {$IFNDEF PS_MINIVCL}
+    RegisterMethod('procedure STYLECHANGED(SENDER:TOBJECT)');
+    RegisterProperty('DRAGCURSOR', 'Longint', iptrw);
+    RegisterProperty('DRAGMODE', 'TDragMode', iptrw);
+    RegisterProperty('PARENTSHOWHINT', 'Boolean', iptrw);
+    RegisterProperty('ONDRAGDROP', 'TDragDropEvent', iptrw);
+    RegisterProperty('ONDRAGOVER', 'TDragOverEvent', iptrw);
+    RegisterProperty('ONENDDRAG', 'TEndDragEvent', iptrw);
+    RegisterProperty('ONMOUSEDOWN', 'TMouseEvent', iptrw);
+    RegisterProperty('ONMOUSEMOVE', 'TMouseMoveEvent', iptrw);
+    RegisterProperty('ONMOUSEUP', 'TMouseEvent', iptrw);
+    RegisterProperty('ONSTARTDRAG', 'TStartDragEvent', iptrw);
+    {$ENDIF}
+  end;
+end;
+
+procedure SIRegisterTIMAGE(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TGRAPHICCONTROL'), 'TIMAGE') do
+  begin
+    RegisterProperty('CANVAS', 'TCANVAS', iptr);
+    RegisterProperty('AUTOSIZE', 'BOOLEAN', iptrw);
+    RegisterProperty('CENTER', 'BOOLEAN', iptrw);
+    RegisterProperty('PICTURE', 'TPICTURE', iptrw);
+    RegisterProperty('STRETCH', 'BOOLEAN', iptrw);
+    RegisterProperty('ONCLICK', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONDBLCLICK', 'TNotifyEvent', iptrw);
+
+    {$IFNDEF PS_MINIVCL}
+    RegisterProperty('DRAGCURSOR', 'Longint', iptrw);
+    RegisterProperty('DRAGMODE', 'TDragMode', iptrw);
+    RegisterProperty('PARENTSHOWHINT', 'Boolean', iptrw);
+    RegisterProperty('POPUPMENU', 'TPopupMenu', iptrw);
+    RegisterProperty('ONDRAGDROP', 'TDragDropEvent', iptrw);
+    RegisterProperty('ONDRAGOVER', 'TDragOverEvent', iptrw);
+    RegisterProperty('ONENDDRAG', 'TEndDragEvent', iptrw);
+    RegisterProperty('ONMOUSEDOWN', 'TMouseEvent', iptrw);
+    RegisterProperty('ONMOUSEMOVE', 'TMouseMoveEvent', iptrw);
+    RegisterProperty('ONMOUSEUP', 'TMouseEvent', iptrw);
+    RegisterProperty('ONSTARTDRAG', 'TStartDragEvent', iptrw);
+    {$ENDIF}
+  end;
+end;
+
+procedure SIRegisterTPAINTBOX(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TGRAPHICCONTROL'), 'TPAINTBOX') do
+  begin
+    RegisterProperty('CANVAS', 'TCanvas', iptr);
+    RegisterProperty('COLOR', 'TColor', iptrw);
+    RegisterProperty('FONT', 'TFont', iptrw);
+    RegisterProperty('PARENTCOLOR', 'Boolean', iptrw);
+    RegisterProperty('PARENTFONT', 'Boolean', iptrw);
+    RegisterProperty('ONCLICK', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONDBLCLICK', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONPAINT', 'TNOTIFYEVENT', iptrw);
+
+    {$IFNDEF PS_MINIVCL}
+    RegisterProperty('DRAGCURSOR', 'Longint', iptrw);
+    RegisterProperty('DRAGMODE', 'TDragMode', iptrw);
+    RegisterProperty('PARENTSHOWHINT', 'Boolean', iptrw);
+    RegisterProperty('POPUPMENU', 'TPopupMenu', iptrw);
+    RegisterProperty('ONDRAGDROP', 'TDragDropEvent', iptrw);
+    RegisterProperty('ONDRAGOVER', 'TDragOverEvent', iptrw);
+    RegisterProperty('ONENDDRAG', 'TEndDragEvent', iptrw);
+    RegisterProperty('ONMOUSEDOWN', 'TMouseEvent', iptrw);
+    RegisterProperty('ONMOUSEMOVE', 'TMouseMoveEvent', iptrw);
+    RegisterProperty('ONMOUSEUP', 'TMouseEvent', iptrw);
+    RegisterProperty('ONSTARTDRAG', 'TStartDragEvent', iptrw);
+    {$ENDIF}
+  end;
+end;
+
+procedure SIRegisterTBEVEL(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TGRAPHICCONTROL'), 'TBEVEL') do
+  begin
+    RegisterProperty('SHAPE', 'TBEVELSHAPE', iptrw);
+    RegisterProperty('STYLE', 'TBEVELSTYLE', iptrw);
+
+    {$IFNDEF PS_MINIVCL}
+    RegisterProperty('PARENTSHOWHINT', 'Boolean', iptrw);
+    {$ENDIF}
+  end;
+end;
+
+procedure SIRegisterTTIMER(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TCOMPONENT'), 'TTIMER') do
+  begin
+    RegisterProperty('ENABLED', 'BOOLEAN', iptrw);
+    RegisterProperty('INTERVAL', 'CARDINAL', iptrw);
+    RegisterProperty('ONTIMER', 'TNOTIFYEVENT', iptrw);
+  end;
+end;
+
+procedure SIRegisterTCUSTOMPANEL(Cl: TPSPascalCompiler);
+begin
+  Cl.AddClassN(cl.FindClass('TCUSTOMCONTROL'), 'TCUSTOMPANEL');
+end;
+
+procedure SIRegisterTPANEL(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TCUSTOMPANEL'), 'TPANEL') do
+  begin
+    RegisterProperty('ALIGNMENT', 'TAlignment', iptrw);
+    RegisterProperty('BEVELINNER', 'TPanelBevel', iptrw);
+    RegisterProperty('BEVELOUTER', 'TPanelBevel', iptrw);
+    RegisterProperty('BEVELWIDTH', 'TBevelWidth', iptrw);
+    RegisterProperty('BORDERWIDTH', 'TBorderWidth', iptrw);
+    RegisterProperty('BORDERSTYLE', 'TBorderStyle', iptrw);
+    RegisterProperty('CAPTION', 'String', iptrw);
+    RegisterProperty('COLOR', 'TColor', iptrw);
+    RegisterProperty('FONT', 'TFont', iptrw);
+    RegisterProperty('PARENTCOLOR', 'Boolean', iptrw);
+    RegisterProperty('PARENTFONT', 'Boolean', iptrw);
+    RegisterProperty('ONCLICK', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONDBLCLICK', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONENTER', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONEXIT', 'TNotifyEvent', iptrw);
+
+    {$IFNDEF PS_MINIVCL}
+    RegisterProperty('DRAGCURSOR', 'Longint', iptrw);
+    RegisterProperty('DRAGMODE', 'TDragMode', iptrw);
+    RegisterProperty('CTL3D', 'Boolean', iptrw);
+    RegisterProperty('LOCKED', 'Boolean', iptrw);
+    RegisterProperty('PARENTCTL3D', 'Boolean', iptrw);
+    RegisterProperty('PARENTSHOWHINT', 'Boolean', iptrw);
+    RegisterProperty('POPUPMENU', 'TPopupMenu', iptrw);
+    RegisterProperty('ONDRAGDROP', 'TDragDropEvent', iptrw);
+    RegisterProperty('ONDRAGOVER', 'TDragOverEvent', iptrw);
+    RegisterProperty('ONENDDRAG', 'TEndDragEvent', iptrw);
+    RegisterProperty('ONMOUSEDOWN', 'TMouseEvent', iptrw);
+    RegisterProperty('ONMOUSEMOVE', 'TMouseMoveEvent', iptrw);
+    RegisterProperty('ONMOUSEUP', 'TMouseEvent', iptrw);
+    RegisterProperty('ONRESIZE', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONSTARTDRAG', 'TStartDragEvent', iptrw);
+    {$ENDIF}
+  end;
+end;
+{$IFNDEF CLX}
+procedure SIRegisterTPAGE(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TCUSTOMCONTROL'), 'TPAGE') do
+  begin
+    RegisterProperty('CAPTION', 'String', iptrw);
+  end;
+end;
+procedure SIRegisterTNOTEBOOK(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TCUSTOMCONTROL'), 'TNOTEBOOK') do
+  begin
+    RegisterProperty('ACTIVEPAGE', 'String', iptrw);
+    RegisterProperty('COLOR', 'TColor', iptrw);
+    RegisterProperty('FONT', 'TFont', iptrw);
+    RegisterProperty('PAGEINDEX', 'INTEGER', iptrw);
+    RegisterProperty('PAGES', 'TSTRINGS', iptrw);
+    RegisterProperty('PARENTCOLOR', 'Boolean', iptrw);
+    RegisterProperty('PARENTFONT', 'Boolean', iptrw);
+    RegisterProperty('ONCLICK', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONDBLCLICK', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONENTER', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONEXIT', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONPAGECHANGED', 'TNOTIFYEVENT', iptrw);
+
+    {$IFNDEF PS_MINIVCL}
+    RegisterProperty('CTL3D', 'Boolean', iptrw);
+    RegisterProperty('DRAGCURSOR', 'Longint', iptrw);
+    RegisterProperty('DRAGMODE', 'TDragMode', iptrw);
+    RegisterProperty('PARENTCTL3D', 'Boolean', iptrw);
+    RegisterProperty('PARENTSHOWHINT', 'Boolean', iptrw);
+    RegisterProperty('POPUPMENU', 'TPopupMenu', iptrw);
+    RegisterProperty('ONDRAGDROP', 'TDragDropEvent', iptrw);
+    RegisterProperty('ONDRAGOVER', 'TDragOverEvent', iptrw);
+    RegisterProperty('ONENDDRAG', 'TEndDragEvent', iptrw);
+    RegisterProperty('ONMOUSEDOWN', 'TMouseEvent', iptrw);
+    RegisterProperty('ONMOUSEMOVE', 'TMouseMoveEvent', iptrw);
+    RegisterProperty('ONMOUSEUP', 'TMouseEvent', iptrw);
+    RegisterProperty('ONSTARTDRAG', 'TStartDragEvent', iptrw);
+    {$ENDIF}
+  end;
+end;
+
+procedure SIRegisterTHEADER(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TCUSTOMCONTROL'), 'THEADER') do
+  begin
+    RegisterProperty('SECTIONWIDTH', 'INTEGER INTEGER', iptrw);
+    RegisterProperty('ALLOWRESIZE', 'BOOLEAN', iptrw);
+    RegisterProperty('BORDERSTYLE', 'TBORDERSTYLE', iptrw);
+    RegisterProperty('FONT', 'TFont', iptrw);
+    RegisterProperty('PARENTFONT', 'Boolean', iptrw);
+    RegisterProperty('SECTIONS', 'TSTRINGS', iptrw);
+    RegisterProperty('ONSIZING', 'TSECTIONEVENT', iptrw);
+    RegisterProperty('ONSIZED', 'TSECTIONEVENT', iptrw);
+
+    {$IFNDEF PS_MINIVCL}
+    RegisterProperty('PARENTSHOWHINT', 'Boolean', iptrw);
+    RegisterProperty('POPUPMENU', 'TPopupMenu', iptrw);
+    {$ENDIF}
+  end;
+end;
+{$ENDIF}
+
+procedure SIRegisterTCUSTOMRADIOGROUP(Cl: TPSPascalCompiler);
+begin
+  Cl.AddClassN(cl.FindClass('TCUSTOMGROUPBOX'), 'TCUSTOMRADIOGROUP');
+end;
+
+procedure SIRegisterTRADIOGROUP(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TCUSTOMRADIOGROUP'), 'TRADIOGROUP') do
+  begin
+    RegisterProperty('CAPTION', 'String', iptrw);
+    RegisterProperty('COLOR', 'TColor', iptrw);
+    RegisterProperty('COLUMNS', 'Integer', iptrw);
+    RegisterProperty('FONT', 'TFont', iptrw);
+    RegisterProperty('ITEMINDEX', 'Integer', iptrw);
+    RegisterProperty('ITEMS', 'TStrings', iptrw);
+    RegisterProperty('PARENTCOLOR', 'Boolean', iptrw);
+    RegisterProperty('PARENTFONT', 'Boolean', iptrw);
+    RegisterProperty('ONCLICK', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONENTER', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONEXIT', 'TNotifyEvent', iptrw);
+
+    {$IFNDEF PS_MINIVCL}
+    RegisterProperty('CTL3D', 'Boolean', iptrw);
+    RegisterProperty('DRAGCURSOR', 'Longint', iptrw);
+    RegisterProperty('DRAGMODE', 'TDragMode', iptrw);
+    RegisterProperty('PARENTCTL3D', 'Boolean', iptrw);
+    RegisterProperty('PARENTSHOWHINT', 'Boolean', iptrw);
+    RegisterProperty('POPUPMENU', 'TPopupMenu', iptrw);
+    RegisterProperty('ONDRAGDROP', 'TDragDropEvent', iptrw);
+    RegisterProperty('ONDRAGOVER', 'TDragOverEvent', iptrw);
+    RegisterProperty('ONENDDRAG', 'TEndDragEvent', iptrw);
+    RegisterProperty('ONSTARTDRAG', 'TStartDragEvent', iptrw);
+    {$ENDIF}
+  end;
+end;
+
+procedure SIRegister_ExtCtrls_TypesAndConsts(cl: TPSPascalCompiler);
+begin
+  cl.AddTypeS('TShapeType', '(stRectangle, stSquare, stRoundRect, stRoundSquare, stEllipse, stCircle)');
+  cl.AddTypeS('TBevelStyle', '(bsLowered, bsRaised)');
+  cl.AddTypeS('TBevelShape', '(bsBox, bsFrame, bsTopLine, bsBottomLine, bsLeftLine, bsRightLine,bsSpacer)');
+  cl.AddTypeS('TPanelBevel', '(bvNone, bvLowered, bvRaised,bvSpace)');
+  cl.AddTypeS('TBevelWidth', 'Longint');
+  cl.AddTypeS('TBorderWidth', 'Longint');
+  cl.AddTypeS('TSectionEvent', 'procedure(Sender: TObject; ASection, AWidth: Integer)');
+end;
+
+procedure SIRegister_ExtCtrls(cl: TPSPascalCompiler);
+begin
+  SIRegister_ExtCtrls_TypesAndConsts(cl);
+
+  {$IFNDEF PS_MINIVCL}
+  SIRegisterTSHAPE(Cl);
+  SIRegisterTIMAGE(Cl);
+  SIRegisterTPAINTBOX(Cl);
+  {$ENDIF}
+  SIRegisterTBEVEL(Cl);
+  {$IFNDEF PS_MINIVCL}
+  SIRegisterTTIMER(Cl);
+  {$ENDIF}
+  SIRegisterTCUSTOMPANEL(Cl);
+  SIRegisterTPANEL(Cl);
+  {$IFNDEF PS_MINIVCL}
+  {$IFNDEF CLX}
+  SIRegisterTPAGE(Cl);
+  SIRegisterTNOTEBOOK(Cl);
+  SIRegisterTHEADER(Cl);
+  {$ENDIF}
+  SIRegisterTCUSTOMRADIOGROUP(Cl);
+  SIRegisterTRADIOGROUP(Cl);
+  {$ENDIF}
+end;
+
+end.
+
+
+
+
+
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_forms.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_forms.pas
new file mode 100644
index 0000000..a7ca52d
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_forms.pas	
@@ -0,0 +1,267 @@
+{ Compiletime Forms support }
+unit uPSC_forms;
+{$I PascalScript.inc}
+
+interface
+uses
+  uPSCompiler, uPSUtils;
+
+procedure SIRegister_Forms_TypesAndConsts(Cl: TPSPascalCompiler);
+
+
+procedure SIRegisterTCONTROLSCROLLBAR(Cl: TPSPascalCompiler);
+procedure SIRegisterTSCROLLINGWINCONTROL(Cl: TPSPascalCompiler);
+procedure SIRegisterTSCROLLBOX(Cl: TPSPascalCompiler);
+procedure SIRegisterTFORM(Cl: TPSPascalCompiler);
+procedure SIRegisterTAPPLICATION(Cl: TPSPascalCompiler);
+
+procedure SIRegister_Forms(Cl: TPSPascalCompiler);
+
+implementation
+
+procedure SIRegisterTCONTROLSCROLLBAR(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TPERSISTENT'), 'TCONTROLSCROLLBAR') do
+  begin
+    RegisterProperty('KIND', 'TSCROLLBARKIND', iptr);
+    RegisterProperty('SCROLLPOS', 'INTEGER', iptr);
+    RegisterProperty('MARGIN', 'WORD', iptrw);
+    RegisterProperty('INCREMENT', 'TSCROLLBARINC', iptrw);
+    RegisterProperty('RANGE', 'INTEGER', iptrw);
+    RegisterProperty('POSITION', 'INTEGER', iptrw);
+    RegisterProperty('TRACKING', 'BOOLEAN', iptrw);
+    RegisterProperty('VISIBLE', 'BOOLEAN', iptrw);
+  end;
+end;
+
+procedure SIRegisterTSCROLLINGWINCONTROL(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TWINCONTROL'), 'TSCROLLINGWINCONTROL') do
+  begin
+    RegisterMethod('procedure SCROLLINVIEW(ACONTROL:TCONTROL)');
+    RegisterProperty('HORZSCROLLBAR', 'TCONTROLSCROLLBAR', iptrw);
+    RegisterProperty('VERTSCROLLBAR', 'TCONTROLSCROLLBAR', iptrw);
+  end;
+end;
+
+procedure SIRegisterTSCROLLBOX(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TSCROLLINGWINCONTROL'), 'TSCROLLBOX') do
+  begin
+    RegisterProperty('BORDERSTYLE', 'TBORDERSTYLE', iptrw);
+    RegisterProperty('COLOR', 'TCOLOR', iptrw);
+    RegisterProperty('FONT', 'TFONT', iptrw);                    
+    RegisterProperty('AUTOSCROLL', 'BOOLEAN', iptrw);
+    RegisterProperty('PARENTCOLOR', 'BOOLEAN', iptrw);
+    RegisterProperty('PARENTFONT', 'BOOLEAN', iptrw);
+    RegisterProperty('ONCLICK', 'TNOTIFYEVENT', iptrw);
+    RegisterProperty('ONDBLCLICK', 'TNOTIFYEVENT', iptrw);
+    RegisterProperty('ONENTER', 'TNOTIFYEVENT', iptrw);
+    RegisterProperty('ONEXIT', 'TNOTIFYEVENT', iptrw);
+
+    {$IFNDEF PS_MINIVCL}
+    RegisterProperty('ONRESIZE', 'TNOTIFYEVENT', iptrw);
+    RegisterProperty('DRAGCURSOR', 'TCURSOR', iptrw);
+    RegisterProperty('DRAGMODE', 'TDRAGMODE', iptrw);
+    RegisterProperty('PARENTSHOWHINT', 'BOOLEAN', iptrw);
+    RegisterProperty('POPUPMENU', 'TPOPUPMENU', iptrw);
+    RegisterProperty('CTL3D', 'BOOLEAN', iptrw);
+    RegisterProperty('PARENTCTL3D', 'BOOLEAN', iptrw);
+    RegisterProperty('ONDRAGDROP', 'TDRAGDROPEVENT', iptrw);
+    RegisterProperty('ONDRAGOVER', 'TDRAGOVEREVENT', iptrw);
+    RegisterProperty('ONENDDRAG', 'TENDDRAGEVENT', iptrw);
+    RegisterProperty('ONMOUSEDOWN', 'TMOUSEEVENT', iptrw);
+    RegisterProperty('ONMOUSEMOVE', 'TMOUSEMOVEEVENT', iptrw);
+    RegisterProperty('ONMOUSEUP', 'TMOUSEEVENT', iptrw);
+    {$ENDIF}
+  end;
+end;
+
+procedure SIRegisterTFORM(Cl: TPSPascalCompiler);
+begin
+ with Cl.AddClassN(cl.FindClass('TSCROLLINGWINCONTROL'), 'TFORM') do
+  begin
+    {$IFDEF DELPHI4UP}
+    RegisterMethod('constructor CREATENEW(AOWNER:TCOMPONENT; Dummy: Integer)');
+    {$ELSE}
+    RegisterMethod('constructor CREATENEW(AOWNER:TCOMPONENT)');
+    {$ENDIF}
+    RegisterMethod('procedure CLOSE');
+    RegisterMethod('procedure HIDE');
+    RegisterMethod('procedure SHOW');
+    RegisterMethod('function SHOWMODAL:INTEGER');
+    RegisterMethod('procedure RELEASE');
+    RegisterProperty('ACTIVE', 'BOOLEAN', iptr);
+    RegisterProperty('ACTIVECONTROL', 'TWINCONTROL', iptrw);
+    RegisterProperty('BORDERICONS', 'TBorderIcons', iptrw);
+    RegisterProperty('BORDERSTYLE', 'TFORMBORDERSTYLE', iptrw);
+    RegisterProperty('CAPTION', 'NativeString', iptrw);
+    RegisterProperty('AUTOSCROLL', 'BOOLEAN', iptrw);
+    RegisterProperty('COLOR', 'TCOLOR', iptrw);
+    RegisterProperty('FONT', 'TFONT', iptrw);
+    RegisterProperty('FORMSTYLE', 'TFORMSTYLE', iptrw);
+    RegisterProperty('KEYPREVIEW', 'BOOLEAN', iptrw);
+    RegisterProperty('POSITION', 'TPOSITION', iptrw);
+    RegisterProperty('ONACTIVATE', 'TNOTIFYEVENT', iptrw);
+    RegisterProperty('ONCLICK', 'TNOTIFYEVENT', iptrw);
+    RegisterProperty('ONDBLCLICK', 'TNOTIFYEVENT', iptrw);
+    RegisterProperty('ONCLOSE', 'TCLOSEEVENT', iptrw);
+    RegisterProperty('ONCLOSEQUERY', 'TCLOSEQUERYEVENT', iptrw);
+    RegisterProperty('ONCREATE', 'TNOTIFYEVENT', iptrw);
+    RegisterProperty('ONDESTROY', 'TNOTIFYEVENT', iptrw);
+    RegisterProperty('ONDEACTIVATE', 'TNOTIFYEVENT', iptrw);
+    RegisterProperty('ONHIDE', 'TNOTIFYEVENT', iptrw);
+    RegisterProperty('ONKEYDOWN', 'TKEYEVENT', iptrw);
+    RegisterProperty('ONKEYPRESS', 'TKEYPRESSEVENT', iptrw);
+    RegisterProperty('ONKEYUP', 'TKEYEVENT', iptrw);
+    RegisterProperty('ONRESIZE', 'TNOTIFYEVENT', iptrw);
+    RegisterProperty('ONSHOW', 'TNOTIFYEVENT', iptrw);
+
+
+    {$IFNDEF PS_MINIVCL}
+    {$IFNDEF CLX}
+    RegisterMethod('procedure ARRANGEICONS');
+//    RegisterMethod('function GETFORMIMAGE:TBITMAP');
+    RegisterMethod('procedure PRINT');
+    RegisterMethod('procedure SENDCANCELMODE(SENDER:TCONTROL)');
+    RegisterProperty('ACTIVEOLECONTROL', 'TWINCONTROL', iptrw);
+    RegisterProperty('OLEFORMOBJECT', 'TOLEFORMOBJECT', iptrw);
+    RegisterProperty('CLIENTHANDLE', 'LONGINT', iptr);
+    RegisterProperty('TILEMODE', 'TTILEMODE', iptrw);
+    {$ENDIF}
+    RegisterMethod('procedure CASCADE');
+    RegisterMethod('function CLOSEQUERY:BOOLEAN');
+    RegisterMethod('procedure DEFOCUSCONTROL(CONTROL:TWINCONTROL;REMOVING:BOOLEAN)');
+    RegisterMethod('procedure FOCUSCONTROL(CONTROL:TWINCONTROL)');
+    RegisterMethod('procedure NEXT');
+    RegisterMethod('procedure PREVIOUS');
+    RegisterMethod('function SETFOCUSEDCONTROL(CONTROL:TWINCONTROL):BOOLEAN');
+    RegisterMethod('procedure TILE');
+    RegisterProperty('ACTIVEMDICHILD', 'TFORM', iptr);
+    RegisterProperty('CANVAS', 'TCANVAS', iptr);
+    RegisterProperty('DROPTARGET', 'BOOLEAN', iptrw);
+    RegisterProperty('MODALRESULT', 'Longint', iptrw);
+    RegisterProperty('MDICHILDCOUNT', 'INTEGER', iptr);
+    RegisterProperty('MDICHILDREN', 'TFORM INTEGER', iptr);
+    RegisterProperty('ICON', 'TICON', iptrw);
+    RegisterProperty('MENU', 'TMAINMENU', iptrw);
+    RegisterProperty('OBJECTMENUITEM', 'TMENUITEM', iptrw);
+    RegisterProperty('PIXELSPERINCH', 'INTEGER', iptrw);
+    RegisterProperty('PRINTSCALE', 'TPRINTSCALE', iptrw);
+    RegisterProperty('SCALED', 'BOOLEAN', iptrw);
+    RegisterProperty('WINDOWSTATE', 'TWINDOWSTATE', iptrw);
+    RegisterProperty('WINDOWMENU', 'TMENUITEM', iptrw);
+    RegisterProperty('CTL3D', 'BOOLEAN', iptrw);
+    RegisterProperty('POPUPMENU', 'TPOPUPMENU', iptrw);
+    RegisterProperty('ONDRAGDROP', 'TDRAGDROPEVENT', iptrw);
+    RegisterProperty('ONDRAGOVER', 'TDRAGOVEREVENT', iptrw);
+    RegisterProperty('ONMOUSEDOWN', 'TMOUSEEVENT', iptrw);
+    RegisterProperty('ONMOUSEMOVE', 'TMOUSEMOVEEVENT', iptrw);
+    RegisterProperty('ONMOUSEUP', 'TMOUSEEVENT', iptrw);
+    RegisterProperty('ONPAINT', 'TNOTIFYEVENT', iptrw);
+    {$ENDIF}
+  end;
+end;
+
+procedure SIRegisterTAPPLICATION(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TCOMPONENT'), 'TAPPLICATION') do
+  begin
+    RegisterMethod('procedure BRINGTOFRONT');
+    RegisterMethod('function MESSAGEBOX(TEXT,CAPTION:PCHAR;FLAGS:WORD):INTEGER');
+    RegisterMethod('procedure MINIMIZE');
+    RegisterMethod('procedure PROCESSMESSAGES');
+    RegisterMethod('procedure RESTORE');
+    RegisterMethod('procedure TERMINATE');
+    RegisterProperty('ACTIVE', 'BOOLEAN', iptr);
+    RegisterProperty('EXENAME', 'NativeString', iptr);
+    {$IFNDEF CLX}
+    RegisterProperty('HANDLE', 'LONGINT', iptrw);
+    RegisterProperty('UPDATEFORMATSETTINGS', 'BOOLEAN', iptrw);
+    {$ENDIF}
+    RegisterProperty('HINT', 'NativeString', iptrw);
+    RegisterProperty('MAINFORM', 'TFORM', iptr);
+    RegisterProperty('SHOWHINT', 'BOOLEAN', iptrw);
+    RegisterProperty('SHOWMAINFORM', 'BOOLEAN', iptrw);
+    RegisterProperty('TERMINATED', 'BOOLEAN', iptr);
+    RegisterProperty('TITLE', 'NativeString', iptrw);
+    RegisterProperty('ONACTIVATE', 'TNOTIFYEVENT', iptrw);
+    RegisterProperty('ONDEACTIVATE', 'TNOTIFYEVENT', iptrw);
+    RegisterProperty('ONIDLE', 'TIDLEEVENT', iptrw);
+    RegisterProperty('ONHINT', 'TNOTIFYEVENT', iptrw);
+    RegisterProperty('ONMINIMIZE', 'TNOTIFYEVENT', iptrw);
+    RegisterProperty('ONRESTORE', 'TNOTIFYEVENT', iptrw);
+
+    {$IFNDEF PS_MINIVCL}
+    RegisterMethod('procedure CONTROLDESTROYED(CONTROL:TCONTROL)');
+    RegisterMethod('procedure CANCELHINT');
+    RegisterMethod('procedure HANDLEEXCEPTION(SENDER:TOBJECT)');
+    RegisterMethod('procedure HANDLEMESSAGE');
+    RegisterMethod('procedure HIDEHINT');
+//    RegisterMethod('procedure HINTMOUSEMESSAGE(CONTROL:TCONTROL;var MESSAGE:TMESSAGE)');
+    RegisterMethod('procedure INITIALIZE');
+    RegisterMethod('procedure NORMALIZETOPMOSTS');
+    RegisterMethod('procedure RESTORETOPMOSTS');
+    RegisterMethod('procedure RUN');
+//    RegisterMethod('procedure SHOWEXCEPTION(E:EXCEPTION)');
+    {$IFNDEF CLX}
+    RegisterMethod('function HELPCOMMAND(COMMAND:INTEGER;DATA:LONGINT):BOOLEAN');
+    RegisterMethod('function HELPCONTEXT(CONTEXT:THELPCONTEXT):BOOLEAN');
+    RegisterMethod('function HELPJUMP(JUMPID:NativeString):BOOLEAN');
+    RegisterProperty('DIALOGHANDLE', 'LONGINT', iptrw);
+    RegisterMethod('procedure CREATEHANDLE');
+//    RegisterMethod('procedure HOOKMAINWINDOW(HOOK:TWINDOWHOOK)');
+//    RegisterMethod('procedure UNHOOKMAINWINDOW(HOOK:TWINDOWHOOK)');
+    {$ENDIF}
+    RegisterProperty('HELPFILE', 'NativeString', iptrw);
+    RegisterProperty('HINTCOLOR', 'TCOLOR', iptrw);
+    RegisterProperty('HINTPAUSE', 'INTEGER', iptrw);
+    RegisterProperty('HINTSHORTPAUSE', 'INTEGER', iptrw);
+    RegisterProperty('HINTHIDEPAUSE', 'INTEGER', iptrw);
+    RegisterProperty('ICON', 'TICON', iptrw);
+    RegisterProperty('ONHELP', 'THELPEVENT', iptrw);
+    {$ENDIF}
+  end;
+end;
+
+procedure SIRegister_Forms_TypesAndConsts(Cl: TPSPascalCompiler);
+begin
+  Cl.AddTypeS('TIdleEvent', 'procedure (Sender: TObject; var Done: Boolean)');
+  cl.AddTypeS('TScrollBarKind', '(sbHorizontal, sbVertical)');
+  cl.AddTypeS('TScrollBarInc', 'SmallInt');
+  cl.AddTypeS('TFormBorderStyle', '(bsNone, bsSingle, bsSizeable, bsDialog, bsToolWindow, bsSizeToolWin)');
+  cl.AddTypeS('TBorderStyle', 'TFormBorderStyle');
+  cl.AddTypeS('TWindowState', '(wsNormal, wsMinimized, wsMaximized)');
+  cl.AddTypeS('TFormStyle', '(fsNormal, fsMDIChild, fsMDIForm, fsStayOnTop)');
+  cl.AddTypeS('TPosition', '(poDesigned, poDefault, poDefaultPosOnly, poDefaultSizeOnly, poScreenCenter, poDesktopCenter, poMainFormCenter, poOwnerFormCenter)');
+  cl.AddTypeS('TPrintScale', '(poNone, poProportional, poPrintToFit)');
+  cl.AddTypeS('TCloseAction', '(caNone, caHide, caFree, caMinimize)');
+  cl.AddTypeS('TCloseEvent' ,'procedure(Sender: TObject; var Action: TCloseAction)');
+  cl.AddTypeS('TCloseQueryEvent' ,'procedure(Sender: TObject; var CanClose: Boolean)');
+  cl.AddTypeS('TBorderIcon' ,'(biSystemMenu, biMinimize, biMaximize, biHelp)');
+  cl.AddTypeS('TBorderIcons', 'set of TBorderIcon');
+  cl.AddTypeS('THELPCONTEXT', 'Longint');
+end;
+
+procedure SIRegister_Forms(Cl: TPSPascalCompiler);
+begin
+  SIRegister_Forms_TypesAndConsts(cl);
+
+  {$IFNDEF PS_MINIVCL}
+  SIRegisterTCONTROLSCROLLBAR(cl);
+  {$ENDIF}
+  SIRegisterTScrollingWinControl(cl);
+  {$IFNDEF PS_MINIVCL}
+  SIRegisterTSCROLLBOX(cl);
+  {$ENDIF}
+  SIRegisterTForm(Cl);
+  {$IFNDEF PS_MINIVCL}
+  SIRegisterTApplication(Cl);
+  {$ENDIF}
+end;
+
+// PS_MINIVCL changes by Martijn Laan (mlaan at wintax _dot_ nl)
+
+
+end.
+
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_graphics.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_graphics.pas
new file mode 100644
index 0000000..e96bbe2
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_graphics.pas	
@@ -0,0 +1,275 @@
+{ Compiletime Graphics support }
+unit uPSC_graphics;
+
+{$I PascalScript.inc}
+interface
+uses
+  uPSCompiler, uPSUtils;
+
+
+
+procedure SIRegister_Graphics_TypesAndConsts(Cl: TPSPascalCompiler);
+procedure SIRegisterTGRAPHICSOBJECT(Cl: TPSPascalCompiler);
+procedure SIRegisterTFont(Cl: TPSPascalCompiler);
+procedure SIRegisterTPEN(Cl: TPSPascalCompiler);
+procedure SIRegisterTBRUSH(Cl: TPSPascalCompiler);
+procedure SIRegisterTCanvas(cl: TPSPascalCompiler);
+procedure SIRegisterTGraphic(CL: TPSPascalCompiler);
+procedure SIRegisterTBitmap(CL: TPSPascalCompiler; Streams: Boolean);
+
+procedure SIRegister_Graphics(Cl: TPSPascalCompiler; Streams: Boolean);
+
+implementation
+{$IFNDEF PS_NOGRAPHCONST}
+uses
+  {$IFDEF CLX}QGraphics{$ELSE}Graphics{$ENDIF};
+{$ELSE}
+{$IFNDEF CLX}
+{$IFNDEF FPC}
+uses
+  Windows;
+{$ENDIF}
+{$ENDIF}
+{$ENDIF}
+
+procedure SIRegisterTGRAPHICSOBJECT(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TPERSISTENT'), 'TGRAPHICSOBJECT') do
+  begin
+    RegisterProperty('ONCHANGE', 'TNOTIFYEVENT', iptrw);
+  end;
+end;
+
+procedure SIRegisterTFont(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TGraphicsObject'), 'TFONT') do
+  begin
+    RegisterMethod('constructor Create;');
+{$IFNDEF CLX}
+    RegisterProperty('Handle', 'Integer', iptRW);
+{$ENDIF}
+    RegisterProperty('Color', 'TColor', iptRW);
+    RegisterProperty('Height', 'Integer', iptRW);
+    RegisterProperty('Name', 'String', iptRW);
+    RegisterProperty('Pitch', 'Byte', iptRW);
+    RegisterProperty('Size', 'Integer', iptRW);
+    RegisterProperty('PixelsPerInch', 'Integer', iptRW);
+    RegisterProperty('Style', 'TFontStyles', iptrw);
+  end;
+end;
+
+procedure SIRegisterTCanvas(cl: TPSPascalCompiler); // requires TPersistent
+begin
+  with Cl.AddClassN(cl.FindClass('TPersistent'), 'TCANVAS') do
+  begin
+    RegisterMethod('procedure Arc(X1, Y1, X2, Y2, X3, Y3, X4, Y4: Integer);');
+    RegisterMethod('procedure Chord(X1, Y1, X2, Y2, X3, Y3, X4, Y4: Integer);');
+//    RegisterMethod('procedure Draw(X, Y: Integer; Graphic: TGraphic);');
+    RegisterMethod('procedure Ellipse(X1, Y1, X2, Y2: Integer);');
+    RegisterMethod('procedure FillRect(const Rect: TRect);');
+{$IFNDEF CLX}
+    RegisterMethod('procedure FloodFill(X, Y: Integer; Color: TColor; FillStyle: Byte);');
+{$ENDIF}
+    RegisterMethod('procedure LineTo(X, Y: Integer);');
+    RegisterMethod('procedure MoveTo(X, Y: Integer);');
+    RegisterMethod('procedure Pie(X1, Y1, X2, Y2, X3, Y3, X4, Y4: Integer);');
+    RegisterMethod('procedure Rectangle(X1, Y1, X2, Y2: Integer);');
+    RegisterMethod('procedure Refresh;');
+    RegisterMethod('procedure RoundRect(X1, Y1, X2, Y2, X3, Y3: Integer);');
+    RegisterMethod('function TextHeight(Text: String): Integer;');
+    RegisterMethod('procedure TextOut(X, Y: Integer; Text: String);');
+    RegisterMethod('function TextWidth(Text: String): Integer;');
+{$IFNDEF CLX}
+    RegisterProperty('Handle', 'Integer', iptRw);
+{$ENDIF}
+    RegisterProperty('Pixels', 'Integer Integer Integer', iptRW);
+    RegisterProperty('Brush', 'TBrush', iptR);
+    RegisterProperty('CopyMode', 'Byte', iptRw);
+    RegisterProperty('Font', 'TFont', iptR);
+    RegisterProperty('Pen', 'TPen', iptR);
+  end;
+end;
+
+procedure SIRegisterTPEN(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TGRAPHICSOBJECT'), 'TPEN') do
+  begin
+    RegisterMethod('constructor CREATE');
+    RegisterProperty('COLOR', 'TCOLOR', iptrw);
+    RegisterProperty('MODE', 'TPENMODE', iptrw);
+    RegisterProperty('STYLE', 'TPENSTYLE', iptrw);
+    RegisterProperty('WIDTH', 'INTEGER', iptrw);
+  end;
+end;
+
+procedure SIRegisterTBRUSH(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TGRAPHICSOBJECT'), 'TBRUSH') do
+  begin
+    RegisterMethod('constructor CREATE');
+    RegisterProperty('COLOR', 'TCOLOR', iptrw);
+    RegisterProperty('STYLE', 'TBRUSHSTYLE', iptrw);
+  end;
+end;
+
+procedure SIRegister_Graphics_TypesAndConsts(Cl: TPSPascalCompiler);
+{$IFDEF PS_NOGRAPHCONST}
+const
+  clSystemColor = {$IFDEF DELPHI7UP} $FF000000 {$ELSE} $80000000 {$ENDIF};
+{$ENDIF}
+begin
+{$IFNDEF PS_NOGRAPHCONST}
+  cl.AddConstantN('clScrollBar', 'Integer').Value.ts32 := clScrollBar;
+  cl.AddConstantN('clBackground', 'Integer').Value.ts32 := clBackground;
+  cl.AddConstantN('clActiveCaption', 'Integer').Value.ts32 := clActiveCaption;
+  cl.AddConstantN('clInactiveCaption', 'Integer').Value.ts32 := clInactiveCaption;
+  cl.AddConstantN('clMenu', 'Integer').Value.ts32 := clMenu;
+  cl.AddConstantN('clWindow', 'Integer').Value.ts32 := clWindow;
+  cl.AddConstantN('clWindowFrame', 'Integer').Value.ts32 := clWindowFrame;
+  cl.AddConstantN('clMenuText', 'Integer').Value.ts32 := clMenuText;
+  cl.AddConstantN('clWindowText', 'Integer').Value.ts32 := clWindowText;
+  cl.AddConstantN('clCaptionText', 'Integer').Value.ts32 := clCaptionText;
+  cl.AddConstantN('clActiveBorder', 'Integer').Value.ts32 := clActiveBorder;
+  cl.AddConstantN('clInactiveBorder', 'Integer').Value.ts32 := clInactiveCaption;
+  cl.AddConstantN('clAppWorkSpace', 'Integer').Value.ts32 := clAppWorkSpace;
+  cl.AddConstantN('clHighlight', 'Integer').Value.ts32 := clHighlight;
+  cl.AddConstantN('clHighlightText', 'Integer').Value.ts32 := clHighlightText;
+  cl.AddConstantN('clBtnFace', 'Integer').Value.ts32 := clBtnFace;
+  cl.AddConstantN('clBtnShadow', 'Integer').Value.ts32 := clBtnShadow;
+  cl.AddConstantN('clGrayText', 'Integer').Value.ts32 := clGrayText;
+  cl.AddConstantN('clBtnText', 'Integer').Value.ts32 := clBtnText;
+  cl.AddConstantN('clInactiveCaptionText', 'Integer').Value.ts32 := clInactiveCaptionText;
+  cl.AddConstantN('clBtnHighlight', 'Integer').Value.ts32 := clBtnHighlight;
+  cl.AddConstantN('cl3DDkShadow', 'Integer').Value.ts32 := cl3DDkShadow;
+  cl.AddConstantN('cl3DLight', 'Integer').Value.ts32 := cl3DLight;
+  cl.AddConstantN('clInfoText', 'Integer').Value.ts32 := clInfoText;
+  cl.AddConstantN('clInfoBk', 'Integer').Value.ts32 := clInfoBk;
+{$ELSE}
+{$IFNDEF CLX}  // These are VCL-only; CLX uses different constant values
+  cl.AddConstantN('clScrollBar', 'Integer').Value.ts32 := Integer(clSystemColor or COLOR_SCROLLBAR);
+  cl.AddConstantN('clBackground', 'Integer').Value.ts32 := Integer(clSystemColor or COLOR_BACKGROUND);
+  cl.AddConstantN('clActiveCaption', 'Integer').Value.ts32 := Integer(clSystemColor or COLOR_ACTIVECAPTION);
+  cl.AddConstantN('clInactiveCaption', 'Integer').Value.ts32 := Integer(clSystemColor or COLOR_INACTIVECAPTION);
+  cl.AddConstantN('clMenu', 'Integer').Value.ts32 := Integer(clSystemColor or COLOR_MENU);
+  cl.AddConstantN('clWindow', 'Integer').Value.ts32 := Integer(clSystemColor or COLOR_WINDOW);
+  cl.AddConstantN('clWindowFrame', 'Integer').Value.ts32 := Integer(clSystemColor or COLOR_WINDOWFRAME);
+  cl.AddConstantN('clMenuText', 'Integer').Value.ts32 := Integer(clSystemColor or COLOR_MENUTEXT);
+  cl.AddConstantN('clWindowText', 'Integer').Value.ts32 := Integer(clSystemColor or COLOR_WINDOWTEXT);
+  cl.AddConstantN('clCaptionText', 'Integer').Value.ts32 := Integer(clSystemColor or COLOR_CAPTIONTEXT);
+  cl.AddConstantN('clActiveBorder', 'Integer').Value.ts32 := Integer(clSystemColor or COLOR_ACTIVEBORDER);
+  cl.AddConstantN('clInactiveBorder', 'Integer').Value.ts32 := Integer(clSystemColor or COLOR_INACTIVEBORDER);
+  cl.AddConstantN('clAppWorkSpace', 'Integer').Value.ts32 := Integer(clSystemColor or COLOR_APPWORKSPACE);
+  cl.AddConstantN('clHighlight', 'Integer').Value.ts32 := Integer(clSystemColor or COLOR_HIGHLIGHT);
+  cl.AddConstantN('clHighlightText', 'Integer').Value.ts32 := Integer(clSystemColor or COLOR_HIGHLIGHTTEXT);
+  cl.AddConstantN('clBtnFace', 'Integer').Value.ts32 := Integer(clSystemColor or COLOR_BTNFACE);
+  cl.AddConstantN('clBtnShadow', 'Integer').Value.ts32 := Integer(clSystemColor or COLOR_BTNSHADOW);
+  cl.AddConstantN('clGrayText', 'Integer').Value.ts32 := Integer(clSystemColor or COLOR_GRAYTEXT);
+  cl.AddConstantN('clBtnText', 'Integer').Value.ts32 := Integer(clSystemColor or COLOR_BTNTEXT);
+  cl.AddConstantN('clInactiveCaptionText', 'Integer').Value.ts32 := Integer(clSystemColor or COLOR_INACTIVECAPTIONTEXT);
+  cl.AddConstantN('clBtnHighlight', 'Integer').Value.ts32 := Integer(clSystemColor or COLOR_BTNHIGHLIGHT);
+  cl.AddConstantN('cl3DDkShadow', 'Integer').Value.ts32 := Integer(clSystemColor or COLOR_3DDKSHADOW);
+  cl.AddConstantN('cl3DLight', 'Integer').Value.ts32 := Integer(clSystemColor or COLOR_3DLIGHT);
+  cl.AddConstantN('clInfoText', 'Integer').Value.ts32 := Integer(clSystemColor or COLOR_INFOTEXT);
+  cl.AddConstantN('clInfoBk', 'Integer').Value.ts32 := Integer(clSystemColor or COLOR_INFOBK);
+{$ENDIF}
+{$ENDIF}
+  cl.AddConstantN('clBlack', 'Integer').Value.ts32 := $000000;
+  cl.AddConstantN('clMaroon', 'Integer').Value.ts32 := $000080;
+  cl.AddConstantN('clGreen', 'Integer').Value.ts32 := $008000;
+  cl.AddConstantN('clOlive', 'Integer').Value.ts32 := $008080;
+  cl.AddConstantN('clNavy', 'Integer').Value.ts32 := $800000;
+  cl.AddConstantN('clPurple', 'Integer').Value.ts32 := $800080;
+  cl.AddConstantN('clTeal', 'Integer').Value.ts32 := $808000;
+  cl.AddConstantN('clGray', 'Integer').Value.ts32 := $808080;
+  cl.AddConstantN('clSilver', 'Integer').Value.ts32 := $C0C0C0;
+  cl.AddConstantN('clRed', 'Integer').Value.ts32 := $0000FF;
+  cl.AddConstantN('clLime', 'Integer').Value.ts32 := $00FF00;
+  cl.AddConstantN('clYellow', 'Integer').Value.ts32 := $00FFFF;
+  cl.AddConstantN('clBlue', 'Integer').Value.ts32 := $FF0000;
+  cl.AddConstantN('clFuchsia', 'Integer').Value.ts32 := $FF00FF;
+  cl.AddConstantN('clAqua', 'Integer').Value.ts32 := $FFFF00;
+  cl.AddConstantN('clLtGray', 'Integer').Value.ts32 := $C0C0C0;
+  cl.AddConstantN('clDkGray', 'Integer').Value.ts32 := $808080;
+  cl.AddConstantN('clWhite', 'Integer').Value.ts32 := $FFFFFF;
+  cl.AddConstantN('clNone', 'Integer').Value.ts32 := $1FFFFFFF;
+  cl.AddConstantN('clDefault', 'Integer').Value.ts32 := $20000000;
+
+  Cl.addTypeS('TFONTSTYLE', '(FSBOLD, FSITALIC, FSUNDERLINE, FSSTRIKEOUT)');
+  Cl.addTypeS('TFONTSTYLES', 'set of TFONTSTYLE');
+
+  cl.AddTypeS('TFontPitch', '(fpDefault, fpVariable, fpFixed)');
+  cl.AddTypeS('TPenStyle', '(psSolid, psDash, psDot, psDashDot, psDashDotDot, psClear, psInsideFrame)');
+  cl.AddTypeS('TPenMode', '(pmBlack, pmWhite, pmNop, pmNot, pmCopy, pmNotCopy, pmMergePenNot, pmMaskPenNot, pmMergeNotPen, pmMaskNotPen, pmMerge, pmNotMerge, pmMask, pmNotMask, pmXor, pmNotXor)');
+  cl.AddTypeS('TBrushStyle', '(bsSolid, bsClear, bsHorizontal, bsVertical, bsFDiagonal, bsBDiagonal, bsCross, bsDiagCross)');
+  cl.addTypeS('TColor', 'integer');
+
+{$IFNDEF CLX}
+  cl.addTypeS('HBITMAP', 'Integer');
+  cl.addTypeS('HPALETTE', 'Integer');
+{$ENDIF}
+end;
+
+procedure SIRegisterTGraphic(CL: TPSPascalCompiler);
+begin
+  with CL.AddClassN(CL.FindClass('TPersistent'),'TGraphic') do
+  begin
+    RegisterMethod('constructor Create');
+    RegisterMethod('Procedure LoadFromFile( const Filename : String)');
+    RegisterMethod('Procedure SaveToFile( const Filename : String)');
+    RegisterProperty('Empty', 'Boolean', iptr);
+    RegisterProperty('Height', 'Integer', iptrw);
+    RegisterProperty('Modified', 'Boolean', iptrw);
+    RegisterProperty('Width', 'Integer', iptrw);
+    RegisterProperty('OnChange', 'TNotifyEvent', iptrw);
+  end;
+end;
+
+procedure SIRegisterTBitmap(CL: TPSPascalCompiler; Streams: Boolean);
+begin
+  with CL.AddClassN(CL.FindClass('TGraphic'),'TBitmap') do
+  begin
+    if Streams then begin
+      RegisterMethod('Procedure LoadFromStream( Stream : TStream)');
+      RegisterMethod('Procedure SaveToStream( Stream : TStream)');
+    end;
+    RegisterProperty('Canvas', 'TCanvas', iptr);
+{$IFNDEF CLX}
+    RegisterProperty('Handle', 'HBITMAP', iptrw);
+{$ENDIF}
+
+    {$IFNDEF IFPS_MINIVCL}
+    RegisterMethod('Procedure Dormant');
+    RegisterMethod('Procedure FreeImage');
+{$IFNDEF CLX}
+    RegisterMethod('Procedure LoadFromClipboardFormat( AFormat : Word; AData : THandle; APalette : HPALETTE)');
+{$ENDIF}
+    RegisterMethod('Procedure LoadFromResourceName( Instance : THandle; const ResName : String)');
+    RegisterMethod('Procedure LoadFromResourceID( Instance : THandle; ResID : Integer)');
+{$IFNDEF CLX}
+    RegisterMethod('Function ReleaseHandle : HBITMAP');
+    RegisterMethod('Function ReleasePalette : HPALETTE');
+    RegisterMethod('Procedure SaveToClipboardFormat( var Format : Word; var Data : THandle; var APalette : HPALETTE)');
+    RegisterProperty('Monochrome', 'Boolean', iptrw);
+    RegisterProperty('Palette', 'HPALETTE', iptrw);
+    RegisterProperty('IgnorePalette', 'Boolean', iptrw);
+{$ENDIF}
+    RegisterProperty('TransparentColor', 'TColor', iptr);
+    {$ENDIF}
+  end;
+end;
+
+procedure SIRegister_Graphics(Cl: TPSPascalCompiler; Streams: Boolean);
+begin
+  SIRegister_Graphics_TypesAndConsts(Cl);
+  SIRegisterTGRAPHICSOBJECT(Cl);
+  SIRegisterTFont(Cl);
+  SIRegisterTPEN(cl);
+  SIRegisterTBRUSH(cl);
+  SIRegisterTCanvas(cl);
+  SIRegisterTGraphic(Cl);
+  SIRegisterTBitmap(Cl, Streams);
+end;
+
+// PS_MINIVCL changes by Martijn Laan (mlaan at wintax _dot_ nl)
+
+End.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_menus.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_menus.pas
new file mode 100644
index 0000000..698f16b
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_menus.pas	
@@ -0,0 +1,214 @@
+{ Menus Import Unit }
+Unit uPSC_menus;
+{$I PascalScript.inc}
+Interface
+Uses uPSCompiler;
+
+procedure SIRegisterTMENUITEMSTACK(CL: TPSPascalCompiler);
+procedure SIRegisterTPOPUPLIST(CL: TPSPascalCompiler);
+procedure SIRegisterTPOPUPMENU(CL: TPSPascalCompiler);
+procedure SIRegisterTMAINMENU(CL: TPSPascalCompiler);
+procedure SIRegisterTMENU(CL: TPSPascalCompiler);
+procedure SIRegisterTMENUITEM(CL: TPSPascalCompiler);
+procedure SIRegister_Menus(Cl: TPSPascalCompiler);
+
+implementation
+
+procedure SIRegisterTMENUITEMSTACK(CL: TPSPascalCompiler);
+begin
+	With cl.AddClassN(Cl.FindClass('TSTACK'),'TMENUITEMSTACK') do
+	begin
+	  RegisterMethod('Procedure CLEARITEM( AITEM : TMENUITEM)');
+	end;
+end;
+
+procedure SIRegisterTPOPUPLIST(CL: TPSPascalCompiler);
+begin
+	With cl.AddClassN(Cl.FindClass('TLIST'),'TPOPUPLIST') do
+	begin
+		RegisterProperty('WINDOW', 'HWND', iptr);
+		RegisterMethod('Procedure ADD( POPUP : TPOPUPMENU)');
+		RegisterMethod('Procedure REMOVE( POPUP : TPOPUPMENU)');
+	end;
+end;
+
+procedure SIRegisterTPOPUPMENU(CL: TPSPascalCompiler);
+var
+	cc: TPSCompileTimeClass;
+begin
+	With cl.AddClassN(Cl.FindClass('TMENU'),'TPOPUPMENU') do
+	begin
+		cc := Cl.FindClass('TLabel');
+		if cc <> nil then
+			RegisterProperty('POPUPMENU', 'TPOPUPMENU', iptRW);
+		with Cl.FindClass('TForm') do
+		begin
+			RegisterProperty('POPUPMENU', 'TPOPUPMENU', iptRW);
+		end;
+	RegisterMethod('Constructor CREATE( AOWNER : TCOMPONENT)');
+	RegisterMethod('Procedure POPUP( X, Y : INTEGER)');
+	RegisterProperty('POPUPCOMPONENT', 'TCOMPONENT', iptrw);
+	RegisterProperty('ALIGNMENT', 'TPOPUPALIGNMENT', iptrw);
+	RegisterProperty('AUTOPOPUP', 'BOOLEAN', iptrw);
+	RegisterProperty('HELPCONTEXT', 'THELPCONTEXT', iptrw);
+    RegisterProperty('MENUANIMATION', 'TMENUANIMATION', iptrw);
+    RegisterProperty('TRACKBUTTON', 'TTRACKBUTTON', iptrw);
+    RegisterProperty('ONPOPUP', 'TNOTIFYEVENT', iptrw);
+  end;
+end;
+
+procedure SIRegisterTMAINMENU(CL: TPSPascalCompiler);
+begin
+  With cl.AddClassN(Cl.FindClass('TMENU'),'TMAINMENU') do
+  begin
+    RegisterMethod('Procedure MERGE( MENU : TMAINMENU)');
+    RegisterMethod('Procedure UNMERGE( MENU : TMAINMENU)');
+    RegisterMethod('Procedure POPULATEOLE2MENU( SHAREDMENU : HMENU; GROUPS : array of INTEGER; var WIDTHS : array of LONGINT)');
+    RegisterMethod('Procedure GETOLE2ACCELERATORTABLE( var ACCELTABLE : HACCEL; var ACCELCOUNT : INTEGER; GROUPS : array of INTEGER)');
+    RegisterMethod('Procedure SETOLE2MENUHANDLE( HANDLE : HMENU)');
+    RegisterProperty('AUTOMERGE', 'BOOLEAN', iptrw);
+  end;
+end;
+
+procedure SIRegisterTMENU(CL: TPSPascalCompiler);
+begin
+  With cl.AddClassN(Cl.FindClass('TCOMPONENT'),'TMENU') do
+  begin
+    RegisterMethod('Constructor CREATE( AOWNER : TCOMPONENT)');
+    RegisterMethod('Function DISPATCHCOMMAND( ACOMMAND : WORD) : BOOLEAN');
+    RegisterMethod('Function DISPATCHPOPUP( AHANDLE : HMENU) : BOOLEAN');
+    RegisterMethod('Function FINDITEM( VALUE : INTEGER; KIND : TFINDITEMKIND) : TMENUITEM');
+    RegisterMethod('Function GETHELPCONTEXT( VALUE : INTEGER; BYCOMMAND : BOOLEAN) : THELPCONTEXT');
+    RegisterProperty('IMAGES', 'TCUSTOMIMAGELIST', iptrw);
+    RegisterMethod('Function ISRIGHTTOLEFT : BOOLEAN');
+    RegisterMethod('Procedure PARENTBIDIMODECHANGED( ACONTROL : TOBJECT)');
+    RegisterMethod('Procedure PROCESSMENUCHAR( var MESSAGE : TWMMENUCHAR)');
+    RegisterProperty('AUTOHOTKEYS', 'TMENUAUTOFLAG', iptrw);
+    RegisterProperty('AUTOLINEREDUCTION', 'TMENUAUTOFLAG', iptrw);
+    RegisterProperty('BIDIMODE', 'TBIDIMODE', iptrw);
+    RegisterProperty('HANDLE', 'HMENU', iptr);
+    RegisterProperty('OWNERDRAW', 'BOOLEAN', iptrw);
+    RegisterProperty('PARENTBIDIMODE', 'BOOLEAN', iptrw);
+    RegisterProperty('WINDOWHANDLE', 'HWND', iptrw);
+    RegisterProperty('ITEMS', 'TMENUITEM', iptr);
+  end;
+end;
+
+procedure SIRegisterTMENUITEM(CL: TPSPascalCompiler);
+begin
+  With cl.AddClassN(Cl.FindClass('TCOMPONENT'),'TMENUITEM') do
+  begin
+    RegisterMethod('Constructor CREATE( AOWNER : TCOMPONENT)');
+    RegisterMethod('Procedure INITIATEACTION');
+    RegisterMethod('Procedure INSERT( INDEX : INTEGER; ITEM : TMENUITEM)');
+    RegisterMethod('Procedure DELETE( INDEX : INTEGER)');
+    RegisterMethod('Procedure CLEAR');
+    RegisterMethod('Procedure CLICK');
+    RegisterMethod('Function FIND( ACAPTION : String) : TMENUITEM');
+    RegisterMethod('Function INDEXOF( ITEM : TMENUITEM) : INTEGER');
+    RegisterMethod('Function ISLINE : BOOLEAN');
+    RegisterMethod('Function GETIMAGELIST : TCUSTOMIMAGELIST');
+    RegisterMethod('Function GETPARENTCOMPONENT : TCOMPONENT');
+    RegisterMethod('Function GETPARENTMENU : TMENU');
+    RegisterMethod('Function HASPARENT : BOOLEAN');
+    RegisterMethod('Function NEWTOPLINE : INTEGER');
+    RegisterMethod('Function NEWBOTTOMLINE : INTEGER');
+    RegisterMethod('Function INSERTNEWLINEBEFORE( AITEM : TMENUITEM) : INTEGER');
+    RegisterMethod('Function INSERTNEWLINEAFTER( AITEM : TMENUITEM) : INTEGER');
+    RegisterMethod('Procedure ADD( ITEM : TMENUITEM)');
+    RegisterMethod('Procedure REMOVE( ITEM : TMENUITEM)');
+    RegisterMethod('Function RETHINKHOTKEYS : BOOLEAN');
+    RegisterMethod('Function RETHINKLINES : BOOLEAN');
+    RegisterProperty('COMMAND', 'WORD', iptr);
+    RegisterProperty('HANDLE', 'HMENU', iptr);
+    RegisterProperty('COUNT', 'INTEGER', iptr);
+    RegisterProperty('ITEMS', 'TMENUITEM INTEGER', iptr);
+    RegisterProperty('MENUINDEX', 'INTEGER', iptrw);
+    RegisterProperty('PARENT', 'TMENUITEM', iptr);
+    {$IFDEF DELPHI5UP}
+    RegisterProperty('ACTION', 'TBASICACTION', iptrw);
+    {$ENDIF}
+    RegisterProperty('AUTOHOTKEYS', 'TMENUITEMAUTOFLAG', iptrw);
+    RegisterProperty('AUTOLINEREDUCTION', 'TMENUITEMAUTOFLAG', iptrw);
+    RegisterProperty('BITMAP', 'TBITMAP', iptrw);
+    RegisterProperty('CAPTION', 'String', iptrw);
+    RegisterProperty('CHECKED', 'BOOLEAN', iptrw);
+    RegisterProperty('SUBMENUIMAGES', 'TCUSTOMIMAGELIST', iptrw);
+    RegisterProperty('DEFAULT', 'BOOLEAN', iptrw);
+    RegisterProperty('ENABLED', 'BOOLEAN', iptrw);
+    RegisterProperty('GROUPINDEX', 'BYTE', iptrw);
+    RegisterProperty('HELPCONTEXT', 'THELPCONTEXT', iptrw);
+    RegisterProperty('HINT', 'String', iptrw);
+    RegisterProperty('IMAGEINDEX', 'TIMAGEINDEX', iptrw);
+    RegisterProperty('RADIOITEM', 'BOOLEAN', iptrw);
+    RegisterProperty('SHORTCUT', 'TSHORTCUT', iptrw);
+    RegisterProperty('VISIBLE', 'BOOLEAN', iptrw);
+    RegisterProperty('ONCLICK', 'TNOTIFYEVENT', iptrw);
+   {$IFNDEF FPC} RegisterProperty('ONDRAWITEM', 'TMENUDRAWITEMEVENT', iptrw);
+    RegisterProperty('ONADVANCEDDRAWITEM', 'TADVANCEDMENUDRAWITEMEVENT', iptrw);
+    RegisterProperty('ONMEASUREITEM', 'TMENUMEASUREITEMEVENT', iptrw);{$ENDIF}
+  end;
+end;
+
+procedure SIRegister_Menus(Cl: TPSPascalCompiler);
+begin
+  Cl.AddTypeS('HMenu', 'Cardinal');
+  Cl.AddTypeS('HACCEL', 'Cardinal');
+
+  cl.addClassN(cl.FindClass('EXCEPTION'),'EMENUERROR');
+  Cl.addTypeS('TMENUBREAK', '( MBNONE, MBBREAK, MBBARBREAK )');
+{$IFNDEF FPC}
+  Cl.addTypeS('TMENUDRAWITEMEVENT', 'Procedure ( SENDER : TOBJECT; ACANVAS : TC'
+   +'ANVAS; ARECT : TRECT; SELECTED : BOOLEAN)');
+  Cl.addTypeS('TADVANCEDMENUDRAWITEMEVENT', 'Procedure ( SENDER : TOBJECT; ACAN'
+   +'VAS : TCANVAS; ARECT : TRECT; STATE : TOWNERDRAWSTATE)');
+  Cl.addTypeS('TMENUMEASUREITEMEVENT', 'Procedure ( SENDER : TOBJECT; ACANVAS :'
+   +' TCANVAS; var WIDTH, HEIGHT : INTEGER)');
+{$ENDIF}
+  Cl.addTypeS('TMENUITEMAUTOFLAG', '( MAAUTOMATIC, MAMANUAL, MAPARENT )');
+  Cl.AddTypeS('TMenuAutoFlag', 'TMENUITEMAUTOFLAG');
+  Cl.addTypeS('TSHORTCUT', 'WORD');
+  cl.addClassN(cl.FindClass('TACTIONLINK'),'TMENUACTIONLINK');
+  SIRegisterTMENUITEM(Cl);
+  Cl.addTypeS('TMENUCHANGEEVENT', 'Procedure ( SENDER : TOBJECT; SOURCE : TMENU'
+   +'ITEM; REBUILD : BOOLEAN)');
+  Cl.addTypeS('TFINDITEMKIND', '( FKCOMMAND, FKHANDLE, FKSHORTCUT )');
+  SIRegisterTMENU(Cl);
+  SIRegisterTMAINMENU(Cl);
+  Cl.addTypeS('TPOPUPALIGNMENT', '( PALEFT, PARIGHT, PACENTER )');
+  Cl.addTypeS('TTRACKBUTTON', '( TBRIGHTBUTTON, TBLEFTBUTTON )');
+  Cl.addTypeS('TMENUANIMATIONS', '( MALEFTTORIGHT, MARIGHTTOLEFT, MATOPTOBOTTOM'
+   +', MABOTTOMTOTOP, MANONE )');
+  Cl.addTypeS('TMENUANIMATION', 'set of TMENUANIMATIONS');
+  SIRegisterTPOPUPMENU(Cl);
+  SIRegisterTPOPUPLIST(Cl);
+  SIRegisterTMENUITEMSTACK(Cl);
+  Cl.addTypeS('TCMENUITEM', 'TMENUITEM');
+{$IFNDEF FPC}
+//TODO: it should work,but somehow TShiftState is not defined
+  Cl.AddDelphiFunction('Function SHORTCUT( KEY : WORD; SHIFT : TSHIFTSTATE) : T'
+   +'SHORTCUT');
+  Cl.AddDelphiFunction('Procedure SHORTCUTTOKEY( SHORTCUT : TSHORTCUT; var KEY '
+ +': WORD; var SHIFT : TSHIFTSTATE)');
+{$ENDIF}
+  Cl.AddDelphiFunction('Function SHORTCUTTOTEXT( SHORTCUT : TSHORTCUT) : String'
+   +'');
+  Cl.AddDelphiFunction('Function TEXTTOSHORTCUT( TEXT : String) : TSHORTCUT');
+  Cl.AddDelphiFunction('Function NEWMENU( OWNER : TCOMPONENT; const ANAME : STR'
+   +'ING; ITEMS : array of TMenuItem) : TMAINMENU');
+  Cl.AddDelphiFunction('Function NEWPOPUPMENU( OWNER : TCOMPONENT; const ANAME '
+   +': String; ALIGNMENT : TPOPUPALIGNMENT; AUTOPOPUP : BOOLEAN; const ITEMS : array of '
+   +'TCMENUITEM) : TPOPUPMENU');
+  Cl.AddDelphiFunction('Function NEWSUBMENU( const ACAPTION : String; HCTX : WO'
+   +'RD; const ANAME : String; ITEMS : array of TMenuItem; AENABLED : BOOLEAN) : TMENUITEM');
+  Cl.AddDelphiFunction('Function NEWITEM( const ACAPTION : String; ASHORTCUT : '
+   +'TSHORTCUT; ACHECKED, AENABLED : BOOLEAN; AONCLICK : TNOTIFYEVENT; HCTX : W'
+   +'ORD; const ANAME : String) : TMENUITEM');
+  Cl.AddDelphiFunction('Function NEWLINE : TMENUITEM');
+{$IFNDEF FPC}
+  Cl.AddDelphiFunction('Procedure DRAWMENUITEM( MENUITEM : TMENUITEM; ACANVAS :'
+   +' TCANVAS; ARECT : TRECT; STATE : TOWNERDRAWSTATE)');
+{$ENDIF}
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_std.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_std.pas
new file mode 100644
index 0000000..e6e9946
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_std.pas	
@@ -0,0 +1,86 @@
+{ Compiletime TObject, TPersistent and TComponent definitions }
+unit uPSC_std;
+{$I PascalScript.inc}
+interface
+uses
+  uPSCompiler, uPSUtils;
+
+{
+  Will register files from:
+    System
+    Classes (Only TComponent and TPersistent)
+ 
+}
+
+procedure SIRegister_Std_TypesAndConsts(Cl: TPSPascalCompiler);
+procedure SIRegisterTObject(CL: TPSPascalCompiler);
+procedure SIRegisterTPersistent(Cl: TPSPascalCompiler);
+procedure SIRegisterTComponent(Cl: TPSPascalCompiler);
+
+procedure SIRegister_Std(Cl: TPSPascalCompiler);
+
+implementation
+
+procedure SIRegisterTObject(CL: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(nil, 'TOBJECT') do
+  begin
+    RegisterMethod('constructor Create');
+    RegisterMethod('procedure Free');
+  end;
+end;
+
+procedure SIRegisterTPersistent(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TObject'), 'TPERSISTENT') do
+  begin
+    RegisterMethod('procedure Assign(Source: TPersistent)');
+  end;
+end;
+
+procedure SIRegisterTComponent(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TPersistent'), 'TCOMPONENT') do
+  begin
+    RegisterMethod('function FindComponent(AName: String): TComponent;');
+    RegisterMethod('constructor Create(AOwner: TComponent); virtual;');
+
+    RegisterProperty('Owner', 'TComponent', iptRW);
+    RegisterMethod('procedure DESTROYCOMPONENTS');
+    RegisterMethod('procedure DESTROYING');
+    RegisterMethod('procedure FREENOTIFICATION(ACOMPONENT:TCOMPONENT)');
+    RegisterMethod('procedure INSERTCOMPONENT(ACOMPONENT:TCOMPONENT)');
+    RegisterMethod('procedure REMOVECOMPONENT(ACOMPONENT:TCOMPONENT)');
+    RegisterProperty('COMPONENTS', 'TCOMPONENT INTEGER', iptr);
+    RegisterProperty('COMPONENTCOUNT', 'INTEGER', iptr);
+    RegisterProperty('COMPONENTINDEX', 'INTEGER', iptrw);
+    RegisterProperty('COMPONENTSTATE', 'Byte', iptr);
+    RegisterProperty('DESIGNINFO', 'LONGINT', iptrw);
+    RegisterProperty('NAME', 'String', iptrw);
+    RegisterProperty('TAG', 'LONGINT', iptrw);
+  end;
+end;
+
+
+
+
+procedure SIRegister_Std_TypesAndConsts(Cl: TPSPascalCompiler);
+begin
+  Cl.AddTypeS('TComponentStateE', '(csLoading, csReading, csWriting, csDestroying, csDesigning, csAncestor, csUpdating, csFixups, csFreeNotification, csInline, csDesignInstance)');
+  cl.AddTypeS('TComponentState', 'set of TComponentStateE');
+  Cl.AddTypeS('TRect', 'record Left, Top, Right, Bottom: Integer; end;');
+end;
+
+procedure SIRegister_Std(Cl: TPSPascalCompiler);
+begin
+  SIRegister_Std_TypesAndConsts(Cl);
+  SIRegisterTObject(CL);
+  SIRegisterTPersistent(Cl);
+  SIRegisterTComponent(Cl);
+end;
+
+// PS_MINIVCL changes by Martijn Laan (mlaan at wintax _dot_ nl)
+
+
+End.
+
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_stdctrls.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_stdctrls.pas
new file mode 100644
index 0000000..52ff4bc
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSC_stdctrls.pas	
@@ -0,0 +1,633 @@
+{ Compiletime STDCtrls support }
+unit uPSC_stdctrls;
+
+{$I PascalScript.inc}
+interface
+uses
+  uPSCompiler, uPSUtils;
+
+{
+   Will register files from:
+     stdctrls
+ 
+Requires:
+  STD, classes, controls and graphics
+}
+
+procedure SIRegister_StdCtrls_TypesAndConsts(cl: TPSPascalCompiler);
+
+
+
+procedure SIRegisterTCUSTOMGROUPBOX(Cl: TPSPascalCompiler);
+procedure SIRegisterTGROUPBOX(Cl: TPSPascalCompiler);
+procedure SIRegisterTCUSTOMLABEL(Cl: TPSPascalCompiler);
+procedure SIRegisterTLABEL(Cl: TPSPascalCompiler);
+procedure SIRegisterTCUSTOMEDIT(Cl: TPSPascalCompiler);
+procedure SIRegisterTEDIT(Cl: TPSPascalCompiler);
+procedure SIRegisterTCUSTOMMEMO(Cl: TPSPascalCompiler);
+procedure SIRegisterTMEMO(Cl: TPSPascalCompiler);
+procedure SIRegisterTCUSTOMCOMBOBOX(Cl: TPSPascalCompiler);
+procedure SIRegisterTCOMBOBOX(Cl: TPSPascalCompiler);
+procedure SIRegisterTBUTTONCONTROL(Cl: TPSPascalCompiler);
+procedure SIRegisterTBUTTON(Cl: TPSPascalCompiler);
+procedure SIRegisterTCUSTOMCHECKBOX(Cl: TPSPascalCompiler);
+procedure SIRegisterTCHECKBOX(Cl: TPSPascalCompiler);
+procedure SIRegisterTRADIOBUTTON(Cl: TPSPascalCompiler);
+procedure SIRegisterTCUSTOMLISTBOX(Cl: TPSPascalCompiler);
+procedure SIRegisterTLISTBOX(Cl: TPSPascalCompiler);
+procedure SIRegisterTSCROLLBAR(Cl: TPSPascalCompiler);
+
+procedure SIRegister_StdCtrls(cl: TPSPascalCompiler);
+
+
+implementation
+
+procedure SIRegisterTCUSTOMGROUPBOX(Cl: TPSPascalCompiler);
+begin
+  Cl.AddClassN(cl.FindClass('TCUSTOMCONTROL'), 'TCUSTOMGROUPBOX');
+end;
+
+
+procedure SIRegisterTGROUPBOX(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TCUSTOMGROUPBOX'), 'TGROUPBOX') do
+  begin
+    RegisterProperty('CAPTION', 'String', iptrw);
+    RegisterProperty('COLOR', 'TColor', iptrw);
+    RegisterProperty('FONT', 'TFont', iptrw);
+    RegisterProperty('PARENTCOLOR', 'Boolean', iptrw);
+    RegisterProperty('PARENTFONT', 'Boolean', iptrw);
+    RegisterProperty('ONCLICK', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONDBLCLICK', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONENTER', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONEXIT', 'TNotifyEvent', iptrw);
+
+    {$IFNDEF PS_MINIVCL}
+    RegisterProperty('CTL3D', 'Boolean', iptrw);
+    RegisterProperty('DRAGCURSOR', 'Longint', iptrw);
+    RegisterProperty('DRAGMODE', 'TDragMode', iptrw);
+    RegisterProperty('PARENTCTL3D', 'Boolean', iptrw);
+    RegisterProperty('PARENTSHOWHINT', 'Boolean', iptrw);
+    RegisterProperty('POPUPMENU', 'TPopupMenu', iptrw);
+    RegisterProperty('ONDRAGDROP', 'TDragDropEvent', iptrw);
+    RegisterProperty('ONDRAGOVER', 'TDragOverEvent', iptrw);
+    RegisterProperty('ONENDDRAG', 'TEndDragEvent', iptrw);
+    RegisterProperty('ONMOUSEDOWN', 'TMouseEvent', iptrw);
+    RegisterProperty('ONMOUSEMOVE', 'TMouseMoveEvent', iptrw);
+    RegisterProperty('ONMOUSEUP', 'TMouseEvent', iptrw);
+    RegisterProperty('ONSTARTDRAG', 'TStartDragEvent', iptrw);
+    {$ENDIF}
+  end;
+end;
+
+
+
+
+
+procedure SIRegisterTCUSTOMLABEL(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TGRAPHICCONTROL'), 'TCUSTOMLABEL') do
+  begin
+    {$IFNDEF PS_MINIVCL}
+{$IFNDEF CLX}
+    RegisterProperty('CANVAS', 'TCANVAS', iptr);
+{$ENDIF}
+    {$ENDIF}
+  end;
+end;
+
+
+procedure SIRegisterTLABEL(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TCUSTOMLABEL'), 'TLABEL') do
+  begin
+    RegisterProperty('ALIGNMENT', 'TAlignment', iptrw);
+    RegisterProperty('AUTOSIZE', 'Boolean', iptrw);
+    RegisterProperty('CAPTION', 'String', iptrw);
+    RegisterProperty('COLOR', 'TColor', iptrw);
+    RegisterProperty('DRAGCURSOR', 'Longint', iptrw);
+    RegisterProperty('DRAGMODE', 'TDragMode', iptrw);
+    RegisterProperty('FOCUSCONTROL', 'TWinControl', iptrw);
+    RegisterProperty('FONT', 'TFont', iptrw);
+    RegisterProperty('LAYOUT', 'TTextLayout', iptrw);
+    RegisterProperty('PARENTCOLOR', 'Boolean', iptrw);
+    RegisterProperty('PARENTFONT', 'Boolean', iptrw);
+    RegisterProperty('PARENTSHOWHINT', 'Boolean', iptrw);
+    RegisterProperty('SHOWACCELCHAR', 'Boolean', iptrw);
+    RegisterProperty('TRANSPARENT', 'Boolean', iptrw);
+    RegisterProperty('WORDWRAP', 'Boolean', iptrw);
+    RegisterProperty('ONCLICK', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONDBLCLICK', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONDRAGDROP', 'TDragDropEvent', iptrw);
+    RegisterProperty('ONDRAGOVER', 'TDragOverEvent', iptrw);
+    RegisterProperty('ONENDDRAG', 'TEndDragEvent', iptrw);
+    RegisterProperty('ONMOUSEDOWN', 'TMouseEvent', iptrw);
+    RegisterProperty('ONMOUSEMOVE', 'TMouseMoveEvent', iptrw);
+    RegisterProperty('ONMOUSEUP', 'TMouseEvent', iptrw);
+    RegisterProperty('ONSTARTDRAG', 'TStartDragEvent', iptrw);
+  end;
+end;
+
+
+
+
+
+
+
+procedure SIRegisterTCUSTOMEDIT(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TWINCONTROL'), 'TCUSTOMEDIT') do
+  begin
+    RegisterMethod('procedure CLEAR');
+    RegisterMethod('procedure CLEARSELECTION');
+    RegisterMethod('procedure SELECTALL');
+    RegisterProperty('MODIFIED', 'BOOLEAN', iptrw);
+    RegisterProperty('SELLENGTH', 'INTEGER', iptrw);
+    RegisterProperty('SELSTART', 'INTEGER', iptrw);
+    RegisterProperty('SELTEXT', 'String', iptrw);
+    RegisterProperty('TEXT', 'String', iptrw);
+
+    {$IFNDEF PS_MINIVCL}
+    RegisterMethod('procedure COPYTOCLIPBOARD');
+    RegisterMethod('procedure CUTTOCLIPBOARD');
+    RegisterMethod('procedure PASTEFROMCLIPBOARD');
+    RegisterMethod('function GETSELTEXTBUF(BUFFER:PCHAR;BUFSIZE:INTEGER):INTEGER');
+    RegisterMethod('procedure SETSELTEXTBUF(BUFFER:PCHAR)');
+    {$ENDIF}
+  end;
+end;
+
+
+
+
+procedure SIRegisterTEDIT(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TCUSTOMEDIT'), 'TEDIT') do
+  begin
+    RegisterProperty('AUTOSELECT', 'Boolean', iptrw);
+    RegisterProperty('AUTOSIZE', 'Boolean', iptrw);
+    RegisterProperty('BORDERSTYLE', 'TBorderStyle', iptrw);
+    RegisterProperty('CHARCASE', 'TEditCharCase', iptrw);
+    RegisterProperty('COLOR', 'TColor', iptrw);
+    RegisterProperty('FONT', 'TFont', iptrw);
+    RegisterProperty('HIDESELECTION', 'Boolean', iptrw);
+    RegisterProperty('MAXLENGTH', 'Integer', iptrw);
+    RegisterProperty('PARENTCOLOR', 'Boolean', iptrw);
+    RegisterProperty('PARENTFONT', 'Boolean', iptrw);
+    RegisterProperty('PASSWORDCHAR', 'Char', iptrw);
+    RegisterProperty('READONLY', 'Boolean', iptrw);
+    RegisterProperty('TEXT', 'String', iptrw);
+    RegisterProperty('ONCHANGE', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONCLICK', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONDBLCLICK', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONENTER', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONEXIT', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONKEYDOWN', 'TKeyEvent', iptrw);
+    RegisterProperty('ONKEYPRESS', 'TKeyPressEvent', iptrw);
+    RegisterProperty('ONKEYUP', 'TKeyEvent', iptrw);
+
+    {$IFNDEF PS_MINIVCL}
+    RegisterProperty('CTL3D', 'Boolean', iptrw);
+    RegisterProperty('DRAGCURSOR', 'Longint', iptrw);
+    RegisterProperty('DRAGMODE', 'TDragMode', iptrw);
+    RegisterProperty('OEMCONVERT', 'Boolean', iptrw);
+    RegisterProperty('PARENTCTL3D', 'Boolean', iptrw);
+    RegisterProperty('PARENTSHOWHINT', 'Boolean', iptrw);
+    RegisterProperty('POPUPMENU', 'TPopupMenu', iptrw);
+    RegisterProperty('ONDRAGDROP', 'TDragDropEvent', iptrw);
+    RegisterProperty('ONDRAGOVER', 'TDragOverEvent', iptrw);
+    RegisterProperty('ONENDDRAG', 'TEndDragEvent', iptrw);
+    RegisterProperty('ONMOUSEDOWN', 'TMouseEvent', iptrw);
+    RegisterProperty('ONMOUSEMOVE', 'TMouseMoveEvent', iptrw);
+    RegisterProperty('ONMOUSEUP', 'TMouseEvent', iptrw);
+    RegisterProperty('ONSTARTDRAG', 'TStartDragEvent', iptrw);
+    {$ENDIF}
+  end;
+end;
+
+
+
+
+procedure SIRegisterTCUSTOMMEMO(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TCUSTOMEDIT'), 'TCUSTOMMEMO') do
+  begin
+    {$IFNDEF CLX}
+    RegisterProperty('LINES', 'TSTRINGS', iptrw);
+    {$ENDIF}
+  end;
+end;
+
+
+procedure SIRegisterTMEMO(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TCUSTOMMEMO'), 'TMEMO') do
+  begin
+    {$IFDEF CLX}
+    RegisterProperty('LINES', 'TSTRINGS', iptrw);
+    {$ENDIF}
+    RegisterProperty('ALIGNMENT', 'TAlignment', iptrw);
+    RegisterProperty('BORDERSTYLE', 'TBorderStyle', iptrw);
+    RegisterProperty('COLOR', 'TColor', iptrw);
+    RegisterProperty('FONT', 'TFont', iptrw);
+    RegisterProperty('HIDESELECTION', 'Boolean', iptrw);
+    RegisterProperty('MAXLENGTH', 'Integer', iptrw);
+    RegisterProperty('PARENTCOLOR', 'Boolean', iptrw);
+    RegisterProperty('PARENTFONT', 'Boolean', iptrw);
+    RegisterProperty('READONLY', 'Boolean', iptrw);
+    RegisterProperty('SCROLLBARS', 'TScrollStyle', iptrw);
+    RegisterProperty('WANTRETURNS', 'Boolean', iptrw);
+    RegisterProperty('WANTTABS', 'Boolean', iptrw);
+    RegisterProperty('WORDWRAP', 'Boolean', iptrw);
+    RegisterProperty('ONCHANGE', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONCLICK', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONDBLCLICK', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONENTER', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONEXIT', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONKEYDOWN', 'TKeyEvent', iptrw);
+    RegisterProperty('ONKEYPRESS', 'TKeyPressEvent', iptrw);
+    RegisterProperty('ONKEYUP', 'TKeyEvent', iptrw);
+
+    {$IFNDEF PS_MINIVCL}
+    RegisterProperty('CTL3D', 'Boolean', iptrw);
+    RegisterProperty('DRAGCURSOR', 'Longint', iptrw);
+    RegisterProperty('DRAGMODE', 'TDragMode', iptrw);
+    RegisterProperty('OEMCONVERT', 'Boolean', iptrw);
+    RegisterProperty('PARENTCTL3D', 'Boolean', iptrw);
+    RegisterProperty('PARENTSHOWHINT', 'Boolean', iptrw);
+    RegisterProperty('POPUPMENU', 'TPopupMenu', iptrw);
+    RegisterProperty('ONDRAGDROP', 'TDragDropEvent', iptrw);
+    RegisterProperty('ONDRAGOVER', 'TDragOverEvent', iptrw);
+    RegisterProperty('ONENDDRAG', 'TEndDragEvent', iptrw);
+    RegisterProperty('ONMOUSEDOWN', 'TMouseEvent', iptrw);
+    RegisterProperty('ONMOUSEMOVE', 'TMouseMoveEvent', iptrw);
+    RegisterProperty('ONMOUSEUP', 'TMouseEvent', iptrw);
+    RegisterProperty('ONSTARTDRAG', 'TStartDragEvent', iptrw);
+    {$ENDIF}
+  end;
+end;
+
+
+
+
+
+procedure SIRegisterTCUSTOMCOMBOBOX(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TWINCONTROL'), 'TCUSTOMCOMBOBOX') do
+  begin
+    RegisterProperty('DROPPEDDOWN', 'BOOLEAN', iptrw);
+    RegisterProperty('ITEMS', 'TSTRINGS', iptrw);
+    RegisterProperty('ITEMINDEX', 'INTEGER', iptrw);
+
+    {$IFNDEF PS_MINIVCL}
+    RegisterMethod('procedure CLEAR');
+    RegisterMethod('procedure SELECTALL');
+    RegisterProperty('CANVAS', 'TCANVAS', iptr);
+    RegisterProperty('SELLENGTH', 'INTEGER', iptrw);
+    RegisterProperty('SELSTART', 'INTEGER', iptrw);
+    RegisterProperty('SELTEXT', 'String', iptrw);
+    {$ENDIF}
+  end;
+end;
+
+
+procedure SIRegisterTCOMBOBOX(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TCUSTOMCOMBOBOX'), 'TCOMBOBOX') do
+  begin
+    RegisterProperty('STYLE', 'TComboBoxStyle', iptrw);
+    RegisterProperty('COLOR', 'TColor', iptrw);
+    RegisterProperty('DROPDOWNCOUNT', 'Integer', iptrw);
+    RegisterProperty('FONT', 'TFont', iptrw);
+    RegisterProperty('MAXLENGTH', 'Integer', iptrw);
+    RegisterProperty('PARENTCOLOR', 'Boolean', iptrw);
+    RegisterProperty('PARENTFONT', 'Boolean', iptrw);
+    RegisterProperty('SORTED', 'Boolean', iptrw);
+    RegisterProperty('TEXT', 'String', iptrw);
+    RegisterProperty('ONCHANGE', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONCLICK', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONDBLCLICK', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONDROPDOWN', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONENTER', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONEXIT', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONKEYDOWN', 'TKeyEvent', iptrw);
+    RegisterProperty('ONKEYPRESS', 'TKeyPressEvent', iptrw);
+    RegisterProperty('ONKEYUP', 'TKeyEvent', iptrw);
+
+    {$IFNDEF PS_MINIVCL}
+    RegisterProperty('CTL3D', 'Boolean', iptrw);
+    RegisterProperty('DRAGMODE', 'TDragMode', iptrw);
+    RegisterProperty('DRAGCURSOR', 'Longint', iptrw);
+    RegisterProperty('ITEMHEIGHT', 'Integer', iptrw);
+    RegisterProperty('PARENTCTL3D', 'Boolean', iptrw);
+    RegisterProperty('PARENTSHOWHINT', 'Boolean', iptrw);
+    RegisterProperty('POPUPMENU', 'TPopupMenu', iptrw);
+    RegisterProperty('ONDRAGDROP', 'TDragDropEvent', iptrw);
+    RegisterProperty('ONDRAGOVER', 'TDragOverEvent', iptrw);
+    RegisterProperty('ONDRAWITEM', 'TDrawItemEvent', iptrw);
+    RegisterProperty('ONENDDRAG', 'TEndDragEvent', iptrw);
+    RegisterProperty('ONMEASUREITEM', 'TMeasureItemEvent', iptrw);
+    RegisterProperty('ONSTARTDRAG', 'TStartDragEvent', iptrw);
+    {$ENDIF}
+  end;
+end;
+
+
+
+procedure SIRegisterTBUTTONCONTROL(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TWINCONTROL'), 'TBUTTONCONTROL') do
+  begin
+  end;
+end;
+
+
+
+procedure SIRegisterTBUTTON(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TBUTTONCONTROL'),  'TBUTTON') do
+  begin
+    RegisterProperty('CANCEL', 'BOOLEAN', iptrw);
+    RegisterProperty('CAPTION', 'String', iptrw);
+    RegisterProperty('DEFAULT', 'BOOLEAN', iptrw);
+    RegisterProperty('FONT', 'TFont', iptrw);
+    RegisterProperty('MODALRESULT', 'LONGINT', iptrw);
+    RegisterProperty('PARENTFONT', 'Boolean', iptrw);
+    RegisterProperty('ONCLICK', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONENTER', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONEXIT', 'TNotifyEvent', iptrw);
+
+    {$IFNDEF PS_MINIVCL}
+    RegisterProperty('DRAGCURSOR', 'Longint', iptrw);
+    RegisterProperty('DRAGMODE', 'TDragMode', iptrw);
+    RegisterProperty('PARENTSHOWHINT', 'Boolean', iptrw);
+    RegisterProperty('POPUPMENU', 'TPopupMenu', iptrw);
+    RegisterProperty('ONDRAGDROP', 'TDragDropEvent', iptrw);
+    RegisterProperty('ONDRAGOVER', 'TDragOverEvent', iptrw);
+    RegisterProperty('ONENDDRAG', 'TEndDragEvent', iptrw);
+    RegisterProperty('ONKEYDOWN', 'TKeyEvent', iptrw);
+    RegisterProperty('ONKEYPRESS', 'TKeyPressEvent', iptrw);
+    RegisterProperty('ONKEYUP', 'TKeyEvent', iptrw);
+    RegisterProperty('ONMOUSEDOWN', 'TMouseEvent', iptrw);
+    RegisterProperty('ONMOUSEMOVE', 'TMouseMoveEvent', iptrw);
+    RegisterProperty('ONMOUSEUP', 'TMouseEvent', iptrw);
+    RegisterProperty('ONSTARTDRAG', 'TStartDragEvent', iptrw);
+    {$ENDIF}
+  end;
+end;
+
+
+
+procedure SIRegisterTCUSTOMCHECKBOX(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TBUTTONCONTROL'), 'TCUSTOMCHECKBOX') do
+  begin
+  end;
+end;
+
+
+
+procedure SIRegisterTCHECKBOX(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TCUSTOMCHECKBOX'), 'TCHECKBOX') do
+  begin
+    RegisterProperty('ALIGNMENT', 'TAlignment', iptrw);
+    RegisterProperty('ALLOWGRAYED', 'Boolean', iptrw);
+    RegisterProperty('CAPTION', 'String', iptrw);
+    RegisterProperty('CHECKED', 'Boolean', iptrw);
+    RegisterProperty('COLOR', 'TColor', iptrw);
+    RegisterProperty('FONT', 'TFont', iptrw);
+    RegisterProperty('PARENTCOLOR', 'Boolean', iptrw);
+    RegisterProperty('PARENTFONT', 'Boolean', iptrw);
+    RegisterProperty('STATE', 'TCheckBoxState', iptrw);
+    RegisterProperty('ONCLICK', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONENTER', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONEXIT', 'TNotifyEvent', iptrw);
+
+    {$IFNDEF PS_MINIVCL}
+    RegisterProperty('CTL3D', 'Boolean', iptrw);
+    RegisterProperty('DRAGCURSOR', 'Longint', iptrw);
+    RegisterProperty('DRAGMODE', 'TDragMode', iptrw);
+    RegisterProperty('PARENTCTL3D', 'Boolean', iptrw);
+    RegisterProperty('PARENTSHOWHINT', 'Boolean', iptrw);
+    RegisterProperty('POPUPMENU', 'TPopupMenu', iptrw);
+    RegisterProperty('ONDRAGDROP', 'TDragDropEvent', iptrw);
+    RegisterProperty('ONDRAGOVER', 'TDragOverEvent', iptrw);
+    RegisterProperty('ONENDDRAG', 'TEndDragEvent', iptrw);
+    RegisterProperty('ONKEYDOWN', 'TKeyEvent', iptrw);
+    RegisterProperty('ONKEYPRESS', 'TKeyPressEvent', iptrw);
+    RegisterProperty('ONKEYUP', 'TKeyEvent', iptrw);
+    RegisterProperty('ONMOUSEDOWN', 'TMouseEvent', iptrw);
+    RegisterProperty('ONMOUSEMOVE', 'TMouseMoveEvent', iptrw);
+    RegisterProperty('ONMOUSEUP', 'TMouseEvent', iptrw);
+    RegisterProperty('ONSTARTDRAG', 'TStartDragEvent', iptrw);
+    {$ENDIF}
+  end;
+end;
+
+
+
+
+
+procedure SIRegisterTRADIOBUTTON(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TBUTTONCONTROL'), 'TRADIOBUTTON') do
+  begin
+    RegisterProperty('ALIGNMENT', 'TALIGNMENT', iptrw);
+    RegisterProperty('CAPTION', 'String', iptrw);
+    RegisterProperty('CHECKED', 'BOOLEAN', iptrw);
+    RegisterProperty('COLOR', 'TColor', iptrw);
+    RegisterProperty('FONT', 'TFont', iptrw);
+    RegisterProperty('PARENTCOLOR', 'Boolean', iptrw);
+    RegisterProperty('PARENTFONT', 'Boolean', iptrw);
+    RegisterProperty('ONCLICK', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONDBLCLICK', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONENTER', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONEXIT', 'TNotifyEvent', iptrw);
+
+    {$IFNDEF PS_MINIVCL}
+    RegisterProperty('CTL3D', 'Boolean', iptrw);
+    RegisterProperty('DRAGCURSOR', 'Longint', iptrw);
+    RegisterProperty('DRAGMODE', 'TDragMode', iptrw);
+    RegisterProperty('PARENTCTL3D', 'Boolean', iptrw);
+    RegisterProperty('PARENTSHOWHINT', 'Boolean', iptrw);
+    RegisterProperty('POPUPMENU', 'TPopupMenu', iptrw);
+    RegisterProperty('ONDRAGDROP', 'TDragDropEvent', iptrw);
+    RegisterProperty('ONDRAGOVER', 'TDragOverEvent', iptrw);
+    RegisterProperty('ONENDDRAG', 'TEndDragEvent', iptrw);
+    RegisterProperty('ONKEYDOWN', 'TKeyEvent', iptrw);
+    RegisterProperty('ONKEYPRESS', 'TKeyPressEvent', iptrw);
+    RegisterProperty('ONKEYUP', 'TKeyEvent', iptrw);
+    RegisterProperty('ONMOUSEDOWN', 'TMouseEvent', iptrw);
+    RegisterProperty('ONMOUSEMOVE', 'TMouseMoveEvent', iptrw);
+    RegisterProperty('ONMOUSEUP', 'TMouseEvent', iptrw);
+    RegisterProperty('ONSTARTDRAG', 'TStartDragEvent', iptrw);
+    {$ENDIF}
+  end;
+end;
+
+
+
+procedure SIRegisterTCUSTOMLISTBOX(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TWINCONTROL'), 'TCUSTOMLISTBOX') do
+  begin
+    RegisterProperty('ITEMS', 'TSTRINGS', iptrw);
+    RegisterProperty('ITEMINDEX', 'INTEGER', iptrw);
+    RegisterProperty('SELCOUNT', 'INTEGER', iptr);
+    RegisterProperty('SELECTED', 'BOOLEAN INTEGER', iptrw);
+
+    {$IFNDEF PS_MINIVCL}
+    RegisterMethod('procedure CLEAR');
+    RegisterMethod('function ITEMATPOS(POS:TPOINT;EXISTING:BOOLEAN):INTEGER');
+    RegisterMethod('function ITEMRECT(INDEX:INTEGER):TRECT');
+    RegisterProperty('CANVAS', 'TCANVAS', iptr);
+    RegisterProperty('TOPINDEX', 'INTEGER', iptrw);
+    {$ENDIF}
+  end;
+end;
+
+
+
+procedure SIRegisterTLISTBOX(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TCUSTOMLISTBOX'), 'TLISTBOX') do
+  begin
+    RegisterProperty('BORDERSTYLE', 'TBorderStyle', iptrw);
+    RegisterProperty('COLOR', 'TColor', iptrw);
+    RegisterProperty('FONT', 'TFont', iptrw);
+    RegisterProperty('MULTISELECT', 'Boolean', iptrw);
+    RegisterProperty('PARENTCOLOR', 'Boolean', iptrw);
+    RegisterProperty('PARENTFONT', 'Boolean', iptrw);
+    RegisterProperty('SORTED', 'Boolean', iptrw);
+    RegisterProperty('STYLE', 'TListBoxStyle', iptrw);
+    RegisterProperty('ONCLICK', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONDBLCLICK', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONENTER', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONEXIT', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONKEYDOWN', 'TKeyEvent', iptrw);
+    RegisterProperty('ONKEYPRESS', 'TKeyPressEvent', iptrw);
+    RegisterProperty('ONKEYUP', 'TKeyEvent', iptrw);
+
+    {$IFNDEF PS_MINIVCL}
+    RegisterProperty('COLUMNS', 'Integer', iptrw);
+    RegisterProperty('CTL3D', 'Boolean', iptrw);
+    RegisterProperty('DRAGCURSOR', 'Longint', iptrw);
+    RegisterProperty('DRAGMODE', 'TDragMode', iptrw);
+    RegisterProperty('EXTENDEDSELECT', 'Boolean', iptrw);
+    RegisterProperty('INTEGRALHEIGHT', 'Boolean', iptrw);
+    RegisterProperty('ITEMHEIGHT', 'Integer', iptrw);
+    RegisterProperty('PARENTCTL3D', 'Boolean', iptrw);
+    RegisterProperty('PARENTSHOWHINT', 'Boolean', iptrw);
+    RegisterProperty('POPUPMENU', 'TPopupMenu', iptrw);
+    RegisterProperty('TABWIDTH', 'Integer', iptrw);
+    RegisterProperty('ONDRAGDROP', 'TDragDropEvent', iptrw);
+    RegisterProperty('ONDRAGOVER', 'TDragOverEvent', iptrw);
+    RegisterProperty('ONDRAWITEM', 'TDrawItemEvent', iptrw);
+    RegisterProperty('ONENDDRAG', 'TEndDragEvent', iptrw);
+    RegisterProperty('ONMEASUREITEM', 'TMeasureItemEvent', iptrw);
+    RegisterProperty('ONMOUSEDOWN', 'TMouseEvent', iptrw);
+    RegisterProperty('ONMOUSEMOVE', 'TMouseMoveEvent', iptrw);
+    RegisterProperty('ONMOUSEUP', 'TMouseEvent', iptrw);
+    RegisterProperty('ONSTARTDRAG', 'TStartDragEvent', iptrw);
+    {$ENDIF}
+  end;
+end;
+
+
+
+
+
+
+procedure SIRegisterTSCROLLBAR(Cl: TPSPascalCompiler);
+begin
+  with Cl.AddClassN(cl.FindClass('TWINCONTROL'), 'TSCROLLBAR') do
+  begin
+    RegisterProperty('KIND', 'TSCROLLBARKIND', iptrw);
+    RegisterProperty('MAX', 'INTEGER', iptrw);
+    RegisterProperty('MIN', 'INTEGER', iptrw);
+    RegisterProperty('POSITION', 'INTEGER', iptrw);
+    RegisterProperty('ONCHANGE', 'TNOTIFYEVENT', iptrw);
+    RegisterProperty('ONENTER', 'TNotifyEvent', iptrw);
+    RegisterProperty('ONEXIT', 'TNotifyEvent', iptrw);
+
+    {$IFNDEF PS_MINIVCL}
+    RegisterMethod('procedure SETPARAMS(APOSITION,AMIN,AMAX:INTEGER)');
+    RegisterProperty('CTL3D', 'Boolean', iptrw);
+    RegisterProperty('DRAGCURSOR', 'Longint', iptrw);
+    RegisterProperty('DRAGMODE', 'TDragMode', iptrw);
+    RegisterProperty('LARGECHANGE', 'TSCROLLBARINC', iptrw);
+    RegisterProperty('PARENTCTL3D', 'Boolean', iptrw);
+    RegisterProperty('PARENTSHOWHINT', 'Boolean', iptrw);
+    RegisterProperty('POPUPMENU', 'TPopupMenu', iptrw);
+    RegisterProperty('SMALLCHANGE', 'TSCROLLBARINC', iptrw);
+    RegisterProperty('ONDRAGDROP', 'TDragDropEvent', iptrw);
+    RegisterProperty('ONDRAGOVER', 'TDragOverEvent', iptrw);
+    RegisterProperty('ONENDDRAG', 'TEndDragEvent', iptrw);
+    RegisterProperty('ONKEYDOWN', 'TKeyEvent', iptrw);
+    RegisterProperty('ONKEYPRESS', 'TKeyPressEvent', iptrw);
+    RegisterProperty('ONKEYUP', 'TKeyEvent', iptrw);
+    RegisterProperty('ONSCROLL', 'TSCROLLEVENT', iptrw);
+    RegisterProperty('ONSTARTDRAG', 'TStartDragEvent', iptrw);
+    {$ENDIF}
+  end;
+end;
+
+
+
+procedure SIRegister_StdCtrls_TypesAndConsts(cl: TPSPascalCompiler);
+begin
+  cl.AddTypeS('TEditCharCase', '(ecNormal, ecUpperCase, ecLowerCase)');
+  cl.AddTypeS('TScrollStyle', '(ssNone, ssHorizontal, ssVertical, ssBoth)');
+  cl.AddTypeS('TComboBoxStyle', '(csDropDown, csSimple, csDropDownList, csOwnerDrawFixed, csOwnerDrawVariable)');
+  cl.AddTypeS('TDrawItemEvent', 'procedure(Control: TWinControl; Index: Integer; Rect: TRect; State: Byte)');
+  cl.AddTypeS('TMeasureItemEvent', 'procedure(Control: TWinControl; Index: Integer; var Height: Integer)');
+  cl.AddTypeS('TCheckBoxState', '(cbUnchecked, cbChecked, cbGrayed)');
+  cl.AddTypeS('TListBoxStyle', '(lbStandard, lbOwnerDrawFixed, lbOwnerDrawVariable)');
+  cl.AddTypeS('TScrollCode', '(scLineUp, scLineDown, scPageUp, scPageDown, scPosition, scTrack, scTop, scBottom, scEndScroll)');
+  cl.AddTypeS('TScrollEvent', 'procedure(Sender: TObject; ScrollCode: TScrollCode;var ScrollPos: Integer)');
+
+  Cl.addTypeS('TEOwnerDrawState', '(odSelected, odGrayed, odDisabled, odChecked,'
+    +' odFocused, odDefault, odHotLight, odInactive, odNoAccel, odNoFocusRect,'
+    +' odReserved1, odReserved2, odComboBoxEdit)');
+  cl.AddTypeS('TTextLayout', '( tlTop, tlCenter, tlBottom )');
+  cl.AddTypeS('TOwnerDrawState', 'set of TEOwnerDrawState');
+end;
+
+
+procedure SIRegister_stdctrls(cl: TPSPascalCompiler);
+begin
+  SIRegister_StdCtrls_TypesAndConsts(cl);
+  {$IFNDEF PS_MINIVCL}
+  SIRegisterTCUSTOMGROUPBOX(Cl);
+  SIRegisterTGROUPBOX(Cl);
+  {$ENDIF}
+  SIRegisterTCUSTOMLABEL(Cl);
+  SIRegisterTLABEL(Cl);
+  SIRegisterTCUSTOMEDIT(Cl);
+  SIRegisterTEDIT(Cl);
+  SIRegisterTCUSTOMMEMO(Cl);
+  SIRegisterTMEMO(Cl);
+  SIRegisterTCUSTOMCOMBOBOX(Cl);
+  SIRegisterTCOMBOBOX(Cl);
+  SIRegisterTBUTTONCONTROL(Cl);
+  SIRegisterTBUTTON(Cl);
+  SIRegisterTCUSTOMCHECKBOX(Cl);
+  SIRegisterTCHECKBOX(Cl);
+  SIRegisterTRADIOBUTTON(Cl);
+  SIRegisterTCUSTOMLISTBOX(Cl);
+  SIRegisterTLISTBOX(Cl);
+  {$IFNDEF PS_MINIVCL}
+  SIRegisterTSCROLLBAR(Cl);
+  {$ENDIF}
+end;
+
+// PS_MINIVCL changes by Martijn Laan (mlaan at wintax _dot_ nl)
+
+
+end.
+
+
+
+
+
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSCompiler.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSCompiler.pas
new file mode 100644
index 0000000..3eb96ca
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSCompiler.pas	
@@ -0,0 +1,15188 @@
+unit uPSCompiler;
+{$I PascalScript.inc}
+interface
+uses
+  {$IFNDEF DELPHI3UP}{$IFNDEF PS_NOINTERFACES}{$IFNDEF LINUX}Windows, Ole2,{$ENDIF}
+  {$ENDIF}{$ENDIF}SysUtils, uPSUtils;
+
+
+type
+{$IFNDEF PS_NOINTERFACES}
+  TPSInterface = class;
+{$ENDIF}
+
+  TPSParameterMode = (pmIn, pmOut, pmInOut);
+  TPSPascalCompiler = class;
+  TPSType = class;
+  TPSValue = class;
+  TPSParameters = class;
+
+  TPSSubOptType = (tMainBegin, tProcBegin, tSubBegin, tOneLiner, tifOneliner, tRepeat, tTry, tTryEnd
+    {$IFDEF PS_USESSUPPORT},tUnitInit, tUnitFinish {$ENDIF}); //nvds
+
+
+  {TPSExternalClass is used when external classes need to be called}
+  TPSCompileTimeClass = class;
+  TPSAttributes = class;
+  TPSAttribute = class;
+
+  EPSCompilerException = class(Exception) end;
+
+  TPSParameterDecl = class(TObject)
+  private
+    FName: tbtString;
+    FOrgName: tbtString;
+    FMode: TPSParameterMode;
+    FType: TPSType;
+    {$IFDEF PS_USESSUPPORT}
+    FDeclareUnit: tbtString;
+    {$ENDIF}
+    FDeclarePos: Cardinal;
+    FDeclareRow: Cardinal;
+    FDeclareCol: Cardinal;
+    procedure SetName(const s: tbtString);
+  public
+
+    property Name: tbtString read FName;
+
+    property OrgName: tbtString read FOrgName write SetName;
+
+    property aType: TPSType read FType write FType;
+
+    property Mode: TPSParameterMode read FMode write FMode;
+
+    {$IFDEF PS_USESSUPPORT}
+    property DeclareUnit: tbtString read FDeclareUnit write FDeclareUnit;
+    {$ENDIF}
+
+    property DeclarePos: Cardinal read FDeclarePos write FDeclarePos;
+
+    property DeclareRow: Cardinal read FDeclareRow write FDeclareRow;
+
+    property DeclareCol: Cardinal read FDeclareCol write FDeclareCol;
+
+  end;
+
+
+  TPSParametersDecl = class(TObject)
+  private
+    FParams: TPSList;
+    FResult: TPSType;
+    function GetParam(I: Longint): TPSParameterDecl;
+    function GetParamCount: Longint;
+  public
+
+    property Params[I: Longint]: TPSParameterDecl read GetParam;
+
+    property ParamCount: Longint read GetParamCount;
+
+
+    function AddParam: TPSParameterDecl;
+
+    procedure DeleteParam(I: Longint);
+
+
+    property Result : TPSType read FResult write FResult;
+
+
+    procedure Assign(Params: TPSParametersDecl);
+
+
+    function Same(d: TPSParametersDecl): boolean;
+
+
+    constructor Create;
+
+    destructor Destroy; override;
+  end;
+
+
+  TPSRegProc = class(TObject)
+  private
+    FNameHash: Longint;
+    FName: tbtString;
+    FDecl: TPSParametersDecl;
+    FExportName: Boolean;
+    FImportDecl: tbtString;
+    FOrgName: tbtString;
+    procedure SetName(const Value: tbtString);
+  public
+
+    property OrgName: tbtString read FOrgName write FOrgName;
+	
+    property Name: tbtString read FName write SetName;
+
+    property NameHash: Longint read FNameHash;
+	
+    property Decl: TPSParametersDecl read FDecl;
+	
+    property ExportName: Boolean read FExportName write FExportName;
+	
+    property ImportDecl: tbtString read FImportDecl write FImportDecl;
+
+
+    constructor Create;
+
+    destructor Destroy; override;
+  end;
+
+  PIFPSRegProc = TPSRegProc;
+
+  PIfRVariant = ^TIfRVariant;
+
+  TIfRVariant = record
+
+    FType: TPSType;
+    case Byte of
+      1: (tu8: TbtU8);
+      2: (tS8: TbtS8);
+      3: (tu16: TbtU16);
+      4: (ts16: TbtS16);
+      5: (tu32: TbtU32);
+      6: (ts32: TbtS32);
+      7: (tsingle: TbtSingle);
+      8: (tdouble: TbtDouble);
+      9: (textended: TbtExtended);
+      11: (tcurrency: tbtCurrency);
+      10: (tstring: Pointer);
+      {$IFNDEF PS_NOINT64}
+      17: (ts64: Tbts64);
+      {$ENDIF}
+      19: (tchar: tbtChar);
+      {$IFNDEF PS_NOWIDESTRING}
+      18: (twidestring: Pointer);
+      20: (twidechar: tbtwidechar);
+      {$ENDIF}
+      21: (ttype: TPSType);
+  end;
+
+  TPSRecordFieldTypeDef = class(TObject)
+  private
+    FFieldOrgName: tbtString;
+    FFieldName: tbtString;
+    FFieldNameHash: Longint;
+    FType: TPSType;
+    procedure SetFieldOrgName(const Value: tbtString);
+  public
+
+    property FieldOrgName: tbtString read FFieldOrgName write SetFieldOrgName;
+
+    property FieldName: tbtString read FFieldName;
+
+    property FieldNameHash: Longint read FFieldNameHash;
+
+    property aType: TPSType read FType write FType;
+  end;
+
+  PIFPSRecordFieldTypeDef = TPSRecordFieldTypeDef;
+
+  TPSType = class(TObject)
+  private
+    FNameHash: Longint;
+    FName: tbtString;
+    FBaseType: TPSBaseType;
+    {$IFDEF PS_USESSUPPORT}
+    FDeclareUnit: tbtString;
+    {$ENDIF}
+    FDeclarePos: Cardinal;
+    FDeclareRow: Cardinal;
+    FDeclareCol: Cardinal;
+    FUsed: Boolean;
+    FExportName: Boolean;
+    FOriginalName: tbtString;
+    FAttributes: TPSAttributes;
+    FFinalTypeNo: cardinal;
+    procedure SetName(const Value: tbtString);
+  public
+
+    constructor Create;
+
+    destructor Destroy; override;
+
+    property Attributes: TPSAttributes read FAttributes;
+
+
+    property FinalTypeNo: cardinal read FFinalTypeNo;
+
+
+    property OriginalName: tbtString read FOriginalName write FOriginalName;
+
+    property Name: tbtString read FName write SetName;
+
+    property NameHash: Longint read FNameHash;
+
+    property BaseType: TPSBaseType read FBaseType write FBaseType;
+
+    {$IFDEF PS_USESSUPPORT}
+    property DeclareUnit: tbtString read FDeclareUnit write FDeclareUnit;
+    {$ENDIF}
+
+    property DeclarePos: Cardinal read FDeclarePos write FDeclarePos;
+
+    property DeclareRow: Cardinal read FDeclareRow write FDeclareRow;
+
+    property DeclareCol: Cardinal read FDeclareCol write FDeclareCol;
+
+    property Used: Boolean read FUsed;
+
+    property ExportName: Boolean read FExportName write FExportName;
+
+    procedure Use;
+  end;
+
+
+  PIFPSType = TPSType;
+
+  TPSVariantType = class(TPSType)
+  private
+  public
+    function GetDynInvokeProcNo(Owner: TPSPascalCompiler; const Name: tbtString; Params: TPSParameters): Cardinal; virtual;
+    function GetDynIvokeSelfType(Owner: TPSPascalCompiler): TPSType; virtual;
+    function GetDynInvokeParamType(Owner: TPSPascalCompiler): TPSType; virtual;
+    function GetDynIvokeResulType(Owner: TPSPascalCompiler): TPSType; virtual;
+  end;
+
+
+  TPSRecordType = class(TPSType)
+  private
+    FRecordSubVals: TPSList;
+  public
+
+    constructor Create;
+
+    destructor Destroy; override;
+
+    function RecValCount: Longint;
+
+    function RecVal(I: Longint): PIFPSRecordFieldTypeDef;
+
+    function AddRecVal: PIFPSRecordFieldTypeDef;
+  end;
+
+  TPSClassType = class(TPSType)
+  private
+    FCL: TPSCompiletimeClass;
+  public
+
+    property Cl: TPSCompileTimeClass read FCL write FCL;
+  end;
+  TPSExternalClass = class;
+  TPSUndefinedClassType = class(TPSType)
+  private
+    FExtClass: TPSExternalClass;
+  public
+    property ExtClass: TPSExternalClass read FExtClass write FExtClass;
+  end;
+{$IFNDEF PS_NOINTERFACES}
+
+  TPSInterfaceType = class(TPSType)
+  private
+    FIntf: TPSInterface;
+  public
+
+    property Intf: TPSInterface read FIntf write FIntf;
+  end;
+{$ENDIF}
+
+
+  TPSProceduralType = class(TPSType)
+  private
+    FProcDef: TPSParametersDecl;
+  public
+
+    property ProcDef: TPSParametersDecl read FProcDef;
+
+    constructor Create;
+
+    destructor Destroy; override;
+  end;
+
+  TPSArrayType = class(TPSType)
+  private
+    FArrayTypeNo: TPSType;
+  public
+
+    property ArrayTypeNo: TPSType read FArrayTypeNo write FArrayTypeNo;
+  end;
+
+  TPSStaticArrayType = class(TPSArrayType)
+  private
+    FStartOffset: Longint;
+    FLength: Cardinal;
+  public
+
+    property StartOffset: Longint read FStartOffset write FStartOffset;
+
+    property Length: Cardinal read FLength write FLength;
+  end;
+
+  TPSSetType = class(TPSType)
+  private
+    FSetType: TPSType;
+    function GetByteSize: Longint;
+    function GetBitSize: Longint;
+  public
+
+    property SetType: TPSType read FSetType write FSetType;
+
+    property ByteSize: Longint read GetByteSize;
+
+    property BitSize: Longint read GetBitSize;
+  end;
+
+  TPSTypeLink = class(TPSType)
+  private
+    FLinkTypeNo: TPSType;
+  public
+
+    property LinkTypeNo: TPSType read FLinkTypeNo write FLinkTypeNo;
+  end;
+
+  TPSEnumType = class(TPSType)
+  private
+    FHighValue: Cardinal;
+  public
+
+    property HighValue: Cardinal read FHighValue write FHighValue;
+  end;
+
+
+  TPSProcedure = class(TObject)
+  private
+    FAttributes: TPSAttributes;
+  public
+
+    property Attributes: TPSAttributes read FAttributes;
+
+
+    constructor Create;
+
+    destructor Destroy; override;
+  end;
+
+  TPSAttributeType = class;
+
+  TPSAttributeTypeField = class(TObject)
+  private
+    FOwner: TPSAttributeType;
+    FFieldOrgName: tbtString;
+    FFieldName: tbtString;
+    FFieldNameHash: Longint;
+    FFieldType: TPSType;
+    FHidden: Boolean;
+    procedure SetFieldOrgName(const Value: tbtString);
+  public
+
+    constructor Create(AOwner: TPSAttributeType);
+
+    property Owner: TPSAttributeType read FOwner;
+
+    property FieldOrgName: tbtString read FFieldOrgName write SetFieldOrgName;
+
+    property FieldName: tbtString read FFieldName;
+
+    property FieldNameHash: Longint read FFieldNameHash;
+
+    property FieldType: TPSType read FFieldType write FFieldType;
+
+    property Hidden: Boolean read FHidden write FHidden;
+  end;
+
+  TPSApplyAttributeToType = function (Sender: TPSPascalCompiler; aType: TPSType; Attr: TPSAttribute): Boolean;
+
+  TPSApplyAttributeToProc = function (Sender: TPSPascalCompiler; aProc: TPSProcedure; Attr: TPSAttribute): Boolean;
+  { An attribute type }
+  TPSAttributeType = class(TPSType)
+  private
+    FFields: TPSList;
+    FName: tbtString;
+    FOrgname: tbtString;
+    FNameHash: Longint;
+    FAAProc: TPSApplyAttributeToProc;
+    FAAType: TPSApplyAttributeToType;
+    function GetField(I: Longint): TPSAttributeTypeField;
+    function GetFieldCount: Longint;
+    procedure SetName(const s: tbtString);
+  public
+
+    property OnApplyAttributeToType: TPSApplyAttributeToType read FAAType write FAAType;
+
+    property OnApplyAttributeToProc: TPSApplyAttributeToProc read FAAProc write FAAProc;
+
+    property Fields[i: Longint]: TPSAttributeTypeField read GetField;
+
+    property FieldCount: Longint read GetFieldCount;
+
+    procedure DeleteField(I: Longint);
+
+    function AddField: TPSAttributeTypeField;
+
+    property Name: tbtString read FName;
+
+    property OrgName: tbtString read FOrgName write SetName;
+
+    property NameHash: Longint read FNameHash;
+
+    constructor Create;
+
+    destructor Destroy; override;
+  end;
+
+  TPSAttribute = class(TObject)
+  private
+    FAttribType: TPSAttributeType;
+    FValues: TPSList;
+    function GetValueCount: Longint;
+    function GetValue(I: Longint): PIfRVariant;
+  public
+
+    constructor Create(AttribType: TPSAttributeType);
+
+    procedure Assign(Item: TPSAttribute);
+
+    property AType: TPSAttributeType read FAttribType;
+
+    property Count: Longint read GetValueCount;
+
+    property Values[i: Longint]: PIfRVariant read GetValue; default;
+
+    procedure DeleteValue(i: Longint);
+
+    function AddValue(v: PIFRVariant): Longint;
+
+    destructor Destroy; override;
+  end;
+
+
+  TPSAttributes = class(TObject)
+  private
+    FItems: TPSList;
+    function GetCount: Longint;
+    function GetItem(I: Longint): TPSAttribute;
+  public
+
+    procedure Assign(attr: TPSAttributes; Move: Boolean);
+
+    property Count: Longint read GetCount;
+
+    property Items[i: Longint]: TPSAttribute read GetItem; default;
+
+    procedure Delete(i: Longint);
+
+    function Add(AttribType: TPSAttributeType): TPSAttribute;
+
+    function FindAttribute(const Name: tbtString): TPSAttribute;
+
+    constructor Create;
+
+    destructor Destroy; override;
+  end;
+
+
+  TPSProcVar = class(TObject)
+  private
+    FNameHash: Longint;
+    FName: tbtString;
+    FOrgName: tbtString;
+    FType: TPSType;
+    FUsed: Boolean;
+    {$IFDEF PS_USESSUPPORT}
+    FDeclareUnit: tbtString;
+    {$ENDIF}
+    FDeclarePos, FDeclareRow, FDeclareCol: Cardinal;
+    procedure SetName(const Value: tbtString);
+  public
+
+    property OrgName: tbtString read FOrgName write FOrgname;
+
+    property NameHash: Longint read FNameHash;
+
+    property Name: tbtString read FName write SetName;
+
+    property AType: TPSType read FType write FType;
+
+    property Used: Boolean read FUsed;
+
+    {$IFDEF PS_USESSUPPORT}
+    property DeclareUnit: tbtString read FDeclareUnit write FDeclareUnit;
+    {$ENDIF}
+
+    property DeclarePos: Cardinal read FDeclarePos write FDeclarePos;
+
+    property DeclareRow: Cardinal read FDeclareRow write FDeclareRow;
+
+    property DeclareCol: Cardinal read FDeclareCol write FDeclareCol;
+
+    procedure Use;
+  end;
+
+  PIFPSProcVar = TPSProcVar;
+
+  TPSExternalProcedure = class(TPSProcedure)
+  private
+    FRegProc: TPSRegProc;
+  public
+
+    property RegProc: TPSRegProc read FRegProc write FRegProc;
+  end;
+
+
+  TPSInternalProcedure = class(TPSProcedure)
+  private
+    FForwarded: Boolean;
+    FData: tbtString;
+    FNameHash: Longint;
+    FName: tbtString;
+    FDecl: TPSParametersDecl;
+    FProcVars: TPSList;
+    FUsed: Boolean;
+    FOutputDeclPosition: Cardinal;
+    FResultUsed: Boolean;
+    FLabels: TIfStringList;
+    FGotos: TIfStringList;
+    FDeclareRow: Cardinal;
+    {$IFDEF PS_USESSUPPORT}
+    FDeclareUnit: tbtString;
+    {$ENDIF}
+    FDeclarePos: Cardinal;
+    FDeclareCol: Cardinal;
+    FOriginalName: tbtString;
+    procedure SetName(const Value: tbtString);
+  public
+
+    constructor Create;
+
+    destructor Destroy; override;
+    {Attributes}
+
+
+    property Forwarded: Boolean read FForwarded write FForwarded;
+
+    property Data: tbtString read FData write FData;
+
+    property Decl: TPSParametersDecl read FDecl;
+
+    property OriginalName: tbtString read FOriginalName write FOriginalName;
+
+    property Name: tbtString read FName write SetName;
+
+    property NameHash: Longint read FNameHash;
+
+    property ProcVars: TPSList read FProcVars;
+
+    property Used: Boolean read FUsed;
+
+    {$IFDEF PS_USESSUPPORT}
+    property DeclareUnit: tbtString read FDeclareUnit write FDeclareUnit;
+    {$ENDIF}
+
+    property DeclarePos: Cardinal read FDeclarePos write FDeclarePos;
+
+    property DeclareRow: Cardinal read FDeclareRow write FDeclareRow;
+
+    property DeclareCol: Cardinal read FDeclareCol write FDeclareCol;
+
+    property OutputDeclPosition: Cardinal read FOutputDeclPosition write FOutputDeclPosition;
+
+    property ResultUsed: Boolean read FResultUsed;
+
+
+    property Labels: TIfStringList read FLabels;
+
+    property Gotos: TIfStringList read FGotos;
+
+    procedure Use;
+
+    procedure ResultUse;
+  end;
+
+  TPSVar = class(TObject)
+  private
+    FNameHash: Longint;
+    FOrgName: tbtString;
+    FName: tbtString;
+    FType: TPSType;
+    FUsed: Boolean;
+    FExportName: tbtString;
+    FDeclareRow: Cardinal;
+    {$IFDEF PS_USESSUPPORT}
+    FDeclareUnit: tbtString;
+    {$ENDIF}
+    FDeclarePos: Cardinal;
+    FDeclareCol: Cardinal;
+    FSaveAsPointer: Boolean;
+    procedure SetName(const Value: tbtString);
+  public
+
+    property SaveAsPointer: Boolean read FSaveAsPointer write FSaveAsPointer;
+
+    property ExportName: tbtString read FExportName write FExportName;
+
+    property Used: Boolean read FUsed;
+
+    property aType: TPSType read FType write FType;
+
+    property OrgName: tbtString read FOrgName write FOrgName;
+
+    property Name: tbtString read FName write SetName;
+
+    property NameHash: Longint read FNameHash;
+
+    {$IFDEF PS_USESSUPPORT}
+    property DeclareUnit: tbtString read FDeclareUnit write FDeclareUnit;
+    {$ENDIF}
+
+    property DeclarePos: Cardinal read FDeclarePos write FDeclarePos;
+
+    property DeclareRow: Cardinal read FDeclareRow write FDeclareRow;
+
+    property DeclareCol: Cardinal read FDeclareCol write FDeclareCol;
+
+    procedure Use;
+  end;
+
+  PIFPSVar = TPSVar;
+
+  TPSConstant = class(TObject)
+
+    FOrgName: tbtString;
+
+    FNameHash: Longint;
+
+    FName: tbtString;
+
+    FDeclareRow: Cardinal;
+    {$IFDEF PS_USESSUPPORT}
+    FDeclareUnit: tbtString;
+    {$ENDIF}
+    FDeclarePos: Cardinal;
+    FDeclareCol: Cardinal;
+
+    FValue: PIfRVariant;
+  private
+    procedure SetName(const Value: tbtString);
+  public
+
+    property OrgName: tbtString read FOrgName write FOrgName;
+
+    property Name: tbtString read FName write SetName;
+
+    property NameHash: Longint read FNameHash;
+
+    property Value: PIfRVariant read FValue write FValue;
+
+    {$IFDEF PS_USESSUPPORT}
+    property DeclareUnit: tbtString read FDeclareUnit write FDeclareUnit;
+    {$ENDIF}
+
+    property DeclarePos: Cardinal read FDeclarePos write FDeclarePos;
+
+    property DeclareRow: Cardinal read FDeclareRow write FDeclareRow;
+
+    property DeclareCol: Cardinal read FDeclareCol write FDeclareCol;
+
+
+    procedure SetSet(const val);
+
+
+    procedure SetInt(const Val: Longint);
+
+    procedure SetUInt(const Val: Cardinal);
+    {$IFNDEF PS_NOINT64}
+
+    procedure SetInt64(const Val: Int64);
+    {$ENDIF}
+
+    procedure SetString(const Val: tbtString);
+
+    procedure SetChar(c: tbtChar);
+    {$IFNDEF PS_NOWIDESTRING}
+
+    procedure SetWideChar(const val: WideChar);
+
+    procedure SetWideString(const val: tbtwidestring);
+    {$ENDIF}
+
+    procedure SetExtended(const Val: Extended);
+
+
+    destructor Destroy; override;
+  end;
+
+  PIFPSConstant = TPSConstant;
+
+  TPSPascalCompilerErrorType = (
+    ecUnknownIdentifier,
+    ecIdentifierExpected,
+    ecCommentError,
+    ecStringError,
+    ecCharError,
+    ecSyntaxError,
+    ecUnexpectedEndOfFile,
+    ecSemicolonExpected,
+    ecBeginExpected,
+    ecPeriodExpected,
+    ecDuplicateIdentifier,
+    ecColonExpected,
+    ecUnknownType,
+    ecCloseRoundExpected,
+    ecTypeMismatch,
+    ecInternalError,
+    ecAssignmentExpected,
+    ecThenExpected,
+    ecDoExpected,
+    ecNoResult,
+    ecOpenRoundExpected,
+    ecCommaExpected,
+    ecToExpected,
+    ecIsExpected,
+    ecOfExpected,
+    ecCloseBlockExpected,
+    ecVariableExpected,
+    ecStringExpected,
+    ecEndExpected,
+    ecUnSetLabel,
+    ecNotInLoop,
+    ecInvalidJump,
+    ecOpenBlockExpected,
+    ecWriteOnlyProperty,
+    ecReadOnlyProperty,
+    ecClassTypeExpected,
+    ecCustomError,
+    ecDivideByZero,
+    ecMathError,
+    ecUnsatisfiedForward,
+    ecForwardParameterMismatch,
+    ecInvalidnumberOfParameters
+    {$IFDEF PS_USESSUPPORT}
+    , ecNotAllowed,
+    ecUnitNotFoundOrContainsErrors
+    {$ENDIF}
+    );
+
+  TPSPascalCompilerHintType = (
+    ehVariableNotUsed,
+    ehFunctionNotUsed,
+    ehCustomHint
+    );
+
+  TPSPascalCompilerWarningType = (
+    ewCalculationAlwaysEvaluatesTo,
+    ewIsNotNeeded,
+    ewAbstractClass,
+    ewCustomWarning
+  );
+
+  TPSPascalCompilerMessage = class(TObject)
+  protected
+
+    FRow: Cardinal;
+
+    FCol: Cardinal;
+
+    FModuleName: tbtString;
+
+    FParam: tbtString;
+
+    FPosition: Cardinal;
+
+    procedure SetParserPos(Parser: TPSPascalParser);
+  public
+
+    property ModuleName: tbtString read FModuleName write FModuleName;
+
+    property Param: tbtString read FParam write FParam;
+
+    property Pos: Cardinal read FPosition write FPosition;
+
+    property Row: Cardinal read FRow write FRow;
+
+    property Col: Cardinal read FCol write FCol;
+
+    function ErrorType: tbtString; virtual; abstract;
+
+    procedure SetCustomPos(Pos, Row, Col: Cardinal);
+
+    function MessageToString: tbtString; virtual;
+
+    function ShortMessageToString: tbtString; virtual; abstract;
+  end;
+
+  TPSPascalCompilerError = class(TPSPascalCompilerMessage)
+  protected
+
+    FError: TPSPascalCompilerErrorType;
+  public
+
+    property Error: TPSPascalCompilerErrorType read FError;
+
+    function ErrorType: tbtString; override;
+    function ShortMessageToString: tbtString; override;
+  end;
+
+  TPSPascalCompilerHint = class(TPSPascalCompilerMessage)
+  protected
+
+    FHint: TPSPascalCompilerHintType;
+  public
+
+    property Hint: TPSPascalCompilerHintType read FHint;
+
+    function ErrorType: tbtString; override;
+    function ShortMessageToString: tbtString; override;
+  end;
+
+  TPSPascalCompilerWarning = class(TPSPascalCompilerMessage)
+  protected
+
+    FWarning: TPSPascalCompilerWarningType;
+  public
+
+    property Warning: TPSPascalCompilerWarningType read FWarning;
+
+    function ErrorType: tbtString; override;
+    function ShortMessageToString: tbtString; override;
+  end;
+  TPSDuplicCheck = set of (dcTypes, dcProcs, dcVars, dcConsts);
+
+  TPSBlockInfo = class(TObject)
+  private
+    FOwner: TPSBlockInfo;
+    FWithList: TPSList;
+    FProcNo: Cardinal;
+    FProc: TPSInternalProcedure;
+    FSubType: TPSSubOptType;
+  public
+
+    property WithList: TPSList read FWithList;
+
+    property ProcNo: Cardinal read FProcNo write FProcNo;
+
+    property Proc: TPSInternalProcedure read FProc write FProc;
+
+    property SubType: TPSSubOptType read FSubType write FSubType;
+
+    procedure Clear;
+
+    constructor Create(Owner: TPSBlockInfo);
+
+    destructor Destroy; override;
+  end;
+
+
+
+  TPSBinOperatorType = (otAdd, otSub, otMul, otDiv, otMod, otShl, otShr, otAnd, otOr, otXor, otAs,
+                          otGreaterEqual, otLessEqual, otGreater, otLess, otEqual,
+                          otNotEqual, otIs, otIn);
+
+  TPSUnOperatorType = (otNot, otMinus, otCast);
+
+  TPSOnUseVariable = procedure (Sender: TPSPascalCompiler; VarType: TPSVariableType; VarNo: Longint; ProcNo, Position: Cardinal; const PropData: tbtString);
+
+  TPSOnUses = function(Sender: TPSPascalCompiler; const Name: tbtString): Boolean;
+
+  TPSOnExportCheck = function(Sender: TPSPascalCompiler; Proc: TPSInternalProcedure; const ProcDecl: tbtString): Boolean;
+
+  {$IFNDEF PS_USESSUPPORT}
+  TPSOnWriteLineEvent = function (Sender: TPSPascalCompiler; Position: Cardinal): Boolean;
+  {$ELSE}
+  TPSOnWriteLineEvent = function (Sender: TPSPascalCompiler; FileName: tbtString; Position: Cardinal): Boolean;
+  {$ENDIF}
+
+  TPSOnExternalProc = function (Sender: TPSPascalCompiler; Decl: TPSParametersDecl; const Name, FExternal: tbtString): TPSRegProc;
+
+  TPSOnTranslateLineInfoProc = procedure (Sender: TPSPascalCompiler; var Pos, Row, Col: Cardinal; var Name: tbtString);
+  TPSOnNotify = function (Sender: TPSPascalCompiler): Boolean;
+
+  TPSOnFunction = procedure(name: tbtString; Pos, Row, Col: Integer) of object;
+
+
+  TPSPascalCompiler = class
+  protected
+    FAnyString: TPSType;
+    FUnitName: tbtString;
+    FID: Pointer;
+    FOnExportCheck: TPSOnExportCheck;
+    FDefaultBoolType: TPSType;
+    FRegProcs: TPSList;
+    FConstants: TPSList;
+    FProcs: TPSList;
+    FTypes: TPSList;
+    FAttributeTypes: TPSList;
+    FVars: TPSList;
+    FOutput: tbtString;
+    FParser: TPSPascalParser;
+    FParserHadError: Boolean;
+    FMessages: TPSList;
+    FOnUses: TPSOnUses;
+    FUtf8Decode: Boolean;
+    FIsUnit: Boolean;
+    FAllowNoBegin: Boolean;
+    FAllowNoEnd: Boolean;
+    FAllowUnit: Boolean;
+    FBooleanShortCircuit: Boolean;
+    FDebugOutput: tbtString;
+    FOnExternalProc: TPSOnExternalProc;
+    FOnUseVariable: TPSOnUseVariable;
+    FOnBeforeOutput: TPSOnNotify;
+    FOnBeforeCleanup: TPSOnNotify;
+    FOnWriteLine: TPSOnWriteLineEvent;
+    FContinueOffsets, FBreakOffsets: TPSList;
+    FOnTranslateLineInfo: TPSOnTranslateLineInfoProc;
+    FAutoFreeList: TPSList;
+    FClasses: TPSList;
+    FOnFunctionStart: TPSOnFunction;
+    FOnFunctionEnd: TPSOnFunction;
+
+
+		FWithCount: Integer;
+		FTryCount: Integer;
+    FExceptFinallyCount: Integer;
+
+
+    {$IFDEF PS_USESSUPPORT}
+    FUnitInits : TPSList; //nvds
+    FUnitFinits: TPSList; //nvds
+    FUses      : TIFStringList;
+    fModule    : tbtString;
+    {$ENDIF}
+    fInCompile : Integer;
+{$IFNDEF PS_NOINTERFACES}
+    FInterfaces: TPSList;
+{$ENDIF}
+
+    FCurrUsedTypeNo: Cardinal;
+    FGlobalBlock: TPSBlockInfo;
+
+    function IsBoolean(aType: TPSType): Boolean;
+    {$IFNDEF PS_NOWIDESTRING}
+
+    function GetWideString(Src: PIfRVariant; var s: Boolean): tbtwidestring;
+    {$ENDIF}
+    function PreCalc(FUseUsedTypes: Boolean; Var1Mod: Byte; var1: PIFRVariant; Var2Mod: Byte;
+      Var2: PIfRVariant; Cmd: TPSBinOperatorType; Pos, Row, Col: Cardinal): Boolean;
+
+    function FindBaseType(BaseType: TPSBaseType): TPSType;
+
+    function IsIntBoolType(aType: TPSType): Boolean;
+    function GetTypeCopyLink(p: TPSType): TPSType;
+
+    function at2ut(p: TPSType): TPSType;
+    procedure UseProc(procdecl: TPSParametersDecl);
+
+
+    function GetMsgCount: Longint;
+
+    function GetMsg(l: Longint): TPSPascalCompilerMessage;
+
+
+    function MakeExportDecl(decl: TPSParametersDecl): tbtString;
+
+
+    procedure DefineStandardTypes;
+
+    procedure DefineStandardProcedures;
+
+    function ReadReal(const s: tbtString): PIfRVariant;
+    function ReadString: PIfRVariant;
+    function ReadInteger(const s: tbtString): PIfRVariant;
+    function ReadAttributes(Dest: TPSAttributes): Boolean;
+    function ReadConstant(FParser: TPSPascalParser; StopOn: TPSPasToken): PIfRVariant;
+
+    function ApplyAttribsToFunction(func: TPSProcedure): boolean;
+    function ProcessFunction(AlwaysForward: Boolean; Att: TPSAttributes): Boolean;
+    function ValidateParameters(BlockInfo: TPSBlockInfo; Params: TPSParameters; ParamTypes: TPSParametersDecl): boolean;
+
+    function IsVarInCompatible(ft1, ft2: TPSType): Boolean;
+    function GetTypeNo(BlockInfo: TPSBlockInfo; p: TPSValue): TPSType;
+    function DoVarBlock(proc: TPSInternalProcedure): Boolean;
+    function DoTypeBlock(FParser: TPSPascalParser): Boolean;
+    function ReadType(const Name: tbtString; FParser: TPSPascalParser): TPSType;
+    function ProcessLabel(Proc: TPSInternalProcedure): Boolean;
+    function ProcessSub(BlockInfo: TPSBlockInfo): Boolean;
+    function ProcessLabelForwards(Proc: TPSInternalProcedure): Boolean;
+
+    procedure WriteDebugData(const s: tbtString);
+
+    procedure Debug_SavePosition(ProcNo: Cardinal; Proc: TPSInternalProcedure);
+
+    procedure Debug_WriteParams(ProcNo: Cardinal; Proc: TPSInternalProcedure);
+
+    procedure Debug_WriteLine(BlockInfo: TPSBlockInfo);
+
+
+    function IsCompatibleType(p1, p2: TPSType; Cast: Boolean): Boolean;
+
+    function IsDuplicate(const s: tbtString; const check: TPSDuplicCheck): Boolean;
+
+    function NewProc(const OriginalName, Name: tbtString): TPSInternalProcedure;
+
+    function AddUsedFunction(var Proc: TPSInternalProcedure): Cardinal;
+
+    function AddUsedFunction2(var Proc: TPSExternalProcedure): Cardinal;
+
+
+    function CheckCompatProc(P: TPSType; ProcNo: Cardinal): Boolean;
+
+
+    procedure ParserError(Parser: TObject; Kind: TPSParserErrorKind);
+
+    function ReadTypeAddProcedure(const Name: tbtString; FParser: TPSPascalParser): TPSType;
+
+    function VarIsDuplicate(Proc: TPSInternalProcedure; const VarNames, s: tbtString): Boolean;
+
+    function IsProcDuplicLabel(Proc: TPSInternalProcedure; const s: tbtString): Boolean;
+
+    procedure CheckForUnusedVars(Func: TPSInternalProcedure);
+    function ProcIsDuplic(Decl: TPSParametersDecl; const FunctionName, FunctionParamNames: tbtString; const s: tbtString; Func: TPSInternalProcedure): Boolean;
+   public
+     function GetConstant(const Name: tbtString): TPSConstant;
+
+     function UseExternalProc(const Name: tbtString): TPSParametersDecl;
+
+    function FindProc(const Name: tbtString): Cardinal;
+
+    function GetTypeCount: Longint;
+
+    function GetType(I: Longint): TPSType;
+
+    function GetVarCount: Longint;
+
+    function GetVar(I: Longint): TPSVar;
+
+    function GetProcCount: Longint;
+
+    function GetProc(I: Longint): TPSProcedure;
+
+    function GetConstCount: Longint;
+
+    function GetConst(I: Longint): TPSConstant;
+
+    function GetRegProcCount: Longint;
+
+    function GetRegProc(I: Longint): TPSRegProc;
+
+    function AddAttributeType: TPSAttributeType;
+    function FindAttributeType(const Name: tbtString): TPSAttributeType;
+
+    procedure AddToFreeList(Obj: TObject);
+
+    property ID: Pointer read FID write FID;
+
+    function MakeError(const Module: tbtString; E: TPSPascalCompilerErrorType; const
+      Param: tbtString): TPSPascalCompilerMessage;
+
+    function MakeWarning(const Module: tbtString; E: TPSPascalCompilerWarningType;
+      const Param: tbtString): TPSPascalCompilerMessage;
+
+    function MakeHint(const Module: tbtString; E: TPSPascalCompilerHintType;
+      const Param: tbtString): TPSPascalCompilerMessage;
+
+{$IFNDEF PS_NOINTERFACES}
+
+    function AddInterface(InheritedFrom: TPSInterface; Guid: TGuid; const Name: tbtString): TPSInterface;
+
+    function FindInterface(const Name: tbtString): TPSInterface;
+
+{$ENDIF}
+    function AddClass(InheritsFrom: TPSCompileTimeClass; aClass: TClass): TPSCompileTimeClass;
+
+    function AddClassN(InheritsFrom: TPSCompileTimeClass; const aClass: tbtString): TPSCompileTimeClass;
+
+
+    function FindClass(const aClass: tbtString): TPSCompileTimeClass;
+
+    function AddFunction(const Header: tbtString): TPSRegProc;
+
+    function AddDelphiFunction(const Decl: tbtString): TPSRegProc;
+
+    function AddType(const Name: tbtString; const BaseType: TPSBaseType): TPSType;
+
+    function AddTypeS(const Name, Decl: tbtString): TPSType;
+
+    function AddTypeCopy(const Name: tbtString; TypeNo: TPSType): TPSType;
+
+    function AddTypeCopyN(const Name, FType: tbtString): TPSType;
+
+    function AddConstant(const Name: tbtString; FType: TPSType): TPSConstant;
+
+    function AddConstantN(const Name, FType: tbtString): TPSConstant;
+
+    function AddVariable(const Name: tbtString; FType: TPSType): TPSVar;
+
+    function AddVariableN(const Name, FType: tbtString): TPSVar;
+
+    function AddUsedVariable(const Name: tbtString; FType: TPSType): TPSVar;
+
+    function AddUsedVariableN(const Name, FType: tbtString): TPSVar;
+
+    function AddUsedPtrVariable(const Name: tbtString; FType: TPSType): TPSVar;
+
+    function AddUsedPtrVariableN(const Name, FType: tbtString): TPSVar;
+
+    function FindType(const Name: tbtString): TPSType;
+
+    function MakeDecl(decl: TPSParametersDecl): tbtString;
+
+    function Compile(const s: tbtString): Boolean;
+
+    function GetOutput(var s: tbtString): Boolean;
+	
+    function GetDebugOutput(var s: tbtString): Boolean;
+
+    procedure Clear;
+
+    constructor Create;
+	
+    destructor Destroy; override;
+
+    property MsgCount: Longint read GetMsgCount;
+	
+    property Msg[l: Longint]: TPSPascalCompilerMessage read GetMsg;
+
+    property OnTranslateLineInfo: TPSOnTranslateLineInfoProc read FOnTranslateLineInfo write FOnTranslateLineInfo;
+
+    property OnUses: TPSOnUses read FOnUses write FOnUses;
+	
+    property OnExportCheck: TPSOnExportCheck read FOnExportCheck write FOnExportCheck;
+	
+    property OnWriteLine: TPSOnWriteLineEvent read FOnWriteLine write FOnWriteLine;
+	
+    property OnExternalProc: TPSOnExternalProc read FOnExternalProc write FOnExternalProc;
+	
+    property OnUseVariable: TPSOnUseVariable read FOnUseVariable write FOnUseVariable;
+
+    property OnBeforeOutput: TPSOnNotify read FOnBeforeOutput write FOnBeforeOutput;
+
+    property OnBeforeCleanup: TPSOnNotify read FOnBeforeCleanup write FOnBeforeCleanup;
+
+    property OnFunctionStart: TPSOnFunction read FOnFunctionStart write FOnFunctionStart;
+
+    property OnFunctionEnd: TPSOnFunction read FOnFunctionEnd write FOnFunctionEnd;
+	
+    property IsUnit: Boolean read FIsUnit;
+	
+    property AllowNoBegin: Boolean read FAllowNoBegin write FAllowNoBegin;
+	
+    property AllowUnit: Boolean read FAllowUnit write FAllowUnit;
+	
+    property AllowNoEnd: Boolean read FAllowNoEnd write FAllowNoEnd;
+
+
+    property BooleanShortCircuit: Boolean read FBooleanShortCircuit write FBooleanShortCircuit;
+
+    property UTF8Decode: Boolean read FUtf8Decode write FUtf8Decode;
+
+    property UnitName: tbtString read FUnitName;
+  end;
+  TIFPSPascalCompiler = TPSPascalCompiler;
+
+  TPSValue = class(TObject)
+  private
+    FPos, FRow, FCol: Cardinal;
+  public
+
+    property Pos: Cardinal read FPos write FPos;
+
+    property Row: Cardinal read FRow write FRow;
+
+    property Col: Cardinal read FCol write FCol;
+
+    procedure SetParserPos(P: TPSPascalParser);
+
+  end;
+
+  TPSParameter = class(TObject)
+  private
+    FValue: TPSValue;
+    FTempVar: TPSValue;
+    FParamMode: TPSParameterMode;
+    FExpectedType: TPSType;
+  public
+
+    property Val: TPSValue read FValue write FValue;
+
+    property ExpectedType: TPSType read FExpectedType write FExpectedType;
+
+    property TempVar: TPSValue read FTempVar write FTempVar;
+
+    property ParamMode: TPSParameterMode read FParamMode write FParamMode;
+
+    destructor Destroy; override;
+  end;
+
+  TPSParameters = class(TObject)
+  private
+    FItems: TPSList;
+    function GetCount: Cardinal;
+    function GetItem(I: Longint): TPSParameter;
+  public
+
+    constructor Create;
+
+    destructor Destroy; override;
+
+    property Count: Cardinal read GetCount;
+
+    property Item[I: Longint]: TPSParameter read GetItem; default;
+
+    procedure Delete(I: Cardinal);
+
+    function Add: TPSParameter;
+  end;
+
+  TPSSubItem = class(TObject)
+  private
+    FType: TPSType;
+  public
+
+    property aType: TPSType read FType write FType;
+  end;
+
+  TPSSubNumber = class(TPSSubItem)
+  private
+    FSubNo: Cardinal;
+  public
+
+    property SubNo: Cardinal read FSubNo write FSubNo;
+  end;
+
+  TPSSubValue = class(TPSSubItem)
+  private
+    FSubNo: TPSValue;
+  public
+
+    property SubNo: TPSValue read FSubNo write FSubNo;
+
+    destructor Destroy; override;
+  end;
+
+  TPSValueVar = class(TPSValue)
+  private
+    FRecItems: TPSList;
+    function GetRecCount: Cardinal;
+    function GetRecItem(I: Cardinal): TPSSubItem;
+  public
+    constructor Create;
+    destructor Destroy; override;
+
+    function RecAdd(Val: TPSSubItem): Cardinal;
+
+    procedure RecDelete(I: Cardinal);
+
+    property RecItem[I: Cardinal]: TPSSubItem read GetRecItem;
+
+    property RecCount: Cardinal read GetRecCount;
+  end;
+
+  TPSValueGlobalVar = class(TPSValueVar)
+  private
+    FAddress: Cardinal;
+  public
+
+    property GlobalVarNo: Cardinal read FAddress write FAddress;
+  end;
+
+
+  TPSValueLocalVar = class(TPSValueVar)
+  private
+    FLocalVarNo: Longint;
+  public
+
+    property LocalVarNo: Longint read FLocalVarNo write FLocalVarNo;
+  end;
+
+  TPSValueParamVar = class(TPSValueVar)
+  private
+    FParamNo: Longint;
+  public
+
+    property ParamNo: Longint read FParamNo write FParamNo;
+  end;
+
+  TPSValueAllocatedStackVar = class(TPSValueLocalVar)
+  private
+    FProc: TPSInternalProcedure;
+  public
+
+    property Proc: TPSInternalProcedure read FProc write FProc;
+    destructor Destroy; override;
+  end;
+
+  TPSValueData = class(TPSValue)
+  private
+    FData: PIfRVariant;
+  public
+
+    property Data: PIfRVariant read FData write FData;
+    destructor Destroy; override;
+  end;
+
+  TPSValueReplace = class(TPSValue)
+  private
+    FPreWriteAllocated: Boolean;
+    FFreeOldValue: Boolean;
+    FFreeNewValue: Boolean;
+    FOldValue: TPSValue;
+    FNewValue: TPSValue;
+    FReplaceTimes: Longint;
+  public
+
+    property OldValue: TPSValue read FOldValue write FOldValue;
+
+    property NewValue: TPSValue read FNewValue write FNewValue;
+    {Should it free the old value when destroyed?}
+    property FreeOldValue: Boolean read FFreeOldValue write FFreeOldValue;
+    property FreeNewValue: Boolean read FFreeNewValue write FFreeNewValue;
+    property PreWriteAllocated: Boolean read FPreWriteAllocated write FPreWriteAllocated;
+
+    property ReplaceTimes: Longint read FReplaceTimes write FReplaceTimes;
+
+    constructor Create;
+    destructor Destroy; override;
+  end;
+
+
+  TPSUnValueOp = class(TPSValue)
+  private
+    FVal1: TPSValue;
+    FOperator: TPSUnOperatorType;
+    FType: TPSType;
+  public
+
+    property Val1: TPSValue read FVal1 write FVal1;
+    {The operator}
+    property Operator: TPSUnOperatorType read FOperator write FOperator;
+
+    property aType: TPSType read FType write FType;
+    destructor Destroy; override;
+  end;
+
+  TPSBinValueOp = class(TPSValue)
+  private
+    FVal1,
+    FVal2: TPSValue;
+    FOperator: TPSBinOperatorType;
+    FType: TPSType;
+  public
+
+    property Val1: TPSValue read FVal1 write FVal1;
+
+    property Val2: TPSValue read FVal2 write FVal2;
+    {The operator for this value}
+    property Operator: TPSBinOperatorType read FOperator write FOperator;
+
+    property aType: TPSType read FType write FType;
+
+    destructor Destroy; override;
+  end;
+
+  TPSValueNil = class(TPSValue)
+  end;
+
+  TPSValueProcPtr = class(TPSValue)
+  private
+    FProcNo: Cardinal;
+  public
+
+    property ProcPtr: Cardinal read FProcNo write FProcNo;
+  end;
+
+  TPSValueProc = class(TPSValue)
+  private
+    FSelfPtr: TPSValue;
+    FParameters: TPSParameters;
+    FResultType: TPSType;
+  public
+    property ResultType: TPSType read FResultType write FResultType;
+
+    property SelfPtr: TPSValue read FSelfPtr write FSelfPtr;
+
+    property Parameters: TPSParameters read FParameters write FParameters;
+    destructor Destroy; override;
+  end;
+
+  TPSValueProcNo = class(TPSValueProc)
+  private
+    FProcNo: Cardinal;
+  public
+
+    property ProcNo: Cardinal read FProcNo write FProcNo;
+  end;
+
+  TPSValueProcVal = class(TPSValueProc)
+  private
+    FProcNo: TPSValue;
+  public
+
+    property ProcNo: TPSValue read FProcNo write FProcNo;
+
+    destructor Destroy; override;
+  end;
+
+  TPSValueArray = class(TPSValue)
+  private
+    FItems: TPSList;
+    function GetCount: Cardinal;
+    function GetItem(I: Cardinal): TPSValue;
+  public
+    function Add(Item: TPSValue): Cardinal;
+    procedure Delete(I: Cardinal);
+    property Item[I: Cardinal]: TPSValue read GetItem;
+    property Count: Cardinal read GetCount;
+
+    constructor Create;
+    destructor Destroy; override;
+  end;
+
+  TPSDelphiClassItem = class;
+
+  TPSPropType = (iptRW, iptR, iptW);
+
+  TPSCompileTimeClass = class
+  private
+    FInheritsFrom: TPSCompileTimeClass;
+    FClass: TClass;
+    FClassName: tbtString;
+    FClassNameHash: Longint;
+    FClassItems: TPSList;
+    FDefaultProperty: Cardinal;
+    FIsAbstract: Boolean;
+    FCastProc,
+    FNilProc: Cardinal;
+    FType: TPSType;
+
+    FOwner: TPSPascalCompiler;
+    function GetCount: Longint;
+    function GetItem(i: Longint): TPSDelphiClassItem;
+  public
+
+    property aType: TPSType read FType;
+
+    property Items[i: Longint]: TPSDelphiClassItem read GetItem;
+
+    property Count: Longint read GetCount;
+
+    property IsAbstract: Boolean read FIsAbstract write FIsAbstract;
+
+
+    property ClassInheritsFrom: TPSCompileTimeClass read FInheritsFrom write FInheritsFrom;
+
+    function RegisterMethod(const Decl: tbtString): Boolean;
+	
+    procedure RegisterProperty(const PropertyName, PropertyType: tbtString; PropAC: TPSPropType);
+
+    procedure RegisterPublishedProperties;
+
+    function RegisterPublishedProperty(const Name: tbtString): Boolean;
+
+    procedure SetDefaultPropery(const Name: tbtString);
+
+    constructor Create(ClassName: tbtString; aOwner: TPSPascalCompiler; aType: TPSType);
+
+    class function CreateC(FClass: TClass; aOwner: TPSPascalCompiler; aType: TPSType): TPSCompileTimeClass;
+
+
+    destructor Destroy; override;
+
+
+    function IsCompatibleWith(aType: TPSType): Boolean;
+
+    function SetNil(var ProcNo: Cardinal): Boolean;
+
+    function CastToType(IntoType: TPSType; var ProcNo: Cardinal): Boolean;
+
+
+    function Property_Find(const Name: tbtString; var Index: Cardinal): Boolean;
+
+    function Property_Get(Index: Cardinal; var ProcNo: Cardinal): Boolean;
+
+    function Property_Set(Index: Cardinal; var ProcNo: Cardinal): Boolean;
+
+    function Property_GetHeader(Index: Cardinal; Dest: TPSParametersDecl): Boolean;
+
+
+    function Func_Find(const Name: tbtString; var Index: Cardinal): Boolean;
+
+    function Func_Call(Index: Cardinal; var ProcNo: Cardinal): Boolean;
+
+
+    function ClassFunc_Find(const Name: tbtString; var Index: Cardinal): Boolean;
+
+    function ClassFunc_Call(Index: Cardinal; var ProcNo: Cardinal): Boolean;
+  end;
+
+  TPSDelphiClassItem = class(TObject)
+  private
+    FOwner: TPSCompileTimeClass;
+    FOrgName: tbtString;
+    FName: tbtString;
+    FNameHash: Longint;
+    FDecl: TPSParametersDecl;
+    procedure SetName(const s: tbtString);
+  public
+
+    constructor Create(Owner: TPSCompileTimeClass);
+
+    destructor Destroy; override;
+
+    property Decl: TPSParametersDecl read FDecl;
+
+    property Name: tbtString read FName;
+
+    property OrgName: tbtString read FOrgName write SetName;
+
+    property NameHash: Longint read FNameHash;
+
+    property Owner: TPSCompileTimeClass read FOwner;
+  end;
+
+  TPSDelphiClassItemMethod = class(TPSDelphiClassItem)
+  private
+    FMethodNo: Cardinal;
+  public
+
+    property MethodNo: Cardinal read FMethodNo write FMethodNo;
+  end;
+
+  TPSDelphiClassItemProperty = class(TPSDelphiClassItem)
+  private
+    FReadProcNo: Cardinal;
+    FWriteProcNo: Cardinal;
+    FAccessType: TPSPropType;
+  public
+
+    property AccessType: TPSPropType read FAccessType write FAccessType;
+
+    property ReadProcNo: Cardinal read FReadProcNo write FReadProcNo;
+
+    property WriteProcNo: Cardinal read FWriteProcNo write FWriteProcNo;
+  end;
+
+
+  TPSDelphiClassItemConstructor = class(TPSDelphiClassItemMethod)
+  end;
+
+{$IFNDEF PS_NOINTERFACES}
+
+  TPSInterface = class(TObject)
+  private
+    FOwner: TPSPascalCompiler;
+    FType: TPSType;
+    FInheritedFrom: TPSInterface;
+    FGuid: TGuid;
+    FCastProc,
+    FNilProc: Cardinal;
+    FItems: TPSList;
+    FName: tbtString;
+    FNameHash: Longint;
+    procedure SetInheritedFrom(p: TPSInterface);
+  public
+
+    constructor Create(Owner: TPSPascalCompiler; InheritedFrom: TPSInterface; Guid: TGuid; const Name: tbtString; aType: TPSType);
+
+    destructor Destroy; override;
+
+    property aType: TPSType read FType;
+
+    property InheritedFrom: TPSInterface read FInheritedFrom write SetInheritedFrom;
+
+    property Guid: TGuid read FGuid write FGuid;
+
+    property Name: tbtString read FName write FName;
+
+    property NameHash: Longint read FNameHash;
+
+
+    function RegisterMethod(const Declaration: tbtString; const cc: TPSCallingConvention): Boolean;
+
+    procedure RegisterDummyMethod;
+
+    function IsCompatibleWith(aType: TPSType): Boolean;
+
+    function SetNil(var ProcNo: Cardinal): Boolean;
+
+    function CastToType(IntoType: TPSType; var ProcNo: Cardinal): Boolean;
+
+    function Func_Find(const Name: tbtString; var Index: Cardinal): Boolean;
+
+    function Func_Call(Index: Cardinal; var ProcNo: Cardinal): Boolean;
+  end;
+
+
+  TPSInterfaceMethod = class(TObject)
+  private
+    FName: tbtString;
+    FDecl: TPSParametersDecl;
+    FNameHash: Longint;
+    FCC: TPSCallingConvention;
+    FScriptProcNo: Cardinal;
+    FOrgName: tbtString;
+    FOwner: TPSInterface;
+    FOffsetCache: Cardinal;
+    function GetAbsoluteProcOffset: Cardinal;
+  public
+
+    property AbsoluteProcOffset: Cardinal read GetAbsoluteProcOffset;
+
+    property ScriptProcNo: Cardinal read FScriptProcNo;
+
+    property OrgName: tbtString read FOrgName;
+
+    property Name: tbtString read FName;
+
+    property NameHash: Longint read FNameHash;
+
+    property Decl: TPSParametersDecl read FDecl;
+
+    property CC: TPSCallingConvention read FCC;
+
+
+    constructor Create(Owner: TPSInterface);
+
+    destructor Destroy; override;
+  end;
+{$ENDIF}
+
+
+  TPSExternalClass = class(TObject)
+  protected
+
+    SE: TPSPascalCompiler;
+
+    FTypeNo: TPSType;
+  public
+
+    function SelfType: TPSType; virtual;
+	
+    constructor Create(Se: TPSPascalCompiler; TypeNo: TPSType);
+
+    function ClassFunc_Find(const Name: tbtString; var Index: Cardinal): Boolean; virtual;
+	
+    function ClassFunc_Call(Index: Cardinal; var ProcNo: Cardinal): Boolean; virtual;
+
+    function Func_Find(const Name: tbtString; var Index: Cardinal): Boolean; virtual;
+
+    function Func_Call(Index: Cardinal; var ProcNo: Cardinal): Boolean; virtual;
+
+    function IsCompatibleWith(Cl: TPSExternalClass): Boolean; virtual;
+
+    function SetNil(var ProcNo: Cardinal): Boolean; virtual;
+
+    function CastToType(IntoType: TPSType; var ProcNo: Cardinal): Boolean; virtual;
+
+    function CompareClass(OtherTypeNo: TPSType; var ProcNo: Cardinal): Boolean; virtual;
+  end;
+
+
+function ExportCheck(Sender: TPSPascalCompiler; Proc: TPSInternalProcedure;
+  Types: array of TPSBaseType; Modes: array of TPSParameterMode): Boolean;
+
+
+procedure SetVarExportName(P: TPSVar; const ExpName: tbtString);
+
+function AddImportedClassVariable(Sender: TPSPascalCompiler; const VarName, VarType: tbtString): Boolean;
+
+const
+  {Invalid value, this is returned by most functions of pascal script that return a cardinal, when they fail}
+  InvalidVal = Cardinal(-1);
+
+type
+  TIFPSCompileTimeClass = TPSCompileTimeClass;
+  TIFPSInternalProcedure = TPSInternalProcedure;
+  TIFPSPascalCompilerError = TPSPascalCompilerError;
+
+  TPMFuncType = (mftProc
+  , mftConstructor
+  );
+
+
+function PS_mi2s(i: Cardinal): tbtString;
+
+function ParseMethod(Owner: TPSPascalCompiler; const FClassName: tbtString; Decl: tbtString; var OrgName: tbtString; DestDecl: TPSParametersDecl; var Func: TPMFuncType): Boolean;
+
+function DeclToBits(const Decl: TPSParametersDecl): tbtString;
+
+function NewVariant(FType: TPSType): PIfRVariant;
+procedure DisposeVariant(p: PIfRVariant);
+
+implementation
+
+uses Classes, typInfo;
+
+{$IFDEF DELPHI3UP}
+resourceString
+{$ELSE}
+const
+{$ENDIF}
+
+  RPS_OnUseEventOnly = 'This function can only be called from within the OnUses event';
+  RPS_UnableToRegisterFunction = 'Unable to register function %s';
+  RPS_UnableToRegisterConst = 'Unable to register constant %s';
+  RPS_InvalidTypeForVar = 'Invalid type for variable %s';
+  RPS_InvalidType = 'Invalid Type';
+  RPS_UnableToRegisterType = 'Unable to register type %s';
+  RPS_UnknownInterface = 'Unknown interface: %s';
+  RPS_ConstantValueMismatch = 'Constant Value Type Mismatch';
+  RPS_ConstantValueNotAssigned = 'Constant Value is not assigned';
+
+  RPS_Error = 'Error';
+  RPS_UnknownIdentifier = 'Unknown identifier ''%s''';
+  RPS_IdentifierExpected = 'Identifier expected';
+  RPS_CommentError = 'Comment error';
+  RPS_StringError = 'tbtString error';
+  RPS_CharError = 'Char error';
+  RPS_SyntaxError = 'Syntax error';
+  RPS_EOF = 'Unexpected end of file';
+  RPS_SemiColonExpected = 'Semicolon ('';'') expected';
+  RPS_BeginExpected = '''BEGIN'' expected';
+  RPS_PeriodExpected = 'period (''.'') expected';
+  RPS_DuplicateIdent = 'Duplicate identifier ''%s''';
+  RPS_ColonExpected = 'colon ('':'') expected';
+  RPS_UnknownType = 'Unknown type ''%s''';
+  RPS_CloseRoundExpected = 'Close round expected';
+  RPS_TypeMismatch = 'Type mismatch';
+  RPS_InternalError = 'Internal error (%s)';
+  RPS_AssignmentExpected = 'Assignment expected';
+  RPS_ThenExpected = '''THEN'' expected';
+  RPS_DoExpected = '''DO'' expected';
+  RPS_NoResult = 'No result';
+  RPS_OpenRoundExpected = 'open round (''('')expected';
+  RPS_CommaExpected = 'comma ('','') expected';
+  RPS_ToExpected = '''TO'' expected';
+  RPS_IsExpected = 'is (''='') expected';
+  RPS_OfExpected = '''OF'' expected';
+  RPS_CloseBlockExpected = 'Close block('']'') expected';
+  RPS_VariableExpected = 'Variable Expected';
+  RPS_StringExpected = 'tbtString Expected';
+  RPS_EndExpected = '''END'' expected';
+  RPS_UnSetLabel = 'Label ''%s'' not set';
+  RPS_NotInLoop = 'Not in a loop';
+  RPS_InvalidJump = 'Invalid jump';
+  RPS_OpenBlockExpected = 'Open Block (''['') expected';
+  RPS_WriteOnlyProperty = 'Write-only property';
+  RPS_ReadOnlyProperty = 'Read-only property';
+  RPS_ClassTypeExpected = 'Class type expected';
+  RPS_DivideByZero = 'Divide by Zero';
+  RPS_MathError = 'Math Error';
+  RPS_UnsatisfiedForward = 'Unsatisfied Forward %s';
+  RPS_ForwardParameterMismatch = 'Forward Parameter Mismatch';
+  RPS_InvalidNumberOfParameter = 'Invalid number of parameters';
+  RPS_UnknownError = 'Unknown error';
+  {$IFDEF PS_USESSUPPORT}
+  RPS_NotAllowed = '%s is not allowed at this position';
+  RPS_UnitNotFound = 'Unit ''%s'' not found or contains errors';
+  {$ENDIF}
+
+
+  RPS_Hint = 'Hint';
+  RPS_VariableNotUsed = 'Variable ''%s'' never used';
+  RPS_FunctionNotUsed = 'Function ''%s'' never used';
+  RPS_UnknownHint = 'Unknown hint';
+
+
+  RPS_Warning = 'Warning';
+  RPS_CalculationAlwaysEvaluatesTo = 'Calculation always evaluates to %s';
+  RPS_IsNotNeeded =  '%s is not needed';
+  RPS_AbstractClass = 'Abstract Class Construction';
+  RPS_UnknownWarning = 'Unknown warning';
+
+
+  {$IFDEF DEBUG }
+  RPS_UnableToRegister = 'Unable to register %s';
+  {$ENDIF}
+
+  RPS_NotArrayProperty = 'Not an array property';
+  RPS_NotProperty = 'Not a property';
+  RPS_UnknownProperty = 'Unknown Property';
+
+function DeclToBits(const Decl: TPSParametersDecl): tbtString;
+var
+  i: longint;
+begin
+  Result := '';
+  if Decl.Result = nil then
+  begin
+    Result := Result + #0;
+  end else
+    Result := Result + #1;
+  for i := 0 to Decl.ParamCount -1 do
+  begin
+    if Decl.Params[i].Mode <> pmIn then
+      Result := Result + #1
+    else
+      Result := Result + #0;
+  end;
+end;
+
+
+procedure BlockWriteByte(BlockInfo: TPSBlockInfo; b: Byte);
+begin
+  BlockInfo.Proc.Data := BlockInfo.Proc.Data + tbtChar(b);
+end;
+
+procedure BlockWriteData(BlockInfo: TPSBlockInfo; const Data; Len: Longint);
+begin
+  SetLength(BlockInfo.Proc.FData, Length(BlockInfo.Proc.FData) + Len);
+  Move(Data, BlockInfo.Proc.FData[Length(BlockInfo.Proc.FData) - Len + 1], Len);
+end;
+
+procedure BlockWriteLong(BlockInfo: TPSBlockInfo; l: Cardinal);
+begin
+  BlockWriteData(BlockInfo, l, 4);
+end;
+
+procedure BlockWriteVariant(BlockInfo: TPSBlockInfo; p: PIfRVariant);
+var
+  du8: tbtu8;
+  du16: tbtu16;
+begin
+  BlockWriteLong(BlockInfo, p^.FType.FinalTypeNo);
+  case p.FType.BaseType of
+  btType: BlockWriteData(BlockInfo, p^.ttype.FinalTypeno, 4);
+  {$IFNDEF PS_NOWIDESTRING}
+  btWideString:
+    begin
+      BlockWriteLong(BlockInfo, Length(tbtWideString(p^.twidestring)));
+      BlockWriteData(BlockInfo, tbtwidestring(p^.twidestring)[1], 2*Length(tbtWideString(p^.twidestring)));
+    end;
+  btWideChar: BlockWriteData(BlockInfo, p^.twidechar, 2);
+  {$ENDIF}
+  btSingle: BlockWriteData(BlockInfo, p^.tsingle, sizeof(tbtSingle));
+  btDouble: BlockWriteData(BlockInfo, p^.tdouble, sizeof(tbtDouble));
+  btExtended: BlockWriteData(BlockInfo, p^.textended, sizeof(tbtExtended));
+  btCurrency: BlockWriteData(BlockInfo, p^.tcurrency, sizeof(tbtCurrency));
+  btChar: BlockWriteData(BlockInfo, p^.tchar, 1);
+  btSet:
+    begin
+      BlockWriteData(BlockInfo, tbtString(p^.tstring)[1], Length(tbtString(p^.tstring)));
+    end;
+  btString:
+    begin
+      BlockWriteLong(BlockInfo, Length(tbtString(p^.tstring)));
+      BlockWriteData(BlockInfo, tbtString(p^.tstring)[1], Length(tbtString(p^.tstring)));
+    end;
+     btenum:
+     begin
+       if TPSEnumType(p^.FType).HighValue <=256 then
+      begin
+        du8 := tbtu8(p^.tu32);
+        BlockWriteData(BlockInfo, du8, 1)
+      end
+       else if TPSEnumType(p^.FType).HighValue <=65536 then
+      begin
+        du16 := tbtu16(p^.tu32);
+        BlockWriteData(BlockInfo, du16, 2)
+      end;
+	end;
+
+  bts8,btu8: BlockWriteData(BlockInfo, p^.tu8, 1);
+  bts16,btu16: BlockWriteData(BlockInfo, p^.tu16, 2);
+  bts32,btu32: BlockWriteData(BlockInfo, p^.tu32, 4);
+  {$IFNDEF PS_NOINT64}
+  bts64: BlockWriteData(BlockInfo, p^.ts64, 8);
+  {$ENDIF}
+  btProcPtr: BlockWriteData(BlockInfo, p^.tu32, 4);
+  {$IFDEF DEBUG}
+  {$IFNDEF FPC}
+  else
+      asm int 3; end;
+  {$ENDIF}
+  {$ENDIF}
+  end;
+end;
+
+
+
+function ExportCheck(Sender: TPSPascalCompiler; Proc: TPSInternalProcedure; Types: array of TPSBaseType; Modes: array of TPSParameterMode): Boolean;
+var
+  i: Longint;
+  ttype: TPSType;
+begin
+  if High(Types) <> High(Modes)+1 then
+  begin
+    Result := False;
+    exit;
+  end;
+  if High(Types) <> Proc.Decl.ParamCount then
+  begin
+    Result := False;
+    exit;
+  end;
+  TType := Proc.Decl.Result;
+  if TType = nil then
+  begin
+    if Types[0] <> btReturnAddress then
+    begin
+      Result := False;
+      exit;
+    end;
+  end else
+  begin
+    if TType.BaseType <> Types[0] then
+    begin
+      Result := False;
+      exit;
+    end;
+  end;
+  for i := 0 to High(Modes) do
+  begin
+    TType := Proc.Decl.Params[i].aType;
+    if Modes[i] <> Proc.Decl.Params[i].Mode then
+    begin
+      Result := False;
+      exit;
+    end;
+    if TType.BaseType <> Types[i+1] then
+    begin
+      Result := False;
+      exit;
+    end;
+  end;
+  Result := True;
+end;
+
+procedure SetVarExportName(P: TPSVar; const ExpName: tbtString);
+begin
+  if p <> nil then
+    p.exportname := ExpName;
+end;
+
+function FindAndAddType(Owner: TPSPascalCompiler; const Name, Decl: tbtString): TPSType;
+var
+  tt: TPSType;
+begin
+  Result := Owner.FindType(Name);
+  if Result = nil then
+  begin
+    tt := Owner.AddTypeS(Name, Decl);
+    tt.ExportName := True;
+    Result := tt;
+  end;
+end;
+
+
+function ParseMethod(Owner: TPSPascalCompiler; const FClassName: tbtString; Decl: tbtString; var OrgName: tbtString; DestDecl: TPSParametersDecl; var Func: TPMFuncType): Boolean;
+var
+  Parser: TPSPascalParser;
+  FuncType: Byte;
+  VNames: tbtString;
+  modifier: TPSParameterMode;
+  VCType: TPSType;
+  ERow, EPos, ECol: Integer;
+
+begin
+  Parser := TPSPascalParser.Create;
+  Parser.SetText(Decl);
+  if Parser.CurrTokenId = CSTII_Function then
+    FuncType:= 0
+  else if Parser.CurrTokenId = CSTII_Procedure then
+    FuncType := 1
+  else if (Parser.CurrTokenId = CSTII_Constructor) and (FClassName <> '') then
+    FuncType := 2
+  else
+  begin
+    Parser.Free;
+    Result := False;
+    exit;
+  end;
+  Parser.Next;
+  if Parser.CurrTokenId <> CSTI_Identifier then
+  begin
+    Parser.Free;
+    Result := False;
+    exit;
+  end; {if}
+  OrgName := Parser.OriginalToken;
+  Parser.Next;
+  if Parser.CurrTokenId = CSTI_OpenRound then
+  begin
+    Parser.Next;
+    if Parser.CurrTokenId <> CSTI_CloseRound then
+    begin
+      while True do
+      begin
+        if Parser.CurrTokenId = CSTII_Const then
+        begin
+          modifier := pmIn;
+          Parser.Next;
+        end
+        else
+        if Parser.CurrTokenId = CSTII_Var then
+        begin
+          modifier := pmInOut;
+          Parser.Next;
+        end
+        else
+        if Parser.CurrTokenId = CSTII_Out then
+        begin
+          modifier := pmOut;
+          Parser.Next;
+        end
+        else
+          modifier := pmIn;
+        if Parser.CurrTokenId <> CSTI_Identifier then
+        begin
+          Parser.Free;
+          Result := False;
+          exit;
+        end;
+        EPos:=Parser.CurrTokenPos;
+        ERow:=Parser.Row;
+        ECol:=Parser.Col;
+
+        VNames := Parser.OriginalToken + '|';
+        Parser.Next;
+        while Parser.CurrTokenId = CSTI_Comma do
+        begin
+          Parser.Next;
+          if Parser.CurrTokenId <> CSTI_Identifier then
+          begin
+            Parser.Free;
+            Result := False;
+            exit;
+          end;
+          VNames := VNames + Parser.OriginalToken + '|';
+          Parser.Next;
+        end;
+        if Parser.CurrTokenId <> CSTI_Colon then
+        begin
+          Parser.Free;
+          Result := False;
+          exit;
+        end;
+        Parser.Next;
+        if Parser.CurrTokenID = CSTII_Array then
+        begin
+          Parser.nExt;
+          if Parser.CurrTokenId <> CSTII_Of then
+          begin
+            Parser.Free;
+            Result := False;
+            exit;
+          end;
+          Parser.Next;
+          if Parser.CurrTokenId = CSTII_Const then
+          begin
+            VCType := FindAndAddType(Owner, '!OPENARRAYOFCONST', 'array of ___Pointer')
+          end
+          else begin
+            VCType := Owner.GetTypeCopyLink(Owner.FindType(Parser.GetToken));
+            if VCType = nil then
+            begin
+              Parser.Free;
+              Result := False;
+              exit;
+            end;
+            case VCType.BaseType of
+              btU8: VCType := FindAndAddType(Owner, '!OPENARRAYOFU8', 'array of byte');
+              btS8: VCType := FindAndAddType(Owner, '!OPENARRAYOFS8', 'array of ShortInt');
+              btU16: VCType := FindAndAddType(Owner, '!OPENARRAYOFU16', 'array of SmallInt');
+              btS16: VCType := FindAndAddType(Owner, '!OPENARRAYOFS16', 'array of Word');
+              btU32: VCType := FindAndAddType(Owner, '!OPENARRAYOFU32', 'array of Cardinal');
+              btS32: VCType := FindAndAddType(Owner, '!OPENARRAYOFS32', 'array of Longint');
+              btSingle: VCType := FindAndAddType(Owner, '!OPENARRAYOFSINGLE', 'array of Single');
+              btDouble: VCType := FindAndAddType(Owner, '!OPENARRAYOFDOUBLE', 'array of Double');
+              btExtended: VCType := FindAndAddType(Owner, '!OPENARRAYOFEXTENDED', 'array of Extended');
+              btString: VCType := FindAndAddType(Owner, '!OPENARRAYOFSTRING', 'array of String');
+              btPChar: VCType := FindAndAddType(Owner, '!OPENARRAYOFPCHAR', 'array of PChar');
+              btNotificationVariant, btVariant: VCType := FindAndAddType(Owner, '!OPENARRAYOFVARIANT', 'array of variant');
+            {$IFNDEF PS_NOINT64}btS64:  VCType := FindAndAddType(Owner, '!OPENARRAYOFS64', 'array of Int64');{$ENDIF}
+              btChar: VCType := FindAndAddType(Owner, '!OPENARRAYOFCHAR', 'array of Char');
+            {$IFNDEF PS_NOWIDESTRING}
+              btWideString: VCType := FindAndAddType(Owner, '!OPENARRAYOFWIDESTRING', 'array of WideString');
+              btWideChar: VCType := FindAndAddType(Owner, '!OPENARRAYOFWIDECHAR', 'array of WideChar');
+            {$ENDIF}
+              btClass: VCType := FindAndAddType(Owner, '!OPENARRAYOFTOBJECT', 'array of TObject');
+              btRecord: VCType := FindAndAddType(Owner, '!OPENARRAYOFRECORD_'+FastUpperCase(Parser.OriginalToken), 'array of ' +FastUpperCase(Parser.OriginalToken));
+            else
+              begin
+                Parser.Free;
+                Result := False;
+                exit;
+              end;
+            end;
+          end;
+        end else if Parser.CurrTokenID = CSTII_Const then
+          VCType := nil // any type
+        else begin
+          VCType := Owner.FindType(Parser.GetToken);
+          if VCType = nil then
+          begin
+            Parser.Free;
+            Result := False;
+            exit;
+          end;
+        end;
+        while Pos(tbtchar('|'), VNames) > 0 do
+        begin
+          with DestDecl.AddParam do
+          begin
+            {$IFDEF PS_USESSUPPORT}
+            DeclareUnit:=Owner.fModule;
+            {$ENDIF}
+            DeclarePos := EPos;
+            DeclareRow := ERow;
+            DeclareCol := ECol;
+            Mode := modifier;
+            OrgName := copy(VNames, 1, Pos(tbtchar('|'), VNames) - 1);
+            aType := VCType;
+          end;
+          Delete(VNames, 1, Pos(tbtchar('|'), VNames));
+        end;
+        Parser.Next;
+        if Parser.CurrTokenId = CSTI_CloseRound then
+          break;
+        if Parser.CurrTokenId <> CSTI_Semicolon then
+        begin
+          Parser.Free;
+          Result := False;
+          exit;
+        end;
+        Parser.Next;
+      end; {while}
+    end; {if}
+    Parser.Next;
+  end; {if}
+  if FuncType = 0 then
+  begin
+    if Parser.CurrTokenId <> CSTI_Colon then
+    begin
+      Parser.Free;
+      Result := False;
+      exit;
+    end;
+
+    Parser.Next;
+    VCType := Owner.FindType(Parser.GetToken);
+    if VCType = nil then
+    begin
+      Parser.Free;
+      Result := False;
+      exit;
+    end;
+  end
+  else if FuncType = 2 then {constructor}
+  begin
+    VCType := Owner.FindType(FClassName)
+  end else
+    VCType := nil;
+  DestDecl.Result := VCType;
+  Parser.Free;
+  if FuncType = 2 then
+    Func := mftConstructor
+  else
+    Func := mftProc;
+  Result := True;
+end;
+
+
+
+function TPSPascalCompiler.FindProc(const Name: tbtString): Cardinal;
+var
+  l, h: Longint;
+  x: TPSProcedure;
+  xr: TPSRegProc;
+
+begin
+  h := MakeHash(Name);
+  for l := FProcs.Count - 1 downto 0 do
+  begin
+    x := FProcs.Data^[l];
+    if x.ClassType = TPSInternalProcedure then
+    begin
+      if (TPSInternalProcedure(x).NameHash = h) and
+        (TPSInternalProcedure(x).Name = Name) then
+      begin
+        Result := l;
+        exit;
+      end;
+    end
+    else
+    begin
+      if (TPSExternalProcedure(x).RegProc.NameHash = h) and
+        (TPSExternalProcedure(x).RegProc.Name = Name) then
+      begin
+        Result := l;
+        exit;
+      end;
+    end;
+  end;
+  for l := FRegProcs.Count - 1 downto 0 do
+  begin
+    xr := FRegProcs[l];
+    if (xr.NameHash = h) and (xr.Name = Name) then
+    begin
+      x := TPSExternalProcedure.Create;
+      TPSExternalProcedure(x).RegProc := xr;
+      FProcs.Add(x);
+      Result := FProcs.Count - 1;
+      exit;
+    end;
+  end;
+  Result := InvalidVal;
+end; {findfunc}
+
+function TPSPascalCompiler.UseExternalProc(const Name: tbtString): TPSParametersDecl;
+var
+  ProcNo: cardinal;
+  proc: TPSProcedure;
+begin
+  ProcNo := FindProc(FastUppercase(Name));
+  if ProcNo = InvalidVal then Result := nil
+  else
+  begin
+    proc := TPSProcedure(FProcs[ProcNo]);
+    if Proc is TPSExternalProcedure then
+    begin
+      Result := TPSExternalProcedure(Proc).RegProc.Decl;
+    end else result := nil;
+  end;
+end;
+
+
+
+function TPSPascalCompiler.FindBaseType(BaseType: TPSBaseType): TPSType;
+var
+  l: Longint;
+  x: TPSType;
+begin
+  for l := 0 to FTypes.Count -1 do
+  begin
+    X := FTypes[l];
+    if (x.BaseType = BaseType) and (x.ClassType = TPSType)  then
+    begin
+      Result := at2ut(x);
+      exit;
+    end;
+  end;
+  X := TPSType.Create;
+  x.Name := '';
+  x.BaseType := BaseType;
+  {$IFDEF PS_USESSUPPORT}
+  x.DeclareUnit:=fModule;
+  {$ENDIF}
+  x.DeclarePos := InvalidVal;
+  x.DeclareCol := 0;
+  x.DeclareRow := 0;
+  FTypes.Add(x);
+  Result := at2ut(x);
+end;
+
+function TPSPascalCompiler.MakeDecl(decl: TPSParametersDecl): tbtString;
+var
+  i: Longint;
+begin
+  if Decl.Result = nil then result := '0' else
+  result := Decl.Result.Name;
+
+  for i := 0 to decl.ParamCount -1 do
+  begin
+    if decl.GetParam(i).Mode = pmIn then
+      Result := Result + ' @'
+    else
+      Result := Result + ' !';
+    Result := Result + decl.GetParam(i).aType.Name;
+  end;
+end;
+
+
+{ TPSPascalCompiler }
+
+const
+  BtTypeCopy = 255;
+
+
+type
+  TFuncType = (ftProc, ftFunc);
+
+function PS_mi2s(i: Cardinal): tbtString;
+begin
+  SetLength(Result, 4);
+  Cardinal((@Result[1])^) := i;
+end;
+
+
+
+
+function TPSPascalCompiler.AddType(const Name: tbtString; const BaseType: TPSBaseType): TPSType;
+begin
+  if FProcs = nil then
+  begin
+    raise EPSCompilerException.Create(RPS_OnUseEventOnly);
+  end;
+
+  case BaseType of
+    btProcPtr: Result := TPSProceduralType.Create;
+    BtTypeCopy: Result := TPSTypeLink.Create;
+    btRecord: Result := TPSRecordType.Create;
+    btArray: Result := TPSArrayType.Create;
+    btStaticArray: Result := TPSStaticArrayType.Create;
+    btEnum: Result := TPSEnumType.Create;
+    btClass: Result := TPSClassType.Create;
+    btExtClass: REsult := TPSUndefinedClassType.Create;
+    btNotificationVariant, btVariant: Result := TPSVariantType.Create;
+{$IFNDEF PS_NOINTERFACES}
+    btInterface: Result := TPSInterfaceType.Create;
+{$ENDIF}
+  else
+    Result := TPSType.Create;
+  end;
+  Result.Name := FastUppercase(Name);
+  Result.OriginalName := Name;
+  Result.BaseType := BaseType;
+  {$IFDEF PS_USESSUPPORT}
+  Result.DeclareUnit:=fModule;
+  {$ENDIF}
+  Result.DeclarePos := InvalidVal;
+  Result.DeclareCol := 0;
+  Result.DeclareRow := 0;
+  FTypes.Add(Result);
+end;
+
+
+function TPSPascalCompiler.AddFunction(const Header: tbtString): TPSRegProc;
+var
+  Parser: TPSPascalParser;
+  i: Integer;
+  IsFunction: Boolean;
+  VNames, Name: tbtString;
+  Decl: TPSParametersDecl;
+  modifier: TPSParameterMode;
+  VCType: TPSType;
+  x: TPSRegProc;
+begin
+  if FProcs = nil then
+    raise EPSCompilerException.Create(RPS_OnUseEventOnly);
+
+  Parser := TPSPascalParser.Create;
+  Parser.SetText(Header);
+  Decl := TPSParametersDecl.Create;
+  x := nil;
+  try
+    if Parser.CurrTokenId = CSTII_Function then
+      IsFunction := True
+    else if Parser.CurrTokenId = CSTII_Procedure then
+      IsFunction := False
+    else
+      Raise EPSCompilerException.CreateFmt(RPS_UnableToRegisterFunction, ['']);
+    Parser.Next;
+    if Parser.CurrTokenId <> CSTI_Identifier then
+      Raise EPSCompilerException.CreateFmt(RPS_UnableToRegisterFunction, ['']);
+    Name := Parser.OriginalToken;
+    Parser.Next;
+    if Parser.CurrTokenId = CSTI_OpenRound then
+    begin
+      Parser.Next;
+      if Parser.CurrTokenId <> CSTI_CloseRound then
+      begin
+        while True do
+        begin
+          if Parser.CurrTokenId = CSTII_Out then
+          begin
+            Modifier := pmOut;
+            Parser.Next;
+          end else
+          if Parser.CurrTokenId = CSTII_Const then
+          begin
+            Modifier := pmIn;
+            Parser.Next;
+          end else
+          if Parser.CurrTokenId = CSTII_Var then
+          begin
+            modifier := pmInOut;
+            Parser.Next;
+          end
+          else
+            modifier := pmIn;
+          if Parser.CurrTokenId <> CSTI_Identifier then
+            raise EPSCompilerException.CreateFmt(RPS_UnableToRegisterFunction, [Name]);
+          VNames := Parser.OriginalToken + '|';
+          Parser.Next;
+          while Parser.CurrTokenId = CSTI_Comma do
+          begin
+            Parser.Next;
+            if Parser.CurrTokenId <> CSTI_Identifier then
+              Raise EPSCompilerException.CreateFmt(RPS_UnableToRegisterFunction, [Name]);
+            VNames := VNames + Parser.OriginalToken + '|';
+            Parser.Next;
+          end;
+          if Parser.CurrTokenId <> CSTI_Colon then
+          begin
+            Parser.Free;
+            Raise EPSCompilerException.CreateFmt(RPS_UnableToRegisterFunction, [Name]);
+          end;
+          Parser.Next;
+          VCType := FindType(Parser.GetToken);
+          if VCType = nil then
+            Raise EPSCompilerException.CreateFmt(RPS_UnableToRegisterFunction, [Name]);
+          while Pos(tbtchar('|'), VNames) > 0 do
+          begin
+            with Decl.AddParam do
+            begin
+              Mode := modifier;
+              OrgName := copy(VNames, 1, Pos(tbtchar('|'), VNames) - 1);
+              aType := VCType;
+            end;
+            Delete(VNames, 1, Pos(tbtchar('|'), VNames));
+          end;
+          Parser.Next;
+          if Parser.CurrTokenId = CSTI_CloseRound then
+            break;
+          if Parser.CurrTokenId <> CSTI_Semicolon then
+            Raise EPSCompilerException.CreateFmt(RPS_UnableToRegisterFunction, [Name]);
+          Parser.Next;
+        end; {while}
+      end; {if}
+      Parser.Next;
+    end; {if}
+    if IsFunction then
+    begin
+      if Parser.CurrTokenId <> CSTI_Colon then
+        Raise EPSCompilerException.CreateFmt(RPS_UnableToRegisterFunction, [Name]);
+
+      Parser.Next;
+      VCType := FindType(Parser.GetToken);
+      if VCType = nil then
+        Raise EPSCompilerException.CreateFmt(RPS_UnableToRegisterFunction, [Name]);
+    end
+    else
+      VCType := nil;
+    Decl.Result := VCType;
+    X := TPSRegProc.Create;
+    x.OrgName := Name;
+    x.Name := FastUpperCase(Name);
+    x.ExportName := True;
+    x.Decl.Assign(decl);
+    if Decl.Result = nil then
+    begin
+      x.ImportDecl := x.ImportDecl + #0;
+    end else
+      x.ImportDecl := x.ImportDecl + #1;
+    for i := 0 to Decl.ParamCount -1 do
+    begin
+      if Decl.Params[i].Mode <> pmIn then
+        x.ImportDecl := x.ImportDecl + #1
+      else
+        x.ImportDecl := x.ImportDecl + #0;
+    end;
+
+    FRegProcs.Add(x);
+  finally
+    Decl.Free;
+    Parser.Free;
+  end;
+  Result := x;
+end;
+
+function TPSPascalCompiler.MakeHint(const Module: tbtString; E: TPSPascalCompilerHintType; const Param: tbtString): TPSPascalCompilerMessage;
+var
+  n: TPSPascalCompilerHint;
+begin
+  N := TPSPascalCompilerHint.Create;
+  n.FHint := e;
+  n.SetParserPos(FParser);
+  n.FModuleName := Module;
+  n.FParam := Param;
+  FMessages.Add(n);
+  Result := n;
+end;
+
+function TPSPascalCompiler.MakeError(const Module: tbtString; E:
+  TPSPascalCompilerErrorType; const Param: tbtString): TPSPascalCompilerMessage;
+var
+  n: TPSPascalCompilerError;
+begin
+  N := TPSPascalCompilerError.Create;
+  n.FError := e;
+  n.SetParserPos(FParser);
+  {$IFNDEF PS_USESSUPPORT}
+  n.FModuleName := Module;
+  {$ELSE}
+  if Module <> '' then
+    n.FModuleName := Module
+  else
+    n.FModuleName := fModule;
+  {$ENDIF}
+  n.FParam := Param;
+  FMessages.Add(n);
+  Result := n;
+end;
+
+function TPSPascalCompiler.MakeWarning(const Module: tbtString; E:
+  TPSPascalCompilerWarningType; const Param: tbtString): TPSPascalCompilerMessage;
+var
+  n: TPSPascalCompilerWarning;
+begin
+  N := TPSPascalCompilerWarning.Create;
+  n.FWarning := e;
+  n.SetParserPos(FParser);
+  n.FModuleName := Module;
+  n.FParam := Param;
+  FMessages.Add(n);
+  Result := n;
+end;
+
+procedure TPSPascalCompiler.Clear;
+var
+  l: Longint;
+begin
+  FDebugOutput := '';
+  FOutput := '';
+  for l := 0 to FMessages.Count - 1 do
+    TPSPascalCompilerMessage(FMessages[l]).Free;
+  FMessages.Clear;
+  for L := FAutoFreeList.Count -1 downto 0 do
+  begin
+    TObject(FAutoFreeList[l]).Free;
+  end;
+  FAutoFreeList.Clear;
+end;
+
+procedure CopyVariantContents(Src, Dest: PIfRVariant);
+begin
+  case src.FType.BaseType of
+    btu8, bts8: dest^.tu8 := src^.tu8;
+    btu16, bts16: dest^.tu16 := src^.tu16;
+    btenum, btu32, bts32: dest^.tu32 := src^.tu32;
+    btsingle: Dest^.tsingle := src^.tsingle;
+    btdouble: Dest^.tdouble := src^.tdouble;
+    btextended: Dest^.textended := src^.textended;
+    btCurrency: Dest^.tcurrency := Src^.tcurrency;
+    btchar: Dest^.tchar := src^.tchar;
+    {$IFNDEF PS_NOINT64}bts64: dest^.ts64 := src^.ts64;{$ENDIF}
+    btset, btstring: tbtstring(dest^.tstring) := tbtstring(src^.tstring);
+    {$IFNDEF PS_NOWIDESTRING}
+    btwidestring: tbtwidestring(dest^.twidestring) := tbtwidestring(src^.twidestring);
+    btwidechar: Dest^.tchar := src^.tchar;
+    {$ENDIF}
+  end;
+end;
+
+function DuplicateVariant(Src: PIfRVariant): PIfRVariant;
+begin
+  New(Result);
+  FillChar(Result^, SizeOf(TIfRVariant), 0);
+  CopyVariantContents(Src, Result);
+end;
+
+
+procedure InitializeVariant(Vari: PIfRVariant; FType: TPSType);
+begin
+  FillChar(vari^, SizeOf(TIfRVariant), 0);
+  if FType.BaseType = btSet then
+  begin
+    SetLength(tbtstring(vari^.tstring), TPSSetType(FType).ByteSize);
+    fillchar(tbtstring(vari^.tstring)[1], length(tbtstring(vari^.tstring)), 0);
+  end;
+  vari^.FType := FType;
+end;
+
+function NewVariant(FType: TPSType): PIfRVariant;
+begin
+  New(Result);
+  InitializeVariant(Result, FType);
+end;
+{$IFDEF FPC}
+procedure Finalize(var s: tbtString); overload; begin s := ''; end;
+procedure Finalize(var s: tbtwidestring); overload; begin s := ''; end;
+{$ENDIF}
+
+procedure FinalizeVariant(var p: TIfRVariant);
+begin
+  if (p.FType.BaseType = btString) or (p.FType.basetype = btSet) then
+    finalize(tbtstring(p.tstring))
+  {$IFNDEF PS_NOWIDESTRING}
+  else if p.FType.BaseType = btWideString then
+    finalize(tbtWideString(p.twidestring)); // tbtwidestring
+  {$ENDIF}
+end;
+
+procedure DisposeVariant(p: PIfRVariant);
+begin
+  if p <> nil then
+  begin
+    FinalizeVariant(p^);
+    Dispose(p);
+  end;
+end;
+
+
+
+function TPSPascalCompiler.GetTypeCopyLink(p: TPSType): TPSType;
+begin
+  if p = nil then
+    Result := nil
+  else
+  if p.BaseType = BtTypeCopy then
+  begin
+    Result := TPSTypeLink(p).LinkTypeNo;
+  end else Result := p;
+end;
+
+function IsIntType(b: TPSBaseType): Boolean;
+begin
+  case b of
+    btU8, btS8, btU16, btS16, btU32, btS32{$IFNDEF PS_NOINT64}, btS64{$ENDIF}: Result := True;
+  else
+    Result := False;
+  end;
+end;
+
+function IsRealType(b: TPSBaseType): Boolean;
+begin
+  case b of
+    btSingle, btDouble, btCurrency, btExtended: Result := True;
+  else
+    Result := False;
+  end;
+end;
+
+function IsIntRealType(b: TPSBaseType): Boolean;
+begin
+  case b of
+    btSingle, btDouble, btCurrency, btExtended, btU8, btS8, btU16, btS16, btU32, btS32{$IFNDEF PS_NOINT64}, btS64{$ENDIF}:
+      Result := True;
+  else
+    Result := False;
+  end;
+
+end;
+
+function DiffRec(p1, p2: TPSSubItem): Boolean;
+begin
+  if p1.ClassType = p2.ClassType then
+  begin
+    if P1.ClassType = TPSSubNumber then
+      Result := TPSSubNumber(p1).SubNo <> TPSSubNumber(p2).SubNo
+    else if P1.ClassType = TPSSubValue then
+      Result := TPSSubValue(p1).SubNo <> TPSSubValue(p2).SubNo
+    else
+      Result := False;
+  end else Result := True;
+end;
+
+function SameReg(x1, x2: TPSValue): Boolean;
+var
+  I: Longint;
+begin
+  if (x1.ClassType = x2.ClassType) and (X1 is TPSValueVar) then
+  begin
+    if
+    ((x1.ClassType = TPSValueGlobalVar) and (TPSValueGlobalVar(x1).GlobalVarNo = TPSValueGlobalVar(x2).GlobalVarNo)) or
+    ((x1.ClassType = TPSValueLocalVar) and (TPSValueLocalVar(x1).LocalVarNo = TPSValueLocalVar(x2).LocalVarNo)) or
+    ((x1.ClassType = TPSValueParamVar) and (TPSValueParamVar(x1).ParamNo = TPSValueParamVar(x2).ParamNo)) or
+    ((x1.ClassType = TPSValueAllocatedStackVar) and (TPSValueAllocatedStackVar(x1).LocalVarNo = TPSValueAllocatedStackVar(x2).LocalVarNo)) then
+    begin
+      if TPSValueVar(x1).GetRecCount <> TPSValueVar(x2).GetRecCount then
+      begin
+        Result := False;
+        exit;
+      end;
+      for i := 0 to TPSValueVar(x1).GetRecCount -1 do
+      begin
+        if DiffRec(TPSValueVar(x1).RecItem[i], TPSValueVar(x2).RecItem[i]) then
+        begin
+          Result := False;
+          exit;
+        end;
+      end;
+      Result := True;
+    end else Result := False;
+  end
+  else
+    Result := False;
+end;
+
+function GetUInt(Src: PIfRVariant; var s: Boolean): Cardinal;
+begin
+  case Src.FType.BaseType of
+    btU8: Result := Src^.tu8;
+    btS8: Result := Src^.ts8;
+    btU16: Result := Src^.tu16;
+    btS16: Result := Src^.ts16;
+    btU32: Result := Src^.tu32;
+    btS32: Result := Src^.ts32;
+    {$IFNDEF PS_NOINT64}
+    bts64: Result := src^.ts64;
+    {$ENDIF}
+    btChar: Result := ord(Src^.tchar);
+    {$IFNDEF PS_NOWIDESTRING}
+    btWideChar: Result := ord(tbtwidechar(src^.twidechar));
+    {$ENDIF}
+    btEnum: Result := src^.tu32;
+  else
+    begin
+      s := False;
+      Result := 0;
+    end;
+  end;
+end;
+
+function GetInt(Src: PIfRVariant; var s: Boolean): Longint;
+begin
+  case Src.FType.BaseType of
+    btU8: Result := Src^.tu8;
+    btS8: Result := Src^.ts8;
+    btU16: Result := Src^.tu16;
+    btS16: Result := Src^.ts16;
+    btU32: Result := Src^.tu32;
+    btS32: Result := Src^.ts32;
+    {$IFNDEF PS_NOINT64}
+    bts64: Result := src^.ts64;
+    {$ENDIF}
+    btChar: Result := ord(Src^.tchar);
+    {$IFNDEF PS_NOWIDESTRING}
+    btWideChar: Result := ord(tbtwidechar(src^.twidechar));
+    {$ENDIF}
+    btEnum: Result := src^.tu32;
+  else
+    begin
+      s := False;
+      Result := 0;
+    end;
+  end;
+end;
+{$IFNDEF PS_NOINT64}
+function GetInt64(Src: PIfRVariant; var s: Boolean): Int64;
+begin
+  case Src.FType.BaseType of
+    btU8: Result := Src^.tu8;
+    btS8: Result := Src^.ts8;
+    btU16: Result := Src^.tu16;
+    btS16: Result := Src^.ts16;
+    btU32: Result := Src^.tu32;
+    btS32: Result := Src^.ts32;
+    bts64: Result := src^.ts64;
+    btChar: Result := ord(Src^.tchar);
+    {$IFNDEF PS_NOWIDESTRING}
+    btWideChar: Result := ord(tbtwidechar(src^.twidechar));
+    {$ENDIF}
+    btEnum: Result := src^.tu32;
+  else
+    begin
+      s := False;
+      Result := 0;
+    end;
+  end;
+end;
+{$ENDIF}
+
+function GetReal(Src: PIfRVariant; var s: Boolean): Extended;
+begin
+  case Src.FType.BaseType of
+    btU8: Result := Src^.tu8;
+    btS8: Result := Src^.ts8;
+    btU16: Result := Src^.tu16;
+    btS16: Result := Src^.ts16;
+    btU32: Result := Src^.tu32;
+    btS32: Result := Src^.ts32;
+    {$IFNDEF PS_NOINT64}
+    bts64: Result := src^.ts64;
+    {$ENDIF}
+    btChar: Result := ord(Src^.tchar);
+    {$IFNDEF PS_NOWIDESTRING}
+    btWideChar: Result := ord(tbtwidechar(src^.twidechar));
+    {$ENDIF}
+    btSingle: Result := Src^.tsingle;
+    btDouble: Result := Src^.tdouble;
+    btCurrency: Result := SRc^.tcurrency;
+    btExtended: Result := Src^.textended;
+  else
+    begin
+      s := False;
+      Result := 0;
+    end;
+  end;
+end;
+
+function GetString(Src: PIfRVariant; var s: Boolean): tbtString;
+begin
+  case Src.FType.BaseType of
+    btChar: Result := Src^.tchar;
+    btString: Result := tbtstring(src^.tstring);
+    {$IFNDEF PS_NOWIDESTRING}
+    btWideChar: Result := tbtstring(src^.twidechar);
+    btWideString: Result := tbtstring(tbtWideString(src^.twidestring));
+    {$ENDIF}
+  else
+    begin
+      s := False;
+      Result := '';
+    end;
+  end;
+end;
+
+{$IFNDEF PS_NOWIDESTRING}
+function TPSPascalCompiler.GetWideString(Src: PIfRVariant; var s: Boolean): tbtwidestring;
+begin
+  case Src.FType.BaseType of
+    btChar: Result := tbtWidestring(Src^.tchar);
+    btString: Result := tbtWidestring(tbtstring(src^.tstring));
+    btWideChar: Result := src^.twidechar;
+    btWideString: Result := tbtWideString(src^.twidestring);
+  else
+    begin
+      s := False;
+      Result := '';
+    end;
+  end;
+end;
+{$ENDIF}
+
+function ab(b: Longint): Longint;
+begin
+  ab := Longint(b = 0);
+end;
+
+procedure Set_Union(Dest, Src: PByteArray; ByteSize: Integer);
+var
+  i: Longint;
+begin
+  for i := ByteSize -1 downto 0 do
+    Dest^[i] := Dest^[i] or Src^[i];
+end;
+
+procedure Set_Diff(Dest, Src: PByteArray; ByteSize: Integer);
+var
+  i: Longint;
+begin
+  for i := ByteSize -1 downto 0 do
+    Dest^[i] := Dest^[i] and not Src^[i];
+end;
+
+procedure Set_Intersect(Dest, Src: PByteArray; ByteSize: Integer);
+var
+  i: Longint;
+begin
+  for i := ByteSize -1 downto 0 do
+    Dest^[i] := Dest^[i] and Src^[i];
+end;
+
+procedure Set_Subset(Dest, Src: PByteArray; ByteSize: Integer; var Val: Boolean);
+var
+  i: Integer;
+begin
+  for i := ByteSize -1 downto 0 do
+  begin
+    if not (Src^[i] and Dest^[i] = Dest^[i]) then
+    begin
+      Val := False;
+      exit;
+    end;
+  end;
+  Val := True;
+end;
+
+procedure Set_Equal(Dest, Src: PByteArray; ByteSize: Integer; var Val: Boolean);
+var
+  i: Longint;
+begin
+  for i := ByteSize -1 downto 0 do
+  begin
+    if Dest^[i] <> Src^[i] then
+    begin
+      Val := False;
+      exit;
+    end;
+  end;
+  val := True;
+end;
+
+procedure Set_membership(Item: Longint; Src: PByteArray; var Val: Boolean);
+begin
+  Val := (Src^[Item shr 3] and (1 shl (Item and 7))) <> 0;
+end;
+
+procedure Set_MakeMember(Item: Longint; Src: PByteArray);
+begin
+  Src^[Item shr 3] := Src^[Item shr 3] or (1 shl (Item and 7));
+end;
+
+procedure ConvertToBoolean(SE: TPSPascalCompiler; FUseUsedTypes: Boolean; var1: PIFRVariant; b: Boolean);
+begin
+  FinalizeVariant(var1^);
+  if FUseUsedTypes then
+    Var1^.FType := se.at2ut(se.FDefaultBoolType)
+  else
+    Var1^.FType := Se.FDefaultBoolType;
+  var1^.tu32 := Ord(b);
+end;
+
+procedure ConvertToString(SE: TPSPascalCompiler; FUseUsedTypes: Boolean; var1: PIFRVariant; const s: tbtString);
+var
+  atype: TPSType;
+begin
+  FinalizeVariant(var1^);
+  atype := se.FindBaseType(btString);
+  if FUseUsedTypes then
+    InitializeVariant(var1, se.at2ut(atype))
+  else
+    InitializeVariant(var1, atype);
+  tbtstring(var1^.tstring) := s;
+end;
+{$IFNDEF PS_NOWIDESTRING}
+procedure ConvertToWideString(SE: TPSPascalCompiler; FUseUsedTypes: Boolean; var1: PIFRVariant; const s: tbtwidestring);
+var
+  atype: TPSType;
+begin
+  FinalizeVariant(var1^);
+  atype := se.FindBaseType(btWideString);
+  if FUseUsedTypes then
+    InitializeVariant(var1, se.at2ut(atype))
+  else
+    InitializeVariant(var1, atype);
+  tbtwidestring(var1^.twidestring) := s;
+end;
+{$ENDIF}
+procedure ConvertToFloat(SE: TPSPascalCompiler; FUseUsedTypes: Boolean; var1: PIfRVariant; NewType: TPSType);
+var
+  vartemp: PIfRVariant;
+  b: Boolean;
+begin
+  New(vartemp);
+  if FUseUsedTypes then
+    NewType := se.at2ut(NewType);
+  InitializeVariant(vartemp, var1.FType);
+  CopyVariantContents(var1, vartemp);
+  FinalizeVariant(var1^);
+  InitializeVariant(var1, newtype);
+  case var1.ftype.basetype of
+    btSingle:
+      begin
+        if (vartemp.ftype.BaseType = btu8) or (vartemp.ftype.BaseType = btu16) or (vartemp.ftype.BaseType = btu32) then
+          var1^.tsingle := GetUInt(vartemp, b)
+        else
+          var1^.tsingle := GetInt(vartemp, b)
+      end;
+    btDouble:
+      begin
+        if (vartemp.ftype.BaseType = btu8) or (vartemp.ftype.BaseType = btu16) or (vartemp.ftype.BaseType = btu32) then
+          var1^.tdouble := GetUInt(vartemp, b)
+        else
+          var1^.tdouble := GetInt(vartemp, b)
+      end;
+    btExtended:
+      begin
+        if (vartemp.ftype.BaseType = btu8) or (vartemp.ftype.BaseType = btu16) or (vartemp.ftype.BaseType = btu32) then
+          var1^.textended:= GetUInt(vartemp, b)
+        else
+          var1^.textended:= GetInt(vartemp, b)
+      end;
+    btCurrency:
+      begin
+        if (vartemp.ftype.BaseType = btu8) or (vartemp.ftype.BaseType = btu16) or (vartemp.ftype.BaseType = btu32) then
+          var1^.tcurrency:= GetUInt(vartemp, b)
+        else
+          var1^.tcurrency:= GetInt(vartemp, b)
+      end;
+  end;
+  DisposeVariant(vartemp);
+end;
+
+
+function TPSPascalCompiler.IsCompatibleType(p1, p2: TPSType; Cast: Boolean): Boolean;
+begin
+  if
+    ((p1.BaseType = btProcPtr) and (p2 = p1)) or
+    (p1.BaseType = btPointer) or
+    (p2.BaseType = btPointer) or
+    ((p1.BaseType = btNotificationVariant) or (p1.BaseType = btVariant)) or
+    ((p2.BaseType = btNotificationVariant) or (p2.BaseType = btVariant))  or
+    (IsIntType(p1.BaseType) and IsIntType(p2.BaseType)) or
+    (IsRealType(p1.BaseType) and IsIntRealType(p2.BaseType)) or
+    (((p1.basetype = btPchar) or (p1.BaseType = btString)) and ((p2.BaseType = btString) or (p2.BaseType = btPchar))) or
+    (((p1.basetype = btPchar) or (p1.BaseType = btString)) and (p2.BaseType = btChar)) or
+    (((p1.BaseType = btArray) or (p1.BaseType = btStaticArray)) and (
+    (p2.BaseType = btArray) or (p2.BaseType = btStaticArray)) and IsCompatibleType(TPSArrayType(p1).ArrayTypeNo, TPSArrayType(p2).ArrayTypeNo, False)) or
+    ((p1.BaseType = btChar) and (p2.BaseType = btChar)) or
+    ((p1.BaseType = btSet) and (p2.BaseType = btSet)) or
+    {$IFNDEF PS_NOWIDESTRING}
+    ((p1.BaseType = btWideChar) and (p2.BaseType = btChar)) or
+    ((p1.BaseType = btWideChar) and (p2.BaseType = btWideChar)) or
+    ((p1.BaseType = btWidestring) and (p2.BaseType = btChar)) or
+    ((p1.BaseType = btWidestring) and (p2.BaseType = btWideChar)) or
+    ((p1.BaseType = btWidestring) and ((p2.BaseType = btString) or (p2.BaseType = btPchar))) or
+    ((p1.BaseType = btWidestring) and (p2.BaseType = btWidestring)) or
+    (((p1.basetype = btPchar) or (p1.BaseType = btString)) and (p2.BaseType = btWideString)) or
+    (((p1.basetype = btPchar) or (p1.BaseType = btString)) and (p2.BaseType = btWidechar)) or
+    (((p1.basetype = btPchar) or (p1.BaseType = btString)) and (p2.BaseType = btchar)) or
+    {$ENDIF}
+    ((p1.BaseType = btRecord) and (p2.BaseType = btrecord)) or
+    ((p1.BaseType = btEnum) and (p2.BaseType = btEnum)) or
+    (Cast and IsIntType(P1.BaseType) and (p2.baseType = btEnum)) or
+    (Cast and (p1.baseType = btEnum) and IsIntType(P2.BaseType))
+    then
+    Result := True
+  else if p1.BaseType = btclass then
+    Result := TPSClassType(p1).cl.IsCompatibleWith(p2)
+{$IFNDEF PS_NOINTERFACES}
+  else if p1.BaseType = btInterface then
+    Result := TPSInterfaceType(p1).Intf.IsCompatibleWith(p2)
+{$ENDIF}
+  else if ((p1.BaseType = btExtClass) and (p2.BaseType = btExtClass)) then
+  begin
+    Result := TPSUndefinedClassType(p1).ExtClass.IsCompatibleWith(TPSUndefinedClassType(p2).ExtClass);
+  end
+  else
+    Result := False;
+end;
+
+
+function TPSPascalCompiler.PreCalc(FUseUsedTypes: Boolean; Var1Mod: Byte; var1: PIFRVariant; Var2Mod: Byte; Var2: PIfRVariant; Cmd: TPSBinOperatorType; Pos, Row, Col: Cardinal): Boolean;
+  { var1=dest, var2=src }
+var
+  b: Boolean;
+
+begin
+  Result := True;
+  try
+    if (IsRealType(var2.FType.BaseType) and IsIntType(var1.FType.BaseType)) then
+      ConvertToFloat(Self, FUseUsedTypes, var1, var2^.FType);
+    case Cmd of
+      otAdd:
+        begin { + }
+          case var1.FType.BaseType of
+            btU8: var1^.tu8 := var1^.tu8 + GetUint(Var2, Result);
+            btS8: var1^.ts8 := var1^.ts8 + GetInt(Var2, Result);
+            btU16: var1^.tu16 := var1^.tu16 + GetUint(Var2, Result);
+            btS16: var1^.ts16 := var1^.ts16 + Getint(Var2, Result);
+            btEnum, btU32: var1^.tu32 := var1^.tu32 + GetUint(Var2, Result);
+            btS32: var1^.ts32 := var1^.ts32 + Getint(Var2, Result);
+            {$IFNDEF PS_NOINT64}btS64: var1^.ts64 := var1^.ts64 + GetInt64(Var2, Result); {$ENDIF}
+            btSingle: var1^.tsingle := var1^.tsingle + GetReal( Var2, Result);
+            btDouble: var1^.tdouble := var1^.tdouble + GetReal( Var2, Result);
+            btExtended: var1^.textended := var1^.textended + GetReal( Var2, Result);
+            btCurrency: var1^.tcurrency := var1^.tcurrency + GetReal( Var2, Result);
+            btSet:
+              begin
+                if (var1.FType = var2.FType) then
+                begin
+                  Set_Union(var1.tstring, var2.tstring, TPSSetType(var1.FType).ByteSize);
+                end else Result := False;
+              end;
+            btChar:
+              begin
+                ConvertToString(Self, FUseUsedTypes, var1, getstring(Var1, b)+getstring(Var2, b));
+              end;
+            btString: tbtstring(var1^.tstring) := tbtstring(var1^.tstring) + GetString(Var2, Result);
+            {$IFNDEF PS_NOWIDESTRING}
+            btwideString: tbtwidestring(var1^.twidestring) := tbtwidestring(var1^.twidestring) + GetWideString(Var2, Result);
+            btWidechar:
+              begin
+                ConvertToWideString(Self, FUseUsedTypes, var1, GetWideString(Var1, b)+GetWideString(Var2, b));
+              end;
+            {$ENDIF}
+            else Result := False;
+          end;
+        end;
+      otSub:
+        begin { - }
+          case Var1.FType.BaseType of
+            btU8: var1^.tu8 := var1^.tu8 - GetUint(Var2, Result);
+            btS8: var1^.ts8 := var1^.ts8 - Getint(Var2, Result);
+            btU16: var1^.tu16 := var1^.tu16 - GetUint(Var2, Result);
+            btS16: var1^.ts16 := var1^.ts16 - Getint(Var2, Result);
+            btEnum, btU32: var1^.tu32 := var1^.tu32 - GetUint(Var2, Result);
+            btS32: var1^.ts32 := var1^.ts32 - Getint(Var2, Result);
+            {$IFNDEF PS_NOINT64}btS64: var1^.ts64 := var1^.ts64 - GetInt64(Var2, Result); {$ENDIF}
+            btSingle: var1^.tsingle := var1^.tsingle - GetReal( Var2, Result);
+            btDouble: var1^.tdouble := var1^.tdouble - GetReal(Var2, Result);
+            btExtended: var1^.textended := var1^.textended - GetReal(Var2, Result);
+            btCurrency: var1^.tcurrency := var1^.tcurrency - GetReal( Var2, Result);
+            btSet:
+              begin
+                if (var1.FType = var2.FType) then
+                begin
+                  Set_Diff(var1.tstring, var2.tstring, TPSSetType(var1.FType).ByteSize);
+                end else Result := False;
+              end;
+            else Result := False;
+          end;
+        end;
+      otMul:
+        begin { * }
+          case Var1.FType.BaseType of
+            btU8: var1^.tu8 := var1^.tu8 * GetUint(Var2, Result);
+            btS8: var1^.ts8 := var1^.ts8 * Getint(Var2, Result);
+            btU16: var1^.tu16 := var1^.tu16 * GetUint(Var2, Result);
+            btS16: var1^.ts16 := var1^.ts16 * Getint(Var2, Result);
+            btU32: var1^.tu32 := var1^.tu32 * GetUint(Var2, Result);
+            btS32: var1^.ts32 := var1^.ts32 * Getint(Var2, Result);
+            {$IFNDEF PS_NOINT64}btS64: var1^.ts64 := var1^.ts64 * GetInt64(Var2, Result); {$ENDIF}
+            btSingle: var1^.tsingle := var1^.tsingle * GetReal(Var2, Result);
+            btDouble: var1^.tdouble := var1^.tdouble * GetReal(Var2, Result);
+            btExtended: var1^.textended := var1^.textended * GetReal( Var2, Result);
+            btCurrency: var1^.tcurrency := var1^.tcurrency * GetReal( Var2, Result);
+            btSet:
+              begin
+                if (var1.FType = var2.FType) then
+                begin
+                  Set_Intersect(var1.tstring, var2.tstring, TPSSetType(var1.FType).ByteSize);
+                end else Result := False;
+              end;
+            else Result := False;
+          end;
+        end;
+      otDiv:
+        begin { / }
+          case Var1.FType.BaseType of
+            btU8: var1^.tu8 := var1^.tu8 div GetUint(Var2, Result);
+            btS8: var1^.ts8 := var1^.ts8 div Getint(Var2, Result);
+            btU16: var1^.tu16 := var1^.tu16 div GetUint(Var2, Result);
+            btS16: var1^.ts16 := var1^.ts16 div Getint(Var2, Result);
+            btU32: var1^.tu32 := var1^.tu32 div GetUint(Var2, Result);
+            btS32: var1^.ts32 := var1^.ts32 div Getint(Var2, Result);
+            {$IFNDEF PS_NOINT64}btS64: var1^.ts64 := var1^.ts64 div GetInt64(Var2, Result); {$ENDIF}
+            btSingle: var1^.tsingle := var1^.tsingle / GetReal( Var2, Result);
+            btDouble: var1^.tdouble := var1^.tdouble / GetReal( Var2, Result);
+            btExtended: var1^.textended := var1^.textended / GetReal( Var2, Result);
+            btCurrency: var1^.tcurrency := var1^.tcurrency / GetReal( Var2, Result);
+            else Result := False;
+          end;
+        end;
+      otMod:
+        begin { MOD }
+          case Var1.FType.BaseType of
+            btU8: var1^.tu8 := var1^.tu8 mod GetUint(Var2, Result);
+            btS8: var1^.ts8 := var1^.ts8 mod Getint(Var2, Result);
+            btU16: var1^.tu16 := var1^.tu16 mod GetUint(Var2, Result);
+            btS16: var1^.ts16 := var1^.ts16 mod Getint(Var2, Result);
+            btU32: var1^.tu32 := var1^.tu32 mod GetUint(Var2, Result);
+            btS32: var1^.ts32 := var1^.ts32 mod Getint(Var2, Result);
+            {$IFNDEF PS_NOINT64}btS64: var1^.ts64 := var1^.ts64 mod GetInt64(Var2, Result); {$ENDIF}
+            else Result := False;
+          end;
+        end;
+      otshl:
+        begin { SHL }
+          case Var1.FType.BaseType of
+            btU8: var1^.tu8 := var1^.tu8 shl GetUint(Var2, Result);
+            btS8: var1^.ts8 := var1^.ts8 shl Getint(Var2, Result);
+            btU16: var1^.tu16 := var1^.tu16 shl GetUint(Var2, Result);
+            btS16: var1^.ts16 := var1^.ts16 shl Getint(Var2, Result);
+            btU32: var1^.tu32 := var1^.tu32 shl GetUint(Var2, Result);
+            btS32: var1^.ts32 := var1^.ts32 shl Getint(Var2, Result);
+            {$IFNDEF PS_NOINT64}btS64: var1^.ts64 := var1^.ts64 shl GetInt64(Var2, Result); {$ENDIF}
+            else Result := False;
+          end;
+        end;
+      otshr:
+        begin { SHR }
+          case Var1.FType.BaseType of
+            btU8: var1^.tu8 := var1^.tu8 shr GetUint(Var2, Result);
+            btS8: var1^.ts8 := var1^.ts8 shr Getint(Var2, Result);
+            btU16: var1^.tu16 := var1^.tu16 shr GetUint(Var2, Result);
+            btS16: var1^.ts16 := var1^.ts16 shr Getint(Var2, Result);
+            btU32: var1^.tu32 := var1^.tu32 shr GetUint(Var2, Result);
+            btS32: var1^.ts32 := var1^.ts32 shr Getint(Var2, Result);
+            {$IFNDEF PS_NOINT64}btS64: var1^.ts64 := var1^.ts64 shr GetInt64( Var2, Result); {$ENDIF}
+            else Result := False;
+          end;
+        end;
+      otAnd:
+        begin { AND }
+          case Var1.FType.BaseType of
+            btU8: var1^.tu8 := var1^.tu8 and GetUint(Var2, Result);
+            btS8: var1^.ts8 := var1^.ts8 and Getint(Var2, Result);
+            btU16: var1^.tu16 := var1^.tu16 and GetUint(Var2, Result);
+            btS16: var1^.ts16 := var1^.ts16 and Getint(Var2, Result);
+            btU32: var1^.tu32 := var1^.tu32 and GetUint(Var2, Result);
+            btS32: var1^.ts32 := var1^.ts32 and Getint(Var2, Result);
+            btEnum: var1^.ts32 := var1^.ts32 and Getint(Var2, Result);
+            {$IFNDEF PS_NOINT64}btS64: var1^.ts64 := var1^.ts64 and GetInt64(Var2, Result); {$ENDIF}
+            else Result := False;
+          end;
+        end;
+      otor:
+        begin { OR }
+          case Var1.FType.BaseType of
+            btU8: var1^.tu8 := var1^.tu8 or GetUint(Var2, Result);
+            btS8: var1^.ts8 := var1^.ts8 or Getint(Var2, Result);
+            btU16: var1^.tu16 := var1^.tu16 or GetUint(Var2, Result);
+            btS16: var1^.ts16 := var1^.ts16 or Getint(Var2, Result);
+            btU32: var1^.tu32 := var1^.tu32 or GetUint(Var2, Result);
+            btS32: var1^.ts32 := var1^.ts32 or Getint(Var2, Result);
+            {$IFNDEF PS_NOINT64}btS64: var1^.ts64 := var1^.ts64 or GetInt64(Var2, Result); {$ENDIF}
+            btEnum: var1^.ts32 := var1^.ts32 or Getint(Var2, Result);
+            else Result := False;
+          end;
+        end;
+      otxor:
+        begin { XOR }
+          case Var1.FType.BaseType of
+            btU8: var1^.tu8 := var1^.tu8 xor GetUint(Var2, Result);
+            btS8: var1^.ts8 := var1^.ts8 xor Getint(Var2, Result);
+            btU16: var1^.tu16 := var1^.tu16 xor GetUint(Var2, Result);
+            btS16: var1^.ts16 := var1^.ts16 xor Getint(Var2, Result);
+            btU32: var1^.tu32 := var1^.tu32 xor GetUint(Var2, Result);
+            btS32: var1^.ts32 := var1^.ts32 xor Getint(Var2, Result);
+            {$IFNDEF PS_NOINT64}btS64: var1^.ts64 := var1^.ts64 xor GetInt64(Var2, Result); {$ENDIF}
+            btEnum: var1^.ts32 := var1^.ts32 xor Getint(Var2, Result);
+            else Result := False;
+          end;
+        end;
+      otGreaterEqual:
+        begin { >= }
+          case Var1.FType.BaseType of
+            btU8: b := var1^.tu8 >= GetUint(Var2, Result);
+            btS8: b := var1^.ts8 >= Getint(Var2, Result);
+            btU16: b := var1^.tu16 >= GetUint(Var2, Result);
+            btS16: b := var1^.ts16 >= Getint(Var2, Result);
+            btU32: b := var1^.tu32 >= GetUint(Var2, Result);
+            btS32: b := var1^.ts32 >= Getint(Var2, Result);
+            {$IFNDEF PS_NOINT64}btS64: b := var1^.ts64 >= GetInt64(Var2, Result); {$ENDIF}
+            btSingle: b := var1^.tsingle >= GetReal( Var2, Result);
+            btDouble: b := var1^.tdouble >= GetReal( Var2, Result);
+            btExtended: b := var1^.textended >= GetReal( Var2, Result);
+            btCurrency: b := var1^.tcurrency >= GetReal( Var2, Result);
+            btSet:
+              begin
+                if (var1.FType = var2.FType) then
+                begin
+                  Set_Subset(var2.tstring, var1.tstring, TPSSetType(var1.FType).ByteSize, b);
+                end else Result := False;
+              end;
+          else
+            Result := False;
+          end;
+          ConvertToBoolean(Self, FUseUsedTypes, Var1, b);
+        end;
+      otLessEqual:
+        begin { <= }
+          case Var1.FType.BaseType of
+            btU8: b := var1^.tu8 <= GetUint(Var2, Result);
+            btS8: b := var1^.ts8 <= Getint(Var2, Result);
+            btU16: b := var1^.tu16 <= GetUint(Var2, Result);
+            btS16: b := var1^.ts16 <= Getint(Var2, Result);
+            btU32: b := var1^.tu32 <= GetUint(Var2, Result);
+            btS32: b := var1^.ts32 <= Getint(Var2, Result);
+            {$IFNDEF PS_NOINT64}btS64: b := var1^.ts64 <= GetInt64(Var2, Result); {$ENDIF}
+            btSingle: b := var1^.tsingle <= GetReal( Var2, Result);
+            btDouble: b := var1^.tdouble <= GetReal( Var2, Result);
+            btExtended: b := var1^.textended <= GetReal( Var2, Result);
+            btCurrency: b := var1^.tcurrency <= GetReal( Var2, Result);
+            btSet:
+              begin
+                if (var1.FType = var2.FType) then
+                begin
+                  Set_Subset(var1.tstring, var2.tstring, TPSSetType(var1.FType).ByteSize, b);
+                end else Result := False;
+              end;
+          else
+            Result := False;
+          end;
+          ConvertToBoolean(Self, FUseUsedTypes, Var1, b);
+        end;
+      otGreater:
+        begin { > }
+          case Var1.FType.BaseType of
+            btU8: b := var1^.tu8 > GetUint(Var2, Result);
+            btS8: b := var1^.ts8 > Getint(Var2, Result);
+            btU16: b := var1^.tu16 > GetUint(Var2, Result);
+            btS16: b := var1^.ts16 > Getint(Var2, Result);
+            btU32: b := var1^.tu32 > GetUint(Var2, Result);
+            btS32: b := var1^.ts32 > Getint(Var2, Result);
+            {$IFNDEF PS_NOINT64}btS64: b := var1^.ts64 > GetInt64(Var2, Result); {$ENDIF}
+            btSingle: b := var1^.tsingle > GetReal( Var2, Result);
+            btDouble: b := var1^.tdouble > GetReal( Var2, Result);
+            btExtended: b := var1^.textended > GetReal( Var2, Result);
+            btCurrency: b := var1^.tcurrency > GetReal( Var2, Result);
+          else
+            Result := False;
+          end;
+          ConvertToBoolean(Self, FUseUsedTypes, Var1, b);
+        end;
+      otLess:
+        begin { < }
+          case Var1.FType.BaseType of
+            btU8: b := var1^.tu8 < GetUint(Var2, Result);
+            btS8: b := var1^.ts8 < Getint(Var2, Result);
+            btU16: b := var1^.tu16 < GetUint(Var2, Result);
+            btS16: b := var1^.ts16 < Getint(Var2, Result);
+            btU32: b := var1^.tu32 < GetUint(Var2, Result);
+            btS32: b := var1^.ts32 < Getint(Var2, Result);
+            {$IFNDEF PS_NOINT64}btS64: b := var1^.ts64 < GetInt64(Var2, Result); {$ENDIF}
+            btSingle: b := var1^.tsingle < GetReal( Var2, Result);
+            btDouble: b := var1^.tdouble < GetReal( Var2, Result);
+            btExtended: b := var1^.textended < GetReal( Var2, Result);
+            btCurrency: b := var1^.tcurrency < GetReal( Var2, Result);
+          else
+            Result := False;
+          end;
+          ConvertToBoolean(Self, FUseUsedTypes, Var1, b);
+        end;
+      otNotEqual:
+        begin { <> }
+          case Var1.FType.BaseType of
+            btU8: b := var1^.tu8 <> GetUint(Var2, Result);
+            btS8: b := var1^.ts8 <> Getint(Var2, Result);
+            btU16: b := var1^.tu16 <> GetUint(Var2, Result);
+            btS16: b := var1^.ts16 <> Getint(Var2, Result);
+            btU32: b := var1^.tu32 <> GetUint(Var2, Result);
+            {$IFNDEF PS_NOINT64}btS64: b := var1^.ts64 <> GetInt64(Var2, Result); {$ENDIF}
+            btS32: b := var1^.ts32 <> Getint(Var2, Result);
+            btSingle: b := var1^.tsingle <> GetReal( Var2, Result);
+            btDouble: b := var1^.tdouble <> GetReal( Var2, Result);
+            btExtended: b := var1^.textended <> GetReal( Var2, Result);
+            btCurrency: b := var1^.tcurrency <> GetReal( Var2, Result);
+            btEnum: b := var1^.ts32 <> Getint(Var2, Result);
+            btString: b := tbtstring(var1^.tstring) <> GetString(var2, Result);
+            btChar: b := var1^.tchar <> GetString(var2, Result);
+            {$IFNDEF PS_NOWIDESTRING}
+            btWideString: b := tbtWideString(var1^.twidestring) <> GetWideString(var2, Result);
+            btWideChar: b := var1^.twidechar <> GetWideString(var2, Result);
+            {$ENDIF}
+            btSet:
+              begin
+                if (var1.FType = var2.FType) then
+                begin
+                  Set_Equal(var1.tstring, var2.tstring, TPSSetType(var1.FType).GetByteSize, b);
+                  b := not b;
+                end else Result := False;
+              end;
+          else
+            Result := False;
+          end;
+          ConvertToBoolean(Self, FUseUsedTypes, Var1, b);
+        end;
+      otEqual:
+        begin { = }
+          case Var1.FType.BaseType of
+            btU8: b := var1^.tu8 = GetUint(Var2, Result);
+            btS8: b := var1^.ts8 = Getint(Var2, Result);
+            btU16: b := var1^.tu16 = GetUint(Var2, Result);
+            btS16: b := var1^.ts16 = Getint(Var2, Result);
+            btU32: b := var1^.tu32 = GetUint(Var2, Result);
+            btS32: b := var1^.ts32 = Getint(Var2, Result);
+            {$IFNDEF PS_NOINT64}btS64: b := var1^.ts64 = GetInt64(Var2, Result); {$ENDIF}
+            btSingle: b := var1^.tsingle = GetReal( Var2, Result);
+            btDouble: b := var1^.tdouble = GetReal( Var2, Result);
+            btExtended: b := var1^.textended = GetReal( Var2, Result);
+            btCurrency: b := var1^.tcurrency = GetReal( Var2, Result);
+            btEnum: b := var1^.ts32 = Getint(Var2, Result);
+            btString: b := tbtstring(var1^.tstring) = GetString(var2, Result);
+            btChar: b := var1^.tchar = GetString(var2, Result);
+            {$IFNDEF PS_NOWIDESTRING}
+            btWideString: b := tbtWideString(var1^.twidestring) = GetWideString(var2, Result);
+            btWideChar: b := var1^.twidechar = GetWideString(var2, Result);
+            {$ENDIF}
+            btSet:
+              begin
+                if (var1.FType = var2.FType) then
+                begin
+                  Set_Equal(var1.tstring, var2.tstring, TPSSetType(var1.FType).ByteSize, b);
+                end else Result := False;
+              end;
+          else
+            Result := False;
+          end;
+          ConvertToBoolean(Self, FUseUsedTypes, Var1, b);
+        end;
+      otIn:
+        begin
+          if (var2.Ftype.BaseType = btset) and (TPSSetType(var2).SetType = Var1.FType) then
+          begin
+            Set_membership(GetUint(var1, result), var2.tstring, b);
+          end else Result := False;
+        end;
+      else
+        Result := False;
+    end;
+  except
+    on E: EDivByZero do
+    begin
+      Result := False;
+      MakeError('', ecDivideByZero, '');
+      Exit;
+    end;
+    on E: EZeroDivide do
+    begin
+      Result := False;
+      MakeError('', ecDivideByZero, '');
+      Exit;
+    end;
+    on E: EMathError do
+    begin
+      Result := False;
+      MakeError('', ecMathError, tbtstring(e.Message));
+      Exit;
+    end;
+    on E: Exception do
+    begin
+      Result := False;
+      MakeError('', ecInternalError, tbtstring(E.Message));
+      Exit;
+    end;
+  end;
+  if not Result then
+  begin
+    with MakeError('', ecTypeMismatch, '') do
+    begin
+      FPosition := Pos;
+      FRow := Row;
+      FCol := Col;
+    end;
+  end;
+end;
+
+function TPSPascalCompiler.IsDuplicate(const s: tbtString; const check: TPSDuplicCheck): Boolean;
+var
+  h, l: Longint;
+  x: TPSProcedure;
+begin
+  h := MakeHash(s);
+  if (s = 'RESULT') then
+  begin
+    Result := True;
+    exit;
+  end;
+  if dcTypes in Check then
+  for l := FTypes.Count - 1 downto 0 do
+  begin
+    if (TPSType(FTypes.Data[l]).NameHash = h) and
+      (TPSType(FTypes.Data[l]).Name = s) then
+    begin
+      Result := True;
+      exit;
+    end;
+  end;
+
+  if dcProcs in Check then
+  for l := FProcs.Count - 1 downto 0 do
+  begin
+    x := FProcs.Data[l];
+    if x.ClassType = TPSInternalProcedure then
+    begin
+      if (h = TPSInternalProcedure(x).NameHash) and (s = TPSInternalProcedure(x).Name) then
+      begin
+        Result := True;
+        exit;
+      end;
+    end
+    else
+    begin
+      if (TPSExternalProcedure(x).RegProc.NameHash = h) and
+        (TPSExternalProcedure(x).RegProc.Name = s) then
+      begin
+        Result := True;
+        exit;
+      end;
+    end;
+  end;
+  if dcVars in Check then
+  for l := FVars.Count - 1 downto 0 do
+  begin
+    if (TPSVar(FVars.Data[l]).NameHash = h) and
+      (TPSVar(FVars.Data[l]).Name = s) then
+    begin
+      Result := True;
+      exit;
+    end;
+  end;
+  if dcConsts in Check then
+  for l := FConstants.Count -1 downto 0 do
+  begin
+    if (TPSConstant(FConstants.Data[l]).NameHash = h) and
+      (TPSConstant(FConstants.Data[l]).Name = s) then
+    begin
+      Result := TRue;
+      exit;
+    end;
+  end;
+  Result := False;
+end;
+
+procedure ClearRecSubVals(RecSubVals: TPSList);
+var
+  I: Longint;
+begin
+  for I := 0 to RecSubVals.Count - 1 do
+    TPSRecordFieldTypeDef(RecSubVals[I]).Free;
+  RecSubVals.Free;
+end;
+
+function TPSPascalCompiler.ReadTypeAddProcedure(const Name: tbtString; FParser: TPSPascalParser): TPSType;
+var
+  IsFunction: Boolean;
+  VNames: tbtString;
+  modifier: TPSParameterMode;
+  Decl: TPSParametersDecl;
+  VCType: TPSType;
+begin
+  if FParser.CurrTokenId = CSTII_Function then
+    IsFunction := True
+  else
+    IsFunction := False;
+  Decl := TPSParametersDecl.Create;
+  try
+    FParser.Next;
+    if FParser.CurrTokenId = CSTI_OpenRound then
+    begin
+      FParser.Next;
+      if FParser.CurrTokenId <> CSTI_CloseRound then
+      begin
+        while True do
+        begin
+          if FParser.CurrTokenId = CSTII_Const then
+          begin
+            Modifier := pmIn;
+            FParser.Next;
+          end else
+          if FParser.CurrTokenId = CSTII_Out then
+          begin
+            Modifier := pmOut;
+            FParser.Next;
+          end else
+          if FParser.CurrTokenId = CSTII_Var then
+          begin
+            modifier := pmInOut;
+            FParser.Next;
+          end
+          else
+            modifier := pmIn;
+          if FParser.CurrTokenId <> CSTI_Identifier then
+          begin
+            Result := nil;
+            if FParser = Self.FParser then
+            MakeError('', ecIdentifierExpected, '');
+            exit;
+          end;
+          VNames := FParser.OriginalToken + '|';
+          FParser.Next;
+          while FParser.CurrTokenId = CSTI_Comma do
+          begin
+            FParser.Next;
+            if FParser.CurrTokenId <> CSTI_Identifier then
+            begin
+              Result := nil;
+              if FParser = Self.FParser then
+              MakeError('', ecIdentifierExpected, '');
+              exit;
+            end;
+            VNames := VNames + FParser.GetToken + '|';
+            FParser.Next;
+          end;
+          if FParser.CurrTokenId <> CSTI_Colon then
+          begin
+            Result := nil;
+            if FParser = Self.FParser then
+              MakeError('', ecColonExpected, '');
+            exit;
+          end;
+          FParser.Next;
+          if FParser.CurrTokenId <> CSTI_Identifier then
+          begin
+            Result := nil;
+            if FParser = self.FParser then
+            MakeError('', ecIdentifierExpected, '');
+            exit;
+          end;
+          VCType := FindType(FParser.GetToken);
+          if VCType = nil then
+          begin
+            if FParser = self.FParser then
+            MakeError('', ecUnknownIdentifier, FParser.OriginalToken);
+            Result := nil;
+            exit;
+          end;
+          while Pos(tbtchar('|'), VNames) > 0 do
+          begin
+            with Decl.AddParam do
+            begin
+              Mode := modifier;
+              OrgName := copy(VNames, 1, Pos(tbtchar('|'), VNames) - 1);
+              FType := VCType;
+            end;
+            Delete(VNames, 1, Pos(tbtchar('|'), VNames));
+          end;
+          FParser.Next;
+          if FParser.CurrTokenId = CSTI_CloseRound then
+            break;
+          if FParser.CurrTokenId <> CSTI_Semicolon then
+          begin
+            if FParser = Self.FParser then
+            MakeError('', ecSemicolonExpected, '');
+            Result := nil;
+            exit;
+          end;
+          FParser.Next;
+        end; {while}
+      end; {if}
+      FParser.Next;
+      end; {if}
+      if IsFunction then
+      begin
+        if FParser.CurrTokenId <> CSTI_Colon then
+        begin
+          if FParser = Self.FParser then
+          MakeError('', ecColonExpected, '');
+          Result := nil;
+          exit;
+        end;
+      FParser.Next;
+      if FParser.CurrTokenId <> CSTI_Identifier then
+      begin
+        Result := nil;
+        if FParser = Self.FParser then
+        MakeError('', ecIdentifierExpected, '');
+        exit;
+      end;
+      VCType := self.FindType(FParser.GetToken);
+      if VCType = nil then
+      begin
+        if FParser = self.FParser then
+        MakeError('', ecUnknownIdentifier, FParser.OriginalToken);
+        Result := nil;
+        exit;
+      end;
+      FParser.Next;
+    end
+    else
+      VCType := nil;
+    Decl.Result := VcType;
+    VCType := TPSProceduralType.Create;
+    VCType.Name := FastUppercase(Name);
+    VCType.OriginalName := Name;
+    VCType.BaseType := btProcPtr;
+    {$IFDEF PS_USESSUPPORT}
+    VCType.DeclareUnit:=fModule;
+    {$ENDIF}
+    VCType.DeclarePos := FParser.CurrTokenPos;
+    VCType.DeclareRow := FParser.Row;
+    VCType.DeclareCol := FParser.Col;
+    TPSProceduralType(VCType).ProcDef.Assign(Decl);
+    FTypes.Add(VCType);
+    Result := VCType;
+  finally
+    Decl.Free;
+  end;
+end; {ReadTypeAddProcedure}
+
+
+function TPSPascalCompiler.ReadType(const Name: tbtString; FParser: TPSPascalParser): TPSType; // InvalidVal = Invalid
+var
+  TypeNo: TPSType;
+  h, l: Longint;
+  FieldName,fieldorgname,s: tbtString;
+  RecSubVals: TPSList;
+  FArrayStart, FArrayLength: Longint;
+  rvv: PIFPSRecordFieldTypeDef;
+  p, p2: TPSType;
+  tempf: PIfRVariant;
+
+begin
+  if (FParser.CurrTokenID = CSTII_Function) or (FParser.CurrTokenID = CSTII_Procedure) then
+  begin
+     Result := ReadTypeAddProcedure(Name, FParser);
+     Exit;
+  end else if FParser.CurrTokenId = CSTII_Set then
+  begin
+    FParser.Next;
+    if FParser.CurrTokenId <> CSTII_Of then
+    begin
+      MakeError('', ecOfExpected, '');
+      Result := nil;
+      Exit;
+    end;
+    FParser.Next;
+    if FParser.CurrTokenID <> CSTI_Identifier then
+    begin
+      MakeError('', ecIdentifierExpected, '');
+      Result := nil;
+      exit;
+    end;
+    TypeNo := FindType(FParser.GetToken);
+    if TypeNo = nil then
+    begin
+      MakeError('', ecUnknownIdentifier, '');
+      Result := nil;
+      exit;
+    end;
+    if (TypeNo.BaseType = btEnum) or (TypeNo.BaseType = btChar) or (TypeNo.BaseType = btU8) then
+    begin
+      FParser.Next;
+      p2 := TPSSetType.Create;
+      p2.Name := FastUppercase(Name);
+      p2.OriginalName := Name;
+      p2.BaseType := btSet;
+      {$IFDEF PS_USESSUPPORT}
+      p2.DeclareUnit:=fModule;
+      {$ENDIF}
+      p2.DeclarePos := FParser.CurrTokenPos;
+      p2.DeclareRow := FParser.Row;
+      p2.DeclareCol := FParser.Col;
+      TPSSetType(p2).SetType := TypeNo;
+      FTypes.Add(p2);
+      Result := p2;
+    end else
+    begin
+      MakeError('', ecTypeMismatch, '');
+      Result := nil;
+    end;
+    exit;
+  end else if FParser.CurrTokenId = CSTI_OpenRound then
+  begin
+    FParser.Next;
+    L := 0;
+    P2 := TPSEnumType.Create;
+    P2.Name := FastUppercase(Name);
+    p2.OriginalName := Name;
+    p2.BaseType := btEnum;
+    {$IFDEF PS_USESSUPPORT}
+    p2.DeclareUnit:=fModule;
+    {$ENDIF}
+    p2.DeclarePos := FParser.CurrTokenPos;
+    p2.DeclareRow := FParser.Row;
+    p2.DeclareCol := FParser.Col;
+    FTypes.Add(p2);
+
+    repeat
+      if FParser.CurrTokenId <> CSTI_Identifier then
+      begin
+        if FParser = Self.FParser then
+        MakeError('', ecIdentifierExpected, '');
+        Result := nil;
+        exit;
+      end;
+      s := FParser.OriginalToken;
+      if IsDuplicate(FastUppercase(s), [dcTypes]) then
+      begin
+        if FParser = Self.FParser then
+        MakeError('', ecDuplicateIdentifier, s);
+        Result := nil;
+        Exit;
+      end;
+      with AddConstant(s, p2) do
+      begin
+        FValue.tu32 := L;
+        {$IFDEF PS_USESSUPPORT}
+        DeclareUnit:=fModule;
+        {$ENDIF}
+        DeclarePos:=FParser.CurrTokenPos;
+        DeclareRow:=FParser.Row;
+        DeclareCol:=FParser.Col;
+      end;
+      Inc(L);
+      FParser.Next;
+      if FParser.CurrTokenId = CSTI_CloseRound then
+        Break
+      else if FParser.CurrTokenId <> CSTI_Comma then
+      begin
+        if FParser = Self.FParser then
+        MakeError('', ecCloseRoundExpected, '');
+        Result := nil;
+        Exit;
+      end;
+      FParser.Next;
+    until False;
+    FParser.Next;
+    TPSEnumType(p2).HighValue := L-1;
+    Result := p2;
+    exit;
+  end else
+  if FParser.CurrTokenId = CSTII_Array then
+  begin
+    FParser.Next;
+    if FParser.CurrTokenID = CSTI_OpenBlock then
+    begin
+      FParser.Next;
+      tempf := ReadConstant(FParser, CSTI_TwoDots);
+      if tempf = nil then
+      begin
+        Result := nil;
+        exit;
+      end;
+      case tempf.FType.BaseType of
+        btU8: FArrayStart := tempf.tu8;
+        btS8: FArrayStart := tempf.ts8;
+        btU16: FArrayStart := tempf.tu16;
+        btS16: FArrayStart := tempf.ts16;
+        btU32: FArrayStart := tempf.tu32;
+        btS32: FArrayStart := tempf.ts32;
+        {$IFNDEF PS_NOINT64}
+        bts64: FArrayStart := tempf.ts64;
+        {$ENDIF}
+      else
+        begin
+          DisposeVariant(tempf);
+          MakeError('', ecTypeMismatch, '');
+          Result := nil;
+          exit;
+        end;
+      end;
+      DisposeVariant(tempf);
+      if FParser.CurrTokenID <> CSTI_TwoDots then
+      begin
+        MakeError('', ecPeriodExpected, '');
+        Result := nil;
+        exit;
+      end;
+      FParser.Next;
+      tempf := ReadConstant(FParser, CSTI_CloseBlock);
+      if tempf = nil then
+      begin
+        Result := nil;
+        exit;
+      end;
+      case tempf.FType.BaseType of
+        btU8: FArrayLength := tempf.tu8;
+        btS8: FArrayLength := tempf.ts8;
+        btU16: FArrayLength := tempf.tu16;
+        btS16: FArrayLength := tempf.ts16;
+        btU32: FArrayLength := tempf.tu32;
+        btS32: FArrayLength := tempf.ts32;
+        {$IFNDEF PS_NOINT64}
+        bts64: FArrayLength := tempf.ts64;
+        {$ENDIF}
+      else
+        DisposeVariant(tempf);
+        MakeError('', ecTypeMismatch, '');
+        Result := nil;
+        exit;
+      end;
+      DisposeVariant(tempf);
+      FArrayLength := FArrayLength - FArrayStart + 1;
+      if (FArrayLength < 0) or (FArrayLength > MaxInt div 4) then
+      begin
+        MakeError('', ecTypeMismatch, '');
+        Result := nil;
+        exit;
+      end;
+      if FParser.CurrTokenID <> CSTI_CloseBlock then
+      begin
+        MakeError('', ecCloseBlockExpected, '');
+        Result := nil;
+        exit;
+      end;
+      FParser.Next;
+    end else
+    begin
+      FArrayStart := 0;
+      FArrayLength := -1;
+    end;
+    if FParser.CurrTokenId <> CSTII_Of then
+    begin
+      if FParser = Self.FParser then
+      MakeError('', ecOfExpected, '');
+      Result := nil;
+      exit;
+    end;
+    FParser.Next;
+    TypeNo := ReadType('', FParser);
+    if TypeNo = nil then
+    begin
+      if FParser = Self.FParser then
+      MakeError('', ecUnknownIdentifier, '');
+      Result := nil;
+      exit;
+    end;
+    if (Name = '') and (FArrayLength = -1) then
+    begin
+      if TypeNo.Used then
+      begin
+        for h := 0 to FTypes.Count -1 do
+        begin
+          p := FTypes[H];
+          if (p.BaseType = btArray) and (TPSArrayType(p).ArrayTypeNo = TypeNo) and (Copy(p.Name, 1, 1) <> '!') then
+          begin
+            Result := p;
+            exit;
+          end;
+        end;
+      end;
+    end;
+    if FArrayLength <> -1 then
+    begin
+      p := TPSStaticArrayType.Create;
+      TPSStaticArrayType(p).StartOffset := FArrayStart;
+      TPSStaticArrayType(p).Length := FArrayLength;
+      p.BaseType := btStaticArray;
+    end else
+    begin
+      p := TPSArrayType.Create;
+      p.BaseType := btArray;
+    end;
+    p.Name := FastUppercase(Name);
+    p.OriginalName := Name;
+    {$IFDEF PS_USESSUPPORT}
+    p.DeclareUnit:=fModule;
+    {$ENDIF}
+    p.DeclarePos := FParser.CurrTokenPos;
+    p.DeclareRow := FParser.Row;
+    p.DeclareCol := FParser.Col;
+    TPSArrayType(p).ArrayTypeNo := TypeNo;
+    FTypes.Add(p);
+    Result := p;
+    Exit;
+  end
+  else if FParser.CurrTokenId = CSTII_Record then
+  begin
+    FParser.Next;
+    RecSubVals := TPSList.Create;
+    repeat
+      repeat
+        if FParser.CurrTokenId <> CSTI_Identifier then
+        begin
+          ClearRecSubVals(RecSubVals);
+          if FParser = Self.FParser then
+          MakeError('', ecIdentifierExpected, '');
+          Result := nil;
+          exit;
+        end;
+        FieldName := FParser.GetToken;
+        s := S+FParser.OriginalToken+'|';
+        FParser.Next;
+        h := MakeHash(FieldName);
+        for l := 0 to RecSubVals.Count - 1 do
+        begin
+          if (PIFPSRecordFieldTypeDef(RecSubVals[l]).FieldNameHash = h) and
+            (PIFPSRecordFieldTypeDef(RecSubVals[l]).FieldName = FieldName) then
+          begin
+            if FParser = Self.FParser then
+              MakeError('', ecDuplicateIdentifier, FParser.OriginalToken);
+            ClearRecSubVals(RecSubVals);
+            Result := nil;
+            exit;
+          end;
+        end;
+        if FParser.CurrTokenID = CSTI_Colon then Break else
+        if FParser.CurrTokenID <> CSTI_Comma then
+        begin
+          if FParser = Self.FParser then
+            MakeError('', ecColonExpected, '');
+          ClearRecSubVals(RecSubVals);
+          Result := nil;
+          exit;
+        end;
+        FParser.Next;
+      until False;
+      FParser.Next;
+      p := ReadType('', FParser);
+      if p = nil then
+      begin
+        ClearRecSubVals(RecSubVals);
+        Result := nil;
+        exit;
+      end;
+      p := GetTypeCopyLink(p);
+      if FParser.CurrTokenId <> CSTI_Semicolon then
+      begin
+        ClearRecSubVals(RecSubVals);
+        if FParser = Self.FParser then
+        MakeError('', ecSemicolonExpected, '');
+        Result := nil;
+        exit;
+      end; {if}
+      FParser.Next;
+      while Pos(tbtchar('|'), s) > 0 do
+      begin
+        fieldorgname := copy(s, 1, Pos(tbtchar('|'), s)-1);
+        Delete(s, 1, length(FieldOrgName)+1);
+        rvv := TPSRecordFieldTypeDef.Create;
+        rvv.FieldOrgName := fieldorgname;
+        rvv.FType := p;
+        RecSubVals.Add(rvv);
+      end;
+    until FParser.CurrTokenId = CSTII_End;
+    FParser.Next; // skip CSTII_End
+    P := TPSRecordType.Create;
+    p.Name := FastUppercase(Name);
+    p.OriginalName := Name;
+    p.BaseType := btRecord;
+    {$IFDEF PS_USESSUPPORT}
+    p.DeclareUnit:=fModule;
+    {$ENDIF}
+    p.DeclarePos := FParser.CurrTokenPos;
+    p.DeclareRow := FParser.Row;
+    p.DeclareCol := FParser.Col;
+    for l := 0 to RecSubVals.Count -1 do
+    begin
+      rvv := RecSubVals[l];
+      with TPSRecordType(p).AddRecVal do
+      begin
+        FieldOrgName := rvv.FieldOrgName;
+        FType := rvv.FType;
+      end;
+      rvv.Free;
+    end;
+    RecSubVals.Free;
+    FTypes.Add(p);
+    Result := p;
+    Exit;
+  end else if FParser.CurrTokenId = CSTI_Identifier then
+  begin
+    s := FParser.GetToken;
+    h := MakeHash(s);
+    Typeno := nil;
+    for l := 0 to FTypes.Count - 1 do
+    begin
+      p2 := FTypes[l];
+      if (p2.NameHash = h) and (p2.Name = s) then
+      begin
+        FParser.Next;
+        Typeno := GetTypeCopyLink(p2);
+        Break;
+      end;
+    end;
+    if Typeno = nil then
+    begin
+      Result := nil;
+      if FParser = Self.FParser then
+      MakeError('', ecUnknownType, FParser.OriginalToken);
+      exit;
+    end;
+    if Name <> '' then
+    begin
+      p := TPSTypeLink.Create;
+      p.Name := FastUppercase(Name);
+      p.OriginalName := Name;
+      p.BaseType := BtTypeCopy;
+      {$IFDEF PS_USESSUPPORT}
+      p.DeclareUnit:=fModule;
+      {$ENDIF}
+      p.DeclarePos := FParser.CurrTokenPos;
+      p.DeclareRow := FParser.Row;
+      p.DeclareCol := FParser.Col;
+      TPSTypeLink(p).LinkTypeNo := TypeNo;
+      FTypes.Add(p);
+      Result := p;
+      Exit;
+    end else
+    begin
+      Result := TypeNo;
+      exit;
+    end;
+  end;
+  Result := nil;
+  if FParser = Self.FParser then
+  MakeError('', ecIdentifierExpected, '');
+  Exit;
+end;
+
+function TPSPascalCompiler.VarIsDuplicate(Proc: TPSInternalProcedure; const Varnames, s: tbtString): Boolean;
+var
+  h, l: Longint;
+  x: TPSProcedure;
+  v: tbtString;
+begin
+  h := MakeHash(s);
+  if (s = 'RESULT') then
+  begin
+    Result := True;
+    exit;
+  end;
+
+  for l := FProcs.Count - 1 downto 0 do
+  begin
+    x := FProcs.Data[l];
+    if x.ClassType = TPSInternalProcedure then
+    begin
+      if (h = TPSInternalProcedure(x).NameHash) and (s = TPSInternalProcedure(x).Name) then
+      begin
+        Result := True;
+        exit;
+      end;
+    end
+    else
+    begin
+      if (TPSExternalProcedure(x).RegProc.NameHash = h) and (TPSExternalProcedure(x).RegProc.Name = s) then
+      begin
+        Result := True;
+        exit;
+      end;
+    end;
+  end;
+  if proc <> nil then
+  begin
+    for l := proc.ProcVars.Count - 1 downto 0 do
+    begin
+      if (PIFPSProcVar(proc.ProcVars.Data[l]).NameHash = h) and
+        (PIFPSProcVar(proc.ProcVars.Data[l]).Name = s) then
+      begin
+        Result := True;
+        exit;
+      end;
+    end;
+    for l := Proc.FDecl.ParamCount -1 downto 0 do
+    begin
+      if (Proc.FDecl.Params[l].Name = s) then
+      begin
+        Result := True;
+        exit;
+      end;
+    end;
+  end
+  else
+  begin
+    for l := FVars.Count - 1 downto 0 do
+    begin
+      if (TPSVar(FVars.Data[l]).NameHash = h) and
+        (TPSVar(FVars.Data[l]).Name = s) then
+      begin
+        Result := True;
+        exit;
+      end;
+    end;
+  end;
+  v := VarNames;
+  while Pos(tbtchar('|'), v) > 0 do
+  begin
+    if copy(v, 1, Pos(tbtchar('|'), v) - 1) = s then
+    begin
+      Result := True;
+      exit;
+    end;
+    Delete(v, 1, Pos(tbtchar('|'), v));
+  end;
+  for l := FConstants.Count -1 downto 0 do
+  begin
+    if (TPSConstant(FConstants.Data[l]).NameHash = h) and
+      (TPSConstant(FConstants.Data[l]).Name = s) then
+    begin
+      Result := True;
+      exit;
+    end;
+  end;
+  Result := False;
+end;
+
+
+function TPSPascalCompiler.DoVarBlock(proc: TPSInternalProcedure): Boolean;
+var
+  VarName, s: tbtString;
+  VarType: TPSType;
+  VarNo: Cardinal;
+  v: TPSVar;
+  vp: PIFPSProcVar;
+  EPos, ERow, ECol: Integer;
+begin
+  Result := False;
+  FParser.Next; // skip CSTII_Var
+  if FParser.CurrTokenId <> CSTI_Identifier then
+  begin
+    MakeError('', ecIdentifierExpected, '');
+    exit;
+  end;
+  repeat
+    if VarIsDuplicate(proc, VarName, FParser.GetToken) then
+    begin
+      MakeError('', ecDuplicateIdentifier, FParser.OriginalToken);
+      exit;
+    end;
+    VarName := FParser.OriginalToken + '|';
+    Varno := 0;
+    if @FOnUseVariable <> nil then
+    begin
+      if Proc <> nil then
+        FOnUseVariable(Self, ivtVariable, Proc.ProcVars.Count + VarNo, FProcs.Count -1, FParser.CurrTokenPos, '')
+      else
+        FOnUseVariable(Self, ivtGlobal, FVars.Count + VarNo, InvalidVal, FParser.CurrTokenPos, '')
+    end;
+    EPos:=FParser.CurrTokenPos;
+    ERow:=FParser.Row;
+    ECol:=FParser.Col;
+    FParser.Next;
+    while FParser.CurrTokenId = CSTI_Comma do
+    begin
+      FParser.Next;
+      if FParser.CurrTokenId <> CSTI_Identifier then
+      begin
+        MakeError('', ecIdentifierExpected, '');
+      end;
+      if VarIsDuplicate(proc, VarName, FParser.GetToken) then
+      begin
+        MakeError('', ecDuplicateIdentifier, FParser.OriginalToken);
+        exit;
+      end;
+      VarName := VarName + FParser.OriginalToken + '|';
+      Inc(varno);
+      if @FOnUseVariable <> nil then
+      begin
+        if Proc <> nil then
+          FOnUseVariable(Self, ivtVariable, Proc.ProcVars.Count + VarNo, FProcs.Count -1, FParser.CurrTokenPos, '')
+        else
+          FOnUseVariable(Self, ivtGlobal, FVars.Count + VarNo, InvalidVal, FParser.CurrTokenPos, '')
+      end;
+      FParser.Next;
+    end;
+    if FParser.CurrTokenId <> CSTI_Colon then
+    begin
+      MakeError('', ecColonExpected, '');
+      exit;
+    end;
+    FParser.Next;
+    VarType := at2ut(ReadType('', FParser));
+    if VarType = nil then
+    begin
+      exit;
+    end;
+    while Pos(tbtchar('|'), VarName) > 0 do
+    begin
+      s := copy(VarName, 1, Pos(tbtchar('|'), VarName) - 1);
+      Delete(VarName, 1, Pos(tbtchar('|'), VarName));
+      if proc = nil then
+      begin
+        v := TPSVar.Create;
+        v.OrgName := s;
+        v.Name := FastUppercase(s);
+        {$IFDEF PS_USESSUPPORT}
+        v.DeclareUnit:=fModule;
+        {$ENDIF}
+        v.DeclarePos := EPos;
+        v.DeclareRow := ERow;
+        v.DeclareCol := ECol;
+        v.FType := VarType;
+        FVars.Add(v);
+      end
+      else
+      begin
+        vp := TPSProcVar.Create;
+        vp.OrgName := s;
+        vp.Name := FastUppercase(s);
+        vp.aType := VarType;
+        {$IFDEF PS_USESSUPPORT}
+        vp.DeclareUnit:=fModule;
+        {$ENDIF}
+        vp.DeclarePos := EPos;
+        vp.DeclareRow := ERow;
+        vp.DeclareCol := ECol;
+        proc.ProcVars.Add(vp);
+      end;
+    end;
+    if FParser.CurrTokenId <> CSTI_Semicolon then
+    begin
+      MakeError('', ecSemicolonExpected, '');
+      exit;
+    end;
+    FParser.Next;
+  until FParser.CurrTokenId <> CSTI_Identifier;
+  Result := True;
+end;
+
+function TPSPascalCompiler.NewProc(const OriginalName, Name: tbtString): TPSInternalProcedure;
+begin
+  Result := TPSInternalProcedure.Create;
+  Result.OriginalName := OriginalName;
+  Result.Name := Name;
+  {$IFDEF PS_USESSUPPORT}
+  Result.DeclareUnit:=fModule;
+  {$ENDIF}
+  Result.DeclarePos := FParser.CurrTokenPos;
+  Result.DeclareRow := FParser.Row;
+  Result.DeclareCol := FParser.Col;
+  FProcs.Add(Result);
+end;
+
+function TPSPascalCompiler.IsProcDuplicLabel(Proc: TPSInternalProcedure; const s: tbtString): Boolean;
+var
+  i: Longint;
+  h: Longint;
+  u: tbtString;
+begin
+  h := MakeHash(s);
+  if s = 'RESULT' then
+    Result := True
+  else if Proc.Name = s then
+    Result := True
+  else if IsDuplicate(s, [dcVars, dcConsts, dcProcs]) then
+    Result := True
+  else
+  begin
+    for i := 0 to Proc.Decl.ParamCount -1 do
+    begin
+      if Proc.Decl.Params[i].Name = s then
+      begin
+        Result := True;
+        exit;
+      end;
+    end;
+    for i := 0 to Proc.ProcVars.Count -1 do
+    begin
+      if (PIFPSProcVar(Proc.ProcVars[I]).NameHash = h) and (PIFPSProcVar(Proc.ProcVars[I]).Name = s) then
+      begin
+        Result := True;
+        exit;
+      end;
+    end;
+    for i := 0 to Proc.FLabels.Count -1 do
+    begin
+      u := Proc.FLabels[I];
+      delete(u, 1, 4);
+      if Longint((@u[1])^) = h then
+      begin
+        delete(u, 1, 4);
+        if u = s then
+        begin
+          Result := True;
+          exit;
+        end;
+      end;
+    end;
+    Result := False;
+  end;
+end;
+
+
+function TPSPascalCompiler.ProcessLabel(Proc: TPSInternalProcedure): Boolean;
+var
+  CurrLabel: tbtString;
+begin
+  FParser.Next;
+  while true do
+  begin
+    if FParser.CurrTokenId <> CSTI_Identifier then
+    begin
+      MakeError('', ecIdentifierExpected, '');
+      Result := False;
+      exit;
+    end;
+    CurrLabel := FParser.GetToken;
+    if IsProcDuplicLabel(Proc, CurrLabel) then
+    begin
+      MakeError('', ecDuplicateIdentifier, CurrLabel);
+      Result := False;
+      exit;
+    end;
+    FParser.Next;
+    Proc.FLabels.Add(#$FF#$FF#$FF#$FF+PS_mi2s(MakeHash(CurrLabel))+CurrLabel);
+    if FParser.CurrTokenId = CSTI_Semicolon then
+    begin
+      FParser.Next;
+      Break;
+    end;
+    if FParser.CurrTokenId <> CSTI_Comma then
+    begin
+      MakeError('', ecCommaExpected, '');
+      Result := False;
+      exit;
+    end;
+    FParser.Next;
+  end;
+  Result := True;
+end;
+
+procedure TPSPascalCompiler.Debug_SavePosition(ProcNo: Cardinal; Proc: TPSInternalProcedure);
+var
+  Row,
+  Col,
+  Pos: Cardinal;
+  s: tbtString;
+begin
+  Row := FParser.Row;
+  Col := FParser.Col;
+  Pos := FParser.CurrTokenPos;
+  {$IFNDEF PS_USESSUPPORT}
+  s := '';
+  {$ELSE}
+  s := fModule;
+  {$ENDIF}
+  if @FOnTranslateLineInfo <> nil then
+    FOnTranslateLineInfo(Self, Pos, Row, Col, S);
+  {$IFDEF FPC}
+  WriteDebugData(#4 + s + #1);
+  WriteDebugData(Ps_mi2s(ProcNo));
+  WriteDebugData(Ps_mi2s(Length(Proc.Data)));
+  WriteDebugData(Ps_mi2s(Pos));
+  WriteDebugData(Ps_mi2s(Row));
+  WriteDebugData(Ps_mi2s(Col));
+  {$ELSE}
+  WriteDebugData(#4 + s + #1 + PS_mi2s(ProcNo) + PS_mi2s(Length(Proc.Data)) + PS_mi2s(Pos) + PS_mi2s(Row)+ PS_mi2s(Col));
+  {$ENDIF}
+end;
+
+procedure TPSPascalCompiler.Debug_WriteParams(ProcNo: Cardinal; Proc: TPSInternalProcedure);
+var
+  I: Longint;
+  s: tbtString;
+begin
+  s := #2 + PS_mi2s(ProcNo);
+  if Proc.Decl.Result <> nil then
+  begin
+    s := s + 'Result' + #1;
+  end;
+  for i := 0 to Proc.Decl.ParamCount -1 do
+    s := s + Proc.Decl.Params[i].OrgName + #1;
+  s := s + #0#3 + PS_mi2s(ProcNo);
+  for I := 0 to Proc.ProcVars.Count - 1 do
+  begin
+    s := s + PIFPSProcVar(Proc.ProcVars[I]).OrgName + #1;
+  end;
+  s := s + #0;
+  WriteDebugData(s);
+end;
+
+procedure TPSPascalCompiler.CheckForUnusedVars(Func: TPSInternalProcedure);
+var
+  i: Integer;
+  p: PIFPSProcVar;
+begin
+  for i := 0 to Func.ProcVars.Count -1 do
+  begin
+    p := Func.ProcVars[I];
+    if not p.Used then
+    begin
+      with MakeHint({$IFDEF PS_USESSUPPORT}p.DeclareUnit{$ELSE}''{$ENDIF}, ehVariableNotUsed, p.Name) do
+      begin
+        FRow := p.DeclareRow;
+        FCol := p.DeclareCol;
+        FPosition := p.DeclarePos;
+      end;
+    end;
+  end;
+  if (not Func.ResultUsed) and (Func.Decl.Result <> nil) then
+  begin
+      with MakeHint({$IFDEF PS_USESSUPPORT}Func.DeclareUnit{$ELSE}''{$ENDIF}, ehVariableNotUsed, 'Result') do
+      begin
+        FRow := Func.DeclareRow;
+        FCol := Func.DeclareCol;
+        FPosition := Func.DeclarePos;
+      end;
+  end;
+end;
+
+function TPSPascalCompiler.ProcIsDuplic(Decl: TPSParametersDecl; const FunctionName, FunctionParamNames: tbtString; const s: tbtString; Func: TPSInternalProcedure): Boolean;
+var
+  i: Longint;
+  u: tbtString;
+begin
+  if s = 'RESULT' then
+    Result := True
+  else if FunctionName = s then
+    Result := True
+  else
+  begin
+    for i := 0 to Decl.ParamCount -1 do
+    begin
+      if Decl.Params[i].Name = s then
+      begin
+        Result := True;
+        exit;
+      end;
+      GRFW(u);
+    end;
+    u := FunctionParamNames;
+    while Pos(tbtchar('|'), u) > 0 do
+    begin
+      if copy(u, 1, Pos(tbtchar('|'), u) - 1) = s then
+      begin
+        Result := True;
+        exit;
+      end;
+      Delete(u, 1, Pos(tbtchar('|'), u));
+    end;
+    if Func = nil then
+    begin
+      result := False;
+      exit;
+    end;
+    for i := 0 to Func.ProcVars.Count -1 do
+    begin
+      if s = PIFPSProcVar(Func.ProcVars[I]).Name then
+      begin
+        Result := True;
+        exit;
+      end;
+    end;
+    for i := 0 to Func.FLabels.Count -1 do
+    begin
+      u := Func.FLabels[I];
+      delete(u, 1, 4);
+      if u = s then
+      begin
+        Result := True;
+        exit;
+      end;
+    end;
+    Result := False;
+  end;
+end;
+procedure WriteProcVars(Func:TPSInternalProcedure; t: TPSList);
+var
+  l: Longint;
+  v: PIFPSProcVar;
+begin
+  for l := 0 to t.Count - 1 do
+  begin
+    v := t[l];
+    Func.Data := Func.Data  + chr(cm_pt)+ PS_mi2s(v.AType.FinalTypeNo);
+  end;
+end;
+
+
+function TPSPascalCompiler.ApplyAttribsToFunction(func: TPSProcedure): boolean;
+var
+  i: Longint;
+begin
+  for i := 0 to Func.Attributes.Count -1 do
+  begin
+    if @Func.Attributes.Items[i].AType.OnApplyAttributeToProc <> nil then
+    begin
+      if not Func.Attributes.Items[i].AType.OnApplyAttributeToProc(Self, Func, Func.Attributes.Items[i]) then
+      begin
+        Result := false;
+        exit;
+      end;
+    end;
+  end;
+  result := true;
+end;
+
+
+function TPSPascalCompiler.ProcessFunction(AlwaysForward: Boolean; Att: TPSAttributes): Boolean;
+var
+  FunctionType: TFuncType;
+  OriginalName, FunctionName: tbtString;
+  FunctionParamNames: tbtString;
+  FunctionTempType: TPSType;
+  ParamNo: Cardinal;
+  FunctionDecl: TPSParametersDecl;
+  modifier: TPSParameterMode;
+  Func: TPSInternalProcedure;
+  F2: TPSProcedure;
+  EPos, ECol, ERow: Cardinal;
+  E2Pos, E2Col, E2Row: Cardinal;
+  pp: TPSRegProc;
+  pp2: TPSExternalProcedure;
+  FuncNo, I: Longint;
+  Block: TPSBlockInfo;
+begin
+  if att = nil then
+  begin
+    Att := TPSAttributes.Create;
+    if not ReadAttributes(Att) then
+    begin
+      att.free;
+      Result := false;
+      exit;
+    end;
+  end;
+
+  if FParser.CurrTokenId = CSTII_Procedure then
+    FunctionType := ftProc
+  else
+    FunctionType := ftFunc;
+  Func := nil;
+  EPos := FParser.CurrTokenPos;
+  ERow := FParser.Row;
+  ECol := FParser.Col;
+  FParser.Next;
+  Result := False;
+  if FParser.CurrTokenId <> CSTI_Identifier then
+  begin
+    MakeError('', ecIdentifierExpected, '');
+    att.free;
+    exit;
+  end;
+  if assigned(FOnFunctionStart) then
+     FOnFunctionStart(FParser.OriginalToken, EPos, ERow, ECol);
+  EPos := FParser.CurrTokenPos;
+  ERow := FParser.Row;
+  ECol := FParser.Col;
+  OriginalName := FParser.OriginalToken;
+  FunctionName := FParser.GetToken;
+  FuncNo := -1;
+  for i := 0 to FProcs.Count -1 do
+  begin
+    f2 := FProcs[I];
+    if (f2.ClassType = TPSInternalProcedure) and (TPSInternalProcedure(f2).Name = FunctionName) and (TPSInternalProcedure(f2).Forwarded) then
+    begin
+      Func := FProcs[I];
+      FuncNo := i;
+      Break;
+    end;
+  end;
+  if (Func = nil) and IsDuplicate(FunctionName, [dcTypes, dcProcs, dcVars, dcConsts]) then
+  begin
+    att.free;
+    MakeError('', ecDuplicateIdentifier, FunctionName);
+    exit;
+  end;
+  FParser.Next;
+  FunctionDecl := TPSParametersDecl.Create;
+  try
+    if FParser.CurrTokenId = CSTI_OpenRound then
+    begin
+      FParser.Next;
+      if FParser.CurrTokenId = CSTI_CloseRound then
+      begin
+        FParser.Next;
+      end
+      else
+      begin
+        if FunctionType = ftFunc then
+          ParamNo := 1
+        else
+          ParamNo := 0;
+        while True do
+        begin
+          if FParser.CurrTokenId = CSTII_Const then
+          begin
+            modifier := pmIn;
+            FParser.Next;
+          end
+          else
+          if FParser.CurrTokenId = CSTII_Out then
+          begin
+            modifier := pmOut;
+            FParser.Next;
+          end
+          else
+          if FParser.CurrTokenId = CSTII_Var then
+          begin
+            modifier := pmInOut;
+            FParser.Next;
+          end
+          else
+            modifier := pmIn;
+          if FParser.CurrTokenId <> CSTI_Identifier then
+          begin
+            MakeError('', ecIdentifierExpected, '');
+            exit;
+          end;
+          E2Pos := FParser.CurrTokenPos;
+          E2Row := FParser.Row;
+          E2Col := FParser.Col;
+          if ProcIsDuplic(FunctionDecl, FunctionName, FunctionParamNames, FParser.GetToken, Func) then
+          begin
+            MakeError('', ecDuplicateIdentifier, FParser.OriginalToken);
+            exit;
+          end;
+          FunctionParamNames := FParser.OriginalToken + '|';
+          if @FOnUseVariable <> nil then
+          begin
+            FOnUseVariable(Self, ivtParam, ParamNo, FProcs.Count, FParser.CurrTokenPos, '');
+          end;
+          inc(ParamNo);
+          FParser.Next;
+          while FParser.CurrTokenId = CSTI_Comma do
+          begin
+            FParser.Next;
+            if FParser.CurrTokenId <> CSTI_Identifier then
+            begin
+              MakeError('', ecIdentifierExpected, '');
+              exit;
+            end;
+          if ProcIsDuplic(FunctionDecl, FunctionName, FunctionParamNames, FParser.GetToken, Func) then
+            begin
+              MakeError('', ecDuplicateIdentifier, '');
+              exit;
+            end;
+            if @FOnUseVariable <> nil then
+            begin
+              FOnUseVariable(Self, ivtParam, ParamNo, FProcs.Count, FParser.CurrTokenPos, '');
+            end;
+            inc(ParamNo);
+            FunctionParamNames := FunctionParamNames + FParser.OriginalToken +
+              '|';
+            FParser.Next;
+          end;
+          if FParser.CurrTokenId <> CSTI_Colon then
+          begin
+            MakeError('', ecColonExpected, '');
+            exit;
+          end;
+          FParser.Next;
+          FunctionTempType := at2ut(ReadType('', FParser));
+          if FunctionTempType = nil then
+          begin
+            exit;
+          end;
+          while Pos(tbtchar('|'), FunctionParamNames) > 0 do
+          begin
+            with FunctionDecl.AddParam do
+            begin
+              OrgName := copy(FunctionParamNames, 1, Pos(tbtchar('|'), FunctionParamNames) - 1);
+              Mode := modifier;
+              aType := FunctionTempType;
+              {$IFDEF PS_USESSUPPORT}
+              DeclareUnit:=fModule;
+              {$ENDIF}
+              DeclarePos:=E2Pos;
+              DeclareRow:=E2Row;
+              DeclareCol:=E2Col;
+            end;
+            Delete(FunctionParamNames, 1, Pos(tbtchar('|'), FunctionParamNames));
+          end;
+          if FParser.CurrTokenId = CSTI_CloseRound then
+            break;
+          if FParser.CurrTokenId <> CSTI_Semicolon then
+          begin
+            MakeError('', ecSemicolonExpected, '');
+            exit;
+          end;
+          FParser.Next;
+        end;
+        FParser.Next;
+      end;
+    end;
+    if FunctionType = ftFunc then
+    begin
+      if FParser.CurrTokenId <> CSTI_Colon then
+      begin
+        MakeError('', ecColonExpected, '');
+        exit;
+      end;
+      FParser.Next;
+      FunctionTempType := at2ut(ReadType('', FParser));
+      if FunctionTempType = nil then
+        exit;
+      FunctionDecl.Result := FunctionTempType;
+    end;
+    if FParser.CurrTokenId <> CSTI_Semicolon then
+    begin
+      MakeError('', ecSemicolonExpected, '');
+      exit;
+    end;
+    FParser.Next;
+    if (Func = nil) and (FParser.CurrTokenID = CSTII_External) then
+    begin
+      FParser.Next;
+      if FParser.CurrTokenID <> CSTI_String then
+      begin
+        MakeError('', ecStringExpected, '');
+        exit;
+      end;
+      FunctionParamNames := FParser.GetToken;
+      FunctionParamNames := copy(FunctionParamNames, 2, length(FunctionParamNames) - 2);
+      FParser.Next;
+      if FParser.CurrTokenID <> CSTI_Semicolon then
+      begin
+        MakeError('', ecSemicolonExpected, '');
+        exit;
+      end;
+      FParser.Next;
+      if @FOnExternalProc = nil then
+      begin
+        MakeError('', ecSemicolonExpected, '');
+        exit;
+      end;
+      pp := FOnExternalProc(Self, FunctionDecl, OriginalName, FunctionParamNames);
+      if pp = nil then
+      begin
+        MakeError('', ecCustomError, '');
+        exit;
+      end;
+      pp2 := TPSExternalProcedure.Create;
+      pp2.Attributes.Assign(att, true);
+      pp2.RegProc := pp;
+      FProcs.Add(pp2);
+      FRegProcs.Add(pp);
+      Result := ApplyAttribsToFunction(pp2);
+      Exit;
+    end else if (FParser.CurrTokenID = CSTII_Forward) or AlwaysForward then
+    begin
+      if Func <> nil then
+      begin
+        MakeError('', ecBeginExpected, '');
+        exit;
+      end;
+      if not AlwaysForward then
+      begin
+        FParser.Next;
+        if FParser.CurrTokenID  <> CSTI_Semicolon then
+        begin
+          MakeError('', ecSemicolonExpected, '');
+          Exit;
+        end;
+        FParser.Next;
+      end;
+      Func := NewProc(OriginalName, FunctionName);
+      Func.Attributes.Assign(Att, True);
+      Func.Forwarded := True;
+      {$IFDEF PS_USESSUPPORT}
+      Func.FDeclareUnit := fModule;
+      {$ENDIF}
+      Func.FDeclarePos := EPos;
+      Func.FDeclareRow := ERow;
+      Func.FDeclarePos := ECol;
+      Func.Decl.Assign(FunctionDecl);
+      Result := ApplyAttribsToFunction(Func);
+      exit;
+    end;
+    if (Func = nil) then
+    begin
+      Func := NewProc(OriginalName, FunctionName);
+      Func.Attributes.Assign(att, True);
+      Func.Decl.Assign(FunctionDecl);
+      {$IFDEF PS_USESSUPPORT}
+      Func.FDeclareUnit := fModule;
+      {$ENDIF}
+      Func.FDeclarePos := EPos;
+      Func.FDeclareRow := ERow;
+      Func.FDeclareCol := ECol;
+      FuncNo := FProcs.Count -1;
+      if not ApplyAttribsToFunction(Func) then
+      begin
+        result := false;
+        exit;
+      end;
+    end else begin
+      if not FunctionDecl.Same(Func.Decl) then
+      begin
+        MakeError('', ecForwardParameterMismatch, '');
+        Result := false;
+        exit;
+      end;
+      Func.Forwarded := False;
+    end;
+    if FParser.CurrTokenID = CSTII_Export then
+    begin
+      FParser.Next;
+      if FParser.CurrTokenID <> CSTI_Semicolon then
+      begin
+        MakeError('', ecSemicolonExpected, '');
+        exit;
+      end;
+      FParser.Next;
+    end;
+    while FParser.CurrTokenId <> CSTII_Begin do
+    begin
+      if FParser.CurrTokenId = CSTII_Var then
+      begin
+        if not DoVarBlock(Func) then
+          exit;
+      end else if FParser.CurrTokenId = CSTII_Label then
+      begin
+        if not ProcessLabel(Func) then
+          Exit;
+      end else
+      begin
+        MakeError('', ecBeginExpected, '');
+        exit;
+      end;
+    end;
+    Debug_WriteParams(FuncNo, Func);
+    WriteProcVars(Func, Func.ProcVars);
+    Block := TPSBlockInfo.Create(FGlobalBlock);
+    Block.SubType := tProcBegin;
+    Block.ProcNo := FuncNo;
+    Block.Proc := Func;
+    if not ProcessSub(Block) then
+    begin
+      Block.Free;
+      exit;
+    end;
+    Block.Free;
+    CheckForUnusedVars(Func);
+    Result := ProcessLabelForwards(Func);
+    if assigned(FOnFunctionEnd) then
+      OnFunctionEnd(OriginalName, FParser.CurrTokenPos, FParser.Row, FParser.Col);
+  finally
+    FunctionDecl.Free;
+    att.Free;
+  end;
+end;
+
+function GetParamType(BlockInfo: TPSBlockInfo; I: Longint): TPSType;
+begin
+  if BlockInfo.Proc.Decl.Result <> nil then dec(i);
+  if i = -1 then
+    Result := BlockInfo.Proc.Decl.Result
+  else
+  begin
+    Result := BlockInfo.Proc.Decl.Params[i].aType;
+  end;
+end;
+
+function TPSPascalCompiler.GetTypeNo(BlockInfo: TPSBlockInfo; p: TPSValue): TPSType;
+begin
+  if p.ClassType = TPSUnValueOp then
+    Result := TPSUnValueOp(p).aType
+  else if p.ClassType = TPSBinValueOp then
+    Result := TPSBinValueOp(p).aType
+  else if p.ClassType = TPSValueArray then
+    Result := at2ut(FindType('TVariantArray'))
+  else if p.ClassType = TPSValueData then
+    Result := TPSValueData(p).Data.FType
+  else if p is TPSValueProc then
+    Result := TPSValueProc(p).ResultType
+  else if (p is TPSValueVar) and (TPSValueVar(p).RecCount > 0) then
+    Result := TPSValueVar(p).RecItem[TPSValueVar(p).RecCount - 1].aType
+  else if p.ClassType = TPSValueGlobalVar then
+    Result := TPSVar(FVars[TPSValueGlobalVar(p).GlobalVarNo]).FType
+  else if p.ClassType = TPSValueParamVar then
+    Result := GetParamType(BlockInfo, TPSValueParamVar(p).ParamNo)
+  else if p is TPSValueLocalVar then
+    Result := TPSProcVar(BlockInfo.Proc.ProcVars[TPSValueLocalVar(p).LocalVarNo]).AType
+  else if p.classtype = TPSValueReplace then
+    Result := GetTypeNo(BlockInfo, TPSValueReplace(p).NewValue)
+  else
+    Result := nil;
+end;
+
+function TPSPascalCompiler.IsVarInCompatible(ft1, ft2: TPSType): Boolean;
+begin
+  ft1 := GetTypeCopyLink(ft1);
+  ft2 := GetTypeCopyLink(ft2);
+  Result := (ft1 <> ft2) and (ft2 <> nil);
+end;
+
+function TPSPascalCompiler.ValidateParameters(BlockInfo: TPSBlockInfo; Params: TPSParameters; ParamTypes: TPSParametersDecl): boolean;
+var
+  i, c: Longint;
+  pType: TPSType;
+
+begin
+  UseProc(ParamTypes);
+  c := 0;
+  for i := 0 to ParamTypes.ParamCount -1 do
+  begin
+    while (c < Longint(Params.Count)) and (Params[c].Val = nil) do
+      Inc(c);
+    if c >= Longint(Params.Count) then
+    begin
+      MakeError('', ecInvalidnumberOfParameters, '');
+      Result := False;
+      exit;
+    end;
+    Params[c].ExpectedType := ParamTypes.Params[i].aType;
+    Params[c].ParamMode := ParamTypes.Params[i].Mode;
+    if ParamTypes.Params[i].Mode <> pmIn then
+    begin
+      if not (Params[c].Val is TPSValueVar) then
+      begin
+        with MakeError('', ecVariableExpected, '') do
+        begin
+          Row := Params[c].Val.Row;
+          Col := Params[c].Val.Col;
+          Pos := Params[c].Val.Pos;
+        end;
+        result := false;
+        exit;
+      end;
+        PType := Params[c].ExpectedType;
+        if (PType = nil) or ((PType.BaseType = btArray) and (TPSArrayType(PType).ArrayTypeNo = nil) and (GetTypeNo(BlockInfo, Params[c].Val).BaseType = btArray)) or
+          (PType = FAnyString) then
+        begin
+          Params[c].ExpectedType := GetTypeNo(BlockInfo, Params[c].Val);
+          if PType <> nil then
+          if (Params[c].ExpectedType = nil) or not (Params[c].ExpectedType.BaseType in [btString, btWideString, btChar, btWideChar]) then begin
+            MakeError('', ecTypeMismatch, '');
+            Result := False;
+            exit;
+          end;
+          if Params[c].ExpectedType.BaseType = btChar then
+            Params[c].ExpectedType := FindBaseType(btString) else
+          if Params[c].ExpectedType.BaseType = btWideChar then
+            Params[c].ExpectedType := FindBaseType(btWideString);
+        end else if (PType.BaseType = btArray) and (GetTypeNo(BlockInfo, Params[c].Val).BaseType = btArray) then
+        begin
+          if TPSArrayType(GetTypeNo(BlockInfo, Params[c].Val)).ArrayTypeNo <> TPSArrayType(PType).ArrayTypeNo then
+          begin
+            MakeError('', ecTypeMismatch, '');
+            Result := False;
+            exit;
+          end;
+        end else if IsVarInCompatible(PType, GetTypeNo(BlockInfo, Params[c].Val)) then
+        begin
+          MakeError('', ecTypeMismatch, '');
+          Result := False;
+          exit;
+        end;
+    end;
+    Inc(c);
+  end;
+  for i := c to Params.Count -1 do
+  begin
+    if Params[i].Val <> nil then
+    begin
+      MakeError('', ecInvalidnumberOfParameters, '');
+      Result := False;
+      exit;
+    end;
+  end;
+  Result := true;
+end;
+
+function TPSPascalCompiler.DoTypeBlock(FParser: TPSPascalParser): Boolean;
+var
+  VOrg,VName: tbtString;
+  Attr: TPSAttributes;
+  FType: TPSType;
+  i: Longint;
+begin
+  Result := False;
+  FParser.Next;
+  repeat
+    Attr := TPSAttributes.Create;
+    if not ReadAttributes(Attr) then
+    begin
+      Attr.Free;
+      exit;
+    end;
+    if (FParser.CurrTokenID = CSTII_Procedure) or (FParser.CurrTokenID = CSTII_Function) then
+    begin
+      Result := ProcessFunction(false, Attr);
+      exit;
+    end;
+    if FParser.CurrTokenId <> CSTI_Identifier then
+    begin
+      MakeError('', ecIdentifierExpected, '');
+      Attr.Free;
+      exit;
+    end;
+
+    VName := FParser.GetToken;
+    VOrg := FParser.OriginalToken;
+    if IsDuplicate(VName, [dcTypes, dcProcs, dcVars]) then
+    begin
+      MakeError('', ecDuplicateIdentifier, FParser.OriginalToken);
+      Attr.Free;
+      exit;
+    end;
+
+    FParser.Next;
+    if FParser.CurrTokenId <> CSTI_Equal then
+    begin
+      MakeError('', ecIsExpected, '');
+      Attr.Free;
+      exit;
+    end;
+    FParser.Next;
+    FType := ReadType(VOrg, FParser);
+    if Ftype = nil then
+    begin
+      Attr.Free;
+      Exit;
+    end;
+    FType.Attributes.Assign(Attr, True);
+    for i := 0 to FType.Attributes.Count -1 do
+    begin
+      if @FType.Attributes[i].FAttribType.FAAType <> nil then
+        FType.Attributes[i].FAttribType.FAAType(Self, FType, Attr[i]);
+    end;
+    Attr.Free;
+    if FParser.CurrTokenID <> CSTI_Semicolon then
+    begin
+      MakeError('', ecSemicolonExpected, '');
+      Exit;
+    end;
+    FParser.Next;
+  until (FParser.CurrTokenId <> CSTI_Identifier) and (FParser.CurrTokenID <> CSTI_OpenBlock);
+  Result := True;
+end;
+
+procedure TPSPascalCompiler.Debug_WriteLine(BlockInfo: TPSBlockInfo);
+var
+  b: Boolean;
+begin
+  if @FOnWriteLine <> nil then begin
+    {$IFNDEF PS_USESSUPPORT}
+    b := FOnWriteLine(Self, FParser.CurrTokenPos);
+    {$ELSE}
+    b := FOnWriteLine(Self, FModule, FParser.CurrTokenPos);
+    {$ENDIF}
+  end else
+    b := true;
+  if b then Debug_SavePosition(BlockInfo.ProcNo, BlockInfo.Proc);
+end;
+
+
+function TPSPascalCompiler.ReadReal(const s: tbtString): PIfRVariant;
+var
+  C: Integer;
+begin
+  New(Result);
+  InitializeVariant(Result, FindBaseType(btExtended));
+  Val(string(s), Result^.textended, C);
+end;
+
+function TPSPascalCompiler.ReadString: PIfRVariant;
+{$IFNDEF PS_NOWIDESTRING}var wchar: Boolean;{$ENDIF}
+
+  function ParseString({$IFNDEF PS_NOWIDESTRING}var res: tbtwidestring{$ELSE}var res: tbtString{$ENDIF}): Boolean;
+  var
+    temp3: {$IFNDEF PS_NOWIDESTRING}tbtwidestring{$ELSE}tbtString{$ENDIF};
+
+    function ChrToStr(s: tbtString): {$IFNDEF PS_NOWIDESTRING}widechar{$ELSE}tbtchar{$ENDIF};
+    var
+      w: Longint;
+    begin
+      Delete(s, 1, 1); {First char : #}
+      w := StrToInt(s);
+      Result := {$IFNDEF PS_NOWIDESTRING}widechar{$ELSE}tbtchar{$ENDIF}(w);
+      {$IFNDEF PS_NOWIDESTRING}if w > $FF then wchar := true;{$ENDIF}
+    end;
+
+    function PString(s: tbtString): tbtString;
+    var
+      i: Longint;
+    begin
+      s := copy(s, 2, Length(s) - 2);
+      i := length(s);
+      while i > 0 do
+      begin
+        if (i < length(s)) and (s[i] = #39) and (s[i + 1] = #39) then
+        begin
+          Delete(s, i, 1);
+          dec(i);
+        end;
+        dec(i);
+      end;
+      PString := s;
+    end;
+  var
+    lastwasstring: Boolean;
+  begin
+    temp3 := '';
+    while (FParser.CurrTokenId = CSTI_String) or (FParser.CurrTokenId = CSTI_Char) do
+    begin
+      lastwasstring := FParser.CurrTokenId = CSTI_String;
+      if FParser.CurrTokenId = CSTI_String then
+      begin
+        if UTF8Decode then
+        begin
+        temp3 := temp3 + {$IFNDEF PS_NOWIDESTRING}{$IFDEF DELPHI6UP}System.{$IFDEF DELPHI2009UP}UTF8ToWidestring{$ELSE}UTF8Decode{$ENDIF}{$ENDIF}{$ENDIF}(PString(FParser.GetToken));
+        {$IFNDEF PS_NOWIDESTRING}wchar:=true;{$ENDIF}
+        end else
+          temp3 := temp3 + tbtwidestring(PString(FParser.GetToken));
+
+        FParser.Next;
+        if FParser.CurrTokenId = CSTI_String then
+          temp3 := temp3 + #39;
+      end {if}
+      else
+      begin
+        temp3 := temp3 + ChrToStr(FParser.GetToken);
+        FParser.Next;
+      end; {else if}
+      if  lastwasstring and (FParser.CurrTokenId = CSTI_String) then
+      begin
+        MakeError('', ecSyntaxError, '');
+        result := false;
+        exit;
+      end;
+    end; {while}
+    res := temp3;
+    result := true;
+  end;
+var
+{$IFNDEF PS_NOWIDESTRING}
+  w: tbtwidestring;
+{$ENDIF}
+  s: tbtString;
+begin
+  {$IFNDEF PS_NOWIDESTRING}wchar:=false;{$ENDIF}
+  if not ParseString({$IFDEF PS_NOWIDESTRING} s {$ELSE}  w {$ENDIF}) then
+  begin
+    result := nil;
+    exit;
+  end;
+{$IFNDEF PS_NOWIDESTRING}
+  if wchar then
+  begin
+    New(Result);
+    if Length(w) = 1 then
+    begin
+      InitializeVariant(Result, at2ut(FindBaseType(btwidechar)));
+      Result^.twidechar := w[1];
+    end else begin
+      InitializeVariant(Result, at2ut(FindBaseType(btwidestring)));
+      tbtwidestring(Result^.twidestring) := w;
+     end;
+  end else begin
+    s := tbtstring(w);
+{$ENDIF}
+    New(Result);
+    if Length(s) = 1 then
+    begin
+      InitializeVariant(Result, at2ut(FindBaseType(btchar)));
+      Result^.tchar := s[1];
+    end else begin
+      InitializeVariant(Result, at2ut(FindBaseType(btstring)));
+      tbtstring(Result^.tstring) := s;
+    end;
+{$IFNDEF PS_NOWIDESTRING}
+  end;
+{$ENDIF}
+end;
+
+
+function TPSPascalCompiler.ReadInteger(const s: tbtString): PIfRVariant;
+var
+  R: {$IFNDEF PS_NOINT64}Int64;{$ELSE}Longint;{$ENDIF}
+begin
+  New(Result);
+{$IFNDEF PS_NOINT64}
+  r := StrToInt64Def(string(s), 0);
+  if (r >= Low(Integer)) and (r <= High(Integer)) then
+  begin
+    InitializeVariant(Result, at2ut(FindBaseType(bts32)));
+    Result^.ts32 := r;
+  end else if (r <= $FFFFFFFF) then
+  begin
+    InitializeVariant(Result, at2ut(FindBaseType(btu32)));
+    Result^.tu32 := r;
+  end else
+  begin
+    InitializeVariant(Result, at2ut(FindBaseType(bts64)));
+    Result^.ts64 := r;
+  end;
+{$ELSE}
+  r := StrToIntDef(s, 0);
+  InitializeVariant(Result, at2ut(FindBaseType(bts32)));
+  Result^.ts32 := r;
+{$ENDIF}
+end;
+
+function TPSPascalCompiler.ProcessSub(BlockInfo: TPSBlockInfo): Boolean;
+
+  function AllocStackReg2(MType: TPSType): TPSValue;
+  var
+    x: TPSProcVar;
+  begin
+{$IFDEF DEBUG}
+    if (mtype = nil) or (not mtype.Used) then asm int 3; end;
+{$ENDIF}
+    x := TPSProcVar.Create;
+    {$IFDEF PS_USESSUPPORT}
+    x.DeclareUnit:=fModule;
+    {$ENDIF}
+    x.DeclarePos := FParser.CurrTokenPos;
+    x.DeclareRow := FParser.Row;
+    x.DeclareCol := FParser.Col;
+    x.Name := '';
+    x.AType := MType;
+    x.Use;
+    BlockInfo.Proc.ProcVars.Add(x);
+    Result := TPSValueAllocatedStackVar.Create;
+    Result.SetParserPos(FParser);
+    TPSValueAllocatedStackVar(Result).Proc := BlockInfo.Proc;
+    with TPSValueAllocatedStackVar(Result) do
+    begin
+      LocalVarNo := proc.ProcVars.Count -1;
+    end;
+  end;
+
+  function AllocStackReg(MType: TPSType): TPSValue;
+  begin
+    Result := AllocStackReg2(MType);
+    BlockWriteByte(BlockInfo, Cm_Pt);
+    BlockWriteLong(BlockInfo, MType.FinalTypeNo);
+  end;
+
+  function AllocPointer(MDestType: TPSType): TPSValue;
+  begin
+    Result := AllocStackReg(at2ut(FindBaseType(btPointer)));
+    TPSProcVar(BlockInfo.Proc.ProcVars[TPSValueAllocatedStackVar(Result).LocalVarNo]).AType := MDestType;
+  end;
+
+  function WriteCalculation(InData, OutReg: TPSValue): Boolean; forward;
+  function PreWriteOutRec(var X: TPSValue; FArrType: TPSType): Boolean; forward;
+  function WriteOutRec(x: TPSValue; AllowData: Boolean): Boolean; forward;
+  procedure AfterWriteOutRec(var x: TPSValue); forward;
+
+  function CheckCompatType(V1, v2: TPSValue): Boolean;
+  var
+    p1, P2: TPSType;
+  begin
+    p1 := GetTypeNo(BlockInfo, V1);
+    P2 := GetTypeNo(BlockInfo, v2);
+    if (p1 = nil) or (p2 = nil) then
+    begin
+      if ((p1 <> nil) and ({$IFNDEF PS_NOINTERFACES}(p1.ClassType = TPSInterfaceType) or {$ENDIF}(p1.BaseType = btProcPtr)) and (v2.ClassType = TPSValueNil)) or
+        ((p2 <> nil) and ({$IFNDEF PS_NOINTERFACES}(p2.ClassType = TPSInterfaceType) or {$ENDIF}(p2.BaseType = btProcPtr)) and (v1.ClassType = TPSValueNil)) then
+      begin
+        Result := True;
+        exit;
+      end else
+      if ((p1 <> nil) and ({$IFNDEF PS_NOINTERFACES}(p1.ClassType = TPSInterfaceType) or {$ENDIF}(p1.ClassType = TPSClassType)) and (v2.ClassType = TPSValueNil)) or
+        ((p2 <> nil) and ({$IFNDEF PS_NOINTERFACES}(p2.ClassType = TPSInterfaceType) or {$ENDIF}(p2.ClassType = TPSClassType)) and (v1.ClassType = TPSValueNil)) then
+      begin
+        Result := True;
+        exit;
+      end else
+      if ((p1 <> nil) and ({$IFNDEF PS_NOINTERFACES}(p1.ClassType = TPSInterfaceType) or {$ENDIF}(p1.ClassType = TPSUndefinedClassType)) and (v2.ClassType = TPSValueNil)) or
+        ((p2 <> nil) and ({$IFNDEF PS_NOINTERFACES}(p2.ClassType = TPSInterfaceType) or {$ENDIF}(p2.ClassType = TPSUndefinedClassType)) and (v1.ClassType = TPSValueNil)) then
+      begin
+        Result := True;
+        exit;
+      end else
+      if (v1.ClassType = TPSValueProcPtr) and (p2 <> nil) and (p2.BaseType = btProcPtr) then
+      begin
+        Result := CheckCompatProc(p2, TPSValueProcPtr(v1).ProcPtr);
+        exit;
+      end else if (v2.ClassType = TPSValueProcPtr) and (p1 <> nil) and (p1.BaseType = btProcPtr) then
+      begin
+        Result := CheckCompatProc(p1, TPSValueProcPtr(v2).ProcPtr);
+        exit;
+      end;
+      Result := False;
+    end else
+    if (p1 <> nil) and (p1.BaseType = btSet) and (v2 is TPSValueArray) then
+    begin
+      Result := True;
+    end else
+      Result := IsCompatibleType(p1, p2, False);
+  end;
+
+  function _ProcessFunction(ProcCall: TPSValueProc; ResultRegister: TPSValue): Boolean; forward;
+  function ProcessFunction2(ProcNo: Cardinal; Par: TPSParameters; ResultReg: TPSValue): Boolean;
+  var
+    Temp: TPSValueProcNo;
+    i: Integer;
+  begin
+    Temp := TPSValueProcNo.Create;
+    Temp.Parameters := Par;
+    Temp.ProcNo := ProcNo;
+    if TObject(FProcs[ProcNo]).ClassType = TPSInternalProcedure then
+      Temp.ResultType := TPSInternalProcedure(FProcs[ProcNo]).Decl.Result
+    else
+      Temp.ResultType := TPSExternalProcedure(FProcs[ProcNo]).RegProc.Decl.Result;
+    if (Temp.ResultType <> nil) and (Temp.ResultType = FAnyString) then begin // workaround to make the result type match
+      for i := 0 to Par.Count -1 do begin
+        if Par[i].ExpectedType.BaseType in [btString, btWideString] then
+          Temp.ResultType := Par[i].ExpectedType;
+      end;
+    end;
+    Result := _ProcessFunction(Temp, ResultReg);
+    Temp.Parameters := nil;
+    Temp.Free;
+  end;
+
+  function MakeNil(NilPos, NilRow, nilCol: Cardinal;ivar: TPSValue): Boolean;
+  var
+    Procno: Cardinal;
+    PF: TPSType;
+    Par: TPSParameters;
+  begin
+    Pf := GetTypeNo(BlockInfo, IVar);
+    if not (Ivar is TPSValueVar) then
+    begin
+      with MakeError('', ecTypeMismatch, '') do
+      begin
+        FPosition := nilPos;
+        FRow := NilRow;
+        FCol := nilCol;
+      end;
+      Result := False;
+      exit;
+    end;
+    if (pf.BaseType = btProcPtr) then
+    begin
+      Result := True;
+    end else
+    if (pf.BaseType = btString) or (pf.BaseType = btPChar) then
+    begin
+      if not PreWriteOutRec(iVar, nil) then
+      begin
+        Result := false;
+        exit;
+      end;
+      BlockWriteByte(BlockInfo, CM_A);
+      WriteOutRec(ivar, False);
+      BlockWriteByte(BlockInfo, 1);
+      BlockWriteLong(BlockInfo, GetTypeNo(BlockInfo, IVar).FinalTypeNo);
+      BlockWriteLong(BlockInfo, 0); //empty tbtString
+      AfterWriteOutRec(ivar);
+      Result := True;
+    end else if (pf.BaseType = btClass) {$IFNDEF PS_NOINTERFACES}or (pf.BaseType = btInterface){$ENDIF} then
+    begin
+{$IFNDEF PS_NOINTERFACES}
+      if (pf.BaseType = btClass) then
+      begin
+{$ENDIF}
+        if not TPSClassType(pf).Cl.SetNil(ProcNo) then
+        begin
+          with MakeError('', ecTypeMismatch, '') do
+          begin
+            FPosition := nilPos;
+            FRow := NilRow;
+            FCol := nilCol;
+          end;
+          Result := False;
+          exit;
+        end;
+{$IFNDEF PS_NOINTERFACES}
+      end else
+      begin
+        if not TPSInterfaceType(pf).Intf.SetNil(ProcNo) then
+        begin
+          with MakeError('', ecTypeMismatch, '') do
+          begin
+            FPosition := nilPos;
+            FRow := NilRow;
+            FCol := nilCol;
+          end;
+          Result := False;
+          exit;
+        end;
+      end;
+{$ENDIF}
+      Par := TPSParameters.Create;
+      with par.Add do
+      begin
+        Val := IVar;
+        ExpectedType := GetTypeNo(BlockInfo, ivar);
+{$IFDEF DEBUG}
+        if not ExpectedType.Used then asm int 3; end;
+{$ENDIF}
+        ParamMode := pmInOut;
+      end;
+      Result := ProcessFunction2(ProcNo, Par, nil);
+
+      Par[0].Val := nil; // don't free IVAR
+
+      Par.Free;
+    end else if pf.BaseType = btExtClass then
+    begin
+      if not TPSUndefinedClassType(pf).ExtClass.SetNil(ProcNo) then
+      begin
+        with MakeError('', ecTypeMismatch, '') do
+        begin
+          FPosition := nilPos;
+          FRow := NilRow;
+          FCol := nilCol;
+        end;
+        Result := False;
+        exit;
+      end;
+      Par := TPSParameters.Create;
+      with par.Add do
+      begin
+        Val := IVar;
+        ExpectedType := GetTypeNo(BlockInfo, ivar);
+        ParamMode := pmInOut;
+      end;
+      Result := ProcessFunction2(ProcNo, Par, nil);
+
+      Par[0].Val := nil; // don't free IVAR
+
+      Par.Free;
+    end else begin
+      with MakeError('', ecTypeMismatch, '') do
+      begin
+        FPosition := nilPos;
+        FRow := NilRow;
+        FCol := nilCol;
+      end;
+      Result := False;
+    end;
+  end;
+  function DoBinCalc(BVal: TPSBinValueOp; Output: TPSValue): Boolean;
+  var
+    tmpp, tmpc: TPSValue;
+    jend, jover: Cardinal;
+    procno: Cardinal;
+
+  begin
+    if BVal.Operator >= otGreaterEqual then
+    begin
+      if BVal.FVal1.ClassType = TPSValueNil then
+      begin
+        tmpp := AllocStackReg(GetTypeNo(BlockInfo, BVal.FVal2));
+        if not MakeNil(BVal.FVal1.Pos, BVal.FVal1.Row, BVal.FVal1.Col, tmpp) then
+        begin
+          tmpp.Free;
+          Result := False;
+          exit;
+        end;
+        tmpc := TPSValueReplace.Create;
+        with TPSValueReplace(tmpc) do
+        begin
+          OldValue := BVal.FVal1;
+          NewValue := tmpp;
+        end;
+        BVal.FVal1 := tmpc;
+      end;
+      if BVal.FVal2.ClassType = TPSValueNil then
+      begin
+        tmpp := AllocStackReg(GetTypeNo(BlockInfo, BVal.FVal1));
+        if not MakeNil(BVal.FVal2.Pos, BVal.FVal2.Row, BVal.FVal2.Col, tmpp) then
+        begin
+          tmpp.Free;;
+          Result := False;
+          exit;
+        end;
+        tmpc := TPSValueReplace.Create;
+        with TPSValueReplace(tmpc) do
+        begin
+          OldValue := BVal.FVal2;
+          NewValue := tmpp;
+        end;
+        BVal.FVal2 := tmpc;
+      end;
+      if GetTypeNo(BlockInfo, BVal.FVal1).BaseType = btExtClass then
+      begin
+        if not TPSUndefinedClassType(GetTypeNo(BlockInfo, BVal.FVal1)).ExtClass.CompareClass(GetTypeNo(BlockInfo, Bval.FVal2), ProcNo) then
+        begin
+          Result := False;
+          exit;
+        end;
+        tmpp := TPSValueProcNo.Create;
+        with TPSValueProcNo(tmpp) do
+        begin
+          ResultType := at2ut(FDefaultBoolType);
+          Parameters := TPSParameters.Create;
+          ProcNo := procno;
+          Pos := BVal.Pos;
+          Col := BVal.Col;
+          Row := BVal.Row;
+          with parameters.Add do
+          begin
+            Val := BVal.FVal1;
+            ExpectedType := GetTypeNo(BlockInfo, Val);
+          end;
+          with parameters.Add do
+          begin
+            Val := BVal.FVal2;
+            ExpectedType := GetTypeNo(BlockInfo, Val);
+          end;
+        end;
+        if Bval.Operator = otNotEqual then
+        begin
+          tmpc := TPSUnValueOp.Create;
+          TPSUnValueOp(tmpc).Operator := otNot;
+          TPSUnValueOp(tmpc).Val1 := tmpp;
+          TPSUnValueOp(tmpc).aType := GetTypeNo(BlockInfo, tmpp);
+        end else tmpc := tmpp;
+        Result := WriteCalculation(tmpc, Output);
+        with TPSValueProcNo(tmpp) do
+        begin
+          Parameters[0].Val := nil;
+          Parameters[1].Val := nil;
+        end;
+        tmpc.Free;
+        if BVal.Val1.ClassType = TPSValueReplace then
+        begin
+          tmpp := TPSValueReplace(BVal.Val1).OldValue;
+          BVal.Val1.Free;
+          BVal.Val1 := tmpp;
+        end;
+        if BVal.Val2.ClassType = TPSValueReplace then
+        begin
+          tmpp := TPSValueReplace(BVal.Val2).OldValue;
+          BVal.Val2.Free;
+          BVal.Val2 := tmpp;
+        end;
+        exit;
+      end;
+      if not (PreWriteOutRec(Output, nil) and PreWriteOutRec(BVal.FVal1, GetTypeNo(BlockInfo, BVal.FVal2)) and PreWriteOutRec(BVal.FVal2, GetTypeNo(BlockInfo, BVal.FVal1))) then
+      begin
+        Result := False;
+        exit;
+      end;
+      BlockWriteByte(BlockInfo, CM_CO);
+      case BVal.Operator of
+        otGreaterEqual: BlockWriteByte(BlockInfo, 0);
+        otLessEqual: BlockWriteByte(BlockInfo, 1);
+        otGreater: BlockWriteByte(BlockInfo, 2);
+        otLess: BlockWriteByte(BlockInfo, 3);
+        otEqual: BlockWriteByte(BlockInfo, 5);
+        otNotEqual: BlockWriteByte(BlockInfo, 4);
+        otIn: BlockWriteByte(BlockInfo, 6);
+        otIs: BlockWriteByte(BlockInfo, 7);
+      end;
+
+      if not (WriteOutRec(Output, False) and writeOutRec(BVal.FVal1, True) and writeOutRec(BVal.FVal2, True)) then
+      begin
+        Result := False;
+        exit;
+      end;
+      AfterWriteOutrec(BVal.FVal1);
+      AfterWriteOutrec(BVal.FVal2);
+      AfterWriteOutrec(Output);
+      if BVal.Val1.ClassType = TPSValueReplace then
+      begin
+        tmpp := TPSValueReplace(BVal.Val1).OldValue;
+        BVal.Val1.Free;
+        BVal.Val1 := tmpp;
+      end;
+      if BVal.Val2.ClassType = TPSValueReplace then
+      begin
+        tmpp := TPSValueReplace(BVal.Val2).OldValue;
+        BVal.Val2.Free;
+        BVal.Val2 := tmpp;
+      end;
+    end else begin
+      if not PreWriteOutRec(Output, nil) then
+      begin
+        Result := False;
+        exit;
+      end;
+      if not SameReg(Output, BVal.Val1) then
+      begin
+        if not WriteCalculation(BVal.FVal1, Output) then
+        begin
+          Result := False;
+          exit;
+        end;
+      end;
+      if (FBooleanShortCircuit) and (IsBoolean(BVal.aType)) then
+      begin
+        if BVal.Operator = otAnd then
+        begin
+          BlockWriteByte(BlockInfo, Cm_CNG);
+          jover := Length(BlockInfo.Proc.FData);
+          BlockWriteLong(BlockInfo, 0);
+          WriteOutRec(Output, True);
+          jend := Length(BlockInfo.Proc.FData);
+        end else if BVal.Operator = otOr then
+        begin
+          BlockWriteByte(BlockInfo, Cm_CG);
+          jover := Length(BlockInfo.Proc.FData);
+          BlockWriteLong(BlockInfo, 0);
+          WriteOutRec(Output, True);
+          jend := Length(BlockInfo.Proc.FData);
+        end else
+        begin
+          jover := 0;
+          jend := 0;
+        end;
+      end else
+      begin
+        jover := 0;
+        jend := 0;
+      end;
+      if not PreWriteOutrec(BVal.FVal2, GetTypeNo(BlockInfo, Output)) then
+      begin
+        Result := False;
+        exit;
+      end;
+      BlockWriteByte(BlockInfo, Cm_CA);
+      BlockWriteByte(BlockInfo, Ord(BVal.Operator));
+      if not (WriteOutRec(Output, False) and WriteOutRec(BVal.FVal2, True)) then
+      begin
+        Result := False;
+        exit;
+      end;
+      AfterWriteOutRec(BVal.FVal2);
+      if FBooleanShortCircuit and (IsBoolean(BVal.aType)) and (JOver <> JEnd) then
+      begin
+        Cardinal((@BlockInfo.Proc.FData[jover+1])^) := Cardinal(Length(BlockInfo.Proc.FData)) - jend;
+      end;
+      AfterWriteOutRec(Output);
+    end;
+    Result := True;
+  end;
+
+  function DoUnCalc(Val: TPSUnValueOp; Output: TPSValue): Boolean;
+  var
+    Tmp: TPSValue;
+  begin
+    if not PreWriteOutRec(Output, nil) then
+    begin
+      Result := False;
+      exit;
+    end;
+    case Val.Operator of
+      otNot:
+        begin
+          if not SameReg(Val.FVal1, Output) then
+          begin
+            if not WriteCalculation(Val.FVal1, Output) then
+            begin
+              Result := False;
+              exit;
+            end;
+          end;
+          if IsBoolean(GetTypeNo(BlockInfo, Val)) then
+            BlockWriteByte(BlockInfo, cm_bn)
+          else
+            BlockWriteByte(BlockInfo, cm_in);
+          if not WriteOutRec(Output, True) then
+          begin
+            Result := False;
+            exit;
+          end;
+        end;
+      otMinus:
+        begin
+          if not SameReg(Val.FVal1, Output) then
+          begin
+            if not WriteCalculation(Val.FVal1, Output) then
+            begin
+              Result := False;
+              exit;
+            end;
+          end;
+          BlockWriteByte(BlockInfo, cm_vm);
+          if not WriteOutRec(Output, True) then
+          begin
+            Result := False;
+            exit;
+          end;
+        end;
+      otCast:
+        begin
+          if ((Val.aType.BaseType = btChar) and (Val.aType.BaseType <> btU8)) {$IFNDEF PS_NOWIDESTRING}or
+            ((Val.aType.BaseType = btWideChar) and (Val.aType.BaseType <> btU16)){$ENDIF} then
+          begin
+            Tmp := AllocStackReg(Val.aType);
+          end else
+            Tmp := Output;
+          if not (PreWriteOutRec(Val.FVal1, GetTypeNo(BlockInfo, Tmp)) and PreWriteOutRec(Tmp, GetTypeNo(BlockInfo, Tmp))) then
+          begin
+            Result := False;
+            if tmp <> Output then Tmp.Free;
+            exit;
+          end;
+          BlockWriteByte(BlockInfo, CM_A);
+          if not (WriteOutRec(Tmp, False) and WriteOutRec(Val.FVal1, True)) then
+          begin
+            Result := false;
+            if tmp <> Output then Tmp.Free;
+            exit;
+          end;
+          AfterWriteOutRec(val.Fval1);
+          if Tmp <> Output then
+          begin
+            if not WriteCalculation(Tmp, Output) then
+            begin
+              Result := false;
+              Tmp.Free;
+              exit;
+            end;
+          end;
+          AfterWriteOutRec(Tmp);
+          if Tmp <> Output then
+            Tmp.Free;
+        end;
+      {else donothing}
+    end;
+    AfterWriteOutRec(Output);
+    Result := True;
+  end;
+
+
+  function GetAddress(Val: TPSValue): Cardinal;
+  begin
+    if Val.ClassType = TPSValueGlobalVar then
+      Result := TPSValueGlobalVar(val).GlobalVarNo
+    else if Val.ClassType = TPSValueLocalVar then
+      Result := PSAddrStackStart + TPSValueLocalVar(val).LocalVarNo + 1
+    else if Val.ClassType = TPSValueParamVar then
+      Result := PSAddrStackStart - TPSValueParamVar(val).ParamNo -1
+    else if Val.ClassType =  TPSValueAllocatedStackVar then
+      Result := PSAddrStackStart + TPSValueAllocatedStackVar(val).LocalVarNo + 1
+    else
+      Result := InvalidVal;
+  end;
+
+
+  function PreWriteOutRec(var X: TPSValue; FArrType: TPSType): Boolean;
+  var
+    rr: TPSSubItem;
+    tmpp,
+      tmpc: TPSValue;
+    i: Longint;
+    function MakeSet(SetType: TPSSetType; arr: TPSValueArray): Boolean;
+    var
+      c, i: Longint;
+      dataval: TPSValueData;
+      mType: TPSType;
+    begin
+      Result := True;
+      dataval := TPSValueData.Create;
+      dataval.Data := NewVariant(FarrType);
+      for i := 0 to arr.count -1 do
+      begin
+        mType := GetTypeNo(BlockInfo, arr.Item[i]);
+        if mType <> SetType.SetType then
+        begin
+          with MakeError('', ecTypeMismatch, '') do
+          begin
+            FCol := arr.item[i].Col;
+            FRow := arr.item[i].Row;
+            FPosition := arr.item[i].Pos;
+          end;
+          DataVal.Free;
+          Result := False;
+          exit;
+        end;
+        if arr.Item[i] is TPSValueData then
+        begin
+          c := GetInt(TPSValueData(arr.Item[i]).Data, Result);
+          if not Result then
+          begin
+            dataval.Free;
+            exit;
+          end;
+          Set_MakeMember(c, dataval.Data.tstring);
+        end else
+        begin
+          DataVal.Free;
+          MakeError('', ecTypeMismatch, '');
+          Result := False;
+          exit;
+        end;
+      end;
+      tmpc := TPSValueReplace.Create;
+      with TPSValueReplace(tmpc) do
+      begin
+        OldValue := x;
+        NewValue := dataval;
+        PreWriteAllocated := True;
+      end;
+      x := tmpc;
+    end;
+  begin
+    Result := True;
+    if x.ClassType = TPSValueReplace then
+    begin
+      if TPSValueReplace(x).PreWriteAllocated then
+      begin
+        inc(TPSValueReplace(x).FReplaceTimes);
+      end;
+    end else
+    if x.ClassType = TPSValueProcPtr then
+    begin
+      if FArrType = nil then
+      begin
+        MakeError('', ecTypeMismatch, '');
+        Result := False;
+        Exit;
+      end;
+      tmpp := TPSValueData.Create;
+      TPSValueData(tmpp).Data := NewVariant(FArrType);
+      TPSValueData(tmpp).Data.tu32 := TPSValueProcPtr(x).ProcPtr;
+      tmpc := TPSValueReplace.Create;
+      with TPSValueReplace(tmpc) do
+      begin
+        PreWriteAllocated := True;
+        OldValue := x;
+        NewValue := tmpp;
+      end;
+      x := tmpc;
+    end else
+    if x.ClassType = TPSValueNil then
+    begin
+      if FArrType = nil then
+      begin
+        MakeError('', ecTypeMismatch, '');
+        Result := False;
+        Exit;
+      end;
+      tmpp := AllocStackReg(FArrType);
+      if not MakeNil(x.Pos, x.Row, x.Col, tmpp) then
+      begin
+        tmpp.Free;
+        Result := False;
+        exit;
+      end;
+      tmpc := TPSValueReplace.Create;
+      with TPSValueReplace(tmpc) do
+      begin
+        PreWriteAllocated := True;
+        OldValue := x;
+        NewValue := tmpp;
+      end;
+      x := tmpc;
+    end else
+    if x.ClassType = TPSValueArray then
+    begin
+      if FArrType = nil then
+      begin
+        MakeError('', ecTypeMismatch, '');
+        Result := False;
+        Exit;
+      end;
+      if TPSType(FArrType).BaseType = btSet then
+      begin
+        Result := MakeSet(TPSSetType(FArrType), TPSValueArray(x));
+        exit;
+      end;
+      if TPSType(FarrType).BaseType = btVariant then
+        FArrType := FindAndAddType(self, '', 'array of variant');
+
+      tmpp := AllocStackReg(FArrType);
+      tmpc := AllocStackReg(FindBaseType(bts32));
+      BlockWriteByte(BlockInfo, CM_A);
+      WriteOutrec(tmpc, False);
+      BlockWriteByte(BlockInfo, 1);
+      BlockWriteLong(BlockInfo, FindBaseType(bts32).FinalTypeNo);
+      BlockWriteLong(BlockInfo, TPSValueArray(x).Count);
+      BlockWriteByte(BlockInfo, CM_PV);
+      WriteOutrec(tmpp, False);
+      BlockWriteByte(BlockInfo, CM_C);
+      BlockWriteLong(BlockInfo, FindProc('SETARRAYLENGTH'));
+      BlockWriteByte(BlockInfo, CM_PO);
+      tmpc.Free;
+      rr := TPSSubNumber.Create;
+      rr.aType := TPSArrayType(FArrType).ArrayTypeNo;
+      TPSValueVar(tmpp).RecAdd(rr);
+      for i := 0 to TPSValueArray(x).Count -1 do
+      begin
+        TPSSubNumber(rr).SubNo := i;
+        tmpc := TPSValueArray(x).Item[i];
+        if not PreWriteOutRec(tmpc, GetTypeNo(BlockInfo, tmpc)) then
+        begin
+          tmpp.Free;
+          Result := false;
+          exit;
+        end;
+        if TPSArrayType(FArrType).ArrayTypeNo.BaseType = btPointer then
+          BlockWriteByte(BlockInfo, cm_spc)
+        else
+          BlockWriteByte(BlockInfo, cm_a);
+        if not (WriteOutrec(tmpp, False) and WriteOutRec(tmpc, True)) then
+        begin
+          Tmpp.Free;
+          Result := false;
+          exit;
+        end;
+        AfterWriteOutRec(tmpc);
+      end;
+      TPSValueVar(tmpp).RecDelete(0);
+      tmpc := TPSValueReplace.Create;
+      with TPSValueReplace(tmpc) do
+      begin
+        PreWriteAllocated := True;
+        OldValue := x;
+        NewValue := tmpp;
+      end;
+      x := tmpc;
+    end else if (x.ClassType = TPSUnValueOp) then
+    begin
+      tmpp := AllocStackReg(GetTypeNo(BlockInfo, x));
+      if not DoUnCalc(TPSUnValueOp(x), tmpp) then
+      begin
+        Result := False;
+        exit;
+      end;
+      tmpc := TPSValueReplace.Create;
+      with TPSValueReplace(tmpc) do
+      begin
+        PreWriteAllocated := True;
+        OldValue := x;
+        NewValue := tmpp;
+      end;
+      x := tmpc;
+    end else if (x.ClassType = TPSBinValueOp) then
+    begin
+      tmpp := AllocStackReg(GetTypeNo(BlockInfo, x));
+      if not DoBinCalc(TPSBinValueOp(x), tmpp) then
+      begin
+        tmpp.Free;
+        Result := False;
+        exit;
+      end;
+      tmpc := TPSValueReplace.Create;
+      with TPSValueReplace(tmpc) do
+      begin
+        PreWriteAllocated := True;
+        OldValue := x;
+        NewValue := tmpp;
+      end;
+      x := tmpc;
+    end else if x is TPSValueProc then
+    begin
+      tmpp := AllocStackReg(TPSValueProc(x).ResultType);
+      if not WriteCalculation(x, tmpp) then
+      begin
+        tmpp.Free;
+        Result := False;
+        exit;
+      end;
+      tmpc := TPSValueReplace.Create;
+      with TPSValueReplace(tmpc) do
+      begin
+        PreWriteAllocated := True;
+        OldValue := x;
+        NewValue := tmpp;
+      end;
+      x := tmpc;
+    end else if (x is TPSValueVar) and (TPSValueVar(x).RecCount <> 0) then
+    begin
+      if  TPSValueVar(x).RecCount = 1 then
+      begin
+        rr := TPSValueVar(x).RecItem[0];
+        if rr.ClassType <> TPSSubValue then
+          exit; // there is no need pre-calculate anything
+        if (TPSSubValue(rr).SubNo is TPSValueVar) and (TPSValueVar(TPSSubValue(rr).SubNo).RecCount = 0) then
+          exit;
+      end; //if
+      tmpp := AllocPointer(GetTypeNo(BlockInfo, x));
+      BlockWriteByte(BlockInfo, cm_sp);
+      WriteOutRec(tmpp, True);
+      BlockWriteByte(BlockInfo, 0);
+      BlockWriteLong(BlockInfo, GetAddress(x));
+      for i := 0 to TPSValueVar(x).RecCount - 1 do
+      begin
+        rr := TPSValueVar(x).RecItem[I];
+        if rr.ClassType = TPSSubNumber then
+        begin
+          BlockWriteByte(BlockInfo, cm_sp);
+          WriteOutRec(tmpp, false);
+          BlockWriteByte(BlockInfo, 2);
+          BlockWriteLong(BlockInfo, GetAddress(tmpp));
+          BlockWriteLong(BlockInfo, TPSSubNumber(rr).SubNo);
+        end else begin // if rr.classtype = TPSSubValue then begin
+          tmpc := AllocStackReg(FindBaseType(btU32));
+          if not WriteCalculation(TPSSubValue(rr).SubNo, tmpc) then
+          begin
+            tmpc.Free;
+            tmpp.Free;
+            Result := False;
+            exit;
+          end; //if
+          BlockWriteByte(BlockInfo, cm_sp);
+          WriteOutRec(tmpp, false);
+          BlockWriteByte(BlockInfo, 3);
+          BlockWriteLong(BlockInfo, GetAddress(tmpp));
+          BlockWriteLong(BlockInfo, GetAddress(tmpc));
+          tmpc.Free;
+        end;
+      end; // for
+      tmpc := TPSValueReplace.Create;
+      with TPSValueReplace(tmpc) do
+      begin
+        OldValue := x;
+        NewValue := tmpp;
+        PreWriteAllocated := True;
+      end;
+      x := tmpc;
+    end;
+
+  end;
+
+  procedure AfterWriteOutRec(var x: TPSValue);
+  var
+    tmp: TPSValue;
+  begin
+    if (x.ClassType = TPSValueReplace) and (TPSValueReplace(x).PreWriteAllocated) then
+    begin
+      Dec(TPSValueReplace(x).FReplaceTimes);
+      if TPSValueReplace(x).ReplaceTimes = 0 then
+      begin
+        tmp := TPSValueReplace(x).OldValue;
+        x.Free;
+        x := tmp;
+      end;
+    end;
+  end; //afterwriteoutrec
+
+  function WriteOutRec(x: TPSValue; AllowData: Boolean): Boolean;
+  var
+    rr: TPSSubItem;
+  begin
+    Result := True;
+    if x.ClassType = TPSValueReplace then
+      Result := WriteOutRec(TPSValueReplace(x).NewValue, AllowData)
+    else if x is TPSValueVar then
+    begin
+      if TPSValueVar(x).RecCount = 0 then
+      begin
+        BlockWriteByte(BlockInfo, 0);
+        BlockWriteLong(BlockInfo, GetAddress(x));
+      end
+      else
+      begin
+        rr := TPSValueVar(x).RecItem[0];
+        if rr.ClassType = TPSSubNumber then
+        begin
+          BlockWriteByte(BlockInfo, 2);
+          BlockWriteLong(BlockInfo, GetAddress(x));
+          BlockWriteLong(BlockInfo, TPSSubNumber(rr).SubNo);
+        end
+        else
+        begin
+          BlockWriteByte(BlockInfo, 3);
+          BlockWriteLong(BlockInfo, GetAddress(x));
+          BlockWriteLong(BlockInfo, GetAddress(TPSSubValue(rr).SubNo));
+        end;
+      end;
+    end else if x.ClassType = TPSValueData then
+    begin
+      if AllowData then
+      begin
+        BlockWriteByte(BlockInfo, 1);
+        BlockWriteVariant(BlockInfo, TPSValueData(x).Data)
+      end
+      else
+      begin
+        Result := False;
+        exit;
+      end;
+    end else
+      Result := False;
+  end;
+
+  function ReadParameters(IsProperty: Boolean; Dest: TPSParameters): Boolean; forward;
+{$IFNDEF PS_NOIDISPATCH}
+  function ReadIDispatchParameters(const ProcName: tbtString; aVariantType: TPSVariantType; FSelf: TPSValue): TPSValue; forward;
+{$ENDIF}
+  function ReadProcParameters(ProcNo: Cardinal; FSelf: TPSValue): TPSValue; forward;
+  function ReadVarParameters(ProcNoVar: TPSValue): TPSValue; forward;
+
+  function calc(endOn: TPSPasToken): TPSValue; forward;
+  procedure CheckNotificationVariant(var Val: TPSValue);
+  var
+    aType: TPSType;
+    Call: TPSValueProcNo;
+    tmp: TPSValue;
+  begin
+    if not (Val is TPSValueGlobalVar) then exit;
+    aType := GetTypeNo(BlockInfo, Val);
+    if (AType = nil) or (AType.BaseType <> btNotificationVariant) then exit;
+    if FParser.CurrTokenId = CSTI_Assignment then
+    begin
+      Call := TPSValueProcNo.Create;
+      Call.ResultType := nil;
+      Call.SetParserPos(FParser);
+      Call.ProcNo := FindProc('!NOTIFICATIONVARIANTSET');;
+      Call.SetParserPos(FParser);
+      Call.Parameters := TPSParameters.Create;
+      Tmp := TPSValueData.Create;
+      TPSVAlueData(tmp).Data := NewVariant(at2ut(FindBaseType(btString)));
+      tbtString(TPSValueData(tmp).Data.tstring) := TPSVar(FVars[TPSValueGlobalVar(Val).GlobalVarNo]).OrgName;
+      with call.Parameters.Add do
+      begin
+        Val := tmp;
+        ExpectedType := TPSValueData(tmp).Data.FType;
+      end;
+      FParser.Next;
+      tmp := Calc(CSTI_SemiColon);
+      if tmp = nil then
+      begin
+        Val.Free;
+        Val := nil;
+        exit;
+      end;
+      with Call.Parameters.Add do
+      begin
+        Val := tmp;
+        ExpectedType := at2ut(FindBaseType(btVariant));
+      end;
+      Val.Free;
+      Val := Call;
+    end else begin
+      Call := TPSValueProcNo.Create;
+      Call.ResultType := AT2UT(FindBaseType(btVariant));
+      Call.SetParserPos(FParser);
+      Call.ProcNo := FindProc('!NOTIFICATIONVARIANTGET');
+      Call.SetParserPos(FParser);
+      Call.Parameters := TPSParameters.Create;
+      Tmp := TPSValueData.Create;
+      TPSVAlueData(tmp).Data := NewVariant(at2ut(FindBaseType(btString)));
+      tbtString(TPSValueData(tmp).Data.tstring) := TPSVar(FVars[TPSValueGlobalVar(Val).GlobalVarNo]).OrgName;
+      with call.Parameters.Add do
+      begin
+        Val := tmp;
+        ExpectedType := TPSValueData(tmp).Data.FType;
+      end;
+      Val.Free;
+      Val := Call;
+    end;
+  end;
+
+
+  function GetIdentifier(const FType: Byte): TPSValue;
+    {
+      FType:
+        0 = Anything
+        1 = Only variables
+        2 = Not constants
+    }
+
+    procedure CheckProcCall(var x: TPSValue);
+    var
+      aType: TPSType;
+    begin
+      if FParser.CurrTokenId in [CSTI_Dereference, CSTI_OpenRound] then
+      begin
+        aType := GetTypeNo(BlockInfo, x);
+        if (aType = nil) or (aType.BaseType <> btProcPtr) then
+        begin
+          MakeError('', ecTypeMismatch, '');
+          x.Free;
+          x := nil;
+          Exit;
+        end;
+        if FParser.CurrTokenId = CSTI_Dereference then
+          FParser.Next;
+        x := ReadVarParameters(x);
+      end;
+    end;
+
+    procedure CheckFurther(var x: TPSValue; ImplicitPeriod: Boolean);
+    var
+      t: Cardinal;
+      rr: TPSSubItem;
+      L: Longint;
+      u: TPSType;
+      Param: TPSParameter;
+      tmp, tmpn: TPSValue;
+      tmp3: TPSValueProcNo;
+      tmp2: Boolean;
+
+      function FindSubR(const n: tbtString; FType: TPSType): Cardinal;
+      var
+        h, I: Longint;
+        rvv: PIFPSRecordFieldTypeDef;
+      begin
+        h := MakeHash(n);
+        for I := 0 to TPSRecordType(FType).RecValCount - 1 do
+        begin
+          rvv := TPSRecordType(FType).RecVal(I);
+          if (rvv.FieldNameHash = h) and (rvv.FieldName = n) then
+          begin
+            Result := I;
+            exit;
+          end;
+        end;
+        Result := InvalidVal;
+      end;
+
+    begin
+(*      if not (x is TPSValueVar) then
+        Exit;*)
+      u := GetTypeNo(BlockInfo, x);
+      if u = nil then exit;
+      while True do
+      begin
+        if (u.BaseType = btClass) {$IFNDEF PS_NOINTERFACES}or (u.BaseType = btInterface){$ENDIF}
+        {$IFNDEF PS_NOIDISPATCH}or ((u.BaseType = btVariant) or (u.BaseType = btNotificationVariant)){$ENDIF} or (u.BaseType = btExtClass) then exit;
+        if FParser.CurrTokenId = CSTI_OpenBlock then
+        begin
+          if (u.BaseType = btString) {$IFNDEF PS_NOWIDESTRING} or (u.BaseType = btWideString) {$ENDIF} then
+          begin
+             FParser.Next;
+            tmp := Calc(CSTI_CloseBlock);
+            if tmp = nil then
+            begin
+              x.Free;
+              x := nil;
+              exit;
+            end;
+            if not IsIntType(GetTypeNo(BlockInfo, tmp).BaseType) then
+            begin
+              MakeError('', ecTypeMismatch, '');
+              tmp.Free;
+              x.Free;
+              x := nil;
+              exit;
+            end;
+            FParser.Next;
+            if FParser.CurrTokenId = CSTI_Assignment then
+            begin
+              {$IFNDEF PS_NOWIDESTRING}
+              if u.BaseType = btWideString then
+                l := FindProc('WSTRSET')
+              else
+              {$ENDIF}
+              l := FindProc('STRSET');
+              if l = -1 then
+              begin
+                MakeError('', ecUnknownIdentifier, 'StrSet');
+                tmp.Free;
+                x.Free;
+                x := nil;
+                exit;
+              end;
+              tmp3 := TPSValueProcNo.Create;
+              tmp3.ResultType := nil;
+              tmp3.SetParserPos(FParser);
+              tmp3.ProcNo := L;
+              tmp3.SetParserPos(FParser);
+              tmp3.Parameters := TPSParameters.Create;
+              param := tmp3.Parameters.Add;
+              with tmp3.Parameters.Add do
+              begin
+                Val := tmp;
+                ExpectedType := GetTypeNo(BlockInfo, tmp);
+{$IFDEF DEBUG}
+                if not ExpectedType.Used then asm int 3; end;
+{$ENDIF}
+              end;
+              with tmp3.Parameters.Add do
+              begin
+                Val := x;
+                ExpectedType := GetTypeNo(BlockInfo, x);
+{$IFDEF DEBUG}
+                if not ExpectedType.Used then asm int 3; end;
+{$ENDIF}
+                ParamMode := pmInOut;
+              end;
+              x := tmp3;
+              FParser.Next;
+              tmp := Calc(CSTI_SemiColon);
+              if tmp = nil then
+              begin
+                x.Free;
+                x := nil;
+                exit;
+              end;
+              if (GetTypeNo(BlockInfo, Tmp).BaseType <> btChar)
+              {$IFNDEF PS_NOWIDESTRING} and (GetTypeno(BlockInfo, Tmp).BaseType <> btWideChar) {$ENDIF} then
+              begin
+                x.Free;
+                x := nil;
+                Tmp.Free;
+                MakeError('', ecTypeMismatch, '');
+                exit;
+
+              end;
+              param.Val := tmp;
+              Param.ExpectedType := GetTypeNo(BlockInfo, tmp);
+{$IFDEF DEBUG}
+              if not Param.ExpectedType.Used then asm int 3; end;
+{$ENDIF}
+            end else begin
+              {$IFNDEF PS_NOWIDESTRING}
+              if u.BaseType = btWideString then
+                l := FindProc('WSTRGET')
+              else
+              {$ENDIF}
+              l := FindProc('STRGET');
+              if l = -1 then
+              begin
+                MakeError('', ecUnknownIdentifier, 'StrGet');
+                tmp.Free;
+                x.Free;
+                x := nil;
+                exit;
+              end;
+              tmp3 := TPSValueProcNo.Create;
+              {$IFNDEF PS_NOWIDESTRING}
+              if u.BaseType = btWideString then
+                tmp3.ResultType := FindBaseType(btWideChar)
+              else
+              {$ENDIF}
+              tmp3.ResultType := FindBaseType(btChar);
+              tmp3.ProcNo := L;
+              tmp3.SetParserPos(FParser);
+              tmp3.Parameters := TPSParameters.Create;
+              with tmp3.Parameters.Add do
+              begin
+                Val := x;
+                ExpectedType := GetTypeNo(BlockInfo, x);
+{$IFDEF DEBUG}
+                if not ExpectedType.Used then asm int 3; end;
+{$ENDIF}
+
+                if x is TPSValueVar then
+                  ParamMode := pmInOut
+                else
+                  parammode := pmIn;
+              end;
+              with tmp3.Parameters.Add do
+              begin
+                Val := tmp;
+                ExpectedType := GetTypeNo(BlockInfo, tmp);
+{$IFDEF DEBUG}
+                if not ExpectedType.Used then asm int 3; end;
+{$ENDIF}
+              end;
+              x := tmp3;
+            end;
+            Break;
+          end else if ((u.BaseType = btArray) or (u.BaseType = btStaticArray)) and (x is TPSValueVar) then
+          begin
+            FParser.Next;
+            tmp := calc(CSTI_CloseBlock);
+            if tmp = nil then
+            begin
+              x.Free;
+              x := nil;
+              exit;
+            end;
+            if not IsIntType(GetTypeNo(BlockInfo, tmp).BaseType) then
+            begin
+              MakeError('', ecTypeMismatch, '');
+              tmp.Free;
+              x.Free;
+              x := nil;
+              exit;
+            end;
+            if (tmp.ClassType = TPSValueData) then
+            begin
+              rr := TPSSubNumber.Create;
+              TPSValueVar(x).RecAdd(rr);
+              if (u.BaseType = btStaticArray) then
+                TPSSubNumber(rr).SubNo := Cardinal(GetInt(TPSValueData(tmp).Data, tmp2) - TPSStaticArrayType(u).StartOffset)
+              else
+                TPSSubNumber(rr).SubNo := GetUInt(TPSValueData(tmp).Data, tmp2);
+              tmp.Free;
+              rr.aType := TPSArrayType(u).ArrayTypeNo;
+              u := rr.aType;
+            end
+            else
+            begin
+              if (u.BaseType = btStaticArray) then
+              begin
+                tmpn := TPSBinValueOp.Create;
+                TPSBinValueOp(tmpn).Operator := otSub;
+                TPSBinValueOp(tmpn).Val1 := tmp;
+                tmp := TPSValueData.Create;
+                TPSValueData(tmp).Data := NewVariant(FindBaseType(btS32));
+                TPSValueData(tmp).Data.ts32 := TPSStaticArrayType(u).StartOffset;
+                TPSBinValueOp(tmpn).Val2 := tmp;
+                TPSBinValueOp(tmpn).aType := FindBaseType(btS32);
+                tmp := tmpn;
+              end;
+              rr := TPSSubValue.Create;
+              TPSValueVar(x).recAdd(rr);
+              TPSSubValue(rr).SubNo := tmp;
+              rr.aType := TPSArrayType(u).ArrayTypeNo;
+              u := rr.aType;
+            end;
+            if FParser.CurrTokenId <> CSTI_CloseBlock then
+            begin
+              MakeError('', ecCloseBlockExpected, '');
+              x.Free;
+              x := nil;
+              exit;
+            end;
+            Fparser.Next;
+          end else begin
+            MakeError('', ecSemicolonExpected, '');
+            x.Free;
+            x := nil;
+            exit;
+          end;
+        end
+        else if (FParser.CurrTokenId = CSTI_Period) or (ImplicitPeriod) then
+        begin
+          if not ImplicitPeriod then
+            FParser.Next;
+          if u.BaseType = btRecord then
+          begin
+            t := FindSubR(FParser.GetToken, u);
+            if t = InvalidVal then
+            begin
+              if ImplicitPeriod then exit;
+              MakeError('', ecUnknownIdentifier, FParser.GetToken);
+              x.Free;
+              x := nil;
+              exit;
+            end;
+            if (x is TPSValueProcNo) then
+            begin
+              ImplicitPeriod := False;
+              FParser.Next;
+ 
+              tmp := AllocStackReg(u);
+              WriteCalculation(x,tmp);
+              TPSVar(BlockInfo.Proc.FProcVars[TPSValueAllocatedStackVar(tmp).LocalVarNo]).Use;
+ 
+              rr := TPSSubNumber.Create;
+              TPSValueVar(tmp).RecAdd(rr);
+              TPSSubNumber(rr).SubNo := t;
+              rr.aType := TPSRecordType(u).RecVal(t).FType;
+              u := rr.aType;
+ 
+              tmpn := TPSValueReplace.Create;
+              with TPSValueReplace(tmpn) do
+              begin
+                FreeOldValue := true;
+                FreeNewValue := true;
+                OldValue := tmp;
+                NewValue := AllocStackReg(u);
+                PreWriteAllocated := true;
+              end;
+ 
+              if not WriteCalculation(tmp,TPSValueReplace(tmpn).NewValue) then
+              begin
+                {MakeError('',ecInternalError,'');}
+                x.Free;
+                x := nil;
+                exit;
+              end;
+              x.Free;
+              x := tmpn;
+            end else
+            begin
+              if not (x is TPSValueVar) then begin
+                MakeError('', ecVariableExpected, FParser.GetToken);
+                x.Free;
+                x := nil;
+                exit;
+              end;
+              ImplicitPeriod := False;
+              FParser.Next;
+              rr := TPSSubNumber.Create;
+              TPSValueVar(x).RecAdd(rr);
+              TPSSubNumber(rr).SubNo := t;
+              rr.aType := TPSRecordType(u).RecVal(t).FType;
+              u := rr.aType;
+            end;
+          end
+          else
+          begin
+            x.Free;
+            MakeError('', ecSemicolonExpected, '');
+            x := nil;
+            exit;
+          end;
+        end
+        else
+          break;
+      end;
+    end;
+
+
+
+    procedure CheckClassArrayProperty(var P: TPSValue; const VarType: TPSVariableType; VarNo: Cardinal);
+    var
+      Tempp: TPSValue;
+      aType: TPSClassType;
+      procno, Idx: Cardinal;
+      Decl: TPSParametersDecl;
+    begin
+      if p = nil then exit;
+      if (GetTypeNo(BlockInfo, p) = nil) or (GetTypeNo(BlockInfo, p).BaseType <> btClass) then exit;
+      aType := TPSClassType(GetTypeNo(BlockInfo, p));
+      if FParser.CurrTokenID = CSTI_OpenBlock then
+      begin
+        if not TPSClassType(aType).Cl.Property_Find('', Idx) then
+        begin
+          MakeError('', ecPeriodExpected, '');
+          p.Free;
+          p := nil;
+          exit;
+        end;
+        if VarNo <> InvalidVal then
+        begin
+          if @FOnUseVariable <> nil then
+           FOnUseVariable(Self, VarType, VarNo, BlockInfo.ProcNo, FParser.CurrTokenPos, '[Default]');
+        end;
+        Decl := TPSParametersDecl.Create;
+        TPSClassType(aType).Cl.Property_GetHeader(Idx,  Decl);
+        tempp := p;
+        P := TPSValueProcNo.Create;
+        with TPSValueProcNo(P) do
+        begin
+          Parameters := TPSParameters.Create;
+          Parameters.Add;
+        end;
+        if not (ReadParameters(True, TPSValueProc(P).Parameters) and
+          ValidateParameters(BlockInfo, TPSValueProc(P).Parameters, Decl)) then
+        begin
+          tempp.Free;
+          Decl.Free;
+          p.Free;
+          p := nil;
+          exit;
+        end;
+        with TPSValueProcNo(p).Parameters[0] do
+        begin
+          Val := tempp;
+          ExpectedType := GetTypeNo(BlockInfo, tempp);
+        end;
+        if FParser.CurrTokenId = CSTI_Assignment then
+        begin
+          FParser.Next;
+          TempP := Calc(CSTI_SemiColon);
+          if TempP = nil then
+          begin
+            Decl.Free;
+            P.Free;
+            p := nil;
+            exit;
+          end;
+          with TPSValueProc(p).Parameters.Add do
+          begin
+            Val := Tempp;
+            ExpectedType := at2ut(Decl.Result);
+          end;
+          if not TPSClassType(aType).Cl.Property_Set(Idx, procno) then
+          begin
+            Decl.Free;
+            MakeError('', ecReadOnlyProperty, '');
+            p.Free;
+            p := nil;
+            exit;
+          end;
+          TPSValueProcNo(p).ProcNo := procno;
+          TPSValueProcNo(p).ResultType := nil;
+        end
+        else
+        begin
+          if not TPSClassType(aType).Cl.Property_Get(Idx, procno) then
+          begin
+            Decl.Free;
+            MakeError('', ecWriteOnlyProperty, '');
+            p.Free;
+            p := nil;
+            exit;
+          end;
+          TPSValueProcNo(p).ProcNo := procno;
+          TPSValueProcNo(p).ResultType := TPSExternalProcedure(FProcs[procno]).RegProc.Decl.Result;
+        end; // if FParser.CurrTokenId = CSTI_Assign
+        Decl.Free;
+      end;
+    end;
+
+    procedure CheckExtClass(var P: TPSValue; const VarType: TPSVariableType; VarNo: Cardinal; ImplicitPeriod: Boolean);
+    var
+      Temp, Idx: Cardinal;
+      FType: TPSType;
+      s: tbtString;
+
+    begin
+      FType := GetTypeNo(BlockInfo, p);
+      if FType = nil then Exit;
+      if FType.BaseType <> btExtClass then Exit;
+      while (FParser.CurrTokenID = CSTI_Period) or (ImplicitPeriod) do
+      begin
+        if not ImplicitPeriod then
+          FParser.Next;
+        if FParser.CurrTokenID <> CSTI_Identifier then
+        begin
+          if ImplicitPeriod then exit;
+          MakeError('', ecIdentifierExpected, '');
+          p.Free;
+          P := nil;
+          Exit;
+        end;
+        s := FParser.GetToken;
+        if TPSUndefinedClassType(FType).ExtClass.Func_Find(s, Idx) then
+        begin
+          FParser.Next;
+          TPSUndefinedClassType(FType).ExtClass.Func_Call(Idx, Temp);
+          P := ReadProcParameters(Temp, P);
+          if p = nil then
+          begin
+            Exit;
+          end;
+        end else
+        begin
+          if ImplicitPeriod then exit;
+          MakeError('', ecUnknownIdentifier, s);
+          p.Free;
+          P := nil;
+          Exit;
+        end;
+        ImplicitPeriod := False;
+        FType := GetTypeNo(BlockInfo, p);
+        if (FType = nil) or (FType.BaseType <> btExtClass) then Exit;
+      end; {while}
+    end;
+
+    procedure CheckClass(var P: TPSValue; const VarType: TPSVariableType; VarNo: Cardinal; ImplicitPeriod: Boolean);
+    var
+      Procno, Idx: Cardinal;
+      FType: TPSType;
+      TempP: TPSValue;
+      Decl: TPSParametersDecl;
+      s: tbtString;
+
+      pinfo, pinfonew: tbtString;
+      ppos: Cardinal;
+
+    begin
+      FType := GetTypeNo(BlockInfo, p);
+      if FType = nil then exit;
+      if (FType.BaseType <> btClass) then Exit;
+      while (FParser.CurrTokenID = CSTI_Period) or (ImplicitPeriod) do
+      begin
+        if not ImplicitPeriod then
+          FParser.Next;
+        if FParser.CurrTokenID <> CSTI_Identifier then
+        begin
+          if ImplicitPeriod then exit;
+          MakeError('', ecIdentifierExpected, '');
+          p.Free;
+          P := nil;
+          Exit;
+        end;
+        s := FParser.GetToken;
+        if TPSClassType(FType).Cl.Func_Find(s, Idx) then
+        begin
+          FParser.Next;
+          VarNo := InvalidVal;
+          TPSClassType(FType).cl.Func_Call(Idx, Procno);
+          P := ReadProcParameters(Procno, P);
+          if p = nil then
+          begin
+            Exit;
+          end;
+        end else if TPSClassType(FType).cl.Property_Find(s, Idx) then
+        begin
+          ppos := FParser.CurrTokenPos;
+          pinfonew := FParser.OriginalToken;
+          FParser.Next;
+          if VarNo <> InvalidVal then
+          begin
+            if pinfo = '' then
+              pinfo := pinfonew
+            else
+              pinfo := pinfo + '.' + pinfonew;
+            if @FOnUseVariable <> nil then
+              FOnUseVariable(Self, VarType, VarNo, BlockInfo.ProcNo, ppos, pinfo);
+          end;
+          Decl := TPSParametersDecl.Create;
+          TPSClassType(FType).cl.Property_GetHeader(Idx, Decl);
+          TempP := P;
+          p := TPSValueProcNo.Create;
+          with TPSValueProcNo(p) do
+          begin
+            Parameters := TPSParameters.Create;
+            Parameters.Add;
+            Pos := FParser.CurrTokenPos;
+            row := FParser.Row;
+            Col := FParser.Col;
+          end;
+          if Decl.ParamCount <> 0 then
+          begin
+            if not (ReadParameters(True, TPSValueProc(P).Parameters) and
+              ValidateParameters(BlockInfo, TPSValueProc(P).Parameters, Decl)) then
+            begin
+              Tempp.Free;
+              Decl.Free;
+              p.Free;
+              P := nil;
+              exit;
+            end;
+          end; // if
+          with TPSValueProcNo(p).Parameters[0] do
+          begin
+            Val := TempP;
+            ExpectedType := at2ut(GetTypeNo(BlockInfo, TempP));
+          end;
+          if FParser.CurrTokenId = CSTI_Assignment then
+          begin
+            FParser.Next;
+            TempP := Calc(CSTI_SemiColon);
+            if TempP = nil then
+            begin
+              Decl.Free;
+              P.Free;
+              p := nil;
+              exit;
+            end;
+            with TPSValueProc(p).Parameters.Add do
+            begin
+              Val := Tempp;
+              ExpectedType := at2ut(Decl.Result);
+{$IFDEF DEBUG}
+              if not ExpectedType.Used then asm int 3; end;
+{$ENDIF}
+            end;
+
+            if not TPSClassType(FType).cl.Property_Set(Idx, Procno) then
+            begin
+              MakeError('', ecReadOnlyProperty, '');
+              Decl.Free;
+              p.Free;
+              p := nil;
+              exit;
+            end;
+            TPSValueProcNo(p).ProcNo := Procno;
+            TPSValueProcNo(p).ResultType := nil;
+            Decl.Free;
+            Exit;
+          end else begin
+            if not TPSClassType(FType).cl.Property_Get(Idx, Procno) then
+            begin
+              MakeError('', ecWriteOnlyProperty, '');
+              Decl.Free;
+              p.Free;
+              p := nil;
+              exit;
+            end;
+            TPSValueProcNo(p).ProcNo := ProcNo;
+            TPSValueProcNo(p).ResultType := TPSExternalProcedure(FProcs[ProcNo]).RegProc.Decl.Result;
+          end; // if FParser.CurrTokenId = CSTI_Assign
+          Decl.Free;
+        end else
+        begin
+          if ImplicitPeriod then exit;
+          MakeError('', ecUnknownIdentifier, s);
+          p.Free;
+          P := nil;
+          Exit;
+        end;
+        ImplicitPeriod := False;
+        FType := GetTypeNo(BlockInfo, p);
+        if (FType = nil) or (FType.BaseType <> btClass) then Exit;
+      end; {while}
+    end;
+{$IFNDEF PS_NOIDISPATCH}
+    procedure CheckIntf(var P: TPSValue; const VarType: TPSVariableType; VarNo: Cardinal; ImplicitPeriod: Boolean);
+    var
+      Procno, Idx: Cardinal;
+      FType: TPSType;
+      s: tbtString;
+
+      CheckArrayProperty,HasArrayProperty:boolean;
+    begin
+      FType := GetTypeNo(BlockInfo, p);
+      if FType = nil then exit;
+      if (FType.BaseType <> btInterface) and (Ftype.BaseType <> BtVariant) and (FType.BaseType = btNotificationVariant) then Exit;
+
+      CheckArrayProperty:=(FParser.CurrTokenID=CSTI_OpenBlock)and
+        (Ftype.BaseType = BtVariant);
+      while (FParser.CurrTokenID = CSTI_Period)
+      or (ImplicitPeriod)or (CheckArrayProperty) do begin
+
+        HasArrayProperty:=CheckArrayProperty;
+        if CheckArrayProperty then begin
+         CheckArrayProperty:=false;
+        end else begin
+         if not ImplicitPeriod then
+          FParser.Next;
+        end;
+        if FParser.CurrTokenID <> CSTI_Identifier then
+        begin
+          if ImplicitPeriod then exit;
+          if not HasArrayProperty then begin
+           MakeError('', ecIdentifierExpected, '');
+           p.Free;
+           P := nil;
+           Exit;
+          end;
+        end;
+        if (FType.BaseType = btVariant) or (FType.BaseType = btNotificationVariant) then
+        begin
+          if HasArrayProperty then begin
+           s:='';
+          end else begin
+           s := FParser.OriginalToken;
+           FParser.Next;
+          end;
+          ImplicitPeriod := False;
+          FType := GetTypeNo(BlockInfo, p);
+          p := ReadIDispatchParameters(s, TPSVariantType(FType), p);
+          if (FType = nil) or (FType.BaseType <> btInterface) then Exit;
+        end else
+        begin
+          s := FParser.GetToken;
+          if (FType is TPSInterfaceType) and (TPSInterfaceType(FType).Intf.Func_Find(s, Idx)) then
+          begin
+            FParser.Next;
+            TPSInterfaceType(FType).Intf.Func_Call(Idx, Procno);
+            P := ReadProcParameters(Procno, P);
+            if p = nil then
+            begin
+              Exit;
+            end;
+          end else
+          begin
+            if ImplicitPeriod then exit;
+            MakeError('', ecUnknownIdentifier, s);
+            p.Free;
+            P := nil;
+            Exit;
+          end;
+          ImplicitPeriod := False;
+          FType := GetTypeNo(BlockInfo, p);
+          if (FType = nil) or ((FType.BaseType <> btInterface) and (Ftype.BaseType <> btVariant) and (Ftype.BaseType <> btNotificationVariant)) then Exit;
+        end;
+      end; {while}
+    end;
+    {$ENDIF}
+    function ExtCheckClassType(FType: TPSType; const ParserPos: Cardinal): TPSValue;
+    var
+      FType2: TPSType;
+      ProcNo, Idx: Cardinal;
+      Temp, ResV: TPSValue;
+    begin
+      if FParser.CurrTokenID = CSTI_OpenRound then
+      begin
+        FParser.Next;
+        Temp := Calc(CSTI_CloseRound);
+        if Temp = nil then
+        begin
+          Result := nil;
+          exit;
+        end;
+        if FParser.CurrTokenID <> CSTI_CloseRound then
+        begin
+          temp.Free;
+          MakeError('', ecCloseRoundExpected, '');
+          Result := nil;
+          exit;
+        end;
+        FType2 := GetTypeNo(BlockInfo, Temp);
+        if (FType.basetype = BtClass) and (ftype2.BaseType = btClass) and (ftype <> ftype2) then
+        begin
+          if not TPSUndefinedClassType(FType2).ExtClass.CastToType(AT2UT(FType), ProcNo) then
+          begin
+            temp.Free;
+            MakeError('', ecTypeMismatch, '');
+            Result := nil;
+            exit;
+          end;
+          Result := TPSValueProcNo.Create;
+          TPSValueProcNo(Result).Parameters := TPSParameters.Create;
+          TPSValueProcNo(Result).ResultType := at2ut(FType);
+          TPSValueProcNo(Result).ProcNo := ProcNo;
+          with TPSValueProcNo(Result).Parameters.Add do
+          begin
+            Val := Temp;
+            ExpectedType := GetTypeNo(BlockInfo, temp);
+          end;
+          with TPSValueProcNo(Result).Parameters.Add do
+          begin
+            ExpectedType := at2ut(FindBaseType(btu32));
+            Val := TPSValueData.Create;
+            with TPSValueData(val) do
+            begin
+              SetParserPos(FParser);
+              Data := NewVariant(ExpectedType);
+              Data.tu32 := at2ut(FType).FinalTypeNo;
+            end;
+          end;
+          FParser.Next;
+          Exit;
+        end;
+        if not IsCompatibleType(FType, FType2, True) then
+        begin
+          temp.Free;
+          MakeError('', ecTypeMismatch, '');
+          Result := nil;
+          exit;
+        end;
+        FParser.Next;
+        Result := TPSUnValueOp.Create;
+        with TPSUnValueOp(Result) do
+        begin
+          Operator := otCast;
+          Val1 := Temp;
+          SetParserPos(FParser);
+          aType := AT2UT(FType);
+        end;
+        exit;
+      end;
+      if FParser.CurrTokenId <> CSTI_Period then
+      begin
+        Result := nil;
+        MakeError('', ecPeriodExpected, '');
+        Exit;
+      end;
+      if FType.BaseType <> btExtClass then
+      begin
+        Result := nil;
+        MakeError('', ecClassTypeExpected, '');
+        Exit;
+      end;
+      FParser.Next;
+      if not TPSUndefinedClassType(FType).ExtClass.ClassFunc_Find(FParser.GetToken, Idx) then
+      begin
+        Result := nil;
+        MakeError('', ecUnknownIdentifier, FParser.OriginalToken);
+        Exit;
+      end;
+      FParser.Next;
+      TPSUndefinedClassType(FType).ExtClass.ClassFunc_Call(Idx, ProcNo);
+      Temp := TPSValueData.Create;
+      with TPSValueData(Temp) do
+      begin
+        Data := NewVariant(at2ut(FindBaseType(btu32)));
+        Data.tu32 := at2ut(FType).FinalTypeNo;
+      end;
+      ResV := ReadProcParameters(ProcNo, Temp);
+      if ResV <> nil then
+      begin
+        TPSValueProc(Resv).ResultType := at2ut(FType);
+        Result := Resv;
+      end else begin
+        Result := nil;
+      end;
+    end;
+
+    function CheckClassType(TypeNo: TPSType; const ParserPos: Cardinal): TPSValue;
+    var
+      FType2: TPSType;
+      ProcNo, Idx: Cardinal;
+      Temp, ResV: TPSValue;
+      dta: PIfRVariant;
+    begin
+      if typeno.BaseType = btExtClass then
+      begin
+        Result := ExtCheckClassType(TypeNo, PArserPos);
+        exit;
+      end;
+      if FParser.CurrTokenID = CSTI_OpenRound then
+      begin
+        FParser.Next;
+        Temp := Calc(CSTI_CloseRound);
+        if Temp = nil then
+        begin
+          Result := nil;
+          exit;
+        end;
+        if FParser.CurrTokenID <> CSTI_CloseRound then
+        begin
+          temp.Free;
+          MakeError('', ecCloseRoundExpected, '');
+          Result := nil;
+          exit;
+        end;
+        FType2 := GetTypeNo(BlockInfo, Temp);
+        if ((typeno.BaseType = btClass){$IFNDEF PS_NOINTERFACES} or (TypeNo.basetype = btInterface){$ENDIF}) and
+          ((ftype2.BaseType = btClass){$IFNDEF PS_NOINTERFACES} or (ftype2.BaseType = btInterface){$ENDIF}) and (TypeNo <> ftype2) then
+        begin
+{$IFNDEF PS_NOINTERFACES}
+          if FType2.basetype = btClass then
+          begin
+{$ENDIF}
+          if not TPSClassType(FType2).Cl.CastToType(AT2UT(TypeNo), ProcNo) then
+          begin
+            temp.Free;
+            MakeError('', ecTypeMismatch, '');
+            Result := nil;
+            exit;
+          end;
+{$IFNDEF PS_NOINTERFACES}
+          end else begin
+            if not TPSInterfaceType(FType2).Intf.CastToType(AT2UT(TypeNo), ProcNo) then
+            begin
+              temp.Free;
+              MakeError('', ecTypeMismatch, '');
+              Result := nil;
+              exit;
+            end;
+          end;
+{$ENDIF}
+          Result := TPSValueProcNo.Create;
+          TPSValueProcNo(Result).Parameters := TPSParameters.Create;
+          TPSValueProcNo(Result).ResultType := at2ut(TypeNo);
+          TPSValueProcNo(Result).ProcNo := ProcNo;
+          with TPSValueProcNo(Result).Parameters.Add do
+          begin
+            Val := Temp;
+            ExpectedType := GetTypeNo(BlockInfo, temp);
+{$IFDEF DEBUG}
+            if not ExpectedType.Used then asm int 3; end;
+{$ENDIF}
+          end;
+          with TPSValueProcNo(Result).Parameters.Add do
+          begin
+            ExpectedType := at2ut(FindBaseType(btu32));
+{$IFDEF DEBUG}
+            if not ExpectedType.Used then asm int 3; end;
+{$ENDIF}
+            Val := TPSValueData.Create;
+            with TPSValueData(val) do
+            begin
+              SetParserPos(FParser);
+              Data := NewVariant(ExpectedType);
+              Data.tu32 := at2ut(TypeNo).FinalTypeNo;
+            end;
+          end;
+          FParser.Next;
+          Exit;
+        end;
+        if not IsCompatibleType(TypeNo, FType2, True) then
+        begin
+          temp.Free;
+          MakeError('', ecTypeMismatch, '');
+          Result := nil;
+          exit;
+        end;
+        FParser.Next;
+        Result := TPSUnValueOp.Create;
+        with TPSUnValueOp(Result) do
+        begin
+          Operator := otCast;
+          Val1 := Temp;
+          SetParserPos(FParser);
+          aType := AT2UT(TypeNo);
+        end;
+
+        exit;
+      end else
+      if FParser.CurrTokenId <> CSTI_Period then
+      begin
+        Result := TPSValueData.Create;
+        Result.SetParserPos(FParser);
+        New(dta);
+        TPSValueData(Result).Data := dta;
+        InitializeVariant(dta, at2ut(FindBaseType(btType)));
+        dta.ttype := at2ut(TypeNo);
+        Exit;
+      end;
+      if TypeNo.BaseType <> btClass then
+      begin
+        Result := nil;
+        MakeError('', ecClassTypeExpected, '');
+        Exit;
+      end;
+      FParser.Next;
+      if not TPSClassType(TypeNo).Cl.ClassFunc_Find(FParser.GetToken, Idx) then
+      begin
+        Result := nil;
+        MakeError('', ecUnknownIdentifier, FParser.OriginalToken);
+        Exit;
+      end;
+      FParser.Next;
+      TPSClassType(TypeNo).Cl.ClassFunc_Call(Idx, ProcNo);
+      Temp := TPSValueData.Create;
+      with TPSValueData(Temp) do
+      begin
+        Data := NewVariant(at2ut(FindBaseType(btu32)));
+        Data.tu32 := at2ut(TypeNo).FinalTypeNo;
+      end;
+      ResV := ReadProcParameters(ProcNo, Temp);
+      if ResV <> nil then
+      begin
+        TPSValueProc(Resv).ResultType := at2ut(TypeNo);
+        Result := Resv;
+      end else begin
+        Result := nil;
+      end;
+    end;
+
+  var
+    vt: TPSVariableType;
+    vno: Cardinal;
+    TWith, Temp: TPSValue;
+    l, h: Longint;
+    s, u: tbtString;
+    t: TPSConstant;
+    Temp1: TPSType;
+    temp2: CArdinal;
+    bi: TPSBlockInfo;
+    lOldRecCount: Integer;
+
+  begin
+    s := FParser.GetToken;
+
+    if FType <> 1 then
+    begin
+      bi := BlockInfo;
+      while bi <> nil do
+      begin
+        for l := bi.WithList.Count -1 downto 0 do
+        begin
+          TWith := TPSValueAllocatedStackVar.Create;
+          TPSValueAllocatedStackVar(TWith).LocalVarNo := TPSValueAllocatedStackVar(TPSValueReplace(bi.WithList[l]).NewValue).LocalVarNo;
+          Temp := TWith;
+          VNo := TPSValueAllocatedStackVar(Temp).LocalVarNo;
+          lOldRecCount := TPSValueVar(TWith).GetRecCount;
+          vt := ivtVariable;
+          if Temp = TWith then CheckFurther(TWith, True);
+          if Temp = TWith then CheckClass(TWith, vt, vno, True);
+          if Temp = TWith then  CheckExtClass(TWith, vt, vno, True);
+          if (Temp <> TWith) or (Cardinal(lOldRecCount) <> TPSValueVar(TWith).GetRecCount) then
+          begin
+            repeat
+              Temp := TWith;
+              if TWith <> nil then CheckFurther(TWith, False);
+              if TWith <> nil then CheckClass(TWith, vt, vno, False);
+              if TWith <> nil then  CheckExtClass(TWith, vt, vno, False);
+{$IFNDEF PS_NOIDISPATCH}if TWith <> nil then CheckIntf(TWith, vt, vno, False);{$ENDIF}
+              if TWith <> nil then CheckProcCall(TWith);
+              if TWith <> nil then CheckClassArrayProperty(TWith, vt, vno);
+              vno := InvalidVal;
+            until (TWith = nil) or (Temp = TWith);
+            Result := TWith;
+            Exit;
+          end;
+          TWith.Free;
+        end;
+        bi := bi.FOwner;
+      end;
+    end;
+
+    if s = 'RESULT' then
+    begin
+      if BlockInfo.proc.Decl.Result = nil then
+      begin
+        Result := nil;
+        MakeError('', ecUnknownIdentifier, FParser.OriginalToken);
+      end
+      else
+      begin
+        BlockInfo.Proc.ResultUse;
+        Result := TPSValueParamVar.Create;
+        with TPSValueParamVar(Result) do
+        begin
+          SetParserPos(FParser);
+          ParamNo := 0;
+        end;
+        vno := 0;
+        vt := ivtParam;
+        if @FOnUseVariable <> nil then
+          FOnUseVariable(Self, vt, vno, BlockInfo.ProcNo, FParser.CurrTokenPos, '');
+        FParser.Next;
+        repeat
+          Temp := Result;
+          if Result <> nil then CheckFurther(Result, False);
+          if Result <> nil then CheckClass(Result, vt, vno, False);
+          if Result <> nil then  CheckExtClass(Result, vt, vno, False);
+{$IFNDEF PS_NOIDISPATCH}if Result <> nil then CheckIntf(Result, vt, vno, False);{$ENDIF}
+          if Result <> nil then CheckProcCall(Result);
+          if Result <> nil then CheckClassArrayProperty(Result, vt, vno);
+          vno := InvalidVal;
+        until (Result = nil) or (Temp = Result);
+      end;
+      exit;
+    end;
+    if BlockInfo.Proc.Decl.Result = nil then
+      l := 0
+    else
+      l := 1;
+    for h := 0 to BlockInfo.proc.Decl.ParamCount -1 do
+    begin
+      if BlockInfo.proc.Decl.Params[h].Name = s then
+      begin
+        Result := TPSValueParamVar.Create;
+        with TPSValueParamVar(Result) do
+        begin
+          SetParserPos(FParser);
+          ParamNo := l;
+        end;
+        vt := ivtParam;
+        vno := L;
+        if @FOnUseVariable <> nil then
+          FOnUseVariable(Self, vt, vno, BlockInfo.ProcNo, FParser.CurrTokenPos, '');
+        FParser.Next;
+        repeat
+          Temp := Result;
+          if Result <> nil then CheckFurther(Result, False);
+          if Result <> nil then CheckClass(Result, vt, vno, False);
+          if Result <> nil then  CheckExtClass(Result, vt, vno, False);
+{$IFNDEF PS_NOIDISPATCH}if Result <> nil then CheckIntf(Result, vt, vno, False);{$ENDIF}
+          if Result <> nil then CheckProcCall(Result);
+          if Result <> nil then CheckClassArrayProperty(Result, vt, vno);
+          vno := InvalidVal;
+        until (Result = nil) or (Temp = Result);
+        exit;
+      end;
+      Inc(l);
+      GRFW(u);
+    end;
+
+    h := MakeHash(s);
+
+    for l := 0 to BlockInfo.Proc.ProcVars.Count - 1 do
+    begin
+      if (PIFPSProcVar(BlockInfo.Proc.ProcVars[l]).NameHash = h) and
+        (PIFPSProcVar(BlockInfo.Proc.ProcVars[l]).Name = s) then
+      begin
+        PIFPSProcVar(BlockInfo.Proc.ProcVars[l]).Use;
+        vno := l;
+        vt := ivtVariable;
+        if @FOnUseVariable <> nil then
+          FOnUseVariable(Self, vt, vno, BlockInfo.ProcNo, FParser.CurrTokenPos, '');
+        Result := TPSValueLocalVar.Create;
+        with TPSValueLocalVar(Result) do
+        begin
+          LocalVarNo := l;
+          SetParserPos(FParser);
+        end;
+        FParser.Next;
+        repeat
+          Temp := Result;
+          if Result <> nil then CheckFurther(Result, False);
+          if Result <> nil then CheckClass(Result, vt, vno, False);
+          if Result <> nil then  CheckExtClass(Result, vt, vno, False);
+{$IFNDEF PS_NOIDISPATCH}if Result <> nil then CheckIntf(Result, vt, vno, False);{$ENDIF}
+          if Result <> nil then CheckProcCall(Result);
+          if Result <> nil then CheckClassArrayProperty(Result, vt, vno);
+          vno := InvalidVal;
+        until (Result = nil) or (Temp = Result);
+
+        exit;
+      end;
+    end;
+
+    for l := 0 to FVars.Count - 1 do
+    begin
+      if (TPSVar(FVars[l]).NameHash = h) and
+        (TPSVar(FVars[l]).Name = s) then
+      begin
+        TPSVar(FVars[l]).Use;
+        Result := TPSValueGlobalVar.Create;
+        with TPSValueGlobalVar(Result) do
+        begin
+          SetParserPos(FParser);
+          GlobalVarNo := l;
+
+        end;
+        vt := ivtGlobal;
+        vno := l;
+        if @FOnUseVariable <> nil then
+          FOnUseVariable(Self, vt, vno, BlockInfo.ProcNo, FParser.CurrTokenPos, '');
+        FParser.Next;
+        repeat
+          Temp := Result;
+          if Result <> nil then CheckNotificationVariant(Result);
+          if Result <> nil then CheckFurther(Result, False);
+          if Result <> nil then CheckClass(Result, vt, vno, False);
+          if Result <> nil then  CheckExtClass(Result, vt, vno, False);
+{$IFNDEF PS_NOIDISPATCH}if Result <> nil then CheckIntf(Result, vt, vno, False);{$ENDIF}
+          if Result <> nil then CheckProcCall(Result);
+          if Result <> nil then CheckClassArrayProperty(Result, vt, vno);
+          vno := InvalidVal;
+        until (Result = nil) or (Temp = Result);
+        exit;
+      end;
+    end;
+    Temp1 := FindType(FParser.GetToken);
+    if Temp1 <> nil then
+    begin
+      l := FParser.CurrTokenPos;
+      if FType = 1 then
+      begin
+        Result := nil;
+        MakeError('', ecVariableExpected, FParser.OriginalToken);
+        exit;
+      end;
+      vt := ivtGlobal;
+      vno := InvalidVal;
+      FParser.Next;
+      Result := CheckClassType(Temp1, l);
+        repeat
+          Temp := Result;
+          if Result <> nil then CheckFurther(Result, False);
+          if Result <> nil then CheckClass(Result, vt, vno, False);
+          if Result <> nil then  CheckExtClass(Result, vt, vno, False);
+{$IFNDEF PS_NOIDISPATCH}if Result <> nil then CheckIntf(Result, vt, vno, False);{$ENDIF}
+          if Result <> nil then CheckProcCall(Result);
+          if Result <> nil then CheckClassArrayProperty(Result, vt, vno);
+          vno := InvalidVal;
+        until (Result = nil) or (Temp = Result);
+
+      exit;
+    end;
+    Temp2 := FindProc(FParser.GetToken);
+    if Temp2 <> InvalidVal then
+    begin
+      if FType = 1 then
+      begin
+        Result := nil;
+        MakeError('', ecVariableExpected, FParser.OriginalToken);
+        exit;
+      end;
+      FParser.Next;
+      Result := ReadProcParameters(Temp2, nil);
+      if Result = nil then
+        exit;
+      Result.SetParserPos(FParser);
+      vt := ivtGlobal;
+      vno := InvalidVal;
+      repeat
+        Temp := Result;
+        if Result <> nil then CheckFurther(Result, False);
+        if Result <> nil then CheckClass(Result, vt, vno, False);
+        if Result <> nil then  CheckExtClass(Result, vt, vno, False);
+{$IFNDEF PS_NOIDISPATCH}if Result <> nil then CheckIntf(Result, vt, vno, False);{$ENDIF}
+        if Result <> nil then CheckProcCall(Result);
+        if Result <> nil then CheckClassArrayProperty(Result, vt, vno);
+        vno := InvalidVal;
+      until (Result = nil) or (Temp = Result);
+      exit;
+    end;
+    for l := 0 to FConstants.Count -1 do
+    begin
+      t := TPSConstant(FConstants[l]);
+      if (t.NameHash = h) and (t.Name = s) then
+      begin
+        if FType <> 0 then
+        begin
+          Result := nil;
+          MakeError('', ecVariableExpected, FParser.OriginalToken);
+          exit;
+        end;
+        fparser.next;
+        Result := TPSValueData.Create;
+        with TPSValueData(Result) do
+        begin
+          SetParserPos(FParser);
+          Data := NewVariant(at2ut(t.Value.FType));
+          CopyVariantContents(t.Value, Data);
+        end;
+        vt := ivtGlobal;
+        vno := InvalidVal;
+        repeat
+          Temp := Result;
+          if Result <> nil then CheckFurther(Result, False);
+          if Result <> nil then CheckClass(Result, vt, vno, False);
+          if Result <> nil then  CheckExtClass(Result, vt, vno, False);
+{$IFNDEF PS_NOIDISPATCH}if Result <> nil then CheckIntf(Result, vt, vno, False);{$ENDIF}
+          if Result <> nil then CheckProcCall(Result);
+          if Result <> nil then CheckClassArrayProperty(Result, vt, vno);
+          vno := InvalidVal;
+        until (Result = nil) or (Temp = Result);
+        exit;
+      end;
+    end;
+    Result := nil;
+    MakeError('', ecUnknownIdentifier, FParser.OriginalToken);
+  end;
+
+  function calc(endOn: TPSPasToken): TPSValue;
+    function TryEvalConst(var P: TPSValue): Boolean; forward;
+
+
+    function ReadExpression: TPSValue; forward;
+    function ReadTerm: TPSValue; forward;
+    function ReadFactor: TPSValue;
+    var
+      NewVar: TPSValue;
+      NewVarU: TPSUnValueOp;
+      Proc: TPSProcedure;
+      function ReadArray: Boolean;
+      var
+        tmp: TPSValue;
+      begin
+        FParser.Next;
+        NewVar := TPSValueArray.Create;
+        NewVar.SetParserPos(FParser);
+        if FParser.CurrTokenID <> CSTI_CloseBlock then
+        begin
+          while True do
+          begin
+            tmp := nil;
+            Tmp := ReadExpression();
+            if Tmp = nil then
+            begin
+              Result := False;
+              NewVar.Free;
+              exit;
+            end;
+            if not TryEvalConst(tmp) then
+            begin
+              tmp.Free;
+              NewVar.Free;
+              Result := False;
+              exit;
+            end;
+            TPSValueArray(NewVar).Add(tmp);
+            if FParser.CurrTokenID = CSTI_CloseBlock then Break;
+            if FParser.CurrTokenID <> CSTI_Comma then
+            begin
+              MakeError('', ecCloseBlockExpected, '');
+              NewVar.Free;
+              Result := False;
+              exit;
+            end;
+            FParser.Next;
+          end;
+        end;
+        FParser.Next;
+        Result := True;
+      end;
+
+      function CallAssigned(P: TPSValue): TPSValue;
+      var
+        temp: TPSValueProcNo;
+      begin
+        temp := TPSValueProcNo.Create;
+        temp.ProcNo := FindProc('!ASSIGNED');
+        temp.ResultType := at2ut(FDefaultBoolType);
+        temp.Parameters := TPSParameters.Create;
+        with Temp.Parameters.Add do
+        begin
+          Val := p;
+          ExpectedType := GetTypeNo(BlockInfo, p);
+{$IFDEF DEBUG}
+          if not ExpectedType.Used then asm int 3; end;
+{$ENDIF}
+          FParamMode := pmIn;
+        end;
+        Result := Temp;
+      end;
+
+      function CallSucc(P: TPSValue): TPSValue;
+      var
+        temp: TPSBinValueOp;
+      begin
+        temp := TPSBinValueOp.Create;
+        temp.SetParserPos(FParser);
+        temp.FOperator := otAdd;
+        temp.FVal2 := TPSValueData.Create;
+        TPSValueData(Temp.FVal2).Data := NewVariant(FindBaseType(bts32));
+        TPSValueData(Temp.FVal2).Data.ts32 := 1;
+        temp.FVal1 := p;
+        Temp.FType := GetTypeNo(BlockInfo, P);
+        result := temp;
+      end;
+
+      function CallPred(P: TPSValue): TPSValue;
+      var
+        temp: TPSBinValueOp;
+      begin
+        temp := TPSBinValueOp.Create;
+        temp.SetParserPos(FParser);
+        temp.FOperator := otSub;
+        temp.FVal2 := TPSValueData.Create;
+        TPSValueData(Temp.FVal2).Data := NewVariant(FindBaseType(bts32));
+        TPSValueData(Temp.FVal2).Data.ts32 := 1;
+        temp.FVal1 := p;
+        Temp.FType := GetTypeNo(BlockInfo, P);
+        result := temp;
+      end;
+
+    begin
+      case fParser.CurrTokenID of
+        CSTI_OpenBlock:
+          begin
+            if not ReadArray then
+            begin
+              Result := nil;
+              exit;
+            end;
+          end;
+        CSTII_Not:
+        begin
+          FParser.Next;
+          NewVar := ReadFactor;
+          if NewVar = nil then
+          begin
+            Result := nil;
+            exit;
+          end;
+          NewVarU := TPSUnValueOp.Create;
+          NewVarU.SetParserPos(FParser);
+          NewVarU.aType := GetTypeNo(BlockInfo, NewVar);
+          NewVarU.Operator := otNot;
+          NewVarU.Val1 := NewVar;
+          NewVar := NewVarU;
+        end;
+        CSTI_Plus:
+        begin
+          FParser.Next;
+          NewVar := ReadTerm;
+          if NewVar = nil then
+          begin
+            Result := nil;
+            exit;
+          end;
+        end;
+        CSTI_Minus:
+        begin
+          FParser.Next;
+          NewVar := ReadTerm;
+          if NewVar = nil then
+          begin
+            Result := nil;
+            exit;
+          end;
+          NewVarU := TPSUnValueOp.Create;
+          NewVarU.SetParserPos(FParser);
+          NewVarU.aType := GetTypeNo(BlockInfo, NewVar);
+          NewVarU.Operator := otMinus;
+          NewVarU.Val1 := NewVar;
+          NewVar := NewVarU;
+        end;
+        CSTII_Nil:
+          begin
+            FParser.Next;
+            NewVar := TPSValueNil.Create;
+            NewVar.SetParserPos(FParser);
+          end;
+        CSTI_AddressOf:
+          begin
+            FParser.Next;
+            if FParser.CurrTokenID <> CSTI_Identifier then
+            begin
+              MakeError('', ecIdentifierExpected, '');
+              Result := nil;
+              exit;
+            end;
+            NewVar := TPSValueProcPtr.Create;
+            NewVar.SetParserPos(FParser);
+            TPSValueProcPtr(NewVar).ProcPtr := FindProc(FParser.GetToken);
+            if TPSValueProcPtr(NewVar).ProcPtr = InvalidVal then
+            begin
+              MakeError('', ecUnknownIdentifier, FParser.OriginalToken);
+              NewVar.Free;
+              Result := nil;
+              exit;
+            end;
+            Proc := FProcs[TPSValueProcPtr(NewVar).ProcPtr];
+            if Proc.ClassType <> TPSInternalProcedure then
+            begin
+              MakeError('', ecUnknownIdentifier, FParser.OriginalToken);
+              NewVar.Free;
+              Result := nil;
+              exit;
+            end;
+            FParser.Next;
+          end;
+        CSTI_OpenRound:
+          begin
+            FParser.Next;
+            NewVar := ReadExpression();
+            if NewVar = nil then
+            begin
+              Result := nil;
+              exit;
+            end;
+            if FParser.CurrTokenId <> CSTI_CloseRound then
+            begin
+              NewVar.Free;
+              Result := nil;
+              MakeError('', ecCloseRoundExpected, '');
+              exit;
+            end;
+            FParser.Next;
+          end;
+        CSTI_Char, CSTI_String:
+          begin
+            NewVar := TPSValueData.Create;
+            NewVar.SetParserPos(FParser);
+            TPSValueData(NewVar).Data := ReadString;
+            if TPSValueData(NewVar).Data = nil then
+            begin
+              NewVar.Free;
+              Result := nil;
+              exit;
+            end;
+          end;
+        CSTI_HexInt, CSTI_Integer:
+          begin
+            NewVar := TPSValueData.Create;
+            NewVar.SetParserPos(FParser);
+            TPSValueData(NewVar).Data := ReadInteger(FParser.GetToken);
+            FParser.Next;
+          end;
+        CSTI_Real:
+          begin
+            NewVar := TPSValueData.Create;
+            NewVar.SetParserPos(FParser);
+            TPSValueData(NewVar).Data := ReadReal(FParser.GetToken);
+            FParser.Next;
+          end;
+        CSTII_Ord:
+          begin
+            FParser.Next;
+            if fParser.Currtokenid <> CSTI_OpenRound then
+            begin
+              Result := nil;
+              MakeError('', ecOpenRoundExpected, '');
+              exit;
+            end;
+            FParser.Next;
+            NewVar := ReadExpression();
+            if NewVar = nil then
+            begin
+              Result := nil;
+              exit;
+            end;
+            if FParser.CurrTokenId <> CSTI_CloseRound then
+            begin
+              NewVar.Free;
+              Result := nil;
+              MakeError('', ecCloseRoundExpected, '');
+              exit;
+            end;
+            if not ((GetTypeNo(BlockInfo, NewVar).BaseType = btChar) or
+            {$IFNDEF PS_NOWIDESTRING} (GetTypeNo(BlockInfo, NewVar).BaseType = btWideChar) or{$ENDIF}
+            (GetTypeNo(BlockInfo, NewVar).BaseType = btEnum) or (IsIntType(GetTypeNo(BlockInfo, NewVar).BaseType))) then
+            begin
+              NewVar.Free;
+              Result := nil;
+              MakeError('', ecTypeMismatch, '');
+              exit;
+            end;
+            NewVarU := TPSUnValueOp.Create;
+            NewVarU.SetParserPos(FParser);
+            NewVarU.Operator := otCast;
+            NewVarU.FType := at2ut(FindBaseType(btu32));
+            NewVarU.Val1 := NewVar;
+            NewVar := NewVarU;
+            FParser.Next;
+          end;
+        CSTII_Chr:
+          begin
+            FParser.Next;
+            if fParser.Currtokenid <> CSTI_OpenRound then
+            begin
+              Result := nil;
+              MakeError('', ecOpenRoundExpected, '');
+              exit;
+            end;
+            FParser.Next;
+            NewVar := ReadExpression();
+            if NewVar = nil then
+            begin
+              Result := nil;
+              exit;
+            end;
+            if FParser.CurrTokenId <> CSTI_CloseRound then
+            begin
+              NewVar.Free;
+              Result := nil;
+              MakeError('', ecCloseRoundExpected, '');
+              exit;
+            end;
+            if not (IsIntType(GetTypeNo(BlockInfo, NewVar).BaseType)) then
+            begin
+              NewVar.Free;
+              Result := nil;
+              MakeError('', ecTypeMismatch, '');
+              exit;
+            end;
+            NewVarU := TPSUnValueOp.Create;
+            NewVarU.SetParserPos(FParser);
+            NewVarU.Operator := otCast;
+            NewVarU.FType := at2ut(FindBaseType(btChar));
+            NewVarU.Val1 := NewVar;
+            NewVar := NewVarU;
+            FParser.Next;
+          end;
+        CSTI_Identifier:
+          begin
+            if FParser.GetToken = 'SUCC' then
+            begin
+              FParser.Next;
+              if FParser.CurrTokenID <> CSTI_OpenRound then
+              begin
+                Result := nil;
+                MakeError('', ecOpenRoundExpected, '');
+                exit;
+              end;
+              FParser.Next;
+              NewVar := ReadExpression;
+              if NewVar = nil then
+              begin
+                result := nil;
+                exit;
+              end;
+              if (GetTypeNo(BlockInfo, NewVar) = nil) or (not IsIntType(GetTypeNo(BlockInfo, NewVar).BaseType) and
+                (GetTypeNo(BlockInfo, NewVar).BaseType <> btEnum)) then
+              begin
+                NewVar.Free;
+                Result := nil;
+                MakeError('', ecTypeMismatch, '');
+                exit;
+              end;
+              if FParser.CurrTokenID <> CSTI_CloseRound then
+              begin
+                NewVar.Free;
+                Result := nil;
+                MakeError('', eccloseRoundExpected, '');
+                exit;
+              end;
+              NewVar := CallSucc(NewVar);
+              FParser.Next;
+            end else
+            if FParser.GetToken = 'PRED' then
+            begin
+              FParser.Next;
+              if FParser.CurrTokenID <> CSTI_OpenRound then
+              begin
+                Result := nil;
+                MakeError('', ecOpenRoundExpected, '');
+                exit;
+              end;
+              FParser.Next;
+              NewVar := ReadExpression;
+              if NewVar = nil then
+              begin
+                result := nil;
+                exit;
+              end;
+              if (GetTypeNo(BlockInfo, NewVar) = nil) or (not IsIntType(GetTypeNo(BlockInfo, NewVar).BaseType) and
+                (GetTypeNo(BlockInfo, NewVar).BaseType <> btEnum)) then
+              begin
+                NewVar.Free;
+                Result := nil;
+                MakeError('', ecTypeMismatch, '');
+                exit;
+              end;
+              if FParser.CurrTokenID <> CSTI_CloseRound then
+              begin
+                NewVar.Free;
+                Result := nil;
+                MakeError('', eccloseRoundExpected, '');
+                exit;
+              end;
+              NewVar := CallPred(NewVar);
+              FParser.Next;
+            end else
+            if FParser.GetToken = 'ASSIGNED' then
+            begin
+              FParser.Next;
+              if FParser.CurrTokenID <> CSTI_OpenRound then
+              begin
+                Result := nil;
+                MakeError('', ecOpenRoundExpected, '');
+                exit;
+              end;
+              FParser.Next;
+              NewVar := GetIdentifier(0);
+              if NewVar = nil then
+              begin
+                result := nil;
+                exit;
+              end;
+              if (GetTypeNo(BlockInfo, NewVar) = nil) or ((GetTypeNo(BlockInfo, NewVar).BaseType <> btClass) and
+                (GetTypeNo(BlockInfo, NewVar).BaseType <> btPChar) and
+                (GetTypeNo(BlockInfo, NewVar).BaseType <> btString)) then
+              begin
+                NewVar.Free;
+                Result := nil;
+                MakeError('', ecTypeMismatch, '');
+                exit;
+              end;
+              if FParser.CurrTokenID <> CSTI_CloseRound then
+              begin
+                NewVar.Free;
+                Result := nil;
+                MakeError('', eccloseRoundExpected, '');
+                exit;
+              end;
+              NewVar := CallAssigned(NewVar);
+              FParser.Next;
+            end  else
+            begin
+              NewVar := GetIdentifier(0);
+              if NewVar = nil then
+              begin
+                Result := nil;
+                exit;
+              end;
+            end;
+          end;
+      else
+        begin
+          MakeError('', ecSyntaxError, '');
+          Result := nil;
+          exit;
+        end;
+      end; {case}
+      Result := NewVar;
+    end; // ReadFactor
+
+    function GetResultType(p1, P2: TPSValue; Cmd: TPSBinOperatorType): TPSType;
+    var
+      pp, t1, t2: PIFPSType;
+    begin
+      t1 := GetTypeNo(BlockInfo, p1);
+      t2 := GetTypeNo(BlockInfo, P2);
+      if (t1 = nil) or (t2 = nil) then
+      begin
+        if ((p1.ClassType = TPSValueNil) or (p2.ClassType = TPSValueNil)) and ((t1 <> nil) or (t2 <> nil)) then
+        begin
+          if p1.ClassType = TPSValueNil then
+            pp := t2
+          else
+            pp := t1;
+          if (pp.BaseType = btPchar) or (pp.BaseType = btString) or (pp.BaseType = btClass) {$IFNDEF PS_NOINTERFACES}or (pp.BaseType =btInterface){$ENDIF} or (pp.BaseType = btProcPtr) then
+            Result := AT2UT(FDefaultBoolType)
+          else
+            Result := nil;
+          exit;
+        end;
+        Result := nil;
+        exit;
+      end;
+      case Cmd of
+        otAdd: {plus}
+          begin
+            if ((t1.BaseType = btVariant) or (t1.BaseType = btNotificationVariant)) and (
+              ((t2.BaseType = btVariant) or (t2.BaseType = btNotificationVariant)) or
+              (t2.BaseType = btString) or
+              {$IFNDEF PS_NOWIDESTRING}
+              (t2.BaseType = btwideString) or
+              (t2.BaseType = btwidechar) or
+              {$ENDIF}
+              (t2.BaseType = btPchar) or
+              (t2.BaseType = btChar) or
+              (isIntRealType(t2.BaseType))) then
+              Result := t1
+            else
+            if ((t2.BaseType = btVariant) or (t2.BaseType = btNotificationVariant)) and (
+              ((t1.BaseType = btVariant) or (t1.BaseType = btNotificationVariant)) or
+              (t1.BaseType = btString) or
+              {$IFNDEF PS_NOWIDESTRING}
+              (t1.BaseType = btwideString) or
+              (t1.BaseType = btwidechar) or
+              {$ENDIF}
+              (t1.BaseType = btPchar) or
+              (t1.BaseType = btChar) or
+              (isIntRealType(t1.BaseType))) then
+              Result := t2
+            else if ((t1.BaseType = btSet) and (t2.BaseType = btSet)) and (t1 = t2) then
+              Result := t1
+            else if IsIntType(t1.BaseType) and IsIntType(t2.BaseType) then
+              Result := t1
+            else if IsIntRealType(t1.BaseType) and
+              IsIntRealType(t2.BaseType) then
+            begin
+              if IsRealType(t1.BaseType) then
+                Result := t1
+              else
+                Result := t2;
+            end
+            else if (t1.basetype = btSet) and (t2.Name = 'TVARIANTARRAY') then
+              Result := t1
+            else if (t2.basetype = btSet) and (t1.Name = 'TVARIANTARRAY') then
+              Result := t2
+            else if ((t1.BaseType = btPchar) or(t1.BaseType = btString) or (t1.BaseType = btChar)) and ((t2.BaseType = btPchar) or(t2.BaseType = btString) or (t2.BaseType = btChar)) then
+              Result := at2ut(FindBaseType(btString))
+            {$IFNDEF PS_NOWIDESTRING}
+            else if ((t1.BaseType = btString) or (t1.BaseType = btChar) or (t1.BaseType = btPchar)or (t1.BaseType = btWideString) or (t1.BaseType = btWideChar)) and
+            ((t2.BaseType = btString) or (t2.BaseType = btChar) or (t2.BaseType = btPchar) or (t2.BaseType = btWideString) or (t2.BaseType = btWideChar)) then
+              Result := at2ut(FindBaseType(btWideString))
+            {$ENDIF}
+            else
+              Result := nil;
+          end;
+        otSub, otMul, otDiv: { -  * / }
+          begin
+            if ((t1.BaseType = btVariant) or (t1.BaseType = btNotificationVariant)) and (
+              ((t2.BaseType = btVariant) or (t2.BaseType = btNotificationVariant)) or
+              (isIntRealType(t2.BaseType))) then
+              Result := t1
+            else if ((t1.BaseType = btSet) and (t2.BaseType = btSet)) and (t1 = t2) and ((cmd = otSub) or (cmd = otMul))  then
+              Result := t1
+            else if (t1.basetype = btSet) and (t2.Name = 'TVARIANTARRAY') and ((cmd = otSub) or (cmd = otMul)) then
+              Result := t1
+            else if (t2.basetype = btSet) and (t1.Name = 'TVARIANTARRAY') and ((cmd = otSub) or (cmd = otMul)) then
+              Result := t2
+            else
+            if ((t2.BaseType = btVariant) or (t2.BaseType = btNotificationVariant)) and (
+              ((t1.BaseType = btVariant) or (t1.BaseType = btNotificationVariant)) or
+              (isIntRealType(t1.BaseType))) then
+              Result := t2
+            else if IsIntType(t1.BaseType) and IsIntType(t2.BaseType) then
+              Result := t1
+            else if IsIntRealType(t1.BaseType) and
+              IsIntRealType(t2.BaseType) then
+            begin
+              if IsRealType(t1.BaseType) then
+                Result := t1
+              else
+                Result := t2;
+            end
+            else
+              Result := nil;
+          end;
+        otAnd, otOr, otXor: {and,or,xor}
+          begin
+            if ((t1.BaseType = btVariant) or (t1.BaseType = btNotificationVariant)) and (
+              ((t2.BaseType = btVariant) or (t2.BaseType = btNotificationVariant)) or
+              (isIntType(t2.BaseType))) then
+              Result := t1
+            else
+            if ((t2.BaseType = btVariant) or (t2.BaseType = btNotificationVariant)) and (
+              ((t1.BaseType = btVariant) or (t1.BaseType = btNotificationVariant)) or
+              (isIntType(t1.BaseType))) then
+              Result := t2
+            else if IsIntType(t1.BaseType) and IsIntType(t2.BaseType) then
+              Result := t1
+            else if (IsBoolean(t1)) and ((t2 = t1)  or ((t2.BaseType = btVariant)
+              or (t2.BaseType = btNotificationVariant))) then
+            begin
+              Result := t1;
+              if ((p1.ClassType = TPSValueData) or (p2.ClassType = TPSValueData)) then
+              begin
+                if cmd = otAnd then {and}
+                begin
+                  if p1.ClassType = TPSValueData then
+                  begin
+                    if (TPSValueData(p1).FData^.tu8 <> 0) then
+                    begin
+                      with MakeWarning('', ewIsNotNeeded, '"True and"') do
+                      begin
+                        FRow := p1.Row;
+                        FCol := p1.Col;
+                        FPosition := p1.Pos;
+                      end;
+                    end else
+                    begin
+                      with MakeWarning('', ewCalculationAlwaysEvaluatesTo, 'False') do
+                      begin
+                        FRow := p1.Row;
+                        FCol := p1.Col;
+                        FPosition := p1.Pos;
+                      end;
+                    end;
+                  end else begin
+                    if (TPSValueData(p2).Data.tu8 <> 0) then
+                    begin
+                      with MakeWarning('', ewIsNotNeeded, '"and True"') do
+                      begin
+                        FRow := p1.Row;
+                        FCol := p1.Col;
+                        FPosition := p1.Pos;
+                      end;
+                    end
+                    else
+          begin
+                      with MakeWarning('', ewCalculationAlwaysEvaluatesTo, 'False') do
+                      begin
+                        FRow := p1.Row;
+                        FCol := p1.Col;
+                        FPosition := p1.Pos;
+                      end;
+                    end;
+                  end;
+                end else if cmd = otOr then {or}
+                begin
+                  if p1.ClassType = TPSValueData then
+                  begin
+                    if (TPSValueData(p1).Data.tu8 <> 0) then
+                    begin
+                      with MakeWarning('', ewCalculationAlwaysEvaluatesTo, 'True') do
+                      begin
+                        FRow := p1.Row;
+                        FCol := p1.Col;
+                        FPosition := p1.Pos;
+                      end;
+                    end
+                    else
+                    begin
+                      with MakeWarning('', ewIsNotNeeded, '"False or"') do
+                      begin
+                        FRow := p1.Row;
+                        FCol := p1.Col;
+                        FPosition := p1.Pos;
+                      end;
+                    end
+                  end else begin
+                    if (TPSValueData(p2).Data.tu8 <> 0) then
+                    begin
+                      with MakeWarning('', ewCalculationAlwaysEvaluatesTo, 'True') do
+                      begin
+                        FRow := p1.Row;
+                        FCol := p1.Col;
+                        FPosition := p1.Pos;
+                      end;
+                    end
+                    else
+                    begin
+                      with MakeWarning('', ewIsNotNeeded, '"or False"') do
+                      begin
+                        FRow := p1.Row;
+                        FCol := p1.Col;
+                        FPosition := p1.Pos;
+                      end;
+                    end
+                  end;
+                end;
+              end;
+            end else
+              Result := nil;
+          end;
+        otMod, otShl, otShr: {mod,shl,shr}
+          begin
+            if ((t1.BaseType = btVariant) or (t1.BaseType = btNotificationVariant)) and (
+              ((t2.BaseType = btVariant) or (t2.BaseType = btNotificationVariant)) or
+              (isIntType(t2.BaseType))) then
+              Result := t1
+            else
+            if ((t2.BaseType = btVariant) or (t2.BaseType = btNotificationVariant)) and (
+              ((t1.BaseType = btVariant) or (t1.BaseType = btNotificationVariant)) or
+              (isIntType(t1.BaseType))) then
+              Result := t2
+            else if IsIntType(t1.BaseType) and IsIntType(t2.BaseType) then
+              Result :=  t1
+            else
+              Result := nil;
+          end;
+        otGreater, otLess, otGreaterEqual, otLessEqual: { >=, <=, >, <}
+          begin
+            if ((t1.BaseType = btVariant) or (t1.BaseType = btNotificationVariant)) and (
+              ((t2.BaseType = btVariant) or (t2.BaseType = btNotificationVariant)) or
+              (t2.BaseType = btString) or
+              (t2.BaseType = btPchar) or
+              (t2.BaseType = btChar) or
+              (isIntRealType(t2.BaseType))) then
+              Result := FDefaultBoolType
+            else if ((t1.BaseType = btSet) and (t2.BaseType = btSet)) and (t1 = t2) and ((cmd = otGreaterEqual) or (cmd = otLessEqual))  then
+              Result := FDefaultBoolType
+            else
+            if ((t2.BaseType = btVariant) or (t2.BaseType = btNotificationVariant)) and (
+              ((t1.BaseType = btVariant) or (t1.BaseType = btNotificationVariant)) or
+              (t1.BaseType = btString) or
+              (t1.BaseType = btPchar) or
+              (t1.BaseType = btChar) or
+              (isIntRealType(t1.BaseType))) then
+              Result := FDefaultBoolType
+            else if IsIntType(t1.BaseType) and IsIntType(t2.BaseType) then
+              Result := FDefaultBoolType
+            else if IsIntRealType(t1.BaseType) and
+              IsIntRealType(t2.BaseType) then
+              Result := FDefaultBoolType
+            else if
+            ((t1.BaseType = btString) or (t1.BaseType = btChar) {$IFNDEF PS_NOWIDESTRING} or (t1.BaseType = btWideString) or (t1.BaseType = btWideChar){$ENDIF}) and
+            ((t2.BaseType = btString) or (t2.BaseType = btChar) {$IFNDEF PS_NOWIDESTRING} or (t2.BaseType = btWideString) or (t2.BaseType = btWideChar){$ENDIF}) then
+              Result := FDefaultBoolType
+            else if ((t1.BaseType = btVariant) or (t1.BaseType = btNotificationVariant)) or ((t2.BaseType = btVariant) or (t2.BaseType = btNotificationVariant)) then
+              Result := FDefaultBoolType
+            else
+              Result := nil;
+          end;
+        otEqual, otNotEqual: {=, <>}
+          begin
+            if ((t1.BaseType = btVariant) or (t1.BaseType = btNotificationVariant)) and (
+              ((t2.BaseType = btVariant) or (t2.BaseType = btNotificationVariant)) or
+              (t2.BaseType = btString) or
+              (t2.BaseType = btPchar) or
+              (t2.BaseType = btChar) or
+              (isIntRealType(t2.BaseType))) then
+              Result := FDefaultBoolType
+            else if ((t1.BaseType = btSet) and (t2.BaseType = btSet)) and (t1 = t2) then
+              Result := FDefaultBoolType
+            else
+            if ((t2.BaseType = btVariant) or (t2.BaseType = btNotificationVariant)) and (
+              ((t1.BaseType = btVariant) or (t1.BaseType = btNotificationVariant)) or
+              (t1.BaseType = btString) or
+              (t1.BaseType = btPchar) or
+              (t1.BaseType = btChar) or
+              (isIntRealType(t1.BaseType))) then
+              Result := FDefaultBoolType
+            else if IsIntType(t1.BaseType) and IsIntType(t2.BaseType) then
+              Result := FDefaultBoolType
+            else if IsIntRealType(t1.BaseType) and
+              IsIntRealType(t2.BaseType) then
+              Result := FDefaultBoolType
+            else if
+            ((t1.BaseType = btString) or (t1.BaseType = btChar) {$IFNDEF PS_NOWIDESTRING} or (t1.BaseType = btWideString) or (t1.BaseType = btWideChar){$ENDIF}) and
+            ((t2.BaseType = btString) or (t2.BaseType = btChar) {$IFNDEF PS_NOWIDESTRING} or (t2.BaseType = btWideString) or (t2.BaseType = btWideChar){$ENDIF}) then
+              Result := FDefaultBoolType
+            else if (t1.basetype = btSet) and (t2.Name = 'TVARIANTARRAY') then
+              Result := FDefaultBoolType
+            else if (t2.basetype = btSet) and (t1.Name = 'TVARIANTARRAY') then
+              Result := FDefaultBoolType
+            else if (t1.BaseType = btEnum) and (t1 = t2) then
+              Result := FDefaultBoolType
+            else if (t1.BaseType = btClass) and (t2.BaseType = btClass) then
+              Result := FDefaultBoolType
+            else if ((t1.BaseType = btVariant) or (t1.BaseType = btNotificationVariant)) or ((t2.BaseType = btVariant) or (t2.BaseType = btNotificationVariant)) then
+              Result := FDefaultBoolType
+            else Result := nil;
+          end;
+        otIn:
+          begin
+            if (t2.BaseType = btSet) and (TPSSetType(t2).SetType = t1) then
+              Result := FDefaultBoolType
+            else
+              Result := nil;
+          end;
+        otIs:
+          begin
+            if t2.BaseType = btType then
+            begin
+              Result := FDefaultBoolType
+            end else
+            Result := nil;
+          end;
+        otAs:
+          begin
+            if t2.BaseType = btType then
+            begin
+              Result := at2ut(TPSValueData(p2).Data.ttype);
+            end else
+              Result := nil;
+          end;
+      else
+        Result := nil;
+      end;
+    end;
+
+
+    function ReadTerm: TPSValue;
+    var
+      F1, F2: TPSValue;
+      F: TPSBinValueOp;
+      Token: TPSPasToken;
+      Op: TPSBinOperatorType;
+    begin
+      F1 := ReadFactor;
+      if F1 = nil then
+      begin
+        Result := nil;
+        exit;
+      end;
+      while FParser.CurrTokenID in [CSTI_Multiply, CSTI_Divide, CSTII_Div, CSTII_Mod, CSTII_And, CSTII_Shl, CSTII_Shr, CSTII_As] do
+      begin
+        Token := FParser.CurrTokenID;
+        FParser.Next;
+        F2 := ReadFactor;
+        if f2 = nil then
+        begin
+          f1.Free;
+          Result := nil;
+          exit;
+        end;
+        case Token of
+          CSTI_Multiply: Op := otMul;
+          CSTII_div, CSTI_Divide: Op := otDiv;
+          CSTII_mod: Op := otMod;
+          CSTII_and: Op := otAnd;
+          CSTII_shl: Op := otShl;
+          CSTII_shr: Op := otShr;
+          CSTII_As:  Op := otAs;
+        else
+          Op := otAdd;
+        end;
+        F := TPSBinValueOp.Create;
+        f.Val1 := F1;
+        f.Val2 := F2;
+        f.Operator := Op;
+        f.aType := GetResultType(F1, F2, Op);
+        if f.aType = nil then
+        begin
+          MakeError('', ecTypeMismatch, '');
+          f.Free;
+          Result := nil;
+          exit;
+        end;
+        f1 := f;
+      end;
+      Result := F1;
+    end;  // ReadTerm
+
+    function ReadSimpleExpression: TPSValue;
+    var
+      F1, F2: TPSValue;
+      F: TPSBinValueOp;
+      Token: TPSPasToken;
+      Op: TPSBinOperatorType;
+    begin
+      F1 := ReadTerm;
+      if F1 = nil then
+      begin
+        Result := nil;
+        exit;
+      end;
+      while FParser.CurrTokenID in [CSTI_Plus, CSTI_Minus, CSTII_Or, CSTII_Xor] do
+      begin
+        Token := FParser.CurrTokenID;
+        FParser.Next;
+        F2 := ReadTerm;
+        if f2 = nil then
+        begin
+          f1.Free;
+          Result := nil;
+          exit;
+        end;
+        case Token of
+          CSTI_Plus: Op := otAdd;
+          CSTI_Minus: Op := otSub;
+          CSTII_or: Op := otOr;
+          CSTII_xor: Op := otXor;
+        else
+          Op := otAdd;
+        end;
+        F := TPSBinValueOp.Create;
+        f.Val1 := F1;
+        f.Val2 := F2;
+        f.Operator := Op;
+        f.aType := GetResultType(F1, F2, Op);
+        if f.aType = nil then
+        begin
+          MakeError('', ecTypeMismatch, '');
+          f.Free;
+          Result := nil;
+          exit;
+        end;
+        f1 := f;
+      end;
+      Result := F1;
+    end;  // ReadSimpleExpression
+
+
+    function ReadExpression: TPSValue;
+    var
+      F1, F2: TPSValue;
+      F: TPSBinValueOp;
+      Token: TPSPasToken;
+      Op: TPSBinOperatorType;
+    begin
+      F1 := ReadSimpleExpression;
+      if F1 = nil then
+      begin
+        Result := nil;
+        exit;
+      end;
+      while FParser.CurrTokenID in [ CSTI_GreaterEqual, CSTI_LessEqual, CSTI_Greater, CSTI_Less, CSTI_Equal, CSTI_NotEqual, CSTII_in, CSTII_is] do
+      begin
+        Token := FParser.CurrTokenID;
+        FParser.Next;
+        F2 := ReadSimpleExpression;
+        if f2 = nil then
+        begin
+          f1.Free;
+          Result := nil;
+          exit;
+        end;
+        case Token of
+          CSTI_GreaterEqual: Op := otGreaterEqual;
+          CSTI_LessEqual: Op := otLessEqual;
+          CSTI_Greater: Op := otGreater;
+          CSTI_Less: Op := otLess;
+          CSTI_Equal: Op := otEqual;
+          CSTI_NotEqual: Op := otNotEqual;
+          CSTII_in: Op := otIn;
+          CSTII_is: Op := otIs;
+        else
+          Op := otAdd;
+        end;
+        F := TPSBinValueOp.Create;
+        f.Val1 := F1;
+        f.Val2 := F2;
+        f.Operator := Op;
+        f.aType := GetResultType(F1, F2, Op);
+        if f.aType = nil then
+        begin
+          MakeError('', ecTypeMismatch, '');
+          f.Free;
+          Result := nil;
+          exit;
+        end;
+        f1 := f;
+      end;
+      Result := F1;
+    end;  // ReadExpression
+
+    function TryEvalConst(var P: TPSValue): Boolean;
+    var
+      preplace: TPSValue;
+    begin
+      if p is TPSBinValueOp then
+      begin
+        if not (TryEvalConst(TPSBinValueOp(p).FVal1) and TryEvalConst(TPSBinValueOp(p).FVal2)) then
+        begin
+          Result := False;
+          exit;
+        end;
+        if (TPSBinValueOp(p).FVal1.ClassType = TPSValueData) and (TPSBinValueOp(p).FVal2.ClassType = TPSValueData) then
+        begin
+          if not PreCalc(True, 0, TPSValueData(TPSBinValueOp(p).Val1).Data, 0, TPSValueData(TPSBinValueOp(p).Val2).Data, TPSBinValueOp(p).Operator, p.Pos, p.Row, p.Col) then
+          begin
+            Result := False;
+            exit;
+          end;
+          preplace := TPSValueData.Create;
+          preplace.Pos := p.Pos;
+          preplace.Row := p.Row;
+          preplace.Col := p.Col;
+          TPSValueData(preplace).Data := TPSValueData(TPSBinValueOp(p).Val1).Data;
+          TPSValueData(TPSBinValueOp(p).Val1).Data := nil;
+          p.Free;
+          p := preplace;
+        end;
+      end else if p is TPSUnValueOp then
+      begin
+        if not TryEvalConst(TPSUnValueOp(p).FVal1) then
+        begin
+          Result := False;
+          exit;
+        end;
+        if TPSUnValueOp(p).FVal1.ClassType = TPSValueData then
+        begin
+//
+          case TPSUnValueOp(p).Operator of
+            otNot:
+              begin
+                case TPSValueData(TPSUnValueOp(p).FVal1).Data^.FType.BaseType of
+                  btEnum:
+                    begin
+                      if IsBoolean(TPSValueData(TPSUnValueOp(p).FVal1).Data^.FType) then
+                      begin
+                        TPSValueData(TPSUnValueOp(p).FVal1).Data^.tu8 := (not TPSValueData(TPSUnValueOp(p).FVal1).Data^.tu8) and 1;
+                      end else
+                      begin
+                        MakeError('', ecTypeMismatch, '');
+                        Result := False;
+                        exit;
+                      end;
+                    end;
+                  btU8: TPSValueData(TPSUnValueOp(p).FVal1).Data^.tu8 := not TPSValueData(TPSUnValueOp(p).FVal1).Data^.tu8;
+                  btU16: TPSValueData(TPSUnValueOp(p).FVal1).Data^.tu16 := not TPSValueData(TPSUnValueOp(p).FVal1).Data^.tu16;
+                  btU32: TPSValueData(TPSUnValueOp(p).FVal1).Data^.tu32 := not TPSValueData(TPSUnValueOp(p).FVal1).Data^.tu32;
+                  bts8: TPSValueData(TPSUnValueOp(p).FVal1).Data^.ts8 := not TPSValueData(TPSUnValueOp(p).FVal1).Data^.ts8;
+                  bts16: TPSValueData(TPSUnValueOp(p).FVal1).Data^.ts16 := not TPSValueData(TPSUnValueOp(p).FVal1).Data^.ts16;
+                  bts32: TPSValueData(TPSUnValueOp(p).FVal1).Data^.ts32 := not TPSValueData(TPSUnValueOp(p).FVal1).Data^.ts32;
+                  {$IFNDEF PS_NOINT64}
+                  bts64: TPSValueData(TPSUnValueOp(p).FVal1).Data^.ts64 := not TPSValueData(TPSUnValueOp(p).FVal1).Data^.ts64;
+                  {$ENDIF}
+                else
+                  begin
+                    MakeError('', ecTypeMismatch, '');
+                    Result := False;
+                    exit;
+                  end;
+                end;
+                preplace := TPSUnValueOp(p).Val1;
+                TPSUnValueOp(p).Val1 := nil;
+                p.Free;
+                p := preplace;
+              end;
+            otMinus:
+              begin
+                case TPSValueData(TPSUnValueOp(p).FVal1).Data^.FType.BaseType of
+                  btU8: TPSValueData(TPSUnValueOp(p).FVal1).Data^.tu8 := -TPSValueData(TPSUnValueOp(p).FVal1).Data^.tu8;
+                  btU16: TPSValueData(TPSUnValueOp(p).FVal1).Data^.tu16 := -TPSValueData(TPSUnValueOp(p).FVal1).Data^.tu16;
+                  btU32: TPSValueData(TPSUnValueOp(p).FVal1).Data^.tu32 := -TPSValueData(TPSUnValueOp(p).FVal1).Data^.tu32;
+                  bts8: TPSValueData(TPSUnValueOp(p).FVal1).Data^.ts8 := -TPSValueData(TPSUnValueOp(p).FVal1).Data^.ts8;
+                  bts16: TPSValueData(TPSUnValueOp(p).FVal1).Data^.ts16 := -TPSValueData(TPSUnValueOp(p).FVal1).Data^.ts16;
+                  bts32: TPSValueData(TPSUnValueOp(p).FVal1).Data^.ts32 := -TPSValueData(TPSUnValueOp(p).FVal1).Data^.ts32;
+                  {$IFNDEF PS_NOINT64}
+                  bts64: TPSValueData(TPSUnValueOp(p).FVal1).Data^.ts64 := -TPSValueData(TPSUnValueOp(p).FVal1).Data^.ts64;
+                  {$ENDIF}
+                  btSingle: TPSValueData(TPSUnValueOp(p).FVal1).Data^.tsingle := -TPSValueData(TPSUnValueOp(p).FVal1).Data^.tsingle;
+                  btDouble: TPSValueData(TPSUnValueOp(p).FVal1).Data^.tdouble := -TPSValueData(TPSUnValueOp(p).FVal1).Data^.tdouble;
+                  btExtended: TPSValueData(TPSUnValueOp(p).FVal1).Data^.textended := -TPSValueData(TPSUnValueOp(p).FVal1).Data^.textended;
+                  btCurrency: TPSValueData(TPSUnValueOp(p).FVal1).Data^.tcurrency := -TPSValueData(TPSUnValueOp(p).FVal1).Data^.tcurrency;
+                else
+                  begin
+                    MakeError('', ecTypeMismatch, '');
+                    Result := False;
+                    exit;
+                  end;
+                end;
+                preplace := TPSUnValueOp(p).Val1;
+                TPSUnValueOp(p).Val1 := nil;
+                p.Free;
+                p := preplace;
+              end;
+            otCast:
+              begin
+                preplace := TPSValueData.Create;
+                TPSValueData(preplace).Data := NewVariant(TPSUnValueOp(p).FType);
+                case TPSUnValueOp(p).FType.BaseType of
+                  btU8:
+                    begin
+                      case TPSValueData(TPSUnValueOp(p).FVal1).Data.Ftype.basetype of
+                        btchar: TPSValueData(preplace).Data.tu8 := ord(TPSValueData(TPSUnValueOp(p).FVal1).Data^.tchar);
+                        {$IFNDEF PS_NOWIDESTRING}
+                        btwidechar: TPSValueData(preplace).Data.tu8 := ord(TPSValueData(TPSUnValueOp(p).FVal1).Data^.twidechar);
+                        {$ENDIF}
+                        btU8: TPSValueData(preplace).Data.tu8 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tu8;
+                        btS8: TPSValueData(preplace).Data.tu8 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tS8;
+                        btU16: TPSValueData(preplace).Data.tu8 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tu16;
+                        btS16: TPSValueData(preplace).Data.tu8 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tS16;
+                        btU32: TPSValueData(preplace).Data.tu8 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tU32;
+                        btS32: TPSValueData(preplace).Data.tu8 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tS32;
+                        {$IFNDEF PS_NOINT64}
+                        btS64: TPSValueData(preplace).Data.tu8 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.ts64;
+                        {$ENDIF}
+                      else
+                        begin
+                          MakeError('', ecTypeMismatch, '');
+                          preplace.Free;
+                          Result := False;
+                          exit;
+                        end;
+                      end;
+                    end;
+                  btS8:
+                    begin
+                      case TPSValueData(TPSUnValueOp(p).FVal1).Data.Ftype.basetype of
+                        btchar: TPSValueData(preplace).Data.ts8 := ord(TPSValueData(TPSUnValueOp(p).FVal1).Data^.tchar);
+                        {$IFNDEF PS_NOWIDESTRING}
+                        btwidechar: TPSValueData(preplace).Data.ts8 := ord(TPSValueData(TPSUnValueOp(p).FVal1).Data^.twidechar);
+                        {$ENDIF}
+                        btU8: TPSValueData(preplace).Data.ts8 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tu8;
+                        btS8: TPSValueData(preplace).Data.ts8 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tS8;
+                        btU16: TPSValueData(preplace).Data.ts8 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tu16;
+                        btS16: TPSValueData(preplace).Data.ts8 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tS16;
+                        btU32: TPSValueData(preplace).Data.ts8 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tU32;
+                        btS32: TPSValueData(preplace).Data.ts8 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tS32;
+                        {$IFNDEF PS_NOINT64}
+                        btS64: TPSValueData(preplace).Data.ts8 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.ts64;
+                        {$ENDIF}
+                      else
+                        begin
+                          MakeError('', ecTypeMismatch, '');
+                          preplace.Free;
+                          Result := False;
+                          exit;
+                        end;
+                      end;
+                    end;
+                  btU16:
+                    begin
+                      case TPSValueData(TPSUnValueOp(p).FVal1).Data.Ftype.basetype of
+                        btchar: TPSValueData(preplace).Data.tu16 := ord(TPSValueData(TPSUnValueOp(p).FVal1).Data^.tchar);
+                        {$IFNDEF PS_NOWIDESTRING}
+                        btwidechar: TPSValueData(preplace).Data.tu16 := ord(TPSValueData(TPSUnValueOp(p).FVal1).Data^.twidechar);
+                        {$ENDIF}
+                        btU8: TPSValueData(preplace).Data.tu16 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tu8;
+                        btS8: TPSValueData(preplace).Data.tu16 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tS8;
+                        btU16: TPSValueData(preplace).Data.ts16 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tu16;
+                        btS16: TPSValueData(preplace).Data.tu16 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tS16;
+                        btU32: TPSValueData(preplace).Data.tu16 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tU32;
+                        btS32: TPSValueData(preplace).Data.tu16 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tS32;
+                        {$IFNDEF PS_NOINT64}
+                        btS64: TPSValueData(preplace).Data.tu16 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.ts64;
+                        {$ENDIF}
+                      else
+                        begin
+                          MakeError('', ecTypeMismatch, '');
+                          preplace.Free;
+                          Result := False;
+                          exit;
+                        end;
+                      end;
+                    end;
+                  bts16:
+                    begin
+                      case TPSValueData(TPSUnValueOp(p).FVal1).Data.Ftype.basetype of
+                        btchar: TPSValueData(preplace).Data.ts16 := ord(TPSValueData(TPSUnValueOp(p).FVal1).Data^.tchar);
+                        {$IFNDEF PS_NOWIDESTRING}
+                        btwidechar: TPSValueData(preplace).Data.ts16 := ord(TPSValueData(TPSUnValueOp(p).FVal1).Data^.twidechar);
+                        {$ENDIF}
+                        btU8: TPSValueData(preplace).Data.ts16 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tu8;
+                        btS8: TPSValueData(preplace).Data.ts16 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tS8;
+                        btU16: TPSValueData(preplace).Data.ts16 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tu16;
+                        btS16: TPSValueData(preplace).Data.ts16 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tS16;
+                        btU32: TPSValueData(preplace).Data.ts16 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tU32;
+                        btS32: TPSValueData(preplace).Data.ts16 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tS32;
+                        {$IFNDEF PS_NOINT64}
+                        btS64: TPSValueData(preplace).Data.ts16 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.ts64;
+                        {$ENDIF}
+                      else
+                        begin
+                          MakeError('', ecTypeMismatch, '');
+                          preplace.Free;
+                          Result := False;
+                          exit;
+                        end;
+                      end;
+                    end;
+                  btU32:
+                    begin
+                      case TPSValueData(TPSUnValueOp(p).FVal1).Data.Ftype.basetype of
+                        btchar: TPSValueData(preplace).Data.tu32 := ord(TPSValueData(TPSUnValueOp(p).FVal1).Data^.tchar);
+                        {$IFNDEF PS_NOWIDESTRING}
+                        btwidechar: TPSValueData(preplace).Data.tu32 := ord(TPSValueData(TPSUnValueOp(p).FVal1).Data^.twidechar);
+                        {$ENDIF}
+                        btU8: TPSValueData(preplace).Data.tu32 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tu8;
+                        btS8: TPSValueData(preplace).Data.tu32 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tS8;
+                        btU16: TPSValueData(preplace).Data.tu32 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tu16;
+                        btS16: TPSValueData(preplace).Data.tu32 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tS16;
+                        btU32: TPSValueData(preplace).Data.tu32 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tU32;
+                        btS32: TPSValueData(preplace).Data.tu32 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tS32;
+                        {$IFNDEF PS_NOINT64}
+                        btS64: TPSValueData(preplace).Data.tu32 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.ts64;
+                        {$ENDIF}
+                      else
+                        begin
+                          MakeError('', ecTypeMismatch, '');
+                          preplace.Free;
+                          Result := False;
+                          exit;
+                        end;
+                      end;
+                    end;
+                  btS32:
+                    begin
+                      case TPSValueData(TPSUnValueOp(p).FVal1).Data.Ftype.basetype of
+                        btchar: TPSValueData(preplace).Data.ts32 := ord(TPSValueData(TPSUnValueOp(p).FVal1).Data^.tchar);
+                        {$IFNDEF PS_NOWIDESTRING}
+                        btwidechar: TPSValueData(preplace).Data.ts32 := ord(TPSValueData(TPSUnValueOp(p).FVal1).Data^.twidechar);
+                        {$ENDIF}
+                        btU8: TPSValueData(preplace).Data.ts32 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tu8;
+                        btS8: TPSValueData(preplace).Data.ts32 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tS8;
+                        btU16: TPSValueData(preplace).Data.ts32 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tu16;
+                        btS16: TPSValueData(preplace).Data.ts32 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tS16;
+                        btU32: TPSValueData(preplace).Data.ts32 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tU32;
+                        btS32: TPSValueData(preplace).Data.ts32 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tS32;
+                        {$IFNDEF PS_NOINT64}
+                        btS64: TPSValueData(preplace).Data.tu32 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.ts64;
+                        {$ENDIF}
+                      else
+                        begin
+                          MakeError('', ecTypeMismatch, '');
+                          preplace.Free;
+                          Result := False;
+                          exit;
+                        end;
+                      end;
+                    end;
+                  {$IFNDEF PS_NOINT64}
+                  btS64:
+                    begin
+                      case TPSValueData(TPSUnValueOp(p).FVal1).Data.Ftype.basetype of
+                        btchar: TPSValueData(preplace).Data.ts64 := ord(TPSValueData(TPSUnValueOp(p).FVal1).Data^.tchar);
+                        {$IFNDEF PS_NOWIDESTRING}
+                        btwidechar: TPSValueData(preplace).Data.ts64 := ord(TPSValueData(TPSUnValueOp(p).FVal1).Data^.twidechar);
+                        {$ENDIF}
+                        btU8: TPSValueData(preplace).Data.ts64 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tu8;
+                        btS8: TPSValueData(preplace).Data.ts64 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tS8;
+                        btU16: TPSValueData(preplace).Data.ts64 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tu16;
+                        btS16: TPSValueData(preplace).Data.ts64 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tS16;
+                        btU32: TPSValueData(preplace).Data.ts64 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tU32;
+                        btS32: TPSValueData(preplace).Data.ts64 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tS32;
+                        btS64: TPSValueData(preplace).Data.ts64 := TPSValueData(TPSUnValueOp(p).FVal1).Data^.ts64;
+                      else
+                        begin
+                          MakeError('', ecTypeMismatch, '');
+                          preplace.Free;
+                          Result := False;
+                          exit;
+                        end;
+                      end;
+                    end;
+                  {$ENDIF}
+                  btChar:
+                    begin
+                      case TPSValueData(TPSUnValueOp(p).FVal1).Data.Ftype.basetype of
+                        btchar: TPSValueData(preplace).Data.tchar := TPSValueData(TPSUnValueOp(p).FVal1).Data^.tchar;
+                        btU8: TPSValueData(preplace).Data.tchar := tbtchar(TPSValueData(TPSUnValueOp(p).FVal1).Data^.tu8);
+                        btS8: TPSValueData(preplace).Data.tchar := tbtchar(TPSValueData(TPSUnValueOp(p).FVal1).Data^.tS8);
+                        btU16: TPSValueData(preplace).Data.tchar := tbtchar(TPSValueData(TPSUnValueOp(p).FVal1).Data^.tu16);
+                        btS16: TPSValueData(preplace).Data.tchar := tbtchar(TPSValueData(TPSUnValueOp(p).FVal1).Data^.tS16);
+                        btU32: TPSValueData(preplace).Data.tchar := tbtchar(TPSValueData(TPSUnValueOp(p).FVal1).Data^.tU32);
+                        btS32: TPSValueData(preplace).Data.tchar := tbtchar(TPSValueData(TPSUnValueOp(p).FVal1).Data^.tS32);
+                        {$IFNDEF PS_NOINT64}
+                        btS64: TPSValueData(preplace).Data.tchar := tbtchar(TPSValueData(TPSUnValueOp(p).FVal1).Data^.ts64);
+                        {$ENDIF}
+                      else
+                        begin
+                          MakeError('', ecTypeMismatch, '');
+                          Result := False;
+                          preplace.Free;
+                          exit;
+                        end;
+                      end;
+                    end;
+                else
+                  begin
+                    MakeError('', ecTypeMismatch, '');
+                    Result := False;
+                    preplace.Free;
+                    exit;
+                  end;
+                end;
+                p.Free;
+                p := preplace;
+              end;
+            else
+              begin
+                MakeError('', ecTypeMismatch, '');
+                Result := False;
+                exit;
+              end;
+          end; // case
+        end; // if
+      end;
+      Result := True;
+    end;
+
+  var
+    Val: TPSValue;
+
+begin
+    Val := ReadExpression;
+    if Val = nil then
+    begin
+      Result := nil;
+      exit;
+    end;
+    if not TryEvalConst(Val) then
+    begin
+      Val.Free;
+      Result := nil;
+      exit;
+    end;
+    Result := Val;
+  end;
+
+  function ReadParameters(IsProperty: Boolean; Dest: TPSParameters): Boolean;
+  var
+    sr,cr: TPSPasToken;
+  begin
+    if IsProperty then
+    begin
+      sr := CSTI_OpenBlock;
+      cr := CSTI_CloseBlock;
+    end else begin
+      sr := CSTI_OpenRound;
+      cr := CSTI_CloseRound;
+    end;
+    if FParser.CurrTokenId = sr then
+    begin
+      FParser.Next;
+      if FParser.CurrTokenId = cr then
+      begin
+        FParser.Next;
+        Result := True;
+        exit;
+      end;
+    end else
+    begin
+      result := True;
+      exit;
+    end;
+    repeat
+      with Dest.Add do
+      begin
+        Val := calc(CSTI_CloseRound);
+        if Val = nil then
+        begin
+          result := false;
+          exit;
+        end;
+      end;
+      if FParser.CurrTokenId = cr then
+      begin
+        FParser.Next;
+        Break;
+      end;
+      if FParser.CurrTokenId <> CSTI_Comma then
+      begin
+        MakeError('', ecCommaExpected, '');
+        Result := false;
+        exit;
+      end; {if}
+      FParser.Next;
+    until False;
+    Result := true;
+  end;
+
+  function ReadProcParameters(ProcNo: Cardinal; FSelf: TPSValue): TPSValue;
+  var
+    Decl: TPSParametersDecl;
+  begin
+    if TPSProcedure(FProcs[ProcNo]).ClassType = TPSInternalProcedure then
+      Decl := TPSInternalProcedure(FProcs[ProcNo]).Decl
+    else
+      Decl := TPSExternalProcedure(FProcs[ProcNo]).RegProc.Decl;
+    UseProc(Decl);
+    Result := TPSValueProcNo.Create;
+    TPSValueProcNo(Result).ProcNo := ProcNo;
+    TPSValueProcNo(Result).ResultType := Decl.Result;
+    with TPSValueProcNo(Result) do
+    begin
+      SetParserPos(FParser);
+      Parameters := TPSParameters.Create;
+      if FSelf <> nil then
+      begin
+        Parameters.Add;
+      end;
+    end;
+
+    if not ReadParameters(False, TPSValueProc(Result).Parameters) then
+    begin
+      FSelf.Free;
+      Result.Free;
+      Result := nil;
+      exit;
+    end;
+
+    if not ValidateParameters(BlockInfo, TPSValueProc(Result).Parameters, Decl) then
+    begin
+      FSelf.Free;
+      Result.Free;
+      Result := nil;
+      exit;
+    end;
+    if FSelf <> nil then
+    begin
+      with TPSValueProcNo(Result).Parameters[0] do
+      begin
+        Val := FSelf;
+        ExpectedType := GetTypeNo(BlockInfo, FSelf);
+      end;
+    end;
+  end;
+  {$IFNDEF PS_NOIDISPATCH}
+
+  function ReadIDispatchParameters(const ProcName: tbtString; aVariantType: TPSVariantType; FSelf: TPSValue): TPSValue;
+  var
+    Par: TPSParameters;
+    PropSet: Boolean;
+    i: Longint;
+    Temp: TPSValue;
+  begin
+    Par := TPSParameters.Create;
+    try
+      if not ReadParameters(FParser.CurrTokenID = CSTI_OpenBlock, Par) then
+      begin
+        FSelf.Free;
+        Result := nil;
+        exit;
+      end;
+
+      if FParser.CurrTokenID = CSTI_Assignment then
+      begin
+        FParser.Next;
+        PropSet := True;
+        Temp := calc(CSTI_SemiColon);
+        if temp = nil then
+        begin
+          FSelf.Free;
+          Result := nil;
+          exit;
+        end;
+        with par.Add do
+        begin
+          FValue := Temp;
+        end;
+      end else
+      begin
+        PropSet := False;
+      end;
+
+      Result := TPSValueProcNo.Create;
+      TPSValueProcNo(Result).ResultType := aVariantType;
+      with TPSValueProcNo(Result) do
+      begin
+        SetParserPos(FParser);
+        Parameters := TPSParameters.Create;
+        if FSelf <> nil then
+        begin
+          with Parameters.Add do
+          begin
+            Val := FSelf;
+            ExpectedType := aVariantType.GetDynIvokeSelfType(Self);
+          end;
+          with Parameters.Add do
+          begin
+            Val := TPSValueData.Create;
+            TPSValueData(Val).Data := NewVariant(FDefaultBoolType);
+            TPSValueData(Val).Data.tu8 := Ord(PropSet);
+            ExpectedType := FDefaultBoolType;
+          end;
+
+          with Parameters.Add do
+          begin
+            Val := TPSValueData.Create;
+            TPSValueData(Val).Data := NewVariant(FindBaseType(btString));
+            tbtString(TPSValueData(Val).data.tString) := Procname;
+            ExpectedType := FindBaseType(btString);
+          end;
+
+          with Parameters.Add do
+          begin
+            val := TPSValueArray.Create;
+            ExpectedType := aVariantType.GetDynInvokeParamType(Self);
+            temp := Val;
+          end;
+          for i := 0 to Par.Count -1 do
+          begin
+            TPSValueArray(Temp).Add(par.Item[i].Val);
+            par.Item[i].val := nil;
+          end;
+        end;
+      end;
+      TPSValueProcNo(Result).ProcNo := aVariantType.GetDynInvokeProcNo(Self, ProcName, TPSValueProcNo(Result).Parameters);
+    finally
+      Par.Free;
+    end;
+
+  end;
+
+  {$ENDIF}
+
+  function ReadVarParameters(ProcNoVar: TPSValue): TPSValue;
+  var
+    Decl: TPSParametersDecl;
+  begin
+    Decl := TPSProceduralType(GetTypeNo(BlockInfo, ProcnoVar)).ProcDef;
+    UseProc(Decl);
+
+    Result := TPSValueProcVal.Create;
+
+    with TPSValueProcVal(Result) do
+    begin
+      ResultType := Decl.Result;
+      ProcNo := ProcNoVar;
+      Parameters := TPSParameters.Create;
+    end;
+
+    if not ReadParameters(False, TPSValueProc(Result).Parameters) then
+    begin
+      Result.Free;
+      Result := nil;
+      exit;
+    end;
+
+    if not ValidateParameters(BlockInfo, TPSValueProc(Result).Parameters, Decl) then
+    begin
+      Result.Free;
+      Result := nil;
+      exit;
+    end;
+  end;
+
+
+  function WriteCalculation(InData, OutReg: TPSValue): Boolean;
+
+    function CheckOutreg(Where, Outreg: TPSValue): Boolean;
+    var
+      i: Longint;
+    begin
+      Result := False;
+      if Outreg is TPSValueReplace
+        then Outreg:=TPSValueReplace(Outreg).OldValue;
+      if Where.ClassType = TPSUnValueOp then
+      begin
+        if CheckOutReg(TPSUnValueOp(Where).Val1, OutReg) then
+          Result := True;
+      end else if Where.ClassType = TPSBinValueOp then
+      begin
+        if CheckOutreg(TPSBinValueOp(Where).Val1, OutReg) or CheckOutreg(TPSBinValueOp(Where).Val2, OutReg) then
+          Result := True;
+      end else if Where is TPSValueVar then
+      begin
+        if SameReg(Where, OutReg) then
+          Result := True;
+      end else if Where is TPSValueProc then
+      begin
+        for i := 0 to TPSValueProc(Where).Parameters.Count -1 do
+        begin
+          if Checkoutreg(TPSValueProc(Where).Parameters[i].Val, Outreg) then
+          begin
+            Result := True;
+            break;
+          end;
+        end;
+      end;
+    end;
+  begin
+    if not CheckCompatType(Outreg, InData) then
+    begin
+      MakeError('', ecTypeMismatch, '');
+      Result := False;
+      exit;
+    end;
+    if SameReg(OutReg, InData) then
+    begin
+      Result := True;
+      exit;
+    end;
+    if InData is TPSValueProc then
+    begin
+      Result := _ProcessFunction(TPSValueProc(indata), OutReg)
+    end else begin
+      if not PreWriteOutRec(OutReg, nil) then
+      begin
+        Result := False;
+        exit;
+      end;
+      if (not CheckOutReg(InData, OutReg)) and (InData is TPSBinValueOp) or (InData is TPSUnValueOp) then
+      begin
+        if InData is TPSBinValueOp then
+        begin
+          if not DoBinCalc(TPSBinValueOp(InData), OutReg) then
+          begin
+            AfterWriteOutRec(OutReg);
+            Result := False;
+            exit;
+          end;
+        end else
+        begin
+          if not DoUnCalc(TPSUnValueOp(InData), OutReg) then
+          begin
+            AfterWriteOutRec(OutReg);
+            Result := False;
+            exit;
+          end;
+        end;
+      end else if (InData is TPSBinValueOp) and (not CheckOutReg(TPSBinValueOp(InData).Val2, OutReg)) then
+      begin
+        if not DoBinCalc(TPSBinValueOp(InData), OutReg) then
+        begin
+          AfterWriteOutRec(OutReg);
+          Result := False;
+          exit;
+        end;
+      end else begin
+        if not PreWriteOutRec(InData, GetTypeNo(BlockInfo, OutReg)) then
+        begin
+          Result := False;
+          exit;
+        end;
+        BlockWriteByte(BlockInfo, CM_A);
+        if not (WriteOutRec(OutReg, False) and WriteOutRec(InData, True)) then
+        begin
+          Result := False;
+          exit;
+        end;
+        AfterWriteOutRec(InData);
+      end;
+      AfterWriteOutRec(OutReg);
+      Result := True;
+    end;
+  end; {WriteCalculation}
+
+
+  function _ProcessFunction(ProcCall: TPSValueProc; ResultRegister: TPSValue): Boolean;
+  var
+    res: TPSType;
+    tmp: TPSParameter;
+    lTv: TPSValue;
+    resreg: TPSValue;
+    l: Longint;
+
+    function Cleanup: Boolean;
+    var
+      i: Longint;
+    begin
+      for i := 0 to ProcCall.Parameters.Count -1 do
+      begin
+        if ProcCall.Parameters[i].TempVar <> nil then
+          ProcCall.Parameters[i].TempVar.Free;
+        ProcCall.Parameters[i].TempVar := nil;
+      end;
+      if ProcCall is TPSValueProcVal then
+        AfterWriteOutRec(TPSValueProcVal(ProcCall).fProcNo);
+      if ResReg <> nil then
+        AfterWriteOutRec(resreg);
+      if ResReg <> nil then
+      begin
+        if ResReg <> ResultRegister then
+        begin
+          if ResultRegister <> nil then
+          begin
+            if not WriteCalculation(ResReg, ResultRegister) then
+            begin
+              Result := False;
+              resreg.Free;
+              exit;
+            end;
+          end;
+          resreg.Free;
+        end;
+      end;
+      Result := True;
+    end;
+
+  begin
+    Res := ProcCall.ResultType;
+    Result := False;
+    if (res = nil) and (ResultRegister <> nil) then
+    begin
+      MakeError('', ecNoResult, '');
+      exit;
+    end
+    else if (res <> nil)  then
+    begin
+      if (ResultRegister = nil) or (Res <> GetTypeNo(BlockInfo, ResultRegister)) then
+      begin
+        resreg := AllocStackReg(res);
+      end else resreg := ResultRegister;
+    end
+    else
+      resreg := nil;
+    if ResReg <> nil then
+    begin
+      if not PreWriteOutRec(resreg, nil) then
+      begin
+        Cleanup;
+        exit;
+      end;
+    end;
+    if Proccall is TPSValueProcVal then
+    begin
+      if not PreWriteOutRec(TPSValueProcVal(ProcCall).fProcNo, nil) then
+      begin
+        Cleanup;
+        exit;
+      end;
+    end;
+    for l := ProcCall.Parameters.Count - 1 downto 0 do
+    begin
+      Tmp := ProcCall.Parameters[l];
+      if (Tmp.ParamMode <> pmIn)  then
+      begin
+        if IsVarInCompatible(GetTypeNo(BlockInfo, tmp.Val), tmp.ExpectedType) then
+        begin
+          with MakeError('', ecTypeMismatch, '') do
+          begin
+            pos := tmp.Val.Pos;
+            row := tmp.Val.row;
+            col := tmp.Val.col;
+          end;
+          Cleanup;
+          exit;
+        end;
+        if Copy(tmp.ExpectedType.Name, 1, 10) = '!OPENARRAY' then begin
+          tmp.TempVar := AllocPointer(tmp.ExpectedType);
+          lTv := AllocStackReg(tmp.ExpectedType);
+          if not PreWriteOutRec(Tmp.FValue, nil) then
+          begin
+            cleanup;
+            exit;
+          end;
+          BlockWriteByte(BlockInfo, CM_A);
+          WriteOutRec(lTv, False);
+          WriteOutRec(Tmp.FValue, False);
+          AfterWriteOutRec(Tmp.FValue);
+
+          BlockWriteByte(BlockInfo, cm_sp);
+          WriteOutRec(tmp.TempVar, False);
+          WriteOutRec(lTv, False);
+
+          lTv.Free;
+//          BlockWriteByte(BlockInfo, CM_PO); // pop the temp var
+
+        end else begin
+        tmp.TempVar := AllocPointer(GetTypeNo(BlockInfo, Tmp.FValue));
+        if not PreWriteOutRec(Tmp.FValue, nil) then
+        begin
+          cleanup;
+          exit;
+        end;
+        BlockWriteByte(BlockInfo, cm_sp);
+        WriteOutRec(tmp.TempVar, False);
+        WriteOutRec(Tmp.FValue, False);
+        AfterWriteOutRec(Tmp.FValue);
+        end;
+      end
+      else
+      begin
+        if Tmp.ExpectedType = nil then
+          Tmp.ExpectedType := GetTypeNo(BlockInfo, tmp.Val);
+        if Tmp.ExpectedType.BaseType = btPChar then
+        begin
+          Tmp.TempVar := AllocStackReg(at2ut(FindBaseType(btstring)))
+        end else
+        begin
+        Tmp.TempVar := AllocStackReg(Tmp.ExpectedType);
+        end;
+        if not WriteCalculation(Tmp.Val, Tmp.TempVar) then
+        begin
+          Cleanup;
+          exit;
+        end;
+      end;
+    end; {for}
+    if res <> nil then
+    begin
+      BlockWriteByte(BlockInfo, CM_PV);
+
+      if not WriteOutRec(resreg, False) then
+      begin
+        Cleanup;
+        MakeError('', ecInternalError, '00015');
+        exit;
+      end;
+    end;
+    if ProcCall is TPSValueProcVal then
+    begin
+      BlockWriteByte(BlockInfo, Cm_cv);
+      WriteOutRec(TPSValueProcVal(ProcCall).ProcNo, True);
+    end else begin
+      BlockWriteByte(BlockInfo, CM_C);
+      BlockWriteLong(BlockInfo, TPSValueProcNo(ProcCall).ProcNo);
+    end;
+    if res <> nil then
+      BlockWriteByte(BlockInfo, CM_PO);
+    if not Cleanup then
+    begin
+      Result := False;
+      exit;
+    end;
+    Result := True;
+  end; {ProcessVarFunction}
+
+	function HasInvalidJumps(StartPos, EndPos: Cardinal): Boolean;
+  var
+    I, J: Longint;
+    Ok: LongBool;
+    FLabelsInBlock: TIfStringList;
+    s: tbtString;
+	begin
+		FLabelsInBlock := TIfStringList.Create;
+		for i := 0 to BlockInfo.Proc.FLabels.Count -1 do
+		begin
+			s := BlockInfo.Proc.FLabels[I];
+			if (Cardinal((@s[1])^) >= StartPos) and (Cardinal((@s[1])^) <= EndPos) then
+			begin
+				Delete(s, 1, 8);
+				FLabelsInBlock.Add(s);
+			end;
+		end;
+		for i := 0 to BlockInfo.Proc.FGotos.Count -1 do
+		begin
+			s := BlockInfo.Proc.FGotos[I];
+			if (Cardinal((@s[1])^) >= StartPos) and (Cardinal((@s[1])^) <= EndPos) then
+			begin
+				Delete(s, 1, 4);
+				s := BlockInfo.Proc.FLabels[Cardinal((@s[1])^)];
+				Delete(s,1,8);
+				OK := False;
+        for J := 0 to FLabelsInBlock.Count -1 do
+        begin
+          if FLabelsInBlock[J] = s then
+          begin
+            Ok := True;
+            Break;
+          end;
+        end;
+        if not Ok then
+        begin
+          MakeError('', ecInvalidJump, '');
+          Result := True;
+          FLabelsInBlock.Free;
+          exit;
+        end;
+      end else begin
+				Delete(s, 1, 4);
+				s := BlockInfo.Proc.FLabels[Cardinal((@s[1])^)];
+				Delete(s,1,8);
+				OK := True;
+        for J := 0 to FLabelsInBlock.Count -1 do
+        begin
+          if FLabelsInBlock[J] = s then
+          begin
+            Ok := False;
+            Break;
+          end;
+        end;
+        if not Ok then
+        begin
+          MakeError('', ecInvalidJump, '');
+          Result := True;
+          FLabelsInBlock.Free;
+          exit;
+        end;
+      end;
+    end;
+    FLabelsInBlock.Free;
+    Result := False;
+  end;
+
+  function ProcessFor: Boolean;
+    { Process a for x := y to z do }
+  var
+    VariableVar: TPSValue;
+      TempBool,
+      InitVal,
+      finVal: TPSValue;
+    Block: TPSBlockInfo;
+    Backwards: Boolean;
+    FPos, NPos, EPos, RPos: Longint;
+    OldCO, OldBO: TPSList;
+    I: Longint;
+		iOldWithCount: Integer;
+		iOldTryCount: Integer;
+		iOldExFnlCount: Integer;
+    lType: TPSType;
+  begin
+    Debug_WriteLine(BlockInfo);
+    Result := False;
+    FParser.Next;
+    if FParser.CurrTokenId <> CSTI_Identifier then
+    begin
+      MakeError('', ecIdentifierExpected, '');
+      exit;
+    end;
+    VariableVar := GetIdentifier(1);
+    if VariableVar = nil then
+      exit;
+    lType := GetTypeNo(BlockInfo, VariableVar);
+    if lType = nil then begin
+      MakeError('', ecTypeMismatch, '');
+      VariableVar.Free;
+      exit;
+    end;
+    case lType.BaseType of
+      btU8, btS8, btU16, btS16, btU32, btS32: ;
+    else
+      begin
+        MakeError('', ecTypeMismatch, '');
+        VariableVar.Free;
+        exit;
+      end;
+    end;
+    if FParser.CurrTokenId <> CSTI_Assignment then
+    begin
+      MakeError('', ecAssignmentExpected, '');
+      VariableVar.Free;
+      exit;
+    end;
+    FParser.Next;
+    InitVal := calc(CSTII_DownTo);
+    if InitVal = nil then
+    begin
+      VariableVar.Free;
+      exit;
+    end;
+    if FParser.CurrTokenId = CSTII_To then
+      Backwards := False
+    else if FParser.CurrTokenId = CSTII_DownTo then
+      Backwards := True
+    else
+    begin
+      MakeError('', ecToExpected, '');
+      VariableVar.Free;
+      InitVal.Free;
+      exit;
+    end;
+    FParser.Next;
+    finVal := calc(CSTII_do);
+    if finVal = nil then
+    begin
+      VariableVar.Free;
+      InitVal.Free;
+      exit;
+    end;
+    if FParser.CurrTokenId <> CSTII_do then
+    begin
+      MakeError('', ecDoExpected, '');
+      finVal.Free;
+      InitVal.Free;
+      VariableVar.Free;
+      exit;
+    end;
+    FParser.Next;
+    if not WriteCalculation(InitVal, VariableVar) then
+    begin
+      VariableVar.Free;
+      InitVal.Free;
+      finVal.Free;
+      exit;
+    end;
+    InitVal.Free;
+    TempBool := AllocStackReg(at2ut(FDefaultBoolType));
+    NPos := Length(BlockInfo.Proc.Data);
+    if not (PreWriteOutRec(VariableVar, nil) and PreWriteOutRec(finVal, nil)) then
+    begin
+      TempBool.Free;
+      VariableVar.Free;
+      finVal.Free;
+      exit;
+    end;
+    BlockWriteByte(BlockInfo, CM_CO);
+    if Backwards then
+    begin
+      BlockWriteByte(BlockInfo, 0); { >= }
+    end
+    else
+    begin
+      BlockWriteByte(BlockInfo, 1); { <= }
+    end;
+    if not (WriteOutRec(TempBool, False) and WriteOutRec(VariableVar, True) and WriteOutRec(finVal, True)) then
+    begin
+      TempBool.Free;
+      VariableVar.Free;
+      finVal.Free;
+      exit;
+    end;
+    AfterWriteOutRec(finVal);
+    AfterWriteOutRec(VariableVar);
+    finVal.Free;
+    BlockWriteByte(BlockInfo, Cm_CNG);
+    EPos := Length(BlockInfo.Proc.Data);
+    BlockWriteLong(BlockInfo, $12345678);
+    WriteOutRec(TempBool, False);
+    RPos := Length(BlockInfo.Proc.Data);
+    OldCO := FContinueOffsets;
+    FContinueOffsets := TPSList.Create;
+    OldBO := FBreakOffsets;
+    FBreakOffsets := TPSList.Create;
+    Block := TPSBlockInfo.Create(BlockInfo);
+    Block.SubType := tOneLiner;
+
+		iOldWithCount := FWithCount;
+		FWithCount := 0;
+		iOldTryCount := FTryCount;
+		FTryCount := 0;
+		iOldExFnlCount := FExceptFinallyCount;
+    FExceptFinallyCount := 0;
+
+    if not ProcessSub(Block) then
+    begin
+      Block.Free;
+      TempBool.Free;
+      VariableVar.Free;
+      FBreakOffsets.Free;
+      FContinueOffsets.Free;
+      FContinueOffsets := OldCO;
+      FBreakOffsets := OldBo;
+
+			FWithCount := iOldWithCount;
+			FTryCount := iOldTryCount;
+      FExceptFinallyCount := iOldExFnlCount;
+
+			exit;
+		end;
+		Block.Free;
+		FPos := Length(BlockInfo.Proc.Data);
+		if not PreWriteOutRec(VariableVar, nil) then
+		begin
+			TempBool.Free;
+			VariableVar.Free;
+			FBreakOffsets.Free;
+			FContinueOffsets.Free;
+			FContinueOffsets := OldCO;
+			FBreakOffsets := OldBo;
+
+			FWithCount := iOldWithCount;
+			FTryCount := iOldTryCount;
+      FExceptFinallyCount := iOldExFnlCount;
+
+      exit;
+    end;
+    if Backwards then
+      BlockWriteByte(BlockInfo, cm_dec)
+    else
+      BlockWriteByte(BlockInfo, cm_inc);
+    if not WriteOutRec(VariableVar, False) then
+    begin
+      TempBool.Free;
+      VariableVar.Free;
+      FBreakOffsets.Free;
+      FContinueOffsets.Free;
+      FContinueOffsets := OldCO;
+      FBreakOffsets := OldBo;
+
+			FWithCount := iOldWithCount;
+			FTryCount := iOldTryCount;
+      FExceptFinallyCount := iOldExFnlCount;
+
+      exit;
+    end;
+    AfterWriteOutRec(VariableVar);
+    BlockWriteByte(BlockInfo, Cm_G);
+    BlockWriteLong(BlockInfo, Longint(NPos - Length(BlockInfo.Proc.Data) - 4));
+    Longint((@BlockInfo.Proc.Data[EPos + 1])^) := Length(BlockInfo.Proc.Data) - RPos;
+    for i := 0 to FBreakOffsets.Count -1 do
+    begin
+      EPos := Cardinal(FBreakOffsets[I]);
+      Longint((@BlockInfo.Proc.Data[EPos - 3])^) := Length(BlockInfo.Proc.Data) - Longint(EPos);
+    end;
+    for i := 0 to FContinueOffsets.Count -1 do
+    begin
+      EPos := Cardinal(FContinueOffsets[I]);
+      Longint((@BlockInfo.Proc.Data[EPos - 3])^) := Longint(FPos) - Longint(EPos);
+    end;
+    FBreakOffsets.Free;
+    FContinueOffsets.Free;
+    FContinueOffsets := OldCO;
+    FBreakOffsets := OldBo;
+
+		FWithCount := iOldWithCount;
+    FTryCount := iOldTryCount;
+    FExceptFinallyCount := iOldExFnlCount;
+
+		TempBool.Free;
+		VariableVar.Free;
+		if HasInvalidJumps(RPos, Length(BlockInfo.Proc.Data)) then
+    begin
+      Result := False;
+      exit;
+    end;
+    Result := True;
+  end; {ProcessFor}
+
+  function ProcessWhile: Boolean;
+  var
+    vin, vout: TPSValue;
+    SPos, EPos: Cardinal;
+    OldCo, OldBO: TPSList;
+    I: Longint;
+    Block: TPSBlockInfo;
+
+		iOldWithCount: Integer;
+    iOldTryCount: Integer;
+    iOldExFnlCount: Integer;
+
+  begin
+    Result := False;
+    Debug_WriteLine(BlockInfo);
+    FParser.Next;
+    vout := calc(CSTII_do);
+    if vout = nil then
+      exit;
+    if FParser.CurrTokenId <> CSTII_do then
+    begin
+      vout.Free;
+      MakeError('', ecDoExpected, '');
+      exit;
+    end;
+    vin := AllocStackReg(at2ut(FDefaultBoolType));
+    SPos := Length(BlockInfo.Proc.Data); // start position
+    OldCo := FContinueOffsets;
+    FContinueOffsets := TPSList.Create;
+    OldBO := FBreakOffsets;
+    FBreakOffsets := TPSList.Create;
+    if not WriteCalculation(vout, vin) then
+    begin
+      vout.Free;
+      vin.Free;
+      FBreakOffsets.Free;
+      FContinueOffsets.Free;
+      FContinueOffsets := OldCO;
+      FBreakOffsets := OldBo;
+      exit;
+    end;
+    vout.Free;
+    FParser.Next; // skip DO
+    BlockWriteByte(BlockInfo, Cm_CNG); // only goto if expression is false
+    BlockWriteLong(BlockInfo, $12345678);
+    EPos := Length(BlockInfo.Proc.Data);
+    if not WriteOutRec(vin, False) then
+    begin
+      MakeError('', ecInternalError, '00017');
+      vin.Free;
+      FBreakOffsets.Free;
+      FContinueOffsets.Free;
+      FContinueOffsets := OldCO;
+      FBreakOffsets := OldBo;
+      exit;
+    end;
+    Block := TPSBlockInfo.Create(BlockInfo);
+    Block.SubType := tOneLiner;
+
+    iOldWithCount := FWithCount;
+    FWithCount := 0;
+    iOldTryCount := FTryCount;
+    FTryCount := 0;
+    iOldExFnlCount := FExceptFinallyCount;
+    FExceptFinallyCount := 0;
+
+    if not ProcessSub(Block) then
+    begin
+      Block.Free;
+      vin.Free;
+      FBreakOffsets.Free;
+      FContinueOffsets.Free;
+      FContinueOffsets := OldCO;
+      FBreakOffsets := OldBo;
+
+      FWithCount := iOldWithCount;
+			FTryCount := iOldTryCount;
+      FExceptFinallyCount := iOldExFnlCount;
+
+      exit;
+    end;
+    Block.Free;
+    Debug_WriteLine(BlockInfo);
+    BlockWriteByte(BlockInfo, Cm_G);
+    BlockWriteLong(BlockInfo, Longint(SPos) - Length(BlockInfo.Proc.Data) - 4);
+    Longint((@BlockInfo.Proc.Data[EPos - 3])^) := Length(BlockInfo.Proc.Data) - Longint(EPos) - 5;
+    for i := 0 to FBreakOffsets.Count -1 do
+    begin
+      EPos := Cardinal(FBreakOffsets[I]);
+      Longint((@BlockInfo.Proc.Data[EPos - 3])^) := Length(BlockInfo.Proc.Data) - Longint(EPos);
+    end;
+    for i := 0 to FContinueOffsets.Count -1 do
+    begin
+      EPos := Cardinal(FContinueOffsets[I]);
+      Longint((@BlockInfo.Proc.Data[EPos - 3])^) := Longint(SPos) - Longint(EPos);
+    end;
+    FBreakOffsets.Free;
+    FContinueOffsets.Free;
+    FContinueOffsets := OldCO;
+    FBreakOffsets := OldBo;
+
+    FWithCount := iOldWithCount;
+    FTryCount := iOldTryCount;
+    FExceptFinallyCount := iOldExFnlCount;
+
+    vin.Free;
+		if HasInvalidJumps(EPos, Length(BlockInfo.Proc.Data)) then
+    begin
+      Result := False;
+      exit;
+    end;
+    Result := True;
+  end;
+
+  function ProcessRepeat: Boolean;
+  var
+    vin, vout: TPSValue;
+    CPos, SPos, EPos: Cardinal;
+    I: Longint;
+    OldCo, OldBO: TPSList;
+    Block: TPSBlockInfo;
+
+    iOldWithCount: Integer;
+    iOldTryCount: Integer;
+    iOldExFnlCount: Integer;
+
+  begin
+    Result := False;
+    Debug_WriteLine(BlockInfo);
+    FParser.Next;
+    OldCo := FContinueOffsets;
+    FContinueOffsets := TPSList.Create;
+    OldBO := FBreakOffsets;
+    FBreakOffsets := TPSList.Create;
+    vin := AllocStackReg(at2ut(FDefaultBoolType));
+    SPos := Length(BlockInfo.Proc.Data);
+    Block := TPSBlockInfo.Create(BlockInfo);
+    Block.SubType := tRepeat;
+
+    iOldWithCount := FWithCount;
+    FWithCount := 0;
+    iOldTryCount := FTryCount;
+    FTryCount := 0;
+    iOldExFnlCount := FExceptFinallyCount;
+    FExceptFinallyCount := 0;
+
+    if not ProcessSub(Block) then
+    begin
+      Block.Free;
+      FBreakOffsets.Free;
+      FContinueOffsets.Free;
+      FContinueOffsets := OldCO;
+      FBreakOffsets := OldBo;
+
+      FWithCount := iOldWithCount;
+      FTryCount := iOldTryCount;
+      FExceptFinallyCount := iOldExFnlCount;
+
+      vin.Free;
+      exit;
+    end;
+    Block.Free;
+    FParser.Next; //cstii_until
+    vout := calc(CSTI_Semicolon);
+    if vout = nil then
+    begin
+      FBreakOffsets.Free;
+      FContinueOffsets.Free;
+      FContinueOffsets := OldCO;
+      FBreakOffsets := OldBo;
+
+      FWithCount := iOldWithCount;
+      FTryCount := iOldTryCount;
+      FExceptFinallyCount := iOldExFnlCount;
+
+      vin.Free;
+      exit;
+    end;
+    CPos := Length(BlockInfo.Proc.Data);
+    if not WriteCalculation(vout, vin) then
+    begin
+      vout.Free;
+      vin.Free;
+      FBreakOffsets.Free;
+      FContinueOffsets.Free;
+      FContinueOffsets := OldCO;
+      FBreakOffsets := OldBo;
+
+      FWithCount := iOldWithCount;
+      FTryCount := iOldTryCount;
+      FExceptFinallyCount := iOldExFnlCount;
+
+      exit;
+    end;
+    vout.Free;
+    BlockWriteByte(BlockInfo, Cm_CNG);
+    BlockWriteLong(BlockInfo, $12345678);
+    EPos := Length(BlockInfo. Proc.Data);
+    if not WriteOutRec(vin, False) then
+    begin
+      MakeError('', ecInternalError, '00016');
+      vin.Free;
+      FBreakOffsets.Free;
+      FContinueOffsets.Free;
+      FContinueOffsets := OldCO;
+      FBreakOffsets := OldBo;
+
+      FWithCount := iOldWithCount;
+      FTryCount := iOldTryCount;
+      FExceptFinallyCount := iOldExFnlCount;
+
+      exit;
+    end;
+    Longint((@BlockInfo.Proc.Data[EPos - 3])^) := Longint(SPos) -
+      Length(BlockInfo.Proc.Data);
+    for i := 0 to FBreakOffsets.Count -1 do
+    begin
+      EPos := Cardinal(FBreakOffsets[I]);
+      Longint((@BlockInfo.Proc.Data[EPos - 3])^) := Length(BlockInfo. Proc.Data) - Longint(EPos);
+    end;
+    for i := 0 to FContinueOffsets.Count -1 do
+    begin
+      EPos := Cardinal(FContinueOffsets[I]);
+      Longint((@BlockInfo.Proc.Data[EPos - 3])^) := Longint(CPos) - Longint(EPos);
+    end;
+    FBreakOffsets.Free;
+    FContinueOffsets.Free;
+    FContinueOffsets := OldCO;
+    FBreakOffsets := OldBo;
+
+    FWithCount := iOldWithCount;
+    FTryCount := iOldTryCount;
+    FExceptFinallyCount := iOldExFnlCount;
+
+    vin.Free;
+    if HasInvalidJumps(SPos, Length(BlockInfo. Proc.Data)) then
+    begin
+      Result := False;
+      exit;
+    end;
+    Result := True;
+  end; {ProcessRepeat}
+
+  function ProcessIf: Boolean;
+  var
+    vout, vin: TPSValue;
+    SPos, EPos: Cardinal;
+    Block: TPSBlockInfo;
+  begin
+    Result := False;
+    Debug_WriteLine(BlockInfo);
+    FParser.Next;
+    vout := calc(CSTII_Then);
+    if vout = nil then
+      exit;
+    if FParser.CurrTokenId <> CSTII_Then then
+    begin
+      vout.Free;
+      MakeError('', ecThenExpected, '');
+      exit;
+    end;
+    vin := AllocStackReg(at2ut(FDefaultBoolType));
+    if not WriteCalculation(vout, vin) then
+    begin
+      vout.Free;
+      vin.Free;
+      exit;
+    end;
+    vout.Free;
+    BlockWriteByte(BlockInfo, cm_sf);
+    if not WriteOutRec(vin, False) then
+    begin
+      MakeError('', ecInternalError, '00018');
+      vin.Free;
+      exit;
+    end;
+    BlockWriteByte(BlockInfo, 1);
+    vin.Free;
+    BlockWriteByte(BlockInfo, cm_fg);
+    BlockWriteLong(BlockInfo, $12345678);
+    SPos := Length(BlockInfo.Proc.Data);
+    FParser.Next; // skip then
+    Block := TPSBlockInfo.Create(BlockInfo);
+    Block.SubType := tifOneliner;
+    if not ProcessSub(Block) then
+    begin
+      Block.Free;
+      exit;
+    end;
+    Block.Free;
+    if FParser.CurrTokenId = CSTII_Else then
+    begin
+      BlockWriteByte(BlockInfo, Cm_G);
+      BlockWriteLong(BlockInfo, $12345678);
+      EPos := Length(BlockInfo.Proc.Data);
+      Longint((@BlockInfo.Proc.Data[SPos - 3])^) := Length(BlockInfo.Proc.Data) - Longint(SPos);
+      FParser.Next;
+      Block := TPSBlockInfo.Create(BlockInfo);
+      Block.SubType := tOneLiner;
+      if not ProcessSub(Block) then
+      begin
+        Block.Free;
+        exit;
+      end;
+      Block.Free;
+      Longint((@BlockInfo.Proc.Data[EPos - 3])^) := Length(BlockInfo.Proc.Data) - Longint(EPos);
+    end
+    else
+    begin
+      Longint((@BlockInfo.Proc.Data[SPos - 3])^) := Length(BlockInfo.Proc.Data) - Longint(SPos) + 5 - 5;
+    end;
+    Result := True;
+  end; {ProcessIf}
+
+  function _ProcessLabel: Longint; {0 = failed; 1 = successful; 2 = no label}
+  var
+    I, H: Longint;
+    s: tbtString;
+  begin
+    h := MakeHash(FParser.GetToken);
+    for i := 0 to BlockInfo.Proc.FLabels.Count -1 do
+    begin
+      s := BlockInfo.Proc.FLabels[I];
+      delete(s, 1, 4);
+      if Longint((@s[1])^) = h then
+      begin
+        delete(s, 1, 4);
+        if s = FParser.GetToken then
+        begin
+          s := BlockInfo.Proc.FLabels[I];
+          Cardinal((@s[1])^) := Length(BlockInfo.Proc.Data);
+          BlockInfo.Proc.FLabels[i] := s;
+          FParser.Next;
+          if fParser.CurrTokenId = CSTI_Colon then
+          begin
+            Result := 1;
+            FParser.Next;
+            exit;
+          end else begin
+            MakeError('', ecColonExpected, '');
+            Result := 0;
+            Exit;
+          end;
+        end;
+      end;
+    end;
+    result := 2;
+  end;
+
+  function ProcessIdentifier: Boolean;
+  var
+    vin, vout: TPSValue;
+  begin
+    Result := False;
+    Debug_WriteLine(BlockInfo);
+    vin := GetIdentifier(2);
+    if vin <> nil then
+    begin
+      if vin is TPSValueVar then
+      begin // assignment needed
+        if FParser.CurrTokenId <> CSTI_Assignment then
+        begin
+          MakeError('', ecAssignmentExpected, '');
+          vin.Free;
+          exit;
+        end;
+        FParser.Next;
+        vout := calc(CSTI_Semicolon);
+        if vout = nil then
+        begin
+          vin.Free;
+          exit;
+        end;
+        if not WriteCalculation(vout, vin) then
+        begin
+          vin.Free;
+          vout.Free;
+          exit;
+        end;
+        vin.Free;
+        vout.Free;
+      end else if vin is TPSValueProc then
+      begin
+        Result := _ProcessFunction(TPSValueProc(vin), nil);
+        vin.Free;
+        Exit;
+      end else
+      begin
+        MakeError('', ecInternalError, '20');
+        vin.Free;
+        REsult := False;
+        exit;
+      end;
+    end
+    else
+    begin
+      Result := False;
+      exit;
+    end;
+    Result := True;
+  end; {ProcessIdentifier}
+
+  function ProcessCase: Boolean;
+  var
+    V1, V2, TempRec, Val, CalcItem: TPSValue;
+    p: TPSBinValueOp;
+    SPos, CurrP: Cardinal;
+    I: Longint;
+    EndReloc: TPSList;
+    Block: TPSBlockInfo;
+
+    function NewRec(val: TPSValue): TPSValueReplace;
+    begin
+      Result := TPSValueReplace.Create;
+      Result.SetParserPos(FParser);
+      Result.FNewValue := Val;
+      Result.FreeNewValue := False;
+    end;
+
+    function Combine(v1, v2: TPSValue; Op: TPSBinOperatorType): TPSValue;
+    begin
+      if V1 = nil then
+      begin
+        Result := v2;
+      end else if v2 = nil then
+      begin
+        Result := V1;
+      end else
+      begin
+        Result := TPSBinValueOp.Create;
+        TPSBinValueOp(Result).FType := FDefaultBoolType;
+        TPSBinValueOp(Result).Operator := Op;
+        Result.SetParserPos(FParser);
+        TPSBinValueOp(Result).FVal1 := V1;
+        TPSBinValueOp(Result).FVal2 := V2;
+      end;
+    end;
+
+
+  begin
+    Debug_WriteLine(BlockInfo);
+    FParser.Next;
+    Val := calc(CSTII_of);
+    if Val = nil then
+    begin
+      ProcessCase := False;
+      exit;
+    end; {if}
+    if FParser.CurrTokenId <> CSTII_Of then
+    begin
+      MakeError('', ecOfExpected, '');
+      val.Free;
+      ProcessCase := False;
+      exit;
+    end; {if}
+    FParser.Next;
+    TempRec := AllocStackReg(GetTypeNo(BlockInfo, Val));
+    if not WriteCalculation(Val, TempRec) then
+    begin
+      TempRec.Free;
+      val.Free;
+      ProcessCase := False;
+      exit;
+    end; {if}
+    val.Free;
+    EndReloc := TPSList.Create;
+    CalcItem := AllocStackReg(at2ut(FDefaultBoolType));
+    SPos := Length(BlockInfo.Proc.Data);
+    repeat
+      V1 := nil;
+      while true do
+      begin
+        Val := calc(CSTI_Colon);
+        if (Val = nil) then
+        begin
+          V1.Free;
+          CalcItem.Free;
+          TempRec.Free;
+          EndReloc.Free;
+          ProcessCase := False;
+          exit;
+        end; {if}
+        if fParser.CurrTokenID = CSTI_TwoDots then begin
+          FParser.Next;
+          V2 := Calc(CSTI_colon);
+          if V2 = nil then begin
+            V1.Free;
+            CalcItem.Free;
+            TempRec.Free;
+            EndReloc.Free;
+            ProcessCase := False;
+            Val.Free;
+            exit;
+          end;
+          p := TPSBinValueOp.Create;
+          p.SetParserPos(FParser);
+          p.Operator := otGreaterEqual;
+          p.aType := at2ut(FDefaultBoolType);
+          p.Val2 := Val;
+          p.Val1 := NewRec(TempRec);
+          Val := p;
+          p := TPSBinValueOp.Create;
+          p.SetParserPos(FParser);
+          p.Operator := otLessEqual;
+          p.aType := at2ut(FDefaultBoolType);
+          p.Val2 := V2;
+          p.Val1 := NewRec(TempRec);
+          P := TPSBinValueOp(Combine(Val,P, otAnd));
+        end else begin
+          p := TPSBinValueOp.Create;
+          p.SetParserPos(FParser);
+          p.Operator := otEqual;
+          p.aType := at2ut(FDefaultBoolType);
+          p.Val1 := Val;
+          p.Val2 := NewRec(TempRec);
+        end;
+        V1 := Combine(V1, P, otOr);
+        if FParser.CurrTokenId = CSTI_Colon then Break;
+        if FParser.CurrTokenID <> CSTI_Comma then
+        begin
+          MakeError('', ecColonExpected, '');
+          V1.Free;
+          CalcItem.Free;
+          TempRec.Free;
+          EndReloc.Free;
+          ProcessCase := False;
+          exit;
+        end;
+        FParser.Next;
+      end;
+      FParser.Next;
+      if not WriteCalculation(V1, CalcItem) then
+      begin
+        CalcItem.Free;
+        v1.Free;
+        EndReloc.Free;
+        ProcessCase := False;
+        exit;
+      end;
+      v1.Free;
+      BlockWriteByte(BlockInfo, Cm_CNG);
+      BlockWriteLong(BlockInfo, $12345678);
+      CurrP := Length(BlockInfo.Proc.Data);
+      WriteOutRec(CalcItem, False);
+      Block := TPSBlockInfo.Create(BlockInfo);
+      Block.SubType := tifOneliner;
+      if not ProcessSub(Block) then
+      begin
+        Block.Free;
+        CalcItem.Free;
+        TempRec.Free;
+        EndReloc.Free;
+        ProcessCase := False;
+        exit;
+      end;
+      Block.Free;
+      BlockWriteByte(BlockInfo, Cm_G);
+      BlockWriteLong(BlockInfo, $12345678);
+      EndReloc.Add(Pointer(Length(BlockInfo.Proc.Data)));
+      Cardinal((@BlockInfo.Proc.Data[CurrP - 3])^) := Cardinal(Length(BlockInfo.Proc.Data)) - CurrP - 5;
+      if FParser.CurrTokenID = CSTI_Semicolon then FParser.Next;
+      if FParser.CurrTokenID = CSTII_Else then
+      begin
+        FParser.Next;
+        Block := TPSBlockInfo.Create(BlockInfo);
+        Block.SubType := tOneliner;
+        if not ProcessSub(Block) then
+        begin
+          Block.Free;
+          CalcItem.Free;
+          TempRec.Free;
+          EndReloc.Free;
+          ProcessCase := False;
+          exit;
+        end;
+        Block.Free;
+        if FParser.CurrTokenID = CSTI_Semicolon then FParser.Next;
+        if FParser.CurrtokenId <> CSTII_End then
+        begin
+          MakeError('', ecEndExpected, '');
+          CalcItem.Free;
+          TempRec.Free;
+          EndReloc.Free;
+          ProcessCase := False;
+          exit;
+        end;
+      end;
+    until FParser.CurrTokenID = CSTII_End;
+    FParser.Next;
+    for i := 0 to EndReloc.Count -1 do
+    begin
+      Cardinal((@BlockInfo.Proc.Data[Cardinal(EndReloc[I])- 3])^) := Cardinal(Length(BlockInfo.Proc.Data)) - Cardinal(EndReloc[I]);
+    end;
+    CalcItem.Free;
+    TempRec.Free;
+    EndReloc.Free;
+    if FContinueOffsets <> nil then
+    begin
+      for i := 0 to FContinueOffsets.Count -1 do
+      begin
+        if Cardinal(FContinueOffsets[i]) >= SPos then
+        begin
+          Byte((@BlockInfo.Proc.Data[Longint(FContinueOffsets[i]) - 4])^) := Cm_P2G;
+        end;
+      end;
+    end;
+    if FBreakOffsets <> nil then
+    begin
+      for i := 0 to FBreakOffsets.Count -1 do
+      begin
+        if Cardinal(FBreakOffsets[i]) >= SPos then
+        begin
+          Byte((@BlockInfo.Proc.Data[Longint(FBreakOffsets[i]) - 4])^) := Cm_P2G;
+        end;
+      end;
+    end;
+    if HasInvalidJumps(SPos, Length(BlockInfo.Proc.Data)) then
+    begin
+      Result := False;
+      exit;
+    end;
+    Result := True;
+  end; {ProcessCase}
+	function ProcessGoto: Boolean;
+  var
+    I, H: Longint;
+    s: tbtString;
+  begin
+    Debug_WriteLine(BlockInfo);
+    FParser.Next;
+    h := MakeHash(FParser.GetToken);
+		for i := 0 to BlockInfo.Proc.FLabels.Count -1 do
+    begin
+      s := BlockInfo.Proc.FLabels[I];
+      delete(s, 1, 4);
+      if Longint((@s[1])^) = h then
+      begin
+        delete(s, 1, 4);
+        if s = FParser.GetToken then
+        begin
+          FParser.Next;
+          BlockWriteByte(BlockInfo, Cm_G);
+          BlockWriteLong(BlockInfo, $12345678);
+          BlockInfo.Proc.FGotos.Add(PS_mi2s(length(BlockInfo.Proc.Data))+PS_mi2s(i));
+          Result := True;
+          exit;
+        end;
+      end;
+    end;
+    MakeError('', ecUnknownIdentifier, FParser.OriginalToken);
+    Result := False;
+  end; {ProcessGoto}
+
+  function ProcessWith: Boolean;
+  var
+    Block: TPSBlockInfo;
+    aVar, aReplace: TPSValue;
+    aType: TPSType;
+
+    iStartOffset: Integer;
+
+    tmp: TPSValue;
+  begin
+    Debug_WriteLine(BlockInfo);
+    Block := TPSBlockInfo.Create(BlockInfo);
+    Block.SubType := tOneLiner;
+
+    FParser.Next;
+    repeat
+      aVar := GetIdentifier(0);
+      if aVar = nil then
+      begin
+        block.Free;
+        Result := False;
+        exit;
+      end;
+      AType := GetTypeNo(BlockInfo, aVar);
+      if (AType = nil) or ((aType.BaseType <> btRecord) and (aType.BaseType <> btClass)) then
+      begin
+        MakeError('', ecClassTypeExpected, '');
+        Block.Free;
+        Result := False;
+        exit;
+      end;
+
+      aReplace := TPSValueReplace.Create;
+      aReplace.SetParserPos(FParser);
+      TPSValueReplace(aReplace).FreeOldValue := True;
+      TPSValueReplace(aReplace).FreeNewValue := True;
+      TPSValueReplace(aReplace).OldValue := aVar;
+
+      if aVar.InheritsFrom(TPSVar) then TPSVar(aVar).Use;
+      tmp := AllocPointer(GetTypeNo(BlockInfo, aVar));
+      TPSProcVar(BlockInfo.Proc.ProcVars[TPSValueAllocatedStackVar(tmp).LocalVarNo]).Use;
+      PreWriteOutRec(tmp,GetTypeNo(BlockInfo, tmp));
+      PreWriteOutRec(aVar,GetTypeNo(BlockInfo, aVar));
+      BlockWriteByte(BlockInfo, cm_sp);
+      WriteOutRec(tmp, false);
+      WriteOutRec(aVar, false);
+      TPSValueReplace(aReplace).NewValue := tmp;
+
+
+
+      Block.WithList.Add(aReplace);
+
+      if FParser.CurrTokenID = CSTII_do then
+      begin
+        FParser.Next;
+        Break;
+      end else
+      if FParser.CurrTokenId <> CSTI_Comma then
+      begin
+        MakeError('', ecDoExpected, '');
+        Block.Free;
+        Result := False;
+        exit;
+      end;
+      FParser.Next;
+    until False;
+
+
+    inc(FWithCount);
+
+    iStartOffset := Length(Block.Proc.Data);
+
+    if not (ProcessSub(Block) and (not HasInvalidJumps(iStartOffset,Length(BlockInfo.Proc.Data) + 1)) )  then
+    begin
+      dec(FWithCount);
+      Block.Free;
+      Result := False;
+      exit;
+    end;
+    dec(FWithCount);
+
+    AfterWriteOutRec(aVar);
+    AfterWriteOutRec(tmp);
+    Block.Free;
+    Result := True;
+  end;
+
+  function ProcessTry: Boolean;
+  var
+    FStartOffset: Cardinal;
+    iBlockStartOffset: Integer;
+    Block: TPSBlockInfo;
+  begin
+    FParser.Next;
+    BlockWriteByte(BlockInfo, cm_puexh);
+    FStartOffset := Length(BlockInfo.Proc.Data) + 1;
+    BlockWriteLong(BlockInfo, InvalidVal);
+    BlockWriteLong(BlockInfo, InvalidVal);
+    BlockWriteLong(BlockInfo, InvalidVal);
+    BlockWriteLong(BlockInfo, InvalidVal);
+    Block := TPSBlockInfo.Create(BlockInfo);
+    Block.SubType := tTry;
+    inc(FTryCount);
+    if ProcessSub(Block) and (not HasInvalidJumps(FStartOffset,Length(BlockInfo.Proc.Data) + 1))  then
+    begin
+      dec(FTryCount);
+      Block.Free;
+      BlockWriteByte(BlockInfo, cm_poexh);
+      BlockWriteByte(BlockInfo, 0);
+      if FParser.CurrTokenID = CSTII_Except then
+      begin
+        FParser.Next;
+        Cardinal((@BlockInfo.Proc.Data[FStartOffset + 4])^) := Cardinal(Length(BlockInfo.Proc.Data)) - FStartOffset - 15;
+        iBlockStartOffset := Length(BlockInfo.Proc.Data) ;
+        Block := TPSBlockInfo.Create(BlockInfo);
+        Block.SubType := tTryEnd;
+        inc(FExceptFinallyCount);
+        if ProcessSub(Block) and (not HasInvalidJumps(iBlockStartOffset,Length(BlockInfo.Proc.Data) + 1))  then
+        begin
+          dec(FExceptFinallyCount);
+          Block.Free;
+          BlockWriteByte(BlockInfo, cm_poexh);
+          BlockWriteByte(BlockInfo, 2);
+          if FParser.CurrTokenId = CSTII_Finally then
+          begin
+            Cardinal((@BlockInfo.Proc.Data[FStartOffset + 8])^) := Cardinal(Length(BlockInfo.Proc.Data)) - FStartOffset - 15;
+            iBlockStartOffset := Length(BlockInfo.Proc.Data) ;
+            Block := TPSBlockInfo.Create(BlockInfo);
+            Block.SubType := tTryEnd;
+            FParser.Next;
+           inc(FExceptFinallyCount);
+            if ProcessSub(Block)  and (not HasInvalidJumps(iBlockStartOffset,Length(BlockInfo.Proc.Data) + 1))  then
+            begin
+              dec(FExceptFinallyCount);
+              Block.Free;
+              if FParser.CurrTokenId = CSTII_End then
+              begin
+                BlockWriteByte(BlockInfo, cm_poexh);
+                BlockWriteByte(BlockInfo, 3);
+              end else begin
+                MakeError('', ecEndExpected, '');
+                Result := False;
+                exit;
+              end;
+            end else
+            begin
+              Block.Free;
+              Result := False;
+              dec(FExceptFinallyCount);
+              exit;
+            end;
+          end else if FParser.CurrTokenID <> CSTII_End then
+          begin
+            MakeError('', ecEndExpected, '');
+            Result := False;
+            exit;
+          end;
+          FParser.Next;
+        end else
+        begin
+          Block.Free;
+          Result := False;
+          dec(FExceptFinallyCount);
+          exit;
+        end;
+      end else if FParser.CurrTokenId = CSTII_Finally then
+      begin
+        FParser.Next;
+        Cardinal((@BlockInfo.Proc.Data[FStartOffset])^) := Cardinal(Length(BlockInfo.Proc.Data)) - FStartOffset - 15;
+        iBlockStartOffset := Length(BlockInfo.Proc.Data) ;
+        Block := TPSBlockInfo.Create(BlockInfo);
+        Block.SubType := tTryEnd;
+        inc(FExceptFinallyCount);
+        if ProcessSub(Block)  and (not HasInvalidJumps(iBlockStartOffset,Length(BlockInfo.Proc.Data) + 1)) then
+        begin
+          dec(FExceptFinallyCount);
+          Block.Free;
+          BlockWriteByte(BlockInfo, cm_poexh);
+          BlockWriteByte(BlockInfo, 1);
+          if FParser.CurrTokenId = CSTII_Except then
+          begin
+            Cardinal((@BlockInfo.Proc.Data[FStartOffset + 4])^) := Cardinal(Length(BlockInfo.Proc.Data)) - FStartOffset - 15;
+            iBlockStartOffset := Length(BlockInfo.Proc.Data) ;
+            FParser.Next;
+            Block := TPSBlockInfo.Create(BlockInfo);
+            Block.SubType := tTryEnd;
+            inc(FExceptFinallyCount);
+            if ProcessSub(Block) and (not HasInvalidJumps(iBlockStartOffset,Length(BlockInfo.Proc.Data) + 1)) then
+            begin
+              dec(FExceptFinallyCount);
+              Block.Free;
+              if FParser.CurrTokenId = CSTII_End then
+              begin
+                BlockWriteByte(BlockInfo, cm_poexh);
+                BlockWriteByte(BlockInfo, 2);
+              end else begin
+                MakeError('', ecEndExpected, '');
+                Result := False;
+                exit;
+              end;
+            end else
+            begin
+              Block.Free;
+              Result := False;
+              dec(FExceptFinallyCount);
+              exit;
+            end;
+          end else if FParser.CurrTokenID <> CSTII_End then
+          begin
+            MakeError('', ecEndExpected, '');
+            Result := False;
+            exit;
+          end;
+          FParser.Next;
+        end else
+        begin
+          Block.Free;
+          Result := False;
+          dec(FExceptFinallyCount);
+          exit;
+        end;
+      end;
+    end else
+    begin
+      Block.Free;
+      Result := False;
+      dec(FTryCount);
+      exit;
+    end;
+    Cardinal((@BlockInfo.Proc.Data[FStartOffset + 12])^) := Cardinal(Length(BlockInfo.Proc.Data)) - FStartOffset - 15;
+    Result := True;
+  end; {ProcessTry}
+
+var
+  i: Integer;
+  Block: TPSBlockInfo;
+
+begin
+  ProcessSub := False;
+  if (BlockInfo.SubType = tProcBegin) or (BlockInfo.SubType= tMainBegin) or
+{$IFDEF PS_USESSUPPORT}
+     (BlockInfo.SubType = tUnitInit) or (BlockInfo.SubType= tUnitFinish) or // NvdS
+{$endif}
+     (BlockInfo.SubType= tSubBegin) then
+  begin
+    FParser.Next; // skip CSTII_Begin
+  end;
+  while True do
+  begin
+    case FParser.CurrTokenId of
+      CSTII_Goto:
+        begin
+          if not ProcessGoto then
+            Exit;
+          if (BlockInfo.SubType = tifOneliner) or (BlockInfo.SubType = TOneLiner) then
+            break;
+        end;
+      CSTII_With:
+        begin
+          if not ProcessWith then
+            Exit;
+          if (BlockInfo.SubType = tifOneliner) or (BlockInfo.SubType = TOneLiner) then
+            break;
+        end;
+      CSTII_Try:
+        begin
+          if not ProcessTry then
+            Exit;
+          if (BlockInfo.SubType = tifOneliner) or (BlockInfo.SubType = TOneLiner) then
+            break;
+        end;
+      CSTII_Finally, CSTII_Except:
+        begin
+          if (BlockInfo.SubType = tTry) or (BlockInfo.SubType = tTryEnd) then
+            Break
+          else
+            begin
+              MakeError('', ecEndExpected, '');
+              Exit;
+            end;
+        end;
+      CSTII_Begin:
+        begin
+          Block := TPSBlockInfo.Create(BlockInfo);
+          Block.SubType := tSubBegin;
+          if not ProcessSub(Block) then
+          begin
+            Block.Free;
+            Exit;
+          end;
+          Block.Free;
+
+          FParser.Next; // skip END
+          if (BlockInfo.SubType = tifOneliner) or (BlockInfo.SubType = TOneLiner) then
+            break;
+        end;
+      CSTI_Semicolon:
+        begin
+
+          if (BlockInfo.SubType = tifOneliner) or (BlockInfo.SubType = TOneLiner) then
+            break
+          else FParser.Next;
+        end;
+      CSTII_until:
+        begin
+          Debug_WriteLine(BlockInfo);
+          if BlockInfo.SubType = tRepeat then
+          begin
+            break;
+          end
+          else
+          begin
+            MakeError('', ecIdentifierExpected, '');
+            exit;
+          end;
+          if (BlockInfo.SubType = tifOneliner) or (BlockInfo.SubType = TOneLiner) then
+            break;
+        end;
+      CSTII_Else:
+        begin
+          if BlockInfo.SubType = tifOneliner then
+            break
+          else
+          begin
+            MakeError('', ecIdentifierExpected, '');
+            exit;
+          end;
+        end;
+      CSTII_repeat:
+        begin
+          if not ProcessRepeat then
+            exit;
+          if (BlockInfo.SubType = tifOneliner) or (BlockInfo.SubType = TOneLiner) then
+            break;
+        end;
+      CSTII_For:
+        begin
+          if not ProcessFor then
+            exit;
+          if (BlockInfo.SubType = tifOneliner) or (BlockInfo.SubType = TOneLiner) then
+            break;
+        end;
+      CSTII_While:
+        begin
+          if not ProcessWhile then
+            exit;
+          if (BlockInfo.SubType = tifOneliner) or (BlockInfo.SubType = TOneLiner) then
+            break;
+        end;
+      CSTII_Exit:
+        begin
+          Debug_WriteLine(BlockInfo);
+          BlockWriteByte(BlockInfo, Cm_R);
+          FParser.Next;
+          if (BlockInfo.SubType = tifOneliner) or (BlockInfo.SubType = TOneLiner) then
+            break;
+        end;
+      CSTII_Case:
+        begin
+          if not ProcessCase then
+            exit;
+          if (BlockInfo.SubType = tifOneliner) or (BlockInfo.SubType = TOneLiner) then
+            break;
+        end;
+      CSTII_If:
+        begin
+          if not ProcessIf then
+            exit;
+          if (BlockInfo.SubType = tifOneliner) or (BlockInfo.SubType = TOneLiner) then
+            break;
+        end;
+      CSTI_Identifier:
+        begin
+          case _ProcessLabel of
+            0: Exit;
+            1: ;
+            else
+            begin
+              if FParser.GetToken = 'BREAK' then
+              begin
+                if FBreakOffsets = nil then
+                begin
+                  MakeError('', ecNotInLoop, '');
+                  exit;
+                end;
+                for i := 0 to FExceptFinallyCount - 1 do
+                begin
+                  BlockWriteByte(BlockInfo, cm_poexh);
+                  BlockWriteByte(BlockInfo, 1);
+                end;
+
+                for i := 0 to FTryCount - 1 do
+                begin
+                  BlockWriteByte(BlockInfo, cm_poexh);
+                  BlockWriteByte(BlockInfo, 0);
+                  BlockWriteByte(BlockInfo, cm_poexh);
+                  BlockWriteByte(BlockInfo, 1);
+                end;
+
+                for i := 0 to FWithCount - 1 do
+									BlockWriteByte(BlockInfo,cm_po);
+                BlockWriteByte(BlockInfo, Cm_G);
+                BlockWriteLong(BlockInfo, $12345678);
+                FBreakOffsets.Add(Pointer(Length(BlockInfo.Proc.Data)));
+                FParser.Next;
+                if (BlockInfo.SubType= tifOneliner) or (BlockInfo.SubType = TOneLiner) then
+                  break;
+              end else if FParser.GetToken = 'CONTINUE' then
+              begin
+                if FBreakOffsets = nil then
+                begin
+                  MakeError('', ecNotInLoop, '');
+                  exit;
+                end;
+                for i := 0 to FExceptFinallyCount - 1 do
+                begin
+                  BlockWriteByte(BlockInfo, cm_poexh);
+                  BlockWriteByte(BlockInfo, 1);
+                end;
+
+                for i := 0 to FTryCount - 1 do
+                begin
+                  BlockWriteByte(BlockInfo, cm_poexh);
+                  BlockWriteByte(BlockInfo, 0);
+                  BlockWriteByte(BlockInfo, cm_poexh);
+                  BlockWriteByte(BlockInfo, 1);
+                end;
+
+                for i := 0 to FWithCount - 1 do
+									BlockWriteByte(BlockInfo,cm_po);
+                BlockWriteByte(BlockInfo, Cm_G);
+                BlockWriteLong(BlockInfo, $12345678);
+                FContinueOffsets.Add(Pointer(Length(BlockInfo.Proc.Data)));
+                FParser.Next;
+                if (BlockInfo.SubType = tifOneliner) or (BlockInfo.SubType = TOneLiner) then
+                  break;
+              end else
+              if not ProcessIdentifier then
+                exit;
+              if (BlockInfo.SubType = tifOneliner) or (BlockInfo.SubType = TOneLiner) then
+                break;
+            end;
+          end; {case}
+          
+          if (BlockInfo.SubType = tifOneliner) or (BlockInfo.SubType = TOneLiner) then
+            break;
+
+        end;
+    {$IFDEF PS_USESSUPPORT}
+      CSTII_Finalization:                            //NvdS
+        begin                                        //
+          if (BlockInfo.SubType = tUnitInit) then    //
+          begin                                      //
+            break;                                   //
+          end                                        //
+          else                                       //
+          begin                                      //
+            MakeError('', ecIdentifierExpected, ''); //
+            exit;                                    //
+          end;                                       //
+        end;                                         //nvds
+    {$endif}
+      CSTII_End:
+        begin
+          if (BlockInfo.SubType = tTryEnd) or (BlockInfo.SubType = tMainBegin) or
+             (BlockInfo.SubType = tSubBegin) or (BlockInfo.SubType = tifOneliner) or
+             (BlockInfo.SubType = tProcBegin) or (BlockInfo.SubType = TOneLiner)
+    {$IFDEF PS_USESSUPPORT} or (BlockInfo.SubType = tUnitInit) or (BlockInfo.SubType = tUnitFinish) {$endif} then //nvds
+          begin
+            break;
+          end
+          else
+          begin
+            MakeError('', ecIdentifierExpected, '');
+            exit;
+          end;
+        end;
+      CSTI_EOF:
+        begin
+          MakeError('', ecUnexpectedEndOfFile, '');
+          exit;
+        end;
+    else
+      begin
+        MakeError('', ecIdentifierExpected, '');
+        exit;
+      end;
+    end;
+  end;
+  if (BlockInfo.SubType = tMainBegin) or (BlockInfo.SubType = tProcBegin)
+ {$IFDEF PS_USESSUPPORT} or (BlockInfo.SubType = tUnitInit) or (BlockInfo.SubType = tUnitFinish) {$endif} then  //nvds
+  begin
+    Debug_WriteLine(BlockInfo);
+    BlockWriteByte(BlockInfo, Cm_R);
+    {$IFDEF PS_USESSUPPORT}
+    if FParser.CurrTokenId = CSTII_End then //nvds
+    begin
+    {$endif}
+      FParser.Next; // skip end
+      if ((BlockInfo.SubType = tMainBegin)
+    {$IFDEF PS_USESSUPPORT} or (BlockInfo.SubType = tUnitInit) or (BlockInfo.SubType = tUnitFinish){$endif}) //nvds
+         and (FParser.CurrTokenId <> CSTI_Period) then
+      begin
+        MakeError('', ecPeriodExpected, '');
+        exit;
+      end;
+      if (BlockInfo.SubType = tProcBegin) and (FParser.CurrTokenId <> CSTI_Semicolon) then
+      begin
+        MakeError('', ecSemicolonExpected, '');
+        exit;
+      end;
+      FParser.Next;
+    {$IFDEF PS_USESSUPPORT}
+    end;   //nvds
+    {$endif}
+  end
+  else if (BlockInfo.SubType = tifOneliner) or (BlockInfo.SubType = TOneLiner) then
+  begin
+    if (FParser.CurrTokenID <> CSTII_Else) and (FParser.CurrTokenID <> CSTII_End) then
+      if FParser.CurrTokenID <> CSTI_Semicolon then
+      begin
+        MakeError('', ecSemicolonExpected, '');
+        exit;
+      end;
+  end;
+
+  ProcessSub := True;
+end;
+procedure TPSPascalCompiler.UseProc(procdecl: TPSParametersDecl);
+var
+  i: Longint;
+begin
+  if procdecl.Result <> nil then
+    procdecl.Result := at2ut(procdecl.Result);
+  for i := 0 to procdecl.ParamCount -1 do
+  begin
+    procdecl.Params[i].aType := at2ut(procdecl.Params[i].aType);
+  end;
+end;
+
+function TPSPascalCompiler.at2ut(p: TPSType): TPSType;
+var
+  i: Longint;
+begin
+  p := GetTypeCopyLink(p);
+  if p = nil then
+  begin
+    Result := nil;
+    exit;
+  end;
+  if not p.Used then
+  begin
+    case p.BaseType of
+      btStaticArray, btArray: TPSArrayType(p).ArrayTypeNo := at2ut(TPSArrayType(p).ArrayTypeNo);
+      btRecord:
+        begin
+          for i := 0 to TPSRecordType(p).RecValCount -1 do
+          begin
+            TPSRecordType(p).RecVal(i).aType := at2ut(TPSRecordType(p).RecVal(i).aType);
+          end;
+        end;
+      btSet: TPSSetType(p).SetType := at2ut(TPSSetType(p).SetType);
+      btProcPtr:
+        begin
+          UseProc(TPSProceduralType(p).ProcDef);
+        end;
+    end;
+    p.Use;
+    p.FFinalTypeNo := FCurrUsedTypeNo;
+    inc(FCurrUsedTypeNo);
+  end;
+  Result := p;
+end;
+
+function TPSPascalCompiler.ProcessLabelForwards(Proc: TPSInternalProcedure): Boolean;
+var
+  i: Longint;
+  s, s2: tbtString;
+begin
+  for i := 0 to Proc.FLabels.Count -1 do
+  begin
+    s := Proc.FLabels[I];
+    if Longint((@s[1])^) = -1 then
+    begin
+      delete(s, 1, 8);
+      MakeError('', ecUnSetLabel, s);
+      Result := False;
+      exit;
+    end;
+  end;
+  for i := Proc.FGotos.Count -1 downto 0 do
+  begin
+    s := Proc.FGotos[I];
+    s2 := Proc.FLabels[Cardinal((@s[5])^)];
+    Cardinal((@Proc.Data[Cardinal((@s[1])^)-3])^) :=  Cardinal((@s2[1])^) - Cardinal((@s[1])^) ;
+  end;
+  Result := True;
+end;
+
+
+type
+  TCompilerState = (csStart, csProgram, csUnit, csUses, csInterface, csInterfaceUses, csImplementation);
+
+function TPSPascalCompiler.Compile(const s: tbtString): Boolean;
+var
+  Position: TCompilerState;
+  i: Longint;
+  {$IFDEF PS_USESSUPPORT}
+  OldFileName: tbtString;
+  OldParser  : TPSPascalParser;
+  OldIsUnit  : Boolean;
+  {$ENDIF}
+
+  procedure Cleanup;
+  var
+    I: Longint;
+    PT: TPSType;
+  begin
+    {$IFDEF PS_USESSUPPORT}
+    if fInCompile>1 then
+    begin
+      dec(fInCompile);
+      exit;
+    end;
+    {$ENDIF}
+
+    if @FOnBeforeCleanup <> nil then
+      FOnBeforeCleanup(Self);        // no reason it actually read the result of this call
+    FGlobalBlock.Free;
+    FGlobalBlock := nil;
+
+    for I := 0 to FRegProcs.Count - 1 do
+      TObject(FRegProcs[I]).Free;
+    FRegProcs.Free;
+    for i := 0 to FConstants.Count -1 do
+    begin
+      TPSConstant(FConstants[I]).Free;
+    end;
+    Fconstants.Free;
+    for I := 0 to FVars.Count - 1 do
+    begin
+      TPSVar(FVars[I]).Free;
+    end;
+    FVars.Free;
+    FVars := nil;
+    for I := 0 to FProcs.Count - 1 do
+      TPSProcedure(FProcs[I]).Free;
+    FProcs.Free;
+    FProcs := nil;
+    for I := 0 to FTypes.Count - 1 do
+    begin
+      PT := FTypes[I];
+      pt.Free;
+    end;
+    FTypes.Free;
+
+{$IFNDEF PS_NOINTERFACES}
+    for i := FInterfaces.Count -1 downto 0 do
+      TPSInterface(FInterfaces[i]).Free;
+    FInterfaces.Free;
+{$ENDIF}
+
+    for i := FClasses.Count -1 downto 0 do
+    begin
+      TPSCompileTimeClass(FClasses[I]).Free;
+    end;
+    FClasses.Free;
+    for i := FAttributeTypes.Count -1 downto 0 do
+    begin
+      TPSAttributeType(FAttributeTypes[i]).Free;
+    end;
+    FAttributeTypes.Free;
+    FAttributeTypes := nil;
+
+    {$IFDEF PS_USESSUPPORT}
+    for I := 0 to FUnitInits.Count - 1 do        //nvds
+    begin                                        //nvds
+      TPSBlockInfo(FUnitInits[I]).free;          //nvds
+    end;                                         //nvds
+    FUnitInits.Free;                             //nvds
+    FUnitInits := nil;                           //
+    for I := 0 to FUnitFinits.Count - 1 do       //nvds
+    begin                                        //nvds
+      TPSBlockInfo(FUnitFinits[I]).free;         //nvds
+    end;                                         //nvds
+    FUnitFinits.Free;                            //
+    FUnitFinits := nil;                          //
+
+    FUses.Free;
+    FUses:=nil;
+    fInCompile:=0;
+    {$ENDIF}
+  end;
+
+  function MakeOutput: Boolean;
+
+    procedure WriteByte(b: Byte);
+    begin
+      FOutput := FOutput + tbtChar(b);
+    end;
+
+    procedure WriteData(const Data; Len: Longint);
+    var
+      l: Longint;
+    begin
+      if Len < 0 then Len := 0;
+      l := Length(FOutput);
+      SetLength(FOutput, l + Len);
+      Move(Data, FOutput[l + 1], Len);
+    end;
+
+    procedure WriteLong(l: Cardinal);
+    begin
+      WriteData(l, 4);
+    end;
+
+    procedure WriteVariant(p: PIfRVariant);
+    begin
+      WriteLong(p^.FType.FinalTypeNo);
+      case p.FType.BaseType of
+      btType: WriteLong(p^.ttype.FinalTypeNo);
+      {$IFNDEF PS_NOWIDESTRING}
+      btWideString:
+        begin
+          WriteLong(Length(tbtWideString(p^.twidestring)));
+          WriteData(tbtwidestring(p^.twidestring)[1], 2*Length(tbtWideString(p^.twidestring)));
+        end;
+      btWideChar: WriteData(p^.twidechar, 2);
+      {$ENDIF}
+      btSingle: WriteData(p^.tsingle, sizeof(tbtSingle));
+      btDouble: WriteData(p^.tsingle, sizeof(tbtDouble));
+      btExtended: WriteData(p^.tsingle, sizeof(tbtExtended));
+      btCurrency: WriteData(p^.tsingle, sizeof(tbtCurrency));
+      btChar: WriteData(p^.tchar, 1);
+      btSet:
+        begin
+          WriteData(tbtString(p^.tstring)[1], Length(tbtString(p^.tstring)));
+        end;
+      btString:
+        begin
+          WriteLong(Length(tbtString(p^.tstring)));
+          WriteData(tbtString(p^.tstring)[1], Length(tbtString(p^.tstring)));
+        end;
+      btenum:
+        begin
+          if TPSEnumType(p^.FType).HighValue <=256 then
+            WriteData( p^.tu32, 1)
+          else if TPSEnumType(p^.FType).HighValue <=65536 then
+            WriteData(p^.tu32, 2)
+          else
+            WriteData(p^.tu32, 4);
+        end;
+      bts8,btu8: WriteData(p^.tu8, 1);
+      bts16,btu16: WriteData(p^.tu16, 2);
+      bts32,btu32: WriteData(p^.tu32, 4);
+      {$IFNDEF PS_NOINT64}
+      bts64: WriteData(p^.ts64, 8);
+      {$ENDIF}
+      btProcPtr: WriteData(p^.tu32, 4);
+      {$IFDEF DEBUG}
+      else
+          asm int 3; end;
+      {$ENDIF}
+      end;
+    end;
+
+    procedure WriteAttributes(attr: TPSAttributes);
+    var
+      i, j: Longint;
+    begin
+      WriteLong(attr.Count);
+      for i := 0 to Attr.Count -1 do
+      begin
+        j := Length(attr[i].FAttribType.Name);
+        WriteLong(j);
+        WriteData(Attr[i].FAttribType.Name[1], j);
+        WriteLong(Attr[i].Count);
+        for j := 0 to Attr[i].Count -1 do
+        begin
+          WriteVariant(Attr[i][j]);
+        end;
+      end;
+    end;
+
+    procedure WriteTypes;
+    var
+      l, n: Longint;
+      bt: TPSBaseType;
+      x: TPSType;
+      s: tbtString;
+      FExportName: tbtString;
+      Items: TPSList;
+      procedure WriteTypeNo(TypeNo: Cardinal);
+      begin
+        WriteData(TypeNo, 4);
+      end;
+    begin
+      Items := TPSList.Create;
+      try
+        for l := 0 to FCurrUsedTypeNo -1 do
+          Items.Add(nil);
+        for l := 0 to FTypes.Count -1 do
+        begin
+          x := FTypes[l];
+          if x.Used then
+            Items[x.FinalTypeNo] := x;
+        end;
+        for l := 0 to Items.Count - 1 do
+        begin
+          x := Items[l];
+          if x.FExportName then
+            FExportName := x.Name
+          else
+            FExportName := '';
+          if (x.BaseType = btExtClass) and (x is TPSUndefinedClassType) then
+          begin
+            x := GetTypeCopyLink(TPSUndefinedClassType(x).ExtClass.SelfType);
+          end;
+          bt := x.BaseType;
+          if (x.BaseType = btType) or (x.BaseType = btNotificationVariant) then
+          begin
+            bt := btU32;
+          end else
+          if (x.BaseType = btEnum) then begin
+            if TPSEnumType(x).HighValue <= 256 then
+              bt := btU8
+            else if TPSEnumType(x).HighValue <= 65536 then
+              bt := btU16
+            else
+              bt := btU32;
+          end;
+          if FExportName <> '' then
+          begin
+            WriteByte(bt + 128);
+          end
+          else
+            WriteByte(bt);
+{$IFNDEF PS_NOINTERFACES} if x.BaseType = btInterface then
+          begin
+            WriteData(TPSInterfaceType(x).Intf.Guid, Sizeof(TGuid));
+          end else {$ENDIF} if x.BaseType = btClass then
+          begin
+            WriteLong(Length(TPSClassType(X).Cl.FClassName));
+            WriteData(TPSClassType(X).Cl.FClassName[1], Length(TPSClassType(X).Cl.FClassName));
+          end else
+          if (x.BaseType = btProcPtr) then
+          begin
+            s := DeclToBits(TPSProceduralType(x).ProcDef);
+            WriteLong(Length(s));
+            WriteData(s[1], Length(s));
+          end else
+          if (x.BaseType = btSet) then
+          begin
+            WriteLong(TPSSetType(x).BitSize);
+          end else
+          if (x.BaseType = btArray) or (x.basetype = btStaticArray) then
+          begin
+            WriteLong(TPSArrayType(x).ArrayTypeNo.FinalTypeNo);
+            if (x.baseType = btstaticarray) then begin
+              WriteLong(TPSStaticArrayType(x).Length);
+              WriteLong(TPSStaticArrayType(x).StartOffset);      //<-additional StartOffset
+            end;
+          end else if x.BaseType = btRecord then
+          begin
+            n := TPSRecordType(x).RecValCount;
+            WriteData( n, 4);
+            for n := 0 to TPSRecordType(x).RecValCount - 1 do
+              WriteTypeNo(TPSRecordType(x).RecVal(n).FType.FinalTypeNo);
+          end;
+          if FExportName <> '' then
+          begin
+            WriteLong(Length(FExportName));
+            WriteData(FExportName[1], length(FExportName));
+          end;
+          WriteAttributes(x.Attributes);
+        end;
+      finally
+        Items.Free;
+      end;
+    end;
+
+    procedure WriteVars;
+    var
+      l,j : Longint;
+      x: TPSVar;
+    begin
+      for l := 0 to FVars.Count - 1 do
+      begin
+        x := FVars[l];
+        if x.SaveAsPointer then
+        begin
+          for j := FTypes.count -1 downto 0 do
+          begin
+            if TPSType(FTypes[j]).BaseType = btPointer then
+            begin
+              WriteLong(TPSType(FTypes[j]).FinalTypeNo);
+              break;
+            end;
+          end;
+        end else
+          WriteLong(x.FType.FinalTypeNo);
+        if x.exportname <> '' then
+        begin
+          WriteByte( 1);
+          WriteLong(Length(X.ExportName));
+          WriteData( X.ExportName[1], length(X.ExportName));
+        end else
+          WriteByte( 0);
+      end;
+    end;
+
+    procedure WriteProcs;
+    var
+      l: Longint;
+      xp: TPSProcedure;
+      xo: TPSInternalProcedure;
+      xe: TPSExternalProcedure;
+      s: tbtString;
+      att: Byte;
+    begin
+      for l := 0 to FProcs.Count - 1 do
+      begin
+        xp := FProcs[l];
+        if xp.Attributes.Count <> 0 then att := 4 else att := 0;
+        if xp.ClassType = TPSInternalProcedure then
+        begin
+          xo := TPSInternalProcedure(xp);
+          xo.OutputDeclPosition := Length(FOutput);
+          WriteByte(att or 2); // exported
+          WriteLong(0); // offset is unknown at this time
+          WriteLong(0); // length is also unknown at this time
+          WriteLong(Length(xo.Name));
+          WriteData( xo.Name[1], length(xo.Name));
+          s := MakeExportDecl(xo.Decl);
+          WriteLong(Length(s));
+          WriteData( s[1], length(S));
+        end
+        else
+        begin
+          xe := TPSExternalProcedure(xp);
+          if xe.RegProc.ImportDecl <> '' then
+          begin
+            WriteByte( att or 3); // imported
+            if xe.RegProc.FExportName then
+            begin
+              WriteByte(Length(xe.RegProc.Name));
+              WriteData(xe.RegProc.Name[1], Length(xe.RegProc.Name) and $FF);
+            end else begin
+              WriteByte(0);
+            end;
+            WriteLong(Length(xe.RegProc.ImportDecl));
+            WriteData(xe.RegProc.ImportDecl[1], Length(xe.RegProc.ImportDecl));
+          end else begin
+            WriteByte(att or 1); // imported
+            WriteByte(Length(xe.RegProc.Name));
+            WriteData(xe.RegProc.Name[1], Length(xe.RegProc.Name) and $FF);
+          end;
+        end;
+        if xp.Attributes.Count <> 0 then
+          WriteAttributes(xp.Attributes);
+      end;
+    end;
+
+    procedure WriteProcs2;
+    var
+      l: Longint;
+      L2: Cardinal;
+      x: TPSProcedure;
+    begin
+      for l := 0 to FProcs.Count - 1 do
+      begin
+        x := FProcs[l];
+        if x.ClassType = TPSInternalProcedure then
+        begin
+          if TPSInternalProcedure(x).Data = '' then
+            TPSInternalProcedure(x).Data := Chr(Cm_R);
+          L2 := Length(FOutput);
+          Move(L2, FOutput[TPSInternalProcedure(x).OutputDeclPosition + 2], 4);
+          // write position
+          WriteData(TPSInternalProcedure(x).Data[1], Length(TPSInternalProcedure(x).Data));
+          L2 := Cardinal(Length(FOutput)) - L2;
+          Move(L2, FOutput[TPSInternalProcedure(x).OutputDeclPosition + 6], 4); // write length
+        end;
+      end;
+    end;
+
+
+
+    {$IFDEF PS_USESSUPPORT}
+    function FindMainProc: Cardinal;
+    var
+      l: Longint;
+      Proc : TPSInternalProcedure;
+      ProcData : tbtString;
+      Calls : Integer;
+
+      procedure WriteProc(const aData: Longint);
+      var
+        l: Longint;
+      begin
+        ProcData := ProcData + Chr(cm_c);
+        l := Length(ProcData);
+        SetLength(ProcData, l + 4);
+        Move(aData, ProcData[l + 1], 4);
+        inc(Calls);
+      end;
+    begin
+      ProcData := ''; Calls := 1;
+      for l := 0 to FUnitInits.Count-1 do
+        if (FUnitInits[l] <> nil) and
+           (TPSBlockInfo(FUnitInits[l]).Proc.Data<>'') then
+          WriteProc(TPSBlockInfo(FUnitInits[l]).FProcNo);
+
+      WriteProc(FGlobalBlock.FProcNo);
+
+      for l := FUnitFinits.Count-1 downto 0 do
+        if (FUnitFinits[l] <> nil) and
+           (TPSBlockInfo(FUnitFinits[l]).Proc.Data<>'') then
+          WriteProc(TPSBlockInfo(FUnitFinits[l]).FProcNo);
+
+      if Calls = 1 then begin
+        Result := FGlobalBlock.FProcNo;
+      end else
+      begin
+        Proc := NewProc('Master proc', '!MASTERPROC');
+        Result := FindProc('!MASTERPROC');
+        Proc.data := Procdata + Chr(cm_R);
+      end;
+    end;
+    {$ELSE}
+    function FindMainProc: Cardinal;
+    var
+      l: Longint;
+    begin
+      for l := 0 to FProcs.Count - 1 do
+      begin
+        if (TPSProcedure(FProcs[l]).ClassType = TPSInternalProcedure) and
+          (TPSInternalProcedure(FProcs[l]).Name = PSMainProcName) then
+        begin
+          Result := l;
+          exit;
+        end;
+      end;
+      Result := InvalidVal;
+    end;
+    {$ENDIF}
+
+    procedure CreateDebugData;
+    var
+      I: Longint;
+      p: TPSProcedure;
+      pv: TPSVar;
+      s: tbtString;
+    begin
+      s := #0;
+      for I := 0 to FProcs.Count - 1 do
+      begin
+        p := FProcs[I];
+        if p.ClassType = TPSInternalProcedure then
+        begin
+          if TPSInternalProcedure(p).Name = PSMainProcName then
+            s := s + #1
+          else
+            s := s + TPSInternalProcedure(p).OriginalName + #1;
+        end
+        else
+        begin
+          s := s+ TPSExternalProcedure(p).RegProc.OrgName + #1;
+        end;
+      end;
+      s := s + #0#1;
+      for I := 0 to FVars.Count - 1 do
+      begin
+        pv := FVars[I];
+        s := s + pv.OrgName + #1;
+      end;
+      s := s + #0;
+      WriteDebugData(s);
+    end;
+
+  var                       //nvds
+    MainProc : Cardinal;    //nvds
+
+  begin
+    if @FOnBeforeOutput <> nil then
+    begin
+      if not FOnBeforeOutput(Self) then
+      begin
+        Result := false;
+        exit;
+      end;
+    end;
+    MainProc := FindMainProc; //NvdS (need it here becose FindMainProc can create a New proc.
+    CreateDebugData;
+    WriteLong(PSValidHeader);
+    WriteLong(PSCurrentBuildNo);
+    WriteLong(FCurrUsedTypeNo);
+    WriteLong(FProcs.Count);
+    WriteLong(FVars.Count);
+    WriteLong(MainProc);  //nvds
+    WriteLong(0);
+    WriteTypes;
+    WriteProcs;
+    WriteVars;
+    WriteProcs2;
+
+    Result := true;
+  end;
+
+  function CheckExports: Boolean;
+  var
+    i: Longint;
+    p: TPSProcedure;
+  begin
+    if @FOnExportCheck = nil then
+    begin
+      result := true;
+      exit;
+    end;
+    for i := 0 to FProcs.Count -1 do
+    begin
+      p := FProcs[I];
+      if p.ClassType = TPSInternalProcedure then
+      begin
+        if not FOnExportCheck(Self, TPSInternalProcedure(p), MakeDecl(TPSInternalProcedure(p).Decl)) then
+        begin
+          Result := false;
+          exit;
+        end;
+      end;
+    end;
+    Result := True;
+  end;
+  function DoConstBlock: Boolean;
+  var
+    COrgName: tbtString;
+    CTemp, CValue: PIFRVariant;
+    Cp: TPSConstant;
+    TokenPos, TokenRow, TokenCol: Integer;
+  begin
+    FParser.Next;
+    repeat
+      if FParser.CurrTokenID <> CSTI_Identifier then
+      begin
+        MakeError('', ecIdentifierExpected, '');
+        Result := False;
+        Exit;
+      end;
+      TokenPos := FParser.CurrTokenPos;
+      TokenRow := FParser.Row;
+      TokenCol := FParser.Col;
+      COrgName := FParser.OriginalToken;
+      if IsDuplicate(FastUpperCase(COrgName), [dcVars, dcProcs, dcConsts]) then
+      begin
+        MakeError('', ecDuplicateIdentifier, COrgName);
+        Result := False;
+        exit;
+      end;
+      FParser.Next;
+      if FParser.CurrTokenID <> CSTI_Equal then
+      begin
+        MakeError('', ecIsExpected, '');
+        Result := False;
+        Exit;
+      end;
+      FParser.Next;
+      CValue := ReadConstant(FParser, CSTI_SemiColon);
+      if CValue = nil then
+      begin
+        Result := False;
+        Exit;
+      end;
+      if FParser.CurrTokenID <> CSTI_Semicolon then
+      begin
+        MakeError('', ecSemicolonExpected, '');
+        Result := False;
+        exit;
+      end;
+      cp := TPSConstant.Create;
+      cp.Orgname := COrgName;
+      cp.Name := FastUpperCase(COrgName);
+      {$IFDEF PS_USESSUPPORT}
+      cp.DeclareUnit:=fModule;
+      {$ENDIF}
+      cp.DeclarePos := TokenPos;
+      cp.DeclareRow := TokenRow;
+      cp.DeclareCol := TokenCol;
+      New(CTemp);
+      InitializeVariant(CTemp, CValue.FType);
+      CopyVariantContents(cvalue, CTemp);
+      cp.Value := CTemp;
+      FConstants.Add(cp);
+      DisposeVariant(CValue);
+      FParser.Next;
+    until FParser.CurrTokenId <> CSTI_Identifier;
+    Result := True;
+  end;
+
+  function ProcessUses: Boolean;
+  var
+    {$IFNDEF PS_USESSUPPORT}
+    FUses: TIfStringList;
+    {$ENDIF}
+    I: Longint;
+    s: tbtString;
+    {$IFDEF PS_USESSUPPORT}
+    Parse: Boolean;
+    ParseUnit: tbtString;
+    ParserPos: TPSPascalParser;
+    {$ENDIF}
+  begin
+    FParser.Next;
+    {$IFNDEF PS_USESSUPPORT}
+    FUses := TIfStringList.Create;
+    FUses.Add('SYSTEM');
+    {$ENDIF}
+    repeat
+      if FParser.CurrTokenID <> CSTI_Identifier then
+      begin
+        MakeError('', ecIdentifierExpected, '');
+        {$IFNDEF PS_USESSUPPORT}
+        FUses.Free;
+        {$ENDIF}
+        Result := False;
+        exit;
+      end;
+      s := FParser.GetToken;
+      {$IFDEF PS_USESSUPPORT}
+      Parse:=true;
+      {$ENDIF}
+      for i := 0 to FUses.Count -1 do
+      begin
+        if FUses[I] = s then
+        begin
+          {$IFNDEF PS_USESSUPPORT}
+          MakeError('', ecDuplicateIdentifier, s);
+          FUses.Free;
+          Result := False;
+          exit;
+          {$ELSE}
+          Parse:=false;
+          {$ENDIF}
+        end;
+      end;
+      {$IFDEF PS_USESSUPPORT}
+      if Parse then
+      begin
+      {$ENDIF}
+        FUses.Add(s);
+        if @FOnUses <> nil then
+        begin
+          try
+            {$IFDEF PS_USESSUPPORT}
+            OldFileName:=fModule;
+            fModule:=FParser.OriginalToken;
+            ParseUnit:=FParser.OriginalToken;
+            ParserPos:=FParser;
+            {$ENDIF}
+            if not OnUses(Self, FParser.GetToken) then
+            begin
+              {$IFNDEF PS_USESSUPPORT}
+              FUses.Free;
+              {$ELSE}
+              FParser:=ParserPos;
+              fModule:=OldFileName;
+              MakeError(OldFileName, ecUnitNotFoundOrContainsErrors, ParseUnit);
+              {$ENDIF}
+              Result := False;
+              exit;
+            end;
+            {$IFDEF PS_USESSUPPORT}
+            fModule:=OldFileName;
+            {$ENDIF}
+          except
+            on e: Exception do
+            begin
+              MakeError('', ecCustomError, tbtstring(e.Message));
+              {$IFNDEF PS_USESSUPPORT}
+              FUses.Free;
+              {$ENDIF}
+              Result := False;
+              exit;
+            end;
+          end;
+        end;
+      {$IFDEF PS_USESSUPPORT}
+      end;
+      {$ENDIF}
+      FParser.Next;
+      if FParser.CurrTokenID = CSTI_Semicolon then break
+      else if FParser.CurrTokenId <> CSTI_Comma then
+      begin
+        MakeError('', ecSemicolonExpected, '');
+        Result := False;
+        {$IFNDEF PS_USESSUPPORT}
+        FUses.Free;
+        {$ENDIF}
+        exit;
+      end;
+      FParser.Next;
+    until False;
+    {$IFNDEF PS_USESSUPPORT}
+    FUses.Free;
+    {$ENDIF}
+    FParser.next;
+    Result := True;
+  end;
+
+var
+  Proc: TPSProcedure;
+  {$IFDEF PS_USESSUPPORT}
+  Block : TPSBlockInfo; //nvds
+  {$ENDIF}
+begin
+  Result := False;
+  FWithCount := -1;
+
+  {$IFDEF PS_USESSUPPORT}
+  if fInCompile=0 then
+  begin
+  {$ENDIF}
+    FUnitName := '';
+    FCurrUsedTypeNo := 0;
+    FIsUnit := False;
+    Clear;
+    FParserHadError := False;
+    FParser.SetText(s);
+    FAttributeTypes := TPSList.Create;
+    FProcs := TPSList.Create;
+    FConstants := TPSList.Create;
+    FVars := TPSList.Create;
+    FTypes := TPSList.Create;
+    FRegProcs := TPSList.Create;
+    FClasses := TPSList.Create;
+
+    {$IFDEF PS_USESSUPPORT}
+    FUnitInits := TPSList.Create; //nvds
+    FUnitFinits:= TPSList.Create; //nvds
+
+    FUses:=TIFStringList.Create;
+    {$ENDIF}
+  {$IFNDEF PS_NOINTERFACES}  FInterfaces := TPSList.Create;{$ENDIF}
+
+    FGlobalBlock := TPSBlockInfo.Create(nil);
+    FGlobalBlock.SubType := tMainBegin;
+
+    FGlobalBlock.Proc := NewProc(PSMainProcNameOrg, PSMainProcName);
+    FGlobalBlock.ProcNo := FindProc(PSMainProcName);
+
+    {$IFDEF PS_USESSUPPORT}
+    OldFileName:=fModule;
+    fModule:='System';
+    FUses.Add('SYSTEM');
+    {$ENDIF}
+    {$IFNDEF PS_NOSTANDARDTYPES}
+    DefineStandardTypes;
+    DefineStandardProcedures;
+	{$ENDIF}
+    if @FOnUses <> nil then
+    begin
+      try
+        if not OnUses(Self, 'SYSTEM') then
+        begin
+          Cleanup;
+          exit;
+        end;
+      except
+        on e: Exception do
+        begin
+          MakeError('', ecCustomError, tbtstring(e.Message));
+          Cleanup;
+          exit;
+        end;
+      end;
+    end;
+  {$IFDEF PS_USESSUPPORT}
+    fModule:=OldFileName;
+    OldParser:=nil;
+    OldIsUnit:=false; // defaults
+  end
+  else
+  begin
+    OldParser:=FParser;
+    OldIsUnit:=FIsUnit;
+    FParser:=TPSPascalParser.Create;
+    FParser.SetText(s);
+  end;
+
+  inc(fInCompile);
+  {$ENDIF}
+
+  Position := csStart;
+  repeat
+    if FParser.CurrTokenId = CSTI_EOF then
+    begin
+      if FParserHadError then
+      begin
+        Cleanup;
+        exit;
+      end;
+      if FAllowNoEnd then
+        Break
+      else
+      begin
+        MakeError('', ecUnexpectedEndOfFile, '');
+        Cleanup;
+        exit;
+      end;
+    end;
+    if (FParser.CurrTokenId = CSTII_Program) and (Position = csStart) then
+    begin
+      {$IFDEF PS_USESSUPPORT}
+      if fInCompile>1 then
+      begin
+        MakeError('', ecNotAllowed, 'program');
+        Cleanup;
+        exit;
+      end;
+      {$ENDIF}
+      Position := csProgram;
+      FParser.Next;
+      if FParser.CurrTokenId <> CSTI_Identifier then
+      begin
+        MakeError('', ecIdentifierExpected, '');
+        Cleanup;
+        exit;
+      end;
+      FParser.Next;
+      if FParser.CurrTokenId <> CSTI_Semicolon then
+      begin
+        MakeError('', ecSemicolonExpected, '');
+        Cleanup;
+        exit;
+      end;
+      FParser.Next;
+    end else
+    if (Fparser.CurrTokenID = CSTII_Implementation) and ((Position = csinterface) or (position = csInterfaceUses)) then
+    begin
+      Position := csImplementation;
+      FParser.Next;
+    end else
+    if (Fparser.CurrTokenID = CSTII_Interface) and (Position = csUnit) then
+    begin
+      Position := csInterface;
+      FParser.Next;
+    end else
+    if (FParser.CurrTokenId = CSTII_Unit) and (Position = csStart) and (FAllowUnit) then
+    begin
+      Position := csUnit;
+      FIsUnit := True;
+      FParser.Next;
+      if FParser.CurrTokenId <> CSTI_Identifier then
+      begin
+        MakeError('', ecIdentifierExpected, '');
+        Cleanup;
+        exit;
+      end;
+      if fInCompile = 1 then
+        FUnitName := FParser.OriginalToken;
+      FParser.Next;
+      if FParser.CurrTokenId <> CSTI_Semicolon then
+      begin
+        MakeError('', ecSemicolonExpected, '');
+        Cleanup;
+        exit;
+      end;
+      FParser.Next;
+    end
+    else if (FParser.CurrTokenID = CSTII_Uses) and ((Position < csuses) or (Position = csInterface)) then
+    begin
+      if (Position = csInterface) or (Position =csInterfaceUses)
+        then Position := csInterfaceUses
+        else Position := csUses;
+      if not ProcessUses then
+      begin
+         Cleanup;
+        exit;
+      end;
+    end else if (FParser.CurrTokenId = CSTII_Procedure) or
+      (FParser.CurrTokenId = CSTII_Function) or (FParser.CurrTokenID = CSTI_OpenBlock) then
+    begin
+      if (Position = csInterface) or (position = csInterfaceUses) then
+      begin
+        if not ProcessFunction(True, nil) then
+        begin
+          Cleanup;
+          exit;
+        end;
+      end else begin
+        Position := csUses;
+        if not ProcessFunction(False, nil) then
+        begin
+          Cleanup;
+          exit;
+        end;
+      end;
+    end
+    else if (FParser.CurrTokenId = CSTII_Label) then
+    begin
+      if (Position = csInterface) or (Position =csInterfaceUses)
+        then Position := csInterfaceUses
+        else Position := csUses;
+      if not ProcessLabel(FGlobalBlock.Proc) then
+      begin
+        Cleanup;
+        exit;
+      end;
+    end
+    else if (FParser.CurrTokenId = CSTII_Var) then
+    begin
+      if (Position = csInterface) or (Position =csInterfaceUses)
+        then Position := csInterfaceUses
+        else Position := csUses;
+      if not DoVarBlock(nil) then
+      begin
+        Cleanup;
+        exit;
+      end;
+    end
+    else if (FParser.CurrTokenId = CSTII_Const) then
+    begin
+      if (Position = csInterface) or (Position =csInterfaceUses)
+        then Position := csInterfaceUses
+        else Position := csUses;
+      if not DoConstBlock then
+      begin
+        Cleanup;
+        exit;
+      end;
+    end
+    else if (FParser.CurrTokenId = CSTII_Type) then
+    begin
+      if (Position = csInterface) or (Position =csInterfaceUses)
+        then Position := csInterfaceUses
+        else Position := csUses;
+      if not DoTypeBlock(FParser) then
+      begin
+        Cleanup;
+        exit;
+      end;
+    end
+    else if (FParser.CurrTokenId = CSTII_Begin)
+      {$IFDEF PS_USESSUPPORT}
+             or ((FParser.CurrTokenID = CSTII_initialization) and FIsUnit) {$ENDIF}  then //nvds
+    begin
+      {$IFDEF PS_USESSUPPORT}
+      if FIsUnit then
+      begin
+        Block := TPSBlockInfo.Create(nil); //nvds
+        Block.SubType := tUnitInit;        //nvds
+        Block.Proc := NewProc(PSMainProcNameOrg+'_'+fModule, PSMainProcName+'_'+fModule); //nvds
+        Block.ProcNo := FindProc(PSMainProcName+'_'+fModule);  //nvds
+        Block.Proc.DeclareUnit:= fModule;
+        Block.Proc.DeclarePos := FParser.CurrTokenPos;
+        Block.Proc.DeclareRow := FParser.Row;
+        Block.Proc.DeclareCol := FParser.Col;
+        Block.Proc.Use;
+        FUnitInits.Add(Block);
+        if ProcessSub(Block) then
+        begin
+          if (Fparser.CurrTokenId = CSTI_EOF) THEN break;
+        end
+        else
+        begin
+          Cleanup;
+          exit;
+        end;
+      end
+      else
+      begin
+        FGlobalBlock.Proc.DeclareUnit:= fModule;
+      {$ENDIF}
+        FGlobalBlock.Proc.DeclarePos := FParser.CurrTokenPos;
+        FGlobalBlock.Proc.DeclareRow := FParser.Row;
+        FGlobalBlock.Proc.DeclareCol := FParser.Col;
+        if ProcessSub(FGlobalBlock) then
+        begin
+          break;
+        end
+        else
+        begin
+          Cleanup;
+          exit;
+        end;
+      {$IFDEF PS_USESSUPPORT}
+      end;
+      {$ENDIF}
+    end
+    {$IFDEF PS_USESSUPPORT}
+    else if ((FParser.CurrTokenID = CSTII_finalization) and FIsUnit) then //NvdS
+    begin
+      Block := TPSBlockInfo.Create(nil);
+      Block.SubType := tUnitFinish;
+
+      Block.Proc := NewProc('Finish proc_'+fModule, '!FINISH_'+fModule);
+      Block.ProcNo := FindProc('!FINISH_'+fModule);
+      Block.Proc.DeclareUnit:= fModule;
+
+      Block.Proc.DeclarePos := FParser.CurrTokenPos;
+      Block.Proc.DeclareRow := FParser.Row;
+      Block.Proc.DeclareCol := FParser.Col;
+      Block.Proc.use;
+      FUnitFinits.Add(Block);
+      if ProcessSub(Block) then
+      begin
+        break;
+      end else begin
+        Cleanup;
+        Result :=  False; //Cleanup;
+        exit;
+      end;
+    end
+    {$endif}
+    else if (Fparser.CurrTokenId = CSTII_End) and (FAllowNoBegin or FIsUnit) then
+    begin
+      FParser.Next;
+      if FParser.CurrTokenID <> CSTI_Period then
+      begin
+        MakeError('', ecPeriodExpected, '');
+        Cleanup;
+        exit;
+      end;
+      break;
+    end else
+    begin
+      MakeError('', ecBeginExpected, '');
+      Cleanup;
+      exit;
+    end;
+  until False;
+
+  {$IFDEF PS_USESSUPPORT}
+  dec(fInCompile);
+  if fInCompile=0 then
+  begin
+  {$ENDIF}
+    if not ProcessLabelForwards(FGlobalBlock.Proc) then
+    begin
+      Cleanup;
+      exit;
+    end;
+    // NVDS: Do we need to check here also do a ProcessLabelForwards() for each Initialisation/finalization block?
+
+    for i := 0 to FProcs.Count -1 do
+    begin
+      Proc := FProcs[I];
+      if (Proc.ClassType = TPSInternalProcedure) and (TPSInternalProcedure(Proc).Forwarded) then
+      begin
+        with MakeError('', ecUnsatisfiedForward, TPSInternalProcedure(Proc).Name) do
+        begin
+          FPosition := TPSInternalProcedure(Proc).DeclarePos;
+          FRow := TPSInternalProcedure(Proc).DeclareRow;
+          FCol := TPSInternalProcedure(Proc).DeclareCol;
+        end;
+        Cleanup;
+        Exit;
+      end;
+    end;
+    if not CheckExports then
+    begin
+      Cleanup;
+      exit;
+    end;
+    for i := 0 to FVars.Count -1 do
+    begin
+      if not TPSVar(FVars[I]).Used then
+      begin
+        with MakeHint({$IFDEF PS_USESSUPPORT}TPSVar(FVars[I]).DeclareUnit{$ELSE}''{$ENDIF}, ehVariableNotUsed, TPSVar(FVars[I]).Name) do
+        begin
+          FPosition := TPSVar(FVars[I]).DeclarePos;
+          FRow := TPSVar(FVars[I]).DeclareRow;
+          FCol := TPSVar(FVars[I]).DeclareCol;
+        end;
+      end;
+    end;
+
+    Result := MakeOutput;
+    Cleanup;
+  {$IFDEF PS_USESSUPPORT}
+  end
+  else
+  begin
+    fParser.Free;
+    fParser:=OldParser;
+    fIsUnit:=OldIsUnit;
+    result:=true;
+  end;
+  {$ENDIF}
+end;
+
+constructor TPSPascalCompiler.Create;
+begin
+  inherited Create;
+  FParser := TPSPascalParser.Create;
+  FParser.OnParserError := ParserError;
+  FAutoFreeList := TPSList.Create;
+  FOutput := '';
+  {$IFDEF PS_USESSUPPORT}
+  FAllowUnit := true;
+  {$ENDIF}
+  FMessages := TPSList.Create;
+end;
+
+destructor TPSPascalCompiler.Destroy;
+begin
+  Clear;
+  FAutoFreeList.Free;
+
+  FMessages.Free;
+  FParser.Free;
+  inherited Destroy;
+end;
+
+function TPSPascalCompiler.GetOutput(var s: tbtString): Boolean;
+begin
+  if Length(FOutput) <> 0 then
+  begin
+    s := FOutput;
+    Result := True;
+  end
+  else
+    Result := False;
+end;
+
+function TPSPascalCompiler.GetMsg(l: Longint): TPSPascalCompilerMessage;
+begin
+  Result := FMessages[l];
+end;
+
+function TPSPascalCompiler.GetMsgCount: Longint;
+begin
+  Result := FMessages.Count;
+end;
+
+procedure TPSPascalCompiler.DefineStandardTypes;
+var
+  i: Longint;
+begin
+  AddType('Byte', btU8);
+  FDefaultBoolType := AddTypeS('Boolean', '(False, True)');
+  FDefaultBoolType.ExportName := True;
+  with TPSEnumType(AddType('LongBool', btEnum)) do
+  begin
+    HighValue := 2147483647; // make sure it's gonna be a 4 byte var
+  end;
+  AddType('Char', btChar);
+  {$IFNDEF PS_NOWIDESTRING}
+  AddType('WideChar', btWideChar);
+  AddType('WideString', btWideString);
+  {$ENDIF}
+  AddType('AnsiString', btString);
+  {$IFDEF DELPHI2009UP}
+  AddType('String', btWideString);
+  ADdType('NativeString', btWideString);
+  {$ELSE}
+  AddType('String', btString);
+  AddType('NativeString', btString);
+  {$ENDIF}
+  FAnyString := AddType('AnyString', btString);
+  AddType('ShortInt', btS8);
+  AddType('Word', btU16);
+  AddType('SmallInt', btS16);
+  AddType('LongInt', btS32);
+  at2ut(AddType('___Pointer', btPointer));
+  AddType('LongWord', btU32);
+  AddTypeCopyN('Integer', 'LONGINT');
+  AddTypeCopyN('Cardinal', 'LONGWORD');
+  AddType('tbtString', btString);
+  {$IFNDEF PS_NOINT64}
+  AddType('Int64', btS64);
+  {$ENDIF}
+  AddType('Single', btSingle);
+  AddType('Double', btDouble);
+  AddType('Extended', btExtended);
+  AddType('Currency', btCurrency);
+  AddType('PChar', btPChar);
+  AddType('Variant', btVariant);
+  AddType('!NotificationVariant', btNotificationVariant);
+  for i := FTypes.Count -1 downto 0 do AT2UT(FTypes[i]);
+  TPSArrayType(AddType('TVariantArray', btArray)).ArrayTypeNo := FindType('VARIANT');
+
+  with AddFunction('function Assigned(I: Longint): Boolean;') do
+  begin
+    Name := '!ASSIGNED';
+  end;
+
+  with AddFunction('procedure _T(Name: tbtString; v: Variant);') do
+  begin
+    Name := '!NOTIFICATIONVARIANTSET';
+  end;
+  with AddFunction('function _T(Name: tbtString): Variant;') do
+  begin
+    Name := '!NOTIFICATIONVARIANTGET';
+  end;
+end;
+
+
+function TPSPascalCompiler.FindType(const Name: tbtString): TPSType;
+var
+  i, n: Longint;
+  RName: tbtString;
+begin
+  if FProcs = nil then begin Result := nil; exit;end;
+  RName := Fastuppercase(Name);
+  n := makehash(rname);
+  for i := FTypes.Count - 1 downto 0 do
+  begin
+    Result := FTypes.Data[I];
+    if (Result.NameHash = n) and (Result.name = rname) then
+    begin
+      Result := GetTypeCopyLink(Result);
+      exit;
+    end;
+  end;
+  result := nil;
+end;
+
+function TPSPascalCompiler.AddConstant(const Name: tbtString; FType: TPSType): TPSConstant;
+var
+  pc: TPSConstant;
+  val: PIfRVariant;
+begin
+  if FProcs = nil then raise EPSCompilerException.Create(RPS_OnUseEventOnly);
+
+  FType := GetTypeCopyLink(FType);
+  if FType = nil then
+    Raise EPSCompilerException.CreateFmt(RPS_UnableToRegisterConst, [name]);
+  pc := TPSConstant.Create;
+  pc.OrgName := name;
+  pc.Name := FastUppercase(name);
+  pc.DeclarePos:=InvalidVal;
+  {$IFDEF PS_USESSUPPORT}
+  pc.DeclareUnit:=fModule;
+  {$ENDIF}
+  New(Val);
+  InitializeVariant(Val, FType);
+  pc.Value := Val;
+  FConstants.Add(pc);
+  result := pc;
+end;
+
+function TPSPascalCompiler.ReadAttributes(Dest: TPSAttributes): Boolean;
+var
+  Att: TPSAttributeType;
+  at: TPSAttribute;
+  varp: PIfRVariant;
+  h, i: Longint;
+  s: tbtString;
+begin
+  if FParser.CurrTokenID <> CSTI_OpenBlock then begin Result := true; exit; end;
+  FParser.Next;
+  if FParser.CurrTokenID <> CSTI_Identifier then
+  begin
+    MakeError('', ecIdentifierExpected, '');
+    Result := False;
+    exit;
+  end;
+  s := FParser.GetToken;
+  h := MakeHash(s);
+  att := nil;
+  for i := FAttributeTypes.count -1 downto 0 do
+  begin
+    att := FAttributeTypes[i];
+    if (att.FNameHash = h) and (att.FName = s) then
+      Break;
+    att := nil;
+  end;
+  if att = nil then
+  begin
+    MakeError('', ecUnknownIdentifier, '');
+    Result := False;
+    exit;
+  end;
+  FParser.Next;
+  i := 0;
+  at := Dest.Add(att);
+  while att.Fields[i].Hidden do
+  begin
+    at.AddValue(NewVariant(at2ut(att.Fields[i].FieldType)));
+    inc(i);
+  end;
+  if FParser.CurrTokenId <> CSTI_OpenRound then
+  begin
+    MakeError('', ecOpenRoundExpected, '');
+    Result := False;
+    exit;
+  end;
+  FParser.Next;
+  if i < Att.FieldCount then
+  begin
+    while i < att.FieldCount do
+    begin
+      varp := ReadConstant(FParser, CSTI_CloseRound);
+      if varp = nil then
+      begin
+        Result := False;
+        exit;
+      end;
+      at.AddValue(varp);
+      if not IsCompatibleType(varp.FType, Att.Fields[i].FieldType, False) then
+      begin
+        MakeError('', ecTypeMismatch, '');
+        Result := False;
+        exit;
+      end;
+      Inc(i);
+      while (i < Att.FieldCount) and (att.Fields[i].Hidden)  do
+      begin
+        at.AddValue(NewVariant(at2ut(att.Fields[i].FieldType)));
+        inc(i);
+      end;
+      if i >= Att.FieldCount then
+      begin
+        break;
+      end else
+      begin
+        if FParser.CurrTokenID <> CSTI_Comma then
+        begin
+          MakeError('', ecCommaExpected, '');
+          Result := False;
+          exit;
+        end;
+      end;
+      FParser.Next;
+    end;
+  end;
+  if FParser.CurrTokenID <> CSTI_CloseRound then
+  begin
+    MakeError('', ecCloseRoundExpected, '');
+    Result := False;
+    exit;
+  end;
+  FParser.Next;
+  if FParser.CurrTokenID <> CSTI_CloseBlock then
+  begin
+    MakeError('', ecCloseBlockExpected, '');
+    Result := False;
+    exit;
+  end;
+  FParser.Next;
+  Result := True;
+end;
+
+type
+  TConstOperation = class(TObject)
+  private
+    FDeclPosition, FDeclRow, FDeclCol: Cardinal;
+  public
+    property DeclPosition: Cardinal read FDeclPosition write FDeclPosition;
+    property DeclRow: Cardinal read FDeclRow write FDeclRow;
+    property DeclCol: Cardinal read FDeclCol write FDeclCol;
+    procedure SetPos(Parser: TPSPascalParser);
+  end;
+
+  TUnConstOperation = class(TConstOperation)
+  private
+    FOpType: TPSUnOperatorType;
+    FVal1: TConstOperation;
+  public
+    property OpType: TPSUnOperatorType read FOpType write FOpType;
+    property Val1: TConstOperation read FVal1 write FVal1;
+
+    destructor Destroy; override;
+  end;
+
+  TBinConstOperation = class(TConstOperation)
+  private
+    FOpType: TPSBinOperatorType;
+    FVal2: TConstOperation;
+    FVal1: TConstOperation;
+  public
+    property OpType: TPSBinOperatorType read FOpType write FOpType;
+    property Val1: TConstOperation read FVal1 write FVal1;
+    property Val2: TConstOperation read FVal2 write FVal2;
+
+    destructor Destroy; override;
+  end;
+
+  TConstData = class(TConstOperation)
+  private
+    FData: PIfRVariant;
+  public
+    property Data: PIfRVariant read FData write FData;
+    destructor Destroy; override;
+  end;
+
+
+function TPSPascalCompiler.IsBoolean(aType: TPSType): Boolean;
+begin
+  Result := (AType = FDefaultBoolType)
+    or (AType.Name = 'LONGBOOL');
+end;
+
+
+function TPSPascalCompiler.ReadConstant(FParser: TPSPascalParser; StopOn: TPSPasToken): PIfRVariant;
+
+  function ReadExpression: TConstOperation; forward;
+  function ReadTerm: TConstOperation; forward;
+  function ReadFactor: TConstOperation;
+  var
+    NewVar: TConstOperation;
+    NewVarU: TUnConstOperation;
+    function GetConstantIdentifier: PIfRVariant;
+    var
+      s: tbtString;
+      sh: Longint;
+      i: Longint;
+      p: TPSConstant;
+    begin
+      s := FParser.GetToken;
+      sh := MakeHash(s);
+      for i := FConstants.Count -1 downto 0 do
+      begin
+        p := FConstants[I];
+        if (p.NameHash = sh) and (p.Name = s) then
+        begin
+          New(Result);
+          InitializeVariant(Result, p.Value.FType);
+          CopyVariantContents(P.Value, Result);
+          FParser.Next;
+          exit;
+        end;
+      end;
+      MakeError('', ecUnknownIdentifier, '');
+      Result := nil;
+    end;
+  begin
+    case fParser.CurrTokenID of
+      CSTII_Not:
+      begin
+        FParser.Next;
+        NewVar := ReadFactor;
+        if NewVar = nil then
+        begin
+          Result := nil;
+          exit;
+        end;
+        NewVarU := TUnConstOperation.Create;
+        NewVarU.OpType := otNot;
+        NewVarU.Val1 := NewVar;
+        NewVar := NewVarU;
+      end;
+      CSTI_Minus:
+      begin
+        FParser.Next;
+        NewVar := ReadTerm;
+        if NewVar = nil then
+        begin
+          Result := nil;
+          exit;
+        end;
+        NewVarU := TUnConstOperation.Create;
+        NewVarU.OpType := otMinus;
+        NewVarU.Val1 := NewVar;
+        NewVar := NewVarU;
+      end;
+      CSTI_OpenRound:
+        begin
+          FParser.Next;
+          NewVar := ReadExpression;
+          if NewVar = nil then
+          begin
+            Result := nil;
+            exit;
+          end;
+          if FParser.CurrTokenId <> CSTI_CloseRound then
+          begin
+            NewVar.Free;
+            Result := nil;
+            MakeError('', ecCloseRoundExpected, '');
+            exit;
+          end;
+          FParser.Next;
+        end;
+      CSTI_Char, CSTI_String:
+        begin
+          NewVar := TConstData.Create;
+          NewVar.SetPos(FParser);
+          TConstData(NewVar).Data := ReadString;
+        end;
+      CSTI_HexInt, CSTI_Integer:
+        begin
+          NewVar := TConstData.Create;
+          NewVar.SetPos(FParser);
+          TConstData(NewVar).Data := ReadInteger(FParser.GetToken);
+          FParser.Next;
+        end;
+      CSTI_Real:
+        begin
+          NewVar := TConstData.Create;
+          NewVar.SetPos(FParser);
+          TConstData(NewVar).Data := ReadReal(FParser.GetToken);
+          FParser.Next;
+        end;
+      CSTI_Identifier:
+        begin
+          NewVar := TConstData.Create;
+          NewVar.SetPos(FParser);
+          TConstData(NewVar).Data := GetConstantIdentifier;
+          if TConstData(NewVar).Data = nil then
+          begin
+            NewVar.Free;
+            Result := nil;
+            exit;
+          end
+        end;
+    else
+      begin
+        MakeError('', ecSyntaxError, '');
+        Result := nil;
+        exit;
+      end;
+    end; {case}
+    Result := NewVar;
+  end; // ReadFactor
+
+  function ReadTerm: TConstOperation;
+  var
+    F1, F2: TConstOperation;
+    F: TBinConstOperation;
+    Token: TPSPasToken;
+    Op: TPSBinOperatorType;
+  begin
+    F1 := ReadFactor;
+    if F1 = nil then
+    begin
+      Result := nil;
+      exit;
+    end;
+    while FParser.CurrTokenID in [CSTI_Multiply, CSTI_Divide, CSTII_Div, CSTII_Mod, CSTII_And, CSTII_Shl, CSTII_Shr] do
+    begin
+      Token := FParser.CurrTokenID;
+      FParser.Next;
+      F2 := ReadFactor;
+      if f2 = nil then
+      begin
+        f1.Free;
+        Result := nil;
+        exit;
+      end;
+      case Token of
+        CSTI_Multiply: Op := otMul;
+        CSTII_div, CSTI_Divide: Op := otDiv;
+        CSTII_mod: Op := otMod;
+        CSTII_and: Op := otAnd;
+        CSTII_shl: Op := otShl;
+        CSTII_shr: Op := otShr;
+      else
+        Op := otAdd;
+      end;
+      F := TBinConstOperation.Create;
+      f.Val1 := F1;
+      f.Val2 := F2;
+      f.OpType := Op;
+      f1 := f;
+    end;
+    Result := F1;
+  end;  // ReadTerm
+
+  function ReadSimpleExpression: TConstOperation;
+  var
+    F1, F2: TConstOperation;
+    F: TBinConstOperation;
+    Token: TPSPasToken;
+    Op: TPSBinOperatorType;
+  begin
+    F1 := ReadTerm;
+    if F1 = nil then
+    begin
+      Result := nil;
+      exit;
+    end;
+    while FParser.CurrTokenID in [CSTI_Plus, CSTI_Minus, CSTII_Or, CSTII_Xor] do
+    begin
+      Token := FParser.CurrTokenID;
+      FParser.Next;
+      F2 := ReadTerm;
+      if f2 = nil then
+      begin
+        f1.Free;
+        Result := nil;
+        exit;
+      end;
+      case Token of
+        CSTI_Plus: Op := otAdd;
+        CSTI_Minus: Op := otSub;
+        CSTII_or: Op := otOr;
+        CSTII_xor: Op := otXor;
+      else
+        Op := otAdd;
+      end;
+      F := TBinConstOperation.Create;
+      f.Val1 := F1;
+      f.Val2 := F2;
+      f.OpType := Op;
+      f1 := f;
+    end;
+    Result := F1;
+  end;  // ReadSimpleExpression
+
+
+  function ReadExpression: TConstOperation;
+  var
+    F1, F2: TConstOperation;
+    F: TBinConstOperation;
+    Token: TPSPasToken;
+    Op: TPSBinOperatorType;
+  begin
+    F1 := ReadSimpleExpression;
+    if F1 = nil then
+    begin
+      Result := nil;
+      exit;
+    end;
+    while FParser.CurrTokenID in [ CSTI_GreaterEqual, CSTI_LessEqual, CSTI_Greater, CSTI_Less, CSTI_Equal, CSTI_NotEqual] do
+    begin
+      Token := FParser.CurrTokenID;
+      FParser.Next;
+      F2 := ReadSimpleExpression;
+      if f2 = nil then
+      begin
+        f1.Free;
+        Result := nil;
+        exit;
+      end;
+      case Token of
+        CSTI_GreaterEqual: Op := otGreaterEqual;
+        CSTI_LessEqual: Op := otLessEqual;
+        CSTI_Greater: Op := otGreater;
+        CSTI_Less: Op := otLess;
+        CSTI_Equal: Op := otEqual;
+        CSTI_NotEqual: Op := otNotEqual;
+      else
+        Op := otAdd;
+      end;
+      F := TBinConstOperation.Create;
+      f.Val1 := F1;
+      f.Val2 := F2;
+      f.OpType := Op;
+      f1 := f;
+    end;
+    Result := F1;
+  end;  // ReadExpression
+
+
+  function EvalConst(P: TConstOperation): PIfRVariant;
+  var
+    p1, p2: PIfRVariant;
+  begin
+    if p is TBinConstOperation then
+    begin
+      p1 := EvalConst(TBinConstOperation(p).Val1);
+      if p1 = nil then begin Result := nil; exit; end;
+      p2 := EvalConst(TBinConstOperation(p).Val2);
+      if p2 = nil then begin DisposeVariant(p1); Result := nil; exit; end;
+      if not PreCalc(False, 0, p1, 0, p2, TBinConstOperation(p).OpType, p.DeclPosition, p.DeclRow, p.DeclCol) then
+      begin
+        DisposeVariant(p1);
+        DisposeVariant(p2);
+//        MakeError('', ecTypeMismatch, '');
+        result := nil;
+        exit;
+      end;
+      DisposeVariant(p2);
+      Result := p1;
+    end else if p is TUnConstOperation then
+    begin
+      with TUnConstOperation(P) do
+      begin
+        p1 := EvalConst(Val1);
+        case OpType of
+          otNot:
+            case p1.FType.BaseType of
+              btU8: p1.tu8 := not p1.tu8;
+              btU16: p1.tu16 := not p1.tu16;
+              btU32: p1.tu32 := not p1.tu32;
+              bts8: p1.ts8 := not p1.ts8;
+              bts16: p1.ts16 := not p1.ts16;
+              bts32: p1.ts32 := not p1.ts32;
+              {$IFNDEF PS_NOINT64}
+              bts64: p1.ts64 := not p1.ts64;
+              {$ENDIF}
+            else
+              begin
+                MakeError('', ecTypeMismatch, '');
+                DisposeVariant(p1);
+                Result := nil;
+                exit;
+              end;
+            end;
+          otMinus:
+            case p1.FType.BaseType of
+              btU8: p1.tu8 := -p1.tu8;
+              btU16: p1.tu16 := -p1.tu16;
+              btU32: p1.tu32 := -p1.tu32;
+              bts8: p1.ts8 := -p1.ts8;
+              bts16: p1.ts16 := -p1.ts16;
+              bts32: p1.ts32 := -p1.ts32;
+              {$IFNDEF PS_NOINT64}
+              bts64: p1.ts64 := -p1.ts64;
+              {$ENDIF}
+              btDouble: p1.tdouble := - p1.tDouble;
+              btSingle: p1.tsingle := - p1.tsingle;
+              btCurrency: p1.tcurrency := - p1.tcurrency;
+              btExtended: p1.textended := - p1.textended;
+            else
+              begin
+                MakeError('', ecTypeMismatch, '');
+                DisposeVariant(p1);
+                Result := nil;
+                exit;
+              end;
+            end;
+        else
+          begin
+            DisposeVariant(p1);
+            Result := nil;
+            exit;
+          end;
+        end;
+      end;
+      Result := p1;
+    end else
+    begin
+      if ((p as TConstData).Data.FType.BaseType = btString)
+      and (length(tbtstring((p as TConstData).Data.tstring)) =1) then
+      begin
+        New(p1);
+        InitializeVariant(p1, FindBaseType(btChar));
+        p1.tchar := tbtstring((p as TConstData).Data.tstring)[1];
+        Result := p1;
+      end else begin
+        New(p1);
+        InitializeVariant(p1, (p as TConstData).Data.FType);
+        CopyVariantContents((p as TConstData).Data, p1);
+        Result := p1;
+      end;
+    end;
+  end;
+
+var
+  Val: TConstOperation;
+begin
+  Val := ReadExpression;
+  if val = nil then
+  begin
+    Result := nil;
+    exit;
+  end;
+  Result := EvalConst(Val);
+  Val.Free;
+end;
+
+procedure TPSPascalCompiler.WriteDebugData(const s: tbtString);
+begin
+  FDebugOutput := FDebugOutput + s;
+end;
+
+function TPSPascalCompiler.GetDebugOutput(var s: tbtString): Boolean;
+begin
+  if Length(FDebugOutput) <> 0 then
+  begin
+    s := FDebugOutput;
+    Result := True;
+  end
+  else
+    Result := False;
+end;
+
+function TPSPascalCompiler.AddUsedFunction(var Proc: TPSInternalProcedure): Cardinal;
+begin
+  if FProcs = nil then raise EPSCompilerException.Create(RPS_OnUseEventOnly);
+  Proc := TPSInternalProcedure.Create;
+  FProcs.Add(Proc);
+  Result := FProcs.Count - 1;
+end;
+
+{$IFNDEF PS_NOINTERFACES}
+const
+  IUnknown_Guid: TGuid = (D1: 0; d2: 0; d3: 0; d4: ($c0,00,00,00,00,00,00,$46));
+  IDispatch_Guid: Tguid = (D1: $20400; D2: $0; D3: $0; D4:($C0, $0, $0, $0, $0, $0, $0, $46));
+{$ENDIF}
+
+procedure TPSPascalCompiler.DefineStandardProcedures;
+var
+  p: TPSRegProc;
+begin
+  {$IFNDEF PS_NOINT64}
+  AddFunction('function IntToStr(i: Int64): String;');
+  {$ELSE}
+  AddFunction('function IntTostr(i: Integer): String;');
+  {$ENDIF}
+  AddFunction('function StrToInt(s: String): Longint;');
+  AddFunction('function StrToIntDef(s: String; def: Longint): Longint;');
+  AddFunction('function Copy(s: AnyString; iFrom, iCount: Longint): AnyString;');
+  AddFunction('function Pos(SubStr, S: AnyString): Longint;');
+  AddFunction('procedure Delete(var s: AnyString; ifrom, icount: Longint);');
+  AddFunction('procedure Insert(s: AnyString; var s2: AnyString; iPos: Longint);');
+  p := AddFunction('function GetArrayLength: integer;');
+  with P.Decl.AddParam do
+  begin
+    OrgName := 'arr';
+    Mode := pmInOut;
+  end;
+  p := AddFunction('procedure SetArrayLength;');
+  with P.Decl.AddParam do
+  begin
+    OrgName := 'arr';
+    Mode := pmInOut;
+  end;
+  with P.Decl.AddParam do
+  begin
+    OrgName := 'count';
+    aType := FindBaseType(btS32);
+  end;
+  AddFunction('Function StrGet(var S : String; I : Integer) : Char;');
+  AddFunction('procedure StrSet(c : Char; I : Integer; var s : String);');
+  {$IFNDEF PS_NOWIDESTRING}
+  AddFunction('Function WStrGet(var S : widestring; I : Integer) : WideChar;');
+  AddFunction('procedure WStrSet(c : WideChar; I : Integer; var s : widestring);');
+  {$ENDIF}
+  AddFunction('Function StrGet2(S : String; I : Integer) : Char;');
+  AddFunction('Function AnsiUppercase(s : String) : String;');
+  AddFunction('Function AnsiLowercase(s : String) : String;');
+  AddFunction('Function Uppercase(s : AnyString) : AnyString;');
+  AddFunction('Function Lowercase(s : AnyString) : AnyString;');
+  AddFunction('Function Trim(s : AnyString) : AnyString;');
+  AddFunction('function Length: Integer;').Decl.AddParam.OrgName:='s';
+  with AddFunction('procedure SetLength;').Decl do
+  begin
+    with AddParam do
+    begin
+      OrgName:='s';
+      Mode:=pmInOut;
+    end;
+    with AddParam do
+    begin
+      OrgName:='NewLength';
+      aType:=FindBaseType(btS32);  //Integer
+    end;
+  end;
+  {$IFNDEF PS_NOINT64}
+  AddFunction('function Low: Int64;').Decl.AddParam.OrgName:='x';
+  AddFunction('function High: Int64;').Decl.AddParam.OrgName:='x';
+  {$ELSE}
+  AddFunction('function Low: Integer;').Decl.AddParam.OrgName:='x';
+  AddFunction('function High: Integer;').Decl.AddParam.OrgName:='x';
+  {$ENDIF}
+  with AddFunction('procedure Dec;').Decl do begin
+    with AddParam do
+    begin
+      OrgName:='x';
+      Mode:=pmInOut;
+    end;
+  end;
+  with AddFunction('procedure Inc;').Decl do begin
+    with AddParam do
+    begin
+      OrgName:='x';
+      Mode:=pmInOut;
+    end;
+  end;
+  AddFunction('Function Sin(e : Extended) : Extended;');
+  AddFunction('Function Cos(e : Extended) : Extended;');
+  AddFunction('Function Sqrt(e : Extended) : Extended;');
+  AddFunction('Function Round(e : Extended) : Longint;');
+  AddFunction('Function Trunc(e : Extended) : Longint;');
+  AddFunction('Function Int(e : Extended) : Extended;');
+  AddFunction('Function Pi : Extended;');
+  AddFunction('Function Abs(e : Extended) : Extended;');
+  AddFunction('function StrToFloat(s: String): Extended;');
+  AddFunction('Function FloatToStr(e : Extended) : String;');
+  AddFunction('Function Padl(s : AnyString;I : longInt) : AnyString;');
+  AddFunction('Function Padr(s : AnyString;I : longInt) : AnyString;');
+  AddFunction('Function Padz(s : AnyString;I : longInt) : AnyString;');
+  AddFunction('Function Replicate(c : char;I : longInt) : String;');
+  AddFunction('Function StringOfChar(c : char;I : longInt) : String;');
+  AddTypeS('TVarType', 'Word');
+  AddConstantN('varEmpty', 'Word').Value.tu16 := varempty;
+  AddConstantN('varNull', 'Word').Value.tu16 := varnull;
+  AddConstantN('varSmallInt', 'Word').Value.tu16 := varsmallint;
+  AddConstantN('varInteger', 'Word').Value.tu16 := varinteger;
+  AddConstantN('varSingle', 'Word').Value.tu16 := varsingle;
+  AddConstantN('varDouble', 'Word').Value.tu16 := vardouble;
+  AddConstantN('varCurrency', 'Word').Value.tu16 := varcurrency;
+  AddConstantN('varDate', 'Word').Value.tu16 := vardate;
+  AddConstantN('varOleStr', 'Word').Value.tu16 := varolestr;
+  AddConstantN('varDispatch', 'Word').Value.tu16 := vardispatch;
+  AddConstantN('varError', 'Word').Value.tu16 := varerror;
+  AddConstantN('varBoolean', 'Word').Value.tu16 := varboolean;
+  AddConstantN('varVariant', 'Word').Value.tu16 := varvariant;
+  AddConstantN('varUnknown', 'Word').Value.tu16 := varunknown;
+{$IFDEF DELPHI6UP}
+  AddConstantN('varShortInt', 'Word').Value.tu16 := varshortint;
+  AddConstantN('varByte', 'Word').Value.tu16 := varbyte;
+  AddConstantN('varWord', 'Word').Value.tu16 := varword;
+  AddConstantN('varLongWord', 'Word').Value.tu16 := varlongword;
+  AddConstantN('varInt64', 'Word').Value.tu16 := varint64;
+{$ENDIF}
+{$IFDEF DELPHI5UP}
+  AddConstantN('varStrArg', 'Word').Value.tu16 := varstrarg;
+  AddConstantN('varAny', 'Word').Value.tu16 := varany;
+{$ENDIF}
+  AddConstantN('varString', 'Word').Value.tu16 := varstring;
+  AddConstantN('varTypeMask', 'Word').Value.tu16 := vartypemask;
+  AddConstantN('varArray', 'Word').Value.tu16 := vararray;
+  AddConstantN('varByRef', 'Word').Value.tu16 := varByRef;
+  AddDelphiFunction('function Unassigned: Variant;');
+  AddDelphiFunction('function VarIsEmpty(const V: Variant): Boolean;');
+  AddDelphiFunction('function Null: Variant;');
+  AddDelphiFunction('function VarIsNull(const V: Variant): Boolean;');
+  AddDelphiFunction('function VarType(const V: Variant): TVarType;');
+ addTypeS('TIFException', '(ErNoError, erCannotImport, erInvalidType, ErInternalError, '+
+   'erInvalidHeader, erInvalidOpcode, erInvalidOpcodeParameter, erNoMainProc, erOutOfGlobalVarsRange, '+
+    'erOutOfProcRange, ErOutOfRange, erOutOfStackRange, ErTypeMismatch, erUnexpectedEof, '+
+    'erVersionError, ErDivideByZero, ErMathError,erCouldNotCallProc, erOutofRecordRange, '+
+    'erOutOfMemory, erException, erNullPointerException, erNullVariantError, erInterfaceNotSupported, erCustomError)');
+  AddFunction('procedure RaiseLastException;');
+  AddFunction('procedure RaiseException(Ex: TIFException; Param: String);');
+  AddFunction('function ExceptionType: TIFException;');
+  AddFunction('function ExceptionParam: String;');
+  AddFunction('function ExceptionProc: Cardinal;');
+  AddFunction('function ExceptionPos: Cardinal;');
+  AddFunction('function ExceptionToString(er: TIFException; Param: String): String;');
+  {$IFNDEF PS_NOINT64}
+  AddFunction('function StrToInt64(s: String): int64;');
+  AddFunction('function Int64ToStr(i: Int64): String;');
+  {$ENDIF}
+
+  with AddFunction('function SizeOf: Longint;').Decl.AddParam do
+  begin
+    OrgName := 'Data';
+  end;
+{$IFNDEF PS_NOINTERFACES}
+  with AddInterface(nil, IUnknown_Guid, 'IUnknown') do
+  begin
+    RegisterDummyMethod; // Query Interface
+    RegisterDummyMethod; // _AddRef
+    RegisterDummyMethod; // _Release
+  end;
+  with AddInterface(nil, IUnknown_Guid, 'IInterface') do
+  begin
+    RegisterDummyMethod; // Query Interface
+    RegisterDummyMethod; // _AddRef
+    RegisterDummyMethod; // _Release
+  end;
+
+ {$IFNDEF PS_NOIDISPATCH}
+  with AddInterface(FindInterface('IUnknown'), IDispatch_Guid, 'IDispatch') do
+  begin
+    RegisterDummyMethod; // GetTypeCount
+    RegisterDummyMethod; // GetTypeInfo
+    RegisterDummyMethod; // GetIdsOfName
+    RegisterDummyMethod; // Invoke
+  end;
+  with TPSInterfaceType(FindType('IDispatch')) do
+  begin
+    ExportName := True;
+  end;
+  AddDelphiFunction('function IDispatchInvoke(Self: IDispatch; PropertySet: Boolean; const Name: String; Par: array of variant): variant;');
+ {$ENDIF}
+{$ENDIF}
+end;
+
+function TPSPascalCompiler.GetTypeCount: Longint;
+begin
+  if FProcs = nil then raise EPSCompilerException.Create(RPS_OnUseEventOnly);
+  Result := FTypes.Count;
+end;
+
+function TPSPascalCompiler.GetType(I: Longint): TPSType;
+begin
+  if FProcs = nil then raise EPSCompilerException.Create(RPS_OnUseEventOnly);
+  Result := FTypes[I];
+end;
+
+function TPSPascalCompiler.GetVarCount: Longint;
+begin
+  if FProcs = nil then raise EPSCompilerException.Create(RPS_OnUseEventOnly);
+  Result := FVars.Count;
+end;
+
+function TPSPascalCompiler.GetVar(I: Longint): TPSVar;
+begin
+  if FProcs = nil then raise EPSCompilerException.Create(RPS_OnUseEventOnly);
+  Result := FVars[i];
+end;
+
+function TPSPascalCompiler.GetProcCount: Longint;
+begin
+  if FProcs = nil then raise EPSCompilerException.Create(RPS_OnUseEventOnly);
+  Result := FProcs.Count;
+end;
+
+function TPSPascalCompiler.GetProc(I: Longint): TPSProcedure;
+begin
+  if FProcs = nil then raise EPSCompilerException.Create(RPS_OnUseEventOnly);
+  Result := FProcs[i];
+end;
+
+
+
+
+function TPSPascalCompiler.AddUsedFunction2(var Proc: TPSExternalProcedure): Cardinal;
+begin
+  if FProcs = nil then raise EPSCompilerException.Create(RPS_OnUseEventOnly);
+  Proc := TPSExternalProcedure.Create;
+  FProcs.Add(Proc);
+  Result := FProcs.Count -1;
+end;
+
+function TPSPascalCompiler.AddVariable(const Name: tbtString; FType: TPSType): TPSVar;
+var
+  P: TPSVar;
+begin
+  if FProcs = nil then raise EPSCompilerException.Create(RPS_OnUseEventOnly);
+  if FType = nil then raise EPSCompilerException.CreateFmt(RPS_InvalidTypeForVar, [Name]);
+  p := TPSVar.Create;
+  p.OrgName := Name;
+  p.Name := Fastuppercase(Name);
+  p.FType := AT2UT(FType);
+  p.exportname := p.Name;
+  FVars.Add(p);
+  Result := P;
+end;
+
+function TPSPascalCompiler.AddAttributeType: TPSAttributeType;
+begin
+  if FAttributeTypes = nil then Raise Exception.Create(RPS_OnUseEventOnly);
+  Result := TPSAttributeType.Create;
+  FAttributeTypes.Add(Result);
+end;
+
+function TPSPascalCompiler.FindAttributeType(const Name: tbtString): TPSAttributeType;
+var
+  h, i: Integer;
+  n: tbtString;
+begin
+  if FAttributeTypes = nil then Raise Exception.Create(RPS_OnUseEventOnly);
+  n := FastUpperCase(Name);
+  h := MakeHash(n);
+  for i := FAttributeTypes.Count -1 downto 0 do
+  begin
+    result := TPSAttributeType(FAttributeTypes[i]);
+    if (Result.NameHash = h) and (Result.Name = n) then
+      exit;
+  end;
+  result := nil;
+end;
+function TPSPascalCompiler.GetConstCount: Longint;
+begin
+  if FProcs = nil then raise EPSCompilerException.Create(RPS_OnUseEventOnly);
+  result := FConstants.Count;
+end;
+
+function TPSPascalCompiler.GetConst(I: Longint): TPSConstant;
+begin
+  if FProcs = nil then raise EPSCompilerException.Create(RPS_OnUseEventOnly);
+  Result := TPSConstant(FConstants[i]);
+end;
+
+function TPSPascalCompiler.GetRegProcCount: Longint;
+begin
+  if FProcs = nil then raise EPSCompilerException.Create(RPS_OnUseEventOnly);
+  Result := FRegProcs.Count;
+end;
+
+function TPSPascalCompiler.GetRegProc(I: Longint): TPSRegProc;
+begin
+  if FProcs = nil then raise EPSCompilerException.Create(RPS_OnUseEventOnly);
+  Result := TPSRegProc(FRegProcs[i]);
+end;
+
+
+procedure TPSPascalCompiler.AddToFreeList(Obj: TObject);
+begin
+  FAutoFreeList.Add(Obj);
+end;
+
+function TPSPascalCompiler.AddConstantN(const Name,
+  FType: tbtString): TPSConstant;
+begin
+  Result := AddConstant(Name, FindType(FType));
+end;
+
+function TPSPascalCompiler.AddTypeCopy(const Name: tbtString;
+  TypeNo: TPSType): TPSType;
+begin
+  if FProcs = nil then raise EPSCompilerException.Create(RPS_OnUseEventOnly);
+  TypeNo := GetTypeCopyLink(TypeNo);
+  if Typeno = nil then raise EPSCompilerException.Create(RPS_InvalidType);
+  Result := AddType(Name, BtTypeCopy);
+  TPSTypeLink(Result).LinkTypeNo := TypeNo;
+end;
+
+function TPSPascalCompiler.AddTypeCopyN(const Name,
+  FType: tbtString): TPSType;
+begin
+  Result := AddTypeCopy(Name, FindType(FType));
+end;
+
+
+function TPSPascalCompiler.AddUsedVariable(const Name: tbtString;
+  FType: TPSType): TPSVar;
+begin
+  Result := AddVariable(Name, FType);
+  if Result <> nil then
+    Result.Use;
+end;
+
+function TPSPascalCompiler.AddUsedVariableN(const Name,
+  FType: tbtString): TPSVar;
+begin
+  Result := AddVariable(Name, FindType(FType));
+  if Result <> nil then
+    Result.Use;
+end;
+
+function TPSPascalCompiler.AddVariableN(const Name,
+  FType: tbtString): TPSVar;
+begin
+  Result := AddVariable(Name, FindType(FType));
+end;
+
+function TPSPascalCompiler.AddUsedPtrVariable(const Name: tbtString; FType: TPSType): TPSVar;
+begin
+  Result := AddVariable(Name, FType);
+  if Result <> nil then
+  begin
+    result.SaveAsPointer := True;
+    Result.Use;
+  end;
+end;
+
+function TPSPascalCompiler.AddUsedPtrVariableN(const Name, FType: tbtString): TPSVar;
+begin
+  Result := AddVariable(Name, FindType(FType));
+  if Result <> nil then
+  begin
+    result.SaveAsPointer := True;
+    Result.Use;
+  end;
+end;
+
+function TPSPascalCompiler.AddTypeS(const Name, Decl: tbtString): TPSType;
+var
+  Parser: TPSPascalParser;
+begin
+  if FProcs = nil then raise EPSCompilerException.Create(RPS_OnUseEventOnly);
+  Parser := TPSPascalParser.Create;
+  Parser.SetText(Decl);
+  Result := ReadType(Name, Parser);
+  if Result<>nil then
+  begin
+    Result.DeclarePos:=InvalidVal;
+    {$IFDEF PS_USESSUPPORT}
+    Result.DeclareUnit:=fModule;
+    {$ENDIF}
+    Result.DeclareRow:=0;
+    Result.DeclareCol:=0;
+  end;
+  Parser.Free;
+  if result = nil then Raise EPSCompilerException.CreateFmt(RPS_UnableToRegisterType, [name]);
+end;
+
+
+function TPSPascalCompiler.CheckCompatProc(P: TPSType; ProcNo: Cardinal): Boolean;
+var
+  i: Longint;
+  s1, s2: TPSParametersDecl;
+begin
+  if p.BaseType <> btProcPtr then begin
+    Result := False;
+    Exit;
+  end;
+
+  S1 := TPSProceduralType(p).ProcDef;
+
+  if TPSProcedure(FProcs[ProcNo]).ClassType = TPSInternalProcedure then
+    s2 := TPSInternalProcedure(FProcs[ProcNo]).Decl
+  else
+    s2 := TPSExternalProcedure(FProcs[ProcNo]).RegProc.Decl;
+  if (s1.Result <> s2.Result) or (s1.ParamCount <> s2.ParamCount) then
+  begin
+    Result := False;
+    Exit;
+  end;
+  for i := 0 to s1.ParamCount -1 do
+  begin
+    if (s1.Params[i].Mode <> s2.Params[i].Mode) or (s1.Params[i].aType <> s2.Params[i].aType) then
+    begin
+      Result := False;
+      Exit;
+    end;
+  end;
+  Result := True;
+end;
+
+function TPSPascalCompiler.MakeExportDecl(decl: TPSParametersDecl): tbtString;
+var
+  i: Longint;
+begin
+  if Decl.Result = nil then result := '-1' else
+  result := IntToStr(Decl.Result.FinalTypeNo);
+
+  for i := 0 to decl.ParamCount -1 do
+  begin
+    if decl.GetParam(i).Mode = pmIn then
+      Result := Result + ' @'
+    else
+      Result := Result + ' !';
+    Result := Result + inttostr(decl.GetParam(i).aType.FinalTypeNo);
+  end;
+end;
+
+
+function TPSPascalCompiler.IsIntBoolType(aType: TPSType): Boolean;
+begin
+  if Isboolean(aType) then begin Result := True; exit;end;
+
+  case aType.BaseType of
+    btU8, btS8, btU16, btS16, btU32, btS32{$IFNDEF PS_NOINT64}, btS64{$ENDIF}: Result := True;
+  else
+    Result := False;
+  end;
+end;
+
+
+procedure TPSPascalCompiler.ParserError(Parser: TObject;
+  Kind: TPSParserErrorKind);
+begin
+  FParserHadError := True;
+  case Kind of
+    ICOMMENTERROR: MakeError('', ecCommentError, '');
+    ISTRINGERROR: MakeError('', ecStringError, '');
+    ICHARERROR: MakeError('', ecCharError, '');
+  else
+    MakeError('', ecSyntaxError, '');
+  end;
+end;
+
+
+function TPSPascalCompiler.AddDelphiFunction(const Decl: tbtString): TPSRegProc;
+var
+  p: TPSRegProc;
+  pDecl: TPSParametersDecl;
+  DOrgName: tbtString;
+  FT: TPMFuncType;
+  i: Longint;
+
+begin
+  pDecl := TPSParametersDecl.Create;
+  p := nil;
+  try
+    if not ParseMethod(Self, '', Decl, DOrgName, pDecl, FT) then
+      Raise EPSCompilerException.CreateFmt(RPS_UnableToRegisterFunction, [Decl]);
+
+    p := TPSRegProc.Create;
+    P.Name := FastUppercase(DOrgName);
+    p.OrgName := DOrgName;
+    p.ExportName := True;
+    p.Decl.Assign(pDecl);
+
+    FRegProcs.Add(p);
+
+    if pDecl.Result = nil then
+    begin
+      p.ImportDecl := p.ImportDecl + #0;
+    end else
+      p.ImportDecl := p.ImportDecl + #1;
+    for i := 0 to pDecl.ParamCount -1 do
+    begin
+      if pDecl.Params[i].Mode <> pmIn then
+        p.ImportDecl := p.ImportDecl + #1
+      else
+        p.ImportDecl := p.ImportDecl + #0;
+    end;
+  finally
+    pDecl.Free;
+  end;
+  Result := p;
+end;
+
+{$IFNDEF PS_NOINTERFACES}
+function TPSPascalCompiler.AddInterface(InheritedFrom: TPSInterface; Guid: TGuid; const Name: tbtString): TPSInterface;
+var
+  f: TPSType;
+begin
+  if FProcs = nil then raise EPSCompilerException.Create(RPS_OnUseEventOnly);
+  f := FindType(Name);
+  if (f <> nil) and (f is TPSInterfaceType) then
+  begin
+    result := TPSInterfaceType(f).Intf;
+    Result.Guid := Guid;
+    Result.InheritedFrom := InheritedFrom;
+    exit;
+  end;
+  f := AddType(Name, btInterface);
+  Result := TPSInterface.Create(Self, InheritedFrom, GUID, FastUppercase(Name), f);
+  FInterfaces.Add(Result);
+  TPSInterfaceType(f).Intf := Result;
+end;
+
+function TPSPascalCompiler.FindInterface(const Name: tbtString): TPSInterface;
+var
+  n: tbtString;
+  i, nh: Longint;
+begin
+  if FProcs = nil then raise EPSCompilerException.Create(RPS_OnUseEventOnly);
+  n := FastUpperCase(Name);
+  nh := MakeHash(n);
+  for i := FInterfaces.Count -1 downto 0 do
+  begin
+    Result := FInterfaces[i];
+    if (Result.NameHash = nh) and (Result.Name = N) then
+      exit;
+  end;
+  raise EPSCompilerException.CreateFmt(RPS_UnknownInterface, [Name]);
+end;
+{$ENDIF}
+function TPSPascalCompiler.AddClass(InheritsFrom: TPSCompileTimeClass; aClass: TClass): TPSCompileTimeClass;
+var
+  f: TPSType;
+begin
+  if FProcs = nil then raise EPSCompilerException.Create(RPS_OnUseEventOnly);
+  Result := FindClass(tbtstring(aClass.ClassName));
+  if Result <> nil then exit;
+  f := AddType(tbtstring(aClass.ClassName), btClass);
+  Result := TPSCompileTimeClass.CreateC(aClass, Self, f);
+  Result.FInheritsFrom := InheritsFrom;
+  FClasses.Add(Result);
+  TPSClassType(f).Cl := Result;
+  f.ExportName := True;
+end;
+
+function TPSPascalCompiler.AddClassN(InheritsFrom: TPSCompileTimeClass; const aClass: tbtString): TPSCompileTimeClass;
+var
+  f: TPSType;
+begin
+  if FProcs = nil then raise EPSCompilerException.Create(RPS_OnUseEventOnly);
+  Result := FindClass(aClass);
+  if Result <> nil then
+  begin
+    if InheritsFrom <> nil then
+      Result.FInheritsFrom := InheritsFrom;
+    exit;
+  end;
+  f := AddType(aClass, btClass);
+  Result := TPSCompileTimeClass.Create(FastUppercase(aClass), Self, f);
+  TPSClassType(f).Cl := Result;
+  Result.FInheritsFrom := InheritsFrom;
+  FClasses.Add(Result);
+  TPSClassType(f).Cl := Result;
+  f.ExportName := True;
+end;
+
+function TPSPascalCompiler.FindClass(const aClass: tbtString): TPSCompileTimeClass;
+var
+  i: Longint;
+  Cl: tbtString;
+  H: Longint;
+  x: TPSCompileTimeClass;
+begin
+  cl := FastUpperCase(aClass);
+  H := MakeHash(Cl);
+  for i :=0 to FClasses.Count -1 do
+  begin
+    x := FClasses[I];
+    if (X.FClassNameHash = H) and (X.FClassName = Cl) then
+    begin
+      Result := X;
+      Exit;
+    end;
+  end;
+  Result := nil;
+end;
+
+
+
+{  }
+
+function TransDoubleToStr(D: Double): tbtString;
+begin
+  SetLength(Result, SizeOf(Double));
+  Double((@Result[1])^) := D;
+end;
+
+function TransSingleToStr(D: Single): tbtString;
+begin
+  SetLength(Result, SizeOf(Single));
+  Single((@Result[1])^) := D;
+end;
+
+function TransExtendedToStr(D: Extended): tbtString;
+begin
+  SetLength(Result, SizeOf(Extended));
+  Extended((@Result[1])^) := D;
+end;
+
+function TransLongintToStr(D: Longint): tbtString;
+begin
+  SetLength(Result, SizeOf(Longint));
+  Longint((@Result[1])^) := D;
+end;
+
+function TransCardinalToStr(D: Cardinal): tbtString;
+begin
+  SetLength(Result, SizeOf(Cardinal));
+  Cardinal((@Result[1])^) := D;
+end;
+
+function TransWordToStr(D: Word): tbtString;
+begin
+  SetLength(Result, SizeOf(Word));
+  Word((@Result[1])^) := D;
+end;
+
+function TransSmallIntToStr(D: SmallInt): tbtString;
+begin
+  SetLength(Result, SizeOf(SmallInt));
+  SmallInt((@Result[1])^) := D;
+end;
+
+function TransByteToStr(D: Byte): tbtString;
+begin
+  SetLength(Result, SizeOf(Byte));
+  Byte((@Result[1])^) := D;
+end;
+
+function TransShortIntToStr(D: ShortInt): tbtString;
+begin
+  SetLength(Result, SizeOf(ShortInt));
+  ShortInt((@Result[1])^) := D;
+end;
+
+function TPSPascalCompiler.GetConstant(const Name: tbtString): TPSConstant;
+var
+  h, i: Longint;
+  n: tbtString;
+
+begin
+  n := FastUppercase(name);
+  h := MakeHash(n);
+  for i := 0 to FConstants.Count -1 do
+  begin
+    result := TPSConstant(FConstants[i]);
+    if (Result.NameHash = h) and (Result.Name = n) then exit;
+  end;
+  result := nil;
+end;
+
+{ TPSType }
+
+constructor TPSType.Create;
+begin
+  inherited Create;
+  FAttributes := TPSAttributes.Create;
+  FFinalTypeNo := InvalidVal;
+end;
+
+destructor TPSType.Destroy;
+begin
+  FAttributes.Free;
+  inherited Destroy;
+end;
+
+procedure TPSType.SetName(const Value: tbtString);
+begin
+  FName := Value;
+  FNameHash := MakeHash(Value);
+end;
+
+procedure TPSType.Use;
+begin
+  FUsed := True;
+end;
+
+{ TPSRecordType }
+
+function TPSRecordType.AddRecVal: PIFPSRecordFieldTypeDef;
+begin
+  Result := TPSRecordFieldTypeDef.Create;
+  FRecordSubVals.Add(Result);
+end;
+
+constructor TPSRecordType.Create;
+begin
+  inherited Create;
+  FRecordSubVals := TPSList.Create;
+end;
+
+destructor TPSRecordType.Destroy;
+var
+  i: Longint;
+begin
+  for i := FRecordSubVals.Count -1 downto 0 do
+    TPSRecordFieldTypeDef(FRecordSubVals[I]).Free;
+  FRecordSubVals.Free;
+  inherited Destroy;
+end;
+
+function TPSRecordType.RecVal(I: Longint): PIFPSRecordFieldTypeDef;
+begin
+  Result := FRecordSubVals[I]
+end;
+
+function TPSRecordType.RecValCount: Longint;
+begin
+  Result := FRecordSubVals.Count;
+end;
+
+
+{ TPSRegProc }
+
+constructor TPSRegProc.Create;
+begin
+  inherited Create;
+  FDecl := TPSParametersDecl.Create;
+end;
+
+destructor TPSRegProc.Destroy;
+begin
+  FDecl.Free;
+  inherited Destroy;
+end;
+
+procedure TPSRegProc.SetName(const Value: tbtString);
+begin
+  FName := Value;
+  FNameHash := MakeHash(FName);
+end;
+
+{ TPSRecordFieldTypeDef }
+
+procedure TPSRecordFieldTypeDef.SetFieldOrgName(const Value: tbtString);
+begin
+  FFieldOrgName := Value;
+  FFieldName := FastUppercase(Value);
+  FFieldNameHash := MakeHash(FFieldName);
+end;
+
+{ TPSProcVar }
+
+procedure TPSProcVar.SetName(const Value: tbtString);
+begin
+  FName := Value;
+  FNameHash := MakeHash(FName);
+end;
+
+procedure TPSProcVar.Use;
+begin
+  FUsed := True;
+end;
+
+
+
+{ TPSInternalProcedure }
+
+constructor TPSInternalProcedure.Create;
+begin
+  inherited Create;
+  FProcVars := TPSList.Create;
+  FLabels := TIfStringList.Create;
+  FGotos := TIfStringList.Create;
+  FDecl := TPSParametersDecl.Create;
+end;
+
+destructor TPSInternalProcedure.Destroy;
+var
+  i: Longint;
+begin
+  FDecl.Free;
+  for i := FProcVars.Count -1 downto 0 do
+    TPSProcVar(FProcVars[I]).Free;
+  FProcVars.Free;
+  FGotos.Free;
+  FLabels.Free;
+  inherited Destroy;
+end;
+
+procedure TPSInternalProcedure.ResultUse;
+begin
+  FResultUsed := True;
+end;
+
+procedure TPSInternalProcedure.SetName(const Value: tbtString);
+begin
+  FName := Value;
+  FNameHash := MakeHash(FName);
+end;
+
+procedure TPSInternalProcedure.Use;
+begin
+  FUsed := True;
+end;
+
+{ TPSProcedure }
+constructor TPSProcedure.Create;
+begin
+  inherited Create;
+  FAttributes := TPSAttributes.Create;
+end;
+
+destructor TPSProcedure.Destroy;
+begin
+  FAttributes.Free;
+  inherited Destroy;
+end;
+
+{ TPSVar }
+
+procedure TPSVar.SetName(const Value: tbtString);
+begin
+  FName := Value;
+  FNameHash := MakeHash(Value);
+end;
+
+procedure TPSVar.Use;
+begin
+  FUsed := True;
+end;
+
+{ TPSConstant }
+
+destructor TPSConstant.Destroy;
+begin
+  DisposeVariant(Value);
+  inherited Destroy;
+end;
+
+procedure TPSConstant.SetChar(c: tbtChar);
+begin
+  if (FValue <> nil) then
+  begin
+    case FValue.FType.BaseType of
+      btChar: FValue.tchar := c;
+      btString: tbtString(FValue.tstring) := c;
+      {$IFNDEF PS_NOWIDESTRING}
+      btWideString: tbtwidestring(FValue.twidestring) := tbtWidestring(c);
+      {$ENDIF}
+    else
+      raise EPSCompilerException.Create(RPS_ConstantValueMismatch);
+    end;
+  end else
+    raise EPSCompilerException.Create(RPS_ConstantValueNotAssigned)
+end;
+
+procedure TPSConstant.SetExtended(const Val: Extended);
+begin
+  if (FValue <> nil) then
+  begin
+    case FValue.FType.BaseType of
+      btSingle: FValue.tsingle := Val;
+      btDouble: FValue.tdouble := Val;
+      btExtended: FValue.textended := Val;
+      btCurrency: FValue.tcurrency := Val;
+    else
+      raise EPSCompilerException.Create(RPS_ConstantValueMismatch);
+    end;
+  end else
+    raise EPSCompilerException.Create(RPS_ConstantValueNotAssigned)
+end;
+
+procedure TPSConstant.SetInt(const Val: Longint);
+begin
+  if (FValue <> nil) then
+  begin
+    case FValue.FType.BaseType of
+      btEnum: FValue.tu32 := Val;
+      btU32, btS32: FValue.ts32 := Val;
+      btU16, btS16: FValue.ts16 := Val;
+      btU8, btS8: FValue.ts8 := Val;
+      btSingle: FValue.tsingle := Val;
+      btDouble: FValue.tdouble := Val;
+      btExtended: FValue.textended := Val;
+      btCurrency: FValue.tcurrency := Val;
+      {$IFNDEF PS_NOINT64}
+      bts64: FValue.ts64 := Val;
+      {$ENDIF}
+    else
+      raise EPSCompilerException.Create(RPS_ConstantValueMismatch);
+    end;
+  end else
+    raise EPSCompilerException.Create(RPS_ConstantValueNotAssigned)
+end;
+{$IFNDEF PS_NOINT64}
+procedure TPSConstant.SetInt64(const Val: Int64);
+begin
+  if (FValue <> nil) then
+  begin
+    case FValue.FType.BaseType of
+      btEnum: FValue.tu32 := Val;
+      btU32, btS32: FValue.ts32 := Val;
+      btU16, btS16: FValue.ts16 := Val;
+      btU8, btS8: FValue.ts8 := Val;
+      btSingle: FValue.tsingle := Val;
+      btDouble: FValue.tdouble := Val;
+      btExtended: FValue.textended := Val;
+      btCurrency: FValue.tcurrency := Val;
+      bts64: FValue.ts64 := Val;
+    else
+      raise EPSCompilerException.Create(RPS_ConstantValueMismatch);
+    end;
+  end else
+    raise EPSCompilerException.Create(RPS_ConstantValueNotAssigned)
+end;
+{$ENDIF}
+procedure TPSConstant.SetName(const Value: tbtString);
+begin
+  FName := Value;
+  FNameHash := MakeHash(Value);
+end;
+
+
+procedure TPSConstant.SetSet(const val);
+begin
+  if (FValue <> nil) then
+  begin
+    case FValue.FType.BaseType of
+      btSet:
+        begin
+          if length(tbtstring(FValue.tstring)) <> TPSSetType(FValue.FType).ByteSize then
+            SetLength(tbtstring(FValue.tstring), TPSSetType(FValue.FType).ByteSize);
+          Move(Val, FValue.tstring^, TPSSetType(FValue.FType).ByteSize);
+        end;
+    else
+      raise EPSCompilerException.Create(RPS_ConstantValueMismatch);
+    end;
+  end else
+    raise EPSCompilerException.Create(RPS_ConstantValueNotAssigned)
+end;
+
+procedure TPSConstant.SetString(const Val: tbtString);
+begin
+  if (FValue <> nil) then
+  begin
+    case FValue.FType.BaseType of
+      btChar: FValue.tchar := (Val+#0)[1];
+      btString: tbtString(FValue.tstring) := val;
+      {$IFNDEF PS_NOWIDESTRING}
+      btWideString: tbtwidestring(FValue.twidestring) := tbtwidestring(val);
+      {$ENDIF}
+    else
+      raise EPSCompilerException.Create(RPS_ConstantValueMismatch);
+    end;
+  end else
+    raise EPSCompilerException.Create(RPS_ConstantValueNotAssigned)
+end;
+
+procedure TPSConstant.SetUInt(const Val: Cardinal);
+begin
+  if (FValue <> nil) then
+  begin
+    case FValue.FType.BaseType of
+      btEnum: FValue.tu32 := Val;
+      btU32, btS32: FValue.tu32 := Val;
+      btU16, btS16: FValue.tu16 := Val;
+      btU8, btS8: FValue.tu8 := Val;
+      btSingle: FValue.tsingle := Val;
+      btDouble: FValue.tdouble := Val;
+      btExtended: FValue.textended := Val;
+      btCurrency: FValue.tcurrency := Val;
+      {$IFNDEF PS_NOINT64}
+      bts64: FValue.ts64 := Val;
+      {$ENDIF}
+    else
+      raise EPSCompilerException.Create(RPS_ConstantValueMismatch);
+    end;
+  end else
+    raise EPSCompilerException.Create(RPS_ConstantValueNotAssigned)
+end;
+
+{$IFNDEF PS_NOWIDESTRING}
+procedure TPSConstant.SetWideChar(const val: WideChar);
+begin
+  if (FValue <> nil) then
+  begin
+    case FValue.FType.BaseType of
+      btString: tbtString(FValue.tstring) := tbtstring(val);
+      btWideChar: FValue.twidechar := val;
+      btWideString: tbtwidestring(FValue.twidestring) := val;
+    else
+      raise EPSCompilerException.Create(RPS_ConstantValueMismatch);
+    end;
+  end else
+    raise EPSCompilerException.Create(RPS_ConstantValueNotAssigned)
+end;
+
+procedure TPSConstant.SetWideString(const val: tbtwidestring);
+begin
+  if (FValue <> nil) then
+  begin
+    case FValue.FType.BaseType of
+      btString: tbtString(FValue.tstring) := tbtstring(val);
+      btWideString: tbtwidestring(FValue.twidestring) := val;
+    else
+      raise EPSCompilerException.Create(RPS_ConstantValueMismatch);
+    end;
+  end else
+    raise EPSCompilerException.Create(RPS_ConstantValueNotAssigned)
+end;
+{$ENDIF}
+{ TPSPascalCompilerError }
+
+function TPSPascalCompilerError.ErrorType: tbtString;
+begin
+  Result := tbtstring(RPS_Error);
+end;
+
+function TPSPascalCompilerError.ShortMessageToString: tbtString;
+begin
+  case Error of
+    ecUnknownIdentifier: Result := tbtstring(Format (RPS_UnknownIdentifier, [Param]));
+    ecIdentifierExpected: Result := tbtstring(RPS_IdentifierExpected);
+    ecCommentError: Result := tbtstring(RPS_CommentError);
+    ecStringError: Result := tbtstring(RPS_StringError);
+    ecCharError: Result := tbtstring(RPS_CharError);
+    ecSyntaxError: Result := tbtstring(RPS_SyntaxError);
+    ecUnexpectedEndOfFile: Result := tbtstring(RPS_EOF);
+    ecSemicolonExpected: Result := tbtstring(RPS_SemiColonExpected);
+    ecBeginExpected: Result := tbtstring(RPS_BeginExpected);
+    ecPeriodExpected: Result := tbtstring(RPS_PeriodExpected);
+    ecDuplicateIdentifier: Result := tbtstring(Format (RPS_DuplicateIdent, [Param]));
+    ecColonExpected: Result := tbtstring(RPS_ColonExpected);
+    ecUnknownType: Result := tbtstring(Format (RPS_UnknownType, [Param]));
+    ecCloseRoundExpected: Result := tbtstring(RPS_CloseRoundExpected);
+    ecTypeMismatch: Result := tbtstring(RPS_TypeMismatch);
+    ecInternalError: Result := tbtstring(Format (RPS_InternalError, [Param]));
+    ecAssignmentExpected: Result := tbtstring(RPS_AssignmentExpected);
+    ecThenExpected: Result := tbtstring(RPS_ThenExpected);
+    ecDoExpected: Result := tbtstring(RPS_DoExpected);
+    ecNoResult: Result := tbtstring(RPS_NoResult);
+    ecOpenRoundExpected: Result := tbtstring(RPS_OpenRoundExpected);
+    ecCommaExpected: Result := tbtstring(RPS_CommaExpected);
+    ecToExpected: Result := tbtstring(RPS_ToExpected);
+    ecIsExpected: Result := tbtstring(RPS_IsExpected);
+    ecOfExpected: Result := tbtstring(RPS_OfExpected);
+    ecCloseBlockExpected: Result := tbtstring(RPS_CloseBlockExpected);
+    ecVariableExpected: Result := tbtstring(RPS_VariableExpected);
+    ecStringExpected: result := tbtstring(RPS_StringExpected);
+    ecEndExpected: Result := tbtstring(RPS_EndExpected);
+    ecUnSetLabel: Result := tbtstring(Format (RPS_UnSetLabel, [Param]));
+    ecNotInLoop: Result := tbtstring(RPS_NotInLoop);
+    ecInvalidJump: Result := tbtstring(RPS_InvalidJump);
+    ecOpenBlockExpected: Result := tbtstring(RPS_OpenBlockExpected);
+    ecWriteOnlyProperty: Result := tbtstring(RPS_WriteOnlyProperty);
+    ecReadOnlyProperty: Result := tbtstring(RPS_ReadOnlyProperty);
+    ecClassTypeExpected: Result := tbtstring(RPS_ClassTypeExpected);
+    ecCustomError: Result := Param;
+    ecDivideByZero: Result := tbtstring(RPS_DivideByZero);
+    ecMathError: Result := tbtstring(RPS_MathError);
+    ecUnsatisfiedForward: Result := tbtstring(Format (RPS_UnsatisfiedForward, [Param]));
+    ecForwardParameterMismatch: Result := tbtstring(RPS_ForwardParameterMismatch);
+    ecInvalidnumberOfParameters: Result := tbtstring(RPS_InvalidNumberOfParameter);
+    {$IFDEF PS_USESSUPPORT}
+    ecNotAllowed : Result:=tbtstring(Format(RPS_NotAllowed,[Param]));
+    ecUnitNotFoundOrContainsErrors: Result:=tbtstring(Format(RPS_UnitNotFound,[Param]));
+    {$ENDIF}
+  else
+    Result := tbtstring(RPS_UnknownError);
+  end;
+  Result := Result;
+end;
+
+
+{ TPSPascalCompilerHint }
+
+function TPSPascalCompilerHint.ErrorType: tbtString;
+begin
+  Result := tbtstring(RPS_Hint);
+end;
+
+function TPSPascalCompilerHint.ShortMessageToString: tbtString;
+begin
+  case Hint of
+    ehVariableNotUsed: Result := tbtstring(Format (RPS_VariableNotUsed, [Param]));
+    ehFunctionNotUsed: Result := tbtstring(Format (RPS_FunctionNotUsed, [Param]));
+    ehCustomHint: Result := Param;
+  else
+    Result := tbtstring(RPS_UnknownHint);
+  end;
+end;
+
+{ TPSPascalCompilerWarning }
+
+function TPSPascalCompilerWarning.ErrorType: tbtString;
+begin
+  Result := tbtstring(RPS_Warning);
+end;
+
+function TPSPascalCompilerWarning.ShortMessageToString: tbtString;
+begin
+  case Warning of
+    ewCustomWarning: Result := Param;
+    ewCalculationAlwaysEvaluatesTo: Result := tbtstring(Format (RPS_CalculationAlwaysEvaluatesTo, [Param]));
+    ewIsNotNeeded: Result := tbtstring(Format (RPS_IsNotNeeded, [Param]));
+    ewAbstractClass: Result := tbtstring(RPS_AbstractClass);
+  else
+    Result := tbtstring(RPS_UnknownWarning);
+  end;
+end;
+
+{ TPSPascalCompilerMessage }
+
+function TPSPascalCompilerMessage.MessageToString: tbtString;
+begin
+  Result := '['+ErrorType+'] '+FModuleName+'('+IntToStr(FRow)+':'+IntToStr(FCol)+'): '+ShortMessageToString;
+end;
+
+procedure TPSPascalCompilerMessage.SetParserPos(Parser: TPSPascalParser);
+begin
+  FPosition := Parser.CurrTokenPos;
+  FRow := Parser.Row;
+  FCol := Parser.Col;
+end;
+
+procedure TPSPascalCompilerMessage.SetCustomPos(Pos, Row, Col: Cardinal);
+begin
+  FPosition := Pos;
+  FRow := Row;
+  FCol := Col;
+end;
+
+{ TUnConstOperation }
+
+destructor TUnConstOperation.Destroy;
+begin
+  FVal1.Free;
+  inherited Destroy;
+end;
+
+
+{ TBinConstOperation }
+
+destructor TBinConstOperation.Destroy;
+begin
+  FVal1.Free;
+  FVal2.Free;
+  inherited Destroy;
+end;
+
+{ TConstData }
+
+destructor TConstData.Destroy;
+begin
+  DisposeVariant(FData);
+  inherited Destroy;
+end;
+
+
+{ TConstOperation }
+
+procedure TConstOperation.SetPos(Parser: TPSPascalParser);
+begin
+  FDeclPosition := Parser.CurrTokenPos;
+  FDeclRow := Parser.Row;
+  FDeclCol := Parser.Col;
+end;
+
+{ TPSValue }
+
+procedure TPSValue.SetParserPos(P: TPSPascalParser);
+begin
+  FPos := P.CurrTokenPos;
+  FRow := P.Row;
+  FCol := P.Col;
+end;
+
+{ TPSValueData }
+
+destructor TPSValueData.Destroy;
+begin
+  DisposeVariant(FData);
+  inherited Destroy;
+end;
+
+
+{ TPSValueReplace }
+
+constructor TPSValueReplace.Create;
+begin
+  FFreeNewValue := True;
+  FReplaceTimes := 1;
+end;
+
+destructor TPSValueReplace.Destroy;
+begin
+  if FFreeOldValue then
+    FOldValue.Free;
+  if FFreeNewValue then
+    FNewValue.Free;
+  inherited Destroy;
+end;
+
+
+
+{ TPSUnValueOp }
+
+destructor TPSUnValueOp.Destroy;
+begin
+  FVal1.Free;
+  inherited Destroy;
+end;
+
+{ TPSBinValueOp }
+
+destructor TPSBinValueOp.Destroy;
+begin
+  FVal1.Free;
+  FVal2.Free;
+  inherited Destroy;
+end;
+
+
+
+
+{ TPSSubValue }
+
+destructor TPSSubValue.Destroy;
+begin
+  FSubNo.Free;
+  inherited Destroy;
+end;
+
+{ TPSValueVar }
+
+constructor TPSValueVar.Create;
+begin
+  inherited Create;
+  FRecItems := TPSList.Create;
+end;
+
+destructor TPSValueVar.Destroy;
+var
+  i: Longint;
+begin
+  for i := 0 to FRecItems.Count -1 do
+  begin
+    TPSSubItem(FRecItems[I]).Free;
+  end;
+  FRecItems.Free;
+  inherited Destroy;
+end;
+
+function TPSValueVar.GetRecCount: Cardinal;
+begin
+  Result := FRecItems.Count;
+end;
+
+function TPSValueVar.GetRecItem(I: Cardinal): TPSSubItem;
+begin
+  Result := FRecItems[I];
+end;
+
+function TPSValueVar.RecAdd(Val: TPSSubItem): Cardinal;
+begin
+  Result := FRecItems.Add(Val);
+end;
+
+procedure TPSValueVar.RecDelete(I: Cardinal);
+var
+  rr :TPSSubItem;
+begin
+  rr := FRecItems[i];
+  FRecItems.Delete(I);
+  rr.Free;
+end;
+
+{ TPSValueProc }
+
+destructor TPSValueProc.Destroy;
+begin
+  FSelfPtr.Free;
+  FParameters.Free;
+end;
+{ TPSParameter }
+
+destructor TPSParameter.Destroy;
+begin
+  FTempVar.Free;
+  FValue.Free;
+  inherited Destroy;
+end;
+
+
+  { TPSParameters }
+
+function TPSParameters.Add: TPSParameter;
+begin
+  Result := TPSParameter.Create;
+  FItems.Add(Result);
+end;
+
+constructor TPSParameters.Create;
+begin
+  inherited Create;
+  FItems := TPSList.Create;
+end;
+
+procedure TPSParameters.Delete(I: Cardinal);
+var
+  p: TPSParameter;
+begin
+  p := FItems[I];
+  FItems.Delete(i);
+  p.Free;
+end;
+
+destructor TPSParameters.Destroy;
+var
+  i: Longint;
+begin
+  for i := FItems.Count -1 downto 0 do
+  begin
+    TPSParameter(FItems[I]).Free;
+  end;
+  FItems.Free;
+  inherited Destroy;
+end;
+
+function TPSParameters.GetCount: Cardinal;
+begin
+  Result := FItems.Count;
+end;
+
+function TPSParameters.GetItem(I: Longint): TPSParameter;
+begin
+  Result := FItems[I];
+end;
+
+
+{ TPSValueArray }
+
+function TPSValueArray.Add(Item: TPSValue): Cardinal;
+begin
+  Result := FItems.Add(Item);
+end;
+
+constructor TPSValueArray.Create;
+begin
+  inherited Create;
+  FItems := TPSList.Create;
+end;
+
+procedure TPSValueArray.Delete(I: Cardinal);
+begin
+  FItems.Delete(i);
+end;
+
+destructor TPSValueArray.Destroy;
+var
+  i: Longint;
+begin
+  for i := FItems.Count -1 downto 0 do
+    TPSValue(FItems[I]).Free;
+  FItems.Free;
+
+  inherited Destroy;
+end;
+
+function TPSValueArray.GetCount: Cardinal;
+begin
+  Result := FItems.Count;
+end;
+
+function TPSValueArray.GetItem(I: Cardinal): TPSValue;
+begin
+  Result := FItems[I];
+end;
+
+
+{ TPSValueAllocatedStackVar }
+
+destructor TPSValueAllocatedStackVar.Destroy;
+var
+  pv: TPSProcVar;
+begin
+  {$IFDEF DEBUG}
+  if Cardinal(LocalVarNo +1) <> proc.ProcVars.Count then
+  begin
+    Abort;
+    exit;
+  end;
+  {$ENDIF}
+  if Proc <> nil then
+  begin
+    pv := Proc.ProcVars[Proc.ProcVars.Count -1];
+    Proc.ProcVars.Delete(Proc.ProcVars.Count -1);
+    pv.Free;
+    Proc.Data := Proc.Data + tbtChar(CM_PO);
+  end;
+  inherited Destroy;
+end;
+
+
+
+
+function AddImportedClassVariable(Sender: TPSPascalCompiler; const VarName, VarType: tbtString): Boolean;
+var
+  P: TPSVar;
+begin
+  P := Sender.AddVariableN(VarName, VarType);
+  if p = nil then
+  begin
+    Result := False;
+    Exit;
+  end;
+  SetVarExportName(P, FastUppercase(VarName));
+  p.Use;
+  Result := True;
+end;
+
+
+{'class:'+CLASSNAME+'|'+FUNCNAME+'|'+chr(CallingConv)+chr(hasresult)+params
+
+For property write functions there is an '@' after the funcname.
+}
+
+const
+  ProcHDR = 'procedure a;';
+
+
+
+{ TPSCompileTimeClass }
+
+function TPSCompileTimeClass.CastToType(IntoType: TPSType;
+  var ProcNo: Cardinal): Boolean;
+var
+  P: TPSExternalProcedure;
+begin
+  if (IntoType <> nil) and (IntoType.BaseType <> btClass) and (IntoType.BaseType <> btInterface) then
+  begin
+    Result := False;
+    exit;
+  end;
+  if FCastProc <> InvalidVal then
+  begin
+    Procno := FCastProc;
+    Result := True;
+    exit;
+  end;
+  ProcNo := FOwner. AddUsedFunction2(P);
+  P.RegProc := FOwner.AddFunction(ProcHDR);
+  P.RegProc.Name := '';
+
+  with P.RegProc.Decl.AddParam do
+  begin
+    OrgName := 'Org';
+    aType := Self.FType;
+  end;
+  with P.RegProc.Decl.AddParam do
+  begin
+    OrgName := 'TypeNo';
+    aType := FOwner.at2ut(FOwner.FindBaseType(btU32));
+  end;
+  P.RegProc.Decl.Result := IntoType;
+  P.RegProc.ImportDecl := 'class:+';
+  FCastProc := ProcNo;
+  Result := True;
+end;
+
+
+function TPSCompileTimeClass.ClassFunc_Call(Index: Cardinal;
+  var ProcNo: Cardinal): Boolean;
+var
+  C: TPSDelphiClassItemConstructor;
+  P: TPSExternalProcedure;
+  s: tbtString;
+  i: Longint;
+
+begin
+  if FIsAbstract then
+    FOwner.MakeWarning('', ewAbstractClass, '');
+  C := Pointer(Index);
+  if c.MethodNo = InvalidVal then
+  begin
+    ProcNo := FOwner.AddUsedFunction2(P);
+    P.RegProc := FOwner.AddFunction(ProcHDR);
+    P.RegProc.Name := '';
+    P.RegProc.Decl.Assign(c.Decl);
+    s := 'class:' + C.Owner.FClassName + '|' + C.Name + '|'+ chr(0);
+    if c.Decl.Result = nil then
+      s := s + #0
+    else
+      s := s + #1;
+    for i := 0 to C.Decl.ParamCount -1 do
+    begin
+      if c.Decl.Params[i].Mode <> pmIn then
+        s := s + #1
+      else
+        s := s + #0;
+    end;
+    P.RegProc.ImportDecl := s;
+    C.MethodNo := ProcNo;
+  end else begin
+     ProcNo := c.MethodNo;
+  end;
+  Result := True;
+end;
+
+function TPSCompileTimeClass.ClassFunc_Find(const Name: tbtString;
+  var Index: Cardinal): Boolean;
+var
+  H: Longint;
+  I: Longint;
+  CurrClass: TPSCompileTimeClass;
+  C: TPSDelphiClassItem;
+begin
+  H := MakeHash(Name);
+  CurrClass := Self;
+  while CurrClass <> nil do
+  begin
+    for i := CurrClass.FClassItems.Count -1 downto 0 do
+    begin
+      C := CurrClass.FClassItems[I];
+      if (c is TPSDelphiClassItemConstructor) and (C.NameHash = H) and (C.Name = Name) then
+      begin
+        Index := Cardinal(C);
+        Result := True;
+        exit;
+      end;
+    end;
+    CurrClass := CurrClass.FInheritsFrom;
+  end;
+  Result := False;
+end;
+
+
+class function TPSCompileTimeClass.CreateC(FClass: TClass; aOwner: TPSPascalCompiler; aType: TPSType): TPSCompileTimeClass;
+begin
+  Result := TPSCompileTimeClass.Create(FastUpperCase(tbtstring(FClass.ClassName)), aOwner, aType);
+  Result.FClass := FClass;
+end;
+
+constructor TPSCompileTimeClass.Create(ClassName: tbtString; aOwner: TPSPascalCompiler; aType: TPSType);
+begin
+  inherited Create;
+  FType := aType;
+  FCastProc := InvalidVal;
+  FNilProc := InvalidVal;
+
+  FDefaultProperty := InvalidVal;
+  FClassName := Classname;
+  FClassNameHash := MakeHash(FClassName);
+  FClassItems := TPSList.Create;
+  FOwner := aOwner;
+end;
+
+destructor TPSCompileTimeClass.Destroy;
+var
+  I: Longint;
+begin
+  for i := FClassItems.Count -1 downto 0 do
+    TPSDelphiClassItem(FClassItems[I]).Free;
+  FClassItems.Free;
+  inherited Destroy;
+end;
+
+
+function TPSCompileTimeClass.Func_Call(Index: Cardinal;
+  var ProcNo: Cardinal): Boolean;
+var
+  C: TPSDelphiClassItemMethod;
+  P: TPSExternalProcedure;
+  i: Longint;
+  s: tbtString;
+
+begin
+  C := Pointer(Index);
+  if c.MethodNo = InvalidVal then
+  begin
+    ProcNo := FOwner.AddUsedFunction2(P);
+    P.RegProc := FOwner.AddFunction(ProcHDR);
+    P.RegProc.Name := '';
+    p.RegProc.Decl.Assign(c.Decl);
+    s := 'class:' + C.Owner.FClassName + '|' + C.Name + '|'+ chr(0);
+    if c.Decl.Result = nil then
+      s := s + #0
+    else
+      s := s + #1;
+    for i := 0 to c.Decl.ParamCount -1 do
+    begin
+      if c.Decl.Params[i].Mode <> pmIn then
+        s := s + #1
+      else
+        s := s + #0;
+    end;
+    P.RegProc.ImportDecl := s;
+    C.MethodNo := ProcNo;
+  end else begin
+     ProcNo := c.MethodNo;
+  end;
+  Result := True;
+end;
+
+function TPSCompileTimeClass.Func_Find(const Name: tbtString;
+  var Index: Cardinal): Boolean;
+var
+  H: Longint;
+  I: Longint;
+  CurrClass: TPSCompileTimeClass;
+  C: TPSDelphiClassItem;
+begin
+  H := MakeHash(Name);
+  CurrClass := Self;
+  while CurrClass <> nil do
+  begin
+    for i := CurrClass.FClassItems.Count -1 downto 0 do
+    begin
+      C := CurrClass.FClassItems[I];
+      if (c is TPSDelphiClassItemMethod) and (C.NameHash = H) and (C.Name = Name) then
+      begin
+        Index := Cardinal(C);
+        Result := True;
+        exit;
+      end;
+    end;
+    CurrClass := CurrClass.FInheritsFrom;
+  end;
+  Result := False;
+end;
+
+function TPSCompileTimeClass.GetCount: Longint;
+begin
+  Result := FClassItems.Count;
+end;
+
+function TPSCompileTimeClass.GetItem(i: Longint): TPSDelphiClassItem;
+begin
+  Result := FClassItems[i];
+end;
+
+function TPSCompileTimeClass.IsCompatibleWith(aType: TPSType): Boolean;
+var
+  Temp: TPSCompileTimeClass;
+begin
+  if (atype.BaseType <> btClass) then
+  begin
+    Result := False;
+    exit;
+  end;
+  temp := TPSClassType(aType).Cl;
+  while Temp <> nil do
+  begin
+    if Temp = Self then
+    begin
+      Result := True;
+      exit;
+    end;
+    Temp := Temp.FInheritsFrom;
+  end;
+  Result := False;
+end;
+
+function TPSCompileTimeClass.Property_Find(const Name: tbtString;
+  var Index: Cardinal): Boolean;
+var
+  H: Longint;
+  I: Longint;
+  CurrClass: TPSCompileTimeClass;
+  C: TPSDelphiClassItem;
+begin
+  if Name = '' then
+  begin
+    CurrClass := Self;
+    while CurrClass <> nil do
+    begin
+      if CurrClass.FDefaultProperty <> InvalidVal then
+      begin
+        Index := Cardinal(CurrClass.FClassItems[Currclass.FDefaultProperty]);
+        result := True;
+        exit;
+      end;
+      CurrClass := CurrClass.FInheritsFrom;
+    end;
+    Result := False;
+    exit;
+  end;
+  H := MakeHash(Name);
+  CurrClass := Self;
+  while CurrClass <> nil do
+  begin
+    for i := CurrClass.FClassItems.Count -1 downto 0 do
+    begin
+      C := CurrClass.FClassItems[I];
+      if (c is TPSDelphiClassItemProperty) and (C.NameHash = H) and (C.Name = Name) then
+      begin
+        Index := Cardinal(C);
+        Result := True;
+        exit;
+      end;
+    end;
+    CurrClass := CurrClass.FInheritsFrom;
+  end;
+  Result := False;
+end;
+
+function TPSCompileTimeClass.Property_Get(Index: Cardinal;
+  var ProcNo: Cardinal): Boolean;
+var
+  C: TPSDelphiClassItemProperty;
+  P: TPSExternalProcedure;
+  s: tbtString;
+
+begin
+  C := Pointer(Index);
+  if c.AccessType = iptW then
+  begin
+    Result := False;
+    exit;
+  end;
+  if c.ReadProcNo = InvalidVal then
+  begin
+    ProcNo := FOwner.AddUsedFunction2(P);
+    P.RegProc := FOwner.AddFunction(ProcHDR);
+    P.RegProc.Name := '';
+    P.RegProc.Decl.Result := C.Decl.Result;
+    s := 'class:' + C.Owner.FClassName + '|' + C.Name + '|'+#0#0#0#0;
+    Longint((@(s[length(s)-3]))^) := c.Decl.ParamCount +1;
+    P.RegProc.ImportDecl := s;
+    C.ReadProcNo := ProcNo;
+  end else begin
+     ProcNo := c.ReadProcNo;
+  end;
+  Result := True;
+end;
+
+function TPSCompileTimeClass.Property_GetHeader(Index: Cardinal;
+  Dest: TPSParametersDecl): Boolean;
+var
+  c: TPSDelphiClassItemProperty;
+begin
+  C := Pointer(Index);
+  FOwner.UseProc(c.Decl);
+  Dest.Assign(c.Decl);
+  Result := True;
+end;
+
+function TPSCompileTimeClass.Property_Set(Index: Cardinal;
+  var ProcNo: Cardinal): Boolean;
+var
+  C: TPSDelphiClassItemProperty;
+  P: TPSExternalProcedure;
+  s: tbtString;
+
+begin
+  C := Pointer(Index);
+  if c.AccessType = iptR then
+  begin
+    Result := False;
+    exit;
+  end;
+  if c.WriteProcNo = InvalidVal then
+  begin
+    ProcNo := FOwner.AddUsedFunction2(P);
+    P.RegProc := FOwner.AddFunction(ProcHDR);
+    P.RegProc.Name := '';
+    s := 'class:' + C.Owner.FClassName + '|' + C.Name + '@|'#0#0#0#0;
+    Longint((@(s[length(s)-3]))^) := C.Decl.ParamCount+1;
+    P.RegProc.ImportDecl := s;
+    C.WriteProcNo := ProcNo;
+  end else begin
+     ProcNo := c.WriteProcNo;
+  end;
+  Result := True;
+end;
+
+function TPSCompileTimeClass.RegisterMethod(const Decl: tbtString): Boolean;
+var
+  DOrgName: tbtString;
+  DDecl: TPSParametersDecl;
+  FT: TPMFuncType;
+  p: TPSDelphiClassItemMethod;
+begin
+  DDecl := TPSParametersDecl.Create;
+  try
+    if not ParseMethod(FOwner, FClassName, Decl, DOrgName, DDecl, FT) then
+    begin
+      Result := False;
+      {$IFDEF DEBUG} raise EPSCompilerException.CreateFmt(RPS_UnableToRegister, [Decl]); {$ENDIF}
+      exit;
+    end;
+    if ft = mftConstructor then
+      p := TPSDelphiClassItemConstructor.Create(Self)
+    else
+      p := TPSDelphiClassItemMethod.Create(self);
+    p.OrgName := DOrgName;
+    p.Decl.Assign(DDecl);
+    p.MethodNo := InvalidVal;
+    FClassItems.Add(p);
+    Result := True;
+  finally
+    DDecl.Free;
+  end;
+end;
+
+procedure TPSCompileTimeClass.RegisterProperty(const PropertyName,
+  PropertyType: tbtString; PropAC: TPSPropType);
+var
+  FType: TPSType;
+  Param: TPSParameterDecl;
+  p: TPSDelphiClassItemProperty;
+  PT: tbtString;
+begin
+  pt := PropertyType;
+  p := TPSDelphiClassItemProperty.Create(Self);
+  p.AccessType := PropAC;
+  p.ReadProcNo := InvalidVal;
+  p.WriteProcNo := InvalidVal;
+  p.OrgName := PropertyName;
+  repeat
+    FType := FOwner.FindType(FastUpperCase(grfw(pt)));
+    if FType = nil then
+    begin
+      p.Free;
+      Exit;
+    end;
+    if p.Decl.Result = nil  then p.Decl.Result := FType else
+    begin
+      param := p.Decl.AddParam;
+      Param.OrgName := 'param'+IntToStr(p.Decl.ParamCount);
+      Param.aType := FType;
+    end;
+  until pt = '';
+  FClassItems.Add(p);
+end;
+
+
+procedure TPSCompileTimeClass.RegisterPublishedProperties;
+var
+  p: PPropList;
+  i, Count: Longint;
+  a: TPSPropType;
+begin
+  if (Fclass = nil) or (Fclass.ClassInfo = nil) then exit;
+  Count := GetTypeData(fclass.ClassInfo)^.PropCount;
+  GetMem(p, Count * SizeOf(Pointer));
+  GetPropInfos(fclass.ClassInfo, p);
+  for i := Count -1 downto 0 do
+  begin
+    if p^[i]^.PropType^.Kind in [tkLString, tkInteger, tkChar, tkEnumeration, tkFloat, tkString, tkSet, tkClass, tkMethod{$IFNDEF PS_NOWIDESTRING}, tkWString{$ENDIF}] then
+    begin
+      if (p^[i]^.GetProc <> nil) then
+      begin
+        if p^[i]^.SetProc = nil then
+          a := iptr
+        else
+          a := iptrw;
+      end else
+      begin
+        a := iptW;
+        if p^[i]^.SetProc = nil then continue;
+      end;
+      RegisterProperty(p^[i]^.Name, p^[i]^.PropType^.Name, a);
+    end;
+  end;
+  FreeMem(p);
+end;
+
+function TPSCompileTimeClass.RegisterPublishedProperty(const Name: tbtString): Boolean;
+var
+  p: PPropInfo;
+  a: TPSPropType;
+begin
+  if (Fclass = nil) or (Fclass.ClassInfo = nil) then begin Result := False; exit; end;
+  p := GetPropInfo(fclass.ClassInfo, string(Name));
+  if p = nil then begin Result := False; exit; end;
+  if (p^.GetProc <> nil) then
+  begin
+    if p^.SetProc = nil then
+      a := iptr
+    else
+      a := iptrw;
+  end else
+  begin
+    a := iptW;
+    if p^.SetProc = nil then begin result := False; exit; end;
+  end;
+  RegisterProperty(p^.Name, p^.PropType^.Name, a);
+  Result := True;
+end;
+
+
+procedure TPSCompileTimeClass.SetDefaultPropery(const Name: tbtString);
+var
+  i,h: Longint;
+  p: TPSDelphiClassItem;
+  s: tbtString;
+
+begin
+  s := FastUppercase(name);
+  h := MakeHash(s);
+  for i := FClassItems.Count -1 downto 0 do
+  begin
+    p := FClassItems[i];
+    if (p.NameHash = h) and (p.Name = s) then
+    begin
+      if p is TPSDelphiClassItemProperty then
+      begin
+        if p.Decl.ParamCount = 0 then
+          Raise EPSCompilerException.Create(RPS_NotArrayProperty);
+        FDefaultProperty := I;
+        exit;
+      end else Raise EPSCompilerException.Create(RPS_NotProperty);
+    end;
+  end;
+  raise EPSCompilerException.Create(RPS_UnknownProperty);
+end;
+
+function TPSCompileTimeClass.SetNil(var ProcNo: Cardinal): Boolean;
+var
+  P: TPSExternalProcedure;
+
+begin
+  if FNilProc <> InvalidVal then
+  begin
+    Procno := FNilProc;
+    Result := True;
+    exit;
+  end;
+  ProcNo := FOwner.AddUsedFunction2(P);
+  P.RegProc := FOwner.AddFunction(ProcHDR);
+  P.RegProc.Name := '';
+  with P.RegProc.Decl.AddParam do
+  begin
+    OrgName := 'VarNo';
+    aType := FOwner.at2ut(FType);
+  end;
+  P.RegProc.ImportDecl := 'class:-';
+  FNilProc := Procno;
+  Result := True;
+end;
+
+{ TPSSetType }
+
+function TPSSetType.GetBitSize: Longint;
+begin
+  case SetType.BaseType of
+    btEnum: begin Result := TPSEnumType(setType).HighValue+1; end;
+    btChar, btU8: Result := 256;
+  else
+    Result := 0;
+  end;
+end;
+
+function TPSSetType.GetByteSize: Longint;
+var
+  r: Longint;
+begin
+  r := BitSize;
+  if r mod 8 <> 0 then inc(r, 7);
+   Result := r div 8;
+end;
+
+
+{ TPSBlockInfo }
+
+procedure TPSBlockInfo.Clear;
+var
+  i: Longint;
+begin
+  for i := WithList.Count -1 downto 0 do
+  begin
+    TPSValue(WithList[i]).Free;
+    WithList.Delete(i);
+  end;
+end;
+
+constructor TPSBlockInfo.Create(Owner: TPSBlockInfo);
+begin
+  inherited Create;
+  FOwner := Owner;
+  FWithList := TPSList.Create;
+  if FOwner <> nil then
+  begin
+    FProcNo := FOwner.ProcNo;
+    FProc := FOwner.Proc;
+  end;
+end;
+
+destructor TPSBlockInfo.Destroy;
+begin
+  Clear;
+  FWithList.Free;
+  inherited Destroy;
+end;
+
+{ TPSAttributeTypeField }
+procedure TPSAttributeTypeField.SetFieldOrgName(const Value: tbtString);
+begin
+  FFieldOrgName := Value;
+  FFieldName := FastUpperCase(Value);
+  FFieldNameHash := MakeHash(FFieldName);
+end;
+
+constructor TPSAttributeTypeField.Create(AOwner: TPSAttributeType);
+begin
+  inherited Create;
+  FOwner := AOwner;
+end;
+
+{ TPSAttributeType }
+
+function TPSAttributeType.GetField(I: Longint): TPSAttributeTypeField;
+begin
+  Result := TPSAttributeTypeField(FFields[i]);
+end;
+
+function TPSAttributeType.GetFieldCount: Longint;
+begin
+  Result := FFields.Count;
+end;
+
+procedure TPSAttributeType.SetName(const s: tbtString);
+begin
+  FOrgname := s;
+  FName := FastUppercase(s);
+  FNameHash := MakeHash(FName);
+end;
+
+constructor TPSAttributeType.Create;
+begin
+  inherited Create;
+  FFields := TPSList.Create;
+end;
+
+destructor TPSAttributeType.Destroy;
+var
+  i: Longint;
+begin
+  for i := FFields.Count -1 downto 0 do
+  begin
+    TPSAttributeTypeField(FFields[i]).Free;
+  end;
+  FFields.Free;
+  inherited Destroy;
+end;
+
+function TPSAttributeType.AddField: TPSAttributeTypeField;
+begin
+  Result := TPSAttributeTypeField.Create(self);
+  FFields.Add(Result);
+end;
+
+procedure TPSAttributeType.DeleteField(I: Longint);
+var
+  Fld: TPSAttributeTypeField;
+begin
+  Fld := FFields[i];
+  FFields.Delete(i);
+  Fld.Free;
+end;
+
+{ TPSAttribute }
+function TPSAttribute.GetValueCount: Longint;
+begin
+  Result := FValues.Count;
+end;
+
+function TPSAttribute.GetValue(I: Longint): PIfRVariant;
+begin
+  Result := FValues[i];
+end;
+
+constructor TPSAttribute.Create(AttribType: TPSAttributeType);
+begin
+  inherited Create;
+  FValues := TPSList.Create;
+  FAttribType := AttribType;
+end;
+
+procedure TPSAttribute.DeleteValue(i: Longint);
+var
+  Val: PIfRVariant;
+begin
+  Val := FValues[i];
+  FValues.Delete(i);
+  DisposeVariant(Val);
+end;
+
+function TPSAttribute.AddValue(v: PIFRVariant): Longint;
+begin
+  Result := FValues.Add(v);
+end;
+
+
+destructor TPSAttribute.Destroy;
+var
+  i: Longint;
+begin
+  for i := FValues.Count -1 downto 0 do
+  begin
+    DisposeVariant(FValues[i]);
+  end;
+  FValues.Free;
+  inherited Destroy;
+end;
+
+
+procedure TPSAttribute.Assign(Item: TPSAttribute);
+var
+  i: Longint;
+  p: PIfRVariant;
+begin
+  for i := FValues.Count -1 downto 0 do
+  begin
+    DisposeVariant(FValues[i]);
+  end;
+  FValues.Clear;
+  FAttribType := Item.FAttribType;
+  for i := 0 to Item.FValues.Count -1 do
+  begin
+    p := DuplicateVariant(Item.FValues[i]);
+    FValues.Add(p);
+  end;
+end;
+
+{ TPSAttributes }
+
+function TPSAttributes.GetCount: Longint;
+begin
+  Result := FItems.Count;
+end;
+
+function TPSAttributes.GetItem(I: Longint): TPSAttribute;
+begin
+  Result := TPSAttribute(FItems[i]);
+end;
+
+procedure TPSAttributes.Delete(i: Longint);
+var
+  item: TPSAttribute;
+begin
+  item := TPSAttribute(FItems[i]);
+  FItems.Delete(i);
+  Item.Free;
+end;
+
+function TPSAttributes.Add(AttribType: TPSAttributeType): TPSAttribute;
+begin
+  Result := TPSAttribute.Create(AttribType);
+  FItems.Add(Result);
+end;
+
+constructor TPSAttributes.Create;
+begin
+  inherited Create;
+  FItems := TPSList.Create;
+end;
+
+destructor TPSAttributes.Destroy;
+var
+  i: Longint;
+begin
+  for i := FItems.Count -1 downto 0 do
+  begin
+    TPSAttribute(FItems[i]).Free;
+  end;
+  FItems.Free;
+  inherited Destroy;
+end;
+
+procedure TPSAttributes.Assign(attr: TPSAttributes; Move: Boolean);
+var
+  newitem, item: TPSAttribute;
+  i: Longint;
+begin
+  for i := ATtr.FItems.Count -1 downto 0 do
+  begin
+    Item := Attr.Fitems[i];
+    if Move then
+    begin
+      FItems.Add(Item);
+      Attr.FItems.Delete(i);
+    end else
+    begin
+      newitem := TPSAttribute.Create(Item.FAttribType );
+      newitem.Assign(item);
+      FItems.Add(NewItem);
+    end;
+  end;
+
+end;
+
+
+function TPSAttributes.FindAttribute(
+  const Name: tbtString): TPSAttribute;
+var
+  h, i: Longint;
+
+begin
+  h := MakeHash(name);
+  for i := FItems.Count -1 downto 0 do
+  begin
+    Result := FItems[i];
+    if (Result.FAttribType.NameHash = h) and (Result.FAttribType.Name = Name) then
+      exit;
+  end;
+  result := nil;
+end;
+
+{ TPSParameterDecl }
+procedure TPSParameterDecl.SetName(const s: tbtString);
+begin
+  FOrgName := s;
+  FName := FastUppercase(s);
+end;
+
+
+{ TPSParametersDecl }
+
+procedure TPSParametersDecl.Assign(Params: TPSParametersDecl);
+var
+  i: Longint;
+  np, orgp: TPSParameterDecl;
+begin
+  for i := FParams.Count -1 downto 0 do
+  begin
+    TPSParameterDecl(Fparams[i]).Free;
+  end;
+  FParams.Clear;
+  FResult := Params.Result;
+
+  for i := 0 to Params.FParams.count -1 do
+  begin
+    orgp := Params.FParams[i];
+    np := AddParam;
+    np.OrgName := orgp.OrgName;
+    np.Mode := orgp.Mode;
+    np.aType := orgp.aType;
+    np.DeclarePos:=orgp.DeclarePos;
+    np.DeclareRow:=orgp.DeclareRow;
+    np.DeclareCol:=orgp.DeclareCol;
+  end;
+end;
+
+
+function TPSParametersDecl.GetParam(I: Longint): TPSParameterDecl;
+begin
+  Result := FParams[i];
+end;
+
+function TPSParametersDecl.GetParamCount: Longint;
+begin
+  Result := FParams.Count;
+end;
+
+function TPSParametersDecl.AddParam: TPSParameterDecl;
+begin
+  Result := TPSParameterDecl.Create;
+  FParams.Add(Result);
+end;
+
+procedure TPSParametersDecl.DeleteParam(I: Longint);
+var
+  param: TPSParameterDecl;
+begin
+  param := FParams[i];
+  FParams.Delete(i);
+  Param.Free;
+end;
+
+constructor TPSParametersDecl.Create;
+begin
+  inherited Create;
+  FParams := TPSList.Create;
+end;
+
+destructor TPSParametersDecl.Destroy;
+var
+  i: Longint;
+begin
+  for i := FParams.Count -1 downto 0 do
+  begin
+    TPSParameterDecl(Fparams[i]).Free;
+  end;
+  FParams.Free;
+  inherited Destroy;
+end;
+
+function TPSParametersDecl.Same(d: TPSParametersDecl): boolean;
+var
+  i: Longint;
+begin
+  if (d = nil) or (d.ParamCount <> ParamCount) or (d.Result <> Self.Result) then
+    Result := False
+  else begin
+    for i := 0 to d.ParamCount -1 do
+    begin
+      if (d.Params[i].Mode <> Params[i].Mode) or (d.Params[i].aType <> Params[i].aType) then
+      begin
+        Result := False;
+        exit;
+      end;
+    end;
+    Result := True;
+  end;
+end;
+
+{ TPSProceduralType }
+
+constructor TPSProceduralType.Create;
+begin
+  inherited Create;
+  FProcDef := TPSParametersDecl.Create;
+
+end;
+
+destructor TPSProceduralType.Destroy;
+begin
+  FProcDef.Free;
+  inherited Destroy;
+end;
+
+{ TPSDelphiClassItem }
+
+procedure TPSDelphiClassItem.SetName(const s: tbtString);
+begin
+  FOrgName := s;
+  FName := FastUpperCase(s);
+  FNameHash := MakeHash(FName);
+end;
+
+constructor TPSDelphiClassItem.Create(Owner: TPSCompileTimeClass);
+begin
+  inherited Create;
+  FOwner := Owner;
+  FDecl := TPSParametersDecl.Create;
+end;
+
+destructor TPSDelphiClassItem.Destroy;
+begin
+  FDecl.Free;
+  inherited Destroy;
+end;
+
+{$IFNDEF PS_NOINTERFACES}
+{ TPSInterface }
+
+function TPSInterface.CastToType(IntoType: TPSType;
+  var ProcNo: Cardinal): Boolean;
+var
+  P: TPSExternalProcedure;
+begin
+  if (IntoType <> nil) and (IntoType.BaseType <> btInterface) then
+  begin
+    Result := False;
+    exit;
+  end;
+  if FCastProc <> InvalidVal then
+  begin
+    ProcNo := FCastProc;
+    Result := True;
+    exit;
+  end;
+  ProcNo := FOwner.AddUsedFunction2(P);
+  P.RegProc := FOwner.AddFunction(ProcHDR);
+  P.RegProc.Name := '';
+  with P.RegProc.Decl.AddParam do
+  begin
+    OrgName := 'Org';
+    aType := Self.FType;
+  end;
+  with P.RegProc.Decl.AddParam do
+  begin
+    OrgName := 'TypeNo';
+    aType := FOwner.at2ut(FOwner.FindBaseType(btU32));
+  end;
+  P.RegProc.Decl.Result := FOwner.at2ut(IntoType);
+
+  P.RegProc.ImportDecl := 'class:+';
+  FCastProc := ProcNo;
+  Result := True;
+end;
+
+constructor TPSInterface.Create(Owner: TPSPascalCompiler; InheritedFrom: TPSInterface; Guid: TGuid; const Name: tbtString; aType: TPSType);
+begin
+  inherited Create;
+  FCastProc := InvalidVal;
+  FNilProc := InvalidVal;
+
+  FType := aType;
+  FOWner := Owner;
+  FGuid := GUID;
+  Self.InheritedFrom := InheritedFrom;
+
+  FItems := TPSList.Create;
+  FName := Name;
+  FNameHash := MakeHash(Name);
+end;
+
+procedure TPSInterface.SetInheritedFrom(p: TPSInterface);
+begin
+  FInheritedFrom := p;
+end;
+
+destructor TPSInterface.Destroy;
+var
+  i: Longint;
+begin
+  for i := FItems.Count -1 downto 0 do
+  begin
+    TPSInterfaceMethod(FItems[i]).Free;
+  end;
+  FItems.Free;
+  inherited Destroy;
+end;
+
+function TPSInterface.Func_Call(Index: Cardinal;
+  var ProcNo: Cardinal): Boolean;
+var
+  c: TPSInterfaceMethod;
+  P: TPSExternalProcedure;
+  s: tbtString;
+  i: Longint;
+begin
+  c := TPSInterfaceMethod(Index);
+  if c.FScriptProcNo <> InvalidVal then
+  begin
+    Procno := c.FScriptProcNo;
+    Result := True;
+    exit;
+  end;
+  ProcNo := FOwner.AddUsedFunction2(P);
+  P.RegProc := FOwner.AddFunction(ProcHDR);
+  P.RegProc.Name := '';
+  FOwner.UseProc(C.Decl);
+  P.RegProc.Decl.Assign(c.Decl);
+  s := tbtstring('intf:.') + PS_mi2s(c.AbsoluteProcOffset) + tbtchar(ord(c.CC));
+  if c.Decl.Result = nil then
+    s := s + #0
+  else
+    s := s + #1;
+  for i := 0 to C.Decl.ParamCount -1 do
+  begin
+    if c.Decl.Params[i].Mode <> pmIn then
+      s := s + #1
+    else
+      s := s + #0;
+  end;
+  P.RegProc.ImportDecl := s;
+  C.FScriptProcNo := ProcNo;
+  Result := True;
+end;
+
+function TPSInterface.Func_Find(const Name: tbtString;
+  var Index: Cardinal): Boolean;
+var
+  H: Longint;
+  I: Longint;
+  CurrClass: TPSInterface;
+  C: TPSInterfaceMethod;
+begin
+  H := MakeHash(Name);
+  CurrClass := Self;
+  while CurrClass <> nil do
+  begin
+    for i := CurrClass.FItems.Count -1 downto 0 do
+    begin
+      C := CurrClass.FItems[I];
+      if (C.NameHash = H) and (C.Name = Name) then
+      begin
+        Index := Cardinal(c);
+        Result := True;
+        exit;
+      end;
+    end;
+    CurrClass := CurrClass.FInheritedFrom;
+  end;
+  Result := False;
+end;
+
+function TPSInterface.IsCompatibleWith(aType: TPSType): Boolean;
+var
+  Temp: TPSInterface;
+begin
+  if (atype.BaseType = btClass) then // just support it, we'll see what happens
+  begin
+    Result := true;
+    exit;
+  end;
+  if atype.BaseType <> btInterface then
+  begin
+    Result := False;
+    exit;
+  end;
+  temp := TPSInterfaceType(atype).FIntf;
+  while Temp <> nil do
+  begin
+    if Temp = Self then
+    begin
+      Result := True;
+      exit;
+    end;
+    Temp := Temp.FInheritedFrom;
+  end;
+  Result := False;
+end;
+
+procedure TPSInterface.RegisterDummyMethod;
+begin
+  FItems.Add(TPSInterfaceMethod.Create(self));
+end;
+
+function TPSInterface.RegisterMethod(const Declaration: tbtString;
+  const cc: TPSCallingConvention): Boolean;
+var
+  M: TPSInterfaceMethod;
+  DOrgName: tbtString;
+  Func: TPMFuncType;
+begin
+  M := TPSInterfaceMethod.Create(Self);
+  if not ParseMethod(FOwner, '', Declaration, DOrgname, m.Decl, Func) then
+  begin
+    FItems.Add(m); // in any case, add a dummy item
+    Result := False;
+    exit;
+  end;
+  m.FName := FastUppercase(DOrgName);
+  m.FOrgName := DOrgName;
+  m.FNameHash := MakeHash(m.FName);
+  m.FCC := CC;
+  m.FScriptProcNo := InvalidVal;
+  FItems.Add(M);
+  Result := True;
+end;
+
+
+function TPSInterface.SetNil(var ProcNo: Cardinal): Boolean;
+var
+  P: TPSExternalProcedure;
+
+begin
+  if FNilProc <> InvalidVal then
+  begin
+    Procno := FNilProc;
+    Result := True;
+    exit;
+  end;
+  ProcNo := FOwner.AddUsedFunction2(P);
+  P.RegProc := FOwner.AddFunction(ProcHDR);
+  P.RegProc.Name := '';
+  with p.RegProc.Decl.AddParam do
+  begin
+    Mode := pmInOut;
+    OrgName := 'VarNo';
+    aType := FOwner.at2ut(Self.FType);
+  end;
+  P.RegProc.ImportDecl := 'class:-';
+  FNilProc := Procno;
+  Result := True;
+end;
+
+{ TPSInterfaceMethod }
+
+constructor TPSInterfaceMethod.Create(Owner: TPSInterface);
+begin
+  inherited Create;
+  FDecl := TPSParametersDecl.Create;
+  FOwner := Owner;
+  FOffsetCache := InvalidVal;
+end;
+
+function TPSInterfaceMethod.GetAbsoluteProcOffset: Cardinal;
+var
+  ps: TPSInterface;
+begin
+  if FOffsetCache = InvalidVal then
+  begin
+    FOffsetCache := FOwner.FItems.IndexOf(Self);
+    ps := FOwner.FInheritedFrom;
+    while ps <> nil do
+    begin
+      FOffsetCache := FOffsetCache + ps.FItems.Count;
+      ps := ps.FInheritedFrom;
+    end;
+  end;
+  result := FOffsetCache;
+end;
+
+
+destructor TPSInterfaceMethod.Destroy;
+begin
+  FDecl.Free;
+  inherited Destroy;
+end;
+{$ENDIF}
+
+{ TPSVariantType }
+
+function TPSVariantType.GetDynInvokeParamType(Owner: TPSPascalCompiler) : TPSType;
+begin
+  Result := Owner.at2ut(FindAndAddType(owner, '!OPENARRAYOFVARIANT', 'array of variant'));
+end;
+
+function TPSVariantType.GetDynInvokeProcNo(Owner: TPSPascalCompiler; const Name: tbtString;
+  Params: TPSParameters): Cardinal;
+begin
+  Result := Owner.FindProc('IDISPATCHINVOKE');
+end;
+
+function TPSVariantType.GetDynIvokeResulType(
+  Owner: TPSPascalCompiler): TPSType;
+begin
+  Result := Owner.FindType('VARIANT');
+end;
+
+function TPSVariantType.GetDynIvokeSelfType(Owner: TPSPascalCompiler): TPSType;
+begin
+  Result := Owner.at2ut(Owner.FindType('IDISPATCH'));
+end;
+
+
+{ TPSExternalClass }
+function TPSExternalClass.SetNil(var ProcNo: Cardinal): Boolean;
+begin
+  Result := False;
+end;
+
+constructor TPSExternalClass.Create(Se: TIFPSPascalCompiler; TypeNo: TPSType);
+begin
+  inherited Create;
+  Self.SE := se;
+  Self.FTypeNo := TypeNo;
+end;
+
+function TPSExternalClass.Func_Call(Index: Cardinal;
+  var ProcNo: Cardinal): Boolean;
+begin
+  Result := False;
+end;
+
+function TPSExternalClass.Func_Find(const Name: tbtString;
+  var Index: Cardinal): Boolean;
+begin
+  Result := False;
+end;
+
+function TPSExternalClass.IsCompatibleWith(
+  Cl: TPSExternalClass): Boolean;
+begin
+  Result := False;
+end;
+
+function TPSExternalClass.SelfType: TPSType;
+begin
+  Result := nil;
+end;
+
+function TPSExternalClass.CastToType(IntoType: TPSType;
+  var ProcNo: Cardinal): Boolean;
+begin
+  Result := False;
+end;
+
+function TPSExternalClass.CompareClass(OtherTypeNo: TPSType;
+  var ProcNo: Cardinal): Boolean;
+begin
+  Result := false;
+end;
+
+function TPSExternalClass.ClassFunc_Find(const Name: tbtString; var Index: Cardinal): Boolean;
+begin
+  result := false;
+end;
+
+function TPSExternalClass.ClassFunc_Call(Index: Cardinal; var ProcNo: Cardinal): Boolean;
+begin
+  result := false;
+end;
+
+
+{ TPSValueProcVal }
+
+destructor TPSValueProcVal.Destroy;
+begin
+  FProcNo.Free;
+  inherited;
+end;
+
+
+{
+
+Internal error counter: 00020 (increase and then use)
+
+}
+end.
+
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSComponent.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSComponent.pas
new file mode 100644
index 0000000..6229ad0
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSComponent.pas	
@@ -0,0 +1,1509 @@
+unit uPSComponent;
+{$I PascalScript.inc}
+interface
+
+uses
+  SysUtils, Classes, uPSRuntime, uPSDebugger, uPSUtils,
+  uPSCompiler, uPSC_dll, uPSR_dll, uPSPreProcessor;
+
+const
+  {alias to @link(ifps3.cdRegister)}
+  cdRegister = uPSRuntime.cdRegister;
+  {alias to @link(ifps3.cdPascal)}
+  cdPascal = uPSRuntime.cdPascal;
+
+  CdCdecl = uPSRuntime.CdCdecl;
+
+  CdStdCall = uPSRuntime.CdStdCall;
+
+type
+  TPSScript = class;
+  
+  TDelphiCallingConvention = uPSRuntime.TPSCallingConvention;
+  {Alias to @link(ifps3.TPSRuntimeClassImporter)}
+  TPSRuntimeClassImporter = uPSRuntime.TPSRuntimeClassImporter;
+  
+  TPSPlugin = class(TComponent)
+  protected
+    
+    procedure CompOnUses(CompExec: TPSScript); virtual;
+    
+    procedure ExecOnUses(CompExec: TPSScript); virtual;
+    
+    procedure CompileImport1(CompExec: TPSScript); virtual;
+    
+    procedure CompileImport2(CompExec: TPSScript); virtual;
+    
+    procedure ExecImport1(CompExec: TPSScript; const ri: TPSRuntimeClassImporter); virtual;
+    
+    procedure ExecImport2(CompExec: TPSScript; const ri: TPSRuntimeClassImporter); virtual;
+  public
+  end;
+  
+  TIFPS3Plugin = class(TPSPlugin);
+  
+  TPSDllPlugin = class(TPSPlugin)
+  protected
+    procedure CompOnUses(CompExec: TPSScript); override;
+    procedure ExecOnUses(CompExec: TPSScript); override;
+  end;
+  
+  TIFPS3DllPlugin = class(TPSDllPlugin);
+
+
+  TPSPluginItem = class(TCollectionItem)
+  private
+    FPlugin: TPSPlugin;
+    procedure SetPlugin(const Value: TPSPlugin);
+  protected
+    function GetDisplayName: string; override;
+  public
+    procedure Assign(Source: TPersistent); override; //Birb
+  published
+    property Plugin: TPSPlugin read FPlugin write SetPlugin;
+  end;
+
+  
+  TIFPS3CEPluginItem = class(TPSPluginItem);
+
+  
+  TPSPlugins = class(TCollection)
+  private
+    FCompExec: TPSScript;
+  protected
+    
+    function GetOwner: TPersistent; override;
+  public
+    
+    constructor Create(CE: TPSScript);
+  end;
+ 
+ TIFPS3CEPlugins = class(TPSPlugins);
+
+  
+  TPSOnGetNotVariant = function (Sender: TPSScript; const Name: tbtstring): Variant of object;
+  TPSOnSetNotVariant = procedure (Sender: TPSScript; const Name: tbtstring; V: Variant) of object;
+  TPSCompOptions = set of (icAllowNoBegin, icAllowUnit, icAllowNoEnd, icBooleanShortCircuit);
+  
+  TPSVerifyProc = procedure (Sender: TPSScript; Proc: TPSInternalProcedure; const Decl: tbtstring; var Error: Boolean) of object;
+  
+  TPSEvent = procedure (Sender: TPSScript) of object;
+  
+  TPSOnCompImport = procedure (Sender: TObject; x: TPSPascalCompiler) of object;
+
+  TPSOnExecImport = procedure (Sender: TObject; se: TPSExec; x: TPSRuntimeClassImporter) of object;
+  {Script engine event function}
+  TPSOnNeedFile = function (Sender: TObject; const OrginFileName: tbtstring; var FileName, Output: tbtstring): Boolean of object;
+
+  TPSOnProcessDirective = procedure (
+                            Sender: TPSPreProcessor;
+                            Parser: TPSPascalPreProcessorParser;
+                            const Active: Boolean;
+                            const DirectiveName, DirectiveParam: tbtstring;
+                            Var Continue: Boolean) of Object;  // jgv
+
+  TPSScript = class(TComponent)
+  private
+    FOnGetNotificationVariant: TPSOnGetNotVariant;
+    FOnSetNotificationVariant: TPSOnSetNotVariant;
+    FCanAdd: Boolean;
+    FComp: TPSPascalCompiler;
+    FCompOptions: TPSCompOptions;
+    FExec: TPSDebugExec;
+    FSuppressLoadData: Boolean;
+    FScript: TStrings;
+    FOnLine: TNotifyEvent;
+    FUseDebugInfo: Boolean;
+    FOnAfterExecute, FOnCompile, FOnExecute: TPSEvent;
+    FOnCompImport: TPSOnCompImport;
+    FOnExecImport: TPSOnExecImport;
+    RI: TPSRuntimeClassImporter;
+    FPlugins: TPSPlugins;
+    FPP: TPSPreProcessor;
+    FMainFileName: tbtstring;
+    FOnNeedFile: TPSOnNeedFile;
+    FUsePreProcessor: Boolean;
+    FDefines: TStrings;
+    FOnVerifyProc: TPSVerifyProc;
+    FOnProcessDirective: TPSOnProcessDirective;
+    FOnProcessUnknowDirective: TPSOnProcessDirective;
+    FOnFindUnknownFile: TPSOnNeedFile;
+    function GetRunning: Boolean;
+    procedure SetScript(const Value: TStrings);
+    function GetCompMsg(i: Integer): TPSPascalCompilerMessage;
+    function GetCompMsgCount: Longint;
+    function GetAbout: tbtstring;
+    function ScriptUses(Sender: TPSPascalCompiler; const Name: tbtstring): Boolean;
+    function GetExecErrorByteCodePosition: Cardinal;
+    function GetExecErrorCode: TIFError;
+    function GetExecErrorParam: tbtstring;
+    function GetExecErrorProcNo: Cardinal;
+    function GetExecErrorString: tbtstring;
+    function GetExecErrorPosition: Cardinal;
+    function GetExecErrorCol: Cardinal;
+    function GetExecErrorRow: Cardinal;
+    function GetExecErrorFileName: tbtstring;
+    procedure SetDefines(const Value: TStrings);
+  protected
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+
+  protected
+    //jgv move where private before - not very usefull
+    procedure OnLineEvent; virtual;
+    procedure SetMainFileName(const Value: tbtstring); virtual;
+
+    //--jgv new
+    function  DoOnNeedFile (Sender: TObject; const OrginFileName: tbtstring; var FileName, Output: tbtstring): Boolean; virtual;
+    function  DoOnUnknowUses (Sender: TPSPascalCompiler; const Name: tbtstring): Boolean; virtual; // return true if processed
+    procedure DoOnCompImport; virtual;
+    procedure DoOnCompile; virtual;
+    function  DoVerifyProc (Sender: TPSScript; Proc: TPSInternalProcedure; const Decl: tbtstring): Boolean; virtual;
+
+    procedure DoOnExecImport (RunTimeImporter: TPSRuntimeClassImporter); virtual;
+    procedure DoOnExecute (RunTimeImporter: TPSRuntimeClassImporter); virtual;
+    procedure DoAfterExecute; virtual;
+    function  DoOnGetNotificationVariant (const Name: tbtstring): Variant; virtual;
+    procedure DoOnSetNotificationVariant (const Name: tbtstring; V: Variant); virtual;
+
+    procedure DoOnProcessDirective (Sender: TPSPreProcessor;
+                Parser: TPSPascalPreProcessorParser;
+                const Active: Boolean;
+                const DirectiveName, DirectiveParam: tbtstring;
+                Var Continue: Boolean); virtual;
+    procedure DoOnProcessUnknowDirective (Sender: TPSPreProcessor;
+                Parser: TPSPascalPreProcessorParser;
+                const Active: Boolean;
+                const DirectiveName, DirectiveParam: tbtstring;
+                Var Continue: Boolean); virtual;
+  public
+
+    function FindNamedType(const Name: tbtstring): TPSTypeRec;
+
+    function FindBaseType(Bt: TPSBaseType): TPSTypeRec;
+
+    property SuppressLoadData: Boolean read FSuppressLoadData write FSuppressLoadData;
+
+    function LoadExec: Boolean;
+
+    procedure Stop; virtual;
+
+    constructor Create(AOwner: TComponent); override;
+
+    destructor Destroy; override;
+
+    function Compile: Boolean; virtual;
+
+    function Execute: Boolean; virtual;
+
+    property Running: Boolean read GetRunning;
+
+    procedure GetCompiled(var data: tbtstring);
+
+    procedure SetCompiled(const Data: tbtstring);
+
+    property Comp: TPSPascalCompiler read FComp;
+
+    property Exec: TPSDebugExec read FExec;
+
+    property CompilerMessageCount: Longint read GetCompMsgCount;
+
+    property CompilerMessages[i: Longint]: TPSPascalCompilerMessage read GetCompMsg;
+
+    function CompilerErrorToStr(I: Longint): tbtstring;
+
+    property ExecErrorCode: TIFError read GetExecErrorCode;
+
+    property ExecErrorParam: tbtstring read GetExecErrorParam;
+
+    property ExecErrorToString: tbtstring read GetExecErrorString;
+
+    property ExecErrorProcNo: Cardinal read GetExecErrorProcNo;
+
+    property ExecErrorByteCodePosition: Cardinal read GetExecErrorByteCodePosition;
+
+    property ExecErrorPosition: Cardinal read GetExecErrorPosition;
+
+    property ExecErrorRow: Cardinal read GetExecErrorRow;
+
+    property ExecErrorCol: Cardinal read GetExecErrorCol;
+
+    property ExecErrorFileName: tbtstring read GetExecErrorFileName;
+
+    function AddFunctionEx(Ptr: Pointer; const Decl: tbtstring; CallingConv: TDelphiCallingConvention): Boolean;
+
+    function AddFunction(Ptr: Pointer; const Decl: tbtstring): Boolean;
+
+
+    function AddMethodEx(Slf, Ptr: Pointer; const Decl: tbtstring; CallingConv: TDelphiCallingConvention): Boolean;
+
+    function AddMethod(Slf, Ptr: Pointer; const Decl: tbtstring): Boolean;
+
+    function AddRegisteredVariable(const VarName, VarType: tbtstring): Boolean;
+    function AddNotificationVariant(const VarName: tbtstring): Boolean;
+
+    function AddRegisteredPTRVariable(const VarName, VarType: tbtstring): Boolean;
+
+    function GetVariable(const Name: tbtstring): PIFVariant;
+
+    function SetVarToInstance(const VarName: tbtstring; cl: TObject): Boolean;
+
+    procedure SetPointerToData(const VarName: tbtstring; Data: Pointer; aType: TIFTypeRec);
+
+    function TranslatePositionPos(Proc, Position: Cardinal; var Pos: Cardinal; var fn: tbtstring): Boolean;
+
+    function TranslatePositionRC(Proc, Position: Cardinal; var Row, Col: Cardinal; var fn: tbtstring): Boolean;
+
+    function GetProcMethod(const ProcName: tbtstring): TMethod;
+
+    function ExecuteFunction(const Params: array of Variant; const ProcName: tbtstring): Variant;
+  published
+
+    property About: tbtstring read GetAbout stored false;
+
+    property Script: TStrings read FScript write SetScript;
+
+    property CompilerOptions: TPSCompOptions read FCompOptions write FCompOptions;
+
+    property OnLine: TNotifyEvent read FOnLine write FOnLine;
+
+    property OnCompile: TPSEvent read FOnCompile write FOnCompile;
+
+    property OnExecute: TPSEvent read FOnExecute write FOnExecute;
+    
+    property OnAfterExecute: TPSEvent read FOnAfterExecute write FOnAfterExecute;
+    
+    property OnCompImport: TPSOnCompImport read FOnCompImport write FOnCompImport;
+
+    property OnExecImport: TPSOnExecImport read FOnExecImport write FOnExecImport;
+
+    property UseDebugInfo: Boolean read FUseDebugInfo write FUseDebugInfo default True;
+
+    property Plugins: TPSPlugins read FPlugins write FPlugins;
+
+    property MainFileName: tbtstring read FMainFileName write SetMainFileName;
+
+    property UsePreProcessor: Boolean read FUsePreProcessor write FUsePreProcessor;
+
+    property OnNeedFile: TPSOnNeedFile read FOnNeedFile write FOnNeedFile;
+
+    property Defines: TStrings read FDefines write SetDefines;
+
+    property OnVerifyProc: TPSVerifyProc read FOnVerifyProc write FOnVerifyProc;
+    property OnGetNotificationVariant: TPSOnGetNotVariant read FOnGetNotificationVariant write FOnGetNotificationVariant;
+    property OnSetNotificationVariant: TPSOnSetNotVariant read FOnSetNotificationVariant write FOnSetNotificationVariant;
+    property OnFindUnknownFile: TPSOnNeedFile read FOnFindUnknownFile write FOnFindUnknownFile;
+
+  published
+    //-- jgv
+    property OnProcessDirective: TPSOnProcessDirective read FOnProcessDirective write FOnProcessDirective;
+    property OnProcessUnknowDirective: TPSOnProcessDirective read FOnProcessUnknowDirective write FOnProcessUnknowDirective;
+  end;
+
+  TIFPS3CompExec = class(TPSScript);
+
+  
+  TPSBreakPointInfo = class
+  private
+    FLine: Longint;
+    FFileNameHash: Longint;
+    FFileName: tbtstring;
+    procedure SetFileName(const Value: tbtstring);
+  public
+
+    property FileName: tbtstring read FFileName write SetFileName;
+    
+    property FileNameHash: Longint read FFileNameHash;
+    
+    property Line: Longint read FLine write FLine;
+  end;
+  
+  TPSOnLineInfo = procedure (Sender: TObject; const FileName: tbtstring; Position, Row, Col: Cardinal) of object;
+  
+  TPSScriptDebugger = class(TPSScript)
+  private
+    FOnIdle: TNotifyEvent;
+    FBreakPoints: TIFList;
+    FOnLineInfo: TPSOnLineInfo;
+    FLastRow: Cardinal;
+    FOnBreakpoint: TPSOnLineInfo;
+    function GetBreakPoint(I: Integer): TPSBreakPointInfo;
+    function GetBreakPointCount: Longint;
+  protected
+    procedure SetMainFileName(const Value: tbtstring); override;
+  public
+    constructor Create(AOwner: TComponent); override;
+    destructor Destroy; override;
+
+    
+    procedure Pause; virtual;
+
+    procedure Resume; virtual;
+
+    
+    procedure StepInto; virtual;
+
+    procedure StepOver; virtual;
+    
+    procedure SetBreakPoint(const Fn: tbtstring; Line: Longint);
+
+    procedure ClearBreakPoint(const Fn: tbtstring; Line: Longint);
+
+    property BreakPointCount: Longint read GetBreakPointCount;
+
+    property BreakPoint[I: Longint]: TPSBreakPointInfo read GetBreakPoint;
+
+    function HasBreakPoint(const Fn: tbtstring; Line: Longint): Boolean;
+
+    procedure ClearBreakPoints;
+
+    function GetVarContents(const Name: tbtstring): tbtstring;
+  published
+
+    property OnIdle: TNotifyEvent read FOnIdle write FOnIdle;
+
+    property OnLineInfo: TPSOnLineInfo read FOnLineInfo write FOnLineInfo;
+
+    property OnBreakpoint: TPSOnLineInfo read FOnBreakpoint write FOnBreakpoint;
+  end;
+  
+  TIFPS3DebugCompExec = class(TPSScriptDebugger);
+  
+  TPSCustumPlugin = class(TPSPlugin)
+  private
+    FOnCompileImport2: TPSEvent;
+    FOnExecOnUses: TPSEvent;
+    FOnCompOnUses: TPSEvent;
+    FOnCompileImport1: TPSEvent;
+    FOnExecImport1: TPSOnExecImport;
+    FOnExecImport2: TPSOnExecImport;
+  protected
+    procedure CompOnUses(CompExec: TPSScript); override;
+    procedure ExecOnUses(CompExec: TPSScript); override;
+    procedure CompileImport1(CompExec: TPSScript); override;
+    procedure CompileImport2(CompExec: TPSScript); override;
+    procedure ExecImport1(CompExec: TPSScript; const ri: TPSRuntimeClassImporter); override;
+
+    procedure ExecImport2(CompExec: TPSScript; const ri: TPSRuntimeClassImporter); override;
+  public
+  published
+    property OnCompOnUses : TPSEvent read FOnCompOnUses write FOnCompOnUses;
+    property OnExecOnUses: TPSEvent read FOnExecOnUses write FOnExecOnUses;
+    property OnCompileImport1: TPSEvent read FOnCompileImport1 write FOnCompileImport1; 
+    property OnCompileImport2: TPSEvent read FOnCompileImport2 write FOnCompileImport2;
+    property OnExecImport1: TPSOnExecImport read FOnExecImport1 write FOnExecImport1;
+    property OnExecImport2: TPSOnExecImport read FOnExecImport2 write FOnExecImport2;
+  end;  
+
+implementation
+
+
+{$IFDEF DELPHI3UP }
+resourceString
+{$ELSE }
+const
+{$ENDIF }
+
+  RPS_UnableToReadVariant = 'Unable to read variant';
+  RPS_UnableToWriteVariant = 'Unable to write variant';
+  RPS_ScripEngineAlreadyRunning = 'Script engine already running';
+  RPS_ScriptNotCompiled = 'Script is not compiled';
+  RPS_NotRunning = 'Not running';
+  RPS_UnableToFindVariable = 'Unable to find variable';
+  RPS_UnknownIdentifier = 'Unknown Identifier';
+  RPS_NoScript = 'No script';
+
+function MyGetVariant(Sender: TPSExec; const Name: tbtstring): Variant;
+begin
+  Result := TPSScript (Sender.Id).DoOnGetNotificationVariant(Name);
+end;
+
+procedure MySetVariant(Sender: TPSExec; const Name: tbtstring; V: Variant);
+begin
+  TPSScript (Sender.Id).DoOnSetNotificationVariant(Name, V);
+end;
+
+function CompScriptUses(Sender: TPSPascalCompiler; const Name: tbtstring): Boolean;
+begin
+  Result := TPSScript(Sender.ID).ScriptUses(Sender, Name);
+end;
+
+procedure ExecOnLine(Sender: TPSExec);
+begin
+  if assigned(TPSScript(Sender.ID).FOnLine) then
+  begin
+    TPSScript(Sender.ID).OnLineEvent;
+  end;
+end;
+
+function CompExportCheck(Sender: TPSPascalCompiler; Proc: TPSInternalProcedure; const ProcDecl: tbtstring): Boolean;
+begin
+  Result := TPSScript(Sender.ID).DoVerifyProc (Sender.ID, Proc, ProcDecl);
+end;
+
+
+procedure callObjectOnProcessDirective (
+  Sender: TPSPreProcessor;
+  Parser: TPSPascalPreProcessorParser;
+  const Active: Boolean;
+  const DirectiveName, DirectiveParam: tbtstring;
+  Var Continue: Boolean);
+begin
+  TPSScript (Sender.ID).DoOnProcessUnknowDirective(Sender, Parser, Active, DirectiveName, DirectiveParam, Continue);
+end;
+
+procedure callObjectOnProcessUnknowDirective (
+  Sender: TPSPreProcessor;
+  Parser: TPSPascalPreProcessorParser;
+  const Active: Boolean;
+  const DirectiveName, DirectiveParam: tbtstring;
+  Var Continue: Boolean);
+begin
+  TPSScript (Sender.ID).DoOnProcessDirective(Sender, Parser, Active, DirectiveName, DirectiveParam, Continue);
+end;
+
+
+{ TPSPlugin }
+procedure TPSPlugin.CompileImport1(CompExec: TPSScript);
+begin
+  // do nothing
+end;
+
+procedure TPSPlugin.CompileImport2(CompExec: TPSScript);
+begin
+  // do nothing
+end;
+
+procedure TPSPlugin.CompOnUses(CompExec: TPSScript);
+begin
+ // do nothing
+end;
+
+procedure TPSPlugin.ExecImport1(CompExec: TPSScript; const ri: TPSRuntimeClassImporter);
+begin
+  // do nothing
+end;
+
+procedure TPSPlugin.ExecImport2(CompExec: TPSScript; const ri: TPSRuntimeClassImporter);
+begin
+  // do nothing
+end;
+
+procedure TPSPlugin.ExecOnUses(CompExec: TPSScript);
+begin
+ // do nothing
+end;
+
+
+{ TPSScript }
+
+function TPSScript.AddFunction(Ptr: Pointer;
+  const Decl: tbtstring): Boolean;
+begin
+  Result := AddFunctionEx(Ptr, Decl, cdRegister);
+end;
+
+function TPSScript.AddFunctionEx(Ptr: Pointer; const Decl: tbtstring;
+  CallingConv: TDelphiCallingConvention): Boolean;
+var
+  P: TPSRegProc;
+begin
+  if not FCanAdd then begin Result := False; exit; end;
+  p := Comp.AddDelphiFunction(Decl);
+  if p <> nil then
+  begin
+    Exec.RegisterDelphiFunction(Ptr, p.Name, CallingConv);
+    Result := True;
+  end else Result := False;
+end;
+
+function TPSScript.AddRegisteredVariable(const VarName,
+  VarType: tbtstring): Boolean;
+var
+  FVar: TPSVar;
+begin
+  if not FCanAdd then begin Result := False; exit; end;
+  FVar := FComp.AddUsedVariableN(varname, vartype);
+  if fvar = nil then
+    result := False
+  else begin
+    fvar.exportname := fvar.Name;
+    Result := True;
+  end;
+end;
+
+function CENeedFile(Sender: TPSPreProcessor; const callingfilename: tbtstring; var FileName, Output: tbtstring): Boolean;
+begin
+  Result := TPSScript (Sender.ID).DoOnNeedFile(Sender.ID, CallingFileName, FileName, Output);
+end;
+
+procedure CompTranslateLineInfo(Sender: TPSPascalCompiler; var Pos, Row, Col: Cardinal; var Name: tbtstring);
+var
+  res: TPSLineInfoResults;
+begin
+  if TPSScript(Sender.ID).FPP.CurrentLineInfo.GetLineInfo(Name, Pos, Res) then
+  begin
+    Pos := Res.Pos;
+    Row := Res.Row;
+    Col := Res.Col;
+    Name := Res.Name;
+  end;
+end;
+
+function TPSScript.Compile: Boolean;
+var
+  i: Longint;
+  dta: tbtstring;
+begin
+  FExec.Clear;
+  FExec.CMD_Err(erNoError);
+  FExec.ClearspecialProcImports;
+  FExec.ClearFunctionList;
+  if ri <> nil then
+  begin
+    RI.Free;
+    RI := nil;
+  end;
+  RI := TPSRuntimeClassImporter.Create;
+  for i := 0 to FPlugins.Count -1 do
+  begin
+    if (TPSPluginItem(FPlugins.Items[i]) <> nil) and (TPSPluginItem(FPlugins.Items[i]).Plugin <> nil) then
+      TPSPluginItem(FPlugins.Items[i]).Plugin.ExecImport1(Self, ri);
+  end;
+
+  DoOnExecImport (RI);
+  
+  for i := 0 to FPlugins.Count -1 do
+  begin
+    if (TPSPluginItem(FPlugins.Items[i]) <> nil)and (TPSPluginItem(FPlugins.Items[i]).Plugin <> nil) then
+      TPSPluginItem(FPlugins.Items[i]).Plugin.ExecImport2(Self, ri);
+  end;
+  RegisterClassLibraryRuntime(Exec, RI);
+  for i := 0 to FPlugins.Count -1 do
+  begin
+    if (TPSPluginItem(FPlugins.Items[i]) <> nil)and (TPSPluginItem(FPlugins.Items[i]).Plugin <> nil) then
+      TPSPluginItem(FPlugins.Items[i]).Plugin.ExecOnUses(Self);
+  end;
+  FCanAdd := True;
+  FComp.BooleanShortCircuit := icBooleanShortCircuit in FCompOptions;
+  FComp.AllowNoBegin := icAllowNoBegin in FCompOptions;
+  FComp.AllowUnit := icAllowUnit in FCompOptions;
+  FComp.AllowNoEnd := icAllowNoEnd in FCompOptions;
+  if FUsePreProcessor then
+  begin
+    FPP.Clear;
+    FPP.Defines.Assign(FDefines);
+    FComp.OnTranslateLineInfo := CompTranslateLineInfo;
+    Fpp.OnProcessDirective := callObjectOnProcessDirective;
+    Fpp.OnProcessUnknowDirective := callObjectOnProcessUnknowDirective;
+    Fpp.MainFile := FScript.Text;
+    Fpp.MainFileName := FMainFileName;
+    Fpp.PreProcess(FMainFileName, dta);
+    if FComp.Compile(dta) then
+    begin
+      FCanAdd := False;
+      if (not SuppressLoadData) and (not LoadExec) then
+      begin
+        Result := False;
+      end else
+        Result := True;
+    end else Result := False;
+    Fpp.AdjustMessages(Comp);
+  end else
+  begin
+    FComp.OnTranslateLineInfo := nil;
+    if FComp.Compile(FScript.Text) then
+    begin
+      FCanAdd := False;
+      if not LoadExec then
+      begin
+        Result := False;
+      end else
+        Result := True;
+    end else Result := False;
+  end;
+end;
+
+function TPSScript.CompilerErrorToStr(I: Integer): tbtstring;
+begin
+  Result := CompilerMessages[i].MessageToString;
+end;
+
+constructor TPSScript.Create(AOwner: TComponent);
+begin
+  inherited Create(AOwner);
+  FComp := TPSPascalCompiler.Create;
+  FExec := TPSDebugExec.Create;
+  FScript := TStringList.Create;
+  FPlugins := TPSPlugins.Create(self);
+
+  FComp.ID := Self;
+  FComp.OnUses := CompScriptUses;
+  FComp.OnExportCheck := CompExportCheck;
+  FExec.Id := Self;
+  FExec.OnRunLine:= ExecOnLine;
+  FExec.OnGetNVariant := MyGetVariant;
+  FExec.OnSetNVariant := MySetVariant;
+
+  FUseDebugInfo := True;
+
+  FPP := TPSPreProcessor.Create;
+  FPP.Id := Self;
+  FPP.OnNeedFile := CENeedFile;
+
+  FDefines := TStringList.Create;
+end;
+
+destructor TPSScript.Destroy;
+begin
+  FDefines.Free;
+
+  FPP.Free;
+  RI.Free;
+  FPlugins.Free;
+  FPlugins := nil;
+  FScript.Free;
+  FExec.Free;
+  FComp.Free;
+  inherited Destroy;
+end;
+
+function TPSScript.Execute: Boolean;
+begin
+  if Running then raise Exception.Create(RPS_ScripEngineAlreadyRunning);
+  if SuppressLoadData then
+    LoadExec;
+
+  DoOnExecute (RI);
+
+  FExec.DebugEnabled := FUseDebugInfo;
+  Result := FExec.RunScript and (FExec.ExceptionCode = erNoError) ;
+
+  DoAfterExecute;
+end;
+
+function TPSScript.GetAbout: tbtstring;
+begin
+  Result := TPSExec.About;
+end;
+
+procedure TPSScript.GetCompiled(var data: tbtstring);
+begin
+  if not FComp.GetOutput(Data) then
+    raise Exception.Create(RPS_ScriptNotCompiled);
+end;
+
+function TPSScript.GetCompMsg(i: Integer): TPSPascalCompilerMessage;
+begin
+  Result := FComp.Msg[i];
+end;
+
+function TPSScript.GetCompMsgCount: Longint;
+begin
+  Result := FComp.MsgCount;
+end;
+
+function TPSScript.GetExecErrorByteCodePosition: Cardinal;
+begin
+  Result := Exec.ExceptionPos;
+end;
+
+function TPSScript.GetExecErrorCode: TIFError;
+begin
+  Result := Exec.ExceptionCode;
+end;
+
+function TPSScript.GetExecErrorParam: tbtstring;
+begin
+  Result := Exec.ExceptionString;
+end;
+
+function TPSScript.GetExecErrorPosition: Cardinal;
+begin
+  Result := FExec.TranslatePosition(Exec.ExceptionProcNo, Exec.ExceptionPos);
+end;
+
+function TPSScript.GetExecErrorProcNo: Cardinal;
+begin
+  Result := Exec.ExceptionProcNo;
+end;
+
+function TPSScript.GetExecErrorString: tbtstring;
+begin
+  Result := TIFErrorToString(Exec.ExceptionCode, Exec.ExceptionString);
+end;
+
+function TPSScript.GetVariable(const Name: tbtstring): PIFVariant;
+begin
+  Result := FExec.GetVar2(name);
+end;
+
+function TPSScript.LoadExec: Boolean;
+var
+  s: tbtstring;
+begin
+  if (not FComp.GetOutput(s)) or (not FExec.LoadData(s)) then
+  begin
+    Result := False;
+    exit;
+  end;
+  if FUseDebugInfo then
+  begin
+    FComp.GetDebugOutput(s);
+    FExec.LoadDebugData(s);
+  end;
+  Result := True;
+end;
+
+function TPSScript.ScriptUses(Sender: TPSPascalCompiler;
+  const Name: tbtstring): Boolean;
+var
+  i: Longint;
+begin
+  if Name = 'SYSTEM' then
+  begin
+    for i := 0 to FPlugins.Count -1 do
+    begin
+      if (TPSPluginItem(FPlugins.Items[i]) <> nil)and (TPSPluginItem(FPlugins.Items[i]).Plugin <> nil) then
+        TPSPluginItem(FPlugins.Items[i]).Plugin.CompOnUses(Self);
+    end;
+    for i := 0 to FPlugins.Count -1 do
+    begin
+      if (TPSPluginItem(FPlugins.Items[i]) <> nil)and (TPSPluginItem(FPlugins.Items[i]).Plugin <> nil) then
+        TPSPluginItem(FPlugins.Items[i]).Plugin.CompileImport1(self);
+    end;
+
+    DoOnCompImport;
+
+    for i := 0 to FPlugins.Count -1 do
+    begin
+      if (TPSPluginItem(FPlugins.Items[i]) <> nil)and (TPSPluginItem(FPlugins.Items[i]).Plugin <> nil) then
+        TPSPluginItem(FPlugins.Items[i]).Plugin.CompileImport2(Self);
+    end;
+
+    DoOnCompile;
+
+    Result := True;
+  end
+  else begin
+    Result := DoOnUnknowUses (Sender, Name);
+{    If Not Result then
+      Sender.MakeError('', ecUnknownIdentifier, Name);}
+  end;
+end;
+
+procedure TPSScript.SetCompiled(const Data: tbtstring);
+var
+  i: Integer;
+begin
+  FExec.Clear;
+  FExec.ClearspecialProcImports;
+  FExec.ClearFunctionList;
+  if ri <> nil then
+  begin
+    RI.Free;
+    RI := nil;
+  end;
+  RI := TPSRuntimeClassImporter.Create;
+  for i := 0 to FPlugins.Count -1 do
+  begin
+    if (TPSPluginItem(FPlugins.Items[i]) <> nil)and (TPSPluginItem(FPlugins.Items[i]).Plugin <> nil) then
+        TPSPluginItem(FPlugins.Items[i]).Plugin.ExecImport1(Self, ri);
+  end;
+
+  DoOnExecImport(RI);
+
+  for i := 0 to FPlugins.Count -1 do
+  begin
+    if (TPSPluginItem(FPlugins.Items[i]) <> nil)and (TPSPluginItem(FPlugins.Items[i]).Plugin <> nil) then
+      TPSPluginItem(FPlugins.Items[i]).Plugin.ExecImport2(Self, ri);
+  end;
+  RegisterClassLibraryRuntime(Exec, RI);
+  for i := 0 to FPlugins.Count -1 do
+  begin
+    if (TPSPluginItem(FPlugins.Items[i]) <> nil)and (TPSPluginItem(FPlugins.Items[i]).Plugin <> nil) then
+      TPSPluginItem(FPlugins.Items[i]).Plugin.ExecOnUses(Self);
+  end;
+  if not FExec.LoadData(Data) then
+    raise Exception.Create(GetExecErrorString);
+end;
+
+function TPSScript.SetVarToInstance(const VarName: tbtstring; cl: TObject): Boolean;
+var
+  p: PIFVariant;
+begin
+  p := GetVariable(VarName);
+  if p <> nil then
+  begin
+    SetVariantToClass(p, cl);
+    result := true;
+  end else result := false;
+end;
+
+procedure TPSScript.SetScript(const Value: TStrings);
+begin
+  FScript.Assign(Value);
+end;
+
+
+function TPSScript.AddMethod(Slf, Ptr: Pointer;
+  const Decl: tbtstring): Boolean;
+begin
+  Result := AddMethodEx(Slf, Ptr, Decl, cdRegister);
+end;
+
+function TPSScript.AddMethodEx(Slf, Ptr: Pointer; const Decl: tbtstring;
+  CallingConv: TDelphiCallingConvention): Boolean;
+var
+  P: TPSRegProc;
+begin
+  if not FCanAdd then begin Result := False; exit; end;
+  p := Comp.AddDelphiFunction(Decl);
+  if p <> nil then
+  begin
+    Exec.RegisterDelphiMethod(Slf, Ptr, p.Name, CallingConv);
+    Result := True;
+  end else Result := False;
+end;
+
+procedure TPSScript.OnLineEvent;
+begin
+  if @FOnLine <> nil then FOnLine(Self);
+end;
+
+function TPSScript.GetRunning: Boolean;
+begin
+  Result := FExec.Status = isRunning;
+end;
+
+function TPSScript.GetExecErrorCol: Cardinal;
+var
+  s: tbtstring;
+  D1: Cardinal;
+begin
+  if not TranslatePositionRC(Exec.ExceptionProcNo, Exec.ExceptionPos, D1, Result, s) then
+    Result := 0;
+end;
+
+function TPSScript.TranslatePositionPos(Proc, Position: Cardinal;
+  var Pos: Cardinal; var fn: tbtstring): Boolean;
+var
+  D1, D2: Cardinal;
+begin
+  Result := Exec.TranslatePositionEx(Exec.ExceptionProcNo, Exec.ExceptionPos, Pos, D1, D2, fn);
+end;
+
+function TPSScript.TranslatePositionRC(Proc, Position: Cardinal;
+  var Row, Col: Cardinal; var fn: tbtstring): Boolean;
+var
+  d1: Cardinal;
+begin
+  Result := Exec.TranslatePositionEx(Proc, Position, d1, Row, Col, fn);
+end;
+
+
+function TPSScript.GetExecErrorRow: Cardinal;
+var
+  D1: Cardinal;
+  s: tbtstring;
+begin
+  if not TranslatePositionRC(Exec.ExceptionProcNo, Exec.ExceptionPos, Result, D1, s) then
+    Result := 0;
+end;
+
+procedure TPSScript.Stop;
+begin
+  if (FExec.Status = isRunning) or (Fexec.Status = isPaused) then
+    FExec.Stop
+  else
+    raise Exception.Create(RPS_NotRunning);
+end;
+
+function TPSScript.GetProcMethod(const ProcName: tbtstring): TMethod;
+begin
+  Result := FExec.GetProcAsMethodN(ProcName)
+end;
+
+procedure TPSScript.SetMainFileName(const Value: tbtstring);
+begin
+  FMainFileName := Value;
+end;
+
+function TPSScript.GetExecErrorFileName: tbtstring;
+var
+  D1, D2: Cardinal;
+begin
+  if not TranslatePositionRC(Exec.ExceptionProcNo, Exec.ExceptionPos, D1, D2, Result) then
+    Result := '';
+end;
+
+procedure TPSScript.SetPointerToData(const VarName: tbtstring;
+  Data: Pointer; aType: TIFTypeRec);
+var
+  v: PIFVariant;
+  t: TPSVariantIFC;
+begin
+  v := GetVariable(VarName);
+  if (Atype = nil) or (v = nil) then raise Exception.Create(RPS_UnableToFindVariable);
+  t.Dta := @PPSVariantData(v).Data;
+  t.aType := v.FType;
+  t.VarParam := false;
+  VNSetPointerTo(t, Data, aType);
+end;
+
+function TPSScript.AddRegisteredPTRVariable(const VarName,
+  VarType: tbtstring): Boolean;
+var
+  FVar: TPSVar;
+begin
+  if not FCanAdd then begin Result := False; exit; end;
+  FVar := FComp.AddUsedVariableN(varname, vartype);
+  if fvar = nil then
+    result := False
+  else begin
+    fvar.exportname := fvar.Name;
+    fvar.SaveAsPointer := true;
+    Result := True;
+  end;
+end;
+
+procedure TPSScript.SetDefines(const Value: TStrings);
+begin
+  FDefines.Assign(Value);
+end;
+
+function TPSScript.ExecuteFunction(const Params: array of Variant;
+  const ProcName: tbtstring): Variant;
+begin
+  if SuppressLoadData then
+    LoadExec;
+
+  DoOnExecute (RI);
+
+  FExec.DebugEnabled := FUseDebugInfo;
+
+  Result := Exec.RunProcPN(Params, ProcName);
+
+  DoAfterExecute;
+end;
+
+function TPSScript.FindBaseType(Bt: TPSBaseType): TPSTypeRec;
+begin
+  Result := Exec.FindType2(Bt);
+end;
+
+function TPSScript.FindNamedType(const Name: tbtstring): TPSTypeRec;
+begin
+  Result := Exec.GetTypeNo(Exec.GetType(Name));
+end;
+
+procedure TPSScript.Notification(AComponent: TComponent;
+  Operation: TOperation);
+var
+  i: Longint;
+begin
+  inherited Notification(AComponent, Operation);
+  if (Operation = opRemove) and (aComponent is TPSPlugin) then
+  begin
+    for i := Plugins.Count -1 downto 0 do
+    begin
+      if (Plugins.Items[i] as TPSPluginItem).Plugin = aComponent then
+        {$IFDEF FPC_COL_NODELETE}
+        TCollectionItem(Plugins.Items[i]).Free;
+        {$ELSE}
+        Plugins.Delete(i);
+        {$ENDIF}
+    end;
+  end;
+end;
+
+function TPSScript.AddNotificationVariant(const VarName: tbtstring): Boolean;
+begin
+  Result := AddRegisteredVariable(VarName, '!NOTIFICATIONVARIANT');
+end;
+
+procedure TPSScript.DoOnProcessDirective(Sender: TPSPreProcessor;
+  Parser: TPSPascalPreProcessorParser; const Active: Boolean;
+  const DirectiveName, DirectiveParam: tbtstring; var Continue: Boolean);
+begin
+  If Assigned (OnProcessDirective) then
+    OnProcessDirective (Sender, Parser, Active, DirectiveName, DirectiveParam, Continue);
+end;
+
+procedure TPSScript.DoOnProcessUnknowDirective(Sender: TPSPreProcessor;
+  Parser: TPSPascalPreProcessorParser; const Active: Boolean;
+  const DirectiveName, DirectiveParam: tbtstring; var Continue: Boolean);
+begin
+  If Assigned (OnProcessUnknowDirective) then
+    OnProcessUnknowDirective (Sender, Parser, Active, DirectiveName, DirectiveParam, Continue);
+end;
+
+function TPSScript.DoOnNeedFile(Sender: TObject;
+  const OrginFileName: tbtstring; var FileName, Output: tbtstring): Boolean;
+begin
+  If Assigned (OnNeedFile) then
+    Result := OnNeedFile(Sender, OrginFileName, FileName, Output)
+  else
+    Result := False;
+end;
+
+function TPSScript.DoOnUnknowUses(Sender: TPSPascalCompiler;
+  const Name: tbtstring): Boolean;
+var
+  lPrevAllowUnit: Boolean;
+  lData, lName: tbtstring;
+begin
+  if assigned(FOnFindUnknownFile) then begin
+    lName := Name;
+    if FOnFindUnknownFile(self, '', lName, lData) then begin
+      lPrevAllowUnit := FComp.AllowUnit;
+      FComp.AllowUnit := true;
+      if FUsePreProcessor then
+      begin
+        FPP.Defines.Assign(FDefines);
+        Fpp.MainFile := lData;
+        Fpp.MainFileName := lName;
+        Fpp.PreProcess(lName, lData);
+        Result := FComp.Compile(lData);
+        Fpp.AdjustMessages(FComp);
+      end else
+      begin
+        FComp.OnTranslateLineInfo := nil;
+        Result := FComp.Compile(lData);
+      end;
+      FComp.AllowUnit := lPrevAllowUnit;
+    end else begin
+      FComp.MakeError(FComp.UnitName, ecUnknownIdentifier, lName);
+      Result := false;
+    end;
+  end else begin
+    FComp.MakeError(FComp.UnitName, ecUnknownIdentifier, lName);
+    result := false;
+  end;
+end;
+
+procedure TPSScript.DoOnCompImport;
+begin
+  if assigned(OnCompImport) then
+    OnCompImport(Self, Comp);
+end;
+
+procedure TPSScript.DoOnCompile;
+begin
+  if assigned(OnCompile) then
+    OnCompile(Self);
+end;
+
+procedure TPSScript.DoOnExecute;
+begin
+  If Assigned (OnExecute) then
+    OnExecute (Self);
+end;
+
+procedure TPSScript.DoAfterExecute;
+begin
+  if Assigned (OnAfterExecute) then
+    OnAfterExecute(Self);
+end;
+
+function TPSScript.DoVerifyProc(Sender: TPSScript;
+  Proc: TPSInternalProcedure; const Decl: tbtstring): Boolean;
+begin
+  if Assigned(OnVerifyProc) then begin
+    Result := false;
+    OnVerifyProc(Sender, Proc, Decl, Result);
+    Result := not Result;
+  end
+  else
+    Result := True;
+end;
+
+procedure TPSScript.DoOnExecImport(
+  RunTimeImporter: TPSRuntimeClassImporter);
+begin
+  if assigned(OnExecImport) then
+    OnExecImport(Self, FExec, RunTimeImporter);
+end;
+
+function TPSScript.DoOnGetNotificationVariant(const Name: tbtstring): Variant;
+begin
+  if Not Assigned (OnGetNotificationVariant) then
+    raise Exception.Create(RPS_UnableToReadVariant);
+  Result := OnGetNotificationVariant(Self, Name);
+end;
+
+procedure TPSScript.DoOnSetNotificationVariant(const Name: tbtstring;
+  V: Variant);
+begin
+  if Not Assigned (OnSetNotificationVariant) then
+    raise Exception.Create(RPS_UnableToWriteVariant);
+  OnSetNotificationVariant(Self, Name, v);
+end;
+
+{ TPSDllPlugin }
+
+procedure TPSDllPlugin.CompOnUses;
+begin
+  CompExec.Comp.OnExternalProc := DllExternalProc;
+end;
+
+procedure TPSDllPlugin.ExecOnUses;
+begin
+  RegisterDLLRuntime(CompExec.Exec);
+end;
+
+
+
+{ TPS3DebugCompExec }
+
+procedure LineInfo(Sender: TPSDebugExec; const FileName: tbtstring; Position, Row, Col: Cardinal);
+var
+  Dc: TPSScriptDebugger;
+  h, i: Longint;
+  bi: TPSBreakPointInfo;
+  lFileName: tbtstring;
+begin
+  Dc := Sender.Id;
+  if FileName = '' then
+    lFileName := dc.MainFileName
+  else
+    lFileName := FileName;
+
+  if @dc.FOnLineInfo <> nil then dc.FOnLineInfo(dc, lFileName, Position, Row, Col);
+  if row = dc.FLastRow then exit;
+  dc.FLastRow := row;
+  h := MakeHash(lFileName);
+  bi := nil;
+  for i := DC.FBreakPoints.Count -1 downto 0 do
+  begin
+    bi := Dc.FBreakpoints[i];
+    if (h = bi.FileNameHash) and (lFileName = bi.FileName) and (Cardinal(bi.Line) = Row) then
+    begin
+      Break;
+    end;
+    Bi := nil;
+  end;
+  if bi <> nil then
+  begin
+    if @dc.FOnBreakpoint <> nil then dc.FOnBreakpoint(dc, lFileName, Position, Row, Col);
+    dc.Pause;
+  end;
+end;
+
+procedure IdleCall(Sender: TPSDebugExec);
+var
+  Dc: TPSScriptDebugger;
+begin
+  Dc := Sender.Id;
+  if @dc.FOnIdle <> nil then
+    dc.FOnIdle(DC)
+  else
+    dc.Exec.Run;
+end;
+
+procedure TPSScriptDebugger.ClearBreakPoint(const Fn: tbtstring; Line: Integer);
+var
+  h, i: Longint;
+  bi: TPSBreakPointInfo;
+begin
+  h := MakeHash(Fn);
+  for i := FBreakPoints.Count -1 downto 0 do
+  begin
+    bi := FBreakpoints[i];
+    if (h = bi.FileNameHash) and (Fn = bi.FileName) and (bi.Line = Line) then
+    begin
+      FBreakPoints.Delete(i);
+      bi.Free;
+      Break;
+    end;
+  end;
+end;
+
+procedure TPSScriptDebugger.ClearBreakPoints;
+var
+  i: Longint;
+begin
+  for i := FBreakPoints.Count -1 downto 0 do
+    TPSBreakPointInfo(FBreakPoints[i]).Free;
+  FBreakPoints.Clear;;
+end;
+
+constructor TPSScriptDebugger.Create(AOwner: TComponent);
+begin
+  inherited Create(AOwner);
+  FBreakPoints := TIFList.Create;
+  FExec.OnSourceLine := LineInfo;
+  FExec.OnIdleCall := IdleCall;
+end;
+
+destructor TPSScriptDebugger.Destroy;
+var
+  i: Longint;
+begin
+  for i := FBreakPoints.Count -1 downto 0 do
+  begin
+    TPSBreakPointInfo(FBreakPoints[i]).Free;
+  end;
+  FBreakPoints.Free;
+  inherited Destroy;
+end;
+
+function TPSScriptDebugger.GetBreakPoint(I: Integer): TPSBreakPointInfo;
+begin
+  Result := FBreakPoints[i];
+end;
+
+function TPSScriptDebugger.GetBreakPointCount: Longint;
+begin
+  Result := FBreakPoints.Count;
+end;
+
+function TPSScriptDebugger.GetVarContents(const Name: tbtstring): tbtstring;
+var
+  i: Longint;
+  pv: PIFVariant;
+  s1, s: tbtstring;
+begin
+  s := Uppercase(Name);
+  if pos('.', s) > 0 then
+  begin
+    s1 := copy(s,1,pos('.', s) -1);
+    delete(s,1,pos('.', Name));
+  end else begin
+    s1 := s;
+    s := '';
+  end;
+  pv := nil;
+  for i := 0 to Exec.CurrentProcVars.Count -1 do
+  begin
+    if Uppercase(Exec.CurrentProcVars[i]) =  s1 then
+    begin
+      pv := Exec.GetProcVar(i);
+      break;
+    end;
+  end;
+  if pv = nil then
+  begin
+    for i := 0 to Exec.CurrentProcParams.Count -1 do
+    begin
+      if Uppercase(Exec.CurrentProcParams[i]) =  s1 then
+      begin
+        pv := Exec.GetProcParam(i);
+        break;
+      end;
+    end;
+  end;
+  if pv = nil then
+  begin
+    for i := 0 to Exec.GlobalVarNames.Count -1 do
+    begin
+      if Uppercase(Exec.GlobalVarNames[i]) =  s1 then
+      begin
+        pv := Exec.GetGlobalVar(i);
+        break;
+      end;
+    end;
+  end;
+  if pv = nil then
+    Result := RPS_UnknownIdentifier
+  else
+    Result := PSVariantToString(NewTPSVariantIFC(pv, False), s);
+end;
+
+function TPSScriptDebugger.HasBreakPoint(const Fn: tbtstring; Line: Integer): Boolean;
+var
+  h, i: Longint;
+  bi: TPSBreakPointInfo;
+begin
+  h := MakeHash(Fn);
+  for i := FBreakPoints.Count -1 downto 0 do
+  begin
+    bi := FBreakpoints[i];
+    if (h = bi.FileNameHash) and (Fn = bi.FileName) and (bi.Line = Line) then
+    begin
+      Result := true;
+      exit;
+    end;
+  end;
+  Result := False;
+end;
+
+procedure TPSScriptDebugger.Pause;
+begin
+  if FExec.Status = isRunning then
+    FExec.Pause
+  else
+    raise Exception.Create(RPS_NotRunning);
+end;
+
+procedure TPSScriptDebugger.Resume;
+begin
+  if FExec.Status = isRunning then
+    FExec.Run
+  else
+    raise Exception.Create(RPS_NotRunning);
+end;
+
+procedure TPSScriptDebugger.SetBreakPoint(const fn: tbtstring; Line: Integer);
+var
+  i, h: Longint;
+  BI: TPSBreakPointInfo;
+begin
+  h := MakeHash(fn);
+  for i := FBreakPoints.Count -1 downto 0 do
+  begin
+    bi := FBreakpoints[i];
+    if (h = bi.FileNameHash) and (fn = bi.FileName) and (bi.Line = Line) then
+      exit;
+  end;
+  bi := TPSBreakPointInfo.Create;
+  FBreakPoints.Add(bi);
+  bi.FileName := fn;
+  bi.Line := Line;
+end;
+
+procedure TPSScriptDebugger.SetMainFileName(const Value: tbtstring);
+var
+  OldFn: tbtstring;
+  h1, h2,i: Longint;
+  bi: TPSBreakPointInfo;
+begin
+  OldFn := FMainFileName;
+  inherited SetMainFileName(Value);
+  h1 := MakeHash(OldFn);
+  h2 := MakeHash(Value);
+  if OldFn <> Value then
+  begin
+    for i := FBreakPoints.Count -1 downto 0 do
+    begin
+      bi := FBreakPoints[i];
+      if (bi.FileNameHash = h1) and (bi.FileName = OldFn) then
+      begin
+        bi.FFileNameHash := h2;
+        bi.FFileName := Value;
+      end else if (bi.FileNameHash = h2) and (bi.FileName = Value) then
+      begin
+        // It's already the new filename, that can't be right, so remove all the breakpoints there
+        FBreakPoints.Delete(i);
+        bi.Free;
+      end;
+    end;
+  end;
+end;
+
+procedure TPSScriptDebugger.StepInto;            
+begin
+  if (FExec.Status = isRunning) or (FExec.Status = isLoaded) then
+    FExec.StepInto
+  else
+    raise Exception.Create(RPS_NoScript);
+end;
+
+procedure TPSScriptDebugger.StepOver;
+begin
+  if (FExec.Status = isRunning) or (FExec.Status = isLoaded) then
+    FExec.StepOver
+  else
+    raise Exception.Create(RPS_NoScript);
+end;
+
+
+
+{ TPSPluginItem }
+
+procedure TPSPluginItem.Assign(Source: TPersistent); //Birb
+begin
+  if Source is TPSPluginItem then
+   plugin:=((source as TPSPluginItem).plugin)
+  else
+   inherited;
+end;
+
+function TPSPluginItem.GetDisplayName: string;
+begin
+  if FPlugin <> nil then
+    Result := string(FPlugin.Name)
+  else
+    Result := '<nil>';
+end;
+
+procedure TPSPluginItem.SetPlugin(const Value: TPSPlugin);
+begin
+  FPlugin := Value;
+  If Value <> nil then
+    Value.FreeNotification(TPSPlugins(Collection).FCompExec);
+  Changed(False);
+end;
+
+{ TPSPlugins }
+
+constructor TPSPlugins.Create(CE: TPSScript);
+begin
+  inherited Create(TPSPluginItem);
+  FCompExec := CE;
+end;
+
+function TPSPlugins.GetOwner: TPersistent;
+begin
+  Result := FCompExec;
+end;
+
+{ TPSBreakPointInfo }
+
+procedure TPSBreakPointInfo.SetFileName(const Value: tbtstring);
+begin
+  FFileName := Value;
+  FFileNameHash := MakeHash(Value);
+end;
+
+{ TPSCustomPlugin }
+procedure TPSCustumPlugin.CompileImport1(CompExec: TPSScript);
+begin
+  IF @FOnCompileImport1 <> nil then
+    FOnCompileImport1(CompExec)
+  else
+    inherited;
+end;
+
+procedure TPSCustumPlugin.CompileImport2(CompExec: TPSScript);
+begin
+  IF @FOnCompileImport2 <> nil then
+    FOnCompileImport2(CompExec)
+  else
+    inherited;
+end;
+
+procedure TPSCustumPlugin.CompOnUses(CompExec: TPSScript);
+begin
+  IF @FOnCompOnUses <> nil then
+    FOnCompOnUses(CompExec)
+  else
+    inherited;
+end;
+
+procedure TPSCustumPlugin.ExecImport1(CompExec: TPSScript;
+  const ri: TPSRuntimeClassImporter);
+begin
+  IF @FOnExecImport1 <> nil then
+    FOnExecImport1(CompExec, compExec.Exec, ri)
+  else
+    inherited;
+end;
+
+procedure TPSCustumPlugin.ExecImport2(CompExec: TPSScript;
+  const ri: TPSRuntimeClassImporter);
+begin
+  IF @FOnExecImport2 <> nil then
+    FOnExecImport1(CompExec, compExec.Exec, ri)
+  else
+    inherited;
+end;
+
+procedure TPSCustumPlugin.ExecOnUses(CompExec: TPSScript);
+begin
+  IF @FOnExecOnUses <> nil then
+    FOnExecOnUses(CompExec)
+  else
+    inherited;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSComponent_COM.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSComponent_COM.pas
new file mode 100644
index 0000000..31c1dad
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSComponent_COM.pas	
@@ -0,0 +1,38 @@
+ 
+unit uPSComponent_COM;
+
+interface
+uses
+  SysUtils, Classes, uPSComponent, uPSCompiler, uPSRuntime;
+type
+  
+  TPSImport_ComObj = class(TPSPlugin)
+  private
+  protected
+    procedure CompileImport1(CompExec: TPSScript); override;
+    procedure ExecImport1(CompExec: TPSScript; const ri: TPSRuntimeClassImporter); override;
+  end;
+  
+  TIFPS3CE_ComObj = class(TPSImport_ComObj);
+
+implementation
+uses
+  uPSC_comobj,
+  uPSR_comobj;
+
+
+{ TPSImport_ComObj }
+
+procedure TPSImport_ComObj.CompileImport1(CompExec: TPSScript);
+begin
+  SIRegister_ComObj(CompExec.Comp);
+end;
+
+
+procedure TPSImport_ComObj.ExecImport1(CompExec: TPSScript;
+  const ri: TPSRuntimeClassImporter);
+begin
+  RIRegister_ComObj(CompExec.Exec);
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSComponent_Controls.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSComponent_Controls.pas
new file mode 100644
index 0000000..37543f2
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSComponent_Controls.pas	
@@ -0,0 +1,65 @@
+ unit uPSComponent_Controls;
+
+interface
+uses
+  SysUtils, Classes, uPSComponent, uPSCompiler, uPSRuntime;
+type
+  
+  TPSImport_Controls = class(TPSPlugin)
+  private
+    FEnableStreams: Boolean;
+    FEnableGraphics: Boolean;
+    FEnableControls: Boolean;
+  protected
+    procedure CompileImport1(CompExec: TPSScript); override;
+    procedure ExecImport1(CompExec: TPSScript; const ri: TPSRuntimeClassImporter); override;
+  public
+    constructor Create(AOwner: TComponent); override;
+  published
+    
+    property EnableStreams: Boolean read FEnableStreams write FEnableStreams;
+    
+    property EnableGraphics: Boolean read FEnableGraphics write FEnableGraphics;
+    
+    property EnableControls: Boolean read FEnableControls write FEnableControls;
+  end;
+  
+  TIFPS3CE_Controls = class(TPSImport_Controls);
+
+implementation
+uses
+  uPSC_graphics,
+  uPSC_controls,
+  uPSR_graphics,
+  uPSR_controls;
+
+
+{ TPSImport_Controls }
+
+procedure TPSImport_Controls.CompileImport1(CompExec: TPSScript);
+begin
+  if FEnableGraphics then
+    SIRegister_Graphics(CompExec.Comp, FEnableStreams);
+  if FEnableControls then
+    SIRegister_Controls(CompExec.Comp);
+end;
+
+constructor TPSImport_Controls.Create(AOwner: TComponent);
+begin
+  inherited Create(AOwner);
+  FEnableStreams := True;
+  FEnableGraphics := True;
+  FEnableControls := True;
+end;
+
+procedure TPSImport_Controls.ExecImport1(CompExec: TPSScript;
+  const ri: TPSRuntimeClassImporter);
+begin
+  if FEnableGraphics then
+    RIRegister_Graphics(ri, FEnableStreams);
+  if FEnableControls then
+    RIRegister_Controls(ri);
+end;
+
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSComponent_DB.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSComponent_DB.pas
new file mode 100644
index 0000000..a8557e6
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSComponent_DB.pas	
@@ -0,0 +1,36 @@
+ unit uPSComponent_DB;
+
+interface
+{$I PascalScript.inc}
+uses
+  SysUtils, Classes, uPSComponent, uPSRuntime, uPSCompiler;
+type
+
+  TPSImport_DB = class(TPSPlugin)
+  protected
+    procedure CompileImport1(CompExec: TPSScript); override;
+    procedure ExecImport1(CompExec: TPSScript; const ri: TPSRuntimeClassImporter); override;
+  public
+  end;
+
+  TIFPS3CE_DB = class(TPSImport_DB);
+
+implementation
+uses
+  uPSC_DB,
+  uPSR_DB;
+
+{ TPSImport_DB }
+
+procedure TPSImport_DB.CompileImport1(CompExec: TPSScript);
+begin
+  SIRegister_DB(CompExec.Comp);
+end;
+
+procedure TPSImport_DB.ExecImport1(CompExec: TPSScript;
+  const ri: TPSRuntimeClassImporter);
+begin
+  RIRegister_DB(RI);
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSComponent_Default.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSComponent_Default.pas
new file mode 100644
index 0000000..09adc05
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSComponent_Default.pas	
@@ -0,0 +1,81 @@
+ unit uPSComponent_Default;
+{$I PascalScript.inc}
+interface
+uses
+  SysUtils, Classes, uPSComponent, uPSCompiler, uPSRuntime;
+
+type
+
+  TPSImport_DateUtils = class(TPSPlugin)
+  protected
+    procedure CompOnUses(CompExec: TPSScript); override;
+    procedure ExecOnUses(CompExec: TPSScript); override;
+  end;
+
+  TPSImport_Classes = class(TPSPlugin)
+  private
+    FEnableStreams: Boolean;
+    FEnableClasses: Boolean;
+  protected
+    procedure CompileImport1(CompExec: TPSScript); override;
+    procedure ExecImport1(CompExec: TPSScript; const ri: TPSRuntimeClassImporter); override;
+  public
+
+    constructor Create(AOwner: TComponent); override;
+  published
+
+    property EnableStreams: Boolean read FEnableStreams write FEnableStreams;
+
+    property EnableClasses: Boolean read FEnableClasses write FEnableClasses;
+  end;
+
+  TIFPS3CE_Std = class(TPSImport_Classes);
+
+  TIFPS3CE_DateUtils = class(TPSImport_DateUtils);
+
+implementation
+uses
+  uPSC_std,
+  uPSR_std,
+  uPSC_classes,
+  uPSR_classes,
+  uPSC_dateutils,
+  uPSR_dateutils;
+
+{ TPSImport_Classes }
+
+procedure TPSImport_Classes.CompileImport1(CompExec: TPSScript);
+begin
+  SIRegister_Std(CompExec.Comp);
+  if FEnableClasses then
+    SIRegister_Classes(CompExec.Comp, FEnableStreams);
+end;
+
+procedure TPSImport_Classes.ExecImport1(CompExec: TPSScript;
+  const ri: TPSRuntimeClassImporter);
+begin
+  RIRegister_Std(Ri);
+  if FEnableClasses then
+    RIRegister_Classes(ri, FEnableStreams);
+end;
+
+constructor TPSImport_Classes.Create(AOwner: TComponent);
+begin
+  inherited Create(AOwner);
+  FEnableStreams := True;
+  FEnableClasses := True;
+end;
+
+{ TPSImport_DateUtils }
+
+procedure TPSImport_DateUtils.CompOnUses(CompExec: TPSScript);
+begin
+  RegisterDateTimeLibrary_C(CompExec.Comp);
+end;
+
+procedure TPSImport_DateUtils.ExecOnUses(CompExec: TPSScript);
+begin
+  RegisterDateTimeLibrary_R(CompExec.Exec);
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSComponent_Forms.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSComponent_Forms.pas
new file mode 100644
index 0000000..8d60d5e
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSComponent_Forms.pas	
@@ -0,0 +1,65 @@
+ 
+unit uPSComponent_Forms;
+
+interface
+uses
+  SysUtils, Classes, uPSRuntime, uPSCompiler, uPSComponent;
+type
+  
+  TPSImport_Forms = class(TPSPlugin)
+  private
+    FEnableForms: Boolean;
+    FEnableMenus: Boolean;
+  protected
+    procedure CompileImport1(CompExec: TPSScript); override;
+    procedure ExecImport1(CompExec: TPSScript; const ri: TPSRuntimeClassImporter); override;
+  public
+    constructor Create(AOwner: TComponent); override;
+  published
+    
+    property EnableForms: Boolean read FEnableForms write FEnableForms;
+    
+    property EnableMenus: Boolean read FEnableMenus write FEnableMenus;
+  end;
+  
+  TIFPS3CE_Forms = class(TPSImport_Forms);
+
+implementation
+uses
+  uPSC_forms,
+  uPSC_menus,
+  uPSR_forms,
+  uPSR_menus;
+
+{ TPSImport_Forms }
+
+procedure TPSImport_Forms.CompileImport1(CompExec: TPSScript);
+begin
+  if FEnableForms then
+    SIRegister_Forms(CompExec.comp);
+  if FEnableMenus then
+    SIRegister_Menus(CompExec.comp);
+end;
+
+constructor TPSImport_Forms.Create(AOwner: TComponent);
+begin
+  inherited Create(Aowner);
+  FEnableForms := True;
+  FEnableMenus := True;
+end;
+
+procedure TPSImport_Forms.ExecImport1(CompExec: TPSScript;
+  const ri: TPSRuntimeClassImporter);
+begin
+  if FEnableForms then
+    RIRegister_Forms(ri);
+
+  if FEnableMenus then
+  begin
+    RIRegister_Menus(ri);
+    RIRegister_Menus_Routines(compexec.Exec);
+  end;
+
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSComponent_StdCtrls.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSComponent_StdCtrls.pas
new file mode 100644
index 0000000..66ce95c
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSComponent_StdCtrls.pas	
@@ -0,0 +1,65 @@
+ 
+unit uPSComponent_StdCtrls;
+
+interface
+uses
+  SysUtils, Classes, uPSComponent, uPSCompiler, uPSRuntime;
+type
+  
+  TPSImport_StdCtrls = class(TPSPlugin)
+  private
+    FEnableButtons: Boolean;
+    FEnableExtCtrls: Boolean;
+  protected
+    procedure CompileImport1(CompExec: TPSScript); override;
+    procedure ExecImport1(CompExec: TPSScript; const ri: TPSRuntimeClassImporter); override;
+  public
+    constructor Create(AOwner: TComponent); override;
+  published
+    
+    property EnableExtCtrls: Boolean read FEnableExtCtrls write FEnableExtCtrls;
+    
+    property EnableButtons: Boolean read FEnableButtons write FEnableButtons;
+  end;
+  
+  TIFPS3CE_StdCtrls = class(TPSImport_StdCtrls);
+
+
+implementation
+uses
+  uPSC_buttons,
+  uPSC_stdctrls,
+  uPSC_extctrls,
+  uPSR_buttons,
+  uPSR_stdctrls,
+  uPSR_extctrls;
+
+{ TPSImport_StdCtrls }
+
+procedure TPSImport_StdCtrls.CompileImport1(CompExec: TPSScript);
+begin
+    SIRegister_stdctrls(CompExec.Comp);
+  if FEnableExtCtrls then
+    SIRegister_ExtCtrls(CompExec.Comp);
+  if FEnableButtons then
+    SIRegister_Buttons(CompExec.Comp);
+end;
+
+constructor TPSImport_StdCtrls.Create(AOwner: TComponent);
+begin
+  inherited Create(Aowner);
+  FEnableButtons := True;
+  FEnableExtCtrls := True;
+end;
+
+procedure TPSImport_StdCtrls.ExecImport1(CompExec: TPSScript;
+  const ri: TPSRuntimeClassImporter);
+begin
+    RIRegister_stdctrls(RI);
+  if FEnableExtCtrls then
+    RIRegister_ExtCtrls(RI);
+  if FEnableButtons then
+    RIRegister_Buttons(RI);
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSDebugger.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSDebugger.pas
new file mode 100644
index 0000000..3b58393
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSDebugger.pas	
@@ -0,0 +1,654 @@
+
+unit uPSDebugger;
+{$I PascalScript.inc}
+interface
+uses
+  SysUtils, uPSRuntime, uPSUtils;
+
+type
+  
+  TDebugMode = (dmRun 
+  , dmStepOver 
+  , dmStepInto 
+  , dmPaused 
+  );
+  
+  TPSCustomDebugExec = class(TPSExec)
+  protected
+    FDebugDataForProcs: TIfList;
+    FLastProc: TPSProcRec;
+    FCurrentDebugProc: Pointer;
+    FProcNames: TIFStringList;
+    FGlobalVarNames: TIfStringList;
+    FCurrentSourcePos, FCurrentRow, FCurrentCol: Cardinal;
+    FCurrentFile: tbtstring;
+    
+    function GetCurrentProcParams: TIfStringList;
+    
+    function GetCurrentProcVars: TIfStringList;
+  protected
+    
+    procedure ClearDebug; virtual;
+  public
+    
+    function GetCurrentProcNo: Cardinal;
+    
+    function GetCurrentPosition: Cardinal;
+    
+    function TranslatePosition(Proc, Position: Cardinal): Cardinal;
+    
+    function TranslatePositionEx(Proc, Position: Cardinal; var Pos, Row, Col: Cardinal; var Fn: tbtstring): Boolean;
+    
+    procedure LoadDebugData(const Data: tbtstring);
+	
+    procedure Clear; override;
+    
+    property GlobalVarNames: TIfStringList read FGlobalVarNames;
+	
+    property ProcNames: TIfStringList read FProcNames;
+	
+    property CurrentProcVars: TIfStringList read GetCurrentProcVars;
+	
+    property CurrentProcParams: TIfStringList read GetCurrentProcParams;
+    
+    function GetGlobalVar(I: Cardinal): PIfVariant;
+	
+    function GetProcVar(I: Cardinal): PIfVariant;
+	
+    function GetProcParam(I: Cardinal): PIfVariant;
+    
+    constructor Create;
+	
+    destructor Destroy; override;
+  end;
+  TPSDebugExec = class;
+  
+  TOnSourceLine = procedure (Sender: TPSDebugExec; const Name: tbtstring; Position, Row, Col: Cardinal);
+  
+  TOnIdleCall = procedure (Sender: TPSDebugExec);
+  
+  TPSDebugExec = class(TPSCustomDebugExec)
+  private
+    FDebugMode: TDebugMode;
+    FStepOverProc: TPSInternalProcRec;
+    FStepOverStackBase: Cardinal;
+    FOnIdleCall: TOnIdleCall;
+    FOnSourceLine: TOnSourceLine;
+    FDebugEnabled: Boolean;
+  protected
+    
+    procedure SourceChanged;
+    procedure ClearDebug; override;
+    procedure RunLine; override;
+  public
+    constructor Create;
+    
+    function LoadData(const s: tbtstring): Boolean; override;
+    
+    procedure Pause; override;
+    
+    procedure Run;
+    
+    procedure StepInto;
+    
+    procedure StepOver;
+    
+    procedure Stop; override;
+	
+    property DebugMode: TDebugMode read FDebugMode;
+    
+    property OnSourceLine: TOnSourceLine read FOnSourceLine write FOnSourceLine;
+	
+    property OnIdleCall: TOnIdleCall read FOnIdleCall write FOnIdleCall;
+    
+    property DebugEnabled: Boolean read FDebugEnabled write FDebugEnabled;
+  end;
+  TIFPSDebugExec = TPSDebugExec;
+
+implementation
+
+{$IFDEF DELPHI3UP }
+resourceString
+{$ELSE }
+const
+{$ENDIF }
+
+  RPS_ExpectedReturnAddressStackBase = 'Expected return address at stack base';
+
+type
+  PPositionData = ^TPositionData;
+  TPositionData = packed record
+    FileName: tbtstring;
+    Position,
+    Row,
+    Col,
+    SourcePosition: Cardinal;
+  end;
+  PFunctionInfo = ^TFunctionInfo;
+  TFunctionInfo = packed record
+    Func: TPSProcRec;
+    FParamNames: TIfStringList;
+    FVariableNames: TIfStringList;
+    FPositionTable: TIfList;
+  end;
+
+{ TPSCustomDebugExec }
+
+procedure TPSCustomDebugExec.Clear;
+begin
+  inherited Clear;
+  if FGlobalVarNames <> nil then ClearDebug;
+end;
+
+procedure TPSCustomDebugExec.ClearDebug;
+var
+  i, j: Longint;
+  p: PFunctionInfo;
+begin
+  FCurrentDebugProc := nil;
+  FLastProc := nil;
+  FProcNames.Clear;
+  FGlobalVarNames.Clear;
+  FCurrentSourcePos := 0;
+  FCurrentRow := 0;
+  FCurrentCol := 0;
+  FCurrentFile := '';
+  for i := 0 to FDebugDataForProcs.Count -1 do
+  begin
+    p := FDebugDataForProcs[I];
+    for j := 0 to p^.FPositionTable.Count -1 do
+    begin
+      Dispose(PPositionData(P^.FPositionTable[J]));
+    end;
+    p^.FPositionTable.Free;
+    p^.FParamNames.Free;
+    p^.FVariableNames.Free;
+    Dispose(p);
+  end;
+  FDebugDataForProcs.Clear;
+end;
+
+constructor TPSCustomDebugExec.Create;
+begin
+  inherited Create;
+  FCurrentSourcePos := 0;
+  FCurrentRow := 0;
+  FCurrentCol := 0;
+  FCurrentFile := '';
+  FDebugDataForProcs := TIfList.Create;
+  FLastProc := nil;
+  FCurrentDebugProc := nil;
+  FProcNames := TIFStringList.Create;
+  FGlobalVarNames := TIfStringList.Create;
+end;
+
+destructor TPSCustomDebugExec.Destroy;
+begin
+  Clear;
+  FDebugDataForProcs.Free;
+  FProcNames.Free;
+  FGlobalVarNames.Free;
+  FGlobalVarNames := nil;
+  inherited Destroy;
+end;
+
+function TPSCustomDebugExec.GetCurrentPosition: Cardinal;
+begin
+  Result := TranslatePosition(GetCurrentProcNo, 0);
+end;
+
+function TPSCustomDebugExec.GetCurrentProcNo: Cardinal;
+var
+  i: Longint;
+begin
+  for i := 0 to FProcs.Count -1 do
+  begin
+    if FProcs[i]=  FCurrProc then
+    begin
+      Result := I;
+      Exit;
+    end;
+  end;
+  Result := Cardinal(-1);
+end;
+
+function TPSCustomDebugExec.GetCurrentProcParams: TIfStringList;
+begin
+  if FCurrentDebugProc <> nil then
+  begin
+    Result := PFunctionInfo(FCurrentDebugProc)^.FParamNames;
+  end else Result := nil;
+end;
+
+function TPSCustomDebugExec.GetCurrentProcVars: TIfStringList;
+begin
+  if FCurrentDebugProc <> nil then
+  begin
+    Result := PFunctionInfo(FCurrentDebugProc)^.FVariableNames;
+  end else Result := nil;
+end;
+
+function TPSCustomDebugExec.GetGlobalVar(I: Cardinal): PIfVariant;
+begin
+  Result := FGlobalVars[I];
+end;
+
+function TPSCustomDebugExec.GetProcParam(I: Cardinal): PIfVariant;
+begin
+  Result := FStack[Cardinal(Longint(FCurrStackBase) - Longint(I) - 1)];
+end;
+
+function TPSCustomDebugExec.GetProcVar(I: Cardinal): PIfVariant;
+begin
+  Result := FStack[Cardinal(Longint(FCurrStackBase) + Longint(I) + 1)];
+end;
+
+function GetProcDebugInfo(FProcs: TIFList; Proc: TPSProcRec): PFunctionInfo;
+var
+  i: Longint;
+  c: PFunctionInfo;
+begin
+  if Proc = nil then
+  begin
+    Result := nil;
+    exit;
+  end;
+  for i := FProcs.Count -1 downto 0 do
+  begin
+    c := FProcs.Data^[I];
+    if c^.Func = Proc then
+    begin
+      Result := c;
+      exit;
+    end;
+  end;
+  new(c);
+  c^.Func := Proc;
+  c^.FPositionTable := TIfList.Create;
+  c^.FVariableNames := TIfStringList.Create;
+  c^.FParamNames := TIfStringList.Create;
+  FProcs.Add(c);
+  REsult := c;
+end;
+
+procedure TPSCustomDebugExec.LoadDebugData(const Data: tbtstring);
+var
+  CP, I: Longint;
+  c: tbtchar;
+  CurrProcNo, LastProcNo: Cardinal;
+  LastProc: PFunctionInfo;
+  NewLoc: PPositionData;
+  s: tbtstring;
+begin
+  ClearDebug;
+  if FStatus = isNotLoaded then exit;
+  CP := 1;
+  LastProcNo := Cardinal(-1);
+  LastProc := nil;
+  while CP <= length(Data) do
+  begin
+    c := Data[CP];
+    inc(cp);
+    case c of
+      #0:
+        begin
+          i := cp;
+          if i > length(data) then exit;
+          while Data[i] <> #0 do
+          begin
+            if Data[i] = #1 then
+            begin
+              FProcNames.Add(Copy(Data, cp, i-cp));
+              cp := I + 1;
+            end;
+            inc(I);
+            if I > length(data) then exit;
+          end;
+          cp := i + 1;
+        end;
+      #1:
+        begin
+          i := cp;
+          if i > length(data) then exit;
+          while Data[i] <> #0 do
+          begin
+            if Data[i] = #1 then
+            begin
+              FGlobalVarNames.Add(Copy(Data, cp, i-cp));
+              cp := I + 1;
+            end;
+            inc(I);
+            if I > length(data) then exit;
+          end;
+          cp := i + 1;
+        end;
+      #2:
+        begin
+          if cp + 4 > Length(data) then exit;
+          CurrProcNo := Cardinal((@Data[cp])^);
+          if CurrProcNo = Cardinal(-1) then Exit;
+          if CurrProcNo <> LastProcNo then
+          begin
+            LastProcNo := CurrProcNo;
+            LastProc := GetProcDebugInfo(FDebugDataForProcs, FProcs[CurrProcNo]);
+            if LastProc = nil then exit;
+          end;
+          inc(cp, 4);
+
+          i := cp;
+          if i > length(data) then exit;
+          while Data[i] <> #0 do
+          begin
+            if Data[i] = #1 then
+            begin
+              LastProc^.FParamNames.Add(Copy(Data, cp, i-cp));
+              cp := I + 1;
+            end;
+            inc(I);
+            if I > length(data) then exit;
+          end;
+          cp := i + 1;
+        end;
+      #3:
+        begin
+          if cp + 4 > Length(data) then exit;
+          CurrProcNo := Cardinal((@Data[cp])^);
+          if CurrProcNo = Cardinal(-1) then Exit;
+          if CurrProcNo <> LastProcNo then
+          begin
+            LastProcNo := CurrProcNo;
+            LastProc := GetProcDebugInfo(FDebugDataForProcs, FProcs[CurrProcNo]);
+            if LastProc = nil then exit;
+          end;
+          inc(cp, 4);
+
+          i := cp;
+          if i > length(data) then exit;
+          while Data[i] <> #0 do
+          begin
+            if Data[i] = #1 then
+            begin
+              LastProc^.FVariableNames.Add(Copy(Data, cp, i-cp));
+              cp := I + 1;
+            end;
+            inc(I);
+            if I > length(data) then exit;
+          end;
+          cp := i + 1;
+        end;
+      #4:
+        begin
+          i := cp;
+          if i > length(data) then exit;
+          while Data[i] <> #0 do
+          begin
+            if Data[i] = #1 then
+            begin
+              s := Copy(Data, cp, i-cp);
+              cp := I + 1;
+              Break;
+            end;
+            inc(I);
+            if I > length(data) then exit;
+          end;
+          if cp + 4 > Length(data) then exit;
+          CurrProcNo := Cardinal((@Data[cp])^);
+          if CurrProcNo = Cardinal(-1) then Exit;
+          if CurrProcNo <> LastProcNo then
+          begin
+            LastProcNo := CurrProcNo;
+            LastProc := GetProcDebugInfo(FDebugDataForProcs, FProcs[CurrProcNo]);
+            if LastProc = nil then exit;
+          end;
+          inc(cp, 4);
+          if cp + 16 > Length(data) then exit;
+          new(NewLoc);
+          NewLoc^.Position := Cardinal((@Data[Cp])^);
+          NewLoc^.FileName := s;
+          NewLoc^.SourcePosition := Cardinal((@Data[Cp+4])^);
+          NewLoc^.Row := Cardinal((@Data[Cp+8])^);
+          NewLoc^.Col := Cardinal((@Data[Cp+12])^);
+          inc(cp, 16);
+          LastProc^.FPositionTable.Add(NewLoc);
+        end;
+      else
+        begin
+          ClearDebug;
+          Exit;
+        end;
+    end;
+
+  end;
+end;
+
+
+
+
+
+
+function TPSCustomDebugExec.TranslatePosition(Proc, Position: Cardinal): Cardinal;
+var
+  D1, D2: Cardinal;
+  s: tbtstring;
+begin
+  if not TranslatePositionEx(Proc, Position, Result, D1, D2, s) then
+    Result := 0;
+end;
+
+function TPSCustomDebugExec.TranslatePositionEx(Proc, Position: Cardinal;
+  var Pos, Row, Col: Cardinal; var Fn: tbtstring): Boolean;
+// Made by Martijn Laan (mlaan@wintax.nl)
+var
+  i: LongInt;
+  fi: PFunctionInfo;
+  pt: TIfList;
+  r: PPositionData;
+  lastfn: tbtstring;
+  LastPos, LastRow, LastCol: Cardinal;
+  pp: TPSProcRec;
+begin
+  fi := nil;
+  pp := FProcs[Proc];
+  for i := 0 to FDebugDataForProcs.Count -1 do
+  begin
+    fi := FDebugDataForProcs[i];
+    if fi^.Func = pp then
+      Break;
+    fi := nil;
+  end;
+  LastPos := 0;
+  LastRow := 0;
+  LastCol := 0;
+  if fi <> nil then begin
+    pt := fi^.FPositionTable;
+    for i := 0 to pt.Count -1 do
+    begin
+      r := pt[I];
+      if r^.Position >= Position then
+      begin
+        if r^.Position = Position then
+        begin
+          Pos := r^.SourcePosition;
+          Row := r^.Row;
+          Col := r^.Col;
+          Fn := r^.Filename;
+        end
+        else
+        begin
+          Pos := LastPos;
+          Row := LastRow;
+          Col := LastCol;
+          Fn := LastFn;
+        end;
+        Result := True;
+        exit;
+      end else
+      begin
+        LastPos := r^.SourcePosition;
+        LastRow := r^.Row;
+        LastCol := r^.Col;
+        LastFn := r^.FileName;
+      end;
+    end;
+    Pos := LastPos;
+    Row := LastRow;
+    Col := LastCol;
+    Result := True;
+  end else
+  begin
+    Result := False;
+  end;
+end;
+
+{ TPSDebugExec }
+procedure TPSDebugExec.ClearDebug;
+begin
+  inherited;
+  FDebugMode := dmRun;
+end;
+
+function TPSDebugExec.LoadData(const s: tbtstring): Boolean;
+begin
+  Result := inherited LoadData(s);
+  FDebugMode := dmRun;
+end;
+
+procedure TPSDebugExec.RunLine;
+var
+  i: Longint;
+  pt: TIfList;
+  r: PPositionData;
+begin
+  inherited RunLine;
+  if not DebugEnabled then exit;
+  if FCurrProc <> FLastProc then
+  begin
+    FLastProc := FCurrProc;
+    FCurrentDebugProc := nil;
+    for i := 0 to FDebugDataForProcs.Count -1 do
+    begin
+      if PFunctionInfo(FDebugDataForProcs[I])^.Func = FLastProc then
+      begin
+        FCurrentDebugProc := FDebugDataForProcs[I];
+        break;
+      end;
+    end;
+  end;
+  if FCurrentDebugProc <> nil then
+  begin
+    pt := PFunctionInfo(FCurrentDebugProc)^.FPositionTable;
+    for i := 0 to pt.Count -1 do
+    begin
+      r := pt[I];
+      if r^.Position = FCurrentPosition then
+      begin
+        FCurrentSourcePos := r^.SourcePosition;
+        FCurrentRow := r^.Row;
+        FCurrentCol := r^.Col;
+        FCurrentFile := r^.FileName;
+        SourceChanged;
+        break;
+      end;
+    end;
+  end else
+  begin
+    FCurrentSourcePos := 0;
+    FCurrentRow := 0;
+    FCurrentCol := 0;
+    FCurrentFile := '';
+  end;
+  while FDebugMode = dmPaused do
+  begin
+    if @FOnIdleCall <> nil then
+    begin
+      FOnIdleCall(Self);
+    end else break; // endless loop
+  end;
+end;
+
+
+procedure TPSDebugExec.SourceChanged;
+
+  function StepOverShouldPause: Boolean;
+  var
+    I: Cardinal;
+    V: PPSVariant;
+  begin
+    if (FCurrProc <> FStepOverProc) or (FCurrStackBase <> FStepOverStackBase) then
+    begin
+      { We're not inside the function being stepped, so scan the call stack to
+        see if we're inside a function called by the function being stepped }
+      I := FCurrStackBase;
+      while Longint(I) > Longint(FStepOverStackBase) do
+      begin
+        V := FStack.Items[I];
+        if (V = nil) or (V.FType <> FReturnAddressType) then
+          raise Exception.Create(RPS_ExpectedReturnAddressStackBase);
+        if (PPSVariantReturnAddress(V).Addr.ProcNo = FStepOverProc) and
+           (PPSVariantReturnAddress(V).Addr.StackBase = FStepOverStackBase) then
+        begin
+          { We are, so don't pause }
+          Result := False;
+          Exit;
+        end;
+        I := PPSVariantReturnAddress(V).Addr.StackBase;
+      end;
+    end;
+    Result := True;
+  end;
+
+begin
+  case FDebugMode of
+    dmStepInto:
+      begin
+        FDebugMode := dmPaused;
+      end;
+    dmStepOver:
+      begin
+        if StepOverShouldPause then
+        begin
+          FDebugMode := dmPaused;
+        end;
+      end;
+  end;
+  if @FOnSourceLine <> nil then
+    FOnSourceLine(Self, FCurrentFile, FCurrentSourcePos, FCurrentRow, FCurrentCol);
+end;
+
+
+procedure TPSDebugExec.Pause;
+begin
+  FDebugMode := dmPaused;
+end;
+
+procedure TPSDebugExec.Stop;
+begin
+  FDebugMode := dmRun;
+  inherited Stop;
+end;
+
+procedure TPSDebugExec.Run;
+begin
+  FDebugMode := dmRun;
+end;
+
+procedure TPSDebugExec.StepInto;
+begin
+  FDebugMode := dmStepInto;
+end;
+
+procedure TPSDebugExec.StepOver;
+begin
+  FStepOverProc := FCurrProc;
+  FStepOverStackBase := FCurrStackBase;
+  FDebugMode := dmStepOver;
+end;
+
+
+constructor TPSDebugExec.Create;
+begin
+  inherited Create;
+  FDebugEnabled := True;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSDisassembly.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSDisassembly.pas
new file mode 100644
index 0000000..8be685c
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSDisassembly.pas	
@@ -0,0 +1,499 @@
+
+
+unit uPSDisassembly;
+{$I PascalScript.inc}
+
+interface
+uses
+  uPSRuntime, uPSUtils, sysutils;
+
+function IFPS3DataToText(const Input: string; var Output: string): Boolean;
+implementation
+
+type
+  TMyPSExec = class(TPSExec)
+    function ImportProc(const Name: ShortString; proc: TIFExternalProcRec): Boolean; override;
+  end;
+
+function Debug2Str(const s: string): string;
+var
+  i: Integer;
+begin
+  result := '';
+  for i := 1 to length(s) do
+  begin
+    if (s[i] < #32) or (s[i] > #128) then
+      result := result + '\'+inttohex(ord(s[i]), 2)
+    else if s[i] = '\' then
+      result := result + '\\'
+    else
+      result := result + s[i];
+  end;
+
+end;
+
+function SpecImportProc(Sender: TObject; p: TIFExternalProcRec): Boolean; forward;
+
+function FloatToStr(Value: Extended): string;
+begin
+  try
+    Result := SysUtils.FloatToStr(Value);
+  except
+    Result := 'NaNa';
+  end;
+end;
+
+
+function IFPS3DataToText(const Input: string; var Output: string): Boolean;
+var
+  I: TMyPSExec;
+
+  procedure Writeln(const s: string);
+  begin
+    Output := Output + s + #13#10;
+  end;
+  function BT2S(P: PIFTypeRec): string;
+  var
+    i: Longint;
+  begin
+    case p.BaseType of
+      btU8: Result := 'U8';
+      btS8: Result := 'S8';
+      btU16: Result := 'U16';
+      btS16: Result := 'S16';
+      btU32: Result := 'U32';
+      btS32: Result := 'S32';
+      {$IFNDEF PS_NOINT64}bts64: Result := 'S64'; {$ENDIF}
+      btChar: Result := 'Char';
+      {$IFNDEF PS_NOWIDESTRING}
+      btWideChar: Result := 'WideChar';
+      btWideString: Result := 'WideString';
+      {$ENDIF}
+      btSet: Result := 'Set'; 
+      btSingle: Result := 'Single';
+      btDouble: Result := 'Double';
+      btExtended: Result := 'Extended';
+      btString: Result := 'String';
+      btRecord:
+        begin
+          Result := 'Record(';
+          for i := 0 to TPSTypeRec_Record(p).FieldTypes.Count-1 do
+          begin
+            if i <> 0 then Result := Result+',';
+            Result := Result + BT2S(PIFTypeRec(TPSTypeRec_Record(p).FieldTypes[i]));
+          end;
+          Result := Result + ')';
+        end;
+      btArray: Result := 'Array of '+BT2S(TPSTypeRec_Array(p).ArrayType);
+      btResourcePointer: Result := 'ResourcePointer';
+      btPointer: Result := 'Pointer';
+      btVariant: Result := 'Variant';
+      btClass: Result := 'Class';
+      btProcPtr: Result := 'ProcPtr';
+      btStaticArray: Result := 'StaticArray['+inttostR(TPSTypeRec_StaticArray(p).Size)+'] of '+BT2S(TPSTypeRec_Array(p).ArrayType);
+    else
+      Result := 'Unknown '+inttostr(p.BaseType);
+    end;
+  end;
+  procedure WriteTypes;
+  var
+    T: Longint;
+  begin
+    Writeln('[TYPES]');
+    for T := 0 to i.FTypes.Count -1 do
+    begin
+      if PIFTypeRec(i.FTypes[t]).ExportName <> '' then
+        Writeln('Type ['+inttostr(t)+']: '+bt2s(PIFTypeRec(i.FTypes[t]))+' Export: '+PIFTypeRec(i.FTypes[t]).ExportName)
+      else
+        Writeln('Type ['+inttostr(t)+']: '+bt2s(PIFTypeRec(i.FTypes[t])));
+    end;
+  end;
+  procedure WriteVars;
+  var
+    T: Longint;
+    function FindType(p: Pointer): Cardinal;
+    var
+      T: Longint;
+    begin
+      Result := Cardinal(-1);
+      for T := 0 to i.FTypes.Count -1 do
+      begin
+        if p = i.FTypes[t] then begin
+          result := t;
+          exit;
+        end;
+      end;
+    end;
+  begin
+    Writeln('[VARS]');
+    for t := 0 to i.FGlobalVars.count -1 do
+    begin
+      Writeln('Var ['+inttostr(t)+']: '+ IntToStr(FindType(PIFVariant(i.FGlobalVars[t])^.FType)) + ' '+ bt2s(PIFVariant(i.FGlobalVars[t])^.Ftype) + ' '+ PIFVariant(i.FGlobalVars[t])^.Ftype.ExportName);
+    end;
+  end;
+
+  procedure WriteProcs;
+  var
+    t: Longint;
+    procedure WriteProc(proc: TPSProcRec);
+    var
+      sc, CP: Cardinal;
+      function ReadData(var Data; Len: Cardinal): Boolean;
+      begin
+        if CP + Len <= TPSInternalProcRec(PROC).Length then begin
+          Move(TPSInternalProcRec(Proc).Data[CP], Data, Len);
+          CP := CP + Len;
+          Result := True;
+        end else Result := False;
+      end;
+      function ReadByte(var B: Byte): Boolean;
+      begin
+        if CP < TPSInternalProcRec(Proc).Length then begin
+          b := TPSInternalProcRec(Proc).Data^[cp];
+          Inc(CP);
+          Result := True;
+        end else Result := False;
+      end;
+
+      function ReadLong(var B: Cardinal): Boolean;
+      begin
+        if CP + 3 < TPSInternalProcRec(Proc).Length then begin
+          b := Cardinal((@TPSInternalProcRec(Proc).Data[CP])^);
+          Inc(CP, 4);
+          Result := True;
+        end else Result := False;
+      end;
+      function ReadWriteVariable: string;
+      var
+        VarType: byte;
+        L1, L2: Cardinal;
+        function ReadVar(FType: Cardinal): string;
+        var
+          F: PIFTypeRec;
+          b: byte;
+          w: word;
+          l: Cardinal;
+          {$IFNDEF PS_NOINT64}ff: Int64;{$ENDIF}
+          e: extended;
+          ss: single;
+          d: double;
+          s: string;
+          c: char;
+          {$IFNDEF PS_NOWIDESTRING}
+          wc: WideChar;
+          ws: WideString;
+          {$ENDIF}
+
+        begin
+          result := '';
+          F:= i.FTypes[Ftype];
+          if f = nil then exit;
+          case f.BaseType of
+            btProcPtr: begin if not ReadData(l, 4) then exit; Result := 'PROC: '+inttostr(l); end;
+            btU8: begin if not ReadData(b, 1) then exit; Result := IntToStr(tbtu8(B)); end;
+            btS8: begin if not ReadData(b, 1) then exit; Result := IntToStr(tbts8(B)); end;
+            btU16: begin if not ReadData(w, 2) then exit; Result := IntToStr(tbtu16(w)); end;
+            btS16: begin if not ReadData(w, 2) then exit; Result := IntToStr(tbts16(w)); end;
+            btU32: begin if not ReadData(l, 4) then exit; Result := IntToStr(tbtu32(l)); end;
+            btS32: begin if not ReadData(l, 4) then exit; Result := IntToStr(tbts32(l)); end;
+            {$IFNDEF PS_NOINT64}bts64: begin if not ReadData(ff, 8) then exit; Result := IntToStr(ff); end;{$ENDIF}
+            btSingle: begin if not ReadData(ss, Sizeof(tbtsingle)) then exit; Result := FloatToStr(ss); end;
+            btDouble: begin if not ReadData(d, Sizeof(tbtdouble)) then exit; Result := FloatToStr(d); end;
+            btExtended: begin if not ReadData(e, Sizeof(tbtextended)) then exit; Result := FloatToStr(e); end;
+            btPChar, btString: begin if not ReadData(l, 4) then exit; SetLength(s, l); if not readData(s[1], l) then exit; Result := MakeString(s); end;
+            btSet:
+              begin
+                SetLength(s, TPSTypeRec_Set(f).aByteSize);
+                if not ReadData(s[1], length(s)) then exit;
+                result := MakeString(s);
+
+              end;
+            btChar: begin if not ReadData(c, 1) then exit; Result := '#'+IntToStr(ord(c)); end;
+            {$IFNDEF PS_NOWIDESTRING}
+            btWideChar: begin if not ReadData(wc, 2) then exit; Result := '#'+IntToStr(ord(wc)); end;
+            btWideString: begin if not ReadData(l, 4) then exit; SetLength(ws, l); if not readData(ws[1], l*2) then exit; Result := MakeWString(ws); end;
+            {$ENDIF}
+          end;
+        end;
+        function AddressToStr(a: Cardinal): string;
+        begin
+          if a < PSAddrNegativeStackStart then
+            Result := 'GlobalVar['+inttostr(a)+']'
+          else
+            Result := 'Base['+inttostr(Longint(A-PSAddrStackStart))+']';
+        end;
+
+      begin
+        Result := '';
+        if not ReadByte(VarType) then Exit;
+        case VarType of
+          0:
+          begin
+
+            if not ReadLong(L1) then Exit;
+            Result := AddressToStr(L1);
+          end;
+          1:
+          begin
+            if not ReadLong(L1) then Exit;
+            Result := '['+ReadVar(l1)+']';
+          end;
+          2:
+          begin
+            if not ReadLong(L1) then Exit;
+            if not ReadLong(L2) then Exit;
+            Result := AddressToStr(L1)+'.['+inttostr(l2)+']';
+          end;
+          3:
+          begin
+            if not ReadLong(l1) then Exit;
+            if not ReadLong(l2) then Exit;
+            Result := AddressToStr(L1)+'.'+AddressToStr(l2);
+          end;
+        end;
+      end;
+
+    var
+      b: Byte;
+      s: string;
+      DP, D1, D2, d3, d4: Cardinal;
+
+    begin
+      CP := 0;
+      sc := 0;
+      while true do
+      begin
+        DP := cp;
+        if not ReadByte(b) then Exit;
+        case b of
+          CM_A:
+          begin
+            {$IFDEF FPC}
+            Output := Output + ' ['+inttostr(dp)+'] ASSIGN '+ ReadWriteVariable;
+            Output := Output + ', ' + ReadWriteVariable + #13#10;
+            {$ELSE}
+            Writeln(' ['+inttostr(dp)+'] ASSIGN '+ReadWriteVariable+ ', ' + ReadWriteVariable);
+            {$ENDIF}
+          end;
+          CM_CA:
+          begin
+            if not ReadByte(b) then exit;
+            case b of
+            0: s:= '+';
+            1: s := '-';
+            2: s := '*';
+            3: s:= '/';
+            4: s:= 'MOD';
+            5: s:= 'SHL';
+            6: s:= 'SHR';
+            7: s:= 'AND';
+            8: s:= 'OR';
+            9: s:= 'XOR';
+            else
+              exit;
+            end;
+            Writeln(' ['+inttostr(dp)+'] CALC '+ReadWriteVariable+ ' '+s+' ' + ReadWriteVariable);
+          end;
+          CM_P:
+          begin
+            Inc(sc);
+            Writeln(' ['+inttostr(dp)+'] PUSH '+ReadWriteVariable + ' // '+inttostr(sc));
+          end;
+          CM_PV:
+          begin
+            Inc(sc);
+            Writeln(' ['+inttostr(dp)+'] PUSHVAR '+ReadWriteVariable + ' // '+inttostr(sc));
+          end;
+          CM_PO:
+          begin
+            Dec(Sc);
+            Writeln(' ['+inttostr(dp)+'] POP // '+inttostr(sc));
+          end;
+          Cm_C:
+          begin
+            if not ReadLong(D1) then exit;
+            Writeln(' ['+inttostr(dp)+'] CALL '+inttostr(d1));
+          end;
+          Cm_PG:
+          begin
+            if not ReadLong(D1) then exit;
+            Writeln(' ['+inttostr(dp)+'] POP/GOTO currpos + '+IntToStr(d1)+' ['+IntToStr(CP+d1)+']');
+          end;
+          Cm_P2G:
+          begin
+            if not ReadLong(D1) then exit;
+            Writeln(' ['+inttostr(dp)+'] POP2/GOTO currpos + '+IntToStr(d1)+' ['+IntToStr(CP+d1)+']');
+          end;
+          Cm_G:
+          begin
+            if not ReadLong(D1) then exit;
+            Writeln(' ['+inttostr(dp)+'] GOTO currpos + '+IntToStr(d1)+' ['+IntToStr(CP+d1)+']');
+          end;
+          Cm_CG:
+          begin
+            if not ReadLong(D1) then exit;
+            Writeln(' ['+inttostr(dp)+'] COND_GOTO currpos + '+IntToStr(d1)+' '+ReadWriteVariable+' ['+IntToStr(CP+d1)+']');
+          end;
+          Cm_CNG:
+          begin
+            if not ReadLong(D1) then exit;
+            Writeln(' ['+inttostr(dp)+'] COND_NOT_GOTO currpos + '+IntToStr(d1)+' '+ReadWriteVariable+' ['+IntToStr(CP+d1)+']');
+          end;
+          Cm_R: Writeln(' ['+inttostr(dp)+'] RET');
+          Cm_ST:
+          begin
+            if not ReadLong(d1) or not readLong(d2) then exit;
+            Writeln(' ['+inttostr(dp)+'] SETSTACKTYPE Base['+inttostr(d1)+'] '+inttostr(d2));
+          end;
+          Cm_Pt:
+          begin
+            Inc(sc);
+            if not ReadLong(D1) then exit;
+            Writeln(' ['+inttostr(dp)+'] PUSHTYPE '+inttostr(d1) + '('+BT2S(TPSTypeRec(I.FTypes[d1]))+') // '+inttostr(sc));
+          end;
+          CM_CO:
+          begin
+            if not readByte(b) then exit;
+            case b of
+              0: s := '>=';
+              1: s := '<=';
+              2: s := '>';
+              3: s := '<';
+              4: s := '<>';
+              5: s := '=';
+              else exit;
+            end;
+            Writeln(' ['+inttostr(dp)+'] COMPARE into '+ReadWriteVariable+': '+ReadWriteVariable+' '+s+' '+ReadWriteVariable);
+          end;
+          Cm_cv:
+          begin
+            Writeln(' ['+inttostr(dp)+'] CALLVAR '+ReadWriteVariable);
+          end;
+          Cm_inc:
+          begin
+            Writeln(' ['+inttostr(dp)+'] INC '+ReadWriteVariable);
+          end;
+          Cm_dec:
+          begin
+            Writeln(' ['+inttostr(dp)+'] DEC '+ReadWriteVariable);
+          end;
+          cm_sp:
+          begin
+            Writeln(' ['+inttostr(dp)+'] SETPOINTER '+ReadWriteVariable+': '+ReadWriteVariable);
+          end;
+          cm_spc:
+          begin
+            Writeln(' ['+inttostr(dp)+'] SETCOPYPOINTER '+ReadWriteVariable+': '+ReadWriteVariable);
+          end;
+          cm_in:
+          begin
+            Writeln(' ['+inttostr(dp)+'] INOT '+ReadWriteVariable);
+          end;
+          cm_bn:
+          begin
+            Writeln(' ['+inttostr(dp)+'] BNOT '+ReadWriteVariable);
+          end;
+          cm_vm:
+          begin
+            Writeln(' ['+inttostr(dp)+'] MINUS '+ReadWriteVariable);
+          end;
+          cm_sf:
+           begin
+             s := ReadWriteVariable;
+             if not ReadByte(b) then exit;
+             if b = 0 then
+               Writeln(' ['+inttostr(dp)+'] SETFLAG '+s)
+             else
+               Writeln(' ['+inttostr(dp)+'] SETFLAG NOT '+s);
+           end;
+           cm_fg:
+           begin
+             if not ReadLong(D1) then exit;
+             Writeln(' ['+inttostr(dp)+'] FLAGGOTO currpos + '+IntToStr(d1)+' ['+IntToStr(CP+d1)+']');
+           end;
+           cm_puexh:
+           begin
+             if not ReadLong(D1) then exit;
+             if not ReadLong(D2) then exit;
+             if not ReadLong(D3) then exit;
+             if not ReadLong(D4) then exit;
+             Writeln(' ['+inttostr(dp)+'] PUSHEXCEPTION '+inttostr(d1)+' '+inttostr(d2)+' '+inttostr(d3)+' '+inttostr(d4));
+           end;
+           cm_poexh:
+           begin
+             if not ReadByte(b) then exit;
+             Writeln(' ['+inttostr(dp)+'] POPEXCEPTION '+inttostr(b));
+           end;
+        else
+          begin
+            Writeln(' Disasm Error');
+            Break;
+          end;
+        end;
+      end;
+    end;
+
+  begin
+    Writeln('[PROCS]');
+    for t := 0 to i.FProcs.Count -1 do
+    begin
+      if TPSProcRec(i.FProcs[t]).ClassType = TIFExternalProcRec then
+      begin
+        if TPSExternalProcRec(i.FProcs[t]). Decl = '' then
+          Writeln('Proc ['+inttostr(t)+']: External: '+TPSExternalProcRec(i.FProcs[t]).Name)
+        else
+          Writeln('Proc ['+inttostr(t)+']: External Decl: '+Debug2Str(TIFExternalProcRec(i.FProcs[t]).Decl) + ' ' + TIFExternalProcRec(i.FProcs[t]).Name);
+      end else begin
+        if TPSInternalProcRec(i.FProcs[t]).ExportName <> '' then
+        begin
+          Writeln('Proc ['+inttostr(t)+'] Export: '+TPSInternalProcRec(i.FProcs[t]).ExportName+' '+TPSInternalProcRec(i.FProcs[t]).ExportDecl);
+        end else
+          Writeln('Proc ['+inttostr(t)+']');
+        Writeproc(i.FProcs[t]);
+      end;
+    end;
+  end;
+
+begin
+  Result := False;
+  try
+    I := TMyPSExec.Create;
+    I.AddSpecialProcImport('', @SpecImportProc, nil);
+
+    if not I.LoadData(Input) then begin
+      I.Free;
+      Exit;
+    end;
+    Output := '';
+    WriteTypes;
+    WriteVars;
+    WriteProcs;
+    I.Free;
+  except
+    exit;
+  end;
+  result := true;
+end;
+
+{ TMyIFPSExec }
+
+function MyDummyProc(Caller: TPSExec; p: TIFExternalProcRec; Global, Stack: TPSStack): Boolean;
+begin
+  Result := False;
+end;
+
+
+function TMyPSExec.ImportProc(const Name: ShortString;
+  proc: TIFExternalProcRec): Boolean;
+begin
+  Proc.ProcPtr := MyDummyProc;
+  result := true;
+end;
+
+function SpecImportProc(Sender: TObject; p: TIFExternalProcRec): Boolean;
+begin
+  p.ProcPtr := MyDummyProc;
+  Result := True;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSPreProcessor.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSPreProcessor.pas
new file mode 100644
index 0000000..711a2eb
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSPreProcessor.pas	
@@ -0,0 +1,780 @@
+
+unit uPSPreProcessor;
+{$I PascalScript.inc}
+
+interface
+uses
+  Classes, SysUtils, uPSCompiler, uPSUtils;
+
+
+
+type
+  EPSPreProcessor = class(Exception); //- jgv
+  TPSPreProcessor = class;
+  TPSPascalPreProcessorParser = class;
+
+  TPSOnNeedFile = function (Sender: TPSPreProcessor; const callingfilename: tbtstring; var FileName, Output: tbtstring): Boolean;
+  TPSOnProcessDirective = procedure (
+                            Sender: TPSPreProcessor;
+                            Parser: TPSPascalPreProcessorParser;
+                            const Active: Boolean;
+                            const DirectiveName, DirectiveParam: tbtString;
+                            Var Continue: Boolean); //- jgv - application set continue to false to stop the normal directive processing
+  
+  TPSLineInfo = class(TObject)
+  private
+    function GetLineOffset(I: Integer): Cardinal;
+    function GetLineOffsetCount: Longint;
+  protected
+    FEndPos: Cardinal;
+    FStartPos: Cardinal;
+    FFileName: tbtstring;
+    FLineOffsets: TIfList;
+  public
+
+    property FileName: tbtstring read FFileName;
+
+    property StartPos: Cardinal read FStartPos;
+    
+    property EndPos: Cardinal read FEndPos;
+    
+    property LineOffsetCount: Longint read GetLineOffsetCount;
+    
+    property LineOffset[I: Longint]: Cardinal read GetLineOffset;
+
+    
+    constructor Create;
+    
+    destructor Destroy; override;
+  end;
+  
+  TPSLineInfoResults = record
+    
+    Row,
+    Col,
+    Pos: Cardinal;
+    
+    Name: tbtstring;
+  end;
+  
+  TPSLineInfoList = class(TObject)
+  private
+    FItems: TIfList;
+    FCurrent: Longint;
+    function GetCount: Longint;
+    function GetItem(I: Integer): TPSLineInfo;
+  protected
+
+    function Add: TPSLineInfo;
+  public
+    
+    property Count: Longint read GetCount;
+    
+    property Items[I: Longint]: TPSLineInfo read GetItem; default;
+
+    procedure Clear;
+    
+    function GetLineInfo(const ModuleName: tbtstring; Pos: Cardinal; var Res: TPSLineInfoResults): Boolean;
+    
+    property Current: Longint read FCurrent write FCurrent;
+
+    
+    constructor Create;
+    
+    destructor Destroy; override;
+  end;
+  TPSDefineStates = class;
+  
+  TPSPreProcessor = class(TObject)
+  private
+    FID: Pointer;
+    FCurrentDefines, FDefines: TStringList;
+    FCurrentLineInfo: TPSLineInfoList;
+    FOnNeedFile: TPSOnNeedFile;
+    FAddedPosition: Cardinal;
+    FDefineState: TPSDefineStates;
+    FMaxLevel: Longint;
+    FMainFileName: tbtstring;
+    FMainFile: tbtstring;
+    FOnProcessDirective: TPSOnProcessDirective;
+    FOnProcessUnknowDirective: TPSOnProcessDirective;
+    procedure ParserNewLine(Sender: TPSPascalPreProcessorParser; Row, Col, Pos: Cardinal);
+    procedure IntPreProcess(Level: Integer; const OrgFileName: tbtstring; FileName: tbtstring; Dest: TStream);
+  protected
+    procedure doAddStdPredefines; virtual; // jgv
+  public
+    {The maximum number of levels deep the parser will go, defaults to 20}
+    property MaxLevel: Longint read FMaxLevel write FMaxLevel;
+    property CurrentLineInfo: TPSLineInfoList read FCurrentLineInfo;
+
+    property OnNeedFile: TPSOnNeedFile read FOnNeedFile write FOnNeedFile;
+
+    property Defines: TStringList read FDefines write FDefines;
+
+    property MainFile: tbtstring read FMainFile write FMainFile;
+
+    property MainFileName: tbtstring read FMainFileName write FMainFileName;
+
+    property ID: Pointer read FID write FID;
+
+    procedure AdjustMessages(Comp: TPSPascalCompiler);
+    procedure AdjustMessage(Msg: TPSPascalCompilerMessage); //-jgv
+
+    procedure PreProcess(const Filename: tbtstring; var Output: tbtstring);
+
+    procedure Clear;
+
+
+    constructor Create;
+
+    destructor Destroy; override;
+
+    property OnProcessDirective: TPSOnProcessDirective read fOnProcessDirective write fOnProcessDirective;
+    property OnProcessUnknowDirective: TPSOnProcessDirective read fOnProcessUnknowDirective write fOnProcessUnknowDirective;
+  end;
+
+  TPSPascalPreProcessorType = (ptEOF, ptOther, ptDefine);
+  
+  TPSOnNewLine = procedure (Sender: TPSPascalPreProcessorParser; Row, Col, Pos: Cardinal) of object;
+  
+  TPSPascalPreProcessorParser = class(TObject)
+  private
+    FData: tbtstring;
+    FText: PAnsichar;
+    FToken: tbtstring;
+    FTokenId: TPSPascalPreProcessorType;
+    FLastEnterPos, FLen, FRow, FCol, FPos: Cardinal;
+    FOnNewLine: TPSOnNewLine;
+  public
+    
+    procedure SetText(const dta: tbtstring);
+    
+    procedure Next;
+    
+    property Token: tbtstring read FToken;
+    
+    property TokenId: TPSPascalPreProcessorType read FTokenId;
+    
+    property Row: Cardinal read FRow;
+    
+    property Col: Cardinal read FCol;
+    
+    property Pos: Cardinal read FPos;
+    
+    property OnNewLine: TPSOnNewLine read FOnNewLine write FOnNewLine;
+  end;
+  
+  TPSDefineState = class(TObject)
+  private
+    FInElse: Boolean;
+    FDoWrite: Boolean;
+  public
+    
+    property InElse: Boolean read FInElse write FInElse;
+    
+    property DoWrite: Boolean read FDoWrite write FDoWrite;
+  end;
+
+  TPSDefineStates = class(TObject)
+  private
+    FItems: TIfList;
+    function GetCount: Longint;
+    function GetItem(I: Integer): TPSDefineState;
+    function GetWrite: Boolean;
+  public
+
+    property Count: Longint read GetCount;
+
+    property Item[I: Longint]: TPSDefineState read GetItem; default;
+    
+    function Add: TPSDefineState;
+    
+    procedure Delete(I: Longint);
+
+    
+    constructor Create;
+    
+    destructor Destroy; override;
+
+    procedure Clear;
+    
+    property DoWrite: Boolean read GetWrite;
+  end;
+
+implementation
+
+{$IFDEF DELPHI3UP }
+resourceString
+{$ELSE }
+const
+{$ENDIF }
+
+  RPS_TooManyNestedInclude = 'Too many nested include files while processing ''%s'' from ''%s''';
+  RPS_IncludeNotFound = 'Unable to find file ''%s'' used from ''%s''';
+  RPS_DefineTooManyParameters = 'Too many parameters at %d:%d';
+  RPS_NoIfdefForEndif = 'No IFDEF for ENDIF at %d:%d';
+  RPS_NoIfdefForElse = 'No IFDEF for ELSE at %d:%d';
+  RPS_ElseTwice = 'Can''t use ELSE twice at %d:%d';
+  RPS_UnknownCompilerDirective = 'Unknown compiler directives at %d:%d';
+  RPs_DefineNotClosed = 'Define not closed';
+
+{ TPSLineInfoList }
+
+function TPSLineInfoList.Add: TPSLineInfo;
+begin
+  Result := TPSLineInfo.Create;
+  FItems.Add(Result);
+end;
+
+procedure TPSLineInfoList.Clear;
+var
+  i: Longint;
+begin
+  for i := FItems.count -1 downto 0 do
+    TPSLineInfo(FItems[i]).Free;
+  FItems.Clear;
+end;
+
+constructor TPSLineInfoList.Create;
+begin
+  inherited Create;
+  FItems := TIfList.Create;
+end;
+
+destructor TPSLineInfoList.Destroy;
+begin
+  Clear;
+  FItems.Free;
+  inherited Destroy;
+end;
+
+function TPSLineInfoList.GetCount: Longint;
+begin
+  Result := FItems.Count;
+end;
+
+function TPSLineInfoList.GetItem(I: Integer): TPSLineInfo;
+begin
+  Result := TPSLineInfo(FItems[i]);
+end;
+
+function TPSLineInfoList.GetLineInfo(const ModuleName: tbtstring; Pos: Cardinal; var Res: TPSLineInfoResults): Boolean;
+var
+  i,j: Longint;
+  linepos: Cardinal;
+  Item: TPSLineInfo;
+  lModuleName: tbtstring;
+begin
+  lModuleName := FastUpperCase(ModuleName);
+
+  for i := FItems.Count -1 downto 0 do
+  begin
+    Item := FItems[i];
+    if (Pos >= Item.StartPos) and (Pos < Item.EndPos) and
+      (lModuleName = '') or (lModuleName = Item.FileName) then
+    begin
+      Res.Name := Item.FileName;
+      Pos := Pos - Item.StartPos;
+      Res.Pos := Pos;
+      Res.Col := 1;
+      Res.Row := 1;
+      LinePos := 0;
+      for j := 0 to Item.LineOffsetCount -1 do
+      begin
+        if Pos >= Item.LineOffset[j] then
+        begin
+          linepos := Item.LineOffset[j];
+        end else
+        begin
+          Res.Row := j; // j -1, but line counting starts at 1
+          Res.Col := pos - linepos + 1;
+          Break;
+        end;
+      end;
+      Result := True;
+      exit;
+    end;
+  end;
+  Result := False;
+end;
+
+{ TPSLineInfo }
+
+constructor TPSLineInfo.Create;
+begin
+  inherited Create;
+  FLineOffsets := TIfList.Create;
+end;
+
+destructor TPSLineInfo.Destroy;
+begin
+  FLineOffsets.Free;
+  inherited Destroy;
+end;
+
+
+function TPSLineInfo.GetLineOffset(I: Integer): Cardinal;
+begin
+  Result := Longint(FLineOffsets[I]);
+end;
+
+function TPSLineInfo.GetLineOffsetCount: Longint;
+begin
+  result := FLineOffsets.Count;
+end;
+
+{ TPSPascalPreProcessorParser }
+
+procedure TPSPascalPreProcessorParser.Next;
+var
+  ci: Cardinal;
+
+begin
+  FPos := FPos + FLen;
+  case FText[FPos] of
+    #0:
+      begin
+        FLen := 0;
+        FTokenId := ptEof;
+      end;
+    '''':
+      begin
+        ci := FPos;
+        while (FText[ci] <> #0) do
+        begin
+          Inc(ci);
+          while FText[ci] = '''' do
+          begin
+            if FText[ci+1] <> '''' then Break;
+            inc(ci);
+            inc(ci);
+          end;
+          if FText[ci] = '''' then Break;
+          if FText[ci] = #13 then
+          begin
+            inc(FRow);
+            if FText[ci] = #10 then
+              inc(ci);
+            FLastEnterPos := ci -1;
+            if @FOnNewLine <> nil then FOnNewLine(Self, FRow, FPos - FLastEnterPos + 1, ci+1);
+          end else if FText[ci] = #10 then
+          begin
+            inc(FRow);
+            FLastEnterPos := ci -1;
+            if @FOnNewLine <> nil then FOnNewLine(Self, FRow, FPos - FLastEnterPos + 1, ci+1);
+          end;
+        end;
+        FLen := ci - FPos + 1;
+        FTokenId := ptOther;
+      end;
+    '(':
+      begin
+        if FText[FPos + 1] = '*' then
+        begin
+          ci := FPos + 1;
+          while (FText[ci] <> #0) do begin
+            if (FText[ci] = '*') and (FText[ci + 1] = ')') then
+              Break;
+            if FText[ci] = #13 then
+            begin
+              inc(FRow);
+              if FText[ci+1] = #10 then
+                inc(ci);
+              FLastEnterPos := ci -1;
+              if @FOnNewLine <> nil then FOnNewLine(Self, FRow, FPos - FLastEnterPos + 1, ci+1);
+            end else if FText[ci] = #10 then
+            begin
+              inc(FRow);
+              FLastEnterPos := ci -1;
+              if @FOnNewLine <> nil then FOnNewLine(Self, FRow, FPos - FLastEnterPos + 1, ci+1);
+            end;
+            Inc(ci);
+          end;
+          FTokenId := ptOther;
+          if (FText[ci] <> #0) then
+            Inc(ci, 2);
+          FLen := ci - FPos;
+        end
+        else
+        begin
+          FTokenId := ptOther;
+          FLen := 1;
+        end;
+      end;
+      '/':
+        begin
+          if FText[FPos + 1] = '/' then
+          begin
+            ci := FPos + 1;
+            while (FText[ci] <> #0) and (FText[ci] <> #13) and
+              (FText[ci] <> #10) do begin
+              Inc(ci);
+            end;
+            FTokenId := ptOther;
+            FLen := ci - FPos;
+          end else
+          begin
+            FTokenId := ptOther;
+            FLen := 1;
+          end;
+        end;
+      '{':
+        begin
+          ci := FPos + 1;
+          while (FText[ci] <> #0) and (FText[ci] <> '}') do begin
+            if FText[ci] = #13 then
+            begin
+              inc(FRow);
+              if FText[ci+1] = #10 then
+                inc(ci);
+              FLastEnterPos := ci - 1;
+              if @FOnNewLine <> nil then FOnNewLine(Self, FRow, FPos - FLastEnterPos + 1, ci+1);
+            end else if FText[ci] = #10 then
+            begin
+              inc(FRow);
+              FLastEnterPos := ci - 1;
+              if @FOnNewLine <> nil then FOnNewLine(Self, FRow, FPos - FLastEnterPos + 1, ci+1);
+            end;
+            Inc(ci);
+          end;
+          if FText[FPos + 1] = '$' then
+            FTokenId := ptDefine
+          else
+            FTokenId := ptOther;
+
+          FLen := ci - FPos + 1;
+        end;
+      else
+      begin
+        ci := FPos + 1;
+        while not (FText[ci] in [#0,'{', '(', '''', '/']) do
+        begin
+          if FText[ci] = #13 then
+          begin
+            inc(FRow);
+            if FText[ci+1] = #10 then
+              inc(ci);
+            FLastEnterPos := ci - 1;
+            if @FOnNewLine <> nil then FOnNewLine(Self, FRow, FPos - FLastEnterPos + 1, ci+1);
+          end else if FText[ci] = #10 then
+          begin
+            inc(FRow);
+            FLastEnterPos := ci -1 ;
+            if @FOnNewLine <> nil then FOnNewLine(Self, FRow, FPos - FLastEnterPos + 1, ci+1);
+          end;
+          Inc(Ci);
+        end;
+        FTokenId := ptOther;
+        FLen := ci - FPos;
+      end;
+  end;
+  FCol := FPos - FLastEnterPos + 1;
+  FToken := Copy(FData, FPos +1, FLen);
+end;
+
+procedure TPSPascalPreProcessorParser.SetText(const dta: tbtstring);
+begin
+  FData := dta;
+  FText := pAnsichar(FData);
+  FLen := 0;
+  FPos := 0;
+  FCol := 1;
+  FLastEnterPos := 0;
+  FRow := 1;
+  if @FOnNewLine <> nil then FOnNewLine(Self, 1, 1, 0);
+  Next;
+end;
+
+{ TPSPreProcessor }
+
+procedure TPSPreProcessor.AdjustMessage(Msg: TPSPascalCompilerMessage);
+var
+  Res: TPSLineInfoResults;
+begin
+  if CurrentLineInfo.GetLineInfo(Msg.ModuleName, Msg.Pos, Res) then
+  begin
+    Msg.SetCustomPos(res.Pos, Res.Row, Res.Col);
+    Msg.ModuleName := Res.Name;
+  end;
+end;
+
+procedure TPSPreProcessor.AdjustMessages(Comp: TPSPascalCompiler);
+var
+  i: Longint;
+begin
+  for i := 0 to Comp.MsgCount -1 do
+    AdjustMessage (Comp.Msg[i]);
+end;
+
+procedure TPSPreProcessor.Clear;
+begin
+  FDefineState.Clear;
+  FDefines.Clear;
+  FCurrentDefines.Clear;
+  FCurrentLineInfo.Clear;
+  FMainFile := '';
+end;
+
+constructor TPSPreProcessor.Create;
+begin
+  inherited Create;
+  FDefines := TStringList.Create;
+  FCurrentLineInfo := TPSLineInfoList.Create;
+  FCurrentDefines := TStringList.Create;
+  FDefines.Duplicates := dupIgnore;
+  FCurrentDefines.Duplicates := dupIgnore;
+  FDefineState := TPSDefineStates.Create;
+  FMaxLevel := 20;
+
+  doAddStdPredefines;
+end;
+
+destructor TPSPreProcessor.Destroy;
+begin
+  FDefineState.Free;
+  FCurrentDefines.Free;
+  FDefines.Free;
+  FCurrentLineInfo.Free;
+  inherited Destroy;
+end;
+
+procedure TPSPreProcessor.doAddStdPredefines;
+begin
+  //--- 20050708_jgv
+  FCurrentDefines.Add (Format ('VER%d', [PSCurrentBuildNo]));
+  {$IFDEF CPU386 }
+  FCurrentDefines.Add ('CPU386');
+  {$ENDIF }
+  {$IFDEF MSWINDOWS }
+    FCurrentDefines.Add ('MSWINDOWS');
+    FCurrentDefines.Add ('WIN32');
+  {$ENDIF }
+  {$IFDEF LINUX }
+    FCurrentDefines.Add ('LINUX');
+  {$ENDIF }
+end;
+
+procedure TPSPreProcessor.IntPreProcess(Level: Integer; const OrgFileName: tbtstring; FileName: tbtstring; Dest: TStream);
+var
+  Parser: TPSPascalPreProcessorParser;
+  dta: tbtstring;
+  item: TPSLineInfo;
+  s, name: tbtstring;
+  current, i: Longint;
+  ds: TPSDefineState;
+  AppContinue: Boolean;
+begin
+  if Level > MaxLevel then raise EPSPreProcessor.CreateFmt(RPS_TooManyNestedInclude, [FileName, OrgFileName]);
+  Parser := TPSPascalPreProcessorParser.Create;
+  try
+    Parser.OnNewLine := ParserNewLine;
+    if FileName = MainFileName then
+    begin
+      dta := MainFile;
+    end else
+    if (@OnNeedFile = nil) or (not OnNeedFile(Self, OrgFileName, FileName, dta)) then
+      raise EPSPreProcessor.CreateFmt(RPS_IncludeNotFound, [FileName, OrgFileName]);
+    Item := FCurrentLineInfo.Add;
+    current := FCurrentLineInfo.Count -1;
+    FCurrentLineInfo.Current := current;
+    Item.FStartPos := Dest.Position;
+    Item.FFileName := FileName;
+    Parser.SetText(dta);
+    while Parser.TokenId <> ptEOF do
+    begin
+      s := Parser.Token;
+      if Parser.TokenId = ptDefine then
+      begin
+        Delete(s,1,2);  // delete the {$
+        Delete(s,length(s), 1); // delete the }
+
+        //-- 20050707_jgv trim right
+        i := length (s);
+        while (i > 0) and (s[i] = ' ') do begin
+          Delete (s, i, 1);
+          Dec (i);
+        end;
+        //-- end_jgv
+
+        if pos(' ', s) = 0 then
+        begin
+          name := uppercase(s);
+          s := '';
+        end else
+        begin
+          Name := uppercase(copy(s,1,pos(' ', s)-1));
+          Delete(s, 1, pos(' ', s));
+        end;
+
+        //-- 20050707_jgv - ask the application
+        AppContinue := True;
+        If @OnProcessDirective <> Nil then OnProcessDirective (Self, Parser, FDefineState.DoWrite, name, s, AppContinue);
+
+        If AppContinue then
+        //-- end jgv
+
+          if (Name = 'I') or (Name = 'INCLUDE') then
+          begin
+            if FDefineState.DoWrite then
+            begin
+              FAddedPosition := 0;
+              IntPreProcess(Level +1, FileName, s, Dest);
+              FCurrentLineInfo.Current := current;
+              FAddedPosition := Cardinal(Dest.Position) - Item.StartPos - Parser.Pos;
+            end;
+          end else if (Name = 'DEFINE') then
+          begin
+            if FDefineState.DoWrite then
+            begin
+              if pos(' ', s) <> 0 then raise EPSPreProcessor.CreateFmt(RPS_DefineTooManyParameters, [Parser.Row, Parser.Col]);
+              FCurrentDefines.Add(Uppercase(S));
+            end;
+          end else if (Name = 'UNDEF') then
+          begin
+            if FDefineState.DoWrite then
+            begin
+              if pos(' ', s) <> 0 then raise EPSPreProcessor.CreateFmt(RPS_DefineTooManyParameters, [Parser.Row, Parser.Col]);
+              i := FCurrentDefines.IndexOf(Uppercase(s));
+              if i <> -1 then
+                FCurrentDefines.Delete(i);
+            end;
+          end else if (Name = 'IFDEF') then
+          begin
+            if pos(' ', s) <> 0 then raise EPSPreProcessor.CreateFmt(RPS_DefineTooManyParameters, [Parser.Row, Parser.Col]);
+            FDefineState.Add.DoWrite := FCurrentDefines.IndexOf(Uppercase(s)) <> -1;
+          end else if (Name = 'IFNDEF') then
+          begin
+            if pos(' ', s) <> 0 then raise EPSPreProcessor.CreateFmt(RPS_DefineTooManyParameters, [Parser.Row, Parser.Col]);
+            FDefineState.Add.DoWrite := FCurrentDefines.IndexOf(Uppercase(s)) = -1;
+          end else if (Name = 'ENDIF') then
+          begin
+            //- jgv remove - borland use it (sysutils.pas)
+            //- if s <> '' then raise EPSPreProcessor.CreateFmt(RPS_DefineTooManyParameters, [Parser.Row, Parser.Col]);
+            if FDefineState.Count = 0 then
+              raise EPSPreProcessor.CreateFmt(RPS_NoIfdefForEndif, [Parser.Row, Parser.Col]);
+            FDefineState.Delete(FDefineState.Count -1); // remove define from list
+          end else if (Name = 'ELSE') then
+          begin
+            if s<> '' then raise EPSPreProcessor.CreateFmt(RPS_DefineTooManyParameters, [Parser.Row, Parser.Col]);
+            if FDefineState.Count = 0 then
+              raise EPSPreProcessor.CreateFmt(RPS_NoIfdefForElse, [Parser.Row, Parser.Col]);
+            ds := FDefineState[FDefineState.Count -1];
+            if ds.InElse then
+              raise EPSPreProcessor.CreateFmt(RPS_ElseTwice, [Parser.Row, Parser.Col]);
+            ds.FInElse := True;
+            ds.DoWrite := not ds.DoWrite;
+          end
+
+          //-- 20050710_jgv custom application error process
+          else begin
+            If @OnProcessUnknowDirective <> Nil then begin
+              OnProcessUnknowDirective (Self, Parser, FDefineState.DoWrite, name, s, AppContinue);
+            end;
+            If AppContinue then
+            //-- end jgv
+          
+              raise EPSPreProcessor.CreateFmt(RPS_UnknownCompilerDirective, [Parser.Row, Parser.Col]);
+          end;
+      end;
+
+      if (not FDefineState.DoWrite) or (Parser.TokenId = ptDefine) then
+      begin
+        SetLength(s, Length(Parser.Token));
+        for i := length(s) downto 1 do
+          s[i] := #32; // space
+      end;
+      Dest.Write(s[1], length(s));
+      Parser.Next;
+    end;
+    Item.FEndPos := Dest.Position;
+  finally
+    Parser.Free;
+  end;
+end;
+
+procedure TPSPreProcessor.ParserNewLine(Sender: TPSPascalPreProcessorParser; Row, Col, Pos: Cardinal);
+begin
+  if FCurrentLineInfo.Current >= FCurrentLineInfo.Count then exit; //errr ???
+  with FCurrentLineInfo.Items[FCurrentLineInfo.Current] do
+  begin
+    Pos := Pos + FAddedPosition;
+    FLineOffsets.Add(Pointer(Pos));
+  end;
+end;
+
+procedure TPSPreProcessor.PreProcess(const Filename: tbtstring; var Output: tbtstring);
+var
+  Stream: TMemoryStream;
+begin
+  FAddedPosition := 0;
+  FCurrentDefines.Assign(FDefines);
+  Stream := TMemoryStream.Create;
+  try
+    IntPreProcess(0, '', FileName, Stream);
+    Stream.Position := 0;
+    SetLength(Output, Stream.Size);
+    Stream.Read(Output[1], Length(Output));
+  finally
+    Stream.Free;
+  end;
+  if FDefineState.Count <> 0 then
+    raise EPSPreProcessor.Create(RPs_DefineNotClosed);
+end;
+
+{ TPSDefineStates }
+
+function TPSDefineStates.Add: TPSDefineState;
+begin
+  Result := TPSDefineState.Create;
+  FItems.Add(Result);
+end;
+
+procedure TPSDefineStates.Clear;
+var
+  i: Longint;
+begin
+  for i := Longint(FItems.Count) -1 downto 0 do
+    TPSDefineState(FItems[i]).Free;
+  FItems.Clear;
+end;
+
+constructor TPSDefineStates.Create;
+begin
+  inherited Create;
+  FItems := TIfList.Create;
+end;
+
+procedure TPSDefineStates.Delete(I: Integer);
+begin
+  TPSDefineState(FItems[i]).Free;
+  FItems.Delete(i);
+end;
+
+destructor TPSDefineStates.Destroy;
+var
+  i: Longint;
+begin
+  for i := Longint(FItems.Count) -1 downto 0 do
+    TPSDefineState(FItems[i]).Free;
+  FItems.Free;
+  inherited Destroy;
+end;
+
+function TPSDefineStates.GetCount: Longint;
+begin
+  Result := FItems.Count;
+end;
+
+function TPSDefineStates.GetItem(I: Integer): TPSDefineState;
+begin
+  Result := FItems[i];
+end;
+
+function TPSDefineStates.GetWrite: Boolean;
+begin
+  if FItems.Count = 0 then
+    result := true
+  else Result := TPSDefineState(FItems[FItems.Count -1]).DoWrite;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_DB.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_DB.pas
new file mode 100644
index 0000000..3c2fb80
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_DB.pas	
@@ -0,0 +1,2094 @@
+{runtime DB support}
+Unit uPSR_DB;
+{$I PascalScript.inc}
+Interface
+Uses uPSRuntime, uPSUtils, SysUtils;
+
+procedure RIRegisterTDATASET(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTPARAMS(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTPARAM(Cl: TPSRuntimeClassImporter);
+
+{$IFNDEF FPC}
+procedure RIRegisterTGUIDFIELD(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTVARIANTFIELD(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTREFERENCEFIELD(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTDATASETFIELD(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTARRAYFIELD(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTADTFIELD(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTOBJECTFIELD(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTWIDESTRINGFIELD(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTFIELDLIST(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTFIELDDEFLIST(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTFLATLIST(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTDEFCOLLECTION(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTNAMEDITEM(Cl: TPSRuntimeClassImporter);
+
+{$IFDEF DELPHI6UP}
+procedure RIRegisterTFMTBCDFIELD(Cl: TPSRuntimeClassImporter);
+{$ENDIF}
+procedure RIRegisterTBCDFIELD(Cl: TPSRuntimeClassImporter);
+
+{$ENDIF}
+
+procedure RIRegisterTGRAPHICFIELD(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTMEMOFIELD(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTBLOBFIELD(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTVARBYTESFIELD(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTBYTESFIELD(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTBINARYFIELD(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTTIMEFIELD(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTDATEFIELD(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTDATETIMEFIELD(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTBOOLEANFIELD(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTCURRENCYFIELD(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTFLOATFIELD(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTAUTOINCFIELD(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTWORDFIELD(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTLARGEINTFIELD(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTSMALLINTFIELD(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTINTEGERFIELD(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTNUMERICFIELD(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTSTRINGFIELD(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTFIELD(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTLOOKUPLIST(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTFIELDS(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTINDEXDEFS(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTINDEXDEF(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTFIELDDEFS(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTFIELDDEF(Cl: TPSRuntimeClassImporter);
+procedure RIRegister_DB(CL: TPSRuntimeClassImporter);
+
+implementation
+Uses DB, {$IFDEF DELPHI6UP}{$IFNDEF FPC}FMTBcd, MaskUtils,{$ENDIF}{$ENDIF}Classes;
+
+procedure TDATASETONPOSTERROR_W(Self: TDATASET; const T: TDATASETERROREVENT);
+begin Self.ONPOSTERROR := T; end;
+
+procedure TDATASETONPOSTERROR_R(Self: TDATASET; var T: TDATASETERROREVENT);
+begin T := Self.ONPOSTERROR; end;
+
+procedure TDATASETONNEWRECORD_W(Self: TDATASET; const T: TDATASETNOTIFYEVENT);
+begin Self.ONNEWRECORD := T; end;
+
+procedure TDATASETONNEWRECORD_R(Self: TDATASET; var T: TDATASETNOTIFYEVENT);
+begin T := Self.ONNEWRECORD; end;
+
+procedure TDATASETONFILTERRECORD_W(Self: TDATASET; const T: TFILTERRECORDEVENT);
+begin Self.ONFILTERRECORD := T; end;
+
+procedure TDATASETONFILTERRECORD_R(Self: TDATASET; var T: TFILTERRECORDEVENT);
+begin T := Self.ONFILTERRECORD; end;
+
+procedure TDATASETONEDITERROR_W(Self: TDATASET; const T: TDATASETERROREVENT);
+begin Self.ONEDITERROR := T; end;
+
+procedure TDATASETONEDITERROR_R(Self: TDATASET; var T: TDATASETERROREVENT);
+begin T := Self.ONEDITERROR; end;
+
+procedure TDATASETONDELETEERROR_W(Self: TDATASET; const T: TDATASETERROREVENT);
+begin Self.ONDELETEERROR := T; end;
+
+procedure TDATASETONDELETEERROR_R(Self: TDATASET; var T: TDATASETERROREVENT);
+begin T := Self.ONDELETEERROR; end;
+
+procedure TDATASETONCALCFIELDS_W(Self: TDATASET; const T: TDATASETNOTIFYEVENT);
+begin Self.ONCALCFIELDS := T; end;
+
+procedure TDATASETONCALCFIELDS_R(Self: TDATASET; var T: TDATASETNOTIFYEVENT);
+begin T := Self.ONCALCFIELDS; end;
+
+{$IFNDEF FPC}
+procedure TDATASETAFTERREFRESH_W(Self: TDATASET; const T: TDATASETNOTIFYEVENT);
+begin Self.AFTERREFRESH := T; end;
+
+procedure TDATASETAFTERREFRESH_R(Self: TDATASET; var T: TDATASETNOTIFYEVENT);
+begin T := Self.AFTERREFRESH; end;
+
+procedure TDATASETBEFOREREFRESH_W(Self: TDATASET; const T: TDATASETNOTIFYEVENT);
+begin Self.BEFOREREFRESH := T; end;
+
+procedure TDATASETBEFOREREFRESH_R(Self: TDATASET; var T: TDATASETNOTIFYEVENT);
+begin T := Self.BEFOREREFRESH; end;
+
+{$ENDIF}
+
+procedure TDATASETAFTERSCROLL_W(Self: TDATASET; const T: TDATASETNOTIFYEVENT);
+begin Self.AFTERSCROLL := T; end;
+
+procedure TDATASETAFTERSCROLL_R(Self: TDATASET; var T: TDATASETNOTIFYEVENT);
+begin T := Self.AFTERSCROLL; end;
+
+procedure TDATASETBEFORESCROLL_W(Self: TDATASET; const T: TDATASETNOTIFYEVENT);
+begin Self.BEFORESCROLL := T; end;
+
+procedure TDATASETBEFORESCROLL_R(Self: TDATASET; var T: TDATASETNOTIFYEVENT);
+begin T := Self.BEFORESCROLL; end;
+
+procedure TDATASETAFTERDELETE_W(Self: TDATASET; const T: TDATASETNOTIFYEVENT);
+begin Self.AFTERDELETE := T; end;
+
+procedure TDATASETAFTERDELETE_R(Self: TDATASET; var T: TDATASETNOTIFYEVENT);
+begin T := Self.AFTERDELETE; end;
+
+procedure TDATASETBEFOREDELETE_W(Self: TDATASET; const T: TDATASETNOTIFYEVENT);
+begin Self.BEFOREDELETE := T; end;
+
+procedure TDATASETBEFOREDELETE_R(Self: TDATASET; var T: TDATASETNOTIFYEVENT);
+begin T := Self.BEFOREDELETE; end;
+
+procedure TDATASETAFTERCANCEL_W(Self: TDATASET; const T: TDATASETNOTIFYEVENT);
+begin Self.AFTERCANCEL := T; end;
+
+procedure TDATASETAFTERCANCEL_R(Self: TDATASET; var T: TDATASETNOTIFYEVENT);
+begin T := Self.AFTERCANCEL; end;
+
+procedure TDATASETBEFORECANCEL_W(Self: TDATASET; const T: TDATASETNOTIFYEVENT);
+begin Self.BEFORECANCEL := T; end;
+
+procedure TDATASETBEFORECANCEL_R(Self: TDATASET; var T: TDATASETNOTIFYEVENT);
+begin T := Self.BEFORECANCEL; end;
+
+procedure TDATASETAFTERPOST_W(Self: TDATASET; const T: TDATASETNOTIFYEVENT);
+begin Self.AFTERPOST := T; end;
+
+procedure TDATASETAFTERPOST_R(Self: TDATASET; var T: TDATASETNOTIFYEVENT);
+begin T := Self.AFTERPOST; end;
+
+procedure TDATASETBEFOREPOST_W(Self: TDATASET; const T: TDATASETNOTIFYEVENT);
+begin Self.BEFOREPOST := T; end;
+
+procedure TDATASETBEFOREPOST_R(Self: TDATASET; var T: TDATASETNOTIFYEVENT);
+begin T := Self.BEFOREPOST; end;
+
+procedure TDATASETAFTEREDIT_W(Self: TDATASET; const T: TDATASETNOTIFYEVENT);
+begin Self.AFTEREDIT := T; end;
+
+procedure TDATASETAFTEREDIT_R(Self: TDATASET; var T: TDATASETNOTIFYEVENT);
+begin T := Self.AFTEREDIT; end;
+
+procedure TDATASETBEFOREEDIT_W(Self: TDATASET; const T: TDATASETNOTIFYEVENT);
+begin Self.BEFOREEDIT := T; end;
+
+procedure TDATASETBEFOREEDIT_R(Self: TDATASET; var T: TDATASETNOTIFYEVENT);
+begin T := Self.BEFOREEDIT; end;
+
+procedure TDATASETAFTERINSERT_W(Self: TDATASET; const T: TDATASETNOTIFYEVENT);
+begin Self.AFTERINSERT := T; end;
+
+procedure TDATASETAFTERINSERT_R(Self: TDATASET; var T: TDATASETNOTIFYEVENT);
+begin T := Self.AFTERINSERT; end;
+
+procedure TDATASETBEFOREINSERT_W(Self: TDATASET; const T: TDATASETNOTIFYEVENT);
+begin Self.BEFOREINSERT := T; end;
+
+procedure TDATASETBEFOREINSERT_R(Self: TDATASET; var T: TDATASETNOTIFYEVENT);
+begin T := Self.BEFOREINSERT; end;
+
+procedure TDATASETAFTERCLOSE_W(Self: TDATASET; const T: TDATASETNOTIFYEVENT);
+begin Self.AFTERCLOSE := T; end;
+
+procedure TDATASETAFTERCLOSE_R(Self: TDATASET; var T: TDATASETNOTIFYEVENT);
+begin T := Self.AFTERCLOSE; end;
+
+procedure TDATASETBEFORECLOSE_W(Self: TDATASET; const T: TDATASETNOTIFYEVENT);
+begin Self.BEFORECLOSE := T; end;
+
+procedure TDATASETBEFORECLOSE_R(Self: TDATASET; var T: TDATASETNOTIFYEVENT);
+begin T := Self.BEFORECLOSE; end;
+
+procedure TDATASETAFTEROPEN_W(Self: TDATASET; const T: TDATASETNOTIFYEVENT);
+begin Self.AFTEROPEN := T; end;
+
+procedure TDATASETAFTEROPEN_R(Self: TDATASET; var T: TDATASETNOTIFYEVENT);
+begin T := Self.AFTEROPEN; end;
+
+procedure TDATASETBEFOREOPEN_W(Self: TDATASET; const T: TDATASETNOTIFYEVENT);
+begin Self.BEFOREOPEN := T; end;
+
+procedure TDATASETBEFOREOPEN_R(Self: TDATASET; var T: TDATASETNOTIFYEVENT);
+begin T := Self.BEFOREOPEN; end;
+
+procedure TDATASETAUTOCALCFIELDS_W(Self: TDATASET; const T: BOOLEAN);
+begin Self.AUTOCALCFIELDS := T; end;
+
+procedure TDATASETAUTOCALCFIELDS_R(Self: TDATASET; var T: BOOLEAN);
+begin T := Self.AUTOCALCFIELDS; end;
+
+procedure TDATASETACTIVE_W(Self: TDATASET; const T: BOOLEAN);
+begin Self.ACTIVE := T; end;
+
+procedure TDATASETACTIVE_R(Self: TDATASET; var T: BOOLEAN);
+begin T := Self.ACTIVE; end;
+
+procedure TDATASETFILTEROPTIONS_W(Self: TDATASET; const T: TFILTEROPTIONS);
+begin Self.FILTEROPTIONS := T; end;
+
+procedure TDATASETFILTEROPTIONS_R(Self: TDATASET; var T: TFILTEROPTIONS);
+begin T := Self.FILTEROPTIONS; end;
+
+procedure TDATASETFILTERED_W(Self: TDATASET; const T: BOOLEAN);
+begin Self.FILTERED := T; end;
+
+procedure TDATASETFILTERED_R(Self: TDATASET; var T: BOOLEAN);
+begin T := Self.FILTERED; end;
+
+procedure TDATASETFILTER_W(Self: TDATASET; const T: String);
+begin Self.FILTER := T; end;
+
+procedure TDATASETFILTER_R(Self: TDATASET; var T: String);
+begin T := Self.FILTER; end;
+
+procedure TDATASETSTATE_R(Self: TDATASET; var T: TDATASETSTATE);
+begin T := Self.STATE; end;
+
+{$IFNDEF FPC}
+procedure TDATASETSPARSEARRAYS_W(Self: TDATASET; const T: BOOLEAN);
+begin Self.SPARSEARRAYS := T; end;
+
+procedure TDATASETSPARSEARRAYS_R(Self: TDATASET; var T: BOOLEAN);
+begin T := Self.SPARSEARRAYS; end;
+{$ENDIF}
+
+procedure TDATASETRECORDSIZE_R(Self: TDATASET; var T: WORD);
+begin T := Self.RECORDSIZE; end;
+
+procedure TDATASETRECNO_W(Self: TDATASET; const T: INTEGER);
+begin Self.RECNO := T; end;
+
+procedure TDATASETRECNO_R(Self: TDATASET; var T: INTEGER);
+begin T := Self.RECNO; end;
+
+procedure TDATASETRECORDCOUNT_R(Self: TDATASET; var T: INTEGER);
+begin T := Self.RECORDCOUNT; end;
+
+{$IFNDEF FPC}
+procedure TDATASETOBJECTVIEW_W(Self: TDATASET; const T: BOOLEAN);
+begin Self.OBJECTVIEW := T; end;
+
+procedure TDATASETOBJECTVIEW_R(Self: TDATASET; var T: BOOLEAN);
+begin T := Self.OBJECTVIEW; end;
+{$ENDIF}
+
+procedure TDATASETMODIFIED_R(Self: TDATASET; var T: BOOLEAN);
+begin T := Self.MODIFIED; end;
+
+{$IFDEF DELPHI6UP}
+procedure TDATASETISUNIDIRECTIONAL_R(Self: TDATASET; var T: BOOLEAN);
+begin T := Self.ISUNIDIRECTIONAL; end;
+{$ENDIF}
+
+procedure TDATASETFOUND_R(Self: TDATASET; var T: BOOLEAN);
+begin T := Self.FOUND; end;
+
+procedure TDATASETFIELDVALUES_W(Self: TDATASET; const T: VARIANT; const t1: String);
+begin Self.FIELDVALUES[t1] := T; end;
+
+procedure TDATASETFIELDVALUES_R(Self: TDATASET; var T: VARIANT; const t1: String);
+begin T := Self.FIELDVALUES[t1]; end;
+
+procedure TDATASETFIELDS_R(Self: TDATASET; var T: TFIELDS);
+begin T := Self.FIELDS; end;
+
+{$IFNDEF FPC}
+
+procedure TDATASETFIELDLIST_R(Self: TDATASET; var T: TFIELDLIST);
+begin T := Self.FIELDLIST; end;
+
+
+procedure TDATASETFIELDDEFLIST_R(Self: TDATASET; var T: TFIELDDEFLIST);
+begin T := Self.FIELDDEFLIST; end;
+
+procedure TDATASETFIELDDEFS_W(Self: TDATASET; const T: TFIELDDEFS);
+begin Self.FIELDDEFS := T; end;
+
+procedure TDATASETFIELDDEFS_R(Self: TDATASET; var T: TFIELDDEFS);
+begin T := Self.FIELDDEFS; end;
+
+procedure TDATASETBLOCKREADSIZE_W(Self: TDATASET; const T: INTEGER);
+begin Self.BLOCKREADSIZE := T; end;
+
+procedure TDATASETBLOCKREADSIZE_R(Self: TDATASET; var T: INTEGER);
+begin T := Self.BLOCKREADSIZE; end;
+
+procedure TDATASETDESIGNER_R(Self: TDATASET; var T: TDATASETDESIGNER);
+begin T := Self.DESIGNER; end;
+
+
+procedure TDATASETDATASETFIELD_W(Self: TDATASET; const T: TDATASETFIELD);
+begin Self.DATASETFIELD := T; end;
+
+
+
+procedure TDATASETDATASETFIELD_R(Self: TDATASET; var T: TDATASETFIELD);
+begin T := Self.DATASETFIELD; end;
+
+
+procedure TDATASETAGGFIELDS_R(Self: TDATASET; var T: TFIELDS);
+begin T := Self.AGGFIELDS; end;
+
+
+
+{$ENDIF}
+
+procedure TDATASETFIELDCOUNT_R(Self: TDATASET; var T: INTEGER);
+begin T := Self.FIELDCOUNT; end;
+
+
+procedure TDATASETEOF_R(Self: TDATASET; var T: BOOLEAN);
+begin T := Self.EOF; end;
+
+procedure TDATASETDEFAULTFIELDS_R(Self: TDATASET; var T: BOOLEAN);
+begin T := Self.DEFAULTFIELDS; end;
+
+procedure TDATASETDATASOURCE_R(Self: TDATASET; var T: TDATASOURCE);
+begin T := Self.DATASOURCE; end;
+
+
+
+procedure TDATASETCANMODIFY_R(Self: TDATASET; var T: BOOLEAN);
+begin T := Self.CANMODIFY; end;
+
+//procedure TDATASETBOOKMARK_W(Self: TDATASET; const T: TBOOKMARKSTR);
+//begin Self.BOOKMARK := T; end;
+
+//procedure TDATASETBOOKMARK_R(Self: TDATASET; var T: TBOOKMARKSTR);
+//begin T := Self.BOOKMARK; end;
+
+procedure TDATASETBOF_R(Self: TDATASET; var T: BOOLEAN);
+begin T := Self.BOF; end;
+
+procedure TPARAMSPARAMVALUES_W(Self: TPARAMS; const T: VARIANT; const t1: String);
+begin Self.PARAMVALUES[t1] := T; end;
+
+procedure TPARAMSPARAMVALUES_R(Self: TPARAMS; var T: VARIANT; const t1: String);
+begin T := Self.PARAMVALUES[t1]; end;
+
+procedure TPARAMSITEMS_W(Self: TPARAMS; const T: TPARAM; const t1: INTEGER);
+begin Self.ITEMS[t1] := T; end;
+
+procedure TPARAMSITEMS_R(Self: TPARAMS; var T: TPARAM; const t1: INTEGER);
+begin T := Self.ITEMS[t1]; end;
+
+procedure TPARAMVALUE_W(Self: TPARAM; const T: VARIANT);
+begin Self.VALUE := T; end;
+
+procedure TPARAMVALUE_R(Self: TPARAM; var T: VARIANT);
+begin T := Self.VALUE; end;
+
+
+{$IFDEF DELPHI6UP}
+procedure TPARAMSIZE_W(Self: TPARAM; const T: INTEGER);
+begin Self.SIZE := T; end;
+
+procedure TPARAMSIZE_R(Self: TPARAM; var T: INTEGER);
+begin T := Self.SIZE; end;
+{$ENDIF}
+
+procedure TPARAMPARAMTYPE_W(Self: TPARAM; const T: TPARAMTYPE);
+begin Self.PARAMTYPE := T; end;
+
+procedure TPARAMPARAMTYPE_R(Self: TPARAM; var T: TPARAMTYPE);
+begin T := Self.PARAMTYPE; end;
+
+procedure TPARAMNAME_W(Self: TPARAM; const T: String);
+begin Self.NAME := T; end;
+
+procedure TPARAMNAME_R(Self: TPARAM; var T: String);
+begin T := Self.NAME; end;
+
+{$IFDEF DELPHI6UP}
+procedure TPARAMNUMERICSCALE_W(Self: TPARAM; const T: INTEGER);
+begin Self.NUMERICSCALE := T; end;
+
+procedure TPARAMNUMERICSCALE_R(Self: TPARAM; var T: INTEGER);
+begin T := Self.NUMERICSCALE; end;
+{$ENDIF}
+{$IFDEF DELPHI6UP}
+
+procedure TPARAMPRECISION_W(Self: TPARAM; const T: INTEGER);
+begin Self.PRECISION := T; end;
+
+procedure TPARAMPRECISION_R(Self: TPARAM; var T: INTEGER);
+begin T := Self.PRECISION; end;
+{$ENDIF}
+procedure TPARAMDATATYPE_W(Self: TPARAM; const T: TFIELDTYPE);
+begin Self.DATATYPE := T; end;
+
+procedure TPARAMDATATYPE_R(Self: TPARAM; var T: TFIELDTYPE);
+begin T := Self.DATATYPE; end;
+
+procedure TPARAMTEXT_W(Self: TPARAM; const T: String);
+begin Self.TEXT := T; end;
+
+procedure TPARAMTEXT_R(Self: TPARAM; var T: String);
+begin T := Self.TEXT; end;
+
+procedure TPARAMNATIVESTR_W(Self: TPARAM; const T: String);
+begin Self.NATIVESTR := T; end;
+
+procedure TPARAMNATIVESTR_R(Self: TPARAM; var T: String);
+begin T := Self.NATIVESTR; end;
+
+procedure TPARAMISNULL_R(Self: TPARAM; var T: BOOLEAN);
+begin T := Self.ISNULL; end;
+
+procedure TPARAMBOUND_W(Self: TPARAM; const T: BOOLEAN);
+begin Self.BOUND := T; end;
+
+procedure TPARAMBOUND_R(Self: TPARAM; var T: BOOLEAN);
+begin T := Self.BOUND; end;
+
+procedure TPARAMASWORD_W(Self: TPARAM; const T: LONGINT);
+begin Self.ASWORD := T; end;
+
+procedure TPARAMASWORD_R(Self: TPARAM; var T: LONGINT);
+begin T := Self.ASWORD; end;
+
+procedure TPARAMASTIME_W(Self: TPARAM; const T: TDATETIME);
+begin Self.ASTIME := T; end;
+
+procedure TPARAMASTIME_R(Self: TPARAM; var T: TDATETIME);
+begin T := Self.ASTIME; end;
+
+procedure TPARAMASSTRING_W(Self: TPARAM; const T: String);
+begin Self.ASSTRING := T; end;
+
+procedure TPARAMASSTRING_R(Self: TPARAM; var T: String);
+begin T := Self.ASSTRING; end;
+
+procedure TPARAMASMEMO_W(Self: TPARAM; const T: String);
+begin Self.ASMEMO := T; end;
+
+procedure TPARAMASMEMO_R(Self: TPARAM; var T: String);
+begin T := Self.ASMEMO; end;
+
+procedure TPARAMASSMALLINT_W(Self: TPARAM; const T: LONGINT);
+begin Self.ASSMALLINT := T; end;
+
+procedure TPARAMASSMALLINT_R(Self: TPARAM; var T: LONGINT);
+begin T := Self.ASSMALLINT; end;
+
+procedure TPARAMASINTEGER_W(Self: TPARAM; const T: LONGINT);
+begin Self.ASINTEGER := T; end;
+
+procedure TPARAMASINTEGER_R(Self: TPARAM; var T: LONGINT);
+begin T := Self.ASINTEGER; end;
+
+procedure TPARAMASFLOAT_W(Self: TPARAM; const T: DOUBLE);
+begin Self.ASFLOAT := T; end;
+
+procedure TPARAMASFLOAT_R(Self: TPARAM; var T: DOUBLE);
+begin T := Self.ASFLOAT; end;
+
+procedure TPARAMASDATETIME_W(Self: TPARAM; const T: TDATETIME);
+begin Self.ASDATETIME := T; end;
+
+procedure TPARAMASDATETIME_R(Self: TPARAM; var T: TDATETIME);
+begin T := Self.ASDATETIME; end;
+
+procedure TPARAMASDATE_W(Self: TPARAM; const T: TDATETIME);
+begin Self.ASDATE := T; end;
+
+procedure TPARAMASDATE_R(Self: TPARAM; var T: TDATETIME);
+begin T := Self.ASDATE; end;
+
+procedure TPARAMASCURRENCY_W(Self: TPARAM; const T: CURRENCY);
+begin Self.ASCURRENCY := T; end;
+
+procedure TPARAMASCURRENCY_R(Self: TPARAM; var T: CURRENCY);
+begin T := Self.ASCURRENCY; end;
+
+procedure TPARAMASBOOLEAN_W(Self: TPARAM; const T: BOOLEAN);
+begin Self.ASBOOLEAN := T; end;
+
+procedure TPARAMASBOOLEAN_R(Self: TPARAM; var T: BOOLEAN);
+begin T := Self.ASBOOLEAN; end;
+
+procedure TPARAMASBLOB_W(Self: TPARAM; const T: TBLOBDATA);
+begin Self.ASBLOB := T; end;
+
+procedure TPARAMASBLOB_R(Self: TPARAM; var T: TBLOBDATA);
+begin T := Self.ASBLOB; end;
+
+{$IFNDEF FPC}
+
+{$IFDEF DELPHI6UP}
+procedure TPARAMASFMTBCD_W(Self: TPARAM; const T: TBCD);
+begin Self.ASFMTBCD := T; end;
+
+procedure TPARAMASFMTBCD_R(Self: TPARAM; var T: TBCD);
+begin T := Self.ASFMTBCD; end;
+{$ENDIF}
+procedure TPARAMASBCD_W(Self: TPARAM; const T: CURRENCY);
+begin Self.ASBCD := T; end;
+
+procedure TPARAMASBCD_R(Self: TPARAM; var T: CURRENCY);
+begin T := Self.ASBCD; end;
+
+procedure TREFERENCEFIELDREFERENCETABLENAME_W(Self: TREFERENCEFIELD; const T: String);
+begin Self.REFERENCETABLENAME := T; end;
+
+procedure TREFERENCEFIELDREFERENCETABLENAME_R(Self: TREFERENCEFIELD; var T: String);
+begin T := Self.REFERENCETABLENAME; end;
+
+
+procedure TDATASETFIELDINCLUDEOBJECTFIELD_W(Self: TDATASETFIELD; const T: BOOLEAN);
+begin Self.INCLUDEOBJECTFIELD := T; end;
+
+procedure TDATASETFIELDINCLUDEOBJECTFIELD_R(Self: TDATASETFIELD; var T: BOOLEAN);
+begin T := Self.INCLUDEOBJECTFIELD; end;
+
+procedure TDATASETFIELDNESTEDDATASET_R(Self: TDATASETFIELD; var T: TDATASET);
+begin T := Self.NESTEDDATASET; end;
+
+procedure TOBJECTFIELDOBJECTTYPE_W(Self: TOBJECTFIELD; const T: String);
+begin Self.OBJECTTYPE := T; end;
+
+procedure TOBJECTFIELDOBJECTTYPE_R(Self: TOBJECTFIELD; var T: String);
+begin T := Self.OBJECTTYPE; end;
+
+procedure TOBJECTFIELDUNNAMED_R(Self: TOBJECTFIELD; var T: BOOLEAN);
+begin T := Self.UNNAMED; end;
+
+procedure TOBJECTFIELDFIELDVALUES_W(Self: TOBJECTFIELD; const T: VARIANT; const t1: INTEGER);
+begin Self.FIELDVALUES[t1] := T; end;
+
+procedure TOBJECTFIELDFIELDVALUES_R(Self: TOBJECTFIELD; var T: VARIANT; const t1: INTEGER);
+begin T := Self.FIELDVALUES[t1]; end;
+
+procedure TOBJECTFIELDFIELDS_R(Self: TOBJECTFIELD; var T: TFIELDS);
+begin T := Self.FIELDS; end;
+
+procedure TOBJECTFIELDFIELDCOUNT_R(Self: TOBJECTFIELD; var T: INTEGER);
+begin T := Self.FIELDCOUNT; end;
+{$ENDIF}
+
+
+{$IFNDEF FPC}
+{$IFDEF DELPHI6UP}
+procedure TBLOBFIELDGRAPHICHEADER_W(Self: TBLOBFIELD; const T: BOOLEAN);
+begin Self.GRAPHICHEADER := T; end;
+
+procedure TBLOBFIELDGRAPHICHEADER_R(Self: TBLOBFIELD; var T: BOOLEAN);
+begin T := Self.GRAPHICHEADER; end;
+{$ENDIF}
+{$ENDIF}
+
+procedure TBLOBFIELDBLOBTYPE_W(Self: TBLOBFIELD; const T: TBLOBTYPE);
+begin Self.BLOBTYPE := T; end;
+
+procedure TBLOBFIELDBLOBTYPE_R(Self: TBLOBFIELD; var T: TBLOBTYPE);
+begin T := Self.BLOBTYPE; end;
+
+procedure TBLOBFIELDTRANSLITERATE_W(Self: TBLOBFIELD; const T: BOOLEAN);
+begin Self.TRANSLITERATE := T; end;
+
+procedure TBLOBFIELDTRANSLITERATE_R(Self: TBLOBFIELD; var T: BOOLEAN);
+begin T := Self.TRANSLITERATE; end;
+
+procedure TBLOBFIELDVALUE_W(Self: TBLOBFIELD; const T: String);
+{$IFDEF DELPHI2009UP}
+var
+  b: TBytes;
+begin
+  setLEngth(b, Length(T));
+  Move(T[1], b[0], Length(T));
+  self.Value := b;
+  {$ELSE}
+begin
+  Self.VALUE := T;
+  {$ENDIF}
+end;
+
+procedure TBLOBFIELDVALUE_R(Self: TBLOBFIELD; var T: String);
+begin
+{$IFDEF DELPHI2009UP}
+  SetLength(t, Length(SElf.Value));
+  Move(Self.Value[0], t[1], LEngth(T));
+{$ELSE}
+  T := Self.VALUE;
+{$ENDIF}
+end;
+
+procedure TBLOBFIELDMODIFIED_W(Self: TBLOBFIELD; const T: BOOLEAN);
+begin Self.MODIFIED := T; end;
+
+procedure TBLOBFIELDMODIFIED_R(Self: TBLOBFIELD; var T: BOOLEAN);
+begin T := Self.MODIFIED; end;
+
+procedure TBLOBFIELDBLOBSIZE_R(Self: TBLOBFIELD; var T: INTEGER);
+begin T := Self.BLOBSIZE; end;
+
+{$IFNDEF FPC}
+{$IFDEF DELPHI6UP}
+procedure TFMTBCDFIELDPRECISION_W(Self: TFMTBCDFIELD; const T: INTEGER);
+begin Self.PRECISION := T; end;
+
+procedure TFMTBCDFIELDPRECISION_R(Self: TFMTBCDFIELD; var T: INTEGER);
+begin T := Self.PRECISION; end;
+
+procedure TFMTBCDFIELDMINVALUE_W(Self: TFMTBCDFIELD; const T: String);
+begin Self.MINVALUE := T; end;
+
+procedure TFMTBCDFIELDMINVALUE_R(Self: TFMTBCDFIELD; var T: String);
+begin T := Self.MINVALUE; end;
+
+procedure TFMTBCDFIELDMAXVALUE_W(Self: TFMTBCDFIELD; const T: String);
+begin Self.MAXVALUE := T; end;
+
+procedure TFMTBCDFIELDMAXVALUE_R(Self: TFMTBCDFIELD; var T: String);
+begin T := Self.MAXVALUE; end;
+
+procedure TFMTBCDFIELDCURRENCY_W(Self: TFMTBCDFIELD; const T: BOOLEAN);
+begin Self.CURRENCY := T; end;
+
+procedure TFMTBCDFIELDCURRENCY_R(Self: TFMTBCDFIELD; var T: BOOLEAN);
+begin T := Self.CURRENCY; end;
+
+procedure TFMTBCDFIELDVALUE_W(Self: TFMTBCDFIELD; const T: TBCD);
+begin Self.VALUE := T; end;
+
+procedure TFMTBCDFIELDVALUE_R(Self: TFMTBCDFIELD; var T: TBCD);
+begin T := Self.VALUE; end;
+{$ENDIF}
+
+procedure TBCDFIELDPRECISION_W(Self: TBCDFIELD; const T: INTEGER);
+begin Self.PRECISION := T; end;
+
+procedure TBCDFIELDPRECISION_R(Self: TBCDFIELD; var T: INTEGER);
+begin T := Self.PRECISION; end;
+
+procedure TBCDFIELDMINVALUE_W(Self: TBCDFIELD; const T: CURRENCY);
+begin Self.MINVALUE := T; end;
+
+procedure TBCDFIELDMINVALUE_R(Self: TBCDFIELD; var T: CURRENCY);
+begin T := Self.MINVALUE; end;
+
+procedure TBCDFIELDMAXVALUE_W(Self: TBCDFIELD; const T: CURRENCY);
+begin Self.MAXVALUE := T; end;
+
+procedure TBCDFIELDMAXVALUE_R(Self: TBCDFIELD; var T: CURRENCY);
+begin T := Self.MAXVALUE; end;
+
+procedure TBCDFIELDCURRENCY_W(Self: TBCDFIELD; const T: BOOLEAN);
+begin Self.CURRENCY := T; end;
+
+procedure TBCDFIELDCURRENCY_R(Self: TBCDFIELD; var T: BOOLEAN);
+begin T := Self.CURRENCY; end;
+
+procedure TBCDFIELDVALUE_W(Self: TBCDFIELD; const T: CURRENCY);
+begin Self.VALUE := T; end;
+
+procedure TBCDFIELDVALUE_R(Self: TBCDFIELD; var T: CURRENCY);
+begin T := Self.VALUE; end;
+{$ENDIF}
+
+
+procedure TDATETIMEFIELDDISPLAYFORMAT_W(Self: TDATETIMEFIELD; const T: String);
+begin Self.DISPLAYFORMAT := T; end;
+
+procedure TDATETIMEFIELDDISPLAYFORMAT_R(Self: TDATETIMEFIELD; var T: String);
+begin T := Self.DISPLAYFORMAT; end;
+
+procedure TDATETIMEFIELDVALUE_W(Self: TDATETIMEFIELD; const T: TDATETIME);
+begin Self.VALUE := T; end;
+
+procedure TDATETIMEFIELDVALUE_R(Self: TDATETIMEFIELD; var T: TDATETIME);
+begin T := Self.VALUE; end;
+
+procedure TBOOLEANFIELDDISPLAYVALUES_W(Self: TBOOLEANFIELD; const T: String);
+begin Self.DISPLAYVALUES := T; end;
+
+procedure TBOOLEANFIELDDISPLAYVALUES_R(Self: TBOOLEANFIELD; var T: String);
+begin T := Self.DISPLAYVALUES; end;
+
+procedure TBOOLEANFIELDVALUE_W(Self: TBOOLEANFIELD; const T: BOOLEAN);
+begin Self.VALUE := T; end;
+
+procedure TBOOLEANFIELDVALUE_R(Self: TBOOLEANFIELD; var T: BOOLEAN);
+begin T := Self.VALUE; end;
+
+procedure TFLOATFIELDPRECISION_W(Self: TFLOATFIELD; const T: INTEGER);
+begin Self.PRECISION := T; end;
+
+procedure TFLOATFIELDPRECISION_R(Self: TFLOATFIELD; var T: INTEGER);
+begin T := Self.PRECISION; end;
+
+procedure TFLOATFIELDMINVALUE_W(Self: TFLOATFIELD; const T: DOUBLE);
+begin Self.MINVALUE := T; end;
+
+procedure TFLOATFIELDMINVALUE_R(Self: TFLOATFIELD; var T: DOUBLE);
+begin T := Self.MINVALUE; end;
+
+procedure TFLOATFIELDMAXVALUE_W(Self: TFLOATFIELD; const T: DOUBLE);
+begin Self.MAXVALUE := T; end;
+
+procedure TFLOATFIELDMAXVALUE_R(Self: TFLOATFIELD; var T: DOUBLE);
+begin T := Self.MAXVALUE; end;
+
+{$IFNDEF FPC}
+procedure TFLOATFIELDCURRENCY_W(Self: TFLOATFIELD; const T: BOOLEAN);
+begin Self.CURRENCY := T; end;
+
+procedure TFLOATFIELDCURRENCY_R(Self: TFLOATFIELD; var T: BOOLEAN);
+begin T := Self.CURRENCY; end;
+{$ENDIF}
+
+procedure TFLOATFIELDVALUE_W(Self: TFLOATFIELD; const T: DOUBLE);
+begin Self.VALUE := T; end;
+
+procedure TFLOATFIELDVALUE_R(Self: TFLOATFIELD; var T: DOUBLE);
+begin T := Self.VALUE; end;
+
+procedure TLARGEINTFIELDMINVALUE_W(Self: TLARGEINTFIELD; const T: LARGEINT);
+begin Self.MINVALUE := T; end;
+
+procedure TLARGEINTFIELDMINVALUE_R(Self: TLARGEINTFIELD; var T: LARGEINT);
+begin T := Self.MINVALUE; end;
+
+procedure TLARGEINTFIELDMAXVALUE_W(Self: TLARGEINTFIELD; const T: LARGEINT);
+begin Self.MAXVALUE := T; end;
+
+procedure TLARGEINTFIELDMAXVALUE_R(Self: TLARGEINTFIELD; var T: LARGEINT);
+begin T := Self.MAXVALUE; end;
+
+procedure TLARGEINTFIELDVALUE_W(Self: TLARGEINTFIELD; const T: LARGEINT);
+begin Self.VALUE := T; end;
+
+procedure TLARGEINTFIELDVALUE_R(Self: TLARGEINTFIELD; var T: LARGEINT);
+begin T := Self.VALUE; end;
+
+procedure TLARGEINTFIELDASLARGEINT_W(Self: TLARGEINTFIELD; const T: LARGEINT);
+begin Self.ASLARGEINT := T; end;
+
+procedure TLARGEINTFIELDASLARGEINT_R(Self: TLARGEINTFIELD; var T: LARGEINT);
+begin T := Self.ASLARGEINT; end;
+
+procedure TINTEGERFIELDMINVALUE_W(Self: TINTEGERFIELD; const T: LONGINT);
+begin Self.MINVALUE := T; end;
+
+procedure TINTEGERFIELDMINVALUE_R(Self: TINTEGERFIELD; var T: LONGINT);
+begin T := Self.MINVALUE; end;
+
+procedure TINTEGERFIELDMAXVALUE_W(Self: TINTEGERFIELD; const T: LONGINT);
+begin Self.MAXVALUE := T; end;
+
+procedure TINTEGERFIELDMAXVALUE_R(Self: TINTEGERFIELD; var T: LONGINT);
+begin T := Self.MAXVALUE; end;
+
+procedure TINTEGERFIELDVALUE_W(Self: TINTEGERFIELD; const T: LONGINT);
+begin Self.VALUE := T; end;
+
+procedure TINTEGERFIELDVALUE_R(Self: TINTEGERFIELD; var T: LONGINT);
+begin T := Self.VALUE; end;
+
+procedure TNUMERICFIELDEDITFORMAT_W(Self: TNUMERICFIELD; const T: String);
+begin Self.EDITFORMAT := T; end;
+
+procedure TNUMERICFIELDEDITFORMAT_R(Self: TNUMERICFIELD; var T: String);
+begin T := Self.EDITFORMAT; end;
+
+procedure TNUMERICFIELDDISPLAYFORMAT_W(Self: TNUMERICFIELD; const T: String);
+begin Self.DISPLAYFORMAT := T; end;
+
+procedure TNUMERICFIELDDISPLAYFORMAT_R(Self: TNUMERICFIELD; var T: String);
+begin T := Self.DISPLAYFORMAT; end;
+
+{$IFNDEF FPC}
+procedure TWIDESTRINGFIELDVALUE_W(Self: TWIDESTRINGFIELD; const T: WIDESTRING);
+begin Self.VALUE := T; end;
+
+procedure TWIDESTRINGFIELDVALUE_R(Self: TWIDESTRINGFIELD; var T: WIDESTRING);
+begin T := Self.VALUE; end;
+
+procedure TSTRINGFIELDTRANSLITERATE_W(Self: TSTRINGFIELD; const T: BOOLEAN);
+begin Self.TRANSLITERATE := T; end;
+
+procedure TSTRINGFIELDTRANSLITERATE_R(Self: TSTRINGFIELD; var T: BOOLEAN);
+begin T := Self.TRANSLITERATE; end;
+
+procedure TSTRINGFIELDFIXEDCHAR_W(Self: TSTRINGFIELD; const T: BOOLEAN);
+begin Self.FIXEDCHAR := T; end;
+
+procedure TSTRINGFIELDFIXEDCHAR_R(Self: TSTRINGFIELD; var T: BOOLEAN);
+begin T := Self.FIXEDCHAR; end;
+{$ENDIF}
+
+
+procedure TSTRINGFIELDVALUE_W(Self: TSTRINGFIELD; const T: String);
+begin Self.VALUE := T; end;
+
+procedure TSTRINGFIELDVALUE_R(Self: TSTRINGFIELD; var T: String);
+begin T := Self.VALUE; end;
+
+procedure TFIELDONVALIDATE_W(Self: TFIELD; const T: TFIELDNOTIFYEVENT);
+begin Self.ONVALIDATE := T; end;
+
+procedure TFIELDONVALIDATE_R(Self: TFIELD; var T: TFIELDNOTIFYEVENT);
+begin T := Self.ONVALIDATE; end;
+
+procedure TFIELDONSETTEXT_W(Self: TFIELD; const T: TFIELDSETTEXTEVENT);
+begin Self.ONSETTEXT := T; end;
+
+procedure TFIELDONSETTEXT_R(Self: TFIELD; var T: TFIELDSETTEXTEVENT);
+begin T := Self.ONSETTEXT; end;
+
+procedure TFIELDONGETTEXT_W(Self: TFIELD; const T: TFIELDGETTEXTEVENT);
+begin Self.ONGETTEXT := T; end;
+
+procedure TFIELDONGETTEXT_R(Self: TFIELD; var T: TFIELDGETTEXTEVENT);
+begin T := Self.ONGETTEXT; end;
+
+procedure TFIELDONCHANGE_W(Self: TFIELD; const T: TFIELDNOTIFYEVENT);
+begin Self.ONCHANGE := T; end;
+
+procedure TFIELDONCHANGE_R(Self: TFIELD; var T: TFIELDNOTIFYEVENT);
+begin T := Self.ONCHANGE; end;
+
+procedure TFIELDVISIBLE_W(Self: TFIELD; const T: BOOLEAN);
+begin Self.VISIBLE := T; end;
+
+procedure TFIELDVISIBLE_R(Self: TFIELD; var T: BOOLEAN);
+begin T := Self.VISIBLE; end;
+
+procedure TFIELDREQUIRED_W(Self: TFIELD; const T: BOOLEAN);
+begin Self.REQUIRED := T; end;
+
+procedure TFIELDREQUIRED_R(Self: TFIELD; var T: BOOLEAN);
+begin T := Self.REQUIRED; end;
+
+procedure TFIELDREADONLY_W(Self: TFIELD; const T: BOOLEAN);
+begin Self.READONLY := T; end;
+
+procedure TFIELDREADONLY_R(Self: TFIELD; var T: BOOLEAN);
+begin T := Self.READONLY; end;
+
+procedure TFIELDPROVIDERFLAGS_W(Self: TFIELD; const T: TPROVIDERFLAGS);
+begin Self.PROVIDERFLAGS := T; end;
+
+procedure TFIELDPROVIDERFLAGS_R(Self: TFIELD; var T: TPROVIDERFLAGS);
+begin T := Self.PROVIDERFLAGS; end;
+
+procedure TFIELDORIGIN_W(Self: TFIELD; const T: String);
+begin Self.ORIGIN := T; end;
+
+procedure TFIELDORIGIN_R(Self: TFIELD; var T: String);
+begin T := Self.ORIGIN; end;
+
+procedure TFIELDLOOKUPCACHE_W(Self: TFIELD; const T: BOOLEAN);
+begin Self.LOOKUPCACHE := T; end;
+
+procedure TFIELDLOOKUPCACHE_R(Self: TFIELD; var T: BOOLEAN);
+begin T := Self.LOOKUPCACHE; end;
+
+procedure TFIELDKEYFIELDS_W(Self: TFIELD; const T: String);
+begin Self.KEYFIELDS := T; end;
+
+procedure TFIELDKEYFIELDS_R(Self: TFIELD; var T: String);
+begin T := Self.KEYFIELDS; end;
+
+procedure TFIELDLOOKUPRESULTFIELD_W(Self: TFIELD; const T: String);
+begin Self.LOOKUPRESULTFIELD := T; end;
+
+procedure TFIELDLOOKUPRESULTFIELD_R(Self: TFIELD; var T: String);
+begin T := Self.LOOKUPRESULTFIELD; end;
+
+procedure TFIELDLOOKUPKEYFIELDS_W(Self: TFIELD; const T: String);
+begin Self.LOOKUPKEYFIELDS := T; end;
+
+procedure TFIELDLOOKUPKEYFIELDS_R(Self: TFIELD; var T: String);
+begin T := Self.LOOKUPKEYFIELDS; end;
+
+procedure TFIELDLOOKUPDATASET_W(Self: TFIELD; const T: TDATASET);
+begin Self.LOOKUPDATASET := T; end;
+
+procedure TFIELDLOOKUPDATASET_R(Self: TFIELD; var T: TDATASET);
+begin T := Self.LOOKUPDATASET; end;
+
+procedure TFIELDIMPORTEDCONSTRAINT_W(Self: TFIELD; const T: String);
+begin Self.IMPORTEDCONSTRAINT := T; end;
+
+procedure TFIELDIMPORTEDCONSTRAINT_R(Self: TFIELD; var T: String);
+begin T := Self.IMPORTEDCONSTRAINT; end;
+
+procedure TFIELDINDEX_W(Self: TFIELD; const T: INTEGER);
+begin Self.INDEX := T; end;
+
+procedure TFIELDINDEX_R(Self: TFIELD; var T: INTEGER);
+begin T := Self.INDEX; end;
+
+procedure TFIELDHASCONSTRAINTS_R(Self: TFIELD; var T: BOOLEAN);
+begin T := Self.HASCONSTRAINTS; end;
+
+procedure TFIELDFIELDNAME_W(Self: TFIELD; const T: String);
+begin Self.FIELDNAME := T; end;
+
+procedure TFIELDFIELDNAME_R(Self: TFIELD; var T: String);
+begin T := Self.FIELDNAME; end;
+
+procedure TFIELDFIELDKIND_W(Self: TFIELD; const T: TFIELDKIND);
+begin Self.FIELDKIND := T; end;
+
+procedure TFIELDFIELDKIND_R(Self: TFIELD; var T: TFIELDKIND);
+begin T := Self.FIELDKIND; end;
+
+procedure TFIELDDISPLAYWIDTH_W(Self: TFIELD; const T: INTEGER);
+begin Self.DISPLAYWIDTH := T; end;
+
+procedure TFIELDDISPLAYWIDTH_R(Self: TFIELD; var T: INTEGER);
+begin T := Self.DISPLAYWIDTH; end;
+
+procedure TFIELDDISPLAYLABEL_W(Self: TFIELD; const T: String);
+begin Self.DISPLAYLABEL := T; end;
+
+procedure TFIELDDISPLAYLABEL_R(Self: TFIELD; var T: String);
+begin T := Self.DISPLAYLABEL; end;
+
+procedure TFIELDDEFAULTEXPRESSION_W(Self: TFIELD; const T: String);
+begin Self.DEFAULTEXPRESSION := T; end;
+
+procedure TFIELDDEFAULTEXPRESSION_R(Self: TFIELD; var T: String);
+begin T := Self.DEFAULTEXPRESSION; end;
+
+procedure TFIELDCONSTRAINTERRORMESSAGE_W(Self: TFIELD; const T: String);
+begin Self.CONSTRAINTERRORMESSAGE := T; end;
+
+procedure TFIELDCONSTRAINTERRORMESSAGE_R(Self: TFIELD; var T: String);
+begin T := Self.CONSTRAINTERRORMESSAGE; end;
+
+procedure TFIELDCUSTOMCONSTRAINT_W(Self: TFIELD; const T: String);
+begin Self.CUSTOMCONSTRAINT := T; end;
+
+procedure TFIELDCUSTOMCONSTRAINT_R(Self: TFIELD; var T: String);
+begin T := Self.CUSTOMCONSTRAINT; end;
+
+{$IFNDEF FPC}
+procedure TFIELDAUTOGENERATEVALUE_W(Self: TFIELD; const T: TAUTOREFRESHFLAG);
+begin Self.AUTOGENERATEVALUE := T; end;
+
+procedure TFIELDAUTOGENERATEVALUE_R(Self: TFIELD; var T: TAUTOREFRESHFLAG);
+begin T := Self.AUTOGENERATEVALUE; end;
+
+procedure TFIELDVALIDCHARS_W(Self: TFIELD; const T: TFIELDCHARS);
+begin Self.VALIDCHARS := T; end;
+
+procedure TFIELDVALIDCHARS_R(Self: TFIELD; var T: TFIELDCHARS);
+begin T := Self.VALIDCHARS; end;
+
+
+procedure TFIELDPARENTFIELD_W(Self: TFIELD; const T: TOBJECTFIELD);
+begin Self.PARENTFIELD := T; end;
+
+procedure TFIELDPARENTFIELD_R(Self: TFIELD; var T: TOBJECTFIELD);
+begin T := Self.PARENTFIELD; end;
+
+
+
+{$ENDIF}
+
+procedure TFIELDALIGNMENT_W(Self: TFIELD; const T: TALIGNMENT);
+begin Self.ALIGNMENT := T; end;
+
+procedure TFIELDALIGNMENT_R(Self: TFIELD; var T: TALIGNMENT);
+begin T := Self.ALIGNMENT; end;
+
+procedure TFIELDVALUE_W(Self: TFIELD; const T: VARIANT);
+begin Self.VALUE := T; end;
+
+procedure TFIELDVALUE_R(Self: TFIELD; var T: VARIANT);
+begin T := Self.VALUE; end;
+
+procedure TFIELDTEXT_W(Self: TFIELD; const T: String);
+begin Self.TEXT := T; end;
+
+procedure TFIELDTEXT_R(Self: TFIELD; var T: String);
+begin T := Self.TEXT; end;
+
+procedure TFIELDSIZE_W(Self: TFIELD; const T: INTEGER);
+begin Self.SIZE := T; end;
+
+procedure TFIELDSIZE_R(Self: TFIELD; var T: INTEGER);
+begin T := Self.SIZE; end;
+
+procedure TFIELDOLDVALUE_R(Self: TFIELD; var T: VARIANT);
+begin T := Self.OLDVALUE; end;
+
+procedure TFIELDOFFSET_R(Self: TFIELD; var T: INTEGER);
+begin T := Self.OFFSET; end;
+
+procedure TFIELDNEWVALUE_W(Self: TFIELD; const T: VARIANT);
+begin Self.NEWVALUE := T; end;
+
+procedure TFIELDNEWVALUE_R(Self: TFIELD; var T: VARIANT);
+begin T := Self.NEWVALUE; end;
+
+procedure TFIELDLOOKUPLIST_R(Self: TFIELD; var T: TLOOKUPLIST);
+begin T := Self.LOOKUPLIST; end;
+
+{$IFNDEF FPC}
+procedure TFIELDLOOKUP_W(Self: TFIELD; const T: BOOLEAN);
+begin Self.LOOKUP := T; end;
+
+procedure TFIELDLOOKUP_R(Self: TFIELD; var T: BOOLEAN);
+begin T := Self.LOOKUP; end;
+
+procedure TFIELDFULLNAME_R(Self: TFIELD; var T: String);
+begin T := Self.FULLNAME; end;
+
+
+procedure TFIELDEDITMASKPTR_R(Self: TFIELD; var T: String);
+begin T := Self.EDITMASKPTR; end;
+
+procedure TFIELDEDITMASK_W(Self: TFIELD; const T: String);
+begin Self.EDITMASK := T; end;
+
+procedure TFIELDEDITMASK_R(Self: TFIELD; var T: String);
+begin T := Self.EDITMASK; end;
+
+{$ENDIF}
+
+procedure TFIELDISNULL_R(Self: TFIELD; var T: BOOLEAN);
+begin T := Self.ISNULL; end;
+
+procedure TFIELDISINDEXFIELD_R(Self: TFIELD; var T: BOOLEAN);
+begin T := Self.ISINDEXFIELD; end;
+
+procedure TFIELDFIELDNO_R(Self: TFIELD; var T: INTEGER);
+begin T := Self.FIELDNO; end;
+
+
+
+procedure TFIELDDISPLAYTEXT_R(Self: TFIELD; var T: String);
+begin T := Self.DISPLAYTEXT; end;
+
+procedure TFIELDDISPLAYNAME_R(Self: TFIELD; var T: String);
+begin T := Self.DISPLAYNAME; end;
+
+procedure TFIELDDATATYPE_R(Self: TFIELD; var T: TFIELDTYPE);
+begin T := Self.DATATYPE; end;
+
+procedure TFIELDDATASIZE_R(Self: TFIELD; var T: INTEGER);
+begin T := Self.DATASIZE; end;
+
+procedure TFIELDDATASET_W(Self: TFIELD; const T: TDATASET);
+begin Self.DATASET := T; end;
+
+procedure TFIELDDATASET_R(Self: TFIELD; var T: TDATASET);
+begin T := Self.DATASET; end;
+
+procedure TFIELDCURVALUE_R(Self: TFIELD; var T: VARIANT);
+begin T := Self.CURVALUE; end;
+
+procedure TFIELDCANMODIFY_R(Self: TFIELD; var T: BOOLEAN);
+begin T := Self.CANMODIFY; end;
+
+procedure TFIELDCALCULATED_W(Self: TFIELD; const T: BOOLEAN);
+begin Self.CALCULATED := T; end;
+
+procedure TFIELDCALCULATED_R(Self: TFIELD; var T: BOOLEAN);
+begin T := Self.CALCULATED; end;
+
+procedure TFIELDATTRIBUTESET_W(Self: TFIELD; const T: String);
+begin Self.ATTRIBUTESET := T; end;
+
+procedure TFIELDATTRIBUTESET_R(Self: TFIELD; var T: String);
+begin T := Self.ATTRIBUTESET; end;
+
+procedure TFIELDASVARIANT_W(Self: TFIELD; const T: VARIANT);
+begin Self.ASVARIANT := T; end;
+
+procedure TFIELDASVARIANT_R(Self: TFIELD; var T: VARIANT);
+begin T := Self.ASVARIANT; end;
+
+procedure TFIELDASSTRING_W(Self: TFIELD; const T: String);
+begin Self.ASSTRING := T; end;
+
+procedure TFIELDASSTRING_R(Self: TFIELD; var T: String);
+begin T := Self.ASSTRING; end;
+
+procedure TFIELDASINTEGER_W(Self: TFIELD; const T: LONGINT);
+begin Self.ASINTEGER := T; end;
+
+procedure TFIELDASINTEGER_R(Self: TFIELD; var T: LONGINT);
+begin T := Self.ASINTEGER; end;
+
+procedure TFIELDASFLOAT_W(Self: TFIELD; const T: DOUBLE);
+begin Self.ASFLOAT := T; end;
+
+procedure TFIELDASFLOAT_R(Self: TFIELD; var T: DOUBLE);
+begin T := Self.ASFLOAT; end;
+
+procedure TFIELDASDATETIME_W(Self: TFIELD; const T: TDATETIME);
+begin Self.ASDATETIME := T; end;
+
+procedure TFIELDASDATETIME_R(Self: TFIELD; var T: TDATETIME);
+begin T := Self.ASDATETIME; end;
+
+procedure TFIELDASCURRENCY_W(Self: TFIELD; const T: CURRENCY);
+begin Self.ASCURRENCY := T; end;
+
+procedure TFIELDASCURRENCY_R(Self: TFIELD; var T: CURRENCY);
+begin T := Self.ASCURRENCY; end;
+
+procedure TFIELDASBOOLEAN_W(Self: TFIELD; const T: BOOLEAN);
+begin Self.ASBOOLEAN := T; end;
+
+procedure TFIELDASBOOLEAN_R(Self: TFIELD; var T: BOOLEAN);
+begin T := Self.ASBOOLEAN; end;
+
+{$IFNDEF FPC}
+{$IFDEF DELPHI6UP}
+procedure TFIELDASBCD_W(Self: TFIELD; const T: TBCD);
+begin Self.ASBCD := T; end;
+
+procedure TFIELDASBCD_R(Self: TFIELD; var T: TBCD);
+begin T := Self.ASBCD; end;
+{$ENDIF}
+
+procedure TFIELDLISTFIELDS_R(Self: TFIELDLIST; var T: TFIELD; const t1: INTEGER);
+begin T := Self.FIELDS[t1]; end;
+
+procedure TFIELDDEFLISTFIELDDEFS_R(Self: TFIELDDEFLIST; var T: TFIELDDEF; const t1: INTEGER);
+begin T := Self.FIELDDEFS[t1]; end;
+
+procedure TFLATLISTDATASET_R(Self: TFLATLIST; var T: TDATASET);
+begin T := Self.DATASET; end;
+
+procedure TINDEXDEFGROUPINGLEVEL_W(Self: TINDEXDEF; const T: INTEGER);
+begin Self.GROUPINGLEVEL := T; end;
+
+procedure TINDEXDEFGROUPINGLEVEL_R(Self: TINDEXDEF; var T: INTEGER);
+begin T := Self.GROUPINGLEVEL; end;
+
+
+
+{$ENDIF}
+
+procedure TFIELDSFIELDS_W(Self: TFIELDS; const T: TFIELD; const t1: INTEGER);
+begin Self.FIELDS[t1] := T; end;
+
+procedure TFIELDSFIELDS_R(Self: TFIELDS; var T: TFIELD; const t1: INTEGER);
+begin T := Self.FIELDS[t1]; end;
+
+procedure TFIELDSDATASET_R(Self: TFIELDS; var T: TDATASET);
+begin T := Self.DATASET; end;
+
+procedure TFIELDSCOUNT_R(Self: TFIELDS; var T: INTEGER);
+begin T := Self.COUNT; end;
+
+procedure TINDEXDEFSITEMS_W(Self: TINDEXDEFS; const T: TINDEXDEF; const t1: INTEGER);
+begin Self.ITEMS[t1] := T; end;
+
+procedure TINDEXDEFSITEMS_R(Self: TINDEXDEFS; var T: TINDEXDEF; const t1: INTEGER);
+begin T := Self.ITEMS[t1]; end;
+
+procedure TINDEXDEFSOURCE_W(Self: TINDEXDEF; const T: String);
+begin Self.SOURCE := T; end;
+
+procedure TINDEXDEFSOURCE_R(Self: TINDEXDEF; var T: String);
+begin T := Self.SOURCE; end;
+
+procedure TINDEXDEFOPTIONS_W(Self: TINDEXDEF; const T: TINDEXOPTIONS);
+begin Self.OPTIONS := T; end;
+
+procedure TINDEXDEFOPTIONS_R(Self: TINDEXDEF; var T: TINDEXOPTIONS);
+begin T := Self.OPTIONS; end;
+
+procedure TINDEXDEFFIELDS_W(Self: TINDEXDEF; const T: String);
+begin Self.FIELDS := T; end;
+
+procedure TINDEXDEFFIELDS_R(Self: TINDEXDEF; var T: String);
+begin T := Self.FIELDS; end;
+
+procedure TINDEXDEFEXPRESSION_W(Self: TINDEXDEF; const T: String);
+begin {$IFNDEF FPC}Self.EXPRESSION := T; {$ENDIF}end;
+
+procedure TINDEXDEFEXPRESSION_R(Self: TINDEXDEF; var T: String);
+begin T := Self.EXPRESSION; end;
+
+{$IFNDEF FPC}
+procedure TINDEXDEFDESCFIELDS_W(Self: TINDEXDEF; const T: String);
+begin Self.DESCFIELDS := T; end;
+
+procedure TINDEXDEFDESCFIELDS_R(Self: TINDEXDEF; var T: String);
+begin T := Self.DESCFIELDS; end;
+
+procedure TINDEXDEFCASEINSFIELDS_W(Self: TINDEXDEF; const T: String);
+begin Self.CASEINSFIELDS := T; end;
+
+procedure TINDEXDEFCASEINSFIELDS_R(Self: TINDEXDEF; var T: String);
+begin T := Self.CASEINSFIELDS; end;
+
+
+procedure TINDEXDEFFIELDEXPRESSION_R(Self: TINDEXDEF; var T: String);
+begin T := Self.FIELDEXPRESSION; end;
+
+procedure TFIELDDEFSPARENTDEF_R(Self: TFIELDDEFS; var T: TFIELDDEF);
+begin T := Self.PARENTDEF; end;
+
+{$ENDIF}
+
+procedure TFIELDDEFSITEMS_W(Self: TFIELDDEFS; const T: TFIELDDEF; const t1: INTEGER);
+begin Self.ITEMS[t1] := T; end;
+
+procedure TFIELDDEFSITEMS_R(Self: TFIELDDEFS; var T: TFIELDDEF; const t1: INTEGER);
+begin T := Self.ITEMS[t1]; end;
+
+procedure TFIELDDEFSHIDDENFIELDS_W(Self: TFIELDDEFS; const T: BOOLEAN);
+begin Self.HIDDENFIELDS := T; end;
+
+procedure TFIELDDEFSHIDDENFIELDS_R(Self: TFIELDDEFS; var T: BOOLEAN);
+begin T := Self.HIDDENFIELDS; end;
+
+procedure TFIELDDEFSIZE_W(Self: TFIELDDEF; const T: INTEGER);
+begin Self.SIZE := T; end;
+
+procedure TFIELDDEFSIZE_R(Self: TFIELDDEF; var T: INTEGER);
+begin T := Self.SIZE; end;
+
+procedure TFIELDDEFPRECISION_W(Self: TFIELDDEF; const T: INTEGER);
+begin Self.PRECISION := T; end;
+
+procedure TFIELDDEFPRECISION_R(Self: TFIELDDEF; var T: INTEGER);
+begin T := Self.PRECISION; end;
+
+procedure TFIELDDEFDATATYPE_W(Self: TFIELDDEF; const T: TFIELDTYPE);
+begin Self.DATATYPE := T; end;
+
+procedure TFIELDDEFDATATYPE_R(Self: TFIELDDEF; var T: TFIELDTYPE);
+begin T := Self.DATATYPE; end;
+
+{$IFNDEF FPC}
+procedure TFIELDDEFCHILDDEFS_W(Self: TFIELDDEF; const T: TFIELDDEFS);
+begin Self.CHILDDEFS := T; end;
+
+procedure TFIELDDEFCHILDDEFS_R(Self: TFIELDDEF; var T: TFIELDDEFS);
+begin T := Self.CHILDDEFS; end;
+
+procedure TFIELDDEFREQUIRED_W(Self: TFIELDDEF; const T: BOOLEAN);
+begin Self.REQUIRED := T;end;
+
+procedure TFIELDDEFPARENTDEF_R(Self: TFIELDDEF; var T: TFIELDDEF);
+begin T := Self.PARENTDEF; end;
+
+{$ENDIF}
+
+procedure TFIELDDEFATTRIBUTES_W(Self: TFIELDDEF; const T: TFIELDATTRIBUTES);
+begin Self.ATTRIBUTES := T; end;
+
+procedure TFIELDDEFATTRIBUTES_R(Self: TFIELDDEF; var T: TFIELDATTRIBUTES);
+begin T := Self.ATTRIBUTES; end;
+
+procedure TFIELDDEFREQUIRED_R(Self: TFIELDDEF; var T: BOOLEAN);
+begin T := Self.REQUIRED; end;
+
+procedure TFIELDDEFINTERNALCALCFIELD_W(Self: TFIELDDEF; const T: BOOLEAN);
+begin Self.INTERNALCALCFIELD := T; end;
+
+procedure TFIELDDEFINTERNALCALCFIELD_R(Self: TFIELDDEF; var T: BOOLEAN);
+begin T := Self.INTERNALCALCFIELD; end;
+
+{$IFNDEF FPC}
+procedure TFIELDDEFFIELDNO_W(Self: TFIELDDEF; const T: INTEGER);
+begin Self.FIELDNO := T; end;
+
+procedure TDEFCOLLECTIONUPDATED_W(Self: TDEFCOLLECTION; const T: BOOLEAN);
+begin Self.UPDATED := T; end;
+
+procedure TDEFCOLLECTIONUPDATED_R(Self: TDEFCOLLECTION; var T: BOOLEAN);
+begin T := Self.UPDATED; end;
+
+procedure TDEFCOLLECTIONDATASET_R(Self: TDEFCOLLECTION; var T: TDATASET);
+begin T := Self.DATASET; end;
+
+procedure TNAMEDITEMNAME_W(Self: TNAMEDITEM; const T: String);
+begin Self.NAME := T; end;
+
+procedure TNAMEDITEMNAME_R(Self: TNAMEDITEM; var T: String);
+begin T := Self.NAME; end;
+
+
+{$ENDIF}
+
+procedure TFIELDDEFFIELDNO_R(Self: TFIELDDEF; var T: INTEGER);
+begin T := Self.FIELDNO; end;
+
+procedure TFIELDDEFFIELDCLASS_R(Self: TFIELDDEF; var T: TFIELDCLASS);
+begin T := Self.FIELDCLASS; end;
+
+procedure RIRegisterTDATASET(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TDATASET) do
+  begin
+  RegisterMethod(@TDATASET.ACTIVEBUFFER, 'ACTIVEBUFFER');
+  RegisterMethod(@TDATASET.APPEND, 'APPEND');
+  RegisterMethod(@TDATASET.APPENDRECORD, 'APPENDRECORD');
+//  RegisterVirtualMethod(@TDATASET.BOOKMARKVALID, 'BOOKMARKVALID');
+  RegisterVirtualMethod(@TDATASET.CANCEL, 'CANCEL');
+  RegisterMethod(@TDATASET.CHECKBROWSEMODE, 'CHECKBROWSEMODE');
+  RegisterMethod(@TDATASET.CLEARFIELDS, 'CLEARFIELDS');
+  RegisterMethod(@TDATASET.CLOSE, 'CLOSE');
+  RegisterMethod(@TDATASET.CONTROLSDISABLED, 'CONTROLSDISABLED');
+//  RegisterVirtualMethod(@TDATASET.COMPAREBOOKMARKS, 'COMPAREBOOKMARKS');
+  RegisterVirtualMethod(@TDATASET.CREATEBLOBSTREAM, 'CREATEBLOBSTREAM');
+  RegisterMethod(@TDATASET.CURSORPOSCHANGED, 'CURSORPOSCHANGED');
+  RegisterMethod(@TDATASET.DELETE, 'DELETE');
+  RegisterMethod(@TDATASET.DISABLECONTROLS, 'DISABLECONTROLS');
+  RegisterMethod(@TDATASET.EDIT, 'EDIT');
+  RegisterMethod(@TDATASET.ENABLECONTROLS, 'ENABLECONTROLS');
+  RegisterMethod(@TDATASET.FIELDBYNAME, 'FIELDBYNAME');
+  RegisterMethod(@TDATASET.FINDFIELD, 'FINDFIELD');
+  RegisterMethod(@TDATASET.FINDFIRST, 'FINDFIRST');
+  RegisterMethod(@TDATASET.FINDLAST, 'FINDLAST');
+  RegisterMethod(@TDATASET.FINDNEXT, 'FINDNEXT');
+  RegisterMethod(@TDATASET.FINDPRIOR, 'FINDPRIOR');
+  RegisterMethod(@TDATASET.FIRST, 'FIRST');
+//  RegisterVirtualMethod(@TDATASET.FREEBOOKMARK, 'FREEBOOKMARK');
+//  RegisterVirtualMethod(@TDATASET.GETBOOKMARK, 'GETBOOKMARK');
+  RegisterVirtualMethod(@TDATASET.GETCURRENTRECORD, 'GETCURRENTRECORD');
+//  RegisterVirtualMethod(@TDATASET.GETDETAILDATASETS, 'GETDETAILDATASETS');
+//  RegisterVirtualMethod(@TDATASET.GETDETAILLINKFIELDS, 'GETDETAILLINKFIELDS');
+//  RegisterVirtualMethod(@TDATASET.GETBLOBFIELDDATA, 'GETBLOBFIELDDATA');
+//  RegisterMethod(@TDATASET.GETFIELDLIST, 'GETFIELDLIST');
+  RegisterMethod(@TDATASET.GETFIELDNAMES, 'GETFIELDNAMES');
+//  RegisterMethod(@TDATASET.GOTOBOOKMARK, 'GOTOBOOKMARK');
+  RegisterMethod(@TDATASET.INSERT, 'INSERT');
+  RegisterMethod(@TDATASET.INSERTRECORD, 'INSERTRECORD');
+  RegisterMethod(@TDATASET.ISEMPTY, 'ISEMPTY');
+  RegisterMethod(@TDATASET.ISLINKEDTO, 'ISLINKEDTO');
+  RegisterVirtualMethod(@TDATASET.ISSEQUENCED, 'ISSEQUENCED');
+  RegisterMethod(@TDATASET.LAST, 'LAST');
+  RegisterVirtualMethod(@TDATASET.LOCATE, 'LOCATE');
+  RegisterVirtualMethod(@TDATASET.LOOKUP, 'LOOKUP');
+  RegisterMethod(@TDATASET.MOVEBY, 'MOVEBY');
+  RegisterMethod(@TDATASET.NEXT, 'NEXT');
+  RegisterMethod(@TDATASET.OPEN, 'OPEN');
+  RegisterVirtualMethod(@TDATASET.POST, 'POST');
+  RegisterMethod(@TDATASET.PRIOR, 'PRIOR');
+  RegisterMethod(@TDATASET.REFRESH, 'REFRESH');
+//  RegisterVirtualMethod(@TDATASET.RESYNC, 'RESYNC');
+  RegisterMethod(@TDATASET.SETFIELDS, 'SETFIELDS');
+  RegisterVirtualMethod(@TDATASET.TRANSLATE, 'TRANSLATE');
+  RegisterMethod(@TDATASET.UPDATECURSORPOS, 'UPDATECURSORPOS');
+  RegisterMethod(@TDATASET.UPDATERECORD, 'UPDATERECORD');
+  RegisterVirtualMethod(@TDATASET.UPDATESTATUS, 'UPDATESTATUS');
+  RegisterPropertyHelper(@TDATASETBOF_R,nil,'BOF');
+//  RegisterPropertyHelper(@TDATASETBOOKMARK_R,@TDATASETBOOKMARK_W,'BOOKMARK');
+  RegisterPropertyHelper(@TDATASETCANMODIFY_R,nil,'CANMODIFY');
+  RegisterPropertyHelper(@TDATASETDATASOURCE_R,nil,'DATASOURCE');
+  RegisterPropertyHelper(@TDATASETDEFAULTFIELDS_R,nil,'DEFAULTFIELDS');
+  RegisterPropertyHelper(@TDATASETEOF_R,nil,'EOF');
+  RegisterPropertyHelper(@TDATASETFIELDCOUNT_R,nil,'FIELDCOUNT');
+  RegisterPropertyHelper(@TDATASETFIELDS_R,nil,'FIELDS');
+  RegisterPropertyHelper(@TDATASETFIELDVALUES_R,@TDATASETFIELDVALUES_W,'FIELDVALUES');
+  RegisterPropertyHelper(@TDATASETFOUND_R,nil,'FOUND');
+{$IFDEF DELPHI6UP}
+  RegisterPropertyHelper(@TDATASETISUNIDIRECTIONAL_R,nil,'ISUNIDIRECTIONAL');
+{$ENDIF}
+  RegisterPropertyHelper(@TDATASETMODIFIED_R,nil,'MODIFIED');
+  RegisterPropertyHelper(@TDATASETRECORDCOUNT_R,nil,'RECORDCOUNT');
+  RegisterPropertyHelper(@TDATASETRECNO_R,@TDATASETRECNO_W,'RECNO');
+  RegisterPropertyHelper(@TDATASETRECORDSIZE_R,nil,'RECORDSIZE');
+  RegisterPropertyHelper(@TDATASETSTATE_R,nil,'STATE');
+  RegisterPropertyHelper(@TDATASETFILTER_R,@TDATASETFILTER_W,'FILTER');
+  RegisterPropertyHelper(@TDATASETFILTERED_R,@TDATASETFILTERED_W,'FILTERED');
+  RegisterPropertyHelper(@TDATASETFILTEROPTIONS_R,@TDATASETFILTEROPTIONS_W,'FILTEROPTIONS');
+  RegisterPropertyHelper(@TDATASETACTIVE_R,@TDATASETACTIVE_W,'ACTIVE');
+  RegisterPropertyHelper(@TDATASETAUTOCALCFIELDS_R,@TDATASETAUTOCALCFIELDS_W,'AUTOCALCFIELDS');
+  RegisterPropertyHelper(@TDATASETBEFOREOPEN_R,@TDATASETBEFOREOPEN_W,'BEFOREOPEN');
+  RegisterPropertyHelper(@TDATASETAFTEROPEN_R,@TDATASETAFTEROPEN_W,'AFTEROPEN');
+  RegisterPropertyHelper(@TDATASETBEFORECLOSE_R,@TDATASETBEFORECLOSE_W,'BEFORECLOSE');
+  RegisterPropertyHelper(@TDATASETAFTERCLOSE_R,@TDATASETAFTERCLOSE_W,'AFTERCLOSE');
+  RegisterPropertyHelper(@TDATASETBEFOREINSERT_R,@TDATASETBEFOREINSERT_W,'BEFOREINSERT');
+  RegisterPropertyHelper(@TDATASETAFTERINSERT_R,@TDATASETAFTERINSERT_W,'AFTERINSERT');
+  RegisterPropertyHelper(@TDATASETBEFOREEDIT_R,@TDATASETBEFOREEDIT_W,'BEFOREEDIT');
+  RegisterPropertyHelper(@TDATASETAFTEREDIT_R,@TDATASETAFTEREDIT_W,'AFTEREDIT');
+  RegisterPropertyHelper(@TDATASETBEFOREPOST_R,@TDATASETBEFOREPOST_W,'BEFOREPOST');
+  RegisterPropertyHelper(@TDATASETAFTERPOST_R,@TDATASETAFTERPOST_W,'AFTERPOST');
+  RegisterPropertyHelper(@TDATASETBEFORECANCEL_R,@TDATASETBEFORECANCEL_W,'BEFORECANCEL');
+  RegisterPropertyHelper(@TDATASETAFTERCANCEL_R,@TDATASETAFTERCANCEL_W,'AFTERCANCEL');
+  RegisterPropertyHelper(@TDATASETBEFOREDELETE_R,@TDATASETBEFOREDELETE_W,'BEFOREDELETE');
+  RegisterPropertyHelper(@TDATASETAFTERDELETE_R,@TDATASETAFTERDELETE_W,'AFTERDELETE');
+  RegisterPropertyHelper(@TDATASETBEFORESCROLL_R,@TDATASETBEFORESCROLL_W,'BEFORESCROLL');
+  RegisterPropertyHelper(@TDATASETAFTERSCROLL_R,@TDATASETAFTERSCROLL_W,'AFTERSCROLL');
+  {$IFNDEF FPC}
+  RegisterPropertyHelper(@TDATASETFIELDLIST_R,nil,'FIELDLIST');
+  RegisterPropertyHelper(@TDATASETDESIGNER_R,nil,'DESIGNER');
+  RegisterPropertyHelper(@TDATASETBLOCKREADSIZE_R,@TDATASETBLOCKREADSIZE_W,'BLOCKREADSIZE');
+  RegisterPropertyHelper(@TDATASETBEFOREREFRESH_R,@TDATASETBEFOREREFRESH_W,'BEFOREREFRESH');
+  RegisterPropertyHelper(@TDATASETAFTERREFRESH_R,@TDATASETAFTERREFRESH_W,'AFTERREFRESH');
+  RegisterPropertyHelper(@TDATASETAGGFIELDS_R,nil,'AGGFIELDS');
+  RegisterPropertyHelper(@TDATASETDATASETFIELD_R,@TDATASETDATASETFIELD_W,'DATASETFIELD');
+  RegisterPropertyHelper(@TDATASETOBJECTVIEW_R,@TDATASETOBJECTVIEW_W,'OBJECTVIEW');
+  RegisterPropertyHelper(@TDATASETSPARSEARRAYS_R,@TDATASETSPARSEARRAYS_W,'SPARSEARRAYS');
+  RegisterPropertyHelper(@TDATASETFIELDDEFS_R,@TDATASETFIELDDEFS_W,'FIELDDEFS');
+  RegisterPropertyHelper(@TDATASETFIELDDEFLIST_R,nil,'FIELDDEFLIST');
+
+  {$ENDIF}
+  RegisterEventPropertyHelper(@TDATASETONCALCFIELDS_R,@TDATASETONCALCFIELDS_W,'ONCALCFIELDS');
+  RegisterEventPropertyHelper(@TDATASETONDELETEERROR_R,@TDATASETONDELETEERROR_W,'ONDELETEERROR');
+  RegisterEventPropertyHelper(@TDATASETONEDITERROR_R,@TDATASETONEDITERROR_W,'ONEDITERROR');
+  RegisterEventPropertyHelper(@TDATASETONFILTERRECORD_R,@TDATASETONFILTERRECORD_W,'ONFILTERRECORD');
+  RegisterEventPropertyHelper(@TDATASETONNEWRECORD_R,@TDATASETONNEWRECORD_W,'ONNEWRECORD');
+  RegisterEventPropertyHelper(@TDATASETONPOSTERROR_R,@TDATASETONPOSTERROR_W,'ONPOSTERROR');
+  end;
+end;
+
+procedure RIRegisterTPARAMS(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TPARAMS) do
+  begin
+//  RegisterMethod(@TPARAMS.ASSIGNVALUES, 'ASSIGNVALUES');
+  RegisterMethod(@TPARAMS.ADDPARAM, 'ADDPARAM');
+  RegisterMethod(@TPARAMS.REMOVEPARAM, 'REMOVEPARAM');
+  RegisterMethod(@TPARAMS.CREATEPARAM, 'CREATEPARAM');
+  RegisterMethod(@TPARAMS.GETPARAMLIST, 'GETPARAMLIST');
+  RegisterMethod(@TPARAMS.ISEQUAL, 'ISEQUAL');
+  RegisterMethod(@TPARAMS.PARSESQL, 'PARSESQL');
+  RegisterMethod(@TPARAMS.PARAMBYNAME, 'PARAMBYNAME');
+  RegisterMethod(@TPARAMS.FINDPARAM, 'FINDPARAM');
+  RegisterPropertyHelper(@TPARAMSITEMS_R,@TPARAMSITEMS_W,'ITEMS');
+  RegisterPropertyHelper(@TPARAMSPARAMVALUES_R,@TPARAMSPARAMVALUES_W,'PARAMVALUES');
+  end;
+end;
+
+procedure RIRegisterTPARAM(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TPARAM) do
+  begin
+  RegisterMethod(@TPARAM.ASSIGNFIELD, 'ASSIGNFIELD');
+  RegisterMethod(@TPARAM.ASSIGNFIELDVALUE, 'ASSIGNFIELDVALUE');
+  RegisterMethod(@TPARAM.CLEAR, 'CLEAR');
+//  RegisterMethod(@TPARAM.GETDATA, 'GETDATA');
+  RegisterMethod(@TPARAM.GETDATASIZE, 'GETDATASIZE');
+  RegisterMethod(@TPARAM.LOADFROMFILE, 'LOADFROMFILE');
+  RegisterMethod(@TPARAM.LOADFROMSTREAM, 'LOADFROMSTREAM');
+//  RegisterMethod(@TPARAM.SETBLOBDATA, 'SETBLOBDATA');
+//  RegisterMethod(@TPARAM.SETDATA, 'SETDATA');
+  {$IFNDEF FPC}
+  RegisterPropertyHelper(@TPARAMASBCD_R,@TPARAMASBCD_W,'ASBCD');
+{$IFDEF DELPHI6UP}
+  RegisterPropertyHelper(@TPARAMASFMTBCD_R,@TPARAMASFMTBCD_W,'ASFMTBCD');
+{$ENDIF}
+  {$ENDIF}
+  RegisterPropertyHelper(@TPARAMASBLOB_R,@TPARAMASBLOB_W,'ASBLOB');
+  RegisterPropertyHelper(@TPARAMASBOOLEAN_R,@TPARAMASBOOLEAN_W,'ASBOOLEAN');
+  RegisterPropertyHelper(@TPARAMASCURRENCY_R,@TPARAMASCURRENCY_W,'ASCURRENCY');
+  RegisterPropertyHelper(@TPARAMASDATE_R,@TPARAMASDATE_W,'ASDATE');
+  RegisterPropertyHelper(@TPARAMASDATETIME_R,@TPARAMASDATETIME_W,'ASDATETIME');
+  RegisterPropertyHelper(@TPARAMASFLOAT_R,@TPARAMASFLOAT_W,'ASFLOAT');
+  RegisterPropertyHelper(@TPARAMASINTEGER_R,@TPARAMASINTEGER_W,'ASINTEGER');
+  RegisterPropertyHelper(@TPARAMASSMALLINT_R,@TPARAMASSMALLINT_W,'ASSMALLINT');
+  RegisterPropertyHelper(@TPARAMASMEMO_R,@TPARAMASMEMO_W,'ASMEMO');
+  RegisterPropertyHelper(@TPARAMASSTRING_R,@TPARAMASSTRING_W,'ASSTRING');
+  RegisterPropertyHelper(@TPARAMASTIME_R,@TPARAMASTIME_W,'ASTIME');
+  RegisterPropertyHelper(@TPARAMASWORD_R,@TPARAMASWORD_W,'ASWORD');
+  RegisterPropertyHelper(@TPARAMBOUND_R,@TPARAMBOUND_W,'BOUND');
+  RegisterPropertyHelper(@TPARAMISNULL_R,nil,'ISNULL');
+  RegisterPropertyHelper(@TPARAMNATIVESTR_R,@TPARAMNATIVESTR_W,'NATIVESTR');
+  RegisterPropertyHelper(@TPARAMTEXT_R,@TPARAMTEXT_W,'TEXT');
+  RegisterPropertyHelper(@TPARAMDATATYPE_R,@TPARAMDATATYPE_W,'DATATYPE');
+{$IFDEF DELPHI6UP}
+  RegisterPropertyHelper(@TPARAMPRECISION_R,@TPARAMPRECISION_W,'PRECISION');
+  RegisterPropertyHelper(@TPARAMNUMERICSCALE_R,@TPARAMNUMERICSCALE_W,'NUMERICSCALE');
+  RegisterPropertyHelper(@TPARAMSIZE_R,@TPARAMSIZE_W,'SIZE');
+{$ENDIF}
+  RegisterPropertyHelper(@TPARAMNAME_R,@TPARAMNAME_W,'NAME');
+  RegisterPropertyHelper(@TPARAMPARAMTYPE_R,@TPARAMPARAMTYPE_W,'PARAMTYPE');
+  RegisterPropertyHelper(@TPARAMVALUE_R,@TPARAMVALUE_W,'VALUE');
+  end;
+end;
+
+{$IFNDEF FPC}
+procedure RIRegisterTGUIDFIELD(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TGUIDFIELD) do
+  begin
+  end;
+end;
+
+procedure RIRegisterTVARIANTFIELD(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TVARIANTFIELD) do
+  begin
+  end;
+end;
+
+procedure RIRegisterTREFERENCEFIELD(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TREFERENCEFIELD) do
+  begin
+  RegisterPropertyHelper(@TREFERENCEFIELDREFERENCETABLENAME_R,@TREFERENCEFIELDREFERENCETABLENAME_W,'REFERENCETABLENAME');
+  end;
+end;
+
+
+procedure RIRegisterTDATASETFIELD(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TDATASETFIELD) do
+  begin
+  RegisterPropertyHelper(@TDATASETFIELDNESTEDDATASET_R,nil,'NESTEDDATASET');
+  RegisterPropertyHelper(@TDATASETFIELDINCLUDEOBJECTFIELD_R,@TDATASETFIELDINCLUDEOBJECTFIELD_W,'INCLUDEOBJECTFIELD');
+  end;
+end;
+
+
+procedure RIRegisterTARRAYFIELD(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TARRAYFIELD) do
+  begin
+  end;
+end;
+
+
+procedure RIRegisterTADTFIELD(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TADTFIELD) do
+  begin
+  end;
+end;
+
+
+procedure RIRegisterTOBJECTFIELD(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TOBJECTFIELD) do
+  begin
+  RegisterPropertyHelper(@TOBJECTFIELDFIELDCOUNT_R,nil,'FIELDCOUNT');
+  RegisterPropertyHelper(@TOBJECTFIELDFIELDS_R,nil,'FIELDS');
+  RegisterPropertyHelper(@TOBJECTFIELDFIELDVALUES_R,@TOBJECTFIELDFIELDVALUES_W,'FIELDVALUES');
+  RegisterPropertyHelper(@TOBJECTFIELDUNNAMED_R,nil,'UNNAMED');
+  RegisterPropertyHelper(@TOBJECTFIELDOBJECTTYPE_R,@TOBJECTFIELDOBJECTTYPE_W,'OBJECTTYPE');
+  end;
+end;
+{$ENDIF}
+
+
+procedure RIRegisterTGRAPHICFIELD(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TGRAPHICFIELD) do
+  begin
+  end;
+end;
+
+procedure RIRegisterTMEMOFIELD(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TMEMOFIELD) do
+  begin
+  end;
+end;
+
+procedure RIRegisterTBLOBFIELD(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TBLOBFIELD) do
+  begin
+  RegisterMethod(@TBLOBFIELD.LOADFROMFILE, 'LOADFROMFILE');
+  RegisterMethod(@TBLOBFIELD.LOADFROMSTREAM, 'LOADFROMSTREAM');
+  RegisterMethod(@TBLOBFIELD.SAVETOFILE, 'SAVETOFILE');
+  RegisterMethod(@TBLOBFIELD.SAVETOSTREAM, 'SAVETOSTREAM');
+  RegisterPropertyHelper(@TBLOBFIELDBLOBSIZE_R,nil,'BLOBSIZE');
+  RegisterPropertyHelper(@TBLOBFIELDMODIFIED_R,@TBLOBFIELDMODIFIED_W,'MODIFIED');
+  RegisterPropertyHelper(@TBLOBFIELDVALUE_R,@TBLOBFIELDVALUE_W,'VALUE');
+  RegisterPropertyHelper(@TBLOBFIELDTRANSLITERATE_R,@TBLOBFIELDTRANSLITERATE_W,'TRANSLITERATE');
+  RegisterPropertyHelper(@TBLOBFIELDBLOBTYPE_R,@TBLOBFIELDBLOBTYPE_W,'BLOBTYPE');
+{$IFNDEF FPC}
+{$IFDEF DELPHI6UP}
+  RegisterPropertyHelper(@TBLOBFIELDGRAPHICHEADER_R,@TBLOBFIELDGRAPHICHEADER_W,'GRAPHICHEADER');
+{$ENDIF}
+{$ENDIF}
+  end;
+end;
+
+
+{$IFNDEF FPC}
+{$IFDEF DELPHI6UP}
+
+procedure RIRegisterTFMTBCDFIELD(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TFMTBCDFIELD) do
+  begin
+  RegisterPropertyHelper(@TFMTBCDFIELDVALUE_R,@TFMTBCDFIELDVALUE_W,'VALUE');
+  RegisterPropertyHelper(@TFMTBCDFIELDCURRENCY_R,@TFMTBCDFIELDCURRENCY_W,'CURRENCY');
+  RegisterPropertyHelper(@TFMTBCDFIELDMAXVALUE_R,@TFMTBCDFIELDMAXVALUE_W,'MAXVALUE');
+  RegisterPropertyHelper(@TFMTBCDFIELDMINVALUE_R,@TFMTBCDFIELDMINVALUE_W,'MINVALUE');
+  RegisterPropertyHelper(@TFMTBCDFIELDPRECISION_R,@TFMTBCDFIELDPRECISION_W,'PRECISION');
+  end;
+end;
+{$ENDIF}
+procedure RIRegisterTBCDFIELD(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TBCDFIELD) do
+  begin
+  RegisterPropertyHelper(@TBCDFIELDVALUE_R,@TBCDFIELDVALUE_W,'VALUE');
+  RegisterPropertyHelper(@TBCDFIELDCURRENCY_R,@TBCDFIELDCURRENCY_W,'CURRENCY');
+  RegisterPropertyHelper(@TBCDFIELDMAXVALUE_R,@TBCDFIELDMAXVALUE_W,'MAXVALUE');
+  RegisterPropertyHelper(@TBCDFIELDMINVALUE_R,@TBCDFIELDMINVALUE_W,'MINVALUE');
+  RegisterPropertyHelper(@TBCDFIELDPRECISION_R,@TBCDFIELDPRECISION_W,'PRECISION');
+  end;
+end;
+{$ENDIF}
+
+procedure RIRegisterTVARBYTESFIELD(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TVARBYTESFIELD) do
+  begin
+  end;
+end;
+
+procedure RIRegisterTBYTESFIELD(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TBYTESFIELD) do
+  begin
+  end;
+end;
+
+procedure RIRegisterTBINARYFIELD(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TBINARYFIELD) do
+  begin
+  end;
+end;
+
+procedure RIRegisterTTIMEFIELD(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TTIMEFIELD) do
+  begin
+  end;
+end;
+
+procedure RIRegisterTDATEFIELD(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TDATEFIELD) do
+  begin
+  end;
+end;
+
+procedure RIRegisterTDATETIMEFIELD(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TDATETIMEFIELD) do
+  begin
+  RegisterPropertyHelper(@TDATETIMEFIELDVALUE_R,@TDATETIMEFIELDVALUE_W,'VALUE');
+  RegisterPropertyHelper(@TDATETIMEFIELDDISPLAYFORMAT_R,@TDATETIMEFIELDDISPLAYFORMAT_W,'DISPLAYFORMAT');
+  end;
+end;
+
+procedure RIRegisterTBOOLEANFIELD(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TBOOLEANFIELD) do
+  begin
+  RegisterPropertyHelper(@TBOOLEANFIELDVALUE_R,@TBOOLEANFIELDVALUE_W,'VALUE');
+  RegisterPropertyHelper(@TBOOLEANFIELDDISPLAYVALUES_R,@TBOOLEANFIELDDISPLAYVALUES_W,'DISPLAYVALUES');
+  end;
+end;
+
+procedure RIRegisterTCURRENCYFIELD(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TCURRENCYFIELD) do
+  begin
+  end;
+end;
+
+procedure RIRegisterTFLOATFIELD(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TFLOATFIELD) do
+  begin
+  {$IFNDEF FPC}
+  RegisterPropertyHelper(@TFLOATFIELDCURRENCY_R,@TFLOATFIELDCURRENCY_W,'CURRENCY');
+  {$ENDIF}
+  RegisterPropertyHelper(@TFLOATFIELDVALUE_R,@TFLOATFIELDVALUE_W,'VALUE');
+  RegisterPropertyHelper(@TFLOATFIELDMAXVALUE_R,@TFLOATFIELDMAXVALUE_W,'MAXVALUE');
+  RegisterPropertyHelper(@TFLOATFIELDMINVALUE_R,@TFLOATFIELDMINVALUE_W,'MINVALUE');
+  RegisterPropertyHelper(@TFLOATFIELDPRECISION_R,@TFLOATFIELDPRECISION_W,'PRECISION');
+  end;
+end;
+
+procedure RIRegisterTAUTOINCFIELD(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TAUTOINCFIELD) do
+  begin
+  end;
+end;
+
+procedure RIRegisterTWORDFIELD(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TWORDFIELD) do
+  begin
+  end;
+end;
+
+procedure RIRegisterTLARGEINTFIELD(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TLARGEINTFIELD) do
+  begin
+  RegisterPropertyHelper(@TLARGEINTFIELDASLARGEINT_R,@TLARGEINTFIELDASLARGEINT_W,'ASLARGEINT');
+  RegisterPropertyHelper(@TLARGEINTFIELDVALUE_R,@TLARGEINTFIELDVALUE_W,'VALUE');
+  RegisterPropertyHelper(@TLARGEINTFIELDMAXVALUE_R,@TLARGEINTFIELDMAXVALUE_W,'MAXVALUE');
+  RegisterPropertyHelper(@TLARGEINTFIELDMINVALUE_R,@TLARGEINTFIELDMINVALUE_W,'MINVALUE');
+  end;
+end;
+
+procedure RIRegisterTSMALLINTFIELD(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TSMALLINTFIELD) do
+  begin
+  end;
+end;
+
+procedure RIRegisterTINTEGERFIELD(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TINTEGERFIELD) do
+  begin
+  RegisterPropertyHelper(@TINTEGERFIELDVALUE_R,@TINTEGERFIELDVALUE_W,'VALUE');
+  RegisterPropertyHelper(@TINTEGERFIELDMAXVALUE_R,@TINTEGERFIELDMAXVALUE_W,'MAXVALUE');
+  RegisterPropertyHelper(@TINTEGERFIELDMINVALUE_R,@TINTEGERFIELDMINVALUE_W,'MINVALUE');
+  end;
+end;
+
+procedure RIRegisterTNUMERICFIELD(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TNUMERICFIELD) do
+  begin
+  RegisterPropertyHelper(@TNUMERICFIELDDISPLAYFORMAT_R,@TNUMERICFIELDDISPLAYFORMAT_W,'DISPLAYFORMAT');
+  RegisterPropertyHelper(@TNUMERICFIELDEDITFORMAT_R,@TNUMERICFIELDEDITFORMAT_W,'EDITFORMAT');
+  end;
+end;
+
+{$IFNDEF FPC}
+procedure RIRegisterTWIDESTRINGFIELD(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TWIDESTRINGFIELD) do
+  begin
+  RegisterPropertyHelper(@TWIDESTRINGFIELDVALUE_R,@TWIDESTRINGFIELDVALUE_W,'VALUE');
+  end;
+end;
+{$ENDIF}
+
+procedure RIRegisterTSTRINGFIELD(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TSTRINGFIELD) do
+  begin
+  RegisterPropertyHelper(@TSTRINGFIELDVALUE_R,@TSTRINGFIELDVALUE_W,'VALUE');
+  {$IFNDEF FPC}
+  RegisterPropertyHelper(@TSTRINGFIELDFIXEDCHAR_R,@TSTRINGFIELDFIXEDCHAR_W,'FIXEDCHAR');
+  RegisterPropertyHelper(@TSTRINGFIELDTRANSLITERATE_R,@TSTRINGFIELDTRANSLITERATE_W,'TRANSLITERATE');
+  {$ENDIF}
+  end;
+end;
+
+procedure RIRegisterTFIELD(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TFIELD) do
+  begin
+  RegisterMethod(@TFIELD.ASSIGNVALUE, 'ASSIGNVALUE');
+  RegisterVirtualMethod(@TFIELD.CLEAR, 'CLEAR');
+  RegisterMethod(@TFIELD.FOCUSCONTROL, 'FOCUSCONTROL');
+//  RegisterMethod(@TFIELD.GETDATA, 'GETDATA');
+  RegisterVirtualMethod(@TFIELD.ISVALIDCHAR, 'ISVALIDCHAR');
+  RegisterMethod(@TFIELD.REFRESHLOOKUPLIST, 'REFRESHLOOKUPLIST');
+//  RegisterMethod(@TFIELD.SETDATA, 'SETDATA');
+  RegisterVirtualMethod(@TFIELD.SETFIELDTYPE, 'SETFIELDTYPE');
+//  RegisterMethod(@TFIELD.VALIDATE, 'VALIDATE');
+{$IFNDEF FPC}
+
+  RegisterPropertyHelper(@TFIELDEDITMASK_R,@TFIELDEDITMASK_W,'EDITMASK');
+  RegisterPropertyHelper(@TFIELDEDITMASKPTR_R,nil,'EDITMASKPTR');
+  RegisterPropertyHelper(@TFIELDEDITMASK_R,@TFIELDEDITMASK_W,'EDITMASK');
+  RegisterPropertyHelper(@TFIELDEDITMASKPTR_R,nil,'EDITMASKPTR');
+  RegisterPropertyHelper(@TFIELDFULLNAME_R,nil,'FULLNAME');
+  RegisterPropertyHelper(@TFIELDLOOKUP_R,@TFIELDLOOKUP_W,'LOOKUP');
+  RegisterPropertyHelper(@TFIELDPARENTFIELD_R,@TFIELDPARENTFIELD_W,'PARENTFIELD');
+  RegisterPropertyHelper(@TFIELDVALIDCHARS_R,@TFIELDVALIDCHARS_W,'VALIDCHARS');
+  RegisterPropertyHelper(@TFIELDAUTOGENERATEVALUE_R,@TFIELDAUTOGENERATEVALUE_W,'AUTOGENERATEVALUE');
+
+{$IFDEF DELPHI6UP}
+  RegisterPropertyHelper(@TFIELDASBCD_R,@TFIELDASBCD_W,'ASBCD');
+{$ENDIF}
+{$ENDIF}
+  RegisterPropertyHelper(@TFIELDASBOOLEAN_R,@TFIELDASBOOLEAN_W,'ASBOOLEAN');
+  RegisterPropertyHelper(@TFIELDASCURRENCY_R,@TFIELDASCURRENCY_W,'ASCURRENCY');
+  RegisterPropertyHelper(@TFIELDASDATETIME_R,@TFIELDASDATETIME_W,'ASDATETIME');
+  RegisterPropertyHelper(@TFIELDASFLOAT_R,@TFIELDASFLOAT_W,'ASFLOAT');
+  RegisterPropertyHelper(@TFIELDASINTEGER_R,@TFIELDASINTEGER_W,'ASINTEGER');
+  RegisterPropertyHelper(@TFIELDASSTRING_R,@TFIELDASSTRING_W,'ASSTRING');
+  RegisterPropertyHelper(@TFIELDASVARIANT_R,@TFIELDASVARIANT_W,'ASVARIANT');
+  RegisterPropertyHelper(@TFIELDATTRIBUTESET_R,@TFIELDATTRIBUTESET_W,'ATTRIBUTESET');
+  RegisterPropertyHelper(@TFIELDCALCULATED_R,@TFIELDCALCULATED_W,'CALCULATED');
+  RegisterPropertyHelper(@TFIELDCANMODIFY_R,nil,'CANMODIFY');
+  RegisterPropertyHelper(@TFIELDCURVALUE_R,nil,'CURVALUE');
+  RegisterPropertyHelper(@TFIELDDATASET_R,@TFIELDDATASET_W,'DATASET');
+  RegisterPropertyHelper(@TFIELDDATASIZE_R,nil,'DATASIZE');
+  RegisterPropertyHelper(@TFIELDDATATYPE_R,nil,'DATATYPE');
+  RegisterPropertyHelper(@TFIELDDISPLAYNAME_R,nil,'DISPLAYNAME');
+  RegisterPropertyHelper(@TFIELDDISPLAYTEXT_R,nil,'DISPLAYTEXT');
+  RegisterPropertyHelper(@TFIELDFIELDNO_R,nil,'FIELDNO');
+  RegisterPropertyHelper(@TFIELDISINDEXFIELD_R,nil,'ISINDEXFIELD');
+  RegisterPropertyHelper(@TFIELDISNULL_R,nil,'ISNULL');
+  RegisterPropertyHelper(@TFIELDLOOKUPLIST_R,nil,'LOOKUPLIST');
+  RegisterPropertyHelper(@TFIELDNEWVALUE_R,@TFIELDNEWVALUE_W,'NEWVALUE');
+  RegisterPropertyHelper(@TFIELDOFFSET_R,nil,'OFFSET');
+  RegisterPropertyHelper(@TFIELDOLDVALUE_R,nil,'OLDVALUE');
+  RegisterPropertyHelper(@TFIELDSIZE_R,@TFIELDSIZE_W,'SIZE');
+  RegisterPropertyHelper(@TFIELDTEXT_R,@TFIELDTEXT_W,'TEXT');
+  RegisterPropertyHelper(@TFIELDVALUE_R,@TFIELDVALUE_W,'VALUE');
+  RegisterPropertyHelper(@TFIELDALIGNMENT_R,@TFIELDALIGNMENT_W,'ALIGNMENT');
+  RegisterPropertyHelper(@TFIELDCUSTOMCONSTRAINT_R,@TFIELDCUSTOMCONSTRAINT_W,'CUSTOMCONSTRAINT');
+  RegisterPropertyHelper(@TFIELDCONSTRAINTERRORMESSAGE_R,@TFIELDCONSTRAINTERRORMESSAGE_W,'CONSTRAINTERRORMESSAGE');
+  RegisterPropertyHelper(@TFIELDDEFAULTEXPRESSION_R,@TFIELDDEFAULTEXPRESSION_W,'DEFAULTEXPRESSION');
+  RegisterPropertyHelper(@TFIELDDISPLAYLABEL_R,@TFIELDDISPLAYLABEL_W,'DISPLAYLABEL');
+  RegisterPropertyHelper(@TFIELDDISPLAYWIDTH_R,@TFIELDDISPLAYWIDTH_W,'DISPLAYWIDTH');
+  RegisterPropertyHelper(@TFIELDFIELDKIND_R,@TFIELDFIELDKIND_W,'FIELDKIND');
+  RegisterPropertyHelper(@TFIELDFIELDNAME_R,@TFIELDFIELDNAME_W,'FIELDNAME');
+  RegisterPropertyHelper(@TFIELDHASCONSTRAINTS_R,nil,'HASCONSTRAINTS');
+  RegisterPropertyHelper(@TFIELDINDEX_R,@TFIELDINDEX_W,'INDEX');
+  RegisterPropertyHelper(@TFIELDIMPORTEDCONSTRAINT_R,@TFIELDIMPORTEDCONSTRAINT_W,'IMPORTEDCONSTRAINT');
+  RegisterPropertyHelper(@TFIELDLOOKUPDATASET_R,@TFIELDLOOKUPDATASET_W,'LOOKUPDATASET');
+  RegisterPropertyHelper(@TFIELDLOOKUPKEYFIELDS_R,@TFIELDLOOKUPKEYFIELDS_W,'LOOKUPKEYFIELDS');
+  RegisterPropertyHelper(@TFIELDLOOKUPRESULTFIELD_R,@TFIELDLOOKUPRESULTFIELD_W,'LOOKUPRESULTFIELD');
+  RegisterPropertyHelper(@TFIELDKEYFIELDS_R,@TFIELDKEYFIELDS_W,'KEYFIELDS');
+  RegisterPropertyHelper(@TFIELDLOOKUPCACHE_R,@TFIELDLOOKUPCACHE_W,'LOOKUPCACHE');
+  RegisterPropertyHelper(@TFIELDORIGIN_R,@TFIELDORIGIN_W,'ORIGIN');
+  RegisterPropertyHelper(@TFIELDPROVIDERFLAGS_R,@TFIELDPROVIDERFLAGS_W,'PROVIDERFLAGS');
+  RegisterPropertyHelper(@TFIELDREADONLY_R,@TFIELDREADONLY_W,'READONLY');
+  RegisterPropertyHelper(@TFIELDREQUIRED_R,@TFIELDREQUIRED_W,'REQUIRED');
+  RegisterPropertyHelper(@TFIELDVISIBLE_R,@TFIELDVISIBLE_W,'VISIBLE');
+  RegisterEventPropertyHelper(@TFIELDONCHANGE_R,@TFIELDONCHANGE_W,'ONCHANGE');
+  RegisterEventPropertyHelper(@TFIELDONGETTEXT_R,@TFIELDONGETTEXT_W,'ONGETTEXT');
+  RegisterEventPropertyHelper(@TFIELDONSETTEXT_R,@TFIELDONSETTEXT_W,'ONSETTEXT');
+  RegisterEventPropertyHelper(@TFIELDONVALIDATE_R,@TFIELDONVALIDATE_W,'ONVALIDATE');
+  end;
+end;
+
+procedure RIRegisterTLOOKUPLIST(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TLOOKUPLIST) do
+  begin
+  RegisterConstructor(@TLOOKUPLIST.CREATE, 'CREATE');
+  {$IFDEF DELPHI2009UP}
+  RegisterVirtualAbstractMethod(TDefaultLookupList, @TDefaultLookupList.ADD, 'ADD');  
+  RegisterVirtualAbstractMethod(TDefaultLookupList, @TDefaultLookupList.CLEAR, 'CLEAR');  
+  RegisterVirtualAbstractMethod(TDefaultLookupList, @TDefaultLookupList.VALUEOFKEY, 'VALUEOFKEY');  
+  {$ELSE}
+  RegisterMethod(@TLOOKUPLIST.ADD, 'ADD');
+  RegisterMethod(@TLOOKUPLIST.CLEAR, 'CLEAR');
+  RegisterMethod(@TLOOKUPLIST.VALUEOFKEY, 'VALUEOFKEY');
+  {$ENDIF}
+  end;
+end;
+
+procedure RIRegisterTFIELDS(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TFIELDS) do
+  begin
+  RegisterConstructor(@TFIELDS.CREATE, 'CREATE');
+  RegisterMethod(@TFIELDS.ADD, 'ADD');
+  RegisterMethod(@TFIELDS.CHECKFIELDNAME, 'CHECKFIELDNAME');
+  RegisterMethod(@TFIELDS.CHECKFIELDNAMES, 'CHECKFIELDNAMES');
+  RegisterMethod(@TFIELDS.CLEAR, 'CLEAR');
+  RegisterMethod(@TFIELDS.FINDFIELD, 'FINDFIELD');
+  RegisterMethod(@TFIELDS.FIELDBYNAME, 'FIELDBYNAME');
+  RegisterMethod(@TFIELDS.FIELDBYNUMBER, 'FIELDBYNUMBER');
+  RegisterMethod(@TFIELDS.GETFIELDNAMES, 'GETFIELDNAMES');
+  RegisterMethod(@TFIELDS.INDEXOF, 'INDEXOF');
+  RegisterMethod(@TFIELDS.REMOVE, 'REMOVE');
+  RegisterPropertyHelper(@TFIELDSCOUNT_R,nil,'COUNT');
+  RegisterPropertyHelper(@TFIELDSDATASET_R,nil,'DATASET');
+  RegisterPropertyHelper(@TFIELDSFIELDS_R,@TFIELDSFIELDS_W,'FIELDS');
+  end;
+end;
+
+{$IFNDEF FPC}
+procedure RIRegisterTFIELDLIST(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TFIELDLIST) do
+  begin
+  RegisterMethod(@TFIELDLIST.FIELDBYNAME, 'FIELDBYNAME');
+  RegisterMethod(@TFIELDLIST.FIND, 'FIND');
+  RegisterPropertyHelper(@TFIELDLISTFIELDS_R,nil,'FIELDS');
+  end;
+end;
+
+procedure RIRegisterTFIELDDEFLIST(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TFIELDDEFLIST) do
+  begin
+  RegisterMethod(@TFIELDDEFLIST.FIELDBYNAME, 'FIELDBYNAME');
+  RegisterMethod(@TFIELDDEFLIST.FIND, 'FIND');
+  RegisterPropertyHelper(@TFIELDDEFLISTFIELDDEFS_R,nil,'FIELDDEFS');
+  end;
+end;
+
+
+procedure RIRegisterTFLATLIST(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TFLATLIST) do
+  begin
+  RegisterConstructor(@TFLATLIST.CREATE, 'CREATE');
+  RegisterMethod(@TFLATLIST.UPDATE, 'UPDATE');
+  RegisterPropertyHelper(@TFLATLISTDATASET_R,nil,'DATASET');
+  end;
+end;
+{$ENDIF}
+
+
+procedure RIRegisterTINDEXDEFS(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TINDEXDEFS) do
+  begin
+  RegisterConstructor(@TINDEXDEFS.CREATE, 'CREATE');
+  RegisterMethod(@TINDEXDEFS.ADDINDEXDEF, 'ADDINDEXDEF');
+  RegisterMethod(@TINDEXDEFS.FIND, 'FIND');
+  RegisterMethod(@TINDEXDEFS.UPDATE, 'UPDATE');
+  RegisterMethod(@TINDEXDEFS.FINDINDEXFORFIELDS, 'FINDINDEXFORFIELDS');
+  RegisterMethod(@TINDEXDEFS.GETINDEXFORFIELDS, 'GETINDEXFORFIELDS');
+  RegisterMethod(@TINDEXDEFS.ADD, 'ADD');
+  RegisterPropertyHelper(@TINDEXDEFSITEMS_R,@TINDEXDEFSITEMS_W,'ITEMS');
+  end;
+end;
+
+procedure RIRegisterTINDEXDEF(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TINDEXDEF) do
+  begin
+  RegisterConstructor(@TINDEXDEF.CREATE, 'CREATE');
+{$IFNDEF FPC}
+  RegisterPropertyHelper(@TINDEXDEFFIELDEXPRESSION_R,nil,'FIELDEXPRESSION');
+  RegisterPropertyHelper(@TINDEXDEFCASEINSFIELDS_R,@TINDEXDEFCASEINSFIELDS_W,'CASEINSFIELDS');
+  RegisterPropertyHelper(@TINDEXDEFGROUPINGLEVEL_R,@TINDEXDEFGROUPINGLEVEL_W,'GROUPINGLEVEL');
+  RegisterPropertyHelper(@TINDEXDEFDESCFIELDS_R,@TINDEXDEFDESCFIELDS_W,'DESCFIELDS');
+
+{$ENDIF}
+  RegisterPropertyHelper(@TINDEXDEFEXPRESSION_R,@TINDEXDEFEXPRESSION_W,'EXPRESSION');
+  RegisterPropertyHelper(@TINDEXDEFFIELDS_R,@TINDEXDEFFIELDS_W,'FIELDS');
+  RegisterPropertyHelper(@TINDEXDEFOPTIONS_R,@TINDEXDEFOPTIONS_W,'OPTIONS');
+  RegisterPropertyHelper(@TINDEXDEFSOURCE_R,@TINDEXDEFSOURCE_W,'SOURCE');
+  end;
+end;
+
+procedure RIRegisterTFIELDDEFS(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TFIELDDEFS) do
+  begin
+  RegisterConstructor(@TFIELDDEFS.CREATE, 'CREATE');
+  RegisterMethod(@TFIELDDEFS.ADDFIELDDEF, 'ADDFIELDDEF');
+  RegisterMethod(@TFIELDDEFS.FIND, 'FIND');
+  RegisterMethod(@TFIELDDEFS.UPDATE, 'UPDATE');
+{$IFNDEF FPC}
+  RegisterMethod(@TFIELDDEFS.ADD, 'ADD');
+  RegisterPropertyHelper(@TFIELDDEFSPARENTDEF_R,nil,'PARENTDEF');
+
+{$ENDIF}
+  RegisterPropertyHelper(@TFIELDDEFSHIDDENFIELDS_R,@TFIELDDEFSHIDDENFIELDS_W,'HIDDENFIELDS');
+  RegisterPropertyHelper(@TFIELDDEFSITEMS_R,@TFIELDDEFSITEMS_W,'ITEMS');
+  end;
+end;
+
+procedure RIRegisterTFIELDDEF(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TFIELDDEF) do
+  begin
+//  RegisterConstructor(@TFIELDDEF.CREATE, 'CREATE');
+{$IFNDEF FPC}
+  RegisterMethod(@TFIELDDEF.ADDCHILD, 'ADDCHILD');
+  RegisterMethod(@TFIELDDEF.HASCHILDDEFS, 'HASCHILDDEFS');
+
+{$ENDIF}
+  RegisterMethod(@TFIELDDEF.CREATEFIELD, 'CREATEFIELD');
+{$IFNDEF FPC}
+  RegisterPropertyHelper(@TFIELDDEFFIELDNO_R,@TFIELDDEFFIELDNO_W,'FIELDNO');
+  RegisterPropertyHelper(@TFIELDDEFPARENTDEF_R,nil,'PARENTDEF');
+  RegisterPropertyHelper(@TFIELDDEFCHILDDEFS_R,@TFIELDDEFCHILDDEFS_W,'CHILDDEFS');
+  RegisterPropertyHelper(@TFIELDDEFREQUIRED_R,@TFIELDDEFREQUIRED_W,'REQUIRED');
+
+{$ENDIF}
+  RegisterPropertyHelper(@TFIELDDEFFIELDCLASS_R,nil,'FIELDCLASS');
+  RegisterPropertyHelper(@TFIELDDEFINTERNALCALCFIELD_R,@TFIELDDEFINTERNALCALCFIELD_W,'INTERNALCALCFIELD');
+  RegisterPropertyHelper(@TFIELDDEFATTRIBUTES_R,@TFIELDDEFATTRIBUTES_W,'ATTRIBUTES');
+  RegisterPropertyHelper(@TFIELDDEFDATATYPE_R,@TFIELDDEFDATATYPE_W,'DATATYPE');
+  RegisterPropertyHelper(@TFIELDDEFPRECISION_R,@TFIELDDEFPRECISION_W,'PRECISION');
+  RegisterPropertyHelper(@TFIELDDEFSIZE_R,@TFIELDDEFSIZE_W,'SIZE');
+  end;
+end;
+
+{$IFNDEF FPC}
+procedure RIRegisterTDEFCOLLECTION(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TDEFCOLLECTION) do
+  begin
+  RegisterConstructor(@TDEFCOLLECTION.CREATE, 'CREATE');
+  RegisterMethod(@TDEFCOLLECTION.FIND, 'FIND');
+  RegisterMethod(@TDEFCOLLECTION.GETITEMNAMES, 'GETITEMNAMES');
+  RegisterMethod(@TDEFCOLLECTION.INDEXOF, 'INDEXOF');
+  RegisterPropertyHelper(@TDEFCOLLECTIONDATASET_R,nil,'DATASET');
+  RegisterPropertyHelper(@TDEFCOLLECTIONUPDATED_R,@TDEFCOLLECTIONUPDATED_W,'UPDATED');
+  end;
+end;
+
+procedure RIRegisterTNAMEDITEM(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TNAMEDITEM) do
+  begin
+  RegisterPropertyHelper(@TNAMEDITEMNAME_R,@TNAMEDITEMNAME_W,'NAME');
+  end;
+end;
+{$ENDIF}
+
+
+procedure RIRegister_DB(CL: TPSRuntimeClassImporter);
+Begin
+RIRegisterTFIELDDEF(Cl);
+RIRegisterTFIELDDEFS(Cl);
+RIRegisterTINDEXDEF(Cl);
+RIRegisterTINDEXDEFS(Cl);
+RIRegisterTFIELDS(Cl);
+RIRegisterTLOOKUPLIST(Cl);
+RIRegisterTFIELD(Cl);
+RIRegisterTSTRINGFIELD(Cl);
+RIRegisterTNUMERICFIELD(Cl);
+RIRegisterTINTEGERFIELD(Cl);
+RIRegisterTSMALLINTFIELD(Cl);
+RIRegisterTLARGEINTFIELD(Cl);
+RIRegisterTWORDFIELD(Cl);
+RIRegisterTAUTOINCFIELD(Cl);
+RIRegisterTFLOATFIELD(Cl);
+RIRegisterTCURRENCYFIELD(Cl);
+RIRegisterTBOOLEANFIELD(Cl);
+RIRegisterTDATETIMEFIELD(Cl);
+RIRegisterTDATEFIELD(Cl);
+RIRegisterTTIMEFIELD(Cl);
+RIRegisterTBINARYFIELD(Cl);
+RIRegisterTBYTESFIELD(Cl);
+RIRegisterTVARBYTESFIELD(Cl);
+{$IFNDEF FPC}
+RIRegisterTNAMEDITEM(Cl);
+RIRegisterTDEFCOLLECTION(Cl);
+RIRegisterTWIDESTRINGFIELD(Cl);
+RIRegisterTFLATLIST(Cl);
+RIRegisterTFIELDDEFLIST(Cl);
+RIRegisterTFIELDLIST(Cl);
+RIRegisterTBCDFIELD(Cl);
+{$IFDEF DELPHI6UP}
+RIRegisterTFMTBCDFIELD(Cl);
+{$ENDIF}
+{$ENDIF}
+
+RIRegisterTBLOBFIELD(Cl);
+RIRegisterTMEMOFIELD(Cl);
+RIRegisterTGRAPHICFIELD(Cl);
+{$IFNDEF FPC}
+RIRegisterTOBJECTFIELD(Cl);
+RIRegisterTADTFIELD(Cl);
+RIRegisterTARRAYFIELD(Cl);
+RIRegisterTDATASETFIELD(Cl);
+RIRegisterTREFERENCEFIELD(Cl);
+RIRegisterTVARIANTFIELD(Cl);
+RIRegisterTGUIDFIELD(Cl);
+{$ENDIF}
+RIRegisterTPARAM(Cl);
+RIRegisterTPARAMS(Cl);
+RIRegisterTDATASET(Cl);
+end;
+
+{$IFDEF USEIMPORTER}
+initialization
+RIImporter.Invoke(RIRegister_DB);
+{$ENDIF}
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_buttons.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_buttons.pas
new file mode 100644
index 0000000..8117e4e
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_buttons.pas	
@@ -0,0 +1,38 @@
+
+unit uPSR_buttons;
+{$I PascalScript.inc}
+interface
+uses
+  uPSRuntime, uPSUtils;
+
+
+procedure RIRegisterTSPEEDBUTTON(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTBITBTN(Cl: TPSRuntimeClassImporter);
+
+procedure RIRegister_Buttons(Cl: TPSRuntimeClassImporter);
+
+implementation
+uses
+  Classes{$IFDEF CLX}, QControls, QButtons{$ELSE}, Controls, Buttons{$ENDIF};
+
+procedure RIRegisterTSPEEDBUTTON(Cl: TPSRuntimeClassImporter);
+begin
+  Cl.Add(TSPEEDBUTTON);
+end;
+
+
+procedure RIRegisterTBITBTN(Cl: TPSRuntimeClassImporter);
+begin
+  Cl.Add(TBITBTN);
+end;
+
+procedure RIRegister_Buttons(Cl: TPSRuntimeClassImporter);
+begin
+  RIRegisterTSPEEDBUTTON(cl);
+  RIRegisterTBITBTN(cl);
+end;
+
+// PS_MINIVCL changes by Martijn Laan (mlaan at wintax _dot_ nl)
+
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_classes.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_classes.pas
new file mode 100644
index 0000000..b29abc8
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_classes.pas	
@@ -0,0 +1,383 @@
+
+unit uPSR_classes;
+
+{$I PascalScript.inc}
+interface
+uses
+  uPSRuntime, uPSUtils;
+
+
+procedure RIRegisterTStrings(cl: TPSRuntimeClassImporter; Streams: Boolean);
+procedure RIRegisterTStringList(cl: TPSRuntimeClassImporter);
+{$IFNDEF PS_MINIVCL}
+procedure RIRegisterTBITS(Cl: TPSRuntimeClassImporter);
+{$ENDIF}
+procedure RIRegisterTSTREAM(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTHANDLESTREAM(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTFILESTREAM(Cl: TPSRuntimeClassImporter);
+{$IFNDEF PS_MINIVCL}
+procedure RIRegisterTCUSTOMMEMORYSTREAM(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTMEMORYSTREAM(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTRESOURCESTREAM(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTPARSER(Cl: TPSRuntimeClassImporter);
+{$IFDEF DELPHI3UP}
+procedure RIRegisterTOWNEDCOLLECTION(Cl: TPSRuntimeClassImporter);
+{$ENDIF}
+procedure RIRegisterTCOLLECTION(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTCOLLECTIONITEM(Cl: TPSRuntimeClassImporter);
+{$ENDIF}
+
+procedure RIRegister_Classes(Cl: TPSRuntimeClassImporter; Streams: Boolean{$IFDEF D4PLUS}=True{$ENDIF});
+
+implementation
+uses
+  Classes;
+
+procedure TStringsCountR(Self: TStrings; var T: Longint); begin T := Self.Count; end;
+
+procedure TStringsTextR(Self: TStrings; var T: string); begin T := Self.Text; end;
+procedure TStringsTextW(Self: TStrings; T: string); begin Self.Text:= T; end;
+
+procedure TStringsCommaTextR(Self: TStrings; var T: string); begin T := Self.CommaText; end;
+procedure TStringsCommaTextW(Self: TStrings; T: string); begin Self.CommaText:= T; end;
+
+procedure TStringsObjectsR(Self: TStrings; var T: TObject; I: Longint);
+begin
+T := Self.Objects[I];
+end;
+procedure TStringsObjectsW(Self: TStrings; const T: TObject; I: Longint);
+begin
+  Self.Objects[I]:= T;
+end;
+
+procedure TStringsStringsR(Self: TStrings; var T: string; I: Longint);
+begin
+T := Self.Strings[I];
+end;
+procedure TStringsStringsW(Self: TStrings; const T: string; I: Longint);
+begin
+  Self.Strings[I]:= T;
+end;
+
+procedure TStringsNamesR(Self: TStrings; var T: string; I: Longint);
+begin
+T := Self.Names[I];
+end;
+procedure TStringsValuesR(Self: TStrings; var T: string; const I: string);
+begin
+T := Self.Values[I];
+end;
+procedure TStringsValuesW(Self: TStrings; Const T, I: String);
+begin
+  Self.Values[I]:= T;
+end;
+
+procedure RIRegisterTStrings(cl: TPSRuntimeClassImporter; Streams: Boolean); // requires TPersistent
+begin
+  with Cl.Add(TStrings) do
+  begin
+    RegisterVirtualMethod(@TStrings.Add, 'ADD');
+    RegisterMethod(@TStrings.Append, 'APPEND');
+    RegisterVirtualMethod(@TStrings.AddStrings, 'ADDSTRINGS');
+    RegisterVirtualAbstractMethod(TStringList, @TStringList.Clear, 'CLEAR');
+    RegisterVirtualAbstractMethod(TStringList, @TStringList.Delete, 'DELETE');
+    RegisterVirtualMethod(@TStrings.IndexOf, 'INDEXOF');
+    RegisterVirtualAbstractMethod(TStringList, @TStringList.Insert, 'INSERT');
+    RegisterPropertyHelper(@TStringsCountR, nil, 'COUNT');
+    RegisterPropertyHelper(@TStringsTextR, @TStringsTextW, 'TEXT');
+    RegisterPropertyHelper(@TStringsCommaTextR, @TStringsCommatextW, 'COMMATEXT');
+    if Streams then
+    begin
+      RegisterVirtualMethod(@TStrings.LoadFromFile, 'LOADFROMFILE');
+      RegisterVirtualMethod(@TStrings.SaveToFile, 'SAVETOFILE');
+    end;
+    RegisterPropertyHelper(@TStringsStringsR, @TStringsStringsW, 'STRINGS');
+    RegisterPropertyHelper(@TStringsObjectsR, @TStringsObjectsW, 'OBJECTS');
+
+    {$IFNDEF PS_MINIVCL}
+    RegisterMethod(@TStrings.BeginUpdate, 'BEGINUPDATE');
+    RegisterMethod(@TStrings.EndUpdate, 'ENDUPDATE');
+    RegisterMethod(@TStrings.Equals,  'EQUALS');
+    RegisterVirtualMethod(@TStrings.Exchange, 'EXCHANGE');
+    RegisterMethod(@TStrings.IndexOfName, 'INDEXOFNAME');
+    if Streams then
+      RegisterVirtualMethod(@TStrings.LoadFromStream, 'LOADFROMSTREAM');
+    RegisterVirtualMethod(@TStrings.Move, 'MOVE');
+    if Streams then
+      RegisterVirtualMethod(@TStrings.SaveToStream, 'SAVETOSTREAM');
+    RegisterVirtualMethod(@TStrings.SetText, 'SETTEXT');
+    RegisterPropertyHelper(@TStringsNamesR, nil, 'NAMES');
+    RegisterPropertyHelper(@TStringsValuesR, @TStringsValuesW, 'VALUES');
+    RegisterVirtualMethod(@TSTRINGS.ADDOBJECT, 'ADDOBJECT');
+    RegisterVirtualMethod(@TSTRINGS.GETTEXT, 'GETTEXT');
+    RegisterMethod(@TSTRINGS.INDEXOFOBJECT, 'INDEXOFOBJECT');
+    RegisterMethod(@TSTRINGS.INSERTOBJECT, 'INSERTOBJECT');
+    {$ENDIF}
+  end;
+end;
+
+procedure TSTRINGLISTDUPLICATES_R(Self: TSTRINGLIST; var T: TDUPLICATES); begin T := Self.DUPLICATES; end;
+procedure TSTRINGLISTDUPLICATES_W(Self: TSTRINGLIST; const T: TDUPLICATES); begin Self.DUPLICATES := T; end;
+procedure TSTRINGLISTSORTED_R(Self: TSTRINGLIST; var T: BOOLEAN); begin T := Self.SORTED; end;
+procedure TSTRINGLISTSORTED_W(Self: TSTRINGLIST; const T: BOOLEAN); begin Self.SORTED := T; end;
+procedure TSTRINGLISTONCHANGE_R(Self: TSTRINGLIST; var T: TNOTIFYEVENT);
+begin
+T := Self.ONCHANGE; end;
+procedure TSTRINGLISTONCHANGE_W(Self: TSTRINGLIST; const T: TNOTIFYEVENT);
+begin
+Self.ONCHANGE := T; end;
+procedure TSTRINGLISTONCHANGING_R(Self: TSTRINGLIST; var T: TNOTIFYEVENT); begin T := Self.ONCHANGING; end;
+procedure TSTRINGLISTONCHANGING_W(Self: TSTRINGLIST; const T: TNOTIFYEVENT); begin Self.ONCHANGING := T; end;
+procedure RIRegisterTSTRINGLIST(Cl: TPSRuntimeClassImporter);
+begin
+  with Cl.Add(TSTRINGLIST) do
+  begin
+    RegisterVirtualMethod(@TSTRINGLIST.FIND, 'FIND');
+    RegisterVirtualMethod(@TSTRINGLIST.SORT, 'SORT');
+    RegisterPropertyHelper(@TSTRINGLISTDUPLICATES_R, @TSTRINGLISTDUPLICATES_W, 'DUPLICATES');
+    RegisterPropertyHelper(@TSTRINGLISTSORTED_R, @TSTRINGLISTSORTED_W, 'SORTED');
+    RegisterEventPropertyHelper(@TSTRINGLISTONCHANGE_R, @TSTRINGLISTONCHANGE_W, 'ONCHANGE');
+    RegisterEventPropertyHelper(@TSTRINGLISTONCHANGING_R, @TSTRINGLISTONCHANGING_W, 'ONCHANGING');
+  end;
+end;
+
+{$IFNDEF PS_MINIVCL}
+procedure TBITSBITS_W(Self: TBITS; T: BOOLEAN; t1: INTEGER); begin Self.BITS[t1] := T; end;
+procedure TBITSBITS_R(Self: TBITS; var T: BOOLEAN; t1: INTEGER); begin T := Self.Bits[t1]; end;
+procedure TBITSSIZE_R(Self: TBITS; T: INTEGER); begin Self.SIZE := T; end;
+procedure TBITSSIZE_W(Self: TBITS; var T: INTEGER); begin T := Self.SIZE; end;
+
+procedure RIRegisterTBITS(Cl: TPSRuntimeClassImporter);
+begin
+  with Cl.Add(TBITS) do
+  begin
+    RegisterMethod(@TBITS.OPENBIT, 'OPENBIT');
+    RegisterPropertyHelper(@TBITSBITS_R, @TBITSBITS_W, 'BITS');
+    RegisterPropertyHelper(@TBITSSIZE_R, @TBITSSIZE_W, 'SIZE');
+  end;
+end;
+{$ENDIF}
+
+procedure TSTREAMPOSITION_R(Self: TSTREAM; var T: LONGINT); begin t := Self.POSITION; end;
+procedure TSTREAMPOSITION_W(Self: TSTREAM; T: LONGINT); begin Self.POSITION := t; end;
+procedure TSTREAMSIZE_R(Self: TSTREAM; var T: LONGINT); begin t := Self.SIZE; end;
+{$IFDEF DELPHI3UP}
+procedure TSTREAMSIZE_W(Self: TSTREAM; T: LONGINT); begin Self.SIZE := t; end;
+{$ENDIF}
+
+procedure RIRegisterTSTREAM(Cl: TPSRuntimeClassImporter);
+begin
+  with Cl.Add(TSTREAM) do
+  begin
+    RegisterVirtualAbstractMethod(TMemoryStream, @TMemoryStream.READ, 'READ');
+    RegisterVirtualAbstractMethod(TMemoryStream, @TMemoryStream.WRITE, 'WRITE');
+    RegisterVirtualAbstractMethod(TMemoryStream, @TMemoryStream.SEEK, 'SEEK');
+    RegisterMethod(@TSTREAM.READBUFFER, 'READBUFFER');
+    RegisterMethod(@TSTREAM.WRITEBUFFER, 'WRITEBUFFER');
+    RegisterMethod(@TSTREAM.COPYFROM, 'COPYFROM');
+    RegisterPropertyHelper(@TSTREAMPOSITION_R, @TSTREAMPOSITION_W, 'POSITION');
+    RegisterPropertyHelper(@TSTREAMSIZE_R, {$IFDEF DELPHI3UP}@TSTREAMSIZE_W, {$ELSE}nil, {$ENDIF}'SIZE');
+  end;
+end;
+
+procedure THANDLESTREAMHANDLE_R(Self: THANDLESTREAM; var T: INTEGER); begin T := Self.HANDLE; end;
+
+procedure RIRegisterTHANDLESTREAM(Cl: TPSRuntimeClassImporter);
+begin
+  with Cl.Add(THANDLESTREAM) do
+  begin
+    RegisterConstructor(@THANDLESTREAM.CREATE, 'CREATE');
+    RegisterPropertyHelper(@THANDLESTREAMHANDLE_R, nil, 'HANDLE');
+  end;
+end;
+
+{$IFDEF FPC}
+// mh: because FPC doesn't handle pointers to overloaded functions
+function TFileStreamCreate(filename: string; mode: word): TFileStream;
+begin
+  result := TFilestream.Create(filename, mode);
+end;
+{$ENDIF}
+
+procedure RIRegisterTFILESTREAM(Cl: TPSRuntimeClassImporter);
+begin
+  with Cl.Add(TFILESTREAM) do
+  begin
+    {$IFDEF FPC}
+    RegisterConstructor(@TFileStreamCreate, 'CREATE');
+    {$ELSE}
+    RegisterConstructor(@TFILESTREAM.CREATE, 'CREATE');
+    {$ENDIF}
+  end;
+end;
+
+{$IFNDEF PS_MINIVCL}
+procedure RIRegisterTCUSTOMMEMORYSTREAM(Cl: TPSRuntimeClassImporter);
+begin
+  with Cl.Add(TCUSTOMMEMORYSTREAM) do
+  begin
+    RegisterMethod(@TCUSTOMMEMORYSTREAM.SAVETOSTREAM, 'SAVETOSTREAM');
+    RegisterMethod(@TCUSTOMMEMORYSTREAM.SAVETOFILE, 'SAVETOFILE');
+  end;
+end;
+
+procedure RIRegisterTMEMORYSTREAM(Cl: TPSRuntimeClassImporter);
+begin
+  with Cl.Add(TMEMORYSTREAM) do
+  begin
+    RegisterMethod(@TMEMORYSTREAM.CLEAR, 'CLEAR');
+    RegisterMethod(@TMEMORYSTREAM.LOADFROMSTREAM, 'LOADFROMSTREAM');
+    RegisterMethod(@TMEMORYSTREAM.LOADFROMFILE, 'LOADFROMFILE');
+    RegisterMethod(@TMEMORYSTREAM.SETSIZE, 'SETSIZE');
+  end;
+end;
+
+procedure RIRegisterTRESOURCESTREAM(Cl: TPSRuntimeClassImporter);
+begin
+  with Cl.Add(TRESOURCESTREAM) do
+  begin
+    RegisterConstructor(@TRESOURCESTREAM.CREATE, 'CREATE');
+    RegisterConstructor(@TRESOURCESTREAM.CREATEFROMID, 'CREATEFROMID');
+  end;
+end;
+
+procedure TPARSERSOURCELINE_R(Self: TPARSER; var T: INTEGER); begin T := Self.SOURCELINE; end;
+procedure TPARSERTOKEN_R(Self: TPARSER; var T: CHAR); begin T := Self.TOKEN; end;
+
+procedure RIRegisterTPARSER(Cl: TPSRuntimeClassImporter);
+begin
+  with Cl.Add(TPARSER) do
+  begin
+    RegisterConstructor(@TPARSER.CREATE, 'CREATE');
+    RegisterMethod(@TPARSER.CHECKTOKEN, 'CHECKTOKEN');
+    RegisterMethod(@TPARSER.CHECKTOKENSYMBOL, 'CHECKTOKENSYMBOL');
+    RegisterMethod(@TPARSER.ERROR, 'ERROR');
+    RegisterMethod(@TPARSER.ERRORSTR, 'ERRORSTR');
+    RegisterMethod(@TPARSER.HEXTOBINARY, 'HEXTOBINARY');
+    RegisterMethod(@TPARSER.NEXTTOKEN, 'NEXTTOKEN');
+    RegisterMethod(@TPARSER.SOURCEPOS, 'SOURCEPOS');
+    RegisterMethod(@TPARSER.TOKENCOMPONENTIDENT, 'TOKENCOMPONENTIDENT');
+    RegisterMethod(@TPARSER.TOKENFLOAT, 'TOKENFLOAT');
+    RegisterMethod(@TPARSER.TOKENINT, 'TOKENINT');
+    RegisterMethod(@TPARSER.TOKENSTRING, 'TOKENSTRING');
+    RegisterMethod(@TPARSER.TOKENSYMBOLIS, 'TOKENSYMBOLIS');
+    RegisterPropertyHelper(@TPARSERSOURCELINE_R, nil, 'SOURCELINE');
+    RegisterPropertyHelper(@TPARSERTOKEN_R, nil, 'TOKEN');
+  end;
+end;
+
+procedure TCOLLECTIONITEMS_W(Self: TCOLLECTION; const T: TCOLLECTIONITEM; const t1: INTEGER);
+begin Self.ITEMS[t1] := T; end;
+
+procedure TCOLLECTIONITEMS_R(Self: TCOLLECTION; var T: TCOLLECTIONITEM; const t1: INTEGER);
+begin T := Self.ITEMS[t1]; end;
+
+{$IFDEF DELPHI3UP}
+procedure TCOLLECTIONITEMCLASS_R(Self: TCOLLECTION; var T: TCOLLECTIONITEMCLASS);
+begin T := Self.ITEMCLASS; end;
+{$ENDIF}
+
+procedure TCOLLECTIONCOUNT_R(Self: TCOLLECTION; var T: INTEGER);
+begin T := Self.COUNT; end;
+
+{$IFDEF DELPHI3UP}
+procedure TCOLLECTIONITEMDISPLAYNAME_W(Self: TCOLLECTIONITEM; const T: STRING);
+begin Self.DISPLAYNAME := T; end;
+{$ENDIF}
+
+{$IFDEF DELPHI3UP}
+procedure TCOLLECTIONITEMDISPLAYNAME_R(Self: TCOLLECTIONITEM; var T: STRING);
+begin T := Self.DISPLAYNAME; end;
+{$ENDIF}
+
+procedure TCOLLECTIONITEMINDEX_W(Self: TCOLLECTIONITEM; const T: INTEGER);
+begin Self.INDEX := T; end;
+
+procedure TCOLLECTIONITEMINDEX_R(Self: TCOLLECTIONITEM; var T: INTEGER);
+begin T := Self.INDEX; end;
+
+{$IFDEF DELPHI3UP}
+procedure TCOLLECTIONITEMID_R(Self: TCOLLECTIONITEM; var T: INTEGER);
+begin T := Self.ID; end;
+{$ENDIF}
+
+procedure TCOLLECTIONITEMCOLLECTION_W(Self: TCOLLECTIONITEM; const T: TCOLLECTION);
+begin Self.COLLECTION := T; end;
+
+procedure TCOLLECTIONITEMCOLLECTION_R(Self: TCOLLECTIONITEM; var T: TCOLLECTION);
+begin T := Self.COLLECTION; end;
+
+{$IFDEF DELPHI3UP}
+procedure RIRegisterTOWNEDCOLLECTION(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TOWNEDCOLLECTION) do
+  begin
+  RegisterConstructor(@TOWNEDCOLLECTION.CREATE, 'CREATE');
+  end;
+end;
+{$ENDIF}
+
+procedure RIRegisterTCOLLECTION(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TCOLLECTION) do
+  begin
+  RegisterConstructor(@TCOLLECTION.CREATE, 'CREATE');
+{$IFDEF DELPHI6UP}  {$IFNDEF FPC} RegisterMethod(@TCOLLECTION.OWNER, 'OWNER'); {$ENDIF} {$ENDIF} // no owner in FPC
+  RegisterMethod(@TCOLLECTION.ADD, 'ADD');
+  RegisterVirtualMethod(@TCOLLECTION.BEGINUPDATE, 'BEGINUPDATE');
+  RegisterMethod(@TCOLLECTION.CLEAR, 'CLEAR');
+{$IFDEF DELPHI5UP}  RegisterMethod(@TCOLLECTION.DELETE, 'DELETE'); {$ENDIF}
+  RegisterVirtualMethod(@TCOLLECTION.ENDUPDATE, 'ENDUPDATE');
+{$IFDEF DELPHI3UP}  RegisterMethod(@TCOLLECTION.FINDITEMID, 'FINDITEMID'); {$ENDIF}
+{$IFDEF DELPHI3UP}  RegisterMethod(@TCOLLECTION.INSERT, 'INSERT'); {$ENDIF}
+  RegisterPropertyHelper(@TCOLLECTIONCOUNT_R,nil,'COUNT');
+{$IFDEF DELPHI3UP}  RegisterPropertyHelper(@TCOLLECTIONITEMCLASS_R,nil,'ITEMCLASS'); {$ENDIF}
+  RegisterPropertyHelper(@TCOLLECTIONITEMS_R,@TCOLLECTIONITEMS_W,'ITEMS');
+  end;
+end;
+
+procedure RIRegisterTCOLLECTIONITEM(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TCOLLECTIONITEM) do
+  begin
+  RegisterVirtualConstructor(@TCOLLECTIONITEM.CREATE, 'CREATE');
+  RegisterPropertyHelper(@TCOLLECTIONITEMCOLLECTION_R,@TCOLLECTIONITEMCOLLECTION_W,'COLLECTION');
+{$IFDEF DELPHI3UP}  RegisterPropertyHelper(@TCOLLECTIONITEMID_R,nil,'ID'); {$ENDIF}
+  RegisterPropertyHelper(@TCOLLECTIONITEMINDEX_R,@TCOLLECTIONITEMINDEX_W,'INDEX');
+{$IFDEF DELPHI3UP}  RegisterPropertyHelper(@TCOLLECTIONITEMDISPLAYNAME_R,@TCOLLECTIONITEMDISPLAYNAME_W,'DISPLAYNAME'); {$ENDIF}
+  end;
+end;
+{$ENDIF}
+
+procedure RIRegister_Classes(Cl: TPSRuntimeClassImporter; Streams: Boolean);
+begin
+  if Streams then
+    RIRegisterTSTREAM(Cl);
+  RIRegisterTStrings(cl, Streams);
+  RIRegisterTStringList(cl);
+  {$IFNDEF PS_MINIVCL}
+  RIRegisterTBITS(cl);
+  {$ENDIF}
+  if Streams then
+  begin
+    RIRegisterTHANDLESTREAM(Cl);
+    RIRegisterTFILESTREAM(Cl);
+    {$IFNDEF PS_MINIVCL}
+    RIRegisterTCUSTOMMEMORYSTREAM(Cl);
+    RIRegisterTMEMORYSTREAM(Cl);
+    RIRegisterTRESOURCESTREAM(Cl);
+    {$ENDIF}
+  end;
+  {$IFNDEF PS_MINIVCL}
+  RIRegisterTPARSER(Cl);
+  RIRegisterTCOLLECTIONITEM(Cl);
+  RIRegisterTCOLLECTION(Cl);
+  {$IFDEF DELPHI3UP}
+  RIRegisterTOWNEDCOLLECTION(Cl);
+  {$ENDIF}
+  {$ENDIF}
+end;
+
+// PS_MINIVCL changes by Martijn Laan (mlaan at wintax _dot_ nl)
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_comobj.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_comobj.pas
new file mode 100644
index 0000000..67ec7df
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_comobj.pas	
@@ -0,0 +1,96 @@
+
+
+unit uPSR_comobj;
+
+{$I PascalScript.inc}
+interface
+uses
+  uPSRuntime, uPSUtils;
+
+
+procedure RIRegister_ComObj(cl: TPSExec);
+
+implementation
+uses
+{$IFDEF DELPHI3UP}
+  ComObj;
+{$ELSE}
+  SysUtils, Ole2;
+{$ENDIF}
+{$IFNDEF DELPHI3UP}
+
+{$IFDEF DELPHI3UP }
+resourceString
+{$ELSE }
+const
+{$ENDIF }
+
+  RPS_OLEError = 'OLE error %.8x';
+function OleErrorMessage(ErrorCode: HResult): String;
+begin
+  Result := SysErrorMessage(ErrorCode);
+  if Result = '' then
+    Result := Format(RPS_OLEError, [ErrorCode]);
+end;
+
+procedure OleError(ErrorCode: HResult);
+begin
+  raise Exception.Create(OleErrorMessage(ErrorCode));
+end;
+
+procedure OleCheck(Result: HResult);
+begin
+  if Result < 0 then OleError(Result);
+end;
+
+procedure CreateOleObject(const ClassName: string; var Disp: IDispatch);
+var
+  OldDisp: IDispatch;
+  ClassID: TCLSID;
+  WideCharBuf: array[0..127] of WideChar;
+begin
+  StringToWideChar(ClassName, WideCharBuf, SizeOf(WideCharBuf) div SizeOf(WideCharBuf[0]));
+  OleCheck(CLSIDFromProgID(WideCharBuf, ClassID));
+  if Disp <> nil then
+  begin
+    OldDisp := Disp;
+    Disp := nil;
+    OldDisp.Release;
+  end;
+  OleCheck(CoCreateInstance(ClassID, nil, CLSCTX_INPROC_SERVER or
+    CLSCTX_LOCAL_SERVER, IID_IDispatch, Disp));
+end;
+
+procedure GetActiveOleObject(const ClassName: string; var Disp: IDispatch);
+var
+  Unknown: IUnknown;
+  OldDisp: IDispatch;
+  ClassID: TCLSID;
+  WideCharBuf: array[0..127] of WideChar;
+begin
+  StringToWideChar(ClassName, WideCharBuf, SizeOf(WideCharBuf) div SizeOf(WideCharBuf[0]));
+  OleCheck(CLSIDFromProgID(WideCharBuf, ClassID));
+  OleCheck(GetActiveObject(ClassID, nil, Unknown));
+  try
+    if Disp <> nil then
+    begin
+      OldDisp := Disp;
+      Disp := nil;
+      OldDisp.Release;
+    end;
+    OleCheck(Unknown.QueryInterface(IID_IDispatch, Disp));
+  finally
+    Unknown.Release;
+  end;
+end;
+
+{$ENDIF}
+
+
+procedure RIRegister_ComObj(cl: TPSExec);
+begin
+  cl.RegisterDelphiFunction(@CreateOleObject, 'CREATEOLEOBJECT', cdRegister);
+  cl.RegisterDelphiFunction(@GetActiveOleObject, 'GETACTIVEOLEOBJECT', cdRegister);
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_controls.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_controls.pas
new file mode 100644
index 0000000..4bac801
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_controls.pas	
@@ -0,0 +1,249 @@
+
+unit uPSR_controls;
+
+{$I PascalScript.inc}
+interface
+uses
+  uPSRuntime, uPSUtils;
+
+
+
+
+procedure RIRegisterTControl(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTWinControl(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTGraphicControl(cl: TPSRuntimeClassImporter);
+procedure RIRegisterTCustomControl(cl: TPSRuntimeClassImporter);
+procedure RIRegister_TDragObject(CL: TPSRuntimeClassImporter);
+
+procedure RIRegister_Controls(Cl: TPSRuntimeClassImporter);
+
+implementation
+{$IFNDEF FPC}
+uses
+  Classes{$IFDEF CLX}, QControls, QGraphics{$ELSE}, Controls, Graphics, Windows{$ENDIF};
+{$ELSE}
+uses
+  Classes, Controls, Graphics;
+{$ENDIF}
+
+procedure TControlAlignR(Self: TControl; var T: Byte); begin T := Byte(Self.Align); end;
+procedure TControlAlignW(Self: TControl; T: Byte); begin Self.Align:= TAlign(T); end;
+
+procedure TControlClientHeightR(Self: TControl; var T: Longint); begin T := Self.ClientHeight; end;
+procedure TControlClientHeightW(Self: TControl; T: Longint); begin Self.ClientHeight := T; end;
+
+procedure TControlClientWidthR(Self: TControl; var T: Longint); begin T := Self.ClientWidth; end;
+procedure TControlClientWidthW(Self: TControl; T: Longint); begin Self.ClientWidth:= T; end;
+
+procedure TControlShowHintR(Self: TControl; var T: Boolean); begin T := Self.ShowHint; end;
+procedure TControlShowHintW(Self: TControl; T: Boolean); begin Self.ShowHint:= T; end;
+
+procedure TControlVisibleR(Self: TControl; var T: Boolean); begin T := Self.Visible; end;
+procedure TControlVisibleW(Self: TControl; T: Boolean); begin Self.Visible:= T; end;
+
+procedure TControlParentR(Self: TControl; var T: TWinControl); begin T := Self.Parent; end;
+procedure TControlParentW(Self: TControl; T: TWinControl); begin Self.Parent:= T; end;
+
+
+procedure TCONTROLSHOWHINT_W(Self: TCONTROL; T: BOOLEAN); begin Self.SHOWHINT := T; end;
+procedure TCONTROLSHOWHINT_R(Self: TCONTROL; var T: BOOLEAN); begin T := Self.SHOWHINT; end;
+procedure TCONTROLENABLED_W(Self: TCONTROL; T: BOOLEAN); begin Self.ENABLED := T; end;
+procedure TCONTROLENABLED_R(Self: TCONTROL; var T: BOOLEAN); begin T := Self.ENABLED; end;
+
+procedure RIRegisterTControl(Cl: TPSRuntimeClassImporter);
+begin
+  with Cl.Add(TControl) do
+  begin
+    RegisterVirtualConstructor(@TControl.Create, 'CREATE');
+    RegisterMethod(@TControl.BRingToFront, 'BRINGTOFRONT');
+    RegisterMethod(@TControl.Hide, 'HIDE');
+    RegisterVirtualMethod(@TControl.Invalidate, 'INVALIDATE');
+    RegisterMethod(@TControl.Refresh, 'REFRESH');
+    RegisterVirtualMethod(@TControl.Repaint, 'REPAINT');
+    RegisterMethod(@TControl.SendToBack, 'SENDTOBACK');
+    RegisterMethod(@TControl.Show, 'SHOW');
+    RegisterVirtualMethod(@TControl.Update, 'UPDATE');
+    RegisterVirtualMethod(@TControl.SetBounds, 'SETBOUNDS');
+
+    RegisterPropertyHelper(@TControlShowHintR, @TControlShowHintW, 'SHOWHINT');
+    RegisterPropertyHelper(@TControlAlignR, @TControlAlignW, 'ALIGN');
+    RegisterPropertyHelper(@TControlClientHeightR, @TControlClientHeightW, 'CLIENTHEIGHT');
+    RegisterPropertyHelper(@TControlClientWidthR, @TControlClientWidthW, 'CLIENTWIDTH');
+    RegisterPropertyHelper(@TControlVisibleR, @TControlVisibleW, 'VISIBLE');
+    RegisterPropertyHelper(@TCONTROLENABLED_R, @TCONTROLENABLED_W, 'ENABLED');
+
+    RegisterPropertyHelper(@TControlParentR, @TControlParentW, 'PARENT');
+
+    {$IFNDEF PS_MINIVCL}
+    RegisterMethod(@TControl.Dragging, 'DRAGGING');
+    RegisterMethod(@TControl.HasParent, 'HASPARENT');
+    RegisterMethod(@TCONTROL.CLIENTTOSCREEN, 'CLIENTTOSCREEN');
+    RegisterMethod(@TCONTROL.DRAGGING, 'DRAGGING');
+   {$IFNDEF FPC} 
+    RegisterMethod(@TCONTROL.BEGINDRAG, 'BEGINDRAG');
+    RegisterMethod(@TCONTROL.ENDDRAG, 'ENDDRAG');
+   {$ENDIF}
+    {$IFNDEF CLX}
+    RegisterMethod(@TCONTROL.GETTEXTBUF, 'GETTEXTBUF');
+    RegisterMethod(@TCONTROL.GETTEXTLEN, 'GETTEXTLEN');
+    RegisterMethod(@TCONTROL.PERFORM, 'PERFORM');
+    RegisterMethod(@TCONTROL.SETTEXTBUF, 'SETTEXTBUF');
+    {$ENDIF}
+    RegisterMethod(@TCONTROL.SCREENTOCLIENT, 'SCREENTOCLIENT');
+    {$ENDIF}
+  end;
+end;
+{$IFNDEF CLX}
+procedure TWinControlHandleR(Self: TWinControl; var T: Longint); begin T := Self.Handle; end;
+{$ENDIF}
+procedure TWinControlShowingR(Self: TWinControl; var T: Boolean); begin T := Self.Showing; end;
+
+
+procedure TWinControlTabOrderR(Self: TWinControl; var T: Longint); begin T := Self.TabOrder; end;
+procedure TWinControlTabOrderW(Self: TWinControl; T: Longint); begin Self.TabOrder:= T; end;
+
+procedure TWinControlTabStopR(Self: TWinControl; var T: Boolean); begin T := Self.TabStop; end;
+procedure TWinControlTabStopW(Self: TWinControl; T: Boolean); begin Self.TabStop:= T; end;
+procedure TWINCONTROLBRUSH_R(Self: TWINCONTROL; var T: TBRUSH); begin T := Self.BRUSH; end;
+procedure TWINCONTROLCONTROLS_R(Self: TWINCONTROL; var T: TCONTROL; t1: INTEGER); begin t := Self.CONTROLS[t1]; end;
+procedure TWINCONTROLCONTROLCOUNT_R(Self: TWINCONTROL; var T: INTEGER); begin t := Self.CONTROLCOUNT; end;
+
+procedure RIRegisterTWinControl(Cl: TPSRuntimeClassImporter); // requires TControl
+begin
+  with Cl.Add(TWinControl) do
+  begin
+    {$IFNDEF CLX}
+    RegisterPropertyHelper(@TWinControlHandleR, nil, 'HANDLE');
+    {$ENDIF}
+    RegisterPropertyHelper(@TWinControlShowingR, nil, 'SHOWING');
+    RegisterPropertyHelper(@TWinControlTabOrderR, @TWinControlTabOrderW, 'TABORDER');
+    RegisterPropertyHelper(@TWinControlTabStopR, @TWinControlTabStopW, 'TABSTOP');
+    RegisterMethod(@TWINCONTROL.CANFOCUS, 'CANFOCUS');
+    RegisterMethod(@TWINCONTROL.FOCUSED, 'FOCUSED');
+    RegisterPropertyHelper(@TWINCONTROLCONTROLS_R, nil, 'CONTROLS');
+    RegisterPropertyHelper(@TWINCONTROLCONTROLCOUNT_R, nil, 'CONTROLCOUNT');
+    {$IFNDEF PS_MINIVCL}
+    RegisterMethod(@TWinControl.HandleAllocated, 'HANDLEALLOCATED');
+    RegisterMethod(@TWinControl.HandleNeeded, 'HANDLENEEDED');
+    RegisterMethod(@TWinControl.EnableAlign, 'ENABLEALIGN');
+		RegisterMethod(@TWinControl.RemoveControl, 'REMOVECONTROL');
+		{$IFNDEF FPC}
+		RegisterMethod(@TWinControl.InsertControl, 'INSERTCONTROL');
+		RegisterMethod(@TWinControl.ScaleBy, 'SCALEBY');
+		RegisterMethod(@TWinControl.ScrollBy, 'SCROLLBY');
+		{$IFNDEF CLX}
+		 RegisterMethod(@TWINCONTROL.PAINTTO, 'PAINTTO');
+		{$ENDIF}
+		{$ENDIF}{FPC}
+		RegisterMethod(@TWinControl.Realign, 'REALIGN');
+		RegisterVirtualMethod(@TWinControl.SetFocus, 'SETFOCUS');
+		RegisterMethod(@TWINCONTROL.CONTAINSCONTROL, 'CONTAINSCONTROL');
+		RegisterMethod(@TWINCONTROL.DISABLEALIGN, 'DISABLEALIGN');
+		RegisterMethod(@TWINCONTROL.UPDATECONTROLSTATE, 'UPDATECONTROLSTATE');
+    RegisterPropertyHelper(@TWINCONTROLBRUSH_R, nil, 'BRUSH');
+    {$ENDIF}
+  end;
+end;
+
+procedure RIRegisterTGraphicControl(cl: TPSRuntimeClassImporter); // requires TControl
+begin
+  Cl.Add(TGraphicControl);
+end;
+procedure RIRegisterTCustomControl(cl: TPSRuntimeClassImporter); // requires TControl
+begin
+  Cl.Add(TCustomControl);
+end;
+
+{$IFDEF DELPHI4UP}
+(* === run-time registration functions === *)
+(*----------------------------------------------------------------------------*)
+procedure TDragObjectMouseDeltaY_R(Self: TDragObject; var T: Double);
+begin T := Self.MouseDeltaY; end;
+
+(*----------------------------------------------------------------------------*)
+procedure TDragObjectMouseDeltaX_R(Self: TDragObject; var T: Double);
+begin T := Self.MouseDeltaX; end;
+
+(*----------------------------------------------------------------------------*)
+procedure TDragObjectDragTarget_W(Self: TDragObject; const T: Pointer);
+begin Self.DragTarget := T; end;
+
+(*----------------------------------------------------------------------------*)
+procedure TDragObjectDragTarget_R(Self: TDragObject; var T: Pointer);
+begin T := Self.DragTarget; end;
+
+(*----------------------------------------------------------------------------*)
+procedure TDragObjectDragTargetPos_W(Self: TDragObject; const T: TPoint);
+begin Self.DragTargetPos := T; end;
+
+(*----------------------------------------------------------------------------*)
+procedure TDragObjectDragTargetPos_R(Self: TDragObject; var T: TPoint);
+begin T := Self.DragTargetPos; end;
+
+(*----------------------------------------------------------------------------*)
+procedure TDragObjectDragPos_W(Self: TDragObject; const T: TPoint);
+begin Self.DragPos := T; end;
+
+(*----------------------------------------------------------------------------*)
+procedure TDragObjectDragPos_R(Self: TDragObject; var T: TPoint);
+begin T := Self.DragPos; end;
+
+(*----------------------------------------------------------------------------*)
+procedure TDragObjectDragHandle_W(Self: TDragObject; const T: HWND);
+begin Self.DragHandle := T; end;
+
+(*----------------------------------------------------------------------------*)
+procedure TDragObjectDragHandle_R(Self: TDragObject; var T: HWND);
+begin T := Self.DragHandle; end;
+
+(*----------------------------------------------------------------------------*)
+procedure TDragObjectCancelling_W(Self: TDragObject; const T: Boolean);
+begin Self.Cancelling := T; end;
+
+(*----------------------------------------------------------------------------*)
+procedure TDragObjectCancelling_R(Self: TDragObject; var T: Boolean);
+begin T := Self.Cancelling; end;
+{$ENDIF}
+(*----------------------------------------------------------------------------*)
+procedure RIRegister_TDragObject(CL: TPSRuntimeClassImporter);
+begin
+  with CL.Add(TDragObject) do
+  begin
+{$IFNDEF PS_MINIVCL}
+{$IFDEF DELPHI4UP}
+    RegisterVirtualMethod(@TDragObject.Assign, 'Assign');
+{$ENDIF}
+{$IFNDEF FPC}
+    RegisterVirtualMethod(@TDragObject.GetName, 'GetName');
+    RegisterVirtualMethod(@TDragObject.Instance, 'Instance');
+{$ENDIF}    
+    RegisterVirtualMethod(@TDragObject.HideDragImage, 'HideDragImage');
+    RegisterVirtualMethod(@TDragObject.ShowDragImage, 'ShowDragImage');
+{$IFDEF DELPHI4UP}
+    RegisterPropertyHelper(@TDragObjectCancelling_R,@TDragObjectCancelling_W,'Cancelling');
+    RegisterPropertyHelper(@TDragObjectDragHandle_R,@TDragObjectDragHandle_W,'DragHandle');
+    RegisterPropertyHelper(@TDragObjectDragPos_R,@TDragObjectDragPos_W,'DragPos');
+    RegisterPropertyHelper(@TDragObjectDragTargetPos_R,@TDragObjectDragTargetPos_W,'DragTargetPos');
+    RegisterPropertyHelper(@TDragObjectDragTarget_R,@TDragObjectDragTarget_W,'DragTarget');
+    RegisterPropertyHelper(@TDragObjectMouseDeltaX_R,nil,'MouseDeltaX');
+    RegisterPropertyHelper(@TDragObjectMouseDeltaY_R,nil,'MouseDeltaY');
+{$ENDIF}
+{$ENDIF}
+  end;
+end;
+
+
+procedure RIRegister_Controls(Cl: TPSRuntimeClassImporter);
+begin
+  RIRegisterTControl(Cl);
+  RIRegisterTWinControl(Cl);
+  RIRegisterTGraphicControl(cl);
+  RIRegisterTCustomControl(cl);
+  RIRegister_TDragObject(cl);
+
+end;
+
+// PS_MINIVCL changes by Martijn Laan (mlaan at wintax _dot_ nl)
+
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_dateutils.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_dateutils.pas
new file mode 100644
index 0000000..9c0fd5b
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_dateutils.pas	
@@ -0,0 +1,63 @@
+
+unit uPSR_dateutils;
+{$I PascalScript.inc}
+interface
+uses
+  SysUtils, uPSRuntime;
+
+
+
+procedure RegisterDateTimeLibrary_R(S: TPSExec);
+
+implementation
+
+function TryEncodeDate(Year, Month, Day: Word; var Date: TDateTime): Boolean;
+begin
+  try
+    Date := EncodeDate(Year, Month, Day);
+    Result := true;
+  except
+    Result := false;
+  end;
+end;
+
+function TryEncodeTime(Hour, Min, Sec, MSec: Word; var Time: TDateTime): Boolean;
+begin
+  try
+    Time := EncodeTime(hour, Min, Sec, MSec);
+    Result := true;
+  except
+    Result := false;
+  end;
+end;
+
+function DateTimeToUnix(D: TDateTime): Int64;
+begin
+  Result := Round((D - 25569) * 86400);
+end;
+
+function UnixToDateTime(U: Int64): TDateTime;
+begin
+  Result := U / 86400 + 25569;
+end;
+
+procedure RegisterDateTimeLibrary_R(S: TPSExec);
+begin
+  S.RegisterDelphiFunction(@EncodeDate, 'ENCODEDATE', cdRegister);
+  S.RegisterDelphiFunction(@EncodeTime, 'ENCODETIME', cdRegister);
+  S.RegisterDelphiFunction(@TryEncodeDate, 'TRYENCODEDATE', cdRegister);
+  S.RegisterDelphiFunction(@TryEncodeTime, 'TRYENCODETIME', cdRegister);
+  S.RegisterDelphiFunction(@DecodeDate, 'DECODEDATE', cdRegister);
+  S.RegisterDelphiFunction(@DecodeTime, 'DECODETIME', cdRegister);
+  S.RegisterDelphiFunction(@DayOfWeek, 'DAYOFWEEK', cdRegister);
+  S.RegisterDelphiFunction(@Date, 'DATE', cdRegister);
+  S.RegisterDelphiFunction(@Time, 'TIME', cdRegister);
+  S.RegisterDelphiFunction(@Now, 'NOW', cdRegister);
+  S.RegisterDelphiFunction(@DateTimeToUnix, 'DATETIMETOUNIX', cdRegister);
+  S.RegisterDelphiFunction(@UnixToDateTime, 'UNIXTODATETIME', cdRegister);
+  S.RegisterDelphiFunction(@DateToStr, 'DATETOSTR', cdRegister);
+  S.RegisterDelphiFunction(@FormatDateTime, 'FORMATDATETIME', cdRegister);
+  S.RegisterDelphiFunction(@StrToDate, 'STRTODATE', cdRegister);
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_dll.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_dll.pas
new file mode 100644
index 0000000..55d08a9
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_dll.pas	
@@ -0,0 +1,297 @@
+
+unit uPSR_dll;
+
+{$I PascalScript.inc}
+interface
+uses
+  uPSRuntime, uPSUtils;
+
+procedure RegisterDLLRuntime(Caller: TPSExec);
+procedure RegisterDLLRuntimeEx(Caller: TPSExec; AddDllProcImport: Boolean);
+
+function ProcessDllImport(Caller: TPSExec; P: TPSExternalProcRec): Boolean;
+function ProcessDllImportEx(Caller: TPSExec; P: TPSExternalProcRec; ForceDelayLoad: Boolean): Boolean;
+function UnloadProc(Caller: TPSExec; p: TPSExternalProcRec; Global, Stack: TPSStack): Boolean;
+
+implementation
+uses
+  {$IFDEF LINUX}
+  LibC{$IFNDEF FPC}, Windows{$ENDIF};
+  {$ELSE}
+  Windows;
+  {$ENDIF}
+
+{
+p^.Ext1 contains the pointer to the Proc function
+p^.ExportDecl:
+  'dll:'+DllName+#0+FunctionName+#0+chr(Cc)+Chr(DelayLoad)+VarParams
+}
+
+type
+  PLoadedDll = ^TLoadedDll;
+  TLoadedDll = record
+    dllnamehash: Longint;
+    dllname: tbtstring;
+    {$IFDEF LINUX}
+    dllhandle: Pointer;
+    {$ELSE}
+    dllhandle: THandle;
+    {$ENDIF}
+  end;
+  TMyExec = class(TPSExec);
+  PInteger = ^Integer;
+
+procedure LAstErrorFree(Sender: TPSExec; P: PInteger);
+begin
+  dispose(p);
+end;
+
+procedure DLLSetLastError(Sender: TPSExec; P: Integer);
+var
+  pz: PInteger;
+begin
+  pz := Sender.FindProcResource(@LastErrorFree);
+  if pz = nil then
+  begin
+    new(pz);
+    Sender.AddResource(@LastErrorFree, PZ);
+  end;
+  pz^ := p;
+end;
+
+function DLLGetLastError(Sender: TPSExec): Integer;
+var
+  pz: PInteger;
+begin
+  pz := Sender.FindProcResource(@LastErrorFree);
+  if pz = nil then
+    result := 0
+  else
+    result := pz^;
+end;
+
+
+procedure DllFree(Sender: TPSExec; P: PLoadedDll);
+begin
+  {$IFDEF LINUX}
+  dlclose(p^.dllhandle);
+  {$ELSE}
+  FreeLibrary(p^.dllhandle);
+  {$ENDIF}
+  Dispose(p);
+end;
+
+function LoadDll(Caller: TPSExec; P: TPSExternalProcRec): Boolean;
+var
+  s, s2: tbtstring;
+  h, i: Longint;
+  ph: PLoadedDll;
+  {$IFDEF LINUX}
+  dllhandle: Pointer;
+  {$ELSE}
+  dllhandle: THandle;
+  {$ENDIF}
+begin
+  s := p.Decl;
+  Delete(s, 1, 4);
+  s2 := copy(s, 1, pos(tbtchar(#0), s)-1);
+  delete(s, 1, length(s2)+1);
+  h := makehash(s2);
+  i := 2147483647; // maxint
+  dllhandle := 0;
+  repeat
+    ph := Caller.FindProcResource2(@dllFree, i);
+    if (ph = nil) then
+    begin
+      if s2 = '' then
+      begin
+        // don't pass an empty filename to LoadLibrary, just treat it as uncallable
+        p.Ext2 := Pointer(1);
+        Result := False;
+        exit;
+      end;
+      {$IFDEF LINUX}
+      dllhandle := dlopen(PChar(s2), RTLD_LAZY);
+      {$ELSE}
+      dllhandle := LoadLibraryA(PAnsiChar(AnsiString(s2)));
+      {$ENDIF}
+      if dllhandle = {$IFDEF LINUX}nil{$ELSE}0{$ENDIF}then
+      begin
+        p.Ext2 := Pointer(1);
+        Result := False;
+        exit;
+      end;
+      new(ph);
+      ph^.dllnamehash := h;
+      ph^.dllname := s2;
+      ph^.dllhandle := dllhandle;
+      Caller.AddResource(@DllFree, ph);
+    end;
+    if (ph^.dllnamehash = h) and (ph^.dllname = s2) then
+    begin
+      dllhandle := ph^.dllhandle;
+    end;
+  until dllhandle <> {$IFDEF LINUX}nil{$ELSE}0{$ENDIF};
+  {$IFDEF LINUX}
+  p.Ext1 := dlsym(dllhandle, pchar(copy(s, 1, pos(#0, s)-1)));
+  {$ELSE}
+  p.Ext1 := GetProcAddress(dllhandle, PAnsiChar(copy(s, 1, pos(tbtchar(#0), s)-1)));
+  {$ENDIF}
+  if p.Ext1 = nil then
+  begin
+    p.Ext2 := Pointer(1);
+    Result := false;
+    exit;
+  end;
+  Result := True;
+end;
+
+
+function DllProc(Caller: TPSExec; p: TPSExternalProcRec; Global, Stack: TPSStack): Boolean;
+
+var
+  i: Longint;
+  MyList: TIfList;
+  n: PPSVariantIFC;
+  CurrStack: Cardinal;
+  cc: TPSCallingConvention;
+  s: tbtstring;
+begin
+  if p.Ext2 <> nil then // error
+  begin
+    Result := false;
+    exit;
+  end;
+  if p.Ext1 = nil then
+  begin
+    if not LoadDll(Caller, P) then
+    begin
+      Result := false;
+      exit;
+    end;
+  end;
+  s := p.Decl;
+  delete(S, 1, pos(tbtchar(#0), s));
+  delete(S, 1, pos(tbtchar(#0), s));
+  if length(S) < 2 then
+  begin
+    Result := False;
+    exit;
+  end;
+  cc := TPSCallingConvention(s[1]);
+  delete(s, 1, 2); // cc + delayload (delayload might also be forced!)
+  CurrStack := Cardinal(Stack.Count) - Cardinal(length(s));
+  if s[1] = #0 then inc(CurrStack);
+  MyList := tIfList.Create;
+  for i := 2 to length(s) do
+  begin
+    MyList.Add(nil);
+  end;
+  for i := length(s) downto 2 do
+  begin
+    MyList[i - 2] := NewPPSVariantIFC(Stack[CurrStack], s[i] <> #0);
+    inc(CurrStack);
+  end;
+  if s[1] <> #0 then
+  begin
+    n := NewPPSVariantIFC(Stack[CurrStack], true);
+  end else n := nil;
+  try
+    TMYExec(Caller).InnerfuseCall(nil, p.Ext1, cc, MyList, n);
+    {$IFNDEF LINUX}
+    DLLSetLastError(Caller, GetLastError);
+    {$ENDIF}
+  finally
+    DisposePPSvariantIFC(n);
+    DisposePPSVariantIFCList(MyList);
+  end;
+  result := true;
+end;
+
+function ProcessDllImport(Caller: TPSExec; P: TPSExternalProcRec): Boolean;
+begin
+  Result := ProcessDllImportEx(Caller, P, False);
+end;
+
+function ProcessDllImportEx(Caller: TPSExec; P: TPSExternalProcRec; ForceDelayLoad: Boolean): Boolean;
+var
+  DelayLoad: Boolean;
+  s: tbtstring;
+begin
+  if not ForceDelayLoad then begin
+    s := p.Decl;
+    Delete(s,1,pos(tbtchar(#0), s));
+    Delete(s,1,pos(tbtchar(#0), s));
+    DelayLoad := bytebool(s[2]);
+  end else
+    DelayLoad := True;
+
+  if DelayLoad then begin
+    p.ProcPtr := DllProc;
+    Result := True;
+  end else begin
+    p.ProcPtr := DllProc;
+    Result := LoadDll(Caller, p);
+  end;
+end;
+
+
+function GetLastErrorProc(Caller: TPSExec; p: TPSExternalProcRec; Global, Stack: TPSStack): Boolean;
+begin
+  Stack.SetInt(-1, DLLGetLastError(Caller));
+  Result := true;
+end;
+
+function UnloadProc(Caller: TPSExec; p: TPSExternalProcRec; Global, Stack: TPSStack): Boolean;
+var
+  h, i: Longint;
+  pv: TPSProcRec;
+  ph: PLoadedDll;
+  sname, s: tbtstring;
+begin
+  sname := Stack.GetAnsiString(-1);
+  for i := Caller.GetProcCount -1 downto 0 do
+  begin
+    pv := Caller.GetProcNo(i);
+    if not (pv is TPSExternalProcRec) then continue;
+    if @TPSExternalProcRec(pv).ProcPtr <> @DllProc then continue;
+    s := (TPSExternalProcRec(pv).Decl);
+    delete(s,1,4);
+    if copy(s,1,pos(tbtchar(#0),s)-1) = sname then
+    begin
+      TPSExternalProcRec(pv).Ext1 := nil;
+    end;
+  end;
+  h := MakeHash(sname);
+  i := 2147483647; // maxint
+  repeat
+    ph := Caller.FindProcResource2(@dllFree, i);
+    if (ph = nil) then break;
+    if (ph.dllnamehash = h) and (ph.dllname = sname) then
+    begin
+      {$IFDEF LINUX}
+      dlclose(ph^.dllhandle);
+      {$ELSE}
+      FreeLibrary(ph^.dllhandle);
+      {$ENDIF}
+      Caller.DeleteResource(ph);
+      dispose(ph);
+    end;
+  until false;
+  result := true;
+end;
+
+procedure RegisterDLLRuntime(Caller: TPSExec);
+begin
+  RegisterDLLRuntimeEx(Caller, True);
+end;
+
+procedure RegisterDLLRuntimeEx(Caller: TPSExec; AddDllProcImport: Boolean);
+begin
+  if AddDllProcImport then
+    Caller.AddSpecialProcImport('dll', @ProcessDllImport, nil);
+  Caller.RegisterFunctionName('UNLOADDLL', UnloadProc, nil, nil);
+  Caller.RegisterFunctionName('DLLGETLASTERROR', GetLastErrorProc, nil, nil);
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_extctrls.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_extctrls.pas
new file mode 100644
index 0000000..0f4a129
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_extctrls.pas	
@@ -0,0 +1,150 @@
+
+unit uPSR_extctrls;
+
+{$I PascalScript.inc}
+interface
+uses
+  uPSRuntime, uPSUtils;
+
+
+procedure RIRegister_ExtCtrls(cl: TPSRuntimeClassImporter);
+
+procedure RIRegisterTSHAPE(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTIMAGE(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTPAINTBOX(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTBEVEL(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTTIMER(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTCUSTOMPANEL(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTPANEL(Cl: TPSRuntimeClassImporter);
+{$IFNDEF CLX}
+procedure RIRegisterTPAGE(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTNOTEBOOK(Cl: TPSRuntimeClassImporter);
+{$IFNDEF FPC}procedure RIRegisterTHEADER(Cl: TPSRuntimeClassImporter);{$ENDIF}
+{$ENDIF}
+procedure RIRegisterTCUSTOMRADIOGROUP(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTRADIOGROUP(Cl: TPSRuntimeClassImporter);
+
+implementation
+
+uses
+  {$IFDEF CLX}
+  QExtCtrls, QGraphics;
+  {$ELSE}
+  ExtCtrls, Graphics;
+  {$ENDIF}
+
+procedure RIRegisterTSHAPE(Cl: TPSRuntimeClassImporter);
+begin
+  with Cl.Add(TSHAPE) do
+  begin
+    {$IFNDEF PS_MINIVCL}
+    RegisterMethod(@TSHAPE.STYLECHANGED, 'STYLECHANGED');
+    {$ENDIF}
+  end;
+end;
+
+procedure TIMAGECANVAS_R(Self: TIMAGE; var T: TCANVAS); begin T := Self.CANVAS; end;
+
+procedure RIRegisterTIMAGE(Cl: TPSRuntimeClassImporter);
+begin
+  with Cl.Add(TIMAGE) do
+  begin
+    RegisterPropertyHelper(@TIMAGECANVAS_R, nil, 'CANVAS');
+  end;
+end;
+
+procedure TPAINTBOXCANVAS_R(Self: TPAINTBOX; var T: TCanvas); begin T := Self.CANVAS; end;
+
+procedure RIRegisterTPAINTBOX(Cl: TPSRuntimeClassImporter);
+begin
+  with Cl.Add(TPAINTBOX) do
+  begin
+    RegisterPropertyHelper(@TPAINTBOXCANVAS_R, nil, 'CANVAS');
+  end;
+end;
+
+procedure RIRegisterTBEVEL(Cl: TPSRuntimeClassImporter);
+begin
+  Cl.Add(TBEVEL);
+end;
+
+procedure RIRegisterTTIMER(Cl: TPSRuntimeClassImporter);
+begin
+  Cl.Add(TTIMER);
+end;
+
+procedure RIRegisterTCUSTOMPANEL(Cl: TPSRuntimeClassImporter);
+begin
+  Cl.Add(TCUSTOMPANEL);
+end;
+
+procedure RIRegisterTPANEL(Cl: TPSRuntimeClassImporter);
+begin
+  Cl.Add(TPANEL);
+end;
+{$IFNDEF CLX}
+procedure RIRegisterTPAGE(Cl: TPSRuntimeClassImporter);
+begin
+  Cl.Add(TPAGE);
+end;
+
+procedure RIRegisterTNOTEBOOK(Cl: TPSRuntimeClassImporter);
+begin
+  Cl.Add(TNOTEBOOK);
+end;
+
+{$IFNDEF FPC}
+procedure THEADERSECTIONWIDTH_R(Self: THEADER; var T: INTEGER; t1: INTEGER); begin T := Self.SECTIONWIDTH[t1]; end;
+procedure THEADERSECTIONWIDTH_W(Self: THEADER; T: INTEGER; t1: INTEGER); begin Self.SECTIONWIDTH[t1] := T; end;
+
+procedure RIRegisterTHEADER(Cl: TPSRuntimeClassImporter);
+begin
+	with Cl.Add(THEADER) do
+	begin
+		RegisterPropertyHelper(@THEADERSECTIONWIDTH_R, @THEADERSECTIONWIDTH_W, 'SECTIONWIDTH');
+	end;
+end;
+{$ENDIF}
+{$ENDIF}
+
+procedure RIRegisterTCUSTOMRADIOGROUP(Cl: TPSRuntimeClassImporter);
+begin
+  Cl.Add(TCUSTOMRADIOGROUP);
+end;
+
+procedure RIRegisterTRADIOGROUP(Cl: TPSRuntimeClassImporter);
+begin
+  Cl.Add(TRADIOGROUP);
+end;
+
+procedure RIRegister_ExtCtrls(cl: TPSRuntimeClassImporter);
+begin
+  {$IFNDEF PS_MINIVCL}
+  RIRegisterTSHAPE(Cl);
+  RIRegisterTIMAGE(Cl);
+  RIRegisterTPAINTBOX(Cl);
+  {$ENDIF}
+  RIRegisterTBEVEL(Cl);
+  {$IFNDEF PS_MINIVCL}
+  RIRegisterTTIMER(Cl);
+  {$ENDIF}
+  RIRegisterTCUSTOMPANEL(Cl);
+{$IFNDEF CLX}
+  RIRegisterTPANEL(Cl);
+{$ENDIF}
+  {$IFNDEF PS_MINIVCL}
+{$IFNDEF CLX}
+  RIRegisterTPAGE(Cl);
+	RIRegisterTNOTEBOOK(Cl);
+ {$IFNDEF FPC}
+	RIRegisterTHEADER(Cl);
+ {$ENDIF}{FPC}
+{$ENDIF}
+  RIRegisterTCUSTOMRADIOGROUP(Cl);
+  RIRegisterTRADIOGROUP(Cl);
+  {$ENDIF}
+end;
+
+end.
+
+
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_forms.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_forms.pas
new file mode 100644
index 0000000..4a0f8f7
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_forms.pas	
@@ -0,0 +1,264 @@
+
+unit uPSR_forms;
+
+{$I PascalScript.inc}
+interface
+uses
+  uPSRuntime, uPSUtils;
+
+procedure RIRegisterTCONTROLSCROLLBAR(Cl: TPSRuntimeClassImporter);
+{$IFNDEF FPC} procedure RIRegisterTSCROLLINGWINCONTROL(Cl: TPSRuntimeClassImporter);{$ENDIF}
+procedure RIRegisterTSCROLLBOX(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTFORM(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTAPPLICATION(Cl: TPSRuntimeClassImporter);
+
+procedure RIRegister_Forms(Cl: TPSRuntimeClassImporter);
+
+implementation
+uses
+  sysutils, classes, {$IFDEF CLX}QControls, QForms, QGraphics{$ELSE}Controls, Forms, Graphics{$ENDIF};
+
+procedure TCONTROLSCROLLBARKIND_R(Self: TCONTROLSCROLLBAR; var T: TSCROLLBARKIND); begin T := Self.KIND; end;
+procedure TCONTROLSCROLLBARSCROLLPOS_R(Self: TCONTROLSCROLLBAR; var T: INTEGER); begin t := Self.SCROLLPOS; end;
+
+procedure RIRegisterTCONTROLSCROLLBAR(Cl: TPSRuntimeClassImporter);
+begin
+  with Cl.Add(TCONTROLSCROLLBAR) do
+  begin
+    RegisterPropertyHelper(@TCONTROLSCROLLBARKIND_R, nil, 'KIND');
+    RegisterPropertyHelper(@TCONTROLSCROLLBARSCROLLPOS_R, nil, 'SCROLLPOS');
+  end;
+end;
+
+{$IFNDEF FPC}
+procedure RIRegisterTSCROLLINGWINCONTROL(Cl: TPSRuntimeClassImporter);
+begin
+  with Cl.Add(TSCROLLINGWINCONTROL) do
+  begin
+    RegisterMethod(@TSCROLLINGWINCONTROL.SCROLLINVIEW, 'SCROLLINVIEW');
+  end;
+end;
+{$ENDIF}
+
+procedure RIRegisterTSCROLLBOX(Cl: TPSRuntimeClassImporter);
+begin
+  Cl.Add(TSCROLLBOX);
+end;
+{$IFNDEF FPC}
+{$IFNDEF CLX}
+procedure TFORMACTIVEOLECONTROL_W(Self: TFORM; T: TWINCONTROL); begin Self.ACTIVEOLECONTROL := T; end;
+procedure TFORMACTIVEOLECONTROL_R(Self: TFORM; var T: TWINCONTROL); begin T := Self.ACTIVEOLECONTROL; 
+end;
+procedure TFORMTILEMODE_W(Self: TFORM; T: TTILEMODE); begin Self.TILEMODE := T; end;
+procedure TFORMTILEMODE_R(Self: TFORM; var T: TTILEMODE); begin T := Self.TILEMODE; end;
+{$ENDIF}{CLX}
+procedure TFORMACTIVEMDICHILD_R(Self: TFORM; var T: TFORM); begin T := Self.ACTIVEMDICHILD; end;
+procedure TFORMDROPTARGET_W(Self: TFORM; T: BOOLEAN); begin Self.DROPTARGET := T; end;
+procedure TFORMDROPTARGET_R(Self: TFORM; var T: BOOLEAN); begin T := Self.DROPTARGET; end;
+procedure TFORMMDICHILDCOUNT_R(Self: TFORM; var T: INTEGER); begin T := Self.MDICHILDCOUNT; end;
+procedure TFORMMDICHILDREN_R(Self: TFORM; var T: TFORM; t1: INTEGER); begin T := Self.MDICHILDREN[T1]; 
+end;
+{$ENDIF}{FPC}
+
+procedure TFORMMODALRESULT_W(Self: TFORM; T: TMODALRESULT); begin Self.MODALRESULT := T; end;
+procedure TFORMMODALRESULT_R(Self: TFORM; var T: TMODALRESULT); begin T := Self.MODALRESULT; end;
+procedure TFORMACTIVE_R(Self: TFORM; var T: BOOLEAN); begin T := Self.ACTIVE; end;
+procedure TFORMCANVAS_R(Self: TFORM; var T: TCANVAS); begin T := Self.CANVAS; end;
+{$IFNDEF CLX}
+procedure TFORMCLIENTHANDLE_R(Self: TFORM; var T: Longint); begin T := Self.CLIENTHANDLE; end;
+{$ENDIF}
+
+{ Innerfuse Pascal Script Class Import Utility (runtime) }
+
+procedure RIRegisterTFORM(Cl: TPSRuntimeClassImporter);
+begin
+  with Cl.Add(TFORM) do
+  begin
+    {$IFDEF DELPHI4UP}
+    RegisterVirtualConstructor(@TFORM.CREATENEW, 'CREATENEW');
+    {$ELSE}
+    RegisterConstructor(@TFORM.CREATENEW, 'CREATENEW');
+    {$ENDIF}
+    RegisterMethod(@TFORM.CLOSE, 'CLOSE');
+    RegisterMethod(@TFORM.HIDE, 'HIDE');
+    RegisterMethod(@TFORM.SHOW, 'SHOW');
+    RegisterMethod(@TFORM.SHOWMODAL, 'SHOWMODAL');
+    RegisterMethod(@TFORM.RELEASE, 'RELEASE');
+    RegisterPropertyHelper(@TFORMACTIVE_R, nil, 'ACTIVE');
+
+    {$IFNDEF PS_MINIVCL}
+ {$IFNDEF FPC}
+{$IFNDEF CLX} 
+    RegisterMethod(@TFORM.ARRANGEICONS, 'ARRANGEICONS');
+    RegisterMethod(@TFORM.GETFORMIMAGE, 'GETFORMIMAGE');
+    RegisterMethod(@TFORM.PRINT, 'PRINT');
+    RegisterMethod(@TFORM.SENDCANCELMODE, 'SENDCANCELMODE');
+    RegisterPropertyHelper(@TFORMACTIVEOLECONTROL_R, @TFORMACTIVEOLECONTROL_W, 'ACTIVEOLECONTROL');
+    RegisterPropertyHelper(@TFORMCLIENTHANDLE_R, nil, 'CLIENTHANDLE');
+    RegisterPropertyHelper(@TFORMTILEMODE_R, @TFORMTILEMODE_W, 'TILEMODE');
+{$ENDIF}{CLX}
+    RegisterMethod(@TFORM.CASCADE, 'CASCADE');
+    RegisterMethod(@TFORM.NEXT, 'NEXT');
+    RegisterMethod(@TFORM.PREVIOUS, 'PREVIOUS');
+    RegisterMethod(@TFORM.TILE, 'TILE');
+    RegisterPropertyHelper(@TFORMACTIVEMDICHILD_R, nil, 'ACTIVEMDICHILD');
+    RegisterPropertyHelper(@TFORMDROPTARGET_R, @TFORMDROPTARGET_W, 'DROPTARGET');
+    RegisterPropertyHelper(@TFORMMDICHILDCOUNT_R, nil, 'MDICHILDCOUNT');
+    RegisterPropertyHelper(@TFORMMDICHILDREN_R, nil, 'MDICHILDREN');
+ {$ENDIF}{FPC}
+    RegisterMethod(@TFORM.CLOSEQUERY, 'CLOSEQUERY');
+    RegisterMethod(@TFORM.DEFOCUSCONTROL, 'DEFOCUSCONTROL');
+    RegisterMethod(@TFORM.FOCUSCONTROL, 'FOCUSCONTROL');
+    RegisterMethod(@TFORM.SETFOCUSEDCONTROL, 'SETFOCUSEDCONTROL');
+    RegisterPropertyHelper(@TFORMCANVAS_R, nil, 'CANVAS');
+    RegisterPropertyHelper(@TFORMMODALRESULT_R, @TFORMMODALRESULT_W, 'MODALRESULT');
+    {$ENDIF}{PS_MINIVCL}
+  end;
+end;
+
+ {$IFNDEF FPC}
+procedure TAPPLICATIONACTIVE_R(Self: TAPPLICATION; var T: BOOLEAN); begin T := Self.ACTIVE; end;
+{$IFNDEF CLX}
+procedure TAPPLICATIONDIALOGHANDLE_R(Self: TAPPLICATION; var T: Longint); begin T := Self.DIALOGHANDLE; end;
+procedure TAPPLICATIONDIALOGHANDLE_W(Self: TAPPLICATION; T: Longint); begin Self.DIALOGHANDLE := T; end;
+procedure TAPPLICATIONHANDLE_R(Self: TAPPLICATION; var T: Longint); begin T := Self.HANDLE; end;
+procedure TAPPLICATIONHANDLE_W(Self: TAPPLICATION; T: Longint); begin Self.HANDLE := T; end;
+procedure TAPPLICATIONUPDATEFORMATSETTINGS_R(Self: TAPPLICATION; var T: BOOLEAN); begin T := Self.UPDATEFORMATSETTINGS; end;
+procedure TAPPLICATIONUPDATEFORMATSETTINGS_W(Self: TAPPLICATION; T: BOOLEAN); begin Self.UPDATEFORMATSETTINGS := T; end;
+{$ENDIF}
+{$ENDIF}{FPC}
+
+
+procedure TAPPLICATIONEXENAME_R(Self: TAPPLICATION; var T: STRING); begin T := Self.EXENAME; end;
+procedure TAPPLICATIONHELPFILE_R(Self: TAPPLICATION; var T: STRING); begin T := Self.HELPFILE; end;
+procedure TAPPLICATIONHELPFILE_W(Self: TAPPLICATION; T: STRING); begin Self.HELPFILE := T; end;
+procedure TAPPLICATIONHINT_R(Self: TAPPLICATION; var T: STRING); begin T := Self.HINT; end;
+procedure TAPPLICATIONHINT_W(Self: TAPPLICATION; T: STRING); begin Self.HINT := T; end;
+procedure TAPPLICATIONHINTCOLOR_R(Self: TAPPLICATION; var T: TCOLOR); begin T := Self.HINTCOLOR; end;
+procedure TAPPLICATIONHINTCOLOR_W(Self: TAPPLICATION; T: TCOLOR); begin Self.HINTCOLOR := T; end;
+procedure TAPPLICATIONHINTPAUSE_R(Self: TAPPLICATION; var T: INTEGER); begin T := Self.HINTPAUSE; end;
+procedure TAPPLICATIONHINTPAUSE_W(Self: TAPPLICATION; T: INTEGER); begin Self.HINTPAUSE := T; end;
+procedure TAPPLICATIONHINTSHORTPAUSE_R(Self: TAPPLICATION; var T: INTEGER); begin T := Self.HINTSHORTPAUSE; end;
+procedure TAPPLICATIONHINTSHORTPAUSE_W(Self: TAPPLICATION; T: INTEGER); begin Self.HINTSHORTPAUSE := T; end;
+procedure TAPPLICATIONHINTHIDEPAUSE_R(Self: TAPPLICATION; var T: INTEGER); begin T := Self.HINTHIDEPAUSE; end;
+procedure TAPPLICATIONHINTHIDEPAUSE_W(Self: TAPPLICATION; T: INTEGER); begin Self.HINTHIDEPAUSE := T; end;
+procedure TAPPLICATIONMAINFORM_R(Self: TAPPLICATION; var T: {$IFDEF DELPHI3UP}TCustomForm{$ELSE}TFORM{$ENDIF}); begin T := Self.MAINFORM; end;
+procedure TAPPLICATIONSHOWHINT_R(Self: TAPPLICATION; var T: BOOLEAN); begin T := Self.SHOWHINT; end;
+procedure TAPPLICATIONSHOWHINT_W(Self: TAPPLICATION; T: BOOLEAN); begin Self.SHOWHINT := T; end;
+procedure TAPPLICATIONSHOWMAINFORM_R(Self: TAPPLICATION; var T: BOOLEAN); begin T := Self.SHOWMAINFORM; end;
+procedure TAPPLICATIONSHOWMAINFORM_W(Self: TAPPLICATION; T: BOOLEAN); begin Self.SHOWMAINFORM := T; end;
+procedure TAPPLICATIONTERMINATED_R(Self: TAPPLICATION; var T: BOOLEAN); begin T := Self.TERMINATED; end;
+procedure TAPPLICATIONTITLE_R(Self: TAPPLICATION; var T: STRING); begin T := Self.TITLE; end;
+procedure TAPPLICATIONTITLE_W(Self: TAPPLICATION; T: STRING); begin Self.TITLE := T; end;
+
+{$IFNDEF FPC}
+procedure TAPPLICATIONONACTIVATE_R(Self: TAPPLICATION; var T: TNOTIFYEVENT); begin T := Self.ONACTIVATE; end;
+procedure TAPPLICATIONONACTIVATE_W(Self: TAPPLICATION; T: TNOTIFYEVENT); begin Self.ONACTIVATE := T; end;
+procedure TAPPLICATIONONDEACTIVATE_R(Self: TAPPLICATION; var T: TNOTIFYEVENT); begin T := Self.ONDEACTIVATE; end;
+procedure TAPPLICATIONONDEACTIVATE_W(Self: TAPPLICATION; T: TNOTIFYEVENT); begin Self.ONDEACTIVATE := T; end;
+{$ENDIF}
+
+procedure TAPPLICATIONONIDLE_R(Self: TAPPLICATION; var T: TIDLEEVENT); begin T := Self.ONIDLE; end;
+procedure TAPPLICATIONONIDLE_W(Self: TAPPLICATION; T: TIDLEEVENT); begin Self.ONIDLE := T; end;
+procedure TAPPLICATIONONHELP_R(Self: TAPPLICATION; var T: THELPEVENT); begin T := Self.ONHELP; end;
+procedure TAPPLICATIONONHELP_W(Self: TAPPLICATION; T: THELPEVENT); begin Self.ONHELP := T; end;
+procedure TAPPLICATIONONHINT_R(Self: TAPPLICATION; var T: TNOTIFYEVENT); begin T := Self.ONHINT; end;
+procedure TAPPLICATIONONHINT_W(Self: TAPPLICATION; T: TNOTIFYEVENT); begin Self.ONHINT := T; end;
+
+{$IFNDEF FPC}
+procedure TAPPLICATIONONMINIMIZE_R(Self: TAPPLICATION; var T: TNOTIFYEVENT); begin T := Self.ONMINIMIZE; end;
+procedure TAPPLICATIONONMINIMIZE_W(Self: TAPPLICATION; T: TNOTIFYEVENT); begin Self.ONMINIMIZE := T; end;
+
+procedure TAPPLICATIONONRESTORE_R(Self: TAPPLICATION; var T: TNOTIFYEVENT); begin T := Self.ONRESTORE; end;
+procedure TAPPLICATIONONRESTORE_W(Self: TAPPLICATION; T: TNOTIFYEVENT); begin Self.ONRESTORE := T; end;
+{$ENDIF}
+
+procedure RIRegisterTAPPLICATION(Cl: TPSRuntimeClassImporter);
+begin
+  with Cl.Add(TAPPLICATION) do
+  begin
+ {$IFNDEF FPC}
+    RegisterMethod(@TAPPLICATION.MINIMIZE, 'MINIMIZE');
+    RegisterMethod(@TAPPLICATION.RESTORE, 'RESTORE');
+    RegisterPropertyHelper(@TAPPLICATIONACTIVE_R, nil, 'ACTIVE');
+    RegisterPropertyHelper(@TAPPLICATIONONACTIVATE_R, @TAPPLICATIONONACTIVATE_W, 'ONACTIVATE');
+    RegisterPropertyHelper(@TAPPLICATIONONDEACTIVATE_R, @TAPPLICATIONONDEACTIVATE_W, 'ONDEACTIVATE');
+    RegisterPropertyHelper(@TAPPLICATIONONMINIMIZE_R, @TAPPLICATIONONMINIMIZE_W, 'ONMINIMIZE');
+    RegisterPropertyHelper(@TAPPLICATIONONRESTORE_R, @TAPPLICATIONONRESTORE_W, 'ONRESTORE');
+    RegisterPropertyHelper(@TAPPLICATIONDIALOGHANDLE_R, @TAPPLICATIONDIALOGHANDLE_W, 'DIALOGHANDLE');
+    RegisterMethod(@TAPPLICATION.CREATEHANDLE, 'CREATEHANDLE');
+    RegisterMethod(@TAPPLICATION.NORMALIZETOPMOSTS, 'NORMALIZETOPMOSTS');
+    RegisterMethod(@TAPPLICATION.RESTORETOPMOSTS, 'RESTORETOPMOSTS');
+    {$IFNDEF CLX}
+    RegisterPropertyHelper(@TAPPLICATIONHANDLE_R, @TAPPLICATIONHANDLE_W, 'HANDLE');
+    RegisterPropertyHelper(@TAPPLICATIONUPDATEFORMATSETTINGS_R, @TAPPLICATIONUPDATEFORMATSETTINGS_W, 'UPDATEFORMATSETTINGS');
+    {$ENDIF}
+ {$ENDIF}
+    RegisterMethod(@TAPPLICATION.BRINGTOFRONT, 'BRINGTOFRONT');
+    RegisterMethod(@TAPPLICATION.MESSAGEBOX, 'MESSAGEBOX');
+    RegisterMethod(@TAPPLICATION.PROCESSMESSAGES, 'PROCESSMESSAGES');
+    RegisterMethod(@TAPPLICATION.TERMINATE, 'TERMINATE');
+    RegisterPropertyHelper(@TAPPLICATIONEXENAME_R, nil, 'EXENAME');
+    RegisterPropertyHelper(@TAPPLICATIONHINT_R, @TAPPLICATIONHINT_W, 'HINT');
+    RegisterPropertyHelper(@TAPPLICATIONMAINFORM_R, nil, 'MAINFORM');
+    RegisterPropertyHelper(@TAPPLICATIONSHOWHINT_R, @TAPPLICATIONSHOWHINT_W, 'SHOWHINT');
+    RegisterPropertyHelper(@TAPPLICATIONSHOWMAINFORM_R, @TAPPLICATIONSHOWMAINFORM_W, 'SHOWMAINFORM');
+    RegisterPropertyHelper(@TAPPLICATIONTERMINATED_R, nil, 'TERMINATED');
+    RegisterPropertyHelper(@TAPPLICATIONTITLE_R, @TAPPLICATIONTITLE_W, 'TITLE');
+    RegisterPropertyHelper(@TAPPLICATIONONIDLE_R, @TAPPLICATIONONIDLE_W, 'ONIDLE');
+    RegisterPropertyHelper(@TAPPLICATIONONHINT_R, @TAPPLICATIONONHINT_W, 'ONHINT');
+    {$IFNDEF PS_MINIVCL}
+    RegisterMethod(@TAPPLICATION.CONTROLDESTROYED, 'CONTROLDESTROYED');
+    RegisterMethod(@TAPPLICATION.CANCELHINT, 'CANCELHINT');
+    {$IFNDEF CLX}
+    {$IFNDEF FPC}
+    RegisterMethod(@TAPPLICATION.HELPCOMMAND, 'HELPCOMMAND');
+    {$ENDIF}
+    RegisterMethod(@TAPPLICATION.HELPCONTEXT, 'HELPCONTEXT');
+    {$IFNDEF FPC}
+    RegisterMethod(@TAPPLICATION.HELPJUMP, 'HELPJUMP');
+    {$ENDIF}
+    {$ENDIF}
+//    RegisterMethod(@TAPPLICATION.HANDLEEXCEPTION, 'HANDLEEXCEPTION');
+//    RegisterMethod(@TAPPLICATION.HOOKMAINWINDOW, 'HOOKMAINWINDOW');
+//    RegisterMethod(@TAPPLICATION.UNHOOKMAINWINDOW, 'UNHOOKMAINWINDOW');
+
+    RegisterMethod(@TAPPLICATION.HANDLEMESSAGE, 'HANDLEMESSAGE');
+    RegisterMethod(@TAPPLICATION.HIDEHINT, 'HIDEHINT');
+    RegisterMethod(@TAPPLICATION.HINTMOUSEMESSAGE, 'HINTMOUSEMESSAGE');
+    RegisterMethod(@TAPPLICATION.INITIALIZE, 'INITIALIZE');
+    RegisterMethod(@TAPPLICATION.RUN, 'RUN');
+//    RegisterMethod(@TAPPLICATION.SHOWEXCEPTION, 'SHOWEXCEPTION');
+    RegisterPropertyHelper(@TAPPLICATIONHELPFILE_R, @TAPPLICATIONHELPFILE_W, 'HELPFILE');
+    RegisterPropertyHelper(@TAPPLICATIONHINTCOLOR_R, @TAPPLICATIONHINTCOLOR_W, 'HINTCOLOR');
+    RegisterPropertyHelper(@TAPPLICATIONHINTPAUSE_R, @TAPPLICATIONHINTPAUSE_W, 'HINTPAUSE');
+    RegisterPropertyHelper(@TAPPLICATIONHINTSHORTPAUSE_R, @TAPPLICATIONHINTSHORTPAUSE_W, 'HINTSHORTPAUSE');
+    RegisterPropertyHelper(@TAPPLICATIONHINTHIDEPAUSE_R, @TAPPLICATIONHINTHIDEPAUSE_W, 'HINTHIDEPAUSE');
+    RegisterPropertyHelper(@TAPPLICATIONONHELP_R, @TAPPLICATIONONHELP_W, 'ONHELP');
+    {$ENDIF}
+  end;
+end;
+
+procedure RIRegister_Forms(Cl: TPSRuntimeClassImporter);
+begin
+  {$IFNDEF PS_MINIVCL}
+  RIRegisterTCONTROLSCROLLBAR(cl);
+  RIRegisterTSCROLLBOX(cl);
+  {$ENDIF}
+{$IFNDEF FPC}  RIRegisterTScrollingWinControl(cl);{$ENDIF}
+  RIRegisterTForm(Cl);
+  {$IFNDEF PS_MINIVCL}
+  RIRegisterTApplication(Cl);
+  {$ENDIF}
+end;
+
+
+// PS_MINIVCL changes by Martijn Laan (mlaan at wintax _dot_ nl)
+// FPC changes by Boguslaw brandys (brandys at o2 _dot_ pl)
+
+end.
+
+
+
+
+
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_graphics.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_graphics.pas
new file mode 100644
index 0000000..7a7643a
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_graphics.pas	
@@ -0,0 +1,218 @@
+
+unit uPSR_graphics;
+{$I PascalScript.inc}
+interface
+uses
+  uPSRuntime, uPSUtils;
+
+
+
+procedure RIRegisterTGRAPHICSOBJECT(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTFont(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTPEN(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTBRUSH(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTCanvas(cl: TPSRuntimeClassImporter);
+procedure RIRegisterTGraphic(CL: TPSRuntimeClassImporter);
+procedure RIRegisterTBitmap(CL: TPSRuntimeClassImporter; Streams: Boolean);
+
+procedure RIRegister_Graphics(Cl: TPSRuntimeClassImporter; Streams: Boolean);
+
+implementation
+{$IFNDEF FPC}
+uses
+  Classes{$IFDEF CLX}, QGraphics{$ELSE}, Windows, Graphics{$ENDIF};
+{$ELSE}
+uses
+  Classes, Graphics,LCLType;
+{$ENDIF}
+
+{$IFNDEF CLX}
+procedure TFontHandleR(Self: TFont; var T: Longint); begin T := Self.Handle; end;
+procedure TFontHandleW(Self: TFont; T: Longint); begin Self.Handle := T; end;
+{$ENDIF}
+procedure TFontPixelsPerInchR(Self: TFont; var T: Longint); begin T := Self.PixelsPerInch; end;
+procedure TFontPixelsPerInchW(Self: TFont; T: Longint); begin {$IFNDEF FPC} Self.PixelsPerInch := T;{$ENDIF} end;
+procedure TFontStyleR(Self: TFont; var T: TFontStyles); begin T := Self.Style; end;
+procedure TFontStyleW(Self: TFont; T: TFontStyles); begin Self.Style:= T; end;
+
+procedure RIRegisterTFont(Cl: TPSRuntimeClassImporter);
+begin
+  with Cl.Add(TFont) do
+  begin
+    RegisterConstructor(@TFont.Create, 'CREATE');
+{$IFNDEF CLX}
+    RegisterPropertyHelper(@TFontHandleR, @TFontHandleW, 'HANDLE');
+{$ENDIF}
+    RegisterPropertyHelper(@TFontPixelsPerInchR, @TFontPixelsPerInchW, 'PIXELSPERINCH');
+    RegisterPropertyHelper(@TFontStyleR, @TFontStyleW, 'STYLE');
+  end;
+end;
+{$IFNDEF CLX}
+procedure TCanvasHandleR(Self: TCanvas; var T: Longint); begin T := Self.Handle; end;
+procedure TCanvasHandleW(Self: TCanvas; T: Longint); begin Self.Handle:= T; end;
+{$ENDIF}
+
+procedure TCanvasPixelsR(Self: TCanvas; var T: Longint; X,Y: Longint); begin T := Self.Pixels[X,Y]; end;
+procedure TCanvasPixelsW(Self: TCanvas; T, X, Y: Longint); begin Self.Pixels[X,Y]:= T; end;
+
+procedure RIRegisterTCanvas(cl: TPSRuntimeClassImporter); // requires TPersistent
+begin
+  with Cl.Add(TCanvas) do
+  begin
+{$IFNDEF FPC}
+    RegisterMethod(@TCanvas.Arc, 'ARC');
+    RegisterMethod(@TCanvas.Chord, 'CHORD');
+    RegisterMethod(@TCanvas.Rectangle, 'RECTANGLE');
+    RegisterMethod(@TCanvas.RoundRect, 'ROUNDRECT');
+    RegisterMethod(@TCanvas.Ellipse, 'ELLIPSE');
+    RegisterMethod(@TCanvas.FillRect, 'FILLRECT');
+{$ENDIF}
+    RegisterMethod(@TCanvas.Draw, 'DRAW');
+{$IFNDEF CLX}
+    RegisterMethod(@TCanvas.FloodFill, 'FLOODFILL');
+{$ENDIF}
+    RegisterMethod(@TCanvas.Lineto, 'LINETO');
+    RegisterMethod(@TCanvas.Moveto, 'MOVETO');
+    RegisterMethod(@TCanvas.Pie, 'PIE');
+    RegisterMethod(@TCanvas.Refresh, 'REFRESH');
+    RegisterMethod(@TCanvas.TextHeight, 'TEXTHEIGHT');
+    RegisterMethod(@TCanvas.TextOut, 'TEXTOUT');
+    RegisterMethod(@TCanvas.TextWidth, 'TEXTWIDTH');
+{$IFNDEF CLX}
+    RegisterPropertyHelper(@TCanvasHandleR, @TCanvasHandleW, 'HANDLE');
+{$ENDIF}
+    RegisterPropertyHelper(@TCanvasPixelsR, @TCanvasPixelsW, 'PIXELS');
+  end;
+end;
+
+
+procedure TGRAPHICSOBJECTONCHANGE_W(Self: TGraphicsObject; T: TNotifyEvent); begin Self.OnChange := t; end;
+procedure TGRAPHICSOBJECTONCHANGE_R(Self: TGraphicsObject; var T: TNotifyEvent); begin T :=Self.OnChange; end;
+
+
+procedure RIRegisterTGRAPHICSOBJECT(Cl: TPSRuntimeClassImporter);
+begin
+  with Cl.Add(TGRAPHICSOBJECT) do
+  begin
+    RegisterPropertyHelper(@TGRAPHICSOBJECTONCHANGE_R, @TGRAPHICSOBJECTONCHANGE_W, 'ONCHANGE');
+  end;
+end;
+
+procedure RIRegisterTPEN(Cl: TPSRuntimeClassImporter);
+begin
+  with Cl.Add(TPEN) do
+  begin
+    RegisterConstructor(@TPEN.CREATE, 'CREATE');
+  end;
+end;
+
+procedure RIRegisterTBRUSH(Cl: TPSRuntimeClassImporter);
+begin
+  with Cl.Add(TBRUSH) do
+  begin
+    RegisterConstructor(@TBRUSH.CREATE, 'CREATE');
+  end;
+end;
+
+procedure TGraphicOnChange_W(Self: TGraphic; const T: TNotifyEvent); begin Self.OnChange := T; end;
+procedure TGraphicOnChange_R(Self: TGraphic; var T: TNotifyEvent); begin T := Self.OnChange; end;
+procedure TGraphicWidth_W(Self: TGraphic; const T: Integer); begin Self.Width := T; end;
+procedure TGraphicWidth_R(Self: TGraphic; var T: Integer); begin T := Self.Width; end;
+procedure TGraphicModified_W(Self: TGraphic; const T: Boolean); begin Self.Modified := T; end;
+procedure TGraphicModified_R(Self: TGraphic; var T: Boolean); begin T := Self.Modified; end;
+procedure TGraphicHeight_W(Self: TGraphic; const T: Integer); begin Self.Height := T; end;
+procedure TGraphicHeight_R(Self: TGraphic; var T: Integer); begin T := Self.Height; end;
+procedure TGraphicEmpty_R(Self: TGraphic; var T: Boolean); begin T := Self.Empty; end;
+
+procedure RIRegisterTGraphic(CL: TPSRuntimeClassImporter);
+begin
+  with CL.Add(TGraphic) do
+  begin
+    RegisterVirtualConstructor(@TGraphic.Create, 'Create');
+    RegisterVirtualMethod(@TGraphic.LoadFromFile, 'LoadFromFile');
+    RegisterVirtualMethod(@TGraphic.SaveToFile, 'SaveToFile');
+    RegisterPropertyHelper(@TGraphicEmpty_R,nil,'Empty');
+    RegisterPropertyHelper(@TGraphicHeight_R,@TGraphicHeight_W,'Height');
+    RegisterPropertyHelper(@TGraphicWidth_R,@TGraphicWidth_W,'Width');
+    RegisterPropertyHelper(@TGraphicOnChange_R,@TGraphicOnChange_W,'OnChange');
+
+    {$IFNDEF PS_MINIVCL}
+    RegisterPropertyHelper(@TGraphicModified_R,@TGraphicModified_W,'Modified');
+    {$ENDIF}
+  end;
+end;
+
+procedure TBitmapTransparentColor_R(Self: TBitmap; var T: TColor); begin T := Self.TransparentColor; end;
+{$IFNDEF CLX}
+{$IFNDEF FPC}
+procedure TBitmapIgnorePalette_W(Self: TBitmap; const T: Boolean); begin Self.IgnorePalette := T; end;
+procedure TBitmapIgnorePalette_R(Self: TBitmap; var T: Boolean); begin T := Self.IgnorePalette; end;
+{$ENDIF}
+procedure TBitmapPalette_W(Self: TBitmap; const T: HPALETTE); begin Self.Palette := T; end;
+procedure TBitmapPalette_R(Self: TBitmap; var T: HPALETTE); begin T := Self.Palette; end;
+{$ENDIF}
+procedure TBitmapMonochrome_W(Self: TBitmap; const T: Boolean); begin Self.Monochrome := T; end;
+procedure TBitmapMonochrome_R(Self: TBitmap; var T: Boolean); begin T := Self.Monochrome; end;
+{$IFNDEF CLX}
+procedure TBitmapHandle_W(Self: TBitmap; const T: HBITMAP); begin Self.Handle := T; end;
+procedure TBitmapHandle_R(Self: TBitmap; var T: HBITMAP); begin T := Self.Handle; end;
+{$ENDIF}
+procedure TBitmapCanvas_R(Self: TBitmap; var T: TCanvas); begin T := Self.Canvas; end;
+
+procedure RIRegisterTBitmap(CL: TPSRuntimeClassImporter; Streams: Boolean);
+begin
+  with CL.Add(TBitmap) do
+  begin
+    if Streams then begin
+      RegisterMethod(@TBitmap.LoadFromStream, 'LoadFromStream');
+      RegisterMethod(@TBitmap.SaveToStream, 'SaveToStream');
+    end;
+    RegisterPropertyHelper(@TBitmapCanvas_R,nil,'Canvas');
+{$IFNDEF CLX}
+    RegisterPropertyHelper(@TBitmapHandle_R,@TBitmapHandle_W,'Handle');
+{$ENDIF}
+
+    {$IFNDEF PS_MINIVCL}
+{$IFNDEF FPC}
+    RegisterMethod(@TBitmap.Dormant, 'Dormant');
+{$ENDIF}
+    RegisterMethod(@TBitmap.FreeImage, 'FreeImage');
+{$IFNDEF CLX}
+    RegisterMethod(@TBitmap.LoadFromClipboardFormat, 'LoadFromClipboardFormat');
+{$ENDIF}
+    RegisterMethod(@TBitmap.LoadFromResourceName, 'LoadFromResourceName');
+    RegisterMethod(@TBitmap.LoadFromResourceID, 'LoadFromResourceID');
+{$IFNDEF CLX}
+    RegisterMethod(@TBitmap.ReleaseHandle, 'ReleaseHandle');
+    RegisterMethod(@TBitmap.ReleasePalette, 'ReleasePalette');
+    RegisterMethod(@TBitmap.SaveToClipboardFormat, 'SaveToClipboardFormat');
+    RegisterPropertyHelper(@TBitmapMonochrome_R,@TBitmapMonochrome_W,'Monochrome');
+    RegisterPropertyHelper(@TBitmapPalette_R,@TBitmapPalette_W,'Palette');
+{$IFNDEF FPC}
+    RegisterPropertyHelper(@TBitmapIgnorePalette_R,@TBitmapIgnorePalette_W,'IgnorePalette');
+{$ENDIF}
+{$ENDIF}
+    RegisterPropertyHelper(@TBitmapTransparentColor_R,nil,'TransparentColor');
+    {$ENDIF}
+  end;
+end;
+
+procedure RIRegister_Graphics(Cl: TPSRuntimeClassImporter; Streams: Boolean);
+begin
+  RIRegisterTGRAPHICSOBJECT(cl);
+  RIRegisterTFont(Cl);
+  RIRegisterTCanvas(cl);
+  RIRegisterTPEN(cl);
+  RIRegisterTBRUSH(cl);
+  RIRegisterTGraphic(CL);
+  RIRegisterTBitmap(CL, Streams);
+end;
+
+// PS_MINIVCL changes by Martijn Laan (mlaan at wintax _dot_ nl)
+
+end.
+
+
+
+
+
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_menus.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_menus.pas
new file mode 100644
index 0000000..a4b4206
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_menus.pas	
@@ -0,0 +1,460 @@
+ 
+Unit uPSR_menus;
+{$I PascalScript.inc}
+Interface
+Uses uPSRuntime;
+
+procedure RIRegister_Menus_Routines(S: TPSExec);
+{$IFNDEF FPC}
+procedure RIRegisterTMENUITEMSTACK(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTPOPUPLIST(Cl: TPSRuntimeClassImporter);
+{$ENDIF}
+procedure RIRegisterTPOPUPMENU(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTMAINMENU(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTMENU(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTMENUITEM(Cl: TPSRuntimeClassImporter);
+procedure RIRegister_Menus(CL: TPSRuntimeClassImporter);
+
+implementation
+{$IFDEF LINUX}
+{$IFNDEF FPC}
+Uses
+  Libc, SysUtils, Classes, QControls, QMenus, QGraphics;
+{$ELSE}
+Uses
+  Libc, SysUtils, Classes, Controls, Menus, Graphics, LCLType, ImgList;
+{$ENDIF}
+{$ELSE}
+Uses {$IFNDEF FPC}WINDOWS,{$ELSE} LCLType,{$ENDIF} SYSUTILS, CLASSES, CONTNRS, MESSAGES, GRAPHICS, IMGLIST, ACTNLIST, Menus;
+{$ENDIF}
+
+
+{$IFNDEF FPC}
+procedure TPOPUPLISTWINDOW_R(Self: TPOPUPLIST; var T: HWND);
+begin T := Self.WINDOW; end;
+{$ENDIF}
+
+procedure TPOPUPMENUONPOPUP_W(Self: TPOPUPMENU; const T: TNOTIFYEVENT);
+begin Self.ONPOPUP := T; end;
+
+procedure TPOPUPMENUONPOPUP_R(Self: TPOPUPMENU; var T: TNOTIFYEVENT);
+begin T := Self.ONPOPUP; end;
+
+{$IFNDEF FPC}
+procedure TPOPUPMENUTRACKBUTTON_W(Self: TPOPUPMENU; const T: TTRACKBUTTON);
+begin Self.TRACKBUTTON := T; end;
+
+procedure TPOPUPMENUTRACKBUTTON_R(Self: TPOPUPMENU; var T: TTRACKBUTTON);
+begin T := Self.TRACKBUTTON; end;
+
+
+procedure TPOPUPMENUMENUANIMATION_W(Self: TPOPUPMENU; const T: TMENUANIMATION);
+begin Self.MENUANIMATION := T; end;
+
+procedure TPOPUPMENUMENUANIMATION_R(Self: TPOPUPMENU; var T: TMENUANIMATION);
+begin T := Self.MENUANIMATION; end;
+
+procedure TPOPUPMENUHELPCONTEXT_W(Self: TPOPUPMENU; const T: THELPCONTEXT);
+begin Self.HELPCONTEXT := T; end;
+
+procedure TPOPUPMENUHELPCONTEXT_R(Self: TPOPUPMENU; var T: THELPCONTEXT);
+begin T := Self.HELPCONTEXT; end;
+{$ENDIF}
+
+procedure TPOPUPMENUAUTOPOPUP_W(Self: TPOPUPMENU; const T: BOOLEAN);
+begin Self.AUTOPOPUP := T; end;
+
+procedure TPOPUPMENUAUTOPOPUP_R(Self: TPOPUPMENU; var T: BOOLEAN);
+begin T := Self.AUTOPOPUP; end;
+
+{$IFNDEF FPC}
+procedure TPOPUPMENUALIGNMENT_W(Self: TPOPUPMENU; const T: TPOPUPALIGNMENT);
+begin Self.ALIGNMENT := T; end;
+
+procedure TPOPUPMENUALIGNMENT_R(Self: TPOPUPMENU; var T: TPOPUPALIGNMENT);
+begin T := Self.ALIGNMENT; end;
+{$ENDIF}
+
+procedure TPOPUPMENUPOPUPCOMPONENT_W(Self: TPOPUPMENU; const T: TCOMPONENT);
+begin Self.POPUPCOMPONENT := T; end;
+
+procedure TPOPUPMENUPOPUPCOMPONENT_R(Self: TPOPUPMENU; var T: TCOMPONENT);
+begin T := Self.POPUPCOMPONENT; end;
+
+{$IFNDEF FPC}
+procedure TMAINMENUAUTOMERGE_W(Self: TMAINMENU; const T: BOOLEAN);
+begin Self.AUTOMERGE := T; end;
+
+procedure TMAINMENUAUTOMERGE_R(Self: TMAINMENU; var T: BOOLEAN);
+begin T := Self.AUTOMERGE; end;
+{$ENDIF}
+
+procedure TMENUITEMS_R(Self: TMENU; var T: TMENUITEM);
+begin T := Self.ITEMS; end;
+
+
+{$IFNDEF FPC}
+procedure TMENUWINDOWHANDLE_W(Self: TMENU; const T: HWND);
+begin Self.WINDOWHANDLE := T; end;
+
+procedure TMENUWINDOWHANDLE_R(Self: TMENU; var T: HWND);
+begin T := Self.WINDOWHANDLE; end;
+
+procedure TMENUPARENTBIDIMODE_W(Self: TMENU; const T: BOOLEAN);
+begin Self.PARENTBIDIMODE := T; end;
+
+procedure TMENUPARENTBIDIMODE_R(Self: TMENU; var T: BOOLEAN);
+begin T := Self.PARENTBIDIMODE; end;
+
+procedure TMENUOWNERDRAW_W(Self: TMENU; const T: BOOLEAN);
+begin Self.OWNERDRAW := T; end;
+
+procedure TMENUOWNERDRAW_R(Self: TMENU; var T: BOOLEAN);
+begin T := Self.OWNERDRAW; end;
+
+procedure TMENUBIDIMODE_W(Self: TMENU; const T: TBIDIMODE);
+begin Self.BIDIMODE := T; end;
+
+procedure TMENUBIDIMODE_R(Self: TMENU; var T: TBIDIMODE);
+begin T := Self.BIDIMODE; end;
+
+procedure TMENUAUTOLINEREDUCTION_W(Self: TMENU; const T: TMENUAUTOFLAG);
+begin Self.AUTOLINEREDUCTION := T; end;
+
+procedure TMENUAUTOLINEREDUCTION_R(Self: TMENU; var T: TMENUAUTOFLAG);
+begin T := Self.AUTOLINEREDUCTION; end;
+
+procedure TMENUAUTOHOTKEYS_W(Self: TMENU; const T: TMENUAUTOFLAG);
+begin Self.AUTOHOTKEYS := T; end;
+
+procedure TMENUAUTOHOTKEYS_R(Self: TMENU; var T: TMENUAUTOFLAG);
+begin T := Self.AUTOHOTKEYS; end;
+
+{$ENDIF}
+
+
+procedure TMENUHANDLE_R(Self: TMENU; var T: HMENU);
+begin T := Self.HANDLE; end;
+
+
+
+
+procedure TMENUIMAGES_W(Self: TMENU; const T: TCUSTOMIMAGELIST);
+begin Self.IMAGES := T; end;
+
+procedure TMENUIMAGES_R(Self: TMENU; var T: TCUSTOMIMAGELIST);
+begin T := Self.IMAGES; end;
+
+{$IFNDEF FPC}
+procedure TMENUITEMONMEASUREITEM_W(Self: TMENUITEM; const T: TMENUMEASUREITEMEVENT);
+begin Self.ONMEASUREITEM := T; end;
+
+procedure TMENUITEMONMEASUREITEM_R(Self: TMENUITEM; var T: TMENUMEASUREITEMEVENT);
+begin T := Self.ONMEASUREITEM; end;
+
+procedure TMENUITEMONADVANCEDDRAWITEM_W(Self: TMENUITEM; const T: TADVANCEDMENUDRAWITEMEVENT);
+begin Self.ONADVANCEDDRAWITEM := T; end;
+
+procedure TMENUITEMONADVANCEDDRAWITEM_R(Self: TMENUITEM; var T: TADVANCEDMENUDRAWITEMEVENT);
+begin T := Self.ONADVANCEDDRAWITEM; end;
+
+procedure TMENUITEMONDRAWITEM_W(Self: TMENUITEM; const T: TMENUDRAWITEMEVENT);
+begin Self.ONDRAWITEM := T; end;
+
+procedure TMENUITEMONDRAWITEM_R(Self: TMENUITEM; var T: TMENUDRAWITEMEVENT);
+begin T := Self.ONDRAWITEM; end;
+{$ENDIF}
+
+procedure TMENUITEMONCLICK_W(Self: TMENUITEM; const T: TNOTIFYEVENT);
+begin Self.ONCLICK := T; end;
+
+procedure TMENUITEMONCLICK_R(Self: TMENUITEM; var T: TNOTIFYEVENT);
+begin T := Self.ONCLICK; end;
+
+procedure TMENUITEMVISIBLE_W(Self: TMENUITEM; const T: BOOLEAN);
+begin Self.VISIBLE := T; end;
+
+procedure TMENUITEMVISIBLE_R(Self: TMENUITEM; var T: BOOLEAN);
+begin T := Self.VISIBLE; end;
+
+procedure TMENUITEMSHORTCUT_W(Self: TMENUITEM; const T: TSHORTCUT);
+begin Self.SHORTCUT := T; end;
+
+procedure TMENUITEMSHORTCUT_R(Self: TMENUITEM; var T: TSHORTCUT);
+begin T := Self.SHORTCUT; end;
+
+procedure TMENUITEMRADIOITEM_W(Self: TMENUITEM; const T: BOOLEAN);
+begin Self.RADIOITEM := T; end;
+
+procedure TMENUITEMRADIOITEM_R(Self: TMENUITEM; var T: BOOLEAN);
+begin T := Self.RADIOITEM; end;
+
+procedure TMENUITEMIMAGEINDEX_W(Self: TMENUITEM; const T: TIMAGEINDEX);
+begin Self.IMAGEINDEX := T; end;
+
+procedure TMENUITEMIMAGEINDEX_R(Self: TMENUITEM; var T: TIMAGEINDEX);
+begin T := Self.IMAGEINDEX; end;
+
+procedure TMENUITEMHINT_W(Self: TMENUITEM; const T: STRING);
+begin Self.HINT := T; end;
+
+procedure TMENUITEMHINT_R(Self: TMENUITEM; var T: STRING);
+begin T := Self.HINT; end;
+
+procedure TMENUITEMHELPCONTEXT_W(Self: TMENUITEM; const T: THELPCONTEXT);
+begin Self.HELPCONTEXT := T; end;
+
+procedure TMENUITEMHELPCONTEXT_R(Self: TMENUITEM; var T: THELPCONTEXT);
+begin T := Self.HELPCONTEXT; end;
+
+procedure TMENUITEMGROUPINDEX_W(Self: TMENUITEM; const T: BYTE);
+begin Self.GROUPINDEX := T; end;
+
+procedure TMENUITEMGROUPINDEX_R(Self: TMENUITEM; var T: BYTE);
+begin T := Self.GROUPINDEX; end;
+
+procedure TMENUITEMENABLED_W(Self: TMENUITEM; const T: BOOLEAN);
+begin Self.ENABLED := T; end;
+
+procedure TMENUITEMENABLED_R(Self: TMENUITEM; var T: BOOLEAN);
+begin T := Self.ENABLED; end;
+
+procedure TMENUITEMDEFAULT_W(Self: TMENUITEM; const T: BOOLEAN);
+begin Self.DEFAULT := T; end;
+
+procedure TMENUITEMDEFAULT_R(Self: TMENUITEM; var T: BOOLEAN);
+begin T := Self.DEFAULT; end;
+
+procedure TMENUITEMSUBMENUIMAGES_W(Self: TMENUITEM; const T: TCUSTOMIMAGELIST);
+begin Self.SUBMENUIMAGES := T; end;
+
+procedure TMENUITEMSUBMENUIMAGES_R(Self: TMENUITEM; var T: TCUSTOMIMAGELIST);
+begin T := Self.SUBMENUIMAGES; end;
+
+procedure TMENUITEMCHECKED_W(Self: TMENUITEM; const T: BOOLEAN);
+begin Self.CHECKED := T; end;
+
+procedure TMENUITEMCHECKED_R(Self: TMENUITEM; var T: BOOLEAN);
+begin T := Self.CHECKED; end;
+
+procedure TMENUITEMCAPTION_W(Self: TMENUITEM; const T: STRING);
+begin Self.CAPTION := T; end;
+
+procedure TMENUITEMCAPTION_R(Self: TMENUITEM; var T: STRING);
+begin T := Self.CAPTION; end;
+
+procedure TMENUITEMBITMAP_W(Self: TMENUITEM; const T: TBITMAP);
+begin Self.BITMAP := T; end;
+
+procedure TMENUITEMBITMAP_R(Self: TMENUITEM; var T: TBITMAP);
+begin T := Self.BITMAP; end;
+
+{$IFNDEF FPC}
+procedure TMENUITEMAUTOLINEREDUCTION_W(Self: TMENUITEM; const T: TMENUITEMAUTOFLAG);
+begin Self.AUTOLINEREDUCTION := T; end;
+
+procedure TMENUITEMAUTOLINEREDUCTION_R(Self: TMENUITEM; var T: TMENUITEMAUTOFLAG);
+begin T := Self.AUTOLINEREDUCTION; end;
+
+procedure TMENUITEMAUTOHOTKEYS_W(Self: TMENUITEM; const T: TMENUITEMAUTOFLAG);
+begin Self.AUTOHOTKEYS := T; end;
+
+procedure TMENUITEMAUTOHOTKEYS_R(Self: TMENUITEM; var T: TMENUITEMAUTOFLAG);
+begin T := Self.AUTOHOTKEYS; end;
+{$ENDIF}
+
+procedure TMENUITEMACTION_W(Self: TMENUITEM; const T: TBASICACTION);
+begin Self.ACTION := T; end;
+
+procedure TMENUITEMACTION_R(Self: TMENUITEM; var T: TBASICACTION);
+begin T := Self.ACTION; end;
+
+procedure TMENUITEMPARENT_R(Self: TMENUITEM; var T: TMENUITEM);
+begin T := Self.PARENT; end;
+
+procedure TMENUITEMMENUINDEX_W(Self: TMENUITEM; const T: INTEGER);
+begin Self.MENUINDEX := T; end;
+
+procedure TMENUITEMMENUINDEX_R(Self: TMENUITEM; var T: INTEGER);
+begin T := Self.MENUINDEX; end;
+
+procedure TMENUITEMITEMS_R(Self: TMENUITEM; var T: TMENUITEM; const t1: INTEGER);
+begin T := Self.ITEMS[t1]; end;
+
+procedure TMENUITEMCOUNT_R(Self: TMENUITEM; var T: INTEGER);
+begin T := Self.COUNT; end;
+
+procedure TMENUITEMHANDLE_R(Self: TMENUITEM; var T: HMENU);
+begin T := Self.HANDLE; end;
+
+procedure TMENUITEMCOMMAND_R(Self: TMENUITEM; var T: WORD);
+begin T := Self.COMMAND; end;
+
+procedure RIRegister_Menus_Routines(S: TPSExec);
+begin
+  S.RegisterDelphiFunction(@SHORTCUT, 'SHORTCUT', cdRegister);
+	S.RegisterDelphiFunction(@SHORTCUTTOKEY, 'SHORTCUTTOKEY', cdRegister);
+{$IFNDEF FPC}
+  S.RegisterDelphiFunction(@SHORTCUTTOTEXT, 'SHORTCUTTOTEXT', cdRegister);
+  S.RegisterDelphiFunction(@TEXTTOSHORTCUT, 'TEXTTOSHORTCUT', cdRegister);
+  S.RegisterDelphiFunction(@NEWMENU, 'NEWMENU', cdRegister);
+  S.RegisterDelphiFunction(@NEWPOPUPMENU, 'NEWPOPUPMENU', cdRegister);
+  S.RegisterDelphiFunction(@NEWSUBMENU, 'NEWSUBMENU', cdRegister);
+  S.RegisterDelphiFunction(@NEWITEM, 'NEWITEM', cdRegister);
+  S.RegisterDelphiFunction(@NEWLINE, 'NEWLINE', cdRegister);
+	S.RegisterDelphiFunction(@DRAWMENUITEM, 'DRAWMENUITEM', cdRegister);
+{$ENDIF}	
+end;
+
+{$IFNDEF FPC}
+procedure RIRegisterTMENUITEMSTACK(Cl: TPSRuntimeClassImporter);
+begin
+	with Cl.Add(TMENUITEMSTACK) do
+	begin
+		RegisterMethod(@TMENUITEMSTACK.CLEARITEM, 'CLEARITEM');
+	end;
+end;
+
+procedure RIRegisterTPOPUPLIST(Cl: TPSRuntimeClassImporter);
+begin
+	with Cl.Add(TPOPUPLIST) do
+	begin
+		RegisterPropertyHelper(@TPOPUPLISTWINDOW_R,nil,'WINDOW');
+		RegisterMethod(@TPOPUPLIST.ADD, 'ADD');
+		RegisterMethod(@TPOPUPLIST.REMOVE, 'REMOVE');
+	end;
+end;
+{$ENDIF}
+
+
+procedure RIRegisterTPOPUPMENU(Cl: TPSRuntimeClassImporter);
+begin
+	with Cl.Add(TPOPUPMENU) do
+  begin
+		RegisterConstructor(@TPOPUPMENU.CREATE, 'CREATE');
+		RegisterVirtualMethod(@TPOPUPMENU.POPUP, 'POPUP');
+		RegisterPropertyHelper(@TPOPUPMENUPOPUPCOMPONENT_R,@TPOPUPMENUPOPUPCOMPONENT_W,'POPUPCOMPONENT');
+		RegisterEventPropertyHelper(@TPOPUPMENUONPOPUP_R,@TPOPUPMENUONPOPUP_W,'ONPOPUP');
+{$IFNDEF FPC}
+		RegisterPropertyHelper(@TPOPUPMENUALIGNMENT_R,@TPOPUPMENUALIGNMENT_W,'ALIGNMENT');
+		RegisterPropertyHelper(@TPOPUPMENUAUTOPOPUP_R,@TPOPUPMENUAUTOPOPUP_W,'AUTOPOPUP');
+		RegisterPropertyHelper(@TPOPUPMENUHELPCONTEXT_R,@TPOPUPMENUHELPCONTEXT_W,'HELPCONTEXT');
+		RegisterPropertyHelper(@TPOPUPMENUMENUANIMATION_R,@TPOPUPMENUMENUANIMATION_W,'MENUANIMATION');
+		RegisterPropertyHelper(@TPOPUPMENUTRACKBUTTON_R,@TPOPUPMENUTRACKBUTTON_W,'TRACKBUTTON');
+{$ENDIF}
+	end;
+end;
+
+procedure RIRegisterTMAINMENU(Cl: TPSRuntimeClassImporter);
+begin
+	with Cl.Add(TMAINMENU) do
+	begin
+{$IFNDEF FPC}
+		RegisterMethod(@TMAINMENU.MERGE, 'MERGE');
+		RegisterMethod(@TMAINMENU.UNMERGE, 'UNMERGE');
+		RegisterMethod(@TMAINMENU.POPULATEOLE2MENU, 'POPULATEOLE2MENU');
+		RegisterMethod(@TMAINMENU.GETOLE2ACCELERATORTABLE, 'GETOLE2ACCELERATORTABLE');
+		RegisterMethod(@TMAINMENU.SETOLE2MENUHANDLE, 'SETOLE2MENUHANDLE');
+		RegisterPropertyHelper(@TMAINMENUAUTOMERGE_R,@TMAINMENUAUTOMERGE_W,'AUTOMERGE');
+{$ENDIF}		
+	end;
+end;
+
+
+procedure RIRegisterTMENU(Cl: TPSRuntimeClassImporter);
+begin
+	with Cl.Add(TMENU) do
+	begin
+		RegisterConstructor(@TMENU.CREATE, 'CREATE');
+		RegisterMethod(@TMENU.DISPATCHCOMMAND, 'DISPATCHCOMMAND');
+		RegisterMethod(@TMENU.FINDITEM, 'FINDITEM');
+		RegisterPropertyHelper(@TMENUIMAGES_R,@TMENUIMAGES_W,'IMAGES');
+		RegisterMethod(@TMENU.ISRIGHTTOLEFT, 'ISRIGHTTOLEFT');
+		RegisterPropertyHelper(@TMENUHANDLE_R,nil,'HANDLE');
+		RegisterPropertyHelper(@TMENUITEMS_R,nil,'ITEMS');
+{$IFNDEF FPC}
+		RegisterMethod(@TMENU.DISPATCHPOPUP, 'DISPATCHPOPUP');
+		RegisterMethod(@TMENU.PARENTBIDIMODECHANGED, 'PARENTBIDIMODECHANGED');
+		RegisterMethod(@TMENU.PROCESSMENUCHAR, 'PROCESSMENUCHAR');
+		RegisterPropertyHelper(@TMENUAUTOHOTKEYS_R,@TMENUAUTOHOTKEYS_W,'AUTOHOTKEYS');
+		RegisterPropertyHelper(@TMENUAUTOLINEREDUCTION_R,@TMENUAUTOLINEREDUCTION_W,'AUTOLINEREDUCTION');
+		RegisterPropertyHelper(@TMENUBIDIMODE_R,@TMENUBIDIMODE_W,'BIDIMODE');
+		RegisterMethod(@TMENU.GETHELPCONTEXT, 'GETHELPCONTEXT');
+		RegisterPropertyHelper(@TMENUOWNERDRAW_R,@TMENUOWNERDRAW_W,'OWNERDRAW');
+		RegisterPropertyHelper(@TMENUPARENTBIDIMODE_R,@TMENUPARENTBIDIMODE_W,'PARENTBIDIMODE');
+		RegisterPropertyHelper(@TMENUWINDOWHANDLE_R,@TMENUWINDOWHANDLE_W,'WINDOWHANDLE');
+{$ENDIF}
+	end;
+end;
+
+procedure RIRegisterTMENUITEM(Cl: TPSRuntimeClassImporter);
+begin
+	with Cl.Add(TMENUITEM) do
+	begin
+		RegisterConstructor(@TMENUITEM.CREATE, 'CREATE');
+		RegisterVirtualMethod(@TMENUITEM.INITIATEACTION, 'INITIATEACTION');
+		RegisterMethod(@TMENUITEM.INSERT, 'INSERT');
+		RegisterMethod(@TMENUITEM.DELETE, 'DELETE');
+		RegisterMethod(@TMENUITEM.CLEAR, 'CLEAR');
+		RegisterVirtualMethod(@TMENUITEM.CLICK, 'CLICK');
+{$IFNDEF FPC}
+		RegisterMethod(@TMENUITEM.FIND, 'FIND');
+		RegisterMethod(@TMENUITEM.NEWTOPLINE, 'NEWTOPLINE');
+		RegisterMethod(@TMENUITEM.NEWBOTTOMLINE, 'NEWBOTTOMLINE');
+		RegisterMethod(@TMENUITEM.INSERTNEWLINEBEFORE, 'INSERTNEWLINEBEFORE');
+		RegisterMethod(@TMENUITEM.INSERTNEWLINEAFTER, 'INSERTNEWLINEAFTER');
+		RegisterMethod(@TMENUITEM.RETHINKHOTKEYS, 'RETHINKHOTKEYS');
+		RegisterMethod(@TMENUITEM.RETHINKLINES, 'RETHINKLINES');
+		RegisterMethod(@TMENUITEM.ISLINE, 'ISLINE');
+{$ENDIF}
+		RegisterMethod(@TMENUITEM.INDEXOF, 'INDEXOF');
+		RegisterMethod(@TMENUITEM.GETIMAGELIST, 'GETIMAGELIST');
+		RegisterMethod(@TMENUITEM.GETPARENTCOMPONENT, 'GETPARENTCOMPONENT');
+		RegisterMethod(@TMENUITEM.GETPARENTMENU, 'GETPARENTMENU');
+		RegisterMethod(@TMENUITEM.HASPARENT, 'HASPARENT');
+		RegisterMethod(@TMENUITEM.ADD, 'ADD');
+		RegisterMethod(@TMENUITEM.REMOVE, 'REMOVE');
+{$IFNDEF FPC}
+		RegisterPropertyHelper(@TMENUITEMAUTOHOTKEYS_R,@TMENUITEMAUTOHOTKEYS_W,'AUTOHOTKEYS');
+		RegisterPropertyHelper(@TMENUITEMAUTOLINEREDUCTION_R,@TMENUITEMAUTOLINEREDUCTION_W,'AUTOLINEREDUCTION');
+		RegisterEventPropertyHelper(@TMENUITEMONDRAWITEM_R,@TMENUITEMONDRAWITEM_W,'ONDRAWITEM');
+		RegisterEventPropertyHelper(@TMENUITEMONADVANCEDDRAWITEM_R,@TMENUITEMONADVANCEDDRAWITEM_W,'ONADVANCEDDRAWITEM');
+		RegisterEventPropertyHelper(@TMENUITEMONMEASUREITEM_R,@TMENUITEMONMEASUREITEM_W,'ONMEASUREITEM');
+{$ENDIF}
+		RegisterPropertyHelper(@TMENUITEMCOMMAND_R,nil,'COMMAND');
+		RegisterPropertyHelper(@TMENUITEMHANDLE_R,nil,'HANDLE');
+		RegisterPropertyHelper(@TMENUITEMCOUNT_R,nil,'COUNT');
+		RegisterPropertyHelper(@TMENUITEMITEMS_R,nil,'ITEMS');
+		RegisterPropertyHelper(@TMENUITEMMENUINDEX_R,@TMENUITEMMENUINDEX_W,'MENUINDEX');
+		RegisterPropertyHelper(@TMENUITEMPARENT_R,nil,'PARENT');
+		RegisterPropertyHelper(@TMENUITEMACTION_R,@TMENUITEMACTION_W,'ACTION');
+		RegisterPropertyHelper(@TMENUITEMBITMAP_R,@TMENUITEMBITMAP_W,'BITMAP');
+		RegisterPropertyHelper(@TMENUITEMCAPTION_R,@TMENUITEMCAPTION_W,'CAPTION');
+		RegisterPropertyHelper(@TMENUITEMCHECKED_R,@TMENUITEMCHECKED_W,'CHECKED');
+		RegisterPropertyHelper(@TMENUITEMSUBMENUIMAGES_R,@TMENUITEMSUBMENUIMAGES_W,'SUBMENUIMAGES');
+		RegisterPropertyHelper(@TMENUITEMDEFAULT_R,@TMENUITEMDEFAULT_W,'DEFAULT');
+		RegisterPropertyHelper(@TMENUITEMENABLED_R,@TMENUITEMENABLED_W,'ENABLED');
+		RegisterPropertyHelper(@TMENUITEMGROUPINDEX_R,@TMENUITEMGROUPINDEX_W,'GROUPINDEX');
+		RegisterPropertyHelper(@TMENUITEMHELPCONTEXT_R,@TMENUITEMHELPCONTEXT_W,'HELPCONTEXT');
+		RegisterPropertyHelper(@TMENUITEMHINT_R,@TMENUITEMHINT_W,'HINT');
+		RegisterPropertyHelper(@TMENUITEMIMAGEINDEX_R,@TMENUITEMIMAGEINDEX_W,'IMAGEINDEX');
+		RegisterPropertyHelper(@TMENUITEMRADIOITEM_R,@TMENUITEMRADIOITEM_W,'RADIOITEM');
+		RegisterPropertyHelper(@TMENUITEMSHORTCUT_R,@TMENUITEMSHORTCUT_W,'SHORTCUT');
+		RegisterPropertyHelper(@TMENUITEMVISIBLE_R,@TMENUITEMVISIBLE_W,'VISIBLE');
+		RegisterEventPropertyHelper(@TMENUITEMONCLICK_R,@TMENUITEMONCLICK_W,'ONCLICK');
+	end;
+end;
+
+procedure RIRegister_Menus(CL: TPSRuntimeClassImporter);
+begin
+	RIRegisterTMENUITEM(Cl);
+	RIRegisterTMENU(Cl);
+	RIRegisterTPOPUPMENU(Cl);
+	RIRegisterTMAINMENU(Cl);
+	{$IFNDEF FPC}
+	RIRegisterTPOPUPLIST(Cl);
+	RIRegisterTMENUITEMSTACK(Cl);
+	{$ENDIF}
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_std.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_std.pas
new file mode 100644
index 0000000..a67946e
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_std.pas	
@@ -0,0 +1,85 @@
+
+unit uPSR_std;
+{$I PascalScript.inc}
+interface
+uses
+  uPSRuntime, uPSUtils;
+
+
+procedure RIRegisterTObject(CL: TPSRuntimeClassImporter);
+procedure RIRegisterTPersistent(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTComponent(Cl: TPSRuntimeClassImporter);
+procedure RIRegister_Std(Cl: TPSRuntimeClassImporter);
+
+implementation
+uses
+  Classes;
+
+
+
+procedure RIRegisterTObject(CL: TPSRuntimeClassImporter); 
+begin
+  with cl.Add(TObject) do
+  begin
+    RegisterConstructor(@TObject.Create, 'CREATE');
+    RegisterMethod(@TObject.Free, 'FREE');
+  end;
+end;
+
+procedure RIRegisterTPersistent(Cl: TPSRuntimeClassImporter);
+begin
+  with Cl.Add(TPersistent) do
+  begin
+    RegisterVirtualMethod(@TPersistent.Assign, 'ASSIGN');
+  end;
+end;
+
+procedure TComponentOwnerR(Self: TComponent; var T: TComponent); begin T := Self.Owner; end;
+
+
+procedure TCOMPONENTCOMPONENTS_R(Self: TCOMPONENT; var T: TCOMPONENT; t1: INTEGER); begin T := Self.COMPONENTS[t1]; end;
+procedure TCOMPONENTCOMPONENTCOUNT_R(Self: TCOMPONENT; var T: INTEGER); begin t := Self.COMPONENTCOUNT; end;
+procedure TCOMPONENTCOMPONENTINDEX_R(Self: TCOMPONENT; var T: INTEGER); begin t := Self.COMPONENTINDEX; end;
+procedure TCOMPONENTCOMPONENTINDEX_W(Self: TCOMPONENT; T: INTEGER); begin Self.COMPONENTINDEX := t; end;
+procedure TCOMPONENTCOMPONENTSTATE_R(Self: TCOMPONENT; var T: TCOMPONENTSTATE); begin t := Self.COMPONENTSTATE; end;
+procedure TCOMPONENTDESIGNINFO_R(Self: TCOMPONENT; var T: LONGINT); begin t := Self.DESIGNINFO; end;
+procedure TCOMPONENTDESIGNINFO_W(Self: TCOMPONENT; T: LONGINT); begin Self.DESIGNINFO := t; end;
+
+
+procedure RIRegisterTComponent(Cl: TPSRuntimeClassImporter);
+begin
+  with Cl.Add(TComponent) do
+  begin
+    RegisterMethod(@TComponent.FindComponent, 'FINDCOMPONENT');
+    RegisterVirtualConstructor(@TComponent.Create, 'CREATE');
+    RegisterPropertyHelper(@TComponentOwnerR, nil, 'OWNER');
+
+    RegisterMethod(@TCOMPONENT.DESTROYCOMPONENTS, 'DESTROYCOMPONENTS');
+    RegisterPropertyHelper(@TCOMPONENTCOMPONENTS_R, nil, 'COMPONENTS');
+    RegisterPropertyHelper(@TCOMPONENTCOMPONENTCOUNT_R, nil, 'COMPONENTCOUNT');
+    RegisterPropertyHelper(@TCOMPONENTCOMPONENTINDEX_R, @TCOMPONENTCOMPONENTINDEX_W, 'COMPONENTINDEX');
+    RegisterPropertyHelper(@TCOMPONENTCOMPONENTSTATE_R, nil, 'COMPONENTSTATE');
+    RegisterPropertyHelper(@TCOMPONENTDESIGNINFO_R, @TCOMPONENTDESIGNINFO_W, 'DESIGNINFO');
+  end;
+end;
+
+
+
+
+
+
+
+procedure RIRegister_Std(Cl: TPSRuntimeClassImporter);
+begin
+  RIRegisterTObject(CL);
+  RIRegisterTPersistent(Cl);
+  RIRegisterTComponent(Cl);
+end;
+// PS_MINIVCL changes by Martijn Laan (mlaan at wintax _dot_ nl)
+
+end.
+
+
+
+
+
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_stdctrls.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_stdctrls.pas
new file mode 100644
index 0000000..87eeab9
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSR_stdctrls.pas	
@@ -0,0 +1,287 @@
+{ STDCtrls import unit }
+unit uPSR_stdctrls;
+
+{$I PascalScript.inc}
+interface
+uses
+  uPSRuntime, uPSUtils;
+
+
+procedure RIRegisterTCUSTOMGROUPBOX(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTGROUPBOX(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTCUSTOMLABEL(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTLABEL(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTCUSTOMEDIT(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTEDIT(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTCUSTOMMEMO(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTMEMO(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTCUSTOMCOMBOBOX(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTCOMBOBOX(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTBUTTONCONTROL(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTBUTTON(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTCUSTOMCHECKBOX(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTCHECKBOX(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTRADIOBUTTON(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTCUSTOMLISTBOX(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTLISTBOX(Cl: TPSRuntimeClassImporter);
+procedure RIRegisterTSCROLLBAR(Cl: TPSRuntimeClassImporter);
+
+procedure RIRegister_stdctrls(cl: TPSRuntimeClassImporter);
+
+implementation
+uses
+  sysutils, classes{$IFDEF CLX}, QControls, QStdCtrls, QGraphics{$ELSE}, controls, stdctrls, Graphics{$ENDIF}{$IFDEF FPC},buttons{$ENDIF};
+
+procedure RIRegisterTCUSTOMGROUPBOX(Cl: TPSRuntimeClassImporter);
+begin
+  Cl.Add(TCUSTOMGROUPBOX);
+end;
+
+
+procedure RIRegisterTGROUPBOX(Cl: TPSRuntimeClassImporter);
+begin
+  Cl.Add(TGROUPBOX);
+end;
+{$IFNDEF CLX}
+procedure TCUSTOMLABELCANVAS_R(Self: TCUSTOMLABEL; var T: TCanvas); begin T := Self.CANVAS; end;
+{$ENDIF}
+
+procedure RIRegisterTCUSTOMLABEL(Cl: TPSRuntimeClassImporter);
+begin
+  with Cl.Add(TCUSTOMLABEL) do
+  begin
+    {$IFNDEF PS_MINIVCL}
+{$IFNDEF CLX}
+    RegisterPropertyHelper(@TCUSTOMLABELCANVAS_R, nil, 'CANVAS');
+{$ENDIF}
+    {$ENDIF}
+  end;
+end;
+
+procedure RIRegisterTLABEL(Cl: TPSRuntimeClassImporter);
+begin
+  Cl.Add(TLABEL);
+end;
+procedure TCUSTOMEDITMODIFIED_R(Self: TCUSTOMEDIT; var T: BOOLEAN); begin T := Self.MODIFIED; end;
+procedure TCUSTOMEDITMODIFIED_W(Self: TCUSTOMEDIT; T: BOOLEAN); begin Self.MODIFIED := T; end;
+procedure TCUSTOMEDITSELLENGTH_R(Self: TCUSTOMEDIT; var T: INTEGER); begin T := Self.SELLENGTH; end;
+procedure TCUSTOMEDITSELLENGTH_W(Self: TCUSTOMEDIT; T: INTEGER); begin Self.SELLENGTH := T; end;
+procedure TCUSTOMEDITSELSTART_R(Self: TCUSTOMEDIT; var T: INTEGER); begin T := Self.SELSTART; end;
+procedure TCUSTOMEDITSELSTART_W(Self: TCUSTOMEDIT; T: INTEGER); begin Self.SELSTART := T; end;
+procedure TCUSTOMEDITSELTEXT_R(Self: TCUSTOMEDIT; var T: STRING); begin T := Self.SELTEXT; end;
+procedure TCUSTOMEDITSELTEXT_W(Self: TCUSTOMEDIT; T: STRING); begin Self.SELTEXT := T; end;
+procedure TCUSTOMEDITTEXT_R(Self: TCUSTOMEDIT; var T: string); begin T := Self.TEXT; end;
+procedure TCUSTOMEDITTEXT_W(Self: TCUSTOMEDIT; T: string); begin Self.TEXT := T; end;
+
+
+procedure RIRegisterTCUSTOMEDIT(Cl: TPSRuntimeClassImporter);
+begin
+  with Cl.Add(TCUSTOMEDIT) do
+  begin
+    RegisterMethod(@TCUSTOMEDIT.CLEAR, 'CLEAR');
+    RegisterMethod(@TCUSTOMEDIT.CLEARSELECTION, 'CLEARSELECTION');
+    RegisterMethod(@TCUSTOMEDIT.SELECTALL, 'SELECTALL');
+    RegisterPropertyHelper(@TCUSTOMEDITMODIFIED_R, @TCUSTOMEDITMODIFIED_W, 'MODIFIED');
+    RegisterPropertyHelper(@TCUSTOMEDITSELLENGTH_R, @TCUSTOMEDITSELLENGTH_W, 'SELLENGTH');
+    RegisterPropertyHelper(@TCUSTOMEDITSELSTART_R, @TCUSTOMEDITSELSTART_W, 'SELSTART');
+    RegisterPropertyHelper(@TCUSTOMEDITSELTEXT_R, @TCUSTOMEDITSELTEXT_W, 'SELTEXT');
+    RegisterPropertyHelper(@TCUSTOMEDITTEXT_R, @TCUSTOMEDITTEXT_W, 'TEXT');
+
+    {$IFNDEF PS_MINIVCL}
+    RegisterMethod(@TCUSTOMEDIT.COPYTOCLIPBOARD, 'COPYTOCLIPBOARD');
+    RegisterMethod(@TCUSTOMEDIT.CUTTOCLIPBOARD, 'CUTTOCLIPBOARD');
+		RegisterMethod(@TCUSTOMEDIT.PASTEFROMCLIPBOARD, 'PASTEFROMCLIPBOARD');
+		{$IFNDEF FPC}
+		RegisterMethod(@TCUSTOMEDIT.GETSELTEXTBUF, 'GETSELTEXTBUF');
+    RegisterMethod(@TCUSTOMEDIT.SETSELTEXTBUF, 'SETSELTEXTBUF');
+		{$ENDIF}{FPC}
+    {$ENDIF}
+  end;
+end;
+
+procedure RIRegisterTEDIT(Cl: TPSRuntimeClassImporter);
+begin
+  Cl.Add(TEDIT);
+end;
+
+
+procedure TCUSTOMMEMOLINES_R(Self: {$IFDEF CLX}TMemo{$ELSE}TCUSTOMMEMO{$ENDIF}; var T: TSTRINGS); begin T := Self.LINES; end;
+procedure TCUSTOMMEMOLINES_W(Self: {$IFDEF CLX}TMemo{$ELSE}TCUSTOMMEMO{$ENDIF}; T: TSTRINGS); begin Self.LINES := T; end;
+
+
+procedure RIRegisterTCUSTOMMEMO(Cl: TPSRuntimeClassImporter);
+begin
+  with Cl.Add(TCUSTOMMEMO) do
+  begin
+    {$IFNDEF CLX}
+    RegisterPropertyHelper(@TCUSTOMMEMOLINES_R, @TCUSTOMMEMOLINES_W, 'LINES');
+    {$ENDIF}
+  end;
+end;
+
+
+procedure RIRegisterTMEMO(Cl: TPSRuntimeClassImporter);
+begin
+  with Cl.Add(TMEMO) do
+  begin
+    {$IFDEF CLX}
+    RegisterPropertyHelper(@TCUSTOMMEMOLINES_R, @TCUSTOMMEMOLINES_W, 'LINES');
+    {$ENDIF}
+  end;
+end;
+
+
+procedure TCUSTOMCOMBOBOXCANVAS_R(Self: TCUSTOMCOMBOBOX; var T: TCANVAS); begin T := Self.CANVAS; end;
+procedure TCUSTOMCOMBOBOXDROPPEDDOWN_R(Self: TCUSTOMCOMBOBOX; var T: BOOLEAN); begin T := Self.DROPPEDDOWN; end;
+procedure TCUSTOMCOMBOBOXDROPPEDDOWN_W(Self: TCUSTOMCOMBOBOX; T: BOOLEAN); begin Self.DROPPEDDOWN := T; end;
+procedure TCUSTOMCOMBOBOXITEMS_R(Self: TCUSTOMCOMBOBOX; var T: TSTRINGS); begin T := Self.ITEMS; end;
+procedure TCUSTOMCOMBOBOXITEMS_W(Self: TCUSTOMCOMBOBOX; T: TSTRINGS); begin Self.ITEMS := T; end;
+procedure TCUSTOMCOMBOBOXITEMINDEX_R(Self: TCUSTOMCOMBOBOX; var T: INTEGER); begin T := Self.ITEMINDEX; end;
+procedure TCUSTOMCOMBOBOXITEMINDEX_W(Self: TCUSTOMCOMBOBOX; T: INTEGER); begin Self.ITEMINDEX := T; end;
+procedure TCUSTOMCOMBOBOXSELLENGTH_R(Self: TCUSTOMCOMBOBOX; var T: INTEGER); begin T := Self.SELLENGTH; end;
+procedure TCUSTOMCOMBOBOXSELLENGTH_W(Self: TCUSTOMCOMBOBOX; T: INTEGER); begin Self.SELLENGTH := T; end;
+procedure TCUSTOMCOMBOBOXSELSTART_R(Self: TCUSTOMCOMBOBOX; var T: INTEGER); begin T := Self.SELSTART; end;
+procedure TCUSTOMCOMBOBOXSELSTART_W(Self: TCUSTOMCOMBOBOX; T: INTEGER); begin Self.SELSTART := T; end;
+procedure TCUSTOMCOMBOBOXSELTEXT_R(Self: TCUSTOMCOMBOBOX; var T: STRING); begin T := Self.SELTEXT; end;
+procedure TCUSTOMCOMBOBOXSELTEXT_W(Self: TCUSTOMCOMBOBOX; T: STRING); begin Self.SELTEXT := T; end;
+
+
+procedure RIRegisterTCUSTOMCOMBOBOX(Cl: TPSRuntimeClassImporter);
+begin
+  with Cl.Add(TCUSTOMCOMBOBOX) do
+  begin
+    RegisterPropertyHelper(@TCUSTOMCOMBOBOXDROPPEDDOWN_R, @TCUSTOMCOMBOBOXDROPPEDDOWN_W, 'DROPPEDDOWN');
+    RegisterPropertyHelper(@TCUSTOMCOMBOBOXITEMS_R, @TCUSTOMCOMBOBOXITEMS_W, 'ITEMS');
+    RegisterPropertyHelper(@TCUSTOMCOMBOBOXITEMINDEX_R, @TCUSTOMCOMBOBOXITEMINDEX_W, 'ITEMINDEX');
+
+    {$IFNDEF PS_MINIVCL}
+    RegisterMethod(@TCUSTOMCOMBOBOX.CLEAR, 'CLEAR');
+    RegisterMethod(@TCUSTOMCOMBOBOX.SELECTALL, 'SELECTALL');
+    RegisterPropertyHelper(@TCUSTOMCOMBOBOXCANVAS_R, nil, 'CANVAS');
+    RegisterPropertyHelper(@TCUSTOMCOMBOBOXSELLENGTH_R, @TCUSTOMCOMBOBOXSELLENGTH_W, 'SELLENGTH');
+    RegisterPropertyHelper(@TCUSTOMCOMBOBOXSELSTART_R, @TCUSTOMCOMBOBOXSELSTART_W, 'SELSTART');
+    RegisterPropertyHelper(@TCUSTOMCOMBOBOXSELTEXT_R, @TCUSTOMCOMBOBOXSELTEXT_W, 'SELTEXT');
+    {$ENDIF}
+  end;
+end;
+
+
+
+
+procedure RIRegisterTCOMBOBOX(Cl: TPSRuntimeClassImporter);
+begin
+  Cl.Add(TCOMBOBOX);
+end;
+
+
+
+procedure RIRegisterTBUTTONCONTROL(Cl: TPSRuntimeClassImporter);
+begin
+  Cl.Add(TBUTTONCONTROL);
+end;
+
+
+
+procedure RIRegisterTBUTTON(Cl: TPSRuntimeClassImporter);
+begin
+  Cl.Add(TBUTTON);
+end;
+
+
+
+
+procedure RIRegisterTCUSTOMCHECKBOX(Cl: TPSRuntimeClassImporter);
+begin
+  Cl.Add(TCUSTOMCHECKBOX);
+end;
+
+
+procedure RIRegisterTCHECKBOX(Cl: TPSRuntimeClassImporter);
+begin
+  Cl.Add(TCHECKBOX);
+end;
+
+
+procedure RIRegisterTRADIOBUTTON(Cl: TPSRuntimeClassImporter);
+begin
+  Cl.Add(TRADIOBUTTON);
+end;
+
+procedure TCUSTOMLISTBOXCANVAS_R(Self: TCUSTOMLISTBOX; var T: TCANVAS); begin T := Self.CANVAS; end;
+procedure TCUSTOMLISTBOXITEMS_R(Self: TCUSTOMLISTBOX; var T: TSTRINGS); begin T := Self.ITEMS; end;
+procedure TCUSTOMLISTBOXITEMS_W(Self: TCUSTOMLISTBOX; T: TSTRINGS); begin Self.ITEMS := T; end;
+procedure TCUSTOMLISTBOXITEMINDEX_R(Self: TCUSTOMLISTBOX; var T: INTEGER); begin T := Self.ITEMINDEX; end;
+procedure TCUSTOMLISTBOXITEMINDEX_W(Self: TCUSTOMLISTBOX; T: INTEGER); begin Self.ITEMINDEX := T; end;
+procedure TCUSTOMLISTBOXSELCOUNT_R(Self: TCUSTOMLISTBOX; var T: INTEGER); begin T := Self.SELCOUNT; end;
+procedure TCUSTOMLISTBOXSELECTED_R(Self: TCUSTOMLISTBOX; var T: BOOLEAN; t1: INTEGER); begin T := Self.SELECTED[t1]; end;
+procedure TCUSTOMLISTBOXSELECTED_W(Self: TCUSTOMLISTBOX; T: BOOLEAN; t1: INTEGER); begin Self.SELECTED[t1] := T; end;
+procedure TCUSTOMLISTBOXTOPINDEX_R(Self: TCUSTOMLISTBOX; var T: INTEGER); begin T := Self.TOPINDEX; end;
+procedure TCUSTOMLISTBOXTOPINDEX_W(Self: TCUSTOMLISTBOX; T: INTEGER); begin Self.TOPINDEX := T; end;
+
+
+procedure RIRegisterTCUSTOMLISTBOX(Cl: TPSRuntimeClassImporter);
+begin
+  with Cl.Add(TCUSTOMLISTBOX) do
+  begin
+    RegisterPropertyHelper(@TCUSTOMLISTBOXITEMS_R, @TCUSTOMLISTBOXITEMS_W, 'ITEMS');
+    RegisterPropertyHelper(@TCUSTOMLISTBOXITEMINDEX_R, @TCUSTOMLISTBOXITEMINDEX_W, 'ITEMINDEX');
+    RegisterPropertyHelper(@TCUSTOMLISTBOXSELCOUNT_R, nil, 'SELCOUNT');
+    RegisterPropertyHelper(@TCUSTOMLISTBOXSELECTED_R, @TCUSTOMLISTBOXSELECTED_W, 'SELECTED');
+
+    {$IFNDEF PS_MINIVCL}
+    RegisterMethod(@TCUSTOMLISTBOX.CLEAR, 'CLEAR');
+    RegisterMethod(@TCUSTOMLISTBOX.ITEMATPOS, 'ITEMATPOS');
+    RegisterMethod(@TCUSTOMLISTBOX.ITEMRECT, 'ITEMRECT');
+    RegisterPropertyHelper(@TCUSTOMLISTBOXCANVAS_R, nil, 'CANVAS');
+    RegisterPropertyHelper(@TCUSTOMLISTBOXTOPINDEX_R, @TCUSTOMLISTBOXTOPINDEX_W, 'TOPINDEX');
+    {$ENDIF}
+  end;
+end;
+
+
+procedure RIRegisterTLISTBOX(Cl: TPSRuntimeClassImporter);
+begin
+  Cl.Add(TLISTBOX);
+end;
+
+
+procedure RIRegisterTSCROLLBAR(Cl: TPSRuntimeClassImporter);
+begin
+  with Cl.Add(TSCROLLBAR) do
+  begin
+    RegisterMethod(@TSCROLLBAR.SETPARAMS, 'SETPARAMS');
+  end;
+end;
+
+
+procedure RIRegister_stdctrls(cl: TPSRuntimeClassImporter);
+begin
+  {$IFNDEF PS_MINIVCL}
+  RIRegisterTCUSTOMGROUPBOX(Cl);
+  RIRegisterTGROUPBOX(Cl);
+  {$ENDIF}
+  RIRegisterTCUSTOMLABEL(Cl);
+  RIRegisterTLABEL(Cl);
+  RIRegisterTCUSTOMEDIT(Cl);
+  RIRegisterTEDIT(Cl);
+  RIRegisterTCUSTOMMEMO(Cl);
+  RIRegisterTMEMO(Cl);
+  RIRegisterTCUSTOMCOMBOBOX(Cl);
+  RIRegisterTCOMBOBOX(Cl);
+  RIRegisterTBUTTONCONTROL(Cl);
+  RIRegisterTBUTTON(Cl);
+  RIRegisterTCUSTOMCHECKBOX(Cl);
+  RIRegisterTCHECKBOX(Cl);
+  RIRegisterTRADIOBUTTON(Cl);
+  RIRegisterTCUSTOMLISTBOX(Cl);
+  RIRegisterTLISTBOX(Cl);
+  {$IFNDEF PS_MINIVCL}
+  RIRegisterTSCROLLBAR(Cl);
+  {$ENDIF}
+end;
+
+// PS_MINIVCL changes by Martijn Laan (mlaan at wintax _dot_ nl)
+
+end.
+
+
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSRuntime.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSRuntime.pas
new file mode 100644
index 0000000..0094640
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSRuntime.pas	
@@ -0,0 +1,11919 @@
+unit uPSRuntime;
+{$I PascalScript.inc}
+{
+
+Innerfuse Pascal Script III
+Copyright (C) 2000-2004 by Carlo Kok (ck@carlo-kok.com)
+
+}
+interface
+uses
+  SysUtils, uPSUtils{$IFDEF DELPHI6UP}, variants{$ENDIF}{$IFNDEF PS_NOIDISPATCH}{$IFDEF DELPHI3UP}, ActiveX, Windows{$ELSE}, Ole2{$ENDIF}{$ENDIF};
+
+
+type
+  TPSExec = class;
+  TPSStack = class;
+  TPSRuntimeAttributes = class;
+  TPSRuntimeAttribute = class;
+
+  TPSError = (ErNoError, erCannotImport, erInvalidType, ErInternalError,
+    erInvalidHeader, erInvalidOpcode, erInvalidOpcodeParameter, erNoMainProc,
+    erOutOfGlobalVarsRange, erOutOfProcRange, ErOutOfRange, erOutOfStackRange,
+    ErTypeMismatch, erUnexpectedEof, erVersionError, ErDivideByZero, ErMathError,
+    erCouldNotCallProc, erOutofRecordRange, erOutOfMemory, erException,
+    erNullPointerException, erNullVariantError, erInterfaceNotSupported, erCustomError);
+
+  TPSStatus = (isNotLoaded, isLoaded, isRunning, isPaused);
+
+  PByteArray = ^TByteArray;
+
+  TByteArray = array[0..1023] of Byte;
+
+  PDWordArray = ^TDWordArray;
+
+  TDWordArray = array[0..1023] of Cardinal;
+{@link(TPSProcRec)
+  PIFProcRec is a pointer to a TIProcRec record}
+  TPSProcRec = class;
+  TIFProcRec = TPSProcRec;
+  TPSExternalProcRec = class;
+  TIFPSExternalProcRec = TPSExternalProcRec;
+  TIFExternalProcRec = TPSExternalProcRec;
+  PIFProcRec = TPSProcRec;
+  PProcRec = ^TProcRec;
+
+  TPSProcPtr = function(Caller: TPSExec; p: TPSExternalProcRec; Global, Stack: TPSStack): Boolean;
+
+  TPSFreeProc = procedure (Caller: TPSExec; p: PProcRec);
+
+  TPSProcRec = class
+  private
+    FAttributes: TPSRuntimeAttributes;
+  public
+
+    constructor Create(Owner: TPSExec);
+
+    destructor Destroy; override;
+
+
+    property Attributes: TPSRuntimeAttributes read FAttributes;
+  end;
+
+  TPSExternalProcRec = class(TPSProcRec)
+  private
+    FExt1: Pointer;
+    FExt2: Pointer;
+    FName: tbtstring;
+    FProcPtr: TPSProcPtr;
+    FDecl: tbtstring;
+  public
+
+    property Name: tbtstring read FName write FName;
+
+    property Decl: tbtstring read FDecl write FDecl;
+
+    property Ext1: Pointer read FExt1 write FExt1;
+
+    property Ext2: Pointer read FExt2 write FExt2;
+
+    property ProcPtr: TPSProcPtr read FProcPtr write FProcPtr;
+  end;
+
+  TPSInternalProcRec = class(TPSProcRec)
+  private
+    FData: PByteArray;
+    FLength: Cardinal;
+    FExportNameHash: Longint;
+    FExportDecl: tbtstring;
+    FExportName: tbtstring;
+  public
+
+    property Data: PByteArray read FData;
+
+    property Length: Cardinal read FLength;
+
+    property ExportNameHash: Longint read FExportNameHash;
+
+    property ExportName: tbtstring read FExportName write FExportName;
+
+    property ExportDecl: tbtstring read FExportDecl write FExportDecl;
+
+
+    destructor Destroy; override;
+  end;
+
+  TProcRec = record
+
+    Name: ShortString;
+
+    Hash: Longint;
+
+    ProcPtr: TPSProcPtr;
+
+    FreeProc: TPSFreeProc;
+
+    Ext1, Ext2: Pointer;
+  end;
+
+  PBTReturnAddress = ^TBTReturnAddress;
+
+  TBTReturnAddress = packed record
+
+    ProcNo: TPSInternalProcRec;
+
+    Position, StackBase: Cardinal;
+  end;
+
+  TPSTypeRec = class
+  private
+    FExportNameHash: Longint;
+    FExportName: tbtstring;
+    FBaseType: TPSBaseType;
+    FAttributes: TPSRuntimeAttributes;
+  protected
+    FRealSize: Cardinal;
+  public
+
+    property RealSize: Cardinal read FRealSize;
+
+    property BaseType: TPSBaseType read FBaseType write FBaseType;
+
+    property ExportName: tbtstring read FExportName write FExportName;
+
+    property ExportNameHash: Longint read FExportNameHash write FExportNameHash;
+
+    property Attributes: TPSRuntimeAttributes read FAttributes write FAttributes;
+
+    procedure CalcSize; virtual;
+
+    constructor Create(Owner: TPSExec);
+    destructor Destroy; override;
+  end;
+
+  TPSTypeRec_ProcPtr = class(TPSTypeRec)
+  private
+    FParamInfo: tbtstring;
+  public
+
+    property ParamInfo: tbtstring read FParamInfo write FParamInfo;
+    procedure CalcSize; override;
+  end;
+  PIFTypeRec = TPSTypeRec;
+
+  TPSTypeRec_Class = class(TPSTypeRec)
+  private
+    FCN: tbtstring;
+  public
+
+    property CN: tbtstring read FCN write FCN;
+  end;
+{$IFNDEF PS_NOINTERFACES}
+
+  TPSTypeRec_Interface = class(TPSTypeRec)
+  private
+    FGuid: TGUID;
+  public
+
+    property Guid: TGUID read FGuid write FGuid;
+  end;
+{$ENDIF}
+
+  TPSTypeRec_Array = class(TPSTypeRec)
+  private
+    FArrayType: TPSTypeRec;
+  public
+
+    property ArrayType: TPSTypeRec read FArrayType write FArrayType;
+    procedure CalcSize; override;
+  end;
+
+  TPSTypeRec_StaticArray = class(TPSTypeRec_Array)
+  private
+    FSize: Longint;
+    FStartOffset: LongInt;
+  public
+
+    property Size: Longint read FSize write FSize;
+    property StartOffset: LongInt read FStartOffset write FStartOffset;
+
+    procedure CalcSize; override;
+  end;
+
+  TPSTypeRec_Set = class(TPSTypeRec)
+  private
+    FBitSize: Longint;
+    FByteSize: Longint;
+  public
+    {The number of bytes this would require (same as realsize)}
+    property aByteSize: Longint read FByteSize write FByteSize;
+    property aBitSize: Longint read FBitSize write FBitSize;
+    procedure CalcSize; override;
+  end;
+
+  TPSTypeRec_Record = class(TPSTypeRec)
+  private
+    FFieldTypes: TPSList;
+    FRealFieldOffsets: TPSList;
+  public
+
+    property FieldTypes: TPSList read FFieldTypes;
+
+    property RealFieldOffsets: TPSList read FRealFieldOffsets;
+
+    procedure CalcSize; override;
+
+    constructor Create(Owner: TPSExec);
+    destructor Destroy; override;
+  end;
+
+  PPSVariant = ^TPSVariant;
+
+  PIFVariant = PPSVariant;
+
+  TPSVariant = packed record
+    FType: TPSTypeRec;
+  end;
+
+  PPSVariantData = ^TPSVariantData;
+
+  TPSVariantData = packed record
+    VI: TPSVariant;
+    Data: array[0..0] of Byte;
+  end;
+
+  PPSVariantU8 = ^TPSVariantU8;
+
+  TPSVariantU8 = packed record
+    VI: TPSVariant;
+    Data: tbtU8;
+  end;
+
+
+  PPSVariantS8 = ^TPSVariantS8;
+
+  TPSVariantS8 = packed record
+    VI: TPSVariant;
+    Data: tbts8;
+  end;
+
+
+  PPSVariantU16 = ^TPSVariantU16;
+
+  TPSVariantU16 = packed record
+    VI: TPSVariant;
+    Data: tbtU16;
+  end;
+
+
+  PPSVariantS16 = ^TPSVariantS16;
+
+  TPSVariantS16 = packed record
+    VI: TPSVariant;
+    Data: tbts16;
+  end;
+
+
+  PPSVariantU32 = ^TPSVariantU32;
+
+  TPSVariantU32 = packed record
+    VI: TPSVariant;
+    Data: tbtU32;
+  end;
+
+
+  PPSVariantS32 = ^TPSVariantS32;
+
+  TPSVariantS32 = packed record
+    VI: TPSVariant;
+    Data: tbts32;
+  end;
+{$IFNDEF PS_NOINT64}
+
+  PPSVariantS64 = ^TPSVariantS64;
+
+  TPSVariantS64 = packed record
+    VI: TPSVariant;
+    Data: tbts64;
+  end;
+{$ENDIF}
+
+  PPSVariantAChar = ^TPSVariantAChar;
+
+  TPSVariantAChar = packed record
+    VI: TPSVariant;
+    Data: tbtChar;
+  end;
+
+{$IFNDEF PS_NOWIDESTRING}
+
+  PPSVariantWChar = ^TPSVariantWChar;
+
+  TPSVariantWChar = packed record
+    VI: TPSVariant;
+    Data: tbtWideChar;
+  end;
+{$ENDIF}
+
+  PPSVariantAString = ^TPSVariantAString;
+
+  TPSVariantAString = packed record
+    VI: TPSVariant;
+    Data: tbtString;
+  end;
+
+{$IFNDEF PS_NOWIDESTRING}
+
+  PPSVariantWString = ^TPSVariantWString;
+
+  TPSVariantWString = {$IFNDEF DELPHI2009UP}packed {$ENDIF}record
+    VI: TPSVariant;
+    Data: tbtWideString;
+  end;
+{$ENDIF}
+
+
+  PPSVariantSingle = ^TPSVariantSingle;
+
+  TPSVariantSingle = packed record
+    VI: TPSVariant;
+    Data: tbtsingle;
+  end;
+
+
+  PPSVariantDouble = ^TPSVariantDouble;
+
+  TPSVariantDouble = packed record
+    VI: TPSVariant;
+    Data: tbtDouble;
+  end;
+
+
+  PPSVariantExtended = ^TPSVariantExtended;
+
+  TPSVariantExtended = packed record
+    VI: TPSVariant;
+    Data: tbtExtended;
+  end;
+
+
+  PPSVariantCurrency = ^TPSVariantCurrency;
+
+  TPSVariantCurrency = packed record
+    VI: TPSVariant;
+    Data: tbtCurrency;
+  end;
+
+  PPSVariantSet = ^TPSVariantSet;
+
+  TPSVariantSet = packed record
+    VI: TPSVariant;
+    Data: array[0..0] of Byte;
+  end;
+
+{$IFNDEF PS_NOINTERFACES}
+
+  PPSVariantInterface = ^TPSVariantInterface;
+
+  TPSVariantInterface = packed record
+    VI: TPSVariant;
+    Data: IUnknown;
+  end;
+{$ENDIF}
+
+  PPSVariantClass = ^TPSVariantClass;
+
+  TPSVariantClass = packed record
+    VI: TPSVariant;
+    Data: TObject;
+  end;
+
+
+  PPSVariantRecord = ^TPSVariantRecord;
+
+  TPSVariantRecord = packed record
+    VI: TPSVariant;
+    data: array[0..0] of byte;
+  end;
+
+
+  PPSVariantDynamicArray = ^TPSVariantDynamicArray;
+
+  TPSVariantDynamicArray = packed record
+    VI: TPSVariant;
+    Data: Pointer;
+  end;
+
+
+  PPSVariantStaticArray = ^TPSVariantStaticArray;
+
+  TPSVariantStaticArray = packed record
+    VI: TPSVariant;
+    data: array[0..0] of byte;
+  end;
+
+
+  PPSVariantPointer = ^TPSVariantPointer;
+
+  TPSVariantPointer = packed record
+    VI: TPSVariant;
+    DataDest: Pointer;
+    DestType: TPSTypeRec;
+    FreeIt: LongBool;
+  end;
+
+
+  PPSVariantReturnAddress = ^TPSVariantReturnAddress;
+
+  TPSVariantReturnAddress = packed record
+    VI: TPSVariant;
+    Addr: TBTReturnAddress;
+  end;
+
+
+  PPSVariantVariant = ^TPSVariantVariant;
+
+  TPSVariantVariant = packed record
+    VI: TPSVariant;
+    Data: Variant;
+  end;
+
+  PPSVariantProcPtr = ^TPSVariantProcPtr;
+  TPSVariantProcPtr = packed record
+    VI: TPSVariant;
+    ProcNo: Cardinal;
+    Self: Pointer;
+    Ptr: Pointer;
+    {
+      ProcNo = 0  means Self/Ptr become active (Ptr = nil means it's nil)
+    }
+  end;
+
+
+  TPSVarFreeType = (
+    vtNone,
+    vtTempVar
+    );
+
+  TPSResultData = packed record
+    P: Pointer;
+    aType: TPSTypeRec;
+    FreeType: TPSVarFreeType;
+  end;
+
+
+  PPSResource = ^TPSResource;
+
+  TPSResource = record
+    Proc: Pointer;
+    P: Pointer;
+  end;
+
+  TPSAttributeUseProc = function (Sender: TPSExec; const AttribType: tbtstring; Attr: TPSRuntimeAttribute): Boolean;
+
+  TPSAttributeType = class
+  private
+    FTypeName: tbtstring;
+    FUseProc: TPSAttributeUseProc;
+    FTypeNameHash: Longint;
+  public
+
+    property UseProc: TPSAttributeUseProc read FUseProc write FUseProc;
+
+    property TypeName: tbtstring read FTypeName write FTypeName;
+
+    property TypeNameHash: Longint read FTypeNameHash write FTypeNameHash;
+  end;
+
+  PClassItem = ^TClassItem;
+
+  TClassItem = record
+
+    FName: tbtstring;
+
+    FNameHash: Longint;
+
+    b: byte;
+    case byte of
+    0: (Ptr: Pointer);
+    1: (PointerInList: Pointer);
+    3: (FReadFunc, FWriteFunc: Pointer); {Property Helper}
+    4: (Ptr2: Pointer);
+    5: (PointerInList2: Pointer);
+    6: (); {Property helper, like 3}
+    7: (); {Property helper that will pass it's name}
+  end;
+
+
+  PPSVariantIFC = ^TPSVariantIFC;
+  {Temporary variant into record}
+  TPSVariantIFC = packed record
+    Dta: Pointer;
+    aType: TPSTypeRec;
+    VarParam: Boolean;
+  end;
+  PIFPSVariantIFC = PPSVariantIFC;
+  TIFPSVariantIFC = TPSVariantIFC;
+
+  TPSRuntimeAttribute = class(TObject)
+  private
+    FValues: TPSStack;
+    FAttribType: tbtstring;
+    FOwner: TPSRuntimeAttributes;
+    FAttribTypeHash: Longint;
+    function GetValue(I: Longint): PIFVariant;
+    function GetValueCount: Longint;
+  public
+
+    property Owner: TPSRuntimeAttributes read FOwner;
+
+    property AttribType: tbtstring read FAttribType write FAttribType;
+
+    property AttribTypeHash: Longint read FAttribTypeHash write FAttribTypeHash;
+
+    property ValueCount: Longint read GetValueCount;
+
+    property Value[I: Longint]: PIFVariant read GetValue;
+
+    function AddValue(aType: TPSTypeRec): PPSVariant;
+
+    procedure DeleteValue(i: Longint);
+
+    procedure AdjustSize;
+
+
+    constructor Create(Owner: TPSRuntimeAttributes);
+
+    destructor Destroy; override;
+  end;
+
+  TPSRuntimeAttributes = class(TObject)
+  private
+    FAttributes: TPSList;
+    FOwner: TPSExec;
+    function GetCount: Longint;
+    function GetItem(I: Longint): TPSRuntimeAttribute;
+  public
+
+    property Owner: TPSExec read FOwner;
+
+    property Count: Longint read GetCount;
+
+    property Items[I: Longint]: TPSRuntimeAttribute read GetItem; default;
+
+    procedure Delete(I: Longint);
+
+    function Add: TPSRuntimeAttribute;
+
+    function FindAttribute(const Name: tbtstring): TPSRuntimeAttribute;
+
+
+    constructor Create(AOwner: TPSExec);
+
+    destructor Destroy; override;
+  end;
+  TPSOnGetNVariant = function (Sender: TPSExec; const Name: tbtstring): Variant;
+  TPSOnSetNVariant = procedure (Sender: TPSExec; const Name: tbtstring; V: Variant);
+
+  TPSOnLineEvent = procedure(Sender: TPSExec);
+
+  TPSOnSpecialProcImport = function (Sender: TPSExec; p: TPSExternalProcRec; Tag: Pointer): Boolean;
+
+  TPSOnException = procedure (Sender: TPSExec; ExError: TPSError; const ExParam: tbtstring; ExObject: TObject; ProcNo, Position: Cardinal);
+
+  TPSExec = class(TObject)
+  Private
+    FOnGetNVariant: TPSOnGetNVariant;
+    FOnSetNVariant: TPSOnSetNVariant;
+    FId: Pointer;
+    FJumpFlag: Boolean;
+    FCallCleanup: Boolean;
+    FOnException: TPSOnException;
+    function ReadData(var Data; Len: Cardinal): Boolean;
+    function ReadLong(var b: Cardinal): Boolean;
+    function DoCalc(var1, Var2: Pointer; var1Type, var2type: TPSTypeRec; CalcType: Cardinal): Boolean;
+    function DoBooleanCalc(var1, Var2, into: Pointer; var1Type, var2type, intotype: TPSTypeRec; Cmd: Cardinal): Boolean;
+    function SetVariantValue(dest, Src: Pointer; desttype, srctype: TPSTypeRec): Boolean;
+    function ReadVariable(var Dest: TPSResultData; UsePointer: Boolean): Boolean;
+    function DoBooleanNot(Dta: Pointer; aType: TPSTypeRec): Boolean;
+    function DoMinus(Dta: Pointer; aType: TPSTypeRec): Boolean;
+    function DoIntegerNot(Dta: Pointer; aType: TPSTypeRec): Boolean;
+    procedure RegisterStandardProcs;
+  Protected
+
+    FReturnAddressType: TPSTypeRec;
+
+    FVariantType: TPSTypeRec;
+
+    FVariantArrayType: TPSTypeRec;
+
+    FAttributeTypes: TPSList;
+
+    FExceptionStack: TPSList;
+
+    FResources: TPSList;
+
+    FExportedVars: TPSList;
+
+    FTypes: TPSList;
+
+    FProcs: TPSList;
+
+    FGlobalVars: TPSStack;
+
+    FTempVars: TPSStack;
+
+    FStack: TPSStack;
+
+    FMainProc: Cardinal;
+
+    FStatus: TPSStatus;
+
+    FCurrProc: TPSInternalProcRec;
+
+    FData: PByteArray;
+
+    FDataLength: Cardinal;
+
+    FCurrentPosition: Cardinal;
+
+    FCurrStackBase: Cardinal;
+
+    FOnRunLine: TPSOnLineEvent;
+
+    FSpecialProcList: TPSList;
+
+    FRegProcs: TPSList;
+
+    ExObject: TObject;
+
+    ExProc: Cardinal;
+
+    ExPos: Cardinal;
+
+    ExEx: TPSError;
+
+    ExParam: tbtstring;
+
+    function InvokeExternalMethod(At: TPSTypeRec_ProcPtr; Slf, Ptr: Pointer): Boolean;
+
+    function InnerfuseCall(_Self, Address: Pointer; CallingConv: TPSCallingConvention; Params: TPSList; res: PPSVariantIFC): Boolean;
+
+    procedure RunLine; virtual;
+
+    function ImportProc(const Name: ShortString; proc: TPSExternalProcRec): Boolean; Virtual;
+
+    procedure ExceptionProc(proc, Position: Cardinal; Ex: TPSError; const s: tbtstring; NewObject: TObject); Virtual;
+
+    function FindSpecialProcImport(P: TPSOnSpecialProcImport): pointer;
+  Public
+    function LastEx: TPSError;
+    function LastExParam: tbtstring;
+    function LastExProc: Integer;
+    function LastExPos: Integer;
+    procedure CMD_Err(EC: TPSError);
+
+    procedure CMD_Err2(EC: TPSError; const Param: tbtstring);
+
+    procedure CMD_Err3(EC: TPSError; const Param: tbtstring; ExObject: TObject);
+
+    property Id: Pointer read FID write FID;
+
+    class function About: tbtstring;
+
+    function RunProc(Params: TPSList; ProcNo: Cardinal): Boolean;
+
+    function RunProcP(const Params: array of Variant; const Procno: Cardinal): Variant;
+    function RunProcPVar(var Params: array of Variant; const Procno: Cardinal): Variant;
+
+    function RunProcPN(const Params: array of Variant; const ProcName: tbtstring): Variant;
+
+    function FindType(StartAt: Cardinal; BaseType: TPSBaseType; var l: Cardinal): PIFTypeRec;
+
+    function FindType2(BaseType: TPSBaseType): PIFTypeRec;
+
+    function GetTypeNo(l: Cardinal): PIFTypeRec;
+
+    function GetType(const Name: tbtstring): Cardinal;
+
+    function GetProc(const Name: tbtstring): Cardinal;
+
+    function GetVar(const Name: tbtstring): Cardinal;
+
+    function GetVar2(const Name: tbtstring): PIFVariant;
+
+    function GetVarNo(C: Cardinal): PIFVariant;
+
+    function GetProcNo(C: Cardinal): PIFProcRec;
+
+    function GetProcCount: Cardinal;
+
+    function GetVarCount: Longint;
+
+    function GetTypeCount: Longint;
+
+
+    constructor Create;
+	
+    destructor Destroy; Override;
+
+	
+    function RunScript: Boolean;
+
+	
+    function LoadData(const s: tbtstring): Boolean; virtual;
+
+    procedure Clear; Virtual;
+	
+    procedure Cleanup; Virtual;
+
+    procedure Stop; Virtual;
+	
+    procedure Pause; Virtual;
+
+    property CallCleanup: Boolean read FCallCleanup write FCallCleanup;
+
+    property Status: TPSStatus Read FStatus;
+	
+    property OnRunLine: TPSOnLineEvent Read FOnRunLine Write FOnRunLine;
+
+    procedure ClearspecialProcImports;
+
+    procedure AddSpecialProcImport(const FName: tbtstring; P: TPSOnSpecialProcImport; Tag: Pointer);
+
+    function RegisterFunctionName(const Name: tbtstring; ProcPtr: TPSProcPtr;
+      Ext1, Ext2: Pointer): PProcRec;
+
+    procedure RegisterDelphiFunction(ProcPtr: Pointer; const Name: tbtstring; CC: TPSCallingConvention);
+
+    procedure RegisterDelphiMethod(Slf, ProcPtr: Pointer; const Name: tbtstring; CC: TPSCallingConvention);
+
+    function GetProcAsMethod(const ProcNo: Cardinal): TMethod;
+
+    function GetProcAsMethodN(const ProcName: tbtstring): TMethod;
+
+    procedure RegisterAttributeType(useproc: TPSAttributeUseProc; const TypeName: tbtstring);
+	
+    procedure ClearFunctionList;
+
+    property ExceptionProcNo: Cardinal Read ExProc;
+	
+    property ExceptionPos: Cardinal Read ExPos;
+	
+    property ExceptionCode: TPSError Read ExEx;
+	
+    property ExceptionString: tbtstring read ExParam;
+
+    property ExceptionObject: TObject read ExObject write ExObject;
+
+    procedure AddResource(Proc, P: Pointer);
+	
+    function IsValidResource(Proc, P: Pointer): Boolean;
+	
+    procedure DeleteResource(P: Pointer);
+	
+    function FindProcResource(Proc: Pointer): Pointer;
+
+    function FindProcResource2(Proc: Pointer; var StartAt: Longint): Pointer;
+
+    procedure RaiseCurrentException;
+
+    property OnException: TPSOnException read FOnException write FOnException;
+    property OnGetNVariant: TPSOnGetNVariant read FOnGetNVariant write FOnGetNVariant;
+    property OnSetNVariant: TPSOnSetNVariant read FOnSetNVariant write FOnSetNVariant;
+  end;
+
+  TPSStack = class(TPSList)
+  private
+    FDataPtr: Pointer;
+    FCapacity,
+    FLength: Longint;
+    function GetItem(I: Longint): PPSVariant;
+    procedure SetCapacity(const Value: Longint);
+    procedure AdjustLength;
+  public
+
+    property DataPtr: Pointer read FDataPtr;
+
+    property Capacity: Longint read FCapacity write SetCapacity;
+
+    property Length: Longint read FLength;
+
+
+    constructor Create;
+
+    destructor Destroy; override;
+
+    procedure Clear; {$IFDEF DELPHI5UP} reintroduce;{$ELSE} override; {$ENDIF}
+
+    function Push(TotalSize: Longint): PPSVariant;
+
+    function PushType(aType: TPSTypeRec): PPSVariant;
+
+    procedure Pop;
+    function GetInt(ItemNo: Longint): Longint;
+    function GetUInt(ItemNo: Longint): Cardinal;
+{$IFNDEF PS_NOINT64}
+    function GetInt64(ItemNo: Longint): Int64;
+{$ENDIF}
+    function GetString(ItemNo: Longint): string; // calls the native method
+    function GetAnsiString(ItemNo: Longint): tbtstring;
+{$IFNDEF PS_NOWIDESTRING}
+    function GetWideString(ItemNo: Longint): tbtWideString;
+{$ENDIF}
+    function GetReal(ItemNo: Longint): Extended;
+    function GetCurrency(ItemNo: Longint): Currency;
+    function GetBool(ItemNo: Longint): Boolean;
+    function GetClass(ItemNo: Longint): TObject;
+
+    procedure SetInt(ItemNo: Longint; const Data: Longint);
+    procedure SetUInt(ItemNo: Longint; const Data: Cardinal);
+{$IFNDEF PS_NOINT64}
+    procedure SetInt64(ItemNo: Longint; const Data: Int64);
+{$ENDIF}
+    procedure SetString(ItemNo: Longint; const Data: string);
+    procedure SetAnsiString(ItemNo: Longint; const Data: tbtstring);
+{$IFNDEF PS_NOWIDESTRING}
+    procedure SetWideString(ItemNo: Longint; const Data: tbtWideString);
+{$ENDIF}
+    procedure SetReal(ItemNo: Longint; const Data: Extended);
+    procedure SetCurrency(ItemNo: Longint; const Data: Currency);
+    procedure SetBool(ItemNo: Longint; const Data: Boolean);
+    procedure SetClass(ItemNo: Longint; const Data: TObject);
+
+    property Items[I: Longint]: PPSVariant read GetItem; default;
+  end;
+
+
+function PSErrorToString(x: TPSError; const Param: tbtstring): tbtstring;
+function TIFErrorToString(x: TPSError; const Param: tbtstring): tbtstring;
+function CreateHeapVariant(aType: TPSTypeRec): PPSVariant;
+procedure DestroyHeapVariant(v: PPSVariant);
+
+procedure FreePIFVariantList(l: TPSList);
+procedure FreePSVariantList(l: TPSList);
+
+const
+  ENoError = ERNoError;
+
+
+function PIFVariantToVariant(Src: PIFVariant; var Dest: Variant): Boolean;
+function VariantToPIFVariant(Exec: TPSExec; const Src: Variant; Dest: PIFVariant): Boolean;
+
+function PSGetRecField(const avar: TPSVariantIFC; Fieldno: Longint): TPSVariantIFC;
+function PSGetArrayField(const avar: TPSVariantIFC; Fieldno: Longint): TPSVariantIFC;
+function NewTPSVariantRecordIFC(avar: PPSVariant; Fieldno: Longint): TPSVariantIFC;
+
+function NewTPSVariantIFC(avar: PPSVariant; varparam: boolean): TPSVariantIFC;
+
+function NewPPSVariantIFC(avar: PPSVariant; varparam: boolean): PPSVariantIFC;
+
+procedure DisposePPSVariantIFC(aVar: PPSVariantIFC);
+
+procedure DisposePPSVariantIFCList(list: TPSList);
+
+
+function PSGetObject(Src: Pointer; aType: TPSTypeRec): TObject;
+function PSGetUInt(Src: Pointer; aType: TPSTypeRec): Cardinal;
+{$IFNDEF PS_NOINT64}
+function PSGetInt64(Src: Pointer; aType: TPSTypeRec): Int64;
+{$ENDIF}
+function PSGetReal(Src: Pointer; aType: TPSTypeRec): Extended;
+function PSGetCurrency(Src: Pointer; aType: TPSTypeRec): Currency;
+function PSGetInt(Src: Pointer; aType: TPSTypeRec): Longint;
+function PSGetString(Src: Pointer; aType: TPSTypeRec): string;
+function PSGetAnsiString(Src: Pointer; aType: TPSTypeRec): tbtString;
+{$IFNDEF PS_NOWIDESTRING}
+function PSGetWideString(Src: Pointer; aType: TPSTypeRec): tbtWideString;
+{$ENDIF}
+
+procedure PSSetObject(Src: Pointer; aType: TPSTypeRec; var Ok: Boolean; Const val: TObject);
+procedure PSSetUInt(Src: Pointer; aType: TPSTypeRec; var Ok: Boolean; const Val: Cardinal);
+{$IFNDEF PS_NOINT64}
+procedure PSSetInt64(Src: Pointer; aType: TPSTypeRec; var Ok: Boolean; const Val: Int64);
+{$ENDIF}
+procedure PSSetReal(Src: Pointer; aType: TPSTypeRec; var Ok: Boolean; const Val: Extended);
+procedure PSSetCurrency(Src: Pointer; aType: TPSTypeRec; var Ok: Boolean; const Val: Currency);
+procedure PSSetInt(Src: Pointer; aType: TPSTypeRec; var Ok: Boolean; const Val: Longint);
+procedure PSSetString(Src: Pointer; aType: TPSTypeRec; var Ok: Boolean; const Val: String);
+procedure PSSetAnsiString(Src: Pointer; aType: TPSTypeRec; var Ok: Boolean; const Val: tbtString);
+{$IFNDEF PS_NOWIDESTRING}
+procedure PSSetWideString(Src: Pointer; aType: TPSTypeRec; var Ok: Boolean; const Val: tbtWideString);
+{$ENDIF}
+
+procedure VNSetPointerTo(const Src: TPSVariantIFC; Data: Pointer; aType: TPSTypeRec);
+
+function VNGetUInt(const Src: TPSVariantIFC): Cardinal;
+{$IFNDEF PS_NOINT64}
+function VNGetInt64(const Src: TPSVariantIFC): Int64;
+{$ENDIF}
+function VNGetReal(const Src: TPSVariantIFC): Extended;
+function VNGetCurrency(const Src: TPSVariantIFC): Currency;
+function VNGetInt(const Src: TPSVariantIFC): Longint;
+function VNGetString(const Src: TPSVariantIFC): tbtString;
+function VNGetAnsiString(const Src: TPSVariantIFC): tbtString;
+{$IFNDEF PS_NOWIDESTRING}
+function VNGetWideString(const Src: TPSVariantIFC): tbtWideString;
+{$ENDIF}
+
+procedure VNSetUInt(const Src: TPSVariantIFC; const Val: Cardinal);
+{$IFNDEF PS_NOINT64}
+procedure VNSetInt64(const Src: TPSVariantIFC; const Val: Int64);
+{$ENDIF}
+procedure VNSetReal(const Src: TPSVariantIFC; const Val: Extended);
+procedure VNSetCurrency(const Src: TPSVariantIFC; const Val: Currency);
+procedure VNSetInt(const Src: TPSVariantIFC; const Val: Longint);
+procedure VNSetString(const Src: TPSVariantIFC; const Val: String);
+procedure VNSetAnsiString(const Src: TPSVariantIFC; const Val: tbtString);
+{$IFNDEF PS_NOWIDESTRING}
+procedure VNSetWideString(const Src: TPSVariantIFC; const Val: tbtWideString);
+{$ENDIF}
+
+function VGetUInt(const Src: PIFVariant): Cardinal;
+{$IFNDEF PS_NOINT64}
+function VGetInt64(const Src: PIFVariant): Int64;
+{$ENDIF}
+function VGetReal(const Src: PIFVariant): Extended;
+function VGetCurrency(const Src: PIFVariant): Currency;
+function VGetInt(const Src: PIFVariant): Longint;
+function VGetString(const Src: PIFVariant): String;
+function VGetAnsiString(const Src: PIFVariant): tbtString;
+{$IFNDEF PS_NOWIDESTRING}
+function VGetWideString(const Src: PIFVariant): tbtWideString;
+{$ENDIF}
+
+procedure VSetPointerTo(const Src: PIFVariant; Data: Pointer; aType: TPSTypeRec);
+procedure VSetUInt(const Src: PIFVariant; const Val: Cardinal);
+{$IFNDEF PS_NOINT64}
+procedure VSetInt64(const Src: PIFVariant; const Val: Int64);
+{$ENDIF}
+procedure VSetReal(const Src: PIFVariant; const Val: Extended);
+procedure VSetCurrency(const Src: PIFVariant; const Val: Currency);
+procedure VSetInt(const Src: PIFVariant; const Val: Longint);
+procedure VSetString(const Src: PIFVariant; const Val: string);
+procedure VSetAnsiString(const Src: PIFVariant; const Val: tbtString);
+{$IFNDEF PS_NOWIDESTRING}
+procedure VSetWideString(const Src: PIFVariant; const Val: tbtWideString);
+{$ENDIF}
+
+type
+
+  EPSException = class(Exception)
+  private
+    FProcPos: Cardinal;
+    FProcNo: Cardinal;
+    FExec: TPSExec;
+  public
+
+    constructor Create(const Error: tbtstring; Exec: TPSExec; Procno, ProcPos: Cardinal);
+
+    property ProcNo: Cardinal read FProcNo;
+
+    property ProcPos: Cardinal read FProcPos;
+
+    property Exec: TPSExec read FExec;
+  end;
+
+  TPSRuntimeClass = class
+  protected
+    FClassName: tbtstring;
+    FClassNameHash: Longint;
+
+    FClassItems: TPSList;
+    FClass: TClass;
+
+    FEndOfVmt: Longint;
+  public
+
+    procedure RegisterConstructor(ProcPtr: Pointer; const Name: tbtstring);
+	
+    procedure RegisterVirtualConstructor(ProcPtr: Pointer; const Name: tbtstring);
+
+    procedure RegisterMethod(ProcPtr: Pointer; const Name: tbtstring);
+
+    procedure RegisterVirtualMethod(ProcPtr: Pointer; const Name: tbtstring);
+	
+    procedure RegisterVirtualAbstractMethod(ClassDef: TClass; ProcPtr: Pointer; const Name: tbtstring);
+
+    procedure RegisterPropertyHelper(ReadFunc, WriteFunc: Pointer; const Name: tbtstring);
+
+    procedure RegisterPropertyHelperName(ReadFunc, WriteFunc: Pointer; const Name: tbtstring);
+
+    procedure RegisterEventPropertyHelper(ReadFunc, WriteFunc: Pointer; const Name: tbtstring);
+
+    constructor Create(aClass: TClass; const AName: tbtstring);
+	
+    destructor Destroy; override;
+  end;
+
+  TPSRuntimeClassImporter = class
+  private
+    FClasses: TPSList;
+  public
+
+    constructor Create;
+
+    constructor CreateAndRegister(Exec: TPSexec; AutoFree: Boolean);
+	
+    destructor Destroy; override;
+
+    function Add(aClass: TClass): TPSRuntimeClass;
+
+    function Add2(aClass: TClass; const Name: tbtstring): TPSRuntimeClass;
+
+    procedure Clear;
+
+    function FindClass(const Name: tbtstring): TPSRuntimeClass;
+  end;
+  TIFPSRuntimeClassImporter = TPSRuntimeClassImporter;
+  TPSResourceFreeProc = procedure (Sender: TPSExec; P: TPSRuntimeClassImporter);
+
+
+procedure RegisterClassLibraryRuntime(SE: TPSExec; Importer: TPSRuntimeClassImporter);
+
+procedure SetVariantToClass(V: PIFVariant; Cl: TObject);
+{$IFNDEF PS_NOINTERFACES}
+procedure SetVariantToInterface(V: PIFVariant; Cl: IUnknown);
+{$ENDIF}
+
+procedure MyAllMethodsHandler;
+
+function GetMethodInfoRec(SE: TPSExec; ProcNo: Cardinal): Pointer;
+
+function MkMethod(FSE: TPSExec; No: Cardinal): TMethod;
+
+type
+  TIFInternalProcRec = TPSInternalProcRec;
+  TIFError = TPSError;
+  TIFStatus = TPSStatus;
+  TIFPSExec = TPSExec;
+  TIFPSStack = TPSStack;
+  TIFTypeRec = TPSTypeRec;
+
+
+  TPSCallingConvention = uPSUtils.TPSCallingConvention;
+const
+
+  cdRegister = uPSUtils.cdRegister;
+
+  cdPascal = uPSUtils.cdPascal;
+
+  cdCdecl = uPSUtils.cdCdecl;
+
+  cdStdCall = uPSUtils.cdStdCall;
+
+  InvalidVal = Cardinal(-1);
+
+function  PSDynArrayGetLength(arr: Pointer; aType: TPSTypeRec): Longint;
+procedure PSDynArraySetLength(var arr: Pointer; aType: TPSTypeRec; NewLength: Longint);
+
+function  GetPSArrayLength(Arr: PIFVariant): Longint;
+procedure SetPSArrayLength(Arr: PIFVariant; NewLength: Longint);
+
+function PSVariantToString(const p: TPSVariantIFC; const ClassProperties: tbtstring): tbtstring;
+function MakeString(const s: tbtstring): tbtstring;
+{$IFNDEF PS_NOWIDESTRING}
+function MakeWString(const s: tbtwidestring): tbtstring;
+{$ENDIF}
+
+{$IFNDEF PS_NOIDISPATCH}
+function IDispatchInvoke(Self: IDispatch; PropertySet: Boolean; const Name: tbtString; const Par: array of Variant): Variant;
+{$ENDIF}
+
+
+implementation
+uses
+  TypInfo {$IFDEF DELPHI3UP}{$IFNDEF FPC} , ComObj {$ENDIF}{$ENDIF};
+
+{$IFDEF DELPHI3UP }
+resourceString
+{$ELSE }
+const
+{$ENDIF }
+
+  RPS_UnknownIdentifier = 'Unknown Identifier';
+  RPS_Exception = 'Exception: %s';
+  RPS_Invalid = '[Invalid]';
+
+  //- PSErrorToString
+  RPS_NoError = 'No Error';
+  RPS_CannotImport = 'Cannot Import %s';
+  RPS_InvalidType = 'Invalid Type';
+  RPS_InternalError = 'Internal error';
+  RPS_InvalidHeader = 'Invalid Header';
+  RPS_InvalidOpcode = 'Invalid Opcode';
+  RPS_InvalidOpcodeParameter = 'Invalid Opcode Parameter';
+  RPS_NoMainProc = 'no Main Proc';
+  RPS_OutOfGlobalVarsRange = 'Out of Global Vars range';
+  RPS_OutOfProcRange = 'Out of Proc Range';
+  RPS_OutOfRange = 'Out Of Range';
+  RPS_OutOfStackRange = 'Out Of Stack Range';
+  RPS_TypeMismatch = 'Type Mismatch';
+  RPS_UnexpectedEof = 'Unexpected End Of File';
+  RPS_VersionError = 'Version error';
+  RPS_DivideByZero = 'divide by Zero';
+  RPS_MathError = 'Math error';
+  RPS_CouldNotCallProc = 'Could not call proc';
+  RPS_OutofRecordRange = 'Out of Record Fields Range';
+  RPS_NullPointerException = 'Null Pointer Exception';
+  RPS_NullVariantError = 'Null variant error';
+  RPS_OutOfMemory = 'Out Of Memory';
+  RPS_InterfaceNotSupported = 'Interface not supported';
+  RPS_UnknownError = 'Unknown error';
+
+
+  RPS_InvalidVariable = 'Invalid variable';
+  RPS_InvalidArray = 'Invalid array';
+  RPS_OLEError = 'OLE error %.8x';
+  RPS_UnknownProcedure = 'Unknown procedure';
+  RPS_NotEnoughParameters = 'Not enough parameters';
+  RPS_InvalidParameter = 'Invalid parameter';
+  RPS_TooManyParameters = 'Too many parameters';
+  RPS_OutOfStringRange = 'Out of string range';
+  RPS_CannotCastInterface = 'Cannot cast an interface';
+  RPS_CannotCastObject = 'Cannot cast an object';
+  RPS_CapacityLength = 'Capacity < Length';
+  RPS_CanOnlySendLastItem = 'Can only remove last item from stack';
+  RPS_NILInterfaceException = 'Nil interface';
+  RPS_UnknownMethod = 'Unknown method';
+
+
+
+type
+  PPSExportedVar = ^TPSExportedVar;
+  TPSExportedVar = record
+    FName: tbtstring;
+    FNameHash: Longint;
+    FVarNo: Cardinal;
+  end;
+  PRaiseFrame = ^TRaiseFrame;
+  TRaiseFrame = record
+    NextRaise: PRaiseFrame;
+    ExceptAddr: Pointer;
+    ExceptObject: TObject;
+    ExceptionRecord: Pointer;
+  end;
+  TPSExceptionHandler = class
+    CurrProc: TPSInternalProcRec;
+    BasePtr, StackSize: Cardinal;
+    FinallyOffset, ExceptOffset, Finally2Offset, EndOfBlock: Cardinal;
+    ExceptionData: TPSError;
+    ExceptionObject: TObject;
+    ExceptionParam: tbtString;
+    destructor Destroy; override;
+  end;
+  TPSHeader = packed record
+    HDR: Cardinal;
+    PSBuildNo: Cardinal;
+    TypeCount: Cardinal;
+    ProcCount: Cardinal;
+    VarCount: Cardinal;
+    MainProcNo: Cardinal;
+    ImportTableSize: Cardinal;
+  end;
+
+  TPSExportItem = packed record
+    ProcNo: Cardinal;
+    NameLength: Cardinal;
+    DeclLength: Cardinal;
+  end;
+
+  TPSType = packed record
+    BaseType: TPSBaseType;
+  end;
+  TPSProc = packed record
+    Flags: Byte;
+  end;
+
+  TPSVar = packed record
+    TypeNo: Cardinal;
+    Flags: Byte;
+  end;
+  PSpecialProc = ^TSpecialProc;
+  TSpecialProc = record
+    P: TPSOnSpecialProcImport;
+    namehash: Longint;
+    Name: tbtstring;
+    tag: pointer;
+  end;
+
+destructor TPSExceptionHandler.Destroy;
+begin
+  ExceptionObject.Free;
+  inherited;
+end;
+
+procedure P_CM_A; begin end;
+procedure P_CM_CA; begin end;
+procedure P_CM_P; begin end;
+procedure P_CM_PV; begin end;
+procedure P_CM_PO; begin end;
+procedure P_CM_C; begin end;
+procedure P_CM_G; begin end;
+procedure P_CM_CG; begin end;
+procedure P_CM_CNG; begin end;
+procedure P_CM_R; begin end;
+procedure P_CM_ST; begin end;
+procedure P_CM_PT; begin end;
+procedure P_CM_CO; begin end;
+procedure P_CM_CV; begin end;
+procedure P_CM_SP; begin end;
+procedure P_CM_BN; begin end;
+procedure P_CM_VM; begin end;
+procedure P_CM_SF; begin end;
+procedure P_CM_FG; begin end;
+procedure P_CM_PUEXH; begin end;
+procedure P_CM_POEXH; begin end;
+procedure P_CM_IN; begin end;
+procedure P_CM_SPB; begin end;
+procedure P_CM_INC; begin end;
+procedure P_CM_DEC; begin end;
+
+function IntPIFVariantToVariant(Src: pointer; aType: TPSTypeRec; var Dest: Variant): Boolean; forward;
+
+
+procedure Set_Union(Dest, Src: PByteArray; ByteSize: Integer);
+var
+  i: Longint;
+begin
+  for i := ByteSize -1 downto 0 do
+    Dest^[i] := Dest^[i] or Src^[i];
+end;
+
+procedure Set_Diff(Dest, Src: PByteArray; ByteSize: Integer);
+var
+  i: Longint;
+begin
+  for i := ByteSize -1 downto 0 do
+    Dest^[i] := Dest^[i] and not Src^[i];
+end;
+
+procedure Set_Intersect(Dest, Src: PByteArray; ByteSize: Integer);
+var
+  i: Longint;
+begin
+  for i := ByteSize -1 downto 0 do
+    Dest^[i] := Dest^[i] and Src^[i];
+end;
+
+procedure Set_Subset(Dest, Src: PByteArray; ByteSize: Integer; var Val: Boolean);
+var
+  i: Integer;
+begin
+  for i := ByteSize -1 downto 0 do
+  begin
+    if not (Src^[i] and Dest^[i] = Dest^[i]) then
+    begin
+      Val := False;
+      exit;
+    end;
+  end;
+  Val := True;
+end;
+
+procedure Set_Equal(Dest, Src: PByteArray; ByteSize: Integer; var Val: Boolean);
+var
+  i: Longint;
+begin
+  for i := ByteSize -1 downto 0 do
+  begin
+    if Dest^[i] <> Src^[i] then
+    begin
+      Val := False;
+      exit;
+    end;
+  end;
+  val := True;
+end;
+
+procedure Set_membership(Item: Longint; Src: PByteArray; var Val: Boolean);
+begin
+  Val := (Src^[Item shr 3] and (1 shl (Item and 7))) <> 0;
+end;
+
+
+procedure RCIFreeProc(Sender: TPSExec; P: TPSRuntimeClassImporter);
+begin
+  p.Free;
+end;
+
+function Trim(const s: tbtstring): tbtstring;
+begin
+  Result := s;
+  while (Length(result) > 0) and (Result[1] = #32) do Delete(Result, 1, 1);
+  while (Length(result) > 0) and (Result[Length(Result)] = #32) do Delete(Result, Length(Result), 1);
+end;
+(*function FloatToStr(E: Extended): tbtstring;
+begin
+  Result := Sysutils.FloatToStr(e);
+end;*)
+
+//-------------------------------------------------------------------
+
+function Padl(s: tbtstring; i: longInt): tbtstring;
+begin
+  result := StringOfChar(tbtchar(' '), i - length(s)) + s;
+end;
+//-------------------------------------------------------------------
+
+function Padz(s: tbtString; i: longInt): tbtString;
+begin
+  result := StringOfChar(tbtchar('0'), i - length(s)) + s;
+end;
+//-------------------------------------------------------------------
+
+function Padr(s: tbtString; i: longInt): tbtString;
+begin
+  result := s + StringOfChar(tbtchar(' '), i - Length(s));
+end;
+//-------------------------------------------------------------------
+
+{$IFNDEF PS_NOWIDESTRING}
+function MakeWString(const s: tbtwidestring): tbtString;
+var
+  i: Longint;
+  e: tbtString;
+  b: boolean;
+begin
+  Result := tbtString(s);
+  i := 1;
+  b := false;
+  while i <= length(result) do
+  begin
+    if Result[i] = '''' then
+    begin
+      if not b then
+      begin
+        b := true;
+        Insert('''', Result, i);
+        inc(i);
+      end;
+      Insert('''', Result, i);
+      inc(i, 2);
+    end else if (Result[i] < #32) or (Result[i] > #255) then
+    begin
+      e := '#'+inttostr(ord(Result[i]));
+      Delete(Result, i, 1);
+      if b then
+      begin
+        b := false;
+        Insert('''', Result, i);
+        inc(i);
+      end;
+      Insert(e, Result, i);
+      inc(i, length(e));
+    end else begin
+      if not b then
+      begin
+        b := true;
+        Insert('''', Result, i);
+        inc(i, 2);
+      end else
+        inc(i);
+    end;
+  end;
+  if b then
+  begin
+    Result := Result + '''';
+  end;
+  if Result = '' then
+    Result := '''''';
+end;
+{$ENDIF}
+function MakeString(const s: tbtString): tbtString;
+var
+  i: Longint;
+  e: tbtString;
+  b: boolean;
+begin
+  Result := s;
+  i := 1;
+  b := false;
+  while i <= length(result) do
+  begin
+    if Result[i] = '''' then
+    begin
+      if not b then
+      begin
+        b := true;
+        Insert('''', Result, i);
+        inc(i);
+      end;
+      Insert('''', Result, i);
+      inc(i, 2);
+    end else if (Result[i] < #32) then
+    begin
+      e := '#'+inttostr(ord(Result[i]));
+      Delete(Result, i, 1);
+      if b then
+      begin
+        b := false;
+        Insert('''', Result, i);
+        inc(i);
+      end;
+      Insert(e, Result, i);
+      inc(i, length(e));
+    end else begin
+      if not b then
+      begin
+        b := true;
+        Insert('''', Result, i);
+        inc(i, 2);
+      end else
+        inc(i);
+    end;
+  end;
+  if b then
+  begin
+    Result := Result + '''';
+  end;
+  if Result = '' then
+    Result := '''''';
+end;
+
+function SafeStr(const s: tbtString): tbtString;
+var
+ i : Longint;
+begin
+  Result := s;
+  for i := 1 to length(s) do
+  begin
+    if s[i] in [#0..#31] then
+    begin
+      Result := Copy(s, 1, i-1);
+      exit;
+    end;
+  end;
+
+end;
+
+function PropertyToString(Instance: TObject; PName: tbtString): tbtString;
+var
+  s: tbtString;
+  i: Longint;
+  PP: PPropInfo;
+begin
+  if PName = '' then
+  begin
+    Result := tbtString(Instance.ClassName);
+    exit;
+  end;
+  while Length(PName) > 0 do
+  begin
+    i := pos(tbtChar('.'), pname);
+    if i = 0 then
+    begin
+      s := Trim(PNAme);
+      pname := '';
+    end else begin
+      s := trim(Copy(PName, 1, i-1));
+      Delete(PName, 1, i);
+    end;
+    pp := GetPropInfo(PTypeInfo(Instance.ClassInfo), string(s));
+    if pp = nil then begin Result := tbtstring(RPS_UnknownIdentifier); exit; end;
+
+
+    case pp^.PropType^.Kind of
+      tkInteger: begin Result := IntToStr(GetOrdProp(Instance, pp)); exit; end;
+      tkChar: begin Result := '#'+IntToStr(GetOrdProp(Instance, pp)); exit; end;
+      tkEnumeration: begin Result := tbtstring(GetEnumName(pp^.PropType{$IFNDEF FPC}{$IFDEF DELPHI3UP}^{$ENDIF}{$ENDIF}, GetOrdProp(Instance, pp))); exit; end;
+      tkFloat: begin Result := FloatToStr(GetFloatProp(Instance, PP)); exit; end;
+      tkString, tkLString: begin Result := ''''+tbtString(GetStrProp(Instance, PP))+''''; exit; end;
+      tkSet: begin Result := '[Set]'; exit; end;
+      tkClass: begin Instance := TObject(GetOrdProp(Instance, pp)); end;
+      tkMethod: begin Result := '[Method]'; exit; end;
+      tkVariant: begin Result := '[Variant]'; exit; end;
+	  {$IFDEF DELPHI6UP}
+	  {$IFNDEF PS_NOWIDESTRING}tkWString: begin Result := ''''+tbtString(GetWideStrProp(Instance, pp))+''; end; {$ENDIF}
+	  {$ENDIF}
+      else begin Result := '[Unknown]'; exit; end;
+    end;
+    if Instance = nil then begin result := 'nil'; exit; end;
+  end;
+  Result := tbtstring(Instance.ClassName);
+end;
+
+function ClassVariantInfo(const pvar: TPSVariantIFC; const PropertyName: tbtString): tbtString;
+begin
+  if pvar.aType.BaseType = btClass then
+  begin
+    if TObject(pvar.Dta^) = nil then
+      Result := 'nil'
+    else
+      Result := PropertyToString(TObject(pvar.Dta^), PropertyName);
+  end else if pvar.atype.basetype = btInterface then
+      Result := 'Interface'
+  else Result := tbtstring(RPS_InvalidType);
+end;
+
+function PSVariantToString(const p: TPSVariantIFC; const ClassProperties: tbtString): tbtString;
+var
+  i, n: Longint;
+begin
+  if p.Dta = nil then
+  begin
+    Result := 'nil';
+    exit;
+  end;
+  if (p.aType.BaseType = btVariant) then
+  begin
+    try
+      if TVarData(p.Dta^).VType = varDispatch then
+        Result := 'Variant(IDispatch)'
+      else if TVarData(p.Dta^).VType = varNull then
+        REsult := 'Null'
+      else if (TVarData(p.Dta^).VType = varOleStr) then
+      {$IFDEF PS_NOWIDESTRING}
+        Result := MakeString(Variant(p.Dta^))
+      {$ELSE}
+        Result := MakeWString(variant(p.dta^))
+      {$ENDIF}
+      else if TVarData(p.Dta^).VType = varString then
+        Result := MakeString(tbtstring(variant(p.Dta^)))
+      else
+      Result := tbtstring(Variant(p.Dta^));
+    except
+      on e: Exception do
+        Result := tbtstring(Format (RPS_Exception, [e.Message]));
+    end;
+    exit;
+  end;
+  case p.aType.BaseType of
+    btProcptr: begin Result := 'Proc: '+inttostr(tbtu32(p.Dta^)); end;
+    btU8: str(tbtu8(p.dta^), Result);
+    btS8: str(tbts8(p.dta^), Result);
+    btU16: str(tbtu16(p.dta^), Result);
+    btS16: str(tbts16(p.dta^), Result);
+    btU32: str(tbtu32(p.dta^), Result);
+    btS32: str(tbts32(p.dta^), Result);
+    btSingle: str(tbtsingle(p.dta^), Result);
+    btDouble: str(tbtdouble(p.dta^), Result);
+    btExtended: str(tbtextended(p.dta^), Result);
+    btString: Result := makestring(tbtString(p.dta^));
+    btPChar:
+      begin
+        if PansiChar(p.dta^) = nil then
+          Result := 'nil'
+        else
+          Result := MakeString(PAnsiChar(p.dta^));
+      end;
+    btchar: Result := MakeString(tbtchar(p.dta^));
+    {$IFNDEF PS_NOWIDESTRING}
+    btwidechar: Result := MakeWString(tbtwidechar(p.dta^));
+    btWideString: Result := MakeWString(tbtwidestring(p.dta^));
+    {$ENDIF}
+    {$IFNDEF PS_NOINT64}btS64: str(tbts64(p.dta^), Result);{$ENDIF}
+    btStaticArray, btArray:
+      begin
+        Result := '';
+        if p.aType.BaseType = btStaticArray then
+          n := TPSTypeRec_StaticArray(p.aType).Size
+        else
+          n := PSDynArrayGetLength(Pointer(p.dta^), p.aType);
+        for i := 0 to n-1 do begin
+          if Result <> '' then
+            Result := Result + ', ';
+          Result := Result + PSVariantToString(PSGetArrayField(p, i), '');
+        end;
+        Result := '[' + Result + ']';
+      end;
+    btRecord:
+      begin
+        Result := '';
+        n := TPSTypeRec_Record(p.aType).FFieldTypes.Count;
+        for i := 0 to n-1 do begin
+          if Result <> '' then
+            Result := Result + ', ';
+          Result := Result + PSVariantToString(PSGetRecField(p, i), '');
+        end;
+        Result := '(' + Result + ')';
+      end;
+    btPointer: Result := 'Nil';
+    btClass, btInterface:
+      begin
+        Result := ClassVariantInfo(p, ClassProperties)
+      end;
+  else
+    Result := tbtString(RPS_Invalid);
+  end;
+end;
+
+
+
+function TIFErrorToString(x: TPSError; const Param: tbtString): tbtString;
+begin
+  Result := PSErrorToString(x,param);
+end;
+
+function PSErrorToString(x: TPSError; const Param: tbtString): tbtString;
+begin
+  case x of
+    ErNoError: Result := tbtString(RPS_NoError);
+    erCannotImport: Result := tbtString(Format (RPS_CannotImport, [Safestr(Param)]));
+    erInvalidType: Result := tbtString(RPS_InvalidType);
+    ErInternalError: Result := tbtString(RPS_InternalError);
+    erInvalidHeader: Result := tbtString(RPS_InvalidHeader);
+    erInvalidOpcode: Result := tbtString(RPS_InvalidOpcode);
+    erInvalidOpcodeParameter: Result := tbtString(RPS_InvalidOpcodeParameter);
+    erNoMainProc: Result := tbtString(RPS_NoMainProc);
+    erOutOfGlobalVarsRange: Result := tbtString(RPS_OutOfGlobalVarsRange);
+    erOutOfProcRange: Result := tbtString(RPS_OutOfProcRange);
+    ErOutOfRange: Result := tbtString(RPS_OutOfRange);
+    erOutOfStackRange: Result := tbtString(RPS_OutOfStackRange);
+    ErTypeMismatch: Result := tbtString(RPS_TypeMismatch);
+    erUnexpectedEof: Result := tbtString(RPS_UnexpectedEof);
+    erVersionError: Result := tbtString(RPS_VersionError);
+    ErDivideByZero: Result := tbtString(RPS_DivideByZero);
+    erMathError: Result := tbtString(RPS_MathError);
+    erCouldNotCallProc: begin Result := tbtString(RPS_CouldNotCallProc); if (Param <> '') then Result := result +' ('+Param+')'; end;
+    erOutofRecordRange: Result := tbtString(RPS_OutofRecordRange);
+    erNullPointerException: Result := tbtString(RPS_NullPointerException);
+    erNullVariantError: Result := tbtString(RPS_NullVariantError);
+    erOutOfMemory: Result := tbtString(RPS_OutOfMemory);
+    erException: Result := tbtString(Format (RPS_Exception, [Param]));
+    erInterfaceNotSupported: Result := tbtString(RPS_InterfaceNotSupported);
+    erCustomError: Result := Param;
+      else
+    Result := tbtString(RPS_UnknownError);
+  end;
+  //
+end;
+
+
+procedure TPSTypeRec.CalcSize;
+begin
+  case BaseType of
+    btVariant: FRealSize := sizeof(Variant);
+    btChar, bts8, btU8: FrealSize := 1 ;
+    {$IFNDEF PS_NOWIDESTRING}btWideChar, {$ENDIF}bts16, btU16: FrealSize := 2;
+    {$IFNDEF PS_NOWIDESTRING}btWideString, {$ENDIF}{$IFNDEF PS_NOINTERFACES}btInterface, {$ENDIF}btSingle, bts32, btU32,
+    btclass, btPChar, btString: FrealSize := 4;
+    btProcPtr: FRealSize := 2 * sizeof(Pointer) + sizeof(Cardinal);
+    btCurrency: FrealSize := Sizeof(Currency);
+    btPointer: FRealSize := 12; // ptr, type, freewhendone
+    btDouble{$IFNDEF PS_NOINT64}, bts64{$ENDIF}: FrealSize := 8;
+    btExtended: FrealSize := SizeOf(Extended);
+    btReturnAddress: FrealSize := Sizeof(TBTReturnAddress);
+  else
+    FrealSize := 0;
+  end;
+end;
+
+constructor TPSTypeRec.Create(Owner: TPSExec);
+begin
+  inherited Create;
+  FAttributes := TPSRuntimeAttributes.Create(Owner);
+end;
+
+destructor TPSTypeRec.Destroy;
+begin
+  FAttributes.Free;
+  inherited destroy;
+end;
+
+{ TPSTypeRec_Record }
+
+procedure TPSTypeRec_Record.CalcSize;
+begin
+  inherited;
+  FrealSize := TPSTypeRec(FFieldTypes[FFieldTypes.Count-1]).RealSize +
+    Cardinal(RealFieldOffsets[RealFieldOffsets.Count -1]);
+end;
+
+constructor TPSTypeRec_Record.Create(Owner: TPSExec);
+begin
+  inherited Create(Owner);
+  FRealFieldOffsets := TPSList.Create;
+  FFieldTypes := TPSList.Create;
+end;
+
+destructor TPSTypeRec_Record.Destroy;
+begin
+  FFieldTypes.Free;
+  FRealFieldOffsets.Free;
+  inherited Destroy;
+end;
+
+
+const
+  RTTISize = sizeof(TPSVariant);
+
+procedure InitializeVariant(p: Pointer; aType: TPSTypeRec);
+var
+  t: TPSTypeRec;
+  i: Longint;
+begin
+  case aType.BaseType of
+    btChar, bts8, btU8: tbtu8(p^) := 0;
+    {$IFNDEF PS_NOWIDESTRING}btWideChar, {$ENDIF}bts16, btU16: tbtu16(p^) := 0;
+    btSingle, bts32, btU32,
+    btPChar, btString, {$IFNDEF PS_NOWIDESTRING}btWideString, {$ENDIF}btClass,
+    btInterface, btArray: tbtu32(P^) := 0;
+    btPointer:
+      begin
+        Pointer(p^) := nil;
+        Pointer(Pointer(IPointer(p)+4)^) := nil;
+        Pointer(Pointer(IPointer(p)+8)^) := nil;
+      end;
+    btProcPtr:
+      begin
+        Longint(p^) := 0;
+        Pointer(Pointer(IPointer(p)+4)^) := nil;
+        Pointer(Pointer(IPointer(p)+8)^) := nil;
+      end;
+    btCurrency: tbtCurrency(P^) := 0;
+    btDouble{$IFNDEF PS_NOINT64}, bts64{$ENDIF}: {$IFNDEF PS_NOINT64}tbtS64(P^) := 0{$ELSE}tbtdouble(p^) := 0 {$ENDIF};
+    btExtended: tbtExtended(p^) := 0;
+    btVariant: Initialize(Variant(p^));
+    btReturnAddress:; // there is no point in initializing a return address
+    btRecord:
+      begin
+        for i := 0 to TPSTypeRec_Record(aType).FFieldTypes.Count -1 do
+        begin
+          t := TPSTypeRec_Record(aType).FieldTypes[i];
+          InitializeVariant(P, t);
+          p := Pointer(IPointer(p) + t.FrealSize);
+        end;
+      end;
+    btStaticArray:
+      begin
+        t := TPSTypeRec_Array(aType).ArrayType;
+        for i := 0 to TPSTypeRec_StaticArray(aType).Size -1 do
+        begin
+          InitializeVariant(p, t);
+          p := Pointer(IPointer(p) + t.RealSize);
+        end;
+      end;
+    btSet:
+      begin
+        FillChar(p^, TPSTypeRec_Set(aType).RealSize, 0);
+      end;
+  end;
+end;
+
+procedure DestroyHeapVariant2(v: Pointer; aType: TPSTypeRec); forward;
+
+const
+  NeedFinalization = [btStaticArray, btRecord, btArray, btPointer, btVariant {$IFNDEF PS_NOINTERFACES}, btInterface{$ENDIF}, btString {$IFNDEF PS_NOWIDESTRING},btWideString{$ENDIF}];
+
+procedure FinalizeVariant(p: Pointer; aType: TPSTypeRec);
+var
+  t: TPSTypeRec;
+  elsize: Cardinal;
+  i, l: Longint;
+  darr: Pointer;
+begin
+  case aType.BaseType of
+    btString: tbtString(p^) := '';
+    {$IFNDEF PS_NOWIDESTRING}btWideString: tbtwidestring(p^) := '';{$ENDIF}
+    {$IFNDEF PS_NOINTERFACES}btInterface:
+      begin
+        {$IFNDEF DELPHI3UP}
+        if IUnknown(p^) <> nil then
+          IUnknown(p^).Release;
+        {$ENDIF}
+        IUnknown(p^) := nil;
+      end; {$ENDIF}
+    btVariant:
+    begin
+      try
+        Finalize(Variant(p^));
+      except
+      end;
+    end;
+    btPointer:
+      if Pointer(Pointer(IPointer(p)+8)^) <> nil then
+      begin
+        DestroyHeapVariant2(Pointer(p^), Pointer(Pointer(IPointer(p)+4)^));
+        Pointer(p^) := nil;
+      end;
+    btArray:
+      begin
+        if IPointer(P^) = 0 then exit;
+        darr := Pointer(IPointer(p^) - 8);
+        if Longint(darr^) < 0 then exit;// refcount < 0 means don't free
+        Dec(Longint(darr^));
+        if Longint(darr^) <> 0 then exit;
+        t := TPSTypeRec_Array(aType).ArrayType;
+        elsize := t.RealSize;
+        darr := Pointer(IPointer(darr) + 4);
+        l := Longint(darr^);
+        darr := Pointer(IPointer(darr) + 4);
+        case t.BaseType of
+          btString, {$IFNDEF PS_NOWIDESTRING}btWideString, {$ENDIF}{$IFNDEF PS_NOINTERFACES}btInterface, {$ENDIF}btArray, btStaticArray,
+          btRecord, btPointer, btVariant:
+            begin
+              for i := 0 to l -1 do
+              begin
+                FinalizeVariant(darr, t);
+                darr := Pointer(IPointer(darr) + elsize);
+              end;
+            end;
+        end;
+        FreeMem(Pointer(IPointer(p^) - 8), Cardinal(l) * elsize + 8);
+        Pointer(P^) := nil;
+      end;
+    btRecord:
+      begin
+        for i := 0 to TPSTypeRec_Record(aType).FFieldTypes.Count -1 do
+        begin
+          t := TPSTypeRec_Record(aType).FieldTypes[i];
+          case t.BaseType of
+            btString, {$IFNDEF PS_NOWIDESTRING}btWideString, {$ENDIF}{$IFNDEF PS_NOINTERFACES}btInterface, {$ENDIF}btArray, btStaticArray,
+            btRecord: FinalizeVariant(p, t);
+          end;
+          p := Pointer(IPointer(p) + t.FrealSize);
+        end;
+      end;
+    btStaticArray:
+      begin
+        t := TPSTypeRec_Array(aType).ArrayType;
+        case t.BaseType of
+          btString, {$IFNDEF PS_NOWIDESTRING}btWideString, {$ENDIF}{$IFNDEF PS_NOINTERFACES}btInterface, {$ENDIF}btArray, btStaticArray,
+          btRecord: ;
+          else Exit;
+        end;
+        for i := 0 to TPSTypeRec_StaticArray(aType).Size -1 do
+        begin
+          FinalizeVariant(p, t);
+          p := Pointer(IPointer(p) + t.RealSize);
+        end;
+      end;
+  end;
+end;
+
+function CreateHeapVariant2(aType: TPSTypeRec): Pointer;
+begin
+  GetMem(Result, aType.RealSize);
+  InitializeVariant(Result, aType);
+end;
+
+procedure DestroyHeapVariant2(v: Pointer; aType: TPSTypeRec);
+begin
+  if v = nil then exit;
+  if atype.BaseType in NeedFinalization then
+    FinalizeVariant(v, aType);
+  FreeMem(v, aType.RealSize);
+end;
+
+
+function CreateHeapVariant(aType: TPSTypeRec): PPSVariant;
+var
+  aSize: Longint;
+begin
+  aSize := aType.RealSize + RTTISize;
+  GetMem(Result, aSize);
+  Result.FType := aType;
+  InitializeVariant(Pointer(IPointer(Result)+4), aType);
+end;
+
+procedure DestroyHeapVariant(v: PPSVariant);
+begin
+  if v = nil then exit;
+  if v.FType.BaseType in NeedFinalization then
+    FinalizeVariant(Pointer(IPointer(v)+4), v.FType);
+  FreeMem(v, v.FType.RealSize + RTTISize);
+end;
+
+procedure FreePSVariantList(l: TPSList);
+var
+  i: Longint;
+begin
+  for i:= l.count -1 downto 0 do
+    DestroyHeapVariant(l[i]);
+  l.free;
+end;
+
+procedure FreePIFVariantList(l: TPSList);
+begin
+  FreePsVariantList(l);
+end;
+
+{ TPSExec }
+
+procedure TPSExec.ClearFunctionList;
+var
+  x: PProcRec;
+  l: Longint;
+begin
+  for l := FAttributeTypes.Count -1 downto 0 do
+  begin
+    TPSAttributeType(FAttributeTypes.Data^[l]).Free;
+  end;
+  FAttributeTypes.Clear;
+
+  for l := 0 to FRegProcs.Count - 1 do
+  begin
+    x := FRegProcs.Data^[l];
+    if @x^.FreeProc <> nil then x^.FreeProc(Self, x);
+    Dispose(x);
+  end;
+  FRegProcs.Clear;
+  RegisterStandardProcs;
+end;
+
+class function TPSExec.About: tbtString;
+begin
+  Result := 'RemObjects Pascal Script. Copyright (c) 2004 by RemObjects Software';
+end;
+
+procedure TPSExec.Cleanup;
+var
+  I: Longint;
+  p: Pointer;
+begin
+  if FStatus <> isLoaded then
+    exit;
+  FStack.Clear;
+  FTempVars.Clear;
+  for I := Longint(FGlobalVars.Count) - 1 downto 0 do
+  begin
+    p := FGlobalVars.Items[i];
+    if PIFTypeRec(P^).BaseType in NeedFinalization then
+      FinalizeVariant(Pointer(IPointer(p)+4), Pointer(P^));
+    InitializeVariant(Pointer(IPointer(p)+4), Pointer(P^));
+  end;
+end;
+
+procedure TPSExec.Clear;
+var
+  I: Longint;
+  temp: PPSResource;
+  Proc: TPSResourceFreeProc;
+  pp: TPSExceptionHandler;
+begin
+  for i := Longint(FExceptionStack.Count) -1 downto 0 do
+  begin
+    pp := FExceptionStack.Data^[i];
+    pp.Free;
+  end;
+  for i := Longint(FResources.Count) -1 downto 0 do
+  begin
+    Temp := FResources.Data^[i];
+    Proc := Temp^.Proc;
+    Proc(Self, Temp^.P);
+    Dispose(Temp);
+  end;
+  for i := Longint(FExportedVars.Count) -1 downto 0 do
+    Dispose(PPSExportedVar(FExportedVars.Data^[I]));
+  for I := Longint(FProcs.Count) - 1downto 0  do
+    TPSProcRec(FProcs.Data^[i]).Destroy;
+  FProcs.Clear;
+  FGlobalVars.Clear;
+  FStack.Clear;
+  for I := Longint(FTypes.Count) - 1downto 0  do
+    TPSTypeRec(FTypes.Data^[i]).Free;
+  FTypes.Clear;
+  FStatus := isNotLoaded;
+  FResources.Clear;
+  FExportedVars.Clear;
+  FExceptionStack.Clear;
+  FCurrStackBase := InvalidVal;
+end;
+
+constructor TPSExec.Create;
+begin
+  inherited Create;
+  FAttributeTypes := TPSList.Create;
+  FExceptionStack := TPSList.Create;
+  FCallCleanup := False;
+  FResources := TPSList.Create;
+  FTypes := TPSList.Create;
+  FProcs := TPSList.Create;
+  FGlobalVars := TPSStack.Create;
+  FTempVars := TPSStack.Create;
+  FMainProc := 0;
+  FStatus := isNotLoaded;
+  FRegProcs := TPSList.Create;
+  FExportedVars := TPSList.create;
+  FSpecialProcList := TPSList.Create;
+  RegisterStandardProcs;
+  FReturnAddressType := TPSTypeRec.Create(self);
+  FReturnAddressType.BaseType := btReturnAddress;
+  FReturnAddressType.CalcSize;
+  FVariantType := TPSTypeRec.Create(self);
+  FVariantType.BaseType := btVariant;
+  FVariantType.CalcSize;
+  FVariantArrayType := TPSTypeRec_Array.Create(self);
+  FVariantArrayType.BaseType := btArray;
+  FVariantArrayType.CalcSize;
+  TPSTypeRec_Array(FVariantArrayType).ArrayType := FVariantType;
+  FStack := TPSStack.Create;
+end;
+
+destructor TPSExec.Destroy;
+var
+  I: Longint;
+  x: PProcRec;
+  P: PSpecialProc;
+begin
+  Clear;
+  FReturnAddressType.Free;
+  FVariantType.Free;
+  FVariantArrayType.Free;
+
+  if ExObject <> nil then ExObject.Free;
+  for I := FSpecialProcList.Count -1 downto 0 do
+  begin
+    P := FSpecialProcList.Data^[I];
+    Dispose(p);
+  end;
+  FResources.Free;
+  FExportedVars.Free;
+  FTempVars.Free;
+  FStack.Free;
+  FGlobalVars.Free;
+  FProcs.Free;
+  FTypes.Free;
+  FSpecialProcList.Free;
+  for i := FRegProcs.Count - 1 downto 0 do
+  begin
+    x := FRegProcs.Data^[i];
+    if @x^.FreeProc <> nil then x^.FreeProc(Self, x);
+    Dispose(x);
+  end;
+  FRegProcs.Free;
+  FExceptionStack.Free;
+  for i := FAttributeTypes.Count -1 downto 0 do
+  begin
+    TPSAttributeType(FAttributeTypes[i]).Free;
+  end;
+  FAttributeTypes.Free;
+  inherited Destroy;
+end;
+
+procedure TPSExec.ExceptionProc(proc, Position: Cardinal; Ex: TPSError; const s: tbtString; NewObject: TObject);
+var
+  d, l: Longint;
+  pp: TPSExceptionHandler;
+begin
+  ExProc := proc;
+  ExPos := Position;
+  ExEx := Ex;
+  ExParam := s;
+  if ExObject <> nil then
+    ExObject.Free;
+  ExObject := NewObject;
+  if Ex = eNoError then Exit;
+  for d := FExceptionStack.Count -1 downto 0 do
+  begin
+    pp := FExceptionStack[d];
+    if Cardinal(FStack.Count) > pp.StackSize then
+    begin
+      for l := Longint(FStack.count) -1 downto Longint(pp.StackSize) do
+        FStack.Pop;
+    end;
+    if pp.CurrProc = nil then // no point in continuing
+    begin
+      pp.Free;
+      FExceptionStack.DeleteLast;
+
+      FCurrStackBase := InvalidVal;
+      FStatus := isPaused;
+      exit;
+    end;
+    FCurrProc := pp.CurrProc;
+    FData := FCurrProc.Data;
+    FDataLength := FCurrProc.Length;
+
+    FCurrStackBase := pp.BasePtr;
+    if pp.FinallyOffset <> InvalidVal then
+    begin
+      FCurrentPosition := pp.FinallyOffset;
+      pp.FinallyOffset := InvalidVal;
+      Exit;
+    end else if (pp.ExceptOffset <> InvalidVal) and (pp.ExceptOffset <> Cardinal(InvalidVal -1)) then
+    begin
+        FCurrentPosition := pp.ExceptOffset;
+      pp.ExceptOffset := Cardinal(InvalidVal -1);
+      pp.ExceptionObject := ExObject;
+      pp.ExceptionData := ExEx;
+      pp.ExceptionParam := ExParam;
+      ExObject := nil;
+      ExEx := ENoError;
+      Exit;
+    end else if pp.Finally2Offset <> InvalidVal then
+    begin
+      FCurrentPosition := pp.Finally2Offset;
+      pp.Finally2Offset := InvalidVal;
+      Exit;
+    end;
+    pp.Free;
+    FExceptionStack.DeleteLast;
+  end;
+  if FStatus <> isNotLoaded then
+    FStatus := isPaused;
+end;
+
+function LookupProc(List: TPSList; const Name: ShortString): PProcRec;
+var
+  h, l: Longint;
+  p: PProcRec;
+begin
+  h := MakeHash(Name);
+  for l := List.Count - 1 downto 0 do
+  begin
+    p := List.Data^[l];
+    if (p^.Hash = h) and (p^.Name = Name) then
+    begin
+      Result := List[l];
+      exit;
+    end;
+  end;
+  Result := nil;
+end;
+
+function TPSExec.ImportProc(const Name: ShortString; proc: TPSExternalProcRec): Boolean;
+var
+  u: PProcRec;
+  fname: tbtString;
+  I, fnh: Longint;
+  P: PSpecialProc;
+
+begin
+  if name = '' then
+  begin
+    fname := proc.Decl;
+    fname := copy(fname, 1, pos(tbtchar(':'), fname)-1);
+    fnh := MakeHash(fname);
+    for I := FSpecialProcList.Count -1 downto 0 do
+    begin
+      p := FSpecialProcList[I];
+      IF (p^.name = '') or ((p^.namehash = fnh) and (p^.name = fname)) then
+      begin
+        if p^.P(Self, Proc, p^.tag) then
+        begin
+          Result := True;
+          exit;
+        end;
+      end;
+    end;
+    Result := FAlse;
+    exit;
+  end;
+  u := LookupProc(FRegProcs, Name);
+  if u = nil then begin
+    Result := False;
+    exit;
+  end;
+  proc.ProcPtr := u^.ProcPtr;
+  proc.Ext1 := u^.Ext1;
+  proc.Ext2 := u^.Ext2;
+  Result := True;
+end;
+
+function TPSExec.RegisterFunctionName(const Name: tbtString; ProcPtr: TPSProcPtr; Ext1, Ext2: Pointer): PProcRec;
+var
+  p: PProcRec;
+  s: tbtString;
+begin
+  s := FastUppercase(Name);
+  New(p);
+  p^.Name := s;
+  p^.Hash := MakeHash(s);
+  p^.ProcPtr := ProcPtr;
+  p^.FreeProc := nil;
+  p.Ext1 := Ext1;
+  p^.Ext2 := Ext2;
+  FRegProcs.Add(p);
+  Result := P;
+end;
+
+function TPSExec.LoadData(const s: tbtString): Boolean;
+var
+  HDR: TPSHeader;
+  Pos: Cardinal;
+
+  function read(var Data; Len: Cardinal): Boolean;
+  begin
+    if Longint(Pos + Len) <= Length(s) then begin
+      Move(s[Pos + 1], Data, Len);
+      Pos := Pos + Len;
+      read := True;
+    end
+    else
+      read := False;
+  end;
+  function ReadAttributes(Dest: TPSRuntimeAttributes): Boolean;
+  var
+    Count: Cardinal;
+    i: Integer;
+
+    function ReadAttrib: Boolean;
+    var
+      NameLen: Longint;
+      Name: tbtString;
+      TypeNo: Cardinal;
+      i, h, FieldCount: Longint;
+      att: TPSRuntimeAttribute;
+      varp: PIFVariant;
+
+    begin
+      if (not Read(NameLen, 4)) or (NameLen > Length(s) - Longint(Pos)) then
+      begin
+        CMD_Err(ErOutOfRange);
+        Result := false;
+        exit;
+      end;
+      SetLength(Name, NameLen);
+      if not Read(Name[1], NameLen) then
+      begin
+        CMD_Err(ErOutOfRange);
+        Result := false;
+        exit;
+      end;
+      if not Read(FieldCount, 4) then
+      begin
+        CMD_Err(ErOutOfRange);
+        Result := false;
+        exit;
+      end;
+      att := Dest.Add;
+      att.AttribType := Name;
+      att.AttribTypeHash := MakeHash(att.AttribType);
+      for i := 0 to FieldCount -1 do
+      begin
+        if (not Read(TypeNo, 4)) or (TypeNo >= Cardinal(FTypes.Count)) then
+        begin
+          CMD_Err(ErOutOfRange);
+          Result := false;
+          exit;
+        end;
+
+        varp := att.AddValue(FTypes[TypeNo]);
+        case VarP^.FType.BaseType of
+          btSet:
+            begin
+              if not read(PPSVariantSet(varp).Data, TPSTypeRec_Set(varp.FType).aByteSize) then
+              begin
+                CMD_Err(erOutOfRange);
+
+                DestroyHeapVariant(VarP);
+                Result := False;
+                exit;
+              end;
+            end;
+          bts8, btchar, btU8: if not read(PPSVariantU8(VarP)^.data, 1) then
+          begin
+              CMD_Err(erOutOfRange);
+              DestroyHeapVariant(VarP);
+              Result := False;
+              exit;
+            end;
+          bts16, {$IFNDEF PS_NOWIDESTRING}btwidechar,{$ENDIF} btU16: if not read(PPSVariantU16(Varp)^.Data, SizeOf(TbtU16)) then begin
+              CMD_Err(ErOutOfRange);
+              DestroyHeapVariant(VarP);
+              Result := False;
+              exit;
+            end;
+          bts32, btU32:
+            begin
+              if FCurrentPosition + 3 >= FDataLength then
+              begin
+                Cmd_Err(erOutOfRange);
+                DestroyHeapVariant(VarP);
+                Result := False;
+                exit;;
+              end;
+              PPSVariantU32(varp)^.Data := Cardinal((@FData^[FCurrentPosition])^);
+              Inc(FCurrentPosition, 4);
+            end;
+          btProcPtr:
+            begin
+              if FCurrentPosition + 3 >= FDataLength then
+              begin
+                Cmd_Err(erOutOfRange);
+                DestroyHeapVariant(VarP);
+                Result := False;
+                exit;;
+              end;
+              PPSVariantU32(varp)^.Data := Cardinal((@FData^[FCurrentPosition])^);
+              if PPSVariantU32(varp)^.Data = 0 then
+              begin
+                PPSVariantProcPtr(varp)^.Ptr := nil;
+                PPSVariantProcPtr(varp)^.Self := nil;
+              end;
+              Inc(FCurrentPosition, 4);
+            end;
+          {$IFNDEF PS_NOINT64}
+          bts64: if not read(PPSVariantS64(VarP)^.Data, sizeof(tbts64)) then
+            begin
+              CMD_Err(erOutOfRange);
+              DestroyHeapVariant(VarP);
+              Result := False;
+              exit;
+            end;
+          {$ENDIF}
+          btSingle: if not read(PPSVariantSingle(VarP)^.Data, SizeOf(TbtSingle))
+            then begin
+              CMD_Err(erOutOfRange);
+              DestroyHeapVariant(VarP);
+              Result := False;
+              exit;
+            end;
+          btDouble: if not read(PPSVariantDouble(varp)^.Data, SizeOf(TbtDouble))
+            then begin
+              CMD_Err(erOutOfRange);
+              DestroyHeapVariant(VarP);
+              Result := False;
+              exit;
+            end;
+          btExtended: if not read(PPSVariantExtended(varp)^.Data, SizeOf(TbtExtended))
+            then begin
+              CMD_Err(erOutOfRange);
+              DestroyHeapVariant(VarP);
+              Result := False;
+              exit;
+            end;
+          btCurrency: if not read(PPSVariantExtended(varp)^.Data, SizeOf(tbtCurrency))
+            then begin
+              CMD_Err(erOutOfRange);
+              DestroyHeapVariant(VarP);
+              Result := False;
+              exit;
+            end;
+          btPchar, btString:
+          begin
+            if not read(NameLen, 4) then
+            begin
+                Cmd_Err(erOutOfRange);
+                DestroyHeapVariant(VarP);
+                Result := False;
+                exit;
+              end;
+              Inc(FCurrentPosition, 4);
+              SetLength(PPSVariantAString(varp)^.Data, NameLen);
+              if not read(PPSVariantAString(varp)^.Data[1], NameLen) then begin
+                CMD_Err(erOutOfRange);
+                DestroyHeapVariant(VarP);
+                Result := False;
+                exit;
+              end;
+            end;
+          {$IFNDEF PS_NOWIDESTRING}
+          btWidestring:
+            begin
+              if not read(NameLen, 4) then
+              begin
+                Cmd_Err(erOutOfRange);
+                DestroyHeapVariant(VarP);
+                Result := False;
+                exit;
+              end;
+              Inc(FCurrentPosition, 4);
+              SetLength(PPSVariantWString(varp).Data, NameLen);
+              if not read(PPSVariantWString(varp).Data[1], NameLen*2) then begin
+                CMD_Err(erOutOfRange);
+                DestroyHeapVariant(VarP);
+                Result := False;
+                exit;
+              end;
+            end;
+          {$ENDIF}
+        else begin
+            CMD_Err(erInvalidType);
+            DestroyHeapVariant(VarP);
+            Result := False;
+            exit;
+          end;
+        end;
+      end;
+      h := MakeHash(att.AttribType);
+      for i := FAttributeTypes.Count -1 downto 0 do
+      begin
+        if (TPSAttributeType(FAttributeTypes.Data^[i]).TypeNameHash = h) and
+          (TPSAttributeType(FAttributeTypes.Data^[i]).TypeName = att.AttribType) then
+        begin
+          if not TPSAttributeType(FAttributeTypes.Data^[i]).UseProc(Self, att.AttribType, Att) then
+          begin
+            Result := False;
+            exit;
+          end;
+        end;
+      end;
+      Result := True;
+    end;
+
+
+  begin
+    if not Read(Count, 4) then
+    begin
+      CMD_Err(erOutofRange);
+      Result := false;
+      exit;
+    end;
+    for i := 0 to Count -1 do
+    begin
+      if not ReadAttrib then
+      begin
+        Result := false;
+        exit;
+      end;
+    end;
+    Result := True;
+  end;
+
+{$WARNINGS OFF}
+
+  function LoadTypes: Boolean;
+  var
+    currf: TPSType;
+    Curr: PIFTypeRec;
+    fe: Boolean;
+    l2, l: Longint;
+    d: Cardinal;
+
+    function resolve(Dta: TPSTypeRec_Record): Boolean;
+    var
+      offs, l: Longint;
+    begin
+      offs := 0;
+      for l := 0 to Dta.FieldTypes.Count -1 do
+      begin
+        Dta.RealFieldOffsets.Add(Pointer(offs));
+        offs := offs + TPSTypeRec(Dta.FieldTypes[l]).RealSize;
+      end;
+      Result := True;
+    end;
+  begin
+    LoadTypes := True;
+    for l := 0 to HDR.TypeCount - 1 do begin
+      if not read(currf, SizeOf(currf)) then begin
+        cmd_err(erUnexpectedEof);
+        LoadTypes := False;
+        exit;
+      end;
+      if (currf.BaseType and 128) <> 0 then begin
+        fe := True;
+        currf.BaseType := currf.BaseType - 128;
+      end else
+        fe := False;
+      case currf.BaseType of
+        {$IFNDEF PS_NOINT64}bts64, {$ENDIF}
+        btU8, btS8, btU16, btS16, btU32, btS32, btSingle, btDouble, btCurrency,
+        btExtended, btString, btPointer, btPChar,
+        btVariant, btChar{$IFNDEF PS_NOWIDESTRING}, btWideString, btWideChar{$ENDIF}: begin
+            curr := TPSTypeRec.Create(self);
+            Curr.BaseType := currf.BaseType;
+            FTypes.Add(Curr);
+          end;
+        btClass:
+          begin
+            Curr := TPSTypeRec_Class.Create(self);
+            if (not Read(d, 4)) or (d > 255) then
+            begin
+              curr.Free;
+              cmd_err(erUnexpectedEof);
+              LoadTypes := False;
+              exit;
+            end;
+            setlength(TPSTypeRec_Class(Curr).FCN, d);
+            if not Read(TPSTypeRec_Class(Curr).FCN[1], d) then
+            begin
+              curr.Free;
+              cmd_err(erUnexpectedEof);
+              LoadTypes := False;
+              exit;
+            end;
+            Curr.BaseType := currf.BaseType;
+            FTypes.Add(Curr);
+          end;
+        btProcPtr:
+          begin
+            Curr := TPSTypeRec_ProcPtr.Create(self);
+            if (not Read(d, 4)) or (d > 255) then
+            begin
+              curr.Free;
+              cmd_err(erUnexpectedEof);
+              LoadTypes := False;
+              exit;
+            end;
+            setlength(TPSTypeRec_ProcPtr(Curr).FParamInfo, d);
+            if not Read(TPSTypeRec_ProcPtr(Curr).FParamInfo[1], d) then
+            begin
+              curr.Free;
+              cmd_err(erUnexpectedEof);
+              LoadTypes := False;
+              exit;
+            end;
+            Curr.BaseType := currf.BaseType;
+            FTypes.Add(Curr);
+          end;
+{$IFNDEF PS_NOINTERFACES}
+        btInterface:
+          begin
+            Curr := TPSTypeRec_Interface.Create(self);
+            if not Read(TPSTypeRec_Interface(Curr).FGUID, Sizeof(TGuid)) then
+            begin
+              curr.Free;
+              cmd_err(erUnexpectedEof);
+              LoadTypes := False;
+              exit;
+            end;
+            Curr.BaseType := currf.BaseType;
+            FTypes.Add(Curr);
+          end;
+{$ENDIF}
+        btSet:
+          begin
+            Curr := TPSTypeRec_Set.Create(self);
+            if not Read(d, 4) then
+            begin
+              curr.Free;
+              cmd_err(erUnexpectedEof);
+              LoadTypes := False;
+              exit;
+            end;
+            if (d > 256) then
+            begin
+              curr.Free;
+              cmd_err(erTypeMismatch);
+              LoadTypes := False;
+              exit;
+            end;
+
+            TPSTypeRec_Set(curr).aBitSize := d;
+            TPSTypeRec_Set(curr).aByteSize := TPSTypeRec_Set(curr).aBitSize shr 3;
+            if (TPSTypeRec_Set(curr).aBitSize and 7) <> 0 then inc(TPSTypeRec_Set(curr).fbytesize);
+            Curr.BaseType := currf.BaseType;
+            FTypes.Add(Curr);
+          end;
+        btStaticArray:
+          begin
+            curr := TPSTypeRec_StaticArray.Create(self);
+            if not Read(d, 4) then
+            begin
+              curr.Free;
+              cmd_err(erUnexpectedEof);
+              LoadTypes := False;
+              exit;
+            end;
+            if (d >= FTypes.Count) then
+            begin
+              curr.Free;
+              cmd_err(erTypeMismatch);
+              LoadTypes := False;
+              exit;
+            end;
+            TPSTypeRec_StaticArray(curr).ArrayType := FTypes[d];
+            if not Read(d, 4) then
+            begin
+              curr.Free;
+              cmd_err(erUnexpectedEof);
+              LoadTypes := False;
+              exit;
+            end;
+            if d > (MaxInt div 4) then
+            begin
+              curr.Free;
+              cmd_err(erUnexpectedEof);
+              LoadTypes := False;
+              exit;
+            end;
+            TPSTypeRec_StaticArray(curr).Size := d;
+            if not Read(d,4) then                                             //<-additional StartOffset
+            begin
+              curr.Free;
+              cmd_err(erUnexpectedEof);
+              LoadTypes:=false;
+              Exit;
+            end;
+            TPSTypeRec_StaticArray(curr).StartOffset:=d;
+
+            Curr.BaseType := currf.BaseType;
+            FTypes.Add(Curr);
+          end;
+        btArray: begin
+            Curr := TPSTypeRec_Array.Create(self);
+            if not read(d, 4) then
+            begin // Read type
+              curr.Free;
+              cmd_err(erUnexpectedEof);
+              LoadTypes := False;
+              exit;
+            end;
+            if (d >= FTypes.Count) then
+            begin
+              curr.Free;
+              cmd_err(erTypeMismatch);
+              LoadTypes := False;
+              exit;
+            end;
+            Curr.BaseType := currf.BaseType;
+            TPSTypeRec_Array(curr).ArrayType := FTypes[d];
+            FTypes.Add(Curr);
+          end;
+        btRecord:
+          begin
+            curr := TPSTypeRec_Record.Create(self);
+            if not read(d, 4) or (d = 0) then
+            begin
+              curr.Free;
+              cmd_err(erUnexpectedEof);
+              LoadTypes := false;
+              exit;
+            end;
+            while d > 0 do
+            begin
+              if not Read(l2, 4) then
+              begin
+                curr.Free;
+                cmd_err(erUnexpectedEof);
+                LoadTypes := false;
+                exit;
+              end;
+              if Cardinal(l2) >= FTypes.Count then
+              begin
+                curr.Free;
+                cmd_err(ErOutOfRange);
+                LoadTypes := false;
+                exit;
+              end;
+              TPSTypeRec_Record(curR).FFieldTypes.Add(FTypes[l2]);
+              Dec(D);
+            end;
+            if not resolve(TPSTypeRec_Record(curr)) then
+            begin
+              curr.Free;
+              cmd_err(erInvalidType);
+              LoadTypes := False;
+              exit;
+            end;
+            Curr.BaseType := currf.BaseType;
+            FTypes.Add(Curr);
+          end;
+      else begin
+          LoadTypes := False;
+          CMD_Err(erInvalidType);
+          exit;
+        end;
+      end;
+      if fe then begin
+        if not read(d, 4) then begin
+          cmd_err(erUnexpectedEof);
+          LoadTypes := False;
+          exit;
+        end;
+        if d > PSAddrNegativeStackStart then
+        begin
+          cmd_err(erInvalidType);
+          LoadTypes := False;
+          exit;
+        end;
+        SetLength(Curr.FExportName, d);
+        if not read(Curr.fExportName[1], d) then
+        begin
+          cmd_err(erUnexpectedEof);
+          LoadTypes := False;
+          exit;
+        end;
+        Curr.ExportNameHash := MakeHash(Curr.ExportName);
+      end;
+      curr.CalcSize;
+      if HDR.PSBuildNo >= 21 then // since build 21 we support attributes
+      begin
+        if not ReadAttributes(Curr.Attributes) then
+        begin
+          LoadTypes := False;
+          exit;
+        end;
+      end;
+    end;
+  end;
+
+  function LoadProcs: Boolean;
+  var
+    Rec: TPSProc;
+    n: tbtString;
+    b: Byte;
+    l, L2, L3: Longint;
+    Curr: TPSProcRec;
+  begin
+    LoadProcs := True;
+    for l := 0 to HDR.ProcCount - 1 do begin
+      if not read(Rec, SizeOf(Rec)) then begin
+        cmd_err(erUnexpectedEof);
+        LoadProcs := False;
+        exit;
+      end;
+      if (Rec.Flags and 1) <> 0 then
+      begin
+        Curr := TPSExternalProcRec.Create(Self);
+        if not read(b, 1) then begin
+          Curr.Free;
+          cmd_err(erUnexpectedEof);
+          LoadProcs := False;
+          exit;
+        end;
+        SetLength(n, b);
+        if not read(n[1], b) then begin
+          Curr.Free;
+          cmd_err(erUnexpectedEof);
+          LoadProcs := False;
+          exit;
+        end;
+        TPSExternalProcRec(Curr).Name := n;
+        if (Rec.Flags and 3 = 3) then
+        begin
+          if (not Read(L2, 4)) or (L2 > Length(s) - Pos) then
+          begin
+            Curr.Free;
+            cmd_err(erUnexpectedEof);
+            LoadProcs := False;
+            exit;
+          end;
+          SetLength(n, L2);
+          Read(n[1], L2); // no check is needed
+          TPSExternalProcRec(Curr).FDecl := n;
+        end;
+        if not ImportProc(TPSExternalProcRec(Curr).Name, TPSExternalProcRec(Curr)) then begin
+          if TPSExternalProcRec(Curr).Name <> '' then
+            CMD_Err2(erCannotImport, TPSExternalProcRec(Curr).Name)
+          else
+            CMD_Err2(erCannotImport, TPSExternalProcRec(curr).Decl);
+          Curr.Free;
+          LoadProcs := False;
+          exit;
+        end;
+      end else begin
+        Curr := TPSInternalProcRec.Create(Self);
+        if not read(L2, 4) then begin
+          Curr.Free;
+          cmd_err(erUnexpectedEof);
+          LoadProcs := False;
+          exit;
+        end;
+        if not read(L3, 4) then begin
+          Curr.Free;
+          cmd_err(erUnexpectedEof);
+          LoadProcs := False;
+          exit;
+        end;
+        if (L2 < 0) or (L2 >= Length(s)) or (L2 + L3 > Length(s)) or (L3 = 0) then begin
+          Curr.Free;
+          cmd_err(erUnexpectedEof);
+          LoadProcs := False;
+          exit;
+        end;
+
+        GetMem(TPSInternalProcRec(Curr).FData, L3);
+        Move(s[L2 + 1], TPSInternalProcRec(Curr).FData^, L3);
+        TPSInternalProcRec(Curr).FLength := L3;
+        if (Rec.Flags and 2) <> 0 then begin // exported
+          if not read(L3, 4) then begin
+            Curr.Free;
+            cmd_err(erUnexpectedEof);
+            LoadProcs := False;
+            exit;
+          end;
+          if L3 > PSAddrNegativeStackStart then begin
+            Curr.Free;
+            cmd_err(erUnexpectedEof);
+            LoadProcs := False;
+            exit;
+          end;
+          SetLength(TPSInternalProcRec(Curr).FExportName, L3);
+          if not read(TPSInternalProcRec(Curr).FExportName[1], L3) then begin
+            Curr.Free;
+            cmd_err(erUnexpectedEof);
+            LoadProcs := False;
+            exit;
+          end;
+          if not read(L3, 4) then begin
+            Curr.Free;
+            cmd_err(erUnexpectedEof);
+            LoadProcs := False;
+            exit;
+          end;
+          if L3 > PSAddrNegativeStackStart then begin
+            Curr.Free;
+            cmd_err(erUnexpectedEof);
+            LoadProcs := False;
+            exit;
+          end;
+          SetLength(TPSInternalProcRec(Curr).FExportDecl, L3);
+          if not read(TPSInternalProcRec(Curr).FExportDecl[1], L3) then begin
+            Curr.Free;
+            cmd_err(erUnexpectedEof);
+            LoadProcs := False;
+            exit;
+          end;
+          TPSInternalProcRec(Curr).FExportNameHash := MakeHash(TPSInternalProcRec(Curr).ExportName);
+        end;
+      end;
+      if (Rec.Flags and 4) <> 0 then
+      begin
+        if not ReadAttributes(Curr.Attributes) then
+        begin
+          Curr.Free;
+          LoadProcs := False;
+          exit;
+        end;
+      end;
+      FProcs.Add(Curr);
+    end;
+  end;
+{$WARNINGS ON}
+
+  function LoadVars: Boolean;
+  var
+    l, n: Longint;
+    e: PPSExportedVar;
+    Rec: TPSVar;
+    Curr: PIfVariant;
+  begin
+    LoadVars := True;
+    for l := 0 to HDR.VarCount - 1 do begin
+      if not read(Rec, SizeOf(Rec)) then begin
+        cmd_err(erUnexpectedEof);
+        LoadVars := False;
+        exit;
+      end;
+      if Rec.TypeNo >= HDR.TypeCount then begin
+        cmd_err(erInvalidType);
+        LoadVars := False;
+        exit;
+      end;
+      Curr := FGlobalVars.PushType(FTypes.Data^[Rec.TypeNo]);
+      if Curr = nil then begin
+        cmd_err(erInvalidType);
+        LoadVars := False;
+        exit;
+      end;
+      if (Rec.Flags and 1) <> 0 then
+      begin
+        if not read(n, 4) then begin
+          cmd_err(erUnexpectedEof);
+          LoadVars := False;
+          exit;
+        end;
+        new(e);
+        try
+          SetLength(e^.FName, n);
+          if not Read(e^.FName[1], n) then
+          begin
+            dispose(e);
+            cmd_err(erUnexpectedEof);
+            LoadVars := False;
+            exit;
+          end;
+          e^.FNameHash := MakeHash(e^.FName);
+          e^.FVarNo := FGlobalVars.Count;
+          FExportedVars.Add(E);
+        except
+          dispose(e);
+          cmd_err(erInvalidType);
+          LoadVars := False;
+          exit;
+        end;
+      end;
+    end;
+  end;
+
+begin
+  Clear;
+  Pos := 0;
+  LoadData := False;
+  if not read(HDR, SizeOf(HDR)) then
+  begin
+    CMD_Err(erInvalidHeader);
+    exit;
+  end;
+  if HDR.HDR <> PSValidHeader then
+  begin
+    CMD_Err(erInvalidHeader);
+    exit;
+  end;
+  if (HDR.PSBuildNo > PSCurrentBuildNo) or (HDR.PSBuildNo < PSLowBuildSupport) then begin
+    CMD_Err(erInvalidHeader);
+    exit;
+  end;
+  if not LoadTypes then
+  begin
+    Clear;
+    exit;
+  end;
+  if not LoadProcs then
+  begin
+    Clear;
+    exit;
+  end;
+  if not LoadVars then
+  begin
+    Clear;
+    exit;
+  end;
+  if (HDR.MainProcNo >= FProcs.Count) and (HDR.MainProcNo <> InvalidVal)then begin
+    CMD_Err(erNoMainProc);
+    Clear;
+    exit;
+  end;
+  // Load Import Table
+  FMainProc := HDR.MainProcNo;
+  FStatus := isLoaded;
+  Result := True;
+end;
+
+
+procedure TPSExec.Pause;
+begin
+  if FStatus = isRunning then
+    FStatus := isPaused;
+end;
+
+function TPSExec.ReadData(var Data; Len: Cardinal): Boolean;
+begin
+  if FCurrentPosition + Len <= FDataLength then begin
+    Move(FData^[FCurrentPosition], Data, Len);
+    FCurrentPosition := FCurrentPosition + Len;
+    Result := True;
+  end
+  else
+    Result := False;
+end;
+
+procedure TPSExec.CMD_Err(EC: TPSError); // Error
+begin
+  CMD_Err3(ec, '', nil);
+end;
+
+procedure VNSetPointerTo(const Src: TPSVariantIFC; Data: Pointer; aType: TPSTypeRec);
+begin
+  if Src.aType.BaseType = btPointer then
+  begin
+    if atype.BaseType in NeedFinalization then
+      FinalizeVariant(src.Dta, Src.aType);
+    Pointer(Src.Dta^) := Data;
+    Pointer(Pointer(IPointer(Src.Dta)+4)^) := aType;
+    Pointer(Pointer(IPointer(Src.Dta)+8)^) := nil;
+  end;
+end;
+
+function VNGetUInt(const Src: TPSVariantIFC): Cardinal;
+begin
+  Result := PSGetUInt(Src.Dta, Src.aType);
+end;
+
+{$IFNDEF PS_NOINT64}
+function VNGetInt64(const Src: TPSVariantIFC): Int64;
+begin
+  Result := PSGetInt64(Src.Dta, Src.aType);
+end;
+{$ENDIF}
+
+function VNGetReal(const Src: TPSVariantIFC): Extended;
+begin
+  Result := PSGetReal(Src.Dta, Src.aType);
+end;
+
+function VNGetCurrency(const Src: TPSVariantIFC): Currency;
+begin
+  Result := PSGetCurrency(Src.Dta, Src.aType);
+end;
+
+function VNGetInt(const Src: TPSVariantIFC): Longint;
+begin
+  Result := PSGetInt(Src.Dta, Src.aType);
+end;
+
+function VNGetAnsiString(const Src: TPSVariantIFC): tbtString;
+begin
+  Result := PSGetAnsiString(Src.Dta, Src.aType);
+end;
+
+{$IFNDEF PS_NOWIDESTRING}
+function VNGetWideString(const Src: TPSVariantIFC): tbtWideString;
+begin
+  Result := PSGetWideString(Src.Dta, Src.aType);
+end;
+{$ENDIF}
+
+procedure VNSetUInt(const Src: TPSVariantIFC; const Val: Cardinal);
+var
+  Dummy: Boolean;
+begin
+  PSSetUInt(Src.Dta, Src.aType, Dummy, Val);
+end;
+
+{$IFNDEF PS_NOINT64}
+procedure VNSetInt64(const Src: TPSVariantIFC; const Val: Int64);
+var
+  Dummy: Boolean;
+begin
+  PSSetInt64(Src.Dta, Src.aType, Dummy, Val);
+end;
+{$ENDIF}
+
+procedure VNSetReal(const Src: TPSVariantIFC; const Val: Extended);
+var
+  Dummy: Boolean;
+begin
+  PSSetReal(Src.Dta, Src.aType, Dummy, Val);
+end;
+
+procedure VNSetCurrency(const Src: TPSVariantIFC; const Val: Currency);
+var
+  Dummy: Boolean;
+begin
+  PSSetCurrency(Src.Dta, Src.aType, Dummy, Val);
+end;
+
+procedure VNSetInt(const Src: TPSVariantIFC; const Val: Longint);
+var
+  Dummy: Boolean;
+begin
+  PSSetInt(Src.Dta, Src.aType, Dummy, Val);
+end;
+
+procedure VNSetAnsiString(const Src: TPSVariantIFC; const Val: tbtString);
+var
+  Dummy: Boolean;
+begin
+  PSSetAnsiString(Src.Dta, Src.aType, Dummy, Val);
+end;
+
+function VNGetString(const Src: TPSVariantIFC): tbtString;
+begin
+  {$IFDEF DELPHI2009UP}
+  Result := VNGetWideString(Src);
+  {$ELSE}
+  Result := VNGetAnsiString(Src);
+  {$ENDIF}
+end;
+
+procedure VNSetString(const Src: TPSVariantIFC; const Val: String);
+begin
+  {$IFDEF DELPHI2009UP}
+  VNSetWideString(Src, Val);
+  {$ELSE}
+  VNSetAnsiString(Src, Val);
+  {$ENDIF}
+end;
+
+{$IFNDEF PS_NOWIDESTRING}
+procedure VNSetWideString(const Src: TPSVariantIFC; const Val: tbtWideString);
+var
+  Dummy: Boolean;
+begin
+  PSSetWideString(Src.Dta, Src.aType, Dummy, Val);
+end;
+{$ENDIF}
+
+function VGetUInt(const Src: PIFVariant): Cardinal;
+begin
+  Result := PSGetUInt(@PPSVariantData(src).Data, src.FType);
+end;
+
+{$IFNDEF PS_NOINT64}
+function VGetInt64(const Src: PIFVariant): Int64;
+begin
+  Result := PSGetInt64(@PPSVariantData(src).Data, src.FType);
+end;
+{$ENDIF}
+
+function VGetReal(const Src: PIFVariant): Extended;
+begin
+  Result := PSGetReal(@PPSVariantData(src).Data, src.FType);
+end;
+
+function VGetCurrency(const Src: PIFVariant): Currency;
+begin
+  Result := PSGetCurrency(@PPSVariantData(src).Data, src.FType);
+end;
+
+function VGetInt(const Src: PIFVariant): Longint;
+begin
+  Result := PSGetInt(@PPSVariantData(src).Data, src.FType);
+end;
+
+function VGetAnsiString(const Src: PIFVariant): tbtString;
+begin
+  Result := PSGetAnsiString(@PPSVariantData(src).Data, src.FType);
+end;
+
+{$IFNDEF PS_NOWIDESTRING}
+function VGetWideString(const Src: PIFVariant): tbtWideString;
+begin
+  Result := PSGetWideString(@PPSVariantData(src).Data, src.FType);
+end;
+{$ENDIF}
+
+
+procedure VSetPointerTo(const Src: PIFVariant; Data: Pointer; aType: TPSTypeRec);
+var
+  temp: TPSVariantIFC;
+begin
+  if (Atype = nil) or (Data = nil) or (Src = nil) then raise Exception.Create(RPS_InvalidVariable);
+  temp.Dta := @PPSVariantData(Src).Data;
+  temp.aType := Src.FType;
+  temp.VarParam := false;
+  VNSetPointerTo(temp, Data, AType);
+end;
+
+procedure VSetUInt(const Src: PIFVariant; const Val: Cardinal);
+var
+  Dummy: Boolean;
+begin
+  PSSetUInt(@PPSVariantData(src).Data, src.FType, Dummy, Val);
+end;
+
+{$IFNDEF PS_NOINT64}
+procedure VSetInt64(const Src: PIFVariant; const Val: Int64);
+var
+  Dummy: Boolean;
+begin
+  PSSetInt64(@PPSVariantData(src).Data, src.FType, Dummy, Val);
+end;
+{$ENDIF}
+
+procedure VSetReal(const Src: PIFVariant; const Val: Extended);
+var
+  Dummy: Boolean;
+begin
+  PSSetReal(@PPSVariantData(src).Data, src.FType, Dummy, Val);
+end;
+
+procedure VSetCurrency(const Src: PIFVariant; const Val: Currency);
+var
+  Dummy: Boolean;
+begin
+  PSSetCurrency(@PPSVariantData(src).Data, src.FType, Dummy, Val);
+end;
+
+procedure VSetInt(const Src: PIFVariant; const Val: Longint);
+var
+  Dummy: Boolean;
+begin
+  PSSetInt(@PPSVariantData(src).Data, src.FType, Dummy, Val);
+end;
+
+procedure VSetAnsiString(const Src: PIFVariant; const Val: tbtString);
+var
+  Dummy: Boolean;
+begin
+  PSSetAnsiString(@PPSVariantData(src).Data, src.FType, Dummy, Val);
+end;
+
+function VGetString(const Src: PIFVariant): String;
+begin
+  {$IFDEF DELPHI2009UP}
+  Result := PSGetWideString(@PPSVariantData(src).Data, src.FType);
+  {$ELSE}
+  Result := PSGetAnsiString(@PPSVariantData(src).Data, src.FType);
+  {$ENDIF}
+end;
+
+procedure VSetString(const Src: PIFVariant; const Val: string);
+var
+  Dummy: Boolean;
+begin
+  {$IFDEF DELPHI2009UP}
+  PSSetWideString(@PPSVariantData(src).Data, src.FType, Dummy, Val);
+  {$ELSE}
+  PSSetAnsiString(@PPSVariantData(src).Data, src.FType, Dummy, Val);
+  {$ENDIF}
+end;
+
+
+{$IFNDEF PS_NOWIDESTRING}
+procedure VSetWideString(const Src: PIFVariant; const Val: tbtWideString);
+var
+  Dummy: Boolean;
+begin
+  PSSetWideString(@PPSVariantData(src).Data, src.FType, Dummy, Val);
+end;
+{$ENDIF}
+
+{$IFNDEF PS_NOWIDESTRING}
+function VarToWideStr(const Data: Variant): tbtWideString;
+begin
+  if not VarIsNull(Data) then
+    Result := Data
+  else
+    Result := '';
+end;
+{$ENDIF}
+
+function PSGetUInt(Src: Pointer; aType: TPSTypeRec): Cardinal;
+begin
+  if aType.BaseType = btPointer then
+  begin
+    atype := PIFTypeRec(Pointer(IPointer(Src)+4)^);
+    Src := Pointer(Src^);
+    if (src = nil) or (aType = nil) then raise Exception.Create(RPS_TypeMismatch);
+  end;
+  case aType.BaseType of
+    btU8: Result := tbtu8(src^);
+    btS8: Result := tbts8(src^);
+    btU16: Result := tbtu16(src^);
+    btS16: Result := tbts16(src^);
+    btU32: Result := tbtu32(src^);
+    btS32: Result := tbts32(src^);
+{$IFNDEF PS_NOINT64}    btS64: Result := tbts64(src^);
+{$ENDIF}
+    btChar: Result := Ord(tbtchar(Src^));
+{$IFNDEF PS_NOWIDESTRING}    btWideChar: Result := Ord(tbtwidechar(Src^));{$ENDIF}
+    btVariant:
+      case VarType(Variant(Src^)) of
+        varString:
+          if Length(VarToStr(Variant(Src^))) = 1 then
+            Result := Ord(VarToStr(Variant(Src^))[1])
+          else
+            raise Exception.Create(RPS_TypeMismatch);
+{$IFNDEF PS_NOWIDESTRING}
+        varOleStr:
+          if Length(VarToWideStr(Variant(Src^))) = 1 then
+            Result := Ord(VarToWideStr(Variant(Src^))[1])
+          else
+            raise Exception.Create(RPS_TypeMismatch);
+{$ENDIF}
+       else
+        Result := Variant(src^);
+       end;
+    else raise Exception.Create(RPS_TypeMismatch);
+  end;
+end;
+
+function PSGetObject(Src: Pointer; aType: TPSTypeRec): TObject;
+begin
+  if aType.BaseType = btPointer then
+  begin
+    atype := PIFTypeRec(Pointer(IPointer(Src)+4)^);
+    Src := Pointer(Src^);
+    if (src = nil) or (aType = nil) then raise Exception.Create(RPS_TypeMismatch);
+  end;
+  case aType.BaseType of
+    btClass: Result := TObject(Src^);
+    else raise Exception.Create(RPS_TypeMismatch);
+  end;
+end;
+
+procedure PSSetObject(Src: Pointer; aType: TPSTypeRec; var Ok: Boolean; Const val: TObject);
+begin
+  if aType.BaseType = btPointer then
+  begin
+    atype := PIFTypeRec(Pointer(IPointer(Src)+4)^);
+    Src := Pointer(Src^);
+    if (src = nil) or (aType = nil) then raise Exception.Create(RPS_TypeMismatch);
+  end;
+  case aType.BaseType of
+    btClass: TObject(Src^) := Val;
+    else raise Exception.Create(RPS_TypeMismatch);
+  end;
+end;
+
+
+{$IFNDEF PS_NOINT64}
+function PSGetInt64(Src: Pointer; aType: TPSTypeRec): Int64;
+begin
+  if aType.BaseType = btPointer then
+  begin
+    atype := PIFTypeRec(Pointer(IPointer(Src)+4)^);
+    Src := Pointer(Src^);
+    if (src = nil) or (aType = nil) then raise Exception.Create(RPS_TypeMismatch);
+  end;
+  case aType.BaseType of
+    btU8: Result := tbtu8(src^);
+    btS8: Result := tbts8(src^);
+    btU16: Result := tbtu16(src^);
+    btS16: Result := tbts16(src^);
+    btU32: Result := tbtu32(src^);
+    btS32: Result := tbts32(src^);
+    btS64: Result := tbts64(src^);
+    btChar: Result := Ord(tbtchar(Src^));
+{$IFNDEF PS_NOWIDESTRING}
+    btWideChar: Result := Ord(tbtwidechar(Src^));
+{$ENDIF}
+{$IFDEF DELPHI6UP}
+    btVariant:   Result := Variant(src^);
+{$ENDIF}
+    else raise Exception.Create(RPS_TypeMismatch);
+  end;
+end;
+{$ENDIF}
+
+function PSGetReal(Src: Pointer; aType: TPSTypeRec): Extended;
+begin
+  if aType.BaseType = btPointer then
+  begin
+    atype := PIFTypeRec(Pointer(IPointer(Src)+4)^);
+    Src := Pointer(Src^);
+    if (src = nil) or (aType = nil) then raise Exception.Create(RPS_TypeMismatch);
+  end;
+  case aType.BaseType of
+    btU8: Result := tbtu8(src^);
+    btS8: Result := tbts8(src^);
+    btU16: Result := tbtu16(src^);
+    btS16: Result := tbts16(src^);
+    btU32: Result := tbtu32(src^);
+    btS32: Result := tbts32(src^);
+{$IFNDEF PS_NOINT64}    btS64: Result := tbts64(src^);{$ENDIF}
+    btSingle: Result := tbtsingle(Src^);
+    btDouble: Result := tbtdouble(Src^);
+    btExtended: Result := tbtextended(Src^);
+    btCurrency: Result := tbtcurrency(Src^);
+    btVariant:  Result := Variant(src^);
+    else raise Exception.Create(RPS_TypeMismatch);
+  end;
+end;
+
+function PSGetCurrency(Src: Pointer; aType: TPSTypeRec): Currency;
+begin
+  if aType.BaseType = btPointer then
+  begin
+    atype := PIFTypeRec(Pointer(IPointer(Src)+4)^);
+    Src := Pointer(Src^);
+    if (src = nil) or (aType = nil) then raise Exception.Create(RPS_TypeMismatch);
+  end;
+  case aType.BaseType of
+    btU8: Result := tbtu8(src^);
+    btS8: Result := tbts8(src^);
+    btU16: Result := tbtu16(src^);
+    btS16: Result := tbts16(src^);
+    btU32: Result := tbtu32(src^);
+    btS32: Result := tbts32(src^);
+{$IFNDEF PS_NOINT64} btS64: Result := tbts64(src^);{$ENDIF}
+    btSingle: Result := tbtsingle(Src^);
+    btDouble: Result := tbtdouble(Src^);
+    btExtended: Result := tbtextended(Src^);
+    btCurrency: Result := tbtcurrency(Src^);
+    btVariant:   Result := Variant(src^);
+    else raise Exception.Create(RPS_TypeMismatch);
+  end;
+end;
+
+
+function PSGetInt(Src: Pointer; aType: TPSTypeRec): Longint;
+begin
+  if aType.BaseType = btPointer then
+  begin
+    atype := PIFTypeRec(Pointer(IPointer(Src)+4)^);
+    Src := Pointer(Src^);
+    if (src = nil) or (aType = nil) then raise Exception.Create(RPS_TypeMismatch);
+  end;
+  case aType.BaseType of
+    btU8: Result := tbtu8(src^);
+    btS8: Result := tbts8(src^);
+    btU16: Result := tbtu16(src^);
+    btS16: Result := tbts16(src^);
+    btU32: Result := tbtu32(src^);
+    btS32: Result := tbts32(src^);
+{$IFNDEF PS_NOINT64} btS64: Result := tbts64(src^);{$ENDIF}
+    btChar: Result := Ord(tbtchar(Src^));
+{$IFNDEF PS_NOWIDESTRING}    btWideChar: Result := Ord(tbtwidechar(Src^));{$ENDIF}
+    btVariant: Result := Variant(src^);
+    else raise Exception.Create(RPS_TypeMismatch);
+  end;
+end;
+
+
+function PSGetAnsiString(Src: Pointer; aType: TPSTypeRec): tbtString;
+begin
+  if aType.BaseType = btPointer then
+  begin
+    atype := PIFTypeRec(Pointer(IPointer(Src)+4)^);
+    Src := Pointer(Src^);
+    if (src = nil) or (aType = nil) then raise Exception.Create(RPS_TypeMismatch);
+  end;
+  case aType.BaseType of
+    btU8: Result := tbtchar(tbtu8(src^));
+    btChar: Result := tbtchar(Src^);
+    btPchar: Result := pansichar(src^);
+{$IFNDEF PS_NOWIDESTRING}    btWideChar: Result := tbtString(tbtwidechar(Src^));{$ENDIF}
+    btString: Result := tbtstring(src^);
+{$IFNDEF PS_NOWIDESTRING}    btWideString: Result := tbtString(tbtwidestring(src^));{$ENDIF}
+    btVariant:  Result := tbtString(Variant(src^));
+    else raise Exception.Create(RPS_TypeMismatch);
+  end;
+end;
+{$IFNDEF PS_NOWIDESTRING}
+function PSGetWideString(Src: Pointer; aType: TPSTypeRec): tbtWideString;
+begin
+  if aType.BaseType = btPointer then
+  begin
+    atype := PIFTypeRec(Pointer(IPointer(Src)+4)^);
+    Src := Pointer(Src^);
+    if (src = nil) or (aType = nil) then raise Exception.Create(RPS_TypeMismatch);
+  end;
+  case aType.BaseType of
+    btU8: Result := chr(tbtu8(src^));
+    btU16: Result := widechar(src^);
+    btChar: Result := tbtwidestring(tbtchar(Src^));
+    btPchar: Result := tbtwidestring(pansichar(src^));
+    btWideChar: Result := tbtwidechar(Src^);
+    btString: Result := tbtwidestring(tbtstring(src^));
+    btWideString: Result := tbtwidestring(src^);
+    btVariant:   Result := Variant(src^);
+    else raise Exception.Create(RPS_TypeMismatch);
+  end;
+end;
+{$ENDIF}
+
+procedure PSSetUInt(Src: Pointer; aType: TPSTypeRec; var Ok: Boolean; const Val: Cardinal);
+begin
+  if (Src = nil) or (aType = nil) then begin Ok := false; exit; end;
+  if aType.BaseType = btPointer then
+  begin
+    atype := PIFTypeRec(Pointer(IPointer(Src)+4)^);
+    Src := Pointer(Src^);
+    if (src = nil) or (aType = nil) then begin Ok := false; exit; end;
+  end;
+  case aType.BaseType of
+    btU8: tbtu8(src^) := Val;
+    btS8: tbts8(src^) := Val;
+    btU16: tbtu16(src^) := Val;
+    btS16: tbts16(src^) := Val;
+    btProcPtr:
+      begin
+        tbtu32(src^) := Val;
+        Pointer(Pointer(IPointer(Src)+4)^) := nil;
+        Pointer(Pointer(IPointer(Src)+8)^) := nil;
+      end;
+    btU32: tbtu32(src^) := Val;
+    btS32: tbts32(src^) := Val;
+{$IFNDEF PS_NOINT64}    btS64: tbts64(src^) := Val;{$ENDIF}
+    btChar: tbtchar(Src^) := tbtChar(Val);
+{$IFNDEF PS_NOWIDESTRING}    btWideChar: tbtwidechar(Src^) := tbtwidechar(Val);{$ENDIF}
+    btSingle: tbtSingle(src^) := Val;
+    btDouble: tbtDouble(src^) := Val;
+    btCurrency: tbtCurrency(src^) := Val;
+    btExtended: tbtExtended(src^) := Val;
+    btVariant:
+      begin
+        try
+          Variant(src^) := {$IFDEF DELPHI6UP}val{$ELSE}tbts32(val){$ENDIF};
+        except
+          Ok := false;
+        end;
+      end;
+    else ok := false;
+  end;
+end;
+
+{$IFNDEF PS_NOINT64}
+procedure PSSetInt64(Src: Pointer; aType: TPSTypeRec; var Ok: Boolean; const Val: Int64);
+begin
+  if (Src = nil) or (aType = nil) then begin Ok := false; exit; end;
+  if aType.BaseType = btPointer then
+  begin
+    atype := PIFTypeRec(Pointer(IPointer(Src)+4)^);
+    Src := Pointer(Src^);
+    if (src = nil) or (aType = nil) then begin Ok := false; exit; end;
+  end;
+  case aType.BaseType of
+    btU8: tbtu8(src^) := Val;
+    btS8: tbts8(src^) := Val;
+    btU16: tbtu16(src^) := Val;
+    btS16: tbts16(src^) := Val;
+    btU32: tbtu32(src^) := Val;
+    btS32: tbts32(src^) := Val;
+    btS64: tbts64(src^) := Val;
+    btChar: tbtchar(Src^) := tbtChar(Val);
+{$IFNDEF PS_NOWIDESTRING}
+    btWideChar: tbtwidechar(Src^) := tbtwidechar(Val);
+{$ENDIF}
+    btSingle: tbtSingle(src^) := Val;
+    btDouble: tbtDouble(src^) := Val;
+    btCurrency: tbtCurrency(src^) := Val;
+    btExtended: tbtExtended(src^) := Val;
+{$IFDEF DELPHI6UP}
+    btVariant:
+      begin
+        try
+          Variant(src^) := Val;
+        except
+          Ok := false;
+        end;
+      end;
+{$ENDIF}
+    else ok := false;
+  end;
+end;
+{$ENDIF}
+
+procedure PSSetReal(Src: Pointer; aType: TPSTypeRec; var Ok: Boolean; const Val: Extended);
+begin
+  if (Src = nil) or (aType = nil) then begin Ok := false; exit; end;
+  if aType.BaseType = btPointer then
+  begin
+    atype := PIFTypeRec(Pointer(IPointer(Src)+4)^);
+    Src := Pointer(Src^);
+    if (src = nil) or (aType = nil) then begin Ok := false; exit; end;
+  end;
+  case aType.BaseType of
+    btSingle: tbtSingle(src^) := Val;
+    btDouble: tbtDouble(src^) := Val;
+    btCurrency: tbtCurrency(src^) := Val;
+    btExtended: tbtExtended(src^) := Val;
+    btVariant:
+      begin
+        try
+          Variant(src^) := Val;
+        except
+          Ok := false;
+        end;
+      end;
+    else ok := false;
+  end;
+end;
+
+procedure PSSetCurrency(Src: Pointer; aType: TPSTypeRec; var Ok: Boolean; const Val: Currency);
+begin
+  if (Src = nil) or (aType = nil) then begin Ok := false; exit; end;
+  if aType.BaseType = btPointer then
+  begin
+    atype := PIFTypeRec(Pointer(IPointer(Src)+4)^);
+    Src := Pointer(Src^);
+    if (src = nil) or (aType = nil) then begin Ok := false; exit; end;
+  end;
+  case aType.BaseType of
+    btSingle: tbtSingle(src^) := Val;
+    btDouble: tbtDouble(src^) := Val;
+    btCurrency: tbtCurrency(src^) := Val;
+    btExtended: tbtExtended(src^) := Val;
+    btVariant:
+      begin
+        try
+          Variant(src^) := Val;
+        except
+          Ok := false;
+        end;
+      end;
+    else ok := false;
+  end;
+end;
+
+procedure PSSetInt(Src: Pointer; aType: TPSTypeRec; var Ok: Boolean; const Val: Longint);
+begin
+  if (Src = nil) or (aType = nil) then begin Ok := false; exit; end;
+  if aType.BaseType = btPointer then
+  begin
+    atype := PIFTypeRec(Pointer(IPointer(Src)+4)^);
+    Src := Pointer(Src^);
+    if (src = nil) or (aType = nil) then begin Ok := false; exit; end;
+  end;
+  case aType.BaseType of
+    btU8: tbtu8(src^) := Val;
+    btS8: tbts8(src^) := Val;
+    btU16: tbtu16(src^) := Val;
+    btS16: tbts16(src^) := Val;
+    btProcPtr:
+      begin
+        tbtu32(src^) := Val;
+        Pointer(Pointer(IPointer(Src)+4)^) := nil;
+        Pointer(Pointer(IPointer(Src)+8)^) := nil;
+      end;
+    btU32: tbtu32(src^) := Val;
+    btS32: tbts32(src^) := Val;
+{$IFNDEF PS_NOINT64}    btS64: tbts64(src^) := Val;{$ENDIF}
+    btChar: tbtchar(Src^) := tbtChar(Val);
+{$IFNDEF PS_NOWIDESTRING}    btWideChar: tbtwidechar(Src^) := tbtwidechar(Val);{$ENDIF}
+    btSingle: tbtSingle(src^) := Val;
+    btDouble: tbtDouble(src^) := Val;
+    btCurrency: tbtCurrency(src^) := Val;
+    btExtended: tbtExtended(src^) := Val;
+    btVariant:
+      begin
+        try
+          Variant(src^) := Val;
+        except
+          Ok := false;
+        end;
+      end;
+    else ok := false;
+  end;
+end;
+
+procedure PSSetAnsiString(Src: Pointer; aType: TPSTypeRec; var Ok: Boolean; const Val: tbtString);
+begin
+  if (Src = nil) or (aType = nil) then begin Ok := false; exit; end;
+  if aType.BaseType = btPointer then
+  begin
+    atype := PIFTypeRec(Pointer(IPointer(Src)+4)^);
+    Src := Pointer(Src^);
+    if (src = nil) or (aType = nil) then begin Ok := false; exit; end;
+  end;
+  case aType.BaseType of
+    btString: tbtstring(src^) := val;
+{$IFNDEF PS_NOWIDESTRING}    btWideString: tbtwidestring(src^) := tbtwidestring(AnsiString(val));{$ENDIF}
+    btVariant:
+      begin
+        try
+          Variant(src^) := Val;
+        except
+          Ok := false;
+        end;
+      end;
+    else ok := false;
+  end;
+end;
+{$IFNDEF PS_NOWIDESTRING}
+procedure PSSetWideString(Src: Pointer; aType: TPSTypeRec; var Ok: Boolean; const Val: tbtWideString);
+begin
+  if (Src = nil) or (aType = nil) then begin Ok := false; exit; end;
+  if aType.BaseType = btPointer then
+  begin
+    atype := PIFTypeRec(Pointer(IPointer(Src)+4)^);
+    Src := Pointer(Src^);
+    if (src = nil) or (aType = nil) then begin Ok := false; exit; end;
+  end;
+  case aType.BaseType of
+    btString: tbtstring(src^) := tbtString(val);
+    btWideString: tbtwidestring(src^) := val;
+    btVariant:
+      begin
+        try
+          Variant(src^) := Val;
+        except
+          Ok := false;
+        end;
+      end;
+    else ok := false;
+  end;
+end;
+{$ENDIF}
+
+function PSGetString(Src: Pointer; aType: TPSTypeRec): string;
+begin
+  {$IFDEF DELPHI2009UP}
+  result := PSGetWideString(Src, aType);
+  {$ELSE}
+  result := PSGetAnsiString(Src, aType);
+  {$ENDIF}
+end;
+
+procedure PSSetString(Src: Pointer; aType: TPSTypeRec; var Ok: Boolean; const Val: String);
+begin
+  {$IFDEF DELPHI2009UP}
+  PSSetWideString(Src, aType, Ok, Val);
+  {$ELSE}
+  PSSetAnsiString(Src, aType, Ok, Val);
+  {$ENDIF}
+end;
+
+
+function CopyArrayContents(dest, src: Pointer; Len: Longint; aType: TPSTypeRec): Boolean; forward;
+
+function CopyRecordContents(dest, src: Pointer; aType: TPSTypeRec_Record): Boolean;
+var
+  o, i: Longint;
+begin
+  for i := 0 to aType.FieldTypes.Count -1 do
+  begin
+    o := Longint(atype.RealFieldOffsets[i]);
+    CopyArrayContents(Pointer(IPointer(Dest)+Cardinal(o)), Pointer(IPointer(Src)+Cardinal(o)), 1, aType.FieldTypes[i]);
+  end;
+  Result := true;
+end;
+
+function CreateArrayFromVariant(Exec: TPSExec; dest: Pointer; src: Variant; DestType: TPSTypeRec): Boolean;
+var
+  i: Integer;
+  r: Pointer;
+  lVarType: TPSTypeRec;
+  v: variant;
+begin
+  lVarType := Exec.FindType2(btVariant);
+  if lVarType = nil then begin result := false; exit; end;
+  PSDynArraySetLength(Pointer(dest^), desttype, VarArrayHighBound(src, 1) - VarArrayLowBound(src, 1) + 1);
+  r := Pointer(Dest^);
+  DestType := TPSTypeRec_Array(DestType).ArrayType;
+  for i := 0 to VarArrayHighBound(src, 1) - VarArrayLowBound(src, 1) do begin
+    v := src[i + VarArrayLowBound(src, 1)];
+    if not Exec.SetVariantValue(r, @v, desttype, lVarType) then begin result := false; exit; end;
+    r := Pointer(Longint(r) + Longint(DestType.RealSize));
+  end;
+  Result := true;
+end;
+
+function CopyArrayContents(dest, src: Pointer; Len: Longint; aType: TPSTypeRec): Boolean;
+var
+  elsize: Cardinal;
+  i: Longint;
+begin
+  try
+    case aType.BaseType of
+      btU8, btS8, btChar:
+        for i := 0 to Len -1 do
+        begin
+          tbtU8(Dest^) := tbtU8(Src^);
+          Dest := Pointer(IPointer(Dest) + 1);
+          Src := Pointer(IPointer(Src) + 1);
+        end;
+      btU16, btS16{$IFNDEF PS_NOWIDESTRING}, btWideChar{$ENDIF}:
+        for i := 0 to Len -1 do
+        begin
+          tbtU16(Dest^) := tbtU16(Src^);
+          Dest := Pointer(IPointer(Dest) + 2);
+          Src := Pointer(IPointer(Src) + 2);
+        end;
+      btProcPtr:
+        for i := 0 to Len -1 do
+        begin
+          tbtU32(Dest^) := tbtU32(Src^);
+          Dest := Pointer(IPointer(Dest) + 4);
+          Src := Pointer(IPointer(Src) + 4);
+          tbtU32(Dest^) := tbtU32(Src^);
+          Dest := Pointer(IPointer(Dest) + 4);
+          Src := Pointer(IPointer(Src) + 4);
+          tbtU32(Dest^) := tbtU32(Src^);
+          Dest := Pointer(IPointer(Dest) + 4);
+          Src := Pointer(IPointer(Src) + 4);
+        end;
+      btU32, btS32, btClass, btSingle, btpchar:
+        for i := 0 to Len -1 do
+        begin
+          tbtU32(Dest^) := tbtU32(Src^);
+          Dest := Pointer(IPointer(Dest) + 4);
+          Src := Pointer(IPointer(Src) + 4);
+        end;
+      btDouble:
+        for i := 0 to Len -1 do
+        begin
+          tbtDouble(Dest^) := tbtDouble(Src^);
+          Dest := Pointer(IPointer(Dest) + 8);
+          Src := Pointer(IPointer(Src) + 8);
+        end;
+      {$IFNDEF PS_NOINT64}bts64:
+        for i := 0 to Len -1 do
+        begin
+          tbts64(Dest^) := tbts64(Src^);
+          Dest := Pointer(IPointer(Dest) + 8);
+          Src := Pointer(IPointer(Src) + 8);
+        end;{$ENDIF}
+      btExtended:
+        for i := 0 to Len -1 do
+        begin
+          tbtExtended(Dest^) := tbtExtended(Src^);
+          Dest := Pointer(IPointer(Dest) + SizeOf(Extended));
+          Src := Pointer(IPointer(Src) + SizeOf(Extended));
+        end;
+      btCurrency:
+        for i := 0 to Len -1 do
+        begin
+          tbtCurrency(Dest^) := tbtCurrency(Src^);
+          Dest := Pointer(IPointer(Dest) + SizeOf(Currency));
+          Src := Pointer(IPointer(Src) + SizeOf(Currency));
+        end;
+      btVariant:
+        for i := 0 to Len -1 do
+        begin
+          variant(Dest^) := variant(Src^);
+          Dest := Pointer(IPointer(Dest) + Sizeof(Variant));
+          Src := Pointer(IPointer(Src) + Sizeof(Variant));
+        end;
+      btString:
+        for i := 0 to Len -1 do
+        begin
+          tbtString(Dest^) := tbtString(Src^);
+          Dest := Pointer(IPointer(Dest) + 4);
+          Src := Pointer(IPointer(Src) + 4);
+        end;
+      {$IFNDEF PS_NOWIDESTRING}btWideString:
+        for i := 0 to Len -1 do
+        begin
+          tbtWideString(Dest^) := tbtWideString(Src^);
+          Dest := Pointer(IPointer(Dest) + 4);
+          Src := Pointer(IPointer(Src) + 4);
+        end;                      {$ENDIF}
+      btStaticArray:
+        begin
+          elSize := aType.RealSize;
+          for i := 0 to Len -1 do
+          begin
+            if not CopyArrayContents(Dest, Src, TPSTypeRec_StaticArray(aType).Size, TPSTypeRec_StaticArray(aType).ArrayType) then
+            begin
+              result := false;
+              exit;
+            end;
+            Dest := Pointer(IPointer(Dest) + elsize);
+            Src := Pointer(IPointer(Src) + elsize);
+          end;
+        end;
+      btArray:
+        begin
+          for i := 0 to Len -1 do
+          begin
+            Pointer(Dest^) := Pointer(Src^);
+            if Pointer(Dest^) <> nil then
+            begin
+              Inc(Longint(Pointer(IPointer(Dest^)-8)^)); // RefCount
+            end;
+            Dest := Pointer(IPointer(Dest) + 4);
+            Src := Pointer(IPointer(Src) + 4);
+          end;
+        end;
+      btRecord:
+        begin
+          elSize := aType.RealSize;
+          for i := 0 to Len -1 do
+          begin
+            if not CopyRecordContents(Dest, Src, TPSTypeRec_Record(aType)) then
+            begin
+              result := false;
+              exit;
+            end;
+            Dest := Pointer(IPointer(Dest) + elsize);
+            Src := Pointer(IPointer(Src) + elsize);
+          end;
+        end;
+      btSet:
+        begin
+          elSize := aType.RealSize;
+          for i := 0 to Len -1 do
+          begin
+            Move(Src^, Dest^, elSize);
+            Dest := Pointer(IPointer(Dest) + elsize);
+            Src := Pointer(IPointer(Src) + elsize);
+          end;
+        end;
+{$IFNDEF PS_NOINTERFACES}
+      btInterface:
+        begin
+          for i := 0 to Len -1 do
+          begin
+            {$IFNDEF DELPHI3UP}
+            if IUnknown(Dest^) <> nil then
+            begin
+              IUnknown(Dest^).Release;
+              IUnknown(Dest^) := nil;
+            end;
+            {$ENDIF}
+            IUnknown(Dest^) := IUnknown(Src^);
+            {$IFNDEF DELPHI3UP}
+            if IUnknown(Dest^) <> nil then
+              IUnknown(Dest^).AddRef;
+            {$ENDIF}
+            Dest := Pointer(IPointer(Dest) + 4);
+            Src := Pointer(IPointer(Src) + 4);
+          end;
+        end;
+{$ENDIF}
+      btPointer:
+        begin
+          if (Pointer(Pointer(IPointer(Dest)+8)^) = nil) and (Pointer(Pointer(IPointer(Src)+8)^) = nil) then
+          begin
+            for i := 0 to Len -1 do
+            begin
+              Pointer(Dest^) := Pointer(Src^);
+              Dest := Pointer(IPointer(Dest) + 4);
+              Src := Pointer(IPointer(Src) + 4);
+              Pointer(Dest^) := Pointer(Src^);
+              Dest := Pointer(IPointer(Dest) + 4);
+              Src := Pointer(IPointer(Src) + 4);
+              Pointer(Dest^) := nil;
+              Dest := Pointer(IPointer(Dest) + 4);
+              Src := Pointer(IPointer(Src) + 4);
+            end;
+          end else begin
+            for i := 0 to Len -1 do
+            begin
+              if Pointer(Pointer(IPointer(Dest)+8)^) <> nil then
+                DestroyHeapVariant2(Pointer(Dest^), Pointer(Pointer(IPointer(Dest)+4)^));
+              if Pointer(Src^) <> nil then
+              begin
+                if Pointer(Pointer(IPointer(Src) + 8)^) = nil then
+                begin
+                  Pointer(Dest^) := Pointer(Src^);
+                  Pointer(Pointer(IPointer(Dest) + 4)^) := Pointer(Pointer(IPointer(Src) + 4)^);
+                  Pointer(Pointer(IPointer(Dest) + 8)^) := Pointer(Pointer(IPointer(Src) + 8)^);
+                end else
+                begin
+                  Pointer(Dest^) := CreateHeapVariant2(Pointer(Pointer(IPointer(Src) + 4)^));
+                  Pointer(Pointer(IPointer(Dest) + 4)^) := Pointer(Pointer(IPointer(Src) + 4)^);
+                  Pointer(Pointer(IPointer(Dest) + 8)^) := Pointer(1);
+                  if not CopyArrayContents(Pointer(Dest^), Pointer(Src^), 1, Pointer(Pointer(IPointer(Dest) + 4)^)) then
+                  begin
+                    Result := false;
+                    exit;
+                  end;
+                end;
+              end else
+              begin
+                Pointer(Dest^) := nil;
+                Pointer(Pointer(IPointer(Dest) + 4)^) := nil;
+                Pointer(Pointer(IPointer(Dest) + 8)^) := nil;
+              end;
+              Dest := Pointer(IPointer(Dest) + 12);
+              Src := Pointer(IPointer(Src) + 12);
+            end;
+          end;
+        end;
+//      btResourcePointer = 15;
+//      btVariant = 16;
+    else
+      Result := False;
+      exit;
+    end;
+  except
+    Result := False;
+    exit;
+  end;
+  Result := true;
+end;
+
+function  GetPSArrayLength(Arr: PIFVariant): Longint;
+begin
+  result := PSDynArrayGetLength(PPSVariantDynamicArray(arr).Data, arr.FType);
+end;
+
+procedure SetPSArrayLength(Arr: PIFVariant; NewLength: Longint);
+begin
+  PSDynArraySetLength(PPSVariantDynamicArray(arr).Data, arr.FType, NewLength);
+end;
+
+
+function PSDynArrayGetLength(arr: Pointer; aType: TPSTypeRec): Longint;
+begin
+  if aType.BaseType <> btArray then raise Exception.Create(RPS_InvalidArray);
+  if arr = nil then Result := 0 else Result := Longint(Pointer(IPointer(arr)-4)^);
+end;
+
+procedure PSDynArraySetLength(var arr: Pointer; aType: TPSTypeRec; NewLength: Longint);
+var
+  elSize, i, OldLen: Longint;
+  p: Pointer;
+begin
+  if aType.BaseType <> btArray then raise Exception.Create(RPS_InvalidArray);
+  OldLen := PSDynArrayGetLength(arr, aType);
+  elSize := TPSTypeRec_Array(aType).ArrayType.RealSize;
+  if (OldLen = 0) and (NewLength = 0) then exit; // already are both 0
+  if (OldLen <> 0) and (Longint(Pointer(IPointer(Arr)-8)^) = 1) then // unique copy of this dynamic array
+  begin
+    for i := NewLength to OldLen -1 do
+    begin
+      if TPSTypeRec_Array(aType).ArrayType.BaseType in NeedFinalization then
+        FinalizeVariant(Pointer(IPointer(arr) + Cardinal(elsize * i)), TPSTypeRec_Array(aType).ArrayType);
+    end;
+    arr := Pointer(IPointer(Arr)-8);
+    if NewLength <= 0 then
+    begin
+      FreeMem(arr, NewLength * elsize + 8);
+      arr := nil;
+      exit;
+    end;
+    ReallocMem(arr, NewLength * elSize + 8);
+    arr := Pointer(IPointer(Arr)+4);
+    Longint(Arr^) := NewLength;
+    arr := Pointer(IPointer(Arr)+4);
+    for i := OldLen to NewLength -1 do
+    begin
+      InitializeVariant(Pointer(IPointer(arr) + Cardinal(elsize * i)), TPSTypeRec_Array(aType).ArrayType);
+    end;
+  end else
+  begin
+    if NewLength = 0 then
+    begin
+      if Longint(Pointer(IPointer(Arr)-8)^) = 1 then
+        FreeMem(Pointer(IPointer(Arr)-8), OldLen * elSize + 8)
+      else if Longint(Pointer(IPointer(Arr)-8)^) > 0 then
+        Dec(Longint(Pointer(IPointer(Arr)-8)^));
+      arr := nil;
+      exit;
+    end;
+    GetMem(p, NewLength * elSize + 8);
+    Longint(p^) := 1;
+    p:= Pointer(IPointer(p)+4);
+    Longint(p^) := NewLength;
+    p := Pointer(IPointer(p)+4);
+    if OldLen <> 0 then
+    begin
+      if OldLen > NewLength then
+        CopyArrayContents(p, arr, NewLength, TPSTypeRec_Array(aType).ArrayType)
+      else
+        CopyArrayContents(p, arr, OldLen, TPSTypeRec_Array(aType).ArrayType);
+      FinalizeVariant(@arr, aType);
+    end;
+    arr := p;
+    for i := OldLen to NewLength -1 do
+    begin
+      InitializeVariant(Pointer(IPointer(arr) + Cardinal(elsize * i)), TPSTypeRec_Array(aType).ArrayType);
+    end;
+  end;
+end;
+
+
+
+{$IFDEF FPC}
+function OleErrorMessage(ErrorCode: HResult): tbtString;
+begin
+  Result := SysErrorMessage(ErrorCode);
+  if Result = '' then
+    Result := Format(RPS_OLEError, [ErrorCode]);
+end;
+
+procedure OleError(ErrorCode: HResult);
+begin
+  raise Exception.Create(OleErrorMessage(ErrorCode));
+end;
+
+procedure OleCheck(Result: HResult);
+begin
+  if Result < 0 then OleError(Result);
+end;
+{$ENDIF}
+
+
+{$IFNDEF DELPHI3UP}
+function OleErrorMessage(ErrorCode: HResult): tbtString;
+begin
+  Result := SysErrorMessage(ErrorCode);
+  if Result = '' then
+    Result := Format(RPS_OLEError, [ErrorCode]);
+end;
+
+procedure OleError(ErrorCode: HResult);
+begin
+  raise Exception.Create(OleErrorMessage(ErrorCode));
+end;
+
+procedure OleCheck(Result: HResult);
+begin
+  if Result < 0 then OleError(Result);
+end;
+
+procedure AssignInterface(var Dest: IUnknown; const Src: IUnknown);
+var
+  OldDest: IUnknown;
+begin
+  { Like Delphi 3+'s _IntfCopy, reference source before releasing old dest.
+    so that self assignment (I := I) works right }
+  OldDest := Dest;
+  Dest := Src;
+  if Src <> nil then
+    Src.AddRef;
+  if OldDest <> nil then
+    OldDest.Release;
+end;
+
+procedure AssignVariantFromIDispatch(var Dest: Variant; const Src: IDispatch);
+begin
+  VarClear(Dest);
+  TVarData(Dest).VDispatch := Src;
+  TVarData(Dest).VType := varDispatch;
+  if Src <> nil then
+    Src.AddRef;
+end;
+
+procedure AssignIDispatchFromVariant(var Dest: IDispatch; const Src: Variant);
+const
+  RPS_InvalidVariantRef = 'Invalid variant ref';
+var
+  NewDest: IDispatch;
+begin
+  case TVarData(Src).VType of
+    varEmpty: NewDest := nil;
+    varDispatch: NewDest := TVarData(Src).VDispatch;
+    varDispatch or varByRef: NewDest := Pointer(TVarData(Src).VPointer^);
+  else
+    raise Exception.Create(RPS_InvalidVariantRef);
+  end;
+  AssignInterface(IUnknown(Dest), NewDest);
+end;
+{$ENDIF}
+
+function TPSExec.SetVariantValue(dest, Src: Pointer; desttype, srctype: TPSTypeRec): Boolean;
+var
+  Tmp: TObject;
+  tt: TPSVariantPointer;
+begin
+  Result := True;
+  try
+    case desttype.BaseType of
+      btSet:
+        begin
+          if desttype = srctype then
+            Move(Src^, Dest^, TPSTypeRec_Set(desttype).aByteSize)
+          else
+            Result := False;
+        end;
+      btU8: tbtu8(Dest^) := PSGetUInt(Src, srctype);
+      btS8: tbts8(Dest^) := PSGetInt(Src, srctype);
+      btU16: tbtu16(Dest^) := PSGetUInt(Src, srctype);
+      btS16: tbts16(Dest^) := PSGetInt(Src, srctype);
+      btProcPtr:
+        begin
+          if srctype.BaseType = btPointer then
+          begin
+            srctype := PIFTypeRec(Pointer(IPointer(Src)+4)^);
+            Src := Pointer(Src^);
+            if (src = nil) or (srctype = nil) then raise Exception.Create(RPS_TypeMismatch);
+          end;
+          case srctype.BaseType of
+            btu32:
+              begin
+                Pointer(Dest^) := Pointer(Src^);
+              end;
+            btProcPtr:
+              begin
+                Pointer(Dest^) := Pointer(Src^);
+                Pointer(Pointer(IPointer(Dest)+4)^) := Pointer(Pointer(IPointer(Src)+4)^);
+                Pointer(Pointer(IPointer(Dest)+8)^) := Pointer(Pointer(IPointer(Src)+8)^);
+              end;
+            else raise Exception.Create(RPS_TypeMismatch);
+          end;
+        end;
+      btU32:
+        begin
+          if srctype.BaseType = btPointer then
+          begin
+            srctype := PIFTypeRec(Pointer(IPointer(Src)+4)^);
+            Src := Pointer(Src^);
+            if (src = nil) or (srctype = nil) then raise Exception.Create(RPS_TypeMismatch);
+          end;
+          case srctype.BaseType of
+            btU8: tbtu32(Dest^) := tbtu8(src^);
+            btS8: tbtu32(Dest^) := tbts8(src^);
+            btU16: tbtu32(Dest^) := tbtu16(src^);
+            btS16: tbtu32(Dest^) := tbts16(src^);
+            btU32: tbtu32(Dest^) := tbtu32(src^);
+            btS32: tbtu32(Dest^) := tbts32(src^);
+        {$IFNDEF PS_NOINT64} btS64: tbtu32(Dest^) := tbts64(src^);{$ENDIF}
+            btChar: tbtu32(Dest^) := Ord(tbtchar(Src^));
+        {$IFNDEF PS_NOWIDESTRING}    btWideChar: tbtu32(Dest^) := Ord(tbtwidechar(Src^));{$ENDIF}
+            btVariant: tbtu32(Dest^) := Variant(src^);
+            else raise Exception.Create(RPS_TypeMismatch);
+          end;
+        end;
+      btS32:
+        begin
+          if srctype.BaseType = btPointer then
+          begin
+            srctype := PIFTypeRec(Pointer(IPointer(Src)+4)^);
+            Src := Pointer(Src^);
+            if (src = nil) or (srctype = nil) then raise Exception.Create(RPS_TypeMismatch);
+          end;
+          case srctype.BaseType of
+            btU8: tbts32(Dest^) := tbtu8(src^);
+            btS8: tbts32(Dest^) := tbts8(src^);
+            btU16: tbts32(Dest^) := tbtu16(src^);
+            btS16: tbts32(Dest^) := tbts16(src^);
+            btU32: tbts32(Dest^) := tbtu32(src^);
+            btS32: tbts32(Dest^) := tbts32(src^);
+        {$IFNDEF PS_NOINT64} btS64: tbts32(Dest^) := tbts64(src^);{$ENDIF}
+            btChar: tbts32(Dest^) := Ord(tbtchar(Src^));
+        {$IFNDEF PS_NOWIDESTRING}  btWideChar: tbts32(Dest^) := Ord(tbtwidechar(Src^));{$ENDIF}
+            btVariant: tbts32(Dest^) := Variant(src^);
+            else raise Exception.Create(RPS_TypeMismatch);
+          end;
+        end;
+      {$IFNDEF PS_NOINT64}
+      btS64: tbts64(Dest^) := PSGetInt64(Src, srctype);
+      {$ENDIF}
+      btSingle:
+        begin
+          if srctype.BaseType = btPointer then
+          begin
+            srctype := PIFTypeRec(Pointer(IPointer(Src)+4)^);
+            Src := Pointer(Src^);
+            if (src = nil) or (srctype = nil) then raise Exception.Create(RPS_TypeMismatch);
+          end;
+          case srctype.BaseType of
+            btU8: tbtsingle(Dest^) := tbtu8(src^);
+            btS8: tbtsingle(Dest^) := tbts8(src^);
+            btU16: tbtsingle(Dest^) := tbtu16(src^);
+            btS16: tbtsingle(Dest^) := tbts16(src^);
+            btU32: tbtsingle(Dest^) := tbtu32(src^);
+            btS32: tbtsingle(Dest^) := tbts32(src^);
+        {$IFNDEF PS_NOINT64}    btS64: tbtsingle(Dest^) := tbts64(src^);{$ENDIF}
+            btSingle: tbtsingle(Dest^) := tbtsingle(Src^);
+            btDouble: tbtsingle(Dest^) := tbtdouble(Src^);
+            btExtended: tbtsingle(Dest^) := tbtextended(Src^);
+            btCurrency: tbtsingle(Dest^) := tbtcurrency(Src^);
+            btVariant:  tbtsingle(Dest^) := Variant(src^);
+            else raise Exception.Create(RPS_TypeMismatch);
+          end;
+        end;
+      btDouble:
+        begin
+          if srctype.BaseType = btPointer then
+          begin
+            srctype := PIFTypeRec(Pointer(IPointer(Src)+4)^);
+            Src := Pointer(Src^);
+            if (src = nil) or (srctype = nil) then raise Exception.Create(RPS_TypeMismatch);
+          end;
+          case srctype.BaseType of
+            btU8: tbtdouble(Dest^) := tbtu8(src^);
+            btS8: tbtdouble(Dest^) := tbts8(src^);
+            btU16: tbtdouble(Dest^) := tbtu16(src^);
+            btS16: tbtdouble(Dest^) := tbts16(src^);
+            btU32: tbtdouble(Dest^) := tbtu32(src^);
+            btS32: tbtdouble(Dest^) := tbts32(src^);
+        {$IFNDEF PS_NOINT64}    btS64: tbtdouble(Dest^) := tbts64(src^);{$ENDIF}
+            btSingle: tbtdouble(Dest^) := tbtsingle(Src^);
+            btDouble: tbtdouble(Dest^) := tbtdouble(Src^);
+            btExtended: tbtdouble(Dest^) := tbtextended(Src^);
+            btCurrency: tbtdouble(Dest^) := tbtcurrency(Src^);
+            btVariant:  tbtdouble(Dest^) := Variant(src^);
+            else raise Exception.Create(RPS_TypeMismatch);
+          end;
+
+        end;
+      btExtended:
+        begin
+          if srctype.BaseType = btPointer then
+          begin
+            srctype := PIFTypeRec(Pointer(IPointer(Src)+4)^);
+            Src := Pointer(Src^);
+            if (src = nil) or (srctype = nil) then raise Exception.Create(RPS_TypeMismatch);
+          end;
+          case srctype.BaseType of
+            btU8: tbtextended(Dest^) := tbtu8(src^);
+            btS8: tbtextended(Dest^) := tbts8(src^);
+            btU16: tbtextended(Dest^) := tbtu16(src^);
+            btS16: tbtextended(Dest^) := tbts16(src^);
+            btU32: tbtextended(Dest^) := tbtu32(src^);
+            btS32: tbtextended(Dest^) := tbts32(src^);
+        {$IFNDEF PS_NOINT64}    btS64: tbtextended(Dest^) := tbts64(src^);{$ENDIF}
+            btSingle: tbtextended(Dest^) := tbtsingle(Src^);
+            btDouble: tbtextended(Dest^) := tbtdouble(Src^);
+            btExtended: tbtextended(Dest^) := tbtextended(Src^);
+            btCurrency: tbtextended(Dest^) := tbtcurrency(Src^);
+            btVariant:  tbtextended(Dest^) := Variant(src^);
+            else raise Exception.Create(RPS_TypeMismatch);
+          end;
+        end;
+      btCurrency: tbtcurrency(Dest^) := PSGetCurrency(Src, srctype);
+      btPChar: pansichar(dest^) := pansichar(PSGetAnsiString(Src, srctype));
+      btString:
+        tbtstring(dest^) := PSGetAnsiString(Src, srctype);
+      btChar: tbtchar(dest^) := tbtchar(PSGetUInt(Src, srctype));
+      {$IFNDEF PS_NOWIDESTRING}
+      btWideString: tbtwidestring(dest^) := PSGetWideString(Src, srctype);
+      btWideChar: tbtwidechar(dest^) := widechar(PSGetUInt(Src, srctype));
+      {$ENDIF}
+      btStaticArray:
+        begin
+          if desttype <> srctype then
+            Result := False
+          else
+            CopyArrayContents(dest, Src, TPSTypeRec_StaticArray(desttype).Size, TPSTypeRec_StaticArray(desttype).ArrayType);
+        end;
+      btArray:
+        begin
+          if (srctype.BaseType = btStaticArray) and (TPSTypeRec_Array(desttype).ArrayType = TPSTypeRec_Array(srctype).ArrayType) then
+          begin
+            PSDynArraySetLength(Pointer(Dest^), desttype, TPSTypeRec_StaticArray(srctype).Size);
+            CopyArrayContents(Pointer(dest^), Src, TPSTypeRec_StaticArray(srctype).Size, TPSTypeRec_StaticArray(srctype).ArrayType);
+          end else if (srctype.BaseType = btvariant) and VarIsArray(Variant(src^)) then
+            Result := CreateArrayFromVariant(Self, dest, Variant(src^), desttype)
+          else if (desttype <> srctype) and not ((desttype.BaseType = btarray) and (srctype.BaseType = btArray)
+            and (TPSTypeRec_Array(desttype).ArrayType = TPSTypeRec_Array(srctype).ArrayType)) then
+            Result := False
+          else
+            CopyArrayContents(dest, src, 1, desttype);
+        end;
+      btRecord:
+        begin
+          if desttype <> srctype then
+            Result := False
+          else
+            CopyArrayContents(dest, Src, 1, desttype);
+        end;
+      btVariant:
+        begin
+{$IFNDEF PS_NOINTERFACES}
+          if srctype.ExportName = 'IDISPATCH' then
+          begin
+            {$IFDEF DELPHI3UP}
+            Variant(Dest^) := IDispatch(Src^);
+            {$ELSE}
+            AssignVariantFromIDispatch(Variant(Dest^), IDispatch(Src^));
+            {$ENDIF}
+          end else
+{$ENDIF}
+          if srctype.BaseType = btVariant then
+            variant(Dest^) := variant(src^)
+          else
+          begin
+            tt.VI.FType := FindType2(btPointer);
+            tt.DestType := srctype;
+            tt.DataDest := src;
+            tt.FreeIt := False;
+            Result := PIFVariantToVariant(@tt, variant(dest^));
+          end;
+        end;
+      btClass:
+        begin
+          if srctype.BaseType = btClass then
+            TObject(Dest^) := TObject(Src^)
+          else
+            Result := False;
+        end;
+{$IFNDEF PS_NOINTERFACES}
+      btInterface:
+        begin
+          if Srctype.BaseType = btVariant then
+          begin
+            if desttype.ExportName = 'IDISPATCH' then
+            begin
+              {$IFDEF Delphi3UP}
+              IDispatch(Dest^) := IDispatch(Variant(Src^));
+              {$ELSE}
+              AssignIDispatchFromVariant(IDispatch(Dest^), Variant(Src^));
+              {$ENDIF}
+            end else
+              Result := False;
+{$IFDEF Delphi3UP}
+          end else
+          if srctype.BaseType = btClass then
+          begin
+            if (TObject(Src^) = nil) or not TObject(Src^).GetInterface(TPSTypeRec_Interface(desttype).Guid, IUnknown(Dest^)) then
+            begin
+              Result := false;
+              Cmd_Err(erInterfaceNotSupported);
+              exit;
+            end;
+{$ENDIF}
+          end else if srctype.BaseType = btInterface then
+          begin
+            {$IFNDEF Delphi3UP}
+            if IUnknown(Dest^) <> nil then
+            begin
+              IUnknown(Dest^).Release;
+              IUnknown(Dest^) := nil;
+            end;
+            {$ENDIF}
+            IUnknown(Dest^) := IUnknown(Src^);
+            {$IFNDEF Delphi3UP}
+            if IUnknown(Dest^) <> nil then
+              IUnknown(Dest^).AddRef;
+            {$ENDIF}
+          end else
+            Result := False;
+        end;
+{$ENDIF}
+    else begin
+        Result := False;
+      end;
+    end;
+    if Result = False then
+      CMD_Err(ErTypeMismatch);
+  except
+    {$IFDEF DELPHI6UP}
+    Tmp := AcquireExceptionObject;
+    {$ELSE}
+    if RaiseList <> nil then
+    begin
+      Tmp := Exception(PRaiseFrame(RaiseList)^.ExceptObject);
+      PRaiseFrame(RaiseList)^.ExceptObject := nil;
+    end else
+      Tmp := nil;
+    {$ENDIF}
+    if Tmp <> nil then
+    begin
+      if Tmp is EPSException then
+      begin
+        Result := False;
+        ExceptionProc(EPSException(tmp).ProcNo, EPSException(tmp).ProcPos, erCustomError, tbtString(EPSException(tmp).Message), nil);
+        exit;
+      end else
+      if Tmp is EDivByZero then
+      begin
+        Result := False;
+        CMD_Err3(erDivideByZero, '', Tmp);
+        Exit;
+      end;
+      if Tmp is EZeroDivide then
+      begin
+        Result := False;
+        CMD_Err3(erDivideByZero, '', Tmp);
+        Exit;
+      end;
+      if Tmp is EMathError then
+      begin
+        Result := False;
+        CMD_Err3(erMathError, '', Tmp);
+        Exit;
+      end;
+    end;
+    if (tmp <> nil) and (Tmp is Exception) then
+      CMD_Err3(erException, tbtString(Exception(Tmp).Message), Tmp)
+    else
+      CMD_Err3(erException, '', Tmp);
+    Result := False;
+  end;
+end;
+
+function SpecImport(Sender: TPSExec; p: TPSExternalProcRec; Tag: Pointer): Boolean; forward;
+
+
+function Class_IS(Self: TPSExec; Obj: TObject; var2type: TPSTypeRec): Boolean;
+var
+  R: TPSRuntimeClassImporter;
+  cc: TPSRuntimeClass;
+begin
+  if Obj = nil then
+  begin
+    Result := false;
+    exit;
+  end;
+  r := Self.FindSpecialProcImport(SpecImport);
+  if R = nil then
+  begin
+    Result := false;
+    exit;
+  end;
+  cc := r.FindClass(var2type.ExportName);
+  if cc = nil then
+  begin
+    result := false;
+    exit;
+  end;
+  try
+    Result := Obj is cc.FClass;
+  except
+    Result := false;
+  end;
+end;
+
+function TPSExec.DoBooleanCalc(var1, Var2, into: Pointer; var1Type, var2type, intotype: TPSTypeRec; Cmd: Cardinal): Boolean;
+var
+  b: Boolean;
+  Tmp: TObject;
+  tvar: Variant;
+
+
+  procedure SetBoolean(b: Boolean; var Ok: Boolean);
+  begin
+    Ok := True;
+    case IntoType.BaseType of
+      btU8: tbtu8(Into^):= Cardinal(b);
+      btS8: tbts8(Into^) := Longint(b);
+      btU16: tbtu16(Into^) := Cardinal(b);
+      btS16: tbts16(Into^) := Longint(b);
+      btU32: tbtu32(Into^) := Cardinal(b);
+      btS32: tbts32(Into^) := Longint(b);
+      btVariant: Variant(Into^) := b;
+    else begin
+        CMD_Err(ErTypeMismatch);
+        Ok := False;
+      end;
+    end;
+  end;
+begin
+  Result := true;
+  try
+    case Cmd of
+      0: begin { >= }
+          case var1Type.BaseType of
+            btU8:
+            if (var2Type.BaseType = btString) or (Var2Type.BaseType = btPChar) then
+              b := tbtchar(tbtu8(var1^)) >= PSGetAnsiString(Var2, var2type)
+            else
+              b := tbtu8(var1^) >= PSGetUInt(Var2, var2type);
+            btS8: b := tbts8(var1^) >= PSGetInt(Var2, var2type);
+            btU16: b := tbtu16(var1^) >= PSGetUInt(Var2, var2type);
+            btS16: b := tbts16(var1^) >= PSGetInt(Var2, var2type);
+            btU32: b := tbtu32(var1^) >= PSGetUInt(Var2, var2type);
+            btS32:
+              begin
+                if var2type.BaseType = btPointer then
+                begin
+                  var2type := PIFTypeRec(Pointer(IPointer(var2)+4)^);
+                  var2 := Pointer(var2^);
+                  if (var2 = nil) or (var2type = nil) then raise Exception.Create(RPS_TypeMismatch);
+                end;
+                case var2type.BaseType of
+                  btU8: b := tbts32(var1^) >= tbtu8(Var2^);
+                  btS8: b := tbts32(var1^) >= tbts8(Var2^);
+                  btU16: b := tbts32(var1^) >= tbtu16(Var2^);
+                  btS16: b := tbts32(var1^) >= tbts16(Var2^);
+                  btU32: b := tbts32(var1^) >= Longint(tbtu32(Var2^));
+                  btS32: b := tbts32(var1^) >= tbts32(Var2^);
+                  btDouble: b := PSGetReal(Var1, var1type) >= tbtdouble(var2^);
+                  btSingle: B := psGetReal(Var1, var1Type) >= tbtsingle(var2^);
+              {$IFNDEF PS_NOINT64} btS64: b := tbts32(var1^) >= tbts64(Var2^);{$ENDIF}
+                  btChar: b := tbts32(var1^) >= Ord(tbtchar(Var2^));
+              {$IFNDEF PS_NOWIDESTRING}    btWideChar: b := tbts32(var1^) >= Ord(tbtwidechar(Var2^));{$ENDIF}
+                  btVariant: b := tbts32(var1^) >= Variant(Var2^);
+                  else raise Exception.Create(RPS_TypeMismatch);
+                end;
+              end;
+            btSingle: b := tbtsingle(var1^) >= PSGetReal(Var2, var2type);
+            btDouble: b := tbtdouble(var1^) >= PSGetReal(Var2, var2type);
+            btCurrency: b := tbtcurrency(var1^) >= PSGetCurrency(Var2, var2type);
+            btExtended: b := tbtextended(var1^) >= PSGetReal(Var2, var2type);
+            {$IFNDEF PS_NOINT64}
+            btS64: b := tbts64(var1^) >= PSGetInt64(Var2, var2type);
+            {$ENDIF}
+            btPChar,btString: b := tbtstring(var1^) >= PSGetAnsiString(Var2, var2type);
+            btChar: b := tbtchar(var1^) >= PSGetAnsiString(Var2, var2type);
+            {$IFNDEF PS_NOWIDESTRING}
+            btWideChar: b := tbtwidechar(var1^) >= PSGetWideString(Var2, var2type);
+            btWideString: b := tbtwidestring(var1^) >= PSGetWideString(Var2, var2type);
+            {$ENDIF}
+            btVariant:
+              begin
+                if not IntPIFVariantToVariant(var2, var2type, tvar) then
+                begin
+                  Result := false;
+                end else
+                  b := Variant(var1^) >= tvar;
+              end;
+            btSet:
+              begin
+                if var1Type = var2Type then
+                begin
+                  Set_Subset(var2, var1, TPSTypeRec_Set(var1Type).aByteSize, b);
+                end else result := False;
+              end;
+          else begin
+              CMD_Err(ErTypeMismatch);
+              exit;
+            end;
+          end;
+          if not Result then begin
+            CMD_Err(ErTypeMismatch);
+            exit;
+          end;
+          SetBoolean(b, Result);
+        end;
+      1: begin { <= }
+          case var1Type.BaseType of
+            btU8:
+            if (var2Type.BaseType = btString) or (Var2Type.BaseType = btPChar) then
+              b := tbtchar(tbtu8(var1^)) <= PSGetAnsiString(Var2, var2type)
+            else
+              b := tbtu8(var1^) <= PSGetUInt(Var2, var2type);
+            btS8: b := tbts8(var1^) <= PSGetInt(Var2, var2type);
+            btU16: b := tbtu16(var1^) <= PSGetUInt(Var2, var2type);
+            btS16: b := tbts16(var1^) <= PSGetInt(Var2, var2type);
+            btU32: b := tbtu32(var1^) <= PSGetUInt(Var2, var2type);
+            btS32:
+              begin
+                if var2type.BaseType = btPointer then
+                begin
+                  var2type := PIFTypeRec(Pointer(IPointer(var2)+4)^);
+                  var2 := Pointer(var2^);
+                  if (var2 = nil) or (var2type = nil) then raise Exception.Create(RPS_TypeMismatch);
+                end;
+                case var2type.BaseType of
+                  btU8: b := tbts32(var1^) <= tbtu8(Var2^);
+                  btS8: b := tbts32(var1^) <= tbts8(Var2^);
+                  btU16: b := tbts32(var1^) <= tbtu16(Var2^);
+                  btS16: b := tbts32(var1^) <= tbts16(Var2^);
+                  btU32: b := tbts32(var1^) <= Longint(tbtu32(Var2^));
+                  btS32: b := tbts32(var1^) <= tbts32(Var2^);
+                  btDouble: b := PSGetReal(Var1, var1type) <= tbtdouble(var2^);
+                  btSingle: B := psGetReal(Var1, var1Type) <= tbtsingle(var2^);
+              {$IFNDEF PS_NOINT64} btS64: b := tbts32(var1^) <= tbts64(Var2^);{$ENDIF}
+                  btChar: b := tbts32(var1^) <= Ord(tbtchar(Var2^));
+              {$IFNDEF PS_NOWIDESTRING}    btWideChar: b := tbts32(var1^) <= Ord(tbtwidechar(Var2^));{$ENDIF}
+                  btVariant: b := tbts32(var1^) <= Variant(Var2^);
+                  else raise Exception.Create(RPS_TypeMismatch);
+                end;
+              end;            btSingle: b := tbtsingle(var1^) <= PSGetReal(Var2, var2type);
+            btCurrency: b := tbtcurrency(var1^) <= PSGetCurrency(Var2, var2type);
+            btDouble: b := tbtdouble(var1^) <= PSGetReal(Var2, var2type);
+            btExtended: b := tbtextended(var1^) <= PSGetReal(Var2, var2type);
+            {$IFNDEF PS_NOINT64}
+            btS64: b := tbts64(var1^) <= PSGetInt64(Var2, var2type);
+            {$ENDIF}
+            btPChar,btString: b := tbtstring(var1^) <= PSGetAnsiString(Var2, var2type);
+            btChar: b := tbtchar(var1^) <= PSGetAnsiString(Var2, var2type);
+            {$IFNDEF PS_NOWIDESTRING}
+            btWideChar: b := tbtwidechar(var1^) <= PSGetWideString(Var2, var2type);
+            btWideString: b := tbtwidestring(var1^) <= PSGetWideString(Var2, var2type);
+            {$ENDIF}
+            btVariant:
+              begin
+                if not IntPIFVariantToVariant(var2, var2type, tvar) then
+                begin
+                  Result := false;
+                end else
+                  b := Variant(var1^) <= tvar;
+              end;
+            btSet:
+              begin
+                if var1Type = var2Type then
+                begin
+                  Set_Subset(var1, var2, TPSTypeRec_Set(var1Type).aByteSize, b);
+                end else result := False;
+              end;
+          else begin
+              CMD_Err(ErTypeMismatch);
+              exit;
+            end;
+          end;
+          if not Result then begin
+            CMD_Err(erTypeMismatch);
+            exit;
+          end;
+          SetBoolean(b, Result);
+        end;
+      2: begin { > }
+          case var1Type.BaseType of
+            btU8:
+            if (var2Type.BaseType = btString) or (Var2Type.BaseType = btPChar) then
+              b := tbtchar(tbtu8(var1^)) > PSGetAnsiString(Var2, var2type)
+            else
+              b := tbtu8(var1^) > PSGetUInt(Var2, var2type);
+            btS8: b := tbts8(var1^) > PSGetInt(Var2, var2type);
+            btU16: b := tbtu16(var1^) > PSGetUInt(Var2, var2type);
+            btS16: b := tbts16(var1^) > PSGetInt(Var2, var2type);
+            btU32: b := tbtu32(var1^) > PSGetUInt(Var2, var2type);
+            btS32:
+              begin
+                if var2type.BaseType = btPointer then
+                begin
+                  var2type := PIFTypeRec(Pointer(IPointer(var2)+4)^);
+                  var2 := Pointer(var2^);
+                  if (var2 = nil) or (var2type = nil) then raise Exception.Create(RPS_TypeMismatch);
+                end;
+                case var2type.BaseType of
+                  btU8: b := tbts32(var1^) > tbtu8(Var2^);
+                  btS8: b := tbts32(var1^) > tbts8(Var2^);
+                  btU16: b := tbts32(var1^) > tbtu16(Var2^);
+                  btS16: b := tbts32(var1^) > tbts16(Var2^);
+                  btU32: b := tbts32(var1^) > Longint(tbtu32(Var2^));
+                  btS32: b := tbts32(var1^) > tbts32(Var2^);
+                  btDouble: b := PSGetReal(Var1, var1type) > tbtdouble(var2^);
+                  btSingle: B := psGetReal(Var1, var1Type) > tbtsingle(var2^);
+              {$IFNDEF PS_NOINT64} btS64: b := tbts32(var1^) > tbts64(Var2^);{$ENDIF}
+                  btChar: b := tbts32(var1^) > Ord(tbtchar(Var2^));
+              {$IFNDEF PS_NOWIDESTRING}    btWideChar: b := tbts32(var1^) = Ord(tbtwidechar(Var2^));{$ENDIF}
+                  btVariant: b := tbts32(var1^) > Variant(Var2^);
+                  else raise Exception.Create(RPS_TypeMismatch);
+                end;
+              end;            btSingle: b := tbtsingle(var1^) > PSGetReal(Var2, var2type);
+            btDouble: b := tbtdouble(var1^) > PSGetReal(Var2, var2type);
+            btExtended: b := tbtextended(var1^) > PSGetReal(Var2, var2type);
+            btCurrency: b := tbtcurrency(var1^) > PSGetCurrency(Var2, var2type);
+            {$IFNDEF PS_NOINT64}
+            btS64: b := tbts64(var1^) > PSGetInt64(Var2, var2type);
+            {$ENDIF}
+            btPChar,btString: b := tbtstring(var1^) > PSGetAnsiString(Var2, var2type);
+            btChar: b := tbtchar(var1^) > PSGetAnsiString(Var2, var2type);
+            {$IFNDEF PS_NOWIDESTRING}
+            btWideChar: b := tbtwidechar(var1^) > PSGetWideString(Var2, var2type);
+            btWideString: b := tbtwidestring(var1^) > PSGetWideString(Var2, var2type);
+            {$ENDIF}
+            btVariant:
+              begin
+                if not IntPIFVariantToVariant(var2, var2type, tvar) then
+                begin
+                  Result := false;
+                end else
+                  b := Variant(var1^) > tvar;
+              end;
+          else begin
+              CMD_Err(erTypeMismatch);
+              exit;
+            end;
+          end;
+          if not Result then begin
+            CMD_Err(erTypeMismatch);
+            exit;
+          end;
+          SetBoolean(b, Result);
+        end;
+      3: begin { < }
+          case var1Type.BaseType of
+            btU8:
+            if (var2Type.BaseType = btString) or (Var2Type.BaseType = btPChar) then
+              b := tbtchar(tbtu8(var1^)) < PSGetAnsiString(Var2, var2type)
+            else
+              b := tbtu8(var1^) < PSGetUInt(Var2, var2type);
+            btS8: b := tbts8(var1^) < PSGetInt(Var2, var2type);
+            btU16: b := tbtu16(var1^) < PSGetUInt(Var2, var2type);
+            btS16: b := tbts16(var1^) < PSGetInt(Var2, var2type);
+            btU32: b := tbtu32(var1^) < PSGetUInt(Var2, var2type);
+            btS32:
+              begin
+                if var2type.BaseType = btPointer then
+                begin
+                  var2type := PIFTypeRec(Pointer(IPointer(var2)+4)^);
+                  var2 := Pointer(var2^);
+                  if (var2 = nil) or (var2type = nil) then raise Exception.Create(RPS_TypeMismatch);
+                end;
+                case var2type.BaseType of
+                  btU8: b := tbts32(var1^) < tbtu8(Var2^);
+                  btS8: b := tbts32(var1^) < tbts8(Var2^);
+                  btU16: b := tbts32(var1^) < tbtu16(Var2^);
+                  btS16: b := tbts32(var1^) < tbts16(Var2^);
+                  btU32: b := tbts32(var1^) < Longint(tbtu32(Var2^));
+                  btS32: b := tbts32(var1^) < tbts32(Var2^);
+                  btDouble: b := PSGetReal(Var1, var1type) < tbtdouble(var2^);
+                  btSingle: B := psGetReal(Var1, var1Type) < tbtsingle(var2^);
+              {$IFNDEF PS_NOINT64} btS64: b := tbts32(var1^) < tbts64(Var2^);{$ENDIF}
+                  btChar: b := tbts32(var1^) < Ord(tbtchar(Var2^));
+              {$IFNDEF PS_NOWIDESTRING}    btWideChar: b := tbts32(var1^) < Ord(tbtwidechar(Var2^));{$ENDIF}
+                  btVariant: b := tbts32(var1^) < Variant(Var2^);
+                  else raise Exception.Create(RPS_TypeMismatch);
+                end;
+              end;            btSingle: b := tbtsingle(var1^) < PSGetReal(Var2, var2type);
+            btDouble: b := tbtdouble(var1^) < PSGetReal(Var2, var2type);
+            btCurrency: b := tbtcurrency(var1^) < PSGetCurrency(Var2, var2type);
+            btExtended: b := tbtextended(var1^) < PSGetReal(Var2, var2type);
+            {$IFNDEF PS_NOINT64}
+            btS64: b := tbts64(var1^) < PSGetInt64(Var2, var2type);
+            {$ENDIF}
+            btPChar,btString: b := tbtstring(var1^) < PSGetAnsiString(Var2, var2type);
+            btChar: b := tbtchar(var1^) < PSGetAnsiString(Var2, var2type);
+            {$IFNDEF PS_NOWIDESTRING}
+            btWideChar: b := tbtwidechar(var1^) < PSGetWideString(Var2, var2type);
+            btWideString: b := tbtwidestring(var1^) < PSGetWideString(Var2, var2type);
+            {$ENDIF}
+            btVariant:
+              begin
+                if not IntPIFVariantToVariant(var2, var2type, tvar) then
+                begin
+                  Result := false;
+                end else
+                  b := Variant(var1^) < tvar;
+              end;
+          else begin
+              CMD_Err(erTypeMismatch);
+              exit;
+            end;
+          end;
+          if not Result then begin
+            CMD_Err(erTypeMismatch);
+            exit;
+          end;
+          SetBoolean(b, Result);
+        end;
+      4: begin { <> }
+          case var1Type.BaseType of
+            btInterface:
+              begin
+                if var2Type.BaseType = btInterface then
+                  b := Pointer(var1^) <> Pointer(var2^) // no need to cast it to IUnknown
+                else
+                  Result := false;
+              end;
+            btClass:
+              begin
+                if var2Type.BaseType = btclass then
+                  b := TObject(var1^) <> TObject(var2^)
+                else
+                  Result := false;
+              end;
+            btU8:
+            if (var2Type.BaseType = btString) or (Var2Type.BaseType = btPChar) then
+              b := tbtchar(tbtu8(var1^)) <> PSGetAnsiString(Var2, var2type)
+            else
+              b := tbtu8(var1^) <> PSGetUInt(Var2, var2type);
+            btS8: b := tbts8(var1^) <> PSGetInt(Var2, var2type);
+            btU16: b := tbtu16(var1^) <> PSGetUInt(Var2, var2type);
+            btS16: b := tbts16(var1^) <> PSGetInt(Var2, var2type);
+            btProcPtr:
+              begin
+                if Pointer(Var1^) = Pointer(Var2^) then
+                begin
+                  if Longint(Var1^) = 0 then
+                    b := ((Pointer(Pointer(IPointer(Var1)+8)^) <> Pointer(Pointer(IPointer(Var2)+8)^)) or
+                   (Pointer(Pointer(IPointer(Var1)+8)^) <> Pointer(Pointer(IPointer(Var2)+8)^)))
+                  else
+                    b := False;
+                end else b := True;
+              end;
+            btU32: b := tbtu32(var1^) <> PSGetUInt(Var2, var2type);
+            btS32:
+              begin
+                if var2type.BaseType = btPointer then
+                begin
+                  var2type := PIFTypeRec(Pointer(IPointer(var2)+4)^);
+                  var2 := Pointer(var2^);
+                  if (var2 = nil) or (var2type = nil) then raise Exception.Create(RPS_TypeMismatch);
+                end;
+                case var2type.BaseType of
+                  btU8: b := tbts32(var1^) <> tbtu8(Var2^);
+                  btS8: b := tbts32(var1^) <> tbts8(Var2^);
+                  btU16: b := tbts32(var1^) <> tbtu16(Var2^);
+                  btS16: b := tbts32(var1^) <> tbts16(Var2^);
+                  btProcPtr, btU32: b := tbts32(var1^)<> Longint(tbtu32(Var2^));
+                  btS32: b := tbts32(var1^) <> tbts32(Var2^);
+                  btDouble: b := PSGetReal(Var1, var1type) <> tbtdouble(var2^);
+                  btSingle: B := psGetReal(Var1, var1Type) <> tbtsingle(var2^);
+              {$IFNDEF PS_NOINT64} btS64: b := tbts32(var1^) <> tbts64(Var2^);{$ENDIF}
+                  btChar: b := tbts32(var1^) <> Ord(tbtchar(Var2^));
+              {$IFNDEF PS_NOWIDESTRING}    btWideChar: b := tbts32(var1^) <> Ord(tbtwidechar(Var2^));{$ENDIF}
+                  btVariant: b := tbts32(var1^) <> Variant(Var2^);
+                  else raise Exception.Create(RPS_TypeMismatch);
+                end;
+              end;            btSingle: b := tbtsingle(var1^) <> PSGetReal(Var2, var2type);
+            btDouble: b := tbtdouble(var1^) <> PSGetReal(Var2, var2type);
+            btExtended: b := tbtextended(var1^) <> PSGetReal(Var2, var2type);
+            btCurrency: b := tbtcurrency(var1^) <> PSGetCurrency(Var2, var2type);
+            btPChar,btString: b := tbtstring(var1^) <> PSGetAnsiString(Var2, var2type);
+            {$IFNDEF PS_NOINT64}
+            btS64: b := tbts64(var1^) <> PSGetInt64(Var2, var2type);
+            {$ENDIF}
+            btChar: b := tbtchar(var1^) <> PSGetAnsiString(Var2, var2type);
+            {$IFNDEF PS_NOWIDESTRING}
+            btWideChar: b := tbtwidechar(var1^) <> PSGetWideString(Var2, var2type);
+            btWideString: b := tbtwidestring(var1^) <> PSGetWideString(Var2, var2type);
+            {$ENDIF}
+            btVariant:
+              begin
+                if not IntPIFVariantToVariant(var2, var2type, tvar) then
+                begin
+                  Result := false;
+                end else
+                  b := Variant(var1^) <> tvar;
+              end;
+            btSet:
+              begin
+                if var1Type = var2Type then
+                begin
+                  Set_Equal(var1, var2, TPSTypeRec_Set(var1Type).aByteSize, b);
+                  b := not b;
+                end else result := False;
+              end;
+          else begin
+              CMD_Err(erTypeMismatch);
+              exit;
+            end;
+          end;
+          if not Result then begin
+            CMD_Err(erTypeMismatch);
+            exit;
+          end;
+          SetBoolean(b, Result);
+        end;
+      5: begin { = }
+          case var1Type.BaseType of
+            btInterface:
+              begin
+                if var2Type.BaseType = btInterface then
+                  b := Pointer(var1^) = Pointer(var2^) // no need to cast it to IUnknown
+                else
+                  Result := false;
+              end;
+            btClass:
+              begin
+                if var2Type.BaseType = btclass then
+                  b := TObject(var1^) = TObject(var2^)
+                else
+                  Result := false;
+              end;
+            btU8:
+            if (var2Type.BaseType = btString) or (Var2Type.BaseType = btPChar) then
+              b := tbtchar(tbtu8(var1^)) = PSGetAnsiString(Var2, var2type)
+            else
+              b := tbtu8(var1^) = PSGetUInt(Var2, var2type);
+            btS8: b := tbts8(var1^) = PSGetInt(Var2, var2type);
+            btU16: b := tbtu16(var1^) = PSGetUInt(Var2, var2type);
+            btS16: b := tbts16(var1^) = PSGetInt(Var2, var2type);
+            btU32: b := tbtu32(var1^) = PSGetUInt(Var2, var2type);
+            btProcPtr:
+              begin
+                if Pointer(Var1^) = Pointer(Var2^) then
+                begin
+                  if Longint(Var1^) = 0 then
+                    b := ((Pointer(Pointer(IPointer(Var1)+8)^) = Pointer(Pointer(IPointer(Var2)+8)^)) and
+                   (Pointer(Pointer(IPointer(Var1)+8)^) = Pointer(Pointer(IPointer(Var2)+8)^)))
+                  else
+                    b := True;
+                end else b := False;
+              end;
+            btS32:
+              begin
+                if var2type.BaseType = btPointer then
+                begin
+                  var2type := PIFTypeRec(Pointer(IPointer(var2)+4)^);
+                  var2 := Pointer(var2^);
+                  if (var2 = nil) or (var2type = nil) then raise Exception.Create(RPS_TypeMismatch);
+                end;
+                case var2type.BaseType of
+                  btU8: b := tbts32(var1^) = tbtu8(Var2^);
+                  btS8: b := tbts32(var1^) = tbts8(Var2^);
+                  btU16: b := tbts32(var1^) = tbtu16(Var2^);
+                  btS16: b := tbts32(var1^) = tbts16(Var2^);
+                  btProcPtr, btU32: b := tbts32(var1^) = Longint(tbtu32(Var2^));
+                  btS32: b := tbts32(var1^) = tbts32(Var2^);
+                  btDouble: b := PSGetReal(Var1, var1type) = tbtdouble(var2^);
+                  btSingle: B := psGetReal(Var1, var1Type) = tbtsingle(var2^);
+              {$IFNDEF PS_NOINT64} btS64: b := tbts32(var1^) = tbts64(Var2^);{$ENDIF}
+                  btChar: b := tbts32(var1^) = Ord(tbtchar(Var2^));
+              {$IFNDEF PS_NOWIDESTRING}    btWideChar: b := tbts32(var1^) = Ord(tbtwidechar(Var2^));{$ENDIF}
+                  btVariant: b := tbts32(var1^) = Variant(Var2^);
+                  else raise Exception.Create(RPS_TypeMismatch);
+                end;
+              end;            btSingle: b := tbtsingle(var1^) = PSGetReal(Var2, var2type);
+            btDouble: b := tbtdouble(var1^) = PSGetReal(Var2, var2type);
+            btExtended: b := tbtextended(var1^) = PSGetReal(Var2, var2type);
+            btCurrency: b := tbtcurrency(var1^) = PSGetCurrency(Var2, var2type);
+            btPchar, btString: b := tbtstring(var1^) = PSGetAnsiString(Var2, var2type);
+            {$IFNDEF PS_NOINT64}
+            btS64: b := tbts64(var1^) = PSGetInt64(Var2, var2type);
+            {$ENDIF}
+            btChar: b := tbtchar(var1^) = PSGetAnsiString(Var2, var2type);
+            {$IFNDEF PS_NOWIDESTRING}
+            btWideChar: b := tbtwidechar(var1^) = PSGetWideString(Var2, var2type);
+            btWideString: b := tbtwidestring(var1^) = PSGetWideString(Var2, var2type);
+            {$ENDIF}
+            btVariant:
+              begin
+                if not IntPIFVariantToVariant(var2, var2type, tvar) then
+                begin
+                  Result := false;
+                end else
+                  b := Variant(var1^) = tvar;
+              end;
+            btSet:
+              begin
+                if var1Type = var2Type then
+                begin
+                  Set_Equal(var1, var2, TPSTypeRec_Set(var1Type).aByteSize, b);
+                end else result := False;
+              end;
+          else begin
+              CMD_Err(erTypeMismatch);
+              exit;
+            end;
+          end;
+          if not Result then begin
+            CMD_Err(erTypeMismatch);
+            exit;
+          end;
+          SetBoolean(b, Result);
+        end;
+      6: begin { in }
+          if var2Type.BaseType = btSet then
+          begin
+            Cmd := PSGetUInt(var1, var1type);
+            if not Result then
+            begin
+              CMD_Err(erTypeMismatch);
+              exit;
+            end;
+            if Cmd >= Cardinal(TPSTypeRec_Set(var2Type).aBitSize) then
+            begin
+              cmd_Err(erOutofRecordRange);
+              Result := False;
+              Exit;
+            end;
+            Set_membership(Cmd, var2, b);
+            SetBoolean(b, Result);
+          end else
+          begin
+            CMD_Err(erTypeMismatch);
+            exit;
+          end;
+        end;
+      7:
+        begin // is
+          case var1Type.BaseType of
+            btClass:
+              begin
+                if var2type.BaseType <> btU32 then
+                  Result := False
+                else
+                begin
+                  var2type := FTypes[tbtu32(var2^)];
+                  if (var2type = nil) or (var2type.BaseType <> btClass) then
+                    Result := false
+                  else
+                  begin
+                    Setboolean(Class_IS(Self, TObject(var1^), var2type), Result);
+                  end;
+                end;
+              end;
+          else begin
+              CMD_Err(erTypeMismatch);
+              exit;
+            end;
+          end;
+          if not Result then begin
+            CMD_Err(erTypeMismatch);
+            exit;
+          end;
+        end;
+    else begin
+        Result := False;
+        CMD_Err(erInvalidOpcodeParameter);
+        exit;
+      end;
+    end;
+  except
+    {$IFDEF DELPHI6UP}
+    Tmp := AcquireExceptionObject;
+    {$ELSE}
+    if RaiseList <> nil then
+    begin
+      Tmp := Exception(PRaiseFrame(RaiseList)^.ExceptObject);
+      PRaiseFrame(RaiseList)^.ExceptObject := nil;
+    end else
+      Tmp := nil;
+    {$ENDIF}
+    if Tmp <> nil then
+    begin
+      if Tmp is EPSException then
+      begin
+        Result := False;
+        ExceptionProc(EPSException(tmp).ProcNo, EPSException(tmp).ProcPos, erCustomError, tbtString(EPSException(tmp).Message), nil);
+        exit;
+      end else
+      if Tmp is EDivByZero then
+      begin
+        Result := False;
+        CMD_Err3(erDivideByZero, '', Tmp);
+        Exit;
+      end;
+      if Tmp is EZeroDivide then
+      begin
+        Result := False;
+        CMD_Err3(erDivideByZero, '', Tmp);
+        Exit;
+      end;
+      if Tmp is EMathError then
+      begin
+        Result := False;
+        CMD_Err3(erMathError, '', Tmp);
+        Exit;
+      end;
+    end;
+    if (tmp <> nil) and (Tmp is Exception) then
+      CMD_Err3(erException, tbtString(Exception(Tmp).Message), Tmp)
+    else
+      CMD_Err3(erException, '', Tmp);
+    Result := False;
+  end;
+end;
+
+function VarIsFloat(const V: Variant): Boolean;
+begin
+  Result := VarType(V) in [varSingle, varDouble, varCurrency];
+end;
+
+function TPSExec.DoCalc(var1, Var2: Pointer; var1Type, var2type: TPSTypeRec; CalcType: Cardinal): Boolean;
+    { var1=dest, var2=src }
+var
+  Tmp: TObject;
+  tvar: Variant;
+begin
+  try
+    Result := True;
+    case CalcType of
+      0: begin { + }
+          case var1Type.BaseType of
+            btU8: tbtU8(var1^) := tbtU8(var1^) + PSGetUInt(Var2, var2type);
+            btS8: tbts8(var1^) := tbts8(var1^) + PSGetInt(Var2, var2type);
+            btU16: tbtU16(var1^) := tbtU16(var1^) + PSGetUInt(Var2, var2type);
+            btS16: tbts16(var1^) := tbts16(var1^) + PSGetInt(Var2, var2type);
+            btU32:
+              begin
+                if var2type.BaseType = btPointer then
+                begin
+                  var2type := PIFTypeRec(Pointer(IPointer(var2)+4)^);
+                  var2 := Pointer(var2^);
+                  if (var2 = nil) or (var2type = nil) then raise Exception.Create(RPS_TypeMismatch);
+                end;
+                case var2type.BaseType of
+                  btU8: tbtU32(var1^) := tbtU32(var1^) + tbtu8(var2^);
+                  btS8: tbtU32(var1^) := tbtU32(var1^) + cardinal(longint(tbts8(var2^)));
+                  btU16: tbtU32(var1^) := tbtU32(var1^) + tbtu16(var2^);
+                  btS16: tbtU32(var1^) := tbtU32(var1^) + cardinal(longint(tbts16(var2^)));
+                  btU32: tbtU32(var1^) := tbtU32(var1^) + tbtu32(var2^);
+                  btS32: tbtU32(var1^) := tbtU32(var1^) + cardinal(tbts32(var2^));
+              {$IFNDEF PS_NOINT64} btS64: tbtU32(var1^) := tbtU32(var1^) + tbts64(var2^);{$ENDIF}
+                  btChar: tbtU32(var1^) := tbtU32(var1^) +  Ord(tbtchar(var2^));
+              {$IFNDEF PS_NOWIDESTRING}    btWideChar: tbtU32(var1^) := tbtU32(var1^) + Ord(tbtwidechar(var2^));{$ENDIF}
+                  btVariant: tbtU32(var1^) := tbtU32(var1^) + Variant(var2^);
+                  else raise Exception.Create(RPS_TypeMismatch);
+                end;
+              end;
+            btS32:
+              begin
+                if var2type.BaseType = btPointer then
+                begin
+                  var2type := PIFTypeRec(Pointer(IPointer(var2)+4)^);
+                  var2 := Pointer(var2^);
+                  if (var2 = nil) or (var2type = nil) then raise Exception.Create(RPS_TypeMismatch);
+                end;
+                case var2type.BaseType of
+                  btU8: tbts32(var1^) := tbts32(var1^) + tbtu8(var2^);
+                  btS8: tbts32(var1^) := tbts32(var1^) + tbts8(var2^);
+                  btU16: tbts32(var1^) := tbts32(var1^) + tbtu16(var2^);
+                  btS16: tbts32(var1^) := tbts32(var1^) + tbts16(var2^);
+                  btU32: tbts32(var1^) := tbts32(var1^) + Longint(tbtu32(var2^));
+                  btS32: tbts32(var1^) := tbts32(var1^) + tbts32(var2^);
+              {$IFNDEF PS_NOINT64} btS64: tbts32(var1^) := tbts32(var1^) + tbts64(var2^);{$ENDIF}
+                  btChar: tbts32(var1^) := tbts32(var1^) +  Ord(tbtchar(var2^));
+              {$IFNDEF PS_NOWIDESTRING}    btWideChar: tbts32(var1^) := tbts32(var1^) + Ord(tbtwidechar(var2^));{$ENDIF}
+                  btVariant: tbts32(var1^) := tbts32(var1^) + Variant(var2^);
+                  else raise Exception.Create(RPS_TypeMismatch);
+                end;
+              end;
+           {$IFNDEF PS_NOINT64}
+            btS64:  tbts64(var1^) := tbts64(var1^) + PSGetInt64(var2, var2type);
+           {$ENDIF}
+            btSingle:
+              begin
+                if var2type.BaseType = btPointer then
+                begin
+                  var2type := PIFTypeRec(Pointer(IPointer(var2)+4)^);
+                  var2 := Pointer(var2^);
+                  if (var2 = nil) or (var2type = nil) then raise Exception.Create(RPS_TypeMismatch);
+                end;
+                case var2type.BaseType of
+                  btU8: tbtsingle(var1^) := tbtsingle(var1^) + tbtu8(var2^);
+                  btS8: tbtsingle(var1^) := tbtsingle(var1^) + tbts8(var2^);
+                  btU16: tbtsingle(var1^) := tbtsingle(var1^) + tbtu16(var2^);
+                  btS16: tbtsingle(var1^) := tbtsingle(var1^) + tbts16(var2^);
+                  btU32: tbtsingle(var1^) := tbtsingle(var1^) + tbtu32(var2^);
+                  btS32: tbtsingle(var1^) := tbtsingle(var1^) + tbts32(var2^);
+              {$IFNDEF PS_NOINT64}    btS64: tbtsingle(var1^) := tbtsingle(var1^) + tbts64(var2^);{$ENDIF}
+                  btSingle: tbtsingle(var1^) := tbtsingle(var1^) + tbtsingle(var2^);
+                  btDouble: tbtsingle(var1^) := tbtsingle(var1^) + tbtdouble(var2^);
+                  btExtended: tbtsingle(var1^) := tbtsingle(var1^) + tbtextended(var2^);
+                  btCurrency: tbtsingle(var1^) := tbtsingle(var1^) + tbtcurrency(var2^);
+                  btVariant:  tbtsingle(var1^) := tbtsingle(var1^) +  Variant(var2^);
+                  else raise Exception.Create(RPS_TypeMismatch);
+                end;
+              end;
+            btDouble:
+              begin
+                if var2type.BaseType = btPointer then
+                begin
+                  var2type := PIFTypeRec(Pointer(IPointer(var2)+4)^);
+                  var2 := Pointer(var2^);
+                  if (var2 = nil) or (var2type = nil) then raise Exception.Create(RPS_TypeMismatch);
+                end;
+                case var2type.BaseType of
+                  btU8: tbtdouble(var1^) := tbtdouble(var1^) + tbtu8(var2^);
+                  btS8: tbtdouble(var1^) := tbtdouble(var1^) + tbts8(var2^);
+                  btU16: tbtdouble(var1^) := tbtdouble(var1^) + tbtu16(var2^);
+                  btS16: tbtdouble(var1^) := tbtdouble(var1^) + tbts16(var2^);
+                  btU32: tbtdouble(var1^) := tbtdouble(var1^) + tbtu32(var2^);
+                  btS32: tbtdouble(var1^) := tbtdouble(var1^) + tbts32(var2^);
+              {$IFNDEF PS_NOINT64}    btS64: tbtdouble(var1^) := tbtdouble(var1^) + tbts64(var2^);{$ENDIF}
+                  btSingle: tbtdouble(var1^) := tbtdouble(var1^) + tbtsingle(var2^);
+                  btDouble: tbtdouble(var1^) := tbtdouble(var1^) + tbtdouble(var2^);
+                  btExtended: tbtdouble(var1^) := tbtdouble(var1^) + tbtextended(var2^);
+                  btCurrency: tbtdouble(var1^) := tbtdouble(var1^) + tbtcurrency(var2^);
+                  btVariant:  tbtdouble(var1^) := tbtdouble(var1^) +  Variant(var2^);
+                  else raise Exception.Create(RPS_TypeMismatch);
+                end;
+              end;
+            btCurrency:
+              begin
+                if var2type.BaseType = btPointer then
+                begin
+                  var2type := PIFTypeRec(Pointer(IPointer(var2)+4)^);
+                  var2 := Pointer(var2^);
+                  if (var2 = nil) or (var2type = nil) then raise Exception.Create(RPS_TypeMismatch);
+                end;
+                case var2type.BaseType of
+                  btU8: tbtcurrency(var1^) := tbtcurrency(var1^) + tbtu8(var2^);
+                  btS8: tbtcurrency(var1^) := tbtcurrency(var1^) + tbts8(var2^);
+                  btU16: tbtcurrency(var1^) := tbtcurrency(var1^) + tbtu16(var2^);
+                  btS16: tbtcurrency(var1^) := tbtcurrency(var1^) + tbts16(var2^);
+                  btU32: tbtcurrency(var1^) := tbtdouble(var1^) + tbtu32(var2^);
+                  btS32: tbtcurrency(var1^) := tbtcurrency(var1^) + tbts32(var2^);
+              {$IFNDEF PS_NOINT64}    btS64: tbtcurrency(var1^) := tbtdouble(var1^) + tbts64(var2^);{$ENDIF}
+                  btSingle: tbtcurrency(var1^) := tbtcurrency(var1^) + tbtsingle(var2^);
+                  btDouble: tbtcurrency(var1^) := tbtcurrency(var1^) + tbtdouble(var2^);
+                  btExtended: tbtcurrency(var1^) := tbtcurrency(var1^) + tbtextended(var2^);
+                  btCurrency: tbtcurrency(var1^) := tbtcurrency(var1^) + tbtcurrency(var2^);
+                  btVariant:  tbtcurrency(var1^) := tbtcurrency(var1^) +  Variant(var2^);
+                  else raise Exception.Create(RPS_TypeMismatch);
+                end;
+              end;
+            btExtended:
+              begin
+                if var2type.BaseType = btPointer then
+                begin
+                  var2type := PIFTypeRec(Pointer(IPointer(var2)+4)^);
+                  var2 := Pointer(var2^);
+                  if (var2 = nil) or (var2type = nil) then raise Exception.Create(RPS_TypeMismatch);
+                end;
+                case var2type.BaseType of
+                  btU8: tbtextended(var1^) := tbtextended(var1^) + tbtu8(var2^);
+                  btS8: tbtextended(var1^) := tbtextended(var1^) + tbts8(var2^);
+                  btU16: tbtextended(var1^) := tbtextended(var1^) + tbtu16(var2^);
+                  btS16: tbtextended(var1^) := tbtextended(var1^) + tbts16(var2^);
+                  btU32: tbtextended(var1^) := tbtextended(var1^) + tbtu32(var2^);
+                  btS32: tbtextended(var1^) := tbtextended(var1^) + tbts32(var2^);
+              {$IFNDEF PS_NOINT64}    btS64: tbtextended(var1^) := tbtextended(var1^) + tbts64(var2^);{$ENDIF}
+                  btSingle: tbtextended(var1^) := tbtextended(var1^) + tbtsingle(var2^);
+                  btDouble: tbtextended(var1^) := tbtextended(var1^) + tbtdouble(var2^);
+                  btExtended: tbtextended(var1^) := tbtextended(var1^) + tbtextended(var2^);
+                  btCurrency: tbtextended(var1^) := tbtextended(var1^) + tbtcurrency(var2^);
+                  btVariant:  tbtextended(var1^) := tbtextended(var1^) +  Variant(var2^);
+                  else raise Exception.Create(RPS_TypeMismatch);
+                end;
+              end;
+            btPchar, btString: tbtstring(var1^) := tbtstring(var1^) + PSGetAnsiString(Var2, var2type);
+            btChar: tbtchar(var1^) := tbtchar(ord(tbtchar(var1^)) +  PSGetUInt(Var2, var2type));
+            {$IFNDEF PS_NOWIDESTRING}
+            btWideChar: tbtwidechar(var1^) := widechar(ord(tbtwidechar(var1^)) + PSGetUInt(Var2, var2type));
+            btWideString: tbtwidestring(var1^) := tbtwidestring(var1^) + PSGetWideString(Var2, var2type);
+            {$ENDIF}
+            btVariant:
+              begin
+                if not IntPIFVariantToVariant(var2, var2type, tvar) then
+                begin
+                  Result := false;
+                end else
+                  Variant(var1^) := Variant(var1^) + tvar;
+              end;
+            btSet:
+              begin
+                if var1Type = var2Type then
+                begin
+                  Set_Union(var1, var2, TPSTypeRec_Set(var1Type).aByteSize);
+                end else result := False;
+              end;
+
+          else begin
+              CMD_Err(erTypeMismatch);
+              exit;
+            end;
+          end;
+          if not Result then begin
+            CMD_Err(erTypeMismatch);
+            exit;
+          end;
+        end;
+      1: begin { - }
+          case var1Type.BaseType of
+            btU8: tbtU8(var1^) := tbtU8(var1^) - PSGetUInt(Var2, var2type);
+            btS8: tbts8(var1^) := tbts8(var1^) - PSGetInt(Var2, var2type);
+            btU16: tbtU16(var1^) := tbtU16(var1^) - PSGetUInt(Var2, var2type);
+            btS16: tbts16(var1^) := tbts16(var1^) - PSGetInt(Var2, var2type);
+            btU32:
+              begin
+                if var2type.BaseType = btPointer then
+                begin
+                  var2type := PIFTypeRec(Pointer(IPointer(var2)+4)^);
+                  var2 := Pointer(var2^);
+                  if (var2 = nil) or (var2type = nil) then raise Exception.Create(RPS_TypeMismatch);
+                end;
+                case var2type.BaseType of
+                  btU8: tbtU32(var1^) := tbtU32(var1^) - tbtu8(var2^);
+                  btS8: tbtU32(var1^) := tbtU32(var1^) - cardinal(longint(tbts8(var2^)));
+                  btU16: tbtU32(var1^) := tbtU32(var1^) - tbtu16(var2^);
+                  btS16: tbtU32(var1^) := tbtU32(var1^) - cardinal(longint(tbts16(var2^)));
+                  btU32: tbtU32(var1^) := tbtU32(var1^) - tbtu32(var2^);
+                  btS32: tbtU32(var1^) := tbtU32(var1^) - cardinal(tbts32(var2^));
+              {$IFNDEF PS_NOINT64} btS64: tbtU32(var1^) := tbtU32(var1^) - tbts64(var2^);{$ENDIF}
+                  btChar: tbtU32(var1^) := tbtU32(var1^) -  Ord(tbtchar(var2^));
+              {$IFNDEF PS_NOWIDESTRING}    btWideChar: tbtU32(var1^) := tbtU32(var1^) - Ord(tbtwidechar(var2^));{$ENDIF}
+                  btVariant: tbtU32(var1^) := tbtU32(var1^) - Variant(var2^);
+                  else raise Exception.Create(RPS_TypeMismatch);
+                end;
+              end;
+            btS32:
+              begin
+                if var2type.BaseType = btPointer then
+                begin
+                  var2type := PIFTypeRec(Pointer(IPointer(var2)+4)^);
+                  var2 := Pointer(var2^);
+                  if (var2 = nil) or (var2type = nil) then raise Exception.Create(RPS_TypeMismatch);
+                end;
+                case var2type.BaseType of
+                  btU8: tbts32(var1^) := tbts32(var1^) - tbtu8(var2^);
+                  btS8: tbts32(var1^) := tbts32(var1^) - tbts8(var2^);
+                  btU16: tbts32(var1^) := tbts32(var1^) - tbtu16(var2^);
+                  btS16: tbts32(var1^) := tbts32(var1^) - tbts16(var2^);
+                  btU32: tbts32(var1^) := tbts32(var1^) - Longint(tbtu32(var2^));
+                  btS32: tbts32(var1^) := tbts32(var1^) - tbts32(var2^);
+              {$IFNDEF PS_NOINT64} btS64: tbts32(var1^) := tbts32(var1^) - tbts64(var2^);{$ENDIF}
+                  btChar: tbts32(var1^) := tbts32(var1^) -  Ord(tbtchar(var2^));
+              {$IFNDEF PS_NOWIDESTRING}    btWideChar: tbts32(var1^) := tbts32(var1^) - Ord(tbtwidechar(var2^));{$ENDIF}
+                  btVariant: tbts32(var1^) := tbts32(var1^) - Variant(var2^);
+                  else raise Exception.Create(RPS_TypeMismatch);
+                end;
+              end;
+           {$IFNDEF PS_NOINT64}
+            btS64: tbts64(var1^) := tbts64(var1^) - PSGetInt64(var2, var2type);
+           {$ENDIF}
+            btSingle:
+              begin
+                if var2type.BaseType = btPointer then
+                begin
+                  var2type := PIFTypeRec(Pointer(IPointer(var2)+4)^);
+                  var2 := Pointer(var2^);
+                  if (var2 = nil) or (var2type = nil) then raise Exception.Create(RPS_TypeMismatch);
+                end;
+                case var2type.BaseType of
+                  btU8: tbtsingle(var1^) := tbtsingle(var1^) - tbtu8(var2^);
+                  btS8: tbtsingle(var1^) := tbtsingle(var1^) - tbts8(var2^);
+                  btU16: tbtsingle(var1^) := tbtsingle(var1^) - tbtu16(var2^);
+                  btS16: tbtsingle(var1^) := tbtsingle(var1^) - tbts16(var2^);
+                  btU32: tbtsingle(var1^) := tbtsingle(var1^) - tbtu32(var2^);
+                  btS32: tbtsingle(var1^) := tbtsingle(var1^) - tbts32(var2^);
+              {$IFNDEF PS_NOINT64}    btS64: tbtsingle(var1^) := tbtsingle(var1^) - tbts64(var2^);{$ENDIF}
+                  btSingle: tbtsingle(var1^) := tbtsingle(var1^) - tbtsingle(var2^);
+                  btDouble: tbtsingle(var1^) := tbtsingle(var1^) - tbtdouble(var2^);
+                  btExtended: tbtsingle(var1^) := tbtsingle(var1^) - tbtextended(var2^);
+                  btCurrency: tbtsingle(var1^) := tbtsingle(var1^) - tbtcurrency(var2^);
+                  btVariant:  tbtsingle(var1^) := tbtsingle(var1^) - Variant(var2^);
+                  else raise Exception.Create(RPS_TypeMismatch);
+                end;
+              end;
+            btCurrency:
+              begin
+                if var2type.BaseType = btPointer then
+                begin
+                  var2type := PIFTypeRec(Pointer(IPointer(var2)+4)^);
+                  var2 := Pointer(var2^);
+                  if (var2 = nil) or (var2type = nil) then raise Exception.Create(RPS_TypeMismatch);
+                end;
+                case var2type.BaseType of
+                  btU8: tbtcurrency(var1^) := tbtcurrency(var1^) - tbtu8(var2^);
+                  btS8: tbtcurrency(var1^) := tbtcurrency(var1^) - tbts8(var2^);
+                  btU16: tbtcurrency(var1^) := tbtcurrency(var1^) - tbtu16(var2^);
+                  btS16: tbtcurrency(var1^) := tbtcurrency(var1^) - tbts16(var2^);
+                  btU32: tbtcurrency(var1^) := tbtdouble(var1^) - tbtu32(var2^);
+                  btS32: tbtcurrency(var1^) := tbtcurrency(var1^) - tbts32(var2^);
+              {$IFNDEF PS_NOINT64}    btS64: tbtcurrency(var1^) := tbtdouble(var1^) - tbts64(var2^);{$ENDIF}
+                  btSingle: tbtcurrency(var1^) := tbtcurrency(var1^) - tbtsingle(var2^);
+                  btDouble: tbtcurrency(var1^) := tbtcurrency(var1^) - tbtdouble(var2^);
+                  btExtended: tbtcurrency(var1^) := tbtcurrency(var1^) - tbtextended(var2^);
+                  btCurrency: tbtcurrency(var1^) := tbtcurrency(var1^) - tbtcurrency(var2^);
+                  btVariant:  tbtcurrency(var1^) := tbtcurrency(var1^) -  Variant(var2^);
+                  else raise Exception.Create(RPS_TypeMismatch);
+                end;
+              end;
+            btDouble:
+              begin
+                if var2type.BaseType = btPointer then
+                begin
+                  var2type := PIFTypeRec(Pointer(IPointer(var2)+4)^);
+                  var2 := Pointer(var2^);
+                  if (var2 = nil) or (var2type = nil) then raise Exception.Create(RPS_TypeMismatch);
+                end;
+                case var2type.BaseType of
+                  btU8: tbtdouble(var1^) := tbtdouble(var1^) - tbtu8(var2^);
+                  btS8: tbtdouble(var1^) := tbtdouble(var1^) - tbts8(var2^);
+                  btU16: tbtdouble(var1^) := tbtdouble(var1^) - tbtu16(var2^);
+                  btS16: tbtdouble(var1^) := tbtdouble(var1^) - tbts16(var2^);
+                  btU32: tbtdouble(var1^) := tbtdouble(var1^) - tbtu32(var2^);
+                  btS32: tbtdouble(var1^) := tbtdouble(var1^) - tbts32(var2^);
+              {$IFNDEF PS_NOINT64}    btS64: tbtdouble(var1^) := tbtdouble(var1^) - tbts64(var2^);{$ENDIF}
+                  btSingle: tbtdouble(var1^) := tbtdouble(var1^) - tbtsingle(var2^);
+                  btDouble: tbtdouble(var1^) := tbtdouble(var1^) - tbtdouble(var2^);
+                  btExtended: tbtdouble(var1^) := tbtdouble(var1^) - tbtextended(var2^);
+                  btCurrency: tbtdouble(var1^) := tbtdouble(var1^) - tbtcurrency(var2^);
+                  btVariant:  tbtdouble(var1^) := tbtdouble(var1^) -  Variant(var2^);
+                  else raise Exception.Create(RPS_TypeMismatch);
+                end;
+              end;
+            btExtended:
+              begin
+                if var2type.BaseType = btPointer then
+                begin
+                  var2type := PIFTypeRec(Pointer(IPointer(var2)+4)^);
+                  var2 := Pointer(var2^);
+                  if (var2 = nil) or (var2type = nil) then raise Exception.Create(RPS_TypeMismatch);
+                end;
+                case var2type.BaseType of
+                  btU8: tbtextended(var1^) := tbtextended(var1^) - tbtu8(var2^);
+                  btS8: tbtextended(var1^) := tbtextended(var1^) - tbts8(var2^);
+                  btU16: tbtextended(var1^) := tbtextended(var1^) - tbtu16(var2^);
+                  btS16: tbtextended(var1^) := tbtextended(var1^) - tbts16(var2^);
+                  btU32: tbtextended(var1^) := tbtextended(var1^) - tbtu32(var2^);
+                  btS32: tbtextended(var1^) := tbtextended(var1^) - tbts32(var2^);
+              {$IFNDEF PS_NOINT64}    btS64: tbtextended(var1^) := tbtextended(var1^) -+tbts64(var2^);{$ENDIF}
+                  btSingle: tbtextended(var1^) := tbtextended(var1^) - tbtsingle(var2^);
+                  btDouble: tbtextended(var1^) := tbtextended(var1^) - tbtdouble(var2^);
+                  btExtended: tbtextended(var1^) := tbtextended(var1^) - tbtextended(var2^);
+                  btCurrency: tbtextended(var1^) := tbtextended(var1^) - tbtcurrency(var2^);
+                  btVariant:  tbtextended(var1^) := tbtextended(var1^) -  Variant(var2^);
+                  else raise Exception.Create(RPS_TypeMismatch);
+                end;
+              end;
+            btChar: tbtchar(var1^):= tbtchar(ord(tbtchar(var1^)) - PSGetUInt(Var2, var2type));
+            {$IFNDEF PS_NOWIDESTRING}
+            btWideChar: tbtwidechar(var1^) := widechar(ord(tbtwidechar(var1^)) - PSGetUInt(Var2, var2type));
+            {$ENDIF}
+            btVariant:
+              begin
+                if not IntPIFVariantToVariant(var2, var2type, tvar) then
+                begin
+                  Result := false;
+                end else
+                  Variant(var1^) := Variant(var1^) - tvar;
+              end;
+            btSet:
+              begin
+                if var1Type = var2Type then
+                begin
+                  Set_Diff(var1, var2, TPSTypeRec_Set(var1Type).aByteSize);
+                end else result := False;
+              end;
+          else begin
+              CMD_Err(erTypeMismatch);
+              exit;
+            end;
+          end;
+          if not Result then begin
+            CMD_Err(erTypeMismatch);
+            exit;
+          end;
+        end;
+      2: begin { * }
+          case var1Type.BaseType of
+            btU8: tbtU8(var1^) := tbtU8(var1^) * PSGetUInt(Var2, var2type);
+            btS8: tbts8(var1^) := tbts8(var1^) * PSGetInt(Var2, var2type);
+            btU16: tbtU16(var1^) := tbtU16(var1^) * PSGetUInt(Var2, var2type);
+            btS16: tbts16(var1^) := tbts16(var1^) * PSGetInt(Var2, var2type);
+            btU32:
+              begin
+                if var2type.BaseType = btPointer then
+                begin
+                  var2type := PIFTypeRec(Pointer(IPointer(var2)+4)^);
+                  var2 := Pointer(var2^);
+                  if (var2 = nil) or (var2type = nil) then raise Exception.Create(RPS_TypeMismatch);
+                end;
+                case var2type.BaseType of
+                  btU8: tbtU32(var1^) := tbtU32(var1^) * tbtu8(var2^);
+                  btS8: tbtU32(var1^) := tbtU32(var1^) * cardinal(longint(tbts8(var2^)));
+                  btU16: tbtU32(var1^) := tbtU32(var1^) * tbtu16(var2^);
+                  btS16: tbtU32(var1^) := tbtU32(var1^) * cardinal(longint(tbts16(var2^)));
+                  btU32: tbtU32(var1^) := tbtU32(var1^) * tbtu32(var2^);
+                  btS32: tbtU32(var1^) := tbtU32(var1^) * cardinal(tbts32(var2^));
+              {$IFNDEF PS_NOINT64} btS64: tbtU32(var1^) := tbtU32(var1^) * tbts64(var2^);{$ENDIF}
+                  btChar: tbtU32(var1^) := tbtU32(var1^) *  Ord(tbtchar(var2^));
+              {$IFNDEF PS_NOWIDESTRING}    btWideChar: tbtU32(var1^) := tbtU32(var1^) * Ord(tbtwidechar(var2^));{$ENDIF}
+                  btVariant: tbtU32(var1^) := tbtU32(var1^) * Variant(var2^);
+                  else raise Exception.Create(RPS_TypeMismatch);
+                end;
+              end;
+            btS32:
+              begin
+                if var2type.BaseType = btPointer then
+                begin
+                  var2type := PIFTypeRec(Pointer(IPointer(var2)+4)^);
+                  var2 := Pointer(var2^);
+                  if (var2 = nil) or (var2type = nil) then raise Exception.Create(RPS_TypeMismatch);
+                end;
+                case var2type.BaseType of
+                  btU8: tbts32(var1^) := tbts32(var1^) * tbtu8(var2^);
+                  btS8: tbts32(var1^) := tbts32(var1^) * tbts8(var2^);
+                  btU16: tbts32(var1^) := tbts32(var1^) * tbtu16(var2^);
+                  btS16: tbts32(var1^) := tbts32(var1^) * tbts16(var2^);
+                  btU32: tbts32(var1^) := tbts32(var1^) * Longint(tbtu32(var2^));
+                  btS32: tbts32(var1^) := tbts32(var1^) * tbts32(var2^);
+              {$IFNDEF PS_NOINT64} btS64: tbts32(var1^) := tbts32(var1^) * tbts64(var2^);{$ENDIF}
+                  btChar: tbts32(var1^) := tbts32(var1^) *  Ord(tbtchar(var2^));
+              {$IFNDEF PS_NOWIDESTRING}    btWideChar: tbts32(var1^) := tbts32(var1^) * Ord(tbtwidechar(var2^));{$ENDIF}
+                  btVariant: tbts32(var1^) := tbts32(var1^) * Variant(var2^);
+                  else raise Exception.Create(RPS_TypeMismatch);
+                end;
+              end;
+           {$IFNDEF PS_NOINT64}
+            btS64: tbts64(var1^) := tbts64(var1^) * PSGetInt64(var2, var2type);
+           {$ENDIF}
+            btCurrency:
+              begin
+                if var2type.BaseType = btPointer then
+                begin
+                  var2type := PIFTypeRec(Pointer(IPointer(var2)+4)^);
+                  var2 := Pointer(var2^);
+                  if (var2 = nil) or (var2type = nil) then raise Exception.Create(RPS_TypeMismatch);
+                end;
+                case var2type.BaseType of
+                  btU8: tbtcurrency(var1^) := tbtcurrency(var1^) * tbtu8(var2^);
+                  btS8: tbtcurrency(var1^) := tbtcurrency(var1^) * tbts8(var2^);
+                  btU16: tbtcurrency(var1^) := tbtcurrency(var1^) * tbtu16(var2^);
+                  btS16: tbtcurrency(var1^) := tbtcurrency(var1^) * tbts16(var2^);
+                  btU32: tbtcurrency(var1^) := tbtdouble(var1^) * tbtu32(var2^);
+                  btS32: tbtcurrency(var1^) := tbtcurrency(var1^) * tbts32(var2^);
+              {$IFNDEF PS_NOINT64}    btS64: tbtcurrency(var1^) := tbtdouble(var1^) * tbts64(var2^);{$ENDIF}
+                  btSingle: tbtcurrency(var1^) := tbtcurrency(var1^) * tbtsingle(var2^);
+                  btDouble: tbtcurrency(var1^) := tbtcurrency(var1^) * tbtdouble(var2^);
+                  btExtended: tbtcurrency(var1^) := tbtcurrency(var1^) * tbtextended(var2^);
+                  btCurrency: tbtcurrency(var1^) := tbtcurrency(var1^) * tbtcurrency(var2^);
+                  btVariant:  tbtcurrency(var1^) := tbtcurrency(var1^) *  Variant(var2^);
+                  else raise Exception.Create(RPS_TypeMismatch);
+                end;
+              end;
+            btSingle:
+              begin
+                if var2type.BaseType = btPointer then
+                begin
+                  var2type := PIFTypeRec(Pointer(IPointer(var2)+4)^);
+                  var2 := Pointer(var2^);
+                  if (var2 = nil) or (var2type = nil) then raise Exception.Create(RPS_TypeMismatch);
+                end;
+                case var2type.BaseType of
+                  btU8: tbtsingle(var1^) := tbtsingle(var1^) *tbtu8(var2^);
+                  btS8: tbtsingle(var1^) := tbtsingle(var1^) *tbts8(var2^);
+                  btU16: tbtsingle(var1^) := tbtsingle(var1^) *tbtu16(var2^);
+                  btS16: tbtsingle(var1^) := tbtsingle(var1^) *tbts16(var2^);
+                  btU32: tbtsingle(var1^) := tbtsingle(var1^) *tbtu32(var2^);
+                  btS32: tbtsingle(var1^) := tbtsingle(var1^) *tbts32(var2^);
+              {$IFNDEF PS_NOINT64}    btS64: tbtsingle(var1^) := tbtsingle(var1^) *tbts64(var2^);{$ENDIF}
+                  btSingle: tbtsingle(var1^) := tbtsingle(var1^) *tbtsingle(var2^);
+                  btDouble: tbtsingle(var1^) := tbtsingle(var1^) *tbtdouble(var2^);
+                  btExtended: tbtsingle(var1^) := tbtsingle(var1^) *tbtextended(var2^);
+                  btCurrency: tbtsingle(var1^) := tbtsingle(var1^) *tbtcurrency(var2^);
+                  btVariant:  tbtsingle(var1^) := tbtsingle(var1^) * Variant(var2^);
+                  else raise Exception.Create(RPS_TypeMismatch);
+                end;
+              end;
+            btDouble:
+              begin
+                if var2type.BaseType = btPointer then
+                begin
+                  var2type := PIFTypeRec(Pointer(IPointer(var2)+4)^);
+                  var2 := Pointer(var2^);
+                  if (var2 = nil) or (var2type = nil) then raise Exception.Create(RPS_TypeMismatch);
+                end;
+                case var2type.BaseType of
+                  btU8: tbtdouble(var1^) := tbtdouble(var1^) *tbtu8(var2^);
+                  btS8: tbtdouble(var1^) := tbtdouble(var1^) *tbts8(var2^);
+                  btU16: tbtdouble(var1^) := tbtdouble(var1^) *tbtu16(var2^);
+                  btS16: tbtdouble(var1^) := tbtdouble(var1^) *tbts16(var2^);
+                  btU32: tbtdouble(var1^) := tbtdouble(var1^) *tbtu32(var2^);
+                  btS32: tbtdouble(var1^) := tbtdouble(var1^) *tbts32(var2^);
+              {$IFNDEF PS_NOINT64}    btS64: tbtdouble(var1^) := tbtdouble(var1^) *tbts64(var2^);{$ENDIF}
+                  btSingle: tbtdouble(var1^) := tbtdouble(var1^) *tbtsingle(var2^);
+                  btDouble: tbtdouble(var1^) := tbtdouble(var1^) *tbtdouble(var2^);
+                  btExtended: tbtdouble(var1^) := tbtdouble(var1^) *tbtextended(var2^);
+                  btCurrency: tbtdouble(var1^) := tbtdouble(var1^) *tbtcurrency(var2^);
+                  btVariant:  tbtdouble(var1^) := tbtdouble(var1^) * Variant(var2^);
+                  else raise Exception.Create(RPS_TypeMismatch);
+                end;
+              end;
+            btExtended:
+              begin
+                if var2type.BaseType = btPointer then
+                begin
+                  var2type := PIFTypeRec(Pointer(IPointer(var2)+4)^);
+                  var2 := Pointer(var2^);
+                  if (var2 = nil) or (var2type = nil) then raise Exception.Create(RPS_TypeMismatch);
+                end;
+                case var2type.BaseType of
+                  btU8: tbtextended(var1^) := tbtextended(var1^) *tbtu8(var2^);
+                  btS8: tbtextended(var1^) := tbtextended(var1^) *tbts8(var2^);
+                  btU16: tbtextended(var1^) := tbtextended(var1^) *tbtu16(var2^);
+                  btS16: tbtextended(var1^) := tbtextended(var1^) *tbts16(var2^);
+                  btU32: tbtextended(var1^) := tbtextended(var1^) *tbtu32(var2^);
+                  btS32: tbtextended(var1^) := tbtextended(var1^) *tbts32(var2^);
+              {$IFNDEF PS_NOINT64}    btS64: tbtextended(var1^) := tbtextended(var1^) *tbts64(var2^);{$ENDIF}
+                  btSingle: tbtextended(var1^) := tbtextended(var1^) *tbtsingle(var2^);
+                  btDouble: tbtextended(var1^) := tbtextended(var1^) *tbtdouble(var2^);
+                  btExtended: tbtextended(var1^) := tbtextended(var1^) *tbtextended(var2^);
+                  btCurrency: tbtextended(var1^) := tbtextended(var1^) *tbtcurrency(var2^);
+                  btVariant:  tbtextended(var1^) := tbtextended(var1^) * Variant(var2^);
+                  else raise Exception.Create(RPS_TypeMismatch);
+                end;
+              end;
+            btVariant:
+              begin
+                if not IntPIFVariantToVariant(var2, var2type, tvar) then
+                begin
+                  Result := false;
+                end else
+                  Variant(var1^) := Variant(var1^) * tvar;
+              end;
+            btSet:
+              begin
+                if var1Type = var2Type then
+                begin
+                  Set_Intersect(var1, var2, TPSTypeRec_Set(var1Type).aByteSize);
+                end else result := False;
+              end;
+          else begin
+              CMD_Err(erTypeMismatch);
+              exit;
+            end;
+          end;
+          if not Result then begin
+            CMD_Err(erTypeMismatch);
+            exit;
+          end;
+        end;
+      3: begin { / }
+          case var1Type.BaseType of
+            btU8: tbtU8(var1^) := tbtU8(var1^) div PSGetUInt(Var2, var2type);
+            btS8: tbts8(var1^) := tbts8(var1^) div PSGetInt(Var2, var2type);
+            btU16: tbtU16(var1^) := tbtU16(var1^) div PSGetUInt(Var2, var2type);
+            btS16: tbts16(var1^) := tbts16(var1^) div PSGetInt(Var2, var2type);
+            btU32:
+              begin
+                if var2type.BaseType = btPointer then
+                begin
+                  var2type := PIFTypeRec(Pointer(IPointer(var2)+4)^);
+                  var2 := Pointer(var2^);
+                  if (var2 = nil) or (var2type = nil) then raise Exception.Create(RPS_TypeMismatch);
+                end;
+                case var2type.BaseType of
+                  btU8: tbtU32(var1^) := tbtU32(var1^) div tbtu8(var2^);
+                  btS8: tbtU32(var1^) := tbtU32(var1^) div cardinal(longint(tbts8(var2^)));
+                  btU16: tbtU32(var1^) := tbtU32(var1^) div tbtu16(var2^);
+                  btS16: tbtU32(var1^) := tbtU32(var1^) div cardinal(longint(tbts16(var2^)));
+                  btU32: tbtU32(var1^) := tbtU32(var1^) div tbtu32(var2^);
+                  btS32: tbtU32(var1^) := tbtU32(var1^) div cardinal(tbts32(var2^));
+              {$IFNDEF PS_NOINT64} btS64: tbtU32(var1^) := tbtU32(var1^) div tbts64(var2^);{$ENDIF}
+                  btChar: tbtU32(var1^) := tbtU32(var1^) div  Ord(tbtchar(var2^));
+              {$IFNDEF PS_NOWIDESTRING}    btWideChar: tbtU32(var1^) := tbtU32(var1^) div Ord(tbtwidechar(var2^));{$ENDIF}
+                  btVariant: tbtU32(var1^) := tbtU32(var1^) div Variant(var2^);
+                  else raise Exception.Create(RPS_TypeMismatch);
+                end;
+              end;
+            btS32:
+              begin
+                if var2type.BaseType = btPointer then
+                begin
+                  var2type := PIFTypeRec(Pointer(IPointer(var2)+4)^);
+                  var2 := Pointer(var2^);
+                  if (var2 = nil) or (var2type = nil) then raise Exception.Create(RPS_TypeMismatch);
+                end;
+                case var2type.BaseType of
+                  btU8: tbts32(var1^) := tbts32(var1^) div tbtu8(var2^);
+                  btS8: tbts32(var1^) := tbts32(var1^) div tbts8(var2^);
+                  btU16: tbts32(var1^) := tbts32(var1^) div tbtu16(var2^);
+                  btS16: tbts32(var1^) := tbts32(var1^) div tbts16(var2^);
+                  btU32: tbts32(var1^) := tbts32(var1^) div Longint(tbtu32(var2^));
+                  btS32: tbts32(var1^) := tbts32(var1^) div tbts32(var2^);
+              {$IFNDEF PS_NOINT64} btS64: tbts32(var1^) := tbts32(var1^) div tbts64(var2^);{$ENDIF}
+                  btChar: tbts32(var1^) := tbts32(var1^) div  Ord(tbtchar(var2^));
+              {$IFNDEF PS_NOWIDESTRING}    btWideChar: tbts32(var1^) := tbts32(var1^) div Ord(tbtwidechar(var2^));{$ENDIF}
+                  btVariant: tbts32(var1^) := tbts32(var1^) div Variant(var2^);
+                  else raise Exception.Create(RPS_TypeMismatch);
+                end;
+              end;
+           {$IFNDEF PS_NOINT64}
+            btS64: tbts64(var1^) := tbts64(var1^) div PSGetInt64(var2, var2type);
+           {$ENDIF}
+            btSingle:
+              begin
+                if var2type.BaseType = btPointer then
+                begin
+                  var2type := PIFTypeRec(Pointer(IPointer(var2)+4)^);
+                  var2 := Pointer(var2^);
+                  if (var2 = nil) or (var2type = nil) then raise Exception.Create(RPS_TypeMismatch);
+                end;
+                case var2type.BaseType of
+                  btU8: tbtsingle(var1^) := tbtsingle(var1^) / tbtu8(var2^);
+                  btS8: tbtsingle(var1^) := tbtsingle(var1^) / tbts8(var2^);
+                  btU16: tbtsingle(var1^) := tbtsingle(var1^) / tbtu16(var2^);
+                  btS16: tbtsingle(var1^) := tbtsingle(var1^) / tbts16(var2^);
+                  btU32: tbtsingle(var1^) := tbtsingle(var1^) / tbtu32(var2^);
+                  btS32: tbtsingle(var1^) := tbtsingle(var1^) / tbts32(var2^);
+              {$IFNDEF PS_NOINT64}    btS64: tbtsingle(var1^) := tbtsingle(var1^) / tbts64(var2^);{$ENDIF}
+                  btSingle: tbtsingle(var1^) := tbtsingle(var1^) / tbtsingle(var2^);
+                  btDouble: tbtsingle(var1^) := tbtsingle(var1^) / tbtdouble(var2^);
+                  btExtended: tbtsingle(var1^) := tbtsingle(var1^) / tbtextended(var2^);
+                  btCurrency: tbtsingle(var1^) := tbtsingle(var1^) / tbtcurrency(var2^);
+                  btVariant:  tbtsingle(var1^) := tbtsingle(var1^) /  Variant(var2^);
+                  else raise Exception.Create(RPS_TypeMismatch);
+                end;
+              end;
+            btCurrency:
+              begin
+                if var2type.BaseType = btPointer then
+                begin
+                  var2type := PIFTypeRec(Pointer(IPointer(var2)+4)^);
+                  var2 := Pointer(var2^);
+                  if (var2 = nil) or (var2type = nil) then raise Exception.Create(RPS_TypeMismatch);
+                end;
+                case var2type.BaseType of
+                  btU8: tbtcurrency(var1^) := tbtcurrency(var1^) / tbtu8(var2^);
+                  btS8: tbtcurrency(var1^) := tbtcurrency(var1^) / tbts8(var2^);
+                  btU16: tbtcurrency(var1^) := tbtcurrency(var1^) / tbtu16(var2^);
+                  btS16: tbtcurrency(var1^) := tbtcurrency(var1^) / tbts16(var2^);
+                  btU32: tbtcurrency(var1^) := tbtdouble(var1^) / tbtu32(var2^);
+                  btS32: tbtcurrency(var1^) := tbtcurrency(var1^) / tbts32(var2^);
+              {$IFNDEF PS_NOINT64}    btS64: tbtcurrency(var1^) := tbtdouble(var1^) / tbts64(var2^);{$ENDIF}
+                  btSingle: tbtcurrency(var1^) := tbtcurrency(var1^) / tbtsingle(var2^);
+                  btDouble: tbtcurrency(var1^) := tbtcurrency(var1^) / tbtdouble(var2^);
+                  btExtended: tbtcurrency(var1^) := tbtcurrency(var1^) / tbtextended(var2^);
+                  btCurrency: tbtcurrency(var1^) := tbtcurrency(var1^) / tbtcurrency(var2^);
+                  btVariant:  tbtcurrency(var1^) := tbtcurrency(var1^) /  Variant(var2^);
+                  else raise Exception.Create(RPS_TypeMismatch);
+                end;
+              end;
+            btDouble:
+              begin
+                if var2type.BaseType = btPointer then
+                begin
+                  var2type := PIFTypeRec(Pointer(IPointer(var2)+4)^);
+                  var2 := Pointer(var2^);
+                  if (var2 = nil) or (var2type = nil) then raise Exception.Create(RPS_TypeMismatch);
+                end;
+                case var2type.BaseType of
+                  btU8: tbtdouble(var1^) := tbtdouble(var1^) / tbtu8(var2^);
+                  btS8: tbtdouble(var1^) := tbtdouble(var1^) / tbts8(var2^);
+                  btU16: tbtdouble(var1^) := tbtdouble(var1^) / tbtu16(var2^);
+                  btS16: tbtdouble(var1^) := tbtdouble(var1^) / tbts16(var2^);
+                  btU32: tbtdouble(var1^) := tbtdouble(var1^) / tbtu32(var2^);
+                  btS32: tbtdouble(var1^) := tbtdouble(var1^) / tbts32(var2^);
+              {$IFNDEF PS_NOINT64}    btS64: tbtdouble(var1^) := tbtdouble(var1^) / tbts64(var2^);{$ENDIF}
+                  btSingle: tbtdouble(var1^) := tbtdouble(var1^) / tbtsingle(var2^);
+                  btDouble: tbtdouble(var1^) := tbtdouble(var1^) / tbtdouble(var2^);
+                  btExtended: tbtdouble(var1^) := tbtdouble(var1^) / tbtextended(var2^);
+                  btCurrency: tbtdouble(var1^) := tbtdouble(var1^) / tbtcurrency(var2^);
+                  btVariant:  tbtdouble(var1^) := tbtdouble(var1^) /  Variant(var2^);
+                  else raise Exception.Create(RPS_TypeMismatch);
+                end;
+              end;
+            btExtended:
+              begin
+                if var2type.BaseType = btPointer then
+                begin
+                  var2type := PIFTypeRec(Pointer(IPointer(var2)+4)^);
+                  var2 := Pointer(var2^);
+                  if (var2 = nil) or (var2type = nil) then raise Exception.Create(RPS_TypeMismatch);
+                end;
+                case var2type.BaseType of
+                  btU8: tbtextended(var1^) := tbtextended(var1^) / tbtu8(var2^);
+                  btS8: tbtextended(var1^) := tbtextended(var1^) / tbts8(var2^);
+                  btU16: tbtextended(var1^) := tbtextended(var1^) / tbtu16(var2^);
+                  btS16: tbtextended(var1^) := tbtextended(var1^) / tbts16(var2^);
+                  btU32: tbtextended(var1^) := tbtextended(var1^) / tbtu32(var2^);
+                  btS32: tbtextended(var1^) := tbtextended(var1^) / tbts32(var2^);
+              {$IFNDEF PS_NOINT64}    btS64: tbtextended(var1^) := tbtextended(var1^) / tbts64(var2^);{$ENDIF}
+                  btSingle: tbtextended(var1^) := tbtextended(var1^) / tbtsingle(var2^);
+                  btDouble: tbtextended(var1^) := tbtextended(var1^) / tbtdouble(var2^);
+                  btExtended: tbtextended(var1^) := tbtextended(var1^) / tbtextended(var2^);
+                  btCurrency: tbtextended(var1^) := tbtextended(var1^) / tbtcurrency(var2^);
+                  btVariant:  tbtextended(var1^) := tbtextended(var1^) /  Variant(var2^);
+                  else raise Exception.Create(RPS_TypeMismatch);
+                end;
+              end;
+            btVariant:
+              begin
+                if not IntPIFVariantToVariant(var2, var2type, tvar) then
+                begin
+                  Result := false;
+                end else
+                begin
+                  if VarIsFloat(variant(var1^)) then
+                    Variant(var1^) := Variant(var1^) / tvar
+                  else
+                    Variant(var1^) := Variant(var1^) div tvar;
+                end;
+              end;
+          else begin
+              CMD_Err(erTypeMismatch);
+              exit;
+            end;
+          end;
+          if not Result then begin
+            CMD_Err(erTypeMismatch);
+            exit;
+          end;
+        end;
+      4: begin { MOD }
+          case var1Type.BaseType of
+            btU8: tbtU8(var1^) := tbtU8(var1^) mod PSGetUInt(Var2, var2type);
+            btS8: tbts8(var1^) := tbts8(var1^) mod PSGetInt(Var2, var2type);
+            btU16: tbtU16(var1^) := tbtU16(var1^) mod PSGetUInt(Var2, var2type);
+            btS16: tbts16(var1^) := tbts16(var1^) mod PSGetInt(Var2, var2type);
+            btU32:
+              begin
+                if var2type.BaseType = btPointer then
+                begin
+                  var2type := PIFTypeRec(Pointer(IPointer(var2)+4)^);
+                  var2 := Pointer(var2^);
+                  if (var2 = nil) or (var2type = nil) then raise Exception.Create(RPS_TypeMismatch);
+                end;
+                case var2type.BaseType of
+                  btU8: tbtU32(var1^) := tbtU32(var1^) mod tbtu8(var2^);
+                  btS8: tbtU32(var1^) := tbtU32(var1^) mod cardinal(longint(tbts8(var2^)));
+                  btU16: tbtU32(var1^) := tbtU32(var1^) mod tbtu16(var2^);
+                  btS16: tbtU32(var1^) := tbtU32(var1^) mod cardinal(longint(tbts16(var2^)));
+                  btU32: tbtU32(var1^) := tbtU32(var1^) mod tbtu32(var2^);
+                  btS32: tbtU32(var1^) := tbtU32(var1^) mod cardinal(tbts32(var2^));
+              {$IFNDEF PS_NOINT64} btS64: tbtU32(var1^) := tbtU32(var1^) mod tbts64(var2^);{$ENDIF}
+                  btChar: tbtU32(var1^) := tbtU32(var1^) mod  Ord(tbtchar(var2^));
+              {$IFNDEF PS_NOWIDESTRING}    btWideChar: tbtU32(var1^) := tbtU32(var1^) mod Ord(tbtwidechar(var2^));{$ENDIF}
+                  btVariant: tbtU32(var1^) := tbtU32(var1^) mod Variant(var2^);
+                  else raise Exception.Create(RPS_TypeMismatch);
+                end;
+              end;
+            btS32:
+              begin
+                if var2type.BaseType = btPointer then
+                begin
+                  var2type := PIFTypeRec(Pointer(IPointer(var2)+4)^);
+                  var2 := Pointer(var2^);
+                  if (var2 = nil) or (var2type = nil) then raise Exception.Create(RPS_TypeMismatch);
+                end;
+                case var2type.BaseType of
+                  btU8: tbts32(var1^) := tbts32(var1^) mod tbtu8(var2^);
+                  btS8: tbts32(var1^) := tbts32(var1^) mod tbts8(var2^);
+                  btU16: tbts32(var1^) := tbts32(var1^) mod tbtu16(var2^);
+                  btS16: tbts32(var1^) := tbts32(var1^) mod tbts16(var2^);
+                  btU32: tbts32(var1^) := tbts32(var1^) mod Longint(tbtu32(var2^));
+                  btS32: tbts32(var1^) := tbts32(var1^) mod tbts32(var2^);
+              {$IFNDEF PS_NOINT64} btS64: tbts32(var1^) := tbts32(var1^) mod tbts64(var2^);{$ENDIF}
+                  btChar: tbts32(var1^) := tbts32(var1^) mod  Ord(tbtchar(var2^));
+              {$IFNDEF PS_NOWIDESTRING}    btWideChar: tbts32(var1^) := tbts32(var1^) mod Ord(tbtwidechar(var2^));{$ENDIF}
+                  btVariant: tbts32(var1^) := tbts32(var1^) mod Variant(var2^);
+                  else raise Exception.Create(RPS_TypeMismatch);
+                end;
+              end;
+           {$IFNDEF PS_NOINT64}
+            btS64: tbts64(var1^) := tbts64(var1^) mod PSGetInt64(var2, var2type);
+           {$ENDIF}
+            btVariant:
+              begin
+                if not IntPIFVariantToVariant(var2, var2type, tvar) then
+                begin
+                  Result := false;
+                end else
+                  Variant(var1^) := Variant(var1^) mod tvar;
+              end;
+          else begin
+              CMD_Err(erTypeMismatch);
+              exit;
+            end;
+          end;
+          if not Result then begin
+            CMD_Err(erTypeMismatch);
+            exit;
+          end;
+        end;
+      5: begin { SHL }
+          case var1Type.BaseType of
+            btU8: tbtU8(var1^) := tbtU8(var1^) shl PSGetUInt(Var2, var2type);
+            btS8: tbts8(var1^) := tbts8(var1^) shl PSGetInt(Var2, var2type);
+            btU16: tbtU16(var1^) := tbtU16(var1^) shl PSGetUInt(Var2, var2type);
+            btS16: tbts16(var1^) := tbts16(var1^) shl PSGetInt(Var2, var2type);
+            btU32: tbtU32(var1^) := tbtU32(var1^) shl PSGetUInt(Var2, var2type);
+            btS32: tbts32(var1^) := tbts32(var1^) shl PSGetInt(Var2, var2type);
+           {$IFNDEF PS_NOINT64}
+            btS64: tbts64(var1^) := tbts64(var1^) shl PSGetInt64(var2, var2type);
+           {$ENDIF}
+            btVariant:
+              begin
+                if not IntPIFVariantToVariant(var2, var2type, tvar) then
+                begin
+                  Result := false;
+                end else
+                  Variant(var1^) := Variant(var1^) shl tvar;
+              end;
+          else begin
+              CMD_Err(erTypeMismatch);
+              exit;
+            end;
+          end;
+          if not Result then begin
+            CMD_Err(erTypeMismatch);
+            exit;
+          end;
+        end;
+      6: begin { SHR }
+          case var1Type.BaseType of
+            btU8: tbtU8(var1^) := tbtU8(var1^) shr PSGetUInt(Var2, var2type);
+            btS8: tbts8(var1^) := tbts8(var1^) shr PSGetInt(Var2, var2type);
+            btU16: tbtU16(var1^) := tbtU16(var1^) shr PSGetUInt(Var2, var2type);
+            btS16: tbts16(var1^) := tbts16(var1^) shr PSGetInt(Var2, var2type);
+            btU32: tbtU32(var1^) := tbtU32(var1^) shr PSGetUInt(Var2, var2type);
+            btS32: tbts32(var1^) := tbts32(var1^) shr PSGetInt(Var2, var2type);
+           {$IFNDEF PS_NOINT64}
+            btS64: tbts64(var1^) := tbts64(var1^) shr PSGetInt64(var2, var2type);
+           {$ENDIF}
+            btVariant:
+              begin
+                if not IntPIFVariantToVariant(var2, var2type, tvar) then
+                begin
+                  Result := false;
+                end else
+                  Variant(var1^) := Variant(var1^) shr tvar;
+              end;
+          else begin
+              CMD_Err(erTypeMismatch);
+              exit;
+            end;
+          end;
+          if not Result then begin
+            CMD_Err(erTypeMismatch);
+            exit;
+          end;
+        end;
+      7: begin { AND }
+          case var1Type.BaseType of
+            btU8: tbtU8(var1^) := tbtU8(var1^) and PSGetUInt(Var2, var2type);
+            btS8: tbts8(var1^) := tbts8(var1^) and PSGetInt(Var2, var2type);
+            btU16: tbtU16(var1^) := tbtU16(var1^) and PSGetUInt(Var2, var2type);
+            btS16: tbts16(var1^) := tbts16(var1^) and PSGetInt(Var2, var2type);
+            btU32: tbtU32(var1^) := tbtU32(var1^) and PSGetUInt(Var2, var2type);
+            btS32: tbts32(var1^) := tbts32(var1^) and PSGetInt(Var2, var2type);
+           {$IFNDEF PS_NOINT64}
+            btS64: tbts64(var1^) := tbts64(var1^) and PSGetInt64(var2, var2type);
+           {$ENDIF}
+            btVariant:
+              begin
+                if not IntPIFVariantToVariant(var2, var2type, tvar) then
+                begin
+                  Result := false;
+                end else
+                  Variant(var1^) := Variant(var1^) and tvar;
+              end;
+          else begin
+              CMD_Err(erTypeMismatch);
+              exit;
+            end;
+          end;
+          if not Result then begin
+            CMD_Err(erTypeMismatch);
+            exit;
+          end;
+        end;
+      8: begin { OR }
+          case var1Type.BaseType of
+            btU8: tbtU8(var1^) := tbtU8(var1^) or PSGetUInt(Var2, var2type);
+            btS8: tbts8(var1^) := tbts8(var1^) or PSGetInt(Var2, var2type);
+            btU16: tbtU16(var1^) := tbtU16(var1^) or PSGetUInt(Var2, var2type);
+            btS16: tbts16(var1^) := tbts16(var1^) or PSGetInt(Var2, var2type);
+            btU32: tbtU32(var1^) := tbtU32(var1^) or PSGetUInt(Var2, var2type);
+            btS32: tbts32(var1^) := tbts32(var1^) or PSGetInt(Var2, var2type);
+           {$IFNDEF PS_NOINT64}
+            btS64: tbts64(var1^) := tbts64(var1^) or PSGetInt64(var2, var2type);
+           {$ENDIF}
+            btVariant:
+              begin
+                if not IntPIFVariantToVariant(var2, var2type, tvar) then
+                begin
+                  Result := false;
+                end else
+                  Variant(var1^) := Variant(var1^) or tvar;
+              end;
+          else begin
+              CMD_Err(erTypeMismatch);
+              exit;
+            end;
+          end;
+          if not Result then begin
+            CMD_Err(erTypeMismatch);
+            exit;
+          end;
+        end;
+      9: begin { XOR }
+          case var1Type.BaseType of
+            btU8: tbtU8(var1^) := tbtU8(var1^) xor PSGetUInt(Var2, var2type);
+            btS8: tbts8(var1^) := tbts8(var1^) xor PSGetInt(Var2, var2type);
+            btU16: tbtU16(var1^) := tbtU16(var1^) xor PSGetUInt(Var2, var2type);
+            btS16: tbts16(var1^) := tbts16(var1^) xor PSGetInt(Var2, var2type);
+            btU32: tbtU32(var1^) := tbtU32(var1^) xor PSGetUInt(Var2, var2type);
+            btS32: tbts32(var1^) := tbts32(var1^) xor PSGetInt(Var2, var2type);
+           {$IFNDEF PS_NOINT64}
+            btS64: tbts64(var1^) := tbts64(var1^) xor PSGetInt64(var2, var2type);
+           {$ENDIF}
+            btVariant:
+              begin
+                if not IntPIFVariantToVariant(var2, var2type, tvar) then
+                begin
+                  Result := false;
+                end else
+                  Variant(var1^) := Variant(var1^) xor tvar;
+              end;
+          else begin
+              CMD_Err(erTypeMismatch);
+              exit;
+            end;
+          end;
+          if not Result then begin
+            CMD_Err(erTypeMismatch);
+            exit;
+          end;
+        end;
+      10:
+        begin // as
+          case var1Type.BaseType of
+            btClass:
+              begin
+                if var2type.BaseType <> btU32 then
+                  Result := False
+                else
+                begin
+                  var2type := FTypes[tbtu32(var2^)];
+                  if (var2type = nil) or (var2type.BaseType <> btClass) then
+                    Result := false
+                  else
+                  begin
+                    if not Class_IS(Self, TObject(var1^), var2type) then
+                      Result := false
+                  end;
+                end;
+              end;
+          else begin
+              CMD_Err(erTypeMismatch);
+              exit;
+            end;
+          end;
+          if not Result then begin
+            CMD_Err(erTypeMismatch);
+            exit;
+          end;
+        end;
+    else begin
+        Result := False;
+        CMD_Err(erInvalidOpcodeParameter);
+        exit;
+      end;
+    end;
+  except
+    {$IFDEF DELPHI6UP}
+    Tmp := AcquireExceptionObject;
+    {$ELSE}
+    if RaiseList <> nil then
+    begin
+      Tmp := Exception(PRaiseFrame(RaiseList)^.ExceptObject);
+      PRaiseFrame(RaiseList)^.ExceptObject := nil;
+    end else
+      Tmp := nil;
+    {$ENDIF}
+    if Tmp <> nil then
+    begin
+      if Tmp is EPSException then
+      begin
+        Result := False;
+        ExceptionProc(EPSException(tmp).ProcNo, EPSException(tmp).ProcPos, erCustomError, tbtString(EPSException(tmp).Message), nil);
+        exit;
+      end else
+      if Tmp is EDivByZero then
+      begin
+        Result := False;
+        CMD_Err3(erDivideByZero, '', Tmp);
+        Exit;
+      end;
+      if Tmp is EZeroDivide then
+      begin
+        Result := False;
+        CMD_Err3(erDivideByZero, '', Tmp);
+        Exit;
+      end;
+      if Tmp is EMathError then
+      begin
+        Result := False;
+        CMD_Err3(erMathError, '', Tmp);
+        Exit;
+      end;
+    end;
+    if (tmp <> nil) and (Tmp is Exception) then
+      CMD_Err3(erException, tbtString(Exception(Tmp).Message), Tmp)
+    else
+      CMD_Err3(erException, '', Tmp);
+    Result := False;
+  end;
+end;
+
+function TPSExec.ReadVariable(var Dest: TPSResultData; UsePointer: Boolean): Boolean;
+var
+  VarType: Cardinal;
+  Param: Cardinal;
+  Tmp: PIfVariant;
+  at: TPSTypeRec;
+
+begin
+  if FCurrentPosition + 4 >= FDataLength then
+  begin
+    CMD_Err(erOutOfRange); // Error
+    Result := False;
+    exit;
+  end;
+  VarType := FData^[FCurrentPosition];
+  Inc(FCurrentPosition);
+  Param := Cardinal((@FData^[FCurrentPosition])^);
+  Inc(FCurrentPosition, 4);
+  case VarType of
+    0:
+      begin
+        Dest.FreeType := vtNone;
+        if Param < PSAddrNegativeStackStart then
+        begin
+          if Param >= Cardinal(FGlobalVars.Count) then
+          begin
+            CMD_Err(erOutOfGlobalVarsRange);
+            Result := False;
+            exit;
+          end;
+          Tmp := FGlobalVars.Data[param];
+        end else
+        begin
+          Param := Cardinal(Longint(-PSAddrStackStart) +
+            Longint(FCurrStackBase) + Longint(Param));
+          if Param >= Cardinal(FStack.Count) then
+          begin
+            CMD_Err(erOutOfGlobalVarsRange);
+            Result := False;
+            exit;
+          end;
+          Tmp := FStack.Data[param];
+        end;
+        if (UsePointer) and (Tmp.FType.BaseType = btPointer) then
+        begin
+          Dest.aType := PPSVariantPointer(Tmp).DestType;
+          Dest.P := PPSVariantPointer(Tmp).DataDest;
+          if Dest.P = nil then
+          begin
+            Cmd_Err(erNullPointerException);
+            Result := False;
+            exit;
+          end;
+        end else
+        begin
+          Dest.aType := PPSVariantData(Tmp).vi.FType;
+          Dest.P := @PPSVariantData(Tmp).Data;
+        end;
+      end;
+    1: begin
+        if Param >= FTypes.Count then
+        begin
+          CMD_Err(erInvalidType);
+          Result := False;
+          exit;
+        end;
+        at := FTypes.Data^[Param];
+        Param := FTempVars.FLength;
+        FTempVars.FLength := Cardinal(Longint(Param) + Longint(at.RealSize) + Longint(RTTISize + 3)) and not 3;
+        if FTempVars.FLength > FTempVars.FCapacity then FtempVars.AdjustLength;
+        Tmp := Pointer(IPointer(FtempVars.FDataPtr) + IPointer(Param));
+
+        if Cardinal(FTempVars.FCount) >= Cardinal(FTempVars.FCapacity) then
+        begin
+          Inc(FTempVars.FCapacity, FCapacityInc);// := FCount + 1;
+          ReAllocMem(FTempVars.FData, FTempVars.FCapacity shl 2);
+        end;
+        FTempVars.FData[FTempVars.FCount] := Tmp; // Instead of SetItem
+        Inc(FTempVars.FCount);
+      {$IFNDEF PS_NOSMARTLIST}
+        Inc(FTempVars.FCheckCount);
+        if FTempVars.FCheckCount > FMaxCheckCount then FTempVars.Recreate;
+      {$ENDIF}
+
+
+        Tmp.FType := at;
+        Dest.P := @PPSVariantData(Tmp).Data;
+        Dest.aType := tmp.FType;
+        dest.FreeType := vtTempVar;
+        case Dest.aType.BaseType of
+          btSet:
+            begin
+              if not ReadData(Dest.P^, TPSTypeRec_Set(Dest.aType).aByteSize) then
+              begin
+                CMD_Err(erOutOfRange);
+                FTempVars.Pop;
+                Result := False;
+                exit;
+              end;
+            end;
+          bts8, btchar, btU8:
+            begin
+              if FCurrentPosition >= FDataLength then
+              begin
+                CMD_Err(erOutOfRange);
+                FTempVars.Pop;
+                Result := False;
+                exit;
+              end;
+              tbtu8(dest.p^) := FData^[FCurrentPosition];
+              Inc(FCurrentPosition);
+            end;
+          bts16, {$IFNDEF PS_NOWIDESTRING}btwidechar,{$ENDIF} btU16:
+            begin
+              if FCurrentPosition + 1>= FDataLength then
+              begin
+                CMD_Err(erOutOfRange);
+                FTempVars.Pop;
+                Result := False;
+                exit;
+              end;
+              tbtu16(dest.p^) := tbtu16((@FData^[FCurrentPosition])^);
+              Inc(FCurrentPosition, 2);
+            end;
+          bts32, btU32:
+            begin
+              if FCurrentPosition + 3>= FDataLength then
+              begin
+                CMD_Err(erOutOfRange);
+                FTempVars.Pop;
+                Result := False;
+                exit;
+              end;
+              tbtu32(dest.p^) := tbtu32((@FData^[FCurrentPosition])^);
+              Inc(FCurrentPosition, 4);
+            end;
+          btProcPtr:
+            begin
+              if FCurrentPosition + 3>= FDataLength then
+              begin
+                CMD_Err(erOutOfRange);
+                FTempVars.Pop;
+                Result := False;
+                exit;
+              end;
+              tbtu32(dest.p^) := tbtu32((@FData^[FCurrentPosition])^);
+              tbtu32(Pointer(IPointer(dest.p)+4)^) := 0;
+              tbtu32(Pointer(IPointer(dest.p)+8)^) := 0;
+              Inc(FCurrentPosition, 4);
+            end;
+          {$IFNDEF PS_NOINT64}
+          bts64:
+            begin
+              if FCurrentPosition + 7>= FDataLength then
+              begin
+                CMD_Err(erOutOfRange);
+                FTempVars.Pop;
+                Result := False;
+                exit;
+              end;
+              tbts64(dest.p^) := tbts64((@FData^[FCurrentPosition])^);
+              Inc(FCurrentPosition, 8);
+            end;
+          {$ENDIF}
+          btSingle:
+            begin
+              if FCurrentPosition + (Sizeof(Single)-1)>= FDataLength then
+              begin
+                CMD_Err(erOutOfRange);
+                FTempVars.Pop;
+                Result := False;
+                exit;
+              end;
+              tbtsingle(dest.p^) := tbtsingle((@FData^[FCurrentPosition])^);
+              Inc(FCurrentPosition, Sizeof(Single));
+            end;
+          btDouble:
+            begin
+              if FCurrentPosition + (Sizeof(Double)-1)>= FDataLength then
+              begin
+                CMD_Err(erOutOfRange);
+                FTempVars.Pop;
+                Result := False;
+                exit;
+              end;
+              tbtdouble(dest.p^) := tbtdouble((@FData^[FCurrentPosition])^);
+              Inc(FCurrentPosition, Sizeof(double));
+            end;
+
+          btExtended:
+            begin
+              if FCurrentPosition + (sizeof(Extended)-1)>= FDataLength then
+              begin
+                CMD_Err(erOutOfRange);
+                FTempVars.Pop;
+                Result := False;
+                exit;
+              end;
+              tbtextended(dest.p^) := tbtextended((@FData^[FCurrentPosition])^);
+              Inc(FCurrentPosition, sizeof(Extended));
+            end;
+          btPchar, btString:
+          begin
+              if FCurrentPosition + 3 >= FDataLength then
+              begin
+                Cmd_Err(erOutOfRange);
+                FTempVars.Pop;
+                Result := False;
+                exit;
+              end;
+              Param := Cardinal((@FData^[FCurrentPosition])^);
+              Inc(FCurrentPosition, 4);
+              Pointer(Dest.P^) := nil;
+              SetLength(tbtstring(Dest.P^), Param);
+              if not ReadData(tbtstring(Dest.P^)[1], Param) then
+              begin
+                CMD_Err(erOutOfRange);
+                FTempVars.Pop;
+                Result := False;
+                exit;
+              end;
+            end;
+          {$IFNDEF PS_NOWIDESTRING}
+          btWidestring:
+            begin
+              if FCurrentPosition + 3 >= FDataLength then
+              begin
+                Cmd_Err(erOutOfRange);
+                FTempVars.Pop;
+                Result := False;
+                exit;
+              end;
+              Param := Cardinal((@FData^[FCurrentPosition])^);
+              Inc(FCurrentPosition, 4);
+              Pointer(Dest.P^) := nil;
+              SetLength(tbtwidestring(Dest.P^), Param);
+              if not ReadData(tbtwidestring(Dest.P^)[1], Param*2) then
+              begin
+                CMD_Err(erOutOfRange);
+                FTempVars.Pop;
+                Result := False;
+                exit;
+              end;
+            end;
+          {$ENDIF}
+        else begin
+            CMD_Err(erInvalidType);
+            FTempVars.Pop;
+            Result := False;
+            exit;
+          end;
+        end;
+      end;
+    2:
+      begin
+        Dest.FreeType := vtNone;
+        if Param < PSAddrNegativeStackStart then begin
+          if Param >= Cardinal(FGlobalVars.Count) then
+          begin
+            CMD_Err(erOutOfGlobalVarsRange);
+            Result := False;
+            exit;
+          end;
+          Tmp := FGlobalVars.Data[param];
+        end
+        else begin
+          Param := Cardinal(Longint(-PSAddrStackStart) + Longint(FCurrStackBase) + Longint(Param));
+          if Param >= Cardinal(FStack.Count) then
+          begin
+            CMD_Err(erOutOfStackRange);
+            Result := False;
+            exit;
+          end;
+          Tmp := FStack.Data[param];
+        end;
+        if Tmp.FType.BaseType = btPointer then
+        begin
+          Dest.aType := PPSVariantPointer(Tmp).DestType;
+          Dest.P := PPSVariantPointer(Tmp).DataDest;
+          if Dest.P = nil then
+          begin
+            Cmd_Err(erNullPointerException);
+            Result := False;
+            exit;
+          end;
+        end else
+        begin
+          Dest.aType := PPSVariantData(Tmp).vi.FType;
+          Dest.P := @PPSVariantData(Tmp).Data;
+        end;
+        if FCurrentPosition + 3 >= FDataLength then
+        begin
+          CMD_Err(erOutOfRange);
+          Result := False;
+          exit;
+        end;
+        Param := Cardinal((@FData^[FCurrentPosition])^);
+        Inc(FCurrentPosition, 4);
+        case Dest.aType.BaseType of
+          btRecord:
+            begin
+              if Param > Cardinal(TPSTypeRec_Record(Dest.aType).FFieldTypes.Count) then
+              begin
+                CMD_Err(erOutOfRange);
+                Result := False;
+                exit;
+              end;
+              Dest.P := Pointer(IPointer(Dest.P) + IPointer(TPSTypeRec_Record(Dest.aType).RealFieldOffsets[Param]));
+              Dest.aType := TPSTypeRec_Record(Dest.aType).FieldTypes[Param];
+            end;
+          btArray:
+            begin
+              if Param >= Cardinal(PSDynArrayGetLength(Pointer(Dest.P^), dest.aType)) then
+              begin
+                CMD_Err(erOutOfRange);
+                Result := False;
+                exit;
+              end;
+              Dest.P := Pointer(IPointer(Dest.P^) + (Param * TPSTypeRec_Array(Dest.aType).FArrayType.RealSize));
+              Dest.aType := TPSTypeRec_Array(dest.aType).ArrayType;
+            end;
+          btStaticArray:
+            begin
+              if Param >= Cardinal(TPSTypeRec_StaticArray(Dest.aType).Size) then
+              begin
+                CMD_Err(erOutOfRange);
+                Result := False;
+                exit;
+              end;
+              Dest.P := Pointer(IPointer(Dest.P) + (Param * TPSTypeRec_Array(Dest.aType).FArrayType.RealSize));
+              Dest.aType := TPSTypeRec_Array(dest.aType).ArrayType;
+            end;
+        else
+          CMD_Err(erInvalidType);
+          Result := False;
+          exit;
+        end;
+
+        if UsePointer and (Dest.aType.BaseType = btPointer) then
+        begin
+          Dest.aType := TPSTypeRec(Pointer(IPointer(Dest.p)+4)^);
+          Dest.P := Pointer(Dest.p^);
+          if Dest.P = nil then
+          begin
+            Cmd_Err(erNullPointerException);
+            Result := False;
+            exit;
+          end;
+        end;
+      end;
+    3:
+      begin
+        Dest.FreeType := vtNone;
+        if Param < PSAddrNegativeStackStart then begin
+          if Param >= Cardinal(FGlobalVars.Count) then
+          begin
+            CMD_Err(erOutOfGlobalVarsRange);
+            Result := False;
+            exit;
+          end;
+          Tmp := FGlobalVars.Data[param];
+        end
+        else begin
+          Param := Cardinal(Longint(-PSAddrStackStart) + Longint(FCurrStackBase) + Longint(Param));
+          if Param >= Cardinal(FStack.Count) then
+          begin
+            CMD_Err(erOutOfStackRange);
+            Result := False;
+            exit;
+          end;
+          Tmp := FStack.Data[param];
+        end;
+        if (Tmp.FType.BaseType = btPointer) then
+        begin
+          Dest.aType := PPSVariantPointer(Tmp).DestType;
+          Dest.P := PPSVariantPointer(Tmp).DataDest;
+          if Dest.P = nil then
+          begin
+            Cmd_Err(erNullPointerException);
+            Result := False;
+            exit;
+          end;
+        end else
+        begin
+          Dest.aType := PPSVariantData(Tmp).vi.FType;
+          Dest.P := @PPSVariantData(Tmp).Data;
+        end;
+        Param := Cardinal((@FData^[FCurrentPosition])^);
+        Inc(FCurrentPosition, 4);
+        if Param < PSAddrNegativeStackStart then
+        begin
+          if Param >= Cardinal(FGlobalVars.Count) then
+          begin
+            CMD_Err(erOutOfGlobalVarsRange);
+            Result := false;
+            exit;
+          end;
+          Tmp := FGlobalVars[Param];
+        end
+        else begin
+          Param := Cardinal(Longint(-PSAddrStackStart) + Longint(FCurrStackBase) + Longint(Param));
+          if Cardinal(Param) >= Cardinal(FStack.Count) then
+          begin
+            CMD_Err(erOutOfStackRange);
+            Result := false;
+            exit;
+          end;
+          Tmp := FStack[Param];
+        end;
+        case Tmp.FType.BaseType of
+          btu8: Param := PPSVariantU8(Tmp).Data;
+          bts8: Param := PPSVariants8(Tmp).Data;
+          btu16: Param := PPSVariantU16(Tmp).Data;
+          bts16: Param := PPSVariants16(Tmp).Data;
+          btu32: Param := PPSVariantU32(Tmp).Data;
+          bts32: Param := PPSVariants32(Tmp).Data;
+          btPointer:
+            begin
+              if PPSVariantPointer(tmp).DestType <> nil then
+              begin
+                case PPSVariantPointer(tmp).DestType.BaseType of
+                  btu8: Param := tbtu8(PPSVariantPointer(tmp).DataDest^);
+                  bts8: Param := tbts8(PPSVariantPointer(tmp).DataDest^);
+                  btu16: Param := tbtu16(PPSVariantPointer(tmp).DataDest^);
+                  bts16: Param := tbts16(PPSVariantPointer(tmp).DataDest^);
+                  btu32, btProcPtr: Param := tbtu32(PPSVariantPointer(tmp).DataDest^);
+                  bts32: Param := tbts32(PPSVariantPointer(tmp).DataDest^);
+                  else
+                    begin
+                      CMD_Err(ErTypeMismatch);
+                      Result := false;
+                      exit;
+                    end;
+                end;
+              end else
+              begin
+                CMD_Err(ErTypeMismatch);
+                Result := false;
+                exit;
+              end;
+            end;
+        else
+          CMD_Err(ErTypeMismatch);
+          Result := false;
+          exit;
+        end;
+        case Dest.aType.BaseType of
+          btRecord:
+            begin
+              if Param > Cardinal(TPSTypeRec_Record(Dest.aType).FFieldTypes.Count) then
+              begin
+                CMD_Err(erOutOfRange);
+                Result := False;
+                exit;
+              end;
+              Dest.P := Pointer(IPointer(Dest.P) + IPointer(TPSTypeRec_Record(Dest.aType).RealFieldOffsets[Param]));
+              Dest.aType := TPSTypeRec_Record(Dest.aType).FieldTypes[Param];
+            end;
+          btArray:
+            begin
+              if Cardinal(Param) >= Cardinal(PSDynArrayGetLength(Pointer(Dest.P^), dest.aType)) then
+              begin
+                CMD_Err(erOutOfRange);
+                Result := False;
+                exit;
+              end;
+              Dest.P := Pointer(IPointer(Dest.P^) + (Param * TPSTypeRec_Array(Dest.aType).FArrayType.RealSize));
+              Dest.aType := TPSTypeRec_Array(dest.aType).ArrayType;
+            end;
+          btStaticArray:
+            begin
+              if Param >= Cardinal(TPSTypeRec_StaticArray(Dest.aType).Size) then
+              begin
+                CMD_Err(erOutOfRange);
+                Result := False;
+                exit;
+              end;
+              Dest.P := Pointer(IPointer(Dest.P) + (Param * TPSTypeRec_Array(Dest.aType).FArrayType.RealSize));
+              Dest.aType := TPSTypeRec_Array(dest.aType).ArrayType;
+            end;
+        else
+          CMD_Err(erInvalidType);
+          Result := False;
+          exit;
+        end;
+        if UsePointer and (Dest.aType.BaseType = btPointer) then
+        begin
+          Dest.aType := TPSTypeRec(Pointer(IPointer(Dest.p)+4)^);
+          Dest.P := Pointer(Dest.p^);
+          if Dest.P = nil then
+          begin
+            Cmd_Err(erNullPointerException);
+            Result := False;
+            exit;
+          end;
+        end;
+      end;
+  else
+    begin
+      Result := False;
+      exit;
+    end;
+  end;
+  Result := true;
+end;
+
+function TPSExec.DoMinus(Dta: Pointer; aType: TPSTypeRec): Boolean;
+begin
+  case atype.BaseType of
+    btU8: tbtu8(dta^) := -tbtu8(dta^);
+    btU16: tbtu16(dta^) := -tbtu16(dta^);
+    btU32: tbtu32(dta^) := -tbtu32(dta^);
+    btS8: tbts8(dta^) := -tbts8(dta^);
+    btS16: tbts16(dta^) := -tbts16(dta^);
+    btS32: tbts32(dta^) := -tbts32(dta^);
+    {$IFNDEF PS_NOINT64}
+    bts64: tbts64(dta^) := -tbts64(dta^);
+    {$ENDIF}
+    btSingle: tbtsingle(dta^) := -tbtsingle(dta^);
+    btDouble: tbtdouble(dta^) := -tbtdouble(dta^);
+    btExtended: tbtextended(dta^) := -tbtextended(dta^);
+    btCurrency: tbtcurrency(dta^) := -tbtcurrency(dta^);
+    btVariant:
+      begin
+        try
+          Variant(dta^) := - Variant(dta^);
+        except
+          CMD_Err(erTypeMismatch);
+          Result := False;
+          exit;
+        end;
+      end;
+  else
+    begin
+      CMD_Err(erTypeMismatch);
+      Result := False;
+      exit;
+    end;
+  end;
+  Result := True;
+end;
+
+function TPSExec.DoBooleanNot(Dta: Pointer; aType: TPSTypeRec): Boolean;
+begin
+  case aType.BaseType of
+    btU8: tbtu8(dta^) := tbtu8(tbtu8(dta^) = 0);
+    btU16: tbtu16(dta^) := tbtu16(tbtu16(dta^) = 0);
+    btU32: tbtu32(dta^) := tbtu32(tbtu32(dta^) = 0);
+    btS8: tbts8(dta^) := tbts8(tbts8(dta^) = 0);
+    btS16: tbts16(dta^) := tbts16(tbts16(dta^) = 0);
+    btS32: tbts32(dta^) := tbts32(tbts32(dta^) = 0);
+    {$IFNDEF PS_NOINT64}
+    bts64: tbts64(dta^) := tbts64(tbts64(dta^) = 0);
+    {$ENDIF}
+    btVariant:
+      begin
+        try
+          Variant(dta^) := Variant(dta^) = 0;
+        except
+          CMD_Err(erTypeMismatch);
+          Result := False;
+          exit;
+        end;
+      end;
+  else
+    begin
+      CMD_Err(erTypeMismatch);
+      Result := False;
+      exit;
+    end;
+  end;
+  Result := True;
+end;
+
+
+procedure TPSExec.Stop;
+begin
+  if FStatus = isRunning then
+    FStatus := isLoaded
+  else if FStatus = isPaused then begin
+    FStatus := isLoaded;
+    FStack.Clear;
+    FTempVars.Clear;
+  end;
+end;
+
+
+function TPSExec.ReadLong(var b: Cardinal): Boolean;
+begin
+  if FCurrentPosition + 3 < FDataLength then begin
+    b := Cardinal((@FData^[FCurrentPosition])^);
+    Inc(FCurrentPosition, 4);
+    Result := True;
+  end
+  else
+    Result := False;
+end;
+
+function TPSExec.RunProcP(const Params: array of Variant; const Procno: Cardinal): Variant;
+var
+  ParamList: TPSList;
+  ct: PIFTypeRec;
+  pvar: PPSVariant;
+  res, s: tbtString;
+  Proc: TPSInternalProcRec;
+  i: Longint;
+begin
+  if ProcNo >= FProcs.Count then raise Exception.Create(RPS_UnknownProcedure);
+  Proc := GetProcNo(ProcNo) as TPSInternalProcRec;
+  ParamList := TPSList.Create;
+  try
+    s := Proc.ExportDecl;
+    res := grfw(s);
+    i := High(Params);
+    while s <> '' do
+    begin
+      if i < 0 then raise Exception.Create(RPS_NotEnoughParameters);
+      ct := FTypes[StrToInt(copy(GRLW(s), 2, MaxInt))];
+      if ct = nil then raise Exception.Create(RPS_InvalidParameter);
+      pvar := CreateHeapVariant(ct);
+      ParamList.Add(pvar);
+
+      if not VariantToPIFVariant(Self, Params[i], pvar) then raise Exception.Create(RPS_InvalidParameter);
+
+      Dec(i);
+    end;
+    if I > -1 then raise Exception.Create(RPS_TooManyParameters);
+    if res <> '-1' then
+    begin
+      pvar := CreateHeapVariant(FTypes[StrToInt(res)]);
+      ParamList.Add(pvar);
+    end else
+      pvar := nil;
+
+    RunProc(ParamList, ProcNo);
+
+    RaiseCurrentException;
+
+    if pvar <> nil then
+    begin
+      PIFVariantToVariant(PVar, Result);
+    end else
+      Result := Null;
+  finally
+    FreePIFVariantList(ParamList);
+  end;
+end;
+function TPSExec.RunProcPVar(var Params: array of Variant; const Procno: Cardinal): Variant;
+var
+  ParamList: TPSList;
+  ct: PIFTypeRec;
+  pvar: PPSVariant;
+  res, s: tbtString;
+  Proc: TPSInternalProcRec;
+  i: Longint;
+begin
+  if ProcNo >= FProcs.Count then raise Exception.Create(RPS_UnknownProcedure);
+  Proc := GetProcNo(ProcNo) as TPSInternalProcRec;
+  ParamList := TPSList.Create;
+  try
+    s := Proc.ExportDecl;
+    res := grfw(s);
+    i := High(Params);
+    while s <> '' do
+    begin
+      if i < 0 then raise Exception.Create(RPS_NotEnoughParameters);
+      ct := FTypes[StrToInt(copy(GRLW(s), 2, MaxInt))];
+      if ct = nil then raise Exception.Create(RPS_InvalidParameter);
+      pvar := CreateHeapVariant(ct);
+      ParamList.Add(pvar);
+
+      if not VariantToPIFVariant(Self, Params[i], pvar) then raise Exception.Create(RPS_InvalidParameter);
+
+      Dec(i);
+    end;
+    if I > -1 then raise Exception.Create(RPS_TooManyParameters);
+    if res <> '-1' then
+    begin
+      pvar := CreateHeapVariant(FTypes[StrToInt(res)]);
+      ParamList.Add(pvar);
+    end else
+      pvar := nil;
+
+    RunProc(ParamList, ProcNo);
+
+    RaiseCurrentException;
+
+    for i := 0 to Length(Params) - 1 do
+    PIFVariantToVariant(ParamList[i],
+                        Params[(Length(Params) - 1) - i]);
+
+    if pvar <> nil then
+    begin
+      PIFVariantToVariant(PVar, Result);
+    end else
+      Result := Null;
+  finally
+    FreePIFVariantList(ParamList);
+  end;
+end;
+
+function TPSExec.RunProcPN(const Params: array of Variant; const ProcName: tbtString): Variant;
+var
+  ProcNo: Cardinal;
+begin
+  ProcNo := GetProc(ProcName);
+  if ProcNo = InvalidVal then
+    raise Exception.Create(RPS_UnknownProcedure);
+  Result := RunProcP(Params, ProcNo);
+end;
+
+
+function TPSExec.RunProc(Params: TPSList; ProcNo: Cardinal): Boolean;
+var
+  I, I2: Integer;
+  vnew, Vd: PIfVariant;
+  Cp: TPSInternalProcRec;
+  oldStatus: TPSStatus;
+  tmp: TObject;
+begin
+  if FStatus <> isNotLoaded then begin
+    if ProcNo >= FProcs.Count then begin
+      CMD_Err(erOutOfProcRange);
+      Result := False;
+      exit;
+    end;
+    if Params <> nil then
+    begin
+      for I := 0 to Params.Count - 1 do
+      begin
+        vd := Params[I];
+        if vd = nil then
+        begin
+          Result := False;
+          exit;
+        end;
+        vnew := FStack.PushType(FindType2(btPointer));
+        if vd.FType.BaseType = btPointer then
+        begin
+          PPSVariantPointer(vnew).DestType := PPSVariantPointer(vd).DestType;
+          PPSVariantPointer(vnew).DataDest := PPSVariantPointer(vd).DataDest;
+        end else begin
+          PPSVariantPointer(vnew).DestType := vd.FType;
+          PPSVariantPointer(vnew).DataDest := @PPSVariantData(vd).Data;
+        end;
+      end;
+    end;
+    I := FStack.Count;
+    Cp := FCurrProc;
+    oldStatus := FStatus;
+    if TPSProcRec(FProcs.Data^[ProcNo]).ClassType <> TPSExternalProcRec then
+    begin
+      vd := FStack.PushType(FReturnAddressType);
+      PPSVariantReturnAddress(vd).Addr.ProcNo := nil;
+      PPSVariantReturnAddress(vd).Addr.Position := FCurrentPosition;
+      PPSVariantReturnAddress(vd).Addr.StackBase := FCurrStackBase;
+      FCurrStackBase := FStack.Count - 1;
+      FCurrProc := FProcs.Data^[ProcNo];
+      FData := FCurrProc.Data;
+      FDataLength := FCurrProc.Length;
+      FCurrentPosition := 0;
+      FStatus := isPaused;
+      Result := RunScript;
+    end else
+    begin
+      try
+        Result := TPSExternalProcRec(FProcs.Data^[ProcNo]).ProcPtr(Self, TPSExternalProcRec(FProcs.Data^[ProcNo]), FGlobalVars, FStack);
+        if not Result then
+        begin
+          if ExEx = erNoError then
+            CMD_Err(erCouldNotCallProc);
+        end;
+      except
+        {$IFDEF DELPHI6UP}
+        Tmp := AcquireExceptionObject;
+        {$ELSE}
+        if RaiseList <> nil then
+        begin
+          Tmp := Exception(PRaiseFrame(RaiseList)^.ExceptObject);
+          PRaiseFrame(RaiseList)^.ExceptObject := nil;
+        end else
+          Tmp := nil;
+        {$ENDIF}
+        if Tmp <> nil then
+        begin
+          if Tmp is EPSException then
+          begin
+            Result := False;
+            ExceptionProc(EPSException(tmp).ProcNo, EPSException(tmp).ProcPos, erCustomError, tbtString(EPSException(tmp).Message), nil);
+            exit;
+          end else
+          if Tmp is EDivByZero then
+          begin
+            Result := False;
+            CMD_Err3(erDivideByZero, '', Tmp);
+            Exit;
+          end;
+          if Tmp is EZeroDivide then
+          begin
+            Result := False;
+            CMD_Err3(erDivideByZero, '', Tmp);
+            Exit;
+          end;
+          if Tmp is EMathError then
+          begin
+            Result := False;
+            CMD_Err3(erMathError, '', Tmp);
+            Exit;
+          end;
+        end;
+        if (Tmp <> nil) and (Tmp is Exception) then
+          CMD_Err3(erException, tbtString(Exception(Tmp).Message), Tmp) else
+          CMD_Err3(erException, '', Tmp);
+        Result := false;
+        exit;
+      end;
+    end;
+    if Cardinal(FStack.Count) > Cardinal(I) then
+    begin
+      vd := FStack[I];
+      if (vd <> nil) and (vd.FType = FReturnAddressType) then
+      begin
+        for i2 := FStack.Count - 1 downto I + 1 do
+          FStack.Pop;
+        FCurrentPosition := PPSVariantReturnAddress(vd).Addr.Position;
+        FCurrStackBase := PPSVariantReturnAddress(vd).Addr.StackBase;
+        FStack.Pop;
+      end;
+    end;
+    if Params <> nil then
+    begin
+      for I := Params.Count - 1 downto 0 do
+      begin
+        if FStack.Count = 0 then
+          Break
+        else
+          FStack.Pop;
+      end;
+    end;
+    FStatus := oldStatus;
+    FCurrProc := Cp;
+    if FCurrProc <> nil then
+    begin
+      FData := FCurrProc.Data;
+      FDataLength := FCurrProc.Length;
+    end;
+  end else begin
+    Result := False;
+  end;
+end;
+
+
+function TPSExec.FindType2(BaseType: TPSBaseType): PIFTypeRec;
+var
+  l: Cardinal;
+begin
+  FindType2 := FindType(0, BaseType, l);
+
+end;
+
+function TPSExec.FindType(StartAt: Cardinal; BaseType: TPSBaseType; var l: Cardinal): PIFTypeRec;
+var
+  I: Integer;
+  n: PIFTypeRec;
+begin
+  for I := StartAt to FTypes.Count - 1 do begin
+    n := FTypes[I];
+    if n.BaseType = BaseType then begin
+      l := I;
+      Result := n;
+      exit;
+    end;
+  end;
+  Result := nil;
+end;
+
+function TPSExec.GetTypeNo(l: Cardinal): PIFTypeRec;
+begin
+  Result := FTypes[l];
+end;
+
+function TPSExec.GetProc(const Name: tbtString): Cardinal;
+var
+  MM,
+    I: Longint;
+  n: PIFProcRec;
+  s: tbtString;
+begin
+  s := FastUpperCase(name);
+  MM := MakeHash(s);
+  for I := FProcs.Count - 1 downto 0 do begin
+    n := FProcs.Data^[I];
+    if (n.ClassType = TPSInternalProcRec) and (TPSInternalProcRec(n).ExportNameHash = MM) and (TPSInternalProcRec(n).ExportName = s) then begin
+      Result := I;
+      exit;
+    end else if (n.ClassType = TPSExternalProcRec) and (TPSExternalProcRec(n).Name = s) then
+    begin
+      Result := I;
+      exit;
+    end;
+  end;
+  Result := InvalidVal;
+end;
+
+function TPSExec.GetType(const Name: tbtString): Cardinal;
+var
+  MM,
+    I: Longint;
+  n: PIFTypeRec;
+  s: tbtString;
+begin
+  s := FastUpperCase(name);
+  MM := MakeHash(s);
+  for I := 0 to FTypes.Count - 1 do begin
+    n := FTypes.Data^[I];
+    if (Length(n.ExportName) <> 0) and (n.ExportNameHash = MM) and (n.ExportName = s) then begin
+      Result := I;
+      exit;
+    end;
+  end;
+  Result := InvalidVal;
+end;
+
+
+procedure TPSExec.AddResource(Proc, P: Pointer);
+var
+  Temp: PPSResource;
+begin
+  New(Temp);
+  Temp^.Proc := Proc;
+  Temp^.P := p;
+  FResources.Add(temp);
+end;
+
+procedure TPSExec.DeleteResource(P: Pointer);
+var
+  i: Longint;
+begin
+  for i := Longint(FResources.Count) -1 downto 0 do
+  begin
+    if PPSResource(FResources[I])^.P = P then
+    begin
+      FResources.Delete(I);
+      exit;
+    end;
+  end;
+end;
+
+function TPSExec.FindProcResource(Proc: Pointer): Pointer;
+var
+  I: Longint;
+  temp: PPSResource;
+begin
+  for i := Longint(FResources.Count) -1 downto 0 do
+  begin
+    temp := FResources[I];
+    if temp^.Proc = proc then
+    begin
+      Result := Temp^.P;
+      exit;
+    end;
+  end;
+  Result := nil;
+end;
+
+function TPSExec.IsValidResource(Proc, P: Pointer): Boolean;
+var
+  i: Longint;
+  temp: PPSResource;
+begin
+  for i := 0 to Longint(FResources.Count) -1 do
+  begin
+    temp := FResources[i];
+    if temp^.p = p then begin
+      result := temp^.Proc = Proc;
+      exit;
+    end;
+  end;
+  result := false;
+end;
+
+function TPSExec.FindProcResource2(Proc: Pointer;
+  var StartAt: Longint): Pointer;
+var
+  I: Longint;
+  temp: PPSResource;
+begin
+  if StartAt > longint(FResources.Count) -1 then
+    StartAt := longint(FResources.Count) -1;
+  for i := StartAt downto 0 do
+  begin
+    temp := FResources[I];
+    if temp^.Proc = proc then
+    begin
+      Result := Temp^.P;
+      StartAt := i -1;
+      exit;
+    end;
+  end;
+  StartAt := -1;
+  Result := nil;
+end;
+
+procedure TPSExec.RunLine;
+begin
+  if @FOnRunLine <> nil then
+    FOnRunLine(Self);
+end;
+
+procedure TPSExec.CMD_Err3(EC: TPSError; const Param: tbtString; ExObject: TObject);
+var
+  l: Longint;
+  C: Cardinal;
+begin
+  C := InvalidVal;
+  for l := FProcs.Count - 1 downto 0 do begin
+    if FProcs.Data^[l] = FCurrProc then begin
+      C := l;
+      break;
+    end;
+  end;
+  if @FOnException <> nil then
+    FOnException(Self, Ec, Param, ExObject, C, FCurrentPosition);
+  ExceptionProc(C, FCurrentPosition, EC, Param, ExObject);
+end;
+
+procedure TPSExec.AddSpecialProcImport(const FName: tbtString;
+  P: TPSOnSpecialProcImport; Tag: Pointer);
+var
+  N: PSpecialProc;
+begin
+  New(n);
+  n^.P := P;
+  N^.Name := FName;
+  n^.namehash := MakeHash(N^.Name);
+  n^.Tag := Tag;
+  FSpecialProcList.Add(n);
+end;
+
+function TPSExec.GetVar(const Name: tbtString): Cardinal;
+var
+  l: Longint;
+  h: longint;
+  s: tbtString;
+  p: PPSExportedVar;
+begin
+  s := FastUpperCase(name);
+  h := MakeHash(s);
+  for l := FExportedVars.Count - 1 downto 0 do
+  begin
+    p := FexportedVars.Data^[L];
+    if (p^.FNameHash = h) and(p^.FName=s) then
+    begin
+      Result := L;
+      exit;
+    end;
+  end;
+  Result := InvalidVal;
+end;
+
+function TPSExec.GetVarNo(C: Cardinal): PIFVariant;
+begin
+  Result := FGlobalVars[c];
+end;
+
+function TPSExec.GetVar2(const Name: tbtString): PIFVariant;
+begin
+  Result := GetVarNo(GetVar(Name));
+end;
+
+function TPSExec.GetProcNo(C: Cardinal): PIFProcRec;
+begin
+  Result := FProcs[c];
+end;
+
+function TPSExec.DoIntegerNot(Dta: Pointer; aType: TPSTypeRec): Boolean;
+begin
+  case aType.BaseType of
+    btU8: tbtu8(dta^) := not tbtu8(dta^);
+    btU16: tbtu16(dta^) := not tbtu16(dta^);
+    btU32: tbtu32(dta^) := not tbtu32(dta^);
+    btS8: tbts8(dta^) := not tbts8(dta^);
+    btS16: tbts16(dta^) := not tbts16(dta^);
+    btS32: tbts32(dta^) := not tbts32(dta^);
+    {$IFNDEF PS_NOINT64}
+    bts64: tbts64(dta^) := not tbts64(dta^);
+    {$ENDIF}
+    btVariant:
+      begin
+        try
+          Variant(dta^) := not Variant(dta^);
+        except
+          CMD_Err(erTypeMismatch);
+          Result := False;
+          exit;
+        end;
+      end;
+  else
+    begin
+      CMD_Err(erTypeMismatch);
+      Result := False;
+      exit;
+    end;
+  end;
+  Result := True;
+end;
+
+type
+  TMyRunLine = procedure(Self: TPSExec);
+  TPSRunLine = procedure of object;
+
+function GetRunLine(FOnRunLine: TPSOnLineEvent; meth: TPSRunLine): TMyRunLine;
+begin
+  if (TMethod(Meth).Code = @TPSExec.RunLine) and (@FOnRunLine = nil) then
+    Result := nil
+  else
+    Result := TMethod(Meth).Code;
+end;
+
+function TPSExec.RunScript: Boolean;
+var
+  CalcType: Cardinal;
+  vd, vs, v3: TPSResultData;
+  vtemp: PIFVariant;
+  p: Cardinal;
+  P2: Longint;
+  u: PIFProcRec;
+  Cmd: Cardinal;
+  I: Longint;
+  pp: TPSExceptionHandler;
+  FExitPoint: Cardinal;
+  FOldStatus: TPSStatus;
+  Tmp: TObject;
+  btemp: Boolean;
+  CallRunline: TMyRunLine;
+begin
+  FExitPoint := InvalidVal;
+  if FStatus = isLoaded then
+  begin
+    for i := FExceptionStack.Count -1 downto 0 do
+    begin
+      pp := FExceptionStack.Data[i];
+      pp.Free;
+    end;
+    FExceptionStack.Clear;
+  end;
+  ExceptionProc(InvalidVal, InvalidVal, erNoError, '', nil);
+  RunScript := True;
+  FOldStatus := FStatus;
+  case FStatus of
+    isLoaded: begin
+        if FMainProc = InvalidVal then
+        begin
+          RunScript := False;
+          exit;
+        end;
+        FStatus := isRunning;
+        FCurrProc := FProcs.Data^[FMainProc];
+        if FCurrProc.ClassType = TPSExternalProcRec then begin
+          CMD_Err(erNoMainProc);
+          FStatus := isLoaded;
+          exit;
+        end;
+        FData := FCurrProc.Data;
+        FDataLength := FCurrProc.Length;
+        FCurrStackBase := InvalidVal;
+        FCurrentPosition := 0;
+      end;
+    isPaused: begin
+        FStatus := isRunning;
+      end;
+  else begin
+      RunScript := False;
+      exit;
+    end;
+  end;
+  CallRunLine := GetRunLine(FOnRunLine, Self.RunLine);
+  repeat
+    FStatus := isRunning;
+//    Cmd := InvalidVal;
+    while FStatus = isRunning do
+    begin
+      if @CallRunLine <> nil then CallRunLine(Self);
+      if FCurrentPosition >= FDataLength then
+      begin
+        CMD_Err(erOutOfRange); // Error
+        break;
+      end;
+//      if cmd <> invalidval then ProfilerExitProc(Cmd+1);
+      cmd := FData^[FCurrentPosition];
+//      ProfilerEnterProc(Cmd+1);
+      Inc(FCurrentPosition);
+        case Cmd of
+          CM_A:
+            begin
+              if not ReadVariable(vd, True) then
+                break;
+              if vd.FreeType <> vtNone then
+              begin
+                if vd.aType.BaseType in NeedFinalization then
+                  FinalizeVariant(vd.P, vd.aType);
+                p := IPointer(FTempVars.Data^[FtempVars.Count-1]) - IPointer(FtempVars.DataPtr);
+                Dec(FTempVars.FCount);
+                {$IFNDEF PS_NOSMARTLIST}
+                Inc(FTempVars.FCheckCount);
+                if FTempVars.FCheckCount > FMaxCheckCount then FTempVars.Recreate;
+                {$ENDIF}
+                FTempVars.FLength := P;
+                if ((FTempVars.FCapacity - FTempVars.FLength) shr 12) > 2 then FTempVars.AdjustLength;
+
+                CMD_Err(erInvalidOpcodeParameter);
+                break;
+              end;
+              if not ReadVariable(vs, True) then
+                Break;
+              if not SetVariantValue(vd.P, vs.P, vd.aType, vs.aType) then
+              begin
+                if vs.FreeType <> vtNone then
+                begin
+                  if vs.aType.BaseType in NeedFinalization then
+                  FinalizeVariant(vs.P, vs.aType);
+                  p := IPointer(FTempVars.Data^[FtempVars.Count-1]) - IPointer(FtempVars.DataPtr);
+                  Dec(FTempVars.FCount);
+                  {$IFNDEF PS_NOSMARTLIST}
+                  Inc(FTempVars.FCheckCount);
+                  if FTempVars.FCheckCount > FMaxCheckCount then FTempVars.Recreate;
+                  {$ENDIF}
+                  FTempVars.FLength := P;
+                  if ((FTempVars.FCapacity - FTempVars.FLength) shr 12) > 2 then FTempVars.AdjustLength;
+                end;
+                Break;
+              end;
+              if vs.FreeType <> vtNone then
+              begin
+                if vs.aType.BaseType in NeedFinalization then
+                FinalizeVariant(vs.P, vs.aType);
+                p := IPointer(FTempVars.Data^[FtempVars.Count-1]) - IPointer(FtempVars.DataPtr);
+                Dec(FTempVars.FCount);
+                {$IFNDEF PS_NOSMARTLIST}
+                Inc(FTempVars.FCheckCount);
+                if FTempVars.FCheckCount > FMaxCheckCount then FTempVars.Recreate;
+                {$ENDIF}
+                FTempVars.FLength := P;
+                if ((FTempVars.FCapacity - FTempVars.FLength) shr 12) > 2 then FTempVars.AdjustLength;
+              end;
+            end;
+          CM_CA:
+            begin
+              if FCurrentPosition >= FDataLength then
+              begin
+                CMD_Err(erOutOfRange); // Error
+                break;
+              end;
+              calctype := FData^[FCurrentPosition];
+              Inc(FCurrentPosition);
+              if not ReadVariable(vd, True) then
+                break;
+              if vd.FreeType <> vtNone then
+              begin
+                if vd.aType.BaseType in NeedFinalization then
+                FinalizeVariant(vd.P, vd.aType);
+                p := IPointer(FTempVars.Data^[FtempVars.Count-1]) - IPointer(FtempVars.DataPtr);
+                Dec(FTempVars.FCount);
+                {$IFNDEF PS_NOSMARTLIST}
+                Inc(FTempVars.FCheckCount);
+                if FTempVars.FCheckCount > FMaxCheckCount then FTempVars.Recreate;
+                {$ENDIF}
+                FTempVars.FLength := P;
+                if ((FTempVars.FCapacity - FTempVars.FLength) shr 12) > 2 then FTempVars.AdjustLength;
+                CMD_Err(erInvalidOpcodeParameter);
+                break;
+              end;
+              if not ReadVariable(vs, True) then
+                Break;
+              if not DoCalc(vd.P, vs.p, vd.aType, vs.aType, CalcType) then
+              begin
+                if vs.FreeType <> vtNone then
+                begin
+                  if vs.aType.BaseType in NeedFinalization then
+                  FinalizeVariant(vs.P, vs.aType);
+                  p := IPointer(FTempVars.Data^[FtempVars.Count-1]) - IPointer(FtempVars.DataPtr);
+                  Dec(FTempVars.FCount);
+                  {$IFNDEF PS_NOSMARTLIST}
+                  Inc(FTempVars.FCheckCount);
+                  if FTempVars.FCheckCount > FMaxCheckCount then FTempVars.Recreate;
+                  {$ENDIF}
+                  FTempVars.FLength := P;
+                  if ((FTempVars.FCapacity - FTempVars.FLength) shr 12) > 2 then FTempVars.AdjustLength;
+                end;
+                Break;
+              end;
+              if vs.FreeType <> vtNone then
+              begin
+                if vs.aType.BaseType in NeedFinalization then
+                FinalizeVariant(vs.P, vs.aType);
+                p := IPointer(FTempVars.Data^[FtempVars.Count-1]) - IPointer(FtempVars.DataPtr);
+                Dec(FTempVars.FCount);
+                {$IFNDEF PS_NOSMARTLIST}
+                Inc(FTempVars.FCheckCount);
+                if FTempVars.FCheckCount > FMaxCheckCount then FTempVars.Recreate;
+                {$ENDIF}
+                FTempVars.FLength := P;
+                if ((FTempVars.FCapacity - FTempVars.FLength) shr 12) > 2 then FTempVars.AdjustLength;
+              end;
+            end;
+          CM_P:
+            begin
+              if not ReadVariable(vs, True) then
+                Break;
+              vtemp := FStack.PushType(vs.aType);
+              vd.P := Pointer(IPointer(vtemp)+4);
+              vd.aType := Pointer(vtemp^);
+              vd.FreeType := vtNone;
+              if not SetVariantValue(Vd.P, vs.P, vd.aType, vs.aType) then
+              begin
+                if vs.FreeType <> vtnone then
+                begin
+                  if vs.aType.BaseType in NeedFinalization then
+                    FinalizeVariant(vs.P, vs.aType);
+                  p := IPointer(FTempVars.Data^[FtempVars.Count-1]) - IPointer(FtempVars.DataPtr);
+                  Dec(FTempVars.FCount);
+                  {$IFNDEF PS_NOSMARTLIST}
+                  Inc(FTempVars.FCheckCount);
+                  if FTempVars.FCheckCount > FMaxCheckCount then FTempVars.Recreate;
+                  {$ENDIF}
+                  FTempVars.FLength := P;
+                  if ((FTempVars.FCapacity - FTempVars.FLength) shr 12) > 2 then FTempVars.AdjustLength;
+                end;
+                break;
+              end;
+              if vs.FreeType <> vtnone then
+              begin
+                if vs.aType.BaseType in NeedFinalization then
+                  FinalizeVariant(vs.P, vs.aType);
+                p := IPointer(FTempVars.Data^[FtempVars.Count-1]) - IPointer(FtempVars.DataPtr);
+                Dec(FTempVars.FCount);
+                {$IFNDEF PS_NOSMARTLIST}
+                Inc(FTempVars.FCheckCount);
+                if FTempVars.FCheckCount > FMaxCheckCount then FTempVars.Recreate;
+                {$ENDIF}
+                FTempVars.FLength := P;
+                if ((FTempVars.FCapacity - FTempVars.FLength) shr 12) > 2 then FTempVars.AdjustLength;
+              end;
+            end;
+          CM_PV:
+            begin
+              if not ReadVariable(vs, True) then
+                Break;
+              if vs.FreeType <> vtnone then
+              begin
+                FTempVars.Pop;
+                CMD_Err(erInvalidOpcodeParameter);
+                break;
+              end;
+              vtemp := FStack.PushType(FindType2(btPointer));
+              if vs.aType.BaseType = btPointer then
+              begin
+                PPSVariantPointer(vtemp).DataDest := Pointer(vs.p^);
+                PPSVariantPointer(vtemp).DestType := Pointer(Pointer(IPointer(vs.P)+4)^);
+                PPSVariantPointer(vtemp).FreeIt := False;
+              end
+              else
+              begin
+                PPSVariantPointer(vtemp).DataDest := vs.p;
+                PPSVariantPointer(vtemp).DestType := vs.aType;
+                PPSVariantPointer(vtemp).FreeIt := False;
+              end;
+            end;
+          CM_PO: begin
+              if FStack.Count = 0 then
+              begin
+                CMD_Err(erOutOfStackRange);
+                break;
+              end;
+              vtemp := FStack.Data^[FStack.Count -1];
+              if (vtemp = nil) or (vtemp.FType.BaseType = btReturnAddress) then
+              begin
+                CMD_Err(erOutOfStackRange);
+                break;
+              end;
+              Dec(FStack.FCount);
+              {$IFNDEF PS_NOSMARTLIST}
+              Inc(FStack.FCheckCount);
+              if FStack.FCheckCount > FMaxCheckCount then FStack.Recreate;
+              {$ENDIF}
+              FStack.FLength := Longint(IPointer(vtemp) - IPointer(FStack.DataPtr));
+              if TPSTypeRec(vtemp^).BaseType in NeedFinalization then
+                FinalizeVariant(Pointer(IPointer(vtemp)+4), Pointer(vtemp^));
+              if ((FStack.FCapacity - FStack.FLength) shr 12) > 2 then FStack.AdjustLength;
+            end;
+          Cm_C: begin
+              if FCurrentPosition + 3 >= FDataLength then
+              begin
+                Cmd_Err(erOutOfRange);
+                Break;
+              end;
+              p := Cardinal((@FData^[FCurrentPosition])^);
+              Inc(FCurrentPosition, 4);
+              if p >= FProcs.Count then begin
+                CMD_Err(erOutOfProcRange);
+                break;
+              end;
+              u := FProcs.Data^[p];
+              if u.ClassType = TPSExternalProcRec then begin
+                try
+                  if not TPSExternalProcRec(u).ProcPtr(Self, TPSExternalProcRec(u), FGlobalVars, FStack) then
+                    Break;
+                except
+                  {$IFDEF DELPHI6UP}
+                  Tmp := AcquireExceptionObject;
+                  {$ELSE}
+                  if RaiseList <> nil then
+                  begin
+                    Tmp := Exception(PRaiseFrame(RaiseList)^.ExceptObject);
+                    PRaiseFrame(RaiseList)^.ExceptObject := nil;
+                  end else
+                    Tmp := nil;
+                  {$ENDIF}
+                  if Tmp <> nil then
+                  begin
+                    if Tmp is EPSException then
+                    begin
+                      ExceptionProc(EPSException(tmp).ProcNo, EPSException(tmp).ProcPos, erCustomError, tbtString(EPSException(tmp).Message), nil);
+                      Break;
+                    end else
+                    if Tmp is EDivByZero then
+                    begin
+                      CMD_Err3(erDivideByZero, '', Tmp);
+                      Break;
+                    end;
+                    if Tmp is EZeroDivide then
+                    begin
+                      CMD_Err3(erDivideByZero, '', Tmp);
+                      Break;
+                    end;
+                    if Tmp is EMathError then
+                    begin
+                      CMD_Err3(erMathError, '', Tmp);
+                      Break;
+                    end;
+                  end;
+                  if (Tmp <> nil) and (Tmp is Exception) then
+                    CMD_Err3(erException, tbtString(Exception(Tmp).Message), Tmp) else
+                    CMD_Err3(erException, '', Tmp);
+                  Break;
+                end;
+              end
+              else begin
+                Vtemp := Fstack.PushType(FReturnAddressType);
+                vd.P := Pointer(IPointer(VTemp)+4);
+                vd.aType := pointer(vtemp^);
+                vd.FreeType := vtNone;
+                PPSVariantReturnAddress(vtemp).Addr.ProcNo := FCurrProc;
+                PPSVariantReturnAddress(vtemp).Addr.Position := FCurrentPosition;
+                PPSVariantReturnAddress(vtemp).Addr.StackBase := FCurrStackBase;
+
+                FCurrStackBase := FStack.Count - 1;
+                FCurrProc := TPSInternalProcRec(u);
+                FData := FCurrProc.Data;
+                FDataLength := FCurrProc.Length;
+                FCurrentPosition := 0;
+              end;
+            end;
+          CM_PG:
+            begin
+              FStack.Pop;
+              if FCurrentPosition + 3 >= FDataLength then
+              begin
+                Cmd_Err(erOutOfRange);
+                Break;
+              end;
+              p := Cardinal((@FData^[FCurrentPosition])^);
+              Inc(FCurrentPosition, 4);
+              FCurrentPosition := FCurrentPosition + p;
+            end;
+          CM_P2G:
+            begin
+              FStack.Pop;
+              FStack.Pop;
+              if FCurrentPosition + 3 >= FDataLength then
+              begin
+                Cmd_Err(erOutOfRange);
+                Break;
+              end;
+              p := Cardinal((@FData^[FCurrentPosition])^);
+              Inc(FCurrentPosition, 4);
+              FCurrentPosition := FCurrentPosition + p;
+            end;
+          Cm_G:
+            begin
+              if FCurrentPosition + 3 >= FDataLength then
+              begin
+                Cmd_Err(erOutOfRange);
+                Break;
+              end;
+              p := Cardinal((@FData^[FCurrentPosition])^);
+              Inc(FCurrentPosition, 4);
+              FCurrentPosition := FCurrentPosition + p;
+            end;
+          Cm_CG:
+            begin
+              if FCurrentPosition + 3 >= FDataLength then
+              begin
+                Cmd_Err(erOutOfRange);
+                Break;
+              end;
+              p := Cardinal((@FData^[FCurrentPosition])^);
+              Inc(FCurrentPosition, 4);
+              btemp := true;
+              if not ReadVariable(vs, btemp) then
+                Break;
+              case Vs.aType.BaseType of
+                btU8: btemp := tbtu8(vs.p^) <> 0;
+                btS8: btemp := tbts8(vs.p^) <> 0;
+                btU16: btemp := tbtu16(vs.p^) <> 0;
+                btS16: btemp := tbts16(vs.p^) <> 0;
+                btU32: btemp := tbtu32(vs.p^) <> 0;
+                btS32: btemp := tbts32(vs.p^) <> 0;
+              else begin
+                  CMD_Err(erInvalidType);
+                  if vs.FreeType <> vtNone then
+                    FTempVars.Pop;
+                  break;
+                end;
+              end;
+              if vs.FreeType <> vtNone then
+                FTempVars.Pop;
+              if btemp then
+                FCurrentPosition := FCurrentPosition + p;
+            end;
+          Cm_CNG:
+            begin
+              if FCurrentPosition + 3 >= FDataLength then
+              begin
+                Cmd_Err(erOutOfRange);
+                Break;
+              end;
+              p := Cardinal((@FData^[FCurrentPosition])^);
+              Inc(FCurrentPosition, 4);
+              btemp := true;
+              if not ReadVariable(vs, BTemp) then
+                Break;
+              case Vs.aType.BaseType of
+                btU8: btemp := tbtu8(vs.p^) = 0;
+                btS8: btemp := tbts8(vs.p^) = 0;
+                btU16: btemp := tbtu16(vs.p^) = 0;
+                btS16: btemp := tbts16(vs.p^) = 0;
+                btU32: btemp := tbtu32(vs.p^) = 0;
+                btS32: btemp := tbts32(vs.p^) = 0;
+              else begin
+                  CMD_Err(erInvalidType);
+                  if vs.FreeType <> vtNone then
+                    FTempVars.Pop;
+                  break;
+                end;
+              end;
+              if vs.FreeType <> vtNone then
+                FTempVars.Pop;
+              if btemp then
+                FCurrentPosition := FCurrentPosition + p;
+            end;
+          Cm_R: begin
+              FExitPoint := FCurrentPosition -1;
+              P2 := 0;
+              if FExceptionStack.Count > 0 then
+              begin
+                pp := FExceptionStack.Data[FExceptionStack.Count -1];
+                while (pp.BasePtr = FCurrStackBase) or ((pp.BasePtr > FCurrStackBase) and (pp.BasePtr <> InvalidVal)) do
+                begin
+                  if pp.StackSize < Cardinal(FStack.Count) then
+                  begin
+                    for p := Longint(FStack.count) -1 downto Longint(pp.StackSize) do
+                      FStack.Pop
+                  end;
+                  FCurrStackBase := pp.BasePtr;
+                  if pp.FinallyOffset <> InvalidVal then
+                  begin
+                    FCurrentPosition := pp.FinallyOffset;
+                    pp.FinallyOffset := InvalidVal;
+                    p2 := 1;
+                    break;
+                  end else if pp.Finally2Offset <> InvalidVal then
+                  begin
+                    FCurrentPosition := pp.Finally2Offset;
+                    pp.Finally2Offset := InvalidVal;
+                    p2 := 1;
+                    break;
+                  end else
+                  begin
+                    pp.Free;
+                    FExceptionStack.DeleteLast;
+                    if FExceptionStack.Count = 0 then break;
+                    pp := FExceptionStack.Data[FExceptionStack.Count -1];
+                  end;
+                end;
+              end;
+              if p2 = 0 then
+              begin
+                FExitPoint := InvalidVal;
+                if FCurrStackBase = InvalidVal then
+                begin
+                  FStatus := FOldStatus;
+                  break;
+                end;
+                for P2 := FStack.Count - 1 downto FCurrStackBase + 1 do
+                  FStack.Pop;
+                if FCurrStackBase >= FStack.Count  then
+                begin
+                  FStatus := FOldStatus;
+                  break;
+                end;
+                vtemp := FStack.Data[FCurrStackBase];
+                FCurrProc := PPSVariantReturnAddress(vtemp).Addr.ProcNo;
+                FCurrentPosition := PPSVariantReturnAddress(vtemp).Addr.Position;
+                FCurrStackBase := PPSVariantReturnAddress(vtemp).Addr.StackBase;
+                FStack.Pop;
+                if FCurrProc = nil then begin
+                  FStatus := FOldStatus;
+                  break;
+                end;
+                FData := FCurrProc.Data;
+                FDataLength := FCurrProc.Length;
+              end;
+            end;
+          Cm_Pt: begin
+              if FCurrentPosition + 3 >= FDataLength then
+              begin
+                Cmd_Err(erOutOfRange);
+                Break;
+              end;
+              p := Cardinal((@FData^[FCurrentPosition])^);
+              Inc(FCurrentPosition, 4);
+              if p > FTypes.Count then
+              begin
+                CMD_Err(erInvalidType);
+                break;
+              end;
+              FStack.PushType(FTypes.Data^[p]);
+            end;
+          cm_bn:
+            begin
+              if not ReadVariable(vd, True) then
+                Break;
+              if vd.FreeType <> vtNone then
+                FTempVars.Pop;
+              if not DoBooleanNot(Vd.P, vd.aType) then
+                break;
+            end;
+          cm_in:
+            begin
+              if not ReadVariable(vd, True) then
+                Break;
+              if vd.FreeType <> vtNone then
+                FTempVars.Pop;
+              if not DoIntegerNot(Vd.P, vd.aType) then
+                break;
+            end;
+          cm_vm:
+            begin
+              if not ReadVariable(vd, True) then
+                Break;
+              if vd.FreeType <> vtNone then
+                FTempVars.Pop;
+              if not DoMinus(Vd.P, vd.aType) then
+                break;
+            end;
+          cm_sf:
+            begin
+              if not ReadVariable(vd, True) then
+                Break;
+              if FCurrentPosition >= FDataLength then
+              begin
+                CMD_Err(erOutOfRange); // Error
+                if vd.FreeType <> vtNone then
+                  FTempVars.Pop;
+                break;
+              end;
+              p := FData^[FCurrentPosition];
+              Inc(FCurrentPosition);
+              case Vd.aType.BaseType of
+                btU8: FJumpFlag := tbtu8(Vd.p^) <> 0;
+                btS8: FJumpFlag := tbts8(Vd.p^) <> 0;
+                btU16: FJumpFlag := tbtu16(Vd.p^) <> 0;
+                btS16: FJumpFlag := tbts16(Vd.p^) <> 0;
+                btU32: FJumpFlag := tbtu32(Vd.p^) <> 0;
+                btS32: FJumpFlag := tbts32(Vd.p^) <> 0;
+              else begin
+                  CMD_Err(erInvalidType);
+                  if vd.FreeType <> vtNone then
+                    FTempVars.Pop;
+                  break;
+                end;
+              end;
+              if p <> 0 then
+                FJumpFlag := not FJumpFlag;
+              if vd.FreeType <> vtNone then
+                FTempVars.Pop;
+            end;
+          cm_fg:
+            begin
+              if FCurrentPosition + 3 >= FDataLength then
+              begin
+                Cmd_Err(erOutOfRange);
+                Break;
+              end;
+              p := Cardinal((@FData^[FCurrentPosition])^);
+              Inc(FCurrentPosition, 4);
+              if FJumpFlag then
+                FCurrentPosition := FCurrentPosition + p;
+            end;
+          cm_puexh:
+            begin
+              pp := TPSExceptionHandler.Create;
+              pp.CurrProc := FCurrProc;
+              pp.BasePtr :=FCurrStackBase;
+              pp.StackSize := FStack.Count;
+              if not ReadLong(pp.FinallyOffset) then begin
+                CMD_Err(erOutOfRange);
+                pp.Free;
+                Break;
+              end;
+              if not ReadLong(pp.ExceptOffset) then begin
+                CMD_Err(erOutOfRange);
+                pp.Free;
+                Break;
+              end;
+              if not ReadLong(pp.Finally2Offset) then begin
+                CMD_Err(erOutOfRange);
+                pp.Free;
+                Break;
+              end;
+              if not ReadLong(pp.EndOfBlock) then begin
+                CMD_Err(erOutOfRange);
+                pp.Free;
+                Break;
+              end;
+              if pp.FinallyOffset <> InvalidVal then
+                pp.FinallyOffset := pp.FinallyOffset + FCurrentPosition;
+              if pp.ExceptOffset <> InvalidVal then
+                pp.ExceptOffset := pp.ExceptOffset + FCurrentPosition;
+              if pp.Finally2Offset <> InvalidVal then
+                pp.Finally2Offset := pp.Finally2Offset + FCurrentPosition;
+              if pp.EndOfBlock <> InvalidVal then
+                pp.EndOfBlock := pp.EndOfBlock + FCurrentPosition;
+              if ((pp.FinallyOffset <> InvalidVal) and (pp.FinallyOffset >= FDataLength)) or
+                ((pp.ExceptOffset <> InvalidVal) and (pp.ExceptOffset >= FDataLength)) or
+                ((pp.Finally2Offset <> InvalidVal) and (pp.Finally2Offset >= FDataLength)) or
+                ((pp.EndOfBlock <> InvalidVal) and (pp.EndOfBlock >= FDataLength)) then
+                begin
+                  CMD_Err(ErOutOfRange);
+                  pp.Free;
+                  Break;
+                end;
+                FExceptionStack.Add(pp);
+            end;
+          cm_poexh:
+            begin
+              if FCurrentPosition >= FDataLength then
+              begin
+                CMD_Err(erOutOfRange); // Error
+                break;
+              end;
+              p := FData^[FCurrentPosition];
+              Inc(FCurrentPosition);
+              case p of
+                2:
+                  begin
+                    if (FExceptionStack.Count = 0) then
+                    begin
+                      cmd_err(ErOutOfRange);
+                      Break;
+                    end;
+                    pp := FExceptionStack.Data^[FExceptionStack.Count -1];
+                    if pp = nil then begin
+                      cmd_err(ErOutOfRange);
+                      Break;
+                    end;
+                    pp.ExceptOffset := InvalidVal;
+                    if pp.Finally2Offset <> InvalidVal then
+                    begin
+                      FCurrentPosition := pp.Finally2Offset;
+                      pp.Finally2Offset := InvalidVal;
+                    end else begin
+                      p := pp.EndOfBlock;
+                      pp.Free;
+                      FExceptionStack.DeleteLast;
+                      if FExitPoint <> InvalidVal then
+                      begin
+                        FCurrentPosition := FExitPoint;
+                      end else begin
+                        FCurrentPosition := p;
+                      end;
+                    end;
+                  end;
+                0:
+                  begin
+                    pp := FExceptionStack.Data^[FExceptionStack.Count -1];
+                    if pp = nil then begin
+                      cmd_err(ErOutOfRange);
+                      Break;
+                    end;
+                    if pp.FinallyOffset <> InvalidVal then
+                    begin
+                      FCurrentPosition := pp.FinallyOffset;
+                      pp.FinallyOffset := InvalidVal;
+                    end else if pp.Finally2Offset <> InvalidVal then
+                    begin
+                       FCurrentPosition := pp.Finally2Offset;
+                       pp.ExceptOffset := InvalidVal;
+                    end else begin
+                      p := pp.EndOfBlock;
+                      pp.Free;
+                      FExceptionStack.DeleteLast;
+                      if ExEx <> eNoError then
+                      begin
+                        Tmp := ExObject;
+                        ExObject := nil;
+                        ExceptionProc(ExProc, ExPos, ExEx, ExParam, Tmp);
+                      end else
+                      if FExitPoint <> InvalidVal then
+                      begin
+                        FCurrentPosition := FExitPoint;
+                      end else begin
+                        FCurrentPosition := p;
+                      end;
+                    end;
+                  end;
+                1:
+                  begin
+                    pp := FExceptionStack.Data^[FExceptionStack.Count -1];
+                    if pp = nil then begin
+                      cmd_err(ErOutOfRange);
+                      Break;
+                    end;
+                    if (ExEx <> ENoError) and (pp.ExceptOffset <> InvalidVal) and (pp.ExceptOffset <> InvalidVal -1) then
+                    begin
+                      FCurrentPosition := pp.ExceptOffset;
+                      pp.ExceptOffset := Cardinal(InvalidVal -1);
+                      pp.ExceptionData := ExEx;
+                      pp.ExceptionObject := ExObject;
+                      pp.ExceptionParam := ExParam;
+                      ExEx := ErNoError;
+                      ExObject := nil;
+                    end else if (pp.Finally2Offset <> InvalidVal) then
+                    begin
+                      FCurrentPosition := pp.Finally2Offset;
+                      pp.Finally2Offset := InvalidVal;
+                    end else begin
+                      p := pp.EndOfBlock;
+                      pp.Free;
+                      FExceptionStack.DeleteLast;
+                      if (ExEx <> eNoError) and (p <> InvalidVal) then
+                      begin
+                        Tmp := ExObject;
+                        ExObject := nil;
+                        ExceptionProc(ExProc, ExPos, ExEx, ExParam, Tmp);
+                      end else
+                      if FExitPoint <> InvalidVal then
+                      begin
+                        FCurrentPosition := FExitPoint;
+                      end else begin
+                        FCurrentPosition := p;
+                      end;
+                    end;
+                  end;
+                3:
+                  begin
+                    pp := FExceptionStack.Data^[FExceptionStack.Count -1];
+                    if pp = nil then begin
+                      cmd_err(ErOutOfRange);
+                      Break;
+                    end;
+                    p := pp.EndOfBlock;
+                    pp.Free;
+                    FExceptionStack.DeleteLast;
+                    if ExEx <> eNoError then
+                    begin
+                      Tmp := ExObject;
+                      ExObject := nil;
+                      ExceptionProc(ExProc, ExPos, ExEx, ExParam, Tmp);
+                    end else
+                    if FExitPoint <> InvalidVal then
+                    begin
+                      FCurrentPosition := FExitPoint;
+                    end else begin
+                      FCurrentPosition := p;
+                    end;
+                 end;
+              end;
+            end;
+          cm_spc:
+            begin
+              if not ReadVariable(vd, False) then
+                Break;
+              if vd.FreeType <> vtNone then
+              begin
+                FTempVars.Pop;
+                CMD_Err(erInvalidOpcodeParameter);
+                break;
+              end;
+              if (Vd.aType.BaseType <> btPointer) then
+              begin
+                CMD_Err(erInvalidOpcodeParameter);
+                break;
+              end;
+              if not ReadVariable(vs, False) then
+                Break;
+              if Pointer(Pointer(IPointer(vD.P)+8)^) <> nil then
+                DestroyHeapVariant2(Pointer(vD.P^), Pointer(Pointer(IPointer(vd.P)+4)^));
+              if vs.aType.BaseType = btPointer then
+              begin
+                if Pointer(vs.P^) <> nil then
+                begin
+                  Pointer(vd.P^) := CreateHeapVariant2(Pointer(Pointer(IPointer(vs.P) + 4)^));
+                  Pointer(Pointer(IPointer(vd.P) + 4)^) := Pointer(Pointer(IPointer(vs.P) + 4)^);
+                  Pointer(Pointer(IPointer(vd.P) + 8)^) := Pointer(1);
+                  if not CopyArrayContents(Pointer(vd.P^), Pointer(vs.P^), 1, Pointer(Pointer(IPointer(vd.P) + 4)^)) then
+                  begin
+                    if vs.FreeType <> vtNone then
+                      FTempVars.Pop;
+                    CMD_Err(ErTypeMismatch);
+                    break;
+                  end;
+                end else
+                begin
+                  Pointer(vd.P^) := nil;
+                  Pointer(Pointer(IPointer(vd.P) + 4)^) := nil;
+                  Pointer(Pointer(IPointer(vd.P) + 8)^) := nil;
+                end;
+              end else begin
+                Pointer(vd.P^) := CreateHeapVariant2(vs.aType);
+                Pointer(Pointer(IPointer(vd.P) + 4)^) := vs.aType;
+                Pointer(Pointer(IPointer(vd.P) + 8)^) := Pointer(1);
+                if not CopyArrayContents(Pointer(vd.P^), vs.P, 1, vs.aType) then
+                begin
+                  if vs.FreeType <> vtNone then
+                    FTempVars.Pop;
+                  CMD_Err(ErTypeMismatch);
+                  break;
+                end;
+              end;
+              if vs.FreeType <> vtNone then
+                FTempVars.Pop;
+
+            end;
+          cm_nop:;
+          cm_dec:
+            begin
+              if not ReadVariable(vd, True) then
+                Break;
+              if vd.FreeType <> vtNone then
+              begin
+                FTempVars.Pop;
+                CMD_Err(erInvalidOpcodeParameter);
+                break;
+              end;
+              case vd.aType.BaseType of
+                btu8: dec(tbtu8(vd.P^));
+                bts8: dec(tbts8(vd.P^));
+                btu16: dec(tbtu16(vd.P^));
+                bts16: dec(tbts16(vd.P^));
+                btu32: dec(tbtu32(vd.P^));
+                bts32: dec(tbts32(vd.P^));
+{$IFNDEF PS_NOINT64}
+                bts64: dec(tbts64(vd.P^));
+{$ENDIF}
+              else
+                begin
+                  CMD_Err(ErTypeMismatch);
+                  Break;
+                end;
+              end;
+            end;
+          cm_inc:
+            begin
+              if not ReadVariable(vd, True) then
+                Break;
+              if vd.FreeType <> vtNone then
+              begin
+                FTempVars.Pop;
+                CMD_Err(erInvalidOpcodeParameter);
+                break;
+              end;
+              case vd.aType.BaseType of
+                btu8: Inc(tbtu8(vd.P^));
+                bts8: Inc(tbts8(vd.P^));
+                btu16: Inc(tbtu16(vd.P^));
+                bts16: Inc(tbts16(vd.P^));
+                btu32: Inc(tbtu32(vd.P^));
+                bts32: Inc(tbts32(vd.P^));
+{$IFNDEF PS_NOINT64}
+                bts64: Inc(tbts64(vd.P^));
+{$ENDIF}
+              else
+                begin
+                  CMD_Err(ErTypeMismatch);
+                  Break;
+                end;
+              end;
+            end;
+          cm_sp:
+            begin
+              if not ReadVariable(vd, False) then
+                Break;
+              if vd.FreeType <> vtNone then
+              begin
+                FTempVars.Pop;
+                CMD_Err(erInvalidOpcodeParameter);
+                break;
+              end;
+              if (Vd.aType.BaseType <> btPointer) then
+              begin
+                CMD_Err(erInvalidOpcodeParameter);
+                break;
+              end;
+              if not ReadVariable(vs, False) then
+                Break;
+              if vs.FreeType <> vtNone then
+              begin
+                FTempVars.Pop;
+                CMD_Err(erInvalidOpcodeParameter);
+                break;
+              end;
+              if vs.aType.BaseType = btPointer then
+              begin
+                Pointer(vd.P^) := Pointer(vs.p^);
+                Pointer(Pointer(IPointer(vd.P)+4)^) := Pointer(Pointer(IPointer(vs.P)+4)^);
+              end
+              else
+              begin
+                Pointer(vd.P^) := vs.P;
+                Pointer(Pointer(IPointer(vd.P)+4)^) := vs.aType;
+              end;
+            end;
+          Cm_cv:
+            begin
+              if not ReadVariable(vd, True) then
+                Break;
+              if vd.aType.BaseType <> btProcPtr then
+              begin
+                if vd.FreeType <> vtNone then
+                  FTempVars.Pop;
+                CMD_Err(ErTypeMismatch);
+                break;
+              end;
+              p := tbtu32(vd.P^);
+              if vd.FreeType <> vtNone then
+                FTempVars.Pop;
+              if (p = 0) and (Pointer(Pointer(IPointer(vd.p)+8)^) <> nil) then
+              begin
+                if not InvokeExternalMethod(TPSTypeRec_ProcPtr(vd.aType), Pointer(Pointer(IPointer(vd.p)+4)^), Pointer(Pointer(IPointer(vd.p)+8)^)) then
+                  Break;
+              end else begin
+                if (p >= FProcs.Count) or (p = FMainProc) then begin
+                  CMD_Err(erOutOfProcRange);
+                  break;
+                end;
+                u := FProcs.Data^[p];
+                if u.ClassType = TPSExternalProcRec then begin
+                  try
+                    if not TPSExternalProcRec(u).ProcPtr(Self, TPSExternalProcRec(u), FGlobalVars, FStack) then
+                      Break;
+                  except
+                    {$IFDEF DELPHI6UP}
+                    Tmp := AcquireExceptionObject;
+                    {$ELSE}
+                    if RaiseList <> nil then
+                    begin
+                      Tmp := Exception(PRaiseFrame(RaiseList)^.ExceptObject);
+                      PRaiseFrame(RaiseList)^.ExceptObject := nil;
+                    end else
+                      Tmp := nil;
+                    {$ENDIF}
+                    if Tmp <> nil then
+                    begin
+                      if Tmp is EPSException then
+                      begin
+                        ExceptionProc(EPSException(tmp).ProcNo, EPSException(tmp).ProcPos, erCustomError, tbtString(EPSException(tmp).Message), nil);
+                        break;
+                      end else
+                      if Tmp is EDivByZero then
+                      begin
+                        CMD_Err3(erDivideByZero, '', Tmp);
+                        break;
+                      end;
+                      if Tmp is EZeroDivide then
+                      begin
+                        CMD_Err3(erDivideByZero, '', Tmp);
+                        break;
+                      end;
+                      if Tmp is EMathError then
+                      begin
+                        CMD_Err3(erMathError, '', Tmp);
+                        break;
+                      end;
+                    end;
+                    if (Tmp <> nil) and (Tmp is Exception) then
+                      CMD_Err3(erException, tbtString(Exception(Tmp).Message), Tmp) else
+                      CMD_Err3(erException, '', Tmp);
+                    Break;
+                  end;
+                end
+                else begin
+                  vtemp := FStack.PushType(FReturnAddressType);
+                  PPSVariantReturnAddress(vtemp).Addr.ProcNo := FCurrProc;
+                  PPSVariantReturnAddress(vtemp).Addr.Position := FCurrentPosition;
+                  PPSVariantReturnAddress(vtemp).Addr.StackBase := FCurrStackBase;
+                  FCurrStackBase := FStack.Count - 1;
+                  FCurrProc := TPSInternalProcRec(u);
+                  FData := FCurrProc.Data;
+                  FDataLength := FCurrProc.Length;
+                  FCurrentPosition := 0;
+                end;
+              end;
+            end;
+          CM_CO:
+            begin
+              if FCurrentPosition >= FDataLength then
+              begin
+                CMD_Err(erOutOfRange); // Error
+                break;
+              end;
+              calctype := FData^[FCurrentPosition];
+              Inc(FCurrentPosition);
+              if not ReadVariable(v3, True) then
+                Break;
+              if v3.FreeType <> vtNone then
+              begin
+                if v3.aType.BaseType in NeedFinalization then
+                  FinalizeVariant(v3.P, v3.aType);
+                p := IPointer(FTempVars.Data^[FtempVars.Count-1]) - IPointer(FtempVars.DataPtr);
+                Dec(FTempVars.FCount);
+                {$IFNDEF PS_NOSMARTLIST}
+                Inc(FTempVars.FCheckCount);
+                if FTempVars.FCheckCount > FMaxCheckCount then FTempVars.Recreate;
+                {$ENDIF}
+                FTempVars.FLength := P;
+                if ((FTempVars.FCapacity - FTempVars.FLength) shr 12) > 2 then FTempVars.AdjustLength;
+                CMD_Err(erInvalidOpcodeParameter);
+                break;
+              end;
+              if not ReadVariable(vs, True) then
+                Break;
+              if not ReadVariable(vd, True) then
+              begin
+                if vs.FreeType <> vtNone then
+                begin
+                  if vs.aType.BaseType in NeedFinalization then
+                    FinalizeVariant(vs.P, vs.aType);
+                  p := IPointer(FTempVars.Data^[FtempVars.Count-1]) - IPointer(FtempVars.DataPtr);
+                  Dec(FTempVars.FCount);
+                  {$IFNDEF PS_NOSMARTLIST}
+                  Inc(FTempVars.FCheckCount);
+                  if FTempVars.FCheckCount > FMaxCheckCount then FTempVars.Recreate;
+                  {$ENDIF}
+                  FTempVars.FLength := P;
+                  if ((FTempVars.FCapacity - FTempVars.FLength) shr 12) > 2 then FTempVars.AdjustLength;
+                end;
+                Break;
+              end;
+              DoBooleanCalc(Vs.P, Vd.P, v3.P, vs.aType, vd.aType, v3.aType, CalcType);
+              if vd.FreeType <> vtNone then
+              begin
+                if vd.aType.BaseType in NeedFinalization then
+                  FinalizeVariant(vd.P, vd.aType);
+                p := IPointer(FTempVars.Data^[FtempVars.Count-1]) - IPointer(FtempVars.DataPtr);
+                Dec(FTempVars.FCount);
+                {$IFNDEF PS_NOSMARTLIST}
+                Inc(FTempVars.FCheckCount);
+                if FTempVars.FCheckCount > FMaxCheckCount then FTempVars.Recreate;
+                {$ENDIF}
+                FTempVars.FLength := P;
+                if ((FTempVars.FCapacity - FTempVars.FLength) shr 12) > 2 then FTempVars.AdjustLength;
+              end;
+              if vs.FreeType <> vtNone then
+              begin
+                if vs.aType.BaseType in NeedFinalization then
+                  FinalizeVariant(vs.P, vs.aType);
+                p := IPointer(FTempVars.Data^[FtempVars.Count-1]) - IPointer(FtempVars.DataPtr);
+                Dec(FTempVars.FCount);
+                {$IFNDEF PS_NOSMARTLIST}
+                Inc(FTempVars.FCheckCount);
+                if FTempVars.FCheckCount > FMaxCheckCount then FTempVars.Recreate;
+                {$ENDIF}
+                FTempVars.FLength := P;
+                if ((FTempVars.FCapacity - FTempVars.FLength) shr 12) > 2 then FTempVars.AdjustLength;
+              end;
+            end;
+
+        else
+          CMD_Err(erInvalidOpcode); // Error
+        end;
+    end;
+//    if cmd <> invalidval then ProfilerExitProc(Cmd+1);
+//    if ExEx <> erNoError then FStatus := FOldStatus;
+  until (FExceptionStack.Count = 0) or (Fstatus <> IsRunning);
+  if FStatus = isLoaded then begin
+    for I := Longint(FStack.Count) - 1 downto 0 do
+      FStack.Pop;
+    FStack.Clear;
+    if FCallCleanup then Cleanup;
+  end;
+  Result := ExEx = erNoError;
+end;
+
+function NVarProc(Caller: TPSExec; p: TPSExternalProcRec; Global, Stack: TPSStack): Boolean;
+var
+  tmp: TPSVariantIFC;
+begin
+   case Longint(p.Ext1) of
+    0:
+      begin
+        if @Caller.FOnSetNVariant = nil then begin Result := False; exit; end;
+        tmp := NewTPSVariantIFC(Stack.Items[Stack.Count - 2], True);
+        if (Tmp.Dta = nil) or (tmp.aType.BaseType <> btVariant) then begin Result := False; exit; end;
+        Caller.FOnSetNVariant(Caller, Stack.GetAnsiString(-1), Variant(tmp.Dta^));
+        Result := true;
+      end;
+    1:
+      begin
+        if @Caller.FOnGetNVariant = nil then begin Result := False; exit; end;
+        tmp := NewTPSVariantIFC(Stack.Items[Stack.Count - 1], False);
+        if (Tmp.Dta = nil) or (tmp.aType.BaseType <> btVariant) then begin Result := False; exit; end;
+        Variant(tmp.Dta^) := Caller.FOnGetNVariant(Caller, Stack.GetAnsiString(-2));
+        Result := true;
+      end;
+  else
+    Result := False;
+  end;
+end;
+
+function DefProc(Caller: TPSExec; p: TPSExternalProcRec; Global, Stack: TPSStack): Boolean;
+var
+  temp: TPSVariantIFC;
+  I: Longint;
+  b: Boolean;
+  pex: TPSExceptionHandler;
+  Tmp: TObject;
+begin
+  case Longint(p.Ext1) of
+    0: Stack.SetAnsiString(-1, IntToStr(Stack.{$IFNDEF PS_NOINT64}GetInt64{$ELSE}GetInt{$ENDIF}(-2))); // inttostr
+    1: Stack.SetInt(-1, StrToInt(Stack.GetAnsiString(-2))); // strtoint
+    2: Stack.SetInt(-1, StrToIntDef(Stack.GetAnsiString(-2), Stack.GetInt(-3))); // strtointdef
+    3: if Stack.GetItem(Stack.Count -2)^.FType.BaseType = btWideString then
+        Stack.SetInt(-1, Pos(Stack.GetWideString(-2), Stack.GetWideString(-3)))// pos
+      else
+        Stack.SetInt(-1, Pos(Stack.GetAnsiString(-2), Stack.GetAnsiString(-3)));// pos
+    4:
+      if Stack.GetItem(Stack.Count -2)^.FType.BaseType = btWideString then
+        Stack.SetWideString(-1, Copy(Stack.GetWideString(-2), Stack.GetInt(-3), Stack.GetInt(-4))) // copy
+      else
+        Stack.SetAnsiString(-1, Copy(Stack.GetAnsiString(-2), Stack.GetInt(-3), Stack.GetInt(-4))); // copy
+    5: //delete
+      begin
+        temp := NewTPSVariantIFC(Stack[Stack.Count -1], True);
+        if (temp.Dta <> nil) and (temp.aType.BaseType = btWideString) then
+        begin
+          Delete(tbtwidestring(temp.Dta^), Stack.GetInt(-2), Stack.GetInt(-3));
+        end else begin
+          if (temp.Dta = nil) or (temp.aType.BaseType <> btString) then
+          begin
+            Result := False;
+            exit;
+          end;
+          Delete(tbtstring(temp.Dta^), Stack.GetInt(-2), Stack.GetInt(-3));
+        end;
+      end;
+    6: // insert
+      begin
+        temp := NewTPSVariantIFC(Stack[Stack.Count -2], True);
+        if (temp.Dta <> nil) and (temp.aType.BaseType = btWideString) then begin
+          Insert(Stack.GetWideString(-1), tbtwidestring(temp.Dta^), Stack.GetInt(-3));
+        end else begin
+          if (temp.Dta = nil) or (temp.aType.BaseType <> btString) then
+          begin
+            Result := False;
+            exit;
+          end;
+          Insert(Stack.GetAnsiString(-1), tbtstring(temp.Dta^), Stack.GetInt(-3));
+        end;
+      end;
+    7: // StrGet
+      begin
+        temp :=  NewTPSVariantIFC(Stack[Stack.Count -2], True);
+        if (temp.Dta = nil) or (temp.aType.BaseType <> btString) then
+        begin
+          Result := False;
+          exit;
+        end;
+        I := Stack.GetInt(-3);
+        if (i<1) or (i>length(tbtstring(temp.Dta^))) then
+        begin
+          Caller.CMD_Err2(erCustomError, tbtString(RPS_OutOfStringRange));
+          Result := False;
+          exit;
+        end;
+        Stack.SetInt(-1,Ord(tbtstring(temp.Dta^)[i]));
+      end;
+    8: // StrSet
+      begin
+        temp := NewTPSVariantIFC(Stack[Stack.Count -3], True);
+        if (temp.Dta = nil) or (temp.aType.BaseType <> btString) then
+        begin
+          Result := False;
+          exit;
+        end;
+        I := Stack.GetInt(-2);
+        if (i<1) or (i>length(tbtstring(temp.Dta^))) then
+        begin
+          Caller.CMD_Err2(erCustomError, tbtString(RPS_OutOfStringRange));
+          Result := True;
+          exit;
+        end;
+        tbtstring(temp.Dta^)[i] := tbtchar(Stack.GetInt(-1));
+      end;
+    10:
+      if Stack.GetItem(Stack.Count -2)^.FType.BaseType = btWideString then
+        Stack.SetWideString(-1, WideUpperCase(Stack.GetWideString(-2))) // Uppercase
+      else
+        Stack.SetAnsiString(-1, FastUppercase(Stack.GetAnsiString(-2))); // Uppercase
+    11:
+      if Stack.GetItem(Stack.Count -2)^.FType.BaseType = btWideString then
+        Stack.SetWideString(-1, WideLowerCase(Stack.GetWideString(-2))) // Uppercase
+      else
+        Stack.SetAnsiString(-1, FastLowercase(Stack.GetAnsiString(-2)));// LowerCase
+    12:
+      if Stack.GetItem(Stack.Count -2)^.FType.BaseType = btWideString then
+        Stack.SetWideString(-1, Trim(Stack.GetWideString(-2))) // Uppercase
+      else
+        Stack.SetAnsiString(-1, Trim(Stack.GetAnsiString(-2)));// Trim
+    13: Stack.SetInt(-1, Length(Stack.GetAnsiString(-2))); // Length
+    14: // SetLength
+      begin
+        temp := NewTPSVariantIFC(Stack[Stack.Count -1], True);
+        if (temp.Dta = nil) or (temp.aType.BaseType <> btString) then
+        begin
+          Result := False;
+          exit;
+        end;
+        SetLength(tbtstring(temp.Dta^), STack.GetInt(-2));
+      end;
+    15: Stack.SetReal(-1, Sin(Stack.GetReal(-2))); // Sin
+    16: Stack.SetReal(-1, Cos(Stack.GetReal(-2)));  // Cos
+    17: Stack.SetReal(-1, SQRT(Stack.GetReal(-2))); // Sqrt
+    18: Stack.SetInt(-1, Round(Stack.GetReal(-2))); // Round
+    19: Stack.SetInt(-1, Trunc(Stack.GetReal(-2))); // Trunc
+    20: Stack.SetReal(-1, Int(Stack.GetReal(-2))); // Int
+    21: Stack.SetReal(-1, Pi); // Pi
+    22: Stack.SetReal(-1, Abs(Stack.GetReal(-2))); // Abs
+    23: Stack.SetReal(-1, StrToFloat(Stack.GetAnsiString(-2))); // StrToFloat
+    24: Stack.SetAnsiString(-1, FloatToStr(Stack.GetReal(-2)));// FloatToStr
+    25: if Stack.GetItem(Stack.Count -2)^.FType.BaseType = btWideString then
+      Stack.SetWideString(-1, PadL(Stack.GetWideString(-2), Stack.GetInt(-3))) //  PadL
+    else
+      Stack.SetAnsiString(-1, PadL(Stack.GetAnsiString(-2), Stack.GetInt(-3))); //  PadL
+    26: if Stack.GetItem(Stack.Count -2)^.FType.BaseType = btWideString then
+      Stack.SetWideString(-1, PadR(Stack.GetWideString(-2), Stack.GetInt(-3))) // PadR
+    else
+      Stack.SetAnsiString(-1, PadR(Stack.GetAnsiString(-2), Stack.GetInt(-3))); // PadR
+    27: if Stack.GetItem(Stack.Count -2)^.FType.BaseType = btWideString then
+      Stack.SetWideString(-1, PadZ(Stack.GetWideString(-2), Stack.GetInt(-3)))// PadZ
+    else
+      Stack.SetAnsiString(-1, PadZ(Stack.GetAnsiString(-2), Stack.GetInt(-3)));// PadZ
+    28: Stack.SetAnsiString(-1, StringOfChar(tbtChar(Stack.GetInt(-2)), Stack.GetInt(-3))); // Replicate/StrOfChar
+    29: // Assigned
+      begin
+        temp := NewTPSVariantIFC(Stack[Stack.Count -2], True);
+        if Temp.dta = nil then
+        begin
+          Result := False;
+          exit;
+        end;
+        case temp.aType.BaseType of
+          btU8, btS8: b := tbtu8(temp.dta^) <> 0;
+          btU16, btS16: b := tbtu16(temp.dta^) <> 0;
+          btU32, btS32: b := tbtu32(temp.dta^) <> 0;
+          btString, btPChar: b := tbtstring(temp.dta^) <> '';
+{$IFNDEF PS_NOWIDESTRING}
+          btWideString: b := tbtwidestring(temp.dta^)<> '';
+{$ENDIF}
+          btArray, btClass{$IFNDEF PS_NOINTERFACES}, btInterface{$ENDIF}: b := Pointer(temp.dta^) <> nil;
+        else
+          Result := False;
+          Exit;
+        end;
+        if b then
+          Stack.SetInt(-1, 1)
+        else
+          Stack.SetInt(-1, 0);
+      end;
+    30:
+      begin {RaiseLastException}
+        if (Caller.FExceptionStack.Count > 0) then begin
+          pex := Caller.FExceptionStack.Data[Caller.fExceptionStack.Count -1];
+          if pex.ExceptOffset = Cardinal(InvalidVal -1) then begin
+            Tmp := pex.ExceptionObject;
+            pex.ExceptionObject := nil;
+            Caller.ExceptionProc(Caller.ExProc, pex.ExceptOffset, pex.ExceptionData, pex.ExceptionParam, tmp);
+          end;
+        end;
+      end;
+    31: Caller.CMD_Err2(TPSError(Stack.GetInt(-1)), Stack.GetAnsiString(-2)); {RaiseExeption}
+    32: Stack.SetInt(-1, Ord(Caller.LastEx)); {ExceptionType}
+    33: Stack.SetAnsiString(-1, Caller.LastExParam); {ExceptionParam}
+    34: Stack.SetInt(-1, Caller.LastExProc); {ExceptionProc}
+    35: Stack.SetInt(-1, Caller.LastExPos); {ExceptionPos}
+    36: Stack.SetAnsiString(-1, PSErrorToString(TPSError(Stack.GetInt(-2)), Stack.GetAnsiString(-3))); {ExceptionToString}
+    37: Stack.SetAnsiString(-1, tbtString(AnsiUpperCase(string(Stack.GetAnsiString(-2))))); // AnsiUppercase
+    38: Stack.SetAnsiString(-1, tbtString(AnsiLowercase(string(Stack.GetAnsiString(-2))))); // AnsiLowerCase
+{$IFNDEF PS_NOINT64}
+    39: Stack.SetInt64(-1, StrToInt64(string(Stack.GetAnsiString(-2))));  // StrToInt64
+    40: Stack.SetAnsiString(-1, IntToStr(Stack.GetInt64(-2)));// Int64ToStr
+{$ENDIF}
+    41:  // sizeof
+      begin
+        temp := NewTPSVariantIFC(Stack[Stack.Count -2], False);
+        if Temp.aType = nil then
+          Stack.SetInt(-1, 0)
+        else
+          Stack.SetInt(-1, Temp.aType.RealSize)
+      end;
+{$IFNDEF PS_NOWIDESTRING}
+    42: // WStrGet
+      begin
+        temp :=  NewTPSVariantIFC(Stack[Stack.Count -2], True);
+        if (temp.Dta = nil) or (temp.aType.BaseType <> btWideString) then
+        begin
+          Result := False;
+          exit;
+        end;
+        I := Stack.GetInt(-3);
+        if (i<1) or (i>length(tbtwidestring(temp.Dta^))) then
+        begin
+          Caller.CMD_Err2(erCustomError, tbtString(RPS_OutOfStringRange));
+          Result := False;
+          exit;
+        end;
+        Stack.SetInt(-1,Ord(tbtwidestring(temp.Dta^)[i]));
+      end;
+    43: // WStrSet
+      begin
+        temp := NewTPSVariantIFC(Stack[Stack.Count -3], True);
+        if (temp.Dta = nil) or (temp.aType.BaseType <> btWideString) then
+        begin
+          Result := False;
+          exit;
+        end;
+        I := Stack.GetInt(-2);
+        if (i<1) or (i>length(tbtWidestring(temp.Dta^))) then
+        begin
+          Caller.CMD_Err2(erCustomError, tbtString(RPS_OutOfStringRange));
+          Result := True;
+          exit;
+        end;
+        tbtWidestring(temp.Dta^)[i] := WideChar(Stack.GetInt(-1));
+      end;
+{$ENDIF}
+    else
+    begin
+      Result := False;
+      exit;
+    end;
+  end;
+  Result := True;
+end;
+function GetArrayLength(Caller: TPSExec; p: TPSExternalProcRec; Global, Stack: TPSStack): Boolean;
+var
+  arr: TPSVariantIFC;
+begin
+  Arr := NewTPSVariantIFC(Stack[Stack.Count-2], True);
+  if (arr.Dta = nil) or (arr.aType.BaseType <> btArray) then
+  begin
+    Result := false;
+    exit;
+  end;
+  Stack.SetInt(-1, PSDynArrayGetLength(Pointer(arr.Dta^), arr.aType));
+  Result := True;
+end;
+
+function SetArrayLength(Caller: TPSExec; p: TPSExternalProcRec; Global, Stack: TPSStack): Boolean;
+var
+  arr: TPSVariantIFC;
+begin
+  Arr := NewTPSVariantIFC(Stack[Stack.Count-1], True);
+  if (arr.Dta = nil) or (arr.aType.BaseType <> btArray) then
+  begin
+    Result := false;
+    exit;
+  end;
+  PSDynArraySetLength(Pointer(arr.Dta^), arr.aType, Stack.GetInt(-2));
+  Result := True;
+end;
+
+
+function InterfaceProc(Sender: TPSExec; p: TPSExternalProcRec; Tag: Pointer): Boolean; forward;
+
+procedure RegisterInterfaceLibraryRuntime(Se: TPSExec);
+begin
+  SE.AddSpecialProcImport('intf', InterfaceProc, nil);
+end;
+
+{$IFNDEF DELPHI6UP}
+function Null: Variant;
+begin
+  Result := System.Null;
+end;
+
+function Unassigned: Variant;
+begin
+  Result := System.Unassigned;
+end;
+{$ENDIF}
+function Length_(Caller: TPSExec; p: TPSExternalProcRec; Global, Stack: TPSStack): Boolean;
+var
+  arr: TPSVariantIFC;
+begin
+  arr:=NewTPSVariantIFC(Stack[Stack.Count-2],false);
+  case arr.aType.BaseType of
+    btArray:
+      begin
+        Stack.SetInt(-1,PSDynArrayGetLength(Pointer(arr.Dta^),arr.aType));
+        Result:=true;
+      end;
+    btStaticArray:
+      begin
+        Stack.SetInt(-1,TPSTypeRec_StaticArray(arr.aType).Size);
+        Result:=true;
+      end;
+    btString:
+      begin
+        Stack.SetInt(-1,length(tbtstring(arr.Dta^)));
+        Result:=true;
+      end;
+    {$IFNDEF PS_NOWIDESTRING}
+    btWideString:
+      begin
+        Stack.SetInt(-1,length(tbtWidestring(arr.Dta^)));
+        Result:=true;
+      end;
+    {$ENDIF}
+    btvariant:
+      begin
+        Stack.SetInt(-1,length(Variant(arr.Dta^)));
+        Result:=true;
+      end;
+  else
+    begin
+      Caller.CMD_Err(ErTypeMismatch);
+      result := true;
+    end;
+  end;
+end;
+
+
+function SetLength_(Caller: TPSExec; p: TPSExternalProcRec; Global, Stack: TPSStack): Boolean;
+var
+  arr: TPSVariantIFC;
+begin
+  Result:=false;
+  arr:=NewTPSVariantIFC(Stack[Stack.Count-1],true);
+  if arr.aType.BaseType=btArray then
+  begin
+    PSDynArraySetLength(Pointer(arr.Dta^),arr.aType,Stack.GetInt(-2));
+    Result:=true;
+  end else
+  if arr.aType.BaseType=btString then
+  begin
+    SetLength(tbtstring(arr.Dta^),STack.GetInt(-2));
+    Result:=true;
+{$IFNDEF PS_NOWIDESTRING}
+  end else
+  if arr.aType.BaseType=btWideString then
+  begin
+    SetLength(tbtwidestring(arr.Dta^),STack.GetInt(-2));
+    Result:=true;
+{$ENDIF}
+  end;
+end;
+
+function Low_(Caller: TPSExec; p: TPSExternalProcRec; Global, Stack: TPSStack): Boolean;
+var
+  arr: TPSVariantIFC;
+begin
+  Result:=true;
+  arr:=NewTPSVariantIFC(Stack[Stack.Count-2],false);
+  case arr.aType.BaseType of
+    btArray      : Stack.SetInt(-1,0);
+    btStaticArray: Stack.SetInt(-1,TPSTypeRec_StaticArray(arr.aType).StartOffset);
+    btString     : Stack.SetInt(-1,1);
+    btU8         : Stack.SetInt(-1,Low(Byte));        //Byte: 0
+    btS8         : Stack.SetInt(-1,Low(ShortInt));    //ShortInt: -128
+    btU16        : Stack.SetInt(-1,Low(Word));        //Word: 0
+    btS16        : Stack.SetInt(-1,Low(SmallInt));    //SmallInt: -32768
+    btU32        : Stack.SetInt(-1,Low(Cardinal));    //Cardinal/LongWord: 0
+    btS32        : Stack.SetInt(-1,Low(Integer));     //Integer/LongInt: -2147483648
+    else Result:=false;
+  end;
+end;
+
+function High_(Caller: TPSExec; p: TPSExternalProcRec; Global, Stack: TPSStack): Boolean;
+var
+  arr: TPSVariantIFC;
+begin
+  Result:=true;
+  arr:=NewTPSVariantIFC(Stack[Stack.Count-2],false);
+  case arr.aType.BaseType of
+    btArray      : Stack.SetInt(-1,PSDynArrayGetLength(Pointer(arr.Dta^),arr.aType)-1);
+    btStaticArray: Stack.SetInt(-1,TPSTypeRec_StaticArray(arr.aType).StartOffset+TPSTypeRec_StaticArray(arr.aType).Size-1);
+    btString     : Stack.SetInt(-1,Length(tbtstring(arr.Dta^)));
+    btU8         : Stack.SetInt(-1,High(Byte));       //Byte: 255
+    btS8         : Stack.SetInt(-1,High(ShortInt));   //ShortInt: 127
+    btU16        : Stack.SetInt(-1,High(Word));       //Word: 65535
+    btS16        : Stack.SetInt(-1,High(SmallInt));   //SmallInt: 32767
+    btU32        : Stack.SetUInt(-1,High(Cardinal));   //Cardinal/LongWord: 4294967295
+    btS32        : Stack.SetInt(-1,High(Integer));    //Integer/LongInt: 2147483647
+    else Result:=false;
+  end;
+end;
+
+function Dec_(Caller: TPSExec; p: TPSExternalProcRec; Global, Stack: TPSStack): Boolean;
+var
+  arr: TPSVariantIFC;
+begin
+  Result:=true;
+  arr:=NewTPSVariantIFC(Stack[Stack.Count-1],true);
+  case arr.aType.BaseType of
+    btU8         : Stack.SetInt(-1,Tbtu8(arr.dta^)-1);     //Byte
+    btS8         : Stack.SetInt(-1,Tbts8(arr.dta^)-1);     //ShortInt
+    btU16        : Stack.SetInt(-1,Tbtu16(arr.dta^)-1);    //Word
+    btS16        : Stack.SetInt(-1,Tbts16(arr.dta^)-1);    //SmallInt
+    btU32        : Stack.SetInt(-1,Tbtu32(arr.dta^)-1);    //Cardinal/LongWord
+    btS32        : Stack.SetInt(-1,Tbts32(arr.dta^)-1);    //Integer/LongInt
+    else Result:=false;
+  end;
+end;
+
+function Inc_(Caller: TPSExec; p: TPSExternalProcRec; Global, Stack: TPSStack): Boolean;
+var
+  arr: TPSVariantIFC;
+begin
+  Result:=true;
+  arr:=NewTPSVariantIFC(Stack[Stack.Count-1],true);
+  case arr.aType.BaseType of
+    btU8         : Stack.SetInt(-1,Tbtu8(arr.dta^)+1);     //Byte
+    btS8         : Stack.SetInt(-1,Tbts8(arr.dta^)+1);     //ShortInt
+    btU16        : Stack.SetInt(-1,Tbtu16(arr.dta^)+1);    //Word
+    btS16        : Stack.SetInt(-1,Tbts16(arr.dta^)+1);    //SmallInt
+    btU32        : Stack.SetInt(-1,Tbtu32(arr.dta^)+1);    //Cardinal/LongWord
+    btS32        : Stack.SetInt(-1,Tbts32(arr.dta^)+1);    //Integer/LongInt
+    else Result:=false;
+  end;
+end;
+
+
+procedure TPSExec.RegisterStandardProcs;
+begin
+  RegisterFunctionName('!NOTIFICATIONVARIANTSET', NVarProc, Pointer(0), nil);
+  RegisterFunctionName('!NOTIFICATIONVARIANTGET', NVarProc, Pointer(1), nil);
+
+  RegisterFunctionName('INTTOSTR', DefProc, Pointer(0), nil);
+  RegisterFunctionName('STRTOINT', DefProc, Pointer(1), nil);
+  RegisterFunctionName('STRTOINTDEF', DefProc, Pointer(2), nil);
+  RegisterFunctionName('POS', DefProc, Pointer(3), nil);
+  RegisterFunctionName('COPY', DefProc, Pointer(4), nil);
+  RegisterFunctionName('DELETE', DefProc, Pointer(5), nil);
+  RegisterFunctionName('INSERT', DefProc, Pointer(6), nil);
+
+  RegisterFunctionName('STRGET', DefProc, Pointer(7), nil);
+  RegisterFunctionName('STRSET', DefProc, Pointer(8), nil);
+  RegisterFunctionName('UPPERCASE', DefProc, Pointer(10), nil);
+  RegisterFunctionName('LOWERCASE', DefProc, Pointer(11), nil);
+  RegisterFunctionName('TRIM', DefProc, Pointer(12), nil);
+
+  RegisterFunctionName('LENGTH',Length_,nil,nil);
+  RegisterFunctionName('SETLENGTH',SetLength_,nil,nil);
+  RegisterFunctionName('LOW',Low_,nil,nil);
+  RegisterFunctionName('HIGH',High_,nil,nil);
+  RegisterFunctionName('DEC',Dec_,nil,nil);
+  RegisterFunctionName('INC',Inc_,nil,nil);
+
+  RegisterFunctionName('SIN', DefProc, Pointer(15), nil);
+  RegisterFunctionName('COS', DefProc, Pointer(16), nil);
+  RegisterFunctionName('SQRT', DefProc, Pointer(17), nil);
+  RegisterFunctionName('ROUND', DefProc, Pointer(18), nil);
+  RegisterFunctionName('TRUNC', DefProc, Pointer(19), nil);
+  RegisterFunctionName('INT', DefProc, Pointer(20), nil);
+  RegisterFunctionName('PI', DefProc, Pointer(21), nil);
+  RegisterFunctionName('ABS', DefProc, Pointer(22), nil);
+  RegisterFunctionName('STRTOFLOAT', DefProc, Pointer(23), nil);
+  RegisterFunctionName('FLOATTOSTR', DefProc, Pointer(24), nil);
+  RegisterFunctionName('PADL', DefProc, Pointer(25), nil);
+  RegisterFunctionName('PADR', DefProc, Pointer(26), nil);
+  RegisterFunctionName('PADZ', DefProc, Pointer(27), nil);
+  RegisterFunctionName('REPLICATE', DefProc, Pointer(28), nil);
+  RegisterFunctionName('STRINGOFCHAR', DefProc, Pointer(28), nil);
+  RegisterFunctionName('!ASSIGNED', DefProc, Pointer(29), nil);
+
+  RegisterDelphiFunction(@Unassigned, 'UNASSIGNED', cdRegister);
+  RegisterDelphiFunction(@VarIsEmpty, 'VARISEMPTY', cdRegister);
+  RegisterDelphiFunction(@Null, 'NULL', cdRegister);
+  RegisterDelphiFunction(@VarIsNull, 'VARISNULL', cdRegister);
+  RegisterDelphiFunction(@VarType, 'VARTYPE', cdRegister);
+  {$IFNDEF PS_NOIDISPATCH}
+  RegisterDelphiFunction(@IDispatchInvoke, 'IDISPATCHINVOKE', cdregister);
+  {$ENDIF}
+
+
+  RegisterFunctionName('GETARRAYLENGTH', GetArrayLength, nil, nil);
+  RegisterFunctionName('SETARRAYLENGTH', SetArrayLength, nil, nil);
+
+  RegisterFunctionName('RAISELASTEXCEPTION', DefPRoc, Pointer(30), nil);
+  RegisterFunctionName('RAISEEXCEPTION', DefPRoc, Pointer(31), nil);
+  RegisterFunctionName('EXCEPTIONTYPE', DefPRoc, Pointer(32), nil);
+  RegisterFunctionName('EXCEPTIONPARAM', DefPRoc, Pointer(33), nil);
+  RegisterFunctionName('EXCEPTIONPROC', DefPRoc, Pointer(34), nil);
+  RegisterFunctionName('EXCEPTIONPOS', DefPRoc, Pointer(35), nil);
+  RegisterFunctionName('EXCEPTIONTOSTRING', DefProc, Pointer(36), nil);
+  RegisterFunctionName('ANSIUPPERCASE', DefProc, Pointer(37), nil);
+  RegisterFunctionName('ANSILOWERCASE', DefProc, Pointer(38), nil);
+
+  {$IFNDEF PS_NOINT64}
+  RegisterFunctionName('STRTOINT64', DefProc, Pointer(39), nil);
+  RegisterFunctionName('INT64TOSTR', DefProc, Pointer(40), nil);
+  {$ENDIF}
+  RegisterFunctionName('SIZEOF', DefProc, Pointer(41), nil);
+
+  {$IFNDEF PS_NOWIDESTRING}
+  RegisterFunctionName('WSTRGET', DefProc, Pointer(42), nil);
+  RegisterFunctionName('WSTRSET', DefProc, Pointer(43), nil);
+  {$ENDIF}
+
+  RegisterInterfaceLibraryRuntime(Self);
+end;
+
+
+function ToString(p: PansiChar): tbtString;
+begin
+  SetString(Result, p, StrLen(p));
+end;
+
+function IntPIFVariantToVariant(Src: pointer; aType: TPSTypeRec; var Dest: Variant): Boolean;
+  function BuildArray(P: Pointer; aType: TPSTypeRec; Len: Longint): Boolean;
+  var
+    i, elsize: Longint;
+    v: variant;
+  begin
+    elsize := aType.RealSize;
+    Dest := VarArrayCreate([0, Len-1], varVariant);
+    for i := 0 to Len -1 do
+    begin
+      if not IntPIFVariantToVariant(p, aType, v) then
+      begin
+        result := false;
+        exit;
+      end;
+      Dest[i] := v;
+      p := Pointer(IPointer(p) + Cardinal(elSize));
+    end;
+    result := true;
+  end;
+begin
+  if aType = nil then
+  begin
+    Dest := null;
+    Result := True;
+    exit;
+  end;
+  if aType.BaseType = btPointer then
+  begin
+    aType := TPSTypeRec(Pointer(IPointer(src)+4)^);
+    Src := Pointer(Pointer(Src)^);
+  end;
+
+  case aType.BaseType of
+    btVariant: Dest := variant(src^);
+    btArray: if not BuildArray(Pointer(Src^), TPSTypeRec_Array(aType).ArrayType, PSDynArrayGetLength(Pointer(src^), aType)) then begin result := false; exit; end;
+    btStaticArray: if not BuildArray(Pointer(Src), TPSTypeRec_StaticArray(aType).ArrayType, PSDynArrayGetLength(Pointer(src^), aType)) then begin result := false; exit; end;
+    btU8:
+      if aType.ExportName = 'BOOLEAN' then
+        Dest := boolean(tbtu8(Src^) <> 0)
+      else
+        Dest := tbtu8(Src^);
+    btS8: Dest := tbts8(Src^);
+    btU16: Dest := tbtu16(Src^);
+    btS16: Dest := tbts16(Src^);
+    btU32: Dest := {$IFDEF DELPHI6UP}tbtu32{$ELSE}tbts32{$ENDIF}(Src^);
+    btS32: Dest := tbts32(Src^);
+    btSingle: Dest := tbtsingle(Src^);
+    btCurrency: Dest:=tbtCurrency(Src^);
+    btDouble:
+      begin
+        if aType.ExportName = 'TDATETIME' then
+          Dest := TDateTime(tbtDouble(Src^))
+        else
+          Dest := tbtDouble(Src^);
+      end;
+    btExtended: Dest := tbtExtended(Src^);
+    btString: Dest := tbtString(Src^);
+    btPChar: Dest := ToString(PansiChar(Src^));
+  {$IFNDEF PS_NOINT64}
+  {$IFDEF DELPHI6UP} btS64: Dest := tbts64(Src^); {$ELSE} bts64: begin Result := False; exit; end; {$ENDIF}
+  {$ENDIF}
+    btChar: Dest := tbtString(tbtchar(src^));
+  {$IFNDEF PS_NOWIDESTRING}
+    btWideString: Dest := tbtWideString(src^);
+    btWideChar: Dest := tbtwidestring(tbtwidechar(src^));
+  {$ENDIF}
+  else
+    begin
+      Result := False;
+      exit;
+    end;
+  end;
+  Result := True;
+end;
+
+function PIFVariantToVariant(Src: PIFVariant; var Dest: Variant): Boolean;
+begin
+  Result := IntPIFVariantToVariant(@PPSVariantData(src).Data, Src.FType, Dest);
+end;
+
+function VariantToPIFVariant(Exec: TPSExec; const Src: Variant; Dest: PIFVariant): Boolean;
+var
+  TT: PIFTypeRec;
+begin
+  if Dest = nil then begin Result := false; exit; end;
+  tt := Exec.FindType2(btVariant);
+  if tt = nil then begin Result := false; exit; end;
+  if Dest.FType.BaseType = btPointer then
+    Result := Exec.SetVariantValue(PPSVariantPointer(Dest).DataDest, @Src, PPSVariantPointer(Dest).DestType, tt)
+  else
+    Result := Exec.SetVariantValue(@PPSVariantData(Dest).Data, @Src, Dest.FType, tt);
+end;
+
+type
+  POpenArray = ^TOpenArray;
+  TOpenArray = record
+    AType: Byte; {0}
+    OrgVar: PPSVariantIFC;
+    FreeIt: Boolean;
+    ElementSize,
+    ItemCount: Longint;
+    Data: Pointer;
+    VarParam: Boolean;
+  end;
+function CreateOpenArray(VarParam: Boolean; Sender: TPSExec; val: PPSVariantIFC): POpenArray;
+var
+  datap, p: Pointer;
+  ctype: TPSTypeRec;
+  cp: Pointer;
+  i: Longint;
+begin
+  if (Val.aType.BaseType <> btArray) and (val.aType.BaseType <> btStaticArray) then
+  begin
+    Result := nil;
+    exit;
+  end;
+  New(Result);
+  Result.AType := 0;
+  Result.OrgVar := Val;
+  Result.VarParam := VarParam;
+
+  if val.aType.BaseType = btStaticArray then
+  begin
+    Result^.ItemCount := TPSTypeRec_StaticArray(val.aType).Size;
+    datap := Val.Dta;
+  end else
+  begin
+    Result^.ItemCount := PSDynArrayGetLength(Pointer(Val.Dta^), val.aType);
+    datap := Pointer(Val.Dta^);
+  end;
+  if TPSTypeRec_Array(Val.aType).ArrayType.BaseType <> btPointer then
+  begin
+    Result.FreeIt := False;
+    result.ElementSize := 0;
+    Result.Data := datap;
+    exit;
+  end;
+  Result.FreeIt := True;
+  Result.ElementSize := sizeof(TVarRec);
+  GetMem(Result.Data, Result.ItemCount * Result.ElementSize);
+  P := Result.Data;
+  FillChar(p^, Result^.ItemCount * Result^.ElementSize, 0);
+  for i := 0 to Result^.ItemCount -1 do
+  begin
+    ctype := Pointer(Pointer(IPointer(datap)+4)^);
+    cp := Pointer(Datap^);
+    if cp = nil then
+    begin
+      tvarrec(p^).VType := vtPointer;
+      tvarrec(p^).VPointer := nil;
+    end else begin
+       case ctype.BaseType of
+        btVariant: begin
+          tvarrec(p^).VType := vtVariant;
+          tvarrec(p^).VVariant := cp;
+        end;
+        btchar: begin
+            tvarrec(p^).VType := vtChar;
+            tvarrec(p^).VChar := tbtChar(tbtchar(cp^));
+          end;
+        btSingle:
+          begin
+            tvarrec(p^).VType := vtExtended;
+            New(tvarrec(p^).VExtended);
+            tvarrec(p^).VExtended^ := tbtsingle(cp^);
+          end;
+        btExtended:
+          begin
+            tvarrec(p^).VType := vtExtended;
+            New(tvarrec(p^).VExtended);
+            tvarrec(p^).VExtended^ := tbtextended(cp^);;
+          end;
+        btDouble:
+          begin
+            tvarrec(p^).VType := vtExtended;
+            New(tvarrec(p^).VExtended);
+            tvarrec(p^).VExtended^ := tbtdouble(cp^);
+          end;
+        {$IFNDEF PS_NOWIDESTRING}
+        btwidechar: begin
+            tvarrec(p^).VType := vtWideChar;
+            tvarrec(p^).VWideChar := tbtwidechar(cp^);
+          end;
+        btwideString: begin
+          tvarrec(p^).VType := vtWideString;
+          tbtwidestring(TVarRec(p^).VWideString) := tbtwidestring(cp^);
+        end;
+        {$ENDIF}
+        btU8: begin
+            tvarrec(p^).VType := vtInteger;
+            tvarrec(p^).VInteger := tbtu8(cp^);
+          end;
+        btS8: begin
+            tvarrec(p^).VType := vtInteger;
+            tvarrec(p^).VInteger := tbts8(cp^);
+          end;
+        btU16: begin
+            tvarrec(p^).VType := vtInteger;
+            tvarrec(p^).VInteger := tbtu16(cp^);
+          end;
+        btS16: begin
+            tvarrec(p^).VType := vtInteger;
+            tvarrec(p^).VInteger := tbts16(cp^);
+          end;
+        btU32: begin
+            tvarrec(p^).VType := vtInteger;
+            tvarrec(p^).VInteger := tbtu32(cp^);
+          end;
+        btS32: begin
+            tvarrec(p^).VType := vtInteger;
+            tvarrec(p^).VInteger := tbts32(cp^);
+          end;
+        {$IFNDEF PS_NOINT64}
+        btS64: begin
+            tvarrec(p^).VType := vtInt64;
+            New(tvarrec(p^).VInt64);
+            tvarrec(p^).VInt64^ := tbts64(cp^);
+          end;
+        {$ENDIF}
+        btString: begin
+          tvarrec(p^).VType := vtAnsiString;
+          tbtString(TVarRec(p^).VAnsiString) := tbtstring(cp^);
+        end;
+        btPChar:
+        begin
+          tvarrec(p^).VType := vtPchar;
+          TVarRec(p^).VPChar := pointer(cp^);
+        end;
+        btClass:
+        begin
+          tvarrec(p^).VType := vtObject;
+          tvarrec(p^).VObject := Pointer(cp^);
+        end;
+{$IFNDEF PS_NOINTERFACES}
+{$IFDEF Delphi3UP}
+        btInterface:
+        begin
+          tvarrec(p^).VType := vtInterface;
+          IUnknown(tvarrec(p^).VInterface) := IUnknown(cp^);
+        end;
+
+{$ENDIF}
+{$ENDIF}
+      end;
+    end;
+    datap := Pointer(IPointer(datap)+12);
+    p := PansiChar(p) + Result^.ElementSize;
+  end;
+end;
+
+procedure DestroyOpenArray(Sender: TPSExec; V: POpenArray);
+var
+  cp, datap: pointer;
+  ctype: TPSTypeRec;
+  p: PVarRec;
+  i: Longint;
+begin
+  if v.FreeIt then // basetype = btPointer
+  begin
+    p := v^.Data;
+    if v.OrgVar.aType.BaseType = btStaticArray then
+      datap := v.OrgVar.Dta
+    else
+      datap := Pointer(v.OrgVar.Dta^);
+    for i := 0 to v^.ItemCount -1 do
+    begin
+      ctype := Pointer(Pointer(IPointer(datap)+4)^);
+      cp := Pointer(Datap^);
+      case ctype.BaseType of
+        btU8:
+          begin
+            if v^.varParam then
+              tbtu8(cp^) := tvarrec(p^).VInteger
+          end;
+        btS8: begin
+            if v^.varParam then
+              tbts8(cp^) := tvarrec(p^).VInteger
+          end;
+        btU16: begin
+            if v^.varParam then
+              tbtu16(cp^) := tvarrec(p^).VInteger
+          end;
+        btS16: begin
+            if v^.varParam then
+              tbts16(cp^) := tvarrec(p^).VInteger
+          end;
+        btU32: begin
+            if v^.varParam then
+              tbtu32(cp^) := tvarrec(p^).VInteger
+          end;
+        btS32: begin
+            if v^.varParam then
+              tbts32(cp^) := tvarrec(p^).VInteger
+          end;
+        btChar: begin
+            if v^.VarParam then
+              tbtchar(cp^) := tbtChar(tvarrec(p^).VChar)
+          end;
+        btSingle: begin
+          if v^.VarParam then
+            tbtsingle(cp^) := tvarrec(p^).vextended^;
+          dispose(tvarrec(p^).vextended);
+        end;
+        btDouble: begin
+          if v^.VarParam then
+            tbtdouble(cp^) := tvarrec(p^).vextended^;
+          dispose(tvarrec(p^).vextended);
+        end;
+        btExtended: begin
+          if v^.VarParam then
+            tbtextended(cp^) := tvarrec(p^).vextended^;
+          dispose(tvarrec(p^).vextended);
+        end;
+        {$IFNDEF PS_NOINT64}
+        btS64: begin
+            if v^.VarParam then
+              tbts64(cp^) := tvarrec(p^).vInt64^;
+            dispose(tvarrec(p^).VInt64);
+          end;
+        {$ENDIF}
+        {$IFNDEF PS_NOWIDESTRING}
+        btWideChar: begin
+            if v^.varParam then
+              tbtwidechar(cp^) := tvarrec(p^).VWideChar;
+          end;
+        btWideString:
+          begin
+          if v^.VarParam then
+            tbtwidestring(cp^) := tbtwidestring(TVarRec(p^).VWideString);
+          finalize(widestring(TVarRec(p^).VWideString));
+          end;
+        {$ENDIF}
+        btString: begin
+          if v^.VarParam then
+            tbtstring(cp^) := tbtstring(TVarRec(p^).VString);
+          finalize(tbtString(TVarRec(p^).VAnsiString));
+        end;
+        btClass: begin
+          if v^.VarParam then
+            Pointer(cp^) := TVarRec(p^).VObject;
+        end;
+{$IFNDEF PS_NOINTERFACES}
+{$IFDEF Delphi3UP}
+        btInterface: begin
+          if v^.VarParam then
+            IUnknown(cp^) := IUnknown(TVarRec(p^).VInterface);
+          finalize(tbtString(TVarRec(p^).VAnsiString));
+        end;
+{$ENDIF}
+{$ENDIF}
+      end;
+      datap := Pointer(IPointer(datap)+12);
+      p := Pointer(IPointer(p) + Cardinal(v^.ElementSize));
+    end;
+    FreeMem(v.Data, v.ElementSize * v.ItemCount);
+  end;
+  Dispose(V);
+end;
+
+
+{$ifndef FPC}
+  {$include x86.inc}
+{$else}
+{$IFDEF Delphi6UP}
+  {$if defined(cpu86)}
+    {$include x86.inc}
+  {$elseif defined(cpupowerpc)}
+    {$include powerpc.inc}
+  {$else}
+    {$fatal Pascal Script is not supported for your architecture at the moment!}
+  {$ifend}
+{$ELSE}
+{$include x86.inc}
+{$ENDIF}
+{$endif}
+
+type
+  PScriptMethodInfo = ^TScriptMethodInfo;
+  TScriptMethodInfo = record
+    Se: TPSExec;
+    ProcNo: Cardinal;
+  end;
+
+
+function MkMethod(FSE: TPSExec; No: Cardinal): TMethod;
+begin
+  if (no = 0) or (no = InvalidVal) then
+  begin
+    Result.Code := nil;
+    Result.Data := nil;
+  end else begin
+    Result.Code := @MyAllMethodsHandler;
+    Result.Data := GetMethodInfoRec(FSE, No);
+  end;
+end;
+
+
+procedure PFree(Sender: TPSExec; P: PScriptMethodInfo);
+begin
+  Dispose(p);
+end;
+
+function GetMethodInfoRec(SE: TPSExec; ProcNo: Cardinal): Pointer;
+var
+  I: Longint;
+  pp: PScriptMethodInfo;
+begin
+  if (ProcNo = 0) or (ProcNo = InvalidVal) then
+  begin
+    Result := nil;
+    exit;
+  end;
+  I := 2147483647;
+  repeat
+    pp := Se.FindProcResource2(@PFree, I);
+    if (i <> -1) and (pp^.ProcNo = ProcNo) then
+    begin
+      Result := Pp;
+      exit;
+    end;
+  until i = -1;
+  New(pp);
+  pp^.Se := TPSExec(Se);
+  pp^.ProcNo := Procno;
+  Se.AddResource(@PFree, pp);
+  Result := pp;
+end;
+
+
+
+
+
+type
+  TPtrArr = array[0..1000] of Pointer;
+  PPtrArr = ^TPtrArr;
+  TByteArr = array[0..1000] of byte;
+  PByteArr = ^TByteArr;
+  PPointer = ^Pointer;
+
+
+function VirtualMethodPtrToPtr(Ptr, FSelf: Pointer): Pointer;
+{$IFDEF FPC}
+var
+ x : PPtrArr;
+{$ENDIF}
+begin
+ {$IFDEF FPC}
+ x := Pointer(TObject(FSelf).ClassType) + vmtMethodStart;
+ Result := x^[Longint(Ptr)];
+ {$ELSE}
+ Result := PPtrArr(PPointer(FSelf)^)^[Longint(Ptr)];
+ {$ENDIF}
+end;
+
+function VirtualClassMethodPtrToPtr(Ptr, FSelf: Pointer): Pointer;
+{$IFDEF FPC}
+var
+ x : PPtrArr;
+{$ENDIF}
+begin
+  {$IFDEF FPC}
+  x := Pointer(FSelf) + vmtMethodStart;
+  Result := x^[Longint(Ptr)];
+  {$ELSE}
+  Result := PPtrArr(FSelf)^[Longint(Ptr)];
+  {$ENDIF}
+end;
+
+
+procedure CheckPackagePtr(var P: PByteArr);
+begin
+  if (word((@p[0])^) = $25FF) and (word((@p[6])^)=$C08B)then
+  begin
+    p := PPointer((@p[2])^)^;
+  end;
+end;
+
+{$IFDEF VER90}{$DEFINE NO_vmtSelfPtr}{$ENDIF}
+{$IFDEF FPC}{$DEFINE NO_vmtSelfPtr}{$ENDIF}
+
+{$IFNDEF FPC}
+
+function FindVirtualMethodPtr(Ret: TPSRuntimeClass; FClass: TClass; Ptr: Pointer): Pointer;
+// Idea of getting the number of VMT items from GExperts
+var
+  p: PPtrArr;
+  I: Longint;
+begin
+  p := Pointer(FClass);
+  CheckPackagePtr(PByteArr(Ptr));
+  if Ret.FEndOfVMT = MaxInt then
+  begin
+    I := {$IFDEF NO_vmtSelfPtr}-48{$ELSE}vmtSelfPtr{$ENDIF} div SizeOf(Pointer) + 1;
+    while I < 0 do
+    begin
+      if I < 0 then
+      begin
+        if I <> ({$IFDEF VER90}-44{$ELSE}vmtTypeInfo{$ENDIF} div SizeOf(Pointer)) then
+        begin // from GExperts code
+          if (Longint(p^[I]) > Longint(p)) and ((Longint(p^[I]) - Longint(p))
+            div
+            4 < Ret.FEndOfVMT) then
+          begin
+            Ret.FEndOfVMT := (Longint(p^[I]) - Longint(p)) div SizeOf(Pointer);
+          end;
+        end;
+      end;
+      Inc(I);
+    end;
+    if Ret.FEndOfVMT = MaxInt then
+    begin
+      Ret.FEndOfVMT := 0; // cound not find EndOfVMT
+      Result := nil;
+      exit;
+    end;
+  end;
+  I := 0;
+  while I < Ret.FEndOfVMT do
+  begin
+    if p^[I] = Ptr then
+    begin
+      Result := Pointer(I);
+      exit;
+    end;
+    I := I + 1;
+  end;
+  Result := nil;
+end;
+
+{$ELSE}
+
+function FindVirtualMethodPtr(Ret: TPSRuntimeClass; FClass: TClass; Ptr: Pointer): Pointer;
+var
+  x,p: PPtrArr;
+  I: Longint;
+  t : Pointer;
+begin
+  p := Pointer(FClass) + vmtMethodStart;
+  I := 0;
+  while (p^[I]<>nil) and (I < 10000) do
+  begin
+    if p^[I] = Ptr then
+    begin
+      Result := Pointer(I);
+      x := Pointer(FClass) + vmtMethodStart;
+      t := x^[I];
+      Assert(t=Ptr,'Computation of virtual method pointer fail : t<>Ptr');
+      exit;
+    end;
+    I := I + 1;
+  end;
+  Result := nil;
+end;
+
+{$ENDIF}
+
+
+function NewTPSVariantIFC(avar: PPSVariant; varparam: boolean): TPSVariantIFC;
+begin
+  Result.VarParam := varparam;
+  if avar = nil then
+  begin
+    Result.aType := nil;
+    result.Dta := nil;
+  end else
+  begin
+    Result.aType := avar.FType;
+    result.Dta := @PPSVariantData(avar).Data;
+    if Result.aType.BaseType = btPointer then
+    begin
+      Result.aType := Pointer(Pointer(IPointer(result.dta)+4)^);
+      Result.Dta := Pointer(Result.dta^);
+    end;
+  end;
+end;
+
+function NewTPSVariantRecordIFC(avar: PPSVariant; Fieldno: Longint): TPSVariantIFC;
+var
+  offs: Cardinal;
+begin
+  Result := NewTPSVariantIFC(avar, false);
+  if Result.aType.BaseType = btRecord then
+  begin
+    Offs := Cardinal(TPSTypeRec_Record(Result.aType).RealFieldOffsets[FieldNo]);
+    Result.Dta := Pointer(IPointer(Result.dta) + Offs);
+    Result.aType := TPSTypeRec_Record(Result.aType).FieldTypes[FieldNo];
+  end else
+  begin
+    Result.Dta := nil;
+    Result.aType := nil;
+  end;
+end;
+
+function PSGetArrayField(const avar: TPSVariantIFC; Fieldno: Longint): TPSVariantIFC;
+var
+  offs: Cardinal;
+  n: Longint;
+begin
+  Result := aVar;
+  case Result.aType.BaseType of
+    btStaticArray, btArray:
+  begin
+        if Result.aType.BaseType = btStaticArray then
+          n := TPSTypeRec_StaticArray(Result.aType).Size
+        else
+          n := PSDynArrayGetLength(Pointer(Result.Dta^), Result.aType);
+        if (FieldNo <0) or (FieldNo >= n) then
+    begin
+      Result.Dta := nil;
+      Result.aType := nil;
+      exit;
+    end;
+    Offs := TPSTypeRec_Array(Result.aType).ArrayType.RealSize * Cardinal(FieldNo);
+        if Result.aType.BaseType = btStaticArray then
+          Result.Dta := Pointer(IPointer(Result.dta) + Offs)
+        else
+          Result.Dta := Pointer(IPointer(Result.dta^) + Offs);
+    Result.aType := TPSTypeRec_Array(Result.aType).ArrayType;
+      end
+  else
+    Result.Dta := nil;
+    Result.aType := nil;
+  end;
+end;
+
+function PSGetRecField(const avar: TPSVariantIFC; Fieldno: Longint): TPSVariantIFC;
+var
+  offs: Cardinal;
+begin
+  Result := aVar;
+  if Result.aType.BaseType = btRecord then
+  begin
+    Offs := Cardinal(TPSTypeRec_Record(Result.aType).RealFieldOffsets[FieldNo]);
+    Result.aType := TPSTypeRec_Record(Result.aType).FieldTypes[FieldNo];
+    Result.Dta := Pointer(IPointer(Result.dta) + Offs);
+  end else
+  begin
+    Result.Dta := nil;
+    Result.aType := nil;
+  end;
+end;
+
+function NewPPSVariantIFC(avar: PPSVariant; varparam: boolean): PPSVariantIFC;
+begin
+  New(Result);
+  Result^ := NewTPSVariantIFC(avar, varparam);
+end;
+
+
+procedure DisposePPSVariantIFC(aVar: PPSVariantIFC);
+begin
+  if avar <> nil then
+    Dispose(avar);
+end;
+
+procedure DisposePPSVariantIFCList(list: TPSList);
+var
+  i: Longint;
+begin
+  for i := list.Count -1 downto 0 do
+    DisposePPSVariantIFC(list[i]);
+  list.free;
+end;
+
+function ClassCallProcMethod(Caller: TPSExec; p: TPSExternalProcRec; Global, Stack: TPSStack): Boolean;
+var
+  i: Integer;
+  MyList: TPSList;
+  n: PIFVariant;
+  v: PPSVariantIFC;
+  FSelf: Pointer;
+  CurrStack: Cardinal;
+  cc: TPSCallingConvention;
+  s: tbtString;
+begin
+  s := p.Decl;
+  if length(S) < 2 then
+  begin
+    Result := False;
+    exit;
+  end;
+  cc := TPSCallingConvention(s[1]);
+  Delete(s, 1, 1);
+  if s[1] = #0 then
+    n := Stack[Stack.Count -1]
+  else
+    n := Stack[Stack.Count -2];
+  if (n = nil) or (n^.FType.BaseType <> btClass)or (PPSVariantClass(n).Data = nil) then
+  begin
+    Caller.CMD_Err(erNullPointerException);
+    result := false;
+    exit;
+  end;
+  FSelf := PPSVariantClass(n).Data;
+  CurrStack := Cardinal(Stack.Count) - Cardinal(length(s)) -1;
+  if s[1] = #0 then inc(CurrStack);
+  MyList := TPSList.Create;
+  for i := 2 to length(s) do
+  begin
+    MyList.Add(nil);
+  end;
+  for i := length(s) downto 2 do
+  begin
+    n := Stack[CurrStack];
+    MyList[i - 2] := NewPPSVariantIFC(n, s[i] <> #0);
+    inc(CurrStack);
+  end;
+  if s[1] <> #0 then
+  begin
+    v := NewPPSVariantIFC(Stack[CurrStack + 1], True);
+  end else v := nil;
+  try
+    if p.Ext2 = nil then
+      Result := Caller.InnerfuseCall(FSelf, p.Ext1, cc, MyList, v)
+    else
+      Result := Caller.InnerfuseCall(FSelf, VirtualMethodPtrToPtr(p.Ext1, FSelf), cc, MyList, v);
+  finally
+    DisposePPSVariantIFC(v);
+    DisposePPSVariantIFCList(mylist);
+  end;
+end;
+
+function ClassCallProcConstructor(Caller: TPSExec; p: TPSExternalProcRec; Global, Stack: TPSStack): Boolean;
+var
+  i, h: Longint;
+  v: PPSVariantIFC;
+  MyList: TPSList;
+  n: PIFVariant;
+  FSelf: Pointer;
+  CurrStack: Cardinal;
+  cc: TPSCallingConvention;
+  s: tbtString;
+  FType: PIFTypeRec;
+  x: TPSRuntimeClass;
+  IntVal: PIFVariant;
+begin
+  n := Stack[Stack.Count -2];
+  if (n = nil) or (n^.FType.BaseType <> btU32)  then
+  begin
+    result := false;
+    exit;
+  end;
+  FType := Caller.GetTypeNo(PPSVariantU32(N).Data);
+  if (FType = nil)  then
+  begin
+    Result := False;
+    exit;
+  end;
+  h := MakeHash(FType.ExportName);
+  FSelf := nil;
+  for i := 0 to TPSRuntimeClassImporter(p.Ext2).FClasses.Count -1 do
+  begin
+    x:= TPSRuntimeClassImporter(p.Ext2).FClasses[i];
+    if (x.FClassNameHash = h) and (x.FClassName = FType.ExportName) then
+    begin
+      FSelf := x.FClass;
+    end;
+  end;
+  if FSelf = nil then begin
+    Result := False;
+    exit;
+  end;
+  s := p.Decl;
+  if length(S) < 2 then
+  begin
+    Result := False;
+    exit;
+  end;
+  cc := TPSCallingConvention(s[1]);
+  Delete(s, 1, 1);
+  CurrStack := Cardinal(Stack.Count) - Cardinal(length(s)) -1;
+  if s[1] = #0 then inc(CurrStack);
+  IntVal := CreateHeapVariant(Caller.FindType2(btU32));
+  if IntVal = nil then
+  begin
+    Result := False;
+    exit;
+  end;
+  {$IFDEF FPC}
+  // under FPC a constructor it's called with self=0 (EAX) and
+  // the VMT class pointer in EDX so they are effectively swaped
+  // using register calling convention
+  PPSVariantU32(IntVal).Data := Cardinal(FSelf);
+  FSelf := pointer(1);
+  {$ELSE}
+  PPSVariantU32(IntVal).Data := 1;
+  {$ENDIF}
+  MyList := TPSList.Create;
+  MyList.Add(NewPPSVariantIFC(intval, false));
+  for i := 2 to length(s) do
+  begin
+    MyList.Add(nil);
+  end;
+  for i := length(s) downto 2 do
+  begin
+    n :=Stack[CurrStack];
+//    if s[i] <> #0 then
+//    begin
+//      MyList[i - 2] := NewPPSVariantIFC(n, s[i] <> #0);
+//    end;
+    MyList[i - 1] := NewPPSVariantIFC(n, s[i] <> #0);
+    inc(CurrStack);
+  end;
+  if s[1] <> #0 then
+  begin
+    v := NewPPSVariantIFC(Stack[CurrStack + 1], True);
+  end else v := nil;
+  try
+    Result := Caller.InnerfuseCall(FSelf, p.Ext1, cc, MyList, v);
+  finally
+    DisposePPSVariantIFC(v);
+    DisposePPSVariantIFCList(mylist);
+    DestroyHeapVariant(intval);
+  end;
+end;
+
+
+function ClassCallProcVirtualConstructor(Caller: TPSExec; p: TPSExternalProcRec; Global, Stack: TPSStack): Boolean;
+var
+  i, h: Longint;
+  v: PPSVariantIFC;
+  MyList: TPSList;
+  n: PIFVariant;
+  FSelf: Pointer;
+  CurrStack: Cardinal;
+  cc: TPSCallingConvention;
+  s: tbtString;
+  FType: PIFTypeRec;
+  x: TPSRuntimeClass;
+  IntVal: PIFVariant;
+begin
+  n := Stack[Stack.Count -2];
+  if (n = nil) or (n^.FType.BaseType <> btU32)  then
+  begin
+    Caller.CMD_Err(erNullPointerException);
+    result := false;
+    exit;
+  end;
+  FType := Caller.GetTypeNo(PPSVariantU32(N).Data);
+  if (FType = nil)  then
+  begin
+    Caller.CMD_Err(erNullPointerException);
+    Result := False;
+    exit;
+  end;
+  h := MakeHash(FType.ExportName);
+  FSelf := nil;
+  for i := 0 to TPSRuntimeClassImporter(p.Ext2).FClasses.Count -1 do
+  begin
+    x:= TPSRuntimeClassImporter(p.Ext2).FClasses[i];
+    if (x.FClassNameHash = h) and (x.FClassName = FType.ExportName) then
+    begin
+      FSelf := x.FClass;
+    end;
+  end;
+  if FSelf = nil then begin
+    Result := False;
+    exit;
+  end;
+  s := p.Decl;
+  if length(S) < 2 then
+  begin
+    Result := False;
+    exit;
+  end;
+  cc := TPSCallingConvention(s[1]);
+  delete(s, 1, 1);
+  CurrStack := Cardinal(Stack.Count) - Cardinal(length(s)) -1;
+  if s[1] = #0 then inc(CurrStack);
+  IntVal := CreateHeapVariant(Caller.FindType2(btU32));
+  if IntVal = nil then
+  begin
+    Result := False;
+    exit;
+  end;
+  PPSVariantU32(IntVal).Data := 1;
+  MyList := TPSList.Create;
+  MyList.Add(NewPPSVariantIFC(intval, false));
+  for i := 2 to length(s) do
+  begin
+    MyList.Add(nil);
+  end;
+  for i := length(s) downto 2 do
+  begin
+    n :=Stack[CurrStack];
+    MyList[i - 1] := NewPPSVariantIFC(n, s[i] <> #0);
+    inc(CurrStack);
+  end;
+  if s[1] <> #0 then
+  begin
+    v := NewPPSVariantIFC(Stack[CurrStack + 1], True);
+  end else v := nil;
+  try
+    Result := Caller.InnerfuseCall(FSelf, VirtualClassMethodPtrToPtr(p.Ext1, FSelf), cc, MyList, v);
+  finally
+    DisposePPSVariantIFC(v);
+    DisposePPSVariantIFCList(mylist);
+    DestroyHeapVariant(intval);
+  end;
+end;
+
+function CastProc(Caller: TPSExec; p: TPSExternalProcRec; Global, Stack: TPSStack): Boolean;
+var
+  TypeNo, InVar, ResVar: TPSVariantIFC;
+  FSelf: TClass;
+  FType: PIFTypeRec;
+  H, I: Longint;
+  x: TPSRuntimeClass;
+begin
+  TypeNo := NewTPSVariantIFC(Stack[Stack.Count-3], false);
+  InVar := NewTPSVariantIFC(Stack[Stack.Count-2], false);
+  ResVar := NewTPSVariantIFC(Stack[Stack.Count-1], true);
+  if (TypeNo.Dta = nil) or (InVar.Dta = nil) or (ResVar.Dta = nil) or
+  (TypeNo.aType.BaseType <> btu32) or (resvar.aType <> Caller.FTypes[tbtu32(Typeno.dta^)])
+  then
+  begin
+    Result := False;
+    Exit;
+  end;
+{$IFNDEF PS_NOINTERFACES}
+  if (invar.atype.BaseType = btInterface) and (resvar.aType.BaseType = btInterface) then
+  begin
+{$IFNDEF Delphi3UP}
+    if IUnknown(resvar.Dta^) <> nil then
+      IUnknown(resvar.Dta^).Release;
+{$ENDIF}
+    IUnknown(resvar.Dta^) := nil;
+    if (IUnknown(invar.Dta^) = nil) or (IUnknown(invar.Dta^).QueryInterface(TPSTypeRec_Interface(ResVar.aType).Guid, IUnknown(resvar.Dta^)) <> 0) then
+    begin
+      Caller.CMD_Err2(erCustomError, tbtString(RPS_CannotCastInterface));
+      Result := False;
+      exit;
+    end;
+{$IFDEF Delphi3UP}
+  end else if (Invar.aType.BaseType = btclass) and (resvar.aType.BaseType = btInterface) then
+  begin
+{$IFNDEF Delphi3UP}
+    if IUnknown(resvar.Dta^) <> nil then
+      IUnknown(resvar.Dta^).Release;
+{$ENDIF}
+    IUnknown(resvar.Dta^) := nil;
+    if (TObject(invar.Dta^)= nil) or (not TObject(invar.dta^).GetInterface(TPSTypeRec_Interface(ResVar.aType).Guid, IUnknown(resvar.Dta^))) then
+    begin
+      Caller.CMD_Err2(erCustomError, tbtString(RPS_CannotCastInterface));
+      Result := False;
+      exit;
+    end;
+{$ENDIF}
+  end else {$ENDIF}if (invar.aType.BaseType = btclass) and (resvar.aType.BaseType = btclass ) then
+  begin
+    FType := Caller.GetTypeNo(tbtu32(TypeNo.Dta^));
+    if (FType = nil)  then
+    begin
+      Result := False;
+      exit;
+    end;
+    h := MakeHash(FType.ExportName);
+    FSelf := nil;
+    for i := 0 to TPSRuntimeClassImporter(p.Ext2).FClasses.Count -1 do
+    begin
+      x:= TPSRuntimeClassImporter(p.Ext2).FClasses[i];
+      if (x.FClassNameHash = h) and (x.FClassName = FType.ExportName) then
+      begin
+        FSelf := x.FClass;
+      end;
+    end;
+    if FSelf = nil then begin
+      Result := False;
+      exit;
+    end;
+
+    try
+      TObject(ResVar.Dta^) := TObject(InVar.Dta^) as FSelf;
+    except
+      Result := False;
+      Caller.CMD_Err2(erCustomError, tbtString(RPS_CannotCastObject));
+      exit;
+    end;
+  end else
+  begin
+    Result := False;
+    exit;
+  end;
+  result := True;
+end;
+
+
+function NilProc(Caller: TPSExec; p: TPSExternalProcRec; Global, Stack: TPSStack): Boolean;
+var
+  n: TPSVariantIFC;
+begin
+  n := NewTPSVariantIFC(Stack[Stack.Count-1], True);
+  if (n.Dta = nil) or ((n.aType.BaseType <> btClass) and (n.aType.BaseType <> btInterface)) then
+  begin
+    Result := False;
+    Caller.CMD_Err(erNullPointerException);
+    Exit;
+  end;
+{$IFNDEF PS_NOINTERFACES}
+  if n.aType.BaseType = btInterface then
+  begin
+    {$IFNDEF Delphi3UP}
+    if IUnknown(n.Dta^) <> nil then
+      IUnknown(n.Dta^).Release;
+    {$ENDIF}
+    IUnknown(n.Dta^) := nil;
+  end else
+  {$ENDIF}
+    Pointer(n.Dta^) := nil;
+  result := True;
+end;
+function IntfCallProc(Caller: TPSExec; p: TPSExternalProcRec; Global, Stack: TPSStack): Boolean;
+var
+  i: Integer;
+  MyList: TPSList;
+  n: TPSVariantIFC;
+  n2: PPSVariantIFC;
+  FSelf: Pointer;
+  CurrStack: Cardinal;
+  cc: TPSCallingConvention;
+  s: tbtString;
+begin
+  s := p.Decl;
+  if length(S) < 2 then
+  begin
+    Result := False;
+    exit;
+  end;
+  cc := TPSCallingConvention(s[1]);
+  Delete(s, 1, 1);
+  if s[1] = #0 then
+    n := NewTPSVariantIFC(Stack[Stack.Count -1], false)
+  else
+    n := NewTPSVariantIFC(Stack[Stack.Count -2], false);
+  if (n.dta = nil) or (n.atype.BaseType <> btInterface) or (Pointer(n.Dta^) = nil) then
+  begin
+    Caller.CMD_Err(erNullPointerException);
+    result := false;
+    exit;
+  end;
+  FSelf := Pointer(n.dta^);
+  CurrStack := Cardinal(Stack.Count) - Cardinal(length(s)) -1;
+  if s[1] = #0 then inc(CurrStack);
+  MyList := TPSList.Create;
+  for i := 2 to length(s) do
+  begin
+    MyList.Add(nil);
+  end;
+  for i := length(s) downto 2 do
+  begin
+    MyList[i - 2] := NewPPSVariantIFC(Stack[CurrStack], s[i] <> #0);
+    inc(CurrStack);
+  end;
+  if s[1] <> #0 then
+  begin
+    n2 := NewPPSVariantIFC(Stack[CurrStack + 1], True);
+  end else n2 := nil;
+  try
+    Caller.InnerfuseCall(FSelf, Pointer(Pointer(Cardinal(FSelf^) + (Cardinal(p.Ext1) * Sizeof(Pointer)))^), cc, MyList, n2);
+    result := true;
+  finally
+    DisposePPSVariantIFC(n2);
+    DisposePPSVariantIFCList(MyList);
+  end;
+end;
+
+
+function InterfaceProc(Sender: TPSExec; p: TPSExternalProcRec; Tag: Pointer): Boolean;
+var
+  s: tbtString;
+begin
+  s := p.Decl;
+  delete(s,1,5); // delete 'intf:'
+  if s = '' then
+  begin
+    Result := False;
+    exit;
+  end;
+  if s[1] = '.'then
+  begin
+    Delete(s,1,1);
+    if length(S) < 6 then
+    begin
+      Result := False;
+      exit;
+    end;
+    p.ProcPtr := IntfCallProc;
+    p.Ext1 := Pointer((@s[1])^); // Proc Offset
+    Delete(s,1,4);
+    P.Decl := s;
+    Result := True;
+  end else Result := False;
+end;
+
+
+function getMethodNo(P: TMethod; SE: TPSExec): Cardinal;
+begin
+  if (p.Code <> @MyAllMethodsHandler) or (p.Data = nil)or (PScriptMethodInfo(p.Data)^.Se <> se)  then
+    Result := 0
+  else
+  begin
+    Result := PScriptMethodInfo(p.Data)^.ProcNo;
+  end;
+end;
+
+function ClassCallProcProperty(Caller: TPSExec; p: TPSExternalProcRec; Global, Stack: TPSStack): Boolean;
+var
+  n: TPSVariantIFC;
+  ltemp: Longint;
+  FSelf: Pointer;
+  m: TMethod;
+begin
+  try
+    if p.Ext2 = Pointer(0) then
+    begin
+      n := NewTPSVariantIFC(Stack[Stack.Count -1], False);
+      if (n.Dta = nil) or (n.aType.BaseType <> btclass)  then
+      begin
+        result := false;
+        Caller.CMD_Err(erNullPointerException);
+        exit;
+      end;
+      FSelf := Pointer(n.dta^);
+      if FSelf = nil then
+      begin
+        Caller.CMD_Err(erCouldNotCallProc);
+        Result := False;
+        exit;
+      end;
+      n := NewTPSVariantIFC(Stack[Stack.Count -2], false);
+      if (PPropInfo(p.Ext1)^.PropType^.Kind = tkMethod) and ((n.aType.BaseType = btu32) or (n.aType.BaseType = btProcPtr))then
+      begin
+        SetMethodProp(TObject(FSelf), PPropInfo(p.Ext1), MkMethod(Caller, tbtu32(n.dta^)));
+      end else
+      case n.aType.BaseType of
+        btSet:
+          begin
+            ltemp := 0;
+            move(Byte(n.Dta^), ltemp, TPSTypeRec_Set(n.aType).aByteSize);
+            SetOrdProp(TObject(FSelf), PPropInfo(p.Ext1), ltemp);
+          end;
+        btChar, btU8: SetOrdProp(TObject(FSelf), PPropInfo(p.Ext1), tbtu8(n.Dta^));
+        btS8: SetOrdProp(TObject(FSelf), PPropInfo(p.Ext1), tbts8(n.Dta^));
+        {$IFNDEF PS_NOWIDESTRING}btwidechar, {$ENDIF}btU16: SetOrdProp(TObject(FSelf), PPropInfo(p.Ext1), tbtu16(n.Dta^));
+        btS16: SetOrdProp(TObject(FSelf), PPropInfo(p.Ext1), tbts16(n.Dta^));
+        btU32: SetOrdProp(TObject(FSelf), PPropInfo(p.Ext1), tbtu32(n.Dta^));
+        btS32: SetOrdProp(TObject(FSelf), PPropInfo(p.Ext1), tbts32(n.Dta^));
+        btSingle: SetFloatProp(TObject(FSelf), p.Ext1, tbtsingle(n.Dta^));
+        btDouble: SetFloatProp(TObject(FSelf), p.Ext1, tbtdouble(n.Dta^));
+        btExtended: SetFloatProp(TObject(FSelf), p.Ext1, tbtextended(n.Dta^));
+        btString: SetStrProp(TObject(FSelf), p.Ext1, string(tbtString(n.Dta^)));
+        btPChar: SetStrProp(TObject(FSelf), p.Ext1, string(pansichar(n.Dta^)));
+        btClass: SetOrdProp(TObject(FSelf), P.Ext1, Longint(n.Dta^));
+	  {$IFDEF DELPHI6UP}
+{$IFNDEF PS_NOWIDESTRING}btWideString: SetWideStrProp(TObject(FSelf), P.Ext1, tbtWidestring(n.dta^)); {$ENDIF}
+{$ENDIF}
+        else
+        begin
+          Result := False;
+          exit;
+        end;
+      end;
+      Result := true;
+    end else begin
+      n := NewTPSVariantIFC(Stack[Stack.Count -2], False);
+      if (n.dta = nil) or (n.aType.BaseType <> btClass)then
+      begin
+        result := false;
+        Caller.CMD_Err(erNullPointerException);
+        exit;
+      end;
+      FSelf := Pointer(n.dta^);
+      if FSelf = nil then
+      begin
+        Caller.CMD_Err(erCouldNotCallProc);
+        Result := False;
+        exit;
+      end;
+      n := NewTPSVariantIFC(Stack[Stack.Count -1], false);
+      if (PPropInfo(p.Ext1)^.PropType^.Kind = tkMethod) and ((n.aType.BaseType = btu32) or (n.aType.BaseType = btprocptr)) then
+      begin
+        m := GetMethodProp(TObject(FSelf), PPropInfo(p.Ext1));
+        Cardinal(n.Dta^) := GetMethodNo(m, Caller);
+        if Cardinal(n.dta^) = 0 then
+        begin
+          Pointer(Pointer((IPointer(n.dta)+4))^) := m.Data;
+          Pointer(Pointer((IPointer(n.dta)+8))^) := m.Code;
+        end;
+      end else
+      case n.aType.BaseType of
+        btSet:
+          begin
+            ltemp := GetOrdProp(TObject(FSelf), PPropInfo(p.Ext1));
+            move(ltemp, Byte(n.Dta^), TPSTypeRec_Set(n.aType).aByteSize);
+          end;
+        btU8: tbtu8(n.Dta^) := GetOrdProp(TObject(FSelf), p.Ext1);
+        btS8: tbts8(n.Dta^) := GetOrdProp(TObject(FSelf), p.Ext1);
+        btU16: tbtu16(n.Dta^) := GetOrdProp(TObject(FSelf), p.Ext1);
+        btS16: tbts16(n.Dta^) := GetOrdProp(TObject(FSelf), p.Ext1);
+        btU32: tbtu32(n.Dta^) := GetOrdProp(TObject(FSelf), p.Ext1);
+        btS32: tbts32(n.Dta^) := GetOrdProp(TObject(FSelf), p.Ext1);
+        btSingle: tbtsingle(n.Dta^) := GetFloatProp(TObject(FSelf), p.Ext1);
+        btDouble: tbtdouble(n.Dta^) := GetFloatProp(TObject(FSelf), p.Ext1);
+        btExtended: tbtextended(n.Dta^) := GetFloatProp(TObject(FSelf), p.Ext1);
+        btString: tbtString(n.Dta^) := tbtString(GetStrProp(TObject(FSelf), p.Ext1));
+        btClass: Longint(n.dta^) := GetOrdProp(TObject(FSelf), p.Ext1);
+	  {$IFDEF DELPHI6UP}
+{$IFNDEF PS_NOWIDESTRING}btWideString: tbtWidestring(n.dta^) := GetWideStrProp(TObject(FSelf), P.Ext1); {$ENDIF}
+{$ENDIF}
+      else
+        begin
+          Result := False;
+          exit;
+        end;
+      end;
+      Result := True;
+    end;
+  finally
+  end;
+end;
+
+function ClassCallProcPropertyHelper(Caller: TPSExec; p: TPSExternalProcRec; Global, Stack: TPSStack): Boolean;
+var
+  I, ParamCount: Longint;
+  Params: TPSList;
+  n: TPSVariantIFC;
+  FSelf: Pointer;
+begin
+  if Length(P.Decl) < 4 then begin
+    Result := False;
+    exit;
+  end;
+  ParamCount := Longint((@P.Decl[1])^);
+  if Longint(Stack.Count) < ParamCount +1 then begin
+    Result := False;
+    exit;
+  end;
+  Dec(ParamCount);
+  if p.Ext1 <> nil then // read
+  begin
+    n := NewTPSVariantIFC(Stack[Longint(Stack.Count) - 2], False);
+    if (n.Dta = nil) or (n.aType.BaseType <> btClass) then
+    begin
+      result := false;
+      Caller.CMD_Err(erNullPointerException);
+      exit;
+    end;
+    FSelf := pointer(n.Dta^);
+    if FSelf = nil then
+    begin
+      Caller.CMD_Err(erCouldNotCallProc);
+      Result := False;
+      exit;
+    end;
+    Params := TPSList.Create;
+    Params.Add(NewPPSVariantIFC(Stack[Longint(Stack.Count) - 1], True));
+    for i := Stack.Count -3 downto Longint(Stack.Count) - ParamCount -2 do
+    begin
+      Params.Add(NewPPSVariantIFC(Stack[I], False));
+    end;
+    try
+      Result := Caller.InnerfuseCall(FSelf, p.Ext1, cdRegister, Params, nil);
+    finally
+      DisposePPSVariantIFCList(Params);
+    end;
+  end else begin
+    n := NewTPSVariantIFC(Stack[Longint(Stack.Count) - 1], False);
+    if (n.Dta = nil) or (n.aType.BaseType <> btClass) then
+    begin
+      result := false;
+      Caller.CMD_Err(erNullPointerException);
+      exit;
+    end;
+    FSelf := pointer(n.Dta^);
+    if FSelf = nil then
+    begin
+      Caller.CMD_Err(erCouldNotCallProc);
+      Result := False;
+      exit;
+    end;
+    Params := TPSList.Create;
+    Params.Add(NewPPSVariantIFC(Stack[Longint(Stack.Count) - ParamCount - 2], False));
+
+    for i := Stack.Count -2 downto Longint(Stack.Count) - ParamCount -1 do
+    begin
+      Params.Add(NewPPSVariantIFC(Stack[I], False));
+    end;
+    try
+      Result := Caller.InnerfuseCall(FSelf, p.Ext2, cdregister, Params, nil);
+    finally
+      DisposePPSVariantIFCList(Params);
+    end;
+  end;
+end;
+
+function ClassCallProcPropertyHelperName(Caller: TPSExec; p: TPSExternalProcRec; Global, Stack: TPSStack): Boolean;
+var
+  I, ParamCount: Longint;
+  Params: TPSList;
+  tt: PIFVariant;
+  n: TPSVariantIFC;
+  FSelf: Pointer;
+begin
+  if Length(P.Decl) < 4 then begin
+    Result := False;
+    exit;
+  end;
+  ParamCount := Longint((@P.Decl[1])^);
+  if Longint(Stack.Count) < ParamCount +1 then begin
+    Result := False;
+    exit;
+  end;
+  Dec(ParamCount);
+  if p.Ext1 <> nil then // read
+  begin
+    n := NewTPSVariantIFC(Stack[Longint(Stack.Count) - 2], false);
+    if (n.Dta = nil) or (n.aType.BaseType <> btClass) then
+    begin
+      result := false;
+      Caller.CMD_Err(erNullPointerException);
+      exit;
+    end;
+    FSelf := Tobject(n.dta^);
+    Params := TPSList.Create;
+    Params.Add(NewPPSVariantIFC(Stack[Longint(Stack.Count) - 1], True));
+    for i := Stack.Count -3 downto Longint(Stack.Count) - ParamCount -2 do
+      Params.Add(NewPPSVariantIFC(Stack[I], False));
+    tt := CreateHeapVariant(Caller.FindType2(btString));
+    if tt <> nil then
+    begin
+      PPSVariantAString(tt).Data := p.Name;
+      Params.Add(NewPPSVariantIFC(tt, false));
+    end;
+    try
+      Result := Caller.InnerfuseCall(FSelf, p.Ext1, cdRegister, Params, nil);
+    finally
+      DestroyHeapVariant(tt);
+      DisposePPSVariantIFCList(Params);
+    end;
+  end else begin
+    n := NewTPSVariantIFC(Stack[Longint(Stack.Count) - 1], false);
+    if (n.Dta = nil) or (n.aType.BaseType <> btClass) then
+    begin
+      result := false;
+      Caller.CMD_Err(erNullPointerException);
+      exit;
+    end;
+    FSelf := Tobject(n.dta^);
+    Params := TPSList.Create;
+    Params.Add(NewPPSVariantIFC(Stack[Longint(Stack.Count) - 2], True));
+
+    for i := Stack.Count -2 downto Longint(Stack.Count) - ParamCount -1 do
+    begin
+      Params.Add(NewPPSVariantIFC(Stack[I], false));
+    end;
+    tt := CreateHeapVariant(Caller.FindType2(btString));
+    if tt <> nil then
+    begin
+      PPSVariantAString(tt).Data := p.Name;
+      Params.Add(NewPPSVariantIFC(tt, false));
+    end;
+    try
+      Result := Caller.InnerfuseCall(FSelf, p.Ext2, cdregister, Params, nil);
+    finally
+      DestroyHeapVariant(tt);
+      DisposePPSVariantIFCList(Params);
+    end;
+  end;
+end;
+
+
+
+function ClassCallProcEventPropertyHelper(Caller: TPSExec; p: TPSExternalProcRec; Global, Stack: TPSStack): Boolean;
+{Event property helper}
+var
+  I, ParamCount: Longint;
+  Params: TPSList;
+  n: TPSVariantIFC;
+  n2: PIFVariant;
+  FSelf: Pointer;
+begin
+  if Length(P.Decl) < 4 then begin
+    Result := False;
+    exit;
+  end;
+  ParamCount := Longint((@P.Decl[1])^);
+  if Longint(Stack.Count) < ParamCount +1 then begin
+    Result := False;
+    exit;
+  end;
+  Dec(ParamCount);
+  if p.Ext1 <> nil then // read
+  begin
+    n := NewTPSVariantIFC(Stack[Longint(Stack.Count) - 2], false);
+    if (n.Dta = nil) or (n.aType.BaseType <> btClass) then
+    begin
+      result := false;
+      Caller.CMD_Err(erNullPointerException);
+      exit;
+    end;
+    FSelf := Tobject(n.dta^);
+    n := NewTPSVariantIFC(Stack[Longint(Stack.Count) - 1], True); // Result
+    if (n.aType.BaseType <> btU32) and (n.aType.BaseType <> btProcPtr) then
+    begin
+      Result := False;
+      Caller.CMD_Err(erNullPointerException);
+      exit;
+    end;
+    n2 := CreateHeapVariant(Caller.FindType2(btDouble));
+    if n2 = nil then
+    begin
+      Result := False;
+      exit;
+    end;
+    TMethod(PPSVariantDouble(n2).Data).Code := nil;
+    TMethod(PPSVariantDouble(n2).Data).Data := nil;
+    Params := TPSList.Create;
+    Params.Add(NewPPSVariantIFC(n2, True));
+    for i := Stack.Count -3 downto Longint(Stack.Count) - ParamCount -2 do
+      Params.Add(NewPPSVariantIFC(Stack[i], False));
+    try
+      Result := Caller.InnerfuseCall(FSelf, p.Ext1, cdRegister, Params, nil);
+    finally
+      Cardinal(n.Dta^) := getMethodNo(TMethod(PPSVariantDouble(n2).Data), Caller);
+      if Cardinal(n.Dta^) = 0 then
+      begin
+        Pointer(Pointer((IPointer(n.dta)+4))^) := TMethod(PPSVariantDouble(n2).Data).Data;
+        Pointer(Pointer((IPointer(n.dta)+8))^) := TMethod(PPSVariantDouble(n2).Data).Code;
+      end;
+      DestroyHeapVariant(n2);
+      DisposePPSVariantIFCList(Params);
+    end;
+  end else begin
+    n := NewTPSVariantIFC(Stack[Longint(Stack.Count) - 1], false);
+    if (n.Dta = nil) or (n.aType.BaseType <> btClass) then
+    begin
+      result := false;
+      Caller.CMD_Err(erNullPointerException);
+      exit;
+    end;
+    FSelf := Tobject(n.dta^);
+    n := NewTPSVariantIFC(Stack[Longint(Stack.Count) - 2], false);
+    if (n.Dta = nil) or ((n.aType.BaseType <> btu32) and (n.aType.BaseType <> btProcPtr)) then
+    begin
+      result := false;
+      Caller.CMD_Err(erNullPointerException);
+      exit;
+    end;
+    n2 := CreateHeapVariant(Caller.FindType2(btDouble));
+    if n2 = nil then
+    begin
+      Result := False;
+      exit;
+    end;
+    TMethod(PPSVariantDouble(n2).Data) := MkMethod(Caller, cardinal(n.dta^));
+    Params := TPSList.Create;
+    Params.Add(NewPPSVariantIFC(n2, False));
+
+    for i := Stack.Count -2 downto Longint(Stack.Count) - ParamCount -1 do
+    begin
+      Params.Add(NewPPSVariantIFC(Stack[I], False));
+    end;
+    try
+      Result := Caller.InnerfuseCall(FSelf, p.Ext2, cdregister, Params, nil);
+    finally
+      DestroyHeapVariant(n2);
+      DisposePPSVariantIFCList(Params);
+    end;
+  end;
+end;
+
+
+{'class:'+CLASSNAME+'|'+FUNCNAME+'|'+chr(CallingConv)+chr(hasresult)+params
+
+For property write functions there is an '@' after the funcname.
+}
+function SpecImport(Sender: TPSExec; p: TPSExternalProcRec; Tag: Pointer): Boolean;
+var
+  H, I: Longint;
+  S, s2: tbtString;
+  CL: TPSRuntimeClass;
+  Px: PClassItem;
+  pp: PPropInfo;
+  IsRead: Boolean;
+begin
+  s := p.Decl;
+  delete(s, 1, 6);
+  if s = '-' then {nil function}
+  begin
+    p.ProcPtr := NilProc;
+    Result := True;
+    exit;
+  end;
+  if s = '+' then {cast function}
+  begin
+    p.ProcPtr := CastProc;
+    p.Ext2 := Tag;
+    Result := True;
+    exit;
+  end;
+  s2 := copy(S, 1, pos(tbtchar('|'), s)-1);
+  delete(s, 1, length(s2) + 1);
+  H := MakeHash(s2);
+  ISRead := False;
+  cl := nil;
+  for I := TPSRuntimeClassImporter(Tag).FClasses.Count -1 downto 0 do
+  begin
+    Cl := TPSRuntimeClassImporter(Tag).FClasses[I];
+    if (Cl.FClassNameHash = h) and (cl.FClassName = s2) then
+    begin
+      IsRead := True;
+      break;
+    end;
+  end;
+  if not isRead then begin
+    Result := False;
+    exit;
+  end;
+  s2 := copy(S, 1, pos(tbtchar('|'), s)-1);
+  delete(s, 1, length(s2) + 1);
+  if (s2 <> '') and (s2[length(s2)] = '@') then
+  begin
+    IsRead := False;
+    Delete(S2, length(s2), 1);
+  end else
+    isRead := True;
+  p.Name := s2;
+  H := MakeHash(s2);
+  for i := cl.FClassItems.Count -1 downto 0 do
+  begin
+    px := cl.FClassItems[I];
+    if (px^.FNameHash = h) and (px^.FName = s2) then
+    begin
+      p.Decl := s;
+      case px^.b of
+  {0: ext1=ptr}
+  {1: ext1=pointerinlist}
+  {2: ext1=propertyinfo}
+  {3: ext1=readfunc; ext2=writefunc}
+        4:
+          begin
+            p.ProcPtr := ClassCallProcConstructor;
+            p.Ext1 := px^.Ptr;
+            if p.Ext1 = nil then begin result := false; exit; end;
+            p.Ext2 := Tag;
+          end;
+        5:
+          begin
+            p.ProcPtr := ClassCallProcVirtualConstructor;
+            p.Ext1 := px^.Ptr;
+           if p.Ext1 = nil then begin result := false; exit; end;
+            p.Ext2 := Tag;
+          end;
+        6:
+          begin
+            p.ProcPtr := ClassCallProcEventPropertyHelper;
+            if IsRead then
+            begin
+              p.Ext1 := px^.FReadFunc;
+              if p.Ext1 = nil then begin result := false; exit; end;
+              p.Ext2 := nil;
+            end else
+            begin
+              p.Ext1 := nil;
+              p.Ext2 := px^.FWriteFunc;
+              if p.Ext2 = nil then begin result := false; exit; end;
+            end;
+          end;
+        0:
+          begin
+            p.ProcPtr := ClassCallProcMethod;
+            p.Ext1 := px^.Ptr;
+            if p.Ext1 = nil then begin result := false; exit; end;
+            p.Ext2 := nil;
+          end;
+        1:
+          begin
+            p.ProcPtr := ClassCallProcMethod;
+            p.Ext1 := px^.PointerInList;
+            //if p.Ext1 = nil then begin result := false; exit; end;
+            p.ext2 := pointer(1);
+          end;
+        3:
+          begin
+            p.ProcPtr := ClassCallProcPropertyHelper;
+            if IsRead then
+            begin
+              p.Ext1 := px^.FReadFunc;
+              if p.Ext1 = nil then begin result := false; exit; end;
+              p.Ext2 := nil;
+            end else
+            begin
+              p.Ext1 := nil;
+              p.Ext2 := px^.FWriteFunc;
+              if p.Ext2 = nil then begin result := false; exit; end;
+            end;
+          end;
+        7:
+          begin
+            p.ProcPtr := ClassCallProcPropertyHelperName;
+            if IsRead then
+            begin
+              p.Ext1 := px^.FReadFunc;
+              if p.Ext1 = nil then begin result := false; exit; end;
+              p.Ext2 := nil;
+            end else
+            begin
+              p.Ext1 := nil;
+              p.Ext2 := px^.FWriteFunc;
+              if p.Ext2 = nil then begin result := false; exit; end;
+            end;
+          end;
+        else
+         begin
+           result := false;
+           exit;
+         end;
+      end;
+      Result := true;
+      exit;
+    end;
+  end;
+  if cl.FClass.ClassInfo <> nil then
+  begin
+    pp := GetPropInfo(cl.FClass.ClassInfo, string(s2));
+    if pp <> nil then
+    begin
+       p.ProcPtr := ClassCallProcProperty;
+       p.Ext1 := pp;
+       if IsRead then
+         p.Ext2 := Pointer(1)
+       else
+         p.Ext2 := Pointer(0);
+       Result := True;
+    end else
+      result := false;
+  end else
+    Result := False;
+end;
+
+procedure RegisterClassLibraryRuntime(SE: TPSExec; Importer: TPSRuntimeClassImporter);
+begin
+  SE.AddSpecialProcImport('class', SpecImport, Importer);
+end;
+
+
+procedure TPSExec.ClearspecialProcImports;
+var
+  I: Longint;
+  P: PSpecialProc;
+begin
+  for I := FSpecialProcList.Count -1 downto 0 do
+  begin
+    P := FSpecialProcList[I];
+    Dispose(p);
+  end;
+  FSpecialProcList.Clear;
+end;
+
+procedure TPSExec.RaiseCurrentException;
+var
+  ExObj: TObject;
+begin
+  if ExEx = erNoError then exit; // do nothing
+  ExObj := Self.ExObject;
+  if ExObj <> nil then
+  begin
+    Self.ExObject := nil;
+    raise ExObj;
+  end;
+  raise EPSException.Create(PSErrorToString(ExceptionCode, ExceptionString), Self, ExProc, ExPos);
+end;
+
+procedure TPSExec.CMD_Err2(EC: TPSError; const Param: tbtString);
+begin
+  CMD_Err3(EC, Param, Nil);
+end;
+
+function TPSExec.GetProcAsMethod(const ProcNo: Cardinal): TMethod;
+begin
+  Result := MkMethod(Self, ProcNo);
+end;
+
+function TPSExec.GetProcAsMethodN(const ProcName: tbtString): TMethod;
+var
+  procno: Cardinal;
+begin
+  Procno := GetProc(ProcName);
+  if Procno = InvalidVal then
+  begin
+    Result.Code := nil;
+    Result.Data := nil;
+  end
+  else
+    Result := MkMethod(Self, procno)
+end;
+
+
+procedure TPSExec.RegisterAttributeType(useproc: TPSAttributeUseProc;
+  const TypeName: tbtString);
+var
+  att: TPSAttributeType;
+begin
+  att := TPSAttributeType.Create;
+  att.TypeName := TypeName;
+  att.TypeNameHash := MakeHash(TypeName);
+  att.UseProc := UseProc;
+  FAttributeTypes.Add(att);
+end;
+
+function TPSExec.GetProcCount: Cardinal;
+begin
+  Result := FProcs.Count;
+end;
+
+function TPSExec.GetTypeCount: Longint;
+begin
+  Result := FTypes.Count;
+end;
+
+function TPSExec.GetVarCount: Longint;
+begin
+  Result := FGlobalVars.Count;
+end;
+
+function TPSExec.FindSpecialProcImport(
+  P: TPSOnSpecialProcImport): pointer;
+var
+  i: Longint;
+  pr: PSpecialProc;
+begin
+  for i := FSpecialProcList.Count -1 downto 0 do
+  begin
+    pr := FSpecialProcList[i];
+    if @pr.P = @p then
+    begin
+      Result := pr.tag;
+      exit;
+    end;
+  end;
+  result := nil;
+end;
+
+function TPSExec.InvokeExternalMethod(At: TPSTypeRec_ProcPtr; Slf,
+  Ptr: Pointer): Boolean;
+var
+  res: PPSVariantIFC;
+  s: tbtString;
+  CurrStack, i: Longint;
+  n: PPSVariant;
+  MyList: TPSList;
+begin
+  s := TPSTypeRec_ProcPtr(at).ParamInfo;
+//  Delete(s, 1, 1);
+  CurrStack := Cardinal(FStack.Count) - Cardinal(length(s)) -1;
+  if s[1] = #0 then inc(CurrStack);
+  MyList := TPSList.Create;
+  for i := 2 to length(s) do
+  begin
+    MyList.Add(nil);
+  end;
+  for i := length(s) downto 2 do
+  begin
+    n := FStack[CurrStack];
+    MyList[i - 2] := NewPPSVariantIFC(n, s[i] <> #0);
+    inc(CurrStack);
+  end;
+  if s[1] <> #0 then
+  begin
+    res := NewPPSVariantIFC(FStack[CurrStack + 1], True);
+  end else res := nil;
+  Result := InnerfuseCall(Slf, Ptr, cdRegister, MyList, Res);
+
+  DisposePPSVariantIFC(res);
+  DisposePPSVariantIFCList(mylist);
+end;
+
+function TPSExec.LastEx: TPSError;
+var
+  pp: TPSExceptionHandler;
+begin
+  if FExceptionStack.Count = 0 then begin
+    result := ExEx;
+    exit;
+  end;
+  pp := fExceptionStack[fExceptionStack.Count-1];
+  result := pp.ExceptionData;
+end;
+
+function TPSExec.LastExParam: tbtString;
+begin
+  result := ExParam;
+end;
+
+function TPSExec.LastExPos: Integer;
+begin
+  result := ExPos;
+end;
+
+function TPSExec.LastExProc: Integer;
+begin
+  result := exProc;
+end;
+
+{ TPSRuntimeClass }
+
+constructor TPSRuntimeClass.Create(aClass: TClass; const AName: tbtString);
+begin
+  inherited Create;
+  FClass := AClass;
+  if AName = '' then
+  begin
+    FClassName := FastUpperCase(tbtString(aClass.ClassName));
+    FClassNameHash := MakeHash(FClassName);
+  end else begin
+    FClassName := FastUppercase(AName);
+    FClassNameHash := MakeHash(FClassName);
+  end;
+  FClassItems:= TPSList.Create;
+  FEndOfVmt := MaxInt;
+end;
+
+destructor TPSRuntimeClass.Destroy;
+var
+  I: Longint;
+  P: PClassItem;
+begin
+  for i:= FClassItems.Count -1 downto 0 do
+  begin
+    P := FClassItems[I];
+    Dispose(p);
+  end;
+  FClassItems.Free;
+  inherited Destroy;
+end;
+
+procedure TPSRuntimeClass.RegisterVirtualAbstractMethod(ClassDef: TClass;
+  ProcPtr: Pointer; const Name: tbtString);
+var
+  P: PClassItem;
+begin
+  New(P);
+  p^.FName := FastUppercase(Name);
+  p^.FNameHash := MakeHash(p^.FName);
+  p^.b := 1;
+  p^.PointerInList := FindVirtualMethodPtr(Self, ClassDef, ProcPtr);
+  FClassItems.Add(p);
+end;
+
+procedure TPSRuntimeClass.RegisterConstructor(ProcPtr: Pointer;
+  const Name: tbtString);
+var
+  P: PClassItem;
+begin
+  New(P);
+  p^.FName := FastUppercase(Name);
+  p^.FNameHash := MakeHash(p^.FName);
+  p^.b := 4;
+  p^.Ptr := ProcPtr;
+  FClassItems.Add(p);
+end;
+
+procedure TPSRuntimeClass.RegisterMethod(ProcPtr: Pointer; const Name: tbtString);
+var
+  P: PClassItem;
+begin
+  New(P);
+  p^.FName := FastUppercase(Name);
+  p^.FNameHash := MakeHash(p^.FName);
+  p^.b := 0;
+  p^.Ptr := ProcPtr;
+  FClassItems.Add(p);
+end;
+
+
+procedure TPSRuntimeClass.RegisterPropertyHelper(ReadFunc,
+  WriteFunc: Pointer; const Name: tbtString);
+var
+  P: PClassItem;
+begin
+  New(P);
+  p^.FName := FastUppercase(Name);
+  p^.FNameHash := MakeHash(p^.FName);
+  p^.b := 3;
+  p^.FReadFunc := ReadFunc;
+  p^.FWriteFunc := WriteFunc;
+  FClassItems.Add(p);
+end;
+
+procedure TPSRuntimeClass.RegisterVirtualConstructor(ProcPtr: Pointer;
+  const Name: tbtString);
+var
+  P: PClassItem;
+begin
+  New(P);
+  p^.FName := FastUppercase(Name);
+  p^.FNameHash := MakeHash(p^.FName);
+  p^.b := 5;
+  p^.PointerInList := FindVirtualMethodPtr(Self, FClass, ProcPtr);
+  FClassItems.Add(p);
+end;
+
+procedure TPSRuntimeClass.RegisterVirtualMethod(ProcPtr: Pointer; const Name: tbtString);
+var
+  P: PClassItem;
+begin
+  New(P);
+  p^.FName := FastUppercase(Name);
+  p^.FNameHash := MakeHash(p^.FName);
+  p^.b := 1;
+  p^.PointerInList := FindVirtualMethodPtr(Self, FClass, ProcPtr);
+  FClassItems.Add(p);
+end;
+
+procedure TPSRuntimeClass.RegisterEventPropertyHelper(ReadFunc,
+  WriteFunc: Pointer; const Name: tbtString);
+var
+  P: PClassItem;
+begin
+  New(P);
+  p^.FName := FastUppercase(Name);
+  p^.FNameHash := MakeHash(p^.FName);
+  p^.b := 6;
+  p^.FReadFunc := ReadFunc;
+  p^.FWriteFunc := WriteFunc;
+  FClassItems.Add(p);
+end;
+
+
+procedure TPSRuntimeClass.RegisterPropertyHelperName(ReadFunc,
+  WriteFunc: Pointer; const Name: tbtString);
+var
+  P: PClassItem;
+begin
+  New(P);
+  p^.FName := FastUppercase(Name);
+  p^.FNameHash := MakeHash(p^.FName);
+  p^.b := 7;
+  p^.FReadFunc := ReadFunc;
+  p^.FWriteFunc := WriteFunc;
+  FClassItems.Add(p);
+end;
+
+{ TPSRuntimeClassImporter }
+
+function TPSRuntimeClassImporter.Add(aClass: TClass): TPSRuntimeClass;
+begin
+  Result := FindClass(FastUppercase(tbtString(aClass.ClassName)));
+  if Result <> nil then exit;
+  Result := TPSRuntimeClass.Create(aClass, '');
+  FClasses.Add(Result);
+end;
+
+function TPSRuntimeClassImporter.Add2(aClass: TClass;
+  const Name: tbtString): TPSRuntimeClass;
+begin
+  Result := FindClass(Name);
+  if Result <> nil then exit;
+  Result := TPSRuntimeClass.Create(aClass, Name);
+  FClasses.Add(Result);
+end;
+
+procedure TPSRuntimeClassImporter.Clear;
+var
+  I: Longint;
+begin
+  for i := 0 to FClasses.Count -1 do
+  begin
+    TPSRuntimeClass(FClasses[I]).Free;
+  end;
+  FClasses.Clear;
+end;
+
+constructor TPSRuntimeClassImporter.Create;
+begin
+  inherited Create;
+  FClasses := TPSList.Create;
+
+end;
+
+constructor TPSRuntimeClassImporter.CreateAndRegister(Exec: TPSexec;
+  AutoFree: Boolean);
+begin
+  inherited Create;
+  FClasses := TPSList.Create;
+  RegisterClassLibraryRuntime(Exec, Self);
+  if AutoFree then
+    Exec.AddResource(@RCIFreeProc, Self);
+end;
+
+destructor TPSRuntimeClassImporter.Destroy;
+begin
+  Clear;
+  FClasses.Free;
+  inherited Destroy;
+end;
+
+{$IFNDEF PS_NOINTERFACES}
+procedure SetVariantToInterface(V: PIFVariant; Cl: IUnknown);
+begin
+  if (v <> nil) and (v.FType.BaseType = btInterface) then
+  begin
+    PPSVariantinterface(v).Data := cl;
+    {$IFNDEF Delphi3UP}
+    if PPSVariantinterface(v).Data <> nil then
+      PPSVariantinterface(v).Data.AddRef;
+    {$ENDIF}
+  end;
+end;
+{$ENDIF}
+
+procedure SetVariantToClass(V: PIFVariant; Cl: TObject);
+begin
+  if (v <> nil) and (v.FType.BaseType = btClass) then
+  begin
+    PPSVariantclass(v).Data := cl;
+  end;
+end;
+
+function BGRFW(var s: tbtString): tbtString;
+var
+  l: Longint;
+begin
+  l := Length(s);
+  while l >0 do
+  begin
+    if s[l] = ' ' then
+    begin
+      Result := copy(s, l + 1, Length(s) - l);
+      Delete(s, l, Length(s) - l + 1);
+      exit;
+    end;
+    Dec(l);
+  end;
+  Result := s;
+  s := '';
+end;
+
+{$ifdef fpc}
+  {$if defined(cpupowerpc)}
+    {$define ppc}
+  {$ifend}
+{$endif}
+{$ifdef ppc}
+procedure MyAllMethodsHandler;
+begin
+end;
+{$else}
+
+
+function MyAllMethodsHandler2(Self: PScriptMethodInfo; const Stack: PPointer; _EDX, _ECX: Pointer): Integer; forward;
+
+procedure MyAllMethodsHandler;
+//  On entry:
+//     EAX = Self pointer
+//     EDX, ECX = param1 and param2
+//     STACK = param3... paramcount
+asm
+  push 0
+  push ecx
+  push edx
+  mov edx, esp
+  add edx, 16 // was 12
+  pop ecx
+  call MyAllMethodsHandler2
+  pop ecx
+  mov edx, [esp]
+  add esp, eax
+  mov [esp], edx
+  mov eax, ecx
+end;
+
+function ResultAsRegister(b: TPSTypeRec): Boolean;
+begin
+  case b.BaseType of
+    btSingle,
+    btDouble,
+    btExtended,
+    btU8,
+    bts8,
+    bts16,
+    btu16,
+    bts32,
+    btu32,
+{$IFDEF PS_FPCSTRINGWORKAROUND}
+    btString,
+{$ENDIF}
+{$IFNDEF PS_NOINT64}
+    bts64,
+{$ENDIF}
+    btPChar,
+{$IFNDEF PS_NOWIDESTRING}
+    btWideChar,
+{$ENDIF}
+    btChar,
+    btclass,
+    btEnum: Result := true;
+    btSet: Result := b.RealSize <= 4;
+    btStaticArray: Result := b.RealSize <= 4;
+  else
+    Result := false;
+  end;
+end;
+
+function SupportsRegister(b: TPSTypeRec): Boolean;
+begin
+  case b.BaseType of
+    btU8,
+    bts8,
+    bts16,
+    btu16,
+    bts32,
+    btu32,
+    btstring,
+    btclass,
+{$IFNDEF PS_NOINTERFACES}
+    btinterface,
+{$ENDIF}
+    btPChar,
+{$IFNDEF PS_NOWIDESTRING}
+    btwidestring,
+    btWideChar,
+{$ENDIF}
+    btChar,
+    btArray,
+    btEnum: Result := true;
+    btSet: Result := b.RealSize <= 4;
+    btStaticArray: Result := b.RealSize <= 4;
+  else
+    Result := false;
+  end;
+end;
+
+function AlwaysAsVariable(aType: TPSTypeRec): Boolean;
+begin
+  case atype.BaseType of
+    btVariant: Result := true;
+    btSet: Result := atype.RealSize > 4;
+    btRecord: Result := atype.RealSize > 4;
+    btStaticArray: Result := atype.RealSize > 4;
+  else
+    Result := false;
+  end;
+end;
+
+
+procedure PutOnFPUStackExtended(ft: extended);
+asm
+//  fstp tbyte ptr [ft]
+  fld tbyte ptr [ft]
+
+end;
+
+
+function MyAllMethodsHandler2(Self: PScriptMethodInfo; const Stack: PPointer; _EDX, _ECX: Pointer): Integer;
+var
+  Decl: tbtString;
+  I, C, regno: Integer;
+  Params: TPSList;
+  Res, Tmp: PIFVariant;
+  cpt: PIFTypeRec;
+  fmod: tbtchar;
+  s,e: tbtString;
+  FStack: pointer;
+  ex: TPSExceptionHandler;
+
+
+begin
+  Decl := TPSInternalProcRec(Self^.Se.FProcs[Self^.ProcNo]).ExportDecl;
+
+  FStack := Stack;
+  Params := TPSList.Create;
+  s := decl;
+  grfw(s);
+  while s <> '' do
+  begin
+    Params.Add(nil);
+    grfw(s);
+  end;
+  c := Params.Count;
+  regno := 0;
+  Result := 0;
+  s := decl;
+  grfw(s);
+  for i := c-1 downto 0 do
+  begin
+    e := grfw(s);
+    fmod := e[1];
+    delete(e, 1, 1);
+    cpt := Self.Se.GetTypeNo(StrToInt(e));
+    if ((fmod = '%') or (fmod = '!') or (AlwaysAsVariable(cpt))) and (RegNo < 2) then
+    begin
+      tmp := CreateHeapVariant(self.Se.FindType2(btPointer));
+      PPSVariantPointer(tmp).DestType := cpt;
+      Params[i] := tmp;
+      case regno of
+        0: begin
+            PPSVariantPointer(tmp).DataDest := Pointer(_EDX);
+            inc(regno);
+          end;
+        1: begin
+            PPSVariantPointer(tmp).DataDest := Pointer(_ECX);
+            inc(regno);
+          end;
+(*        else begin
+            PPSVariantPointer(tmp).DataDest := Pointer(FStack^);
+            FStack := Pointer(IPointer(FStack) + 4);
+          end;*)
+      end;
+    end
+    else if SupportsRegister(cpt) and (RegNo < 2) then
+    begin
+      tmp := CreateHeapVariant(cpt);
+      Params[i] := tmp;
+      case regno of
+        0: begin
+            CopyArrayContents(@PPSVariantData(tmp)^.Data, @_EDX, 1, cpt);
+            inc(regno);
+          end;
+        1: begin
+            CopyArrayContents(@PPSVariantData(tmp)^.Data, @_ECX, 1, cpt);
+            inc(regno);
+          end;
+(*        else begin
+            CopyArrayContents(@PPSVariantData(tmp)^.Data, Pointer(FStack), 1, cpt);
+            FStack := Pointer(IPointer(FStack) + 4);
+          end;*)
+      end;
+(*    end else
+    begin
+      tmp := CreateHeapVariant(cpt);
+      Params[i] := tmp;
+      CopyArrayContents(@PPSVariantData(tmp)^.Data, Pointer(FStack), 1, cpt);
+      FStack := Pointer(IPointer(FStack) + cpt.RealSize + 3 and not 3);*)
+    end;
+  end;
+  s := decl;
+  e := grfw(s);
+
+  if e <> '-1' then
+  begin
+    cpt := Self.Se.GetTypeNo(StrToInt(e));
+    if not ResultAsRegister(cpt) then
+    begin
+      Res := CreateHeapVariant(Self.Se.FindType2(btPointer));
+      PPSVariantPointer(Res).DestType := cpt;
+      Params.Add(Res);
+      case regno of
+        0: begin
+            PPSVariantPointer(Res).DataDest := Pointer(_EDX);
+          end;
+        1: begin
+            PPSVariantPointer(Res).DataDest := Pointer(_ECX);
+          end;
+        else begin
+            PPSVariantPointer(Res).DataDest := Pointer(FStack^);
+            Inc(Result, 4);
+          end;
+      end;
+    end else
+    begin
+      Res := CreateHeapVariant(cpt);
+      Params.Add(Res);
+    end;
+  end else Res := nil;
+  s := decl;
+  grfw(s);
+  for i := 0 to c -1 do
+  begin
+    e := grlw(s);
+    fmod := e[1];
+    delete(e, 1, 1);
+    if Params[i] <> nil then Continue;
+    cpt := Self.Se.GetTypeNo(StrToInt(e));
+    if (fmod = '%') or (fmod = '!') or (AlwaysAsVariable(cpt)) then
+    begin
+      tmp := CreateHeapVariant(self.Se.FindType2(btPointer));
+      PPSVariantPointer(tmp).DestType := cpt;
+      Params[i] := tmp;
+      PPSVariantPointer(tmp).DataDest := Pointer(FStack^);
+      FStack := Pointer(IPointer(FStack) + 4);
+      Inc(Result, 4);
+    end
+(*    else if SupportsRegister(cpt) then
+    begin
+      tmp := CreateHeapVariant(cpt);
+      Params[i] := tmp;
+      CopyArrayContents(@PPSVariantData(tmp)^.Data, Pointer(FStack), 1, cpt);
+      FStack := Pointer(IPointer(FStack) + 4);
+      end;
+    end *)else
+    begin
+      tmp := CreateHeapVariant(cpt);
+      Params[i] := tmp;
+      CopyArrayContents(@PPSVariantData(tmp)^.Data, Pointer(FStack), 1, cpt);
+      FStack := Pointer((IPointer(FStack) + cpt.RealSize + 3) and not 3);
+      Inc(Result, (cpt.RealSize + 3) and not 3);
+    end;
+  end;
+  ex := TPSExceptionHandler.Create;
+  ex.FinallyOffset := InvalidVal;
+  ex.ExceptOffset := InvalidVal;
+  ex.Finally2Offset := InvalidVal;
+  ex.EndOfBlock := InvalidVal;
+  ex.CurrProc := nil;
+  ex.BasePtr := Self.Se.FCurrStackBase;
+  Ex.StackSize := Self.Se.FStack.Count;
+  i :=  Self.Se.FExceptionStack.Add(ex);
+  Self.Se.RunProc(Params, Self.ProcNo);
+  if Self.Se.FExceptionStack[i] = ex then
+  begin
+    Self.Se.FExceptionStack.Remove(ex);
+    ex.Free;
+  end;
+
+  if (Res <> nil) then
+  begin
+    Params.DeleteLast;
+    if (ResultAsRegister(Res.FType)) then
+    begin
+      if (res^.FType.BaseType = btSingle) or (res^.FType.BaseType = btDouble) or
+      (res^.FType.BaseType = btCurrency) or (res^.Ftype.BaseType = btExtended) then
+      begin
+        case Res^.FType.BaseType of
+          btSingle: PutOnFPUStackExtended(PPSVariantSingle(res).Data);
+          btDouble: PutOnFPUStackExtended(PPSVariantDouble(res).Data);
+          btExtended: PutOnFPUStackExtended(PPSVariantExtended(res).Data);
+          btCurrency: PutOnFPUStackExtended(PPSVariantCurrency(res).Data);
+        end;
+        DestroyHeapVariant(Res);
+        Res := nil;
+      end else
+      begin
+{$IFNDEF PS_NOINT64}
+        if res^.FType.BaseType <> btS64 then
+{$ENDIF}
+          CopyArrayContents(Pointer(Longint(Stack)-8), @PPSVariantData(res)^.Data, 1, Res^.FType);
+      end;
+    end;
+    DestroyHeapVariant(res);
+  end;
+  for i := 0 to Params.Count -1 do
+    DestroyHeapVariant(Params[i]);
+  Params.Free;
+  if Self.Se.ExEx <> erNoError then
+  begin
+    if Self.Se.ExObject <> nil then
+    begin
+      FStack := Self.Se.ExObject;
+      Self.Se.ExObject := nil;
+      raise TObject(FStack);
+    end else
+      raise EPSException.Create(PSErrorToString(Self.SE.ExceptionCode, Self.Se.ExceptionString), Self.Se, Self.Se.ExProc, Self.Se.ExPos);
+  end;
+end;
+{$endif}
+function TPSRuntimeClassImporter.FindClass(const Name: tbtString): TPSRuntimeClass;
+var
+  h, i: Longint;
+  p: TPSRuntimeClass;
+begin
+  h := MakeHash(Name);
+  for i := FClasses.Count -1 downto 0 do
+  begin
+    p := FClasses[i];
+    if (p.FClassNameHash = h) and (p.FClassName = Name) then
+    begin
+      Result := P;
+      exit;
+    end;
+  end;
+  Result := nil;
+end;
+
+function DelphiFunctionProc(Caller: TPSExec; p: TPSExternalProcRec; Global, Stack: TPSStack; CC: TPSCallingConvention): Boolean;
+var
+  i: Integer;
+  MyList: TPSList;
+  n: PPSVariantIFC;
+  CurrStack: Cardinal;
+  s: tbtString;
+begin
+  s := P.Decl;
+  if length(s) = 0 then begin Result := False; exit; end;
+  CurrStack := Cardinal(Stack.Count) - Cardinal(length(s));
+  if s[1] = #0 then inc(CurrStack);
+  MyList := TPSList.Create;
+
+  for i := 2 to length(s) do
+  begin
+    MyList.Add(nil);
+  end;
+  for i := length(s) downto 2 do
+  begin
+    MyList[i - 2] := NewPPSVariantIFC(Stack[CurrStack], s[i] <> #0);
+    inc(CurrStack);
+  end;
+  if s[1] <> #0 then
+  begin
+    n := NewPPSVariantIFC(Stack[CurrStack], True);
+  end else n := nil;
+  try
+    result := Caller.InnerfuseCall(p.Ext2, p.Ext1, cc, MyList, n);
+  finally
+    DisposePPSVariantIFC(n);
+    DisposePPSVariantIFCList(mylist);
+  end;
+end;
+
+function DelphiFunctionProc_CDECL(Caller: TPSExec; p: TPSExternalProcRec; Global, Stack: TPSStack): Boolean;
+begin
+  Result := DelphiFunctionProc(Caller, p, Global, Stack, cdCdecl);
+end;
+function DelphiFunctionProc_Register(Caller: TPSExec; p: TPSExternalProcRec; Global, Stack: TPSStack): Boolean;
+begin
+  Result := DelphiFunctionProc(Caller, p, Global, Stack, cdRegister);
+end;
+function DelphiFunctionProc_Pascal(Caller: TPSExec; p: TPSExternalProcRec; Global, Stack: TPSStack): Boolean;
+begin
+  Result := DelphiFunctionProc(Caller, p, Global, Stack, cdPascal);
+end;
+function DelphiFunctionProc_Stdcall(Caller: TPSExec; p: TPSExternalProcRec; Global, Stack: TPSStack): Boolean;
+begin
+  Result := DelphiFunctionProc(Caller, p, Global, Stack, cdStdCall);
+end;
+
+procedure TPSExec.RegisterDelphiFunction(ProcPtr: Pointer;
+  const Name: tbtString; CC: TPSCallingConvention);
+begin
+  RegisterDelphiMethod(nil, ProcPtr, FastUppercase(Name), CC);
+end;
+
+procedure TPSExec.RegisterDelphiMethod(Slf, ProcPtr: Pointer;
+  const Name: tbtString; CC: TPSCallingConvention);
+begin
+  case cc of
+    cdRegister: RegisterFunctionName(FastUppercase(Name), DelphiFunctionProc_Register, ProcPtr, Slf);
+    cdPascal: RegisterFunctionName(FastUppercase(Name), DelphiFunctionProc_Pascal, ProcPtr, Slf);
+    cdStdCall: RegisterFunctionName(FastUppercase(Name), DelphiFunctionProc_Stdcall, ProcPtr, Slf);
+    cdCdecl: RegisterFunctionName(FastUppercase(Name), DelphiFunctionProc_CDECL, ProcPtr, Slf);
+  end;
+end;
+
+{ EPSException }
+
+constructor EPSException.Create(const Error: tbtString; Exec: TPSExec;
+  Procno, ProcPos: Cardinal);
+begin
+ inherited Create(string(Error));
+ FExec := Exec;
+ FProcNo := Procno;
+ FProcPos := ProcPos;
+end;
+
+{ TPSRuntimeAttribute }
+
+function TPSRuntimeAttribute.AddValue(aType: TPSTypeRec): PPSVariant;
+begin
+  Result := FValues.PushType(aType);
+end;
+
+procedure TPSRuntimeAttribute.AdjustSize;
+begin
+  FValues.Capacity := FValues.Length;
+end;
+
+constructor TPSRuntimeAttribute.Create(Owner: TPSRuntimeAttributes);
+begin
+  inherited Create;
+  FOwner := Owner;
+  FValues := TPSStack.Create;
+end;
+
+procedure TPSRuntimeAttribute.DeleteValue(i: Longint);
+begin
+  if Cardinal(i) <> Cardinal(FValues.Count -1) then
+    raise Exception.Create(RPS_CanOnlySendLastItem);
+  FValues.Pop;
+end;
+
+destructor TPSRuntimeAttribute.Destroy;
+begin
+  FValues.Free;
+  inherited Destroy;
+end;
+
+function TPSRuntimeAttribute.GetValue(I: Longint): PIFVariant;
+begin
+  Result := FValues[i];
+end;
+
+function TPSRuntimeAttribute.GetValueCount: Longint;
+begin
+  Result := FValues.Count;
+end;
+
+{ TPSRuntimeAttributes }
+
+function TPSRuntimeAttributes.Add: TPSRuntimeAttribute;
+begin
+  Result := TPSRuntimeAttribute.Create(Self);
+  FAttributes.Add(Result);
+end;
+
+constructor TPSRuntimeAttributes.Create(AOwner: TPSExec);
+begin
+  inherited Create;
+  FAttributes := TPSList.Create;
+  FOwner := AOwner;
+end;
+
+procedure TPSRuntimeAttributes.Delete(I: Longint);
+begin
+  TPSRuntimeAttribute(FAttributes[i]).Free;
+  FAttributes.Delete(i);
+end;
+
+destructor TPSRuntimeAttributes.Destroy;
+var
+  i: Longint;
+begin
+  for i := FAttributes.Count -1 downto 0 do
+    TPSRuntimeAttribute(FAttributes[i]).Free;
+  FAttributes.Free;
+  inherited Destroy;
+end;
+
+function TPSRuntimeAttributes.FindAttribute(
+  const Name: tbtString): TPSRuntimeAttribute;
+var
+  n: tbtString;
+  i, h: Longint;
+begin
+  n := FastUpperCase(Name);
+  h := MakeHash(n);
+  for i := 0 to FAttributes.Count -1 do
+  begin
+    Result := FAttributes[i];
+    if (Result.AttribTypeHash = h) and (Result.AttribType = n) then
+      exit;
+  end;
+  Result := nil;
+end;
+
+function TPSRuntimeAttributes.GetCount: Longint;
+begin
+   Result := FAttributes.Count;
+end;
+
+function TPSRuntimeAttributes.GetItem(I: Longint): TPSRuntimeAttribute;
+begin
+  Result := FAttributes[i];
+end;
+
+{ TPSInternalProcRec }
+
+destructor TPSInternalProcRec.Destroy;
+begin
+  if FData <> nil then
+    Freemem(Fdata, FLength);
+  inherited Destroy;
+end;
+
+{ TPsProcRec }
+
+constructor TPSProcRec.Create(Owner: TPSExec);
+begin
+  inherited Create;
+  FAttributes := TPSRuntimeAttributes.Create(Owner);
+end;
+
+destructor TPSProcRec.Destroy;
+begin
+  FAttributes.Free;
+  inherited Destroy;
+end;
+
+{ TPSTypeRec_Array }
+
+procedure TPSTypeRec_Array.CalcSize;
+begin
+  FrealSize := 4;
+end;
+
+{ TPSTypeRec_StaticArray }
+
+procedure TPSTypeRec_StaticArray.CalcSize;
+begin
+  FrealSize := Cardinal(FArrayType.RealSize) * Cardinal(Size);
+end;
+
+{ TPSTypeRec_Set }
+
+procedure TPSTypeRec_Set.CalcSize;
+begin
+  FrealSize := FByteSize;
+end;
+
+const
+  MemDelta = 4096;
+
+{ TPSStack }
+
+procedure TPSStack.AdjustLength;
+var
+  MyLen: Longint;
+begin
+  MyLen := ((FLength shr 12) + 1) shl 12;
+
+  SetCapacity(MyLen);
+end;
+
+procedure TPSStack.Clear;
+var
+  v: Pointer;
+  i: Longint;
+begin
+  for i := Count -1 downto 0 do
+  begin
+    v := Data[i];
+    if TPSTypeRec(v^).BaseType in NeedFinalization then
+      FinalizeVariant(Pointer(IPointer(v)+4), TPSTypeRec(v^));
+  end;
+  inherited Clear;
+  FLength := 0;
+  SetCapacity(0);
+end;
+
+constructor TPSStack.Create;
+begin
+  inherited Create;
+  GetMem(FDataPtr, MemDelta);
+  FCapacity := MemDelta;
+  FLength := 0;
+end;
+
+destructor TPSStack.Destroy;
+var
+  v: Pointer;
+  i: Longint;
+begin
+  for i := Count -1 downto 0 do
+  begin
+    v := Data[i];
+    if TPSTypeRec(v^).BaseType in NeedFinalization then
+    FinalizeVariant(Pointer(IPointer(v)+4), Pointer(v^));
+  end;
+  FreeMem(FDataPtr, FCapacity);
+  inherited Destroy;
+end;
+
+function TPSStack.GetBool(ItemNo: Longint): Boolean;
+var
+  val: PPSVariant;
+begin
+  if ItemNo < 0 then
+    val := Items[Longint(ItemNo) + Longint(Count)]
+  else
+    val := Items[ItemNo];
+  Result := PSGetUInt(@PPSVariantData(val).Data, val.FType) <> 0;
+end;
+
+function TPSStack.GetClass(ItemNo: Longint): TObject;
+var
+  val: PPSVariant;
+begin
+  if ItemNo < 0 then
+    val := Items[Longint(ItemNo) + Longint(Count)]
+  else
+    val := Items[ItemNo];
+  Result := PSGetObject(@PPSVariantData(val).Data, val.FType);
+end;
+
+function TPSStack.GetCurrency(ItemNo: Longint): Currency;
+var
+  val: PPSVariant;
+begin
+  if ItemNo < 0 then
+    val := Items[Longint(ItemNo) + Longint(Count)]
+  else
+    val := Items[ItemNo];
+  Result := PSGetCurrency(@PPSVariantData(val).Data, val.FType);
+end;
+
+function TPSStack.GetInt(ItemNo: Longint): Longint;
+var
+  val: PPSVariant;
+begin
+  if ItemNo < 0 then
+    val := items[Longint(ItemNo) + Longint(Count)]
+  else
+    val := items[ItemNo];
+  Result := PSGetInt(@PPSVariantData(val).Data, val.FType);
+end;
+
+{$IFNDEF PS_NOINT64}
+function TPSStack.GetInt64(ItemNo: Longint): Int64;
+var
+  val: PPSVariant;
+begin
+  if ItemNo < 0 then
+    val := items[Longint(ItemNo) + Longint(Count)]
+  else
+    val := items[ItemNo];
+  Result := PSGetInt64(@PPSVariantData(val).Data, val.FType);
+end;
+{$ENDIF}
+
+function TPSStack.GetItem(I: Longint): PPSVariant;
+begin
+  if Cardinal(I) >= Cardinal(Count) then
+    Result := nil
+  else
+    Result := Data[i];
+end;
+
+function TPSStack.GetReal(ItemNo: Longint): Extended;
+var
+  val: PPSVariant;
+begin
+  if ItemNo < 0 then
+    val := items[Longint(ItemNo) + Longint(Count)]
+  else
+    val := items[ItemNo];
+  Result := PSGetreal(@PPSVariantData(val).Data, val.FType);
+end;
+
+function TPSStack.GetAnsiString(ItemNo: Longint): tbtString;
+var
+  val: PPSVariant;
+begin
+  if ItemNo < 0 then
+    val := items[Longint(ItemNo) + Longint(Count)]
+  else
+    val := items[ItemNo];
+  Result := PSGetAnsiString(@PPSVariantData(val).Data, val.FType);
+end;
+
+function TPSStack.GetString(ItemNo: Longint): string; // calls the native method
+begin
+  result := {$IFDEF DELPHI2009UP}GetWideString(ItemNo){$ELSE}GetAnsiString(ItemNo){$ENDIF};
+end;
+
+function TPSStack.GetUInt(ItemNo: Longint): Cardinal;
+var
+  val: PPSVariant;
+begin
+  if ItemNo < 0 then
+    val := items[Longint(ItemNo) + Longint(Count)]
+  else
+    val := items[ItemNo];
+  Result := PSGetUInt(@PPSVariantData(val).Data, val.FType);
+end;
+
+{$IFNDEF PS_NOWIDESTRING}
+function TPSStack.GetWideString(ItemNo: Longint): tbtWideString;
+var
+  val: PPSVariant;
+begin
+  if ItemNo < 0 then
+    val := items[Longint(ItemNo) + Longint(Count)]
+  else
+    val := items[ItemNo];
+  Result := PSGetWideString(@PPSVariantData(val).Data, val.FType);
+end;
+{$ENDIF}
+
+procedure TPSStack.Pop;
+var
+  p1: Pointer;
+  c: Longint;
+begin
+  c := count -1;
+  p1 := Data[c];
+  DeleteLast;
+  FLength := IPointer(p1) - IPointer(FDataPtr);
+  if TPSTypeRec(p1^).BaseType in NeedFinalization then
+    FinalizeVariant(Pointer(IPointer(p1)+4), Pointer(p1^));
+  if ((FCapacity - FLength) shr 12) > 2 then AdjustLength;
+end;
+
+function TPSStack.Push(TotalSize: Longint): PPSVariant;
+var
+  o: Cardinal;
+  p: Pointer;
+begin
+  o := FLength;
+  FLength := (FLength + TotalSize) and not 3;
+  if FLength > FCapacity then AdjustLength;
+  p := Pointer(IPointer(FDataPtr) + IPointer(o));
+  Add(p);
+  Result := P;
+end;
+
+function TPSStack.PushType(aType: TPSTypeRec): PPSVariant;
+var
+  o: Cardinal;
+  p: Pointer;
+begin
+  o := FLength;
+  FLength := (FLength + Longint(aType.RealSize) + Longint(RTTISize + 3)) and not 3;
+  if FLength > FCapacity then AdjustLength;
+  p := Pointer(IPointer(FDataPtr) + IPointer(o));
+  Add(p);
+  Result := P;
+  Result.FType := aType;
+  InitializeVariant(Pointer(IPointer(Result)+4), aType);
+end;
+
+procedure TPSStack.SetBool(ItemNo: Longint; const Data: Boolean);
+var
+  val: PPSVariant;
+  ok: Boolean;
+begin
+  if ItemNo < 0 then
+    val := items[Longint(ItemNo) + Longint(Count)]
+  else
+    val := items[ItemNo];
+  ok := true;
+  if Data then
+    PSSetUInt(@PPSVariantData(val).Data, val.FType, ok, 1)
+  else
+    PSSetUInt(@PPSVariantData(val).Data, val.FType, ok, 0);
+  if not ok then raise Exception.Create(RPS_TypeMismatch);
+end;
+
+procedure TPSStack.SetCapacity(const Value: Longint);
+var
+  p: Pointer;
+  OOFS: IPointer;
+  I: Longint;
+begin
+  if Value < FLength then raise Exception.Create(RPS_CapacityLength);
+  if Value = 0 then
+  begin
+    if FDataPtr <> nil then
+    begin
+      FreeMem(FDataPtr, FCapacity);
+      FDataPtr := nil;
+    end;
+    FCapacity := 0;
+  end;
+  GetMem(p, Value);
+  if FDataPtr <> nil then
+  begin
+    if FLength > FCapacity then
+      OOFS := FCapacity
+    else
+      OOFS := FLength;
+    Move(FDataPtr^, p^, OOFS);
+    OOFS := IPointer(P) - IPointer(FDataPtr);
+    for i := Count -1 downto 0 do
+      Data[i] := Pointer(IPointer(Data[i]) + OOFS);
+
+    FreeMem(FDataPtr, FCapacity);
+  end;
+  FDataPtr := p;
+  FCapacity := Value;
+end;
+
+procedure TPSStack.SetClass(ItemNo: Longint; const Data: TObject);
+var
+  val: PPSVariant;
+  ok: Boolean;
+begin
+  if ItemNo < 0 then
+    val := items[Longint(ItemNo) + Longint(Count)]
+  else
+    val := items[ItemNo];
+  ok := true;
+  PSSetObject(@PPSVariantData(val).Data, val.FType, ok, Data);
+  if not ok then raise Exception.Create(RPS_TypeMismatch);
+end;
+
+procedure TPSStack.SetCurrency(ItemNo: Longint; const Data: Currency);
+var
+  val: PPSVariant;
+  ok: Boolean;
+begin
+  if ItemNo < 0 then
+    val := items[Longint(ItemNo) + Longint(Count)]
+  else
+    val := items[ItemNo];
+  ok := true;
+  PSSetCurrency(@PPSVariantData(val).Data, val.FType, ok, Data);
+  if not ok then raise Exception.Create(RPS_TypeMismatch);
+end;
+
+procedure TPSStack.SetInt(ItemNo: Longint; const Data: Longint);
+var
+  val: PPSVariant;
+  ok: Boolean;
+begin
+  if ItemNo < 0 then
+    val := items[Longint(ItemNo) + Longint(Count)]
+  else
+    val := items[ItemNo];
+  ok := true;
+  PSSetInt(@PPSVariantData(val).Data, val.FType, ok, Data);
+  if not ok then raise Exception.Create(RPS_TypeMismatch);
+end;
+
+{$IFNDEF PS_NOINT64}
+procedure TPSStack.SetInt64(ItemNo: Longint; const Data: Int64);
+var
+  val: PPSVariant;
+  ok: Boolean;
+begin
+  if ItemNo < 0 then
+    val := items[Longint(ItemNo) + Longint(Count)]
+  else
+    val := items[ItemNo];
+  ok := true;
+  PSSetInt64(@PPSVariantData(val).Data, val.FType, ok, Data);
+  if not ok then raise Exception.Create(RPS_TypeMismatch);
+end;
+{$ENDIF}
+
+procedure TPSStack.SetReal(ItemNo: Longint; const Data: Extended);
+var
+  val: PPSVariant;
+  ok: Boolean;
+begin
+  if ItemNo < 0 then
+    val := items[Longint(ItemNo) + Longint(Count)]
+  else
+    val := items[ItemNo];
+  ok := true;
+  PSSetReal(@PPSVariantData(val).Data, val.FType, ok, Data);
+  if not ok then raise Exception.Create(RPS_TypeMismatch);
+end;
+
+procedure TPSStack.SetAnsiString(ItemNo: Longint; const Data: tbtString);
+var
+  val: PPSVariant;
+  ok: Boolean;
+begin
+  if ItemNo < 0 then
+    val := items[Longint(ItemNo) + Longint(Count)]
+  else
+    val := items[ItemNo];
+  ok := true;
+  PSSetAnsiString(@PPSVariantData(val).Data, val.FType, ok, Data);
+  if not ok then raise Exception.Create(RPS_TypeMismatch);
+end;
+
+procedure TPSStack.SetString(ItemNo: Longint; const Data: string);
+begin
+  {$IFDEF DELPHI2009UP}
+  SetWideString(ItemNo, Data);
+  {$ELSE}
+  SetAnsiString(ItemNo, Data);
+  {$ENDIF}
+end;
+
+
+procedure TPSStack.SetUInt(ItemNo: Longint; const Data: Cardinal);
+var
+  val: PPSVariant;
+  ok: Boolean;
+begin
+  if ItemNo < 0 then
+    val := items[Longint(ItemNo) + Longint(Count)]
+  else
+    val := items[ItemNo];
+  ok := true;
+  PSSetUInt(@PPSVariantData(val).Data, val.FType, ok, Data);
+  if not ok then raise Exception.Create(RPS_TypeMismatch);
+end;
+
+
+{$IFNDEF PS_NOWIDESTRING}
+procedure TPSStack.SetWideString(ItemNo: Longint;
+  const Data: tbtWideString);
+var
+  val: PPSVariant;
+  ok: Boolean;
+begin
+  if ItemNo < 0 then
+    val := items[Longint(ItemNo) + Longint(Count)]
+  else
+    val := items[ItemNo];
+  ok := true;
+  PSSetWideString(@PPSVariantData(val).Data, val.FType, ok, Data);
+  if not ok then raise Exception.Create(RPS_TypeMismatch);
+end;
+{$ENDIF}
+
+
+{$IFNDEF PS_NOIDISPATCH}
+var
+  DispPropertyPut: Integer = DISPID_PROPERTYPUT;
+const
+  LOCALE_SYSTEM_DEFAULT = 2 shl 10; // Delphi 2 doesn't define this
+
+function IDispatchInvoke(Self: IDispatch; PropertySet: Boolean; const Name: tbtString; const Par: array of Variant): Variant;
+var
+  Param: Word;
+  i, ArgErr: Longint;
+  DispatchId: Longint;
+  DispParam: TDispParams;
+  ExceptInfo: TExcepInfo;
+  aName: PWideChar;
+  WSFreeList: TPSList;
+begin
+  FillChar(ExceptInfo, SizeOf(ExceptInfo), 0);
+  if Name='' then begin
+   DispatchId:=0;
+  end else begin
+   aName := StringToOleStr(Name);
+   try
+     if Self = nil then
+      raise Exception.Create(RPS_NILInterfaceException);
+     if Self.GetIDsOfNames(GUID_NULL, @aName, 1, LOCALE_SYSTEM_DEFAULT, @DispatchId) <> S_OK then
+      raise Exception.Create(RPS_UnknownMethod);
+   finally
+     SysFreeString(aName);
+   end;
+  end;
+  DispParam.cNamedArgs := 0;
+  DispParam.rgdispidNamedArgs := nil;
+  DispParam.cArgs := (High(Par) + 1);
+
+  if PropertySet then
+  begin
+    Param := DISPATCH_PROPERTYPUT;
+    DispParam.cNamedArgs := 1;
+    DispParam.rgdispidNamedArgs := @DispPropertyPut;
+  end else
+    Param := DISPATCH_METHOD or DISPATCH_PROPERTYGET;
+
+  WSFreeList := TPSList.Create;
+  try
+    GetMem(DispParam.rgvarg, sizeof(TVariantArg) * (High(Par) + 1));
+    FillCHar(DispParam.rgvarg^, sizeof(TVariantArg) * (High(Par) + 1), 0);
+    try
+      for i := 0 to High(Par)  do
+      begin
+        if PVarData(@Par[High(Par)-i]).VType = varString then
+        begin
+          DispParam.rgvarg[i].vt := VT_BSTR;
+          DispParam.rgvarg[i].bstrVal := StringToOleStr(Par[High(Par)-i]);
+          WSFreeList.Add(DispParam.rgvarg[i].bstrVal);
+        end else
+        begin
+          DispParam.rgvarg[i].vt := VT_VARIANT or VT_BYREF;
+          New(
+          {$IFDEF DELPHI4UP}
+          POleVariant
+          {$ELSE}
+          PVariant{$ENDIF}
+           (DispParam.rgvarg[i].pvarVal));
+
+          (*
+          {$IFDEF DELPHI4UP}
+            POleVariant
+          {$ELSE}
+            PVariant
+          {$ENDIF}
+           (DispParam.rgvarg[i].pvarVal)^ := Par[High(Par)-i];
+          *)
+          Move(Par[High(Par)-i],Pointer(DispParam.rgvarg[i].pvarVal)^,
+           Sizeof({$IFDEF DELPHI4UP}OleVariant{$ELSE}Variant{$ENDIF}));
+
+        end;
+      end;
+      i :=Self.Invoke(DispatchId, GUID_NULL, LOCALE_SYSTEM_DEFAULT, Param, DispParam, @Result, @ExceptInfo, @ArgErr);
+      {$IFNDEF Delphi3UP}
+      try
+       if not Succeeded(i) then
+       begin
+         if i = DISP_E_EXCEPTION then
+           raise Exception.Create(OleStrToString(ExceptInfo.bstrSource)+': '+OleStrToString(ExceptInfo.bstrDescription))
+         else
+           raise Exception.Create(SysErrorMessage(i));
+       end;
+      finally
+        SysFreeString(ExceptInfo.bstrSource);
+        SysFreeString(ExceptInfo.bstrDescription);
+        SysFreeString(ExceptInfo.bstrHelpFile);
+      end;
+      {$ELSE}
+       if not Succeeded(i) then
+       begin
+         if i = DISP_E_EXCEPTION then
+           raise Exception.Create(ExceptInfo.bstrSource+': '+ExceptInfo.bstrDescription)
+         else
+           raise Exception.Create(SysErrorMessage(i));
+       end;
+      {$ENDIF}
+    finally
+      for i := 0 to High(Par)  do
+      begin
+        if DispParam.rgvarg[i].vt = (VT_VARIANT or VT_BYREF) then
+        begin
+          if{$IFDEF DELPHI4UP}POleVariant{$ELSE}PVariant{$ENDIF}
+            (DispParam.rgvarg[i].pvarVal) <> nil then
+            Dispose(
+            {$IFDEF DELPHI4UP}
+             POleVariant
+            {$ELSE}
+             PVariant
+            {$ENDIF}
+             (DispParam.rgvarg[i].pvarVal));
+        end;
+      end;
+      FreeMem(DispParam.rgvarg, sizeof(TVariantArg) * (High(Par) + 1));
+    end;
+  finally
+    for i := WSFreeList.Count -1 downto 0 do
+      SysFreeString(WSFreeList[i]);
+    WSFreeList.Free;
+  end;
+end;
+{$ENDIF}
+
+
+{ TPSTypeRec_ProcPtr }
+
+procedure TPSTypeRec_ProcPtr.CalcSize;
+begin
+  FRealSize := 12;
+end;
+
+end.
+
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSUtils.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSUtils.pas
new file mode 100644
index 0000000..76ffb55
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uPSUtils.pas	
@@ -0,0 +1,1545 @@
+unit uPSUtils;
+{$I PascalScript.inc}
+
+interface
+uses
+  Classes, SysUtils;
+
+const
+
+  PSMainProcName = '!MAIN';
+
+  PSMainProcNameOrg = 'Main Proc';
+
+  PSLowBuildSupport = 12;
+
+  PSCurrentBuildNo = 23;
+
+  PSCurrentversion = '1.31';
+
+  PSValidHeader = 1397769801;
+
+  PSAddrStackStart = 1610612736;
+
+  PSAddrNegativeStackStart = 1073741824;
+type
+  TbtString = {$IFDEF DELPHI2009UP}AnsiString{$ELSE}String{$ENDIF};
+
+  TPSBaseType = Byte;
+
+  TPSVariableType = (ivtGlobal, ivtParam, ivtVariable);
+
+const
+
+  btReturnAddress   = 0;
+
+  btU8              = 1;
+
+  btS8              = 2;
+
+  btU16             = 3;
+
+  btS16             = 4;
+
+  btU32             = 5;
+
+  btS32             = 6;
+
+  btSingle          = 7;
+
+  btDouble          = 8;
+
+  btExtended        = 9;
+
+  btString          = 10;
+
+  btRecord          = 11;
+
+  btArray           = 12;
+
+  btPointer         = 13;
+
+  btPChar           = 14;
+
+  btResourcePointer = 15;
+
+  btVariant         = 16;
+
+{$IFNDEF PS_NOINT64}
+  btS64             = 17;
+{$ENDIF}
+
+  btChar            = 18;
+
+{$IFNDEF PS_NOWIDESTRING}
+  btWideString      = 19;
+
+  btWideChar        = 20;
+{$ENDIF}
+
+  btProcPtr         = 21;
+
+  btStaticArray     = 22;
+
+  btSet             = 23;
+
+  btCurrency        = 24;
+
+  btClass           = 25;
+
+  btInterface       = 26;
+
+  btNotificationVariant = 27;
+
+  btType = 130;
+
+  btEnum = 129;
+
+  btExtClass = 131;
+
+function MakeHash(const s:  TbtString): Longint;
+
+const
+{ Script internal command: Assign command<br>
+    Command: TPSCommand;<br>
+    VarDest, // no data<br>
+    VarSrc: TPSVariable;<br>
+}
+  CM_A = 0;
+{ Script internal command: Calculate Command<br>
+    Command: TPSCommand; <br>
+    CalcType: Byte;<br>
+    <i><br>
+      0 = +<br>
+      1 = -<br>
+      2 = *<br>
+      3 = /<br>
+      4 = MOD<br>
+      5 = SHL<br>
+      6 = SHR<br>
+      7 = AND<br>
+      8 = OR<br>
+      9 = XOR<br>
+    </i><br>
+    VarDest, // no data<br>
+    VarSrc: TPSVariable;<br>
+<br>
+}
+  CM_CA = 1;
+{ Script internal command: Push<br>
+    Command: TPSCommand; <br>
+    Var: TPSVariable;<br>
+}
+  CM_P = 2;
+{ Script internal command: Push Var<br>
+    Command: TPSCommand; <br>
+    Var: TPSVariable;<br>
+}
+  CM_PV = 3;
+{ Script internal command: Pop<br>
+    Command: TPSCommand; <br>
+}
+  CM_PO = 4;
+{ Script internal command: Call<br>
+    Command: TPSCommand; <br>
+    ProcNo: Longword;<br>
+}
+  Cm_C = 5;
+{ Script internal command: Goto<br>
+    Command: TPSCommand; <br>
+    NewPosition: Longint; //relative to end of this instruction<br>
+}
+  Cm_G = 6;
+{ Script internal command: Conditional Goto<br>
+    Command: TPSCommand; <br>
+    NewPosition: LongWord; //relative to end of this instruction<br>
+    Var: TPSVariable; // no data<br>
+}
+  Cm_CG = 7;
+{ Script internal command: Conditional NOT Goto<br>
+    Command: TPSCommand; <br>
+    NewPosition: LongWord; // relative to end of this instruction<br>
+    Var: TPSVariable; // no data<br>
+}
+  Cm_CNG = 8;
+{ Script internal command: Ret<br>
+    Command: TPSCommand; <br>
+}
+  Cm_R = 9;
+{ Script internal command: Set Stack Type<br>
+    Command: TPSCommand; <br>
+    NewType: LongWord;<br>
+    OffsetFromBase: LongWord;<br>
+}
+  Cm_ST = 10;
+{ Script internal command: Push Type<br>
+    Command: TPSCommand; <br>
+    FType: LongWord;<br>
+}
+  Cm_Pt = 11;
+{ Script internal command: Compare<br>
+    Command: TPSCommand; <br>
+    CompareType: Byte;<br>
+    <i><br>
+     0 = &gt;=<br>
+     1 = &lt;=<br>
+     2 = &gt;<br>
+     3 = &lt;<br>
+     4 = &lt;&gt<br>
+     5 = =<br>
+    <i><br>
+    IntoVar: TPSAssignment;<br>
+    Compare1, Compare2: TPSAssigment;<br>
+}
+  CM_CO = 12;
+{ Script internal command: Call Var<br>
+    Command: TPSCommand; <br>
+    Var: TPSVariable;<br>
+}
+  Cm_cv = 13;
+{ Script internal command: Set Pointer<br>
+    Command: TPSCommand; <br>
+    VarDest: TPSVariable;<br>
+    VarSrc: TPSVariable;<br>
+}
+  cm_sp = 14;
+{ Script internal command: Boolean NOT<br>
+    Command: TPSCommand; <br>
+    Var: TPSVariable;<br>
+}
+  cm_bn = 15;
+{ Script internal command: Var Minus<br>
+    Command: TPSCommand; <br>
+    Var: TPSVariable;
+}
+  cm_vm = 16;
+{ Script internal command: Set Flag<br>
+    Command: TPSCommand; <br>
+    Var: TPSVariable;<br>
+    DoNot: Boolean;<br>
+}
+  cm_sf = 17;
+{ Script internal command: Flag Goto<br>
+    Command: TPSCommand; <br>
+    Where: Cardinal;<br>
+}
+  cm_fg = 18;
+{ Script internal command: Push Exception Handler<br>
+    Command: TPSCommand; <br>
+    FinallyOffset,<br>
+    ExceptionOffset, // FinallyOffset or ExceptionOffset need to be set.<br>
+    Finally2Offset,<br>
+    EndOfBlock: Cardinal;<br>
+}
+  cm_puexh = 19;
+{ Script internal command: Pop Exception Handler<br>
+    Command:TPSCommand; <br>
+    Position: Byte;<br>
+    <i> 0 = end of try/finally/exception block;<br>
+      1 = end of first finally<br>
+      2 = end of except<br>
+      3 = end of second finally<br>
+    </i><br>
+}
+  cm_poexh = 20;
+{ Script internal command: Integer NOT<br>
+    Command: TPSCommand; <br>
+    Where: Cardinal;<br>
+}
+  cm_in = 21;
+  {Script internal command: Set Stack Pointer To Copy<br>
+      Command: TPSCommand; <br>
+    Where: Cardinal;<br>
+}
+  cm_spc = 22;
+  {Script internal command: Inc<br>
+    Command: TPSCommand; <br>
+    Var: TPSVariable;<br>
+  }
+  cm_inc = 23;
+  {Script internal command: Dec<br>
+      Command: TPSCommand; <br>
+    Var: TPSVariable;<br>
+  }
+  cm_dec = 24;
+  {Script internal command: nop<br>
+      Command: TPSCommand; <br>}
+  cm_nop = 255;
+{ Script internal command: Pop and Goto<br>
+    Command: TPSCommand; <br>
+    NewPosition: Longint; //relative to end of this instruction<br>
+}
+  Cm_PG = 25;
+{ Script internal command: Pop*2 and Goto<br>
+    Command: TPSCommand; <br>
+    NewPosition: Longint; //relative to end of this instruction<br>
+}
+  Cm_P2G = 26;
+
+
+type
+
+  TbtU8 = Byte;
+
+  TbtS8 = ShortInt;
+
+  TbtU16 = Word;
+
+  TbtS16 = SmallInt;
+
+  TbtU32 = Cardinal;
+
+  TbtS32 = Longint;
+
+  TbtSingle = Single;
+
+  TbtDouble = double;
+
+  TbtExtended = Extended;
+
+  tbtCurrency = Currency;
+
+{$IFNDEF PS_NOINT64}
+
+  tbts64 = int64;
+{$ENDIF}
+
+  tbtchar = {$IFDEF DELPHI4UP}AnsiChar{$ELSE}CHAR{$ENDIF};
+{$IFNDEF PS_NOWIDESTRING}
+
+  tbtwidestring = {$IFDEF DELPHI2009UP}UnicodeString{$ELSE}widestring{$ENDIF};
+
+  tbtwidechar = widechar;
+  tbtNativeString = {$IFDEF DELPHI2009UP}tbtWideString{$ELSE}tbtString{$ENDIF};
+{$ENDIF}
+  IPointer = Cardinal;
+  TPSCallingConvention = (cdRegister, cdPascal, cdCdecl, cdStdCall, cdSafeCall);
+
+
+const
+
+  MaxListSize = Maxint div 16;
+
+type
+
+  PPointerList = ^TPointerList;
+
+  TPointerList = array[0..MaxListSize - 1] of Pointer;
+
+
+  TPSList = class(TObject)
+  protected
+
+    FData: PPointerList;
+
+    FCapacity: Cardinal;
+
+    FCount: Cardinal;
+
+    FCheckCount: Cardinal;
+  private
+    function GetItem(Nr: Cardinal): Pointer;
+    procedure SetItem(Nr: Cardinal; P: Pointer);
+  public
+    {$IFNDEF PS_NOSMARTLIST}
+
+    procedure Recreate;
+    {$ENDIF}
+
+    property Data: PPointerList read FData;
+
+    constructor Create;
+
+    function IndexOf(P: Pointer): Longint;
+
+    destructor Destroy; override;
+
+    property Count: Cardinal read FCount;
+
+    property Items[nr: Cardinal]: Pointer read GetItem write SetItem; default;
+
+    function Add(P: Pointer): Longint;
+
+    procedure AddBlock(List: PPointerList; Count: Longint);
+
+    procedure Remove(P: Pointer);
+
+    procedure Delete(Nr: Cardinal);
+
+    procedure DeleteLast;
+
+    procedure Clear; virtual;
+  end;
+  TIFList = TPSList;
+
+  TPSStringList = class(TObject)
+  private
+    List: TPSList;
+    function GetItem(Nr: LongInt): TbtString;
+    procedure SetItem(Nr: LongInt; const s: TbtString);
+  public
+
+    function Count: LongInt;
+
+    property Items[Nr: Longint]: TbtString read GetItem write SetItem; default;
+
+
+    procedure Add(const P: TbtString);
+
+    procedure Delete(NR: LongInt);
+
+    procedure Clear;
+
+    constructor Create;
+
+    destructor Destroy; override;
+  end;
+  TIFStringList = TPsStringList;
+
+
+type
+
+  TPSPasToken = (
+    CSTI_EOF,
+
+    CSTIINT_Comment,
+    CSTIINT_WhiteSpace,
+
+    CSTI_Identifier,
+    CSTI_SemiColon,
+    CSTI_Comma,
+    CSTI_Period,
+    CSTI_Colon,
+    CSTI_OpenRound,
+    CSTI_CloseRound,
+    CSTI_OpenBlock,
+    CSTI_CloseBlock,
+    CSTI_Assignment,
+    CSTI_Equal,
+    CSTI_NotEqual,
+    CSTI_Greater,
+    CSTI_GreaterEqual,
+    CSTI_Less,
+    CSTI_LessEqual,
+    CSTI_Plus,
+    CSTI_Minus,
+    CSTI_Divide,
+    CSTI_Multiply,
+    CSTI_Integer,
+    CSTI_Real,
+    CSTI_String,
+    CSTI_Char,
+    CSTI_HexInt,
+    CSTI_AddressOf,
+    CSTI_Dereference,
+    CSTI_TwoDots,
+
+    CSTII_and,
+    CSTII_array,
+    CSTII_begin,
+    CSTII_case,
+    CSTII_const,
+    CSTII_div,
+    CSTII_do,
+    CSTII_downto,
+    CSTII_else,
+    CSTII_end,
+    CSTII_for,
+    CSTII_function,
+    CSTII_if,
+    CSTII_in,
+    CSTII_mod,
+    CSTII_not,
+    CSTII_of,
+    CSTII_or,
+    CSTII_procedure,
+    CSTII_program,
+    CSTII_repeat,
+    CSTII_record,
+    CSTII_set,
+    CSTII_shl,
+    CSTII_shr,
+    CSTII_then,
+    CSTII_to,
+    CSTII_type,
+    CSTII_until,
+    CSTII_uses,
+    CSTII_var,
+    CSTII_while,
+    CSTII_with,
+    CSTII_xor,
+    CSTII_exit,
+    CSTII_class,
+    CSTII_constructor,
+    CSTII_destructor,
+    CSTII_inherited,
+    CSTII_private,
+    CSTII_public,
+    CSTII_published,
+    CSTII_protected,
+    CSTII_property,
+    CSTII_virtual,
+    CSTII_override,
+    //CSTII_default, //Birb
+    CSTII_As,
+    CSTII_Is,
+    CSTII_Unit,
+    CSTII_Try,
+    CSTII_Except,
+    CSTII_Finally,
+    CSTII_External,
+    CSTII_Forward,
+    CSTII_Export,
+    CSTII_Label,
+    CSTII_Goto,
+    CSTII_Chr,
+    CSTII_Ord,
+    CSTII_Interface,
+    CSTII_Implementation,
+    CSTII_initialization,            //* Nvds
+    CSTII_finalization,              //* Nvds
+    CSTII_out,
+    CSTII_nil
+    );
+
+  TPSParserErrorKind = (iNoError
+  , iCommentError
+  , iStringError
+  , iCharError
+  , iSyntaxError
+  );
+  TPSParserErrorEvent = procedure (Parser: TObject; Kind: TPSParserErrorKind) of object;
+
+
+  TPSPascalParser = class(TObject)
+  protected
+    FData: TbtString;
+    FText: {$IFDEF DELPHI4UP}PAnsiChar{$ELSE}PChar{$ENDIF};
+    FLastEnterPos, FRow, FRealPosition, FTokenLength: Cardinal;
+    FTokenId: TPSPasToken;
+    FToken: TbtString;
+    FOriginalToken: TbtString;
+    FParserError: TPSParserErrorEvent;
+    FEnableComments: Boolean;
+    FEnableWhitespaces: Boolean;
+    function GetCol: Cardinal;
+    // only applicable when Token in [CSTI_Identifier, CSTI_Integer, CSTI_Real, CSTI_String, CSTI_Char, CSTI_HexInt]
+  public
+
+    property EnableComments: Boolean read FEnableComments write FEnableComments;
+
+    property EnableWhitespaces: Boolean read FEnableWhitespaces write FEnableWhitespaces;
+
+    procedure Next; virtual;
+
+    property GetToken: TbtString read FToken;
+
+    property OriginalToken: TbtString read FOriginalToken;
+
+    property CurrTokenPos: Cardinal read FRealPosition;
+
+    property CurrTokenID: TPSPasToken read FTokenId;
+
+    property Row: Cardinal read FRow;
+
+    property Col: Cardinal read GetCol;
+
+    procedure SetText(const Data: TbtString); virtual;
+
+    property OnParserError: TPSParserErrorEvent read FParserError write FParserError;
+  end;
+
+function FloatToStr(E: Extended): TbtString;
+
+function FastLowerCase(const s: TbtString): TbtString;
+
+function Fw(const S: TbtString): TbtString;
+
+function IntToStr(I: LongInt): TbtString;
+
+function StrToIntDef(const S: TbtString; Def: LongInt): LongInt;
+
+function StrToInt(const S: TbtString): LongInt;
+function StrToFloat(const s: TbtString): Extended;
+
+function FastUpperCase(const s: TbtString): TbtString;
+
+function GRFW(var s: TbtString): TbtString;
+function GRLW(var s: TbtString): TbtString;
+
+const
+
+  FCapacityInc = 32;
+{$IFNDEF PS_NOSMARTLIST}
+
+  FMaxCheckCount = (FCapacityInc div 4) * 64;
+{$ENDIF}
+
+
+implementation
+
+{$IFDEF DELPHI3UP }
+resourceString
+{$ELSE }
+const
+{$ENDIF }
+  RPS_InvalidFloat = 'Invalid float';
+
+function MakeHash(const s: TbtString): Longint;
+{small hash maker}
+var
+  I: Integer;
+begin
+  Result := 0;
+  for I := 1 to Length(s) do
+    Result := ((Result shl 7) or (Result shr 25)) + Ord(s[I]);
+end;
+
+function GRFW(var s: TbtString): TbtString;
+var
+  l: Longint;
+begin
+  l := 1;
+  while l <= Length(s) do
+  begin
+    if s[l] = ' ' then
+    begin
+      Result := copy(s, 1, l - 1);
+      Delete(s, 1, l);
+      exit;
+    end;
+    l := l + 1;
+  end;
+  Result := s;
+  s := '';
+end;
+
+function GRLW(var s: TbtString): TbtString;
+var
+  l: Longint;
+begin
+  l := Length(s);
+  while l >= 1 do
+  begin
+    if s[l] = ' ' then
+    begin
+      Result := copy(s, l+1, MaxInt);
+      Delete(s, l, MaxInt);
+      exit;
+    end;
+    Dec(l);
+  end;
+  Result := s;
+  s := '';
+end;
+
+function StrToFloat(const s: TbtString): Extended;
+var
+  i: longint;
+begin
+  Val(string(s), Result, i);
+  if i <> 0 then raise Exception.Create(RPS_InvalidFloat);
+end;
+//-------------------------------------------------------------------
+
+function IntToStr(I: LongInt): TbtString;
+var
+  s: tbtstring;
+begin
+  Str(i, s);
+  IntToStr := s;
+end;
+//-------------------------------------------------------------------
+
+function FloatToStr(E: Extended): TbtString;
+var
+  s: tbtstring;
+begin
+  Str(e:0:12, s);
+  result := s;
+end;
+
+function StrToInt(const S: TbtString): LongInt;
+var
+  e: Integer;
+  Res: LongInt;
+begin
+  Val(string(S), Res, e);
+  if e <> 0 then
+    StrToInt := -1
+  else
+    StrToInt := Res;
+end;
+//-------------------------------------------------------------------
+
+function StrToIntDef(const S: TbtString; Def: LongInt): LongInt;
+var
+  e: Integer;
+  Res: LongInt;
+begin
+  Val(string(S), Res, e);
+  if e <> 0 then
+    StrToIntDef := Def
+  else
+    StrToIntDef := Res;
+end;
+//-------------------------------------------------------------------
+
+constructor TPSList.Create;
+begin
+  inherited Create;
+  FCount := 0;
+  FCapacity := 16;
+  {$IFNDEF PS_NOSMARTLIST}
+  FCheckCount := 0;
+  {$ENDIF}
+  GetMem(FData, 64);
+end;
+
+
+function MM(i1,i2: Integer): Integer;
+begin
+  if ((i1 div i2) * i2) < i1 then
+    mm := (i1 div i2 + 1) * i2
+  else
+    mm := (i1 div i2) * i2;
+end;
+
+{$IFNDEF PS_NOSMARTLIST}
+procedure TPSList.Recreate;
+var
+  NewData: PPointerList;
+  NewCapacity: Cardinal;
+  I: Longint;
+
+begin
+
+  FCheckCount := 0;
+  NewCapacity := mm(FCount, FCapacityInc);
+  if NewCapacity < 64 then NewCapacity := 64;
+  GetMem(NewData, NewCapacity * 4);
+  for I := 0 to Longint(FCount) -1 do
+  begin
+    NewData^[i] := FData^[I];
+  end;
+  FreeMem(FData, FCapacity * 4);
+  FData := NewData;
+  FCapacity := NewCapacity;
+end;
+{$ENDIF}
+
+//-------------------------------------------------------------------
+
+function TPSList.Add(P: Pointer): Longint;
+begin
+  if FCount >= FCapacity then
+  begin
+    Inc(FCapacity, FCapacityInc);// := FCount + 1;
+    ReAllocMem(FData, FCapacity shl 2);
+  end;
+  FData[FCount] := P; // Instead of SetItem
+  Result := FCount;
+  Inc(FCount);
+{$IFNDEF PS_NOSMARTLIST}
+  Inc(FCheckCount);
+  if FCheckCount > FMaxCheckCount then Recreate;
+{$ENDIF}
+end;
+
+procedure TPSList.AddBlock(List: PPointerList; Count: Longint);
+var
+  L: Longint;
+
+begin
+  if Longint(FCount) + Count > Longint(FCapacity) then
+  begin
+    Inc(FCapacity, mm(Count, FCapacityInc));
+    ReAllocMem(FData, FCapacity shl 2);
+  end;
+  for L := 0 to Count -1 do
+  begin
+    FData^[FCount] := List^[L];
+    Inc(FCount);
+  end;
+{$IFNDEF PS_NOSMARTLIST}
+  Inc(FCheckCount);
+  if FCheckCount > FMaxCheckCount then Recreate;
+{$ENDIF}
+end;
+
+
+//-------------------------------------------------------------------
+
+procedure TPSList.DeleteLast;
+begin
+  if FCount = 0 then Exit;
+  Dec(FCount);
+{$IFNDEF PS_NOSMARTLIST}
+    Inc(FCheckCount);
+    if FCheckCount > FMaxCheckCount then Recreate;
+{$ENDIF}
+end;
+
+
+
+procedure TPSList.Delete(Nr: Cardinal);
+begin
+  if FCount = 0 then Exit;
+  if Nr < FCount then
+  begin
+    Move(FData[Nr + 1], FData[Nr], (FCount - Nr) * 4);
+    Dec(FCount);
+{$IFNDEF PS_NOSMARTLIST}
+    Inc(FCheckCount);
+    if FCheckCount > FMaxCheckCount then Recreate;
+{$ENDIF}
+  end;
+end;
+//-------------------------------------------------------------------
+
+procedure TPSList.Remove(P: Pointer);
+var
+  I: Cardinal;
+begin
+  if FCount = 0 then Exit;
+  I := 0;
+  while I < FCount do
+  begin
+    if FData[I] = P then
+    begin
+      Delete(I);
+      Exit;
+    end;
+    Inc(I);
+  end;
+end;
+//-------------------------------------------------------------------
+
+procedure TPSList.Clear;
+begin
+  FCount := 0;
+{$IFNDEF PS_NOSMARTLIST}
+  Recreate;
+{$ENDIF}
+end;
+//-------------------------------------------------------------------
+
+destructor TPSList.Destroy;
+begin
+  FreeMem(FData, FCapacity * 4);
+  inherited Destroy;
+end;
+//-------------------------------------------------------------------
+
+procedure TPSList.SetItem(Nr: Cardinal; P: Pointer);
+begin
+  if (FCount = 0) or (Nr >= FCount) then
+    Exit;
+  FData[Nr] := P;
+end;
+//-------------------------------------------------------------------
+
+function TPSList.GetItem(Nr: Cardinal): Pointer;  {12}
+begin
+  if Nr < FCount then
+     GetItem := FData[Nr]
+  else
+    GetItem := nil;
+end;
+
+
+
+//-------------------------------------------------------------------
+
+function TPSStringList.Count: LongInt;
+begin
+  count := List.count;
+end;
+type pStr = ^TbtString;
+
+//-------------------------------------------------------------------
+
+function TPSStringList.GetItem(Nr: LongInt): TbtString;
+var
+  S: PStr;
+begin
+  s := List.GetItem(Nr);
+  if s = nil then
+    Result := ''
+  else
+
+    Result := s^;
+end;
+//-------------------------------------------------------------------
+
+
+procedure TPSStringList.SetItem(Nr: LongInt; const s: TbtString);
+var
+  p: PStr;
+begin
+  p := List.GetItem(Nr);
+  if p = nil
+    then
+    Exit;
+  p^ := s;
+end;
+//-------------------------------------------------------------------
+
+procedure TPSStringList.Add(const P: TbtString);
+var
+  w: PStr;
+begin
+  new(w);
+  w^ := p;
+  List.Add(w);
+end;
+//-------------------------------------------------------------------
+
+procedure TPSStringList.Delete(NR: LongInt);
+var
+  W: PStr;
+begin
+  W := list.getitem(nr);
+  if w<>nil then
+  begin
+    dispose(w);
+  end;
+  list.Delete(Nr);
+end;
+
+procedure TPSStringList.Clear;
+begin
+  while List.Count > 0 do Delete(0);
+end;
+
+constructor TPSStringList.Create;
+begin
+  inherited Create;
+  List := TPSList.Create;
+end;
+
+destructor TPSStringList.Destroy;
+begin
+  while List.Count > 0 do
+    Delete(0);
+  List.Destroy;
+  inherited Destroy;
+end;
+
+//-------------------------------------------------------------------
+
+
+function Fw(const S: TbtString): TbtString; //  First word
+var
+  x: integer;
+begin
+  x := pos(tbtstring(' '), s);
+  if x > 0
+    then Fw := Copy(S, 1, x - 1)
+  else Fw := S;
+end;
+//-------------------------------------------------------------------
+function FastUpperCase(const s: TbtString): TbtString;
+{Fast uppercase}
+var
+  I: Integer;
+  C: tbtChar;
+begin
+  Result := S;
+  I := Length(Result);
+  while I > 0 do
+  begin
+    C := Result[I];
+    if c in [#97..#122] then
+      Result[I] := tbtchar(Ord(Result[I]) -32);
+    Dec(I);
+  end;
+end;
+function FastLowerCase(const s: TbtString): TbtString;
+{Fast lowercase}
+var
+  I: Integer;
+  C: tbtChar;
+begin
+  Result := S;
+  I := Length(Result);
+  while I > 0 do
+  begin
+    C := Result[I];
+    if C in [#65..#90] then
+      Result[I] := tbtchar(Ord(Result[I]) + 32);
+    Dec(I);
+  end;
+end;
+//-------------------------------------------------------------------
+
+type
+  TRTab = record
+    name: TbtString;
+    c: TPSPasToken;
+  end;
+
+
+const
+  KEYWORD_COUNT = 65;  //*NVDS
+  LookupTable: array[0..KEYWORD_COUNT - 1] of TRTab = (
+      (name: 'AND'; c: CSTII_and),
+      (name: 'ARRAY'; c: CSTII_array),
+      (name: 'AS'; c: CSTII_as),
+      (name: 'BEGIN'; c: CSTII_begin),
+      (name: 'CASE'; c: CSTII_case),
+      (name: 'CHR'; c: CSTII_chr),
+      (name: 'CLASS'; c: CSTII_class),
+      (name: 'CONST'; c: CSTII_const),
+      (name: 'CONSTRUCTOR'; c: CSTII_constructor),
+      (name: 'DESTRUCTOR'; c: CSTII_destructor),
+      (name: 'DIV'; c: CSTII_div),
+      (name: 'DO'; c: CSTII_do),
+      (name: 'DOWNTO'; c: CSTII_downto),
+      (name: 'ELSE'; c: CSTII_else),
+      (name: 'END'; c: CSTII_end),
+      (name: 'EXCEPT'; c: CSTII_except),
+      (name: 'EXIT'; c: CSTII_exit),
+      (name: 'EXPORT'; c: CSTII_Export),
+      (name: 'EXTERNAL'; c: CSTII_External),
+      (Name: 'FINALIZATION'; c : CSTII_finalization),//* Nvds
+      (name: 'FINALLY'; c: CSTII_finally),
+      (name: 'FOR'; c: CSTII_for),
+      (name: 'FORWARD'; c: CSTII_Forward),
+      (name: 'FUNCTION'; c: CSTII_function),
+      (name: 'GOTO'; c: CSTII_Goto),
+      (name: 'IF'; c: CSTII_if),
+      (name: 'IMPLEMENTATION'; c: CSTII_Implementation),
+      (name: 'IN'; c: CSTII_in),
+      (name: 'INHERITED'; c: CSTII_inherited),
+      (Name: 'INITIALIZATION'; c: CSTII_initialization), //* Nvds
+      (name: 'INTERFACE'; c: CSTII_Interface),
+      (name: 'IS'; c: CSTII_is),
+      (name: 'LABEL'; c: CSTII_Label),
+      (name: 'MOD'; c: CSTII_mod),
+      (name: 'NIL'; c: CSTII_nil),
+      (name: 'NOT'; c: CSTII_not),
+      (name: 'OF'; c: CSTII_of),
+      (name: 'OR'; c: CSTII_or),
+      (name: 'ORD'; c: CSTII_ord),
+      (name: 'OUT'; c: CSTII_Out),
+      (name: 'OVERRIDE'; c: CSTII_override),
+      //(name: 'DEFAULT'; c: CSTII_default), //Birb (if added, don't forget to increase KEYWORD_COUNT)
+      (name: 'PRIVATE'; c: CSTII_private),
+      (name: 'PROCEDURE'; c: CSTII_procedure),
+      (name: 'PROGRAM'; c: CSTII_program),
+      (name: 'PROPERTY'; c: CSTII_property),
+      (name: 'PROTECTED'; c: CSTII_protected),
+      (name: 'PUBLIC'; c: CSTII_public),
+      (name: 'PUBLISHED'; c: CSTII_published),
+      (name: 'RECORD'; c: CSTII_record),
+      (name: 'REPEAT'; c: CSTII_repeat),
+      (name: 'SET'; c: CSTII_set),
+      (name: 'SHL'; c: CSTII_shl),
+      (name: 'SHR'; c: CSTII_shr),
+      (name: 'THEN'; c: CSTII_then),
+      (name: 'TO'; c: CSTII_to),
+      (name: 'TRY'; c: CSTII_try),
+      (name: 'TYPE'; c: CSTII_type),
+      (name: 'UNIT'; c: CSTII_Unit),
+      (name: 'UNTIL'; c: CSTII_until),
+      (name: 'USES'; c: CSTII_uses),
+      (name: 'VAR'; c: CSTII_var),
+      (name: 'VIRTUAL'; c: CSTII_virtual),
+      (name: 'WHILE'; c: CSTII_while),
+      (name: 'WITH'; c: CSTII_with),
+      (name: 'XOR'; c: CSTII_xor));
+
+function TPSPascalParser.GetCol: Cardinal;
+begin
+  Result := FRealPosition - FLastEnterPos + 1;
+end;
+
+procedure TPSPascalParser.Next;
+var
+  Err: TPSParserErrorKind;
+  FLastUpToken: TbtString;
+  function CheckReserved(Const S: ShortString; var CurrTokenId: TPSPasToken): Boolean;
+  var
+    L, H, I: LongInt;
+    J: tbtChar;
+    SName: ShortString;
+  begin
+    L := 0;
+    J := S[0];
+    H := KEYWORD_COUNT-1;
+    while L <= H do
+    begin
+      I := (L + H) shr 1;
+      SName := LookupTable[i].Name;
+      if J = SName[0] then
+      begin
+        if S = SName then
+        begin
+          CheckReserved := True;
+          CurrTokenId := LookupTable[I].c;
+          Exit;
+        end;
+        if S > SName then
+          L := I + 1
+        else
+          H := I - 1;
+      end else
+        if S > SName then
+          L := I + 1
+        else
+          H := I - 1;
+    end;
+    CheckReserved := False;
+  end;
+  //-------------------------------------------------------------------
+
+  function _GetToken(CurrTokenPos, CurrTokenLen: Cardinal): TbtString;
+  var
+    s: tbtString;
+  begin
+    SetLength(s, CurrTokenLen);
+    Move(FText[CurrTokenPos], S[1], CurrtokenLen);
+    Result := s;
+  end;
+
+  function ParseToken(var CurrTokenPos, CurrTokenLen: Cardinal; var CurrTokenId: TPSPasToken): TPSParserErrorKind;
+  {Parse the token}
+  var
+    ct, ci: Cardinal;
+    hs: Boolean;
+    p: {$IFDEF DELPHI4UP}PAnsiChar{$ELSE}PChar{$ENDIF};
+  begin
+    ParseToken := iNoError;
+    ct := CurrTokenPos;
+    case FText[ct] of
+      #0:
+        begin
+          CurrTokenId := CSTI_EOF;
+          CurrTokenLen := 0;
+        end;
+      'A'..'Z', 'a'..'z', '_':
+        begin
+          ci := ct + 1;
+          while (FText[ci] in ['_', '0'..'9', 'a'..'z', 'A'..'Z']) do begin
+            Inc(ci);
+          end;
+          CurrTokenLen := ci - ct;
+
+          FLastUpToken := _GetToken(CurrTokenPos, CurrtokenLen);
+          p := {$IFDEF DELPHI4UP}PAnsiChar{$ELSE}pchar{$ENDIF}(FLastUpToken);
+          while p^<>#0 do
+          begin
+            if p^ in [#97..#122] then
+              Dec(Byte(p^), 32);
+            inc(p);
+          end;
+          if not CheckReserved(FLastUpToken, CurrTokenId) then
+          begin
+            CurrTokenId := CSTI_Identifier;
+          end;
+        end;
+      '$':
+        begin
+          ci := ct + 1;
+
+          while (FText[ci] in ['0'..'9', 'a'..'f', 'A'..'F'])
+            do Inc(ci);
+
+          CurrTokenId := CSTI_HexInt;
+          CurrTokenLen := ci - ct;
+        end;
+
+      '0'..'9':
+        begin
+          hs := False;
+          ci := ct;
+          while (FText[ci] in ['0'..'9']) do
+          begin
+            Inc(ci);
+            if (FText[ci] = '.') and (not hs) then
+            begin
+              if FText[ci+1] = '.' then break;
+              hs := True;
+              Inc(ci);
+            end;
+          end;
+          if (FText[ci] in ['E','e']) and ((FText[ci+1] in ['0'..'9'])
+            or ((FText[ci+1] in ['+','-']) and (FText[ci+2] in ['0'..'9']))) then
+          begin
+            hs := True;
+            Inc(ci);
+            if FText[ci] in ['+','-'] then
+              Inc(ci);
+            repeat
+              Inc(ci);
+            until not (FText[ci] in ['0'..'9']);
+          end;
+
+          if hs
+            then CurrTokenId := CSTI_Real
+          else CurrTokenId := CSTI_Integer;
+
+          CurrTokenLen := ci - ct;
+        end;
+
+
+      #39:
+        begin
+          ci := ct + 1;
+          while true do
+          begin
+            if (FText[ci] = #0) or (FText[ci] = #13) or (FText[ci] = #10) then Break;
+            if (FText[ci] = #39) then
+            begin
+              if FText[ci+1] = #39 then
+                Inc(ci)
+              else
+                Break;
+            end;
+            Inc(ci);
+          end;
+          if FText[ci] = #39 then
+            CurrTokenId := CSTI_String
+          else
+          begin
+            CurrTokenId := CSTI_String;
+            ParseToken := iStringError;
+          end;
+          CurrTokenLen := ci - ct + 1;
+        end;
+      '#':
+        begin
+          ci := ct + 1;
+          if FText[ci] = '$' then
+          begin
+            inc(ci);
+            while (FText[ci] in ['A'..'F', 'a'..'f', '0'..'9']) do begin
+              Inc(ci);
+            end;
+            CurrTokenId := CSTI_Char;
+            CurrTokenLen := ci - ct;
+          end else
+          begin
+            while (FText[ci] in ['0'..'9']) do begin
+              Inc(ci);
+            end;
+            if FText[ci] in ['A'..'Z', 'a'..'z', '_'] then
+            begin
+              ParseToken := iCharError;
+              CurrTokenId := CSTI_Char;
+            end else
+              CurrTokenId := CSTI_Char;
+            CurrTokenLen := ci - ct;
+          end;
+        end;
+      '=':
+        begin
+          CurrTokenId := CSTI_Equal;
+          CurrTokenLen := 1;
+        end;
+      '>':
+        begin
+          if FText[ct + 1] = '=' then
+          begin
+            CurrTokenid := CSTI_GreaterEqual;
+            CurrTokenLen := 2;
+          end else
+          begin
+            CurrTokenid := CSTI_Greater;
+            CurrTokenLen := 1;
+          end;
+        end;
+      '<':
+        begin
+          if FText[ct + 1] = '=' then
+          begin
+            CurrTokenId := CSTI_LessEqual;
+            CurrTokenLen := 2;
+          end else
+            if FText[ct + 1] = '>' then
+            begin
+              CurrTokenId := CSTI_NotEqual;
+              CurrTokenLen := 2;
+            end else
+            begin
+              CurrTokenId := CSTI_Less;
+              CurrTokenLen := 1;
+            end;
+        end;
+      ')':
+        begin
+          CurrTokenId := CSTI_CloseRound;
+          CurrTokenLen := 1;
+        end;
+      '(':
+        begin
+          if FText[ct + 1] = '*' then
+          begin
+            ci := ct + 1;
+            while (FText[ci] <> #0) do begin
+              if (FText[ci] = '*') and (FText[ci + 1] = ')') then
+                Break;
+              if FText[ci] = #13 then
+              begin
+                inc(FRow);
+                if FText[ci+1] = #10 then
+                  inc(ci);
+                FLastEnterPos := ci +1;
+              end else if FText[ci] = #10 then
+              begin
+                inc(FRow);
+                FLastEnterPos := ci +1;
+              end;
+              Inc(ci);
+            end;
+            if (FText[ci] = #0) then
+            begin
+              CurrTokenId := CSTIINT_Comment;
+              ParseToken := iCommentError;
+            end else
+            begin
+              CurrTokenId := CSTIINT_Comment;
+              Inc(ci, 2);
+            end;
+            CurrTokenLen := ci - ct;
+          end
+          else
+          begin
+            CurrTokenId := CSTI_OpenRound;
+            CurrTokenLen := 1;
+          end;
+        end;
+      '[':
+        begin
+          CurrTokenId := CSTI_OpenBlock;
+          CurrTokenLen := 1;
+        end;
+      ']':
+        begin
+          CurrTokenId := CSTI_CloseBlock;
+          CurrTokenLen := 1;
+        end;
+      ',':
+        begin
+          CurrTokenId := CSTI_Comma;
+          CurrTokenLen := 1;
+        end;
+      '.':
+        begin
+          if FText[ct + 1] = '.' then
+          begin
+            CurrTokenLen := 2;
+            CurrTokenId := CSTI_TwoDots;
+          end else
+          begin
+            CurrTokenId := CSTI_Period;
+            CurrTokenLen := 1;
+          end;
+        end;
+      '@':
+        begin
+          CurrTokenId := CSTI_AddressOf;
+          CurrTokenLen := 1;
+        end;
+      '^':
+        begin
+          CurrTokenId := CSTI_Dereference;
+          CurrTokenLen := 1;
+        end;
+      ';':
+        begin
+          CurrTokenId := CSTI_Semicolon;
+          CurrTokenLen := 1;
+        end;
+      ':':
+        begin
+          if FText[ct + 1] = '=' then
+          begin
+            CurrTokenId := CSTI_Assignment;
+            CurrTokenLen := 2;
+          end else
+          begin
+            CurrTokenId := CSTI_Colon;
+            CurrTokenLen := 1;
+          end;
+        end;
+      '+':
+        begin
+          CurrTokenId := CSTI_Plus;
+          CurrTokenLen := 1;
+        end;
+      '-':
+        begin
+          CurrTokenId := CSTI_Minus;
+          CurrTokenLen := 1;
+        end;
+      '*':
+        begin
+          CurrTokenId := CSTI_Multiply;
+          CurrTokenLen := 1;
+        end;
+      '/':
+        begin
+          if FText[ct + 1] = '/' then
+          begin
+            ci := ct + 1;
+            while (FText[ci] <> #0) and (FText[ci] <> #13) and
+              (FText[ci] <> #10) do begin
+              Inc(ci);
+            end;
+            if (FText[ci] = #0) then
+            begin
+              CurrTokenId := CSTIINT_Comment;
+            end else
+            begin
+              CurrTokenId := CSTIINT_Comment;
+            end;
+            CurrTokenLen := ci - ct;
+          end else
+          begin
+            CurrTokenId := CSTI_Divide;
+            CurrTokenLen := 1;
+          end;
+        end;
+      #32, #9, #13, #10:
+        begin
+          ci := ct;
+          while (FText[ci] in [#32, #9, #13, #10]) do
+          begin
+            if FText[ci] = #13 then
+            begin
+              inc(FRow);
+              if FText[ci+1] = #10 then
+                inc(ci);
+              FLastEnterPos := ci +1;
+            end else if FText[ci] = #10 then
+            begin
+              inc(FRow);
+              FLastEnterPos := ci +1;
+            end;
+            Inc(ci);
+          end;
+          CurrTokenId := CSTIINT_WhiteSpace;
+          CurrTokenLen := ci - ct;
+        end;
+      '{':
+        begin
+          ci := ct + 1;
+          while (FText[ci] <> #0) and (FText[ci] <> '}') do begin
+            if FText[ci] = #13 then
+            begin
+              inc(FRow);
+              if FText[ci+1] = #10 then
+                inc(ci);
+              FLastEnterPos := ci + 1;
+            end else if FText[ci] = #10 then
+            begin
+              inc(FRow);
+              FLastEnterPos := ci + 1;
+            end;
+            Inc(ci);
+          end;
+          if (FText[ci] = #0) then
+          begin
+            CurrTokenId := CSTIINT_Comment;
+            ParseToken := iCommentError;
+          end else
+            CurrTokenId := CSTIINT_Comment;
+          CurrTokenLen := ci - ct + 1;
+        end;
+    else
+      begin
+        ParseToken := iSyntaxError;
+        CurrTokenId := CSTIINT_Comment;
+        CurrTokenLen := 1;
+      end;
+    end;
+  end;
+  //-------------------------------------------------------------------
+begin
+  if FText = nil then
+  begin
+    FTokenLength := 0;
+    FRealPosition := 0;
+    FTokenId := CSTI_EOF;
+    Exit;
+  end;
+  repeat
+    FRealPosition := FRealPosition + FTokenLength;
+    Err := ParseToken(FRealPosition, FTokenLength, FTokenID);
+    if Err <> iNoError then
+    begin
+      FTokenLength := 0;
+      FTokenId := CSTI_EOF;
+      FToken := '';
+      FOriginalToken := '';
+      if @FParserError <> nil then FParserError(Self, Err);
+      exit;
+    end;
+
+    case FTokenID of
+      CSTIINT_Comment: if not FEnableComments then Continue else
+        begin
+          SetLength(FOriginalToken, FTokenLength);
+          Move(FText[CurrTokenPos], FOriginalToken[1], FTokenLength);
+          FToken := FOriginalToken;
+        end;
+      CSTIINT_WhiteSpace: if not FEnableWhitespaces then Continue else
+        begin
+          SetLength(FOriginalToken, FTokenLength);
+          Move(FText[CurrTokenPos], FOriginalToken[1], FTokenLength);
+          FToken := FOriginalToken;
+        end;
+      CSTI_Integer, CSTI_Real, CSTI_String, CSTI_Char, CSTI_HexInt:
+        begin
+          SetLength(FOriginalToken, FTokenLength);
+          Move(FText[CurrTokenPos], FOriginalToken[1], FTokenLength);
+          FToken := FOriginalToken;
+        end;
+      CSTI_Identifier:
+        begin
+          SetLength(FOriginalToken, FTokenLength);
+          Move(FText[CurrTokenPos], FOriginalToken[1], FTokenLength);
+          FToken := FLastUpToken;
+        end;
+    else
+      begin
+        FOriginalToken := '';
+        FToken := '';
+      end;
+    end;
+    Break;
+  until False;
+end;
+
+procedure TPSPascalParser.SetText(const Data: TbtString);
+begin
+  FData := Data;
+  FText := Pointer(FData);
+  FTokenLength := 0;
+  FRealPosition := 0;
+  FTokenId := CSTI_EOF;
+  FLastEnterPos := 0;
+  FRow := 1;
+  Next;
+end;
+
+function TPSList.IndexOf(P: Pointer): Longint;
+var
+  i: Integer;
+begin
+  for i := FCount -1 downto 0 do
+  begin
+    if FData[i] = p then
+    begin
+      result := i;
+      exit;
+    end;
+  end;
+  result := -1;
+end;
+
+end.
+
+
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uROPSImports.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uROPSImports.pas
new file mode 100644
index 0000000..da70685
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uROPSImports.pas	
@@ -0,0 +1,366 @@
+unit uROPSImports;
+
+interface
+
+uses
+  uPSCompiler, uPSRuntime, uROBINMessage, uROIndyHTTPChannel,
+  uROXMLSerializer, uROIndyTCPChannel, idTcpClient,
+  uROPSServerLink, uROWinInetHttpChannel;
+
+
+procedure SIRegisterTROBINMESSAGE(CL: TIFPSPascalCompiler);
+procedure SIRegisterTROINDYHTTPCHANNEL(CL: TIFPSPascalCompiler);
+procedure SIRegisterTROINDYTCPCHANNEL(CL: TIFPSPascalCompiler);
+procedure SIRegisterTIDTCPCLIENT(CL: TIFPSPascalCompiler);
+procedure SIRegisterRODLImports(Cl: TIFPSPascalCompiler);
+
+
+
+procedure RIRegisterTROBINMESSAGE(Cl: TIFPSRuntimeClassImporter);
+procedure RIRegisterTROINDYHTTPCHANNEL(Cl: TIFPSRuntimeClassImporter);
+procedure RIRegisterTROINDYTCPCHANNEL(Cl: TIFPSRuntimeClassImporter);
+procedure RIRegisterTIDTCPCLIENT(Cl: TIFPSRuntimeClassImporter);
+procedure RIRegisterRODLImports(CL: TIFPSRuntimeClassImporter);
+(*
+Todo:
+     TROWinInetHTTPChannel = class(TROTransportChannel, IROTransport, IROTCPTransport, IROHTTPTransport)
+     published
+       property UserAgent:string read GetUserAgent write SetUserAgent;
+       property TargetURL : string read fTargetURL write SetTargetURL;
+       property StoreConnected:boolean read fStoreConnected write fStoreConnected default false;
+       property KeepConnection:boolean read fKeepConnection write fKeepConnection default false;
+     end;
+*)
+type
+  
+  TPSROIndyTCPModule = class(TPSROModule)
+  protected
+    class procedure ExecImp(exec: TIFPSExec; ri: TIFPSRuntimeClassImporter); override;
+    class procedure CompImp(comp: TIFPSPascalCompiler); override;
+  end;
+  
+  TPSROIndyHTTPModule = class(TPSROModule)
+  protected
+    class procedure ExecImp(exec: TIFPSExec; ri: TIFPSRuntimeClassImporter); override;
+    class procedure CompImp(comp: TIFPSPascalCompiler); override;
+  end;
+  
+  TPSROBinModule = class(TPSROModule)
+  protected
+    class procedure ExecImp(exec: TIFPSExec; ri: TIFPSRuntimeClassImporter); override;
+    class procedure CompImp(comp: TIFPSPascalCompiler); override;
+  end;
+
+
+implementation
+
+{procedure TROSOAPMESSAGESERIALIZATIONOPTIONS_W(Self: TROSOAPMESSAGE;
+  const T: TXMLSERIALIZATIONOPTIONS);
+begin 
+  Self.SERIALIZATIONOPTIONS := T; 
+end;
+
+procedure TROSOAPMESSAGESERIALIZATIONOPTIONS_R(Self: TROSOAPMESSAGE;
+  var T: TXMLSERIALIZATIONOPTIONS);
+begin 
+  T := Self.SERIALIZATIONOPTIONS; 
+end;
+
+procedure TROSOAPMESSAGECUSTOMLOCATION_W(Self: TROSOAPMESSAGE; const T: string);
+begin 
+  Self.CUSTOMLOCATION := T; 
+end;
+
+procedure TROSOAPMESSAGECUSTOMLOCATION_R(Self: TROSOAPMESSAGE; var T: string);
+begin 
+  T := Self.CUSTOMLOCATION; 
+end;
+
+procedure TROSOAPMESSAGELIBRARYNAME_W(Self: TROSOAPMESSAGE; const T: string);
+begin 
+  Self.LIBRARYNAME := T; 
+end;
+
+procedure TROSOAPMESSAGELIBRARYNAME_R(Self: TROSOAPMESSAGE; var T: string);
+begin 
+  T := Self.LIBRARYNAME; 
+end; }
+
+procedure TROBINMESSAGEUSECOMPRESSION_W(Self: TROBINMESSAGE; const T: boolean);
+begin 
+  Self.USECOMPRESSION := T; 
+end;
+
+procedure TROBINMESSAGEUSECOMPRESSION_R(Self: TROBINMESSAGE; var T: boolean);
+begin 
+  T := Self.USECOMPRESSION; 
+end;
+
+procedure TROINDYHTTPCHANNELTARGETURL_W(Self: TROINDYHTTPCHANNEL; const T: string);
+begin 
+  Self.TARGETURL := T; 
+end;
+
+procedure TROINDYHTTPCHANNELTARGETURL_R(Self: TROINDYHTTPCHANNEL; var T: string);
+begin 
+  T := Self.TARGETURL; 
+end;
+
+procedure TROINDYTCPCHANNELINDYCLIENT_R(Self: TROINDYTCPCHANNEL; var T: TIdTCPClientBaseClass);
+begin 
+  T := Self.INDYCLIENT; 
+end;
+
+procedure TIDTCPCLIENTPORT_W(Self: TIDTCPCLIENT; const T: integer);
+begin 
+  Self.PORT := T; 
+end;
+
+procedure TIDTCPCLIENTPORT_R(Self: TIdTCPClientBaseClass; var T: integer);
+begin 
+  T := TIdIndy10HackClient(Self).PORT;
+end;
+
+procedure TIDTCPCLIENTHOST_W(Self: TIdTCPClientBaseClass; const T: string);
+begin 
+  TIdIndy10HackClient(Self).HOST := T;
+end;
+
+procedure TIDTCPCLIENTHOST_R(Self: TIdTCPClientBaseClass; var T: string);
+begin 
+  T := TIdIndy10HackClient(Self).HOST; 
+end;
+
+{procedure TIDTCPCLIENTBOUNDPORT_W(Self: TIdTCPClientBaseClass; const T: integer);
+begin 
+  Self.BOUNDPORT := T; 
+end;
+
+procedure TIDTCPCLIENTBOUNDPORT_R(Self: TIdTCPClientBaseClass; var T: integer);
+begin 
+  T := Self.BOUNDPORT; 
+end;
+
+procedure TIDTCPCLIENTBOUNDIP_W(Self: TIdTCPClientBaseClass; const T: string);
+begin 
+  Self.BOUNDIP := T; 
+end;
+
+procedure TIDTCPCLIENTBOUNDIP_R(Self: TIdTCPClientBaseClass; var T: string);
+begin 
+  T := Self.BOUNDIP; 
+end;]
+
+procedure TIDTCPCLIENTBOUNDPORTMIN_W(Self: TIdTCPClientBaseClass; const T: integer);
+begin 
+  Self.BOUNDPORTMIN := T; 
+end;
+
+procedure TIDTCPCLIENTBOUNDPORTMIN_R(Self: TIdTCPClientBaseClass; var T: integer);
+begin 
+  T := Self.BOUNDPORTMIN; 
+end;
+
+procedure TIDTCPCLIENTBOUNDPORTMAX_W(Self: TIdTCPClientBaseClass; const T: integer);
+begin 
+  Self.BOUNDPORTMAX := T; 
+end;
+
+procedure TIDTCPCLIENTBOUNDPORTMAX_R(Self: TIdTCPClientBaseClass; var T: integer);
+begin 
+  T := Self.BOUNDPORTMAX; 
+end;
+
+{procedure RIRegisterTROSOAPMESSAGE(Cl: TIFPSRuntimeClassImporter);
+begin
+  with Cl.Add(TROSOAPMESSAGE) do
+  begin
+    RegisterPropertyHelper(@TROSOAPMESSAGELIBRARYNAME_R, @TROSOAPMESSAGELIBRARYNAME_W,
+      'LIBRARYNAME');
+    RegisterPropertyHelper(@TROSOAPMESSAGECUSTOMLOCATION_R,
+      @TROSOAPMESSAGECUSTOMLOCATION_W, 'CUSTOMLOCATION');
+    RegisterPropertyHelper(@TROSOAPMESSAGESERIALIZATIONOPTIONS_R,
+      @TROSOAPMESSAGESERIALIZATIONOPTIONS_W, 'SERIALIZATIONOPTIONS');
+  end;
+end; }
+
+procedure RIRegisterTROBINMESSAGE(Cl: TIFPSRuntimeClassImporter);
+begin
+  with Cl.Add(TROBINMESSAGE) do
+  begin
+    RegisterPropertyHelper(@TROBINMESSAGEUSECOMPRESSION_R,
+      @TROBINMESSAGEUSECOMPRESSION_W, 'USECOMPRESSION');
+  end;
+end;
+
+procedure RIRegisterTROINDYHTTPCHANNEL(Cl: TIFPSRuntimeClassImporter);
+begin
+  with Cl.Add(TROINDYHTTPCHANNEL) do
+  begin
+    RegisterPropertyHelper(@TROINDYHTTPCHANNELTARGETURL_R,
+      @TROINDYHTTPCHANNELTARGETURL_W, 'TARGETURL');
+  end;
+end;
+
+procedure RIRegisterTROINDYTCPCHANNEL(Cl: TIFPSRuntimeClassImporter);
+begin
+  with Cl.Add(TROINDYTCPCHANNEL) do
+  begin
+    RegisterPropertyHelper(@TROINDYTCPCHANNELINDYCLIENT_R, nil, 'INDYCLIENT');
+  end;
+end;
+
+procedure RIRegisterTIDTCPCLIENT(Cl: TIFPSRuntimeClassImporter);
+begin
+  with Cl.Add(TIdTCPClientBaseClass) do
+  begin
+    {RegisterPropertyHelper(@TIDTCPCLIENTBOUNDPORTMAX_R, @TIDTCPCLIENTBOUNDPORTMAX_W,
+      'BOUNDPORTMAX');
+    RegisterPropertyHelper(@TIDTCPCLIENTBOUNDPORTMIN_R, @TIDTCPCLIENTBOUNDPORTMIN_W,
+      'BOUNDPORTMIN');
+    RegisterPropertyHelper(@TIDTCPCLIENTBOUNDIP_R, @TIDTCPCLIENTBOUNDIP_W, 'BOUNDIP');
+    RegisterPropertyHelper(@TIDTCPCLIENTBOUNDPORT_R, @TIDTCPCLIENTBOUNDPORT_W,
+      'BOUNDPORT');}
+    RegisterPropertyHelper(@TIDTCPCLIENTHOST_R, @TIDTCPCLIENTHOST_W, 'HOST');
+    RegisterPropertyHelper(@TIDTCPCLIENTPORT_R, @TIDTCPCLIENTPORT_W, 'PORT');
+  end;
+end;
+
+procedure RIRegisterRODLImports(CL: TIFPSRuntimeClassImporter);
+begin
+  RIRegisterTIDTCPCLIENT(Cl);
+  RIRegisterTROINDYTCPCHANNEL(Cl);
+  RIRegisterTROINDYHTTPCHANNEL(Cl);
+  RIRegisterTROBINMESSAGE(Cl);
+  //RIRegisterTROSOAPMESSAGE(Cl);
+end;
+
+function RegClassS(cl: TIFPSPascalCompiler; const InheritsFrom,
+  ClassName: string): TPSCompileTimeClass;
+begin
+  Result := cl.FindClass(ClassName);
+  if Result = nil then
+    Result := cl.AddClassN(cl.FindClass(InheritsFrom), ClassName)
+  else
+    Result.ClassInheritsFrom := cl.FindClass(InheritsFrom);
+end;
+
+{procedure SIRegisterTROSOAPMESSAGE(CL: TIFPSPascalCompiler);
+begin
+  Cl.addTypeS('TXMLSERIALIZATIONOPTIONS', 'BYTE');
+  Cl.AddConstantN('XSOWRITEMULTIREFARRAY', 'BYTE').SetInt(1);
+  Cl.AddConstantN('XSOWRITEMULTIREFOBJECT', 'BYTE').SetInt(2);
+  Cl.AddConstantN('XSOSENDUNTYPED', 'BYTE').SetInt(4);
+  with RegClassS(cl, 'TROMESSAGE', 'TROSOAPMESSAGE') do
+  begin
+    RegisterProperty('LIBRARYNAME', 'STRING', iptrw);
+    RegisterProperty('CUSTOMLOCATION', 'STRING', iptrw);
+    RegisterProperty('SERIALIZATIONOPTIONS', 'TXMLSERIALIZATIONOPTIONS', iptrw);
+  end;
+end;}
+
+procedure SIRegisterTROBINMESSAGE(CL: TIFPSPascalCompiler);
+begin
+  with RegClassS(cl, 'TROMESSAGE', 'TROBINMESSAGE') do
+  begin
+    RegisterProperty('USECOMPRESSION', 'BOOLEAN', iptrw);
+  end;
+end;
+
+procedure SIRegisterTROINDYHTTPCHANNEL(CL: TIFPSPascalCompiler);
+begin
+  with RegClassS(cl, 'TROINDYTCPCHANNEL', 'TROINDYHTTPCHANNEL') do
+  begin
+    RegisterProperty('TARGETURL', 'STRING', iptrw);
+  end;
+end;
+
+procedure SIRegisterTROINDYTCPCHANNEL(CL: TIFPSPascalCompiler);
+begin
+  with RegClassS(cl, 'TROTRANSPORTCHANNEL', 'TROINDYTCPCHANNEL') do
+  begin
+    RegisterProperty('INDYCLIENT', 'TIdTCPClientBaseClass', iptr);
+  end;
+end;
+
+procedure SIRegisterTIDTCPCLIENT(CL: TIFPSPascalCompiler);
+begin
+  with RegClassS(cl, 'TCOMPONENT', 'TIdTCPClientBaseClass') do
+  begin
+    RegisterProperty('BOUNDPORTMAX', 'INTEGER', iptrw);
+    RegisterProperty('BOUNDPORTMIN', 'INTEGER', iptrw);
+    RegisterProperty('BOUNDIP', 'STRING', iptrw);
+    RegisterProperty('BOUNDPORT', 'INTEGER', iptrw);
+    RegisterProperty('HOST', 'STRING', iptrw);
+    RegisterProperty('PORT', 'INTEGER', iptrw);
+  end;
+end;
+
+procedure SIRegisterRODLImports(Cl: TIFPSPascalCompiler);
+begin
+  SIRegisterTIDTCPCLIENT(Cl);
+  SIRegisterTROINDYTCPCHANNEL(Cl);
+  SIRegisterTROINDYHTTPCHANNEL(Cl);
+  SIRegisterTROBINMESSAGE(Cl);
+  //SIRegisterTROSOAPMESSAGE(Cl);
+end;
+
+{ TPSROIndyTCPModule }
+
+class procedure TPSROIndyTCPModule.CompImp(comp: TIFPSPascalCompiler);
+begin
+  SIRegisterTIDTCPCLIENT(Comp);
+  SIRegisterTROINDYTCPCHANNEL(Comp);
+end;
+
+class procedure TPSROIndyTCPModule.ExecImp(exec: TIFPSExec;
+  ri: TIFPSRuntimeClassImporter);
+begin
+  RIRegisterTIDTCPCLIENT(ri);
+  RIRegisterTROINDYTCPCHANNEL(ri);
+end;
+
+{ TPSROIndyHTTPModule }
+
+class procedure TPSROIndyHTTPModule.CompImp(comp: TIFPSPascalCompiler);
+begin
+  if Comp.FindClass('TROINDYTCPCHANNEL') = nil then
+    TPSROIndyTCPModule.CompImp(Comp);
+  SIRegisterTROINDYHTTPCHANNEL(Comp);
+end;
+
+class procedure TPSROIndyHTTPModule.ExecImp(exec: TIFPSExec;
+  ri: TIFPSRuntimeClassImporter);
+begin
+  if ri.FindClass('TROINDYTCPCHANNEL') = nil then
+    TPSROIndyTCPModule.ExecImp(exec, ri);
+  RIRegisterTROINDYHTTPCHANNEL(ri);
+end;
+
+{ TPSROSoapModule }
+
+{class procedure TPSROSoapModule.CompImp(comp: TIFPSPascalCompiler);
+begin
+  SIRegisterTROSOAPMESSAGE(comp);
+end;
+
+class procedure TPSROSoapModule.ExecImp(exec: TIFPSExec;
+  ri: TIFPSRuntimeClassImporter);
+begin
+  RIRegisterTROSOAPMESSAGE(ri);
+end;}
+
+{ TPSROBinModule }
+
+class procedure TPSROBinModule.CompImp(comp: TIFPSPascalCompiler);
+begin
+  SIRegisterTROBINMESSAGE(Comp);
+end;
+
+class procedure TPSROBinModule.ExecImp(exec: TIFPSExec;
+  ri: TIFPSRuntimeClassImporter);
+begin
+  RIRegisterTROBINMESSAGE(ri);
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uROPSServerLink.pas b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uROPSServerLink.pas
new file mode 100644
index 0000000..ea4895a
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/uROPSServerLink.pas	
@@ -0,0 +1,1139 @@
+unit uROPSServerLink;
+
+interface
+uses
+  SysUtils, Classes, uPSCompiler, uPSUtils, uPSRuntime,
+  uROServer, uROClient, uRODL{$IFDEF WIN32},
+  Windows{$ELSE}, Types{$ENDIF}, uROTypes, uROClientIntf,
+  uROSerializer, uPSComponent;
+
+type
+  
+  TPSROModule = class
+  protected
+    class procedure ExecImp(exec: TPSExec; ri: TPSRuntimeClassImporter); virtual;
+    class procedure CompImp(comp: TPSPascalCompiler); virtual;
+  end;
+  TPSROModuleClass = class of TPSROModule;
+  TPSRemObjectsSdkPlugin = class;
+  TPSROModuleLoadEvent = procedure (Sender: TPSRemObjectsSdkPlugin) of object;
+  
+  TPSRemObjectsSdkPlugin = class(TPSPlugin)
+  private
+    FRodl: TRODLLibrary;
+    FModules: TList;
+    FOnLoadModule: TPSROModuleLoadEvent;
+    
+    FEnableIndyTCP: Boolean;
+    FEnableIndyHTTP: Boolean;
+    FEnableBinary: Boolean;
+    function GetHaveRodl: Boolean;
+    function MkStructName(Struct: TRODLStruct): string;
+  protected
+    procedure CompileImport1(CompExec: TPSScript); override;
+    procedure ExecImport1(CompExec: TPSScript; const ri: TPSRuntimeClassImporter); override;
+    procedure Loaded; override;
+  public
+    
+    procedure RODLLoadFromFile(const FileName: string);
+    
+    procedure RODLLoadFromResource;
+    
+    procedure RODLLoadFromStream(S: TStream);
+    
+    procedure ClearRodl;
+    
+    property HaveRodl: Boolean read GetHaveRodl;
+    
+    constructor Create(AOwner: TComponent); override;
+    
+    destructor Destroy; override;
+
+    
+    procedure ReloadModules;
+    
+    procedure RegisterModule(Module: TPSROModuleClass);
+  published
+    property OnLoadModule: TPSROModuleLoadEvent read FOnLoadModule write FOnLoadModule;
+    
+    property EnableIndyTCP: Boolean read FEnableIndyTCP write FEnableIndyTCP default true;
+    
+    property EnableIndyHTTP: Boolean read FEnableIndyHTTP write FEnableIndyHTTP default true;
+    
+    property EnableBinary: Boolean read FEnableBinary write FEnableBinary default true;
+  end;
+
+implementation
+uses
+  uRODLToXML, uROPSImports;
+
+procedure SIRegisterTROTRANSPORTCHANNEL(CL: TPSPascalCompiler);
+Begin
+With cl.AddClassN(cl.FindClass('TComponent'), 'TROTRANSPORTCHANNEL') do
+  begin
+  end;
+end;
+
+procedure SIRegisterTROMESSAGE(CL: TPSPascalCompiler);
+Begin
+With cl.AddClassN(cl.FindClass('TComponent'),'TROMESSAGE') do
+  begin
+  RegisterProperty('MESSAGENAME', 'STRING', iptrw);
+  RegisterProperty('INTERFACENAME', 'STRING', iptrw);
+  end;
+end;
+
+procedure TROMESSAGEINTERFACENAME_W(Self: TROMESSAGE; const T: STRING);
+begin Self.INTERFACENAME := T; end;
+
+procedure TROMESSAGEINTERFACENAME_R(Self: TROMESSAGE; var T: STRING);
+begin T := Self.INTERFACENAME; end;
+
+procedure TROMESSAGEMESSAGENAME_W(Self: TROMESSAGE; const T: STRING);
+begin Self.MESSAGENAME := T; end;
+
+procedure TROMESSAGEMESSAGENAME_R(Self: TROMESSAGE; var T: STRING);
+begin T := Self.MESSAGENAME; end;
+
+procedure RIRegisterTROTRANSPORTCHANNEL(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TROTRANSPORTCHANNEL) do
+  begin
+  RegisterVirtualConstructor(@TROTRANSPORTCHANNEL.CREATE, 'CREATE');
+  end;
+end;
+
+procedure RIRegisterTROMESSAGE(Cl: TPSRuntimeClassImporter);
+Begin
+with Cl.Add(TROMESSAGE) do
+  begin
+  RegisterVirtualConstructor(@TROMESSAGE.CREATE, 'CREATE');
+  RegisterPropertyHelper(@TROMESSAGEMESSAGENAME_R,@TROMESSAGEMESSAGENAME_W,'MESSAGENAME');
+  RegisterPropertyHelper(@TROMESSAGEINTERFACENAME_R,@TROMESSAGEINTERFACENAME_W,'INTERFACENAME');
+  end;
+end;
+
+
+type
+  TRoObjectInstance = class;
+  {   }
+  IROClass = interface
+    ['{246B5804-461F-48EC-B2CA-FBB7B69B0D64}']
+    function SLF: TRoObjectInstance;
+  end;
+  TRoObjectInstance = class(TInterfacedObject, IROClass)
+  private
+    FMessage: IROMessage;
+    FChannel: IROTransportChannel;
+  public
+    constructor Create;
+    function SLF: TRoObjectInstance;
+    property Message: IROMessage read FMessage write FMessage;
+    property Channel: IROTransportChannel read FChannel write FChannel;
+  end;
+
+
+
+function CreateProc(Caller: TPSExec; p: PIFProcRec; Global, Stack: TPSStack): Boolean;
+var
+  temp, res: TPSVariantIFC;
+  Chan: TROTransportChannel;
+  Msg: TROMessage;
+  NewRes: TRoObjectInstance;
+begin
+  res := NewTPSVariantIFC(Stack[Stack.count -1], True);
+  if (Res.Dta = nil) or (res.aType.BaseType <> btInterface) then
+  begin
+    Caller.CMD_Err2(erCustomError, 'RO Invoker: Invalid Parameters');
+    Result := False;
+    exit;
+  end;
+  IUnknown(Res.Dta^) := nil;
+
+  NewRes := TRoObjectInstance.Create;
+
+  temp := NewTPSVariantIFC(Stack[Stack.Count -4], True);
+
+  if (temp.aType <> nil) and (temp.Dta <> nil) and (Temp.aType.BaseType = btClass) and (TObject(Temp.Dta^) is TROTransportChannel) then
+    Chan := TROTransportChannel(temp.dta^)
+  else
+    Chan := nil;
+  temp := NewTPSVariantIFC(Stack[Stack.Count -3], True);
+  if (temp.aType <> nil) and (temp.Dta <> nil) and (Temp.aType.BaseType = btClass) and (TObject(Temp.Dta^) is TROMessage) then
+    Msg := TROMessage(temp.dta^)
+  else
+    Msg := nil;
+  if (msg = nil) or (chan = nil) then
+  begin
+    Chan.free;
+    msg.Free;
+
+    NewRes.Free;
+    Result := false;
+    Caller.CMD_Err2(erCustomError, 'Could not create message');
+    exit;
+  end;
+
+  IRoClass(Res.Dta^) := NewRes;
+
+  NewRes.Message := Msg;
+  NewRes.Channel := Chan;
+  Result := True;
+end;
+
+function NilProc(Caller: TPSExec; p: PIFProcRec; Global, Stack: TPSStack): Boolean;
+var
+  n: TPSVariantIFC;
+begin
+  n := NewTPSVariantIFC(Stack[Stack.count -1], True);
+  if (n.Dta = nil) or (n.aType = nil) or (n.aType.BaseType <> btInterface) then
+  begin
+    Caller.CMD_Err2(erCustomError, 'RO Invoker: Cannot free');
+    Result := False;
+    exit;
+  end;
+  IUnknown(n.Dta^) := nil;
+  Result := True;
+end;
+
+type
+  TROStructure = class(TPersistent, IROCustomStreamableType, IROCustomStreamableStruct)
+  private
+    FVar: TPSVariantIFC;
+    FExec: TPSExec;
+  protected
+    function GetTypeName: string;
+    procedure SetTypeName(const s: string);
+    procedure Write(Serializer: TROSerializer; const Name: string);
+    procedure Read(Serializer: TROSerializer; const Name: string);
+    function _AddRef: Integer; stdcall;
+    function _Release: Integer; stdcall;
+    function QueryInterface(const IID: TGUID; out Obj): HResult; stdcall;
+    function CanImplementType(const aName: string):boolean;
+    procedure SetNull(b: Boolean);
+    function IsNull: Boolean;
+  public
+    constructor Create(aVar: TPSVariantIfc; Exec: TPSExec);
+  end;
+  TROArray = class(TROStructure, IROCustomStreamableType, IROCustomStreamableStruct, IROCustomStreamableArray)
+  protected
+    function GetCount: Longint;
+     procedure SetCount(l: Longint);
+  end;
+
+procedure WriteUserDefined(Exec: TPSExec; const Msg: IROMessage; const Name: string; const n: TPSVariantIfc);
+var
+  obj: TROStructure;
+begin
+  if n.aType.BaseType = btArray then
+    obj := TROArray.Create(n, exec)
+  else if n.aType.BaseType = btRecord then
+    obj := TROStructure.Create(n, exec)
+  else
+    raise Exception.Create('Unknown custom type');
+  try
+    Msg.Write(Name, obj.ClassInfo, obj, []);
+  finally
+    obj.Free;
+  end;
+end;
+
+procedure ReadUserDefined(Exec: TPSExec; const Msg: IROMessage;  const Name: string; const n: TPSVariantIfc);
+var
+  obj: TROStructure;
+begin
+  if n.aType.BaseType = btArray then
+    obj := TROArray.Create(n, exec)
+  else if n.aType.BaseType = btRecord then
+    obj := TROStructure.Create(n, exec)
+  else
+    raise Exception.Create('Unknown custom type');
+  try
+    Msg.Read(Name, obj.ClassInfo, obj, []);
+  finally
+    obj.Free;
+  end;
+end;
+
+function RoProc(Caller: TPSExec; p: TIFExternalProcRec; Global, Stack: TIfList): Boolean;
+var
+  s, s2: string;
+  res, n: TPSVariantIFC;
+  aType: TRODataType;
+  aMode: TRODLParamFlag;
+  StartOffset, I: Longint;
+  __request, __response : TMemoryStream;
+  Inst:  TRoObjectInstance;
+
+begin
+  s := p.Decl;
+
+  if s[1] = #255 then
+  begin
+    n := NewTPSVariantIFC(Stack[Stack.Count -1], True);
+    res.Dta := nil;
+    res.aType := nil;
+    StartOffset := Stack.Count -2;
+  end
+  else
+  begin
+    n := NewTPSVariantIFC(Stack[Stack.Count -2], True);
+    res := NewTPSVariantIFC(Stack[Stack.Count -1], True);
+    StartOffset := Stack.Count -3;
+  end;
+
+  if (n.Dta = nil) or (N.aType = nil) or (n.aType.BaseType <> btInterface) or (Longint(n.Dta^) = 0) then
+  begin
+    Caller.CMD_Err2(erCustomError, 'RO Invoker: Invalid Parameters');
+    Result := False;
+    exit;
+  end;
+
+  Inst := IROClass(n.dta^).Slf;
+  Delete(s, 1, 1);
+  i := StartOffset;
+  try
+    Inst.SLF.Message.InitializeRequestMessage(Inst.Channel, '', Copy(p.Name,1,pos('.', p.Name) -1), Copy(p.Name, pos('.', p.Name)+1, MaxInt));
+    while Length(s) > 0 do
+    begin
+      s2 := copy(s, 2, ord(s[1]));
+      aMode := TRODLParamFlag(ord(s[length(s2)+2]));
+      aType := TRODataType(ord(s[length(s2)+3]));
+      Delete(s, 1, length(s2)+3);
+      n := NewTPSVariantIFC(Stack[i], True);
+      Dec(I);
+      if ((aMode = fIn) or (aMode = fInOut)) and (n.Dta <> nil) then
+      begin
+        case aType of
+          rtInteger: Inst.Message.Write(s2, TypeInfo(Integer),  Integer(n.Dta^), []);
+          rtDateTime: Inst.Message.Write(s2, TypeInfo(DateTime), Double(n.Dta^), []);
+          rtDouble: Inst.Message.Write(s2, TypeInfo(Double), Double(n.Dta^), []);
+          rtCurrency: Inst.Message.Write(s2, TypeInfo(Double), Double(n.Dta^), []);
+          rtWideString: Inst.Message.Write(s2, TypeInfo(WideString), WideString(n.Dta^), []);
+          rtString: Inst.Message.Write(s2, TypeInfo(String), String(n.Dta^), []);
+          rtInt64: Inst.Message.Write(s2, TypeInfo(Int64), Int64(n.Dta^), []);
+          rtBoolean: Inst.Message.Write(s2, TypeInfo(Boolean), Byte(n.Dta^), []);
+          rtUserDefined: WriteUserDefined(Caller, Inst.Message, s2, n);
+        end;
+      end;
+    end;
+    __request := TMemoryStream.Create;
+    __response := TMemoryStream.Create;
+    try
+      Inst.Message.WriteToStream(__request);
+      Inst.Channel.Dispatch(__request, __response);
+      Inst.Message.ReadFromStream(__response);
+    finally
+      __request.Free;
+      __response.Free;
+    end;
+    s := p.Decl;
+    Delete(s, 1, 1);
+    i := StartOffset;
+    while Length(s) > 0 do
+    begin
+      s2 := copy(s, 2, ord(s[1]));
+      aMode := TRODLParamFlag(ord(s[length(s2)+2]));
+      aType := TRODataType(ord(s[length(s2)+3]));
+      Delete(s, 1, length(s2)+3);
+      n := NewTPSVariantIFC(Stack[i], True);
+      Dec(I);
+      if ((aMode = fOut) or (aMode = fInOut)) and (n.Dta <> nil) then
+      begin
+        case aType of
+          rtInteger: Inst.Message.Read(s2, TypeInfo(Integer), Longint(n.Dta^), []);
+          rtDateTime: Inst.Message.Read(s2, TypeInfo(DateTime), double(n.dta^), []);
+          rtDouble: Inst.Message.Read(s2, TypeInfo(Double), double(n.dta^), []);
+          rtCurrency: Inst.Message.Read(s2, TypeInfo(Double), double(n.dta^), []);
+          rtWideString: Inst.Message.Read(s2, TypeInfo(WideString), widestring(n.Dta^), []);
+          rtString: Inst.Message.Read(s2, TypeInfo(String), string(n.dta^), []);
+          rtInt64: Inst.Message.Read(s2, TypeInfo(Int64), Int64(n.Dta^), []);
+          rtBoolean: Inst.Message.Read(s2, TypeInfo(Boolean), Boolean(n.Dta^), []);
+          rtUserDefined: ReadUserDefined(Caller, Inst.Message, s2, n);
+        end;
+      end;
+    end;
+    aType := TRODataType(p.Decl[1]);
+    case aType of
+      rtInteger: Inst.Message.Read('Result', TypeInfo(Integer), Longint(res.Dta^), []);
+      rtDateTime: Inst.Message.Read('Result', TypeInfo(DateTime), Double(res.dta^), []);
+      rtDouble: Inst.Message.Read('Result', TypeInfo(Double), Double(res.Dta^), []);
+      rtCurrency: Inst.Message.Read('Result', TypeInfo(Double), double(res.Dta^), []);
+      rtWideString: Inst.Message.Read('Result', TypeInfo(WideString), WideString(res.Dta^), []);
+      rtString: Inst.Message.Read('Result', TypeInfo(String), String(res.Dta^), []);
+      rtInt64: Inst.Message.Read('Result', TypeInfo(Int64), Int64(res.dta^), []);
+      rtBoolean: Inst.Message.Read('Result', TypeInfo(Boolean), Boolean(res.dta^), []);
+      rtUserDefined: ReadUserDefined(Caller, Inst.Message, 'Result', res);
+    end;
+  except
+    on e: Exception do
+    begin
+      Caller.CMD_Err2(erCustomError, e.Message);
+      Result := False;
+      exit;
+    end;
+  end;
+  Result := True;
+end;
+
+function SProcImport(Sender: TPSExec; p: TIFExternalProcRec; Tag: Pointer): Boolean;
+var
+  s: string;
+begin
+  s := p.Decl;
+  Delete(s, 1, pos(':', s));
+  if s[1] = '-' then
+    p.ProcPtr := @NilProc
+  else if s[1] = '!' then
+  begin
+    P.ProcPtr := @CreateProc;
+    p.Decl := Copy(s, 2, MaxInt);
+  end else
+  begin
+    Delete(s, 1, 1);
+    p.Name := Copy(S,1,pos('!', s)-1);
+    Delete(s, 1, pos('!', s));
+    p.Decl := s;
+    p.ProcPtr := @RoProc;
+  end;
+  Result := True;
+end;
+
+
+type
+  TMYComp = class(TPSPascalCompiler);
+  TRoClass = class(TPSExternalClass)
+  private
+    FService: TRODLService;
+    FNilProcNo: Cardinal;
+    FCompProcno: Cardinal;
+    function CreateParameterString(l: TRODLOperation): string;
+    function GetDT(DataType: string): TRODataType;
+    procedure MakeDeclFor(Dest: TPSParametersDecl; l: TRODLOperation);
+  public
+    constructor Create(Se: TPSPascalCompiler; Service: TRODLService; Const Typeno: TPSType);
+
+    function SelfType: TPSType; override;
+    function Func_Find(const Name: tbtstring; var Index: Cardinal): Boolean; override;
+    function Func_Call(Index: Cardinal; var ProcNo: Cardinal): Boolean; override;
+    function SetNil(var ProcNo: Cardinal): Boolean; override;
+
+    function ClassFunc_Find(const Name: tbtstring; var Index: Cardinal): Boolean; override;
+    function ClassFunc_Call(Index: Cardinal; var ProcNo: Cardinal): Boolean; override;
+    function IsCompatibleWith(Cl: TPSExternalClass): Boolean; override;
+  end;
+
+{ TROPSLink }
+procedure TPSRemObjectsSdkPlugin.RODLLoadFromFile(const FileName: string);
+var
+  f: TFileStream;
+begin
+  f := TFileStream.Create(FileName, fmOpenRead or fmShareDenyNone);
+  try
+    RODLLoadFromStream(f);
+  finally
+    f.Free;
+  end;
+end;
+
+procedure TPSRemObjectsSdkPlugin.RODLLoadFromResource;
+var
+  rs: TResourceStream;
+begin
+  rs := TResourceStream.Create(HInstance, 'RODLFILE', RT_RCDATA);
+  try
+    RODLLoadFromStream(rs);
+  finally
+    rs.Free;
+  end;
+end;
+
+procedure TPSRemObjectsSdkPlugin.RODLLoadFromStream(S: TStream);
+begin
+  FreeAndNil(FRodl);
+  with TXMLToRODL.Create do
+  begin
+    try
+      FRodl := Read(S);
+    finally
+      Free;
+    end;
+  end;
+end;
+
+
+destructor TPSRemObjectsSdkPlugin.Destroy;
+begin
+  FreeAndNil(FRodl);
+  FModules.Free;
+  inherited Destroy;
+end;
+
+{ TRoClass }
+
+constructor TRoClass.Create(Se: TPSPascalCompiler; Service: TRODLService; Const Typeno: TPSType);
+begin
+  inherited Create(SE, TypeNo);
+  FService := Service;
+  FNilProcNo := Cardinal(-1);
+  FCompProcNo := Cardinal(-1);
+end;
+
+function TRoClass.GetDT(DataType: string): TRODataType;
+begin
+  DataType := LowerCase(DataType);
+  if DataType = 'integer' then
+    Result := rtInteger
+  else if DataType = 'datetime' then
+    Result := rtDateTime
+  else if DataType = 'double' then
+    Result := rtDouble
+  else if DataType = 'currency' then
+    Result := rtCurrency
+  else if DataType = 'widestring' then
+    Result := rtWidestring
+  else if DataType = 'string' then
+    Result := rtString
+  else if DataType = 'int64' then
+    Result := rtInt64
+  else if DataType = 'boolean' then
+    Result := rtBoolean
+  else if DataType = 'variant' then
+    Result := rtVariant
+  else if DataType = 'binary' then
+    Result := rtBinary
+  else
+    Result := rtUserDefined;
+end;
+
+function TRoClass.CreateParameterString(l: TRODLOperation): string;
+var
+  i: Longint;
+begin
+  if L.Result = nil then
+  begin
+    Result := #$FF;
+  end else
+  begin
+    Result := Chr(Ord(GetDT(l.Result.DataType)));
+  end;
+  for i := 0 to l.Count -1 do
+  begin
+    if l.Items[i].Flag = fResult then Continue;
+    Result := Result + Chr(Length(l.Items[i].Info.Name))+ l.Items[i].Info.Name + Chr(Ord(l.Items[i].Flag)) + Chr(Ord(GetDT(l.Items[i].DataType)));
+  end;
+end;
+
+procedure TRoClass.MakeDeclFor(Dest: TPSParametersDecl; l: TRODLOperation);
+var
+  i: Longint;
+  dd: TPSParameterDecl;
+begin
+  if l.Result <> nil then
+  begin
+    Dest.Result := TMyComp(SE).at2ut(SE.FindType(l.Result.DataType));
+  end;
+  for i := 0 to l.Count -1 do
+  begin
+    if l.Items[i].Flag = fResult then Continue;
+    dd := Dest.AddParam;
+    if l.Items[i].Flag = fIn then
+      dd.mode := pmIn
+    else
+      dd.Mode := pmInOut;
+    dd.OrgName := l.Items[i].Info.Name;
+    dd.aType := TMyComp(SE).at2ut(SE.FindType(l.Items[i].DataType));
+  end;
+end;
+
+function TRoClass.Func_Call(Index: Cardinal; var ProcNo: Cardinal): Boolean;
+var
+  h, i: Longint;
+  s, e: string;
+  P: TPSProcedure;
+  p2: TPSExternalProcedure;
+begin
+    s := 'roclass:_'+FService.Info.Name + '.' + FService.Default.Items[Index].Info.Name;
+  h := MakeHash(s);
+  for i := 0 to TMyComp(SE).FProcs.Count -1 do
+  begin
+    P := TMyComp(SE).FProcs[i];
+    if (p is TPSExternalProcedure) then
+    begin
+      p2 := TPSExternalProcedure(p);
+      if (p2.RegProc.NameHash = h) and (Copy(p2.RegProc.ImportDecl, 1, pos(tbtchar('!'), p2.RegProc.ImportDecl)) = s) then
+      begin
+        Procno := I;
+        Result := True;
+        Exit;
+      end;
+    end;
+  end;
+  e := CreateParameterString(FService.Default.Items[Index]);
+  s := s + '!' + e;
+  ProcNo := TMyComp(SE).AddUsedFunction2(P2);
+  p2.RegProc := TPSRegProc.Create;
+  TMYComp(SE).FRegProcs.Add(p2.RegProc);
+  p2.RegProc.Name := '';
+  p2.RegProc.ExportName := True;
+  MakeDeclFor(p2.RegProc.Decl, FService.Default.Items[Index]);
+  p2.RegProc.ImportDecl := s;
+  Result := True;
+end;
+
+function TRoClass.Func_Find(const Name: tbtstring; var Index: Cardinal): Boolean;
+var
+  i: Longint;
+begin
+  for i := 0 to FService.Default.Count -1 do
+  begin
+    if CompareText(FService.Default.Items[i].Info.Name, Name) = 0 then
+    begin
+      Index := i;
+      Result := True;
+      Exit;
+    end;
+  end;
+  Result := False;
+end;
+
+const
+  PSClassType = '!ROClass';
+  MyGuid: TGuid = '{CADCCF37-7FA0-452E-971D-65DA691F7648}';
+
+function TRoClass.SelfType: TPSType;
+begin
+  Result := SE.FindType(PSClassType);
+  if Result = nil then
+  begin
+    Result := se.AddInterface(se.FindInterface('IUnknown'), MyGuid, PSClassType).aType;
+  end;
+end;
+
+function TRoClass.SetNil(var ProcNo: Cardinal): Boolean;
+var
+  P: TPSExternalProcedure;
+begin
+  if FNilProcNo <> Cardinal(-1) then
+    ProcNo:= FNilProcNo
+  else
+  begin
+    ProcNo := TMyComp(SE).AddUsedFunction2(P);
+    p.RegProc := TPSRegProc.Create;
+    TMyComp(SE).FRegProcs.Add(p.RegProc);
+    p.RegProc.Name := '';
+    p.RegProc.ExportName := True;
+    with p.RegProc.Decl.AddParam do
+    begin
+      OrgName := 'VarNo';
+      aType := TMYComp(Se).at2ut(SelfType);
+    end;
+    p.RegProc.ImportDecl := 'roclass:-';
+    FNilProcNo := Procno;
+  end;
+  Result := True;
+end;
+
+function TRoClass.ClassFunc_Call(Index: Cardinal;
+  var ProcNo: Cardinal): Boolean;
+var
+  P: TPSExternalProcedure;
+begin
+  if FCompProcNo <> Cardinal(-1) then
+  begin
+    Procno := FCompProcNo;
+    Result := True;
+    Exit;
+  end;
+  ProcNo := TMyComp(SE).AddUsedFunction2(P);
+  p.RegProc := TPSRegProc.Create;
+  TMyComp(SE).FRegProcs.Add(p.RegProc);
+  p.RegProc.ExportName := True;
+  p.RegProc.Decl.Result := TMyComp(SE).at2ut(SelfType);
+  with p.RegProc.Decl.AddParam do
+  begin
+    Orgname := 'Message';
+    aType :=TMyComp(SE).at2ut(SE.FindType('TROMESSAGE'));
+  end;
+  with p.RegProc.Decl.AddParam do
+  begin
+    Orgname := 'Channel';
+    aType :=TMyComp(SE).at2ut(SE.FindType('TROTRANSPORTCHANNEL'));
+  end;
+  p.RegProc.ImportDecl := 'roclass:!';
+  FCompProcNo := Procno;
+  Result := True;
+end;
+
+function TRoClass.ClassFunc_Find(const Name: tbtstring;
+  var Index: Cardinal): Boolean;
+begin
+  if Name = 'CREATE' then
+  begin
+    Result := True;
+    Index := 0;
+  end else
+    result := False;
+end;
+
+function TRoClass.IsCompatibleWith(Cl: TPSExternalClass): Boolean;
+begin
+  Result := Cl is TRoClass;
+end;
+
+{ TRoObjectInstance }
+
+function TRoObjectInstance.SLF: TRoObjectInstance;
+begin
+  Result := Self;
+end;
+
+constructor TRoObjectInstance.Create;
+begin
+  FRefCount := 1;
+end;
+
+
+function TPSRemObjectsSdkPlugin.MkStructName(Struct: TRODLStruct): string;
+var
+  i: Longint;
+begin
+  Result := '!ROStruct!'+Struct.Info.Name+ ',';
+  for i := 0 to Struct.Count -1 do
+  begin
+    Result := Result + Struct.Items[i].Info.Name+ ',';
+  end;
+end;
+
+function CompareStructItem(const S1, S2: TRODLTypedEntity): Integer;
+begin
+  Result := CompareText(S1.Info.Name, S2.Info.Name);
+end;
+
+procedure SortStruct(struct: TRODLStruct; First, Last: Longint);
+var
+  l, r, Pivot: Integer;
+begin
+  while First < Last do
+  begin
+    Pivot := (First + Last) div 2;
+    l := First - 1;
+    r := Last + 1;
+    repeat
+      repeat inc(l); until CompareStructItem(Struct.Items[l], Struct.Items[Pivot]) >= 0;
+      repeat dec(r); until CompareStructItem(Struct.Items[r], Struct.Items[Pivot]) <= 0;
+      if l >= r then break;
+      Struct.Exchange(l, r);
+    until false;                                     
+    if First < r then SortStruct(Struct, First, r);
+    First := r+1;
+  end;
+end;
+
+procedure TPSRemObjectsSdkPlugin.CompileImport1(CompExec: TPSScript);
+var
+  i, i1: Longint;
+  Enum: TRODLEnum;
+  TempType: TPSType;
+  Struct: TRODLStruct;
+  Arr: TRODLArray;
+  RecType: TPSRecordFieldTypeDef;
+  Service: TRODLService;
+begin
+  if FRODL = nil then exit;
+  if CompExec.Comp.FindType('TDateTime') = nil then
+    raise Exception.Create('Please register the DateUtils library first');
+  SIRegisterTROTRANSPORTCHANNEL(CompExec.Comp);
+  SIRegisterTROMESSAGE(CompExec.Comp);
+  if CompExec.Comp.FindType('DateTime') = nil then
+    CompExec.Comp.AddTypeCopyN('DateTime', 'TDateTime');
+  if CompExec.Comp.FindType('Currency') = nil then
+    CompExec.Comp.AddTypeCopyN('Currency', 'Double'); // for now
+  for i := 0 to FRodl.EnumCount -1 do
+  begin
+    Enum := FRodl.Enums[i];
+    TempType := CompExec.Comp.AddType(Enum.Info.Name, btEnum);
+    for i1 := 0 to Enum.Count -1 do
+    begin
+      CompExec.Comp.AddConstant(Enum.Items[i1].Info.Name, TempType).SetUInt(i1);
+    end;
+  end;
+  for i := 0 to FRodl.StructCount -1 do
+  begin
+    Struct := FRodl.Structs[i];
+    SortStruct(Struct, 0, Struct.Count-1);
+    TempType := CompExec.Comp.AddType('', btRecord);
+    TempType.ExportName := True;
+    TempType.Name := MkStructName(Struct);
+    for i1 := 0 to Struct.Count -1 do
+    begin
+      RecType := TPSRecordType(TempType).AddRecVal;
+      RecType.FieldOrgName := Struct.Items[i1].Info.Name;
+      RecType.aType := CompExec.Comp.FindType(Struct.Items[i1].DataType);
+    end;
+    CompExec.Comp.AddTypeCopy(Struct.Info.Name, TempType);
+  end;
+  for i := 0 to FRodl.ArrayCount -1 do
+  begin
+    Arr := FRodl.Arrays[i];
+    TempType := CompExec.Comp.AddType(Arr.Info.Name, btArray);
+    TPSArrayType(TempType).ArrayTypeNo := CompExec.Comp.FindType(Arr.ElementType);
+  end;
+  for i := 0 to FRodl.ServiceCount -1 do
+  begin
+    Service := FRodl.Services[i];
+    TempType := CompExec.Comp.AddType(Service.Info.Name, btExtClass);
+    TPSUndefinedClassType(TempType).ExtClass := TRoClass.Create(CompExec.Comp, Service, TempType);
+  end;
+  for i := 0 to FModules.Count -1 do
+    TPSROModuleClass(FModules[i]).CompImp(CompExec.Comp);
+end;
+
+function TPSRemObjectsSdkPlugin.GetHaveRodl: Boolean;
+begin
+  Result := FRodl <> nil;
+end;
+
+procedure TPSRemObjectsSdkPlugin.ClearRodl;
+begin
+  FRodl.Free;
+  FRodl := nil;
+end;
+
+procedure TPSRemObjectsSdkPlugin.ExecImport1(CompExec: TPSScript;
+  const ri: TPSRuntimeClassImporter);
+var
+  i: Longint;
+begin
+  if FRODL = nil then exit;
+  CompExec.Exec.AddSpecialProcImport('roclass', SProcImport, nil);
+  RIRegisterTROTRANSPORTCHANNEL(ri);
+  RIRegisterTROMESSAGE(ri);
+  for i := 0 to FModules.Count -1 do
+    TPSROModuleClass(FModules[i]).ExecImp(CompExec.Exec, ri);
+end;
+
+constructor TPSRemObjectsSdkPlugin.Create(AOwner: TComponent);
+begin
+  inherited Create(AOwner);
+  FModules := TList.Create;
+  //FEnableSOAP := True;
+  FEnableBinary := True;
+  FEnableIndyTCP := True;
+  FEnableIndyHTTP := True;
+end;
+
+procedure TPSRemObjectsSdkPlugin.Loaded;
+begin
+  inherited Loaded;
+  ReloadModules;
+end;
+
+procedure TPSRemObjectsSdkPlugin.RegisterModule(
+  Module: TPSROModuleClass);
+begin
+  FModules.Add(Module);
+end;
+
+procedure TPSRemObjectsSdkPlugin.ReloadModules;
+begin
+  FModules.Clear;
+  if FEnableIndyTCP then RegisterModule(TPSROIndyTCPModule);
+  if FEnableIndyHTTP then RegisterModule(TPSROIndyHTTPModule);
+  //if FEnableSOAP then RegisterModule(TPSROSoapModule);
+  if FEnableBinary then RegisterModule(TPSROBinModule);
+  if assigned(FOnLoadModule) then
+    FOnLoadModule(Self);
+end;
+
+{ TPSROModule }
+
+class procedure TPSROModule.CompImp(comp: TPSPascalCompiler);
+begin
+  // do nothing
+end;
+
+class procedure TPSROModule.ExecImp(exec: TPSExec;
+  ri: TPSRuntimeClassImporter);
+begin
+  // do nothing
+end;
+
+procedure IntRead(Exec: TPSExec; Serializer: TROSerializer;
+  const Name: string; aVar: TPSVariantIFC; arridx: Longint);
+var
+  i: Longint;
+  s, s2: string;
+  r: TROStructure;
+begin
+  case aVar.aType.BaseType of
+    btS64: Serializer.Read(Name, TypeInfo(int64), Int64(avar.Dta^), arridx);
+    btu32: Serializer.Read(Name, TypeInfo(cardinal), Cardinal(avar.Dta^), arridx);
+    bts32: Serializer.Read(Name, TypeInfo(longint), Longint(avar.Dta^), arridx);
+    btu16: Serializer.Read(Name, TypeInfo(word), Word(aVar.Dta^), arridx);
+    btS16: Serializer.Read(Name, TypeInfo(smallint), Smallint(aVar.Dta^), arridx);
+    btu8: Serializer.Read(Name, TypeInfo(byte), Byte(aVar.Dta^), arridx);
+    btS8: Serializer.Read(Name, TypeInfo(shortint), Shortint(aVar.Dta^), arridx);
+    btDouble:
+      begin
+        if aVar.aType.ExportName = 'TDATETIME' then
+          Serializer.Read(Name, TypeInfo(datetime), Double(avar.Dta^), arridx)
+        else
+          Serializer.Read(Name, TypeInfo(double), Double(aVar.Dta^), arridx);
+      end;
+    btSingle: Serializer.Read(Name, TypeInfo(single), Single(avar.Dta^), arridx);
+    btExtended: Serializer.Read(Name, TypeInfo(extended), Extended(avar.dta^), arridx);
+    btWideString: Serializer.Read(Name, TypeInfo(widestring), widestring(avar.dta^), arridx);
+    btString: Serializer.Read(Name, TypeInfo(string), string(avar.dta^), arridx);
+    btArray:
+      begin
+        if (TPSTypeRec_Array(avar.aType).ArrayType.BaseType = btRecord) then
+        begin
+          for i := 0 to PSDynArrayGetLength(Pointer(aVar.Dta^), aVar.aType) -1 do
+          begin
+            r := TROStructure.Create(PSGetArrayField(avar, i), Exec);
+            try
+              Serializer.Read(Name, typeinfo(TROArray), r, i);
+            finally
+              r.Free;
+            end;
+          end;
+        end else if (TPSTypeRec_Array(avar.aType).ArrayType.BaseType = btArray) then
+        begin
+          for i := 0 to PSDynArrayGetLength(Pointer(aVar.Dta^), aVar.aType) -1 do
+          begin
+            r := TROArray.Create(PSGetArrayField(avar, i), Exec);
+            try
+              Serializer.Read(Name, typeinfo(TROArray), r, i);
+            finally
+              r.Free;
+            end;
+          end;
+        end else begin
+          for i := 0 to PSDynArrayGetLength(Pointer(aVar.Dta^), aVar.aType) -1 do
+          begin
+            IntRead(Exec, Serializer, Name, PSGetArrayField(avar, i), i);
+          end;
+        end;
+      end;
+    btRecord:
+      begin
+        s := avar.aType.ExportName;
+        if copy(s,1, 10) <> '!ROStruct!' then
+          raise Exception.Create('Invalid structure: '+s);
+        Delete(s,1,pos(',',s));
+        for i := 0 to TPSTypeRec_Record(aVar.aType).FieldTypes.Count -1 do
+        begin
+          s2 := copy(s,1,pos(',',s)-1);
+          delete(s,1,pos(',',s));
+          if (TPSTypeRec(TPSTypeRec_Record(aVar.aType).FieldTypes[i]).BaseType = btRecord) then
+          begin
+
+            r := TROStructure.Create(PSGetRecField(aVar, i), Exec);
+            try
+              Serializer.Read(s2, typeinfo(TROStructure), r, -1);
+            finally
+              r.Free;
+            end;
+          end else if (TPSTypeRec(TPSTypeRec_Record(aVar.aType).FieldTypes[i]).BaseType = btArray)  then
+          begin
+            r := TROArray.Create(PSGetRecField(aVar, i), Exec);
+            try
+              Serializer.Read(s2, typeinfo(TROArray), r, -1);
+            finally
+              r.Free;
+            end;
+          end else
+            IntRead(Exec, Serializer, s2, PSGetRecField(aVar, i), -1);
+        end;
+      end;
+  else
+    raise Exception.Create('Unable to read type');
+
+  end;
+end;
+
+procedure IntWrite(Exec: TPSExec; Serializer: TROSerializer;
+  const Name: string; aVar: TPSVariantIFC; arridx: Longint);
+var
+  i: Longint;
+  s, s2: string;
+  r: TROStructure;
+begin
+  case aVar.aType.BaseType of
+    btS64: Serializer.Write(Name, TypeInfo(int64), Int64(avar.Dta^), arridx);
+    btu32: Serializer.Write(Name, TypeInfo(cardinal), Cardinal(avar.Dta^), arridx);
+    bts32: Serializer.Write(Name, TypeInfo(longint), Longint(avar.Dta^), arridx);
+    btu16: Serializer.Write(Name, TypeInfo(word), Word(avar.Dta^), arridx);
+    btS16: Serializer.Write(Name, TypeInfo(smallint), Smallint(aVar.Dta^), arridx);
+    btu8: Serializer.Write(Name, TypeInfo(byte), Byte(aVar.Dta^), arridx);
+    btS8: Serializer.Write(Name, TypeInfo(shortint), ShortInt(aVar.Dta^), arridx);
+    btDouble:
+      begin
+        if aVar.aType.ExportName = 'TDATETIME' then
+          Serializer.Write(Name, TypeInfo(datetime), Double(aVar.Dta^), arridx)
+        else
+          Serializer.Write(Name, TypeInfo(double), Double(aVar.Dta^), arridx);
+      end;
+    btSingle: Serializer.Write(Name, TypeInfo(single), Single(aVar.Dta^), arridx);
+    btExtended: Serializer.Write(Name, TypeInfo(extended), Extended(aVar.Dta^), arridx);
+    btWideString: Serializer.Write(Name, TypeInfo(widestring), WideString(aVar.Dta^), arridx);
+    btString: Serializer.Write(Name, TypeInfo(string), String(aVar.Dta^), arridx);
+    btArray:
+      begin
+        if (TPSTypeRec_Array(avar.aType).ArrayType.BaseType = btRecord) then
+        begin
+          for i := 0 to PSDynArrayGetLength(Pointer(aVar.Dta^), aVar.aType) -1 do
+          begin
+            r := TROStructure.Create(PSGetArrayField(aVar, i), Exec);
+            try
+              Serializer.Write(Name, typeinfo(TROArray), r, i);
+            finally
+              r.Free;
+            end;
+          end;
+        end else if (TPSTypeRec_Array(avar.aType).ArrayType.BaseType = btArray) then
+        begin
+          for i := 0 to PSDynArrayGetLength(Pointer(aVar.Dta^), aVar.aType) -1 do
+          begin
+            r := TROArray.Create(PSGetArrayField(aVar, i), Exec);
+            try
+              Serializer.Write(Name, typeinfo(TROArray), r, i);
+            finally
+              r.Free;
+            end;
+          end;
+        end else begin
+          for i := 0 to PSDynArrayGetLength(Pointer(aVar.Dta^), aVar.aType) -1 do
+          begin
+            IntWrite(Exec, Serializer, Name, PSGetArrayField(aVar, i), i);
+          end;
+        end;
+      end;
+    btRecord:
+      begin
+        s := avar.aType.ExportName;
+        if copy(s,1, 10) <> '!ROStruct!' then
+          raise Exception.Create('Invalid structure: '+s);
+        Delete(s,1,pos(',',s));
+        for i := 0 to TPSTypeRec_Record(aVar.aType).FieldTypes.Count -1 do
+        begin
+          s2 := copy(s,1,pos(',',s)-1);
+          delete(s,1,pos(',',s));
+          if (TPSTypeRec(TPSTypeRec_Record(aVar.aType).FieldTypes[i]).BaseType = btRecord) then
+          begin
+            r := TROStructure.Create(PSGetRecField(aVar, i), Exec);
+            try
+              Serializer.Write(s2, typeinfo(TROStructure), r, -1);
+            finally
+              r.Free;
+            end;
+          end else if (TPSTypeRec(TPSTypeRec_Record(aVar.aType).FieldTypes[i]).BaseType = btArray)  then
+          begin
+            r := TROArray.Create(PSGetRecField(aVar, i), Exec);
+            try
+              Serializer.Write(s2, typeinfo(TROArray), r, -1);
+            finally
+              r.Free;
+            end;
+          end else
+            IntWrite(Exec, Serializer, s2, PSGetRecField(aVar, i), -1);
+        end;
+      end;
+  else
+    raise Exception.Create('Unable to read type');
+
+  end;
+end;
+
+{ TROStructure }
+
+constructor TROStructure.Create(aVar: TPSVariantIfc; Exec: TPSExec);
+begin
+  inherited Create;
+  FVar := aVar;
+  FExec := Exec;
+end;
+
+function TROStructure.IsNull: Boolean;
+begin
+  Result := False;
+end;
+
+function TROStructure.QueryInterface(const IID: TGUID;
+  out Obj): HResult;
+begin
+  if GetInterface(IID, Obj) then
+    Result := 0
+  else
+    Result := E_NOINTERFACE;
+end;
+
+procedure TROStructure.Read(Serializer: TROSerializer;
+  const Name: string);
+begin
+  IntRead(FExec, Serializer, Name, FVar, -1);
+end;
+
+procedure TROStructure.SetNull(b: Boolean);
+begin
+  // null not supported
+end;
+
+function TROStructure.GetTypeName: string;
+var
+  s: string;
+begin
+  s := fvar.atype.ExportName;
+  delete(s,1,1);
+  delete(s,1,pos('!', s));
+  result := copy(s,1,pos(',',s)-1);
+end;
+
+procedure TROStructure.Write(Serializer: TROSerializer;
+  const Name: string);
+begin
+  IntWrite(FExec, Serializer, Name, FVar, -1);
+end;
+
+
+function TROStructure._AddRef: Integer;
+begin
+  // do nothing
+  Result := 1;
+end;
+
+function TROStructure._Release: Integer;
+begin
+  // do nothing
+  Result := 1;
+end;
+
+function TROStructure.CanImplementType(const aName: string): boolean;
+begin
+  if SameText(aName, Self.GetTypeName) then
+    Result := True
+  else
+    Result := False;
+end;
+
+procedure TROStructure.SetTypeName(const s: string);
+begin
+  // Do nothing  
+end;
+
+{ TROArray }
+
+function TROArray.GetCount: Longint;
+begin
+
+  // we should have an array in pVar now so assume that's true
+  Result := PSDynArrayGetLength(Pointer(fVar.Dta^), fvar.aType);
+end;
+
+procedure TROArray.SetCount(l: Integer);
+begin
+  PSDynArraySetLength(Pointer(fVAr.Dta^), fVar.aType, l);
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/Source/x86.inc b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/x86.inc
new file mode 100644
index 0000000..0e94fed
--- /dev/null
+++ b/internal/5.0.35.741/1/Pascal Script for Delphi/Source/x86.inc	
@@ -0,0 +1,713 @@
+{ implementation of x86 abi }
+
+function RealFloatCall_Register(p: Pointer;
+  _EAX, _EDX, _ECX: Cardinal;
+  StackData: Pointer;
+  StackDataLen: Longint // stack length are in 4 bytes. (so 1 = 4 bytes)
+  ): Extended; Stdcall; // make sure all things are on stack
+var
+  E: Extended;
+begin
+  asm
+    mov ecx, stackdatalen
+    jecxz @@2
+    mov eax, stackdata
+    @@1:
+    mov edx, [eax]
+    push edx
+    sub eax, 4
+    dec ecx
+    or ecx, ecx
+    jnz @@1
+    @@2:
+    mov eax,_EAX
+    mov edx,_EDX
+    mov ecx,_ECX
+    call p
+    fstp tbyte ptr [e]
+  end;
+  Result := E;
+end;
+
+function RealFloatCall_Other(p: Pointer;
+  StackData: Pointer;
+  StackDataLen: Longint // stack length are in 4 bytes. (so 1 = 4 bytes)
+  ): Extended; Stdcall; // make sure all things are on stack
+var
+  E: Extended;
+begin
+  asm
+    mov ecx, stackdatalen
+    jecxz @@2
+    mov eax, stackdata
+    @@1:
+    mov edx, [eax]
+    push edx
+    sub eax, 4
+    dec ecx
+    or ecx, ecx
+    jnz @@1
+    @@2:
+    call p
+    fstp tbyte ptr [e]
+  end;
+  Result := E;
+end;
+
+function RealFloatCall_CDecl(p: Pointer;
+  StackData: Pointer;
+  StackDataLen: Longint // stack length are in 4 bytes. (so 1 = 4 bytes)
+  ): Extended; Stdcall; // make sure all things are on stack
+var
+  E: Extended;
+begin
+  asm
+    mov ecx, stackdatalen
+    jecxz @@2
+    mov eax, stackdata
+    @@1:
+    mov edx, [eax]
+    push edx
+    sub eax, 4
+    dec ecx
+    or ecx, ecx
+    jnz @@1
+    @@2:
+    call p
+    fstp tbyte ptr [e]
+    @@5:
+    mov ecx, stackdatalen
+    jecxz @@2
+    @@6:
+    pop edx
+    dec ecx
+    or ecx, ecx
+    jnz @@6
+  end;
+  Result := E;
+end;
+
+function RealCall_Register(p: Pointer;
+  _EAX, _EDX, _ECX: Cardinal;
+  StackData: Pointer;
+  StackDataLen: Longint; // stack length are in 4 bytes. (so 1 = 4 bytes)
+  ResultLength: Longint; ResEDX: Pointer): Longint; Stdcall; // make sure all things are on stack
+var
+  r: Longint;
+begin
+  asm
+    mov ecx, stackdatalen
+    jecxz @@2
+    mov eax, stackdata
+    @@1:
+    mov edx, [eax]
+    push edx
+    sub eax, 4
+    dec ecx
+    or ecx, ecx
+    jnz @@1
+    @@2:
+    mov eax,_EAX
+    mov edx,_EDX
+    mov ecx,_ECX
+    call p
+    mov ecx, resultlength
+    cmp ecx, 0
+    je @@5
+    cmp ecx, 1
+    je @@3
+    cmp ecx, 2
+    je @@4
+    mov r, eax
+    jmp @@5
+    @@3:
+    xor ecx, ecx
+    mov cl, al
+    mov r, ecx
+    jmp @@5
+    @@4:
+    xor ecx, ecx
+    mov cx, ax
+    mov r, ecx
+    @@5:
+    mov ecx, resedx
+    jecxz @@6
+    mov [ecx], edx
+    @@6:
+  end;
+  Result := r;
+end;
+
+function RealCall_Other(p: Pointer;
+  StackData: Pointer;
+  StackDataLen: Longint; // stack length are in 4 bytes. (so 1 = 4 bytes)
+  ResultLength: Longint; ResEDX: Pointer): Longint; Stdcall; // make sure all things are on stack
+var
+  r: Longint;
+begin
+  asm
+    mov ecx, stackdatalen
+    jecxz @@2
+    mov eax, stackdata
+    @@1:
+    mov edx, [eax]
+    push edx
+    sub eax, 4
+    dec ecx
+    or ecx, ecx
+    jnz @@1
+    @@2:
+    call p
+    mov ecx, resultlength
+    cmp ecx, 0
+    je @@5
+    cmp ecx, 1
+    je @@3
+    cmp ecx, 2
+    je @@4
+    mov r, eax
+    jmp @@5
+    @@3:
+    xor ecx, ecx
+    mov cl, al
+    mov r, ecx
+    jmp @@5
+    @@4:
+    xor ecx, ecx
+    mov cx, ax
+    mov r, ecx
+    @@5:
+    mov ecx, resedx
+    jecxz @@6
+    mov [ecx], edx
+    @@6:
+  end;
+  Result := r;
+end;
+
+function RealCall_CDecl(p: Pointer;
+  StackData: Pointer;
+  StackDataLen: Longint; // stack length are in 4 bytes. (so 1 = 4 bytes)
+  ResultLength: Longint; ResEDX: Pointer): Longint; Stdcall; // make sure all things are on stack
+var
+  r: Longint;
+begin
+  asm
+    mov ecx, stackdatalen
+    jecxz @@2
+    mov eax, stackdata
+    @@1:
+    mov edx, [eax]
+    push edx
+    sub eax, 4
+    dec ecx
+    or ecx, ecx
+    jnz @@1
+    @@2:
+    call p
+    mov ecx, resultlength
+    cmp ecx, 0
+    je @@5
+    cmp ecx, 1
+    je @@3
+    cmp ecx, 2
+    je @@4
+    mov r, eax
+    jmp @@5
+    @@3:
+    xor ecx, ecx
+    mov cl, al
+    mov r, ecx
+    jmp @@5
+    @@4:
+    xor ecx, ecx
+    mov cx, ax
+    mov r, ecx
+    @@5:
+    mov ecx, stackdatalen
+    jecxz @@7
+    @@6:
+    pop eax
+    dec ecx
+    or ecx, ecx
+    jnz @@6
+    mov ecx, resedx
+    jecxz @@7
+    mov [ecx], edx
+    @@7:
+  end;
+  Result := r;
+end;
+
+const
+  EmptyPchar: array[0..0] of char = #0;
+
+function TPSExec.InnerfuseCall(_Self, Address: Pointer; CallingConv: TPSCallingConvention; Params: TPSList; res: PPSVariantIFC): Boolean;
+var
+  Stack: ansistring;
+  I: Longint;
+  RegUsage: Byte;
+  CallData: TPSList;
+  pp: ^Byte;
+
+  EAX, EDX, ECX: Longint;
+
+  function rp(p: PPSVariantIFC): PPSVariantIFC;
+  begin
+    if p = nil then
+    begin
+      result := nil;
+      exit;
+    end;
+    if p.aType.BaseType = btPointer then
+    begin
+      p^.aType := Pointer(Pointer(IPointer(p^.dta) + 4)^);
+      p^.Dta := Pointer(p^.dta^);
+    end;
+    Result := p;
+  end;
+
+  function GetPtr(fVar: PPSVariantIFC): Boolean;
+  var
+    varPtr: Pointer;
+    UseReg: Boolean;
+    tempstr: tbtstring;
+    p: Pointer;
+  begin
+    Result := False;
+    if FVar = nil then exit;
+    if fVar.VarParam then
+    begin
+      case fvar.aType.BaseType of
+        btArray:
+          begin
+            if Copy(fvar.aType.ExportName, 1, 10) = '!OPENARRAY' then
+            begin
+              p := CreateOpenArray(True, Self, FVar);
+              if p = nil then exit;
+              CallData.Add(p);
+              case RegUsage of
+                0: begin EAX := Longint(POpenArray(p)^.Data); Inc(RegUsage); end;
+                1: begin EDX := Longint(POpenArray(p)^.Data); Inc(RegUsage); end;
+                2: begin ECX := Longint(POpenArray(p)^.Data); Inc(RegUsage); end;
+                else begin
+                  Stack := #0#0#0#0 + Stack;
+                  Pointer((@Stack[1])^) := POpenArray(p)^.Data;
+                end;
+              end;
+              case RegUsage of
+                0: begin EAX := Longint(POpenArray(p)^.ItemCount - 1); Inc(RegUsage); end;
+                1: begin EDX := Longint(POpenArray(p)^.ItemCount -1); Inc(RegUsage); end;
+                2: begin ECX := Longint(POpenArray(p)^.ItemCount -1); Inc(RegUsage); end;
+                else begin
+                  Stack := #0#0#0#0 + Stack;
+                  Longint((@Stack[1])^) := POpenArray(p)^.ItemCount -1;
+                end;
+              end;
+              Result := True;
+              Exit;
+            end else begin
+            {$IFDEF PS_DYNARRAY}
+              varptr := fvar.Dta;
+            {$ELSE}
+              Exit;
+            {$ENDIF}
+            end;
+          end;
+        btVariant,
+        btSet,
+        btStaticArray,
+        btRecord,
+        btInterface,
+        btClass,
+        {$IFNDEF PS_NOWIDESTRING} btWideString, btWideChar, {$ENDIF} btU8, btS8, btU16,
+        btS16, btU32, btS32, btSingle, btDouble, btExtended, btString, btPChar, btChar, btCurrency
+        {$IFNDEF PS_NOINT64}, bts64{$ENDIF}:
+          begin
+            Varptr := fvar.Dta;
+          end;
+      else begin
+          exit; //invalid type
+        end;
+      end; {case}
+      case RegUsage of
+        0: begin EAX := Longint(VarPtr); Inc(RegUsage); end;
+        1: begin EDX := Longint(VarPtr); Inc(RegUsage); end;
+        2: begin ECX := Longint(VarPtr); Inc(RegUsage); end;
+        else begin
+          Stack := #0#0#0#0 + Stack;
+          Pointer((@Stack[1])^) := VarPtr;
+        end;
+      end;
+    end else begin
+      UseReg := True;
+      case fVar^.aType.BaseType of
+        btSet:
+          begin
+            tempstr := #0#0#0#0;
+            case TPSTypeRec_Set(fvar.aType).aByteSize of
+              1: Byte((@tempstr[1])^) := byte(fvar.dta^);
+              2: word((@tempstr[1])^) := word(fvar.dta^);
+              3, 4: cardinal((@tempstr[1])^) := cardinal(fvar.dta^);
+              else
+                pointer((@tempstr[1])^) := fvar.dta;
+            end;
+          end;
+        btArray:
+          begin
+            if Copy(fvar^.aType.ExportName, 1, 10) = '!OPENARRAY' then
+            begin
+              p := CreateOpenArray(False, SElf, FVar);
+              if p =nil then exit;
+              CallData.Add(p);
+              case RegUsage of
+                0: begin EAX := Longint(POpenArray(p)^.Data); Inc(RegUsage); end;
+                1: begin EDX := Longint(POpenArray(p)^.Data); Inc(RegUsage); end;
+                2: begin ECX := Longint(POpenArray(p)^.Data); Inc(RegUsage); end;
+                else begin
+                  Stack := #0#0#0#0 + Stack;
+                  Pointer((@Stack[1])^) := POpenArray(p)^.Data;
+                end;
+              end;
+              case RegUsage of
+                0: begin EAX := Longint(POpenArray(p)^.ItemCount -1); Inc(RegUsage); end;
+                1: begin EDX := Longint(POpenArray(p)^.ItemCount -1); Inc(RegUsage); end;
+                2: begin ECX := Longint(POpenArray(p)^.ItemCount -1); Inc(RegUsage); end;
+                else begin
+                  Stack := #0#0#0#0 + Stack;
+                  Longint((@Stack[1])^) := POpenArray(p)^.ItemCount -1;
+                end;
+              end;
+              Result := True;
+              exit;
+            end else begin
+            {$IFDEF PS_DYNARRAY}
+              TempStr := #0#0#0#0;
+              Pointer((@TempStr[1])^) := Pointer(fvar.Dta^);
+            {$ELSE}
+              Exit;
+            {$ENDIF}
+            end;
+          end;
+        btVariant
+        , btStaticArray, btRecord:
+          begin
+            TempStr := #0#0#0#0;
+            Pointer((@TempStr[1])^) := Pointer(fvar.Dta);
+          end;
+        btDouble: {8 bytes} begin
+            TempStr := #0#0#0#0#0#0#0#0;
+            UseReg := False;
+            double((@TempStr[1])^) := double(fvar.dta^);
+          end;
+        btCurrency: {8 bytes} begin
+            TempStr := #0#0#0#0#0#0#0#0;
+            UseReg := False;
+            currency((@TempStr[1])^) := currency(fvar.dta^);
+          end;
+        btSingle: {4 bytes} begin
+            TempStr := #0#0#0#0;
+            UseReg := False;
+            Single((@TempStr[1])^) := single(fvar.dta^);
+          end;
+
+        btExtended: {10 bytes} begin
+            UseReg := False;
+            TempStr:= #0#0#0#0#0#0#0#0#0#0#0#0;
+            Extended((@TempStr[1])^) := extended(fvar.dta^);
+          end;
+        btChar,
+        btU8,
+        btS8: begin
+            TempStr := tbtchar(fVar^.dta^) + tbtstring(#0#0#0);
+          end;
+        {$IFNDEF PS_NOWIDESTRING}btWideChar, {$ENDIF}
+        btu16, btS16: begin
+            TempStr := #0#0#0#0;
+            Word((@TempStr[1])^) := word(fVar^.dta^);
+          end;
+        btu32, bts32: begin
+            TempStr := #0#0#0#0;
+            Longint((@TempStr[1])^) := Longint(fVar^.dta^);
+          end;
+        btPchar:
+          begin
+            TempStr := #0#0#0#0;
+            if pointer(fvar^.dta^) = nil then
+              Pointer((@TempStr[1])^) := @EmptyPchar
+            else
+              Pointer((@TempStr[1])^) := pointer(fvar^.dta^);
+          end;
+        btclass, btinterface, btString:
+          begin
+            TempStr := #0#0#0#0;
+            Pointer((@TempStr[1])^) := pointer(fvar^.dta^);
+          end;
+          {$IFNDEF PS_NOWIDESTRING}
+        btWideString: begin
+            TempStr := #0#0#0#0;
+            Pointer((@TempStr[1])^) := pointer(fvar^.dta^);
+          end;
+          {$ENDIF}
+
+        btProcPtr:
+          begin
+            tempstr := #0#0#0#0#0#0#0#0;
+            TMethod((@TempStr[1])^) := MKMethod(Self, Longint(FVar.Dta^));
+            UseReg := false;
+          end;
+
+        {$IFNDEF PS_NOINT64}bts64:
+          begin
+            TempStr:= #0#0#0#0#0#0#0#0;
+            Int64((@TempStr[1])^) := int64(fvar^.dta^);
+            UseReg := False;
+        end;{$ENDIF}
+      end; {case}
+      if UseReg then
+      begin
+        case RegUsage of
+          0: begin EAX := Longint((@Tempstr[1])^); Inc(RegUsage); end;
+          1: begin EDX := Longint((@Tempstr[1])^); Inc(RegUsage); end;
+          2: begin ECX := Longint((@Tempstr[1])^); Inc(RegUsage); end;
+          else begin
+          {$IFDEF FPC}
+            if CallingConv = cdRegister then
+            Stack := Stack + TempStr
+          else
+          {$ENDIF}
+            Stack := TempStr + Stack;
+          end;
+        end;
+      end else begin
+        {$IFDEF FPC}
+            if CallingConv = cdRegister then
+            Stack := Stack + TempStr
+          else
+          {$ENDIF}
+          Stack := TempStr + Stack;
+      end;
+    end;
+    Result := True;
+  end;
+begin
+  InnerfuseCall := False;
+  if Address = nil then
+    exit; // need address
+  Stack := '';
+  CallData := TPSList.Create;
+  res := rp(res);
+  if res <> nil then
+    res.VarParam := true;
+  try
+    case CallingConv of
+      cdRegister: begin
+          EAX := 0;
+          EDX := 0;
+          ECX := 0;
+          RegUsage := 0;
+          if assigned(_Self) then begin
+            RegUsage := 1;
+            EAX := Longint(_Self);
+          end;
+          for I := 0 to Params.Count - 1 do
+          begin
+            if not GetPtr(rp(Params[I])) then Exit;
+          end;
+          if assigned(res) then begin
+            case res^.aType.BaseType of
+              {$IFNDEF PS_NOWIDESTRING}btWideString, {$ENDIF}
+              btInterface, btArray, btrecord, {$IFNDEF PS_FPCSTRINGWORKAROUND}btstring, {$ENDIF}btVariant, btStaticArray: GetPtr(res);
+              btSet:
+                begin
+                  if TPSTypeRec_Set(res.aType).aByteSize >4 then GetPtr(res);
+                end;
+            end;
+            case res^.aType.BaseType of
+              btSet:
+                begin
+                  case TPSTypeRec_Set(res.aType).aByteSize  of
+                    1: byte(res.Dta^) := RealCall_Register(Address, EAX, EDX, ECX, @Stack[Length(Stack)-3], Length(Stack) div 4, 1, nil);
+                    2: word(res.Dta^) := RealCall_Register(Address, EAX, EDX, ECX, @Stack[Length(Stack)-3], Length(Stack) div 4, 2, nil);
+                    3,
+                    4: Longint(res.Dta^) := RealCall_Register(Address, EAX, EDX, ECX, @Stack[Length(Stack)-3], Length(Stack) div 4, 4, nil);
+                    else RealCall_Register(Address, EAX, EDX, ECX, @Stack[Length(Stack)-3], Length(Stack) div 4, 0, nil)
+                  end;
+                end;
+              btSingle:      tbtsingle(res.Dta^) := RealFloatCall_Register(Address, EAX, EDX, ECX, @Stack[Length(Stack)-3], Length(Stack) div 4);
+              btDouble:      tbtdouble(res.Dta^) := RealFloatCall_Register(Address, EAX, EDX, ECX, @Stack[Length(Stack)-3], Length(Stack) div 4);
+              btExtended:    tbtextended(res.Dta^) := RealFloatCall_Register(Address, EAX, EDX, ECX, @Stack[Length(Stack)-3], Length(Stack) div 4);
+              btchar,btU8, btS8:    tbtu8(res.dta^) := RealCall_Register(Address, EAX, EDX, ECX, @Stack[Length(Stack)-3], Length(Stack) div 4, 1, nil);
+              {$IFNDEF PS_NOWIDESTRING}btWideChar, {$ENDIF}btu16, bts16:  tbtu16(res.dta^) := RealCall_Register(Address, EAX, EDX, ECX, @Stack[Length(Stack)-3], Length(Stack) div 4, 2, nil);
+              btClass :
+              {$IFNDEF FPC}
+              tbtu32(res.dta^) := RealCall_Register(Address, EAX, EDX, ECX,
+              @Stack[Length(Stack) - 3], Length(Stack) div 4, 4, nil);
+              {$ELSE}
+              tbtu32(res.dta^) := RealCall_Register(Address, EDX, EAX, ECX,
+              @Stack[Length(Stack) - 3], Length(Stack) div 4, 4, nil);
+              {$ENDIF}
+
+              btu32,bts32:   tbtu32(res.dta^) := RealCall_Register(Address, EAX, EDX, ECX, @Stack[Length(Stack)-3], Length(Stack) div 4, 4, nil);
+              btPChar:       pansichar(res.dta^) := Pansichar(RealCall_Register(Address, EAX, EDX, ECX, @Stack[Length(Stack)-3], Length(Stack) div 4, 4, nil));
+              {$IFNDEF PS_NOINT64}bts64:
+                begin
+                  EAX := RealCall_Register(Address, EAX, EDX, ECX, @Stack[Length(Stack)-3], Length(Stack) div 4, 4, @EDX);
+                  tbts64(res.dta^) := Int64(Cardinal(EDX)) shl 32 or Cardinal(EAX);
+                end;
+              {$ENDIF}
+              btCurrency:    tbtCurrency(res.Dta^) := RealFloatCall_Register(Address, EAX, EDX, ECX, @Stack[Length(Stack)-3], Length(Stack) div 4) / 10000;
+              btInterface,
+              btVariant,
+              {$IFNDEF PS_NOWIDESTRING}btWidestring, {$ENDIF}
+              btStaticArray, btArray, btrecord{$IFNDEF PS_FPCSTRINGWORKAROUND}, btstring {$ENDIF}:      RealCall_Register(Address, EAX, EDX, ECX, @Stack[Length(Stack)-3], Length(Stack) div 4, 0, nil);
+              {$IFDEF PS_FPCSTRINGWORKAROUND}
+              btstring: begin
+                 eax := RealCall_Register(Address, EAX, EDX, ECX, @Stack[Length(Stack)-3], Length(Stack) div 4, 4, nil);
+                 Longint(res.dta^) := eax;
+              end;
+              {$ENDIF}
+            else
+              exit;
+            end;
+          end else
+            RealCall_Register(Address, EAX, EDX, ECX, @Stack[Length(Stack)-3], Length(Stack) div 4, 0, nil);
+          Result := True;
+        end;
+      cdPascal: begin
+          RegUsage := 3;
+          for I :=  0 to Params.Count - 1 do begin
+            if not GetPtr(Params[i]) then Exit;
+          end;
+          if assigned(res) then begin
+            case res^.aType.BaseType of
+              {$IFNDEF PS_NOWIDESTRING}btWideString, {$ENDIF}btInterface, btArray, btrecord, btstring, btVariant: GetPtr(res);
+            end;
+          end;
+          if assigned(_Self) then begin
+            Stack := #0#0#0#0 +Stack;
+            Pointer((@Stack[1])^) := _Self;
+          end;
+          if assigned(res) then begin
+            case res^.aType.BaseType of
+              btSingle:      tbtsingle(res^.Dta^) := RealFloatCall_Other(Address, @Stack[Length(Stack)-3], Length(Stack) div 4);
+              btDouble:      tbtdouble(res^.Dta^) := RealFloatCall_Other(Address, @Stack[Length(Stack)-3], Length(Stack) div 4);
+              btExtended:    tbtextended(res^.Dta^) := RealFloatCall_Other(Address, @Stack[Length(Stack)-3], Length(Stack) div 4);
+              btChar, btU8, btS8:    tbtu8(res^.Dta^) := RealCall_Other(Address, @Stack[Length(Stack)-3], Length(Stack) div 4, 1, nil);
+              {$IFNDEF PS_NOWIDESTRING}btWideChar, {$ENDIF}btu16, bts16:  tbtu16(res^.Dta^) := RealCall_Other(Address, @Stack[Length(Stack)-3], Length(Stack) div 4, 2, nil);
+              btClass, btu32, bts32:  tbtu32(res^.Dta^):= RealCall_Other(Address, @Stack[Length(Stack)-3], Length(Stack) div 4, 4, nil);
+              btPChar:       TBTSTRING(res^.dta^) := Pansichar(RealCall_Other(Address, @Stack[Length(Stack)-3], Length(Stack) div 4, 4, nil));
+              {$IFNDEF PS_NOINT64}bts64:
+                begin
+                  EAX := RealCall_Other(Address, @Stack[Length(Stack)-3], Length(Stack) div 4, 4, @EDX);
+                  tbts64(res^.dta^) := Int64(EAX) shl 32 or EDX;
+                end;
+              {$ENDIF}
+              btVariant,
+              btInterface, btrecord, btstring: RealCall_Other(Address, @Stack[Length(Stack)-3], Length(Stack) div 4, 0, nil);
+            else
+              exit;
+            end;
+          end else
+            RealCall_Other(Address, @Stack[Length(Stack)-3], Length(Stack) div 4, 0, nil);
+          Result := True;
+        end;
+      cdSafeCall: begin
+          RegUsage := 3;
+          if assigned(res) then begin
+            GetPtr(res);
+          end;
+          for I :=  Params.Count - 1 downto 0 do begin
+            if not GetPtr(Params[i]) then Exit;
+          end;
+          if assigned(_Self) then begin
+            Stack := #0#0#0#0 +Stack;
+            Pointer((@Stack[1])^) := _Self;
+          end;
+          OleCheck(RealCall_Other(Address, @Stack[Length(Stack)-3], Length(Stack) div 4, 4, nil));
+          Result := True;
+        end;
+
+      CdCdecl: begin
+          RegUsage := 3;
+          if assigned(_Self) then begin
+            Stack := #0#0#0#0;
+            Pointer((@Stack[1])^) := _Self;
+          end;
+          for I := Params.Count - 1 downto 0 do begin
+            if not GetPtr(Params[I]) then Exit;
+          end;
+          if assigned(res) then begin
+            case res^.aType.BaseType of
+              btSingle:      tbtsingle(res^.dta^) := RealFloatCall_Cdecl(Address, @Stack[Length(Stack)-3], Length(Stack) div 4);
+              btDouble:      tbtdouble(res^.dta^) := RealFloatCall_Cdecl(Address, @Stack[Length(Stack)-3], Length(Stack) div 4);
+              btExtended:    tbtextended(res^.dta^) := RealFloatCall_Cdecl(Address, @Stack[Length(Stack)-3], Length(Stack) div 4);
+              btCHar, btU8, btS8:    tbtu8(res^.dta^) := RealCall_Cdecl(Address, @Stack[Length(Stack)-3], Length(Stack) div 4, 1, nil);
+              {$IFNDEF PS_NOWIDESTRING}btWideChar, {$ENDIF}btu16, bts16:  tbtu16(res^.dta^) := RealCall_Cdecl(Address, @Stack[Length(Stack)-3], Length(Stack) div 4, 2, nil);
+              btClass, btu32, bts32:  tbtu32(res^.dta^) := RealCall_Cdecl(Address, @Stack[Length(Stack)-3], Length(Stack) div 4, 4, nil);
+              btPChar:       TBTSTRING(res^.dta^) := Pansichar(RealCall_Cdecl(Address, @Stack[Length(Stack)-3], Length(Stack) div 4, 4, nil));
+              {$IFNDEF PS_NOINT64}bts64:
+                begin
+                  EAX := RealCall_CDecl(Address, @Stack[Length(Stack)-3], Length(Stack) div 4, 4, @EDX);
+                  tbts64(res^.Dta^) := Int64(EAX) shl 32 or EDX;
+                end;
+              {$ENDIF}
+              btVariant, {$IFNDEF PS_NOWIDESTRING}btWideString, {$ENDIF}
+              btInterface,
+              btArray, btrecord, btstring:      begin GetPtr(res); RealCall_Cdecl(Address, @Stack[Length(Stack)-3], Length(Stack) div 4, 0, nil); end;
+            else
+              exit;
+            end;
+          end else begin
+            RealCall_CDecl(Address, @Stack[Length(Stack)-3], Length(Stack) div 4, 0, nil);
+          end;
+          Result := True;
+        end;
+      CdStdCall: begin
+          RegUsage := 3;
+          for I := Params.Count - 1 downto 0 do begin
+            if not GetPtr(Params[I]) then exit;
+          end;
+          if assigned(_Self) then begin
+            Stack := #0#0#0#0 + Stack;
+            Pointer((@Stack[1])^) := _Self;
+          end;
+          if assigned(res) then begin
+            case res^.aType.BaseType of
+              btSingle:  tbtsingle(res^.dta^) := RealFloatCall_Other(Address, @Stack[Length(Stack)-3], Length(Stack) div 4);
+              btDouble:      tbtdouble(res^.dta^) := RealFloatCall_Other(Address, @Stack[Length(Stack)-3], Length(Stack) div 4);
+              btExtended:    tbtextended(res^.dta^):= RealFloatCall_Other(Address, @Stack[Length(Stack)-3], Length(Stack) div 4);
+              btChar, btU8, btS8:    tbtu8(res^.dta^) := RealCall_Other(Address, @Stack[Length(Stack)-3], Length(Stack) div 4, 1, nil);
+              {$IFNDEF PS_NOWIDESTRING}btWideChar, {$ENDIF}btu16, bts16:  tbtu16(res^.dta^) := RealCall_Other(Address, @Stack[Length(Stack)-3], Length(Stack) div 4, 2, nil);
+              btclass, btu32, bts32:  tbtu32(res^.dta^) := RealCall_Other(Address, @Stack[Length(Stack)-3], Length(Stack) div 4, 4, nil);
+              btPChar:       TBTSTRING(res^.dta^) := Pansichar(RealCall_Other(Address, @Stack[Length(Stack)-3], Length(Stack) div 4, 4, nil));
+              {$IFNDEF PS_NOINT64}bts64:
+                begin
+                  EAX := RealCall_Other(Address, @Stack[Length(Stack)-3], Length(Stack) div 4, 4, @EDX);
+                  tbts64(res^.dta^) := Int64(EAX) shl 32 or EDX;
+                end;
+              {$ENDIF}
+              btVariant, {$IFNDEF PS_NOWIDESTRING}btWideString, {$ENDIF}
+              btInterface, btArray, btrecord, btstring: begin GetPtr(res); RealCall_Other(Address, @Stack[Length(Stack)-3], Length(Stack) div 4, 0, nil); end;
+            else
+              exit;
+            end;
+          end else begin
+            RealCall_Other(Address, @Stack[Length(Stack)-3], Length(Stack) div 4, 0, nil);
+          end;
+          Result := True;
+        end;
+    end;
+  finally
+    for i := CallData.Count -1 downto 0 do
+    begin
+      pp := CallData[i];
+      case pp^ of
+        0: DestroyOpenArray(Self, Pointer(pp));
+      end;
+    end;
+    CallData.Free;
+  end;
+end;
+
+
diff --git a/internal/5.0.35.741/1/Pascal Script for Delphi/ps.png b/internal/5.0.35.741/1/Pascal Script for Delphi/ps.png
new file mode 100644
index 0000000..d9e364b
Binary files /dev/null and b/internal/5.0.35.741/1/Pascal Script for Delphi/ps.png differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/MasterServer_Data/Messages.nx1 b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/MasterServer_Data/Messages.nx1
new file mode 100644
index 0000000..1bbc406
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/MasterServer_Data/Messages.nx1 differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/MasterServer_Data/MessagesPerSession.nx1 b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/MasterServer_Data/MessagesPerSession.nx1
new file mode 100644
index 0000000..9a402e3
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/MasterServer_Data/MessagesPerSession.nx1 differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/MasterServer_Data/Sessions.nx1 b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/MasterServer_Data/Sessions.nx1
new file mode 100644
index 0000000..39b94a6
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/MasterServer_Data/Sessions.nx1 differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/MasterServer_Data/nxTrans.cfg b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/MasterServer_Data/nxTrans.cfg
new file mode 100644
index 0000000..003aee3
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/MasterServer_Data/nxTrans.cfg differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROCOM.dll b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROCOM.dll
new file mode 100644
index 0000000..8a987d3
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROCOM.dll differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/RODL.exe b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/RODL.exe
new file mode 100644
index 0000000..2dd9962
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/RODL.exe differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROMasterServer.exe b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROMasterServer.exe
new file mode 100644
index 0000000..7b965b8
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROMasterServer.exe differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBBCB.dll b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBBCB.dll
new file mode 100644
index 0000000..b5eb82f
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBBCB.dll differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBDataAbstract.codetemplates.cfg b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBDataAbstract.codetemplates.cfg
new file mode 100644
index 0000000..7d493c2
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBDataAbstract.codetemplates.cfg	
@@ -0,0 +1,88 @@
+[OneSchemaMethod-Delphi]
+var
+  lDataSet:IDADataSet;
+begin
+  { This method body was auto-generated to retrieve the schema of your datasets.
+    You can now modify it to suite your needs. }
+
+  { ToDO: Rename the Schema reference below to match the name of your Schema component }
+
+  result := Binary.Create();
+  lDataSet := %SCHEMA%.NewDataset(Connection, aDataSet);
+  BinAdapter.WriteDataset(result, lDataSet, [woSchema], 0);
+end;
+
+
+[OneGetMethod-Delphi]
+var
+  lDataSet:IDADataSet;
+begin
+  { This method body was auto-generated to retrieve the rows of your datasets.
+    You can now modify it to suite your needs. }
+
+  { ToDO: Rename the Schema reference below to match the name of your Schema component }
+
+  result := Binary.Create();
+  lDataSet := %SCHEMA%.NewDataset(Connection, aDataSet);
+  BinAdapter.WriteDataset(result, lDataSet, [woRows], -1);
+end;
+
+
+[OneUpdateMethod-Delphi]
+begin
+  { Implement yourself ;-}
+  result := nil;
+end;
+
+
+[SchemaMethodPerDataSet-Delphi]
+var
+  lDataSet:IDADataSet;
+begin
+  { This method body was auto-generated to retrieve the schema of your %DATASET% dataset.
+    You can now modify it to suite your needs. }
+
+  { ToDO: Rename the Schema reference below to match the name of your Schema component }
+
+  result := Binary.Create();
+  lDataSet := %SCHEMA%.NewDataset(Connection, %DATASET%);
+  BinAdapter.WriteDataset(result, lDataSet, [woSchema], 0);
+end;
+
+
+[GetMethodPerDataSet-Delphi]
+var
+  lDataSet:IDADataSet;
+begin
+  { This method body was auto-generated to retrieve the rows of your %DATASET% dataset.
+    You can now modify it to suite your needs. }
+
+  { ToDO: Rename the Schema reference below to match the name of your Schema component }
+
+  result := Binary.Create();
+  lDataSet := %SCHEMA%.NewDataset(Connection, %DATASET%);
+  BinAdapter.WriteDataset(result, lDataSet, [woRows], -1);
+end;
+
+
+[UpdateMethodPerDataSet-Delphi]
+begin
+  { Implement yourself ;-}
+  result := nil;
+end;
+
+[GetSchemaXmlMethod-Delphi]
+begin  
+  { This method body was auto-generated to allow access to your XML schema. 
+    You might want to disable this functionality in release builds for security 
+    reasons by putting in the FDEFs below. }
+
+  { ToDo: Rename the Schema reference below to match the name of your Schema component }
+
+  {.$IFDEF RELEASE_BUILD}
+  result := Binary.Create();
+  %SCHEMA%.SaveToStream(result);
+  {.$ELSE}
+  { result := nil; }
+  {.$ENDIF RELEASE_BUILD}
+end;
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBDataAbstract.dll b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBDataAbstract.dll
new file mode 100644
index 0000000..7f7fb96
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBDataAbstract.dll differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBDefaultEditor.dll b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBDefaultEditor.dll
new file mode 100644
index 0000000..5cbc32d
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBDefaultEditor.dll differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBDefaultValidator.dll b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBDefaultValidator.dll
new file mode 100644
index 0000000..32d3569
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBDefaultValidator.dll differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBDelphi.dll b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBDelphi.dll
new file mode 100644
index 0000000..9a996d7
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBDelphi.dll differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBJSONRPC.dll b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBJSONRPC.dll
new file mode 100644
index 0000000..daffd9f
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBJSONRPC.dll differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBPHP.dll b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBPHP.dll
new file mode 100644
index 0000000..229de31
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBPHP.dll differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBPasImporter.dll b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBPasImporter.dll
new file mode 100644
index 0000000..e8fcfbb
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBPasImporter.dll differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBSOAP.dll b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBSOAP.dll
new file mode 100644
index 0000000..1b54bf5
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBSOAP.dll differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBStandardImporters.dll b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBStandardImporters.dll
new file mode 100644
index 0000000..f2b6821
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBStandardImporters.dll differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBStandardViews.dll b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBStandardViews.dll
new file mode 100644
index 0000000..4aa0246
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBStandardViews.dll differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBTLBImporter.dll b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBTLBImporter.dll
new file mode 100644
index 0000000..2055bd8
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROSBTLBImporter.dll differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROServiceBuilder.chm b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROServiceBuilder.chm
new file mode 100644
index 0000000..5906701
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROServiceBuilder.chm differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROServiceBuilder.exe b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROServiceBuilder.exe
new file mode 100644
index 0000000..33b0fd1
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROServiceBuilder.exe differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROServiceBuilder70.bpl b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROServiceBuilder70.bpl
new file mode 100644
index 0000000..ece99ff
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROServiceBuilder70.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROServiceTester.connections.cfg b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROServiceTester.connections.cfg
new file mode 100644
index 0000000..cbc7474
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROServiceTester.connections.cfg differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROServiceTester.exe b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROServiceTester.exe
new file mode 100644
index 0000000..2f2dbee
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/ROServiceTester.exe differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/RemObjects SDK.lic b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/RemObjects SDK.lic
new file mode 100644
index 0000000..a20358e
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/RemObjects SDK.lic	
@@ -0,0 +1,18 @@
+6aea9dd6c35821483bcdabeab181cc2200cdc937837364a66de483b256b8869a7052c450228af4efeca699d550f0b6814fc3d00373f8e8eba7e572e90246813da76f16f53d68e9138831de9714263b6801de791a86b053335babcdd5ebc98864af8e51f0eeb2c2f457af88dbb790d51c8b8f76ad87808d0bc5526bb59f3a8d619c3652fb34e3056d3914832fc6244c9e0cad62bc45ac35bfbdacf027a987e3464ee1b7e63dbb9650d026d2b2d75320fbe3aa941ae0614fb55eed1b461bac4d333f195d0bd1e4bc1e614c2f1afa4af374099ee1d2f89a5afe121e1e4d9a7c6ec3bcd09c5fce9ad10c2f3bef8f03f972e627e39a90d9483874921c596bac89e9a1
+9c742c30b84e748c62e0a3bb5eae16c78f0e4b2e91340cea7cc82577d592a22d415bd7263eab121b77305b69d451decac7ce86e9a48ef514c9f05c7a41f5a96a
+Name=Trial
+Email=Trial
+UserId=Trial
+Company=Trial
+LicenseType=Default
+ProductName=RemObjects SDK
+Version=5
+AllowBeta=0
+Trial=1
+SubscriptionEndDate=2008-11-30
+LicenseFileEndDate=2008-11-29
+StartDate=2008-11-26
+EndDate=2009-8-29
+P1=1583382467081675895
+P2=10806754501964138869
+P3=3303272454
diff --git a/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/rtl70.bpl b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/rtl70.bpl
new file mode 100644
index 0000000..ea28d0b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/rtl70.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/vcl70.bpl b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/vcl70.bpl
new file mode 100644
index 0000000..572cb25
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK (Common)/Bin/vcl70.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_BPDX_D10.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_BPDX_D10.bpl
new file mode 100644
index 0000000..dc621dd
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_BPDX_D10.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_BPDX_D10.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_BPDX_D10.dcp
new file mode 100644
index 0000000..bbec126
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_BPDX_D10.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_Core_D10.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_Core_D10.bpl
new file mode 100644
index 0000000..82fbba2
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_Core_D10.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_Core_D10.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_Core_D10.dcp
new file mode 100644
index 0000000..3fb34fd
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_Core_D10.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_DataSnap_D10.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_DataSnap_D10.bpl
new file mode 100644
index 0000000..0458f6a
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_DataSnap_D10.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_DataSnap_D10.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_DataSnap_D10.dcp
new file mode 100644
index 0000000..145c3a7
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_DataSnap_D10.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_IDE_D10.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_IDE_D10.bpl
new file mode 100644
index 0000000..75a86dd
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_IDE_D10.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_IDE_D10.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_IDE_D10.dcp
new file mode 100644
index 0000000..93aba14
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_IDE_D10.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_Indy_D10.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_Indy_D10.bpl
new file mode 100644
index 0000000..cf76634
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_Indy_D10.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_Indy_D10.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_Indy_D10.dcp
new file mode 100644
index 0000000..4f345c7
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_Indy_D10.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_RODX_D10.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_RODX_D10.bpl
new file mode 100644
index 0000000..eefbc99
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_RODX_D10.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_RODX_D10.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_RODX_D10.dcp
new file mode 100644
index 0000000..db354b0
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_RODX_D10.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_Synapse_D10.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_Synapse_D10.bpl
new file mode 100644
index 0000000..bd052a8
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_Synapse_D10.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_Synapse_D10.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_Synapse_D10.dcp
new file mode 100644
index 0000000..688195f
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_Synapse_D10.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_WebBroker_D10.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_WebBroker_D10.bpl
new file mode 100644
index 0000000..0047359
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_WebBroker_D10.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_WebBroker_D10.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_WebBroker_D10.dcp
new file mode 100644
index 0000000..ccd00a3
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D10/RemObjects_WebBroker_D10.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_BPDX_D11.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_BPDX_D11.bpl
new file mode 100644
index 0000000..6c0bb5d
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_BPDX_D11.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_BPDX_D11.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_BPDX_D11.dcp
new file mode 100644
index 0000000..d6a6066
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_BPDX_D11.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_Core_D11.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_Core_D11.bpl
new file mode 100644
index 0000000..2e41c40
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_Core_D11.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_Core_D11.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_Core_D11.dcp
new file mode 100644
index 0000000..3b87380
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_Core_D11.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_DataSnap_D11.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_DataSnap_D11.bpl
new file mode 100644
index 0000000..9ff0f7b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_DataSnap_D11.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_DataSnap_D11.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_DataSnap_D11.dcp
new file mode 100644
index 0000000..703d48f
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_DataSnap_D11.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_IDE_D11.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_IDE_D11.bpl
new file mode 100644
index 0000000..be06b71
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_IDE_D11.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_IDE_D11.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_IDE_D11.dcp
new file mode 100644
index 0000000..18081bc
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_IDE_D11.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_Indy_D11.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_Indy_D11.bpl
new file mode 100644
index 0000000..65d8ed2
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_Indy_D11.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_Indy_D11.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_Indy_D11.dcp
new file mode 100644
index 0000000..2f66c97
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_Indy_D11.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_RODX_D11.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_RODX_D11.bpl
new file mode 100644
index 0000000..ee9764a
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_RODX_D11.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_RODX_D11.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_RODX_D11.dcp
new file mode 100644
index 0000000..6b1d267
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_RODX_D11.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_Synapse_D11.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_Synapse_D11.bpl
new file mode 100644
index 0000000..7e5b267
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_Synapse_D11.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_Synapse_D11.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_Synapse_D11.dcp
new file mode 100644
index 0000000..3e79b40
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_Synapse_D11.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_WebBroker_D11.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_WebBroker_D11.bpl
new file mode 100644
index 0000000..0cbe7ff
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_WebBroker_D11.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_WebBroker_D11.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_WebBroker_D11.dcp
new file mode 100644
index 0000000..78f9a70
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D11/RemObjects_WebBroker_D11.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/ROMasterServerLibrary_Intf.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/ROMasterServerLibrary_Intf.dcu
new file mode 100644
index 0000000..f7ea1cd
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/ROMasterServerLibrary_Intf.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_BPDX_D12.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_BPDX_D12.bpl
new file mode 100644
index 0000000..907e5a3
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_BPDX_D12.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_BPDX_D12.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_BPDX_D12.dcp
new file mode 100644
index 0000000..5998248
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_BPDX_D12.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_BPDX_D12.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_BPDX_D12.dcu
new file mode 100644
index 0000000..e2b7e63
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_BPDX_D12.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_BPDX_Reg.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_BPDX_Reg.dcu
new file mode 100644
index 0000000..60b3866
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_BPDX_Reg.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Core_D12.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Core_D12.bpl
new file mode 100644
index 0000000..e2179a3
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Core_D12.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Core_D12.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Core_D12.dcp
new file mode 100644
index 0000000..80590fe
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Core_D12.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Core_D12.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Core_D12.dcu
new file mode 100644
index 0000000..9090a08
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Core_D12.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Core_Reg.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Core_Reg.dcu
new file mode 100644
index 0000000..6ea7d5a
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Core_Reg.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_DataSnap_D12.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_DataSnap_D12.bpl
new file mode 100644
index 0000000..022aaae
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_DataSnap_D12.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_DataSnap_D12.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_DataSnap_D12.dcp
new file mode 100644
index 0000000..f9204e4
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_DataSnap_D12.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_DataSnap_D12.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_DataSnap_D12.dcu
new file mode 100644
index 0000000..e1c4330
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_DataSnap_D12.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_DataSnap_Reg.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_DataSnap_Reg.dcu
new file mode 100644
index 0000000..c640f19
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_DataSnap_Reg.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_IDE_D12.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_IDE_D12.bpl
new file mode 100644
index 0000000..50d00f0
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_IDE_D12.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_IDE_D12.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_IDE_D12.dcp
new file mode 100644
index 0000000..8aa128a
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_IDE_D12.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_IDE_D12.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_IDE_D12.dcu
new file mode 100644
index 0000000..bc32be5
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_IDE_D12.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_IDE_Reg.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_IDE_Reg.dcu
new file mode 100644
index 0000000..72dad70
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_IDE_Reg.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Indy_D12.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Indy_D12.bpl
new file mode 100644
index 0000000..027c4d3
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Indy_D12.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Indy_D12.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Indy_D12.dcp
new file mode 100644
index 0000000..ec01ce4
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Indy_D12.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Indy_D12.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Indy_D12.dcu
new file mode 100644
index 0000000..0a536a8
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Indy_D12.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Indy_Reg.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Indy_Reg.dcu
new file mode 100644
index 0000000..5018272
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Indy_Reg.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_RODX_D12.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_RODX_D12.bpl
new file mode 100644
index 0000000..0e63594
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_RODX_D12.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_RODX_D12.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_RODX_D12.dcp
new file mode 100644
index 0000000..1b097a8
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_RODX_D12.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_RODX_D12.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_RODX_D12.dcu
new file mode 100644
index 0000000..31714bf
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_RODX_D12.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Synapse_D12.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Synapse_D12.bpl
new file mode 100644
index 0000000..024b092
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Synapse_D12.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Synapse_D12.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Synapse_D12.dcp
new file mode 100644
index 0000000..8e626f5
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Synapse_D12.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Synapse_D12.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Synapse_D12.dcu
new file mode 100644
index 0000000..7b3c6b1
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Synapse_D12.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Synapse_Reg.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Synapse_Reg.dcu
new file mode 100644
index 0000000..66aa2fd
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_Synapse_Reg.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_WebBroker_D12.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_WebBroker_D12.bpl
new file mode 100644
index 0000000..ab94a1c
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_WebBroker_D12.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_WebBroker_D12.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_WebBroker_D12.dcp
new file mode 100644
index 0000000..11b84aa
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_WebBroker_D12.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_WebBroker_D12.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_WebBroker_D12.dcu
new file mode 100644
index 0000000..926968b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_WebBroker_D12.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_WebBroker_Reg.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_WebBroker_Reg.dcu
new file mode 100644
index 0000000..1ee7029
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/RemObjects_WebBroker_Reg.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/blcksock.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/blcksock.dcu
new file mode 100644
index 0000000..992d410
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/blcksock.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/fCustomIDEMessagesForm.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/fCustomIDEMessagesForm.dcu
new file mode 100644
index 0000000..c03d516
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/fCustomIDEMessagesForm.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/fDispatchersEditorForm.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/fDispatchersEditorForm.dcu
new file mode 100644
index 0000000..14e5097
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/fDispatchersEditorForm.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/fNewProjectForm.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/fNewProjectForm.dcu
new file mode 100644
index 0000000..63b1548
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/fNewProjectForm.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/fROAbout.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/fROAbout.dcu
new file mode 100644
index 0000000..13ede08
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/fROAbout.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/fROServerClassForm.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/fROServerClassForm.dcu
new file mode 100644
index 0000000..dcffff7
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/fROServerClassForm.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/fServerProjectOptions.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/fServerProjectOptions.dcu
new file mode 100644
index 0000000..96bbb7a
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/fServerProjectOptions.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/httpsend.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/httpsend.dcu
new file mode 100644
index 0000000..01516cd
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/httpsend.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/synacode.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/synacode.dcu
new file mode 100644
index 0000000..c7bacfe
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/synacode.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/synafpc.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/synafpc.dcu
new file mode 100644
index 0000000..6cf895c
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/synafpc.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/synaip.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/synaip.dcu
new file mode 100644
index 0000000..af909ea
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/synaip.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/synautil.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/synautil.dcu
new file mode 100644
index 0000000..7e2cc6f
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/synautil.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/synsock.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/synsock.dcu
new file mode 100644
index 0000000..74d5347
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/synsock.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uIPAsyncHttpServer.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uIPAsyncHttpServer.dcu
new file mode 100644
index 0000000..d489bec
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uIPAsyncHttpServer.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uIPAsyncSocket.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uIPAsyncSocket.dcu
new file mode 100644
index 0000000..2a82536
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uIPAsyncSocket.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uIPHttpHeaders.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uIPHttpHeaders.dcu
new file mode 100644
index 0000000..82bb45b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uIPHttpHeaders.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROAsync.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROAsync.dcu
new file mode 100644
index 0000000..1565f8d
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROAsync.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROAsyncResponseStorage.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROAsyncResponseStorage.dcu
new file mode 100644
index 0000000..1ce608e
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROAsyncResponseStorage.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROAsyncSCHelpers.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROAsyncSCHelpers.dcu
new file mode 100644
index 0000000..e8b8031
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROAsyncSCHelpers.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROAsyncSuperTcpServer.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROAsyncSuperTcpServer.dcu
new file mode 100644
index 0000000..bda04c4
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROAsyncSuperTcpServer.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROBPDXHTTPServer.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROBPDXHTTPServer.dcu
new file mode 100644
index 0000000..447421e
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROBPDXHTTPServer.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROBPDXTCPServer.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROBPDXTCPServer.dcu
new file mode 100644
index 0000000..e38f363
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROBPDXTCPServer.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROBaseSuperHttpChannel.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROBaseSuperHttpChannel.dcu
new file mode 100644
index 0000000..3b7cc49
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROBaseSuperHttpChannel.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROBaseSuperHttpServer.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROBaseSuperHttpServer.dcu
new file mode 100644
index 0000000..6fe7b01
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROBaseSuperHttpServer.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROBinMessage.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROBinMessage.dcu
new file mode 100644
index 0000000..d449d1d
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROBinMessage.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROBinaryHelpers.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROBinaryHelpers.dcu
new file mode 100644
index 0000000..53688f0
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROBinaryHelpers.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROBroadcastChannel.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROBroadcastChannel.dcu
new file mode 100644
index 0000000..be30289
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROBroadcastChannel.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROBroadcastServer.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROBroadcastServer.dcu
new file mode 100644
index 0000000..68345ad
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROBroadcastServer.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROCOMInit.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROCOMInit.dcu
new file mode 100644
index 0000000..1c38e03
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROCOMInit.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROCipher.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROCipher.dcu
new file mode 100644
index 0000000..f0be6cf
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROCipher.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROCipher1.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROCipher1.dcu
new file mode 100644
index 0000000..bf82233
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROCipher1.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROCiphers.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROCiphers.dcu
new file mode 100644
index 0000000..02f4c0e
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROCiphers.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROClassFactories.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROClassFactories.dcu
new file mode 100644
index 0000000..be5dfbb
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROClassFactories.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROClasses.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROClasses.dcu
new file mode 100644
index 0000000..838fa8a
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROClasses.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROClient.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROClient.dcu
new file mode 100644
index 0000000..9246454
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROClient.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROClientIntf.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROClientIntf.dcu
new file mode 100644
index 0000000..ab78714
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROClientIntf.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROComboService.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROComboService.dcu
new file mode 100644
index 0000000..9596efa
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROComboService.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROCompression.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROCompression.dcu
new file mode 100644
index 0000000..1319264
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROCompression.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODBEventRepository.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODBEventRepository.dcu
new file mode 100644
index 0000000..c9e7faa
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODBEventRepository.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODBSessionManager.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODBSessionManager.dcu
new file mode 100644
index 0000000..3b47f62
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODBSessionManager.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODECConst.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODECConst.dcu
new file mode 100644
index 0000000..00de357
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODECConst.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODECUtil.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODECUtil.dcu
new file mode 100644
index 0000000..c66da99
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODECUtil.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODL.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODL.dcu
new file mode 100644
index 0000000..9746eac
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODL.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLAsyncConverter.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLAsyncConverter.dcu
new file mode 100644
index 0000000..86bba2a
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLAsyncConverter.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLConvertersUtils.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLConvertersUtils.dcu
new file mode 100644
index 0000000..c102763
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLConvertersUtils.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLCppConverters.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLCppConverters.dcu
new file mode 100644
index 0000000..1d6f3e3
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLCppConverters.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLDelphiConverters.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLDelphiConverters.dcu
new file mode 100644
index 0000000..54298e7
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLDelphiConverters.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLGenTools.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLGenTools.dcu
new file mode 100644
index 0000000..7d766ed
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLGenTools.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLImplConverter.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLImplConverter.dcu
new file mode 100644
index 0000000..18afa06
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLImplConverter.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLIntfConverter.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLIntfConverter.dcu
new file mode 100644
index 0000000..78b4575
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLIntfConverter.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLInvkConverter.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLInvkConverter.dcu
new file mode 100644
index 0000000..c8202a7
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLInvkConverter.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLLChannel.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLLChannel.dcu
new file mode 100644
index 0000000..5294e3c
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLLChannel.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLLHelpers.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLLHelpers.dcu
new file mode 100644
index 0000000..5d90b88
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLLHelpers.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLLineStream.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLLineStream.dcu
new file mode 100644
index 0000000..9f0502c
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLLineStream.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLSplitableConverter.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLSplitableConverter.dcu
new file mode 100644
index 0000000..f8584d6
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLSplitableConverter.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLTemplateBasedConverter.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLTemplateBasedConverter.dcu
new file mode 100644
index 0000000..d2985e2
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLTemplateBasedConverter.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLTemplateBasedConverterUtils.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLTemplateBasedConverterUtils.dcu
new file mode 100644
index 0000000..039d272
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLTemplateBasedConverterUtils.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLToPascal.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLToPascal.dcu
new file mode 100644
index 0000000..7e8d707
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLToPascal.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLToPascalAsync.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLToPascalAsync.dcu
new file mode 100644
index 0000000..1cca3f0
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLToPascalAsync.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLToPascalImpl.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLToPascalImpl.dcu
new file mode 100644
index 0000000..1d7e30e
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLToPascalImpl.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLToPascalIntf.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLToPascalIntf.dcu
new file mode 100644
index 0000000..34549fb
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLToPascalIntf.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLToPascalInvk.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLToPascalInvk.dcu
new file mode 100644
index 0000000..899eaad
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLToPascalInvk.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLToWSDL.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLToWSDL.dcu
new file mode 100644
index 0000000..6f57d18
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLToWSDL.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLToXML.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLToXML.dcu
new file mode 100644
index 0000000..370b5c5
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODLToXML.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODXHTTPHeaderTools.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODXHTTPHeaderTools.dcu
new file mode 100644
index 0000000..e9a4080
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODXHTTPHeaderTools.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODXHTTPServerCore.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODXHTTPServerCore.dcu
new file mode 100644
index 0000000..7fcdcd9
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODXHTTPServerCore.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODXISAPI.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODXISAPI.dcu
new file mode 100644
index 0000000..d7228af
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODXISAPI.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODXISAPIFilter.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODXISAPIFilter.dcu
new file mode 100644
index 0000000..d1b1647
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODXISAPIFilter.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODXSecurity.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODXSecurity.dcu
new file mode 100644
index 0000000..51fc303
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODXSecurity.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODXServerCore.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODXServerCore.dcu
new file mode 100644
index 0000000..14292ff
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODXServerCore.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODXSessionTracker.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODXSessionTracker.dcu
new file mode 100644
index 0000000..eeffeb0
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODXSessionTracker.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODXSock.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODXSock.dcu
new file mode 100644
index 0000000..7edc8e6
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODXSock.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODXSockClient.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODXSockClient.dcu
new file mode 100644
index 0000000..eb50042
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODXSockClient.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODXSocket.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODXSocket.dcu
new file mode 100644
index 0000000..5022af5
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODXSocket.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODXString.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODXString.dcu
new file mode 100644
index 0000000..fdf6483
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODXString.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODataSnapBaseAppServer.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODataSnapBaseAppServer.dcu
new file mode 100644
index 0000000..c8ad78d
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODataSnapBaseAppServer.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODataSnapConnection.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODataSnapConnection.dcu
new file mode 100644
index 0000000..1d4fc6f
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODataSnapConnection.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODataSnapModule.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODataSnapModule.dcu
new file mode 100644
index 0000000..a667610
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODataSnapModule.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODataSnapNewServerModuleWizard.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODataSnapNewServerModuleWizard.dcu
new file mode 100644
index 0000000..dd3b825
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODataSnapNewServerModuleWizard.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODataSnapProviderManager.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODataSnapProviderManager.dcu
new file mode 100644
index 0000000..c9574fd
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODataSnapProviderManager.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODataSnapProviderPublisher.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODataSnapProviderPublisher.dcu
new file mode 100644
index 0000000..8fa27ed
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODataSnapProviderPublisher.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODataSnapPublishedProvidersCollection.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODataSnapPublishedProvidersCollection.dcu
new file mode 100644
index 0000000..3893a4f
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODataSnapPublishedProvidersCollection.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODataSnapRes.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODataSnapRes.dcu
new file mode 100644
index 0000000..dcfba99
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODataSnapRes.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODataSnap_Async.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODataSnap_Async.dcu
new file mode 100644
index 0000000..391e5b2
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODataSnap_Async.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODataSnap_Intf.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODataSnap_Intf.dcu
new file mode 100644
index 0000000..ac101e1
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODataSnap_Intf.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODataSnap_Invk.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODataSnap_Invk.dcu
new file mode 100644
index 0000000..8605057
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODataSnap_Invk.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODiscovery.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODiscovery.dcu
new file mode 100644
index 0000000..6c1f1d2
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODiscovery.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODiscoveryService_Impl.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODiscoveryService_Impl.dcu
new file mode 100644
index 0000000..fd434d6
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODiscoveryService_Impl.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODiscovery_Async.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODiscovery_Async.dcu
new file mode 100644
index 0000000..bcc7ad8
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODiscovery_Async.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODiscovery_Intf.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODiscovery_Intf.dcu
new file mode 100644
index 0000000..5e2d0c2
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODiscovery_Intf.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODiscovery_Invk.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODiscovery_Invk.dcu
new file mode 100644
index 0000000..5ccd914
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODiscovery_Invk.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODynamicRequest.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODynamicRequest.dcu
new file mode 100644
index 0000000..943398d
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRODynamicRequest.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROEncryption.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROEncryption.dcu
new file mode 100644
index 0000000..2e3a10d
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROEncryption.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROEncryptionEnvelope.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROEncryptionEnvelope.dcu
new file mode 100644
index 0000000..350647a
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROEncryptionEnvelope.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROEventRepository.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROEventRepository.dcu
new file mode 100644
index 0000000..0abde83
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROEventRepository.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROExtraEditors.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROExtraEditors.dcu
new file mode 100644
index 0000000..442487e
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROExtraEditors.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROHCMngr.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROHCMngr.dcu
new file mode 100644
index 0000000..17b02e4
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROHCMngr.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROHTTPDispatch.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROHTTPDispatch.dcu
new file mode 100644
index 0000000..cc13c0f
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROHTTPDispatch.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROHTTPTools.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROHTTPTools.dcu
new file mode 100644
index 0000000..b979540
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROHTTPTools.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROHash.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROHash.dcu
new file mode 100644
index 0000000..e146892
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROHash.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROHtmlServerInfo.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROHtmlServerInfo.dcu
new file mode 100644
index 0000000..8edab56
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROHtmlServerInfo.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIDEData.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIDEData.dcu
new file mode 100644
index 0000000..db58868
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIDEData.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIDEEditors.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIDEEditors.dcu
new file mode 100644
index 0000000..3567b2d
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIDEEditors.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIDEMenu.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIDEMenu.dcu
new file mode 100644
index 0000000..7fa23cf
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIDEMenu.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIDEPrjWizard.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIDEPrjWizard.dcu
new file mode 100644
index 0000000..4464989
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIDEPrjWizard.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIDETools.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIDETools.dcu
new file mode 100644
index 0000000..132d202
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIDETools.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIdeOnly.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIdeOnly.dcu
new file mode 100644
index 0000000..7b0490e
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIdeOnly.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIndyEmail.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIndyEmail.dcu
new file mode 100644
index 0000000..a8a49b2
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIndyEmail.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIndyEmailChannel.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIndyEmailChannel.dcu
new file mode 100644
index 0000000..341988a
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIndyEmailChannel.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIndyEmailServer.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIndyEmailServer.dcu
new file mode 100644
index 0000000..a30304e
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIndyEmailServer.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIndyHTTPChannel.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIndyHTTPChannel.dcu
new file mode 100644
index 0000000..afdabb7
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIndyHTTPChannel.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIndyHTTPServer.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIndyHTTPServer.dcu
new file mode 100644
index 0000000..80680ca
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIndyHTTPServer.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIndySuperHttpChannel.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIndySuperHttpChannel.dcu
new file mode 100644
index 0000000..982546b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIndySuperHttpChannel.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIndyTCPChannel.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIndyTCPChannel.dcu
new file mode 100644
index 0000000..c92980c
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIndyTCPChannel.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIndyTCPServer.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIndyTCPServer.dcu
new file mode 100644
index 0000000..818b9b3
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIndyTCPServer.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIndyUDPChannel.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIndyUDPChannel.dcu
new file mode 100644
index 0000000..9596b1e
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIndyUDPChannel.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIndyUDPServer.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIndyUDPServer.dcu
new file mode 100644
index 0000000..be878e6
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIndyUDPServer.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIpHttpServer.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIpHttpServer.dcu
new file mode 100644
index 0000000..e77f091
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIpHttpServer.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIpSuperHttpServer.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIpSuperHttpServer.dcu
new file mode 100644
index 0000000..a9a0d5e
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIpSuperHttpServer.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIpTcpServer.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIpTcpServer.dcu
new file mode 100644
index 0000000..649c1c5
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROIpTcpServer.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROJSONMessage.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROJSONMessage.dcu
new file mode 100644
index 0000000..63de30f
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROJSONMessage.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROJSONParser.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROJSONParser.dcu
new file mode 100644
index 0000000..42c2818
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROJSONParser.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROLocalChannel.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROLocalChannel.dcu
new file mode 100644
index 0000000..fc1633e
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROLocalChannel.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROLocalServer.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROLocalServer.dcu
new file mode 100644
index 0000000..fffb580
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROLocalServer.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROLoginNeededForm.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROLoginNeededForm.dcu
new file mode 100644
index 0000000..fd73742
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROLoginNeededForm.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROMSXML2_TLB.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROMSXML2_TLB.dcu
new file mode 100644
index 0000000..0cd8809
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROMSXML2_TLB.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROMSXMLImpl.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROMSXMLImpl.dcu
new file mode 100644
index 0000000..63b9e94
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROMSXMLImpl.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROMasterServerEventRepository.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROMasterServerEventRepository.dcu
new file mode 100644
index 0000000..50ad9b4
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROMasterServerEventRepository.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROMasterServerSessionManager.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROMasterServerSessionManager.dcu
new file mode 100644
index 0000000..8fe27d8
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROMasterServerSessionManager.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRONamedPipeChannel.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRONamedPipeChannel.dcu
new file mode 100644
index 0000000..6135f9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRONamedPipeChannel.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRONamedPipeServer.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRONamedPipeServer.dcu
new file mode 100644
index 0000000..0c7bcaa
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRONamedPipeServer.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROOpenXMLImpl.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROOpenXMLImpl.dcu
new file mode 100644
index 0000000..ebc852f
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROOpenXMLImpl.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROPleaseWaitForm.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROPleaseWaitForm.dcu
new file mode 100644
index 0000000..552ced6
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROPleaseWaitForm.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROPostMessage.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROPostMessage.dcu
new file mode 100644
index 0000000..7c7f6df
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROPostMessage.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROPoweredByRemObjectsButton.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROPoweredByRemObjectsButton.dcu
new file mode 100644
index 0000000..f44d943
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROPoweredByRemObjectsButton.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROProductVersionInfo.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROProductVersionInfo.dcu
new file mode 100644
index 0000000..02ca38e
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROProductVersionInfo.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROProductVersionInfoForm.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROProductVersionInfoForm.dcu
new file mode 100644
index 0000000..31a1d46
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROProductVersionInfoForm.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROProductVersionInfo_Intf.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROProductVersionInfo_Intf.dcu
new file mode 100644
index 0000000..1ed9529
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROProductVersionInfo_Intf.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRORFC2289.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRORFC2289.dcu
new file mode 100644
index 0000000..e245300
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRORFC2289.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRORODLNotifier.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRORODLNotifier.dcu
new file mode 100644
index 0000000..638f784
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRORODLNotifier.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRORemoteDataModule.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRORemoteDataModule.dcu
new file mode 100644
index 0000000..175fc8c
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRORemoteDataModule.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRORemoteService.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRORemoteService.dcu
new file mode 100644
index 0000000..be96b4f
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRORemoteService.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRORes.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRORes.dcu
new file mode 100644
index 0000000..e402f8b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRORes.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROResWriter.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROResWriter.dcu
new file mode 100644
index 0000000..7b0edf6
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROResWriter.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRORng.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRORng.dcu
new file mode 100644
index 0000000..99202b4
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uRORng.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSCHelpers.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSCHelpers.dcu
new file mode 100644
index 0000000..619c070
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSCHelpers.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSOAPMessage.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSOAPMessage.dcu
new file mode 100644
index 0000000..efb99f2
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSOAPMessage.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSerializer.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSerializer.dcu
new file mode 100644
index 0000000..df5cced
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSerializer.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROServer.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROServer.dcu
new file mode 100644
index 0000000..b6038b5
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROServer.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROServerIntf.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROServerIntf.dcu
new file mode 100644
index 0000000..f5f4ca3
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROServerIntf.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROServerMultiMessage.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROServerMultiMessage.dcu
new file mode 100644
index 0000000..a993137
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROServerMultiMessage.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSessions.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSessions.dcu
new file mode 100644
index 0000000..24b01b2
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSessions.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROStreamSerializer.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROStreamSerializer.dcu
new file mode 100644
index 0000000..b07cffa
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROStreamSerializer.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROStreamUtils.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROStreamUtils.dcu
new file mode 100644
index 0000000..c3d0232
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROStreamUtils.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSuperTCPChannel.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSuperTCPChannel.dcu
new file mode 100644
index 0000000..ebbd3da
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSuperTCPChannel.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSuperTCPServer.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSuperTCPServer.dcu
new file mode 100644
index 0000000..4d2afdc
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSuperTCPServer.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSynapseHTTPChannel.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSynapseHTTPChannel.dcu
new file mode 100644
index 0000000..ef3e4c4
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSynapseHTTPChannel.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSynapseSCHelpers.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSynapseSCHelpers.dcu
new file mode 100644
index 0000000..c2c2fd3
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSynapseSCHelpers.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSynapseServerSocket.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSynapseServerSocket.dcu
new file mode 100644
index 0000000..c860865
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSynapseServerSocket.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSynapseSuperHttpChannel.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSynapseSuperHttpChannel.dcu
new file mode 100644
index 0000000..8d04c8d
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSynapseSuperHttpChannel.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSynapseSuperTCPCHannel.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSynapseSuperTCPCHannel.dcu
new file mode 100644
index 0000000..2ae4dd2
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSynapseSuperTCPCHannel.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSynapseSuperTCPServer.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSynapseSuperTCPServer.dcu
new file mode 100644
index 0000000..1affbb2
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROSynapseSuperTCPServer.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROThread.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROThread.dcu
new file mode 100644
index 0000000..5eb16b6
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROThread.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROThreadPool.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROThreadPool.dcu
new file mode 100644
index 0000000..ab7d766
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROThreadPool.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROTypes.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROTypes.dcu
new file mode 100644
index 0000000..a92c334
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROTypes.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROUnicodeConv.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROUnicodeConv.dcu
new file mode 100644
index 0000000..0fcb02d
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROUnicodeConv.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROWebBrokerServer.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROWebBrokerServer.dcu
new file mode 100644
index 0000000..eab96b4
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROWebBrokerServer.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROWinInetHttpChannel.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROWinInetHttpChannel.dcu
new file mode 100644
index 0000000..2fe0eaa
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROWinInetHttpChannel.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROWinMessageChannel.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROWinMessageChannel.dcu
new file mode 100644
index 0000000..8149b43
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROWinMessageChannel.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROWinMessageServer.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROWinMessageServer.dcu
new file mode 100644
index 0000000..8e5b1c7
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROWinMessageServer.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROXDOM_2_3.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROXDOM_2_3.dcu
new file mode 100644
index 0000000..15125cb
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROXDOM_2_3.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROXMLIntf.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROXMLIntf.dcu
new file mode 100644
index 0000000..10e08d3
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROXMLIntf.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROXMLSerializer.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROXMLSerializer.dcu
new file mode 100644
index 0000000..1abc26d
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROXMLSerializer.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROXmlRpcMessage.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROXmlRpcMessage.dcu
new file mode 100644
index 0000000..7c8bb61
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROXmlRpcMessage.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROZLib.dcu b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROZLib.dcu
new file mode 100644
index 0000000..4cdfff9
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D12/uROZLib.dcu differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_BPDX_D6.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_BPDX_D6.bpl
new file mode 100644
index 0000000..206fc04
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_BPDX_D6.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_BPDX_D6.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_BPDX_D6.dcp
new file mode 100644
index 0000000..8bd26a5
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_BPDX_D6.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_Core_D6.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_Core_D6.bpl
new file mode 100644
index 0000000..88c45e2
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_Core_D6.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_Core_D6.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_Core_D6.dcp
new file mode 100644
index 0000000..97978cf
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_Core_D6.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_DataSnap_D6.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_DataSnap_D6.bpl
new file mode 100644
index 0000000..ba44abd
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_DataSnap_D6.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_DataSnap_D6.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_DataSnap_D6.dcp
new file mode 100644
index 0000000..5da4a14
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_DataSnap_D6.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_IDE_D6.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_IDE_D6.bpl
new file mode 100644
index 0000000..a70b2b0
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_IDE_D6.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_IDE_D6.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_IDE_D6.dcp
new file mode 100644
index 0000000..9c92ac6
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_IDE_D6.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_Indy_D6.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_Indy_D6.bpl
new file mode 100644
index 0000000..7445933
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_Indy_D6.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_Indy_D6.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_Indy_D6.dcp
new file mode 100644
index 0000000..d9a7280
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_Indy_D6.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_RODX_D6.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_RODX_D6.bpl
new file mode 100644
index 0000000..bf697f7
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_RODX_D6.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_RODX_D6.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_RODX_D6.dcp
new file mode 100644
index 0000000..d4f9718
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_RODX_D6.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_Synapse_D6.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_Synapse_D6.bpl
new file mode 100644
index 0000000..7e8931c
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_Synapse_D6.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_Synapse_D6.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_Synapse_D6.dcp
new file mode 100644
index 0000000..ce083e6
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_Synapse_D6.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_WebBroker_D6.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_WebBroker_D6.bpl
new file mode 100644
index 0000000..5da715b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_WebBroker_D6.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_WebBroker_D6.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_WebBroker_D6.dcp
new file mode 100644
index 0000000..0538e7d
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D6/RemObjects_WebBroker_D6.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_BPDX_D7.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_BPDX_D7.bpl
new file mode 100644
index 0000000..b006bab
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_BPDX_D7.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_BPDX_D7.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_BPDX_D7.dcp
new file mode 100644
index 0000000..617c521
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_BPDX_D7.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_Core_D7.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_Core_D7.bpl
new file mode 100644
index 0000000..1059854
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_Core_D7.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_Core_D7.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_Core_D7.dcp
new file mode 100644
index 0000000..03c1ee9
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_Core_D7.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_DataSnap_D7.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_DataSnap_D7.bpl
new file mode 100644
index 0000000..0974dc3
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_DataSnap_D7.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_DataSnap_D7.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_DataSnap_D7.dcp
new file mode 100644
index 0000000..ab5ca34
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_DataSnap_D7.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_IDE_D7.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_IDE_D7.bpl
new file mode 100644
index 0000000..95104d4
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_IDE_D7.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_IDE_D7.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_IDE_D7.dcp
new file mode 100644
index 0000000..b2afa19
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_IDE_D7.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_Indy_D7.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_Indy_D7.bpl
new file mode 100644
index 0000000..77e1f4e
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_Indy_D7.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_Indy_D7.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_Indy_D7.dcp
new file mode 100644
index 0000000..0707d51
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_Indy_D7.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_RODX_D7.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_RODX_D7.bpl
new file mode 100644
index 0000000..0eadf03
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_RODX_D7.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_RODX_D7.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_RODX_D7.dcp
new file mode 100644
index 0000000..bf75cfa
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_RODX_D7.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_Synapse_D7.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_Synapse_D7.bpl
new file mode 100644
index 0000000..2876441
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_Synapse_D7.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_Synapse_D7.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_Synapse_D7.dcp
new file mode 100644
index 0000000..70572e2
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_Synapse_D7.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_WebBroker_D7.bpl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_WebBroker_D7.bpl
new file mode 100644
index 0000000..a560dcb
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_WebBroker_D7.bpl differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_WebBroker_D7.dcp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_WebBroker_D7.dcp
new file mode 100644
index 0000000..bfd7dd1
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Dcu/D7/RemObjects_WebBroker_D7.dcp differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Launch.exe b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Launch.exe
new file mode 100644
index 0000000..4b346d2
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Launch.exe differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/BuildPackages_D10.bdsgroup b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/BuildPackages_D10.bdsgroup
new file mode 100644
index 0000000..8ac831f
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/BuildPackages_D10.bdsgroup	
@@ -0,0 +1,41 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality" Type="String">Default.Personality</Option>
+			<Option Name="ProjectType" Type="String"></Option>
+			<Option Name="Version" Type="String">1.0</Option>
+			<Option Name="GUID" Type="String">{CDD70F62-05F7-4112-A8A7-9904A7180AAE}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Default.Personality>
+    <Projects>
+      <Projects Name="RemObjects_Core_D10.bpl">RemObjects_Core_D10.bdsproj</Projects>
+      <Projects Name="RemObjects_IDE_D10.bpl">IDE\RemObjects_IDE_D10.bdsproj</Projects>
+      <Projects Name="RemObjects_WebBroker_D10.bpl">RemObjects_WebBroker_D10.bdsproj</Projects>
+      <Projects Name="RemObjects_Indy_D10.bpl">RemObjects_Indy_D10.bdsproj</Projects>
+      <Projects Name="RemObjects_RODX_D10.bpl">RODX\RemObjects_RODX_D10.bdsproj</Projects>
+      <Projects Name="RemObjects_BPDX_D10.bpl">RemObjects_BPDX_D10.bdsproj</Projects>
+      <Projects Name="RemObjects_DataSnap_D10.bpl">DataSnap\RemObjects_DataSnap_D10.bdsproj</Projects>
+      <Projects Name="RemObjects_Synapse_D10.bpl">RemObjects_Synapse_D10.bdsproj</Projects>
+      <Projects Name="Targets">RemObjects_Core_D10.bpl RemObjects_IDE_D10.bpl RemObjects_WebBroker_D10.bpl RemObjects_Indy_D10.bpl RemObjects_RODX_D10.bpl RemObjects_BPDX_D10.bpl RemObjects_DataSnap_D10.bpl RemObjects_Synapse_D10.bpl</Projects>
+    </Projects>
+    <Dependencies>
+      <Dependency GUID="{ED80B945-1838-48EB-9D77-FD634984C25F}">
+        <Dependency GUID="{99EA5527-0200-455E-815C-646FF77F0ACD}"/>
+      </Dependency>
+      <Dependency GUID="{9661820C-D398-4219-806E-11B42219A50F}">
+        <Dependency GUID="{99EA5527-0200-455E-815C-646FF77F0ACD}"/>
+      </Dependency>
+      <Dependency GUID="{C7097D35-5E65-41AB-A425-381DD819B555}">
+        <Dependency GUID="{99EA5527-0200-455E-815C-646FF77F0ACD}"/>
+      </Dependency>
+      <Dependency GUID="{ADCC1E83-6977-48E1-B7B7-21A9890C8C6F}">
+        <Dependency GUID="{0FE2BA34-A199-4666-87ED-E47A2B9D252C}"/>
+      </Dependency>
+      <Dependency GUID="{34B49BD5-2A10-4E93-8208-7657BD895C31}">
+        <Dependency GUID="{99EA5527-0200-455E-815C-646FF77F0ACD}"/>
+      </Dependency>
+    </Dependencies>
+  </Default.Personality>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/BuildPackages_D11.groupproj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/BuildPackages_D11.groupproj
new file mode 100644
index 0000000..9767849
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/BuildPackages_D11.groupproj	
@@ -0,0 +1,114 @@
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{426d6bef-d93c-4c13-9e7c-fff76629872a}</ProjectGuid>
+  </PropertyGroup>
+  <ItemGroup />
+  <ItemGroup>
+    <Projects Include="DataSnap\RemObjects_DataSnap_D11.dproj">
+      <Dependencies>RemObjects_Core_D11.dproj</Dependencies>
+    </Projects>
+    <Projects Include="IDE\RemObjects_IDE_D11.dproj">
+      <Dependencies>RemObjects_Core_D11.dproj</Dependencies>
+    </Projects>
+    <Projects Include="RemObjects_BPDX_D11.dproj">
+      <Dependencies>RODX\RemObjects_RODX_D11.dproj</Dependencies>
+    </Projects>
+    <Projects Include="RemObjects_Core_D11.dproj" />
+    <Projects Include="RemObjects_Indy_D11.dproj">
+      <Dependencies>RemObjects_Core_D11.dproj</Dependencies>
+    </Projects>
+    <Projects Include="RemObjects_Synapse_D11.dproj" />
+    <Projects Include="RemObjects_WebBroker_D11.dproj">
+      <Dependencies>RemObjects_Core_D11.dproj</Dependencies>
+    </Projects>
+    <Projects Include="RODX\RemObjects_RODX_D11.dproj" />
+  </ItemGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Default.Personality</Borland.Personality>
+    <Borland.ProjectType />
+    <BorlandProject>
+<BorlandProject xmlns=""><Default.Personality></Default.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Target Name="RemObjects_Core_D11">
+    <MSBuild Projects="RemObjects_Core_D11.dproj" Targets="" />
+  </Target>
+  <Target Name="RemObjects_Core_D11:Clean">
+    <MSBuild Projects="RemObjects_Core_D11.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="RemObjects_Core_D11:Make">
+    <MSBuild Projects="RemObjects_Core_D11.dproj" Targets="Make" />
+  </Target>
+  <Target Name="RemObjects_IDE_D11" DependsOnTargets="RemObjects_Core_D11">
+    <MSBuild Projects="IDE\RemObjects_IDE_D11.dproj" Targets="" />
+  </Target>
+  <Target Name="RemObjects_IDE_D11:Clean" DependsOnTargets="RemObjects_Core_D11:Clean">
+    <MSBuild Projects="IDE\RemObjects_IDE_D11.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="RemObjects_IDE_D11:Make" DependsOnTargets="RemObjects_Core_D11:Make">
+    <MSBuild Projects="IDE\RemObjects_IDE_D11.dproj" Targets="Make" />
+  </Target>
+  <Target Name="RemObjects_WebBroker_D11" DependsOnTargets="RemObjects_Core_D11">
+    <MSBuild Projects="RemObjects_WebBroker_D11.dproj" Targets="" />
+  </Target>
+  <Target Name="RemObjects_WebBroker_D11:Clean" DependsOnTargets="RemObjects_Core_D11:Clean">
+    <MSBuild Projects="RemObjects_WebBroker_D11.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="RemObjects_WebBroker_D11:Make" DependsOnTargets="RemObjects_Core_D11:Make">
+    <MSBuild Projects="RemObjects_WebBroker_D11.dproj" Targets="Make" />
+  </Target>
+  <Target Name="RemObjects_Indy_D11" DependsOnTargets="RemObjects_Core_D11">
+    <MSBuild Projects="RemObjects_Indy_D11.dproj" Targets="" />
+  </Target>
+  <Target Name="RemObjects_Indy_D11:Clean" DependsOnTargets="RemObjects_Core_D11:Clean">
+    <MSBuild Projects="RemObjects_Indy_D11.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="RemObjects_Indy_D11:Make" DependsOnTargets="RemObjects_Core_D11:Make">
+    <MSBuild Projects="RemObjects_Indy_D11.dproj" Targets="Make" />
+  </Target>
+  <Target Name="RemObjects_RODX_D11">
+    <MSBuild Projects="RODX\RemObjects_RODX_D11.dproj" Targets="" />
+  </Target>
+  <Target Name="RemObjects_RODX_D11:Clean">
+    <MSBuild Projects="RODX\RemObjects_RODX_D11.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="RemObjects_RODX_D11:Make">
+    <MSBuild Projects="RODX\RemObjects_RODX_D11.dproj" Targets="Make" />
+  </Target>
+  <Target Name="RemObjects_BPDX_D11" DependsOnTargets="RemObjects_RODX_D11">
+    <MSBuild Projects="RemObjects_BPDX_D11.dproj" Targets="" />
+  </Target>
+  <Target Name="RemObjects_BPDX_D11:Clean" DependsOnTargets="RemObjects_RODX_D11:Clean">
+    <MSBuild Projects="RemObjects_BPDX_D11.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="RemObjects_BPDX_D11:Make" DependsOnTargets="RemObjects_RODX_D11:Make">
+    <MSBuild Projects="RemObjects_BPDX_D11.dproj" Targets="Make" />
+  </Target>
+  <Target Name="RemObjects_DataSnap_D11" DependsOnTargets="RemObjects_Core_D11">
+    <MSBuild Projects="DataSnap\RemObjects_DataSnap_D11.dproj" Targets="" />
+  </Target>
+  <Target Name="RemObjects_DataSnap_D11:Clean" DependsOnTargets="RemObjects_Core_D11:Clean">
+    <MSBuild Projects="DataSnap\RemObjects_DataSnap_D11.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="RemObjects_DataSnap_D11:Make" DependsOnTargets="RemObjects_Core_D11:Make">
+    <MSBuild Projects="DataSnap\RemObjects_DataSnap_D11.dproj" Targets="Make" />
+  </Target>
+  <Target Name="RemObjects_Synapse_D11">
+    <MSBuild Projects="RemObjects_Synapse_D11.dproj" Targets="" />
+  </Target>
+  <Target Name="RemObjects_Synapse_D11:Clean">
+    <MSBuild Projects="RemObjects_Synapse_D11.dproj" Targets="Clean" />
+  </Target>
+  <Target Name="RemObjects_Synapse_D11:Make">
+    <MSBuild Projects="RemObjects_Synapse_D11.dproj" Targets="Make" />
+  </Target>
+  <Target Name="Build">
+    <CallTarget Targets="RemObjects_Core_D11;RemObjects_IDE_D11;RemObjects_WebBroker_D11;RemObjects_Indy_D11;RemObjects_RODX_D11;RemObjects_BPDX_D11;RemObjects_DataSnap_D11;RemObjects_Synapse_D11" />
+  </Target>
+  <Target Name="Clean">
+    <CallTarget Targets="RemObjects_Core_D11:Clean;RemObjects_IDE_D11:Clean;RemObjects_WebBroker_D11:Clean;RemObjects_Indy_D11:Clean;RemObjects_RODX_D11:Clean;RemObjects_BPDX_D11:Clean;RemObjects_DataSnap_D11:Clean;RemObjects_Synapse_D11:Clean" />
+  </Target>
+  <Target Name="Make">
+    <CallTarget Targets="RemObjects_Core_D11:Make;RemObjects_IDE_D11:Make;RemObjects_WebBroker_D11:Make;RemObjects_Indy_D11:Make;RemObjects_RODX_D11:Make;RemObjects_BPDX_D11:Make;RemObjects_DataSnap_D11:Make;RemObjects_Synapse_D11:Make" />
+  </Target>
+  <Import Condition="Exists('$(MSBuildBinPath)\Borland.Group.Targets')" Project="$(MSBuildBinPath)\Borland.Group.Targets" />
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/BuildPackages_D12.groupproj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/BuildPackages_D12.groupproj
new file mode 100644
index 0000000..89f93dd
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/BuildPackages_D12.groupproj	
@@ -0,0 +1,130 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{426d6bef-d93c-4c13-9e7c-fff76629872a}</ProjectGuid>
+		</PropertyGroup>
+		<ItemGroup>
+			<Projects Include="RemObjects_Core_D12.dproj">
+				<Dependencies/>
+			</Projects>
+			<Projects Include="IDE\RemObjects_IDE_D12.dproj">
+				<Dependencies>RemObjects_Core_D12.dproj</Dependencies>
+			</Projects>
+			<Projects Include="RemObjects_WebBroker_D12.dproj">
+				<Dependencies>RemObjects_Core_D12.dproj</Dependencies>
+			</Projects>
+			<Projects Include="RemObjects_Indy_D12.dproj">
+				<Dependencies>RemObjects_Core_D12.dproj</Dependencies>
+			</Projects>
+			<Projects Include="RODX\RemObjects_RODX_D12.dproj">
+				<Dependencies/>
+			</Projects>
+			<Projects Include="RemObjects_BPDX_D12.dproj">
+				<Dependencies>RemObjects_Core_D12.dproj;RODX\RemObjects_RODX_D12.dproj</Dependencies>
+			</Projects>
+			<Projects Include="DataSnap\RemObjects_DataSnap_D12.dproj">
+				<Dependencies>RemObjects_Core_D12.dproj</Dependencies>
+			</Projects>
+			<Projects Include="RemObjects_Synapse_D12.dproj">
+				<Dependencies>RemObjects_Core_D12.dproj</Dependencies>
+			</Projects>
+		</ItemGroup>
+		<ProjectExtensions>
+			<Borland.Personality>Default.Personality.12</Borland.Personality>
+			<Borland.ProjectType/>
+			<BorlandProject>
+				<BorlandProject>
+					<BorlandProject>
+						<BorlandProject>
+							<BorlandProject>
+								<BorlandProject>
+									<Default.Personality/>
+								</BorlandProject>
+							</BorlandProject>
+						</BorlandProject>
+					</BorlandProject>
+				</BorlandProject>
+			</BorlandProject>
+		</ProjectExtensions>
+		<Target Name="RemObjects_Core_D12">
+			<MSBuild Projects="RemObjects_Core_D12.dproj"/>
+		</Target>
+		<Target Name="RemObjects_Core_D12:Clean">
+			<MSBuild Targets="Clean" Projects="RemObjects_Core_D12.dproj"/>
+		</Target>
+		<Target Name="RemObjects_Core_D12:Make">
+			<MSBuild Targets="Make" Projects="RemObjects_Core_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="RemObjects_Core_D12" Name="RemObjects_IDE_D12">
+			<MSBuild Projects="IDE\RemObjects_IDE_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="RemObjects_Core_D12:Clean" Name="RemObjects_IDE_D12:Clean">
+			<MSBuild Targets="Clean" Projects="IDE\RemObjects_IDE_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="RemObjects_Core_D12:Make" Name="RemObjects_IDE_D12:Make">
+			<MSBuild Targets="Make" Projects="IDE\RemObjects_IDE_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="RemObjects_Core_D12" Name="RemObjects_WebBroker_D12">
+			<MSBuild Projects="RemObjects_WebBroker_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="RemObjects_Core_D12:Clean" Name="RemObjects_WebBroker_D12:Clean">
+			<MSBuild Targets="Clean" Projects="RemObjects_WebBroker_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="RemObjects_Core_D12:Make" Name="RemObjects_WebBroker_D12:Make">
+			<MSBuild Targets="Make" Projects="RemObjects_WebBroker_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="RemObjects_Core_D12" Name="RemObjects_Indy_D12">
+			<MSBuild Projects="RemObjects_Indy_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="RemObjects_Core_D12:Clean" Name="RemObjects_Indy_D12:Clean">
+			<MSBuild Targets="Clean" Projects="RemObjects_Indy_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="RemObjects_Core_D12:Make" Name="RemObjects_Indy_D12:Make">
+			<MSBuild Targets="Make" Projects="RemObjects_Indy_D12.dproj"/>
+		</Target>
+		<Target Name="RemObjects_RODX_D12">
+			<MSBuild Projects="RODX\RemObjects_RODX_D12.dproj"/>
+		</Target>
+		<Target Name="RemObjects_RODX_D12:Clean">
+			<MSBuild Targets="Clean" Projects="RODX\RemObjects_RODX_D12.dproj"/>
+		</Target>
+		<Target Name="RemObjects_RODX_D12:Make">
+			<MSBuild Targets="Make" Projects="RODX\RemObjects_RODX_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="RemObjects_Core_D12;RemObjects_RODX_D12" Name="RemObjects_BPDX_D12">
+			<MSBuild Projects="RemObjects_BPDX_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="RemObjects_Core_D12:Clean;RemObjects_RODX_D12:Clean" Name="RemObjects_BPDX_D12:Clean">
+			<MSBuild Targets="Clean" Projects="RemObjects_BPDX_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="RemObjects_Core_D12:Make;RemObjects_RODX_D12:Make" Name="RemObjects_BPDX_D12:Make">
+			<MSBuild Targets="Make" Projects="RemObjects_BPDX_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="RemObjects_Core_D12" Name="RemObjects_DataSnap_D12">
+			<MSBuild Projects="DataSnap\RemObjects_DataSnap_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="RemObjects_Core_D12:Clean" Name="RemObjects_DataSnap_D12:Clean">
+			<MSBuild Targets="Clean" Projects="DataSnap\RemObjects_DataSnap_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="RemObjects_Core_D12:Make" Name="RemObjects_DataSnap_D12:Make">
+			<MSBuild Targets="Make" Projects="DataSnap\RemObjects_DataSnap_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="RemObjects_Core_D12" Name="RemObjects_Synapse_D12">
+			<MSBuild Projects="RemObjects_Synapse_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="RemObjects_Core_D12:Clean" Name="RemObjects_Synapse_D12:Clean">
+			<MSBuild Targets="Clean" Projects="RemObjects_Synapse_D12.dproj"/>
+		</Target>
+		<Target DependsOnTargets="RemObjects_Core_D12:Make" Name="RemObjects_Synapse_D12:Make">
+			<MSBuild Targets="Make" Projects="RemObjects_Synapse_D12.dproj"/>
+		</Target>
+		<Target Name="Build">
+			<CallTarget Targets="RemObjects_Core_D12;RemObjects_IDE_D12;RemObjects_WebBroker_D12;RemObjects_Indy_D12;RemObjects_RODX_D12;RemObjects_BPDX_D12;RemObjects_DataSnap_D12;RemObjects_Synapse_D12"/>
+		</Target>
+		<Target Name="Clean">
+			<CallTarget Targets="RemObjects_Core_D12:Clean;RemObjects_IDE_D12:Clean;RemObjects_WebBroker_D12:Clean;RemObjects_Indy_D12:Clean;RemObjects_RODX_D12:Clean;RemObjects_BPDX_D12:Clean;RemObjects_DataSnap_D12:Clean;RemObjects_Synapse_D12:Clean"/>
+		</Target>
+		<Target Name="Make">
+			<CallTarget Targets="RemObjects_Core_D12:Make;RemObjects_IDE_D12:Make;RemObjects_WebBroker_D12:Make;RemObjects_Indy_D12:Make;RemObjects_RODX_D12:Make;RemObjects_BPDX_D12:Make;RemObjects_DataSnap_D12:Make;RemObjects_Synapse_D12:Make"/>
+		</Target>
+		<Import Project="$(BDS)\Bin\CodeGear.Group.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Group.Targets')"/>
+	</Project>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/BuildPackages_D5.bpg b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/BuildPackages_D5.bpg
new file mode 100644
index 0000000..6f6cd66
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/BuildPackages_D5.bpg	
@@ -0,0 +1,41 @@
+#------------------------------------------------------------------------------
+VERSION = BWS.01
+#------------------------------------------------------------------------------
+!ifndef ROOT
+ROOT = $(MAKEDIR)\..
+!endif
+#------------------------------------------------------------------------------
+MAKE = $(ROOT)\bin\make.exe -$(MAKEFLAGS) -f$**
+DCC = $(ROOT)\bin\dcc32.exe $**
+BRCC = $(ROOT)\bin\brcc32.exe $**
+#------------------------------------------------------------------------------
+PROJECTS = RemObjects_Core_D5.bpl RemObjects_IDE_D5.bpl \
+  RemObjects_WebBroker_D5.bpl RemObjects_Indy_D5.bpl RemObjects_RODX_D5.bpl \
+  RemObjects_BPDX_D5.bpl RemObjects_Synapse_D5.bpl
+#------------------------------------------------------------------------------
+default: $(PROJECTS)
+#------------------------------------------------------------------------------
+
+RemObjects_Core_D5.bpl: RemObjects_Core_D5.dpk
+  $(DCC)
+
+RemObjects_IDE_D5.bpl: IDE\RemObjects_IDE_D5.dpk
+  $(DCC)
+
+RemObjects_Indy_D5.bpl: RemObjects_Indy_D5.dpk
+  $(DCC)
+
+RemObjects_BPDX_D5.bpl: RemObjects_BPDX_D5.dpk
+  $(DCC)
+
+RemObjects_RODX_D5.bpl: RODX\RemObjects_RODX_D5.dpk
+  $(DCC)
+
+RemObjects_Synapse_D7.bpl: RemObjects_Synapse_D7.dpk
+  $(DCC)
+
+RemObjects_WebBroker_D7.bpl: RemObjects_WebBroker_D7.dpk
+  $(DCC)
+
+
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/BuildPackages_D6.bpg b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/BuildPackages_D6.bpg
new file mode 100644
index 0000000..119cb74
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/BuildPackages_D6.bpg	
@@ -0,0 +1,41 @@
+#------------------------------------------------------------------------------
+VERSION = BWS.01
+#------------------------------------------------------------------------------
+!ifndef ROOT
+ROOT = $(MAKEDIR)\..
+!endif
+#------------------------------------------------------------------------------
+MAKE = $(ROOT)\bin\make.exe -$(MAKEFLAGS) -f$**
+DCC = $(ROOT)\bin\dcc32.exe $**
+BRCC = $(ROOT)\bin\brcc32.exe $**
+#------------------------------------------------------------------------------
+PROJECTS = RemObjects_Core_D6.bpl RemObjects_IDE_D6.bpl \
+  RemObjects_WebBroker_D6.bpl RemObjects_Indy_D6.bpl RemObjects_RODX_D6.bpl \
+  RemObjects_BPDX_D6.bpl RemObjects_DataSnap_D6.bpl RemObjects_Synapse_D6.bpl
+#------------------------------------------------------------------------------
+default: $(PROJECTS)
+#------------------------------------------------------------------------------
+
+RemObjects_Core_D6.bpl: RemObjects_Core_D6.dpk
+  $(DCC)
+
+RemObjects_IDE_D6.bpl: IDE\RemObjects_IDE_D6.dpk
+  $(DCC)
+
+RemObjects_Indy_D6.bpl: RemObjects_Indy_D6.dpk
+  $(DCC)
+
+RemObjects_BPDX_D6.bpl: RemObjects_BPDX_D6.dpk
+  $(DCC)
+
+RemObjects_DataSnap_D6.bpl: DataSnap\RemObjects_DataSnap_D6.dpk
+  $(DCC)
+
+RemObjects_RODX_D6.bpl: rodx\RemObjects_RODX_D6.dpk
+  $(DCC)
+
+RemObjects_Synapse_D6.bpl: RemObjects_Synapse_D6.dpk
+  $(DCC)
+
+RemObjects_WebBroker_D6.bpl: RemObjects_WebBroker_D6.dpk
+  $(DCC)
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/BuildPackages_D7.bpg b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/BuildPackages_D7.bpg
new file mode 100644
index 0000000..b1aed3d
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/BuildPackages_D7.bpg	
@@ -0,0 +1,43 @@
+#------------------------------------------------------------------------------
+VERSION = BWS.01
+#------------------------------------------------------------------------------
+!ifndef ROOT
+ROOT = $(MAKEDIR)\..
+!endif
+#------------------------------------------------------------------------------
+MAKE = $(ROOT)\bin\make.exe -$(MAKEFLAGS) -f$**
+DCC = $(ROOT)\bin\dcc32.exe $**
+BRCC = $(ROOT)\bin\brcc32.exe $**
+#------------------------------------------------------------------------------
+PROJECTS = RemObjects_Core_D7.bpl RemObjects_IDE_D7.bpl \
+  RemObjects_WebBroker_D7.bpl RemObjects_Indy_D7.bpl RemObjects_RODX_D7.bpl \
+  RemObjects_BPDX_D7.bpl RemObjects_DataSnap_D7.bpl RemObjects_Synapse_D7.bpl
+#------------------------------------------------------------------------------
+default: $(PROJECTS)
+#------------------------------------------------------------------------------
+
+RemObjects_Core_D7.bpl: RemObjects_Core_D7.dpk
+  $(DCC)
+
+RemObjects_IDE_D7.bpl: IDE\RemObjects_IDE_D7.dpk
+  $(DCC)
+
+RemObjects_Indy_D7.bpl: RemObjects_Indy_D7.dpk
+  $(DCC)
+
+RemObjects_BPDX_D7.bpl: RemObjects_BPDX_D7.dpk
+  $(DCC)
+
+RemObjects_DataSnap_D7.bpl: DataSnap\RemObjects_DataSnap_D7.dpk
+  $(DCC)
+
+RemObjects_RODX_D7.bpl: rodx\RemObjects_RODX_D7.dpk
+  $(DCC)
+
+RemObjects_Synapse_D7.bpl: RemObjects_Synapse_D7.dpk
+  $(DCC)
+
+RemObjects_WebBroker_D7.bpl: RemObjects_WebBroker_D7.dpk
+  $(DCC)
+
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen/uRODLGenTools.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen/uRODLGenTools.pas
new file mode 100644
index 0000000..96bd332
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen/uRODLGenTools.pas	
@@ -0,0 +1,542 @@
+unit uRODLGenTools;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - CodeGen                                           }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+
+interface
+
+uses Classes, uRODL, uRORemoteDataModule;
+
+const IntfInvkNotice =
+         '{----------------------------------------------------------------------------}'+#13#10+
+         '{ This unit was automatically generated by the RemObjects SDK after reading  }'+#13#10+
+         '{ the RODL file associated with this project .                               }'+#13#10+
+         '{                                                                            }'+#13#10+
+         '{ Do not modify this unit manually, or your changes will be lost when this   }'+#13#10+
+         '{ unit is regenerated the next time you compile the project.                 }'+#13#10+
+         '{----------------------------------------------------------------------------}';
+
+      ImplNotice =
+        '{----------------------------------------------------------------------------}'+#13#10+
+        '{ This unit was automatically generated by the RemObjects SDK after reading  }'+#13#10+
+        '{ the RODL file associated with this project .                               }'+#13#10+
+        '{                                                                            }'+#13#10+
+        '{ This is where you are supposed to code the implementation of your objects. }'+#13#10+
+        '{----------------------------------------------------------------------------}';
+
+      IntfInvkNoticeCSharp =
+         '//---------------------------------------------------------------------------'+#13+
+         '// This source file was automatically generated by the RemObjects SDK after  '+#13+
+         '// reading the RODL file associated with this project.                       '+#13+
+         '//                                                                           '+#13+
+         '// Do not modify this file manually, or your changes will be lost when this  '+#13+
+         '// source file is regenerated the next time you compile the project.         '+#13+
+         '//---------------------------------------------------------------------------';
+
+      ImplNoticeCSharp =
+         '//---------------------------------------------------------------------------'+#13+
+         '// This source file was automatically generated by the RemObjects SDK after  '+#13+
+         '// reading the RODL file associated with this project.                       '+#13+
+         '//                                                                           '+#13+
+         '// This is where you are supposed to code the implementation of your objects.'+#13+
+         '//---------------------------------------------------------------------------';
+
+      DelphiFlagNames : array[TRODLParamFlag] of string = (
+        'const', 'out', 'var', 'result');
+
+      CSharpFlagNames : array[TRODLParamFlag] of string = (
+        '', 'out ', 'ref ', 'result');
+
+      DelphiAsyncInvokeFlagNames : array[TRODLParamFlag] of string = (
+        'const', '[out]', 'const', '[result]');
+
+      DelphiAsyncRetrieveFlagNames : array[TRODLParamFlag] of string = (
+        '[const]', 'out', 'out', 'result');
+
+type
+  PRODataModuleClass = ^TRODataModuleClass;
+  TRODataModuleClass = record
+    ClassType : TRORemoteDataModuleClass;
+    Alias,
+    Description,
+    RequiredUnits : string;
+  end;
+
+// Code generation helpers
+function GetOperationDefinition(
+   const anOperation : TRODLOperation;
+   const aClassName : string = '';
+   const aSuffix : string = '';
+   AddSenderGUID : boolean = FALSE) : string;
+
+function DataTypeToCSharpType(const iType:string; iLibrary:TRODLLibrary=nil; iForNew:boolean=false):string;
+function DataTypeToDelphiDotNetType(const iType:string; iLibrary:TRODLLibrary=nil; iForNew:boolean=false):string;
+
+
+function GetOperationDefinitionCSharp(
+   const anOperation : TRODLOperation;
+   aForInterface:boolean;
+   const aSuffix : string = ''; aLibrary: TRODLLibrary= nil) : string;
+
+function GetOperationDefinitionDelphiForDotNet(const anOperation : TRODLOperation; aLibrary:TRODLLibrary; const aClassName : string = ''; const aSuffix : string = '') : string;
+
+function GetAsyncInvokeOperationDefinition(
+   const anOperation : TRODLOperation;
+   const aClassName : string = '';
+   const aSuffix : string = '') : string;
+
+function GetAsyncRetrieveOperationDefinition(
+   const anOperation : TRODLOperation;
+   const aClassName : string = '';
+   const aSuffix : string = '') : string;
+function NeedsAsyncRetrieveOperationDefinition(anOperation:TRODLOperation):boolean;
+
+function MessageWrite(const iType, iRodlType, iName, iVariable:string):string;
+function MessageRead(const iType, iRodlType, iName:string):string;
+function TypeToReadWriteFn(const iType:string):string;
+
+procedure GetTypeNames(const aLibrary : TRODLLibrary; aResult : TStrings);
+function TypeByName(const aLibrary : TRODLLibrary; const aTypeName : string) : TRODLEntity;
+
+// TRORemoteDatamodule registration
+procedure RegisterRODataModuleClass(aClass : TRORemoteDataModuleClass; const anAlias, aDescription, someRequiredUnits : string);
+function GetRODataModuleClass(Index : integer) : TRODataModuleClass;
+function GetRODataModuleClassCount : integer;
+
+implementation
+
+uses {$IFDEF MSWINDOWS}Windows,{$ENDIF} SysUtils, uRORes, uROTypes, uRODLToPascalIntf;
+
+var _datamodules : TStringList;
+
+const
+  MAX_PARAM_LENGTH = 100;
+
+// Code generation helpers
+function GetOperationDefinition(const anOperation : TRODLOperation;
+  const aClassName : string = ''; const aSuffix : string = '';
+  AddSenderGUID : boolean = FALSE) : string;
+var x : integer;
+    lPars, lPars2, s : string;
+    lFillStr: string;
+begin
+   if not Assigned(anOperation.Result) then s := 'procedure ' else s := 'function ';
+
+   if aClassName<>''
+     then s := s+aClassName+'.'+anOperation.Name
+     else s := s+anOperation.Name;
+
+   if aSuffix<>''
+     then s := s+aSuffix;
+
+   if aClassName = '' then
+     SetLength(lFillStr,Length(s)+4+1) { Interface section }
+   else
+     SetLength(lFillStr,Length(s)+1);  { Implementation section }
+//   FillChar(lFillStr[1],Length(lFillStr),#32);
+
+   for x := 1 to Length(lFillStr) do
+     lFillStr[x] := #32;
+
+   with anOperation do begin
+     lPars := '';
+     lPars2 := '';
+
+     if (Count>0) then begin
+       for x := 0 to (Count-1) do begin
+         with Items[x] do begin
+           if (Flag <> fResult) then begin
+             if Length(lPars2) > MAX_PARAM_LENGTH then begin
+               lPars := lPars+lPars2+#13#10+lFillStr;
+               lPars2 := '';
+             end;
+             lPars2 := lPars2+Format('%s %s: %s; ', [DelphiFlagNames[Flag], Name, GetDataType(DataType)]);
+           end;
+         end;
+       end;
+       lPars := lPars+lPars2;
+     end;
+     
+     if AddSenderGUID then begin
+       lPars2 := 'const __Sender : TGUID';
+       if (lPars<>'') then lPars2 := lPars2+'; ';
+
+       lPars := lPars2+lPars;
+     end;
+
+     if (lPars<>'') then begin
+       if Count>0
+         then s := s+'('+Copy(lPars,1,Length(lPars)-2)+')'
+         else s := s+'('+Copy(lPars,1,Length(lPars))+')'
+     end;
+   end;
+
+   if Assigned(anOperation.Result) then s := s+': '+GetDataType(anOperation.Result.DataType);
+   s := s+';';
+
+   result := s;
+end;
+
+function DataTypeToCSharpType(const iType:string; iLibrary:TRODLLibrary=nil; iForNew:boolean=false):string;
+var
+  lType,lElementType:string;
+begin
+  lType := iType;
+  if CompareText(iType,'Integer') = 0 then begin
+    Result := 'Int32';
+  end
+  else if CompareText(iType,'WideString') = 0 then begin
+    Result := 'String';
+  end
+  else if CompareText(iType,'DateTime') = 0 then begin
+    Result := 'DateTime'; //make sure casing is good
+  end
+  else if CompareText(iType,'Xml') = 0 then begin
+    Result := 'XmlNode';
+  end
+  else if Assigned(iLibrary) and IsArray(lType,ilibrary,lElementType) then begin
+    if iForNew then
+      Result := DataTypeToCSharpType(lElementType,iLibrary)+'[0]'
+    else
+      Result := DataTypeToCSharpType(lElementType,iLibrary)+'[]';
+  end
+  else if Assigned(iLibrary) then begin
+    if IsUserDefinedType(lType,iLibrary) then begin
+      result := lType; // IsUserDefinedType() fixed the casing
+    end
+    else begin
+      Result := LowerCase(iType);
+      if Length(Result) > 0 then Result[1] := UpCase(Result[1]);
+    end;
+  end
+  else begin
+    Result := iType;
+  end;
+  if iForNew and (Pos('[0]',result) = 0) then result := result+'()';
+end;
+
+function DataTypeToDelphiDotNetType(const iType:string; iLibrary:TRODLLibrary=nil; iForNew:boolean=false):string;
+var
+  lType:string;
+begin
+  lType := iType;
+  if CompareText(iType, 'Xml') = 0 then
+    result := 'XmlNode'
+  else
+  if CompareText(iType,'WideString') = 0 then begin
+    Result := 'String';
+  end
+  else if Assigned(iLibrary) then begin
+    if IsUserDefinedType(lType,iLibrary) then begin
+      result := lType; // IsUserDefinedType() fixed the casing
+    end
+    else begin
+      Result := LowerCase(iType);
+      if Length(Result) > 0 then Result[1] := UpCase(Result[1]);
+    end;
+  end
+  else begin
+    Result := iType;
+  end;
+  //if iForNew and (Pos('[0]',result) = 0) then result := result+'()';
+end;
+
+function GetOperationDefinitionCSharp(const anOperation : TRODLOperation; aForInterface:Boolean; const aSuffix : string = ''; aLibrary: TRODLLibrary = nil) : string;
+var x : integer;
+    pars, s : string;
+begin
+   if not Assigned(anOperation.Result) then s := 'void ' else s := DataTypeToCSharpType(anOperation.Result.DataType,aLibrary)+' ';
+   if not aForInterface then s := 'public '+s;
+
+   {if aClassName<>''
+     then s := s+aClassName+'.'+anOperation.Name
+     else}
+   s := s+anOperation.Name;
+
+   {if aSuffix<>''
+     then s := s+aSuffix;}
+
+   with anOperation do
+     if (Count>0) then begin
+       pars := '';
+
+       for x := 0 to (Count-1) do begin
+         with Items[x] do begin
+           if (Flag<>fresult)
+             then pars :=pars+Format('%s%s %s, ', [CSharpFlagNames[Flag], DataTypeToCSharpType(DataType,aLibrary), Name]);
+         end;
+       end;
+                    
+       if (pars<>'') then
+         s := s+'('+Copy(pars,1,Length(pars)-2)+')'
+       else
+         s := s+'()';
+     end
+     else
+       s := s+'()';
+
+   //if Assigned(anOperation.Result) then s := s+': '+anOperation.Result.DataType;
+   //s := s+';';
+   if aForInterface then s := s+';';
+
+   result := s;
+end;
+
+function GetOperationDefinitionDelphiForDotNet(const anOperation : TRODLOperation; aLibrary:TRODLLibrary; const aClassName : string = ''; const aSuffix : string = '') : string;
+var x : integer;
+    pars, s : string;
+begin
+   if not Assigned(anOperation.Result) then s := 'procedure ' else s := 'function ';
+
+   if aClassName<>''
+     then s := s+aClassName+'.'+anOperation.Name
+     else s := s+anOperation.Name;
+
+   if aSuffix<>''
+     then s := s+aSuffix;
+
+   with anOperation do
+     if (Count>0) then begin
+       pars := '';
+
+       for x := 0 to (Count-1) do begin
+         with Items[x] do begin
+           if (Flag<>fresult)
+             then pars :=pars+Format('%s %s: %s; ', [DelphiFlagNames[Flag], Name, DataTypeToCSharpType(DataType)]);
+         end;
+       end;
+
+       if (pars<>'') then s := s+'('+Copy(pars,1,Length(pars)-2)+')';
+     end;
+
+   if Assigned(anOperation.Result) then s := s+': '+DataTypeToCSharpType(anOperation.Result.DataType);
+   s := s+';';
+
+   result := s;
+end;
+
+
+function GetAsyncInvokeOperationDefinition(
+   const anOperation : TRODLOperation;
+   const aClassName : string = '';
+   const aSuffix : string = '') : string;
+var x : integer;
+    pars, s : string;
+begin
+   s := 'procedure ';
+
+   if aClassName<>''
+     then s := s+aClassName+'.'+'Invoke_'+anOperation.Name
+     else s := s+'Invoke_'+anOperation.Name;
+
+   if aSuffix<>''
+     then s := s+aSuffix;
+
+   with anOperation do
+     if (Count>0) then begin
+       pars := '';
+
+       for x := 0 to (Count-1) do begin
+         with Items[x] do begin
+           if not (Flag in [fOut,fResult]) then
+             pars :=pars+Format('%s %s: %s; ', [DelphiAsyncInvokeFlagNames[Flag], Name, GetDataType(DataType)]);
+         end;
+       end;
+
+       if (pars<>'') then s := s+'('+Copy(pars,1,Length(pars)-2)+')';
+     end;
+
+   //if Assigned(anOperation.Result) then s := s+': '+anOperation.Result.DataType;
+   s := s+';';
+
+   result := s;
+end;
+
+function NeedsAsyncRetrieveOperationDefinition(anOperation:TRODLOperation):boolean;
+var
+  i:integer;
+begin
+  result := Assigned(anOperation.Result) or (anOperation.ForceAsyncResponse);
+  if not result then
+    for i := 0 to anOperation.Count-1 do with anOperation.Items[i] do
+      if (Flag <> fIn) then result := true;
+end;
+
+function GetAsyncRetrieveOperationDefinition(
+   const anOperation : TRODLOperation;
+   const aClassName : string = '';
+   const aSuffix : string = '') : string;
+var x : integer;
+    pars, s : string;
+begin
+   if not Assigned(anOperation.Result) then s := 'procedure ' else s := 'function ';
+
+   if aClassName<>''
+     then s := s+aClassName+'.'+'Retrieve_'+anOperation.Name
+     else s := s+'Retrieve_'+anOperation.Name;
+
+   if aSuffix<>''
+     then s := s+aSuffix;
+
+   with anOperation do
+     if (Count>0) then begin
+       pars := '';
+
+       for x := 0 to (Count-1) do begin
+         with Items[x] do begin
+           if not (Flag in [fIn,fResult]) then
+             pars :=pars+Format('%s %s: %s; ', [DelphiAsyncRetrieveFlagNames[Flag], Name, GetDataType(DataType)]);
+         end;
+       end;
+
+       if (pars<>'') then s := s+'('+Copy(pars,1,Length(pars)-2)+')';
+     end;
+
+   if Assigned(anOperation.Result) then s := s+': '+GetDataType(anOperation.Result.DataType);
+   s := s+';';
+
+   result := s;
+end;
+
+function TypeToReadWriteFn(const iType:string):string;
+begin
+  if SameText(iType,'Integer') then begin
+    result := 'Int32';
+  end
+  else if SameText(iType,'Boolean') then begin
+    result := 'Boolean';
+  end
+  else if SameText(iType,'WideString') then begin
+    result := 'WideString';
+  end
+  else if SameText(iType,'AnsiString') then begin
+    result := 'AnsiString';
+  end
+  {else if (iType = 'Binary') or (iType = 'Array') then begin
+    Result := 'ISerializable';
+  end}
+  else begin
+    Result := '';
+  end;
+end;
+
+function MessageWrite(const iType, iRodlType, iName, iVariable:string):string;
+var lWriteFn: string;
+begin
+  lWriteFn := TypeToReadWriteFn(iRodlType);
+  if lWriteFn <> '' then begin
+    Result := Format('%s("%s", %s);',
+                     [lWriteFn, iName, iVariable]);
+  end
+  else begin
+    Result := Format('("%s", %s, typeof(%s));',  //typeof(%s),
+                     [iName, iVariable, iType]); //iType,
+  end;
+end;
+
+function MessageRead(const iType, iRodlType, iName:string):string;
+var lWriteFn: string;
+begin
+  lWriteFn := TypeToReadWriteFn(iRodlType);
+  if lWriteFn <> '' then begin
+    Result := Format('__Message.Read%s("%s");',
+                     [lWriteFn, iName]);
+  end
+  else begin
+    Result := Format('(%s)__Message.Read("%s", typeof(%s));',
+                     [iType, iName, iType]);
+  end;
+end;
+
+procedure GetTypeNames(const aLibrary : TRODLLibrary; aResult : TStrings);
+var i : integer;
+begin
+  with aLibrary do begin
+    for i := 0 to StructCount-1 do
+      aResult.AddObject(Structs[i].Name, pointer(Structs[i]));
+
+    for i := 0 to EnumCount-1 do
+      aResult.AddObject(Enums[i].Name, pointer(Enums[i]));
+
+    for i := 0 to ArrayCount-1 do
+      aResult.AddObject(Arrays[i].Name, pointer(Arrays[i]));
+  end;
+end;
+
+function TypeByName(const aLibrary : TRODLLibrary; const aTypeName : string) : TRODLEntity;
+var i : integer;
+begin
+  result := NIL;
+
+  with aLibrary do begin
+    for i := 0 to (Count-1) do
+      if (CompareText(Items[i].Name, aTypeName)=0) then begin
+        result := Items[i];
+        Exit;
+      end;
+  end;
+end;
+
+// TRORemoteDatamodule registration
+procedure RegisterRODataModuleClass(aClass : TRORemoteDataModuleClass; const anAlias, aDescription, someRequiredUnits : string);
+var idx : integer;
+    item : PRODataModuleClass;
+begin
+  idx := _datamodules.IndexOf(aClass.ClassName);
+  if (idx>=0) then begin
+    Dispose(PRODataModuleClass(_datamodules.Objects[idx]));
+    _datamodules.Delete(idx);
+  end;
+
+  New(item);
+  item.ClassType := aClass;
+  item.Alias := anAlias;
+  item.Description := aDescription;
+  item.RequiredUnits := someRequiredUnits;
+
+  _datamodules.AddObject(aClass.ClassName, TObject(item));
+end;
+
+function GetRODataModuleClass(Index : integer) : TRODataModuleClass;
+begin
+  result := PRODataModuleClass(_datamodules.Objects[Index])^
+end;
+
+function GetRODataModuleClassCount : integer;
+begin
+  result := _datamodules.Count
+end;
+
+procedure DisposeModuleClasses;
+var i : integer;
+begin
+  for i := 0 to (_datamodules.Count-1) do
+    Dispose(PRODataModuleClass(_datamodules.Objects[i]));
+end;
+
+initialization
+  _datamodules := TStringList.Create;
+  {_datamodules.Duplicates := dupError;}
+  _datamodules.Sorted := TRUE;
+
+finalization
+  DisposeModuleClasses();
+  FreeAndNIL(_datamodules);
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen/uRODLToPascal.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen/uRODLToPascal.pas
new file mode 100644
index 0000000..6ddeb88
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen/uRODLToPascal.pas	
@@ -0,0 +1,13 @@
+unit uRODLToPascal;
+
+interface
+
+const PASCAL_INDENTATION_LEVEL_1 = 2;
+      PASCAL_INDENTATION_LEVEL_2 = 4;
+      PASCAL_INDENTATION_LEVEL_3 = 6;
+      PASCAL_INDENTATION_LEVEL_4 = 8;
+
+implementation
+
+end.
+ 
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen/uRODLToPascalAsync.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen/uRODLToPascalAsync.pas
new file mode 100644
index 0000000..662d1a3
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen/uRODLToPascalAsync.pas	
@@ -0,0 +1,370 @@
+unit uRODLToPascalAsync;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - CodeGen                                           }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+
+uses uRODL;
+
+type { TRODLToPascalAsync }
+     TRODLToPascalAsync = class(TRODLConverter)
+     private
+       procedure WriteServiceDeclarationInterface(aService: TRODLService);
+       procedure WriteServiceDeclarationProxy(aService: TRODLService);
+       procedure WriteServiceDeclarationCoClass(aService: TRODLService);
+       procedure WriteCoClass(aLibrary : TRODLLibrary; aService: TRODLService);
+
+//       function IsSOAPService(aService : TRODLService) : boolean;
+     protected
+       procedure IntConvert(const aLibrary : TRODLLibrary; const aTargetEntity : string = ''); override;
+
+     public
+       class function GetTargetFileName(const aLibrary : TRODLLibrary; const aTargetEntity : string = ''): string; override;
+
+     end;
+
+implementation
+
+uses SysUtils, Classes, Dialogs, uROTypes,
+     {$IFDEF DELPHI5}
+     ComObj,
+     {$ENDIF}
+     uRODLGenTools, uRODLToPascal, uRODLToPascalIntf, uROClasses;
+
+{ TRODLToPascalAsync }
+
+procedure TRODLToPascalAsync.IntConvert(const aLibrary: TRODLLibrary; const aTargetEntity: string);
+var {x,} i : integer;
+    s : string;
+    lServices: IROStrings;
+begin
+  try
+    Write(Format('unit %s;', [ChangeFileExt(GetTargetFileName(aLibrary), '')]));
+    WriteEmptyLine;
+
+    WriteLines(IntfInvkNotice);
+    WriteEmptyLine;
+
+    write('{$I RemObjects.inc}');
+    WriteEmptyLine;
+
+    Write('interface');
+    WriteEmptyLine;
+
+    Write('uses');
+    Write('{vcl:} Classes, TypInfo,',PASCAL_INDENTATION_LEVEL_1);
+    Write('{RemObjects:} uROXMLIntf, uROClasses, uROTypes, uROClientIntf, uROAsync,',PASCAL_INDENTATION_LEVEL_1);
+
+    if aLibrary.UseCount > 0 then begin
+      s := '';
+      for i := 0 to aLibrary.UseCount-1 do begin
+        if s <> '' then s := s+', ';
+        if aLibrary.Use[i].LoadedRodlLibraryName <> '' then
+          s := s+aLibrary.Use[i].LoadedRodlLibraryName+'_Intf, '
+                +aLibrary.Use[i].LoadedRodlLibraryName+'_Async'
+        else
+          s := s+ChangeFileExt(ExtractFilename(aLibrary.Use[i].RodlFile),'')+'_Intf, '
+                +ChangeFileExt(ExtractFilename(aLibrary.Use[i].RodlFile),'')+'_Async';
+      end; { for }
+      s := s+',';
+
+      Write('{Used RODLs:} '+s,PASCAL_INDENTATION_LEVEL_1);
+    end;
+
+    Write('{Project:} '+ChangeFileExt(TRODLToIntf.GetTargetFileName(aLibrary),'')+';',PASCAL_INDENTATION_LEVEL_1);
+    lServices := aLibrary.CalcServiceOrder;
+    WriteEmptyLine;
+    if aLibrary.ServiceCount > 0 then
+    begin
+      Write('type');
+      (*
+      for i := 0 to (aLibrary.ServiceCount-1) do begin
+        if not aLibrary.Services[i].IsFromUsedRodl then
+          Write(Format('I%s_Async = interface;', [aLibrary.Services[i].Name]), PASCAL_INDENTATION_LEVEL_1);
+      end;
+
+      for i := 0 to (aLibrary.ServiceCount-1) do begin
+        if not aLibrary.Services[i].IsFromUsedRodl then
+        Write(Format('Co%s_Async = class;', [aLibrary.Services[i].Name]), PASCAL_INDENTATION_LEVEL_1);
+      end;
+
+      for i := 0 to (aLibrary.ServiceCount-1) do begin
+        if not aLibrary.Services[i].IsFromUsedRodl then
+          Write(Format('T%s_AsyncProxy = class;', [aLibrary.Services[i].Name]),PASCAL_INDENTATION_LEVEL_1);
+      end;    *)
+
+      for i := 0 to lServices.Count -1 do begin
+        if not TRODLService(lServices.Objects[i]).IsFromUsedRodl then
+          WriteServiceDeclarationInterface(TRODLService(lServices.Objects[i]));
+      end;
+
+      for i := 0 to lServices.Count -1 do begin
+        if not TRODLService(lServices.Objects[i]).IsFromUsedRodl then
+          WriteServiceDeclarationCoClass(TRODLService(lServices.Objects[i]));
+      end;
+
+      for i := 0 to lServices.Count -1 do begin
+        if not TRODLService(lServices.Objects[i]).IsFromUsedRodl then
+          WriteServiceDeclarationProxy(TRODLService(lServices.Objects[i]));
+      end;
+    end;
+
+    //WriteEmptyLine;
+
+    Write('implementation');
+    WriteEmptyLine;
+
+    Write('uses');
+    Write('{vcl:} SysUtils;',PASCAL_INDENTATION_LEVEL_1);
+    WriteEmptyLine;
+
+    for i := 0 to (aLibrary.ServiceCount-1) do
+      WriteCoClass(aLibrary, aLibrary.Services[i]);
+
+    Write('initialization');
+    {for i := 0 to (aLibrary.Count-1) do
+      if (aLibrary.Items[i] is TRODLArray) or (aLibrary.Items[i] is TRODLStruct)
+        then Write('  RegisterROClass('+aLibrary.Items[i].Name+');');}
+
+    //WriteEmptyLine;
+
+    {Write('finalization');
+    for i := 0 to (aLibrary.Count-1) do
+      if (aLibrary.Items[i] is TRODLArray) or (aLibrary.Items[i] is TRODLStruct)
+        then Write('  UnRegisterClass('+aLibrary.Items[i].Name+');');
+
+    WriteEmptyLine;}
+
+    Write('end.');
+
+  finally
+  end;
+end;
+
+class function TRODLToPascalAsync.GetTargetFileName(const aLibrary: TRODLLibrary;
+  const aTargetEntity: string): string;
+begin
+  try
+    result := aLibrary.Name+'_Async.pas'
+  except
+    result := 'Unknown.pas';
+  end;
+end;
+
+const
+  InnerIndent = 4;
+
+procedure TRODLToPascalAsync.WriteCoClass(aLibrary : TRODLLibrary; aService: TRODLService);
+var i, p : integer;
+    sa : string;
+//    soapsvc : boolean;
+begin
+  if not aService.IsFromUsedRodl then with aService.Default do begin
+//    soapsvc := IsSOAPService(aService);
+
+    Write('{ Co'+aService.Name+' }');
+    WriteEmptyLine;
+
+    Write(Format('class function Co%s_Async.Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): I%s_Async;',
+          [aService.Name, aService.Name]));
+    Write('begin');
+    Write(Format('  result := T%s_AsyncProxy.Create(aMessage, aTransportChannel);', [aService.Name]));
+    Write('end;');
+    WriteEmptyLine;
+
+    if Count > 0 then begin
+      Write(Format('{ T%s_AsyncProxy }', [aService.Name]));
+      WriteEmptyLine;
+    end;
+
+    Write(Format('function T%s_AsyncProxy.__GetInterfaceName:string;',[aService.Name]));
+    Write('begin');
+    Write(Format('  result := ''%s'';',[aService.Name]));
+    Write('end;');
+    WriteEmptyLine;
+
+    for i := 0 to (Count-1) do begin
+      Write(GetAsyncInvokeOperationDefinition(Items[i], Format('T%s_AsyncProxy', [aService.Name])));
+//      Write('var __request:TStream;');
+//      if soapsvc then Write('var __http : IROHTTPTransport;');
+      Write('begin');
+      Write(Format('__AssertProxyNotBusy(''%s'');',[Items[i].Name]),PASCAL_INDENTATION_LEVEL_1);
+//      Write('__request := TMemoryStream.Create;',PASCAL_INDENTATION_LEVEL_1);
+      //Write('__response := TMemoryStream.Create;',PASCAL_INDENTATION_LEVEL_1);
+      WriteEmptyLine;
+      sa := GetAttributes(Items[i].Info.Attributes, aService.Info.Attributes, aLibrary.Info.Attributes, InnerIndent);
+      if sa <> '' then
+        Write('__Message.SetAttributes(__TransportChannel, '+sa+');', InnerIndent);
+
+
+      Write(Format('__Message.InitializeRequestMessage(__TransportChannel, ''%s'', __InterfaceName, ''%s'');', [aLibrary.Name, Items[i].Name]), PASCAL_INDENTATION_LEVEL_1);
+
+      with Items[i] do begin
+        for p := 0 to (Count-1) do
+          if IsInputFlag(Items[p].Flag) then begin
+            if (StrToDataType(Items[p].DataType)=rtDateTime)
+              then sa := '[paIsDateTime]'
+              else sa := '[]';
+
+            Write(Format('__Message.Write(''%s'', TypeInfo(%s), %s, %s);',
+                            [Items[p].Name, GetDataType(Items[p].DataType), Items[p].Name, sa]), PASCAL_INDENTATION_LEVEL_1);
+          end;
+      end;
+//      Write('__Message.Finalize;',PASCAL_INDENTATION_LEVEL_1);
+//      WriteEmptyLine;
+
+//      Write('__Message.WriteToStream(__request);',PASCAL_INDENTATION_LEVEL_1);
+      if NeedsAsyncRetrieveOperationDefinition(Items[i]) then begin
+        Write(Format('__DispatchAsyncRequest(''%s'',__Message);',[Items[i].Name]),PASCAL_INDENTATION_LEVEL_1);
+      end
+      else begin
+        Write(Format('__DispatchAsyncRequest(''%s'',__Message, false);',[Items[i].Name]),PASCAL_INDENTATION_LEVEL_1);
+      end;
+      if sa <> '' then
+        Write('    __Message.UnsetAttributes(__TransportChannel);');
+      Write('end;');
+      WriteEmptyLine;
+
+      if NeedsAsyncRetrieveOperationDefinition(Items[i]) then begin
+        Write(GetAsyncRetrieveOperationDefinition(Items[i], Format('T%s_AsyncProxy', [aService.Name])));
+        Write('var __response:TStream;');
+        Write('begin');
+
+        with Items[i] do begin
+          for p := 0 to (Count-1) do
+            if (Items[p].Flag in [fInOut,fOut]) and IsImplementedAsClass(Items[p].DataType, aLibrary) then
+              Write(Format('%s := nil;', [Items[p].Name]),PASCAL_INDENTATION_LEVEL_1);
+          if Assigned(Result) and IsImplementedAsClass(Result.DataType, aLibrary) then
+              Write('result := nil;', PASCAL_INDENTATION_LEVEL_1);
+        end;
+        Write(Format('__response := __RetrieveAsyncResponse(''%s'');',[Items[i].Name]),PASCAL_INDENTATION_LEVEL_1);
+        //Write('__TransportChannel.Dispatch(__request, __response);',PASCAL_INDENTATION_LEVEL_1);
+        Write('__Message.ReadFromStream(__response);',PASCAL_INDENTATION_LEVEL_1);
+        WriteEmptyLine;
+
+        //Write(Format('Message.Initialize(''I%s'', ''%s'');', [aService.Name, Items[i].Name]), PASCAL_INDENTATION_LEVEL_1);
+        with Items[i] do begin
+
+          if Assigned(Result) then begin
+            if (StrToDataType(Result.DataType)=rtDateTime) then sa := '[paIsDateTime]' else sa := '[]';
+            Write(Format('__Message.Read(''%s'', TypeInfo(%s), Result, %s);',
+                         [Result.Name, GetDataType(Result.DataType), sa]),PASCAL_INDENTATION_LEVEL_1);
+          end;
+          for p := 0 to (Count-1) do
+            if IsOutputFlag(Items[p].Flag) then begin
+
+              if (StrToDataType(Items[p].DataType)=rtDateTime) then sa := '[paIsDateTime]' else sa := '[]';
+              Write(Format('__Message.Read(''%s'', TypeInfo(%s), %s, %s);',
+                          [Items[p].Name, GetDataType(Items[p].DataType), Items[p].Name, sa]),PASCAL_INDENTATION_LEVEL_1);
+            end;
+        end;
+        //Write('Message.Finalize;',5);
+
+        //Write('__request.Free;',PASCAL_INDENTATION_LEVEL_1);
+        WriteEmptyLine;
+        Write('__response.Free();',PASCAL_INDENTATION_LEVEL_1);
+        Write('end;');
+        WriteEmptyLine;
+      end;
+    end;
+
+    WriteEmptyLine;
+  end;
+end;
+{
+function TRODLToPascalAsync.IsSOAPService(aService: TRODLService): boolean;
+begin
+  result := aService.Attributes.Values['Type'] = 'SOAP';
+end;
+}
+
+
+
+
+procedure TRODLToPascalAsync.WriteServiceDeclarationCoClass(
+  aService: TRODLService);
+    //lOperation:TRODLOperation;
+begin
+  if not aService.IsFromUsedRodl then with aService.Default do begin
+    Write(Format('{ Co%s_Async }', [aService.Name]), PASCAL_INDENTATION_LEVEL_1);
+    Write(Format('Co%s_Async = class', [aService.Name]), PASCAL_INDENTATION_LEVEL_1);
+    Write(Format('class function Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): I%s_Async;',
+                 [aService.Name]), PASCAL_INDENTATION_LEVEL_2);
+    Write('end;', PASCAL_INDENTATION_LEVEL_1);
+    WriteEmptyLine;
+  end;
+end;
+
+procedure TRODLToPascalAsync.WriteServiceDeclarationInterface(
+  aService: TRODLService);
+var i:integer;
+    //lOperation:TRODLOperation;
+begin
+  if not aService.IsFromUsedRodl then with aService.Default do begin
+
+    Write(Format('{ I%s_Async }', [aService.Name]), PASCAL_INDENTATION_LEVEL_1);
+    if aService.Ancestor <> '' then begin
+      Write(Format('I%s_Async = interface(I%s_Async)', [aService.Name,aService.Ancestor]), PASCAL_INDENTATION_LEVEL_1);
+    end
+    else begin
+      Write(Format('I%s_Async = interface(IROAsyncInterface)', [aService.Name]), PASCAL_INDENTATION_LEVEL_1);
+    end;
+    Write(Format('[''%s'']', [NewGuidAsString()]), PASCAL_INDENTATION_LEVEL_2);
+
+    for i := 0 to (Count-1) do
+      Write(GetAsyncInvokeOperationDefinition(Items[i]), PASCAL_INDENTATION_LEVEL_2);
+    for i := 0 to (Count-1) do
+      if NeedsAsyncRetrieveOperationDefinition(Items[i]) then
+        Write(GetAsyncRetrieveOperationDefinition(Items[i]), PASCAL_INDENTATION_LEVEL_2);
+
+    Write('end;', PASCAL_INDENTATION_LEVEL_1);
+    WriteEmptyLine;
+  end;
+end;
+
+procedure TRODLToPascalAsync.WriteServiceDeclarationProxy(
+  aService: TRODLService);
+var i:integer;
+    //lOperation:TRODLOperation;
+begin
+  if not aService.IsFromUsedRodl then with aService.Default do begin
+    Write(Format('{ T%s_AsyncProxy }', [aService.Name]), PASCAL_INDENTATION_LEVEL_1);
+    if aService.Ancestor <> '' then begin
+      Write(Format('T%s_AsyncProxy = class(T%s_AsyncProxy, I%s_Async)', [aService.Name, aService.Ancestor, aService.Name]),PASCAL_INDENTATION_LEVEL_1);
+    end
+    else begin
+      Write(Format('T%s_AsyncProxy = class(TROAsyncProxy, I%s_Async)', [aService.Name, aService.Name]),PASCAL_INDENTATION_LEVEL_1);
+    end;
+    Write('private',PASCAL_INDENTATION_LEVEL_1);
+    Write('protected',PASCAL_INDENTATION_LEVEL_1);
+    Write('  function __GetInterfaceName:string; override;',PASCAL_INDENTATION_LEVEL_1);
+    WriteEmptyLine;
+
+    for i := 0 to (Count-1) do
+      Write(GetAsyncInvokeOperationDefinition(Items[i]), PASCAL_INDENTATION_LEVEL_2);
+    for i := 0 to (Count-1) do
+      if NeedsAsyncRetrieveOperationDefinition(Items[i]) then
+        Write(GetAsyncRetrieveOperationDefinition(Items[i]), PASCAL_INDENTATION_LEVEL_2);
+
+    Write('end;',PASCAL_INDENTATION_LEVEL_1);
+    WriteEmptyLine;
+  end;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen/uRODLToPascalImpl.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen/uRODLToPascalImpl.pas
new file mode 100644
index 0000000..3b68499
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen/uRODLToPascalImpl.pas	
@@ -0,0 +1,341 @@
+unit uRODLToPascalImpl;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - CodeGen                                           }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+
+uses uRODL;
+
+type { TRODLToImpl }
+     TRODLToImpl = class(TRODLConverter)
+     private
+       fService : TRODLService;
+       fAncestorService:TRODLService;
+       fServerClassName: string;
+       fRequiredUnits: string;
+
+       procedure WriteServiceDeclaration(const aService: TRODLService);
+       procedure WriteOperationImplementation(const anOperation : TRODLOperation);
+       procedure SetServerClassName(const Value: string);
+       function GetWriteDataModule: boolean;
+
+     protected
+       procedure IntConvert(const aLibrary : TRODLLIbrary; const aTargetEntity : string = ''); override;
+       function ValidateTargetEntity(const aLibrary : TRODLLIbrary; const aTargetEntity : string) : boolean; override;
+
+     public
+       class function GetTargetFileName(const aLibrary : TRODLLIbrary; const aTargetEntity : string = ''): string; override;
+
+       property WriteDataModule : boolean read GetWriteDataModule;
+       procedure WriteDFM(const aLibrary: TRODLLIbrary; const aTargetEntity: string; const aFilename: string);
+
+       property ServerClassName : string read fServerClassName write SetServerClassName;
+       property RequiredUnits : string read fRequiredUnits write fRequiredUnits;
+     end;
+
+implementation
+
+uses SysUtils, Dialogs, Classes,
+     {$IFDEF HYDRA_DESIGNTIME}
+     uROIDETools, uEWOTAHelpers,
+     {$ENDIF HYDRA_DESIGNTIME}
+     uRODLGenTools, uRODLToPascalInvk, uRODLToPascal, uROServer;
+
+function IsHydraModule : boolean;
+{$IFDEF HYDRA_DESIGNTIME}
+var
+  lSource: string;
+{$ENDIF HYDRA_DESIGNTIME}
+begin
+  result := FALSE;
+  {$IFDEF HYDRA_DESIGNTIME}
+  if (CurrentProject<>NIL) then begin
+    lSource := UpperCase(ReadModuleSource(CurrentProject));
+    result := Pos('{#HYDRAMODULE}', lSource)>0;
+  end;
+  {$ENDIF HYDRA_DESIGNTIME}
+end;
+
+{ TRODLToImpl }
+procedure TRODLToImpl.WriteDFM(const aLibrary: TRODLLIbrary; const aTargetEntity: string; const aFilename: string);
+var svc : TRODLService;
+begin
+  with TStringList.Create do try
+    svc := aLibrary.ItemByName(aTargetEntity) as TRODLService;
+
+    if (Trim(svc.Ancestor)='') then Add(Format('object %s: T%s', [aTargetEntity, aTargetEntity]))
+                               else Add(Format('inherited %s: T%s', [aTargetEntity, aTargetEntity]));
+    Add('  OldCreateOrder = True');
+    Add('  Left = 200');
+    Add('  Top = 200');
+    Add('  Height = 300');
+    Add('  Width = 300');
+    Add('end');
+  finally
+    SaveToFile(aFilename);
+    Free;
+  end;
+end;
+
+procedure TRODLToImpl.IntConvert(const aLibrary: TRODLLIbrary; const aTargetEntity : string = '');
+var i : integer;
+    s, s2 : string;
+    lIsHydraModule : boolean;
+begin
+  if not Assigned(fService) or not Assigned(fService.Default) then exit;
+  if ServerClassName = '' then begin
+    ServerClassName := 'TRORemoteDataModule';
+     if (copy(RequiredUnits, Length(RequiredUnits), 1) <> ',') and (RequiredUnits <> '') then
+      RequiredUnits := RequiredUnits + ',';
+    RequiredUnits := RequiredUnits + 'uRORemoteDataModule';
+  end;
+
+  Write(Format('unit %s;', [ChangeFileExt(GetTargetFileName(aLibrary, TargetEntity), '')]));
+  WriteEmptyLine;
+
+  WriteLines(ImplNotice);
+  WriteEmptyLine;
+
+  write('{$I RemObjects.inc}');
+  WriteEmptyLine;
+
+  Write('interface');
+  WriteEmptyLine;
+
+  Write('uses');
+  Write('{vcl:} Classes, SysUtils, ' ,PASCAL_INDENTATION_LEVEL_1);
+  Write('{RemObjects:} uROXMLIntf, uROClientIntf, uROTypes, uROServer, uROServerIntf, uROSessions,' ,PASCAL_INDENTATION_LEVEL_1);
+
+  {
+    handled via RequiredUnits
+  if WriteDataModule then begin
+    s := Copy(ServerClassName,2,MaxInt);
+    if (s<>'') // For inherited ones...
+      then Write(Format('              u%s,', [s]),PASCAL_INDENTATION_LEVEL_1);
+  end;}
+
+  if (RequiredUnits<>'') then begin
+    s := Trim(RequiredUnits);
+    if (s[Length(s)]<>',') then s := s+',';
+    Write('{Required:} '+s ,PASCAL_INDENTATION_LEVEL_1);
+  end;
+
+  {TODO: -cRO3 RequiredUnits, and UsedRODLs might overlap if (for example) using the DARemoteService
+              ancestor was chosen not in SB but from the IDE. Check these and create a unique list
+              for RO3. }
+
+  if fService.Ancestor <> '' then begin
+    fAncestorService := aLibrary.FindService(fService.Ancestor);
+    if Assigned(fAncestorService) and (fAncestorService.ImplUnit <> '') then
+      Write('{Ancestor Implementation:} '+fAncestorService.ImplUnit+',',PASCAL_INDENTATION_LEVEL_1)
+    else
+      Write('{Ancestor Implementation:} '+fService.Ancestor+'_Impl,',PASCAL_INDENTATION_LEVEL_1);
+  end;
+
+  if aLibrary.UseCount > 0 then begin
+    s := '';
+    for i := 0 to aLibrary.UseCount-1 do begin
+      if aLibrary.Use[i].LoadedRodlLibraryName <> '' then
+        s2 := aLibrary.Use[i].LoadedRodlLibraryName + '_Intf'
+      else
+        s2 := ChangeFileExt(ExtractFilename(aLibrary.Use[i].RodlFile),'')+'_Intf';
+      if Pos(s2, s) <= 0 then begin
+        if s <> '' then
+          s := s+', ';
+        s := s+s2;
+      end;
+    end; { for }
+    s := s+',';
+
+    Write('{Used RODLs:} '+s,PASCAL_INDENTATION_LEVEL_1);
+  end;
+
+  Write(Format('{Generated:} %s_Intf;', [aLibrary.Info.Name]),PASCAL_INDENTATION_LEVEL_1);
+  WriteEmptyLine;
+
+  Write('type');
+
+  WriteServiceDeclaration(fService);
+
+  {WriteEmptyLine;
+  Write(Format('// Returns an I%s instance in case you need direct access to it from inside your server application',
+               [fService.Info.Name]));
+  Write(Format('function New%s(const aClientID : TGUID; UseClassFactory : boolean = TRUE) : I%s;', [fService.Info.Name, fService.Info.Name]));}
+
+  WriteEmptyLine;
+
+  Write('implementation');
+  WriteEmptyLine;
+  if WriteDataModule
+    then Write('{$R *.dfm}');
+
+  Write('uses');
+
+  (*)if aLibrary.UseCount > 0 then begin
+    s := '';
+    for i := 0 to aLibrary.UseCount-1 do begin
+      if s <> '' then s := s+', ';
+      s := s+ChangeFileExt(ExtractFilename(aLibrary.Use[i].RodlFile),'')+'_Invk';
+    end; { for }
+    s := s+',';
+
+    Write('{Ansestor Invokers:} '+s,PASCAL_INDENTATION_LEVEL_1);
+  end; *)
+  if fService.IsFromUsedRodl then begin
+    s := ChangeFileExt(ExtractFilename(fService.LocatedInRodlUse.RodlFile),'')+'_Invk';
+  end
+  else begin
+    s := ChangeFileExt(TRODLToInvk.GetTargetFileName(aLibrary),'');
+  end;
+
+  lIsHydraModule := IsHydraModule;
+  if lIsHydraModule then begin
+    Write(Format('{Hydra:} uHYRes, uHYIntf, uHYROFactory,', [s]),PASCAL_INDENTATION_LEVEL_1);
+  end;
+
+  Write(Format('{Generated:} %s;', [s]),PASCAL_INDENTATION_LEVEL_1);
+
+  WriteEmptyLine;
+
+  Write(Format('procedure Create_%s(out anInstance : IUnknown);', [fService.Info.Name]));
+  Write('begin');
+  if WriteDataModule
+    then Write(Format('  anInstance := T%s.Create(nil);', [fService.Info.Name]))
+    else Write(Format('  anInstance := T%s.Create;', [fService.Info.Name]));
+  Write('end;');
+  WriteEmptyLine;
+
+  Write(Format('{ %s }', [fService.Info.Name]));
+{  Write(Format('function New%s(const aClientID : TGUID; UseClassFactory : boolean = TRUE) : I%s;', [fService.Info.Name, fService.Info.Name]));
+  Write('var');
+  Write('  lUnknown: IUnknown;');
+  Write('  lClassFactorty: IROClassFactory;');
+  Write('begin');
+  Write('  result := nil;');
+  Write('  if UseClassFactory then begin');
+  Write(Format('    lClassFactorty := FindClassFactory(''%s'');', [fService.Info.Name]));
+  Write('    lClassFactorty.CreateInstance(aClientID, lUnknown);');
+  Write('  end');
+  Write(Format('  else Create_%s(lUnknown);', [fService.Info.Name]));
+  WriteEmptyLine;
+  Write(Format('  result := lUnknown as I%s;', [fService.Info.Name]));
+  Write('end;');
+
+  WriteEmptyLine;}
+
+  if Assigned(fService.Default) then begin
+    for i := 0 to fService.Default.Count-1 do
+      WriteOperationImplementation(fService.Default.Items[i]);
+  end;
+
+  s := fService.Info.Name;
+  Write('var');
+  write('  fClassFactory: IROClassFactory;');
+  Write('initialization');
+  Write(Format('  fClassFactory := TROClassFactory.Create(''%s'', Create_%s, T%s_Invoker);', [s,s,s]));
+  if lIsHydraModule then  Write('  THYROFactory.Create(HInstance, fClassFactory);');
+  WriteEmptyLine;
+  Write('finalization');
+  write('  UnRegisterClassFactory(fClassFactory);');
+  write('  fClassFactory := nil;');
+  WriteEmptyLine;
+  Write('end.');
+  s := buffer.Text;
+end;
+
+procedure TRODLToImpl.WriteServiceDeclaration(const aService : TRODLService);
+var i : integer;
+begin
+  Write(Format('{ T%s }', [aService.Info.Name]), PASCAL_INDENTATION_LEVEL_1);
+  if aService.Ancestor <> '' then begin
+    if Assigned(fAncestorService) and (fAncestorService.ImplClass <> '') then
+      Write(Format('T%s = class(%s, I%s)', [aService.Info.Name, fAncestorService.ImplClass, aService.Info.Name]), PASCAL_INDENTATION_LEVEL_1)
+    else
+      Write(Format('T%s = class(T%s, I%s)', [aService.Info.Name, aService.Ancestor, aService.Info.Name]), PASCAL_INDENTATION_LEVEL_1);
+  end
+  else begin
+    if WriteDataModule then
+      Write(Format('T%s = class(%s, I%s)', [aService.Info.Name, ServerClassName, aService.Info.Name]), PASCAL_INDENTATION_LEVEL_1)
+    else
+      Write(Format('T%s = class(TRORemotable, I%s)', [aService.Info.Name, aService.Info.Name]), PASCAL_INDENTATION_LEVEL_1);
+  end;
+
+  Write('private',PASCAL_INDENTATION_LEVEL_1);
+  Write('protected',PASCAL_INDENTATION_LEVEL_1);
+  Write(Format('{ I%s methods }', [aService.Info.Name]), PASCAL_INDENTATION_LEVEL_2);
+  for i := 0 to (aService.Default.Count-1) do
+    Write(Format(GetOperationDefinition(aService.Default.Items[i]), []), PASCAL_INDENTATION_LEVEL_2);
+
+  Write('end;', PASCAL_INDENTATION_LEVEL_1);
+end;
+
+function TRODLToImpl.ValidateTargetEntity(
+  const aLibrary: TRODLLIbrary; const aTargetEntity: string): boolean;
+var i : integer;
+begin
+  result := FALSE;
+
+  for i := 0 to (aLibrary.ServiceCount-1) do
+    if (CompareText(aLibrary.Services[i].Info.Name, aTargetEntity)=0) then begin
+      fService := aLibrary.Services[i]; // Will be used later
+      result := TRUE;
+      Exit;
+    end;
+end;
+
+procedure TRODLToImpl.WriteOperationImplementation(const anOperation: TRODLOperation);
+var
+  i : integer;
+  lCode:TStrings;
+begin
+  Write(GetOperationDefinition(anOperation, 'T'+fService.Info.Name));
+  lCode := anOperation.CodeBodies['Delphi'];
+  if Assigned(lCode) then begin
+    WriteLines(lCode.Text);
+  end
+  else begin
+    Write('begin');
+    Write('end;');
+  end;
+
+
+  for i := 0 to (anOperation.Count-1) do begin
+  end;
+
+  WriteEmptyLine;
+end;
+
+class function TRODLToImpl.GetTargetFileName(
+  const aLibrary: TRODLLIbrary; const aTargetEntity: string): string;
+begin
+  result := aTargetEntity+'_Impl.pas';
+end;
+
+procedure TRODLToImpl.SetServerClassName(const Value: string);
+begin
+  fServerClassName := Value;
+end;
+
+function TRODLToImpl.GetWriteDataModule: boolean;
+begin
+  result := (fServerClassName <> TRORemotable.ClassName);
+end;
+
+end.
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen/uRODLToPascalIntf.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen/uRODLToPascalIntf.pas
new file mode 100644
index 0000000..bc0eddc
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen/uRODLToPascalIntf.pas	
@@ -0,0 +1,2104 @@
+unit uRODLToPascalIntf;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - CodeGen                                           }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+
+uses Classes, uRODL;
+
+type { TRODLToIntf }
+     TRODLToIntf = class(TRODLConverter)
+     private
+       fUnitName : string;
+
+       procedure WriteTypeDeclaration(aLibrary: TRODLLibrary; aType: TRODLEntity);
+       procedure WriteServiceDeclaration(aService: TRODLService);
+       procedure WriteEventSinkDeclaration(aEventSink: TRODLEventSink);
+       procedure WriteCoClass(aLibrary : TRODLLibrary; aService: TRODLService);
+       procedure WriteServiceConsts(aService : TRODLService);
+       procedure WriteArraySerializer(aLibrary : TRODLLibrary; anArray : TRODLArray);
+       procedure WriteStructPropMethods(aLibrary : TRODLLibrary; aStruct: TRODLStruct);
+       procedure WriteAttributesMethods(anEntity: TRODLEntity);
+
+       procedure WriteDocumentation(aInfo: TRODLEntity);
+
+       function IsSOAPService(aService : TRODLService) : boolean;
+       procedure WriteEventSink(aLibrary : TRODLLibrary; aEventSink: TRODLEventSink);
+       procedure GetInheritedExceptionFields(const aLibrary: TRODLLibrary; anException: TRODLException; aList: TList);
+       function AdjustParamList(const aParamList: string; Indentation: integer): string;
+       procedure WriteOperationDocumentation(anOperation:TRODLOperation; IndentationLevel : integer);
+     protected
+       procedure IntConvert(const aLibrary : TRODLLibrary; const aTargetEntity : string = ''); override;
+
+     public
+       constructor Create(const aLibraryFile:string; iUnitName:string=''); reintroduce; overload; virtual;
+       constructor Create(const aLibrary : TRODLLibrary; iUnitName:string=''); reintroduce; overload; virtual;
+       class function GetTargetFileName(const aLibrary : TRODLLibrary; const aTargetEntity : string = ''): string; override;
+
+     end;
+
+function GetDataType(const aType: string): String;
+function GetAttributes(atOperation, atService, atLibrary: TStrings; Ident: Integer): string;
+
+implementation
+
+uses SysUtils, Dialogs, uROTypes, //Controls,
+     {$IFDEF DELPHI5}
+     ComObj,
+     {$ENDIF}
+     uRODLGenTools, uRODLToPascal, uROClasses, uROSerializer;
+
+{ TRODLToIntf }
+
+function GetDataType(const aType: string): String;
+begin
+  case StrToDataType(aType) of
+    rtXML: result := 'IXmlNode';
+  else
+    result := aType;
+  end;
+end;
+
+constructor TRODLToIntf.Create(const aLibraryFile: string; iUnitName: string);
+begin
+  fUnitName := iUnitName;
+  inherited Create(aLibraryFile);
+end;
+
+constructor TRODLToIntf.Create(const aLibrary: TRODLLibrary; iUnitName: string);
+begin
+  fUnitName := iUnitName;
+  inherited Create(aLibrary);
+end;
+
+procedure TRODLToIntf.GetInheritedExceptionFields(const aLibrary: TRODLLibrary;
+  anException: TRODLException; aList: TList);
+var ex : TRODLException;
+    i : integer;
+begin
+  aList.Clear;
+  ex := anException;
+
+  repeat
+    ex := aLibrary.FindException(ex.Ancestor);
+    if (ex=NIL) then Exit;
+
+    for i := (ex.Count-1) downto 0 do
+      aList.Insert(0, ex[i]);
+
+  until 1=2;
+end;
+
+function TRODLToIntf.AdjustParamList(const aParamList : string; Indentation : integer) : string;
+var i, k, cnt : integer;
+begin
+  result := aParamList;
+  cnt := 1;
+  i := 1;
+
+  while (i<Length(result)) do begin
+    Inc(cnt);
+    Inc(i);
+
+    if (cnt>80) and ((result[i-1]=';') or (result[i-1]=',')) then begin
+      cnt := 1;
+      Insert(#13#10, result, i);
+      for k := 1 to Indentation do begin
+        Insert(#32, result, i+2);
+      end;
+      Inc(i, Indentation+2);
+    end;
+  end;
+end;
+
+procedure TRODLToIntf.IntConvert(const aLibrary: TRODLLibrary; const aTargetEntity: string);
+var l, x, i, k : integer;
+    s, s2: string;
+    fulllist: TStrings;
+    svc : TRODLService;
+    roexception : TRODLException;
+    roexceptionEntityList: IROStrings;
+    roexceptionEntity: TRODLTypedEntity;
+    inheritedfields : TList;
+    lPascalIndentationLevel: Integer;
+begin
+  inheritedfields := TList.Create;
+  try
+    if fUnitName = '' then begin
+      fUnitName := ChangeFileExt(GetTargetFileName(aLibrary), '');
+    end;
+
+    Write(Format('unit %s;', [fUnitName]));
+    WriteEmptyLine;
+
+    WriteLines(IntfInvkNotice);
+    WriteEmptyLine;
+
+    Write('{$I RemObjects.inc}');
+    WriteEmptyLine;
+
+    Write('interface');
+    WriteEmptyLine;
+
+    Write('uses');
+    Write('{vcl:} Classes, TypInfo,',PASCAL_INDENTATION_LEVEL_1);
+
+    if aLibrary.UseCount > 0 then begin
+      Write('{RemObjects:} uROXMLIntf, uROClasses, uROClient, uROTypes, uROClientIntf,',PASCAL_INDENTATION_LEVEL_1);
+
+      s := '';
+      l := 0;
+
+      fulllist := TStringList.Create;
+      try
+        for i := 0 to aLibrary.UseCount-1 do begin
+
+          if aLibrary.Use[i].LoadedRodlLibraryName <> '' then
+            s2 := aLibrary.Use[i].LoadedRodlLibraryName + '_Intf'
+          else
+            s2 := ChangeFileExt(ExtractFilename(aLibrary.Use[i].RodlFile),'')+'_Intf';
+          if fulllist.IndexOf(s2) > -1 then
+            Continue;
+
+          if s <> '' then s := s+', ';
+          Inc(l, Length(s2));
+
+          s := s+s2;
+          fulllist.Add(s2);
+
+          if (l>80) then begin
+
+             if i <> aLibrary.UseCount -1 then s := s+ ',';
+
+             Write('{Used RODLs:} '+ s,PASCAL_INDENTATION_LEVEL_1);
+             s := '';
+             l := 0;
+
+          end;
+
+        end; { for }
+      finally
+        FreeAndNil(fulllist);
+      end;
+      s := s+';';
+
+      Write('{Used RODLs:} '+
+
+      s,PASCAL_INDENTATION_LEVEL_1);
+    end
+    else begin
+      Write('{RemObjects:} uROXMLIntf, uROClasses, uROClient, uROTypes, uROClientIntf;',PASCAL_INDENTATION_LEVEL_1);
+    end;
+
+
+    WriteEmptyLine;
+
+    Write('const');
+    Write('{ Library ID }',PASCAL_INDENTATION_LEVEL_1);
+    Write(Format('LibraryUID = ''%s'';', [GUIDToString(aLibrary.Info.UID)]),PASCAL_INDENTATION_LEVEL_1);
+    if (aLibrary.Info.Attributes.Values['Wsdl']<>'')
+      then Write(Format('WSDLLocation = ''%s'';', [aLibrary.Info.Attributes.Values['Wsdl']]),PASCAL_INDENTATION_LEVEL_1);
+
+
+    Write(Format('TargetNamespace = ''%s'';', [aLibrary.Info.Attributes.Values['TargetNamespace']]),PASCAL_INDENTATION_LEVEL_1);
+
+    WriteEmptyLine;
+
+    Write('{ Service Interface ID''s }',PASCAL_INDENTATION_LEVEL_1);
+    for i := 0 to (aLibrary.Count-1) do
+      if (aLibrary.Items[i] is TRODLService) and not aLibrary.Items[i].IsFromUsedRodl then begin
+        svc := TRODLService(aLibrary.Items[i]);
+        Write('I'+aLibrary.Items[i].Info.Name+'_IID : TGUID = '''+GUIDToString(svc.Default.Info.UID)+''';' ,PASCAL_INDENTATION_LEVEL_1);
+      end;
+
+    for i := 0 to (aLibrary.ServiceCount-1) do begin
+      if not aLibrary.Services[i].IsFromUsedRodl then begin
+        WriteServiceConsts(aLibrary.Services[i]);
+      end;
+    end;
+    WriteEmptyLine();
+
+    {-------- Events ----------}
+    Write('{ Event ID''s }',PASCAL_INDENTATION_LEVEL_1);
+    for i := 0 to (aLibrary.EventSinkCount-1) do begin
+      if not aLibrary.EventSinks[i].IsFromUsedRodl then begin
+        Write(Format('EID_%s = ''%s'';', [aLibrary.EventSinks[i].Info.Name, aLibrary.EventSinks[i].Info.Name]),PASCAL_INDENTATION_LEVEL_1);
+      end;
+    end;
+    WriteEmptyLine();
+    {--------------------------}
+
+    if aLibrary.Count > 0 then Write('type');
+
+    with aLibrary do begin
+      // Forward declarations
+      Write('{ Forward declarations }',PASCAL_INDENTATION_LEVEL_1);
+      for i := 0 to (aLibrary.ServiceCount-1) do if (not aLibrary.Services[i].IsFromUsedRodl) then
+        Write(Format('I%s = interface;', [aLibrary.Services[i].Info.Name]), PASCAL_INDENTATION_LEVEL_1);
+      if aLibrary.ServiceCount>0 then WriteEmptyLine;
+
+      for i := 0 to (aLibrary.ArrayCount-1) do if (not aLibrary.Arrays[i].IsFromUsedRodl) then
+        Write(Format('%s = class;', [aLibrary.Arrays[i].Info.Name]), PASCAL_INDENTATION_LEVEL_1);
+      if aLibrary.ArrayCount>0 then WriteEmptyLine;
+
+      for i := 0 to (aLibrary.StructCount-1) do if (not aLibrary.Structs[i].IsFromUsedRodl) then
+        Write(Format('%s = class;', [aLibrary.Structs[i].Info.Name]), PASCAL_INDENTATION_LEVEL_1);
+      if aLibrary.StructCount>0 then WriteEmptyLine;
+
+      for i := 0 to (aLibrary.ExceptionCount-1) do if (not aLibrary.Exceptions[i].IsFromUsedRodl) then
+        Write(Format('%s = class;',[aLibrary.Exceptions[i].Info.Name]),PASCAL_INDENTATION_LEVEL_1);
+      if aLibrary.ExceptionCount>0 then WriteEmptyLine;
+
+      for i := 0 to (aLibrary.EventSinkCount-1) do if not aLibrary.EventSinks[i].IsFromUsedRodl then
+        Write(Format('I%s = interface;', [aLibrary.EventSinks[i].Info.Name]),PASCAL_INDENTATION_LEVEL_1);
+      if aLibrary.EventSinkCount>0 then WriteEmptyLine;
+
+      WriteEmptyLine;
+
+      if (EnumCount > 0) then begin
+        Write('{ Enumerateds }', PASCAL_INDENTATION_LEVEL_1);
+          for i := 0 to (EnumCount-1) do
+            if (not aLibrary.Enums[i].IsFromUsedRodl) then with Enums[i] do begin
+              WriteDocumentation(aLibrary.Enums[i]);
+              lPascalIndentationLevel := PASCAL_INDENTATION_LEVEL_1;
+              s := Info.Name+' = (';
+              l := Length(s);
+              for x := 0 to (Count-1) do begin
+                if PrefixEnumValues then
+                  s2 := Info.Name+'_'+Items[x].Info.Name
+                else
+                  s2 := Items[x].Info.Name;
+                s2 := s2 + ',';
+                Inc(l, Length(s2));
+                s := s + s2;
+                if (l>80) and (x <> Count-1) then begin
+                  Write(s, lPascalIndentationLevel);
+                  lPascalIndentationLevel := PASCAL_INDENTATION_LEVEL_3;
+                  s := '';
+                  l := 0;
+                end;
+              end;
+              System.Delete(s,Length(s),1);
+              s := s+');';
+
+              Write(s, lPascalIndentationLevel);
+            end;
+        WriteEmptyLine;
+      end;
+
+    end;
+
+    with aLibrary.CalcStructOrder() do begin
+      for i := 0 to (Count-1) do //if (not aLibrary.Services[i].IsFromUsedRodl) then
+        WriteTypeDeclaration(aLibrary, Objects[i] as TRODLStruct);
+    end;
+    //for i := 0 to (aLibrary.StructCount-1) do if (not aLibrary.Structs[i].IsFromUsedRodl) then
+      //WriteTypeDeclaration(aLibrary, aLibrary.Structs[i]);
+
+    for i := 0 to (aLibrary.ArrayCount-1) do if (not aLibrary.Arrays[i].IsFromUsedRodl) then
+      WriteTypeDeclaration(aLibrary, aLibrary.Arrays[i]);
+
+    if aLibrary.ExceptionCount > 0 then begin
+      Write('{ Exceptions }',PASCAL_INDENTATION_LEVEL_1);
+
+      with aLibrary.CalcExceptionOrder() do begin
+        for i := 0 to (Count-1) do begin
+          roexception := (Objects[i] as TRODLException);
+          GetInheritedExceptionFields(aLibrary, roexception, inheritedfields);
+
+          WriteDocumentation(roexception.Info);
+          if roexception.Ancestor <> '' then
+            Write(Format('%s = class(%s)',[roexception.Info.Name, roexception.Ancestor]),PASCAL_INDENTATION_LEVEL_1)
+          else
+            Write(Format('%s = class(EROException)',[roexception.Info.Name]),PASCAL_INDENTATION_LEVEL_1);
+
+          Write('private', PASCAL_INDENTATION_LEVEL_1);
+          for k := 0 to (roexception.Count-1) do begin
+            Write(Format('f%s: %s;', [roexception[k].Name, GetDataType(roexception[k].DataType)]), PASCAL_INDENTATION_LEVEL_2);
+          end;
+
+          Write('public', PASCAL_INDENTATION_LEVEL_1);
+
+          if roexception.Attributes.Count > 0 then begin
+            Write('class function GetAttributeCount: Integer; override;', PASCAL_INDENTATION_LEVEL_2);
+            Write('class function GetAttributeName(aIndex: Integer): string; override;', PASCAL_INDENTATION_LEVEL_2);
+            Write('class function GetAttributeValue(aIndex: Integer): string; override;', PASCAL_INDENTATION_LEVEL_2);
+            if (roexception.Count > 0) then WriteEmptyLine;
+          end;
+
+          if (roexception.Count>0) then begin
+            s := 'constructor Create(anExceptionMessage : string; ';
+            for k := 0 to (inheritedfields.Count-1) do
+              s := s+Format('a%s: %s; ', [TRODLTypedEntity(inheritedfields[k]).Name, GetDataType(TRODLTypedEntity(inheritedfields[k]).DataType)]);
+            for k := 0 to (roexception.Count-1) do
+              s := s+Format('a%s: %s; ', [roexception[k].Name, GetDataType(roexception[k].DataType)]);
+            s := Copy(s,1,Length(s)-2)+');';
+            Write(AdjustParamList(s, PASCAL_INDENTATION_LEVEL_3), PASCAL_INDENTATION_LEVEL_2);
+            roexceptionEntityList:=roexception.CalcItemsMarshalingOrder(True);
+            if (roexception.Count>0) and (roexceptionEntityList.Count > 0) then begin
+              Write('  procedure ReadException(ASerializer: TObject); override;', PASCAL_INDENTATION_LEVEL_1);
+              Write('  procedure WriteException(ASerializer: TObject); override;', PASCAL_INDENTATION_LEVEL_1);
+            end;
+            roexceptionEntityList:=nil;
+          end;
+
+          Write('published', PASCAL_INDENTATION_LEVEL_1);
+
+          for k := 0 to (roexception.Count-1) do begin
+            WriteDocumentation(roexception[k]);
+            Write(Format('property %s: %s read f%s write f%s;',
+              [roexception[k].Name, GetDataType(roexception[k].DataType),
+               roexception[k].Name, roexception[k].Name]),
+               PASCAL_INDENTATION_LEVEL_2);
+          end;
+
+          Write('end;', PASCAL_INDENTATION_LEVEL_1);
+          WriteEmptyLine;
+        end;
+      end;
+
+      {for i := 0 to (aLibrary.ExceptionCount-1) do if (not aLibrary.Exceptions[i].IsFromUsedRodl) then begin
+        WriteDocumentation(aLibrary.Exceptions[i].Info);
+        if aLibrary.Exceptions[i].Ancestor <> '' then
+          Write(Format('%s = class(%s);',[aLibrary.Exceptions[i].Info.Name, aLibrary.Exceptions[i].Ancestor]),PASCAL_INDENTATION_LEVEL_1)
+        else
+          Write(Format('%s = class(EROException);',[aLibrary.Exceptions[i].Info.Name]),PASCAL_INDENTATION_LEVEL_1);
+      end; }
+      WriteEmptyLine;
+    end;
+
+    with aLibrary.CalcServiceOrder() do begin
+      for i := 0 to (Count-1) do //if (not aLibrary.Services[i].IsFromUsedRodl) then
+        WriteServiceDeclaration(Objects[i] as TRODLService);
+    end;
+
+    {-------- Events ----------}
+    //ToDo -omh: This should use a CalcServerEventsOrder method which is currently not present in uRODL.pas
+    with aLibrary do begin
+      for i := 0 to EventSinkCount-1 do begin
+        if aLibrary.EventSinks[i].IsFromUsedRodl then Continue;
+
+        WriteEventSinkDeclaration(aLibrary.EventSinks[i]);
+      end;
+    end;
+    {--------------------------}
+
+    {for i := 0 to (aLibrary.ServiceCount-1) do if (not aLibrary.Services[i].IsFromUsedRodl) then
+      WriteServiceDeclaration(aLibrary.Services[i]);}
+
+    //WriteEmptyLine;
+
+    Write('implementation');
+    WriteEmptyLine;
+
+    Write('uses');
+    Write('{vcl:} SysUtils,',PASCAL_INDENTATION_LEVEL_1);
+    Write('{RemObjects:} uROEventRepository, uROSerializer, uRORes;',PASCAL_INDENTATION_LEVEL_1);
+
+    WriteEmptyLine;
+
+    with aLibrary.CalcExceptionOrder() do begin
+      for i := 0 to (Count-1) do begin
+        roexception := (Objects[i] as TRODLException);
+        if (roexception.Count = 0) and (roexception.Attributes.Count = 0) then
+          Continue;
+          
+        Write('{ '+roexception.Name+' }');
+        WriteEmptyLine;
+
+        if roexception.Attributes.Count > 0 then
+          WriteAttributesMethods(roexception);
+
+        if (roexception.Count=0) then Continue;
+        GetInheritedExceptionFields(aLibrary, roexception, inheritedfields);
+
+        s := 'constructor '+roexception.Name+'.Create(anExceptionMessage : string; ';
+        for k := 0 to (inheritedfields.Count-1) do
+          s := s+Format('a%s: %s; ', [TRODLTypedEntity(inheritedfields[k]).Name, GetDataType(TRODLTypedEntity(inheritedfields[k]).DataType)]);
+
+        for k := 0 to (roexception.Count-1) do
+          s := s+Format('a%s: %s; ', [roexception[k].Name, GetDataType(roexception[k].DataType)]);
+        s := Copy(s,1,Length(s)-2)+');';
+        Write(AdjustParamList(s, 1));
+
+        Write('begin');
+        s := '  inherited Create(anExceptionMessage';
+        for k := 0 to (inheritedfields.Count-1) do
+          s := s+Format(', a%s', [TRODLTypedEntity(inheritedfields[k]).Name]);
+        s := s+');';
+        Write(AdjustParamList(s, 10));
+
+        WriteEmptyLine;
+
+        for k := 0 to (roexception.Count-1) do begin
+          Write(Format('  f%s := a%s;', [roexception[k].Name, roexception[k].Name]));
+        end;
+
+        Write('end;');
+
+        roexceptionEntityList:=roexception.CalcItemsMarshalingOrder(True);
+        if (roexception.Count>0) and (roexceptionEntityList.Count > 0) then begin
+          WriteEmptyLine;
+          Write('procedure '+roexception.Name+'.ReadException(ASerializer: TObject);');
+          if roexceptionEntityList.Count > 0 then Write('var');
+          For k:=0 to roexceptionEntityList.Count - 1 do
+            with TRODLTypedEntity(roexceptionEntityList.Objects[k]) do
+              Write(Format('  l_%s: %s;',[Name, GetDataType(DataType)]));
+          Write('begin');
+          Write('  if TROSerializer(ASerializer).RecordStrictOrder then begin');
+          if roexception.Count <> roexceptionEntityList.Count then
+            Write('    inherited;');
+          for k := 0 to (roexception.Count-1) do begin
+            roexceptionEntity:= roexception[k];
+            Write(Format('    l_%s := %0:s;',[roexceptionEntity.Name]));
+            case StrToDataType(roexceptionEntity.DataType) of
+              rtInteger:     Write(Format('    TROSerializer(ASerializer).ReadInteger(''%s'', otSLong, l_%0:s);',[roexceptionEntity.Name]));
+              rtDateTime:    Write(Format('    TROSerializer(ASerializer).ReadDateTime(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtDouble:      Write(Format('    TROSerializer(ASerializer).ReadDouble(''%s'', ftDouble, l_%0:s);',[roexceptionEntity.Name]));
+              rtCurrency:    Write(Format('    TROSerializer(ASerializer).ReadDouble(''%s'', ftCurr, l_%0:s);',[roexceptionEntity.Name]));
+              rtWidestring:  Write(Format('    TROSerializer(ASerializer).ReadWideString(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtString:      Write(Format('    TROSerializer(ASerializer).ReadAnsiString(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtUTF8String:  Write(Format('    TROSerializer(ASerializer).ReadUTF8String(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtInt64:       Write(Format('    TROSerializer(ASerializer).ReadInt64(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtBoolean:     Write(Format('    TROSerializer(ASerializer).ReadEnumerated(''%s'',TypeInfo(boolean), l_%0:s);',[roexceptionEntity.Name]));
+              rtVariant:     Write(Format('    TROSerializer(ASerializer).ReadVariant(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtXML:         Write(Format('    TROSerializer(ASerializer).ReadXML(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtGuid:        Write(Format('    TROSerializer(ASerializer).ReadGuid(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtDecimal:     Write(Format('    TROSerializer(ASerializer).ReadDecimal(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtBinary:      Write(Format('    TROSerializer(ASerializer).ReadBinary(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtUserDefined:
+                           if aLibrary.FindArray(roexceptionEntity.DataType) <> nil  then
+                             Write(Format('    TROSerializer(ASerializer).ReadArray(''%s'', %s, l_%0:s);',[roexceptionEntity.Name,GetDataType(roexceptionEntity.DataType)]))
+                           else if aLibrary.FindEnum(roexceptionEntity.DataType) <> nil  then
+                             Write(Format('    TROSerializer(ASerializer).ReadEnumerated(''%s'',TypeInfo(%s), l_%0:s);',[roexceptionEntity.Name,GetDataType(roexceptionEntity.DataType)]))
+                           else
+                             Write(Format('    TROSerializer(ASerializer).ReadStruct(''%s'', %s, l_%0:s);',[roexceptionEntity.Name,GetDataType(roexceptionEntity.DataType)]));
+            end;
+            if (StrToDataType(roexceptionEntity.DataType) in [rtBinary, rtUserDefined]) and (aLibrary.FindEnum(roexceptionEntity.DataType) = nil) then
+              Write(Format('    if %s <> l_%0:s then %0:s.Free;',[roexceptionEntity.Name]));
+            Write(Format('    %s := l_%0:s;',[roexceptionEntity.Name]));
+          end;
+          Write('  end');
+          Write('  else begin');
+          for k := 0 to (roexceptionEntityList.Count-1) do begin
+            roexceptionEntity:= TRODLTypedEntity(roexceptionEntityList.Objects[k]);
+            Write(Format('    l_%s := %0:s;',[roexceptionEntity.Name]));
+            case StrToDataType(roexceptionEntity.DataType) of
+              rtInteger:     Write(Format('    TROSerializer(ASerializer).ReadInteger(''%s'', otSLong, l_%0:s);',[roexceptionEntity.Name]));
+              rtDateTime:    Write(Format('    TROSerializer(ASerializer).ReadDateTime(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtDouble:      Write(Format('    TROSerializer(ASerializer).ReadDouble(''%s'', ftDouble, l_%0:s);',[roexceptionEntity.Name]));
+              rtCurrency:    Write(Format('    TROSerializer(ASerializer).ReadDouble(''%s'', ftCurr, l_%0:s);',[roexceptionEntity.Name]));
+              rtWidestring:  Write(Format('    TROSerializer(ASerializer).ReadWideString(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtString:      Write(Format('    TROSerializer(ASerializer).ReadAnsiString(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtUTF8String:  Write(Format('    TROSerializer(ASerializer).ReadUTF8String(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtInt64:       Write(Format('    TROSerializer(ASerializer).ReadInt64(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtBoolean:     Write(Format('    TROSerializer(ASerializer).ReadEnumerated(''%s'',TypeInfo(boolean), l_%0:s);',[roexceptionEntity.Name]));
+              rtVariant:     Write(Format('    TROSerializer(ASerializer).ReadVariant(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtXML:         Write(Format('    TROSerializer(ASerializer).ReadXML(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtGuid:        Write(Format('    TROSerializer(ASerializer).ReadGuid(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtDecimal:     Write(Format('    TROSerializer(ASerializer).ReadDecimal(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtBinary:      Write(Format('    TROSerializer(ASerializer).ReadBinary(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtUserDefined:
+                           if aLibrary.FindArray(roexceptionEntity.DataType) <> nil  then
+                             Write(Format('    TROSerializer(ASerializer).ReadArray(''%s'', %s, l_%0:s);',[roexceptionEntity.Name,GetDataType(roexceptionEntity.DataType)]))
+                           else if aLibrary.FindEnum(roexceptionEntity.DataType) <> nil  then
+                             Write(Format('    TROSerializer(ASerializer).ReadEnumerated(''%s'',TypeInfo(%s), l_%0:s);',[roexceptionEntity.Name,GetDataType(roexceptionEntity.DataType)]))
+                           else
+                             Write(Format('    TROSerializer(ASerializer).ReadStruct(''%s'', %s, l_%0:s);',[roexceptionEntity.Name,GetDataType(roexceptionEntity.DataType)]));
+            end;
+            if (StrToDataType(roexceptionEntity.DataType) in [rtBinary, rtUserDefined]) and (aLibrary.FindEnum(roexceptionEntity.DataType) = nil) then
+              Write(Format('    if %s <> l_%0:s then %0:s.Free;',[roexceptionEntity.Name]));
+            Write(Format('    %s := l_%0:s;',[roexceptionEntity.Name]));
+          end;
+          Write('  end;');
+          Write('end;');
+
+
+          WriteEmptyLine;
+          Write('procedure '+roexception.Name+'.WriteException(ASerializer: TObject);');
+          if roexceptionEntityList.Count > 0 then Write('var');
+          For k:=0 to roexceptionEntityList.Count - 1 do
+            with TRODLTypedEntity(roexceptionEntityList.Objects[k]) do
+              Write(Format('  l_%s: %s;',[Name, GetDataType(DataType)]));
+          Write('begin');
+          Write('  if TROSerializer(ASerializer).RecordStrictOrder then begin');
+          if roexception.Count <> roexceptionEntityList.Count then
+            Write('inherited;', PASCAL_INDENTATION_LEVEL_2);
+          Write(Format('TROSerializer(ASerializer).ChangeClass(%s);', [roexception.Name]), PASCAL_INDENTATION_LEVEL_2);
+          for k := 0 to (roexception.Count-1) do begin
+            roexceptionEntity:= roexception[k];
+            Write(Format('    l_%s := %0:s;',[roexceptionEntity.Name]));
+            case StrToDataType(roexceptionEntity.DataType) of
+              rtInteger:     Write(Format('    TROSerializer(ASerializer).WriteInteger(''%s'', otSLong, l_%0:s);',[roexceptionEntity.Name]));
+              rtDateTime:    Write(Format('    TROSerializer(ASerializer).WriteDateTime(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtDouble:      Write(Format('    TROSerializer(ASerializer).WriteDouble(''%s'', ftDouble, l_%0:s);',[roexceptionEntity.Name]));
+              rtCurrency:    Write(Format('    TROSerializer(ASerializer).WriteDouble(''%s'', ftCurr, l_%0:s);',[roexceptionEntity.Name]));
+              rtWidestring:  Write(Format('    TROSerializer(ASerializer).WriteWideString(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtString:      Write(Format('    TROSerializer(ASerializer).WriteAnsiString(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtUTF8String:  Write(Format('    TROSerializer(ASerializer).WriteUTF8String(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtInt64:       Write(Format('    TROSerializer(ASerializer).WriteInt64(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtBoolean:     Write(Format('    TROSerializer(ASerializer).WriteEnumerated(''%s'',TypeInfo(boolean), l_%0:s);',[roexceptionEntity.Name]));
+              rtVariant:     Write(Format('    TROSerializer(ASerializer).WriteVariant(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtXML:         Write(Format('    TROSerializer(ASerializer).WriteXML(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtGuid:        Write(Format('    TROSerializer(ASerializer).WriteGuid(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtDecimal:     Write(Format('    TROSerializer(ASerializer).WriteDecimal(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtBinary:      Write(Format('    TROSerializer(ASerializer).WriteBinary(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtUserDefined:
+                          if aLibrary.FindArray(roexceptionEntity.DataType) <> nil  then
+                             Write(Format('    TROSerializer(ASerializer).WriteArray(''%s'', l_%0:s, %s);',[roexceptionEntity.Name,GetDataType(roexceptionEntity.DataType)]))
+                          else if aLibrary.FindEnum(roexceptionEntity.DataType) <> nil  then
+                             Write(Format('    TROSerializer(ASerializer).WriteEnumerated(''%s'',TypeInfo(%s), l_%0:s);',[roexceptionEntity.Name,roexceptionEntity.DataType]))
+                          else
+                             Write(Format('    TROSerializer(ASerializer).WriteStruct(''%s'', l_%0:s, %s);',[roexceptionEntity.Name,GetDataType(roexceptionEntity.DataType)]))
+            end;
+          end;
+          Write('  end');
+          Write('  else begin');
+          for k := 0 to (roexceptionEntityList.Count-1) do begin
+            roexceptionEntity:= TRODLTypedEntity(roexceptionEntityList.Objects[k]);
+            Write(Format('    l_%s := %0:s;',[roexceptionEntity.Name]));
+            case StrToDataType(roexceptionEntity.DataType) of
+              rtInteger:     Write(Format('    TROSerializer(ASerializer).WriteInteger(''%s'', otSLong, l_%0:s);',[roexceptionEntity.Name]));
+              rtDateTime:    Write(Format('    TROSerializer(ASerializer).WriteDateTime(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtDouble:      Write(Format('    TROSerializer(ASerializer).WriteDouble(''%s'', ftDouble, l_%0:s);',[roexceptionEntity.Name]));
+              rtCurrency:    Write(Format('    TROSerializer(ASerializer).WriteDouble(''%s'', ftCurr, l_%0:s);',[roexceptionEntity.Name]));
+              rtWidestring:  Write(Format('    TROSerializer(ASerializer).WriteWideString(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtString:      Write(Format('    TROSerializer(ASerializer).WriteAnsiString(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtUTF8String:  Write(Format('    TROSerializer(ASerializer).WriteUTF8String(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtInt64:       Write(Format('    TROSerializer(ASerializer).WriteInt64(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtBoolean:     Write(Format('    TROSerializer(ASerializer).WriteEnumerated(''%s'',TypeInfo(boolean), l_%0:s);',[roexceptionEntity.Name]));
+              rtVariant:     Write(Format('    TROSerializer(ASerializer).WriteVariant(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtXML:         Write(Format('    TROSerializer(ASerializer).WriteXML(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtGuid:        Write(Format('    TROSerializer(ASerializer).WriteGuid(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtDecimal:     Write(Format('    TROSerializer(ASerializer).WriteDecimal(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtBinary:      Write(Format('    TROSerializer(ASerializer).WriteBinary(''%s'', l_%0:s);',[roexceptionEntity.Name]));
+              rtUserDefined:
+                          if aLibrary.FindArray(roexceptionEntity.DataType) <> nil  then
+                             Write(Format('    TROSerializer(ASerializer).WriteArray(''%s'', l_%0:s,%s);',[roexceptionEntity.Name,GetDataType(roexceptionEntity.DataType)]))
+                          else if aLibrary.FindEnum(roexceptionEntity.DataType) <> nil  then
+                             Write(Format('    TROSerializer(ASerializer).WriteEnumerated(''%s'',TypeInfo(%s), l_%0:s);',[roexceptionEntity.Name,roexceptionEntity.DataType]))
+                          else
+                             Write(Format('    TROSerializer(ASerializer).WriteStruct(''%s'', l_%0:s,%s);',[roexceptionEntity.Name,GetDataType(roexceptionEntity.DataType)]))
+            end;
+          end;
+          Write('  end;');
+          Write('end;');
+        end;
+        roexceptionEntityList:=nil;
+        WriteEmptyLine;
+      end;
+    end;
+
+    for i := 0 to (aLibrary.ArrayCount-1) do if (not aLibrary.Arrays[i].IsFromUsedRodl) then
+      WriteArraySerializer(aLibrary, aLibrary.Arrays[i]);
+
+    for i := 0 to (aLibrary.StructCount-1) do if (not aLibrary.Structs[i].IsFromUsedRodl) then
+      WriteStructPropMethods(aLibrary, aLibrary.Structs[i]);
+
+    for i := 0 to (aLibrary.ServiceCount-1) do if (not aLibrary.Services[i].IsFromUsedRodl) then
+      WriteCoClass(aLibrary, aLibrary.Services[i]);
+
+    for i := 0 to (aLibrary.EventSinkCount-1) do if (not aLibrary.EventSinks[i].IsFromUsedRodl) then
+      WriteEventSink(aLibrary, aLibrary.EventSinks[i]);
+
+    Write('initialization');
+    for i := 0 to (aLibrary.Count-1) do
+      if ((aLibrary.Items[i] is TRODLArray) or (aLibrary.Items[i] is TRODLStruct)) and
+         (not aLibrary.Items[i].IsFromUsedRodl) then
+        Write('  RegisterROClass('+aLibrary.Items[i].Info.Name+');');
+
+    for i := 0 to (aLibrary.ExceptionCount-1) do if (not aLibrary.Exceptions[i].IsFromUsedRodl) then begin
+      Write(Format('RegisterExceptionClass(%s);',[aLibrary.Exceptions[i].Info.Name]),PASCAL_INDENTATION_LEVEL_1);
+    end;
+
+    for i := 0 to (aLibrary.Count-1) do
+      if (aLibrary.Items[i] is TRODLService) and not aLibrary.Items[i].IsFromUsedRodl then begin
+        Write('  RegisterProxyClass(I'+aLibrary.Items[i].Info.Name+'_IID, T'+aLibrary.Items[i].Info.Name+'_Proxy);');
+      end;
+
+    WriteEmptyLine;
+    with aLibrary do
+      for i := 0 to EventSinkCount-1 do
+        if (not EventSinks[i].IsFromUsedRodl) then begin
+          Write(Format('  RegisterEventWriterClass(I%s_Writer, T%s_Writer);', [EventSinks[i].Info.Name, EventSinks[i].Info.Name]));
+          Write(Format('  RegisterEventInvokerClass(EID_%s, T%s_Invoker);', [EventSinks[i].Info.Name, EventSinks[i].Info.Name]));
+        end;
+
+    Write('');
+    Write('finalization');
+    for i := 0 to (aLibrary.Count-1) do
+      if ((aLibrary.Items[i] is TRODLArray) or (aLibrary.Items[i] is TRODLStruct)) and
+         (not aLibrary.Items[i].IsFromUsedRodl) then
+        Write('  UnregisterROClass('+aLibrary.Items[i].Info.Name+');');
+
+    for i := 0 to (aLibrary.ExceptionCount-1) do if (not aLibrary.Exceptions[i].IsFromUsedRodl) then begin
+      Write(Format('UnregisterExceptionClass(%s);',[aLibrary.Exceptions[i].Info.Name]),PASCAL_INDENTATION_LEVEL_1);
+    end;
+
+    for i := 0 to (aLibrary.Count-1) do
+      if (aLibrary.Items[i] is TRODLService) and not aLibrary.Items[i].IsFromUsedRodl then begin
+        Write('  UnregisterProxyClass(I'+aLibrary.Items[i].Info.Name+'_IID);');
+      end;
+
+    WriteEmptyLine;
+    with aLibrary do
+      for i := 0 to EventSinkCount-1 do
+        if (not EventSinks[i].IsFromUsedRodl) then begin
+          Write(Format('  UnregisterEventWriterClass(I%s_Writer);', [EventSinks[i].Info.Name]));
+          Write(Format('  UnregisterEventInvokerClass(EID_%s);', [EventSinks[i].Info.Name]));
+        end;
+
+    //WriteEmptyLine;
+
+    {Write('finalization');
+    for i := 0 to (aLibrary.Count-1) do
+      if (aLibrary.Items[i] is TRODLArray) or (aLibrary.Items[i] is TRODLStruct)
+        then Write('  UnRegisterClass('+aLibrary.Items[i].Info.Name+');');
+
+    WriteEmptyLine;}
+
+    Write('end.');
+
+  finally
+    inheritedfields.Free;
+  end;
+end;
+
+procedure TRODLToIntf.WriteServiceConsts(aService : TRODLService);
+begin
+  with aService.Info do
+    // Writes additional SOAP information
+    if IsSOAPService(aService) then begin
+      Write(Format('  %s_EndPointURI = ''%s'';', [Name, Attributes.Values['Location']]));
+
+    end;
+end;
+
+procedure TRODLToIntf.WriteDocumentation(aInfo:TRODLEntity);
+var lDocumentation:string;
+begin
+  if aInfo.Documentation <> '' then begin
+    lDocumentation := aInfo.Documentation;
+    if Length(lDocumentation) < 1000 then
+      ReplaceChar(lDocumentation,['}','{', #13, #10],' ')
+    else begin
+      ReplaceChar(lDocumentation,['}','{'],' ');
+      lDocumentation:=StringReplace(lDocumentation,#10, #10'      ',[rfReplaceAll]);
+    end;
+
+    WriteEmptyLine;
+    Write('{ Description:',PASCAL_INDENTATION_LEVEL_1);
+    Write('    '+lDocumentation+' }',PASCAL_INDENTATION_LEVEL_1);
+  end;
+end;
+
+procedure TRODLToIntf.WriteOperationDocumentation(anOperation:TRODLOperation; IndentationLevel : integer);
+var lDocumentation:string;
+    i : integer;
+begin
+  if anOperation.Documentation <> '' then begin
+    lDocumentation := anOperation.Documentation;
+    if Length(lDocumentation) < 1000 then
+      ReplaceChar(lDocumentation,['}','{', #13, #10],' ')
+    else begin
+      ReplaceChar(lDocumentation,['}','{'],' ');
+      lDocumentation:=StringReplace(lDocumentation,#10, #10'      ',[rfReplaceAll]);
+    end;
+
+    WriteEmptyLine;
+    Write('{ Description:',IndentationLevel);
+    Write('    '+lDocumentation,IndentationLevel);
+    if (anOperation.Result<>NIL) then begin
+      Write('');
+      Write('  Return Type: '+GetDataType(anOperation.Result.DataType),IndentationLevel);
+    end;
+    Write('  Params',IndentationLevel);
+    for i := 0 to (anOperation.Count-1) do begin
+      Write('    '+IntToStr(i+1)+') '+anOperation[i].Name+' ('+GetDataType(anOperation[i].DataType)+') : '+anOperation[i].Documentation,IndentationLevel);
+    end;
+
+    Write('}',IndentationLevel);
+  end;
+end;
+
+procedure TRODLToIntf.WriteServiceDeclaration(aService : TRODLService);
+var i : integer;
+begin
+  if not aService.IsFromUsedRodl then with aService.Default do begin
+    Write(Format('{ I%s }', [aService.Info.Name]), PASCAL_INDENTATION_LEVEL_1);
+
+    WriteDocumentation(aService);
+
+    if aService.Ancestor <> '' then begin
+      Write(Format('I%s = interface(I%s)', [aService.Info.Name,aService.Ancestor]), PASCAL_INDENTATION_LEVEL_1);
+    end
+    else begin
+      Write(Format('I%s = interface', [aService.Info.Name]), PASCAL_INDENTATION_LEVEL_1);
+    end;
+    Write(Format('[''%s'']', [GUIDToString(Info.UID)]), PASCAL_INDENTATION_LEVEL_2);
+
+    for i := 0 to (Count-1) do begin
+      WriteOperationDocumentation(Items[i], PASCAL_INDENTATION_LEVEL_2);
+      Write(GetOperationDefinition(Items[i]), PASCAL_INDENTATION_LEVEL_2);
+    end;
+
+    Write('end;', PASCAL_INDENTATION_LEVEL_1);
+    WriteEmptyLine;
+
+    Write(Format('{ Co%s }', [aService.Info.Name]), PASCAL_INDENTATION_LEVEL_1);
+    Write(Format('Co%s = class', [aService.Info.Name]), PASCAL_INDENTATION_LEVEL_1);
+    Write(Format('class function Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): I%s;',
+                 [aService.Info.Name]), PASCAL_INDENTATION_LEVEL_2);
+    Write('end;', PASCAL_INDENTATION_LEVEL_1);
+    WriteEmptyLine;
+
+    Write(Format('{ T%s_Proxy }', [aService.Info.Name]), PASCAL_INDENTATION_LEVEL_1);
+    if aService.Ancestor <> '' then begin
+      Write(Format('T%s_Proxy = class(T%s_Proxy, I%s)', [aService.Info.Name, aService.Ancestor, aService.Info.Name]),PASCAL_INDENTATION_LEVEL_1);
+    end
+    else begin
+      Write(Format('T%s_Proxy = class(TROProxy, I%s)', [aService.Info.Name, aService.Info.Name]),PASCAL_INDENTATION_LEVEL_1);
+    end;
+    //Write('private',PASCAL_INDENTATION_LEVEL_1);
+    Write('protected',PASCAL_INDENTATION_LEVEL_1);
+    //Write('  // Internal',PASCAL_INDENTATION_LEVEL_1);
+    Write('  function __GetInterfaceName:string; override;',PASCAL_INDENTATION_LEVEL_1);
+    WriteEmptyLine;
+    //Write(Format('  // %s', [aService.Info.Name]),PASCAL_INDENTATION_LEVEL_1);
+
+    for i := 0 to (Count-1) do
+      Write(GetOperationDefinition(Items[i]), PASCAL_INDENTATION_LEVEL_2);
+    Write('end;',PASCAL_INDENTATION_LEVEL_1);
+    WriteEmptyLine;
+
+  end;
+end;
+
+procedure TRODLToIntf.WriteEventSinkDeclaration(aEventSink : TRODLEventSink);
+var i : integer;
+begin
+  if not aEventSink.IsFromUsedRodl then with aEventSink.Default do begin
+    { Client events }
+    Write(Format('{ I%s }', [aEventSink.Info.Name]), PASCAL_INDENTATION_LEVEL_1);
+    WriteDocumentation(aEventSink);
+    if aEventSink.Ancestor <> '' then begin
+      Write(Format('I%s = interface(I%s)', [aEventSink.Info.Name,aEventSink.Ancestor]), PASCAL_INDENTATION_LEVEL_1);
+    end
+    else begin
+      Write(Format('I%s = interface', [aEventSink.Info.Name]), PASCAL_INDENTATION_LEVEL_1);
+    end;
+    Write(Format('[''%s'']', [GUIDToString(Info.UID)]), PASCAL_INDENTATION_LEVEL_2);
+
+    for i := 0 to (Count-1) do begin
+      WriteOperationDocumentation(Items[i], PASCAL_INDENTATION_LEVEL_2);
+      Write(GetOperationDefinition(Items[i]), PASCAL_INDENTATION_LEVEL_2);
+    end;
+
+    Write('end;', PASCAL_INDENTATION_LEVEL_1);
+    WriteEmptyLine;
+
+    { Events writer }
+    Write(Format('{ I%s_Writer }', [aEventSink.Info.Name]), PASCAL_INDENTATION_LEVEL_1);
+    WriteDocumentation(aEventSink);
+    if aEventSink.Ancestor <> '' then begin
+      Write(Format('I%s_Writer = interface(I%s_Writer)', [aEventSink.Info.Name,aEventSink.Ancestor]), PASCAL_INDENTATION_LEVEL_1);
+    end
+    else begin
+      Write(Format('I%s_Writer = interface(IROEventWriter)', [aEventSink.Info.Name]), PASCAL_INDENTATION_LEVEL_1);
+    end;
+    Write(Format('[''%s'']', [GUIDToString(Info.UID){GUIDToString(NewUID)}]), PASCAL_INDENTATION_LEVEL_2);
+
+    for i := 0 to (Count-1) do begin
+      Write(GetOperationDefinition(Items[i], '', '', TRUE), PASCAL_INDENTATION_LEVEL_2);
+    end;
+
+    Write('end;', PASCAL_INDENTATION_LEVEL_1);
+    WriteEmptyLine;
+  end;
+end;
+
+procedure TRODLToIntf.WriteEventSink(aLibrary : TRODLLibrary; aEventSink : TRODLEventSink);
+
+   function isNeedObjectDisposer(AOperation: TRODLOperation):Boolean;
+   var
+     j: Integer;
+   begin
+     Result := False;
+     for j := 0 to AOperation.Count - 1 do begin
+       Result :=  not IsSimpleType(GetDataType(AOperation.Items[j].DataType), aLibrary);
+       if Result then Exit;
+     end;
+   end;
+
+var i, x : integer;
+    parline, typname : string;
+    par : TRODLOperationParam;
+    lNeedDisposer: Boolean;
+begin
+  if not aEventSink.IsFromUsedRodl then with aEventSink.Default do begin
+    { -------------------------- EVENT WRITER -------------------------- }
+    Write('type');
+
+    { Event writer class }
+    Write(Format('{ T%s_Writer }', [aEventSink.Info.Name]), PASCAL_INDENTATION_LEVEL_1);
+    if aEventSink.Ancestor <> '' then begin
+      Write(Format('T%s_Writer = class(T%s_Writer, I%s_Writer)', [aEventSink.Info.Name, aEventSink.Ancestor, aEventSink.Info.Name]),PASCAL_INDENTATION_LEVEL_1);
+    end
+    else begin
+      Write(Format('T%s_Writer = class(TROEventWriter, I%s_Writer)', [aEventSink.Info.Name, aEventSink.Info.Name]),PASCAL_INDENTATION_LEVEL_1);
+    end;
+    //Write('private',PASCAL_INDENTATION_LEVEL_1);
+    Write('protected',PASCAL_INDENTATION_LEVEL_1);
+    //Write('  // Internal',PASCAL_INDENTATION_LEVEL_1);
+    //Write(Format('  // %s', [aEventSink.Info.Name]),PASCAL_INDENTATION_LEVEL_1);
+
+    for i := 0 to (Count-1) do
+      Write(GetOperationDefinition(Items[i], '', '', TRUE), PASCAL_INDENTATION_LEVEL_2);
+    Write('end;',PASCAL_INDENTATION_LEVEL_1);
+    WriteEmptyLine;
+
+    { Actual methods }
+    for i := 0 to (Count-1) do begin
+      Write(GetOperationDefinition(Items[i], 'T'+aEventSink.Info.Name+'_Writer', '', TRUE));
+      Write('var __eventdata : Binary;');
+
+      Write('begin');
+      Write('  __eventdata := Binary.Create;');
+      Write('  try');
+      Write(Format('    __Message.InitializeEventMessage(NIL, ''%s'', EID_%s, ''%s'');', [aLibrary.Name, aEventSink.Info.Name, Items[i].Info.Name]));
+
+      { Write parameters }
+      for x := 0 to (Items[i].Count-1) do begin
+        par := Items[i].Items[x];
+        typname := GetDataType(par.DataType);
+
+{        if IsUserDefinedType(typname,aLibrary) then begin
+          typname := GetFullyQualifiedTypeName(typname,aLibrary,fIntfUnitName);
+        end;}
+        Write(Format('    __Message.Write(''%s'', TypeInfo(%s), %s, []);', [par.Name, typname, par.Name]));
+      end;
+
+      Write('    __Message.Finalize;');
+      WriteEmptyLine;
+      Write('    __Message.WriteToStream(__eventdata);');
+      WriteEmptyLine;
+      Write('    Repository.StoreEventData(__Sender, __eventdata, ExcludeSender, ExcludeSessionList, SessionList.CommaText);');
+      Write('  finally');
+      Write('    __eventdata.Free;');
+      Write('  end;');
+      Write('end;');
+      WriteEmptyLine;
+    end;
+
+    { -------------------------- INVOKER -------------------------- }
+    Write('type');
+
+    { Event invoker class }
+    Write(Format('{ T%s_Invoker }', [aEventSink.Info.Name]), PASCAL_INDENTATION_LEVEL_1);
+    if aEventSink.Ancestor <> '' then begin
+      Write(Format('T%s_Invoker = class(T%s_Invoker)', [aEventSink.Info.Name, aEventSink.Ancestor]),PASCAL_INDENTATION_LEVEL_1);
+    end
+    else begin
+      Write(Format('T%s_Invoker = class(TROEventInvoker)', [aEventSink.Info.Name]),PASCAL_INDENTATION_LEVEL_1);
+    end;
+    Write('published',PASCAL_INDENTATION_LEVEL_1);
+
+    for i := 0 to (Count-1) do
+      Write('procedure Invoke_'+Items[i].Info.Name+'(__EventReceiver : TROEventReceiver; const __Message : IROMessage; const __Target : IUnknown);', PASCAL_INDENTATION_LEVEL_2);
+
+
+    Write('end;',PASCAL_INDENTATION_LEVEL_1);
+    WriteEmptyLine;
+
+    { Actual methods }
+
+    for i := 0 to (Count-1) do begin
+      Write(Format('procedure T%s_Invoker.Invoke_%s(__EventReceiver : TROEventReceiver; const __Message : IROMessage; const __Target : IUnknown);',
+             [aEventSink.Info.Name, Items[i].Info.Name]));
+      //Write(GetOperationDefinition(Items[i], 'T'+aEventSink.Info.Name+'_Invoker', '', FALSE));
+
+      { Write local variables }
+      lNeedDisposer := isNeedObjectDisposer(Items[i]);
+      if lNeedDisposer or (Items[i].Count>0) then Write('var');
+      if lNeedDisposer then Write('__lObjectDisposer: TROObjectDisposer;');
+      if (Items[i].Count>0) then begin
+        for x := 0 to (Items[i].Count-1) do begin
+          par := Items[i].Items[x];
+          typname := GetDataType(par.DataType);
+
+  {        if IsUserDefinedType(typname,aLibrary) then begin
+            typname := GetFullyQualifiedTypeName(typname,aLibrary,fIntfUnitName);
+          end;}
+          Write(Format('  %s: %s;', [par.Name, typname]));
+        end;
+      end;
+
+      Write('begin');
+
+      for x := 0 to Items[i].Count-1 do begin
+        par := Items[i].Items[x];
+        typname := GetDataType(par.DataType);
+
+        if not IsSimpleType(typname, aLibrary)
+          then Write(Format('  %s := NIL;', [par.Name]));
+      end;
+      if Items[i].Count>0 then WriteEmptyLine;
+
+      if lNeedDisposer then Write('try', PASCAL_INDENTATION_LEVEL_1);
+      parline := '';
+      { Readers local variables values }
+      if (Items[i].Count>0) then begin
+        for x := 0 to (Items[i].Count-1) do begin
+          par := Items[i].Items[x];
+          parline := parline+par.Name+', ';
+
+          typname := GetDataType(par.DataType);
+
+  {        if IsUserDefinedType(typname,aLibrary) then begin
+            typname := GetFullyQualifiedTypeName(typname,aLibrary,fIntfUnitName);
+          end;}
+
+          Write(Format('__Message.Read(''%s'', TypeInfo(%s), %s, []);', [par.Name, typname, par.Name]), PASCAL_INDENTATION_LEVEL_2);
+        end;
+      end;
+
+      WriteEmptyLine;
+      parline := Copy(parline, 1, Length(parline)-2);
+      Write(Format('(__Target as I%s).%s(%s);',
+            [aEventSink.Info.Name, Items[i].Info.Name, parline]), PASCAL_INDENTATION_LEVEL_2);
+      WriteEmptyLine;
+
+      if lNeedDisposer then begin
+        Write('finally', PASCAL_INDENTATION_LEVEL_1);
+        Write('__lObjectDisposer:= TROObjectDisposer.Create(__EventReceiver);', PASCAL_INDENTATION_LEVEL_2);
+        Write('try', PASCAL_INDENTATION_LEVEL_2);
+        for x := 0 to Items[i].Count-1 do begin
+          par := Items[i].Items[x];
+          typname := GetDataType(par.DataType);
+
+          if not IsSimpleType(typname, aLibrary)
+            then Write('__lObjectDisposer.Add('+par.Name+');', PASCAL_INDENTATION_LEVEL_3);
+        end;
+        Write('finally', PASCAL_INDENTATION_LEVEL_2);
+        Write('__lObjectDisposer.Free();', PASCAL_INDENTATION_LEVEL_3);
+        Write('end', PASCAL_INDENTATION_LEVEL_2);
+        Write('end', PASCAL_INDENTATION_LEVEL_1);
+      end;
+      Write('end;');
+      WriteEmptyLine;
+    end;
+  end;
+end;
+
+class function TRODLToIntf.GetTargetFileName(const aLibrary: TRODLLibrary;
+  const aTargetEntity: string): string;
+begin
+  try
+    result := aLibrary.Info.Name+'_Intf.pas'
+  except
+    result := 'Unknown.pas';
+  end;
+end;
+
+const
+  InnerIndent = 4;
+
+procedure TRODLToIntf.WriteCoClass(aLibrary: TRODLLibrary; aService: TRODLService);
+var i, p : integer;
+    sa : string;
+//    soapsvc : boolean;
+    typname : string;
+//    urn : string;
+begin
+  with aService.Default do begin
+//    soapsvc := IsSOAPService(aService);
+
+    Write('{ Co'+aService.Info.Name+' }');
+    WriteEmptyLine;
+
+    Write(Format('class function Co%s.Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): I%s;',
+          [aService.Info.Name, aService.Info.Name]));
+    Write('begin');
+    Write(Format('  result := T%s_Proxy.Create(aMessage, aTransportChannel);', [aService.Info.Name]));
+    Write('end;');
+    WriteEmptyLine;
+
+    if Count > 0 then begin
+      Write(Format('{ T%s_Proxy }', [aService.Info.Name]));
+      WriteEmptyLine;
+    end;
+
+    Write(Format('function T%s_Proxy.__GetInterfaceName:string;',[aService.Info.Name]));
+    Write('begin');
+    Write(Format('  result := ''%s'';',[aService.Info.Name]));
+    Write('end;');
+    WriteEmptyLine;
+
+    for i := 0 to (Count-1) do begin
+      Write(GetOperationDefinition(Items[i], Format('T%s_Proxy', [aService.Info.Name])));
+//      Write('var');
+//      Write('  __request, __response : TMemoryStream;');
+      //if soapsvc then write('var');
+      //if soapsvc then Write('    __http : IROHTTPTransport;');
+      //if soapsvc then Write('    __TargetUrlWasSet : boolean;');
+      Write('begin');
+      //if soapsvc then Write('__TargetUrlWasSet := false;',PASCAL_INDENTATION_LEVEL_1);
+
+      sa := GetAttributes(Items[i].Info.Attributes, aService.Info.Attributes, aLibrary.Info.Attributes, InnerIndent);
+      if sa <> '' then
+        Write('__Message.SetAttributes(__TransportChannel, '+sa+');', InnerIndent);
+      write('try', PASCAL_INDENTATION_LEVEL_1);
+
+      with Items[i] do begin
+        for p := 0 to (Count-1) do
+          if (Items[p].Flag = fOut) and IsImplementedAsClass(Items[p].DataType, aLibrary) then
+            Write(Format('%s := nil;', [Items[p].Name]),PASCAL_INDENTATION_LEVEL_2);
+        if Assigned(Result) and IsImplementedAsClass(Result.DataType, aLibrary) then
+            Write('result := nil;', PASCAL_INDENTATION_LEVEL_2);
+      end;
+
+//      Write('__request := TMemoryStream.Create;',PASCAL_INDENTATION_LEVEL_1);
+//      Write('__response := TMemoryStream.Create;',PASCAL_INDENTATION_LEVEL_1);
+//      WriteEmptyLine;
+//      Write('try',PASCAL_INDENTATION_LEVEL_1);
+
+(*      if soapsvc then begin
+        urn := Items[i].Info.Attributes.Values['Action'];
+        if (urn='') then urn := Items[0].Info.Attributes.Values['InputNamespace']; // Apache ones...
+
+        if Items[i].Info.Attributes.Values['InputMessageName'] <> '' then
+          Write(Format('__Message.InitializeRequestMessage(__TransportChannel, ''%s'', TargetNamespace, ''%s'');', [aLibrary.Info.Name, Items[i].Info.Attributes.Values['InputMessageName']]),InnerIndent)
+        else
+          Write(Format('__Message.InitializeRequestMessage(__TransportChannel, ''%s'', TargetNamespace, ''%s'');', [aLibrary.Info.Name, Items[i].Info.Name]),InnerIndent);
+
+        WriteEmptyLine;
+        Write('if Supports(__TransportChannel, IROHTTPTransport, __http) then begin',InnerIndent);
+        Write(Format('  __http.Headers[''SOAPAction''] := ''"%s"'';', [Items[i].Info.Attributes.Values['Action']]),InnerIndent);
+        Write('  __TargetUrlWasSet := (__http.TargetURL='''');',InnerIndent);
+        Write(Format('  if __TargetUrlWasSet then __http.TargetURL := %s_EndPointURI;', [aService.Info.Name]),InnerIndent);
+        Write('end;',InnerIndent);
+        WriteEmptyLine;
+      end
+      else begin
+        //Write(Format('__Message.Initialize(__TransportChannel, ''%s'', ''%s'', ''%s'');', [aLibrary.Info.Name, aService.Info.Name, Items[i].Info.Name]),InnerIndent);
+        if Items[i].Info.Attributes.Values['InputMessageName'] <> '' then
+          Write(Format('__Message.InitializeRequestMessage(__TransportChannel, ''%s'', __InterfaceName, ''%s'');', [aLibrary.Info.Name, Items[i].Info.Attributes.Values['InputMessageName']]),InnerIndent)
+        else*)
+      Write(Format('__Message.InitializeRequestMessage(__TransportChannel, ''%s'', __InterfaceName, ''%s'');', [aLibrary.Info.Name, Items[i].Info.Name]),InnerIndent);
+(*      end;*)
+
+      with Items[i] do begin
+        for p := 0 to (Count-1) do
+          if IsInputFlag(Items[p].Flag) then begin
+            if (StrToDataType(Items[p].DataType)=rtDateTime)
+              then sa := '[paIsDateTime]'
+              else sa := '[]';
+
+
+            typname := GetDataType(Items[p].DataType);
+            if IsUserDefinedType(typname,aLibrary) then begin
+              typname := GetFullyQualifiedTypeName(typname,aLibrary,fUnitName);
+            end;
+
+            Write(Format('__Message.Write(''%s'', TypeInfo(%s), %s, %s);',
+                            [Items[p].Name, typname, Items[p].Name, sa]),InnerIndent);
+          end;
+      end;
+      Write('__Message.Finalize;',InnerIndent);
+      WriteEmptyLine;
+
+//      Write('__Message.WriteToStream(__request);',InnerIndent);
+//      Write('__TransportChannel.Dispatch(__request, __response);',InnerIndent);
+//      Write('__Message.ReadFromStream(__response);',InnerIndent);
+      Write('__TransportChannel.Dispatch(__Message);',InnerIndent);
+      WriteEmptyLine;
+
+      //Write(Format('Message.Initialize(''I%s'', ''%s'');', [aService.Name, Items[i].Name]),InnerIndent);
+      with Items[i] do begin
+
+        if Assigned(Result) then begin
+          if (StrToDataType(Result.DataType)=rtDateTime)
+            then sa := '[paIsDateTime]'
+            else sa := '[]';
+
+          typname := GetDataType(Result.DataType);
+          if IsUserDefinedType(typname,aLibrary) then begin
+            typname := GetFullyQualifiedTypeName(typname,aLibrary,fUnitName);
+          end;
+
+          Write(Format('__Message.Read(''%s'', TypeInfo(%s), result, %s);',
+                       [Result.Name, typname, sa]),InnerIndent);
+        end;
+
+        for p := 0 to (Count-1) do
+          if IsOutputFlag(Items[p].Flag) then begin
+
+            if (StrToDataType(Items[p].DataType)=rtDateTime)
+              then sa := '[paIsDateTime]'
+              else sa := '[]';
+
+            typname := GetDataType(Items[p].DataType);
+            if IsUserDefinedType(typname,aLibrary) then begin
+              typname := GetFullyQualifiedTypeName(typname,aLibrary,fUnitName);
+            end;
+
+            Write(Format('__Message.Read(''%s'', TypeInfo(%s), %s, %s);',
+                         [Items[p].Name, typname, Items[p].Name, sa]),InnerIndent);
+          end;
+      end;
+      //Write('Message.Finalize;',InnerIndent);
+
+      Write('  finally');
+(*      if soapsvc then begin
+        Write('  if Supports(__TransportChannel, IROHTTPTransport, __http) then begin',InnerIndent);
+        Write('    if __TargetUrlWasSet then __http.TargetURL := '''';',InnerIndent);
+        Write('  end;',InnerIndent);
+        WriteEmptyLine;
+      end;*)
+      if sa <> '' then
+        Write('    __Message.UnsetAttributes(__TransportChannel);');
+      Write('    __Message.FreeStream;');
+//      Write('    __response.Free;');
+      Write('  end');
+      Write('end;');
+      WriteEmptyLine;
+    end;
+
+  end;
+end;
+
+function TRODLToIntf.IsSOAPService(aService: TRODLService): boolean;
+begin
+  result := aService.Attributes.Values['Type'] = 'SOAP';
+end;
+
+procedure TRODLToIntf.WriteTypeDeclaration(aLibrary: TRODLLibrary; aType: TRODLEntity);
+var
+  i : integer;
+  AList: TList;
+  s: string;
+  lNeedInitSimpleTypeWithDefaultValues: boolean;
+begin
+  Write(Format('{ %s }', [aType.Name]), PASCAL_INDENTATION_LEVEL_1);
+  // Structs
+  if (aType is TRODLStruct) then with TRODLStruct(aType) do begin
+
+    WriteDocumentation(aType);
+    if Ancestor <> '' then begin
+      Write(Format('%s = class(%s)', [Name,Ancestor]),PASCAL_INDENTATION_LEVEL_1);
+    end
+    else begin
+      Write(Format('%s = class(TROComplexType)', [Name]),PASCAL_INDENTATION_LEVEL_1);
+    end;
+    if Count > 0 then begin
+
+      Write('private',PASCAL_INDENTATION_LEVEL_1);
+      for i := 0 to (Count-1) do begin
+        Write(Format('f%s: %s;', [Items[i].Name, GetDataType(Items[i].DataType)]), PASCAL_INDENTATION_LEVEL_2);
+      end;
+      //WriteEmptyLine;
+      lNeedInitSimpleTypeWithDefaultValues := False;
+      for i := 0 to (Count-1) do begin
+        //if IsStruct(Items[i].DataType, aLibrary) or IsArray(Items[i].DataType, aLibrary) then begin
+        if IsImplementedAsClass(Items[i].DataType, aLibrary) then begin
+          //Write(Format('procedure Set%s(Value : %s);', [Items[i].Name, Items[i].DataType]), PASCAL_INDENTATION_LEVEL_2);
+          Write(Format('function Get%s: %s;', [Items[i].Name, GetDataType(Items[i].DataType)]), PASCAL_INDENTATION_LEVEL_2);
+        end
+        else begin
+          lNeedInitSimpleTypeWithDefaultValues := lNeedInitSimpleTypeWithDefaultValues or (Items[i].Attributes.IndexOfName('Default') <> -1);
+        end;
+      end;
+
+      Write('public',PASCAL_INDENTATION_LEVEL_1);
+      if lNeedInitSimpleTypeWithDefaultValues then begin
+        Write('constructor Create(aCollection : TCollection); override;', PASCAL_INDENTATION_LEVEL_2);
+      end;
+      if aType.Attributes.Count > 0 then begin
+        Write('class function GetAttributeCount: Integer; override;', PASCAL_INDENTATION_LEVEL_2);
+        Write('class function GetAttributeName(aIndex: Integer): string; override;', PASCAL_INDENTATION_LEVEL_2);
+        Write('class function GetAttributeValue(aIndex: Integer): string; override;', PASCAL_INDENTATION_LEVEL_2);
+        WriteEmptyLine;
+      end;
+      {Write('  constructor Create; override;',PASCAL_INDENTATION_LEVEL_1);
+      Write('  destructor Destroy; override;',PASCAL_INDENTATION_LEVEL_1);}
+        Write('procedure Assign(iSource: TPersistent); override;',PASCAL_INDENTATION_LEVEL_2);
+      if (CalcItemsMarshalingOrder(True).Count>0) and (Count > 0) then begin
+        Write('procedure ReadComplex(ASerializer: TObject); override;',PASCAL_INDENTATION_LEVEL_2);
+        Write('procedure WriteComplex(ASerializer: TObject); override;',PASCAL_INDENTATION_LEVEL_2);
+      end;
+      //WriteEmptyLine;
+      Write('published',PASCAL_INDENTATION_LEVEL_1);
+      for i := 0 to (Count-1) do begin
+        //if IsStruct(Items[i].DataType, aLibrary) or IsArray(Items[i].DataType, aLibrary)
+        WriteDocumentation(Items[i]);
+        if IsImplementedAsClass(Items[i].DataType, aLibrary) then begin
+          Write(Format('property %s:%s read Get%s write f%s;',
+                [Items[i].Name, GetDataType(Items[i].DataType), Items[i].Name, Items[i].Name]), PASCAL_INDENTATION_LEVEL_2)
+        end
+        else begin
+          Write(Format('property %s:%s read f%s write f%s;',
+                [Items[i].Name, GetDataType(Items[i].DataType), Items[i].Name, Items[i].Name]), PASCAL_INDENTATION_LEVEL_2);
+        end;
+      end;
+      //WriteEmptyLine;
+    end;
+    Write('end;', PASCAL_INDENTATION_LEVEL_1);
+    WriteEmptyLine;
+
+    // Adds also a collection. This is handy when dealing with VCL wrappers
+    Write(Format('{ %sCollection }', [aType.Name]), PASCAL_INDENTATION_LEVEL_1);
+    if Ancestor <> '' then begin
+      Write(Format('%sCollection = class(%sCollection)', [Name,Ancestor]),PASCAL_INDENTATION_LEVEL_1);
+    end
+    else begin
+      Write(Format('%sCollection = class(TROCollection)', [Name]),PASCAL_INDENTATION_LEVEL_1);
+    end;
+
+    Write('protected', PASCAL_INDENTATION_LEVEL_1);
+    Write('constructor Create(aItemClass: TCollectionItemClass); overload;', PASCAL_INDENTATION_LEVEL_2);
+    Write(Format('function GetItems(aIndex: integer): %s;', [Name]), PASCAL_INDENTATION_LEVEL_2);
+    Write(Format('procedure SetItems(aIndex: integer; const Value: %s);', [Name]), PASCAL_INDENTATION_LEVEL_2);
+    Write('public', PASCAL_INDENTATION_LEVEL_1);
+    Write('constructor Create; overload;', PASCAL_INDENTATION_LEVEL_2);
+
+    Write(Format('function Add: %s; reintroduce;', [Name]), PASCAL_INDENTATION_LEVEL_2);
+
+    aList := TList.Create;
+    try
+      aLibrary.GetArraysByElement(Name,aList);
+      if aList.Count > 1 then s:= ' overload;' else s:='';
+      for i:=0 to aList.Count-1 do begin
+        Write(Format('procedure SaveToArray(anArray: %s);'+s, [TRODLArray(aList[i]).Name]), PASCAL_INDENTATION_LEVEL_2);
+        Write(Format('procedure LoadFromArray(anArray: %s);'+s, [TRODLArray(aList[i]).Name]), PASCAL_INDENTATION_LEVEL_2);
+      end;
+    finally
+      aList.Free;
+    end;
+
+    Write(Format('property Items[Index: integer]:%s read GetItems write SetItems; default;', [Name]), PASCAL_INDENTATION_LEVEL_2);
+    Write('end;', PASCAL_INDENTATION_LEVEL_1);
+    WriteEmptyLine;
+  end
+
+  // Arrays
+  else if (aType is TRODLArray) then with TRODLArray(aType) do begin
+    WriteDocumentation(aType);
+    Write(Format('%s_%s = array of %s;', [Name, GetDataType(ElementType),GetDataType(ElementType)]), PASCAL_INDENTATION_LEVEL_1);
+    Write(Format('%s = class(TROArray)', [Name]),PASCAL_INDENTATION_LEVEL_1);
+    Write('private',PASCAL_INDENTATION_LEVEL_1);
+
+    Write('  fCount: Integer;', PASCAL_INDENTATION_LEVEL_1);
+
+    Write(Format('  fItems : %s_%s;', [Name, GetDataType(ElementType)]), PASCAL_INDENTATION_LEVEL_1);
+    Write('protected',PASCAL_INDENTATION_LEVEL_1);
+
+    Write('procedure Grow; virtual;',PASCAL_INDENTATION_LEVEL_2);
+
+    Write(Format('function GetItems(aIndex: integer): %s;', [GetDataType(ElementType)]),PASCAL_INDENTATION_LEVEL_2);
+    Write(Format('procedure SetItems(aIndex: integer; const Value: %s);', [GetDataType(ElementType)]),PASCAL_INDENTATION_LEVEL_2);
+    Write('function GetCount: integer; override;',PASCAL_INDENTATION_LEVEL_2);
+    Write('public',PASCAL_INDENTATION_LEVEL_1);
+    if aType.Attributes.Count > 0 then begin
+      Write('class function GetAttributeCount: Integer; override;', PASCAL_INDENTATION_LEVEL_2);
+      Write('class function GetAttributeName(aIndex: Integer): string; override;', PASCAL_INDENTATION_LEVEL_2);
+      Write('class function GetAttributeValue(aIndex: Integer): string; override;', PASCAL_INDENTATION_LEVEL_2);
+    end;
+    Write('class function GetItemType: PTypeInfo; override;',PASCAL_INDENTATION_LEVEL_2);
+    if IsImplementedAsClass(GetDataType(ElementType), aLibrary) then begin
+      Write('class function GetItemClass: TClass; override;',PASCAL_INDENTATION_LEVEL_2);
+    end;
+    Write('class function GetItemSize: integer; override;',PASCAL_INDENTATION_LEVEL_2);
+    WriteEmptyLine;
+    Write('  function GetItemRef(aIndex: integer): pointer; override;',PASCAL_INDENTATION_LEVEL_1);
+    if not IsSimpleType(GetDataType(ElementType),aLibrary) then begin
+      Write('  procedure SetItemRef(aIndex: integer; Ref: pointer); override;',PASCAL_INDENTATION_LEVEL_1);
+    end;
+    Write('  procedure Clear; override;',PASCAL_INDENTATION_LEVEL_1);
+    Write('  procedure Delete(aIndex: integer); override;',PASCAL_INDENTATION_LEVEL_1);
+
+    Write('  procedure Resize(ElementCount: integer); override;',PASCAL_INDENTATION_LEVEL_1);
+
+    WriteEmptyLine;
+
+    Write('procedure Assign(iSource:TPersistent); override;',PASCAL_INDENTATION_LEVEL_2);
+    Write('procedure ReadComplex(ASerializer: TObject); override;',PASCAL_INDENTATION_LEVEL_2);
+    Write('procedure WriteComplex(ASerializer: TObject); override;',PASCAL_INDENTATION_LEVEL_2);
+
+    if IsSimpleType(GetDataType(ElementType), aLibrary) then begin
+      Write(Format('  function Add(const Value:%s): integer;', [GetDataType(ElementType)]), PASCAL_INDENTATION_LEVEL_1);
+      Write('function GetIndex(const aPropertyName : string;',PASCAL_INDENTATION_LEVEL_2);
+      Write('                  const aPropertyValue : Variant;',PASCAL_INDENTATION_LEVEL_2);
+      Write('                  StartFrom : integer = 0;',PASCAL_INDENTATION_LEVEL_2);
+      Write('                  Options : TROSearchOptions = [soIgnoreCase]) : integer; override;',PASCAL_INDENTATION_LEVEL_2);
+    end
+    else begin
+      Write(Format('  function Add: %s; overload;', [GetDataType(ElementType)]), PASCAL_INDENTATION_LEVEL_1);
+      Write(Format('  function Add(const Value: %s):integer; overload;', [GetDataType(ElementType)]), PASCAL_INDENTATION_LEVEL_1);
+    end;
+
+    WriteEmptyLine;
+    Write('  property Count : integer read GetCount;',PASCAL_INDENTATION_LEVEL_1);
+    Write(Format('  property Items[Index: integer]:%s read GetItems write SetItems; default;', [GetDataType(ElementType)]), PASCAL_INDENTATION_LEVEL_1);
+    Write(Format('  property InnerArray: %s_%s read fItems;', [Name, GetDataType(ElementType)]), PASCAL_INDENTATION_LEVEL_1);
+    //WriteEmptyLine;
+    Write('end;',PASCAL_INDENTATION_LEVEL_1);
+    WriteEmptyLine;
+  end;
+end;
+
+
+procedure TRODLToIntf.WriteArraySerializer(aLibrary : TRODLLibrary; anArray : TRODLArray);
+begin
+  with anArray do begin
+    Write('{ '+Name+' }');
+    WriteEmptyLine;
+
+    if anArray.Attributes.Count > 0 then
+      WriteAttributesMethods(anArray);
+
+    Write(Format('procedure %s.Assign(iSource: TPersistent);',[Name]));
+    Write(Format('var lSource:%s;',[Name]));
+    Write(Format('    i:integer;',[Name]));
+    Write('begin');
+    Write(Format('  if (iSource is %s) then begin',[Name]));
+    Write(Format('    lSource := %s(iSource);',[Name]));
+    Write('    Clear();');
+    Write('    Resize(lSource.Count);');
+    WriteEmptyLine;
+    Write('    for i := 0 to Count-1 do begin');
+
+    {if (ElementType = 'Binary') then begin
+      Write('      if Assigned(lSource.Items[i]) then begin');
+      Write('        Items[i] := Binary.Create();');
+      Write('        Items[i].Clear();');
+      Write('        Items[i].CopyFrom(lSource.Items[i],0);');
+      Write('      end;');
+    end
+    else} if IsImplementedAsClass(GetDataType(ElementType), aLibrary) then begin
+      Write('      if Assigned(lSource.Items[i]) then begin');
+      Write('        Items[i].Assign(lSource.Items[i]);');
+      Write('      end;');
+    end
+    else begin
+      Write('      Items[i] := lSource.Items[i];');
+    end;
+
+    Write('    end;');
+    Write('  end');
+    Write('  else begin');
+    Write('    inherited Assign(iSource);');
+    Write('  end;');
+    Write('end;');
+    WriteEmptyLine;
+
+    // GetItemType
+    Write(Format('class function %s.GetItemType: PTypeInfo;', [Name]));
+    Write('begin');
+    Write(Format('  result := TypeInfo(%s);', [GetDataType(ElementType)]));
+    Write('end;');
+    WriteEmptyLine;
+
+    // GetItemClass
+    if IsImplementedAsClass(GetDataType(ElementType), aLibrary) then begin
+      Write(Format('class function %s.GetItemClass: TClass;', [Name]));
+      Write(       'begin');
+      Write(Format('  result := %s;', [GetDataType(ElementType)]));
+      Write(       'end;');
+      WriteEmptyLine;
+    end;
+
+    // GetItemSize
+    Write(Format('class function %s.GetItemSize: integer;', [Name]));
+    Write('begin');
+    Write(Format('  result := SizeOf(%s);', [GetDataType(ElementType)]));
+    Write('end;');
+    WriteEmptyLine;
+
+    // GetItems
+    Write(Format('function %s.GetItems(aIndex: integer): %s;', [Name, GetDataType(ElementType)]));
+    Write('begin');
+    Write('  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);');
+    Write('  result := fItems[aIndex];');
+    Write('end;');
+    WriteEmptyLine;
+
+    // GetItemRef
+    Write(Format('function %s.GetItemRef(aIndex: integer): pointer;', [Name]));
+    Write('begin');
+    Write('  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);');
+    if IsSimpleType(GetDataType(ElementType), aLibrary)
+      then Write('  result := @fItems[aIndex];')
+      else Write('  result := fItems[aIndex];');
+    Write('end;');
+    WriteEmptyLine;
+
+    // SetItemRef
+    if not IsSimpleType(GetDataType(ElementType), aLibrary) then begin
+      Write(Format('procedure %s.SetItemRef(aIndex: integer; Ref: pointer);', [Name]));
+      Write('begin');
+      Write('  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);');
+      Write('  if Ref <> fItems[aIndex] then begin');
+      write('    if fItems[aIndex] <> nil then fItems[aIndex].Free;');
+      Write('    fItems[aIndex] := Ref;');
+      write('  end;');
+      Write('end;');
+      WriteEmptyLine;
+    end;
+
+    // Clear
+    Write(Format('procedure %s.Clear;', [Name]));
+    if not IsSimpleType(GetDataType(ElementType), aLibrary) then Write('var i: integer;');
+    Write('begin');
+    if not IsSimpleType(GetDataType(ElementType), aLibrary) then Write('  for i := 0 to (Count-1) do fItems[i].Free();');
+    Write('  SetLength(fItems, 0);');
+
+    Write('  FCount := 0;');
+
+    Write('end;');
+    WriteEmptyLine;
+
+    // Delete
+    Write(Format('procedure %s.Delete(aIndex: integer);', [Name]));
+    //if not IsSimpleType(ElementType) then Write('  for i := 0 to (Count-1) do fItems[i].Free;');
+    Write('var i: integer;');
+    Write('begin');
+    Write('  if (aIndex>=Count) then RaiseError(err_InvalidIndex, [aIndex]);');
+    WriteEmptyLine;
+    if not IsSimpleType(GetDataType(ElementType), aLibrary) then begin
+      Write('  fItems[aIndex].Free();');
+      WriteEmptyLine;
+    end;
+    //ToDo: thic can probably be optimized???
+    Write('  if (aIndex<Count-1) then');
+    Write('    for i := aIndex to Count-2 do fItems[i] := fItems[i+1];'); // fixed from Count-1 to solve read bayond end of array.
+    WriteEmptyLine;
+    Write('  SetLength(fItems, Count-1);');
+
+    Write('  Dec(FCount);');
+
+    Write('end;');
+    WriteEmptyLine;
+
+    // SetItems
+    Write(Format('procedure %s.SetItems(aIndex: integer; const Value: %s);', [Name, GetDataType(ElementType)]));
+    Write('begin');
+    Write('  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);');
+    if not IsSimpleType(GetDataType(ElementType), aLibrary) then begin
+      Write('  if fItems[aIndex] <> Value then begin');
+      Write('    fItems[aIndex].Free;');
+      Write('    fItems[aIndex] := Value;');
+      Write('  end;');
+    end
+    else begin
+      Write('  fItems[aIndex] := Value;');
+    end;
+    Write('end;');
+    WriteEmptyLine;
+
+    // Resize
+    Write(Format('procedure %s.Resize(ElementCount: integer);', [Name]));
+    if not IsSimpleType(GetDataType(ElementType), aLibrary) then begin
+      Write('var i: Integer;');
+    end;
+    Write('begin');
+    Write('  if fCount = ElementCount then Exit;');
+    if not IsSimpleType(GetDataType(ElementType), aLibrary) then begin
+      write('  for i := FCount -1 downto ElementCount do');
+      Write('    FItems[i].Free;');
+    end;
+    Write('  SetLength(fItems, ElementCount);');
+    if not IsSimpleType(GetDataType(ElementType), aLibrary) then begin
+      Write('  for i := FCount to ElementCount -1 do');
+      write(Format('    FItems[i] := %s.Create;', [GetDataType(ElementType)]));
+    end;
+    Write('  FCount := ElementCount;');
+    Write('end;');
+    WriteEmptyLine;
+
+    // GetCount
+    Write(Format('function %s.GetCount: integer;', [Name]));
+    Write('begin');
+
+    //Write('  result := Length(fItems);');
+    Write('  result := FCount;');
+
+    Write('end;');
+    WriteEmptyLine;
+
+    // Grow
+    Write(Format('procedure %s.Grow;', [Name]));
+    Write('var');
+    Write('  Delta, Capacity: Integer;');
+    Write('begin');
+    Write('  Capacity := Length(fItems);');
+    Write('  if Capacity > 64 then');
+    Write('    Delta := Capacity div 4');
+    Write('  else');
+    Write('    if Capacity > 8 then');
+    Write('      Delta := 16');
+    Write('   else');
+    Write('      Delta := 4;');
+    Write('  SetLength(fItems, Capacity + Delta);');
+    Write('end;');
+    WriteEmptyLine;
+
+    // Add
+    if IsSimpleType(GetDataType(ElementType), aLibrary) then begin
+      Write(Format('function %s.Add(const Value: %s): integer;', [Name, GetDataType(ElementType)]));
+      Write('begin');
+
+      //Write('  SetLength(fItems, Length(fItems)+1);');
+      //Write('  result := Length(fItems)-1;');
+      //Write('  fItems[result] := Value;');
+      Write('  Result := Count;');
+      Write('  if Length(fItems) = Result then');
+      Write('    Grow;');
+      Write('  fItems[result] := Value;');
+      Write('  Inc(fCount);');
+
+      Write('end;');
+      WriteEmptyLine;
+
+      Write(Format('function %s.GetIndex(const aPropertyName: string;', [Name]));
+      Write('  const aPropertyValue: Variant; StartFrom: integer;');
+      Write('  Options: TROSearchOptions): integer;');
+      Write('begin');
+      Write('  result := -1;');
+      Write('end;');
+      WriteEmptyLine;
+    end
+    else begin
+      Write(Format('function %s.Add: %s;', [Name, GetDataType(ElementType)]));
+      Write('begin');
+      Write(Format('  result := %s.Create;', [GetDataType(ElementType)]));
+
+      //Write('  SetLength(fItems, Length(fItems)+1);');
+      //Write('  fItems[Length(fItems)-1] := result;');
+      Write('  Add(Result);');
+
+      Write('end;');
+      WriteEmptyLine;
+      Write(Format('function %s.Add(const Value:%s): integer;', [Name, GetDataType(ElementType)]));
+      Write('begin');
+
+      //Write('  SetLength(fItems, Length(fItems)+1);');
+      //Write('  result := Length(fItems)-1;');
+      //Write('  fItems[result] := Value;');
+      Write('  Result := Count;');
+      Write('  if Length(fItems) = Result then');
+      Write('    Grow;');
+      Write('  fItems[result] := Value;');
+      Write('  Inc(fCount);');
+
+      Write('end;');
+      WriteEmptyLine;
+    end;
+
+    Write(Format('procedure %s.ReadComplex(ASerializer: TObject);', [Name]));
+    Write('var');
+    Write('  lval: '+GetDataType(ElementType)+';');
+    Write('  i: integer;');
+//    Write('  itemref : pointer;');
+    Write('begin');
+    Write('  for i := 0 to Count-1 do begin');
+//    write('    if (GetItemClass<>NIL) then itemref := NIL else itemref := GetItemRef(i);');
+    Write('    with TROSerializer(ASerializer) do');
+    case StrToDataType(ElementType) of
+      rtInteger:     Write('      ReadInteger(GetArrayElementName(GetItemType, GetItemRef(i)), otSLong, lval, i);');
+      rtDateTime:    Write('      ReadDateTime(GetArrayElementName(GetItemType, GetItemRef(i)), lval, i);');
+      rtDouble:      Write('      ReadDouble(GetArrayElementName(GetItemType, GetItemRef(i)), ftDouble, lval, i);');
+      rtCurrency:    Write('      ReadDouble(GetArrayElementName(GetItemType, GetItemRef(i)), ftCurr, lval, i);');
+      rtWidestring:  Write('      ReadWideString(GetArrayElementName(GetItemType, GetItemRef(i)), lval, i);');
+      rtString:      Write('      ReadAnsiString(GetArrayElementName(GetItemType, GetItemRef(i)), lval, i);');
+      rtUTF8String:  Write('      ReadUTF8String(GetArrayElementName(GetItemType, GetItemRef(i)), lval, i);');
+      rtInt64:       Write('      ReadInt64(GetArrayElementName(GetItemType, GetItemRef(i)), lval, i);');
+      rtBoolean:     Write('      ReadEnumerated(GetArrayElementName(GetItemType, GetItemRef(i)),TypeInfo(boolean), lval, i);');
+      rtVariant:     Write('      ReadVariant(GetArrayElementName(GetItemType, GetItemRef(i)), lval, i);');
+      rtXML:         Write('      ReadXML(GetArrayElementName(GetItemType, GetItemRef(i)), lval, i);');
+      rtGuid:        Write('      ReadGuid(GetArrayElementName(GetItemType, GetItemRef(i)), lval, i);');
+      rtDecimal:     Write('      ReadDecimal(GetArrayElementName(GetItemType, GetItemRef(i)), lval, i);');
+      rtBinary:      Write('      ReadBinary(GetArrayElementName(GetItemType, GetItemRef(i)), lval, i);');
+      rtUserDefined:
+                   if aLibrary.FindArray(GetDataType(ElementType)) <> nil  then
+                     Write(Format('      ReadArray(GetArrayElementName(GetItemType, GetItemRef(i)), %s, lval, i);',[GetDataType(ElementType)]))
+                   else if aLibrary.FindEnum(GetDataType(ElementType)) <> nil  then
+                     Write(Format('      ReadEnumerated(GetArrayElementName(GetItemType, GetItemRef(i)),TypeInfo(%s), lval, i);',[GetDataType(ElementType)]))
+                   else
+                     Write(Format('      ReadStruct(GetArrayElementName(GetItemType, GetItemRef(i)), %s, lval, i);',[GetDataType(ElementType)]));
+    end;
+    Write('    Items[i] := lval;');
+    Write('  end;');
+    Write('end;');
+    WriteEmptyLine;
+
+    Write(Format('procedure %s.WriteComplex(ASerializer: TObject);', [Name]));
+    Write('var');
+    Write('  i: integer;');
+    Write('begin');
+    Write('  for i := 0 to Count-1 do');
+    Write('    with TROSerializer(ASerializer) do');
+    case StrToDataType(ElementType) of
+      rtInteger:     Write('      WriteInteger(GetArrayElementName(GetItemType, GetItemRef(i)), otSLong, fItems[i], i);');
+      rtDateTime:    Write('      WriteDateTime(GetArrayElementName(GetItemType, GetItemRef(i)), fItems[i], i);');
+      rtDouble:      Write('      WriteDouble(GetArrayElementName(GetItemType, GetItemRef(i)), ftDouble, fItems[i], i);');
+      rtCurrency:    Write('      WriteDouble(GetArrayElementName(GetItemType, GetItemRef(i)), ftCurr, fItems[i], i);');
+      rtWidestring:  Write('      WriteWideString(GetArrayElementName(GetItemType, GetItemRef(i)), fItems[i], i);');
+      rtString:      Write('      WriteAnsiString(GetArrayElementName(GetItemType, GetItemRef(i)), fItems[i], i);');
+      rtUTF8String:  Write('      WriteUTF8String(GetArrayElementName(GetItemType, GetItemRef(i)), fItems[i], i);');
+      rtInt64:       Write('      WriteInt64(GetArrayElementName(GetItemType, GetItemRef(i)), fItems[i], i);');
+      rtBoolean:     Write('      WriteEnumerated(GetArrayElementName(GetItemType, GetItemRef(i)),TypeInfo(boolean), fItems[i], i);');
+      rtVariant:     Write('      WriteVariant(GetArrayElementName(GetItemType, GetItemRef(i)), fItems[i], i);');
+      rtXML:         Write('      WriteXML(GetArrayElementName(GetItemType, GetItemRef(i)), fItems[i], i);');
+      rtGuid:        Write('      WriteGuid(GetArrayElementName(GetItemType, GetItemRef(i)), fItems[i], i);');
+      rtDecimal:     Write('      WriteDecimal(GetArrayElementName(GetItemType, GetItemRef(i)), fItems[i], i);');
+      rtBinary:      Write('      WriteBinary(GetArrayElementName(GetItemType, GetItemRef(i)), fItems[i], i);');
+      rtUserDefined:
+                   if aLibrary.FindArray(GetDataType(ElementType)) <> nil  then
+                     Write('      WriteArray(GetArrayElementName(GetItemType, GetItemRef(i)), fItems[i], '+GetDataType(ElementType)+', i);')
+                   else if aLibrary.FindEnum(GetDataType(ElementType)) <> nil  then
+              Write(Format('      WriteEnumerated(GetArrayElementName(GetItemType, GetItemRef(i)),TypeInfo(%s), fItems[i], i);',[GetDataType(ElementType)]))
+                   else
+                     Write('      WriteStruct(GetArrayElementName(GetItemType, GetItemRef(i)), fItems[i], '+GetDataType(ElementType)+', i);');
+    end;
+    Write('end;');
+    WriteEmptyLine;
+  end;
+end;
+
+procedure TRODLToIntf.WriteStructPropMethods(aLibrary : TRODLLibrary; aStruct: TRODLStruct);
+var i : integer;
+    //lWroteComment: boolean;
+    aList: TList;
+    structEntityList: IROStrings;
+    structEntity: TRODLTypedEntity;
+    lNeedInitSimpleTypeWithDefaultValues: Boolean;
+    lDefaultValue: string;
+begin
+  with aStruct do begin
+{    Write(Format('constructor %s.Create;', [Name]));
+    Write('begin');
+    Write('  inherited;');
+    for i := 0 to (Count-1) do with Items[i] do begin
+      if not (IsStruct(DataType, aLibrary) or IsArray(DataType, aLibrary)) then Continue;
+      Write(Format('  fDestroy_%s := FALSE;', [Name]));
+    end;
+    Write('end;');
+    WriteEmptyLine;
+
+    Write(Format('destructor %s.Destroy;', [Name]));
+    Write('begin');
+    for i := 0 to (Count-1) do with Items[i] do begin
+      if not (IsStruct(DataType, aLibrary) or IsArray(DataType, aLibrary)) then Continue;
+      Write(Format('  if fDestroy_%s then FreeAndNIL(f%s);', [Name, Name]));
+    end;
+    Write('  inherited;');
+    Write('end;');
+    WriteEmptyLine;}
+
+    //lWroteComment := true;
+    //lWroteComment := false;
+
+    if Count > 0 then begin
+      Write('{ '+Name+' }');
+      WriteEmptyLine;
+
+      if aStruct.Attributes.Count > 0 then
+        WriteAttributesMethods(aStruct);
+
+      Write(Format('procedure %s.Assign(iSource: TPersistent); ',[aStruct.Name]));
+      Write(Format('var lSource: %s.%s;',[fUnitName, aStruct.Name]));
+      Write('begin');
+      Write('  inherited Assign(iSource);');
+      Write(Format('  if (iSource is %s.%s) then begin',[fUnitName, aStruct.Name]));
+      Write(Format('    lSource := %s.%s(iSource);',[fUnitName, aStruct.Name]));
+      lNeedInitSimpleTypeWithDefaultValues := False;
+      for i := 0 to (Count-1) do begin
+        if IsImplementedAsClass(Items[i].DataType, aLibrary) then begin
+          if not AutoCreateParams then
+            Write(Format('    if Assigned(%s) then'#13#10, [Items[i].Name]));
+          Write(Format('    %s.Assign(lSource.%s);',[Items[i].Name,Items[i].Name]));
+        end
+        else begin
+          lNeedInitSimpleTypeWithDefaultValues := lNeedInitSimpleTypeWithDefaultValues or (Items[i].Attributes.IndexOfName('Default') <> -1);
+          Write(Format('    %s := lSource.%s;',[Items[i].Name,Items[i].Name]));
+        end;
+      end;
+      Write('  end;');
+      Write('end;');
+      WriteEmptyLine;
+      
+      if lNeedInitSimpleTypeWithDefaultValues then begin
+        Write(Format('constructor %s.Create(aCollection : TCollection);',[aStruct.Name]));
+        Write('begin');
+        Write('  inherited Create(aCollection);');
+        For i := 0 to (Count-1) do begin
+          if (not IsImplementedAsClass(Items[i].DataType, aLibrary)) and (Items[i].Attributes.IndexOfName('Default')<>-1) then begin
+            lDefaultValue := '';
+            case StrToDataType(Items[i].DataType) of
+              rtInteger,
+              rtInt64,
+              rtDouble,
+              rtBoolean,
+              rtCurrency: lDefaultValue := Items[i].Attributes.Values['Default'];
+              rtWidestring,
+              rtGuid,
+              rtVariant,
+              rtUtf8String,
+              rtString: lDefaultValue := ''''+Items[i].Attributes.Values['Default']+'''';
+              rtDateTime: lDefaultValue := 'StrToDateTimeDef('''+Items[i].Attributes.Values['Default']+''',0)';
+              rtDecimal: lDefaultValue := Items[i].Attributes.Values['Default'];
+              //
+              rtBinary : ;
+              rtXML: ;
+              rtUserDefined: ;
+            end;
+            if lDefaultValue <> '' then Write(Format('  f%s := %s;',[Items[i].Name, lDefaultValue]));
+          end;
+        end;
+        Write('end;');
+        WriteEmptyLine;
+      end;
+    end;
+
+
+    for i := 0 to (Count-1) do with Items[i] do begin
+      if IsImplementedAsClass(DataType, aLibrary) then begin
+        //if not (IsStruct(DataType, aLibrary) or IsArray(DataType, aLibrary)) then Continue;
+
+        {Write(Format('procedure %s.Set%s(Value : %s);', [aStruct.Name, Name, DataType]));
+        Write('begin');
+        Write(Format('  if (f%s<>NIL) and (fDestroy_%s) then FreeAndNIL(f%s);', [Name, Name, Name]));
+        Write(Format('  f%s := Value;', [Name]));
+        Write(Format('  fDestroy_%s := FALSE;', [Name]));
+        Write('end;');
+        WriteEmptyLine;}
+
+        Write(Format('function %s.Get%s: %s;', [aStruct.Name, Name, GetDataType(DataType)]));
+        Write('begin');
+        if AutoCreateParams then
+          Write(Format('  if (f%s = nil) then f%s := %s.Create();', [Name, Name, GetDataType(DataType)]));
+        Write(Format('  result := f%s;', [Name]));
+        Write('end;');
+        WriteEmptyLine;
+      end;
+    end;
+
+    structEntityList:=CalcItemsMarshalingOrder(True);
+    if (structEntityList.Count>0) and (Count > 0) then begin
+      Write(Format('procedure %s.ReadComplex(ASerializer: TObject);', [Name]));
+      if structEntityList.Count > 0 then Write('var');
+      For i:=0 to structEntityList.Count - 1 do
+        with TRODLTypedEntity(structEntityList.Objects[i]) do
+          Write(Format('  l_%s: %s;',[Name, GetDataType(DataType)]));
+      Write('begin');
+      Write('  if TROSerializer(ASerializer).RecordStrictOrder then begin');
+      if Count <> structEntityList.Count then
+        Write('    inherited;');
+      For i:=0 to Count-1 do begin
+        structEntity:=Items[i];
+        Write(Format('    l_%s := %0:s;',[structEntity.Name]));
+        case StrToDataType(structEntity.DataType) of
+          rtInteger:     Write(Format('    TROSerializer(ASerializer).ReadInteger(''%s'', otSLong, l_%0:s);',[structEntity.Name]));
+          rtDateTime:    Write(Format('    TROSerializer(ASerializer).ReadDateTime(''%s'', l_%0:s);',[structEntity.Name]));
+          rtDouble:      Write(Format('    TROSerializer(ASerializer).ReadDouble(''%s'', ftDouble, l_%0:s);',[structEntity.Name]));
+          rtCurrency:    Write(Format('    TROSerializer(ASerializer).ReadDouble(''%s'', ftCurr, l_%0:s);',[structEntity.Name]));
+          rtWidestring:  Write(Format('    TROSerializer(ASerializer).ReadWideString(''%s'', l_%0:s);',[structEntity.Name]));
+          rtString:      Write(Format('    TROSerializer(ASerializer).ReadAnsiString(''%s'', l_%0:s);',[structEntity.Name]));
+          rtUTF8String:  Write(Format('    TROSerializer(ASerializer).ReadUTF8String(''%s'', l_%0:s);',[structEntity.Name]));
+          rtInt64:       Write(Format('    TROSerializer(ASerializer).ReadInt64(''%s'', l_%0:s);',[structEntity.Name]));
+          rtBoolean:     Write(Format('    TROSerializer(ASerializer).ReadEnumerated(''%s'',TypeInfo(boolean), l_%0:s);',[structEntity.Name]));
+          rtVariant:     Write(Format('    TROSerializer(ASerializer).ReadVariant(''%s'', l_%0:s);',[structEntity.Name]));
+          rtXML:         Write(Format('    TROSerializer(ASerializer).ReadXML(''%s'', l_%0:s);',[structEntity.Name]));
+          rtGuid:        Write(Format('    TROSerializer(ASerializer).ReadGuid(''%s'', l_%0:s);',[structEntity.Name]));
+          rtDecimal:     Write(Format('    TROSerializer(ASerializer).ReadDecimal(''%s'', l_%0:s);',[structEntity.Name]));
+          rtBinary:      Write(Format('    TROSerializer(ASerializer).ReadBinary(''%s'', l_%0:s);',[structEntity.Name]));
+          rtUserDefined:
+                       if aLibrary.FindArray(structEntity.DataType) <> nil  then
+                         Write(Format('    TROSerializer(ASerializer).ReadArray(''%s'', %s, l_%0:s);',[structEntity.Name,GetDataType(structEntity.DataType)]))
+                       else if aLibrary.FindEnum(structEntity.DataType) <> nil  then
+                         Write(Format('    TROSerializer(ASerializer).ReadEnumerated(''%s'',TypeInfo(%s), l_%0:s);',[structEntity.Name,GetDataType(structEntity.DataType)]))
+                       else
+                         Write(Format('    TROSerializer(ASerializer).ReadStruct(''%s'', %s, l_%0:s);',[structEntity.Name,GetDataType(structEntity.DataType)]));
+        end;
+        if (StrToDataType(structEntity.DataType) in [rtBinary, rtUserDefined]) and (aLibrary.FindEnum(structEntity.DataType) = nil) then
+          Write(Format('    if %s <> l_%0:s then %0:s.Free;',[structEntity.Name]));
+        Write(Format('    %s := l_%0:s;',[structEntity.Name]));
+      end;
+      Write('  end');
+      Write('  else begin');
+      For i:=0 to structEntityList.Count-1 do begin
+        structEntity:=TRODLTypedEntity(structEntityList.Objects[i]);
+        Write(Format('    l_%s := %0:s;',[structEntity.Name]));
+        case StrToDataType(structEntity.DataType) of
+          rtInteger:     Write(Format('    TROSerializer(ASerializer).ReadInteger(''%s'', otSLong, l_%0:s);',[structEntity.Name]));
+          rtDateTime:    Write(Format('    TROSerializer(ASerializer).ReadDateTime(''%s'', l_%0:s);',[structEntity.Name]));
+          rtDouble:      Write(Format('    TROSerializer(ASerializer).ReadDouble(''%s'', ftDouble, l_%0:s);',[structEntity.Name]));
+          rtCurrency:    Write(Format('    TROSerializer(ASerializer).ReadDouble(''%s'', ftCurr, l_%0:s);',[structEntity.Name]));
+          rtWidestring:  Write(Format('    TROSerializer(ASerializer).ReadWideString(''%s'', l_%0:s);',[structEntity.Name]));
+          rtUTF8String:  Write(Format('    TROSerializer(ASerializer).ReadUTF8String(''%s'', l_%0:s);',[structEntity.Name]));
+          rtString:      Write(Format('    TROSerializer(ASerializer).ReadAnsiString(''%s'', l_%0:s);',[structEntity.Name]));
+          rtInt64:       Write(Format('    TROSerializer(ASerializer).ReadInt64(''%s'', l_%0:s);',[structEntity.Name]));
+          rtBoolean:     Write(Format('    TROSerializer(ASerializer).ReadEnumerated(''%s'',TypeInfo(boolean), l_%0:s);',[structEntity.Name]));
+          rtVariant:     Write(Format('    TROSerializer(ASerializer).ReadVariant(''%s'', l_%0:s);',[structEntity.Name]));
+          rtXML:         Write(Format('    TROSerializer(ASerializer).ReadXML(''%s'', l_%0:s);',[structEntity.Name]));
+          rtGuid:        Write(Format('    TROSerializer(ASerializer).ReadGuid(''%s'', l_%0:s);',[structEntity.Name]));
+          rtDecimal:     Write(Format('    TROSerializer(ASerializer).ReadDecimal(''%s'', l_%0:s);',[structEntity.Name]));
+          rtBinary:      Write(Format('    TROSerializer(ASerializer).ReadBinary(''%s'', l_%0:s);',[structEntity.Name]));
+          rtUserDefined:
+                       if aLibrary.FindArray(structEntity.DataType) <> nil  then
+                         Write(Format('    TROSerializer(ASerializer).ReadArray(''%s'', %s, l_%0:s);',[structEntity.Name,GetDataType(structEntity.DataType)]))
+                       else if aLibrary.FindEnum(structEntity.DataType) <> nil  then
+                         Write(Format('    TROSerializer(ASerializer).ReadEnumerated(''%s'',TypeInfo(%s), l_%0:s);',[structEntity.Name,GetDataType(structEntity.DataType)]))
+                       else
+                         Write(Format('    TROSerializer(ASerializer).ReadStruct(''%s'', %s, l_%0:s);',[structEntity.Name,GetDataType(structEntity.DataType)]));
+        end;
+        if (StrToDataType(structEntity.DataType) in [rtBinary, rtUserDefined]) and (aLibrary.FindEnum(structEntity.DataType) = nil) then
+          Write(Format('    if %s <> l_%0:s then %0:s.Free;',[structEntity.Name]));
+        Write(Format('    %s := l_%0:s;',[structEntity.Name]));
+      end;
+      Write('  end;');
+      Write('end;');
+      WriteEmptyLine;
+
+      Write(Format('procedure %s.WriteComplex(ASerializer: TObject);', [Name]));
+      if structEntityList.Count > 0 then Write('var');
+      For i:=0 to structEntityList.Count - 1 do
+        with TRODLTypedEntity(structEntityList.Objects[i]) do
+          Write(Format('  l_%s: %s;',[Name, GetDataType(DataType)]));
+      Write('begin');
+      Write('  if TROSerializer(ASerializer).RecordStrictOrder then begin');
+      if Count <> structEntityList.Count then
+        Write('inherited;', PASCAL_INDENTATION_LEVEL_2);
+      Write(Format('TROSerializer(ASerializer).ChangeClass(%s);', [Name]), PASCAL_INDENTATION_LEVEL_2);
+      for i := 0 to Count-1 do begin
+        structEntity:=Items[i];
+        Write(Format('    l_%s := %0:s;',[structEntity.Name]));
+        case StrToDataType(structEntity.DataType) of
+          rtInteger:     Write(Format('    TROSerializer(ASerializer).WriteInteger(''%s'', otSLong, l_%0:s);',[structEntity.Name]));
+          rtDateTime:    Write(Format('    TROSerializer(ASerializer).WriteDateTime(''%s'', l_%0:s);',[structEntity.Name]));
+          rtDouble:      Write(Format('    TROSerializer(ASerializer).WriteDouble(''%s'', ftDouble, l_%0:s);',[structEntity.Name]));
+          rtCurrency:    Write(Format('    TROSerializer(ASerializer).WriteDouble(''%s'', ftCurr, l_%0:s);',[structEntity.Name]));
+          rtWidestring:  Write(Format('    TROSerializer(ASerializer).WriteWideString(''%s'', l_%0:s);',[structEntity.Name]));
+          rtString:      Write(Format('    TROSerializer(ASerializer).WriteAnsiString(''%s'', l_%0:s);',[structEntity.Name]));
+          rtUTF8String:  Write(Format('    TROSerializer(ASerializer).WriteUTF8String(''%s'', l_%0:s);',[structEntity.Name]));
+          rtInt64:       Write(Format('    TROSerializer(ASerializer).WriteInt64(''%s'', l_%0:s);',[structEntity.Name]));
+          rtBoolean:     Write(Format('    TROSerializer(ASerializer).WriteEnumerated(''%s'',TypeInfo(boolean), l_%0:s);',[structEntity.Name]));
+          rtVariant:     Write(Format('    TROSerializer(ASerializer).WriteVariant(''%s'', l_%0:s);',[structEntity.Name]));
+          rtXML:         Write(Format('    TROSerializer(ASerializer).WriteXML(''%s'', l_%0:s);',[structEntity.Name]));
+          rtGuid:        Write(Format('    TROSerializer(ASerializer).WriteGuid(''%s'', l_%0:s);',[structEntity.Name]));
+          rtDecimal:     Write(Format('    TROSerializer(ASerializer).WriteDecimal(''%s'', l_%0:s);',[structEntity.Name]));
+          rtBinary:      Write(Format('    TROSerializer(ASerializer).WriteBinary(''%s'', l_%0:s);',[structEntity.Name]));
+
+          rtUserDefined:
+                      if aLibrary.FindArray(structEntity.DataType) <> nil  then
+                         Write(Format('    TROSerializer(ASerializer).WriteArray(''%s'', l_%0:s, %s);',[structEntity.Name,GetDataType(structEntity.DataType)]))
+                      else if aLibrary.FindEnum(structEntity.DataType) <> nil  then
+                         Write(Format('    TROSerializer(ASerializer).WriteEnumerated(''%s'',TypeInfo(%s), l_%0:s);',[structEntity.Name,structEntity.DataType]))
+                      else
+                         Write(Format('    TROSerializer(ASerializer).WriteStruct(''%s'', l_%0:s, %s);',[structEntity.Name,GetDataType(structEntity.DataType)]))
+        end;
+      end;
+      Write('  end');
+      Write('  else begin');
+      For i:=0 to structEntityList.Count-1 do begin
+        structEntity:=TRODLTypedEntity(structEntityList.Objects[i]);
+        Write(Format('    l_%s := %0:s;',[structEntity.Name]));
+        case StrToDataType(structEntity.DataType) of
+          rtInteger:     Write(Format('    TROSerializer(ASerializer).WriteInteger(''%s'', otSLong, l_%0:s);',[structEntity.Name]));
+          rtDateTime:    Write(Format('    TROSerializer(ASerializer).WriteDateTime(''%s'', l_%0:s);',[structEntity.Name]));
+          rtDouble:      Write(Format('    TROSerializer(ASerializer).WriteDouble(''%s'', ftDouble, l_%0:s);',[structEntity.Name]));
+          rtCurrency:    Write(Format('    TROSerializer(ASerializer).WriteDouble(''%s'', ftCurr, l_%0:s);',[structEntity.Name]));
+          rtWidestring:  Write(Format('    TROSerializer(ASerializer).WriteWideString(''%s'', l_%0:s);',[structEntity.Name]));
+          rtString:      Write(Format('    TROSerializer(ASerializer).WriteAnsiString(''%s'', l_%0:s);',[structEntity.Name]));
+          rtUTF8String:  Write(Format('    TROSerializer(ASerializer).WriteUTF8String(''%s'', l_%0:s);',[structEntity.Name]));
+          rtInt64:       Write(Format('    TROSerializer(ASerializer).WriteInt64(''%s'', l_%0:s);',[structEntity.Name]));
+          rtBoolean:     Write(Format('    TROSerializer(ASerializer).WriteEnumerated(''%s'',TypeInfo(boolean), l_%0:s);',[structEntity.Name]));
+          rtVariant:     Write(Format('    TROSerializer(ASerializer).WriteVariant(''%s'', l_%0:s);',[structEntity.Name]));
+          rtXML:         Write(Format('    TROSerializer(ASerializer).WriteXML(''%s'', l_%0:s);',[structEntity.Name]));
+          rtGuid:        Write(Format('    TROSerializer(ASerializer).WriteGuid(''%s'', l_%0:s);',[structEntity.Name]));
+          rtDecimal:     Write(Format('    TROSerializer(ASerializer).WriteDecimal(''%s'', l_%0:s);',[structEntity.Name]));
+          rtBinary:      Write(Format('    TROSerializer(ASerializer).WriteBinary(''%s'', l_%0:s);',[structEntity.Name]));
+
+          rtUserDefined:
+                      if aLibrary.FindArray(structEntity.DataType) <> nil  then
+                         Write(Format('    TROSerializer(ASerializer).WriteArray(''%s'', l_%0:s, %s);',[structEntity.Name,GetDataType(structEntity.DataType)]))
+                      else if aLibrary.FindEnum(structEntity.DataType) <> nil  then
+                         Write(Format('    TROSerializer(ASerializer).WriteEnumerated(''%s'',TypeInfo(%s), l_%0:s);',[structEntity.Name,structEntity.DataType]))
+                      else
+                         Write(Format('    TROSerializer(ASerializer).WriteStruct(''%s'', l_%0:s, %s);',[structEntity.Name,GetDataType(structEntity.DataType)]))
+        end;
+      end;
+      Write('  end;');
+      Write('end;');
+      WriteEmptyLine;
+    end;
+    structEntityList:=nil;
+
+    // Writes the collection methods
+    Write('{ '+Name+'Collection }');
+    Write(Format('constructor %sCollection.Create;', [aStruct.Name]));
+    Write('begin');
+    Write(Format('  inherited Create(%s);', [aStruct.Name]));
+    Write('end;');
+    WriteEmptyLine;
+
+    Write(Format('constructor %sCollection.Create(aItemClass: TCollectionItemClass);', [aStruct.Name]));
+    Write('begin');
+    Write(Format('  inherited Create(aItemClass);', [aStruct.Name]));
+    Write('end;');
+
+    WriteEmptyLine;
+    Write(Format('function %sCollection.Add: %s;', [aStruct.Name, aStruct.Name]));
+    Write('begin');
+    Write(Format('  result := %s(inherited Add);', [aStruct.Name]));
+    Write('end;');
+    WriteEmptyLine;
+    Write(Format('function %sCollection.GetItems(aIndex: integer): %s;', [aStruct.Name, aStruct.Name]));
+    Write('begin');
+    Write(Format('  result := %s(inherited Items[aIndex]);', [aStruct.Name]));
+    Write('end;');
+    WriteEmptyLine;
+
+    aList := TList.Create;
+    try
+      aLibrary.GetArraysByElement(Name,aList);
+      for i := 0 to aList.Count-1 do begin
+        Write(Format('procedure %sCollection.LoadFromArray(anArray: %s);', [aStruct.Name, TRODLArray(aList[i]).Name]));
+        Write('var i : integer;');
+        Write('begin');
+        Write('  Clear;');
+        Write('  for i := 0 to (anArray.Count-1) do');
+        Write('    Add.Assign(anArray[i]);');
+        Write('end;');
+        WriteEmptyLine;
+        Write(Format('procedure %sCollection.SaveToArray(anArray: %s);', [aStruct.Name, TRODLArray(aList[i]).Name]));
+        Write('var i : integer;');
+        Write('begin');
+        Write('  anArray.Clear;');
+        Write('  anArray.Resize(Count);');
+        Write('  for i := 0 to (Count-1) do begin');
+        Write(Format('    anArray[i] := %s.Create;', [aStruct.Name]));
+        Write('    anArray[i].Assign(Items[i]);');
+        Write('  end;');
+        Write('end;');
+        WriteEmptyLine;
+      end;
+    finally
+      aList.Free;
+    end;
+
+    Write(Format('procedure %sCollection.SetItems(aIndex: integer; const Value: %s);', [aStruct.Name, aStruct.Name]));
+    Write('begin');
+    Write(Format('  %s(inherited Items[aIndex]).Assign(Value);', [aStruct.Name, aStruct.Name]));
+    Write('end;');
+    WriteEmptyLine;
+  end;
+end;
+
+
+function GetAttributes(atOperation, atService, atLibrary: TStrings; Ident: Integer): string;
+var
+  sl: TStringList;
+  s: string;
+  i, n: Integer;
+begin
+  sl := TStringList.Create;
+  try
+    sl.AddStrings(atOperation);
+    sl.AddStrings(atService);
+    sl.AddStrings(atLibrary);
+    sl.Sort;
+    for i := sl.Count -1 downto 1 do begin
+      if sl[i] = sl[i-1] then sl.Delete(I); // remove dupes
+    end;
+    if sl.Count = 0 then begin result := ''; exit; end;
+    s := '';
+    for i := 0 to sl.Count -1 do begin
+      if sl[i] = '' then continue;
+      if i mod 8 = 7 then begin
+        s := s + #13#10;
+        setLength(s, Length(s) + Ident + 2);
+        for n := Length(s) - Ident -1 to Length(s) do
+          s[n] := ' ';
+      end;
+      if i <> 0 then s := s + ', ';
+      s := s + #39 + sl.Names[i] + #39;
+    end;
+    Result :='['+s+'], '#13#10;
+    setLength(Result, Length(Result) + Ident + 2);
+    for n := Length(Result) - Ident -1 to Length(Result) do
+      Result[n] := ' ';
+
+    s := '';
+    for i := 0 to sl.Count -1 do begin
+      if sl[i] = '' then continue;
+      if i mod 8 = 7 then begin
+        s := s + #13#10;
+        setLength(s, Length(s) + Ident + 2);
+        for n := Length(s) - Ident -1 to Length(s) do
+          s[n] := ' ';
+      end;
+      if i <> 0 then s := s + ', ';
+      if sl.Names[i] = 'TargetNamespace' then s:= s + 'TargetNamespace'
+      else if sl.Names[i] = 'Wsdl' then s := s + 'WSDLLocation'
+      else s := s + #39 + StringReplace(sl.Values[sl.Names[i]], #39, #39#39, [rfReplaceAll]) + #39;
+    end;
+    Result := Result + '['+s+']';
+  finally
+    sl.Free;
+  end;
+end;
+
+procedure TRODLToIntf.WriteAttributesMethods(anEntity: TRODLEntity);
+var
+  i: Integer;
+begin
+  with anEntity do begin
+    Write(Format('class function %s.GetAttributeCount: Integer;',[Name]));
+    Write('begin');
+    Write(Format('result := %d;', [Attributes.Count]), PASCAL_INDENTATION_LEVEL_1);
+    Write('end;');
+    WriteEmptyLine;
+
+    Write(Format('class function %s.GetAttributeName(aIndex: Integer): string;',[Name]));
+    Write('begin');
+    if Attributes.Count > 0 then begin
+      Write('case aIndex of', PASCAL_INDENTATION_LEVEL_1);
+      for i := 0 to Attributes.Count - 1 do
+        Write(Format('%d: result := %s;', [i, QuotedStr(Attributes.Names[i])]), PASCAL_INDENTATION_LEVEL_2);
+      Write('end;', PASCAL_INDENTATION_LEVEL_1);
+    end;
+    Write('end;');
+    WriteEmptyLine;
+
+    Write(Format('class function %s.GetAttributeValue(aIndex: Integer): string;',[Name]));
+    Write('begin');
+    if Attributes.Count > 0 then begin
+      Write('case aIndex of', PASCAL_INDENTATION_LEVEL_1);
+      for i := 0 to Attributes.Count - 1 do
+        Write(Format('%d: result := %s;', [i, QuotedStr(Attributes.Values[Attributes.Names[i]])]), PASCAL_INDENTATION_LEVEL_2);
+      Write('end;', PASCAL_INDENTATION_LEVEL_1);
+    end;
+    Write('end;');
+    WriteEmptyLine;
+  end;
+end;
+
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen/uRODLToPascalInvk.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen/uRODLToPascalInvk.pas
new file mode 100644
index 0000000..3050d71
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen/uRODLToPascalInvk.pas	
@@ -0,0 +1,434 @@
+unit uRODLToPascalInvk;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - CodeGen                                           }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+
+uses uRODL;
+
+type { TRODLToInvk }
+     TRODLToInvk = class(TRODLConverter)
+     private
+       fIntfUnitName : string;
+
+       procedure WriteInvokerDeclaration(const aService: TRODLService; aLibrary : TRODLLibrary);
+       procedure WriteOperationImplementation(const aService : TRODLService;
+            const anOperation : TRODLOperation;
+            aLibrary : TRODLLibrary);
+
+     protected
+       procedure IntConvert(const aLibrary : TRODLLibrary; const aTargetEntity : string = ''); override;
+
+     public
+       class function GetTargetFileName(const aLibrary : TRODLLibrary; const aTargetEntity : string = ''): string; override;
+
+     end;
+
+
+implementation
+
+uses SysUtils, uRODLGenTools, uROTypes, uROClasses, uRODLToPascalImpl, uRODLToPascalIntf, Dialogs, uRODLToPascal;
+
+{ TRODLToInvk }
+
+procedure TRODLToInvk.IntConvert(const aLibrary: TRODLLIbrary; const aTargetEntity : string = '');
+var i, k : integer;
+    s,t,actualname : string;
+begin
+  fIntfUnitName := ChangeFileExt(TRODLToIntf.GetTargetFileName(aLibrary), '');
+
+  Write(Format('unit %s;', [ChangeFileExt(GetTargetFileName(aLibrary), '')]));
+  WriteEmptyLine;
+
+  WriteLines(IntfInvkNotice);
+  WriteEmptyLine;
+
+  Write('{$I RemObjects.inc}');
+  WriteEmptyLine;
+
+  Write('interface');
+  WriteEmptyLine;
+
+  Write('uses');
+  Write('{vcl:} Classes,' ,PASCAL_INDENTATION_LEVEL_1);
+  Write('{RemObjects:} uROXMLIntf, uROServer, uROServerIntf, uROTypes, uROClientIntf,' ,PASCAL_INDENTATION_LEVEL_1);
+
+  if aLibrary.UseCount > 0 then begin
+
+    s := '';
+    t := '';
+    for i := 0 to aLibrary.UseCount-1 do begin
+
+      if aLibrary.Use[i].LoadedRodlLibraryName <> '' then
+        actualname := aLibrary.Use[i].LoadedRodlLibraryName
+      else
+        actualname := ChangeFileExt(ExtractFilename(aLibrary.Use[i].RodlFile),'');
+
+      if (Pos(actualname+'_Intf', s)<=0) then begin
+        if s <> '' then s := s+', ';
+        s := s+actualname+'_Intf';
+      end;
+
+      if (Pos(actualname+'_Invk', t)<=0) then begin
+        if t <> '' then t := t+', ';
+        t := t+actualname+'_Invk';
+      end;
+    end; { for }
+
+    if (s<>'') then begin
+      s := s+',';
+      Write('{Used RODL Intf''s:} '+s,PASCAL_INDENTATION_LEVEL_1);
+    end;
+
+    if (t<>'') then begin
+      t := t+',';
+      Write('{Used RODL Invk''s:} '+t,PASCAL_INDENTATION_LEVEL_1);
+    end;
+  end;
+
+  Write(Format('{Generated:} %s_Intf;', [aLibrary.Info.Name]),PASCAL_INDENTATION_LEVEL_1);
+  WriteEmptyLine;
+
+  if aLibrary.ServiceCount > 0 then Write('type');
+
+  with aLibrary.CalcServiceOrder() do begin
+    for i := 0 to (Count-1) do //if (not aLibrary.Services[i].IsFromUsedRodl) then
+      WriteInvokerDeclaration(Objects[i] as TRODLService, aLibrary);
+  end;
+
+  {for i := 0 to (aLibrary.ServiceCount-1) do if (not aLibrary.Services[i].IsFromUsedRodl) then
+    WriteInvokerDeclaration(aLibrary.Services[i], aLibrary); }
+
+  Write('implementation');
+  WriteEmptyLine;
+
+  //s := '';
+  {for i := 0 to (aLibrary.ServiceCount-1) do begin
+    //s := s+ChangeFileExt(TRODLToImpl.GetTargetFileName(aLibrary, aLibrary.Services[i].Info.Name),'');
+    s := s+aLibrary.Services[i].Info.Name+'_Impl';
+    if (i<aLibrary.ServiceCount-1) then s := s+', ';
+  end;}
+
+  Write('uses');
+  (*if (Trim(s)<>'')
+    then Write(Format('{RemObjects:} uRORes, %s;', [s]),PASCAL_INDENTATION_LEVEL_1)
+    else *)Write(Format('{RemObjects:} uRORes, uROClient;', []),PASCAL_INDENTATION_LEVEL_1);
+  WriteEmptyLine;
+
+  for i := 0 to (aLibrary.ServiceCount-1) do if (not aLibrary.Services[i].IsFromUsedRodl) then begin
+    //WriteInvokerHandleMessage(aLibrary.Services[i]);
+
+    if not Assigned(aLibrary.Services[i].Default) then Continue;
+
+    Write('{ T'+aLibrary.Services[i].Info.Name+'_Invoker }');
+    WriteEmptyLine;
+
+    Write('constructor T' + aLibrary.Services[i].Info.Name + '_Invoker.Create;');
+    Write('begin');
+    Write('  inherited Create;');
+    Write('  FAbstract := ' + BoolToStr(aLibrary.Services[i].Abstract,True)+';');
+    Write('end;');
+    WriteEmptyLine;
+
+    for k := 0 to (aLibrary.Services[i].Default.Count-1) do
+      WriteOperationImplementation(aLibrary.Services[i], aLibrary.Services[i].Default.Items[k], aLibrary);
+  end;
+
+  for i := 0 to (aLibrary.ServiceCount-1) do ;
+
+  Write('initialization');
+  with aLibrary.Attributes do
+    for i := 0 to Count-1 do
+      Write(Format('  RegisterServiceAttribute(''%s'',''%s'',''%s'');',['',Names[i],Values[Names[i]]]));
+  For k:=0 to aLibrary.ServiceCount -1 do
+    with aLibrary.Services[k], Attributes do
+      for i := 0 to Count-1 do
+        Write(Format('  RegisterServiceAttribute(''%s'',''%s'',''%s'');',[Name, Names[i],Values[Names[i]]]));
+  Write('end.');
+end;
+
+procedure TRODLToInvk.WriteInvokerDeclaration(const aService : TRODLService; aLibrary : TRODLLibrary);
+var i : integer;
+begin
+  if aService.Ancestor <> '' then begin
+    Write(Format('T%s_Invoker = class(T%s_Invoker)', [aService.Info.Name,aService.Ancestor]), PASCAL_INDENTATION_LEVEL_1);
+  end
+  else begin
+    Write(Format('T%s_Invoker = class(TROInvoker)', [aService.Info.Name]), PASCAL_INDENTATION_LEVEL_1);
+  end;
+  Write('private', PASCAL_INDENTATION_LEVEL_1);
+  Write('protected', PASCAL_INDENTATION_LEVEL_1);
+  Write('public', PASCAL_INDENTATION_LEVEL_1);
+  Write('  constructor Create; override;', PASCAL_INDENTATION_LEVEL_1);
+  Write('published', PASCAL_INDENTATION_LEVEL_1);
+
+  for i := 0 to (aService.Default.Count-1) do begin
+    Write(Format('procedure Invoke_%s(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);', [aService.Default.Items[i].Info.Name]), PASCAL_INDENTATION_LEVEL_2);
+  end;
+
+  Write('end;', PASCAL_INDENTATION_LEVEL_1);
+  WriteEmptyLine();
+end;
+
+procedure TRODLToInvk.WriteOperationImplementation(
+  const aService : TRODLService;
+  const anOperation: TRODLOperation; aLibrary : TRODLLibrary);
+  const resultname = 'return';
+var i : integer;
+    lHasObjectDisposer: Boolean;
+    pars, s, sa : string;
+    typname : string;
+begin
+  Write(Format('procedure T%s_Invoker.Invoke_%s(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);',
+               [aService.Info.Name, anOperation.Info.Name]));
+
+  Write(Format('{ %s }', [GetOperationDefinition(anOperation)]));
+
+  with anOperation do begin
+
+    { Determine if we need an ObjectDisposer }
+    lHasObjectDisposer := False;
+    for i := 0 to (Count-1) do with Items[i] do begin
+      if IsImplementedAsClass(DataType, aLibrary) then begin
+        lHasObjectDisposer := true;
+        break;
+      end;
+    end;
+    if Assigned(Result) and IsImplementedAsClass(Result.DataType, aLibrary) then
+      lHasObjectDisposer := true;
+
+    //ShowMessage('1');
+
+    { Write local variables }
+    if (Count>0) or Assigned(Result) or lHasObjectDisposer then Write('var');
+    for i := 0 to (Count-1) do begin
+
+      typname := GetDataType(Items[i].DataType);
+      if IsUserDefinedType(typname,aLibrary) then begin
+        typname := GetFullyQualifiedTypeName(typname,aLibrary,fIntfUnitName);
+      end;
+
+      Write(Format('%s: %s;', [Items[i].Name, typname]),PASCAL_INDENTATION_LEVEL_1);
+      if (Items[i].Flag = fInOut) and IsImplementedAsClass(Items[i].DataType, aLibrary) then
+        Write(Format('__in_%s: %s;', [Items[i].Name, typname]),PASCAL_INDENTATION_LEVEL_1);
+    end;
+
+    //ShowMessage('2');
+
+    if Assigned(Result) then begin
+      typname := GetDataType(Result.DataType);
+      if IsUserDefinedType(typname,aLibrary) then begin
+        typname := GetFullyQualifiedTypeName(typname,aLibrary,fIntfUnitName);
+      end;
+      Write(Format('lResult: %s;', [ typname]),PASCAL_INDENTATION_LEVEL_1);
+    end;
+      
+
+    if lHasObjectDisposer then
+      Write('__lObjectDisposer: TROObjectDisposer;',PASCAL_INDENTATION_LEVEL_1);
+
+{    if Assigned(Result)
+      then Write('    %s: %s;', [resultname, Result.DataType]);}
+
+    //ShowMessage('3');
+
+    Write('begin');
+    sa := GetAttributes(anOperation.Info.Attributes, aService.Info.Attributes, aLibrary.Info.Attributes, 4);
+    if sa <> '' then
+      Write('  __Message.SetAttributes(__Transport, '+sa +');');
+    
+    if (Count>0) then begin
+      for i := 0 to (Count-1) do begin
+        with Items[i] do begin
+          if IsImplementedAsClass(DataType, aLibrary) then begin
+            Write(Format('%s := nil;', [Items[i].Name]),PASCAL_INDENTATION_LEVEL_1);
+            if (Flag = fInOut) then
+              Write(Format('__in_%s := nil;', [Items[i].Name]),PASCAL_INDENTATION_LEVEL_1);
+          end;
+        end;
+      end;
+    end;
+    if Assigned(Result) then
+      if IsImplementedAsClass(Result.DataType, aLibrary) then
+        Write('lResult := nil;',PASCAL_INDENTATION_LEVEL_1);
+
+    Write('  try');
+
+    //ShowMessage('4');
+
+    for i := 0 to (Count-1) do
+      if IsInputFlag(Items[i].Flag) then begin
+
+        if (StrToDataType(Items[i].DataType)=rtDateTime)
+          then sa := '[paIsDateTime]'
+          else sa := '[]';
+
+        typname := GetDataType(Items[i].DataType);
+        if IsUserDefinedType(typname,aLibrary) then begin
+          typname := GetFullyQualifiedTypeName(typname,aLibrary,fIntfUnitName);
+        end;
+
+        Write(Format('__Message.Read(''%s'', TypeInfo(%s), %s, %s);',[Items[i].Name, typname, Items[i].Name, sa]),PASCAL_INDENTATION_LEVEL_2);
+        if (Items[i].Flag = fInOut) and IsImplementedAsClass(Items[i].DataType, aLibrary) then begin
+          Write(Format('__in_%s := %s;',[Items[i].Name, Items[i].Name]),PASCAL_INDENTATION_LEVEL_2)
+        end;
+      end;
+
+    if (Count>0) then WriteEmptyLine;
+    s := '    ';
+    if Assigned(Result) then s := s+'lResult := ';
+    s := s+Format('(__Instance as I%s).%s', [aService.Name, anOperation.Name]);
+
+    //ShowMessage('5');
+
+    if (Count>0) then begin
+      pars := '';
+      for i := 0 to (Count-1) do begin
+        if (Items[i].Flag=fResult) then Continue;
+        pars := pars+Items[i].Name+', ';
+      end;
+
+      if pars<>'' then s := s+'('+Copy(pars, 1, Length(pars)-2)+')';
+    end;
+
+    s := s+';';
+    Write(s);
+
+    WriteEmptyLine;
+(*    if anOperation.Info.Attributes.Values['OutputMessageName'] <> '' then
+      Write(Format('    __Message.InitializeResponseMessage(__Transport, ''%s'', ''%s'', ''%s'');',[aLibrary.Name, aService.Name, anOperation.Info.Attributes.Values['OutputMessageName']]))
+    else *)
+
+    Write(Format('    __Message.InitializeResponseMessage(__Transport, ''%s'', ''%s'', ''%sResponse'');',[aLibrary.Name, aService.Name, Name]));
+
+
+    //ShowMessage('6');
+
+    if Assigned(Result) then begin
+      if (StrToDataType(Result.DataType)=rtDateTime) then
+        sa := '[paIsDateTime]'
+      else
+        sa := '[]';
+
+      typname := GetDataType(Result.DataType);
+      if IsUserDefinedType(typname,aLibrary) then begin
+        typname := GetFullyQualifiedTypeName(typname,aLibrary,fIntfUnitName);
+      end;
+
+      Write(Format('    __Message.Write(''%s'', TypeInfo(%s), lResult, %s);',
+        [Result.Name, typname, sa]));
+    end;
+
+    //ShowMessage('7');
+
+    for i := 0 to (Count-1) do
+      if IsOutputFlag(Items[i].Flag) then begin
+
+        if (StrToDataType(Items[i].DataType)=rtDateTime)
+          then sa := '[paIsDateTime]'
+          else sa := '[]';
+
+        typname := GetDataType(Items[i].DataType);
+        if IsUserDefinedType(typname,aLibrary) then begin
+          typname := GetFullyQualifiedTypeName(typname,aLibrary,fIntfUnitName);
+        end;
+
+        Write(Format('    __Message.Write(''%s'', TypeInfo(%s), %s, %s);',
+          [Items[i].Name, typname, Items[i].Name, sa]));
+      end;
+
+    {if Assigned(Result) then begin
+      Write(Format('  __Message.Write(''%s'', TypeInfo(%s), @%s);', [resultname, Result.DataType, resultname]))
+    end;}
+    Write('    __Message.Finalize;');
+    if sa <> '' then
+      Write('    __Message.UnsetAttributes(__Transport);');
+    WriteEmptyLine;
+
+    if not NeedsAsyncRetrieveOperationDefinition(anOperation) then begin
+      Write('    __oResponseOptions := [roNoResponse];');
+      WriteEmptyLine;
+    end;
+
+    Write('  finally');
+
+    //ShowMessage('8');
+
+    if lHasObjectDisposer then begin
+      Write('    __lObjectDisposer := TROObjectDisposer.Create(__Instance);');
+      Write('    try');
+
+      for i := 0 to (Count-1) do with Items[i] do begin
+        if IsImplementedAsClass(DataType, aLibrary) then begin
+          if Items[i].Flag = fInOut then begin
+            Write(Format('      __lObjectDisposer.Add(__in_%s);', [Items[i].Name]));
+          end;
+          Write(Format('      __lObjectDisposer.Add(%s);', [Items[i].Name]));
+        end;
+      end;
+      if Assigned(Result) then begin
+        if IsImplementedAsClass(Result.DataType, aLibrary) then begin
+          Write('      __lObjectDisposer.Add(lResult);');
+        end;
+      end;
+
+      Write('    finally');
+      Write('      __lObjectDisposer.Free();');
+      Write('    end;');
+    end;
+    Write('  end;');
+    Write('end;');
+
+
+    { ToDo: passing an incomig reference to an out param will blow, as both will
+            be freed (so the same object si freed twice. we need to add better
+            logic to catch this:
+
+            currently
+
+              finally
+                if (Param1 <> Result) then Param1.Free;
+                Result.Free;
+              end;
+
+            better:
+
+              finally
+                if (Param1 <> Result) then Param1.Free;
+                Result.Free;
+              end;
+    }
+
+  {finally
+    if (Param1 <> Result) then Param1.Free;
+    Result.Free;
+  end;}
+
+
+
+  end;
+  WriteEmptyLine;
+end;
+
+class function TRODLToInvk.GetTargetFileName(const aLibrary: TRODLLIbrary; const aTargetEntity: string): string;
+begin
+  result := aLibrary.Name+'_Invk.pas';
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen/uRODLToWSDL.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen/uRODLToWSDL.pas
new file mode 100644
index 0000000..073f511
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen/uRODLToWSDL.pas	
@@ -0,0 +1,1045 @@
+unit uRODLToWSDL;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - CodeGen                                           }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+
+uses
+  Classes, uRODL, uROTypes, uROClasses, uROXMLSerializer;
+
+const
+
+  SOAPDataTypes : array[TRODataType] of string = (
+        'int',
+        'dateTime',
+        'double',
+        'double',
+        'string',
+        'string',
+        'long',
+        'boolean',
+        'anyType',
+        dts_base64Binary,
+        'any',
+        'string',
+        'decimal',
+        'string',
+        'dateTime',
+        '???');
+
+
+type
+  { TRODLToWSDL }
+  TRODLToWSDL = class(TRODLConverter)
+  private
+    fLocation: string;
+    fShowClientId: Boolean;
+    fUseLiteral: Boolean;
+    fUseDocument: Boolean;
+    fTargetEntity, fTargetNamespace: string;
+    fExternalTypesAsReferences: Boolean;
+    fHasXsdData: Boolean;
+    fExternalRefs, // namespace
+    fExternalUrls: TStrings; // uri
+    fXsdTns,
+    fTargetXSD: string;
+    procedure SetLocation(const Value: string);
+    function GetPrefix(const aType, aNs: string): String;
+
+    procedure WriteEnum(anEnum : TRODLEnum);
+    procedure WriteStruct(const aLibrary: TRODLLibrary; aStruct : TRODLStruct);
+    procedure WriteArray(anArray : TRODLArray);
+    procedure WriteExceptionElement(anException : TRODLException);
+
+    procedure WriteMessages(aLibrary: TRODLLibrary; aService : TRODLService);
+    procedure WriteExceptionMessage(anException: TRODLException);
+    procedure WriteLiteralParameters(aLibrary: TRODLLibrary; aService : TRODLService);
+    procedure WriteBindings(aLibrary: TRODLLibrary; aService : TRODLService);
+    procedure WritePorts(aLibrary: TRODLLibrary; aService : TRODLService);
+    procedure WriteExceptionParts(aMeth: TRODLOperation);
+    procedure WriteService(aLibrary: TRODLLibrary; aService : TRODLService);
+    function GetAnchestor(aLibrary: TRODLLibrary;
+      aService: TRODLService): TRODLService;
+    procedure WriteAnnotation(aDocString: string; aIndentation: Integer = 0; aNs:
+        string = 'xs:');
+    procedure WriteDocumentation(aDocString: string; aIndentation: Integer = 0;
+        aNs: string = 'xs:');
+    function ExtSOAPDataType(aLibrary: TRODLLibrary; const aDataTypeName : string) : string;
+    procedure ResolveExternalReferences(aLibrary: TRODLLibrary);
+    function ReplaceSpecialChars(aText: String): String;
+  protected
+    procedure IntConvert(const aLibrary : TRODLLibrary; const aTargetEntity : string = ''); override;
+    procedure AddExternal(aNode: TRODLEntity); overload;
+    procedure AddExternal(const aNs,aUrl: string); overload;
+
+  public
+    constructor Create(const aLibraryFile: string; const aTargetEntity: string = ''); overload; override;
+    constructor Create(const aLibrary: TRODLLibrary; const aTargetEntity: string = ''); overload; override;
+    destructor Destroy; override;
+    property TargetXsd: string read fTargetXSD write fTargetXSD;
+    property Location : string read fLocation write SetLocation;
+    property TargetNamespace: string read fTargetNamespace write fTargetNamespace;
+    property ShowClientId : Boolean read fShowClientId write fShowClientId;
+    property UseLiteral : Boolean read fUseLiteral write fUseLiteral;
+    property UseDocument : Boolean read fUseDocument write fUseDocument;
+    property ExternalTypesAsReferences : Boolean read fExternalTypesAsReferences write fExternalTypesAsReferences;
+  end;
+
+function SOAPDataType(const aDataTypeName : string; IncludeNamespace : boolean = TRUE) : string;
+
+implementation
+
+uses SysUtils;
+
+function SOAPDataType(const aDataTypeName : string; IncludeNamespace : boolean = TRUE) : string;
+var dt : TRODataType;
+begin
+  dt := StrToDataType(aDataTypeName);
+  if (dt=rtUserDefined)
+    then result := aDataTypeName
+    else result := SOAPDataTypes[dt];
+
+  if IncludeNamespace then begin
+    if (dt=rtUserDefined) then result := 'tns:'+result
+                          else result := ns_Standard+':'+result;
+  end;
+end;
+
+{ TRODLToWSDL }
+
+const
+  definitions_ns : array[0..5] of string = ('xmlns:wsdl="http://schemas.xmlsoap.org/wsdl/" ',
+                                            'xmlns:xs="http://www.w3.org/2001/XMLSchema" ',
+                                            'name="%s" ',
+                                            'xmlns:soap="http://schemas.xmlsoap.org/wsdl/soap/" ',
+                                            'xmlns:soapenc="http://schemas.xmlsoap.org/soap/encoding/" ',
+                                            'xmlns:mime="http://schemas.xmlsoap.org/wsdl/mime/"');
+
+procedure TRODLToWSDL.IntConvert(const aLibrary: TRODLLibrary; const aTargetEntity: string);
+var
+  s, i: integer;
+  lService: TRODLService;
+begin
+  if pos(':', fTargetNamespace) = 0 then fTargetNamespace := 'urn:'+fTargetNamespace;
+  fTargetEntity := aTargetEntity;
+  with aLibrary do begin
+    if (aTargetEntity<>'') then begin
+        lService := aLibrary.FindService(aTargetEntity);
+        if (lService <> nil) then
+          if lService.isPrivate then Exit;
+      end else
+        lService := NIL;
+    fExternalRefs.Clear;
+	fExternalUrls.Clear;
+    fXsdTns := '';
+    if fExternalTypesAsReferences then begin
+      ResolveExternalReferences(aLibrary);
+    end;
+    if fXsdTns = '' then
+      fXsdTns := fTargetNamespace;
+
+
+
+    Write('<?xml version="1.0" encoding="UTF-8" ?>');
+    if fTargetXSD <> '' then begin
+      if not fHasXsdData then raise Exception.Create('No xsd by that name');
+      Write('<xs:schema xmlns:xs="http://www.w3.org/2001/XMLSchema" xmlns="'+ fXsdTns +'"');
+      Write('targetNamespace="'+fXsdTns+'" elementFormDefault="qualified"', 3);
+      Write('xmlns:tns="'+ fXsdTns +'" ', 3);
+      for i := 0 to fExternalRefs.Count -1 do begin
+        if fExternalRefs[i] <> fXsdTns then
+          write('xmlns:ns'+IntToStr(i)+'="'+fExternalRefs[i]+'" ', 3);
+      end;
+      Write('>');
+
+
+    end else begin
+      Write('<wsdl:definitions ');
+
+      for i := 0 to High(definitions_ns) do
+          Write(Format(definitions_ns[i], [Name]), 3);
+
+      Write('targetNamespace="'+ fTargetNamespace +'" ', 3);
+      Write('xmlns:tns="'+ fTargetNamespace +'" ', 3);
+
+      for i := 0 to fExternalRefs.Count -1 do begin
+        write('xmlns:ns'+IntToStr(i)+'="'+fExternalRefs[i]+'" ', 3);
+      end;
+
+      Write('>');
+      WriteAnnotation(aLibrary.Documentation); {Giovanni}
+
+
+      // Write types
+
+      Write('<wsdl:types>', 3);
+      Write(Format('<xs:schema targetNamespace="%s" elementFormDefault="qualified">', [fTargetNamespace]), 6);
+    end;
+
+    for i := 0 to fExternalRefs.Count -1 do begin
+      if ((fTargetXSD ='') and (fExternalRefs[i] = fTargetNamespace)) or
+        ((fTargetXSD <> '') and (fExternalRefs[i] = fXsdTns)) then
+        Write(Format('<xs:include schemaLocation="%s?xsd=%s" />',[flocation, fExternalUrls[i]] ), 3)
+      else
+        Write(Format('<xs:import namespace="%s" schemaLocation="%s?xsd=%s" />',[fExternalRefs[i], fLocation, fExternalUrls[i]] ), 3);
+    end;
+
+    for i := 0 to (EnumCount-1) do WriteEnum(Enums[i]);
+    for i := 0 to (StructCount-1) do WriteStruct(aLibrary, Structs[i]);
+    for i := 0 to (ArrayCount-1) do WriteArray(Arrays[i]);
+    for i := 0 to (ExceptionCount-1) do WriteExceptionElement(Exceptions[i]);
+    if fUseLiteral and fUseDocument then begin
+      if (aTargetEntity<>'') then WriteLiteralParameters(aLibrary, lService)
+      else for s := 0 to (ServiceCount-1) do begin
+        lService := Services[s];
+        WriteLiteralParameters(aLibrary, lService);
+      end;
+      if fShowClientId then begin
+        Write('<xs:element name="ROClientIDHeader">', 3);
+        Write('<xs:complexType>', 6);
+        Write('<xs:sequence>', 9);
+        Write('<xs:element name="ID" minOccurs="0" maxOccurs="1" type="xs:string" />', 6);
+        Write('</xs:sequence>', 9);
+        Write('</xs:complexType>', 6);
+        Write('</xs:element>', 3);
+      end;
+    end;
+    Write('</xs:schema>', 6);
+    if fTargetXSD = '' then begin
+      Write('</wsdl:types>', 3);
+
+      // Writes messages
+      if (aTargetEntity<>'') then WriteMessages(aLibrary, lService)
+      else for s := 0 to (ServiceCount-1) do begin
+        lService := Services[s];
+        WriteMessages(aLibrary, lService);
+      end;
+      for s := 0 to aLibrary.ExceptionCount -1 do begin
+        WriteExceptionMessage(aLibrary.Exceptions[s]);
+      end;
+      if fShowClientId and fUseLiteral and fUseDocument then begin
+        Write('<wsdl:message name="ROClientIDHeaderMessage">', 3);
+        Write('<wsdl:part name="ROClientID" element="tns:ROClientIDHeader" />', 3);
+        Write('</wsdl:message>', 3);
+      end;
+
+      // Writes port and operations
+      if (aTargetEntity<>'') then WritePorts(aLibrary, lService)
+      else for s := 0 to (ServiceCount-1) do begin
+        lService := Services[s];
+        WritePorts(aLibrary, lService);
+      end;
+
+      // Write bindings
+      if (aTargetEntity<>'') then WriteBindings(aLibrary, lService)
+      else for s := 0 to (ServiceCount-1) do begin
+        lService := Services[s];
+        WriteBindings(aLibrary, lService);
+      end;
+
+      // Writes services
+      if (aTargetEntity<>'') then WriteService(aLibrary, lService)
+      else for s := 0 to (ServiceCount-1) do begin
+        lService := Services[s];
+        WriteService(aLibrary, lService);
+      end;
+
+      Write('</wsdl:definitions>');
+    end;
+  end;
+end;
+
+procedure TRODLToWSDL.SetLocation(const Value: string);
+begin
+  fLocation := Value;
+end;
+
+procedure TRODLToWSDL.WriteArray(anArray: TRODLArray);
+var
+  lMin,
+  lMax: Integer;
+begin
+  if fExternalTypesAsReferences and (anArray.Attributes.Values['ImportedFromUrl'] <> fTargetXSD) then exit;
+  Write(Format('<xs:complexType name="%s">', [anArray.Name]), 9);
+  WriteAnnotation(anArray.Documentation, 9);
+
+  if fUseDocument then begin
+    Write('<xs:sequence>', 12);
+
+    lMax := StrToIntDef(anArray.Attributes.Values['MaxOccurs'], -1);
+    lMin := StrToIntDef(anArray.Attributes.Values['MinOccurs'], 0);
+
+    if lMax = -1 then begin
+      Write(Format('<xs:element name="%s" minOccurs="%d" maxOccurs="unbounded" type="%s" />', [Unprefix(SOAPDataType(anArray.ElementType, false)),
+        lMin,
+        ExtSOAPDataType(anArray.OwnerLibrary, anArray.ElementType)]), 15);
+    end else begin
+    Write(Format('<xs:element name="%s" minOccurs="%d" maxOccurs="%d" type="%s" />', [Unprefix(SOAPDataType(anArray.ElementType, false)),
+      lMin,
+      lMax,
+      ExtSOAPDataType(anArray.OwnerLibrary, anArray.ElementType)]), 15);
+    end;
+    Write('</xs:sequence>', 12);
+  end else begin
+    Write('<xs:complexContent>', 12);
+    Write('<xs:restriction base="soapenc:Array">', 15);
+    Write('<xs:sequence />', 18);
+    Write(Format('<xs:attribute ref="soapenc:arrayType" n1:arrayType="%s[]" xmlns:n1="http://schemas.xmlsoap.org/wsdl/" />',
+            [Unprefix(ExtSOAPDataType(anArray.OwnerLibrary, anArray.ElementType))]), 18);
+    Write('</xs:restriction>', 15);
+
+    Write('</xs:complexContent>', 12);
+
+  end;
+  Write('</xs:complexType>', 9);
+end;
+
+procedure TRODLToWSDL.WriteEnum(anEnum: TRODLEnum);
+var i : integer;
+begin
+  if fExternalTypesAsReferences and (anEnum.Attributes.Values['ImportedFromUrl'] <> fTargetXSD) then exit;
+  Write(Format('<xs:simpleType name="%s">', [anEnum.Name]), 9);
+  WriteAnnotation(anEnum.Documentation, 12); {Giovanni}
+  Write('<xs:restriction base="xs:string">', 12);
+  for i := 0 to anEnum.Count-1 do
+  begin
+    //WriteDocumentation(anEnum.Items[i].Documentation, 12); {Giovanni}
+    Write(Format('<xs:enumeration value="%s" />', [Unprefix(anEnum.Items[i].Name)]), 15);
+  end;
+  Write('</xs:restriction>', 12);
+  Write('</xs:simpleType>', 9);
+end;
+
+function TRODLToWSDL.GetAnchestor(aLibrary: TRODLLibrary; aService: TRODLService): TRODLService;
+begin
+  result := NIL;
+  if (aService.Ancestor<>'') and not aService.isPrivate
+    then result := aLibrary.FindService(aService.Ancestor)
+end;
+
+procedure TRODLToWSDL.WriteMessages(aLibrary: TRODLLibrary; aService: TRODLService);
+var o, p : integer;
+    dups : TStringList;
+    lRet: TRODLStruct;
+    lType, s, svcname, mtdname : string;
+    op : TRODLOperation;
+begin
+  // Writes all the methods of this service and its anchestors.
+  // If more than one service descend from the same base one, the WSDL has to be generated
+  // using a format like this: http://localhost:8099/SOAP?Service=ServiceOne
+
+  svcname := aService.Name;
+  dups := TStringList.Create;
+  dups.Duplicates := dupIgnore;
+  dups.Sorted := TRUE;
+  try
+    while Assigned(aService) and not aService.isPrivate do begin
+
+      with aService.Default do begin
+        for o := 0 to (Count-1) do begin
+          op := Items[o];
+
+          // If a method with this name is present, it skips it
+          mtdname := UpperCase(op.Name);
+          if (dups.IndexOf(mtdname)>=0) then Continue else dups.Add(mtdname);
+
+          if fUseLiteral and fUseDocument then begin
+               Write(Format('<wsdl:message name="%s___%sRequest">', [Unprefix(svcname), Unprefix(op.Name)]), 3);
+               s := op.Attributes.Values['SOAPInputNameOverride'];
+               if s = '' then s := Format('%s___%s', [svcname, op.Name]);
+               Write(Format('<wsdl:part name="parameters" element="tns:%s" />', [s]), 6);
+               Write('</wsdl:message>', 3);
+               Write(Format('<wsdl:message name="%s___%sResponse">', [Unprefix(svcname), Unprefix(op.Name)]), 3);
+               s := op.Attributes.Values['SOAPOutputNameOverride'];
+               if s = '' then s := Format('%s___%sResponse', [svcname, op.Name]);
+               Write(Format('<wsdl:part name="parameters" element="tns:%s" />', [s]), 6);
+               Write('</wsdl:message>', 3);
+          end 
+          else begin
+          // Continues
+          with Items[o] do begin
+             // Request
+             Write(Format('<wsdl:message name="%s___%sRequest">', [Unprefix(svcname), Unprefix(op.Name)]), 3);
+             for p := 0 to (Count-1) do
+               if IsInputFlag(Items[p].Flag) then begin
+                 lType := Items[p].DataType;
+                 lRet := aLibrary.FindStruct(lType);
+                 if (lRet <> nil) and (lRet.Count = 1) and (lRet.Attributes.Values['Anonymous'] = '1') then
+                   lType := lRet.Items[0].DataType;
+
+                 Write(Format('<wsdl:part name="%s" type="%s" />', [Unprefix(Items[p].Name), ExtSOAPDataType(aLibrary, lType)]), 6);
+               end;
+             Write('</wsdl:message>', 3);
+
+             // Response
+             Write(Format('<wsdl:message name="%s___%sResponse">', [Unprefix(svcname), Unprefix(op.Name)]), 3);
+
+             if Assigned(aService.Default.Items[o].Result) then begin
+                lType := op.Result.DataType;
+                 lRet := aLibrary.FindStruct(lType);
+                 if (lRet <> nil) and (lRet.Count = 1) and (lRet.Attributes.Values['Anonymous'] = '1') then
+                   lType := lRet.Items[0].DataType;
+                 Write(Format('<wsdl:part name="%s" type="%s" />', [Unprefix(op.Result.Name), ExtSOAPDataType(aLibrary, lType)]), 6);
+             end;
+                 //Write(Format('<part name="return" type="%s" />', [SOAPDataType(aService.Default.Items[o].Result.DataType)]), 6);
+
+             for p := 0 to (Count-1) do begin
+               if Items[p].Flag in [fOut, fInOut] then begin
+                 lType := Items[p].DataType;
+                                  lRet := aLibrary.FindStruct(lType);
+                 if (lRet <> nil) and (lRet.Count = 1) and (lRet.Attributes.Values['Anonymous'] = '1') then
+                   lType := lRet.Items[0].DataType;
+
+                 Write(Format('<wsdl:part name="%s" type="%s" />', [Unprefix(Items[p].Name), ExtSOAPDataType(aLibrary, lType)]), 6);
+               end;
+             end;
+             Write('</wsdl:message>', 3);
+          end;
+      end;
+        end;
+      end;
+      aService := GetAnchestor(aLibrary, aService);
+    end;
+  finally
+    dups.Free;
+  end;
+end;
+
+procedure TRODLToWSDL.WritePorts(aLibrary: TRODLLibrary; aService: TRODLService);
+var o : integer;
+svcname: string;
+begin
+  // Writes a port for each method of this service and its anchestors.
+  // Refer to the comment in TRODLToWSDL.WriteMessages
+  if aService.isPrivate then Exit;
+  svcname := aService.Name;
+  Write(Format('<wsdl:portType name="%s">', [Unprefix(svcname)]), 3);
+  WriteDocumentation(aService.Documentation, 6, 'wsdl:');
+  while Assigned(aService) and not aService.isPrivate  do begin
+
+    for o := 0 to (aService.Default.Count-1) do begin
+      with aService.Default.Items[o] do begin
+        Write(Format('<wsdl:operation name="%s">', [Unprefix(Name)]), 6);
+        WriteDocumentation(Documentation, 6, 'wsdl:'); {Giovanni}
+        Write(Format('<wsdl:input message="tns:%s___%sRequest" />', [Unprefix(svcname), Unprefix(Name)]), 9);
+        Write(Format('<wsdl:output message="tns:%s___%sResponse" />', [Unprefix(svcname), Unprefix(Name)]), 9);
+        WriteExceptionParts(aService.Default.Items[o]);
+        Write(Format('</wsdl:operation>', [Name]), 6)
+      end;
+    end;
+
+    aService := GetAnchestor(aLibrary, aService);
+  end;
+  Write('</wsdl:portType>', 3);
+end;
+
+procedure TRODLToWSDL.WriteBindings(aLibrary: TRODLLibrary; aService: TRODLService);
+var o : integer;
+    lAct, svcname : string;
+begin
+  // Write all the bindings for this service and its anchestors using the method names.
+  // It's important to notice that we NEVER use the anchestor name when composing the SOAPAction, but
+  // always use the final service name
+  if aService.isPrivate then Exit;
+  svcname := aService.Name;
+
+  Write(Format('<wsdl:binding name="%sBinding" type="tns:%s">', [Unprefix(svcname), Unprefix(svcname)]), 3);
+  WriteAnnotation(aService.Documentation, 6); {Giovanni}
+  if fUseDocument then
+    Write('<soap:binding transport="http://schemas.xmlsoap.org/soap/http" />', 6)
+  else
+    Write('<soap:binding style="rpc" transport="http://schemas.xmlsoap.org/soap/http" />', 6);
+
+  while Assigned(aService) and not aService.isPrivate do begin
+
+    for o := 0 to (aService.Default.Count-1) do begin
+      with aService.Default.Items[o] do begin
+        lAct := Attributes.Values['Action'];
+        Write(Format('<wsdl:operation name="%s">', [Unprefix(Name)]), 9);
+        if lAct <> '' then begin
+          if pos(':', lAct) = 0 then lAct := 'urn:'+lAct;
+          if fUseDocument then
+            Write(Format('<soap:operation soapAction="%s" style="document" />', [lAct]),12)
+          else
+            Write(Format('<soap:operation soapAction="%s" style="rpc" />', [lAct]),12);
+        end else begin
+          if fUseDocument then
+            Write(Format('<soap:operation soapAction="urn:%s-%s#%s" style="document" />', [aLibrary.Name, Unprefix(svcname), Unprefix(Name)]),12)
+          else
+            Write(Format('<soap:operation soapAction="urn:%s-%s#%s" style="rpc" />', [aLibrary.Name, Unprefix(svcname), Unprefix(Name)]),12);
+        end;
+        if fUseLiteral then begin
+          Write('<wsdl:input>', 12);
+          Write('<soap:body use="literal" />', 15);
+          if fShowClientId and fUseDocument then
+            write('<soap:header message="tns:ROClientIDHeaderMessage" use="literal" part="ROClientID" />', 15);
+          Write('</wsdl:input>', 12);
+
+          Write('<wsdl:output>', 12);
+          Write('<soap:body use="literal" />', 15);
+          if fShowClientId and fUseDocument then
+            write('<soap:header message="tns:ROClientIDHeaderMessage" use="literal" part="ROClientID" />', 15);
+          Write('</wsdl:output>', 12);
+        end
+        else begin
+        Write('<wsdl:input>', 12);
+        Write(Format('<soap:body use="encoded" '+
+                     'encodingStyle="http://schemas.xmlsoap.org/soap/encoding/" '+
+                     'namespace="urn:%s-%s" />',
+              [Unprefix(aLibrary.Name), Unprefix(svcname)]), 15);
+        Write('</wsdl:input>', 12);
+
+        Write('<wsdl:output>', 12);
+        Write(Format('<soap:body use="encoded" '+
+                     'encodingStyle="http://schemas.xmlsoap.org/soap/encoding/" '+
+                     'namespace="urn:%s-%s" />',
+              [Unprefix(aLibrary.Name), Unprefix(svcname)]), 15);
+        Write('</wsdl:output>', 12);
+        end;
+
+        Write('</wsdl:operation>', 9);
+      end;
+    end;
+
+    aService := GetAnchestor(aLibrary, aService);
+  end;
+
+  Write('</wsdl:binding>', 3);
+end;
+
+
+procedure TRODLToWSDL.WriteAnnotation(aDocString: string; aIndentation: Integer
+    = 0; aNs: string = 'xs:');
+begin
+  if Trim(aDocString) = '' then exit;
+  Write(Format('<%sannotation>',[aNs]), aIndentation);
+  WriteDocumentation(aDocString,aIndentation+3, aNs);
+  Write(Format('</%sannotation>',[aNs]), aIndentation);
+end;
+
+
+procedure TRODLToWSDL.WriteDocumentation(aDocString: string; aIndentation:
+    Integer = 0; aNs: string = 'xs:');
+var lDocString: String;
+begin
+  lDocString := ReplaceSpecialChars(aDocString);
+  if Trim(aDocString) = '' then exit;
+  Write(Format('<%sdocumentation>',[aNs]), aIndentation);
+  Write(Format('%s', [lDocString]),aIndentation);
+  Write(Format('</%sdocumentation>',[aNs]), aIndentation);
+end;
+
+procedure TRODLToWSDL.WriteService(aLibrary: TRODLLibrary; aService: TRODLService);
+begin
+  // We only write the service itself, ignoring the anchestors
+  if aService.isPrivate then Exit;
+  Write(Format('<wsdl:service name="%s">', [Unprefix(aService.Name)]), 3);
+  WriteAnnotation(aService.Default.Documentation, 6);
+
+  while Assigned(aService) and not aService.isPrivate  do begin
+    Write(Format('<wsdl:port name="%sPort" binding="tns:%sBinding">',
+                 [Unprefix(aService.Name), Unprefix(aService.Name)]), 6);
+    Write(Format('<soap:address location="%s" />', [fLocation+'?service='+StringReplace(aService.Name,' ', '+', [rfReplaceAll])]), 9);
+    Write('</wsdl:port>', 6);
+
+    aService := NIL;//GetAnchestor(aLibrary, aService);
+  end;
+
+  Write('</wsdl:service>',3);
+end;
+
+procedure TRODLToWSDL.WriteStruct(const aLibrary: TRODLLibrary; aStruct: TRODLStruct);
+var
+  i : integer;
+  lLax: Boolean;
+  lRet: TRODLStruct;
+begin
+  if fExternalTypesAsReferences and (aStruct.Attributes.Values['ImportedFromUrl'] <> fTargetXSD) then exit;
+  if  aStruct.Attributes.Values['Anonymous'] = '1' then exit;
+  Write(Format('<xs:complexType name="%s">', [Unprefix(aStruct.Name)]), 9);
+  WriteAnnotation(aStruct.Documentation, 9); {Giovanni}
+  if fUseDocument then begin
+    if aStruct.Ancestor <> '' then begin
+      write(Format('<xs:complexContent><xs:extension base="%s">', [ExtSOAPDataType(aLibrary, aStruct.Ancestor)]), 9);
+    end;
+  end;
+  Write('<xs:sequence>', 12);
+  lLax := aStruct.Attributes.Values['lax'] = '1';
+  while Assigned(aStruct) do begin
+    for i := 0 to aStruct.Count-1 do
+      with aStruct.Items[i] do begin
+        lRet := aLibrary.FindStruct(DataType);
+        if (lRet <> nil) and (lRet.Count = 1) and (lRet.Attributes.Values['Anonymous'] = '1') then begin
+          if lRet.Attributes.Values['Nillable'] = '1' then
+            Write(Format('<xs:element name="%s" type="%s" nillable="1">', [Unprefix(Name), ExtSOAPDataType(aLibrary, lRet.Items[0].DataType)]), 15)
+          else
+            Write(Format('<xs:element name="%s" type="%s" minOccurs="0" maxOccurs="1">', [Unprefix(Name), ExtSOAPDataType(aLibrary, lRet.Items[0].DataType)]), 15);
+        end else begin
+          Write(Format('<xs:element name="%s" type="%s">', [Unprefix(Name), ExtSOAPDataType(aLibrary, DataType)]), 15);
+        end;
+        WriteAnnotation(Documentation, 15); {Giovanni}
+        Write('</xs:element>',15);
+      end;
+
+    if fUseDocument then break;
+    if aStruct.Ancestor <> '' then begin
+      aStruct := aLibrary.FindStruct(aStruct.Ancestor)
+    end
+    else begin
+      aStruct := nil;
+    end;
+  end;
+  if lLax then
+    Write('<xs:any namespace="##any" processContents="lax"/>', 15);
+  Write('</xs:sequence>', 12);
+  if fUseDocument then begin
+    if aStruct.Ancestor <> '' then
+      write('</xs:extension></xs:complexContent>', 9);
+  end;
+
+  Write('</xs:complexType>', 9);
+end;
+
+procedure TRODLToWSDL.WriteLiteralParameters(aLibrary: TRODLLibrary;
+  aService: TRODLService);
+var o, p, i : integer;
+    dups : TStringList;
+    s, svcname, mtdname : string;
+    op : TRODLOperation;
+    lRet: TRODLStruct;
+begin
+  // Writes all the methods of this service and its anchestors.
+  // If more than one service descend from the same base one, the WSDL has to be generated
+  // using a format like this: http://localhost:8099/SOAP?Service=ServiceOne
+
+  svcname := aService.Name;
+  dups := TStringList.Create;
+  dups.Duplicates := dupIgnore;
+  dups.Sorted := TRUE;
+  try
+    while Assigned(aService) and not aService.isPrivate do begin
+
+      for o := 0 to (aService.Default.Count-1) do begin
+        op := aService.Default.Items[o];
+
+        // If a method with this name is present, it skips it
+        mtdname := UpperCase(op.Name);
+        if (dups.IndexOf(mtdname)>=0) then Continue else dups.Add(mtdname);
+
+        s := op.Attributes.Values['SOAPInputNameOverride'];
+        if s = '' then s := Format('%s___%s', [Unprefix(svcname), Unprefix(op.Name)]);
+
+        if not ((fExternalTypesAsReferences) and (op.Attributes.Values['InputImportedFromUrl'] <> fTargetXSD)) then begin
+          p := 0;
+          for i := 0 to op.Count -1 do begin
+            if op[i].Flag in [fIn, fInOut] then
+              inc(p);
+          end;
+          write(Format('<xs:element name="%s">', [Unprefix(s)]), 3);
+          if p = 0 then begin
+            write('<xs:complexType />', 6);
+          end
+          else begin
+            write('<xs:complexType>', 6);
+            write('<xs:sequence>', 9);
+            for i := 0 to op.Count -1 do begin
+              if op[i].Flag in [fIn, fInOut] then begin
+                lRet := aLibrary.FindStruct(op[i].DataType);
+                if (lRet <> nil) and (lRet.Count = 1) and (lRet.Attributes.Values['Anonymous'] = '1') then begin
+                  if lRet.Attributes.Values['Nillable'] = '1' then
+                    write(Format('<xs:element name="%s" nillable="1" type="%s" />', [Unprefix(op[i].Name), ExtSOAPDataType(aLibrary, lRet[0].DataType)]), 12)
+                  else
+                    write(Format('<xs:element name="%s" minOccurs="0" maxOccurs="1" type="%s" />', [Unprefix(op[i].Name), ExtSOAPDataType(aLibrary, lRet[0].DataType)]), 12);
+                end else
+
+                write(Format('<xs:element name="%s" minOccurs="1" maxOccurs="1" type="%s" />', [Unprefix(op[i].Name), ExtSOAPDataType(aLibrary, op[i].DataType)]), 12);
+              end;
+            end;
+          if op.Attributes.VAlues['InputLax'] = '1' then
+            Write('<xs:any namespace="##any" processContents="lax"/>', 12);
+            write('</xs:sequence>', 9);
+            write('</xs:complexType>', 6);
+          end;
+
+          write('</xs:element>', 3);
+        end;
+
+        s := op.Attributes.Values['SOAPOutputNameOverride'];
+        if s = '' then s := Format('%s___%sResponse', [Unprefix(svcname), Unprefix(op.Name)]);
+        if not ((fExternalTypesAsReferences) and (op.Attributes.Values['OutputImportedFromUrl'] <> fTargetXSD)) then begin
+          p := 0;
+          for i := 0 to op.Count -1 do begin
+            if op[i].Flag in [fOut, fInOut, fResult] then
+              inc(p);
+          end;
+          if op.Result <> nil then begin
+            inc(p);
+          end;
+          write(Format('<xs:element name="%s">', [Unprefix(s)]), 3);
+          if p = 0 then begin
+            write('<xs:complexType />', 6);
+          end
+          else begin
+            write('<xs:complexType>', 6);
+            write('<xs:sequence>', 9);
+            if op.Result <> nil then begin
+                lRet := aLibrary.FindStruct(op.Result.DataType);
+                if (lRet <> nil) and (lRet.Count = 1) and (lRet.Attributes.Values['Anonymous'] = '1') then begin
+                  if lRet.Attributes.Values['Nillable'] = '1' then
+                    write(Format('<xs:element name="%s" nillable="1" type="%s" />', [Unprefix(op.Result.Name), ExtSOAPDataType(aLibrary, lRet[0].DataType)]), 12)
+                  else
+                    write(Format('<xs:element name="%s" minOccurs="0" maxOccurs="1" type="%s" />', [Unprefix(op.Result.Name), ExtSOAPDataType(aLibrary, lRet[0].DataType)]), 12);
+                end else
+                  write(Format('<xs:element name="%s" minOccurs="1" maxOccurs="1" type="%s" />', [Unprefix(op.Result.Name), ExtSOAPDataType(aLibrary, op.Result.DataType)]), 12);
+            end;
+            for i := 0 to op.Count -1 do begin
+              if op[i].Flag in [fOut, fInOut, fResult] then begin
+                lRet := aLibrary.FindStruct(op[i].DataType);
+                if (lRet <> nil) and (lRet.Count = 1) and (lRet.Attributes.Values['Anonymous'] = '1') then begin
+                  if lRet.Attributes.Values['Nillable'] = '1' then
+                    write(Format('<xs:element name="%s" nillable="1" type="%s" />', [Unprefix(op[i].Name), ExtSOAPDataType(aLibrary, lRet[0].DataType)]), 12)
+                  else
+                    write(Format('<xs:element name="%s" minOccurs="0" maxOccurs="1" type="%s" />', [Unprefix(op[i].Name), ExtSOAPDataType(aLibrary, lRet[0].DataType)]), 12);
+                end else
+                  write(Format('<xs:element name="%s" minOccurs="1" maxOccurs="1" type="%s" />', [Unprefix(op[i].Name), ExtSOAPDataType(aLibrary, op[i].DataType)]), 12);
+              end;
+            end;
+          if op.Attributes.VAlues['OutputLax'] = '1' then
+            Write('<xs:any namespace="##any" processContents="lax"/>', 12);
+            write('</xs:sequence>', 9);
+            write('</xs:complexType>', 6);
+          end;
+          write('</xs:element>', 3);
+        end;
+      end;
+      aService := GetAnchestor(aLibrary, aService);
+    end;
+  finally
+    dups.Free;
+  end;
+end;
+
+constructor TRODLToWSDL.Create(const aLibraryFile, aTargetEntity: string);
+begin
+  fTargetNamespace := 'http://tempuri.org/';
+  fExternalRefs := TStringList.Create;
+  fExternalUrls := TStringList.Create;
+  inherited;
+end;
+
+constructor TRODLToWSDL.Create(const aLibrary: TRODLLibrary;
+  const aTargetEntity: string);
+begin
+  fTargetNamespace := 'http://tempuri.org/';
+  fExternalRefs := TStringList.Create;
+  fExternalUrls := TStringList.Create;
+  inherited;
+end;
+
+destructor TRODLToWSDL.Destroy;
+begin
+  fExternalRefs.Free;
+  fExternalUrls.Free;
+  inherited;
+end;
+
+procedure TRODLToWSDL.AddExternal(aNode: TRODLEntity);
+var
+  lEx: TRODLException;
+begin
+  if Anode = nil then exit;
+  if aNode is TRODLException then begin
+    lEx := TRODLException(aNode);
+    if (fTargetXSD = '') or (fTargetXSD <> lEx.Attributes.Values['ElementUrl']) then
+      AddExternal(lEx.Attributes.Values['ElementNamespace'], lEx.Attributes.Values['ElementUrl']);
+    exit;
+  end;
+  if aNode.Attributes.Values['ImportedFromUrl'] = '' then exit;
+  AddExternal(aNode.Attributes.Values['ImportedFromNamespace'], aNode.Attributes.Values['ImportedFromUrl']);
+end;
+
+procedure TRODLToWSDL.AddExternal(const aNs,aUrl: string);
+var
+  i: Integer;
+begin
+  for i := 0 to fExternalRefs.Count -1 do begin
+    if (fExternalRefs[i] = aNs) and (fExternalUrls[i] = aUrl) then exit;
+  end;
+  fExternalRefs.Add(aNs);
+  fExternalUrls.ADd(aUrl);
+end;
+
+
+function TRODLToWSDL.ExtSOAPDataType(aLibrary: TRODLLibrary; const aDataTypeName: string): string;
+var
+  el: TRODLEntity;
+begin
+  if fExternalTypesAsReferences then begin
+    el := aLibrary.FindStruct(aDataTypeName);
+    if el = nil then
+      el := aLibrary.FindException(aDataTypeName);
+    if el = nil then
+      el := aLibrary.FindEnum(aDataTypeName);
+    if el = nil then
+      el := aLibrary.FindArray(aDataTypeName);
+    if el <> nil then begin
+      if (el.Attributes.values['ElementNamespace'] <> '') and (fXsdTns <> el.Attributes.values['ElementNamespace']) then begin
+        result := 'ns'+IntToStr(fExternalRefs.IndexOf(el.Attributes.values['ElementNamespace']))+':'+Unprefix(aDataTypeName);
+        exit;
+      end;
+      if (el.Attributes.values['ImportedFromNamespace'] <> '') and (fXsdTns <> el.Attributes.values['ImportedFromNamespace']) then begin
+        result := 'ns'+IntToStr(fExternalRefs.IndexOf(el.Attributes.values['ImportedFromNamespace']))+':'+Unprefix(aDataTypeName);
+        exit;
+      end;
+    end;
+  end;
+
+  result := SOAPDataType(Unprefix(aDataTypeName), True);
+end;
+
+procedure TRODLToWSDL.ResolveExternalReferences(aLibrary: TRODLLibrary);
+var
+  i, j, k: Integer;
+  lIsTarget: Boolean;
+  lServ: TRODLService;
+  lStr: TRODLStruct;
+  lEx: TRODLException;
+  lEl: TRODLEntity;
+
+  lOp: TRODLOperation;
+  lList: TList;
+
+begin
+  lList := TList.Create;
+  try
+    // assume only 1 of fTargetEntity/fTargetXsd is set
+    for i := 0 to aLibrary.ExceptionCount  -1 do begin
+      lEx := aLibrary.Exceptions[i];
+      if (lEx.Attributes.Values['ElementUrl'] = fTargetXSD) and (lEx.Count = 1) then begin
+        fHasXsdData := true;
+        if (fXsdTns = '') and (lEx.Attributes.Values['ElementNamespace'] <> '') then
+          fXsdTns := lEx.Attributes.Values['ElementNamespace'];
+        lEl := aLibrary.ItemByName(lEx.Items[0].DataType);
+        if (lEl <> nil) and (lEl.Attributes.Values['ImportedFromUrl'] <> fTargetXSD) then
+        AddExternal(lEl);
+        lEl := aLibrary.ItemByName(lex.Ancestor);
+        if (lEl <> nil) and (lEl.Attributes.Values['ElementUrl'] <> fTargetXSD) then
+          AddExternal(lEl);
+      end;
+    end;
+    for i := 0 to aLibrary.ArrayCount  -1 do begin
+      if aLibrary.Arrays[i].Attributes.Values['ImportedFromUrl'] = fTargetXSD then begin
+        fHasXsdData := true;
+        if (fXsdTns = '') and (aLibrary.Arrays[i].Attributes.Values['ImportedFromNamespace'] <> '') then
+          fXsdTns := aLibrary.Arrays[i].Attributes.Values['ImportedFromNamespace'];
+        lEl := aLibrary.ItemByName(aLibrary.Arrays[i].ElementType);
+        if (lEl <> nil) and (lEl.Attributes.Values['ImportedFromUrl'] <> fTargetXSD) then
+          AddExternal(lEl);
+      end else if fTargetXSD = '' then AddExternal(aLibrary.Arrays[i]);
+    end;
+    for i := 0 to aLibrary.StructCount  -1 do begin
+      lStr := aLibrary.Structs[i];
+      if lStr.Attributes.Values['ImportedFromUrl'] = fTargetXSD then begin
+        while lStr <> nil do begin
+          fHasXsdData := true;
+          if (fXsdTns = '') and (lStr.Attributes.Values['ImportedFromNamespace'] <> '') then
+            fXsdTns := lStr.Attributes.Values['ImportedFromNamespace'];
+          for j := 0 to lStr.Count -1 do begin
+            lEl := aLibrary.ItemByName(lStr[j].DataType);
+            if (lEl <> nil) and (lEl.Attributes.Values['ImportedFromUrl'] <> fTargetXSD) then
+              AddExternal(lEl);
+          end;
+          lEl := aLibrary.ItemByName(lStr.Ancestor);
+          if (lEl <> nil) and (lEl.Attributes.Values['ImportedFromUrl'] <> fTargetXSD) then
+            AddExternal(lEl);
+          if lEl is TRODLStruct then
+            lStr := TRodlStruct(lEl)
+          else
+            break;
+        end;
+      end else if fTargetXSD = '' then AddExternal(lStr);
+    end;
+    for i := 0 to aLibrary.EnumCount  -1 do begin
+      if aLibrary.Enums[i].Attributes.Values['ImportedFromUrl'] = fTargetXSD then begin
+        fHasXsdData := true;
+        if (fXsdTns = '') and (aLibrary.Enums[i].Attributes.Values['ImportedFromNamespace'] <> '') then
+          fXsdTns := aLibrary.Enums[i].Attributes.Values['ImportedFromNamespace'];
+
+       end else if fTargetXSD = '' then
+         AddExternal(aLibrary.Enums[i]);
+    end;
+    for i := 0 to aLibrary.ServiceCount -1 do begin
+      lServ := aLibrary.Services[i];
+      lIsTarget := ((fTargetEntity = '') or (lServ.Name = fTargetEntity)) and (fTargetXsd = '');
+      if lIsTarget or (fTargetXSD <> '') then begin
+        for j := 0 to lServ[0].Count -1 do begin
+          lOp := lServ[0][j];
+          if lIsTarget then
+          for k := 0 to lOp.Attributes.Count -1 do begin
+            if copy(lOp.Attributes[k], 1, 6) = 'fault_' then begin
+              AddExternal(aLibrary.FindException(lOp.Attributes.Values[lOp.Attributes.Names[k]]));
+            end;
+          end;
+          if lOp.Attributes.Values['InputImportedFromUrl'] = fTargetXSD then begin
+            for k := 0 to lOp.Count -1 do begin
+              if lOp[k].Flag in [fIn, fInOut] then begin
+                lEl := aLibrary.ItemByName(lOp[k].DataType);
+                if (lEl <> nil) and (lEl.Attributes.Values['ImportedFromUrl'] <> fTargetXSD) then
+                  AddExternal(lEl);
+              end;
+            end;
+          end else if lIsTarget and (lOp.Attributes.Values['InputImportedFromUrl'] <> '') then begin
+            AddExternal(fTargetNamespace, lOp.Attributes.Values['InputImportedFromUrl']);
+          end;
+          if lOp.Attributes.Values['OutputImportedFromUrl'] = fTargetXSD then begin
+            for k := 0 to lOp.Count -1 do begin
+              if lOp[k].Flag in [fInOut] then begin
+                lEl := aLibrary.ItemByName(lOp[k].DataType);
+                if (lEl <> nil) and (lEl.Attributes.Values['ImportedFromUrl'] <> fTargetXSD) then
+                  AddExternal(lEl);
+              end;
+            end;
+            if lOp.Result <> nil then begin
+              lEl := aLibrary.ItemByName(lOp.Result.DataType);
+              if (lEl <> nil) and (lEl.Attributes.Values['ImportedFromUrl'] <> fTargetXSD) then
+                AddExternal(lEl);
+            end;
+          end else if lIsTarget and (lOp.Attributes.Values['OutputImportedFromUrl'] <> '') then begin
+            AddExternal(fTargetNamespace, lOp.Attributes.Values['OutputImportedFromUrl']);
+          end;
+        end;
+      end;
+    end;
+
+  finally
+    lList.Free;
+  end;
+end;
+
+procedure TRODLToWSDL.WriteExceptionMessage(AnException: TRODLException);
+var
+  i: Integer;
+  lItem: TRODLTypedEntity;
+begin
+  if not fUseDocument then exit; // only supported for document
+  Write(Format('<wsdl:message name="%s">', [anException.Name]), 3);
+  for i := 0 to anException.Count -1 do begin
+    lItem := anException[i];
+    if AnException.Attributes.Values['ElementName'] <> '' then
+      Write(Format('<wsdl:part name="%s" element="%s" />', [lItem.Name, GetPrefix(AnException.Attributes.Values['ElementName'], AnException.Attributes.Values['ElementNamespace'])]), 6)
+    else
+      Write(Format('<wsdl:part name="%s" type="%s" />', [lItem.Name, ExtSOAPDataType(anException.OwnerLibrary, lItem.DataType)]), 6);
+  end;
+  Write('</wsdl:message>', 3);
+
+end;
+
+procedure TRODLToWSDL.WriteExceptionParts(aMeth: TRODLOperation);
+var
+  i: Integer;
+  s, lVal: string;
+begin
+  if not UseDocument then exit;
+  for i := 0 to aMeth.Attributes.Count -1 do begin
+    s := aMeth.Attributes.Names[i];
+    if copy(s,1,6)= 'fault_' then begin
+      lVal := aMeth.Attributes.Values[s];
+      if aMeth.OwnerLibrary.FindException(lVal) <> nil then begin
+        Write(Format('<wsdl:fault name="%s" message="tns:%s" />', [copy(s,7,MaxInt), lVal]), 9);
+      end;
+    end;
+  end;
+end;
+
+procedure TRODLToWSDL.WriteExceptionElement(anException: TRODLException);
+var
+  lRet: TRODLStruct;
+  i: Integer;
+begin
+  if fExternalTypesAsReferences and (anException.Attributes.Values['ElementUrl'] <> fTargetXSD) then exit;
+
+  if (anException.Attributes.Values['ElementType'] = '') and (anException.Attributes.Values['ElementName'] <> '') then begin
+    Write(Format('<xs:element name="%s">', [anException.Attributes.Values['ElementName']]), 9);
+    WriteAnnotation(anException.Documentation, 9); {Giovanni}
+    Write('<xs:complexType>', 9);
+  end else begin
+    if anException.Attributes.Values['ElementType'] = '' then
+      Write(Format('<xs:complexType name="%s">', [anException.Name]), 9)
+    else
+      Write(Format('<xs:complexType name="%s">', [anException.Attributes.Values['ElementType']]), 9);
+    WriteAnnotation(anException.Documentation, 9); {Giovanni}
+  end;
+  if anException.Ancestor <> '' then begin
+    write('<xs:complexContent>', 9);
+    write(Format('<xs:extension base="%s">', [ExtSOAPDataType(anException.OwnerLibrary, anException.Ancestor)]), 9);
+  end;
+  Write('<xs:sequence>', 12);
+
+  for i := 0 to anException.Count-1 do begin
+    with anException.Items[i] do begin
+      lRet := anException.OwnerLibrary.FindStruct(DataType);
+      if (lRet <> nil) and (lRet.Count = 1) and (lRet.Attributes.Values['Anonymous'] = '1') then begin
+        if lRet.Attributes.Values['Nillable'] = '1' then
+          Write(Format('<xs:element name="%s" type="%s" nillable="1">', [Unprefix(Name), ExtSOAPDataType(anException.OwnerLibrary, lRet.Items[0].DataType)]), 15)
+        else
+          Write(Format('<xs:element name="%s" type="%s" minOccurs="0" maxOccurs="1">', [Unprefix(Name), ExtSOAPDataType(anException.OwnerLibrary, lRet.Items[0].DataType)]), 15);
+      end else begin
+        Write(Format('<xs:element name="%s" type="%s">', [Unprefix(Name), ExtSOAPDataType(anException.OwnerLibrary, DataType)]), 15);
+      end;
+      WriteAnnotation(Documentation, 15); {Giovanni}
+      Write('</xs:element>',15);
+    end;
+  end;
+  Write('</xs:sequence>', 12);
+  if anException.Ancestor <> '' then begin
+    write('</xs:extension>', 9);
+    write('</xs:complexContent>', 9);
+  end;
+  Write('</xs:complexType>', 9);
+  if (anException.Attributes.Values['ElementType'] = '') and (anException.Attributes.Values['ElementName'] <> '') then
+    Write('</xs:element>', 9);
+  if anException.Attributes.Values['ElementType'] <> '' then begin
+    Write(Format('<xs:element name="%s" type="%s" />', [anException.Attributes.Values['ElementName'], anException.Attributes.Values['ElementType']]), 9);
+  end;
+end;
+
+function TRODLToWSDL.GetPrefix(const aType, aNs: string): String;
+begin
+  if (fTargetXSD = '') and (aNs = fTargetNamespace) then begin
+     result := 'tns:'+aType;
+     exit;
+  end;
+
+  if aNs <> '' then begin
+    result := 'ns'+IntToStr(fExternalRefs.IndexOf(aNs))+':'+Unprefix(aType);
+    exit;
+  end;
+  Result := 'tns:'+ aType;
+end;
+
+function TRODLToWSDL.ReplaceSpecialChars(aText: String): String;
+begin
+  result := StringReplace(aText, '&', '&amp;', [rfReplaceAll, rfIgnoreCase]);
+  result := StringReplace(result, '"', '&quot;', [rfReplaceAll, rfIgnoreCase]);
+  result := StringReplace(result, '''', '&apos;', [rfReplaceAll, rfIgnoreCase]);
+  result := StringReplace(result, '<', '&lt;', [rfReplaceAll, rfIgnoreCase]);
+  result := StringReplace(result, '>', '&gt;', [rfReplaceAll, rfIgnoreCase]);
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen/uRODLToXML.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen/uRODLToXML.pas
new file mode 100644
index 0000000..68bb9e6
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen/uRODLToXML.pas	
@@ -0,0 +1,554 @@
+unit uRODLToXML;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - CodeGen                                           }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+
+uses
+  SysUtils,
+  Classes,uRODL;
+
+var
+  XMLFlagNames: XMLFlagNamesArray deprecated;
+
+type
+  { TRODLToXML }
+  TRODLToXML = class(TRODLConverter)
+  private
+    fFlattenUsedRODLs:boolean;
+    fStyleSheet: string;
+    procedure WriteArrays(xml: TStringList; aLibrary: TRODLLibrary);
+    procedure WriteAttributes(xml: TStringList; aEntity: TRODLEntity);
+    procedure WriteEnums(xml: TStringList; aLibrary: TRODLLibrary);
+    procedure WriteEventSinks(xml: TStringList; aLibrary: TRODLLibrary);
+    procedure WriteExceptions(xml: TStringList; aLibrary: TRODLLibrary);
+    procedure WriteServices(xml: TStringList; aLibrary: TRODLLibrary);
+    procedure WriteStructs(xml: TStringList; aLibrary: TRODLLibrary);
+    procedure WriteUses(xml: TStringList; aLibrary: TRODLLibrary);
+    function WriteAsCData(aData: string): string;
+    function Indent(SpaceCount: byte): string;
+  protected
+    procedure IntConvert(const aLibrary: TRODLLibrary; const aTargetEntity: string = ''); override;
+  public
+    constructor Create(const aLibrary: TRODLLibrary; iFlattenUsedRODLs:boolean=false); reintroduce; overload;
+    constructor Create(const aLibraryFile: string; iFlattenUsedRODLs:boolean=false); reintroduce; overload;
+
+    property StyleSheet: string read fStyleSheet write fStyleSheet;
+  end;
+
+  TXMLToRODL = uRODL.TXMLToRODL;
+
+function XMLFlagNameToFlag(const aName: string): TRODLParamFlag;
+
+function LoadLibraryFromXml(const aFilename: string): TRODLLibrary;
+
+implementation
+
+uses
+  {$IFDEF DEBUG_REMOBJECTS_RODLTOXML}eDebugServer, {$ENDIF}
+  TypInfo, {$IFDEF DELPHI5}ComObj,{$ENDIF}
+  uRORes, uROXMLIntf;
+
+function XMLFlagNameToFlag(const aName: string): TRODLParamFlag;
+begin
+  result := uRODL.XMLFlagNameToFlag(aName);
+end;
+
+function LoadLibraryFromXml(const aFilename: string): TRODLLibrary;
+begin
+  with uRODL.TXMLToRODL.Create do try
+    result := ReadFromFile(aFilename);
+  finally
+    Free;
+  end;
+end;
+
+constructor TRODLToXML.Create(const aLibrary: TRODLLibrary; iFlattenUsedRODLs: boolean);
+begin
+  fFlattenUsedRODLs := iFlattenUsedRODLs;
+  inherited Create(aLibrary);
+end;
+
+constructor TRODLToXML.Create(const aLibraryFile: string; iFlattenUsedRODLs: boolean);
+begin
+  fFlattenUsedRODLs := iFlattenUsedRODLs;
+  inherited Create(aLibraryFIle);
+end;
+
+procedure TRODLToXML.IntConvert(const aLibrary: TRODLLibrary; const aTargetEntity: string = '');
+var
+  lAdditional: string;
+  xml: TStringList;
+begin
+  xml := TStringList.Create;
+  with aLibrary do try
+    {$IFDEF FPC}
+    if aTargetEntity = '' then lAdditional := '' else //remove FPC warning
+    {$ENDIF FPC}
+    lAdditional := '';
+    if Namespace <> '' then lAdditional := 'Namespace="' + Namespace + '" ';
+
+    xml.Append('<?xml version="1.0" encoding="utf-8"?>');
+    if fStyleSheet <> '' then
+      xml.Append('<?xml-stylesheet type="text/xsl" href="' + fStyleSheet + '"?>');
+
+    xml.Append(Format('<Library Name="%s" ' + lAdditional + 'UID="%s" Version="3.0">', [Name, GUIDToString(UID)]));
+
+    WriteAttributes(xml, aLibrary);
+    WriteServices(xml, aLibrary);
+    WriteEventSinks(xml, aLibrary);
+    WriteStructs(xml, aLibrary);
+    WriteEnums(xml, aLibrary);
+    WriteArrays(xml, aLibrary);
+    WriteUses(xml, aLibrary);
+    WriteExceptions(xml, aLibrary);
+
+    xml.Append('</Library>');
+  finally
+    Buffer.AddStrings(xml);
+    xml.Free;
+  end;
+end;
+
+procedure TRODLToXML.WriteArrays(xml: TStringList; aLibrary: TRODLLibrary);
+var
+  i: Integer;
+begin
+  xml.Append(Indent(3) + '<Arrays>');
+  with aLibrary do
+    for i := 0 to (ArrayCount - 1) do begin
+      if fFlattenUsedRODLs or not Arrays[i].IsFromUsedRodl then
+        with Arrays[i] do begin
+          xml.Append(Indent(6) + Format('<Array Name="%s" UID="%s">', [Name, GUIDToString(UID)]));
+          WriteAttributes(xml, Info);
+          xml.Append(Indent(3) + Format('<ElementType DataType="%s" />', [ElementType]));
+          xml.Append(Indent(6) + '</Array>');
+        end;
+    end;
+  xml.Append(Indent(3) + '</Arrays>');
+end;
+
+function TRODLToXML.WriteAsCData(aData: string): string;
+
+  function CleanCDATA(const aString: string): string;
+  var
+    lLength: Integer;
+  begin
+    result := aString;
+    lLength := length(aString);
+    while (lLength > 0) and
+    {$IFDEF UNICODE}
+    (CharInSet(result[lLength],[#09,#10,#13,#32]))
+    {$ELSE}
+    (result[lLength] in [#09,#10,#13,#32])
+    {$ENDIF}
+    do dec(lLength);
+    SetLength(result, lLength);
+    for lLength := Length(Result) downto 1 do
+      if
+      {$IFDEF UNICODE}
+        CharInSet(Result[lLength] , [#0..#8,#11,#12,#14..#31])
+      {$ELSE}
+        (Result[lLength] in [#0..#8,#11,#12,#14..#31])
+      {$ENDIF}
+      then result[lLength] := #32;
+    result := StringReplace(result, ']]>', ']]&gt;', [rfReplaceAll]);
+  end;
+
+begin
+  result := '<![CDATA['+{$IFDEF UNICODE}StringOf(BytesOf({$ENDIF}(UTF8Encode(CleanCDATA(aData)))+']]>'{$IFDEF UNICODE})){$ENDIF};
+end;
+
+function SafeHtmlAttribute(const s: string): string;
+begin
+  result := StringReplace(s, '&', '&amp;' , [rfReplaceAll]);
+end;
+
+procedure TRODLToXML.WriteAttributes(xml: TStringList; aEntity: TRODLEntity);
+var
+  attr: Integer;
+begin
+  if aEntity.Documentation <> '' then
+    xml.Append(Indent(6) + '<Documentation>' + WriteAsCData(aEntity.Documentation) + '</Documentation>');
+
+  if (aEntity.Attributes.Count > 0) then begin
+    with aEntity.Attributes do begin
+      xml.Append(Indent(6) + '<CustomAttributes>');
+
+      for attr := 0 to (aEntity.Attributes.Count - 1) do
+        xml.Append(Indent(9) + Format('<%s Value="%s" />',
+          [Names[attr], SafeHtmlAttribute(Values[Names[attr]])]));
+
+      xml.Append(Indent(6) + '</CustomAttributes>');
+    end;
+  end;
+
+  if Assigned(aEntity.GroupUnder) then
+    xml.Append(Indent(6) + Format('<Group Under="%s" />', [GUIDToString(aEntity.GroupUnder.UID)]));
+end;
+
+procedure TRODLToXML.WriteEnums(xml: TStringList; aLibrary: TRODLLibrary);
+var
+  i, k: Integer;
+begin
+  xml.Append(Indent(3) + '<Enums>');
+  with aLibrary do
+    for i := 0 to (EnumCount - 1) do begin
+
+      if fFlattenUsedRODLs or not Enums[i].IsFromUsedRodl then
+        with Enums[i] do begin
+          if not PrefixEnumValues then
+            xml.Append(Indent(6) + Format('<Enum Name="%s" UID="%s" Prefix="0">', [Name, GUIDToString(UID)]))
+          else
+            xml.Append(Indent(6) + Format('<Enum Name="%s" UID="%s">', [Name, GUIDToString(UID)]));
+          WriteAttributes(xml, Info);
+          xml.Append(Indent(3) + '<EnumValues>');
+          for k := 0 to (Count - 1) do begin
+            with Items[k] do begin
+              xml.Append(Indent(9) + Format('<EnumValue Name="%s">', [Name]));
+              WriteAttributes(xml, Info);
+              xml.Append(Indent(9) + '</EnumValue>');
+            end;
+          end;
+          xml.Append(Indent(3) + '</EnumValues>');
+          xml.Append(Indent(6) + '</Enum>');
+        end;
+    end;
+  xml.Append(Indent(3) + '</Enums>');
+end;
+
+procedure TRODLToXML.WriteEventSinks(xml: TStringList; aLibrary: TRODLLibrary);
+var
+  i, k, m, p: Integer;
+  lAdditional: string;
+begin
+  with aLibrary do
+    if EventSinkCount > 0 then begin
+      xml.Append(Indent(3) + '<EventSinks>');
+      for i := 0 to (EventSinkCount - 1) do begin
+        if fFlattenUsedRODLs or not EventSinks[i].IsFromUsedRodl then
+          with EventSinks[i] do begin
+
+            lAdditional := '';
+            if ImplUnit <> '' then lAdditional := ' ImplUnit="' + ImplUnit + '"';
+            if ImplClass <> '' then lAdditional := lAdditional + ' ImplClass="' + ImplClass + '"';
+            if Ancestor <> '' then lAdditional := lAdditional + ' Ancestor="' + Ancestor + '"';
+            if Abstract then lAdditional := lAdditional + ' Abstract="1"';
+            xml.Append(Indent(6) + Format('<EventSink Name="%s" UID="%s"' + lAdditional + '>', [Name, GUIDToString(UID)]));
+
+            WriteAttributes(xml, Info);
+
+            xml.Append(Indent(6) + '<Interfaces>');
+
+            for k := 0 to (Count - 1) do begin
+              with Items[k] do begin
+                xml.Append(Indent(9) +
+                  Format('<Interface Name="%s" UID="%s">', [Name, GUIDToString(UID)]));
+
+                WriteAttributes(xml, Info);
+
+                xml.Append(Indent(6) + '<Operations>');
+                for m := 0 to (Count - 1) do begin
+                  with Items[m] do begin
+                    xml.Append(Indent(9) +
+                      Format('<Operation Name="%s" UID="%s">', [Name, GUIDToString(UID)]));
+
+                    WriteAttributes(xml, Info);
+
+                    xml.Append(Indent(6) + '<Parameters>');
+
+                    { ToDo: cloned from above for now; implement "proper" RODL->XML for 3.0 }
+                    if Assigned(Result) then with Result do begin
+                      with Result do begin
+                        xml.Append(Format('<Parameter Name="%s" DataType="%s" Flag="%s">', [Name, DataType, uRODL.XMLFlagNames[Flag]]));
+                        WriteAttributes(xml, Info);
+                        xml.Append('</Parameter>');
+                      end;
+                    end;
+
+                    for p := 0 to (Count - 1) do begin
+                      with Items[p] do begin
+                        xml.Append(Format('<Parameter Name="%s" DataType="%s" Flag="%s">', [Name, DataType, uRODL.XMLFlagNames[Flag]]));
+                        WriteAttributes(xml, Info);
+                        xml.Append('</Parameter>');
+                      end;
+                    end;
+                    xml.Append(Indent(6) + '</Parameters>');
+                    xml.Append(Indent(9) + '</Operation>');
+                  end;
+                end;
+                xml.Append(Indent(6) + '</Operations>');
+
+                xml.Append(Indent(9) + '</Interface>');
+              end;
+            end;
+
+            xml.Append(Indent(6) + '</Interfaces>');
+            xml.Append(Indent(6) + '</EventSink>');
+          end;
+      end;
+      xml.Append(Indent(3) + '</EventSinks>');
+    end;
+end;
+
+procedure TRODLToXML.WriteExceptions(xml: TStringList; aLibrary: TRODLLibrary);
+var
+  i, k: Integer;
+  lAdd: string;
+begin
+  with aLibrary do
+    if ExceptionCount > 0 then begin
+      xml.Append(Indent(3) + '<Exceptions>');
+      for i := 0 to (ExceptionCount - 1) do begin
+        if fFlattenUsedRODLs or not Exceptions[i].IsFromUsedRodl then
+          with Exceptions[i] do begin
+
+            lAdd := '';
+            if AutoCreateParams then
+              lAdd := ' AutoCreateParams="1"'
+            else
+              lAdd := ' AutoCreateParams="0"';
+
+            if Ancestor <> '' then lAdd := lAdd+Format(' Ancestor="%s"',[Ancestor]);
+            if Abstract then lAdd := lAdd + ' Abstract="1"';
+
+            xml.Append(Indent(6) + Format('<Exception Name="%s" UID="%s"'+lAdd+'>',[Name, GUIDToString(UID)]));
+            WriteAttributes(xml, Info);
+            xml.Append(Indent(3) + '<Elements>');
+            for k := 0 to (Count - 1) do begin
+              with Items[k] do begin
+                xml.Append(Indent(9) + Format('<Element Name="%s" DataType="%s">', [Name, DataType]));
+                WriteAttributes(xml, Info);
+                xml.Append(Indent(9) + Format('</Element>', [Name, DataType]));
+              end;
+            end;
+            xml.Append(Indent(3) + '</Elements>');
+            xml.Append(Indent(6) + '</Exception>')
+          end;
+
+      end;
+      xml.Append(Indent(3) + '</Exceptions>');
+    end;
+end;
+
+procedure TRODLToXML.WriteServices(xml: TStringList; aLibrary: TRODLLibrary);
+var
+  i, k, m, p: Integer;
+  lAdditional: string;
+begin
+  with aLibrary do begin
+    if GroupCount > 0 then begin
+      xml.Append(Indent(3) + '<Groups>');
+      for i := 0 to (GroupCount - 1) do begin
+        if fFlattenUsedRODLs or not Groups[i].IsFromUsedRodl then begin
+          with Groups[i] do begin
+            xml.Append(Indent(6) + Format('<Group Name="%s" UID="%s">', [Name, GUIDToString(UID)]));
+            WriteAttributes(xml, Info);
+            xml.Append(Indent(6) + '</Group>');
+          end;
+        end;
+      end;
+      xml.Append(Indent(3) + '</Groups>');
+    end;
+
+    xml.Append(Indent(3) + '<Services>');
+    for i := 0 to (ServiceCount - 1) do begin
+      if fFlattenUsedRODLs or not Services[i].IsFromUsedRodl then
+        with Services[i] do begin
+
+          lAdditional := '';
+          if ImplUnit <> '' then lAdditional := ' ImplUnit="' + ImplUnit + '"';
+          if ImplClass <> '' then lAdditional := lAdditional + ' ImplClass="' + ImplClass + '"';
+          if Ancestor <> '' then lAdditional := lAdditional + ' Ancestor="' + Ancestor + '"';
+          if Abstract then lAdditional := lAdditional + ' Abstract="1"';
+          if isPrivate then lAdditional := lAdditional + ' Private="1"';
+
+          xml.Append(Indent(6) + Format('<Service Name="%s" UID="%s"' + lAdditional + '>', [Name, GUIDToString(UID)]));
+          WriteAttributes(xml, Info);
+
+          xml.Append(Indent(6) + '<Interfaces>');
+
+          for k := 0 to (Count - 1) do begin
+            with Items[k] do begin
+              xml.Append(Indent(9) + Format('<Interface Name="%s" UID="%s">', [Name, GUIDToString(UID)]));
+              WriteAttributes(xml, Info);
+
+              xml.Append(Indent(6) + '<Operations>');
+              for m := 0 to (Count - 1) do begin
+                with Items[m] do begin
+                  if ForceAsyncResponse then
+                    xml.Append(Indent(9) + Format('<Operation Name="%s" UID="%s" ForceAsyncResponse="1">', [Name, GUIDToString(UID)]))
+                  else
+                    xml.Append(Indent(9) + Format('<Operation Name="%s" UID="%s">', [Name, GUIDToString(UID)]));
+
+                  WriteAttributes(xml, Info);
+
+                  xml.Append(Indent(6) + '<Parameters>');
+
+                  if Assigned(Result) then with Result do begin
+                    with Result do begin
+                      xml.Append(Format('<Parameter Name="%s" DataType="%s" Flag="%s">', [Name, DataType, uRODL.XMLFlagNames[Flag]]));
+                      WriteAttributes(xml, Info);
+                      xml.Append('</Parameter>');
+                    end;
+                  end;
+
+                  for p := 0 to (Count - 1) do begin
+                    with Items[p] do begin
+                      xml.Append(Format('<Parameter Name="%s" DataType="%s" Flag="%s" >', [Name, DataType, uRODL.XMLFlagNames[Flag]]));
+                      WriteAttributes(xml, Info);
+                      xml.Append('</Parameter>');
+                    end;
+                  end;
+                  xml.Append(Indent(6) + '</Parameters>');
+
+                  if CodeBodyCount > 0 then begin
+                    xml.Append(Indent(6) + '<Code>');
+                    for p := 0 to CodeBodyCount-1 do begin
+                      xml.Append(Indent(6) + '<Code Language="'+CodeBodyLanguages[p]+'" >' + WriteAsCData(CodeBodies[CodeBodyLanguages[p]].Text) + '</Code>');
+                    end;
+                    xml.Append(Indent(6) + '</Code>');
+                  end;
+
+                  xml.Append(Indent(9) + '</Operation>');
+                end;
+              end;
+              xml.Append(Indent(6) + '</Operations>');
+
+              xml.Append(Indent(9) + '</Interface>');
+            end;
+          end;
+
+          xml.Append(Indent(6) + '</Interfaces>');
+          xml.Append(Indent(6) + '</Service>');
+        end;
+    end;
+  end;
+  xml.Append(Indent(3) + '</Services>');
+end;
+
+procedure TRODLToXML.WriteStructs(xml: TStringList; aLibrary: TRODLLibrary);
+var
+  i, k: Integer;
+  lAdditional: string;
+begin
+  xml.Append(Indent(3) + '<Structs>');
+  with aLibrary do
+    for i := 0 to (StructCount - 1) do begin
+
+      if fFlattenUsedRODLs or not Structs[i].IsFromUsedRodl then
+        with Structs[i] do begin
+
+          lAdditional := '';
+          if AutoCreateParams then
+            lAdditional := ' AutoCreateParams="1"'
+          else
+            lAdditional := ' AutoCreateParams="0"';
+
+          if Ancestor <> '' then lAdditional := lAdditional + Format(' Ancestor="%s"', [Ancestor]);
+          if Abstract then lAdditional := lAdditional + ' Abstract="1"';
+
+          xml.Append(Indent(6) + Format('<Struct Name="%s" UID="%s"' + lAdditional + '>',
+                                          [Name, GUIDToString(UID)]));
+
+          WriteAttributes(xml, Info);
+          xml.Append(Indent(3) + '<Elements>');
+          for k := 0 to (Count - 1) do begin
+            with Items[k] do begin
+              xml.Append(Indent(9) + Format('<Element Name="%s" DataType="%s">', [Name, DataType]));
+              WriteAttributes(xml, Info);
+              xml.Append(Indent(9) + Format('</Element>', [Name, DataType]));
+            end;
+          end;
+          xml.Append(Indent(3) + '</Elements>');
+          xml.Append(Indent(6) + '</Struct>');
+        end;
+
+    end;
+  xml.Append(Indent(3) + '</Structs>');
+end;
+
+procedure TRODLToXML.WriteUses(xml: TStringList; aLibrary: TRODLLibrary);
+var
+  i: Integer;
+  lSplitModeAttribute: string;
+  lUsedRodlFilename, lUsedRodlFilename_absolute: string;
+begin
+  with aLibrary do
+    if UseCount > 0 then begin
+      xml.Append(Indent(3) + '<Uses>');
+      for i := 0 to (UseCount - 1) do begin
+        if (not fFlattenUsedRODLs) and (not Use[i].IsFromUsedRodl) then
+          with Use[i] do begin
+            lUsedRodlFilename := RodlFile;
+            lUsedRodlFilename_absolute := AbsoluteRodlFile;
+            if lUsedRodlFilename_absolute = '' then
+              lUsedRodlFilename_absolute := ExpandFileName(ExpandVariables(lUsedRodlFilename));
+            {if aLibrary.RodlFilename <> '' then
+              lUsedRodlFilename := ExtractRelativePath(ExtractFilePath(aLibrary.RodlFilename),lUsedRodlFilename);}
+
+            lSplitModeAttribute := '';
+            if SplitMode <> usmAsParent then
+              lSplitModeAttribute := Format(' SplitMode="%s"', [IntToStr(Integer(SplitMode))]);
+            if GenerateCode then
+              xml.Append(Indent(6) + Format('<Use Name="%s" UID="%s" Rodl="%s" GenerateCode="1" AbsoluteRodl="%s"%s>',
+                [Name, GUIDToString(UID), lUsedRodlFilename, lUsedRodlFilename_absolute, lSplitModeAttribute]))
+            else
+              xml.Append(Indent(6) + Format('<Use Name="%s" UID="%s" Rodl="%s" AbsoluteRodl="%s"%s>',
+                [Name, GUIDToString(UID), lUsedRodlFilename, lUsedRodlFilename_absolute, lSplitModeAttribute]));
+            WriteAttributes(xml, Info);
+            xml.Append(Indent(6) + '</Use>')
+          end;
+
+      end;
+      xml.Append(Indent(3) + '</Uses>');
+    end;
+end;
+
+function TRODLToXML.Indent(SpaceCount: byte): string;
+{var
+  i: integer;}
+begin
+  {$IFDEF FPC}
+  if SpaceCount = 0 then result := '' else // removing FPC warning
+  {$ENDIF}
+  result := '';
+  {for i := 1 to SpaceCount do
+    result := result + ' ';}
+end;
+
+(*
+function StringToGUID(const s: string): TGUID;
+begin
+  if s = '' then Result := NewGuid else begin
+    try
+      Result := Sysutils.StringToGUID(s);
+    except
+      on e: EConvertError do
+        Result := NewGuid;
+    end;
+  end;
+end;
+*)
+initialization
+  {$WARN SYMBOL_DEPRECATED OFF}
+  XMLFlagNames := uRODL.XMLFlagNames;
+  {$WARN SYMBOL_DEPRECATED ON}
+end.
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/Templates.lrs b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/Templates.lrs
new file mode 100644
index 0000000..8f1157e
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/Templates.lrs	
@@ -0,0 +1,3374 @@
+LazarusResources.Add('TEMPLATE_INTF_PAS','RCDATA',[
+  'unit %UNIT_NAME%;'#13#10#13#10'{--------------------------------------------'
+  +'--------------------------------}'#13#10'{ This unit was automatically gene'
+  +'rated by the RemObjects SDK after reading  }'#13#10'{ the RODL file associa'
+  +'ted with this project .                               }'#13#10'{           '
+  +'                                                                 }'#13#10'{'
+  +' Do not modify this unit manually, or your changes will be lost when this  '
+  +' }'#13#10'{ unit is regenerated the next time you compile the project.     '
+  +'            }'#13#10'{-----------------------------------------------------'
+  +'-----------------------}'#13#10#13#10'{$I RemObjects.inc}'#13#10#13#10'inte'
+  +'rface'#13#10#13#10'uses'#13#10'  {vcl:} Classes, TypInfo,'#13#10'  // <%%% '
+  +'START REQUIRED_UNITS %%%>'#13#10'  {Required:} %REQUIRED_UNIT_NAME%,'#13#10
+  +'  // <%%% END REQUIRED_UNITS %%%>'#13#10'  {RemObjects:} uROXMLIntf, uROCla'
+  +'sses, uROClient, uROTypes, uROClientIntf;'#13#10#13#10'const'#13#10'  { Lib'
+  +'rary ID }'#13#10'  LibraryUID = ''%LIBRARY_UID%'';'#13#10'  TargetNamespace'
+  +' = ''%NAMESPACE_NAME%'';'#13#10#13#10'  { Service Interface ID''s }'#13#10
+  +'  // <%%% START SERVICES %%%>'#13#10'  I%SERVICE_NAME%_IID : TGUID = ''%SER'
+  +'VICE_UID%'';'#13#10'  // <%%% END SERVICES %%%>'#13#10'  '#13#10'  { Event '
+  +'ID''s }'#13#10'  // <%%% START EVENT_SINKS %%%>'#13#10'  EID_%EVENT_SINK_NA'
+  +'ME% = ''%EVENT_SINK_NAME%'';'#13#10'  // <%%% END EVENT_SINKS %%%>'#13#10' '
+  +' '#13#10'type'#13#10'  { Forward declarations }'#13#10'  // <%%% START SERV'
+  +'ICES %%%>'#13#10'  I%SERVICE_NAME% = interface;'#13#10'  // <%%% END SERVIC'
+  +'ES %%%>'#13#10'  // <%%% START ARRAYS %%%>'#13#10'  %ARRAY_NAME% = class;'
+  +#13#10'  // <%%% END ARRAYS %%%>'#13#10'  // <%%% START STRUCTS %%%>'#13#10
+  +'  %STRUCT_NAME% = class;'#13#10'  // <%%% END STRUCTS %%%>'#13#10'  // <%%%'
+  +' START EXCEPTIONS %%%>'#13#10'  %EXCEPTION_NAME% = class;'#13#10'  // <%%% '
+  +'END EXCEPTIONS %%%>'#13#10'  // <%%% START EVENT_SINKS %%%>'#13#10'  I%EVEN'
+  +'T_SINK_NAME% = interface;'#13#10'  // <%%% END EVENT_SINKS %%%>'#13#10#13#10
+  +'  { Enumerateds }'#13#10'  // <%%% START ENUMS %%%>'#13#10'  // <%%% START '
+  +'DOCUMENTATION %%%>'#13#10#13#10'  { Description:'#13#10'      %CONTENT% }'
+  +#13#10'  // <%%% END DOCUMENTATION %%%>'#13#10'  %ENUM_NAME% = ('#13#10'    '
+  +'            // <%%% START VALUES %%%>'#13#10'                %VALUE_NAME%,'
+  +#13#10'                // <%%% END VALUES %%%>'#13#10'                );'#13
+  +#10#13#10'  // <%%% END ENUMS %%%>'#13#10'  // <%%% START STRUCTS %%%>'#13#10
+  +'  { %STRUCT_NAME% }'#13#10'  // <%%% START DOCUMENTATION %%%>'#13#10#13#10
+  +'  { Description:'#13#10'      %CONTENT% }'#13#10'  // <%%% END DOCUMENTATIO'
+  +'N %%%>'#13#10'  %STRUCT_NAME% = class(%STRUCT_ANCESTOR_NAME%)'#13#10'  priv'
+  +'ate'#13#10'    FDestroying: Boolean;'#13#10#13#10'    // <%%% START FIELDS_'
+  +'NO_STRIP %%%>'#13#10'    f%FIELD_NAME%: %FIELD_TYPE%;'#13#10'    // <%%% EN'
+  +'D FIELDS_NO_STRIP %%%>'#13#10'    // <%%% START FIELDS_NO_STRIP %%%>'#13#10
+  +'    // <%%% START IF_FIELD_TYPE_COMPLEX %%%>'#13#10'    function Get%FIELD_'
+  +'NAME%: %FIELD_TYPE%;'#13#10'    // <%%% END IF_FIELD_TYPE_COMPLEX %%%>'#13
+  +#10'    // <%%% END FIELDS_NO_STRIP %%%>'#13#10'  public'#13#10'    // <%%% '
+  +'START STRUCT_GENERATE_DEFAULT_VALUES %%%>'#13#10'    constructor Create(aCo'
+  +'llection : TCollection); override;'#13#10'    // <%%% END STRUCT_GENERATE_D'
+  +'EFAULT_VALUES %%%>'#13#10'    procedure Assign(iSource: TPersistent); overr'
+  +'ide;'#13#10'    destructor Destroy; override;'#13#10'    // <%%% START IF_H'
+  +'AS_FIELDS %%%>'#13#10'    procedure ReadComplex(ASerializer: TObject); over'
+  +'ride;'#13#10'    procedure WriteComplex(ASerializer: TObject); override;'#13
+  +#10'    // <%%% END IF_HAS_FIELDS %%%>'#13#10'  published '#13#10'    // Fie'
+  +'lds must be published for the ancestor destructor to find and destroy them.'
+  +#13#10'    // <%%% START FIELDS_NO_STRIP %%%>'#13#10'    // <%%% START IF_FI'
+  +'ELD_TYPE_SIMPLE %%%>'#13#10'    property %FIELD_NAME%:%FIELD_TYPE% read f%F'
+  +'IELD_NAME% write f%FIELD_NAME%;'#13#10'    // <%%% END IF_FIELD_TYPE_SIMPLE'
+  +' %%%>'#13#10'    // <%%% START IF_FIELD_TYPE_COMPLEX %%%>'#13#10'    proper'
+  +'ty %FIELD_NAME%:%FIELD_TYPE% read Get%FIELD_NAME% write f%FIELD_NAME%;'#13
+  +#10'    // <%%% END IF_FIELD_TYPE_COMPLEX %%%>'#13#10'    // <%%% END FIELDS'
+  +'_NO_STRIP %%%>'#13#10'  end;'#13#10#13#10'  { %STRUCT_COLLECTION_NAME% }'#13
+  +#10'  %STRUCT_COLLECTION_NAME% = class(%STRUCT_ANCESTOR_COLLECTION_NAME%)'#13
+  +#10'  protected'#13#10'    constructor Create(aItemClass: TCollectionItemCla'
+  +'ss); overload;'#13#10'    function GetItems(aIndex: integer): %STRUCT_NAME%'
+  +';'#13#10'    procedure SetItems(aIndex: integer; const Value: %STRUCT_NAME%'
+  +');'#13#10'  public'#13#10'    constructor Create; overload;'#13#10'    func'
+  +'tion Add: %STRUCT_NAME%; reintroduce;'#13#10'    // <%%% START ARRAYS_IS_FO'
+  +'UND %%%>'#13#10'    procedure SaveToArray(anArray: %ARRAY_NAME%); overload;'
+  ,#13#10'    procedure LoadFromArray(anArray: %ARRAY_NAME%); overload;'#13#10
+  +'    // <%%% END ARRAYS_IS_FOUND %%%>'#13#10'    property Items[Index: integ'
+  +'er]:%STRUCT_NAME% read GetItems write SetItems; default;'#13#10'  end;'#13
+  +#10#13#10'  // <%%% END STRUCTS %%%>'#13#10'  // <%%% START ARRAYS %%%>'#13
+  +#10'  { %ARRAY_NAME% }'#13#10'  // <%%% START DOCUMENTATION %%%>'#13#10#13#10
+  +'  { Description:'#13#10'      %CONTENT% }'#13#10'  // <%%% END DOCUMENTATIO'
+  +'N %%%>'#13#10'  %ARRAY_NAME%_%ARRAY_TYPE% = array of %ARRAY_TYPE%;'#13#10' '
+  +' %ARRAY_NAME% = class(TROArray)'#13#10'  private'#13#10'    fCount: Integer'
+  +';'#13#10'    fItems : %ARRAY_NAME%_%ARRAY_TYPE%;'#13#10'  protected'#13#10
+  +'    procedure Grow; virtual;'#13#10'    function GetItems(aIndex: integer):'
+  +' %ARRAY_TYPE%;'#13#10'    procedure SetItems(aIndex: integer; const Value: '
+  +'%ARRAY_TYPE%);'#13#10'    function GetCount: integer; override;'#13#10'  pu'
+  +'blic'#13#10'    class function GetItemType: PTypeInfo; override;'#13#10'   '
+  +' // <%%% START IF_ARRAY_TYPE_COMPLEX %%%>'#13#10'    class function GetItem'
+  +'Class: TClass; override;'#13#10'    // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>'
+  +#13#10'    class function GetItemSize: integer; override;'#13#10#13#10'    f'
+  +'unction GetItemRef(aIndex: integer): pointer; override;'#13#10'    // <%%% '
+  +'START IF_ARRAY_TYPE_COMPLEX %%%>'#13#10'    procedure SetItemRef(aIndex: in'
+  +'teger; Ref: pointer); override;'#13#10'    // <%%% END IF_ARRAY_TYPE_COMPLE'
+  +'X %%%>'#13#10'    procedure Clear; override;'#13#10'    procedure Delete(aI'
+  +'ndex: integer); override;'#13#10'    procedure Resize(ElementCount: integer'
+  +'); override;'#13#10#13#10'    procedure Assign(iSource:TPersistent); overri'
+  +'de;'#13#10'    procedure ReadComplex(ASerializer: TObject); override;'#13#10
+  +'    procedure WriteComplex(ASerializer: TObject); override;'#13#10'    // <'
+  +'%%% START IF_ARRAY_TYPE_COMPLEX %%%>'#13#10'    function Add: %ARRAY_TYPE%;'
+  +' overload;'#13#10'    // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>'#13#10'    fun'
+  +'ction Add(const Value: %ARRAY_TYPE%):integer; overload;'#13#10'    // <%%% '
+  +'START IF_ARRAY_TYPE_SIMPLE %%%>'#13#10'    function GetIndex(const aPropert'
+  +'yName : string;'#13#10'                      const aPropertyValue : Variant'
+  +';'#13#10'                      StartFrom : integer = 0;'#13#10'            '
+  +'          Options : TROSearchOptions = [soIgnoreCase]) : integer; override;'
+  +#13#10'    // <%%% END IF_ARRAY_TYPE_SIMPLE %%%>'#13#10#13#10'    property C'
+  +'ount : integer read GetCount;'#13#10'    property Items[Index: integer]:%AR'
+  +'RAY_TYPE% read GetItems write SetItems; default;'#13#10'    property InnerA'
+  +'rray: %ARRAY_NAME%_%ARRAY_TYPE% read fItems;'#13#10'  end;'#13#10#13#10'  /'
+  +'/ <%%% END ARRAYS %%%>'#13#10'  { Exceptions }'#13#10'  // <%%% START EXCEP'
+  +'TIONS %%%>'#13#10'  // <%%% START DOCUMENTATION %%%>'#13#10#13#10'  { Descr'
+  +'iption:'#13#10'      %CONTENT% }'#13#10'  // <%%% END DOCUMENTATION %%%>'#13
+  +#10'  %EXCEPTION_NAME% = class(%EXCEPTION_ANCESTOR_NAME%)'#13#10'  private'
+  +#13#10'    // <%%% START FIELDS_NO_STRIP %%%>'#13#10'    f%FIELD_NAME%: %FIE'
+  +'LD_TYPE%;'#13#10'    // <%%% END FIELDS_NO_STRIP %%%>'#13#10'  public'#13#10
+  +'    constructor Create(anExceptionMessage : string'#13#10'                 '
+  +'      // <%%% START ANCESTOR_FIELDS %%%>'#13#10'                       ; a%'
+  +'FIELD_NAME%: %FIELD_TYPE%'#13#10'                       // <%%% END ANCESTO'
+  +'R_FIELDS %%%>'#13#10'                       // <%%% START FIELDS_NO_STRIP %'
+  +'%%>'#13#10'                       ; a%FIELD_NAME%: %FIELD_TYPE%'#13#10'    '
+  +'                   // <%%% END FIELDS_NO_STRIP %%%>'#13#10'                '
+  +'       );'#13#10'    // <%%% START IF_HAS_FIELDS %%%>'#13#10'    procedure '
+  +'ReadException(ASerializer: TObject); override;'#13#10'    procedure WriteEx'
+  +'ception(ASerializer: TObject); override;'#13#10'    // <%%% END IF_HAS_FIEL'
+  +'DS %%%>'#13#10'  published'#13#10'    // <%%% START FIELDS_NO_STRIP %%%>'#13
+  +#10'    property %FIELD_NAME%: %FIELD_TYPE% read f%FIELD_NAME% write f%FIELD'
+  +'_NAME%;'#13#10'    // <%%% END FIELDS_NO_STRIP %%%>'#13#10'  end;'#13#10#13
+  +#10'  // <%%% END EXCEPTIONS %%%>'#13#10'  // <%%% START SERVICES %%%>'#13#10
+  +'  { I%SERVICE_NAME% }'#13#10'  // <%%% START DOCUMENTATION %%%>'#13#10#13#10
+  +'  { Description:'#13#10'      %CONTENT% }'#13#10'  // <%%% END DOCUMENTATIO'
+  +'N %%%>'#13#10'  I%SERVICE_NAME% = interface%SERVICE_ANCESTOR_NAME%'#13#10' '
+  +'   [''%SERVICE_UID%'']'#13#10'    // <%%% START FUNCTION_OPERATIONS %%%>'#13
+  +#10'    function %OPERATION_NAME%('#13#10'               // <%%% START PARAM'
+  +'S %%%>'#13#10'               %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TY'
+  +'PE%;'#13#10'               // <%%% END PARAMS %%%>'#13#10'               ):'
+  +' %OPERATION_RESULT%;'#13#10'    // <%%% END FUNCTION_OPERATIONS %%%>'#13#10
+  +'    // <%%% START PROCEDURE_OPERATIONS %%%>'#13#10'    procedure %OPERATION'
+  +'_NAME%('#13#10'                // <%%% START PARAMS %%%>'#13#10'           '
+  ,'     %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;'#13#10'            '
+  +'    // <%%% END PARAMS %%%>'#13#10'                );'#13#10'    // <%%% EN'
+  +'D PROCEDURE_OPERATIONS %%%>'#13#10'  end;'#13#10#13#10'  { Co%SERVICE_NAME%'
+  +' }'#13#10'  Co%SERVICE_NAME% = class'#13#10'    class function Create(const'
+  +' aMessage: IROMessage; aTransportChannel: IROTransportChannel): I%SERVICE_N'
+  +'AME%;'#13#10'  end;'#13#10#13#10'  { T%SERVICE_NAME%_Proxy }'#13#10'  T%SER'
+  +'VICE_NAME%_Proxy = class(%SERVICE_PROXY_ANCESTOR_NAME%, I%SERVICE_NAME%)'#13
+  +#10'  protected'#13#10'    function __GetInterfaceName:string; override;'#13
+  +#10#13#10'    // <%%% START FUNCTION_OPERATIONS %%%>'#13#10'    function %OP'
+  +'ERATION_NAME%('#13#10'               // <%%% START PARAMS %%%>'#13#10'     '
+  +'          %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;'#13#10'       '
+  +'        // <%%% END PARAMS %%%>'#13#10'               ): %OPERATION_RESULT%'
+  +';'#13#10'    // <%%% END FUNCTION_OPERATIONS %%%>'#13#10'    // <%%% START '
+  +'PROCEDURE_OPERATIONS %%%>'#13#10'    procedure %OPERATION_NAME%('#13#10'   '
+  +'             // <%%% START PARAMS %%%>'#13#10'                %PARAM_FRONT_'
+  +'MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;'#13#10'                // <%%% END PA'
+  +'RAMS %%%>'#13#10'                );'#13#10'    // <%%% END PROCEDURE_OPERAT'
+  +'IONS %%%>'#13#10'  end;'#13#10#13#10'  // <%%% END SERVICES %%%>'#13#10'  /'
+  +'/ <%%% START EVENT_SINKS %%%>'#13#10'  { I%EVENT_SINK_NAME% }'#13#10'  // <'
+  +'%%% START DOCUMENTATION %%%>'#13#10#13#10'  { Description:'#13#10'      %CO'
+  +'NTENT% }'#13#10'  // <%%% END DOCUMENTATION %%%>'#13#10'  I%EVENT_SINK_NAME'
+  +'% = interface%EVENT_SINK_ANCESTOR_NAME%'#13#10'    [''%EVENT_SINK_UID%'']'
+  +#13#10'    // <%%% START OPERATIONS %%%>'#13#10'    procedure %OPERATION_NAM'
+  +'E%('#13#10'                // <%%% START PARAMS %%%>'#13#10'               '
+  +' %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;'#13#10'                '
+  +'// <%%% END PARAMS %%%>'#13#10'                );'#13#10'    // <%%% END OP'
+  +'ERATIONS %%%>'#13#10'  end;'#13#10#13#10'  { I%EVENT_SINK_NAME%_Writer }'#13
+  +#10'  // <%%% START DOCUMENTATION %%%>'#13#10#13#10'  { Description:'#13#10
+  +'      %CONTENT% }'#13#10'  // <%%% END DOCUMENTATION %%%>'#13#10'  I%EVENT_'
+  +'SINK_NAME%_Writer = interface(I%EVENT_SINK_WRITER_ANCESTOR_NAME%)'#13#10'  '
+  +'  [''%EVENT_SINK_UID%'']'#13#10'    // <%%% START OPERATIONS %%%>'#13#10'  '
+  +'  procedure %OPERATION_NAME%(const __Sender : TGUID'#13#10'                '
+  +'// <%%% START PARAMS %%%>'#13#10'                ; %PARAM_FRONT_MODIFIER% %'
+  +'PARAM_NAME%: %PARAM_TYPE%'#13#10'                // <%%% END PARAMS %%%>'#13
+  +#10'                );'#13#10'    // <%%% END OPERATIONS %%%>'#13#10'  end;'
+  +#13#10#13#10'  // <%%% END EVENT_SINKS %%%>'#13#10'implementation'#13#10#13
+  +#10'uses'#13#10'  {vcl:} SysUtils,'#13#10'  {RemObjects:} uROEventRepository'
+  +', uROSerializer, uRORes;'#13#10#13#10'// <%%% START EXCEPTIONS %%%>'#13#10
+  +'{ %EXCEPTION_NAME% }'#13#10'constructor %EXCEPTION_NAME%.Create(anException'
+  +'Message : string'#13#10'  // <%%% START ANCESTOR_FIELDS %%%>'#13#10'  ; a%F'
+  +'IELD_NAME%: %FIELD_TYPE%'#13#10'  // <%%% END ANCESTOR_FIELDS %%%>'#13#10' '
+  +' // <%%% START FIELDS_NO_STRIP %%%>'#13#10'  ; a%FIELD_NAME%: %FIELD_TYPE%'
+  +#13#10'  // <%%% END FIELDS_NO_STRIP %%%>'#13#10'  );'#13#10'begin'#13#10'  '
+  +'inherited Create(anExceptionMessage'#13#10'                   // <%%% START'
+  +' ANCESTOR_FIELDS %%%>'#13#10'                   , a%FIELD_NAME%'#13#10'    '
+  +'               // <%%% END ANCESTOR_FIELDS %%%>'#13#10'                  );'
+  +#13#10#13#10'  // <%%% START FIELDS_NO_STRIP %%%>'#13#10'  f%FIELD_NAME% := '
+  +'a%FIELD_NAME%;'#13#10'  // <%%% END FIELDS_NO_STRIP %%%>'#13#10'end;'#13#10
+  +#13#10'// <%%% START IF_HAS_FIELDS %%%>'#13#10'procedure %EXCEPTION_NAME%.Re'
+  +'adException(ASerializer: TObject);'#13#10'var'#13#10'  // <%%% START ENTIRE'
+  +'_HIERARCHY_FIELDS %%%>'#13#10'  l_%FIELD_NAME%: %FIELD_TYPE%;'#13#10'  // <'
+  +'%%% END ENTIRE_HIERARCHY_FIELDS %%%>'#13#10'begin'#13#10'  if TROSerializer'
+  +'(ASerializer).RecordStrictOrder then begin'#13#10'    // <%%% START IF_STRU'
+  +'CT_HAS_ANCESTOR %%%>'#13#10'    inherited;'#13#10'    // <%%% END IF_STRUCT'
+  +'_HAS_ANCESTOR %%%>'#13#10'    // <%%% START FIELDS_NO_STRIP %%%>'#13#10'   '
+  +' l_%FIELD_NAME% := %FIELD_NAME%;'#13#10'    // <%%% START IF_FIELD_BINARY_T'
+  +'YPE %%%>'#13#10'    TROSerializer(ASerializer).ReadBinary(''%FIELD_NAME%'','
+  +' l_%FIELD_NAME%);'#13#10'    if %FIELD_NAME% <> l_%FIELD_NAME% then %FIELD_'
+  +'NAME%.Free;'#13#10'    // <%%% END IF_FIELD_BINARY_TYPE %%%>'#13#10'    // '
+  +'<%%% START IF_FIELD_BOOLEAN_TYPE %%%>'#13#10'    TROSerializer(ASerializer)'
+  +'.ReadEnumerated(''%FIELD_NAME%'', TypeInfo(boolean), l_%FIELD_NAME%);'#13#10
+  +'    // <%%% END IF_FIELD_BOOLEAN_TYPE %%%>'#13#10'    // <%%% START IF_FIEL'
+  +'D_CURRENCY_TYPE %%%>'#13#10'    TROSerializer(ASerializer).ReadDouble(''%FI'
+  +'ELD_NAME%'', ftCurr, l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_CURRE'
+  ,'NCY_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_DATETIME_TYPE %%%>'#13#10' '
+  +'   TROSerializer(ASerializer).ReadDateTime(''%FIELD_NAME%'', l_%FIELD_NAME%'
+  +');'#13#10'    // <%%% END IF_FIELD_DATETIME_TYPE %%%>'#13#10'    // <%%% ST'
+  +'ART IF_FIELD_DECIMAL_TYPE %%%>'#13#10'    TROSerializer(ASerializer).ReadDe'
+  +'cimal(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_DE'
+  +'CIMAL_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_DOUBLE_TYPE %%%>'#13#10' '
+  +'   TROSerializer(ASerializer).ReadDouble(''%FIELD_NAME%'', ftDouble, l_%FIE'
+  +'LD_NAME%);'#13#10'    // <%%% END IF_FIELD_DOUBLE_TYPE %%%>'#13#10'    // <'
+  +'%%% START IF_FIELD_GUID_TYPE %%%>'#13#10'    TROSerializer(ASerializer).Rea'
+  +'dGuid(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_GU'
+  +'ID_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_INT64_TYPE %%%>'#13#10'    T'
+  +'ROSerializer(ASerializer).ReadInt64(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13
+  +#10'    // <%%% END IF_FIELD_INT64_TYPE %%%>'#13#10'    // <%%% START IF_FIE'
+  +'LD_INTEGER_TYPE %%%>'#13#10'    TROSerializer(ASerializer).ReadInteger(''%F'
+  +'IELD_NAME%'', otSLong, l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_INT'
+  +'EGER_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_ANSISTRING_TYPE %%%>'#13#10
+  +'    TROSerializer(ASerializer).ReadAnsiString(''%FIELD_NAME%'', l_%FIELD_NA'
+  +'ME%);'#13#10'    // <%%% END IF_FIELD_ANSISTRING_TYPE %%%>'#13#10'    // <%'
+  +'%% START IF_FIELD_UTF8STRING_TYPE %%%>'#13#10'    TROSerializer(ASerializer'
+  +').ReadUTF8String(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    // <%%% END '
+  +'IF_FIELD_UTF8STRING_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_VARIANT_TYP'
+  +'E %%%>'#13#10'    TROSerializer(ASerializer).ReadVariant(''%FIELD_NAME%'', '
+  +'l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_VARIANT_TYPE %%%>'#13#10' '
+  +'   // <%%% START IF_FIELD_WIDESTRING_TYPE %%%>'#13#10'    TROSerializer(ASe'
+  +'rializer).ReadWideString(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    // <'
+  +'%%% END IF_FIELD_WIDESTRING_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_XML'
+  +'_TYPE %%%>'#13#10'    TROSerializer(ASerializer).ReadXml(''%FIELD_NAME%'', '
+  +'l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_XML_TYPE %%%>'#13#10'    /'
+  +'/ <%%% START IF_FIELD_ARRAY_TYPE %%%>'#13#10'    TROSerializer(ASerializer)'
+  +'.ReadArray(''%FIELD_NAME%'', %FIELD_TYPE%, l_%FIELD_NAME%);'#13#10'    if %'
+  +'FIELD_NAME% <> l_%FIELD_NAME% then %FIELD_NAME%.Free;'#13#10'    // <%%% EN'
+  +'D IF_FIELD_ARRAY_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_ENUM_TYPE %%%>'
+  +#13#10'    TROSerializer(ASerializer).ReadEnumerated(''%FIELD_NAME%'', TypeI'
+  +'nfo(%FIELD_TYPE%), l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_ENUM_TY'
+  +'PE %%%>'#13#10'    // <%%% START IF_FIELD_STRUCT_TYPE %%%>'#13#10'    TROSe'
+  +'rializer(ASerializer).ReadStruct(''%FIELD_NAME%'', %FIELD_TYPE%, l_%FIELD_N'
+  +'AME%);'#13#10'    if %FIELD_NAME% <> l_%FIELD_NAME% then %FIELD_NAME%.Free;'
+  +#13#10'    // <%%% END IF_FIELD_STRUCT_TYPE %%%>'#13#10'    %FIELD_NAME% := '
+  +'l_%FIELD_NAME%;'#13#10'    // <%%% END FIELDS_NO_STRIP %%%>'#13#10'  end'#13
+  +#10'  else begin'#13#10'    // <%%% START ENTIRE_HIERARCHY_FIELDS %%%>'#13#10
+  +'    l_%FIELD_NAME% := %FIELD_NAME%;'#13#10'    // <%%% START IF_FIELD_BINAR'
+  +'Y_TYPE %%%>'#13#10'    TROSerializer(ASerializer).ReadBinary(''%FIELD_NAME%'
+  +''', l_%FIELD_NAME%);'#13#10'    if %FIELD_NAME% <> l_%FIELD_NAME% then %FIE'
+  +'LD_NAME%.Free;'#13#10'    // <%%% END IF_FIELD_BINARY_TYPE %%%>'#13#10'    '
+  +'// <%%% START IF_FIELD_BOOLEAN_TYPE %%%>'#13#10'    TROSerializer(ASerializ'
+  +'er).ReadEnumerated(''%FIELD_NAME%'', TypeInfo(boolean), l_%FIELD_NAME%);'#13
+  +#10'    // <%%% END IF_FIELD_BOOLEAN_TYPE %%%>'#13#10'    // <%%% START IF_F'
+  +'IELD_CURRENCY_TYPE %%%>'#13#10'    TROSerializer(ASerializer).ReadDouble('''
+  +'%FIELD_NAME%'', ftCurr, l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_CU'
+  +'RRENCY_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_DATETIME_TYPE %%%>'#13#10
+  +'    TROSerializer(ASerializer).ReadDateTime(''%FIELD_NAME%'', l_%FIELD_NAME'
+  +'%);'#13#10'    // <%%% END IF_FIELD_DATETIME_TYPE %%%>'#13#10'    // <%%% S'
+  +'TART IF_FIELD_DECIMAL_TYPE %%%>'#13#10'    TROSerializer(ASerializer).ReadD'
+  +'ecimal(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_D'
+  +'ECIMAL_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_DOUBLE_TYPE %%%>'#13#10
+  +'    TROSerializer(ASerializer).ReadDouble(''%FIELD_NAME%'', ftDouble, l_%FI'
+  +'ELD_NAME%);'#13#10'    // <%%% END IF_FIELD_DOUBLE_TYPE %%%>'#13#10'    // '
+  +'<%%% START IF_FIELD_GUID_TYPE %%%>'#13#10'    TROSerializer(ASerializer).Re'
+  +'adGuid(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_G'
+  +'UID_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_INT64_TYPE %%%>'#13#10'    '
+  +'TROSerializer(ASerializer).ReadInt64(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13
+  +#10'    // <%%% END IF_FIELD_INT64_TYPE %%%>'#13#10'    // <%%% START IF_FIE'
+  +'LD_INTEGER_TYPE %%%>'#13#10'    TROSerializer(ASerializer).ReadInteger(''%F'
+  +'IELD_NAME%'', otSLong, l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_INT'
+  ,'EGER_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_ANSISTRING_TYPE %%%>'#13#10
+  +'    TROSerializer(ASerializer).ReadAnsiString(''%FIELD_NAME%'', l_%FIELD_NA'
+  +'ME%);'#13#10'    // <%%% END IF_FIELD_ANSISTRING_TYPE %%%>'#13#10'    // <%'
+  +'%% START IF_FIELD_UTF8STRING_TYPE %%%>'#13#10'    TROSerializer(ASerializer'
+  +').ReadUTF8String(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    // <%%% END '
+  +'IF_FIELD_UTF8STRING_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_VARIANT_TYP'
+  +'E %%%>'#13#10'    TROSerializer(ASerializer).ReadVariant(''%FIELD_NAME%'', '
+  +'l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_VARIANT_TYPE %%%>'#13#10' '
+  +'   // <%%% START IF_FIELD_WIDESTRING_TYPE %%%>'#13#10'    TROSerializer(ASe'
+  +'rializer).ReadWideString(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    // <'
+  +'%%% END IF_FIELD_WIDESTRING_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_XML'
+  +'_TYPE %%%>'#13#10'    TROSerializer(ASerializer).ReadXml(''%FIELD_NAME%'', '
+  +'l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_XML_TYPE %%%>'#13#10'    /'
+  +'/ <%%% START IF_FIELD_ARRAY_TYPE %%%>'#13#10'    TROSerializer(ASerializer)'
+  +'.ReadArray(''%FIELD_NAME%'', %FIELD_TYPE%, l_%FIELD_NAME%);'#13#10'    if %'
+  +'FIELD_NAME% <> l_%FIELD_NAME% then %FIELD_NAME%.Free;'#13#10'    // <%%% EN'
+  +'D IF_FIELD_ARRAY_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_ENUM_TYPE %%%>'
+  +#13#10'    TROSerializer(ASerializer).ReadEnumerated(''%FIELD_NAME%'', TypeI'
+  +'nfo(%FIELD_TYPE%), l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_ENUM_TY'
+  +'PE %%%>'#13#10'    // <%%% START IF_FIELD_STRUCT_TYPE %%%>'#13#10'    TROSe'
+  +'rializer(ASerializer).ReadStruct(''%FIELD_NAME%'', %FIELD_TYPE%, l_%FIELD_N'
+  +'AME%);'#13#10'    if %FIELD_NAME% <> l_%FIELD_NAME% then %FIELD_NAME%.Free;'
+  +#13#10'    // <%%% END IF_FIELD_STRUCT_TYPE %%%>'#13#10'    %FIELD_NAME% := '
+  +'l_%FIELD_NAME%;'#13#10'    // <%%% END ENTIRE_HIERARCHY_FIELDS %%%>'#13#10
+  +'  end;'#13#10'end;'#13#10#13#10'procedure %EXCEPTION_NAME%.WriteException(A'
+  +'Serializer: TObject);'#13#10'var'#13#10'  // <%%% START ENTIRE_HIERARCHY_FI'
+  +'ELDS %%%>'#13#10'  l_%FIELD_NAME%: %FIELD_TYPE%;'#13#10'  // <%%% END ENTIR'
+  +'E_HIERARCHY_FIELDS %%%>'#13#10'begin'#13#10'  if TROSerializer(ASerializer)'
+  +'.RecordStrictOrder then begin'#13#10'    // <%%% START IF_STRUCT_HAS_ANCEST'
+  +'OR %%%>'#13#10'    inherited;'#13#10'    // <%%% END IF_STRUCT_HAS_ANCESTOR'
+  +' %%%>'#13#10'    // <%%% START FIELDS_NO_STRIP %%%>'#13#10'    l_%FIELD_NAM'
+  +'E% := %FIELD_NAME%;'#13#10'    // <%%% START IF_FIELD_BINARY_TYPE %%%>'#13
+  +#10'    TROSerializer(ASerializer).WriteBinary(''%FIELD_NAME%'', l_%FIELD_NA'
+  +'ME%);'#13#10'    // <%%% END IF_FIELD_BINARY_TYPE %%%>'#13#10'    // <%%% S'
+  +'TART IF_FIELD_BOOLEAN_TYPE %%%>'#13#10'    TROSerializer(ASerializer).Write'
+  +'Enumerated(''%FIELD_NAME%'', TypeInfo(boolean), l_%FIELD_NAME%);'#13#10'   '
+  +' // <%%% END IF_FIELD_BOOLEAN_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_C'
+  +'URRENCY_TYPE %%%>'#13#10'    TROSerializer(ASerializer).WriteDouble(''%FIEL'
+  +'D_NAME%'', ftCurr, l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_CURRENC'
+  +'Y_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_DATETIME_TYPE %%%>'#13#10'   '
+  +' TROSerializer(ASerializer).WriteDateTime(''%FIELD_NAME%'', l_%FIELD_NAME%)'
+  +';'#13#10'    // <%%% END IF_FIELD_DATETIME_TYPE %%%>'#13#10'    // <%%% STA'
+  +'RT IF_FIELD_DECIMAL_TYPE %%%>'#13#10'    TROSerializer(ASerializer).WriteDe'
+  +'cimal(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_DE'
+  +'CIMAL_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_DOUBLE_TYPE %%%>'#13#10' '
+  +'   TROSerializer(ASerializer).WriteDouble(''%FIELD_NAME%'', ftDouble, l_%FI'
+  +'ELD_NAME%);'#13#10'    // <%%% END IF_FIELD_DOUBLE_TYPE %%%>'#13#10'    // '
+  +'<%%% START IF_FIELD_GUID_TYPE %%%>'#13#10'    TROSerializer(ASerializer).Wr'
+  +'iteGuid(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_'
+  +'GUID_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_INT64_TYPE %%%>'#13#10'   '
+  +' TROSerializer(ASerializer).WriteInt64(''%FIELD_NAME%'', l_%FIELD_NAME%);'
+  +#13#10'    // <%%% END IF_FIELD_INT64_TYPE %%%>'#13#10'    // <%%% START IF_'
+  +'FIELD_INTEGER_TYPE %%%>'#13#10'    TROSerializer(ASerializer).WriteInteger('
+  +'''%FIELD_NAME%'', otSLong, l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD'
+  +'_INTEGER_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_ANSISTRING_TYPE %%%>'
+  +#13#10'    TROSerializer(ASerializer).WriteAnsiString(''%FIELD_NAME%'', l_%F'
+  +'IELD_NAME%);'#13#10'    // <%%% END IF_FIELD_ANSISTRING_TYPE %%%>'#13#10'  '
+  +'  // <%%% START IF_FIELD_UTF8STRING_TYPE %%%>'#13#10'    TROSerializer(ASer'
+  +'ializer).WriteUTF8String(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    // <'
+  +'%%% END IF_FIELD_UTF8STRING_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_VAR'
+  +'IANT_TYPE %%%>'#13#10'    TROSerializer(ASerializer).WriteVariant(''%FIELD_'
+  +'NAME%'', l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_VARIANT_TYPE %%%>'
+  +#13#10'    // <%%% START IF_FIELD_WIDESTRING_TYPE %%%>'#13#10'    TROSeriali'
+  +'zer(ASerializer).WriteWideString(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10
+  ,'    // <%%% END IF_FIELD_WIDESTRING_TYPE %%%>'#13#10'    // <%%% START IF_F'
+  +'IELD_XML_TYPE %%%>'#13#10'    TROSerializer(ASerializer).WriteXml(''%FIELD_'
+  +'NAME%'', l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_XML_TYPE %%%>'#13
+  +#10'    // <%%% START IF_FIELD_ARRAY_TYPE %%%>'#13#10'    TROSerializer(ASer'
+  +'ializer).WriteArray(''%FIELD_NAME%'', l_%FIELD_NAME%, %FIELD_TYPE%);'#13#10
+  +'    // <%%% END IF_FIELD_ARRAY_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_'
+  +'ENUM_TYPE %%%>'#13#10'    TROSerializer(ASerializer).WriteEnumerated(''%FIE'
+  +'LD_NAME%'', TypeInfo(%FIELD_TYPE%), l_%FIELD_NAME%);'#13#10'    // <%%% END'
+  +' IF_FIELD_ENUM_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_STRUCT_TYPE %%%>'
+  +#13#10'    TROSerializer(ASerializer).WriteStruct(''%FIELD_NAME%'', l_%FIELD'
+  +'_NAME%, %FIELD_TYPE%);'#13#10'    // <%%% END IF_FIELD_STRUCT_TYPE %%%>'#13
+  +#10'    // <%%% END FIELDS_NO_STRIP %%%>'#13#10'  end'#13#10'  else begin'#13
+  +#10'    // <%%% START ENTIRE_HIERARCHY_FIELDS %%%>'#13#10'    l_%FIELD_NAME%'
+  +' := %FIELD_NAME%;'#13#10'    // <%%% START IF_FIELD_BINARY_TYPE %%%>'#13#10
+  +'    TROSerializer(ASerializer).WriteBinary(''%FIELD_NAME%'', l_%FIELD_NAME%'
+  +');'#13#10'    // <%%% END IF_FIELD_BINARY_TYPE %%%>'#13#10'    // <%%% STAR'
+  +'T IF_FIELD_BOOLEAN_TYPE %%%>'#13#10'    TROSerializer(ASerializer).WriteEnu'
+  +'merated(''%FIELD_NAME%'', TypeInfo(boolean), l_%FIELD_NAME%);'#13#10'    //'
+  +' <%%% END IF_FIELD_BOOLEAN_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_CURR'
+  +'ENCY_TYPE %%%>'#13#10'    TROSerializer(ASerializer).WriteDouble(''%FIELD_N'
+  +'AME%'', ftCurr, l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_CURRENCY_T'
+  +'YPE %%%>'#13#10'    // <%%% START IF_FIELD_DATETIME_TYPE %%%>'#13#10'    TR'
+  +'OSerializer(ASerializer).WriteDateTime(''%FIELD_NAME%'', l_%FIELD_NAME%);'
+  +#13#10'    // <%%% END IF_FIELD_DATETIME_TYPE %%%>'#13#10'    // <%%% START '
+  +'IF_FIELD_DECIMAL_TYPE %%%>'#13#10'    TROSerializer(ASerializer).WriteDecim'
+  +'al(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_DECIM'
+  +'AL_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_DOUBLE_TYPE %%%>'#13#10'    '
+  +'TROSerializer(ASerializer).WriteDouble(''%FIELD_NAME%'', ftDouble, l_%FIELD'
+  +'_NAME%);'#13#10'    // <%%% END IF_FIELD_DOUBLE_TYPE %%%>'#13#10'    // <%%'
+  +'% START IF_FIELD_GUID_TYPE %%%>'#13#10'    TROSerializer(ASerializer).Write'
+  +'Guid(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_GUI'
+  +'D_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_INT64_TYPE %%%>'#13#10'    TR'
+  +'OSerializer(ASerializer).WriteInt64(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13
+  +#10'    // <%%% END IF_FIELD_INT64_TYPE %%%>'#13#10'    // <%%% START IF_FIE'
+  +'LD_INTEGER_TYPE %%%>'#13#10'    TROSerializer(ASerializer).WriteInteger(''%'
+  +'FIELD_NAME%'', otSLong, l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_IN'
+  +'TEGER_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_ANSISTRING_TYPE %%%>'#13
+  +#10'    TROSerializer(ASerializer).WriteAnsiString(''%FIELD_NAME%'', l_%FIEL'
+  +'D_NAME%);'#13#10'    // <%%% END IF_FIELD_ANSISTRING_TYPE %%%>'#13#10'    /'
+  +'/ <%%% START IF_FIELD_UTF8STRING_TYPE %%%>'#13#10'    TROSerializer(ASerial'
+  +'izer).WriteUTF8String(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    // <%%%'
+  +' END IF_FIELD_UTF8STRING_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_VARIAN'
+  +'T_TYPE %%%>'#13#10'    TROSerializer(ASerializer).WriteVariant(''%FIELD_NAM'
+  +'E%'', l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_VARIANT_TYPE %%%>'#13
+  +#10'    // <%%% START IF_FIELD_WIDESTRING_TYPE %%%>'#13#10'    TROSerializer'
+  +'(ASerializer).WriteWideString(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'   '
+  +' // <%%% END IF_FIELD_WIDESTRING_TYPE %%%>'#13#10'    // <%%% START IF_FIEL'
+  +'D_XML_TYPE %%%>'#13#10'    TROSerializer(ASerializer).WriteXml(''%FIELD_NAM'
+  +'E%'', l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_XML_TYPE %%%>'#13#10
+  +'    // <%%% START IF_FIELD_ARRAY_TYPE %%%>'#13#10'    TROSerializer(ASerial'
+  +'izer).WriteArray(''%FIELD_NAME%'', l_%FIELD_NAME%, %FIELD_TYPE%);'#13#10'  '
+  +'  // <%%% END IF_FIELD_ARRAY_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_EN'
+  +'UM_TYPE %%%>'#13#10'    TROSerializer(ASerializer).WriteEnumerated(''%FIELD'
+  +'_NAME%'', TypeInfo(%FIELD_TYPE%), l_%FIELD_NAME%);'#13#10'    // <%%% END I'
+  +'F_FIELD_ENUM_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_STRUCT_TYPE %%%>'
+  +#13#10'    TROSerializer(ASerializer).WriteStruct(''%FIELD_NAME%'', l_%FIELD'
+  +'_NAME%, %FIELD_TYPE%);'#13#10'    // <%%% END IF_FIELD_STRUCT_TYPE %%%>'#13
+  +#10'    // <%%% END ENTIRE_HIERARCHY_FIELDS %%%>'#13#10'  end;'#13#10'end;'
+  +#13#10#13#10'// <%%% END IF_HAS_FIELDS %%%>'#13#10'// <%%% END EXCEPTIONS %%'
+  +'%>'#13#10'// <%%% START ARRAYS %%%>'#13#10'{ %ARRAY_NAME% }'#13#10#13#10'pr'
+  +'ocedure %ARRAY_NAME%.Assign(iSource: TPersistent);'#13#10'var lSource:%ARRA'
+  +'Y_NAME%;'#13#10'    i:integer;'#13#10'begin'#13#10'  if (iSource is %ARRAY_'
+  +'NAME%) then begin'#13#10'    lSource := %ARRAY_NAME%(iSource);'#13#10'    C'
+  +'lear();'#13#10'    Resize(lSource.Count);'#13#10'    '#13#10'    for i := 0'
+  ,' to Count-1 do begin'#13#10'      // <%%% START IF_ARRAY_TYPE_COMPLEX %%%>'
+  +#13#10'      if Assigned(lSource.Items[i]) then begin'#13#10'        Items[i'
+  +'].Assign(lSource.Items[i]);'#13#10'      end;'#13#10'      // <%%% END IF_A'
+  +'RRAY_TYPE_COMPLEX %%%>'#13#10'      // <%%% START IF_ARRAY_TYPE_SIMPLE %%%>'
+  +#13#10'      Items[i] := lSource.Items[i];'#13#10'      // <%%% END IF_ARRAY'
+  +'_TYPE_SIMPLE %%%>'#13#10'    end;'#13#10'  end'#13#10'  else begin'#13#10' '
+  +'   inherited Assign(iSource);'#13#10'  end;'#13#10'end;'#13#10#13#10'class '
+  +'function %ARRAY_NAME%.GetItemType: PTypeInfo;'#13#10'begin'#13#10'  result '
+  +':= TypeInfo(%ARRAY_TYPE%);'#13#10'end;'#13#10#13#10'// <%%% START IF_ARRAY_'
+  +'TYPE_COMPLEX %%%>'#13#10'class function %ARRAY_NAME%.GetItemClass: TClass;'
+  +#13#10'begin'#13#10'  result := %ARRAY_TYPE%;'#13#10'end;'#13#10'// <%%% END'
+  +' IF_ARRAY_TYPE_COMPLEX %%%>'#13#10#13#10'class function %ARRAY_NAME%.GetIte'
+  +'mSize: integer;'#13#10'begin'#13#10'  result := SizeOf(%ARRAY_TYPE%);'#13#10
+  +'end;'#13#10#13#10'function %ARRAY_NAME%.GetItems(aIndex: integer): %ARRAY_T'
+  +'YPE%;'#13#10'begin'#13#10'  if (aIndex < 0) or (aIndex >= Count) then Raise'
+  +'Error(err_ArrayIndexOutOfBounds,[aIndex]);'#13#10'  result := fItems[aIndex'
+  +'];'#13#10'end;'#13#10#13#10'function %ARRAY_NAME%.GetItemRef(aIndex: intege'
+  +'r): pointer;'#13#10'begin'#13#10'  if (aIndex < 0) or (aIndex >= Count) the'
+  +'n RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);'#13#10'  // <%%% START IF'
+  +'_ARRAY_TYPE_COMPLEX %%%>'#13#10'  result := fItems[aIndex];'#13#10'  // <%%'
+  +'% END IF_ARRAY_TYPE_COMPLEX %%%>'#13#10'  // <%%% START IF_ARRAY_TYPE_SIMPL'
+  +'E %%%>'#13#10'  result := @fItems[aIndex];'#13#10'  // <%%% END IF_ARRAY_TY'
+  +'PE_SIMPLE %%%>'#13#10'end;'#13#10#13#10'// <%%% START IF_ARRAY_TYPE_COMPLEX'
+  +' %%%>'#13#10'procedure %ARRAY_NAME%.SetItemRef(aIndex: integer; Ref: pointe'
+  +'r);'#13#10'begin'#13#10'  if (aIndex < 0) or (aIndex >= Count) then RaiseEr'
+  +'ror(err_ArrayIndexOutOfBounds,[aIndex]);'#13#10'  if Ref <> fItems[aIndex] '
+  +'then begin'#13#10'    if fItems[aIndex] <> nil then fItems[aIndex].Free;'#13
+  +#10'    fItems[aIndex] := Ref;'#13#10'  end;'#13#10'end;'#13#10'// <%%% END '
+  +'IF_ARRAY_TYPE_COMPLEX %%%>'#13#10#13#10'procedure %ARRAY_NAME%.Clear;'#13#10
+  +'// <%%% START IF_ARRAY_TYPE_COMPLEX %%%>'#13#10'var i: integer;'#13#10'// <'
+  +'%%% END IF_ARRAY_TYPE_COMPLEX %%%>'#13#10'begin'#13#10'  // <%%% START IF_A'
+  +'RRAY_TYPE_COMPLEX %%%>'#13#10'  for i := 0 to (Count-1) do fItems[i].Free()'
+  +';'#13#10'  // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>'#13#10'  SetLength(fItems'
+  +', 0);'#13#10'  FCount := 0;'#13#10'end;'#13#10#13#10'procedure %ARRAY_NAME%'
+  +'.Delete(aIndex: integer);'#13#10'var i: integer;'#13#10'begin'#13#10'  if ('
+  +'aIndex>=Count) then RaiseError(err_InvalidIndex, [aIndex]);'#13#10#13#10'  '
+  +'// <%%% START IF_ARRAY_TYPE_COMPLEX %%%>'#13#10'  fItems[aIndex].Free();'#13
+  +#10'  // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>'#13#10'  '#13#10'  if (aIndex<C'
+  +'ount-1) then'#13#10'    for i := aIndex to Count-2 do fItems[i] := fItems[i'
+  +'+1];'#13#10#13#10'  SetLength(fItems, Count-1);'#13#10'  Dec(FCount);'#13#10
+  +'end;'#13#10#13#10'procedure %ARRAY_NAME%.SetItems(aIndex: integer; const Va'
+  +'lue: %ARRAY_TYPE%);'#13#10'begin'#13#10'  if (aIndex < 0) or (aIndex >= Cou'
+  +'nt) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);'#13#10'  // <%%% S'
+  +'TART IF_ARRAY_TYPE_COMPLEX %%%>  '#13#10'  if fItems[aIndex] <> Value then '
+  +'begin'#13#10'    fItems[aIndex].Free;    '#13#10'    fItems[aIndex] := Valu'
+  +'e;'#13#10'  end;'#13#10'  // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>  '#13#10' '
+  +' // <%%% START IF_ARRAY_TYPE_SIMPLE %%%>'#13#10'  fItems[aIndex] := Value; '
+  +' '#13#10'  // <%%% END IF_ARRAY_TYPE_SIMPLE %%%>  '#13#10'end;'#13#10#13#10
+  +'procedure %ARRAY_NAME%.Resize(ElementCount: integer);'#13#10'// <%%% START '
+  +'IF_ARRAY_TYPE_COMPLEX %%%>'#13#10'var i: Integer;'#13#10'// <%%% END IF_ARR'
+  +'AY_TYPE_COMPLEX %%%>'#13#10'begin'#13#10'  if fCount = ElementCount then Ex'
+  +'it;'#13#10'// <%%% START IF_ARRAY_TYPE_COMPLEX %%%>'#13#10'  for i := FCoun'
+  +'t -1 downto ElementCount do'#13#10'    FItems[i].Free;'#13#10'// <%%% END I'
+  +'F_ARRAY_TYPE_COMPLEX %%%>'#13#10'  SetLength(fItems, ElementCount);'#13#10
+  +'// <%%% START IF_ARRAY_TYPE_COMPLEX %%%>'#13#10'  for i := FCount to Elemen'
+  +'tCount -1 do'#13#10'    FItems[i] := %ARRAY_TYPE%.Create;'#13#10'// <%%% EN'
+  +'D IF_ARRAY_TYPE_COMPLEX %%%>'#13#10'  FCount := ElementCount;'#13#10'end;'
+  +#13#10#13#10'function %ARRAY_NAME%.GetCount: integer;'#13#10'begin'#13#10'  '
+  +'result := FCount;'#13#10'end;'#13#10#13#10'procedure %ARRAY_NAME%.Grow;'#13
+  +#10'var'#13#10'  Delta, Capacity: Integer;'#13#10'begin'#13#10'  Capacity :='
+  +' Length(fItems);'#13#10'  if Capacity > 64 then'#13#10'    Delta := Capacit'
+  +'y div 4'#13#10'  else'#13#10'    if Capacity > 8 then'#13#10'      Delta :='
+  +' 16'#13#10'   else'#13#10'      Delta := 4;'#13#10'  SetLength(fItems, Capa'
+  +'city + Delta);'#13#10'end;'#13#10#13#10'// <%%% START IF_ARRAY_TYPE_COMPLEX'
+  ,' %%%>'#13#10'function %ARRAY_NAME%.Add: %ARRAY_TYPE%;'#13#10'begin'#13#10' '
+  +' result := %ARRAY_TYPE%.Create;'#13#10'  Add(Result);'#13#10'end;'#13#10'//'
+  +' <%%% END IF_ARRAY_TYPE_COMPLEX %%%>'#13#10#13#10'function %ARRAY_NAME%.Add'
+  +'(const Value:%ARRAY_TYPE%): integer;'#13#10'begin'#13#10'  Result := Count;'
+  +#13#10'  if Length(fItems) = Result then'#13#10'    Grow;'#13#10'  fItems[re'
+  +'sult] := Value;'#13#10'  Inc(fCount);'#13#10'end;'#13#10#13#10'// <%%% STAR'
+  +'T IF_ARRAY_TYPE_SIMPLE %%%>'#13#10'function %ARRAY_NAME%.GetIndex(const aPr'
+  +'opertyName : string;'#13#10'  const aPropertyValue : Variant; StartFrom : i'
+  +'nteger;'#13#10'  Options : TROSearchOptions) : integer;'#13#10'begin'#13#10
+  +'  result := -1;'#13#10'end;'#13#10'// <%%% END IF_ARRAY_TYPE_SIMPLE %%%>'#13
+  +#10#13#10'procedure %ARRAY_NAME%.ReadComplex(ASerializer: TObject);'#13#10'v'
+  +'ar'#13#10'  lval: %ARRAY_TYPE%;'#13#10'  i: integer;'#13#10'begin'#13#10'  '
+  +'for i := 0 to Count-1 do begin'#13#10'    with TROSerializer(ASerializer) d'
+  +'o'#13#10'      // <%%% START IF_ARRAY_BINARY_TYPE %%%>'#13#10'      ReadBin'
+  +'ary(GetArrayElementName(GetItemType, GetItemRef(i)), lval, i);'#13#10'     '
+  +' // <%%% END IF_ARRAY_BINARY_TYPE %%%>'#13#10'      // <%%% START IF_ARRAY_'
+  +'BOOLEAN_TYPE %%%>'#13#10'      ReadEnumerated(GetArrayElementName(GetItemTy'
+  +'pe, GetItemRef(i)), TypeInfo(boolean), lval, i);'#13#10'      // <%%% END I'
+  +'F_ARRAY_BOOLEAN_TYPE %%%>'#13#10'      // <%%% START IF_ARRAY_CURRENCY_TYPE'
+  +' %%%>'#13#10'      ReadDouble(GetArrayElementName(GetItemType, GetItemRef(i'
+  +')), ftCurr, lval, i);'#13#10'      // <%%% END IF_ARRAY_CURRENCY_TYPE %%%>'
+  +#13#10'      // <%%% START IF_ARRAY_DATETIME_TYPE %%%>'#13#10'      ReadDate'
+  +'Time(GetArrayElementName(GetItemType, GetItemRef(i)), lval, i);'#13#10'    '
+  +'  // <%%% END IF_ARRAY_DATETIME_TYPE %%%>'#13#10'      // <%%% START IF_ARR'
+  +'AY_DECIMAL_TYPE %%%>'#13#10'      ReadDecimal(GetArrayElementName(GetItemTy'
+  +'pe, GetItemRef(i)), lval, i);'#13#10'      // <%%% END IF_ARRAY_DECIMAL_TYP'
+  +'E %%%>'#13#10'      // <%%% START IF_ARRAY_DOUBLE_TYPE %%%>'#13#10'      Re'
+  +'adDouble(GetArrayElementName(GetItemType, GetItemRef(i)), ftDouble, lval, i'
+  +');'#13#10'      // <%%% END IF_ARRAY_DOUBLE_TYPE %%%>'#13#10'      // <%%% '
+  +'START IF_ARRAY_GUID_TYPE %%%>'#13#10'      ReadGuid(GetArrayElementName(Get'
+  +'ItemType, GetItemRef(i)), lval, i);'#13#10'      // <%%% END IF_ARRAY_GUID_'
+  +'TYPE %%%>'#13#10'      // <%%% START IF_ARRAY_INT64_TYPE %%%>'#13#10'      '
+  +'ReadInt64(GetArrayElementName(GetItemType, GetItemRef(i)), lval, i);'#13#10
+  +'      // <%%% END IF_ARRAY_INT64_TYPE %%%>'#13#10'      // <%%% START IF_AR'
+  +'RAY_INTEGER_TYPE %%%>'#13#10'      ReadInteger(GetArrayElementName(GetItemT'
+  +'ype, GetItemRef(i)), otSLong, lval, i);'#13#10'      // <%%% END IF_ARRAY_I'
+  +'NTEGER_TYPE %%%>'#13#10'      // <%%% START IF_ARRAY_ANSISTRING_TYPE %%%>'
+  +#13#10'      ReadUTF8String(GetArrayElementName(GetItemType, GetItemRef(i)),'
+  +' lval, i);'#13#10'      // <%%% END IF_ARRAY_ANSISTRING_TYPE %%%>'#13#10'  '
+  +'    // <%%% START IF_ARRAY_UTF8STRING_TYPE %%%>'#13#10'      ReadUTF8String'
+  +'(GetArrayElementName(GetItemType, GetItemRef(i)), lval, i);'#13#10'      //'
+  +' <%%% END IF_ARRAY_UTF8STRING_TYPE %%%>'#13#10'      // <%%% START IF_ARRAY'
+  +'_VARIANT_TYPE %%%>'#13#10'      ReadVariant(GetArrayElementName(GetItemType'
+  +', GetItemRef(i)), lval, i);'#13#10'      // <%%% END IF_ARRAY_VARIANT_TYPE '
+  +'%%%>'#13#10'      // <%%% START IF_ARRAY_WIDESTRING_TYPE %%%>'#13#10'      '
+  +'ReadWideString(GetArrayElementName(GetItemType, GetItemRef(i)), lval, i);'
+  +#13#10'      // <%%% END IF_ARRAY_WIDESTRING_TYPE %%%>'#13#10'      // <%%% '
+  +'START IF_ARRAY_XML_TYPE %%%>'#13#10'      ReadXml(GetArrayElementName(GetIt'
+  +'emType, GetItemRef(i)), lval, i);'#13#10'      // <%%% END IF_ARRAY_XML_TYP'
+  +'E %%%>'#13#10'      // <%%% START IF_ARRAY_ARRAY_TYPE %%%>'#13#10'      Rea'
+  +'dArray(GetArrayElementName(GetItemType, GetItemRef(i)), %ARRAY_TYPE%, lval,'
+  +' i);'#13#10'      // <%%% END IF_ARRAY_ARRAY_TYPE %%%>'#13#10'      // <%%%'
+  +' START IF_ARRAY_ENUM_TYPE %%%>'#13#10'      ReadEnumerated(GetArrayElementN'
+  +'ame(GetItemType, GetItemRef(i)), TypeInfo(%ARRAY_TYPE%), lval, i);'#13#10' '
+  +'     // <%%% END IF_ARRAY_ENUM_TYPE %%%>'#13#10'      // <%%% START IF_ARRA'
+  +'Y_STRUCT_TYPE %%%>'#13#10'      ReadStruct(GetArrayElementName(GetItemType,'
+  +' GetItemRef(i)), %ARRAY_TYPE%, lval, i);'#13#10'      // <%%% END IF_ARRAY_'
+  +'STRUCT_TYPE %%%>'#13#10'    Items[i] := lval;'#13#10'  end;'#13#10'end;'#13
+  +#10#13#10'procedure %ARRAY_NAME%.WriteComplex(ASerializer: TObject);'#13#10
+  +'var'#13#10'  i: integer;'#13#10'begin'#13#10'  for i := 0 to Count-1 do'#13
+  +#10'    with TROSerializer(ASerializer) do'#13#10'      // <%%% START IF_ARR'
+  +'AY_BINARY_TYPE %%%>'#13#10'      WriteBinary(GetArrayElementName(GetItemTyp'
+  +'e, GetItemRef(i)), fItems[i], i);'#13#10'      // <%%% END IF_ARRAY_BINARY_'
+  +'TYPE %%%>'#13#10'      // <%%% START IF_ARRAY_BOOLEAN_TYPE %%%>'#13#10'    '
+  ,'  WriteEnumerated(GetArrayElementName(GetItemType, GetItemRef(i)), TypeInfo'
+  +'(boolean), fItems[i], i);'#13#10'      // <%%% END IF_ARRAY_BOOLEAN_TYPE %%'
+  +'%>'#13#10'      // <%%% START IF_ARRAY_CURRENCY_TYPE %%%>'#13#10'      Writ'
+  +'eDouble(GetArrayElementName(GetItemType, GetItemRef(i)), ftCurr, fItems[i],'
+  +' i);'#13#10'      // <%%% END IF_ARRAY_CURRENCY_TYPE %%%>'#13#10'      // <'
+  +'%%% START IF_ARRAY_DATETIME_TYPE %%%>'#13#10'      WriteDateTime(GetArrayEl'
+  +'ementName(GetItemType, GetItemRef(i)), fItems[i], i);'#13#10'      // <%%% '
+  +'END IF_ARRAY_DATETIME_TYPE %%%>'#13#10'      // <%%% START IF_ARRAY_DECIMAL'
+  +'_TYPE %%%>'#13#10'      WriteDecimal(GetArrayElementName(GetItemType, GetIt'
+  +'emRef(i)), fItems[i], i);'#13#10'      // <%%% END IF_ARRAY_DECIMAL_TYPE %%'
+  +'%>'#13#10'      // <%%% START IF_ARRAY_DOUBLE_TYPE %%%>'#13#10'      WriteD'
+  +'ouble(GetArrayElementName(GetItemType, GetItemRef(i)), ftDouble, fItems[i],'
+  +' i);'#13#10'      // <%%% END IF_ARRAY_DOUBLE_TYPE %%%>'#13#10'      // <%%'
+  +'% START IF_ARRAY_GUID_TYPE %%%>'#13#10'      WriteGuid(GetArrayElementName('
+  +'GetItemType, GetItemRef(i)), fItems[i], i);'#13#10'      // <%%% END IF_ARR'
+  +'AY_GUID_TYPE %%%>'#13#10'      // <%%% START IF_ARRAY_INT64_TYPE %%%>'#13#10
+  +'      WriteInt64(GetArrayElementName(GetItemType, GetItemRef(i)), fItems[i]'
+  +', i);'#13#10'      // <%%% END IF_ARRAY_INT64_TYPE %%%>'#13#10'      // <%%'
+  +'% START IF_ARRAY_INTEGER_TYPE %%%>'#13#10'      WriteInteger(GetArrayElemen'
+  +'tName(GetItemType, GetItemRef(i)), otSLong, fItems[i], i);'#13#10'      // '
+  +'<%%% END IF_ARRAY_INTEGER_TYPE %%%>'#13#10'      // <%%% START IF_ARRAY_ANS'
+  +'ISTRING_TYPE %%%>'#13#10'      WriteUTF8String(GetArrayElementName(GetItemT'
+  +'ype, GetItemRef(i)), fItems[i], i);'#13#10'      // <%%% END IF_ARRAY_ANSIS'
+  +'TRING_TYPE %%%>'#13#10'      // <%%% START IF_ARRAY_UTF8STRING_TYPE %%%>'#13
+  +#10'      WriteUTF8String(GetArrayElementName(GetItemType, GetItemRef(i)), f'
+  +'Items[i], i);'#13#10'      // <%%% END IF_ARRAY_UTF8STRING_TYPE %%%>'#13#10
+  +'      // <%%% START IF_ARRAY_VARIANT_TYPE %%%>'#13#10'      WriteVariant(Ge'
+  +'tArrayElementName(GetItemType, GetItemRef(i)), fItems[i], i);'#13#10'      '
+  +'// <%%% END IF_ARRAY_VARIANT_TYPE %%%>'#13#10'      // <%%% START IF_ARRAY_'
+  +'WIDESTRING_TYPE %%%>'#13#10'      WriteWideString(GetArrayElementName(GetIt'
+  +'emType, GetItemRef(i)), fItems[i], i);'#13#10'      // <%%% END IF_ARRAY_WI'
+  +'DESTRING_TYPE %%%>'#13#10'      // <%%% START IF_ARRAY_XML_TYPE %%%>'#13#10
+  +'      WriteXml(GetArrayElementName(GetItemType, GetItemRef(i)), fItems[i], '
+  +'i);'#13#10'      // <%%% END IF_ARRAY_XML_TYPE %%%>'#13#10'      // <%%% ST'
+  +'ART IF_ARRAY_ARRAY_TYPE %%%>'#13#10'      WriteArray(GetArrayElementName(Ge'
+  +'tItemType, GetItemRef(i)), fItems[i], , %ARRAY_TYPE%, i);'#13#10'      // <'
+  +'%%% END IF_ARRAY_ARRAY_TYPE %%%>'#13#10'      // <%%% START IF_ARRAY_ENUM_T'
+  +'YPE %%%>'#13#10'      WriteEnumerated(GetArrayElementName(GetItemType, GetI'
+  +'temRef(i)), TypeInfo(%ARRAY_TYPE%), fItems[i], i);'#13#10'      // <%%% END'
+  +' IF_ARRAY_ENUM_TYPE %%%>'#13#10'      // <%%% START IF_ARRAY_STRUCT_TYPE %%'
+  +'%>'#13#10'      WriteStruct(GetArrayElementName(GetItemType, GetItemRef(i))'
+  +', fItems[i], %ARRAY_TYPE%, i);'#13#10'      // <%%% END IF_ARRAY_STRUCT_TYP'
+  +'E %%%>'#13#10'end;'#13#10#13#10'// <%%% END ARRAYS %%%>'#13#10'// <%%% STAR'
+  +'T STRUCTS %%%>'#13#10'{ %STRUCT_NAME% }'#13#10#13#10'procedure %STRUCT_NAME'
+  +'%.Assign(iSource: TPersistent);'#13#10'// <%%% START IF_HAS_FIELDS %%%>'#13
+  +#10'var'#13#10'  lSource: %STRUCT_NAME%;'#13#10'// <%%% END IF_HAS_FIELDS %%'
+  +'%>'#13#10'begin'#13#10'  inherited Assign(iSource);'#13#10'  // <%%% START '
+  +'IF_HAS_FIELDS %%%>'#13#10'  if (iSource is %STRUCT_NAME%) then begin'#13#10
+  +'    lSource := %STRUCT_NAME%(iSource);'#13#10#13#10'  // <%%% END IF_HAS_FI'
+  +'ELDS %%%>'#13#10'    // <%%% START FIELDS_NO_STRIP %%%>'#13#10'    // <%%% '
+  +'START IF_FIELD_TYPE_SIMPLE %%%>'#13#10'    %FIELD_NAME% := lSource.%FIELD_N'
+  +'AME%;'#13#10'    // <%%% END IF_FIELD_TYPE_SIMPLE %%%>'#13#10'    // <%%% S'
+  +'TART IF_FIELD_TYPE_COMPLEX %%%>'#13#10'    // <%%% START IF_NOT_AUTO_CREATE'
+  +'_FIELDS %%%>'#13#10'    if Assigned(f%FIELD_NAME%) then begin'#13#10'      '
+  +'if Assigned(lSource.%FIELD_NAME%) then'#13#10'        %FIELD_NAME%.Assign(l'
+  +'Source.%FIELD_NAME%)'#13#10'      else'#13#10'        FreeAndNil(f%FIELD_NA'
+  +'ME%);'#13#10'    end;'#13#10'    // <%%% END IF_NOT_AUTO_CREATE_FIELDS %%%>'
+  +#13#10'    // <%%% START IF_AUTO_CREATE_FIELDS %%%>'#13#10'    %FIELD_NAME%.'
+  +'Assign(lSource.%FIELD_NAME%);'#13#10'    // <%%% END IF_AUTO_CREATE_FIELDS '
+  +'%%%>'#13#10'    // <%%% END IF_FIELD_TYPE_COMPLEX %%%>'#13#10'    // <%%% E'
+  +'ND FIELDS_NO_STRIP %%%>'#13#10'  // <%%% START IF_HAS_FIELDS %%%>'#13#10'  '
+  +'end;'#13#10'  // <%%% END IF_HAS_FIELDS %%%>'#13#10'end;'#13#10#13#10'// <%'
+  +'%% START STRUCT_GENERATE_DEFAULT_VALUES %%%>'#13#10'constructor %STRUCT_NAM'
+  +'E%.Create(aCollection : TCollection);'#13#10'begin'#13#10'  inherited Creat'
+  ,'e(aCollection);'#13#10'  // <%%% START FIELDS_NO_STRIP %%%>'#13#10'  // <%%'
+  +'% START IF_FIELD_HAS_DEFAULT_VALUE %%%>'#13#10'  // <%%% START IF_FIELD_BOO'
+  +'LEAN_TYPE %%%>'#13#10'  f%FIELD_NAME% := %DEFAULT_VALUE%;'#13#10'  // <%%% '
+  +'END IF_FIELD_BOOLEAN_TYPE %%%>'#13#10'  // <%%% START IF_FIELD_CURRENCY_TYP'
+  +'E %%%>'#13#10'  f%FIELD_NAME% := %DEFAULT_VALUE%;'#13#10'  // <%%% END IF_F'
+  +'IELD_CURRENCY_TYPE %%%>'#13#10'  // <%%% START IF_FIELD_DATETIME_TYPE %%%>'
+  +#13#10'  f%FIELD_NAME% := StrToDateTimeDef(''%DEFAULT_VALUE%'',0);'#13#10'  '
+  +'// <%%% END IF_FIELD_DATETIME_TYPE %%%>'#13#10'  // <%%% START IF_FIELD_DEC'
+  +'IMAL_TYPE %%%>'#13#10'  f%FIELD_NAME% := %DEFAULT_VALUE%;'#13#10'  // <%%% '
+  +'END IF_FIELD_DECIMAL_TYPE %%%>'#13#10'  // <%%% START IF_FIELD_DOUBLE_TYPE '
+  +'%%%>'#13#10'  f%FIELD_NAME% := %DEFAULT_VALUE%;'#13#10'  // <%%% END IF_FIE'
+  +'LD_DOUBLE_TYPE %%%>'#13#10'  // <%%% START IF_FIELD_GUID_TYPE %%%>'#13#10' '
+  +' f%FIELD_NAME% := ''%DEFAULT_VALUE%'';'#13#10'  // <%%% END IF_FIELD_GUID_T'
+  +'YPE %%%>'#13#10'  // <%%% START IF_FIELD_INT64_TYPE %%%>'#13#10'  f%FIELD_N'
+  +'AME% := %DEFAULT_VALUE%;'#13#10'  // <%%% END IF_FIELD_INT64_TYPE %%%>'#13
+  +#10'  // <%%% START IF_FIELD_INTEGER_TYPE %%%>'#13#10'  f%FIELD_NAME% := %DE'
+  +'FAULT_VALUE%;'#13#10'  // <%%% END IF_FIELD_INTEGER_TYPE %%%>'#13#10'  // <'
+  +'%%% START IF_FIELD_ANSISTRING_TYPE %%%>'#13#10'  f%FIELD_NAME% := ''%DEFAUL'
+  +'T_VALUE%'';'#13#10'  // <%%% END IF_FIELD_ANSISTRING_TYPE %%%>'#13#10'  // '
+  +'<%%% START IF_FIELD_UTF8STRING_TYPE %%%>'#13#10'  f%FIELD_NAME% := ''%DEFAU'
+  +'LT_VALUE%'';'#13#10'  // <%%% END IF_FIELD_UTF8STRING_TYPE %%%>'#13#10'  //'
+  +' <%%% START IF_FIELD_VARIANT_TYPE %%%>'#13#10'  f%FIELD_NAME% := ''%DEFAULT'
+  +'_VALUE%'';'#13#10'  // <%%% END IF_FIELD_VARIANT_TYPE %%%>'#13#10'  // <%%%'
+  +' START IF_FIELD_WIDESTRING_TYPE %%%>'#13#10'  f%FIELD_NAME% := ''%DEFAULT_V'
+  +'ALUE%'';'#13#10'  // <%%% END IF_FIELD_WIDESTRING_TYPE %%%>'#13#10'  // <%%'
+  +'% END IF_FIELD_HAS_DEFAULT_VALUE %%%>'#13#10'  // <%%% END FIELDS_NO_STRIP '
+  +'%%%>'#13#10'end;'#13#10'// <%%% END STRUCT_GENERATE_DEFAULT_VALUES %%%>'#13
+  +#10#13#10'destructor %STRUCT_NAME%.Destroy;'#13#10'begin'#13#10'  FDestroyin'
+  +'g := True;'#13#10'  try'#13#10'    inherited Destroy;'#13#10'  finally'#13
+  +#10'    FDestroying := False;'#13#10'  end;'#13#10'end;'#13#10#13#10'// <%%%'
+  +' START FIELDS_NO_STRIP %%%>'#13#10'// <%%% START IF_FIELD_TYPE_COMPLEX %%%>'
+  +#13#10'function %STRUCT_NAME%.Get%FIELD_NAME%: %FIELD_TYPE%;'#13#10'begin'#13
+  +#10'  // <%%% START IF_AUTO_CREATE_FIELDS %%%>'#13#10'  if not Assigned(f%FI'
+  +'ELD_NAME%) and not FDestroying then'#13#10'    f%FIELD_NAME% := %FIELD_TYPE'
+  +'%.Create();'#13#10'  // <%%% END IF_AUTO_CREATE_FIELDS %%%>'#13#10'  Result'
+  +' := f%FIELD_NAME%;'#13#10'end;'#13#10'// <%%% END IF_FIELD_TYPE_COMPLEX %%%'
+  +'>'#13#10'// <%%% END FIELDS_NO_STRIP %%%>'#13#10#13#10'// <%%% START IF_HAS'
+  +'_FIELDS %%%>'#13#10'procedure %STRUCT_NAME%.ReadComplex(ASerializer: TObjec'
+  +'t);'#13#10'var'#13#10'  // <%%% START ENTIRE_HIERARCHY_FIELDS %%%>'#13#10' '
+  +' l_%FIELD_NAME%: %FIELD_TYPE%;'#13#10'  // <%%% END ENTIRE_HIERARCHY_FIELDS'
+  +' %%%>'#13#10'begin'#13#10'  if TROSerializer(ASerializer).RecordStrictOrder'
+  +' then begin'#13#10'    // <%%% START IF_STRUCT_HAS_ANCESTOR %%%>'#13#10'   '
+  +' inherited;'#13#10'    // <%%% END IF_STRUCT_HAS_ANCESTOR %%%>'#13#10'    /'
+  +'/ <%%% START FIELDS_NO_STRIP %%%>'#13#10'    l_%FIELD_NAME% := %FIELD_NAME%'
+  +';'#13#10'    // <%%% START IF_FIELD_BINARY_TYPE %%%>'#13#10'    TROSerializ'
+  +'er(ASerializer).ReadBinary(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    if'
+  +' %FIELD_NAME% <> l_%FIELD_NAME% then %FIELD_NAME%.Free;'#13#10'    // <%%% '
+  +'END IF_FIELD_BINARY_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_BOOLEAN_TYP'
+  +'E %%%>'#13#10'    TROSerializer(ASerializer).ReadEnumerated(''%FIELD_NAME%'
+  +''', TypeInfo(boolean), l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_BOO'
+  +'LEAN_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_CURRENCY_TYPE %%%>'#13#10
+  +'    TROSerializer(ASerializer).ReadDouble(''%FIELD_NAME%'', ftCurr, l_%FIEL'
+  +'D_NAME%);'#13#10'    // <%%% END IF_FIELD_CURRENCY_TYPE %%%>'#13#10'    // '
+  +'<%%% START IF_FIELD_DATETIME_TYPE %%%>'#13#10'    TROSerializer(ASerializer'
+  +').ReadDateTime(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    // <%%% END IF'
+  +'_FIELD_DATETIME_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_DECIMAL_TYPE %%'
+  +'%>'#13#10'    TROSerializer(ASerializer).ReadDecimal(''%FIELD_NAME%'', l_%F'
+  +'IELD_NAME%);'#13#10'    // <%%% END IF_FIELD_DECIMAL_TYPE %%%>'#13#10'    /'
+  +'/ <%%% START IF_FIELD_DOUBLE_TYPE %%%>'#13#10'    TROSerializer(ASerializer'
+  +').ReadDouble(''%FIELD_NAME%'', ftDouble, l_%FIELD_NAME%);'#13#10'    // <%%'
+  +'% END IF_FIELD_DOUBLE_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_GUID_TYPE'
+  +' %%%>'#13#10'    TROSerializer(ASerializer).ReadGuid(''%FIELD_NAME%'', l_%F'
+  +'IELD_NAME%);'#13#10'    // <%%% END IF_FIELD_GUID_TYPE %%%>'#13#10'    // <'
+  +'%%% START IF_FIELD_INT64_TYPE %%%>'#13#10'    TROSerializer(ASerializer).Re'
+  ,'adInt64(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_'
+  +'INT64_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_INTEGER_TYPE %%%>'#13#10
+  +'    TROSerializer(ASerializer).ReadInteger(''%FIELD_NAME%'', otSLong, l_%FI'
+  +'ELD_NAME%);'#13#10'    // <%%% END IF_FIELD_INTEGER_TYPE %%%>'#13#10'    //'
+  +' <%%% START IF_FIELD_ANSISTRING_TYPE %%%>'#13#10'    TROSerializer(ASeriali'
+  +'zer).ReadAnsiString(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    // <%%% E'
+  +'ND IF_FIELD_ANSISTRING_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_UTF8STRI'
+  +'NG_TYPE %%%>'#13#10'    TROSerializer(ASerializer).ReadUTF8String(''%FIELD_'
+  +'NAME%'', l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_UTF8STRING_TYPE %'
+  +'%%>'#13#10'    // <%%% START IF_FIELD_VARIANT_TYPE %%%>'#13#10'    TROSeria'
+  +'lizer(ASerializer).ReadVariant(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'  '
+  +'  // <%%% END IF_FIELD_VARIANT_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_'
+  +'WIDESTRING_TYPE %%%>'#13#10'    TROSerializer(ASerializer).ReadWideString('
+  +'''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_WIDESTRI'
+  +'NG_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_XML_TYPE %%%>'#13#10'    TRO'
+  +'Serializer(ASerializer).ReadXml(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10' '
+  +'   // <%%% END IF_FIELD_XML_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_ARR'
+  +'AY_TYPE %%%>'#13#10'    TROSerializer(ASerializer).ReadArray(''%FIELD_NAME%'
+  +''', %FIELD_TYPE%, l_%FIELD_NAME%);'#13#10'    if %FIELD_NAME% <> l_%FIELD_N'
+  +'AME% then %FIELD_NAME%.Free;'#13#10'    // <%%% END IF_FIELD_ARRAY_TYPE %%%'
+  +'>'#13#10'    // <%%% START IF_FIELD_ENUM_TYPE %%%>'#13#10'    TROSerializer'
+  +'(ASerializer).ReadEnumerated(''%FIELD_NAME%'', TypeInfo(%FIELD_TYPE%), l_%F'
+  +'IELD_NAME%);'#13#10'    // <%%% END IF_FIELD_ENUM_TYPE %%%>'#13#10'    // <'
+  +'%%% START IF_FIELD_STRUCT_TYPE %%%>'#13#10'    TROSerializer(ASerializer).R'
+  +'eadStruct(''%FIELD_NAME%'', %FIELD_TYPE%, l_%FIELD_NAME%);'#13#10'    if %F'
+  +'IELD_NAME% <> l_%FIELD_NAME% then %FIELD_NAME%.Free;'#13#10'    // <%%% END'
+  +' IF_FIELD_STRUCT_TYPE %%%>'#13#10'    %FIELD_NAME% := l_%FIELD_NAME%;'#13#10
+  +'    // <%%% END FIELDS_NO_STRIP %%%>'#13#10'  end'#13#10'  else begin'#13#10
+  +'    // <%%% START ENTIRE_HIERARCHY_FIELDS %%%>'#13#10'    l_%FIELD_NAME% :='
+  +' %FIELD_NAME%;'#13#10'    // <%%% START IF_FIELD_BINARY_TYPE %%%>'#13#10'  '
+  +'  TROSerializer(ASerializer).ReadBinary(''%FIELD_NAME%'', l_%FIELD_NAME%);'
+  +#13#10'    if %FIELD_NAME% <> l_%FIELD_NAME% then %FIELD_NAME%.Free;'#13#10
+  +'    // <%%% END IF_FIELD_BINARY_TYPE %%%>'#13#10'    // <%%% START IF_FIELD'
+  +'_BOOLEAN_TYPE %%%>'#13#10'    TROSerializer(ASerializer).ReadEnumerated(''%'
+  +'FIELD_NAME%'', TypeInfo(boolean), l_%FIELD_NAME%);'#13#10'    // <%%% END I'
+  +'F_FIELD_BOOLEAN_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_CURRENCY_TYPE %'
+  +'%%>'#13#10'    TROSerializer(ASerializer).ReadDouble(''%FIELD_NAME%'', ftCu'
+  +'rr, l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_CURRENCY_TYPE %%%>'#13
+  +#10'    // <%%% START IF_FIELD_DATETIME_TYPE %%%>'#13#10'    TROSerializer(A'
+  +'Serializer).ReadDateTime(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    // <'
+  +'%%% END IF_FIELD_DATETIME_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_DECIM'
+  +'AL_TYPE %%%>'#13#10'    TROSerializer(ASerializer).ReadDecimal(''%FIELD_NAM'
+  +'E%'', l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_DECIMAL_TYPE %%%>'#13
+  +#10'    // <%%% START IF_FIELD_DOUBLE_TYPE %%%>'#13#10'    TROSerializer(ASe'
+  +'rializer).ReadDouble(''%FIELD_NAME%'', ftDouble, l_%FIELD_NAME%);'#13#10'  '
+  +'  // <%%% END IF_FIELD_DOUBLE_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_G'
+  +'UID_TYPE %%%>'#13#10'    TROSerializer(ASerializer).ReadGuid(''%FIELD_NAME%'
+  +''', l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_GUID_TYPE %%%>'#13#10
+  +'    // <%%% START IF_FIELD_INT64_TYPE %%%>'#13#10'    TROSerializer(ASerial'
+  +'izer).ReadInt64(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    // <%%% END I'
+  +'F_FIELD_INT64_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_INTEGER_TYPE %%%>'
+  +#13#10'    TROSerializer(ASerializer).ReadInteger(''%FIELD_NAME%'', otSLong,'
+  +' l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_INTEGER_TYPE %%%>'#13#10
+  +'    // <%%% START IF_FIELD_ANSISTRING_TYPE %%%>'#13#10'    TROSerializer(AS'
+  +'erializer).ReadAnsiString(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    // '
+  +'<%%% END IF_FIELD_ANSISTRING_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_UT'
+  +'F8STRING_TYPE %%%>'#13#10'    TROSerializer(ASerializer).ReadUTF8String(''%'
+  +'FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_UTF8STRING_'
+  +'TYPE %%%>'#13#10'    // <%%% START IF_FIELD_VARIANT_TYPE %%%>'#13#10'    TR'
+  +'OSerializer(ASerializer).ReadVariant(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13
+  +#10'    // <%%% END IF_FIELD_VARIANT_TYPE %%%>'#13#10'    // <%%% START IF_F'
+  +'IELD_WIDESTRING_TYPE %%%>'#13#10'    TROSerializer(ASerializer).ReadWideStr'
+  +'ing(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_WIDE'
+  +'STRING_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_XML_TYPE %%%>'#13#10'   '
+  ,' TROSerializer(ASerializer).ReadXml(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13
+  +#10'    // <%%% END IF_FIELD_XML_TYPE %%%>'#13#10'    // <%%% START IF_FIELD'
+  +'_ARRAY_TYPE %%%>'#13#10'    TROSerializer(ASerializer).ReadArray(''%FIELD_N'
+  +'AME%'', %FIELD_TYPE%, l_%FIELD_NAME%);'#13#10'    if %FIELD_NAME% <> l_%FIE'
+  +'LD_NAME% then %FIELD_NAME%.Free;'#13#10'    // <%%% END IF_FIELD_ARRAY_TYPE'
+  +' %%%>'#13#10'    // <%%% START IF_FIELD_ENUM_TYPE %%%>'#13#10'    TROSerial'
+  +'izer(ASerializer).ReadEnumerated(''%FIELD_NAME%'', TypeInfo(%FIELD_TYPE%), '
+  +'l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_ENUM_TYPE %%%>'#13#10'    '
+  +'// <%%% START IF_FIELD_STRUCT_TYPE %%%>'#13#10'    TROSerializer(ASerialize'
+  +'r).ReadStruct(''%FIELD_NAME%'', %FIELD_TYPE%, l_%FIELD_NAME%);'#13#10'    i'
+  +'f %FIELD_NAME% <> l_%FIELD_NAME% then %FIELD_NAME%.Free;'#13#10'    // <%%%'
+  +' END IF_FIELD_STRUCT_TYPE %%%>'#13#10'    %FIELD_NAME% := l_%FIELD_NAME%;'
+  +#13#10'    // <%%% END ENTIRE_HIERARCHY_FIELDS %%%>'#13#10'  end;'#13#10'end'
+  +';'#13#10#13#10'procedure %STRUCT_NAME%.WriteComplex(ASerializer: TObject);'
+  +#13#10'var'#13#10'  // <%%% START ENTIRE_HIERARCHY_FIELDS %%%>'#13#10'  l_%F'
+  +'IELD_NAME%: %FIELD_TYPE%;'#13#10'  // <%%% END ENTIRE_HIERARCHY_FIELDS %%%>'
+  +#13#10'begin'#13#10'  if TROSerializer(ASerializer).RecordStrictOrder then b'
+  +'egin'#13#10'    // <%%% START IF_STRUCT_HAS_ANCESTOR %%%>'#13#10'    inheri'
+  +'ted;'#13#10'    // <%%% END IF_STRUCT_HAS_ANCESTOR %%%>'#13#10'    TROSeria'
+  +'lizer(ASerializer).ChangeClass(%STRUCT_NAME%);'#13#10'    // <%%% START FIE'
+  +'LDS_NO_STRIP %%%>'#13#10'    l_%FIELD_NAME% := %FIELD_NAME%;'#13#10'    // '
+  +'<%%% START IF_FIELD_BINARY_TYPE %%%>'#13#10'    TROSerializer(ASerializer).'
+  +'WriteBinary(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FI'
+  +'ELD_BINARY_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_BOOLEAN_TYPE %%%>'#13
+  +#10'    TROSerializer(ASerializer).WriteEnumerated(''%FIELD_NAME%'', TypeInf'
+  +'o(boolean), l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_BOOLEAN_TYPE %'
+  +'%%>'#13#10'    // <%%% START IF_FIELD_CURRENCY_TYPE %%%>'#13#10'    TROSeri'
+  +'alizer(ASerializer).WriteDouble(''%FIELD_NAME%'', ftCurr, l_%FIELD_NAME%);'
+  +#13#10'    // <%%% END IF_FIELD_CURRENCY_TYPE %%%>'#13#10'    // <%%% START '
+  +'IF_FIELD_DATETIME_TYPE %%%>'#13#10'    TROSerializer(ASerializer).WriteDate'
+  +'Time(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_DAT'
+  +'ETIME_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_DECIMAL_TYPE %%%>'#13#10
+  +'    TROSerializer(ASerializer).WriteDecimal(''%FIELD_NAME%'', l_%FIELD_NAME'
+  +'%);'#13#10'    // <%%% END IF_FIELD_DECIMAL_TYPE %%%>'#13#10'    // <%%% ST'
+  +'ART IF_FIELD_DOUBLE_TYPE %%%>'#13#10'    TROSerializer(ASerializer).WriteDo'
+  +'uble(''%FIELD_NAME%'', ftDouble, l_%FIELD_NAME%);'#13#10'    // <%%% END IF'
+  +'_FIELD_DOUBLE_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_GUID_TYPE %%%>'#13
+  +#10'    TROSerializer(ASerializer).WriteGuid(''%FIELD_NAME%'', l_%FIELD_NAME'
+  +'%);'#13#10'    // <%%% END IF_FIELD_GUID_TYPE %%%>'#13#10'    // <%%% START'
+  +' IF_FIELD_INT64_TYPE %%%>'#13#10'    TROSerializer(ASerializer).WriteInt64('
+  +'''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_INT64_TY'
+  +'PE %%%>'#13#10'    // <%%% START IF_FIELD_INTEGER_TYPE %%%>'#13#10'    TROS'
+  +'erializer(ASerializer).WriteInteger(''%FIELD_NAME%'', otSLong, l_%FIELD_NAM'
+  +'E%);'#13#10'    // <%%% END IF_FIELD_INTEGER_TYPE %%%>'#13#10'    // <%%% S'
+  +'TART IF_FIELD_ANSISTRING_TYPE %%%>'#13#10'    TROSerializer(ASerializer).Wr'
+  +'iteAnsiString(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    // <%%% END IF_'
+  +'FIELD_ANSISTRING_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_UTF8STRING_TYP'
+  +'E %%%>'#13#10'    TROSerializer(ASerializer).WriteUTF8String(''%FIELD_NAME%'
+  +''', l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_UTF8STRING_TYPE %%%>'
+  +#13#10'    // <%%% START IF_FIELD_VARIANT_TYPE %%%>'#13#10'    TROSerializer'
+  +'(ASerializer).WriteVariant(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    //'
+  +' <%%% END IF_FIELD_VARIANT_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_WIDE'
+  +'STRING_TYPE %%%>'#13#10'    TROSerializer(ASerializer).WriteWideString(''%F'
+  +'IELD_NAME%'', l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_WIDESTRING_T'
+  +'YPE %%%>'#13#10'    // <%%% START IF_FIELD_XML_TYPE %%%>'#13#10'    TROSeri'
+  +'alizer(ASerializer).WriteXml(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    '
+  +'// <%%% END IF_FIELD_XML_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_ARRAY_'
+  +'TYPE %%%>'#13#10'    TROSerializer(ASerializer).WriteArray(''%FIELD_NAME%'''
+  +', l_%FIELD_NAME%, %FIELD_TYPE%);'#13#10'    // <%%% END IF_FIELD_ARRAY_TYPE'
+  +' %%%>'#13#10'    // <%%% START IF_FIELD_ENUM_TYPE %%%>'#13#10'    TROSerial'
+  +'izer(ASerializer).WriteEnumerated(''%FIELD_NAME%'', TypeInfo(%FIELD_TYPE%),'
+  +' l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_ENUM_TYPE %%%>'#13#10'   '
+  +' // <%%% START IF_FIELD_STRUCT_TYPE %%%>'#13#10'    TROSerializer(ASerializ'
+  +'er).WriteStruct(''%FIELD_NAME%'', l_%FIELD_NAME%, %FIELD_TYPE%);'#13#10'   '
+  ,' // <%%% END IF_FIELD_STRUCT_TYPE %%%>'#13#10'    // <%%% END FIELDS_NO_STR'
+  +'IP %%%>'#13#10'  end'#13#10'  else begin'#13#10'    // <%%% START ENTIRE_HI'
+  +'ERARCHY_FIELDS %%%>'#13#10'    l_%FIELD_NAME% := %FIELD_NAME%;'#13#10'    /'
+  +'/ <%%% START IF_FIELD_BINARY_TYPE %%%>'#13#10'    TROSerializer(ASerializer'
+  +').WriteBinary(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    // <%%% END IF_'
+  +'FIELD_BINARY_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_BOOLEAN_TYPE %%%>'
+  +#13#10'    TROSerializer(ASerializer).WriteEnumerated(''%FIELD_NAME%'', Type'
+  +'Info(boolean), l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_BOOLEAN_TYP'
+  +'E %%%>'#13#10'    // <%%% START IF_FIELD_CURRENCY_TYPE %%%>'#13#10'    TROS'
+  +'erializer(ASerializer).WriteDouble(''%FIELD_NAME%'', ftCurr, l_%FIELD_NAME%'
+  +');'#13#10'    // <%%% END IF_FIELD_CURRENCY_TYPE %%%>'#13#10'    // <%%% ST'
+  +'ART IF_FIELD_DATETIME_TYPE %%%>'#13#10'    TROSerializer(ASerializer).Write'
+  +'DateTime(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD'
+  +'_DATETIME_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_DECIMAL_TYPE %%%>'#13
+  +#10'    TROSerializer(ASerializer).WriteDecimal(''%FIELD_NAME%'', l_%FIELD_N'
+  +'AME%);'#13#10'    // <%%% END IF_FIELD_DECIMAL_TYPE %%%>'#13#10'    // <%%%'
+  +' START IF_FIELD_DOUBLE_TYPE %%%>'#13#10'    TROSerializer(ASerializer).Writ'
+  +'eDouble(''%FIELD_NAME%'', ftDouble, l_%FIELD_NAME%);'#13#10'    // <%%% END'
+  +' IF_FIELD_DOUBLE_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_GUID_TYPE %%%>'
+  +#13#10'    TROSerializer(ASerializer).WriteGuid(''%FIELD_NAME%'', l_%FIELD_N'
+  +'AME%);'#13#10'    // <%%% END IF_FIELD_GUID_TYPE %%%>'#13#10'    // <%%% ST'
+  +'ART IF_FIELD_INT64_TYPE %%%>'#13#10'    TROSerializer(ASerializer).WriteInt'
+  +'64(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_INT64'
+  +'_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_INTEGER_TYPE %%%>'#13#10'    T'
+  +'ROSerializer(ASerializer).WriteInteger(''%FIELD_NAME%'', otSLong, l_%FIELD_'
+  +'NAME%);'#13#10'    // <%%% END IF_FIELD_INTEGER_TYPE %%%>'#13#10'    // <%%'
+  +'% START IF_FIELD_ANSISTRING_TYPE %%%>'#13#10'    TROSerializer(ASerializer)'
+  +'.WriteAnsiString(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    // <%%% END '
+  +'IF_FIELD_ANSISTRING_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_UTF8STRING_'
+  +'TYPE %%%>'#13#10'    TROSerializer(ASerializer).WriteUTF8String(''%FIELD_NA'
+  +'ME%'', l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_UTF8STRING_TYPE %%%'
+  +'>'#13#10'    // <%%% START IF_FIELD_VARIANT_TYPE %%%>'#13#10'    TROSeriali'
+  +'zer(ASerializer).WriteVariant(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'   '
+  +' // <%%% END IF_FIELD_VARIANT_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_W'
+  +'IDESTRING_TYPE %%%>'#13#10'    TROSerializer(ASerializer).WriteWideString('
+  +'''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_WIDESTRI'
+  +'NG_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_XML_TYPE %%%>'#13#10'    TRO'
+  +'Serializer(ASerializer).WriteXml(''%FIELD_NAME%'', l_%FIELD_NAME%);'#13#10
+  +'    // <%%% END IF_FIELD_XML_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_AR'
+  +'RAY_TYPE %%%>'#13#10'    TROSerializer(ASerializer).WriteArray(''%FIELD_NAM'
+  +'E%'', l_%FIELD_NAME%, %FIELD_TYPE%);'#13#10'    // <%%% END IF_FIELD_ARRAY_'
+  +'TYPE %%%>'#13#10'    // <%%% START IF_FIELD_ENUM_TYPE %%%>'#13#10'    TROSe'
+  +'rializer(ASerializer).WriteEnumerated(''%FIELD_NAME%'', TypeInfo(%FIELD_TYP'
+  +'E%), l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_ENUM_TYPE %%%>'#13#10
+  +'    // <%%% START IF_FIELD_STRUCT_TYPE %%%>'#13#10'    TROSerializer(ASeria'
+  +'lizer).WriteStruct(''%FIELD_NAME%'', l_%FIELD_NAME%, %FIELD_TYPE%);'#13#10
+  +'    // <%%% END IF_FIELD_STRUCT_TYPE %%%>'#13#10'    // <%%% END ENTIRE_HIE'
+  +'RARCHY_FIELDS %%%>'#13#10'  end;'#13#10'end;'#13#10#13#10'// <%%% END IF_HA'
+  +'S_FIELDS %%%>'#13#10'{ %STRUCT_COLLECTION_NAME% }'#13#10'constructor %STRUC'
+  +'T_COLLECTION_NAME%.Create;'#13#10'begin'#13#10'  inherited Create(%STRUCT_N'
+  +'AME%);'#13#10'end;'#13#10#13#10'constructor %STRUCT_COLLECTION_NAME%.Create'
+  +'(aItemClass: TCollectionItemClass);'#13#10'begin'#13#10'  inherited Create('
+  +'aItemClass);'#13#10'end;'#13#10#13#10'function %STRUCT_COLLECTION_NAME%.Add'
+  +': %STRUCT_NAME%;'#13#10'begin'#13#10'  result := %STRUCT_NAME%(inherited Ad'
+  +'d);'#13#10'end;'#13#10#13#10'function %STRUCT_COLLECTION_NAME%.GetItems(aIn'
+  +'dex: integer): %STRUCT_NAME%;'#13#10'begin'#13#10'  result := %STRUCT_NAME%'
+  +'(inherited Items[aIndex]);'#13#10'end;'#13#10#13#10'// <%%% START ARRAYS_IS'
+  +'_FOUND %%%>'#13#10'procedure %STRUCT_COLLECTION_NAME%.LoadFromArray(anArray'
+  +': %ARRAY_NAME%);'#13#10'var'#13#10'  i : integer;'#13#10'begin'#13#10'  Cle'
+  +'ar;'#13#10'  for i := 0 to (anArray.Count-1) do'#13#10'    Add.Assign(anArr'
+  +'ay[i]);'#13#10'end;'#13#10#13#10'procedure %STRUCT_COLLECTION_NAME%.SaveToA'
+  +'rray(anArray: %ARRAY_NAME%);'#13#10'var'#13#10'  i : integer;'#13#10'begin'
+  +#13#10'  anArray.Clear;'#13#10'  anArray.Resize(Count);'#13#10'  for i := 0 '
+  +'to (Count-1) do begin'#13#10'    anArray[i] := %STRUCT_NAME%.Create;'#13#10
+  ,'    anArray[i].Assign(Items[i]);'#13#10'  end;'#13#10'end;'#13#10#13#10'// '
+  +'<%%% END ARRAYS_IS_FOUND %%%>'#13#10#13#10'procedure %STRUCT_COLLECTION_NAM'
+  +'E%.SetItems(aIndex: integer; const Value: %STRUCT_NAME%);'#13#10'begin'#13
+  +#10'  %STRUCT_NAME%(inherited Items[aIndex]).Assign(Value);'#13#10'end;'#13
+  +#10#13#10'// <%%% END STRUCTS %%%>'#13#10'// <%%% START SERVICES %%%>'#13#10
+  +'{ Co%SERVICE_NAME% }'#13#10#13#10'class function Co%SERVICE_NAME%.Create(co'
+  +'nst aMessage: IROMessage; aTransportChannel: IROTransportChannel): I%SERVIC'
+  +'E_NAME%;'#13#10'begin'#13#10'  result := T%SERVICE_NAME%_Proxy.Create(aMess'
+  +'age, aTransportChannel);'#13#10'end;'#13#10#13#10'{ T%SERVICE_NAME%_Proxy }'
+  +#13#10#13#10'function T%SERVICE_NAME%_Proxy.__GetInterfaceName:string;'#13#10
+  +'begin'#13#10'  result := ''%SERVICE_NAME%'';'#13#10'end;'#13#10#13#10'// <%'
+  +'%% START FUNCTION_OPERATIONS %%%>'#13#10'function T%SERVICE_NAME%_Proxy.%OP'
+  +'ERATION_NAME%('#13#10'           // <%%% START PARAMS %%%>'#13#10'         '
+  +'  %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;'#13#10'           // <'
+  +'%%% END PARAMS %%%>'#13#10'           ): %OPERATION_RESULT%;'#13#10'begin'
+  +#13#10'  // <%%% START OUT_PARAMS_NO_STRIP %%%>'#13#10'  // <%%% START IF_PA'
+  +'RAM_TYPE_COMPLEX %%%>'#13#10'  %PARAM_NAME% := nil;'#13#10'  // <%%% END IF'
+  +'_PARAM_TYPE_COMPLEX %%%>'#13#10'  // <%%% END OUT_PARAMS_NO_STRIP %%%>'#13
+  +#10'  // <%%% START IF_RESULT_COMPLEX %%%>'#13#10'  Result := nil;'#13#10'  '
+  +'// <%%% END IF_RESULT_COMPLEX %%%>'#13#10'  try'#13#10'    __Message.Initia'
+  +'lizeRequestMessage(__TransportChannel, ''%LIBRARY_NAME%'', __InterfaceName,'
+  +' ''%OPERATION_NAME%'');'#13#10'    // <%%% START IN_PARAMS_NO_STRIP %%%>'#13
+  +#10'    __Message.Write(''%PARAM_NAME%'', TypeInfo(%PARAM_TYPE%), %PARAM_NAM'
+  +'E%, [%PARAM_ATTRIBUTE%]);'#13#10'    // <%%% END IN_PARAMS_NO_STRIP %%%>'#13
+  +#10'    __Message.Finalize;'#13#10#13#10'    __TransportChannel.Dispatch(__M'
+  +'essage);'#13#10#13#10'    __Message.Read(''Result'', TypeInfo(%OPERATION_RE'
+  +'SULT%), result, [%OPERATION_RESULT_ATTRIBUTE%]);'#13#10'    // <%%% START O'
+  +'UT_PARAMS_NO_STRIP %%%>'#13#10'    __Message.Read(''%PARAM_NAME%'', TypeInf'
+  +'o(%PARAM_TYPE%), %PARAM_NAME%, [%PARAM_ATTRIBUTE%]);'#13#10'    // <%%% END'
+  +' OUT_PARAMS_NO_STRIP %%%>'#13#10'  finally'#13#10'    __Message.FreeStream;'
+  +#13#10'  end'#13#10'end;'#13#10#13#10'// <%%% END FUNCTION_OPERATIONS %%%>'
+  +#13#10'// <%%% START PROCEDURE_OPERATIONS %%%>'#13#10'procedure T%SERVICE_NA'
+  +'ME%_Proxy.%OPERATION_NAME%('#13#10'           // <%%% START PARAMS %%%>'#13
+  +#10'           %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;'#13#10'   '
+  +'        // <%%% END PARAMS %%%>'#13#10'           );'#13#10'begin'#13#10'  '
+  +'// <%%% START OUT_PARAMS_NO_STRIP %%%>'#13#10'  // <%%% START IF_PARAM_TYPE'
+  +'_COMPLEX %%%>'#13#10'  %PARAM_NAME% := nil;'#13#10'  // <%%% END IF_PARAM_T'
+  +'YPE_COMPLEX %%%>'#13#10'  // <%%% END OUT_PARAMS_NO_STRIP %%%>'#13#10'  try'
+  +#13#10'    __Message.InitializeRequestMessage(__TransportChannel, ''%LIBRARY'
+  +'_NAME%'', __InterfaceName, ''%OPERATION_NAME%'');'#13#10'    // <%%% START '
+  +'IN_PARAMS_NO_STRIP %%%>'#13#10'    __Message.Write(''%PARAM_NAME%'', TypeIn'
+  +'fo(%PARAM_TYPE%), %PARAM_NAME%, [%PARAM_ATTRIBUTE%]);'#13#10'    // <%%% EN'
+  +'D IN_PARAMS_NO_STRIP %%%>'#13#10'    __Message.Finalize;'#13#10#13#10'    _'
+  +'_TransportChannel.Dispatch(__Message);'#13#10#13#10'    // <%%% START OUT_P'
+  +'ARAMS_NO_STRIP %%%>'#13#10'    __Message.Read(''%PARAM_NAME%'', TypeInfo(%P'
+  +'ARAM_TYPE%), %PARAM_NAME%, [%PARAM_ATTRIBUTE%]);'#13#10'    // <%%% END OUT'
+  +'_PARAMS_NO_STRIP %%%>'#13#10'  finally'#13#10'    __Message.FreeStream;'#13
+  +#10'  end'#13#10'end;'#13#10#13#10'// <%%% END PROCEDURE_OPERATIONS %%%>'#13
+  +#10'// <%%% END SERVICES %%%>'#13#10'// <%%% START EVENT_SINKS %%%>'#13#10't'
+  +'ype'#13#10'  { T%EVENT_SINK_NAME%_Writer }'#13#10'  T%EVENT_SINK_NAME%_Writ'
+  +'er = class(T%EVENT_SINK_WRITER_ANCESTOR_NAME%, I%EVENT_SINK_NAME%_Writer)'
+  +#13#10'  protected'#13#10'    // <%%% START OPERATIONS %%%>'#13#10'    proce'
+  +'dure %OPERATION_NAME%(const __Sender : TGUID'#13#10'                // <%%%'
+  +' START PARAMS %%%>'#13#10'                ; %PARAM_FRONT_MODIFIER% %PARAM_N'
+  +'AME%: %PARAM_TYPE%'#13#10'                // <%%% END PARAMS %%%>'#13#10'  '
+  +'              );'#13#10'    // <%%% END OPERATIONS %%%>'#13#10'  end;'#13#10
+  +#13#10'// <%%% START OPERATIONS %%%>'#13#10'procedure T%EVENT_SINK_NAME%_Wri'
+  +'ter.%OPERATION_NAME%(const __Sender : TGUID'#13#10'  // <%%% START PARAMS %'
+  +'%%>'#13#10'  ; %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%'#13#10'  /'
+  +'/ <%%% END PARAMS %%%>'#13#10'  );'#13#10'var __eventdata : Binary;'#13#10
+  +'begin'#13#10'  __eventdata := Binary.Create;'#13#10'  try'#13#10'    __Mess'
+  +'age.InitializeEventMessage(NIL, ''%LIBRARY_NAME%'', EID_%EVENT_SINK_NAME%, '
+  +'''%OPERATION_NAME%'');'#13#10'    // <%%% START PARAMS_NO_STRIP %%%>'#13#10
+  +'    __Message.Write(''%PARAM_NAME%'', TypeInfo(%PARAM_TYPE%), %PARAM_NAME%,'
+  ,' [%PARAM_ATTRIBUTE%]);'#13#10'    // <%%% END PARAMS_NO_STRIP %%%>'#13#10' '
+  +'   __Message.Finalize;'#13#10#13#10'    __Message.WriteToStream(__eventdata'
+  +');'#13#10#13#10'    Repository.StoreEventData(__Sender, __eventdata, Exclud'
+  +'eSender, ExcludeSessionList, SessionList.CommaText);'#13#10'  finally'#13#10
+  +'    __eventdata.Free;'#13#10'  end;'#13#10'end;'#13#10#13#10'// <%%% END OP'
+  +'ERATIONS %%%>'#13#10'type'#13#10'  { T%EVENT_SINK_NAME%_Invoker }'#13#10'  '
+  +'T%EVENT_SINK_NAME%_Invoker = class(T%EVENT_SINK_INVOKER_ANCESTOR_NAME%)'#13
+  +#10'  published'#13#10'    // <%%% START OPERATIONS %%%>'#13#10'    procedur'
+  +'e Invoke_%OPERATION_NAME%(__EventReceiver : TROEventReceiver; const __Messa'
+  +'ge : IROMessage; const __Target : IUnknown);'#13#10'    // <%%% END OPERATI'
+  +'ONS %%%>'#13#10'  end;'#13#10#13#10'// <%%% START OPERATIONS %%%>'#13#10'pr'
+  +'ocedure T%EVENT_SINK_NAME%_Invoker.Invoke_%OPERATION_NAME%(__EventReceiver '
+  +': TROEventReceiver; const __Message : IROMessage; const __Target : IUnknown'
+  +');'#13#10'var'#13#10'  // <%%% START PARAMS_NO_STRIP %%%>'#13#10'  %PARAM_N'
+  +'AME%: %PARAM_TYPE%;'#13#10'  // <%%% END PARAMS_NO_STRIP %%%>'#13#10'  // <'
+  +'%%% START IF_HAS_COMPLEX_TYPE %%%>'#13#10'  __lObjectDisposer: TROObjectDis'
+  +'poser;'#13#10'  // <%%% END IF_HAS_COMPLEX_TYPE %%%>'#13#10'  __%EVENT_SINK'
+  +'_NAME%Instance: I%EVENT_SINK_NAME%;'#13#10'begin'#13#10'  // <%%% START PAR'
+  +'AMS_NO_STRIP %%%>'#13#10'  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>'#13#10
+  +'  %PARAM_NAME% := nil;'#13#10'  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>'#13
+  +#10'  // <%%% END PARAMS_NO_STRIP %%%>'#13#10'  try'#13#10'    // <%%% START'
+  +' PARAMS_NO_STRIP %%%>'#13#10'    __Message.Read(''%PARAM_NAME%'', TypeInfo('
+  +'%PARAM_TYPE%), %PARAM_NAME%, [%PARAM_ATTRIBUTE%]);'#13#10'    // <%%% END P'
+  +'ARAMS_NO_STRIP %%%>'#13#10#13#10'    __%EVENT_SINK_NAME%Instance := (__Targ'
+  +'et as I%EVENT_SINK_NAME%);'#13#10'    __%EVENT_SINK_NAME%Instance.%OPERATIO'
+  +'N_NAME%('#13#10'                                  // <%%% START PARAMS %%%>'
+  +#13#10'                                  %PARAM_NAME%,'#13#10'              '
+  +'                    // <%%% END PARAMS %%%>'#13#10'                        '
+  +'          );'#13#10#13#10'  finally'#13#10'    // <%%% START IF_HAS_COMPLEX'
+  +'_TYPE %%%>'#13#10'    __lObjectDisposer := TROObjectDisposer.Create(__Event'
+  +'Receiver);'#13#10'    try'#13#10'      // <%%% START PARAMS_NO_STRIP %%%>'
+  +#13#10'      // <%%% START IF_PARAM_TYPE_COMPLEX %%%>'#13#10'      __lObject'
+  +'Disposer.Add(%PARAM_NAME%);'#13#10'      // <%%% END IF_PARAM_TYPE_COMPLEX '
+  +'%%%>'#13#10'      // <%%% END PARAMS_NO_STRIP %%%>'#13#10'    finally'#13#10
+  +'      __lObjectDisposer.Free();'#13#10'    end;'#13#10'    // <%%% END IF_H'
+  +'AS_COMPLEX_TYPE %%%>'#13#10'  end'#13#10'end;'#13#10#13#10'// <%%% END OPER'
+  +'ATIONS %%%>'#13#10'// <%%% END EVENT_SINKS %%%>'#13#10'initialization'#13#10
+  +'  // <%%% START STRUCTS %%%>'#13#10'  RegisterROClass(%STRUCT_NAME%);'#13#10
+  +'  // <%%% END STRUCTS %%%>'#13#10'  // <%%% START ARRAYS %%%>'#13#10'  Regi'
+  +'sterROClass(%ARRAY_NAME%);'#13#10'  // <%%% END ARRAYS %%%>'#13#10'  // <%%'
+  +'% START EXCEPTIONS %%%>'#13#10'  RegisterExceptionClass(%EXCEPTION_NAME%);'
+  +#13#10'  // <%%% END EXCEPTIONS %%%>'#13#10'  // <%%% START SERVICES %%%>'#13
+  +#10'  RegisterProxyClass(I%SERVICE_NAME%_IID, T%SERVICE_NAME%_Proxy);'#13#10
+  +'  // <%%% END SERVICES %%%>     '#13#10'  // <%%% START EVENT_SINKS %%%>'#13
+  +#10'  RegisterEventWriterClass(I%EVENT_SINK_NAME%_Writer, T%EVENT_SINK_NAME%'
+  +'_Writer);'#13#10'  RegisterEventInvokerClass(EID_%EVENT_SINK_NAME%, T%EVENT'
+  +'_SINK_NAME%_Invoker);'#13#10'  // <%%% END EVENT_SINKS %%%>     '#13#10#13
+  +#10'finalization'#13#10'  // <%%% START STRUCTS %%%>'#13#10'  UnregisterROCl'
+  +'ass(%STRUCT_NAME%);'#13#10'  // <%%% END STRUCTS %%%>'#13#10'  // <%%% STAR'
+  +'T ARRAYS %%%>'#13#10'  UnregisterROClass(%ARRAY_NAME%);'#13#10'  // <%%% EN'
+  +'D ARRAYS %%%>'#13#10'  // <%%% START EXCEPTIONS %%%>'#13#10'  UnregisterExc'
+  +'eptionClass(%EXCEPTION_NAME%);'#13#10'  // <%%% END EXCEPTIONS %%%>'#13#10
+  +'  // <%%% START SERVICES %%%>'#13#10'  UnregisterProxyClass(I%SERVICE_NAME%'
+  +'_IID);'#13#10'  // <%%% END SERVICES %%%>'#13#10'  // <%%% START EVENT_SINK'
+  +'S %%%>'#13#10'  UnregisterEventWriterClass(I%EVENT_SINK_NAME%_Writer);'#13
+  +#10'  UnregisterEventInvokerClass(EID_%EVENT_SINK_NAME%);'#13#10'  // <%%% E'
+  +'ND EVENT_SINKS %%%>     '#13#10#13#10'end.'#13#10
+]);
+LazarusResources.Add('TEMPLATE_INVK_PAS','RCDATA',[
+  'unit %UNIT_NAME%;'#13#10#13#10'{--------------------------------------------'
+  +'--------------------------------}'#13#10'{ This unit was automatically gene'
+  +'rated by the RemObjects SDK after reading  }'#13#10'{ the RODL file associa'
+  +'ted with this project .                               }'#13#10'{           '
+  +'                                                                 }'#13#10'{'
+  +' Do not modify this unit manually, or your changes will be lost when this  '
+  +' }'#13#10'{ unit is regenerated the next time you compile the project.     '
+  +'            }'#13#10'{-----------------------------------------------------'
+  +'-----------------------}'#13#10#13#10'{$I RemObjects.inc}'#13#10#13#10'inte'
+  +'rface'#13#10#13#10'uses'#13#10'  {vcl:} Classes,'#13#10'  {RemObjects:} uRO'
+  +'XMLIntf, uROServer, uROServerIntf, uROTypes, uROClientIntf,'#13#10'  // <%%'
+  +'% START REQUIRED_UNITS %%%>'#13#10'  {Required:} %REQUIRED_UNIT_NAME%,'#13
+  +#10'  // <%%% END REQUIRED_UNITS %%%>'#13#10'  {Generated:} %LIBRARY_NAME%_I'
+  +'ntf;'#13#10#13#10'type'#13#10'  TSeekOrigin = Classes.TSeekOrigin; // fake '
+  +'declaration'#13#10#13#10'  // <%%% START SERVICES %%%>'#13#10'  T%SERVICE_N'
+  +'AME%_Invoker = class(T%SERVICE_INVOKER_ANCESTOR_NAME%)'#13#10'  private'#13
+  +#10'  protected'#13#10'    constructor Create; override;'#13#10'  published'
+  +#13#10'    // <%%% START FUNCTION_OPERATIONS %%%>'#13#10'    procedure Invok'
+  +'e_%OPERATION_NAME%(const __Instance:IInterface; const __Message:IROMessage;'
+  +' const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions)'
+  +';'#13#10'    // <%%% END FUNCTION_OPERATIONS %%%>'#13#10'    // <%%% START '
+  +'PROCEDURE_OPERATIONS %%%>'#13#10'    procedure Invoke_%OPERATION_NAME%(cons'
+  +'t __Instance:IInterface; const __Message:IROMessage; const __Transport:IROT'
+  +'ransport; out __oResponseOptions:TROResponseOptions);'#13#10'    // <%%% EN'
+  +'D PROCEDURE_OPERATIONS %%%>'#13#10'  end;'#13#10#13#10'  // <%%% END SERVIC'
+  +'ES %%%>'#13#10'implementation'#13#10#13#10'uses'#13#10'  {RemObjects:} uROR'
+  +'es, uROClient;'#13#10#13#10'// <%%% START SERVICES %%%>'#13#10'{ T%SERVICE_'
+  +'NAME%_Invoker }'#13#10#13#10'constructor T%SERVICE_NAME%_Invoker.Create;'#13
+  +#10'begin'#13#10'  inherited Create;'#13#10'  FAbstract := %IS_ABSTRACT%;'#13
+  +#10'end;'#13#10#13#10'// <%%% START FUNCTION_OPERATIONS %%%>'#13#10'procedur'
+  +'e T%SERVICE_NAME%_Invoker.Invoke_%OPERATION_NAME%(const __Instance:IInterfa'
+  +'ce; const __Message:IROMessage; const __Transport:IROTransport; out __oResp'
+  +'onseOptions:TROResponseOptions);'#13#10'{ function %OPERATION_NAME%('#13#10
+  +'              // <%%% START PARAMS %%%>'#13#10'              %PARAM_FRONT_M'
+  +'ODIFIER% %PARAM_NAME%: %PARAM_TYPE%;'#13#10'              // <%%% END PARAM'
+  +'S %%%>'#13#10'              ): %OPERATION_RESULT%; }'#13#10'var'#13#10'  //'
+  +' <%%% START PARAMS_NO_STRIP %%%>'#13#10'  %PARAM_NAME%: %PARAM_TYPE%;'#13#10
+  +'  // <%%% END PARAMS_NO_STRIP %%%>'#13#10'  lResult: %OPERATION_RESULT%;'#13
+  +#10'  // <%%% START IF_HAS_COMPLEX_TYPE %%%>'#13#10'  __lObjectDisposer: TRO'
+  +'ObjectDisposer;'#13#10'  // <%%% END IF_HAS_COMPLEX_TYPE %%%>'#13#10'  __%S'
+  +'ERVICE_NAME%Instance: I%SERVICE_NAME%;'#13#10'begin'#13#10'  // <%%% START '
+  +'PARAMS_NO_STRIP %%%>'#13#10'  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>'#13
+  +#10'  %PARAM_NAME% := nil;'#13#10'  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>'
+  +#13#10'  // <%%% END PARAMS_NO_STRIP %%%>'#13#10'  // <%%% START IF_RESULT_C'
+  +'OMPLEX %%%>'#13#10'  lResult := nil;'#13#10'  // <%%% END IF_RESULT_COMPLEX'
+  +' %%%>'#13#10'  try'#13#10'    // <%%% START IN_PARAMS_NO_STRIP %%%>'#13#10
+  +'    __Message.Read(''%PARAM_NAME%'', TypeInfo(%PARAM_TYPE%), %PARAM_NAME%, '
+  +'[%PARAM_ATTRIBUTE%]);'#13#10'    // <%%% END IN_PARAMS_NO_STRIP %%%>'#13#10
+  +#13#10'    __%SERVICE_NAME%Instance := __Instance as I%SERVICE_NAME%; '#13#10
+  +'    lResult := __%SERVICE_NAME%Instance.%OPERATION_NAME%('#13#10'          '
+  +'                                // <%%% START PARAMS %%%>'#13#10'          '
+  +'                                %PARAM_NAME%,'#13#10'                      '
+  +'                    // <%%% END PARAMS %%%>'#13#10'                        '
+  +'                  );'#13#10#13#10'    __Message.InitializeResponseMessage(_'
+  +'_Transport, ''%LIBRARY_NAME%'', ''%SERVICE_NAME%'', ''%OPERATION_NAME%Respo'
+  +'nse'');'#13#10'    __Message.Write(''Result'', TypeInfo(%OPERATION_RESULT%)'
+  +', lResult, [%OPERATION_RESULT_ATTRIBUTE%]);'#13#10'    // <%%% START OUT_PA'
+  +'RAMS_NO_STRIP %%%>'#13#10'    __Message.Write(''%PARAM_NAME%'', TypeInfo(%P'
+  +'ARAM_TYPE%), %PARAM_NAME%, [%PARAM_ATTRIBUTE%]);'#13#10'    // <%%% END OUT'
+  +'_PARAMS_NO_STRIP %%%>'#13#10'    __Message.Finalize;'#13#10'    __Message.U'
+  +'nsetAttributes(__Transport);'#13#10'    '#13#10'  finally'#13#10'    // <%%'
+  +'% START IF_HAS_COMPLEX_TYPE %%%>'#13#10'    __lObjectDisposer := TROObjectD'
+  +'isposer.Create(__Instance);'#13#10'    try'#13#10'      // <%%% START PARAM'
+  +'S_NO_STRIP %%%>'#13#10'      // <%%% START IF_PARAM_TYPE_COMPLEX %%%>'#13#10
+  ,'      __lObjectDisposer.Add(%PARAM_NAME%);'#13#10'      // <%%% END IF_PARA'
+  +'M_TYPE_COMPLEX %%%>'#13#10'      // <%%% END PARAMS_NO_STRIP %%%>'#13#10'  '
+  +'    // <%%% START IF_RESULT_COMPLEX %%%>'#13#10'      __lObjectDisposer.Add'
+  +'(lResult);'#13#10'      // <%%% END IF_RESULT_COMPLEX %%%>'#13#10'    final'
+  +'ly'#13#10'      __lObjectDisposer.Free();'#13#10'    end;'#13#10'    // <%%'
+  +'% END IF_HAS_COMPLEX_TYPE %%%>'#13#10'  end;'#13#10'end;'#13#10#13#10'// <%'
+  +'%% END FUNCTION_OPERATIONS %%%>'#13#10'// <%%% START PROCEDURE_OPERATIONS %'
+  +'%%>'#13#10'procedure T%SERVICE_NAME%_Invoker.Invoke_%OPERATION_NAME%(const '
+  +'__Instance:IInterface; const __Message:IROMessage; const __Transport:IROTra'
+  +'nsport; out __oResponseOptions:TROResponseOptions);'#13#10'{ procedure %OPE'
+  +'RATION_NAME%('#13#10'              // <%%% START PARAMS %%%>'#13#10'       '
+  +'       %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;'#13#10'          '
+  +'    // <%%% END PARAMS %%%>'#13#10'              ); }'#13#10'var'#13#10'  /'
+  +'/ <%%% START PARAMS_NO_STRIP %%%>'#13#10'  %PARAM_NAME%: %PARAM_TYPE%;'#13
+  +#10'  // <%%% END PARAMS_NO_STRIP %%%>'#13#10'  // <%%% START IF_HAS_COMPLEX'
+  +'_TYPE %%%>'#13#10'  __lObjectDisposer: TROObjectDisposer;'#13#10'  // <%%% '
+  +'END IF_HAS_COMPLEX_TYPE %%%>'#13#10'  __%SERVICE_NAME%Instance: I%SERVICE_N'
+  +'AME%;'#13#10'begin'#13#10'  // <%%% START PARAMS_NO_STRIP %%%>'#13#10'  // '
+  +'<%%% START IF_PARAM_TYPE_COMPLEX %%%>'#13#10'  %PARAM_NAME% := nil;'#13#10
+  +'  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>'#13#10'  // <%%% END PARAMS_NO_STR'
+  +'IP %%%>'#13#10'  try'#13#10'    // <%%% START IN_PARAMS_NO_STRIP %%%>'#13#10
+  +'    __Message.Read(''%PARAM_NAME%'', TypeInfo(%PARAM_TYPE%), %PARAM_NAME%, '
+  +'[%PARAM_ATTRIBUTE%]);'#13#10'    // <%%% END IN_PARAMS_NO_STRIP %%%>'#13#10
+  +#13#10'    __%SERVICE_NAME%Instance := __Instance as I%SERVICE_NAME%; '#13#10
+  +'    __%SERVICE_NAME%Instance.%OPERATION_NAME%('#13#10'                     '
+  +'          // <%%% START PARAMS %%%>'#13#10'                               %'
+  +'PARAM_NAME%,'#13#10'                               // <%%% END PARAMS %%%>'
+  +#13#10'                               );'#13#10#13#10'    __Message.Initiali'
+  +'zeResponseMessage(__Transport, ''%LIBRARY_NAME%'', ''%SERVICE_NAME%'', ''%O'
+  +'PERATION_NAME%Response'');'#13#10'    // <%%% START OUT_PARAMS_NO_STRIP %%%'
+  +'>'#13#10'    __Message.Write(''%PARAM_NAME%'', TypeInfo(%PARAM_TYPE%), %PAR'
+  +'AM_NAME%, [%PARAM_ATTRIBUTE%]);'#13#10'    // <%%% END OUT_PARAMS_NO_STRIP '
+  +'%%%>'#13#10'    __Message.Finalize;'#13#10'    __Message.UnsetAttributes(__'
+  +'Transport);'#13#10'    '#13#10'    // <%%% START IF_NO_OUT_PARAMS %%%>'#13
+  +#10'    __oResponseOptions := [roNoResponse];'#13#10#13#10'    // <%%% END I'
+  +'F_NO_OUT_PARAMS %%%>'#13#10'  finally'#13#10'    // <%%% START IF_HAS_COMPL'
+  +'EX_TYPE %%%>'#13#10'    __lObjectDisposer := TROObjectDisposer.Create(__Ins'
+  +'tance);'#13#10'    try'#13#10'      // <%%% START PARAMS_NO_STRIP %%%>'#13
+  +#10'      // <%%% START IF_PARAM_TYPE_COMPLEX %%%>'#13#10'      __lObjectDis'
+  +'poser.Add(%PARAM_NAME%);'#13#10'      // <%%% END IF_PARAM_TYPE_COMPLEX %%%'
+  +'>'#13#10'      // <%%% END PARAMS_NO_STRIP %%%>'#13#10'    finally'#13#10' '
+  +'     __lObjectDisposer.Free();'#13#10'    end;'#13#10'    // <%%% END IF_HA'
+  +'S_COMPLEX_TYPE %%%>'#13#10'  end;'#13#10'end;'#13#10#13#10'// <%%% END PROC'
+  +'EDURE_OPERATIONS %%%>'#13#10'// <%%% END SERVICES %%%>'#13#10'end.'#13#10
+]);
+LazarusResources.Add('TEMPLATE_IMPL_PAS','RCDATA',[
+  'unit %UNIT_NAME%;'#13#10#13#10'{--------------------------------------------'
+  +'--------------------------------}'#13#10'{ This unit was automatically gene'
+  +'rated by the RemObjects SDK after reading  }'#13#10'{ the RODL file associa'
+  +'ted with this project .                               }'#13#10'{           '
+  +'                                                                 }'#13#10'{'
+  +' This is where you are supposed to code the implementation of your objects.'
+  +' }'#13#10'{----------------------------------------------------------------'
+  +'------------}'#13#10#13#10'{$I RemObjects.inc}'#13#10#13#10'interface'#13#10
+  +#13#10'uses'#13#10'  {vcl:} Classes, SysUtils,'#13#10'  {RemObjects:} uROXML'
+  +'Intf, uROClientIntf, uROTypes, uROServer, uROServerIntf, uROSessions,'#13#10
+  +'  // <%%% START REQUIRED_UNITS %%%>'#13#10'  {Required:} %REQUIRED_UNIT_NAM'
+  +'E%,'#13#10'  // <%%% END REQUIRED_UNITS %%%>'#13#10'  {Generated:} %LIBRARY'
+  +'_NAME%_Intf;'#13#10#13#10'// <%%% START SERVICES %%%>'#13#10'type'#13#10'  '
+  +'{ T%SERVICE_NAME% }'#13#10'  T%SERVICE_NAME% = class(%SERVICE_ANCESTOR_NAME'
+  +'%, I%SERVICE_NAME%)'#13#10'  private'#13#10'  protected'#13#10'    { I%SERV'
+  +'ICE_NAME% methods }'#13#10'    // <%%% START FUNCTION_OPERATIONS %%%>'#13#10
+  +'    function %OPERATION_NAME%('#13#10'               // <%%% START PARAMS %'
+  +'%%>'#13#10'               %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%'
+  +';'#13#10'               // <%%% END PARAMS %%%>'#13#10'               ): %O'
+  +'PERATION_RESULT%;'#13#10'    // <%%% END FUNCTION_OPERATIONS %%%>'#13#10'  '
+  +'  // <%%% START PROCEDURE_OPERATIONS %%%>'#13#10'    procedure %OPERATION_N'
+  +'AME%('#13#10'               // <%%% START PARAMS %%%>'#13#10'              '
+  +' %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;'#13#10'               /'
+  +'/ <%%% END PARAMS %%%>'#13#10'               );'#13#10'    // <%%% END PROC'
+  +'EDURE_OPERATIONS %%%>'#13#10'  end;'#13#10'// <%%% END SERVICES %%%>'#13#10
+  +#13#10'implementation'#13#10#13#10'// <%%% START IF_DATA_MODULE %%%>'#13#10
+  +'{$R *.dfm}'#13#10#13#10'// <%%% END IF_DATA_MODULE %%%>'#13#10'uses'#13#10
+  +'  {Generated:} %LIBRARY_NAME%_Invk;'#13#10#13#10'// <%%% START SERVICES %%%'
+  +'>'#13#10'procedure Create_%SERVICE_NAME%(out anInstance : IUnknown);'#13#10
+  +'begin'#13#10'  anInstance := T%SERVICE_NAME%.Create('#13#10'    // <%%% STA'
+  +'RT IF_DATA_MODULE %%%>'#13#10'    nil'#13#10'    // <%%% END IF_DATA_MODULE'
+  +' %%%>'#13#10'    );'#13#10'end;'#13#10#13#10'{ %SERVICE_NAME% }'#13#10'// <'
+  +'%%% START FUNCTION_OPERATIONS %%%>'#13#10'function T%SERVICE_NAME%.%OPERATI'
+  +'ON_NAME%('#13#10'           // <%%% START PARAMS %%%>'#13#10'           %PA'
+  +'RAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;'#13#10'           // <%%% E'
+  +'ND PARAMS %%%>'#13#10'           ): %OPERATION_RESULT%;'#13#10'begin'#13#10
+  +'end;'#13#10#13#10'// <%%% END FUNCTION_OPERATIONS %%%>'#13#10'// <%%% START'
+  +' PROCEDURE_OPERATIONS %%%>'#13#10'procedure T%SERVICE_NAME%.%OPERATION_NAME'
+  +'%('#13#10'           // <%%% START PARAMS %%%>'#13#10'           %PARAM_FRO'
+  +'NT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;'#13#10'           // <%%% END PARA'
+  +'MS %%%>'#13#10'           );'#13#10'begin'#13#10'end;'#13#10#13#10'// <%%% '
+  +'END PROCEDURE_OPERATIONS %%%>'#13#10'initialization'#13#10'  TROClassFactor'
+  +'y.Create(''%SERVICE_NAME%'', Create_%SERVICE_NAME%, T%SERVICE_NAME%_Invoker'
+  +');'#13#10#13#10'finalization'#13#10#13#10'// <%%% END SERVICES %%%>'#13#10
+  +'end.'#13#10
+]);
+LazarusResources.Add('TEMPLATE_ASYNC_PAS','RCDATA',[
+  'unit %UNIT_NAME%;'#13#10#13#10'{--------------------------------------------'
+  +'--------------------------------}'#13#10'{ This unit was automatically gene'
+  +'rated by the RemObjects SDK after reading  }'#13#10'{ the RODL file associa'
+  +'ted with this project .                               }'#13#10'{           '
+  +'                                                                 }'#13#10'{'
+  +' Do not modify this unit manually, or your changes will be lost when this  '
+  +' }'#13#10'{ unit is regenerated the next time you compile the project.     '
+  +'            }'#13#10'{-----------------------------------------------------'
+  +'-----------------------}'#13#10#13#10'{$I RemObjects.inc}'#13#10#13#10'inte'
+  +'rface'#13#10#13#10'uses'#13#10'  {vcl:} Classes, TypInfo,'#13#10'  {RemObje'
+  +'cts:} uROXMLIntf, uROClasses, uROClient, uROTypes, uROClientIntf, uROAsync'
+  +#13#10'  // <%%% START REQUIRED_UNITS %%%>'#13#10'  {Required:} %REQUIRED_UN'
+  +'IT_NAME%,'#13#10'  // <%%% END REQUIRED_UNITS %%%>'#13#10'  {Generated:} %L'
+  +'IBRARY_NAME%_Intf;'#13#10#13#10'type'#13#10'  { Forward declarations }'#13
+  +#10'  // <%%% START SERVICES %%%>'#13#10'  I%SERVICE_NAME%_Async = interface'
+  +';'#13#10'  Co%SERVICE_NAME%_Async = class;'#13#10'  T%SERVICE_NAME%_AsyncPr'
+  +'oxy = class;'#13#10'  // <%%% END SERVICES %%%>'#13#10#13#10'  // <%%% STAR'
+  +'T SERVICES %%%>'#13#10'  { I%SERVICE_NAME%_Async }'#13#10'  // <%%% START D'
+  +'OCUMENTATION %%%>'#13#10#13#10'  { Description:'#13#10'      %CONTENT% }'#13
+  +#10'  // <%%% END DOCUMENTATION %%%>'#13#10'  I%SERVICE_NAME%_Async = interf'
+  +'ace%SERVICE_ANCESTOR_NAME%'#13#10'    [''%ASYNC_SERVICE_UID%'']'#13#10'    '
+  +'// <%%% START FUNCTION_OPERATIONS %%%>'#13#10'    procedure Invoke_%OPERATI'
+  +'ON_NAME%('#13#10'               // <%%% START IN_PARAMS %%%>'#13#10'       '
+  +'        %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;'#13#10'         '
+  +'      // <%%% END IN_PARAMS %%%>'#13#10'               );'#13#10'    functi'
+  +'on Retrieve_%OPERATION_NAME%('#13#10'               // <%%% START OUT_PARAM'
+  +'S %%%>'#13#10'               %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TY'
+  +'PE%;'#13#10'               // <%%% END OUT_PARAMS %%%>'#13#10'             '
+  +'  ): %OPERATION_RESULT%;'#13#10'    // <%%% END FUNCTION_OPERATIONS %%%>'#13
+  +#10'    // <%%% START PROCEDURE_OPERATIONS %%%>'#13#10'    procedure Invoke_'
+  +'%OPERATION_NAME%('#13#10'                // <%%% START IN_PARAMS %%%>'#13#10
+  +'                %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;'#13#10' '
+  +'               // <%%% END IN_PARAMS %%%>'#13#10'                );'#13#10
+  +'    // <%%% START IF_OUT_PARAMS %%%>'#13#10'    procedure Retrieve_%OPERATI'
+  +'ON_NAME%('#13#10'               // <%%% START OUT_PARAMS %%%>'#13#10'      '
+  +'         %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;'#13#10'        '
+  +'       // <%%% END OUT_PARAMS %%%>'#13#10'               );'#13#10'    // <'
+  +'%%% END IF_OUT_PARAMS %%%>'#13#10'    // <%%% END PROCEDURE_OPERATIONS %%%>'
+  +#13#10'  end;'#13#10#13#10'  { Co%SERVICE_NAME%_Async }'#13#10'  Co%SERVICE_'
+  +'NAME%_Async = class'#13#10'    class function Create(const aMessage: IROMes'
+  +'sage; aTransportChannel: IROTransportChannel): I%SERVICE_NAME%_Async;'#13#10
+  +'  end;'#13#10#13#10'  { T%SERVICE_NAME%_Proxy }'#13#10'  T%SERVICE_NAME%_As'
+  +'yncProxy = class(%SERVICE_PROXY_ANCESTOR_NAME%, I%SERVICE_NAME%_Async)'#13
+  +#10'  protected'#13#10'    function __GetInterfaceName:string; override;'#13
+  +#10#13#10'    // <%%% START FUNCTION_OPERATIONS %%%>'#13#10'    procedure In'
+  +'voke_%OPERATION_NAME%('#13#10'               // <%%% START IN_PARAMS %%%>'
+  +#13#10'               %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;'#13
+  +#10'               // <%%% END IN_PARAMS %%%>'#13#10'               );'#13#10
+  +'    function Retrieve_%OPERATION_NAME%('#13#10'               // <%%% START'
+  +' OUT_PARAMS %%%>'#13#10'               %PARAM_FRONT_MODIFIER% %PARAM_NAME%:'
+  +' %PARAM_TYPE%;'#13#10'               // <%%% END OUT_PARAMS %%%>'#13#10'   '
+  +'            ): %OPERATION_RESULT%;'#13#10'    // <%%% END FUNCTION_OPERATIO'
+  +'NS %%%>'#13#10'    // <%%% START PROCEDURE_OPERATIONS %%%>'#13#10'    proce'
+  +'dure Invoke_%OPERATION_NAME%('#13#10'                // <%%% START IN_PARAM'
+  +'S %%%>'#13#10'                %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_T'
+  +'YPE%;'#13#10'                // <%%% END IN_PARAMS %%%>'#13#10'            '
+  +'    );'#13#10'    // <%%% START IF_OUT_PARAMS %%%>'#13#10'    procedure Ret'
+  +'rieve_%OPERATION_NAME%('#13#10'               // <%%% START OUT_PARAMS %%%>'
+  +#13#10'               %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;'#13
+  +#10'               // <%%% END OUT_PARAMS %%%>'#13#10'               );'#13
+  +#10'    // <%%% END IF_OUT_PARAMS %%%>'#13#10'    // <%%% END PROCEDURE_OPER'
+  +'ATIONS %%%>'#13#10'  end;'#13#10#13#10'  // <%%% END SERVICES %%%>'#13#10'i'
+  +'mplementation'#13#10#13#10'uses'#13#10'  {vcl:} SysUtils,'#13#10'  {RemObje'
+  +'cts:} uROEventRepository, uRORes;'#13#10#13#10'// <%%% START SERVICES %%%>'
+  ,#13#10'{ Co%SERVICE_NAME%_Async }'#13#10#13#10'class function Co%SERVICE_NAM'
+  +'E%_Async.Create(const aMessage: IROMessage; aTransportChannel: IROTransport'
+  +'Channel): I%SERVICE_NAME%_Async;'#13#10'begin'#13#10'  result := T%SERVICE_'
+  +'NAME%_AsyncProxy.Create(aMessage, aTransportChannel);'#13#10'end;'#13#10#13
+  +#10'{ T%SERVICE_NAME%_AsyncProxy }'#13#10#13#10'function T%SERVICE_NAME%_Asy'
+  +'ncProxy.__GetInterfaceName:string;'#13#10'begin'#13#10'  result := ''%SERVI'
+  +'CE_NAME%'';'#13#10'end;'#13#10#13#10'// <%%% START FUNCTION_OPERATIONS %%%>'
+  +#13#10'procedure T%SERVICE_NAME%_AsyncProxy.Invoke_%OPERATION_NAME%('#13#10
+  +'           // <%%% START IN_PARAMS %%%>'#13#10'           %PARAM_FRONT_MODI'
+  +'FIER% %PARAM_NAME%: %PARAM_TYPE%;'#13#10'           // <%%% END IN_PARAMS %'
+  +'%%>'#13#10'           );'#13#10'begin'#13#10'  __AssertProxyNotBusy(''%OPER'
+  +'ATION_NAME%'');'#13#10#13#10'  __Message.InitializeRequestMessage(__Transpo'
+  +'rtChannel, ''%LIBRARY_NAME%'', __InterfaceName, ''%OPERATION_NAME%'');'#13
+  +#10'  // <%%% START IN_PARAMS_NO_STRIP %%%>'#13#10'  __Message.Write(''%PARA'
+  +'M_NAME%'', TypeInfo(%PARAM_TYPE%), %PARAM_NAME%, [%PARAM_ATTRIBUTE%]);'#13
+  +#10'  // <%%% END IN_PARAMS_NO_STRIP %%%>'#13#10#13#10'  __DispatchAsyncRequ'
+  +'est(''%OPERATION_NAME%'',__Message);'#13#10'end;'#13#10#13#10'function T%SE'
+  +'RVICE_NAME%_AsyncProxy.Retrieve_%OPERATION_NAME%('#13#10'           // <%%%'
+  +' START OUT_PARAMS %%%>'#13#10'           %PARAM_FRONT_MODIFIER% %PARAM_NAME'
+  +'%: %PARAM_TYPE%;'#13#10'           // <%%% END OUT_PARAMS %%%>'#13#10'     '
+  +'      ): %OPERATION_RESULT%;'#13#10'var'#13#10'  __response:TStream;'#13#10
+  +'begin'#13#10'  // <%%% START OUT_PARAMS_NO_STRIP %%%>'#13#10'  // <%%% STAR'
+  +'T IF_PARAM_TYPE_COMPLEX %%%>'#13#10'  %PARAM_NAME% := nil;'#13#10'  // <%%%'
+  +' END IF_PARAM_TYPE_COMPLEX %%%>'#13#10'  // <%%% END OUT_PARAMS_NO_STRIP %%'
+  +'%>'#13#10'  // <%%% START IF_RESULT_COMPLEX %%%>'#13#10'  Result := nil;'#13
+  +#10'  // <%%% END IF_RESULT_COMPLEX %%%>'#13#10#13#10'  __response := __Retr'
+  +'ieveAsyncResponse(''%OPERATION_NAME%'');'#13#10'  __Message.ReadFromStream('
+  +'__response);'#13#10#13#10'  __Message.Read(''Result'', TypeInfo(%OPERATION_'
+  +'RESULT%), Result, [%OPERATION_RESULT_ATTRIBUTE%]);'#13#10'  // <%%% START O'
+  +'UT_PARAMS_NO_STRIP %%%>'#13#10'  __Message.Read(''%PARAM_NAME%'', TypeInfo('
+  +'%PARAM_TYPE%), %PARAM_NAME%, [%PARAM_ATTRIBUTE%]);'#13#10'  // <%%% END OUT'
+  +'_PARAMS_NO_STRIP %%%>'#13#10#13#10'  __response.Free();'#13#10'end;'#13#10
+  +#13#10'// <%%% END FUNCTION_OPERATIONS %%%>'#13#10'// <%%% START PROCEDURE_O'
+  +'PERATIONS %%%>'#13#10'procedure T%SERVICE_NAME%_AsyncProxy.Invoke_%OPERATIO'
+  +'N_NAME%('#13#10'           // <%%% START IN_PARAMS %%%>'#13#10'           %'
+  +'PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;'#13#10'           // <%%%'
+  +' END IN_PARAMS %%%>'#13#10'           );'#13#10'var'#13#10'  __request:TStr'
+  +'eam;'#13#10'begin'#13#10'  __AssertProxyNotBusy(''%OPERATION_NAME%'');'#13
+  +#10'  __request := TMemoryStream.Create;'#13#10#13#10'  __Message.Initialize'
+  +'RequestMessage(__TransportChannel, ''%LIBRARY_NAME%'', __InterfaceName, ''%'
+  +'OPERATION_NAME%'');'#13#10'  // <%%% START IN_PARAMS_NO_STRIP %%%>'#13#10' '
+  +' __Message.Write(''%PARAM_NAME%'', TypeInfo(%PARAM_TYPE%), %PARAM_NAME%, [%'
+  +'PARAM_ATTRIBUTE%]);'#13#10'  // <%%% END IN_PARAMS_NO_STRIP %%%>'#13#10'  _'
+  +'_Message.Finalize;'#13#10#13#10'  __Message.WriteToStream(__request);'#13#10
+  +'  __DispatchAsyncRequest(''%OPERATION_NAME%'', __request, False);'#13#10'en'
+  +'d;'#13#10#13#10'// <%%% START IF_OUT_PARAMS %%%>'#13#10'procedure T%SERVICE'
+  +'_NAME%_AsyncProxy.Retrieve_%OPERATION_NAME%('#13#10'           // <%%% STAR'
+  +'T OUT_PARAMS %%%>'#13#10'           %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %P'
+  +'ARAM_TYPE%;'#13#10'           // <%%% END OUT_PARAMS %%%>'#13#10'          '
+  +' );'#13#10'var'#13#10'  __response:TStream;'#13#10'begin'#13#10'  // <%%% S'
+  +'TART OUT_PARAMS_NO_STRIP %%%>'#13#10'  // <%%% START IF_PARAM_TYPE_COMPLEX '
+  +'%%%>'#13#10'  %PARAM_NAME% := nil;'#13#10'  // <%%% END IF_PARAM_TYPE_COMPL'
+  +'EX %%%>'#13#10'  // <%%% END OUT_PARAMS_NO_STRIP %%%>'#13#10#13#10'  __resp'
+  +'onse := __RetrieveAsyncResponse(''%OPERATION_NAME%'');'#13#10'  __Message.R'
+  +'eadFromStream(__response);'#13#10#13#10'  // <%%% START OUT_PARAMS_NO_STRIP'
+  +' %%%>'#13#10'  __Message.Read(''%PARAM_NAME%'', TypeInfo(%PARAM_TYPE%), %PA'
+  +'RAM_NAME%, [%PARAM_ATTRIBUTE%]);'#13#10'  // <%%% END OUT_PARAMS_NO_STRIP %'
+  +'%%>'#13#10#13#10'  __response.Free();'#13#10'end;'#13#10#13#10'// <%%% END '
+  +'IF_OUT_PARAMS %%%>'#13#10'// <%%% END PROCEDURE_OPERATIONS %%%>'#13#10'// <'
+  +'%%% END SERVICES %%%>'#13#10'initialization'#13#10#13#10'finalization'#13#10
+  +#13#10'end.'#13#10
+]);
+LazarusResources.Add('TEMPLATE_WRAPPER_INTF_PAS','RCDATA',[
+  'unit %UNIT_NAME%;'#13#10#13#10'{--------------------------------------------'
+  +'--------------------------------}'#13#10'{ This unit was automatically gene'
+  +'rated by the RemObjects SDK after reading  }'#13#10'{ the RODL file associa'
+  +'ted with this project .                               }'#13#10'{           '
+  +'                                                                 }'#13#10'{'
+  +' Do not modify this unit manually, or your changes will be lost when this  '
+  +' }'#13#10'{ unit is regenerated the next time you compile the project.     '
+  +'            }'#13#10'{-----------------------------------------------------'
+  +'-----------------------}'#13#10#13#10'interface'#13#10#13#10'uses'#13#10'  '
+  +'// <%%% START USES %%%>'#13#10'  %USED_UNIT_NAME%,'#13#10'  // <%%% END USE'
+  +'S %%%>'#13#10'  ;'#13#10#13#10'type'#13#10'  // <%%% START TYPES %%%>'#13#10
+  +'  %TYPE_NAME% = %TYPE_UNIT_NAME%.%TYPE_NAME%;'#13#10'  // <%%% END TYPES %%'
+  +'%>'#13#10'  '#13#10'implementation'#13#10#13#10'end.'#13#10
+]);
+LazarusResources.Add('TEMPLATE_WRAPPER_INVK_PAS','RCDATA',[
+  'unit %UNIT_NAME%;'#13#10#13#10'{--------------------------------------------'
+  +'--------------------------------}'#13#10'{ This unit was automatically gene'
+  +'rated by the RemObjects SDK after reading  }'#13#10'{ the RODL file associa'
+  +'ted with this project .                               }'#13#10'{           '
+  +'                                                                 }'#13#10'{'
+  +' Do not modify this unit manually, or your changes will be lost when this  '
+  +' }'#13#10'{ unit is regenerated the next time you compile the project.     '
+  +'            }'#13#10'{-----------------------------------------------------'
+  +'-----------------------}'#13#10#13#10'interface'#13#10#13#10'uses'#13#10'  '
+  +'// <%%% START USES %%%>'#13#10'  %USED_UNIT_NAME%,'#13#10'  // <%%% END USE'
+  +'S %%%>'#13#10'  ;'#13#10#13#10'type'#13#10'  // <%%% START TYPES %%%>'#13#10
+  +'  %TYPE_NAME%_Invoker = %TYPE_UNIT_NAME%.%TYPE_NAME%_Invoker;'#13#10'  // <'
+  +'%%% END TYPES %%%>'#13#10'  '#13#10'implementation'#13#10#13#10'end.'#13#10
+]);
+LazarusResources.Add('TEMPLATE_WRAPPER_ASYNC_PAS','RCDATA',[
+  'unit %UNIT_NAME%;'#13#10#13#10'{--------------------------------------------'
+  +'--------------------------------}'#13#10'{ This unit was automatically gene'
+  +'rated by the RemObjects SDK after reading  }'#13#10'{ the RODL file associa'
+  +'ted with this project .                               }'#13#10'{           '
+  +'                                                                 }'#13#10'{'
+  +' Do not modify this unit manually, or your changes will be lost when this  '
+  +' }'#13#10'{ unit is regenerated the next time you compile the project.     '
+  +'            }'#13#10'{-----------------------------------------------------'
+  +'-----------------------}'#13#10#13#10'interface'#13#10#13#10'uses'#13#10'  '
+  +'// <%%% START USES %%%>'#13#10'  %USED_UNIT_NAME%,'#13#10'  // <%%% END USE'
+  +'S %%%>'#13#10'  ;'#13#10#13#10'type'#13#10'  // <%%% START TYPES %%%>'#13#10
+  +'  %TYPE_NAME% = %TYPE_UNIT_NAME%.%TYPE_NAME%;'#13#10'  // <%%% END TYPES %%'
+  +'%>'#13#10'  '#13#10'implementation'#13#10#13#10'end.'#13#10
+]);
+LazarusResources.Add('TEMPLATE_IMPL_DFM','RCDATA',[
+  '// <%%% START SERVICES %%%>'#13#10'object %SERVICE_NAME%: T%SERVICE_NAME%'#13
+  +#10'  OldCreateOrder = False'#13#10'  Height = 150'#13#10'  Width = 150'#13
+  +#10'end'#13#10'// <%%% END SERVICES %%%>'#13#10
+]);
+LazarusResources.Add('TEMPLATE_INTF_CPP','RCDATA',[
+  '// %UNIT_NAME%'#13#10'//'#13#10'/*------------------------------------------'
+  +'---------------------------------}'#13#10'{ This unit was automatically gen'
+  +'erated by the RemObjects SDK after reading  }'#13#10'{ the RODL file associ'
+  +'ated with this project.                                }'#13#10'{          '
+  +'                                                                  }'#13#10
+  +'{ Do not modify this unit manually, or your changes will be lost when this '
+  +'  }'#13#10'{ unit is regenerated the next time you compile the project.    '
+  +'             }'#13#10'{----------------------------------------------------'
+  +'-----------------------*/'#13#10#13#10'void __initialization_%UNIT_NAME%();'
+  +#13#10'void __finalization_%UNIT_NAME%();'#13#10#13#10'#pragma startup __ini'
+  +'tialization_%UNIT_NAME%'#13#10'#pragma exit    __finalization_%UNIT_NAME%'
+  +#13#10#13#10'#include "%LIBRARY_NAME%_Intf.h"'#13#10'#include <uROEventRepos'
+  +'itory.hpp>'#13#10'#include <uRORes.hpp>'#13#10#13#10'// Implementation of %'
+  +'UNIT_NAME%'#13#10#13#10'// <%%% START ARRAYS %%%>'#13#10'// %ARRAY_NAME%'#13
+  +#10'void __fastcall %ARRAY_NAME%::Assign(Classes::TPersistent* iSource)'#13
+  +#10'{'#13#10'  %ARRAY_NAME%* lSource = dynamic_cast<%ARRAY_NAME%*>(iSource);'
+  +#13#10'  if (lSource)'#13#10'  {'#13#10'    Clear();'#13#10'    Resize(lSour'
+  +'ce->Count);'#13#10'    for (int i = 0 ; i < Count ; i++)'#13#10'    {'#13#10
+  +'      // <%%% START IF_ARRAY_TYPE_COMPLEX %%%>'#13#10'      if (lSource->It'
+  +'ems[i] != NULL)'#13#10'      {'#13#10'        Items[i]->Assign(lSource->Ite'
+  +'ms[i]);'#13#10'      }'#13#10'      // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>'
+  +#13#10'      // <%%% START IF_ARRAY_TYPE_SIMPLE %%%>'#13#10'      Items[i] ='
+  +' lSource->Items[i];'#13#10'      // <%%% END IF_ARRAY_TYPE_SIMPLE %%%>'#13
+  +#10'    }'#13#10'  }'#13#10'  else'#13#10'  {'#13#10'    inherited::Assign(i'
+  +'Source);'#13#10'  }'#13#10'}'#13#10#13#10'void __fastcall %ARRAY_NAME%::Rea'
+  +'dComplex(TObject* ASerializer)'#13#10'{'#13#10'  // <%%% START IF_ARRAY_TYP'
+  +'E_SIMPLE %%%>'#13#10'  %ARRAY_TYPE% lval;'#13#10'  // <%%% END IF_ARRAY_TYP'
+  +'E_SIMPLE %%%>'#13#10'  // <%%% START IF_ARRAY_TYPE_COMPLEX %%%>'#13#10'  %A'
+  +'RRAY_TYPE%* lval;'#13#10'  // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>'#13#10'  '
+  +'TROSerializer* Serializer = dynamic_cast<TROSerializer*>(ASerializer);'#13
+  +#10'  for (int i = 0; i < Count; i++)'#13#10'  {'#13#10'    // <%%% START IF'
+  +'_ARRAY_BINARY_TYPE %%%>'#13#10'    Serializer->ReadBinary(Serializer->GetAr'
+  +'rayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), &lval,'
+  +' i);'#13#10'    // <%%% END IF_ARRAY_BINARY_TYPE %%%>'#13#10'    // <%%% ST'
+  +'ART IF_ARRAY_BOOLEAN_TYPE %%%>'#13#10'    Serializer->ReadEnumerated(Serial'
+  +'izer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef('
+  +'i)), __GetboolInfo, &lval, i);'#13#10'    // <%%% END IF_ARRAY_BOOLEAN_TYPE'
+  +' %%%>'#13#10'    // <%%% START IF_ARRAY_CURRENCY_TYPE %%%>'#13#10'    Seria'
+  +'lizer->ReadDouble(Serializer->GetArrayElementName(GetItemType(__classid(%AR'
+  +'RAY_NAME%)), GetItemRef(i)), ftCurr, &lval, i);'#13#10'    // <%%% END IF_A'
+  +'RRAY_CURRENCY_TYPE %%%>'#13#10'    // <%%% START IF_ARRAY_DATETIME_TYPE %%%'
+  +'>'#13#10'    Serializer->ReadDateTime(Serializer->GetArrayElementName(GetIt'
+  +'emType(__classid(%ARRAY_NAME%)), GetItemRef(i)), &lval, i);'#13#10'    // <'
+  +'%%% END IF_ARRAY_DATETIME_TYPE %%%>'#13#10'    // <%%% START IF_ARRAY_DECIM'
+  +'AL_TYPE %%%>'#13#10'    Serializer->ReadDecimal(Serializer->GetArrayElement'
+  +'Name(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), &lval, i);'#13#10
+  +'    // <%%% END IF_ARRAY_DECIMAL_TYPE %%%>'#13#10'    // <%%% START IF_ARRA'
+  +'Y_DOUBLE_TYPE %%%>'#13#10'    Serializer->ReadDouble(Serializer->GetArrayEl'
+  +'ementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), ftDouble, &'
+  +'lval, i);'#13#10'    // <%%% END IF_ARRAY_DOUBLE_TYPE %%%>'#13#10'    // <%'
+  +'%% START IF_ARRAY_GUID_TYPE %%%>'#13#10'    Serializer->ReadGuid(Serializer'
+  +'->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)),'
+  +' &lval, i);'#13#10'    // <%%% END IF_ARRAY_GUID_TYPE %%%>'#13#10'    // <%'
+  +'%% START IF_ARRAY_INT64_TYPE %%%>'#13#10'    Serializer->ReadInt64(Serializ'
+  +'er->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)'
+  +'), &lval, i);'#13#10'    // <%%% END IF_ARRAY_INT64_TYPE %%%>'#13#10'    //'
+  +' <%%% START IF_ARRAY_INTEGER_TYPE %%%>'#13#10'    Serializer->ReadInteger(S'
+  +'erializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetIte'
+  +'mRef(i)), otSLong, &lval, i);'#13#10'    // <%%% END IF_ARRAY_INTEGER_TYPE '
+  +'%%%>'#13#10'    // <%%% START IF_ARRAY_ANSISTRING_TYPE %%%>'#13#10'    Seri'
+  +'alizer->ReadUTF8String(Serializer->GetArrayElementName(GetItemType(__classi'
+  +'d(%ARRAY_NAME%)), GetItemRef(i)), &lval, i);'#13#10'    // <%%% END IF_ARRA'
+  +'Y_ANSISTRING_TYPE %%%>'#13#10'    // <%%% START IF_ARRAY_UTF8STRING_TYPE %%'
+  +'%>'#13#10'    Serializer->ReadUTF8String(Serializer->GetArrayElementName(Ge'
+  ,'tItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), &lval, i);'#13#10'    /'
+  +'/ <%%% END IF_ARRAY_UTF8STRING_TYPE %%%>'#13#10'    // <%%% START IF_ARRAY_'
+  +'VARIANT_TYPE %%%>'#13#10'    Serializer->ReadVariant(Serializer->GetArrayEl'
+  +'ementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), &lval, i);'
+  +#13#10'    // <%%% END IF_ARRAY_VARIANT_TYPE %%%>'#13#10'    // <%%% START I'
+  +'F_ARRAY_WIDESTRING_TYPE %%%>'#13#10'    Serializer->ReadWideString(Serializ'
+  +'er->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)'
+  +'), &lval, i);'#13#10'    // <%%% END IF_ARRAY_WIDESTRING_TYPE %%%>'#13#10' '
+  +'   // <%%% START IF_ARRAY_XML_TYPE %%%>'#13#10'    Serializer->ReadXml(Seri'
+  +'alizer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRe'
+  +'f(i)), &lval, i);'#13#10'    // <%%% END IF_ARRAY_XML_TYPE %%%>'#13#10'    '
+  +'// <%%% START IF_ARRAY_ARRAY_TYPE %%%>'#13#10'    Serializer->ReadArray(Ser'
+  +'ializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemR'
+  +'ef(i)), __classid(%ARRAY_TYPE%), &lval, i);'#13#10'    // <%%% END IF_ARRAY'
+  +'_ARRAY_TYPE %%%>'#13#10'    // <%%% START IF_ARRAY_ENUM_TYPE %%%>'#13#10'  '
+  +'  Serializer->ReadEnumerated(Serializer->GetArrayElementName(GetItemType(__'
+  +'classid(%ARRAY_NAME%)), GetItemRef(i)), __Get%ARRAY_TYPE%Info, &lval, i);'
+  +#13#10'    // <%%% END IF_ARRAY_ENUM_TYPE %%%>'#13#10'    // <%%% START IF_A'
+  +'RRAY_STRUCT_TYPE %%%>'#13#10'    Serializer->ReadStruct(Serializer->GetArra'
+  +'yElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), __classi'
+  +'d(%ARRAY_TYPE%), &lval, i);'#13#10'    // <%%% END IF_ARRAY_STRUCT_TYPE %%%'
+  +'>'#13#10'    Items[i] = lval;'#13#10'  }'#13#10'}'#13#10#13#10'void __fastc'
+  +'all  %ARRAY_NAME%::WriteComplex(TObject* ASerializer)'#13#10'{'#13#10'  TRO'
+  +'Serializer* Serializer = dynamic_cast<TROSerializer*>(ASerializer);'#13#10
+  +'  for(int i = 0; i < Count; i++)'#13#10'    // <%%% START IF_ARRAY_BINARY_T'
+  +'YPE %%%>'#13#10'    Serializer->WriteBinary(Serializer->GetArrayElementName'
+  +'(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), &(fItems[i]), i);'#13
+  +#10'    // <%%% END IF_ARRAY_BINARY_TYPE %%%>'#13#10'    // <%%% START IF_AR'
+  +'RAY_BOOLEAN_TYPE %%%>'#13#10'    Serializer->WriteEnumerated(Serializer->Ge'
+  +'tArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), __G'
+  +'etboolInfo, &(fItems[i]), i);'#13#10'    // <%%% END IF_ARRAY_BOOLEAN_TYPE '
+  +'%%%>'#13#10'    // <%%% START IF_ARRAY_CURRENCY_TYPE %%%>'#13#10'    Serial'
+  +'izer->WriteDouble(Serializer->GetArrayElementName(GetItemType(__classid(%AR'
+  +'RAY_NAME%)), GetItemRef(i)), ftCurr, &(fItems[i]), i);'#13#10'    // <%%% E'
+  +'ND IF_ARRAY_CURRENCY_TYPE %%%>'#13#10'    // <%%% START IF_ARRAY_DATETIME_T'
+  +'YPE %%%>'#13#10'    Serializer->WriteDateTime(Serializer->GetArrayElementNa'
+  +'me(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), &(fItems[i]), i);'
+  +#13#10'    // <%%% END IF_ARRAY_DATETIME_TYPE %%%>'#13#10'    // <%%% START '
+  +'IF_ARRAY_DECIMAL_TYPE %%%>'#13#10'    Serializer->WriteDecimal(Serializer->'
+  +'GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), &'
+  +'(fItems[i]), i);'#13#10'    // <%%% END IF_ARRAY_DECIMAL_TYPE %%%>'#13#10' '
+  +'   // <%%% START IF_ARRAY_DOUBLE_TYPE %%%>'#13#10'    Serializer->WriteDoub'
+  +'le(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), Ge'
+  +'tItemRef(i)), ftDouble, &(fItems[i]), i);'#13#10'    // <%%% END IF_ARRAY_D'
+  +'OUBLE_TYPE %%%>'#13#10'    // <%%% START IF_ARRAY_GUID_TYPE %%%>'#13#10'   '
+  +' Serializer->WriteGuid(Serializer->GetArrayElementName(GetItemType(__classi'
+  +'d(%ARRAY_NAME%)), GetItemRef(i)), &(fItems[i]), i);'#13#10'    // <%%% END '
+  +'IF_ARRAY_GUID_TYPE %%%>'#13#10'    // <%%% START IF_ARRAY_INT64_TYPE %%%>'
+  +#13#10'    Serializer->WriteInt64(Serializer->GetArrayElementName(GetItemTyp'
+  +'e(__classid(%ARRAY_NAME%)), GetItemRef(i)), &(fItems[i]), i);'#13#10'    //'
+  +' <%%% END IF_ARRAY_INT64_TYPE %%%>'#13#10'    // <%%% START IF_ARRAY_INTEGE'
+  +'R_TYPE %%%>'#13#10'    Serializer->WriteInteger(Serializer->GetArrayElement'
+  +'Name(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), otSLong, &(fItem'
+  +'s[i]), i);'#13#10'    // <%%% END IF_ARRAY_INTEGER_TYPE %%%>'#13#10'    // '
+  +'<%%% START IF_ARRAY_ANSISTRING_TYPE %%%>'#13#10'    Serializer->WriteUTF8St'
+  +'ring(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), '
+  +'GetItemRef(i)), &(fItems[i]), i);'#13#10'    // <%%% END IF_ARRAY_ANSISTRIN'
+  +'G_TYPE %%%>'#13#10'    // <%%% START IF_ARRAY_UTF8STRING_TYPE %%%>'#13#10' '
+  +'   Serializer->WriteUTF8String(Serializer->GetArrayElementName(GetItemType('
+  +'__classid(%ARRAY_NAME%)), GetItemRef(i)), &(fItems[i]), i);'#13#10'    // <'
+  +'%%% END IF_ARRAY_UTF8STRING_TYPE %%%>'#13#10'    // <%%% START IF_ARRAY_VAR'
+  +'IANT_TYPE %%%>'#13#10'    Serializer->WriteVariant(Serializer->GetArrayElem'
+  +'entName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), &(fItems[i]),'
+  +' i);'#13#10'    // <%%% END IF_ARRAY_VARIANT_TYPE %%%>'#13#10'    // <%%% S'
+  ,'TART IF_ARRAY_WIDESTRING_TYPE %%%>'#13#10'    Serializer->WriteWideString(S'
+  +'erializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetIte'
+  +'mRef(i)), &(fItems[i]), i);'#13#10'    // <%%% END IF_ARRAY_WIDESTRING_TYPE'
+  +' %%%>'#13#10'    // <%%% START IF_ARRAY_XML_TYPE %%%>'#13#10'    Serializer'
+  +'->WriteXml(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAM'
+  +'E%)), GetItemRef(i)), &(fItems[i]), i);'#13#10'    // <%%% END IF_ARRAY_XML'
+  +'_TYPE %%%>'#13#10'    // <%%% START IF_ARRAY_ARRAY_TYPE %%%>'#13#10'    Ser'
+  +'ializer->WriteArray(Serializer->GetArrayElementName(GetItemType(__classid(%'
+  +'ARRAY_NAME%)), GetItemRef(i)), &(fItems[i]), i);'#13#10'    // <%%% END IF_'
+  +'ARRAY_ARRAY_TYPE %%%>'#13#10'    // <%%% START IF_ARRAY_ENUM_TYPE %%%>'#13
+  +#10'    Serializer->WriteEnumerated(Serializer->GetArrayElementName(GetItemT'
+  +'ype(__classid(%ARRAY_NAME%)), GetItemRef(i)), __Get%ARRAY_TYPE%Info, &(fIte'
+  +'ms[i]), i);'#13#10'    // <%%% END IF_ARRAY_ENUM_TYPE %%%>'#13#10'    // <%'
+  +'%% START IF_ARRAY_STRUCT_TYPE %%%>'#13#10'    Serializer->WriteStruct(Seria'
+  +'lizer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef'
+  +'(i)), &(fItems[i]), __classid(%ARRAY_TYPE%), i);'#13#10'    // <%%% END IF_'
+  +'ARRAY_STRUCT_TYPE %%%>'#13#10'}'#13#10#13#10'void __fastcall %ARRAY_NAME%::'
+  +'Grow()'#13#10'{'#13#10'  int Delta;'#13#10'  int Capacity = fItems.Length;'
+  +#13#10'  if (Capacity > 64) '#13#10'  {'#13#10'    Delta = Capacity / 4;'#13
+  +#10'  }'#13#10'  else'#13#10'  {'#13#10'    if (Capacity > 8) '#13#10'      '
+  +'Delta = 16;'#13#10'    else'#13#10'      Delta = 4;'#13#10'  }'#13#10'  fIt'
+  +'ems.set_length(Capacity + Delta);'#13#10'}'#13#10#13#10'// <%%% START IF_AR'
+  +'RAY_TYPE_COMPLEX %%%>'#13#10'%ARRAY_TYPE%* __fastcall %ARRAY_NAME%::GetItem'
+  +'s(const int Index)'#13#10'// <%%% END IF_ARRAY_TYPE_COMPLEX %%%>'#13#10'// '
+  +'<%%% START IF_ARRAY_TYPE_SIMPLE %%%>'#13#10'%ARRAY_TYPE% __fastcall %ARRAY_'
+  +'NAME%::GetItems(const int Index)'#13#10'// <%%% END IF_ARRAY_TYPE_SIMPLE %%'
+  +'%>'#13#10'{'#13#10'  if ((Index < 0) || (Index >= Count))'#13#10'  {'#13#10
+  +'    RaiseError(LoadResourceString(&_err_ArrayIndexOutOfBounds), ARRAYOFCONS'
+  +'T((Index)));'#13#10'  }'#13#10'  return fItems[Index];'#13#10'}'#13#10#13#10
+  +'// <%%% START IF_ARRAY_TYPE_COMPLEX %%%>'#13#10'void __fastcall %ARRAY_NAME'
+  +'%::SetItems(const int Index, %ARRAY_TYPE%* Value)'#13#10'// <%%% END IF_ARR'
+  +'AY_TYPE_COMPLEX %%%>'#13#10'// <%%% START IF_ARRAY_TYPE_SIMPLE %%%>'#13#10
+  +'void __fastcall %ARRAY_NAME%::SetItems(const int Index, %ARRAY_TYPE% Value)'
+  +#13#10'// <%%% END IF_ARRAY_TYPE_SIMPLE %%%>'#13#10'{'#13#10'  if ((Index < '
+  +'0) || (Index >= Count))'#13#10'  {'#13#10'    RaiseError(LoadResourceString'
+  +'(&_err_ArrayIndexOutOfBounds), ARRAYOFCONST((Index)));'#13#10'  }'#13#10'  '
+  +'// <%%% START IF_ARRAY_TYPE_COMPLEX %%%>'#13#10'  delete fItems[Index];'#13
+  +#10'  // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>'#13#10'  fItems[Index] = Value;'
+  +#13#10'}'#13#10#13#10'int __fastcall %ARRAY_NAME%::GetCount()'#13#10'{'#13#10
+  +'  return fCount;'#13#10'}'#13#10#13#10'void* __fastcall %ARRAY_NAME%::GetIt'
+  +'emRef(const int Index)'#13#10'{'#13#10'  if ((Index < 0) || (Index >= Count'
+  +'))'#13#10'  {'#13#10'    RaiseError(LoadResourceString(&_err_ArrayIndexOutO'
+  +'fBounds), ARRAYOFCONST((Index)));'#13#10'  }'#13#10'  return &fItems[Index]'
+  +';'#13#10'}'#13#10#13#10'// <%%% START IF_ARRAY_TYPE_COMPLEX %%%>'#13#10'voi'
+  +'d __fastcall %ARRAY_NAME%::SetItemRef(const int Index, void* Ref)'#13#10'{'
+  +#13#10'  if ((Index < 0) || (Index >= Count))'#13#10'  {'#13#10'    RaiseErr'
+  +'or(LoadResourceString(&_err_ArrayIndexOutOfBounds), ARRAYOFCONST((Index)));'
+  +#13#10'  }'#13#10#13#10'  if (Ref != fItems[Index])'#13#10'  {'#13#10'    de'
+  +'lete fItems[Index];'#13#10'    fItems[Index] = reinterpret_cast<%ARRAY_TYPE'
+  +'%*>(Ref);'#13#10'  }'#13#10'}'#13#10#13#10'// <%%% END IF_ARRAY_TYPE_COMPLE'
+  +'X %%%>'#13#10'void __fastcall %ARRAY_NAME%::Clear()'#13#10'{'#13#10'  // <%'
+  +'%% START IF_ARRAY_TYPE_COMPLEX %%%>'#13#10'  for (int i = 0; i < Count; i++'
+  +')'#13#10'    delete fItems[i];'#13#10#13#10'  // <%%% END IF_ARRAY_TYPE_COM'
+  +'PLEX %%%>'#13#10'  fItems.set_length(0);'#13#10'  fCount = 0;'#13#10'}'#13
+  +#10#13#10'void __fastcall %ARRAY_NAME%::Delete(const int Index)'#13#10'{'#13
+  +#10'  if (Index >= Count)'#13#10'  {'#13#10'    RaiseError(LoadResourceStrin'
+  +'g(&_err_InvalidIndex), ARRAYOFCONST((Index)));'#13#10'  }'#13#10#13#10'  //'
+  +' <%%% START IF_ARRAY_TYPE_COMPLEX %%%>'#13#10'  delete fItems[Index];'#13#10
+  +#13#10'  // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>'#13#10'  if (Index < Count -'
+  +' 1)'#13#10'    for (int i = Index; i < Count - 1 ; i++)'#13#10'      fItems'
+  +'[i] = fItems[i + 1];'#13#10#13#10'  fItems.set_length(Count - 1);'#13#10'  '
+  +'fCount--;'#13#10'}'#13#10#13#10'void __fastcall %ARRAY_NAME%::Resize(const '
+  +'int ElementCount)'#13#10'{'#13#10'// <%%% START IF_ARRAY_TYPE_COMPLEX %%%>'
+  +#13#10'  int i;'#13#10'  for(i = fCount -1; i >= ElementCount; --i)'#13#10' '
+  ,'   delete fItems[i];'#13#10'// <%%% END IF_ARRAY_TYPE_COMPLEX %%%>'#13#10' '
+  +' fItems.set_length(ElementCount);'#13#10'// <%%% START IF_ARRAY_TYPE_COMPLE'
+  +'X %%%>'#13#10'  for(i = fCount; i <= ElementCount -1; ++i)'#13#10'    fItem'
+  +'s[i] = new %ARRAY_TYPE%();'#13#10'// <%%% END IF_ARRAY_TYPE_COMPLEX %%%>'#13
+  +#10'  fCount = ElementCount;'#13#10'}'#13#10#13#10'// <%%% START IF_ARRAY_TY'
+  +'PE_COMPLEX %%%>'#13#10'%ARRAY_TYPE%* __fastcall %ARRAY_NAME%::Add()'#13#10
+  +'{'#13#10'  %ARRAY_TYPE%* result = new %ARRAY_TYPE%();'#13#10'  Add(result);'
+  +#13#10'  return result;'#13#10'}'#13#10#13#10'// <%%% END IF_ARRAY_TYPE_COMP'
+  +'LEX %%%>'#13#10'// <%%% START IF_ARRAY_TYPE_COMPLEX %%%>'#13#10'int __fastc'
+  +'all %ARRAY_NAME%::Add(%ARRAY_TYPE%* Value)'#13#10'// <%%% END IF_ARRAY_TYPE'
+  +'_COMPLEX %%%>'#13#10'// <%%% START IF_ARRAY_TYPE_SIMPLE %%%>'#13#10'int __f'
+  +'astcall %ARRAY_NAME%::Add(%ARRAY_TYPE% Value)'#13#10'// <%%% END IF_ARRAY_T'
+  +'YPE_SIMPLE %%%>'#13#10'{'#13#10'  int result = Count;'#13#10'  if (fItems.L'
+  +'ength == result)'#13#10'    Grow();'#13#10#13#10'  fItems[result] = Value;'
+  +#13#10'  fCount++;'#13#10'  return result;'#13#10'}'#13#10'// <%%% END ARRAY'
+  +'S %%%>'#13#10'// <%%% START EXCEPTIONS %%%>'#13#10'// %EXCEPTION_NAME%'#13
+  +#10#13#10'%EXCEPTION_NAME%::%EXCEPTION_NAME%(AnsiString anExceptionMessage'
+  +#13#10'                   // <%%% START ANCESTOR_FIELDS %%%>'#13#10'        '
+  +'           // <%%% START IF_FIELD_TYPE_SIMPLE %%%>'#13#10'                 '
+  +'  , %FIELD_TYPE% a%FIELD_NAME% '#13#10'                   // <%%% END IF_FI'
+  +'ELD_TYPE_SIMPLE %%%>'#13#10'                   // <%%% START IF_FIELD_TYPE_'
+  +'COMPLEX %%%>'#13#10'                   , %FIELD_TYPE%* a%FIELD_NAME% '#13#10
+  +'                   // <%%% END IF_FIELD_TYPE_COMPLEX %%%>'#13#10'          '
+  +'         // <%%% END ANCESTOR_FIELDS %%%>'#13#10'                   // <%%%'
+  +' START FIELDS_NO_STRIP %%%>'#13#10'                   // <%%% START IF_FIEL'
+  +'D_TYPE_SIMPLE %%%>'#13#10'                   , %FIELD_TYPE% a%FIELD_NAME% '
+  +#13#10'                   // <%%% END IF_FIELD_TYPE_SIMPLE %%%>'#13#10'     '
+  +'              // <%%% START IF_FIELD_TYPE_COMPLEX %%%>'#13#10'             '
+  +'      , %FIELD_TYPE%* a%FIELD_NAME% '#13#10'                   // <%%% END '
+  +'IF_FIELD_TYPE_COMPLEX %%%>'#13#10'                   // <%%% END FIELDS_NO_'
+  +'STRIP %%%>'#13#10'                   ): %EXCEPTION_ANCESTOR_NAME%(anExcepti'
+  +'onMessage'#13#10'                     // <%%% START ANCESTOR_FIELDS %%%>'#13
+  +#10'                     , a%FIELD_NAME% '#13#10'                     // <%%'
+  +'% END ANCESTOR_FIELDS %%%>'#13#10'                     )'#13#10'{'#13#10'  '
+  +'// <%%% START FIELDS_NO_STRIP %%%>'#13#10'  f%FIELD_NAME% = a%FIELD_NAME%;'
+  +#13#10'  // <%%% END FIELDS_NO_STRIP %%%>'#13#10'}'#13#10#13#10'// <%%% STAR'
+  +'T IF_HAS_FIELDS %%%>'#13#10'void __fastcall %EXCEPTION_NAME%::ReadException'
+  +'(TObject* ASerializer)'#13#10'{'#13#10'  if (dynamic_cast<TROSerializer*>(A'
+  +'Serializer)->RecordStrictOrder)'#13#10'  {'#13#10'    // <%%% START IF_STRU'
+  +'CT_HAS_ANCESTOR %%%>'#13#10'    inherited::ReadException(ASerializer);'#13
+  +#10'    // <%%% END IF_STRUCT_HAS_ANCESTOR %%%>'#13#10'    // <%%% START FIE'
+  +'LDS_NO_STRIP %%%>'#13#10'    // <%%% START IF_FIELD_TYPE_SIMPLE %%%>'#13#10
+  +'    %FIELD_TYPE% l_%FIELD_NAME% = %FIELD_NAME%;'#13#10'    // <%%% END IF_F'
+  +'IELD_TYPE_SIMPLE %%%>'#13#10'    // <%%% START IF_FIELD_TYPE_COMPLEX %%%>'
+  +#13#10'    %FIELD_TYPE%* l_%FIELD_NAME% = %FIELD_NAME%;'#13#10'    // <%%% E'
+  +'ND IF_FIELD_TYPE_COMPLEX %%%>'#13#10'    // <%%% START IF_FIELD_BINARY_TYPE'
+  +' %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->ReadBinary("%FI'
+  +'ELD_NAME%", &l_%FIELD_NAME%);'#13#10'    if (%FIELD_NAME% != l_%FIELD_NAME%'
+  +') delete %FIELD_NAME%;'#13#10'    // <%%% END IF_FIELD_BINARY_TYPE %%%>'#13
+  +#10'    // <%%% START IF_FIELD_BOOLEAN_TYPE %%%>'#13#10'    dynamic_cast<TRO'
+  +'Serializer*>(ASerializer)->ReadEnumerated("%FIELD_NAME%", __GetboolInfo, &l'
+  +'_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_BOOLEAN_TYPE %%%>'#13#10'  '
+  +'  // <%%% START IF_FIELD_CURRENCY_TYPE %%%>'#13#10'    dynamic_cast<TROSeri'
+  +'alizer*>(ASerializer)->ReadDouble("%FIELD_NAME%", ftCurr, &l_%FIELD_NAME%);'
+  +#13#10'    // <%%% END IF_FIELD_CURRENCY_TYPE %%%>'#13#10'    // <%%% START '
+  +'IF_FIELD_DATETIME_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerial'
+  +'izer)->ReadDateTime("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%% EN'
+  +'D IF_FIELD_DATETIME_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_DECIMAL_TYP'
+  +'E %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->ReadDecimal("%'
+  +'FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_DECIMAL_TYP'
+  +'E %%%>'#13#10'    // <%%% START IF_FIELD_DOUBLE_TYPE %%%>'#13#10'    dynami'
+  +'c_cast<TROSerializer*>(ASerializer)->ReadDouble("%FIELD_NAME%", ftDouble, &'
+  +'l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_DOUBLE_TYPE %%%>'#13#10'  '
+  +'  // <%%% START IF_FIELD_GUID_TYPE %%%>'#13#10'    dynamic_cast<TROSerializ'
+  ,'er*>(ASerializer)->ReadGuid("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    //'
+  +' <%%% END IF_FIELD_GUID_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_INT64_T'
+  +'YPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->ReadInt64("%'
+  +'FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_INT64_TYPE '
+  +'%%%>'#13#10'    // <%%% START IF_FIELD_INTEGER_TYPE %%%>'#13#10'    dynamic'
+  +'_cast<TROSerializer*>(ASerializer)->ReadInteger("%FIELD_NAME%", otSLong, &l'
+  +'_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_INTEGER_TYPE %%%>'#13#10'  '
+  +'  // <%%% START IF_FIELD_ANSISTRING_TYPE %%%>'#13#10'    dynamic_cast<TROSe'
+  +'rializer*>(ASerializer)->ReadAnsiString("%FIELD_NAME%", &l_%FIELD_NAME%);'
+  +#13#10'    // <%%% END IF_FIELD_ANSISTRING_TYPE %%%>'#13#10'    // <%%% STAR'
+  +'T IF_FIELD_UTF8STRING_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASe'
+  +'rializer)->ReadUTF8String("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <'
+  +'%%% END IF_FIELD_UTF8STRING_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_VAR'
+  +'IANT_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->ReadVa'
+  +'riant("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_VAR'
+  +'IANT_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_WIDESTRING_TYPE %%%>'#13#10
+  +'    dynamic_cast<TROSerializer*>(ASerializer)->ReadWideString("%FIELD_NAME%'
+  +'", &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_WIDESTRING_TYPE %%%>'
+  +#13#10'    // <%%% START IF_FIELD_XML_TYPE %%%>'#13#10'    dynamic_cast<TROS'
+  +'erializer*>(ASerializer)->ReadXml("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10
+  +'    // <%%% END IF_FIELD_XML_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_AR'
+  +'RAY_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->ReadArr'
+  +'ay("%FIELD_NAME%", __classid(%FIELD_TYPE%), &l_%FIELD_NAME%);'#13#10'    if'
+  +' (%FIELD_NAME% != l_%FIELD_NAME%) delete %FIELD_NAME%;'#13#10'    // <%%% E'
+  +'ND IF_FIELD_ARRAY_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_ENUM_TYPE %%%'
+  +'>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->ReadEnumerated("%FI'
+  +'ELD_NAME%", __Get%FIELD_TYPE%Info, &l_%FIELD_NAME%);'#13#10'    // <%%% END'
+  +' IF_FIELD_ENUM_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_STRUCT_TYPE %%%>'
+  +#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->ReadStruct("%FIELD_NAM'
+  +'E%", __classid(%FIELD_TYPE%), &l_%FIELD_NAME%);'#13#10'    if (%FIELD_NAME%'
+  +' != l_%FIELD_NAME%) delete %FIELD_NAME%;'#13#10'    // <%%% END IF_FIELD_ST'
+  +'RUCT_TYPE %%%>'#13#10'    %FIELD_NAME% = l_%FIELD_NAME%;'#13#10'    // <%%%'
+  +' END FIELDS_NO_STRIP %%%>'#13#10'  }'#13#10'  else'#13#10'  {'#13#10'    //'
+  +' <%%% START ENTIRE_HIERARCHY_FIELDS %%%>'#13#10'    // <%%% START IF_FIELD_'
+  +'TYPE_SIMPLE %%%>'#13#10'    %FIELD_TYPE% l_%FIELD_NAME% = %FIELD_NAME%;'#13
+  +#10'    // <%%% END IF_FIELD_TYPE_SIMPLE %%%>'#13#10'    // <%%% START IF_FI'
+  +'ELD_TYPE_COMPLEX %%%>'#13#10'    %FIELD_TYPE%* l_%FIELD_NAME% = %FIELD_NAME'
+  +'%;'#13#10'    // <%%% END IF_FIELD_TYPE_COMPLEX %%%>'#13#10'    // <%%% STA'
+  +'RT IF_FIELD_BINARY_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASeria'
+  +'lizer)->ReadBinary("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    if (%FIELD_'
+  +'NAME% != l_%FIELD_NAME%) delete %FIELD_NAME%;'#13#10'    // <%%% END IF_FIE'
+  +'LD_BINARY_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_BOOLEAN_TYPE %%%>'#13
+  +#10'    dynamic_cast<TROSerializer*>(ASerializer)->ReadEnumerated("%FIELD_NA'
+  +'ME%", __GetboolInfo, &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_BOOL'
+  +'EAN_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_CURRENCY_TYPE %%%>'#13#10' '
+  +'   dynamic_cast<TROSerializer*>(ASerializer)->ReadDouble("%FIELD_NAME%", ft'
+  +'Curr, &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_CURRENCY_TYPE %%%>'
+  +#13#10'    // <%%% START IF_FIELD_DATETIME_TYPE %%%>'#13#10'    dynamic_cast'
+  +'<TROSerializer*>(ASerializer)->ReadDateTime("%FIELD_NAME%", &l_%FIELD_NAME%'
+  +');'#13#10'    // <%%% END IF_FIELD_DATETIME_TYPE %%%>'#13#10'    // <%%% ST'
+  +'ART IF_FIELD_DECIMAL_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASer'
+  +'ializer)->ReadDecimal("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%% '
+  +'END IF_FIELD_DECIMAL_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_DOUBLE_TYP'
+  +'E %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->ReadDouble("%F'
+  +'IELD_NAME%", ftDouble, &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_DO'
+  +'UBLE_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_GUID_TYPE %%%>'#13#10'    '
+  +'dynamic_cast<TROSerializer*>(ASerializer)->ReadGuid("%FIELD_NAME%", &l_%FIE'
+  +'LD_NAME%);'#13#10'    // <%%% END IF_FIELD_GUID_TYPE %%%>'#13#10'    // <%%'
+  +'% START IF_FIELD_INT64_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(AS'
+  +'erializer)->ReadInt64("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%% '
+  +'END IF_FIELD_INT64_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_INTEGER_TYPE'
+  +' %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->ReadInteger("%F'
+  +'IELD_NAME%", otSLong, &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_INT'
+  +'EGER_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_ANSISTRING_TYPE %%%>'#13#10
+  ,'    dynamic_cast<TROSerializer*>(ASerializer)->ReadAnsiString("%FIELD_NAME%'
+  +'", &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_ANSISTRING_TYPE %%%>'
+  +#13#10'    // <%%% START IF_FIELD_UTF8STRING_TYPE %%%>'#13#10'    dynamic_ca'
+  +'st<TROSerializer*>(ASerializer)->ReadUTF8String("%FIELD_NAME%", &l_%FIELD_N'
+  +'AME%);'#13#10'    // <%%% END IF_FIELD_UTF8STRING_TYPE %%%>'#13#10'    // <'
+  +'%%% START IF_FIELD_VARIANT_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*'
+  +'>(ASerializer)->ReadVariant("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    //'
+  +' <%%% END IF_FIELD_VARIANT_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_WIDE'
+  +'STRING_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->Read'
+  +'WideString("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIEL'
+  +'D_WIDESTRING_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_XML_TYPE %%%>'#13
+  +#10'    dynamic_cast<TROSerializer*>(ASerializer)->ReadXml("%FIELD_NAME%", &'
+  +'l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_XML_TYPE %%%>'#13#10'    /'
+  +'/ <%%% START IF_FIELD_ARRAY_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer'
+  +'*>(ASerializer)->ReadArray("%FIELD_NAME%", __classid(%FIELD_TYPE%), &l_%FIE'
+  +'LD_NAME%);'#13#10'    if (%FIELD_NAME% != l_%FIELD_NAME%) delete %FIELD_NAM'
+  +'E%;'#13#10'    // <%%% END IF_FIELD_ARRAY_TYPE %%%>'#13#10'    // <%%% STAR'
+  +'T IF_FIELD_ENUM_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializ'
+  +'er)->ReadEnumerated("%FIELD_NAME%", __Get%FIELD_TYPE%Info, &l_%FIELD_NAME%)'
+  +';'#13#10'    // <%%% END IF_FIELD_ENUM_TYPE %%%>'#13#10'    // <%%% START I'
+  +'F_FIELD_STRUCT_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerialize'
+  +'r)->ReadStruct("%FIELD_NAME%", __classid(%FIELD_TYPE%), &l_%FIELD_NAME%);'
+  +#13#10'    if (%FIELD_NAME% != l_%FIELD_NAME%) delete %FIELD_NAME%;'#13#10' '
+  +'   // <%%% END IF_FIELD_STRUCT_TYPE %%%>'#13#10'    %FIELD_NAME% = l_%FIELD'
+  +'_NAME%;'#13#10'    // <%%% END ENTIRE_HIERARCHY_FIELDS %%%>'#13#10'  }'#13
+  +#10'}'#13#10#13#10'void __fastcall %EXCEPTION_NAME%::WriteException(TObject*'
+  +' ASerializer)'#13#10'{'#13#10'  if (dynamic_cast<TROSerializer*>(ASerialize'
+  +'r)->RecordStrictOrder)'#13#10'  {'#13#10'    // <%%% START IF_STRUCT_HAS_AN'
+  +'CESTOR %%%>'#13#10'    inherited::WriteException(ASerializer);'#13#10'    /'
+  +'/ <%%% END IF_STRUCT_HAS_ANCESTOR %%%>'#13#10'    // <%%% START FIELDS_NO_S'
+  +'TRIP %%%>'#13#10'    // <%%% START IF_FIELD_TYPE_SIMPLE %%%>'#13#10'    %FI'
+  +'ELD_TYPE% l_%FIELD_NAME% = %FIELD_NAME%;'#13#10'    // <%%% END IF_FIELD_TY'
+  +'PE_SIMPLE %%%>'#13#10'    // <%%% START IF_FIELD_TYPE_COMPLEX %%%>'#13#10' '
+  +'   %FIELD_TYPE%* l_%FIELD_NAME% = %FIELD_NAME%;'#13#10'    // <%%% END IF_F'
+  +'IELD_TYPE_COMPLEX %%%>'#13#10'    // <%%% START IF_FIELD_BINARY_TYPE %%%>'
+  +#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->WriteBinary("%FIELD_NA'
+  +'ME%", &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_BINARY_TYPE %%%>'#13
+  +#10'    // <%%% START IF_FIELD_BOOLEAN_TYPE %%%>'#13#10'    dynamic_cast<TRO'
+  +'Serializer*>(ASerializer)->WriteEnumerated("%FIELD_NAME%", __GetboolInfo, &'
+  +'l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_BOOLEAN_TYPE %%%>'#13#10' '
+  +'   // <%%% START IF_FIELD_CURRENCY_TYPE %%%>'#13#10'    dynamic_cast<TROSer'
+  +'ializer*>(ASerializer)->WriteDouble("%FIELD_NAME%", ftCurr, &l_%FIELD_NAME%'
+  +');'#13#10'    // <%%% END IF_FIELD_CURRENCY_TYPE %%%>'#13#10'    // <%%% ST'
+  +'ART IF_FIELD_DATETIME_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASe'
+  +'rializer)->WriteDateTime("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%'
+  +'%% END IF_FIELD_DATETIME_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_DECIMA'
+  +'L_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->WriteDeci'
+  +'mal("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_DECIM'
+  +'AL_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_DOUBLE_TYPE %%%>'#13#10'    '
+  +'dynamic_cast<TROSerializer*>(ASerializer)->WriteDouble("%FIELD_NAME%", ftDo'
+  +'uble, &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_DOUBLE_TYPE %%%>'#13
+  +#10'    // <%%% START IF_FIELD_GUID_TYPE %%%>'#13#10'    dynamic_cast<TROSer'
+  +'ializer*>(ASerializer)->WriteGuid("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10
+  +'    // <%%% END IF_FIELD_GUID_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_I'
+  +'NT64_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->WriteI'
+  +'nt64("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_INT6'
+  +'4_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_INTEGER_TYPE %%%>'#13#10'    '
+  +'dynamic_cast<TROSerializer*>(ASerializer)->WriteInteger("%FIELD_NAME%", otS'
+  +'Long, &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_INTEGER_TYPE %%%>'
+  +#13#10'    // <%%% START IF_FIELD_ANSISTRING_TYPE %%%>'#13#10'    dynamic_ca'
+  +'st<TROSerializer*>(ASerializer)->WriteAnsiString("%FIELD_NAME%", &l_%FIELD_'
+  +'NAME%);'#13#10'    // <%%% END IF_FIELD_ANSISTRING_TYPE %%%>'#13#10'    // '
+  +'<%%% START IF_FIELD_UTF8STRING_TYPE %%%>'#13#10'    dynamic_cast<TROSeriali'
+  +'zer*>(ASerializer)->WriteUTF8String("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10
+  ,'    // <%%% END IF_FIELD_UTF8STRING_TYPE %%%>'#13#10'    // <%%% START IF_F'
+  +'IELD_VARIANT_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)'
+  +'->WriteVariant("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_'
+  +'FIELD_VARIANT_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_WIDESTRING_TYPE %'
+  +'%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->WriteWideString("'
+  +'%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_WIDESTRING'
+  +'_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_XML_TYPE %%%>'#13#10'    dynam'
+  +'ic_cast<TROSerializer*>(ASerializer)->WriteXml("%FIELD_NAME%", &l_%FIELD_NA'
+  +'ME%);'#13#10'    // <%%% END IF_FIELD_XML_TYPE %%%>'#13#10'    // <%%% STAR'
+  +'T IF_FIELD_ARRAY_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASeriali'
+  +'zer)->WriteArray("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%% END I'
+  +'F_FIELD_ARRAY_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_ENUM_TYPE %%%>'#13
+  +#10'    dynamic_cast<TROSerializer*>(ASerializer)->WriteEnumerated("%FIELD_N'
+  +'AME%", __Get%FIELD_TYPE%Info, &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_F'
+  +'IELD_ENUM_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_STRUCT_TYPE %%%>'#13
+  +#10'    dynamic_cast<TROSerializer*>(ASerializer)->WriteStruct("%FIELD_NAME%'
+  +'", &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_STRUCT_TYPE %%%>'#13#10
+  +'    // <%%% END FIELDS_NO_STRIP %%%>'#13#10'  }'#13#10'  else'#13#10'  {'#13
+  +#10'    // <%%% START ENTIRE_HIERARCHY_FIELDS %%%>'#13#10'    // <%%% START '
+  +'IF_FIELD_TYPE_SIMPLE %%%>'#13#10'    %FIELD_TYPE% l_%FIELD_NAME% = %FIELD_N'
+  +'AME%;'#13#10'    // <%%% END IF_FIELD_TYPE_SIMPLE %%%>'#13#10'    // <%%% S'
+  +'TART IF_FIELD_TYPE_COMPLEX %%%>'#13#10'    %FIELD_TYPE%* l_%FIELD_NAME% = %'
+  +'FIELD_NAME%;'#13#10'    // <%%% END IF_FIELD_TYPE_COMPLEX %%%>'#13#10'    /'
+  +'/ <%%% START IF_FIELD_BINARY_TYPE %%%>'#13#10'    dynamic_cast<TROSerialize'
+  +'r*>(ASerializer)->WriteBinary("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    '
+  +'// <%%% END IF_FIELD_BINARY_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_BOO'
+  +'LEAN_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->WriteE'
+  +'numerated("%FIELD_NAME%", __GetboolInfo, &l_%FIELD_NAME%);'#13#10'    // <%'
+  +'%% END IF_FIELD_BOOLEAN_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_CURRENC'
+  +'Y_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->WriteDoub'
+  +'le("%FIELD_NAME%", ftCurr, &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIEL'
+  +'D_CURRENCY_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_DATETIME_TYPE %%%>'
+  +#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->WriteDateTime("%FIELD_'
+  +'NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_DATETIME_TYPE %%%'
+  +'>'#13#10'    // <%%% START IF_FIELD_DECIMAL_TYPE %%%>'#13#10'    dynamic_ca'
+  +'st<TROSerializer*>(ASerializer)->WriteDecimal("%FIELD_NAME%", &l_%FIELD_NAM'
+  +'E%);'#13#10'    // <%%% END IF_FIELD_DECIMAL_TYPE %%%>'#13#10'    // <%%% S'
+  +'TART IF_FIELD_DOUBLE_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASer'
+  +'ializer)->WriteDouble("%FIELD_NAME%", ftDouble, &l_%FIELD_NAME%);'#13#10'  '
+  +'  // <%%% END IF_FIELD_DOUBLE_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_G'
+  +'UID_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->WriteGu'
+  +'id("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_GUID_T'
+  +'YPE %%%>'#13#10'    // <%%% START IF_FIELD_INT64_TYPE %%%>'#13#10'    dynam'
+  +'ic_cast<TROSerializer*>(ASerializer)->WriteInt64("%FIELD_NAME%", &l_%FIELD_'
+  +'NAME%);'#13#10'    // <%%% END IF_FIELD_INT64_TYPE %%%>'#13#10'    // <%%% '
+  +'START IF_FIELD_INTEGER_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(AS'
+  +'erializer)->WriteInteger("%FIELD_NAME%", otSLong, &l_%FIELD_NAME%);'#13#10
+  +'    // <%%% END IF_FIELD_INTEGER_TYPE %%%>'#13#10'    // <%%% START IF_FIEL'
+  +'D_ANSISTRING_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)'
+  +'->WriteAnsiString("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%% END '
+  +'IF_FIELD_ANSISTRING_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_UTF8STRING_'
+  +'TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->WriteUTF8St'
+  +'ring("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_UTF8'
+  +'STRING_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_VARIANT_TYPE %%%>'#13#10
+  +'    dynamic_cast<TROSerializer*>(ASerializer)->WriteVariant("%FIELD_NAME%",'
+  +' &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_VARIANT_TYPE %%%>'#13#10
+  +'    // <%%% START IF_FIELD_WIDESTRING_TYPE %%%>'#13#10'    dynamic_cast<TRO'
+  +'Serializer*>(ASerializer)->WriteWideString("%FIELD_NAME%", &l_%FIELD_NAME%)'
+  +';'#13#10'    // <%%% END IF_FIELD_WIDESTRING_TYPE %%%>'#13#10'    // <%%% S'
+  +'TART IF_FIELD_XML_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerial'
+  +'izer)->WriteXml("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%% END IF'
+  +'_FIELD_XML_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_ARRAY_TYPE %%%>'#13
+  +#10'    dynamic_cast<TROSerializer*>(ASerializer)->WriteArray("%FIELD_NAME%"'
+  +', &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_ARRAY_TYPE %%%>'#13#10
+  ,'    // <%%% START IF_FIELD_ENUM_TYPE %%%>'#13#10'    dynamic_cast<TROSerial'
+  +'izer*>(ASerializer)->WriteEnumerated("%FIELD_NAME%", __Get%FIELD_TYPE%Info,'
+  +' &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_ENUM_TYPE %%%>'#13#10'  '
+  +'  // <%%% START IF_FIELD_STRUCT_TYPE %%%>'#13#10'    dynamic_cast<TROSerial'
+  +'izer*>(ASerializer)->WriteStruct("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10' '
+  +'   // <%%% END IF_FIELD_STRUCT_TYPE %%%>'#13#10'    // <%%% END ENTIRE_HIER'
+  +'ARCHY_FIELDS %%%>'#13#10'  }'#13#10'}'#13#10#13#10'// <%%% END IF_HAS_FIELD'
+  +'S %%%>'#13#10'// <%%% END EXCEPTIONS %%%>'#13#10'// <%%% START STRUCTS %%%>'
+  +#13#10'// %STRUCT_NAME%'#13#10#13#10'void __fastcall %STRUCT_NAME%::Assign(C'
+  +'lasses::TPersistent* iSource)'#13#10'{'#13#10'  inherited::Assign(iSource);'
+  +'  // inherited typedef'#13#10'  // <%%% START IF_HAS_FIELDS %%%>'#13#10#13
+  +#10'  %STRUCT_NAME%* lSource = dynamic_cast<%STRUCT_NAME%*>(iSource);'#13#10
+  +'  if (lSource)'#13#10'  {'#13#10'  // <%%% END IF_HAS_FIELDS %%%>'#13#10'  '
+  +'  // <%%% START FIELDS_NO_STRIP %%%>'#13#10'    // <%%% START IF_FIELD_TYPE'
+  +'_SIMPLE %%%>'#13#10'    %FIELD_NAME% = lSource->%FIELD_NAME%;'#13#10'    //'
+  +' <%%% END IF_FIELD_TYPE_SIMPLE %%%>'#13#10'    // <%%% START IF_FIELD_TYPE_'
+  +'COMPLEX %%%>'#13#10'    // <%%% START IF_NOT_AUTO_CREATE_FIELDS %%%>'#13#10
+  +'    if (f%FIELD_NAME% != NULL)'#13#10'    {'#13#10'      if (lSource->%FIEL'
+  +'D_NAME% != NULL) '#13#10'      {'#13#10'        %FIELD_NAME%->Assign(lSourc'
+  +'e->%FIELD_NAME%);'#13#10'      }'#13#10'      else'#13#10'      {'#13#10'  '
+  +'      delete f%FIELD_NAME%;'#13#10'        f%FIELD_NAME% = NULL;'#13#10'   '
+  +'   }'#13#10'    }'#13#10'    // <%%% END IF_NOT_AUTO_CREATE_FIELDS %%%>'#13
+  +#10'    // <%%% START IF_AUTO_CREATE_FIELDS %%%>'#13#10'    %FIELD_NAME%->As'
+  +'sign(lSource->%FIELD_NAME%);'#13#10'    // <%%% END IF_AUTO_CREATE_FIELDS %'
+  +'%%>'#13#10'    // <%%% END IF_FIELD_TYPE_COMPLEX %%%>'#13#10'    // <%%% EN'
+  +'D FIELDS_NO_STRIP %%%>'#13#10'  // <%%% START IF_HAS_FIELDS %%%>'#13#10'  }'
+  +#13#10'  // <%%% END IF_HAS_FIELDS %%%>'#13#10'}'#13#10#13#10'// <%%% START '
+  +'FIELDS_NO_STRIP %%%>'#13#10'// <%%% START IF_FIELD_TYPE_COMPLEX %%%>'#13#10
+  +'%FIELD_TYPE%* __fastcall %STRUCT_NAME%::Get%FIELD_NAME%()'#13#10'{'#13#10' '
+  +' // <%%% START IF_AUTO_CREATE_FIELDS %%%>'#13#10'  if (f%FIELD_NAME% == NUL'
+  +'L) '#13#10'    f%FIELD_NAME% = new %FIELD_TYPE%();'#13#10'  // <%%% END IF_'
+  +'AUTO_CREATE_FIELDS %%%>'#13#10'  return f%FIELD_NAME%;'#13#10'}'#13#10#13#10
+  +'// <%%% END IF_FIELD_TYPE_COMPLEX %%%>'#13#10'// <%%% END FIELDS_NO_STRIP %'
+  +'%%>'#13#10'// <%%% START IF_HAS_FIELDS %%%>'#13#10'void __fastcall %STRUCT_'
+  +'NAME%::ReadComplex(TObject* ASerializer)'#13#10'{'#13#10'  if (dynamic_cast'
+  +'<TROSerializer*>(ASerializer)->RecordStrictOrder)'#13#10'  {'#13#10'    // '
+  +'<%%% START IF_STRUCT_HAS_ANCESTOR %%%>'#13#10'    inherited::ReadException('
+  +'ASerializer);'#13#10'    // <%%% END IF_STRUCT_HAS_ANCESTOR %%%>'#13#10'   '
+  +' // <%%% START FIELDS_NO_STRIP %%%>'#13#10'    // <%%% START IF_FIELD_TYPE_'
+  +'SIMPLE %%%>'#13#10'    %FIELD_TYPE% l_%FIELD_NAME% = %FIELD_NAME%;'#13#10' '
+  +'   // <%%% END IF_FIELD_TYPE_SIMPLE %%%>'#13#10'    // <%%% START IF_FIELD_'
+  +'TYPE_COMPLEX %%%>'#13#10'    %FIELD_TYPE%* l_%FIELD_NAME% = %FIELD_NAME%;'
+  +#13#10'    // <%%% END IF_FIELD_TYPE_COMPLEX %%%>'#13#10'    // <%%% START I'
+  +'F_FIELD_BINARY_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerialize'
+  +'r)->ReadBinary("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    if (%FIELD_NAME'
+  +'% != l_%FIELD_NAME%) delete %FIELD_NAME%;'#13#10'    // <%%% END IF_FIELD_B'
+  +'INARY_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_BOOLEAN_TYPE %%%>'#13#10
+  +'    dynamic_cast<TROSerializer*>(ASerializer)->ReadEnumerated("%FIELD_NAME%'
+  +'", __GetboolInfo, &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_BOOLEAN'
+  +'_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_CURRENCY_TYPE %%%>'#13#10'    '
+  +'dynamic_cast<TROSerializer*>(ASerializer)->ReadDouble("%FIELD_NAME%", ftCur'
+  +'r, &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_CURRENCY_TYPE %%%>'#13
+  +#10'    // <%%% START IF_FIELD_DATETIME_TYPE %%%>'#13#10'    dynamic_cast<TR'
+  +'OSerializer*>(ASerializer)->ReadDateTime("%FIELD_NAME%", &l_%FIELD_NAME%);'
+  +#13#10'    // <%%% END IF_FIELD_DATETIME_TYPE %%%>'#13#10'    // <%%% START '
+  +'IF_FIELD_DECIMAL_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASeriali'
+  +'zer)->ReadDecimal("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%% END '
+  +'IF_FIELD_DECIMAL_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_DOUBLE_TYPE %%'
+  +'%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->ReadDouble("%FIELD'
+  +'_NAME%", ftDouble, &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_DOUBLE'
+  +'_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_GUID_TYPE %%%>'#13#10'    dyna'
+  +'mic_cast<TROSerializer*>(ASerializer)->ReadGuid("%FIELD_NAME%", &l_%FIELD_N'
+  +'AME%);'#13#10'    // <%%% END IF_FIELD_GUID_TYPE %%%>'#13#10'    // <%%% ST'
+  +'ART IF_FIELD_INT64_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASeria'
+  ,'lizer)->ReadInt64("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%% END '
+  +'IF_FIELD_INT64_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_INTEGER_TYPE %%%'
+  +'>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->ReadInteger("%FIELD'
+  +'_NAME%", otSLong, &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_INTEGER'
+  +'_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_ANSISTRING_TYPE %%%>'#13#10'  '
+  +'  dynamic_cast<TROSerializer*>(ASerializer)->ReadAnsiString("%FIELD_NAME%",'
+  +' &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_ANSISTRING_TYPE %%%>'#13
+  +#10'    // <%%% START IF_FIELD_UTF8STRING_TYPE %%%>'#13#10'    dynamic_cast<'
+  +'TROSerializer*>(ASerializer)->ReadUTF8String("%FIELD_NAME%", &l_%FIELD_NAME'
+  +'%);'#13#10'    // <%%% END IF_FIELD_UTF8STRING_TYPE %%%>'#13#10'    // <%%%'
+  +' START IF_FIELD_VARIANT_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(A'
+  +'Serializer)->ReadVariant("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%'
+  +'%% END IF_FIELD_VARIANT_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_WIDESTR'
+  +'ING_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->ReadWid'
+  +'eString("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_W'
+  +'IDESTRING_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_XML_TYPE %%%>'#13#10
+  +'    dynamic_cast<TROSerializer*>(ASerializer)->ReadXml("%FIELD_NAME%", &l_%'
+  +'FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_XML_TYPE %%%>'#13#10'    // <'
+  +'%%% START IF_FIELD_ARRAY_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>('
+  +'ASerializer)->ReadArray("%FIELD_NAME%", __classid(%FIELD_TYPE%), &l_%FIELD_'
+  +'NAME%);'#13#10'    if (%FIELD_NAME% != l_%FIELD_NAME%) delete %FIELD_NAME%;'
+  +#13#10'    // <%%% END IF_FIELD_ARRAY_TYPE %%%>'#13#10'    // <%%% START IF_'
+  +'FIELD_ENUM_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->'
+  +'ReadEnumerated("%FIELD_NAME%", __Get%FIELD_TYPE%Info, &l_%FIELD_NAME%);'#13
+  +#10'    // <%%% END IF_FIELD_ENUM_TYPE %%%>'#13#10'    // <%%% START IF_FIEL'
+  +'D_STRUCT_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->Re'
+  +'adStruct("%FIELD_NAME%", __classid(%FIELD_TYPE%), &l_%FIELD_NAME%);'#13#10
+  +'    if (%FIELD_NAME% != l_%FIELD_NAME%) delete %FIELD_NAME%;'#13#10'    // '
+  +'<%%% END IF_FIELD_STRUCT_TYPE %%%>'#13#10'    %FIELD_NAME% = l_%FIELD_NAME%'
+  +';'#13#10'    // <%%% END FIELDS_NO_STRIP %%%>'#13#10'  }'#13#10'  else'#13
+  +#10'  {'#13#10'    // <%%% START ENTIRE_HIERARCHY_FIELDS %%%>'#13#10'    // '
+  +'<%%% START IF_FIELD_TYPE_SIMPLE %%%>'#13#10'    %FIELD_TYPE% l_%FIELD_NAME%'
+  +' = %FIELD_NAME%;'#13#10'    // <%%% END IF_FIELD_TYPE_SIMPLE %%%>'#13#10'  '
+  +'  // <%%% START IF_FIELD_TYPE_COMPLEX %%%>'#13#10'    %FIELD_TYPE%* l_%FIEL'
+  +'D_NAME% = %FIELD_NAME%;'#13#10'    // <%%% END IF_FIELD_TYPE_COMPLEX %%%>'
+  +#13#10'    // <%%% START IF_FIELD_BINARY_TYPE %%%>'#13#10'    dynamic_cast<T'
+  +'ROSerializer*>(ASerializer)->ReadBinary("%FIELD_NAME%", &l_%FIELD_NAME%);'
+  +#13#10'    if (%FIELD_NAME% != l_%FIELD_NAME%) delete %FIELD_NAME%;'#13#10' '
+  +'   // <%%% END IF_FIELD_BINARY_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_'
+  +'BOOLEAN_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->Rea'
+  +'dEnumerated("%FIELD_NAME%", __GetboolInfo, &l_%FIELD_NAME%);'#13#10'    // '
+  +'<%%% END IF_FIELD_BOOLEAN_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_CURRE'
+  +'NCY_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->ReadDou'
+  +'ble("%FIELD_NAME%", ftCurr, &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIE'
+  +'LD_CURRENCY_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_DATETIME_TYPE %%%>'
+  +#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->ReadDateTime("%FIELD_N'
+  +'AME%", &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_DATETIME_TYPE %%%>'
+  +#13#10'    // <%%% START IF_FIELD_DECIMAL_TYPE %%%>'#13#10'    dynamic_cast<'
+  +'TROSerializer*>(ASerializer)->ReadDecimal("%FIELD_NAME%", &l_%FIELD_NAME%);'
+  +#13#10'    // <%%% END IF_FIELD_DECIMAL_TYPE %%%>'#13#10'    // <%%% START I'
+  +'F_FIELD_DOUBLE_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerialize'
+  +'r)->ReadDouble("%FIELD_NAME%", ftDouble, &l_%FIELD_NAME%);'#13#10'    // <%'
+  +'%% END IF_FIELD_DOUBLE_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_GUID_TYP'
+  +'E %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->ReadGuid("%FIE'
+  +'LD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_GUID_TYPE %%%>'
+  +#13#10'    // <%%% START IF_FIELD_INT64_TYPE %%%>'#13#10'    dynamic_cast<TR'
+  +'OSerializer*>(ASerializer)->ReadInt64("%FIELD_NAME%", &l_%FIELD_NAME%);'#13
+  +#10'    // <%%% END IF_FIELD_INT64_TYPE %%%>'#13#10'    // <%%% START IF_FIE'
+  +'LD_INTEGER_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->'
+  +'ReadInteger("%FIELD_NAME%", otSLong, &l_%FIELD_NAME%);'#13#10'    // <%%% E'
+  +'ND IF_FIELD_INTEGER_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_ANSISTRING_'
+  +'TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->ReadAnsiStr'
+  +'ing("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_ANSIS'
+  +'TRING_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_UTF8STRING_TYPE %%%>'#13
+  ,#10'    dynamic_cast<TROSerializer*>(ASerializer)->ReadUTF8String("%FIELD_NA'
+  +'ME%", &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_UTF8STRING_TYPE %%%'
+  +'>'#13#10'    // <%%% START IF_FIELD_VARIANT_TYPE %%%>'#13#10'    dynamic_ca'
+  +'st<TROSerializer*>(ASerializer)->ReadVariant("%FIELD_NAME%", &l_%FIELD_NAME'
+  +'%);'#13#10'    // <%%% END IF_FIELD_VARIANT_TYPE %%%>'#13#10'    // <%%% ST'
+  +'ART IF_FIELD_WIDESTRING_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(A'
+  +'Serializer)->ReadWideString("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    //'
+  +' <%%% END IF_FIELD_WIDESTRING_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_X'
+  +'ML_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->ReadXml('
+  +'"%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_XML_TYPE '
+  +'%%%>'#13#10'    // <%%% START IF_FIELD_ARRAY_TYPE %%%>'#13#10'    dynamic_c'
+  +'ast<TROSerializer*>(ASerializer)->ReadArray("%FIELD_NAME%", __classid(%FIEL'
+  +'D_TYPE%), &l_%FIELD_NAME%);'#13#10'    if (%FIELD_NAME% != l_%FIELD_NAME%) '
+  +'delete %FIELD_NAME%;'#13#10'    // <%%% END IF_FIELD_ARRAY_TYPE %%%>'#13#10
+  +'    // <%%% START IF_FIELD_ENUM_TYPE %%%>'#13#10'    dynamic_cast<TROSerial'
+  +'izer*>(ASerializer)->ReadEnumerated("%FIELD_NAME%", __Get%FIELD_TYPE%Info, '
+  +'&l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_ENUM_TYPE %%%>'#13#10'   '
+  +' // <%%% START IF_FIELD_STRUCT_TYPE %%%>'#13#10'    dynamic_cast<TROSeriali'
+  +'zer*>(ASerializer)->ReadStruct("%FIELD_NAME%", __classid(%FIELD_TYPE%), &l_'
+  +'%FIELD_NAME%);'#13#10'    if (%FIELD_NAME% != l_%FIELD_NAME%) delete %FIELD'
+  +'_NAME%;'#13#10'    // <%%% END IF_FIELD_STRUCT_TYPE %%%>'#13#10'    %FIELD_'
+  +'NAME% = l_%FIELD_NAME%;'#13#10'    // <%%% END ENTIRE_HIERARCHY_FIELDS %%%>'
+  +#13#10'  }'#13#10'}'#13#10#13#10'void __fastcall %STRUCT_NAME%::WriteComplex'
+  +'(TObject* ASerializer)'#13#10'{'#13#10'  if (dynamic_cast<TROSerializer*>(A'
+  +'Serializer)->RecordStrictOrder)'#13#10'  {'#13#10'    // <%%% START IF_STRU'
+  +'CT_HAS_ANCESTOR %%%>'#13#10'    inherited::WriteException(ASerializer);'#13
+  +#10'    // <%%% END IF_STRUCT_HAS_ANCESTOR %%%>'#13#10'    // <%%% START FIE'
+  +'LDS_NO_STRIP %%%>'#13#10'    // <%%% START IF_FIELD_TYPE_SIMPLE %%%>'#13#10
+  +'    %FIELD_TYPE% l_%FIELD_NAME% = %FIELD_NAME%;'#13#10'    // <%%% END IF_F'
+  +'IELD_TYPE_SIMPLE %%%>'#13#10'    // <%%% START IF_FIELD_TYPE_COMPLEX %%%>'
+  +#13#10'    %FIELD_TYPE%* l_%FIELD_NAME% = %FIELD_NAME%;'#13#10'    // <%%% E'
+  +'ND IF_FIELD_TYPE_COMPLEX %%%>'#13#10'    // <%%% START IF_FIELD_BINARY_TYPE'
+  +' %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->WriteBinary("%F'
+  +'IELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_BINARY_TYPE '
+  +'%%%>'#13#10'    // <%%% START IF_FIELD_BOOLEAN_TYPE %%%>'#13#10'    dynamic'
+  +'_cast<TROSerializer*>(ASerializer)->WriteEnumerated("%FIELD_NAME%", __Getbo'
+  +'olInfo, &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_BOOLEAN_TYPE %%%>'
+  +#13#10'    // <%%% START IF_FIELD_CURRENCY_TYPE %%%>'#13#10'    dynamic_cast'
+  +'<TROSerializer*>(ASerializer)->WriteDouble("%FIELD_NAME%", ftCurr, &l_%FIEL'
+  +'D_NAME%);'#13#10'    // <%%% END IF_FIELD_CURRENCY_TYPE %%%>'#13#10'    // '
+  +'<%%% START IF_FIELD_DATETIME_TYPE %%%>'#13#10'    dynamic_cast<TROSerialize'
+  +'r*>(ASerializer)->WriteDateTime("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'  '
+  +'  // <%%% END IF_FIELD_DATETIME_TYPE %%%>'#13#10'    // <%%% START IF_FIELD'
+  +'_DECIMAL_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->Wr'
+  +'iteDecimal("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIEL'
+  +'D_DECIMAL_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_DOUBLE_TYPE %%%>'#13
+  +#10'    dynamic_cast<TROSerializer*>(ASerializer)->WriteDouble("%FIELD_NAME%'
+  +'", ftDouble, &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_DOUBLE_TYPE '
+  +'%%%>'#13#10'    // <%%% START IF_FIELD_GUID_TYPE %%%>'#13#10'    dynamic_ca'
+  +'st<TROSerializer*>(ASerializer)->WriteGuid("%FIELD_NAME%", &l_%FIELD_NAME%)'
+  +';'#13#10'    // <%%% END IF_FIELD_GUID_TYPE %%%>'#13#10'    // <%%% START I'
+  +'F_FIELD_INT64_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer'
+  +')->WriteInt64("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_F'
+  +'IELD_INT64_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_INTEGER_TYPE %%%>'#13
+  +#10'    dynamic_cast<TROSerializer*>(ASerializer)->WriteInteger("%FIELD_NAME'
+  +'%", otSLong, &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_INTEGER_TYPE'
+  +' %%%>'#13#10'    // <%%% START IF_FIELD_ANSISTRING_TYPE %%%>'#13#10'    dyn'
+  +'amic_cast<TROSerializer*>(ASerializer)->WriteAnsiString("%FIELD_NAME%", &l_'
+  +'%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_ANSISTRING_TYPE %%%>'#13#10
+  +'    // <%%% START IF_FIELD_UTF8STRING_TYPE %%%>'#13#10'    dynamic_cast<TRO'
+  +'Serializer*>(ASerializer)->WriteUTF8String("%FIELD_NAME%", &l_%FIELD_NAME%)'
+  +';'#13#10'    // <%%% END IF_FIELD_UTF8STRING_TYPE %%%>'#13#10'    // <%%% S'
+  +'TART IF_FIELD_VARIANT_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASe'
+  +'rializer)->WriteVariant("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%'
+  ,'% END IF_FIELD_VARIANT_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_WIDESTRI'
+  +'NG_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->WriteWid'
+  +'eString("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_W'
+  +'IDESTRING_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_XML_TYPE %%%>'#13#10
+  +'    dynamic_cast<TROSerializer*>(ASerializer)->WriteXml("%FIELD_NAME%", &l_'
+  +'%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_XML_TYPE %%%>'#13#10'    // '
+  +'<%%% START IF_FIELD_ARRAY_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>'
+  +'(ASerializer)->WriteArray("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <'
+  +'%%% END IF_FIELD_ARRAY_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_ENUM_TYP'
+  +'E %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->WriteEnumerate'
+  +'d("%FIELD_NAME%", __Get%FIELD_TYPE%Info, &l_%FIELD_NAME%);'#13#10'    // <%'
+  +'%% END IF_FIELD_ENUM_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_STRUCT_TYP'
+  +'E %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->WriteStruct("%'
+  +'FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_STRUCT_TYPE'
+  +' %%%>'#13#10'    // <%%% END FIELDS_NO_STRIP %%%>'#13#10'  }'#13#10'  else'
+  +#13#10'  {'#13#10'    // <%%% START ENTIRE_HIERARCHY_FIELDS %%%>'#13#10'    '
+  +'// <%%% START IF_FIELD_TYPE_SIMPLE %%%>'#13#10'    %FIELD_TYPE% l_%FIELD_NA'
+  +'ME% = %FIELD_NAME%;'#13#10'    // <%%% END IF_FIELD_TYPE_SIMPLE %%%>'#13#10
+  +'    // <%%% START IF_FIELD_TYPE_COMPLEX %%%>'#13#10'    %FIELD_TYPE%* l_%FI'
+  +'ELD_NAME% = %FIELD_NAME%;'#13#10'    // <%%% END IF_FIELD_TYPE_COMPLEX %%%>'
+  +#13#10'    // <%%% START IF_FIELD_BINARY_TYPE %%%>'#13#10'    dynamic_cast<T'
+  +'ROSerializer*>(ASerializer)->WriteBinary("%FIELD_NAME%", &l_%FIELD_NAME%);'
+  +#13#10'    // <%%% END IF_FIELD_BINARY_TYPE %%%>'#13#10'    // <%%% START IF'
+  +'_FIELD_BOOLEAN_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerialize'
+  +'r)->WriteEnumerated("%FIELD_NAME%", __GetboolInfo, &l_%FIELD_NAME%);'#13#10
+  +'    // <%%% END IF_FIELD_BOOLEAN_TYPE %%%>'#13#10'    // <%%% START IF_FIEL'
+  +'D_CURRENCY_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->'
+  +'WriteDouble("%FIELD_NAME%", ftCurr, &l_%FIELD_NAME%);'#13#10'    // <%%% EN'
+  +'D IF_FIELD_CURRENCY_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_DATETIME_TY'
+  +'PE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->WriteDateTime'
+  +'("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_DATETIME'
+  +'_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_DECIMAL_TYPE %%%>'#13#10'    d'
+  +'ynamic_cast<TROSerializer*>(ASerializer)->WriteDecimal("%FIELD_NAME%", &l_%'
+  +'FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_DECIMAL_TYPE %%%>'#13#10'    '
+  +'// <%%% START IF_FIELD_DOUBLE_TYPE %%%>'#13#10'    dynamic_cast<TROSerializ'
+  +'er*>(ASerializer)->WriteDouble("%FIELD_NAME%", ftDouble, &l_%FIELD_NAME%);'
+  +#13#10'    // <%%% END IF_FIELD_DOUBLE_TYPE %%%>'#13#10'    // <%%% START IF'
+  +'_FIELD_GUID_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)-'
+  +'>WriteGuid("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIEL'
+  +'D_GUID_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_INT64_TYPE %%%>'#13#10' '
+  +'   dynamic_cast<TROSerializer*>(ASerializer)->WriteInt64("%FIELD_NAME%", &l'
+  +'_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_INT64_TYPE %%%>'#13#10'    '
+  +'// <%%% START IF_FIELD_INTEGER_TYPE %%%>'#13#10'    dynamic_cast<TROSeriali'
+  +'zer*>(ASerializer)->WriteInteger("%FIELD_NAME%", otSLong, &l_%FIELD_NAME%);'
+  +#13#10'    // <%%% END IF_FIELD_INTEGER_TYPE %%%>'#13#10'    // <%%% START I'
+  +'F_FIELD_ANSISTRING_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASeria'
+  +'lizer)->WriteAnsiString("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%'
+  +'% END IF_FIELD_ANSISTRING_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_UTF8S'
+  +'TRING_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->Write'
+  +'UTF8String("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIEL'
+  +'D_UTF8STRING_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_VARIANT_TYPE %%%>'
+  +#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->WriteVariant("%FIELD_N'
+  +'AME%", &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_VARIANT_TYPE %%%>'
+  +#13#10'    // <%%% START IF_FIELD_WIDESTRING_TYPE %%%>'#13#10'    dynamic_ca'
+  +'st<TROSerializer*>(ASerializer)->WriteWideString("%FIELD_NAME%", &l_%FIELD_'
+  +'NAME%);'#13#10'    // <%%% END IF_FIELD_WIDESTRING_TYPE %%%>'#13#10'    // '
+  +'<%%% START IF_FIELD_XML_TYPE %%%>'#13#10'    dynamic_cast<TROSerializer*>(A'
+  +'Serializer)->WriteXml("%FIELD_NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%% '
+  +'END IF_FIELD_XML_TYPE %%%>'#13#10'    // <%%% START IF_FIELD_ARRAY_TYPE %%%'
+  +'>'#13#10'    dynamic_cast<TROSerializer*>(ASerializer)->WriteArray("%FIELD_'
+  +'NAME%", &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_ARRAY_TYPE %%%>'
+  +#13#10'    // <%%% START IF_FIELD_ENUM_TYPE %%%>'#13#10'    dynamic_cast<TRO'
+  +'Serializer*>(ASerializer)->WriteEnumerated("%FIELD_NAME%", __Get%FIELD_TYPE'
+  +'%Info, &l_%FIELD_NAME%);'#13#10'    // <%%% END IF_FIELD_ENUM_TYPE %%%>'#13
+  ,#10'    // <%%% START IF_FIELD_STRUCT_TYPE %%%>'#13#10'    dynamic_cast<TROS'
+  +'erializer*>(ASerializer)->WriteStruct("%FIELD_NAME%", &l_%FIELD_NAME%);'#13
+  +#10'    // <%%% END IF_FIELD_STRUCT_TYPE %%%>'#13#10'    // <%%% END ENTIRE_'
+  +'HIERARCHY_FIELDS %%%>'#13#10'  }'#13#10'}'#13#10#13#10'// <%%% END IF_HAS_F'
+  +'IELDS %%%>'#13#10'//%STRUCT_COLLECTION_NAME%'#13#10'%STRUCT_NAME%* __fastca'
+  +'ll %STRUCT_COLLECTION_NAME%::Add()'#13#10'{'#13#10'  return dynamic_cast<%S'
+  +'TRUCT_NAME%*>(inherited::Add());'#13#10'}'#13#10#13#10'%STRUCT_NAME%* __fas'
+  +'tcall %STRUCT_COLLECTION_NAME%::GetItems(const int Index)'#13#10'{'#13#10' '
+  +' return dynamic_cast<%STRUCT_NAME%*>(inherited::Items[Index]);'#13#10'}'#13
+  +#10#13#10'void __fastcall %STRUCT_COLLECTION_NAME%::SetItems(const int Index'
+  +', %STRUCT_NAME%* Value)'#13#10'{'#13#10'  dynamic_cast<%STRUCT_NAME%*>(inhe'
+  +'rited::Items[Index])->Assign(Value);'#13#10'}'#13#10#13#10'// <%%% START AR'
+  +'RAYS_IS_FOUND %%%>'#13#10'void %STRUCT_COLLECTION_NAME%::LoadFromArray(%ARR'
+  +'AY_NAME%* anArray)'#13#10'{'#13#10'  Clear();'#13#10'  '#13#10'  for(int i '
+  +'= 0; i <= anArray->Count-1; ++i)'#13#10'    Add()->Assign((*anArray)[i]);'
+  +#13#10'}'#13#10#13#10'void %STRUCT_COLLECTION_NAME%::SaveToArray(%ARRAY_NAME'
+  +'%* anArray)'#13#10'{'#13#10'  anArray->Clear();'#13#10'  anArray->Resize(Co'
+  +'unt);'#13#10'  for(int i = 0; i <= Count-1; ++i)'#13#10'  {'#13#10'    anAr'
+  +'ray->Items[i] = new %STRUCT_NAME%;'#13#10'    anArray->Items[i]->Assign(Ite'
+  +'ms[i]);'#13#10'  }'#13#10'}'#13#10#13#10'// <%%% END ARRAYS_IS_FOUND %%%>'
+  +#13#10'// <%%% END STRUCTS %%%>'#13#10'// <%%% START SERVICES %%%>'#13#10'//'
+  +' <%%% START FUNCTION_OPERATIONS %%%>'#13#10'// <%%% START IF_RESULT_SIMPLE '
+  +'%%%>'#13#10'%OPERATION_RESULT% __fastcall T%SERVICE_NAME%_Proxy::%OPERATION'
+  +'_NAME%('#13#10'// <%%% END IF_RESULT_SIMPLE %%%>'#13#10'// <%%% START IF_RE'
+  +'SULT_COMPLEX %%%>'#13#10'%OPERATION_RESULT%* __fastcall T%SERVICE_NAME%_Pro'
+  +'xy::%OPERATION_NAME%('#13#10'// <%%% END IF_RESULT_COMPLEX %%%>'#13#10'  //'
+  +' <%%% START PARAMS %%%>'#13#10'  // <%%% START IF_PARAM_TYPE_SIMPLE %%%>'#13
+  +#10'  %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%'
+  +','#13#10'  // <%%% END IF_PARAM_TYPE_SIMPLE %%%>'#13#10'  // <%%% START IF_'
+  +'PARAM_TYPE_COMPLEX %%%>'#13#10'  %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARA'
+  +'M_BACK_MODIFIER% %PARAM_NAME%,'#13#10'  // <%%% END IF_PARAM_TYPE_COMPLEX %'
+  +'%%>'#13#10'  // <%%% END PARAMS %%%>'#13#10'  )'#13#10'{'#13#10'  // <%%% S'
+  +'TART IF_RESULT_SIMPLE %%%>'#13#10'  %OPERATION_RESULT% result;'#13#10'  // '
+  +'<%%% END IF_RESULT_SIMPLE %%%>'#13#10'  // <%%% START IF_RESULT_COMPLEX %%%'
+  +'>'#13#10'  %OPERATION_RESULT%* result;'#13#10'  // <%%% END IF_RESULT_COMPL'
+  +'EX %%%>'#13#10#13#10'  // <%%% START OUT_PARAMS_NO_STRIP %%%>'#13#10'  // <'
+  +'%%% START IF_PARAM_TYPE_COMPLEX %%%>'#13#10'  %PARAM_NAME% = NULL;'#13#10' '
+  +' // <%%% END IF_PARAM_TYPE_COMPLEX %%%>'#13#10'  // <%%% END OUT_PARAMS_NO_'
+  +'STRIP %%%>'#13#10'  // <%%% START IF_RESULT_COMPLEX %%%>'#13#10'  result = '
+  +'NULL;'#13#10'  // <%%% END IF_RESULT_COMPLEX %%%>'#13#10'  try'#13#10'  {'
+  +#13#10'    __Message->InitializeRequestMessage(__TransportChannel, "%LIBRARY'
+  +'_NAME%", __InterfaceName, "%OPERATION_NAME%");'#13#10'    // <%%% START IN_'
+  +'PARAMS_NO_STRIP %%%>'#13#10'    // <%%% START IF_PARAM_TYPE_SIMPLE %%%>'#13
+  +#10'    __Message->Write("%PARAM_NAME%", __Get%PARAM_TYPE%Info, &%PARAM_NAME'
+  +'%, TParamAttributes(%PARAM_ATTRIBUTE%));'#13#10'    // <%%% END IF_PARAM_TY'
+  +'PE_SIMPLE %%%>'#13#10'    // <%%% START IF_PARAM_TYPE_COMPLEX %%%>'#13#10' '
+  +'   __Message->Write("%PARAM_NAME%", __typeinfo(%PARAM_TYPE%), &%PARAM_NAME%'
+  +', TParamAttributes(%PARAM_ATTRIBUTE%));'#13#10'    // <%%% END IF_PARAM_TYP'
+  +'E_COMPLEX %%%>'#13#10'    // <%%% END IN_PARAMS_NO_STRIP %%%>'#13#10'    __'
+  +'Message->Finalize();'#13#10#13#10'    __TransportChannel->Dispatch(__Messag'
+  +'e);'#13#10#13#10'    // <%%% START IF_RESULT_SIMPLE %%%>'#13#10'    __Messa'
+  +'ge->Read("Result", __Get%OPERATION_RESULT%Info, &result, TParamAttributes(%'
+  +'OPERATION_RESULT_ATTRIBUTE%));'#13#10'    // <%%% END IF_RESULT_SIMPLE %%%>'
+  +#13#10'    // <%%% START IF_RESULT_COMPLEX %%%>'#13#10'    __Message->Read("'
+  +'Result", __typeinfo(%OPERATION_RESULT%), &result, TParamAttributes(%OPERATI'
+  +'ON_RESULT_ATTRIBUTE%));'#13#10'    // <%%% END IF_RESULT_COMPLEX %%%>'#13#10
+  +'    // <%%% START OUT_PARAMS_NO_STRIP %%%>'#13#10'    // <%%% START IF_PARA'
+  +'M_TYPE_SIMPLE %%%>'#13#10'    __Message->Read("%PARAM_NAME%", __Get%PARAM_T'
+  +'YPE%Info, &%PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));'#13#10'    /'
+  +'/ <%%% END IF_PARAM_TYPE_SIMPLE %%%>'#13#10'    // <%%% START IF_PARAM_TYPE'
+  +'_COMPLEX %%%>'#13#10'    __Message->Read("%PARAM_NAME%", __typeinfo(%PARAM_'
+  +'TYPE%), &%PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));'#13#10'    // '
+  +'<%%% END IF_PARAM_TYPE_COMPLEX %%%>'#13#10'    // <%%% END OUT_PARAMS_NO_ST'
+  +'RIP %%%>'#13#10'  }'#13#10'  __finally'#13#10'  {'#13#10'    __Message->Fre'
+  ,'eStream();'#13#10'  }'#13#10'  return result;'#13#10'}'#13#10#13#10'// <%%%'
+  +' END FUNCTION_OPERATIONS %%%>'#13#10'// <%%% START PROCEDURE_OPERATIONS %%%'
+  +'>'#13#10'void __fastcall T%SERVICE_NAME%_Proxy::%OPERATION_NAME%('#13#10'  '
+  +'// <%%% START PARAMS %%%>'#13#10'  // <%%% START IF_PARAM_TYPE_SIMPLE %%%>'
+  +#13#10'  %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NA'
+  +'ME%,'#13#10'  // <%%% END IF_PARAM_TYPE_SIMPLE %%%>'#13#10'  // <%%% START '
+  +'IF_PARAM_TYPE_COMPLEX %%%>'#13#10'  %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %P'
+  +'ARAM_BACK_MODIFIER% %PARAM_NAME%,'#13#10'  // <%%% END IF_PARAM_TYPE_COMPLE'
+  +'X %%%>'#13#10'  // <%%% END PARAMS %%%>'#13#10'  )'#13#10'{'#13#10'  // <%%'
+  +'% START OUT_PARAMS_NO_STRIP %%%>'#13#10'  // <%%% START IF_PARAM_TYPE_COMPL'
+  +'EX %%%>'#13#10'  %PARAM_NAME% = NULL;'#13#10'  // <%%% END IF_PARAM_TYPE_CO'
+  +'MPLEX %%%>'#13#10'  // <%%% END OUT_PARAMS_NO_STRIP %%%>'#13#10'  try'#13#10
+  +'  {'#13#10'    __Message->InitializeRequestMessage(__TransportChannel, "%LI'
+  +'BRARY_NAME%", __InterfaceName, "%OPERATION_NAME%");'#13#10'    // <%%% STAR'
+  +'T IN_PARAMS_NO_STRIP %%%>'#13#10'    // <%%% START IF_PARAM_TYPE_SIMPLE %%%'
+  +'>'#13#10'    __Message->Write("%PARAM_NAME%", __Get%PARAM_TYPE%Info, &%PARA'
+  +'M_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));'#13#10'    // <%%% END IF_PA'
+  +'RAM_TYPE_SIMPLE %%%>'#13#10'    // <%%% START IF_PARAM_TYPE_COMPLEX %%%>'#13
+  +#10'    __Message->Write("%PARAM_NAME%", __typeinfo(%PARAM_TYPE%), &%PARAM_N'
+  +'AME%, TParamAttributes(%PARAM_ATTRIBUTE%));'#13#10'    // <%%% END IF_PARAM'
+  +'_TYPE_COMPLEX %%%>'#13#10'    // <%%% END IN_PARAMS_NO_STRIP %%%>'#13#10'  '
+  +'  __Message->Finalize();'#13#10#13#10'    __TransportChannel->Dispatch(__Me'
+  +'ssage);'#13#10#13#10'    // <%%% START OUT_PARAMS_NO_STRIP %%%>'#13#10'    '
+  +'// <%%% START IF_PARAM_TYPE_SIMPLE %%%>'#13#10'    __Message->Read("%PARAM_'
+  +'NAME%", __Get%PARAM_TYPE%Info, &%PARAM_NAME%, TParamAttributes(%PARAM_ATTRI'
+  +'BUTE%));'#13#10'    // <%%% END IF_PARAM_TYPE_SIMPLE %%%>'#13#10'    // <%%'
+  +'% START IF_PARAM_TYPE_COMPLEX %%%>'#13#10'    __Message->Read("%PARAM_NAME%'
+  +'", __typeinfo(%PARAM_TYPE%), &%PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBU'
+  +'TE%));'#13#10'    // <%%% END IF_PARAM_TYPE_COMPLEX %%%>'#13#10'    // <%%%'
+  +' END OUT_PARAMS_NO_STRIP %%%>'#13#10'  }'#13#10'  __finally'#13#10'  {'#13
+  +#10'    __Message->FreeStream();'#13#10'  }'#13#10'}'#13#10#13#10'// <%%% EN'
+  +'D PROCEDURE_OPERATIONS %%%>'#13#10'// <%%% END SERVICES %%%>'#13#10'// <%%%'
+  +' START EVENT_SINKS %%%>'#13#10#13#10'namespace %NAMESPACE_NAME%'#13#10'{'#13
+  +#10'// T%EVENT_SINK_NAME%_Writer'#13#10'class DELPHICLASS T%EVENT_SINK_NAME%'
+  +'_Writer;'#13#10'class T%EVENT_SINK_NAME%_Writer : public T%EVENT_SINK_WRITE'
+  +'R_ANCESTOR_NAME%, I%EVENT_SINK_NAME%_Writer'#13#10'{'#13#10'  typedef T%EVE'
+  +'NT_SINK_WRITER_ANCESTOR_NAME% inherited;'#13#10'protected:'#13#10'  // <%%%'
+  +' START OPERATIONS %%%>'#13#10'  void __fastcall %OPERATION_NAME%(const GUID'
+  +' __Sender'#13#10#9#9#9#9#9'// <%%% START PARAMS %%%>'#13#10#9#9#9#9#9'// <%'
+  +'%% START IF_PARAM_TYPE_SIMPLE %%%>'#13#10#9#9#9#9#9', %PARAM_FRONT_MODIFIER'
+  +'% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%'#13#10#9#9#9#9#9'// <%%% '
+  +'END IF_PARAM_TYPE_SIMPLE %%%>'#13#10#9#9#9#9#9'// <%%% START IF_PARAM_TYPE_'
+  +'COMPLEX %%%>'#13#10#9#9#9#9#9', %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM'
+  +'_BACK_MODIFIER% %PARAM_NAME%'#13#10#9#9#9#9#9'// <%%% END IF_PARAM_TYPE_COM'
+  +'PLEX %%%>'#13#10#9#9#9#9#9'// <%%% END PARAMS %%%>'#13#10#9#9#9#9#9');'#13
+  +#10'  // <%%% END OPERATIONS %%%>'#13#10'public:'#13#10'  virtual HRESULT __'
+  +'stdcall QueryInterface(const GUID& IID, void **Obj) {'#13#10#9'return inher'
+  +'ited::QueryInterface(IID, (void *)Obj); }'#13#10#13#10'  virtual ULONG __st'
+  +'dcall AddRef() {'#13#10#9'return inherited::_AddRef();  }'#13#10#13#10'  vi'
+  +'rtual ULONG __stdcall Release() {'#13#10#9'return inherited::_Release(); }'
+  +#13#10'};'#13#10#13#10'}  // namespace %NAMESPACE_NAME%'#13#10#13#10'// <%%%'
+  +' START OPERATIONS %%%>'#13#10'void __fastcall T%EVENT_SINK_NAME%_Writer::%O'
+  +'PERATION_NAME%(const GUID __Sender'#13#10'  // <%%% START PARAMS %%%>'#13#10
+  +'  // <%%% START IF_PARAM_TYPE_SIMPLE %%%>'#13#10'  , %PARAM_FRONT_MODIFIER%'
+  +' %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%'#13#10'  // <%%% END IF_PA'
+  +'RAM_TYPE_SIMPLE %%%>'#13#10'  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>'#13
+  +#10'  , %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NA'
+  +'ME%'#13#10'  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>'#13#10'  // <%%% END PA'
+  +'RAMS %%%>'#13#10'  )'#13#10'{'#13#10'  Binary* __eventdata = new Binary("")'
+  +';'#13#10'  try'#13#10'  {'#13#10'    __Message->InitializeEventMessage(NULL'
+  +', "%LIBRARY_NAME%", EID_%EVENT_SINK_NAME%, "%OPERATION_NAME%");'#13#10'    '
+  +'// <%%% START PARAMS_NO_STRIP %%%>'#13#10'    // <%%% START IF_PARAM_TYPE_S'
+  +'IMPLE %%%>'#13#10'    __Message->Write("%PARAM_NAME%", __Get%PARAM_TYPE%Inf'
+  +'o, &%PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));'#13#10'    // <%%% '
+  ,'END IF_PARAM_TYPE_SIMPLE %%%>'#13#10'    // <%%% START IF_PARAM_TYPE_COMPLE'
+  +'X %%%>'#13#10'    __Message->Write("%PARAM_NAME%", __typeinfo(%PARAM_TYPE%)'
+  +', %PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));'#13#10'    // <%%% EN'
+  +'D IF_PARAM_TYPE_COMPLEX %%%>'#13#10'    // <%%% END PARAMS_NO_STRIP %%%>'#13
+  +#10'    __Message->Finalize();'#13#10#13#10'    __Message->WriteToStream(__e'
+  +'ventdata);'#13#10#13#10'    Repository->StoreEventData(__Sender, __eventdat'
+  +'a, TROEventWriter::ExcludeSender, TROEventWriter::ExcludeSessionList, TROEv'
+  +'entWriter::SessionList->CommaText);'#13#10'  }'#13#10'  __finally'#13#10'  '
+  +'{'#13#10'    delete __eventdata;'#13#10'  }'#13#10'}'#13#10#13#10'// <%%% E'
+  +'ND OPERATIONS %%%>'#13#10'/* T%EVENT_SINK_NAME%_Invoker */'#13#10'namespace'
+  +' %NAMESPACE_NAME%'#13#10'{'#13#10'class DELPHICLASS T%EVENT_SINK_NAME%_Invo'
+  +'ker;'#13#10'class T%EVENT_SINK_NAME%_Invoker : public T%EVENT_SINK_INVOKER_'
+  +'ANCESTOR_NAME%'#13#10'{'#13#10'__published:'#13#10'  // <%%% START OPERATIO'
+  +'NS %%%>'#13#10'  void __fastcall Invoke_%OPERATION_NAME%(TROEventReceiver* '
+  +'__EventReceiver, IROMessage* __Message, IUnknown* __Target);'#13#10'  // <%'
+  +'%% END OPERATIONS %%%>'#13#10'};'#13#10'} // namespace %NAMESPACE_NAME%'#13
+  +#10#13#10'// <%%% START OPERATIONS %%%>'#13#10'void __fastcall T%EVENT_SINK_'
+  +'NAME%_Invoker::Invoke_%OPERATION_NAME%(TROEventReceiver* __EventReceiver, I'
+  +'ROMessage* __Message, IUnknown* __Target)'#13#10'{'#13#10'  // <%%% START P'
+  +'ARAMS_NO_STRIP %%%>'#13#10'  // <%%% START IF_PARAM_TYPE_SIMPLE %%%>'#13#10
+  +'  %PARAM_TYPE% %PARAM_NAME%;'#13#10'  // <%%% END IF_PARAM_TYPE_SIMPLE %%%>'
+  +#13#10'  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>'#13#10'  %PARAM_TYPE%* %PA'
+  +'RAM_NAME%;'#13#10'  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>'#13#10'  // <%%%'
+  +' END PARAMS_NO_STRIP %%%>'#13#10'  // <%%% START IF_HAS_COMPLEX_TYPE %%%>'
+  +#13#10'  TROObjectDisposer* __lObjectDisposer;'#13#10'  // <%%% END IF_HAS_C'
+  +'OMPLEX_TYPE %%%>'#13#10'  _di_I%EVENT_SINK_NAME% __%EVENT_SINK_NAME%Instanc'
+  +'e;'#13#10#13#10'  // <%%% START PARAMS_NO_STRIP %%%>'#13#10'  // <%%% START'
+  +' IF_PARAM_TYPE_COMPLEX %%%>'#13#10'  %PARAM_NAME% = NULL;'#13#10'  // <%%% '
+  +'END IF_PARAM_TYPE_COMPLEX %%%>'#13#10'  // <%%% END PARAMS_NO_STRIP %%%>'#13
+  +#10'  try'#13#10'  {'#13#10'    // <%%% START IN_PARAMS_NO_STRIP %%%>'#13#10
+  +'    // <%%% START IF_PARAM_TYPE_SIMPLE %%%>'#13#10'    __Message->Read("%PA'
+  +'RAM_NAME%", __Get%PARAM_TYPE%Info, &%PARAM_NAME%, TParamAttributes(%PARAM_A'
+  +'TTRIBUTE%));'#13#10'    // <%%% END IF_PARAM_TYPE_SIMPLE %%%>'#13#10'    //'
+  +' <%%% START IF_PARAM_TYPE_COMPLEX %%%>'#13#10'    __Message->Read("%PARAM_N'
+  +'AME%", __typeinfo(%PARAM_TYPE%), %PARAM_NAME%, TParamAttributes(%PARAM_ATTR'
+  +'IBUTE%));'#13#10'    // <%%% END IF_PARAM_TYPE_COMPLEX %%%>'#13#10'    // <'
+  +'%%% END IN_PARAMS_NO_STRIP %%%>'#13#10#13#10'    if (__Target->QueryInterfa'
+  +'ce(I%EVENT_SINK_NAME%_IID, reinterpret_cast<void**>(&__%EVENT_SINK_NAME%Ins'
+  +'tance)) == S_OK)'#13#10'    {'#13#10'      __%EVENT_SINK_NAME%Instance->%OP'
+  +'ERATION_NAME%('#13#10'                                      // <%%% START P'
+  +'ARAMS %%%>'#13#10'                                      %PARAM_NAME%,'#13#10
+  +'                                      // <%%% END PARAMS %%%>'#13#10'      '
+  +'                              );'#13#10'    }'#13#10'    else'#13#10'    {'
+  +#13#10'      throw EIntfCastError::EIntfCastError("I%EVENT_SINK_NAME% not su'
+  +'pported");'#13#10'    }'#13#10#13#10'    // <%%% START OUT_PARAMS_NO_STRIP '
+  +'%%%>'#13#10'    // <%%% START IF_PARAM_TYPE_SIMPLE %%%>'#13#10'    __Messag'
+  +'e->Write("%PARAM_NAME%", __Get%PARAM_TYPE%Info, &%PARAM_NAME%, TParamAttrib'
+  +'utes(%PARAM_ATTRIBUTE%));'#13#10'    // <%%% END IF_PARAM_TYPE_SIMPLE %%%>'
+  +#13#10'    // <%%% START IF_PARAM_TYPE_COMPLEX %%%>'#13#10'    __Message->Wr'
+  +'ite("%PARAM_NAME%", __typeinfo(%PARAM_TYPE%), %PARAM_NAME%, TParamAttribute'
+  +'s(%PARAM_ATTRIBUTE%));'#13#10'    // <%%% END IF_PARAM_TYPE_COMPLEX %%%>'#13
+  +#10'    // <%%% END OUT_PARAMS_NO_STRIP %%%>'#13#10'  }'#13#10'  __finally'
+  +#13#10'  {'#13#10'    // <%%% START IF_HAS_COMPLEX_TYPE %%%>'#13#10'    __lO'
+  +'bjectDisposer = new TROObjectDisposer(__EventReceiver->operator IInterface '
+  +'*());'#13#10'    try'#13#10'    {'#13#10'      // <%%% START PARAMS_NO_STRI'
+  +'P %%%>'#13#10'      // <%%% START IF_PARAM_TYPE_COMPLEX %%%>'#13#10'      _'
+  +'_lObjectDisposer->Add(%PARAM_NAME%);'#13#10'      // <%%% END IF_PARAM_TYPE'
+  +'_COMPLEX %%%>'#13#10'      // <%%% END PARAMS_NO_STRIP %%%>'#13#10'    }'#13
+  +#10'    __finally'#13#10'    {'#13#10'      delete __lObjectDisposer;'#13#10
+  +'    }'#13#10'    // <%%% END IF_HAS_COMPLEX_TYPE %%%>'#13#10'  }'#13#10'}'
+  +#13#10#13#10'// <%%% END OPERATIONS %%%>'#13#10'// <%%% END EVENT_SINKS %%%>'
+  +#13#10'void __initialization_%UNIT_NAME%()'#13#10'{'#13#10'  // <%%% START S'
+  +'TRUCTS %%%>'#13#10'  RegisterROClass(__classid(%STRUCT_NAME%));'#13#10'  //'
+  +' <%%% END STRUCTS %%%>'#13#10'  // <%%% START ARRAYS %%%>'#13#10'  Register'
+  ,'ROClass(__classid(%ARRAY_NAME%));'#13#10'  // <%%% END ARRAYS %%%>'#13#10' '
+  +' // <%%% START EXCEPTIONS %%%>'#13#10'  RegisterExceptionClass(__classid(%E'
+  +'XCEPTION_NAME%));'#13#10'  // <%%% END EXCEPTIONS %%%>'#13#10'  // <%%% STA'
+  +'RT SERVICES %%%>'#13#10'  RegisterProxyClass(I%SERVICE_NAME%_IID, __classid'
+  +'(T%SERVICE_NAME%_Proxy));'#13#10'  // <%%% END SERVICES %%%>'#13#10'  // <%'
+  +'%% START EVENT_SINKS %%%>'#13#10'  RegisterEventWriterClass(I%EVENT_SINK_NA'
+  +'ME%_IID, __classid(T%EVENT_SINK_NAME%_Writer));'#13#10'  RegisterEventInvok'
+  +'erClass(EID_%EVENT_SINK_NAME%, __classid(T%EVENT_SINK_NAME%_Invoker));'#13
+  +#10'  // <%%% END EVENT_SINKS %%%>     '#13#10'}'#13#10#13#10'void __finaliz'
+  +'ation_%UNIT_NAME%()'#13#10'{'#13#10'  // <%%% START STRUCTS %%%>'#13#10'  U'
+  +'nregisterROClass(__classid(%STRUCT_NAME%));'#13#10'  // <%%% END STRUCTS %%'
+  +'%>'#13#10'  // <%%% START ARRAYS %%%>'#13#10'  UnregisterROClass(__classid('
+  +'%ARRAY_NAME%));'#13#10'  // <%%% END ARRAYS %%%>'#13#10'  // <%%% START EXC'
+  +'EPTIONS %%%>'#13#10'  UnregisterExceptionClass(__classid(%EXCEPTION_NAME%))'
+  +';'#13#10'  // <%%% END EXCEPTIONS %%%>'#13#10'  // <%%% START SERVICES %%%>'
+  +#13#10'  UnregisterProxyClass(I%SERVICE_NAME%_IID);'#13#10'  // <%%% END SER'
+  +'VICES %%%>'#13#10'  // <%%% START EVENT_SINKS %%%>'#13#10'  UnregisterEvent'
+  +'WriterClass(I%EVENT_SINK_NAME%_IID);'#13#10'  UnregisterEventInvokerClass(E'
+  +'ID_%EVENT_SINK_NAME%);'#13#10'  // <%%% END EVENT_SINKS %%%>     '#13#10'}'
+  +#13#10#13#10
+]);
+LazarusResources.Add('TEMPLATE_INTF_H','RCDATA',[
+  '// %UNIT_NAME%'#13#10'//'#13#10'/*------------------------------------------'
+  +'---------------------------------}'#13#10'{ This unit was automatically gen'
+  +'erated by the RemObjects SDK after reading  }'#13#10'{ the RODL file associ'
+  +'ated with this project.                                }'#13#10'{          '
+  +'                                                                  }'#13#10
+  +'{ Do not modify this unit manually, or your changes will be lost when this '
+  +'  }'#13#10'{ unit is regenerated the next time you compile the project.    '
+  +'             }'#13#10'{----------------------------------------------------'
+  +'-----------------------*/'#13#10#13#10'#ifndef %UNIT_NAME%H'#13#10'#define '
+  +'%UNIT_NAME%H'#13#10#13#10'#pragma delphiheader begin'#13#10'#pragma option '
+  +'push'#13#10'#pragma option -w-            // All warnings off'#13#10'#pragm'
+  +'a option -Vx            // Zero-length empty class member functions'#13#10
+  +'#pragma pack(push,8)'#13#10#13#10'#include <System.hpp>         // Pascal u'
+  +'nit'#13#10'#include <Classes.hpp>        // Pascal unit'#13#10'#include <Ur'
+  +'otypes.hpp>       // Pascal unit'#13#10'#include <Uroclient.hpp>      // Pa'
+  +'scal unit'#13#10'#include <Uroclientintf.hpp>  // Pascal unit'#13#10'#inclu'
+  +'de <Uroxmlintf.hpp>     // Pascal unit'#13#10'// <%%% START REQUIRED_UNITS '
+  +'%%%>'#13#10'#include <%REQUIRED_UNIT_NAME%.hpp>'#13#10'// <%%% END REQUIRED'
+  +'_UNITS %%%>'#13#10#13#10'namespace %NAMESPACE_NAME%'#13#10'{'#13#10'// Libr'
+  +'ary ID'#13#10'#define LibraryUID "%LIBRARY_UID%"'#13#10'#define TargetNames'
+  +'pace "%NAMESPACE_NAME%"'#13#10#13#10'// Service Interface ID''s'#13#10'// <'
+  +'%%% START SERVICES %%%>'#13#10'const GUID I%SERVICE_NAME%_IID = Sysutils::S'
+  +'tringToGUID("%SERVICE_UID%");'#13#10'// <%%% END SERVICES %%%>'#13#10#13#10
+  +'// Event ID''s'#13#10'// <%%% START EVENT_SINKS %%%>'#13#10'#define EID_%EV'
+  +'ENT_SINK_NAME% "%EVENT_SINK_NAME%"'#13#10'const GUID I%EVENT_SINK_NAME%_IID'
+  +' = Sysutils::StringToGUID("%EVENT_SINK_UID%");'#13#10'// <%%% END EVENT_SIN'
+  +'KS %%%>'#13#10#13#10'// Forward declarations'#13#10'// <%%% START SERVICES '
+  +'%%%>'#13#10'__interface I%SERVICE_NAME%; // = interface;'#13#10'// <%%% END'
+  +' SERVICES %%%>'#13#10'// <%%% START ARRAYS %%%>'#13#10'class DELPHICLASS %A'
+  +'RRAY_NAME%;'#13#10'// <%%% END ARRAYS %%%>'#13#10'// <%%% START STRUCTS %%%'
+  +'>'#13#10'class DELPHICLASS %STRUCT_NAME%;'#13#10'// <%%% END STRUCTS %%%>'
+  +#13#10'// <%%% START EXCEPTIONS %%%>'#13#10'class DELPHICLASS %EXCEPTION_NAM'
+  +'E%;'#13#10'// <%%% END EXCEPTIONS %%%>'#13#10'// <%%% START EVENT_SINKS %%%'
+  +'>'#13#10'__interface I%EVENT_SINK_NAME%; // = interface;'#13#10'// <%%% END'
+  +' EVENT_SINKS %%%>'#13#10#13#10'/* Enumerateds */'#13#10'// <%%% START ENUMS'
+  +' %%%>'#13#10'// <%%% START DOCUMENTATION %%%>'#13#10#13#10'/* Description:'
+  +#13#10'    %CONTENT% */'#13#10'// <%%% END DOCUMENTATION %%%>'#13#10'#pragma'
+  +' option push -b-'#13#10'enum %ENUM_NAME% {'#13#10'                 // <%%% '
+  +'START VALUES %%%>'#13#10'                 %VALUE_NAME%,                '#13
+  +#10'                 // <%%% END VALUES %%%>                '#13#10'        '
+  +'         };'#13#10'#pragma option pop'#13#10'              '#13#10'// <%%% '
+  +'END ENUMS %%%>'#13#10'/* Simple type holders */'#13#10'// Note: In order to'
+  +' get type info for a simple type, we MUST have it from the'#13#10'// publis'
+  +'hed property of a Delphi class. There is no other way as __typeinfo'#13#10
+  +'// requires the type to actually derive from TObject. Hence the reason why'
+  +#13#10'// we create these dummy classes with a simple property of the correc'
+  +'t type.'#13#10'// <%%% START SIMPLE_TYPES %%%>'#13#10'#ifndef __Get%TYPE_NA'
+  +'ME%Info'#13#10'class DELPHICLASS %TYPE_NAME%TypeHolder;'#13#10'class %TYPE_'
+  +'NAME%TypeHolder : public TPersistent'#13#10'{'#13#10'private:'#13#10'  %TYP'
+  +'E_NAME% FHolderField;'#13#10'__published:'#13#10'  __property %TYPE_NAME% H'
+  +'olderField = {read=FHolderField, write=FHolderField};'#13#10'};'#13#10'#def'
+  +'ine __Get%TYPE_NAME%Info *::GetPropInfo(__typeinfo(%TYPE_NAME%TypeHolder), '
+  +'"HolderField")->PropType'#13#10'#endif  // __Get%TYPE_NAME%Info'#13#10#13#10
+  +'// <%%% END SIMPLE_TYPES %%%>'#13#10'// <%%% START STRUCTS %%%>'#13#10'// %'
+  +'STRUCT_NAME%'#13#10'class DELPHICLASS %STRUCT_NAME%;'#13#10'class %STRUCT_N'
+  +'AME% : public Urotypes::TROComplexType'#13#10'{'#13#10'  // Allow the use o'
+  +'f "inherited" in our class as Delphi allows'#13#10'  typedef Urotypes::TROC'
+  +'omplexType inherited;'#13#10'  '#13#10'private:'#13#10'  // <%%% START FIEL'
+  +'DS_NO_STRIP %%%>'#13#10'  // <%%% START IF_FIELD_TYPE_SIMPLE %%%>'#13#10'  '
+  +'%FIELD_TYPE% f%FIELD_NAME%;'#13#10'  // <%%% END IF_FIELD_TYPE_SIMPLE %%%>'
+  +#13#10'  // <%%% START IF_FIELD_TYPE_COMPLEX %%%>'#13#10'  %FIELD_TYPE%* f%F'
+  +'IELD_NAME%;'#13#10'  // <%%% END IF_FIELD_TYPE_COMPLEX %%%>'#13#10'  // <%%'
+  +'% END FIELDS_NO_STRIP %%%>'#13#10#13#10'  // <%%% START FIELDS_NO_STRIP %%%'
+  +'>'#13#10'  // <%%% START IF_FIELD_TYPE_COMPLEX %%%>'#13#10'  %FIELD_TYPE%* '
+  ,'__fastcall Get%FIELD_NAME%();'#13#10'  // <%%% END IF_FIELD_TYPE_COMPLEX %%'
+  +'%>'#13#10'  // <%%% END FIELDS_NO_STRIP %%%>'#13#10'public:'#13#10'  virtua'
+  +'l void __fastcall Assign(Classes::TPersistent* iSource);'#13#10'  // <%%% S'
+  +'TART IF_HAS_FIELDS %%%>'#13#10'  virtual void __fastcall ReadComplex(TObjec'
+  +'t* ASerializer);'#13#10'  virtual void __fastcall WriteComplex(TObject* ASe'
+  +'rializer);'#13#10'  // <%%% END IF_HAS_FIELDS %%%>'#13#10#13#10'__published'
+  +':'#13#10'  // <%%% START FIELDS_NO_STRIP %%%>'#13#10'  // <%%% START IF_FIE'
+  +'LD_TYPE_SIMPLE %%%>'#13#10'  __property %FIELD_TYPE% %FIELD_NAME% = {read=f'
+  +'%FIELD_NAME%, write=f%FIELD_NAME%}; '#13#10'  // <%%% END IF_FIELD_TYPE_SIM'
+  +'PLE %%%>'#13#10'  // <%%% START IF_FIELD_TYPE_COMPLEX %%%>'#13#10'  __prope'
+  +'rty %FIELD_TYPE%* %FIELD_NAME% = {read=Get%FIELD_NAME%, write=f%FIELD_NAME%'
+  +'};'#13#10'  // <%%% END IF_FIELD_TYPE_COMPLEX %%%>'#13#10'  // <%%% END FIE'
+  +'LDS_NO_STRIP %%%>'#13#10'public:'#13#10'  // Pascal constructor/destructor'
+  +#13#10'  #pragma option push -w-inl'#13#10'  /* TROComplexType.Create */ inl'
+  +'ine __fastcall virtual %STRUCT_NAME%()/* overload */ : Urotypes::TROComplex'
+  +'Type() {}'#13#10'  #pragma option pop'#13#10'  #pragma option push -w-inl'
+  +#13#10'  /* TROComplexType.Destroy */ inline __fastcall virtual ~%STRUCT_NAM'
+  +'E%() {}'#13#10'  #pragma option pop'#13#10'};'#13#10#13#10'// %STRUCT_COLLE'
+  +'CTION_NAME%'#13#10'class DELPHICLASS %STRUCT_COLLECTION_NAME%;'#13#10'class'
+  +' %STRUCT_COLLECTION_NAME% : public Uroclasses::TROCollection'#13#10'{'#13#10
+  +'  typedef Uroclasses::TROCollection inherited;'#13#10#13#10'public:'#13#10
+  +'  %STRUCT_NAME%* operator[](int Index) { return Items[Index]; }'#13#10#13#10
+  +'protected:'#13#10'  __fastcall %STRUCT_COLLECTION_NAME%(TMetaClass* aItemCl'
+  +'ass) : Uroclasses::TROCollection(aItemClass) {} /*overload*/'#13#10'  %STRU'
+  +'CT_NAME%* __fastcall GetItems(const int Index);'#13#10'  void __fastcall Se'
+  +'tItems(const int Index, %STRUCT_NAME%* Value);'#13#10#13#10'public:'#13#10
+  +'  __fastcall %STRUCT_COLLECTION_NAME%() : Uroclasses::TROCollection(__class'
+  +'id(%STRUCT_NAME%)) {} /*overload*/'#13#10'  HIDESBASE %STRUCT_NAME%* __fast'
+  +'call Add(); /*reintroduce*/'#13#10'  // <%%% START ARRAYS_IS_FOUND %%%>'#13
+  +#10'  void SaveToArray(%ARRAY_NAME%* anArray);'#13#10'  void LoadFromArray(%'
+  +'ARRAY_NAME%* anArray);'#13#10'  // <%%% END ARRAYS_IS_FOUND %%%>'#13#10'  _'
+  +'_property %STRUCT_NAME%* Items[int Index] = {read=GetItems, write=SetItems '
+  +'/*default*/};'#13#10'  #pragma option push -w-inl'#13#10'  /* TCollection.D'
+  +'estroy */ inline __fastcall virtual ~%STRUCT_COLLECTION_NAME%() {}'#13#10' '
+  +' #pragma option pop'#13#10'};'#13#10#13#10'typedef DynamicArray<%STRUCT_NAM'
+  +'E%* > %UNIT_NAME%_%STRUCT_NAME%__4;'#13#10#13#10'// <%%% END STRUCTS %%%>'
+  +#13#10'// <%%% START ARRAYS %%%>'#13#10'// %ARRAY_NAME%'#13#10#13#10'// <%%%'
+  +' START IF_ARRAY_TYPE_SIMPLE %%%>'#13#10'typedef DynamicArray<%ARRAY_TYPE%> '
+  +'%ARRAY_NAME%_%ARRAY_TYPE%;'#13#10'// <%%% END IF_ARRAY_TYPE_SIMPLE %%%>'#13
+  +#10'// <%%% START IF_ARRAY_TYPE_COMPLEX %%%>'#13#10'typedef DynamicArray<%AR'
+  +'RAY_TYPE%* > %ARRAY_NAME%_%ARRAY_TYPE%;'#13#10'// <%%% END IF_ARRAY_TYPE_CO'
+  +'MPLEX %%%>'#13#10#13#10'class DELPHICLASS %ARRAY_NAME%;'#13#10'class %ARRAY'
+  +'_NAME% : public Urotypes::TROArray'#13#10'{'#13#10'  typedef Urotypes::TROA'
+  +'rray inherited;'#13#10#13#10'public:'#13#10'  // <%%% START IF_ARRAY_TYPE_C'
+  +'OMPLEX %%%>'#13#10'  %ARRAY_TYPE%* operator[](const int Index) { return Ite'
+  +'ms[Index]; }'#13#10'  // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>'#13#10'  // <%'
+  +'%% START IF_ARRAY_TYPE_SIMPLE %%%>'#13#10'  %ARRAY_TYPE% operator[](const i'
+  +'nt Index) { return Items[Index]; }'#13#10'  // <%%% END IF_ARRAY_TYPE_SIMPL'
+  +'E %%%>'#13#10#13#10'private:'#13#10'  int fCount;'#13#10'  %ARRAY_NAME%_%AR'
+  +'RAY_TYPE% fItems;'#13#10#13#10'protected:'#13#10'  virtual void __fastcall '
+  +'Grow();'#13#10'  // <%%% START IF_ARRAY_TYPE_COMPLEX %%%>'#13#10'  %ARRAY_T'
+  +'YPE%* __fastcall GetItems(const int Index);'#13#10'  void __fastcall SetIte'
+  +'ms(const int Index, %ARRAY_TYPE%* Value);'#13#10'  // <%%% END IF_ARRAY_TYP'
+  +'E_COMPLEX %%%>'#13#10'  // <%%% START IF_ARRAY_TYPE_SIMPLE %%%>'#13#10'  %A'
+  +'RRAY_TYPE% __fastcall GetItems(const int Index);'#13#10'  void __fastcall S'
+  +'etItems(const int Index, %ARRAY_TYPE% Value);'#13#10'  // <%%% END IF_ARRAY'
+  +'_TYPE_SIMPLE %%%>'#13#10'  virtual int __fastcall GetCount();'#13#10#13#10
+  +'public:'#13#10'  /* virtual class method */ '#13#10'  // <%%% START IF_ARRA'
+  +'Y_TYPE_SIMPLE %%%>'#13#10'  virtual Typinfo::PTypeInfo __fastcall GetItemTy'
+  +'pe(const TMetaClass* vmt) { return __Get%ARRAY_TYPE%Info; }'#13#10'  // <%%'
+  +'% END IF_ARRAY_TYPE_SIMPLE %%%>'#13#10'  // <%%% START IF_ARRAY_TYPE_COMPLE'
+  +'X %%%>'#13#10'  virtual Typinfo::PTypeInfo __fastcall GetItemType(const TMe'
+  +'taClass* vmt) { return __typeinfo(%ARRAY_TYPE%); }'#13#10'  // <%%% END IF_'
+  +'ARRAY_TYPE_COMPLEX %%%>'#13#10#13#10'  // <%%% START IF_ARRAY_TYPE_COMPLEX '
+  ,'%%%>'#13#10'  /* virtual class method */ '#13#10'  virtual TMetaClass* __fa'
+  +'stcall GetItemClass(const TMetaClass* vmt) { return __classid(%ARRAY_TYPE%)'
+  +'; }'#13#10'  '#13#10'  // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>'#13#10'  /* v'
+  +'irtual class method */  '#13#10'  virtual int __fastcall GetItemSize(const '
+  +'TMetaClass* vmt) { return sizeof(%ARRAY_TYPE%); }'#13#10'    '#13#10'  virt'
+  +'ual void * __fastcall GetItemRef(const int Index);'#13#10'  // <%%% START I'
+  +'F_ARRAY_TYPE_COMPLEX %%%>'#13#10'  virtual void __fastcall SetItemRef(const'
+  +' int Index, void* Ref);'#13#10'  // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>'#13
+  +#10'  virtual void __fastcall Clear();'#13#10'  virtual void __fastcall Dele'
+  +'te(const int Index);'#13#10'  virtual void __fastcall Resize(const int Elem'
+  +'entCount);'#13#10'  virtual void __fastcall Assign(Classes::TPersistent* iS'
+  +'ource);'#13#10'  virtual void __fastcall ReadComplex(TObject* ASerializer);'
+  +#13#10'  virtual void __fastcall WriteComplex(TObject* ASerializer);'#13#10
+  +'  // <%%% START IF_ARRAY_TYPE_COMPLEX %%%>'#13#10'  %ARRAY_TYPE%* __fastcal'
+  +'l Add()/* overload */;'#13#10'  int __fastcall Add(%ARRAY_TYPE%* Value)/* o'
+  +'verload */;'#13#10'  // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>'#13#10'  // <%%'
+  +'% START IF_ARRAY_TYPE_SIMPLE %%%>'#13#10'  int __fastcall Add(%ARRAY_TYPE% '
+  +'Value)/* overload */;'#13#10'  // <%%% END IF_ARRAY_TYPE_SIMPLE %%%>'#13#10
+  +'  __property int Count = {read=GetCount, nodefault};'#13#10'  // <%%% START'
+  +' IF_ARRAY_TYPE_COMPLEX %%%>'#13#10'  __property %ARRAY_TYPE%* Items[int Ind'
+  +'ex] = {read=GetItems, write=SetItems/*, default*/};'#13#10'  // <%%% END IF'
+  +'_ARRAY_TYPE_COMPLEX %%%>'#13#10'  // <%%% START IF_ARRAY_TYPE_SIMPLE %%%>'
+  +#13#10'  __property %ARRAY_TYPE% Items[int Index] = {read=GetItems, write=Se'
+  +'tItems/*, default*/};'#13#10'  // <%%% END IF_ARRAY_TYPE_SIMPLE %%%>'#13#10
+  +'  __property %ARRAY_NAME%_%ARRAY_TYPE% InnerArray = {read=fItems, nodefault'
+  +'};'#13#10'public:'#13#10'  #pragma option push -w-inl'#13#10'  /* TROArray.'
+  +'Destroy */ inline __fastcall virtual ~%ARRAY_NAME%() {Clear();}'#13#10'  #p'
+  +'ragma option pop'#13#10#13#10'public:'#13#10'  #pragma option push -w-inl'
+  +#13#10'  /* TROComplexType.Create */ inline __fastcall virtual %ARRAY_NAME%('
+  +')/* overload */ : Urotypes::TROArray() {}'#13#10'  #pragma option pop'#13#10
+  +'};'#13#10#13#10'// <%%% END ARRAYS %%%>'#13#10'// <%%% START EXCEPTIONS %%%'
+  +'>'#13#10'// <%%% START DOCUMENTATION %%%>'#13#10#13#10'/* Description:'#13
+  +#10'    %CONTENT% */'#13#10'// <%%% END DOCUMENTATION %%%>'#13#10'class DELP'
+  +'HICLASS %EXCEPTION_NAME%;'#13#10'class %EXCEPTION_NAME% : public %EXCEPTION'
+  +'_ANCESTOR_NAME%'#13#10'{'#13#10'  typedef %EXCEPTION_ANCESTOR_NAME% inherit'
+  +'ed;'#13#10'  '#13#10'private:'#13#10'  // <%%% START FIELDS_NO_STRIP %%%>'
+  +#13#10'  // <%%% START IF_FIELD_TYPE_SIMPLE %%%>'#13#10'  %FIELD_TYPE% f%FIE'
+  +'LD_NAME%;'#13#10'  // <%%% END IF_FIELD_TYPE_SIMPLE %%%>'#13#10'  // <%%% S'
+  +'TART IF_FIELD_TYPE_COMPLEX %%%>'#13#10'  %FIELD_TYPE%* f%FIELD_NAME%;'#13#10
+  +'  // <%%% END IF_FIELD_TYPE_COMPLEX %%%>'#13#10'  // <%%% END FIELDS_NO_STR'
+  +'IP %%%>'#13#10'public:'#13#10'  %EXCEPTION_NAME%(AnsiString anExceptionMess'
+  +'age'#13#10'                   // <%%% START ANCESTOR_FIELDS %%%>'#13#10'   '
+  +'                // <%%% START IF_FIELD_TYPE_SIMPLE %%%>'#13#10'            '
+  +'       , %FIELD_TYPE% a%FIELD_NAME% '#13#10'                   // <%%% END '
+  +'IF_FIELD_TYPE_SIMPLE %%%>'#13#10'                   // <%%% START IF_FIELD_'
+  +'TYPE_COMPLEX %%%>'#13#10'                   , %FIELD_TYPE%* a%FIELD_NAME% '
+  +#13#10'                   // <%%% END IF_FIELD_TYPE_COMPLEX %%%>'#13#10'    '
+  +'               // <%%% END ANCESTOR_FIELDS %%%>'#13#10'                   /'
+  +'/ <%%% START FIELDS_NO_STRIP %%%>'#13#10'                   // <%%% START I'
+  +'F_FIELD_TYPE_SIMPLE %%%>'#13#10'                   , %FIELD_TYPE% a%FIELD_N'
+  +'AME% '#13#10'                   // <%%% END IF_FIELD_TYPE_SIMPLE %%%>'#13#10
+  +'                   // <%%% START IF_FIELD_TYPE_COMPLEX %%%>'#13#10'        '
+  +'           , %FIELD_TYPE%* a%FIELD_NAME% '#13#10'                   // <%%%'
+  +' END IF_FIELD_TYPE_COMPLEX %%%>'#13#10'                   // <%%% END FIELD'
+  +'S_NO_STRIP %%%>'#13#10'                   );'#13#10'  // <%%% START IF_HAS_'
+  +'FIELDS %%%>'#13#10'  virtual void __fastcall ReadException(TObject* ASerial'
+  +'izer);'#13#10'  virtual void __fastcall WriteException(TObject* ASerializer'
+  +');'#13#10'  // <%%% END IF_HAS_FIELDS %%%>'#13#10'__published:'#13#10'  // '
+  +'<%%% START FIELDS_NO_STRIP %%%>'#13#10'  // <%%% START IF_FIELD_TYPE_SIMPLE'
+  +' %%%>'#13#10'  __property %FIELD_TYPE% %FIELD_NAME% = {read=f%FIELD_NAME%, '
+  +'write=f%FIELD_NAME%}; '#13#10'  // <%%% END IF_FIELD_TYPE_SIMPLE %%%>'#13#10
+  +'  // <%%% START IF_FIELD_TYPE_COMPLEX %%%>'#13#10'  __property %FIELD_TYPE%'
+  +'* %FIELD_NAME% = {read=f%FIELD_NAME%, write=f%FIELD_NAME%}; '#13#10'  // <%'
+  +'%% END IF_FIELD_TYPE_COMPLEX %%%>'#13#10'  // <%%% END FIELDS_NO_STRIP %%%>'
+  ,#13#10'};'#13#10#13#10'// <%%% END EXCEPTIONS %%%>'#13#10'// <%%% START SERV'
+  +'ICES %%%>'#13#10'__interface I%SERVICE_NAME%;'#13#10'typedef System::Delphi'
+  +'Interface<I%SERVICE_NAME%> _di_I%SERVICE_NAME%;'#13#10'__interface INTERFAC'
+  +'E_UUID("%SERVICE_UID%") I%SERVICE_NAME% : public %SERVICE_ANCESTOR_NAME%'#13
+  +#10'{'#13#10'public:'#13#10'  // <%%% START FUNCTION_OPERATIONS %%%>'#13#10
+  +'  // <%%% START IF_RESULT_SIMPLE %%%>'#13#10'  virtual %OPERATION_RESULT% _'
+  +'_fastcall %OPERATION_NAME%('#13#10'  // <%%% END IF_RESULT_SIMPLE %%%>'#13
+  +#10'  // <%%% START IF_RESULT_COMPLEX %%%>'#13#10'  virtual %OPERATION_RESUL'
+  +'T%* __fastcall %OPERATION_NAME%('#13#10'  // <%%% END IF_RESULT_COMPLEX %%%'
+  +'>'#13#10'    // <%%% START PARAMS %%%>'#13#10'    // <%%% START IF_PARAM_TY'
+  +'PE_SIMPLE %%%>'#13#10'    %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_M'
+  +'ODIFIER% %PARAM_NAME%,'#13#10'    // <%%% END IF_PARAM_TYPE_SIMPLE %%%>'#13
+  +#10'    // <%%% START IF_PARAM_TYPE_COMPLEX %%%>'#13#10'    %PARAM_FRONT_MOD'
+  +'IFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,'#13#10'    // <%%%'
+  +' END IF_PARAM_TYPE_COMPLEX %%%>'#13#10'    // <%%% END PARAMS %%%>'#13#10' '
+  +'   ) = 0; // pure virtual function - interface only'#13#10'  // <%%% END FU'
+  +'NCTION_OPERATIONS %%%>'#13#10'  // <%%% START PROCEDURE_OPERATIONS %%%>'#13
+  +#10'  virtual void __fastcall %OPERATION_NAME%('#13#10'    // <%%% START PAR'
+  +'AMS %%%>'#13#10'    // <%%% START IF_PARAM_TYPE_SIMPLE %%%>'#13#10'    %PAR'
+  +'AM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,'#13#10
+  +'    // <%%% END IF_PARAM_TYPE_SIMPLE %%%>'#13#10'    // <%%% START IF_PARAM'
+  +'_TYPE_COMPLEX %%%>'#13#10'    %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_B'
+  +'ACK_MODIFIER% %PARAM_NAME%,'#13#10'    // <%%% END IF_PARAM_TYPE_COMPLEX %%'
+  +'%>'#13#10'    // <%%% END PARAMS %%%>'#13#10'    ) = 0; // pure virtual fun'
+  +'ction - interface only'#13#10'  // <%%% END PROCEDURE_OPERATIONS %%%>'#13#10
+  +'};'#13#10#13#10'class DELPHICLASS T%SERVICE_NAME%_Proxy;'#13#10'class T%SER'
+  +'VICE_NAME%_Proxy : public %SERVICE_PROXY_ANCESTOR_NAME%, I%SERVICE_NAME%'#13
+  +#10'{'#13#10'  typedef %SERVICE_PROXY_ANCESTOR_NAME% inherited;'#13#10'  '#13
+  +#10'protected:'#13#10'  virtual AnsiString __fastcall __GetInterfaceName()'
+  +#13#10'    { return "%SERVICE_NAME%"; }'#13#10#13#10'  // <%%% START FUNCTIO'
+  +'N_OPERATIONS %%%>'#13#10'  // <%%% START IF_RESULT_SIMPLE %%%>'#13#10'  vir'
+  +'tual %OPERATION_RESULT% __fastcall %OPERATION_NAME%('#13#10'  // <%%% END I'
+  +'F_RESULT_SIMPLE %%%>'#13#10'  // <%%% START IF_RESULT_COMPLEX %%%>'#13#10' '
+  +' virtual %OPERATION_RESULT%* __fastcall %OPERATION_NAME%('#13#10'  // <%%% '
+  +'END IF_RESULT_COMPLEX %%%>'#13#10'    // <%%% START PARAMS %%%>'#13#10'    '
+  +'// <%%% START IF_PARAM_TYPE_SIMPLE %%%>'#13#10'    %PARAM_FRONT_MODIFIER% %'
+  +'PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,'#13#10'    // <%%% END IF_P'
+  +'ARAM_TYPE_SIMPLE %%%>'#13#10'    // <%%% START IF_PARAM_TYPE_COMPLEX %%%>'
+  +#13#10'    %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM'
+  +'_NAME%,'#13#10'    // <%%% END IF_PARAM_TYPE_COMPLEX %%%>'#13#10'    // <%%'
+  +'% END PARAMS %%%>'#13#10'    );'#13#10'  // <%%% END FUNCTION_OPERATIONS %%'
+  +'%>'#13#10'  // <%%% START PROCEDURE_OPERATIONS %%%>'#13#10'  virtual void _'
+  +'_fastcall %OPERATION_NAME%('#13#10'    // <%%% START PARAMS %%%>'#13#10'   '
+  +' // <%%% START IF_PARAM_TYPE_SIMPLE %%%>'#13#10'    %PARAM_FRONT_MODIFIER% '
+  +'%PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,'#13#10'    // <%%% END IF_'
+  +'PARAM_TYPE_SIMPLE %%%>'#13#10'    // <%%% START IF_PARAM_TYPE_COMPLEX %%%>'
+  +#13#10'    %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM'
+  +'_NAME%,'#13#10'    // <%%% END IF_PARAM_TYPE_COMPLEX %%%>'#13#10'    // <%%'
+  +'% END PARAMS %%%>'#13#10'    );'#13#10'  // <%%% END PROCEDURE_OPERATIONS %'
+  +'%%>'#13#10'  '#13#10'public:'#13#10'  #pragma option push -w-inl'#13#10'  /'
+  +'* TROProxy.Create */ inline __fastcall virtual T%SERVICE_NAME%_Proxy(const '
+  +'Uroclientintf::_di_IROMessage aMessage, const Uroclientintf::_di_IROTranspo'
+  +'rtChannel aTransportChannel)/* overload */ :'#13#10'    %SERVICE_PROXY_ANCE'
+  +'STOR_NAME%(aMessage, aTransportChannel) {}'#13#10'  #pragma option pop'#13
+  +#10'  '#13#10'  virtual HRESULT __stdcall QueryInterface(const GUID& IID, vo'
+  +'id **Obj) {'#13#10'    return inherited::QueryInterface(IID, (void *)Obj); '
+  +'}'#13#10#13#10'  virtual ULONG __stdcall AddRef() {'#13#10'    return inher'
+  +'ited::_AddRef();  }'#13#10#13#10'  virtual ULONG __stdcall Release() {'#13
+  +#10'    return inherited::_Release(); }'#13#10'};'#13#10#13#10'// Co%SERVICE'
+  +'_NAME%'#13#10'class DELPHICLASS Co%SERVICE_NAME%;'#13#10'class Co%SERVICE_N'
+  +'AME% : public System::TObject'#13#10'{'#13#10'  typedef System::TObject inh'
+  +'erited;'#13#10#13#10'public:'#13#10'  static _di_I%SERVICE_NAME% __fastcall'
+  +' Create(const Uroclientintf::_di_IROMessage aMessage,'#13#10'              '
+  +'          Uroclientintf::_di_IROTransportChannel aTransportChannel)'#13#10
+  ,'  {'#13#10'    _di_I%SERVICE_NAME% result;'#13#10'    T%SERVICE_NAME%_Proxy'
+  +'* proxy = new T%SERVICE_NAME%_Proxy(aMessage, aTransportChannel);'#13#10'  '
+  +'  if (proxy->QueryInterface(I%SERVICE_NAME%_IID, reinterpret_cast<void**>(&'
+  +'result)) != S_OK)'#13#10'    {'#13#10'      delete proxy;'#13#10'      thro'
+  +'w EIntfCastError::EIntfCastError("I%SERVICE_NAME% not supported");'#13#10' '
+  +'   }'#13#10'    return result;'#13#10'  };'#13#10#13#10'  static _di_I%SERV'
+  +'ICE_NAME% __fastcall Create( Uroclient::TROMessage* aMessage,'#13#10'      '
+  +'                  Uroclient::TROTransportChannel *aTransportChannel)'#13#10
+  +'  {'#13#10'    _di_IROMessage __Message;'#13#10'    _di_IROTransportChannel'
+  +' __TransportChannel;'#13#10#13#10'    if (aMessage->GetInterface(__Message)'
+  +')'#13#10'    {'#13#10'      if (aTransportChannel->GetInterface(__Transport'
+  +'Channel))'#13#10'        return Create(__Message, __TransportChannel);'#13
+  +#10'      else'#13#10'        throw EIntfCastError::EIntfCastError("IROTrans'
+  +'portChannel not supported");'#13#10'    }'#13#10'    else'#13#10'    {'#13
+  +#10'      throw EIntfCastError::EIntfCastError("IROMessage not supported");'
+  +#13#10'    }'#13#10'  };'#13#10'};'#13#10#13#10'// <%%% END SERVICES %%%>'#13
+  +#10'// <%%% START EVENT_SINKS %%%>'#13#10'/* I%EVENT_SINK_NAME% */'#13#10'//'
+  +' <%%% START DOCUMENTATION %%%>'#13#10#13#10'/* Description:'#13#10'    %CON'
+  +'TENT% */'#13#10'// <%%% END DOCUMENTATION %%%>'#13#10'__interface I%EVENT_S'
+  +'INK_NAME%;'#13#10'typedef System::DelphiInterface<I%EVENT_SINK_NAME%> _di_I'
+  +'%EVENT_SINK_NAME%;'#13#10'__interface INTERFACE_UUID("%EVENT_SINK_UID%") I%'
+  +'EVENT_SINK_NAME% : public %EVENT_SINK_ANCESTOR_NAME%'#13#10'{'#13#10'public'
+  +':'#13#10'  // <%%% START OPERATIONS %%%>'#13#10'  virtual void __fastcall %'
+  +'OPERATION_NAME%('#13#10'    // <%%% START PARAMS %%%>'#13#10'    // <%%% ST'
+  +'ART IF_PARAM_TYPE_SIMPLE %%%>'#13#10'    %PARAM_FRONT_MODIFIER% %PARAM_TYPE'
+  +'% %PARAM_BACK_MODIFIER% %PARAM_NAME%,'#13#10'    // <%%% END IF_PARAM_TYPE_'
+  +'SIMPLE %%%>'#13#10'    // <%%% START IF_PARAM_TYPE_COMPLEX %%%>'#13#10'    '
+  +'%PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,'#13
+  +#10'    // <%%% END IF_PARAM_TYPE_COMPLEX %%%>'#13#10'    // <%%% END PARAMS'
+  +' %%%>'#13#10'    ) = 0; // pure virtual function - interface only'#13#10'  '
+  +'// <%%% END OPERATIONS %%%>'#13#10'};'#13#10#13#10'/* I%EVENT_SINK_NAME%_Wr'
+  +'iter */'#13#10'// <%%% START DOCUMENTATION %%%>'#13#10#13#10'/* Description'
+  +':'#13#10'    %CONTENT% */'#13#10'// <%%% END DOCUMENTATION %%%>'#13#10'__in'
+  +'terface I%EVENT_SINK_NAME%_Writer;'#13#10'typedef System::DelphiInterface<I'
+  +'%EVENT_SINK_NAME%_Writer> _di_I%EVENT_SINK_NAME%_Writer;'#13#10'__interface'
+  +' INTERFACE_UUID("%EVENT_SINK_UID%") I%EVENT_SINK_NAME%_Writer : public I%EV'
+  +'ENT_SINK_WRITER_ANCESTOR_NAME%'#13#10'{'#13#10'public:'#13#10'  // <%%% STA'
+  +'RT OPERATIONS %%%>'#13#10'  virtual void __fastcall %OPERATION_NAME%(GUID _'
+  +'_Sender '#13#10'    // <%%% START PARAMS %%%>'#13#10'    // <%%% START IF_P'
+  +'ARAM_TYPE_SIMPLE %%%>'#13#10'    , %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PAR'
+  +'AM_BACK_MODIFIER% %PARAM_NAME%'#13#10'    // <%%% END IF_PARAM_TYPE_SIMPLE '
+  +'%%%>'#13#10'    // <%%% START IF_PARAM_TYPE_COMPLEX %%%>'#13#10'    , %PARA'
+  +'M_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%'#13#10' '
+  +'   // <%%% END IF_PARAM_TYPE_COMPLEX %%%>'#13#10'    // <%%% END PARAMS %%%'
+  +'>'#13#10'    ) = 0; // pure virtual function - interface only'#13#10'  // <'
+  +'%%% END OPERATIONS %%%>'#13#10'};'#13#10#13#10'// <%%% END EVENT_SINKS %%%>'
+  +#13#10'}  // namespace %NAMESPACE_NAME%'#13#10#13#10'using namespace %NAMESP'
+  +'ACE_NAME%;'#13#10'#pragma pack(pop)'#13#10'#pragma option pop'#13#10#13#10
+  +'#pragma delphiheader end.'#13#10'#endif  // %UNIT_NAME%H'#13#10#13#10
+]);
+LazarusResources.Add('TEMPLATE_INVK_CPP','RCDATA',[
+  '// %UNIT_NAME%'#13#10'//'#13#10'/*------------------------------------------'
+  +'---------------------------------}'#13#10'{ This unit was automatically gen'
+  +'erated by the RemObjects SDK after reading  }'#13#10'{ the RODL file associ'
+  +'ated with this project.                                }'#13#10'{          '
+  +'                                                                  }'#13#10
+  +'{ Do not modify this unit manually, or your changes will be lost when this '
+  +'  }'#13#10'{ unit is regenerated the next time you compile the project.    '
+  +'             }'#13#10'{----------------------------------------------------'
+  +'-----------------------*/'#13#10#13#10'// RemObjects:'#13#10'#include <uROR'
+  +'es.HPP>'#13#10'#include <uROClient.HPP>'#13#10#13#10'// Interface of %LIBRA'
+  +'RY_NAME%'#13#10'#include "%LIBRARY_NAME%_Intf.h"'#13#10#13#10'// Implementa'
+  +'tion of %LIBRARY_NAME%'#13#10'#include "%LIBRARY_NAME%_Invk.h"'#13#10#13#10
+  +'// <%%% START SERVICES %%%>'#13#10'// T%SERVICE_NAME%_Invoker'#13#10#13#10
+  +'// <%%% START FUNCTION_OPERATIONS %%%>'#13#10'void __fastcall T%SERVICE_NAM'
+  +'E%_Invoker::Invoke_%OPERATION_NAME%('#13#10#9#9'const System::_di_IInterfac'
+  +'e __Instance,'#13#10#9#9'const Uroclientintf::_di_IROMessage __Message,'#13
+  +#10#9#9'const Uroclientintf::_di_IROTransport __Transport,'#13#10#9#9'/* out'
+  +' */ Uroserverintf::TROResponseOptions& __oResponseOptions)'#13#10'{'#13#10
+  +'// <%%% START IF_RESULT_SIMPLE %%%>'#13#10'// virtual %OPERATION_RESULT% __'
+  +'fastcall %OPERATION_NAME%('#13#10'// <%%% END IF_RESULT_SIMPLE %%%>'#13#10
+  +'// <%%% START IF_RESULT_COMPLEX %%%>'#13#10'// virtual %OPERATION_RESULT%* '
+  +'__fastcall %OPERATION_NAME%('#13#10'// <%%% END IF_RESULT_COMPLEX %%%>'#13
+  +#10'// <%%% START PARAMS %%%>'#13#10'// <%%% START IF_PARAM_TYPE_SIMPLE %%%>'
+  +#13#10'//   %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM'
+  +'_NAME%,'#13#10'// <%%% END IF_PARAM_TYPE_SIMPLE %%%>'#13#10'// <%%% START I'
+  +'F_PARAM_TYPE_COMPLEX %%%>'#13#10'//   %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* '
+  +'%PARAM_BACK_MODIFIER% %PARAM_NAME%,'#13#10'// <%%% END IF_PARAM_TYPE_COMPLE'
+  +'X %%%>'#13#10'// <%%% END PARAMS %%%>'#13#10'//   );'#13#10#13#10'  // <%%%'
+  +' START PARAMS_NO_STRIP %%%>'#13#10'  // <%%% START IF_PARAM_TYPE_SIMPLE %%%'
+  +'>'#13#10'  %PARAM_TYPE% %PARAM_NAME%;'#13#10'  // <%%% END IF_PARAM_TYPE_SI'
+  +'MPLE %%%>'#13#10'  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>'#13#10'  %PARAM'
+  +'_TYPE%* %PARAM_NAME% = NULL;'#13#10'  // <%%% END IF_PARAM_TYPE_COMPLEX %%%'
+  +'>'#13#10'  // <%%% END PARAMS_NO_STRIP %%%>'#13#10'  // <%%% START IF_RESUL'
+  +'T_SIMPLE %%%>'#13#10'  %OPERATION_RESULT% lResult;'#13#10'  // <%%% END IF_'
+  +'RESULT_SIMPLE %%%>'#13#10'  // <%%% START IF_RESULT_COMPLEX %%%>'#13#10'  %'
+  +'OPERATION_RESULT%* lResult = NULL;'#13#10'  // <%%% END IF_RESULT_COMPLEX %'
+  +'%%>'#13#10'  try'#13#10'  {'#13#10#9'_di_I%SERVICE_NAME% __%SERVICE_NAME%In'
+  +'stance;'#13#10#9'if (__Instance->Supports(__%SERVICE_NAME%Instance))'#13#10
+  +#9'{'#13#10#9'  // <%%% START IN_PARAMS_NO_STRIP %%%>'#13#10#9'  // <%%% STA'
+  +'RT IF_PARAM_TYPE_SIMPLE %%%>'#13#10#9'  __Message->Read("%PARAM_NAME%", __G'
+  +'et%PARAM_TYPE%Info, &%PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));'#13
+  +#10#9'  // <%%% END IF_PARAM_TYPE_SIMPLE %%%>'#13#10#9'  // <%%% START IF_PA'
+  +'RAM_TYPE_COMPLEX %%%>'#13#10#9'  __Message->Read("%PARAM_NAME%", __typeinfo'
+  +'(%PARAM_TYPE%), &%PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));'#13#10
+  +#9'  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>'#13#10#9'  // <%%% END IN_PARAMS'
+  +'_NO_STRIP %%%>'#13#10#13#10#9'  lResult = __%SERVICE_NAME%Instance->%OPERAT'
+  +'ION_NAME%('#13#10#9#9#9#9#9#9#9#9#9#9#9'// <%%% START PARAMS %%%>'#13#10#9#9
+  +#9#9#9#9#9#9#9#9#9'%PARAM_NAME%,'#13#10#9#9#9#9#9#9#9#9#9#9#9'// <%%% END PA'
+  +'RAMS %%%>'#13#10#9#9#9#9#9#9#9#9#9#9#9');'#13#10#13#10#9'  __Message->Initi'
+  +'alizeResponseMessage(__Transport, "%LIBRARY_NAME%", "%SERVICE_NAME%", "%OPE'
+  +'RATION_NAME%Response");'#13#10#9'  // <%%% START IF_RESULT_SIMPLE %%%>'#13
+  +#10#9'  __Message->Write("Result", __Get%OPERATION_RESULT%Info, &lResult, TP'
+  +'aramAttributes(%OPERATION_RESULT_ATTRIBUTE%));'#13#10#9'  // <%%% END IF_RE'
+  +'SULT_SIMPLE %%%>'#13#10#9'  // <%%% START IF_RESULT_COMPLEX %%%>'#13#10#9' '
+  +' __Message->Write("Result", __typeinfo(%OPERATION_RESULT%), &lResult, TPara'
+  +'mAttributes(%OPERATION_RESULT_ATTRIBUTE%));'#13#10#9'  // <%%% END IF_RESUL'
+  +'T_COMPLEX %%%>'#13#10#9'  // <%%% START OUT_PARAMS_NO_STRIP %%%>'#13#10#9' '
+  +' // <%%% START IF_PARAM_TYPE_SIMPLE %%%>'#13#10#9'  __Message->Write("%PARA'
+  +'M_NAME%", __Get%PARAM_TYPE%Info, &%PARAM_NAME%, TParamAttributes(%PARAM_ATT'
+  +'RIBUTE%));'#13#10#9'  // <%%% END IF_PARAM_TYPE_SIMPLE %%%>'#13#10#9'  // <'
+  +'%%% START IF_PARAM_TYPE_COMPLEX %%%>'#13#10#9'  __Message->Write("%PARAM_NA'
+  +'ME%", __typeinfo(%PARAM_TYPE%), &%PARAM_NAME%, TParamAttributes(%PARAM_ATTR'
+  +'IBUTE%));'#13#10#9'  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>'#13#10#9'  // <'
+  +'%%% END OUT_PARAMS_NO_STRIP %%%>'#13#10#9'  __Message->Finalize();'#13#10#9
+  ,'  __Message->UnsetAttributes(__Transport);'#13#10#9'}'#13#10#9'else'#13#10#9
+  +'{'#13#10#9'  throw new EIntfCastError("Critical error in Invoker: Instance '
+  +'does not support I%SERVICE_NAME% interface");'#13#10#9'}'#13#10'  }'#13#10
+  +'  __finally'#13#10'  {'#13#10#9'// <%%% START IF_HAS_COMPLEX_TYPE %%%>'#13
+  +#10#9'TROObjectDisposer* __lObjectDisposer = new TROObjectDisposer(__Instanc'
+  +'e);'#13#10#9'try'#13#10#9'{'#13#10#9'  // <%%% START PARAMS_NO_STRIP %%%>'
+  +#13#10#9'  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>'#13#10#9'  __lObjectDisp'
+  +'oser->Add(%PARAM_NAME%);'#13#10#9'  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>'
+  +#13#10#9'  // <%%% END PARAMS_NO_STRIP %%%>'#13#10#9'  // <%%% START IF_RESU'
+  +'LT_COMPLEX %%%>'#13#10#9'  __lObjectDisposer->Add(lResult);'#13#10#9'  // <'
+  +'%%% END IF_RESULT_COMPLEX %%%>'#13#10#9'}'#13#10#9'__finally'#13#10#9'{'#13
+  +#10#9'  delete __lObjectDisposer;'#13#10#9'}'#13#10#9'// <%%% END IF_HAS_COM'
+  +'PLEX_TYPE %%%>'#13#10'  }'#13#10'}'#13#10#13#10'// <%%% END FUNCTION_OPERAT'
+  +'IONS %%%>'#13#10'// <%%% START PROCEDURE_OPERATIONS %%%>'#13#10'void __fast'
+  +'call T%SERVICE_NAME%_Invoker::Invoke_%OPERATION_NAME%('#13#10#9#9'const Sys'
+  +'tem::_di_IInterface __Instance,'#13#10#9#9'const Uroclientintf::_di_IROMess'
+  +'age __Message,'#13#10#9#9'const Uroclientintf::_di_IROTransport __Transport'
+  +','#13#10#9#9'/* out */ Uroserverintf::TROResponseOptions& __oResponseOption'
+  +'s)'#13#10'{'#13#10'// virtual void __fastcall %OPERATION_NAME%('#13#10'// <'
+  +'%%% START PARAMS %%%>'#13#10'// <%%% START IF_PARAM_TYPE_SIMPLE %%%>'#13#10
+  +'//   %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%'
+  +','#13#10'// <%%% END IF_PARAM_TYPE_SIMPLE %%%>'#13#10'// <%%% START IF_PARA'
+  +'M_TYPE_COMPLEX %%%>'#13#10'//   %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM'
+  +'_BACK_MODIFIER% %PARAM_NAME%,'#13#10'// <%%% END IF_PARAM_TYPE_COMPLEX %%%>'
+  +#13#10'// <%%% END PARAMS %%%>'#13#10'//   );'#13#10#13#10'  // <%%% START P'
+  +'ARAMS_NO_STRIP %%%>'#13#10'  // <%%% START IF_PARAM_TYPE_SIMPLE %%%>'#13#10
+  +'  %PARAM_TYPE% %PARAM_NAME%;'#13#10'  // <%%% END IF_PARAM_TYPE_SIMPLE %%%>'
+  +#13#10'  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>'#13#10'  %PARAM_TYPE%* %PA'
+  +'RAM_NAME%;'#13#10'  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>'#13#10'  // <%%%'
+  +' END PARAMS_NO_STRIP %%%>'#13#10'  try'#13#10'  {'#13#10#9'_di_I%SERVICE_NA'
+  +'ME% __%SERVICE_NAME%Instance;'#13#10#9'if (__Instance->Supports(__%SERVICE_'
+  +'NAME%Instance))'#13#10#9'{'#13#10#9'  // <%%% START IN_PARAMS_NO_STRIP %%%>'
+  +#13#10#9'  // <%%% START IF_PARAM_TYPE_SIMPLE %%%>'#13#10#9'  __Message->Rea'
+  +'d("%PARAM_NAME%", __Get%PARAM_TYPE%Info, &%PARAM_NAME%, TParamAttributes(%P'
+  +'ARAM_ATTRIBUTE%));'#13#10#9'  // <%%% END IF_PARAM_TYPE_SIMPLE %%%>'#13#10#9
+  +'  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>'#13#10#9'  __Message->Read("%PAR'
+  +'AM_NAME%", __typeinfo(%PARAM_TYPE%), &%PARAM_NAME%, TParamAttributes(%PARAM'
+  +'_ATTRIBUTE%));'#13#10#9'  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>'#13#10#9' '
+  +' // <%%% END IN_PARAMS_NO_STRIP %%%>'#13#10#13#10#9'  __%SERVICE_NAME%Insta'
+  +'nce->%OPERATION_NAME%('#13#10#9#9#9#9#9#9#9#9'  // <%%% START PARAMS %%%>'
+  +#13#10#9#9#9#9#9#9#9#9'  %PARAM_NAME%,'#13#10#9#9#9#9#9#9#9#9'  // <%%% END '
+  +'PARAMS %%%>'#13#10#9#9#9#9#9#9#9#9'  );'#13#10#13#10#9'  __Message->Initial'
+  +'izeResponseMessage(__Transport, "%LIBRARY_NAME%", "%SERVICE_NAME%", "%OPERA'
+  +'TION_NAME%Response");'#13#10#9'  // <%%% START OUT_PARAMS_NO_STRIP %%%>'#13
+  +#10#9'  // <%%% START IF_PARAM_TYPE_SIMPLE %%%>'#13#10#9'  __Message->Write('
+  +'"%PARAM_NAME%", __Get%PARAM_TYPE%Info, &%PARAM_NAME%, TParamAttributes(%PAR'
+  +'AM_ATTRIBUTE%));'#13#10#9'  // <%%% END IF_PARAM_TYPE_SIMPLE %%%>'#13#10#9
+  +'  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>'#13#10#9'  __Message->Write("%PA'
+  +'RAM_NAME%", __typeinfo(%PARAM_TYPE%), &%PARAM_NAME%, TParamAttributes(%PARA'
+  +'M_ATTRIBUTE%));'#13#10#9'  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>'#13#10#9
+  +'  // <%%% END OUT_PARAMS_NO_STRIP %%%>'#13#10#9'  __Message->Finalize();'#13
+  +#10#9'  __Message->UnsetAttributes(__Transport);'#13#10#9'  // <%%% START IF'
+  +'_NO_OUT_PARAMS %%%>'#13#10#13#10#9'  __oResponseOptions = TROResponseOption'
+  +'s() << roNoResponse;'#13#10#9'  // <%%% END IF_NO_OUT_PARAMS %%%>'#13#10#9
+  +'}'#13#10#9'else'#13#10#9'{'#13#10#9'  throw new EIntfCastError("Critical er'
+  +'ror in Invoker: Instance does not support %SERVICE_NAME% interface");'#13#10
+  +#9'}'#13#10'  }'#13#10'  __finally'#13#10'  {'#13#10#9'// <%%% START IF_HAS_'
+  +'COMPLEX_TYPE %%%>'#13#10#9'TROObjectDisposer* __lObjectDisposer = new TROOb'
+  +'jectDisposer(__Instance);'#13#10#9'try'#13#10#9'{'#13#10#9'  // <%%% START '
+  +'PARAMS_NO_STRIP %%%>'#13#10#9'  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>'#13
+  +#10#9'  __lObjectDisposer->Add(%PARAM_NAME%);'#13#10#9'  // <%%% END IF_PARA'
+  +'M_TYPE_COMPLEX %%%>'#13#10#9'  // <%%% END PARAMS_NO_STRIP %%%>'#13#10#9'}'
+  +#13#10#9'__finally'#13#10#9'{'#13#10#9'  delete __lObjectDisposer;'#13#10#9
+  +'}'#13#10#9'// <%%% END IF_HAS_COMPLEX_TYPE %%%>'#13#10'  }'#13#10'}'#13#10
+  ,'// <%%% END PROCEDURE_OPERATIONS %%%>'#13#10'// <%%% END SERVICES %%%>'#13
+  +#10#13#10
+]);
+LazarusResources.Add('TEMPLATE_INVK_H','RCDATA',[
+  '// %UNIT_NAME%'#13#10'//'#13#10'/*------------------------------------------'
+  +'---------------------------------}'#13#10'{ This unit was automatically gen'
+  +'erated by the RemObjects SDK after reading  }'#13#10'{ the RODL file associ'
+  +'ated with this project.                                }'#13#10'{          '
+  +'                                                                  }'#13#10
+  +'{ Do not modify this unit manually, or your changes will be lost when this '
+  +'  }'#13#10'{ unit is regenerated the next time you compile the project.    '
+  +'             }'#13#10'{----------------------------------------------------'
+  +'-----------------------*/'#13#10#13#10'#ifndef %UNIT_NAME%H'#13#10'#define '
+  +'%UNIT_NAME%H'#13#10#13#10'#pragma delphiheader begin'#13#10'#pragma option '
+  +'push'#13#10'#pragma option -w-      // All warnings off'#13#10'#pragma opti'
+  +'on -Vx      // Zero-length empty class member functions'#13#10'#pragma pack'
+  +'(push,8)'#13#10#13#10'#include <System.hpp>'#9#9#9'    // Pascal unit'#13#10
+  +'#include <Uroserver.hpp>'#9'    // Pascal unit'#13#10'// <%%% START REQUIRE'
+  +'D_UNITS %%%>'#13#10'#include <%REQUIRED_UNIT_NAME%.hpp>'#13#10'// <%%% END '
+  +'REQUIRED_UNITS %%%>'#13#10#13#10'#include "%LIBRARY_NAME%_Intf.h"'#13#10#13
+  +#10'namespace %NAMESPACE_NAME%'#13#10'{'#13#10'//-- type declarations ------'
+  +'-------------------------------------------------'#13#10'typedef Classes::T'
+  +'SeekOrigin TSeekOrigin;   // Fake declaration '#13#10#13#10'// <%%% START S'
+  +'ERVICES %%%>'#13#10'class DELPHICLASS T%SERVICE_NAME%_Invoker : public TROI'
+  +'nvoker'#13#10'{'#13#10'  typedef Uroserver::TROInvoker inherited;'#13#10#13
+  +#10'  __published:'#13#10'    // <%%% START FUNCTION_OPERATIONS %%%>'#13#10
+  +'    void __fastcall Invoke_%OPERATION_NAME%('#13#10'        const System::_'
+  +'di_IInterface __Instance,'#13#10'        const Uroclientintf::_di_IROMessag'
+  +'e __Message,'#13#10'        const Uroclientintf::_di_IROTransport __Transpo'
+  +'rt,'#13#10'        /* out */ Uroserverintf::TROResponseOptions& __oResponse'
+  +'Options);'#13#10'    // <%%% END FUNCTION_OPERATIONS %%%>'#13#10'    // <%%'
+  +'% START PROCEDURE_OPERATIONS %%%>'#13#10'    void __fastcall Invoke_%OPERAT'
+  +'ION_NAME%('#13#10'        const System::_di_IInterface __Instance,'#13#10' '
+  +'       const Uroclientintf::_di_IROMessage __Message,'#13#10'        const '
+  +'Uroclientintf::_di_IROTransport __Transport,'#13#10'        /* out */ Urose'
+  +'rverintf::TROResponseOptions& __oResponseOptions);'#13#10'    // <%%% END P'
+  +'ROCEDURE_OPERATIONS %%%>'#13#10'  public:'#13#10#9'#pragma option push -w-i'
+  +'nl'#13#10#9'/* TROInvoker.Create */ inline __fastcall virtual T%SERVICE_NAM'
+  +'E%_Invoker(): Uroserver::TROInvoker() {}'#13#10#9'#pragma option pop'#13#10
+  +#9'#pragma option push -w-inl'#13#10#9'/* TROInvoker.Destroy */ inline __fas'
+  +'tcall virtual ~T%SERVICE_NAME%_Invoker() {}'#13#10#9'#pragma option pop'#13
+  +#10#13#10'  protected:'#13#10'  private:'#13#10'};'#13#10'// <%%% END SERVIC'
+  +'ES %%%>'#13#10#13#10'}'#9'// namespace %NAMESPACE_NAME%'#13#10'using namesp'
+  +'ace %NAMESPACE_NAME%;'#13#10'#pragma pack(pop)'#13#10'#pragma option pop'#13
+  +#10'#pragma delphiheader end.'#13#10'//-- end H ----------------------------'
+  +'------------------------------------'#13#10'#endif'#9'// %UNIT_NAME%H'#13#10
+  +#13#10
+]);
+LazarusResources.Add('TEMPLATE_IMPL_CPP','RCDATA',[
+  '// <%%% START SERVICES %%%>'#13#10'// unit %UNIT_NAME%'#13#10'//'#13#10'/*--'
+  +'-------------------------------------------------------------------------}'
+  +#13#10'{ This unit was automatically generated by the RemObjects SDK after r'
+  +'eading  }'#13#10'{ the RODL file associated with this project .            '
+  +'                   }'#13#10'{                                              '
+  +'                              }'#13#10'{ Modify this unit to provide implem'
+  +'entation for your service.              */'#13#10#13#10'// Interface of %LI'
+  +'BRARY_NAME%'#13#10'#include "%LIBRARY_NAME%_Intf.h"'#13#10#13#10'// Our hea'
+  +'der file'#13#10'#include "%UNIT_NAME%.h"'#13#10#13#10'// Invoker interface'
+  +#13#10'#include "%LIBRARY_NAME%_Invk.h"'#13#10#13#10'// <%%% START IF_DATA_M'
+  +'ODULE %%%>'#13#10'#pragma link "Uroremotedatamodule"'#13#10'// <%%% END IF_'
+  +'DATA_MODULE %%%>'#13#10'#pragma link "Uroserver"'#13#10#13#10'// <%%% START'
+  +' IF_DATA_MODULE %%%>'#13#10'//---------------------------------------------'
+  +'------------------------------'#13#10'#pragma package(smart_init)'#13#10'#p'
+  +'ragma resource "*.dfm"    '#13#10'T%SERVICE_NAME% *%SERVICE_NAME%;'#13#10'/'
+  +'/--------------------------------------------------------------------------'
+  +'-'#13#10'// <%%% END IF_DATA_MODULE %%%>'#13#10'void __fastcall Create_%SER'
+  +'VICE_NAME%(/*out*/ _di_IInterface& anInstance)'#13#10'{'#13#10'  anInstance'
+  +' = new T%SERVICE_NAME%('#13#10'    // <%%% START IF_DATA_MODULE %%%>'#13#10
+  +'    NULL'#13#10'    // <%%% END IF_DATA_MODULE %%%>'#13#10'    )->operator '
+  +'IROObjectRetainer *();'#13#10'}'#13#10#13#10'// %SERVICE_NAME%'#13#10'// <%'
+  +'%% START IF_DATA_MODULE %%%>'#13#10#13#10'__fastcall T%SERVICE_NAME%::T%SER'
+  +'VICE_NAME%(Classes::TComponent* aOwner)'#13#10'    : TRORemoteDataModule(aO'
+  +'wner)'#13#10'{'#13#10'}'#13#10'// <%%% END IF_DATA_MODULE %%%>'#13#10'// <%'
+  +'%% START FUNCTION_OPERATIONS %%%>'#13#10'// <%%% START IF_RESULT_SIMPLE %%%'
+  +'>'#13#10'%OPERATION_RESULT% __fastcall T%SERVICE_NAME%::%OPERATION_NAME%('
+  +#13#10'// <%%% END IF_RESULT_SIMPLE %%%>'#13#10'// <%%% START IF_RESULT_COMP'
+  +'LEX %%%>'#13#10'%OPERATION_RESULT%* __fastcall T%SERVICE_NAME%::%OPERATION_'
+  +'NAME%('#13#10'// <%%% END IF_RESULT_COMPLEX %%%>'#13#10'  // <%%% START PAR'
+  +'AMS %%%>'#13#10'  // <%%% START IF_PARAM_TYPE_SIMPLE %%%>'#13#10'  %PARAM_F'
+  +'RONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,'#13#10'  //'
+  +' <%%% END IF_PARAM_TYPE_SIMPLE %%%>'#13#10'  // <%%% START IF_PARAM_TYPE_CO'
+  +'MPLEX %%%>'#13#10'  %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFI'
+  +'ER% %PARAM_NAME%,'#13#10'  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>'#13#10'  '
+  +'// <%%% END PARAMS %%%>'#13#10'  )'#13#10'{'#13#10'  // Insert your impleme'
+  +'ntation code for %SERVICE_NAME%::%OPERATION_NAME% here'#13#10'}'#13#10'// <'
+  +'%%% END FUNCTION_OPERATIONS %%%>'#13#10#13#10'// <%%% START PROCEDURE_OPERA'
+  +'TIONS %%%>'#13#10'void __fastcall T%SERVICE_NAME%::%OPERATION_NAME%('#13#10
+  +'  // <%%% START PARAMS %%%>'#13#10'  // <%%% START IF_PARAM_TYPE_SIMPLE %%%'
+  +'>'#13#10'  %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM'
+  +'_NAME%,'#13#10'  // <%%% END IF_PARAM_TYPE_SIMPLE %%%>'#13#10'  // <%%% STA'
+  +'RT IF_PARAM_TYPE_COMPLEX %%%>'#13#10'  %PARAM_FRONT_MODIFIER% %PARAM_TYPE%*'
+  +' %PARAM_BACK_MODIFIER% %PARAM_NAME%,'#13#10'  // <%%% END IF_PARAM_TYPE_COM'
+  +'PLEX %%%>'#13#10'  // <%%% END PARAMS %%%>'#13#10'  )'#13#10'{'#13#10'  // '
+  +'Insert your implementation code for %SERVICE_NAME%::%OPERATION_NAME% here'
+  +#13#10'}'#13#10'// <%%% END PROCEDURE_OPERATIONS %%%>'#13#10#13#10'void __in'
+  +'itialization_%UNIT_NAME%();'#13#10#13#10'#pragma startup __initialization_%'
+  +'UNIT_NAME%'#13#10#13#10'void __initialization_%UNIT_NAME%()'#13#10'{'#13#10
+  +'  new TROClassFactory("%SERVICE_NAME%", Create_%SERVICE_NAME%, __classid(T%'
+  +'SERVICE_NAME%_Invoker));'#13#10'}'#13#10#13#10
+]);
+LazarusResources.Add('TEMPLATE_IMPL_H','RCDATA',[
+  '// <%%% START SERVICES %%%>'#13#10'// unit %UNIT_NAME%'#13#10'//'#13#10'/*--'
+  +'-------------------------------------------------------------------------}'
+  +#13#10'{ This unit was automatically generated by the RemObjects SDK after r'
+  +'eading  }'#13#10'{ the RODL file associated with this project .            '
+  +'                   }'#13#10'{                                              '
+  +'                              }'#13#10'{ Do not modify this unit manually, '
+  +'or your changes will be lost when this   }'#13#10'{ unit is regenerated the'
+  +' next time you compile your project.                }'#13#10'{             '
+  +'                                                               }'#13#10'{ M'
+  +'odify the %UNIT_NAME%.cpp file to change the implementation details of    }'
+  +#13#10'{ this service.                                                      '
+  +'        }'#13#10'{---------------------------------------------------------'
+  +'------------------*/'#13#10#13#10'#ifndef %UNIT_NAME%H'#13#10'#define %UNIT'
+  +'_NAME%H'#13#10#13#10'#include <System.hpp>'#9'          // Pascal unit'#13
+  +#10'// <%%% START IF_DATA_MODULE %%%>'#13#10'#include <Classes.hpp>'#13#10'#'
+  +'include <Controls.hpp>'#13#10'#include <StdCtrls.hpp>'#13#10'#include <Form'
+  +'s.hpp>'#13#10'#include <uRORemoteDataModule.hpp>  // Pascal unit'#13#10'// '
+  +'<%%% END IF_DATA_MODULE %%%>'#13#10'#include <Uroserver.hpp>        // Pasc'
+  +'al unit'#13#10'#include "%LIBRARY_NAME%_intf.h"'#13#10#13#10'// T%SERVICE_N'
+  +'AME%'#13#10'class T%SERVICE_NAME% : public %SERVICE_ANCESTOR_NAME%, I%SERVI'
+  +'CE_NAME%  // implements I%SERVICE_NAME%'#13#10'{'#13#10'  typedef %SERVICE_'
+  +'ANCESTOR_NAME% inherited;'#13#10#13#10'// <%%% START IF_DATA_MODULE %%%>'#13
+  +#10'__published:   // this line is required or the IDE will consider the dec'
+  +'laration of the datamodule is incorrect.'#9#13#10'// <%%% END IF_DATA_MODUL'
+  +'E %%%>'#13#10'protected:'#13#10'  // I%SERVICE_NAME% methods'#13#10'  // <%'
+  +'%% START FUNCTION_OPERATIONS %%%>'#13#10'  // <%%% START IF_RESULT_SIMPLE %'
+  +'%%>'#13#10'  virtual %OPERATION_RESULT% __fastcall %OPERATION_NAME%('#13#10
+  +'  // <%%% END IF_RESULT_SIMPLE %%%>'#13#10'  // <%%% START IF_RESULT_COMPLE'
+  +'X %%%>'#13#10'  virtual %OPERATION_RESULT%* __fastcall %OPERATION_NAME%('#13
+  +#10'  // <%%% END IF_RESULT_COMPLEX %%%>'#13#10'    // <%%% START PARAMS %%%'
+  +'>'#13#10'    // <%%% START IF_PARAM_TYPE_SIMPLE %%%>'#13#10'    %PARAM_FRON'
+  +'T_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,'#13#10'    // '
+  +'<%%% END IF_PARAM_TYPE_SIMPLE %%%>'#13#10'    // <%%% START IF_PARAM_TYPE_C'
+  +'OMPLEX %%%>'#13#10'    %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MOD'
+  +'IFIER% %PARAM_NAME%,'#13#10'    // <%%% END IF_PARAM_TYPE_COMPLEX %%%>'#13
+  +#10'    // <%%% END PARAMS %%%>'#13#10'    );'#13#10'  // <%%% END FUNCTION_'
+  +'OPERATIONS %%%>'#13#10'  // <%%% START PROCEDURE_OPERATIONS %%%>'#13#10'  v'
+  +'irtual void __fastcall %OPERATION_NAME%('#13#10'    // <%%% START PARAMS %%'
+  +'%>'#13#10'    // <%%% START IF_PARAM_TYPE_SIMPLE %%%>'#13#10'    %PARAM_FRO'
+  +'NT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,'#13#10'    //'
+  +' <%%% END IF_PARAM_TYPE_SIMPLE %%%>'#13#10'    // <%%% START IF_PARAM_TYPE_'
+  +'COMPLEX %%%>'#13#10'    %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MO'
+  +'DIFIER% %PARAM_NAME%,'#13#10'    // <%%% END IF_PARAM_TYPE_COMPLEX %%%>'#13
+  +#10'    // <%%% END PARAMS %%%>'#13#10'    );'#13#10'  // <%%% END PROCEDURE'
+  +'_OPERATIONS %%%>'#13#10#13#10'public:'#13#10'  // <%%% START IF_DATA_MODULE'
+  +' %%%>'#13#10'  __fastcall T%SERVICE_NAME%(Classes::TComponent* aOwner);'#13
+  +#10#13#10'  // <%%% END IF_DATA_MODULE %%%>'#13#10'  virtual HRESULT __stdca'
+  +'ll QueryInterface(const GUID& IID, void **Obj) {'#13#10'    return inherite'
+  +'d::QueryInterface(IID, (void *)Obj); }'#13#10#13#10'  virtual ULONG __stdca'
+  +'ll AddRef() {'#13#10'    return inherited::_AddRef();  }'#13#10#13#10'  vir'
+  +'tual ULONG __stdcall Release() {'#13#10'    return inherited::_Release(); }'
+  +#13#10'};'#13#10'// <%%% START IF_DATA_MODULE %%%>'#13#10'//----------------'
+  +'-----------------------------------------------------------'#13#10'extern P'
+  +'ACKAGE T%SERVICE_NAME% *%SERVICE_NAME%;'#13#10'//--------------------------'
+  +'-------------------------------------------------'#13#10'// <%%% END IF_DAT'
+  +'A_MODULE %%%>'#13#10#13#10'#endif'#9'// %UNIT_NAME%H'#13#10#13#10
+]);
+LazarusResources.Add('TEMPLATE_ASYNC_CPP','RCDATA',[
+  '// %UNIT_NAME%'#13#10'//'#13#10'/*------------------------------------------'
+  +'---------------------------------}'#13#10'{ This unit was automatically gen'
+  +'erated by the RemObjects SDK after reading  }'#13#10'{ the RODL file associ'
+  +'ated with this project.                                }'#13#10'{          '
+  +'                                                                  }'#13#10
+  +'{ Do not modify this unit manually, or your changes will be lost when this '
+  +'  }'#13#10'{ unit is regenerated the next time you compile the project.    '
+  +'             }'#13#10'{----------------------------------------------------'
+  +'-----------------------*/'#13#10#13#10'// Implementation of %UNIT_NAME%'#13
+  +#10'#include "%UNIT_NAME%.h"'#13#10#13#10'// <%%% START SERVICES %%%>'#13#10
+  +'// <%%% START FUNCTION_OPERATIONS %%%>'#13#10'void __fastcall T%SERVICE_NAM'
+  +'E%_AsyncProxy::Invoke_%OPERATION_NAME%('#13#10'            // <%%% START IN'
+  +'_PARAMS %%%>'#13#10'            // <%%% START IF_PARAM_TYPE_SIMPLE %%%>'#13
+  +#10'            %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %P'
+  +'ARAM_NAME%,'#13#10'            // <%%% END IF_PARAM_TYPE_SIMPLE %%%>'#13#10
+  +'            // <%%% START IF_PARAM_TYPE_COMPLEX %%%>'#13#10'            %PA'
+  +'RAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,'#13#10
+  +'            // <%%% END IF_PARAM_TYPE_COMPLEX %%%>'#13#10'            // <%'
+  +'%% END IN_PARAMS %%%>'#13#10'            )'#13#10'{'#13#10'  __AssertProxyN'
+  +'otBusy("%OPERATION_NAME%");'#13#10#13#10'  __Message->InitializeRequestMess'
+  +'age(__TransportChannel, "%LIBRARY_NAME%", __InterfaceName, "%OPERATION_NAME'
+  +'%");'#13#10'  // <%%% START IN_PARAMS_NO_STRIP %%%>'#13#10'  // <%%% START '
+  +'IF_PARAM_TYPE_SIMPLE %%%>'#13#10'  __Message->Write("%PARAM_NAME%", __Get%P'
+  +'ARAM_TYPE%Info, &%PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));'#13#10
+  +'  // <%%% END IF_PARAM_TYPE_SIMPLE %%%>'#13#10'  // <%%% START IF_PARAM_TYP'
+  +'E_COMPLEX %%%>'#13#10'  __Message->Write("%PARAM_NAME%", __typeinfo(%PARAM_'
+  +'TYPE%), %PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));'#13#10'  // <%%'
+  +'% END IF_PARAM_TYPE_COMPLEX %%%>'#13#10'  // <%%% END IN_PARAMS_NO_STRIP %%'
+  +'%>'#13#10#13#10'  __DispatchAsyncRequest("%OPERATION_NAME%", __Message);'#13
+  +#10'}'#13#10#13#10'// <%%% START IF_RESULT_SIMPLE %%%>'#13#10'%OPERATION_RES'
+  +'ULT% __fastcall T%SERVICE_NAME%_AsyncProxy::Retrieve_%OPERATION_NAME%('#13
+  +#10'// <%%% END IF_RESULT_SIMPLE %%%>'#13#10'// <%%% START IF_RESULT_COMPLEX'
+  +' %%%>'#13#10'%OPERATION_RESULT%* __fastcall T%SERVICE_NAME%_AsyncProxy::Ret'
+  +'rieve_%OPERATION_NAME%('#13#10'// <%%% END IF_RESULT_COMPLEX %%%>'#13#10'  '
+  +'          // <%%% START OUT_PARAMS %%%>'#13#10'            // <%%% START IF'
+  +'_PARAM_TYPE_SIMPLE %%%>'#13#10'            %PARAM_FRONT_MODIFIER% %PARAM_TY'
+  +'PE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,'#13#10'            // <%%% END IF_P'
+  +'ARAM_TYPE_SIMPLE %%%>'#13#10'            // <%%% START IF_PARAM_TYPE_COMPLE'
+  +'X %%%>'#13#10'            %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_'
+  +'MODIFIER% %PARAM_NAME%,'#13#10'            // <%%% END IF_PARAM_TYPE_COMPLE'
+  +'X %%%>'#13#10'            // <%%% END OUT_PARAMS %%%>'#13#10'            )'
+  +#13#10'{'#13#10'  // <%%% START IF_RESULT_SIMPLE %%%>'#13#10'  %OPERATION_RE'
+  +'SULT% result;'#13#10'  // <%%% END IF_RESULT_SIMPLE %%%>'#13#10'  // <%%% S'
+  +'TART IF_RESULT_COMPLEX %%%>'#13#10'  %OPERATION_RESULT%* result;'#13#10'  /'
+  +'/ <%%% END IF_RESULT_COMPLEX %%%>'#13#10#13#10'  // <%%% START OUT_PARAMS_N'
+  +'O_STRIP %%%>'#13#10'  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>'#13#10'  %PA'
+  +'RAM_NAME% = NULL;'#13#10'  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>'#13#10'  '
+  +'// <%%% END OUT_PARAMS_NO_STRIP %%%>'#13#10'  // <%%% START IF_RESULT_COMPL'
+  +'EX %%%>'#13#10'  result = NULL;'#13#10'  // <%%% END IF_RESULT_COMPLEX %%%>'
+  +#13#10#13#10'  TStream* __response = __RetrieveAsyncResponse("%OPERATION_NAM'
+  +'E%");'#13#10'  __Message->ReadFromStream(__response);'#13#10#13#10'  // <%%'
+  +'% START IF_RESULT_SIMPLE %%%>'#13#10'  __Message->Read("Result", __Get%OPER'
+  +'ATION_RESULT%Info, &result, TParamAttributes(%OPERATION_RESULT_ATTRIBUTE%))'
+  +';'#13#10'  // <%%% END IF_RESULT_SIMPLE %%%>'#13#10'  // <%%% START IF_RESU'
+  +'LT_COMPLEX %%%>'#13#10'  __Message->Read("Result", __typeinfo(%OPERATION_RE'
+  +'SULT%), result, TParamAttributes(%OPERATION_RESULT_ATTRIBUTE%));'#13#10'  /'
+  +'/ <%%% END IF_RESULT_COMPLEX %%%>'#13#10'  // <%%% START OUT_PARAMS_NO_STRI'
+  +'P %%%>'#13#10'  // <%%% START IF_PARAM_TYPE_SIMPLE %%%>'#13#10'  __Message-'
+  +'>Read("%PARAM_NAME%", __Get%PARAM_TYPE%Info, &%PARAM_NAME%, TParamAttribute'
+  +'s(%PARAM_ATTRIBUTE%));'#13#10'  // <%%% END IF_PARAM_TYPE_SIMPLE %%%>'#13#10
+  +'  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>'#13#10'  __Message->Read("%PARAM'
+  +'_NAME%", __typeinfo(%PARAM_TYPE%), %PARAM_NAME%, TParamAttributes(%PARAM_AT'
+  +'TRIBUTE%));'#13#10'  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>'#13#10'  // <%%'
+  +'% END OUT_PARAMS_NO_STRIP %%%>'#13#10#13#10'  delete __response;'#13#10'  r'
+  ,'eturn result;'#13#10'}'#13#10#13#10'// <%%% END FUNCTION_OPERATIONS %%%>'#13
+  +#10'// <%%% START PROCEDURE_OPERATIONS %%%>'#13#10'void _fastcall T%SERVICE_'
+  +'NAME%_AsyncProxy::Invoke_%OPERATION_NAME%('#13#10'            // <%%% START'
+  +' IN_PARAMS %%%>'#13#10'            // <%%% START IF_PARAM_TYPE_SIMPLE %%%>'
+  +#13#10'            %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER%'
+  +' %PARAM_NAME%,'#13#10'            // <%%% END IF_PARAM_TYPE_SIMPLE %%%>'#13
+  +#10'            // <%%% START IF_PARAM_TYPE_COMPLEX %%%>'#13#10'            '
+  +'%PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,'#13
+  +#10'            // <%%% END IF_PARAM_TYPE_COMPLEX %%%>'#13#10'            //'
+  +' <%%% END IN_PARAMS %%%>'#13#10'            )'#13#10'{'#13#10'  __AssertPro'
+  +'xyNotBusy("%OPERATION_NAME%");'#13#10'  TStream* __request = new TMemoryStr'
+  +'eam();'#13#10#13#10'  __Message->InitializeRequestMessage(__TransportChanne'
+  +'l, "%LIBRARY_NAME%", __InterfaceName, "%OPERATION_NAME%");'#13#10'  // <%%%'
+  +' START IN_PARAMS_NO_STRIP %%%>'#13#10'  // <%%% START IF_PARAM_TYPE_SIMPLE '
+  +'%%%>'#13#10'  __Message->Write("%PARAM_NAME%", __Get%PARAM_TYPE%Info, &%PAR'
+  +'AM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));'#13#10'  // <%%% END IF_PAR'
+  +'AM_TYPE_SIMPLE %%%>'#13#10'  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>'#13#10
+  +'  __Message->Write("%PARAM_NAME%", __typeinfo(%PARAM_TYPE%), %PARAM_NAME%, '
+  +'TParamAttributes(%PARAM_ATTRIBUTE%));'#13#10'  // <%%% END IF_PARAM_TYPE_CO'
+  +'MPLEX %%%>'#13#10'  // <%%% END IN_PARAMS_NO_STRIP %%%>'#13#10'  __Message-'
+  +'>Finalize();'#13#10#13#10'  __Message->WriteToStream(__request);'#13#10'  _'
+  +'_DispatchAsyncRequest("%OPERATION_NAME%", __request, False);'#13#10'}'#13#10
+  +#13#10'// <%%% START IF_OUT_PARAMS %%%>'#13#10'void _fastcall T%SERVICE_NAME'
+  +'%_AsyncProxy::Retrieve_%OPERATION_NAME%('#13#10'            // <%%% START O'
+  +'UT_PARAMS %%%>'#13#10'            // <%%% START IF_PARAM_TYPE_SIMPLE %%%>'
+  +#13#10'            %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER%'
+  +' %PARAM_NAME%,'#13#10'            // <%%% END IF_PARAM_TYPE_SIMPLE %%%>'#13
+  +#10'            // <%%% START IF_PARAM_TYPE_COMPLEX %%%>'#13#10'            '
+  +'%PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,'#13
+  +#10'            // <%%% END IF_PARAM_TYPE_COMPLEX %%%>'#13#10'            //'
+  +' <%%% END OUT_PARAMS %%%>'#13#10'            )'#13#10'{'#13#10'  // <%%% ST'
+  +'ART OUT_PARAMS_NO_STRIP %%%>'#13#10'  // <%%% START IF_PARAM_TYPE_COMPLEX %'
+  +'%%>'#13#10'  %PARAM_NAME% = NULL;'#13#10'  // <%%% END IF_PARAM_TYPE_COMPLE'
+  +'X %%%>'#13#10'  // <%%% END OUT_PARAMS_NO_STRIP %%%>'#13#10#13#10'  TStream'
+  +'* __response = __RetrieveAsyncResponse("%OPERATION_NAME%");'#13#10'  __Mess'
+  +'age->ReadFromStream(__response);'#13#10#13#10'  // <%%% START OUT_PARAMS_NO'
+  +'_STRIP %%%>'#13#10'  // <%%% START IF_PARAM_TYPE_SIMPLE %%%>'#13#10'  __Mes'
+  +'sage->Read("%PARAM_NAME%", __Get%PARAM_TYPE%Info, &%PARAM_NAME%, TParamAttr'
+  +'ibutes(%PARAM_ATTRIBUTE%));'#13#10'  // <%%% END IF_PARAM_TYPE_SIMPLE %%%>'
+  +#13#10'  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>'#13#10'  __Message->Read("'
+  +'%PARAM_NAME%", __typeinfo(%PARAM_TYPE%), %PARAM_NAME%, TParamAttributes(%PA'
+  +'RAM_ATTRIBUTE%));'#13#10'  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>'#13#10'  '
+  +'// <%%% END OUT_PARAMS_NO_STRIP %%%>'#13#10#13#10'  delete __response;'#13
+  +#10'}'#13#10#13#10'// <%%% END IF_OUT_PARAMS %%%>'#13#10'// <%%% END PROCEDU'
+  +'RE_OPERATIONS %%%>'#13#10'// <%%% END SERVICES %%%>'#13#10
+]);
+LazarusResources.Add('TEMPLATE_ASYNC_H','RCDATA',[
+  '// %UNIT_NAME%'#13#10'//'#13#10'/*------------------------------------------'
+  +'---------------------------------}'#13#10'{ This unit was automatically gen'
+  +'erated by the RemObjects SDK after reading  }'#13#10'{ the RODL file associ'
+  +'ated with this project.                                }'#13#10'{          '
+  +'                                                                  }'#13#10
+  +'{ Do not modify this unit manually, or your changes will be lost when this '
+  +'  }'#13#10'{ unit is regenerated the next time you compile the project.    '
+  +'             }'#13#10'{----------------------------------------------------'
+  +'-----------------------*/'#13#10#13#10'#ifndef %UNIT_NAME%H'#13#10'#define '
+  +'%UNIT_NAME%H'#13#10#13#10'#pragma delphiheader begin'#13#10'#pragma option '
+  +'push'#13#10'#pragma option -w-      '#9#9'  // All warnings off'#13#10'#pra'
+  +'gma option -Vx      '#9#9'  // Zero-length empty class member functions'#13
+  +#10'#pragma pack(push,8)'#13#10#13#10'#include <System.hpp>'#9#9#9'    // Pa'
+  +'scal unit'#13#10'#include <Uroasync.hpp>'#13#10'// <%%% START REQUIRED_UNIT'
+  +'S %%%>'#13#10'#include <%REQUIRED_UNIT_NAME%.hpp>'#13#10'// <%%% END REQUIR'
+  +'ED_UNITS %%%>'#13#10'#include "%LIBRARY_NAME%_Intf.h"'#13#10#13#10#13#10'na'
+  +'mespace %NAMESPACE_NAME%'#13#10'{'#13#10'// Forward declarations'#13#10'// '
+  +'<%%% START SERVICES %%%>'#13#10'__interface I%SERVICE_NAME%_Async; // = int'
+  +'erface;'#13#10'class DELPHICLASS Co%SERVICE_NAME%_Async;'#13#10'class DELPH'
+  +'ICLASS T%SERVICE_NAME%_AsyncProxy;'#13#10'// <%%% END SERVICES %%%>'#13#10
+  +#13#10'// <%%% START SERVICES %%%>'#13#10'__interface I%SERVICE_NAME%_Async;'
+  +#13#10'typedef System::DelphiInterface<I%SERVICE_NAME%_Async> _di_I%SERVICE_'
+  +'NAME%_Async;'#13#10'__interface INTERFACE_UUID("%SERVICE_UID%") I%SERVICE_N'
+  +'AME%_Async : public %SERVICE_ANCESTOR_NAME%'#13#10'{'#13#10'public:'#13#10
+  +'  // <%%% START FUNCTION_OPERATIONS %%%>'#13#10'  virtual void __fastcall I'
+  +'nvoke_%OPERATION_NAME%('#13#10'              // <%%% START IN_PARAMS %%%>'
+  +#13#10'              // <%%% START IF_PARAM_TYPE_SIMPLE %%%>'#13#10'        '
+  +'      %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME'
+  +'%,'#13#10'              // <%%% END IF_PARAM_TYPE_SIMPLE %%%>'#13#10'      '
+  +'        // <%%% START IF_PARAM_TYPE_COMPLEX %%%>'#13#10'              %PARA'
+  +'M_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,'#13#10
+  +'              // <%%% END IF_PARAM_TYPE_COMPLEX %%%>'#13#10'              /'
+  +'/ <%%% END IN_PARAMS %%%>'#13#10'              ) = 0; // pure virtual funct'
+  +'ion - interface only'#13#10'  // <%%% START IF_RESULT_SIMPLE %%%>'#13#10'  '
+  +'virtual %OPERATION_RESULT% __fastcall Retrieve_%OPERATION_NAME%('#13#10'  /'
+  +'/ <%%% END IF_RESULT_SIMPLE %%%>'#13#10'  // <%%% START IF_RESULT_COMPLEX %'
+  +'%%>'#13#10'  virtual %OPERATION_RESULT%* __fastcall Retrieve_%OPERATION_NAM'
+  +'E%('#13#10'  // <%%% END IF_RESULT_COMPLEX %%%>'#13#10'              // <%%'
+  +'% START OUT_PARAMS %%%>'#13#10'              // <%%% START IF_PARAM_TYPE_SI'
+  +'MPLE %%%>'#13#10'              %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_B'
+  +'ACK_MODIFIER% %PARAM_NAME%,'#13#10'              // <%%% END IF_PARAM_TYPE_'
+  +'SIMPLE %%%>'#13#10'              // <%%% START IF_PARAM_TYPE_COMPLEX %%%>'
+  +#13#10'              %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFI'
+  +'ER% %PARAM_NAME%,'#13#10'              // <%%% END IF_PARAM_TYPE_COMPLEX %%'
+  +'%>'#13#10'              // <%%% END OUT_PARAMS %%%>'#13#10'              ) '
+  +'= 0; // pure virtual function - interface only'#13#10'  // <%%% END FUNCTIO'
+  +'N_OPERATIONS %%%>'#13#10#13#10'  // <%%% START PROCEDURE_OPERATIONS %%%>'#13
+  +#10'  virtual void _fastcall Invoke_%OPERATION_NAME%('#13#10'              /'
+  +'/ <%%% START IN_PARAMS %%%>'#13#10'              // <%%% START IF_PARAM_TYP'
+  +'E_SIMPLE %%%>'#13#10'              %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PAR'
+  +'AM_BACK_MODIFIER% %PARAM_NAME%,'#13#10'              // <%%% END IF_PARAM_T'
+  +'YPE_SIMPLE %%%>'#13#10'              // <%%% START IF_PARAM_TYPE_COMPLEX %%'
+  +'%>'#13#10'              %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MO'
+  +'DIFIER% %PARAM_NAME%,'#13#10'              // <%%% END IF_PARAM_TYPE_COMPLE'
+  +'X %%%>'#13#10'              // <%%% END IN_PARAMS %%%>'#13#10'             '
+  +' ) = 0; // pure virtual function - interface only'#13#10'  // <%%% START IF'
+  +'_OUT_PARAMS %%%>'#13#10'  virtual void _fastcall Retrieve_%OPERATION_NAME%('
+  +#13#10'              // <%%% START OUT_PARAMS %%%>'#13#10'              // <'
+  +'%%% START IF_PARAM_TYPE_SIMPLE %%%>'#13#10'              %PARAM_FRONT_MODIF'
+  +'IER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,'#13#10'              '
+  +'// <%%% END IF_PARAM_TYPE_SIMPLE %%%>'#13#10'              // <%%% START IF'
+  +'_PARAM_TYPE_COMPLEX %%%>'#13#10'              %PARAM_FRONT_MODIFIER% %PARAM'
+  +'_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,'#13#10'              // <%%% EN'
+  +'D IF_PARAM_TYPE_COMPLEX %%%>'#13#10'              // <%%% END OUT_PARAMS %%'
+  ,'%>'#13#10'              ) = 0; // pure virtual function - interface only'#13
+  +#10'  // <%%% END IF_OUT_PARAMS %%%>'#13#10'  // <%%% END PROCEDURE_OPERATIO'
+  +'NS %%%>'#13#10'};'#13#10#13#10'// Co%SERVICE_NAME%_Async'#13#10'class DELPH'
+  +'ICLASS Co%SERVICE_NAME%_Async;'#13#10'class Co%SERVICE_NAME%_Async : public'
+  +' System::TObject'#13#10'{'#13#10#9'typedef System::TObject inherited;'#13#10
+  +#13#10'public:'#13#10#9'static _di_I%SERVICE_NAME%_Async __fastcall Create(c'
+  +'onst Uroclientintf::_di_IROMessage aMessage,'#13#10'                       '
+  +' Uroclientintf::_di_IROTransportChannel aTransportChannel)'#13#10'  {'#13#10
+  +'    _di_I%SERVICE_NAME%_Async result;'#13#10'    T%SERVICE_NAME%_AsyncProxy'
+  +'* proxy = new T%SERVICE_NAME%_AsyncProxy(aMessage, aTransportChannel);'#13
+  +#10'    if (proxy->QueryInterface(I%SERVICE_NAME%_IID, reinterpret_cast<void'
+  +'**>(&result)) != S_OK)'#13#10'    {'#13#10'      delete proxy;'#13#10'     '
+  +' throw EIntfCastError::EIntfCastError("I%SERVICE_NAME%_Async not supported"'
+  +');'#13#10'    }'#13#10'    return result;'#13#10'  };'#13#10#13#10'  static'
+  +' _di_I%SERVICE_NAME%_Async __fastcall Create(Uroclient::TROMessage* aMessag'
+  +'e,'#13#10'                        Uroclient::TROTransportChannel *aTranspor'
+  +'tChannel)'#13#10'  {'#13#10'    _di_IROMessage __Message;'#13#10'    _di_IR'
+  +'OTransportChannel __TransportChannel;'#13#10#13#10'    if (aMessage->GetInt'
+  +'erface(__Message))'#13#10'    {'#13#10'      if (aTransportChannel->GetInte'
+  +'rface(__TransportChannel))'#13#10'        return Create(__Message, __Transp'
+  +'ortChannel);'#13#10'      else'#13#10'        throw EIntfCastError::EIntfCa'
+  +'stError("IROTransportChannel not supported");'#13#10'    }'#13#10'    else'
+  +#13#10'    {'#13#10'      throw EIntfCastError::EIntfCastError("IROMessage n'
+  +'ot supported");'#13#10'    }'#13#10'  };'#13#10'};'#13#10#13#10'class DELPH'
+  +'ICLASS T%SERVICE_NAME%_AsyncProxy;'#13#10'class T%SERVICE_NAME%_AsyncProxy '
+  +': public %SERVICE_PROXY_ANCESTOR_NAME%, I%SERVICE_NAME%_Async'#13#10'{'#13
+  +#10#9'typedef %SERVICE_PROXY_ANCESTOR_NAME% inherited;'#13#10#9#13#10'protec'
+  +'ted:'#13#10#9'virtual AnsiString __fastcall __GetInterfaceName()'#13#10'   '
+  +' { return "%SERVICE_NAME%"; }'#13#10#13#10'  // <%%% START FUNCTION_OPERATI'
+  +'ONS %%%>'#13#10'  virtual void __fastcall Invoke_%OPERATION_NAME%('#13#10' '
+  +'             // <%%% START IN_PARAMS %%%>'#13#10'              // <%%% STAR'
+  +'T IF_PARAM_TYPE_SIMPLE %%%>'#13#10'              %PARAM_FRONT_MODIFIER% %PA'
+  +'RAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,'#13#10'              // <%%% '
+  +'END IF_PARAM_TYPE_SIMPLE %%%>'#13#10'              // <%%% START IF_PARAM_T'
+  +'YPE_COMPLEX %%%>'#13#10'              %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* '
+  +'%PARAM_BACK_MODIFIER% %PARAM_NAME%,'#13#10'              // <%%% END IF_PAR'
+  +'AM_TYPE_COMPLEX %%%>'#13#10'              // <%%% END IN_PARAMS %%%>'#13#10
+  +'              );'#13#10'  // <%%% START IF_RESULT_SIMPLE %%%>'#13#10'  virt'
+  +'ual %OPERATION_RESULT% __fastcall Retrieve_%OPERATION_NAME%('#13#10'  // <%'
+  +'%% END IF_RESULT_SIMPLE %%%>'#13#10'  // <%%% START IF_RESULT_COMPLEX %%%>'
+  +#13#10'  virtual %OPERATION_RESULT%* __fastcall Retrieve_%OPERATION_NAME%('
+  +#13#10'  // <%%% END IF_RESULT_COMPLEX %%%>'#13#10'              // <%%% STA'
+  +'RT OUT_PARAMS %%%>'#13#10'              // <%%% START IF_PARAM_TYPE_SIMPLE '
+  +'%%%>'#13#10'              %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_M'
+  +'ODIFIER% %PARAM_NAME%,'#13#10'              // <%%% END IF_PARAM_TYPE_SIMPL'
+  +'E %%%>'#13#10'              // <%%% START IF_PARAM_TYPE_COMPLEX %%%>'#13#10
+  +'              %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %P'
+  +'ARAM_NAME%,'#13#10'              // <%%% END IF_PARAM_TYPE_COMPLEX %%%>'#13
+  +#10'              // <%%% END OUT_PARAMS %%%>'#13#10'              );'#13#10
+  +'  // <%%% END FUNCTION_OPERATIONS %%%>'#13#10#13#10'  // <%%% START PROCEDU'
+  +'RE_OPERATIONS %%%>'#13#10'  virtual void _fastcall Invoke_%OPERATION_NAME%('
+  +#13#10'              // <%%% START IN_PARAMS %%%>'#13#10'              // <%'
+  +'%% START IF_PARAM_TYPE_SIMPLE %%%>'#13#10'              %PARAM_FRONT_MODIFI'
+  +'ER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,'#13#10'              /'
+  +'/ <%%% END IF_PARAM_TYPE_SIMPLE %%%>'#13#10'              // <%%% START IF_'
+  +'PARAM_TYPE_COMPLEX %%%>'#13#10'              %PARAM_FRONT_MODIFIER% %PARAM_'
+  +'TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,'#13#10'              // <%%% END'
+  +' IF_PARAM_TYPE_COMPLEX %%%>'#13#10'              // <%%% END IN_PARAMS %%%>'
+  +#13#10'              );'#13#10'  // <%%% START IF_OUT_PARAMS %%%>'#13#10'  v'
+  +'irtual void _fastcall Retrieve_%OPERATION_NAME%('#13#10'              // <%'
+  +'%% START OUT_PARAMS %%%>'#13#10'              // <%%% START IF_PARAM_TYPE_S'
+  +'IMPLE %%%>'#13#10'              %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_'
+  +'BACK_MODIFIER% %PARAM_NAME%,'#13#10'              // <%%% END IF_PARAM_TYPE'
+  +'_SIMPLE %%%>'#13#10'              // <%%% START IF_PARAM_TYPE_COMPLEX %%%>'
+  ,#13#10'              %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFI'
+  +'ER% %PARAM_NAME%,'#13#10'              // <%%% END IF_PARAM_TYPE_COMPLEX %%'
+  +'%>'#13#10'              // <%%% END OUT_PARAMS %%%>'#13#10'              );'
+  +#13#10'  // <%%% END IF_OUT_PARAMS %%%>'#13#10'  // <%%% END PROCEDURE_OPERA'
+  +'TIONS %%%>'#13#10'public:'#13#10#9'#pragma option push -w-inl'#13#10#9'/* T'
+  +'ROProxy.Create */ inline __fastcall virtual T%SERVICE_NAME%_AsyncProxy(cons'
+  +'t Uroclientintf::_di_IROMessage aMessage, const Uroclientintf::_di_IROTrans'
+  +'portChannel aTransportChannel)/* overload */ :'#13#10'    %SERVICE_PROXY_AN'
+  +'CESTOR_NAME%(aMessage, aTransportChannel) {}'#13#10#9'#pragma option pop'#13
+  +#10#9#13#10'  virtual HRESULT __stdcall QueryInterface(const GUID& IID, void'
+  +' **Obj) {'#13#10'    return inherited::QueryInterface(IID, (void *)Obj); }'
+  +#13#10#13#10'  virtual ULONG __stdcall AddRef() {'#13#10'    return inherite'
+  +'d::_AddRef();  }'#13#10#13#10'  virtual ULONG __stdcall Release() {'#13#10
+  +'    return inherited::_Release(); }'#13#10'};'#13#10'// <%%% END SERVICES %'
+  +'%%>'#13#10#13#10'}'#9'// namespace %NAMESPACE_NAME%'#13#10#13#10'using name'
+  +'space %NAMESPACE_NAME%;'#13#10'#pragma pack(pop)'#13#10'#pragma option pop'
+  +#13#10#13#10'#pragma delphiheader end.'#13#10'#endif'#9'// %UNIT_NAME%H'#13
+  +#10#13#10
+]);
+LazarusResources.Add('TEMPLATE_WRAPPER_INTF_H','RCDATA',[
+  '{---------------------------------------------------------------------------'
+  +'-}'#13#10'{ This unit was automatically generated by the RemObjects SDK aft'
+  +'er reading  }'#13#10'{ the RODL file associated with this project .        '
+  +'                       }'#13#10'{                                          '
+  +'                                  }'#13#10'{ Do not modify this unit manual'
+  +'ly, or your changes will be lost when this   }'#13#10'{ unit is regenerated'
+  +' the next time you compile the project.                 }'#13#10'{---------'
+  +'-------------------------------------------------------------------}'#13#10
+  +'#ifndef %UNIT_NAME%_H'#13#10'#define %UNIT_NAME%_H'#13#10#13#10'// <%%% STA'
+  +'RT USES %%%>'#13#10'#include "%USED_UNIT_NAME%.h"'#13#10'// <%%% END USES %'
+  +'%%>'#13#10#13#10'#endif'#13#10
+]);
+LazarusResources.Add('TEMPLATE_WRAPPER_INVK_H','RCDATA',[
+  '{---------------------------------------------------------------------------'
+  +'-}'#13#10'{ This unit was automatically generated by the RemObjects SDK aft'
+  +'er reading  }'#13#10'{ the RODL file associated with this project .        '
+  +'                       }'#13#10'{                                          '
+  +'                                  }'#13#10'{ Do not modify this unit manual'
+  +'ly, or your changes will be lost when this   }'#13#10'{ unit is regenerated'
+  +' the next time you compile the project.                 }'#13#10'{---------'
+  +'-------------------------------------------------------------------}'#13#10
+  +'#ifndef %UNIT_NAME%_H'#13#10'#define %UNIT_NAME%_H'#13#10#13#10'// <%%% STA'
+  +'RT USES %%%>'#13#10'#include "%USED_UNIT_NAME%.h"'#13#10'// <%%% END USES %'
+  +'%%>'#13#10#13#10'#endif'#13#10
+]);
+LazarusResources.Add('TEMPLATE_WRAPPER_ASYNC_H','RCDATA',[
+  '{---------------------------------------------------------------------------'
+  +'-}'#13#10'{ This unit was automatically generated by the RemObjects SDK aft'
+  +'er reading  }'#13#10'{ the RODL file associated with this project .        '
+  +'                       }'#13#10'{                                          '
+  +'                                  }'#13#10'{ Do not modify this unit manual'
+  +'ly, or your changes will be lost when this   }'#13#10'{ unit is regenerated'
+  +' the next time you compile the project.                 }'#13#10'{---------'
+  +'-------------------------------------------------------------------}'#13#10
+  +'#ifndef %UNIT_NAME%_H'#13#10'#define %UNIT_NAME%_H'#13#10#13#10'// <%%% STA'
+  +'RT USES %%%>'#13#10'#include "%USED_UNIT_NAME%.h"'#13#10'// <%%% END USES %'
+  +'%%>'#13#10#13#10'#endif'#13#10
+]);
+LazarusResources.Add('TEMPLATE_OBJC_INTF_M','RCDATA',[
+  '//----------------------------------------------------------------------'#10
+  +'// This file was automatically generated by the RemObjects SDK from a '#10
+  +'// RODL file associated with this project.                         '#10'// '
+  +'                                                                          '
+  +#10'// Do not modify this file manually, or your changes will be lost when '
+  +#10'// it is regenerated the next time you update your RODL.               '
+  +#10'//----------------------------------------------------------------------'
+  +#10#10'#include "%LIBRARY_NAME%_Intf.h"'#10#10'#pragma mark enums'#10#10'// '
+  +'<%%% START ENUMS %%%>'#10'NSString *%ENUM_NAME%ToString(enum %ENUM_NAME% va'
+  +'lue)'#10'{'#10#9'switch (value)'#10#9'{'#10#9#9' // <%%% START VALUES_NO_ST'
+  +'RIP %%%>'#10#9#9' %VALUE_NAME%: return @"%VALUE_NAME%";                   '
+  +#10#9#9' // <%%% END VALUES_NO_STRIP %%%>'#10#9#9' default: return [NSString'
+  +' stringWithFormat:@"Invalid value %u for enum %ENUM_NAME%", value];'#10#9'}'
+  +#10'}'#10#10'// <%%% END ENUMS %%%>'#10#10'#pragma mark structs'#10#10'// <%'
+  +'%% START STRUCTS %%%>'#10'@implementation %STRUCT_NAME%'#10#10'// <%%% STAR'
+  +'T FIELDS_NO_STRIP %%%>'#10'@synthesize %FIELD_NAME%;'#10'// <%%% END FIELDS'
+  +'_NO_STRIP %%%>'#10#10'// <%%% START IF_HAS_FIELDS %%%>'#10'-(id) init'#10'{'
+  +#10#9'self = [super init];'#10#9'return self;'#10'}'#10#10'-(void) dealloc'
+  +#10'{'#10#9'// <%%% START FIELDS_NO_STRIP %%%>'#10#9'// <%%% START IF_FIELD_'
+  +'TYPE_COMPLEX %%%>'#10#9'[%FIELD_NAME% release];'#10#9'// <%%% END IF_FIELD_'
+  +'TYPE_COMPLEX %%%>'#10#9'// <%%% END FIELDS_NO_STRIP %%%>'#10#9'[super deall'
+  +'oc];'#10'}'#10'// <%%% END IF_HAS_FIELDS %%%>'#10#10'-(void) assignFrom:(RO'
+  +'ComplexType*) aSource'#10'{'#10'}'#10#10'// <%%% START IF_HAS_FIELDS %%%>'
+  +#10'-(void)writeToMessage:(ROMessage *) aMessage withName:(NSString *) aName'
+  +#10'{'#10#9'// <%%% START ENTIRE_HIERARCHY_FIELDS %%%>'#10#9'[aMessage write'
+  +'%FIELD_READER_WRITER%:%FIELD_NAME% withName:@"%FIELD_NAME%"];'#10#9'// <%%%'
+  +' END ENTIRE_HIERARCHY_FIELDS %%%>'#10'}'#10'-(void)readFromMessage:(ROMessa'
+  +'ge *) aMessage withName:(NSString *) aName'#10'{'#10#9'// <%%% START ENTIRE'
+  +'_HIERARCHY_FIELDS %%%>'#10#9'// <%%% START IF_FIELD_TYPE_COMPLEX %%%>'#10#9
+  +'[aMessage read%FIELD_READER_WRITER%:&%FIELD_NAME% withName:@"%FIELD_NAME%" '
+  +'asClass:[%FIELD_TYPE_NAME% class]];'#10#9'// <%%% END IF_FIELD_TYPE_COMPLEX'
+  +' %%%>'#10#9'// <%%% START IF_FIELD_TYPE_SIMPLE %%%>'#10#9'[aMessage read%FI'
+  +'ELD_READER_WRITER%:&%FIELD_NAME% withName:@"%FIELD_NAME%"];'#10#9'// <%%% E'
+  +'ND IF_FIELD_TYPE_SIMPLE %%%>'#10#9'// <%%% END ENTIRE_HIERARCHY_FIELDS %%%>'
+  +#10#9'// <%%% START ENTIRE_HIERARCHY_FIELDS %%%>'#10#9'// <%%% START IF_FIEL'
+  +'D_TYPE_COMPLEX %%%>'#10#9'[%FIELD_NAME% retain];'#10#9'// <%%% END IF_FIELD'
+  +'_TYPE_COMPLEX %%%>'#10#9'// <%%% END ENTIRE_HIERARCHY_FIELDS %%%>'#10'}'#10
+  +'// <%%% END IF_HAS_FIELDS %%%>'#10#10'@end'#10'// <%%% END STRUCTS %%%>'#10
+  +#10'#pragma mark arrays'#10#10'// <%%% START ARRAYS %%%>'#10'@implementation'
+  +' %ARRAY_NAME% '#10#10'// <%%% START IF_ARRAY_TYPE_COMPLEX %%%>'#10'- (%ARRA'
+  +'Y_TYPE%) add'#10'{'#10#9'%ARRAY_TYPE% __new = [[%ARRAY_TYPE_NAME% alloc] in'
+  +'it];'#10#9'[super addItem:__new];'#10#9'[__new release];'#10#9'return __new'
+  +';'#10'}'#10'// <%%% END IF_ARRAY_TYPE_COMPLEX %%%>'#10#10'- (void)addItem:('
+  +'%ARRAY_TYPE%)object'#10'{'#10#9'// <%%% START IF_ARRAY_TYPE_COMPLEX %%%>'#10
+  +#9'[super addItem:object];'#10#9'// <%%% END IF_ARRAY_TYPE_COMPLEX %%%>'#10#9
+  +'// <%%% START IF_ARRAY_TYPE_SIMPLE %%%>'#10#9'[super addItem:[NSNumber numb'
+  +'erWithLongLong:object]];'#10#9'// <%%% END IF_ARRAY_TYPE_SIMPLE %%%>'#10'}'
+  +#10#10'- (void)insertItem:(%ARRAY_TYPE%)object atIndex:(NSUInteger)index'#10
+  +'{'#10#9'// <%%% START IF_ARRAY_TYPE_COMPLEX %%%>'#10#9'[super insertItem:ob'
+  +'ject atIndex:index];'#10#9'// <%%% END IF_ARRAY_TYPE_COMPLEX %%%>'#10#9'// '
+  +'<%%% START IF_ARRAY_TYPE_SIMPLE %%%>'#10#9'[super insertItem:[NSNumber numb'
+  +'erWithLongLong:object] atIndex:index];'#10#9'// <%%% END IF_ARRAY_TYPE_SIMP'
+  +'LE %%%>'#10'}'#10#10'- (void)replaceItemAtIndex:(NSUInteger)index withObjec'
+  +'t:(%ARRAY_TYPE%)object'#10'{'#10#9'// <%%% START IF_ARRAY_TYPE_COMPLEX %%%>'
+  +#10#9'[super replaceItemAtIndex:index withObject:object];'#10#9'// <%%% END '
+  +'IF_ARRAY_TYPE_COMPLEX %%%>'#10#9'// <%%% START IF_ARRAY_TYPE_SIMPLE %%%>'#10
+  +#9'[super replaceItemAtIndex:index withObject:[NSNumber numberWithLongLong:o'
+  +'bject]];'#10#9'// <%%% END IF_ARRAY_TYPE_SIMPLE %%%>'#10'}'#10#10'- (%ARRAY'
+  +'_TYPE%)itemAtIndex:(NSUInteger)index;'#10'{'#10#9'// <%%% START IF_ARRAY_TY'
+  +'PE_COMPLEX %%%>'#10#9'return (%ARRAY_TYPE%)[super itemAtIndex:index];'#10#9
+  +'// <%%% END IF_ARRAY_TYPE_COMPLEX %%%>'#10#9'// <%%% START IF_ARRAY_TYPE_SI'
+  +'MPLE %%%>'#10#9'return [(NSNumber *)[super itemAtIndex:index] longLongValue'
+  +'];'#10#9'// <%%% END IF_ARRAY_TYPE_SIMPLE %%%>'#10'}'#10#10'// <%%% START I'
+  +'F_ARRAY_TYPE_COMPLEX %%%>'#10'- (Class) itemClass'#10'{'#10#9'return [%ARRA'
+  ,'Y_TYPE_NAME% class];'#10'}'#10'// <%%% END IF_ARRAY_TYPE_COMPLEX %%%>'#10#10
+  +'- (void)writeItemToMessage:(ROMessage *)aMessage fromIndex:(int)i'#10'{'#10
+  +#9'[aMessage write%ARRAY_TYPE_READER_WRITER%:[self itemAtIndex:i] withName:n'
+  +'il];'#10'}'#10#10'- (void)readItemFromMessage:(ROMessage *)aMessage toIndex'
+  +':(int)i'#10'{'#10#9'%ARRAY_TYPE% __item;'#10#9'// <%%% START IF_ARRAY_TYPE_'
+  +'COMPLEX %%%>'#10#9'[aMessage read%ARRAY_TYPE_READER_WRITER%:&__item withNam'
+  +'e:nil asClass:[self itemClass]];'#10#9'// <%%% END IF_ARRAY_TYPE_COMPLEX %%'
+  +'%>'#10#9'// <%%% START IF_ARRAY_TYPE_SIMPLE %%%>'#10#9'[aMessage read%ARRAY'
+  +'_TYPE_READER_WRITER%:&__item withName:nil];'#10#9'// <%%% END IF_ARRAY_TYPE'
+  +'_SIMPLE %%%>'#10#9'////[self replaceItemAtIndex:i withObject:__item];'#10#9
+  +'[self addItem:__item]; // assumes this is called in ascending order'#10'}'
+  +#10#10'@end;'#10#10'// <%%% END ARRAYS %%%>'#10#10'#pragma mark exceptions'
+  +#10#10'// <%%% START EXCEPTIONS %%%>'#10'// <%%% START DOCUMENTATION %%%>'#10
+  +#10'/* Description:'#10'    %CONTENT% */'#10'// <%%% END DOCUMENTATION %%%>'
+  +#10'@implementation %EXCEPTION_NAME% '#10' '#10'// <%%% START FIELDS_NO_STRI'
+  +'P %%%>'#10'@synthesize %FIELD_NAME%;'#10'// <%%% END FIELDS_NO_STRIP %%%>'
+  +#10#10'-(id) initWithMessage:(NSString *) anExceptionMessage'#10'           '
+  +'        // <%%% START ANCESTOR_FIELDS %%%>'#10'                   : (%FIELD'
+  +'_TYPE%) a%FIELD_NAME% '#10'                   // <%%% END ANCESTOR_FIELDS %'
+  +'%%>'#10'                   // <%%% START FIELDS_NO_STRIP %%%>'#10'         '
+  +'          : (%FIELD_TYPE%) a%FIELD_NAME% '#10'                   // <%%% EN'
+  +'D FIELDS_NO_STRIP %%%>'#10'{'#10#9'self = [super initWithMessage:anExceptio'
+  +'nMessage'#10#9#9'// <%%% START ANCESTOR_FIELDS %%%>'#10#9#9':a%FIELD_NAME% '
+  +#10#9#9'// <%%% END ANCESTOR_FIELDS %%%>'#10#9'];'#10#9'// <%%% START IF_HAS'
+  +'_FIELDS %%%>'#10#9'if (self)'#10#9'{'#10#9#9'// <%%% START FIELDS_NO_STRIP '
+  +'%%%>'#10#9#9'%FIELD_NAME% = a%FIELD_NAME%;'#10#9#9'// <%%% END FIELDS_NO_ST'
+  +'RIP %%%>'#10#9#9'// <%%% START FIELDS_NO_STRIP %%%>'#10#9#9'// <%%% START I'
+  +'F_FIELD_TYPE_COMPLEX %%%>'#10#9#9'[%FIELD_NAME% retain];'#10#9#9'// <%%% EN'
+  +'D IF_FIELD_TYPE_COMPLEX %%%>'#10#9#9'// <%%% END FIELDS_NO_STRIP %%%>'#10#9
+  +'}'#10#9'// <%%% END IF_HAS_FIELDS %%%>'#10#9'return self;'#10'}'#10#10'// <'
+  +'%%% START IF_HAS_FIELDS %%%>'#10'-(void) dealloc'#10'{'#10#9'// <%%% START '
+  +'FIELDS_NO_STRIP %%%>'#10#9'// <%%% START IF_FIELD_TYPE_COMPLEX %%%>'#10#9'['
+  +'%FIELD_NAME% release];'#10#9'// <%%% END IF_FIELD_TYPE_COMPLEX %%%>'#10#9'/'
+  +'/ <%%% START IF_FIELD_TYPE_COMPLEX %%%>'#10#9'%FIELD_NAME% = nil;'#10#9'// '
+  +'<%%% END IF_FIELD_TYPE_COMPLEX %%%>'#10#9'// <%%% END FIELDS_NO_STRIP %%%>'
+  +#10#9'[super dealloc];'#10'}'#10#10'-(void)writeToMessage:(ROMessage *) aMes'
+  +'sage withName:(NSString *) aName'#10'{'#10#9'// <%%% START ENTIRE_HIERARCHY'
+  +'_FIELDS %%%>'#10#9'[aMessage write%FIELD_READER_WRITER%:%FIELD_NAME% withNa'
+  +'me:@"%FIELD_NAME%"];'#10#9'// <%%% END ENTIRE_HIERARCHY_FIELDS %%%>'#10'}'
+  +#10'-(void)readFromMessage:(ROMessage *) aMessage withName:(NSString *) aNam'
+  +'e'#10'{'#10#9'// <%%% START ENTIRE_HIERARCHY_FIELDS %%%>'#10#9'// <%%% STAR'
+  +'T IF_FIELD_TYPE_COMPLEX %%%>'#10#9'[aMessage read%FIELD_READER_WRITER%:&%FI'
+  +'ELD_NAME% withName:@"%FIELD_NAME%" asClass:[%FIELD_TYPE_NAME% class]];'#10#9
+  +'// <%%% END IF_FIELD_TYPE_COMPLEX %%%>'#10#9'// <%%% START IF_FIELD_TYPE_SI'
+  +'MPLE %%%>'#10#9'[aMessage read%FIELD_READER_WRITER%:&%FIELD_NAME% withName:'
+  +'@"%FIELD_NAME%"];'#10#9'// <%%% END IF_FIELD_TYPE_SIMPLE %%%>'#10#9'// <%%%'
+  +' END ENTIRE_HIERARCHY_FIELDS %%%>'#10#9'// <%%% START ENTIRE_HIERARCHY_FIEL'
+  +'DS %%%>'#10#9'// <%%% START IF_FIELD_TYPE_COMPLEX %%%>'#10#9'[%FIELD_NAME% '
+  +'retain];'#10#9'// <%%% END IF_FIELD_TYPE_COMPLEX %%%>'#10#9'// <%%% END ENT'
+  +'IRE_HIERARCHY_FIELDS %%%>'#10'}'#10'// <%%% END IF_HAS_FIELDS %%%>'#10'@end'
+  +#10#10'// <%%% END EXCEPTIONS %%%>'#10#10'#pragma mark service proxies'#10#10
+  +'// <%%% START SERVICES %%%>'#10'@implementation %SERVICE_NAME%_Proxy '#10#10
+  +'-(id) initWithMessage:(ROMessage*) aMessage channel:(ROClientChannel*) aCha'
+  +'nnel'#10'{'#10#9'self = [super initWithMessage: aMessage channel: aChannel]'
+  +';'#10#9'return self;'#10'}'#10#10'-(void) dealloc'#10'{'#10#9'[super deallo'
+  +'c];'#10'}'#10#10'-(NSString*) __getInterfaceName'#10'{'#10#9'return @"%SERV'
+  +'ICE_NAME%";'#10'}'#10#10'// <%%% START OPERATIONS %%%>'#10'- (%OPERATION_RE'
+  +'SULT_TYPE%) %OPERATION_NAME%'#10#9'// <%%% START PARAMS %%%>'#10#9':(%PARAM'
+  +'_TYPE%%PARAM_BACK_MODIFIER%) %PARAM_NAME%  '#10#9'// <%%% END PARAMS %%%>'
+  +#10'{'#10#9'// <%%% START IF_OPERATION_HAS_RESULT %%%>'#10#9'%OPERATION_RESU'
+  +'LT_TYPE% __result;'#10#9'// <%%% END IF_OPERATION_HAS_RESULT %%%>'#10#10#9
+  +'[[self __message] initializeAsRequestMessage:[self __clientChannel] library'
+  +'Name:@"%LIBRARY_NAME%" interfaceName:[self __getActiveInterfaceName] messag'
+  +'eName:@"%OPERATION_NAME%"];'#10#9'@try'#10#9'{'#10#9#9'// <%%% START IN_PAR'
+  ,'AMS_NO_STRIP %%%>    '#10#9#9'[[self __message] write%PARAM_READER_WRITER%:'
+  +'%PARAM_NAME% withName:@"%PARAM_NAME%"];'#10#9#9'// <%%% END IN_PARAMS_NO_ST'
+  +'RIP %%%>'#10#9#9'[[self __message] finalizeMessage];'#10#9#9#10#9#9'[[self '
+  +'__clientChannel] dispatch:[self __message]];'#10#10#9#9'// <%%% START IF_RE'
+  +'SULT_COMPLEX %%%>'#10#9#9'[[self __message] read%OPERATION_RESULT_READER_WR'
+  +'ITER%:&__result withName:@"%OPERATION_RESULT_NAME%" asClass:[%OPERATION_RES'
+  +'ULT_TYPE_NAME% class]];'#10#9#9'// <%%% END IF_RESULT_COMPLEX %%%>'#10#9#9
+  +'// <%%% START IF_RESULT_SIMPLE %%%>'#10#9#9'[[self __message] read%OPERATIO'
+  +'N_RESULT_READER_WRITER%:&__result withName:@"%OPERATION_RESULT_NAME%"];'#10
+  +#9#9'// <%%% END IF_RESULT_SIMPLE %%%>'#10#9#9'// <%%% START OUT_PARAMS_NO_S'
+  +'TRIP %%%>   '#10#9#9'// <%%% START IF_PARAM_TYPE_COMPLEX %%%>'#10#9#9'[[sel'
+  +'f __message] read%PARAM_READER_WRITER%:%PARAM_NAME% withName:@"%PARAM_NAME%'
+  +'" asClass:[%PARAM_TYPE_NAME% class]];'#10#9#9'// <%%% END IF_PARAM_TYPE_COM'
+  +'PLEX %%%>'#10#9#9'// <%%% START IF_PARAM_TYPE_SIMPLE %%%>'#10#9#9'[[self __'
+  +'message] read%PARAM_READER_WRITER%:%PARAM_NAME% withName:@"%PARAM_NAME%"];'
+  +#10#9#9'// <%%% END IF_PARAM_TYPE_SIMPLE %%%>'#10#9#9'// <%%% END OUT_PARAMS'
+  +'_NO_STRIP %%%>'#10#9'}'#10#9'@finally'#10#9'{'#10#9#9'[[self __message] cle'
+  +'ar];'#10#9'}'#10#10#9'// <%%% START IF_OPERATION_HAS_RESULT %%%>'#10#9'retu'
+  +'rn __result;'#10#9'// <%%% END IF_OPERATION_HAS_RESULT %%%>'#10'}'#10#10'//'
+  +' <%%% END OPERATIONS %%%>'#10'  '#10'@end'#10#10'// <%%% END SERVICES %%%>'
+  +#10#10'void Initialize%LIBRARY_NAME%()'#10'{'#10#9'// <%%% START STRUCTS %%%'
+  +'>'#10#9'[[ROTypeManager typeManager] addType:[%STRUCT_NAME% class] classNam'
+  +'e:@"%STRUCT_NAME%"];'#10#9'// <%%% END STRUCTS %%%>'#10'}'
+]);
+LazarusResources.Add('TEMPLATE_OBJC_INTF_H','RCDATA',[
+  '//----------------------------------------------------------------------'#10
+  +'// This file was automatically generated by the RemObjects SDK from a '#10
+  +'// RODL file associated with this project.                         '#10'// '
+  +'                                                                          '
+  +#10'// Do not modify this file manually, or your changes will be lost when '
+  +#10'// it is regenerated the next time you update your RODL.               '
+  +#10'//----------------------------------------------------------------------'
+  +#10#10'#ifndef %UNIT_NAME%_H'#10'#define %UNIT_NAME%_H'#10#10'#import <RemOb'
+  +'jectsSDK/RemObjectsSDK.h>'#10'// <%%% START REQUIRED_UNITS %%%>'#10'#import'
+  +' <%REQUIRED_UNIT_NAME%.h>'#10'// <%%% END REQUIRED_UNITS %%%>'#10#10'#pragm'
+  +'a mark defines'#10#10'// Library ID'#10'////#define LibraryID "%LIBRARY_UID'
+  +'%"'#10'////#define TargetNamespace "%NAMESPACE_NAME%"'#10#10'// Service Int'
+  +'erface ID''s'#10'// <%%% START SERVICES %%%>'#10'#define  I%SERVICE_NAME%_I'
+  +'ID "%SERVICE_UID%"'#10'////const GUID I%SERVICE_NAME%_IID = ROStringToGUID('
+  +'"%SERVICE_UID%");'#10'// <%%% END SERVICES %%%>'#10#10'// Event ID''s'#10'/'
+  +'/ <%%% START EVENT_SINKS %%%>'#10'#define EID_%EVENT_SINK_NAME% "%EVENT_SIN'
+  +'K_NAME%"'#10'const GUID I%EVENT_SINK_NAME%_IID = ROStringToGUID("%EVENT_SIN'
+  +'K_UID%");'#10'// <%%% END EVENT_SINKS %%%>'#10#10'// Type Registration'#10
+  +'void Initialize%LIBRARY_NAME%();'#10#10'// Forward declarations'#10'// <%%%'
+  +' START SERVICES %%%>'#10'@protocol I%SERVICE_NAME%; '#10'// <%%% END SERVIC'
+  +'ES %%%>'#10'// <%%% START ARRAYS %%%>'#10'@class %ARRAY_NAME%;'#10'// <%%% '
+  +'END ARRAYS %%%>'#10'// <%%% START STRUCTS %%%>'#10'@class %STRUCT_NAME%;'#10
+  +'// <%%% END STRUCTS %%%>'#10'// <%%% START EXCEPTIONS %%%>'#10'@class %EXCE'
+  +'PTION_NAME%;'#10'// <%%% END EXCEPTIONS %%%>'#10'// <%%% START EVENT_SINKS '
+  +'%%%>'#10'@protocol I%EVENT_SINK_NAME%;'#10'// <%%% END EVENT_SINKS %%%>'#10
+  +#10'// <%%% START ENUMS %%%>'#10'enum %ENUM_NAME% '#10'{'#10#9'// <%%% START'
+  +' VALUES %%%>'#10#9'%VALUE_NAME%,                '#10#9'// <%%% END VALUES %'
+  +'%%>                '#10'};'#10#10'NSString *%ENUM_NAME%ToString(enum %ENUM_'
+  +'NAME% value);'#10#10'// <%%% END ENUMS %%%>'#10#10'#pragma mark structs'#10
+  +#10'// <%%% START STRUCTS %%%>'#10'@interface %STRUCT_NAME% : %STRUCT_ANCEST'
+  +'OR_NAME% {  '#10#9'// <%%% START FIELDS_NO_STRIP %%%>'#10#9'%FIELD_TYPE% %F'
+  +'IELD_NAME%;'#10#9'// <%%% END FIELDS_NO_STRIP %%%>'#10'}'#10#10#9'// <%%% S'
+  +'TART FIELDS_NO_STRIP %%%>'#10#9'// <%%% START IF_FIELD_TYPE_COMPLEX %%%>'#10
+  +#9'@property (retain) %FIELD_TYPE% %FIELD_NAME%;'#10#9'// <%%% END IF_FIELD_'
+  +'TYPE_COMPLEX %%%>'#10#9'// <%%% START IF_FIELD_TYPE_SIMPLE %%%>'#10#9'@prop'
+  +'erty (assign) %FIELD_TYPE% %FIELD_NAME%;'#10#9'// <%%% END IF_FIELD_TYPE_SI'
+  +'MPLE %%%>'#10#9'// <%%% END FIELDS_NO_STRIP %%%>'#10#10#9'// <%%% START IF_'
+  +'HAS_FIELDS %%%>'#10#9'-(id) init;'#10#9'-(void) dealloc;'#10#9'// <%%% END '
+  +'IF_HAS_FIELDS %%%>'#10#10#9'-(void) assignFrom:(ROComplexType*) aSource;'#10
+  +#9'// <%%% START IF_HAS_FIELDS %%%>'#10#9'-(void)writeToMessage:(ROMessage *'
+  +') aMessage withName:(NSString *) aName;'#10#9'-(void)readFromMessage:(ROMes'
+  +'sage *) aMessage withName:(NSString *) aName;'#10#9'// <%%% END IF_HAS_FIEL'
+  +'DS %%%>'#10#10'@end'#10'// <%%% END STRUCTS %%%>'#10#10'#pragma mark arrays'
+  +#10#10'// <%%% START ARRAYS %%%>'#10'@interface %ARRAY_NAME% : ROArray {'#10
+  +'  }'#10'// <%%% START IF_ARRAY_TYPE_COMPLEX %%%>'#10'- (%ARRAY_TYPE%) add;'
+  +#10'// <%%% END IF_ARRAY_TYPE_COMPLEX %%%>'#10'- (void)addItem:(%ARRAY_TYPE%'
+  +')object;'#10'- (void)insertItem:(%ARRAY_TYPE%)object atIndex:(NSUInteger)in'
+  +'dex;'#10'- (void)replaceItemAtIndex:(NSUInteger)index withObject:(%ARRAY_TY'
+  +'PE%)object;'#10'- (%ARRAY_TYPE%)itemAtIndex:(NSUInteger)index;'#10#10'- (vo'
+  +'id)writeItemToMessage:(ROMessage *)aMessage fromIndex:(int)i;'#10'- (void)r'
+  +'eadItemFromMessage:(ROMessage *)aMessage toIndex:(int)i;'#10'@end;'#10#10'/'
+  +'/ <%%% END ARRAYS %%%>'#10'#pragma mark exceptions'#10#10'// <%%% START EXC'
+  +'EPTIONS %%%>'#10'// <%%% START DOCUMENTATION %%%>'#10#10'/* Description:'#10
+  +'    %CONTENT% */'#10'// <%%% END DOCUMENTATION %%%>'#10'@interface %EXCEPTI'
+  +'ON_NAME% : %EXCEPTION_ANCESTOR_NAME% {  '#10#9'// <%%% START FIELDS_NO_STRI'
+  +'P %%%>'#10#9'%FIELD_TYPE% %FIELD_NAME%;'#10#9'// <%%% END FIELDS_NO_STRIP %'
+  +'%%>'#10'}'#10'  '#10'// <%%% START FIELDS_NO_STRIP %%%>'#10'// <%%% START I'
+  +'F_FIELD_TYPE_COMPLEX %%%>'#10'@property (retain) %FIELD_TYPE% %FIELD_NAME%;'
+  +#10'// <%%% END IF_FIELD_TYPE_COMPLEX %%%>'#10'// <%%% START IF_FIELD_TYPE_S'
+  +'IMPLE %%%>'#10'@property (assign) %FIELD_TYPE% %FIELD_NAME%;'#10'// <%%% EN'
+  +'D IF_FIELD_TYPE_SIMPLE %%%>'#10'// <%%% END FIELDS_NO_STRIP %%%>'#10'  '#10
+  +'-(id) initWithMessage:(NSString *) anExceptionMessage'#10'                 '
+  +'  // <%%% START ANCESTOR_FIELDS %%%>'#10'                   : (%FIELD_TYPE%'
+  +') a%FIELD_NAME% '#10'                   // <%%% END ANCESTOR_FIELDS %%%>'#10
+  ,'                   // <%%% START FIELDS_NO_STRIP %%%>'#10'                 '
+  +'  : (%FIELD_TYPE%) a%FIELD_NAME% '#10'                   // <%%% END FIELDS'
+  +'_NO_STRIP %%%>'#10'                   ;'#10'// <%%% START IF_HAS_FIELDS %%%'
+  +'>'#10'-(void)writeToMessage:(ROMessage *) aMessage withName:(NSString *) aN'
+  +'ame;'#10'-(void)readFromMessage:(ROMessage *) aMessage withName:(NSString *'
+  +') aName;'#10'// <%%% END IF_HAS_FIELDS %%%>'#10'-(void) dealloc;'#10'@end'
+  +#10#10'// <%%% END EXCEPTIONS %%%>'#10#10'#pragma mark service protocols'#10
+  +#10'// <%%% START SERVICES %%%>'#10'@protocol I%SERVICE_NAME%'#10'  // <%%% '
+  +'START FUNCTION_OPERATIONS %%%>'#10'  - (%OPERATION_RESULT_TYPE%) %OPERATION'
+  +'_NAME%'#10'    // <%%% START PARAMS %%%>'#10'    :(%PARAM_TYPE%%PARAM_BACK_'
+  +'MODIFIER%) %PARAM_NAME%'#10'    // <%%% END PARAMS %%%>'#10'    ;'#10'  // '
+  +'<%%% END FUNCTION_OPERATIONS %%%>'#10'  // <%%% START PROCEDURE_OPERATIONS '
+  +'%%%>'#10'  - (void) %OPERATION_NAME%'#10'    // <%%% START PARAMS %%%>'#10
+  +'    :(%PARAM_TYPE%%PARAM_BACK_MODIFIER%) %PARAM_NAME%  '#10'    // <%%% END'
+  +' PARAMS %%%>'#10'    ;'#10#9'// <%%% END PROCEDURE_OPERATIONS %%%>'#10'@end'
+  +#10#10'#pragma mark service proxies'#10#10'@interface %SERVICE_NAME%_Proxy :'
+  +' %SERVICE_PROXY_ANCESTOR_NAME% <I%SERVICE_NAME%> '#10'{'#10'}'#10'  -(id) i'
+  +'nitWithMessage:(ROMessage*) aMessage channel:(ROClientChannel*) aChannel;'
+  +#10'  -(void) dealloc;'#10'  -(NSString*) __getInterfaceName;'#10#10'  // <%'
+  +'%% START FUNCTION_OPERATIONS %%%>'#10'  - (%OPERATION_RESULT_TYPE%) %OPERAT'
+  +'ION_NAME%'#10'    // <%%% START PARAMS %%%>'#10'    :(%PARAM_TYPE%%PARAM_BA'
+  +'CK_MODIFIER%) %PARAM_NAME%'#10'    // <%%% END PARAMS %%%>'#10'    ;'#10'  '
+  +'// <%%% END FUNCTION_OPERATIONS %%%>'#10'  // <%%% START PROCEDURE_OPERATIO'
+  +'NS %%%>'#10'  - (void) %OPERATION_NAME%'#10'    // <%%% START PARAMS %%%>'
+  +#10'    :(%PARAM_TYPE%%PARAM_BACK_MODIFIER%) %PARAM_NAME%  '#10'    // <%%% '
+  +'END PARAMS %%%>'#10'    ;'#10#9'// <%%% END PROCEDURE_OPERATIONS %%%>'#10' '
+  +' '#10'@end'#10#10'// <%%% END SERVICES %%%>'#10#10'#pragma mark event sinks'
+  +#10#10'// <%%% START EVENT_SINKS %%%>'#10'/* I%EVENT_SINK_NAME% */'#10'// <%'
+  +'%% START DOCUMENTATION %%%>'#10#10'/* Description:'#10'    %CONTENT% */'#10
+  +'// <%%% END DOCUMENTATION %%%>'#10'__interface I%EVENT_SINK_NAME%;'#10'type'
+  +'def System::DelphiInterface<I%EVENT_SINK_NAME%> _di_I%EVENT_SINK_NAME%;'#10
+  +'__interface INTERFACE_UUID("%EVENT_SINK_UID%") I%EVENT_SINK_NAME% : public '
+  +'%EVENT_SINK_ANCESTOR_NAME%'#10'{'#10'public:'#10'  // <%%% START OPERATIONS'
+  +' %%%>'#10'  virtual void __fastcall %OPERATION_NAME%('#10'    // <%%% START'
+  +' PARAMS %%%>'#10'    // <%%% START IF_PARAM_TYPE_SIMPLE %%%>'#10'    %PARAM'
+  +'_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,'#10'    /'
+  +'/ <%%% END IF_PARAM_TYPE_SIMPLE %%%>'#10'    // <%%% START IF_PARAM_TYPE_CO'
+  +'MPLEX %%%>'#10'    %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIE'
+  +'R% %PARAM_NAME%,'#10'    // <%%% END IF_PARAM_TYPE_COMPLEX %%%>'#10'    // '
+  +'<%%% END PARAMS %%%>'#10'    ) = 0; // pure virtual function - interface on'
+  +'ly'#10'  // <%%% END OPERATIONS %%%>'#10'};'#10#10'/* I%EVENT_SINK_NAME%_Wr'
+  +'iter */'#10'// <%%% START DOCUMENTATION %%%>'#10#10'/* Description:'#10'   '
+  +' %CONTENT% */'#10'// <%%% END DOCUMENTATION %%%>'#10'__interface I%EVENT_SI'
+  +'NK_NAME%_Writer;'#10'typedef System::DelphiInterface<I%EVENT_SINK_NAME%_Wri'
+  +'ter> _di_I%EVENT_SINK_NAME%_Writer;'#10'__interface INTERFACE_UUID("%EVENT_'
+  +'SINK_UID%") I%EVENT_SINK_NAME%_Writer : public I%EVENT_SINK_WRITER_ANCESTOR'
+  +'_NAME%'#10'{'#10'public:'#10'  // <%%% START OPERATIONS %%%>'#10'  virtual '
+  +'void __fastcall %OPERATION_NAME%(GUID __Sender '#10'    // <%%% START PARAM'
+  +'S %%%>'#10'    // <%%% START IF_PARAM_TYPE_SIMPLE %%%>'#10'    , %PARAM_FRO'
+  +'NT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%'#10'    // <%%'
+  +'% END IF_PARAM_TYPE_SIMPLE %%%>'#10'    // <%%% START IF_PARAM_TYPE_COMPLEX'
+  +' %%%>'#10'    , %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% '
+  +'%PARAM_NAME%'#10'    // <%%% END IF_PARAM_TYPE_COMPLEX %%%>'#10'    // <%%%'
+  +' END PARAMS %%%>'#10'    ) = 0; // pure virtual function - interface only'
+  +#10'  // <%%% END OPERATIONS %%%>'#10'};'#10#10'// <%%% END EVENT_SINKS %%%>'
+  +#10#10'#endif // %UNIT_NAME%_H'#10#10
+]);
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/Templates.rc b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/Templates.rc
new file mode 100644
index 0000000..07aaf03
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/Templates.rc	
@@ -0,0 +1,25 @@
+TEMPLATE_INTF_PAS          RCDATA "template.intf.pas"
+TEMPLATE_INVK_PAS          RCDATA "template.invk.pas"
+TEMPLATE_IMPL_PAS          RCDATA "template.impl.pas"
+TEMPLATE_ASYNC_PAS         RCDATA "template.async.pas"
+TEMPLATE_WRAPPER_INTF_PAS  RCDATA "template.wrapper_intf.pas"
+TEMPLATE_WRAPPER_INVK_PAS  RCDATA "template.wrapper_invk.pas"
+TEMPLATE_WRAPPER_ASYNC_PAS RCDATA "template.wrapper_async.pas"
+
+TEMPLATE_IMPL_DFM          RCDATA "template.impl.dfm"
+
+TEMPLATE_INTF_CPP          RCDATA "template.intf.cpp"
+TEMPLATE_INTF_H            RCDATA "template.intf.h"
+TEMPLATE_INVK_CPP          RCDATA "template.invk.cpp"
+TEMPLATE_INVK_H            RCDATA "template.invk.h"
+TEMPLATE_IMPL_CPP          RCDATA "template.impl.cpp"
+TEMPLATE_IMPL_H            RCDATA "template.impl.h"
+TEMPLATE_ASYNC_CPP         RCDATA "template.async.cpp"
+TEMPLATE_ASYNC_H           RCDATA "template.async.h"
+TEMPLATE_WRAPPER_INTF_H    RCDATA "template.wrapper_intf.h"
+TEMPLATE_WRAPPER_INVK_H    RCDATA "template.wrapper_invk.h"
+TEMPLATE_WRAPPER_ASYNC_H   RCDATA "template.wrapper_async.h"
+
+TEMPLATE_OBJC_INTF_M      RCDATA "template.Obj-C.intf.m"
+TEMPLATE_OBJC_INTF_H      RCDATA "template.Obj-C.intf.h"
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/Templates.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/Templates.res
new file mode 100644
index 0000000..3e29269
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/Templates.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.async.cpp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.async.cpp
new file mode 100644
index 0000000..54697e9
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.async.cpp	
@@ -0,0 +1,162 @@
+// %UNIT_NAME%
+//
+/*---------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project.                                }
+{                                                                            }
+{ Do not modify this unit manually, or your changes will be lost when this   }
+{ unit is regenerated the next time you compile the project.                 }
+{---------------------------------------------------------------------------*/
+
+// Implementation of %UNIT_NAME%
+#include "%UNIT_NAME%.h"
+
+// <%%% START SERVICES %%%>
+// <%%% START FUNCTION_OPERATIONS %%%>
+void __fastcall T%SERVICE_NAME%_AsyncProxy::Invoke_%OPERATION_NAME%(
+            // <%%% START IN_PARAMS %%%>
+            // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+            %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+            // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+            // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+            %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+            // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+            // <%%% END IN_PARAMS %%%>
+            )
+{
+  __AssertProxyNotBusy("%OPERATION_NAME%");
+
+  __Message->InitializeRequestMessage(__TransportChannel, "%LIBRARY_NAME%", __InterfaceName, "%OPERATION_NAME%");
+  // <%%% START IN_PARAMS_NO_STRIP %%%>
+  // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+  __Message->Write("%PARAM_NAME%", __Get%PARAM_TYPE%Info, &%PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));
+  // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+  __Message->Write("%PARAM_NAME%", __typeinfo(%PARAM_TYPE%), %PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));
+  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+  // <%%% END IN_PARAMS_NO_STRIP %%%>
+
+  __DispatchAsyncRequest("%OPERATION_NAME%", __Message);
+}
+
+// <%%% START IF_RESULT_SIMPLE %%%>
+%OPERATION_RESULT% __fastcall T%SERVICE_NAME%_AsyncProxy::Retrieve_%OPERATION_NAME%(
+// <%%% END IF_RESULT_SIMPLE %%%>
+// <%%% START IF_RESULT_COMPLEX %%%>
+%OPERATION_RESULT%* __fastcall T%SERVICE_NAME%_AsyncProxy::Retrieve_%OPERATION_NAME%(
+// <%%% END IF_RESULT_COMPLEX %%%>
+            // <%%% START OUT_PARAMS %%%>
+            // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+            %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+            // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+            // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+            %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+            // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+            // <%%% END OUT_PARAMS %%%>
+            )
+{
+  // <%%% START IF_RESULT_SIMPLE %%%>
+  %OPERATION_RESULT% result;
+  // <%%% END IF_RESULT_SIMPLE %%%>
+  // <%%% START IF_RESULT_COMPLEX %%%>
+  %OPERATION_RESULT%* result;
+  // <%%% END IF_RESULT_COMPLEX %%%>
+
+  // <%%% START OUT_PARAMS_NO_STRIP %%%>
+  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+  %PARAM_NAME% = NULL;
+  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+  // <%%% END OUT_PARAMS_NO_STRIP %%%>
+  // <%%% START IF_RESULT_COMPLEX %%%>
+  result = NULL;
+  // <%%% END IF_RESULT_COMPLEX %%%>
+
+  TStream* __response = __RetrieveAsyncResponse("%OPERATION_NAME%");
+  __Message->ReadFromStream(__response);
+
+  // <%%% START IF_RESULT_SIMPLE %%%>
+  __Message->Read("Result", __Get%OPERATION_RESULT%Info, &result, TParamAttributes(%OPERATION_RESULT_ATTRIBUTE%));
+  // <%%% END IF_RESULT_SIMPLE %%%>
+  // <%%% START IF_RESULT_COMPLEX %%%>
+  __Message->Read("Result", __typeinfo(%OPERATION_RESULT%), result, TParamAttributes(%OPERATION_RESULT_ATTRIBUTE%));
+  // <%%% END IF_RESULT_COMPLEX %%%>
+  // <%%% START OUT_PARAMS_NO_STRIP %%%>
+  // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+  __Message->Read("%PARAM_NAME%", __Get%PARAM_TYPE%Info, &%PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));
+  // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+  __Message->Read("%PARAM_NAME%", __typeinfo(%PARAM_TYPE%), %PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));
+  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+  // <%%% END OUT_PARAMS_NO_STRIP %%%>
+
+  delete __response;
+  return result;
+}
+
+// <%%% END FUNCTION_OPERATIONS %%%>
+// <%%% START PROCEDURE_OPERATIONS %%%>
+void _fastcall T%SERVICE_NAME%_AsyncProxy::Invoke_%OPERATION_NAME%(
+            // <%%% START IN_PARAMS %%%>
+            // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+            %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+            // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+            // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+            %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+            // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+            // <%%% END IN_PARAMS %%%>
+            )
+{
+  __AssertProxyNotBusy("%OPERATION_NAME%");
+  TStream* __request = new TMemoryStream();
+
+  __Message->InitializeRequestMessage(__TransportChannel, "%LIBRARY_NAME%", __InterfaceName, "%OPERATION_NAME%");
+  // <%%% START IN_PARAMS_NO_STRIP %%%>
+  // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+  __Message->Write("%PARAM_NAME%", __Get%PARAM_TYPE%Info, &%PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));
+  // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+  __Message->Write("%PARAM_NAME%", __typeinfo(%PARAM_TYPE%), %PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));
+  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+  // <%%% END IN_PARAMS_NO_STRIP %%%>
+  __Message->Finalize();
+
+  __Message->WriteToStream(__request);
+  __DispatchAsyncRequest("%OPERATION_NAME%", __request, False);
+}
+
+// <%%% START IF_OUT_PARAMS %%%>
+void _fastcall T%SERVICE_NAME%_AsyncProxy::Retrieve_%OPERATION_NAME%(
+            // <%%% START OUT_PARAMS %%%>
+            // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+            %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+            // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+            // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+            %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+            // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+            // <%%% END OUT_PARAMS %%%>
+            )
+{
+  // <%%% START OUT_PARAMS_NO_STRIP %%%>
+  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+  %PARAM_NAME% = NULL;
+  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+  // <%%% END OUT_PARAMS_NO_STRIP %%%>
+
+  TStream* __response = __RetrieveAsyncResponse("%OPERATION_NAME%");
+  __Message->ReadFromStream(__response);
+
+  // <%%% START OUT_PARAMS_NO_STRIP %%%>
+  // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+  __Message->Read("%PARAM_NAME%", __Get%PARAM_TYPE%Info, &%PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));
+  // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+  __Message->Read("%PARAM_NAME%", __typeinfo(%PARAM_TYPE%), %PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));
+  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+  // <%%% END OUT_PARAMS_NO_STRIP %%%>
+
+  delete __response;
+}
+
+// <%%% END IF_OUT_PARAMS %%%>
+// <%%% END PROCEDURE_OPERATIONS %%%>
+// <%%% END SERVICES %%%>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.async.h b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.async.h
new file mode 100644
index 0000000..161e698
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.async.h	
@@ -0,0 +1,223 @@
+// %UNIT_NAME%
+//
+/*---------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project.                                }
+{                                                                            }
+{ Do not modify this unit manually, or your changes will be lost when this   }
+{ unit is regenerated the next time you compile the project.                 }
+{---------------------------------------------------------------------------*/
+
+#ifndef %UNIT_NAME%H
+#define %UNIT_NAME%H
+
+#pragma delphiheader begin
+#pragma option push
+#pragma option -w-      		  // All warnings off
+#pragma option -Vx      		  // Zero-length empty class member functions
+#pragma pack(push,8)
+
+#include <System.hpp>			    // Pascal unit
+#include <Uroasync.hpp>
+// <%%% START REQUIRED_UNITS %%%>
+#include <%REQUIRED_UNIT_NAME%.hpp>
+// <%%% END REQUIRED_UNITS %%%>
+#include "%LIBRARY_NAME%_Intf.h"
+
+
+namespace %NAMESPACE_NAME%
+{
+// Forward declarations
+// <%%% START SERVICES %%%>
+__interface I%SERVICE_NAME%_Async; // = interface;
+class DELPHICLASS Co%SERVICE_NAME%_Async;
+class DELPHICLASS T%SERVICE_NAME%_AsyncProxy;
+// <%%% END SERVICES %%%>
+
+// <%%% START SERVICES %%%>
+__interface I%SERVICE_NAME%_Async;
+typedef System::DelphiInterface<I%SERVICE_NAME%_Async> _di_I%SERVICE_NAME%_Async;
+__interface INTERFACE_UUID("%SERVICE_UID%") I%SERVICE_NAME%_Async : public %SERVICE_ANCESTOR_NAME%
+{
+public:
+  // <%%% START FUNCTION_OPERATIONS %%%>
+  virtual void __fastcall Invoke_%OPERATION_NAME%(
+              // <%%% START IN_PARAMS %%%>
+              // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+              %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+              // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+              // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+              %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+              // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+              // <%%% END IN_PARAMS %%%>
+              ) = 0; // pure virtual function - interface only
+  // <%%% START IF_RESULT_SIMPLE %%%>
+  virtual %OPERATION_RESULT% __fastcall Retrieve_%OPERATION_NAME%(
+  // <%%% END IF_RESULT_SIMPLE %%%>
+  // <%%% START IF_RESULT_COMPLEX %%%>
+  virtual %OPERATION_RESULT%* __fastcall Retrieve_%OPERATION_NAME%(
+  // <%%% END IF_RESULT_COMPLEX %%%>
+              // <%%% START OUT_PARAMS %%%>
+              // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+              %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+              // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+              // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+              %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+              // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+              // <%%% END OUT_PARAMS %%%>
+              ) = 0; // pure virtual function - interface only
+  // <%%% END FUNCTION_OPERATIONS %%%>
+
+  // <%%% START PROCEDURE_OPERATIONS %%%>
+  virtual void _fastcall Invoke_%OPERATION_NAME%(
+              // <%%% START IN_PARAMS %%%>
+              // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+              %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+              // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+              // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+              %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+              // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+              // <%%% END IN_PARAMS %%%>
+              ) = 0; // pure virtual function - interface only
+  // <%%% START IF_OUT_PARAMS %%%>
+  virtual void _fastcall Retrieve_%OPERATION_NAME%(
+              // <%%% START OUT_PARAMS %%%>
+              // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+              %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+              // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+              // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+              %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+              // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+              // <%%% END OUT_PARAMS %%%>
+              ) = 0; // pure virtual function - interface only
+  // <%%% END IF_OUT_PARAMS %%%>
+  // <%%% END PROCEDURE_OPERATIONS %%%>
+};
+
+// Co%SERVICE_NAME%_Async
+class DELPHICLASS Co%SERVICE_NAME%_Async;
+class Co%SERVICE_NAME%_Async : public System::TObject
+{
+	typedef System::TObject inherited;
+
+public:
+	static _di_I%SERVICE_NAME%_Async __fastcall Create(const Uroclientintf::_di_IROMessage aMessage,
+                        Uroclientintf::_di_IROTransportChannel aTransportChannel)
+  {
+    _di_I%SERVICE_NAME%_Async result;
+    T%SERVICE_NAME%_AsyncProxy* proxy = new T%SERVICE_NAME%_AsyncProxy(aMessage, aTransportChannel);
+    if (proxy->QueryInterface(I%SERVICE_NAME%_IID, reinterpret_cast<void**>(&result)) != S_OK)
+    {
+      delete proxy;
+      throw EIntfCastError::EIntfCastError("I%SERVICE_NAME%_Async not supported");
+    }
+    return result;
+  };
+
+  static _di_I%SERVICE_NAME%_Async __fastcall Create(Uroclient::TROMessage* aMessage,
+                        Uroclient::TROTransportChannel *aTransportChannel)
+  {
+    _di_IROMessage __Message;
+    _di_IROTransportChannel __TransportChannel;
+
+    if (aMessage->GetInterface(__Message))
+    {
+      if (aTransportChannel->GetInterface(__TransportChannel))
+        return Create(__Message, __TransportChannel);
+      else
+        throw EIntfCastError::EIntfCastError("IROTransportChannel not supported");
+    }
+    else
+    {
+      throw EIntfCastError::EIntfCastError("IROMessage not supported");
+    }
+  };
+};
+
+class DELPHICLASS T%SERVICE_NAME%_AsyncProxy;
+class T%SERVICE_NAME%_AsyncProxy : public %SERVICE_PROXY_ANCESTOR_NAME%, I%SERVICE_NAME%_Async
+{
+	typedef %SERVICE_PROXY_ANCESTOR_NAME% inherited;
+	
+protected:
+	virtual AnsiString __fastcall __GetInterfaceName()
+    { return "%SERVICE_NAME%"; }
+
+  // <%%% START FUNCTION_OPERATIONS %%%>
+  virtual void __fastcall Invoke_%OPERATION_NAME%(
+              // <%%% START IN_PARAMS %%%>
+              // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+              %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+              // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+              // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+              %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+              // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+              // <%%% END IN_PARAMS %%%>
+              );
+  // <%%% START IF_RESULT_SIMPLE %%%>
+  virtual %OPERATION_RESULT% __fastcall Retrieve_%OPERATION_NAME%(
+  // <%%% END IF_RESULT_SIMPLE %%%>
+  // <%%% START IF_RESULT_COMPLEX %%%>
+  virtual %OPERATION_RESULT%* __fastcall Retrieve_%OPERATION_NAME%(
+  // <%%% END IF_RESULT_COMPLEX %%%>
+              // <%%% START OUT_PARAMS %%%>
+              // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+              %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+              // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+              // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+              %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+              // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+              // <%%% END OUT_PARAMS %%%>
+              );
+  // <%%% END FUNCTION_OPERATIONS %%%>
+
+  // <%%% START PROCEDURE_OPERATIONS %%%>
+  virtual void _fastcall Invoke_%OPERATION_NAME%(
+              // <%%% START IN_PARAMS %%%>
+              // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+              %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+              // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+              // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+              %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+              // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+              // <%%% END IN_PARAMS %%%>
+              );
+  // <%%% START IF_OUT_PARAMS %%%>
+  virtual void _fastcall Retrieve_%OPERATION_NAME%(
+              // <%%% START OUT_PARAMS %%%>
+              // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+              %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+              // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+              // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+              %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+              // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+              // <%%% END OUT_PARAMS %%%>
+              );
+  // <%%% END IF_OUT_PARAMS %%%>
+  // <%%% END PROCEDURE_OPERATIONS %%%>
+public:
+	#pragma option push -w-inl
+	/* TROProxy.Create */ inline __fastcall virtual T%SERVICE_NAME%_AsyncProxy(const Uroclientintf::_di_IROMessage aMessage, const Uroclientintf::_di_IROTransportChannel aTransportChannel)/* overload */ :
+    %SERVICE_PROXY_ANCESTOR_NAME%(aMessage, aTransportChannel) {}
+	#pragma option pop
+	
+  virtual HRESULT __stdcall QueryInterface(const GUID& IID, void **Obj) {
+    return inherited::QueryInterface(IID, (void *)Obj); }
+
+  virtual ULONG __stdcall AddRef() {
+    return inherited::_AddRef();  }
+
+  virtual ULONG __stdcall Release() {
+    return inherited::_Release(); }
+};
+// <%%% END SERVICES %%%>
+
+}	// namespace %NAMESPACE_NAME%
+
+using namespace %NAMESPACE_NAME%;
+#pragma pack(pop)
+#pragma option pop
+
+#pragma delphiheader end.
+#endif	// %UNIT_NAME%H
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.async.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.async.pas
new file mode 100644
index 0000000..8095006
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.async.pas	
@@ -0,0 +1,228 @@
+unit %UNIT_NAME%;
+
+{----------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project .                               }
+{                                                                            }
+{ Do not modify this unit manually, or your changes will be lost when this   }
+{ unit is regenerated the next time you compile the project.                 }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  {vcl:} Classes, TypInfo,
+  {RemObjects:} uROXMLIntf, uROClasses, uROClient, uROTypes, uROClientIntf, uROAsync
+  // <%%% START REQUIRED_UNITS %%%>
+  {Required:} %REQUIRED_UNIT_NAME%,
+  // <%%% END REQUIRED_UNITS %%%>
+  {Generated:} %LIBRARY_NAME%_Intf;
+
+type
+  { Forward declarations }
+  // <%%% START SERVICES %%%>
+  I%SERVICE_NAME%_Async = interface;
+  Co%SERVICE_NAME%_Async = class;
+  T%SERVICE_NAME%_AsyncProxy = class;
+  // <%%% END SERVICES %%%>
+
+  // <%%% START SERVICES %%%>
+  { I%SERVICE_NAME%_Async }
+  // <%%% START DOCUMENTATION %%%>
+
+  { Description:
+      %CONTENT% }
+  // <%%% END DOCUMENTATION %%%>
+  I%SERVICE_NAME%_Async = interface%SERVICE_ANCESTOR_NAME%
+    ['%ASYNC_SERVICE_UID%']
+    // <%%% START FUNCTION_OPERATIONS %%%>
+    procedure Invoke_%OPERATION_NAME%(
+               // <%%% START IN_PARAMS %%%>
+               %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;
+               // <%%% END IN_PARAMS %%%>
+               );
+    function Retrieve_%OPERATION_NAME%(
+               // <%%% START OUT_PARAMS %%%>
+               %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;
+               // <%%% END OUT_PARAMS %%%>
+               ): %OPERATION_RESULT%;
+    // <%%% END FUNCTION_OPERATIONS %%%>
+    // <%%% START PROCEDURE_OPERATIONS %%%>
+    procedure Invoke_%OPERATION_NAME%(
+                // <%%% START IN_PARAMS %%%>
+                %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;
+                // <%%% END IN_PARAMS %%%>
+                );
+    // <%%% START IF_OUT_PARAMS %%%>
+    procedure Retrieve_%OPERATION_NAME%(
+               // <%%% START OUT_PARAMS %%%>
+               %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;
+               // <%%% END OUT_PARAMS %%%>
+               );
+    // <%%% END IF_OUT_PARAMS %%%>
+    // <%%% END PROCEDURE_OPERATIONS %%%>
+  end;
+
+  { Co%SERVICE_NAME%_Async }
+  Co%SERVICE_NAME%_Async = class
+    class function Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): I%SERVICE_NAME%_Async;
+  end;
+
+  { T%SERVICE_NAME%_Proxy }
+  T%SERVICE_NAME%_AsyncProxy = class(%SERVICE_PROXY_ANCESTOR_NAME%, I%SERVICE_NAME%_Async)
+  protected
+    function __GetInterfaceName:string; override;
+
+    // <%%% START FUNCTION_OPERATIONS %%%>
+    procedure Invoke_%OPERATION_NAME%(
+               // <%%% START IN_PARAMS %%%>
+               %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;
+               // <%%% END IN_PARAMS %%%>
+               );
+    function Retrieve_%OPERATION_NAME%(
+               // <%%% START OUT_PARAMS %%%>
+               %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;
+               // <%%% END OUT_PARAMS %%%>
+               ): %OPERATION_RESULT%;
+    // <%%% END FUNCTION_OPERATIONS %%%>
+    // <%%% START PROCEDURE_OPERATIONS %%%>
+    procedure Invoke_%OPERATION_NAME%(
+                // <%%% START IN_PARAMS %%%>
+                %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;
+                // <%%% END IN_PARAMS %%%>
+                );
+    // <%%% START IF_OUT_PARAMS %%%>
+    procedure Retrieve_%OPERATION_NAME%(
+               // <%%% START OUT_PARAMS %%%>
+               %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;
+               // <%%% END OUT_PARAMS %%%>
+               );
+    // <%%% END IF_OUT_PARAMS %%%>
+    // <%%% END PROCEDURE_OPERATIONS %%%>
+  end;
+
+  // <%%% END SERVICES %%%>
+implementation
+
+uses
+  {vcl:} SysUtils,
+  {RemObjects:} uROEventRepository, uRORes;
+
+// <%%% START SERVICES %%%>
+{ Co%SERVICE_NAME%_Async }
+
+class function Co%SERVICE_NAME%_Async.Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): I%SERVICE_NAME%_Async;
+begin
+  result := T%SERVICE_NAME%_AsyncProxy.Create(aMessage, aTransportChannel);
+end;
+
+{ T%SERVICE_NAME%_AsyncProxy }
+
+function T%SERVICE_NAME%_AsyncProxy.__GetInterfaceName:string;
+begin
+  result := '%SERVICE_NAME%';
+end;
+
+// <%%% START FUNCTION_OPERATIONS %%%>
+procedure T%SERVICE_NAME%_AsyncProxy.Invoke_%OPERATION_NAME%(
+           // <%%% START IN_PARAMS %%%>
+           %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;
+           // <%%% END IN_PARAMS %%%>
+           );
+begin
+  __AssertProxyNotBusy('%OPERATION_NAME%');
+
+  __Message.InitializeRequestMessage(__TransportChannel, '%LIBRARY_NAME%', __InterfaceName, '%OPERATION_NAME%');
+  // <%%% START IN_PARAMS_NO_STRIP %%%>
+  __Message.Write('%PARAM_NAME%', TypeInfo(%PARAM_TYPE%), %PARAM_NAME%, [%PARAM_ATTRIBUTE%]);
+  // <%%% END IN_PARAMS_NO_STRIP %%%>
+
+  __DispatchAsyncRequest('%OPERATION_NAME%',__Message);
+end;
+
+function T%SERVICE_NAME%_AsyncProxy.Retrieve_%OPERATION_NAME%(
+           // <%%% START OUT_PARAMS %%%>
+           %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;
+           // <%%% END OUT_PARAMS %%%>
+           ): %OPERATION_RESULT%;
+var
+  __response:TStream;
+begin
+  // <%%% START OUT_PARAMS_NO_STRIP %%%>
+  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+  %PARAM_NAME% := nil;
+  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+  // <%%% END OUT_PARAMS_NO_STRIP %%%>
+  // <%%% START IF_RESULT_COMPLEX %%%>
+  Result := nil;
+  // <%%% END IF_RESULT_COMPLEX %%%>
+
+  __response := __RetrieveAsyncResponse('%OPERATION_NAME%');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Result', TypeInfo(%OPERATION_RESULT%), Result, [%OPERATION_RESULT_ATTRIBUTE%]);
+  // <%%% START OUT_PARAMS_NO_STRIP %%%>
+  __Message.Read('%PARAM_NAME%', TypeInfo(%PARAM_TYPE%), %PARAM_NAME%, [%PARAM_ATTRIBUTE%]);
+  // <%%% END OUT_PARAMS_NO_STRIP %%%>
+
+  __response.Free();
+end;
+
+// <%%% END FUNCTION_OPERATIONS %%%>
+// <%%% START PROCEDURE_OPERATIONS %%%>
+procedure T%SERVICE_NAME%_AsyncProxy.Invoke_%OPERATION_NAME%(
+           // <%%% START IN_PARAMS %%%>
+           %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;
+           // <%%% END IN_PARAMS %%%>
+           );
+var
+  __request:TStream;
+begin
+  __AssertProxyNotBusy('%OPERATION_NAME%');
+  __request := TMemoryStream.Create;
+
+  __Message.InitializeRequestMessage(__TransportChannel, '%LIBRARY_NAME%', __InterfaceName, '%OPERATION_NAME%');
+  // <%%% START IN_PARAMS_NO_STRIP %%%>
+  __Message.Write('%PARAM_NAME%', TypeInfo(%PARAM_TYPE%), %PARAM_NAME%, [%PARAM_ATTRIBUTE%]);
+  // <%%% END IN_PARAMS_NO_STRIP %%%>
+  __Message.Finalize;
+
+  __Message.WriteToStream(__request);
+  __DispatchAsyncRequest('%OPERATION_NAME%', __request, False);
+end;
+
+// <%%% START IF_OUT_PARAMS %%%>
+procedure T%SERVICE_NAME%_AsyncProxy.Retrieve_%OPERATION_NAME%(
+           // <%%% START OUT_PARAMS %%%>
+           %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;
+           // <%%% END OUT_PARAMS %%%>
+           );
+var
+  __response:TStream;
+begin
+  // <%%% START OUT_PARAMS_NO_STRIP %%%>
+  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+  %PARAM_NAME% := nil;
+  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+  // <%%% END OUT_PARAMS_NO_STRIP %%%>
+
+  __response := __RetrieveAsyncResponse('%OPERATION_NAME%');
+  __Message.ReadFromStream(__response);
+
+  // <%%% START OUT_PARAMS_NO_STRIP %%%>
+  __Message.Read('%PARAM_NAME%', TypeInfo(%PARAM_TYPE%), %PARAM_NAME%, [%PARAM_ATTRIBUTE%]);
+  // <%%% END OUT_PARAMS_NO_STRIP %%%>
+
+  __response.Free();
+end;
+
+// <%%% END IF_OUT_PARAMS %%%>
+// <%%% END PROCEDURE_OPERATIONS %%%>
+// <%%% END SERVICES %%%>
+initialization
+
+finalization
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.impl.cpp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.impl.cpp
new file mode 100644
index 0000000..04b5dbb
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.impl.cpp	
@@ -0,0 +1,93 @@
+// <%%% START SERVICES %%%>
+// unit %UNIT_NAME%
+//
+/*---------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project .                               }
+{                                                                            }
+{ Modify this unit to provide implementation for your service.              */
+
+// Interface of %LIBRARY_NAME%
+#include "%LIBRARY_NAME%_Intf.h"
+
+// Our header file
+#include "%UNIT_NAME%.h"
+
+// Invoker interface
+#include "%LIBRARY_NAME%_Invk.h"
+
+// <%%% START IF_DATA_MODULE %%%>
+#pragma link "Uroremotedatamodule"
+// <%%% END IF_DATA_MODULE %%%>
+#pragma link "Uroserver"
+
+// <%%% START IF_DATA_MODULE %%%>
+//---------------------------------------------------------------------------
+#pragma package(smart_init)
+#pragma resource "*.dfm"    
+T%SERVICE_NAME% *%SERVICE_NAME%;
+//---------------------------------------------------------------------------
+// <%%% END IF_DATA_MODULE %%%>
+void __fastcall Create_%SERVICE_NAME%(/*out*/ _di_IInterface& anInstance)
+{
+  anInstance = new T%SERVICE_NAME%(
+    // <%%% START IF_DATA_MODULE %%%>
+    NULL
+    // <%%% END IF_DATA_MODULE %%%>
+    )->operator IROObjectRetainer *();
+}
+
+// %SERVICE_NAME%
+// <%%% START IF_DATA_MODULE %%%>
+
+__fastcall T%SERVICE_NAME%::T%SERVICE_NAME%(Classes::TComponent* aOwner)
+    : TRORemoteDataModule(aOwner)
+{
+}
+// <%%% END IF_DATA_MODULE %%%>
+// <%%% START FUNCTION_OPERATIONS %%%>
+// <%%% START IF_RESULT_SIMPLE %%%>
+%OPERATION_RESULT% __fastcall T%SERVICE_NAME%::%OPERATION_NAME%(
+// <%%% END IF_RESULT_SIMPLE %%%>
+// <%%% START IF_RESULT_COMPLEX %%%>
+%OPERATION_RESULT%* __fastcall T%SERVICE_NAME%::%OPERATION_NAME%(
+// <%%% END IF_RESULT_COMPLEX %%%>
+  // <%%% START PARAMS %%%>
+  // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+  %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+  // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+  %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+  // <%%% END PARAMS %%%>
+  )
+{
+  // Insert your implementation code for %SERVICE_NAME%::%OPERATION_NAME% here
+}
+// <%%% END FUNCTION_OPERATIONS %%%>
+
+// <%%% START PROCEDURE_OPERATIONS %%%>
+void __fastcall T%SERVICE_NAME%::%OPERATION_NAME%(
+  // <%%% START PARAMS %%%>
+  // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+  %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+  // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+  %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+  // <%%% END PARAMS %%%>
+  )
+{
+  // Insert your implementation code for %SERVICE_NAME%::%OPERATION_NAME% here
+}
+// <%%% END PROCEDURE_OPERATIONS %%%>
+
+void __initialization_%UNIT_NAME%();
+
+#pragma startup __initialization_%UNIT_NAME%
+
+void __initialization_%UNIT_NAME%()
+{
+  new TROClassFactory("%SERVICE_NAME%", Create_%SERVICE_NAME%, __classid(T%SERVICE_NAME%_Invoker));
+}
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.impl.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.impl.dfm
new file mode 100644
index 0000000..63e0a45
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.impl.dfm	
@@ -0,0 +1,7 @@
+// <%%% START SERVICES %%%>
+object %SERVICE_NAME%: T%SERVICE_NAME%
+  OldCreateOrder = False
+  Height = 150
+  Width = 150
+end
+// <%%% END SERVICES %%%>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.impl.h b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.impl.h
new file mode 100644
index 0000000..dfda313
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.impl.h	
@@ -0,0 +1,90 @@
+// <%%% START SERVICES %%%>
+// unit %UNIT_NAME%
+//
+/*---------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project .                               }
+{                                                                            }
+{ Do not modify this unit manually, or your changes will be lost when this   }
+{ unit is regenerated the next time you compile your project.                }
+{                                                                            }
+{ Modify the %UNIT_NAME%.cpp file to change the implementation details of    }
+{ this service.                                                              }
+{---------------------------------------------------------------------------*/
+
+#ifndef %UNIT_NAME%H
+#define %UNIT_NAME%H
+
+#include <System.hpp>	          // Pascal unit
+// <%%% START IF_DATA_MODULE %%%>
+#include <Classes.hpp>
+#include <Controls.hpp>
+#include <StdCtrls.hpp>
+#include <Forms.hpp>
+#include <uRORemoteDataModule.hpp>  // Pascal unit
+// <%%% END IF_DATA_MODULE %%%>
+#include <Uroserver.hpp>        // Pascal unit
+#include "%LIBRARY_NAME%_intf.h"
+
+// T%SERVICE_NAME%
+class T%SERVICE_NAME% : public %SERVICE_ANCESTOR_NAME%, I%SERVICE_NAME%  // implements I%SERVICE_NAME%
+{
+  typedef %SERVICE_ANCESTOR_NAME% inherited;
+
+// <%%% START IF_DATA_MODULE %%%>
+__published:   // this line is required or the IDE will consider the declaration of the datamodule is incorrect.	
+// <%%% END IF_DATA_MODULE %%%>
+protected:
+  // I%SERVICE_NAME% methods
+  // <%%% START FUNCTION_OPERATIONS %%%>
+  // <%%% START IF_RESULT_SIMPLE %%%>
+  virtual %OPERATION_RESULT% __fastcall %OPERATION_NAME%(
+  // <%%% END IF_RESULT_SIMPLE %%%>
+  // <%%% START IF_RESULT_COMPLEX %%%>
+  virtual %OPERATION_RESULT%* __fastcall %OPERATION_NAME%(
+  // <%%% END IF_RESULT_COMPLEX %%%>
+    // <%%% START PARAMS %%%>
+    // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+    %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+    // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+    // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+    %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+    // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+    // <%%% END PARAMS %%%>
+    );
+  // <%%% END FUNCTION_OPERATIONS %%%>
+  // <%%% START PROCEDURE_OPERATIONS %%%>
+  virtual void __fastcall %OPERATION_NAME%(
+    // <%%% START PARAMS %%%>
+    // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+    %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+    // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+    // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+    %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+    // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+    // <%%% END PARAMS %%%>
+    );
+  // <%%% END PROCEDURE_OPERATIONS %%%>
+
+public:
+  // <%%% START IF_DATA_MODULE %%%>
+  __fastcall T%SERVICE_NAME%(Classes::TComponent* aOwner);
+
+  // <%%% END IF_DATA_MODULE %%%>
+  virtual HRESULT __stdcall QueryInterface(const GUID& IID, void **Obj) {
+    return inherited::QueryInterface(IID, (void *)Obj); }
+
+  virtual ULONG __stdcall AddRef() {
+    return inherited::_AddRef();  }
+
+  virtual ULONG __stdcall Release() {
+    return inherited::_Release(); }
+};
+// <%%% START IF_DATA_MODULE %%%>
+//---------------------------------------------------------------------------
+extern PACKAGE T%SERVICE_NAME% *%SERVICE_NAME%;
+//---------------------------------------------------------------------------
+// <%%% END IF_DATA_MODULE %%%>
+
+#endif	// %UNIT_NAME%H
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.impl.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.impl.pas
new file mode 100644
index 0000000..a2541b8
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.impl.pas	
@@ -0,0 +1,92 @@
+unit %UNIT_NAME%;
+
+{----------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project .                               }
+{                                                                            }
+{ This is where you are supposed to code the implementation of your objects. }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  {vcl:} Classes, SysUtils,
+  {RemObjects:} uROXMLIntf, uROClientIntf, uROTypes, uROServer, uROServerIntf, uROSessions,
+  // <%%% START REQUIRED_UNITS %%%>
+  {Required:} %REQUIRED_UNIT_NAME%,
+  // <%%% END REQUIRED_UNITS %%%>
+  {Generated:} %LIBRARY_NAME%_Intf;
+
+// <%%% START SERVICES %%%>
+type
+  { T%SERVICE_NAME% }
+  T%SERVICE_NAME% = class(%SERVICE_ANCESTOR_NAME%, I%SERVICE_NAME%)
+  private
+  protected
+    { I%SERVICE_NAME% methods }
+    // <%%% START FUNCTION_OPERATIONS %%%>
+    function %OPERATION_NAME%(
+               // <%%% START PARAMS %%%>
+               %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;
+               // <%%% END PARAMS %%%>
+               ): %OPERATION_RESULT%;
+    // <%%% END FUNCTION_OPERATIONS %%%>
+    // <%%% START PROCEDURE_OPERATIONS %%%>
+    procedure %OPERATION_NAME%(
+               // <%%% START PARAMS %%%>
+               %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;
+               // <%%% END PARAMS %%%>
+               );
+    // <%%% END PROCEDURE_OPERATIONS %%%>
+  end;
+// <%%% END SERVICES %%%>
+
+implementation
+
+// <%%% START IF_DATA_MODULE %%%>
+{$R *.dfm}
+
+// <%%% END IF_DATA_MODULE %%%>
+uses
+  {Generated:} %LIBRARY_NAME%_Invk;
+
+// <%%% START SERVICES %%%>
+procedure Create_%SERVICE_NAME%(out anInstance : IUnknown);
+begin
+  anInstance := T%SERVICE_NAME%.Create(
+    // <%%% START IF_DATA_MODULE %%%>
+    nil
+    // <%%% END IF_DATA_MODULE %%%>
+    );
+end;
+
+{ %SERVICE_NAME% }
+// <%%% START FUNCTION_OPERATIONS %%%>
+function T%SERVICE_NAME%.%OPERATION_NAME%(
+           // <%%% START PARAMS %%%>
+           %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;
+           // <%%% END PARAMS %%%>
+           ): %OPERATION_RESULT%;
+begin
+end;
+
+// <%%% END FUNCTION_OPERATIONS %%%>
+// <%%% START PROCEDURE_OPERATIONS %%%>
+procedure T%SERVICE_NAME%.%OPERATION_NAME%(
+           // <%%% START PARAMS %%%>
+           %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;
+           // <%%% END PARAMS %%%>
+           );
+begin
+end;
+
+// <%%% END PROCEDURE_OPERATIONS %%%>
+initialization
+  TROClassFactory.Create('%SERVICE_NAME%', Create_%SERVICE_NAME%, T%SERVICE_NAME%_Invoker);
+
+finalization
+
+// <%%% END SERVICES %%%>
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.intf.cpp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.intf.cpp
new file mode 100644
index 0000000..f47db72
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.intf.cpp	
@@ -0,0 +1,1311 @@
+// %UNIT_NAME%
+//
+/*---------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project.                                }
+{                                                                            }
+{ Do not modify this unit manually, or your changes will be lost when this   }
+{ unit is regenerated the next time you compile the project.                 }
+{---------------------------------------------------------------------------*/
+
+void __initialization_%UNIT_NAME%();
+void __finalization_%UNIT_NAME%();
+
+#pragma startup __initialization_%UNIT_NAME%
+#pragma exit    __finalization_%UNIT_NAME%
+
+#include "%LIBRARY_NAME%_Intf.h"
+#include <uROEventRepository.hpp>
+#include <uRORes.hpp>
+
+// Implementation of %UNIT_NAME%
+
+// <%%% START ARRAYS %%%>
+// %ARRAY_NAME%
+void __fastcall %ARRAY_NAME%::Assign(Classes::TPersistent* iSource)
+{
+  %ARRAY_NAME%* lSource = dynamic_cast<%ARRAY_NAME%*>(iSource);
+  if (lSource)
+  {
+    Clear();
+    Resize(lSource->Count);
+    for (int i = 0 ; i < Count ; i++)
+    {
+      // <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
+      if (lSource->Items[i] != NULL)
+      {
+        Items[i]->Assign(lSource->Items[i]);
+      }
+      // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
+      // <%%% START IF_ARRAY_TYPE_SIMPLE %%%>
+      Items[i] = lSource->Items[i];
+      // <%%% END IF_ARRAY_TYPE_SIMPLE %%%>
+    }
+  }
+  else
+  {
+    inherited::Assign(iSource);
+  }
+}
+
+void __fastcall %ARRAY_NAME%::ReadComplex(TObject* ASerializer)
+{
+  // <%%% START IF_ARRAY_TYPE_SIMPLE %%%>
+  %ARRAY_TYPE% lval;
+  // <%%% END IF_ARRAY_TYPE_SIMPLE %%%>
+  // <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
+  %ARRAY_TYPE%* lval;
+  // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
+  TROSerializer* Serializer = dynamic_cast<TROSerializer*>(ASerializer);
+  for (int i = 0; i < Count; i++)
+  {
+    // <%%% START IF_ARRAY_BINARY_TYPE %%%>
+    Serializer->ReadBinary(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), &lval, i);
+    // <%%% END IF_ARRAY_BINARY_TYPE %%%>
+    // <%%% START IF_ARRAY_BOOLEAN_TYPE %%%>
+    Serializer->ReadEnumerated(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), __GetboolInfo, &lval, i);
+    // <%%% END IF_ARRAY_BOOLEAN_TYPE %%%>
+    // <%%% START IF_ARRAY_CURRENCY_TYPE %%%>
+    Serializer->ReadDouble(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), ftCurr, &lval, i);
+    // <%%% END IF_ARRAY_CURRENCY_TYPE %%%>
+    // <%%% START IF_ARRAY_DATETIME_TYPE %%%>
+    Serializer->ReadDateTime(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), &lval, i);
+    // <%%% END IF_ARRAY_DATETIME_TYPE %%%>
+    // <%%% START IF_ARRAY_DECIMAL_TYPE %%%>
+    Serializer->ReadDecimal(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), &lval, i);
+    // <%%% END IF_ARRAY_DECIMAL_TYPE %%%>
+    // <%%% START IF_ARRAY_DOUBLE_TYPE %%%>
+    Serializer->ReadDouble(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), ftDouble, &lval, i);
+    // <%%% END IF_ARRAY_DOUBLE_TYPE %%%>
+    // <%%% START IF_ARRAY_GUID_TYPE %%%>
+    Serializer->ReadGuid(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), &lval, i);
+    // <%%% END IF_ARRAY_GUID_TYPE %%%>
+    // <%%% START IF_ARRAY_INT64_TYPE %%%>
+    Serializer->ReadInt64(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), &lval, i);
+    // <%%% END IF_ARRAY_INT64_TYPE %%%>
+    // <%%% START IF_ARRAY_INTEGER_TYPE %%%>
+    Serializer->ReadInteger(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), otSLong, &lval, i);
+    // <%%% END IF_ARRAY_INTEGER_TYPE %%%>
+    // <%%% START IF_ARRAY_ANSISTRING_TYPE %%%>
+    Serializer->ReadUTF8String(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), &lval, i);
+    // <%%% END IF_ARRAY_ANSISTRING_TYPE %%%>
+    // <%%% START IF_ARRAY_UTF8STRING_TYPE %%%>
+    Serializer->ReadUTF8String(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), &lval, i);
+    // <%%% END IF_ARRAY_UTF8STRING_TYPE %%%>
+    // <%%% START IF_ARRAY_VARIANT_TYPE %%%>
+    Serializer->ReadVariant(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), &lval, i);
+    // <%%% END IF_ARRAY_VARIANT_TYPE %%%>
+    // <%%% START IF_ARRAY_WIDESTRING_TYPE %%%>
+    Serializer->ReadWideString(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), &lval, i);
+    // <%%% END IF_ARRAY_WIDESTRING_TYPE %%%>
+    // <%%% START IF_ARRAY_XML_TYPE %%%>
+    Serializer->ReadXml(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), &lval, i);
+    // <%%% END IF_ARRAY_XML_TYPE %%%>
+    // <%%% START IF_ARRAY_ARRAY_TYPE %%%>
+    Serializer->ReadArray(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), __classid(%ARRAY_TYPE%), &lval, i);
+    // <%%% END IF_ARRAY_ARRAY_TYPE %%%>
+    // <%%% START IF_ARRAY_ENUM_TYPE %%%>
+    Serializer->ReadEnumerated(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), __Get%ARRAY_TYPE%Info, &lval, i);
+    // <%%% END IF_ARRAY_ENUM_TYPE %%%>
+    // <%%% START IF_ARRAY_STRUCT_TYPE %%%>
+    Serializer->ReadStruct(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), __classid(%ARRAY_TYPE%), &lval, i);
+    // <%%% END IF_ARRAY_STRUCT_TYPE %%%>
+    Items[i] = lval;
+  }
+}
+
+void __fastcall  %ARRAY_NAME%::WriteComplex(TObject* ASerializer)
+{
+  TROSerializer* Serializer = dynamic_cast<TROSerializer*>(ASerializer);
+  for(int i = 0; i < Count; i++)
+    // <%%% START IF_ARRAY_BINARY_TYPE %%%>
+    Serializer->WriteBinary(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), &(fItems[i]), i);
+    // <%%% END IF_ARRAY_BINARY_TYPE %%%>
+    // <%%% START IF_ARRAY_BOOLEAN_TYPE %%%>
+    Serializer->WriteEnumerated(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), __GetboolInfo, &(fItems[i]), i);
+    // <%%% END IF_ARRAY_BOOLEAN_TYPE %%%>
+    // <%%% START IF_ARRAY_CURRENCY_TYPE %%%>
+    Serializer->WriteDouble(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), ftCurr, &(fItems[i]), i);
+    // <%%% END IF_ARRAY_CURRENCY_TYPE %%%>
+    // <%%% START IF_ARRAY_DATETIME_TYPE %%%>
+    Serializer->WriteDateTime(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), &(fItems[i]), i);
+    // <%%% END IF_ARRAY_DATETIME_TYPE %%%>
+    // <%%% START IF_ARRAY_DECIMAL_TYPE %%%>
+    Serializer->WriteDecimal(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), &(fItems[i]), i);
+    // <%%% END IF_ARRAY_DECIMAL_TYPE %%%>
+    // <%%% START IF_ARRAY_DOUBLE_TYPE %%%>
+    Serializer->WriteDouble(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), ftDouble, &(fItems[i]), i);
+    // <%%% END IF_ARRAY_DOUBLE_TYPE %%%>
+    // <%%% START IF_ARRAY_GUID_TYPE %%%>
+    Serializer->WriteGuid(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), &(fItems[i]), i);
+    // <%%% END IF_ARRAY_GUID_TYPE %%%>
+    // <%%% START IF_ARRAY_INT64_TYPE %%%>
+    Serializer->WriteInt64(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), &(fItems[i]), i);
+    // <%%% END IF_ARRAY_INT64_TYPE %%%>
+    // <%%% START IF_ARRAY_INTEGER_TYPE %%%>
+    Serializer->WriteInteger(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), otSLong, &(fItems[i]), i);
+    // <%%% END IF_ARRAY_INTEGER_TYPE %%%>
+    // <%%% START IF_ARRAY_ANSISTRING_TYPE %%%>
+    Serializer->WriteUTF8String(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), &(fItems[i]), i);
+    // <%%% END IF_ARRAY_ANSISTRING_TYPE %%%>
+    // <%%% START IF_ARRAY_UTF8STRING_TYPE %%%>
+    Serializer->WriteUTF8String(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), &(fItems[i]), i);
+    // <%%% END IF_ARRAY_UTF8STRING_TYPE %%%>
+    // <%%% START IF_ARRAY_VARIANT_TYPE %%%>
+    Serializer->WriteVariant(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), &(fItems[i]), i);
+    // <%%% END IF_ARRAY_VARIANT_TYPE %%%>
+    // <%%% START IF_ARRAY_WIDESTRING_TYPE %%%>
+    Serializer->WriteWideString(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), &(fItems[i]), i);
+    // <%%% END IF_ARRAY_WIDESTRING_TYPE %%%>
+    // <%%% START IF_ARRAY_XML_TYPE %%%>
+    Serializer->WriteXml(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), &(fItems[i]), i);
+    // <%%% END IF_ARRAY_XML_TYPE %%%>
+    // <%%% START IF_ARRAY_ARRAY_TYPE %%%>
+    Serializer->WriteArray(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), &(fItems[i]), i);
+    // <%%% END IF_ARRAY_ARRAY_TYPE %%%>
+    // <%%% START IF_ARRAY_ENUM_TYPE %%%>
+    Serializer->WriteEnumerated(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), __Get%ARRAY_TYPE%Info, &(fItems[i]), i);
+    // <%%% END IF_ARRAY_ENUM_TYPE %%%>
+    // <%%% START IF_ARRAY_STRUCT_TYPE %%%>
+    Serializer->WriteStruct(Serializer->GetArrayElementName(GetItemType(__classid(%ARRAY_NAME%)), GetItemRef(i)), &(fItems[i]), __classid(%ARRAY_TYPE%), i);
+    // <%%% END IF_ARRAY_STRUCT_TYPE %%%>
+}
+
+void __fastcall %ARRAY_NAME%::Grow()
+{
+  int Delta;
+  int Capacity = fItems.Length;
+  if (Capacity > 64) 
+  {
+    Delta = Capacity / 4;
+  }
+  else
+  {
+    if (Capacity > 8) 
+      Delta = 16;
+    else
+      Delta = 4;
+  }
+  fItems.set_length(Capacity + Delta);
+}
+
+// <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
+%ARRAY_TYPE%* __fastcall %ARRAY_NAME%::GetItems(const int Index)
+// <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
+// <%%% START IF_ARRAY_TYPE_SIMPLE %%%>
+%ARRAY_TYPE% __fastcall %ARRAY_NAME%::GetItems(const int Index)
+// <%%% END IF_ARRAY_TYPE_SIMPLE %%%>
+{
+  if ((Index < 0) || (Index >= Count))
+  {
+    RaiseError(LoadResourceString(&_err_ArrayIndexOutOfBounds), ARRAYOFCONST((Index)));
+  }
+  return fItems[Index];
+}
+
+// <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
+void __fastcall %ARRAY_NAME%::SetItems(const int Index, %ARRAY_TYPE%* Value)
+// <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
+// <%%% START IF_ARRAY_TYPE_SIMPLE %%%>
+void __fastcall %ARRAY_NAME%::SetItems(const int Index, %ARRAY_TYPE% Value)
+// <%%% END IF_ARRAY_TYPE_SIMPLE %%%>
+{
+  if ((Index < 0) || (Index >= Count))
+  {
+    RaiseError(LoadResourceString(&_err_ArrayIndexOutOfBounds), ARRAYOFCONST((Index)));
+  }
+  // <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
+  delete fItems[Index];
+  // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
+  fItems[Index] = Value;
+}
+
+int __fastcall %ARRAY_NAME%::GetCount()
+{
+  return fCount;
+}
+
+void* __fastcall %ARRAY_NAME%::GetItemRef(const int Index)
+{
+  if ((Index < 0) || (Index >= Count))
+  {
+    RaiseError(LoadResourceString(&_err_ArrayIndexOutOfBounds), ARRAYOFCONST((Index)));
+  }
+  return &fItems[Index];
+}
+
+// <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
+void __fastcall %ARRAY_NAME%::SetItemRef(const int Index, void* Ref)
+{
+  if ((Index < 0) || (Index >= Count))
+  {
+    RaiseError(LoadResourceString(&_err_ArrayIndexOutOfBounds), ARRAYOFCONST((Index)));
+  }
+
+  if (Ref != fItems[Index])
+  {
+    delete fItems[Index];
+    fItems[Index] = reinterpret_cast<%ARRAY_TYPE%*>(Ref);
+  }
+}
+
+// <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
+void __fastcall %ARRAY_NAME%::Clear()
+{
+  // <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
+  for (int i = 0; i < Count; i++)
+    delete fItems[i];
+
+  // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
+  fItems.set_length(0);
+  fCount = 0;
+}
+
+void __fastcall %ARRAY_NAME%::Delete(const int Index)
+{
+  if (Index >= Count)
+  {
+    RaiseError(LoadResourceString(&_err_InvalidIndex), ARRAYOFCONST((Index)));
+  }
+
+  // <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
+  delete fItems[Index];
+
+  // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
+  if (Index < Count - 1)
+    for (int i = Index; i < Count - 1 ; i++)
+      fItems[i] = fItems[i + 1];
+
+  fItems.set_length(Count - 1);
+  fCount--;
+}
+
+void __fastcall %ARRAY_NAME%::Resize(const int ElementCount)
+{
+// <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
+  int i;
+  for(i = fCount -1; i >= ElementCount; --i)
+    delete fItems[i];
+// <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
+  fItems.set_length(ElementCount);
+// <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
+  for(i = fCount; i <= ElementCount -1; ++i)
+    fItems[i] = new %ARRAY_TYPE%();
+// <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
+  fCount = ElementCount;
+}
+
+// <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
+%ARRAY_TYPE%* __fastcall %ARRAY_NAME%::Add()
+{
+  %ARRAY_TYPE%* result = new %ARRAY_TYPE%();
+  Add(result);
+  return result;
+}
+
+// <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
+// <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
+int __fastcall %ARRAY_NAME%::Add(%ARRAY_TYPE%* Value)
+// <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
+// <%%% START IF_ARRAY_TYPE_SIMPLE %%%>
+int __fastcall %ARRAY_NAME%::Add(%ARRAY_TYPE% Value)
+// <%%% END IF_ARRAY_TYPE_SIMPLE %%%>
+{
+  int result = Count;
+  if (fItems.Length == result)
+    Grow();
+
+  fItems[result] = Value;
+  fCount++;
+  return result;
+}
+// <%%% END ARRAYS %%%>
+// <%%% START EXCEPTIONS %%%>
+// %EXCEPTION_NAME%
+
+%EXCEPTION_NAME%::%EXCEPTION_NAME%(AnsiString anExceptionMessage
+                   // <%%% START ANCESTOR_FIELDS %%%>
+                   // <%%% START IF_FIELD_TYPE_SIMPLE %%%>
+                   , %FIELD_TYPE% a%FIELD_NAME% 
+                   // <%%% END IF_FIELD_TYPE_SIMPLE %%%>
+                   // <%%% START IF_FIELD_TYPE_COMPLEX %%%>
+                   , %FIELD_TYPE%* a%FIELD_NAME% 
+                   // <%%% END IF_FIELD_TYPE_COMPLEX %%%>
+                   // <%%% END ANCESTOR_FIELDS %%%>
+                   // <%%% START FIELDS_NO_STRIP %%%>
+                   // <%%% START IF_FIELD_TYPE_SIMPLE %%%>
+                   , %FIELD_TYPE% a%FIELD_NAME% 
+                   // <%%% END IF_FIELD_TYPE_SIMPLE %%%>
+                   // <%%% START IF_FIELD_TYPE_COMPLEX %%%>
+                   , %FIELD_TYPE%* a%FIELD_NAME% 
+                   // <%%% END IF_FIELD_TYPE_COMPLEX %%%>
+                   // <%%% END FIELDS_NO_STRIP %%%>
+                   ): %EXCEPTION_ANCESTOR_NAME%(anExceptionMessage
+                     // <%%% START ANCESTOR_FIELDS %%%>
+                     , a%FIELD_NAME% 
+                     // <%%% END ANCESTOR_FIELDS %%%>
+                     )
+{
+  // <%%% START FIELDS_NO_STRIP %%%>
+  f%FIELD_NAME% = a%FIELD_NAME%;
+  // <%%% END FIELDS_NO_STRIP %%%>
+}
+
+// <%%% START IF_HAS_FIELDS %%%>
+void __fastcall %EXCEPTION_NAME%::ReadException(TObject* ASerializer)
+{
+  if (dynamic_cast<TROSerializer*>(ASerializer)->RecordStrictOrder)
+  {
+    // <%%% START IF_STRUCT_HAS_ANCESTOR %%%>
+    inherited::ReadException(ASerializer);
+    // <%%% END IF_STRUCT_HAS_ANCESTOR %%%>
+    // <%%% START FIELDS_NO_STRIP %%%>
+    // <%%% START IF_FIELD_TYPE_SIMPLE %%%>
+    %FIELD_TYPE% l_%FIELD_NAME% = %FIELD_NAME%;
+    // <%%% END IF_FIELD_TYPE_SIMPLE %%%>
+    // <%%% START IF_FIELD_TYPE_COMPLEX %%%>
+    %FIELD_TYPE%* l_%FIELD_NAME% = %FIELD_NAME%;
+    // <%%% END IF_FIELD_TYPE_COMPLEX %%%>
+    // <%%% START IF_FIELD_BINARY_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadBinary("%FIELD_NAME%", &l_%FIELD_NAME%);
+    if (%FIELD_NAME% != l_%FIELD_NAME%) delete %FIELD_NAME%;
+    // <%%% END IF_FIELD_BINARY_TYPE %%%>
+    // <%%% START IF_FIELD_BOOLEAN_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadEnumerated("%FIELD_NAME%", __GetboolInfo, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_BOOLEAN_TYPE %%%>
+    // <%%% START IF_FIELD_CURRENCY_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadDouble("%FIELD_NAME%", ftCurr, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_CURRENCY_TYPE %%%>
+    // <%%% START IF_FIELD_DATETIME_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadDateTime("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DATETIME_TYPE %%%>
+    // <%%% START IF_FIELD_DECIMAL_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadDecimal("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DECIMAL_TYPE %%%>
+    // <%%% START IF_FIELD_DOUBLE_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadDouble("%FIELD_NAME%", ftDouble, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DOUBLE_TYPE %%%>
+    // <%%% START IF_FIELD_GUID_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadGuid("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_GUID_TYPE %%%>
+    // <%%% START IF_FIELD_INT64_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadInt64("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_INT64_TYPE %%%>
+    // <%%% START IF_FIELD_INTEGER_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadInteger("%FIELD_NAME%", otSLong, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_INTEGER_TYPE %%%>
+    // <%%% START IF_FIELD_ANSISTRING_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadAnsiString("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ANSISTRING_TYPE %%%>
+    // <%%% START IF_FIELD_UTF8STRING_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadUTF8String("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_UTF8STRING_TYPE %%%>
+    // <%%% START IF_FIELD_VARIANT_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadVariant("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_VARIANT_TYPE %%%>
+    // <%%% START IF_FIELD_WIDESTRING_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadWideString("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_WIDESTRING_TYPE %%%>
+    // <%%% START IF_FIELD_XML_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadXml("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_XML_TYPE %%%>
+    // <%%% START IF_FIELD_ARRAY_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadArray("%FIELD_NAME%", __classid(%FIELD_TYPE%), &l_%FIELD_NAME%);
+    if (%FIELD_NAME% != l_%FIELD_NAME%) delete %FIELD_NAME%;
+    // <%%% END IF_FIELD_ARRAY_TYPE %%%>
+    // <%%% START IF_FIELD_ENUM_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadEnumerated("%FIELD_NAME%", __Get%FIELD_TYPE%Info, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ENUM_TYPE %%%>
+    // <%%% START IF_FIELD_STRUCT_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadStruct("%FIELD_NAME%", __classid(%FIELD_TYPE%), &l_%FIELD_NAME%);
+    if (%FIELD_NAME% != l_%FIELD_NAME%) delete %FIELD_NAME%;
+    // <%%% END IF_FIELD_STRUCT_TYPE %%%>
+    %FIELD_NAME% = l_%FIELD_NAME%;
+    // <%%% END FIELDS_NO_STRIP %%%>
+  }
+  else
+  {
+    // <%%% START ENTIRE_HIERARCHY_FIELDS %%%>
+    // <%%% START IF_FIELD_TYPE_SIMPLE %%%>
+    %FIELD_TYPE% l_%FIELD_NAME% = %FIELD_NAME%;
+    // <%%% END IF_FIELD_TYPE_SIMPLE %%%>
+    // <%%% START IF_FIELD_TYPE_COMPLEX %%%>
+    %FIELD_TYPE%* l_%FIELD_NAME% = %FIELD_NAME%;
+    // <%%% END IF_FIELD_TYPE_COMPLEX %%%>
+    // <%%% START IF_FIELD_BINARY_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadBinary("%FIELD_NAME%", &l_%FIELD_NAME%);
+    if (%FIELD_NAME% != l_%FIELD_NAME%) delete %FIELD_NAME%;
+    // <%%% END IF_FIELD_BINARY_TYPE %%%>
+    // <%%% START IF_FIELD_BOOLEAN_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadEnumerated("%FIELD_NAME%", __GetboolInfo, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_BOOLEAN_TYPE %%%>
+    // <%%% START IF_FIELD_CURRENCY_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadDouble("%FIELD_NAME%", ftCurr, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_CURRENCY_TYPE %%%>
+    // <%%% START IF_FIELD_DATETIME_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadDateTime("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DATETIME_TYPE %%%>
+    // <%%% START IF_FIELD_DECIMAL_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadDecimal("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DECIMAL_TYPE %%%>
+    // <%%% START IF_FIELD_DOUBLE_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadDouble("%FIELD_NAME%", ftDouble, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DOUBLE_TYPE %%%>
+    // <%%% START IF_FIELD_GUID_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadGuid("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_GUID_TYPE %%%>
+    // <%%% START IF_FIELD_INT64_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadInt64("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_INT64_TYPE %%%>
+    // <%%% START IF_FIELD_INTEGER_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadInteger("%FIELD_NAME%", otSLong, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_INTEGER_TYPE %%%>
+    // <%%% START IF_FIELD_ANSISTRING_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadAnsiString("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ANSISTRING_TYPE %%%>
+    // <%%% START IF_FIELD_UTF8STRING_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadUTF8String("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_UTF8STRING_TYPE %%%>
+    // <%%% START IF_FIELD_VARIANT_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadVariant("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_VARIANT_TYPE %%%>
+    // <%%% START IF_FIELD_WIDESTRING_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadWideString("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_WIDESTRING_TYPE %%%>
+    // <%%% START IF_FIELD_XML_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadXml("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_XML_TYPE %%%>
+    // <%%% START IF_FIELD_ARRAY_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadArray("%FIELD_NAME%", __classid(%FIELD_TYPE%), &l_%FIELD_NAME%);
+    if (%FIELD_NAME% != l_%FIELD_NAME%) delete %FIELD_NAME%;
+    // <%%% END IF_FIELD_ARRAY_TYPE %%%>
+    // <%%% START IF_FIELD_ENUM_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadEnumerated("%FIELD_NAME%", __Get%FIELD_TYPE%Info, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ENUM_TYPE %%%>
+    // <%%% START IF_FIELD_STRUCT_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadStruct("%FIELD_NAME%", __classid(%FIELD_TYPE%), &l_%FIELD_NAME%);
+    if (%FIELD_NAME% != l_%FIELD_NAME%) delete %FIELD_NAME%;
+    // <%%% END IF_FIELD_STRUCT_TYPE %%%>
+    %FIELD_NAME% = l_%FIELD_NAME%;
+    // <%%% END ENTIRE_HIERARCHY_FIELDS %%%>
+  }
+}
+
+void __fastcall %EXCEPTION_NAME%::WriteException(TObject* ASerializer)
+{
+  if (dynamic_cast<TROSerializer*>(ASerializer)->RecordStrictOrder)
+  {
+    // <%%% START IF_STRUCT_HAS_ANCESTOR %%%>
+    inherited::WriteException(ASerializer);
+    // <%%% END IF_STRUCT_HAS_ANCESTOR %%%>
+    // <%%% START FIELDS_NO_STRIP %%%>
+    // <%%% START IF_FIELD_TYPE_SIMPLE %%%>
+    %FIELD_TYPE% l_%FIELD_NAME% = %FIELD_NAME%;
+    // <%%% END IF_FIELD_TYPE_SIMPLE %%%>
+    // <%%% START IF_FIELD_TYPE_COMPLEX %%%>
+    %FIELD_TYPE%* l_%FIELD_NAME% = %FIELD_NAME%;
+    // <%%% END IF_FIELD_TYPE_COMPLEX %%%>
+    // <%%% START IF_FIELD_BINARY_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteBinary("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_BINARY_TYPE %%%>
+    // <%%% START IF_FIELD_BOOLEAN_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteEnumerated("%FIELD_NAME%", __GetboolInfo, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_BOOLEAN_TYPE %%%>
+    // <%%% START IF_FIELD_CURRENCY_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteDouble("%FIELD_NAME%", ftCurr, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_CURRENCY_TYPE %%%>
+    // <%%% START IF_FIELD_DATETIME_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteDateTime("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DATETIME_TYPE %%%>
+    // <%%% START IF_FIELD_DECIMAL_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteDecimal("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DECIMAL_TYPE %%%>
+    // <%%% START IF_FIELD_DOUBLE_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteDouble("%FIELD_NAME%", ftDouble, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DOUBLE_TYPE %%%>
+    // <%%% START IF_FIELD_GUID_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteGuid("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_GUID_TYPE %%%>
+    // <%%% START IF_FIELD_INT64_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteInt64("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_INT64_TYPE %%%>
+    // <%%% START IF_FIELD_INTEGER_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteInteger("%FIELD_NAME%", otSLong, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_INTEGER_TYPE %%%>
+    // <%%% START IF_FIELD_ANSISTRING_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteAnsiString("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ANSISTRING_TYPE %%%>
+    // <%%% START IF_FIELD_UTF8STRING_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteUTF8String("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_UTF8STRING_TYPE %%%>
+    // <%%% START IF_FIELD_VARIANT_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteVariant("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_VARIANT_TYPE %%%>
+    // <%%% START IF_FIELD_WIDESTRING_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteWideString("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_WIDESTRING_TYPE %%%>
+    // <%%% START IF_FIELD_XML_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteXml("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_XML_TYPE %%%>
+    // <%%% START IF_FIELD_ARRAY_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteArray("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ARRAY_TYPE %%%>
+    // <%%% START IF_FIELD_ENUM_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteEnumerated("%FIELD_NAME%", __Get%FIELD_TYPE%Info, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ENUM_TYPE %%%>
+    // <%%% START IF_FIELD_STRUCT_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteStruct("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_STRUCT_TYPE %%%>
+    // <%%% END FIELDS_NO_STRIP %%%>
+  }
+  else
+  {
+    // <%%% START ENTIRE_HIERARCHY_FIELDS %%%>
+    // <%%% START IF_FIELD_TYPE_SIMPLE %%%>
+    %FIELD_TYPE% l_%FIELD_NAME% = %FIELD_NAME%;
+    // <%%% END IF_FIELD_TYPE_SIMPLE %%%>
+    // <%%% START IF_FIELD_TYPE_COMPLEX %%%>
+    %FIELD_TYPE%* l_%FIELD_NAME% = %FIELD_NAME%;
+    // <%%% END IF_FIELD_TYPE_COMPLEX %%%>
+    // <%%% START IF_FIELD_BINARY_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteBinary("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_BINARY_TYPE %%%>
+    // <%%% START IF_FIELD_BOOLEAN_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteEnumerated("%FIELD_NAME%", __GetboolInfo, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_BOOLEAN_TYPE %%%>
+    // <%%% START IF_FIELD_CURRENCY_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteDouble("%FIELD_NAME%", ftCurr, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_CURRENCY_TYPE %%%>
+    // <%%% START IF_FIELD_DATETIME_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteDateTime("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DATETIME_TYPE %%%>
+    // <%%% START IF_FIELD_DECIMAL_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteDecimal("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DECIMAL_TYPE %%%>
+    // <%%% START IF_FIELD_DOUBLE_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteDouble("%FIELD_NAME%", ftDouble, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DOUBLE_TYPE %%%>
+    // <%%% START IF_FIELD_GUID_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteGuid("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_GUID_TYPE %%%>
+    // <%%% START IF_FIELD_INT64_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteInt64("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_INT64_TYPE %%%>
+    // <%%% START IF_FIELD_INTEGER_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteInteger("%FIELD_NAME%", otSLong, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_INTEGER_TYPE %%%>
+    // <%%% START IF_FIELD_ANSISTRING_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteAnsiString("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ANSISTRING_TYPE %%%>
+    // <%%% START IF_FIELD_UTF8STRING_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteUTF8String("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_UTF8STRING_TYPE %%%>
+    // <%%% START IF_FIELD_VARIANT_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteVariant("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_VARIANT_TYPE %%%>
+    // <%%% START IF_FIELD_WIDESTRING_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteWideString("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_WIDESTRING_TYPE %%%>
+    // <%%% START IF_FIELD_XML_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteXml("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_XML_TYPE %%%>
+    // <%%% START IF_FIELD_ARRAY_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteArray("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ARRAY_TYPE %%%>
+    // <%%% START IF_FIELD_ENUM_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteEnumerated("%FIELD_NAME%", __Get%FIELD_TYPE%Info, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ENUM_TYPE %%%>
+    // <%%% START IF_FIELD_STRUCT_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteStruct("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_STRUCT_TYPE %%%>
+    // <%%% END ENTIRE_HIERARCHY_FIELDS %%%>
+  }
+}
+
+// <%%% END IF_HAS_FIELDS %%%>
+// <%%% END EXCEPTIONS %%%>
+// <%%% START STRUCTS %%%>
+// %STRUCT_NAME%
+
+void __fastcall %STRUCT_NAME%::Assign(Classes::TPersistent* iSource)
+{
+  inherited::Assign(iSource);  // inherited typedef
+  // <%%% START IF_HAS_FIELDS %%%>
+
+  %STRUCT_NAME%* lSource = dynamic_cast<%STRUCT_NAME%*>(iSource);
+  if (lSource)
+  {
+  // <%%% END IF_HAS_FIELDS %%%>
+    // <%%% START FIELDS_NO_STRIP %%%>
+    // <%%% START IF_FIELD_TYPE_SIMPLE %%%>
+    %FIELD_NAME% = lSource->%FIELD_NAME%;
+    // <%%% END IF_FIELD_TYPE_SIMPLE %%%>
+    // <%%% START IF_FIELD_TYPE_COMPLEX %%%>
+    // <%%% START IF_NOT_AUTO_CREATE_FIELDS %%%>
+    if (f%FIELD_NAME% != NULL)
+    {
+      if (lSource->%FIELD_NAME% != NULL) 
+      {
+        %FIELD_NAME%->Assign(lSource->%FIELD_NAME%);
+      }
+      else
+      {
+        delete f%FIELD_NAME%;
+        f%FIELD_NAME% = NULL;
+      }
+    }
+    // <%%% END IF_NOT_AUTO_CREATE_FIELDS %%%>
+    // <%%% START IF_AUTO_CREATE_FIELDS %%%>
+    %FIELD_NAME%->Assign(lSource->%FIELD_NAME%);
+    // <%%% END IF_AUTO_CREATE_FIELDS %%%>
+    // <%%% END IF_FIELD_TYPE_COMPLEX %%%>
+    // <%%% END FIELDS_NO_STRIP %%%>
+  // <%%% START IF_HAS_FIELDS %%%>
+  }
+  // <%%% END IF_HAS_FIELDS %%%>
+}
+
+// <%%% START FIELDS_NO_STRIP %%%>
+// <%%% START IF_FIELD_TYPE_COMPLEX %%%>
+%FIELD_TYPE%* __fastcall %STRUCT_NAME%::Get%FIELD_NAME%()
+{
+  // <%%% START IF_AUTO_CREATE_FIELDS %%%>
+  if (f%FIELD_NAME% == NULL) 
+    f%FIELD_NAME% = new %FIELD_TYPE%();
+  // <%%% END IF_AUTO_CREATE_FIELDS %%%>
+  return f%FIELD_NAME%;
+}
+
+// <%%% END IF_FIELD_TYPE_COMPLEX %%%>
+// <%%% END FIELDS_NO_STRIP %%%>
+// <%%% START IF_HAS_FIELDS %%%>
+void __fastcall %STRUCT_NAME%::ReadComplex(TObject* ASerializer)
+{
+  if (dynamic_cast<TROSerializer*>(ASerializer)->RecordStrictOrder)
+  {
+    // <%%% START IF_STRUCT_HAS_ANCESTOR %%%>
+    inherited::ReadException(ASerializer);
+    // <%%% END IF_STRUCT_HAS_ANCESTOR %%%>
+    // <%%% START FIELDS_NO_STRIP %%%>
+    // <%%% START IF_FIELD_TYPE_SIMPLE %%%>
+    %FIELD_TYPE% l_%FIELD_NAME% = %FIELD_NAME%;
+    // <%%% END IF_FIELD_TYPE_SIMPLE %%%>
+    // <%%% START IF_FIELD_TYPE_COMPLEX %%%>
+    %FIELD_TYPE%* l_%FIELD_NAME% = %FIELD_NAME%;
+    // <%%% END IF_FIELD_TYPE_COMPLEX %%%>
+    // <%%% START IF_FIELD_BINARY_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadBinary("%FIELD_NAME%", &l_%FIELD_NAME%);
+    if (%FIELD_NAME% != l_%FIELD_NAME%) delete %FIELD_NAME%;
+    // <%%% END IF_FIELD_BINARY_TYPE %%%>
+    // <%%% START IF_FIELD_BOOLEAN_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadEnumerated("%FIELD_NAME%", __GetboolInfo, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_BOOLEAN_TYPE %%%>
+    // <%%% START IF_FIELD_CURRENCY_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadDouble("%FIELD_NAME%", ftCurr, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_CURRENCY_TYPE %%%>
+    // <%%% START IF_FIELD_DATETIME_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadDateTime("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DATETIME_TYPE %%%>
+    // <%%% START IF_FIELD_DECIMAL_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadDecimal("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DECIMAL_TYPE %%%>
+    // <%%% START IF_FIELD_DOUBLE_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadDouble("%FIELD_NAME%", ftDouble, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DOUBLE_TYPE %%%>
+    // <%%% START IF_FIELD_GUID_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadGuid("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_GUID_TYPE %%%>
+    // <%%% START IF_FIELD_INT64_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadInt64("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_INT64_TYPE %%%>
+    // <%%% START IF_FIELD_INTEGER_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadInteger("%FIELD_NAME%", otSLong, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_INTEGER_TYPE %%%>
+    // <%%% START IF_FIELD_ANSISTRING_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadAnsiString("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ANSISTRING_TYPE %%%>
+    // <%%% START IF_FIELD_UTF8STRING_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadUTF8String("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_UTF8STRING_TYPE %%%>
+    // <%%% START IF_FIELD_VARIANT_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadVariant("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_VARIANT_TYPE %%%>
+    // <%%% START IF_FIELD_WIDESTRING_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadWideString("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_WIDESTRING_TYPE %%%>
+    // <%%% START IF_FIELD_XML_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadXml("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_XML_TYPE %%%>
+    // <%%% START IF_FIELD_ARRAY_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadArray("%FIELD_NAME%", __classid(%FIELD_TYPE%), &l_%FIELD_NAME%);
+    if (%FIELD_NAME% != l_%FIELD_NAME%) delete %FIELD_NAME%;
+    // <%%% END IF_FIELD_ARRAY_TYPE %%%>
+    // <%%% START IF_FIELD_ENUM_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadEnumerated("%FIELD_NAME%", __Get%FIELD_TYPE%Info, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ENUM_TYPE %%%>
+    // <%%% START IF_FIELD_STRUCT_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadStruct("%FIELD_NAME%", __classid(%FIELD_TYPE%), &l_%FIELD_NAME%);
+    if (%FIELD_NAME% != l_%FIELD_NAME%) delete %FIELD_NAME%;
+    // <%%% END IF_FIELD_STRUCT_TYPE %%%>
+    %FIELD_NAME% = l_%FIELD_NAME%;
+    // <%%% END FIELDS_NO_STRIP %%%>
+  }
+  else
+  {
+    // <%%% START ENTIRE_HIERARCHY_FIELDS %%%>
+    // <%%% START IF_FIELD_TYPE_SIMPLE %%%>
+    %FIELD_TYPE% l_%FIELD_NAME% = %FIELD_NAME%;
+    // <%%% END IF_FIELD_TYPE_SIMPLE %%%>
+    // <%%% START IF_FIELD_TYPE_COMPLEX %%%>
+    %FIELD_TYPE%* l_%FIELD_NAME% = %FIELD_NAME%;
+    // <%%% END IF_FIELD_TYPE_COMPLEX %%%>
+    // <%%% START IF_FIELD_BINARY_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadBinary("%FIELD_NAME%", &l_%FIELD_NAME%);
+    if (%FIELD_NAME% != l_%FIELD_NAME%) delete %FIELD_NAME%;
+    // <%%% END IF_FIELD_BINARY_TYPE %%%>
+    // <%%% START IF_FIELD_BOOLEAN_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadEnumerated("%FIELD_NAME%", __GetboolInfo, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_BOOLEAN_TYPE %%%>
+    // <%%% START IF_FIELD_CURRENCY_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadDouble("%FIELD_NAME%", ftCurr, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_CURRENCY_TYPE %%%>
+    // <%%% START IF_FIELD_DATETIME_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadDateTime("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DATETIME_TYPE %%%>
+    // <%%% START IF_FIELD_DECIMAL_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadDecimal("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DECIMAL_TYPE %%%>
+    // <%%% START IF_FIELD_DOUBLE_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadDouble("%FIELD_NAME%", ftDouble, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DOUBLE_TYPE %%%>
+    // <%%% START IF_FIELD_GUID_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadGuid("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_GUID_TYPE %%%>
+    // <%%% START IF_FIELD_INT64_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadInt64("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_INT64_TYPE %%%>
+    // <%%% START IF_FIELD_INTEGER_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadInteger("%FIELD_NAME%", otSLong, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_INTEGER_TYPE %%%>
+    // <%%% START IF_FIELD_ANSISTRING_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadAnsiString("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ANSISTRING_TYPE %%%>
+    // <%%% START IF_FIELD_UTF8STRING_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadUTF8String("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_UTF8STRING_TYPE %%%>
+    // <%%% START IF_FIELD_VARIANT_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadVariant("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_VARIANT_TYPE %%%>
+    // <%%% START IF_FIELD_WIDESTRING_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadWideString("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_WIDESTRING_TYPE %%%>
+    // <%%% START IF_FIELD_XML_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadXml("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_XML_TYPE %%%>
+    // <%%% START IF_FIELD_ARRAY_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadArray("%FIELD_NAME%", __classid(%FIELD_TYPE%), &l_%FIELD_NAME%);
+    if (%FIELD_NAME% != l_%FIELD_NAME%) delete %FIELD_NAME%;
+    // <%%% END IF_FIELD_ARRAY_TYPE %%%>
+    // <%%% START IF_FIELD_ENUM_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadEnumerated("%FIELD_NAME%", __Get%FIELD_TYPE%Info, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ENUM_TYPE %%%>
+    // <%%% START IF_FIELD_STRUCT_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->ReadStruct("%FIELD_NAME%", __classid(%FIELD_TYPE%), &l_%FIELD_NAME%);
+    if (%FIELD_NAME% != l_%FIELD_NAME%) delete %FIELD_NAME%;
+    // <%%% END IF_FIELD_STRUCT_TYPE %%%>
+    %FIELD_NAME% = l_%FIELD_NAME%;
+    // <%%% END ENTIRE_HIERARCHY_FIELDS %%%>
+  }
+}
+
+void __fastcall %STRUCT_NAME%::WriteComplex(TObject* ASerializer)
+{
+  if (dynamic_cast<TROSerializer*>(ASerializer)->RecordStrictOrder)
+  {
+    // <%%% START IF_STRUCT_HAS_ANCESTOR %%%>
+    inherited::WriteException(ASerializer);
+    // <%%% END IF_STRUCT_HAS_ANCESTOR %%%>
+    // <%%% START FIELDS_NO_STRIP %%%>
+    // <%%% START IF_FIELD_TYPE_SIMPLE %%%>
+    %FIELD_TYPE% l_%FIELD_NAME% = %FIELD_NAME%;
+    // <%%% END IF_FIELD_TYPE_SIMPLE %%%>
+    // <%%% START IF_FIELD_TYPE_COMPLEX %%%>
+    %FIELD_TYPE%* l_%FIELD_NAME% = %FIELD_NAME%;
+    // <%%% END IF_FIELD_TYPE_COMPLEX %%%>
+    // <%%% START IF_FIELD_BINARY_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteBinary("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_BINARY_TYPE %%%>
+    // <%%% START IF_FIELD_BOOLEAN_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteEnumerated("%FIELD_NAME%", __GetboolInfo, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_BOOLEAN_TYPE %%%>
+    // <%%% START IF_FIELD_CURRENCY_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteDouble("%FIELD_NAME%", ftCurr, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_CURRENCY_TYPE %%%>
+    // <%%% START IF_FIELD_DATETIME_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteDateTime("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DATETIME_TYPE %%%>
+    // <%%% START IF_FIELD_DECIMAL_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteDecimal("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DECIMAL_TYPE %%%>
+    // <%%% START IF_FIELD_DOUBLE_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteDouble("%FIELD_NAME%", ftDouble, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DOUBLE_TYPE %%%>
+    // <%%% START IF_FIELD_GUID_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteGuid("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_GUID_TYPE %%%>
+    // <%%% START IF_FIELD_INT64_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteInt64("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_INT64_TYPE %%%>
+    // <%%% START IF_FIELD_INTEGER_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteInteger("%FIELD_NAME%", otSLong, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_INTEGER_TYPE %%%>
+    // <%%% START IF_FIELD_ANSISTRING_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteAnsiString("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ANSISTRING_TYPE %%%>
+    // <%%% START IF_FIELD_UTF8STRING_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteUTF8String("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_UTF8STRING_TYPE %%%>
+    // <%%% START IF_FIELD_VARIANT_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteVariant("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_VARIANT_TYPE %%%>
+    // <%%% START IF_FIELD_WIDESTRING_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteWideString("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_WIDESTRING_TYPE %%%>
+    // <%%% START IF_FIELD_XML_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteXml("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_XML_TYPE %%%>
+    // <%%% START IF_FIELD_ARRAY_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteArray("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ARRAY_TYPE %%%>
+    // <%%% START IF_FIELD_ENUM_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteEnumerated("%FIELD_NAME%", __Get%FIELD_TYPE%Info, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ENUM_TYPE %%%>
+    // <%%% START IF_FIELD_STRUCT_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteStruct("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_STRUCT_TYPE %%%>
+    // <%%% END FIELDS_NO_STRIP %%%>
+  }
+  else
+  {
+    // <%%% START ENTIRE_HIERARCHY_FIELDS %%%>
+    // <%%% START IF_FIELD_TYPE_SIMPLE %%%>
+    %FIELD_TYPE% l_%FIELD_NAME% = %FIELD_NAME%;
+    // <%%% END IF_FIELD_TYPE_SIMPLE %%%>
+    // <%%% START IF_FIELD_TYPE_COMPLEX %%%>
+    %FIELD_TYPE%* l_%FIELD_NAME% = %FIELD_NAME%;
+    // <%%% END IF_FIELD_TYPE_COMPLEX %%%>
+    // <%%% START IF_FIELD_BINARY_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteBinary("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_BINARY_TYPE %%%>
+    // <%%% START IF_FIELD_BOOLEAN_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteEnumerated("%FIELD_NAME%", __GetboolInfo, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_BOOLEAN_TYPE %%%>
+    // <%%% START IF_FIELD_CURRENCY_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteDouble("%FIELD_NAME%", ftCurr, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_CURRENCY_TYPE %%%>
+    // <%%% START IF_FIELD_DATETIME_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteDateTime("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DATETIME_TYPE %%%>
+    // <%%% START IF_FIELD_DECIMAL_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteDecimal("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DECIMAL_TYPE %%%>
+    // <%%% START IF_FIELD_DOUBLE_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteDouble("%FIELD_NAME%", ftDouble, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DOUBLE_TYPE %%%>
+    // <%%% START IF_FIELD_GUID_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteGuid("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_GUID_TYPE %%%>
+    // <%%% START IF_FIELD_INT64_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteInt64("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_INT64_TYPE %%%>
+    // <%%% START IF_FIELD_INTEGER_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteInteger("%FIELD_NAME%", otSLong, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_INTEGER_TYPE %%%>
+    // <%%% START IF_FIELD_ANSISTRING_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteAnsiString("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ANSISTRING_TYPE %%%>
+    // <%%% START IF_FIELD_UTF8STRING_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteUTF8String("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_UTF8STRING_TYPE %%%>
+    // <%%% START IF_FIELD_VARIANT_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteVariant("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_VARIANT_TYPE %%%>
+    // <%%% START IF_FIELD_WIDESTRING_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteWideString("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_WIDESTRING_TYPE %%%>
+    // <%%% START IF_FIELD_XML_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteXml("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_XML_TYPE %%%>
+    // <%%% START IF_FIELD_ARRAY_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteArray("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ARRAY_TYPE %%%>
+    // <%%% START IF_FIELD_ENUM_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteEnumerated("%FIELD_NAME%", __Get%FIELD_TYPE%Info, &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ENUM_TYPE %%%>
+    // <%%% START IF_FIELD_STRUCT_TYPE %%%>
+    dynamic_cast<TROSerializer*>(ASerializer)->WriteStruct("%FIELD_NAME%", &l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_STRUCT_TYPE %%%>
+    // <%%% END ENTIRE_HIERARCHY_FIELDS %%%>
+  }
+}
+
+// <%%% END IF_HAS_FIELDS %%%>
+//%STRUCT_COLLECTION_NAME%
+%STRUCT_NAME%* __fastcall %STRUCT_COLLECTION_NAME%::Add()
+{
+  return dynamic_cast<%STRUCT_NAME%*>(inherited::Add());
+}
+
+%STRUCT_NAME%* __fastcall %STRUCT_COLLECTION_NAME%::GetItems(const int Index)
+{
+  return dynamic_cast<%STRUCT_NAME%*>(inherited::Items[Index]);
+}
+
+void __fastcall %STRUCT_COLLECTION_NAME%::SetItems(const int Index, %STRUCT_NAME%* Value)
+{
+  dynamic_cast<%STRUCT_NAME%*>(inherited::Items[Index])->Assign(Value);
+}
+
+// <%%% START ARRAYS_IS_FOUND %%%>
+void %STRUCT_COLLECTION_NAME%::LoadFromArray(%ARRAY_NAME%* anArray)
+{
+  Clear();
+  
+  for(int i = 0; i <= anArray->Count-1; ++i)
+    Add()->Assign((*anArray)[i]);
+}
+
+void %STRUCT_COLLECTION_NAME%::SaveToArray(%ARRAY_NAME%* anArray)
+{
+  anArray->Clear();
+  anArray->Resize(Count);
+  for(int i = 0; i <= Count-1; ++i)
+  {
+    anArray->Items[i] = new %STRUCT_NAME%;
+    anArray->Items[i]->Assign(Items[i]);
+  }
+}
+
+// <%%% END ARRAYS_IS_FOUND %%%>
+// <%%% END STRUCTS %%%>
+// <%%% START SERVICES %%%>
+// <%%% START FUNCTION_OPERATIONS %%%>
+// <%%% START IF_RESULT_SIMPLE %%%>
+%OPERATION_RESULT% __fastcall T%SERVICE_NAME%_Proxy::%OPERATION_NAME%(
+// <%%% END IF_RESULT_SIMPLE %%%>
+// <%%% START IF_RESULT_COMPLEX %%%>
+%OPERATION_RESULT%* __fastcall T%SERVICE_NAME%_Proxy::%OPERATION_NAME%(
+// <%%% END IF_RESULT_COMPLEX %%%>
+  // <%%% START PARAMS %%%>
+  // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+  %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+  // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+  %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+  // <%%% END PARAMS %%%>
+  )
+{
+  // <%%% START IF_RESULT_SIMPLE %%%>
+  %OPERATION_RESULT% result;
+  // <%%% END IF_RESULT_SIMPLE %%%>
+  // <%%% START IF_RESULT_COMPLEX %%%>
+  %OPERATION_RESULT%* result;
+  // <%%% END IF_RESULT_COMPLEX %%%>
+
+  // <%%% START OUT_PARAMS_NO_STRIP %%%>
+  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+  %PARAM_NAME% = NULL;
+  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+  // <%%% END OUT_PARAMS_NO_STRIP %%%>
+  // <%%% START IF_RESULT_COMPLEX %%%>
+  result = NULL;
+  // <%%% END IF_RESULT_COMPLEX %%%>
+  try
+  {
+    __Message->InitializeRequestMessage(__TransportChannel, "%LIBRARY_NAME%", __InterfaceName, "%OPERATION_NAME%");
+    // <%%% START IN_PARAMS_NO_STRIP %%%>
+    // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+    __Message->Write("%PARAM_NAME%", __Get%PARAM_TYPE%Info, &%PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));
+    // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+    // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+    __Message->Write("%PARAM_NAME%", __typeinfo(%PARAM_TYPE%), &%PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));
+    // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+    // <%%% END IN_PARAMS_NO_STRIP %%%>
+    __Message->Finalize();
+
+    __TransportChannel->Dispatch(__Message);
+
+    // <%%% START IF_RESULT_SIMPLE %%%>
+    __Message->Read("Result", __Get%OPERATION_RESULT%Info, &result, TParamAttributes(%OPERATION_RESULT_ATTRIBUTE%));
+    // <%%% END IF_RESULT_SIMPLE %%%>
+    // <%%% START IF_RESULT_COMPLEX %%%>
+    __Message->Read("Result", __typeinfo(%OPERATION_RESULT%), &result, TParamAttributes(%OPERATION_RESULT_ATTRIBUTE%));
+    // <%%% END IF_RESULT_COMPLEX %%%>
+    // <%%% START OUT_PARAMS_NO_STRIP %%%>
+    // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+    __Message->Read("%PARAM_NAME%", __Get%PARAM_TYPE%Info, &%PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));
+    // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+    // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+    __Message->Read("%PARAM_NAME%", __typeinfo(%PARAM_TYPE%), &%PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));
+    // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+    // <%%% END OUT_PARAMS_NO_STRIP %%%>
+  }
+  __finally
+  {
+    __Message->FreeStream();
+  }
+  return result;
+}
+
+// <%%% END FUNCTION_OPERATIONS %%%>
+// <%%% START PROCEDURE_OPERATIONS %%%>
+void __fastcall T%SERVICE_NAME%_Proxy::%OPERATION_NAME%(
+  // <%%% START PARAMS %%%>
+  // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+  %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+  // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+  %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+  // <%%% END PARAMS %%%>
+  )
+{
+  // <%%% START OUT_PARAMS_NO_STRIP %%%>
+  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+  %PARAM_NAME% = NULL;
+  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+  // <%%% END OUT_PARAMS_NO_STRIP %%%>
+  try
+  {
+    __Message->InitializeRequestMessage(__TransportChannel, "%LIBRARY_NAME%", __InterfaceName, "%OPERATION_NAME%");
+    // <%%% START IN_PARAMS_NO_STRIP %%%>
+    // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+    __Message->Write("%PARAM_NAME%", __Get%PARAM_TYPE%Info, &%PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));
+    // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+    // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+    __Message->Write("%PARAM_NAME%", __typeinfo(%PARAM_TYPE%), &%PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));
+    // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+    // <%%% END IN_PARAMS_NO_STRIP %%%>
+    __Message->Finalize();
+
+    __TransportChannel->Dispatch(__Message);
+
+    // <%%% START OUT_PARAMS_NO_STRIP %%%>
+    // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+    __Message->Read("%PARAM_NAME%", __Get%PARAM_TYPE%Info, &%PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));
+    // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+    // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+    __Message->Read("%PARAM_NAME%", __typeinfo(%PARAM_TYPE%), &%PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));
+    // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+    // <%%% END OUT_PARAMS_NO_STRIP %%%>
+  }
+  __finally
+  {
+    __Message->FreeStream();
+  }
+}
+
+// <%%% END PROCEDURE_OPERATIONS %%%>
+// <%%% END SERVICES %%%>
+// <%%% START EVENT_SINKS %%%>
+
+namespace %NAMESPACE_NAME%
+{
+// T%EVENT_SINK_NAME%_Writer
+class DELPHICLASS T%EVENT_SINK_NAME%_Writer;
+class T%EVENT_SINK_NAME%_Writer : public T%EVENT_SINK_WRITER_ANCESTOR_NAME%, I%EVENT_SINK_NAME%_Writer
+{
+  typedef T%EVENT_SINK_WRITER_ANCESTOR_NAME% inherited;
+protected:
+  // <%%% START OPERATIONS %%%>
+  void __fastcall %OPERATION_NAME%(const GUID __Sender
+					// <%%% START PARAMS %%%>
+					// <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+					, %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%
+					// <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+					// <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+					, %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%
+					// <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+					// <%%% END PARAMS %%%>
+					);
+  // <%%% END OPERATIONS %%%>
+public:
+  virtual HRESULT __stdcall QueryInterface(const GUID& IID, void **Obj) {
+	return inherited::QueryInterface(IID, (void *)Obj); }
+
+  virtual ULONG __stdcall AddRef() {
+	return inherited::_AddRef();  }
+
+  virtual ULONG __stdcall Release() {
+	return inherited::_Release(); }
+};
+
+}  // namespace %NAMESPACE_NAME%
+
+// <%%% START OPERATIONS %%%>
+void __fastcall T%EVENT_SINK_NAME%_Writer::%OPERATION_NAME%(const GUID __Sender
+  // <%%% START PARAMS %%%>
+  // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+  , %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%
+  // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+  , %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%
+  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+  // <%%% END PARAMS %%%>
+  )
+{
+  Binary* __eventdata = new Binary("");
+  try
+  {
+    __Message->InitializeEventMessage(NULL, "%LIBRARY_NAME%", EID_%EVENT_SINK_NAME%, "%OPERATION_NAME%");
+    // <%%% START PARAMS_NO_STRIP %%%>
+    // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+    __Message->Write("%PARAM_NAME%", __Get%PARAM_TYPE%Info, &%PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));
+    // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+    // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+    __Message->Write("%PARAM_NAME%", __typeinfo(%PARAM_TYPE%), %PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));
+    // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+    // <%%% END PARAMS_NO_STRIP %%%>
+    __Message->Finalize();
+
+    __Message->WriteToStream(__eventdata);
+
+    Repository->StoreEventData(__Sender, __eventdata, TROEventWriter::ExcludeSender, TROEventWriter::ExcludeSessionList, TROEventWriter::SessionList->CommaText);
+  }
+  __finally
+  {
+    delete __eventdata;
+  }
+}
+
+// <%%% END OPERATIONS %%%>
+/* T%EVENT_SINK_NAME%_Invoker */
+namespace %NAMESPACE_NAME%
+{
+class DELPHICLASS T%EVENT_SINK_NAME%_Invoker;
+class T%EVENT_SINK_NAME%_Invoker : public T%EVENT_SINK_INVOKER_ANCESTOR_NAME%
+{
+__published:
+  // <%%% START OPERATIONS %%%>
+  void __fastcall Invoke_%OPERATION_NAME%(TROEventReceiver* __EventReceiver, IROMessage* __Message, IUnknown* __Target);
+  // <%%% END OPERATIONS %%%>
+};
+} // namespace %NAMESPACE_NAME%
+
+// <%%% START OPERATIONS %%%>
+void __fastcall T%EVENT_SINK_NAME%_Invoker::Invoke_%OPERATION_NAME%(TROEventReceiver* __EventReceiver, IROMessage* __Message, IUnknown* __Target)
+{
+  // <%%% START PARAMS_NO_STRIP %%%>
+  // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+  %PARAM_TYPE% %PARAM_NAME%;
+  // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+  %PARAM_TYPE%* %PARAM_NAME%;
+  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+  // <%%% END PARAMS_NO_STRIP %%%>
+  // <%%% START IF_HAS_COMPLEX_TYPE %%%>
+  TROObjectDisposer* __lObjectDisposer;
+  // <%%% END IF_HAS_COMPLEX_TYPE %%%>
+  _di_I%EVENT_SINK_NAME% __%EVENT_SINK_NAME%Instance;
+
+  // <%%% START PARAMS_NO_STRIP %%%>
+  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+  %PARAM_NAME% = NULL;
+  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+  // <%%% END PARAMS_NO_STRIP %%%>
+  try
+  {
+    // <%%% START IN_PARAMS_NO_STRIP %%%>
+    // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+    __Message->Read("%PARAM_NAME%", __Get%PARAM_TYPE%Info, &%PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));
+    // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+    // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+    __Message->Read("%PARAM_NAME%", __typeinfo(%PARAM_TYPE%), %PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));
+    // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+    // <%%% END IN_PARAMS_NO_STRIP %%%>
+
+    if (__Target->QueryInterface(I%EVENT_SINK_NAME%_IID, reinterpret_cast<void**>(&__%EVENT_SINK_NAME%Instance)) == S_OK)
+    {
+      __%EVENT_SINK_NAME%Instance->%OPERATION_NAME%(
+                                      // <%%% START PARAMS %%%>
+                                      %PARAM_NAME%,
+                                      // <%%% END PARAMS %%%>
+                                    );
+    }
+    else
+    {
+      throw EIntfCastError::EIntfCastError("I%EVENT_SINK_NAME% not supported");
+    }
+
+    // <%%% START OUT_PARAMS_NO_STRIP %%%>
+    // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+    __Message->Write("%PARAM_NAME%", __Get%PARAM_TYPE%Info, &%PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));
+    // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+    // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+    __Message->Write("%PARAM_NAME%", __typeinfo(%PARAM_TYPE%), %PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));
+    // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+    // <%%% END OUT_PARAMS_NO_STRIP %%%>
+  }
+  __finally
+  {
+    // <%%% START IF_HAS_COMPLEX_TYPE %%%>
+    __lObjectDisposer = new TROObjectDisposer(__EventReceiver->operator IInterface *());
+    try
+    {
+      // <%%% START PARAMS_NO_STRIP %%%>
+      // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+      __lObjectDisposer->Add(%PARAM_NAME%);
+      // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+      // <%%% END PARAMS_NO_STRIP %%%>
+    }
+    __finally
+    {
+      delete __lObjectDisposer;
+    }
+    // <%%% END IF_HAS_COMPLEX_TYPE %%%>
+  }
+}
+
+// <%%% END OPERATIONS %%%>
+// <%%% END EVENT_SINKS %%%>
+void __initialization_%UNIT_NAME%()
+{
+  // <%%% START STRUCTS %%%>
+  RegisterROClass(__classid(%STRUCT_NAME%));
+  // <%%% END STRUCTS %%%>
+  // <%%% START ARRAYS %%%>
+  RegisterROClass(__classid(%ARRAY_NAME%));
+  // <%%% END ARRAYS %%%>
+  // <%%% START EXCEPTIONS %%%>
+  RegisterExceptionClass(__classid(%EXCEPTION_NAME%));
+  // <%%% END EXCEPTIONS %%%>
+  // <%%% START SERVICES %%%>
+  RegisterProxyClass(I%SERVICE_NAME%_IID, __classid(T%SERVICE_NAME%_Proxy));
+  // <%%% END SERVICES %%%>
+  // <%%% START EVENT_SINKS %%%>
+  RegisterEventWriterClass(I%EVENT_SINK_NAME%_IID, __classid(T%EVENT_SINK_NAME%_Writer));
+  RegisterEventInvokerClass(EID_%EVENT_SINK_NAME%, __classid(T%EVENT_SINK_NAME%_Invoker));
+  // <%%% END EVENT_SINKS %%%>     
+}
+
+void __finalization_%UNIT_NAME%()
+{
+  // <%%% START STRUCTS %%%>
+  UnregisterROClass(__classid(%STRUCT_NAME%));
+  // <%%% END STRUCTS %%%>
+  // <%%% START ARRAYS %%%>
+  UnregisterROClass(__classid(%ARRAY_NAME%));
+  // <%%% END ARRAYS %%%>
+  // <%%% START EXCEPTIONS %%%>
+  UnregisterExceptionClass(__classid(%EXCEPTION_NAME%));
+  // <%%% END EXCEPTIONS %%%>
+  // <%%% START SERVICES %%%>
+  UnregisterProxyClass(I%SERVICE_NAME%_IID);
+  // <%%% END SERVICES %%%>
+  // <%%% START EVENT_SINKS %%%>
+  UnregisterEventWriterClass(I%EVENT_SINK_NAME%_IID);
+  UnregisterEventInvokerClass(EID_%EVENT_SINK_NAME%);
+  // <%%% END EVENT_SINKS %%%>     
+}
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.intf.h b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.intf.h
new file mode 100644
index 0000000..667037c
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.intf.h	
@@ -0,0 +1,519 @@
+// %UNIT_NAME%
+//
+/*---------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project.                                }
+{                                                                            }
+{ Do not modify this unit manually, or your changes will be lost when this   }
+{ unit is regenerated the next time you compile the project.                 }
+{---------------------------------------------------------------------------*/
+
+#ifndef %UNIT_NAME%H
+#define %UNIT_NAME%H
+
+#pragma delphiheader begin
+#pragma option push
+#pragma option -w-            // All warnings off
+#pragma option -Vx            // Zero-length empty class member functions
+#pragma pack(push,8)
+
+#include <System.hpp>         // Pascal unit
+#include <Classes.hpp>        // Pascal unit
+#include <Urotypes.hpp>       // Pascal unit
+#include <Uroclient.hpp>      // Pascal unit
+#include <Uroclientintf.hpp>  // Pascal unit
+#include <Uroxmlintf.hpp>     // Pascal unit
+// <%%% START REQUIRED_UNITS %%%>
+#include <%REQUIRED_UNIT_NAME%.hpp>
+// <%%% END REQUIRED_UNITS %%%>
+
+namespace %NAMESPACE_NAME%
+{
+// Library ID
+#define LibraryUID "%LIBRARY_UID%"
+#define TargetNamespace "%NAMESPACE_NAME%"
+
+// Service Interface ID's
+// <%%% START SERVICES %%%>
+const GUID I%SERVICE_NAME%_IID = Sysutils::StringToGUID("%SERVICE_UID%");
+// <%%% END SERVICES %%%>
+
+// Event ID's
+// <%%% START EVENT_SINKS %%%>
+#define EID_%EVENT_SINK_NAME% "%EVENT_SINK_NAME%"
+const GUID I%EVENT_SINK_NAME%_IID = Sysutils::StringToGUID("%EVENT_SINK_UID%");
+// <%%% END EVENT_SINKS %%%>
+
+// Forward declarations
+// <%%% START SERVICES %%%>
+__interface I%SERVICE_NAME%; // = interface;
+// <%%% END SERVICES %%%>
+// <%%% START ARRAYS %%%>
+class DELPHICLASS %ARRAY_NAME%;
+// <%%% END ARRAYS %%%>
+// <%%% START STRUCTS %%%>
+class DELPHICLASS %STRUCT_NAME%;
+// <%%% END STRUCTS %%%>
+// <%%% START EXCEPTIONS %%%>
+class DELPHICLASS %EXCEPTION_NAME%;
+// <%%% END EXCEPTIONS %%%>
+// <%%% START EVENT_SINKS %%%>
+__interface I%EVENT_SINK_NAME%; // = interface;
+// <%%% END EVENT_SINKS %%%>
+
+/* Enumerateds */
+// <%%% START ENUMS %%%>
+// <%%% START DOCUMENTATION %%%>
+
+/* Description:
+    %CONTENT% */
+// <%%% END DOCUMENTATION %%%>
+#pragma option push -b-
+enum %ENUM_NAME% {
+                 // <%%% START VALUES %%%>
+                 %VALUE_NAME%,                
+                 // <%%% END VALUES %%%>                
+                 };
+#pragma option pop
+              
+// <%%% END ENUMS %%%>
+/* Simple type holders */
+// Note: In order to get type info for a simple type, we MUST have it from the
+// published property of a Delphi class. There is no other way as __typeinfo
+// requires the type to actually derive from TObject. Hence the reason why
+// we create these dummy classes with a simple property of the correct type.
+// <%%% START SIMPLE_TYPES %%%>
+#ifndef __Get%TYPE_NAME%Info
+class DELPHICLASS %TYPE_NAME%TypeHolder;
+class %TYPE_NAME%TypeHolder : public TPersistent
+{
+private:
+  %TYPE_NAME% FHolderField;
+__published:
+  __property %TYPE_NAME% HolderField = {read=FHolderField, write=FHolderField};
+};
+#define __Get%TYPE_NAME%Info *::GetPropInfo(__typeinfo(%TYPE_NAME%TypeHolder), "HolderField")->PropType
+#endif  // __Get%TYPE_NAME%Info
+
+// <%%% END SIMPLE_TYPES %%%>
+// <%%% START STRUCTS %%%>
+// %STRUCT_NAME%
+class DELPHICLASS %STRUCT_NAME%;
+class %STRUCT_NAME% : public Urotypes::TROComplexType
+{
+  // Allow the use of "inherited" in our class as Delphi allows
+  typedef Urotypes::TROComplexType inherited;
+  
+private:
+  // <%%% START FIELDS_NO_STRIP %%%>
+  // <%%% START IF_FIELD_TYPE_SIMPLE %%%>
+  %FIELD_TYPE% f%FIELD_NAME%;
+  // <%%% END IF_FIELD_TYPE_SIMPLE %%%>
+  // <%%% START IF_FIELD_TYPE_COMPLEX %%%>
+  %FIELD_TYPE%* f%FIELD_NAME%;
+  // <%%% END IF_FIELD_TYPE_COMPLEX %%%>
+  // <%%% END FIELDS_NO_STRIP %%%>
+
+  // <%%% START FIELDS_NO_STRIP %%%>
+  // <%%% START IF_FIELD_TYPE_COMPLEX %%%>
+  %FIELD_TYPE%* __fastcall Get%FIELD_NAME%();
+  // <%%% END IF_FIELD_TYPE_COMPLEX %%%>
+  // <%%% END FIELDS_NO_STRIP %%%>
+public:
+  virtual void __fastcall Assign(Classes::TPersistent* iSource);
+  // <%%% START IF_HAS_FIELDS %%%>
+  virtual void __fastcall ReadComplex(TObject* ASerializer);
+  virtual void __fastcall WriteComplex(TObject* ASerializer);
+  // <%%% END IF_HAS_FIELDS %%%>
+
+__published:
+  // <%%% START FIELDS_NO_STRIP %%%>
+  // <%%% START IF_FIELD_TYPE_SIMPLE %%%>
+  __property %FIELD_TYPE% %FIELD_NAME% = {read=f%FIELD_NAME%, write=f%FIELD_NAME%}; 
+  // <%%% END IF_FIELD_TYPE_SIMPLE %%%>
+  // <%%% START IF_FIELD_TYPE_COMPLEX %%%>
+  __property %FIELD_TYPE%* %FIELD_NAME% = {read=Get%FIELD_NAME%, write=f%FIELD_NAME%};
+  // <%%% END IF_FIELD_TYPE_COMPLEX %%%>
+  // <%%% END FIELDS_NO_STRIP %%%>
+public:
+  // Pascal constructor/destructor
+  #pragma option push -w-inl
+  /* TROComplexType.Create */ inline __fastcall virtual %STRUCT_NAME%()/* overload */ : Urotypes::TROComplexType() {}
+  #pragma option pop
+  #pragma option push -w-inl
+  /* TROComplexType.Destroy */ inline __fastcall virtual ~%STRUCT_NAME%() {}
+  #pragma option pop
+};
+
+// %STRUCT_COLLECTION_NAME%
+class DELPHICLASS %STRUCT_COLLECTION_NAME%;
+class %STRUCT_COLLECTION_NAME% : public Uroclasses::TROCollection
+{
+  typedef Uroclasses::TROCollection inherited;
+
+public:
+  %STRUCT_NAME%* operator[](int Index) { return Items[Index]; }
+
+protected:
+  __fastcall %STRUCT_COLLECTION_NAME%(TMetaClass* aItemClass) : Uroclasses::TROCollection(aItemClass) {} /*overload*/
+  %STRUCT_NAME%* __fastcall GetItems(const int Index);
+  void __fastcall SetItems(const int Index, %STRUCT_NAME%* Value);
+
+public:
+  __fastcall %STRUCT_COLLECTION_NAME%() : Uroclasses::TROCollection(__classid(%STRUCT_NAME%)) {} /*overload*/
+  HIDESBASE %STRUCT_NAME%* __fastcall Add(); /*reintroduce*/
+  // <%%% START ARRAYS_IS_FOUND %%%>
+  void SaveToArray(%ARRAY_NAME%* anArray);
+  void LoadFromArray(%ARRAY_NAME%* anArray);
+  // <%%% END ARRAYS_IS_FOUND %%%>
+  __property %STRUCT_NAME%* Items[int Index] = {read=GetItems, write=SetItems /*default*/};
+  #pragma option push -w-inl
+  /* TCollection.Destroy */ inline __fastcall virtual ~%STRUCT_COLLECTION_NAME%() {}
+  #pragma option pop
+};
+
+typedef DynamicArray<%STRUCT_NAME%* > %UNIT_NAME%_%STRUCT_NAME%__4;
+
+// <%%% END STRUCTS %%%>
+// <%%% START ARRAYS %%%>
+// %ARRAY_NAME%
+
+// <%%% START IF_ARRAY_TYPE_SIMPLE %%%>
+typedef DynamicArray<%ARRAY_TYPE%> %ARRAY_NAME%_%ARRAY_TYPE%;
+// <%%% END IF_ARRAY_TYPE_SIMPLE %%%>
+// <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
+typedef DynamicArray<%ARRAY_TYPE%* > %ARRAY_NAME%_%ARRAY_TYPE%;
+// <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
+
+class DELPHICLASS %ARRAY_NAME%;
+class %ARRAY_NAME% : public Urotypes::TROArray
+{
+  typedef Urotypes::TROArray inherited;
+
+public:
+  // <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
+  %ARRAY_TYPE%* operator[](const int Index) { return Items[Index]; }
+  // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
+  // <%%% START IF_ARRAY_TYPE_SIMPLE %%%>
+  %ARRAY_TYPE% operator[](const int Index) { return Items[Index]; }
+  // <%%% END IF_ARRAY_TYPE_SIMPLE %%%>
+
+private:
+  int fCount;
+  %ARRAY_NAME%_%ARRAY_TYPE% fItems;
+
+protected:
+  virtual void __fastcall Grow();
+  // <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
+  %ARRAY_TYPE%* __fastcall GetItems(const int Index);
+  void __fastcall SetItems(const int Index, %ARRAY_TYPE%* Value);
+  // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
+  // <%%% START IF_ARRAY_TYPE_SIMPLE %%%>
+  %ARRAY_TYPE% __fastcall GetItems(const int Index);
+  void __fastcall SetItems(const int Index, %ARRAY_TYPE% Value);
+  // <%%% END IF_ARRAY_TYPE_SIMPLE %%%>
+  virtual int __fastcall GetCount();
+
+public:
+  /* virtual class method */ 
+  // <%%% START IF_ARRAY_TYPE_SIMPLE %%%>
+  virtual Typinfo::PTypeInfo __fastcall GetItemType(const TMetaClass* vmt) { return __Get%ARRAY_TYPE%Info; }
+  // <%%% END IF_ARRAY_TYPE_SIMPLE %%%>
+  // <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
+  virtual Typinfo::PTypeInfo __fastcall GetItemType(const TMetaClass* vmt) { return __typeinfo(%ARRAY_TYPE%); }
+  // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
+
+  // <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
+  /* virtual class method */ 
+  virtual TMetaClass* __fastcall GetItemClass(const TMetaClass* vmt) { return __classid(%ARRAY_TYPE%); }
+  
+  // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
+  /* virtual class method */  
+  virtual int __fastcall GetItemSize(const TMetaClass* vmt) { return sizeof(%ARRAY_TYPE%); }
+    
+  virtual void * __fastcall GetItemRef(const int Index);
+  // <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
+  virtual void __fastcall SetItemRef(const int Index, void* Ref);
+  // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
+  virtual void __fastcall Clear();
+  virtual void __fastcall Delete(const int Index);
+  virtual void __fastcall Resize(const int ElementCount);
+  virtual void __fastcall Assign(Classes::TPersistent* iSource);
+  virtual void __fastcall ReadComplex(TObject* ASerializer);
+  virtual void __fastcall WriteComplex(TObject* ASerializer);
+  // <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
+  %ARRAY_TYPE%* __fastcall Add()/* overload */;
+  int __fastcall Add(%ARRAY_TYPE%* Value)/* overload */;
+  // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
+  // <%%% START IF_ARRAY_TYPE_SIMPLE %%%>
+  int __fastcall Add(%ARRAY_TYPE% Value)/* overload */;
+  // <%%% END IF_ARRAY_TYPE_SIMPLE %%%>
+  __property int Count = {read=GetCount, nodefault};
+  // <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
+  __property %ARRAY_TYPE%* Items[int Index] = {read=GetItems, write=SetItems/*, default*/};
+  // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
+  // <%%% START IF_ARRAY_TYPE_SIMPLE %%%>
+  __property %ARRAY_TYPE% Items[int Index] = {read=GetItems, write=SetItems/*, default*/};
+  // <%%% END IF_ARRAY_TYPE_SIMPLE %%%>
+  __property %ARRAY_NAME%_%ARRAY_TYPE% InnerArray = {read=fItems, nodefault};
+public:
+  #pragma option push -w-inl
+  /* TROArray.Destroy */ inline __fastcall virtual ~%ARRAY_NAME%() {Clear();}
+  #pragma option pop
+
+public:
+  #pragma option push -w-inl
+  /* TROComplexType.Create */ inline __fastcall virtual %ARRAY_NAME%()/* overload */ : Urotypes::TROArray() {}
+  #pragma option pop
+};
+
+// <%%% END ARRAYS %%%>
+// <%%% START EXCEPTIONS %%%>
+// <%%% START DOCUMENTATION %%%>
+
+/* Description:
+    %CONTENT% */
+// <%%% END DOCUMENTATION %%%>
+class DELPHICLASS %EXCEPTION_NAME%;
+class %EXCEPTION_NAME% : public %EXCEPTION_ANCESTOR_NAME%
+{
+  typedef %EXCEPTION_ANCESTOR_NAME% inherited;
+  
+private:
+  // <%%% START FIELDS_NO_STRIP %%%>
+  // <%%% START IF_FIELD_TYPE_SIMPLE %%%>
+  %FIELD_TYPE% f%FIELD_NAME%;
+  // <%%% END IF_FIELD_TYPE_SIMPLE %%%>
+  // <%%% START IF_FIELD_TYPE_COMPLEX %%%>
+  %FIELD_TYPE%* f%FIELD_NAME%;
+  // <%%% END IF_FIELD_TYPE_COMPLEX %%%>
+  // <%%% END FIELDS_NO_STRIP %%%>
+public:
+  %EXCEPTION_NAME%(AnsiString anExceptionMessage
+                   // <%%% START ANCESTOR_FIELDS %%%>
+                   // <%%% START IF_FIELD_TYPE_SIMPLE %%%>
+                   , %FIELD_TYPE% a%FIELD_NAME% 
+                   // <%%% END IF_FIELD_TYPE_SIMPLE %%%>
+                   // <%%% START IF_FIELD_TYPE_COMPLEX %%%>
+                   , %FIELD_TYPE%* a%FIELD_NAME% 
+                   // <%%% END IF_FIELD_TYPE_COMPLEX %%%>
+                   // <%%% END ANCESTOR_FIELDS %%%>
+                   // <%%% START FIELDS_NO_STRIP %%%>
+                   // <%%% START IF_FIELD_TYPE_SIMPLE %%%>
+                   , %FIELD_TYPE% a%FIELD_NAME% 
+                   // <%%% END IF_FIELD_TYPE_SIMPLE %%%>
+                   // <%%% START IF_FIELD_TYPE_COMPLEX %%%>
+                   , %FIELD_TYPE%* a%FIELD_NAME% 
+                   // <%%% END IF_FIELD_TYPE_COMPLEX %%%>
+                   // <%%% END FIELDS_NO_STRIP %%%>
+                   );
+  // <%%% START IF_HAS_FIELDS %%%>
+  virtual void __fastcall ReadException(TObject* ASerializer);
+  virtual void __fastcall WriteException(TObject* ASerializer);
+  // <%%% END IF_HAS_FIELDS %%%>
+__published:
+  // <%%% START FIELDS_NO_STRIP %%%>
+  // <%%% START IF_FIELD_TYPE_SIMPLE %%%>
+  __property %FIELD_TYPE% %FIELD_NAME% = {read=f%FIELD_NAME%, write=f%FIELD_NAME%}; 
+  // <%%% END IF_FIELD_TYPE_SIMPLE %%%>
+  // <%%% START IF_FIELD_TYPE_COMPLEX %%%>
+  __property %FIELD_TYPE%* %FIELD_NAME% = {read=f%FIELD_NAME%, write=f%FIELD_NAME%}; 
+  // <%%% END IF_FIELD_TYPE_COMPLEX %%%>
+  // <%%% END FIELDS_NO_STRIP %%%>
+};
+
+// <%%% END EXCEPTIONS %%%>
+// <%%% START SERVICES %%%>
+__interface I%SERVICE_NAME%;
+typedef System::DelphiInterface<I%SERVICE_NAME%> _di_I%SERVICE_NAME%;
+__interface INTERFACE_UUID("%SERVICE_UID%") I%SERVICE_NAME% : public %SERVICE_ANCESTOR_NAME%
+{
+public:
+  // <%%% START FUNCTION_OPERATIONS %%%>
+  // <%%% START IF_RESULT_SIMPLE %%%>
+  virtual %OPERATION_RESULT% __fastcall %OPERATION_NAME%(
+  // <%%% END IF_RESULT_SIMPLE %%%>
+  // <%%% START IF_RESULT_COMPLEX %%%>
+  virtual %OPERATION_RESULT%* __fastcall %OPERATION_NAME%(
+  // <%%% END IF_RESULT_COMPLEX %%%>
+    // <%%% START PARAMS %%%>
+    // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+    %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+    // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+    // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+    %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+    // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+    // <%%% END PARAMS %%%>
+    ) = 0; // pure virtual function - interface only
+  // <%%% END FUNCTION_OPERATIONS %%%>
+  // <%%% START PROCEDURE_OPERATIONS %%%>
+  virtual void __fastcall %OPERATION_NAME%(
+    // <%%% START PARAMS %%%>
+    // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+    %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+    // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+    // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+    %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+    // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+    // <%%% END PARAMS %%%>
+    ) = 0; // pure virtual function - interface only
+  // <%%% END PROCEDURE_OPERATIONS %%%>
+};
+
+class DELPHICLASS T%SERVICE_NAME%_Proxy;
+class T%SERVICE_NAME%_Proxy : public %SERVICE_PROXY_ANCESTOR_NAME%, I%SERVICE_NAME%
+{
+  typedef %SERVICE_PROXY_ANCESTOR_NAME% inherited;
+  
+protected:
+  virtual AnsiString __fastcall __GetInterfaceName()
+    { return "%SERVICE_NAME%"; }
+
+  // <%%% START FUNCTION_OPERATIONS %%%>
+  // <%%% START IF_RESULT_SIMPLE %%%>
+  virtual %OPERATION_RESULT% __fastcall %OPERATION_NAME%(
+  // <%%% END IF_RESULT_SIMPLE %%%>
+  // <%%% START IF_RESULT_COMPLEX %%%>
+  virtual %OPERATION_RESULT%* __fastcall %OPERATION_NAME%(
+  // <%%% END IF_RESULT_COMPLEX %%%>
+    // <%%% START PARAMS %%%>
+    // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+    %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+    // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+    // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+    %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+    // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+    // <%%% END PARAMS %%%>
+    );
+  // <%%% END FUNCTION_OPERATIONS %%%>
+  // <%%% START PROCEDURE_OPERATIONS %%%>
+  virtual void __fastcall %OPERATION_NAME%(
+    // <%%% START PARAMS %%%>
+    // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+    %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+    // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+    // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+    %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+    // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+    // <%%% END PARAMS %%%>
+    );
+  // <%%% END PROCEDURE_OPERATIONS %%%>
+  
+public:
+  #pragma option push -w-inl
+  /* TROProxy.Create */ inline __fastcall virtual T%SERVICE_NAME%_Proxy(const Uroclientintf::_di_IROMessage aMessage, const Uroclientintf::_di_IROTransportChannel aTransportChannel)/* overload */ :
+    %SERVICE_PROXY_ANCESTOR_NAME%(aMessage, aTransportChannel) {}
+  #pragma option pop
+  
+  virtual HRESULT __stdcall QueryInterface(const GUID& IID, void **Obj) {
+    return inherited::QueryInterface(IID, (void *)Obj); }
+
+  virtual ULONG __stdcall AddRef() {
+    return inherited::_AddRef();  }
+
+  virtual ULONG __stdcall Release() {
+    return inherited::_Release(); }
+};
+
+// Co%SERVICE_NAME%
+class DELPHICLASS Co%SERVICE_NAME%;
+class Co%SERVICE_NAME% : public System::TObject
+{
+  typedef System::TObject inherited;
+
+public:
+  static _di_I%SERVICE_NAME% __fastcall Create(const Uroclientintf::_di_IROMessage aMessage,
+                        Uroclientintf::_di_IROTransportChannel aTransportChannel)
+  {
+    _di_I%SERVICE_NAME% result;
+    T%SERVICE_NAME%_Proxy* proxy = new T%SERVICE_NAME%_Proxy(aMessage, aTransportChannel);
+    if (proxy->QueryInterface(I%SERVICE_NAME%_IID, reinterpret_cast<void**>(&result)) != S_OK)
+    {
+      delete proxy;
+      throw EIntfCastError::EIntfCastError("I%SERVICE_NAME% not supported");
+    }
+    return result;
+  };
+
+  static _di_I%SERVICE_NAME% __fastcall Create( Uroclient::TROMessage* aMessage,
+                        Uroclient::TROTransportChannel *aTransportChannel)
+  {
+    _di_IROMessage __Message;
+    _di_IROTransportChannel __TransportChannel;
+
+    if (aMessage->GetInterface(__Message))
+    {
+      if (aTransportChannel->GetInterface(__TransportChannel))
+        return Create(__Message, __TransportChannel);
+      else
+        throw EIntfCastError::EIntfCastError("IROTransportChannel not supported");
+    }
+    else
+    {
+      throw EIntfCastError::EIntfCastError("IROMessage not supported");
+    }
+  };
+};
+
+// <%%% END SERVICES %%%>
+// <%%% START EVENT_SINKS %%%>
+/* I%EVENT_SINK_NAME% */
+// <%%% START DOCUMENTATION %%%>
+
+/* Description:
+    %CONTENT% */
+// <%%% END DOCUMENTATION %%%>
+__interface I%EVENT_SINK_NAME%;
+typedef System::DelphiInterface<I%EVENT_SINK_NAME%> _di_I%EVENT_SINK_NAME%;
+__interface INTERFACE_UUID("%EVENT_SINK_UID%") I%EVENT_SINK_NAME% : public %EVENT_SINK_ANCESTOR_NAME%
+{
+public:
+  // <%%% START OPERATIONS %%%>
+  virtual void __fastcall %OPERATION_NAME%(
+    // <%%% START PARAMS %%%>
+    // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+    %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+    // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+    // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+    %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+    // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+    // <%%% END PARAMS %%%>
+    ) = 0; // pure virtual function - interface only
+  // <%%% END OPERATIONS %%%>
+};
+
+/* I%EVENT_SINK_NAME%_Writer */
+// <%%% START DOCUMENTATION %%%>
+
+/* Description:
+    %CONTENT% */
+// <%%% END DOCUMENTATION %%%>
+__interface I%EVENT_SINK_NAME%_Writer;
+typedef System::DelphiInterface<I%EVENT_SINK_NAME%_Writer> _di_I%EVENT_SINK_NAME%_Writer;
+__interface INTERFACE_UUID("%EVENT_SINK_UID%") I%EVENT_SINK_NAME%_Writer : public I%EVENT_SINK_WRITER_ANCESTOR_NAME%
+{
+public:
+  // <%%% START OPERATIONS %%%>
+  virtual void __fastcall %OPERATION_NAME%(GUID __Sender 
+    // <%%% START PARAMS %%%>
+    // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+    , %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%
+    // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+    // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+    , %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%
+    // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+    // <%%% END PARAMS %%%>
+    ) = 0; // pure virtual function - interface only
+  // <%%% END OPERATIONS %%%>
+};
+
+// <%%% END EVENT_SINKS %%%>
+}  // namespace %NAMESPACE_NAME%
+
+using namespace %NAMESPACE_NAME%;
+#pragma pack(pop)
+#pragma option pop
+
+#pragma delphiheader end.
+#endif  // %UNIT_NAME%H
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.intf.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.intf.pas
new file mode 100644
index 0000000..a11aedd
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.intf.pas	
@@ -0,0 +1,1511 @@
+unit %UNIT_NAME%;
+
+{----------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project .                               }
+{                                                                            }
+{ Do not modify this unit manually, or your changes will be lost when this   }
+{ unit is regenerated the next time you compile the project.                 }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  {vcl:} Classes, TypInfo,
+  // <%%% START REQUIRED_UNITS %%%>
+  {Required:} %REQUIRED_UNIT_NAME%,
+  // <%%% END REQUIRED_UNITS %%%>
+  {RemObjects:} uROXMLIntf, uROClasses, uROClient, uROTypes, uROClientIntf;
+
+const
+  { Library ID }
+  LibraryUID = '%LIBRARY_UID%';
+  TargetNamespace = '%NAMESPACE_NAME%';
+
+  { Service Interface ID's }
+  // <%%% START SERVICES %%%>
+  I%SERVICE_NAME%_IID : TGUID = '%SERVICE_UID%';
+  // <%%% END SERVICES %%%>
+  
+  { Event ID's }
+  // <%%% START EVENT_SINKS %%%>
+  EID_%EVENT_SINK_NAME% = '%EVENT_SINK_NAME%';
+  // <%%% END EVENT_SINKS %%%>
+  
+type
+  { Forward declarations }
+  // <%%% START SERVICES %%%>
+  I%SERVICE_NAME% = interface;
+  // <%%% END SERVICES %%%>
+  // <%%% START ARRAYS %%%>
+  %ARRAY_NAME% = class;
+  // <%%% END ARRAYS %%%>
+  // <%%% START STRUCTS %%%>
+  %STRUCT_NAME% = class;
+  // <%%% END STRUCTS %%%>
+  // <%%% START EXCEPTIONS %%%>
+  %EXCEPTION_NAME% = class;
+  // <%%% END EXCEPTIONS %%%>
+  // <%%% START EVENT_SINKS %%%>
+  I%EVENT_SINK_NAME% = interface;
+  // <%%% END EVENT_SINKS %%%>
+
+  { Enumerateds }
+  // <%%% START ENUMS %%%>
+  // <%%% START DOCUMENTATION %%%>
+
+  { Description:
+      %CONTENT% }
+  // <%%% END DOCUMENTATION %%%>
+  %ENUM_NAME% = (
+                // <%%% START VALUES %%%>
+                %VALUE_NAME%,
+                // <%%% END VALUES %%%>
+                );
+
+  // <%%% END ENUMS %%%>
+  // <%%% START STRUCTS %%%>
+  { %STRUCT_NAME% }
+  // <%%% START DOCUMENTATION %%%>
+
+  { Description:
+      %CONTENT% }
+  // <%%% END DOCUMENTATION %%%>
+  %STRUCT_NAME% = class(%STRUCT_ANCESTOR_NAME%)
+  private
+    FDestroying: Boolean;
+
+    // <%%% START FIELDS_NO_STRIP %%%>
+    f%FIELD_NAME%: %FIELD_TYPE%;
+    // <%%% END FIELDS_NO_STRIP %%%>
+    // <%%% START FIELDS_NO_STRIP %%%>
+    // <%%% START IF_FIELD_TYPE_COMPLEX %%%>
+    function Get%FIELD_NAME%: %FIELD_TYPE%;
+    // <%%% END IF_FIELD_TYPE_COMPLEX %%%>
+    // <%%% END FIELDS_NO_STRIP %%%>
+  public
+    // <%%% START STRUCT_GENERATE_DEFAULT_VALUES %%%>
+    constructor Create(aCollection : TCollection); override;
+    // <%%% END STRUCT_GENERATE_DEFAULT_VALUES %%%>
+    procedure Assign(iSource: TPersistent); override;
+    destructor Destroy; override;
+    // <%%% START IF_HAS_FIELDS %%%>
+    procedure ReadComplex(ASerializer: TObject); override;
+    procedure WriteComplex(ASerializer: TObject); override;
+    // <%%% END IF_HAS_FIELDS %%%>
+  published 
+    // Fields must be published for the ancestor destructor to find and destroy them.
+    // <%%% START FIELDS_NO_STRIP %%%>
+    // <%%% START IF_FIELD_TYPE_SIMPLE %%%>
+    property %FIELD_NAME%:%FIELD_TYPE% read f%FIELD_NAME% write f%FIELD_NAME%;
+    // <%%% END IF_FIELD_TYPE_SIMPLE %%%>
+    // <%%% START IF_FIELD_TYPE_COMPLEX %%%>
+    property %FIELD_NAME%:%FIELD_TYPE% read Get%FIELD_NAME% write f%FIELD_NAME%;
+    // <%%% END IF_FIELD_TYPE_COMPLEX %%%>
+    // <%%% END FIELDS_NO_STRIP %%%>
+  end;
+
+  { %STRUCT_COLLECTION_NAME% }
+  %STRUCT_COLLECTION_NAME% = class(%STRUCT_ANCESTOR_COLLECTION_NAME%)
+  protected
+    constructor Create(aItemClass: TCollectionItemClass); overload;
+    function GetItems(aIndex: integer): %STRUCT_NAME%;
+    procedure SetItems(aIndex: integer; const Value: %STRUCT_NAME%);
+  public
+    constructor Create; overload;
+    function Add: %STRUCT_NAME%; reintroduce;
+    // <%%% START ARRAYS_IS_FOUND %%%>
+    procedure SaveToArray(anArray: %ARRAY_NAME%); overload;
+    procedure LoadFromArray(anArray: %ARRAY_NAME%); overload;
+    // <%%% END ARRAYS_IS_FOUND %%%>
+    property Items[Index: integer]:%STRUCT_NAME% read GetItems write SetItems; default;
+  end;
+
+  // <%%% END STRUCTS %%%>
+  // <%%% START ARRAYS %%%>
+  { %ARRAY_NAME% }
+  // <%%% START DOCUMENTATION %%%>
+
+  { Description:
+      %CONTENT% }
+  // <%%% END DOCUMENTATION %%%>
+  %ARRAY_NAME%_%ARRAY_TYPE% = array of %ARRAY_TYPE%;
+  %ARRAY_NAME% = class(TROArray)
+  private
+    fCount: Integer;
+    fItems : %ARRAY_NAME%_%ARRAY_TYPE%;
+  protected
+    procedure Grow; virtual;
+    function GetItems(aIndex: integer): %ARRAY_TYPE%;
+    procedure SetItems(aIndex: integer; const Value: %ARRAY_TYPE%);
+    function GetCount: integer; override;
+  public
+    class function GetItemType: PTypeInfo; override;
+    // <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
+    class function GetItemClass: TClass; override;
+    // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
+    class function GetItemSize: integer; override;
+
+    function GetItemRef(aIndex: integer): pointer; override;
+    // <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
+    procedure SetItemRef(aIndex: integer; Ref: pointer); override;
+    // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
+    procedure Clear; override;
+    procedure Delete(aIndex: integer); override;
+    procedure Resize(ElementCount: integer); override;
+
+    procedure Assign(iSource:TPersistent); override;
+    procedure ReadComplex(ASerializer: TObject); override;
+    procedure WriteComplex(ASerializer: TObject); override;
+    // <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
+    function Add: %ARRAY_TYPE%; overload;
+    // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
+    function Add(const Value: %ARRAY_TYPE%):integer; overload;
+    // <%%% START IF_ARRAY_TYPE_SIMPLE %%%>
+    function GetIndex(const aPropertyName : string;
+                      const aPropertyValue : Variant;
+                      StartFrom : integer = 0;
+                      Options : TROSearchOptions = [soIgnoreCase]) : integer; override;
+    // <%%% END IF_ARRAY_TYPE_SIMPLE %%%>
+
+    property Count : integer read GetCount;
+    property Items[Index: integer]:%ARRAY_TYPE% read GetItems write SetItems; default;
+    property InnerArray: %ARRAY_NAME%_%ARRAY_TYPE% read fItems;
+  end;
+
+  // <%%% END ARRAYS %%%>
+  { Exceptions }
+  // <%%% START EXCEPTIONS %%%>
+  // <%%% START DOCUMENTATION %%%>
+
+  { Description:
+      %CONTENT% }
+  // <%%% END DOCUMENTATION %%%>
+  %EXCEPTION_NAME% = class(%EXCEPTION_ANCESTOR_NAME%)
+  private
+    // <%%% START FIELDS_NO_STRIP %%%>
+    f%FIELD_NAME%: %FIELD_TYPE%;
+    // <%%% END FIELDS_NO_STRIP %%%>
+  public
+    constructor Create(anExceptionMessage : string
+                       // <%%% START ANCESTOR_FIELDS %%%>
+                       ; a%FIELD_NAME%: %FIELD_TYPE%
+                       // <%%% END ANCESTOR_FIELDS %%%>
+                       // <%%% START FIELDS_NO_STRIP %%%>
+                       ; a%FIELD_NAME%: %FIELD_TYPE%
+                       // <%%% END FIELDS_NO_STRIP %%%>
+                       );
+    // <%%% START IF_HAS_FIELDS %%%>
+    procedure ReadException(ASerializer: TObject); override;
+    procedure WriteException(ASerializer: TObject); override;
+    // <%%% END IF_HAS_FIELDS %%%>
+  published
+    // <%%% START FIELDS_NO_STRIP %%%>
+    property %FIELD_NAME%: %FIELD_TYPE% read f%FIELD_NAME% write f%FIELD_NAME%;
+    // <%%% END FIELDS_NO_STRIP %%%>
+  end;
+
+  // <%%% END EXCEPTIONS %%%>
+  // <%%% START SERVICES %%%>
+  { I%SERVICE_NAME% }
+  // <%%% START DOCUMENTATION %%%>
+
+  { Description:
+      %CONTENT% }
+  // <%%% END DOCUMENTATION %%%>
+  I%SERVICE_NAME% = interface%SERVICE_ANCESTOR_NAME%
+    ['%SERVICE_UID%']
+    // <%%% START FUNCTION_OPERATIONS %%%>
+    function %OPERATION_NAME%(
+               // <%%% START PARAMS %%%>
+               %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;
+               // <%%% END PARAMS %%%>
+               ): %OPERATION_RESULT%;
+    // <%%% END FUNCTION_OPERATIONS %%%>
+    // <%%% START PROCEDURE_OPERATIONS %%%>
+    procedure %OPERATION_NAME%(
+                // <%%% START PARAMS %%%>
+                %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;
+                // <%%% END PARAMS %%%>
+                );
+    // <%%% END PROCEDURE_OPERATIONS %%%>
+  end;
+
+  { Co%SERVICE_NAME% }
+  Co%SERVICE_NAME% = class
+    class function Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): I%SERVICE_NAME%;
+  end;
+
+  { T%SERVICE_NAME%_Proxy }
+  T%SERVICE_NAME%_Proxy = class(%SERVICE_PROXY_ANCESTOR_NAME%, I%SERVICE_NAME%)
+  protected
+    function __GetInterfaceName:string; override;
+
+    // <%%% START FUNCTION_OPERATIONS %%%>
+    function %OPERATION_NAME%(
+               // <%%% START PARAMS %%%>
+               %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;
+               // <%%% END PARAMS %%%>
+               ): %OPERATION_RESULT%;
+    // <%%% END FUNCTION_OPERATIONS %%%>
+    // <%%% START PROCEDURE_OPERATIONS %%%>
+    procedure %OPERATION_NAME%(
+                // <%%% START PARAMS %%%>
+                %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;
+                // <%%% END PARAMS %%%>
+                );
+    // <%%% END PROCEDURE_OPERATIONS %%%>
+  end;
+
+  // <%%% END SERVICES %%%>
+  // <%%% START EVENT_SINKS %%%>
+  { I%EVENT_SINK_NAME% }
+  // <%%% START DOCUMENTATION %%%>
+
+  { Description:
+      %CONTENT% }
+  // <%%% END DOCUMENTATION %%%>
+  I%EVENT_SINK_NAME% = interface%EVENT_SINK_ANCESTOR_NAME%
+    ['%EVENT_SINK_UID%']
+    // <%%% START OPERATIONS %%%>
+    procedure %OPERATION_NAME%(
+                // <%%% START PARAMS %%%>
+                %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;
+                // <%%% END PARAMS %%%>
+                );
+    // <%%% END OPERATIONS %%%>
+  end;
+
+  { I%EVENT_SINK_NAME%_Writer }
+  // <%%% START DOCUMENTATION %%%>
+
+  { Description:
+      %CONTENT% }
+  // <%%% END DOCUMENTATION %%%>
+  I%EVENT_SINK_NAME%_Writer = interface(I%EVENT_SINK_WRITER_ANCESTOR_NAME%)
+    ['%EVENT_SINK_UID%']
+    // <%%% START OPERATIONS %%%>
+    procedure %OPERATION_NAME%(const __Sender : TGUID
+                // <%%% START PARAMS %%%>
+                ; %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%
+                // <%%% END PARAMS %%%>
+                );
+    // <%%% END OPERATIONS %%%>
+  end;
+
+  // <%%% END EVENT_SINKS %%%>
+implementation
+
+uses
+  {vcl:} SysUtils,
+  {RemObjects:} uROEventRepository, uROSerializer, uRORes;
+
+// <%%% START EXCEPTIONS %%%>
+{ %EXCEPTION_NAME% }
+constructor %EXCEPTION_NAME%.Create(anExceptionMessage : string
+  // <%%% START ANCESTOR_FIELDS %%%>
+  ; a%FIELD_NAME%: %FIELD_TYPE%
+  // <%%% END ANCESTOR_FIELDS %%%>
+  // <%%% START FIELDS_NO_STRIP %%%>
+  ; a%FIELD_NAME%: %FIELD_TYPE%
+  // <%%% END FIELDS_NO_STRIP %%%>
+  );
+begin
+  inherited Create(anExceptionMessage
+                   // <%%% START ANCESTOR_FIELDS %%%>
+                   , a%FIELD_NAME%
+                   // <%%% END ANCESTOR_FIELDS %%%>
+                  );
+
+  // <%%% START FIELDS_NO_STRIP %%%>
+  f%FIELD_NAME% := a%FIELD_NAME%;
+  // <%%% END FIELDS_NO_STRIP %%%>
+end;
+
+// <%%% START IF_HAS_FIELDS %%%>
+procedure %EXCEPTION_NAME%.ReadException(ASerializer: TObject);
+var
+  // <%%% START ENTIRE_HIERARCHY_FIELDS %%%>
+  l_%FIELD_NAME%: %FIELD_TYPE%;
+  // <%%% END ENTIRE_HIERARCHY_FIELDS %%%>
+begin
+  if TROSerializer(ASerializer).RecordStrictOrder then begin
+    // <%%% START IF_STRUCT_HAS_ANCESTOR %%%>
+    inherited;
+    // <%%% END IF_STRUCT_HAS_ANCESTOR %%%>
+    // <%%% START FIELDS_NO_STRIP %%%>
+    l_%FIELD_NAME% := %FIELD_NAME%;
+    // <%%% START IF_FIELD_BINARY_TYPE %%%>
+    TROSerializer(ASerializer).ReadBinary('%FIELD_NAME%', l_%FIELD_NAME%);
+    if %FIELD_NAME% <> l_%FIELD_NAME% then %FIELD_NAME%.Free;
+    // <%%% END IF_FIELD_BINARY_TYPE %%%>
+    // <%%% START IF_FIELD_BOOLEAN_TYPE %%%>
+    TROSerializer(ASerializer).ReadEnumerated('%FIELD_NAME%', TypeInfo(boolean), l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_BOOLEAN_TYPE %%%>
+    // <%%% START IF_FIELD_CURRENCY_TYPE %%%>
+    TROSerializer(ASerializer).ReadDouble('%FIELD_NAME%', ftCurr, l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_CURRENCY_TYPE %%%>
+    // <%%% START IF_FIELD_DATETIME_TYPE %%%>
+    TROSerializer(ASerializer).ReadDateTime('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DATETIME_TYPE %%%>
+    // <%%% START IF_FIELD_DECIMAL_TYPE %%%>
+    TROSerializer(ASerializer).ReadDecimal('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DECIMAL_TYPE %%%>
+    // <%%% START IF_FIELD_DOUBLE_TYPE %%%>
+    TROSerializer(ASerializer).ReadDouble('%FIELD_NAME%', ftDouble, l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DOUBLE_TYPE %%%>
+    // <%%% START IF_FIELD_GUID_TYPE %%%>
+    TROSerializer(ASerializer).ReadGuid('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_GUID_TYPE %%%>
+    // <%%% START IF_FIELD_INT64_TYPE %%%>
+    TROSerializer(ASerializer).ReadInt64('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_INT64_TYPE %%%>
+    // <%%% START IF_FIELD_INTEGER_TYPE %%%>
+    TROSerializer(ASerializer).ReadInteger('%FIELD_NAME%', otSLong, l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_INTEGER_TYPE %%%>
+    // <%%% START IF_FIELD_ANSISTRING_TYPE %%%>
+    TROSerializer(ASerializer).ReadAnsiString('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ANSISTRING_TYPE %%%>
+    // <%%% START IF_FIELD_UTF8STRING_TYPE %%%>
+    TROSerializer(ASerializer).ReadUTF8String('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_UTF8STRING_TYPE %%%>
+    // <%%% START IF_FIELD_VARIANT_TYPE %%%>
+    TROSerializer(ASerializer).ReadVariant('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_VARIANT_TYPE %%%>
+    // <%%% START IF_FIELD_WIDESTRING_TYPE %%%>
+    TROSerializer(ASerializer).ReadWideString('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_WIDESTRING_TYPE %%%>
+    // <%%% START IF_FIELD_XML_TYPE %%%>
+    TROSerializer(ASerializer).ReadXml('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_XML_TYPE %%%>
+    // <%%% START IF_FIELD_ARRAY_TYPE %%%>
+    TROSerializer(ASerializer).ReadArray('%FIELD_NAME%', %FIELD_TYPE%, l_%FIELD_NAME%);
+    if %FIELD_NAME% <> l_%FIELD_NAME% then %FIELD_NAME%.Free;
+    // <%%% END IF_FIELD_ARRAY_TYPE %%%>
+    // <%%% START IF_FIELD_ENUM_TYPE %%%>
+    TROSerializer(ASerializer).ReadEnumerated('%FIELD_NAME%', TypeInfo(%FIELD_TYPE%), l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ENUM_TYPE %%%>
+    // <%%% START IF_FIELD_STRUCT_TYPE %%%>
+    TROSerializer(ASerializer).ReadStruct('%FIELD_NAME%', %FIELD_TYPE%, l_%FIELD_NAME%);
+    if %FIELD_NAME% <> l_%FIELD_NAME% then %FIELD_NAME%.Free;
+    // <%%% END IF_FIELD_STRUCT_TYPE %%%>
+    %FIELD_NAME% := l_%FIELD_NAME%;
+    // <%%% END FIELDS_NO_STRIP %%%>
+  end
+  else begin
+    // <%%% START ENTIRE_HIERARCHY_FIELDS %%%>
+    l_%FIELD_NAME% := %FIELD_NAME%;
+    // <%%% START IF_FIELD_BINARY_TYPE %%%>
+    TROSerializer(ASerializer).ReadBinary('%FIELD_NAME%', l_%FIELD_NAME%);
+    if %FIELD_NAME% <> l_%FIELD_NAME% then %FIELD_NAME%.Free;
+    // <%%% END IF_FIELD_BINARY_TYPE %%%>
+    // <%%% START IF_FIELD_BOOLEAN_TYPE %%%>
+    TROSerializer(ASerializer).ReadEnumerated('%FIELD_NAME%', TypeInfo(boolean), l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_BOOLEAN_TYPE %%%>
+    // <%%% START IF_FIELD_CURRENCY_TYPE %%%>
+    TROSerializer(ASerializer).ReadDouble('%FIELD_NAME%', ftCurr, l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_CURRENCY_TYPE %%%>
+    // <%%% START IF_FIELD_DATETIME_TYPE %%%>
+    TROSerializer(ASerializer).ReadDateTime('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DATETIME_TYPE %%%>
+    // <%%% START IF_FIELD_DECIMAL_TYPE %%%>
+    TROSerializer(ASerializer).ReadDecimal('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DECIMAL_TYPE %%%>
+    // <%%% START IF_FIELD_DOUBLE_TYPE %%%>
+    TROSerializer(ASerializer).ReadDouble('%FIELD_NAME%', ftDouble, l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DOUBLE_TYPE %%%>
+    // <%%% START IF_FIELD_GUID_TYPE %%%>
+    TROSerializer(ASerializer).ReadGuid('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_GUID_TYPE %%%>
+    // <%%% START IF_FIELD_INT64_TYPE %%%>
+    TROSerializer(ASerializer).ReadInt64('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_INT64_TYPE %%%>
+    // <%%% START IF_FIELD_INTEGER_TYPE %%%>
+    TROSerializer(ASerializer).ReadInteger('%FIELD_NAME%', otSLong, l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_INTEGER_TYPE %%%>
+    // <%%% START IF_FIELD_ANSISTRING_TYPE %%%>
+    TROSerializer(ASerializer).ReadAnsiString('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ANSISTRING_TYPE %%%>
+    // <%%% START IF_FIELD_UTF8STRING_TYPE %%%>
+    TROSerializer(ASerializer).ReadUTF8String('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_UTF8STRING_TYPE %%%>
+    // <%%% START IF_FIELD_VARIANT_TYPE %%%>
+    TROSerializer(ASerializer).ReadVariant('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_VARIANT_TYPE %%%>
+    // <%%% START IF_FIELD_WIDESTRING_TYPE %%%>
+    TROSerializer(ASerializer).ReadWideString('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_WIDESTRING_TYPE %%%>
+    // <%%% START IF_FIELD_XML_TYPE %%%>
+    TROSerializer(ASerializer).ReadXml('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_XML_TYPE %%%>
+    // <%%% START IF_FIELD_ARRAY_TYPE %%%>
+    TROSerializer(ASerializer).ReadArray('%FIELD_NAME%', %FIELD_TYPE%, l_%FIELD_NAME%);
+    if %FIELD_NAME% <> l_%FIELD_NAME% then %FIELD_NAME%.Free;
+    // <%%% END IF_FIELD_ARRAY_TYPE %%%>
+    // <%%% START IF_FIELD_ENUM_TYPE %%%>
+    TROSerializer(ASerializer).ReadEnumerated('%FIELD_NAME%', TypeInfo(%FIELD_TYPE%), l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ENUM_TYPE %%%>
+    // <%%% START IF_FIELD_STRUCT_TYPE %%%>
+    TROSerializer(ASerializer).ReadStruct('%FIELD_NAME%', %FIELD_TYPE%, l_%FIELD_NAME%);
+    if %FIELD_NAME% <> l_%FIELD_NAME% then %FIELD_NAME%.Free;
+    // <%%% END IF_FIELD_STRUCT_TYPE %%%>
+    %FIELD_NAME% := l_%FIELD_NAME%;
+    // <%%% END ENTIRE_HIERARCHY_FIELDS %%%>
+  end;
+end;
+
+procedure %EXCEPTION_NAME%.WriteException(ASerializer: TObject);
+var
+  // <%%% START ENTIRE_HIERARCHY_FIELDS %%%>
+  l_%FIELD_NAME%: %FIELD_TYPE%;
+  // <%%% END ENTIRE_HIERARCHY_FIELDS %%%>
+begin
+  if TROSerializer(ASerializer).RecordStrictOrder then begin
+    // <%%% START IF_STRUCT_HAS_ANCESTOR %%%>
+    inherited;
+    // <%%% END IF_STRUCT_HAS_ANCESTOR %%%>
+    // <%%% START FIELDS_NO_STRIP %%%>
+    l_%FIELD_NAME% := %FIELD_NAME%;
+    // <%%% START IF_FIELD_BINARY_TYPE %%%>
+    TROSerializer(ASerializer).WriteBinary('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_BINARY_TYPE %%%>
+    // <%%% START IF_FIELD_BOOLEAN_TYPE %%%>
+    TROSerializer(ASerializer).WriteEnumerated('%FIELD_NAME%', TypeInfo(boolean), l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_BOOLEAN_TYPE %%%>
+    // <%%% START IF_FIELD_CURRENCY_TYPE %%%>
+    TROSerializer(ASerializer).WriteDouble('%FIELD_NAME%', ftCurr, l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_CURRENCY_TYPE %%%>
+    // <%%% START IF_FIELD_DATETIME_TYPE %%%>
+    TROSerializer(ASerializer).WriteDateTime('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DATETIME_TYPE %%%>
+    // <%%% START IF_FIELD_DECIMAL_TYPE %%%>
+    TROSerializer(ASerializer).WriteDecimal('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DECIMAL_TYPE %%%>
+    // <%%% START IF_FIELD_DOUBLE_TYPE %%%>
+    TROSerializer(ASerializer).WriteDouble('%FIELD_NAME%', ftDouble, l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DOUBLE_TYPE %%%>
+    // <%%% START IF_FIELD_GUID_TYPE %%%>
+    TROSerializer(ASerializer).WriteGuid('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_GUID_TYPE %%%>
+    // <%%% START IF_FIELD_INT64_TYPE %%%>
+    TROSerializer(ASerializer).WriteInt64('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_INT64_TYPE %%%>
+    // <%%% START IF_FIELD_INTEGER_TYPE %%%>
+    TROSerializer(ASerializer).WriteInteger('%FIELD_NAME%', otSLong, l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_INTEGER_TYPE %%%>
+    // <%%% START IF_FIELD_ANSISTRING_TYPE %%%>
+    TROSerializer(ASerializer).WriteAnsiString('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ANSISTRING_TYPE %%%>
+    // <%%% START IF_FIELD_UTF8STRING_TYPE %%%>
+    TROSerializer(ASerializer).WriteUTF8String('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_UTF8STRING_TYPE %%%>
+    // <%%% START IF_FIELD_VARIANT_TYPE %%%>
+    TROSerializer(ASerializer).WriteVariant('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_VARIANT_TYPE %%%>
+    // <%%% START IF_FIELD_WIDESTRING_TYPE %%%>
+    TROSerializer(ASerializer).WriteWideString('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_WIDESTRING_TYPE %%%>
+    // <%%% START IF_FIELD_XML_TYPE %%%>
+    TROSerializer(ASerializer).WriteXml('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_XML_TYPE %%%>
+    // <%%% START IF_FIELD_ARRAY_TYPE %%%>
+    TROSerializer(ASerializer).WriteArray('%FIELD_NAME%', l_%FIELD_NAME%, %FIELD_TYPE%);
+    // <%%% END IF_FIELD_ARRAY_TYPE %%%>
+    // <%%% START IF_FIELD_ENUM_TYPE %%%>
+    TROSerializer(ASerializer).WriteEnumerated('%FIELD_NAME%', TypeInfo(%FIELD_TYPE%), l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ENUM_TYPE %%%>
+    // <%%% START IF_FIELD_STRUCT_TYPE %%%>
+    TROSerializer(ASerializer).WriteStruct('%FIELD_NAME%', l_%FIELD_NAME%, %FIELD_TYPE%);
+    // <%%% END IF_FIELD_STRUCT_TYPE %%%>
+    // <%%% END FIELDS_NO_STRIP %%%>
+  end
+  else begin
+    // <%%% START ENTIRE_HIERARCHY_FIELDS %%%>
+    l_%FIELD_NAME% := %FIELD_NAME%;
+    // <%%% START IF_FIELD_BINARY_TYPE %%%>
+    TROSerializer(ASerializer).WriteBinary('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_BINARY_TYPE %%%>
+    // <%%% START IF_FIELD_BOOLEAN_TYPE %%%>
+    TROSerializer(ASerializer).WriteEnumerated('%FIELD_NAME%', TypeInfo(boolean), l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_BOOLEAN_TYPE %%%>
+    // <%%% START IF_FIELD_CURRENCY_TYPE %%%>
+    TROSerializer(ASerializer).WriteDouble('%FIELD_NAME%', ftCurr, l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_CURRENCY_TYPE %%%>
+    // <%%% START IF_FIELD_DATETIME_TYPE %%%>
+    TROSerializer(ASerializer).WriteDateTime('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DATETIME_TYPE %%%>
+    // <%%% START IF_FIELD_DECIMAL_TYPE %%%>
+    TROSerializer(ASerializer).WriteDecimal('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DECIMAL_TYPE %%%>
+    // <%%% START IF_FIELD_DOUBLE_TYPE %%%>
+    TROSerializer(ASerializer).WriteDouble('%FIELD_NAME%', ftDouble, l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DOUBLE_TYPE %%%>
+    // <%%% START IF_FIELD_GUID_TYPE %%%>
+    TROSerializer(ASerializer).WriteGuid('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_GUID_TYPE %%%>
+    // <%%% START IF_FIELD_INT64_TYPE %%%>
+    TROSerializer(ASerializer).WriteInt64('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_INT64_TYPE %%%>
+    // <%%% START IF_FIELD_INTEGER_TYPE %%%>
+    TROSerializer(ASerializer).WriteInteger('%FIELD_NAME%', otSLong, l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_INTEGER_TYPE %%%>
+    // <%%% START IF_FIELD_ANSISTRING_TYPE %%%>
+    TROSerializer(ASerializer).WriteAnsiString('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ANSISTRING_TYPE %%%>
+    // <%%% START IF_FIELD_UTF8STRING_TYPE %%%>
+    TROSerializer(ASerializer).WriteUTF8String('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_UTF8STRING_TYPE %%%>
+    // <%%% START IF_FIELD_VARIANT_TYPE %%%>
+    TROSerializer(ASerializer).WriteVariant('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_VARIANT_TYPE %%%>
+    // <%%% START IF_FIELD_WIDESTRING_TYPE %%%>
+    TROSerializer(ASerializer).WriteWideString('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_WIDESTRING_TYPE %%%>
+    // <%%% START IF_FIELD_XML_TYPE %%%>
+    TROSerializer(ASerializer).WriteXml('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_XML_TYPE %%%>
+    // <%%% START IF_FIELD_ARRAY_TYPE %%%>
+    TROSerializer(ASerializer).WriteArray('%FIELD_NAME%', l_%FIELD_NAME%, %FIELD_TYPE%);
+    // <%%% END IF_FIELD_ARRAY_TYPE %%%>
+    // <%%% START IF_FIELD_ENUM_TYPE %%%>
+    TROSerializer(ASerializer).WriteEnumerated('%FIELD_NAME%', TypeInfo(%FIELD_TYPE%), l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ENUM_TYPE %%%>
+    // <%%% START IF_FIELD_STRUCT_TYPE %%%>
+    TROSerializer(ASerializer).WriteStruct('%FIELD_NAME%', l_%FIELD_NAME%, %FIELD_TYPE%);
+    // <%%% END IF_FIELD_STRUCT_TYPE %%%>
+    // <%%% END ENTIRE_HIERARCHY_FIELDS %%%>
+  end;
+end;
+
+// <%%% END IF_HAS_FIELDS %%%>
+// <%%% END EXCEPTIONS %%%>
+// <%%% START ARRAYS %%%>
+{ %ARRAY_NAME% }
+
+procedure %ARRAY_NAME%.Assign(iSource: TPersistent);
+var lSource:%ARRAY_NAME%;
+    i:integer;
+begin
+  if (iSource is %ARRAY_NAME%) then begin
+    lSource := %ARRAY_NAME%(iSource);
+    Clear();
+    Resize(lSource.Count);
+    
+    for i := 0 to Count-1 do begin
+      // <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
+      if Assigned(lSource.Items[i]) then begin
+        Items[i].Assign(lSource.Items[i]);
+      end;
+      // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
+      // <%%% START IF_ARRAY_TYPE_SIMPLE %%%>
+      Items[i] := lSource.Items[i];
+      // <%%% END IF_ARRAY_TYPE_SIMPLE %%%>
+    end;
+  end
+  else begin
+    inherited Assign(iSource);
+  end;
+end;
+
+class function %ARRAY_NAME%.GetItemType: PTypeInfo;
+begin
+  result := TypeInfo(%ARRAY_TYPE%);
+end;
+
+// <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
+class function %ARRAY_NAME%.GetItemClass: TClass;
+begin
+  result := %ARRAY_TYPE%;
+end;
+// <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
+
+class function %ARRAY_NAME%.GetItemSize: integer;
+begin
+  result := SizeOf(%ARRAY_TYPE%);
+end;
+
+function %ARRAY_NAME%.GetItems(aIndex: integer): %ARRAY_TYPE%;
+begin
+  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);
+  result := fItems[aIndex];
+end;
+
+function %ARRAY_NAME%.GetItemRef(aIndex: integer): pointer;
+begin
+  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);
+  // <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
+  result := fItems[aIndex];
+  // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
+  // <%%% START IF_ARRAY_TYPE_SIMPLE %%%>
+  result := @fItems[aIndex];
+  // <%%% END IF_ARRAY_TYPE_SIMPLE %%%>
+end;
+
+// <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
+procedure %ARRAY_NAME%.SetItemRef(aIndex: integer; Ref: pointer);
+begin
+  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);
+  if Ref <> fItems[aIndex] then begin
+    if fItems[aIndex] <> nil then fItems[aIndex].Free;
+    fItems[aIndex] := Ref;
+  end;
+end;
+// <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
+
+procedure %ARRAY_NAME%.Clear;
+// <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
+var i: integer;
+// <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
+begin
+  // <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
+  for i := 0 to (Count-1) do fItems[i].Free();
+  // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
+  SetLength(fItems, 0);
+  FCount := 0;
+end;
+
+procedure %ARRAY_NAME%.Delete(aIndex: integer);
+var i: integer;
+begin
+  if (aIndex>=Count) then RaiseError(err_InvalidIndex, [aIndex]);
+
+  // <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
+  fItems[aIndex].Free();
+  // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
+  
+  if (aIndex<Count-1) then
+    for i := aIndex to Count-2 do fItems[i] := fItems[i+1];
+
+  SetLength(fItems, Count-1);
+  Dec(FCount);
+end;
+
+procedure %ARRAY_NAME%.SetItems(aIndex: integer; const Value: %ARRAY_TYPE%);
+begin
+  if (aIndex < 0) or (aIndex >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[aIndex]);
+  // <%%% START IF_ARRAY_TYPE_COMPLEX %%%>  
+  if fItems[aIndex] <> Value then begin
+    fItems[aIndex].Free;    
+    fItems[aIndex] := Value;
+  end;
+  // <%%% END IF_ARRAY_TYPE_COMPLEX %%%>  
+  // <%%% START IF_ARRAY_TYPE_SIMPLE %%%>
+  fItems[aIndex] := Value;  
+  // <%%% END IF_ARRAY_TYPE_SIMPLE %%%>  
+end;
+
+procedure %ARRAY_NAME%.Resize(ElementCount: integer);
+// <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
+var i: Integer;
+// <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
+begin
+  if fCount = ElementCount then Exit;
+// <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
+  for i := FCount -1 downto ElementCount do
+    FItems[i].Free;
+// <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
+  SetLength(fItems, ElementCount);
+// <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
+  for i := FCount to ElementCount -1 do
+    FItems[i] := %ARRAY_TYPE%.Create;
+// <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
+  FCount := ElementCount;
+end;
+
+function %ARRAY_NAME%.GetCount: integer;
+begin
+  result := FCount;
+end;
+
+procedure %ARRAY_NAME%.Grow;
+var
+  Delta, Capacity: Integer;
+begin
+  Capacity := Length(fItems);
+  if Capacity > 64 then
+    Delta := Capacity div 4
+  else
+    if Capacity > 8 then
+      Delta := 16
+   else
+      Delta := 4;
+  SetLength(fItems, Capacity + Delta);
+end;
+
+// <%%% START IF_ARRAY_TYPE_COMPLEX %%%>
+function %ARRAY_NAME%.Add: %ARRAY_TYPE%;
+begin
+  result := %ARRAY_TYPE%.Create;
+  Add(Result);
+end;
+// <%%% END IF_ARRAY_TYPE_COMPLEX %%%>
+
+function %ARRAY_NAME%.Add(const Value:%ARRAY_TYPE%): integer;
+begin
+  Result := Count;
+  if Length(fItems) = Result then
+    Grow;
+  fItems[result] := Value;
+  Inc(fCount);
+end;
+
+// <%%% START IF_ARRAY_TYPE_SIMPLE %%%>
+function %ARRAY_NAME%.GetIndex(const aPropertyName : string;
+  const aPropertyValue : Variant; StartFrom : integer;
+  Options : TROSearchOptions) : integer;
+begin
+  result := -1;
+end;
+// <%%% END IF_ARRAY_TYPE_SIMPLE %%%>
+
+procedure %ARRAY_NAME%.ReadComplex(ASerializer: TObject);
+var
+  lval: %ARRAY_TYPE%;
+  i: integer;
+begin
+  for i := 0 to Count-1 do begin
+    with TROSerializer(ASerializer) do
+      // <%%% START IF_ARRAY_BINARY_TYPE %%%>
+      ReadBinary(GetArrayElementName(GetItemType, GetItemRef(i)), lval, i);
+      // <%%% END IF_ARRAY_BINARY_TYPE %%%>
+      // <%%% START IF_ARRAY_BOOLEAN_TYPE %%%>
+      ReadEnumerated(GetArrayElementName(GetItemType, GetItemRef(i)), TypeInfo(boolean), lval, i);
+      // <%%% END IF_ARRAY_BOOLEAN_TYPE %%%>
+      // <%%% START IF_ARRAY_CURRENCY_TYPE %%%>
+      ReadDouble(GetArrayElementName(GetItemType, GetItemRef(i)), ftCurr, lval, i);
+      // <%%% END IF_ARRAY_CURRENCY_TYPE %%%>
+      // <%%% START IF_ARRAY_DATETIME_TYPE %%%>
+      ReadDateTime(GetArrayElementName(GetItemType, GetItemRef(i)), lval, i);
+      // <%%% END IF_ARRAY_DATETIME_TYPE %%%>
+      // <%%% START IF_ARRAY_DECIMAL_TYPE %%%>
+      ReadDecimal(GetArrayElementName(GetItemType, GetItemRef(i)), lval, i);
+      // <%%% END IF_ARRAY_DECIMAL_TYPE %%%>
+      // <%%% START IF_ARRAY_DOUBLE_TYPE %%%>
+      ReadDouble(GetArrayElementName(GetItemType, GetItemRef(i)), ftDouble, lval, i);
+      // <%%% END IF_ARRAY_DOUBLE_TYPE %%%>
+      // <%%% START IF_ARRAY_GUID_TYPE %%%>
+      ReadGuid(GetArrayElementName(GetItemType, GetItemRef(i)), lval, i);
+      // <%%% END IF_ARRAY_GUID_TYPE %%%>
+      // <%%% START IF_ARRAY_INT64_TYPE %%%>
+      ReadInt64(GetArrayElementName(GetItemType, GetItemRef(i)), lval, i);
+      // <%%% END IF_ARRAY_INT64_TYPE %%%>
+      // <%%% START IF_ARRAY_INTEGER_TYPE %%%>
+      ReadInteger(GetArrayElementName(GetItemType, GetItemRef(i)), otSLong, lval, i);
+      // <%%% END IF_ARRAY_INTEGER_TYPE %%%>
+      // <%%% START IF_ARRAY_ANSISTRING_TYPE %%%>
+      ReadUTF8String(GetArrayElementName(GetItemType, GetItemRef(i)), lval, i);
+      // <%%% END IF_ARRAY_ANSISTRING_TYPE %%%>
+      // <%%% START IF_ARRAY_UTF8STRING_TYPE %%%>
+      ReadUTF8String(GetArrayElementName(GetItemType, GetItemRef(i)), lval, i);
+      // <%%% END IF_ARRAY_UTF8STRING_TYPE %%%>
+      // <%%% START IF_ARRAY_VARIANT_TYPE %%%>
+      ReadVariant(GetArrayElementName(GetItemType, GetItemRef(i)), lval, i);
+      // <%%% END IF_ARRAY_VARIANT_TYPE %%%>
+      // <%%% START IF_ARRAY_WIDESTRING_TYPE %%%>
+      ReadWideString(GetArrayElementName(GetItemType, GetItemRef(i)), lval, i);
+      // <%%% END IF_ARRAY_WIDESTRING_TYPE %%%>
+      // <%%% START IF_ARRAY_XML_TYPE %%%>
+      ReadXml(GetArrayElementName(GetItemType, GetItemRef(i)), lval, i);
+      // <%%% END IF_ARRAY_XML_TYPE %%%>
+      // <%%% START IF_ARRAY_ARRAY_TYPE %%%>
+      ReadArray(GetArrayElementName(GetItemType, GetItemRef(i)), %ARRAY_TYPE%, lval, i);
+      // <%%% END IF_ARRAY_ARRAY_TYPE %%%>
+      // <%%% START IF_ARRAY_ENUM_TYPE %%%>
+      ReadEnumerated(GetArrayElementName(GetItemType, GetItemRef(i)), TypeInfo(%ARRAY_TYPE%), lval, i);
+      // <%%% END IF_ARRAY_ENUM_TYPE %%%>
+      // <%%% START IF_ARRAY_STRUCT_TYPE %%%>
+      ReadStruct(GetArrayElementName(GetItemType, GetItemRef(i)), %ARRAY_TYPE%, lval, i);
+      // <%%% END IF_ARRAY_STRUCT_TYPE %%%>
+    Items[i] := lval;
+  end;
+end;
+
+procedure %ARRAY_NAME%.WriteComplex(ASerializer: TObject);
+var
+  i: integer;
+begin
+  for i := 0 to Count-1 do
+    with TROSerializer(ASerializer) do
+      // <%%% START IF_ARRAY_BINARY_TYPE %%%>
+      WriteBinary(GetArrayElementName(GetItemType, GetItemRef(i)), fItems[i], i);
+      // <%%% END IF_ARRAY_BINARY_TYPE %%%>
+      // <%%% START IF_ARRAY_BOOLEAN_TYPE %%%>
+      WriteEnumerated(GetArrayElementName(GetItemType, GetItemRef(i)), TypeInfo(boolean), fItems[i], i);
+      // <%%% END IF_ARRAY_BOOLEAN_TYPE %%%>
+      // <%%% START IF_ARRAY_CURRENCY_TYPE %%%>
+      WriteDouble(GetArrayElementName(GetItemType, GetItemRef(i)), ftCurr, fItems[i], i);
+      // <%%% END IF_ARRAY_CURRENCY_TYPE %%%>
+      // <%%% START IF_ARRAY_DATETIME_TYPE %%%>
+      WriteDateTime(GetArrayElementName(GetItemType, GetItemRef(i)), fItems[i], i);
+      // <%%% END IF_ARRAY_DATETIME_TYPE %%%>
+      // <%%% START IF_ARRAY_DECIMAL_TYPE %%%>
+      WriteDecimal(GetArrayElementName(GetItemType, GetItemRef(i)), fItems[i], i);
+      // <%%% END IF_ARRAY_DECIMAL_TYPE %%%>
+      // <%%% START IF_ARRAY_DOUBLE_TYPE %%%>
+      WriteDouble(GetArrayElementName(GetItemType, GetItemRef(i)), ftDouble, fItems[i], i);
+      // <%%% END IF_ARRAY_DOUBLE_TYPE %%%>
+      // <%%% START IF_ARRAY_GUID_TYPE %%%>
+      WriteGuid(GetArrayElementName(GetItemType, GetItemRef(i)), fItems[i], i);
+      // <%%% END IF_ARRAY_GUID_TYPE %%%>
+      // <%%% START IF_ARRAY_INT64_TYPE %%%>
+      WriteInt64(GetArrayElementName(GetItemType, GetItemRef(i)), fItems[i], i);
+      // <%%% END IF_ARRAY_INT64_TYPE %%%>
+      // <%%% START IF_ARRAY_INTEGER_TYPE %%%>
+      WriteInteger(GetArrayElementName(GetItemType, GetItemRef(i)), otSLong, fItems[i], i);
+      // <%%% END IF_ARRAY_INTEGER_TYPE %%%>
+      // <%%% START IF_ARRAY_ANSISTRING_TYPE %%%>
+      WriteUTF8String(GetArrayElementName(GetItemType, GetItemRef(i)), fItems[i], i);
+      // <%%% END IF_ARRAY_ANSISTRING_TYPE %%%>
+      // <%%% START IF_ARRAY_UTF8STRING_TYPE %%%>
+      WriteUTF8String(GetArrayElementName(GetItemType, GetItemRef(i)), fItems[i], i);
+      // <%%% END IF_ARRAY_UTF8STRING_TYPE %%%>
+      // <%%% START IF_ARRAY_VARIANT_TYPE %%%>
+      WriteVariant(GetArrayElementName(GetItemType, GetItemRef(i)), fItems[i], i);
+      // <%%% END IF_ARRAY_VARIANT_TYPE %%%>
+      // <%%% START IF_ARRAY_WIDESTRING_TYPE %%%>
+      WriteWideString(GetArrayElementName(GetItemType, GetItemRef(i)), fItems[i], i);
+      // <%%% END IF_ARRAY_WIDESTRING_TYPE %%%>
+      // <%%% START IF_ARRAY_XML_TYPE %%%>
+      WriteXml(GetArrayElementName(GetItemType, GetItemRef(i)), fItems[i], i);
+      // <%%% END IF_ARRAY_XML_TYPE %%%>
+      // <%%% START IF_ARRAY_ARRAY_TYPE %%%>
+      WriteArray(GetArrayElementName(GetItemType, GetItemRef(i)), fItems[i], , %ARRAY_TYPE%, i);
+      // <%%% END IF_ARRAY_ARRAY_TYPE %%%>
+      // <%%% START IF_ARRAY_ENUM_TYPE %%%>
+      WriteEnumerated(GetArrayElementName(GetItemType, GetItemRef(i)), TypeInfo(%ARRAY_TYPE%), fItems[i], i);
+      // <%%% END IF_ARRAY_ENUM_TYPE %%%>
+      // <%%% START IF_ARRAY_STRUCT_TYPE %%%>
+      WriteStruct(GetArrayElementName(GetItemType, GetItemRef(i)), fItems[i], %ARRAY_TYPE%, i);
+      // <%%% END IF_ARRAY_STRUCT_TYPE %%%>
+end;
+
+// <%%% END ARRAYS %%%>
+// <%%% START STRUCTS %%%>
+{ %STRUCT_NAME% }
+
+procedure %STRUCT_NAME%.Assign(iSource: TPersistent);
+// <%%% START IF_HAS_FIELDS %%%>
+var
+  lSource: %STRUCT_NAME%;
+// <%%% END IF_HAS_FIELDS %%%>
+begin
+  inherited Assign(iSource);
+  // <%%% START IF_HAS_FIELDS %%%>
+  if (iSource is %STRUCT_NAME%) then begin
+    lSource := %STRUCT_NAME%(iSource);
+
+  // <%%% END IF_HAS_FIELDS %%%>
+    // <%%% START FIELDS_NO_STRIP %%%>
+    // <%%% START IF_FIELD_TYPE_SIMPLE %%%>
+    %FIELD_NAME% := lSource.%FIELD_NAME%;
+    // <%%% END IF_FIELD_TYPE_SIMPLE %%%>
+    // <%%% START IF_FIELD_TYPE_COMPLEX %%%>
+    // <%%% START IF_NOT_AUTO_CREATE_FIELDS %%%>
+    if Assigned(f%FIELD_NAME%) then begin
+      if Assigned(lSource.%FIELD_NAME%) then
+        %FIELD_NAME%.Assign(lSource.%FIELD_NAME%)
+      else
+        FreeAndNil(f%FIELD_NAME%);
+    end;
+    // <%%% END IF_NOT_AUTO_CREATE_FIELDS %%%>
+    // <%%% START IF_AUTO_CREATE_FIELDS %%%>
+    %FIELD_NAME%.Assign(lSource.%FIELD_NAME%);
+    // <%%% END IF_AUTO_CREATE_FIELDS %%%>
+    // <%%% END IF_FIELD_TYPE_COMPLEX %%%>
+    // <%%% END FIELDS_NO_STRIP %%%>
+  // <%%% START IF_HAS_FIELDS %%%>
+  end;
+  // <%%% END IF_HAS_FIELDS %%%>
+end;
+
+// <%%% START STRUCT_GENERATE_DEFAULT_VALUES %%%>
+constructor %STRUCT_NAME%.Create(aCollection : TCollection);
+begin
+  inherited Create(aCollection);
+  // <%%% START FIELDS_NO_STRIP %%%>
+  // <%%% START IF_FIELD_HAS_DEFAULT_VALUE %%%>
+  // <%%% START IF_FIELD_BOOLEAN_TYPE %%%>
+  f%FIELD_NAME% := %DEFAULT_VALUE%;
+  // <%%% END IF_FIELD_BOOLEAN_TYPE %%%>
+  // <%%% START IF_FIELD_CURRENCY_TYPE %%%>
+  f%FIELD_NAME% := %DEFAULT_VALUE%;
+  // <%%% END IF_FIELD_CURRENCY_TYPE %%%>
+  // <%%% START IF_FIELD_DATETIME_TYPE %%%>
+  f%FIELD_NAME% := StrToDateTimeDef('%DEFAULT_VALUE%',0);
+  // <%%% END IF_FIELD_DATETIME_TYPE %%%>
+  // <%%% START IF_FIELD_DECIMAL_TYPE %%%>
+  f%FIELD_NAME% := %DEFAULT_VALUE%;
+  // <%%% END IF_FIELD_DECIMAL_TYPE %%%>
+  // <%%% START IF_FIELD_DOUBLE_TYPE %%%>
+  f%FIELD_NAME% := %DEFAULT_VALUE%;
+  // <%%% END IF_FIELD_DOUBLE_TYPE %%%>
+  // <%%% START IF_FIELD_GUID_TYPE %%%>
+  f%FIELD_NAME% := '%DEFAULT_VALUE%';
+  // <%%% END IF_FIELD_GUID_TYPE %%%>
+  // <%%% START IF_FIELD_INT64_TYPE %%%>
+  f%FIELD_NAME% := %DEFAULT_VALUE%;
+  // <%%% END IF_FIELD_INT64_TYPE %%%>
+  // <%%% START IF_FIELD_INTEGER_TYPE %%%>
+  f%FIELD_NAME% := %DEFAULT_VALUE%;
+  // <%%% END IF_FIELD_INTEGER_TYPE %%%>
+  // <%%% START IF_FIELD_ANSISTRING_TYPE %%%>
+  f%FIELD_NAME% := '%DEFAULT_VALUE%';
+  // <%%% END IF_FIELD_ANSISTRING_TYPE %%%>
+  // <%%% START IF_FIELD_UTF8STRING_TYPE %%%>
+  f%FIELD_NAME% := '%DEFAULT_VALUE%';
+  // <%%% END IF_FIELD_UTF8STRING_TYPE %%%>
+  // <%%% START IF_FIELD_VARIANT_TYPE %%%>
+  f%FIELD_NAME% := '%DEFAULT_VALUE%';
+  // <%%% END IF_FIELD_VARIANT_TYPE %%%>
+  // <%%% START IF_FIELD_WIDESTRING_TYPE %%%>
+  f%FIELD_NAME% := '%DEFAULT_VALUE%';
+  // <%%% END IF_FIELD_WIDESTRING_TYPE %%%>
+  // <%%% END IF_FIELD_HAS_DEFAULT_VALUE %%%>
+  // <%%% END FIELDS_NO_STRIP %%%>
+end;
+// <%%% END STRUCT_GENERATE_DEFAULT_VALUES %%%>
+
+destructor %STRUCT_NAME%.Destroy;
+begin
+  FDestroying := True;
+  try
+    inherited Destroy;
+  finally
+    FDestroying := False;
+  end;
+end;
+
+// <%%% START FIELDS_NO_STRIP %%%>
+// <%%% START IF_FIELD_TYPE_COMPLEX %%%>
+function %STRUCT_NAME%.Get%FIELD_NAME%: %FIELD_TYPE%;
+begin
+  // <%%% START IF_AUTO_CREATE_FIELDS %%%>
+  if not Assigned(f%FIELD_NAME%) and not FDestroying then
+    f%FIELD_NAME% := %FIELD_TYPE%.Create();
+  // <%%% END IF_AUTO_CREATE_FIELDS %%%>
+  Result := f%FIELD_NAME%;
+end;
+// <%%% END IF_FIELD_TYPE_COMPLEX %%%>
+// <%%% END FIELDS_NO_STRIP %%%>
+
+// <%%% START IF_HAS_FIELDS %%%>
+procedure %STRUCT_NAME%.ReadComplex(ASerializer: TObject);
+var
+  // <%%% START ENTIRE_HIERARCHY_FIELDS %%%>
+  l_%FIELD_NAME%: %FIELD_TYPE%;
+  // <%%% END ENTIRE_HIERARCHY_FIELDS %%%>
+begin
+  if TROSerializer(ASerializer).RecordStrictOrder then begin
+    // <%%% START IF_STRUCT_HAS_ANCESTOR %%%>
+    inherited;
+    // <%%% END IF_STRUCT_HAS_ANCESTOR %%%>
+    // <%%% START FIELDS_NO_STRIP %%%>
+    l_%FIELD_NAME% := %FIELD_NAME%;
+    // <%%% START IF_FIELD_BINARY_TYPE %%%>
+    TROSerializer(ASerializer).ReadBinary('%FIELD_NAME%', l_%FIELD_NAME%);
+    if %FIELD_NAME% <> l_%FIELD_NAME% then %FIELD_NAME%.Free;
+    // <%%% END IF_FIELD_BINARY_TYPE %%%>
+    // <%%% START IF_FIELD_BOOLEAN_TYPE %%%>
+    TROSerializer(ASerializer).ReadEnumerated('%FIELD_NAME%', TypeInfo(boolean), l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_BOOLEAN_TYPE %%%>
+    // <%%% START IF_FIELD_CURRENCY_TYPE %%%>
+    TROSerializer(ASerializer).ReadDouble('%FIELD_NAME%', ftCurr, l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_CURRENCY_TYPE %%%>
+    // <%%% START IF_FIELD_DATETIME_TYPE %%%>
+    TROSerializer(ASerializer).ReadDateTime('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DATETIME_TYPE %%%>
+    // <%%% START IF_FIELD_DECIMAL_TYPE %%%>
+    TROSerializer(ASerializer).ReadDecimal('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DECIMAL_TYPE %%%>
+    // <%%% START IF_FIELD_DOUBLE_TYPE %%%>
+    TROSerializer(ASerializer).ReadDouble('%FIELD_NAME%', ftDouble, l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DOUBLE_TYPE %%%>
+    // <%%% START IF_FIELD_GUID_TYPE %%%>
+    TROSerializer(ASerializer).ReadGuid('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_GUID_TYPE %%%>
+    // <%%% START IF_FIELD_INT64_TYPE %%%>
+    TROSerializer(ASerializer).ReadInt64('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_INT64_TYPE %%%>
+    // <%%% START IF_FIELD_INTEGER_TYPE %%%>
+    TROSerializer(ASerializer).ReadInteger('%FIELD_NAME%', otSLong, l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_INTEGER_TYPE %%%>
+    // <%%% START IF_FIELD_ANSISTRING_TYPE %%%>
+    TROSerializer(ASerializer).ReadAnsiString('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ANSISTRING_TYPE %%%>
+    // <%%% START IF_FIELD_UTF8STRING_TYPE %%%>
+    TROSerializer(ASerializer).ReadUTF8String('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_UTF8STRING_TYPE %%%>
+    // <%%% START IF_FIELD_VARIANT_TYPE %%%>
+    TROSerializer(ASerializer).ReadVariant('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_VARIANT_TYPE %%%>
+    // <%%% START IF_FIELD_WIDESTRING_TYPE %%%>
+    TROSerializer(ASerializer).ReadWideString('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_WIDESTRING_TYPE %%%>
+    // <%%% START IF_FIELD_XML_TYPE %%%>
+    TROSerializer(ASerializer).ReadXml('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_XML_TYPE %%%>
+    // <%%% START IF_FIELD_ARRAY_TYPE %%%>
+    TROSerializer(ASerializer).ReadArray('%FIELD_NAME%', %FIELD_TYPE%, l_%FIELD_NAME%);
+    if %FIELD_NAME% <> l_%FIELD_NAME% then %FIELD_NAME%.Free;
+    // <%%% END IF_FIELD_ARRAY_TYPE %%%>
+    // <%%% START IF_FIELD_ENUM_TYPE %%%>
+    TROSerializer(ASerializer).ReadEnumerated('%FIELD_NAME%', TypeInfo(%FIELD_TYPE%), l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ENUM_TYPE %%%>
+    // <%%% START IF_FIELD_STRUCT_TYPE %%%>
+    TROSerializer(ASerializer).ReadStruct('%FIELD_NAME%', %FIELD_TYPE%, l_%FIELD_NAME%);
+    if %FIELD_NAME% <> l_%FIELD_NAME% then %FIELD_NAME%.Free;
+    // <%%% END IF_FIELD_STRUCT_TYPE %%%>
+    %FIELD_NAME% := l_%FIELD_NAME%;
+    // <%%% END FIELDS_NO_STRIP %%%>
+  end
+  else begin
+    // <%%% START ENTIRE_HIERARCHY_FIELDS %%%>
+    l_%FIELD_NAME% := %FIELD_NAME%;
+    // <%%% START IF_FIELD_BINARY_TYPE %%%>
+    TROSerializer(ASerializer).ReadBinary('%FIELD_NAME%', l_%FIELD_NAME%);
+    if %FIELD_NAME% <> l_%FIELD_NAME% then %FIELD_NAME%.Free;
+    // <%%% END IF_FIELD_BINARY_TYPE %%%>
+    // <%%% START IF_FIELD_BOOLEAN_TYPE %%%>
+    TROSerializer(ASerializer).ReadEnumerated('%FIELD_NAME%', TypeInfo(boolean), l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_BOOLEAN_TYPE %%%>
+    // <%%% START IF_FIELD_CURRENCY_TYPE %%%>
+    TROSerializer(ASerializer).ReadDouble('%FIELD_NAME%', ftCurr, l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_CURRENCY_TYPE %%%>
+    // <%%% START IF_FIELD_DATETIME_TYPE %%%>
+    TROSerializer(ASerializer).ReadDateTime('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DATETIME_TYPE %%%>
+    // <%%% START IF_FIELD_DECIMAL_TYPE %%%>
+    TROSerializer(ASerializer).ReadDecimal('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DECIMAL_TYPE %%%>
+    // <%%% START IF_FIELD_DOUBLE_TYPE %%%>
+    TROSerializer(ASerializer).ReadDouble('%FIELD_NAME%', ftDouble, l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DOUBLE_TYPE %%%>
+    // <%%% START IF_FIELD_GUID_TYPE %%%>
+    TROSerializer(ASerializer).ReadGuid('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_GUID_TYPE %%%>
+    // <%%% START IF_FIELD_INT64_TYPE %%%>
+    TROSerializer(ASerializer).ReadInt64('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_INT64_TYPE %%%>
+    // <%%% START IF_FIELD_INTEGER_TYPE %%%>
+    TROSerializer(ASerializer).ReadInteger('%FIELD_NAME%', otSLong, l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_INTEGER_TYPE %%%>
+    // <%%% START IF_FIELD_ANSISTRING_TYPE %%%>
+    TROSerializer(ASerializer).ReadAnsiString('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ANSISTRING_TYPE %%%>
+    // <%%% START IF_FIELD_UTF8STRING_TYPE %%%>
+    TROSerializer(ASerializer).ReadUTF8String('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_UTF8STRING_TYPE %%%>
+    // <%%% START IF_FIELD_VARIANT_TYPE %%%>
+    TROSerializer(ASerializer).ReadVariant('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_VARIANT_TYPE %%%>
+    // <%%% START IF_FIELD_WIDESTRING_TYPE %%%>
+    TROSerializer(ASerializer).ReadWideString('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_WIDESTRING_TYPE %%%>
+    // <%%% START IF_FIELD_XML_TYPE %%%>
+    TROSerializer(ASerializer).ReadXml('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_XML_TYPE %%%>
+    // <%%% START IF_FIELD_ARRAY_TYPE %%%>
+    TROSerializer(ASerializer).ReadArray('%FIELD_NAME%', %FIELD_TYPE%, l_%FIELD_NAME%);
+    if %FIELD_NAME% <> l_%FIELD_NAME% then %FIELD_NAME%.Free;
+    // <%%% END IF_FIELD_ARRAY_TYPE %%%>
+    // <%%% START IF_FIELD_ENUM_TYPE %%%>
+    TROSerializer(ASerializer).ReadEnumerated('%FIELD_NAME%', TypeInfo(%FIELD_TYPE%), l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ENUM_TYPE %%%>
+    // <%%% START IF_FIELD_STRUCT_TYPE %%%>
+    TROSerializer(ASerializer).ReadStruct('%FIELD_NAME%', %FIELD_TYPE%, l_%FIELD_NAME%);
+    if %FIELD_NAME% <> l_%FIELD_NAME% then %FIELD_NAME%.Free;
+    // <%%% END IF_FIELD_STRUCT_TYPE %%%>
+    %FIELD_NAME% := l_%FIELD_NAME%;
+    // <%%% END ENTIRE_HIERARCHY_FIELDS %%%>
+  end;
+end;
+
+procedure %STRUCT_NAME%.WriteComplex(ASerializer: TObject);
+var
+  // <%%% START ENTIRE_HIERARCHY_FIELDS %%%>
+  l_%FIELD_NAME%: %FIELD_TYPE%;
+  // <%%% END ENTIRE_HIERARCHY_FIELDS %%%>
+begin
+  if TROSerializer(ASerializer).RecordStrictOrder then begin
+    // <%%% START IF_STRUCT_HAS_ANCESTOR %%%>
+    inherited;
+    // <%%% END IF_STRUCT_HAS_ANCESTOR %%%>
+    TROSerializer(ASerializer).ChangeClass(%STRUCT_NAME%);
+    // <%%% START FIELDS_NO_STRIP %%%>
+    l_%FIELD_NAME% := %FIELD_NAME%;
+    // <%%% START IF_FIELD_BINARY_TYPE %%%>
+    TROSerializer(ASerializer).WriteBinary('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_BINARY_TYPE %%%>
+    // <%%% START IF_FIELD_BOOLEAN_TYPE %%%>
+    TROSerializer(ASerializer).WriteEnumerated('%FIELD_NAME%', TypeInfo(boolean), l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_BOOLEAN_TYPE %%%>
+    // <%%% START IF_FIELD_CURRENCY_TYPE %%%>
+    TROSerializer(ASerializer).WriteDouble('%FIELD_NAME%', ftCurr, l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_CURRENCY_TYPE %%%>
+    // <%%% START IF_FIELD_DATETIME_TYPE %%%>
+    TROSerializer(ASerializer).WriteDateTime('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DATETIME_TYPE %%%>
+    // <%%% START IF_FIELD_DECIMAL_TYPE %%%>
+    TROSerializer(ASerializer).WriteDecimal('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DECIMAL_TYPE %%%>
+    // <%%% START IF_FIELD_DOUBLE_TYPE %%%>
+    TROSerializer(ASerializer).WriteDouble('%FIELD_NAME%', ftDouble, l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DOUBLE_TYPE %%%>
+    // <%%% START IF_FIELD_GUID_TYPE %%%>
+    TROSerializer(ASerializer).WriteGuid('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_GUID_TYPE %%%>
+    // <%%% START IF_FIELD_INT64_TYPE %%%>
+    TROSerializer(ASerializer).WriteInt64('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_INT64_TYPE %%%>
+    // <%%% START IF_FIELD_INTEGER_TYPE %%%>
+    TROSerializer(ASerializer).WriteInteger('%FIELD_NAME%', otSLong, l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_INTEGER_TYPE %%%>
+    // <%%% START IF_FIELD_ANSISTRING_TYPE %%%>
+    TROSerializer(ASerializer).WriteAnsiString('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ANSISTRING_TYPE %%%>
+    // <%%% START IF_FIELD_UTF8STRING_TYPE %%%>
+    TROSerializer(ASerializer).WriteUTF8String('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_UTF8STRING_TYPE %%%>
+    // <%%% START IF_FIELD_VARIANT_TYPE %%%>
+    TROSerializer(ASerializer).WriteVariant('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_VARIANT_TYPE %%%>
+    // <%%% START IF_FIELD_WIDESTRING_TYPE %%%>
+    TROSerializer(ASerializer).WriteWideString('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_WIDESTRING_TYPE %%%>
+    // <%%% START IF_FIELD_XML_TYPE %%%>
+    TROSerializer(ASerializer).WriteXml('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_XML_TYPE %%%>
+    // <%%% START IF_FIELD_ARRAY_TYPE %%%>
+    TROSerializer(ASerializer).WriteArray('%FIELD_NAME%', l_%FIELD_NAME%, %FIELD_TYPE%);
+    // <%%% END IF_FIELD_ARRAY_TYPE %%%>
+    // <%%% START IF_FIELD_ENUM_TYPE %%%>
+    TROSerializer(ASerializer).WriteEnumerated('%FIELD_NAME%', TypeInfo(%FIELD_TYPE%), l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ENUM_TYPE %%%>
+    // <%%% START IF_FIELD_STRUCT_TYPE %%%>
+    TROSerializer(ASerializer).WriteStruct('%FIELD_NAME%', l_%FIELD_NAME%, %FIELD_TYPE%);
+    // <%%% END IF_FIELD_STRUCT_TYPE %%%>
+    // <%%% END FIELDS_NO_STRIP %%%>
+  end
+  else begin
+    // <%%% START ENTIRE_HIERARCHY_FIELDS %%%>
+    l_%FIELD_NAME% := %FIELD_NAME%;
+    // <%%% START IF_FIELD_BINARY_TYPE %%%>
+    TROSerializer(ASerializer).WriteBinary('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_BINARY_TYPE %%%>
+    // <%%% START IF_FIELD_BOOLEAN_TYPE %%%>
+    TROSerializer(ASerializer).WriteEnumerated('%FIELD_NAME%', TypeInfo(boolean), l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_BOOLEAN_TYPE %%%>
+    // <%%% START IF_FIELD_CURRENCY_TYPE %%%>
+    TROSerializer(ASerializer).WriteDouble('%FIELD_NAME%', ftCurr, l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_CURRENCY_TYPE %%%>
+    // <%%% START IF_FIELD_DATETIME_TYPE %%%>
+    TROSerializer(ASerializer).WriteDateTime('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DATETIME_TYPE %%%>
+    // <%%% START IF_FIELD_DECIMAL_TYPE %%%>
+    TROSerializer(ASerializer).WriteDecimal('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DECIMAL_TYPE %%%>
+    // <%%% START IF_FIELD_DOUBLE_TYPE %%%>
+    TROSerializer(ASerializer).WriteDouble('%FIELD_NAME%', ftDouble, l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_DOUBLE_TYPE %%%>
+    // <%%% START IF_FIELD_GUID_TYPE %%%>
+    TROSerializer(ASerializer).WriteGuid('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_GUID_TYPE %%%>
+    // <%%% START IF_FIELD_INT64_TYPE %%%>
+    TROSerializer(ASerializer).WriteInt64('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_INT64_TYPE %%%>
+    // <%%% START IF_FIELD_INTEGER_TYPE %%%>
+    TROSerializer(ASerializer).WriteInteger('%FIELD_NAME%', otSLong, l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_INTEGER_TYPE %%%>
+    // <%%% START IF_FIELD_ANSISTRING_TYPE %%%>
+    TROSerializer(ASerializer).WriteAnsiString('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ANSISTRING_TYPE %%%>
+    // <%%% START IF_FIELD_UTF8STRING_TYPE %%%>
+    TROSerializer(ASerializer).WriteUTF8String('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_UTF8STRING_TYPE %%%>
+    // <%%% START IF_FIELD_VARIANT_TYPE %%%>
+    TROSerializer(ASerializer).WriteVariant('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_VARIANT_TYPE %%%>
+    // <%%% START IF_FIELD_WIDESTRING_TYPE %%%>
+    TROSerializer(ASerializer).WriteWideString('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_WIDESTRING_TYPE %%%>
+    // <%%% START IF_FIELD_XML_TYPE %%%>
+    TROSerializer(ASerializer).WriteXml('%FIELD_NAME%', l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_XML_TYPE %%%>
+    // <%%% START IF_FIELD_ARRAY_TYPE %%%>
+    TROSerializer(ASerializer).WriteArray('%FIELD_NAME%', l_%FIELD_NAME%, %FIELD_TYPE%);
+    // <%%% END IF_FIELD_ARRAY_TYPE %%%>
+    // <%%% START IF_FIELD_ENUM_TYPE %%%>
+    TROSerializer(ASerializer).WriteEnumerated('%FIELD_NAME%', TypeInfo(%FIELD_TYPE%), l_%FIELD_NAME%);
+    // <%%% END IF_FIELD_ENUM_TYPE %%%>
+    // <%%% START IF_FIELD_STRUCT_TYPE %%%>
+    TROSerializer(ASerializer).WriteStruct('%FIELD_NAME%', l_%FIELD_NAME%, %FIELD_TYPE%);
+    // <%%% END IF_FIELD_STRUCT_TYPE %%%>
+    // <%%% END ENTIRE_HIERARCHY_FIELDS %%%>
+  end;
+end;
+
+// <%%% END IF_HAS_FIELDS %%%>
+{ %STRUCT_COLLECTION_NAME% }
+constructor %STRUCT_COLLECTION_NAME%.Create;
+begin
+  inherited Create(%STRUCT_NAME%);
+end;
+
+constructor %STRUCT_COLLECTION_NAME%.Create(aItemClass: TCollectionItemClass);
+begin
+  inherited Create(aItemClass);
+end;
+
+function %STRUCT_COLLECTION_NAME%.Add: %STRUCT_NAME%;
+begin
+  result := %STRUCT_NAME%(inherited Add);
+end;
+
+function %STRUCT_COLLECTION_NAME%.GetItems(aIndex: integer): %STRUCT_NAME%;
+begin
+  result := %STRUCT_NAME%(inherited Items[aIndex]);
+end;
+
+// <%%% START ARRAYS_IS_FOUND %%%>
+procedure %STRUCT_COLLECTION_NAME%.LoadFromArray(anArray: %ARRAY_NAME%);
+var
+  i : integer;
+begin
+  Clear;
+  for i := 0 to (anArray.Count-1) do
+    Add.Assign(anArray[i]);
+end;
+
+procedure %STRUCT_COLLECTION_NAME%.SaveToArray(anArray: %ARRAY_NAME%);
+var
+  i : integer;
+begin
+  anArray.Clear;
+  anArray.Resize(Count);
+  for i := 0 to (Count-1) do begin
+    anArray[i] := %STRUCT_NAME%.Create;
+    anArray[i].Assign(Items[i]);
+  end;
+end;
+
+// <%%% END ARRAYS_IS_FOUND %%%>
+
+procedure %STRUCT_COLLECTION_NAME%.SetItems(aIndex: integer; const Value: %STRUCT_NAME%);
+begin
+  %STRUCT_NAME%(inherited Items[aIndex]).Assign(Value);
+end;
+
+// <%%% END STRUCTS %%%>
+// <%%% START SERVICES %%%>
+{ Co%SERVICE_NAME% }
+
+class function Co%SERVICE_NAME%.Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): I%SERVICE_NAME%;
+begin
+  result := T%SERVICE_NAME%_Proxy.Create(aMessage, aTransportChannel);
+end;
+
+{ T%SERVICE_NAME%_Proxy }
+
+function T%SERVICE_NAME%_Proxy.__GetInterfaceName:string;
+begin
+  result := '%SERVICE_NAME%';
+end;
+
+// <%%% START FUNCTION_OPERATIONS %%%>
+function T%SERVICE_NAME%_Proxy.%OPERATION_NAME%(
+           // <%%% START PARAMS %%%>
+           %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;
+           // <%%% END PARAMS %%%>
+           ): %OPERATION_RESULT%;
+begin
+  // <%%% START OUT_PARAMS_NO_STRIP %%%>
+  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+  %PARAM_NAME% := nil;
+  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+  // <%%% END OUT_PARAMS_NO_STRIP %%%>
+  // <%%% START IF_RESULT_COMPLEX %%%>
+  Result := nil;
+  // <%%% END IF_RESULT_COMPLEX %%%>
+  try
+    __Message.InitializeRequestMessage(__TransportChannel, '%LIBRARY_NAME%', __InterfaceName, '%OPERATION_NAME%');
+    // <%%% START IN_PARAMS_NO_STRIP %%%>
+    __Message.Write('%PARAM_NAME%', TypeInfo(%PARAM_TYPE%), %PARAM_NAME%, [%PARAM_ATTRIBUTE%]);
+    // <%%% END IN_PARAMS_NO_STRIP %%%>
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(%OPERATION_RESULT%), result, [%OPERATION_RESULT_ATTRIBUTE%]);
+    // <%%% START OUT_PARAMS_NO_STRIP %%%>
+    __Message.Read('%PARAM_NAME%', TypeInfo(%PARAM_TYPE%), %PARAM_NAME%, [%PARAM_ATTRIBUTE%]);
+    // <%%% END OUT_PARAMS_NO_STRIP %%%>
+  finally
+    __Message.FreeStream;
+  end
+end;
+
+// <%%% END FUNCTION_OPERATIONS %%%>
+// <%%% START PROCEDURE_OPERATIONS %%%>
+procedure T%SERVICE_NAME%_Proxy.%OPERATION_NAME%(
+           // <%%% START PARAMS %%%>
+           %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;
+           // <%%% END PARAMS %%%>
+           );
+begin
+  // <%%% START OUT_PARAMS_NO_STRIP %%%>
+  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+  %PARAM_NAME% := nil;
+  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+  // <%%% END OUT_PARAMS_NO_STRIP %%%>
+  try
+    __Message.InitializeRequestMessage(__TransportChannel, '%LIBRARY_NAME%', __InterfaceName, '%OPERATION_NAME%');
+    // <%%% START IN_PARAMS_NO_STRIP %%%>
+    __Message.Write('%PARAM_NAME%', TypeInfo(%PARAM_TYPE%), %PARAM_NAME%, [%PARAM_ATTRIBUTE%]);
+    // <%%% END IN_PARAMS_NO_STRIP %%%>
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    // <%%% START OUT_PARAMS_NO_STRIP %%%>
+    __Message.Read('%PARAM_NAME%', TypeInfo(%PARAM_TYPE%), %PARAM_NAME%, [%PARAM_ATTRIBUTE%]);
+    // <%%% END OUT_PARAMS_NO_STRIP %%%>
+  finally
+    __Message.FreeStream;
+  end
+end;
+
+// <%%% END PROCEDURE_OPERATIONS %%%>
+// <%%% END SERVICES %%%>
+// <%%% START EVENT_SINKS %%%>
+type
+  { T%EVENT_SINK_NAME%_Writer }
+  T%EVENT_SINK_NAME%_Writer = class(T%EVENT_SINK_WRITER_ANCESTOR_NAME%, I%EVENT_SINK_NAME%_Writer)
+  protected
+    // <%%% START OPERATIONS %%%>
+    procedure %OPERATION_NAME%(const __Sender : TGUID
+                // <%%% START PARAMS %%%>
+                ; %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%
+                // <%%% END PARAMS %%%>
+                );
+    // <%%% END OPERATIONS %%%>
+  end;
+
+// <%%% START OPERATIONS %%%>
+procedure T%EVENT_SINK_NAME%_Writer.%OPERATION_NAME%(const __Sender : TGUID
+  // <%%% START PARAMS %%%>
+  ; %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%
+  // <%%% END PARAMS %%%>
+  );
+var __eventdata : Binary;
+begin
+  __eventdata := Binary.Create;
+  try
+    __Message.InitializeEventMessage(NIL, '%LIBRARY_NAME%', EID_%EVENT_SINK_NAME%, '%OPERATION_NAME%');
+    // <%%% START PARAMS_NO_STRIP %%%>
+    __Message.Write('%PARAM_NAME%', TypeInfo(%PARAM_TYPE%), %PARAM_NAME%, [%PARAM_ATTRIBUTE%]);
+    // <%%% END PARAMS_NO_STRIP %%%>
+    __Message.Finalize;
+
+    __Message.WriteToStream(__eventdata);
+
+    Repository.StoreEventData(__Sender, __eventdata, ExcludeSender, ExcludeSessionList, SessionList.CommaText);
+  finally
+    __eventdata.Free;
+  end;
+end;
+
+// <%%% END OPERATIONS %%%>
+type
+  { T%EVENT_SINK_NAME%_Invoker }
+  T%EVENT_SINK_NAME%_Invoker = class(T%EVENT_SINK_INVOKER_ANCESTOR_NAME%)
+  published
+    // <%%% START OPERATIONS %%%>
+    procedure Invoke_%OPERATION_NAME%(__EventReceiver : TROEventReceiver; const __Message : IROMessage; const __Target : IUnknown);
+    // <%%% END OPERATIONS %%%>
+  end;
+
+// <%%% START OPERATIONS %%%>
+procedure T%EVENT_SINK_NAME%_Invoker.Invoke_%OPERATION_NAME%(__EventReceiver : TROEventReceiver; const __Message : IROMessage; const __Target : IUnknown);
+var
+  // <%%% START PARAMS_NO_STRIP %%%>
+  %PARAM_NAME%: %PARAM_TYPE%;
+  // <%%% END PARAMS_NO_STRIP %%%>
+  // <%%% START IF_HAS_COMPLEX_TYPE %%%>
+  __lObjectDisposer: TROObjectDisposer;
+  // <%%% END IF_HAS_COMPLEX_TYPE %%%>
+  __%EVENT_SINK_NAME%Instance: I%EVENT_SINK_NAME%;
+begin
+  // <%%% START PARAMS_NO_STRIP %%%>
+  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+  %PARAM_NAME% := nil;
+  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+  // <%%% END PARAMS_NO_STRIP %%%>
+  try
+    // <%%% START PARAMS_NO_STRIP %%%>
+    __Message.Read('%PARAM_NAME%', TypeInfo(%PARAM_TYPE%), %PARAM_NAME%, [%PARAM_ATTRIBUTE%]);
+    // <%%% END PARAMS_NO_STRIP %%%>
+
+    __%EVENT_SINK_NAME%Instance := (__Target as I%EVENT_SINK_NAME%);
+    __%EVENT_SINK_NAME%Instance.%OPERATION_NAME%(
+                                  // <%%% START PARAMS %%%>
+                                  %PARAM_NAME%,
+                                  // <%%% END PARAMS %%%>
+                                  );
+
+  finally
+    // <%%% START IF_HAS_COMPLEX_TYPE %%%>
+    __lObjectDisposer := TROObjectDisposer.Create(__EventReceiver);
+    try
+      // <%%% START PARAMS_NO_STRIP %%%>
+      // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+      __lObjectDisposer.Add(%PARAM_NAME%);
+      // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+      // <%%% END PARAMS_NO_STRIP %%%>
+    finally
+      __lObjectDisposer.Free();
+    end;
+    // <%%% END IF_HAS_COMPLEX_TYPE %%%>
+  end
+end;
+
+// <%%% END OPERATIONS %%%>
+// <%%% END EVENT_SINKS %%%>
+initialization
+  // <%%% START STRUCTS %%%>
+  RegisterROClass(%STRUCT_NAME%);
+  // <%%% END STRUCTS %%%>
+  // <%%% START ARRAYS %%%>
+  RegisterROClass(%ARRAY_NAME%);
+  // <%%% END ARRAYS %%%>
+  // <%%% START EXCEPTIONS %%%>
+  RegisterExceptionClass(%EXCEPTION_NAME%);
+  // <%%% END EXCEPTIONS %%%>
+  // <%%% START SERVICES %%%>
+  RegisterProxyClass(I%SERVICE_NAME%_IID, T%SERVICE_NAME%_Proxy);
+  // <%%% END SERVICES %%%>     
+  // <%%% START EVENT_SINKS %%%>
+  RegisterEventWriterClass(I%EVENT_SINK_NAME%_Writer, T%EVENT_SINK_NAME%_Writer);
+  RegisterEventInvokerClass(EID_%EVENT_SINK_NAME%, T%EVENT_SINK_NAME%_Invoker);
+  // <%%% END EVENT_SINKS %%%>     
+
+finalization
+  // <%%% START STRUCTS %%%>
+  UnregisterROClass(%STRUCT_NAME%);
+  // <%%% END STRUCTS %%%>
+  // <%%% START ARRAYS %%%>
+  UnregisterROClass(%ARRAY_NAME%);
+  // <%%% END ARRAYS %%%>
+  // <%%% START EXCEPTIONS %%%>
+  UnregisterExceptionClass(%EXCEPTION_NAME%);
+  // <%%% END EXCEPTIONS %%%>
+  // <%%% START SERVICES %%%>
+  UnregisterProxyClass(I%SERVICE_NAME%_IID);
+  // <%%% END SERVICES %%%>
+  // <%%% START EVENT_SINKS %%%>
+  UnregisterEventWriterClass(I%EVENT_SINK_NAME%_Writer);
+  UnregisterEventInvokerClass(EID_%EVENT_SINK_NAME%);
+  // <%%% END EVENT_SINKS %%%>     
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.invk.cpp b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.invk.cpp
new file mode 100644
index 0000000..68a139b
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.invk.cpp	
@@ -0,0 +1,216 @@
+// %UNIT_NAME%
+//
+/*---------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project.                                }
+{                                                                            }
+{ Do not modify this unit manually, or your changes will be lost when this   }
+{ unit is regenerated the next time you compile the project.                 }
+{---------------------------------------------------------------------------*/
+
+// RemObjects:
+#include <uRORes.HPP>
+#include <uROClient.HPP>
+
+// Interface of %LIBRARY_NAME%
+#include "%LIBRARY_NAME%_Intf.h"
+
+// Implementation of %LIBRARY_NAME%
+#include "%LIBRARY_NAME%_Invk.h"
+
+// <%%% START SERVICES %%%>
+// T%SERVICE_NAME%_Invoker
+
+// <%%% START FUNCTION_OPERATIONS %%%>
+void __fastcall T%SERVICE_NAME%_Invoker::Invoke_%OPERATION_NAME%(
+		const System::_di_IInterface __Instance,
+		const Uroclientintf::_di_IROMessage __Message,
+		const Uroclientintf::_di_IROTransport __Transport,
+		/* out */ Uroserverintf::TROResponseOptions& __oResponseOptions)
+{
+// <%%% START IF_RESULT_SIMPLE %%%>
+// virtual %OPERATION_RESULT% __fastcall %OPERATION_NAME%(
+// <%%% END IF_RESULT_SIMPLE %%%>
+// <%%% START IF_RESULT_COMPLEX %%%>
+// virtual %OPERATION_RESULT%* __fastcall %OPERATION_NAME%(
+// <%%% END IF_RESULT_COMPLEX %%%>
+// <%%% START PARAMS %%%>
+// <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+//   %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+// <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+// <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+//   %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+// <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+// <%%% END PARAMS %%%>
+//   );
+
+  // <%%% START PARAMS_NO_STRIP %%%>
+  // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+  %PARAM_TYPE% %PARAM_NAME%;
+  // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+  %PARAM_TYPE%* %PARAM_NAME% = NULL;
+  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+  // <%%% END PARAMS_NO_STRIP %%%>
+  // <%%% START IF_RESULT_SIMPLE %%%>
+  %OPERATION_RESULT% lResult;
+  // <%%% END IF_RESULT_SIMPLE %%%>
+  // <%%% START IF_RESULT_COMPLEX %%%>
+  %OPERATION_RESULT%* lResult = NULL;
+  // <%%% END IF_RESULT_COMPLEX %%%>
+  try
+  {
+	_di_I%SERVICE_NAME% __%SERVICE_NAME%Instance;
+	if (__Instance->Supports(__%SERVICE_NAME%Instance))
+	{
+	  // <%%% START IN_PARAMS_NO_STRIP %%%>
+	  // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+	  __Message->Read("%PARAM_NAME%", __Get%PARAM_TYPE%Info, &%PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));
+	  // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+	  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+	  __Message->Read("%PARAM_NAME%", __typeinfo(%PARAM_TYPE%), &%PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));
+	  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+	  // <%%% END IN_PARAMS_NO_STRIP %%%>
+
+	  lResult = __%SERVICE_NAME%Instance->%OPERATION_NAME%(
+											// <%%% START PARAMS %%%>
+											%PARAM_NAME%,
+											// <%%% END PARAMS %%%>
+											);
+
+	  __Message->InitializeResponseMessage(__Transport, "%LIBRARY_NAME%", "%SERVICE_NAME%", "%OPERATION_NAME%Response");
+	  // <%%% START IF_RESULT_SIMPLE %%%>
+	  __Message->Write("Result", __Get%OPERATION_RESULT%Info, &lResult, TParamAttributes(%OPERATION_RESULT_ATTRIBUTE%));
+	  // <%%% END IF_RESULT_SIMPLE %%%>
+	  // <%%% START IF_RESULT_COMPLEX %%%>
+	  __Message->Write("Result", __typeinfo(%OPERATION_RESULT%), &lResult, TParamAttributes(%OPERATION_RESULT_ATTRIBUTE%));
+	  // <%%% END IF_RESULT_COMPLEX %%%>
+	  // <%%% START OUT_PARAMS_NO_STRIP %%%>
+	  // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+	  __Message->Write("%PARAM_NAME%", __Get%PARAM_TYPE%Info, &%PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));
+	  // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+	  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+	  __Message->Write("%PARAM_NAME%", __typeinfo(%PARAM_TYPE%), &%PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));
+	  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+	  // <%%% END OUT_PARAMS_NO_STRIP %%%>
+	  __Message->Finalize();
+	  __Message->UnsetAttributes(__Transport);
+	}
+	else
+	{
+	  throw new EIntfCastError("Critical error in Invoker: Instance does not support I%SERVICE_NAME% interface");
+	}
+  }
+  __finally
+  {
+	// <%%% START IF_HAS_COMPLEX_TYPE %%%>
+	TROObjectDisposer* __lObjectDisposer = new TROObjectDisposer(__Instance);
+	try
+	{
+	  // <%%% START PARAMS_NO_STRIP %%%>
+	  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+	  __lObjectDisposer->Add(%PARAM_NAME%);
+	  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+	  // <%%% END PARAMS_NO_STRIP %%%>
+	  // <%%% START IF_RESULT_COMPLEX %%%>
+	  __lObjectDisposer->Add(lResult);
+	  // <%%% END IF_RESULT_COMPLEX %%%>
+	}
+	__finally
+	{
+	  delete __lObjectDisposer;
+	}
+	// <%%% END IF_HAS_COMPLEX_TYPE %%%>
+  }
+}
+
+// <%%% END FUNCTION_OPERATIONS %%%>
+// <%%% START PROCEDURE_OPERATIONS %%%>
+void __fastcall T%SERVICE_NAME%_Invoker::Invoke_%OPERATION_NAME%(
+		const System::_di_IInterface __Instance,
+		const Uroclientintf::_di_IROMessage __Message,
+		const Uroclientintf::_di_IROTransport __Transport,
+		/* out */ Uroserverintf::TROResponseOptions& __oResponseOptions)
+{
+// virtual void __fastcall %OPERATION_NAME%(
+// <%%% START PARAMS %%%>
+// <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+//   %PARAM_FRONT_MODIFIER% %PARAM_TYPE% %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+// <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+// <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+//   %PARAM_FRONT_MODIFIER% %PARAM_TYPE%* %PARAM_BACK_MODIFIER% %PARAM_NAME%,
+// <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+// <%%% END PARAMS %%%>
+//   );
+
+  // <%%% START PARAMS_NO_STRIP %%%>
+  // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+  %PARAM_TYPE% %PARAM_NAME%;
+  // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+  %PARAM_TYPE%* %PARAM_NAME%;
+  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+  // <%%% END PARAMS_NO_STRIP %%%>
+  try
+  {
+	_di_I%SERVICE_NAME% __%SERVICE_NAME%Instance;
+	if (__Instance->Supports(__%SERVICE_NAME%Instance))
+	{
+	  // <%%% START IN_PARAMS_NO_STRIP %%%>
+	  // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+	  __Message->Read("%PARAM_NAME%", __Get%PARAM_TYPE%Info, &%PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));
+	  // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+	  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+	  __Message->Read("%PARAM_NAME%", __typeinfo(%PARAM_TYPE%), &%PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));
+	  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+	  // <%%% END IN_PARAMS_NO_STRIP %%%>
+
+	  __%SERVICE_NAME%Instance->%OPERATION_NAME%(
+								  // <%%% START PARAMS %%%>
+								  %PARAM_NAME%,
+								  // <%%% END PARAMS %%%>
+								  );
+
+	  __Message->InitializeResponseMessage(__Transport, "%LIBRARY_NAME%", "%SERVICE_NAME%", "%OPERATION_NAME%Response");
+	  // <%%% START OUT_PARAMS_NO_STRIP %%%>
+	  // <%%% START IF_PARAM_TYPE_SIMPLE %%%>
+	  __Message->Write("%PARAM_NAME%", __Get%PARAM_TYPE%Info, &%PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));
+	  // <%%% END IF_PARAM_TYPE_SIMPLE %%%>
+	  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+	  __Message->Write("%PARAM_NAME%", __typeinfo(%PARAM_TYPE%), &%PARAM_NAME%, TParamAttributes(%PARAM_ATTRIBUTE%));
+	  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+	  // <%%% END OUT_PARAMS_NO_STRIP %%%>
+	  __Message->Finalize();
+	  __Message->UnsetAttributes(__Transport);
+	  // <%%% START IF_NO_OUT_PARAMS %%%>
+
+	  __oResponseOptions = TROResponseOptions() << roNoResponse;
+	  // <%%% END IF_NO_OUT_PARAMS %%%>
+	}
+	else
+	{
+	  throw new EIntfCastError("Critical error in Invoker: Instance does not support %SERVICE_NAME% interface");
+	}
+  }
+  __finally
+  {
+	// <%%% START IF_HAS_COMPLEX_TYPE %%%>
+	TROObjectDisposer* __lObjectDisposer = new TROObjectDisposer(__Instance);
+	try
+	{
+	  // <%%% START PARAMS_NO_STRIP %%%>
+	  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+	  __lObjectDisposer->Add(%PARAM_NAME%);
+	  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+	  // <%%% END PARAMS_NO_STRIP %%%>
+	}
+	__finally
+	{
+	  delete __lObjectDisposer;
+	}
+	// <%%% END IF_HAS_COMPLEX_TYPE %%%>
+  }
+}
+// <%%% END PROCEDURE_OPERATIONS %%%>
+// <%%% END SERVICES %%%>
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.invk.h b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.invk.h
new file mode 100644
index 0000000..099b939
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.invk.h	
@@ -0,0 +1,73 @@
+// %UNIT_NAME%
+//
+/*---------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project.                                }
+{                                                                            }
+{ Do not modify this unit manually, or your changes will be lost when this   }
+{ unit is regenerated the next time you compile the project.                 }
+{---------------------------------------------------------------------------*/
+
+#ifndef %UNIT_NAME%H
+#define %UNIT_NAME%H
+
+#pragma delphiheader begin
+#pragma option push
+#pragma option -w-      // All warnings off
+#pragma option -Vx      // Zero-length empty class member functions
+#pragma pack(push,8)
+
+#include <System.hpp>			    // Pascal unit
+#include <Uroserver.hpp>	    // Pascal unit
+// <%%% START REQUIRED_UNITS %%%>
+#include <%REQUIRED_UNIT_NAME%.hpp>
+// <%%% END REQUIRED_UNITS %%%>
+
+#include "%LIBRARY_NAME%_Intf.h"
+
+namespace %NAMESPACE_NAME%
+{
+//-- type declarations -------------------------------------------------------
+typedef Classes::TSeekOrigin TSeekOrigin;   // Fake declaration 
+
+// <%%% START SERVICES %%%>
+class DELPHICLASS T%SERVICE_NAME%_Invoker : public TROInvoker
+{
+  typedef Uroserver::TROInvoker inherited;
+
+  __published:
+    // <%%% START FUNCTION_OPERATIONS %%%>
+    void __fastcall Invoke_%OPERATION_NAME%(
+        const System::_di_IInterface __Instance,
+        const Uroclientintf::_di_IROMessage __Message,
+        const Uroclientintf::_di_IROTransport __Transport,
+        /* out */ Uroserverintf::TROResponseOptions& __oResponseOptions);
+    // <%%% END FUNCTION_OPERATIONS %%%>
+    // <%%% START PROCEDURE_OPERATIONS %%%>
+    void __fastcall Invoke_%OPERATION_NAME%(
+        const System::_di_IInterface __Instance,
+        const Uroclientintf::_di_IROMessage __Message,
+        const Uroclientintf::_di_IROTransport __Transport,
+        /* out */ Uroserverintf::TROResponseOptions& __oResponseOptions);
+    // <%%% END PROCEDURE_OPERATIONS %%%>
+  public:
+	#pragma option push -w-inl
+	/* TROInvoker.Create */ inline __fastcall virtual T%SERVICE_NAME%_Invoker(): Uroserver::TROInvoker() {}
+	#pragma option pop
+	#pragma option push -w-inl
+	/* TROInvoker.Destroy */ inline __fastcall virtual ~T%SERVICE_NAME%_Invoker() {}
+	#pragma option pop
+
+  protected:
+  private:
+};
+// <%%% END SERVICES %%%>
+
+}	// namespace %NAMESPACE_NAME%
+using namespace %NAMESPACE_NAME%;
+#pragma pack(pop)
+#pragma option pop
+#pragma delphiheader end.
+//-- end H ----------------------------------------------------------------
+#endif	// %UNIT_NAME%H
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.invk.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.invk.pas
new file mode 100644
index 0000000..32713ba
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.invk.pas	
@@ -0,0 +1,182 @@
+unit %UNIT_NAME%;
+
+{----------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project .                               }
+{                                                                            }
+{ Do not modify this unit manually, or your changes will be lost when this   }
+{ unit is regenerated the next time you compile the project.                 }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  {vcl:} Classes,
+  {RemObjects:} uROXMLIntf, uROServer, uROServerIntf, uROTypes, uROClientIntf,
+  // <%%% START REQUIRED_UNITS %%%>
+  {Required:} %REQUIRED_UNIT_NAME%,
+  // <%%% END REQUIRED_UNITS %%%>
+  {Generated:} %LIBRARY_NAME%_Intf;
+
+type
+  TSeekOrigin = Classes.TSeekOrigin; // fake declaration
+
+  // <%%% START SERVICES %%%>
+  T%SERVICE_NAME%_Invoker = class(T%SERVICE_INVOKER_ANCESTOR_NAME%)
+  private
+  protected
+    constructor Create; override;
+  published
+    // <%%% START FUNCTION_OPERATIONS %%%>
+    procedure Invoke_%OPERATION_NAME%(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+    // <%%% END FUNCTION_OPERATIONS %%%>
+    // <%%% START PROCEDURE_OPERATIONS %%%>
+    procedure Invoke_%OPERATION_NAME%(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+    // <%%% END PROCEDURE_OPERATIONS %%%>
+  end;
+
+  // <%%% END SERVICES %%%>
+implementation
+
+uses
+  {RemObjects:} uRORes, uROClient;
+
+// <%%% START SERVICES %%%>
+{ T%SERVICE_NAME%_Invoker }
+
+constructor T%SERVICE_NAME%_Invoker.Create;
+begin
+  inherited Create;
+  FAbstract := %IS_ABSTRACT%;
+end;
+
+// <%%% START FUNCTION_OPERATIONS %%%>
+procedure T%SERVICE_NAME%_Invoker.Invoke_%OPERATION_NAME%(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function %OPERATION_NAME%(
+              // <%%% START PARAMS %%%>
+              %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;
+              // <%%% END PARAMS %%%>
+              ): %OPERATION_RESULT%; }
+var
+  // <%%% START PARAMS_NO_STRIP %%%>
+  %PARAM_NAME%: %PARAM_TYPE%;
+  // <%%% END PARAMS_NO_STRIP %%%>
+  lResult: %OPERATION_RESULT%;
+  // <%%% START IF_HAS_COMPLEX_TYPE %%%>
+  __lObjectDisposer: TROObjectDisposer;
+  // <%%% END IF_HAS_COMPLEX_TYPE %%%>
+  __%SERVICE_NAME%Instance: I%SERVICE_NAME%;
+begin
+  // <%%% START PARAMS_NO_STRIP %%%>
+  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+  %PARAM_NAME% := nil;
+  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+  // <%%% END PARAMS_NO_STRIP %%%>
+  // <%%% START IF_RESULT_COMPLEX %%%>
+  lResult := nil;
+  // <%%% END IF_RESULT_COMPLEX %%%>
+  try
+    // <%%% START IN_PARAMS_NO_STRIP %%%>
+    __Message.Read('%PARAM_NAME%', TypeInfo(%PARAM_TYPE%), %PARAM_NAME%, [%PARAM_ATTRIBUTE%]);
+    // <%%% END IN_PARAMS_NO_STRIP %%%>
+
+    __%SERVICE_NAME%Instance := __Instance as I%SERVICE_NAME%; 
+    lResult := __%SERVICE_NAME%Instance.%OPERATION_NAME%(
+                                          // <%%% START PARAMS %%%>
+                                          %PARAM_NAME%,
+                                          // <%%% END PARAMS %%%>
+                                          );
+
+    __Message.InitializeResponseMessage(__Transport, '%LIBRARY_NAME%', '%SERVICE_NAME%', '%OPERATION_NAME%Response');
+    __Message.Write('Result', TypeInfo(%OPERATION_RESULT%), lResult, [%OPERATION_RESULT_ATTRIBUTE%]);
+    // <%%% START OUT_PARAMS_NO_STRIP %%%>
+    __Message.Write('%PARAM_NAME%', TypeInfo(%PARAM_TYPE%), %PARAM_NAME%, [%PARAM_ATTRIBUTE%]);
+    // <%%% END OUT_PARAMS_NO_STRIP %%%>
+    __Message.Finalize;
+    __Message.UnsetAttributes(__Transport);
+    
+  finally
+    // <%%% START IF_HAS_COMPLEX_TYPE %%%>
+    __lObjectDisposer := TROObjectDisposer.Create(__Instance);
+    try
+      // <%%% START PARAMS_NO_STRIP %%%>
+      // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+      __lObjectDisposer.Add(%PARAM_NAME%);
+      // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+      // <%%% END PARAMS_NO_STRIP %%%>
+      // <%%% START IF_RESULT_COMPLEX %%%>
+      __lObjectDisposer.Add(lResult);
+      // <%%% END IF_RESULT_COMPLEX %%%>
+    finally
+      __lObjectDisposer.Free();
+    end;
+    // <%%% END IF_HAS_COMPLEX_TYPE %%%>
+  end;
+end;
+
+// <%%% END FUNCTION_OPERATIONS %%%>
+// <%%% START PROCEDURE_OPERATIONS %%%>
+procedure T%SERVICE_NAME%_Invoker.Invoke_%OPERATION_NAME%(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ procedure %OPERATION_NAME%(
+              // <%%% START PARAMS %%%>
+              %PARAM_FRONT_MODIFIER% %PARAM_NAME%: %PARAM_TYPE%;
+              // <%%% END PARAMS %%%>
+              ); }
+var
+  // <%%% START PARAMS_NO_STRIP %%%>
+  %PARAM_NAME%: %PARAM_TYPE%;
+  // <%%% END PARAMS_NO_STRIP %%%>
+  // <%%% START IF_HAS_COMPLEX_TYPE %%%>
+  __lObjectDisposer: TROObjectDisposer;
+  // <%%% END IF_HAS_COMPLEX_TYPE %%%>
+  __%SERVICE_NAME%Instance: I%SERVICE_NAME%;
+begin
+  // <%%% START PARAMS_NO_STRIP %%%>
+  // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+  %PARAM_NAME% := nil;
+  // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+  // <%%% END PARAMS_NO_STRIP %%%>
+  try
+    // <%%% START IN_PARAMS_NO_STRIP %%%>
+    __Message.Read('%PARAM_NAME%', TypeInfo(%PARAM_TYPE%), %PARAM_NAME%, [%PARAM_ATTRIBUTE%]);
+    // <%%% END IN_PARAMS_NO_STRIP %%%>
+
+    __%SERVICE_NAME%Instance := __Instance as I%SERVICE_NAME%; 
+    __%SERVICE_NAME%Instance.%OPERATION_NAME%(
+                               // <%%% START PARAMS %%%>
+                               %PARAM_NAME%,
+                               // <%%% END PARAMS %%%>
+                               );
+
+    __Message.InitializeResponseMessage(__Transport, '%LIBRARY_NAME%', '%SERVICE_NAME%', '%OPERATION_NAME%Response');
+    // <%%% START OUT_PARAMS_NO_STRIP %%%>
+    __Message.Write('%PARAM_NAME%', TypeInfo(%PARAM_TYPE%), %PARAM_NAME%, [%PARAM_ATTRIBUTE%]);
+    // <%%% END OUT_PARAMS_NO_STRIP %%%>
+    __Message.Finalize;
+    __Message.UnsetAttributes(__Transport);
+    
+    // <%%% START IF_NO_OUT_PARAMS %%%>
+    __oResponseOptions := [roNoResponse];
+
+    // <%%% END IF_NO_OUT_PARAMS %%%>
+  finally
+    // <%%% START IF_HAS_COMPLEX_TYPE %%%>
+    __lObjectDisposer := TROObjectDisposer.Create(__Instance);
+    try
+      // <%%% START PARAMS_NO_STRIP %%%>
+      // <%%% START IF_PARAM_TYPE_COMPLEX %%%>
+      __lObjectDisposer.Add(%PARAM_NAME%);
+      // <%%% END IF_PARAM_TYPE_COMPLEX %%%>
+      // <%%% END PARAMS_NO_STRIP %%%>
+    finally
+      __lObjectDisposer.Free();
+    end;
+    // <%%% END IF_HAS_COMPLEX_TYPE %%%>
+  end;
+end;
+
+// <%%% END PROCEDURE_OPERATIONS %%%>
+// <%%% END SERVICES %%%>
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.wrapper_async.h b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.wrapper_async.h
new file mode 100644
index 0000000..cc1b1bb
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.wrapper_async.h	
@@ -0,0 +1,15 @@
+{----------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project .                               }
+{                                                                            }
+{ Do not modify this unit manually, or your changes will be lost when this   }
+{ unit is regenerated the next time you compile the project.                 }
+{----------------------------------------------------------------------------}
+#ifndef %UNIT_NAME%_H
+#define %UNIT_NAME%_H
+
+// <%%% START USES %%%>
+#include "%USED_UNIT_NAME%.h"
+// <%%% END USES %%%>
+
+#endif
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.wrapper_async.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.wrapper_async.pas
new file mode 100644
index 0000000..f8fdd7a
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.wrapper_async.pas	
@@ -0,0 +1,26 @@
+unit %UNIT_NAME%;
+
+{----------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project .                               }
+{                                                                            }
+{ Do not modify this unit manually, or your changes will be lost when this   }
+{ unit is regenerated the next time you compile the project.                 }
+{----------------------------------------------------------------------------}
+
+interface
+
+uses
+  // <%%% START USES %%%>
+  %USED_UNIT_NAME%,
+  // <%%% END USES %%%>
+  ;
+
+type
+  // <%%% START TYPES %%%>
+  %TYPE_NAME% = %TYPE_UNIT_NAME%.%TYPE_NAME%;
+  // <%%% END TYPES %%%>
+  
+implementation
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.wrapper_intf.h b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.wrapper_intf.h
new file mode 100644
index 0000000..cc1b1bb
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.wrapper_intf.h	
@@ -0,0 +1,15 @@
+{----------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project .                               }
+{                                                                            }
+{ Do not modify this unit manually, or your changes will be lost when this   }
+{ unit is regenerated the next time you compile the project.                 }
+{----------------------------------------------------------------------------}
+#ifndef %UNIT_NAME%_H
+#define %UNIT_NAME%_H
+
+// <%%% START USES %%%>
+#include "%USED_UNIT_NAME%.h"
+// <%%% END USES %%%>
+
+#endif
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.wrapper_intf.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.wrapper_intf.pas
new file mode 100644
index 0000000..f8fdd7a
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.wrapper_intf.pas	
@@ -0,0 +1,26 @@
+unit %UNIT_NAME%;
+
+{----------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project .                               }
+{                                                                            }
+{ Do not modify this unit manually, or your changes will be lost when this   }
+{ unit is regenerated the next time you compile the project.                 }
+{----------------------------------------------------------------------------}
+
+interface
+
+uses
+  // <%%% START USES %%%>
+  %USED_UNIT_NAME%,
+  // <%%% END USES %%%>
+  ;
+
+type
+  // <%%% START TYPES %%%>
+  %TYPE_NAME% = %TYPE_UNIT_NAME%.%TYPE_NAME%;
+  // <%%% END TYPES %%%>
+  
+implementation
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.wrapper_invk.h b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.wrapper_invk.h
new file mode 100644
index 0000000..cc1b1bb
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.wrapper_invk.h	
@@ -0,0 +1,15 @@
+{----------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project .                               }
+{                                                                            }
+{ Do not modify this unit manually, or your changes will be lost when this   }
+{ unit is regenerated the next time you compile the project.                 }
+{----------------------------------------------------------------------------}
+#ifndef %UNIT_NAME%_H
+#define %UNIT_NAME%_H
+
+// <%%% START USES %%%>
+#include "%USED_UNIT_NAME%.h"
+// <%%% END USES %%%>
+
+#endif
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.wrapper_invk.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.wrapper_invk.pas
new file mode 100644
index 0000000..57fa4a2
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/Templates/template.wrapper_invk.pas	
@@ -0,0 +1,26 @@
+unit %UNIT_NAME%;
+
+{----------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project .                               }
+{                                                                            }
+{ Do not modify this unit manually, or your changes will be lost when this   }
+{ unit is regenerated the next time you compile the project.                 }
+{----------------------------------------------------------------------------}
+
+interface
+
+uses
+  // <%%% START USES %%%>
+  %USED_UNIT_NAME%,
+  // <%%% END USES %%%>
+  ;
+
+type
+  // <%%% START TYPES %%%>
+  %TYPE_NAME%_Invoker = %TYPE_UNIT_NAME%.%TYPE_NAME%_Invoker;
+  // <%%% END TYPES %%%>
+  
+implementation
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/uRODLAsyncConverter.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/uRODLAsyncConverter.pas
new file mode 100644
index 0000000..d67f978
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/uRODLAsyncConverter.pas	
@@ -0,0 +1,104 @@
+unit uRODLAsyncConverter;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - CodeGen2                                          }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+
+uses
+  uRODL, uRODLTemplateBasedConverter, uRODLIntfConverter;
+
+type
+  TRODLAsyncConverter = class (TRODLIntfConverter)
+  protected
+    function GetServicesSectionClass: TServicesSectionClass; override;
+    function GetUsedFileRequiredUnits(const UsedRODLFileName: string): string; override;
+  end;
+
+
+type
+  TAsyncServicesSection = class (TIntfServicesSection)
+  protected
+    function GetAncestorName(const aService: TRODLBaseService): string; override;
+    function GetProxyAncestorName(const aService: TRODLBaseService): string; override;
+    function GetProxySuffix: string; override;
+
+    procedure DoReplacements(var curLine: string; const aService: TRODLBaseService; const aLibrary: TRODLLibrary); override;
+  end;
+
+implementation
+
+uses
+  uROClasses, uRODLTemplateBasedConverterUtils;
+
+{ TRODLAsyncConverter }
+
+function TRODLAsyncConverter.GetServicesSectionClass: TServicesSectionClass;
+begin
+  Result := TAsyncServicesSection;
+end;
+
+function TRODLAsyncConverter.GetUsedFileRequiredUnits(
+  const UsedRODLFileName: string): string;
+begin
+  Result := inherited GetUsedFileRequiredUnits(UsedRODLFileName);
+
+  if Result <> '' then
+    Result := Result + ',';
+
+  Result := Result + UsedRODLFileName + DEFAULT_ASYNC_SUFFIX;
+end;
+
+{ TAsyncServicesSection }
+
+procedure TAsyncServicesSection.DoReplacements(var curLine: string;
+  const aService: TRODLBaseService; const aLibrary: TRODLLibrary);
+begin
+  inherited DoReplacements(curLine, aService, aLibrary);
+
+  MacroReplace(curLine, '%',
+               ['ASYNC_SERVICE_UID', NewGuidAsString
+               ]);
+end;
+
+function TAsyncServicesSection.GetAncestorName(
+  const aService: TRODLBaseService): string;
+begin
+  Result := inherited GetAncestorName(aService);
+
+  if Length(Result) > 0 then
+    Result := Result + DEFAULT_ASYNC_SUFFIX
+  else
+    Result := DEFAULT_SERVICE_ASYNC_ANCESTOR_NAME;
+end;
+
+function TAsyncServicesSection.GetProxyAncestorName(
+  const aService: TRODLBaseService): string;
+begin
+  Result := inherited GetProxyAncestorName(aService);
+
+  if (Length(Result) = 0) or (Result = DEFAULT_SERVICE_PROXY_ANCESTOR_NAME)  then
+    Result := DEFAULT_SERVICE_ASYNC_PROXY_ANCESTOR_NAME;
+end;
+
+function TAsyncServicesSection.GetProxySuffix: string;
+begin
+  Result := DEFAULT_ASYNC_PROXY_SUFFIX;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/uRODLConvertersUtils.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/uRODLConvertersUtils.pas
new file mode 100644
index 0000000..8d2898e
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/uRODLConvertersUtils.pas	
@@ -0,0 +1,937 @@
+unit uRODLConvertersUtils;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - CodeGen2                                          }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+
+uses
+  {$IFDEF FPC}LResources,{$ENDIF}
+  Classes, uRODLImplConverter, uRODLToXML, uRODL;
+
+const
+  DEFAULT_DELPHI_INTF_TEMPLATE_FILENAME = 'template.intf.pas';
+  DEFAULT_DELPHI_INVK_TEMPLATE_FILENAME = 'template.invk.pas';
+  DEFAULT_DELPHI_IMPL_TEMPLATE_FILENAME = 'template.impl.pas';
+  DEFAULT_DELPHI_ASYNC_TEMPLATE_FILENAME = 'template.async.pas';
+  DEFAULT_DELPHI_INTF_WRAPPER_TEMPLATE_FILENAME = 'template.wrapper_intf.pas';
+  DEFAULT_DELPHI_INVK_WRAPPER_TEMPLATE_FILENAME = 'template.wrapper_invk.pas';
+  DEFAULT_DELPHI_ASYNC_WRAPPER_TEMPLATE_FILENAME = 'template.wrapper_async.pas';
+
+  DEFAULT_CPP_INTF_TEMPLATE_FILENAME = 'template.intf.cpp';
+  DEFAULT_CPP_INVK_TEMPLATE_FILENAME = 'template.invk.cpp';
+  DEFAULT_CPP_IMPL_TEMPLATE_FILENAME = 'template.impl.cpp';
+  DEFAULT_CPP_ASYNC_TEMPLATE_FILENAME = 'template.async.cpp';
+  DEFAULT_CPP_INTF_WRAPPER_TEMPLATE_FILENAME = 'template.wrapper_intf.h';
+  DEFAULT_CPP_INVK_WRAPPER_TEMPLATE_FILENAME = 'template.wrapper_invk.h';
+  DEFAULT_CPP_ASYNC_WRAPPER_TEMPLATE_FILENAME = 'template.wrapper_async.h';
+
+{$IFNDEF FPC}
+  {$R Templates\Templates.res}
+{$ENDIF}  
+
+type
+  TROCodeGenLanguage = (cglDelphiWin32, cglCppBuilder, cglCpp, cglObjectiveC);
+  TROCodeGenType = (cgtIntf, cgtInvk, cgtImpl, cgtAsync, cgtRes);
+
+
+// Delphi
+procedure GenerateDelphiIntf(const LibraryFileName: string; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False); overload;
+procedure GenerateDelphiInvk(const LibraryFileName: string; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False); overload;
+procedure GenerateDelphiImpl(const LibraryFileName: string; const ServiceName: string; const TemplateFileName: string = ''; const AncestorName: string = DEFAULT_IMPL_SERVICE_ANCESTOR; const OutputFileName: string = ''; const aRequiredUnits: string = ''); overload;
+procedure GenerateDelphiAsync(const LibraryFileName: string; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False); overload;
+
+procedure GenerateDelphiIntf(const aLibrary: TRODLLibrary; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False); overload;
+procedure GenerateDelphiInvk(const aLibrary: TRODLLibrary; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False); overload;
+procedure GenerateDelphiImpl(const aLibrary: TRODLLibrary; const ServiceName: string; const TemplateFileName: string = ''; const AncestorName: string = DEFAULT_IMPL_SERVICE_ANCESTOR; const OutputFileName: string = ''; const aRequiredUnits: string = ''); overload;
+procedure GenerateDelphiAsync(const aLibrary: TRODLLibrary; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False); overload;
+
+procedure GenerateDelphiIntf(const aLibrary: TRODLLibrary; const OutputStream: TStream; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False); overload;
+procedure GenerateDelphiInvk(const aLibrary: TRODLLibrary; const OutputStream: TStream; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False); overload;
+procedure GenerateDelphiImpl(const aLibrary: TRODLLibrary; const OutputStream: TStream; const OutputDFMStream: TStream; const ServiceName: string; const TemplateFileName: string = ''; const AncestorName: string = DEFAULT_IMPL_SERVICE_ANCESTOR; const OutputFileName: string = ''; const aRequiredUnits: string = ''); overload;
+procedure GenerateDelphiAsync(const aLibrary: TRODLLibrary; const OutputStream: TStream; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False); overload;
+
+// Cpp
+procedure GenerateCppIntf(const LibraryFileName: string; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False); overload;
+procedure GenerateCppInvk(const LibraryFileName: string; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False); overload;
+procedure GenerateCppImpl(const LibraryFileName: string; const ServiceName: string; const TemplateFileName: string = ''; const AncestorName: string = DEFAULT_IMPL_SERVICE_ANCESTOR; const OutputFileName: string = ''; const aRequiredUnits: string = ''); overload;
+procedure GenerateCppAsync(const LibraryFileName: string; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False); overload;
+
+procedure GenerateCppIntf(const aLibrary: TRODLLibrary; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False); overload;
+procedure GenerateCppInvk(const aLibrary: TRODLLibrary; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False); overload;
+procedure GenerateCppImpl(const aLibrary: TRODLLibrary; const ServiceName: string; const TemplateFileName: string = ''; const AncestorName: string = DEFAULT_IMPL_SERVICE_ANCESTOR; const OutputFileName: string = ''; const aRequiredUnits: string = ''); overload;
+procedure GenerateCppAsync(const aLibrary: TRODLLibrary; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False); overload;
+
+procedure GenerateCppIntf(const aLibrary: TRODLLibrary; const OutputStream: TStream; const OutputHStream: TStream; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False); overload;
+procedure GenerateCppInvk(const aLibrary: TRODLLibrary; const OutputStream: TStream; const OutputHStream: TStream; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False); overload;
+procedure GenerateCppImpl(const aLibrary: TRODLLibrary; const OutputStream: TStream; const OutputHStream: TStream; const OutputDFMStream: TStream; const ServiceName: string; const TemplateFileName: string = ''; const AncestorName: string = DEFAULT_IMPL_SERVICE_ANCESTOR; const OutputFileName: string = ''; const aRequiredUnits: string = ''); overload;
+procedure GenerateCppAsync(const aLibrary: TRODLLibrary; const OutputStream: TStream; const OutputHStream: TStream; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False); overload;
+
+procedure GenerateUnitToStream(aLibrary: TRODLLibrary; aService:TRODLService; aType: TROCodeGenType; aLanguage: TROCodeGenLanguage; aStream, aStream2: TStream; aAncestorName: string = ''; aUnitname: string = ''; aRequiredUnits: string = ''; GenerateUsedRODLS: Boolean = False);
+procedure GenerateUnitToFile(aLibraryFileName: string; aService:TRODLService; aType: TROCodeGenType; aLanguage: TROCodeGenLanguage; aAncestorName: string = ''; aFilename: string = ''; aRequiredUnits: string = ''; GenerateUsedRODLS: Boolean = False); overload;
+procedure GenerateUnitToFile(aLibrary: TRODLLibrary; aService:TRODLService; aType: TROCodeGenType; aLanguage: TROCodeGenLanguage; aAncestorName: string = ''; aFilename: string = ''; aRequiredUnits: string = ''; GenerateUsedRODLS: Boolean = False); overload;
+
+// Misc.
+function GetTargetFileName(aLibrary: TRODLLibrary; aService:TRODLService; aType: TROCodeGenType; aLanguage: TROCodeGenLanguage): string;
+
+implementation
+
+uses
+  SysUtils,
+  uRODLTemplateBasedConverterUtils,
+  uRODLDelphiConverters, uRODLCppConverters;
+
+// Delphi
+procedure GenerateDelphiIntf(const LibraryFileName: string; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False);
+var
+  lib: TRODLLibrary;
+begin
+  lib :=  ReadRODLFromFile(TXMLToRODL, LibraryFileName);
+  try
+    GenerateDelphiIntf(lib, TemplateFileName, OutputFileName, ASplit, AWrapperTemplateName, entities, GenerateUsedRODLS);
+  finally
+    lib.Free;
+  end;
+end;
+
+procedure GenerateDelphiInvk(const LibraryFileName: string; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False);
+var
+  lib: TRODLLibrary;
+begin
+  lib :=  ReadRODLFromFile(TXMLToRODL, LibraryFileName);
+  try
+    GenerateDelphiInvk(lib, TemplateFileName, OutputFileName, ASplit, AWrapperTemplateName, entities, GenerateUsedRODLS);
+  finally
+    lib.Free;
+  end;
+end;
+
+procedure GenerateDelphiImpl(const LibraryFileName: string; const ServiceName: string; const TemplateFileName: string = ''; const AncestorName: string = DEFAULT_IMPL_SERVICE_ANCESTOR; const OutputFileName: string = ''; const aRequiredUnits: string = '');
+var
+  lib: TRODLLibrary;
+begin
+  lib :=  ReadRODLFromFile(TXMLToRODL, LibraryFileName);
+  try
+    GenerateDelphiImpl(lib, ServiceName, TemplateFileName, AncestorName, OutputFileName, aRequiredUnits);
+  finally
+    lib.Free;
+  end;
+end;
+
+procedure GenerateDelphiAsync(const LibraryFileName: string; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False);
+var
+  lib: TRODLLibrary;
+begin
+  lib :=  ReadRODLFromFile(TXMLToRODL, LibraryFileName);
+  try
+    GenerateDelphiAsync(lib, TemplateFileName, OutputFileName, ASplit, AWrapperTemplateName, entities, GenerateUsedRODLS);
+  finally
+    lib.Free;
+  end;
+end;
+
+procedure GenerateDelphiIntf(const aLibrary: TRODLLibrary; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False);
+var
+  outputName: string;
+  outputStream: TMemoryStream;
+begin
+  if Length(OutputFileName) = 0 then
+    outputName := aLibrary.Name + DEFAULT_INTF_SUFFIX + '.pas'
+  else
+    outputName := OutputFileName;
+
+  outputStream := TMemoryStream.Create;
+  try
+    GenerateDelphiIntf(aLibrary, outputStream, TemplateFileName, OutputFileName, ASplit, AWrapperTemplateName, Entities, GenerateUsedRODLS);
+
+    outputStream.SaveToFile(outputName);
+  finally
+    outputStream.Free;
+  end;
+end;
+
+procedure GenerateDelphiInvk(const aLibrary: TRODLLibrary; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False);
+var
+  outputName: string;
+  outputStream: TMemoryStream;
+begin
+  if Length(OutputFileName) = 0 then
+    outputName := aLibrary.Name + DEFAULT_INVK_SUFFIX + '.pas'
+  else
+    outputName := OutputFileName;
+
+  outputStream := TMemoryStream.Create;
+  try
+    GenerateDelphiInvk(aLibrary, outputStream, TemplateFileName, OutputFileName, ASplit, AWrapperTemplateName, Entities, GenerateUsedRODLS);
+
+    outputStream.SaveToFile(outputName);
+  finally
+    outputStream.Free;
+  end;
+end;
+
+procedure GenerateDelphiImpl(const aLibrary: TRODLLibrary; const ServiceName: string; const TemplateFileName: string = ''; const AncestorName: string = DEFAULT_IMPL_SERVICE_ANCESTOR; const OutputFileName: string = ''; const aRequiredUnits: string = '');
+var
+  outputName: string;
+  outputStream: TMemoryStream;
+  outputDFMStream: TMemoryStream;
+begin
+  if Length(OutputFileName) = 0 then
+    outputName := ServiceName + DEFAULT_IMPL_SUFFIX + '.pas'
+  else
+    outputName := OutputFileName;
+
+  outputStream := TMemoryStream.Create;
+  outputDFMStream := TMemoryStream.Create;
+  try
+    GenerateDelphiImpl(aLibrary, outputStream, outputDFMStream, ServiceName, TemplateFileName, AncestorName, OutputFileName, aRequiredUnits);
+
+    outputStream.SaveToFile(outputName);
+    if outputDFMStream.Size > 0 then
+      outputDFMStream.SaveToFile(ChangeFileExt(outputName, '.dfm'));
+  finally
+    outputDFMStream.Free;
+    outputStream.Free;
+  end;
+end;
+
+procedure GenerateDelphiAsync(const aLibrary: TRODLLibrary; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False);
+var
+  outputName: string;
+  outputStream: TMemoryStream;
+begin
+  if Length(OutputFileName) = 0 then
+    outputName := aLibrary.Name + DEFAULT_ASYNC_SUFFIX + '.pas'
+  else
+    outputName := OutputFileName;
+
+  outputStream := TMemoryStream.Create;
+  try
+    GenerateDelphiAsync(aLibrary, outputStream, TemplateFileName, OutputFileName, ASplit, AWrapperTemplateName, entities, GenerateUsedRODLS);
+
+    outputStream.SaveToFile(outputName);
+  finally
+    outputStream.Free;
+  end;
+end;
+
+procedure GenerateDelphiIntf(const aLibrary: TRODLLibrary; const OutputStream: TStream; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False);
+var
+  gen: TRODLDelphiIntfConverter;
+  templateName: string;
+  outputName: string;
+  unitName: string;
+  wrapperTemplateName: string;
+  i: Integer;
+  TmpSplit: Boolean;
+  RODLToUse: string;
+begin
+  if (Length(TemplateFileName) = 0) or not FileExists(TemplateFileName) then
+    templateName := DEFAULT_DELPHI_INTF_TEMPLATE_FILENAME
+  else
+    templateName := TemplateFileName;
+
+  if (Length(AWrapperTemplateName) = 0) or not FileExists(AWrapperTemplateName) then
+    wrapperTemplateName := DEFAULT_DELPHI_INTF_WRAPPER_TEMPLATE_FILENAME
+  else
+    wrapperTemplateName := AWrapperTemplateName;
+
+  if Length(OutputFileName) = 0 then
+    outputName := aLibrary.Name + DEFAULT_INTF_SUFFIX + '.pas'
+  else
+    outputName := OutputFileName;
+    
+  unitName := ChangeFileExt(ExtractFileName(outputName), '');
+
+  ClearAllCaches;
+  gen := TRODLDelphiIntfConverter.Create(aLibrary, templateName, unitName,
+                                         ASplit, ExtractFilePath(outputName),
+                                         wrapperTemplateName, entities);
+  try
+    gen.SaveResultToStream(OutputStream);
+  finally
+    gen.Free;
+  end;
+
+  if GenerateUsedRODLs then
+  begin
+    for i := 0 to aLibrary.UseCount-1 do
+    begin
+      if (aLibrary.Use[i].GenerateCode) then
+      begin
+        case aLibrary.Use[i].SplitMode of
+          usmNever:
+            TmpSplit := False;
+          usmAlways:
+            TmpSplit := True;
+          else
+            TmpSplit := ASplit;
+        end;
+
+        RODLToUse := ExpandVariables(aLibrary.Use[i].RodlFile);
+        if not FileExists(RODLTouse) then
+          RODLToUse := aLibrary.Use[i].AbsoluteRodlFile;
+
+        GenerateDelphiIntf(RODLToUse, TemplateFileName, ChangeFileExt(RODLToUse, '') + DEFAULT_INTF_SUFFIX + '.pas', TmpSplit, AWrapperTemplateName, entities, GenerateUsedRODLS);
+      end;
+    end;
+  end;
+end;
+
+procedure GenerateDelphiInvk(const aLibrary: TRODLLibrary; const OutputStream: TStream; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False);
+var
+  gen: TRODLDelphiInvkConverter;
+  templateName: string;
+  outputName: string;
+  unitName: string;
+  wrapperTemplateName: string;
+  i: Integer;
+  TmpSplit: Boolean;
+  RODLToUse: string;
+begin
+  if (Length(TemplateFileName) = 0) or not FileExists(TemplateFileName) then
+    templateName := DEFAULT_DELPHI_INVK_TEMPLATE_FILENAME
+  else
+    templateName := TemplateFileName;
+
+  if (Length(AWrapperTemplateName) = 0) or not FileExists(AWrapperTemplateName) then
+    wrapperTemplateName := DEFAULT_DELPHI_INVK_WRAPPER_TEMPLATE_FILENAME
+  else
+    wrapperTemplateName := AWrapperTemplateName;
+
+  if Length(OutputFileName) = 0 then
+    outputName := aLibrary.Name + DEFAULT_INVK_SUFFIX + '.pas'
+  else
+    outputName := OutputFileName;
+
+  unitName := ChangeFileExt(ExtractFileName(outputName), '');
+
+  ClearAllCaches;
+  gen := TRODLDelphiInvkConverter.Create(aLibrary, templateName, unitName,
+                                         ASplit, ExtractFilePath(outputName),
+                                         wrapperTemplateName, entities);
+  try
+    gen.SaveResultToStream(OutputStream);
+  finally
+    gen.Free;
+  end;
+
+  if GenerateUsedRODLs then
+  begin
+    for i := 0 to aLibrary.UseCount-1 do
+    begin
+      if (aLibrary.Use[i].GenerateCode) then
+      begin
+        case aLibrary.Use[i].SplitMode of
+          usmNever:
+            TmpSplit := False;
+          usmAlways:
+            TmpSplit := True;
+          else
+            TmpSplit := ASplit;
+        end;
+
+        RODLToUse := ExpandVariables(aLibrary.Use[i].RodlFile);
+        if not FileExists(RODLTouse) then
+          RODLToUse := aLibrary.Use[i].AbsoluteRodlFile;
+
+        GenerateDelphiInvk(RODLToUse, TemplateFileName, ChangeFileExt(RODLToUse, '') + DEFAULT_INVK_SUFFIX + '.pas', TmpSplit, AWrapperTemplateName, entities, GenerateUsedRODLS);
+      end;
+    end;
+  end;
+end;
+
+procedure GenerateDelphiImpl(const aLibrary: TRODLLibrary; const OutputStream: TStream; const OutputDFMStream: TStream; const ServiceName: string; const TemplateFileName: string = ''; const AncestorName: string = DEFAULT_IMPL_SERVICE_ANCESTOR; const OutputFileName: string = ''; const aRequiredUnits: string = '');
+var
+  gen: TRODLDelphiImplConverter;
+  templateName: string;
+  outputName: string;
+  unitName: string;
+begin
+  if (Length(TemplateFileName) = 0) or not FileExists(TemplateFileName) then
+    templateName := DEFAULT_DELPHI_IMPL_TEMPLATE_FILENAME
+  else
+    templateName := TemplateFileName;
+
+  if Length(OutputFileName) = 0 then
+    outputName := ServiceName + DEFAULT_IMPL_SUFFIX + '.pas'
+  else
+    outputName := OutputFileName;
+
+  unitName := ChangeFileExt(ExtractFileName(outputName), '');
+
+  ClearAllCaches;
+  gen := TRODLDelphiImplConverter.Create(aLibrary, templateName, unitName, AncestorName, ServiceName, aRequiredUnits);
+  try
+    gen.SaveResultToStream(OutputStream);
+
+    // If datamodule then generate DFM
+    if gen.WriteDataModule then
+    begin
+      gen.TemplateFileName := ChangeFileExt(templateName, '.dfm');
+      gen.FileExtension := '.dfm';
+      gen.Convert(aLibrary, ServiceName);
+      gen.SaveResultToStream(OutputDFMStream);
+    end;
+  finally
+    gen.Free;
+  end;
+end;
+
+procedure GenerateDelphiAsync(const aLibrary: TRODLLibrary; const OutputStream: TStream; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False);
+var
+  gen: TRODLDelphiAsyncConverter;
+  templateName: string;
+  outputName: string;
+  unitName: string;
+  wrapperTemplateName: string;
+  i: Integer;
+  TmpSplit: Boolean;
+  RODLToUse: string;
+begin
+  if (Length(TemplateFileName) = 0) or not FileExists(TemplateFileName) then
+    templateName := DEFAULT_DELPHI_ASYNC_TEMPLATE_FILENAME
+  else
+    templateName := TemplateFileName;
+
+  if (Length(AWrapperTemplateName) = 0) or not FileExists(AWrapperTemplateName) then
+    wrapperTemplateName := DEFAULT_DELPHI_ASYNC_WRAPPER_TEMPLATE_FILENAME
+  else
+    wrapperTemplateName := AWrapperTemplateName;
+
+  if Length(OutputFileName) = 0 then
+    outputName := aLibrary.Name + DEFAULT_ASYNC_SUFFIX + '.pas'
+  else
+    outputName := OutputFileName;
+    
+  unitName := ChangeFileExt(ExtractFileName(outputName), '');
+
+  ClearAllCaches;
+  gen := TRODLDelphiAsyncConverter.Create(aLibrary, templateName, unitName,
+                                          ASplit, ExtractFilePath(outputName),
+                                          wrapperTemplateName, entities);
+  try
+    gen.SaveResultToStream(outputStream);
+  finally
+    gen.Free;
+  end;
+
+  if GenerateUsedRODLs then
+  begin
+    for i := 0 to aLibrary.UseCount-1 do
+    begin
+      if (aLibrary.Use[i].GenerateCode) then
+      begin
+        case aLibrary.Use[i].SplitMode of
+          usmNever:
+            TmpSplit := False;
+          usmAlways:
+            TmpSplit := True;
+          else
+            TmpSplit := ASplit;
+        end;
+
+        RODLToUse := ExpandVariables(aLibrary.Use[i].RodlFile);
+        if not FileExists(RODLTouse) then
+          RODLToUse := aLibrary.Use[i].AbsoluteRodlFile;
+
+        GenerateDelphiAsync(RODLToUse, TemplateFileName, ChangeFileExt(RODLToUse, '') + DEFAULT_ASYNC_SUFFIX + '.pas', TmpSplit, AWrapperTemplateName, entities, GenerateUsedRODLS);
+      end;
+    end;
+  end;
+end;
+
+// Cpp
+procedure GenerateCppIntf(const LibraryFileName: string; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False);
+var
+  lib: TRODLLibrary;
+begin
+  lib :=  ReadRODLFromFile(TXMLToRODL, LibraryFileName);
+  try
+    GenerateCppIntf(lib, TemplateFileName, OutputFileName, ASplit, AWrapperTemplateName, entities, GenerateUsedRODLS);
+  finally
+    lib.Free;
+  end;
+end;
+
+procedure GenerateCppInvk(const LibraryFileName: string; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False);
+var
+  lib: TRODLLibrary;
+begin
+  lib :=  ReadRODLFromFile(TXMLToRODL, LibraryFileName);
+  try
+    GenerateCppInvk(lib, TemplateFileName, OutputFileName, ASplit, AWrapperTemplateName, entities, GenerateUsedRODLS);
+  finally
+    lib.Free;
+  end;
+end;
+
+procedure GenerateCppImpl(const LibraryFileName: string; const ServiceName: string; const TemplateFileName: string = ''; const AncestorName: string = DEFAULT_IMPL_SERVICE_ANCESTOR; const OutputFileName: string = ''; const aRequiredUnits: string = '');
+var
+  lib: TRODLLibrary;
+begin
+  lib :=  ReadRODLFromFile(TXMLToRODL, LibraryFileName);
+  try
+    GenerateCppImpl(lib, ServiceName, TemplateFileName, AncestorName, OutputFileName, aRequiredUnits);
+  finally
+    lib.Free;
+  end;
+end;
+
+procedure GenerateCppAsync(const LibraryFileName: string; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False);
+var
+  lib: TRODLLibrary;
+begin
+  lib :=  ReadRODLFromFile(TXMLToRODL, LibraryFileName);
+  try
+    GenerateCppAsync(lib, TemplateFileName, OutputFileName, ASplit, AWrapperTemplateName, entities, GenerateUsedRODLS);
+  finally
+    lib.Free;
+  end;
+end;
+
+procedure GenerateCppIntf(const aLibrary: TRODLLibrary; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False);
+var
+  outputName: string;
+  outputStream: TMemoryStream;
+  outputHStream: TMemoryStream;
+begin
+  if Length(OutputFileName) = 0 then
+    outputName := aLibrary.Name + DEFAULT_INTF_SUFFIX + '.cpp'
+  else
+    outputName := OutputFileName;
+
+  outputStream := TMemoryStream.Create;
+  outputHStream := TMemoryStream.Create;
+  try
+    GenerateCppIntf(aLibrary, outputStream, outputHStream, TemplateFileName, OutputFileName, ASplit, AWrapperTemplateName, entities, GenerateUsedRODLS);
+
+    outputStream.SaveToFile(outputName);
+    outputHStream.SaveToFile(ChangeFileExt(outputName, '.h'));
+  finally
+    outputHStream.Free;
+    outputStream.Free;
+  end;
+end;
+
+procedure GenerateCppInvk(const aLibrary: TRODLLibrary; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False);
+var
+  outputName: string;
+  outputStream: TMemoryStream;
+  outputHStream: TMemoryStream;
+begin
+  if Length(OutputFileName) = 0 then
+    outputName := aLibrary.Name + DEFAULT_INVK_SUFFIX + '.cpp'
+  else
+    outputName := OutputFileName;
+
+  outputStream := TMemoryStream.Create;
+  outputHStream := TMemoryStream.Create;
+  try
+    GenerateCppInvk(aLibrary, outputStream, outputHStream, TemplateFileName, OutputFileName, ASplit, AWrapperTemplateName, entities, GenerateUsedRODLS);
+
+    outputStream.SaveToFile(outputName);
+    outputHStream.SaveToFile(ChangeFileExt(outputName, '.h'));
+  finally
+    outputHStream.Free;
+    outputStream.Free;
+  end;
+end;
+
+procedure GenerateCppImpl(const aLibrary: TRODLLibrary; const ServiceName: string; const TemplateFileName: string = ''; const AncestorName: string = DEFAULT_IMPL_SERVICE_ANCESTOR; const OutputFileName: string = ''; const aRequiredUnits: string = '');
+var
+  outputName: string;
+  outputStream: TMemoryStream;
+  outputHStream: TMemoryStream;
+  outputDFMStream: TMemoryStream;
+begin
+  if Length(OutputFileName) = 0 then
+    outputName := ServiceName + DEFAULT_IMPL_SUFFIX + '.cpp'
+  else
+    outputName := OutputFileName;
+
+  outputStream := TMemoryStream.Create;
+  outputHStream := TMemoryStream.Create;
+  outputDFMStream := TMemoryStream.Create;
+  try
+    GenerateCppImpl(aLibrary, outputStream, outputHStream, outputDFMStream, ServiceName, TemplateFileName, AncestorName, OutputFileName, aRequiredUnits);
+
+    outputStream.SaveToFile(outputName);
+    outputHStream.SaveToFile(ChangeFileExt(outputName, '.h'));
+    if outputDFMStream.Size > 0 then
+      outputDFMStream.SaveToFile(ChangeFileExt(outputName, '.dfm'));
+  finally
+    outputDFMStream.Free;
+    outputHStream.Free;
+    outputStream.Free;
+  end;
+end;
+
+procedure GenerateCppAsync(const aLibrary: TRODLLibrary; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False);
+var
+  outputName: string;
+  outputStream: TMemoryStream;
+  outputHStream: TMemoryStream;
+begin
+  if Length(OutputFileName) = 0 then
+    outputName := aLibrary.Name + DEFAULT_ASYNC_SUFFIX + '.cpp'
+  else
+    outputName := OutputFileName;
+
+  outputStream := TMemoryStream.Create;
+  outputHStream := TMemoryStream.Create;
+  try
+    GenerateCppAsync(aLibrary, outputStream, outputHStream, TemplateFileName, OutputFileName, ASplit, AWrapperTemplateName, entities, GenerateUsedRODLS);
+
+    outputStream.SaveToFile(outputName);
+    outputHStream.SaveToFile(ChangeFileExt(outputName, '.h'));
+  finally
+    outputHStream.Free;
+    outputStream.Free;
+  end;
+end;
+
+procedure GenerateCppIntf(const aLibrary: TRODLLibrary; const OutputStream: TStream; const OutputHStream: TStream; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False);
+var
+  templateName: string;
+  gen: TRODLCppIntfConverter;
+  outputName: string;
+  unitName: string;
+  wrapperTemplateName: string;
+  i: Integer;
+  TmpSplit: Boolean;
+  RODLToUse: string;
+begin
+  if (Length(TemplateFileName) = 0) or not FileExists(TemplateFileName) then
+    templateName := DEFAULT_CPP_INTF_TEMPLATE_FILENAME
+  else
+    templateName := TemplateFileName;
+
+  if (Length(AWrapperTemplateName) = 0) or not FileExists(AWrapperTemplateName) then
+    wrapperTemplateName := DEFAULT_CPP_INTF_WRAPPER_TEMPLATE_FILENAME
+  else
+    wrapperTemplateName := AWrapperTemplateName;
+
+  if Length(OutputFileName) = 0 then
+    outputName := aLibrary.Name + DEFAULT_INTF_SUFFIX + '.cpp'
+  else
+    outputName := OutputFileName;
+
+  unitName := ChangeFileExt(ExtractFileName(outputName), '');
+
+  ClearAllCaches;
+  gen := TRODLCppIntfConverter.Create(aLibrary, templateName, unitName,
+                                      ASplit, ExtractFilePath(outputName),
+                                      wrapperTemplateName, entities);
+  try
+    gen.SaveResultToStream(OutputStream);
+    gen.TemplateFileName := ChangeFileExt(templateName, '.h');
+    gen.FileExtension := '.h';
+    gen.Convert(aLibrary);
+    gen.SaveResultToStream(OutputHStream);
+  finally
+    gen.Free;
+  end;
+
+  if GenerateUsedRODLs then
+  begin
+    for i := 0 to aLibrary.UseCount-1 do
+    begin
+      if (aLibrary.Use[i].GenerateCode) then
+      begin
+        case aLibrary.Use[i].SplitMode of
+          usmNever:
+            TmpSplit := False;
+          usmAlways:
+            TmpSplit := True;
+          else
+            TmpSplit := ASplit;
+        end;
+
+        RODLToUse := ExpandVariables(aLibrary.Use[i].RodlFile);
+        if not FileExists(RODLTouse) then
+          RODLToUse := aLibrary.Use[i].AbsoluteRodlFile;
+
+        GenerateCppIntf(RODLToUse, TemplateFileName, ChangeFileExt(RODLToUse, '') + DEFAULT_INTF_SUFFIX + '.cpp', TmpSplit, AWrapperTemplateName, entities, GenerateUsedRODLS);
+      end;
+    end;
+  end;
+end;
+
+procedure GenerateCppInvk(const aLibrary: TRODLLibrary; const OutputStream: TStream; const OutputHStream: TStream; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False);
+var
+  gen: TRODLCppInvkConverter;
+  templateName: string;
+  unitName: string;
+  outputName: string;
+  wrapperTemplateName: string;
+  i: Integer;
+  TmpSplit: Boolean;
+  RODLToUse: string;
+begin
+  if (Length(TemplateFileName) = 0) or not FileExists(TemplateFileName) then
+    templateName := DEFAULT_CPP_INVK_TEMPLATE_FILENAME
+  else
+    templateName := TemplateFileName;
+
+  if (Length(AWrapperTemplateName) = 0) or not FileExists(AWrapperTemplateName) then
+    wrapperTemplateName := DEFAULT_CPP_INVK_WRAPPER_TEMPLATE_FILENAME
+  else
+    wrapperTemplateName := AWrapperTemplateName;
+
+  if Length(OutputFileName) = 0 then
+    outputName := aLibrary.Name + DEFAULT_INVK_SUFFIX + '.cpp'
+  else
+    outputName := OutputFileName;
+
+  unitName := ChangeFileExt(ExtractFileName(outputName), '');
+
+  ClearAllCaches;
+  gen := TRODLCppInvkConverter.Create(aLibrary, templateName, unitName,
+                                      ASplit, ExtractFilePath(outputName),
+                                      wrapperTemplateName, entities);
+  try
+    gen.SaveResultToStream(OutputStream);
+    gen.TemplateFileName := ChangeFileExt(templateName, '.h');
+    gen.FileExtension := '.h';
+    gen.Convert(aLibrary);
+    gen.SaveResultToStream(OutputHStream);
+  finally
+    gen.Free;
+  end;
+
+  if GenerateUsedRODLs then
+  begin
+    for i := 0 to aLibrary.UseCount-1 do
+    begin
+      if (aLibrary.Use[i].GenerateCode) then
+      begin
+        case aLibrary.Use[i].SplitMode of
+          usmNever:
+            TmpSplit := False;
+          usmAlways:
+            TmpSplit := True;
+          else
+            TmpSplit := ASplit;
+        end;
+
+        RODLToUse := ExpandVariables(aLibrary.Use[i].RodlFile);
+        if not FileExists(RODLTouse) then
+          RODLToUse := aLibrary.Use[i].AbsoluteRodlFile;
+
+        GenerateCppInvk(RODLToUse, TemplateFileName, ChangeFileExt(RODLToUse, '') + DEFAULT_INVK_SUFFIX + '.cpp', TmpSplit, AWrapperTemplateName, entities, GenerateUsedRODLS);
+      end;
+    end;
+  end;
+end;
+
+procedure GenerateCppImpl(const aLibrary: TRODLLibrary; const OutputStream: TStream; const OutputHStream: TStream; const OutputDFMStream: TStream; const ServiceName: string; const TemplateFileName: string = ''; const AncestorName: string = DEFAULT_IMPL_SERVICE_ANCESTOR; const OutputFileName: string = ''; const aRequiredUnits: string = '');
+var
+  gen: TRODLCppImplConverter;
+  templateName: string;
+  outputName: string;
+  unitName: string;
+begin
+  if (Length(TemplateFileName) = 0) or not FileExists(TemplateFileName) then
+    templateName := DEFAULT_CPP_IMPL_TEMPLATE_FILENAME
+  else
+    templateName := TemplateFileName;
+
+  if Length(OutputFileName) = 0 then
+    outputName := ServiceName + DEFAULT_IMPL_SUFFIX + '.cpp'
+  else
+    outputName := OutputFileName;
+
+  unitName := ChangeFileExt(ExtractFileName(outputName), '');
+
+  ClearAllCaches;
+  gen := TRODLCppImplConverter.Create(aLibrary, templateName, unitName, AncestorName, ServiceName, aRequiredUnits);
+  try
+    gen.SaveResultToStream(outputStream);
+    gen.TemplateFileName := ChangeFileExt(templateName, '.h');
+    gen.FileExtension := '.h';
+    gen.Convert(aLibrary, ServiceName);
+    gen.SaveResultToStream(outputHStream);
+
+    // If datamodule then generate DFM
+    if gen.WriteDataModule then
+    begin
+      gen.TemplateFileName := ChangeFileExt(templateName, '.dfm');
+      gen.FileExtension := '.dfm';
+      gen.Convert(aLibrary, ServiceName);
+      gen.SaveResultToStream(outputDFMStream);
+    end;
+  finally
+    gen.Free;
+  end;
+end;
+
+procedure GenerateCppAsync(const aLibrary: TRODLLibrary; const OutputStream: TStream; const OutputHStream: TStream; const TemplateFileName: string = ''; const OutputFileName: string = ''; const ASplit: Boolean = False; const AWrapperTemplateName: string = ''; const entities: string = ''; GenerateUsedRODLS: Boolean = False);
+var
+  templateName: string;
+  gen: TRODLCppAsyncConverter;
+  outputName: string;
+  unitName: string;
+  wrapperTemplateName: string;
+  i: Integer;
+  TmpSplit: Boolean;
+  RODLToUse: string;
+begin
+  if (Length(TemplateFileName) = 0) or not FileExists(TemplateFileName) then
+    templateName := DEFAULT_CPP_ASYNC_TEMPLATE_FILENAME
+  else
+    templateName := TemplateFileName;
+
+  if (Length(AWrapperTemplateName) = 0) or not FileExists(AWrapperTemplateName) then
+    wrapperTemplateName := DEFAULT_CPP_ASYNC_WRAPPER_TEMPLATE_FILENAME
+  else
+    wrapperTemplateName := AWrapperTemplateName;
+
+  if Length(OutputFileName) = 0 then
+    outputName := aLibrary.Name + DEFAULT_ASYNC_SUFFIX + '.cpp'
+  else
+    outputName := OutputFileName;
+
+  unitName := ChangeFileExt(ExtractFileName(outputName), '');
+
+  ClearAllCaches;
+  gen := TRODLCppAsyncConverter.Create(aLibrary, templateName, unitName,
+                                       ASplit, ExtractFilePath(outputName),
+                                       wrapperTemplateName, entities);
+  try
+    gen.SaveResultToStream(OutputStream);
+    gen.TemplateFileName := ChangeFileExt(templateName, '.h');
+    gen.FileExtension := '.h';
+    gen.Convert(aLibrary);
+    gen.SaveResultToStream(OutputHStream);
+  finally
+    gen.Free;
+  end;
+
+  if GenerateUsedRODLs then
+  begin
+    for i := 0 to aLibrary.UseCount-1 do
+    begin
+      if (aLibrary.Use[i].GenerateCode) then
+      begin
+        case aLibrary.Use[i].SplitMode of
+          usmNever:
+            TmpSplit := False;
+          usmAlways:
+            TmpSplit := True;
+          else
+            TmpSplit := ASplit;
+        end;
+
+        RODLToUse := ExpandVariables(aLibrary.Use[i].RodlFile);
+        if not FileExists(RODLTouse) then
+          RODLToUse := aLibrary.Use[i].AbsoluteRodlFile;
+
+        GenerateCppAsync(RODLToUse, TemplateFileName, ChangeFileExt(RODLToUse, '') + DEFAULT_ASYNC_SUFFIX + '.cpp', TmpSplit, AWrapperTemplateName, entities, GenerateUsedRODLS);
+      end;
+    end;
+  end;
+end;
+
+procedure GenerateUnitToStream(aLibrary: TRODLLibrary; aService:TRODLService; aType: TROCodeGenType; aLanguage: TROCodeGenLanguage; aStream, aStream2: TStream; aAncestorName: string = ''; aUnitname: string = ''; aRequiredUnits: string = ''; GenerateUsedRODLS: Boolean = False);
+begin
+  if aUnitname = '' then aUnitname := GetTargetFileName(aLibrary, aService, aType, aLanguage);
+  if aAncestorName = '' then aAncestorName := 'TRORemotable';
+
+  case aLanguage of
+    cglDelphiWin32: begin
+        case aType of
+          cgtIntf : GenerateDelphiIntf(aLibrary, aStream, '', aUnitname, False, '', '', GenerateUsedRODLS);
+          cgtInvk : GenerateDelphiInvk(aLibrary, aStream, '', aUnitname, False, '', '', GenerateUsedRODLS);
+          cgtImpl : GenerateDelphiImpl(aLibrary, aStream,aStream2, aService.Name, '',aAncestorName, aUnitname, aRequiredUnits);
+                    //raise Exception.Create('not supported.');
+          cgtAsync: GenerateDelphiAsync(aLibrary, aStream, '', aUnitname, False, '', '', GenerateUsedRODLS);
+        end;
+      end;
+    cglCppBuilder: begin
+        case aType of
+          cgtIntf   : GenerateCppIntf(aLibrary, aStream, aStream2, '', aUnitname, False, '', '', GenerateUsedRODLS);
+          cgtInvk : GenerateCppInvk(aLibrary, aStream, aStream2, '', aUnitname, False, '', '', GenerateUsedRODLS);
+          cgtImpl : raise Exception.Create('not supported.');
+          cgtAsync: GenerateCppAsync(aLibrary, aStream, aStream2, '', aUnitname, False, '', '', GenerateUsedRODLS);
+        end;
+      end;
+  end;
+end;
+
+procedure GenerateUnitToFile(aLibrary: TRODLLibrary; aService:TRODLService; aType: TROCodeGenType; aLanguage: TROCodeGenLanguage; aAncestorName: string = ''; aFilename: string=''; aRequiredUnits: string = ''; GenerateUsedRODLS: Boolean = False);
+begin
+  if aFilename = '' then aFilename := GetTargetFileName(aLibrary, aService, aType, aLanguage);
+  if aAncestorName = '' then aAncestorName := 'TRORemotable';
+
+  case aLanguage of
+    cglDelphiWin32: begin
+        case aType of
+          cgtIntf : GenerateDelphiIntf(aLibrary, '', aFilename, False, '', '', GenerateUsedRODLS);
+          cgtInvk : GenerateDelphiInvk(aLibrary, '', aFilename, False, '', '', GenerateUsedRODLS);
+          cgtImpl : GenerateDelphiImpl(aLibrary, aService.Name, '', aAncestorName, aFilename, aRequiredUnits);
+          cgtAsync: GenerateDelphiAsync(aLibrary, '', aFilename, False, '', '', GenerateUsedRODLS);
+        end;
+      end;
+    cglCppBuilder: begin
+        case aType of
+          cgtIntf   : GenerateCppIntf(aLibrary, '', aFilename, False, '', '', GenerateUsedRODLS);
+          cgtInvk : GenerateCppInvk(aLibrary, '', aFilename, False, '', '', GenerateUsedRODLS);
+          cgtImpl : GenerateCppImpl(aLibrary, aService.Name, '', aAncestorName, aFilename, aRequiredUnits);
+          cgtAsync: GenerateCppAsync(aLibrary, '', aFilename, False, '', '', GenerateUsedRODLS);
+        end;
+      end;
+  end;
+end;
+
+procedure GenerateUnitToFile(aLibraryFileName: string; aService:TRODLService; aType: TROCodeGenType; aLanguage: TROCodeGenLanguage; aAncestorName: string = ''; aFilename: string = ''; aRequiredUnits: string = ''; GenerateUsedRODLS: Boolean = False);
+var
+  lLibrary: TRODLLibrary;
+begin
+  lLibrary := LoadLibraryFromXml(aLibraryFileName);
+  try
+    GenerateUnitToFile(lLibrary, aService, aType, aLanguage, aAncestorName, aFileName, aRequiredUnits);
+  finally
+    lLibrary.Free();
+  end;
+end;
+
+function GetTargetFileName(aLibrary: TRODLLibrary; aService:TRODLService; aType: TROCodeGenType; aLanguage: TROCodeGenLanguage): string;
+begin
+  case aType of
+    cgtIntf : result := aLibrary.Name + DEFAULT_INTF_SUFFIX;
+    cgtInvk : result := aLibrary.Name + DEFAULT_INVK_SUFFIX;
+    cgtImpl : result := aService.Name + DEFAULT_IMPL_SUFFIX;
+    cgtAsync: result := aLibrary.Name + DEFAULT_ASYNC_SUFFIX;
+  end;
+  case aLanguage of
+    cglDelphiWin32: result := result+'.pas';
+    cglCpp, cglCppBuilder: result := result+'.cpp';
+    cglObjectiveC: result := result+'.m';
+  end;
+end;
+
+{$IFDEF FPC}
+initialization
+{$IFDEF MSWINDOWS}
+  {$I Templates\Templates.lrs}
+{$ELSE}  
+  {$I Templates/Templates.lrs}
+{$ENDIF}  
+{$ENDIF FPC}
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/uRODLCppConverters.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/uRODLCppConverters.pas
new file mode 100644
index 0000000..3394c92
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/uRODLCppConverters.pas	
@@ -0,0 +1,472 @@
+unit uRODLCppConverters;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - CodeGen2                                          }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+
+uses
+  uRODLTemplateBasedConverter,
+  uRODLImplConverter, uRODLIntfConverter, uRODLInvkConverter, uRODLAsyncConverter,
+  uRODL, Classes;
+
+type
+  TRODLCppImplConverter = class(TRODLImplConverter)
+  protected
+    function GetParamFrontModifier(flag: TRODLParamFlag): string; override;
+    function GetParamBackModifier(flag: TRODLParamFlag): string; override;
+    function GetTypeIdentifier(const originalType: string; aDecorateIfNeeded: boolean=true): string; override;
+  public
+    constructor Create(const aLibrary: TRODLLibrary; const aTemplateFileName: string; const aUnitName: string; const aServerClassName: string; const aTargetEntity: string = ''; const aRequiredUnits: string = ''); override;
+  end;
+
+  TRODLCppIntfConverter = class(TRODLIntfConverter)
+  private
+    FSimpleTypes: TStringList;
+    procedure PreProcessLibrary(const aLibrary: TRODLLibrary);
+  protected
+    function GetParamFrontModifier(flag: TRODLParamFlag): string; override;
+    function GetParamBackModifier(flag: TRODLParamFlag): string; override;
+    function GetTypeIdentifier(const originalType: string; aDecorateIfNeeded: boolean=true): string; override;
+
+    function GetServicesSectionClass: TServicesSectionClass; override;
+    function GetEventSinksSectionClass: TEventSinksSectionClass; override;
+  public
+    constructor Create(const aLibrary: TRODLLibrary; const aTemplateFileName: string; const aUnitName: string;
+                       const Split: Boolean = False; const AOutputDir: string = '';
+                       const AWrapperTemplateName: string = ''; const aTargetEntity: string = ''); override;
+    destructor Destroy; override;
+
+    procedure SaveResultToFile(const FileName: string); override;
+  end;
+
+  TRODLCppInvkConverter = class(TRODLInvkConverter)
+  protected
+    function GetParamFrontModifier(flag: TRODLParamFlag): string; override;
+    function GetParamBackModifier(flag: TRODLParamFlag): string; override;
+    function GetTypeIdentifier(const originalType: string; aDecorateIfNeeded: boolean=true): string; override;
+
+    function GetServicesSectionClass: TServicesSectionClass; override;
+  public
+    constructor Create(const aLibrary: TRODLLibrary; const aTemplateFileName: string; const aUnitName: string;
+                       const ASplit: Boolean = False; const AOutputDir: string = '';
+                       const AWrapperTemplateName: string = ''; const aTargetEntity: string = ''); override;
+
+    procedure SaveResultToFile(const FileName: string); override;
+  end;
+
+  TRODLCppAsyncConverter = class(TRODLAsyncConverter)
+  protected
+    function GetParamFrontModifier(flag: TRODLParamFlag): string; override;
+    function GetParamBackModifier(flag: TRODLParamFlag): string; override;
+    function GetTypeIdentifier(const originalType: string; aDecorateIfNeeded: boolean=true): string; override;
+
+    function GetServicesSectionClass: TServicesSectionClass; override;
+  public
+    constructor Create(const aLibrary: TRODLLibrary; const aTemplateFileName: string; const aUnitName: string;
+                       const Split: Boolean = False; const AOutputDir: string = '';
+                       const AWrapperTemplateName: string = ''; const aTargetEntity: string = ''); override;
+
+    procedure SaveResultToFile(const FileName: string); override;
+  end;
+
+implementation
+
+uses
+  SysUtils, uRODLTemplateBasedConverterUtils, uROClasses;
+
+const
+  CppFrontFlagNames : array[TRODLParamFlag] of string = (
+    'const', '', '', 'result');
+  CppBackFlagNames : array[TRODLParamFlag] of string = (
+    '', '&', '&', 'result');
+
+  DEFAULT_CPP_INTF_SERVICE_ANCESTOR = 'IInterface';
+  DEFAULT_CPP_INVK_SERVICE_ANCESTOR = 'System::TObject';
+  DEFAULT_CPP_INTF_EVENT_SINK_ANCESTOR = 'IInterface';
+  DEFAULT_CPP_ASYNC_SERVICE_ANCESTOR = 'IInterface';
+
+
+type
+  TCppIntfServicesSection = class (TIntfServicesSection)
+  protected
+    function GetAncestorName(const aService: TRODLBaseService): string; override;
+  end;
+
+  TCppIntfEventSinksSection = class (TIntfEventSinksSection)
+  protected
+    function GetAncestorName(const aService: TRODLBaseService): string; override;
+  end;
+
+  TCppInvkServicesSection = class (TServicesSection)
+  protected
+    function GetAncestorName(const aService: TRODLBaseService): string; override;
+  end;
+
+  TCppAsyncServicesSection = class (TAsyncServicesSection)
+  protected
+    function GetAncestorName(const aService: TRODLBaseService): string; override;
+  end;
+
+  // SIMPLE_TYPES
+  TSimpleTypesSection = class (TRODLGeneratorSection)
+  protected
+    procedure DoReplacements(var curLine: string; const TypeName: string; const aLibrary: TRODLLibrary); dynamic;
+  public
+    constructor Create(AParent: TRODLCppIntfConverter); reintroduce; virtual;
+
+    procedure Process(const sectionText: string; const aLibrary: TRODLLibrary); override;
+  end;
+
+{ TRODLCppImplConverter }
+
+constructor TRODLCppImplConverter.Create(const aLibrary: TRODLLibrary;
+  const aTemplateFileName, aUnitName, aServerClassName, aTargetEntity: string;
+  const aRequiredUnits: string);
+begin
+  FileExtension := '.cpp';
+
+  inherited Create(aLibrary, aTemplateFileName, aUnitName, aServerClassName, aTargetEntity, aRequiredUnits);
+end;
+
+function TRODLCppImplConverter.GetParamBackModifier(
+  flag: TRODLParamFlag): string;
+begin
+  Result := CppBackFlagNames[Flag];
+end;
+
+function TRODLCppImplConverter.GetParamFrontModifier(
+  flag: TRODLParamFlag): string;
+begin
+  Result := CppFrontFlagNames[Flag];
+end;
+
+function TRODLCppImplConverter.GetTypeIdentifier(
+  const originalType: string; aDecorateIfNeeded: boolean=true): string;
+begin
+  Result := CachedDataTypeToCppType(originalType, FLibrary);
+end;
+
+{ TRODLCppIntfConverter }
+
+constructor TRODLCppIntfConverter.Create(const aLibrary: TRODLLibrary;
+  const aTemplateFileName, aUnitName: string;
+  const Split: Boolean = False; const AOutputDir: string = '';
+  const AWrapperTemplateName: string = ''; const aTargetEntity: string = '');
+begin
+  // Call inherited with nil so that convert is not called, allowing us
+  // to setup the optional sections. Setting up the optional sections before
+  // calling the inherited Create is not an option, the section list would
+  // not have been created
+  inherited Create(nil, aTemplateFileName, aUnitName, Split, AOutputDir, AWrapperTemplateName, aTargetEntity);
+
+  FileExtension := '.cpp';
+
+  FSimpleTypes := TStringList.Create;
+  FSimpleTypes.Sorted := True;
+  FSimpleTypes.Duplicates := dupIgnore;
+  PreProcessLibrary(aLibrary);
+
+  Sections.Add(TSimpleTypesSection.Create(Self));
+
+  // Now that everything is done, call convert if need be.
+  if (aLibrary <> nil) then Convert(aLibrary);
+end;
+
+destructor TRODLCppIntfConverter.Destroy;
+begin
+  FSimpleTypes.Free;
+
+  inherited Destroy;
+end;
+
+function TRODLCppIntfConverter.GetEventSinksSectionClass: TEventSinksSectionClass;
+begin
+  Result := TCppIntfEventSinksSection;
+end;
+
+function TRODLCppIntfConverter.GetParamBackModifier(
+  flag: TRODLParamFlag): string;
+begin
+  Result := CppBackFlagNames[Flag];
+end;
+
+function TRODLCppIntfConverter.GetParamFrontModifier(
+  flag: TRODLParamFlag): string;
+begin
+  Result := CppFrontFlagNames[Flag];
+end;
+
+function TRODLCppIntfConverter.GetServicesSectionClass: TServicesSectionClass;
+begin
+  Result := TCppIntfServicesSection;
+end;
+
+function TRODLCppIntfConverter.GetTypeIdentifier(
+  const originalType: string; aDecorateIfNeeded: boolean=true): string;
+begin
+  Result := CachedDataTypeToCppType(originalType, FLibrary);
+end;
+
+procedure TRODLCppIntfConverter.PreProcessLibrary(const aLibrary: TRODLLibrary);
+var
+  I, J, K: Integer;
+  DataType: string;
+  CurInterface: TRODLServiceInterface;
+  CurOp: TRODLOperation;
+begin
+  // In order to fill the SIMPLE_TYPES section, we need to go through all
+  // potential types and note if they are simple or complex (implemented as
+  // a class).
+
+  for I := 0 to aLibrary.StructCount - 1 do
+  begin
+    for J := 0 to aLibrary.Structs[I].Count - 1 do
+    begin
+      DataType := aLibrary.Structs[I].Items[J].DataType;
+      if not SameText(DataType, DataTypeNames[rtXML]) and not CachedIsImplementedAsClass(DataType, aLibrary) then
+        FSimpleTypes.Add(DataType);
+    end;
+  end;
+
+  for I := 0 to aLibrary.ArrayCount - 1 do
+  begin
+    DataType := aLibrary.Arrays[I].ElementType;
+    if not CachedIsImplementedAsClass(DataType, aLibrary) then
+      FSimpleTypes.Add(DataType);
+  end;
+
+  for I := 0 to aLibrary.ServiceCount - 1 do
+  begin
+    CurInterface := aLibrary.Services[I].Default;
+
+    for J := 0 to CurInterface.Count - 1 do
+    begin
+      CurOp := CurInterface.Items[J];
+      if Assigned(CurOp.Result) and (Length(CurOp.Result.DataType) > 0) then
+      begin
+        DataType := CurOp.Result.DataType;
+        if not CachedIsImplementedAsClass(DataType, aLibrary) then
+          FSimpleTypes.Add(DataType);
+      end;
+      for K := 0 to CurOp.Count - 1 do
+      begin
+        DataType := CurOp.Items[K].DataType;
+        if not CachedIsImplementedAsClass(DataType, aLibrary) then
+          FSimpleTypes.Add(DataType);
+      end;
+    end;      
+  end;
+
+  for I := 0 to aLibrary.ExceptionCount - 1 do
+  begin
+    for J := 0 to aLibrary.Exceptions[I].Count - 1 do
+    begin
+      DataType := aLibrary.Exceptions[I].Items[J].DataType;
+      if not CachedIsImplementedAsClass(DataType, aLibrary) then
+        FSimpleTypes.Add(DataType);
+    end;
+  end;
+
+  for I := 0 to aLibrary.EventSinkCount - 1 do
+  begin
+    CurInterface := aLibrary.EventSinks[I].Default;
+
+    for J := 0 to CurInterface.Count - 1 do
+    begin
+      CurOp := CurInterface.Items[J];
+      if Assigned(CurOp.Result) and (Length(CurOp.Result.DataType) > 0) then
+      begin
+        DataType := CurOp.Result.DataType;
+        if not CachedIsImplementedAsClass(DataType, aLibrary) then
+          FSimpleTypes.Add(DataType);
+      end;
+      for K := 0 to CurOp.Count - 1 do
+      begin
+        DataType := CurOp.Items[K].DataType;
+        if not CachedIsImplementedAsClass(DataType, aLibrary) then
+          FSimpleTypes.Add(DataType);
+      end;
+    end;      
+  end;
+end;
+
+procedure TRODLCppIntfConverter.SaveResultToFile(const FileName: string);
+begin
+  if Split then
+    inherited SaveResultToFile(ChangeFileExt(FileName, '.h'))
+  else
+    inherited SaveResultToFile(FileName);
+end;
+
+{ TRODLCppInvkConverter }
+
+constructor TRODLCppInvkConverter.Create(const aLibrary: TRODLLibrary;
+  const aTemplateFileName, aUnitName: string; const ASplit: Boolean = False;
+  const AOutputDir: string = ''; const AWrapperTemplateName: string = '';
+  const aTargetEntity: string = '');
+begin
+  FileExtension := '.cpp';
+
+  inherited Create(aLibrary, aTemplateFileName, aUnitName, ASplit, AOutputDir, AWrapperTemplateName, aTargetEntity);
+end;
+
+function TRODLCppInvkConverter.GetParamBackModifier(
+  flag: TRODLParamFlag): string;
+begin
+  Result := CppBackFlagNames[Flag];
+end;
+
+function TRODLCppInvkConverter.GetParamFrontModifier(
+  flag: TRODLParamFlag): string;
+begin
+  Result := CppFrontFlagNames[Flag];
+end;
+
+function TRODLCppInvkConverter.GetServicesSectionClass: TServicesSectionClass;
+begin
+  Result := TCppInvkServicesSection;
+end;
+
+function TRODLCppInvkConverter.GetTypeIdentifier(
+  const originalType: string; aDecorateIfNeeded: boolean=true): string;
+begin
+  Result := CachedDataTypeToCppType(originalType, FLibrary);
+end;
+
+procedure TRODLCppInvkConverter.SaveResultToFile(const FileName: string);
+begin
+  if Split then
+    inherited SaveResultToFile(ChangeFileExt(FileName, '.h'))
+  else
+    inherited SaveResultToFile(FileName);
+end;
+
+{ TCppIntfServicesSection }
+
+function TCppIntfServicesSection.GetAncestorName(
+  const aService: TRODLBaseService): string;
+begin
+  Result := inherited GetAncestorName(aService);
+  if Length(Result) = 0 then
+    Result := DEFAULT_CPP_INTF_SERVICE_ANCESTOR;
+end;
+
+{ TCppInvkServicesSection }
+
+function TCppInvkServicesSection.GetAncestorName(
+  const aService: TRODLBaseService): string;
+begin
+  Result := inherited GetAncestorName(aService);
+  if Length(Result) = 0 then
+    Result := DEFAULT_CPP_INVK_SERVICE_ANCESTOR;
+end;
+
+{ TCppEventSinksSection }
+
+function TCppIntfEventSinksSection.GetAncestorName(
+  const aService: TRODLBaseService): string;
+begin
+  Result := inherited GetAncestorName(aService);
+  if Length(Result) = 0 then
+    Result := DEFAULT_CPP_INTF_EVENT_SINK_ANCESTOR;
+end;
+
+{ TRODLCppAsyncConverter }
+
+constructor TRODLCppAsyncConverter.Create(const aLibrary: TRODLLibrary;
+  const aTemplateFileName, aUnitName: string; const Split: Boolean;
+  const AOutputDir, AWrapperTemplateName, aTargetEntity: string);
+begin
+  FileExtension := '.cpp';
+
+  inherited Create(aLibrary, aTemplateFileName, aUnitName, Split, AOutputDir, AWrapperTemplateName, aTargetEntity);
+end;
+
+function TRODLCppAsyncConverter.GetParamBackModifier(
+  flag: TRODLParamFlag): string;
+begin
+  Result := CppBackFlagNames[Flag];
+end;
+
+function TRODLCppAsyncConverter.GetParamFrontModifier(
+  flag: TRODLParamFlag): string;
+begin
+  Result := CppFrontFlagNames[Flag];
+end;
+
+function TRODLCppAsyncConverter.GetServicesSectionClass: TServicesSectionClass;
+begin
+  Result := TCppAsyncServicesSection;
+end;
+
+function TRODLCppAsyncConverter.GetTypeIdentifier(
+  const originalType: string; aDecorateIfNeeded: boolean=true): string;
+begin
+  Result := CachedDataTypeToCppType(originalType, FLibrary);
+end;
+
+procedure TRODLCppAsyncConverter.SaveResultToFile(const FileName: string);
+begin
+  if Split then
+    inherited SaveResultToFile(ChangeFileExt(FileName, '.h'))
+  else
+    inherited SaveResultToFile(FileName);
+end;
+
+{ TCppAsyncServicesSection }
+
+function TCppAsyncServicesSection.GetAncestorName(
+  const aService: TRODLBaseService): string;
+begin
+  Result := inherited GetAncestorName(aService);
+  if Length(Result) = 0 then
+    Result := DEFAULT_CPP_ASYNC_SERVICE_ANCESTOR;
+end;
+
+{ TSimpleTypesSection }
+
+constructor TSimpleTypesSection.Create(AParent: TRODLCppIntfConverter);
+begin
+  inherited Create(AParent, 'SIMPLE_TYPES');
+end;
+
+procedure TSimpleTypesSection.DoReplacements(var curLine: string;
+  const TypeName: string; const aLibrary: TRODLLibrary);
+begin
+  MacroReplace(curLine, '%',
+               ['TYPE_NAME', CachedDataTypeToCppType(TypeName, aLibrary)
+               ]);
+end;
+
+procedure TSimpleTypesSection.Process(const sectionText: string;
+  const aLibrary: TRODLLibrary);
+var
+  I: Integer;
+  curLine: string;
+begin
+  for I := 0 to (Parent as TRODLCppIntfConverter).FSimpleTypes.Count - 1 do
+  begin
+    curLine := sectionText;
+    
+    DoReplacements(curLine, (Parent as TRODLCppIntfConverter).FSimpleTypes[I], aLibrary);
+    Write(curLine);
+  end;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/uRODLDelphiConverters.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/uRODLDelphiConverters.pas
new file mode 100644
index 0000000..8939af8
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/uRODLDelphiConverters.pas	
@@ -0,0 +1,233 @@
+unit uRODLDelphiConverters;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - CodeGen2                                          }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+
+uses
+  uRODLTemplateBasedConverter,
+  uRODLImplConverter, uRODLIntfConverter, uRODLInvkConverter, uRODLAsyncConverter,
+  uRODL;
+
+type
+  TRODLDelphiImplConverter = class(TRODLImplConverter)
+  protected
+    function GetParamFrontModifier(flag: TRODLParamFlag): string; override;
+    function GetTypeIdentifier(const originalType: string; aDecorateIfNeeded: boolean=true): string; override;
+  public
+    constructor Create(const aLibrary: TRODLLibrary; const aTemplateFileName: string; const aUnitName: string; const aServerClassName: string; const aTargetEntity: string = ''; const aRequiredUnits: string = ''); override;
+  end;
+
+  TRODLDelphiIntfConverter = class(TRODLIntfConverter)
+  protected
+    function GetParamFrontModifier(flag: TRODLParamFlag): string; override;
+    function GetTypeIdentifier(const originalType: string; aDecorateIfNeeded: boolean=true): string; override;
+
+    function GetServicesSectionClass: TServicesSectionClass; override;
+    function GetEventSinksSectionClass: TEventSinksSectionClass; override;
+  public
+    constructor Create(const aLibrary: TRODLLibrary; const aTemplateFileName: string; const aUnitName: string;
+                       const ASplit: Boolean = False; const AOutputDir: string = '';
+                       const AWrapperTemplateName: string = ''; const aTargetEntity: string = ''); override;
+  end;
+
+  TRODLDelphiInvkConverter = class(TRODLInvkConverter)
+  protected
+    function GetParamFrontModifier(flag: TRODLParamFlag): string; override;
+    function GetTypeIdentifier(const originalType: string; aDecorateIfNeeded: boolean=true): string; override;
+  public
+    constructor Create(const aLibrary: TRODLLibrary; const aTemplateFileName: string; const aUnitName: string;
+                       const ASplit: Boolean = False; const AOutputDir: string = '';
+                       const AWrapperTemplateName: string = ''; const aTargetEntity: string = ''); override;
+  end;
+
+  TRODLDelphiAsyncConverter = class(TRODLAsyncConverter)
+  protected
+    function GetParamFrontModifier(flag: TRODLParamFlag): string; override;
+    function GetTypeIdentifier(const originalType: string; aDecorateIfNeeded: boolean=true): string; override;
+
+    function GetServicesSectionClass: TServicesSectionClass; override;
+  public
+    constructor Create(const aLibrary: TRODLLibrary; const aTemplateFileName: string; const aUnitName: string;
+                       const ASplit: Boolean = False; const AOutputDir: string = '';
+                       const AWrapperTemplateName: string = ''; const aTargetEntity: string = ''); override;
+  end;
+
+implementation
+
+uses
+  uRODLGenTools, uRODLTemplateBasedConverterUtils;
+
+type
+  TDelphiIntfServicesSection = class (TIntfServicesSection)
+  protected
+    function GetAncestorName(const aService: TRODLBaseService): string; override;
+  end;
+
+  TDelphiIntfEventSinksSection = class (TIntfEventSinksSection)
+  protected
+    function GetAncestorName(const aService: TRODLBaseService): string; override;
+  end;
+
+  TDelphiAsyncServicesSection = class (TAsyncServicesSection)
+  protected
+    function GetAncestorName(const aService: TRODLBaseService): string; override;
+  end;
+
+
+{ TRODLDelphiConverter }
+
+constructor TRODLDelphiImplConverter.Create(const aLibrary: TRODLLibrary;
+  const aTemplateFileName, aUnitName, aServerClassName, aTargetEntity: string;
+  const aRequiredUnits: string);
+begin
+  FileExtension := '.pas';
+  
+  inherited Create(aLibrary, aTemplateFileName, aUnitName, aServerClassName, aTargetEntity, aRequiredUnits);
+end;
+
+function TRODLDelphiImplConverter.GetParamFrontModifier(
+  flag: TRODLParamFlag): string;
+begin
+  Result := DelphiFlagNames[Flag];
+end;
+
+function TRODLDelphiImplConverter.GetTypeIdentifier(
+  const originalType: string; aDecorateIfNeeded: boolean=true): string;
+begin
+  Result := CachedDataTypeToDelphiType(originalType, FLibrary);
+end;
+
+{ TRODLDelphiIntfConverter }
+
+constructor TRODLDelphiIntfConverter.Create(const aLibrary: TRODLLibrary;
+  const aTemplateFileName, aUnitName: string;
+  const ASplit: Boolean = False; const AOutputDir: string = '';
+  const AWrapperTemplateName: string = ''; const aTargetEntity: string = '');
+begin
+  FileExtension := '.pas';
+
+  inherited Create(aLibrary, aTemplateFileName, aUnitName, ASplit, AOutputDir, AWrapperTemplateName, aTargetEntity);
+end;
+
+function TRODLDelphiIntfConverter.GetEventSinksSectionClass: TEventSinksSectionClass;
+begin
+  Result := TDelphiIntfEventSinksSection;
+end;
+
+function TRODLDelphiIntfConverter.GetParamFrontModifier(
+  flag: TRODLParamFlag): string;
+begin
+  Result := DelphiFlagNames[Flag];
+end;
+
+function TRODLDelphiIntfConverter.GetServicesSectionClass: TServicesSectionClass;
+begin
+  Result := TDelphiIntfServicesSection;
+end;
+
+function TRODLDelphiIntfConverter.GetTypeIdentifier(
+  const originalType: string; aDecorateIfNeeded: boolean=true): string;
+begin
+  Result := CachedDataTypeToDelphiType(originalType, FLibrary);
+end;
+
+{ TRODLDelphiInvkConverter }
+
+constructor TRODLDelphiInvkConverter.Create(const aLibrary: TRODLLibrary;
+  const aTemplateFileName, aUnitName: string; const ASplit: Boolean = False;
+  const AOutputDir: string = ''; const AWrapperTemplateName: string = '';
+  const aTargetEntity: string = '');
+begin
+  FileExtension := '.pas';
+
+  inherited Create(aLibrary, aTemplateFileName, aUnitName, ASplit, AOutputDir, AWrapperTemplateName, aTargetEntity);
+end;
+
+function TRODLDelphiInvkConverter.GetParamFrontModifier(
+  flag: TRODLParamFlag): string;
+begin
+  Result := DelphiFlagNames[Flag];
+end;
+
+function TRODLDelphiInvkConverter.GetTypeIdentifier(
+  const originalType: string; aDecorateIfNeeded: boolean=true): string;
+begin
+  Result := CachedDataTypeToDelphiType(originalType, FLibrary);
+end;
+
+{ TDelphiIntfServicesSection }
+
+function TDelphiIntfServicesSection.GetAncestorName(
+  const aService: TRODLBaseService): string;
+begin
+  Result := inherited GetAncestorName(aService);
+  if Length(Result) > 0 then
+    Result := '(' + Result + ')';
+end;
+
+{ TDelphiIntfEventSinksSection }
+
+function TDelphiIntfEventSinksSection.GetAncestorName(
+  const aService: TRODLBaseService): string;
+begin
+  Result := inherited GetAncestorName(aService);
+  if Length(Result) > 0 then
+    Result := '(' + Result + ')';
+end;
+
+{ TRODLDelphiAsyncConverter }
+
+constructor TRODLDelphiAsyncConverter.Create(const aLibrary: TRODLLibrary;
+  const aTemplateFileName, aUnitName: string; const ASplit: Boolean;
+  const AOutputDir, AWrapperTemplateName, aTargetEntity: string);
+begin
+  FileExtension := '.pas';
+
+  inherited Create(aLibrary, aTemplateFileName, aUnitNAme, ASplit, AOutputDir, AWrapperTemplateName, aTargetEntity);
+end;
+
+function TRODLDelphiAsyncConverter.GetParamFrontModifier(
+  flag: TRODLParamFlag): string;
+begin
+  Result := DelphiFlagNames[Flag];
+end;
+
+function TRODLDelphiAsyncConverter.GetServicesSectionClass: TServicesSectionClass;
+begin
+  Result := TDelphiAsyncServicesSection;
+end;
+
+function TRODLDelphiAsyncConverter.GetTypeIdentifier(
+  const originalType: string; aDecorateIfNeeded: boolean=true): string;
+begin
+  Result := CachedDataTypeToDelphiType(originalType, FLibrary);
+end;
+
+{ TDelphiAsyncServicesSection }
+
+function TDelphiAsyncServicesSection.GetAncestorName(
+  const aService: TRODLBaseService): string;
+begin
+  Result := inherited GetAncestorName(aService);
+  if Length(Result) > 0 then
+    Result := '(' + Result + ')';
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/uRODLImplConverter.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/uRODLImplConverter.pas
new file mode 100644
index 0000000..195576f
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/uRODLImplConverter.pas	
@@ -0,0 +1,163 @@
+unit uRODLImplConverter;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - CodeGen2                                          }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+
+uses
+  uRODLTemplateBasedConverter, uRODL;
+
+const
+  DEFAULT_IMPL_SERVICE_ANCESTOR = 'TRORemotable';
+  
+type
+  TRODLImplConverter = class (TRODLTemplateBasedConverter)
+  private
+    FService: TRODLService;
+    FAncestorService: TRODLService;
+    function GetAncestorUnitName: string;
+
+    property AncestorUnitName: string read GetAncestorUnitName;
+  protected
+    procedure IntConvert(const aLibrary : TRODLLIbrary; const aTargetEntity : string = ''); override;
+    procedure SetupServices(const aLibrary: TRODLLibrary; const aTargetEntity : string = ''); override;
+    procedure SetupRequiredUnits; override;
+    function ValidateTargetEntity(const aLibrary : TRODLLIbrary; const aTargetEntity : string) : boolean; override;
+
+    function GetServicesSectionClass: TServicesSectionClass; override;
+  public
+    constructor Create(const aLibrary: TRODLLibrary; const aTemplateFileName: string; const aUnitName: string; const aServerClassName: string; const aTargetEntity: string = ''; const aRequiredUnits: string = ''); reintroduce; virtual;
+  end;
+
+implementation
+
+uses
+  SysUtils, uRODLTemplateBasedConverterUtils, uROServer;
+
+type
+  TImplServicesSection = class (TServicesSection)
+  protected  
+    function GetAncestorName(const aService: TRODLBaseService): string; override;
+  end;
+
+{ TRODLDelphiImplConverter }
+
+constructor TRODLImplConverter.Create(const aLibrary: TRODLLibrary;
+  const aTemplateFileName: string; const aUnitName: string; const aServerClassName: string;
+  const aTargetEntity: string; const aRequiredUnits: string);
+begin
+  // Call inherited with nil so that convert is not called, allowing us
+  // to setup the optional sections. Setting up the optional sections before
+  // calling the inherited Create is not an option, the section list would
+  // not have been created
+  inherited Create(nil, aTemplateFileName, aUnitName, aTargetEntity);
+
+  FServerClassName := aServerClassName;
+  FRequiredUnits := aRequiredUnits;
+
+  // Now that everything is done, call convert if need be.
+  if (aLibrary <> nil) then Convert(aLibrary, aTargetEntity);
+end;
+
+function TRODLImplConverter.GetAncestorUnitName: string;
+begin
+  Result := ''; 
+  if Assigned(FService) then
+  begin
+    if FService.Ancestor <> '' then
+    begin
+      if Assigned(FAncestorService) and (FAncestorService.ImplUnit <> '') then
+        Result := FAncestorService.ImplUnit
+      else
+        Result := FService.Ancestor+'_Impl';
+    end;
+  end;
+end;
+
+function TRODLImplConverter.GetServicesSectionClass: TServicesSectionClass;
+begin
+  Result := TImplServicesSection;
+end;
+
+procedure TRODLImplConverter.IntConvert(const aLibrary: TRODLLIbrary;
+  const aTargetEntity: string);
+begin
+  if Assigned(fService) and Assigned(fService.Default) then
+    inherited IntConvert(aLibrary, aTargetEntity);
+end;
+
+procedure TRODLImplConverter.SetupRequiredUnits;
+var
+  ancestorUnit: string;
+begin
+  inherited SetupRequiredUnits;
+
+  ancestorUnit := AncestorUnitName;
+  if Pos(ancestorUnit, RequiredUnits) = 0 then
+    RequiredUnits := RequiredUnits + ',' + ancestorUnit;
+end;
+
+procedure TRODLImplConverter.SetupServices(const aLibrary: TRODLLibrary;
+  const aTargetEntity: string);
+begin
+  inherited SetupServices(aLibrary, aTargetEntity);
+  
+  // For the impl section, only one service is of interest, the one
+  // indicated to us
+  FOrderedServices.Clear;
+  FOrderedServices.AddObject(FService.Name, FService);
+end;
+
+function TRODLImplConverter.ValidateTargetEntity(
+  const aLibrary: TRODLLIbrary; const aTargetEntity: string): boolean;
+var
+  i : integer;
+begin
+  Result := FALSE;
+
+  for i := 0 to (aLibrary.ServiceCount-1) do
+    if (CompareText(aLibrary.Services[i].Info.Name, aTargetEntity)=0) then
+    begin
+      FService := aLibrary.Services[i]; // Will be used later
+      if FService.Ancestor <> '' then
+        FAncestorService := aLibrary.FindService(FService.Ancestor);
+      Result := TRUE;
+      Exit;
+    end;
+end;
+
+{ TImplServicesSection }
+
+function TImplServicesSection.GetAncestorName(
+  const aService: TRODLBaseService): string;
+begin
+  Result := inherited GetAncestorName(aService);
+  
+  if Result = '' then
+  begin
+    if not (Parent as TRODLImplConverter).UseDefaultAncestor then
+      Result := (Parent as TRODLImplConverter).ServerClassName
+    else
+      Result := DEFAULT_IMPL_SERVICE_ANCESTOR;
+  end;
+end;
+
+
+end.
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/uRODLIntfConverter.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/uRODLIntfConverter.pas
new file mode 100644
index 0000000..12885a6
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/uRODLIntfConverter.pas	
@@ -0,0 +1,219 @@
+unit uRODLIntfConverter;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - CodeGen2                                          }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+
+uses
+  Classes, IniFiles, Contnrs, uRODLTemplateBasedConverter, uRODLSplitableConverter, uRODL, uROClasses, uRODLLineStream;
+
+type
+  TRODLIntfConverter = class (TRODLSplitableConverter)
+  private
+  protected
+    function GetSplitFilesSuffix: string; override;
+    procedure AddEntityTypes(Types: {$IFDEF FPC}TStringList{$ELSE}THashedStringList{$ENDIF}; const AEntity: TRODLEntity; const unitName: string); override;
+    procedure SetupFiles(const aLibrary: TRODLLibrary); override;
+    function ValidateTargetEntity(const aLibrary: TRODLLibrary; const aTargetEntity: string): boolean; override;
+
+    function GetServicesSectionClass: TServicesSectionClass; override;
+    function GetEventSinksSectionClass: TEventSinksSectionClass; override;
+  public
+    constructor Create(const aLibrary: TRODLLibrary; const aTemplateFileName: string; const aUnitName: string;
+                       const ASplit: Boolean = False; const AOutputDir: string = '';
+                       const AWrapperTemplateName: string = ''; const aTargetEntities: string = ''); override;
+  end;
+
+  TIntfServicesSection = class (TServicesSection)
+  protected
+    function GetAncestorName(const aService: TRODLBaseService): string; override;
+    function GetProxyAncestorName(const aService: TRODLBaseService): string; override;
+  end;
+
+  TIntfEventSinksSection = class (TEventSinksSection)
+  protected
+    function GetAncestorName(const aService: TRODLBaseService): string; override;
+  end;
+
+implementation
+
+uses
+  SysUtils, uRODLTemplateBasedConverterUtils;
+
+{ TRODLIntfConverter }
+
+procedure TRODLIntfConverter.AddEntityTypes(Types: {$IFDEF FPC}TStringList{$ELSE}THashedStringList{$ENDIF};
+  const AEntity: TRODLEntity; const unitName: string);
+{var
+  enum: TRODLEnum;
+  I: Integer;}
+begin
+  if AEntity is TRODLService then
+  begin
+    Types.Values['I' + AEntity.Name] := unitName;
+    Types.Values['T' + AEntity.Name + '_Proxy'] := unitName;
+    Types.Values['Co' + AEntity.Name] := unitName;
+  end
+  else
+  if AEntity is TRODLEnum then
+  begin
+    Types.Values[AEntity.Name] := unitName;
+    // Not sure if there is a way to do something here for the enums
+{    enum := AEntity as TRODLEnum;
+    for I := 0 to enum.Count - 1 do
+    begin
+      Types.Values[GetEnumsSectionClass.GetEnumValueName(enum, I)] := unitName;
+    end;}      
+  end
+  else
+  begin
+    inherited AddEntityTypes(Types, AEntity, unitName);
+  end;
+end;
+
+constructor TRODLIntfConverter.Create(const aLibrary: TRODLLibrary;
+  const aTemplateFileName: string; const aUnitName: string;
+  const ASplit: Boolean = False; const AOutputDir: string = '';
+  const AWrapperTemplateName: string = ''; const aTargetEntities: string = '');
+begin
+  // Call inherited with nil so that convert is not called, allowing us
+  // to setup the optional sections. Setting up the optional sections before
+  // calling the inherited Create is not an option, the section list would
+  // not have been created
+  inherited Create(nil, aTemplateFileName, aUnitName, ASplit, AOutputDir, AWrapperTemplateName, aTargetEntities);
+
+  // Setup the optional section
+  Sections.Add(TIfWSDLSection.Create(Self));
+
+  // Now that everything is done, call convert if need be.
+  if (aLibrary <> nil) then Convert(aLibrary);
+end;
+
+function TRODLIntfConverter.GetEventSinksSectionClass: TEventSinksSectionClass;
+begin
+  Result := TIntfEventSinksSection;
+end;
+
+function TRODLIntfConverter.GetServicesSectionClass: TServicesSectionClass;
+begin
+  Result := TIntfServicesSection;
+end;
+
+function TRODLIntfConverter.GetSplitFilesSuffix: string;
+begin
+  Result := DEFAULT_INTF_SUFFIX;
+end;
+
+procedure TRODLIntfConverter.SetupFiles(const aLibrary: TRODLLibrary);
+var
+  I: Integer;
+  newFile: TRODLSplitableConverterFile;
+begin
+  FFiles.Clear;
+
+  // one file per service
+  for I := 0 to FOrderedServices.Count - 1 do
+  begin
+    newFile := TRODLSplitableConverterFile.Create(aLibrary, Self);
+    newFile.Services.Add(FOrderedServices.Objects[I]);
+    FFiles.Add(newFile);
+  end;
+
+  // one file for all enums
+  newFile := TRODLSplitableConverterFile.Create(aLibrary, Self);
+  for I := 0 to FOrderedEnums.Count-1 do // aLibrary.EnumCount - 1 do
+    newFile.Enums.Add(FOrderedEnums.Objects[I]);
+  if newFile.Enums.Count > 0 then
+  begin
+    FFiles.Add(newFile);
+    // because we put all enums in one file, we set the file name to "Enums"
+    newFile.ROUnitName := FLibrary.Name + '_Enums' + SplitFilesSuffix;
+  end;
+
+  // one file per array
+  for I := 0 to FOrderedArrays.Count-1 do //aLibrary.ArrayCount - 1 do
+  begin
+    newFile := TRODLSplitableConverterFile.Create(aLibrary, Self);
+    newFile.Arrays.Add(FOrderedArrays.Objects[I]);
+    FFiles.Add(newFile);
+  end;
+
+  // one file per struct
+  for I := 0 to FOrderedStructs.Count-1 do // aLibrary.StructCount - 1 do
+  begin
+    newFile := TRODLSplitableConverterFile.Create(aLibrary, Self);
+    newFile.Structs.Add(FOrderedStructs.Objects[I]);
+    FFiles.Add(newFile);
+  end;
+
+  // one file per event sink
+  for I := 0 to FOrderedEventSinks.Count-1 do // aLibrary.EventSinkCount - 1 do
+  begin
+    newFile := TRODLSplitableConverterFile.Create(aLibrary, Self);
+    newFile.EventSinks.Add(FOrderedEventSinks.Objects[I]);
+    FFiles.Add(newFile);
+  end;
+
+  // one file per exception
+  for I := 0 to FOrderedExceptions.Count-1 do // aLibrary.ExceptionCount - 1 do
+  begin
+    newFile := TRODLSplitableConverterFile.Create(aLibrary, Self);
+    newFile.Exceptions.Add(FOrderedExceptions.Objects[I]);
+    FFiles.Add(newFile);
+  end;
+end;
+
+function TRODLIntfConverter.ValidateTargetEntity(const aLibrary: TRODLLibrary;
+  const aTargetEntity: string): boolean;
+begin
+  Result := True;
+end;
+
+{ TIntfServicesSection }
+
+function TIntfServicesSection.GetAncestorName(
+  const aService: TRODLBaseService): string;
+begin
+  Result := inherited GetAncestorName(aService);
+
+  if Length(Result) > 0 then
+    Result := 'I' + Result;
+end;
+
+function TIntfServicesSection.GetProxyAncestorName(
+  const aService: TRODLBaseService): string;
+begin
+  Result := inherited GetProxyAncestorName(aService);
+
+  if (Length(Result) > 0) and (Result <> Parent.GetDefaultServiceProxyAncestorName) then
+    Result := Parent.GetDefaultClassPrefix + Result;
+end;
+
+{ TIntfEventSinksSection }
+
+function TIntfEventSinksSection.GetAncestorName(
+  const aService: TRODLBaseService): string;
+begin
+  Result := inherited GetAncestorName(aService);
+
+  if Length(Result) > 0 then
+    Result := 'I' + Result;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/uRODLInvkConverter.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/uRODLInvkConverter.pas
new file mode 100644
index 0000000..f8d25ec
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/uRODLInvkConverter.pas	
@@ -0,0 +1,123 @@
+unit uRODLInvkConverter;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - CodeGen2                                          }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+
+uses
+  Classes, IniFiles, uRODLTemplateBasedConverter, uRODLSplitableConverter, uRODLLineStream, uRODL;
+
+type
+  {$M+}
+  TRODLInvkConverter = class (TRODLSplitableConverter)
+  private
+    function GetLibrary: TRODLLibrary;
+  protected
+    procedure SetupFiles(const aLibrary: TRODLLibrary); override;
+    function GetSplitFilesSuffix: string; override;
+    procedure AddEntityTypes(Types: {$IFDEF FPC}TStringList{$ELSE}THashedStringList{$ENDIF}; const AEntity: TRODLEntity; const unitName: string); override;
+    function ValidateTargetEntity(const aLibrary: TRODLLibrary; const aTargetEntity: string): boolean; override;
+    property ROLibrary: TRODLLibrary read GetLibrary;
+    function GetUsedFileRequiredUnits(const UsedRODLFileName: string): string; override;
+  public
+    constructor Create(const aLibrary: TRODLLibrary; const aTemplateFileName: string; const aUnitName: string;
+                       const ASplit: Boolean = False; const AOutputDir: string = '';
+                       const AWrapperTemplateName: string = ''; const aTargetEntities: string = ''); override;
+  end;
+  {$M-}  
+
+implementation
+
+uses
+  Contnrs, uROTypes, uROClasses, uRODLTemplateBasedConverterUtils;
+
+{ TRODLInvkConverter }
+
+procedure TRODLInvkConverter.AddEntityTypes(Types: {$IFDEF FPC}TStringList{$ELSE}THashedStringList{$ENDIF};
+  const AEntity: TRODLEntity; const unitName: string);
+begin
+  if AEntity is TRODLService then
+  begin
+    Types.Values['T' + AEntity.Name] := unitName;
+  end
+  else
+    inherited AddEntityTypes(Types, AEntity, unitName);
+end;
+
+constructor TRODLInvkConverter.Create(const aLibrary: TRODLLibrary;
+  const aTemplateFileName: string; const aUnitName: string;
+  const ASplit: Boolean = False; const AOutputDir: string = '';
+  const AWrapperTemplateName: string = ''; const aTargetEntities: string = '');
+begin
+  // Call inherited with nil so that convert is not called, allowing us
+  // to setup the optional sections. Setting up the optional sections before
+  // calling the inherited Create is not an option, the section list would
+  // not have been created
+  inherited Create(nil, aTemplateFileName, aUnitName, ASplit, AOutputDir, AWrapperTemplateName, aTargetEntities);
+
+  // Setup the optional sections
+
+  // Now that everything is done, call convert if need be.
+  if (aLibrary <> nil) then Convert(aLibrary);
+end;
+
+function TRODLInvkConverter.GetLibrary: TRODLLibrary;
+begin
+  Result := FLibrary; 
+end;
+
+function TRODLInvkConverter.GetSplitFilesSuffix: string;
+begin
+  Result := DEFAULT_INVK_SUFFIX;
+end;
+
+function TRODLInvkConverter.GetUsedFileRequiredUnits(
+  const UsedRODLFileName: string): string;
+begin
+  Result := inherited GetUsedFileRequiredUnits(UsedRODLFileName);
+  
+  if Result <> '' then
+    Result := Result + ',';
+
+  Result := Result + UsedRODLFileName + DEFAULT_INVK_SUFFIX;
+end;
+
+procedure TRODLInvkConverter.SetupFiles(const aLibrary: TRODLLibrary);
+var
+  I: Integer;
+  newFile: TRODLSplitableConverterFile;
+begin
+  FFiles.Clear;
+
+  // For the invoker, we only want files for the services.
+  for I := 0 to FOrderedServices.Count - 1 do
+  begin
+    newFile := TRODLSplitableConverterFile.Create(aLibrary, Self);
+    newFile.Services.Add(FOrderedServices.Objects[I]);
+    FFiles.Add(newFile);
+  end;
+end;
+
+function TRODLInvkConverter.ValidateTargetEntity(const aLibrary: TRODLLibrary;
+  const aTargetEntity: string): boolean;
+begin
+  Result := True;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/uRODLLineStream.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/uRODLLineStream.pas
new file mode 100644
index 0000000..612a659
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/uRODLLineStream.pas	
@@ -0,0 +1,159 @@
+unit uRODLLineStream;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - CodeGen2                                          }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+
+uses
+  Classes, SysUtils;
+
+type
+{$IFDEF UNICODE}
+  TROStringStream = class(TStream)
+  private
+    FDataString: string;
+    FPosition: Integer;
+  protected
+    procedure SetSize(NewSize: Longint); override;
+  public
+    constructor Create(const AString: string);
+    function Read(var Buffer; Count: Longint): Longint; override;
+    function ReadString(Count: Longint): string;
+    function Seek(Offset: Longint; Origin: Word): Longint; override;
+    function Write(const Buffer; Count: Longint): Longint; override;
+    procedure WriteString(const AString: string);
+    property DataString: string read FDataString;
+  end;
+{$ELSE}
+  TROStringStream = TStringStream;
+{$ENDIF}
+
+  TLineStream = class(TROStringStream)
+  private
+    function GetEof: Boolean;
+  public
+    function ReadLine: string;
+    procedure WriteLine(const line: string);
+
+    procedure Clear;
+
+    property Eof: Boolean read GetEof;
+  end;
+
+implementation
+
+{$IFDEF UNICODE}
+{ TROStringStream }
+
+constructor TROStringStream.Create(const AString: string);
+begin
+  inherited Create;
+  FDataString := AString;
+end;
+
+function TROStringStream.Read(var Buffer; Count: Integer): Longint;
+begin
+  Result := Length(FDataString) - FPosition;
+  if Result > Count then Result := Count;
+  Move(PChar(@FDataString[FPosition + 1])^, Buffer, Result * SizeOf(Char));
+  Inc(FPosition, Result);
+end;
+
+function TROStringStream.ReadString(Count: Integer): string;
+var
+  Len: Integer;
+begin
+  Len := Length(FDataString) - FPosition;
+  if Len > Count then Len := Count;
+  SetString(Result, PChar(@FDataString[FPosition + 1]), Len);
+  Inc(FPosition, Len);
+end;
+
+function TROStringStream.Seek(Offset: Integer; Origin: Word): Longint;
+begin
+  case Origin of
+    soFromBeginning: FPosition := Offset;
+    soFromCurrent: FPosition := FPosition + Offset;
+    soFromEnd: FPosition := Length(FDataString) - Offset;
+  end;
+  if FPosition > Length(FDataString) then
+    FPosition := Length(FDataString)
+  else if FPosition < 0 then FPosition := 0;
+  Result := FPosition;
+end;
+
+procedure TROStringStream.SetSize(NewSize: Integer);
+begin
+  SetLength(FDataString, NewSize);
+  if FPosition > NewSize then FPosition := NewSize;
+end;
+
+function TROStringStream.Write(const Buffer; Count: Integer): Longint;
+begin
+  Result := Count;
+  SetLength(FDataString, (FPosition + Result));
+  Move(Buffer, PChar(@FDataString[FPosition + 1])^, Result * SizeOf(Char));
+  Inc(FPosition, Result);
+end;
+
+procedure TROStringStream.WriteString(const AString: string);
+begin
+  Write(PChar(AString)^, Length(AString));
+end;
+{$ENDIF}
+
+{ TLineStream }
+
+procedure TLineStream.Clear;
+begin
+  Size := 0;
+end;
+
+function TLineStream.GetEof: Boolean;
+begin
+  Result := Position = Size;
+end;
+
+function TLineStream.ReadLine: string;
+var
+  I: Integer;
+begin
+  I := Position;
+  
+  while (I < Size-1) and (DataString[I+1] <> #13) and (DataString[I+2] <> #10) do
+    Inc(I);
+
+  if I = Size-1 then
+  begin
+    Result := ReadString(I-Position+1);
+  end
+  else
+  begin
+    Result := ReadString(I-Position+2); // Do not eat the carriage return
+  end;
+  Result := TrimRight(Result);
+  if Pos('////',Trim(Result)) = 1 then Result := ReadLine;
+end;
+
+procedure TLineStream.WriteLine(const line: string);
+begin
+  WriteString(line + #13#10);
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/uRODLSplitableConverter.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/uRODLSplitableConverter.pas
new file mode 100644
index 0000000..c4fc089
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/uRODLSplitableConverter.pas	
@@ -0,0 +1,589 @@
+unit uRODLSplitableConverter;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - CodeGen2                                          }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+
+uses
+  Classes, IniFiles, Contnrs, uRODL, uROClasses, uRODLLineStream, uRODLTemplateBasedConverter;
+
+type
+  TRODLSplitableConverterFileList = class;
+
+  TRODLSplitableConverter = class (TRODLTemplateBasedConverter)
+  private
+    FTargetEntities: TStringList;
+    FOutputDir: string;
+  protected
+    FWrapperTemplateName: string;
+    FSplit: Boolean;
+    FFiles: TRODLSplitableConverterFileList;
+
+    procedure ProcessTemplate(const aLibrary: TRODLLibrary; template: TLineStream); override;
+    procedure SetupFiles(const aLibrary: TRODLLibrary); virtual; abstract;
+    procedure WriteWrapper(TypesList: TStringList; UsesList: TStringList); virtual;
+    function GetSplitFilesSuffix: string; virtual; abstract;
+    procedure AddEntityTypes(Types: {$IFDEF FPC}TStringList{$ELSE}THashedStringList{$ENDIF}; const AEntity: TRODLEntity; const unitName: string); virtual;
+    procedure ResolveRequiredUnits;
+  public
+    constructor Create(const aLibrary: TRODLLibrary; const aTemplateFileName: string; const aUnitName: string;
+                       const ASplit: Boolean = False; const AOutputDir: string = '';
+                       const AWrapperTemplateName: string = ''; const aTargetEntities: string = ''); reintroduce; virtual;
+    destructor Destroy; override;
+
+    property Split: Boolean read FSplit;
+    property SplitFilesSuffix: string read GetSplitFilesSuffix;
+    property OutputDir: string read FOutputDir;
+  end;
+
+  TRODLSplitableConverterFile = class
+  private
+    FEnums: TObjectList;
+    FArrays: TObjectList;
+    FStructs: TObjectList;
+    FEventSinks: TObjectList;
+    FExceptions: TObjectList;
+    FUnitName: string;
+    FServices: TObjectList;
+    FLibrary: TRODLLibrary;
+    FActiveList: TObjectList;
+    FLibraryList: IROStrings;
+    FConverter: TRODLSplitableConverter;
+    FRequiredUnits: TStringList;
+    function GetServices: TObjectList;
+    function GetUnitName: string;
+    function GetExceptions: TObjectList;
+    function GetEventSinks: TObjectList;
+    function GetStructs: TObjectList;
+    function GetArrays: TObjectList;
+    function GetEnums: TObjectList;
+    procedure SetupLists;
+  public
+    constructor Create(const aLibrary: TRODLLibrary; const aConverter: TRODLSplitableConverter);
+    destructor Destroy; override;
+
+    function GetActiveList: TObjectList;
+    function GetLibraryList: IROStrings;
+
+    property Services: TObjectList read GetServices;
+    property Enums: TObjectList read GetEnums;
+    property Arrays: TObjectList read GetArrays;
+    property Structs: TObjectList read GetStructs;
+    property EventSinks: TObjectList read GetEventSinks;
+    property Exceptions: TObjectList read GetExceptions;
+
+    property ROUnitName: string read GetUnitName write FUnitName;
+    property RequiredUnits: TStringList read FRequiredUnits write FRequiredUnits;
+  end;
+
+  TRODLSplitableConverterFileList = class (TObjectList)
+  private
+    function GetItem(Index: Integer): TRODLSplitableConverterFile;
+    procedure SetItem(Index: Integer; const Value: TRODLSplitableConverterFile);
+  public
+    property Items[Index: Integer]: TRODLSplitableConverterFile read GetItem write SetItem; default;
+  end;
+
+
+implementation
+
+uses
+  SysUtils, uRODLTemplateBasedConverterUtils;
+
+{ TRODLSplitableConverter }
+
+procedure TRODLSplitableConverter.AddEntityTypes(Types: {$IFDEF FPC}TStringList{$ELSE}THashedStringList{$ENDIF};
+  const AEntity: TRODLEntity; const unitName: string);
+begin
+  if AEntity is TRODLEventSink then begin
+    Types.Values['I' + AEntity.Name] := unitName;
+    Types.Values['I' + AEntity.Name + EVENT_SINK_WRITER_SUFFIX] := unitName;
+  end
+  else begin
+    Types.Values[AEntity.Name] := unitName;
+  end;
+end;
+
+constructor TRODLSplitableConverter.Create(const aLibrary: TRODLLibrary;
+  const aTemplateFileName, aUnitName: string; const ASplit: Boolean;
+  const AOutputDir, AWrapperTemplateName, aTargetEntities: string);
+begin
+  // Call inherited with nil so that convert is not called, allowing us
+  // to setup the optional sections. Setting up the optional sections before
+  // calling the inherited Create is not an option, the section list would
+  // not have been created
+  inherited Create(nil, aTemplateFileName, aUnitName, '');
+  FSplit := ASplit;
+  FFiles := TRODLSplitableConverterFileList.Create(True);
+  FOutputDir := AOutputDir;
+  if Length(FOutputDir) = 0 then
+    FOutputDir := '.';
+  FWrapperTemplateName := AWrapperTemplateName;
+  FTargetEntities := TStringList.Create;
+  FTargetEntities.Sorted := True;
+  FTargetEntities.Delimiter := ',';
+  FTargetEntities.DelimitedText := aTargetEntities;
+
+  // Setup the optional sections
+
+  // Now that everything is done, call convert if need be.
+  if (aLibrary <> nil) then Convert(aLibrary);
+end;
+
+destructor TRODLSplitableConverter.Destroy;
+begin
+  FTargetEntities.Free;
+  FFiles.Free;
+
+  inherited Destroy;
+end;
+
+procedure TRODLSplitableConverter.ProcessTemplate(const aLibrary: TRODLLibrary;
+  template: TLineStream);
+var
+  I: Integer;
+  curFile: TRODLSplitableConverterFile;
+  J: Integer;
+  UsesList: TStringList;
+  TypesList: {$IFDEF FPC}TStringList{$ELSE}THashedStringList{$ENDIF};
+  curEntity: TRODLEntity;
+  originalUnitName: string;
+  originalRequiredUnits: string;
+  oneEntitySelected: Boolean;
+begin
+  if Split then
+  begin
+    SetupFiles(aLibrary);
+    ResolveRequiredUnits;
+
+    UsesList := TStringList.Create;
+    TypesList := {$IFDEF FPC}TStringList{$ELSE}THashedStringList{$ENDIF}.Create;
+    originalUnitName := ROUnitName;
+    originalRequiredUnits := RequiredUnits; 
+    try
+      for I := 0 to FFiles.Count - 1 do
+      begin
+        curFile := FFiles[I];
+
+        UsesList.Add(curFile.ROUnitName);
+
+        FOrderedServices.Clear;
+        FOrderedArrays.Clear;
+        FOrderedStructs.Clear;
+        FOrderedEnums.Clear;
+        FOrderedExceptions.Clear;
+        FOrderedEventSinks.Clear;
+
+        oneEntitySelected := False;
+        for J := 0 to curFile.GetActiveList.Count - 1 do
+        begin
+          curEntity := curFile.GetActiveList[J] as TRODLEntity;
+          curFile.GetLibraryList.AddObject(curEntity.Name, curEntity);
+          AddEntityTypes(TypesList, curEntity, curFile.ROUnitName);
+          oneEntitySelected := oneEntitySelected or (FTargetEntities.IndexOf(curEntity.Name) > -1);          
+        end;
+
+        // Only generate if no entities were indicated or if at least one
+        // of the entities in the current file was found earlier in the list.
+        if (FTargetEntities.Count = 0) or oneEntitySelected then
+        begin
+          Buffer.Clear;
+          template.Position := 0;
+          ROUnitName := curFile.ROUnitName;
+          RequiredUnits := originalRequiredUnits;
+          if curFile.RequiredUnits.Count > 0 then
+          begin
+            if Length(RequiredUnits) > 0 then
+              RequiredUnits := RequiredUnits + ',';
+            RequiredUnits := RequiredUnits + curFile.RequiredUnits.DelimitedText;
+          end;
+          inherited ProcessTemplate(aLibrary, template);
+          Buffer.SaveToFile(StrEnsureSuffix('\', OutputDir)+ curFile.ROUnitName + FileExtension);
+        end;
+      end;
+
+      ROUnitName := originalUnitName;
+      RequiredUnits := originalRequiredUnits;
+      WriteWrapper(TypesList, UsesList);
+    finally
+      UsesList.Free;
+      TypesList.Free;
+    end;
+  end
+  else
+  begin
+    inherited ProcessTemplate(aLibrary, template);
+  end;
+end;
+
+procedure TRODLSplitableConverter.ResolveRequiredUnits;
+var
+  curFileIndex: Integer;
+  curFile: TRODLSplitableConverterFile;
+  curEntityIndex: Integer;
+  curEntity: TRODLEntity;
+  curService: TRODLBaseService;
+  curArray: TRODLArray;
+  curStruct: TRODLBaseStruct;
+  typesCache: {$IFDEF FPC}TStringList{$ELSE}THashedStringList{$ENDIF};
+  curFieldIndex: Integer;
+  curOpIndex: Integer;
+  curOp: TRODLOperation;
+  curParamIndex: Integer;
+  notFounds: TStringList;
+  Index: Integer;
+
+  procedure AddRequiredUnit(const typeName: string);
+  var
+    resultIndex: Integer;
+  begin
+    resultIndex := notFounds.IndexOf(typeName);
+    if resultIndex = -1 then
+    begin
+      ROunitName := typesCache.Values[typeName];
+      if Length(ROunitName) > 0 then
+      begin
+        if ROunitName <> curFile.ROUnitName then
+          curFile.RequiredUnits.Add(ROunitName);
+      end
+      else
+      begin
+        notFounds.Add(typeName);
+      end;  
+    end;
+  end;
+
+begin
+  // In order to find out if a splitted file requires other files, we need
+  // to know which types are where. So we fill in the typesCache list with
+  // Name/Value pairs, where the name is the type and the value the unit
+  // where it is located.
+  // Once this is done, we go look at all the types in all the files, and
+  // we look for them in the cache. If the type is found, then the unit it
+  // resides in is added to the list of required units. If it is not found
+  // it is added to the notFounds list. This second list allows to speed
+  // the process a lot because looking through the typesCache list is slow
+  // and many regular types (Integer, String...) are used a lot but there are
+  // not many of them. Hence the second list allows to know very fast for these
+  // that they were not found in any unit.
+  typesCache := {$IFDEF FPC}TStringList{$ELSE}THashedStringList{$ENDIF}.Create;
+  notFounds := TStringList.Create;
+  try
+    notFounds.Sorted := True;
+    
+    for curFileIndex := 0 to FFiles.Count - 1 do
+    begin
+      curFile := FFiles[curFileIndex];
+
+      for curEntityIndex := 0 to curFile.GetActiveList.Count - 1 do
+      begin
+        curEntity := curFile.GetActiveList[curEntityIndex] as TRODLEntity;
+        typesCache.Values[curEntity.Name] := curFile.ROUnitName;
+      end;
+    end;
+
+    for curFileIndex := 0 to FFiles.Count - 1 do
+    begin
+      curFile := FFiles[curFileIndex];
+
+      curFile.RequiredUnits.Clear;
+      for curEntityIndex := 0 to curFile.GetActiveList.Count - 1 do
+      begin
+        curEntity := curFile.GetActiveList[curEntityIndex] as TRODLEntity;
+        if curEntity is TRODLBaseService then
+        begin
+          curService := curEntity as TRODLBaseService;
+
+          AddRequiredUnit(curService.Ancestor);
+          
+          for curOpIndex := 0 to curService.Default.Count - 1 do
+          begin
+            curOp := curService.Default.Items[curOpIndex];
+            if Assigned(curOp.Result) then
+              AddRequiredUnit(curOp.Result.DataType);
+
+            for curParamIndex := 0 to curOp.Count - 1 do
+              AddRequiredUnit(curOp.Items[curParamIndex].DataType);
+          end;
+        end
+        else
+        if curEntity is TRODLArray then
+        begin
+          curArray := curEntity as TRODLArray;
+          AddRequiredUnit(curArray.ElementType);
+        end
+        else
+        if curEntity is TRODLBaseStruct then
+        begin
+          curStruct := curEntity as TRODLBaseStruct;
+
+          AddRequiredUnit(curStruct.Ancestor);
+
+          // The structures have ReadComplex/WriteComplex methods that will
+          // actually use all fields from all ancestors. As a result, they will
+          // require to have access to all the types for all these fields, hence
+          // the reason why we do a loop until there is no ancestor anymore
+          while Assigned(curStruct) do
+          begin
+            for curFieldIndex := 0 to curStruct.Count - 1 do
+              AddRequiredUnit(curStruct.Items[curFieldIndex].DataType);
+
+            Index := GlobalOrderedStructs.IndexOf(curStruct.Ancestor);
+            if Index >= 0 then
+              curStruct := GlobalOrderedStructs.Objects[Index] as TRODLBaseStruct
+            else
+              curStruct := nil;
+          end;
+        end;
+      end;
+      curFile.RequiredUnits.Delimiter := ',';
+    end;
+  finally
+    notFounds.Free;
+    typesCache.Free;
+  end;
+end;
+
+procedure TRODLSplitableConverter.WriteWrapper(TypesList,
+  UsesList: TStringList);
+var
+  template: TLineStream;
+  content: TStringList;
+  curLine: string;
+  sectionContent: string;
+  I: Integer;
+  typeUnitName: string;
+begin
+  template := TLineStream.Create('');
+  try
+    content := TStringList.Create;
+    try
+      if FileExists(FWrapperTemplateName) then
+        content.LoadFromFile(FWrapperTemplateName)
+      else
+        LoadTemplateFromResource(content, FWrapperTemplateName);
+
+      template.WriteString(content.Text);
+      template.Position := 0;
+    finally
+      content.Free;
+    end;
+
+    Buffer.Clear;
+    while not template.Eof do
+    begin
+      curLine := template.ReadLine;
+
+      MacroReplace(curLine, '%',
+                   ['UNIT_NAME', FLibrary.Name + SplitFilesSuffix
+                   ]);
+
+      if SectionStart(curLine, 'USES') then
+      begin
+        sectionContent := FinishSection('USES', template);
+
+        for I := 0 to UsesList.Count - 1 do
+        begin
+          curLine := sectionContent;
+          MacroReplace(curLine, '%',
+                       ['USED_UNIT_NAME', UsesList[I]
+                       ]);
+
+          if I = UsesList.Count-1 then
+            curLine := StrEnsureNoSuffix(',', curLine);
+          Write(curLine);
+        end;
+      end
+      else
+      if SectionStart(curLine, 'TYPES') then
+      begin
+        sectionContent := FinishSection('TYPES', template);
+
+        for I := 0 to TypesList.Count - 1 do
+        begin
+          curLine := sectionContent;
+          typeUnitName := TypesList[I];
+          typeUnitName := Copy(typeUnitName, Pos('=', typeUnitName)+1, MAXINT);
+          MacroReplace(curLine, '%',
+                       ['TYPE_UNIT_NAME', typeUnitName,
+                        'TYPE_NAME', TypesList.Names[I] 
+                       ]);
+          Write(curLine);
+        end;
+      end
+      else
+      begin
+        Write(curLine);
+      end;
+    end;
+  finally
+    template.Free;
+  end;
+end;
+
+{ TRODLIntfConverterFileList }
+
+function TRODLSplitableConverterFileList.GetItem(
+  Index: Integer): TRODLSplitableConverterFile;
+begin
+  Result := inherited Items[Index] as TRODLSplitableConverterFile;
+end;
+
+procedure TRODLSplitableConverterFileList.SetItem(Index: Integer;
+  const Value: TRODLSplitableConverterFile);
+begin
+  inherited Items[Index] := Value;
+end;
+
+{ TRODLIntfConverterFile }
+
+constructor TRODLSplitableConverterFile.Create(const aLibrary: TRODLLibrary; const aConverter: TRODLSplitableConverter);
+begin
+  inherited Create;
+
+  FLibrary := aLibrary;
+  FConverter := aConverter;
+  FRequiredUnits := TStringList.Create;
+  FRequiredUnits.Sorted := True;
+  FRequiredUnits.Duplicates := dupIgnore;
+end;
+
+destructor TRODLSplitableConverterFile.Destroy;
+begin
+  FRequiredUnits.Free;
+  FEnums.Free;
+  FArrays.Free;
+  FStructs.Free;
+  FEventSinks.Free;
+  FExceptions.Free;
+  FServices.Free;
+    
+  inherited Destroy;
+end;
+
+function TRODLSplitableConverterFile.GetActiveList: TObjectList;
+begin
+  if FActiveList = nil then
+  begin
+    SetupLists;
+  end;
+  Result := FActiveList;
+end;
+
+procedure TRODLSplitableConverterFile.SetupLists;
+begin
+  if Services.Count > 0 then
+  begin
+    FActiveList := Services;
+    FLibraryList := FConverter.OrderedServices;
+  end
+  else if Arrays.Count > 0 then
+  begin
+    FActiveList := Arrays;
+    FLibraryList := FConverter.OrderedArrays;
+  end
+  else if Structs.Count > 0 then
+  begin
+    FActiveList := Structs;
+    FLibraryList := FConverter.OrderedStructs;
+  end
+  else if Enums.Count > 0 then
+  begin
+    FActiveList := Enums;
+    FLibraryList := FConverter.OrderedEnums;
+  end
+  else if EventSinks.Count > 0 then
+  begin
+    FActiveList := EventSinks;
+    FLibraryList := FConverter.OrderedEventSinks;
+  end
+  else if Exceptions.Count > 0 then
+  begin
+    FActiveList := Exceptions;
+    FLibraryList := FConverter.OrderedExceptions;
+  end;
+end;
+
+function TRODLSplitableConverterFile.GetArrays: TObjectList;
+begin
+  if not Assigned(FArrays) then
+    FArrays := TObjectList.Create(False);
+  Result := FArrays;
+end;
+
+function TRODLSplitableConverterFile.GetEnums: TObjectList;
+begin
+  if not Assigned(FEnums) then
+    FEnums := TObjectList.Create(False);
+  Result := FEnums;
+end;
+
+function TRODLSplitableConverterFile.GetEventSinks: TObjectList;
+begin
+  if not Assigned(FEventSinks) then
+    FEventSinks := TObjectList.Create(False);
+  Result := FEventSinks;
+end;
+
+function TRODLSplitableConverterFile.GetExceptions: TObjectList;
+begin
+  if not Assigned(FExceptions) then
+    FExceptions := TObjectList.Create(False);
+  Result := FExceptions;
+end;
+
+function TRODLSplitableConverterFile.GetLibraryList: IROStrings;
+begin
+  if FLibraryList = nil then
+  begin
+    SetupLists;
+  end;
+  Result := FLibraryList;
+end;
+
+function TRODLSplitableConverterFile.GetServices: TObjectList;
+begin
+  if not Assigned(FServices) then
+    FServices := TObjectList.Create(False);
+  Result := FServices;
+end;
+
+function TRODLSplitableConverterFile.GetStructs: TObjectList;
+begin
+  if not Assigned(FStructs) then
+    FStructs := TObjectList.Create(False);
+  Result := FStructs;
+end;
+
+function TRODLSplitableConverterFile.GetUnitName: string;
+var
+  list: TObjectList;
+  I: Integer;
+begin
+  if FUnitName = '' then
+  begin
+    list := GetActiveList;
+    for I := 0 to list.Count - 1 do
+      FUnitName := FUnitName + (list[i] as TRODLEntity).Name + '_';
+    FUnitName := FLibrary.Name + '_' + Copy(FUnitName, 1, Length(FUnitName)-1) + FConverter.SplitFilesSuffix;
+  end;
+  Result := FUnitName;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/uRODLTemplateBasedConverter.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/uRODLTemplateBasedConverter.pas
new file mode 100644
index 0000000..7c50346
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/uRODLTemplateBasedConverter.pas	
@@ -0,0 +1,4037 @@
+unit uRODLTemplateBasedConverter;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - CodeGen2                                          }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+
+uses
+  {$IFDEF FPC}LResources,{$ENDIF}
+  Classes, Contnrs,
+  uRODLLineStream, uRODL, uROClasses;
+
+type
+  // forward declarations
+  TRODLTemplateBasedConverter = class;
+  TServicesSectionClass = class of TServicesSection;
+  TEventSinksSectionClass = class of TEventSinksSection;
+  TBaseServiceSection = class;
+  TBaseOperationSection = class;
+  TParamsSection = class;
+  TBaseStructSection = class;
+  TFieldsSection = class;
+  TArraysSection = class;
+  TOutParamsSection = class;
+  TOutParamsNoStripSection = class;
+  TFieldSubSectionList = class;
+  TAllOperationsSectionClass = class of TAllOperationsSection;
+  TProcedureOperationsSectionClass = class of TProcedureOperationsSection;
+  TFunctionOperationsSectionClass = class of TFunctionOperationsSection;
+  TOperationsSectionClass = class of TOperationsSection;
+  TParamsNoStripSectionClass = class of TParamsNoStripSection;
+  TStructsSectionClass = class of TStructsSection;
+  TExceptionsSectionClass = class of TExceptionsSection;
+
+  TRODLGeneratorSection = class
+  private
+    FParent: TRODLTemplateBasedConverter;
+  protected
+    FName: string;
+    
+    procedure Write(const line: string);
+    procedure ProcessDocumentation(entity: TRODLEntity; const template: string);
+    class procedure DoRODLEntityReplacements(var curLine: string; const aEntity: TRODLEntity; const Prefix: string);
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; const AName: string); virtual;
+
+    procedure Process(const sectionText: string; const aLibrary: TRODLLibrary); virtual;
+
+    property Name: string read FName;
+    property Parent: TRODLTemplateBasedConverter read FParent;
+  end;
+
+  TRODLGeneratorSectionList = class (TObjectList)
+  private
+    function GetItem(Index: Integer): TRODLGeneratorSection;
+    procedure SetItem(Index: Integer; const Value: TRODLGeneratorSection);
+  public
+    function Add(AObject: TRODLGeneratorSection): Integer;
+    property Items[Index: Integer]: TRODLGeneratorSection read GetItem write SetItem; default;
+  end;
+
+  TRODLTemplateBasedConverter = class (TRODLConverter)
+  private
+    FTemplateFileName: string;
+    FSections: TRODLGeneratorSectionList;
+    FUnitName: string;
+    FFileExtension: string;
+
+    function GetService(Index: Integer): TRODLService;
+    function InternalSectionStart(const line: string; var section: TRODLGeneratorSection): Boolean;
+    procedure SetupOrderedLists(const aLibrary: TRODLLibrary);
+    function GetWriteDataModule: boolean;
+    function GetUseDefaultAncestor: Boolean;
+  protected
+    FOrderedServices: IROStrings;
+    FOrderedStructs: IROStrings;
+    FOrderedExceptions: IROStrings;
+    FOrderedEventSinks: IROStrings;
+    FOrderedArrays: IROStrings;
+    FOrderedEnums: IROStrings;
+
+    FGlobalOrderedArrays: IROStrings;
+    FGlobalOrderedEnums: IROStrings;
+    FGlobalOrderedStructs: IROStrings;
+
+    FLibrary: TRODLLibrary;
+
+    FServerClassName: string;
+    FRequiredUnits: string;
+
+    procedure IntConvert(const aLibrary : TRODLLIbrary; const aTargetEntity : string = ''); override;
+
+    function GetParamFrontModifier(flag: TRODLParamFlag): string; virtual; abstract;
+    function GetParamBackModifier(flag: TRODLParamFlag): string; virtual;
+    function GetTypeIdentifier(const originalType: string; aDecorateIfNeeded: boolean=true): string; virtual; abstract;
+
+    procedure LoadTemplateFromResource(aTemplateStrings: TStrings; const AlternateTemplateName: string = '');
+    function GetTemplateResourceName(const aFileName: string): string; virtual;
+    function GetUnitName: string; virtual;
+    function GetNamespaceName(const aLibrary: TRODLLibrary): string; virtual;
+    function GetFileExtension: string; virtual;
+
+    function GetServicesSectionClass: TServicesSectionClass; virtual;
+    function GetEventSinksSectionClass: TEventSinksSectionClass; virtual;
+    function GetStructsSectionClass: TStructsSectionClass; virtual;
+    function GetExceptionsSectionClass: TExceptionsSectionClass; virtual;
+
+    procedure DoDefaultReplacements(var curLine: string; const aLibrary: TRODLLibrary); virtual;
+    procedure SetupServices(const aLibrary: TRODLLibrary; const aTargetEntity : string = ''); virtual;
+    procedure SetupRequiredUnits; virtual;
+    function GetUsedFileRequiredUnits(const UsedRODLFileName: string): string; virtual;
+    procedure ProcessTemplate(const aLibrary: TRODLLibrary; template: TLineStream); virtual;
+
+    property Sections: TRODLGeneratorSectionList read FSections;
+    property Services[Index: Integer]: TRODLService read GetService;
+  public
+    constructor Create(const aLibrary: TRODLLibrary; const aTemplateFileName: string; const aUnitName: string; const aTargetEntity: string = ''); reintroduce; virtual;
+    destructor Destroy; override;
+
+    procedure SaveResultToFile(const FileName: string); virtual;
+    procedure SaveResultToStream(const Stream: TStream); virtual;
+
+    function GetDefaultExceptionAncestorName: string; virtual;
+    function GetDefaultStructAncestorName: string; virtual;
+    function GetDefaultServiceProxyAncestorName: string; virtual;
+    function IsImplementedAsClass(const aTypeName: string; aLibrary: TRODLLibrary): Boolean; virtual;
+    function GetDefaultClassPrefix: String; virtual;
+
+    function ResolveUnitName(const aUnitName: string): string; virtual;
+
+    property TemplateFileName: string read FTemplateFileName write FTemplateFileName;
+    property ROUnitName: string read GetUnitName write FUnitName;
+    property FileExtension: string read GetFileExtension write FFileExtension;
+    property RequiredUnits: string read FRequiredUnits write FRequiredUnits;
+    property WriteDataModule: Boolean read GetWriteDataModule;
+    property UseDefaultAncestor: Boolean read GetUseDefaultAncestor;
+    property ServerClassName: string read FServerClassName write FServerClassName;
+
+    // These ones apply to the current file. In split mode, they may well be empty
+    property OrderedServices: IROStrings read FOrderedServices;
+    property OrderedStructs: IROStrings read FOrderedStructs;
+    property OrderedExceptions: IROStrings read FOrderedExceptions;
+    property OrderedEventSinks: IROStrings read FOrderedEventSinks;
+    property OrderedArrays: IROStrings read FOrderedArrays;
+    property OrderedEnums: IROStrings read FOrderedEnums;
+
+    // These ones apply to the entire library. In split mode, they may contain more than what's in the currently generated file
+    property GlobalOrderedArrays: IROStrings read FGlobalOrderedArrays;
+    property GlobalOrderedEnums: IROStrings read FGlobalOrderedEnums;
+    property GlobalOrderedStructs: IROStrings read FGlobalOrderedStructs;
+  end;
+
+  TTemplatedSection = class (TRODLGeneratorSection)
+  protected
+    procedure ProcessTemplate(sectionTemplate: TLineStream; const aLibrary: TRODLLibrary); virtual; abstract;
+  public
+    procedure Process(const sectionText: string; const aLibrary: TRODLLibrary); override;
+  end;
+
+  TBaseServiceSubSection = class (TRODLGeneratorSection)
+  private
+    FParentSection: TBaseServiceSection;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; AParentSection: TBaseServiceSection; const AName: string); reintroduce; virtual;
+
+    procedure Process(const sectionText: string; const aLibrary: TRODLLibrary; const aService: TRODLBaseService); reintroduce; virtual;
+
+    property ParentSection: TBaseServiceSection read FParentSection;
+  end;
+
+  TTemplatedBaseServiceSubSection = class (TBaseServiceSubSection)
+  protected
+    procedure ProcessTemplate(sectionTemplate: TLineStream; const aLibrary: TRODLLibrary; const aService: TRODLBaseService); virtual; abstract;
+  public
+    procedure Process(const sectionText: string; const aLibrary: TRODLLibrary; const aService: TRODLBaseService); override;
+  end;
+
+  TBaseServiceSubSectionList = class (TObjectList)
+  private
+    function GetItem(Index: Integer): TBaseServiceSubSection;
+    procedure SetItem(Index: Integer; const Value: TBaseServiceSubSection);
+  public
+    function Add(AObject: TBaseServiceSubSection): Integer;
+    property Items[Index: Integer]: TBaseServiceSubSection read GetItem write SetItem; default;
+  end;
+
+  TBaseProcedureSubSection = class (TRODLGeneratorSection)
+  private
+    FParentSection: TBaseOperationSection;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; AParentSection: TBaseOperationSection; const AName: string); reintroduce; virtual;
+
+    procedure Process(const sectionText: string; const aLibrary: TRODLLibrary; const aOperation: TRODLOperation; const aService: TRODLBaseService); reintroduce; virtual;
+
+    property ParentSection: TBaseOperationSection read FParentSection;
+  end;
+
+  TTemplatedBaseProcedureSubSection = class (TBaseProcedureSubSection)
+  protected
+    procedure ProcessTemplate(sectionTemplate: TLineStream; const aLibrary: TRODLLibrary; const aOperation: TRODLOperation; const aService: TRODLBaseService); virtual; abstract;
+  public
+    procedure Process(const sectionText: string; const aLibrary: TRODLLibrary; const aOperation: TRODLOperation; const aService: TRODLBaseService); override;
+  end;
+
+  TBaseProcedureSubSectionList = class (TObjectList)
+  private
+    function GetItem(Index: Integer): TBaseProcedureSubSection;
+    procedure SetItem(Index: Integer; const Value: TBaseProcedureSubSection);
+  public
+    function Add(AObject: TBaseProcedureSubSection): Integer;
+    property Items[Index: Integer]: TBaseProcedureSubSection read GetItem write SetItem; default;
+  end;
+
+  TParamSubSection = class (TRODLGeneratorSection)
+  private
+    FParentSection: TParamsSection;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; AParentSection: TParamsSection; const AName: string); reintroduce; virtual;
+
+    procedure Process(const sectionText: string; const aLibrary: TRODLLibrary;
+                      const aParameter: TRODLOperationParam; const IsLastParam: Boolean); reintroduce; virtual;
+
+    property ParentSection: TParamsSection read FParentSection;
+  end;
+
+  TParamSubSectionList = class (TObjectList)
+  private
+    function GetItem(Index: Integer): TParamSubSection;
+    procedure SetItem(Index: Integer; const Value: TParamSubSection);
+  public
+    function Add(AObject: TParamSubSection): Integer;
+    property Items[Index: Integer]: TParamSubSection read GetItem write SetItem; default;
+  end;
+
+  TBaseStructSubSection = class (TRODLGeneratorSection)
+  private
+    FParentSection: TBaseStructSection;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; AParentSection: TBaseStructSection; const AName: string); reintroduce; virtual;
+
+    procedure Process(const sectionText: string; const aLibrary: TRODLLibrary;
+                      const aStruct: TRODLBaseStruct); reintroduce; virtual;
+
+    property ParentSection: TBaseStructSection read FParentSection;
+  end;
+
+  TTemplatedBaseStructSubSection = class (TBaseStructSubSection)
+  protected
+    procedure ProcessTemplate(sectionTemplate: TLineStream; const aLibrary: TRODLLibrary; const aStruct: TRODLBaseStruct); virtual; abstract;
+  public
+    procedure Process(const sectionText: string; const aLibrary: TRODLLibrary; const aStruct: TRODLBaseStruct); override;
+  end;
+
+  TBaseStructSubSectionList = class (TObjectList)
+  private
+    function GetItem(Index: Integer): TBaseStructSubSection;
+    procedure SetItem(Index: Integer; const Value: TBaseStructSubSection);
+  public
+    function Add(AObject: TBaseStructSubSection): Integer;
+    property Items[Index: Integer]: TBaseStructSubSection read GetItem write SetItem; default;
+  end;
+
+  TArraySubSection = class (TRODLGeneratorSection)
+  private
+    FParentSection: TArraysSection;
+  protected
+    function CanUse(const aArray: TRODLArray; const aLibrary: TRODLLibrary): Boolean; virtual;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; AParentSection: TArraysSection; const AName: string); reintroduce; virtual;
+
+    procedure Process(const sectionText: string; const aLibrary: TRODLLibrary;
+                      const aArray: TRODLArray); reintroduce; virtual;
+
+    property ParentSection: TArraysSection read FParentSection;
+  end;
+
+  TArraySubSectionList = class (TObjectList)
+  private
+    function GetItem(Index: Integer): TArraySubSection;
+    procedure SetItem(Index: Integer; const Value: TArraySubSection);
+  public
+    function Add(AObject: TArraySubSection): Integer;
+    property Items[Index: Integer]: TArraySubSection read GetItem write SetItem; default;
+  end;
+
+  TFieldSubSection = class (TRODLGeneratorSection)
+  private
+    FParentSection: TFieldsSection;
+  protected
+    function CanUse(const aField: TRODLTypedEntity; const aStruct: TRODLBaseStruct): Boolean; virtual;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; AParentSection: TFieldsSection; const AName: string); reintroduce; virtual;
+
+    procedure Process(const sectionText: string; const aLibrary: TRODLLibrary;
+                      const aField: TRODLTypedEntity; const aStruct: TRODLBaseStruct; const IsLastField: Boolean); reintroduce; virtual;
+
+    property ParentSection: TFieldsSection read FParentSection;
+  end;
+
+  TTemplatedFieldSubSection = class (TFieldSubSection)
+  protected
+    procedure ProcessTemplate(sectionTemplate: TLineStream; const aLibrary: TRODLLibrary;
+                      const aField: TRODLTypedEntity; const aStruct: TRODLBaseStruct; const IsLastField: Boolean); virtual; abstract;
+  public
+    procedure Process(const sectionText: string; const aLibrary: TRODLLibrary;
+                      const aField: TRODLTypedEntity; const aStruct: TRODLBaseStruct; const IsLastField: Boolean); override;
+  end;
+
+  TFieldSubSectionList = class (TObjectList)
+  private
+    function GetItem(Index: Integer): TFieldSubSection;
+    procedure SetItem(Index: Integer; const Value: TFieldSubSection);
+  public
+    function Add(AObject: TFieldSubSection): Integer;
+    property Items[Index: Integer]: TFieldSubSection read GetItem write SetItem; default;
+  end;
+
+  // Base classes
+  TBaseStructSection = class (TTemplatedSection)
+  private
+  protected
+    FSections: TBaseStructSubSectionList;
+
+    property Sections: TBaseStructSubSectionList read FSections;
+    function InternalSectionStart(const line: string; var section: TBaseStructSubSection): Boolean;
+
+    function GetAncestorName(const aStruct: TRODLBaseStruct): string; virtual; abstract;
+    function GetEntityPrefix: string; virtual; abstract;
+    function GetStructList: IROStrings; virtual; abstract;
+
+    function GetAncestorCollectionName(const aStruct: TRODLBaseStruct): string;
+
+    procedure DoReplacements(var curLine: string; const aStruct: TRODLBaseStruct; const aLibrary: TRODLLibrary); virtual;
+    procedure ProcessTemplate(sectionTemplate: TLineStream; const aLibrary: TRODLLibrary); override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; const AName: string); override;
+    destructor Destroy; override;
+  end;
+  
+  TBaseServiceSection = class (TTemplatedSection)
+  protected
+    FSections: TBaseServiceSubSectionList;
+    function InternalSectionStart(const line: string; var section: TBaseServiceSubSection): Boolean;
+    property Sections: TBaseServiceSubSectionList read FSections;
+
+    function GetAncestorName(const aService: TRODLBaseService): string; virtual;
+    function GetEntityPrefix: string; virtual; abstract;
+    function GetServiceList: IROStrings; virtual; abstract;
+
+    procedure DoReplacements(var curLine: string; const aService: TRODLBaseService; const aLibrary: TRODLLibrary); virtual;
+    procedure ProcessTemplate(sectionTemplate: TLineStream; const aLibrary: TRODLLibrary); override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; const AName: string); override;
+    destructor Destroy; override;
+  end;
+
+  TBaseOperationSection = class (TTemplatedBaseServiceSubSection)
+  protected
+    FSections: TBaseProcedureSubSectionList;
+
+    function InternalSectionStart(const line: string; var section: TBaseProcedureSubSection): Boolean;
+    property Sections: TBaseProcedureSubSectionList read FSections;
+    function GetParamsNoStripSectionClass: TParamsNoStripSectionClass; virtual;
+
+    function OperationApplies(aOperation: TRODLOperation): Boolean; virtual; abstract;
+
+    procedure DoReplacements(var curLine: string; const aOperation: TRODLOperation;
+                             const aService: TRODLBaseService; const aLibrary: TRODLLibrary); virtual;
+    procedure ProcessTemplate(sectionTemplate: TLineStream; const aLibrary: TRODLLibrary; const aService: TRODLBaseService); override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; AParentSection: TBaseServiceSection; const AName: string); override;
+    destructor Destroy; override;
+  end;
+
+  // REQUIRED_UNITS
+  TRequiredUnitsSection = class (TRODLGeneratorSection)
+  protected
+    fMultipass: Boolean;
+    procedure DoReplacements(var curLine: string; const unitName: string; const aLibrary: TRODLLibrary); dynamic;
+    property Multipass: Boolean read fMultipass write fMultipass;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter); reintroduce; virtual;
+
+    procedure Process(const sectionText: string; const aLibrary: TRODLLibrary); override;
+  end;
+
+  // USED_RODLS
+  TUsedRODLsSection = class (TRODLGeneratorSection)
+  protected
+    procedure DoReplacements(var curLine: string; unitName: string; const aLibrary: TRODLLibrary); dynamic;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter); reintroduce; virtual;
+
+    procedure Process(const sectionText: string; const aLibrary: TRODLLibrary); override;
+  end;
+
+  // SERVICES
+  TServicesSection = class (TBaseServiceSection)
+  protected
+    function GetEntityPrefix: string; override;
+    function GetServiceList: IROStrings; override;
+
+    function IsSOAPService(const aService : TRODLBaseService) : Boolean;
+    function GetProxyAncestorName(const aService: TRODLBaseService): string; virtual;
+    function GetInvokerAncestorName(const aService: TRODLBaseService): string; virtual;
+    function GetProxySuffix: string; virtual;
+    function GetAllOperationsSectionClass: TAllOperationsSectionClass; virtual;
+    function GetProcedureOperationsSectionClass: TProcedureOperationsSectionClass; virtual;
+    function GetFunctionOperationsSectionClass: TFunctionOperationsSectionClass; virtual;
+
+    procedure DoReplacements(var curLine: string; const aService: TRODLBaseService; const aLibrary: TRODLLibrary); override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter); reintroduce; virtual;
+  end;
+  
+  // ENUMS
+  TEnumsSection = class (TTemplatedSection)
+  protected
+    procedure ProcessValues(enum: TRODLEnum; const template: string; aStripLastSeparator: Boolean=true);
+    procedure DoReplacements(var curLine: string; aEnum: TRODLEnum; const aLibrary: TRODLLibrary); dynamic;
+
+    procedure ProcessTemplate(sectionTemplate: TLineStream; const aLibrary: TRODLLibrary); override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter); reintroduce; virtual;
+
+    class function GetEnumValueName(const enum: TRODLEnum; const ValueIndex: Integer): string;
+  end;
+
+  // EVENT_SINKS
+  TEventSinksSection = class (TBaseServiceSection)
+  protected
+    function GetEntityPrefix: string; override;
+    function GetServiceList: IROStrings; override;
+    
+    function GetEventSinkWriterAncestorName(const aEventSink: TRODLEventSink): string; dynamic;
+    function GetEventSinkInvokerAncestorName(const aEventSink: TRODLEventSink): string; dynamic;
+    function GetOperationsSectionClass: TOperationsSectionClass; virtual;
+
+    procedure DoReplacements(var curLine: string; const aService: TRODLBaseService; const aLibrary: TRODLLibrary); override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter); reintroduce; virtual;
+  end;
+
+  // ARRAYS
+  TArraysSection = class (TTemplatedSection)
+  protected
+    FSections: TArraySubSectionList;
+
+    function InternalSectionStart(const line: string; var section: TArraySubSection): Boolean;
+    property Sections: TArraySubSectionList read FSections;
+    
+    procedure DoReplacements(var curLine: string; const aArray: TRODLArray; const aLibrary: TRODLLibrary); virtual;
+    procedure ProcessTemplate(sectionTemplate: TLineStream; const aLibrary: TRODLLibrary); override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter); reintroduce; virtual;
+    destructor Destroy; override;
+  end;
+
+  // STRUCTS
+  TStructsSection = class (TBaseStructSection)
+  protected
+    function GetEntityPrefix: string; override;
+    function GetAncestorName(const aStruct: TRODLBaseStruct): string; override;
+    function GetStructList: IROStrings; override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter); reintroduce; virtual;
+  end;
+
+  // EXCEPTIONS
+  TExceptionsSection = class (TBaseStructSection)
+  protected
+    function GetEntityPrefix: string; override;
+    function GetAncestorName(const aStruct: TRODLBaseStruct): string; override;
+    function GetStructList: IROStrings; override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter); reintroduce; virtual;
+  end;
+
+  // OPERATIONS
+  TOperationsSection = class (TBaseOperationSection)
+  protected
+    function OperationApplies(aOperation: TRODLOperation): Boolean; override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; AParentSection: TBaseServiceSection); reintroduce; virtual;
+  end;
+
+  TIfOperationHasResult = class (TBaseProcedureSubSection)
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; AParentSection: TBaseOperationSection); reintroduce; virtual;
+
+    procedure Process(const sectionText: string; const aLibrary: TRODLLibrary; const aOperation: TRODLOperation; const aService: TRODLBaseService); override;    
+  end;
+
+  // PROCEDURE_OPERATIONS
+  TAllOperationsSection = class (TBaseOperationSection)
+  protected
+    function OperationApplies(aOperation: TRODLOperation): Boolean; override;
+    procedure DoReplacements(var curLine: string; const aOperation: TRODLOperation; const aService: TRODLBaseService; const aLibrary: TRODLLibrary); override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; AParentSection: TBaseServiceSection); reintroduce; virtual;
+  end;
+
+  // PROCEDURE_OPERATIONS
+  TProcedureOperationsSection = class (TBaseOperationSection)
+  protected
+    function OperationApplies(aOperation: TRODLOperation): Boolean; override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; AParentSection: TBaseServiceSection); reintroduce; virtual;
+  end;
+
+  // FUNCTION_OPERATIONS
+  TFunctionOperationsSection = class (TBaseOperationSection)
+  protected
+    function OperationApplies(aOperation: TRODLOperation): Boolean; override;
+    procedure DoReplacements(var curLine: string; const aOperation: TRODLOperation; const aService: TRODLBaseService; const aLibrary: TRODLLibrary); override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; AParentSection: TBaseServiceSection); reintroduce; virtual;
+  end;
+
+  // PARAMS
+  TParamsSection = class (TTemplatedBaseProcedureSubSection)
+  private
+  protected
+    FSections: TParamSubSectionList;
+
+    function InternalSectionStart(const line: string; var section: TParamSubSection): Boolean;
+    property Sections: TParamSubSectionList read FSections;
+
+    procedure EnsureStripping(var curLine: string; IsLastParam: Boolean);
+    
+    procedure DoReplacements(var curLine: string; const aParameter: TRODLOperationParam;
+                             const aLibrary: TRODLLibrary); virtual;
+
+    procedure ProcessTemplate(sectionTemplate: TLineStream; const aLibrary: TRODLLibrary; const aOperation: TRODLOperation; const aService: TRODLBaseService); override;
+    function CanStrip: Boolean; virtual;
+    function CanUse(const AParam: TRODLOperationParam): Boolean; virtual;
+    class function GetAttributeReplacement(const dataType: string): string; virtual;
+  public
+    class procedure DoAttributeReplacements(var curLine: string; const dataType: string; const prefix: string);
+
+    constructor Create(AParent: TRODLTemplateBasedConverter; const AParentSection: TBaseOperationSection); reintroduce; virtual;
+    destructor Destroy; override;
+  end;
+
+  // PARAMS_NO_STRIP
+  TParamsNoStripSection = class (TParamsSection)
+  protected
+    function CanStrip: Boolean; override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; const AParentSection: TBaseOperationSection); override;
+  end;
+
+  // IF_PARAM_TYPE_COMPLEX
+  TIfParamTypeComplexSection = class (TParamSubSection)
+  public
+    procedure Process(const sectionText: string; const aLibrary: TRODLLibrary;
+                      const aParameter: TRODLOperationParam; const IsLastParam: Boolean); override;
+
+    constructor Create(AParent: TRODLTemplateBasedConverter; const AParentSection: TParamsSection); reintroduce; virtual;
+  end;
+
+  // IF_PARAM_TYPE_SIMPLE
+  TIfParamTypeSimpleSection = class (TParamSubSection)
+  public
+    procedure Process(const sectionText: string; const aLibrary: TRODLLibrary;
+                      const aParameter: TRODLOperationParam; const IsLastParam: Boolean); override;
+
+    constructor Create(AParent: TRODLTemplateBasedConverter; const AParentSection: TParamsSection); reintroduce; virtual;
+  end;
+
+  // IF_PARAM_XXXX_TYPE
+  TIfParamXXXTypeSection = class (TParamSubSection)
+  protected
+    FDataType: string;
+  public
+    procedure Process(const sectionText: string; const aLibrary: TRODLLibrary;
+                      const aParameter: TRODLOperationParam; const IsLastParam: Boolean); override;
+
+    constructor Create(AParent: TRODLTemplateBasedConverter; const AParentSection: TParamsSection; const DataType: string); reintroduce; virtual;
+  end;
+
+  // IF_PARAM_OTHER_TYPE
+  TIfParamOtherTypeSection = class (TParamSubSection)
+  public
+    procedure Process(const sectionText: string; const aLibrary: TRODLLibrary;
+                      const aParameter: TRODLOperationParam; const IsLastParam: Boolean); override;
+
+    constructor Create(AParent: TRODLTemplateBasedConverter; const AParentSection: TParamsSection); reintroduce; virtual;
+  end;
+
+  // IF_STRUCT_HAS_ANCESTOR
+  TIfStructHasAncestor = class(TBaseStructSubSection)
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; AParentSection: TBaseStructSection); reintroduce; virtual;
+
+    procedure Process(const sectionText: string; const aLibrary: TRODLLibrary;
+                      const aStruct: TRODLBaseStruct); override;
+  end;
+
+  // FIELDS
+  TFieldsSection = class (TTemplatedBaseStructSubSection)
+  private
+  protected
+    FSections: TFieldSubSectionList;
+
+    function InternalSectionStart(const line: string; var section: TFieldSubSection): Boolean;
+    property Sections: TFieldSubSectionList read FSections;
+
+    function CanStrip: Boolean; virtual;
+    procedure EnsureStripping(var curLine: string; IsLastField: Boolean);
+
+    procedure DoReplacements(var curLine: string; curField: TRODLTypedEntity; const aStruct: TRODLBaseStruct; const aLibrary: TRODLLibrary);
+
+    procedure ProcessField(sectionTemplate: TLineStream; const aLibrary: TRODLLibrary; AField: TRODLTypedEntity; const aStruct: TRODLBaseStruct; IsLastField: Boolean); virtual;
+    procedure ProcessTemplate(sectionTemplate: TLineStream; const aLibrary: TRODLLibrary; const aStruct: TRODLBaseStruct); override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; AParentSection: TBaseStructSection); reintroduce; virtual;
+    destructor Destroy; override;
+  end;
+
+  // FIELDS_NO_STRIP
+  TFieldsNoStripSection = class (TFieldsSection)
+  protected
+    function CanStrip: Boolean; override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; AParentSection: TBaseStructSection); override;
+  end;
+
+  // ANCESTOR_FIELDS
+  TAncestorFieldsSection = class (TFieldsSection)
+  protected
+    procedure ProcessTemplate(sectionTemplate: TLineStream; const aLibrary: TRODLLibrary; const aStruct: TRODLBaseStruct); override;
+    function CanStrip: Boolean; override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; AParentSection: TBaseStructSection); override;
+  end;
+
+  // ENTIRE_HIERARCHY_FIELDS
+  TEntireHierarchyFieldsSection = class (TFieldsSection)
+  protected
+    procedure ProcessTemplate(sectionTemplate: TLineStream; const aLibrary: TRODLLibrary; const aStruct: TRODLBaseStruct); override;
+    function CanStrip: Boolean; override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; AParentSection: TBaseStructSection); override;
+  end;
+
+  // IF_FIELD_XXXX_TYPE
+  TIfFieldXXXTypeSection = class (TFieldSubSection)
+  protected
+    FDataType: string;
+
+    function CanUse(const aField: TRODLTypedEntity; const aStruct: TRODLBaseStruct): Boolean; override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; const AParentSection: TFieldsSection; const DataType: string); reintroduce; virtual;
+  end;
+
+  // IF_FIELD_ARRAY_TYPE
+  TIfFieldArrayTypeSection = class (TFieldSubSection)
+  protected
+    function CanUse(const aField: TRODLTypedEntity; const aStruct: TRODLBaseStruct): Boolean; override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; const AParentSection: TFieldsSection); reintroduce; virtual;
+  end;
+
+  // IF_FIELD_ENUM_TYPE
+  TIfFieldEnumTypeSection = class (TFieldSubSection)
+  protected
+    function CanUse(const aField: TRODLTypedEntity; const aStruct: TRODLBaseStruct): Boolean; override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; const AParentSection: TFieldsSection); reintroduce; virtual;
+  end;
+
+  // IF_FIELD_STRUCT_TYPE
+  TIfFieldStructTypeSection = class (TFieldSubSection)
+  protected
+    function CanUse(const aField: TRODLTypedEntity; const aStruct: TRODLBaseStruct): Boolean; override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; const AParentSection: TFieldsSection); reintroduce; virtual;
+  end;
+
+  // IF_FIELD_TYPE_COMPLEX
+  TIfFieldTypeComplexSection = class (TTemplatedFieldSubSection)
+  protected
+    FSections: TFieldSubSectionList;
+
+    function InternalSectionStart(const line: string; var section: TFieldSubSection): Boolean;
+    property Sections: TFieldSubSectionList read FSections;
+
+    procedure ProcessTemplate(sectionTemplate: TLineStream; const aLibrary: TRODLLibrary;
+                      const aField: TRODLTypedEntity; const aStruct: TRODLBaseStruct; const IsLastField: Boolean); override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; const AParentSection: TFieldsSection); reintroduce; virtual;
+    destructor Destroy; override;
+  end;
+
+  // IF_AUTO_CREATE_FIELDS
+  TIfAutoCreateFieldsSection = class (TFieldSubSection)
+  protected
+    function CanUse(const aField: TRODLTypedEntity; const aStruct: TRODLBaseStruct): Boolean; override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; AParentSection: TFieldsSection); reintroduce; virtual;
+  end;
+
+  // IF_NOT_AUTO_CREATE_FIELDS
+  TIfNotAutoCreateFieldsSection = class (TFieldSubSection)
+  protected
+    function CanUse(const aField: TRODLTypedEntity; const aStruct: TRODLBaseStruct): Boolean; override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; AParentSection: TFieldsSection); reintroduce; virtual;
+  end;
+
+  // IF_FIELD_TYPE_SIMPLE
+  TIfFieldTypeSimpleSection = class (TFieldSubSection)
+  protected
+    function CanUse(const aField: TRODLTypedEntity; const aStruct: TRODLBaseStruct): Boolean; override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; const AParentSection: TFieldsSection); reintroduce; virtual;
+  end;
+
+  // IF_STRING_FIELD
+  TIfStringFieldSection = class (TIfFieldXXXTypeSection)
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; const AParentSection: TFieldsSection); reintroduce; virtual;
+  end;
+
+  // IF_CURRENCY_FIELD
+  TIfCurrencyFieldSection = class (TIfFieldXXXTypeSection)
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; const AParentSection: TFieldsSection); reintroduce; virtual;
+  end;
+
+  // IF_DECIMAL_FIELD
+  TIfDecimalFieldSection = class (TIfFieldXXXTypeSection)
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; const AParentSection: TFieldsSection); reintroduce; virtual;
+  end;
+
+  // IF_VARIANT_FIELD
+  TIfVariantFieldSection = class (TIfFieldXXXTypeSection)
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; const AParentSection: TFieldsSection); reintroduce; virtual;
+  end;
+
+  // IF_HAS_FIELDS
+  TIfHasFieldsSection = class (TTemplatedBaseStructSubSection)
+  private
+    FSections: TBaseStructSubSectionList;
+    function InternalSectionStart(const line: string; var section: TBaseStructSubSection): Boolean;
+  protected
+    procedure DoReplacements(var curLine: string; const aStruct: TRODLBaseStruct; const aLibrary: TRODLLibrary);
+    procedure ProcessTemplate(sectionTemplate: TLineStream; const aLibrary: TRODLLibrary; const aStruct: TRODLBaseStruct); override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; AParentSection: TBaseStructSection); reintroduce; virtual;
+    destructor Destroy; override;
+  end;
+
+  // IF_DATA_MODULE
+  TIfDataModuleSection = class (TRODLGeneratorSection)
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter); reintroduce; virtual;
+
+    procedure Process(const sectionText: string; const aLibrary: TRODLLibrary); override;
+  end;
+
+  // IF_DATA_MODULE  (inside a SERVICES section)
+  TIfDataModuleServiceSection = class (TBaseServiceSubSection)
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; AParentSection: TBaseServiceSection); reintroduce; virtual;
+
+    procedure Process(const sectionText: string; const aLibrary: TRODLLibrary; const aService: TRODLBaseService); override;
+  end;
+
+  // IF_HYDRA
+  TIfHydraSection = class (TRODLGeneratorSection)
+  private
+    FIsHydraModule: Boolean;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter); reintroduce; virtual;
+
+    procedure Process(const sectionText: string; const aLibrary: TRODLLibrary); override;
+  end;
+
+  // IF_WSDL
+  TIfWSDLSection = class (TRODLGeneratorSection)
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter); reintroduce; virtual;
+
+    procedure Process(const sectionText: string; const aLibrary: TRODLLibrary); override;
+  end;
+
+  // ANCESTOR_SERVICES
+  TAncestorServicesSection = class (TBaseServiceSubSection)
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; AParentSection: TBaseServiceSection); reintroduce; virtual;
+
+    procedure Process(const sectionText: string; const aLibrary: TRODLLibrary; const aService: TRODLBaseService); override;
+  end;
+
+  // IF_HAS_COMPLEX_TYPE
+  TIfHasComplexTypeSection = class (TTemplatedBaseProcedureSubSection)
+  private
+    FSections: TBaseProcedureSubSectionList;
+
+    function InternalSectionStart(const line: string; var section: TBaseProcedureSubSection): Boolean;
+    property Sections: TBaseProcedureSubSectionList read FSections;
+
+    function OperationHasComplexType(const aOperation: TRODLOperation; const aLibrary: TRODLLibrary): Boolean;
+  protected
+    procedure ProcessTemplate(sectionTemplate: TLineStream; const aLibrary: TRODLLibrary; const aOperation: TRODLOperation; const aService: TRODLBaseService); override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; AParentSection: TBaseOperationSection); reintroduce; virtual;
+    destructor Destroy; override;
+  end;
+
+  // IF_ARRAY_TYPE_SIMPLE
+  TIfArrayTypeSimpleSection = class (TArraySubSection)
+  protected
+    function CanUse(const aArray: TRODLArray; const aLibrary: TRODLLibrary): Boolean; override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; AParentSection: TArraysSection); reintroduce; virtual;
+  end;
+
+  // IF_ARRAY_TYPE_COMPLEX
+  TIfArrayTypeComplexSection = class (TArraySubSection)
+  protected
+    function CanUse(const aArray: TRODLArray; const aLibrary: TRODLLibrary): Boolean; override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; AParentSection: TArraysSection); reintroduce; virtual;
+  end;
+
+  // IF_ARRAY_XXXX_TYPE
+  TIfArrayXXXTypeSection = class (TArraySubSection)
+  protected
+    FDataType: string;
+
+    function CanUse(const aArray: TRODLArray; const aLibrary: TRODLLibrary): Boolean; override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; const AParentSection: TArraysSection; const DataType: string); reintroduce; virtual;
+  end;
+
+  // IF_ARRAY_NOT_XXXX_TYPE
+  TIfArrayNOTXXXTypeSection = class (TArraySubSection)
+  protected
+    FDataType: string;
+
+    function CanUse(const aArray: TRODLArray; const aLibrary: TRODLLibrary): Boolean; override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; const AParentSection: TArraysSection; const DataType: string); reintroduce; virtual;
+  end;
+
+
+  // IF_ARRAY_ARRAY_TYPE
+  TIfArrayArrayTypeSection = class (TArraySubSection)
+  protected
+    function CanUse(const aArray: TRODLArray; const aLibrary: TRODLLibrary): Boolean; override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; const AParentSection: TArraysSection); reintroduce; virtual;
+  end;
+
+  // IF_ARRAY_ENUM_TYPE
+  TIfArrayEnumTypeSection = class (TArraySubSection)
+  protected
+    function CanUse(const aArray: TRODLArray; const aLibrary: TRODLLibrary): Boolean; override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; const AParentSection: TArraysSection); reintroduce; virtual;
+  end;
+
+  // IF_ARRAY_STRUCT_TYPE
+  TIfArrayStructTypeSection = class (TArraySubSection)
+  protected
+    function CanUse(const aArray: TRODLArray; const aLibrary: TRODLLibrary): Boolean; override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; const AParentSection: TArraysSection); reintroduce; virtual;
+  end;
+
+  // IN_PARAMS
+  TInParamsSection = class (TParamsSection)
+  protected
+    function CanUse(const AParam: TRODLOperationParam): Boolean; override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; const AParentSection: TBaseOperationSection); override;
+  end;
+
+  // IN_PARAMS_NO_STRIP
+  TInParamsNoStripSection = class (TInParamsSection)
+  protected
+    function CanStrip: Boolean; override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; const AParentSection: TBaseOperationSection); override;
+  end;
+
+  // OUT_PARAMS
+  TOutParamsSection = class (TParamsSection)
+  protected
+    function CanUse(const AParam: TRODLOperationParam): Boolean; override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; const AParentSection: TBaseOperationSection); override;
+  end;
+
+  // OUT_PARAMS_NO_STRIP
+  TOutParamsNoStripSection = class (TOutParamsSection)
+  protected
+    function CanStrip: Boolean; override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; const AParentSection: TBaseOperationSection); override;
+  end;
+
+  // IF_OUT_PARAMS
+  TIfOutParamsSection = class (TTemplatedBaseProcedureSubSection)
+  protected
+    FSections: TBaseProcedureSubSectionList;
+
+    function InternalSectionStart(const line: string; var section: TBaseProcedureSubSection): Boolean;
+    property Sections: TBaseProcedureSubSectionList read FSections;
+
+    function CanUse(const aOperation: TRODLOperation): Boolean; virtual;
+
+    procedure ProcessTemplate(sectionTemplate: TLineStream; const aLibrary: TRODLLibrary; const aOperation: TRODLOperation; const aService: TRODLBaseService); override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; AParentSection: TBaseOperationSection); reintroduce; virtual;
+    destructor Destroy; override;
+  end;
+
+  // IF_NO_OUT_PARAMS
+  TIfNoOutParamsSection = class (TIfOutParamsSection)
+  protected
+    function CanUse(const aOperation: TRODLOperation): Boolean; override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; AParentSection: TBaseOperationSection); override;
+  end;
+
+  // IF_RESULT_COMPLEX
+  TIfResultComplexSection = class (TBaseProcedureSubSection)
+  public
+    procedure Process(const sectionText: string; const aLibrary: TRODLLibrary; const aOperation: TRODLOperation; const aService: TRODLBaseService); override;
+
+    constructor Create(AParent: TRODLTemplateBasedConverter; AParentSection: TBaseOperationSection); reintroduce; virtual;
+  end;
+
+  // IF_RESULT_SIMPLE
+  TIfResultSimpleSection = class (TBaseProcedureSubSection)
+  public
+    procedure Process(const sectionText: string; const aLibrary: TRODLLibrary; const aOperation: TRODLOperation; const aService: TRODLBaseService); override;
+
+    constructor Create(AParent: TRODLTemplateBasedConverter; AParentSection: TBaseOperationSection); reintroduce; virtual;
+  end;
+
+  // IF_RESULT_XXXX_TYPE
+  TIfResultXXXTypeSection = class (TBaseProcedureSubSection)
+  protected
+    FDataType: string;
+  public
+    procedure Process(const sectionText: string; const aLibrary: TRODLLibrary; const aOperation: TRODLOperation; const aService: TRODLBaseService); override;
+
+    constructor Create(AParent: TRODLTemplateBasedConverter; AParentSection: TBaseOperationSection; const DataType: string); reintroduce; virtual;
+  end;
+
+  // IF_RESULT_OTHER_TYPE
+  TIfResultOtherTypeSection = class (TBaseProcedureSubSection)
+  public
+    procedure Process(const sectionText: string; const aLibrary: TRODLLibrary; const aOperation: TRODLOperation; const aService: TRODLBaseService); override;
+
+    constructor Create(AParent: TRODLTemplateBasedConverter; AParentSection: TBaseOperationSection); reintroduce; virtual;
+  end;
+
+  // ARRAYS_IS_FOUND
+  TArraysIsFound = class (TTemplatedBaseStructSubSection)
+  protected
+    procedure DoReplacements(var curLine: string; const aArray: TRODLArray; const aStruct: TRODLBaseStruct; const aLibrary: TRODLLibrary);
+    procedure ProcessTemplate(sectionTemplate: TLineStream; const aLibrary: TRODLLibrary; const aStruct: TRODLBaseStruct); override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; AParentSection: TBaseStructSection); reintroduce; virtual;
+  end;
+
+  // STRUCT_GENERATE_DEFAULT_VALUES
+  TStructGenerateDefaultValues = class (TTemplatedBaseStructSubSection)
+  protected
+    procedure ProcessTemplate(sectionTemplate: TLineStream; const aLibrary: TRODLLibrary; const aStruct: TRODLBaseStruct); override;
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; AParentSection: TBaseStructSection); reintroduce; virtual;
+  end;
+
+  //IF_FIELD_HAS_DEFAULT_VALUE
+  TIfFieldHasDefaultValue = class (TTemplatedFieldSubSection)
+  protected
+  public
+    constructor Create(AParent: TRODLTemplateBasedConverter; const AParentSection: TFieldsSection); reintroduce; virtual;
+    procedure ProcessTemplate(sectionTemplate: TLineStream; const aLibrary: TRODLLibrary;
+                      const aField: TRODLTypedEntity; const aStruct: TRODLBaseStruct; const IsLastField: Boolean); override;
+  end;
+
+implementation
+
+uses
+  {$IFDEF MSWINDOWS}Windows,{$ENDIF}
+  {$IFDEF HYDRA_DESIGNTIME}uEWOTAHelpers,{$ENDIF}
+  uRODLTemplateBasedConverterUtils, SysUtils,
+  uROServer, uROSerializer;
+
+function IsHydraModule : boolean;
+{$IFDEF HYDRA_DESIGNTIME}
+var
+  lSource: string;
+{$ENDIF HYDRA_DESIGNTIME}
+begin
+  Result := False;
+  {$IFDEF HYDRA_DESIGNTIME}
+  if (CurrentProject<>NIL) then begin
+    lSource := UpperCase(ReadModuleSource(CurrentProject));
+    Result := Pos('{#HYDRAMODULE}', lSource)>0;
+  end;
+  {$ENDIF HYDRA_DESIGNTIME}
+end;
+
+{ TRODLTemplateBasedConverter }
+
+constructor TRODLTemplateBasedConverter.Create(const aLibrary: TRODLLibrary;
+   const aTemplateFileName: string; const aUnitName: string; const aTargetEntity: string);
+begin
+  inherited Create(aLibrary, aTargetEntity);
+
+  FTemplateFileName := ATemplateFileName;
+  FUnitName := aUnitName;
+  FSections := TRODLGeneratorSectionList.Create(True);
+
+  // Adding the generic sections
+  FSections.Add(TRequiredUnitsSection.Create(Self));
+  FSections.Add(TUsedRODLsSection.Create(Self));
+  FSections.Add(GetServicesSectionClass.Create(Self));
+  FSections.Add(TEnumsSection.Create(Self));
+  FSections.Add(GetEventSinksSectionClass.Create(Self));
+  FSections.Add(TArraysSection.Create(Self));
+  FSections.Add(GetStructsSectionClass.Create(Self));
+  FSections.Add(GetExceptionsSectionClass.Create(Self));
+  FSections.Add(TIfDataModuleSection.Create(Self));
+  FSections.Add(TIfHydraSection.Create(Self));
+end;
+
+destructor TRODLTemplateBasedConverter.Destroy;
+begin
+  FSections.Free;
+
+  inherited Destroy;
+end;
+
+procedure TRODLTemplateBasedConverter.ProcessTemplate(const aLibrary: TRODLLibrary; template: TLineStream);
+var
+  curLine: string;
+  section: TRODLGeneratorSection;
+begin
+  while not Template.Eof do
+  begin
+    curLine := Template.ReadLine;
+
+    DoDefaultReplacements(curLine, aLibrary);
+
+    // Line that start a section
+    if InternalSectionStart(curLine, section) then
+    begin
+      section.Process(FinishSection(section.Name, template), aLibrary);
+    end
+    else
+    // regular line
+    begin
+      Write(curLine);
+    end;
+  end;
+end;
+
+function TRODLTemplateBasedConverter.ResolveUnitName(
+  const aUnitName: string): string;
+begin
+  result := aUnitName;
+end;
+
+procedure TRODLTemplateBasedConverter.DoDefaultReplacements(var curLine: string; const aLibrary: TRODLLibrary);
+begin
+  // Default macros
+  TRODLGeneratorSection.DoRODLEntityReplacements(curLine, aLibrary, 'LIBRARY');
+  MacroReplace(curLine, '%',
+               ['UNIT_NAME', GetUnitName,
+                'NAMESPACE_NAME', GetNamespaceName(aLibrary)
+               ]);
+end;
+
+function TRODLTemplateBasedConverter.InternalSectionStart(const line: string;
+  var section: TRODLGeneratorSection): Boolean;
+var
+  I: Integer;
+begin
+  I := 0;
+  Result := False;
+  while (I < Sections.Count) and not Result do
+  begin
+    if SectionStart(line, Sections[I].Name) then
+    begin
+      Result := True;
+      section := Sections[I];
+    end;
+    Inc(I);
+  end;
+end;
+
+function TRODLTemplateBasedConverter.IsImplementedAsClass(
+  const aTypeName: string; aLibrary: TRODLLibrary): Boolean;
+begin
+  result := CachedIsImplementedAsClass(aTypename, aLibrary);
+end;
+
+procedure TRODLTemplateBasedConverter.LoadTemplateFromResource(aTemplateStrings: TStrings; const AlternateTemplateName: string = '');
+var
+  {$IFDEF FPC}
+  templateStream: TLazarusResourceStream;
+  {$ELSE}
+  templateStream: TResourceStream;
+  {$ENDIF}
+  usedTemplateName: string;
+begin
+  if Assigned(aTemplateStrings) then
+  begin
+    if Length(AlternateTemplateName) > 0 then
+      usedTemplateName := AlternateTemplateName
+    else
+      usedTemplateName := TemplateFileName;
+    {$IFDEF FPC}
+    templateStream := TLazarusResourceStream.Create(GetTemplateResourceName(usedTemplateName), 'RCDATA');
+    {$ELSE}
+    templateStream := TResourceStream.Create(hInstance, GetTemplateResourceName(usedTemplateName), RT_RCDATA);
+    {$ENDIF}
+    try
+      aTemplateStrings.LoadFromStream(templateStream);
+    finally
+      templateStream.Free;
+    end;
+  end;
+end;
+
+function TRODLTemplateBasedConverter.GetDefaultClassPrefix: String;
+begin
+  result := 'T';
+end;
+
+function TRODLTemplateBasedConverter.GetDefaultExceptionAncestorName: string;
+begin
+  result := DEFAULT_EXCEPTION_ANCESTOR;
+end;
+
+function TRODLTemplateBasedConverter.GetDefaultServiceProxyAncestorName: string;
+begin
+  result := DEFAULT_SERVICE_PROXY_ANCESTOR_NAME;
+end;
+
+function TRODLTemplateBasedConverter.GetDefaultStructAncestorName: string;
+begin
+  result := DEFAULT_STRUCT_ANCESTOR;
+end;
+
+function TRODLTemplateBasedConverter.GetEventSinksSectionClass: TEventSinksSectionClass;
+begin
+  Result := TEventSinksSection;
+end;
+
+function TRODLTemplateBasedConverter.GetExceptionsSectionClass: TExceptionsSectionClass;
+begin
+  Result := TExceptionsSection;
+end;
+
+function TRODLTemplateBasedConverter.GetFileExtension: string;
+begin
+  Result := FFileExtension;
+end;
+
+function TRODLTemplateBasedConverter.GetNamespaceName(
+  const aLibrary: TRODLLibrary): string;
+begin
+  Result := aLibrary.Namespace;
+  if Length(Result) = 0 then
+    Result := aLibrary.Name;
+end;
+
+function TRODLTemplateBasedConverter.GetParamBackModifier(
+  flag: TRODLParamFlag): string;
+begin
+  Result := '';
+end;
+
+function TRODLTemplateBasedConverter.GetService(Index: Integer): TRODLService;
+begin
+  Result := FOrderedServices.Objects[Index] as TRODLService;
+end;
+
+function TRODLTemplateBasedConverter.GetServicesSectionClass: TServicesSectionClass;
+begin
+  Result := TServicesSection;
+end;
+
+function TRODLTemplateBasedConverter.GetStructsSectionClass: TStructsSectionClass;
+begin
+  Result := TStructsSection;
+end;
+
+function TRODLTemplateBasedConverter.GetTemplateResourceName(
+  const aFileName: string): string;
+begin
+  // By default, return the file name without its path part replacing dots
+  // and spaces by an underscore, all this uppercased
+  Result := ExtractFileName(aFileName);
+  Result := StringReplace(Result, '.', '_', [rfReplaceAll]);
+  Result := StringReplace(Result, ' ', '_', [rfReplaceAll]);
+  Result := UpperCase(Result);
+end;
+
+function TRODLTemplateBasedConverter.GetUnitName: string;
+begin
+  Result := FUnitName;
+end;
+
+function TRODLTemplateBasedConverter.GetUseDefaultAncestor: Boolean;
+begin
+  Result := SameText(ServerClassName, TRORemotable.ClassName);
+end;
+
+function TRODLTemplateBasedConverter.GetUsedFileRequiredUnits(const UsedRODLFileName: string): string;
+begin
+  Result := UsedRODLFileName + DEFAULT_INTF_SUFFIX;
+end;
+
+function TRODLTemplateBasedConverter.GetWriteDataModule: boolean;
+begin
+  Result := not UseDefaultAncestor;
+end;
+
+procedure TRODLTemplateBasedConverter.IntConvert(const aLibrary: TRODLLIbrary;
+  const aTargetEntity: string);
+var
+  templateContent: TStringList;
+  template: TLineStream;
+begin
+  FLibrary := aLibrary;
+  
+  SetupServices(aLibrary);
+  SetupOrderedLists(aLibrary);
+  SetupRequiredUnits;
+
+  template := TLineStream.Create('');
+  try
+    // Read template content
+    templateContent := TStringList.Create;
+    try
+      if FileExists(TemplateFileName) then
+        templateContent.LoadFromFile(TemplateFileName)
+      else
+        LoadTemplateFromResource(templateContent);
+      template.WriteString(templateContent.Text);
+      template.Position := 0;
+    finally
+      templateContent.Free;
+    end;
+
+    // Process it
+    ProcessTemplate(aLibrary, template);
+  finally
+    template.Free;
+  end;
+end;
+
+procedure TRODLTemplateBasedConverter.SaveResultToFile(const FileName: string);
+begin
+  Buffer.SaveToFile(FileName);
+end;
+
+procedure TRODLTemplateBasedConverter.SaveResultToStream(const Stream: TStream);
+begin
+  Buffer.SaveToStream(Stream);
+end;
+
+procedure TRODLTemplateBasedConverter.SetupOrderedLists(const aLibrary: TRODLLibrary);
+var
+  I: Integer;
+begin
+  FOrderedStructs := aLibrary.CalcStructOrder;
+  FOrderedExceptions := aLibrary.CalcExceptionOrder;
+  FOrderedEventSinks := aLibrary.CalcEventSinkOrder;
+
+  //ToDo : This should use a CalcArraysOrder method which is currently not present in uRODL.pas
+  FOrderedArrays := NewROStrings();
+  FGlobalOrderedArrays := NewROStrings();
+  for I := 0 to aLibrary.ArrayCount-1 do
+  begin
+    if not aLibrary.Arrays[i].IsFromUsedRodl then
+      FOrderedArrays.AddObject(aLibrary.Arrays[i].Info.Name, aLibrary.Arrays[i]);
+    FGlobalOrderedArrays.AddObject(aLibrary.Arrays[i].Info.Name, aLibrary.Arrays[i]);      
+  end;
+
+  //ToDo : This should use a CalcEnumsOrder method which is currently not present in uRODL.pas
+  FOrderedEnums := NewROStrings();
+  FGlobalOrderedEnums := NewROStrings();
+  for I := 0 to aLibrary.EnumCount-1 do
+  begin
+    if not aLibrary.Enums[i].IsFromUsedRodl then
+      FOrderedEnums.AddObject(aLibrary.Enums[i].Info.Name, aLibrary.Enums[i]);
+    FGlobalOrderedEnums.AddObject(aLibrary.Enums[i].Info.Name, aLibrary.Enums[i]);      
+  end;
+
+  FGlobalOrderedStructs := NewROStrings();
+  FGlobalOrderedStructs.AddStrings(FOrderedStructs.Strings);
+  for I := 0 to aLibrary.StructCount-1 do 
+  begin
+    FGlobalOrderedStructs.AddObject(aLibrary.Structs[i].Info.Name, aLibrary.Structs[i]);
+  end; 
+end;
+
+procedure TRODLTemplateBasedConverter.SetupRequiredUnits;
+var
+  I: Integer;
+begin
+  // by default, add the used files.
+  for I := 0 to FLibrary.UseCount - 1 do
+  begin
+    if Length(RequiredUnits) > 0 then
+      RequiredUnits := RequiredUnits + ',';
+
+    if FLibrary.Use[i].LoadedRodlLibraryName <> '' then
+      RequiredUnits := RequiredUnits + GetUsedFileRequiredUnits(FLibrary.Use[i].LoadedRodlLibraryName)
+    else
+      RequiredUnits := RequiredUnits + GetUsedFileRequiredUnits(ChangeFileExt(ExtractFilename(FLibrary.Use[i].RodlFile), ''));
+  end;
+end;
+
+procedure TRODLTemplateBasedConverter.SetupServices(
+  const aLibrary: TRODLLibrary; const aTargetEntity : string = '');
+var
+  I: Integer;
+  orderedServices: IROStrings;
+  curService: TRODLService;
+begin
+  if not Assigned(FOrderedServices) then
+    FOrderedServices := NewROStrings()
+  else
+    FOrderedServices.Clear;
+    
+  // By default, all the services of the library are of interest to us
+  orderedServices := aLibrary.CalcServiceOrder;
+  for I := 0 to orderedServices.Count - 1 do
+  begin
+    curService := orderedServices.Objects[I] as TRODLService;
+    if not curService.IsFromUsedRodl then
+      FOrderedServices.AddObject(curService.Name, curService);
+  end;
+end;
+
+{ TRODLGeneratorSection }
+
+constructor TRODLGeneratorSection.Create(AParent: TRODLTemplateBasedConverter;
+  const AName: string);
+begin
+  inherited Create;
+  
+  FParent := AParent;
+  FName := AName;
+end;
+
+class procedure TRODLGeneratorSection.DoRODLEntityReplacements(var curLine: string;
+  const aEntity: TRODLEntity; const Prefix: string);
+begin
+  MacroReplace(curLine, '%',
+               [Prefix + '_NAME', aEntity.Name,
+                Prefix + '_UID', GUIDToString(aEntity.UID)
+               ]);
+end;
+
+procedure TRODLGeneratorSection.Process(const sectionText: string;
+  const aLibrary: TRODLLibrary);
+begin
+  Write(sectionText);
+end;
+
+procedure TRODLGeneratorSection.ProcessDocumentation(entity: TRODLEntity;
+  const template: string);
+var
+  curLine: string;
+  content: string;
+begin
+  content := Trim(entity.Documentation);
+  if Length(content) > 0 then
+  begin
+    curLine := template;
+    MacroReplace(curLine, '%',
+                 ['CONTENT', content
+                 ]);
+    Write(curLine);
+  end;
+end;
+
+procedure TRODLGeneratorSection.Write(const line: string);
+begin
+  Parent.Write(line);
+end;
+
+{ TRODLGeneratorSectionList }
+
+function TRODLGeneratorSectionList.Add(AObject: TRODLGeneratorSection): Integer;
+begin
+  Result := inherited Add(AObject); 
+end;
+
+function TRODLGeneratorSectionList.GetItem(Index: Integer): TRODLGeneratorSection;
+begin
+  Result := inherited Items[Index] as TRODLGeneratorSection;
+end;
+
+procedure TRODLGeneratorSectionList.SetItem(Index: Integer;
+  const Value: TRODLGeneratorSection);
+begin
+  inherited Items[Index] := Value;
+end;
+
+{ TTemplatedSection }
+
+procedure TTemplatedSection.Process(const sectionText: string;
+  const aLibrary: TRODLLibrary);
+var
+  sectionTemplate: TLineStream;
+begin
+  sectionTemplate := TLineStream.Create(sectionText);
+  try
+    ProcessTemplate(sectionTemplate, aLibrary);
+  finally
+    sectionTemplate.Free;
+  end;
+end;
+
+{ TServiceSection }
+
+constructor TBaseServiceSubSection.Create(AParent: TRODLTemplateBasedConverter;
+  AParentSection: TBaseServiceSection; const AName: string);
+begin
+  inherited Create(AParent, AName);
+  
+  FParentSection := AParentSection;
+end;
+
+procedure TBaseServiceSubSection.Process(const sectionText: string;
+  const aLibrary: TRODLLibrary; const aService: TRODLBaseService);
+begin
+  inherited Process(sectionText, aLibrary);
+end;
+
+{ TTemplatedServiceSection }
+
+procedure TTemplatedBaseServiceSubSection.Process(const sectionText: string;
+  const aLibrary: TRODLLibrary; const aService: TRODLBaseService);
+var
+  sectionTemplate: TLineStream;
+begin
+  sectionTemplate := TLineStream.Create(sectionText);
+  try
+    ProcessTemplate(sectionTemplate, aLibrary, aService);
+  finally
+    sectionTemplate.Free;
+  end;
+end;
+
+{ TServiceSectionList }
+
+function TBaseServiceSubSectionList.Add(AObject: TBaseServiceSubSection): Integer;
+begin
+  Result := inherited Add(AObject);
+end;
+
+function TBaseServiceSubSectionList.GetItem(Index: Integer): TBaseServiceSubSection;
+begin
+  Result := inherited Items[Index] as TBaseServiceSubSection;
+end;
+
+procedure TBaseServiceSubSectionList.SetItem(Index: Integer;
+  const Value: TBaseServiceSubSection);
+begin
+  inherited Items[Index] := Value;
+end;
+
+{ TProcedureSubSection }
+
+constructor TBaseProcedureSubSection.Create(AParent: TRODLTemplateBasedConverter;
+  AParentSection: TBaseOperationSection; const AName: string);
+begin
+  inherited Create(AParent, AName);
+  
+  FParentSection := AParentSection;
+end;
+
+procedure TBaseProcedureSubSection.Process(const sectionText: string;
+  const aLibrary: TRODLLibrary; const aOperation: TRODLOperation; const aService: TRODLBaseService);
+begin
+  inherited Process(sectionText, aLibrary);
+end;
+
+{ TTemplatedProcedureSubSection }
+
+procedure TTemplatedBaseProcedureSubSection.Process(const sectionText: string;
+  const aLibrary: TRODLLibrary; const aOperation: TRODLOperation; const aService: TRODLBaseService);
+var
+  sectionTemplate: TLineStream;
+begin
+  sectionTemplate := TLineStream.Create(sectionText);
+  try
+    ProcessTemplate(sectionTemplate, aLibrary, aOperation, aService);
+  finally
+    sectionTemplate.Free;
+  end;
+end;
+
+{ TProcedureSubSectionList }
+
+function TBaseProcedureSubSectionList.Add(AObject: TBaseProcedureSubSection): Integer;
+begin
+  Result := inherited Add(AObject);
+end;
+
+function TBaseProcedureSubSectionList.GetItem(Index: Integer): TBaseProcedureSubSection;
+begin
+  Result := inherited Items[Index] as TBaseProcedureSubSection;
+end;
+
+procedure TBaseProcedureSubSectionList.SetItem(Index: Integer;
+  const Value: TBaseProcedureSubSection);
+begin
+  inherited Items[Index] := Value;
+end;
+
+{ TParamSubSection }
+
+constructor TParamSubSection.Create(AParent: TRODLTemplateBasedConverter;
+  AParentSection: TParamsSection; const AName: string);
+begin
+  inherited Create(AParent, AName);
+  
+  FParentSection := AParentSection;
+end;
+
+procedure TParamSubSection.Process(const sectionText: string;
+  const aLibrary: TRODLLibrary; const aParameter: TRODLOperationParam; const IsLastParam: Boolean);
+var
+  curLine: string;
+begin
+  curLine := sectionText;
+
+  ParentSection.DoReplacements(curLine, aParameter, aLibrary);
+  
+  ParentSection.EnsureStripping(curLine, IsLastParam);
+  inherited Process(curLine, aLibrary);
+end;
+
+{ TParamSubSectionList }
+
+function TParamSubSectionList.Add(AObject: TParamSubSection): Integer;
+begin
+  Result := inherited Add(AObject);
+end;
+
+function TParamSubSectionList.GetItem(Index: Integer): TParamSubSection;
+begin
+  Result := inherited Items[Index] as TParamSubSection;
+end;
+
+procedure TParamSubSectionList.SetItem(Index: Integer;
+  const Value: TParamSubSection);
+begin
+  inherited Items[Index] := Value;
+end;
+
+{ TStructSubSection }
+
+constructor TBaseStructSubSection.Create(AParent: TRODLTemplateBasedConverter;
+  AParentSection: TBaseStructSection; const AName: string);
+begin
+  inherited Create(AParent, AName);
+
+  FParentSection := AParentSection;
+end;
+
+procedure TBaseStructSubSection.Process(const sectionText: string;
+  const aLibrary: TRODLLibrary; const aStruct: TRODLBaseStruct);
+begin
+  inherited Process(sectionText, aLibrary);
+end;
+
+{ TTemplatedStructSubSection }
+
+procedure TTemplatedBaseStructSubSection.Process(const sectionText: string;
+  const aLibrary: TRODLLibrary; const aStruct: TRODLBaseStruct);
+var
+  sectionTemplate: TLineStream;
+begin
+  sectionTemplate := TLineStream.Create(sectionText);
+  try
+    ProcessTemplate(sectionTemplate, aLibrary, aStruct);
+  finally
+    sectionTemplate.Free;
+  end;
+end;
+
+{ TStructSubSectionList }
+
+function TBaseStructSubSectionList.Add(AObject: TBaseStructSubSection): Integer;
+begin
+  Result := inherited Add(AObject);
+end;
+
+function TBaseStructSubSectionList.GetItem(Index: Integer): TBaseStructSubSection;
+begin
+  Result := inherited Items[Index] as TBaseStructSubSection;
+end;
+
+procedure TBaseStructSubSectionList.SetItem(Index: Integer;
+  const Value: TBaseStructSubSection);
+begin
+  inherited Items[Index] := Value;
+end;
+
+{ TFieldSubSection }
+
+function TFieldSubSection.CanUse(const aField: TRODLTypedEntity;
+  const aStruct: TRODLBaseStruct): Boolean;
+begin
+  Result := True;
+end;
+
+constructor TFieldSubSection.Create(AParent: TRODLTemplateBasedConverter;
+  AParentSection: TFieldsSection; const AName: string);
+begin
+  inherited Create(AParent, AName);
+
+  FParentSection := AParentSection;
+end;
+
+procedure TFieldSubSection.Process(const sectionText: string;
+  const aLibrary: TRODLLibrary; const aField: TRODLTypedEntity;
+  const aStruct: TRODLBaseStruct; const IsLastField: Boolean);
+var
+  curLine: string;
+begin
+  if CanUse(aField, aStruct) then
+  begin
+    curLine := sectionText;
+
+    ParentSection.DoReplacements(curLine, aField, aStruct, aLibrary);
+
+    ParentSection.EnsureStripping(curLine, IsLastField);
+    inherited Process(curLine, aLibrary);
+  end;
+end;
+
+{ TTemplatedFieldSubSection }
+
+procedure TTemplatedFieldSubSection.Process(const sectionText: string;
+  const aLibrary: TRODLLibrary; const aField: TRODLTypedEntity;
+  const aStruct: TRODLBaseStruct; const IsLastField: Boolean);
+var
+  sectionTemplate: TLineStream;
+begin
+  if CanUse(aField, aStruct) then
+  begin
+    sectionTemplate := TLineStream.Create(sectionText);
+    try
+      ProcessTemplate(sectionTemplate, aLibrary, aField, aStruct, IsLastField);
+    finally
+      sectionTemplate.Free;
+    end;
+  end;
+end;
+
+{ TFieldSubSectionList }
+
+function TFieldSubSectionList.Add(AObject: TFieldSubSection): Integer;
+begin
+  Result := inherited Add(AObject);
+end;
+
+function TFieldSubSectionList.GetItem(Index: Integer): TFieldSubSection;
+begin
+  Result := inherited Items[Index] as TFieldSubSection;
+end;
+
+procedure TFieldSubSectionList.SetItem(Index: Integer;
+  const Value: TFieldSubSection);
+begin
+  inherited Items[Index] := Value;
+end;
+
+{ TArraySubSection }
+
+function TArraySubSection.CanUse(const aArray: TRODLArray; const aLibrary: TRODLLibrary): Boolean;
+begin
+  Result := True;
+end;
+
+constructor TArraySubSection.Create(AParent: TRODLTemplateBasedConverter;
+  AParentSection: TArraysSection; const AName: string);
+begin
+  inherited Create(AParent, AName);
+
+  FParentSection := AParentSection;
+end;
+
+procedure TArraySubSection.Process(const sectionText: string;
+  const aLibrary: TRODLLibrary; const aArray: TRODLArray);
+var
+  curLine: string;
+begin
+  if CanUse(aArray, aLibrary) then
+  begin
+    curLine := sectionText;
+
+    ParentSection.DoReplacements(curLine, aArray, aLibrary);
+
+    inherited Process(curLine, aLibrary);
+  end;
+end;
+
+{ TArraySubSectionList }
+
+function TArraySubSectionList.Add(AObject: TArraySubSection): Integer;
+begin
+  Result := inherited Add(AObject);
+end;
+
+function TArraySubSectionList.GetItem(Index: Integer): TArraySubSection;
+begin
+  Result := inherited Items[Index] as TArraySubSection;
+end;
+
+procedure TArraySubSectionList.SetItem(Index: Integer;
+  const Value: TArraySubSection);
+begin
+  inherited Items[Index] := Value;
+end;
+
+{ TBaseStructSection }
+
+constructor TBaseStructSection.Create(AParent: TRODLTemplateBasedConverter; const AName: string);
+begin
+  inherited Create(AParent, AName);
+
+  FSections := TBaseStructSubSectionList.Create(True);
+
+  FSections.Add(TIfStructHasAncestor.Create(AParent, Self));
+  FSections.Add(TFieldsSection.Create(AParent, Self));
+  FSections.Add(TFieldsNoStripSection.Create(AParent, Self));
+  FSections.Add(TIfHasFieldsSection.Create(AParent, Self));
+  FSections.Add(TAncestorFieldsSection.Create(AParent, Self));
+  FSections.Add(TEntireHierarchyFieldsSection.Create(AParent, Self));
+end;
+
+destructor TBaseStructSection.Destroy;
+begin
+  FSections.Free;
+
+  inherited Destroy;
+end;
+
+function TBaseStructSection.InternalSectionStart(const line: string;
+  var section: TBaseStructSubSection): Boolean;
+var
+  I: Integer;
+begin
+  I := 0;
+  Result := False;
+  while (I < Sections.Count) and not Result do
+  begin
+    if SectionStart(line, Sections[I].Name) then
+    begin
+      Result := True;
+      section := Sections[I];
+    end;
+    Inc(I);
+  end;
+end;
+
+procedure TBaseStructSection.DoReplacements(var curLine: string;
+  const aStruct: TRODLBaseStruct; const aLibrary: TRODLLibrary);
+begin
+  Parent.DoDefaultReplacements(curLine, aLibrary);
+  DoRODLEntityReplacements(curLine, aStruct, GetEntityPrefix);
+
+  MacroReplace(curLine, '%',
+               [GetEntityPrefix + '_ANCESTOR_NAME', GetAncestorName(aStruct)
+               ]);
+
+  // Note: this might be better moved to the "Delphi" classes as Collection
+  // is a Delphi specific, AFAIK
+  MacroReplace(curLine, '%',
+               [GetEntityPrefix + '_COLLECTION_NAME', aStruct.Name + COLLECTION_SUFFIX,
+                GetEntityPrefix + '_ANCESTOR_COLLECTION_NAME', GetAncestorCollectionName(aStruct)
+               ]);
+end;
+
+function TBaseStructSection.GetAncestorCollectionName(
+  const aStruct: TRODLBaseStruct): string;
+begin
+  Result := aStruct.Ancestor;
+  if Length(Result) = 0 then
+    Result := DEFAULT_STRUCT_COLLECTION_ANCESTOR
+  else
+    Result := Result + COLLECTION_SUFFIX;
+end;
+
+procedure TBaseStructSection.ProcessTemplate(sectionTemplate: TLineStream;
+  const aLibrary: TRODLLibrary);
+var
+  I: Integer;
+  curStruct: TRODLBaseStruct;
+  curLine: string;
+  section: TBaseStructSubSection;
+begin
+  for I := 0 to GetStructList.Count - 1 do
+  begin
+    curStruct := GetStructList.Objects[I] as TRODLBaseStruct;
+    if not curStruct.IsFromUsedRodl then
+    begin
+      sectionTemplate.Position := 0;
+      while not sectionTemplate.Eof do
+      begin
+        curLine := sectionTemplate.ReadLine;
+
+        DoReplacements(curLine, curStruct, aLibrary);
+
+        if InternalSectionStart(curLine, section) then
+        begin
+          section.Process(FinishSection(section.Name, sectionTemplate), aLibrary, curStruct);
+        end
+        else
+        if SectionStart(curLine, 'DOCUMENTATION') then
+          ProcessDocumentation(curStruct, FinishSection('DOCUMENTATION', sectionTemplate))
+        else
+          Write(curLine);
+      end;
+    end;
+  end;
+end;
+
+{ TBaseServiceSection }
+
+constructor TBaseServiceSection.Create(AParent: TRODLTemplateBasedConverter; const AName: string);
+begin
+  inherited Create(AParent, AName);
+
+  FSections := TBaseServiceSubSectionList.Create(True);
+  
+  // Adding the sub sections
+  FSections.Add(TIfDataModuleServiceSection.Create(AParent, Self));
+  FSections.Add(TAncestorServicesSection.Create(AParent, Self));
+end;
+
+destructor TBaseServiceSection.Destroy;
+begin
+  FSections.Free;
+  
+  inherited Destroy;
+end;
+
+procedure TBaseServiceSection.DoReplacements(var curLine: string;
+  const aService: TRODLBaseService; const aLibrary: TRODLLibrary);
+begin
+  MacroReplace(curLine, '%',
+               [GetEntityPrefix + '_UID', GUIDToString(aService.Default.Info.UID)
+               ]);
+  Parent.DoDefaultReplacements(curLine, aLibrary);
+  DoRODLEntityReplacements(curLine, aService, GetEntityPrefix);
+
+  MacroReplace(curLine, '%',
+               [GetEntityPrefix + '_ANCESTOR_NAME', GetAncestorName(aService)
+               ]);
+end;
+
+function TBaseServiceSection.GetAncestorName(const aService: TRODLBaseService): string;
+begin
+  Result := aService.Ancestor;
+end;
+
+function TBaseServiceSection.InternalSectionStart(const line: string;
+  var section: TBaseServiceSubSection): Boolean;
+var
+  I: Integer;
+begin
+  I := 0;
+  Result := False;
+  while (I < Sections.Count) and not Result do
+  begin
+    if SectionStart(line, Sections[I].Name) then
+    begin
+      Result := True;
+      section := Sections[I];
+    end;
+    Inc(I);
+  end;
+end;
+
+procedure TBaseServiceSection.ProcessTemplate(sectionTemplate: TLineStream;
+  const aLibrary: TRODLLibrary);
+var
+  I: Integer;
+  curService: TRODLBaseService;
+  curLine: string;
+  section: TBaseServiceSubSection;
+begin
+  for I := 0 to GetServiceList.Count - 1 do
+  begin
+    curService := GetServiceList.Objects[I] as TRODLBaseService;
+    if Assigned(curService.Default) then
+    begin
+      sectionTemplate.Position := 0;
+      while not sectionTemplate.Eof do
+      begin
+        curLine := sectionTemplate.ReadLine;
+
+        DoReplacements(curLine, curService, aLibrary);
+
+        if InternalSectionStart(curLine, section) then
+        begin
+          section.Process(FinishSection(section.Name, sectionTemplate), aLibrary, curService);
+        end
+        else
+        if SectionStart(curLine, 'DOCUMENTATION') then
+        begin
+          ProcessDocumentation(curService, FinishSection('DOCUMENTATION', sectionTemplate))
+        end
+        else
+        begin
+          Write(curLine);
+        end;
+      end;
+    end;
+  end;
+end;
+
+{ TBaseOperationSection }
+
+constructor TBaseOperationSection.Create(AParent: TRODLTemplateBasedConverter; AParentSection: TBaseServiceSection; const AName: string);
+var
+  DataType: TRODataType;
+begin
+  inherited Create(AParent, AParentSection, AName);
+
+  FSections := TBaseProcedureSubSectionList.Create(True);
+
+  // Add subsections
+  FSections.Add(TParamsSection.Create(AParent, Self));
+  FSections.Add(GetParamsNoStripSectionClass.Create(AParent, Self));
+  FSections.Add(TInParamsSection.Create(AParent, Self));
+  FSections.Add(TInParamsNoStripSection.Create(AParent, Self));
+  FSections.Add(TOutParamsSection.Create(AParent, Self));
+  FSections.Add(TOutParamsNoStripSection.Create(AParent, Self));
+  FSections.Add(TIfHasComplexTypeSection.Create(AParent, Self));
+  FSections.Add(TIfOutParamsSection.Create(AParent, Self));
+  FSections.Add(TIfNoOutParamsSection.Create(AParent, Self));
+  FSections.Add(TIfResultComplexSection.Create(AParent, Self));
+  FSections.Add(TIfResultSimpleSection.Create(AParent, Self));
+  FSections.Add(TIfResultOtherTypeSection.Create(Parent, Self));
+  FSections.Add(TIfOperationHasResult.Create(Parent, Self));
+  for DataType := Low(DataTypeNames) to High(DataTypeNames) do
+    FSections.Add(TIfResultXXXTypeSection.Create(Parent, Self, DataTypeNames[DataType]));
+end;
+
+destructor TBaseOperationSection.Destroy;
+begin
+  FSections.Free;
+
+  inherited Destroy;
+end;
+
+procedure TBaseOperationSection.DoReplacements(var curLine: string;
+  const aOperation: TRODLOperation; const aService: TRODLBaseService; const aLibrary: TRODLLibrary);
+begin
+  DoRODLEntityReplacements(curLine, aOperation, 'OPERATION');
+  // Next call will also call Parent.DoDefaultReplacements
+  ParentSection.DoReplacements(curLine, aService, aLibrary);
+end;
+
+function TBaseOperationSection.GetParamsNoStripSectionClass: TParamsNoStripSectionClass;
+begin
+  Result := TParamsNoStripSection;
+end;
+
+function TBaseOperationSection.InternalSectionStart(const line: string;
+  var section: TBaseProcedureSubSection): Boolean;
+var
+  I: Integer;
+begin
+  I := 0;
+  Result := False;
+  while (I < Sections.Count) and not Result do
+  begin
+    if SectionStart(line, Sections[I].Name) then
+    begin
+      Result := True;
+      section := Sections[I];
+    end;
+    Inc(I);
+  end;
+end;
+
+procedure TBaseOperationSection.ProcessTemplate(sectionTemplate: TLineStream;
+  const aLibrary: TRODLLibrary; const aService: TRODLBaseService);
+var
+  curOpIndex: Integer;
+  curOp: TRODLOperation;
+  curLine: string;
+  section: TBaseProcedureSubSection;
+begin
+  for curOpIndex := 0 to aService.Default.Count - 1 do
+  begin
+    curOp := aService.Default.Items[curOpIndex];
+
+    if OperationApplies(curOp) then
+    begin
+      sectionTemplate.Position := 0;
+      while not sectionTemplate.Eof do
+      begin
+        curLine := sectionTemplate.ReadLine;
+
+        DoReplacements(curLine, curOp, aService, aLibrary);
+
+        if InternalSectionStart(curLine, section) then
+          section.Process(FinishSection(section.Name, sectionTemplate), aLibrary, curOp, aService)
+        else
+          Write(curLine);
+      end;
+    end;
+  end;
+end;
+
+{ TRequiredUnitsSection }
+
+constructor TRequiredUnitsSection.Create(AParent: TRODLTemplateBasedConverter);
+begin
+  inherited Create(AParent, 'REQUIRED_UNITS');
+
+  fMultipass := Parent.FileExtension <> '.pas';
+end;
+
+procedure TRequiredUnitsSection.Process(const sectionText: string;
+  const aLibrary: TRODLLibrary);
+var
+  tmpStringList: TStringList;
+  curLine: string;
+  I: Integer;
+  MarkerPos: Integer;
+  curUnits: string;
+const
+  CutoffLength = 80;
+begin
+  if Length(Trim(Parent.RequiredUnits)) = 0 then Exit;
+
+  tmpStringList := TStringList.Create;
+  try
+    tmpStringList.Delimiter := ',';
+    tmpStringList.DelimitedText := Parent.RequiredUnits;
+    if Multipass then begin
+      for I := 0 to tmpStringList.Count - 1 do
+      begin
+        curLine := sectionText;
+        DoReplacements(curLine, Parent.ResolveUnitName(tmpStringList[I]), aLibrary);
+        Write(curLine);
+      end;
+    end
+    else begin
+      MarkerPos := Pos('%REQUIRED_UNIT_NAME%', sectionText);
+      if MarkerPos > 0 then
+      begin
+        while (tmpStringList.Count > 0) do
+        begin
+          curUnits := '';
+          while (tmpStringList.Count > 0) and (Length(curUnits) + MarkerPos < CutoffLength) do
+          begin
+            curUnits := curUnits + tmpStringList[0] + ', ';
+            tmpStringList.Delete(0);
+          end;
+
+          curLine := sectionText;
+          DoReplacements(curLine, StrEnsureNoSuffix(', ', curUnits), aLibrary);
+          Write(curLine);
+        end;
+      end;
+    end;
+  finally
+    tmpStringList.Free;
+  end;
+end;
+
+procedure TRequiredUnitsSection.DoReplacements(var curLine: string; const unitName: string; const aLibrary: TRODLLibrary);
+begin
+  Parent.DoDefaultReplacements(curLine, aLibrary);
+  MacroReplace(curLine, '%',
+               ['REQUIRED_UNIT_NAME', unitName
+               ]);
+end;
+
+{ TUsedRODLsSection }
+
+constructor TUsedRODLsSection.Create(AParent: TRODLTemplateBasedConverter);
+begin
+  inherited Create(AParent, 'USED_RODLS');
+end;
+
+procedure TUsedRODLsSection.Process(const sectionText: string;
+  const aLibrary: TRODLLibrary);
+var
+  i: Integer;
+  unitName: string;
+  curLine: string;
+begin
+  for i := 0 to aLibrary.UseCount-1 do
+  begin
+    if aLibrary.Use[i].LoadedRodlLibraryName <> '' then
+      unitName := aLibrary.Use[i].LoadedRodlLibraryName + '_Intf'
+    else
+      unitName := ChangeFileExt(ExtractFilename(aLibrary.Use[i].RodlFile),'')+'_Intf';
+
+    curLine := sectionText;
+    DoReplacements(curLine, unitName, aLibrary);
+    Write(curLine);
+  end;
+end;
+
+procedure TUsedRODLsSection.DoReplacements(var curLine: string; unitName: string; const aLibrary: TRODLLibrary);
+begin
+  Parent.DoDefaultReplacements(curLine, aLibrary);
+  MacroReplace(curLine, '%',
+               ['USED_RODL_UNIT_NAME', unitName
+               ]);
+end;
+
+{ TServicesSection }
+
+constructor TServicesSection.Create(AParent: TRODLTemplateBasedConverter);
+begin
+  inherited Create(AParent, 'SERVICES');
+
+  FSections.Add(GetAllOperationsSectionClass.Create(AParent, Self));
+  FSections.Add(GetProcedureOperationsSectionClass.Create(AParent, Self));
+  FSections.Add(GetFunctionOperationsSectionClass.Create(AParent, Self));
+end;
+
+procedure TServicesSection.DoReplacements(var curLine: string;
+  const aService: TRODLBaseService; const aLibrary: TRODLLibrary);
+var
+  urn: string;
+begin
+  inherited DoReplacements(curLine, aService, aLibrary);
+
+  MacroReplace(curLine, '%',
+               ['SERVICE_PROXY_ANCESTOR_NAME', GetProxyAncestorName(aService),
+                'SERVICE_INVOKER_ANCESTOR_NAME', GetInvokerAncestorName(aService),
+                'IS_ABSTRACT', BoolToStr(aService.Abstract, True)
+               ]);
+
+  // Write additional SOAP information
+  if IsSOAPService(aService) then
+  begin
+    MacroReplace(curLine, '%',
+                 [GetEntityPrefix + '_LOCATION', aService.Info.Attributes.Values['Location']
+                 ]);
+
+    if (aService.Default.Count>0) then
+    begin
+      urn := aService.Default.Items[0].Info.Attributes.Values['Action'];
+      if (urn='') then
+        urn := aService.Default.Items[0].Info.Attributes.Values['InputNamespace']; // Apache ones...
+
+      if (Pos('#', urn)>0) then
+        Delete(urn, Pos('#', urn), Length(urn));
+      MacroReplace(curLine, '%',
+                   [GetEntityPrefix + '_URN', urn
+                   ]);
+    end;
+  end;
+end;
+
+function TServicesSection.GetAllOperationsSectionClass: TAllOperationsSectionClass;
+begin
+  result := TAllOperationsSection;
+end;
+
+function TServicesSection.GetEntityPrefix: string;
+begin
+  Result := 'SERVICE';
+end;
+
+function TServicesSection.GetFunctionOperationsSectionClass: TFunctionOperationsSectionClass;
+begin
+  Result := TFunctionOperationsSection;
+end;
+
+function TServicesSection.GetInvokerAncestorName(
+  const aService: TRODLBaseService): string;
+begin
+  if Length(aService.Ancestor) = 0 then
+    Result := DEFAULT_SERVICE_INVOKER_ANCESTOR_NAME
+  else
+    Result := aService.Ancestor + SERVICE_INVOKER_SUFFIX;
+end;
+
+function TServicesSection.GetProcedureOperationsSectionClass: TProcedureOperationsSectionClass;
+begin
+  Result := TProcedureOperationsSection;
+end;
+
+function TServicesSection.GetProxyAncestorName(
+  const aService: TRODLBaseService): string;
+begin
+  if Length(aService.Ancestor) = 0 then
+    Result := Parent.GetDefaultServiceProxyAncestorName
+  else
+    Result := aService.Ancestor + GetProxySuffix;
+end;
+
+function TServicesSection.GetProxySuffix: string;
+begin
+  Result := SERVICE_PROXY_SUFFIX;;
+end;
+
+function TServicesSection.GetServiceList: IROStrings;
+begin
+  Result := Parent.FOrderedServices;
+end;
+
+function TServicesSection.IsSOAPService(const aService: TRODLBaseService): Boolean;
+begin
+  Result := aService.Attributes.Values['Type'] = 'SOAP';
+end;
+
+{ TEnumsSection }
+
+constructor TEnumsSection.Create(AParent: TRODLTemplateBasedConverter);
+begin
+  inherited Create(AParent, 'ENUMS');
+end;
+
+procedure TEnumsSection.DoReplacements(var curLine: string; aEnum: TRODLEnum;
+  const aLibrary: TRODLLibrary);
+begin
+  Parent.DoDefaultReplacements(curLine, aLibrary);
+  DoRODLEntityReplacements(curLine, aEnum, 'ENUM');
+end;
+
+class function TEnumsSection.GetEnumValueName(const enum: TRODLEnum;
+  const ValueIndex: Integer): string;
+begin
+  Result := enum[ValueIndex].Name;
+  if enum.PrefixEnumValues then
+    Result := enum.Name + '_' + Result;
+end;
+
+procedure TEnumsSection.ProcessTemplate(sectionTemplate: TLineStream; const aLibrary: TRODLLibrary);
+var
+  I: Integer;
+  curEnum: TRODLEnum;
+  curLine: string;
+begin
+  for I := 0 to Parent.FOrderedEnums.Count - 1 do
+  begin
+    curEnum := Parent.FOrderedEnums.Objects[I] as TRODLEnum;
+    if not curEnum.IsFromUsedRodl then
+    begin
+      sectionTemplate.Position := 0;
+      while not sectionTemplate.Eof do
+      begin
+        curLine := sectionTemplate.ReadLine;
+        DoReplacements(curLine, curEnum, aLibrary);
+
+        if SectionStart(curLine, 'VALUES') then
+          ProcessValues(curEnum, FinishSection('VALUES', sectionTemplate), true)
+        else if SectionStart(curLine, 'VALUES_NO_STRIP') then
+          ProcessValues(curEnum, FinishSection('VALUES_NO_STRIP', sectionTemplate), false)
+        else if SectionStart(curLine, 'DOCUMENTATION') then
+          ProcessDocumentation(curEnum, FinishSection('DOCUMENTATION', sectionTemplate))
+        else
+          Write(curLine);
+      end;
+    end;
+  end;
+end;
+
+procedure TEnumsSection.ProcessValues(enum: TRODLEnum; const template: string; aStripLastSeparator: Boolean=true);
+var
+  I: Integer;
+  curLine: string;
+begin
+  for I := 0 to enum.Count - 1 do
+  begin
+    curLine := template;
+
+    MacroReplace(curLine, '%',
+                ['VALUE_NAME', GetEnumValueName(enum, I)
+                ]);
+
+    if aStripLastSeparator and (I = enum.Count - 1) then begin
+      curLine := StrEnsureNoSuffix(';', TrimRight(curLine));
+      curLine := StrEnsureNoSuffix(',', TrimRight(curLine));
+    end;
+    Write(curLine);
+  end;
+end;
+
+{ TEventSinksSection }
+
+constructor TEventSinksSection.Create(AParent: TRODLTemplateBasedConverter);
+begin
+  inherited Create(AParent, 'EVENT_SINKS');
+
+  FSections.Add(GetOperationsSectionClass.Create(AParent, Self));
+end;
+
+procedure TEventSinksSection.DoReplacements(var curLine: string;
+  const aService: TRODLBaseService; const aLibrary: TRODLLibrary);
+var
+  eventSink: TRODLEventSink;
+begin
+  inherited DoReplacements(curLine, aService, aLibrary);
+
+  eventSink := aService as TRODLEventSink;
+  MacroReplace(curLine, '%',
+               ['EVENT_SINK_WRITER_ANCESTOR_NAME', GetEventSinkWriterAncestorName(eventSink),
+                'EVENT_SINK_INVOKER_ANCESTOR_NAME', GetEventSinkInvokerAncestorName(eventSink)
+               ]);
+end;
+
+function TEventSinksSection.GetEntityPrefix: string;
+begin
+  Result := 'EVENT_SINK';
+end;
+
+function TEventSinksSection.GetEventSinkInvokerAncestorName(
+  const aEventSink: TRODLEventSink): string;
+begin
+  Result := aEventSink.Ancestor;
+  if Length(Result) = 0 then
+    Result := DEFAULT_EVENT_SINK_INVOKER_ANCESTOR_NAME
+  else
+    Result := Result + EVENT_SINK_INVOKER_SUFFIX;
+end;
+
+function TEventSinksSection.GetEventSinkWriterAncestorName(
+  const aEventSink: TRODLEventSink): string;
+begin
+  Result := aEventSink.Ancestor;
+  if Length(Result) = 0 then
+    Result := DEFAULT_EVENT_SINK_WRITER_ANCESTOR_NAME
+  else
+    Result := Result + EVENT_SINK_WRITER_SUFFIX;
+end;
+
+function TEventSinksSection.GetOperationsSectionClass: TOperationsSectionClass;
+begin
+  Result := TOperationsSection;
+end;
+
+function TEventSinksSection.GetServiceList: IROStrings;
+begin
+  Result := Parent.FOrderedEventSinks;
+end;
+
+{ TArraysSection }
+
+constructor TArraysSection.Create(AParent: TRODLTemplateBasedConverter);
+var
+  DataType: TRODataType;
+begin
+  inherited Create(AParent, 'ARRAYS');
+
+  FSections := TArraySubSectionList.Create(True);
+
+  FSections.Add(TIfArrayTypeSimpleSection.Create(AParent, Self));
+  FSections.Add(TIfArrayTypeComplexSection.Create(AParent, Self));
+  FSections.Add(TIfArrayArrayTypeSection.Create(AParent, Self));
+  FSections.Add(TIfArrayEnumTypeSection.Create(AParent, Self));
+  FSections.Add(TIfArrayStructTypeSection.Create(AParent, Self));
+  for DataType := Low(TRODataType) to High(TRODataType) do
+    FSections.Add(TIfArrayXXXTypeSection.Create(AParent, Self, DataTypeNames[DataType]));
+  FSections.Add(TIfArrayXXXTypeSection.Create(AParent, Self, 'Utf8String'));
+
+  for DataType := Low(TRODataType) to High(TRODataType) do
+    FSections.Add(TIfArrayNOTXXXTypeSection.Create(AParent, Self, DataTypeNames[DataType]));
+  FSections.Add(TIfArrayNOTXXXTypeSection.Create(AParent, Self, 'Utf8String'));
+end;
+
+destructor TArraysSection.Destroy;
+begin
+  FSections.Free;
+
+  inherited;
+end;
+
+procedure TArraysSection.DoReplacements(var curLine: string;
+  const aArray: TRODLArray; const aLibrary: TRODLLibrary);
+begin
+  Parent.DoDefaultReplacements(curLine, aLibrary);
+  DoRODLEntityReplacements(curLine, aArray, 'ARRAY');
+  MacroReplace(curLine, '%',
+               ['ARRAY_TYPE', Parent.GetTypeIdentifier(aArray.ElementType),
+                'ARRAY_TYPE_READER_WRITER', CachedDataTypeToObjCReaderWriterFn(aArray.ElementType, aLibrary),  // todo: asbtract?
+                'ARRAY_TYPE_NAME', Parent.GetTypeIdentifier(aArray.ElementType, false)
+               ]);
+end;
+
+function TArraysSection.InternalSectionStart(const line: string;
+  var section: TArraySubSection): Boolean;
+var
+  I: Integer;
+begin
+  I := 0;
+  Result := False;
+  while (I < Sections.Count) and not Result do
+  begin
+    if SectionStart(line, Sections[I].Name) then
+    begin
+      Result := True;
+      section := Sections[I];
+    end;
+    Inc(I);
+  end;
+end;
+
+procedure TArraysSection.ProcessTemplate(sectionTemplate: TLineStream;
+  const aLibrary: TRODLLibrary);
+var
+  I: Integer;
+  curArray: TRODLArray;
+  curLine: string;
+  section: TArraySubSection;
+begin
+  for I := 0 to FParent.FOrderedArrays.Count - 1 do
+  begin
+    curArray := FParent.FOrderedArrays.Objects[I] as TRODLArray;
+    if not curArray.IsFromUsedRodl then
+    begin
+      sectionTemplate.Position := 0;
+      while not sectionTemplate.Eof do
+      begin
+        curLine := sectionTemplate.ReadLine;
+
+        DoReplacements(curLine, curArray, aLibrary);
+
+        if InternalSectionStart(curLine, section) then
+        begin
+          section.Process(FinishSection(section.Name, sectionTemplate), aLibrary, curArray)
+        end
+        else
+        if SectionStart(curLine, 'DOCUMENTATION') then
+        begin
+          ProcessDocumentation(curArray, FinishSection('DOCUMENTATION', sectionTemplate))
+        end
+        else
+        begin
+          Write(curLine);
+        end;
+      end;
+    end;
+  end;
+end;
+
+{ TStructsSection }
+
+constructor TStructsSection.Create(AParent: TRODLTemplateBasedConverter);
+begin
+  inherited Create(AParent, 'STRUCTS');
+
+  FSections.Add(TArraysIsFound.Create(AParent, Self));
+  FSections.Add(TStructGenerateDefaultValues.Create(AParent, Self));
+end;
+
+function TStructsSection.GetAncestorName(
+  const aStruct: TRODLBaseStruct): string;
+begin
+  Result := aStruct.Ancestor;
+  if Length(Result) = 0 then
+    Result := Parent.GetDefaultStructAncestorName;
+end;
+
+function TStructsSection.GetEntityPrefix: string;
+begin
+  Result := 'STRUCT';
+end;
+
+function TStructsSection.GetStructList: IROStrings;
+begin
+  Result := Parent.FOrderedStructs;
+end;
+
+{ TExceptionsSection }
+
+constructor TExceptionsSection.Create(AParent: TRODLTemplateBasedConverter);
+begin
+  inherited Create(AParent, 'EXCEPTIONS');
+//  FSections.Add(TSerializerSection.Create(AParent, Self));
+end;
+
+function TExceptionsSection.GetEntityPrefix: string;
+begin
+  Result := 'EXCEPTION';
+end;
+
+function TExceptionsSection.GetStructList: IROStrings;
+begin
+  Result := Parent.FOrderedExceptions;
+end;
+
+function TExceptionsSection.GetAncestorName(
+  const aStruct: TRODLBaseStruct): string;
+begin
+  Result := aStruct.Ancestor;
+  if Length(Result) = 0 then
+    Result := Parent.GetDefaultExceptionAncestorName;
+end;
+
+{ TOperationsSection }
+
+constructor TOperationsSection.Create(AParent: TRODLTemplateBasedConverter;
+  AParentSection: TBaseServiceSection);
+begin
+  inherited Create(AParent, AParentSection, 'OPERATIONS');
+end;
+
+function TOperationsSection.OperationApplies(
+  aOperation: TRODLOperation): Boolean;
+begin
+  Result := True;
+end;
+
+{ TAllOperationsSection }
+
+constructor TAllOperationsSection.Create(AParent: TRODLTemplateBasedConverter;
+  AParentSection: TBaseServiceSection);
+begin
+  inherited Create(AParent, AParentSection, 'OPERATIONS');
+end;
+
+procedure TAllOperationsSection.DoReplacements(var curLine: string;
+  const aOperation: TRODLOperation; const aService: TRODLBaseService;
+  const aLibrary: TRODLLibrary);
+begin
+  inherited DoReplacements(curLine, aOperation, aService, aLibrary);
+
+  if not Assigned(aOperation.Result) or (aOperation.Result.DataType = '') then begin
+    //ToDo: extract "void" string to be provided by language
+    GetParamsNoStripSectionClass.DoAttributeReplacements(curLine, 'void', 'OPERATION_RESULT');
+    GetParamsNoStripSectionClass.DoAttributeReplacements(curLine, 'void', 'OPERATION_RESULT_TYPE');
+    MacroReplace(curLine, '%',
+                 ['OPERATION_RESULT', 'void', // deprecated
+                  'OPERATION_RESULT_TYPE', 'void',
+                  'OPERATION_RESULT_TYPE_NAME', 'void'
+                 ]);
+  end
+  else begin
+    GetParamsNoStripSectionClass.DoAttributeReplacements(curLine, aOperation.Result.DataType, 'OPERATION_RESULT');
+    GetParamsNoStripSectionClass.DoAttributeReplacements(curLine, aOperation.Result.DataType, 'OPERATION_RESULT_TYPE');
+    MacroReplace(curLine, '%',
+                 ['OPERATION_RESULT', Parent.GetTypeIdentifier(aOperation.Result.DataType), // deprecated!
+                  'OPERATION_RESULT_TYPE', Parent.GetTypeIdentifier(aOperation.Result.DataType),
+                  'OPERATION_RESULT_TYPE_NAME', Parent.GetTypeIdentifier(aOperation.Result.DataType, false),
+                  'OPERATION_RESULT_READER_WRITER', CachedDataTypeToObjCReaderWriterFn(aOperation.Result.DataType, aLibrary),  // todo: asbtract?
+                  'OPERATION_RESULT_NAME', aOperation.Result.Name  
+                 ]);
+  end;
+end;
+
+function TAllOperationsSection.OperationApplies(
+  aOperation: TRODLOperation): Boolean;
+begin
+  Result := true;
+end;
+
+{ TProcedureOperationsSection }
+
+constructor TProcedureOperationsSection.Create(
+  AParent: TRODLTemplateBasedConverter; AParentSection: TBaseServiceSection);
+begin
+  inherited Create(AParent, AParentSection, 'PROCEDURE_OPERATIONS');
+end;
+
+function TProcedureOperationsSection.OperationApplies(
+  aOperation: TRODLOperation): Boolean;
+begin
+  Result := not Assigned(aOperation.Result) or (aOperation.Result.DataType = '');
+end;
+
+{ TFunctionOperationsSection }
+
+constructor TFunctionOperationsSection.Create(AParent: TRODLTemplateBasedConverter; AParentSection: TBaseServiceSection);
+begin
+  inherited Create(AParent, AParentSection, 'FUNCTION_OPERATIONS');
+end;
+
+procedure TFunctionOperationsSection.DoReplacements(var curLine: string;
+  const aOperation: TRODLOperation; const aService: TRODLBaseService; const aLibrary: TRODLLibrary);
+begin
+  inherited DoReplacements(curLine, aOperation, aService, aLibrary);
+
+  GetParamsNoStripSectionClass.DoAttributeReplacements(curLine, aOperation.Result.DataType, 'OPERATION_RESULT');
+
+  MacroReplace(curLine, '%',
+               ['OPERATION_RESULT', Parent.GetTypeIdentifier(aOperation.Result.DataType), // deprecated
+                'OPERATION_RESULT_TYPE', Parent.GetTypeIdentifier(aOperation.Result.DataType),
+                'OPERATION_RESULT_TYPE_NAME', Parent.GetTypeIdentifier(aOperation.Result.DataType, false)
+               ]);
+end;
+
+function TFunctionOperationsSection.OperationApplies(
+  aOperation: TRODLOperation): Boolean;
+begin
+  Result := Assigned(aOperation.Result) and (aOperation.Result.DataType <> '');
+end;
+
+{ TParamsSection }
+
+function TParamsSection.CanStrip: Boolean;
+begin
+  Result := True;
+end;
+
+function TParamsSection.CanUse(const AParam: TRODLOperationParam): Boolean;
+begin
+  Result := True;
+end;
+
+constructor TParamsSection.Create(AParent: TRODLTemplateBasedConverter;
+  const AParentSection: TBaseOperationSection);
+var
+  DataType: TRODataType;
+begin
+  inherited Create(AParent, AParentSection, 'PARAMS');
+
+  FSections := TParamSubSectionList.Create(True);
+
+  FSections.Add(TIfParamTypeComplexSection.Create(Parent, Self));
+  FSections.Add(TIfParamTypeSimpleSection.Create(Parent, Self));
+  FSections.Add(TIfParamOtherTypeSection.Create(Parent, Self));
+  for DataType := Low(DataTypeNames) to High(DataTypeNames) do
+    FSections.Add(TIfParamXXXTypeSection.Create(Parent, Self, DataTypeNames[DataType]));
+end;
+
+destructor TParamsSection.Destroy;
+begin
+  FSections.Free;
+  
+  inherited Destroy;
+end;
+
+procedure TParamsSection.EnsureStripping(var curLine: string; IsLastParam: Boolean);
+begin
+  if IsLastParam and CanStrip then
+  begin
+    curLine := StrEnsureNoSuffix(';', TrimRight(curLine));
+    curLine := StrEnsureNoSuffix(',', TrimRight(curLine));
+  end;
+end;
+
+class function TParamsSection.GetAttributeReplacement(const dataType: string): string;
+begin
+  Result := '';
+  if LowerCase(dataType) = 'datetime' then
+    Result := 'paIsDateTime';
+end;
+
+class procedure TParamsSection.DoAttributeReplacements(var curLine: string;
+  const dataType, prefix: string);
+var
+  replacement: string;
+begin
+  replacement := GetAttributeReplacement(dataType);
+
+  MacroReplace(curLine, '%',
+               [prefix  + '_ATTRIBUTE', replacement
+               ])
+end;
+
+procedure TParamsSection.DoReplacements(var curLine: string;
+  const aParameter: TRODLOperationParam;
+  const aLibrary: TRODLLibrary);
+begin
+  Parent.DoDefaultReplacements(curLine, aLibrary);
+  DoRODLEntityReplacements(curLine, aParameter, 'PARAM');
+  DoAttributeReplacements(curLine, aParameter.DataType, 'PARAM');
+  MacroReplace(curLine, '%',
+               ['PARAM_FRONT_MODIFIER', Parent.GetParamFrontModifier(aParameter.Flag),
+                'PARAM_BACK_MODIFIER', Parent.GetParamBackModifier(aParameter.Flag),
+                'PARAM_TYPE', Parent.GetTypeIdentifier(aParameter.DataType),
+                'PARAM_READER_WRITER', CachedDataTypeToObjCReaderWriterFn(aParameter.DataType, aLibrary),  // todo: asbtract?
+                'PARAM_TYPE_NAME', Parent.GetTypeIdentifier(aParameter.DataType, false)
+               ]);
+end;
+
+function TParamsSection.InternalSectionStart(const line: string;
+  var section: TParamSubSection): Boolean;
+var
+  I: Integer;
+begin
+  I := 0;
+  Result := False;
+  while (I < Sections.Count) and not Result do
+  begin
+    if SectionStart(line, Sections[I].Name) then
+    begin
+      Result := True;
+      section := Sections[I];
+    end;
+    Inc(I);
+  end;
+end;
+
+procedure TParamsSection.ProcessTemplate(sectionTemplate: TLineStream;
+  const aLibrary: TRODLLibrary; const aOperation: TRODLOperation; const aService: TRODLBaseService);
+var
+  I, J: Integer;
+  curLine: string;
+  curParam: TRODLOperationParam;
+  section: TParamSubSection;
+  IsLastParam: Boolean;
+begin
+  for I := 0 to aOperation.Count - 1 do
+  begin
+    curParam := aOperation.Items[I];
+    if CanUse(curParam) then
+    begin
+      sectionTemplate.Position := 0;
+      while not sectionTemplate.Eof do
+      begin
+        curLine := sectionTemplate.ReadLine;
+
+        DoReplacements(curLine, curParam, aLibrary);
+
+        IsLastParam := (I = aOperation.Count-1);
+        // it may happen that no parameters after the current one is usable,
+        // hence making it effectively the last one.
+        if not IsLastParam then
+        begin
+          J := I + 1;
+          while (J < aOperation.Count) and not CanUse(aOperation.Items[J]) do
+            Inc(J);
+
+          IsLastParam := J = aOperation.Count;           
+        end;
+
+        if InternalSectionStart(curLine, section) then
+        begin
+          section.Process(FinishSection(section.Name, sectionTemplate), aLibrary, curParam, IsLastParam);
+        end
+        else
+        begin
+          EnsureStripping(curLine, sectionTemplate.Eof and IsLastParam);
+
+          Write(curLine);
+        end;
+      end;
+    end;
+  end;
+end;
+
+{ TParamsNoStripSection }
+
+function TParamsNoStripSection.CanStrip: Boolean;
+begin
+  Result := False;
+end;
+
+constructor TParamsNoStripSection.Create(AParent: TRODLTemplateBasedConverter;
+  const AParentSection: TBaseOperationSection);
+begin
+  inherited Create(AParent, AParentSection);
+
+  FName := 'PARAMS_NO_STRIP';
+end;
+
+{ TIfParamTypeComplexSection }
+
+constructor TIfParamTypeComplexSection.Create(
+  AParent: TRODLTemplateBasedConverter; const AParentSection: TParamsSection);
+begin
+  inherited Create(AParent, AParentSection, 'IF_PARAM_TYPE_COMPLEX');
+end;
+
+procedure TIfParamTypeComplexSection.Process(const sectionText: string;
+  const aLibrary: TRODLLibrary; const aParameter: TRODLOperationParam; const IsLastParam: Boolean);
+begin
+  if Parent.IsImplementedAsClass(aParameter.DataType, aLibrary) then
+    inherited Process(sectionText, aLibrary, aParameter, IsLastParam);
+end;
+
+{ TIfParamTypeSimpleSection }
+
+constructor TIfParamTypeSimpleSection.Create(
+  AParent: TRODLTemplateBasedConverter; const AParentSection: TParamsSection);
+begin
+  inherited Create(AParent, AParentSection, 'IF_PARAM_TYPE_SIMPLE');
+end;
+
+procedure TIfParamTypeSimpleSection.Process(const sectionText: string;
+  const aLibrary: TRODLLibrary; const aParameter: TRODLOperationParam; const IsLastParam: Boolean);
+begin
+  if not Parent.IsImplementedAsClass(aParameter.DataType, aLibrary) then
+    inherited Process(sectionText, aLibrary, aParameter, IsLastParam);
+end;
+
+{ TIfStructHasAncestor }
+
+constructor TIfStructHasAncestor.Create(AParent: TRODLTemplateBasedConverter;
+  AParentSection: TBaseStructSection);
+begin
+  inherited Create(AParent, AParentSection, 'IF_STRUCT_HAS_ANCESTOR');
+end;
+
+procedure TIfStructHasAncestor.Process(const sectionText: string;
+  const aLibrary: TRODLLibrary; const aStruct: TRODLBaseStruct);
+begin
+  if aStruct.Ancestor <> '' then
+    inherited Process(sectionText, aLibrary, aStruct);
+end;
+
+{ TFieldsSection }
+
+function TFieldsSection.CanStrip: Boolean;
+begin
+  Result := True;
+end;
+
+constructor TFieldsSection.Create(AParent: TRODLTemplateBasedConverter;
+  AParentSection: TBaseStructSection);
+var
+  DataType: TRODataType;
+begin
+  inherited Create(AParent, AParentSection, 'FIELDS');
+
+  FSections := TFieldSubSectionList.Create(True);
+  
+  FSections.Add(TIfFieldTypeComplexSection.Create(AParent, Self));
+  FSections.Add(TIfFieldTypeSimpleSection.Create(AParent, Self));
+  FSections.Add(TIfStringFieldSection.Create(AParent, Self));
+  FSections.Add(TIfCurrencyFieldSection.Create(AParent, Self));
+  FSections.Add(TIfDecimalFieldSection.Create(AParent, Self));
+  FSections.Add(TIfVariantFieldSection.Create(AParent, Self));
+  FSections.Add(TIfFieldArrayTypeSection.Create(AParent, Self));
+  FSections.Add(TIfFieldEnumTypeSection.Create(AParent, Self));
+  FSections.Add(TIfFieldStructTypeSection.Create(AParent, Self));
+  FSections.Add(TIfFieldHasDefaultValue.Create(AParent, Self));
+  for DataType := Low(DataType) to High(DataType) do
+    FSections.Add(TIfFieldXXXTypeSection.Create(AParent, Self, DataTypeNames[DataType]));
+  FSections.Add(TIfFieldXXXTypeSection.Create(AParent, Self, 'Utf8String'));
+end;
+
+destructor TFieldsSection.Destroy;
+begin
+  FSections.Free;
+  
+  inherited Destroy;
+end;
+
+procedure TFieldsSection.ProcessField(sectionTemplate: TLineStream; const aLibrary: TRODLLibrary; AField: TRODLTypedEntity; const aStruct: TRODLBaseStruct; IsLastField: Boolean);
+var
+  section: TFieldSubSection;
+  curLine: string;
+begin
+  sectionTemplate.Position := 0;
+  while not sectionTemplate.Eof do
+  begin
+    curLine := sectionTemplate.ReadLine;
+    DoReplacements(curLine, AField, aStruct, aLibrary);
+    if InternalSectionStart(curLine, section) then
+    begin
+      section.Process(FinishSection(section.Name, sectionTemplate), aLibrary, AField, aStruct, IsLastField);
+    end
+    else
+    begin
+      EnsureStripping(curLine, sectionTemplate.Eof and IsLastField);
+      Write(curLine);
+    end;
+  end;
+end;
+
+procedure TFieldsSection.DoReplacements(var curLine: string;
+  curField: TRODLTypedEntity; const aStruct: TRODLBaseStruct; const aLibrary: TRODLLibrary);
+begin
+  DoRODLEntityReplacements(curLine, curField, 'FIELD');
+  MacroReplace(curLine, '%', ['FIELD_TYPE', Parent.GetTypeIdentifier(curField.DataType),
+                              'FIELD_TYPE_NAME', Parent.GetTypeIdentifier(curField.DataType, false),
+                              'FIELD_READER_WRITER', CachedDataTypeToObjCReaderWriterFn(curField.DataType, aLibrary)  // todo: asbtract?
+]);
+  MacroReplace(curLine, '%', ['DEFAULT_VALUE',curField.Attributes.Values['Default']]);
+
+  ParentSection.DoReplacements(curLine, aStruct, aLibrary);
+end;
+
+procedure TFieldsSection.EnsureStripping(var curLine: string;
+  IsLastField: Boolean);
+begin
+  if IsLastField and CanStrip then
+  begin
+    curLine := StrEnsureNoSuffix(';', TrimRight(curLine));
+    curLine := StrEnsureNoSuffix(',', TrimRight(curLine));
+  end;
+end;
+
+function TFieldsSection.InternalSectionStart(const line: string;
+  var section: TFieldSubSection): Boolean;
+var
+  I: Integer;
+begin
+  I := 0;
+  Result := False;
+  while (I < Sections.Count) and not Result do
+  begin
+    if SectionStart(line, Sections[I].Name) then
+    begin
+      Result := True;
+      section := Sections[I];
+    end;
+    Inc(I);
+  end;
+end;
+
+procedure TFieldsSection.ProcessTemplate(sectionTemplate: TLineStream;
+  const aLibrary: TRODLLibrary; const aStruct: TRODLBaseStruct);
+var
+  I: Integer;
+begin
+  for I := 0 to aStruct.Count - 1 do
+  begin
+    ProcessField(sectionTemplate, aLibrary, aStruct.Items[I], aStruct, I = aStruct.Count - 1);
+  end;
+end;
+
+{ TFieldsNoStripSection }
+
+function TFieldsNoStripSection.CanStrip: Boolean;
+begin
+  Result := False;
+end;
+
+constructor TFieldsNoStripSection.Create(AParent: TRODLTemplateBasedConverter;
+  AParentSection: TBaseStructSection);
+begin
+  inherited Create(AParent, AParentSection);
+  
+  FName := 'FIELDS_NO_STRIP';
+end;
+
+{ TAncestorFieldsSection }
+
+function TAncestorFieldsSection.CanStrip: Boolean;
+begin
+  Result := False;
+end;
+
+constructor TAncestorFieldsSection.Create(AParent: TRODLTemplateBasedConverter;
+  AParentSection: TBaseStructSection);
+begin
+  inherited Create(AParent, AParentSection);
+
+  FName := 'ANCESTOR_FIELDS';
+end;
+
+procedure TAncestorFieldsSection.ProcessTemplate(sectionTemplate: TLineStream;
+  const aLibrary: TRODLLibrary; const aStruct: TRODLBaseStruct);
+var
+  I: Integer;
+  ancestorStruct: TRODLBaseStruct;
+begin
+  ancestorStruct := aLibrary.FindBaseStruct(aStruct.Ancestor);
+  if Assigned(ancestorStruct) then
+  begin
+    for I := 0 to ancestorStruct.Count - 1 do
+    begin
+      ProcessField(sectionTemplate, aLibrary, ancestorStruct.Items[I], ancestorStruct, I = ancestorStruct.Count - 1);
+    end;
+  end;
+end;
+
+{ TEntireHierarchyFieldsSection }
+
+function TEntireHierarchyFieldsSection.CanStrip: Boolean;
+begin
+  Result := False;
+end;
+
+constructor TEntireHierarchyFieldsSection.Create(
+  AParent: TRODLTemplateBasedConverter; AParentSection: TBaseStructSection);
+begin
+  inherited Create(AParent, AParentSection);
+
+  FName := 'ENTIRE_HIERARCHY_FIELDS';
+end;
+
+procedure TEntireHierarchyFieldsSection.ProcessTemplate(
+  sectionTemplate: TLineStream; const aLibrary: TRODLLibrary;
+  const aStruct: TRODLBaseStruct);
+var
+  I: Integer;
+  List: IROStrings;
+begin
+  List := aStruct.CalcItemsMarshalingOrder(True);
+
+  // remove duplicates
+  I := 0;
+  while I < List.Count - 1 do
+  begin
+    if List[I] = List[I + 1] then
+      List.Delete(I)
+    else
+      Inc(I);
+  end;
+    
+  // process
+  for I := 0 to List.Count - 1 do
+    ProcessField(sectionTemplate, aLibrary, TRODLTypedEntity(List.objects[i]), aStruct, I = List.Count - 1);
+  List:=nil;
+end;
+
+{ TIfFieldXXXTypeSection }
+
+function TIfFieldXXXTypeSection.CanUse(const aField: TRODLTypedEntity;
+  const aStruct: TRODLBaseStruct): Boolean;
+begin
+  Result := SameText(aField.DataType, FDataType);
+end;
+
+constructor TIfFieldXXXTypeSection.Create(AParent: TRODLTemplateBasedConverter;
+  const AParentSection: TFieldsSection; const DataType: string);
+begin
+  FDataType := DataType;
+  inherited Create(AParent, AParentSection, 'IF_FIELD_' + UpperCase(FDataType) + '_TYPE');
+end;
+
+{ TIfFieldArrayTypeSection }
+
+function TIfFieldArrayTypeSection.CanUse(const aField: TRODLTypedEntity;
+  const aStruct: TRODLBaseStruct): Boolean;
+begin
+  Result := Parent.GlobalOrderedArrays.Find(aField.DataType) >= 0;
+end;
+
+constructor TIfFieldArrayTypeSection.Create(
+  AParent: TRODLTemplateBasedConverter; const AParentSection: TFieldsSection);
+begin
+  inherited Create(AParent, AParentSection, 'IF_FIELD_ARRAY_TYPE');
+end;
+
+{ TIfFieldEnumTypeSection }
+
+function TIfFieldEnumTypeSection.CanUse(const aField: TRODLTypedEntity;
+  const aStruct: TRODLBaseStruct): Boolean;
+begin
+  Result := Parent.GlobalOrderedEnums.Find(aField.DataType) >= 0;
+end;
+
+constructor TIfFieldEnumTypeSection.Create(AParent: TRODLTemplateBasedConverter;
+  const AParentSection: TFieldsSection);
+begin
+  inherited Create(AParent, AParentSection, 'IF_FIELD_ENUM_TYPE');
+end;
+
+{ TIfFieldStructTypeSection }
+
+function TIfFieldStructTypeSection.CanUse(const aField: TRODLTypedEntity;
+  const aStruct: TRODLBaseStruct): Boolean;
+begin
+  Result := Parent.GlobalOrderedStructs.Find(aField.DataType) >= 0;
+end;
+
+constructor TIfFieldStructTypeSection.Create(
+  AParent: TRODLTemplateBasedConverter; const AParentSection: TFieldsSection);
+begin
+  inherited Create(AParent, AParentSection, 'IF_FIELD_STRUCT_TYPE');
+end;
+
+{ TIfFieldTypeComplexSection }
+
+constructor TIfFieldTypeComplexSection.Create(
+  AParent: TRODLTemplateBasedConverter; const AParentSection: TFieldsSection);
+begin
+  inherited Create(AParent, AParentSection, 'IF_FIELD_TYPE_COMPLEX');
+
+  FSections := TFieldSubSectionList.Create(True);
+  FSections.Add(TIfAutoCreateFieldsSection.Create(Parent, ParentSection)); 
+  FSections.Add(TIfNotAutoCreateFieldsSection.Create(Parent, ParentSection));
+end;
+
+destructor TIfFieldTypeComplexSection.Destroy;
+begin
+  FSections.Free;
+
+  inherited Destroy;
+end;
+
+function TIfFieldTypeComplexSection.InternalSectionStart(const line: string;
+  var section: TFieldSubSection): Boolean;
+var
+  I: Integer;
+begin
+  I := 0;
+  Result := False;
+  while (I < Sections.Count) and not Result do
+  begin
+    if SectionStart(line, Sections[I].Name) then
+    begin
+      Result := True;
+      section := Sections[I];
+    end;
+    Inc(I);
+  end;
+end;
+
+procedure TIfFieldTypeComplexSection.ProcessTemplate(
+  sectionTemplate: TLineStream; const aLibrary: TRODLLibrary;
+  const aField: TRODLTypedEntity; const aStruct: TRODLBaseStruct;
+  const IsLastField: Boolean);
+var
+  curLine: string;
+  section: TFieldSubSection;
+begin
+  if Parent.IsImplementedAsClass(aField.DataType, aLibrary) then
+  begin
+    sectionTemplate.Position := 0;
+    while not sectionTemplate.Eof do
+    begin
+      curLine := sectionTemplate.ReadLine;
+
+      ParentSection.DoReplacements(curLine, aField, aStruct, aLibrary);
+      ParentSection.EnsureStripping(curLine, IsLastField);
+
+      if InternalSectionStart(curLine, section) then
+      begin
+        section.Process(FinishSection(section.Name, sectionTemplate), aLibrary, aField, aStruct, IsLastField);
+      end
+      else
+      begin
+        Write(curLine);
+      end;
+    end;
+  end;
+end;
+
+{ TIfAutoCreateFieldsSection }
+
+function TIfAutoCreateFieldsSection.CanUse(const aField: TRODLTypedEntity;
+  const aStruct: TRODLBaseStruct): Boolean;
+begin
+  Result := aStruct.AutoCreateParams;
+end;
+
+constructor TIfAutoCreateFieldsSection.Create(
+  AParent: TRODLTemplateBasedConverter; AParentSection: TFieldsSection);
+begin
+  inherited Create(AParent, AParentSection, 'IF_AUTO_CREATE_FIELDS');
+end;
+
+{ TIfNotAutoCreateFieldsSection }
+
+function TIfNotAutoCreateFieldsSection.CanUse(const aField: TRODLTypedEntity;
+  const aStruct: TRODLBaseStruct): Boolean;
+begin
+  Result := not aStruct.AutoCreateParams;
+end;
+
+constructor TIfNotAutoCreateFieldsSection.Create(
+  AParent: TRODLTemplateBasedConverter; AParentSection: TFieldsSection);
+begin
+  inherited Create(AParent, AParentSection, 'IF_NOT_AUTO_CREATE_FIELDS');
+end;
+
+{ TIfFieldTypeSimpleSection }
+
+function TIfFieldTypeSimpleSection.CanUse(const aField: TRODLTypedEntity;
+  const aStruct: TRODLBaseStruct): Boolean;
+begin
+  Result := not Parent.IsImplementedAsClass(aField.DataType, Parent.FLibrary);
+end;
+
+constructor TIfFieldTypeSimpleSection.Create(
+  AParent: TRODLTemplateBasedConverter; const AParentSection: TFieldsSection);
+begin
+  inherited Create(AParent, AParentSection, 'IF_FIELD_TYPE_SIMPLE');
+end;
+
+{ TIfStringFieldSection }
+
+constructor TIfStringFieldSection.Create(AParent: TRODLTemplateBasedConverter;
+  const AParentSection: TFieldsSection);
+begin
+  inherited Create(AParent, AParentSection, DataTypeNames[rtString]);
+  FName := 'IF_STRING_FIELD';
+end;
+
+{ TIfCurrencyFieldSection }
+
+constructor TIfCurrencyFieldSection.Create(AParent: TRODLTemplateBasedConverter;
+  const AParentSection: TFieldsSection);
+begin
+  inherited Create(AParent, AParentSection, DataTypeNames[rtCurrency]);
+  FName := 'IF_CURRENCY_FIELD';
+end;
+
+{ TIfDecimalFieldSection }
+
+constructor TIfDecimalFieldSection.Create(AParent: TRODLTemplateBasedConverter;
+  const AParentSection: TFieldsSection);
+begin
+  inherited Create(AParent, AParentSection, DataTypeNames[rtDecimal]);
+  FName := 'IF_DECIMAL_FIELD';
+end;
+
+{ TIfVariantFieldSection }
+
+constructor TIfVariantFieldSection.Create(AParent: TRODLTemplateBasedConverter;
+  const AParentSection: TFieldsSection);
+begin
+  inherited Create(AParent, AParentSection, DataTypeNames[rtVariant]);
+  FName := 'IF_VARIANT_FIELD';
+end;
+
+{ TIfHasFieldsSection }
+
+constructor TIfHasFieldsSection.Create(AParent: TRODLTemplateBasedConverter;
+  AParentSection: TBaseStructSection);
+begin
+  inherited Create(AParent, AParentSection, 'IF_HAS_FIELDS');
+
+  FSections := TBaseStructSubSectionList.Create(True);
+
+  FSections.Add(TIfStructHasAncestor.Create(AParent, AParentSection));
+  FSections.Add(TFieldsSection.Create(AParent, AParentSection));
+  FSections.Add(TFieldsNoStripSection.Create(AParent, AParentSection));
+  FSections.Add(TAncestorFieldsSection.Create(AParent, AParentSection));
+  FSections.Add(TEntireHierarchyFieldsSection.Create(AParent, AParentSection));
+end;
+
+destructor TIfHasFieldsSection.Destroy;
+begin
+  FSections.Free;
+
+  inherited Destroy;
+end;
+
+procedure TIfHasFieldsSection.DoReplacements(var curLine: string;
+  const aStruct: TRODLBaseStruct; const aLibrary: TRODLLibrary);
+begin
+  ParentSection.DoReplacements(curLine, aStruct, aLibrary);
+end;
+
+function TIfHasFieldsSection.InternalSectionStart(const line: string;
+  var section: TBaseStructSubSection): Boolean;
+var
+  I: Integer;
+begin
+  I := 0;
+  Result := False;
+  while (I < FSections.Count) and not Result do
+  begin
+    if SectionStart(line, FSections[I].Name) then
+    begin
+      Result := True;
+      section := FSections[I];
+    end;
+    Inc(I);
+  end;
+end;
+
+procedure TIfHasFieldsSection.ProcessTemplate(sectionTemplate: TLineStream;
+  const aLibrary: TRODLLibrary; const aStruct: TRODLBaseStruct);
+var
+  curLine: string;
+  section: TBaseStructSubSection;
+begin
+  if aStruct.Count > 0 then
+  begin
+    sectionTemplate.Position := 0;
+
+    while not sectionTemplate.Eof do
+    begin
+      curLine := sectionTemplate.ReadLine;
+
+      DoReplacements(curLine, aStruct, aLibrary);
+
+      if InternalSectionStart(curLine, section) then
+        section.Process(FinishSection(section.Name, sectionTemplate), aLibrary, aStruct)
+      else
+        Write(curLine);
+    end;
+  end;
+end;
+
+{ TIfDataModuleSection }
+
+constructor TIfDataModuleSection.Create(AParent: TRODLTemplateBasedConverter);
+begin
+  inherited Create(AParent, 'IF_DATA_MODULE');
+end;
+
+procedure TIfDataModuleSection.Process(const sectionText: string;
+  const aLibrary: TRODLLibrary);
+begin
+  if Parent.WriteDataModule then
+    inherited Process(sectionText, aLibrary);
+end;
+
+{ TIfDataModuleServiceSection }
+
+constructor TIfDataModuleServiceSection.Create(
+  AParent: TRODLTemplateBasedConverter; AParentSection: TBaseServiceSection);
+begin
+  inherited Create(AParent, AParentSection, 'IF_DATA_MODULE');
+end;
+
+procedure TIfDataModuleServiceSection.Process(const sectionText: string;
+  const aLibrary: TRODLLibrary; const aService: TRODLBaseService);
+begin
+  if Parent.WriteDataModule then
+    ParentSection.Process(sectionText, aLibrary);
+end;
+
+{ TIfHydraSection }
+
+constructor TIfHydraSection.Create(AParent: TRODLTemplateBasedConverter);
+begin
+  inherited Create(AParent, 'IF_HYDRA');
+
+  FIsHydraModule := IsHydraModule; // put value in cache
+end;
+
+procedure TIfHydraSection.Process(const sectionText: string;
+  const aLibrary: TRODLLibrary);
+begin
+  if FIsHydraModule then
+    inherited Process(sectionText, aLibrary);
+end;
+
+{ TIfWSDLSection }
+
+constructor TIfWSDLSection.Create(AParent: TRODLTemplateBasedConverter);
+begin
+  inherited Create(APArent, 'IF_WSDL');
+end;
+
+procedure TIfWSDLSection.Process(const sectionText: string;
+  const aLibrary: TRODLLibrary);
+var
+  curLine: string;
+begin
+  if aLibrary.Info.Attributes.Values['Wsdl'] <> '' then
+  begin
+    curLine := sectionText;
+    MacroReplace(curLine, '%',
+                 ['WSDL_LOCATION', aLibrary.Info.Attributes.Values['Wsdl']
+                 ]);
+  end;
+  Write(curLine);
+end;
+
+{ TAncestorServicesSection }
+
+constructor TAncestorServicesSection.Create(
+  AParent: TRODLTemplateBasedConverter; AParentSection: TBaseServiceSection);
+begin
+  inherited Create(AParent, AParentSection, 'ANCESTOR_SERVICES');
+end;
+
+procedure TAncestorServicesSection.Process(const sectionText: string;
+  const aLibrary: TRODLLibrary; const aService: TRODLBaseService);
+var
+  ancestors: TStringList;
+  curService: TRODLBaseService;
+  I: Integer;
+  curLine: string;
+begin
+  ancestors := TStringList.Create;
+  try
+    // build the ancestor's list
+    curService := aService;
+    while Assigned(curService) and (Length(curService.Ancestor) > 0) do
+    begin
+      ancestors.Add(curService.Ancestor);
+      curService := aLibrary.FindService(curService.Ancestor);
+    end;
+
+    // process it
+    for I := 0 to ancestors.Count - 1 do
+    begin
+      curLine := sectionText;
+
+      MacroReplace(curLine, '%',
+                   ['ANCESTOR_SERVICE_NAME', ancestors[I]
+                   ]);
+
+      inherited Process(curLine, aLibrary, aService);
+    end;
+  finally
+    ancestors.Free;
+  end;
+end;
+
+{ TIfHasComplexTypeSection }
+
+constructor TIfHasComplexTypeSection.Create(
+  AParent: TRODLTemplateBasedConverter;
+  AParentSection: TBaseOperationSection);
+begin
+  inherited Create(AParent, AParentSection, 'IF_HAS_COMPLEX_TYPE');
+
+  FSections := TBaseProcedureSubSectionList.Create(True);
+
+  FSections.Add(TIfResultComplexSection.Create(AParent, AParentSection));
+  FSections.Add(TIfResultSimpleSection.Create(AParent, AParentSection));
+  FSections.Add(TParamsNoStripSection.Create(AParent, AParentSection));
+  FSections.Add(TOutParamsNoStripSection.Create(AParent, AParentSection));
+end;
+
+destructor TIfHasComplexTypeSection.Destroy;
+begin
+  FSections.Free;
+
+  inherited Destroy;
+end;
+
+function TIfHasComplexTypeSection.InternalSectionStart(const line: string;
+  var section: TBaseProcedureSubSection): Boolean;
+var
+  I: Integer;
+begin
+  I := 0;
+  Result := False;
+  while (I < Sections.Count) and not Result do
+  begin
+    if SectionStart(line, Sections[I].Name) then
+    begin
+      Result := True;
+      section := Sections[I];
+    end;
+    Inc(I);
+  end;
+end;
+
+function TIfHasComplexTypeSection.OperationHasComplexType(
+  const aOperation: TRODLOperation; const aLibrary: TRODLLibrary): Boolean;
+var
+  I: Integer;
+begin
+  Result := (Assigned(aOperation.Result) and Parent.IsImplementedAsClass(aOperation.Result.DataType, aLibrary));
+  I := 0;
+  while not Result and (I < aOperation.Count) do
+  begin
+    Result := Parent.IsImplementedAsClass(aOperation.Items[I].DataType, aLibrary);
+    Inc(I);
+  end;
+end;
+
+procedure TIfHasComplexTypeSection.ProcessTemplate(sectionTemplate: TLineStream;
+  const aLibrary: TRODLLibrary; const aOperation: TRODLOperation; const aService: TRODLBaseService);
+var
+  curLine: string;
+  section: TBaseProcedureSubSection;
+begin
+  if OperationHasComplexType(aOperation, aLibrary) then
+  begin
+    sectionTemplate.Position := 0;
+
+    while not sectionTemplate.Eof do
+    begin
+      curLine := sectionTemplate.ReadLine;
+
+      if InternalSectionStart(curLine, section) then
+        section.Process(FinishSection(section.Name, sectionTemplate), aLibrary, aOperation, aService)
+      else
+        Write(curLine);
+    end;
+  end;
+end;
+
+{ TIfArrayTypeSimple }
+
+function TIfArrayTypeSimpleSection.CanUse(const aArray: TRODLArray; const aLibrary: TRODLLibrary): Boolean;
+begin
+  Result := not Parent.IsImplementedAsClass(aArray.ElementType, aLibrary);
+end;
+
+constructor TIfArrayTypeSimpleSection.Create(AParent: TRODLTemplateBasedConverter;
+  AParentSection: TArraysSection);
+begin
+  inherited Create(AParent, AParentSection, 'IF_ARRAY_TYPE_SIMPLE');
+end;
+
+{ TIfArrayTypeComplex }
+
+function TIfArrayTypeComplexSection.CanUse(const aArray: TRODLArray;
+  const aLibrary: TRODLLibrary): Boolean;
+begin
+  Result := Parent.IsImplementedAsClass(aArray.ElementType, aLibrary);
+end;
+
+constructor TIfArrayTypeComplexSection.Create(AParent: TRODLTemplateBasedConverter;
+  AParentSection: TArraysSection);
+begin
+  inherited Create(AParent, AParentSection, 'IF_ARRAY_TYPE_COMPLEX');
+end;
+
+{ TIfArrayXXXTypeSection }
+
+function TIfArrayXXXTypeSection.CanUse(const aArray: TRODLArray;
+  const aLibrary: TRODLLibrary): Boolean;
+begin
+  Result := SameText(aArray.ElementType, FDataType);
+end;
+
+constructor TIfArrayXXXTypeSection.Create(AParent: TRODLTemplateBasedConverter;
+  const AParentSection: TArraysSection; const DataType: string);
+begin
+  FDataType := DataType;
+  inherited Create(AParent, AParentSection, 'IF_ARRAY_' + UpperCase(DataType) + '_TYPE');
+end;
+
+{ TIfArrayArrayTypeSection }
+
+function TIfArrayArrayTypeSection.CanUse(const aArray: TRODLArray;
+  const aLibrary: TRODLLibrary): Boolean;
+begin
+  Result := Parent.GlobalOrderedArrays.Find(aArray.ElementType) >= 0;
+end;
+
+constructor TIfArrayArrayTypeSection.Create(
+  AParent: TRODLTemplateBasedConverter; const AParentSection: TArraysSection);
+begin
+  inherited Create(AParent, AParentSection, 'IF_ARRAY_ARRAY_TYPE');
+end;
+
+{ TIfArrayEnumTypeSection }
+
+function TIfArrayEnumTypeSection.CanUse(const aArray: TRODLArray;
+  const aLibrary: TRODLLibrary): Boolean;
+begin
+  Result := Parent.GlobalOrderedEnums.Find(aArray.ElementType) >= 0;
+end;
+
+constructor TIfArrayEnumTypeSection.Create(AParent: TRODLTemplateBasedConverter;
+  const AParentSection: TArraysSection);
+begin
+  inherited Create(AParent, AParentSection, 'IF_ARRAY_ENUM_TYPE');
+end;
+
+{ TIfArrayStructTypeSection }
+
+function TIfArrayStructTypeSection.CanUse(const aArray: TRODLArray;
+  const aLibrary: TRODLLibrary): Boolean;
+begin
+  Result := Parent.GlobalOrderedStructs.Find(aArray.ElementType) >= 0;
+end;
+
+constructor TIfArrayStructTypeSection.Create(
+  AParent: TRODLTemplateBasedConverter; const AParentSection: TArraysSection);
+begin
+  inherited Create(AParent, AParentSection, 'IF_ARRAY_STRUCT_TYPE');
+end;
+
+{ TInParamsSection }
+
+function TInParamsSection.CanUse(const AParam: TRODLOperationParam): Boolean;
+begin
+  Result := AParam.Flag in IN_FLAGS;
+end;
+
+constructor TInParamsSection.Create(AParent: TRODLTemplateBasedConverter;
+  const AParentSection: TBaseOperationSection);
+begin
+  inherited Create(AParent, AParentSection);
+
+  FName := 'IN_PARAMS';
+end;
+
+{ TInParamsNoStripSection }
+
+function TInParamsNoStripSection.CanStrip: Boolean;
+begin
+  Result := False;
+end;
+
+constructor TInParamsNoStripSection.Create(AParent: TRODLTemplateBasedConverter;
+  const AParentSection: TBaseOperationSection);
+begin
+  inherited Create(AParent, AParentSection);
+
+  FName := 'IN_PARAMS_NO_STRIP';
+end;
+
+{ TOutParamsSection }
+
+function TOutParamsSection.CanUse(const AParam: TRODLOperationParam): Boolean;
+begin
+  Result := AParam.Flag in OUT_FLAGS;
+end;
+
+constructor TOutParamsSection.Create(AParent: TRODLTemplateBasedConverter;
+  const AParentSection: TBaseOperationSection);
+begin
+  inherited Create(AParent, AParentSection);
+
+  FName := 'OUT_PARAMS';
+end;
+
+{ TOutParamsNoStripSection }
+
+function TOutParamsNoStripSection.CanStrip: Boolean;
+begin
+  Result := False;
+end;
+
+constructor TOutParamsNoStripSection.Create(AParent: TRODLTemplateBasedConverter;
+  const AParentSection: TBaseOperationSection);
+begin
+  inherited Create(AParent, AParentSection);
+
+  FName := 'OUT_PARAMS_NO_STRIP';
+end;
+
+{ TIfOutParamsSection }
+
+function TIfOutParamsSection.CanUse(const aOperation: TRODLOperation): Boolean;
+var
+  I: Integer;
+begin
+  Result := False;
+  I := 0;
+  while not Result and (I < aOperation.Count) do
+  begin
+    if aOperation.Items[I].Flag in OUT_FLAGS then
+      Result := True;
+    Inc(I);
+  end;
+end;
+
+constructor TIfOutParamsSection.Create(AParent: TRODLTemplateBasedConverter;
+  AParentSection: TBaseOperationSection);
+begin
+  inherited Create(AParent, AParentSection, 'IF_OUT_PARAMS');
+
+  FSections := TBaseProcedureSubSectionList.Create(True);
+  
+  FSections.Add(TOutParamsSection.Create(AParent, AParentSection));
+  FSections.Add(TOutParamsNoStripSection.Create(AParent, AParentSection));
+end;
+
+destructor TIfOutParamsSection.Destroy;
+begin
+  FSections.Free;
+
+  inherited Destroy;
+end;
+
+function TIfOutParamsSection.InternalSectionStart(const line: string;
+  var section: TBaseProcedureSubSection): Boolean;
+var
+  I: Integer;
+begin
+  I := 0;
+  Result := False;
+  while (I < Sections.Count) and not Result do
+  begin
+    if SectionStart(line, Sections[I].Name) then
+    begin
+      Result := True;
+      section := Sections[I];
+    end;
+    Inc(I);
+  end;
+end;
+
+procedure TIfOutParamsSection.ProcessTemplate(sectionTemplate: TLineStream;
+  const aLibrary: TRODLLibrary; const aOperation: TRODLOperation; const aService: TRODLBaseService);
+var
+  curLine: string;
+  section: TBaseProcedureSubSection;
+begin
+  if CanUse(aOperation) then
+  begin
+    sectionTemplate.Position := 0;
+
+    while not sectionTemplate.Eof do
+    begin
+      curLine := sectionTemplate.ReadLine;
+
+      ParentSection.DoReplacements(curLine, aOperation, aService, aLibrary);
+
+      if InternalSectionStart(curLine, section) then
+        section.Process(FinishSection(section.Name, sectionTemplate), aLibrary, aOperation, aService)
+      else
+        Write(curLine);
+    end;
+  end;
+end;
+
+{ TIfNoOutParamsSection }
+
+constructor TIfNoOutParamsSection.Create(AParent: TRODLTemplateBasedConverter;
+  AParentSection: TBaseOperationSection);
+begin
+  inherited Create(AParent, AParentSection);
+
+  FName := 'IF_NO_OUT_PARAMS';
+end;
+
+function TIfNoOutParamsSection.CanUse(const aOperation: TRODLOperation): Boolean;
+begin
+  Result := not inherited CanUse(aOperation);
+end;
+
+{ TResultSection }
+
+constructor TIfResultComplexSection.Create(AParent: TRODLTemplateBasedConverter;
+  AParentSection: TBaseOperationSection);
+begin
+  inherited Create(AParent, AParentSection, 'IF_RESULT_COMPLEX');
+end;
+
+procedure TIfResultComplexSection.Process(const sectionText: string;
+  const aLibrary: TRODLLibrary; const aOperation: TRODLOperation; const aService: TRODLBaseService);
+var
+  curLine: string;
+begin
+  if Assigned(aOperation.Result) and Parent.IsImplementedAsClass(aOperation.Result.DataType, aLibrary) then
+  begin
+    curLine := sectionText;
+    ParentSection.DoReplacements(curLine, aOperation, aService, aLibrary);
+    Write(curLine);
+  end;
+end;
+
+{ TIfResultSimpleSection }
+
+constructor TIfResultSimpleSection.Create(AParent: TRODLTemplateBasedConverter;
+  AParentSection: TBaseOperationSection);
+begin
+  inherited Create(AParent, AParentSection, 'IF_RESULT_SIMPLE');
+end;
+
+procedure TIfResultSimpleSection.Process(const sectionText: string;
+  const aLibrary: TRODLLibrary; const aOperation: TRODLOperation;
+  const aService: TRODLBaseService);
+var
+  curLine: string;
+begin
+  if Assigned(aOperation.Result) and not Parent.IsImplementedAsClass(aOperation.Result.DataType, aLibrary) then
+  begin
+    curLine := sectionText;
+    ParentSection.DoReplacements(curLine, aOperation, aService, aLibrary);
+    Write(curLine);
+  end;
+end;
+
+{ TArraysIsFound }
+
+constructor TArraysIsFound.Create(AParent: TRODLTemplateBasedConverter;
+  AParentSection: TBaseStructSection);
+begin
+  inherited Create(AParent, AParentSection, 'ARRAYS_IS_FOUND');
+end;
+
+procedure TArraysIsFound.DoReplacements(var curLine: string;
+  const aArray: TRODLArray; const aStruct: TRODLBaseStruct;
+  const aLibrary: TRODLLibrary);
+begin
+  MacroReplace(curLine, '%',
+               ['ARRAY_NAME', aArray.Name
+               ]);
+  ParentSection.DoReplacements(curLine, aStruct, aLibrary);
+end;
+
+procedure TArraysIsFound.ProcessTemplate(sectionTemplate: TLineStream;
+  const aLibrary: TRODLLibrary; const aStruct: TRODLBaseStruct);
+var
+  curIndex: Integer;
+  curAr: TRODLArray;
+  curLine: string;
+  aList: TList;
+begin
+  aList := TList.Create;
+  try
+    aLibrary.GetArraysByElement(AStruct.Name,aList);
+    for curIndex := 0 to aList.Count - 1 do
+    begin
+      curAr := TRODLArray(AList[curIndex]);
+      sectionTemplate.Position := 0;
+      while not sectionTemplate.Eof do
+      begin
+        curLine := sectionTemplate.ReadLine;
+        DoReplacements(curLine, curAr, aStruct, aLibrary);
+        Write(curLine);
+      end;
+    end;
+  finally
+    aList.Free;
+  end;
+end;
+
+{ TIfParamTypeSection }
+
+constructor TIfParamXXXTypeSection.Create(AParent: TRODLTemplateBasedConverter;
+  const AParentSection: TParamsSection; const DataType: string);
+begin
+  FDataType := DataType;
+  inherited Create(AParent, AParentSection, 'IF_PARAM_' + UpperCase(FDataType) + '_TYPE');
+end;
+
+procedure TIfParamXXXTypeSection.Process(const sectionText: string;
+  const aLibrary: TRODLLibrary; const aParameter: TRODLOperationParam;
+  const IsLastParam: Boolean);
+begin
+  if SameText(aParameter.DataType, FDataType) then
+    inherited Process(sectionText, aLibrary, aParameter, IsLastParam);
+end;
+
+{ TIfParamOtherTypeSection }
+
+constructor TIfParamOtherTypeSection.Create(
+  AParent: TRODLTemplateBasedConverter; const AParentSection: TParamsSection);
+begin
+  inherited Create(AParent, AParentSection, 'IF_PARAM_OTHER_TYPE');
+end;
+
+procedure TIfParamOtherTypeSection.Process(const sectionText: string;
+  const aLibrary: TRODLLibrary; const aParameter: TRODLOperationParam;
+  const IsLastParam: Boolean);
+var
+  DataType: TRODataType;
+  Found: Boolean;
+begin
+  Found := False;
+  DataType := Low(DataTypeNames);
+  while not Found and (DataType <> High(DataTypeNames)) do
+  begin
+    Found := SameText(DataTypeNames[DataType], aParameter.DataType);
+    DataType := Succ(DataType);
+  end;
+
+  if not Found then
+    inherited Process(sectionText, aLibrary, aParameter, IsLastParam);
+end;
+
+{ TIfResultXXXTypeSection }
+
+constructor TIfResultXXXTypeSection.Create(AParent: TRODLTemplateBasedConverter;
+  AParentSection: TBaseOperationSection; const DataType: string);
+begin
+  FDataType := DataType;
+
+  inherited Create(AParent, AParentSection, 'IF_RESULT_' + UpperCase(FDataType) + '_TYPE');
+end;
+
+procedure TIfResultXXXTypeSection.Process(const sectionText: string;
+  const aLibrary: TRODLLibrary; const aOperation: TRODLOperation;
+  const aService: TRODLBaseService);
+var
+  curLine: string;
+begin
+  if Assigned(aOperation.Result) and SameText(aOperation.Result.DataType, FDataType) then
+  begin
+    curLine := sectionText;
+
+    ParentSection.DoReplacements(curLine, aOperation, aService, aLibrary);
+    
+    inherited Process(curLine, aLibrary, aOperation, aService);
+  end;
+end;
+
+{ TIfResultOtherTypeSection }
+
+constructor TIfResultOtherTypeSection.Create(
+  AParent: TRODLTemplateBasedConverter; AParentSection: TBaseOperationSection);
+begin
+  inherited Create(AParent, AParentSection, 'IF_RESULT_OTHER_TYPE');
+end;
+
+procedure TIfResultOtherTypeSection.Process(const sectionText: string;
+  const aLibrary: TRODLLibrary; const aOperation: TRODLOperation;
+  const aService: TRODLBaseService);
+var
+  DataType: TRODataType;
+  Found: Boolean;
+  curLine: string;
+begin
+  if Assigned(aOperation.Result) then
+  begin
+    Found := False;
+    DataType := Low(DataTypeNames);
+    while not Found and (DataType <> High(DataTypeNames)) do
+    begin
+      Found := SameText(DataTypeNames[DataType], aOperation.Result.DataType);
+      DataType := Succ(DataType);
+    end;
+
+    if not Found then
+    begin
+      curLine := sectionText;
+
+      ParentSection.DoReplacements(curLine, aOperation, aService, aLibrary);
+    
+      inherited Process(curLine, aLibrary, aOperation, aService);
+    end;
+  end;
+end;
+
+{ TIfArrayNOTXXXTypeSection }
+
+function TIfArrayNOTXXXTypeSection.CanUse(const aArray: TRODLArray;
+  const aLibrary: TRODLLibrary): Boolean;
+begin
+  Result := not SameText(aArray.ElementType, FDataType);
+end;
+
+constructor TIfArrayNOTXXXTypeSection.Create(
+  AParent: TRODLTemplateBasedConverter;
+  const AParentSection: TArraysSection; const DataType: string);
+begin
+  FDataType := DataType;
+  inherited Create(AParent, AParentSection, 'IF_ARRAY_NOT_' + UpperCase(DataType) + '_TYPE');
+end;
+
+{ TIfOperationHasResult }
+
+constructor TIfOperationHasResult.Create(
+  AParent: TRODLTemplateBasedConverter;
+  AParentSection: TBaseOperationSection);
+begin
+  inherited Create(AParent, AParentSection, 'IF_OPERATION_HAS_RESULT');
+end;
+
+procedure TIfOperationHasResult.Process(const sectionText: string;
+  const aLibrary: TRODLLibrary; const aOperation: TRODLOperation;
+  const aService: TRODLBaseService);
+var
+  curLine: string;
+begin
+  if assigned(aOperation.Result) and (aOperation.Result.DataType <> '') then begin
+    curLine := sectionText;
+    ParentSection.DoReplacements(curLine, aOperation, aService, aLibrary);
+    Write(curLine);
+  end;
+end;
+
+{ TStructGenerateDefaultValues }
+
+constructor TStructGenerateDefaultValues.Create(
+  AParent: TRODLTemplateBasedConverter;
+  AParentSection: TBaseStructSection);
+begin
+  inherited Create(AParent, AParentSection, 'STRUCT_GENERATE_DEFAULT_VALUES');
+end;
+
+
+procedure TStructGenerateDefaultValues.ProcessTemplate(
+  sectionTemplate: TLineStream; const aLibrary: TRODLLibrary;
+  const aStruct: TRODLBaseStruct);
+var
+  temp: Boolean;
+  i: integer;
+  curLine: String;
+  section: TBaseStructSubSection;
+begin
+  temp := False;
+  For i:=0 to aStruct.Count-1 do begin
+    if (not Parent.IsImplementedAsClass(aStruct.Items[i].DataType, aLibrary)) and
+       (aStruct.Items[i].Attributes.IndexOfName('Default') <> -1) then begin
+         temp := True;
+         Break;
+       end;
+  end;
+
+  if temp then begin
+    sectionTemplate.Position := 0;
+    while not sectionTemplate.Eof do
+    begin
+      curLine := sectionTemplate.ReadLine;
+      ParentSection.DoReplacements(curLine, aStruct, aLibrary);
+      if ParentSection.InternalSectionStart(curLine, section) then
+        section.Process(FinishSection(section.Name, sectionTemplate), aLibrary, aStruct)
+      else
+        Write(curLine);
+    end;
+  end;
+end;
+
+{ TIfFieldHasDefaultValue }
+
+constructor TIfFieldHasDefaultValue.Create(
+  AParent: TRODLTemplateBasedConverter;
+  const AParentSection: TFieldsSection);
+begin
+  inherited Create(AParent, AParentSection, 'IF_FIELD_HAS_DEFAULT_VALUE');
+end;
+
+procedure TIfFieldHasDefaultValue.ProcessTemplate(
+  sectionTemplate: TLineStream; const aLibrary: TRODLLibrary;
+  const aField: TRODLTypedEntity; const aStruct: TRODLBaseStruct;
+  const IsLastField: Boolean);
+var
+  curLine: string;
+  section: TFieldSubSection;
+begin
+  if not Parent.IsImplementedAsClass(aField.DataType, Parent.FLibrary) and
+            (aField.Attributes.IndexOfName('Default') <> -1) then begin
+    sectionTemplate.Position := 0;
+    while not sectionTemplate.Eof do
+    begin
+      curLine := sectionTemplate.ReadLine;
+
+      ParentSection.DoReplacements(curLine, aField, aStruct, aLibrary);
+      ParentSection.EnsureStripping(curLine, IsLastField);
+
+      if ParentSection.InternalSectionStart(curLine, section) then
+        section.Process(FinishSection(section.Name, sectionTemplate), aLibrary, aField, aStruct, IsLastField)
+      else
+        Write(curLine);
+    end;
+  end;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/uRODLTemplateBasedConverterUtils.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/uRODLTemplateBasedConverterUtils.pas
new file mode 100644
index 0000000..f1d613e
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/CodeGen2/uRODLTemplateBasedConverterUtils.pas	
@@ -0,0 +1,821 @@
+unit uRODLTemplateBasedConverterUtils;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - CodeGen2                                          }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+
+uses
+  uRODLLineStream, uRODL;
+
+const
+  COLLECTION_SUFFIX = 'Collection';
+
+  DEFAULT_STRUCT_ANCESTOR = 'TROComplexType';
+  DEFAULT_STRUCT_COLLECTION_ANCESTOR = 'TROCollection';
+  DEFAULT_EXCEPTION_ANCESTOR = 'EROException';
+  DEFAULT_SERVICE_PROXY_ANCESTOR_NAME = 'TROProxy';
+  DEFAULT_SERVICE_INVOKER_ANCESTOR_NAME = 'ROInvoker';
+  DEFAULT_EVENT_SINK_WRITER_ANCESTOR_NAME = 'ROEventWriter';
+  DEFAULT_EVENT_SINK_INVOKER_ANCESTOR_NAME = 'ROEventInvoker';
+  DEFAULT_SERVICE_ASYNC_ANCESTOR_NAME = 'IROAsyncInterface';
+  DEFAULT_SERVICE_ASYNC_PROXY_ANCESTOR_NAME = 'TROAsyncProxy';
+
+  SERVICE_PROXY_SUFFIX = '_Proxy';
+  SERVICE_INVOKER_SUFFIX = '_Invoker';
+  EVENT_SINK_WRITER_SUFFIX = '_Writer';
+  EVENT_SINK_INVOKER_SUFFIX = '_Invoker';
+
+  DEFAULT_INTF_SUFFIX = '_Intf';
+  DEFAULT_INVK_SUFFIX = '_Invk';
+  DEFAULT_IMPL_SUFFIX = '_Impl';
+  DEFAULT_ASYNC_SUFFIX = '_Async';
+  DEFAULT_ASYNC_PROXY_SUFFIX = '_AsyncProxy';
+
+  IN_FLAGS = [fIn, fInOut];
+  OUT_FLAGS = [fOut, fInOut, fResult];
+
+function MacroReplace(var Text: string; MacroChar: Char;
+  const Macros: array of string; CaseSensitive: Boolean = True): Boolean;
+function SectionStart(const Line: string; SectionName: string): Boolean;
+function SectionEnd(const Line: string; SectionName: string): Boolean;
+function FinishSection(const SectionName: string; SourceTemplate: TLineStream): string; overload;
+procedure FinishSection(const SectionName: string; SourceTemplate: TLineStream; DestTemplate: TLineStream); overload;
+function StrEnsureNoSuffix(const Suffix, Text: string): string;
+function StrEnsureSuffix(const Suffix, Text: string): string;
+
+// The functions below should be moved to uRODLGenTools
+function CachedIsImplementedAsClass(const aTypeName: string; aLibrary: TRODLLibrary): Boolean;
+function CachedDataTypeToCSharpType(const aTypeName:string; aLibrary:TRODLLibrary=nil; aForNew:boolean=false):string;
+function CachedDataTypeToDelphiType(const aTypeName:string; aLibrary:TRODLLibrary=nil; aForNew:boolean=false):string;
+function CachedDataTypeToDelphiDotNetType(const aTypeName:string; aLibrary:TRODLLibrary=nil; aForNew:boolean=false):string;
+function CachedDataTypeToCppType(const aTypeName:string; aLibrary:TRODLLibrary=nil; aForNew:boolean=false):string;
+function CachedDataTypeToObjCType(const aTypeName:string; aLibrary:TRODLLibrary=nil; aDecorateIfNeeded: Boolean=true):string;
+function CachedDataTypeToObjCReaderWriterFn(const aTypeName:string; aLibrary:TRODLLibrary=nil):string;
+function CachedArrayExists(const aArrayName: string; aLibrary:TRODLLibrary): Boolean;
+
+procedure ClearIsImplementedAsClassCache(aLibrary: TRODLLibrary = nil);
+procedure ClearArrayExistsCache(aLibrary:TRODLLibrary = nil);
+procedure ClearDataTypeCaches(aLibrary: TRODLLibrary = nil);
+procedure ClearAllCaches(aLibrary: TRODLLibrary = nil);
+
+function DataTypeToCSharpType(const aTypeName:string; aLibrary:TRODLLibrary=nil; aForNew:boolean=false):string;
+function DataTypeToCppType(const aTypeName:string; aLibrary:TRODLLibrary=nil; aForNew:boolean=false):string;
+function DataTypeToObjCType(const aTypeName:string; aLibrary:TRODLLibrary=nil; aForNew:boolean=false):string;
+function DataTypeToObjCReaderWriterFn(const aTypeName:string; aLibrary:TRODLLibrary=nil; aForNew:boolean=false):string;
+function DataTypeToDelphiType(const aTypeName:string; aLibrary:TRODLLibrary=nil; aForNew:boolean=false):string;
+function ArrayExists(const aArrayName: string; aLibrary:TRODLLibrary): Boolean;
+
+
+implementation
+
+uses
+  SysUtils, Classes, Contnrs, IniFiles, uROTypes, uROClasses, uRODLGenTools;
+
+type
+  TBooleanCacheElement = class
+  private
+    FLibrary: TRODLLibrary;
+    FCachedTypes: {$IFDEF FPC}TStringList{$ELSE}THashedStringList{$ENDIF};
+  protected
+    function GetUncachedIsSet(const aTypeName: string): Boolean; virtual; abstract;
+  public
+    constructor Create(aLibrary: TRODLLibrary);
+    destructor Destroy; override;
+
+    function IsSet(const aTypeName: string): Boolean;
+    procedure Clear;
+  end;
+
+  TBooleanCacheElementClass = class of TBooleanCacheElement;
+
+  TBooleanCacheList = class(TObjectList)
+  private
+    function GetItemByLibrary(
+      aLibrary: TRODLLibrary): TBooleanCacheElement;
+    function GetItem(Index: Integer): TBooleanCacheElement;
+  protected
+    function GetElementType: TBooleanCacheElementClass; virtual; abstract;
+  public
+    property ItemsByLibrary[aLibrary: TRODLLibrary]: TBooleanCacheElement read GetItemByLibrary;
+    property Items[Index: Integer]: TBooleanCacheElement read GetItem; default;
+  end;
+
+  TIdentifierTypeCacheList = class;
+  TIdentifierTypeCacheElement = class
+  private
+    FLibrary: TRODLLibrary;
+    FCachedTypes: {$IFDEF FPC}TStringList{$ELSE}THashedStringList{$ENDIF};
+    FParent: TIdentifierTypeCacheList;
+  public
+    constructor Create(aParent: TIdentifierTypeCacheList; aLibrary: TRODLLibrary);
+    destructor Destroy; override;
+
+    function TypeIdentifier(const aTypeName: string; const AForNew: Boolean): string;
+    procedure Clear;
+  end;
+
+  TGetTypeIdentifier = function (const iType:string; iLibrary:TRODLLibrary=nil; iForNew:boolean=false):string;
+  TIdentifierTypeCacheList = class (TObjectList)
+  private
+    FGetTypeIdentifier: TGetTypeIdentifier;
+    
+    function GetItem(Index: Integer): TIdentifierTypeCacheElement;
+    function GetItemByLibrary(
+      aLibrary: TRODLLibrary): TIdentifierTypeCacheElement;
+  public
+    constructor Create(aGetTypeIdentifier: TGetTypeIdentifier; AOwnsObjects: Boolean = True);
+    
+    property ItemsByLibrary[aLibrary: TRODLLibrary]: TIdentifierTypeCacheElement read GetItemByLibrary;
+    property Items[Index: Integer]: TIdentifierTypeCacheElement read GetItem; default;
+  end;
+
+  TIsImplementedAsClassCacheElement = class(TBooleanCacheElement)
+  protected
+    function GetUncachedIsSet(const aTypeName: string): Boolean; override;
+  end;
+
+  TIsImplementedAsClassCacheList = class(TBooleanCacheList)
+  protected
+    function GetElementType: TBooleanCacheElementClass; override;
+  end;
+
+  TArrayExistsCacheElement = class(TBooleanCacheElement)
+  protected
+    function GetUncachedIsSet(const aTypeName: string): Boolean; override;
+  end;
+
+  TArrayExistsCacheList = class(TBooleanCacheList)
+  protected
+    function GetElementType: TBooleanCacheElementClass; override;
+  end;
+
+var
+  FIsImplementedAsClassCache: TIsImplementedAsClassCacheList;
+  FArrayExistsCache: TArrayExistsCacheList;
+  FDataTypeToCSharpTypeCache: TIdentifierTypeCacheList;
+  FDataTypeToDelphiTypeCache: TIdentifierTypeCacheList;
+  FDataTypeToDelphiDotNetTypeCache: TIdentifierTypeCacheList;
+  FDataTypeToCppTypeCache: TIdentifierTypeCacheList;
+  FDataTypeToObjCTypeCache: TIdentifierTypeCacheList;
+  FDataTypeToObjcReaderWriterFnCache: TIdentifierTypeCacheList;
+
+type 
+  CmpFunc = function(const Str1, Str2: PChar; MaxLen: {$IFDEF FPC}LongInt{$ELSE}Cardinal{$ENDIF}): Integer;  
+ 
+function MacroReplace(var Text: string; MacroChar: Char;
+  const Macros: array of string; CaseSensitive: Boolean = True): Boolean;
+const
+  Delta = 1024;
+var
+  Index, i, Count, Len, SLen, MacroHigh: Integer;
+  S: string;
+  Found: Boolean;
+  Cmp: CmpFunc;
+begin
+  Result := False;
+  if CaseSensitive then
+    Cmp := {$IFDEF FPC}@{$ENDIF}StrLComp
+  else
+    Cmp := {$IFDEF FPC}@{$ENDIF}StrLIComp;
+
+  MacroHigh := Length(Macros) div 2 - 1;
+  Len := Length(Text);
+  i := 1;
+  SetLength(S, Delta);
+  SLen := 0;
+  while i <= Len do
+  begin
+    Count := 0;
+   // add normal chars in one step
+    while (i <= Len) and (Text[i] <> MacroChar) do
+    begin
+      Inc(Count);
+      Inc(i);
+    end;
+    if Count > 0 then
+    begin
+      if SLen + Count > Length(S) then
+        SetLength(S, SLen + Count + Delta);
+      Move(Text[i - Count], S[SLen + 1], Count*SizeOf(char));
+      Inc(SLen, Count);
+    end;
+
+    if i <= Len then
+    begin
+     // replace macros
+      Found := False;
+      for Index := 0 to MacroHigh do
+      begin
+        Count := Length(Macros[Index * 2]) + 1;  // Plus one to eat the trailing macro char
+        if Cmp(PChar(Pointer(Text)) + i, PChar(Macros[Index * 2] + MacroChar), Count) = 0 then
+        begin
+          Inc(i, Count);
+          Count := Length(Macros[Index * 2 + 1]);
+          if Count > 0 then
+          begin
+            if SLen + Count > Length(S) then
+              SetLength(S, SLen + Count + Delta);
+            Move(Macros[Index * 2 + 1][1], S[SLen + 1], Count*SizeOf(Char));
+            Inc(SLen, Count);
+          end;
+          Result := True;
+          Found := True;
+          Break;
+        end;
+      end;
+      if not Found then
+      begin
+        // copy macro-text
+        if Macros[0][Length(Macros[0])] = MacroChar then
+        begin
+          Count := 1;
+          while (i + Count <= Len) and (Text[i + Count] <> MacroChar) do
+            Inc(Count);
+        end
+        else
+        begin
+          Count := 0;
+        end;
+        
+        Inc(Count);
+        if SLen + Count > Length(S) then
+          SetLength(S, SLen + Count + Delta);
+        Move(Text[i], S[SLen + 1], Count*SizeOf(Char));
+        Inc(SLen, Count);
+        Inc(i, Count - 1);
+      end;
+    end;
+    Inc(i);
+  end;
+  SetLength(S, SLen);
+  Text := S;
+end;
+
+function SectionStart(const Line: string; SectionName: string): Boolean;
+begin
+  Result := Trim(Line) = '// <%%% START ' + SectionName + ' %%%>';
+end;
+
+function SectionEnd(const Line: string; SectionName: string): Boolean;
+begin
+  Result := Trim(Line) = '// <%%% END ' + SectionName + ' %%%>';
+end;
+
+function FinishSection(const SectionName: string; SourceTemplate: TLineStream): string; overload;
+var
+  curLine: string;
+  prevLine: string;
+begin
+  Result := '';
+  prevLine := '';
+  curLine := SourceTemplate.ReadLine;
+  while not SourceTemplate.Eof and not SectionEnd(curLine, SectionName) do
+  begin
+    Result := Result + curLine + #13#10;
+    prevLine := curLine;
+    curLine := SourceTemplate.ReadLine;
+  end;
+  if SourceTemplate.Eof and not SectionEnd(curLine, SectionName) then
+    Result := Result + curLine + #13#10;
+    
+  if Length(prevLine) <> 0 then
+    Result := StrEnsureNoSuffix(#13#10, Result);
+end;
+
+procedure FinishSection(const SectionName: string; SourceTemplate: TLineStream; DestTemplate: TLineStream); overload;
+var
+  content: string;
+begin
+  content := FinishSection(SectionName, SourceTemplate);
+
+  DestTemplate.Position := 0;
+  DestTemplate.Size := Length(content);
+  DestTemplate.WriteString(content);
+  DestTemplate.Position := 0;
+end;
+
+// Extracted from the JCL (under MPL licence)
+function StrEnsureNoSuffix(const Suffix, Text: string): string;
+var
+  SuffixLen : Integer;
+  StrLength : Integer;
+begin
+  SuffixLen := Length(Suffix);
+  StrLength := Length(Text);
+  if Copy(Text, StrLength - SuffixLen + 1, SuffixLen) = Suffix then
+    Result := Copy(Text, 1, StrLength - SuffixLen)
+  else
+    Result := Text;
+end;
+
+// Extracted from the JCL (under MPL licence)
+function StrEnsureSuffix(const Suffix, Text: string): string;
+var
+  SuffixLen: Integer;
+begin
+  SuffixLen := Length(Suffix);
+  if Copy(Text, Length(Text) - SuffixLen + 1, SuffixLen) = Suffix then
+    Result := Text
+  else
+    Result := Text + Suffix;
+end;
+
+{ TBooleanCacheElement }
+
+procedure TBooleanCacheElement.Clear;
+begin
+  FCachedTypes.Clear;
+end;
+
+constructor TBooleanCacheElement.Create(aLibrary: TRODLLibrary);
+begin
+  inherited Create;
+
+  FLibrary := aLibrary;
+  FCachedTypes := {$IFDEF FPC}TStringList{$ELSE}THashedStringList{$ENDIF}.Create;
+  FCachedTypes.CaseSensitive := True;
+  FCachedTypes.Capacity := 20;
+  FCachedTypes.Sorted := True;
+end;
+
+destructor TBooleanCacheElement.Destroy;
+begin
+  FCachedTypes.Free;
+  
+  inherited Destroy;
+end;
+
+function TBooleanCacheElement.IsSet(
+  const aTypeName: string): Boolean;
+var
+  typeNameIndex: Integer;
+begin
+  typeNameIndex := FCachedTypes.IndexOf(aTypeName);
+  if typeNameIndex > -1 then
+  begin
+    Result := Boolean(cardinal(FCachedTypes.Objects[typeNameIndex]));
+  end
+  else
+  begin
+    Result := GetUncachedIsSet(aTypeName);
+    FCachedTypes.AddObject(aTypeName, TObject(Result));
+  end;
+end;
+
+{ TBooleanCacheList }
+
+function TBooleanCacheList.GetItemByLibrary(
+  aLibrary: TRODLLibrary): TBooleanCacheElement;
+var
+  I: Integer;
+begin
+  I := 0;
+  Result := nil;
+  while not Assigned(Result) and (I < Count) do
+  begin
+    if Items[I].FLibrary = aLibrary then
+      Result := Items[I];
+    Inc(I);
+  end;
+
+  if not Assigned(Result) then
+  begin
+    Result := GetElementType.Create(aLibrary);
+    Add(Result);
+  end;
+end;
+
+function TBooleanCacheList.GetItem(
+  Index: Integer): TBooleanCacheElement;
+begin
+  Result := inherited Items[Index] as TBooleanCacheElement;
+end;
+
+{ TIdentifierTypeCacheElement }
+
+procedure TIdentifierTypeCacheElement.Clear;
+begin
+  FCachedTypes.Clear;
+end;
+
+constructor TIdentifierTypeCacheElement.Create(aParent: TIdentifierTypeCacheList; aLibrary: TRODLLibrary);
+begin
+  inherited Create;
+
+  FLibrary := aLibrary;
+  FParent := aParent;
+  FCachedTypes := {$IFDEF FPC}TStringList{$ELSE}THashedStringList{$ENDIF}.Create;
+  FCachedTypes.CaseSensitive := True;
+  FCachedTypes.Capacity := 20;
+end;
+
+destructor TIdentifierTypeCacheElement.Destroy;
+begin
+  FCachedTypes.Free;
+
+  inherited Destroy;
+end;
+
+function TIdentifierTypeCacheElement.TypeIdentifier(
+  const aTypeName: string; const AForNew: Boolean): string;
+begin
+  Result := FCachedTypes.Values[aTypeName + ',' + BoolToStr(AForNew)];
+
+  if Length(Result) = 0 then
+  begin
+    Result := FParent.FGetTypeIdentifier(aTypeName, FLibrary, AForNew);
+    FCachedTypes.Values[aTypeName + ',' + BoolToStr(AForNew)] := Result;
+  end;
+end;
+
+{ TIdentifierTypeCacheList }
+
+constructor TIdentifierTypeCacheList.Create(
+  aGetTypeIdentifier: TGetTypeIdentifier; AOwnsObjects: Boolean);
+begin
+  inherited Create(AOwnsObjects);
+
+  FGetTypeIdentifier := aGetTypeIdentifier;
+end;
+
+function TIdentifierTypeCacheList.GetItem(
+  Index: Integer): TIdentifierTypeCacheElement;
+begin
+  Result := inherited Items[Index] as TIdentifierTypeCacheElement;
+end;
+
+function TIdentifierTypeCacheList.GetItemByLibrary(
+  aLibrary: TRODLLibrary): TIdentifierTypeCacheElement;
+var
+  I: Integer;
+begin
+  I := 0;
+  Result := nil;
+  while not Assigned(Result) and (I < Count) do
+  begin
+    if Items[I].FLibrary = aLibrary then
+      Result := Items[I];
+    Inc(I);
+  end;
+
+  if not Assigned(Result) then
+  begin
+    Result := TIdentifierTypeCacheElement.Create(Self, aLibrary);
+    Add(Result);
+  end;
+end;
+
+{ TIsImplementedAsClassCacheElement }
+
+function TIsImplementedAsClassCacheElement.GetUncachedIsSet(
+  const aTypeName: string): Boolean;
+begin
+  Result := IsImplementedAsClass(aTypeName, FLibrary);
+end;
+
+{ TIsImplementedAsClassCacheList }
+
+function TIsImplementedAsClassCacheList.GetElementType: TBooleanCacheElementClass;
+begin
+  Result := TIsImplementedAsClassCacheElement;
+end;
+
+{ TArrayExistsCacheElement }
+
+function TArrayExistsCacheElement.GetUncachedIsSet(
+  const aTypeName: string): Boolean;
+begin
+  Result := ArrayExists(aTypeName, FLibrary);
+end;
+
+{ TArrayExistsCacheList }
+
+function TArrayExistsCacheList.GetElementType: TBooleanCacheElementClass;
+begin
+  Result := TArrayExistsCacheElement;
+end;
+
+function CachedIsImplementedAsClass(const aTypeName:string; aLibrary:TRODLLibrary):boolean;
+begin
+  if not Assigned(FIsImplementedAsClassCache) then
+  begin
+    FIsImplementedAsClassCache := TIsImplementedAsClassCacheList.Create(True);
+  end;
+
+  result := FIsImplementedAsClassCache.ItemsByLibrary[aLibrary].IsSet(aTypeName);
+end;
+
+procedure ClearIsImplementedAsClassCache(aLibrary: TRODLLibrary);
+begin
+  if Assigned(FIsImplementedAsClassCache) then
+  begin
+    if Assigned(aLibrary) then
+      FIsImplementedAsClassCache.ItemsByLibrary[aLibrary].Clear
+    else
+      FIsImplementedAsClassCache.Clear;
+  end;
+end;
+
+function CachedDataTypeToCSharpType(const aTypeName:string; aLibrary:TRODLLibrary=nil; aForNew:boolean=false):string;
+begin
+  if not Assigned(FDataTypeToCSharpTypeCache) then
+  begin
+    FDataTypeToCSharpTypeCache := TIdentifierTypeCacheList.Create(DataTypeToCSharpType, True);
+  end;
+
+  Result := FDataTypeToCSharpTypeCache.ItemsByLibrary[aLibrary].TypeIdentifier(aTypeName, aForNew);
+end;
+
+function CachedDataTypeToDelphiType(const aTypeName:string; aLibrary:TRODLLibrary=nil; aForNew:boolean=false):string;
+begin
+  if not Assigned(FDataTypeToDelphiTypeCache) then
+  begin
+    FDataTypeToDelphiTypeCache := TIdentifierTypeCacheList.Create(DataTypeToDelphiType, True);
+  end;
+
+  Result := FDataTypeToDelphiTypeCache.ItemsByLibrary[aLibrary].TypeIdentifier(aTypeName, aForNew);
+end;
+
+function DataTypeToDelphiType(const aTypeName:string; aLibrary:TRODLLibrary=nil; aForNew:boolean=false):string;
+begin
+  case StrToDataType(aTypeName) of
+    rtXML: Result:= 'IXmlNode';
+  else
+    Result := aTypeName;
+  end;
+end;
+
+function CachedDataTypeToDelphiDotNetType(const aTypeName:string; aLibrary:TRODLLibrary=nil; aForNew:boolean=false):string;
+begin
+  if not Assigned(FDataTypeToDelphiDotNetTypeCache) then
+  begin
+    FDataTypeToDelphiDotNetTypeCache := TIdentifierTypeCacheList.Create(uRODLGenTools.DataTypeToDelphiDotNetType, True);
+  end;
+
+  Result := FDataTypeToDelphiDotNetTypeCache.ItemsByLibrary[aLibrary].TypeIdentifier(aTypeName, aForNew);
+end;
+
+function CachedDataTypeToCppType(const aTypeName:string; aLibrary:TRODLLibrary=nil; aForNew:boolean=false):string;
+begin
+  if not Assigned(FDataTypeToCppTypeCache) then
+  begin
+    FDataTypeToCppTypeCache := TIdentifierTypeCacheList.Create(DataTypeToCppType, True);
+  end;
+
+  Result := FDataTypeToCppTypeCache.ItemsByLibrary[aLibrary].TypeIdentifier(aTypeName, aForNew);
+end;
+
+function CachedDataTypeToObjCType(const aTypeName:string; aLibrary:TRODLLibrary=nil; aDecorateIfNeeded: Boolean=true):string;
+begin
+  if not Assigned(FDataTypeToObjcTypeCache) then begin
+    FDataTypeToObjcTypeCache := TIdentifierTypeCacheList.Create(DataTypeToObjCType, True);
+  end;
+
+  Result := FDataTypeToObjCTypeCache.ItemsByLibrary[aLibrary].TypeIdentifier(aTypeName, aDecorateIfNeeded);
+
+  if not aDecorateIfNeeded then begin
+    if result[length(result)] = '*' then SetLength(result,length(result)-1);
+  end;
+end;
+
+function CachedDataTypeToObjCReaderWriterFn(const aTypeName:string; aLibrary:TRODLLibrary=nil):string;
+begin
+  if not Assigned(FDataTypeToObjcReaderWriterFnCache) then begin
+    FDataTypeToObjcReaderWriterFnCache := TIdentifierTypeCacheList.Create(DataTypeToObjCReaderWriterFn, True);
+  end;
+
+  Result := FDataTypeToObjCReaderWriterFnCache.ItemsByLibrary[aLibrary].TypeIdentifier(aTypeName, True);
+end;
+
+function DataTypeToCppType(const aTypeName:string; aLibrary:TRODLLibrary=nil; aForNew:boolean=false):string;
+
+const                                                   
+  CppSimpleTypes: array[TRODataType] of string =
+    ('int', 'TDateTime', 'double', 'Currency', 'WideString', 'AnsiString', '__int64', 'bool', 'Variant', 'Binary', '_di_IXMLNode', 'TGuidString','TDecimalVariant','UTF8String', 'XsDateTime','');
+
+  // TRODataType =
+  // (rtInteger, rtDateTime, rtDouble, rtCurrency, rtWidestring, rtString, rtInt64, rtBoolean, rtVariant, rtBinary, rtUserDefined);
+
+// TODO: Need to finish these if possible - in their proper place - if needed- else we need something
+// in the Macros like %IFCONST% that is replaced by "const" and %IFVAR% and/or %IFOUT% that is replaced with "&"
+//  PasFlagNames : array[TRODLParamFlag] of string =
+//    ('const', 'out', 'var', 'result');
+
+// Also these must be translated to "False" and "True" - case sensitively
+//  BoolStr : array[boolean] of string = ('false','true');
+
+var
+  aType: TRODataType;
+
+begin
+  for aType := Low(DataTypeNames) to High(DataTypeNames) do
+    if SameText(aTypeName, DataTypeNames[aType]) and (aType in [Low(CppSimpletypes)..High(CppSimpleTypes)]) then
+    begin
+      Result:= CppSimpleTypes[aType];
+      exit;
+    end;
+  // Not found case
+  Result:= aTypeName;
+end;
+
+function DataTypeToObjCType(const aTypeName:string; aLibrary:TRODLLibrary=nil; aForNew:boolean=false):string;
+
+const
+  ObjCSimpleTypes: array[TRODataType] of string =
+    ('long', 'NSDate*', 'double', 'NSDecimalNumber*', 'NSString*', 'NSString*',
+     'Int64', 'BOOL', 'ROVariant*', 'NSData*', 'ROXML*', 'ROGuid*','NSDecimalNumber*',
+     'NSString*', 'NSDate*','');
+
+{ type TRODataType = (rtInteger, rtDateTime, rtDouble, rtCurrency, rtWidestring, rtString,
+                    rtInt64, rtBoolean, rtVariant, rtBinary, rtXML, rtGuid, rtDecimal,
+                    rtUTF8String, rtXsDateTime, rtUserDefined); }
+
+// TODO: Need to finish these if possible - in their proper place - if needed- else we need something
+// in the Macros like %IFCONST% that is replaced by "const" and %IFVAR% and/or %IFOUT% that is replaced with "&"
+//  PasFlagNames : array[TRODLParamFlag] of string =
+//    ('const', 'out', 'var', 'result');
+
+// Also these must be translated to "False" and "True" - case sensitively
+//  BoolStr : array[boolean] of string = ('false','true');
+
+var
+  aType: TRODataType;
+
+begin
+  for aType := Low(DataTypeNames) to High(DataTypeNames) do
+    if SameText(aTypeName, DataTypeNames[aType]) and (aType in [Low(ObjCSimpletypes)..High(ObjCSimpleTypes)]) then
+    begin
+      Result:= ObjCSimpleTypes[aType];
+      exit;
+    end;
+
+  if assigned(aLibrary) and assigned(aLibrary.FindEnum(aTypeName)) then begin
+    Result := 'enum '+aTypeName;
+    exit;
+  end;
+
+  // Not found case
+  Result:= aTypeName+'*'; // all other types are pointers
+end;
+
+function DataTypeToObjCReaderWriterFn(const aTypeName:string; aLibrary:TRODLLibrary=nil; aForNew:boolean=false):string;
+
+const
+  ObjCSimpleTypes: array[TRODataType] of string =
+      ('Int32', 'DateTime', 'Double', 'Currency', 'WideString', 'AnsiString',
+       'Int64', 'Boolean', 'Variant', 'Binary', 'XML', 'Guid', 'Decimal',
+       'Utf8String', 'XsDateTime', '');
+
+var
+  aType: TRODataType;
+
+begin
+  for aType := Low(DataTypeNames) to High(DataTypeNames) do
+    if SameText(aTypeName, DataTypeNames[aType]) and (aType in [Low(ObjCSimpletypes)..High(ObjCSimpleTypes)]) then
+    begin
+      Result:= ObjCSimpleTypes[aType];
+      exit;
+    end;
+
+  if assigned(aLibrary) and assigned(aLibrary.FindEnum(aTypeName)) then begin
+    result:= 'Enum'; // all other types are objects
+    exit;
+  end;
+
+  if assigned(aLibrary) and assigned(aLibrary.FindArray(aTypeName)) then begin
+    result:= 'Array'; // all other types are objects
+    exit;
+  end;
+
+  // Not found case
+  Result:= 'Complex'; // all other types are objects
+end;
+
+function DataTypeToCSharpType(const aTypeName:string; aLibrary:TRODLLibrary=nil; aForNew:boolean=false):string;
+const
+  CSharpSimpleTypes: array[TRODataType] of string =
+    ('int', 'System.DateTime', 'double', 'decimal', 'string', 'string', 'Int64', 'bool', 'Variant', 'Binary', 'IXMLNode', 'TGuidString','TDecimalVariant', 'string', 'XsDateTime', '');
+var
+  aType: TRODataType;
+begin
+  for aType := Low(DataTypeNames) to High(DataTypeNames) do
+    if SameText(aTypeName, DataTypeNames[aType]) and (aType in [Low(CSharpSimpleTypes)..High(CSharpSimpleTypes)]) then
+    begin
+      Result := CSharpSimpleTypes[aType];
+      Exit;
+    end;
+
+  // Not found case
+  Result := uRODLGenTools.DataTypeToCSharpType(aTypeName, aLibrary, aForNew);
+end;
+
+function ArrayExists(const aArrayName: string; aLibrary:TRODLLibrary): Boolean;
+begin
+  Result := Assigned(aLibrary.FindArray(aArrayName));
+end;
+
+function CachedArrayExists(const aArrayName: string; aLibrary:TRODLLibrary): Boolean;
+begin
+  if not Assigned(FArrayExistsCache) then
+  begin
+    FArrayExistsCache := TArrayExistsCacheList.Create(True);
+  end;
+
+  Result := FArrayExistsCache.ItemsByLibrary[aLibrary].IsSet(aArrayName);
+end;
+
+procedure ClearArrayExistsCache(aLibrary:TRODLLibrary = nil);
+begin
+  if Assigned(FArrayExistsCache) then
+  begin
+    if Assigned(aLibrary) then
+      FArrayExistsCache.ItemsByLibrary[aLibrary].Clear
+    else
+      FArrayExistsCache.Clear;
+  end;
+end;
+
+procedure ClearDataTypeCaches(aLibrary: TRODLLibrary = nil);
+begin
+  if Assigned(FDataTypeToCSharpTypeCache) then
+  begin
+    if Assigned(aLibrary) then
+      FDataTypeToCSharpTypeCache.ItemsByLibrary[aLibrary].Clear
+    else
+      FDataTypeToCSharpTypeCache.Clear;
+  end;
+  
+  if Assigned(FDataTypeToDelphiTypeCache) then
+  begin
+    if Assigned(aLibrary) then
+      FDataTypeToDelphiTypeCache.ItemsByLibrary[aLibrary].Clear
+    else
+      FDataTypeToDelphiTypeCache.Clear;
+  end;
+
+  if Assigned(FDataTypeToDelphiDotNetTypeCache) then
+  begin
+    if Assigned(aLibrary) then
+      FDataTypeToDelphiDotNetTypeCache.ItemsByLibrary[aLibrary].Clear
+    else
+      FDataTypeToDelphiDotNetTypeCache.Clear;
+  end;
+
+  if Assigned(FDataTypeToCppTypeCache) then
+  begin
+    if Assigned(aLibrary) then
+      FDataTypeToCppTypeCache.ItemsByLibrary[aLibrary].Clear
+    else
+      FDataTypeToCppTypeCache.Clear;
+  end;
+
+  if Assigned(FDataTypeToObjCTypeCache) then
+  begin
+    if Assigned(aLibrary) then
+      FDataTypeToObjCTypeCache.ItemsByLibrary[aLibrary].Clear
+    else
+      FDataTypeToObjCTypeCache.Clear;
+  end;
+
+  if Assigned(FDataTypeToObjcReaderWriterFnCache) then
+  begin
+    if not Assigned(aLibrary) then
+      FDataTypeToObjcReaderWriterFnCache.Clear;
+  end;
+end;
+
+procedure ClearAllCaches(aLibrary: TRODLLibrary = nil);
+begin
+  ClearDataTypeCaches(aLibrary);
+  ClearIsImplementedAsClassCache(aLibrary);
+  ClearArrayExistsCache(aLibrary);
+end;
+
+initialization
+
+finalization
+  FIsImplementedAsClassCache.Free;
+  FArrayExistsCache.Free;
+  FDataTypeToCSharpTypeCache.Free;
+  FDataTypeToDelphiTypeCache.Free;
+  FDataTypeToDelphiDotNetTypeCache.Free;
+  FDataTypeToCppTypeCache.Free;
+  FDataTypeToObjCTypeCache.Free;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D10.bdsproj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D10.bdsproj
new file mode 100644
index 0000000..fd0dc20
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D10.bdsproj	
@@ -0,0 +1,180 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality" Type="String">Delphi.Personality</Option>
+			<Option Name="ProjectType" Type="String"></Option>
+			<Option Name="Version" Type="String">1.0</Option>
+			<Option Name="GUID" Type="String">{34B49BD5-2A10-4E93-8208-7657BD895C31}</Option>
+		</Option>
+	</PersonalityInfo> 
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource" Type="String">RemObjects_DataSnap_D10.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version" Type="String">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A" Type="Integer">8</Compiler>
+			<Compiler Name="B" Type="Integer">0</Compiler>
+			<Compiler Name="C" Type="Integer">1</Compiler>
+			<Compiler Name="D" Type="Integer">1</Compiler>
+			<Compiler Name="E" Type="Integer">0</Compiler>
+			<Compiler Name="F" Type="Integer">0</Compiler>
+			<Compiler Name="G" Type="Integer">1</Compiler>
+			<Compiler Name="H" Type="Integer">1</Compiler>
+			<Compiler Name="I" Type="Integer">1</Compiler>
+			<Compiler Name="J" Type="Integer">0</Compiler>
+			<Compiler Name="K" Type="Integer">0</Compiler>
+			<Compiler Name="L" Type="Integer">1</Compiler>
+			<Compiler Name="M" Type="Integer">0</Compiler>
+			<Compiler Name="N" Type="Integer">1</Compiler>
+			<Compiler Name="O" Type="Integer">1</Compiler>
+			<Compiler Name="P" Type="Integer">1</Compiler>
+			<Compiler Name="Q" Type="Integer">0</Compiler>
+			<Compiler Name="R" Type="Integer">0</Compiler>
+			<Compiler Name="S" Type="Integer">0</Compiler>
+			<Compiler Name="T" Type="Integer">0</Compiler>
+			<Compiler Name="U" Type="Integer">0</Compiler>
+			<Compiler Name="V" Type="Integer">1</Compiler>
+			<Compiler Name="W" Type="Integer">0</Compiler>
+			<Compiler Name="X" Type="Integer">1</Compiler>
+			<Compiler Name="Y" Type="Integer">1</Compiler>
+			<Compiler Name="Z" Type="Integer">1</Compiler>
+			<Compiler Name="ShowHints" Type="Boolean">True</Compiler>
+			<Compiler Name="ShowWarnings" Type="Boolean">True</Compiler>
+			<Compiler Name="UnitAliases" Type="String">WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;</Compiler>
+			<Compiler Name="NamespacePrefix" Type="String"></Compiler>
+			<Compiler Name="GenerateDocumentation" Type="Boolean">False</Compiler>
+			<Compiler Name="DefaultNamespace" Type="String"></Compiler>
+			<Compiler Name="SymbolDeprecated" Type="Boolean">False</Compiler>
+			<Compiler Name="SymbolLibrary" Type="Boolean">False</Compiler>
+			<Compiler Name="SymbolPlatform" Type="Boolean">False</Compiler>
+			<Compiler Name="SymbolExperimental" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitLibrary" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitPlatform" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitDeprecated" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitExperimental" Type="Boolean">False</Compiler>
+			<Compiler Name="HResultCompat" Type="Boolean">True</Compiler>
+			<Compiler Name="HidingMember" Type="Boolean">True</Compiler>
+			<Compiler Name="HiddenVirtual" Type="Boolean">True</Compiler>
+			<Compiler Name="Garbage" Type="Boolean">True</Compiler>
+			<Compiler Name="BoundsError" Type="Boolean">True</Compiler>
+			<Compiler Name="ZeroNilCompat" Type="Boolean">True</Compiler>
+			<Compiler Name="StringConstTruncated" Type="Boolean">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar" Type="Boolean">True</Compiler>
+			<Compiler Name="TypedConstVarPar" Type="Boolean">True</Compiler>
+			<Compiler Name="AsgToTypedConst" Type="Boolean">True</Compiler>
+			<Compiler Name="CaseLabelRange" Type="Boolean">True</Compiler>
+			<Compiler Name="ForVariable" Type="Boolean">True</Compiler>
+			<Compiler Name="ConstructingAbstract" Type="Boolean">True</Compiler>
+			<Compiler Name="ComparisonFalse" Type="Boolean">True</Compiler>
+			<Compiler Name="ComparisonTrue" Type="Boolean">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned" Type="Boolean">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned" Type="Boolean">True</Compiler>
+			<Compiler Name="UnsupportedConstruct" Type="Boolean">True</Compiler>
+			<Compiler Name="FileOpen" Type="Boolean">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc" Type="Boolean">True</Compiler>
+			<Compiler Name="BadGlobalSymbol" Type="Boolean">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor" Type="Boolean">True</Compiler>
+			<Compiler Name="InvalidDirective" Type="Boolean">True</Compiler>
+			<Compiler Name="PackageNoLink" Type="Boolean">True</Compiler>
+			<Compiler Name="PackageThreadVar" Type="Boolean">True</Compiler>
+			<Compiler Name="ImplicitImport" Type="Boolean">True</Compiler>
+			<Compiler Name="HPPEMITIgnored" Type="Boolean">True</Compiler>
+			<Compiler Name="NoRetVal" Type="Boolean">True</Compiler>
+			<Compiler Name="UseBeforeDef" Type="Boolean">True</Compiler>
+			<Compiler Name="ForLoopVarUndef" Type="Boolean">True</Compiler>
+			<Compiler Name="UnitNameMismatch" Type="Boolean">True</Compiler>
+			<Compiler Name="NoCFGFileFound" Type="Boolean">True</Compiler>
+			<Compiler Name="MessageDirective" Type="Boolean">True</Compiler>
+			<Compiler Name="ImplicitVariants" Type="Boolean">True</Compiler>
+			<Compiler Name="UnicodeToLocale" Type="Boolean">True</Compiler>
+			<Compiler Name="LocaleToUnicode" Type="Boolean">True</Compiler>
+			<Compiler Name="ImagebaseMultiple" Type="Boolean">True</Compiler>
+			<Compiler Name="SuspiciousTypecast" Type="Boolean">True</Compiler>
+			<Compiler Name="PrivatePropAccessor" Type="Boolean">True</Compiler>
+			<Compiler Name="UnsafeType" Type="Boolean">False</Compiler>
+			<Compiler Name="UnsafeCode" Type="Boolean">False</Compiler>
+			<Compiler Name="UnsafeCast" Type="Boolean">False</Compiler>
+			<Compiler Name="OptionTruncated" Type="Boolean">True</Compiler>
+			<Compiler Name="WideCharReduced" Type="Boolean">True</Compiler>
+			<Compiler Name="DuplicatesIgnored" Type="Boolean">True</Compiler>
+			<Compiler Name="UnitInitSeq">True</Compiler>
+			<Compiler Name="LocalPInvoke">True</Compiler>
+			<Compiler Name="CodePage"></Compiler>
+		</Compiler>
+		<Linker>
+			<Linker Name="MapFile" Type="Integer">0</Linker>
+			<Linker Name="OutputObjs" Type="Integer">0</Linker>
+			<Linker Name="ConsoleApp" Type="Integer">1</Linker>
+			<Linker Name="DebugInfo" Type="Boolean">False</Linker>
+			<Linker Name="RemoteSymbols" Type="Boolean">False</Linker>
+			<Linker Name="GenerateDRC" Type="Boolean">False</Linker>
+			<Linker Name="MinStackSize" Type="Integer">16384</Linker>
+			<Linker Name="MaxStackSize" Type="Integer">1048576</Linker>
+			<Linker Name="ImageBase" Type="Integer">4194304</Linker>
+			<Linker Name="ExeDescription" Type="String">RemObjects SDK - DataSnap Integration Pack</Linker>
+			<Linker Name="GenerateHpps">False</Linker>
+		</Linker>
+		<Directories>
+			<Directories Name="OutputDir" Type="String"></Directories>
+			<Directories Name="UnitOutputDir" Type="String">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDLLOutputDir" Type="String">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDCPOutputDir" Type="String">..\..\Dcu\D10</Directories>
+			<Directories Name="SearchPath" Type="String">..\;..\..\Dcu\D10</Directories>
+			<Directories Name="Packages" Type="String"></Directories>
+			<Directories Name="Conditionals" Type="String">REMOBJECTS_DESIGNTIME</Directories>
+			<Directories Name="DebugSourceDirs" Type="String"></Directories>
+			<Directories Name="UsePackages" Type="Boolean">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams" Type="String"></Parameters>
+			<Parameters Name="HostApplication" Type="String"></Parameters>
+			<Parameters Name="Launcher" Type="String"></Parameters>
+			<Parameters Name="UseLauncher" Type="Boolean">False</Parameters>
+			<Parameters Name="DebugCWD" Type="String"></Parameters>
+			<Parameters Name="RemoteHost" Type="String"></Parameters>
+			<Parameters Name="RemotePath" Type="String"></Parameters>
+			<Parameters Name="RemoteLauncher" Type="String"></Parameters>
+			<Parameters Name="RemoteCWD" Type="String"></Parameters>
+			<Parameters Name="RemoteDebug" Type="Boolean">False</Parameters>
+			<Parameters Name="Debug Symbols Search Path"></Parameters>
+			<Parameters Name="LoadAllSymbols">True</Parameters>
+			<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+		</Parameters>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo" Type="Boolean">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="MajorVer" Type="Integer">4</VersionInfo>
+			<VersionInfo Name="MinorVer" Type="Integer">0</VersionInfo>
+			<VersionInfo Name="Release" Type="Integer">0</VersionInfo>
+			<VersionInfo Name="Build" Type="Integer">404</VersionInfo>
+			<VersionInfo Name="Debug" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="PreRelease" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="Special" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="Private" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="DLL" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="Locale" Type="Integer">1033</VersionInfo>
+			<VersionInfo Name="CodePage" Type="Integer">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName" Type="String">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription" Type="String"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion" Type="String">4.0.0.404</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName" Type="String"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright" Type="String"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks" Type="String"></VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename" Type="String"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName" Type="String">RemObjects SDK</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion" Type="String">1.0.0.0</VersionInfoKeys>
+		</VersionInfoKeys>
+		<Language>
+			<Language Name="ActiveLang" Type="String"></Language>
+			<Language Name="ProjectLang" Type="String">$00000000</Language>
+			<Language Name="RootDir" Type="String"></Language>
+		</Language>
+	</Delphi.Personality>
+	<ModelSupport>False</ModelSupport>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D10.cfg b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D10.cfg
new file mode 100644
index 0000000..f67d1c8
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D10.cfg	
@@ -0,0 +1,53 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N0"..\..\Dcu\D10"
+-LE"..\..\Dcu\D10"
+-LN"..\..\Dcu\D10"
+-U"..\;..\..\Dcu\D10"
+-O"..\;..\..\Dcu\D10"
+-I"..\;..\..\Dcu\D10"
+-R"..\;..\..\Dcu\D10"
+-DREMOBJECTS_DESIGNTIME
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-SYMBOL_EXPERIMENTAL
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNIT_EXPERIMENTAL
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D10.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D10.dpk
new file mode 100644
index 0000000..3ec74a0
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D10.dpk	
@@ -0,0 +1,53 @@
+package RemObjects_DataSnap_D10;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - DataSnap Integration Pack'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+{$DEFINE REMOBJECTS_DESIGNTIME}
+
+requires
+  rtl,
+  designide,
+  dbrtl,
+  dsnap,
+  vcl,
+  inet,
+  RemObjects_Core_D10;
+
+contains
+  uRODataSnapConnection in 'uRODataSnapConnection.pas',
+  RemObjects_DataSnap_Reg in 'RemObjects_DataSnap_Reg.pas',
+  uRODataSnap_Async in 'uRODataSnap_Async.pas',
+  uRODataSnap_Intf in 'uRODataSnap_Intf.pas',
+  uRODataSnap_Invk in 'uRODataSnap_Invk.pas',
+  uRODataSnapBaseAppServer in 'uRODataSnapBaseAppServer.pas',
+  uRODataSnapProviderManager in 'uRODataSnapProviderManager.pas',
+  uRODataSnapProviderPublisher in 'uRODataSnapProviderPublisher.pas',
+  uRODataSnapModule in 'uRODataSnapModule.pas',
+  uRODataSnapNewServerModuleWizard in 'uRODataSnapNewServerModuleWizard.pas',
+  uRODataSnapPublishedProvidersCollection in 'uRODataSnapPublishedProvidersCollection.pas',
+  uRODataSnapRes in 'uRODataSnapRes.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D10.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D10.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D10.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D11.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D11.dpk
new file mode 100644
index 0000000..6ee60dd
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D11.dpk	
@@ -0,0 +1,52 @@
+package RemObjects_DataSnap_D11;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - DataSnap Integration Pack'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+{$DEFINE REMOBJECTS_DESIGNTIME}
+
+requires
+  rtl,
+  designide,
+  dsnap,
+  vcl,
+  inet,
+  RemObjects_Core_D11;
+
+contains
+  uRODataSnapConnection in 'uRODataSnapConnection.pas',
+  RemObjects_DataSnap_Reg in 'RemObjects_DataSnap_Reg.pas',
+  uRODataSnap_Async in 'uRODataSnap_Async.pas',
+  uRODataSnap_Intf in 'uRODataSnap_Intf.pas',
+  uRODataSnap_Invk in 'uRODataSnap_Invk.pas',
+  uRODataSnapBaseAppServer in 'uRODataSnapBaseAppServer.pas',
+  uRODataSnapProviderManager in 'uRODataSnapProviderManager.pas',
+  uRODataSnapProviderPublisher in 'uRODataSnapProviderPublisher.pas',
+  uRODataSnapModule in 'uRODataSnapModule.pas',
+  uRODataSnapNewServerModuleWizard in 'uRODataSnapNewServerModuleWizard.pas',
+  uRODataSnapPublishedProvidersCollection in 'uRODataSnapPublishedProvidersCollection.pas',
+  uRODataSnapRes in 'uRODataSnapRes.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D11.dproj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D11.dproj
new file mode 100644
index 0000000..44df8f9
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D11.dproj	
@@ -0,0 +1,102 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{c00123bd-dbb4-4671-b2ea-4cb563880662}</ProjectGuid>
+    <MainSource>RemObjects_DataSnap_D11.dpk</MainSource>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+    <DCC_DependencyCheckOutputName>..\..\Dcu\D11\RemObjects_DataSnap_D11.bpl</DCC_DependencyCheckOutputName>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DebugInformation>False</DCC_DebugInformation>
+    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+    <DCC_DcuOutput>..\..\Dcu\D10</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D10</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D10</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D10</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D10</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\;..\..\Dcu\D10</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\;..\..\Dcu\D10</DCC_ResourcePath>
+    <DCC_ObjPath>..\;..\..\Dcu\D10</DCC_ObjPath>
+    <DCC_IncludePath>..\;..\..\Dcu\D10</DCC_IncludePath>
+    <DCC_Define>REMOBJECTS_DESIGNTIME;RELEASE</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_SYMBOL_EXPERIMENTAL>False</DCC_SYMBOL_EXPERIMENTAL>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+    <DCC_UNIT_EXPERIMENTAL>False</DCC_UNIT_EXPERIMENTAL>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\;..\..\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\;..\..\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\;..\..\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\;..\..\Dcu\D11</DCC_IncludePath>
+    <DCC_Define>REMOBJECTS_DESIGNTIME</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_SYMBOL_EXPERIMENTAL>False</DCC_SYMBOL_EXPERIMENTAL>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+    <DCC_UNIT_EXPERIMENTAL>False</DCC_UNIT_EXPERIMENTAL>
+  </PropertyGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Delphi.Personality</Borland.Personality>
+    <Borland.ProjectType>Package</Borland.ProjectType>
+    <BorlandProject>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">RemObjects SDK - DataSnap Integration Pack</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">True</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">4</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">404</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">4.0.0.404</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">RemObjects_DataSnap_D11.dpk</Source></Source><Excluded_Packages>
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      <Excluded_Packages Name="$(BDS)\bin\dclbde100.bpl">CodeGear BDE DB Components</Excluded_Packages>
+      <Excluded_Packages Name="$(BDS)\bin\bcboffice2k100.bpl">CodeGear C++Builder Office 2000 Servers Package</Excluded_Packages>
+      <Excluded_Packages Name="$(BDS)\bin\bcbofficexp100.bpl">CodeGear C++Builder Office XP Servers Package</Excluded_Packages>
+      <Excluded_Packages Name="$(BDS)\bin\dcloffice2k100.bpl">Microsoft Office 2000 Sample Automation Server Wrapper Components</Excluded_Packages>
+      <Excluded_Packages Name="$(BDS)\bin\dclofficexp100.bpl">Microsoft Office XP Sample Automation Server Wrapper Components</Excluded_Packages>
+    </Excluded_Packages></Delphi.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
+  <ItemGroup>
+    <DelphiCompile Include="RemObjects_DataSnap_D11.dpk">
+      <MainSource>MainSource</MainSource>
+    </DelphiCompile>
+    <DCCReference Include="D:\Program files.all\Borland\RAD Studio\5.0\bin\designide.dcp" />
+    <DCCReference Include="D:\Program files.all\Borland\RAD Studio\5.0\bin\dsnap.dcp" />
+    <DCCReference Include="D:\Program files.all\Borland\RAD Studio\5.0\bin\inet.dcp" />
+    <DCCReference Include="D:\Program files.all\Borland\RAD Studio\5.0\bin\RemObjects_Core_D11.dcp" />
+    <DCCReference Include="D:\Program files.all\Borland\RAD Studio\5.0\bin\rtl.dcp" />
+    <DCCReference Include="D:\Program files.all\Borland\RAD Studio\5.0\bin\vcl.dcp" />
+    <DCCReference Include="RemObjects_DataSnap_Reg.pas" />
+    <DCCReference Include="uRODataSnapBaseAppServer.pas" />
+    <DCCReference Include="uRODataSnapConnection.pas" />
+    <DCCReference Include="uRODataSnapModule.pas" />
+    <DCCReference Include="uRODataSnapNewServerModuleWizard.pas" />
+    <DCCReference Include="uRODataSnapProviderManager.pas" />
+    <DCCReference Include="uRODataSnapProviderPublisher.pas" />
+    <DCCReference Include="uRODataSnapPublishedProvidersCollection.pas" />
+    <DCCReference Include="uRODataSnapRes.pas" />
+    <DCCReference Include="uRODataSnap_Async.pas" />
+    <DCCReference Include="uRODataSnap_Intf.pas" />
+    <DCCReference Include="uRODataSnap_Invk.pas" />
+  </ItemGroup>
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D11.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D11.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D11.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D12.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D12.dpk
new file mode 100644
index 0000000..92f2539
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D12.dpk	
@@ -0,0 +1,52 @@
+package RemObjects_DataSnap_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - DataSnap Integration Pack'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+{$DEFINE REMOBJECTS_DESIGNTIME}
+
+requires
+  rtl,
+  designide,
+  dsnap,
+  vcl,
+  inet,
+  RemObjects_Core_D12;
+
+contains
+  uRODataSnapConnection in 'uRODataSnapConnection.pas',
+  RemObjects_DataSnap_Reg in 'RemObjects_DataSnap_Reg.pas',
+  uRODataSnap_Async in 'uRODataSnap_Async.pas',
+  uRODataSnap_Intf in 'uRODataSnap_Intf.pas',
+  uRODataSnap_Invk in 'uRODataSnap_Invk.pas',
+  uRODataSnapBaseAppServer in 'uRODataSnapBaseAppServer.pas',
+  uRODataSnapProviderManager in 'uRODataSnapProviderManager.pas',
+  uRODataSnapProviderPublisher in 'uRODataSnapProviderPublisher.pas',
+  uRODataSnapModule in 'uRODataSnapModule.pas',
+  uRODataSnapNewServerModuleWizard in 'uRODataSnapNewServerModuleWizard.pas',
+  uRODataSnapPublishedProvidersCollection in 'uRODataSnapPublishedProvidersCollection.pas',
+  uRODataSnapRes in 'uRODataSnapRes.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D12.dproj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D12.dproj
new file mode 100644
index 0000000..5837df2
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D12.dproj	
@@ -0,0 +1,109 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{c00123bd-dbb4-4671-b2ea-4cb563880662}</ProjectGuid>
+			<MainSource>RemObjects_DataSnap_D12.dpk</MainSource>
+			<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+			<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+			<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D11\RemObjects_DataSnap_D11.bpl</DCC_DependencyCheckOutputName>
+			<ProjectVersion>11.1</ProjectVersion>
+			<Config Condition="'$(Config)'==''">Base</Config>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base)'!=''">
+			<DCC_SymbolReferenceInfo>1</DCC_SymbolReferenceInfo>
+			<DCC_CVT_WCHAR_TO_ACHAR>error</DCC_CVT_WCHAR_TO_ACHAR>
+			<DCC_IMPLICIT_STRING_CAST>error</DCC_IMPLICIT_STRING_CAST>
+			<DCC_EXPLICIT_STRING_CAST_LOSS>error</DCC_EXPLICIT_STRING_CAST_LOSS>
+			<DCC_CVT_WIDENING_STRING_LOST>error</DCC_CVT_WIDENING_STRING_LOST>
+			<DCC_EXPLICIT_STRING_CAST>error</DCC_EXPLICIT_STRING_CAST>
+			<DCC_CVT_ACHAR_TO_WCHAR>error</DCC_CVT_ACHAR_TO_WCHAR>
+			<DCC_IMPLICIT_STRING_CAST_LOSS>error</DCC_IMPLICIT_STRING_CAST_LOSS>
+			<DCC_CVT_NARROWING_STRING_LOST>error</DCC_CVT_NARROWING_STRING_LOST>
+			<GenDll>true</GenDll>
+			<DCC_DcpOutput>..\..\Dcu\D12</DCC_DcpOutput>
+			<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+			<DCC_DcuOutput>..\..\Dcu\D12</DCC_DcuOutput>
+			<GenPackage>true</GenPackage>
+			<DesignOnlyPackage>true</DesignOnlyPackage>
+			<DCC_ImageBase>00400000</DCC_ImageBase>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D12\RemObjects_DataSnap_D12.bpl</DCC_DependencyCheckOutputName>
+			<DCC_UnitSearchPath>..\..\Dcu\D12;..;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+			<DCC_Description>RemObjects SDK - DataSnap Integration Pack</DCC_Description>
+			<DCC_Define>REMOBJECTS_DESIGNTIME;$(DCC_Define)</DCC_Define>
+			<DCC_BplOutput>..\..\Dcu\D12</DCC_BplOutput>
+		</PropertyGroup>
+		<ItemGroup>
+			<DelphiCompile Include="RemObjects_DataSnap_D12.dpk">
+				<MainSource>MainSource</MainSource>
+			</DelphiCompile>
+			<DCCReference Include="rtl.dcp"/>
+			<DCCReference Include="designide.dcp"/>
+			<DCCReference Include="dsnap.dcp"/>
+			<DCCReference Include="vcl.dcp"/>
+			<DCCReference Include="inet.dcp"/>
+			<DCCReference Include="RemObjects_Core_D12.dcp"/>
+			<DCCReference Include="uRODataSnapConnection.pas"/>
+			<DCCReference Include="RemObjects_DataSnap_Reg.pas"/>
+			<DCCReference Include="uRODataSnap_Async.pas"/>
+			<DCCReference Include="uRODataSnap_Intf.pas"/>
+			<DCCReference Include="uRODataSnap_Invk.pas"/>
+			<DCCReference Include="uRODataSnapBaseAppServer.pas"/>
+			<DCCReference Include="uRODataSnapProviderManager.pas"/>
+			<DCCReference Include="uRODataSnapProviderPublisher.pas"/>
+			<DCCReference Include="uRODataSnapModule.pas"/>
+			<DCCReference Include="uRODataSnapNewServerModuleWizard.pas"/>
+			<DCCReference Include="uRODataSnapPublishedProvidersCollection.pas"/>
+			<DCCReference Include="uRODataSnapRes.pas"/>
+			<BuildConfiguration Include="Base">
+				<Key>Base</Key>
+			</BuildConfiguration>
+		</ItemGroup>
+		<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+		<ProjectExtensions>
+			<Borland.Personality>Delphi.Personality.12</Borland.Personality>
+			<Borland.ProjectType>Package</Borland.ProjectType>
+			<BorlandProject>
+				<Delphi.Personality>
+					<Parameters>
+						<Parameters Name="UseLauncher">False</Parameters>
+						<Parameters Name="LoadAllSymbols">True</Parameters>
+						<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+					</Parameters>
+					<VersionInfo>
+						<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+						<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+						<VersionInfo Name="MajorVer">4</VersionInfo>
+						<VersionInfo Name="MinorVer">0</VersionInfo>
+						<VersionInfo Name="Release">0</VersionInfo>
+						<VersionInfo Name="Build">404</VersionInfo>
+						<VersionInfo Name="Debug">False</VersionInfo>
+						<VersionInfo Name="PreRelease">False</VersionInfo>
+						<VersionInfo Name="Special">False</VersionInfo>
+						<VersionInfo Name="Private">False</VersionInfo>
+						<VersionInfo Name="DLL">False</VersionInfo>
+						<VersionInfo Name="Locale">1033</VersionInfo>
+						<VersionInfo Name="CodePage">1252</VersionInfo>
+					</VersionInfo>
+					<VersionInfoKeys>
+						<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="FileDescription"/>
+						<VersionInfoKeys Name="FileVersion">4.0.0.404</VersionInfoKeys>
+						<VersionInfoKeys Name="InternalName"/>
+						<VersionInfoKeys Name="LegalCopyright"/>
+						<VersionInfoKeys Name="LegalTrademarks"/>
+						<VersionInfoKeys Name="OriginalFilename"/>
+						<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+						<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+					</VersionInfoKeys>
+					<Source>
+						<Source Name="MainSource">RemObjects_DataSnap_D12.dpk</Source>
+					</Source>
+					<Excluded_Packages/>
+				</Delphi.Personality>
+			</BorlandProject>
+			<ProjectFileVersion>12</ProjectFileVersion>
+		</ProjectExtensions>
+	</Project>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D12.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D12.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D12.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D6.dof b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D6.dof
new file mode 100644
index 0000000..34bc30c
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D6.dof	
@@ -0,0 +1,97 @@
+[FileVersion]
+Version=6.0
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects SDK - DataSnap Integration Pack
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D6
+PackageDLLOutputDir=..\..\Dcu\D6
+PackageDCPOutputDir=..\..\Dcu\D6
+SearchPath=..\..\Dcu\D6
+Packages=vcl;rtl;dbrtl;adortl;vcldb;vclx;ibxpress;dsnap;cds;dsnapcrba;dsnapcon;VclSmp;vclie;xmlrtl;inet;inetdbbde;inetdbxpress;webdsnap;websnap;soaprtl;dbexpress;dbxcds;indy;dclOffice2k;CDK;ES_CodeSite20;CDKSmp;ESDelphiCommandCompiler;ESFileSearch;ESVisualCompositeExpert;EaglWk;ESGraphUtils;ESBase;CDKDesignTimeSupport;ESVsCp;bdertl;vcldbx;CDKHCC60;addict3_d6;addict3db_d6;dxdborD6;dxorgcD6;dxdbtrD6;dxEdtrD6;dxELibD6;dxExELD6;EQGridD6;dxExRwD6;dxcomnd6;dxDBEdD6;dxInsD6;dxFlowChartD6;dxForumLibD6;dxGrEdD6;ECQDBCD6;EQTLD6;EQDBTLD6;dxMasterViewD6;dxmdsd6;dxObjInsD6;dxPageControlD6;dxPSCoreD6;dxsbD6;dxtrmdD6;delphiwarnexpert;eBrazilClientComponents_60;eBrazilContentEditor1_60;tb2kComplete;Rz252N60;eDebugServer2_60;SynEdit_D6;CR_Designer;eBrazilDesigntime_60;eBrazilHtmlEdit2_60;eKorzhQueryPackEnhancements;sq6;kprocs6;Rz252D60;ThemeManager;TravityDevComponents;ESSampleCompositeEditors6;ESSampleComposites60;cxWebD6;cxWebSnapD6;cxWebTeeChartD6;tee;teedb;teeui;DXSockD6;DXAddonsD6;AstaIOD6;Asta_SOAPD6
+Conditionals=REMOBJECTS_DESIGNTIME
+DebugSourceDirs=
+UsePackages=0
+[Parameters]
+RunParams=
+HostApplication=
+Launcher=
+UseLauncher=0
+DebugCWD=
+[Version Info]
+IncludeVerInfo=1
+AutoIncBuild=0
+MajorVer=1
+MinorVer=0
+Release=0
+Build=0
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+[Version Info Keys]
+CompanyName=
+FileDescription=
+FileVersion=1.0.0.0
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+Comments=
+[Excluded Packages]
+L:\Packages\addict3db_d6.bpl=Addict 3.2 for Delphi 6 (DB Aware Components)
+L:\Packages\X255PD60.bpl=TurboPower XMLPartner Professional 2.55 Designtime package - VCL60
+l:\Packages\dclcxLibraryVCLD6.bpl=Express Cross Platform Library (VCL Edition) by Developer Express Inc.
+L:\Packages\dclcxEditorsVCLD6.bpl=ExpressEditors Library 4 (VCL Edition) by Developer Express Inc.
+L:\Packages\dclcxGridUtilsVCLD6.bpl=ExpressQuantumGrid 4 Utils (VCL Edition) by Developer Express Inc.
+L:\Packages\dclcxGridVCLD6.bpl=ExpressQuantumGrid 4 (VCL Edition) by Developer Express Inc.
+L:\Packages\dclcxSpreadSheetVCLD6.bpl=ExpressSpreadSheet (VCL Edition) by Developer Express Inc.
+[HistoryLists\hlConditionals]
+Count=1
+Item0=Development
+[HistoryLists\hlUnitAliases]
+Count=1
+Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D6.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D6.dpk
new file mode 100644
index 0000000..1d877bd
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D6.dpk	
@@ -0,0 +1,53 @@
+package RemObjects_DataSnap_D6;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - DataSnap Integration Pack'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+{$DEFINE REMOBJECTS_DESIGNTIME}
+
+requires
+  rtl,
+  designide,
+  RemObjects_Core_D6,
+  dbrtl,
+  dsnap,
+  vcl,
+  inet;
+
+contains
+  uRODataSnapConnection in 'uRODataSnapConnection.pas',
+  RemObjects_DataSnap_Reg in 'RemObjects_DataSnap_Reg.pas',
+  uRODataSnap_Async in 'uRODataSnap_Async.pas',
+  uRODataSnap_Intf in 'uRODataSnap_Intf.pas',
+  uRODataSnap_Invk in 'uRODataSnap_Invk.pas',
+  uRODataSnapBaseAppServer in 'uRODataSnapBaseAppServer.pas',
+  uRODataSnapProviderManager in 'uRODataSnapProviderManager.pas',
+  uRODataSnapProviderPublisher in 'uRODataSnapProviderPublisher.pas',
+  uRODataSnapModule in 'uRODataSnapModule.pas',
+  uRODataSnapNewServerModuleWizard in 'uRODataSnapNewServerModuleWizard.pas',
+  uRODataSnapPublishedProvidersCollection in 'uRODataSnapPublishedProvidersCollection.pas',
+  uRODataSnapRes in 'uRODataSnapRes.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D6.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D6.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D6.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D7.dof b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D7.dof
new file mode 100644
index 0000000..274862e
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D7.dof	
@@ -0,0 +1,139 @@
+[FileVersion]
+Version=7.0
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects SDK - DataSnap Integration Pack
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D7
+PackageDLLOutputDir=..\..\Dcu\D7
+PackageDCPOutputDir=..\..\Dcu\D7
+SearchPath=..\..\Dcu\D7;..\
+Packages=vcl;rtl;vclx;indy;inet;xmlrtl;vclie;inetdbbde;inetdbxpress;dbrtl;dsnap;dsnapcon;vcldb;soaprtl;VclSmp;dbexpress;dbxcds;inetdb;bdertl;vcldbx;webdsnap;websnap;adortl;ibxpress;teeui;teedb;tee;dss;visualclx;visualdbclx;vclactnband;vclshlctrls;IntrawebDB_50_70;Intraweb_50_70;Rave50CLX;Rave50VCL;dclOfficeXP;cxWebD7;cxWebTeeChartD7;cxWebSnapD7
+Conditionals=REMOBJECTS_DESIGNTIME
+DebugSourceDirs=
+UsePackages=0
+[Parameters]
+RunParams=
+HostApplication=
+Launcher=
+UseLauncher=0
+DebugCWD=
+[Language]
+ActiveLang=
+ProjectLang=
+RootDir=
+[Version Info]
+IncludeVerInfo=1
+AutoIncBuild=0
+MajorVer=2
+MinorVer=0
+Release=0
+Build=122
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=2.0.0.122
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
+[Excluded Packages]
+L:\Packages\eBrazil_70.bpl=elitedevelopments Library - Brazil - FOR INTERNAL USE ONLY
+L:\Packages\eBrazilComponents_70.bpl=elitedevelopments Library - Brazil Components - FOR INTERNAL USE ONLY
+L:\Packages\eBrazilContentEditor_70.bpl=elitedevelopments Library - Brazil Content Editor 2.0 - FOR INTERNAL USE ONLY
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D7.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D7.dpk
new file mode 100644
index 0000000..57f695b
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D7.dpk	
@@ -0,0 +1,53 @@
+package RemObjects_DataSnap_D7;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - DataSnap Integration Pack'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+{$DEFINE REMOBJECTS_DESIGNTIME}
+
+requires
+  rtl,
+  designide,
+  RemObjects_Core_D7,
+  dbrtl,
+  dsnap,
+  vcl,
+  inet;
+
+contains
+  uRODataSnapConnection in 'uRODataSnapConnection.pas',
+  RemObjects_DataSnap_Reg in 'RemObjects_DataSnap_Reg.pas',
+  uRODataSnap_Async in 'uRODataSnap_Async.pas',
+  uRODataSnap_Intf in 'uRODataSnap_Intf.pas',
+  uRODataSnap_Invk in 'uRODataSnap_Invk.pas',
+  uRODataSnapBaseAppServer in 'uRODataSnapBaseAppServer.pas',
+  uRODataSnapProviderManager in 'uRODataSnapProviderManager.pas',
+  uRODataSnapProviderPublisher in 'uRODataSnapProviderPublisher.pas',
+  uRODataSnapModule in 'uRODataSnapModule.pas',
+  uRODataSnapNewServerModuleWizard in 'uRODataSnapNewServerModuleWizard.pas',
+  uRODataSnapPublishedProvidersCollection in 'uRODataSnapPublishedProvidersCollection.pas',
+  uRODataSnapRes in 'uRODataSnapRes.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D7.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D7.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_D7.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_Glyphs.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_Glyphs.res
new file mode 100644
index 0000000..0578e6e
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_Glyphs.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_Reg.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_Reg.pas
new file mode 100644
index 0000000..731fad5
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/RemObjects_DataSnap_Reg.pas	
@@ -0,0 +1,51 @@
+unit RemObjects_DataSnap_Reg;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - CodeGen
+{
+{ compiler: Delphi 5 and up, Kylix 2 and up
+{ platform: Win32, Linux
+{
+{ (c)opyright RemObjects Software. all rights reserved.
+{
+{ Using this code requires a valid license of the RemObjects SDK
+{ which can be obtained at http://www.remobjects.com.
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+{$R RemObjects_DataSnap_Glyphs.res}
+
+interface
+
+procedure Register;
+
+implementation
+
+uses Classes, uROClasses,
+     {$IFNDEF DELPHI5}DesignIntf, DesignEditors, DMForm, {$ELSE} DsgnIntf, DmDesigner, {$ENDIF}
+     uRORes,
+     uRODataSnapModule,
+     uRODataSnapConnection, uRODataSnapProviderPublisher;
+
+procedure Register;
+begin
+  RegisterComponents(str_ProductName,[TRODataSnapConnection,
+                                      TRODataSnapProviderPublisher]);
+
+  { if we don't register this, we get a property editor registered for
+    TCustomRemoteServer that's useless to us. }
+  RegisterPropertyEditor(TypeInfo(string), TRODataSnapConnection, 'ServerName', TStringProperty);
+
+  {$IFDEF DELPHI5}
+  RegisterCustomModule(TRODataSnapModule,TDataModuleDesignerCustomModule);
+  {$ELSE}
+  RegisterCustomModule(TRODataSnapModule,TCustomModule);
+  {$ENDIF}
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnap.rodl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnap.rodl
new file mode 100644
index 0000000..5271bf2
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnap.rodl	
@@ -0,0 +1,109 @@
+<Library Name="uRODataSnap" UID="{9EC7C50C-DAC2-48A9-9A0F-CBAA29A11EF7}" Version="3.0">
+<Services>
+<Service Name="AppServer" UID="{C7A0ADB7-2DE1-4AD6-A518-D64B1D9CB236}" ImplUnit="uRODataSnapModule" ImplClass="TRODataSnapModule">
+<Interfaces>
+<Interface Name="Default" UID="{1AEFCC20-7A24-11D2-98B0-C69BEB4B5B6D}">
+<Operations>
+<Operation Name="AS_ApplyUpdates" UID="{C6FC4450-1E8F-4088-B589-3EF7CAE3F116}">
+<Parameters>
+<Parameter Name="Result" DataType="binary" Flag="Result">
+</Parameter>
+<Parameter Name="ProviderName" DataType="WideString" Flag="In" >
+</Parameter>
+<Parameter Name="Delta" DataType="Binary" Flag="In" >
+</Parameter>
+<Parameter Name="MaxErrors" DataType="Integer" Flag="In" >
+</Parameter>
+<Parameter Name="ErrorCount" DataType="Integer" Flag="Out" >
+</Parameter>
+<Parameter Name="OwnerData" DataType="String" Flag="InOut" >
+</Parameter>
+</Parameters>
+</Operation>
+<Operation Name="AS_GetRecords" UID="{E6FDDD1C-4BF7-49B8-A113-36041E8135D2}">
+<Parameters>
+<Parameter Name="Result" DataType="binary" Flag="Result">
+</Parameter>
+<Parameter Name="ProviderName" DataType="WideString" Flag="In" >
+</Parameter>
+<Parameter Name="Count" DataType="Integer" Flag="In" >
+</Parameter>
+<Parameter Name="RecsOut" DataType="Integer" Flag="Out" >
+</Parameter>
+<Parameter Name="Options" DataType="Integer" Flag="In" >
+</Parameter>
+<Parameter Name="CommandText" DataType="WideString" Flag="In" >
+</Parameter>
+<Parameter Name="Params" DataType="Binary" Flag="InOut" >
+</Parameter>
+<Parameter Name="OwnerData" DataType="String" Flag="InOut" >
+</Parameter>
+</Parameters>
+</Operation>
+<Operation Name="AS_DataRequest" UID="{E0E88556-1DA8-4025-AF70-B5240A5F8F7A}">
+<Parameters>
+<Parameter Name="Result" DataType="binary" Flag="Result">
+</Parameter>
+<Parameter Name="ProviderName" DataType="WideString" Flag="In" >
+</Parameter>
+<Parameter Name="Data" DataType="Binary" Flag="In" >
+</Parameter>
+</Parameters>
+</Operation>
+<Operation Name="AS_GetProviderNames" UID="{B90907BB-07EB-43FE-80E2-FC519AFF6E2B}">
+<Parameters>
+<Parameter Name="Result" DataType="TProviderNames" Flag="Result">
+</Parameter>
+</Parameters>
+</Operation>
+<Operation Name="AS_GetParams" UID="{75A73D48-E132-4065-8304-FE408C74FAA6}">
+<Parameters>
+<Parameter Name="Result" DataType="binary" Flag="Result">
+</Parameter>
+<Parameter Name="ProviderName" DataType="WideString" Flag="In" >
+</Parameter>
+<Parameter Name="OwnerData" DataType="String" Flag="InOut" >
+</Parameter>
+</Parameters>
+</Operation>
+<Operation Name="AS_RowRequest" UID="{C130225A-AE9B-4070-B40C-C58EB2A2AE5D}">
+<Parameters>
+<Parameter Name="Result" DataType="binary" Flag="Result">
+</Parameter>
+<Parameter Name="ProviderName" DataType="WideString" Flag="In" >
+</Parameter>
+<Parameter Name="Row" DataType="Binary" Flag="In" >
+</Parameter>
+<Parameter Name="RequestType" DataType="Integer" Flag="In" >
+</Parameter>
+<Parameter Name="OwnerData" DataType="String" Flag="InOut" >
+</Parameter>
+</Parameters>
+</Operation>
+<Operation Name="AS_Execute" UID="{6D3093D6-EAD4-4671-A1CF-CD03BB33DFF7}">
+<Parameters>
+<Parameter Name="ProviderName" DataType="WideString" Flag="In" >
+</Parameter>
+<Parameter Name="CommandText" DataType="WideString" Flag="In" >
+</Parameter>
+<Parameter Name="Params" DataType="Binary" Flag="InOut" >
+</Parameter>
+<Parameter Name="OwnerData" DataType="String" Flag="InOut" >
+</Parameter>
+</Parameters>
+</Operation>
+</Operations>
+</Interface>
+</Interfaces>
+</Service>
+</Services>
+<Structs>
+</Structs>
+<Enums>
+</Enums>
+<Arrays>
+<Array Name="TProviderNames" UID="{7DF5C761-593D-4FB2-B636-0FB35AF4DEDE}">
+<ElementType DataType="string" />
+</Array>
+</Arrays>
+</Library>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnapBaseAppServer.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnapBaseAppServer.pas
new file mode 100644
index 0000000..e01b8ab
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnapBaseAppServer.pas	
@@ -0,0 +1,188 @@
+unit uRODataSnapBaseAppServer;
+
+interface
+
+uses Classes, Provider, 
+     {$IFDEF MSWINDOWS}
+     Windows, { for InterlocIncrement/Decrement }
+     {$ENDIF MSWINDOWS}
+     uROTypes, uRORemoteDataModule, uRODataSnap_Intf;
+
+type TRODataSnapBaseAppServer = class(TRORemoteDataModule, IUnknown, uRODataSnap_Intf.IAppServer)
+     private
+       fRefCount: Integer;
+
+     protected { uRODataSnap_Intf.IAppServer }
+       function AS_ApplyUpdates(const ProviderName: WideString; const Delta: Binary; const MaxErrors: Integer; out ErrorCount: Integer; var OwnerData: AnsiString): binary;
+       function AS_GetRecords(const ProviderName: WideString; const Count: Integer; out RecsOut: Integer; const Options: Integer; const CommandText: WideString; var Params: Binary; var OwnerData: AnsiString): binary;
+       function AS_DataRequest(const ProviderName: WideString; const Data: Binary): binary;
+       function AS_GetProviderNames: TProviderNames;
+       function AS_GetParams(const ProviderName: WideString; var OwnerData: AnsiString): binary;
+       function AS_RowRequest(const ProviderName: WideString; const Row: Binary; const RequestType: Integer; var OwnerData: AnsiString): binary;
+       procedure AS_Execute(const ProviderName: WideString; const CommandText: WideString; var Params: Binary; var OwnerData: AnsiString);
+
+       { we need to reimplement AdRef/Release to provide reference counting }
+       function _AddRef: Integer; override; stdcall;
+       function _Release: Integer; override; stdcall;
+       function IUnknown._AddRef = _AddRef;
+       function IUnknown._Release = _Release;
+
+     protected
+       function GetProviderByName(const iProviderName:string):TCustomProvider; virtual; abstract;
+       function GetProviderNames:TProviderNames; virtual; abstract;
+     end;
+
+implementation
+
+uses SysUtils,
+     {$IFDEF DEBUG_REMOBJECTS_DATASNAP}eDebugServer,{$ENDIF}
+     uROBinaryHelpers, uROClasses;
+
+function TRODataSnapBaseAppServer.AS_ApplyUpdates(const ProviderName: WideString; const Delta: Binary; const MaxErrors: Integer; out ErrorCount: Integer; var OwnerData: AnsiString): binary;
+var
+  lProvider:TCustomProvider;
+  lOwnerData:OleVariant;
+begin
+  {$IFDEF DEBUG_REMOBJECTS_DATASNAP}
+  DebugServer.EnterMethodEx(self,'IAppServer.AS_ApplyUpdates(ProviderName=%s,MaxErrors=%d)',[ProviderName,MaxErrors]); try
+  try
+  {$ENDIF DEBUG_REMOBJECTS_DATASNAP}
+
+  lProvider := GetProviderByName(ProviderName);
+  lOwnerData := OwnerData;
+  result := BinaryFromVariant(lProvider.ApplyUpdates(VariantFromBinary(Delta),MaxErrors,ErrorCount,lOwnerData));
+  OwnerData := VarToAnsiStr(lOwnerData);
+
+  {$IFDEF DEBUG_REMOBJECTS_DATASNAP}
+  except DebugServer.WriteException(); raise; end;
+  finally DebugServer.ExitMethodEx(self,'IAppServer.AS_ApplyUpdates(ErrorCount=%s)',[ErrorCount]); end;
+  {$ENDIF DEBUG_REMOBJECTS_DATASNAP}
+end;
+
+function TRODataSnapBaseAppServer.AS_GetRecords(const ProviderName: WideString; const Count: Integer; out RecsOut: Integer; const Options: Integer; const CommandText: WideString; var Params: Binary; var OwnerData: AnsiString): binary;
+var lProvider:TCustomProvider;
+    lOwnerData,lParams:OleVariant;
+begin
+  {$IFDEF DEBUG_REMOBJECTS_DATASNAP}
+  DebugServer.EnterMethodEx(self,'IAppServer.AS_GetRecords(ProviderName=%s,Count=%d,Options=%d,CommandText=%s)',[string(ProviderName),Count,Options,CommandText]); try
+  try
+  {$ENDIF DEBUG_REMOBJECTS_DATASNAP}
+
+  lProvider := GetProviderByName(ProviderName);
+  //result := BinaryFromVariant(lProvider.GetRecords(Count, RecsOut, Options));
+  lOwnerData := OwnerData;
+  lParams := VariantFromBinary(Params);
+  result := BinaryFromVariant(lProvider.GetRecords(Count, RecsOut, Options, CommandText, lParams, lOwnerData));
+  FreeAndNil(Params);
+  Params := BinaryFromVariant(lParams);
+  OwnerData := VarToAnsiStr(lOwnerData);
+
+  {$IFDEF DEBUG_REMOBJECTS_DATASNAP}
+  except DebugServer.WriteException(); raise; end;
+  finally DebugServer.ExitMethodEx(self,'IAppServer.AS_GetRecords(RecsOut=%d)',[RecsOut]); end;
+  {$ENDIF DEBUG_REMOBJECTS_DATASNAP}
+end;
+
+function TRODataSnapBaseAppServer.AS_DataRequest(const ProviderName: WideString; const Data: Binary): binary;
+var lProvider:TCustomProvider;
+begin
+  {$IFDEF DEBUG_REMOBJECTS_DATASNAP}
+  DebugServer.EnterMethodEx(self,'IAppServer.AS_DataRequest(ProviderName=%s)',[ProviderName]); try
+  try
+  {$ENDIF DEBUG_REMOBJECTS_DATASNAP}
+
+  lProvider := GetProviderByName(ProviderName);
+  result := BinaryFromVariant(lProvider.DataRequest(VariantFromBinary(Data)));
+
+  {$IFDEF DEBUG_REMOBJECTS_DATASNAP}
+  except DebugServer.WriteException(); raise; end;
+  finally DebugServer.ExitMethodEx(self,'IAppServer.AS_DataRequest()'); end;
+  {$ENDIF DEBUG_REMOBJECTS_DATASNAP}
+end;
+
+function TRODataSnapBaseAppServer.AS_GetProviderNames: TProviderNames;
+begin
+  {$IFDEF DEBUG_REMOBJECTS_DATASNAP}
+  DebugServer.EnterMethodEx(self,'IAppServer.AS_GetProviderNames()'); try
+  try
+  {$ENDIF DEBUG_REMOBJECTS_DATASNAP}
+
+  result := GetProviderNames();
+
+  {$IFDEF DEBUG_REMOBJECTS_DATASNAP}
+  except DebugServer.WriteException(); raise; end;
+  finally DebugServer.ExitMethodEx(self,'IAppServer.AS_GetProviderNames()'); end;
+  {$ENDIF DEBUG_REMOBJECTS_DATASNAP}
+end;
+
+function TRODataSnapBaseAppServer.AS_GetParams(const ProviderName: WideString; var OwnerData: AnsiString): binary;
+var lProvider:TCustomProvider;
+    lOwnerData:OleVariant;
+begin
+  {$IFDEF DEBUG_REMOBJECTS_DATASNAP}
+  DebugServer.EnterMethodEx(self,'IAppServer.AS_GetParams(ProviderName=%s)',[ProviderName]); try
+  try
+  {$ENDIF DEBUG_REMOBJECTS_DATASNAP}
+
+  lProvider := GetProviderByName(ProviderName);
+  lOwnerData := OwnerData;
+  result := BinaryFromVariant(lProvider.GetParams(lOwnerData));
+  OwnerData := VarToAnsiStr(lOwnerData);
+
+  {$IFDEF DEBUG_REMOBJECTS_DATASNAP}
+  except DebugServer.WriteException(); raise; end;
+  finally DebugServer.ExitMethodEx(self,'IAppServer.AS_GetParams()'); end;
+  {$ENDIF DEBUG_REMOBJECTS_DATASNAP}
+end;
+
+function TRODataSnapBaseAppServer.AS_RowRequest(const ProviderName: WideString; const Row: Binary; const RequestType: Integer; var OwnerData: AnsiString): binary;
+var lProvider:TCustomProvider;
+    lOwnerData:OleVariant;
+begin
+  lProvider := GetProviderByName(ProviderName);
+  lOwnerData := OwnerData;
+  result := BinaryFromVariant(lProvider.RowRequest(VariantFromBinary(Row),RequestType,lOwnerData));
+  OwnerData := VarToAnsiStr(lOwnerData);
+end;
+
+procedure TRODataSnapBaseAppServer.AS_Execute(const ProviderName: WideString; const CommandText: WideString; var Params: Binary; var OwnerData: AnsiString);
+var lProvider:TCustomProvider;
+    lParams,lOwnerData:OleVariant;
+begin
+  {$IFDEF DEBUG_REMOBJECTS_DATASNAP}
+  DebugServer.EnterMethodEx(self,'IAppServer.AS_Execute(ProviderName=%s,CommandText=%s)',[string(ProviderName),CommandText]); try
+  try
+  {$ENDIF DEBUG_REMOBJECTS_DATASNAP}
+
+  lProvider := GetProviderByName(ProviderName);
+  lOwnerData := OwnerData;
+  lParams := VariantFromBinary(Params);
+  lProvider.Execute(Commandtext,lParams,lOwnerData);
+  FreeAndNil(Params);
+  Params := BinaryFromVariant(lParams);
+  OwnerData := VarToAnsiStr(lOwnerData);
+
+  {$IFDEF DEBUG_REMOBJECTS_DATASNAP}
+  except DebugServer.WriteException(); raise; end;
+  finally DebugServer.ExitMethodEx(self,'IAppServer.AS_Execute()'); end;
+  {$ENDIF DEBUG_REMOBJECTS_DATASNAP}
+end;
+
+function TRODataSnapBaseAppServer._AddRef: Integer;
+begin
+  if not (csDesigning in ComponentState) then begin
+    result := InterlockedIncrement(fRefCount);
+  end
+  else Result := 0; { To keep the warning away }
+end;
+
+function TRODataSnapBaseAppServer._Release: Integer;
+begin
+  if not (csDesigning in ComponentState) then begin
+    result := InterlockedDecrement(fRefCount);
+    if result = 0 then Destroy;
+  end
+  else Result := 0; { To keep the warning away }
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnapConnection.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnapConnection.pas
new file mode 100644
index 0000000..a423712
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnapConnection.pas	
@@ -0,0 +1,424 @@
+unit uRODataSnapConnection;
+
+interface
+
+uses DBClient, Classes, Midas,
+     {$IFDEF MSWINDOWS}
+     ActiveX, ComObj,{ for ISupportErrorInfo }
+     {$ENDIF MSWINDOWS}
+     uROClient, 
+     uRODataSnap_Intf;
+
+type TROCustomDataSnapConnection = class;
+     
+     TRODataSnapConnectionAssignProxyEvent = procedure(Sender : TROCustomDataSnapConnection; var aProxy: IAppServer) of object;
+     
+     TROCustomDataSnapConnection = class(TCustomRemoteServer, Midas.IAppServer{$IFDEF MSWINDOWS}, ISupportErrorInfo{$ENDIF MSWINDOWS})
+     private
+       fMessage: TROMessage;
+       fChannel: TRoTransportChannel;
+       fStoreConnected: boolean;
+       fProxy:uRODataSnap_Intf.IAppServer;
+       fServerName: string;
+
+       fOnAssignProxy: TRODataSnapConnectionAssignProxyEvent;
+       procedure SetMessage(const Value: TROMessage);
+       procedure SetChannel(const Value: TRoTransportChannel);
+       procedure SetServerName(const Value: string);
+
+       procedure TriggerAfterConnect;
+
+     private
+
+       { IAppServer }
+       function AS_ApplyUpdates(const ProviderName: WideString; Delta: OleVariant; MaxErrors: Integer; out ErrorCount: Integer; var OwnerData: OleVariant): OleVariant; safecall;
+       function AS_DataRequest(const ProviderName: WideString; Data: OleVariant): OleVariant; safecall;
+       procedure AS_Execute(const ProviderName, CommandText: WideString; var Params, OwnerData: OleVariant); safecall;
+       function AS_GetParams(const ProviderName: WideString; var OwnerData: OleVariant): OleVariant; safecall;
+       function AS_GetProviderNames: OleVariant; safecall;
+       function AS_GetRecords(const ProviderName: WideString; Count: Integer; out RecsOut: Integer; Options: Integer; const CommandText: WideString; var Params, OwnerData: OleVariant): OleVariant; safecall;
+       function AS_RowRequest(const ProviderName: WideString; Row: OleVariant; RequestType: Integer; var OwnerData: OleVariant): OleVariant; safecall;
+
+       { ISupportErrorInfo }
+       {$IFDEF MSWINDOWS}
+       function InterfaceSupportsErrorInfo(const iid: TIID): HResult; stdcall;
+       {$ENDIF MSWINDOWS}
+
+     protected
+       function GetConnected: boolean; override;
+       procedure SetConnected(Value: boolean); override;
+       procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+       procedure DoAssignProxy; virtual;
+     public
+       constructor Create(iOwner:TComponent); override;
+       function GetServer: Midas.IAppServer; override;
+
+       procedure GetProviderNames(Proc: TGetStrProc); override;
+
+       property StoreConnected:boolean read fStoreConnected write fStoreConnected default false;
+
+       { ToDo: Connected property is not always properly set to "false"? }
+       property Connected:boolean read GetConnected write SetConnected stored fStoreConnected default false;
+       property Message:TROMessage read fMessage write SetMessage;
+       property Channel:TRoTransportChannel read fChannel write SetChannel;
+
+       { ToDo: create a proper property editor for this }
+       property ServerName:string read fServerName write SetServerName;
+
+
+       {$IFDEF MSWINDOWS}
+       function SafeCallException(ExceptObject: TObject; ExceptAddr: Pointer): HResult; override;
+       {$ENDIF}
+       property OnAssignProxy: TRODataSnapConnectionAssignProxyEvent read fOnAssignProxy write fOnAssignProxy;
+     end;
+
+     TRODataSnapConnection = class(TROCustomDataSnapConnection)
+     published
+       property Message;
+       property Channel;
+       property StoreConnected;
+       property Connected;
+       property ServerName;
+
+       property OnAssignProxy;
+     end;
+
+implementation
+
+uses DB, SysUtils, Variants,
+     {$IFDEF REMOBJECTS_DESIGNTIME}Forms, Controls, {$ENDIF}
+     {$IFDEF DEBUG_REMOBJECTS_DATASNAP}eDebugServer,{$ENDIF}
+     uROTypes, uROBinaryHelpers, uROClasses;
+
+{ TROCustomDataSnapConnection }
+
+constructor TROCustomDataSnapConnection.Create(iOwner: TComponent);
+begin
+  inherited;
+  ServerName := 'IAppServer';
+end;
+
+function TROCustomDataSnapConnection.AS_ApplyUpdates(const ProviderName: WideString; Delta: OleVariant; MaxErrors: Integer;  out ErrorCount: Integer; var OwnerData: OleVariant): OleVariant;
+var lDelta,lResult:Binary;
+    lOwnerData:Ansistring;
+begin
+  {$IFDEF DEBUG_REMOBJECTS_DATASNAP}
+  DebugServer.EnterMethodEx(self,'TROCustomDataSnapConnection.AS_ApplyUpdates(ProviderName=%s,MaxErrors=%d)',[ProviderName,MaxErrors]); try
+  try
+  {$ENDIF DEBUG_REMOBJECTS_DATASNAP}
+
+  Connected := true;
+  lOwnerData := VarToAnsiStr(OwnerData);
+  lDelta := BinaryFromVariant(Delta);
+  try
+    lResult := fProxy.AS_ApplyUpdates(ProviderName,lDelta,MaxErrors,ErrorCount,lOwnerData);
+    try
+      result := VariantFromBinary(lResult);
+    finally
+      FreeAndNil(lResult);
+    end;
+  finally
+    FreeAndNil(lDelta);
+  end;
+  OwnerData := lOwnerData;
+
+  {$IFDEF DEBUG_REMOBJECTS_DATASNAP}
+  except DebugServer.WriteException(); raise; end;
+  finally DebugServer.ExitMethodEx(self,'TROCustomDataSnapConnection.AS_ApplyUpdates(ErrorCount=%d)',[ErrorCount]); end;
+  {$ENDIF DEBUG_REMOBJECTS_DATASNAP}
+end;
+
+function TROCustomDataSnapConnection.AS_DataRequest(const ProviderName: WideString; Data: OleVariant): OleVariant;
+var lResult, tmp:Binary;
+begin
+  {$IFDEF DEBUG_REMOBJECTS_DATASNAP}
+  DebugServer.EnterMethodEx(self,'TROCustomDataSnapConnection.AS_DataRequest(ProviderName=%s)',[ProviderName]); try
+  try
+  {$ENDIF DEBUG_REMOBJECTS_DATASNAP}
+
+  Connected := true;
+  tmp:=BinaryFromVariant(Data);
+  try
+    lResult := fProxy.AS_DataRequest(ProviderName,tmp);
+  finally
+    FreeAndNil(tmp);
+  end;
+
+  try
+    result := VariantFromBinary(lResult);
+  finally
+    FreeAndNil(lResult);
+  end;
+
+  {$IFDEF DEBUG_REMOBJECTS_DATASNAP}
+  except DebugServer.WriteException(); raise; end;
+  finally DebugServer.ExitMethodEx(self,'TROCustomDataSnapConnection.AS_DataRequest()'); end;
+  {$ENDIF DEBUG_REMOBJECTS_DATASNAP}
+end;
+
+procedure TROCustomDataSnapConnection.AS_Execute(const ProviderName,CommandText: WideString; var Params, OwnerData: OleVariant);
+var lParams,lInParams:Binary;
+    lOwnerData:Ansistring;
+begin
+  {$IFDEF DEBUG_REMOBJECTS_DATASNAP}
+  DebugServer.EnterMethodEx(self,'TROCustomDataSnapConnection.AS_Execute(ProviderName=%s,CommandText=%s)',[ProviderName,CommandText]); try
+  try
+  {$ENDIF DEBUG_REMOBJECTS_DATASNAP}
+
+  Connected := true;
+  lOwnerData := VarToAnsiStr(OwnerData);
+  lParams := BinaryFromVariant(Params);
+  lInParams := lParams;
+  try
+    fProxy.AS_Execute(ProviderName,CommandText,lParams,lOwnerData);
+    Params := VariantFromBinary(lParams);
+  finally
+    if (lParams <> lInParams) then FreeAndNil(lParams);
+    freeAndNil(lInParams);
+  end;
+  OwnerData := lOwnerData;
+
+  {$IFDEF DEBUG_REMOBJECTS_DATASNAP}
+  except DebugServer.WriteException(); raise; end;
+  finally DebugServer.ExitMethodEx(self,'TROCustomDataSnapConnection.AS_Execute()'); end;
+  {$ENDIF DEBUG_REMOBJECTS_DATASNAP}
+end;
+
+function TROCustomDataSnapConnection.AS_GetParams(const ProviderName: WideString; var OwnerData: OleVariant): OleVariant;
+var lResult:Binary;
+    lOwnerData:Ansistring;
+begin
+  {$IFDEF DEBUG_REMOBJECTS_DATASNAP}
+  DebugServer.EnterMethodEx(self,'TROCustomDataSnapConnection.AS_GetParams(ProviderName=%s)',[ProviderName]); try
+  try
+  {$ENDIF DEBUG_REMOBJECTS_DATASNAP}
+
+  Connected := true;
+  lOwnerData := VarToAnsiStr(OwnerData);
+  lResult := fProxy.AS_GetParams(ProviderName,lOwnerData);
+  try
+    result := VariantFromBinary(lResult);
+  finally
+    FreeAndNil(lResult);
+  end;
+  OwnerData := lOwnerData;
+
+  {$IFDEF DEBUG_REMOBJECTS_DATASNAP}
+  except DebugServer.WriteException(); raise; end;
+  finally DebugServer.ExitMethodEx(self,'TROCustomDataSnapConnection.AS_GetParams()'); end;
+  {$ENDIF DEBUG_REMOBJECTS_DATASNAP}
+end;
+
+function TROCustomDataSnapConnection.AS_GetProviderNames: OleVariant;
+var lProviderNames:TProviderNames;
+    i:integer;
+begin
+  {$IFDEF DEBUG_REMOBJECTS_DATASNAP}
+  DebugServer.EnterMethodEx(self,'TROCustomDataSnapConnection.AS_GetProviderNames()'); try
+  try
+  {$ENDIF DEBUG_REMOBJECTS_DATASNAP}
+
+  Connected := true;
+  lProviderNames := fProxy.AS_GetProviderNames();
+  try
+    result := VarArrayCreate([0,lProviderNames.Count-1],varString);
+    for i := 0 to lProviderNames.Count-1 do begin
+      result[i] := lProviderNames[i];
+    end;    { for }
+  finally
+    lProviderNames.Free();
+  end;
+
+  {$IFDEF DEBUG_REMOBJECTS_DATASNAP}
+  except DebugServer.WriteException(); raise; end;
+  finally DebugServer.ExitMethodEx(self,'TROCustomDataSnapConnection.AS_GetProviderNames()'); end;
+  {$ENDIF DEBUG_REMOBJECTS_DATASNAP}
+end;
+
+function TROCustomDataSnapConnection.AS_GetRecords(const ProviderName: WideString; Count: Integer; out RecsOut: Integer; Options: Integer; const CommandText: WideString; var Params, OwnerData: OleVariant): OleVariant;
+var lParams,lInParams,lResult:Binary;
+    lOwnerData:Ansistring;
+begin
+  {$IFDEF DEBUG_REMOBJECTS_DATASNAP}
+  DebugServer.EnterMethodEx(self,'TROCustomDataSnapConnection.AS_GetRecords(ProviderName=%s,Count=%d,Options=%d)',[ProviderName,Count,Options]); try
+  try
+  {$ENDIF DEBUG_REMOBJECTS_DATASNAP}
+
+  Connected := true;
+  lOwnerData := VarToAnsiStr(OwnerData);
+  lParams := BinaryFromVariant(Params);
+  lInParams := lParams;
+  try
+    lResult := fProxy.AS_GetRecords(ProviderName,Count,RecsOut,Options,CommandText,lParams,lOwnerData);
+    try
+      result := VariantFromBinary(lResult);
+    finally
+      FreeAndNil(lResult);
+    end;
+    Params := VariantFromBinary(lParams);
+  finally
+    if (lParams <> lInParams) then FreeAndNil(lParams);
+    FreeAndNil(lInParams);
+  end;
+  OwnerData := lOwnerData;
+
+  {$IFDEF DEBUG_REMOBJECTS_DATASNAP}
+  except DebugServer.WriteException(); raise; end;
+  finally DebugServer.ExitMethodEx(self,'TROCustomDataSnapConnection.AS_GetRecords(RecsOut=%d)',[RecsOut]); end;
+  {$ENDIF DEBUG_REMOBJECTS_DATASNAP}
+end;
+
+function TROCustomDataSnapConnection.AS_RowRequest(const ProviderName: WideString; Row: OleVariant; RequestType: Integer; var OwnerData: OleVariant): OleVariant;
+var lRow,lResult:Binary;
+    lOwnerData:Ansistring;
+begin
+  {$IFDEF DEBUG_REMOBJECTS_DATASNAP}
+  DebugServer.EnterMethodEx(self,'TROCustomDataSnapConnection.AS_RowRequest(ProviderName=%s,RequestType=%d)',[ProviderName,RequestType]); try
+  try
+  {$ENDIF DEBUG_REMOBJECTS_DATASNAP}
+
+  Connected := true;
+  lOwnerData := VarToAnsiStr(OwnerData);
+  lRow := BinaryFromVariant(Row);
+  try
+    lResult := fProxy.AS_RowRequest(ProviderName,lRow,RequestType,lOwnerData);
+    try
+      result := VariantFromBinary(lResult);
+    finally
+      FreeAndNil(lResult);
+    end;
+  finally
+    FreeAndNil(lRow);
+  end;
+  OwnerData := lOwnerData;
+
+  {$IFDEF DEBUG_REMOBJECTS_DATASNAP}
+  except DebugServer.WriteException(); raise; end;
+  finally DebugServer.ExitMethodEx(self,'TROCustomDataSnapConnection.AS_RowRequest()'); end;
+  {$ENDIF DEBUG_REMOBJECTS_DATASNAP}
+end;
+
+function TROCustomDataSnapConnection.GetConnected: boolean;
+begin
+  result := Assigned(fProxy);
+end;
+
+function TROCustomDataSnapConnection.GetServer: Midas.IAppServer;
+begin
+  result := self;
+end;
+
+procedure TROCustomDataSnapConnection.Notification(AComponent: TComponent;
+  Operation: TOperation);
+begin
+  inherited;
+  if Operation = opRemove then begin
+    if AComponent = fMessage then begin
+      fMessage := nil;
+      Connected := False;
+    end
+    else if AComponent = Channel then begin
+      Channel := nil;
+      Connected := False;
+    end;
+  end;
+end;
+
+procedure TROCustomDataSnapConnection.SetChannel(const Value:TRoTransportChannel);
+begin
+  if Value <> fChannel then begin
+    fChannel := Value;
+    if Assigned(fChannel) then fChannel.FreeNotification(self);
+    Connected := False;
+  end;
+end;
+
+procedure TROCustomDataSnapConnection.SetConnected(Value: boolean);
+begin
+  if Value = Connected then exit;
+
+  if Value then begin
+
+    if not Assigned(fMessage) then raise Exception.Create('Cannot connect: No Message assigned.');
+    if not Assigned(fChannel) then raise Exception.Create('Cannot connect: No TransportChannel assigned.');
+    DoAssignProxy;
+
+    TriggerAfterConnect();
+
+  end
+  else begin
+
+    fProxy := nil;
+
+  end;
+end;
+
+procedure TROCustomDataSnapConnection.SetMessage(const Value:TROMessage);
+begin
+  if Value <> fMessage then begin
+    fMessage := Value;
+    if Assigned(fMessage) then fMessage.FreeNotification(self);
+    Connected := False;
+  end;
+end;
+
+
+procedure TROCustomDataSnapConnection.GetProviderNames(Proc: TGetStrProc);
+var lProviderNames:TProviderNames;
+    i:integer;
+begin
+  { This version is a bit optimized over the default one, because we can
+    skip converting to a variant array first. }
+
+  {$IFDEF REMOBJECTS_DESIGNTIME}
+  Screen.Cursor := crHourGlass;
+  try
+  {$ENDIF REMOBJECTS_DESIGNTIME}
+    Connected := True;
+    lProviderNames := fProxy.AS_GetProviderNames();
+    try
+      for i := 0 to lProviderNames.Count-1 do begin
+        Proc({$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(lProviderNames[i]));
+      end;    { for }
+    finally
+      lProviderNames.Free();
+    end;
+  {$IFDEF REMOBJECTS_DESIGNTIME}
+  finally
+  	Screen.Cursor := crDefault;
+  end;  { try/finally }
+  {$ENDIF REMOBJECTS_DESIGNTIME}
+
+end;
+
+{$IFDEF MSWINDOWS}
+function TROCustomDataSnapConnection.InterfaceSupportsErrorInfo(const iid: TIID): HResult;
+begin
+  if GetInterfaceEntry(iid) <> nil then result := S_OK else result := S_FALSE;
+end;
+
+function TROCustomDataSnapConnection.SafeCallException(ExceptObject: TObject; ExceptAddr: Pointer): HResult;
+const lErrorGuid : TGUID = '{00000000-0000-0000-0000-000000000000}';
+begin
+  Result := HandleSafeCallException(ExceptObject, ExceptAddr, lErrorGuid, '', '');
+end;
+{$ENDIF MSWINDOWS}
+
+procedure TROCustomDataSnapConnection.SetServerName(const Value: string);
+begin
+  Connected := False;
+  fServerName := Value;
+end;
+
+procedure TROCustomDataSnapConnection.TriggerAfterConnect;
+begin
+  if Assigned(AfterConnect) then AfterConnect(self);
+end;
+
+procedure TROCustomDataSnapConnection.DoAssignProxy;
+begin
+  if Assigned(fOnAssignProxy) then OnAssignProxy(Self, fProxy);
+  if not Assigned(fProxy) then fProxy := CoAppServer.Create(fServerName, fMessage, fChannel);
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnapModule.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnapModule.pas
new file mode 100644
index 0000000..4cd2ac7
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnapModule.pas	
@@ -0,0 +1,173 @@
+unit uRODataSnapModule;
+
+interface
+
+uses Classes, Provider, Contnrs,
+     uRODataSnap_Intf, uRODataSnapPublishedProvidersCollection,
+     uRODataSnapBaseAppServer;
+
+
+type TRODataSnapModule = class(TRODataSnapBaseAppServer)
+     private
+       fProviders: TPublishedProviders;
+       fInternalRegisteredProviders:TObjectList;
+       fUseProviders: boolean;
+       procedure SetProviders(const Value: TPublishedProviders);
+     protected
+       function GetProviderByName(const iProviderName:string):TCustomProvider; override;
+       function GetProviderNames:TProviderNames; override;
+     protected
+       procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+     public
+       constructor Create(AOwner: TComponent); override;
+       destructor Destroy; override;
+
+       procedure RegisterProvider(iProvider:TCustomProvider; const iName:string); overload;
+       procedure UnRegisterProvider(iProvider:TCustomProvider; const iName:string); overload;
+       procedure RegisterProvider(iProvider:TCustomProvider); overload;
+       procedure UnRegisterProvider(iProvider:TCustomProvider); overload;
+
+     published
+       property Providers:TPublishedProviders read fProviders write SetProviders;
+       property UseProviders:boolean read fUseProviders write fUseProviders default false;
+     end;
+
+implementation
+
+uses SysUtils, uROClasses,
+     uRODataSnapRes;
+
+{ TRODataSnapModule }
+
+constructor TRODataSnapModule.Create(AOwner: TComponent);
+begin
+  fProviders := TPublishedProviders.Create(self);
+  fInternalRegisteredProviders := TObjectList.Create();
+  fInternalRegisteredProviders.OwnsObjects := False;
+  inherited;
+end;
+
+destructor TRODataSnapModule.Destroy;
+begin
+  FreeAndNil(fProviders);
+  FreeAndNil(fInternalRegisteredProviders);
+  inherited;
+end;
+
+function TRODataSnapModule.GetProviderByName(const iProviderName: string): TCustomProvider;
+var lPublishedProvider: TPublishedProvider;
+    lProvider:TCustomProvider;
+    i:integer;
+begin
+  if UseProviders then begin
+    lPublishedProvider := Providers.GetProviderByName(iProviderName);
+    if not Assigned(lPublishedProvider) then raise Exception.CreateFmt(sProviderNotExported,[iProviderName]);
+    result := lPublishedProvider.Provider;
+    if not Assigned(result) then raise Exception.CreateFmt(sProviderNotExported,[iProviderName]);
+  end
+  else begin
+    result := nil;
+
+    { find provider on datamodule }
+    for i := 0 to ComponentCount-1 do begin
+      if Components[i] is TCustomProvider then begin
+        lProvider := TCustomProvider(Components[i]);
+        if lProvider.Exported and (lProvider.Name = iProviderName) then begin
+          result := lProvider;
+          Exit;
+        end;
+      end;
+    end;
+
+    { if not, find it in list of explicitely registered list }
+    for i := 0 to fInternalRegisteredProviders.Count-1 do begin
+      lProvider := (fInternalRegisteredProviders[i] as TCustomProvider);
+      if lProvider.Exported and (lProvider.Name = iProviderName) then begin
+        result := lProvider;
+        Exit;
+      end;
+    end;
+
+    if not Assigned(result) then raise Exception.CreateFmt(sProviderNotExported,[iProviderName]);
+  end;
+end;
+
+function TRODataSnapModule.GetProviderNames: TProviderNames;
+var i:integer;
+begin
+  result := TProviderNames.Create();
+
+  if UseProviders then begin
+    for i := 0 to Providers.Count-1 do begin
+      if (Providers[i].Name <> '') and Assigned(Providers[i].Provider) then result.Add({$IFDEF UNICODE}WideStringToAnsiString{$ENDIF}(Providers[i].Name));
+    end;
+  end
+  else begin
+    { list providers on form }
+    for i := 0 to ComponentCount-1 do begin
+      if Components[i] is TCustomProvider then
+        with TCustomProvider(Components[i]) do begin
+          if Exported then result.Add({$IFDEF UNICODE}WideStringToAnsiString{$ENDIF}(Name));
+      end;
+    end;
+    { list explicitely regsitered providers }
+    for i := 0 to fInternalRegisteredProviders.Count-1 do begin
+      with (fInternalRegisteredProviders[i] as TCustomProvider) do begin
+        if Exported then result.Add({$IFDEF UNICODE}WideStringToAnsiString{$ENDIF}(Name));
+      end;
+    end;
+  end;
+end;
+
+procedure TRODataSnapModule.Notification(AComponent: TComponent; Operation: TOperation);
+begin
+  inherited;
+  if Operation = opRemove then begin
+    if (AComponent is TCustomProvider) and Assigned(Providers) then begin
+      Providers.UnlinkProvider(AComponent as TCustomProvider);
+      fInternalRegisteredProviders.Remove(AComponent);
+    end;
+  end;
+end;
+
+procedure TRODataSnapModule.RegisterProvider(iProvider:TCustomProvider; const iName:string);
+begin
+  if not Assigned(iProvider) then Exit;
+
+  if not fProviders.ContainsProvider(iProvider) then
+    with fProviders.Add() as TPublishedProvider do begin
+      Provider := iProvider;
+      if iName <> '' then Name := iName;
+    end;
+
+  if fInternalRegisteredProviders.IndexOf(iProvider) = -1 then
+    fInternalRegisteredProviders.Add(iProvider);
+
+end;
+
+procedure TRODataSnapModule.UnRegisterProvider(iProvider:TCustomProvider; const iName:string);
+begin
+  if not Assigned(iProvider) then Exit;
+  fProviders.RemoveProvider(iProvider);
+
+  fInternalRegisteredProviders.Remove(iProvider);
+end;
+
+
+procedure TRODataSnapModule.RegisterProvider(iProvider: TCustomProvider);
+begin
+  RegisterProvider(iProvider,'');
+end;
+
+procedure TRODataSnapModule.UnRegisterProvider(iProvider: TCustomProvider);
+begin
+  UnRegisterProvider(iProvider,'');
+end;
+
+
+procedure TRODataSnapModule.SetProviders(const Value: TPublishedProviders);
+begin
+  fProviders.Assign(Value);
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnapNewServerModuleWizard.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnapNewServerModuleWizard.pas
new file mode 100644
index 0000000..6ab236a
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnapNewServerModuleWizard.pas	
@@ -0,0 +1,373 @@
+unit uRODataSnapNewServerModuleWizard;
+
+{$I ..\RemObjects.inc}
+
+interface
+
+uses DesignEditors, ToolsAPI, Windows, ActnList, Menus, Classes;
+
+const CRLF = #13#10;		// Carriage-return line-feed.
+
+resourcestring
+  sBasicDfmSource =
+    'object %0:s: T%0:s'                                       + crlf +
+    '  Left = 200'                                             + crlf +
+    '  Top = 200'                                              + crlf +
+    '  Height = 300'                                           + crlf +
+    '  Width = 300'                                            + crlf +
+    'end';
+
+
+  sBasicFormSource =
+    'unit %0:s;' 					       + crlf +
+                                                                 crlf +
+    'interface'  					       + crlf +
+                                                                 crlf +
+    'uses {vcl:} SysUtils, Classes, DB, DBClient, '            + crlf +
+    '     {RemObjects:} %3:s;'                                 + crlf +
+                                                                 crlf +
+    'type'                                                     + crlf +
+    '  T%1:s = class(%2:s)'  				       + crlf +
+    '  private' 	 				       + crlf +
+    '    { Private declarations }'                             + crlf +
+    '  public'  			                       + crlf +
+    '    { Public declarations }' 		               + crlf +
+    '  end;'	 					       + crlf +
+                                                                 crlf +
+    'var'  						       + crlf +
+    '  %1:s: T%1:s;'                                           + crlf +
+                                                                 crlf +
+    'implementation'                                           + crlf +
+                                                                 crlf +
+    'uses {RemObjects:} uROServer, uRODataSnap_Invk;'          + crlf +
+                                                                 crlf +
+    '{$R *.DFM}'                                               + crlf +
+                                                                 crlf +
+    'procedure Create_DataSnapModule(out oInstance:IUnknown);' + crlf +
+    'begin'                                                    + crlf +
+    '  oInstance := T%1:s.Create(nil);'                         + crlf +
+    'end;'                                                     + crlf +
+                                                                 crlf +
+    'initialization'                                           + crlf +
+    '  { To adjust scalability of the DataSnapModule and avoid recreation of'   + crlf +
+    '    instances for each roundtrip, you might want to choose a  different'   + crlf +
+    '    ClassFactory type.'                                           + crlf +
+    crlf +
+    '    Make sure to check the following url for more information:'+ crlf+
+    '    http://www.remobjects.com?ro16 }'+ crlf +
+    crlf +
+    '  //TROPooledClassFactory.Create(''IAppServer'', Create_DataSnapModule, TAppServer_Invoker, 25);' + crlf +
+    '  TROClassFactory.Create(''IAppServer'', Create_DataSnapModule, TAppServer_Invoker);' + crlf +
+    'end.' 																																			+ crlf;
+
+type TSourceFile = class(TInterfacedObject, IOTAFile)
+     private
+       fAge: TDateTime;
+       fSource:string;
+     public
+       function GetSource: string;
+       function GetAge: TDateTime;
+       constructor Create(const iSource:string);
+     end;
+
+     TBaseFormCreator = class(TInterfacedObject, IOTAModuleCreator)
+     public
+       function GetCreatorType: string;
+       function GetExisting: Boolean;
+       function GetFileSystem: string;
+       function GetOwner: IOTAModule;
+       function GetUnnamed: Boolean;
+
+       function GetAncestorName: string;
+       function GetImplFileName: string;
+       function GetIntfFileName: string;
+       function GetFormName: string;
+       function GetMainForm: Boolean;
+       function GetShowForm: Boolean;
+       function GetShowSource: Boolean;
+       function NewFormFile(const FormIdent, AncestorIdent: string): IOTAFile;
+       function NewImplSource(const ModuleIdent, FormIdent, AncestorIdent: string): IOTAFile;
+       function NewIntfSource(const ModuleIdent, FormIdent, AncestorIdent: string): IOTAFile;
+
+       procedure FormCreated(const FormEditor: IOTAFormEditor);
+     end;		{ TBaseFormCreator }
+
+     TNewModuleExpert = class(TInterfacedObject,
+       IOTAWizard,
+       IOTARepositoryWizard,
+       IOTAFormWizard,
+       {$IFDEF BDS}
+       IOTARepositoryWizard80,
+       {$ENDIF}
+       IOTARepositoryWizard60)
+     public
+
+       constructor Create();
+       destructor Destroy(); override;
+
+       procedure AfterSave;
+       procedure BeforeSave;
+       procedure Destroyed;
+       procedure Modified;
+
+       procedure Execute;
+       function GetAuthor: String;
+       function GetComment: String;
+       function GetGlyph: Cardinal;
+       function GetIDString: String;
+       function GetName: String;
+       function GetPage: String;
+       function GetState: TWizardState;
+       function GetDesigner: String;
+
+       {$IFDEF BDS}
+       function GetGalleryCategory: IOTAGalleryCategory;
+       function GetPersonality: string;
+       {$ENDIF}
+
+     end;
+
+procedure Register;
+
+implementation
+
+uses SysUtils, Graphics,
+     uRORes;
+
+{ TBaseFormCreator }
+
+procedure TBaseFormCreator.FormCreated(const FormEditor: IOTAFormEditor);
+begin
+
+end;
+
+function TBaseFormCreator.GetAncestorName: string;
+begin
+  result := 'TRODataSnapModule';
+end;
+
+function TBaseFormCreator.GetCreatorType: string;
+begin
+  result := sForm;
+end;
+
+function TBaseFormCreator.GetExisting: Boolean;
+begin
+  result := false;
+end;
+
+function TBaseFormCreator.GetFileSystem: string;
+begin
+  result := '';
+end;
+
+function TBaseFormCreator.GetFormName: string;
+begin
+  result := '';
+end;
+
+function TBaseFormCreator.GetImplFileName: string;
+begin
+  result := '';
+end;
+
+function TBaseFormCreator.GetIntfFileName: string;
+begin
+  result := '';
+end;
+
+function TBaseFormCreator.GetMainForm: Boolean;
+begin
+  result := false;
+end;
+
+function TBaseFormCreator.GetOwner: IOTAModule;
+var
+  ModuleServices: IOTAModuleServices;
+  Module: IOTAModule;
+  NewModule: IOTAModule;
+begin
+  Result := nil;
+  if BorlandIDEServices.QueryInterface(IOTAModuleServices, ModuleServices) =
+S_OK then
+  begin
+    Module := ModuleServices.CurrentModule;
+    if Module <> nil then
+      if Module.GetOwnerCount > 0 then
+      begin
+         NewModule := Module.GetOwner(0);
+         if NewModule <> nil then
+            if NewModule.QueryInterface(IOTAProject, Result) <> S_OK then
+               Result := nil;
+      end;
+  end;
+end;
+
+function TBaseFormCreator.GetShowForm: Boolean;
+begin
+  result := true;
+end;
+
+function TBaseFormCreator.GetShowSource: Boolean;
+begin
+  result := true;
+end;
+
+function TBaseFormCreator.GetUnnamed: Boolean;
+begin
+  result := true;
+end;
+
+function RemoveInitialT(const iString:string):string;
+begin
+  result := iString;
+  if (result <> '') and (result[1] = 'T') then Delete(result,1,1);
+  //ShowMessage(iString+' '+result);
+end;
+
+function TBaseFormCreator.NewFormFile(const FormIdent,
+  AncestorIdent: string): IOTAFile;
+begin
+  result := TSourceFile.Create(Format(sBasicDfmSource,[RemoveInitialT(FormIdent)]));
+end;
+
+function TBaseFormCreator.NewImplSource(const ModuleIdent, FormIdent,
+  AncestorIdent: string): IOTAFile;
+begin
+  result := TSourceFile.Create(Format(sBasicFormSource,[ModuleIdent,RemoveInitialT(FormIdent),AncestorIdent,'uRODataSnapModule']));
+end;
+
+function TBaseFormCreator.NewIntfSource(const ModuleIdent, FormIdent,
+  AncestorIdent: string): IOTAFile;
+begin
+
+end;
+
+{ TSourceFile }
+
+constructor TSourceFile.Create(const iSource: string);
+begin
+  inherited Create();
+  fSource := iSource;
+  fAge := Now;
+end;
+
+function TSourceFile.GetAge: TDateTime;
+begin
+  result := fAge;
+end;
+
+function TSourceFile.GetSource: string;
+begin
+  result := fSource;
+end;
+
+{ TNewModuleExpert }
+
+constructor TNewModuleExpert.Create;
+begin
+  inherited;
+end;
+
+destructor TNewModuleExpert.Destroy;
+begin
+  inherited;
+end;
+
+procedure TNewModuleExpert.Execute;
+var
+  ModuleServices: IOTAModuleServices;
+  ModuleCreator: IOTAModuleCreator;
+begin
+  if BorlandIDEServices.QueryInterface(IOTAModuleServices, ModuleServices) = S_OK then
+  begin
+    ModuleCreator := TBaseFormCreator.Create;
+    ModuleServices.CreateModule(ModuleCreator);
+  end;
+end;
+
+function TNewModuleExpert.GetAuthor: String;
+begin
+  result := 'RemObjects Software';
+end;
+
+function TNewModuleExpert.GetComment: String;
+begin
+  result := 'RemObjects DataSnap Server Module';
+end;
+
+function TNewModuleExpert.GetGlyph: Cardinal;
+begin
+  result := LoadIcon(hInstance,'NewDataSnapModule');
+end;
+
+function TNewModuleExpert.GetIDString: String;
+begin
+  result := 'RemObjectsDataSnapModule';
+end;
+
+function TNewModuleExpert.GetName: String;
+begin
+  result := 'RemObjects DataSnap Server Module';
+end;
+
+function TNewModuleExpert.GetPage: String;
+begin
+  result := 'RemObjects SDK';
+end;
+
+{$IFDEF BDS}
+function TNewModuleExpert.GetGalleryCategory: IOTAGalleryCategory;
+var
+  lGalleryManager: IOTAGalleryCategoryManager;
+begin
+  lGalleryManager := BorlandIDEServices as IOTAGalleryCategoryManager;
+  result := lGalleryManager.FindCategory('RemObjectsSdkDelphi');
+end;
+
+function TNewModuleExpert.GetPersonality: string;
+begin
+  result := sDelphiPersonality;
+end;
+{$ENDIF}
+
+function TNewModuleExpert.GetState: TWizardState;
+begin
+  result := [wsEnabled];
+end;
+
+procedure TNewModuleExpert.AfterSave;
+begin
+
+end;
+
+procedure TNewModuleExpert.BeforeSave;
+begin
+
+end;
+
+procedure TNewModuleExpert.Destroyed;
+begin
+
+end;
+
+procedure TNewModuleExpert.Modified;
+begin
+
+end;
+
+procedure Register;
+begin
+  RegisterPackageWizard(TNewModuleExpert.Create as IOTAFormWizard);
+end;
+
+{$R 'uRODataSnapNewServerModuleWizard.res' 'uRODataSnapNewServerModuleWizard.rc'}
+
+function TNewModuleExpert.GetDesigner: String;
+begin
+  Result := dAny;
+end;
+
+initialization
+finalization
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnapNewServerModuleWizard.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnapNewServerModuleWizard.res
new file mode 100644
index 0000000..e3a9d19
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnapNewServerModuleWizard.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnapProviderManager.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnapProviderManager.pas
new file mode 100644
index 0000000..98c0e81
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnapProviderManager.pas	
@@ -0,0 +1,72 @@
+unit uRODataSnapProviderManager;
+
+interface
+
+uses Contnrs, Provider,
+     uRODataSnapProviderPublisher, uRODataSnap_Intf;
+
+type TProviderManager = class(TObjectList)
+     public
+       constructor Create(); 
+       procedure RegisterPublisher(iPublisher:TROCustomDataSnapProviderPublisher);
+       procedure UnregisterPublisher(iPublisher:TROCustomDataSnapProviderPublisher);
+       function GetProviderNames:TProviderNames;
+       function GetProviderByName(const iProviderName:string):TCustomProvider;
+     end;
+
+var ProviderManager:TProviderManager;
+
+implementation
+
+uses SysUtils, Classes,
+     uRODataSnapRes;
+
+{ TProviderManager }
+
+constructor TProviderManager.Create;
+begin
+  inherited Create(false);
+end;
+
+function TProviderManager.GetProviderByName(const iProviderName:string): TCustomProvider;
+var i:integer;
+begin
+  //ToDo: protect by CriticalSection;
+
+  result := nil;
+  for i := 0 to Count-1 do begin
+    result := (Items[i] as TRODataSnapProviderPublisher).GetProviderByName(iProviderName);
+    if Assigned(result) then break;
+  end; { for }
+  if not Assigned(result) then raise Exception.CreateFmt(sProviderNotExported,[iProviderName]);
+end;
+
+function TProviderManager.GetProviderNames: TProviderNames;
+var i:integer;
+begin
+  //ToDo: protect by CriticalSection;
+  result := TProviderNames.Create();
+  for i := 0 to Count-1 do begin
+    (Items[i] as TRODataSnapProviderPublisher).AddNamesToTProviderNames(result);
+  end; { for }
+end;
+
+procedure TProviderManager.RegisterPublisher(iPublisher: TROCustomDataSnapProviderPublisher);
+begin
+  //ToDo: protect by CriticalSection;
+  if IndexOf(iPublisher) = -1 then Add(iPublisher);
+end;
+
+procedure TProviderManager.UnregisterPublisher(iPublisher: TROCustomDataSnapProviderPublisher);
+var lIndex:integer;
+begin
+  lIndex := IndexOf(iPublisher);
+  if IndexOf(iPublisher) <> -1 then Delete(lIndex);
+end;
+
+initialization
+  ProviderManager := TProviderManager.Create();
+finalization
+  FreeAndNil(ProviderManager);
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnapProviderPublisher.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnapProviderPublisher.dfm
new file mode 100644
index 0000000..63c080f
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnapProviderPublisher.dfm	
@@ -0,0 +1,2 @@
+object RODataSnapSimpleAppServer: TRODataSnapSimpleAppServer
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnapProviderPublisher.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnapProviderPublisher.pas
new file mode 100644
index 0000000..1356ee5
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnapProviderPublisher.pas	
@@ -0,0 +1,112 @@
+unit uRODataSnapProviderPublisher;
+
+interface
+
+uses Classes, Provider,
+     uRODataSnap_Intf,
+     uRODataSnapPublishedProvidersCollection, uRODataSnapBaseAppServer;
+
+type TROCustomDataSnapProviderPublisher = class(TComponent)
+     private
+       fProviders: TPublishedProviders;
+       procedure SetProviders(const Value: TPublishedProviders);
+     protected
+       procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+     public
+       constructor Create(AOwner: TComponent); override;
+       destructor Destroy; override;
+       procedure AddNamesToTProviderNames(iProviderNames:TProviderNames);
+       function GetProviderByName(const iProviderName:string):TCustomProvider;
+       property Providers:TPublishedProviders read fProviders write SetProviders;
+     end;
+
+     TRODataSnapProviderPublisher = class(TROCustomDataSnapProviderPublisher)
+     published
+       property Providers;
+     end;
+
+implementation
+
+uses
+  SysUtils,
+  uROServer, uRODataSnapProviderManager, uRODataSnap_Invk, uROClasses;
+
+type TRODataSnapSimpleAppServer = class(TRODataSnapBaseAppServer)
+       function GetProviderByName(const iProviderName:string):TCustomProvider; override;
+       function GetProviderNames:TProviderNames; override;
+     end;
+
+procedure Create_AppServer(out anInstance : IUnknown);
+begin
+  anInstance := TRODataSnapSimpleAppServer.Create(nil);
+end;
+
+{ TROCustomDataSnapProviderPublisher }
+
+procedure TROCustomDataSnapProviderPublisher.AddNamesToTProviderNames(iProviderNames: TProviderNames);
+var i:integer;
+begin
+  //ToDo: protect by CriticalSection;
+
+  for I := 0 to Providers.Count-1 do begin
+    if (Providers[i].Name <> '') and Assigned(Providers[i].Provider) then
+      iProviderNames.Add({$IFDEF UNICODE}WideStringToAnsiString{$ENDIF}(Providers[i].Name));
+  end;    { for }
+end;
+
+constructor TROCustomDataSnapProviderPublisher.Create(AOwner: TComponent);
+begin
+  inherited;
+  fProviders := TPublishedProviders.Create(self);
+  ProviderManager.RegisterPublisher(self);
+  if not IsClassFactoryRegistered('IAppServer') then
+    TROClassFactory.Create('IAppServer', Create_AppServer, TAppServer_Invoker);
+end;
+
+destructor TROCustomDataSnapProviderPublisher.Destroy;
+begin
+  ProviderManager.UnregisterPublisher(self);
+  FreeAndNil(fProviders);
+  inherited;
+end;
+
+function TROCustomDataSnapProviderPublisher.GetProviderByName(const iProviderName:string): TCustomProvider;
+var lPublishedProvider:TPublishedProvider;
+begin
+  //ToDo: protect by CriticalSection;
+  lPublishedProvider := fProviders.GetProviderByName(iProviderName);
+  if Assigned(lPublishedProvider) then result := lPublishedProvider.Provider
+  else result := nil;
+end;
+
+procedure TROCustomDataSnapProviderPublisher.Notification(
+  AComponent: TComponent; Operation: TOperation);
+begin
+  inherited;
+  if Operation = opRemove then begin
+    if AComponent is TCustomProvider then Providers.UnlinkProvider(AComponent as TCustomProvider);
+  end;
+end;
+
+procedure TROCustomDataSnapProviderPublisher.SetProviders(
+  const Value: TPublishedProviders);
+begin
+  fProviders.Assign(Value);
+end;
+
+function TRODataSnapSimpleAppServer.GetProviderByName(const iProviderName:string):TCustomProvider;
+begin
+  result := ProviderManager.GetProviderByName(iProviderName);
+end;
+
+function TRODataSnapSimpleAppServer.GetProviderNames: TProviderNames;
+begin
+  result := ProviderManager.GetProviderNames();
+end;
+
+{$R *.dfm}
+
+initialization
+  //ToDo: maybe postpone this registration and move it to the constructor of the component?
+  //TROClassFactory.Create('AppServer', Create_AppServer, TAppServer_Invoker);
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnapPublishedProvidersCollection.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnapPublishedProvidersCollection.pas
new file mode 100644
index 0000000..8000d40
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnapPublishedProvidersCollection.pas	
@@ -0,0 +1,123 @@
+unit uRODataSnapPublishedProvidersCollection;
+
+interface
+
+uses Classes, Provider;
+
+type TPublishedProvider = class(TCollectionItem)
+     private
+       fProvider:TCustomProvider;
+       fName: string;
+       procedure SetProvider(const iValue:TCustomProvider);
+       procedure SetName(const iValue:string);
+     protected
+       function GetDisplayName: string; override;
+     published
+       property Provider:TCustomProvider read fProvider write SetProvider;
+       property Name:string read fName write SetName;
+     end;
+
+     TPublishedProviders = class(TCollection)
+     private
+       fOwner:TComponent;
+       function GetItems(iIndex: integer): TPublishedProvider;
+     protected
+       function GetOwner: TPersistent; override;
+     public
+       constructor Create(iOwner:TComponent);
+       property Items[iIndex:integer]:TPublishedProvider read GetItems; default;
+       function GetProviderByName(iName:string):TPublishedProvider;
+       procedure UnlinkProvider(iProvider:TCustomProvider);
+       procedure RemoveProvider(iProvider:TCustomProvider);
+       function ContainsProvider(iProvider:TCustomProvider):Boolean;
+     end;
+
+implementation
+
+{ TPublishedProviders }
+
+constructor TPublishedProviders.Create(iOwner: TComponent);
+begin
+  inherited Create(TPublishedProvider);
+  fOwner := iOwner;
+end;
+
+function TPublishedProviders.GetItems(iIndex: integer): TPublishedProvider;
+begin
+  result := (inherited Items[iIndex]) as TPublishedProvider;
+end;
+
+function TPublishedProviders.GetOwner: TPersistent;
+begin
+  result := fOwner;
+end;
+
+function TPublishedProviders.GetProviderByName(iName:string):TPublishedProvider;
+var i:Integer;
+begin
+  result := nil;
+  i := 0;
+  while (i < Count) and (result = nil) do begin
+    if Items[i].Name = iName then result := Items[i];
+    Inc(i);
+  end;    { while }
+end;
+
+function TPublishedProviders.ContainsProvider(iProvider: TCustomProvider): Boolean;
+var i:Integer;
+begin
+  Result := False;
+  for i := 0 to Count-1 do begin
+    if Items[i].Provider = iProvider then begin
+      Result := True;
+      break;
+    end;
+  end;
+end;
+
+procedure TPublishedProviders.RemoveProvider(iProvider: TCustomProvider);
+var i:Integer;
+begin
+  for i := 0 to Count-1 do
+    if Items[i].Provider = iProvider then begin
+      Delete(i);
+      break;
+    end;
+end;
+
+procedure TPublishedProviders.UnlinkProvider(iProvider: TCustomProvider);
+var i:Integer;
+begin
+  for i := 0 to Count-1 do
+    if Items[i].Provider = iProvider then begin
+      Items[i].Provider := nil;
+      break;
+    end;
+end;
+
+{ TPublishedProvider }
+
+function TPublishedProvider.GetDisplayName: string;
+begin
+  if Name <> '' then result := Name
+  else if Assigned(fProvider) then result := fProvider.Name
+  else result := ClassName;
+end;
+
+procedure TPublishedProvider.SetName(const iValue: string);
+begin
+  fName := iValue;
+end;
+
+procedure TPublishedProvider.SetProvider(const iValue: TCustomProvider);
+begin
+  fProvider := iValue;
+  if (fName = '') and Assigned(iValue) then fName := iValue.Name;
+
+  if Assigned(iValue) and (Collection.Owner is TComponent) then
+    iValue.FreeNotification(Collection.Owner as TComponent);
+end;
+
+
+end.
+ 
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnapRes.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnapRes.pas
new file mode 100644
index 0000000..c02ec8d
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnapRes.pas	
@@ -0,0 +1,11 @@
+unit uRODataSnapRes;
+
+interface
+
+resourcestring
+  sProviderNotExported = 'Provider "%s" is not exported.';
+
+implementation
+
+end.
+ 
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnap_Async.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnap_Async.pas
new file mode 100644
index 0000000..f32a3c5
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnap_Async.pas	
@@ -0,0 +1,257 @@
+unit uRODataSnap_Async;
+
+{----------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project .                               }
+{                                                                            }
+{ Do not modify this unit manually, or your changes will be lost when this   }
+{ unit is regenerated the next time you compile the project.                 }
+{----------------------------------------------------------------------------}
+
+interface
+
+uses
+  {vcl:} Classes, TypInfo,
+  {RemObjects:} uROClasses, uROTypes, uROClientIntf, uROAsync,
+  {Project:} uRODataSnap_Intf;
+
+type
+  { IAppServer_Async }
+  IAppServer_Async = interface(IROAsyncInterface)
+    ['{4F6AC4BD-0AAA-4621-9868-D26D32CC9E27}']
+    procedure Invoke_AS_ApplyUpdates(const ProviderName: WideString; const Delta: Binary; const MaxErrors: Integer; const OwnerData: AnsiString);
+    procedure Invoke_AS_GetRecords(const ProviderName: WideString; const Count: Integer; const Options: Integer; const CommandText: WideString; const Params: Binary; const OwnerData: AnsiString);
+    procedure Invoke_AS_DataRequest(const ProviderName: WideString; const Data: Binary);
+    procedure Invoke_AS_GetProviderNames;
+    procedure Invoke_AS_GetParams(const ProviderName: WideString; const OwnerData: AnsiString);
+    procedure Invoke_AS_RowRequest(const ProviderName: WideString; const Row: Binary; const RequestType: Integer; const OwnerData: AnsiString);
+    procedure Invoke_AS_Execute(const ProviderName: WideString; const CommandText: WideString; const Params: Binary; const OwnerData: AnsiString);
+    function Retrieve_AS_ApplyUpdates(out ErrorCount: Integer; out OwnerData: AnsiString): binary;
+    function Retrieve_AS_GetRecords(out RecsOut: Integer; out Params: Binary; out OwnerData: AnsiString): binary;
+    function Retrieve_AS_DataRequest: binary;
+    function Retrieve_AS_GetProviderNames: TProviderNames;
+    function Retrieve_AS_GetParams(out OwnerData: AnsiString): binary;
+    function Retrieve_AS_RowRequest(out OwnerData: AnsiString): binary;
+    procedure Retrieve_AS_Execute(out Params: Binary; out OwnerData: AnsiString);
+  end;
+
+  { CoAppServer_Async }
+  CoAppServer_Async = class
+    class function Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): IAppServer_Async;
+  end;
+
+  { TAppServer_AsyncProxy }
+  TAppServer_AsyncProxy = class(TROAsyncProxy, IAppServer_Async)
+  private
+  protected
+    function __GetInterfaceName:String; override;
+
+    procedure Invoke_AS_ApplyUpdates(const ProviderName: WideString; const Delta: Binary; const MaxErrors: Integer; const OwnerData: AnsiString);
+    procedure Invoke_AS_GetRecords(const ProviderName: WideString; const Count: Integer; const Options: Integer; const CommandText: WideString; const Params: Binary; const OwnerData: AnsiString);
+    procedure Invoke_AS_DataRequest(const ProviderName: WideString; const Data: Binary);
+    procedure Invoke_AS_GetProviderNames;
+    procedure Invoke_AS_GetParams(const ProviderName: WideString; const OwnerData: AnsiString);
+    procedure Invoke_AS_RowRequest(const ProviderName: WideString; const Row: Binary; const RequestType: Integer; const OwnerData: AnsiString);
+    procedure Invoke_AS_Execute(const ProviderName: WideString; const CommandText: WideString; const Params: Binary; const OwnerData: AnsiString);
+    function Retrieve_AS_ApplyUpdates(out ErrorCount: Integer; out OwnerData: AnsiString): binary;
+    function Retrieve_AS_GetRecords(out RecsOut: Integer; out Params: Binary; out OwnerData: AnsiString): binary;
+    function Retrieve_AS_DataRequest: binary;
+    function Retrieve_AS_GetProviderNames: TProviderNames;
+    function Retrieve_AS_GetParams(out OwnerData: AnsiString): binary;
+    function Retrieve_AS_RowRequest(out OwnerData: AnsiString): binary;
+    procedure Retrieve_AS_Execute(out Params: Binary; out OwnerData: AnsiString);
+  end;
+
+implementation
+
+uses
+  {vcl:} SysUtils;
+
+{ CoAppServer }
+
+class function CoAppServer_Async.Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): IAppServer_Async;
+begin
+  result := TAppServer_AsyncProxy.Create(aMessage, aTransportChannel);
+end;
+
+{ TAppServer_AsyncProxy }
+
+function TAppServer_AsyncProxy.__GetInterfaceName:String;
+begin
+  result := 'AppServer';
+end;
+
+procedure TAppServer_AsyncProxy.Invoke_AS_ApplyUpdates(const ProviderName: WideString; const Delta: Binary; const MaxErrors: Integer; const OwnerData: AnsiString);
+begin
+  __AssertProxyNotBusy('AS_ApplyUpdates');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'uRODataSnap', __InterfaceName, 'AS_ApplyUpdates');
+  __Message.Write('ProviderName', TypeInfo(WideString), ProviderName, []);
+  __Message.Write('Delta', TypeInfo(Binary), Delta, []);
+  __Message.Write('MaxErrors', TypeInfo(Integer), MaxErrors, []);
+  __Message.Write('OwnerData', TypeInfo(AnsiString), OwnerData, []);
+  __DispatchAsyncRequest('AS_ApplyUpdates',__Message);
+end;
+
+function TAppServer_AsyncProxy.Retrieve_AS_ApplyUpdates(out ErrorCount: Integer; out OwnerData: AnsiString): binary;
+var __response:TStream;
+begin
+  result := nil;
+  __response := __RetrieveAsyncResponse('AS_ApplyUpdates');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Result', TypeInfo(binary), Result, []);
+  __Message.Read('ErrorCount', TypeInfo(Integer), ErrorCount, []);
+  __Message.Read('OwnerData', TypeInfo(AnsiString), OwnerData, []);
+
+  __response.Free();
+end;
+
+procedure TAppServer_AsyncProxy.Invoke_AS_GetRecords(const ProviderName: WideString; const Count: Integer; const Options: Integer; const CommandText: WideString; const Params: Binary; const OwnerData: AnsiString);
+begin
+  __AssertProxyNotBusy('AS_GetRecords');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'uRODataSnap', __InterfaceName, 'AS_GetRecords');
+  __Message.Write('ProviderName', TypeInfo(WideString), ProviderName, []);
+  __Message.Write('Count', TypeInfo(Integer), Count, []);
+  __Message.Write('Options', TypeInfo(Integer), Options, []);
+  __Message.Write('CommandText', TypeInfo(WideString), CommandText, []);
+  __Message.Write('Params', TypeInfo(Binary), Params, []);
+  __Message.Write('OwnerData', TypeInfo(AnsiString), OwnerData, []);
+  __DispatchAsyncRequest('AS_GetRecords',__Message);
+end;
+
+function TAppServer_AsyncProxy.Retrieve_AS_GetRecords(out RecsOut: Integer; out Params: Binary; out OwnerData: AnsiString): binary;
+var __response:TStream;
+begin
+  Params := nil;
+  result := nil;
+  __response := __RetrieveAsyncResponse('AS_GetRecords');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Result', TypeInfo(binary), Result, []);
+  __Message.Read('RecsOut', TypeInfo(Integer), RecsOut, []);
+  __Message.Read('Params', TypeInfo(Binary), Params, []);
+  __Message.Read('OwnerData', TypeInfo(AnsiString), OwnerData, []);
+
+  __response.Free();
+end;
+
+procedure TAppServer_AsyncProxy.Invoke_AS_DataRequest(const ProviderName: WideString; const Data: Binary);
+begin
+  __AssertProxyNotBusy('AS_DataRequest');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'uRODataSnap', __InterfaceName, 'AS_DataRequest');
+  __Message.Write('ProviderName', TypeInfo(WideString), ProviderName, []);
+  __Message.Write('Data', TypeInfo(Binary), Data, []);
+  __DispatchAsyncRequest('AS_DataRequest',__Message);
+end;
+
+function TAppServer_AsyncProxy.Retrieve_AS_DataRequest: binary;
+var __response:TStream;
+begin
+  result := nil;
+  __response := __RetrieveAsyncResponse('AS_DataRequest');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Result', TypeInfo(binary), Result, []);
+
+  __response.Free();
+end;
+
+procedure TAppServer_AsyncProxy.Invoke_AS_GetProviderNames;
+begin
+  __AssertProxyNotBusy('AS_GetProviderNames');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'uRODataSnap', __InterfaceName, 'AS_GetProviderNames');
+  __DispatchAsyncRequest('AS_GetProviderNames',__Message);
+end;
+
+function TAppServer_AsyncProxy.Retrieve_AS_GetProviderNames: TProviderNames;
+var __response:TStream;
+begin
+  result := nil;
+  __response := __RetrieveAsyncResponse('AS_GetProviderNames');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Result', TypeInfo(TProviderNames), Result, []);
+
+  __response.Free();
+end;
+
+procedure TAppServer_AsyncProxy.Invoke_AS_GetParams(const ProviderName: WideString; const OwnerData: AnsiString);
+begin
+  __AssertProxyNotBusy('AS_GetParams');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'uRODataSnap', __InterfaceName, 'AS_GetParams');
+  __Message.Write('ProviderName', TypeInfo(WideString), ProviderName, []);
+  __Message.Write('OwnerData', TypeInfo(AnsiString), OwnerData, []);
+  __DispatchAsyncRequest('AS_GetParams',__Message);
+end;
+
+function TAppServer_AsyncProxy.Retrieve_AS_GetParams(out OwnerData: AnsiString): binary;
+var __response:TStream;
+begin
+  result := nil;
+  __response := __RetrieveAsyncResponse('AS_GetParams');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Result', TypeInfo(binary), Result, []);
+  __Message.Read('OwnerData', TypeInfo(AnsiString), OwnerData, []);
+
+  __response.Free();
+end;
+
+procedure TAppServer_AsyncProxy.Invoke_AS_RowRequest(const ProviderName: WideString; const Row: Binary; const RequestType: Integer; const OwnerData: AnsiString);
+begin
+  __AssertProxyNotBusy('AS_RowRequest');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'uRODataSnap', __InterfaceName, 'AS_RowRequest');
+  __Message.Write('ProviderName', TypeInfo(WideString), ProviderName, []);
+  __Message.Write('Row', TypeInfo(Binary), Row, []);
+  __Message.Write('RequestType', TypeInfo(Integer), RequestType, []);
+  __Message.Write('OwnerData', TypeInfo(AnsiString), OwnerData, []);
+  __DispatchAsyncRequest('AS_RowRequest',__Message);
+end;
+
+function TAppServer_AsyncProxy.Retrieve_AS_RowRequest(out OwnerData: AnsiString): binary;
+var __response:TStream;
+begin
+  result := nil;
+  __response := __RetrieveAsyncResponse('AS_RowRequest');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Result', TypeInfo(binary), Result, []);
+  __Message.Read('OwnerData', TypeInfo(AnsiString), OwnerData, []);
+
+  __response.Free();
+end;
+
+procedure TAppServer_AsyncProxy.Invoke_AS_Execute(const ProviderName: WideString; const CommandText: WideString; const Params: Binary; const OwnerData: AnsiString);
+begin
+  __AssertProxyNotBusy('AS_Execute');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'uRODataSnap', __InterfaceName, 'AS_Execute');
+  __Message.Write('ProviderName', TypeInfo(WideString), ProviderName, []);
+  __Message.Write('CommandText', TypeInfo(WideString), CommandText, []);
+  __Message.Write('Params', TypeInfo(Binary), Params, []);
+  __Message.Write('OwnerData', TypeInfo(AnsiString), OwnerData, []);
+  __DispatchAsyncRequest('AS_Execute',__Message);
+end;
+
+procedure TAppServer_AsyncProxy.Retrieve_AS_Execute(out Params: Binary; out OwnerData: AnsiString);
+var __response:TStream;
+begin
+  Params := nil;
+  __response := __RetrieveAsyncResponse('AS_Execute');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Params', TypeInfo(Binary), Params, []);
+  __Message.Read('OwnerData', TypeInfo(AnsiString), OwnerData, []);
+
+  __response.Free();
+end;
+
+
+initialization
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnap_Intf.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnap_Intf.pas
new file mode 100644
index 0000000..c8fe016
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnap_Intf.pas	
@@ -0,0 +1,319 @@
+unit uRODataSnap_Intf;
+
+interface
+
+uses Classes, TypInfo, uROClient, uROTypes, uROClientIntf;
+
+const
+  LibraryUID = '{9EC7C50C-DAC2-48A9-9A0F-CBAA29A11EF7}';
+
+  IAppServer_IID : TGUID = '{1AEFCC20-7A24-11D2-98B0-C69BEB4B5B6D}';
+
+type
+   { Forward declarations }
+   IAppServer = interface;
+   TProviderNames = class;
+
+   { TProviderNames }
+   TProviderNames = class(TROArray)
+   private
+     fItems : array of AnsiString;
+   protected
+     function GetItems(Index : integer) : AnsiString;
+     procedure SetItems(Index : integer; const Value : AnsiString);
+    function GetCount : integer; override;
+   public
+     class function GetItemType : PTypeInfo; override;
+     class function GetItemSize : integer; override;
+     function GetItemRef(Index : integer) : pointer; override;
+     procedure Clear; override;
+    procedure Delete(Index : integer); override;
+     procedure Resize(ElementCount : integer); override;
+
+    procedure Assign(iSource:TPersistent); override;
+    function Add(const Value:AnsiString):integer;
+
+    property Count : integer read GetCount;
+     property Items[Index : integer] : AnsiString read GetItems write SetItems; default;
+   end;
+
+   { IAppServer }
+   IAppServer = interface
+      ['{1AEFCC20-7A24-11D2-98B0-C69BEB4B5B6D}']
+      function AS_ApplyUpdates(const ProviderName: WideString; const Delta: Binary; const MaxErrors: Integer; out ErrorCount: Integer; var OwnerData: AnsiString): binary;
+      function AS_GetRecords(const ProviderName: WideString; const Count: Integer; out RecsOut: Integer; const Options: Integer; const CommandText: WideString; var Params: Binary; var OwnerData: AnsiString): binary;
+      function AS_DataRequest(const ProviderName: WideString; const Data: Binary): binary;
+      function AS_GetProviderNames: TProviderNames;
+      function AS_GetParams(const ProviderName: WideString; var OwnerData: AnsiString): binary;
+      function AS_RowRequest(const ProviderName: WideString; const Row: Binary; const RequestType: Integer; var OwnerData: AnsiString): binary;
+      procedure AS_Execute(const ProviderName: WideString; const CommandText: WideString; var Params: Binary; var OwnerData: AnsiString);
+   end;
+
+   { CoIAppServer }
+   CoAppServer = class
+      class function Create(const iAppServerName:String; const aMessage : IROMessage; aTransportChannel : IROTransportChannel) : IAppServer;
+   end;
+
+   TAppServer_Proxy = class(TROProxy, IAppServer)
+   private
+     fIAppServerName:String;
+   protected
+     constructor Create(const iAppServerName:String; const aMessage : IROMessage; const aTransportChannel : IROTransportChannel); reintroduce; overload;
+     constructor Create(const aMessage : IROMessage; const aTransportChannel : IROTransportChannel); reintroduce; overload;
+     // Internal
+     function __GetInterfaceName:String; override;
+
+     // IAppServer     
+     function AS_ApplyUpdates(const ProviderName: WideString; const Delta: Binary; const MaxErrors: Integer; out ErrorCount: Integer; var OwnerData: AnsiString): binary; virtual;
+     function AS_GetRecords(const ProviderName: WideString; const Count: Integer; out RecsOut: Integer; const Options: Integer; const CommandText: WideString; var Params: Binary; var OwnerData: AnsiString): binary; virtual;
+     function AS_DataRequest(const ProviderName: WideString; const Data: Binary): binary; virtual;
+     function AS_GetProviderNames: TProviderNames; virtual;
+     function AS_GetParams(const ProviderName: WideString; var OwnerData: AnsiString): binary; virtual;
+     function AS_RowRequest(const ProviderName: WideString; const Row: Binary; const RequestType: Integer; var OwnerData: AnsiString): binary; virtual;
+     procedure AS_Execute(const ProviderName: WideString; const CommandText: WideString; var Params: Binary; var OwnerData: AnsiString); virtual;
+   end;
+
+implementation
+
+uses
+  {vcl:} SysUtils,
+  {RemObjects:} uRORes, uROClasses;
+
+{ TProviderNames }
+
+procedure TProviderNames.Assign(iSource:TPersistent); 
+var lSource:TProviderNames;
+    i:integer;
+begin
+  if (iSource is TProviderNames) then begin
+    lSource := TProviderNames(iSource);
+    Clear();
+    Resize(lSource.Count);
+    for i := 0 to Count-1 do begin
+      Items[i] := lSource.Items[i];
+    end;
+  end
+  else begin
+    inherited Assign(iSource);
+  end;
+end;
+
+class function TProviderNames.GetItemType : PTypeInfo;
+begin
+  result := TypeInfo(AnsiString);
+end;
+
+class function TProviderNames.GetItemSize : integer;
+begin
+  result := SizeOf(AnsiString);
+end;
+
+function TProviderNames.GetItems(Index : integer) : AnsiString;
+begin
+  if (Index < 0) or (Index >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[Index]);
+  result := fItems[Index];
+end;
+
+function TProviderNames.GetItemRef(Index : integer) : pointer;
+begin
+  result := @fItems[Index];
+end;
+
+procedure TProviderNames.Clear;
+begin
+  SetLength(fItems, 0);
+end;
+
+procedure TProviderNames.Delete(Index : integer);
+var i : integer;
+begin
+  if (Index>=Count) then RaiseError(err_InvalidIndex, [Index]);
+
+  if (Index<Count-1) then
+    for i := Index to Count-1 do fItems[i] := fItems[i+1];
+
+  SetLength(fItems, Count-1)
+end;
+
+procedure TProviderNames.SetItems(Index : integer; const Value : AnsiString);
+begin
+  fItems[Index] := Value;
+end;
+
+procedure TProviderNames.Resize(ElementCount : integer);
+begin
+  SetLength(fItems, ElementCount);
+end;
+
+function TProviderNames.GetCount: integer;
+begin
+  result := Length(fItems);
+end;
+
+function TProviderNames.Add(const Value:AnsiString):integer;
+begin
+  SetLength(fItems, Length(fItems)+1);
+  result := Length(fItems)-1;
+  fItems[result] := Value;
+end;
+
+{ CoIAppServer }
+
+class function CoAppServer.Create(const iAppServerName:String; const aMessage : IROMessage; aTransportChannel : IROTransportChannel) : IAppServer;
+begin
+  result := TAppServer_Proxy.Create(iAppServerName, aMessage, aTransportChannel);
+end;
+
+{ TAppServer_Proxy }
+
+constructor TAppServer_Proxy.Create(const iAppServerName: String; const aMessage : IROMessage; const aTransportChannel : IROTransportChannel);
+begin
+  inherited Create(aMessage,aTransportChannel);
+  fIAppServerName := iAppServerName;
+end;
+
+constructor TAppServer_Proxy.Create(const aMessage : IROMessage; const aTransportChannel : IROTransportChannel);
+begin
+  Create('', aMessage, aTransportChannel);
+end;
+
+function TAppServer_Proxy.__GetInterfaceName: String;
+begin
+  result := fIAppServerName;
+end;
+
+function TAppServer_Proxy.AS_ApplyUpdates(const ProviderName: WideString; const Delta: Binary; const MaxErrors: Integer; out ErrorCount: Integer; var OwnerData: AnsiString): binary;
+begin
+   try
+     __Message.InitializeRequestMessage(__TransportChannel, '', fIAppServerName, 'AS_ApplyUpdates');
+     __Message.Write('ProviderName', TypeInfo(WideString), ProviderName, []);
+     __Message.Write('Delta', TypeInfo(Binary), Delta, []);
+     __Message.Write('MaxErrors', TypeInfo(Integer), MaxErrors, []);
+     __Message.Write('OwnerData', TypeInfo(AnsiString), OwnerData, []);
+     __Message.Finalize;
+
+     __TransportChannel.Dispatch(__Message);
+
+     __Message.Read('ErrorCount', TypeInfo(Integer), ErrorCount, []);
+     __Message.Read('OwnerData', TypeInfo(AnsiString), OwnerData, []);
+     __Message.Read('Result', TypeInfo(binary), result, []);
+  finally
+    __Message.FreeStream;
+  end
+end;
+
+function TAppServer_Proxy.AS_GetRecords(const ProviderName: WideString; const Count: Integer; out RecsOut: Integer; const Options: Integer; const CommandText: WideString; var Params: Binary; var OwnerData: AnsiString): binary;
+begin
+   try
+     __Message.InitializeRequestMessage(__TransportChannel, '', fIAppServerName, 'AS_GetRecords');
+     __Message.Write('ProviderName', TypeInfo(WideString), ProviderName, []);
+     __Message.Write('Count', TypeInfo(Integer), Count, []);
+     __Message.Write('Options', TypeInfo(Integer), Options, []);
+     __Message.Write('CommandText', TypeInfo(WideString), CommandText, []);
+     __Message.Write('Params', TypeInfo(Binary), Params, []);
+     __Message.Write('OwnerData', TypeInfo(AnsiString), OwnerData, []);
+     __Message.Finalize;
+
+     __TransportChannel.Dispatch(__Message);
+
+     __Message.Read('RecsOut', TypeInfo(Integer), RecsOut, []);
+     __Message.Read('Params', TypeInfo(Binary), Params, []);
+     __Message.Read('OwnerData', TypeInfo(AnsiString), OwnerData, []);
+     __Message.Read('Result', TypeInfo(binary), result, []);
+  finally
+    __Message.FreeStream;
+  end
+end;
+
+function TAppServer_Proxy.AS_DataRequest(const ProviderName: WideString; const Data: Binary): binary;
+begin
+   try
+     __Message.InitializeRequestMessage(__TransportChannel, '', fIAppServerName, 'AS_DataRequest');
+     __Message.Write('ProviderName', TypeInfo(WideString), ProviderName, []);
+     __Message.Write('Data', TypeInfo(Binary), Data, []);
+     __Message.Finalize;
+
+     __TransportChannel.Dispatch(__Message);
+
+     __Message.Read('Result', TypeInfo(binary), result, []);
+  finally
+    __Message.FreeStream;
+  end
+end;
+
+function TAppServer_Proxy.AS_GetProviderNames: TProviderNames;
+begin
+   try
+     __Message.InitializeRequestMessage(__TransportChannel, '', fIAppServerName, 'AS_GetProviderNames');
+     __Message.Finalize;
+
+     __TransportChannel.Dispatch(__Message);
+
+     __Message.Read('Result', TypeInfo(TProviderNames), result, []);
+  finally
+    __Message.FreeStream;
+  end
+end;
+
+function TAppServer_Proxy.AS_GetParams(const ProviderName: WideString; var OwnerData: AnsiString): binary;
+begin
+   try
+     __Message.InitializeRequestMessage(__TransportChannel, '', fIAppServerName, 'AS_GetParams');
+     __Message.Write('ProviderName', TypeInfo(WideString), ProviderName, []);
+     __Message.Write('OwnerData', TypeInfo(AnsiString), OwnerData, []);
+     __Message.Finalize;
+
+     __TransportChannel.Dispatch(__Message);
+
+     __Message.Read('OwnerData', TypeInfo(AnsiString), OwnerData, []);
+     __Message.Read('Result', TypeInfo(binary), result, []);
+  finally
+    __Message.FreeStream;
+  end
+end;
+
+function TAppServer_Proxy.AS_RowRequest(const ProviderName: WideString; const Row: Binary; const RequestType: Integer; var OwnerData: AnsiString): binary;
+begin
+   try
+     __Message.InitializeRequestMessage(__TransportChannel, '', fIAppServerName, 'AS_RowRequest');
+     __Message.Write('ProviderName', TypeInfo(WideString), ProviderName, []);
+     __Message.Write('Row', TypeInfo(Binary), Row, []);
+     __Message.Write('RequestType', TypeInfo(Integer), RequestType, []);
+     __Message.Write('OwnerData', TypeInfo(AnsiString), OwnerData, []);
+     __Message.Finalize;
+
+     __TransportChannel.Dispatch(__Message);
+
+     __Message.Read('OwnerData', TypeInfo(AnsiString), OwnerData, []);
+     __Message.Read('Result', TypeInfo(binary), result, []);
+  finally
+    __Message.FreeStream;
+  end
+end;
+
+procedure TAppServer_Proxy.AS_Execute(const ProviderName: WideString; const CommandText: WideString; var Params: Binary; var OwnerData: AnsiString);
+begin
+   try
+     __Message.InitializeRequestMessage(__TransportChannel, '', fIAppServerName, 'AS_Execute');
+     __Message.Write('ProviderName', TypeInfo(WideString), ProviderName, []);
+     __Message.Write('CommandText', TypeInfo(WideString), CommandText, []);
+     __Message.Write('Params', TypeInfo(Binary), Params, []);
+     __Message.Write('OwnerData', TypeInfo(AnsiString), OwnerData, []);
+     __Message.Finalize;
+
+     __TransportChannel.Dispatch(__Message);
+
+     __Message.Read('Params', TypeInfo(Binary), Params, []);
+     __Message.Read('OwnerData', TypeInfo(AnsiString), OwnerData, []);
+  finally
+    __Message.FreeStream;
+  end
+end;
+
+initialization
+  RegisterROClass(TProviderNames);
+  RegisterProxyClass(IAppServer_IID, TAppServer_Proxy);
+
+finalization
+  UnregisterProxyClass(IAppServer_IID);
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnap_Invk.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnap_Invk.pas
new file mode 100644
index 0000000..dc4da47
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/DataSnap/uRODataSnap_Invk.pas	
@@ -0,0 +1,212 @@
+unit uRODataSnap_Invk;
+
+interface
+
+uses Classes, uROServer, uROClientIntf, uROServerIntf;
+
+type
+  TAppServer_Invoker = class(TROInvoker)
+  published
+    procedure Invoke_AS_ApplyUpdates(const __Instance : IInterface; const __Message : IROMessage; const __Transport : IROTransport; out __oResponseOptions:TROResponseOptions);
+    procedure Invoke_AS_GetRecords(const __Instance : IInterface; const __Message : IROMessage; const __Transport : IROTransport; out __oResponseOptions:TROResponseOptions);
+    procedure Invoke_AS_DataRequest(const __Instance : IInterface; const __Message : IROMessage; const __Transport : IROTransport; out __oResponseOptions:TROResponseOptions);
+    procedure Invoke_AS_GetProviderNames(const __Instance : IInterface; const __Message : IROMessage; const __Transport : IROTransport; out __oResponseOptions:TROResponseOptions);
+    procedure Invoke_AS_GetParams(const __Instance : IInterface; const __Message : IROMessage; const __Transport : IROTransport; out __oResponseOptions:TROResponseOptions);
+    procedure Invoke_AS_RowRequest(const __Instance : IInterface; const __Message : IROMessage; const __Transport : IROTransport; out __oResponseOptions:TROResponseOptions);
+    procedure Invoke_AS_Execute(const __Instance : IInterface; const __Message : IROMessage; const __Transport : IROTransport; out __oResponseOptions:TROResponseOptions);
+  end;
+
+implementation
+
+uses {$IFDEF DEBUG_REMOBJECTS_DATASNAP}eDebugServer, uROBinMessage,{$ENDIF}
+     uROTypes, uRODataSnap_Intf;
+
+procedure TAppServer_Invoker.Invoke_AS_ApplyUpdates(const __Instance : IInterface; const __Message : IROMessage; const __Transport : IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function AS_ApplyUpdates(const ProviderName: WideString; const Delta: Binary; const MaxErrors: Integer; out ErrorCount: Integer; var OwnerData: AnsiString): binary; }
+var
+    ProviderName: WideString;
+    Delta: Binary;
+    MaxErrors: Integer;
+    ErrorCount: Integer;
+    OwnerData: AnsiString;
+    Result: binary;
+begin
+  Delta := NIL;
+  Result := NIL;
+  try
+    __Message.Read('ProviderName', TypeInfo(WideString), ProviderName, []);
+    __Message.Read('Delta', TypeInfo(Binary), Delta, []);
+    __Message.Read('MaxErrors', TypeInfo(Integer), MaxErrors, []);
+    __Message.Read('OwnerData', TypeInfo(AnsiString), OwnerData, []);
+
+    Result := (__Instance as IAppServer).AS_ApplyUpdates(ProviderName, Delta, MaxErrors, ErrorCount, OwnerData);
+
+    __Message.InitializeResponseMessage(__Transport, '', 'IAppServer', 'AS_ApplyUpdatesResponse');
+    __Message.Write('ErrorCount', TypeInfo(Integer), ErrorCount, []);
+    __Message.Write('OwnerData', TypeInfo(AnsiString), OwnerData, []);
+    __Message.Write('Result', TypeInfo(binary), Result, []);
+    __Message.Finalize;
+
+  finally
+    Delta.Free;
+    Result.Free;
+  end;
+end;
+procedure TAppServer_Invoker.Invoke_AS_GetRecords(const __Instance : IInterface; const __Message : IROMessage; const __Transport : IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function AS_GetRecords(const ProviderName: WideString; const Count: Integer; out RecsOut: Integer; const Options: Integer; const CommandText: WideString; var Params: Binary; var OwnerData: AnsiString): binary; }
+var
+    ProviderName: WideString;
+    Count: Integer;
+    RecsOut: Integer;
+    Options: Integer;
+    CommandText: WideString;
+    Params: Binary;
+    OwnerData: AnsiString;
+    Result: binary;
+begin
+  Params := NIL;
+  Result := NIL;
+  try
+    __Message.Read('ProviderName', TypeInfo(WideString), ProviderName, []);
+    __Message.Read('Count', TypeInfo(Integer), Count, []);
+    __Message.Read('Options', TypeInfo(Integer), Options, []);
+    __Message.Read('CommandText', TypeInfo(WideString), CommandText, []);
+    __Message.Read('Params', TypeInfo(Binary), Params, []);
+    __Message.Read('OwnerData', TypeInfo(AnsiString), OwnerData, []);
+
+    Result := (__Instance as uRODataSnap_Intf.IAppServer).AS_GetRecords(ProviderName, Count, RecsOut, Options, CommandText, Params, OwnerData);
+
+    __Message.InitializeResponseMessage(__Transport, '', 'IAppServer', 'AS_GetRecordsResponse');
+    __Message.Write('RecsOut', TypeInfo(Integer), RecsOut, []);
+    __Message.Write('Params', TypeInfo(Binary), Params, []);
+    __Message.Write('OwnerData', TypeInfo(AnsiString), OwnerData, []);
+    __Message.Write('Result', TypeInfo(binary), Result, []);
+    __Message.Finalize;
+
+  finally
+    Params.Free;
+    Result.Free;
+  end;
+end;
+procedure TAppServer_Invoker.Invoke_AS_DataRequest(const __Instance : IInterface; const __Message : IROMessage; const __Transport : IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function AS_DataRequest(const ProviderName: WideString; const Data: Binary): binary; }
+var
+    ProviderName: WideString;
+    Data: Binary;
+    Result: binary;
+begin
+  Data := NIL;
+  Result := NIL;
+  try
+    __Message.Read('ProviderName', TypeInfo(WideString), ProviderName, []);
+    __Message.Read('Data', TypeInfo(Binary), Data, []);
+
+    Result := (__Instance as IAppServer).AS_DataRequest(ProviderName, Data);
+
+    __Message.InitializeResponseMessage(__Transport, '', 'IAppServer', 'AS_DataRequestResponse');
+    __Message.Write('Result', TypeInfo(binary), Result, []);
+    __Message.Finalize;
+
+  finally
+    Data.Free;
+    Result.Free;
+  end;
+end;
+procedure TAppServer_Invoker.Invoke_AS_GetProviderNames(const __Instance : IInterface; const __Message : IROMessage; const __Transport : IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function AS_GetProviderNames: TProviderNames; }
+var
+    Result: TProviderNames;
+begin
+  Result := NIL;
+  try
+
+    Result := (__Instance as IAppServer).AS_GetProviderNames;
+
+    __Message.InitializeResponseMessage(__Transport, '', 'IAppServer', 'AS_GetProviderNamesResponse');
+    __Message.Write('Result', TypeInfo(TProviderNames), Result, []);
+    __Message.Finalize;
+
+  finally
+    Result.Free;
+  end;
+end;
+procedure TAppServer_Invoker.Invoke_AS_GetParams(const __Instance : IInterface; const __Message : IROMessage; const __Transport : IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function AS_GetParams(const ProviderName: WideString; var OwnerData: AnsiString): binary; }
+var
+    ProviderName: WideString;
+    OwnerData: AnsiString;
+    Result: binary;
+begin
+  Result := NIL;
+  try
+    __Message.Read('ProviderName', TypeInfo(WideString), ProviderName, []);
+    __Message.Read('OwnerData', TypeInfo(AnsiString), OwnerData, []);
+
+    Result := (__Instance as IAppServer).AS_GetParams(ProviderName, OwnerData);
+
+    __Message.InitializeResponseMessage(__Transport, '', 'IAppServer', 'AS_GetParamsResponse');
+    __Message.Write('OwnerData', TypeInfo(AnsiString), OwnerData, []);
+    __Message.Write('Result', TypeInfo(binary), Result, []);
+    __Message.Finalize;
+
+  finally
+    Result.Free;
+  end;
+end;
+procedure TAppServer_Invoker.Invoke_AS_RowRequest(const __Instance : IInterface; const __Message : IROMessage; const __Transport : IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function AS_RowRequest(const ProviderName: WideString; const Row: Binary; const RequestType: Integer; var OwnerData: AnsiString): binary; }
+var
+    ProviderName: WideString;
+    Row: Binary;
+    RequestType: Integer;
+    OwnerData: AnsiString;
+    Result: binary;
+begin
+  Row := NIL;
+  Result := NIL;
+  try
+    __Message.Read('ProviderName', TypeInfo(WideString), ProviderName, []);
+    __Message.Read('Row', TypeInfo(Binary), Row, []);
+    __Message.Read('RequestType', TypeInfo(Integer), RequestType, []);
+    __Message.Read('OwnerData', TypeInfo(AnsiString), OwnerData, []);
+
+    Result := (__Instance as IAppServer).AS_RowRequest(ProviderName, Row, RequestType, OwnerData);
+
+    __Message.InitializeResponseMessage(__Transport, '', 'IAppServer', 'AS_RowRequestResponse');
+    __Message.Write('OwnerData', TypeInfo(AnsiString), OwnerData, []);
+    __Message.Write('Result', TypeInfo(binary), Result, []);
+    __Message.Finalize;
+
+  finally
+    Row.Free;
+    Result.Free;
+  end;
+end;
+procedure TAppServer_Invoker.Invoke_AS_Execute(const __Instance : IInterface; const __Message : IROMessage; const __Transport : IROTransport; out __oResponseOptions:TROResponseOptions);
+{ procedure AS_Execute(const ProviderName: WideString; const CommandText: WideString; var Params: Binary; var OwnerData: AnsiString); }
+var
+    ProviderName: WideString;
+    CommandText: WideString;
+    Params: Binary;
+    OwnerData: AnsiString;
+begin
+  Params := NIL;
+  try
+    __Message.Read('ProviderName', TypeInfo(WideString), ProviderName, []);
+    __Message.Read('CommandText', TypeInfo(WideString), CommandText, []);
+    __Message.Read('Params', TypeInfo(Binary), Params, []);
+    __Message.Read('OwnerData', TypeInfo(AnsiString), OwnerData, []);
+
+    (__Instance as IAppServer).AS_Execute(ProviderName, CommandText, Params, OwnerData);
+
+    __Message.InitializeResponseMessage(__Transport, '', 'IAppServer', 'AS_ExecuteResponse');
+    __Message.Write('Params', TypeInfo(Binary), Params, []);
+    __Message.Write('OwnerData', TypeInfo(AnsiString), OwnerData, []);
+    __Message.Finalize;
+
+  finally
+    Params.Free;
+  end;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/NewRORemoteDataModule.ico b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/NewRORemoteDataModule.ico
new file mode 100644
index 0000000..863d859
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/NewRORemoteDataModule.ico differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D10.bdsproj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D10.bdsproj
new file mode 100644
index 0000000..8177724
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D10.bdsproj	
@@ -0,0 +1,180 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality" Type="String">Delphi.Personality</Option>
+			<Option Name="ProjectType" Type="String"></Option>
+			<Option Name="Version" Type="String">1.0</Option>
+			<Option Name="GUID" Type="String">{ED80B945-1838-48EB-9D77-FD634984C25F}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource" Type="String">RemObjects_IDE_D10.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version" Type="String">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A" Type="Integer">8</Compiler>
+			<Compiler Name="B" Type="Integer">0</Compiler>
+			<Compiler Name="C" Type="Integer">1</Compiler>
+			<Compiler Name="D" Type="Integer">1</Compiler>
+			<Compiler Name="E" Type="Integer">0</Compiler>
+			<Compiler Name="F" Type="Integer">0</Compiler>
+			<Compiler Name="G" Type="Integer">1</Compiler>
+			<Compiler Name="H" Type="Integer">1</Compiler>
+			<Compiler Name="I" Type="Integer">1</Compiler>
+			<Compiler Name="J" Type="Integer">0</Compiler>
+			<Compiler Name="K" Type="Integer">0</Compiler>
+			<Compiler Name="L" Type="Integer">1</Compiler>
+			<Compiler Name="M" Type="Integer">0</Compiler>
+			<Compiler Name="N" Type="Integer">1</Compiler>
+			<Compiler Name="O" Type="Integer">1</Compiler>
+			<Compiler Name="P" Type="Integer">1</Compiler>
+			<Compiler Name="Q" Type="Integer">0</Compiler>
+			<Compiler Name="R" Type="Integer">0</Compiler>
+			<Compiler Name="S" Type="Integer">0</Compiler>
+			<Compiler Name="T" Type="Integer">0</Compiler>
+			<Compiler Name="U" Type="Integer">0</Compiler>
+			<Compiler Name="V" Type="Integer">1</Compiler>
+			<Compiler Name="W" Type="Integer">1</Compiler>
+			<Compiler Name="X" Type="Integer">1</Compiler>
+			<Compiler Name="Y" Type="Integer">1</Compiler>
+			<Compiler Name="Z" Type="Integer">1</Compiler>
+			<Compiler Name="ShowHints" Type="Boolean">True</Compiler>
+			<Compiler Name="ShowWarnings" Type="Boolean">True</Compiler>
+			<Compiler Name="UnitAliases" Type="String">WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;</Compiler>
+			<Compiler Name="NamespacePrefix" Type="String"></Compiler>
+			<Compiler Name="GenerateDocumentation" Type="Boolean">False</Compiler>
+			<Compiler Name="DefaultNamespace" Type="String"></Compiler>
+			<Compiler Name="SymbolDeprecated" Type="Boolean">False</Compiler>
+			<Compiler Name="SymbolLibrary" Type="Boolean">False</Compiler>
+			<Compiler Name="SymbolPlatform" Type="Boolean">False</Compiler>
+			<Compiler Name="SymbolExperimental" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitLibrary" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitPlatform" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitDeprecated" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitExperimental" Type="Boolean">False</Compiler>
+			<Compiler Name="HResultCompat" Type="Boolean">True</Compiler>
+			<Compiler Name="HidingMember" Type="Boolean">True</Compiler>
+			<Compiler Name="HiddenVirtual" Type="Boolean">True</Compiler>
+			<Compiler Name="Garbage" Type="Boolean">True</Compiler>
+			<Compiler Name="BoundsError" Type="Boolean">True</Compiler>
+			<Compiler Name="ZeroNilCompat" Type="Boolean">True</Compiler>
+			<Compiler Name="StringConstTruncated" Type="Boolean">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar" Type="Boolean">True</Compiler>
+			<Compiler Name="TypedConstVarPar" Type="Boolean">True</Compiler>
+			<Compiler Name="AsgToTypedConst" Type="Boolean">True</Compiler>
+			<Compiler Name="CaseLabelRange" Type="Boolean">True</Compiler>
+			<Compiler Name="ForVariable" Type="Boolean">True</Compiler>
+			<Compiler Name="ConstructingAbstract" Type="Boolean">True</Compiler>
+			<Compiler Name="ComparisonFalse" Type="Boolean">True</Compiler>
+			<Compiler Name="ComparisonTrue" Type="Boolean">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned" Type="Boolean">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned" Type="Boolean">True</Compiler>
+			<Compiler Name="UnsupportedConstruct" Type="Boolean">True</Compiler>
+			<Compiler Name="FileOpen" Type="Boolean">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc" Type="Boolean">True</Compiler>
+			<Compiler Name="BadGlobalSymbol" Type="Boolean">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor" Type="Boolean">True</Compiler>
+			<Compiler Name="InvalidDirective" Type="Boolean">True</Compiler>
+			<Compiler Name="PackageNoLink" Type="Boolean">True</Compiler>
+			<Compiler Name="PackageThreadVar" Type="Boolean">True</Compiler>
+			<Compiler Name="ImplicitImport" Type="Boolean">True</Compiler>
+			<Compiler Name="HPPEMITIgnored" Type="Boolean">True</Compiler>
+			<Compiler Name="NoRetVal" Type="Boolean">True</Compiler>
+			<Compiler Name="UseBeforeDef" Type="Boolean">True</Compiler>
+			<Compiler Name="ForLoopVarUndef" Type="Boolean">True</Compiler>
+			<Compiler Name="UnitNameMismatch" Type="Boolean">True</Compiler>
+			<Compiler Name="NoCFGFileFound" Type="Boolean">True</Compiler>
+			<Compiler Name="MessageDirective" Type="Boolean">True</Compiler>
+			<Compiler Name="ImplicitVariants" Type="Boolean">True</Compiler>
+			<Compiler Name="UnicodeToLocale" Type="Boolean">True</Compiler>
+			<Compiler Name="LocaleToUnicode" Type="Boolean">True</Compiler>
+			<Compiler Name="ImagebaseMultiple" Type="Boolean">True</Compiler>
+			<Compiler Name="SuspiciousTypecast" Type="Boolean">True</Compiler>
+			<Compiler Name="PrivatePropAccessor" Type="Boolean">True</Compiler>
+			<Compiler Name="UnsafeType" Type="Boolean">False</Compiler>
+			<Compiler Name="UnsafeCode" Type="Boolean">False</Compiler>
+			<Compiler Name="UnsafeCast" Type="Boolean">False</Compiler>
+			<Compiler Name="OptionTruncated" Type="Boolean">True</Compiler>
+			<Compiler Name="WideCharReduced" Type="Boolean">True</Compiler>
+			<Compiler Name="DuplicatesIgnored" Type="Boolean">True</Compiler>
+			<Compiler Name="UnitInitSeq">True</Compiler>
+			<Compiler Name="LocalPInvoke">True</Compiler>
+			<Compiler Name="CodePage"></Compiler>
+		</Compiler>
+		<Linker>
+			<Linker Name="MapFile" Type="Integer">0</Linker>
+			<Linker Name="OutputObjs" Type="Integer">0</Linker>
+			<Linker Name="ConsoleApp" Type="Integer">1</Linker>
+			<Linker Name="DebugInfo" Type="Boolean">False</Linker>
+			<Linker Name="RemoteSymbols" Type="Boolean">False</Linker>
+			<Linker Name="GenerateDRC" Type="Boolean">False</Linker>
+			<Linker Name="MinStackSize" Type="Integer">16384</Linker>
+			<Linker Name="MaxStackSize" Type="Integer">1048576</Linker>
+			<Linker Name="ImageBase" Type="Integer">4194304</Linker>
+			<Linker Name="ExeDescription" Type="String">RemObjects SDK - IDE Integration for Win32</Linker>
+			<Linker Name="GenerateHpps">False</Linker>
+		</Linker>
+		<Directories>
+			<Directories Name="OutputDir" Type="String"></Directories>
+			<Directories Name="UnitOutputDir" Type="String">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDLLOutputDir" Type="String">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDCPOutputDir" Type="String">..\..\Dcu\D10</Directories>
+			<Directories Name="SearchPath" Type="String">..\;..\..\Dcu\D10;..\..\..\Everwood\Dcu\D10</Directories>
+			<Directories Name="Packages" Type="String"></Directories>
+			<Directories Name="Conditionals" Type="String">HYDRA_DESIGNTIME</Directories>
+			<Directories Name="DebugSourceDirs" Type="String"></Directories>
+			<Directories Name="UsePackages" Type="Boolean">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams" Type="String"></Parameters>
+			<Parameters Name="HostApplication" Type="String"></Parameters>
+			<Parameters Name="Launcher" Type="String"></Parameters>
+			<Parameters Name="UseLauncher" Type="Boolean">False</Parameters>
+			<Parameters Name="DebugCWD" Type="String"></Parameters>
+			<Parameters Name="RemoteHost" Type="String"></Parameters>
+			<Parameters Name="RemotePath" Type="String"></Parameters>
+			<Parameters Name="RemoteLauncher" Type="String"></Parameters>
+			<Parameters Name="RemoteCWD" Type="String"></Parameters>
+			<Parameters Name="RemoteDebug" Type="Boolean">False</Parameters>
+			<Parameters Name="Debug Symbols Search Path"></Parameters>
+			<Parameters Name="LoadAllSymbols">True</Parameters>
+			<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+		</Parameters>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo" Type="Boolean">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="MajorVer" Type="Integer">0</VersionInfo>
+			<VersionInfo Name="MinorVer" Type="Integer">0</VersionInfo>
+			<VersionInfo Name="Release" Type="Integer">0</VersionInfo>
+			<VersionInfo Name="Build" Type="Integer">0</VersionInfo>
+			<VersionInfo Name="Debug" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="PreRelease" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="Special" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="Private" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="DLL" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="Locale" Type="Integer">1033</VersionInfo>
+			<VersionInfo Name="CodePage" Type="Integer">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName" Type="String">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription" Type="String"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion" Type="String">0.0.0.0</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName" Type="String"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright" Type="String"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks" Type="String"></VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename" Type="String"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName" Type="String">RemObjects SDK</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion" Type="String">1.0.0.0</VersionInfoKeys>
+		</VersionInfoKeys>
+		<Language>
+			<Language Name="ActiveLang" Type="String"></Language>
+			<Language Name="ProjectLang" Type="String">$00000000</Language>
+			<Language Name="RootDir" Type="String"></Language>
+		</Language>
+	</Delphi.Personality>
+	<ModelSupport>True</ModelSupport>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D10.cfg b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D10.cfg
new file mode 100644
index 0000000..9309b0b
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D10.cfg	
@@ -0,0 +1,53 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N0"..\..\Dcu\D10"
+-LE"..\..\Dcu\D10"
+-LN"..\..\Dcu\D10"
+-U"..\;..\..\Dcu\D10;..\..\..\Everwood\Dcu\D10"
+-O"..\;..\..\Dcu\D10;..\..\..\Everwood\Dcu\D10"
+-I"..\;..\..\Dcu\D10;..\..\..\Everwood\Dcu\D10"
+-R"..\;..\..\Dcu\D10;..\..\..\Everwood\Dcu\D10"
+-DHYDRA_DESIGNTIME
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-SYMBOL_EXPERIMENTAL
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNIT_EXPERIMENTAL
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D10.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D10.dpk
new file mode 100644
index 0000000..9b51098
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D10.dpk	
@@ -0,0 +1,82 @@
+package RemObjects_IDE_D10;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - IDE Integration for Win32'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+{$DEFINE HYDRA_DESIGNTIME}
+{%File '..\RemObjects.inc'}
+{%TogetherDiagram 'ModelSupport_RemObjects_IDE_D10\default.txaPackage'}
+
+requires
+  designide,
+  vclx,
+  inet,
+  vcl,
+  rtl,
+  RemObjects_Core_D10,
+  RemObjects_Everwood_D10,
+  dbrtl;
+
+contains
+  uROIDEPrjWizard in 'uROIDEPrjWizard.pas',
+  uROIDEMenu in 'uROIDEMenu.pas',
+  uRORODLNotifier in 'uRORODLNotifier.pas',
+  uROIDETools in 'uROIDETools.pas',
+  uRODLGenTools in '..\CodeGen\uRODLGenTools.pas',
+  uRODLToPascalImpl in '..\CodeGen\uRODLToPascalImpl.pas',
+  uRODLToPascalIntf in '..\CodeGen\uRODLToPascalIntf.pas',
+  uRODLToPascalInvk in '..\CodeGen\uRODLToPascalInvk.pas',
+  fServerProjectOptions in 'fServerProjectOptions.pas' {ServerProjectOptions},
+  fCustomIDEMessagesForm in 'fCustomIDEMessagesForm.pas' {CustomIDEMessagesForm},
+  RemObjects_IDE_Reg in 'RemObjects_IDE_Reg.pas',
+  uROResWriter in 'uROResWriter.pas',
+  fDispatchersEditorForm in 'fDispatchersEditorForm.pas' {DispatchersEditorForm},
+  uROIDEData in 'uROIDEData.pas' {IdeData: TDataModule},
+  uRODLToPascal in '..\CodeGen\uRODLToPascal.pas',
+  fROAbout in 'fROAbout.pas' {AboutForm},
+  uROIDEEditors in 'uROIDEEditors.pas',
+  uROProductVersionInfoForm in 'uROProductVersionInfoForm.pas' {ProductVersionInfoForm},
+  uROProductVersionInfo in 'uROProductVersionInfo.pas',
+  uROProductVersionInfo_Intf in 'uROProductVersionInfo_Intf.pas',
+  fROServerClassForm in 'fROServerClassForm.pas' {ROServerClassForm},
+  uRODECReg in '..\RODEC\uRODECReg.pas',
+  uROEncKeyPropEditor in '..\RODEC\uROEncKeyPropEditor.pas' {CryptoKeyGenForm},
+  uROExtraEditors in 'uROExtraEditors.pas',
+  fNewProjectForm in 'fNewProjectForm.pas' {NewProjectForm},
+  uRODLToPascalAsync in '..\CodeGen\uRODLToPascalAsync.pas',
+  uROLoginNeededForm in 'uROLoginNeededForm.pas' {ROLoginNeededForm},
+  uRODLTemplateBasedConverterUtils in '..\CodeGen2\uRODLTemplateBasedConverterUtils.pas',
+  uRODLAsyncConverter in '..\CodeGen2\uRODLAsyncConverter.pas',
+  uRODLConvertersUtils in '..\CodeGen2\uRODLConvertersUtils.pas',
+  uRODLCppConverters in '..\CodeGen2\uRODLCppConverters.pas',
+  uRODLDelphiConverters in '..\CodeGen2\uRODLDelphiConverters.pas',
+  uRODLImplConverter in '..\CodeGen2\uRODLImplConverter.pas',
+  uRODLIntfConverter in '..\CodeGen2\uRODLIntfConverter.pas',
+  uRODLInvkConverter in '..\CodeGen2\uRODLInvkConverter.pas',
+  uRODLSplitableConverter in '..\CodeGen2\uRODLSplitableConverter.pas',
+  uRODLTemplateBasedConverter in '..\CodeGen2\uRODLTemplateBasedConverter.pas',
+  uRODLLineStream in '..\CodeGen2\uRODLLineStream.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D10.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D10.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D10.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D11.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D11.dpk
new file mode 100644
index 0000000..64b9550
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D11.dpk	
@@ -0,0 +1,79 @@
+package RemObjects_IDE_D11;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - IDE Integration for Win32'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+{$DEFINE HYDRA_DESIGNTIME}
+
+requires
+  designide,
+  vclx,
+  inet,
+  vcl,
+  rtl,
+  RemObjects_Core_D11,
+  RemObjects_Everwood_D11;
+
+contains
+  uROIDEPrjWizard in 'uROIDEPrjWizard.pas',
+  uROIDEMenu in 'uROIDEMenu.pas',
+  uRORODLNotifier in 'uRORODLNotifier.pas',
+  uROIDETools in 'uROIDETools.pas',
+  uRODLGenTools in '..\CodeGen\uRODLGenTools.pas',
+  uRODLToPascalImpl in '..\CodeGen\uRODLToPascalImpl.pas',
+  uRODLToPascalIntf in '..\CodeGen\uRODLToPascalIntf.pas',
+  uRODLToPascalInvk in '..\CodeGen\uRODLToPascalInvk.pas',
+  fServerProjectOptions in 'fServerProjectOptions.pas' {ServerProjectOptions},
+  fCustomIDEMessagesForm in 'fCustomIDEMessagesForm.pas' {CustomIDEMessagesForm},
+  RemObjects_IDE_Reg in 'RemObjects_IDE_Reg.pas',
+  uROResWriter in 'uROResWriter.pas',
+  fDispatchersEditorForm in 'fDispatchersEditorForm.pas' {DispatchersEditorForm},
+  uROIDEData in 'uROIDEData.pas' {IdeData: TDataModule},
+  uRODLToPascal in '..\CodeGen\uRODLToPascal.pas',
+  fROAbout in 'fROAbout.pas' {AboutForm},
+  uROIDEEditors in 'uROIDEEditors.pas',
+  uROProductVersionInfoForm in 'uROProductVersionInfoForm.pas' {ProductVersionInfoForm},
+  uROProductVersionInfo in 'uROProductVersionInfo.pas',
+  uROProductVersionInfo_Intf in 'uROProductVersionInfo_Intf.pas',
+  fROServerClassForm in 'fROServerClassForm.pas' {ROServerClassForm},
+  uRODECReg in '..\RODEC\uRODECReg.pas',
+  uROEncKeyPropEditor in '..\RODEC\uROEncKeyPropEditor.pas' {CryptoKeyGenForm},
+  uROExtraEditors in 'uROExtraEditors.pas',
+  fNewProjectForm in 'fNewProjectForm.pas' {NewProjectForm},
+  uRODLToPascalAsync in '..\CodeGen\uRODLToPascalAsync.pas',
+  uROLoginNeededForm in 'uROLoginNeededForm.pas' {ROLoginNeededForm},
+  uRODLTemplateBasedConverterUtils in '..\CodeGen2\uRODLTemplateBasedConverterUtils.pas',
+  uRODLAsyncConverter in '..\CodeGen2\uRODLAsyncConverter.pas',
+  uRODLConvertersUtils in '..\CodeGen2\uRODLConvertersUtils.pas',
+  uRODLCppConverters in '..\CodeGen2\uRODLCppConverters.pas',
+  uRODLDelphiConverters in '..\CodeGen2\uRODLDelphiConverters.pas',
+  uRODLImplConverter in '..\CodeGen2\uRODLImplConverter.pas',
+  uRODLIntfConverter in '..\CodeGen2\uRODLIntfConverter.pas',
+  uRODLInvkConverter in '..\CodeGen2\uRODLInvkConverter.pas',
+  uRODLSplitableConverter in '..\CodeGen2\uRODLSplitableConverter.pas',
+  uRODLTemplateBasedConverter in '..\CodeGen2\uRODLTemplateBasedConverter.pas',
+  uRODLLineStream in '..\CodeGen2\uRODLLineStream.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D11.dproj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D11.dproj
new file mode 100644
index 0000000..ee446a7
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D11.dproj	
@@ -0,0 +1,167 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{fe71e26f-b3f6-4155-b226-b778db554247}</ProjectGuid>
+    <MainSource>RemObjects_IDE_D11.dpk</MainSource>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+    <DCC_DependencyCheckOutputName>..\..\Dcu\D11\RemObjects_IDE_D11.bpl</DCC_DependencyCheckOutputName>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DebugInformation>False</DCC_DebugInformation>
+    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+    <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+    <DCC_DcuOutput>..\..\Dcu\D10</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D10</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D10</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D10</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D10</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\;..\..\Dcu\D10;..\..\..\Everwood\Dcu\D10</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\;..\..\Dcu\D10;..\..\..\Everwood\Dcu\D10</DCC_ResourcePath>
+    <DCC_ObjPath>..\;..\..\Dcu\D10;..\..\..\Everwood\Dcu\D10</DCC_ObjPath>
+    <DCC_IncludePath>..\;..\..\Dcu\D10;..\..\..\Everwood\Dcu\D10</DCC_IncludePath>
+    <DCC_Define>HYDRA_DESIGNTIME;RELEASE</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_SYMBOL_EXPERIMENTAL>False</DCC_SYMBOL_EXPERIMENTAL>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+    <DCC_UNIT_EXPERIMENTAL>False</DCC_UNIT_EXPERIMENTAL>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\;..\..\Dcu\D11;..\..\..\Everwood\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\;..\..\Dcu\D11;..\..\..\Everwood\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\;..\..\Dcu\D11;..\..\..\Everwood\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\;..\..\Dcu\D11;..\..\..\Everwood\Dcu\D11</DCC_IncludePath>
+    <DCC_Define>HYDRA_DESIGNTIME</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_SYMBOL_EXPERIMENTAL>False</DCC_SYMBOL_EXPERIMENTAL>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+    <DCC_UNIT_EXPERIMENTAL>False</DCC_UNIT_EXPERIMENTAL>
+  </PropertyGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Delphi.Personality</Borland.Personality>
+    <Borland.ProjectType>Package</Borland.ProjectType>
+    <BorlandProject>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">RemObjects SDK - IDE Integration for Win32</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">True</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">5</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">29</VersionInfo><VersionInfo Name="Build">661</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">5.0.29.661</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">RemObjects_IDE_D11.dpk</Source></Source><Excluded_Packages>
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      <Excluded_Packages Name="C:\Program Files (x86)\RemObjects Software\RemObjects SDK for Delphi\Dcu\D11\RemObjects_Indy_D11.bpl">RemObjects SDK - Indy Library</Excluded_Packages>
+      <Excluded_Packages Name="C:\Program Files (x86)\RemObjects Software\Data Abstract for Delphi\Dcu\D11\DataAbstract_IDE_D11.bpl">RemObjects Data Abstract - IDE Package</Excluded_Packages>
+      <Excluded_Packages Name="C:\PROGRA~2\RemObjects Software\RemObjects SDK for Delphi\Dcu\D11\RemObjects_IDE_D11.bpl">RemObjects SDK - IDE Integration for Win32</Excluded_Packages>
+      <Excluded_Packages Name="C:\Program Files (x86)\RemObjects Software\Data Abstract for Delphi\Dcu\D11\DataAbstract_NexusDBDriver_D11.bpl">Data Abstract - NexusDB Driver</Excluded_Packages>
+      <Excluded_Packages Name="$(BDS)\bin\bcboffice2k100.bpl">CodeGear C++Builder Office 2000 Servers Package</Excluded_Packages>
+      <Excluded_Packages Name="$(BDS)\bin\dcloffice2k100.bpl">Microsoft Office 2000 Sample Automation Server Wrapper Components</Excluded_Packages>
+      <Excluded_Packages Name="$(BDS)\bin\dclofficexp100.bpl">Microsoft Office XP Sample Automation Server Wrapper Components</Excluded_Packages>
+    </Excluded_Packages></Delphi.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
+  <ItemGroup>
+    <DelphiCompile Include="RemObjects_IDE_D11.dpk">
+      <MainSource>MainSource</MainSource>
+    </DelphiCompile>
+    <DCCReference Include="..\CodeGen2\uRODLAsyncConverter.pas" />
+    <DCCReference Include="..\CodeGen2\uRODLConvertersUtils.pas" />
+    <DCCReference Include="..\CodeGen2\uRODLCppConverters.pas" />
+    <DCCReference Include="..\CodeGen2\uRODLDelphiConverters.pas" />
+    <DCCReference Include="..\CodeGen2\uRODLImplConverter.pas" />
+    <DCCReference Include="..\CodeGen2\uRODLIntfConverter.pas" />
+    <DCCReference Include="..\CodeGen2\uRODLInvkConverter.pas" />
+    <DCCReference Include="..\CodeGen2\uRODLLineStream.pas" />
+    <DCCReference Include="..\CodeGen2\uRODLSplitableConverter.pas" />
+    <DCCReference Include="..\CodeGen2\uRODLTemplateBasedConverter.pas" />
+    <DCCReference Include="..\CodeGen2\uRODLTemplateBasedConverterUtils.pas" />
+    <DCCReference Include="..\CodeGen\uRODLGenTools.pas" />
+    <DCCReference Include="..\CodeGen\uRODLToPascal.pas" />
+    <DCCReference Include="..\CodeGen\uRODLToPascalAsync.pas" />
+    <DCCReference Include="..\CodeGen\uRODLToPascalImpl.pas" />
+    <DCCReference Include="..\CodeGen\uRODLToPascalIntf.pas" />
+    <DCCReference Include="..\CodeGen\uRODLToPascalInvk.pas" />
+    <DCCReference Include="..\RODEC\uRODECReg.pas" />
+    <DCCReference Include="..\RODEC\uROEncKeyPropEditor.pas">
+      <Form>CryptoKeyGenForm</Form>
+    </DCCReference>
+    <DCCReference Include="D:\Program files.all\Borland\RAD Studio\5.0\bin\designide.dcp" />
+    <DCCReference Include="D:\Program files.all\Borland\RAD Studio\5.0\bin\inet.dcp" />
+    <DCCReference Include="D:\Program files.all\Borland\RAD Studio\5.0\bin\RemObjects_Core_D11.dcp" />
+    <DCCReference Include="D:\Program files.all\Borland\RAD Studio\5.0\bin\RemObjects_Everwood_D11.dcp" />
+    <DCCReference Include="D:\Program files.all\Borland\RAD Studio\5.0\bin\rtl.dcp" />
+    <DCCReference Include="D:\Program files.all\Borland\RAD Studio\5.0\bin\vcl.dcp" />
+    <DCCReference Include="D:\Program files.all\Borland\RAD Studio\5.0\bin\vclx.dcp" />
+    <DCCReference Include="fCustomIDEMessagesForm.pas">
+      <Form>CustomIDEMessagesForm</Form>
+    </DCCReference>
+    <DCCReference Include="fDispatchersEditorForm.pas">
+      <Form>DispatchersEditorForm</Form>
+    </DCCReference>
+    <DCCReference Include="fNewProjectForm.pas">
+      <Form>NewProjectForm</Form>
+    </DCCReference>
+    <DCCReference Include="fROAbout.pas">
+      <Form>AboutForm</Form>
+    </DCCReference>
+    <DCCReference Include="fROServerClassForm.pas">
+      <Form>ROServerClassForm</Form>
+    </DCCReference>
+    <DCCReference Include="fServerProjectOptions.pas">
+      <Form>ServerProjectOptions</Form>
+    </DCCReference>
+    <DCCReference Include="RemObjects_IDE_Reg.pas" />
+    <DCCReference Include="uROExtraEditors.pas" />
+    <DCCReference Include="uROIDEData.pas">
+      <Form>IdeData</Form>
+      <DesignClass>TDataModule</DesignClass>
+    </DCCReference>
+    <DCCReference Include="uROIDEEditors.pas" />
+    <DCCReference Include="uROIDEMenu.pas" />
+    <DCCReference Include="uROIDEPrjWizard.pas" />
+    <DCCReference Include="uROIDETools.pas" />
+    <DCCReference Include="uROLoginNeededForm.pas">
+      <Form>ROLoginNeededForm</Form>
+    </DCCReference>
+    <DCCReference Include="uROProductVersionInfo.pas" />
+    <DCCReference Include="uROProductVersionInfoForm.pas">
+      <Form>ProductVersionInfoForm</Form>
+    </DCCReference>
+    <DCCReference Include="uROProductVersionInfo_Intf.pas" />
+    <DCCReference Include="uROResWriter.pas" />
+    <DCCReference Include="uRORODLNotifier.pas" />
+    <None Include="..\RemObjects.inc" />
+    <None Include="ModelSupport_RemObjects_IDE_D10\default.txaPackage" />
+  </ItemGroup>
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D11.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D11.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D11.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D12.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D12.dpk
new file mode 100644
index 0000000..f90c88d
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D12.dpk	
@@ -0,0 +1,76 @@
+package RemObjects_IDE_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - IDE Integration for Win32'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  designide,
+  vclx,
+  inet,
+  vcl,
+  rtl,
+  RemObjects_Core_D12,
+  RemObjects_Everwood_D12;
+
+contains
+  uROIDEPrjWizard in 'uROIDEPrjWizard.pas',
+  uROIDEMenu in 'uROIDEMenu.pas',
+  uRORODLNotifier in 'uRORODLNotifier.pas',
+  uROIDETools in 'uROIDETools.pas',
+  uRODLGenTools in '..\CodeGen\uRODLGenTools.pas',
+  uRODLToPascalImpl in '..\CodeGen\uRODLToPascalImpl.pas',
+  uRODLToPascalIntf in '..\CodeGen\uRODLToPascalIntf.pas',
+  uRODLToPascalInvk in '..\CodeGen\uRODLToPascalInvk.pas',
+  fServerProjectOptions in 'fServerProjectOptions.pas' {ServerProjectOptions},
+  fCustomIDEMessagesForm in 'fCustomIDEMessagesForm.pas' {CustomIDEMessagesForm},
+  RemObjects_IDE_Reg in 'RemObjects_IDE_Reg.pas',
+  uROResWriter in 'uROResWriter.pas',
+  fDispatchersEditorForm in 'fDispatchersEditorForm.pas' {DispatchersEditorForm},
+  uROIDEData in 'uROIDEData.pas' {IdeData: TDataModule},
+  uRODLToPascal in '..\CodeGen\uRODLToPascal.pas',
+  fROAbout in 'fROAbout.pas' {AboutForm},
+  uROIDEEditors in 'uROIDEEditors.pas',
+  uROProductVersionInfoForm in 'uROProductVersionInfoForm.pas' {ProductVersionInfoForm},
+  uROProductVersionInfo in 'uROProductVersionInfo.pas',
+  uROProductVersionInfo_Intf in 'uROProductVersionInfo_Intf.pas',
+  fROServerClassForm in 'fROServerClassForm.pas' {ROServerClassForm},
+  uROExtraEditors in 'uROExtraEditors.pas',
+  fNewProjectForm in 'fNewProjectForm.pas' {NewProjectForm},
+  uRODLToPascalAsync in '..\CodeGen\uRODLToPascalAsync.pas',
+  uROLoginNeededForm in 'uROLoginNeededForm.pas' {ROLoginNeededForm},
+  uRODLTemplateBasedConverterUtils in '..\CodeGen2\uRODLTemplateBasedConverterUtils.pas',
+  uRODLAsyncConverter in '..\CodeGen2\uRODLAsyncConverter.pas',
+  uRODLConvertersUtils in '..\CodeGen2\uRODLConvertersUtils.pas',
+  uRODLCppConverters in '..\CodeGen2\uRODLCppConverters.pas',
+  uRODLDelphiConverters in '..\CodeGen2\uRODLDelphiConverters.pas',
+  uRODLImplConverter in '..\CodeGen2\uRODLImplConverter.pas',
+  uRODLIntfConverter in '..\CodeGen2\uRODLIntfConverter.pas',
+  uRODLInvkConverter in '..\CodeGen2\uRODLInvkConverter.pas',
+  uRODLSplitableConverter in '..\CodeGen2\uRODLSplitableConverter.pas',
+  uRODLTemplateBasedConverter in '..\CodeGen2\uRODLTemplateBasedConverter.pas',
+  uRODLLineStream in '..\CodeGen2\uRODLLineStream.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D12.dproj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D12.dproj
new file mode 100644
index 0000000..5dee5c8
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D12.dproj	
@@ -0,0 +1,153 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{fe71e26f-b3f6-4155-b226-b778db554247}</ProjectGuid>
+			<MainSource>RemObjects_IDE_D12.dpk</MainSource>
+			<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+			<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+			<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D11\RemObjects_IDE_D11.bpl</DCC_DependencyCheckOutputName>
+			<ProjectVersion>11.1</ProjectVersion>
+			<Config Condition="'$(Config)'==''">Base</Config>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base)'!=''">
+			<DCC_SymbolReferenceInfo>1</DCC_SymbolReferenceInfo>
+			<DCC_IMPLICIT_STRING_CAST>error</DCC_IMPLICIT_STRING_CAST>
+			<DCC_IMPLICIT_STRING_CAST_LOSS>error</DCC_IMPLICIT_STRING_CAST_LOSS>
+			<DCC_EXPLICIT_STRING_CAST_LOSS>error</DCC_EXPLICIT_STRING_CAST_LOSS>
+			<DCC_EXPLICIT_STRING_CAST>error</DCC_EXPLICIT_STRING_CAST>
+			<DCC_CVT_ACHAR_TO_WCHAR>error</DCC_CVT_ACHAR_TO_WCHAR>
+			<DCC_CVT_WCHAR_TO_ACHAR>error</DCC_CVT_WCHAR_TO_ACHAR>
+			<DCC_CVT_WIDENING_STRING_LOST>error</DCC_CVT_WIDENING_STRING_LOST>
+			<DCC_CVT_NARROWING_STRING_LOST>error</DCC_CVT_NARROWING_STRING_LOST>
+			<GenDll>true</GenDll>
+			<DCC_DcpOutput>..\..\Dcu\D12</DCC_DcpOutput>
+			<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+			<DCC_DcuOutput>..\..\Dcu\D12</DCC_DcuOutput>
+			<GenPackage>true</GenPackage>
+			<DCC_GenerateStackFrames>true</DCC_GenerateStackFrames>
+			<DesignOnlyPackage>true</DesignOnlyPackage>
+			<DCC_ImageBase>00400000</DCC_ImageBase>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D12\RemObjects_IDE_D12.bpl</DCC_DependencyCheckOutputName>
+			<DCC_UnitSearchPath>..\..\Dcu\D12;..;..\..\..\Everwood\Bin;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+			<DCC_Description>RemObjects SDK - IDE Integration for Win32</DCC_Description>
+			<DCC_BplOutput>..\..\Dcu\D12</DCC_BplOutput>
+		</PropertyGroup>
+		<ItemGroup>
+			<DelphiCompile Include="RemObjects_IDE_D12.dpk">
+				<MainSource>MainSource</MainSource>
+			</DelphiCompile>
+			<DCCReference Include="designide.dcp"/>
+			<DCCReference Include="vclx.dcp"/>
+			<DCCReference Include="inet.dcp"/>
+			<DCCReference Include="vcl.dcp"/>
+			<DCCReference Include="rtl.dcp"/>
+			<DCCReference Include="RemObjects_Core_D12.dcp"/>
+			<DCCReference Include="RemObjects_Everwood_D12.dcp"/>
+			<DCCReference Include="uROIDEPrjWizard.pas"/>
+			<DCCReference Include="uROIDEMenu.pas"/>
+			<DCCReference Include="uRORODLNotifier.pas"/>
+			<DCCReference Include="uROIDETools.pas"/>
+			<DCCReference Include="..\CodeGen\uRODLGenTools.pas"/>
+			<DCCReference Include="..\CodeGen\uRODLToPascalImpl.pas"/>
+			<DCCReference Include="..\CodeGen\uRODLToPascalIntf.pas"/>
+			<DCCReference Include="..\CodeGen\uRODLToPascalInvk.pas"/>
+			<DCCReference Include="fServerProjectOptions.pas">
+				<Form>ServerProjectOptions</Form>
+			</DCCReference>
+			<DCCReference Include="fCustomIDEMessagesForm.pas">
+				<Form>CustomIDEMessagesForm</Form>
+			</DCCReference>
+			<DCCReference Include="RemObjects_IDE_Reg.pas"/>
+			<DCCReference Include="uROResWriter.pas"/>
+			<DCCReference Include="fDispatchersEditorForm.pas">
+				<Form>DispatchersEditorForm</Form>
+			</DCCReference>
+			<DCCReference Include="uROIDEData.pas">
+				<Form>IdeData</Form>
+				<DesignClass>TDataModule</DesignClass>
+			</DCCReference>
+			<DCCReference Include="..\CodeGen\uRODLToPascal.pas"/>
+			<DCCReference Include="fROAbout.pas">
+				<Form>AboutForm</Form>
+			</DCCReference>
+			<DCCReference Include="uROIDEEditors.pas"/>
+			<DCCReference Include="uROProductVersionInfoForm.pas">
+				<Form>ProductVersionInfoForm</Form>
+			</DCCReference>
+			<DCCReference Include="uROProductVersionInfo.pas"/>
+			<DCCReference Include="uROProductVersionInfo_Intf.pas"/>
+			<DCCReference Include="fROServerClassForm.pas">
+				<Form>ROServerClassForm</Form>
+			</DCCReference>
+			<DCCReference Include="uROExtraEditors.pas"/>
+			<DCCReference Include="fNewProjectForm.pas">
+				<Form>NewProjectForm</Form>
+			</DCCReference>
+			<DCCReference Include="..\CodeGen\uRODLToPascalAsync.pas"/>
+			<DCCReference Include="uROLoginNeededForm.pas">
+				<Form>ROLoginNeededForm</Form>
+			</DCCReference>
+			<DCCReference Include="..\CodeGen2\uRODLTemplateBasedConverterUtils.pas"/>
+			<DCCReference Include="..\CodeGen2\uRODLAsyncConverter.pas"/>
+			<DCCReference Include="..\CodeGen2\uRODLConvertersUtils.pas"/>
+			<DCCReference Include="..\CodeGen2\uRODLCppConverters.pas"/>
+			<DCCReference Include="..\CodeGen2\uRODLDelphiConverters.pas"/>
+			<DCCReference Include="..\CodeGen2\uRODLImplConverter.pas"/>
+			<DCCReference Include="..\CodeGen2\uRODLIntfConverter.pas"/>
+			<DCCReference Include="..\CodeGen2\uRODLInvkConverter.pas"/>
+			<DCCReference Include="..\CodeGen2\uRODLSplitableConverter.pas"/>
+			<DCCReference Include="..\CodeGen2\uRODLTemplateBasedConverter.pas"/>
+			<DCCReference Include="..\CodeGen2\uRODLLineStream.pas"/>
+			<BuildConfiguration Include="Base">
+				<Key>Base</Key>
+			</BuildConfiguration>
+		</ItemGroup>
+		<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+		<ProjectExtensions>
+			<Borland.Personality>Delphi.Personality.12</Borland.Personality>
+			<Borland.ProjectType>Package</Borland.ProjectType>
+			<BorlandProject>
+				<Delphi.Personality>
+					<Parameters>
+						<Parameters Name="UseLauncher">False</Parameters>
+						<Parameters Name="LoadAllSymbols">True</Parameters>
+						<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+					</Parameters>
+					<VersionInfo>
+						<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+						<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+						<VersionInfo Name="MajorVer">5</VersionInfo>
+						<VersionInfo Name="MinorVer">0</VersionInfo>
+						<VersionInfo Name="Release">35</VersionInfo>
+						<VersionInfo Name="Build">741</VersionInfo>
+						<VersionInfo Name="Debug">False</VersionInfo>
+						<VersionInfo Name="PreRelease">False</VersionInfo>
+						<VersionInfo Name="Special">False</VersionInfo>
+						<VersionInfo Name="Private">False</VersionInfo>
+						<VersionInfo Name="DLL">False</VersionInfo>
+						<VersionInfo Name="Locale">1033</VersionInfo>
+						<VersionInfo Name="CodePage">1252</VersionInfo>
+					</VersionInfo>
+					<VersionInfoKeys>
+						<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="FileDescription"/>
+						<VersionInfoKeys Name="FileVersion">5.0.35.741</VersionInfoKeys>
+						<VersionInfoKeys Name="InternalName"/>
+						<VersionInfoKeys Name="LegalCopyright"/>
+						<VersionInfoKeys Name="LegalTrademarks"/>
+						<VersionInfoKeys Name="OriginalFilename"/>
+						<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+						<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+					</VersionInfoKeys>
+					<Source>
+						<Source Name="MainSource">RemObjects_IDE_D12.dpk</Source>
+					</Source>
+					<Excluded_Packages/>
+				</Delphi.Personality>
+			</BorlandProject>
+			<ProjectFileVersion>12</ProjectFileVersion>
+		</ProjectExtensions>
+	</Project>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D12.identcache b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D12.identcache
new file mode 100644
index 0000000..064afe9
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D12.identcache differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D12.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D12.res
new file mode 100644
index 0000000..da6c4f2
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D12.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D5.dof b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D5.dof
new file mode 100644
index 0000000..8ba533b
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D5.dof	
@@ -0,0 +1,108 @@
+[Compiler]
+A=1
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects SDK - IDE Integration
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D5
+PackageDLLOutputDir=..\..\Dcu\D5
+PackageDCPOutputDir=..\..\Dcu\D5
+SearchPath=..\..\Dcu\D5;..\
+Packages=Vcl50;Vclx50;VclSmp50;Vcldb50;vclado50;Vclbde50;vcldbx50;VCLIB50;Vclmid50;vclie50;Inetdb50;Inet50;dclocx50;dclaxserver50;Indy50
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+[Parameters]
+RunParams=
+HostApplication=
+[Language]
+ActiveLang=
+ProjectLang=$00000409
+RootDir=
+[Version Info]
+IncludeVerInfo=1
+AutoIncBuild=0
+MajorVer=2
+MinorVer=0
+Release=0
+Build=106
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=2.0.0.106
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
+[Excluded Packages]
+L:\Others\Async Professional 4.0\A405_D50.BPL=Async Professional components
+[HistoryLists\hlConditionals]
+Count=1
+Item0=DESIGNTIME
+[HistoryLists\hlUnitAliases]
+Count=1
+Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+[HistoryLists\hlSearchPath]
+Count=3
+Item0=..\Dcu\D5
+Item1=..\Dcu\D6
+Item2=..\Dcu\D7
+[HistoryLists\hlUnitOutputDirectory]
+Count=3
+Item0=..\Dcu\D5
+Item1=..\Dcu\D6
+Item2=..\Dcu\D7
+[HistoryLists\hlBPLOutput]
+Count=2
+Item0=..\Dcu\D5
+Item1=..\Dcu\D6
+[HistoryLists\hlDCPOutput]
+Count=3
+Item0=..\Dcu\D5
+Item1=..\Dcu\D6
+Item2=..\Dcu\D7
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D5.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D5.dpk
new file mode 100644
index 0000000..9a3ed4d
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D5.dpk	
@@ -0,0 +1,67 @@
+package RemObjects_IDE_D5;
+
+{$R *.RES}
+{$ALIGN ON}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - IDE Integration'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  Vcl50,
+  Vclx50,
+  Inet50,
+  RemObjects_Core_D5,
+  dsnide50;
+
+{%File '..\RemObjects.inc'}
+
+contains
+  uROIDEPrjWizard in 'uROIDEPrjWizard.pas',
+  uROIDEMenu in 'uROIDEMenu.pas',
+  uRORODLNotifier in 'uRORODLNotifier.pas',
+  uROIDETools in 'uROIDETools.pas',
+  uRODLGenTools in '..\CodeGen\uRODLGenTools.pas',
+  uRODLToPascalImpl in '..\CodeGen\uRODLToPascalImpl.pas',
+  uRODLToPascalIntf in '..\CodeGen\uRODLToPascalIntf.pas',
+  uRODLToPascalInvk in '..\CodeGen\uRODLToPascalInvk.pas',
+  fServerProjectOptions in 'fServerProjectOptions.pas' {ServerProjectOptions},
+  fCustomIDEMessagesForm in 'fCustomIDEMessagesForm.pas' {CustomIDEMessagesForm},
+  RemObjects_IDE_Reg in 'RemObjects_IDE_Reg.pas',
+  uROResWriter in 'uROResWriter.pas',
+  fDispatchersEditorForm in 'fDispatchersEditorForm.pas' {DispatchersEditorForm},
+  uROIDEData in 'uROIDEData.pas' {IdeData: TDataModule},
+  uRODLToPascal in '..\CodeGen\uRODLToPascal.pas',
+  fROAbout in 'fROAbout.pas' {AboutForm},
+  uROIDEEditors in 'uROIDEEditors.pas',
+  uROProductVersionInfoForm in 'uROProductVersionInfoForm.pas' {ProductVersionInfoForm},
+  uROProductVersionInfo in 'uROProductVersionInfo.pas',
+  uROProductVersionInfo_Intf in 'uROProductVersionInfo_Intf.pas',
+  fROServerClassForm in 'fROServerClassForm.pas' {ROServerClassForm},
+  uRODECReg in '..\RODEC\uRODECReg.pas',
+  uROEncKeyPropEditor in '..\RODEC\uROEncKeyPropEditor.pas' {CryptoKeyGenForm},
+  uROExtraEditors in 'uROExtraEditors.pas',
+  fNewProjectForm in 'fNewProjectForm.pas' {NewProjectForm},
+  uRODLToPascalAsync in '..\CodeGen\uRODLToPascalAsync.pas',
+  uROLoginNeededForm in 'uROLoginNeededForm.pas' {ROLoginNeededForm};
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D5.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D5.res
new file mode 100644
index 0000000..a2de886
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D5.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D6.dof b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D6.dof
new file mode 100644
index 0000000..29ede00
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D6.dof	
@@ -0,0 +1,127 @@
+[FileVersion]
+Version=6.0
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects SDK - IDE Integration
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D6
+PackageDLLOutputDir=..\..\Dcu\D6
+PackageDCPOutputDir=..\..\Dcu\D6
+SearchPath=..\..\Dcu\D6
+Packages=Vcl50;Vclx50;VclSmp50;Vcldb50;vclado50;Vclbde50;vcldbx50;VCLIB50;Vclmid50;vclie50;Inetdb50;Inet50;dclocx50;dclaxserver50;Indy50
+Conditionals=HYDRA_DESIGNTIME
+DebugSourceDirs=
+UsePackages=0
+[Parameters]
+RunParams=
+HostApplication=
+Launcher=
+UseLauncher=0
+DebugCWD=
+[Language]
+ActiveLang=
+ProjectLang=
+RootDir=
+[Version Info]
+IncludeVerInfo=1
+AutoIncBuild=0
+MajorVer=1
+MinorVer=0
+Release=0
+Build=0
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+[Version Info Keys]
+CompanyName=
+FileDescription=
+FileVersion=1.0.0.0
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+Comments=
+[Excluded Packages]
+C:\WINDOWS\System32\CrTb2k_60.bpl=Toolbar 2000 and TBX for CodeRush 6
+L:\Packages\dcldxLayoutControlD6.bpl=ExpressLayout Control by Developer Express Inc.
+L:\Packages\dclcxSpreadSheetVCLD6.bpl=ExpressSpreadSheet (VCL Edition) by Developer Express Inc.
+l:\Packages\dclcxLibraryVCLD6.bpl=Express Cross Platform Library (VCL Edition) by Developer Express Inc.
+L:\Packages\dclcxGridUtilsVCLD6.bpl=ExpressQuantumGrid 4 Utils (VCL Edition) by Developer Express Inc.
+L:\Packages\dclcxEditorsVCLD6.bpl=ExpressEditors Library 4 (VCL Edition) by Developer Express Inc.
+L:\Packages\dclcxGridVCLD6.bpl=ExpressQuantumGrid 4 (VCL Edition) by Developer Express Inc.
+l:\Others\DevEx\ExpressPrinting System\Delphi 6\Lib\dxPSLnksD6.bpl=ExpressPrinting System ReportLinks (Standard) by Developer Express Inc.
+l:\Others\DevEx\ExpressPrinting System\Delphi 6\Lib\dxPSTLLnkD6.bpl=ExpressPrinting System ReportLink for ExpressQuantumTreeList by Developer Express Inc.
+l:\Others\DevEx\ExpressPrinting System\Delphi 6\Lib\dxPSdxDBTLLnkD6.bpl=ExpressPrinting System ReportLink for ExpressQuantumDBTreeList by Developer Express Inc.
+l:\Others\DevEx\ExpressPrinting System\Delphi 6\Lib\dxPSdxDBGrLnkD6.bpl=ExpressPrinting System ReportLink for ExpressQuantumGrid by Developer Express Inc.
+l:\Others\DevEx\ExpressPrinting System\Delphi 6\Lib\dxPSTeeChartD6.bpl=ExpressPrinting System ReportLink for TeeChart by Developer Express Inc.
+l:\Others\DevEx\ExpressPrinting System\Delphi 6\Lib\dxPSDBTeeChartD6.bpl=ExpressPrinting System ReportLink for DBTeeChart by Developer Express Inc.
+l:\Others\DevEx\ExpressPrinting System\Delphi 6\Lib\dxPSdxDBTVLnkD6.bpl=ExpressPrinting System ReportLink for ExpressDBTree by Developer Express Inc.
+l:\Others\DevEx\ExpressPrinting System\Delphi 6\Lib\dxPSdxInsLnkD6.bpl=ExpressPrinting System ReportLink for ExpressInspector by Developer Express Inc.
+l:\Others\DevEx\ExpressPrinting System\Delphi 6\Lib\dxPSdxOILnkD6.bpl=ExpressPrinting System ReportLink for ExpressRTTIInspector by Developer Express Inc.
+l:\Others\DevEx\ExpressPrinting System\Delphi 6\Lib\dxPSdxMVLnkD6.bpl=ExpressPrinting System ReportLink for ExpressMasterView by Developer Express Inc.
+l:\Others\DevEx\ExpressPrinting System\Delphi 6\Lib\dxPSdxOCLnkD6.bpl=ExpressPrinting System ReportLinks for ExpressOrgChart by Developer Express Inc.
+l:\Others\DevEx\ExpressPrinting System\Delphi 6\Lib\dxPSdxDBOCLnkD6.bpl=ExpressPrinting System ReportLinks for ExpressDBOrgChart by Developer Express Inc.
+l:\Others\DevEx\ExpressPrinting System\Delphi 6\Lib\dxPSdxFCLnkD6.bpl=ExpressPrinting System ReportLinks for ExpressFlowChart by Developer Express Inc.
+l:\Others\DevEx\ExpressPrinting System\Delphi 6\Lib\dxPScxSSLnkD6.bpl=ExpressPrinting System ReportLink for ExpressSpreadSheet by Developer Express Inc.
+C:\Raize\BizComps\Bin\RzBizDcl60.bpl=Raize Business Component Architecture v4.0
+L:\Packages\CR_SuperPalette6.bpl=Super Palette
+l:\Others\DevEx\ExpressPrinting System\Delphi 6\Lib\dxPSPrVwAdvD6.bpl=ExpressPrinting System Advanced Preview Window by Developer Express Inc.
+[HistoryLists\hlConditionals]
+Count=1
+Item0=xDEBUG_EVERWOOD_SHOW_NEW_MODULE_CODE
+[HistoryLists\hlUnitAliases]
+Count=1
+Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+[HistoryLists\hlUnitOutputDirectory]
+Count=1
+Item0=..\..\Dcu\D6
+[HistoryLists\hlBPLOutput]
+Count=1
+Item0=..\..\Dcu\D6
+[HistoryLists\hlDCPOutput]
+Count=1
+Item0=..\..\Dcu\D6
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D6.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D6.dpk
new file mode 100644
index 0000000..141dfec
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D6.dpk	
@@ -0,0 +1,79 @@
+package RemObjects_IDE_D6;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - IDE Integration'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+{$DEFINE HYDRA_DESIGNTIME}
+
+requires
+  vcl,
+  designide,
+  RemObjects_Core_D6,
+  RemObjects_Everwood_D6,
+  vclx;
+
+{%File '..\RemObjects.inc'}
+
+contains
+  uROIDEPrjWizard in 'uROIDEPrjWizard.pas',
+  uROIDEMenu in 'uROIDEMenu.pas',
+  uRORODLNotifier in 'uRORODLNotifier.pas',
+  uROIDETools in 'uROIDETools.pas',
+  uRODLGenTools in '..\CodeGen\uRODLGenTools.pas',
+  uRODLToPascalImpl in '..\CodeGen\uRODLToPascalImpl.pas',
+  uRODLToPascalIntf in '..\CodeGen\uRODLToPascalIntf.pas',
+  uRODLToPascalInvk in '..\CodeGen\uRODLToPascalInvk.pas',
+  fServerProjectOptions in 'fServerProjectOptions.pas' {ServerProjectOptions},
+  fCustomIDEMessagesForm in 'fCustomIDEMessagesForm.pas' {CustomIDEMessagesForm},
+  RemObjects_IDE_Reg in 'RemObjects_IDE_Reg.pas',
+  uROResWriter in 'uROResWriter.pas',
+  fDispatchersEditorForm in 'fDispatchersEditorForm.pas' {DispatchersEditorForm},
+  uROIDEData in 'uROIDEData.pas' {IdeData: TDataModule},
+  uRODLToPascal in '..\CodeGen\uRODLToPascal.pas',
+  fROAbout in 'fROAbout.pas' {AboutForm},
+  uROIDEEditors in 'uROIDEEditors.pas',
+  uROProductVersionInfoForm in 'uROProductVersionInfoForm.pas' {ProductVersionInfoForm},
+  uROProductVersionInfo in 'uROProductVersionInfo.pas',
+  uROProductVersionInfo_Intf in 'uROProductVersionInfo_Intf.pas',
+  fROServerClassForm in 'fROServerClassForm.pas' {ROServerClassForm},
+  uRODECReg in '..\RODEC\uRODECReg.pas',
+  uROEncKeyPropEditor in '..\RODEC\uROEncKeyPropEditor.pas' {CryptoKeyGenForm},
+  uROExtraEditors in 'uROExtraEditors.pas',
+  fNewProjectForm in 'fNewProjectForm.pas' {NewProjectForm},
+  uRODLToPascalAsync in '..\CodeGen\uRODLToPascalAsync.pas',
+  uROLoginNeededForm in 'uROLoginNeededForm.pas' {ROLoginNeededForm},
+  uRODLTemplateBasedConverterUtils in '..\CodeGen2\uRODLTemplateBasedConverterUtils.pas',
+  uRODLAsyncConverter in '..\CodeGen2\uRODLAsyncConverter.pas',
+  uRODLConvertersUtils in '..\CodeGen2\uRODLConvertersUtils.pas',
+  uRODLCppConverters in '..\CodeGen2\uRODLCppConverters.pas',
+  uRODLDelphiConverters in '..\CodeGen2\uRODLDelphiConverters.pas',
+  uRODLImplConverter in '..\CodeGen2\uRODLImplConverter.pas',
+  uRODLIntfConverter in '..\CodeGen2\uRODLIntfConverter.pas',
+  uRODLInvkConverter in '..\CodeGen2\uRODLInvkConverter.pas',
+  uRODLSplitableConverter in '..\CodeGen2\uRODLSplitableConverter.pas',
+  uRODLTemplateBasedConverter in '..\CodeGen2\uRODLTemplateBasedConverter.pas',
+  uRODLLineStream in '..\CodeGen2\uRODLLineStream.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D6.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D6.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D6.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D7.dof b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D7.dof
new file mode 100644
index 0000000..53b6208
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D7.dof	
@@ -0,0 +1,160 @@
+[FileVersion]
+Version=7.0
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects SDK - IDE Integration
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D7
+PackageDLLOutputDir=..\..\Dcu\D7
+PackageDCPOutputDir=..\..\Dcu\D7
+SearchPath=..\..\Dcu\D7;..\
+Packages=Vcl50;Vclx50;VclSmp50;Vcldb50;vclado50;Vclbde50;vcldbx50;VCLIB50;Vclmid50;vclie50;Inetdb50;Inet50;dclocx50;dclaxserver50;Indy50
+Conditionals=HYDRA_DESIGNTIME
+DebugSourceDirs=
+UsePackages=0
+[Parameters]
+RunParams=
+HostApplication=
+Launcher=
+UseLauncher=0
+DebugCWD=
+[Language]
+ActiveLang=
+ProjectLang=
+RootDir=
+[Version Info]
+IncludeVerInfo=1
+AutoIncBuild=0
+MajorVer=3
+MinorVer=0
+Release=2
+Build=284
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=3.0.2.284
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
+[Excluded Packages]
+l:\Packages\SchemaModelerUtils_d7.bpl=RemObjects Data Abstract - Schema Modeler Components (PRIVATE)
+R:\NexusDB Pack\Dcu\D7\RemObjects_NexusDB_IDE_D7.bpl=RemObjects SDK - NexusDB IDE Integration
+R:\Data Abstract\Dcu\D7\DataAbstract_IDE_D7.bpl=RemObjects Data Abstract - IDE Package
+R:\Data Abstract\Dcu\D7\DataAbstract_DBXDriver_D7.bpl=RemObjects Data Abstract - dbExpress Driver
+R:\Data Abstract\Dcu\D7\DataAbstract_IBXDriver_D7.bpl=RemObjects Data Abstract - InterBase Express Driver
+R:\Data Abstract\Dcu\D7\DataAbstract_ADODriver_D7.bpl=RemObjects Data Abstract - ADOExpress/dbGo Driver
+[HistoryLists\hlConditionals]
+Count=1
+Item0=DESIGNTIME
+[HistoryLists\hlUnitAliases]
+Count=1
+Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+[HistoryLists\hlSearchPath]
+Count=1
+Item0=..\Dcu\D7
+[HistoryLists\hlUnitOutputDirectory]
+Count=1
+Item0=..\Dcu\D7
+[HistoryLists\hlBPLOutput]
+Count=1
+Item0=..\Dcu\D7
+[HistoryLists\hlDCPOutput]
+Count=1
+Item0=..\Dcu\D7
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D7.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D7.dpk
new file mode 100644
index 0000000..d880190
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D7.dpk	
@@ -0,0 +1,82 @@
+package RemObjects_IDE_D7;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - IDE Integration'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+{$DEFINE HYDRA_DESIGNTIME}
+
+requires
+  designide,
+  vclx,
+  inet,
+  vcl,
+  rtl,
+  RemObjects_Core_D7,
+  RemObjects_Everwood_D7,
+  dbrtl;
+
+{%File '..\RemObjects.inc'}
+
+contains
+  uROIDEPrjWizard in 'uROIDEPrjWizard.pas',
+  uROIDEMenu in 'uROIDEMenu.pas',
+  uRORODLNotifier in 'uRORODLNotifier.pas',
+  uROIDETools in 'uROIDETools.pas',
+  uRODLGenTools in '..\CodeGen\uRODLGenTools.pas',
+  uRODLToPascalImpl in '..\CodeGen\uRODLToPascalImpl.pas',
+  uRODLToPascalIntf in '..\CodeGen\uRODLToPascalIntf.pas',
+  uRODLToPascalInvk in '..\CodeGen\uRODLToPascalInvk.pas',
+  fServerProjectOptions in 'fServerProjectOptions.pas' {ServerProjectOptions},
+  fCustomIDEMessagesForm in 'fCustomIDEMessagesForm.pas' {CustomIDEMessagesForm},
+  RemObjects_IDE_Reg in 'RemObjects_IDE_Reg.pas',
+  uROResWriter in 'uROResWriter.pas',
+  fDispatchersEditorForm in 'fDispatchersEditorForm.pas' {DispatchersEditorForm},
+  uROIDEData in 'uROIDEData.pas' {IdeData: TDataModule},
+  uRODLToPascal in '..\CodeGen\uRODLToPascal.pas',
+  fROAbout in 'fROAbout.pas' {AboutForm},
+  uROIDEEditors in 'uROIDEEditors.pas',
+  uROProductVersionInfoForm in 'uROProductVersionInfoForm.pas' {ProductVersionInfoForm},
+  uROProductVersionInfo in 'uROProductVersionInfo.pas',
+  uROProductVersionInfo_Intf in 'uROProductVersionInfo_Intf.pas',
+  fROServerClassForm in 'fROServerClassForm.pas' {ROServerClassForm},
+  uRODECReg in '..\RODEC\uRODECReg.pas',
+  uROEncKeyPropEditor in '..\RODEC\uROEncKeyPropEditor.pas' {CryptoKeyGenForm},
+  uROExtraEditors in 'uROExtraEditors.pas',
+  fNewProjectForm in 'fNewProjectForm.pas' {NewProjectForm},
+  uRODLToPascalAsync in '..\CodeGen\uRODLToPascalAsync.pas',
+  uROLoginNeededForm in 'uROLoginNeededForm.pas' {ROLoginNeededForm},
+  uRODLTemplateBasedConverterUtils in '..\CodeGen2\uRODLTemplateBasedConverterUtils.pas',
+  uRODLAsyncConverter in '..\CodeGen2\uRODLAsyncConverter.pas',
+  uRODLConvertersUtils in '..\CodeGen2\uRODLConvertersUtils.pas',
+  uRODLCppConverters in '..\CodeGen2\uRODLCppConverters.pas',
+  uRODLDelphiConverters in '..\CodeGen2\uRODLDelphiConverters.pas',
+  uRODLImplConverter in '..\CodeGen2\uRODLImplConverter.pas',
+  uRODLIntfConverter in '..\CodeGen2\uRODLIntfConverter.pas',
+  uRODLInvkConverter in '..\CodeGen2\uRODLInvkConverter.pas',
+  uRODLSplitableConverter in '..\CodeGen2\uRODLSplitableConverter.pas',
+  uRODLTemplateBasedConverter in '..\CodeGen2\uRODLTemplateBasedConverter.pas',
+  uRODLLineStream in '..\CodeGen2\uRODLLineStream.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D7.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D7.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_D7.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_Lazarus_Mac.lpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_Lazarus_Mac.lpk
new file mode 100644
index 0000000..c5943e5
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_Lazarus_Mac.lpk	
@@ -0,0 +1,104 @@
+<?xml version="1.0"?>
+<CONFIG>
+  <Package Version="3">
+    <Name Value="RemObjects_IDE_Lazarus_Mac"/>
+    <CompilerOptions>
+      <Version Value="8"/>
+      <SearchPaths>
+        <OtherUnitFiles Value="$(LazarusDir)/lcl/units/$(TargetCPU)-$(TargetOS)/;../CodeGen2/"/>
+        <UnitOutputDirectory Value="../units/$(TargetCPU)-$(TargetOS)"/>
+      </SearchPaths>
+      <Other>
+        <CompilerPath Value="$(CompPath)"/>
+      </Other>
+    </CompilerOptions>
+    <Description Value="RemObjects SDK - IDE Integration"/>
+    <Files Count="15">
+      <Item1>
+        <Filename Value="fCustomIDEMessagesForm.pas"/>
+        <UnitName Value="fCustomIDEMessagesForm"/>
+      </Item1>
+      <Item2>
+        <Filename Value="fDispatchersEditorForm.pas"/>
+        <UnitName Value="fDispatchersEditorForm"/>
+      </Item2>
+      <Item3>
+        <Filename Value="fROAbout.pas"/>
+        <UnitName Value="fROAbout"/>
+      </Item3>
+      <Item4>
+        <Filename Value="fROServerClassForm.pas"/>
+        <UnitName Value="fROServerClassForm"/>
+      </Item4>
+      <Item5>
+        <Filename Value="RemObjects_IDE_Reg.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="RemObjects_IDE_Reg"/>
+      </Item5>
+      <Item6>
+        <Filename Value="uROExtraEditors.pas"/>
+        <UnitName Value="uROExtraEditors"/>
+      </Item6>
+      <Item7>
+        <Filename Value="uROIDEData.pas"/>
+        <UnitName Value="uROIDEData"/>
+      </Item7>
+      <Item8>
+        <Filename Value="uROIDEEditors.pas"/>
+        <UnitName Value="uROIDEEditors"/>
+      </Item8>
+      <Item9>
+        <Filename Value="uROIDEMenu_laz.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="uROIDEMenu_laz"/>
+      </Item9>
+      <Item10>
+        <Filename Value="uROIDETools_laz.pas"/>
+        <UnitName Value="uROIDETools_laz"/>
+      </Item10>
+      <Item11>
+        <Filename Value="uROResWriter.pas"/>
+        <UnitName Value="uROResWriter"/>
+      </Item11>
+      <Item12>
+        <Filename Value="uROLoginNeededForm.lfm"/>
+        <Type Value="LFM"/>
+      </Item12>
+      <Item13>
+        <Filename Value="uROLoginNeededForm.lrs"/>
+        <Type Value="LRS"/>
+      </Item13>
+      <Item14>
+        <Filename Value="uROLoginNeededForm.pas"/>
+        <UnitName Value="uROLoginNeededForm"/>
+      </Item14>
+      <Item15>
+        <Filename Value="uRORODLNotifier.pas"/>
+        <UnitName Value="uRORODLNotifier"/>
+      </Item15>
+    </Files>
+    <Type Value="DesignTime"/>
+    <RequiredPkgs Count="5">
+      <Item1>
+        <PackageName Value="RemObjects_Everwood_Lazarus_Mac"/>
+      </Item1>
+      <Item2>
+        <PackageName Value="RemObjects_Core_Lazarus_Mac"/>
+      </Item2>
+      <Item3>
+        <PackageName Value="LCL"/>
+      </Item3>
+      <Item4>
+        <PackageName Value="FCL"/>
+        <MinVersion Major="1" Valid="True"/>
+      </Item4>
+      <Item5>
+        <PackageName Value="IDEIntf"/>
+      </Item5>
+    </RequiredPkgs>
+    <PublishOptions>
+      <Version Value="2"/>
+      <IgnoreBinaries Value="False"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_Lazarus_Unix.lpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_Lazarus_Unix.lpk
new file mode 100644
index 0000000..e22dccc
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_Lazarus_Unix.lpk	
@@ -0,0 +1,104 @@
+<?xml version="1.0"?>
+<CONFIG>
+  <Package Version="3">
+    <Name Value="RemObjects_IDE_Lazarus_Unix"/>
+    <CompilerOptions>
+      <Version Value="8"/>
+      <SearchPaths>
+        <OtherUnitFiles Value="$(LazarusDir)/lcl/units/$(TargetCPU)-$(TargetOS)/;../CodeGen2/"/>
+        <UnitOutputDirectory Value="../units/$(TargetCPU)-$(TargetOS)"/>
+      </SearchPaths>
+      <Other>
+        <CompilerPath Value="$(CompPath)"/>
+      </Other>
+    </CompilerOptions>
+    <Description Value="RemObjects SDK - IDE Integration"/>
+    <Files Count="15">
+      <Item1>
+        <Filename Value="fCustomIDEMessagesForm.pas"/>
+        <UnitName Value="fCustomIDEMessagesForm"/>
+      </Item1>
+      <Item2>
+        <Filename Value="fDispatchersEditorForm.pas"/>
+        <UnitName Value="fDispatchersEditorForm"/>
+      </Item2>
+      <Item3>
+        <Filename Value="fROAbout.pas"/>
+        <UnitName Value="fROAbout"/>
+      </Item3>
+      <Item4>
+        <Filename Value="fROServerClassForm.pas"/>
+        <UnitName Value="fROServerClassForm"/>
+      </Item4>
+      <Item5>
+        <Filename Value="RemObjects_IDE_Reg.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="RemObjects_IDE_Reg"/>
+      </Item5>
+      <Item6>
+        <Filename Value="uROExtraEditors.pas"/>
+        <UnitName Value="uROExtraEditors"/>
+      </Item6>
+      <Item7>
+        <Filename Value="uROIDEData.pas"/>
+        <UnitName Value="uROIDEData"/>
+      </Item7>
+      <Item8>
+        <Filename Value="uROIDEEditors.pas"/>
+        <UnitName Value="uROIDEEditors"/>
+      </Item8>
+      <Item9>
+        <Filename Value="uROIDEMenu_laz.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="uROIDEMenu_laz"/>
+      </Item9>
+      <Item10>
+        <Filename Value="uROIDETools_laz.pas"/>
+        <UnitName Value="uROIDETools_laz"/>
+      </Item10>
+      <Item11>
+        <Filename Value="uROResWriter.pas"/>
+        <UnitName Value="uROResWriter"/>
+      </Item11>
+      <Item12>
+        <Filename Value="uROLoginNeededForm.lfm"/>
+        <Type Value="LFM"/>
+      </Item12>
+      <Item13>
+        <Filename Value="uROLoginNeededForm.lrs"/>
+        <Type Value="LRS"/>
+      </Item13>
+      <Item14>
+        <Filename Value="uROLoginNeededForm.pas"/>
+        <UnitName Value="uROLoginNeededForm"/>
+      </Item14>
+      <Item15>
+        <Filename Value="uRORODLNotifier.pas"/>
+        <UnitName Value="uRORODLNotifier"/>
+      </Item15>
+    </Files>
+    <Type Value="DesignTime"/>
+    <RequiredPkgs Count="5">
+      <Item1>
+        <PackageName Value="RemObjects_Everwood_Lazarus_Unix"/>
+      </Item1>
+      <Item2>
+        <PackageName Value="RemObjects_Core_Lazarus_Unix"/>
+      </Item2>
+      <Item3>
+        <PackageName Value="LCL"/>
+      </Item3>
+      <Item4>
+        <PackageName Value="FCL"/>
+        <MinVersion Major="1" Valid="True"/>
+      </Item4>
+      <Item5>
+        <PackageName Value="IDEIntf"/>
+      </Item5>
+    </RequiredPkgs>
+    <PublishOptions>
+      <Version Value="2"/>
+      <IgnoreBinaries Value="False"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_Lazarus_Windows.lpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_Lazarus_Windows.lpk
new file mode 100644
index 0000000..7173b6a
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_Lazarus_Windows.lpk	
@@ -0,0 +1,106 @@
+<?xml version="1.0"?>
+<CONFIG>
+  <Package Version="3">
+    <PathDelim Value="\"/>
+    <Name Value="RemObjects_IDE_Lazarus_Windows"/>
+    <CompilerOptions>
+      <Version Value="8"/>
+      <PathDelim Value="\"/>
+      <SearchPaths>
+        <OtherUnitFiles Value="..\CodeGen2\"/>
+        <UnitOutputDirectory Value="..\..\Dcu\Lazarus\$(TargetCPU)-$(TargetOS)"/>
+      </SearchPaths>
+      <Other>
+        <CompilerPath Value="$(CompPath)"/>
+      </Other>
+    </CompilerOptions>
+    <Description Value="RemObjects SDK - IDE Integration"/>
+    <Files Count="15">
+      <Item1>
+        <Filename Value="fCustomIDEMessagesForm.pas"/>
+        <UnitName Value="fCustomIDEMessagesForm"/>
+      </Item1>
+      <Item2>
+        <Filename Value="fDispatchersEditorForm.pas"/>
+        <UnitName Value="fDispatchersEditorForm"/>
+      </Item2>
+      <Item3>
+        <Filename Value="fROAbout.pas"/>
+        <UnitName Value="fROAbout"/>
+      </Item3>
+      <Item4>
+        <Filename Value="fROServerClassForm.pas"/>
+        <UnitName Value="fROServerClassForm"/>
+      </Item4>
+      <Item5>
+        <Filename Value="RemObjects_IDE_Reg.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="RemObjects_IDE_Reg"/>
+      </Item5>
+      <Item6>
+        <Filename Value="uROExtraEditors.pas"/>
+        <UnitName Value="uROExtraEditors"/>
+      </Item6>
+      <Item7>
+        <Filename Value="uROIDEData.pas"/>
+        <UnitName Value="uROIDEData"/>
+      </Item7>
+      <Item8>
+        <Filename Value="uROIDEEditors.pas"/>
+        <UnitName Value="uROIDEEditors"/>
+      </Item8>
+      <Item9>
+        <Filename Value="uROIDEMenu_laz.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="uROIDEMenu_laz"/>
+      </Item9>
+      <Item10>
+        <Filename Value="uROIDETools_laz.pas"/>
+        <UnitName Value="uROIDETools_laz"/>
+      </Item10>
+      <Item11>
+        <Filename Value="uROResWriter.pas"/>
+        <UnitName Value="uROResWriter"/>
+      </Item11>
+      <Item12>
+        <Filename Value="uROLoginNeededForm.lfm"/>
+        <Type Value="LFM"/>
+      </Item12>
+      <Item13>
+        <Filename Value="uROLoginNeededForm.lrs"/>
+        <Type Value="LRS"/>
+      </Item13>
+      <Item14>
+        <Filename Value="uROLoginNeededForm.pas"/>
+        <UnitName Value="uROLoginNeededForm"/>
+      </Item14>
+      <Item15>
+        <Filename Value="uRORODLNotifier.pas"/>
+        <UnitName Value="uRORODLNotifier"/>
+      </Item15>
+    </Files>
+    <Type Value="DesignTime"/>
+    <RequiredPkgs Count="5">
+      <Item1>
+        <PackageName Value="LCL"/>
+      </Item1>
+      <Item2>
+        <PackageName Value="RemObjects_Core_Lazarus_Windows"/>
+      </Item2>
+      <Item3>
+        <PackageName Value="FCL"/>
+        <MinVersion Major="1" Valid="True"/>
+      </Item3>
+      <Item4>
+        <PackageName Value="RemObjects_Everwood_Lazarus_Windows"/>
+      </Item4>
+      <Item5>
+        <PackageName Value="IDEIntf"/>
+      </Item5>
+    </RequiredPkgs>
+    <PublishOptions>
+      <Version Value="2"/>
+      <IgnoreBinaries Value="False"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_Reg.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_Reg.pas
new file mode 100644
index 0000000..ddbeaca
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/RemObjects_IDE_Reg.pas	
@@ -0,0 +1,167 @@
+unit RemObjects_IDE_Reg;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Delphi IDE Integration                            }
+{                                                                            }
+{ compiler: Delphi 5 and up                                                  }
+{ platform: Win32                                                            }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+
+procedure Register;
+
+implementation
+
+uses
+  {Designtime:}fROAbout, uROIDEEditors,  {$IFNDEF FPC}uROProductVersionInfo,{$ENDIF}
+  uROServer, uRORemoteDataModule, uRODynamicRequest, uROEventRepository, uRODLGenTools,
+  uRORemoteService,
+  {$IFDEF FPC}
+    PropEdits,FormEditingIntf
+  {$ELSE}
+    {vcl:}Classes,
+    {components:}
+    uROSOAPMessage,
+    uROExtraEditors,
+
+    {$IFDEF MSWINDOWS}
+    uROWinMessageChannel,
+    uROWinMessageServer,
+    uROWinInetHttpChannel,
+    uRODLLChannel,
+    uRONamedPipeChannel, uRONamedPipeServer,
+    {$ENDIF MSWINDOWS}
+    uROBinMessage,
+    uROPostMessage,
+    {$IFDEF VER140UP}
+    uROSessions,
+    {$ENDIF}
+    uROPoweredByRemObjectsButton,
+    uRODBSessionManager,
+    uROMasterServerSessionManager,
+    uROMasterServerEventRepository,
+
+    uROClient,
+    {$IFDEF DELPHI5}DsgnIntf, DMDesigner, DesignIntf{$ELSE}DesignIntf, DesignEditors{$ENDIF}
+  {$ENDIF}
+    ;
+
+{ Register }
+
+procedure Register;
+begin
+  RegisterPropertyEditor(TypeInfo(TROMessageDispatchers), TROServer, prop_Dispatchers, TDispatchersProperty);
+  RegisterPropertyEditor(TypeInfo(string), TRORemoteService, prop_ServiceName, TROServiceNameProperty);
+  RegisterPropertyEditor(TypeInfo(string), TROEventReceiver, prop_ServiceName, TROServiceNameProperty);  
+  {$IFDEF VER140UP}
+  RegisterComponentEditor(TRORemoteService, TRORemoteServiceEditor);
+  RegisterComponentEditor(TROServer, TROServerEditor);
+  RegisterPropertyEditor(TypeInfo(string), TRODynamicRequest, prop_ServiceName, TRODynRequestServiceNameProperty);
+  RegisterPropertyEditor(TypeInfo(string), TRODynamicRequest, prop_OperationName, TRODynRequestOperationNameProperty);
+  RegisterComponentEditor(TRODynamicRequest, TRODynamicRequestEditor);
+  {$ENDIF VER140UP}
+
+
+  RegisterRODataModuleClass(TRORemoteDataModule,
+    'RemObjects SDK &Remote Datamodule',
+    'Standard RemObjects SDK datamodule. '+
+    'This is the preferred server type when you need to use Delphi components (i.e. datasets, database connections) at design time.',
+    'uRORemoteDataModule'
+  );
+
+  {$IFDEF FPC}
+  FormEditingHook.RegisterDesignerBaseClass(TRORemoteDataModule);
+  {$ELSE}
+  {$IFDEF DELPHI6UP}
+  RegisterCustomModule(TRORemoteDataModule,TCustomModule);
+  {$ELSE}
+  RegisterCustomModule(TRORemoteDataModule,TDataModuleDesignerCustomModule);
+  {$ENDIF}
+
+  { TROBinMessage }
+  RegisterPropertiesInCategory('Message', TROBinMessage, ['UseCompression', 'CompressionBufferSize', 'MinSizeForCompression']);
+  RegisterPropertiesInCategory('Message', TROPostMessage, ['BinaryType']);
+  RegisterPropertiesInCategory('Message', TROSoapMessage, ['SerializationOptions', 'CustomLocation']);
+
+  { TROTransportChannel }
+  RegisterPropertiesInCategory('Load Balancing', TROTransportChannel, ['ProbeFrequency', 'ProbeServers', 'ServerLocators', 'SynchronizedProbing', 'DispatchOptions']);
+  RegisterPropertiesInCategory('Connection', TROTransportChannel, ['Encryption', 'Busy']);
+
+  { TROWinInetHTTPChannel }
+  RegisterPropertiesInCategory('Client', TROWinInetHTTPChannel, ['UserAgent', 'TargetURL', 'Login']);
+  RegisterPropertiesInCategory('Connection', TROWinInetHTTPChannel, ['StoreConnected', 'Connected', 'KeepConnection']);
+
+  { TROWinMessageChannel }
+  RegisterPropertiesInCategory('Client', TROWinMessageChannel, ['ServerID']);
+  RegisterPropertiesInCategory('AutoStart', TROWinMessageChannel, ['DefaultDirectory', 'Filename', 'Parameters', 'StartServer', 'Delay']);
+
+  { TRODLLChannel }
+  RegisterPropertiesInCategory('Client', TRODLLChannel, ['DLLName', 'KeepDLLLoaded']);
+
+  { TRONamedPipeChannel }
+  RegisterPropertiesInCategory('Client', TRONamedPipeChannel, ['ActivateOnDemand', 'Active', 'ServerID', 'ServerName']);
+
+
+  { TROServer }
+  RegisterPropertiesInCategory('Server', TROServer, ['Dispatchers']);
+  RegisterPropertiesInCategory('Connection', TROServer, ['Encryption', 'Active', 'StoreActive']);
+
+  { TROWinMessageServer }
+  RegisterPropertiesInCategory('Server', TROWinMessageServer, ['ServerID']);
+
+  { TRONamedPipeServer }
+  RegisterPropertiesInCategory('Server', TRONamedPipeServer, ['ServerID']);
+
+
+  { TROCustomSessionManager }
+  RegisterPropertiesInCategory('Sessions', TROCustomSessionManager, ['MaxSessions', 'SessionDuration']);
+
+  { TRODBSessionManager }
+  RegisterPropertiesInCategory('Sessions', TRODBSessionManager, ['ClearSessionsOnCreate', 'ClearSessionsOnDestroy',
+                                                                 'FieldNameCreated', 'FieldNameData', 'FieldNameLastAccessed', 'FieldNameSessionID']);
+
+  { TRODynamicRequest }
+  RegisterPropertiesInCategory('Request', TRODynamicRequest, ['OperationName', 'ServiceName', 'Params']);
+
+  { TROEventReceiver }
+  RegisterPropertiesInCategory('EventReceiver', TROEventReceiver, ['Active', 'Interval', 'ServiceName', 'SynchronizedProbing']);
+
+  { TROPoweredByButton }
+  RegisterPropertiesInCategory('Powered By Button', TROPoweredByRemObjectsButton, ['ApplicationType']);
+
+
+
+  { TROEmailChannel }
+  //RegisterPropertiesInCategory('Client', TROEmailChannel, ['ClientEmail', 'DeleteOldResponses', 'ServerEmail', 'Pp3ServerAddress', 'SmtpServerAddress']);
+
+  { TROIndyHTTPChannel }
+  //RegisterPropertiesInCategory('Client', TROIndyHTTPChannel, ['KeepAlive', 'TargetURL']);
+
+  { TROIndyTCPChannel }
+  //RegisterPropertiesInCategory('Client', TROIndyTCPChannel, ['DisableNagle', 'Host', 'Port', 'KeepAlive']);
+
+  { TROIndyUDPChannel }
+  //RegisterPropertiesInCategory('Client', TROIndyUDPChannel, ['AsyncTimeout', 'Host', 'Port', 'Retrys']);    //todo
+  {$ENDIF}
+end;
+{$IFNDEF FPC}
+{$IFDEF MSWINDOWS}
+initialization
+  RegisterProduct('{154FA67E-DC1B-4784-BF27-EC81D5AEBCF2}',VersionBuildNo(hInstance));
+finalization
+  UnregisterProduct('{154FA67E-DC1B-4784-BF27-EC81D5AEBCF2}');
+{$ENDIF MSWINDOWS}
+{$ENDIF}
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/Resources.BDS.RES b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/Resources.BDS.RES
new file mode 100644
index 0000000..5b50694
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/Resources.BDS.RES differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/__history/RemObjects_IDE_D12.dpk.~1~ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/__history/RemObjects_IDE_D12.dpk.~1~
new file mode 100644
index 0000000..6c33e75
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/__history/RemObjects_IDE_D12.dpk.~1~	
@@ -0,0 +1,77 @@
+package RemObjects_IDE_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - IDE Integration for Win32'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+{$DEFINE HYDRA_DESIGNTIME}
+
+requires
+  designide,
+  vclx,
+  inet,
+  vcl,
+  rtl,
+  RemObjects_Core_D12,
+  RemObjects_Everwood_D12;
+
+contains
+  uROIDEPrjWizard in 'uROIDEPrjWizard.pas',
+  uROIDEMenu in 'uROIDEMenu.pas',
+  uRORODLNotifier in 'uRORODLNotifier.pas',
+  uROIDETools in 'uROIDETools.pas',
+  uRODLGenTools in '..\CodeGen\uRODLGenTools.pas',
+  uRODLToPascalImpl in '..\CodeGen\uRODLToPascalImpl.pas',
+  uRODLToPascalIntf in '..\CodeGen\uRODLToPascalIntf.pas',
+  uRODLToPascalInvk in '..\CodeGen\uRODLToPascalInvk.pas',
+  fServerProjectOptions in 'fServerProjectOptions.pas' {ServerProjectOptions},
+  fCustomIDEMessagesForm in 'fCustomIDEMessagesForm.pas' {CustomIDEMessagesForm},
+  RemObjects_IDE_Reg in 'RemObjects_IDE_Reg.pas',
+  uROResWriter in 'uROResWriter.pas',
+  fDispatchersEditorForm in 'fDispatchersEditorForm.pas' {DispatchersEditorForm},
+  uROIDEData in 'uROIDEData.pas' {IdeData: TDataModule},
+  uRODLToPascal in '..\CodeGen\uRODLToPascal.pas',
+  fROAbout in 'fROAbout.pas' {AboutForm},
+  uROIDEEditors in 'uROIDEEditors.pas',
+  uROProductVersionInfoForm in 'uROProductVersionInfoForm.pas' {ProductVersionInfoForm},
+  uROProductVersionInfo in 'uROProductVersionInfo.pas',
+  uROProductVersionInfo_Intf in 'uROProductVersionInfo_Intf.pas',
+  fROServerClassForm in 'fROServerClassForm.pas' {ROServerClassForm},
+  uROExtraEditors in 'uROExtraEditors.pas',
+  fNewProjectForm in 'fNewProjectForm.pas' {NewProjectForm},
+  uRODLToPascalAsync in '..\CodeGen\uRODLToPascalAsync.pas',
+  uROLoginNeededForm in 'uROLoginNeededForm.pas' {ROLoginNeededForm},
+  uRODLTemplateBasedConverterUtils in '..\CodeGen2\uRODLTemplateBasedConverterUtils.pas',
+  uRODLAsyncConverter in '..\CodeGen2\uRODLAsyncConverter.pas',
+  uRODLConvertersUtils in '..\CodeGen2\uRODLConvertersUtils.pas',
+  uRODLCppConverters in '..\CodeGen2\uRODLCppConverters.pas',
+  uRODLDelphiConverters in '..\CodeGen2\uRODLDelphiConverters.pas',
+  uRODLImplConverter in '..\CodeGen2\uRODLImplConverter.pas',
+  uRODLIntfConverter in '..\CodeGen2\uRODLIntfConverter.pas',
+  uRODLInvkConverter in '..\CodeGen2\uRODLInvkConverter.pas',
+  uRODLSplitableConverter in '..\CodeGen2\uRODLSplitableConverter.pas',
+  uRODLTemplateBasedConverter in '..\CodeGen2\uRODLTemplateBasedConverter.pas',
+  uRODLLineStream in '..\CodeGen2\uRODLLineStream.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/__history/RemObjects_IDE_D12.dpk.~2~ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/__history/RemObjects_IDE_D12.dpk.~2~
new file mode 100644
index 0000000..f90c88d
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/__history/RemObjects_IDE_D12.dpk.~2~	
@@ -0,0 +1,76 @@
+package RemObjects_IDE_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - IDE Integration for Win32'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  designide,
+  vclx,
+  inet,
+  vcl,
+  rtl,
+  RemObjects_Core_D12,
+  RemObjects_Everwood_D12;
+
+contains
+  uROIDEPrjWizard in 'uROIDEPrjWizard.pas',
+  uROIDEMenu in 'uROIDEMenu.pas',
+  uRORODLNotifier in 'uRORODLNotifier.pas',
+  uROIDETools in 'uROIDETools.pas',
+  uRODLGenTools in '..\CodeGen\uRODLGenTools.pas',
+  uRODLToPascalImpl in '..\CodeGen\uRODLToPascalImpl.pas',
+  uRODLToPascalIntf in '..\CodeGen\uRODLToPascalIntf.pas',
+  uRODLToPascalInvk in '..\CodeGen\uRODLToPascalInvk.pas',
+  fServerProjectOptions in 'fServerProjectOptions.pas' {ServerProjectOptions},
+  fCustomIDEMessagesForm in 'fCustomIDEMessagesForm.pas' {CustomIDEMessagesForm},
+  RemObjects_IDE_Reg in 'RemObjects_IDE_Reg.pas',
+  uROResWriter in 'uROResWriter.pas',
+  fDispatchersEditorForm in 'fDispatchersEditorForm.pas' {DispatchersEditorForm},
+  uROIDEData in 'uROIDEData.pas' {IdeData: TDataModule},
+  uRODLToPascal in '..\CodeGen\uRODLToPascal.pas',
+  fROAbout in 'fROAbout.pas' {AboutForm},
+  uROIDEEditors in 'uROIDEEditors.pas',
+  uROProductVersionInfoForm in 'uROProductVersionInfoForm.pas' {ProductVersionInfoForm},
+  uROProductVersionInfo in 'uROProductVersionInfo.pas',
+  uROProductVersionInfo_Intf in 'uROProductVersionInfo_Intf.pas',
+  fROServerClassForm in 'fROServerClassForm.pas' {ROServerClassForm},
+  uROExtraEditors in 'uROExtraEditors.pas',
+  fNewProjectForm in 'fNewProjectForm.pas' {NewProjectForm},
+  uRODLToPascalAsync in '..\CodeGen\uRODLToPascalAsync.pas',
+  uROLoginNeededForm in 'uROLoginNeededForm.pas' {ROLoginNeededForm},
+  uRODLTemplateBasedConverterUtils in '..\CodeGen2\uRODLTemplateBasedConverterUtils.pas',
+  uRODLAsyncConverter in '..\CodeGen2\uRODLAsyncConverter.pas',
+  uRODLConvertersUtils in '..\CodeGen2\uRODLConvertersUtils.pas',
+  uRODLCppConverters in '..\CodeGen2\uRODLCppConverters.pas',
+  uRODLDelphiConverters in '..\CodeGen2\uRODLDelphiConverters.pas',
+  uRODLImplConverter in '..\CodeGen2\uRODLImplConverter.pas',
+  uRODLIntfConverter in '..\CodeGen2\uRODLIntfConverter.pas',
+  uRODLInvkConverter in '..\CodeGen2\uRODLInvkConverter.pas',
+  uRODLSplitableConverter in '..\CodeGen2\uRODLSplitableConverter.pas',
+  uRODLTemplateBasedConverter in '..\CodeGen2\uRODLTemplateBasedConverter.pas',
+  uRODLLineStream in '..\CodeGen2\uRODLLineStream.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fCustomIDEMessagesForm.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fCustomIDEMessagesForm.dfm
new file mode 100644
index 0000000..0b107ca
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fCustomIDEMessagesForm.dfm	
@@ -0,0 +1,184 @@
+object CustomIDEMessagesForm: TCustomIDEMessagesForm
+  Left = 570
+  Top = 352
+  Width = 472
+  Height = 169
+  ActiveControl = ListView
+  Caption = 'RemObjects Preprocessor'
+  Color = clBtnFace
+  ParentFont = True
+  OldCreateOrder = True
+  OnClose = FormClose
+  OnShow = FormShow
+  PixelsPerInch = 96
+  TextHeight = 13
+  object ListView: TListView
+    Left = 0
+    Top = 0
+    Width = 464
+    Height = 142
+    Align = alClient
+    Columns = <
+      item
+        AutoSize = True
+        Caption = 'Message'
+      end>
+    ColumnClick = False
+    ReadOnly = True
+    PopupMenu = PopupMenu1
+    SmallImages = ImageList
+    TabOrder = 0
+    ViewStyle = vsReport
+  end
+  object ImageList: TImageList
+    Left = 40
+    Top = 64
+    Bitmap = {
+      494C010103000400040010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
+      0000000000003600000028000000400000001000000001002000000000000010
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000DFBCAD00CCB6AD00C4ABA200D5B2A400000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000E1BCAC00D9CDCA00C7CACE00B2B0B400B3A39D00E1BCAC000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000003E3E3E003E3E3E003E3E3E003E3E3E003E3E3E003E3E3E003E3E
+      3E00000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000E1C0AF00E8DCD900E3E5E800D0A79600C49B8A00B4AFB100B4A49F00D4B2
+      A300000000000000000000000000000000000000000000000000000000003E3E
+      3E003A3A3B003737380036363600363736003738370037383700373838003839
+      39003B3B3B003E3E3E0000000000000000000000000000000000000000000000
+      00000000000000000000000000000975A700075C84000C6F9D00000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000000000000E1BC
+      AC00EFE6E200F5FEFF00D3957800BA3C0800BC3D0A00C27F6300B6B3B600B2A1
+      9E00E1BCAC000000000000000000000000000000000000000000000000003838
+      380046463F00535348005A594D005B5A4E005F5B4F0059564A0057544900514F
+      440046453D003A3B380000000000000000000000000000000000000000000000
+      000000000000000000000670A4003F9AB8006E533B001521260018769F000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000E1BCAC00F3E8
+      E200FEFFFF00D99E8400C55C2E00E5B39A00E5B29900C85D2E00C1795A00B5B2
+      B600B2A29E00D3B1A2000000000000000000000000000000000000000000726F
+      6B00828086006C6B97006461A00056529D004C4699004F499600585295005D58
+      8B00706A7B006762610000000000000000000000000000000000000000000000
+      0000000000000670A40031CDFF0050A8BF00FFDAA0007C5F45001B3B4C000000
+      0000005286000052860000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000E1BCAC00F5E9E500FFFF
+      FF00DFA58B00BA421000BF502000F8EBE400F7E8E000BF502000BE461300C27C
+      5E00B6B2B500B2A19E00E1BCAC00000000000000000000000000000000008D8A
+      A6003838AF001615A6000807A6000000A5000000A5000000A6000504A700100F
+      A8002926A7007B72950000000000000000000000000000000000000000000670
+      A4002FBFF00028ACDF0059D2FE0078C9E700E3BB8F00D7A87900283239001D7B
+      AB0000528600005286000A587E00000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000E1BCAB00F5E8E300FFFFFF00E8B9
+      9F00C4552000C14F1F00C0501F00F5E1D800F4DED400BF4C1D00BE4A1B00BF46
+      1300C1795A00B4ADB000AE9F9C00D4B2A2000000000000000000000000000000
+      00000018E100001FE7000020E900001EE400001ADC000012CE00000ABD000002
+      AC000001AB0000000000000000000000000000000000000000000670A40043D0
+      FE006CDEFF005CB4DB00AEDDF300F1FFFF00DEDBD5009B8873002C5F76005FBD
+      E60065BFE000837561001716150004557F000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000E7C9BC00FFFFFF00F6E2D200D378
+      3E00CE6F3800CA653000C65C2A00F6E4DA00F4DFD500BF4D1E00BE4B1C00BF4E
+      1E00BF441200C4978400B3B2B500C2AAA2000000000000000000000000000000
+      0000002AF6000130FF000030FF00002EFF000029F8000021E8000016D5000009
+      BC000004AE000000000000000000000000000C7BAE002998C80077DDFF00A3E5
+      FF00CFF1FF00DBF0F9005AA9C800B1D8E9008BCAE500379AC6001AABDA004AD0
+      FF002EB8E700D0BE9D007C563900023B57000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000E7C9BC00FFFFFF00F8E6D700DD8F
+      5000D8834800D3784000CE6F3800F8EAE100F5E3D900C0512000BE4B1B00BE4B
+      1C00BD471500D0AC9E00C8CACE00CFB6AD000000000000000000000000000000
+      00000C3DFE00174CFF001246FF000A40FF000236FF00002CFB000021E9000013
+      CC000009B900000000000000000000000000086C9F000670A400CDEBF900FAFF
+      FF00F2FCFF00DBF5FF0060BDE0000697C600008EBC000089B8000BA9D50034C7
+      FA0033CFFF007EB8BF008B6B4C00014262000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000E1BCAB00F5E8E200FFFFFF00F3D7
+      BA00DF955500D9894A00DD946100F5DECD00EDC9B300C8602D00C1511F00BC46
+      1400D69F8700E3E8EB00DACBC600DFBAA9000000000000000000000000000000
+      00002354FF003666FF003363FF002759FF001248FF000237FF000029F900001A
+      DC00000DC3000000000000000000000000000670A400BCDBEA000670A400A1D2
+      E60093D9F70072DBFF0053D6FF0033C0F100189CCE00058CBC0000A0CB001FB5
+      E40037CBFC0023B1E5001A668700025F8F000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000000000000000E1BCAC00F3E5DF00FFFF
+      FF00F6DEC300E4A16000DF965800E1A07000DB926300CE6F3700CA622B00E0AF
+      9700F4FEFF00E7DAD500E1BCAC00000000000000000000000000000000000000
+      0000517AFF007097FD005985FD003F6EFF002156FF00073FFF00002DFE00001E
+      E6000010C900000000000000000000000000000000000670A4000670A4000670
+      A40026A1D20026ADE00031C2F50037C9FB0034C4F7002AB5E700128DBE000172
+      A1000F7BAF000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000E0BAA900F2E5
+      DE00FFFFFF00F8E0C600E7A86500FBEFE300F9E7DB00D57E4000E8B79A00FEFF
+      FF00EEE4E000E0BCAC0000000000000000000000000000000000000000000000
+      00005F85FE00A2C0FD007AA1FD005681FE00265AFF000A42FF00002FFE000020
+      EA000011CA000000000000000000000000000000000000000000000000000000
+      0000000000000E85B8000C7EB2001393C5000B8DC000006C9F00000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000000000000000000000000000E1BC
+      AC00F2E3DB00FFFFFF00F8E4CA00F4D2A500EFC19200F0CBA900FFFFFF00F4E9
+      E300E1BCAC000000000000000000000000000000000000000000000000000000
+      0000000000007698FD0092B1FE00638CFF001D55FF00063EFF00002EFC00001D
+      E300000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000E0B9A700F2E2DB00FFFFFF00FBEFDD00F8E7D300FFFFFF00F7EBE600E1BF
+      AE00000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000587DFE00254FFE000A38FC00002BF4000025F0000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000E1BCAC00F2E2DA00FFFFFF00FFFFFF00F6ECE700E1BCAC000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000E1BCAB00E7C9BC00E7C9BC00E1BCAB00000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000424D3E000000000000003E000000
+      2800000040000000100000000100010000000000800000000000000000000000
+      000000000000000000000000FFFFFF00FC3FFFFFFFFF0000F81FF80FFFFF0000
+      F00FE003FE3F0000E007E003FC1F0000C003E003F81300008001E003E0010000
+      0000F007C00000000000F007000000000000F007000000000000F00700000000
+      8001F00780070000C003F007F83F0000E007F80FFFFF0000F00FFC1FFFFF0000
+      F81FFFFFFFFF0000FC3FFFFFFFFF000000000000000000000000000000000000
+      000000000000}
+  end
+  object PopupMenu1: TPopupMenu
+    Left = 88
+    Top = 16
+    object CopytoClipboard1: TMenuItem
+      Caption = 'Copy to Clipboard'
+      OnClick = CopytoClipboard1Click
+    end
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fCustomIDEMessagesForm.lfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fCustomIDEMessagesForm.lfm
new file mode 100644
index 0000000..743e231
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fCustomIDEMessagesForm.lfm	
@@ -0,0 +1,147 @@
+object CustomIDEMessagesForm: TCustomIDEMessagesForm
+  Left = 570
+  Height = 142
+  Top = 352
+  Width = 276
+  HorzScrollBar.Page = 275
+  VertScrollBar.Page = 141
+  ActiveControl = ListView
+  Caption = 'RemObjects Preprocessor'
+  ClientHeight = 142
+  ClientWidth = 276
+  Font.Height = 11
+  Font.Name = 'MS Sans Serif'
+  Font.Pitch = fpVariable
+  OnClose = FormClose
+  OnShow = FormShow
+  LCLVersion = '0.9.25'
+  object ListView: TListView
+    Height = 142
+    Width = 276
+    Align = alClient
+    Columns = <    
+      item
+        AutoSize = True
+        Caption = 'Message'
+        Width = 270
+      end>
+    ColumnClick = False
+    PopupMenu = PopupMenu1
+    ReadOnly = True
+    SmallImages = ImageList
+    TabOrder = 0
+    ViewStyle = vsReport
+  end
+  object ImageList: TImageList
+    BkColor = clForeground
+    left = 48
+    top = 32
+    Bitmap = {
+      4C69030000001000000010000000000000000000000000000000000000000000
+      000000000000E1BCABFFE7C9BCFFE7C9BCFFE1BCABFF00000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000E1BCACFFF2E2DAFFFFFFFFFFFFFFFFFFF6ECE7FFE1BCACFF000000000000
+      000000000000000000000000000000000000000000000000000000000000E0B9
+      A7FFF2E2DBFFFFFFFFFFFBEFDDFFF8E7D3FFFFFFFFFFF7EBE6FFE1BFAEFF0000
+      0000000000000000000000000000000000000000000000000000E1BCACFFF2E3
+      DBFFFFFFFFFFF8E4CAFFF4D2A5FFEFC192FFF0CBA9FFFFFFFFFFF4E9E3FFE1BC
+      ACFF0000000000000000000000000000000000000000E0BAA9FFF2E5DEFFFFFF
+      FFFFF8E0C6FFE7A865FFFBEFE3FFF9E7DBFFD57E40FFE8B79AFFFEFFFFFFEEE4
+      E0FFE0BCACFF000000000000000000000000E1BCACFFF3E5DFFFFFFFFFFFF6DE
+      C3FFE4A160FFDF9658FFE1A070FFDB9263FFCE6F37FFCA622BFFE0AF97FFF4FE
+      FFFFE7DAD5FFE1BCACFF00000000E1BCABFFF5E8E2FFFFFFFFFFF3D7BAFFDF95
+      55FFD9894AFFDD9461FFF5DECDFFEDC9B3FFC8602DFFC1511FFFBC4614FFD69F
+      87FFE3E8EBFFDACBC6FFDFBAA9FFE7C9BCFFFFFFFFFFF8E6D7FFDD8F50FFD883
+      48FFD37840FFCE6F38FFF8EAE1FFF5E3D9FFC05120FFBE4B1BFFBE4B1CFFBD47
+      15FFD0AC9EFFC8CACEFFCFB6ADFFE7C9BCFFFFFFFFFFF6E2D2FFD3783EFFCE6F
+      38FFCA6530FFC65C2AFFF6E4DAFFF4DFD5FFBF4D1EFFBE4B1CFFBF4E1EFFBF44
+      12FFC49784FFB3B2B5FFC2AAA2FFE1BCABFFF5E8E3FFFFFFFFFFE8B99FFFC455
+      20FFC14F1FFFC0501FFFF5E1D8FFF4DED4FFBF4C1DFFBE4A1BFFBF4613FFC179
+      5AFFB4ADB0FFAE9F9CFFD4B2A2FF00000000E1BCACFFF5E9E5FFFFFFFFFFDFA5
+      8BFFBA4210FFBF5020FFF8EBE4FFF7E8E0FFBF5020FFBE4613FFC27C5EFFB6B2
+      B5FFB2A19EFFE1BCACFF000000000000000000000000E1BCACFFF3E8E2FFFEFF
+      FFFFD99E84FFC55C2EFFE5B39AFFE5B299FFC85D2EFFC1795AFFB5B2B6FFB2A2
+      9EFFD3B1A2FF0000000000000000000000000000000000000000E1BCACFFEFE6
+      E2FFF5FEFFFFD39578FFBA3C08FFBC3D0AFFC27F63FFB6B3B6FFB2A19EFFE1BC
+      ACFF00000000000000000000000000000000000000000000000000000000E1C0
+      AFFFE8DCD9FFE3E5E8FFD0A796FFC49B8AFFB4AFB1FFB4A49FFFD4B2A3FF0000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000E1BCACFFD9CDCAFFC7CACEFFB2B0B4FFB3A39DFFE1BCACFF000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000DFBCADFFCCB6ADFFC4ABA2FFD5B2A4FF00000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000587DFEFF254FFEFF0A38FCFF002BF4FF0025F0FF000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00007698FDFF92B1FEFF638CFFFF1D55FFFF063EFFFF002EFCFF001DE3FF0000
+      0000000000000000000000000000000000000000000000000000000000005F85
+      FEFFA2C0FDFF7AA1FDFF5681FEFF265AFFFF0A42FFFF002FFEFF0020EAFF0011
+      CAFF00000000000000000000000000000000000000000000000000000000517A
+      FFFF7097FDFF5985FDFF3F6EFFFF2156FFFF073FFFFF002DFEFF001EE6FF0010
+      C9FF000000000000000000000000000000000000000000000000000000002354
+      FFFF3666FFFF3363FFFF2759FFFF1248FFFF0237FFFF0029F9FF001ADCFF000D
+      C3FF000000000000000000000000000000000000000000000000000000000C3D
+      FEFF174CFFFF1246FFFF0A40FFFF0236FFFF002CFBFF0021E9FF0013CCFF0009
+      B9FF00000000000000000000000000000000000000000000000000000000002A
+      F6FF0130FFFF0030FFFF002EFFFF0029F8FF0021E8FF0016D5FF0009BCFF0004
+      AEFF000000000000000000000000000000000000000000000000000000000018
+      E1FF001FE7FF0020E9FF001EE4FF001ADCFF0012CEFF000ABDFF0002ACFF0001
+      ABFF0000000000000000000000000000000000000000000000008D8AA6FF3838
+      AFFF1615A6FF0807A6FF0000A5FF0000A5FF0000A6FF0504A7FF100FA8FF2926
+      A7FF7B7295FF0000000000000000000000000000000000000000726F6BFF8280
+      86FF6C6B97FF6461A0FF56529DFF4C4699FF4F4996FF585295FF5D588BFF706A
+      7BFF676261FF0000000000000000000000000000000000000000383838FF4646
+      3FFF535348FF5A594DFF5B5A4EFF5F5B4FFF59564AFF575449FF514F44FF4645
+      3DFF3A3B38FF00000000000000000000000000000000000000003E3E3EFF3A3A
+      3BFF373738FF363636FF363736FF373837FF373837FF373838FF383939FF3B3B
+      3BFF3E3E3EFF0000000000000000000000000000000000000000000000000000
+      00003E3E3EFF3E3E3EFF3E3E3EFF3E3E3EFF3E3E3EFF3E3E3EFF3E3E3EFF0000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000E85B8FF0C7EB2FF1393C5FF0B8DC0FF006C9FFF00000000000000000000
+      0000000000000000000000000000000000000670A4FF0670A4FF0670A4FF26A1
+      D2FF26ADE0FF31C2F5FF37C9FBFF34C4F7FF2AB5E7FF128DBEFF0172A1FF0F7B
+      AFFF0000000000000000000000000670A4FFBCDBEAFF0670A4FFA1D2E6FF93D9
+      F7FF72DBFFFF53D6FFFF33C0F1FF189CCEFF058CBCFF00A0CBFF1FB5E4FF37CB
+      FCFF23B1E5FF1A6687FF025F8FFF086C9FFF0670A4FFCDEBF9FFFAFFFFFFF2FC
+      FFFFDBF5FFFF60BDE0FF0697C6FF008EBCFF0089B8FF0BA9D5FF34C7FAFF33CF
+      FFFF7EB8BFFF8B6B4CFF014262FF0C7BAEFF2998C8FF77DDFFFFA3E5FFFFCFF1
+      FFFFDBF0F9FF5AA9C8FFB1D8E9FF8BCAE5FF379AC6FF1AABDAFF4AD0FFFF2EB8
+      E7FFD0BE9DFF7C5639FF023B57FF00000000000000000670A4FF43D0FEFF6CDE
+      FFFF5CB4DBFFAEDDF3FFF1FFFFFFDEDBD5FF9B8873FF2C5F76FF5FBDE6FF65BF
+      E0FF837561FF171615FF04557FFF0000000000000000000000000670A4FF2FBF
+      F0FF28ACDFFF59D2FEFF78C9E7FFE3BB8FFFD7A879FF283239FF1D7BABFF0052
+      86FF005286FF0A587EFF00000000000000000000000000000000000000000000
+      00000670A4FF31CDFFFF50A8BFFFFFDAA0FF7C5F45FF1B3B4CFF000000000052
+      86FF005286FF0000000000000000000000000000000000000000000000000000
+      0000000000000670A4FF3F9AB8FF6E533BFF152126FF18769FFF000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000975A7FF075C84FF0C6F9DFF00000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000
+    }
+  end
+  object PopupMenu1: TPopupMenu
+    left = 72
+    top = 32
+    object CopytoClipboard1: TMenuItem
+      Caption = 'Copy to Clipboard'
+      OnClick = CopytoClipboard1Click
+    end
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fCustomIDEMessagesForm.lrs b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fCustomIDEMessagesForm.lrs
new file mode 100644
index 0000000..e492f7f
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fCustomIDEMessagesForm.lrs	
@@ -0,0 +1,137 @@
+{ This is an automatically generated lazarus resource file }
+
+LazarusResources.Add('TCustomIDEMessagesForm','FORMDATA',[
+  'TPF0'#22'TCustomIDEMessagesForm'#21'CustomIDEMessagesForm'#4'Left'#3':'#2#6
+  +'Height'#3#142#0#3'Top'#3'`'#1#5'Width'#3#20#1#18'HorzScrollBar.Page'#3#19#1
+  +#18'VertScrollBar.Page'#3#141#0#13'ActiveControl'#7#8'ListView'#7'Caption'#6
+  +#23'RemObjects Preprocessor'#12'ClientHeight'#3#142#0#11'ClientWidth'#3#20#1
+  +#11'Font.Height'#2#11#9'Font.Name'#6#13'MS Sans Serif'#10'Font.Pitch'#7#10'f'
+  +'pVariable'#7'OnClose'#7#9'FormClose'#6'OnShow'#7#8'FormShow'#10'LCLVersion'
+  +#6#6'0.9.25'#0#9'TListView'#8'ListView'#6'Height'#3#142#0#5'Width'#3#20#1#5
+  +'Align'#7#8'alClient'#7'Columns'#14#1#8'AutoSize'#9#7'Caption'#6#7'Message'#5
+  +'Width'#3#14#1#0#0#11'ColumnClick'#8#9'PopupMenu'#7#10'PopupMenu1'#8'ReadOnl'
+  +'y'#9#11'SmallImages'#7#9'ImageList'#8'TabOrder'#2#0#9'ViewStyle'#7#8'vsRepo'
+  +'rt'#0#0#10'TImageList'#9'ImageList'#7'BkColor'#7#12'clForeground'#4'left'#2
+  +'0'#3'top'#2' '#6'Bitmap'#10#14#12#0#0'Li'#3#0#0#0#16#0#0#0#16#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#225#188#171#255#231#201#188#255#231
+  +#201#188#255#225#188#171#255#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#225#188#172#255#242#226#218#255#255
+  +#255#255#255#255#255#255#255#246#236#231#255#225#188#172#255#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#224#185#167#255#242
+  +#226#219#255#255#255#255#255#251#239#221#255#248#231#211#255#255#255#255#255
+  +#247#235#230#255#225#191#174#255#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#225#188#172#255#242#227#219#255#255#255#255#255#248#228#202#255
+  +#244#210#165#255#239#193#146#255#240#203#169#255#255#255#255#255#244#233#227
+  +#255#225#188#172#255#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#224#186#169#255
+  +#242#229#222#255#255#255#255#255#248#224#198#255#231#168'e'#255#251#239#227
+  +#255#249#231#219#255#213'~@'#255#232#183#154#255#254#255#255#255#238#228#224
+  +#255#224#188#172#255#0#0#0#0#0#0#0#0#0#0#0#0#225#188#172#255#243#229#223#255
+  +#255#255#255#255#246#222#195#255#228#161'`'#255#223#150'X'#255#225#160'p'#255
+  +#219#146'c'#255#206'o7'#255#202'b+'#255#224#175#151#255#244#254#255#255#231
+  +#218#213#255#225#188#172#255#0#0#0#0#225#188#171#255#245#232#226#255#255#255
+  +#255#255#243#215#186#255#223#149'U'#255#217#137'J'#255#221#148'a'#255#245#222
+  +#205#255#237#201#179#255#200'`-'#255#193'Q'#31#255#188'F'#20#255#214#159#135
+  +#255#227#232#235#255#218#203#198#255#223#186#169#255#231#201#188#255#255#255
+  +#255#255#248#230#215#255#221#143'P'#255#216#131'H'#255#211'x@'#255#206'o8'
+  +#255#248#234#225#255#245#227#217#255#192'Q '#255#190'K'#27#255#190'K'#28#255
+  +#189'G'#21#255#208#172#158#255#200#202#206#255#207#182#173#255#231#201#188
+  +#255#255#255#255#255#246#226#210#255#211'x>'#255#206'o8'#255#202'e0'#255#198
+  +'\*'#255#246#228#218#255#244#223#213#255#191'M'#30#255#190'K'#28#255#191'N'
+  +#30#255#191'D'#18#255#196#151#132#255#179#178#181#255#194#170#162#255#225#188
+  +#171#255#245#232#227#255#255#255#255#255#232#185#159#255#196'U '#255#193'O'
+  +#31#255#192'P'#31#255#245#225#216#255#244#222#212#255#191'L'#29#255#190'J'#27
+  +#255#191'F'#19#255#193'yZ'#255#180#173#176#255#174#159#156#255#212#178#162
+  +#255#0#0#0#0#225#188#172#255#245#233#229#255#255#255#255#255#223#165#139#255
+  +#186'B'#16#255#191'P '#255#248#235#228#255#247#232#224#255#191'P '#255#190'F'
+  +#19#255#194'|^'#255#182#178#181#255#178#161#158#255#225#188#172#255#0#0#0#0#0
+  +#0#0#0#0#0#0#0#225#188#172#255#243#232#226#255#254#255#255#255#217#158#132
+  +#255#197'\.'#255#229#179#154#255#229#178#153#255#200'].'#255#193'yZ'#255#181
+  +#178#182#255#178#162#158#255#211#177#162#255#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#225#188#172#255#239#230#226#255#245#254#255#255#211#149'x'#255#186
+  +'<'#8#255#188'='#10#255#194'c'#255#182#179#182#255#178#161#158#255#225#188
+  +#172#255#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#225#192#175
+  +#255#232#220#217#255#227#229#232#255#208#167#150#255#196#155#138#255#180#175
+  +#177#255#180#164#159#255#212#178#163#255#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#225#188#172#255#217#205#202#255#199#202
+  +#206#255#178#176#180#255#179#163#157#255#225#188#172#255#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#223#188
+  +#173#255#204#182#173#255#196#171#162#255#213#178#164#255#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0'X}'#254#255'%O'#254#255#10'8'#252#255#0'+'#244
+  +#255#0'%'#240#255#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0'v'#152#253#255#146#177#254#255'c'#140#255#255#29'U'#255
+  +#255#6'>'#255#255#0'.'#252#255#0#29#227#255#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'_'#133#254#255#162#192#253#255'z'#161#253#255
+  ,'V'#129#254#255'&Z'#255#255#10'B'#255#255#0'/'#254#255#0' '#234#255#0#17#202
+  +#255#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'Qz'#255#255'p'
+  +#151#253#255'Y'#133#253#255'?n'#255#255'!V'#255#255#7'?'#255#255#0'-'#254#255
+  +#0#30#230#255#0#16#201#255#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0'#T'#255#255'6f'#255#255'3c'#255#255'''Y'#255#255#18'H'#255#255#2'7'
+  +#255#255#0')'#249#255#0#26#220#255#0#13#195#255#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#12'='#254#255#23'L'#255#255#18'F'#255#255#10'@'
+  +#255#255#2'6'#255#255#0','#251#255#0'!'#233#255#0#19#204#255#0#9#185#255#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'*'#246#255#1'0'#255
+  +#255#0'0'#255#255#0'.'#255#255#0')'#248#255#0'!'#232#255#0#22#213#255#0#9#188
+  +#255#0#4#174#255#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#24
+  +#225#255#0#31#231#255#0' '#233#255#0#30#228#255#0#26#220#255#0#18#206#255#0
+  +#10#189#255#0#2#172#255#0#1#171#255#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#141#138#166#255'88'#175#255#22#21#166#255#8#7#166#255#0#0#165#255#0#0
+  +#165#255#0#0#166#255#5#4#167#255#16#15#168#255')&'#167#255'{r'#149#255#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'rok'#255#130#128#134#255'lk'#151#255'da'
+  +#160#255'VR'#157#255'LF'#153#255'OI'#150#255'XR'#149#255']X'#139#255'pj{'#255
+  +'gba'#255#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'888'#255'FF?'#255'SSH'#255
+  +'ZYM'#255'[ZN'#255'_[O'#255'YVJ'#255'WTI'#255'QOD'#255'FE='#255':;8'#255#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'>>>'#255'::;'#255'778'#255'666'#255'676'
+  +#255'787'#255'787'#255'788'#255'899'#255';;;'#255'>>>'#255#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'>>>'#255'>>>'#255'>>>'#255'>>>'#255'>'
+  +'>>'#255'>>>'#255'>>>'#255#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#14#133#184#255#12'~'
+  +#178#255#19#147#197#255#11#141#192#255#0'l'#159#255#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#6'p'#164#255#6'p'#164#255#6'p'#164#255'&'#161
+  +#210#255'&'#173#224#255'1'#194#245#255'7'#201#251#255'4'#196#247#255'*'#181
+  +#231#255#18#141#190#255#1'r'#161#255#15'{'#175#255#0#0#0#0#0#0#0#0#0#0#0#0#6
+  +'p'#164#255#188#219#234#255#6'p'#164#255#161#210#230#255#147#217#247#255'r'
+  +#219#255#255'S'#214#255#255'3'#192#241#255#24#156#206#255#5#140#188#255#0#160
+  +#203#255#31#181#228#255'7'#203#252#255'#'#177#229#255#26'f'#135#255#2'_'#143
+  +#255#8'l'#159#255#6'p'#164#255#205#235#249#255#250#255#255#255#242#252#255
+  +#255#219#245#255#255'`'#189#224#255#6#151#198#255#0#142#188#255#0#137#184#255
+  +#11#169#213#255'4'#199#250#255'3'#207#255#255'~'#184#191#255#139'kL'#255#1'B'
+  +'b'#255#12'{'#174#255')'#152#200#255'w'#221#255#255#163#229#255#255#207#241
+  +#255#255#219#240#249#255'Z'#169#200#255#177#216#233#255#139#202#229#255'7'
+  +#154#198#255#26#171#218#255'J'#208#255#255'.'#184#231#255#208#190#157#255'|V'
+  +'9'#255#2';W'#255#0#0#0#0#0#0#0#0#6'p'#164#255'C'#208#254#255'l'#222#255#255
+  +'\'#180#219#255#174#221#243#255#241#255#255#255#222#219#213#255#155#136's'
+  +#255',_v'#255'_'#189#230#255'e'#191#224#255#131'ua'#255#23#22#21#255#4'U'
+  +#255#0#0#0#0#0#0#0#0#0#0#0#0#6'p'#164#255'/'#191#240#255'('#172#223#255'Y'
+  +#210#254#255'x'#201#231#255#227#187#143#255#215#168'y'#255'(29'#255#29'{'#171
+  +#255#0'R'#134#255#0'R'#134#255#10'X~'#255#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#6'p'#164#255'1'#205#255#255'P'#168#191#255#255#218#160#255'|_E'
+  +#255#27';L'#255#0#0#0#0#0'R'#134#255#0'R'#134#255#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#6'p'#164#255'?'#154#184#255'nS;'#255#21
+  +'!&'#255#24'v'#159#255#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#9'u'#167#255#7'\'#132#255#12'o'
+  +#157#255#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#10'TPopupMenu'#10'PopupMenu1'#4'left'#2'H'#3'top'#2' '#0#9'TMen'
+  +'uItem'#16'CopytoClipboard1'#7'Caption'#6#17'Copy to Clipboard'#7'OnClick'#7
+  +#21'CopytoClipboard1Click'#0#0#0#0
+]);
+
+LazarusResources.Add('TListView','FORMDATA',[
+  'TPF0'#9'TListView'#8'ListView'#4'Left'#3' '#1#6'Height'#3#142#0#3'Top'#3#219
+  +#0#5'Width'#3#30#1#18'HorzScrollBar.Page'#3#29#1#18'VertScrollBar.Page'#3#141
+  +#0#5'Align'#7#8'alClient'#7'Caption'#6#8'ListView'#0#0
+]);
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fCustomIDEMessagesForm.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fCustomIDEMessagesForm.pas
new file mode 100644
index 0000000..ea64264
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fCustomIDEMessagesForm.pas	
@@ -0,0 +1,138 @@
+unit fCustomIDEMessagesForm;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Delphi IDE Integration                            }
+{                                                                            }
+{ compiler: Delphi 5 and up                                                  }
+{ platform: Win32                                                            }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+
+uses
+  {$IFDEF FPC}LCLIntf, LResources,uROIDETools_laz, {$ELSE}uROIDETools, {$ENDIF}
+  {$IFDEF MSWINDOWS}Windows,{$ENDIF}Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
+  ComCtrls, ImgList, Menus;
+
+
+type
+  TCustomIDEMessagesForm = class(TForm)
+    ListView: TListView;
+    ImageList: TImageList;
+    PopupMenu1: TPopupMenu;
+    CopytoClipboard1: TMenuItem;
+    procedure FormClose(Sender: TObject; var Action: TCloseAction);
+    procedure FormShow(Sender: TObject);
+    procedure CopytoClipboard1Click(Sender: TObject);
+  private
+
+  public
+    destructor Destroy; override;
+
+    procedure FillList(aMessageList : TIDEMessageList);
+  end;
+
+var DisplayIDEMessageForm : boolean = TRUE;
+
+function IDEMessageForm : TCustomIDEMessagesForm;
+
+implementation
+
+uses ClipBrd;
+{$IFNDEF FPC}
+{$R *.dfm}
+{$ENDIF FPC}
+
+var
+  _CustomIDEMessagesForm: TCustomIDEMessagesForm;
+
+function IDEMessageForm : TCustomIDEMessagesForm;
+begin
+  if (_CustomIDEMessagesForm=NIL) then
+    _CustomIDEMessagesForm := TCustomIDEMessagesForm.Create(Application);
+
+  if DisplayIDEMessageForm then _CustomIDEMessagesForm.Show;
+  
+  result := _CustomIDEMessagesForm;
+end;
+
+destructor TCustomIDEMessagesForm.Destroy;
+begin
+  _CustomIDEMessagesForm := NIL;
+  inherited;
+end;
+
+procedure TCustomIDEMessagesForm.FillList(aMessageList: TIDEMessageList);
+var i    : integer;
+    item : TListItem;
+    s : string;
+begin
+  Caption := 'RemObjects Preprocessor';
+  ListView.Items.Clear;
+  if (aMessageLIst=NIL) then Exit;
+
+  with aMessageList do begin
+    for i := 0 to (Count-1) do begin
+      item := ListView.Items.Add;
+      with Items[i] do begin
+        if (PrefixStr<>'') then s := PrefixStr+': ' else s := '';
+        if (FileName<>'') then s := s+'('+Filename+')';
+        s := s+MessageStr;
+
+        item.Caption := s;
+        item.ImageIndex := Ord(MessageType);
+        {$IFNDEF FPC}
+        item.StateIndex := Ord(MessageType);
+        {$ENDIF FPC}
+      end;
+    end;
+
+    if (Count>0) then ListView.Items[Count-1].Selected := TRUE;
+    Caption := Caption+' ('+ IntToStr(Count)+' messages)';
+  end;
+end;
+
+procedure TCustomIDEMessagesForm.FormClose(Sender: TObject;
+  var Action: TCloseAction);
+begin
+  Action := caFree;
+end;
+
+procedure TCustomIDEMessagesForm.FormShow(Sender: TObject);
+begin
+  Height := 150;
+  Width := 400;
+  Left := Screen.Width-Width;
+  Top := Screen.Height-Height;
+end;
+
+procedure TCustomIDEMessagesForm.CopytoClipboard1Click(Sender: TObject);
+var i : integer;
+    s : string;
+begin
+  s := '';
+  for i := 0 to (ListView.Items.Count-1) do
+    s := s+ListView.Items[i].Caption+#13#10;
+
+  Clipboard.AsText := s;
+end;
+
+initialization
+{$IFDEF FPC}
+  {$I fCustomIDEMessagesForm.lrs}
+{$ENDIF FPC}
+  _CustomIDEMessagesForm := NIL;
+finalization
+  _CustomIDEMessagesForm.Free;
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fDispatchersEditorForm.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fDispatchersEditorForm.dfm
new file mode 100644
index 0000000..c18c16b
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fDispatchersEditorForm.dfm	
@@ -0,0 +1,238 @@
+object DispatchersEditorForm: TDispatchersEditorForm
+  Left = 433
+  Top = 253
+  BorderStyle = bsToolWindow
+  Caption = 'Dispatchers Editor'
+  ClientHeight = 276
+  ClientWidth = 342
+  Color = clBtnFace
+  ParentFont = True
+  OldCreateOrder = False
+  Position = poScreenCenter
+  PixelsPerInch = 96
+  TextHeight = 13
+  object Label1: TLabel
+    Left = 4
+    Top = 207
+    Width = 46
+    Height = 13
+    Caption = 'Message:'
+  end
+  object Label3: TLabel
+    Left = 8
+    Top = 231
+    Width = 42
+    Height = 13
+    Caption = 'Enabled:'
+  end
+  object lblPathInfo: TLabel
+    Left = 4
+    Top = 255
+    Width = 49
+    Height = 13
+    Caption = 'Path Info:'
+  end
+  object ListView: TListView
+    Left = 4
+    Top = 5
+    Width = 332
+    Height = 156
+    Anchors = [akLeft, akTop, akRight]
+    Columns = <
+      item
+        Caption = 'Enabled'
+        Width = 70
+      end
+      item
+        Caption = 'Message'
+        Width = 150
+      end
+      item
+        AutoSize = True
+        Caption = 'Path Info'
+      end>
+    ColumnClick = False
+    HideSelection = False
+    ReadOnly = True
+    RowSelect = True
+    TabOrder = 0
+    ViewStyle = vsReport
+    OnSelectItem = ListViewSelectItem
+  end
+  object bAdd: TBitBtn
+    Left = 181
+    Top = 170
+    Width = 75
+    Height = 25
+    Action = ac_Add
+    Anchors = [akTop, akRight]
+    Caption = '&Add'
+    TabOrder = 1
+    Glyph.Data = {
+      36060000424D3606000000000000360000002800000020000000100000000100
+      18000000000000060000220B0000220B00000000000000000000FF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FF035D05035D05FF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF68
+      6868686868FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FF035D055BF791058C0D035D05FF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF686868DF
+      DFDF808080686868FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FF035D055BF79105950E035D05FF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF686868DF
+      DFDF848484686868FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FF035D055BF79105920D035D05FF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF686868DF
+      DFDF838383686868FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FF035D055BF79106950F035D05FF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF686868DF
+      DFDF858585686868FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      035D05035D05035D05035D05035D055BF7910C9C18035D05035D05035D05035D
+      05035D05FF00FFFF00FFFF00FFFF00FF686868686868686868686868686868DF
+      DFDF8C8C8C686868686868686868686868686868FF00FFFF00FFFF00FF035D05
+      5BF7913BDA6930CF572AC64D21B83C17A62B119F210D9E1C0A9A1506920E0593
+      0D058B0D035D05FF00FFFF00FF686868DFDFDFC4C4C4B9B9B9B2B2B2A7A7A799
+      99999292928F8F8F8A8A8A8383838383837F7F7F686868FF00FFFF00FF035D05
+      5BF7915BF7915BF7915BF7915BF7915BF79118A92F5BF7915BF7915BF7915BF7
+      915BF791035D05FF00FFFF00FF686868DFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDF
+      DFDF9B9B9BDFDFDFDFDFDFDFDFDFDFDFDFDFDFDF686868FF00FFFF00FFFF00FF
+      035D05035D05035D05035D05035D055BF79125BC42035D05035D05035D05035D
+      05035D05FF00FFFF00FFFF00FFFF00FF686868686868686868686868686868DF
+      DFDFABABAB686868686868686868686868686868FF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FF035D055BF79130CE57035D05FF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF686868DF
+      DFDFB9B9B9686868FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FF035D055BF7913BD968035D05FF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF686868DF
+      DFDFC3C3C3686868FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FF035D055BF79148EB7F035D05FF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF686868DF
+      DFDFD1D1D1686868FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FF035D055BF7915BF791035D05FF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF686868DF
+      DFDFDFDFDF686868FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FF035D05035D05FF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF68
+      6868686868FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
+    NumGlyphs = 2
+  end
+  object bDelete: TBitBtn
+    Left = 260
+    Top = 170
+    Width = 75
+    Height = 25
+    Action = ac_Remove
+    Caption = '&Remove'
+    TabOrder = 2
+    Glyph.Data = {
+      36060000424D3606000000000000360000002800000020000000100000000100
+      18000000000000060000220B0000220B00000000000000000000FF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FF0104A20104A20104A20104A20104A20104A20104A20104A20104A20104
+      A2FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF79797979797979797979797979
+      7979797979797979797979797979797979FF00FFFF00FFFF00FFFF00FFFF00FF
+      0104A25983FF0026FF0030FF0030FB002FF2002FE9002EE10030D80031D00034
+      CB0104A2FF00FFFF00FFFF00FFFF00FF797979D4D4D4A7A7A7A7A7A7A5A5A5A1
+      A1A19C9C9C9898989494949090908D8D8D797979FF00FFFF00FFFF00FFFF00FF
+      0104A2ABC2FF6480FF6688FF6688FF6687FA6787F56787F05779E94D70E44D74
+      E20104A2FF00FFFF00FFFF00FFFF00FF797979FDFDFDD9D9D9DADADADADADAD8
+      D8D8D6D6D6D3D3D3C8C8C8C0C0C0BFBFBF797979FF00FFFF00FFFF00FFFF00FF
+      FF00FF0104A20104A20104A20104A20104A20104A20104A20104A20104A20104
+      A2FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF79797979797979797979797979
+      7979797979797979797979797979797979FF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
+    NumGlyphs = 2
+  end
+  object cbMessage: TComboBox
+    Left = 57
+    Top = 203
+    Width = 280
+    Height = 21
+    Style = csDropDownList
+    Anchors = [akLeft, akTop, akRight]
+    ItemHeight = 13
+    TabOrder = 3
+    OnChange = cbMessageChange
+  end
+  object ePathInfo: TEdit
+    Left = 57
+    Top = 251
+    Width = 280
+    Height = 21
+    Anchors = [akLeft, akTop, akRight]
+    TabOrder = 4
+    Text = 'ePathInfo'
+    OnChange = ePathInfoChange
+  end
+  object cbEnabled: TComboBox
+    Left = 57
+    Top = 227
+    Width = 280
+    Height = 21
+    Style = csDropDownList
+    Anchors = [akLeft, akTop, akRight]
+    ItemHeight = 13
+    TabOrder = 5
+    OnChange = cbEnabledChange
+    Items.Strings = (
+      'False'
+      'True')
+  end
+  object ActionList1: TActionList
+    OnUpdate = ActionList1Update
+    Left = 48
+    Top = 168
+    object ac_Add: TAction
+      Caption = '&Add'
+      OnExecute = bAddClick
+    end
+    object ac_Remove: TAction
+      Caption = '&Remove'
+      OnExecute = bDeleteClick
+    end
+    object ac_Close: TAction
+      Caption = 'ac_Close'
+      ShortCut = 27
+      OnExecute = ac_CloseExecute
+    end
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fDispatchersEditorForm.lfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fDispatchersEditorForm.lfm
new file mode 100644
index 0000000..cbacfab
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fDispatchersEditorForm.lfm	
@@ -0,0 +1,253 @@
+object DispatchersEditorForm: TDispatchersEditorForm
+  Left = 378
+  Height = 253
+  Top = 245
+  Width = 288
+  HorzScrollBar.Page = 287
+  VertScrollBar.Page = 252
+  ActiveControl = ListView
+  BorderStyle = bsToolWindow
+  Caption = 'Dispatchers Editor'
+  ClientHeight = 253
+  ClientWidth = 288
+  Font.Height = -11
+  Font.Name = 'Tahoma'
+  Position = poScreenCenter
+  object Label1: TLabel
+    Left = 4
+    Height = 16
+    Top = 183
+    Width = 50
+    Anchors = [akLeft, akBottom]
+    Caption = 'Message:'
+    ParentColor = False
+  end
+  object Label3: TLabel
+    Left = 4
+    Height = 16
+    Top = 207
+    Width = 46
+    Anchors = [akLeft, akBottom]
+    Caption = 'Enabled:'
+    ParentColor = False
+  end
+  object lblPathInfo: TLabel
+    Left = 4
+    Height = 16
+    Top = 231
+    Width = 52
+    Anchors = [akLeft, akBottom]
+    Caption = 'Path Info:'
+    ParentColor = False
+  end
+  object ListView: TListView
+    Left = 4
+    Height = 132
+    Top = 5
+    Width = 279
+    Anchors = [akTop, akLeft, akRight, akBottom]
+    Columns = <    
+      item
+        Caption = 'Enabled'
+        Width = 70
+      end    
+      item
+        Caption = 'Message'
+        Width = 150
+      end    
+      item
+        AutoSize = True
+        Caption = 'Path Info'
+      end>
+    ColumnClick = False
+    HideSelection = False
+    ReadOnly = True
+    RowSelect = True
+    TabOrder = 0
+    ViewStyle = vsReport
+    OnSelectItem = ListViewSelectItem
+  end
+  object bAdd: TBitBtn
+    Left = 120
+    Height = 25
+    Top = 146
+    Width = 75
+    Action = ac_Add
+    Anchors = [akRight, akBottom]
+    Glyph.Data = {
+      36060000424D3606000000000000360000002800000020000000100000000100
+      18000000000000060000220B0000220B00000000000000000000FF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FF035D05035D05FF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF68
+      6868686868FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FF035D055BF791058C0D035D05FF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF686868DF
+      DFDF808080686868FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FF035D055BF79105950E035D05FF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF686868DF
+      DFDF848484686868FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FF035D055BF79105920D035D05FF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF686868DF
+      DFDF838383686868FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FF035D055BF79106950F035D05FF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF686868DF
+      DFDF858585686868FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      035D05035D05035D05035D05035D055BF7910C9C18035D05035D05035D05035D
+      05035D05FF00FFFF00FFFF00FFFF00FF686868686868686868686868686868DF
+      DFDF8C8C8C686868686868686868686868686868FF00FFFF00FFFF00FF035D05
+      5BF7913BDA6930CF572AC64D21B83C17A62B119F210D9E1C0A9A1506920E0593
+      0D058B0D035D05FF00FFFF00FF686868DFDFDFC4C4C4B9B9B9B2B2B2A7A7A799
+      99999292928F8F8F8A8A8A8383838383837F7F7F686868FF00FFFF00FF035D05
+      5BF7915BF7915BF7915BF7915BF7915BF79118A92F5BF7915BF7915BF7915BF7
+      915BF791035D05FF00FFFF00FF686868DFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDF
+      DFDF9B9B9BDFDFDFDFDFDFDFDFDFDFDFDFDFDFDF686868FF00FFFF00FFFF00FF
+      035D05035D05035D05035D05035D055BF79125BC42035D05035D05035D05035D
+      05035D05FF00FFFF00FFFF00FFFF00FF686868686868686868686868686868DF
+      DFDFABABAB686868686868686868686868686868FF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FF035D055BF79130CE57035D05FF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF686868DF
+      DFDFB9B9B9686868FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FF035D055BF7913BD968035D05FF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF686868DF
+      DFDFC3C3C3686868FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FF035D055BF79148EB7F035D05FF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF686868DF
+      DFDFD1D1D1686868FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FF035D055BF7915BF791035D05FF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF686868DF
+      DFDFDFDFDF686868FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FF035D05035D05FF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF68
+      6868686868FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+    }
+    NumGlyphs = 2
+    TabOrder = 1
+  end
+  object bDelete: TBitBtn
+    Left = 199
+    Height = 25
+    Top = 146
+    Width = 84
+    Action = ac_Remove
+    Anchors = [akRight, akBottom]
+    Glyph.Data = {
+      36060000424D3606000000000000360000002800000020000000100000000100
+      18000000000000060000220B0000220B00000000000000000000FF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FF0104A20104A20104A20104A20104A20104A20104A20104A20104A20104
+      A2FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF79797979797979797979797979
+      7979797979797979797979797979797979FF00FFFF00FFFF00FFFF00FFFF00FF
+      0104A25983FF0026FF0030FF0030FB002FF2002FE9002EE10030D80031D00034
+      CB0104A2FF00FFFF00FFFF00FFFF00FF797979D4D4D4A7A7A7A7A7A7A5A5A5A1
+      A1A19C9C9C9898989494949090908D8D8D797979FF00FFFF00FFFF00FFFF00FF
+      0104A2ABC2FF6480FF6688FF6688FF6687FA6787F56787F05779E94D70E44D74
+      E20104A2FF00FFFF00FFFF00FFFF00FF797979FDFDFDD9D9D9DADADADADADAD8
+      D8D8D6D6D6D3D3D3C8C8C8C0C0C0BFBFBF797979FF00FFFF00FFFF00FFFF00FF
+      FF00FF0104A20104A20104A20104A20104A20104A20104A20104A20104A20104
+      A2FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF79797979797979797979797979
+      7979797979797979797979797979797979FF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+    }
+    NumGlyphs = 2
+    TabOrder = 2
+  end
+  object cbMessage: TComboBox
+    Left = 60
+    Height = 21
+    Top = 179
+    Width = 223
+    Anchors = [akLeft, akRight, akBottom]
+    AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
+    ItemHeight = 13
+    OnChange = cbMessageChange
+    Style = csDropDownList
+    TabOrder = 3
+  end
+  object ePathInfo: TEdit
+    Left = 60
+    Height = 21
+    Top = 227
+    Width = 223
+    Anchors = [akLeft, akRight, akBottom]
+    OnChange = ePathInfoChange
+    TabOrder = 4
+    Text = 'ePathInfo'
+  end
+  object cbEnabled: TComboBox
+    Left = 60
+    Height = 21
+    Top = 203
+    Width = 223
+    Anchors = [akLeft, akRight, akBottom]
+    AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
+    ItemHeight = 13
+    Items.Strings = (
+      'False'
+      'True'
+    )
+    OnChange = cbEnabledChange
+    Style = csDropDownList
+    TabOrder = 5
+  end
+  object ActionList1: TActionList
+    OnUpdate = ActionList1Update
+    left = 24
+    top = 40
+    object ac_Add: TAction
+      Caption = '&Add'
+      DisableIfNoHandler = True
+      OnExecute = bAddClick
+    end
+    object ac_Remove: TAction
+      Caption = '&Remove'
+      DisableIfNoHandler = True
+      OnExecute = bDeleteClick
+    end
+    object ac_Close: TAction
+      Caption = 'ac_Close'
+      DisableIfNoHandler = True
+      OnExecute = ac_CloseExecute
+      ShortCut = 27
+    end
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fDispatchersEditorForm.lrs b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fDispatchersEditorForm.lrs
new file mode 100644
index 0000000..95bac1a
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fDispatchersEditorForm.lrs	
@@ -0,0 +1,178 @@
+{ This is an automatically generated lazarus resource file }
+
+LazarusResources.Add('TDispatchersEditorForm','FORMDATA',[
+  'TPF0'#22'TDispatchersEditorForm'#21'DispatchersEditorForm'#4'Left'#3'z'#1#6
+  +'Height'#3#253#0#3'Top'#3#245#0#5'Width'#3' '#1#18'HorzScrollBar.Page'#3#31#1
+  +#18'VertScrollBar.Page'#3#252#0#13'ActiveControl'#7#8'ListView'#11'BorderSty'
+  +'le'#7#12'bsToolWindow'#7'Caption'#6#18'Dispatchers Editor'#12'ClientHeight'
+  +#3#253#0#11'ClientWidth'#3' '#1#11'Font.Height'#2#245#9'Font.Name'#6#6'Tahom'
+  +'a'#8'Position'#7#14'poScreenCenter'#0#6'TLabel'#6'Label1'#4'Left'#2#4#6'Hei'
+  +'ght'#2#16#3'Top'#3#183#0#5'Width'#2'2'#7'Anchors'#11#6'akLeft'#8'akBottom'#0
+  +#7'Caption'#6#8'Message:'#11'ParentColor'#8#0#0#6'TLabel'#6'Label3'#4'Left'#2
+  +#4#6'Height'#2#16#3'Top'#3#207#0#5'Width'#2'.'#7'Anchors'#11#6'akLeft'#8'akB'
+  +'ottom'#0#7'Caption'#6#8'Enabled:'#11'ParentColor'#8#0#0#6'TLabel'#11'lblPat'
+  +'hInfo'#4'Left'#2#4#6'Height'#2#16#3'Top'#3#231#0#5'Width'#2'4'#7'Anchors'#11
+  +#6'akLeft'#8'akBottom'#0#7'Caption'#6#10'Path Info:'#11'ParentColor'#8#0#0#9
+  +'TListView'#8'ListView'#4'Left'#2#4#6'Height'#3#132#0#3'Top'#2#5#5'Width'#3
+  +#23#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#7'Columns'#14
+  +#1#7'Caption'#6#7'Enabled'#5'Width'#2'F'#0#1#7'Caption'#6#7'Message'#5'Width'
+  +#3#150#0#0#1#8'AutoSize'#9#7'Caption'#6#9'Path Info'#0#0#11'ColumnClick'#8#13
+  +'HideSelection'#8#8'ReadOnly'#9#9'RowSelect'#9#8'TabOrder'#2#0#9'ViewStyle'#7
+  +#8'vsReport'#12'OnSelectItem'#7#18'ListViewSelectItem'#0#0#7'TBitBtn'#4'bAdd'
+  +#4'Left'#2'x'#6'Height'#2#25#3'Top'#3#146#0#5'Width'#2'K'#6'Action'#7#6'ac_A'
+  +'dd'#7'Anchors'#11#7'akRight'#8'akBottom'#0#10'Glyph.Data'#10':'#6#0#0'6'#6#0
+  +#0'BM6'#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0' '#0#0#0#16#0#0#0#1#0#24#0#0#0#0#0#0
+  +#6#0#0'"'#11#0#0'"'#11#0#0#0#0#0#0#0#0#0#0#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#3']'#5#3']'#5#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'hhhhhh'#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#3']'#5'['#247#145#5#140#13
+  +#3']'#5#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'hhh'#223#223#223#128#128
+  +#128'hhh'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#3']'#5'['#247#145#5
+  +#149#14#3']'#5#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'hhh'#223#223#223
+  +#132#132#132'hhh'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#3']'#5'['#247
+  +#145#5#146#13#3']'#5#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'hhh'#223#223
+  +#223#131#131#131'hhh'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#3']'#5'['
+  +#247#145#6#149#15#3']'#5#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'hhh'
+  +#223#223#223#133#133#133'hhh'#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#3']'#5#3']'#5#3']'#5#3']'#5#3']'#5'['#247
+  +#145#12#156#24#3']'#5#3']'#5#3']'#5#3']'#5#3']'#5#255#0#255#255#0#255#255#0
+  +#255#255#0#255'hhhhhhhhhhhhhhh'#223#223#223#140#140#140'hhhhhhhhhhhhhhh'#255
+  +#0#255#255#0#255#255#0#255#3']'#5'['#247#145';'#218'i0'#207'W*'#198'M!'#184
+  +'<'#23#166'+'#17#159'!'#13#158#28#10#154#21#6#146#14#5#147#13#5#139#13#3']'#5
+  +#255#0#255#255#0#255'hhh'#223#223#223#196#196#196#185#185#185#178#178#178#167
+  +#167#167#153#153#153#146#146#146#143#143#143#138#138#138#131#131#131#131#131
+  +#131'hhh'#255#0#255#255#0#255#3']'#5'['#247#145'['#247#145'['#247#145'['
+  +#247#145'['#247#145'['#247#145#24#169'/['#247#145'['#247#145'['#247#145'['
+  +#247#145'['#247#145#3']'#5#255#0#255#255#0#255'hhh'#223#223#223#223#223#223
+  +#223#223#223#223#223#223#223#223#223#223#223#223#155#155#155#223#223#223#223
+  +#223#223#223#223#223#223#223#223#223#223#223'hhh'#255#0#255#255#0#255#255#0
+  +#255#3']'#5#3']'#5#3']'#5#3']'#5#3']'#5'['#247#145'%'#188'B'#3']'#5#3']'#5#3
+  +']'#5#3']'#5#3']'#5#255#0#255#255#0#255#255#0#255#255#0#255'hhhhhhhhhhhhhhh'
+  +#223#223#223#171#171#171'hhhhhhhhhhhhhhh'#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#3']'#5'['#247#145'0'#206'W'#3']'
+  +#5#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255'hhh'#223#223#223#185#185#185
+  ,'hhh'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#3']'#5'['#247#145';'#217
+  +'h'#3']'#5#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'hhh'#223#223#223#195
+  +#195#195'hhh'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#3']'#5'['#247#145'H'
+  +#235''#3']'#5#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'hhh'#223#223#223
+  +#209#209#209'hhh'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#3']'#5'['#247
+  +#145'['#247#145#3']'#5#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'hhh'#223
+  +#223#223#223#223#223'hhh'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#3']'#5#3']'#5#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255'hhhhhh'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#9'NumGlyphs'#2#2#8'TabOrder'#2#1#0#0#7'TB'
+  +'itBtn'#7'bDelete'#4'Left'#3#199#0#6'Height'#2#25#3'Top'#3#146#0#5'Width'#2
+  +'T'#6'Action'#7#9'ac_Remove'#7'Anchors'#11#7'akRight'#8'akBottom'#0#10'Glyph'
+  +'.Data'#10':'#6#0#0'6'#6#0#0'BM6'#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0' '#0#0#0#16
+  +#0#0#0#1#0#24#0#0#0#0#0#0#6#0#0'"'#11#0#0'"'#11#0#0#0#0#0#0#0#0#0#0#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#1#4#162#1#4
+  +#162#1#4#162#1#4#162#1#4#162#1#4#162#1#4#162#1#4#162#1#4#162#1#4#162#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'yyyyyyyyyyyyyyyyyyyyy'
+  +'yyyyyyyyy'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#1#4#162'Y'#131
+  +#255#0'&'#255#0'0'#255#0'0'#251#0'/'#242#0'/'#233#0'.'#225#0'0'#216#0'1'#208
+  +#0'4'#203#1#4#162#255#0#255#255#0#255#255#0#255#255#0#255'yyy'#212#212#212
+  +#167#167#167#167#167#167#165#165#165#161#161#161#156#156#156#152#152#152#148
+  +#148#148#144#144#144#141#141#141'yyy'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#1#4#162#171#194#255'd'#128#255'f'#136#255'f'#136#255'f'#135#250'g'#135#245
+  +'g'#135#240'Wy'#233'Mp'#228'Mt'#226#1#4#162#255#0#255#255#0#255#255#0#255#255
+  +#0#255'yyy'#253#253#253#217#217#217#218#218#218#218#218#218#216#216#216#214
+  +#214#214#211#211#211#200#200#200#192#192#192#191#191#191'yyy'#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#1#4#162#1#4#162#1#4#162#1#4#162#1#4#162#1
+  ,#4#162#1#4#162#1#4#162#1#4#162#1#4#162#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255'yyyyyyyyyyyyyyyyyyyyyyyyyyyyyy'#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#9'NumGlyphs'#2#2#8'Ta'
+  +'bOrder'#2#2#0#0#9'TComboBox'#9'cbMessage'#4'Left'#2'<'#6'Height'#2#21#3'Top'
+  +#3#179#0#5'Width'#3#223#0#7'Anchors'#11#6'akLeft'#7'akRight'#8'akBottom'#0#16
+  +'AutoCompleteText'#11#22'cbactEndOfLineComplete'#20'cbactSearchAscending'#0
+  +#10'ItemHeight'#2#13#8'OnChange'#7#15'cbMessageChange'#5'Style'#7#14'csDropD'
+  +'ownList'#8'TabOrder'#2#3#0#0#5'TEdit'#9'ePathInfo'#4'Left'#2'<'#6'Height'#2
+  +#21#3'Top'#3#227#0#5'Width'#3#223#0#7'Anchors'#11#6'akLeft'#7'akRight'#8'akB'
+  +'ottom'#0#8'OnChange'#7#15'ePathInfoChange'#8'TabOrder'#2#4#4'Text'#6#9'ePat'
+  +'hInfo'#0#0#9'TComboBox'#9'cbEnabled'#4'Left'#2'<'#6'Height'#2#21#3'Top'#3
+  +#203#0#5'Width'#3#223#0#7'Anchors'#11#6'akLeft'#7'akRight'#8'akBottom'#0#16
+  +'AutoCompleteText'#11#22'cbactEndOfLineComplete'#20'cbactSearchAscending'#0
+  +#10'ItemHeight'#2#13#13'Items.Strings'#1#6#5'False'#6#4'True'#0#8'OnChange'#7
+  +#15'cbEnabledChange'#5'Style'#7#14'csDropDownList'#8'TabOrder'#2#5#0#0#11'TA'
+  +'ctionList'#11'ActionList1'#8'OnUpdate'#7#17'ActionList1Update'#4'left'#2#24
+  +#3'top'#2'('#0#7'TAction'#6'ac_Add'#7'Caption'#6#4'&Add'#18'DisableIfNoHandl'
+  +'er'#9#9'OnExecute'#7#9'bAddClick'#0#0#7'TAction'#9'ac_Remove'#7'Caption'#6#7
+  +'&Remove'#18'DisableIfNoHandler'#9#9'OnExecute'#7#12'bDeleteClick'#0#0#7'TAc'
+  +'tion'#8'ac_Close'#7'Caption'#6#8'ac_Close'#18'DisableIfNoHandler'#9#9'OnExe'
+  +'cute'#7#15'ac_CloseExecute'#8'ShortCut'#2#27#0#0#0#0
+]);
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fDispatchersEditorForm.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fDispatchersEditorForm.pas
new file mode 100644
index 0000000..ac431b9
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fDispatchersEditorForm.pas	
@@ -0,0 +1,271 @@
+unit fDispatchersEditorForm;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+
+uses
+  {$IFDEF FPC}LCLIntf, LResources,{$ENDIF}
+  {$IFDEF MSWINDOWS}Windows,{$ENDIF}
+  Messages, SysUtils, Classes, Graphics, Controls, Forms,
+  Dialogs, StdCtrls, Buttons, ComCtrls,
+  uROClient, uROServer, uROHTTPDispatch, ActnList;
+
+type
+  TDispatchersEditorForm = class(TForm)
+    ListView: TListView;
+    bAdd: TBitBtn;
+    bDelete: TBitBtn;
+    cbMessage: TComboBox;
+    Label1: TLabel;
+    Label3: TLabel;
+    lblPathInfo: TLabel;
+    ePathInfo: TEdit;
+    cbEnabled: TComboBox;
+    ActionList1: TActionList;
+    ac_Add: TAction;
+    ac_Remove: TAction;
+    ac_Close: TAction;
+    procedure bDeleteClick(Sender: TObject);
+    procedure bAddClick(Sender: TObject);
+    procedure ListViewSelectItem(Sender: TObject; Item: TListItem;
+      Selected: Boolean);
+    procedure cbMessageChange(Sender: TObject);
+    procedure cbEnabledChange(Sender: TObject);
+    procedure ePathInfoChange(Sender: TObject);
+    procedure ActionList1Update(Action: TBasicAction;
+      var Handled: Boolean);
+    procedure ac_CloseExecute(Sender: TObject);
+  private
+    fInChange: boolean;
+    fServer : TROServer;
+    fShowPathInfo,
+    fSelectingItem : boolean;
+
+    procedure LoadMessages;
+    procedure RefreshDispatchers;
+    procedure SetShowPathInfo(const Value: boolean);
+    function GetDispatchers: TROMessageDispatchers;
+    procedure SetServer(const Value: TROServer);
+    function GetDispatcher: TROMessageDispatcher;
+
+  public
+    constructor Create(aServer : TROServer); reintroduce;
+    destructor Destroy; override;
+
+    property Server : TROServer read fServer write SetServer;
+    property Dispatchers : TROMessageDispatchers read GetDispatchers;
+    property Dispatcher : TROMessageDispatcher read GetDispatcher;
+  end;
+
+var
+  DispatchersEditorForm: TDispatchersEditorForm;
+
+implementation
+{$IFNDEF FPC}
+{$R *.dfm}
+{$ENDIF}
+
+const BoolStrs : array[boolean] of string = ('False', 'True');
+
+{ TDispatchersEditorForm }
+
+constructor TDispatchersEditorForm.Create(aServer : TROServer);
+begin
+  inherited Create(NIL);
+
+  fSelectingItem := FALSE;
+  Server := aServer;
+  RefreshDispatchers;
+
+  if ListView.Items.Count > 0 then
+    ListView.Items[0].Selected := true;
+end;
+
+destructor TDispatchersEditorForm.Destroy;
+begin
+  inherited;
+end;
+
+procedure TDispatchersEditorForm.RefreshDispatchers;
+var idx, i : integer;
+    item   : TListItem;
+begin
+  if fSelectingItem then Exit;
+
+  if (ListView.Selected<>NIL)
+    then idx := ListView.Selected.Index
+    else idx := -1;
+
+  ListView.Items.Clear;
+  for i := 0 to (Dispatchers.Count-1) do begin
+    item := ListView.Items.Add;
+    item.Caption := BoolStrs[Dispatchers[i].Enabled];
+    item.SubItems.Add(Dispatchers[i].Name);
+
+    if fShowPathInfo
+      then item.SubItems.Add(TROHTTPDispatcher(Dispatchers[i]).PathInfo);
+  end;
+
+  if (idx>=0) and (idx<ListView.Items.Count)
+    then ListView.Items[idx].Selected := TRUE
+end;
+
+procedure TDispatchersEditorForm.SetShowPathInfo(const Value: boolean);
+begin
+  ePathInfo.Visible := Value;
+  lblPathInfo.Visible := Value;
+  if not Value then ListView.Columns[ListView.Columns.Count-1].Free;
+
+  fShowPathInfo := Value;
+end;
+
+procedure TDispatchersEditorForm.bDeleteClick(Sender: TObject);
+begin
+  if (ListView.Selected=NIL) then Exit;
+  Dispatchers.Delete(ListView.Selected.Index);
+  RefreshDispatchers;
+end;
+
+procedure TDispatchersEditorForm.bAddClick(Sender: TObject);
+begin
+  if (Dispatchers.Count>0) and not Dispatchers.SupportsMultipleDispatchers
+    then MessageDlg(Server.ClassName+' only supports one dispatcher', mtWarning, [mbOK],0)
+
+  else begin
+    Dispatchers.Add;
+    RefreshDispatchers;
+    ListView.Items[ListView.Items.Count-1].Selected := true;
+  end;
+end;
+
+procedure TDispatchersEditorForm.ListViewSelectItem(Sender: TObject;
+  Item: TListItem; Selected: Boolean);
+begin
+  fSelectingItem := TRUE;
+  try
+    if (Dispatcher<>NIL) then
+      with Dispatcher do begin
+        cbEnabled.ItemIndex := Ord(Enabled);
+
+        if (Message<>NIL)
+          then cbMessage.ItemIndex := cbMessage.Items.IndexOf(Message.Name)
+          else cbMessage.ItemIndex := 0;
+
+        if fShowPathInfo
+          then ePathInfo.Text := TROHTTPDispatcher(Dispatcher).PathInfo;
+      end;
+
+  finally
+    fSelectingItem := FALSE;
+  end;
+end;
+
+function TDispatchersEditorForm.GetDispatchers: TROMessageDispatchers;
+begin
+  result := fServer.Dispatchers;
+end;
+
+procedure TDispatchersEditorForm.LoadMessages;
+var i : integer;
+begin
+  cbMessage.Items.Clear;
+
+  cbMessage.Items.Add('-');  
+  with fServer.Owner do
+    for i := 0 to (ComponentCount-1) do begin
+      if (Components[i] is TROMessage) then cbMessage.Items.Add(TROMessage(Components[i]).Name);
+    end;
+end;
+
+procedure TDispatchersEditorForm.SetServer(const Value: TROServer);
+begin
+  fServer := Value;
+  if (Value=NIL) then Exit; // Just in case...
+
+  Caption := fServer.Name+' Dispatchers';
+
+  SetShowPathInfo(Dispatchers is TROHTTPMessageDispatchers);
+  LoadMessages;
+end;
+
+procedure TDispatchersEditorForm.cbMessageChange(Sender: TObject);
+begin
+  if (Dispatcher=NIL) then Exit;
+
+  if (cbMessage.Text<>'-')
+    then Dispatcher.Message := TROMessage(fServer.Owner.FindComponent(cbMessage.Text))
+    else Dispatcher.Message := NIL;
+
+  RefreshDispatchers;
+end;
+
+procedure TDispatchersEditorForm.cbEnabledChange(Sender: TObject);
+begin
+  if (Dispatcher=NIL) then Exit;
+
+  Dispatcher.Enabled := boolean(Ord(cbEnabled.ItemIndex));
+
+  RefreshDispatchers;
+end;
+
+procedure TDispatchersEditorForm.ePathInfoChange(Sender: TObject);
+begin
+  if fInChange then exit;
+
+  fInChange := true;
+  try
+
+    if (Dispatcher=NIL) then Exit;
+    TROHTTPDispatcher(Dispatcher).PathInfo := ePathInfo.Text;
+    //ePathInfo.Text := TROHTTPDispatcher(Dispatcher).PathInfo;
+    //1.0.4: read back PathInfo value, because the Dispatcher might adjust it.
+
+    RefreshDispatchers;
+  finally
+    fInChange := false;
+  end;
+end;
+
+function TDispatchersEditorForm.GetDispatcher: TROMessageDispatcher;
+begin
+  if (ListView.Selected=NIL)
+    then result := NIL
+    else result := Dispatchers[ListView.Selected.Index];
+end;
+
+procedure TDispatchersEditorForm.ActionList1Update(Action: TBasicAction;
+  var Handled: Boolean);
+begin
+  ac_Remove.Enabled := Assigned(ListView.Selected);
+  cbMessage.Enabled := ac_Remove.Enabled;
+  ePathInfo.Enabled := ac_Remove.Enabled;
+  cbEnabled.Enabled := ac_Remove.Enabled;
+end;
+
+procedure TDispatchersEditorForm.ac_CloseExecute(Sender: TObject);
+begin
+  Close();
+end;
+
+{$IFDEF FPC}
+initialization
+  {$I fDispatchersEditorForm.lrs}
+{$ENDIF FPC}
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fNewProjectForm.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fNewProjectForm.dfm
new file mode 100644
index 0000000..0b65bb6
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fNewProjectForm.dfm	
@@ -0,0 +1,3385 @@
+object NewProjectForm: TNewProjectForm
+  Left = 338
+  Top = 184
+  BorderIcons = [biSystemMenu]
+  BorderStyle = bsDialog
+  Caption = 'New RemObjects SDK Server'
+  ClientHeight = 412
+  ClientWidth = 500
+  Color = clBtnFace
+  Constraints.MinHeight = 238
+  Constraints.MinWidth = 300
+  ParentFont = True
+  OldCreateOrder = False
+  Position = poScreenCenter
+  PixelsPerInch = 96
+  TextHeight = 13
+  object Bevel1: TBevel
+    Left = 4
+    Top = 372
+    Width = 494
+    Height = 2
+    Anchors = [akLeft, akRight, akBottom]
+  end
+  object Image2: TImage
+    Left = 0
+    Top = 0
+    Width = 500
+    Height = 64
+    Align = alTop
+    AutoSize = True
+    Picture.Data = {
+      07544269746D617036770100424D36770100000000003600000028000000F401
+      000040000000010018000000000000770100C01E0000C01E0000000000000000
+      0000858585858585858585858585858585858585858585858585858585858585
+      8585858484848484848484848484848484848484848484848484848484848484
+      8484848483838383838383838383838383838383838383838383838383838383
+      8383838383838383838383828282828282828282828282828282828282828282
+      8282828282828282828282828181818181818181818181818181818181818181
+      8181818181818181818181818181818180808081818181818180808080808080
+      80808080808080808080808080808080808080808080807F7F7F7F7F7F7F7F7F
+      7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7E7E7E7E7E7E7E7E7E7E7E7E7F7F7F7F7F
+      7F7F7F7F7F7F7F7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E
+      7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7D7D7D7D7D7D7D7D7D7D7D7D
+      7C7C7C7C7C7C7B7B7B7A7A7A7979797979797878787878787777777676767575
+      757575757474747575757474747474747474746A7CC3677FDD677FDD6880DC69
+      80DD6981DD6A81DC6A81DC6B82DC6B82DC6C82DC6C83DC6E83D6808495878787
+      8B8B8B8D8D8D8F8F8F9090909191919292929292929292929292929191919191
+      919090909090909090908F8F8F8F8F8F8F8F8F8F8F8F8F8F8F90909091919191
+      9191929292929292929292949494949494959595969696969696979797979797
+      9898989A9A9A9A9A9A9A9A9A9B9B9B9C9C9C9D9D9D9D9D9D9E9E9E9F9F9FA0A0
+      A0A0A0A0A2A2A2A2A2A2A2A2A2A3A3A3A5A5A5A5A5A5A6A6A6A7A7A7A8A8A8A8
+      A8A8A9A9A9A9A9A9ABABABACACACACACACAEAEAEAFAFAFB0B0B0B2B2B2B3B3B3
+      B5B5B5B6B6B6B7B7B7B9B9B9BABABABBBBBBBCBCBCBDBDBDBEBEBEBFBFBFBFBF
+      BFC0C0C0C0C0C0C1C1C1C2C2C2C2C2C2C2C2C2C2C2C2C3C3C3C3C3C3C4C4C4C4
+      C4C4C5C5C5C5C5C5C6C6C6C6C6C6C7C7C7C7C7C7C8C8C8C8C8C8C9C9C9CACACA
+      CBCBCBCBCBCBCCCCCCCCCCCCCDCDCDCECECECECECECFCFCFD0D0D0D1D1D1D1D1
+      D1D2D2D2D2D2D2D2D2D2D3D3D3D3D3D3D4D4D4D4D4D4D4D4D4D4D4D4D4D4D4D4
+      D4D4D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D6D6D6D6D6D6D6D6D6D6D6D6D6D6D6
+      D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8D8D8D8D8D8D8D8D8D8D8D8
+      D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADA
+      DADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDCDCDCDCDCDC
+      DCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFE0
+      E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1
+      E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBECECECECECECECECECECECECECECECECECECEDEDEDECECECEDEDEDEDED
+      EDEDEDEDEDEDEDEEEEEEEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F5F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78686
+      8685858585858585858585858585858585858585858585858585858585858585
+      8585848484848484848484848484848484848484848484848484848484848484
+      8484848383838383838383838383838383838383838383838383838383838383
+      8383838383838383838382828282828283838382828282828282828282828282
+      8282828282828282828282818181818181818181818181818181818181818181
+      8181818181818181818181818181818181818181818080808080808080808080
+      808080808080808080808080808080808080808080807F7F7F7F7F7F7F7F7F80
+      80808080807F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F8080808080807F7F7F
+      7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7E7E7E7E7E7E7F7F7F7F7F7F7F7F7F7E7E
+      7E7E7E7E7F7F7F7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7D7D7D7D7D7D7D7D7D7C
+      7C7C7C7C7C7B7B7B7A7A7A7A7A7A797979797979787878777777767676767676
+      7575757676767676767575757575757377896880DD6880DD6981DD6981DD6A81
+      DD6A82DD6B82DD6A82DD6C83DD6D83DD6D83DC6E84DC7084D77F87A88C8C8C8E
+      8E8E919191919191939393939393949494949595959696969797959797969898
+      9698989596969495959394949293939191919191919191919292929292929393
+      939393939393939494949595959595959797979797979898989898989999999A
+      9A9A9B9B9B9C9C9C9D9D9D9D9D9D9E9E9E9E9E9E9F9F9FA0A0A0A0A0A0A1A1A1
+      A2A2A2A3A3A3A4A4A4A4A4A4A5A5A5A6A6A6A7A7A7A8A8A8A8A8A8A9A9A9AAAA
+      AAABABABACACACADADADADADADAEAEAEAFAFAFB1B1B1B1B2BAB0B3C1AFB3C7B0
+      B4C9B2B6CAB2B6CAB4B7CAB5B8CAB8BAC6BBBCC3BFBFC0C0C0C0C0C0C0C1C1C1
+      C1C1C1C3C3C3C3C3C3C3C3C3C4C4C4C4C4C4C4C4C4C4C4C4C6C6C6C5C5C5C6C6
+      C6C6C6C6C7C7C7C7C7C7C8C8C8C9C9C9C9C9C9C9C9C9CACACACCCCCCCCCCCCCC
+      CCCCCDCDCDCECECECECECECFCFCFCFCFCFD0D0D0D1D1D1D2D2D2D3D3D3D3D3D3
+      D3D3D3D3D3D3D4D4D4D4D4D4D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D6D6
+      D6D6D6D6D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8
+      D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D9D9D9D8D8D8
+      D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9DADADAD9D9D9DADADADADADADADADADADA
+      DADADADADBDBDBDBDBDBDBDBDBDBDBDBDCDCDCDBDBDBDCDCDCDCDCDCDCDCDCDD
+      DDDDDCDCDCDDDDDDDEDEDEDDDDDDDEDEDEDEDEDEDDDDDDDDDDDDDEDEDEDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFE0E0E0E0E0E0E0E0
+      E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E2
+      E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAE9E9E9EAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECEC
+      ECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F3
+      F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7868686868686
+      8686868686868686868585858585858686868686868686868585858585858585
+      8585858585858585858585858585858584848485858585858584848484848484
+      8484848484848484848484848484848484848484848484848484838383838383
+      8383838383838383838383838383838383838383838383838383838282828282
+      8282828282828282828282828282828282828282828282828282828281818181
+      8181818181818181818181818181818181818181818181818181818181818181
+      8181818181818181818181818080808080808080808080808080808080808080
+      808080807F7F7F8080808080808080807F7F7F8080808080808080807F7F7F7F
+      7F7F7F7F7F7F7F7F8080808080807F7F7F8080808080808080808080807F7F7F
+      8080808080807F7F7F7F7F7F7E7E7E7F7F7F7E7E7E7E7E7E7E7E7E7D7D7D7D7D
+      7D7C7C7C7B7B7B7B7B7B7A7A7A79797979797979797978787877777777777776
+      76767676767676767676767676766E7CB06981DE6980DD6A82DE6B82DD6B82DD
+      6B82DD6C83DD6C83DE6D84DC6E84DD6E85DD6F85DD6F85DC8089AF8F8F8F9191
+      919393939393939494949797979899999A9C9C9B9E9E9EA1A19FA3A39FA3A39E
+      A2A29C9F9F999B9B969898949595929393919191919191929292939393939393
+      9494949595959595959696969797979797979898989898989A9A9A9B9B9B9B9B
+      9B9C9C9C9C9C9C9D9D9D9E9E9E9F9F9F9F9F9FA0A0A0A0A0A0A1A1A1A3A3A3A3
+      A3A3A4A4A4A4A4A4A5A5A5A6A6A6A7A7A7A8A8A8A8A8A8A9A9A9A9A9A9ACACAC
+      ACACACADADADAEAEAEAEAFB3ABAFC3AAAFCDABB1D0ACB2CFAEB3CFAEB3CFB0B5
+      D0B1B6CFB2B6CFB2B7CFB3B8CFB4B8CFB6BAD0BABCCBBEBFC5C1C1C1C2C2C2C2
+      C2C2C3C3C3C3C3C3C4C4C4C4C4C4C4C4C4C5C5C5C6C6C6C6C6C6C6C6C6C6C6C6
+      C7C7C7C8C8C8C9C9C9C8C8C8CACACACACACACACACACCCCCCCCCCCCCCCCCCCDCD
+      CDCECECECECECECFCFCFD0D0D0D0D0D0D0D0D0D1D1D1D3D3D3D3D3D3D3D3D3D3
+      D3D3D4D4D4D4D4D4D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D6D6D6
+      D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8D8D8
+      D8D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADA
+      DADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDCDCDC
+      DCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDDDD
+      DDDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDF
+      DFDFDFDFDFE0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3
+      E3E3E3E3E2E2E2E3E3E3E4E4E4E3E3E3E4E4E4E3E3E3E3E3E3E5E5E5E4E4E4E4
+      E4E4E5E5E5E4E4E4E5E5E5E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECEC
+      ECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEEEEEE
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F2F2F2F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7
+      F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F787878787878787878786
+      8686868686868686868686868686868686868686868686858585858585858585
+      8585858585858585858585858585858585858585858585858484848484848484
+      8484848484848484848484848484848484848484848484848483838383838383
+      8383838383838383838383838383838383838383838383838383838383828282
+      8282828282828282828282828282828282828282828282828282828181818181
+      8181818182828282828281818181818181818181818181818181818181818181
+      8181818181818181828282808080808080808080808080808080808080808080
+      8080808080808080808080808080808080808080808080808080808080808181
+      8181818180808080808081818181818181818181818181818181818181818181
+      81818080808080808080807F7F7F7F7F7F7E7E7E7E7E7E7E7E7E7D7D7D7C7C7C
+      7C7C7C7B7B7B7B7B7B7A7A7A7979797979797878787777777878787777777777
+      7776767676767677777777787E6A80D76A81DD6B82DE6B83DD6B83DD6C83DD6D
+      84DE6E84DD6E84DD6E84DD6F85DD6F85DD7086DC7086DC7C8ABF919191939393
+      9494949697979899999C9E9EA0A4A4A5ABABA9B1B1ACB5B5ACB5B5ACB4B4A7AF
+      AFA3A9A99EA3A39A9D9D96989895969694949493939394949494949495959595
+      95959696969797979797979898989999999999999A9A9A9B9B9B9C9C9C9C9C9C
+      9D9D9D9F9F9F9F9F9F9F9F9FA0A0A0A0A0A0A1A1A1A2A2A2A3A3A3A4A4A4A4A4
+      A4A5A5A5A7A7A7A7A7A7A8A8A8A8A8A8A9A9A9AAAAAAAAAAAAACACACADADADAD
+      AEB2AAAFC4A9AFD0AAB0D0AAB0D0ACB2D0AEB3D0AEB3D0AFB4D0B0B5D0B2B7D0
+      B3B7D0B3B8D0B4B8D0B5B9D0B6BAD0B7BAD0B7BBD0BABDCEBFC0C5C2C2C2C3C3
+      C3C4C4C4C4C4C4C4C4C4C4C4C4C5C5C5C6C6C6C6C6C6C6C6C6C6C6C6C7C7C7C7
+      C7C7C9C9C9CACACACACACACACACACBCBCBCCCCCCCCCCCCCDCDCDCDCDCDCECECE
+      CFCFCFCFCFCFD0D0D0D0D0D0D1D1D1D2D2D2D3D3D3D3D3D3D3D3D3D4D4D4D4D4
+      D4D4D4D4D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D6D6D6D6D6D6D6
+      D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8D8D8D8D8D8D8
+      D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADADA
+      DADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDCDCDCDC
+      DCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDF
+      DFDFDFDFE0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECEC
+      ECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F2F2F2F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F5F5F5F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7
+      F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78787878787878787878787878686
+      8686868686868686868686868686868686868686868686868686868686868685
+      8585858585858585858585858585858585858585858585858585858585858585
+      8484848484848484848585858585858484848484848484848484848484848484
+      8484848484848484848483838384848483838383838383838383838383838383
+      8383838383838383828282838383838383828282828282828282828282828282
+      8282828383838282828282828282828282828181818181818181818282828181
+      8181818181818181818181818181818181818181818181818181818181818181
+      8181818181818181818181808080818181818181828282828282818181828282
+      8282828282828282828282828282828282828282828282828282828282828282
+      828181818181818080808080807F7F7F7F7F7F7E7E7E7E7E7E7E7E7E7D7D7D7C
+      7C7C7C7C7C7B7B7B7B7B7B7A7A7A7A7A7A797979787878787878777777777777
+      787878777777787878727CA56B82DE6B83DE6C83DE6C83DE6C84DE6E84DE6E84
+      DD6E85DE6F85DD6F85DD7086DD7086DD7086DC7287DC7889CE91929894949497
+      97979A9C9C9FA3A3A6ACACAFB8B8B5C0C0BAC7C7BCCACABBC9C9B7C3C3B0BBBB
+      A9B1B1A2A7A79B9E9E9698989494949393939494949595959595959595959696
+      969797979797979898989999999A9A9A9B9B9B9B9B9B9C9C9C9D9D9D9D9D9D9F
+      9F9F9F9F9F9F9F9FA0A0A0A1A1A1A1A1A1A2A2A2A3A3A3A4A4A4A4A4A4A5A5A5
+      A6A6A6A7A7A7A8A8A8A8A8A8A9A9A9AAAAAAABABABACACACAAADBDA8AECEA8AF
+      D0AAB0D0AAB0D0ABB1D0ADB3D0AEB3D0AEB4D0AFB4D0B1B6D1B2B7D0B3B7D0B3
+      B8D0B4B9D0B5B9D0B7BBD1B8BCD1B8BCD1BABDD0BBBED0BEC0CDC4C4C5C5C5C5
+      C5C5C5C5C5C5C6C6C6C6C6C6C6C6C6C7C7C7C8C8C8C8C8C8C8C8C8C8C8C8CACA
+      CACACACACBCBCBCBCBCBCBCBCBCDCDCDCDCDCDCDCDCDCECECECFCFCFD0D0D0D0
+      D0D0D1D1D1D1D1D1D2D2D2D3D3D3D4D4D4D4D4D4D4D4D4D5D5D5D5D5D5D5D5D5
+      D5D5D5D6D6D6D6D6D6D6D6D6D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D6D6D6D7D7
+      D7D8D8D8D8D8D8D7D7D7D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9
+      D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADADADADADADA
+      DADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDCDCDCDCDCDCDCDCDCDCDC
+      DCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDEDEDEDEDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFE0E0E0
+      E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E2E2
+      E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7
+      E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBECECECECECECECECECECECECEDEDEDECECECEDEDEDEDEDEDECECECEDEDEDED
+      EDEDEDEDEDECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7888888888888878787878787888888878787
+      8787878787878787878787878787878787878787878686868686868686868686
+      8686868686868686868686868686868686868686868685858585858585858585
+      8585858585858585858585858585858585858585858585848484848484848484
+      8484848484848484848484848484848484848484848484848383838383838383
+      8383838383838383838383838383838383838383838383838382828282828283
+      8383838383838383828282828282828282828282828282828282828282828282
+      8282828282828282828181818181818282828181818181818181818181818181
+      8181818181818182828281818182828282828283838382828282828282828283
+      8383838383848484848484838383838383838383848484838383838383838383
+      8383838282828181818181818080807F7F7F7E7E7E7E7E7E7D7D7D7D7D7D7C7C
+      7C7C7C7C7B7B7B7A7A7A7A7A7A79797979797979797978787878787878787878
+      78787878787979796D82D26C83DE6C84DE6C83DE6C84DE6D84DE6F85DE6F85DE
+      7086DD7086DD7187DD7187DD7287DD7287DC7388DD778AD38D91A19697979B9D
+      9DA3A7A7ACB4B44F446B41335E41335E41335E41335E5A52769095A6B7C4C4AC
+      B5B5A2A8A89B9E9E979898959595959595959595969696979797979797989898
+      9999999999999A9A9A9A9A9A9C9C9C9C9C9C9D9D9D9E9E9E9E9E9E9F9F9FA0A0
+      A0A0A0A0A1A1A1A2A2A2A2A2A2A3A3A3A4A4A4A5A5A5A5A5A5A6A6A6A6A6A6A8
+      A8A8A8A8A8A9A9A9AAAAAAABABABABABABA8ADC3A7AED2A7AED1A8AFD0AAB1D1
+      AAB1D0ABB1D0ADB3D0AEB4D1AFB5D1B0B5D1B1B6D1B3B8D1B3B8D1B5B9D1B5B9
+      D1B6BAD0B7BBD1B8BCD1B9BDD0BABDD0BBBED0BBBED0BEC0CFC4C4C7C6C6C6C5
+      C5C5C6C6C6C7C7C7C7C7C7C7C7C7C8C8C8C8C8C8C8C8C8C9C9C9CACACACACACA
+      CBCBCBCBCBCBCCCCCCCDCDCDCDCDCDCECECECECECECFCFCFCFCFCFD0D0D0D1D1
+      D1D1D1D1D2D2D2D2D2D2D4D4D4D4D4D4D4D4D4D5D5D5D5D5D5D5D5D5D6D6D6D6
+      D6D6D6D6D6D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8
+      D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9DADA
+      DADADADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDB
+      DBDBDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDD
+      DDDDDDDDDDDDDEDEDEDDDDDDDEDEDEDEDEDEDDDDDDDEDEDEDFDFDFDEDEDEDEDE
+      DEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFE0E0E0E0E0E0E0
+      E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E2E2E2
+      E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E4E4
+      E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECEC
+      ECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F1F1F1F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F788888888888888888888888888888888888888888888
+      8888888888878787878787878787878787878787878787878787878787868686
+      8686868787878787878787878686868686868686868686868686868686868686
+      8686868686868686868686868685858585858585858585858585858585858585
+      8585858585848484858585848484848484848484848484838383848484838383
+      8383838484848484848484848484848383838484848383838383838383838383
+      8383838383838383838383838382828282828283838382828283838382828282
+      8282828282828282818181828282828282818181818181828282828282828282
+      8181818282828383838282828383838383838383838484848484848484848484
+      8484848485858585858585858585858585858585858585858584848484848483
+      83838383838282828282828181818080807F7F7F7E7E7E7E7E7E7D7D7D7D7D7D
+      7C7C7C7B7B7B7B7B7B7A7A7A7A7A7A7A7A7A7979797979797979797878787979
+      797A7A7A777D936C84DF6D84DF6D85DE6E85DE6E85DE6F85DE7086DE7087DE71
+      87DE7187DD7187DD7388DD7388DE7489DD7489DD778AD88C93AD9C9E9EA4A9A9
+      AEB7B73F32603F32603F32603F32603F32603F32603F3260716F8DB9C6C6ABB3
+      B3A1A6A69A9C9C9797979696969696969797979898989898989898989999999A
+      9A9A9A9A9A9A9A9A9C9C9C9D9D9D9D9D9D9E9E9E9E9E9EA0A0A0A0A0A0A0A0A0
+      A1A1A1A2A2A2A2A2A2A3A3A3A4A4A4A4A4A4A5A5A5A6A6A6A6A6A6A8A8A8A9A9
+      A9A9A9A9AAAAAAAAAAADA6ACCAA6AED2A7AED2A9B0D2A9B0D1AAB1D1ABB1D1AC
+      B2D1AEB3D1AEB4D1AFB5D1B0B5D1B2B7D2B3B8D1B4B9D1B4B9D1B6BAD1B7BBD1
+      B7BBD1B9BDD2BABED1BBBED1BCBFD1BDC0D2BEC1D2BFC2D1C5C6C9C7C7C7C7C7
+      C7C8C8C8C8C8C8C8C8C8C9C9C9C9C9C9CACACAC9C9C9CBCBCBCBCBCBCCCCCCCC
+      CCCCCDCDCDCECECECECECECFCFCFD0D0D0D0D0D0D0D0D0D0D0D0D2D2D2D3D3D3
+      D3D3D3D4D4D4D5D5D5D5D5D5D4D4D4D5D5D5D5D5D5D6D6D6D6D6D6D6D6D6D6D6
+      D6D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8D8D8D8D8
+      D8D8D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADA
+      DADADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDCDC
+      DCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDE
+      DEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDF
+      DFDFDFE0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E2E2E2E3
+      E3E3E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4
+      E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E8E8E8E9E9E9
+      E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECEC
+      ECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F78989898989898989898989898888888989898888888888888888
+      8888888888888888888888888888888888888887878787878787878787878786
+      8686878787878787878787878787868686878787868686868686878787868686
+      8686868686868686868686868686868686868585858585858585858585858686
+      8685858585858585858585858585858584848484848484848484848484848484
+      8484848484848484848484848484838383848484838383838383838383838383
+      8383838383838383838383838383838383838383838383838383838383838282
+      8282828283838382828282828282828282828283838382828282828282828282
+      8282838383848484838383848484848484858585858585858585868686868686
+      8686868787878787878787878787878787878787878686868585858585858585
+      858383838383838282828181818080807F7F7F7F7F7F7F7F7F7E7E7E7D7D7D7C
+      7C7C7C7C7C7B7B7B7B7B7B7A7A7A7A7A7A7A7A7A7A7A7A7979797A7A7A7A7A7A
+      7A7A7A7181BF6D84DF6E85DF6F86DF6F85DE7086DF7087DF7187DE7188DE7288
+      DE7288DE7389DE7489DD7489DD748ADD758ADD788EDE8E9ABAA1A6A6ACB4B43E
+      30633E30633E30633E30633E30633E30633E30633E3063898DA3B5C0C0A7AEAE
+      9EA1A19899999696969696969797979898989999999999999A9A9A9A9A9A9B9B
+      9B9B9B9B9D9D9D9E9E9E9E9E9E9E9E9EA0A0A0A1A1A1A1A1A1A2A2A2A2A2A2A3
+      A3A3A3A3A3A4A4A4A5A5A5A6A6A6A6A6A6A6A6A6A7A7A7A9A9A9A9A9A9AAAAAA
+      ABABABA7ACC6A6ADD2A7AFD3A9B0D3AAB1D2AAB1D2ABB2D2ACB2D2ADB3D2AFB4
+      D2AFB5D2B0B6D2B2B7D2B3B8D2B3B8D2B5BAD2B5BAD1B7BBD2B7BBD1B8BCD2B9
+      BDD2BABED1BBBED1BCBFD1BDC1D2BEC1D2BFC2D2C0C3D1C6C6C8C7C7C7C7C7C7
+      C9C9C9C8C8C8C9C9C9C9C9C9CACACACACACACBCBCBCCCCCCCCCCCCCCCCCCCDCD
+      CDCECECECECECECFCFCFCFCFCFD0D0D0D1D1D1D1D1D1D2D2D2D3D3D3D3D3D3D5
+      D5D5D5D5D5D5D5D5D5D5D5D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7
+      D7D7D7D7D7D7D8D8D8D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9
+      D9D9D9D9D9D9D9DADADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDB
+      DBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDCDCDC
+      DCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFE0
+      E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1
+      E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3
+      E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECEC
+      ECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7898989898989898989898989898989898989898989898989888888898989
+      8989898888888888888888888888888888888888888888888888888787878787
+      8787878787878787878787878787878787878786868686868687878786868686
+      8686868686868686868686868686868686868686858585858585868686868686
+      8686868585858585858585858585858585858585858484848484848585858585
+      8585858584848484848484848484848484848484848484848484848484848484
+      8484848484838383838383848484838383838383838383838383838383838383
+      8383838383838383838383838383838282828383838383838383838383838484
+      8484848485858585858585858586868686868687878788888888888889898988
+      8888898989898989898989898989888888888888888888878787878787868686
+      8585858484848383838181818080807F7F7F7F7F7F7E7E7E7E7E7E7D7D7D7C7C
+      7C7C7C7C7B7B7B7B7B7B7A7A7A7A7A7A7A7A7A7979797A7A7A7A7A7A7A7A7A7A
+      7D886E85DF6E85DF6F86DF7086DE7086DF7087DF7188DE7288DE7288DE7389DE
+      7389DE758ADE758BDE768BDD768BDD7A8EDE8095E08F9FCAA6ADAD7D7D94B2BD
+      C1C5D5D5B3C1CB58517D3C2F653C2F653C2F65453A6DBECCCCAEB7B7A2A6A69B
+      9D9D9797979898989898989898989999999A9A9A9A9A9A9B9B9B9B9B9B9D9D9D
+      9D9D9D9E9E9E9F9F9F9F9F9FA1A1A1A0A0A0A2A2A2A2A2A2A3A3A3A2A2A2A4A4
+      A4A5A5A5A5A5A5A5A5A5A6A6A6A6A6A6A7A7A7A9A9A9A9A9A9AAAAAAA7ABC1A6
+      ADD3A6AED2A8AFD3A9B0D3AAB1D2AAB1D2ABB2D2ACB2D2AEB4D3AFB5D2B0B6D2
+      B1B6D2B2B7D2B3B9D3B4B9D2B5BAD2B6BAD2B7BBD2B8BCD2B9BDD3BABED3BBBF
+      D2BCBFD2BDC0D2BDC1D2BFC2D3C0C3D3C1C3D3C3C5D1C7C8C9C8C8C8CACACAC9
+      C9C9CACACACACACACBCBCBCBCBCBCCCCCCCCCCCCCDCDCDCDCDCDCECECECFCFCF
+      CFCFCFD0D0D0D1D1D1D1D1D1D1D1D1D1D1D1D2D2D2D3D3D3D3D3D3D4D4D4D5D5
+      D5D5D5D5D6D6D6D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7
+      D7D7D7D7D7D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9
+      D9D9D9DADADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDB
+      DBDBDBDBDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDD
+      DDDDDDDDDDDDDDDDDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDF
+      DFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFE0E0E0E0E0
+      E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E2E2E2E2
+      E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9
+      E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECEC
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F5F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78A8A
+      8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8989898989898A8A8A89898989898989
+      8989888888888888888888898989888888888888888888888888878787888888
+      8888888888888888888888888888888787878787878787878787878787878787
+      8787878787878787878787878787878787878786868686868687878786868686
+      8686868686868686868686858585858585858585858585858585858585858585
+      8585858585858585858585858484848585858585858484848484848484848484
+      8484848484848484848484848484848484848484848484848484848483838384
+      8484848484838383838383838383838383838383838383848484858585858585
+      8585858686868686868787878888888888888A8A8A8989898A8A8A8A8A8A8A8A
+      8A8B8B8B8B8B8B8B8B8B8B8B8B8A8A8A8A8A8A89898988888888888887878786
+      86868484848383838181818181818080807F7F7F7F7F7F7E7E7E7D7D7D7D7D7D
+      7C7C7C7C7C7C7C7C7C7B7B7B7B7B7B7B7B7B7A7A7A7B7B7B7B7B7B7B7B7B7681
+      AE6F86DF7086DF7187DF7188DF7288DF7288DF7289DF7389DF7489DE748ADE75
+      8BDE768BDE778CDE778CDE7A8EDF7E93E08499E199A3B8A7AEAEAEB7B7B8C4C4
+      C4D4D4C6D9DC4E45773B2E673B2E673B2E6799A1B2B4BFBFA6ACAC9EA0A09999
+      999898989898989999999999999A9A9A9B9B9B9B9B9B9C9C9C9D9D9D9E9E9E9E
+      9E9E9F9F9FA0A0A0A1A1A1A1A1A1A2A2A2A2A2A2A3A3A3A3A3A3A4A4A4A5A5A5
+      A5A5A5A6A6A6A7A7A7A8A8A8A8A8A8A9A9A9AAAAAAA9ABB5A5ADD4A6ADD3A7AF
+      D3A8AFD3AAB1D4AAB1D3ABB2D3ACB3D3ADB3D3AFB5D3AFB5D3B1B7D3B2B7D3B3
+      B8D3B4B9D3B5BAD3B6BBD3B7BBD3B8BCD3B8BDD3B9BDD3BABED3BCBFD3BDC0D3
+      BDC0D2BEC1D3BFC2D3C1C4D4C1C3D3C2C4D3C5C6CEC9C9C9C9C9C9C9C9C9CACA
+      CACACACACACACACCCCCCCCCCCCCDCDCDCDCDCDCDCDCDCECECECFCFCFD0D0D0D0
+      D0D0D1D1D1D1D1D1D1D1D1D3D3D3D3D3D3D4D4D4D5D5D5D6D6D6D6D6D6D6D6D6
+      D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D9D9
+      D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADADADAD9D9D9DA
+      DADADBDBDBDADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDB
+      DCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDD
+      DDDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDF
+      DFDFE0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E2E2
+      E2E3E3E3E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4
+      E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEBEBEBEBEBEBEAEAEAEBEBEBEAEAEAEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEFEFEFEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78B8B8B8B8B8B
+      8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A
+      8A89898989898989898989898989898989898989898989898988888888888888
+      8888888888888888888888888888898989888888888888888888888888888888
+      8888888888888888888787878787878787878787878787878787878787878787
+      8787878787878787878786868686868686868685858586868686868686868686
+      8686858585858585868686858585858585858585858585858585858585858585
+      8585858585858585858585858484848484848484848484848484848484848484
+      8484848483838384848483838383838384848484848485858586868685858587
+      87878787878787878989898A8A8A8B8B8B8B8B8B8B8B8B8C8C8C8D8D8D8C8C8C
+      8D8D8D8D8D8D8C8C8C8C8C8C8C8C8C8B8B8B8B8B8B8A8A8A8989898888888686
+      868585858383838282828181818181818080807F7F7F7E7E7E7E7E7E7D7D7D7C
+      7C7C7C7C7C7C7C7C7B7B7B7C7C7C7B7B7B7B7B7B7B7B7B7C7C7C7B7F897087E0
+      7087E07187DF7288DF7389E07389E07389DF748ADF7489DE758ADF768BDE768B
+      DE778CDF778CDE798EDE7C91DF7F94E0939AA79DA1A1A1A7A7AAB2B2B5C1C1C3
+      D4D4979FB6392D69392D69392D698184A2B9C5C5AAB1B19FA2A29A9B9B989898
+      9999999A9A9A9B9B9B9B9B9B9C9C9C9C9C9C9D9D9D9D9D9D9F9F9F9F9F9FA0A0
+      A0A1A1A1A2A2A2A2A2A2A2A2A2A3A3A3A3A3A3A4A4A4A5A5A5A6A6A6A6A6A6A7
+      A7A7A8A8A8A8A8A8A9A9A9A9A9A9AAAAAAA6ADD0A6AED4A6AED3A8B0D4A9B0D4
+      AAB1D4AAB2D4ABB2D3ACB3D3AEB4D3AFB5D3B0B6D3B1B7D3B2B7D3B3B8D3B3B9
+      D3B5BAD3B6BBD3B8BCD3B8BCD3B9BDD3BABED4BBBFD4BCBFD3BDC1D3BDC1D3BF
+      C2D3C0C3D4C1C4D4C2C4D4C2C5D4C3C6D4C8C8CBCACACACBCBCBCBCBCBCBCBCB
+      CBCBCBCCCCCCCDCDCDCECECECECECECECECED0D0D0D0D0D0D0D0D0D1D1D1D2D2
+      D2D1D1D1D1D1D1D3D3D3D3D3D3D4D4D4D5D5D5D6D6D6D6D6D6D6D6D6D7D7D7D7
+      D7D7D7D7D7D7D7D7D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9
+      D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADADADADADADADADADADBDBDBDBDB
+      DBDBDBDBDBDBDBDBDBDBDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDD
+      DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDDDDDDDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFE0E0
+      E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E4E4E4E5E5
+      E5E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78B8B8B8B8B8B8B8B8B8B
+      8B8B8B8B8B8A8A8A8B8B8B8B8B8B8B8B8B8A8A8A8B8B8B8A8A8A8A8A8A8A8A8A
+      8989898A8A8A8989898989898989898989898989898989898989898989898989
+      8989898989898989898989898989898989898989898989898988888888888888
+      8888888888888888888888888888888888888888888888888888888888888888
+      8787878888888888888888888787878787878787878787878686868686868686
+      8686868686868686868686868686868686868685858585858585858585858585
+      8585858585858585858585848484848484848484848484848484848484848484
+      8484848383838484848484848484848484848585858686868686868787878888
+      888989898A8A8A8A8A8A8C8C8C8D8D8D8D8D8D8E8E8E8E8E8E8F8F8F8F8F8F8F
+      8F8F8F8F8F8F8F8F8E8E8E8E8E8E8E8E8E8E8E8E8D8E8E8B8C8C8A8B8B888888
+      8686868383838282828282828181818080807F7F7F7E7E7E7E7E7E7D7D7D7D7D
+      7D7C7C7C7C7C7C7C7C7C7B7B7B7B7B7B7C7C7C7C7C7C7583BB7188E07187E072
+      88E07289E07389E0748AE0748AE0748AE0758ADF758ADF768CDF778CDF778CDF
+      788DDE798DDE7A8FDE7D91DF939494949696989A9A9FA4A4AAB2B2BAC7C7C2D2
+      D6382C6C382C6C382C6C5D5989BCCACAACB4B4A2A5A59C9D9D9999999A9A9A9A
+      9A9A9C9C9C9C9C9C9D9D9D9D9D9D9E9E9E9E9E9E9F9F9FA2A2A2A2A2A2A1A1A1
+      A2A2A2A3A3A3A3A3A3A4A4A4A4A4A4A4A4A4A5A5A5A6A6A6A6A6A6A7A7A7A8A8
+      A8A8A8A8A9A9A9AAAAAAA9ACBBA6AED5A6AED5A7AFD4A8B0D4A9B0D4AAB2D5AB
+      B2D4ADB4D4AEB4D4AFB5D4AFB5D4B1B7D4B2B8D4B3B8D4B3B9D4B5BAD5B7BCD4
+      B8BCD4B8BCD4B9BED4B9BED4BABED4BDC0D4BDC1D4BEC2D4BFC2D4C0C3D4C1C4
+      D4C2C5D5C4C7D5C3C6D5C4C7D5C6C9D3CACACACACACACBCBCBCBCBCBCBCBCBCC
+      CCCCCDCDCDCECECECECECECFCFCFCFCFCFD0D0D0D1D1D1D1D1D1D2D2D2D2D2D2
+      D2D2D2D4D4D4D5D5D5D5D5D5D6D6D6D6D6D6D7D7D7D7D7D7D8D8D8D8D8D8D8D8
+      D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADA
+      DADADADADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDB
+      DBDBDBDBDBDBDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDD
+      DDDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDF
+      DFDFDFDFDFDFDFDFDFDFDFDFDFDFE0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0
+      E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECEC
+      ECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3
+      F3F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78C8C8C8C8C8C8C8C8C8C8C8C8B8B
+      8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8A8A8A8A8A8A8B8B8B8B
+      8C8C8C8D8D8C8D8D8C8D8D8C8D8D8B8C8C8B8B8B8A8A8A8A8A8A8A8A8A8A8A8A
+      8A8A8A8A8A8A8989898B8B8B8B8C8C8B8B8B8C8D8D8D8E8E8C8D8D8C8D8D8C8D
+      8D8B8C8C8B8B8B8A8A8A8A8A8A8B8B8B8A8B8B8B8C8C8C8E8E8E8F8F8E8F8F8F
+      91918F91918E90908E8F8F8D8E8E8B8D8D898A8A888989888888878787878787
+      8686868888888989898889898889898889898888888788888787878686868686
+      8685858586868686878787888887888887888887888886878785858584848484
+      8484848484848484858585868686878888888989898A8A8A8A8A898A8A8B8B8B
+      8B8B8B8B8B8B8D8D8D8E8E8E8F8F8F9090909090909191919292929292929394
+      949495959495959496969596969698989598989496969295959092928D8F8F8A
+      8B8B8889898586868384848181818080808080807F7F7F7E7E7E7E7E7E7C7C7C
+      7C7C7C7C7C7C7C7C7C7C7D7D7C7D7D7983A9738BE1748BE1748BE1758BE1758D
+      E1768DE1778DE17990E17A90E17C92E17C92E17D93E27D93E17C91E07C90E07B
+      90E07C90DF7C8FDA909090929292939393999B9BA3A9A9B2BDBDC5D5D5362A6E
+      362A6E362A6E5C588BBECCCCAFB7B7A3A7A79C9D9D9B9B9B9B9B9B9A9A9A9B9B
+      9B9D9D9D9E9F9F9FA0A0A1A2A2A2A4A4A5A6A6A6A8A8A6A8A8A7A8A8A6A7A7A6
+      A7A7A6A7A7A5A6A6A6A6A6A5A5A5A6A6A6A6A6A6A7A7A7A8A8A8A8A8A8A9A9A9
+      AAAAAAABABABA7B0D2A8B2D7AAB2D7ACB4D7AEB6D9AEB7D9AFB8D9B1B8D7B1B8
+      D7B1B8D6B0B7D6B2B8D5B2B8D5B4B9D5B4B9D5B5BAD5B6BBD5B8BDD5BABED5BA
+      C0D6BBC1D6BCC1D6BEC2D7BFC2D5BEC2D5BFC3D5C0C3D5C2C6D6C4C8D7C5C9D8
+      C6CAD8C8CCD8C8CCD8C8CBD8CCCDCFCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCECE
+      CECFCFCFCFCFCFCFCFCFD0D0D0D1D1D1D2D2D2D2D2D2D3D3D3D3D3D3D3D3D3D5
+      D5D5D6D6D6D7D7D7D8D9D9D9DADAD9DADAD9DADADADBDBDADBDBDADADAD9DADA
+      DADADADADADAD9D9D9D9D9D9D9D9D9D9D9D9DADADADADBDBDBDBDBDBDBDBDBDB
+      DBDCDCDCDCDDDDDCDDDDDCDDDDDCDCDCDCDCDCDDDDDDDDDDDDDCDDDDDCDCDCDD
+      DDDDDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDEDE
+      DEDEDEDEDEDEDFDFDFDFDFDFDEDFDFDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDF
+      DFDFDFDFDFE0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E2E2E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3
+      E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECECECECEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F78C8C8C8D8D8D8C8C8C8C8C8C8C8C8C8C8C8C
+      8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8D8D8E8F8F9092929295
+      959396969396969194949092928D8E8E8C8D8D8B8B8B8A8A8A8A8A8A8A8A8A8A
+      8A8A8B8C8C8C8D8D8F91919294949497979498989498989395959093938E9090
+      8C8D8D8C8C8C8C8D8D8D8F8F909292939595969A9A989D9D9AA0A09BA1A19BA1
+      A19AA0A0999E9E969A9A9396969093938E8F8F8B8C8C8A8A8A898A8A8A8B8B8A
+      8C8C8D8F8F8E91918F92928F91918C8F8F8A8C8C888989878787878787878888
+      898A8A8B8D8D8C8E8E8D90908D90908C8F8F8A8C8C8889898586868585858585
+      858687878889898A8C8C8C8F8F8D90908F91918E90908D8F8F8C8D8D8C8C8C8D
+      8D8D8E8E8E909090919191929292939393949494969696979898999B9B9C9E9E
+      9EA1A1A0A4A4A1A6A6A2A7A7A2A8A8A2A8A8A0A6A69DA3A39AA0A0959A9A9094
+      948D9090898B8B8687878383838181818080807F7F7F7E7E7E7E7E7E7D7D7D7D
+      7D7D7C7D7D7E7E7E7E86A0778FE37B93E37C94E47C95E47C94E47C94E37D95E4
+      8097E48299E4859DE5889FE589A2E689A1E5899FE5879DE4849AE28297E17F95
+      E18393CC919191919191919191989999A1A6A6B0B9B9C2D1D15C588D35297035
+      29705C588DC0CECEB0B8B8A4A8A89D9E9E9A9A9A9B9B9B9C9C9C9E9F9FA1A2A2
+      A3A5A5A6A9A9A9ADADACB0B0AEB3B3AFB3B3B0B4B4B0B4B4AFB3B3ADB0B0ACAF
+      AFAAACACA9AAAAA8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A9A9A9AAAAAAACACACAE
+      B0B8ABB5DAAEB9DBB1BBDCB3BDDCB5C0DDB7C2DEB7C1DDB7C0DCB6BFDBB5BDD9
+      B3BBD8B3BAD7B4BAD6B4BAD5B5BAD5B6BCD6BABFD7BCC2D8BFC4DAC0C7DBC1C8
+      DBC2C8DBC3C9DBC3C7D9C2C7D8C2C7D8C4C8D8C6CAD9C9CEDBCBD0DDCCD2DECE
+      D4DFCFD4DFD0D4DED1D4DAD1D3D3CFD0D0CFD0D0CFD0D0CECECECECECECFCFCF
+      CFCFCFD0D0D0D0D0D0D1D1D1D2D2D2D3D3D3D3D3D3D3D4D4D5D5D5D6D6D6D8D9
+      D9D9DBDBDBDDDDDCDEDEDEDFDFDFE1E1DFE1E1DEE0E0DEE0E0DDDFDFDDDEDEDC
+      DDDDDBDCDCDBDBDBDADBDBDADBDBDCDCDCDCDDDDDDDEDEDEDFDFDEE0E0DEDFDF
+      DFE0E0DFE0E0DFE0E0DFE0E0DFE0E0DEDFDFDFDFDFDEDFDFDDDEDEDEDEDEDDDE
+      DEDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDEDFDFDFDFDFDFE0E0E0E1E1E0
+      E1E1E1E2E2E1E2E2E0E1E1E0E0E0DFE0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1
+      E2E2E2E2E3E3E3E3E3E3E4E4E2E3E3E2E3E3E2E3E3E2E2E2E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3
+      E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9EAEAEAE9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBECECECECECECECECECECECECECECECECECECECECECECECECECECECEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F1F1
+      F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F78D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8C
+      8C8C8D8D8D8D8D8D8C8C8C8C8C8C8D8D8D8F9191929595979A9A9A9F9F9CA2A2
+      9CA2A29A9F9F969A9A9194948E90908C8C8C8B8B8B8B8B8B8B8B8B8C8D8D8E90
+      90929595969A9A9CA1A19FA5A59FA6A69FA6A69DA2A2989C9C94969691939391
+      92929295959699999B9F9FA0A6A6A3ABABA7B1B1AAB4B4ABB6B6ABB7B7AAB5B5
+      A8B2B2A5AEAE9FA7A79AA0A09599998F92928C8E8E8B8D8D8D8E8E9092929498
+      98989D9D989E9E979D9D9498989093938C8E8E888989888989898A8A8D8F8F90
+      9494949999979D9D969C9C949A9A9094948C8E8E898A8A858686858686888A8A
+      8C8F8F919595959B9B969C9C969C9C9599999295959091918E8F8F8E8E8E8F8F
+      8F9090909292929393939596969899999C9D9D9FA2A2A3A8A8A7ADADABB2B2AF
+      B8B8B1BBBBB3BEBEB4BFBFB4C0C0B2BEBEAFBABAABB5B5A6B0B09FA7A7999F9F
+      9297978D9191898B8B8586868182828080807F7F7F7E7E7E7E7E7E7D7D7D7F7F
+      7F7F84947A91DE7F97E6859DE788A1E789A2E78AA3E789A3E78AA3E78EA7E892
+      ABE996B0EA99B4EB9CB6EB9CB5EB9AB3EA97AFE991A8E78DA3E5879DE48999CF
+      939494929393929292969898A0A4A4AEB7B7C0CECE5A57903328733328735A57
+      8FC0CECEB1B9B9A4A8A89FA0A09C9C9C9D9E9E9FA0A0A3A5A5A7ABABABB0B0B1
+      B7B7B5BCBCB8C0C0BBC4C4BCC5C5BCC5C5BDC5C5BAC2C2B7BEBEB4B9B9B1B5B5
+      AEB1B1AAACACA9A9A9A8A8A8A8A8A8A9A9A9ABABABACADADB0B2B2B1B8CCB3BE
+      DFB7C4E1BBC8E2BFCCE4C1CEE5C3D0E6C3CFE5C1CDE3BFC9E1BBC5DEB8C1DBB6
+      BED9B6BCD8B6BCD7B7BDD7BAC0D9BEC4DBC2C9DDC5CEE0C8D1E2CAD2E2CAD2E2
+      C9D1E0C8CEDEC6CCDCC7CDDCC9CEDDCBD1DFCFD5E1D1D8E3D4DBE5D6DDE6D6DD
+      E6D6DDE5D6DCE3D6DADAD4D7D7D2D4D4D0D1D1D0D0D0D0D0D0D0D0D0D0D0D0D1
+      D1D1D1D1D1D2D2D2D3D3D3D4D4D4D4D4D4D5D5D5D8D8D8D9DADADCDDDDDEE0E0
+      E0E3E3E2E5E5E3E6E6E3E7E7E4E8E8E3E7E7E3E6E6E1E4E4E1E3E3DFE0E0DDDE
+      DEDCDCDCDBDBDBDBDCDCDCDDDDDEDFDFE0E1E1E1E3E3E2E5E5E4E6E6E4E7E7E4
+      E7E7E4E7E7E4E6E6E3E6E6E4E6E6E3E5E5E2E3E3E1E2E2E0E0E0DFDFDFDFDFDF
+      DEDFDFDEDEDEDEDEDEDDDDDDDEDEDEDFDFDFE0E0E0E1E2E2E2E4E4E3E5E5E3E5
+      E5E3E5E5E2E3E3E1E1E1E0E0E0DFE0E0E0E0E0E1E1E1E1E2E2E3E3E3E4E5E5E5
+      E7E7E6E8E8E6E8E8E6E7E7E5E6E6E3E4E4E3E4E4E3E3E3E2E2E2E2E2E2E2E2E2
+      E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E2E2E2E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9
+      E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F6F6F6F6F6F6F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F78E8E8E8E8E8E8E8E8E8E8E8E8D8D8D8D8D8D8E8E8E8D8D8D8D8D
+      8D8D8D8D8D8D8D8D8D8D8F8F8F929494989C9C9FA5A5A6AEAEAAB4B4AAB4B4A6
+      AEAE9FA5A5979B9B9294948E8E8E8C8C8C8C8C8C8D8D8D8F9090939595999D9D
+      A1A8A8A8B1B1ADB8B8AEBABAACB7B7A6AFAF9FA6A6999E9E969A9A979A9A9BA0
+      A0A0A7A7A8B1B1AFBABAB4C2C2B9C8C8AAB6C09AA3B79AA3B798A2B6B8C8C8B4
+      C2C2AEBABAA6B0B09DA4A4969A9A9093938F9090919393969B9B9DA4A4A3ABAB
+      A5AFAFA4ADAD9EA6A6979D9D9194948B8C8C898A8A8C8E8E919595989E9E9FA7
+      A7A3ADADA4AEAE9FA8A8989E9E9195958B8D8D8788888788888B8E8E93979799
+      A0A0A0A9A9A4AEAEA2ABAB9DA5A5989D9D9395959091918F8F8F8E8F958D909C
+      9494949798989A9C9C9FA1A1A4A9A9AAB0B0B1B9B9B7C1C1BCC8C8C0CECEB1BC
+      C6A0A9BDA1AABE7B7FA69FA9BD9DA7BBACB9C3B9C8C8B2C0C0A9B5B5A1ABAB9A
+      A1A19297978C8F8F8789898484848181817F7F7F7F7F7F7F7F7F7E81877A8FD8
+      819AE689A3E892ADEB99B3EC9CB7ED9DB8ED9CB7EC9DB8EDA0BBEEA4C0EEAAC5
+      F0A6C0E990A3D3A0B7E2AEC9F0AAC5EFA4BDED9CB4EA94ABE792A2CB989A9A95
+      96969494949799999FA4A4AEB7B7BFCDCD5A56913227753227755A5691C1CECE
+      B2BABAA6AAAA9FA0A09E9F9FA0A1A1A5A8A8ABAFAFB2B8B8B8C0C0BEC8C8C3CF
+      CFC6D3D3ACB5C4A4ABBFA4ABBFB6C0CAC7D3D3C3CDCDBEC7C7B9BFBFB3B7B7AE
+      B0B0ABACACA9A9A9AAAAAAACACACAEAFAFB2B5B5B7BBBBB9C4DDBECCE6C4D2E8
+      C8D7EBCCDBECB0BBD7A8B1D0BBC6DECDDAEBC9D6E8C4D0E4BEC7E0BBC3DCB8BF
+      D9B8BED9B9C0D9BFC5DDC3CBDFCAD2E3CED9E7D2DDE9D4DFEAD3DDE9D0DAE6CE
+      D6E3CCD3E1CCD3E0CED4E1D2D9E5D6DEE8D9E2EAB1B6CFA8ABC89393B9B3B7CF
+      C8CEDDDDE3E4DBDFDFD7DADAD4D6D6D3D4D4D0D1D1D0D1D1D1D1D1D1D1D1D2D2
+      D2D2D2D2D3D3D3D4D4D4D4D5D5D5D6D6D8D9D9DBDDDDDFE2E2E2E6E6E5E9E9E7
+      ECECBABCD0BBBDD1BCBDD1BCBDD1C6C8D7E8ECECE5E9E9E3E6E6E1E3E3DFE0E0
+      DDDEDEDDDEDEDFE0E0E1E3E3E4E6E6E6E9E9E8ECECE9EDEDE9EEEEE9EEEEE9EE
+      EEE9EDEDE9EDEDE8ECECE7EBEBE6E9E9E4E7E7E3E5E5E2E3E3E0E1E1DFE0E0DF
+      DFDFDEDEDEDEDEDEDEDFDFE1E1E1E2E3E3E4E6E6E6E9E9E7EAEAE8EAEAE7E9E9
+      E5E6E6E3E4E4E1E2E2E1E1E1E1E1E1E2E2E2E3E4E4E5E7E7E7E9E9E8EBEBEAED
+      EDE9ECECE8EBEBE6E8E8E4E6E6E4E5E5E3E3E3E2E2E2E2E2E2E2E2E2E2E2E2E3
+      E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4
+      E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E4E4E4E5E5E5E5E5E5E5E5E5E5E5
+      E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9
+      E9E9E9E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F78F8F8F8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E
+      8E8E8E8E8E8E9192929598989EA3A3A9B2B2514C8A524E8B524E8B514C89A8B2
+      B29DA3A39497979091918D8D8D8D8D8D8F90909395959A9E9EA3ABABAEBABA8E
+      95AF54508D54508D534E8C514B89656290A1A7A79DA2A2A0A6A6A6AFAFAFBABA
+      B8C7C78990AF5F5D96302677302677302677302677302677302677423B836464
+      97898FA9979FA99CA2A2959898929595969A9A9EA5A59298A8504C89514D8A51
+      4C8A7D7F9E9FA7A79599998E8F8F8A8C8C8F9292969C9CA2ABAB5F5D90514C8A
+      514D8A504B88A2ACAC979D9D8E9191898A8A8A8B8B8F93939AA1A18F96A5504B
+      89514C8A504C897B7F9EA0A8A8979B9B919393848EAF7289DE7189E38091C796
+      9BA5A1A4A4A8ADADB1B8B8B8C3C3C0CDCDA2AABF6B6B9E443D85302677302677
+      302677302677302677302677302677433C8468699C9AA5BAB4C4C4A9B6B6A0A9
+      A9969C9C8E9292888A8A8485858181818080807E8085788BD27D95E688A1E890
+      A8E54D4C954F4F965150966A71AEB3D1F3B2D0F39BB1DD6368A639307F302677
+      3026773026773026775353978492C5AEC9F0A4BDECA0B0CC9FA4A4999C9C9698
+      98989A9AA1A5A5AEB6B6BFCDCD585592302677302677585692C1CFCFB2BABAA8
+      ACACA1A3A3A2A3A3A6A9A9ADB2B2B6BDBDBEC9C9BDC8CD7E80AA4E498B302677
+      3026773026773026773026773026775753907C7CA59CA1B5B8BEBEB2B5B5ADAE
+      AEABACACACACACAEB0B0B3B6B6B9BDBDC0C7C7C5D4EAB8C5DF8184B44F4A8E30
+      2677302677302677302677302677443D86575294C3CDE3BEC7DEBAC2DBBAC1DB
+      BDC5DCC4CCE1CCD6E6C9D3E4706EA53B317F3026773026773026776E6BA2D2DA
+      E6D2D9E5CAD1E08E8EB866629C3026773026773026773026773026773026775D
+      5795B4B7CCDCE1E1D8DBDBD5D7D7D2D3D3D2D2D2D1D1D1D2D2D2D2D2D2D4D4D4
+      D4D4D4D5D5D5D6D6D6D7D8D8DADCDCDFE2E2C1C2D2807CAA534B8E3026773026
+      77302677302677302677302677483F878D8BB4DCE0E6E5E8E8E1E3E3DFE1E1DF
+      E0E0E0E2E2E4E6E67570A35F58955F5996605997605997605997605997605997
+      6059967873A6A6A5C5D4D7E2EAEEEEE8EBEBE6E8E8E4E5E5E2E3E3E1E1E1E0E0
+      E0DFDFDFE0E0E0E1E2E2E4E5E5E7E9E95F57955F58955F58955F5795E7EAEAE4
+      E6E6E2E3E3E2E3E3E2E3E3E4E5E5E6E8E8E9ECECE0E2E8605896605996605896
+      5F58955E5794C5C4D4E5E6E6E4E4E4E3E3E3E2E2E2E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEB
+      EBECECECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F4F4F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78F8F
+      8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8E8E8E8E8E8E8E
+      8E8E929393999D9DA4ABABB2BEBE2F257A2F257A2F257A2F257AB1BDBDA2AAAA
+      979B9B9192928E8E8E8E8F8F929393999D9DA3AAAAB0BCBCABB8C33830802F25
+      7A2F257A2F257A382F7EA6AFB4A7AEAEA6ADADABB4B4B4C1C1A5B0C04B478C2F
+      257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A
+      6E6F99A1A8A8989D9D9599999A9F9FA4ADAD9199AE2F257A2F257A2F257A7274
+      9FA7B1B1999F9F9093938D8E8E9295959CA3A3AAB6B6514E8E2F257A2F257A2F
+      257AACB9B99DA5A59195958A8B8B8B8D8D949999A0A9A98F97AC2F257A2F257A
+      2F257A71749FA7B1B196A0AE8094D1738CE5728AE4738DE57892E6809AE896A9
+      D4B1BCC4BFCCCCA2ABC05754942F257A2F257A2F257A2F257A2F257A2F257A2F
+      257A2F257A2F257A2F257A2F257A2F257A2F257A54529398A4BAB1C0C0A4AFAF
+      99A1A1909595888A8A8485858282827588D17790E48099E78FA9EAA1BDEF2F25
+      7A2F257A2F257A54549AC3E3F87078B12F257A2F257A2F257A2F257A2F257A2F
+      257A2F257A2F257A2F257A403B8A95A6D5AFC3D8AAB2B2A1A7A79B9E9E9B9D9D
+      A1A5A5AEB6B6BFCDCD5755942F257A2F257A585595C2CFCFB3BBBBA8ADADA4A7
+      A7A6A9A9AEB3B3B8C0C0C2CDCD878AB03830812F257A2F257A2F257A2F257A2F
+      257A2F257A2F257A2F257A2F257A2F257A2F257ABCC3C3B4B8B8AFB1B1ADAEAE
+      AFB0B0B3B6B6BABFBFC2CACACBD6DA7F83B52F257A2F257A2F257A2F257A2F25
+      7A2F257A2F257A2F257A2F257A2F257AC7D1E5C0C9E0BDC5DEBEC5DEC2CBE0CB
+      D5E6B6BDD73930822F257A2F257A2F257A2F257A2F257A595597D5DEE9D6DDE8
+      AEB2CE2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F25
+      7A9F9FBFDDE2E2D8DBDBD5D7D7D3D4D4D3D3D3D3D3D3D3D3D3D5D5D5D5D5D5D6
+      D6D6D7D7D7DADADADCDEDEE1E4E45D56962F257A2F257A2F257A2F257A2F257A
+      2F257A2F257A2F257A2F257A2F257A524B91DDE1E7E5E8E8E2E4E4E1E3E3E4E6
+      E6E7EAEA5E58982F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F
+      257A2F257A2F257A6B66A1BDBED4EAEEEEE7EAEAE4E6E6E2E3E3E1E1E1E0E0E0
+      E1E2E2E3E4E4E6E8E8EAEDED2F257A2F257A2F257A2F257AEAEDEDE7E9E9E4E5
+      E5E3E4E4E4E5E5E6E8E8EAEDEDE1E4EA534B912F257A2F257A2F257A2F257AA4
+      A2C1E8E9E9E5E6E6E4E4E4E3E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4
+      E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      ECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1
+      F1F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7909090909090
+      9090908F8F8F8F8F8F8F8F8F9090908F8F8F8F8F8F8F8F8F8F8F8F8F8F8F9395
+      959CA0A0A8B1B1B8C7C72D237C2D237C2D237C2D237CB7C5C5A6AFAF9A9E9E92
+      93938F8F8F929393979A9AA0A7A7AEB9B9BDCDCD4B478F2D237C2D237C2D237C
+      372E82A0AABAB0BBBBACB5B5AFB9B9B8C5C58B91B32D237C2D237C2D237C2D23
+      7C2D237C2D237C413B895552945552942D237C2D237C2D237C2D237C6E6F9BA2
+      AAAA9A9E9E989D9D9DA3A3AAB4B497A0B62D237C2D237C2D237C7578A5ACB8B8
+      9CA3A39295958E8F8F949898A0A8A8B0BEBE5250922D237C2D237C2D237CB3C2
+      C2A1AAAA9398988A8C8C8B8D8D969C9CA5B1B1949FB52D237C2D237C2D237C74
+      79A7A2B9DA89A5EA7C96E7758EE5748DE57993E6819BE88CA8EB9BB7EFA1BEEC
+      6E74AE2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D23
+      7C2D237C2D237C2D237C2D237C2D237C2D237C2D237C6E72A4ADBDC2A8B4B49C
+      A4A4909595898B8B7B8AC1748CE47891E5849DE894AEECA9C6F22D237C2D237C
+      2D237C53539B666BAB2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D23
+      7C2D237C2D237C2D237C2D237C8893BDB7C3C3AAB2B2A0A5A59EA1A1A3A8A8AF
+      B8B8BFCDCD5653962D237C2D237C565396C2CFCFB4BCBCAAAEAEA7ABABACB1B1
+      B6BEBEC3CFCF6A69A12D237C2D237C2D237C2D237C2D237C2D237C5754965754
+      96423B892D237C2D237C2D237C2D237CBDC4C4B6BABAB1B3B3B0B2B2B3B5B5B9
+      BEBEC1C9C9C2CCD15754972D237C2D237C2D237C2D237C2D237C2D237C2D237C
+      2D237C2D237C2D237C2D237CC7D2E5C1CAE1C0C8DFC2CAE0C8D1E4D2DEEB4E48
+      922D237C2D237C2D237C2D237C2D237C2D237C585398D5DEE8D6DEE8AEB1CE2D
+      237C2D237C2D237C5B5699898AB88A8BB85C579A2D237C2D237C2D237C393083
+      D7DCE1DBDFDFD7D9D9D5D6D6D3D3D3D3D3D3D3D3D3D5D5D5D5D5D5D6D6D6D7D7
+      D7DADBDBDDDFDFE2E5E55B55982D237C2D237C2D237C5D589A827FB17672A945
+      3D8B2D237C2D237C2D237C2D237C5D579AE9EDEDE5E8E8E4E6E6E5E8E8E9EDED
+      5D579A2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D23
+      7C2D237C2D237C2D237C827FB1ECF0F0E8EBEBE5E7E7E3E4E4E1E2E2E2E2E2E4
+      E5E5E7E9E9EBEFEF2D237C2D237C2D237C453D8BECF0F0E8EAEAE5E7E7E6E7E7
+      E7E9E9EAEDEDEEF2F27772AA2D237C2D237C2D237C2D237CA5A4C5EAEDEDE7E9
+      E9E5E6E6E4E4E4E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4
+      E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F791919191919191919190
+      90909090909090909090909090909090909090909090908F8F8F9495959DA2A2
+      ABB5B5BDCDCD2C227E2C227E2C227E403A8BBBCBCBA9B2B29B9F9F9394949091
+      919699999EA3A3ABB4B4BAC9C97174A82C227E2C227E2C227E2C227E959EBAB8
+      C5C5B2BCBCB1BBBBB8C4C4A6B2C32C227E2C227E2C227E2C227E413A8B9098BB
+      BBCBD0C1D1D1BECDCDBDCDCDBECECEA2ADBE7275A33D36866B6B99A0A7A79A9E
+      9E989D9DA0A6A6AEB9B99AA5BC2C227E2C227E2C227E777BA9AFBCBC9FA6A692
+      95958F9090959A9AA3ABABB5C4C45351962C227E2C227E2C227EB7C8C8A4AEAE
+      949A9A8A8D8D8C8F8F989F9FA9B5B598A4BB2C227E2C227E2C227E727DB9A1BF
+      F08CA8EB7E98E77891E57992E7809AE98CA7EC9BB9EFA4C1ED4645952C227E2C
+      227E2C227E2C227E2C227E61609F9299BBB8C5D0C9D8D8C8D7D7C7D7D7B4C2CD
+      8F97B95F5F9E2C227E2C227E2C227E2C227E2C227E484590AFBFC4A9B6B69AA3
+      A38799C97B92E7768EE57B93E6869FE998B3EDAFCCF32C227E2C227E2C227E2C
+      227E2C227E2C227E2C227E646AAC98ACD8B8D6F5BAD6F4ABC3E6818EC2362E86
+      2C227E2C227E2C227E2C227E8A91B4B5C1C1A9B0B0A3A8A8A6ABABAFB8B8C0CE
+      CE5553982C227E2C227E565398C2CFCFB5BEBEADB2B2ADB2B2B4BBBBC0CBCB68
+      68A22C227E2C227E2C227E2C227E5754999EA6C2CEDCDCCBD8D8CBD7D7CCD8D8
+      CCD8D8999EBB66649E2C227EBBC1C1B6BABAB1B4B4B2B4B4B7BBBBC0C7C7CBD5
+      D5615F9E2C227E2C227E2C227E2C227E58559CA2ABCFCBD9EBD5E4F1D4E2F0A8
+      B0D26A68A82C227EC4CFE4C2CAE2C1C9E1C5CDE3CCD7E8A1A7CC2C227E2C227E
+      2C227E2C227E9396C0D3DDEBB8BED79FA2C6D3DBE6D4DBE7ACB0CE2C227E645F
+      A1C8CEE0DFE8EFE1EAF0E4EDF1E8F3F57371AB2C227E2C227E2C227E9494BCDE
+      E3E3D9DCDCD6D7D7D5D5D5D4D4D4D5D5D5D6D6D6D6D6D6D7D7D7D8D8D8DADBDB
+      DDDFDFE2E5E55B5499382F858B88B6DEE2E8EAEFEFEAEFEFECF1F1EEF5F5A6A6
+      C92C227E2C227E2C227E2C227EAFB0CDE7EBEBE5E8E8E6EAEAEBEFEF5D579C2C
+      227E2C227E2C227E8E8CBA8E8CBA8E8CBA8E8CBA7672AB453D8D2C227E2C227E
+      2C227E2C227E2C227E504A95E0E3E9E8EBEBE5E7E7E3E3E3E3E4E4E5E6E6E8EB
+      EBEDF2F22C227E2C227E2C227E5E579CEEF2F2EAECECE8EAEAE8EAEAEAEDEDEE
+      F2F27672AB2C227E2C227E2C227E2C227EA6A5C8ECEFEFE9EBEBE7E8E8E5E6E6
+      E5E5E5E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6
+      E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E7E7E7E8E8E8E7E7E7
+      E8E8E8E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F79292929191919191919191919191
+      919191919191919191919191919090909090909090909597979FA4A4AEB8B8C0
+      D0D02A21802A21802A2180535299BCCCCCAAB3B39CA1A19597979496969B9F9F
+      A6AFAFB5C2C29FABC32A21802A21802A21802A21807A80AFBFCDCDB5C0C0B2BB
+      BBB6C1C1C1D0D03F398C2A21802A21802A2180686BA6C0D0D6C1CFCFB9C5C5B3
+      BEBEB0BABAB0BABAB0BBBBB0BABAAEB8B8A3ABB18D92A49CA1A1989B9B9A9E9E
+      A1A8A8B0BCBC9CA7BF2A21802A21802A21808A92B6B1BEBE9FA6A69396969092
+      92969A9AA4AEAEB7C7C75251982A21802A21802A2180BACCCCA5B1B1959B9B8C
+      8E8E8C8F8F989F9FABB8B899A6C02A21802A21802A2180737EBBA4C3F18FAAEC
+      819AE87B94E77F99E88AA6EB9AB7EFA4C1EC4645972A21802A21802A21802A21
+      8050519EB1C5DDC7D5D8C2CECEBDC8C8BAC5C5B9C3C3B8C3C3BAC5C5BCC9C9C1
+      D1D1B4C3CF5D5E9F2A21802A21802A21802A2180484592AFBEC4A0B7D98DA7EB
+      819AE87A92E67D95E788A1EA9AB6EEB2D0F42A21802A21802A21802A21802A21
+      80342D889AAFD9B4D1F4ACC7F1A7C2EFA8C1EFACC7F0B4D0F3B6D0EF5B5EA52A
+      21802A21802A2180342D86B7C4CAB1BABAA9AFAFA9AFAFB2BBBBC0CECE545299
+      2A21802A2180545299C3D0D0B7BFBFB1B7B7B2B9B9BCC6C6A2AAC22A21802A21
+      802A21802A2180969DC1CFDDDDC7D3D3C2CCCCC0C8C8BFC7C7C0C8C8C1C9C9C1
+      C9C9BFC6C6A1A5B6B7BBBBB3B6B6B2B5B5B5B8B8BDC2C2C7D0D0898DB72A2180
+      2A21802A2180352E8798A0CAD3E3F1CEDCEECAD7EBC9D6EAC9D6EAC9D5E9C8D3
+      E8A8AFD2C1CAE2C0C8E0C2CAE1C7D0E4D0DBEA7879B22A21802A21802A218092
+      95C2E0ECF3D8E3EDD3DBE8D0D7E5CFD5E4D1D7E4A8ACCC6A68A7D7DEE8D8DFE9
+      D9E1E9DBE3EADFE7EEE6F0F3DDE6EF2A21802A21802A2180726FAAE1E6E6DBDE
+      DED7D8D8D5D5D5D5D5D5D5D5D5D7D7D7D8D8D8D8D8D8D9D9D9DADBDBDDDFDFE0
+      E2E2645FA0C2C3D5E6E9E9E6E9E9E7EAEAE7EAEAE8ECECECF1F1F0F6F67571AC
+      2A21802A21802A2180817EB3EAEEEEE8EBEBE8ECECECF0F05C579E2A21802A21
+      802A2180F1F7F7F0F6F6EDF2F2ECF0F0ECF0F0EEF3F3BEC1D84F49962A21802A
+      21802A21802A21807571ADECF0F0E8EBEBE5E6E6E4E5E5E5E7E7E9ECECEEF2F2
+      2A21802A21802A21805C579EEFF3F3EBEEEEEAEDEDEBEEEEEEF2F28E8BBB2A21
+      802A21802A21802A2180A6A6CAEEF2F2EBEDEDE8EAEAE6E7E7E5E5E5E4E4E4E4
+      E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBECECECEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEC
+      ECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7929292929292929292929292929292929292
+      929292929292929292929292919191919191969797A0A5A5AEB8B8C0D1D12820
+      8328208328208352519BBDCDCDABB4B49DA2A2979A9A989C9CA4AAAAB2BDBDB7
+      C7CD322B892820832820832820835C5DA1C1D0D0B5C0C0AFB8B8B1BABABBC7C7
+      8C94B92820832820832820835D5EA2D0E3E3C3D2D2B8C3C3B0B8B8AAB2B2A7AE
+      AEA6ACACA6ACACA5ABABA3AAAAA3A8A89DA2A2999C9C969898989C9CA1A8A8B1
+      BDBD9CA8C02820832820832820839DA9C2B1BEBEA0A7A79395958F9191979B9B
+      A5AEAEB8C8C851509B282083282083282083BACCCCA5B1B1959B9B8B8D8D8C8F
+      8F97A0A9A4BBDA94A8D8282083282083282083727EBDA6C3F190ACEC829DE980
+      9AE887A2EB97B4EFAAC8F34D4FA02820832820832820832820837D8CC4B1D0F5
+      A3C2F29BB6EDA3B4D4AEB5BAAEB3B3ACB1B1ABB1B1ABB1B1ADB5B5B2BCBCB7C4
+      C4C1D2D28E98BD282083282083282083282083454397ABC9F399B4EF8AA3EA7E
+      97E77F97E789A2EA9AB6EEB4D1F4282083282083282083282083282083A7BEE2
+      B2CEF3A4BEEF9AB3EC95ADEB95ADEB99B1EBA2BBEEB3C7DBC5D9DB4745952820
+      832820832820836566A4B9C5C5AEB7B7ACB4B4B3BDBDC1CFCF52519B28208328
+      208353519CC4D1D1B9C2C2B4BCBCB9C1C1C3CFCF53509B282083282083282083
+      959DC2D2E2E2C8D4D4C1C9C9BBC1C1B8BDBDB8BDBDB7BCBCB8BDBDB8BDBDB7BC
+      BCB6BABAB3B6B6B2B4B4B3B5B5B8BCBCC2C9C9C4CED5332C8928208328208328
+      2083A2ACD2D1E0F0C9D6EBC2CEE7BFCAE5BEC9E3BFC8E3C0CAE3BFC9E2BFC8E1
+      BDC5DEBDC5DEC2CAE1C9D2E6D3DEEC56539F282083282083282083D6E2EEDAE4
+      EED2DBE7CED4E3CCD1E1CBD0E0CCD1E0C3C9DBD1D6E3D2D7E4D3D9E4D5DAE5D8
+      DEE7DDE5EBE5EEF2DDE6EF28208328208328208358549FE2E7E7DCDFDFD7D9D9
+      D6D6D6D5D5D5D5D5D5D7D7D7D8D8D8D8D8D8D8D9D9DADBDBDCDDDDDFE0E0D5D7
+      DDE2E4E4E2E4E4E2E4E4E3E5E5E4E6E6E6E9E9EAEEEEEFF5F58C8BBD28208328
+      20832820835A55A0EBEFEFE8EBEBE9EDEDEDF1F15A56A0282083282083282083
+      F1F7F7EDF2F2EAEDEDE8EBEBE8EBEBEAEDEDECF1F1EFF4F47471AE2820832820
+      83282083282083A4A4C9EAEEEEE7E9E9E6E7E7E7E8E8EAEDEDEFF3F328208328
+      20832820835B56A0F1F5F5EEF1F1EDF1F1EFF2F2A5A5CB282083282083282083
+      2820838D8BBDEFF2F2EBEEEEE8EAEAE6E7E7E5E5E5E5E6E6E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8
+      E8E8E8E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEB
+      EBEBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F793939393939393939392929292929293939393939392
+      9292929292929292929292929292979898A1A6A6AEB8B8C1D1D1271F85271F85
+      271F8551509DBDCDCDABB4B49FA4A49B9F9FA0A5A5ADB6B6BCCBCB5B5BA2271F
+      85271F85271F853C3891BACAD0B6C1C1ADB5B5ABB2B2B2BBBBC0CDCD47439727
+      1F85271F85322B8BBDCDDACFE1E1C2D0D0B7C2C2B0B8B8ABB1B1A8ADADA6ABAB
+      A4A9A9A4A9A9A2A7A7A0A4A49CA0A0989B9B9799999A9D9DA3A9A9B2BEBE9CA7
+      C1271F85271F85271F859CA8C2B1BDBD9FA6A6939696909292979B9BA5AEAEB8
+      C8C850509C271F85271F85271F85BACCCCA5B1B1959B9B8B8D8D8893B18DA7EC
+      A0BDF093A9DA271F85271F85271F85727EBEA6C4F292AEED87A2EB86A0EA91AD
+      EDA5C2F2707BBE271F85271F85271F85271F858597CDADCCF49DBAF191ACEE87
+      A2EC809BEA8098E5909EC8A1A4A9A2A4A4A1A4A4A2A6A6A5AAAAAAB1B1B2BDBD
+      BCCCCC8B96BC271F85271F85271F85271F85707BBEA6C3F293AEED859EEA839B
+      E98AA4EB9CB6EEB4D1F5271F85271F85271F85271F857581BEB7D3F5A4BEF095
+      ADEC8CA3E8889FE7889EE790A0CB9CA5ADAAB4B4B9C8C8B6C7D4271F85271F85
+      271F85322A8BC0CECEB4BEBEB0B8B8B5BFBFC2D0D052509D271F85271F855251
+      9DC5D2D2BBC5C5B9C1C1BEC8C8ABB6C9271F85271F85271F855E5EA4D7E8E8D0
+      DFDFC6D1D1BFC7C7BAC0C0B7BCBCB6BBBBB6BABAB5B9B9B6BABAB6B9B9B5B8B8
+      B3B5B5B3B5B5B6B9B9BEC3C3C8D0D09398BF271F85271F85271F856A6CB0D2E3
+      F1C8D5EBBFCAE5B9C3E2B7C1E0B8C0DFB9C1DFB9C2DFB9C1DFBAC2DEBAC1DDBD
+      C4DFC2C9E2CAD3E7D5E1ED5653A1271F85271F853F3993DEEAF2D5DEEACDD4E3
+      C8CEDFC7CCDEC8CCDEC9CEDECCD0DFCDD2E1CFD4E1D1D6E3D4D9E5D9DFE8DFE7
+      EDE7F0F49495C4271F85271F85271F857C7BB4E2E6E6DCDFDFD8D9D9D6D6D6D6
+      D6D6D6D6D6D8D8D8D9D9D9D9D9D9D9D9D9DBDBDBDBDCDCDEDFDFDFE0E0E0E1E1
+      E0E1E1E0E1E1E1E2E2E2E4E4E5E8E8EAEEEEEFF5F5807DB7271F85271F85271F
+      855955A1EBEFEFE9ECECEAEDEDEDF2F25A55A2271F85271F85271F85EFF4F4EA
+      EEEEE7E9E9E5E6E6E4E5E5E6E8E8E8EBEBEBEFEFEFF4F47370B0271F85271F85
+      271F85342C8CEEF2F2E9ECECE7E9E9E7E9E9EAEDEDEFF3F3271F85271F85271F
+      855A55A2F2F7F7F0F5F5F0F5F5A6A5CC271F85271F85271F85271F857370B0EF
+      F3F3EBEEEEE9EBEBE6E7E7E5E5E5E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8
+      E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F79494949494949494949494949393939393939393939393939393
+      93939393939393939393979898A1A6A6AFB9B9C1D1D1251D87251D87251D874F
+      4F9EBECDCDACB6B6A3A9A9A0A5A5A8B0B0B7C4C4949FC0251D87251D87251D87
+      251D879FAAC4BAC6C6ADB5B5A7ADADA9B0B0B5BEBEBAC8CE251D87251D87251D
+      876769ABD3E6E6D1E3E3C7D5D5BDC9C9B7C1C1B4BCBCB1B9B9AEB6B6ACB4B4AA
+      B1B1A8AEAEA5AAAAA1A6A69EA1A19A9D9D9DA1A1A6ADADB3BFBF9CA8C2251D87
+      251D87251D879BA7C1B0BDBDA0A6A6949696909292979B9BA5AFAFB8C8C84F4E
+      9E251D87251D87251D87BACCCCA5B1B1959B9B8B8D8D8595C78DA8ECA1BEF193
+      A8DA251D87251D87251D87717DBFA7C5F394AFED8BA6EC8EA9ED9CB8F0A0BAE7
+      2F298E251D87251D87251D877C8BC7AFCDF59DB9F08EA8ED829DEA7C95E97791
+      E8758EE8748DE8768EE38995C39A9CA29B9C9C9D9F9F9FA3A3A5ABABAEB9B9BB
+      CCCC828BBA251D87251D87251D87251D87A1BAE79EB9F08EA7EB88A0EA8DA6EB
+      9DB7F0B4D1F5251D87251D87251D87251D87B8D3F0ABC5F198B1EC8BA2E98499
+      E78494CF8990A38E9090959898A0A6A6B0BBBBC2D3D36568AA251D87251D8725
+      1D879DA7C1B9C4C4B4BDBDB7C2C2C3D1D1504F9F251D87251D87514F9FC6D3D3
+      BDC7C7BCC5C5C2CECE858AB9251D87251D87251D87B5C2D6D7E9E9D2E1E1CAD6
+      D6C4CDCDC1C9C9BEC5C5BDC4C4BCC2C2BBC0C0BBC1C1BABFBFB9BDBDB7BABAB6
+      B9B9BABEBEC2C8C8CDD7D75E5DA5251D87251D87251D87C2D0E5CBDAEEC0CCE7
+      B8C3E2B4BCDFB3BBDEB5BCDEB5BDDEB6BDDEB7BFDEB8C0DDB9BFDDBDC3DFC2CA
+      E1CBD4E7D6E1EE5452A3251D87251D875552A3DBE6F0D2DAE8CBD1E1C8CDDEC7
+      CADDC7CBDDC9CDDDCBCEDECED2E0D0D4E2D4D9E4D8DEE8DDE5ECE4EDF1A0A2CD
+      251D87251D87251D87251D87A9ACCDE0E4E4DCDEDED9D9D9D6D7D7D7D7D7D8D8
+      D8D9D9D9DADADADADADADADADADBDCDCDCDCDCDDDDDDDEDFDFDEDFDFDFDFDFDF
+      E0E0E2E3E3E4E6E6E8EBEBECF0F0E4E9F0322B8E251D87251D87251D877E7CB7
+      EBEFEFE9ECECEAEDEDEDF2F25854A3251D87251D87251D87EEF3F3E9ECECE6E7
+      E7E3E4E4E2E3E3E3E4E4E6E7E7E9EBEBEDF0F0E4E8EF322B8E251D87251D8725
+      1D87A4A4CCEBEEEEE9EBEBE9EBEBEBEEEEEFF3F3251D87251D87251D875954A3
+      F3F8F8F3F8F8CCCFE3322B8E251D87251D87251D87726FB1EFF3F3ECEEEEE9EB
+      EBE7E8E8E6E7E7E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7959595959595949494949494949494949494949494949494949494949494
+      939393939393989999A1A6A6AFB9B9C1D2D2241C8A241C8A241C8A4F4EA0BFCF
+      CFB0BABAA8B0B0A9B1B1B2BEBEB8C8CE2F2890241C8A241C8A241C8A777DB3BD
+      CBCBAFB8B8A5AAAAA3A7A7AAAFAFB6C0C09FA8C4241C8A241C8A241C8A45429C
+      7C81B8868DBEA2ADC9B2BECCC3D0D0C1CDCDBECACABCC8C8B9C5C5B8C2C2B4BF
+      BFB1BABAACB3B3A5ACACA0A5A5A1A6A6A8B0B0B5C1C19CA7C3241C8A241C8A24
+      1C8A9BA7C2B1BDBDA0A7A7959797919393989C9CA5AFAFB8C8C84E4DA0241C8A
+      241C8A241C8ABACCCCA5B1B1959A9A8B8D8D8397D28EA8ECA1BEF193A8DB241C
+      8A241C8A241C8A717DC1A8C5F396B3EF90ABED96B1EFA7C5F35E65B3241C8A24
+      1C8A241C8A4C4EA5B4D2F6A0BCF28EAAEE819CEB7B94E9778FE9758DE8748DE8
+      748CE8748CE8738CE8768DE38794C197999E999A9A9CA0A0A3AAAAADBBBEB5D2
+      EF4C4EA5241C8A241C8A241C8A5E65B3A9C5F394AFEE8CA5EC90A8EC9EBAF0B4
+      D1F5241C8A241C8A241C8A4C4EA6B9D5F5A3BCF092A9EB879BDD898FA98B8B8B
+      8B8B8B8E8E8E9294949CA1A1AAB2B2BCCACA99A5C7241C8A241C8A241C8A767B
+      B2BCC8C8B7C0C0BAC4C4C4D2D2504EA1241C8A241C8A504EA1C7D4D4BEC9C9BE
+      C8C8C5D2D26667AC241C8A241C8A241C8A6869AE7E82B99FA8CBA5AECAC1CCD3
+      CAD5D5C8D3D3C8D2D2C7D0D0C6CFCFC5CDCDC3CBCBC1C8C8BEC4C4BDC2C2BFC5
+      C5C6CECED1DCDC3B3696241C8A241C8A47439CD5E4EDC6D4EBBCC8E5B6C0E1B2
+      BBDFB4BBDEB4BBDDB5BDDEB6BDDEB7BEDDB8BFDDBAC0DDBCC4E0C3CAE3CBD4E8
+      D7E2EE5351A5241C8A241C8A5451A5DAE5EFD2D9E8CBD1E1C8CDDFC6CADDC7CC
+      DDC9CEDECCD0DFCFD4E2D4D9E4D8DEE8DEE5EDCCD3E5625FAC241C8A241C8A24
+      1C8A241C8A49449DE4E9E9DEE2E2DBDCDCD9D9D9D7D7D7D8D8D8D9D9D9D9D9D9
+      DADADADADADADADADADBDBDBDDDDDDDDDEDEDFDFDFDFE0E0E0E1E1E2E4E4E5E7
+      E7E8EBEBECF0F0E3E8EF4B459F241C8A241C8A241C8A241C8AAFB0D2EAEDEDE8
+      EBEBEAEDEDEDF2F25753A5241C8A241C8A241C8AEFF3F3EAECECE6E7E7E3E4E4
+      E2E2E2E3E3E3E4E4E4E6E8E8EAECECEEF2F28B8AC0241C8A241C8A241C8A6561
+      ACEDF0F0EAECECEAECECEBEEEEF0F4F4241C8A241C8A241C8A5853A6F3F8F8CC
+      CFE3312A91241C8A241C8A241C8A4B459EF0F4F4EDEFEFEAEBEBE8E8E8E6E7E7
+      E6E7E7E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F0F0
+      F0F0F0F0F1F1F1F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F79595
+      9595959595959595959595959595959595959595959595959595959594949494
+      9494999A9AA2A7A7B0BABAC2D2D2221B8C221B8C221B8C4D4DA2C4D6D6B7C4C4
+      B1BCBCB4C0C0BFCECE5859A7221B8C221B8C221B8C4D4DA2C0D0D0B2BCBCA6AC
+      AC9FA2A2A1A5A5A9AFAFB7C2C2A0AAC6221B8C221B8C221B8C221B8C221B8C22
+      1B8C221B8C221B8C221B8C3733964C4BA06C6EAE7579B2939CC09BA5C1BFCECE
+      BAC6C6B2BCBCA9B1B1A6ADADAAB3B3B7C3C39CA8C4221B8C221B8C221B8C9BA7
+      C3B2BEBEA0A7A7949797919393999D9DA6AFAFB9C9C94C4DA1221B8C221B8C22
+      1B8CBACCCCA5B0B0959A9A8A8C8C8398D98FA9ECA2BFF193A8DC221B8C221B8C
+      221B8C707CC2A9C6F399B5F096B1EF9DBAF1A7C4EE221B8C221B8C221B8C221B
+      8C96ACDDA7C5F393AFEF849EEB7B95E9778FE8758DE8748DE8748DE8748DE974
+      8DE9758DE8748DE8748DE8778EE38693BF979898979FAE96AEE2A6C4F3A9C3EA
+      221B8C221B8C221B8C221B8CAAC5EE9CB8F092ABED93ACED9FBAF0B4D1F5221B
+      8C221B8C221B8C747FC2B4D1F59FB7EB94A0BA8F91918B8B8B8C8C8C8D8D8D8E
+      8E8E9393939A9D9DA8AFAFB9C6C6A1AFCB221B8C221B8C221B8C777CB5BFCCCC
+      B8C2C2BBC5C5C5D2D24E4EA2221B8C221B8C4F4EA3C8D5D5C0CBCBC0CACAC8D5
+      D54F4EA3221B8C221B8C221B8C221B8C221B8C221B8C221B8C221B8C221B8C4E
+      4DA14E4CA17A7DB68588BBA5ADCAB9C3D1CDD7D7C9D1D1C6CECEC6CDCDCAD3D3
+      D4E0E0221B8C221B8C221B8C514FA4D5E1E6C5D2EBBBC6E5B6BFE1B3BCDEB4BB
+      DEB4BCDEB6BDDFB7BEDEB8BFDEB9BFDEBAC1DEBDC4DFC3CBE3CCD6E8D7E2EF52
+      50A7221B8C221B8C5250A7DBE5EFD2D9E8CCD1E2C8CCDFC6CADDC8CCDECACFDF
+      CFD3E2D2D8E4D9E0E9DFE7EE8F91C62E2993221B8C221B8C221B8C221B8C2F29
+      92C1C5DAE1E5E5DDDFDFDADBDBD8D9D9D8D8D8D8D8D8DADADADBDBDBDBDBDBDB
+      DBDBDBDBDBDCDCDCDEDEDEDEDFDFE0E1E1E1E2E2E3E4E4E5E8E8E9ECECEDF1F1
+      BCBFDC3C3799221B8C221B8C221B8C221B8C4944A0ECF0F0E9EBEBE8EAEAE9EC
+      ECEEF2F25652A7221B8C221B8C221B8CEFF3F3EAECECE6E7E7E3E4E4E2E2E2E3
+      E3E3E4E4E4E6E6E6E9EAEAEDF0F0D8DBEA221B8C221B8C221B8C3C379AEEF2F2
+      EBEEEEEAEDEDECEFEFF0F4F4221B8C221B8C221B8C5652A7E6EAF13C379A221B
+      8C221B8C221B8C4945A0E3E7EEEDF0F0EAECECE8E9E9E7E8E8E7E7E7E6E6E6E6
+      E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5
+      F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7969696969696
+      969696969696959595969696969696959595959595959595959595949494999A
+      9AA2A7A7B1BABAC2D2D2211A8E211A8E211A8E4C4CA3CDE2E2C2D3D3BECECEC3
+      D3D396A3C7211A8E211A8E211A8E2C2793BCCCD3B6C2C2A8AFAF9BA4B4989DA6
+      9FA1A1A9AFAFB7C2C2A0AAC7211A8E211A8E211A8E211A8E211A8E211A8E211A
+      8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E49
+      479E989FB5AEB7B7AEB8B8B8C5C59DA8C5211A8E211A8E211A8E9CA8C5B3BFBF
+      A2A9A9959898929494999E9EA6B0B0B9C9C94C4CA3211A8E211A8E211A8EBBCD
+      CDA6B1B1959A9A8A8C8C829BEA8FAAEDA3C0F293A8DD211A8E211A8E211A8E70
+      7BC3AAC7F39CB8F09AB7F0A6C2F38090CF211A8E211A8E211A8E4A4CA9B2D1F6
+      9CB9F18AA5ED7F98EB7991EA758EE9758EE9758EE9758EE9758EE9758EE9758E
+      E9758EE9768EE9768EE9768EE97D92DF8198E68AA4EC9CB8F1B2D0F65459B021
+      1A8E211A8E211A8E8091CFA4C0F298B1EF96B0EEA0BBF1B5D1F5211A8E211A8E
+      211A8E737FC3B8CDE0A6B2B5999E9E9091918C8C8C8E8E8E8F8F8F9090909393
+      939C9F9FA8B0B0B9C6C6A1AECB211A8E211A8E211A8E777CB6C0CCCCB9C3C3BB
+      C6C6C5D3D34E4DA4211A8E211A8E4E4DA4C8D5D5C1CBCBC1CBCBC9D5D54E4DA4
+      211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A
+      8E211A8E211A8E211A8E211A8E211A8E3733984D4AA1CCD5D5CED8D8D6E2E221
+      1A8E211A8E211A8E504FA6D6E1E1C6D3EABDC7E6B7C0E2B3BDDFB4BCDFB5BDDF
+      B6BDDFB7BEDFB9C0DEBAC0DEBAC1DEBEC5E0C4CCE4CDD7E8D8E3EF5150A8211A
+      8E211A8E5250A8DBE5EFD2DAE8CCD2E3C8CDDFC7CBDEC9CEDFCDD2E1D1D7E4D8
+      DEE9DFE7EF6B6AB4211A8E211A8E211A8E211A8E211A8E4743A1CED3E1E3E7E7
+      DDE0E0DBDCDCDADADAD9D9D9D9D9D9DADADADBDBDBDCDCDCDCDCDCDCDCDCDDDD
+      DDDDDDDDDEDFDFDFDFDFE1E2E2E3E5E5E6E9E9EAEEEEE1E5ED6F6DB6211A8E21
+      1A8E211A8E211A8E211A8E2E2895C8CAE0E9ECECE7E9E9E8E9E9EAECECEEF2F2
+      5552A9211A8E211A8E211A8EEFF3F3EAEDEDE7E8E8E4E5E5E3E3E3E3E3E3E3E3
+      E3E5E5E5E8E9E9ECEFEFF1F5F5211A8E211A8E211A8E211A8EEFF3F3ECEFEFEB
+      EEEEEDF0F0F0F4F4211A8E211A8E211A8E4944A24944A2211A8E211A8E211A8E
+      4944A2E6E9F0EFF2F2ECEEEEE9EAEAE7E8E8E7E7E7E6E6E6E6E6E6E6E6E6E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECEC
+      ECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F797979797979797979797
+      9797979797969696979797969696969696969696959595959595999A9AA2A7A7
+      B1BABAC3D3D31F19911F19911F19914B4CA6CEE3E3CEE3E3CCE0E0C3D6DE3531
+      9B1F19911F19911F199197A4C9C0D0D0AFB9B999ABD28AA2E9859DE889A0E498
+      ACDCADC0DC99A7D01F19911F19911F19919CA6CCA8B4D29DA7CC787DB96163AD
+      4B4AA335329A1F19911F19911F19911F19911F19911F19911F19911F1991959C
+      BAB3BDBDB2BCBCBAC6C69CA8C61F19911F19911F19919EAAC8B5C2C2A3AAAA97
+      9A9A939595999E9EA7B1B1BACBCB4A4BA51F19911F19911F1991BCCFCFA7B2B2
+      969C9C8B8E8E849DEB91ACEEA4C0F294AADD1F19911F19911F19916E7BC4AAC8
+      F49FBBF19FBBF1ABC8F45C63B81F19911F19911F19918396D1A9C7F495B0EF85
+      9FEC7B94EA7790E9778FE9768FE9768EE9768EE9768EEA768EEA768FE9768EE9
+      768EE9778FEA778FE97790E97C95EA849EEC95B0EFAAC7F48495D11F19911F19
+      911F19915257B2ABC6F39CB6F099B3EFA1BDF1B5D2F51F19911F19911F199155
+      57ABBFD1D1ABB6B69DA2A29395958F90908F8F8F9090909292929798989FA3A3
+      ACB4B4BECCCC98A3C91F19911F19911F1991767BB7BFCBCBB8C2C2BCC6C6C6D3
+      D34C4CA61F19911F19914D4CA6C9D6D6C1CBCBC1CACAC8D4D45859AB1F19911F
+      1991423FA2C2CFDEABB5D3878DC17A7DB95757A94C4BA42A26951F19911F1991
+      1F19911F19911F19911F19911F19912A2695D0DBDBD1DCDCD7E3E32B26961F19
+      911F19914340A2D8E4E4CBD5E1C0CAE8B8C2E3B5BDE1B5BDE0B6BEE0B7BEE0B9
+      C0DFB9C0DFBAC1DFBBC2DFBEC5E1C5CDE5CED7E9D9E3F0504FAA1F19911F1991
+      504FAADBE5F0D2DAE8CCD3E3C9CDE0C8CDDFCCD1E1D0D4E4D6DBE8DEE5EE6A69
+      B61F19911F19911F19911F19912C27968585C1E5EBEBE1E6E6DEE1E1DCDDDDDA
+      DBDBDADADAD9D9D9DADADADADADADBDBDBDCDCDCDCDCDCDCDCDCDDDDDDDDDDDD
+      E0E0E0E2E3E3E4E5E5E7E9E9EBEEEEBBBDDB2C26971F19911F19911F19911F19
+      911F19912C2797C8CAE0EBEEEEE8EAEAE6E7E7E7E8E8EAECECEEF2F25451AB1F
+      19911F19911F1991EFF3F3EAEDEDE7E8E8E4E5E5E3E3E3E3E3E3E4E4E4E6E6E6
+      E8EAEAECEFEFF1F5F55451AB1F19911F19911F1991F0F4F4ECEFEFECEEEEEDF0
+      F0F0F4F41F19911F19911F19911F19911F19911F19911F19912C2797CCCFE5F2
+      F6F6EEF0F0EAECECE8E9E9E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEAEAEAEAEAEAEBEBEB
+      EBEBEBEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F79898989898989797979797979797
+      979898989797979797979797979696969696969696969A9B9BA3A8A8B1BABAC3
+      D3D31E17931E17931E179334319D767DBB767DBB767DBB5557AC1E17931E1793
+      1E1793767DBBCEE3E3BECDCDA8BAD493ACEC8AA2EA859EE989A1EA92ABECA2BD
+      F0A3BCE91E17931E17931E17937D8BCCCBE6F5C5DFF2BBD4EEBCCFE0C5D0D0C6
+      D2D2C8D6D6B8C4D4A7B3D2858CC24C4BA81E17931E17931E1793A2ABC2B6C0C0
+      B3BEBEBAC7C79DA9C81E17931E17931E1793757BB9B9C7C7A7AFAF9A9E9E9699
+      999CA1A1A9B3B3BDCECE494AA71E17931E17931E1793C0D3D3AAB6B6989F9F8C
+      94A287A0EC93AFEFA7C4F396ABDF1E17931E17931E17936D79C5ABC8F4A0BCF2
+      A2BFF3AFCDF53D3DA61E17931E17931E1793A7C2EBA4C0F390ABEF819BEC7993
+      EA7790EA778FEA778FEA768FEA778FEA778FEA768FEA778FEA768FEA768FEA78
+      90EA7890EA7890EA7A92EA839CEC90AAEFA3C0F3B1CDF11E17931E17931E1793
+      3331A0AECBF5A0BBF19CB6F0A4BFF1B6D3F61E17931E17931E1793292498C7DA
+      DAB3C0C0A3ABAB999D9D9495959192929293939696969B9E9EA5ABABB3BEBEC4
+      D4D46D71B71E17931E17931E1793949DC4BEC9C9B8C1C1BCC5C5C6D3D34C4BA8
+      1E17931E17934C4BA8C9D5D5C0CACABFC8C8C6D1D1787CBA1E17931E17931E17
+      93CDDCE4D9EAEAD3E0E0CDD8D8CAD5D5CBD5D5CDD8D8D1DDDDA9B2D0ACB6D57D
+      81BE2A24991E17931E17934D4BA8D2DDDDD1DBDBD5E0E05A5AAF1E17931E1793
+      1E1793C4CFDED1DBDCC4CFE8BCC7E5B7C0E2B6BFE1B9C0E1BAC1E0BAC2E0BBC2
+      E0BCC3E1BDC4E0C0C7E2C7CEE5CFD7EAD9E4F04F4DAC1E17931E1793504EACDC
+      E6F0D3DBE9CDD4E4CACEE0CACEE1CED2E2D3D8E6DAE1EBB2B6DA1E17931E1793
+      1E17931E1793514EABD0D6E6E5EBEBE2E5E5DEE0E0DCDEDEDBDCDCD9DADADADA
+      DADADADADBDBDBDBDBDBDCDCDCDDDDDDDDDDDDDDDDDDDEDEDEDFE0E0E1E1E1E3
+      E4E4E6E9E9EBEEEEA0A1CF1E17931E17931E17931E17931E17931E1793615DB2
+      E2E5EDECEFEFE9EBEBE6E8E8E6E7E7E7E8E8EAECECEEF2F2534FAC1E17931E17
+      931E1793F0F4F4EBEEEEE8E9E9E5E6E6E4E4E4E4E4E4E5E5E5E7E7E7E9EBEBED
+      F0F0F1F6F61E17931E17931E17931E1793F0F3F3EDF0F0ECEEEEEEF0F0F1F5F5
+      1E17931E17931E17933933A02B25991E17931E17932B2599E7EBF3F2F6F6EEF1
+      F1EBECECE9E9E9E8E8E8E7E7E7E8E8E8E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBECECECECECECECECECEBEBEBEBEBEBEBEBEBECECECECECECECECECECECEC
+      ECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7989898989898999999989898989898989898
+      9898989797979797979797979696969696969B9C9CA3A8A8B1BBBBC3D3D31C16
+      951C16951C16951C16951C16951C16951C16951C16951C16951C16951C169580
+      89C1C3D6DEBED3DFA7C2F198B2ED8DA6EB889FE989A0E990A9EB9EB8EFB1CDF4
+      3130A21C16951C1695474AAEC8E5F9BCD9F7B0CCF4A8C3F2B8C6D2C0C9C9C4CE
+      CECBD8D8D4E5E5D5E7E75658AF1C16951C169527239AC1CECEB7C1C1B4BEBEBB
+      C8C89EAAC91C16951C16951C1695757CBCC0D0D0AEB8B8A1A7A79CA1A1A2A9A9
+      B0BCBCC2D5D53D3CA31C16951C16951C1695BACED6AFBEBE9EA7A7939DAF8EA9
+      EE9BB6F1AECBF58FA2DA1C16951C16951C16957583CDA9C6F4A0BDF2A4C1F3B2
+      D0F61C16951C16951C16951C1695B7D5F79FBBF28DA8EE8099EC7992EB7891EB
+      7891EB7891EA7890EB7790EB7790EB7790EB7790EA7790EA7890EA7890EB7991
+      EB7891EB7A92EA809AEC8DA7EEA0BBF2B7D5F727239B1C16951C16951C1695B3
+      CFF6A3BEF29EB9F1A5C0F2B7D4F61C16951C16951C16951C16958A96C6BECECE
+      AFB9B9A3A9A99CA0A0999B9B9A9C9C9DA0A0A5AAAAB0B8B8BECBCBC2D2DA2723
+      9A1C16951C16951C1695B2BDCDBBC5C5B7BFBFBCC5C5C6D3D34A4AA91C16951C
+      16954B4AAAC9D5D5BFC8C8BDC5C5C3CDCDACB7CF1C16951C16951C1695929ACA
+      D7E7E7D0DCDCC9D2D2C6CECEC4CDCDC8D0D0CDD7D7D5E1E1DCEBEBD0DEE61C16
+      951C16951C16956F71B9D1DBDBCED7D7D2DCDC878BC21C16951C16951C169572
+      74BCD8E3E3CDD6DDC2CEE9BDC7E6BDC5E5BDC5E4BDC6E3BEC7E3BFC7E3C0C8E3
+      C1C7E3C3CAE4C9D1E7D1DAEBDAE6F14E4DAE1C16951C16954E4DAEDFE8F1D6DE
+      EBD0D6E6CED2E4CDD2E3D1D5E5D6DCE9DEE5EE6868B91C16951C16951C16956A
+      6ABAEAF3F5E5EBEBE2E6E6DFE2E2DEDFDFDCDDDDDBDCDCDADBDBDBDBDBDADADA
+      DBDBDBDCDCDCDCDCDCDEDEDEDEDEDEDEDEDEDFDFDFE1E1E1E2E3E3E6E7E7E9EC
+      ECB9BBDB1C16951C16951C16951C16951C16953732A1BCBEDDEEF2F2ECEEEEE9
+      EBEBE7E8E8E6E6E6E6E6E6E7E8E8EAEDEDEFF3F3524FAE1C16951C16951C1695
+      F0F4F4ECEEEEE8EAEAE6E7E7E5E5E5E5E5E5E6E6E6E7E8E8EAECECEEF1F1D8DB
+      EB1C16951C16951C16953732A2F0F3F3EDEFEFECEEEEEEF0F0F1F5F51C16951C
+      16951C1695524FAEB0B2DA1C16951C16951C16954541A8E6E9F1EFF2F2ECEEEE
+      EAEAEAE9E9E9E8E9E9E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBECECECECECECECECECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F799999999999999999999999999999999999998989898
+      98989797979797979797979696969B9C9CA4A9A9B1BBBBC3D3D31B15971B1597
+      1B15971B15971B15971B15971B15971B15971B15971B15971B15971B15972622
+      9C8EA0DAB2CDF4A2BCF095ADED8CA4EB89A2EB8EA7EC9AB4EFABC6F26C78C71B
+      15971B15971B15979DB2E1BDDAF7B0CCF4A6C1F2A8BEE5BDC5C5C2CCCCCAD7D7
+      D4E4E4BFCEDE1B15971B15971B15975F61B2C0CCCCB7C0C0B5BFBFBDCACAA0AC
+      CC1B15971B15971B15973D3CA5C8DBDBB8C5C5ACB5B5A8B0B0ADB8B8B9C8C8C0
+      D3DB1B15971B15971B15971B159792A1CAB9CACAA8B5B59EADC09CB6F1A7C3F3
+      B9D6F76670C21B15971B15971B159790A5DFA7C3F4A0BCF3A4C1F3B4D2F71B15
+      971B15971B15974549B0B4D3F79DB9F28BA6EF7F99EC7992EB7991EB7991EB78
+      91EB7891EB7891EB7891EB7890EB7891EB7890EB7991EB7992EB7991EB7991EB
+      7A92EB8099EC8CA6EF9EB9F2B4D2F74549B01B15971B15971B1597B5D1F6A4BF
+      F2A0BAF1A6C1F3B7D4F61B15971B15971B15971B159726229CBFD1DABCCACAB0
+      BABAA8AFAFA5ABABA6ACACA9B0B0B1BABABDC9C9CADBDB5457B01B15971B1597
+      1B15974948AAC2CECEB8C0C0B6BDBDBDC6C6C8D6D64A4AAB1B15971B15974A4A
+      ABC9D5D5BFC7C7BBC2C2BFC7C7CAD5D5332FA11B15971B15973330A1D8E8E8D0
+      DCDCC8D2D2C4CCCCC2CACAC6CECECCD5D5D4E0E0DCEBEB7C80C21B15971B1597
+      1B1597B3BBD4CED6D6CBD2D2CDD5D5CAD3DB27239C1B15971B15971B1597AEB6
+      D7D7E1E1CED8E7C7D2EBC5CFEAC4CEE9C4CEE8C5CEE8C6CFE8C6CFE7C6CEE7C8
+      D0E8CDD6E9D5DFEEDEEAF34E4CAF1B15971B15974E4CAFE2EDF4DAE4EFD5DCEA
+      D1D7E6D1D6E5D3D8E7D8DEEAE0E7F04E4CAF1B15971B15971B1597DEE6F1E9F1
+      F1E4EAEAE2E6E6E0E2E2DFE1E1DFE0E0DCDDDDDCDDDDDBDBDBDBDCDCDCDCDCDD
+      DDDDDEDEDEDEDEDEDFDFDFE0E0E0E0E0E0E2E2E2E4E5E5E7E9E9EBEFEF514DAF
+      1B15971B15971B15971B15976C6ABCE4E8F0EEF1F1EBEDEDE9EAEAE7E8E8E6E6
+      E6E5E5E5E5E6E6E7E8E8EBEDEDEFF3F3514EAF1B15971B15971B1597F0F4F4EC
+      EEEEE8EAEAE6E7E7E5E5E5E7E7E7E8E8E8EAEBEBEDEFEFF1F4F49595CE1B1597
+      1B15971B15975F5CB5EFF2F2EDEFEFECEEEEEEF0F0F2F5F51B15971B15971B15
+      97514EB0F4F9F9A2A3D41B15971B15971B15975F5DB6F1F5F5EEF1F1ECEDEDEA
+      EBEBE9E9E9E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F79B9B9B9A9A9A9A9A9A9A9A9A9A9A9A9999999999999999999898
+      989898989898989797979C9D9DA3A8A8B1BBBBC3D3D319149A19149A19149A30
+      2EA2747BBE747BBE747BBE747BBE5255B019149A19149A19149A19149A19149A
+      8090D4AEC9F39FB9F093ABED8CA5EC8DA6EC96AFEEA4BEF1ABC4EF24219F1914
+      9A19149A2F2EA6B8D3F3B7D3F6AECAF3A9C4F3BCCAD5C6D1D1CDDBDBCADAE23D
+      3CA919149A19149A19149AB3BFCFBBC6C6B4BDBDB5BEBEBFCDCDA2AED019149A
+      19149A19149A19149AA1B0D1C3D5D5BAC8C8B7C4C4BBCACAC6D9D97D88C21914
+      9A19149A19149A19149A3A3BA7C2D7D7B6C7C7ADC3D9ADC9F5B6D4F7BAD7F42F
+      2EA619149A19149A19149AA9C4F0A3BFF39DB9F2A3C0F3B4D2F719149A19149A
+      19149A4448B2B4D3F79DB9F28CA6EF809AED7A92EC7A92EC7992EC7992EC7992
+      EC7991EC7991EC7891EC7991EB7991EB7991EB7A92EC7A92EC7B92EB7B92EB81
+      99EC8CA6EE9DB9F2B5D2F74448B219149A19149A19149AB5D2F6A5C0F3A0BAF1
+      A7C2F3B8D4F719149A19149A19149A19149A19149A3B3BA8BECED7BFCECEB8C4
+      C4B6C1C1B7C1C1BAC6C6C2CFCFCBDCDC5F63B719149A19149A19149A19149A9D
+      A8C9BDC7C7B6BDBDB6BDBDBFC8C8CCD9D94949AE19149A19149A4949AECAD6D6
+      BFC6C6B9BFBFBBC1C1C4CDCD8B91C319149A19149A19149A6265B8D4E2E2CED9
+      D9C9D2D2C8D0D0CAD3D3CFDADAD7E4E4B8C3DD19149A19149A19149A4A49ADD1
+      DADAC9CFCFC5CBCBC8CECED0D8D8797DBF19149A19149A19149A25229FAEB6D8
+      DAE4E6D3DFEDCFDBEFCEDAEECFDAEECED9EDCFDAEDC3CCE7C2CAE6CFD8EBD3DD
+      EDDAE5F1E3EFF74C4BB219149A19149A4C4CB2E7F2F8E0EBF3DBE3EFD7DEEBD6
+      DCEAD7DDEADBE1ECE1E9F14D4CB119149A19149A19149AECF5F5EBF2F2E7ECEC
+      E4E8E8E2E6E6E2E5E5BBBCD5DFE1E1DEDFDFDEDEDEDDDDDDDDDDDDDEDEDEDFDF
+      DFDFDFDFDFDFDFE0E0E0E0E0E0E2E3E3E5E6E6E9EBEBD3D6E719149A19149A19
+      149A19149A7978C3F1F6F6EEF1F1EAEDEDE9EAEAE7E8E8E7E7E7E6E6E6E6E6E6
+      E6E7E7E8E9E9EBEDEDEFF3F3504DB219149A19149A19149AF1F5F5EDF0F0EAEB
+      EBE8E9E9E7E8E8E8E8E8E9EAEAECEEEEEFF2F2E5E9F12722A019149A19149A19
+      149AA0A1D3EEF1F1ECEEEEECEEEEEEF0F0F2F5F519149A19149A19149A504DB2
+      F5F9F9F5F9F96C6ABD19149A19149A19149A6B6ABDF1F4F4EFF1F1ECEEEEEBEB
+      EBEAEAEAE9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAE9E9E9EA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEAEAEAEBEBEBEAEAEA
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F79C9C9C9B9B9B9A9A9A9A9A9A9A9A9A9A9A9A9A9A9A999999999999999999
+      9898989797979C9D9DA4A9A9B1BBBBC3D3D318139C18139C18139C4647AECEE3
+      E3C9DCDCC1D2D2BFCFCFC1D3D3B4C5D65155B418139C18139C18139C18139C92
+      A5E0A8C3F299B3EF90A9EC8DA5EC91A9ED9CB5EFABC6F3879ADA18139C18139C
+      18139C2E2DA898ACE2BAD7F7B5D2F6BBD3EECEDBDBBBC9DA3C3AAA18139C1813
+      9C18139C676CB9C1CCCCB7BFBFB2B9B9B6BFBFC1CECEA3B0D218139C18139C18
+      139C18139C231FA1A0AED1C6D9D9C5D7D7C9DDDD9FAFD1231FA018139C18139C
+      18139C2320A018139C5B60B6B6CAD2BCD5E4BEDCF9BAD7F45A61BF18139C1813
+      9C18139C4246B3ABC7F59DB8F29AB4F2A1BDF3B4D1F718139C18139C18139C2E
+      2CA8B6D4F79FBBF38DA7F0829AED7A93EC7A93EC7A93EC7A92EC7A92EC7992EC
+      7A92ED7A92EC7A93EC7A92EC7A92EC7B93EC7B93EC7B93EC7B93EC829BED8EA8
+      F0A0BBF3B7D4F7393AAE18139C18139C18139CB5D2F6A5C0F3A1BBF2A7C2F3B9
+      D5F718139C18139C18139C18139C18139C18139C241FA18891C6BCCBD3C5D4D4
+      C6D5D5CADADA97A1CC3B3AAA18139C18139C18139C18139C686DB9C2CECEB8C0
+      C0B2B8B8B5BCBCC0C9C9CEDCDC4848AF18139C18139C4848AFC9D5D5BDC5C5B7
+      BCBCB7BCBCBEC4C4C9D3D34747AE18139C18139C18139C6163B9CAD6DFD2DDDD
+      D0DBDBD2DDDDD5E2E29199CD2420A118139C18139C18139CB1B9D2CBD2D2C4C9
+      C9C2C5C5C4C8C8CAD0D0D4DDDD3D3BAA18139C18139C18139C18139C6465BBB9
+      C2DDDBE9F3DBE9F5DAE7F4CDD9EE8F96D2302CA7A5ACDAD5DFEFD9E4F1E0ECF5
+      E5F2F84B4BB318139C18139C4C4BB3E7F3F8E6F1F7E1EAF3DDE5F0DBE2EDDBE1
+      EDDDE3EEE1E9F17374C418139C18139C18139CAAAED9EDF4F4EBF1F1E8EEEEE7
+      ECECB2B4D7251FA1E2E4E4E0E1E1DEDFDFDEDEDEDEDEDEDEDEDEDFDFDFE0E0E0
+      E0E0E0E1E1E1E1E1E1E3E4E4E6E7E7EAEDEDB9BCDE18139C18139C18139C2621
+      A2F3F8F8F0F4F4EDEFEFEAECECE8E9E9E7E8E8E7E8E8E8E8E8E6E7E7E7E7E7E8
+      E9E9EBEDEDF0F3F34F4DB318139C18139C18139CF2F6F6EFF1F1ECEEEEEAEBEB
+      EAEBEBEAECECEDEFEFEFF2F2F2F6F66B69BF18139C18139C18139C3430A8F1F4
+      F4EEF0F0ECEDEDECEEEEEEF1F1F2F5F518139C18139C18139C4F4DB3F5F9F9F4
+      F8F8F4F8F84F4DB318139C18139C18139CA1A1D5F1F4F4EEF0F0ECEDEDEBEBEB
+      EAEAEAE9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEAEA
+      EAEAEAEAEAEAEAEBEBEBEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECEB
+      EBEBECECECECECECECECECEBEBEBEBEBEBECECECECECECECECECECECECECECEC
+      ECECECEDEDEDECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEEEEEEEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEEEEEEEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F2F2F2F1F1F1F2F2F2F1F1F1F2F2F2F2F2F2F1F1F1F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F2F2F2F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F4F4F4F4F4F4F4F4F4F3F3F3F4F4F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F4F4F4F4F4F4F5F5F5F4F4F4F4F4F4F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F6F6F6F5F5F5F6F6F6F6F6F6F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F6F6F6F7F7F7F7F7F7
+      F7F7F7F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F79C9C
+      9C9C9C9C9C9C9C9B9B9B9B9B9B9B9B9B9B9B9B9A9A9A9A9A9A99999999999998
+      98989D9E9EA4A9A9B2BBBBC3D3D316129E16129E16129E4447B0CBDFDFBDCCCC
+      B3BEBEAEB8B8B2BDBDBAC9CCC3DEF65A62C116129E16129E16129E2C2BA9B3CE
+      F5A1BBF194ADEE8DA5ED8DA5ED95AEEEA1BBF1AFCAF4555DC016129E16129E16
+      129E16129E3739AF6D79CC6D79CC5254B616129E16129E16129E16129E3939AA
+      C5D1D1B9C2C2B2B8B8B1B6B6ACB3BC979FC37E86C416129E16129E16129E2D2C
+      A716129E16129E3939AB4446AF3939AB16129E16129E16129E16129E2D2CA670
+      79BF16129E16129E211EA24246B44246B5211EA416129E16129E16129E16129E
+      8DA3E1A2BDF396B1F195B0F19FBAF3B1CFF6211FA416129E16129E16129EBBD8
+      F9A4BFF491ABF1839DEF7D96ED7B94ED7B93ED7B93ED7A93ED7A93ED7A93ED7B
+      93ED7B93ED7B94ED7B93ED7C94ED7B93ED7C94ED7E97EC849DEE92ABF0A4BFF4
+      BBD8F816129E16129E16129E16129EB4D0F6A5BFF3A0BAF2A7C2F4B9D5F71612
+      9E16129E16129E4547B05C61B916129E16129E16129E16129E4546B04546B016
+      129E16129E16129E16129E16129E16129E3939ABC5D2D2BAC3C3B3B8B8B2B6B6
+      B6BCBCA1A7C2A0A9CD3B3AAC16129E16129E4647B0C7D2D2BDC3C3B5B9B9B4B8
+      B8B9BDBDC2CACAC2CCD43A3AAB16129E16129E16129E221FA36062BA777CC36C
+      70BF2F2CA816129E16129E16129E16129E8E93C8CED6D6C7CBCBC1C3C3BEC0C0
+      C0C2C2C5C9C9CDD4D4C9D2DB3C3BAC16129E16129E16129E16129E16129E1612
+      9E302DA916129E16129E16129E16129EA9B1DEDAE5F24848B416129E16129E16
+      129E16129E16129E16129E16129E16129E16129E16129E16129EACAFDBDDE4EE
+      E0E7F0B1B6DE16129E16129E16129E16129E7475C48283CA8182C93E3BAE1612
+      9E16129EE4E7E7E1E3E3E0E1E1DFDFDFDEDEDEDFDFDFE0E0E0E1E1E1E1E1E1E2
+      E2E2E2E2E2E4E5E5E7E8E8EAEDEDB9BBDE16129E16129E16129E4E4CB5F4F9F9
+      F1F5F5EEF0F0ECEDEDEAECECEAEBEBEAEBEBE9EAEAE8E9E9E8E9E9EAEBEBECEE
+      EEF1F4F44E4CB516129E16129E16129EF4F9F9F1F5F5EFF1F1EDEFEFEDEFEFEE
+      F1F1F1F4F4F3F7F76A68C016129E16129E16129E16129EA0A0D5EFF2F2ECEEEE
+      ECEDEDEDEEEEEFF1F1F2F6F616129E16129E16129E4E4CB5F4F8F8F2F6F6F2F5
+      F5E5E9F1403DAF16129E16129E16129EAEAFDBF1F4F4EFF1F1EDEEEEEBECECEB
+      EBEBEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECEBEBEBECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F79D9D9D9C9C9C
+      9C9C9C9C9C9C9B9B9B9B9B9B9B9B9B9B9B9B9A9A9A9A9A9A9999999999999C9D
+      9DA5AAAAB2BBBBC3D3D31510A11510A11510A14345B2C3D5D5B3BEBEA7AEAEA0
+      A6A6A2AAAEA8BFE7B5D0F5BBD5F3201DA61510A11510A11510A19CB2E7A8C2F3
+      98B1F08FA7EE8CA4ED8FA8EE98B1F0A3BDF2B0CBF57280D11510A11510A11510
+      A11510A11510A11510A11510A11510A11510A11510A15B5DB7BCC6CFBCC4C4B4
+      B9B9AEB2B2AEB3B3ACB2BB2B28A61510A11510A11510A11510A196A2CF3838AD
+      1510A11510A11510A11510A11510A11510A11510A11510A1A9BBD6CBE1E13737
+      AC1510A11510A11510A11510A11510A11510A11510A11510A1535BC1A9C5F599
+      B4F290AAF090ABF19BB6F3AECBF64145B71510A11510A11510A195ABE3A9C6F5
+      96B1F288A1EF7F97EE7C94ED7B94ED7B94ED7B94ED7B93ED7B94EE7B94ED7B94
+      ED7C94ED7C94ED7C94ED7C94ED7D95ED8098EE88A1EF97B0F2ABC6F5A0B7E815
+      10A11510A11510A14145B7B1CDF6A3BCF39FB8F2A7C1F4B9D5F71510A11510A1
+      1510A14445B2D2E5E55C60BA1510A11510A11510A11510A11510A11510A11510
+      A11510A11510A11510A1676BBCC6D2D2BDC5C5B5BABAB0B3B3B1B4B4B6BBBB6B
+      6CB41510A11510A11510A11510A12C2AA9C4CDCDBBC0C0B4B7B7B2B4B4B4B7B7
+      BCC1C1C4CCCCC1CCD44545B11510A11510A11510A11510A11510A11510A11510
+      A11510A11510A1211EA58D93C9CFD7D7C8CDCDC2C5C5BEC0C0BCBDBDBEBFBFC1
+      C3C3C8CCCCCED5D5CAD2DB6D6FC01510A11510A11510A11510A11510A11510A1
+      1510A11510A11510A11510A1AAB3DFDDE8F44847B61510A11510A11510A11510
+      A11510A11510A11510A11510A11510A11510A11510A1ACB0DCDCE3EEDEE5EFE2
+      E9EF7172C31510A11510A11510A11510A11510A11510A11510A11510A11510A1
+      E5E8E8E1E3E3E0E1E1E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E3E3E3E3E3
+      E3E4E5E5E7E8E8EBEDEDC7C8E31510A11510A11510A11510A1E6EAF3F2F6F6F0
+      F3F3EEF1F1EDF0F0EDF0F0EDEFEF9B9AD1EAECECEAEBEBEBECECEDEFEFF1F4F4
+      4D4AB71510A11510A11510A1F5F9F9F4F8F8F2F6F6F1F5F5F1F5F5F2F6F6BCBE
+      E23E3CB21510A11510A11510A11510A16967C1F1F4F4EEF0F0ECEDEDEBECECEC
+      EDEDEFF1F1F2F6F61510A11510A11510A14D4BB7F4F7F7F1F4F4F1F3F3F2F4F4
+      CACCE7231FA61510A11510A1221FA7CACCE7F2F4F4EFF1F1EDEEEEECECECEBEC
+      ECEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F79E9E9E9E9E9E9D9D9D9D
+      9D9D9D9D9D9C9C9C9C9C9C9B9B9B9B9B9B9A9A9A9999999999999D9E9EA5AAAA
+      B2BBBBC3D3D3130FA3130FA3130FA34244B3BECECEACB6B69EA4A4979A9A94A8
+      DE9DB5F0ACC5F3BDD9F7646EC9130FA3130FA3130FA36A76CDADC8F49CB5F090
+      A8EE8AA3ED8CA4ED91AAEE99B1F0A3BCF2ACC7F4A2BAEB535BC3130FA3130FA3
+      130FA3130FA3130FA3130FA34F50B69EA6CAC5CFCFBDC5C5B5BABAAFB2B2ACAF
+      AFADB1B1B3B9B99297BC130FA3130FA3130FA3130FA39EABD0BFCFD8585CB813
+      0FA3130FA3130FA3130FA3130FA32A29AAA1B0CBBDCECEB9CACAB0BFC8686EB8
+      1E1BA6130FA3130FA3130FA3130FA32929AE6F7DD2AAC6F69CB8F391AAF18BA4
+      F08DA6F097B2F2A9C6F66976CE130FA3130FA3130FA3626DCAB2CFF79DB8F48D
+      A7F1839CEF7E97EE7C95EE7C95EE7C94EE7C95EE7C94EE7C95EE7C95EE7D95EE
+      7D95EE7D95EE7D95EE8098EE849DEE8EA7F09DB8F3B2CEF7626DC9130FA3130F
+      A3130FA3606AC9ADC7F59FB9F39DB7F2A8C1F4B9D5F8130FA3130FA3130FA343
+      45B4D2E6E6D2E4E49FABD04243B2130FA3130FA3130FA3130FA3130FA3130FA3
+      4F51B69EA6CBC4CFCFBEC5C5B6BBBBB1B4B4AEB1B1B1B3B3B6BABABFC6C62A27
+      A9130FA3130FA3130FA3130FA3C0C7C7B9BDBDB3B5B5B1B2B2B1B3B3B6B9B9BD
+      C2C2C4CBCBCCD5D58A8FC73837AF130FA3130FA3130FA3130FA3130FA31F1DA7
+      5D5FBBBBC3D6CED5D5C8CECEC3C6C6BFC1C1BCBDBDBCBDBDBDBDBDBFC0C0C4C6
+      C6C9CDCDCED4D4D5DDDDAAAFD46163BF201DA8130FA3130FA3130FA3130FA313
+      0FA3130FA32D2BAEB5BEE4DBE6F34646B8130FA3130FA3130FA3130FA3130FA3
+      130FA3130FA3130FA3130FA3130FA3130FA3AAAEDBDBE0ECDCE1E6E0E4E4E4E8
+      E8A5A7D52E2BAD130FA3130FA3130FA3130FA3130FA3201DA84846B5E4E7E7E3
+      E5E5E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E2E2E2E2E2E2E3E3E3E3E3E3E5E5E5
+      E8E9E9EAECECEFF2F22F2CAE130FA3130FA3130FA35A58BEE6EAF4F3F7F7F2F5
+      F5F1F4F4C6C8E44A48B74A47B6ECEDEDEBECECEBECECEDEFEFF1F4F44C4AB913
+      0FA3130FA3130FA38484CE8484CE8484CE8384CE7676C92F2CAE130FA3130FA3
+      130FA3130FA3130FA34B49B8E3E7F0EFF1F1ECEEEEEBEBEBECECECEDEEEEEFF1
+      F1F3F6F6130FA3130FA3130FA34C4AB9F3F6F6F0F2F2EFF1F1F0F1F1F2F4F4BC
+      BDE2130FA3130FA3130FA3211EA8E5E8F1F0F2F2EEEFEFEDEDEDECECECEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEEEEEEEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F79F9F9F9F9F9F9E9E9E9E9E9E9D9D
+      9D9D9D9D9C9C9C9C9C9C9B9B9B9B9B9B9A9A9A9999999D9E9EA5AAAAB2BBBBC3
+      D3D3120EA5120EA5120EA54143B5BDCCCCA9B2B29CA0A091A0CC8EA7EE97B0F0
+      A5BEF3B8D3F791A3DF120EA5120EA5120EA56B77CFB1CBF59EB8F292AAEF8BA3
+      EE8AA2ED8DA4EE90A9EF97B0F09EB8F2A6C1F3ADC8F5B3CEF68DA1E28EA2E28E
+      A2E28DA0E2ADC3EBC6D0D0C1C9C9BBC2C2B5B9B9AFB2B2ABADADAAABABABAEAE
+      AFB3B3B5BCBCBBC3C3BEC8C8C0CBCBBFCBCBBDC9C9BCC8C8BBC8C8B2BFC9949E
+      C3949FC5949FC59CA7C4B6C4C4B1BDBDABB6B6A9B3B3AAB5B5ADB9B9B2C0C08A
+      9FE28CA1E28CA1E395ABE7ADC9F6A5C1F59BB5F392ABF18AA3F0879FEF89A3F0
+      93ADF2A4BFF59AB1E8120EA5120EA5120EA51C1BAAB0CCF4A7C3F695B0F388A2
+      F0829AF07E96EE7D96EF7C95EE7D95EF7D95EF7D95EE7D95EE7D96EE7D95EE7E
+      96EE7F98EE829AEF89A2F095AFF2A7C3F5BCD9F91C1BAA120EA5120EA5120EA5
+      9CB2E9A6C1F59CB5F39CB5F2A6C0F4B9D5F7120EA5120EA5120EA54244B5D2E4
+      E4C8D7D7C4D0D0C3CFCFBAC5CE9CA4C99DA5CB9DA6CC9DA6CCC9D5D5C6D0D0C1
+      C9C9BBC2C2B5B9B9B2B4B4AEB0B0AEAFAFB1B3B3B4B7B7BBC0C0C2CACAC7D0D0
+      C9D3D3C8D1D1C3CBCBBCC2C2B7BABAB2B4B4B0B1B1B0B1B1B3B5B5B8BBBBBCC1
+      C1C2C8C8C8D0D0CCD5D5B8C0D3A2A8CEA3A9CFA3AACFAEB5D1D0D9D9CED5D5CB
+      D1D1C6CBCBC2C5C5BFC1C1BEBEBEBCBCBCBBBBBBBDBDBDBEBEBEC1C2C2C4C6C6
+      C9CCCCCED3D3D4DBDBDBE4E4E3EEEEBCC5E24747B8120EA5120EA5120EA5888D
+      CFDEE8EDD8E1EED6E0F0DAE5F2E0ECF6E6F2F94747BA120EA5120EA54847BAE9
+      F3F9E9F2F8E4EDF5DFE7F1DDE3EDDBDFE6DADCDDDBDDDDDDDFDFDFE2E2E3E6E6
+      E6EAEAC0C3DFB3B6DBB4B7DCB4B7DCC1C3DFE7EBEBE6E9E9E3E5E5E2E3E3E1E2
+      E2E0E1E1E1E1E1E1E1E1E1E1E1E3E3E3E4E4E4E4E4E4E5E5E5E6E6E6E7E8E8EA
+      EBEBEDF0F0ABACDB120EA5120EA5120EA5120EA51F1DAA4A49BA4A49BA2D2BAF
+      120EA5120EA54A47B8EDEFEFECEDEDECEDEDEDEFEFF0F3F34B49BA120EA5120E
+      A5120EA5120EA5120EA5120EA5120EA5120EA5120EA5120EA5120EA5120EA512
+      0EA57575C9F2F5F5F0F2F2EEEFEFECEDEDEBEBEBEBEBEBEDEDEDEFF0F0F2F4F4
+      120EA5120EA5120EA52E2BAFF2F5F5F0F1F1EEF0F0EEF0F0F0F1F1F2F5F59FA0
+      D9120EA5120EA5120EA53C3AB4E4E6EFF0F1F1EDEEEEEDEDEDECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECECECECECECEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEFEFEFEFEFEFEFEFEFEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F79F9F9F9F9F9F9F9F9F9E9E9E9E9E9E9D9D9D
+      9D9D9D9C9C9C9B9B9B9B9B9B9A9A9A9999999D9E9EA5AAAAB2BBBBC2D2D2100D
+      A8100DA8100DA84043B7BDCCCCA9B2B29AAAD18FA8EE8FA7EE97AFF0A5BEF2B6
+      D1F69CB0E5100DA8100DA8100DA83E43BDB2CCF5A1B9F293ABEF8BA3ED89A1ED
+      8BA3EE8DA4EF90A8EF95ADF09AB3F19FB9F2A4BDF3A7C1F4A8C2F4A8C2F4A7C1
+      F3A4BDF3B1BED3B8BCBCB4B7B7AFB1B1ADAEAEAAABABAAAAAAAAACACACAFAFAF
+      B3B3B2B7B7B3BABAB3BABAB3BABAB0B7B7AFB6B6AFB7B7AFB8B8B1BABAB1BBBB
+      AFB9B9ACB5B5A6AFAFA2A9A99FA5A59CA2A29DA4A49FA7A7A3ABABA1BDF4A4BF
+      F5A4BFF5A1BCF49CB6F496B0F390A9F28AA3F1859EF0839DF0869FF08FA9F29E
+      B9F4B1CEF73235B7100DA8100DA8100DA86B79D1B3D0F8A1BCF591ABF287A1F1
+      829BF08098EF7E96EF7D96EF7E96EF7E96EF7E96EF7E96EF7E96EF8098EF849C
+      F088A0F091ABF1A0BBF4B3D0F86B79D1100DA8100DA8100DA82728B2B4D0F7A1
+      BAF399B1F29AB3F2A7C0F4BAD5F8100DA8100DA8100DA84144B8CDDCDCC1CCCC
+      BCC5C5BAC1C1BBC2C2BEC6C6C1C9C9C1C9C9C1C9C9BEC5C5BBC1C1B8BDBDB4B8
+      B8B2B4B4AFB0B0AEAEAEAFAFAFB0B2B2B5B7B7BABEBEBFC5C5C3CBCBC5CDCDC4
+      CCCCC1C7C7BBC0C0B6B9B9B3B4B4B0B1B1B1B1B1B2B2B2B4B5B5B8BABABBBFBF
+      BFC4C4C3C8C8C6CDCDC9D0D0C9D1D1CAD1D1C9CFCFC8CDCDC5CACAC3C6C6C0C2
+      C2BFC1C1BCBDBDBCBCBCBBBBBBBCBCBCBEBEBEBEBFBFBFC0C0C2C3C3C5C6C6C7
+      CACACDD2D2D5DCDCDEE7E7CAD4E7100DA8100DA8100DA87A7FCCE2EBEBDBE1E1
+      D6DADAD4D9DBD8DEE6DEE7EFE6F1F74647BC100DA8100DA84647BCE9F3F8E4EC
+      F3DFE6EBDDE1E4DBDEDEDADCDCD9DADAD9DADADADCDCDDDEDEDFE1E1E2E4E4E3
+      E6E6E4E7E7E5E8E8E6E9E9E6E9E9E5E7E7E4E6E6E2E3E3E2E3E3E2E2E2E1E1E1
+      E2E2E2E2E2E2E2E2E2E4E4E4E4E4E4E5E5E5E6E6E6E6E6E6E7E8E8E9EAEAECEE
+      EEEFF2F29D9ED8100DA8100DA8100DA8100DA8100DA8100DA8100DA8100DA810
+      0DA84847BBEEF0F0ECEEEEECEDEDEDEFEFEFF2F24947BC100DA8100DA8100DA8
+      100DA8100DA8100DA8100DA8100DA8100DA8100DA8100DA85857C0C8CAE7F1F4
+      F4EFF1F1EEEFEFECEDEDEBEBEBEAEBEBECECECEDEEEEEFF0F0F1F4F4100DA810
+      0DA8100DA8100DA8F1F3F3EFF0F0EDEEEEEEEFEFEFF0F0F1F2F2F3F5F55857C0
+      100DA8100DA8100DA84947BBF0F1F1EEEFEFEDEDEDECECECECECECECECECECEC
+      ECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEEEEEEEFEFEFEEEEEEEFEFEFEEEE
+      EEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F0F0F0F1F1F1F1F1F1F0F0F0F0F0F0F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7A0A0A0A0A0A09F9F9F9F9F9F9F9F9F9E9E9E9E9E9E9D
+      9D9D9C9C9C9B9B9B9B9B9B9A9A9A9D9E9EA5AAAAB2BBBBC3D3D30F0CAA0F0CAA
+      0F0CAA3F42B8BCCBCBA8B8CE99B2F191A9EF92A9EF9AB3F1A8C2F4BBD6F78495
+      DD0F0CAA0F0CAA0F0CAA6A77D2B2CCF69FB9F293ACF08CA5EE8AA1EE89A1EE8A
+      A2EE8CA4EF8EA6EF91A8EF94ACF096AFF198B2F19AB3F19AB3F199B1F196AFF1
+      97ADE9B1B3B3AFB0B0ADAEAEABABABAAAAAAAAAAAAAAABABABACACACAEAEACAE
+      AEACAFAFABAEAEA9ADADA7ABABA6A9A9A4A8A8A5A9A9A4A9A9A4A9A9A2A7A7A0
+      A4A49CA0A0989B9B959898949696949696959999959FB193ADF294AEF294AEF2
+      92ABF28FA9F18CA5F188A1F0859EF0839BEF829AEF859DF08CA5F197B2F3A9C4
+      F67B8CDB0F0CAA0F0CAA0F0CAA1A19AF9EB6EBAECAF79EB9F591AAF388A1F184
+      9CF18099F07F98F07E97EF7E97EF7F97EF8098EF8199EF839CF089A2F191ABF2
+      9EB8F4AFCAF7AAC3F01A19AF0F0CAA0F0CAA0F0CAA7D8DDBACC7F69BB3F394AD
+      F299B1F2A7C0F4BAD5F80F0CAA0F0CAA0F0CAA4043BBCAD7D7BEC6C6B6BCBCB3
+      B7B7B2B5B5B5BABAB8BCBCB8BCBCB8BCBCB7BABAB5B8B8B3B5B5B2B3B3B1B2B2
+      B0B0B0AEAFAFB0B0B0B1B2B2B4B6B6BABDBDBFC4C4C4CACAC5CCCCC5CCCCC2C8
+      C8BCC0C0B7BABAB3B5B5B1B1B1B0B0B0B1B2B2B3B4B4B5B6B6B7B8B8B9BBBBBC
+      BFBFBEC1C1C0C4C4C1C5C5C2C5C5C1C4C4C1C4C4BFC2C2BEC0C0BEBEBEBCBDBD
+      BCBCBCBCBCBCBEBEBEBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1C3C3C3C5C7C7CACC
+      CCD1D6D6DAE2E2A1A7D90F0CAA0F0CAA0F0CAAD9E3ECDEE6E6D7DCDCD2D5D5D2
+      D5D5D6D9D9DDE3E3E5EDED4646BC0F0CAA0F0CAA4646BCE7EEEEE1E6E6DCDFDF
+      DADCDCD9DADAD9D9D9D8D8D8D8D9D9D9DADADBDCDCDDDEDEDFE0E0E0E1E1E0E2
+      E2E1E3E3E2E4E4E2E4E4E3E4E4E2E3E3E1E1E1E2E2E2E1E1E1E3E3E3E3E3E3E3
+      E3E3E3E3E3E4E4E4E5E5E5E5E5E5E6E6E6E6E6E6E7E7E7EAEAEAEBECECEDEFEF
+      F0F2F2C7C9E76564C60F0CAA0F0CAA0F0CAA0F0CAA0F0CAA1D1BAF4846BC9B9B
+      D7EDEFEFECEDEDECECECECEDEDEFF0F06463C54847BC4947BD4947BD4948BD49
+      47BD4947BD4947BD4947BD6665C79E9FDAD6D9ECF2F5F5F1F3F3EFF1F1EEEFEF
+      EDEDEDECECECEBECECEBEBEBECECECECEDEDEEEFEFF0F2F24846BC4846BC4846
+      BC4846BCF0F2F2EFF0F0EEEEEEEDEEEEEEEEEEEFF0F0F1F2F2E4E5EF5755C148
+      47BC4847BC4846BC9B9BD7EFF0F0EEEEEEEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEE
+      EEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7A2A2A2A1A1A1A0A0A0A0A0A09F9F9F9F9F9F9E9E9E9D9D9D9D9D
+      9D9C9C9C9B9B9B9A9A9A9D9F9FA5AAAAB2BBBBC3D3D30D0AAC0D0AAC0D0AAC3D
+      40BABED3DEACC5F59EB7F298B1F19AB2F1A4BCF3B1CCF6C3DEF9555ECA0D0AAC
+      0D0AAC0D0AAC7381D7AFC9F69EB8F393ABF18DA4EF8AA2EF8AA2EF8AA2EF8AA2
+      EF8BA2EF8BA4EF8CA5F08EA6F08FA7F090A7F090A7F08EA7F08DA6F08CA4F0A1
+      AAC8AEAEAEADAEAEACACACABABABABABABAAABABAAAAAAAAAAAAA8A9A9A8A9A9
+      A6A7A7A5A6A6A3A4A4A1A2A29FA0A09D9F9F9C9E9E9C9E9E9A9C9C989A9A9697
+      979393939192929090908F90908F91918D95A989A2F189A2F189A2F189A1F188
+      A0F1859FF1849CF0839BF0829AF0829AF0839CF088A2F192ACF3A0BBF5B2CFF8
+      3B40C00D0AAC0D0AAC0D0AAC3033BBB3CEF5ADC9F79FBAF593AEF38CA6F287A1
+      F1859EF1839CF1839CF1849CF1869EF188A1F18DA6F294AFF39FBAF5AEC9F7B3
+      CEF53033BB0D0AAC0D0AAC0D0AAC3033BBB5D0F8A3BCF495ADF291A8F198B0F2
+      A6C0F5BBD6F80D0AAC0D0AAC0D0AAC3E41BECAD6D6BDC4C4B4B8B8AFB1B1AFB0
+      B0B0B2B2B2B3B3B2B4B4B3B4B4B2B3B3B1B2B2B2B2B2B1B1B1B0B1B1B0B0B0B0
+      B0B0B0B0B0B2B2B2B6B8B8BCBFBFC1C6C6C7CFCF9BA1C9A6ACCBC5CDCDBFC4C4
+      BABDBDB5B6B6B2B3B3B2B2B2B2B2B2B3B3B3B3B4B4B5B5B5B7B7B7B8B8B8B9BB
+      BBBABBBBBABBBBBCBDBDBCBDBDBCBDBDBCBDBDBBBCBCBCBCBCBCBCBCBDBDBDBD
+      BDBDBEBEBEBEBEBEC0C0C0C0C0C0C1C1C1C2C2C2C2C2C2C4C5C5C8CACACFD3D3
+      D7DEDE777ACB0D0AAC0D0AAC0D0AACE5EFEFDDE4E4D6DADAD1D4D4D2D4D4D6D9
+      D9DDE2E2E6EEEE4444BE0D0AAC0D0AAC4444BEE4EAEADEE2E2D9DBDBD7D8D8D7
+      D8D8D8D8D8D7D8D8D8D8D8D9DADADBDBDBDCDCDCDDDEDEDEDEDEDFE0E0DFE0E0
+      E0E0E0E1E1E1E1E2E2E1E1E1E1E1E1E1E1E1E3E3E3E3E3E3E4E4E4E4E4E4E5E5
+      E5E5E5E5E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E9E9E9EAEAEAECEDEDEDEFEFF0
+      F1F1F1F3F3F2F5F5C8C9E7BABBE3BABBE3D5D8ECF1F4F4F0F2F2EFF0F0EDEEEE
+      ECEDEDECECECECEDEDEDEEEEEFF0F0F0F2F2F1F3F3F2F5F5F3F5F5F3F5F5F3F5
+      F5F2F5F5F2F5F5F2F4F4F1F3F3F0F2F2EFF1F1EEEFEFEEEFEFEDEEEEEDEDEDEC
+      ECECECECECECECECECECECEDEDEDEEEEEEEFF0F0F0F2F2F1F2F2F1F2F2F0F2F2
+      EFF0F0EEEEEEEDEDEDEDEDEDEEEEEEEFEFEFF0F1F1F1F2F2F1F3F3F2F3F3F1F3
+      F3F1F2F2EFF0F0EEEFEFEEEEEEEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7A2A2A2A2A2A2A2A2A2A1A1A1A0A0A0A0A0A09F9F9F9E9E9E9E9E9E9D9D9D
+      9B9B9B9A9A9A9D9F9FA6ABABB2BBBBC3D3D30C09AE0C09AE0C09AE3D40BDC3DF
+      F9B3CDF6A8C1F4A3BCF3A6BFF4B0CAF6BED9F8A8BEED0C09AE0C09AE0C09AE0C
+      09AE9CB1EAABC4F59CB4F292AAF08CA4EF8BA3EF8BA3EF8BA2EF8BA3F08BA3F0
+      8BA2F08AA2EF8AA2F08BA3F08BA3F08BA2F08BA2F089A1F089A1F08DA2E7ADAD
+      ADADADADADADADADADADACACACABABABAAAAAAA9A9A9A8A8A8A7A7A7A5A5A5A3
+      A3A3A1A1A19F9F9F9C9C9C9A9A9A999999989898969696959595939393919191
+      9090908F8F8F8E8E8E8D8D8D8992B1859DF0859DF0859DF0849DF0839CF0839B
+      F0839BF0839BF0829BF0829BF0839BF0869EF18DA5F299B3F4A8C3F798AFEB18
+      17B30C09AE0C09AE0C09AE2E32BCB3CFF5B0CDF8A5C0F69BB5F594AEF490AAF3
+      8EA7F28DA7F28EA8F290A9F395AFF39CB6F5A5C0F6B1CDF8B4CFF52F33BC0C09
+      AE0C09AE0C09AE1817B39AB0EBAAC4F69BB4F491A8F28FA6F298AFF3A7C0F5BC
+      D6F80C09AE0C09AE0C09AE3D41C1CAD6D6BDC4C4B5B8B8AFB0B0ADADADAEAFAF
+      AFB0B0B0B1B1B1B2B2B1B1B1B2B2B2B2B2B2B2B2B2B2B2B2B3B3B3B3B3B3B3B3
+      B3B5B5B5B9BABABFC2C2C6CCCC3C3CB80C09AE0C09AE5F62BFC4CACABDC1C1B8
+      BABAB4B5B5B3B3B3B3B3B3B4B4B4B4B4B4B5B5B5B5B5B5B6B6B6B7B7B7B7B8B8
+      B8B9B9B8B9B9BABBBBBABABABBBBBBBBBBBBBCBCBCBDBDBDBEBEBEBEBEBEBFBF
+      BFBFBFBFC1C1C1C1C1C1C2C2C2C3C3C3C3C3C3C5C5C5C9CACACFD2D2D6DCDC90
+      95D30C09AE0C09AE0C09AED8E2ECDFE7E7D9DEDED5D8D8D5D8D8D9DDDDE0E6E6
+      E8F0F00C09AE0C09AE0C09AE4443BFE3E8E8DDE0E0D9DADAD7D7D7D7D7D7D8D8
+      D8D8D8D8D9D9D9DADADADBDBDBDCDCDCDDDDDDDDDDDDDEDEDEDEDEDEDFDFDFE0
+      E0E0E1E1E1E1E1E1E2E2E2E2E2E2E3E3E3E4E4E4E4E4E4E4E4E4E5E5E5E6E6E6
+      E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E9E9E9EAEAEAEBECECECEDEDEDEEEEEEEF
+      EFEFF1F1F0F1F1F0F2F2F0F2F2F0F1F1F0F1F1EFF0F0EEEFEFEDEDEDECECECEC
+      ECECECECECEDEDEDEEEEEEEEF0F0EFF0F0EFF1F1F0F1F1F0F1F1F0F1F1EFF1F1
+      EFF1F1EFF0F0EFF0F0EFF0F0EEEFEFEDEEEEEDEDEDECEDEDECECECECECECECEC
+      ECECECECECECECEDEDEDEDEDEDEFEFEFEFF0F0EFF0F0F0F1F1EFF0F0EFEFEFEE
+      EEEEEEEEEEEDEDEDEDEDEDEEEEEEEEEFEFEFF0F0EFF0F0F0F1F1F1F1F1EFF0F0
+      EFEFEFEFEFEFEFEFEFEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F3F3
+      F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7A3A3
+      A3A3A3A3A2A2A2A2A2A2A1A1A1A0A0A0A0A0A09F9F9F9E9E9E9D9D9D9C9C9C9A
+      9A9A9D9F9FA6ABABB2BCBCC3D3D30A08B10A08B10A08B13B40C3CDE9FBBFD9F9
+      B6D0F7B3CCF6B6D1F7C0DBF8A7BDED1616B60A08B10A08B10A08B13A3FC3B6D0
+      F7A6BFF498B1F291A9F18DA5F08CA3F08CA3F08CA4F08CA3F08BA3F08BA3F08B
+      A3F08BA3F08BA2F08BA2F08AA2F08AA2F08AA2F08AA2F08AA1F0A0A9C6AEAEAE
+      AEAEAEAEAEAEADADADACACACABABABAAAAAAAAAAAAA8A8A8A6A6A6A4A4A4A2A2
+      A2A0A0A09E9E9E9B9B9B99999998989897979795959594949493939391919190
+      90908F8F8F8E8E8E8995BF859DF1859DF1849DF1849CF1849CF1849CF1849CF1
+      839CF1839BF1839BF1839BF1859DF189A2F291AAF39DB8F5ACC8F77A8BDE0A08
+      B10A08B10A08B10A08B11616B695AAE8B8D4F9AECAF8A6C2F7A1BCF69EB9F59C
+      B7F59EB9F5A1BCF6A6C2F6AFCAF8B7D4F994AAE82224BA0A08B10A08B10A08B1
+      0A08B17B8CDEAEC9F7A0B8F494ACF28DA4F18EA5F197AFF3A8C1F5BCD7F90A08
+      B10A08B10A08B13A40C4C9D7DBBFC5C5B5B8B8B1B1B1AFAFAFB0B0B0B1B1B1B2
+      B2B2B2B2B2B3B3B3B3B3B3B4B4B4B4B4B4B4B4B4B5B5B5B5B5B5B5B5B5B7B8B8
+      BABDBDC1C5C5A5ABCB0A08B10A08B10A08B10A08B1C7CECEBFC3C3B9BBBBB6B6
+      B6B4B4B4B5B5B5B4B4B4B5B5B5B6B6B6B6B6B6B6B6B6B8B8B8B8B8B8B9B9B9BA
+      BABABABABABBBBBBBCBCBCBDBDBDBDBDBDBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1
+      C2C2C2C3C3C3C3C3C3C3C3C3C4C4C4C6C6C6C9CACACED0D0D6DBDBB7BDDD0A08
+      B10A08B10A08B1868BD5E4ECECDFE5E5DCE1E1DCE1E1E0E5E5E6EDED969BDA0A
+      08B10A08B10A08B16C6DCCE2E7E7DCDFDFD9DADAD8D8D8D8D8D8D9D9D9D9D9D9
+      DADADADADADADBDBDBDDDDDDDDDDDDDDDDDDDEDEDEDFDFDFE0E0E0E1E1E1E2E2
+      E2E2E2E2E3E3E3E3E3E3E4E4E4E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E7E7E7E7
+      E7E7E8E8E8E8E8E8E9E9E9EAEAEAEAEAEAEBECECECECECECEDEDEDEDEDEDEEEE
+      EEEFEFEEEFEFEEEFEFEEEFEFEDEEEEEDEDEDECEDEDECECECECECECEBECECECED
+      EDEDEDEDEDEEEEEEEEEEEEEEEEEEEFEFEEEFEFEEEFEFEEEFEFEEEFEFEEEFEFEE
+      EEEEEDEEEEEDEDEDEDEDEDECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEFEFEEEFEFEEEEEEEEEEEEEDEEEEEDED
+      EDEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFF0F0EFF0F0EFF0F0EFEFEFEFEFEFEF
+      EFEFEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7A5A5A5A4A4A4
+      A3A3A3A2A2A2A2A2A2A1A1A1A0A0A0A0A0A09E9E9E9D9D9D9C9C9C9B9B9B9D9F
+      9FA5AAAAB2BBBBC2D1D10907B30907B30907B33A40C5CEE9FBCBE5FBC4DFF9C2
+      DDF9AEC6F16A78D71415B80907B30907B30907B30907B39CB1ECAEC7F6A0B8F4
+      96AEF290A7F08DA5F18DA5F18DA4F18DA4F18CA4F18CA4F18CA4F18CA4F18CA3
+      F18BA3F18BA3F18BA3F18BA3F18BA2F18BA2F18AA2F18FA3E8AEAEAEAEAEAEAE
+      AEAEAEAEAEAEAEAEADADADACACACABABABA9A9A9A8A8A8A6A6A6A4A4A4A2A2A2
+      9F9F9F9D9D9D9B9B9B9999999898989696969595959393939292929191919090
+      908F8F8F8997C5859DF1859DF1859DF1859DF1859DF2859DF2859DF2849CF184
+      9DF2849CF2849CF2859DF2879FF28BA5F394AEF4A0BAF6AFCAF87A8BDF0907B3
+      0907B30907B30907B30907B3383FC593A9E9BAD7FAB5D1F9B1CEF8B0CDF8B1CD
+      F8B5D1F9B9D6F993A8E8505BCE0907B30907B30907B30907B30907B37B8CDFB1
+      CCF8A3BCF596AFF48FA6F28AA2F28FA6F299B1F4AAC4F6BED9F90907B30907B3
+      0907B33A3FC5C6D6E4BFC6C6B7BABAB3B3B3B0B0B0B2B2B2B3B3B3B4B4B4B4B4
+      B4B5B5B5B5B5B5B5B5B5B6B6B6B6B6B6B6B6B6B6B6B6B6B6B6B8B9B9BCBEBEC2
+      C7C7B2B8CD0907B30907B30907B31514B5C8CFCFC0C4C4BABCBCB7B7B7B5B5B5
+      B6B6B6B6B6B6B6B6B6B6B6B6B7B7B7B7B7B7B8B8B8B9B9B9BABABABABABABBBB
+      BBBDBDBDBDBDBDBEBEBEBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1C2C2C2C2C2C2C3
+      C3C3C4C4C4C4C4C4C5C5C5C7C7C7C9CACACED0D0D4D8D8DCE3E32424BA0907B3
+      0907B31616B7BFC6E6E5EDEDE3EAEAE4EAEAE7EEEEBFC6E71616B70907B30907
+      B30907B3BCC2E2E1E5E5DCDEDED9DADAD7D8D8D9D9D9DADADADADADADBDBDBDC
+      DCDCDCDCDCDEDEDEDEDEDEDEDEDEDFDFDFE0E0E0E1E1E1E1E1E1E2E2E2E2E2E2
+      E3E3E3E4E4E4E5E5E5E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E8E8E8E9E9E9E9E9
+      E9E9E9E9E9E9E9EAEAEAEAEAEAEBEBEBEBEBEBEBECECEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDECEDEDECECECECECECECECECECECECECECEC
+      ECEDEDECEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEDEEEEEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFF0F0EFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7A6A6A6A5A5A5A4A4A4A3
+      A3A3A2A2A2A2A2A2A1A1A1A0A0A09F9F9F9E9E9E9C9C9C9B9B9B9E9F9FA4A9A9
+      B0B8B8BFCECE0706B50706B50706B51313B9393EC7393EC7393EC72022BE0706
+      B50706B50706B50706B50706B50706B57B8BE0B3CDF7A6BEF59AB3F393ACF28F
+      A7F18EA5F18EA5F18EA5F18DA5F18DA5F18DA5F18DA4F18CA4F18CA4F18CA4F1
+      8CA4F18CA3F18CA4F18BA3F18BA3F18BA3F18BA3F2A1AAC8AEAEAEAFAFAFAFAF
+      AFAEAEAEAEAEAEADADADACACACABABABA9A9A9A7A7A7A6A6A6A3A3A3A0A0A09E
+      9E9E9C9C9C9A9A9A999999979797969696949494939393929292919191909090
+      899AD9869EF2869EF2869EF2869EF2869EF2869EF2859EF2859EF2859DF2859D
+      F2859DF2849DF2859FF288A0F38DA6F396AFF5A2BCF6AFCBF88497E41314B907
+      06B50706B50706B50706B50706B51313B9434BCB6573D86573D86573D8434BCB
+      1F21BE0706B50706B50706B50706B50706B51314B98597E4B1CCF8A3BEF698B1
+      F591A8F28CA3F28BA2F191A8F29CB4F4AEC7F7C2DDFA0706B50706B50706B539
+      3FC7C0D6EFC1C7C7B8BBBBB4B4B4B1B1B1B3B3B3B4B4B4B5B5B5B6B6B6B5B5B5
+      B6B6B6B7B7B7B7B7B7B7B7B7B7B7B7B7B7B7B7B7B7B9B9B9BCBEBEC1C5C5C8CD
+      CD6A6EC50706B51413B78386C8C6CCCCC0C3C3BBBDBDB8B9B9B6B6B6B6B6B6B7
+      B7B7B7B7B7B7B7B7B8B8B8B8B8B8B9B9B9BABABABABABABABABABBBBBBBDBDBD
+      BDBDBDBEBEBEBFBFBFC0C0C0C1C1C1C1C1C1C1C1C1C3C3C3C4C4C4C4C4C4C5C5
+      C5C5C5C5C6C6C6C7C7C7C9CACACDCECED2D5D5D9DEDE9CA2D90706B50706B507
+      06B50706B55C5FCCA3A8DFA3A8E05C5FCC0706B50706B50706B50706B54E4FC8
+      E3E8E8DFE1E1DBDDDDD9D9D9D9D9D9DADADADBDBDBDBDBDBDBDBDBDDDDDDDEDE
+      DEDFDFDFDFDFDFDFDFDFE0E0E0E1E1E1E2E2E2E3E3E3E3E3E3E3E3E3E4E4E4E4
+      E4E4E5E5E5E7E7E7E7E7E7E6E6E6E8E8E8E8E8E8E9E9E9EAEAEAEAEAEAEAEAEA
+      EAEAEAEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEDEDED
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F1F1F1F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7A6A6A6A6A6A6A5A5A5A4A4A4A3A3
+      A3A3A3A3A2A2A2A1A1A1A0A0A09F9F9F9D9D9D9C9C9C9FA0A0A4A7A7ADB4B4BA
+      C7C70605B80605B80605B80605B80605B80605B80605B80605B80605B80605B8
+      0605B80605B81F21C091A5E9B4CEF8A8C1F69DB6F496AFF392A9F290A7F28FA6
+      F28EA6F28EA6F28EA6F28EA5F28EA5F28DA5F28DA5F28DA5F28DA5F28DA4F28C
+      A4F28CA4F28CA4F28CA4F28CA4F28CA4F290A5EAB0B0B0AFAFAFB0B0B0AFAFAF
+      AFAFAFAEAEAEADADADABABABABABABA8A8A8A6A6A6A4A4A4A2A2A29F9F9F9D9D
+      9D9B9B9B9A9A9A989898979797969696949494939393929292919191899CD987
+      9FF2879FF2869EF2869EF2879FF3869EF2869EF3859EF2869EF3869EF3859EF3
+      859DF3859DF3879FF38AA2F48EA8F496B0F5A1BBF7ACC7F8A3BBF2414ACC0605
+      B80605B80605B80605B80605B80605B80605B80605B80605B80605B80605B806
+      05B80605B80605B80605B8363CC8A3BBF1AEC9F8A3BCF698B1F492AAF38DA4F3
+      8AA2F28CA2F294AAF39FB7F5B1CAF8C5DFFB0605B80605B80605B8383EC9BBD3
+      F9B3C3E1AAB6D7A4AFD3A2ACD2ABB0C3ACB1C4ADB2C4B1B4BDB7B7B7B7B7B7B7
+      B7B7B7B7B7B8B8B8B8B8B8B8B8B8B8B8B8B9BABABCBDBDBFC1C1C4C8C8C8CDCD
+      CAD0D0CAD0D0C7CCCCC3C6C6BEC0C0BABBBBB8B8B8B7B7B7B8B8B8B8B8B8B8B8
+      B8B8B8B8B8B8B8BABABABABABABABABABBBBBBBCBCBCBDBDBDBDBDBDBFBFBFBF
+      BFBFBFBFBFC1C1C1C1C1C1C2C2C2C3C3C3C4C4C4C4C4C4C5C5C5C6C6C6C6C6C6
+      C7C7C7C8C8C8C9C9C9CCCDCDD0D2D2D5D9D9DDE3E3595CCB0605B80605B80605
+      B80605B80605B80605B80605B80605B80605B80605B83131C2D8DDE8E1E4E4DE
+      E0E0DBDCDCD9D9D9DADADADADADADBDBDBDCDCDCDCDCDCDEDEDEDFDFDFE0E0E0
+      E0E0E0E1E1E1E1E1E1E2E2E2E3E3E3E4E4E4E4E4E4E4E4E4E5E5E5E6E6E6E7E7
+      E7E7E7E7E7E7E7E7E7E7E8E8E8E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEBEBEBEC
+      ECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F2F2F2F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7A8A8A8A7A7A7A6A6A6A5A5A5A4A4A4A4A4A4
+      A3A3A3A2A2A2A1A1A19F9F9F9E9E9E9D9D9D9E9F9FA3A5A5AAAFAFB4BEBE0403
+      BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA353BCA7B
+      8BE2BBD5F9B2CBF7A7C1F69FB7F498B1F394ABF391A8F28FA7F28FA7F28FA7F2
+      8FA6F28FA6F28FA6F28FA6F38EA6F28EA6F28EA6F38DA5F28DA5F28DA5F28DA5
+      F28DA4F28DA4F28DA5F38DA4F38DA4F3A2ABC9B0B0B0B0B0B0B0B0B0AFAFAFAF
+      AFAFAEAEAEADADADABABABAAAAAAA8A8A8A6A6A6A3A3A3A0A0A09E9E9E9C9C9C
+      9B9B9B9A9A9A98989897979796969694949494949491949E889FED88A0F388A0
+      F388A0F3879FF2879FF3879FF3879FF3879FF3869FF3869FF3869EF3869EF386
+      9EF3859EF387A0F38AA2F48EA7F495AEF59EB8F6A7C3F8B2CDF98EA3EA4049CE
+      0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403
+      BA4049CE8EA4EAB3CEF9A9C3F8A0B9F697B0F591A8F48DA4F48BA2F38BA1F28E
+      A5F395ACF4A2BAF5B2CCF8C6E0FB0403BA0403BA0403BA363CCAB8D1F8A8BFF6
+      9BB1F494A9F392A6F293A7F293A7F294A8F295A8F296A9F296A9F197AAF19DAD
+      E6A0AEE3A1AEE3A1AFE3AAB3D4ABB4D5ADB7D7B8BDC8C0C2C2C2C5C5C3C6C6C3
+      C7C7C1C4C4BEC1C1BCBDBDBABABAB8B9B9B9B9B9B8B8B8B9B9B9B9B9B9B9B9B9
+      BABABABABABABBBBBBBBBBBBBCBCBCBDBDBDBEBEBEBEBEBEBFBFBFBFBFBFC0C0
+      C0C2C2C2C3C3C3C3C3C3C3C3C3C4C4C4C5C5C5C7C7C7C7C7C7C8C8C8C8C8C8C9
+      C9C9CACACACCCCCCCFD0D0D3D6D6D9DDDDDEE4E48F93D81212BD0403BA0403BA
+      0403BA0403BA0403BA0403BA0403BA696BD1D7DCE7E2E5E5DEE0E0DCDEDEDBDB
+      DBDADBDBDBDBDBDCDCDCDCDCDCDDDDDDDDDDDDDEDEDEDFDFDFE0E0E0E0E0E0E1
+      E1E1E1E1E1E2E2E2E3E3E3E5E5E5E5E5E5E5E5E5E5E5E5E7E7E7E7E7E7E8E8E8
+      E8E8E8E9E9E9E9E9E9EAEAEAEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECEDED
+      EDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F1F1F1F1F1F1F2F2F2F2F2F2F1F1F1F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7A9A9A9A7A7A7A6A6A6A6A6A6A5A5A5A4A4A4A3A3A3A2
+      A2A2A1A1A1A0A0A09F9F9F9D9D9D9E9F9FA0A2A2A5A9A9ACB3B38890BE8E97C5
+      919ED193A7EA94A7EA93A6EA92A5EA91A5EA9CB1EEBDD7F9B8D2F9B3CCF8ACC5
+      F7A4BDF69EB6F598B0F495ACF491A9F390A8F390A8F390A7F390A7F390A7F38F
+      A7F38FA7F390A7F38FA6F38FA7F38FA7F38EA6F38EA6F38EA6F38EA5F38EA6F3
+      8EA5F38DA5F38DA5F38DA5F392A6EBB0B0B0B0B0B0B0B0B0B0B0B0AFAFAFAFAF
+      AFAEAEAEACACACABABABA9A9A9A6A6A6A4A4A4A2A2A29F9F9F9D9D9D9C9C9C9A
+      9A9A999999989898949AAE8F9CCA8B9FE189A1F489A1F488A0F388A1F488A0F3
+      88A0F4879FF388A0F488A0F487A0F4879FF4879FF4879FF4879FF4869FF4869E
+      F4869EF487A0F48AA2F48DA6F593ACF599B3F6A1BBF7A9C4F8B1CDF9ADC7F677
+      88E35663D8333ACC333ACC343ACC343ACC333ACC5663D87789E3ADC7F6B2CDF9
+      ABC6F8A4BDF79CB4F695ADF591A8F48CA4F48AA1F38AA1F38BA2F38EA6F497AE
+      F5A4BBF6191BC40302BC0302BC0302BC0302BC3439CCB3CCF8A5BCF59BB0F495
+      A9F393A7F394A7F294A8F295A9F295A9F296AAF297AAF297AAF298ABF299ABF2
+      9AACF29BADF29BADF29DAEF19EB0F1A8B5E4BCBDBDBDBFBFBEC0C0BEC0C0BDBE
+      BEBBBCBCBBBBBBBABABAB8B8B8B9B9B9B9B9B9B9B9B9BABABABABABABBBBBBBB
+      BBBBBCBCBCBDBDBDBDBDBDBEBEBEBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1C2C2C2
+      C3C3C3C3C3C3C4C4C4C5C5C5C7C7C7C7C7C7C7C7C7C9C9C9C9C9C9CACACACBCB
+      CBCDCDCDCECFCFD1D2D2D5D7D7D9DCDCDEE2E2D3D9E49094DA676AD23C3DC93D
+      3EC95A5CD08386D8C9CEE5E3E8E8E1E4E4DEE0E0DDDEDEDBDCDCDBDBDBDADADA
+      DCDCDCDDDDDDDEDEDEDEDEDEDEDEDEDFDFDFE0E0E0E1E1E1E2E2E2E2E2E2E3E3
+      E3E3E3E3E4E4E4E5E5E5E5E5E5E5E5E5E6E6E6E7E7E7E8E8E8E8E8E8E9E9E9E9
+      E9E9E9E9E9EBEBEBECECECECECECECECECECECECEDEDEDEDEDEDEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7AAAAAAA9A9A9A8A8A8A7A7A7A6A6A6A5A5A5A4A4A4A3A3A3A2A2
+      A2A1A1A19F9F9F9E9E9E9E9F9F9FA0A0A0A3A3A5A9A9AAB0B0ADB6B6B0BABAB2
+      C4DAB5CDF8B3CDF8B3CDF8B2CBF8B0C9F7ADC6F7AAC2F6A4BDF6A0B8F59CB4F5
+      98B0F595ADF493AAF492A9F491A9F491A9F491A9F491A8F490A8F391A8F490A7
+      F390A8F490A8F490A7F490A7F48FA7F48FA7F48FA7F48FA7F48FA6F48EA6F48E
+      A6F48EA6F48EA6F48EA5F4A3ACC9B0B0B0B0B0B0B0B0B0AFAFAFAFAFAFAEAEAE
+      ACACACABABABA9A9A9A7A7A7A5A5A5A3A3A3A0A0A09B9EA8979EB8939FC78EA0
+      DD8AA2F48AA2F48AA2F48AA2F48AA2F489A2F489A1F489A1F489A1F489A1F489
+      A1F488A0F488A0F488A0F488A0F488A0F487A0F487A0F4879FF4879FF4879FF4
+      869FF487A1F489A1F48CA4F590A8F594AEF69AB4F7A0BAF7A5C0F8AAC5F9AEC9
+      F9B1CCF9B2CEF9B3CFFAB3CFF9B1CDF9AFCAF9ACC7F9A8C1F8A1BBF79CB5F797
+      B0F691AAF58FA6F58CA3F48AA1F48AA1F48BA1F48CA3F48FA6F598AEF5A2B9F6
+      8496E90101BE0101BE0101BE0101BE3036CDAFC6F7A3B9F699AFF494A8F393A7
+      F394A8F294A8F295A9F396AAF397AAF398ABF398ABF399ACF39BADF29AADF29C
+      AEF29DAEF29DAFF29EB0F2A0B1F2B4B8C9BABBBBBABBBBBBBCBCBABBBBBABABA
+      B9BABAB9B9B9B9B9B9B9B9B9BABABABABABABBBBBBBBBBBBBCBCBCBCBCBCBDBD
+      BDBDBDBDBEBEBEBFBFBFBFBFBFC0C0C0C0C0C0C2C2C2C2C2C2C3C3C3C4C4C4C4
+      C4C4C6C6C6C6C6C6C7C7C7C7C7C7C8C8C8C9C9C9CACACACCCCCCCBCBCBCDCDCD
+      CFCFCFCFD0D0D3D4D4D6D8D8D8DBDBDCE0E0DFE3E3E1E5E5E2E7E7E3E8E8E3E7
+      E7E2E6E6E0E4E4DFE2E2DDDFDFDCDDDDDBDBDBDBDBDBDBDBDBDBDBDBDCDCDCDD
+      DDDDDEDEDEDEDEDEDEDEDEE1E1E1E1E1E1E2E2E2E3E3E3E3E3E3E4E4E4E5E5E5
+      E5E5E5E6E6E6E6E6E6E7E7E7E7E7E7E8E8E8E9E9E9E9E9E9E9E9E9EAEAEAEAEA
+      EAEBEBEBEBEBEBECECECECECECECECECEDEDEDEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F1F1F1F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7ABABABAAAAAAA9A9A9A8A8A8A7A7A7A6A6A6A5A5A5A4A4A4A3A3A3A2A2A2
+      A1A1A19F9F9F9E9E9E9E9F9F9E9F9F9FA1A1A1A5A5A2A7A7A3A8A8A3AAAAA6BB
+      E8A6BEF6A5BDF6A4BCF6A3BBF6A0B9F69EB6F59BB4F599B1F596AFF495ACF494
+      ABF493AAF492AAF492AAF492AAF492A9F492A9F491A9F491A9F491A9F491A8F4
+      91A8F491A8F490A8F490A8F490A8F490A7F48FA7F48FA7F48FA7F48FA7F48FA6
+      F48FA6F48EA6F493A7ECB0B0B0B0B0B0B0B0B0AFAFAFAFAFAFAEAEAEADADADAC
+      ACACA2A8BC9DA6C499A5CD92A4E08DA4EF8CA4F58BA3F48BA3F48BA3F48BA3F4
+      8BA3F58BA3F58BA3F58AA2F58AA2F58AA2F58AA2F58AA2F589A2F589A1F589A1
+      F589A1F589A1F589A1F588A1F588A0F588A0F588A0F588A0F587A0F5879FF587
+      9FF588A0F588A1F58AA3F58CA5F68FA8F693ACF697B0F79AB4F79DB7F89FB9F7
+      A1BBF8A2BCF8A2BCF8A0BAF89FB9F89BB5F798B2F796AEF691AAF68FA7F58CA5
+      F48CA3F48BA2F48BA1F48BA1F48BA2F48DA3F490A7F495ACF59DB5F6A8C0F764
+      72E05D69DD5E6ADD5C69DC6F7EE3A7BEF69FB5F699AEF496AAF394A8F395A9F3
+      95A9F397ABF397ABF398ABF398ABF399ACF39BADF39BAEF39CAEF39DAFF39DAF
+      F39EB0F39FB0F3A0B1F3A5B3E8BABABABABABABABABABABABAB9B9B9B9B9B9BA
+      BABABABABABBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBCBCBCBDBDBDBDBDBDBEBEBE
+      BFBFBFC0C0C0C0C0C0C1C1C1C2C2C2C3C3C3C3C3C3C4C4C4C5C5C5C6C6C6C7C7
+      C7C7C7C7C8C8C8C9C9C9C9C9C9CACACACACACACCCCCCCCCCCCCDCDCDCECECECF
+      CFCFD1D1D1D3D4D4D6D7D7D8DADAD9DCDCDBDEDEDDE0E0DEE1E1DEE0E0DEE0E0
+      DCDEDEDCDDDDDBDCDCDADBDBDBDBDBDBDBDBDCDCDCDDDDDDDDDDDDDEDEDEDFDF
+      DFE0E0E0E0E0E0E1E1E1E1E1E1E2E2E2E3E3E3E3E3E3E4E4E4E6E6E6E7E7E7E7
+      E7E7E7E7E7E8E8E8E8E8E8E9E9E9EAEAEAEAEAEAEAEAEAEBEBEBEBEBEBECECEC
+      ECECECEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F0F0F0F0F0F0F0F0
+      F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7ADAD
+      ADABABABAAAAAAA9A9A9A8A8A8A7A7A7A6A6A6A5A5A5A4A4A4A2A2A2A1A1A1A0
+      A0A09E9E9E9E9E9E9C9D9D9C9D9D9C9D9D9B9D9D9A9C9C9A9C9C999EA69CB2EF
+      9CB3F59AB3F599B2F598B1F597AFF496AEF595ACF495ACF594ABF594ABF593AB
+      F593ABF593AAF593AAF592AAF592AAF592AAF592A9F592A9F592A9F591A9F591
+      A9F591A9F591A8F591A8F590A8F590A8F590A8F590A8F590A7F58FA7F58FA7F5
+      8FA7F58FA7F5A0ABD2A3ACCA9FABD29FABD296A8E396A7E38EA5F58DA5F58DA5
+      F58DA5F58DA5F58CA4F58CA4F58CA4F58CA4F58CA4F58CA4F58BA3F58CA4F58C
+      A4F58BA3F58BA3F58BA3F58BA3F58AA3F58AA2F58AA2F58AA2F58AA2F58AA2F5
+      89A1F589A1F589A1F589A1F589A1F588A1F588A1F588A0F588A0F588A0F587A0
+      F587A0F588A0F588A1F58AA2F58CA4F68CA6F68EA7F690A9F692ABF693ACF694
+      ADF694ADF693ABF692ABF690A9F68FA7F68DA6F68CA4F58BA2F58CA3F58AA2F5
+      8BA2F58CA2F58BA2F58CA3F58CA3F58FA6F594AAF599B1F59FB7F6A7BFF7ACC4
+      F8AEC5F8ACC3F8A7BEF7A1B6F69BB1F598ACF595AAF494A9F496AAF496AAF497
+      ABF399ACF499ACF399ACF39BADF49BAEF49CAEF49DAFF49EB0F39EB0F39FB1F3
+      A0B1F3A0B2F3A2B3F3B0B6CFB9B9B9BABABABABABABABABABABABABABABABABA
+      BABBBBBBBBBBBBBBBBBBBCBCBCBDBDBDBDBDBDBDBDBDBEBEBEBEBEBEC0C0C0C0
+      C0C0C1C1C1C1C1C1C2C2C2C3C3C3C4C4C4C5C5C5C5C5C5C7C7C7C7C7C7C8C8C8
+      C9C9C9CACACACBCBCBCBCBCBCCCCCCCDCDCDCDCDCDCECECECFCFCFCFCFCFD1D2
+      D2D2D2D2D3D4D4D5D6D6D6D7D7D8D9D9D9DADAD9DADAD9DBDBDADBDBD9DADAD9
+      DADADBDBDBDADBDBDBDBDBDCDCDCDDDDDDDEDEDEDEDEDEDFDFDFE0E0E0E1E1E1
+      E1E1E1E2E2E2E2E2E2E4E4E4E4E4E4E4E4E4E5E5E5E6E6E6E7E7E7E7E7E7E7E7
+      E7E8E8E8E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEBEBEBEDEDEDEDEDEDEEEEEEEE
+      EEEEEEEEEEEEEEEEEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F2F2
+      F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F4F4F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7AEAEAEACACAC
+      ABABABAAAAAAA9A9A9A8A8A8A7A7A7A6A6A6A5A5A5A3A3A3A2A2A2A1A1A19F9F
+      9F9E9E9E9C9C9C9B9B9B999999989898969696969797949595959EB897AEF597
+      AEF596AEF595ADF595ADF595ACF595ACF595ACF594ACF594ACF594ABF594ABF5
+      94ABF593ABF593ABF593ABF593AAF593AAF592AAF592AAF592AAF592A9F592A9
+      F592A9F591A9F591A9F591A9F591A8F590A8F590A8F590A8F590A8F590A7F590
+      A7F58FA7F58FA7F58FA7F58FA7F58FA7F68EA6F58EA6F58EA6F58EA6F68EA6F6
+      8EA6F68DA5F58DA5F58DA5F58DA5F58DA5F68CA4F58CA4F58CA4F68CA4F68CA4
+      F68CA4F68CA4F68BA3F68BA3F68BA3F68BA3F68BA3F68AA3F68AA2F68AA2F68A
+      A2F68AA2F68AA2F689A2F689A1F689A1F689A1F689A1F688A1F688A0F688A0F6
+      88A0F688A0F687A0F688A1F688A1F689A1F689A2F68AA2F58BA4F58BA3F58BA4
+      F58BA3F58AA3F58BA3F58BA2F68BA2F68AA1F68BA2F68BA2F58BA2F58BA3F58C
+      A3F58DA4F58DA3F58DA4F58FA5F592A9F595ACF69AB1F69EB4F7A2B8F7A2B8F7
+      A1B7F79EB5F69BB1F698ADF596ABF496AAF496AAF497ABF497ABF498ACF499AC
+      F49AACF49AADF49BAEF49BAEF49CAFF49EB0F49EB0F39FB1F49FB1F3A1B2F3A1
+      B2F3A3B4F4A5B5F0B8B9BDB9B9B9B9B9B9BABABABABABABABABABBBBBBBBBBBB
+      BBBBBBBCBCBCBCBCBCBDBDBDBEBEBEBEBEBEBFBFBFBFBFBFC1C1C1C1C1C1C2C2
+      C2C2C2C2C3C3C3C3C3C3C4C4C4C6C6C6C6C6C6C7C7C7C8C8C8C8C8C8CACACACB
+      CBCBCCCCCCCCCCCCCDCDCDCECECECECECECFCFCFCFCFCFD1D1D1D2D2D2D2D2D2
+      D3D3D3D5D5D5D5D5D5D6D6D6D7D7D7D7D7D7D8D8D8D9D9D9D9DADAD9D9D9DADA
+      DADBDBDBDBDBDBDCDCDCDDDDDDDEDEDEDFDFDFDFDFDFE0E0E0E1E1E1E2E2E2E3
+      E3E3E4E4E4E5E5E5E5E5E5E5E5E5E6E6E6E7E7E7E8E8E8E8E8E8E8E8E8E9E9E9
+      EAEAEAEAEAEAEBEBEBEBEBEBECECECECECECEDEDEDEDEDEDEEEEEEEEEEEEEEEE
+      EEEEEEEEEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F2F2F2F1F1F1F1F1F1F2F2F2F1F1F1F2F2F2F1F1F1F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F4
+      F4F4F4F4F4F5F5F5F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7B0B0B0AEAEAEADADADAB
+      ABABAAAAAAA9A9A9A7A7A7A7A7A7A6A6A6A4A4A4A3A3A3A2A2A2A0A0A09F9F9F
+      9D9D9D9B9B9B9A9A9A98989896969696969694949493939395A3D096AEF696AE
+      F696ADF696ADF696ADF695ADF695ADF695ADF695ACF695ACF695ACF694ACF694
+      ACF694ABF694ABF693ABF693ABF693ABF693AAF693AAF693AAF692AAF692AAF6
+      92AAF692A9F692A9F691A9F691A9F691A9F691A9F691A8F690A8F690A8F690A8
+      F690A8F690A7F690A7F68FA7F68FA7F68FA7F68FA6F68FA6F68FA7F58EA6F68E
+      A6F68EA6F68EA6F68DA5F68DA5F68DA5F58DA5F68DA5F68DA5F68DA5F68DA5F6
+      8CA4F68CA4F68CA4F68CA4F68BA4F68BA3F68BA3F68BA3F68BA3F68BA3F68AA2
+      F68AA2F68AA2F68AA2F68AA2F689A2F689A2F689A1F689A1F689A1F688A1F688
+      A1F688A0F688A0F688A0F688A0F688A0F688A0F688A0F688A0F689A1F689A1F6
+      89A1F68AA1F68AA1F68AA2F68AA2F68BA2F68CA3F58CA3F58CA3F58DA4F68EA4
+      F68EA5F68FA5F68FA5F690A7F692A8F695ABF696ACF698AFF699AFF69AAEF698
+      ADF697ADF597ABF596ABF596AAF597ABF597ABF598ACF599ACF599ADF59AADF5
+      9BAEF49CAEF49CAFF49DAFF49EB0F49FB0F49FB1F4A1B2F4A1B2F4A2B3F4A3B4
+      F4A4B4F4ADB6D9B8B8B8B9B9B9B9B9B9BBBBBBBBBBBBBBBBBBBBBBBBBCBCBCBD
+      BDBDBDBDBDBEBEBEBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1C2C2C2C3C3C3C3C3C3
+      C4C4C4C4C4C4C5C5C5C6C6C6C7C7C7C8C8C8C8C8C8C9C9C9CACACACBCBCBCCCC
+      CCCCCCCCCDCDCDCECECECFCFCFD0D0D0D0D0D0D1D1D1D2D2D2D3D3D3D4D4D4D5
+      D5D5D5D5D5D7D7D7D7D7D7D8D8D8D8D8D8DADADADADADADADADADCDCDCDCDCDC
+      DDDDDDDEDEDEDEDEDEDFDFDFDFDFDFE0E0E0E1E1E1E2E2E2E2E2E2E3E3E3E4E4
+      E4E5E5E5E5E5E5E6E6E6E6E6E6E7E7E7E8E8E8E8E8E8E8E8E8EAEAEAEBEBEBEB
+      EBEBECECECECECECEDEDEDEDEDEDEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEF
+      F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F1
+      F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7B0B0B0AFAFAFAEAEAEACACACABAB
+      ABAAAAAAA9A9A9A8A8A8A7A7A7A6A6A6A5A5A5A3A3A3A2A2A2A0A0A09F9F9F9D
+      9D9D9C9C9C9A9A9A98989897979796969694949493949996A9E397AEF697AEF6
+      96AEF696AEF696AEF696ADF696ADF696ADF695ADF695ADF695ACF695ACF695AC
+      F694ACF694ACF694ACF694ABF694ABF693ABF693ABF693ABF693AAF693AAF693
+      AAF692AAF692AAF692AAF692A9F691A9F691A9F691A9F691A9F691A8F691A8F6
+      90A8F690A8F690A8F690A8F690A7F68FA7F68FA7F68FA7F68FA7F68FA6F68EA6
+      F68FA7F68EA6F68EA6F68EA6F68DA5F68EA6F78EA6F78DA5F78DA5F78DA5F78D
+      A5F78DA5F78CA4F78CA4F78CA4F78CA4F78CA4F78BA4F78BA3F78BA3F78BA3F7
+      8BA3F78BA3F78AA3F78AA2F78AA2F78AA2F78AA2F789A2F789A1F789A1F789A1
+      F789A1F788A1F788A1F789A1F688A1F689A1F689A1F68AA2F68AA1F68AA2F68B
+      A2F68AA2F68BA2F68CA3F68BA3F68CA3F68DA4F68CA3F68DA4F68EA5F68FA5F6
+      90A6F68FA5F690A6F691A7F692A8F693A9F695AAF696AAF696ABF695AAF696AA
+      F695AAF696AAF697ABF697ACF598ACF599ACF59AADF59AADF59BAEF59CAFF59D
+      AFF59EB0F59EB0F59EB1F59FB1F5A1B2F5A2B3F5A2B4F5A3B4F4A4B5F4A5B5F4
+      A5B6F4B3B7C7B8B8B8B9B9B9B9B9B9BABABABBBBBBBBBBBBBCBCBCBDBDBDBEBE
+      BEBFBFBFBFBFBFC0C0C0C0C0C0C1C1C1C2C2C2C3C3C3C3C3C3C5C5C5C5C5C5C6
+      C6C6C7C7C7C7C7C7C8C8C8C9C9C9C9C9C9CACACACBCBCBCCCCCCCDCDCDCDCDCD
+      CECECECFCFCFCFCFCFD1D1D1D1D1D1D2D2D2D3D3D3D3D3D3D4D4D4D5D5D5D6D6
+      D6D7D7D7D8D8D8D7D7D7D9D9D9DADADADADADADBDBDBDDDDDDDDDDDDDEDEDEDE
+      DEDEE0E0E0E0E0E0E1E1E1E1E1E1E2E2E2E3E3E3E3E3E3E4E4E4E5E5E5E6E6E6
+      E6E6E6E7E7E7E7E7E7E8E8E8E9E9E9E9E9E9EAEAEAEAEAEAEBEBEBECECECECEC
+      ECECECECEDEDEDEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7B2B2B2B1B1B1B0B0B0AFAFAFACACACABABAB
+      AAAAAAA9A9A9A8A8A8A7A7A7A5A5A5A5A5A5A3A3A3A2A2A2A0A0A09F9F9F9C9C
+      9C9B9B9B9999999898989797979696969595959599A697ADF197AFF797AFF797
+      AEF797AEF797AEF796AEF796AEF796AEF796ADF796ADF796ADF795ADF795ADF7
+      95ACF795ACF794ACF794ACF794ACF794ABF794ABF794ABF793ABF793ABF793AB
+      F793AAF793AAF792AAF792AAF792AAF792AAF792A9F791A9F791A9F791A9F791
+      A9F791A8F791A8F790A8F790A8F790A8F790A7F790A7F78FA7F78FA7F78FA7F7
+      8FA7F78EA6F78EA6F78EA6F78EA6F78EA6F78EA6F78EA6F78EA6F78EA6F78DA5
+      F78DA5F78DA5F78CA4F78CA4F78CA4F78CA4F78CA4F78BA3F78CA4F78BA3F78B
+      A3F78BA3F78BA3F78BA3F78AA3F78AA3F78AA2F78AA2F78AA2F789A2F789A2F7
+      89A1F789A1F789A2F789A1F78AA2F78AA1F78AA2F78BA3F78BA2F78BA3F78BA3
+      F78BA3F78CA4F78CA4F78DA4F78DA4F68DA4F68EA4F68FA5F68FA6F690A6F691
+      A7F691A7F691A7F691A7F693A8F794A9F694A9F694A9F696AAF695AAF696ABF6
+      97ABF697ABF698ACF698ACF59AADF69AADF59BAEF69DAFF69DB0F69DB0F69FB1
+      F69FB1F6A0B2F5A1B3F5A2B3F5A3B4F5A3B4F5A4B5F5A4B5F5A5B6F5A7B7F5AA
+      B8EDB7B8BCB9B9B9B9B9B9BABABABBBBBBBCBCBCBCBCBCBDBDBDBEBEBEBEBEBE
+      BFBFBFC0C0C0C0C0C0C2C2C2C2C2C2C3C3C3C3C3C3C4C4C4C5C5C5C7C7C7C7C7
+      C7C8C8C8C9C9C9C9C9C9CBCBCBCBCBCBCCCCCCCDCDCDCDCDCDCFCFCFCFCFCFD0
+      D0D0D1D1D1D1D1D1D2D2D2D3D3D3D4D4D4D4D4D4D6D6D6D6D6D6D7D7D7D8D8D8
+      D8D8D8D9D9D9DADADADBDBDBDBDBDBDCDCDCDDDDDDDDDDDDDEDEDEDFDFDFE0E0
+      E0E0E0E0E1E1E1E2E2E2E3E3E3E3E3E3E3E3E3E4E4E4E6E6E6E7E7E7E7E7E7E8
+      E8E8E7E7E7E9E9E9EAEAEAEAEAEAEBEBEBECECECECECECEDEDEDEDEDEDEDEDED
+      EEEEEEEEEEEEEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F6F6F6F5F5F5F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7B3B3B3B2B2B2B0B0B0AFAFAFAFAFAFACACACABABABAA
+      AAAAA9A9A9A8A8A8A6A6A6A5A5A5A4A4A4A2A2A2A1A1A1A0A0A09E9E9E9D9D9D
+      9A9A9A999999989898979797969696959595969FB998AFF798AFF798AFF797AF
+      F797AFF797AFF797AEF797AEF797AEF796AEF796AEF796ADF796ADF796ADF795
+      ADF795ADF795ADF795ACF795ACF794ACF794ACF794ACF794ABF794ABF794ABF7
+      93ABF793ABF793ABF793AAF792AAF792AAF792AAF792AAF792A9F792A9F791A9
+      F791A9F791A9F791A9F791A8F790A8F790A8F790A8F790A8F790A7F78FA7F78F
+      A7F78FA7F78FA7F78FA7F78FA7F88EA6F78EA6F78EA6F78EA6F78EA6F78DA5F7
+      8DA5F78DA5F88DA5F78DA5F88CA4F78DA5F88CA4F78CA4F78CA4F78BA3F78CA4
+      F88CA4F88BA4F88BA3F88BA3F88BA3F88BA3F88AA3F88AA2F88AA2F88AA2F88A
+      A2F88AA2F78AA2F78BA2F78AA2F78BA3F78BA3F78BA3F78CA3F78CA3F78CA4F7
+      8DA4F78EA5F78EA5F78EA5F78FA5F78FA5F78FA6F790A6F790A7F791A7F791A7
+      F792A7F792A8F793A9F794A9F695A9F695AAF696AAF697ABF698ACF797ABF697
+      ACF699ADF79AADF69BAEF69BAEF69CAFF69CB0F69EB0F69DB0F6A0B2F6A0B2F6
+      A1B3F6A2B4F6A2B4F6A3B5F6A4B5F6A5B6F6A5B6F6A7B7F6A8B8F6A9B8F6B2B8
+      CFB9B9B9BABABABBBBBBBBBBBBBCBCBCBDBDBDBDBDBDBEBEBEBFBFBFC0C0C0C1
+      C1C1C1C1C1C2C2C2C3C3C3C4C4C4C4C4C4C5C5C5C6C6C6C7C7C7C7C7C7C8C8C8
+      CACACACACACACBCBCBCBCBCBCCCCCCCDCDCDCECECECFCFCFD0D0D0D0D0D0D1D1
+      D1D2D2D2D2D2D2D3D3D3D5D5D5D6D6D6D7D7D7D7D7D7D8D8D8D9D9D9D9D9D9DA
+      DADADBDBDBDCDCDCDCDCDCDDDDDDDEDEDEDEDEDEDFDFDFE0E0E0E1E1E1E1E1E1
+      E2E2E2E3E3E3E4E4E4E4E4E4E5E5E5E5E5E5E6E6E6E7E7E7E7E7E7E8E8E8E8E8
+      E8EAEAEAEAEAEAEAEAEAEBEBEBECECECECECECEDEDEDEDEDEDEDEDEDEEEEEEEF
+      EFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4
+      F4F4F4F4F4F4F4F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F4F4F4F5F5F5F4F4F4F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7B5B5B5B3B3B3B2B2B2B1B1B1AFAFAFAEAEAEACACACABABABAAAA
+      AAA9A9A9A8A8A8A7A7A7A6A6A6A4A4A4A3A3A3A1A1A19F9F9F9E9E9E9C9C9C9B
+      9B9B9A9A9A98989897979796969695959596A4CB99B0F898AFF798B0F898AFF8
+      98AFF898AFF897AFF897AFF897AFF897AEF897AEF897AEF896AEF896AEF896AD
+      F896ADF895ADF895ADF895ADF895ACF895ADF795ACF894ACF894ACF894ACF894
+      ABF894ABF893ABF893ABF893ABF893ABF893AAF892AAF892AAF892AAF892AAF8
+      92A9F892A9F891A9F891A9F891A9F891A8F891A8F890A8F890A8F890A8F890A8
+      F88FA7F88FA7F88FA7F88FA7F88FA7F88FA7F88EA6F88EA6F88EA6F88EA6F88E
+      A6F88DA5F88DA5F88DA5F88DA5F88DA5F88CA5F88CA4F88CA4F88CA4F88CA4F8
+      8CA4F88BA4F88CA4F88BA4F88BA4F88BA3F88BA3F88BA3F88AA3F88AA3F88BA3
+      F88BA3F88BA3F88CA4F88CA4F88CA4F88CA4F88DA4F88DA4F88DA4F88EA5F88E
+      A5F88EA5F88FA6F88FA6F78FA6F790A7F791A7F791A7F792A8F793A8F793A8F7
+      93A9F794A9F794AAF795AAF796ABF796ABF797ACF798ACF798ACF799ADF79AAE
+      F79AADF79CAFF69BAFF69CAFF69DB0F69EB1F69FB1F6A0B2F6A0B3F6A1B3F6A2
+      B4F6A3B4F6A3B5F6A4B5F6A5B6F6A6B7F6A7B8F6A8B8F6AAB9F2B7B8BCB9B9B9
+      BABABABCBCBCBCBCBCBCBCBCBDBDBDBEBEBEC0C0C0C0C0C0C1C1C1C2C2C2C2C2
+      C2C3C3C3C4C4C4C5C5C5C6C6C6C6C6C6C7C7C7C8C8C8C9C9C9CACACACACACACB
+      CBCBCCCCCCCCCCCCCECECECECECECFCFCFD0D0D0D0D0D0D1D1D1D2D2D2D2D2D2
+      D3D3D3D4D4D4D5D5D5D6D6D6D7D7D7D7D7D7D8D8D8D9D9D9DADADADADADADBDB
+      DBDCDCDCDCDCDCDDDDDDDEDEDEDFDFDFDFDFDFE0E0E0E1E1E1E1E1E1E3E3E3E3
+      E3E3E5E5E5E4E4E4E6E6E6E6E6E6E8E8E8E7E7E7E8E8E8E8E8E8E9E9E9EBEBEB
+      EBEBEBEBEBEBECECECEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFF0F0F0F0F0
+      F0F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F3F3F3F4F4
+      F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7B6B6B6B5B5B5B4B4B4B2B2B2B0B0B0AFAFAFAEAEAEADADADABABABAAAAAA
+      A9A9A9A8A8A8A7A7A7A5A5A5A4A4A4A2A2A2A1A1A19F9F9F9E9E9E9C9C9C9B9B
+      9B9A9A9A98989898989897979796969698A8D999B0F899B0F899B0F898B0F898
+      B0F898B0F898AFF898AFF898AFF897AFF897AFF897AEF897AEF897AEF896AEF8
+      96AEF896AEF896ADF896ADF895ADF895ADF895ADF895ACF895ACF895ACF894AC
+      F894ACF894ACF894ABF893ABF893ABF893ABF893ABF893AAF893AAF892AAF892
+      AAF892AAF892AAF892A9F891A9F891A9F891A9F891A9F891A8F890A8F890A8F8
+      90A8F890A8F890A8F88FA7F88FA7F88FA7F88FA7F88FA7F88FA7F88EA6F88EA6
+      F88EA6F88EA6F88DA6F88DA5F88DA5F88DA5F88DA5F88DA5F88CA4F88CA4F88C
+      A4F88CA4F88CA4F88BA4F88BA4F88BA3F88BA3F88BA3F88BA3F88BA3F88BA3F8
+      8BA3F88BA3F88DA4F88CA4F88CA4F88DA5F88DA5F88EA5F88EA6F88FA6F890A6
+      F890A6F890A7F891A7F891A7F892A8F892A8F893A9F893A9F893A9F895AAF894
+      AAF895AAF896ABF897ABF897ACF798ADF799ADF799ADF79AAEF79BAEF79BAFF7
+      9CAFF79DB0F79DB1F79EB1F79FB2F7A0B2F7A1B3F7A1B3F7A2B4F7A3B4F7A4B6
+      F7A4B6F7A5B6F6A6B7F6A7B8F6A8B8F6A9B9F6B0B8D7B8B8B8B9B9B9BABABABB
+      BBBBBCBCBCBDBDBDBDBDBDBFBFBFC0C0C0C0C0C0C1C1C1C2C2C2C2C2C2C3C3C3
+      C5C5C5C5C5C5C6C6C6C6C6C6C7C7C7C9C9C9C9C9C9CACACACBCBCBCBCBCBCCCC
+      CCCCCCCCCFCFCFCFCFCFD0D0D0D1D1D1D1D1D1D2D2D2D3D3D3D3D3D3D5D5D5D6
+      D6D6D6D6D6D7D7D7D8D8D8D8D8D8D9D9D9DADADADADADADBDBDBDCDCDCDDDDDD
+      DDDDDDDEDEDEDFDFDFE0E0E0E0E0E0E2E2E2E2E2E2E3E3E3E3E3E3E4E4E4E5E5
+      E5E5E5E5E6E6E6E7E7E7E8E8E8E8E8E8E9E9E9E9E9E9EAEAEAEBEBEBEBEBEBEB
+      EBEBECECECEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEFEFEFF0F0F0F0F0F0F1F1F1
+      F1F1F1F1F1F1F3F3F3F2F2F2F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F6F6F6F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7B8B8
+      B8B6B6B6B5B5B5B4B4B4B2B2B2B0B0B0AFAFAFAFAFAFACACACABABABAAAAAAA9
+      A9A9A7A7A7A7A7A7A6A6A6A4A4A4A3A3A3A1A1A1A0A0A09E9E9E9C9C9C9B9B9B
+      9A9A9A98989897979797979796979C99ACE69AB1F999B0F899B1F999B0F998B0
+      F898B0F898AFF898B0F998AFF898AFF998AFF997AEF897AEF897AEF897AEF996
+      AEF896AEF996AEF996ADF896ADF996ADF995ADF895ACF895ADF995ADF995ACF9
+      95ACF994ACF994ACF994ACF994ACF994ABF993ABF993ABF993ABF993ABF993AA
+      F993AAF992AAF992AAF992AAF992A9F992A9F991A9F991A9F991A9F991A9F990
+      A8F990A8F990A8F990A8F990A8F990A8F98FA7F98FA7F98FA7F98FA7F98FA7F9
+      8EA6F98EA6F98EA6F98EA6F98EA6F98DA6F98DA5F98DA5F98DA5F98DA5F98DA5
+      F98CA5F98CA4F98CA4F98CA4F98CA4F98BA4F98CA4F88BA4F88CA4F88CA4F88D
+      A5F88DA5F88DA5F88EA5F88EA5F88EA5F88FA6F88FA6F88FA6F890A7F890A6F8
+      90A7F892A8F992A8F892A8F892A8F893A9F894A9F894AAF895AAF895AAF895AA
+      F896ABF897ACF898ADF899ADF899ADF799ADF79AAEF79BAEF79CB0F89CB0F79E
+      B1F89EB1F89FB2F8A0B2F8A0B3F7A1B4F7A2B4F7A3B5F7A3B5F7A4B6F7A6B7F7
+      A7B8F7A7B8F7A8B9F7A9B9F7A9BAF7B6B8C0B9B9B9BABABABBBBBBBCBCBCBDBD
+      BDBDBDBDBFBFBFC0C0C0C0C0C0C1C1C1C2C2C2C2C2C2C3C3C3C5C5C5C6C6C6C6
+      C6C6C7C7C7C7C7C7C8C8C8C9C9C9CACACACBCBCBCCCCCCCCCCCCCDCDCDCECECE
+      CFCFCFCFCFCFD0D0D0D1D1D1D1D1D1D3D3D3D4D4D4D4D4D4D5D5D5D6D6D6D6D6
+      D6D7D7D7D8D8D8D8D8D8D9D9D9DADADADBDBDBDBDBDBDEDEDEDDDDDDDEDEDEDE
+      DEDEE0E0E0E0E0E0E0E0E0E2E2E2E2E2E2E2E2E2E3E3E3E5E5E5E5E5E5E6E6E6
+      E7E7E7E8E8E8E8E8E8E9E9E9EAEAEAEAEAEAEBEBEBECECECECECECECECECEDED
+      EDEEEEEEEEEEEEEFEFEFEFEFEFF0F0F0F0F0F0F1F1F1F1F1F1F2F2F2F2F2F2F2
+      F2F2F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F6F6F6F6F6F6F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7B9B9B9B8B8B8
+      B6B6B6B5B5B5B4B4B4B2B2B2B1B1B1AFAFAFAEAEAEACACACABABABAAAAAAA9A9
+      A9A8A8A8A7A7A7A5A5A5A4A4A4A2A2A2A1A1A1A0A0A09E9E9E9C9C9C9B9B9B9A
+      9A9A999999989898979797979AA39AB0F39AB1F999B1F999B1F999B0F999B0F9
+      99B0F998B0F998B0F998B0F998AFF998AFF998AFF998AFF997AFF997AEF997AF
+      F997AFF997AEF996AEF996ADF996ADF996ADF996ADF995ADF996ADF995ADF895
+      ADF995ADF995ACF994ACF994ACF994ABF994ACF993ABF994ABF993ABF993AAF9
+      93ABF993ABF993AAF992AAF992AAF992AAF992AAF992A9F991A9F991A9F991A9
+      F991A9F991A9F990A8F990A8F990A8F990A8F990A8F990A8F98FA7F98FA7F98F
+      A7F98FA7F98EA7F98EA6F98EA6F98EA6F98EA6F98EA6F98DA5F98DA5F98DA5F9
+      8DA5F98DA5F98CA5F98CA5F98CA4F98CA5F98CA4F98DA5F98DA5F98EA5F98DA5
+      F98EA6F98FA6F98EA6F98FA6F98FA7F990A7F990A7F991A7F991A8F991A8F992
+      A8F993A9F893A9F893A9F894AAF894AAF895ABF895ABF895ABF897ACF897ACF8
+      98ACF898ADF899ADF89AAEF89AAEF89BAFF89CAFF89CB0F89DB0F89EB1F89EB1
+      F89FB2F8A1B3F7A1B3F7A1B4F7A2B4F7A4B5F7A4B6F7A5B7F7A6B7F7A7B8F7A8
+      B9F8A8B9F7AABBF8B0BADFB8B8B8B9B9B9BABABABBBBBBBCBCBCBDBDBDBEBEBE
+      C0C0C0C0C0C0C0C0C0C1C1C1C2C2C2C3C3C3C5C5C5C5C5C5C6C6C6C7C7C7C8C8
+      C8C8C8C8CACACACACACACBCBCBCCCCCCCDCDCDCECECECECECECFCFCFD0D0D0D0
+      D0D0D1D1D1D2D2D2D3D3D3D4D4D4D4D4D4D5D5D5D6D6D6D7D7D7D7D7D7D8D8D8
+      D9D9D9D9D9D9DBDBDBDBDBDBDCDCDCDDDDDDDEDEDEDEDEDEDFDFDFE0E0E0E0E0
+      E0E1E1E1E2E2E2E3E3E3E3E3E3E4E4E4E5E5E5E5E5E5E6E6E6E6E6E6E7E7E7E8
+      E8E8E8E8E8E9E9E9E9E9E9EAEAEAEBEBEBECECECECECECEDEDEDEDEDEDEEEEEE
+      EFEFEFEFEFEFEFEFEFF0F0F0F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F3F3
+      F3F3F3F3F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F4F4F4F4F4F4F5F5F5F5F5F5F4
+      F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F6F6F6F5F5F5F5F5F5F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7BBBBBBB9B9B9B8B8B8B6
+      B6B6B5B5B5B4B4B4B2B2B2B1B1B1AFAFAFAEAEAEACACACABABABAAAAAAA9A9A9
+      A8A8A8A7A7A7A5A5A5A4A4A4A2A2A2A1A1A1A0A0A09E9E9E9D9D9D9C9C9C9A9A
+      9A999999989898989898989CAA9AB0F39AB1F99AB1F99AB1F999B1F999B1F999
+      B1F999B0F999B0F999B0F998B0F998B0F998AFF998AFF998AFF997AFF997AFF9
+      97AFF997AEF997AEF996AEF996AEF996AEF996ADF996ADF996ADF995ADF995AD
+      F995ADF995ACF994ACF994ACF994ACF994ACF994ACF994ABF993ABF993ABF993
+      ABF993ABF993ABF992AAF992AAF992AAF992AAF992A9F991A9F991A9F991A9FA
+      91A9F991A9F990A8F990A8F991A9FA90A8FA90A8FA90A8FA8FA7F98FA7F98FA7
+      F98FA7F98FA7FA8EA6F98EA6F98EA6F98EA6F98EA6FA8DA5F98DA5F98DA5F98D
+      A5F98DA5F98CA5F98DA5F98DA5F98DA5F98DA5F98DA5F98EA6F98EA6F98EA6F9
+      8FA7F98FA6F990A7F990A7F991A8F991A8F992A8F992A9F992A9F992A9F993A9
+      F994AAF994AAF995ABF995ABF996ABF996ACF997ACF998ADF999ADF998ADF99A
+      AEF999AEF99BAFF89BAFF89CB0F89CB0F89DB1F89EB1F89FB2F89FB2F8A1B3F8
+      A1B3F8A1B4F8A3B5F8A4B6F8A4B6F8A5B7F8A6B7F8A7B8F8A8B8F8A8B9F8A9BA
+      F8AABBF8B5B7BFB9B9B9BABABABABABABBBBBBBDBDBDBEBEBEBEBEBEC0C0C0C0
+      C0C0C1C1C1C2C2C2C3C3C3C4C4C4C5C5C5C6C6C6C7C7C7C7C7C7C9C9C9C9C9C9
+      CACACACBCBCBCBCBCBCCCCCCCDCDCDCECECECFCFCFCFCFCFD0D0D0D1D1D1D2D2
+      D2D3D3D3D3D3D3D4D4D4D5D5D5D5D5D5D6D6D6D7D7D7D8D8D8DADADADADADADB
+      DBDBDBDBDBDCDCDCDDDDDDDDDDDDDEDEDEDFDFDFDFDFDFE0E0E0E1E1E1E1E1E1
+      E2E2E2E3E3E3E4E4E4E5E5E5E6E6E6E6E6E6E7E7E7E8E8E8E9E9E9E9E9E9E9E9
+      E9EAEAEAEBEBEBECECECECECECECECECEDEDEDEEEEEEEFEFEFEFEFEFF0F0F0F0
+      F0F0F0F0F0F1F1F1F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F6F6F6F6F6F6F6F6F6F5F5F5
+      F6F6F6F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F6F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7BCBCBCBBBBBBBABABAB8B8B8B6B6
+      B6B5B5B5B4B4B4B2B2B2B1B1B1B0B0B0AEAEAEADADADACACACABABABAAAAAAA8
+      A8A8A7A7A7A6A6A6A4A4A4A3A3A3A1A1A1A0A0A09F9F9F9D9D9D9C9C9C9B9B9B
+      9A9A9A99999998989899A0B69BB2FA9BB2FA9AB2FA9AB2FA9AB1FA9AB1FA9AB1
+      FA99B1FA99B1FA99B1FA99B0FA99B0FA99B0FA98B0FA98B0FA98AFFA98AFFA97
+      AFFA97AFFA97AFFA97AEFA97AEFA97AEFA96AEFA96AEFA96AEFA96ADFA96ADFA
+      95ADFA95ADFA95ADFA95ADFA95ACFA94ACFA94ACFA94ACFA94ACFA94ABFA94AB
+      FA93ABFA93ABFA93ABFA93AAFA93AAFA92AAFA92AAFA92AAFA92AAFA91A9FA91
+      A9FA91A9FA91A9FA91A9FA91A9FA90A8FA90A8FA90A8FA90A8FA90A8FA8FA7FA
+      8FA7FA8FA7FA8FA7FA8FA7FA8EA7FA8EA6FA8EA6FA8EA6FA8EA6FA8EA6FA8DA6
+      FA8DA5FA8DA6F98DA6F98DA5F98EA6F98EA5F98EA6F98FA7F98FA6F98FA7F98F
+      A7F990A7F990A8F991A8F991A8F992A8F992A9F992A9F993A9F993A9F994ABFA
+      95ABF994AAF997ACF996ACF996ACF998ADF998ADF999ADF999AEF99AAEF99AAE
+      F99AAFF99CB0F89DB1F99EB2F99EB1F89FB2F8A0B3F9A0B3F8A1B4F8A2B4F8A3
+      B5F9A4B6F9A5B6F9A5B7F9A6B8F9A7B8F8A7B9F8A9BAF8AABAF8ABBBF8B0BAE0
+      B8B8B8B9B9B9BABABABBBBBBBCBCBCBEBEBEBFBFBFC0C0C0C0C0C0C1C1C1C2C2
+      C2C3C3C3C4C4C4C5C5C5C6C6C6C6C6C6C7C7C7C9C9C9CACACACACACACBCBCBCC
+      CCCCCDCDCDCECECECFCFCFCFCFCFD0D0D0D1D1D1D1D1D1D2D2D2D3D3D3D4D4D4
+      D4D4D4D5D5D5D6D6D6D6D6D6D7D7D7D8D8D8D9D9D9DADADADADADADBDBDBDCDC
+      DCDCDCDCDDDDDDDEDEDEDEDEDEDFDFDFE0E0E0E1E1E1E1E1E1E2E2E2E3E3E3E4
+      E4E4E4E4E4E5E5E5E6E6E6E6E6E6E7E7E7E8E8E8E8E8E8E9E9E9E9E9E9EAEAEA
+      EBEBEBECECECEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEFEFEFF0F0F0F0F0F0F0F0
+      F0F1F1F1F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F5
+      F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7BDBDBDBCBCBCBABABAB9B9B9B8B8B8B6B6B6
+      B5B5B5B4B4B4B2B2B2B1B1B1AFAFAFAEAEAEADADADACACACABABABAAAAAAA8A8
+      A8A7A7A7A6A6A6A5A5A5A3A3A3A1A1A1A0A0A09F9F9F9D9D9D9C9C9C9B9B9B9A
+      9A9A9999999999999AA2BD9BB2FA9BB2FA9BB2FA9BB2FA9AB2FA9AB2FA9AB2FA
+      9AB1FA9AB1FA9AB1FA99B1FA99B1FA99B0FA99B0FA99B0FA98B0FA98B0FA98B0
+      FA98AFFA98AFFA97AEFA97AFFA97AFFA97AEFA97AEFA97AEFA96AEFA96AEFA96
+      AEFA96ADFA95ADFA95ADFA95ADFA95ADFA95ACFA95ACFA94ACFA94ACFA94ACFA
+      94ACFA94ABFA93ABFA93ABFA93ABFA93ABFA93AAFA92AAFA92AAFA92AAFA92AA
+      FA92AAFA91A9FA91A9FA91A9FA91A9FA91A9FA91A9FA90A8FA90A8FA90A8FA90
+      A8FA8FA8FA8FA7FA8FA7FA8FA7FA8FA7FA8FA7FA8EA6FA8EA6FA8EA6FA8EA6FA
+      8EA6FA8EA6FA8EA6FA8FA6FA8EA6FA8FA7FA8FA7FA8FA7FA90A7FA91A8FA91A8
+      FA91A8FA92A9FA92A8FA92A9FA93AAFA94AAFA93AAFA94AAFA94ABFA95ABF996
+      ACF997ACF997ACF997ADF998ADF999AEF999AEF99AAFF99BAFF99BAFF99CB0F9
+      9DB1F99DB1F99EB2F99FB2F9A0B3F9A0B3F9A1B4F9A2B4F9A2B5F9A3B5F9A4B6
+      F9A5B7F9A5B7F9A6B8F9A7B8F8A9B9F8A9BAF8AABBF8ABBBF8B4B8C7B8B8B8B9
+      B9B9BBBBBBBCBCBCBDBDBDBEBEBEBFBFBFC0C0C0C1C1C1C2C2C2C3C3C3C3C3C3
+      C4C4C4C5C5C5C6C6C6C8C8C8C8C8C8C9C9C9CACACACBCBCBCCCCCCCCCCCCCDCD
+      CDCECECECFCFCFD0D0D0D0D0D0D2D2D2D2D2D2D3D3D3D3D3D3D4D4D4D5D5D5D5
+      D5D5D7D7D7D7D7D7D8D8D8D8D8D8D9D9D9DADADADADADADBDBDBDCDCDCDCDCDC
+      DDDDDDDEDEDEDFDFDFDFDFDFE1E1E1E1E1E1E1E1E1E2E2E2E3E3E3E4E4E4E4E4
+      E4E5E5E5E6E6E6E7E7E7E8E8E8E9E9E9EAEAEAEAEAEAEAEAEAEBEBEBECECECED
+      EDEDEDEDEDEEEEEEEEEEEEEFEFEFF0F0F0F0F0F0F1F1F1F1F1F1F2F2F2F2F2F2
+      F3F3F3F2F2F2F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7BEBEBEBDBDBDBCBCBCBBBBBBB9B9B9B8B8B8B6B6B6B5
+      B5B5B4B4B4B2B2B2B1B1B1AFAFAFAEAEAEADADADACACACABABABAAAAAAA8A8A8
+      A7A7A7A6A6A6A4A4A4A3A3A3A1A1A1A0A0A09F9F9F9D9D9D9C9C9C9B9B9B9A9A
+      9A9999999898989AA2BD9BB3FA9BB2FA9BB2FA9BB2FA9AB2FA9AB2FA9AB2FA9A
+      B1FA9AB1FA9AB1FA99B1FA99B1FA99B0FA99B0FA99B0FA98B0FA98B0FA98B0FA
+      98AFFA98AFFA97AFFA97AFFA97AFFA97AEFA97AEFA97AEFA96AEFA96AEFA96AE
+      FA96ADFA95ADFA95ADFA95ADFA95ADFA95ACFA95ACFA94ACFA94ACFA94ACFA94
+      ACFA94ABFA93ABFA93ABFA94ABFB93ABFB93AAFA93ABFB92AAFA92AAFA92AAFB
+      92AAFA92AAFB92AAFB92AAFB91A9FB91A9FA91A9FB91A9FB90A8FA90A8FA90A8
+      FB90A8FB90A8FB8FA7FA8FA8FB8FA7FA8FA7FA8FA7FB8FA7FB8EA6FA8FA7FA8E
+      A6FA8FA7FA8FA7FA90A8FA8FA7FA90A7FA8FA7FA91A8FA91A8FA92A9FA91A9FA
+      92A9FA93A9FA93A9FA93AAFA94AAFA95AAFA95ABFA95ACFA95ABF996ACF998AD
+      FA97ACF998ADFA98ADF999AEFA9AAEF99AAFF99BAFF99CB0F99CB0F99EB1FA9D
+      B1F99FB2FAA0B3FAA0B3F9A1B4F9A2B5F9A2B5F9A3B6F9A4B6F9A5B7F9A6B7F9
+      A6B8F9A8B9F9A8BAF9A9BAF9AABBF9ABBBF9AFBBE8B8B8B8B9B9B9BBBBBBBCBC
+      BCBCBCBCBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1C3C3C3C4C4C4C4C4C4C5C5C5C7
+      C7C7C8C8C8C8C8C8C9C9C9CACACACBCBCBCCCCCCCDCDCDCDCDCDCFCFCFD0D0D0
+      D0D0D0D1D1D1D2D2D2D3D3D3D4D4D4D4D4D4D5D5D5D5D5D5D6D6D6D7D7D7D8D8
+      D8D8D8D8D9D9D9D9D9D9DADADADBDBDBDBDBDBDCDCDCDDDDDDDDDDDDDEDEDEDF
+      DFDFDFDFDFE0E0E0E2E2E2E2E2E2E2E2E2E4E4E4E5E5E5E5E5E5E5E5E5E6E6E6
+      E7E7E7E7E7E7E8E8E8E9E9E9EAEAEAEAEAEAEAEAEAECECECECECECEDEDEDEDED
+      EDEEEEEEEFEFEFEFEFEFF0F0F0F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F3F3F3F3
+      F3F3F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F7F7F7
+      F6F6F6F7F7F7F7F7F7F6F6F6F7F7F7F7F7F7F6F6F6F7F7F7F6F6F6F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7BFBFBFBEBEBEBEBEBEBCBCBCBBBBBBBABABAB9B9B9B7B7B7B5B5
+      B5B4B4B4B2B2B2B1B1B1B0B0B0AEAEAEADADADACACACABABABAAAAAAA8A8A8A7
+      A7A7A6A6A6A5A5A5A3A3A3A2A2A2A0A0A09F9F9F9E9E9E9C9C9C9C9C9C9A9A9A
+      9999999999999AA2BD9CB3FB9CB3FB9BB3FB9BB3FB9BB2FB9BB2FB9BB2FB9AB2
+      FB9AB2FB9AB2FB9AB1FB9AB1FB9AB1FB99B1FB99B1FB99B0FB99B0FB98B0FB98
+      B0FB98B0FB98AFFB98AFFB98AFFB97AFFB97AFFB97AFFB97AEFB97AEFB96AEFB
+      96AEFB96AEFB96AEFB96ADFB95ADFB95ADFB95ADFB95ADFB95ACFB95ACFB94AC
+      FB94ACFB94ACFB94ABFB94ABFB93ABFB93ABFB93ABFB93ABFB92AAFB92AAFB92
+      AAFB92AAFB92AAFB92AAFB91A9FB91A9FB91A9FB91A9FB91A9FB90A8FB90A8FB
+      90A8FB90A8FB90A8FB8FA8FB8FA7FB8FA7FB8FA7FB8FA7FB8FA7FA8FA7FA8FA7
+      FA8FA7FA90A8FA91A8FA90A8FA90A8FA91A8FA92A9FA92A9FA92A9FA93AAFA94
+      AAFA93AAFA94AAFA94ABFA95ABFA95ABFA95ACFA96ACFA97ACFA98ADFA98ADFA
+      98ADFA99AEFA9AAFFA9AAFFA9BB0FA9BB0FA9CB0FA9DB1FA9EB1FA9EB2FA9FB3
+      FAA0B3FAA1B4F9A1B4F9A2B5F9A3B5F9A3B6F9A4B6F9A5B7F9A6B8F9A7B9F9A8
+      B9F9A8B9F9A9BAF9AABBF9ABBBF9B4B8C8B8B8B8BABABABBBBBBBCBCBCBDBDBD
+      BEBEBEBFBFBFC0C0C0C1C1C1C2C2C2C3C3C3C4C4C4C4C4C4C5C5C5C6C6C6C8C8
+      C8C9C9C9CACACACACACACCCCCCCDCDCDCECECECECECECFCFCFD0D0D0D1D1D1D1
+      D1D1D3D3D3D3D3D3D4D4D4D4D4D4D5D5D5D6D6D6D6D6D6D7D7D7D8D8D8D8D8D8
+      D9D9D9DADADADADADADBDBDBDCDCDCDCDCDCDDDDDDDEDEDEDEDEDEE0E0E0E0E0
+      E0E1E1E1E2E2E2E2E2E2E3E3E3E4E4E4E5E5E5E5E5E5E6E6E6E7E7E7E7E7E7E7
+      E7E7E8E8E8E9E9E9EAEAEAEAEAEAEBEBEBEBEBEBEDEDEDEDEDEDEEEEEEEEEEEE
+      EFEFEFEFEFEFF0F0F0F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F3F3F3F4F4F4F4F4
+      F4F4F4F4F4F4F4F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7
+      F7F7F6F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F6F6F6F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7}
+  end
+  object Bevel2: TBevel
+    Left = 0
+    Top = 64
+    Width = 500
+    Height = 2
+    Align = alTop
+    Shape = bsTopLine
+  end
+  object Bevel3: TBevel
+    Left = 0
+    Top = 369
+    Width = 500
+    Height = 2
+    Align = alBottom
+    Shape = bsTopLine
+  end
+  object Label1: TLabel
+    Left = 8
+    Top = 80
+    Width = 295
+    Height = 13
+    Caption = 'You are about to create your RemObjects SDK Server Project'
+  end
+  object lbl_CreateClientAndGroup: TLabel
+    Left = 44
+    Top = 225
+    Width = 383
+    Height = 26
+    Caption = 
+      'In addition to the Server project, RemObjects SDK will create a ' +
+      'client project to connect to your server.'
+    WordWrap = True
+  end
+  object lbl_GuideWizard: TLabel
+    Left = 44
+    Top = 289
+    Width = 384
+    Height = 26
+    Caption = 
+      'After creating your project(s), a template-specific wizard will ' +
+      'guide you through the further steps needed to complete your appl' +
+      'ication.'
+    WordWrap = True
+  end
+  object Label5: TLabel
+    Left = 16
+    Top = 99
+    Width = 82
+    Height = 13
+    Caption = 'Project Folder:'
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWindowText
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    Font.Style = [fsBold]
+    ParentFont = False
+  end
+  object Label2: TLabel
+    Left = 16
+    Top = 147
+    Width = 79
+    Height = 13
+    Caption = 'Project Name:'
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWindowText
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    Font.Style = [fsBold]
+    ParentFont = False
+  end
+  object Panel1: TPanel
+    Left = 0
+    Top = 371
+    Width = 500
+    Height = 41
+    Align = alBottom
+    BevelOuter = bvNone
+    TabOrder = 6
+    DesignSize = (
+      500
+      41)
+    object btn_Ok: TBitBtn
+      Left = 341
+      Top = 8
+      Width = 75
+      Height = 25
+      Anchors = [akRight, akBottom]
+      Caption = 'OK'
+      Default = True
+      ModalResult = 1
+      TabOrder = 0
+      Glyph.Data = {
+        36060000424D3606000000000000360000002800000020000000100000000100
+        18000000000000060000C40E0000C40E00000000000000000000FF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FF006600006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565656565FF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FF0066001EB2311FB133006600FF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6565659A9A9A9A9A9A65
+        6565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FF00660031C24F22B7381AB02D21B437006600FF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565ABABAB9E9E9E9797979C
+        9C9C656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        00660047D36D3BCB5E25A83B0066001BA92E1DB132006600FF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FF656565BFBFBFB5B5B598989865656594
+        9494999999656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF006600
+        4FD67953DE7F31B54D006600FF00FF006600179D271EAE31006600FF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FF656565C4C4C4CACACAA5A5A5656565FF00FF65
+        65658C8C8C989898656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        00660041C563006600FF00FFFF00FFFF00FFFF00FF00660019AA2B006600FF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FF656565B5B5B5656565FF00FFFF00FFFF
+        00FFFF00FF656565939393656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FF006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF006600149D210066
+        00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565FF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FF6565658A8A8A656565FF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0066
+        00006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FF656565656565FF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FF006600006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565656565FF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
+      NumGlyphs = 2
+    end
+    object btn_Cancel: TBitBtn
+      Left = 420
+      Top = 8
+      Width = 75
+      Height = 25
+      Anchors = [akRight, akBottom]
+      Cancel = True
+      Caption = 'Cancel'
+      ModalResult = 2
+      TabOrder = 1
+      Glyph.Data = {
+        36060000424D3606000000000000360000002800000020000000100000000100
+        18000000000000060000C40E0000C40E00000000000000000000FF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A00009AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00009A0000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        00009A174AFD103BF400009AFF00FFFF00FFFF00FFFF00FF00009A002CF80030
+        FC00009AFF00FFFF00FFFF00FFFF00FF6B6B6BA8A8A8A0A0A06B6B6BFF00FFFF
+        00FFFF00FFFF00FF6B6B6B9A9A9A9C9C9C6B6B6BFF00FFFF00FFFF00FFFF00FF
+        00009A1A47F81A4CFF123BF100009AFF00FFFF00FF00009A012DF60132FF002A
+        F300009AFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7AAAAAA9F9F9F6B6B6BFF
+        00FFFF00FF6B6B6B9999999E9E9E9797976B6B6BFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A1C47F61B4DFF143EF400009A00009A002DF80134FF032BF20000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7ABABABA2A2A26B
+        6B6B6B6B6B9A9A9A9E9E9E9898986B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FF00009A1D48F61D50FF103DFB0431FE0132FF002CF600009AFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7ACACACA3
+        A3A39F9F9F9E9E9E9999996B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FF00009A1A48F91342FF0C3CFF0733F600009AFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7A7
+        A7A7A3A3A39C9C9C6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FF00009A214EFC1D4BFF1847FF1743F600009AFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BACACACAC
+        ACACA9A9A9A4A4A46B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FF00009A2E5BF92C5FFF224DF8204BF82355FF1B46F600009AFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BB1B1B1B3B3B3AB
+        ABABAAAAAAAFAFAFA6A6A66B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A3664FA386BFF2D59F400009A00009A224CF42558FF1D49F60000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BB6B6B6B9B9B9AEAEAE6B
+        6B6B6B6B6BA9A9A9B0B0B0A7A7A76B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        00009A4071FA4274FF325DF100009AFF00FFFF00FF00009A224DF1275AFF204C
+        F800009AFF00FFFF00FFFF00FFFF00FF6B6B6BBBBBBBBEBEBEAFAFAF6B6B6BFF
+        00FFFF00FF6B6B6BA7A7A7B1B1B1AAAAAA6B6B6BFF00FFFF00FFFF00FFFF00FF
+        00009A497AFC3B66F300009AFF00FFFF00FFFF00FFFF00FF00009A2550F42655
+        FA00009AFF00FFFF00FFFF00FFFF00FF6B6B6BC0C0C0B5B5B56B6B6BFF00FFFF
+        00FFFF00FFFF00FF6B6B6BAAAAAAAEAEAE6B6B6BFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A00009AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00009A0000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
+      NumGlyphs = 2
+    end
+  end
+  object cb_CreateClientAndGroup: TCheckBox
+    Left = 16
+    Top = 203
+    Width = 369
+    Height = 17
+    Caption = 'Also create a matching client application and a project group'
+    Checked = True
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWindowText
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    Font.Style = [fsBold]
+    ParentFont = False
+    State = cbChecked
+    TabOrder = 3
+    OnClick = cb_CreateClientAndGroupClick
+  end
+  object cb_GuideWizard: TCheckBox
+    Left = 16
+    Top = 267
+    Width = 441
+    Height = 17
+    Caption = 
+      'Run the New Server Wizard to guide you through the setup of your' +
+      ' project'
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWindowText
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    Font.Style = [fsBold]
+    ParentFont = False
+    TabOrder = 4
+  end
+  object btn_AdvancedOptions: TBitBtn
+    Left = 16
+    Top = 336
+    Width = 177
+    Height = 25
+    Caption = 'Advanced Project Options...'
+    TabOrder = 5
+    OnClick = btn_AdvancedOptionsClick
+    Glyph.Data = {
+      36050000424D3605000000000000360400002800000010000000100000000100
+      0800000000000001000000000000000000000001000000010000FF00FF002423
+      25002D2A2A00383435003A3A3A00413B3B00413D3D003733470021346A002A3B
+      6900273F7300484343004D4948005C47420045465B005A5757005B5959005F5E
+      5E007E5F5800737373007676770089575300895754009A7E65009C7F6600AD70
+      6B00B4766D00BB7D6E0082807F0091847800AC8C6F00C4866F00CA8C7200D193
+      7300D7997400DA9D7500E7AB7900244283003B5781003B528E0041628E00787D
+      83004F7EAF004074B7003481DC007FB1CE004397E2004398E3004399E50053AC
+      EA0053AFED0062B4E000918B80008890A400D19D8000D79F8000D8A18100C1AF
+      9D00D4B79700C6B6A700EEC29800F3C99F00F6CA9D00D4C2B100D1C9B700F6CB
+      A200F8CBA100F3CFAA00E1CAB500E1CDB900E2CFBC00E7D5BD00EED5BA00F7D5
+      B200F6D5B500F3D7B800F3D9BC008FE2F000B4E5F300BCEAF300E1D4C600E7D5
+      C400EDDDC700EDDECA00F4DAC000F6DCC200EFE1CE00F0E3CB00F6E2CC00F3E6
+      CE00F6E7CE00EFE3D300F2E6D700F8EEDD00EDEDED00F7EFE300F6EBE600F8EE
+      E700F7F3EA00FAF6EE00FBF7F200FBFBFA00FBFBFC00FEFEFE00000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000015151515151515151515000000000000155146464444
+      44444715000000000000195D5C5B565352525A150000000000001A5F49424141
+      3E435A150000000000001B625A55554B4B4856150000000000001F63493E4142
+      3C3A40150000000000002064513B3F46391D341200000000000021663517171E
+      26280E0D000000060202226626261C26332609070014040601062366264F2633
+      2633260A081429060306246666264F263326332F2C145E060C0B24635F5F264D
+      2633312E2C145E060F102437373737262D4E312F25145E061414000000000000
+      002A2B2700141406141000000000000000000000000000060406}
+  end
+  object ed_ProjectFolder: TComboBox
+    Left = 44
+    Top = 118
+    Width = 367
+    Height = 21
+    Anchors = [akLeft, akTop, akRight]
+    ItemHeight = 13
+    TabOrder = 0
+    OnChange = ed_ProjectFolderChange
+  end
+  object btn_Browse: TBitBtn
+    Left = 417
+    Top = 116
+    Width = 75
+    Height = 25
+    Anchors = [akTop, akRight]
+    Caption = '&Browse'
+    TabOrder = 1
+    OnClick = btn_BrowseClick
+    Glyph.Data = {
+      36030000424D3603000000000000360000002800000010000000100000000100
+      18000000000000030000120B0000120B00000000000000000000FF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FF1C99CE2BA5D51C9DD10A8AC6FF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFBFA5A34D5A72FF00FFFF00FF249CCFA6EEF7
+      6CEBF85DD9F04AC7E739B8E020A0D40F91CA0F91C9FF00FFFF00FFBFA5A35766
+      831276E23C91DCFF00FF0C8CC799DDEF8BFFFF80FCFF82FBFF7FFAFF79F3FF65
+      E1F74ECEED3CBAE07591A05B66811170D833A1FF2A9AFEFF00FF1296CC59BADE
+      9FFEFF75F7FF78F6FF77F2FC89D9E087D7DE7BE2EA91BCC05168891370D531A0
+      FF319EFBFF00FFFF00FF26A5D448C1E69FEFF879F6FB87D8DCBACABCDABCA5D0
+      B59EAF9A8C817A734179AF32A3FF3DACFE1B9CD4FF00FFFF00FF27AFDE8B97A1
+      88CFE28BD1D3CBB4ADF7F0DDFFFFD8FFFFD9FAF8C5CFB08CC4A9A34DC1FC55D0
+      FB41C1E3FF00FFFF00FF25AFE1AD706B5DBCDDB5A69EF7F4EEFFFFFFFFFFE3FF
+      FFD4FFF7C1FFE6A5D8A0826FD4EB59D7FB68E2F80E90C9FF00FF26AFE1B5776D
+      A4CFD9CEB69EFFFFEAFFFFF3FFFFEAFFFFD7F7DCA9F6C986E1B89191C0C753D3
+      FB7EF3FF28AAD8FF00FF28B0E0BC7F6EFFF4EBD5BCA1FFFFDDFFFFDDFFFFE0FF
+      FACAEFBD81F4BD77E7C49A93C0C44FD3FB7DF4FF56D5EFFF00FF28AFE1C58870
+      FFFCF8CAAA99FEFFCEFFFFC9F8E1ADF0C78CF3CA96FFEBB5D5AF959AC9D37AE0
+      FE9DFBFF96F8FF23A1D328B0E1CE9173FFFAF7D8C4BDDCC59EFCE5A7FAC782FB
+      D08BFFF7E0E7DCCE8CA5AA6BC9E65FBCE060BBDE6CC4E329A1D12DB2E2D59975
+      FFF8F3FCFBFAE5D1C9E9CAA6E7C599E1C298CCB59FB18B8875E7F86DEDFE179D
+      D1FF00FFFF00FFFF00FF1FA1D9DDA077FFFBF6FFFFFFFFFFFFFFFFFEFBF4EBB4
+      8379BF7849B16F5350C0E550C4E71C9DD0FF00FFFF00FFFF00FFFF00FFE2A678
+      FFFFFFFFFFFFFFFFFFFFFFFFF8FAFCB6877AE29955FF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFE7AB79D1926DD1926DD1926DD1926DD1926DB4
+      7E6FFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
+  end
+  object ed_ProjectName: TEdit
+    Left = 44
+    Top = 166
+    Width = 367
+    Height = 21
+    Anchors = [akLeft, akTop, akRight]
+    TabOrder = 2
+    OnChange = ed_ProjectNameChange
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fNewProjectForm.lfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fNewProjectForm.lfm
new file mode 100644
index 0000000..bce92f0
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fNewProjectForm.lfm	
@@ -0,0 +1,3375 @@
+object NewProjectForm: TNewProjectForm
+  Left = 338
+  Height = 418
+  Top = 184
+  Width = 499
+  HorzScrollBar.Page = 498
+  VertScrollBar.Page = 417
+  ActiveControl = ed_ProjectFolder
+  BorderIcons = [biSystemMenu]
+  BorderStyle = bsDialog
+  Caption = 'New RemObjects SDK Server'
+  ClientHeight = 418
+  ClientWidth = 499
+  Constraints.MinHeight = 238
+  Constraints.MinWidth = 300
+  Font.Height = -11
+  Font.Name = 'Tahoma'
+  Position = poScreenCenter
+  object Bevel1: TBevel
+    Left = 4
+    Height = 2
+    Top = 550
+    Width = 673
+    Anchors = [akLeft, akRight, akBottom]
+  end
+  object Image2: TImage
+    Height = 64
+    Width = 499
+    Align = alTop
+    AutoSize = True
+    Picture.Data = {
+      07544269746D617036770100424D36770100000000003600000028000000F401
+      000040000000010018000000000000770100C01E0000C01E0000000000000000
+      0000858585858585858585858585858585858585858585858585858585858585
+      8585858484848484848484848484848484848484848484848484848484848484
+      8484848483838383838383838383838383838383838383838383838383838383
+      8383838383838383838383828282828282828282828282828282828282828282
+      8282828282828282828282828181818181818181818181818181818181818181
+      8181818181818181818181818181818180808081818181818180808080808080
+      80808080808080808080808080808080808080808080807F7F7F7F7F7F7F7F7F
+      7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7E7E7E7E7E7E7E7E7E7E7E7E7F7F7F7F7F
+      7F7F7F7F7F7F7F7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E
+      7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7D7D7D7D7D7D7D7D7D7D7D7D
+      7C7C7C7C7C7C7B7B7B7A7A7A7979797979797878787878787777777676767575
+      757575757474747575757474747474747474746A7CC3677FDD677FDD6880DC69
+      80DD6981DD6A81DC6A81DC6B82DC6B82DC6C82DC6C83DC6E83D6808495878787
+      8B8B8B8D8D8D8F8F8F9090909191919292929292929292929292929191919191
+      919090909090909090908F8F8F8F8F8F8F8F8F8F8F8F8F8F8F90909091919191
+      9191929292929292929292949494949494959595969696969696979797979797
+      9898989A9A9A9A9A9A9A9A9A9B9B9B9C9C9C9D9D9D9D9D9D9E9E9E9F9F9FA0A0
+      A0A0A0A0A2A2A2A2A2A2A2A2A2A3A3A3A5A5A5A5A5A5A6A6A6A7A7A7A8A8A8A8
+      A8A8A9A9A9A9A9A9ABABABACACACACACACAEAEAEAFAFAFB0B0B0B2B2B2B3B3B3
+      B5B5B5B6B6B6B7B7B7B9B9B9BABABABBBBBBBCBCBCBDBDBDBEBEBEBFBFBFBFBF
+      BFC0C0C0C0C0C0C1C1C1C2C2C2C2C2C2C2C2C2C2C2C2C3C3C3C3C3C3C4C4C4C4
+      C4C4C5C5C5C5C5C5C6C6C6C6C6C6C7C7C7C7C7C7C8C8C8C8C8C8C9C9C9CACACA
+      CBCBCBCBCBCBCCCCCCCCCCCCCDCDCDCECECECECECECFCFCFD0D0D0D1D1D1D1D1
+      D1D2D2D2D2D2D2D2D2D2D3D3D3D3D3D3D4D4D4D4D4D4D4D4D4D4D4D4D4D4D4D4
+      D4D4D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D6D6D6D6D6D6D6D6D6D6D6D6D6D6D6
+      D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8D8D8D8D8D8D8D8D8D8D8D8
+      D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADA
+      DADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDCDCDCDCDCDC
+      DCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFE0
+      E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1
+      E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBECECECECECECECECECECECECECECECECECECEDEDEDECECECEDEDEDEDED
+      EDEDEDEDEDEDEDEEEEEEEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F5F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78686
+      8685858585858585858585858585858585858585858585858585858585858585
+      8585848484848484848484848484848484848484848484848484848484848484
+      8484848383838383838383838383838383838383838383838383838383838383
+      8383838383838383838382828282828283838382828282828282828282828282
+      8282828282828282828282818181818181818181818181818181818181818181
+      8181818181818181818181818181818181818181818080808080808080808080
+      808080808080808080808080808080808080808080807F7F7F7F7F7F7F7F7F80
+      80808080807F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F8080808080807F7F7F
+      7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7E7E7E7E7E7E7F7F7F7F7F7F7F7F7F7E7E
+      7E7E7E7E7F7F7F7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7D7D7D7D7D7D7D7D7D7C
+      7C7C7C7C7C7B7B7B7A7A7A7A7A7A797979797979787878777777767676767676
+      7575757676767676767575757575757377896880DD6880DD6981DD6981DD6A81
+      DD6A82DD6B82DD6A82DD6C83DD6D83DD6D83DC6E84DC7084D77F87A88C8C8C8E
+      8E8E919191919191939393939393949494949595959696969797959797969898
+      9698989596969495959394949293939191919191919191919292929292929393
+      939393939393939494949595959595959797979797979898989898989999999A
+      9A9A9B9B9B9C9C9C9D9D9D9D9D9D9E9E9E9E9E9E9F9F9FA0A0A0A0A0A0A1A1A1
+      A2A2A2A3A3A3A4A4A4A4A4A4A5A5A5A6A6A6A7A7A7A8A8A8A8A8A8A9A9A9AAAA
+      AAABABABACACACADADADADADADAEAEAEAFAFAFB1B1B1B1B2BAB0B3C1AFB3C7B0
+      B4C9B2B6CAB2B6CAB4B7CAB5B8CAB8BAC6BBBCC3BFBFC0C0C0C0C0C0C0C1C1C1
+      C1C1C1C3C3C3C3C3C3C3C3C3C4C4C4C4C4C4C4C4C4C4C4C4C6C6C6C5C5C5C6C6
+      C6C6C6C6C7C7C7C7C7C7C8C8C8C9C9C9C9C9C9C9C9C9CACACACCCCCCCCCCCCCC
+      CCCCCDCDCDCECECECECECECFCFCFCFCFCFD0D0D0D1D1D1D2D2D2D3D3D3D3D3D3
+      D3D3D3D3D3D3D4D4D4D4D4D4D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D6D6
+      D6D6D6D6D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8
+      D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D9D9D9D8D8D8
+      D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9DADADAD9D9D9DADADADADADADADADADADA
+      DADADADADBDBDBDBDBDBDBDBDBDBDBDBDCDCDCDBDBDBDCDCDCDCDCDCDCDCDCDD
+      DDDDDCDCDCDDDDDDDEDEDEDDDDDDDEDEDEDEDEDEDDDDDDDDDDDDDEDEDEDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFE0E0E0E0E0E0E0E0
+      E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E2
+      E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAE9E9E9EAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECEC
+      ECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F3
+      F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7868686868686
+      8686868686868686868585858585858686868686868686868585858585858585
+      8585858585858585858585858585858584848485858585858584848484848484
+      8484848484848484848484848484848484848484848484848484838383838383
+      8383838383838383838383838383838383838383838383838383838282828282
+      8282828282828282828282828282828282828282828282828282828281818181
+      8181818181818181818181818181818181818181818181818181818181818181
+      8181818181818181818181818080808080808080808080808080808080808080
+      808080807F7F7F8080808080808080807F7F7F8080808080808080807F7F7F7F
+      7F7F7F7F7F7F7F7F8080808080807F7F7F8080808080808080808080807F7F7F
+      8080808080807F7F7F7F7F7F7E7E7E7F7F7F7E7E7E7E7E7E7E7E7E7D7D7D7D7D
+      7D7C7C7C7B7B7B7B7B7B7A7A7A79797979797979797978787877777777777776
+      76767676767676767676767676766E7CB06981DE6980DD6A82DE6B82DD6B82DD
+      6B82DD6C83DD6C83DE6D84DC6E84DD6E85DD6F85DD6F85DC8089AF8F8F8F9191
+      919393939393939494949797979899999A9C9C9B9E9E9EA1A19FA3A39FA3A39E
+      A2A29C9F9F999B9B969898949595929393919191919191929292939393939393
+      9494949595959595959696969797979797979898989898989A9A9A9B9B9B9B9B
+      9B9C9C9C9C9C9C9D9D9D9E9E9E9F9F9F9F9F9FA0A0A0A0A0A0A1A1A1A3A3A3A3
+      A3A3A4A4A4A4A4A4A5A5A5A6A6A6A7A7A7A8A8A8A8A8A8A9A9A9A9A9A9ACACAC
+      ACACACADADADAEAEAEAEAFB3ABAFC3AAAFCDABB1D0ACB2CFAEB3CFAEB3CFB0B5
+      D0B1B6CFB2B6CFB2B7CFB3B8CFB4B8CFB6BAD0BABCCBBEBFC5C1C1C1C2C2C2C2
+      C2C2C3C3C3C3C3C3C4C4C4C4C4C4C4C4C4C5C5C5C6C6C6C6C6C6C6C6C6C6C6C6
+      C7C7C7C8C8C8C9C9C9C8C8C8CACACACACACACACACACCCCCCCCCCCCCCCCCCCDCD
+      CDCECECECECECECFCFCFD0D0D0D0D0D0D0D0D0D1D1D1D3D3D3D3D3D3D3D3D3D3
+      D3D3D4D4D4D4D4D4D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D6D6D6
+      D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8D8D8
+      D8D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADA
+      DADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDCDCDC
+      DCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDDDD
+      DDDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDF
+      DFDFDFDFDFE0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3
+      E3E3E3E3E2E2E2E3E3E3E4E4E4E3E3E3E4E4E4E3E3E3E3E3E3E5E5E5E4E4E4E4
+      E4E4E5E5E5E4E4E4E5E5E5E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECEC
+      ECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEEEEEE
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F2F2F2F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7
+      F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F787878787878787878786
+      8686868686868686868686868686868686868686868686858585858585858585
+      8585858585858585858585858585858585858585858585858484848484848484
+      8484848484848484848484848484848484848484848484848483838383838383
+      8383838383838383838383838383838383838383838383838383838383828282
+      8282828282828282828282828282828282828282828282828282828181818181
+      8181818182828282828281818181818181818181818181818181818181818181
+      8181818181818181828282808080808080808080808080808080808080808080
+      8080808080808080808080808080808080808080808080808080808080808181
+      8181818180808080808081818181818181818181818181818181818181818181
+      81818080808080808080807F7F7F7F7F7F7E7E7E7E7E7E7E7E7E7D7D7D7C7C7C
+      7C7C7C7B7B7B7B7B7B7A7A7A7979797979797878787777777878787777777777
+      7776767676767677777777787E6A80D76A81DD6B82DE6B83DD6B83DD6C83DD6D
+      84DE6E84DD6E84DD6E84DD6F85DD6F85DD7086DC7086DC7C8ABF919191939393
+      9494949697979899999C9E9EA0A4A4A5ABABA9B1B1ACB5B5ACB5B5ACB4B4A7AF
+      AFA3A9A99EA3A39A9D9D96989895969694949493939394949494949495959595
+      95959696969797979797979898989999999999999A9A9A9B9B9B9C9C9C9C9C9C
+      9D9D9D9F9F9F9F9F9F9F9F9FA0A0A0A0A0A0A1A1A1A2A2A2A3A3A3A4A4A4A4A4
+      A4A5A5A5A7A7A7A7A7A7A8A8A8A8A8A8A9A9A9AAAAAAAAAAAAACACACADADADAD
+      AEB2AAAFC4A9AFD0AAB0D0AAB0D0ACB2D0AEB3D0AEB3D0AFB4D0B0B5D0B2B7D0
+      B3B7D0B3B8D0B4B8D0B5B9D0B6BAD0B7BAD0B7BBD0BABDCEBFC0C5C2C2C2C3C3
+      C3C4C4C4C4C4C4C4C4C4C4C4C4C5C5C5C6C6C6C6C6C6C6C6C6C6C6C6C7C7C7C7
+      C7C7C9C9C9CACACACACACACACACACBCBCBCCCCCCCCCCCCCDCDCDCDCDCDCECECE
+      CFCFCFCFCFCFD0D0D0D0D0D0D1D1D1D2D2D2D3D3D3D3D3D3D3D3D3D4D4D4D4D4
+      D4D4D4D4D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D6D6D6D6D6D6D6
+      D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8D8D8D8D8D8D8
+      D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADADA
+      DADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDCDCDCDC
+      DCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDF
+      DFDFDFDFE0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECEC
+      ECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F2F2F2F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F5F5F5F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7
+      F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78787878787878787878787878686
+      8686868686868686868686868686868686868686868686868686868686868685
+      8585858585858585858585858585858585858585858585858585858585858585
+      8484848484848484848585858585858484848484848484848484848484848484
+      8484848484848484848483838384848483838383838383838383838383838383
+      8383838383838383828282838383838383828282828282828282828282828282
+      8282828383838282828282828282828282828181818181818181818282828181
+      8181818181818181818181818181818181818181818181818181818181818181
+      8181818181818181818181808080818181818181828282828282818181828282
+      8282828282828282828282828282828282828282828282828282828282828282
+      828181818181818080808080807F7F7F7F7F7F7E7E7E7E7E7E7E7E7E7D7D7D7C
+      7C7C7C7C7C7B7B7B7B7B7B7A7A7A7A7A7A797979787878787878777777777777
+      787878777777787878727CA56B82DE6B83DE6C83DE6C83DE6C84DE6E84DE6E84
+      DD6E85DE6F85DD6F85DD7086DD7086DD7086DC7287DC7889CE91929894949497
+      97979A9C9C9FA3A3A6ACACAFB8B8B5C0C0BAC7C7BCCACABBC9C9B7C3C3B0BBBB
+      A9B1B1A2A7A79B9E9E9698989494949393939494949595959595959595959696
+      969797979797979898989999999A9A9A9B9B9B9B9B9B9C9C9C9D9D9D9D9D9D9F
+      9F9F9F9F9F9F9F9FA0A0A0A1A1A1A1A1A1A2A2A2A3A3A3A4A4A4A4A4A4A5A5A5
+      A6A6A6A7A7A7A8A8A8A8A8A8A9A9A9AAAAAAABABABACACACAAADBDA8AECEA8AF
+      D0AAB0D0AAB0D0ABB1D0ADB3D0AEB3D0AEB4D0AFB4D0B1B6D1B2B7D0B3B7D0B3
+      B8D0B4B9D0B5B9D0B7BBD1B8BCD1B8BCD1BABDD0BBBED0BEC0CDC4C4C5C5C5C5
+      C5C5C5C5C5C5C6C6C6C6C6C6C6C6C6C7C7C7C8C8C8C8C8C8C8C8C8C8C8C8CACA
+      CACACACACBCBCBCBCBCBCBCBCBCDCDCDCDCDCDCDCDCDCECECECFCFCFD0D0D0D0
+      D0D0D1D1D1D1D1D1D2D2D2D3D3D3D4D4D4D4D4D4D4D4D4D5D5D5D5D5D5D5D5D5
+      D5D5D5D6D6D6D6D6D6D6D6D6D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D6D6D6D7D7
+      D7D8D8D8D8D8D8D7D7D7D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9
+      D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADADADADADADA
+      DADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDCDCDCDCDCDCDCDCDCDCDC
+      DCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDEDEDEDEDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFE0E0E0
+      E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E2E2
+      E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7
+      E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBECECECECECECECECECECECECEDEDEDECECECEDEDEDEDEDEDECECECEDEDEDED
+      EDEDEDEDEDECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7888888888888878787878787888888878787
+      8787878787878787878787878787878787878787878686868686868686868686
+      8686868686868686868686868686868686868686868685858585858585858585
+      8585858585858585858585858585858585858585858585848484848484848484
+      8484848484848484848484848484848484848484848484848383838383838383
+      8383838383838383838383838383838383838383838383838382828282828283
+      8383838383838383828282828282828282828282828282828282828282828282
+      8282828282828282828181818181818282828181818181818181818181818181
+      8181818181818182828281818182828282828283838382828282828282828283
+      8383838383848484848484838383838383838383848484838383838383838383
+      8383838282828181818181818080807F7F7F7E7E7E7E7E7E7D7D7D7D7D7D7C7C
+      7C7C7C7C7B7B7B7A7A7A7A7A7A79797979797979797978787878787878787878
+      78787878787979796D82D26C83DE6C84DE6C83DE6C84DE6D84DE6F85DE6F85DE
+      7086DD7086DD7187DD7187DD7287DD7287DC7388DD778AD38D91A19697979B9D
+      9DA3A7A7ACB4B44F446B41335E41335E41335E41335E5A52769095A6B7C4C4AC
+      B5B5A2A8A89B9E9E979898959595959595959595969696979797979797989898
+      9999999999999A9A9A9A9A9A9C9C9C9C9C9C9D9D9D9E9E9E9E9E9E9F9F9FA0A0
+      A0A0A0A0A1A1A1A2A2A2A2A2A2A3A3A3A4A4A4A5A5A5A5A5A5A6A6A6A6A6A6A8
+      A8A8A8A8A8A9A9A9AAAAAAABABABABABABA8ADC3A7AED2A7AED1A8AFD0AAB1D1
+      AAB1D0ABB1D0ADB3D0AEB4D1AFB5D1B0B5D1B1B6D1B3B8D1B3B8D1B5B9D1B5B9
+      D1B6BAD0B7BBD1B8BCD1B9BDD0BABDD0BBBED0BBBED0BEC0CFC4C4C7C6C6C6C5
+      C5C5C6C6C6C7C7C7C7C7C7C7C7C7C8C8C8C8C8C8C8C8C8C9C9C9CACACACACACA
+      CBCBCBCBCBCBCCCCCCCDCDCDCDCDCDCECECECECECECFCFCFCFCFCFD0D0D0D1D1
+      D1D1D1D1D2D2D2D2D2D2D4D4D4D4D4D4D4D4D4D5D5D5D5D5D5D5D5D5D6D6D6D6
+      D6D6D6D6D6D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8
+      D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9DADA
+      DADADADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDB
+      DBDBDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDD
+      DDDDDDDDDDDDDEDEDEDDDDDDDEDEDEDEDEDEDDDDDDDEDEDEDFDFDFDEDEDEDEDE
+      DEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFE0E0E0E0E0E0E0
+      E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E2E2E2
+      E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E4E4
+      E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECEC
+      ECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F1F1F1F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F788888888888888888888888888888888888888888888
+      8888888888878787878787878787878787878787878787878787878787868686
+      8686868787878787878787878686868686868686868686868686868686868686
+      8686868686868686868686868685858585858585858585858585858585858585
+      8585858585848484858585848484848484848484848484838383848484838383
+      8383838484848484848484848484848383838484848383838383838383838383
+      8383838383838383838383838382828282828283838382828283838382828282
+      8282828282828282818181828282828282818181818181828282828282828282
+      8181818282828383838282828383838383838383838484848484848484848484
+      8484848485858585858585858585858585858585858585858584848484848483
+      83838383838282828282828181818080807F7F7F7E7E7E7E7E7E7D7D7D7D7D7D
+      7C7C7C7B7B7B7B7B7B7A7A7A7A7A7A7A7A7A7979797979797979797878787979
+      797A7A7A777D936C84DF6D84DF6D85DE6E85DE6E85DE6F85DE7086DE7087DE71
+      87DE7187DD7187DD7388DD7388DE7489DD7489DD778AD88C93AD9C9E9EA4A9A9
+      AEB7B73F32603F32603F32603F32603F32603F32603F3260716F8DB9C6C6ABB3
+      B3A1A6A69A9C9C9797979696969696969797979898989898989898989999999A
+      9A9A9A9A9A9A9A9A9C9C9C9D9D9D9D9D9D9E9E9E9E9E9EA0A0A0A0A0A0A0A0A0
+      A1A1A1A2A2A2A2A2A2A3A3A3A4A4A4A4A4A4A5A5A5A6A6A6A6A6A6A8A8A8A9A9
+      A9A9A9A9AAAAAAAAAAADA6ACCAA6AED2A7AED2A9B0D2A9B0D1AAB1D1ABB1D1AC
+      B2D1AEB3D1AEB4D1AFB5D1B0B5D1B2B7D2B3B8D1B4B9D1B4B9D1B6BAD1B7BBD1
+      B7BBD1B9BDD2BABED1BBBED1BCBFD1BDC0D2BEC1D2BFC2D1C5C6C9C7C7C7C7C7
+      C7C8C8C8C8C8C8C8C8C8C9C9C9C9C9C9CACACAC9C9C9CBCBCBCBCBCBCCCCCCCC
+      CCCCCDCDCDCECECECECECECFCFCFD0D0D0D0D0D0D0D0D0D0D0D0D2D2D2D3D3D3
+      D3D3D3D4D4D4D5D5D5D5D5D5D4D4D4D5D5D5D5D5D5D6D6D6D6D6D6D6D6D6D6D6
+      D6D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8D8D8D8D8
+      D8D8D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADA
+      DADADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDCDC
+      DCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDE
+      DEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDF
+      DFDFDFE0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E2E2E2E3
+      E3E3E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4
+      E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E8E8E8E9E9E9
+      E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECEC
+      ECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F78989898989898989898989898888888989898888888888888888
+      8888888888888888888888888888888888888887878787878787878787878786
+      8686878787878787878787878787868686878787868686868686878787868686
+      8686868686868686868686868686868686868585858585858585858585858686
+      8685858585858585858585858585858584848484848484848484848484848484
+      8484848484848484848484848484838383848484838383838383838383838383
+      8383838383838383838383838383838383838383838383838383838383838282
+      8282828283838382828282828282828282828283838382828282828282828282
+      8282838383848484838383848484848484858585858585858585868686868686
+      8686868787878787878787878787878787878787878686868585858585858585
+      858383838383838282828181818080807F7F7F7F7F7F7F7F7F7E7E7E7D7D7D7C
+      7C7C7C7C7C7B7B7B7B7B7B7A7A7A7A7A7A7A7A7A7A7A7A7979797A7A7A7A7A7A
+      7A7A7A7181BF6D84DF6E85DF6F86DF6F85DE7086DF7087DF7187DE7188DE7288
+      DE7288DE7389DE7489DD7489DD748ADD758ADD788EDE8E9ABAA1A6A6ACB4B43E
+      30633E30633E30633E30633E30633E30633E30633E3063898DA3B5C0C0A7AEAE
+      9EA1A19899999696969696969797979898989999999999999A9A9A9A9A9A9B9B
+      9B9B9B9B9D9D9D9E9E9E9E9E9E9E9E9EA0A0A0A1A1A1A1A1A1A2A2A2A2A2A2A3
+      A3A3A3A3A3A4A4A4A5A5A5A6A6A6A6A6A6A6A6A6A7A7A7A9A9A9A9A9A9AAAAAA
+      ABABABA7ACC6A6ADD2A7AFD3A9B0D3AAB1D2AAB1D2ABB2D2ACB2D2ADB3D2AFB4
+      D2AFB5D2B0B6D2B2B7D2B3B8D2B3B8D2B5BAD2B5BAD1B7BBD2B7BBD1B8BCD2B9
+      BDD2BABED1BBBED1BCBFD1BDC1D2BEC1D2BFC2D2C0C3D1C6C6C8C7C7C7C7C7C7
+      C9C9C9C8C8C8C9C9C9C9C9C9CACACACACACACBCBCBCCCCCCCCCCCCCCCCCCCDCD
+      CDCECECECECECECFCFCFCFCFCFD0D0D0D1D1D1D1D1D1D2D2D2D3D3D3D3D3D3D5
+      D5D5D5D5D5D5D5D5D5D5D5D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7
+      D7D7D7D7D7D7D8D8D8D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9
+      D9D9D9D9D9D9D9DADADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDB
+      DBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDCDCDC
+      DCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFE0
+      E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1
+      E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3
+      E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECEC
+      ECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7898989898989898989898989898989898989898989898989888888898989
+      8989898888888888888888888888888888888888888888888888888787878787
+      8787878787878787878787878787878787878786868686868687878786868686
+      8686868686868686868686868686868686868686858585858585868686868686
+      8686868585858585858585858585858585858585858484848484848585858585
+      8585858584848484848484848484848484848484848484848484848484848484
+      8484848484838383838383848484838383838383838383838383838383838383
+      8383838383838383838383838383838282828383838383838383838383838484
+      8484848485858585858585858586868686868687878788888888888889898988
+      8888898989898989898989898989888888888888888888878787878787868686
+      8585858484848383838181818080807F7F7F7F7F7F7E7E7E7E7E7E7D7D7D7C7C
+      7C7C7C7C7B7B7B7B7B7B7A7A7A7A7A7A7A7A7A7979797A7A7A7A7A7A7A7A7A7A
+      7D886E85DF6E85DF6F86DF7086DE7086DF7087DF7188DE7288DE7288DE7389DE
+      7389DE758ADE758BDE768BDD768BDD7A8EDE8095E08F9FCAA6ADAD7D7D94B2BD
+      C1C5D5D5B3C1CB58517D3C2F653C2F653C2F65453A6DBECCCCAEB7B7A2A6A69B
+      9D9D9797979898989898989898989999999A9A9A9A9A9A9B9B9B9B9B9B9D9D9D
+      9D9D9D9E9E9E9F9F9F9F9F9FA1A1A1A0A0A0A2A2A2A2A2A2A3A3A3A2A2A2A4A4
+      A4A5A5A5A5A5A5A5A5A5A6A6A6A6A6A6A7A7A7A9A9A9A9A9A9AAAAAAA7ABC1A6
+      ADD3A6AED2A8AFD3A9B0D3AAB1D2AAB1D2ABB2D2ACB2D2AEB4D3AFB5D2B0B6D2
+      B1B6D2B2B7D2B3B9D3B4B9D2B5BAD2B6BAD2B7BBD2B8BCD2B9BDD3BABED3BBBF
+      D2BCBFD2BDC0D2BDC1D2BFC2D3C0C3D3C1C3D3C3C5D1C7C8C9C8C8C8CACACAC9
+      C9C9CACACACACACACBCBCBCBCBCBCCCCCCCCCCCCCDCDCDCDCDCDCECECECFCFCF
+      CFCFCFD0D0D0D1D1D1D1D1D1D1D1D1D1D1D1D2D2D2D3D3D3D3D3D3D4D4D4D5D5
+      D5D5D5D5D6D6D6D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7
+      D7D7D7D7D7D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9
+      D9D9D9DADADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDB
+      DBDBDBDBDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDD
+      DDDDDDDDDDDDDDDDDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDF
+      DFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFE0E0E0E0E0
+      E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E2E2E2E2
+      E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9
+      E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECEC
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F5F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78A8A
+      8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8989898989898A8A8A89898989898989
+      8989888888888888888888898989888888888888888888888888878787888888
+      8888888888888888888888888888888787878787878787878787878787878787
+      8787878787878787878787878787878787878786868686868687878786868686
+      8686868686868686868686858585858585858585858585858585858585858585
+      8585858585858585858585858484848585858585858484848484848484848484
+      8484848484848484848484848484848484848484848484848484848483838384
+      8484848484838383838383838383838383838383838383848484858585858585
+      8585858686868686868787878888888888888A8A8A8989898A8A8A8A8A8A8A8A
+      8A8B8B8B8B8B8B8B8B8B8B8B8B8A8A8A8A8A8A89898988888888888887878786
+      86868484848383838181818181818080807F7F7F7F7F7F7E7E7E7D7D7D7D7D7D
+      7C7C7C7C7C7C7C7C7C7B7B7B7B7B7B7B7B7B7A7A7A7B7B7B7B7B7B7B7B7B7681
+      AE6F86DF7086DF7187DF7188DF7288DF7288DF7289DF7389DF7489DE748ADE75
+      8BDE768BDE778CDE778CDE7A8EDF7E93E08499E199A3B8A7AEAEAEB7B7B8C4C4
+      C4D4D4C6D9DC4E45773B2E673B2E673B2E6799A1B2B4BFBFA6ACAC9EA0A09999
+      999898989898989999999999999A9A9A9B9B9B9B9B9B9C9C9C9D9D9D9E9E9E9E
+      9E9E9F9F9FA0A0A0A1A1A1A1A1A1A2A2A2A2A2A2A3A3A3A3A3A3A4A4A4A5A5A5
+      A5A5A5A6A6A6A7A7A7A8A8A8A8A8A8A9A9A9AAAAAAA9ABB5A5ADD4A6ADD3A7AF
+      D3A8AFD3AAB1D4AAB1D3ABB2D3ACB3D3ADB3D3AFB5D3AFB5D3B1B7D3B2B7D3B3
+      B8D3B4B9D3B5BAD3B6BBD3B7BBD3B8BCD3B8BDD3B9BDD3BABED3BCBFD3BDC0D3
+      BDC0D2BEC1D3BFC2D3C1C4D4C1C3D3C2C4D3C5C6CEC9C9C9C9C9C9C9C9C9CACA
+      CACACACACACACACCCCCCCCCCCCCDCDCDCDCDCDCDCDCDCECECECFCFCFD0D0D0D0
+      D0D0D1D1D1D1D1D1D1D1D1D3D3D3D3D3D3D4D4D4D5D5D5D6D6D6D6D6D6D6D6D6
+      D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D9D9
+      D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADADADAD9D9D9DA
+      DADADBDBDBDADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDB
+      DCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDD
+      DDDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDF
+      DFDFE0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E2E2
+      E2E3E3E3E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4
+      E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEBEBEBEBEBEBEAEAEAEBEBEBEAEAEAEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEFEFEFEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78B8B8B8B8B8B
+      8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A
+      8A89898989898989898989898989898989898989898989898988888888888888
+      8888888888888888888888888888898989888888888888888888888888888888
+      8888888888888888888787878787878787878787878787878787878787878787
+      8787878787878787878786868686868686868685858586868686868686868686
+      8686858585858585868686858585858585858585858585858585858585858585
+      8585858585858585858585858484848484848484848484848484848484848484
+      8484848483838384848483838383838384848484848485858586868685858587
+      87878787878787878989898A8A8A8B8B8B8B8B8B8B8B8B8C8C8C8D8D8D8C8C8C
+      8D8D8D8D8D8D8C8C8C8C8C8C8C8C8C8B8B8B8B8B8B8A8A8A8989898888888686
+      868585858383838282828181818181818080807F7F7F7E7E7E7E7E7E7D7D7D7C
+      7C7C7C7C7C7C7C7C7B7B7B7C7C7C7B7B7B7B7B7B7B7B7B7C7C7C7B7F897087E0
+      7087E07187DF7288DF7389E07389E07389DF748ADF7489DE758ADF768BDE768B
+      DE778CDF778CDE798EDE7C91DF7F94E0939AA79DA1A1A1A7A7AAB2B2B5C1C1C3
+      D4D4979FB6392D69392D69392D698184A2B9C5C5AAB1B19FA2A29A9B9B989898
+      9999999A9A9A9B9B9B9B9B9B9C9C9C9C9C9C9D9D9D9D9D9D9F9F9F9F9F9FA0A0
+      A0A1A1A1A2A2A2A2A2A2A2A2A2A3A3A3A3A3A3A4A4A4A5A5A5A6A6A6A6A6A6A7
+      A7A7A8A8A8A8A8A8A9A9A9A9A9A9AAAAAAA6ADD0A6AED4A6AED3A8B0D4A9B0D4
+      AAB1D4AAB2D4ABB2D3ACB3D3AEB4D3AFB5D3B0B6D3B1B7D3B2B7D3B3B8D3B3B9
+      D3B5BAD3B6BBD3B8BCD3B8BCD3B9BDD3BABED4BBBFD4BCBFD3BDC1D3BDC1D3BF
+      C2D3C0C3D4C1C4D4C2C4D4C2C5D4C3C6D4C8C8CBCACACACBCBCBCBCBCBCBCBCB
+      CBCBCBCCCCCCCDCDCDCECECECECECECECECED0D0D0D0D0D0D0D0D0D1D1D1D2D2
+      D2D1D1D1D1D1D1D3D3D3D3D3D3D4D4D4D5D5D5D6D6D6D6D6D6D6D6D6D7D7D7D7
+      D7D7D7D7D7D7D7D7D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9
+      D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADADADADADADADADADADBDBDBDBDB
+      DBDBDBDBDBDBDBDBDBDBDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDD
+      DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDDDDDDDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFE0E0
+      E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E4E4E4E5E5
+      E5E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78B8B8B8B8B8B8B8B8B8B
+      8B8B8B8B8B8A8A8A8B8B8B8B8B8B8B8B8B8A8A8A8B8B8B8A8A8A8A8A8A8A8A8A
+      8989898A8A8A8989898989898989898989898989898989898989898989898989
+      8989898989898989898989898989898989898989898989898988888888888888
+      8888888888888888888888888888888888888888888888888888888888888888
+      8787878888888888888888888787878787878787878787878686868686868686
+      8686868686868686868686868686868686868685858585858585858585858585
+      8585858585858585858585848484848484848484848484848484848484848484
+      8484848383838484848484848484848484848585858686868686868787878888
+      888989898A8A8A8A8A8A8C8C8C8D8D8D8D8D8D8E8E8E8E8E8E8F8F8F8F8F8F8F
+      8F8F8F8F8F8F8F8F8E8E8E8E8E8E8E8E8E8E8E8E8D8E8E8B8C8C8A8B8B888888
+      8686868383838282828282828181818080807F7F7F7E7E7E7E7E7E7D7D7D7D7D
+      7D7C7C7C7C7C7C7C7C7C7B7B7B7B7B7B7C7C7C7C7C7C7583BB7188E07187E072
+      88E07289E07389E0748AE0748AE0748AE0758ADF758ADF768CDF778CDF778CDF
+      788DDE798DDE7A8FDE7D91DF939494949696989A9A9FA4A4AAB2B2BAC7C7C2D2
+      D6382C6C382C6C382C6C5D5989BCCACAACB4B4A2A5A59C9D9D9999999A9A9A9A
+      9A9A9C9C9C9C9C9C9D9D9D9D9D9D9E9E9E9E9E9E9F9F9FA2A2A2A2A2A2A1A1A1
+      A2A2A2A3A3A3A3A3A3A4A4A4A4A4A4A4A4A4A5A5A5A6A6A6A6A6A6A7A7A7A8A8
+      A8A8A8A8A9A9A9AAAAAAA9ACBBA6AED5A6AED5A7AFD4A8B0D4A9B0D4AAB2D5AB
+      B2D4ADB4D4AEB4D4AFB5D4AFB5D4B1B7D4B2B8D4B3B8D4B3B9D4B5BAD5B7BCD4
+      B8BCD4B8BCD4B9BED4B9BED4BABED4BDC0D4BDC1D4BEC2D4BFC2D4C0C3D4C1C4
+      D4C2C5D5C4C7D5C3C6D5C4C7D5C6C9D3CACACACACACACBCBCBCBCBCBCBCBCBCC
+      CCCCCDCDCDCECECECECECECFCFCFCFCFCFD0D0D0D1D1D1D1D1D1D2D2D2D2D2D2
+      D2D2D2D4D4D4D5D5D5D5D5D5D6D6D6D6D6D6D7D7D7D7D7D7D8D8D8D8D8D8D8D8
+      D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADA
+      DADADADADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDB
+      DBDBDBDBDBDBDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDD
+      DDDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDF
+      DFDFDFDFDFDFDFDFDFDFDFDFDFDFE0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0
+      E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECEC
+      ECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3
+      F3F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78C8C8C8C8C8C8C8C8C8C8C8C8B8B
+      8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8A8A8A8A8A8A8B8B8B8B
+      8C8C8C8D8D8C8D8D8C8D8D8C8D8D8B8C8C8B8B8B8A8A8A8A8A8A8A8A8A8A8A8A
+      8A8A8A8A8A8A8989898B8B8B8B8C8C8B8B8B8C8D8D8D8E8E8C8D8D8C8D8D8C8D
+      8D8B8C8C8B8B8B8A8A8A8A8A8A8B8B8B8A8B8B8B8C8C8C8E8E8E8F8F8E8F8F8F
+      91918F91918E90908E8F8F8D8E8E8B8D8D898A8A888989888888878787878787
+      8686868888888989898889898889898889898888888788888787878686868686
+      8685858586868686878787888887888887888887888886878785858584848484
+      8484848484848484858585868686878888888989898A8A8A8A8A898A8A8B8B8B
+      8B8B8B8B8B8B8D8D8D8E8E8E8F8F8F9090909090909191919292929292929394
+      949495959495959496969596969698989598989496969295959092928D8F8F8A
+      8B8B8889898586868384848181818080808080807F7F7F7E7E7E7E7E7E7C7C7C
+      7C7C7C7C7C7C7C7C7C7C7D7D7C7D7D7983A9738BE1748BE1748BE1758BE1758D
+      E1768DE1778DE17990E17A90E17C92E17C92E17D93E27D93E17C91E07C90E07B
+      90E07C90DF7C8FDA909090929292939393999B9BA3A9A9B2BDBDC5D5D5362A6E
+      362A6E362A6E5C588BBECCCCAFB7B7A3A7A79C9D9D9B9B9B9B9B9B9A9A9A9B9B
+      9B9D9D9D9E9F9F9FA0A0A1A2A2A2A4A4A5A6A6A6A8A8A6A8A8A7A8A8A6A7A7A6
+      A7A7A6A7A7A5A6A6A6A6A6A5A5A5A6A6A6A6A6A6A7A7A7A8A8A8A8A8A8A9A9A9
+      AAAAAAABABABA7B0D2A8B2D7AAB2D7ACB4D7AEB6D9AEB7D9AFB8D9B1B8D7B1B8
+      D7B1B8D6B0B7D6B2B8D5B2B8D5B4B9D5B4B9D5B5BAD5B6BBD5B8BDD5BABED5BA
+      C0D6BBC1D6BCC1D6BEC2D7BFC2D5BEC2D5BFC3D5C0C3D5C2C6D6C4C8D7C5C9D8
+      C6CAD8C8CCD8C8CCD8C8CBD8CCCDCFCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCECE
+      CECFCFCFCFCFCFCFCFCFD0D0D0D1D1D1D2D2D2D2D2D2D3D3D3D3D3D3D3D3D3D5
+      D5D5D6D6D6D7D7D7D8D9D9D9DADAD9DADAD9DADADADBDBDADBDBDADADAD9DADA
+      DADADADADADAD9D9D9D9D9D9D9D9D9D9D9D9DADADADADBDBDBDBDBDBDBDBDBDB
+      DBDCDCDCDCDDDDDCDDDDDCDDDDDCDCDCDCDCDCDDDDDDDDDDDDDCDDDDDCDCDCDD
+      DDDDDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDEDE
+      DEDEDEDEDEDEDFDFDFDFDFDFDEDFDFDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDF
+      DFDFDFDFDFE0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E2E2E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3
+      E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECECECECEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F78C8C8C8D8D8D8C8C8C8C8C8C8C8C8C8C8C8C
+      8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8D8D8E8F8F9092929295
+      959396969396969194949092928D8E8E8C8D8D8B8B8B8A8A8A8A8A8A8A8A8A8A
+      8A8A8B8C8C8C8D8D8F91919294949497979498989498989395959093938E9090
+      8C8D8D8C8C8C8C8D8D8D8F8F909292939595969A9A989D9D9AA0A09BA1A19BA1
+      A19AA0A0999E9E969A9A9396969093938E8F8F8B8C8C8A8A8A898A8A8A8B8B8A
+      8C8C8D8F8F8E91918F92928F91918C8F8F8A8C8C888989878787878787878888
+      898A8A8B8D8D8C8E8E8D90908D90908C8F8F8A8C8C8889898586868585858585
+      858687878889898A8C8C8C8F8F8D90908F91918E90908D8F8F8C8D8D8C8C8C8D
+      8D8D8E8E8E909090919191929292939393949494969696979898999B9B9C9E9E
+      9EA1A1A0A4A4A1A6A6A2A7A7A2A8A8A2A8A8A0A6A69DA3A39AA0A0959A9A9094
+      948D9090898B8B8687878383838181818080807F7F7F7E7E7E7E7E7E7D7D7D7D
+      7D7D7C7D7D7E7E7E7E86A0778FE37B93E37C94E47C95E47C94E47C94E37D95E4
+      8097E48299E4859DE5889FE589A2E689A1E5899FE5879DE4849AE28297E17F95
+      E18393CC919191919191919191989999A1A6A6B0B9B9C2D1D15C588D35297035
+      29705C588DC0CECEB0B8B8A4A8A89D9E9E9A9A9A9B9B9B9C9C9C9E9F9FA1A2A2
+      A3A5A5A6A9A9A9ADADACB0B0AEB3B3AFB3B3B0B4B4B0B4B4AFB3B3ADB0B0ACAF
+      AFAAACACA9AAAAA8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A9A9A9AAAAAAACACACAE
+      B0B8ABB5DAAEB9DBB1BBDCB3BDDCB5C0DDB7C2DEB7C1DDB7C0DCB6BFDBB5BDD9
+      B3BBD8B3BAD7B4BAD6B4BAD5B5BAD5B6BCD6BABFD7BCC2D8BFC4DAC0C7DBC1C8
+      DBC2C8DBC3C9DBC3C7D9C2C7D8C2C7D8C4C8D8C6CAD9C9CEDBCBD0DDCCD2DECE
+      D4DFCFD4DFD0D4DED1D4DAD1D3D3CFD0D0CFD0D0CFD0D0CECECECECECECFCFCF
+      CFCFCFD0D0D0D0D0D0D1D1D1D2D2D2D3D3D3D3D3D3D3D4D4D5D5D5D6D6D6D8D9
+      D9D9DBDBDBDDDDDCDEDEDEDFDFDFE1E1DFE1E1DEE0E0DEE0E0DDDFDFDDDEDEDC
+      DDDDDBDCDCDBDBDBDADBDBDADBDBDCDCDCDCDDDDDDDEDEDEDFDFDEE0E0DEDFDF
+      DFE0E0DFE0E0DFE0E0DFE0E0DFE0E0DEDFDFDFDFDFDEDFDFDDDEDEDEDEDEDDDE
+      DEDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDEDFDFDFDFDFDFE0E0E0E1E1E0
+      E1E1E1E2E2E1E2E2E0E1E1E0E0E0DFE0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1
+      E2E2E2E2E3E3E3E3E3E3E4E4E2E3E3E2E3E3E2E3E3E2E2E2E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3
+      E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9EAEAEAE9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBECECECECECECECECECECECECECECECECECECECECECECECECECECECEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F1F1
+      F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F78D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8C
+      8C8C8D8D8D8D8D8D8C8C8C8C8C8C8D8D8D8F9191929595979A9A9A9F9F9CA2A2
+      9CA2A29A9F9F969A9A9194948E90908C8C8C8B8B8B8B8B8B8B8B8B8C8D8D8E90
+      90929595969A9A9CA1A19FA5A59FA6A69FA6A69DA2A2989C9C94969691939391
+      92929295959699999B9F9FA0A6A6A3ABABA7B1B1AAB4B4ABB6B6ABB7B7AAB5B5
+      A8B2B2A5AEAE9FA7A79AA0A09599998F92928C8E8E8B8D8D8D8E8E9092929498
+      98989D9D989E9E979D9D9498989093938C8E8E888989888989898A8A8D8F8F90
+      9494949999979D9D969C9C949A9A9094948C8E8E898A8A858686858686888A8A
+      8C8F8F919595959B9B969C9C969C9C9599999295959091918E8F8F8E8E8E8F8F
+      8F9090909292929393939596969899999C9D9D9FA2A2A3A8A8A7ADADABB2B2AF
+      B8B8B1BBBBB3BEBEB4BFBFB4C0C0B2BEBEAFBABAABB5B5A6B0B09FA7A7999F9F
+      9297978D9191898B8B8586868182828080807F7F7F7E7E7E7E7E7E7D7D7D7F7F
+      7F7F84947A91DE7F97E6859DE788A1E789A2E78AA3E789A3E78AA3E78EA7E892
+      ABE996B0EA99B4EB9CB6EB9CB5EB9AB3EA97AFE991A8E78DA3E5879DE48999CF
+      939494929393929292969898A0A4A4AEB7B7C0CECE5A57903328733328735A57
+      8FC0CECEB1B9B9A4A8A89FA0A09C9C9C9D9E9E9FA0A0A3A5A5A7ABABABB0B0B1
+      B7B7B5BCBCB8C0C0BBC4C4BCC5C5BCC5C5BDC5C5BAC2C2B7BEBEB4B9B9B1B5B5
+      AEB1B1AAACACA9A9A9A8A8A8A8A8A8A9A9A9ABABABACADADB0B2B2B1B8CCB3BE
+      DFB7C4E1BBC8E2BFCCE4C1CEE5C3D0E6C3CFE5C1CDE3BFC9E1BBC5DEB8C1DBB6
+      BED9B6BCD8B6BCD7B7BDD7BAC0D9BEC4DBC2C9DDC5CEE0C8D1E2CAD2E2CAD2E2
+      C9D1E0C8CEDEC6CCDCC7CDDCC9CEDDCBD1DFCFD5E1D1D8E3D4DBE5D6DDE6D6DD
+      E6D6DDE5D6DCE3D6DADAD4D7D7D2D4D4D0D1D1D0D0D0D0D0D0D0D0D0D0D0D0D1
+      D1D1D1D1D1D2D2D2D3D3D3D4D4D4D4D4D4D5D5D5D8D8D8D9DADADCDDDDDEE0E0
+      E0E3E3E2E5E5E3E6E6E3E7E7E4E8E8E3E7E7E3E6E6E1E4E4E1E3E3DFE0E0DDDE
+      DEDCDCDCDBDBDBDBDCDCDCDDDDDEDFDFE0E1E1E1E3E3E2E5E5E4E6E6E4E7E7E4
+      E7E7E4E7E7E4E6E6E3E6E6E4E6E6E3E5E5E2E3E3E1E2E2E0E0E0DFDFDFDFDFDF
+      DEDFDFDEDEDEDEDEDEDDDDDDDEDEDEDFDFDFE0E0E0E1E2E2E2E4E4E3E5E5E3E5
+      E5E3E5E5E2E3E3E1E1E1E0E0E0DFE0E0E0E0E0E1E1E1E1E2E2E3E3E3E4E5E5E5
+      E7E7E6E8E8E6E8E8E6E7E7E5E6E6E3E4E4E3E4E4E3E3E3E2E2E2E2E2E2E2E2E2
+      E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E2E2E2E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9
+      E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F6F6F6F6F6F6F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F78E8E8E8E8E8E8E8E8E8E8E8E8D8D8D8D8D8D8E8E8E8D8D8D8D8D
+      8D8D8D8D8D8D8D8D8D8D8F8F8F929494989C9C9FA5A5A6AEAEAAB4B4AAB4B4A6
+      AEAE9FA5A5979B9B9294948E8E8E8C8C8C8C8C8C8D8D8D8F9090939595999D9D
+      A1A8A8A8B1B1ADB8B8AEBABAACB7B7A6AFAF9FA6A6999E9E969A9A979A9A9BA0
+      A0A0A7A7A8B1B1AFBABAB4C2C2B9C8C8AAB6C09AA3B79AA3B798A2B6B8C8C8B4
+      C2C2AEBABAA6B0B09DA4A4969A9A9093938F9090919393969B9B9DA4A4A3ABAB
+      A5AFAFA4ADAD9EA6A6979D9D9194948B8C8C898A8A8C8E8E919595989E9E9FA7
+      A7A3ADADA4AEAE9FA8A8989E9E9195958B8D8D8788888788888B8E8E93979799
+      A0A0A0A9A9A4AEAEA2ABAB9DA5A5989D9D9395959091918F8F8F8E8F958D909C
+      9494949798989A9C9C9FA1A1A4A9A9AAB0B0B1B9B9B7C1C1BCC8C8C0CECEB1BC
+      C6A0A9BDA1AABE7B7FA69FA9BD9DA7BBACB9C3B9C8C8B2C0C0A9B5B5A1ABAB9A
+      A1A19297978C8F8F8789898484848181817F7F7F7F7F7F7F7F7F7E81877A8FD8
+      819AE689A3E892ADEB99B3EC9CB7ED9DB8ED9CB7EC9DB8EDA0BBEEA4C0EEAAC5
+      F0A6C0E990A3D3A0B7E2AEC9F0AAC5EFA4BDED9CB4EA94ABE792A2CB989A9A95
+      96969494949799999FA4A4AEB7B7BFCDCD5A56913227753227755A5691C1CECE
+      B2BABAA6AAAA9FA0A09E9F9FA0A1A1A5A8A8ABAFAFB2B8B8B8C0C0BEC8C8C3CF
+      CFC6D3D3ACB5C4A4ABBFA4ABBFB6C0CAC7D3D3C3CDCDBEC7C7B9BFBFB3B7B7AE
+      B0B0ABACACA9A9A9AAAAAAACACACAEAFAFB2B5B5B7BBBBB9C4DDBECCE6C4D2E8
+      C8D7EBCCDBECB0BBD7A8B1D0BBC6DECDDAEBC9D6E8C4D0E4BEC7E0BBC3DCB8BF
+      D9B8BED9B9C0D9BFC5DDC3CBDFCAD2E3CED9E7D2DDE9D4DFEAD3DDE9D0DAE6CE
+      D6E3CCD3E1CCD3E0CED4E1D2D9E5D6DEE8D9E2EAB1B6CFA8ABC89393B9B3B7CF
+      C8CEDDDDE3E4DBDFDFD7DADAD4D6D6D3D4D4D0D1D1D0D1D1D1D1D1D1D1D1D2D2
+      D2D2D2D2D3D3D3D4D4D4D4D5D5D5D6D6D8D9D9DBDDDDDFE2E2E2E6E6E5E9E9E7
+      ECECBABCD0BBBDD1BCBDD1BCBDD1C6C8D7E8ECECE5E9E9E3E6E6E1E3E3DFE0E0
+      DDDEDEDDDEDEDFE0E0E1E3E3E4E6E6E6E9E9E8ECECE9EDEDE9EEEEE9EEEEE9EE
+      EEE9EDEDE9EDEDE8ECECE7EBEBE6E9E9E4E7E7E3E5E5E2E3E3E0E1E1DFE0E0DF
+      DFDFDEDEDEDEDEDEDEDFDFE1E1E1E2E3E3E4E6E6E6E9E9E7EAEAE8EAEAE7E9E9
+      E5E6E6E3E4E4E1E2E2E1E1E1E1E1E1E2E2E2E3E4E4E5E7E7E7E9E9E8EBEBEAED
+      EDE9ECECE8EBEBE6E8E8E4E6E6E4E5E5E3E3E3E2E2E2E2E2E2E2E2E2E2E2E2E3
+      E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4
+      E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E4E4E4E5E5E5E5E5E5E5E5E5E5E5
+      E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9
+      E9E9E9E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F78F8F8F8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E
+      8E8E8E8E8E8E9192929598989EA3A3A9B2B2514C8A524E8B524E8B514C89A8B2
+      B29DA3A39497979091918D8D8D8D8D8D8F90909395959A9E9EA3ABABAEBABA8E
+      95AF54508D54508D534E8C514B89656290A1A7A79DA2A2A0A6A6A6AFAFAFBABA
+      B8C7C78990AF5F5D96302677302677302677302677302677302677423B836464
+      97898FA9979FA99CA2A2959898929595969A9A9EA5A59298A8504C89514D8A51
+      4C8A7D7F9E9FA7A79599998E8F8F8A8C8C8F9292969C9CA2ABAB5F5D90514C8A
+      514D8A504B88A2ACAC979D9D8E9191898A8A8A8B8B8F93939AA1A18F96A5504B
+      89514C8A504C897B7F9EA0A8A8979B9B919393848EAF7289DE7189E38091C796
+      9BA5A1A4A4A8ADADB1B8B8B8C3C3C0CDCDA2AABF6B6B9E443D85302677302677
+      302677302677302677302677302677433C8468699C9AA5BAB4C4C4A9B6B6A0A9
+      A9969C9C8E9292888A8A8485858181818080807E8085788BD27D95E688A1E890
+      A8E54D4C954F4F965150966A71AEB3D1F3B2D0F39BB1DD6368A639307F302677
+      3026773026773026775353978492C5AEC9F0A4BDECA0B0CC9FA4A4999C9C9698
+      98989A9AA1A5A5AEB6B6BFCDCD585592302677302677585692C1CFCFB2BABAA8
+      ACACA1A3A3A2A3A3A6A9A9ADB2B2B6BDBDBEC9C9BDC8CD7E80AA4E498B302677
+      3026773026773026773026773026775753907C7CA59CA1B5B8BEBEB2B5B5ADAE
+      AEABACACACACACAEB0B0B3B6B6B9BDBDC0C7C7C5D4EAB8C5DF8184B44F4A8E30
+      2677302677302677302677302677443D86575294C3CDE3BEC7DEBAC2DBBAC1DB
+      BDC5DCC4CCE1CCD6E6C9D3E4706EA53B317F3026773026773026776E6BA2D2DA
+      E6D2D9E5CAD1E08E8EB866629C3026773026773026773026773026773026775D
+      5795B4B7CCDCE1E1D8DBDBD5D7D7D2D3D3D2D2D2D1D1D1D2D2D2D2D2D2D4D4D4
+      D4D4D4D5D5D5D6D6D6D7D8D8DADCDCDFE2E2C1C2D2807CAA534B8E3026773026
+      77302677302677302677302677483F878D8BB4DCE0E6E5E8E8E1E3E3DFE1E1DF
+      E0E0E0E2E2E4E6E67570A35F58955F5996605997605997605997605997605997
+      6059967873A6A6A5C5D4D7E2EAEEEEE8EBEBE6E8E8E4E5E5E2E3E3E1E1E1E0E0
+      E0DFDFDFE0E0E0E1E2E2E4E5E5E7E9E95F57955F58955F58955F5795E7EAEAE4
+      E6E6E2E3E3E2E3E3E2E3E3E4E5E5E6E8E8E9ECECE0E2E8605896605996605896
+      5F58955E5794C5C4D4E5E6E6E4E4E4E3E3E3E2E2E2E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEB
+      EBECECECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F4F4F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78F8F
+      8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8E8E8E8E8E8E8E
+      8E8E929393999D9DA4ABABB2BEBE2F257A2F257A2F257A2F257AB1BDBDA2AAAA
+      979B9B9192928E8E8E8E8F8F929393999D9DA3AAAAB0BCBCABB8C33830802F25
+      7A2F257A2F257A382F7EA6AFB4A7AEAEA6ADADABB4B4B4C1C1A5B0C04B478C2F
+      257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A
+      6E6F99A1A8A8989D9D9599999A9F9FA4ADAD9199AE2F257A2F257A2F257A7274
+      9FA7B1B1999F9F9093938D8E8E9295959CA3A3AAB6B6514E8E2F257A2F257A2F
+      257AACB9B99DA5A59195958A8B8B8B8D8D949999A0A9A98F97AC2F257A2F257A
+      2F257A71749FA7B1B196A0AE8094D1738CE5728AE4738DE57892E6809AE896A9
+      D4B1BCC4BFCCCCA2ABC05754942F257A2F257A2F257A2F257A2F257A2F257A2F
+      257A2F257A2F257A2F257A2F257A2F257A2F257A54529398A4BAB1C0C0A4AFAF
+      99A1A1909595888A8A8485858282827588D17790E48099E78FA9EAA1BDEF2F25
+      7A2F257A2F257A54549AC3E3F87078B12F257A2F257A2F257A2F257A2F257A2F
+      257A2F257A2F257A2F257A403B8A95A6D5AFC3D8AAB2B2A1A7A79B9E9E9B9D9D
+      A1A5A5AEB6B6BFCDCD5755942F257A2F257A585595C2CFCFB3BBBBA8ADADA4A7
+      A7A6A9A9AEB3B3B8C0C0C2CDCD878AB03830812F257A2F257A2F257A2F257A2F
+      257A2F257A2F257A2F257A2F257A2F257A2F257ABCC3C3B4B8B8AFB1B1ADAEAE
+      AFB0B0B3B6B6BABFBFC2CACACBD6DA7F83B52F257A2F257A2F257A2F257A2F25
+      7A2F257A2F257A2F257A2F257A2F257AC7D1E5C0C9E0BDC5DEBEC5DEC2CBE0CB
+      D5E6B6BDD73930822F257A2F257A2F257A2F257A2F257A595597D5DEE9D6DDE8
+      AEB2CE2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F25
+      7A9F9FBFDDE2E2D8DBDBD5D7D7D3D4D4D3D3D3D3D3D3D3D3D3D5D5D5D5D5D5D6
+      D6D6D7D7D7DADADADCDEDEE1E4E45D56962F257A2F257A2F257A2F257A2F257A
+      2F257A2F257A2F257A2F257A2F257A524B91DDE1E7E5E8E8E2E4E4E1E3E3E4E6
+      E6E7EAEA5E58982F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F
+      257A2F257A2F257A6B66A1BDBED4EAEEEEE7EAEAE4E6E6E2E3E3E1E1E1E0E0E0
+      E1E2E2E3E4E4E6E8E8EAEDED2F257A2F257A2F257A2F257AEAEDEDE7E9E9E4E5
+      E5E3E4E4E4E5E5E6E8E8EAEDEDE1E4EA534B912F257A2F257A2F257A2F257AA4
+      A2C1E8E9E9E5E6E6E4E4E4E3E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4
+      E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      ECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1
+      F1F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7909090909090
+      9090908F8F8F8F8F8F8F8F8F9090908F8F8F8F8F8F8F8F8F8F8F8F8F8F8F9395
+      959CA0A0A8B1B1B8C7C72D237C2D237C2D237C2D237CB7C5C5A6AFAF9A9E9E92
+      93938F8F8F929393979A9AA0A7A7AEB9B9BDCDCD4B478F2D237C2D237C2D237C
+      372E82A0AABAB0BBBBACB5B5AFB9B9B8C5C58B91B32D237C2D237C2D237C2D23
+      7C2D237C2D237C413B895552945552942D237C2D237C2D237C2D237C6E6F9BA2
+      AAAA9A9E9E989D9D9DA3A3AAB4B497A0B62D237C2D237C2D237C7578A5ACB8B8
+      9CA3A39295958E8F8F949898A0A8A8B0BEBE5250922D237C2D237C2D237CB3C2
+      C2A1AAAA9398988A8C8C8B8D8D969C9CA5B1B1949FB52D237C2D237C2D237C74
+      79A7A2B9DA89A5EA7C96E7758EE5748DE57993E6819BE88CA8EB9BB7EFA1BEEC
+      6E74AE2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D23
+      7C2D237C2D237C2D237C2D237C2D237C2D237C2D237C6E72A4ADBDC2A8B4B49C
+      A4A4909595898B8B7B8AC1748CE47891E5849DE894AEECA9C6F22D237C2D237C
+      2D237C53539B666BAB2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D23
+      7C2D237C2D237C2D237C2D237C8893BDB7C3C3AAB2B2A0A5A59EA1A1A3A8A8AF
+      B8B8BFCDCD5653962D237C2D237C565396C2CFCFB4BCBCAAAEAEA7ABABACB1B1
+      B6BEBEC3CFCF6A69A12D237C2D237C2D237C2D237C2D237C2D237C5754965754
+      96423B892D237C2D237C2D237C2D237CBDC4C4B6BABAB1B3B3B0B2B2B3B5B5B9
+      BEBEC1C9C9C2CCD15754972D237C2D237C2D237C2D237C2D237C2D237C2D237C
+      2D237C2D237C2D237C2D237CC7D2E5C1CAE1C0C8DFC2CAE0C8D1E4D2DEEB4E48
+      922D237C2D237C2D237C2D237C2D237C2D237C585398D5DEE8D6DEE8AEB1CE2D
+      237C2D237C2D237C5B5699898AB88A8BB85C579A2D237C2D237C2D237C393083
+      D7DCE1DBDFDFD7D9D9D5D6D6D3D3D3D3D3D3D3D3D3D5D5D5D5D5D5D6D6D6D7D7
+      D7DADBDBDDDFDFE2E5E55B55982D237C2D237C2D237C5D589A827FB17672A945
+      3D8B2D237C2D237C2D237C2D237C5D579AE9EDEDE5E8E8E4E6E6E5E8E8E9EDED
+      5D579A2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D23
+      7C2D237C2D237C2D237C827FB1ECF0F0E8EBEBE5E7E7E3E4E4E1E2E2E2E2E2E4
+      E5E5E7E9E9EBEFEF2D237C2D237C2D237C453D8BECF0F0E8EAEAE5E7E7E6E7E7
+      E7E9E9EAEDEDEEF2F27772AA2D237C2D237C2D237C2D237CA5A4C5EAEDEDE7E9
+      E9E5E6E6E4E4E4E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4
+      E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F791919191919191919190
+      90909090909090909090909090909090909090909090908F8F8F9495959DA2A2
+      ABB5B5BDCDCD2C227E2C227E2C227E403A8BBBCBCBA9B2B29B9F9F9394949091
+      919699999EA3A3ABB4B4BAC9C97174A82C227E2C227E2C227E2C227E959EBAB8
+      C5C5B2BCBCB1BBBBB8C4C4A6B2C32C227E2C227E2C227E2C227E413A8B9098BB
+      BBCBD0C1D1D1BECDCDBDCDCDBECECEA2ADBE7275A33D36866B6B99A0A7A79A9E
+      9E989D9DA0A6A6AEB9B99AA5BC2C227E2C227E2C227E777BA9AFBCBC9FA6A692
+      95958F9090959A9AA3ABABB5C4C45351962C227E2C227E2C227EB7C8C8A4AEAE
+      949A9A8A8D8D8C8F8F989F9FA9B5B598A4BB2C227E2C227E2C227E727DB9A1BF
+      F08CA8EB7E98E77891E57992E7809AE98CA7EC9BB9EFA4C1ED4645952C227E2C
+      227E2C227E2C227E2C227E61609F9299BBB8C5D0C9D8D8C8D7D7C7D7D7B4C2CD
+      8F97B95F5F9E2C227E2C227E2C227E2C227E2C227E484590AFBFC4A9B6B69AA3
+      A38799C97B92E7768EE57B93E6869FE998B3EDAFCCF32C227E2C227E2C227E2C
+      227E2C227E2C227E2C227E646AAC98ACD8B8D6F5BAD6F4ABC3E6818EC2362E86
+      2C227E2C227E2C227E2C227E8A91B4B5C1C1A9B0B0A3A8A8A6ABABAFB8B8C0CE
+      CE5553982C227E2C227E565398C2CFCFB5BEBEADB2B2ADB2B2B4BBBBC0CBCB68
+      68A22C227E2C227E2C227E2C227E5754999EA6C2CEDCDCCBD8D8CBD7D7CCD8D8
+      CCD8D8999EBB66649E2C227EBBC1C1B6BABAB1B4B4B2B4B4B7BBBBC0C7C7CBD5
+      D5615F9E2C227E2C227E2C227E2C227E58559CA2ABCFCBD9EBD5E4F1D4E2F0A8
+      B0D26A68A82C227EC4CFE4C2CAE2C1C9E1C5CDE3CCD7E8A1A7CC2C227E2C227E
+      2C227E2C227E9396C0D3DDEBB8BED79FA2C6D3DBE6D4DBE7ACB0CE2C227E645F
+      A1C8CEE0DFE8EFE1EAF0E4EDF1E8F3F57371AB2C227E2C227E2C227E9494BCDE
+      E3E3D9DCDCD6D7D7D5D5D5D4D4D4D5D5D5D6D6D6D6D6D6D7D7D7D8D8D8DADBDB
+      DDDFDFE2E5E55B5499382F858B88B6DEE2E8EAEFEFEAEFEFECF1F1EEF5F5A6A6
+      C92C227E2C227E2C227E2C227EAFB0CDE7EBEBE5E8E8E6EAEAEBEFEF5D579C2C
+      227E2C227E2C227E8E8CBA8E8CBA8E8CBA8E8CBA7672AB453D8D2C227E2C227E
+      2C227E2C227E2C227E504A95E0E3E9E8EBEBE5E7E7E3E3E3E3E4E4E5E6E6E8EB
+      EBEDF2F22C227E2C227E2C227E5E579CEEF2F2EAECECE8EAEAE8EAEAEAEDEDEE
+      F2F27672AB2C227E2C227E2C227E2C227EA6A5C8ECEFEFE9EBEBE7E8E8E5E6E6
+      E5E5E5E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6
+      E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E7E7E7E8E8E8E7E7E7
+      E8E8E8E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F79292929191919191919191919191
+      919191919191919191919191919090909090909090909597979FA4A4AEB8B8C0
+      D0D02A21802A21802A2180535299BCCCCCAAB3B39CA1A19597979496969B9F9F
+      A6AFAFB5C2C29FABC32A21802A21802A21802A21807A80AFBFCDCDB5C0C0B2BB
+      BBB6C1C1C1D0D03F398C2A21802A21802A2180686BA6C0D0D6C1CFCFB9C5C5B3
+      BEBEB0BABAB0BABAB0BBBBB0BABAAEB8B8A3ABB18D92A49CA1A1989B9B9A9E9E
+      A1A8A8B0BCBC9CA7BF2A21802A21802A21808A92B6B1BEBE9FA6A69396969092
+      92969A9AA4AEAEB7C7C75251982A21802A21802A2180BACCCCA5B1B1959B9B8C
+      8E8E8C8F8F989F9FABB8B899A6C02A21802A21802A2180737EBBA4C3F18FAAEC
+      819AE87B94E77F99E88AA6EB9AB7EFA4C1EC4645972A21802A21802A21802A21
+      8050519EB1C5DDC7D5D8C2CECEBDC8C8BAC5C5B9C3C3B8C3C3BAC5C5BCC9C9C1
+      D1D1B4C3CF5D5E9F2A21802A21802A21802A2180484592AFBEC4A0B7D98DA7EB
+      819AE87A92E67D95E788A1EA9AB6EEB2D0F42A21802A21802A21802A21802A21
+      80342D889AAFD9B4D1F4ACC7F1A7C2EFA8C1EFACC7F0B4D0F3B6D0EF5B5EA52A
+      21802A21802A2180342D86B7C4CAB1BABAA9AFAFA9AFAFB2BBBBC0CECE545299
+      2A21802A2180545299C3D0D0B7BFBFB1B7B7B2B9B9BCC6C6A2AAC22A21802A21
+      802A21802A2180969DC1CFDDDDC7D3D3C2CCCCC0C8C8BFC7C7C0C8C8C1C9C9C1
+      C9C9BFC6C6A1A5B6B7BBBBB3B6B6B2B5B5B5B8B8BDC2C2C7D0D0898DB72A2180
+      2A21802A2180352E8798A0CAD3E3F1CEDCEECAD7EBC9D6EAC9D6EAC9D5E9C8D3
+      E8A8AFD2C1CAE2C0C8E0C2CAE1C7D0E4D0DBEA7879B22A21802A21802A218092
+      95C2E0ECF3D8E3EDD3DBE8D0D7E5CFD5E4D1D7E4A8ACCC6A68A7D7DEE8D8DFE9
+      D9E1E9DBE3EADFE7EEE6F0F3DDE6EF2A21802A21802A2180726FAAE1E6E6DBDE
+      DED7D8D8D5D5D5D5D5D5D5D5D5D7D7D7D8D8D8D8D8D8D9D9D9DADBDBDDDFDFE0
+      E2E2645FA0C2C3D5E6E9E9E6E9E9E7EAEAE7EAEAE8ECECECF1F1F0F6F67571AC
+      2A21802A21802A2180817EB3EAEEEEE8EBEBE8ECECECF0F05C579E2A21802A21
+      802A2180F1F7F7F0F6F6EDF2F2ECF0F0ECF0F0EEF3F3BEC1D84F49962A21802A
+      21802A21802A21807571ADECF0F0E8EBEBE5E6E6E4E5E5E5E7E7E9ECECEEF2F2
+      2A21802A21802A21805C579EEFF3F3EBEEEEEAEDEDEBEEEEEEF2F28E8BBB2A21
+      802A21802A21802A2180A6A6CAEEF2F2EBEDEDE8EAEAE6E7E7E5E5E5E4E4E4E4
+      E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBECECECEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEC
+      ECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7929292929292929292929292929292929292
+      929292929292929292929292919191919191969797A0A5A5AEB8B8C0D1D12820
+      8328208328208352519BBDCDCDABB4B49DA2A2979A9A989C9CA4AAAAB2BDBDB7
+      C7CD322B892820832820832820835C5DA1C1D0D0B5C0C0AFB8B8B1BABABBC7C7
+      8C94B92820832820832820835D5EA2D0E3E3C3D2D2B8C3C3B0B8B8AAB2B2A7AE
+      AEA6ACACA6ACACA5ABABA3AAAAA3A8A89DA2A2999C9C969898989C9CA1A8A8B1
+      BDBD9CA8C02820832820832820839DA9C2B1BEBEA0A7A79395958F9191979B9B
+      A5AEAEB8C8C851509B282083282083282083BACCCCA5B1B1959B9B8B8D8D8C8F
+      8F97A0A9A4BBDA94A8D8282083282083282083727EBDA6C3F190ACEC829DE980
+      9AE887A2EB97B4EFAAC8F34D4FA02820832820832820832820837D8CC4B1D0F5
+      A3C2F29BB6EDA3B4D4AEB5BAAEB3B3ACB1B1ABB1B1ABB1B1ADB5B5B2BCBCB7C4
+      C4C1D2D28E98BD282083282083282083282083454397ABC9F399B4EF8AA3EA7E
+      97E77F97E789A2EA9AB6EEB4D1F4282083282083282083282083282083A7BEE2
+      B2CEF3A4BEEF9AB3EC95ADEB95ADEB99B1EBA2BBEEB3C7DBC5D9DB4745952820
+      832820832820836566A4B9C5C5AEB7B7ACB4B4B3BDBDC1CFCF52519B28208328
+      208353519CC4D1D1B9C2C2B4BCBCB9C1C1C3CFCF53509B282083282083282083
+      959DC2D2E2E2C8D4D4C1C9C9BBC1C1B8BDBDB8BDBDB7BCBCB8BDBDB8BDBDB7BC
+      BCB6BABAB3B6B6B2B4B4B3B5B5B8BCBCC2C9C9C4CED5332C8928208328208328
+      2083A2ACD2D1E0F0C9D6EBC2CEE7BFCAE5BEC9E3BFC8E3C0CAE3BFC9E2BFC8E1
+      BDC5DEBDC5DEC2CAE1C9D2E6D3DEEC56539F282083282083282083D6E2EEDAE4
+      EED2DBE7CED4E3CCD1E1CBD0E0CCD1E0C3C9DBD1D6E3D2D7E4D3D9E4D5DAE5D8
+      DEE7DDE5EBE5EEF2DDE6EF28208328208328208358549FE2E7E7DCDFDFD7D9D9
+      D6D6D6D5D5D5D5D5D5D7D7D7D8D8D8D8D8D8D8D9D9DADBDBDCDDDDDFE0E0D5D7
+      DDE2E4E4E2E4E4E2E4E4E3E5E5E4E6E6E6E9E9EAEEEEEFF5F58C8BBD28208328
+      20832820835A55A0EBEFEFE8EBEBE9EDEDEDF1F15A56A0282083282083282083
+      F1F7F7EDF2F2EAEDEDE8EBEBE8EBEBEAEDEDECF1F1EFF4F47471AE2820832820
+      83282083282083A4A4C9EAEEEEE7E9E9E6E7E7E7E8E8EAEDEDEFF3F328208328
+      20832820835B56A0F1F5F5EEF1F1EDF1F1EFF2F2A5A5CB282083282083282083
+      2820838D8BBDEFF2F2EBEEEEE8EAEAE6E7E7E5E5E5E5E6E6E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8
+      E8E8E8E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEB
+      EBEBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F793939393939393939392929292929293939393939392
+      9292929292929292929292929292979898A1A6A6AEB8B8C1D1D1271F85271F85
+      271F8551509DBDCDCDABB4B49FA4A49B9F9FA0A5A5ADB6B6BCCBCB5B5BA2271F
+      85271F85271F853C3891BACAD0B6C1C1ADB5B5ABB2B2B2BBBBC0CDCD47439727
+      1F85271F85322B8BBDCDDACFE1E1C2D0D0B7C2C2B0B8B8ABB1B1A8ADADA6ABAB
+      A4A9A9A4A9A9A2A7A7A0A4A49CA0A0989B9B9799999A9D9DA3A9A9B2BEBE9CA7
+      C1271F85271F85271F859CA8C2B1BDBD9FA6A6939696909292979B9BA5AEAEB8
+      C8C850509C271F85271F85271F85BACCCCA5B1B1959B9B8B8D8D8893B18DA7EC
+      A0BDF093A9DA271F85271F85271F85727EBEA6C4F292AEED87A2EB86A0EA91AD
+      EDA5C2F2707BBE271F85271F85271F85271F858597CDADCCF49DBAF191ACEE87
+      A2EC809BEA8098E5909EC8A1A4A9A2A4A4A1A4A4A2A6A6A5AAAAAAB1B1B2BDBD
+      BCCCCC8B96BC271F85271F85271F85271F85707BBEA6C3F293AEED859EEA839B
+      E98AA4EB9CB6EEB4D1F5271F85271F85271F85271F857581BEB7D3F5A4BEF095
+      ADEC8CA3E8889FE7889EE790A0CB9CA5ADAAB4B4B9C8C8B6C7D4271F85271F85
+      271F85322A8BC0CECEB4BEBEB0B8B8B5BFBFC2D0D052509D271F85271F855251
+      9DC5D2D2BBC5C5B9C1C1BEC8C8ABB6C9271F85271F85271F855E5EA4D7E8E8D0
+      DFDFC6D1D1BFC7C7BAC0C0B7BCBCB6BBBBB6BABAB5B9B9B6BABAB6B9B9B5B8B8
+      B3B5B5B3B5B5B6B9B9BEC3C3C8D0D09398BF271F85271F85271F856A6CB0D2E3
+      F1C8D5EBBFCAE5B9C3E2B7C1E0B8C0DFB9C1DFB9C2DFB9C1DFBAC2DEBAC1DDBD
+      C4DFC2C9E2CAD3E7D5E1ED5653A1271F85271F853F3993DEEAF2D5DEEACDD4E3
+      C8CEDFC7CCDEC8CCDEC9CEDECCD0DFCDD2E1CFD4E1D1D6E3D4D9E5D9DFE8DFE7
+      EDE7F0F49495C4271F85271F85271F857C7BB4E2E6E6DCDFDFD8D9D9D6D6D6D6
+      D6D6D6D6D6D8D8D8D9D9D9D9D9D9D9D9D9DBDBDBDBDCDCDEDFDFDFE0E0E0E1E1
+      E0E1E1E0E1E1E1E2E2E2E4E4E5E8E8EAEEEEEFF5F5807DB7271F85271F85271F
+      855955A1EBEFEFE9ECECEAEDEDEDF2F25A55A2271F85271F85271F85EFF4F4EA
+      EEEEE7E9E9E5E6E6E4E5E5E6E8E8E8EBEBEBEFEFEFF4F47370B0271F85271F85
+      271F85342C8CEEF2F2E9ECECE7E9E9E7E9E9EAEDEDEFF3F3271F85271F85271F
+      855A55A2F2F7F7F0F5F5F0F5F5A6A5CC271F85271F85271F85271F857370B0EF
+      F3F3EBEEEEE9EBEBE6E7E7E5E5E5E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8
+      E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F79494949494949494949494949393939393939393939393939393
+      93939393939393939393979898A1A6A6AFB9B9C1D1D1251D87251D87251D874F
+      4F9EBECDCDACB6B6A3A9A9A0A5A5A8B0B0B7C4C4949FC0251D87251D87251D87
+      251D879FAAC4BAC6C6ADB5B5A7ADADA9B0B0B5BEBEBAC8CE251D87251D87251D
+      876769ABD3E6E6D1E3E3C7D5D5BDC9C9B7C1C1B4BCBCB1B9B9AEB6B6ACB4B4AA
+      B1B1A8AEAEA5AAAAA1A6A69EA1A19A9D9D9DA1A1A6ADADB3BFBF9CA8C2251D87
+      251D87251D879BA7C1B0BDBDA0A6A6949696909292979B9BA5AFAFB8C8C84F4E
+      9E251D87251D87251D87BACCCCA5B1B1959B9B8B8D8D8595C78DA8ECA1BEF193
+      A8DA251D87251D87251D87717DBFA7C5F394AFED8BA6EC8EA9ED9CB8F0A0BAE7
+      2F298E251D87251D87251D877C8BC7AFCDF59DB9F08EA8ED829DEA7C95E97791
+      E8758EE8748DE8768EE38995C39A9CA29B9C9C9D9F9F9FA3A3A5ABABAEB9B9BB
+      CCCC828BBA251D87251D87251D87251D87A1BAE79EB9F08EA7EB88A0EA8DA6EB
+      9DB7F0B4D1F5251D87251D87251D87251D87B8D3F0ABC5F198B1EC8BA2E98499
+      E78494CF8990A38E9090959898A0A6A6B0BBBBC2D3D36568AA251D87251D8725
+      1D879DA7C1B9C4C4B4BDBDB7C2C2C3D1D1504F9F251D87251D87514F9FC6D3D3
+      BDC7C7BCC5C5C2CECE858AB9251D87251D87251D87B5C2D6D7E9E9D2E1E1CAD6
+      D6C4CDCDC1C9C9BEC5C5BDC4C4BCC2C2BBC0C0BBC1C1BABFBFB9BDBDB7BABAB6
+      B9B9BABEBEC2C8C8CDD7D75E5DA5251D87251D87251D87C2D0E5CBDAEEC0CCE7
+      B8C3E2B4BCDFB3BBDEB5BCDEB5BDDEB6BDDEB7BFDEB8C0DDB9BFDDBDC3DFC2CA
+      E1CBD4E7D6E1EE5452A3251D87251D875552A3DBE6F0D2DAE8CBD1E1C8CDDEC7
+      CADDC7CBDDC9CDDDCBCEDECED2E0D0D4E2D4D9E4D8DEE8DDE5ECE4EDF1A0A2CD
+      251D87251D87251D87251D87A9ACCDE0E4E4DCDEDED9D9D9D6D7D7D7D7D7D8D8
+      D8D9D9D9DADADADADADADADADADBDCDCDCDCDCDDDDDDDEDFDFDEDFDFDFDFDFDF
+      E0E0E2E3E3E4E6E6E8EBEBECF0F0E4E9F0322B8E251D87251D87251D877E7CB7
+      EBEFEFE9ECECEAEDEDEDF2F25854A3251D87251D87251D87EEF3F3E9ECECE6E7
+      E7E3E4E4E2E3E3E3E4E4E6E7E7E9EBEBEDF0F0E4E8EF322B8E251D87251D8725
+      1D87A4A4CCEBEEEEE9EBEBE9EBEBEBEEEEEFF3F3251D87251D87251D875954A3
+      F3F8F8F3F8F8CCCFE3322B8E251D87251D87251D87726FB1EFF3F3ECEEEEE9EB
+      EBE7E8E8E6E7E7E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7959595959595949494949494949494949494949494949494949494949494
+      939393939393989999A1A6A6AFB9B9C1D2D2241C8A241C8A241C8A4F4EA0BFCF
+      CFB0BABAA8B0B0A9B1B1B2BEBEB8C8CE2F2890241C8A241C8A241C8A777DB3BD
+      CBCBAFB8B8A5AAAAA3A7A7AAAFAFB6C0C09FA8C4241C8A241C8A241C8A45429C
+      7C81B8868DBEA2ADC9B2BECCC3D0D0C1CDCDBECACABCC8C8B9C5C5B8C2C2B4BF
+      BFB1BABAACB3B3A5ACACA0A5A5A1A6A6A8B0B0B5C1C19CA7C3241C8A241C8A24
+      1C8A9BA7C2B1BDBDA0A7A7959797919393989C9CA5AFAFB8C8C84E4DA0241C8A
+      241C8A241C8ABACCCCA5B1B1959A9A8B8D8D8397D28EA8ECA1BEF193A8DB241C
+      8A241C8A241C8A717DC1A8C5F396B3EF90ABED96B1EFA7C5F35E65B3241C8A24
+      1C8A241C8A4C4EA5B4D2F6A0BCF28EAAEE819CEB7B94E9778FE9758DE8748DE8
+      748CE8748CE8738CE8768DE38794C197999E999A9A9CA0A0A3AAAAADBBBEB5D2
+      EF4C4EA5241C8A241C8A241C8A5E65B3A9C5F394AFEE8CA5EC90A8EC9EBAF0B4
+      D1F5241C8A241C8A241C8A4C4EA6B9D5F5A3BCF092A9EB879BDD898FA98B8B8B
+      8B8B8B8E8E8E9294949CA1A1AAB2B2BCCACA99A5C7241C8A241C8A241C8A767B
+      B2BCC8C8B7C0C0BAC4C4C4D2D2504EA1241C8A241C8A504EA1C7D4D4BEC9C9BE
+      C8C8C5D2D26667AC241C8A241C8A241C8A6869AE7E82B99FA8CBA5AECAC1CCD3
+      CAD5D5C8D3D3C8D2D2C7D0D0C6CFCFC5CDCDC3CBCBC1C8C8BEC4C4BDC2C2BFC5
+      C5C6CECED1DCDC3B3696241C8A241C8A47439CD5E4EDC6D4EBBCC8E5B6C0E1B2
+      BBDFB4BBDEB4BBDDB5BDDEB6BDDEB7BEDDB8BFDDBAC0DDBCC4E0C3CAE3CBD4E8
+      D7E2EE5351A5241C8A241C8A5451A5DAE5EFD2D9E8CBD1E1C8CDDFC6CADDC7CC
+      DDC9CEDECCD0DFCFD4E2D4D9E4D8DEE8DEE5EDCCD3E5625FAC241C8A241C8A24
+      1C8A241C8A49449DE4E9E9DEE2E2DBDCDCD9D9D9D7D7D7D8D8D8D9D9D9D9D9D9
+      DADADADADADADADADADBDBDBDDDDDDDDDEDEDFDFDFDFE0E0E0E1E1E2E4E4E5E7
+      E7E8EBEBECF0F0E3E8EF4B459F241C8A241C8A241C8A241C8AAFB0D2EAEDEDE8
+      EBEBEAEDEDEDF2F25753A5241C8A241C8A241C8AEFF3F3EAECECE6E7E7E3E4E4
+      E2E2E2E3E3E3E4E4E4E6E8E8EAECECEEF2F28B8AC0241C8A241C8A241C8A6561
+      ACEDF0F0EAECECEAECECEBEEEEF0F4F4241C8A241C8A241C8A5853A6F3F8F8CC
+      CFE3312A91241C8A241C8A241C8A4B459EF0F4F4EDEFEFEAEBEBE8E8E8E6E7E7
+      E6E7E7E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F0F0
+      F0F0F0F0F1F1F1F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F79595
+      9595959595959595959595959595959595959595959595959595959594949494
+      9494999A9AA2A7A7B0BABAC2D2D2221B8C221B8C221B8C4D4DA2C4D6D6B7C4C4
+      B1BCBCB4C0C0BFCECE5859A7221B8C221B8C221B8C4D4DA2C0D0D0B2BCBCA6AC
+      AC9FA2A2A1A5A5A9AFAFB7C2C2A0AAC6221B8C221B8C221B8C221B8C221B8C22
+      1B8C221B8C221B8C221B8C3733964C4BA06C6EAE7579B2939CC09BA5C1BFCECE
+      BAC6C6B2BCBCA9B1B1A6ADADAAB3B3B7C3C39CA8C4221B8C221B8C221B8C9BA7
+      C3B2BEBEA0A7A7949797919393999D9DA6AFAFB9C9C94C4DA1221B8C221B8C22
+      1B8CBACCCCA5B0B0959A9A8A8C8C8398D98FA9ECA2BFF193A8DC221B8C221B8C
+      221B8C707CC2A9C6F399B5F096B1EF9DBAF1A7C4EE221B8C221B8C221B8C221B
+      8C96ACDDA7C5F393AFEF849EEB7B95E9778FE8758DE8748DE8748DE8748DE974
+      8DE9758DE8748DE8748DE8778EE38693BF979898979FAE96AEE2A6C4F3A9C3EA
+      221B8C221B8C221B8C221B8CAAC5EE9CB8F092ABED93ACED9FBAF0B4D1F5221B
+      8C221B8C221B8C747FC2B4D1F59FB7EB94A0BA8F91918B8B8B8C8C8C8D8D8D8E
+      8E8E9393939A9D9DA8AFAFB9C6C6A1AFCB221B8C221B8C221B8C777CB5BFCCCC
+      B8C2C2BBC5C5C5D2D24E4EA2221B8C221B8C4F4EA3C8D5D5C0CBCBC0CACAC8D5
+      D54F4EA3221B8C221B8C221B8C221B8C221B8C221B8C221B8C221B8C221B8C4E
+      4DA14E4CA17A7DB68588BBA5ADCAB9C3D1CDD7D7C9D1D1C6CECEC6CDCDCAD3D3
+      D4E0E0221B8C221B8C221B8C514FA4D5E1E6C5D2EBBBC6E5B6BFE1B3BCDEB4BB
+      DEB4BCDEB6BDDFB7BEDEB8BFDEB9BFDEBAC1DEBDC4DFC3CBE3CCD6E8D7E2EF52
+      50A7221B8C221B8C5250A7DBE5EFD2D9E8CCD1E2C8CCDFC6CADDC8CCDECACFDF
+      CFD3E2D2D8E4D9E0E9DFE7EE8F91C62E2993221B8C221B8C221B8C221B8C2F29
+      92C1C5DAE1E5E5DDDFDFDADBDBD8D9D9D8D8D8D8D8D8DADADADBDBDBDBDBDBDB
+      DBDBDBDBDBDCDCDCDEDEDEDEDFDFE0E1E1E1E2E2E3E4E4E5E8E8E9ECECEDF1F1
+      BCBFDC3C3799221B8C221B8C221B8C221B8C4944A0ECF0F0E9EBEBE8EAEAE9EC
+      ECEEF2F25652A7221B8C221B8C221B8CEFF3F3EAECECE6E7E7E3E4E4E2E2E2E3
+      E3E3E4E4E4E6E6E6E9EAEAEDF0F0D8DBEA221B8C221B8C221B8C3C379AEEF2F2
+      EBEEEEEAEDEDECEFEFF0F4F4221B8C221B8C221B8C5652A7E6EAF13C379A221B
+      8C221B8C221B8C4945A0E3E7EEEDF0F0EAECECE8E9E9E7E8E8E7E7E7E6E6E6E6
+      E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5
+      F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7969696969696
+      969696969696959595969696969696959595959595959595959595949494999A
+      9AA2A7A7B1BABAC2D2D2211A8E211A8E211A8E4C4CA3CDE2E2C2D3D3BECECEC3
+      D3D396A3C7211A8E211A8E211A8E2C2793BCCCD3B6C2C2A8AFAF9BA4B4989DA6
+      9FA1A1A9AFAFB7C2C2A0AAC7211A8E211A8E211A8E211A8E211A8E211A8E211A
+      8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E49
+      479E989FB5AEB7B7AEB8B8B8C5C59DA8C5211A8E211A8E211A8E9CA8C5B3BFBF
+      A2A9A9959898929494999E9EA6B0B0B9C9C94C4CA3211A8E211A8E211A8EBBCD
+      CDA6B1B1959A9A8A8C8C829BEA8FAAEDA3C0F293A8DD211A8E211A8E211A8E70
+      7BC3AAC7F39CB8F09AB7F0A6C2F38090CF211A8E211A8E211A8E4A4CA9B2D1F6
+      9CB9F18AA5ED7F98EB7991EA758EE9758EE9758EE9758EE9758EE9758EE9758E
+      E9758EE9768EE9768EE9768EE97D92DF8198E68AA4EC9CB8F1B2D0F65459B021
+      1A8E211A8E211A8E8091CFA4C0F298B1EF96B0EEA0BBF1B5D1F5211A8E211A8E
+      211A8E737FC3B8CDE0A6B2B5999E9E9091918C8C8C8E8E8E8F8F8F9090909393
+      939C9F9FA8B0B0B9C6C6A1AECB211A8E211A8E211A8E777CB6C0CCCCB9C3C3BB
+      C6C6C5D3D34E4DA4211A8E211A8E4E4DA4C8D5D5C1CBCBC1CBCBC9D5D54E4DA4
+      211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A
+      8E211A8E211A8E211A8E211A8E211A8E3733984D4AA1CCD5D5CED8D8D6E2E221
+      1A8E211A8E211A8E504FA6D6E1E1C6D3EABDC7E6B7C0E2B3BDDFB4BCDFB5BDDF
+      B6BDDFB7BEDFB9C0DEBAC0DEBAC1DEBEC5E0C4CCE4CDD7E8D8E3EF5150A8211A
+      8E211A8E5250A8DBE5EFD2DAE8CCD2E3C8CDDFC7CBDEC9CEDFCDD2E1D1D7E4D8
+      DEE9DFE7EF6B6AB4211A8E211A8E211A8E211A8E211A8E4743A1CED3E1E3E7E7
+      DDE0E0DBDCDCDADADAD9D9D9D9D9D9DADADADBDBDBDCDCDCDCDCDCDCDCDCDDDD
+      DDDDDDDDDEDFDFDFDFDFE1E2E2E3E5E5E6E9E9EAEEEEE1E5ED6F6DB6211A8E21
+      1A8E211A8E211A8E211A8E2E2895C8CAE0E9ECECE7E9E9E8E9E9EAECECEEF2F2
+      5552A9211A8E211A8E211A8EEFF3F3EAEDEDE7E8E8E4E5E5E3E3E3E3E3E3E3E3
+      E3E5E5E5E8E9E9ECEFEFF1F5F5211A8E211A8E211A8E211A8EEFF3F3ECEFEFEB
+      EEEEEDF0F0F0F4F4211A8E211A8E211A8E4944A24944A2211A8E211A8E211A8E
+      4944A2E6E9F0EFF2F2ECEEEEE9EAEAE7E8E8E7E7E7E6E6E6E6E6E6E6E6E6E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECEC
+      ECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F797979797979797979797
+      9797979797969696979797969696969696969696959595959595999A9AA2A7A7
+      B1BABAC3D3D31F19911F19911F19914B4CA6CEE3E3CEE3E3CCE0E0C3D6DE3531
+      9B1F19911F19911F199197A4C9C0D0D0AFB9B999ABD28AA2E9859DE889A0E498
+      ACDCADC0DC99A7D01F19911F19911F19919CA6CCA8B4D29DA7CC787DB96163AD
+      4B4AA335329A1F19911F19911F19911F19911F19911F19911F19911F1991959C
+      BAB3BDBDB2BCBCBAC6C69CA8C61F19911F19911F19919EAAC8B5C2C2A3AAAA97
+      9A9A939595999E9EA7B1B1BACBCB4A4BA51F19911F19911F1991BCCFCFA7B2B2
+      969C9C8B8E8E849DEB91ACEEA4C0F294AADD1F19911F19911F19916E7BC4AAC8
+      F49FBBF19FBBF1ABC8F45C63B81F19911F19911F19918396D1A9C7F495B0EF85
+      9FEC7B94EA7790E9778FE9768FE9768EE9768EE9768EEA768EEA768FE9768EE9
+      768EE9778FEA778FE97790E97C95EA849EEC95B0EFAAC7F48495D11F19911F19
+      911F19915257B2ABC6F39CB6F099B3EFA1BDF1B5D2F51F19911F19911F199155
+      57ABBFD1D1ABB6B69DA2A29395958F90908F8F8F9090909292929798989FA3A3
+      ACB4B4BECCCC98A3C91F19911F19911F1991767BB7BFCBCBB8C2C2BCC6C6C6D3
+      D34C4CA61F19911F19914D4CA6C9D6D6C1CBCBC1CACAC8D4D45859AB1F19911F
+      1991423FA2C2CFDEABB5D3878DC17A7DB95757A94C4BA42A26951F19911F1991
+      1F19911F19911F19911F19911F19912A2695D0DBDBD1DCDCD7E3E32B26961F19
+      911F19914340A2D8E4E4CBD5E1C0CAE8B8C2E3B5BDE1B5BDE0B6BEE0B7BEE0B9
+      C0DFB9C0DFBAC1DFBBC2DFBEC5E1C5CDE5CED7E9D9E3F0504FAA1F19911F1991
+      504FAADBE5F0D2DAE8CCD3E3C9CDE0C8CDDFCCD1E1D0D4E4D6DBE8DEE5EE6A69
+      B61F19911F19911F19911F19912C27968585C1E5EBEBE1E6E6DEE1E1DCDDDDDA
+      DBDBDADADAD9D9D9DADADADADADADBDBDBDCDCDCDCDCDCDCDCDCDDDDDDDDDDDD
+      E0E0E0E2E3E3E4E5E5E7E9E9EBEEEEBBBDDB2C26971F19911F19911F19911F19
+      911F19912C2797C8CAE0EBEEEEE8EAEAE6E7E7E7E8E8EAECECEEF2F25451AB1F
+      19911F19911F1991EFF3F3EAEDEDE7E8E8E4E5E5E3E3E3E3E3E3E4E4E4E6E6E6
+      E8EAEAECEFEFF1F5F55451AB1F19911F19911F1991F0F4F4ECEFEFECEEEEEDF0
+      F0F0F4F41F19911F19911F19911F19911F19911F19911F19912C2797CCCFE5F2
+      F6F6EEF0F0EAECECE8E9E9E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEAEAEAEAEAEAEBEBEB
+      EBEBEBEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F79898989898989797979797979797
+      979898989797979797979797979696969696969696969A9B9BA3A8A8B1BABAC3
+      D3D31E17931E17931E179334319D767DBB767DBB767DBB5557AC1E17931E1793
+      1E1793767DBBCEE3E3BECDCDA8BAD493ACEC8AA2EA859EE989A1EA92ABECA2BD
+      F0A3BCE91E17931E17931E17937D8BCCCBE6F5C5DFF2BBD4EEBCCFE0C5D0D0C6
+      D2D2C8D6D6B8C4D4A7B3D2858CC24C4BA81E17931E17931E1793A2ABC2B6C0C0
+      B3BEBEBAC7C79DA9C81E17931E17931E1793757BB9B9C7C7A7AFAF9A9E9E9699
+      999CA1A1A9B3B3BDCECE494AA71E17931E17931E1793C0D3D3AAB6B6989F9F8C
+      94A287A0EC93AFEFA7C4F396ABDF1E17931E17931E17936D79C5ABC8F4A0BCF2
+      A2BFF3AFCDF53D3DA61E17931E17931E1793A7C2EBA4C0F390ABEF819BEC7993
+      EA7790EA778FEA778FEA768FEA778FEA778FEA768FEA778FEA768FEA768FEA78
+      90EA7890EA7890EA7A92EA839CEC90AAEFA3C0F3B1CDF11E17931E17931E1793
+      3331A0AECBF5A0BBF19CB6F0A4BFF1B6D3F61E17931E17931E1793292498C7DA
+      DAB3C0C0A3ABAB999D9D9495959192929293939696969B9E9EA5ABABB3BEBEC4
+      D4D46D71B71E17931E17931E1793949DC4BEC9C9B8C1C1BCC5C5C6D3D34C4BA8
+      1E17931E17934C4BA8C9D5D5C0CACABFC8C8C6D1D1787CBA1E17931E17931E17
+      93CDDCE4D9EAEAD3E0E0CDD8D8CAD5D5CBD5D5CDD8D8D1DDDDA9B2D0ACB6D57D
+      81BE2A24991E17931E17934D4BA8D2DDDDD1DBDBD5E0E05A5AAF1E17931E1793
+      1E1793C4CFDED1DBDCC4CFE8BCC7E5B7C0E2B6BFE1B9C0E1BAC1E0BAC2E0BBC2
+      E0BCC3E1BDC4E0C0C7E2C7CEE5CFD7EAD9E4F04F4DAC1E17931E1793504EACDC
+      E6F0D3DBE9CDD4E4CACEE0CACEE1CED2E2D3D8E6DAE1EBB2B6DA1E17931E1793
+      1E17931E1793514EABD0D6E6E5EBEBE2E5E5DEE0E0DCDEDEDBDCDCD9DADADADA
+      DADADADADBDBDBDBDBDBDCDCDCDDDDDDDDDDDDDDDDDDDEDEDEDFE0E0E1E1E1E3
+      E4E4E6E9E9EBEEEEA0A1CF1E17931E17931E17931E17931E17931E1793615DB2
+      E2E5EDECEFEFE9EBEBE6E8E8E6E7E7E7E8E8EAECECEEF2F2534FAC1E17931E17
+      931E1793F0F4F4EBEEEEE8E9E9E5E6E6E4E4E4E4E4E4E5E5E5E7E7E7E9EBEBED
+      F0F0F1F6F61E17931E17931E17931E1793F0F3F3EDF0F0ECEEEEEEF0F0F1F5F5
+      1E17931E17931E17933933A02B25991E17931E17932B2599E7EBF3F2F6F6EEF1
+      F1EBECECE9E9E9E8E8E8E7E7E7E8E8E8E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBECECECECECECECECECEBEBEBEBEBEBEBEBEBECECECECECECECECECECECEC
+      ECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7989898989898999999989898989898989898
+      9898989797979797979797979696969696969B9C9CA3A8A8B1BBBBC3D3D31C16
+      951C16951C16951C16951C16951C16951C16951C16951C16951C16951C169580
+      89C1C3D6DEBED3DFA7C2F198B2ED8DA6EB889FE989A0E990A9EB9EB8EFB1CDF4
+      3130A21C16951C1695474AAEC8E5F9BCD9F7B0CCF4A8C3F2B8C6D2C0C9C9C4CE
+      CECBD8D8D4E5E5D5E7E75658AF1C16951C169527239AC1CECEB7C1C1B4BEBEBB
+      C8C89EAAC91C16951C16951C1695757CBCC0D0D0AEB8B8A1A7A79CA1A1A2A9A9
+      B0BCBCC2D5D53D3CA31C16951C16951C1695BACED6AFBEBE9EA7A7939DAF8EA9
+      EE9BB6F1AECBF58FA2DA1C16951C16951C16957583CDA9C6F4A0BDF2A4C1F3B2
+      D0F61C16951C16951C16951C1695B7D5F79FBBF28DA8EE8099EC7992EB7891EB
+      7891EB7891EA7890EB7790EB7790EB7790EB7790EA7790EA7890EA7890EB7991
+      EB7891EB7A92EA809AEC8DA7EEA0BBF2B7D5F727239B1C16951C16951C1695B3
+      CFF6A3BEF29EB9F1A5C0F2B7D4F61C16951C16951C16951C16958A96C6BECECE
+      AFB9B9A3A9A99CA0A0999B9B9A9C9C9DA0A0A5AAAAB0B8B8BECBCBC2D2DA2723
+      9A1C16951C16951C1695B2BDCDBBC5C5B7BFBFBCC5C5C6D3D34A4AA91C16951C
+      16954B4AAAC9D5D5BFC8C8BDC5C5C3CDCDACB7CF1C16951C16951C1695929ACA
+      D7E7E7D0DCDCC9D2D2C6CECEC4CDCDC8D0D0CDD7D7D5E1E1DCEBEBD0DEE61C16
+      951C16951C16956F71B9D1DBDBCED7D7D2DCDC878BC21C16951C16951C169572
+      74BCD8E3E3CDD6DDC2CEE9BDC7E6BDC5E5BDC5E4BDC6E3BEC7E3BFC7E3C0C8E3
+      C1C7E3C3CAE4C9D1E7D1DAEBDAE6F14E4DAE1C16951C16954E4DAEDFE8F1D6DE
+      EBD0D6E6CED2E4CDD2E3D1D5E5D6DCE9DEE5EE6868B91C16951C16951C16956A
+      6ABAEAF3F5E5EBEBE2E6E6DFE2E2DEDFDFDCDDDDDBDCDCDADBDBDBDBDBDADADA
+      DBDBDBDCDCDCDCDCDCDEDEDEDEDEDEDEDEDEDFDFDFE1E1E1E2E3E3E6E7E7E9EC
+      ECB9BBDB1C16951C16951C16951C16951C16953732A1BCBEDDEEF2F2ECEEEEE9
+      EBEBE7E8E8E6E6E6E6E6E6E7E8E8EAEDEDEFF3F3524FAE1C16951C16951C1695
+      F0F4F4ECEEEEE8EAEAE6E7E7E5E5E5E5E5E5E6E6E6E7E8E8EAECECEEF1F1D8DB
+      EB1C16951C16951C16953732A2F0F3F3EDEFEFECEEEEEEF0F0F1F5F51C16951C
+      16951C1695524FAEB0B2DA1C16951C16951C16954541A8E6E9F1EFF2F2ECEEEE
+      EAEAEAE9E9E9E8E9E9E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBECECECECECECECECECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F799999999999999999999999999999999999998989898
+      98989797979797979797979696969B9C9CA4A9A9B1BBBBC3D3D31B15971B1597
+      1B15971B15971B15971B15971B15971B15971B15971B15971B15971B15972622
+      9C8EA0DAB2CDF4A2BCF095ADED8CA4EB89A2EB8EA7EC9AB4EFABC6F26C78C71B
+      15971B15971B15979DB2E1BDDAF7B0CCF4A6C1F2A8BEE5BDC5C5C2CCCCCAD7D7
+      D4E4E4BFCEDE1B15971B15971B15975F61B2C0CCCCB7C0C0B5BFBFBDCACAA0AC
+      CC1B15971B15971B15973D3CA5C8DBDBB8C5C5ACB5B5A8B0B0ADB8B8B9C8C8C0
+      D3DB1B15971B15971B15971B159792A1CAB9CACAA8B5B59EADC09CB6F1A7C3F3
+      B9D6F76670C21B15971B15971B159790A5DFA7C3F4A0BCF3A4C1F3B4D2F71B15
+      971B15971B15974549B0B4D3F79DB9F28BA6EF7F99EC7992EB7991EB7991EB78
+      91EB7891EB7891EB7891EB7890EB7891EB7890EB7991EB7992EB7991EB7991EB
+      7A92EB8099EC8CA6EF9EB9F2B4D2F74549B01B15971B15971B1597B5D1F6A4BF
+      F2A0BAF1A6C1F3B7D4F61B15971B15971B15971B159726229CBFD1DABCCACAB0
+      BABAA8AFAFA5ABABA6ACACA9B0B0B1BABABDC9C9CADBDB5457B01B15971B1597
+      1B15974948AAC2CECEB8C0C0B6BDBDBDC6C6C8D6D64A4AAB1B15971B15974A4A
+      ABC9D5D5BFC7C7BBC2C2BFC7C7CAD5D5332FA11B15971B15973330A1D8E8E8D0
+      DCDCC8D2D2C4CCCCC2CACAC6CECECCD5D5D4E0E0DCEBEB7C80C21B15971B1597
+      1B1597B3BBD4CED6D6CBD2D2CDD5D5CAD3DB27239C1B15971B15971B1597AEB6
+      D7D7E1E1CED8E7C7D2EBC5CFEAC4CEE9C4CEE8C5CEE8C6CFE8C6CFE7C6CEE7C8
+      D0E8CDD6E9D5DFEEDEEAF34E4CAF1B15971B15974E4CAFE2EDF4DAE4EFD5DCEA
+      D1D7E6D1D6E5D3D8E7D8DEEAE0E7F04E4CAF1B15971B15971B1597DEE6F1E9F1
+      F1E4EAEAE2E6E6E0E2E2DFE1E1DFE0E0DCDDDDDCDDDDDBDBDBDBDCDCDCDCDCDD
+      DDDDDEDEDEDEDEDEDFDFDFE0E0E0E0E0E0E2E2E2E4E5E5E7E9E9EBEFEF514DAF
+      1B15971B15971B15971B15976C6ABCE4E8F0EEF1F1EBEDEDE9EAEAE7E8E8E6E6
+      E6E5E5E5E5E6E6E7E8E8EBEDEDEFF3F3514EAF1B15971B15971B1597F0F4F4EC
+      EEEEE8EAEAE6E7E7E5E5E5E7E7E7E8E8E8EAEBEBEDEFEFF1F4F49595CE1B1597
+      1B15971B15975F5CB5EFF2F2EDEFEFECEEEEEEF0F0F2F5F51B15971B15971B15
+      97514EB0F4F9F9A2A3D41B15971B15971B15975F5DB6F1F5F5EEF1F1ECEDEDEA
+      EBEBE9E9E9E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F79B9B9B9A9A9A9A9A9A9A9A9A9A9A9A9999999999999999999898
+      989898989898989797979C9D9DA3A8A8B1BBBBC3D3D319149A19149A19149A30
+      2EA2747BBE747BBE747BBE747BBE5255B019149A19149A19149A19149A19149A
+      8090D4AEC9F39FB9F093ABED8CA5EC8DA6EC96AFEEA4BEF1ABC4EF24219F1914
+      9A19149A2F2EA6B8D3F3B7D3F6AECAF3A9C4F3BCCAD5C6D1D1CDDBDBCADAE23D
+      3CA919149A19149A19149AB3BFCFBBC6C6B4BDBDB5BEBEBFCDCDA2AED019149A
+      19149A19149A19149AA1B0D1C3D5D5BAC8C8B7C4C4BBCACAC6D9D97D88C21914
+      9A19149A19149A19149A3A3BA7C2D7D7B6C7C7ADC3D9ADC9F5B6D4F7BAD7F42F
+      2EA619149A19149A19149AA9C4F0A3BFF39DB9F2A3C0F3B4D2F719149A19149A
+      19149A4448B2B4D3F79DB9F28CA6EF809AED7A92EC7A92EC7992EC7992EC7992
+      EC7991EC7991EC7891EC7991EB7991EB7991EB7A92EC7A92EC7B92EB7B92EB81
+      99EC8CA6EE9DB9F2B5D2F74448B219149A19149A19149AB5D2F6A5C0F3A0BAF1
+      A7C2F3B8D4F719149A19149A19149A19149A19149A3B3BA8BECED7BFCECEB8C4
+      C4B6C1C1B7C1C1BAC6C6C2CFCFCBDCDC5F63B719149A19149A19149A19149A9D
+      A8C9BDC7C7B6BDBDB6BDBDBFC8C8CCD9D94949AE19149A19149A4949AECAD6D6
+      BFC6C6B9BFBFBBC1C1C4CDCD8B91C319149A19149A19149A6265B8D4E2E2CED9
+      D9C9D2D2C8D0D0CAD3D3CFDADAD7E4E4B8C3DD19149A19149A19149A4A49ADD1
+      DADAC9CFCFC5CBCBC8CECED0D8D8797DBF19149A19149A19149A25229FAEB6D8
+      DAE4E6D3DFEDCFDBEFCEDAEECFDAEECED9EDCFDAEDC3CCE7C2CAE6CFD8EBD3DD
+      EDDAE5F1E3EFF74C4BB219149A19149A4C4CB2E7F2F8E0EBF3DBE3EFD7DEEBD6
+      DCEAD7DDEADBE1ECE1E9F14D4CB119149A19149A19149AECF5F5EBF2F2E7ECEC
+      E4E8E8E2E6E6E2E5E5BBBCD5DFE1E1DEDFDFDEDEDEDDDDDDDDDDDDDEDEDEDFDF
+      DFDFDFDFDFDFDFE0E0E0E0E0E0E2E3E3E5E6E6E9EBEBD3D6E719149A19149A19
+      149A19149A7978C3F1F6F6EEF1F1EAEDEDE9EAEAE7E8E8E7E7E7E6E6E6E6E6E6
+      E6E7E7E8E9E9EBEDEDEFF3F3504DB219149A19149A19149AF1F5F5EDF0F0EAEB
+      EBE8E9E9E7E8E8E8E8E8E9EAEAECEEEEEFF2F2E5E9F12722A019149A19149A19
+      149AA0A1D3EEF1F1ECEEEEECEEEEEEF0F0F2F5F519149A19149A19149A504DB2
+      F5F9F9F5F9F96C6ABD19149A19149A19149A6B6ABDF1F4F4EFF1F1ECEEEEEBEB
+      EBEAEAEAE9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAE9E9E9EA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEAEAEAEBEBEBEAEAEA
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F79C9C9C9B9B9B9A9A9A9A9A9A9A9A9A9A9A9A9A9A9A999999999999999999
+      9898989797979C9D9DA4A9A9B1BBBBC3D3D318139C18139C18139C4647AECEE3
+      E3C9DCDCC1D2D2BFCFCFC1D3D3B4C5D65155B418139C18139C18139C18139C92
+      A5E0A8C3F299B3EF90A9EC8DA5EC91A9ED9CB5EFABC6F3879ADA18139C18139C
+      18139C2E2DA898ACE2BAD7F7B5D2F6BBD3EECEDBDBBBC9DA3C3AAA18139C1813
+      9C18139C676CB9C1CCCCB7BFBFB2B9B9B6BFBFC1CECEA3B0D218139C18139C18
+      139C18139C231FA1A0AED1C6D9D9C5D7D7C9DDDD9FAFD1231FA018139C18139C
+      18139C2320A018139C5B60B6B6CAD2BCD5E4BEDCF9BAD7F45A61BF18139C1813
+      9C18139C4246B3ABC7F59DB8F29AB4F2A1BDF3B4D1F718139C18139C18139C2E
+      2CA8B6D4F79FBBF38DA7F0829AED7A93EC7A93EC7A93EC7A92EC7A92EC7992EC
+      7A92ED7A92EC7A93EC7A92EC7A92EC7B93EC7B93EC7B93EC7B93EC829BED8EA8
+      F0A0BBF3B7D4F7393AAE18139C18139C18139CB5D2F6A5C0F3A1BBF2A7C2F3B9
+      D5F718139C18139C18139C18139C18139C18139C241FA18891C6BCCBD3C5D4D4
+      C6D5D5CADADA97A1CC3B3AAA18139C18139C18139C18139C686DB9C2CECEB8C0
+      C0B2B8B8B5BCBCC0C9C9CEDCDC4848AF18139C18139C4848AFC9D5D5BDC5C5B7
+      BCBCB7BCBCBEC4C4C9D3D34747AE18139C18139C18139C6163B9CAD6DFD2DDDD
+      D0DBDBD2DDDDD5E2E29199CD2420A118139C18139C18139CB1B9D2CBD2D2C4C9
+      C9C2C5C5C4C8C8CAD0D0D4DDDD3D3BAA18139C18139C18139C18139C6465BBB9
+      C2DDDBE9F3DBE9F5DAE7F4CDD9EE8F96D2302CA7A5ACDAD5DFEFD9E4F1E0ECF5
+      E5F2F84B4BB318139C18139C4C4BB3E7F3F8E6F1F7E1EAF3DDE5F0DBE2EDDBE1
+      EDDDE3EEE1E9F17374C418139C18139C18139CAAAED9EDF4F4EBF1F1E8EEEEE7
+      ECECB2B4D7251FA1E2E4E4E0E1E1DEDFDFDEDEDEDEDEDEDEDEDEDFDFDFE0E0E0
+      E0E0E0E1E1E1E1E1E1E3E4E4E6E7E7EAEDEDB9BCDE18139C18139C18139C2621
+      A2F3F8F8F0F4F4EDEFEFEAECECE8E9E9E7E8E8E7E8E8E8E8E8E6E7E7E7E7E7E8
+      E9E9EBEDEDF0F3F34F4DB318139C18139C18139CF2F6F6EFF1F1ECEEEEEAEBEB
+      EAEBEBEAECECEDEFEFEFF2F2F2F6F66B69BF18139C18139C18139C3430A8F1F4
+      F4EEF0F0ECEDEDECEEEEEEF1F1F2F5F518139C18139C18139C4F4DB3F5F9F9F4
+      F8F8F4F8F84F4DB318139C18139C18139CA1A1D5F1F4F4EEF0F0ECEDEDEBEBEB
+      EAEAEAE9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEAEA
+      EAEAEAEAEAEAEAEBEBEBEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECEB
+      EBEBECECECECECECECECECEBEBEBEBEBEBECECECECECECECECECECECECECECEC
+      ECECECEDEDEDECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEEEEEEEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEEEEEEEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F2F2F2F1F1F1F2F2F2F1F1F1F2F2F2F2F2F2F1F1F1F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F2F2F2F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F4F4F4F4F4F4F4F4F4F3F3F3F4F4F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F4F4F4F4F4F4F5F5F5F4F4F4F4F4F4F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F6F6F6F5F5F5F6F6F6F6F6F6F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F6F6F6F7F7F7F7F7F7
+      F7F7F7F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F79C9C
+      9C9C9C9C9C9C9C9B9B9B9B9B9B9B9B9B9B9B9B9A9A9A9A9A9A99999999999998
+      98989D9E9EA4A9A9B2BBBBC3D3D316129E16129E16129E4447B0CBDFDFBDCCCC
+      B3BEBEAEB8B8B2BDBDBAC9CCC3DEF65A62C116129E16129E16129E2C2BA9B3CE
+      F5A1BBF194ADEE8DA5ED8DA5ED95AEEEA1BBF1AFCAF4555DC016129E16129E16
+      129E16129E3739AF6D79CC6D79CC5254B616129E16129E16129E16129E3939AA
+      C5D1D1B9C2C2B2B8B8B1B6B6ACB3BC979FC37E86C416129E16129E16129E2D2C
+      A716129E16129E3939AB4446AF3939AB16129E16129E16129E16129E2D2CA670
+      79BF16129E16129E211EA24246B44246B5211EA416129E16129E16129E16129E
+      8DA3E1A2BDF396B1F195B0F19FBAF3B1CFF6211FA416129E16129E16129EBBD8
+      F9A4BFF491ABF1839DEF7D96ED7B94ED7B93ED7B93ED7A93ED7A93ED7A93ED7B
+      93ED7B93ED7B94ED7B93ED7C94ED7B93ED7C94ED7E97EC849DEE92ABF0A4BFF4
+      BBD8F816129E16129E16129E16129EB4D0F6A5BFF3A0BAF2A7C2F4B9D5F71612
+      9E16129E16129E4547B05C61B916129E16129E16129E16129E4546B04546B016
+      129E16129E16129E16129E16129E16129E3939ABC5D2D2BAC3C3B3B8B8B2B6B6
+      B6BCBCA1A7C2A0A9CD3B3AAC16129E16129E4647B0C7D2D2BDC3C3B5B9B9B4B8
+      B8B9BDBDC2CACAC2CCD43A3AAB16129E16129E16129E221FA36062BA777CC36C
+      70BF2F2CA816129E16129E16129E16129E8E93C8CED6D6C7CBCBC1C3C3BEC0C0
+      C0C2C2C5C9C9CDD4D4C9D2DB3C3BAC16129E16129E16129E16129E16129E1612
+      9E302DA916129E16129E16129E16129EA9B1DEDAE5F24848B416129E16129E16
+      129E16129E16129E16129E16129E16129E16129E16129E16129EACAFDBDDE4EE
+      E0E7F0B1B6DE16129E16129E16129E16129E7475C48283CA8182C93E3BAE1612
+      9E16129EE4E7E7E1E3E3E0E1E1DFDFDFDEDEDEDFDFDFE0E0E0E1E1E1E1E1E1E2
+      E2E2E2E2E2E4E5E5E7E8E8EAEDEDB9BBDE16129E16129E16129E4E4CB5F4F9F9
+      F1F5F5EEF0F0ECEDEDEAECECEAEBEBEAEBEBE9EAEAE8E9E9E8E9E9EAEBEBECEE
+      EEF1F4F44E4CB516129E16129E16129EF4F9F9F1F5F5EFF1F1EDEFEFEDEFEFEE
+      F1F1F1F4F4F3F7F76A68C016129E16129E16129E16129EA0A0D5EFF2F2ECEEEE
+      ECEDEDEDEEEEEFF1F1F2F6F616129E16129E16129E4E4CB5F4F8F8F2F6F6F2F5
+      F5E5E9F1403DAF16129E16129E16129EAEAFDBF1F4F4EFF1F1EDEEEEEBECECEB
+      EBEBEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECEBEBEBECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F79D9D9D9C9C9C
+      9C9C9C9C9C9C9B9B9B9B9B9B9B9B9B9B9B9B9A9A9A9A9A9A9999999999999C9D
+      9DA5AAAAB2BBBBC3D3D31510A11510A11510A14345B2C3D5D5B3BEBEA7AEAEA0
+      A6A6A2AAAEA8BFE7B5D0F5BBD5F3201DA61510A11510A11510A19CB2E7A8C2F3
+      98B1F08FA7EE8CA4ED8FA8EE98B1F0A3BDF2B0CBF57280D11510A11510A11510
+      A11510A11510A11510A11510A11510A11510A11510A15B5DB7BCC6CFBCC4C4B4
+      B9B9AEB2B2AEB3B3ACB2BB2B28A61510A11510A11510A11510A196A2CF3838AD
+      1510A11510A11510A11510A11510A11510A11510A11510A1A9BBD6CBE1E13737
+      AC1510A11510A11510A11510A11510A11510A11510A11510A1535BC1A9C5F599
+      B4F290AAF090ABF19BB6F3AECBF64145B71510A11510A11510A195ABE3A9C6F5
+      96B1F288A1EF7F97EE7C94ED7B94ED7B94ED7B94ED7B93ED7B94EE7B94ED7B94
+      ED7C94ED7C94ED7C94ED7C94ED7D95ED8098EE88A1EF97B0F2ABC6F5A0B7E815
+      10A11510A11510A14145B7B1CDF6A3BCF39FB8F2A7C1F4B9D5F71510A11510A1
+      1510A14445B2D2E5E55C60BA1510A11510A11510A11510A11510A11510A11510
+      A11510A11510A11510A1676BBCC6D2D2BDC5C5B5BABAB0B3B3B1B4B4B6BBBB6B
+      6CB41510A11510A11510A11510A12C2AA9C4CDCDBBC0C0B4B7B7B2B4B4B4B7B7
+      BCC1C1C4CCCCC1CCD44545B11510A11510A11510A11510A11510A11510A11510
+      A11510A11510A1211EA58D93C9CFD7D7C8CDCDC2C5C5BEC0C0BCBDBDBEBFBFC1
+      C3C3C8CCCCCED5D5CAD2DB6D6FC01510A11510A11510A11510A11510A11510A1
+      1510A11510A11510A11510A1AAB3DFDDE8F44847B61510A11510A11510A11510
+      A11510A11510A11510A11510A11510A11510A11510A1ACB0DCDCE3EEDEE5EFE2
+      E9EF7172C31510A11510A11510A11510A11510A11510A11510A11510A11510A1
+      E5E8E8E1E3E3E0E1E1E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E3E3E3E3E3
+      E3E4E5E5E7E8E8EBEDEDC7C8E31510A11510A11510A11510A1E6EAF3F2F6F6F0
+      F3F3EEF1F1EDF0F0EDF0F0EDEFEF9B9AD1EAECECEAEBEBEBECECEDEFEFF1F4F4
+      4D4AB71510A11510A11510A1F5F9F9F4F8F8F2F6F6F1F5F5F1F5F5F2F6F6BCBE
+      E23E3CB21510A11510A11510A11510A16967C1F1F4F4EEF0F0ECEDEDEBECECEC
+      EDEDEFF1F1F2F6F61510A11510A11510A14D4BB7F4F7F7F1F4F4F1F3F3F2F4F4
+      CACCE7231FA61510A11510A1221FA7CACCE7F2F4F4EFF1F1EDEEEEECECECEBEC
+      ECEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F79E9E9E9E9E9E9D9D9D9D
+      9D9D9D9D9D9C9C9C9C9C9C9B9B9B9B9B9B9A9A9A9999999999999D9E9EA5AAAA
+      B2BBBBC3D3D3130FA3130FA3130FA34244B3BECECEACB6B69EA4A4979A9A94A8
+      DE9DB5F0ACC5F3BDD9F7646EC9130FA3130FA3130FA36A76CDADC8F49CB5F090
+      A8EE8AA3ED8CA4ED91AAEE99B1F0A3BCF2ACC7F4A2BAEB535BC3130FA3130FA3
+      130FA3130FA3130FA3130FA34F50B69EA6CAC5CFCFBDC5C5B5BABAAFB2B2ACAF
+      AFADB1B1B3B9B99297BC130FA3130FA3130FA3130FA39EABD0BFCFD8585CB813
+      0FA3130FA3130FA3130FA3130FA32A29AAA1B0CBBDCECEB9CACAB0BFC8686EB8
+      1E1BA6130FA3130FA3130FA3130FA32929AE6F7DD2AAC6F69CB8F391AAF18BA4
+      F08DA6F097B2F2A9C6F66976CE130FA3130FA3130FA3626DCAB2CFF79DB8F48D
+      A7F1839CEF7E97EE7C95EE7C95EE7C94EE7C95EE7C94EE7C95EE7C95EE7D95EE
+      7D95EE7D95EE7D95EE8098EE849DEE8EA7F09DB8F3B2CEF7626DC9130FA3130F
+      A3130FA3606AC9ADC7F59FB9F39DB7F2A8C1F4B9D5F8130FA3130FA3130FA343
+      45B4D2E6E6D2E4E49FABD04243B2130FA3130FA3130FA3130FA3130FA3130FA3
+      4F51B69EA6CBC4CFCFBEC5C5B6BBBBB1B4B4AEB1B1B1B3B3B6BABABFC6C62A27
+      A9130FA3130FA3130FA3130FA3C0C7C7B9BDBDB3B5B5B1B2B2B1B3B3B6B9B9BD
+      C2C2C4CBCBCCD5D58A8FC73837AF130FA3130FA3130FA3130FA3130FA31F1DA7
+      5D5FBBBBC3D6CED5D5C8CECEC3C6C6BFC1C1BCBDBDBCBDBDBDBDBDBFC0C0C4C6
+      C6C9CDCDCED4D4D5DDDDAAAFD46163BF201DA8130FA3130FA3130FA3130FA313
+      0FA3130FA32D2BAEB5BEE4DBE6F34646B8130FA3130FA3130FA3130FA3130FA3
+      130FA3130FA3130FA3130FA3130FA3130FA3AAAEDBDBE0ECDCE1E6E0E4E4E4E8
+      E8A5A7D52E2BAD130FA3130FA3130FA3130FA3130FA3201DA84846B5E4E7E7E3
+      E5E5E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E2E2E2E2E2E2E3E3E3E3E3E3E5E5E5
+      E8E9E9EAECECEFF2F22F2CAE130FA3130FA3130FA35A58BEE6EAF4F3F7F7F2F5
+      F5F1F4F4C6C8E44A48B74A47B6ECEDEDEBECECEBECECEDEFEFF1F4F44C4AB913
+      0FA3130FA3130FA38484CE8484CE8484CE8384CE7676C92F2CAE130FA3130FA3
+      130FA3130FA3130FA34B49B8E3E7F0EFF1F1ECEEEEEBEBEBECECECEDEEEEEFF1
+      F1F3F6F6130FA3130FA3130FA34C4AB9F3F6F6F0F2F2EFF1F1F0F1F1F2F4F4BC
+      BDE2130FA3130FA3130FA3211EA8E5E8F1F0F2F2EEEFEFEDEDEDECECECEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEEEEEEEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F79F9F9F9F9F9F9E9E9E9E9E9E9D9D
+      9D9D9D9D9C9C9C9C9C9C9B9B9B9B9B9B9A9A9A9999999D9E9EA5AAAAB2BBBBC3
+      D3D3120EA5120EA5120EA54143B5BDCCCCA9B2B29CA0A091A0CC8EA7EE97B0F0
+      A5BEF3B8D3F791A3DF120EA5120EA5120EA56B77CFB1CBF59EB8F292AAEF8BA3
+      EE8AA2ED8DA4EE90A9EF97B0F09EB8F2A6C1F3ADC8F5B3CEF68DA1E28EA2E28E
+      A2E28DA0E2ADC3EBC6D0D0C1C9C9BBC2C2B5B9B9AFB2B2ABADADAAABABABAEAE
+      AFB3B3B5BCBCBBC3C3BEC8C8C0CBCBBFCBCBBDC9C9BCC8C8BBC8C8B2BFC9949E
+      C3949FC5949FC59CA7C4B6C4C4B1BDBDABB6B6A9B3B3AAB5B5ADB9B9B2C0C08A
+      9FE28CA1E28CA1E395ABE7ADC9F6A5C1F59BB5F392ABF18AA3F0879FEF89A3F0
+      93ADF2A4BFF59AB1E8120EA5120EA5120EA51C1BAAB0CCF4A7C3F695B0F388A2
+      F0829AF07E96EE7D96EF7C95EE7D95EF7D95EF7D95EE7D95EE7D96EE7D95EE7E
+      96EE7F98EE829AEF89A2F095AFF2A7C3F5BCD9F91C1BAA120EA5120EA5120EA5
+      9CB2E9A6C1F59CB5F39CB5F2A6C0F4B9D5F7120EA5120EA5120EA54244B5D2E4
+      E4C8D7D7C4D0D0C3CFCFBAC5CE9CA4C99DA5CB9DA6CC9DA6CCC9D5D5C6D0D0C1
+      C9C9BBC2C2B5B9B9B2B4B4AEB0B0AEAFAFB1B3B3B4B7B7BBC0C0C2CACAC7D0D0
+      C9D3D3C8D1D1C3CBCBBCC2C2B7BABAB2B4B4B0B1B1B0B1B1B3B5B5B8BBBBBCC1
+      C1C2C8C8C8D0D0CCD5D5B8C0D3A2A8CEA3A9CFA3AACFAEB5D1D0D9D9CED5D5CB
+      D1D1C6CBCBC2C5C5BFC1C1BEBEBEBCBCBCBBBBBBBDBDBDBEBEBEC1C2C2C4C6C6
+      C9CCCCCED3D3D4DBDBDBE4E4E3EEEEBCC5E24747B8120EA5120EA5120EA5888D
+      CFDEE8EDD8E1EED6E0F0DAE5F2E0ECF6E6F2F94747BA120EA5120EA54847BAE9
+      F3F9E9F2F8E4EDF5DFE7F1DDE3EDDBDFE6DADCDDDBDDDDDDDFDFDFE2E2E3E6E6
+      E6EAEAC0C3DFB3B6DBB4B7DCB4B7DCC1C3DFE7EBEBE6E9E9E3E5E5E2E3E3E1E2
+      E2E0E1E1E1E1E1E1E1E1E1E1E1E3E3E3E4E4E4E4E4E4E5E5E5E6E6E6E7E8E8EA
+      EBEBEDF0F0ABACDB120EA5120EA5120EA5120EA51F1DAA4A49BA4A49BA2D2BAF
+      120EA5120EA54A47B8EDEFEFECEDEDECEDEDEDEFEFF0F3F34B49BA120EA5120E
+      A5120EA5120EA5120EA5120EA5120EA5120EA5120EA5120EA5120EA5120EA512
+      0EA57575C9F2F5F5F0F2F2EEEFEFECEDEDEBEBEBEBEBEBEDEDEDEFF0F0F2F4F4
+      120EA5120EA5120EA52E2BAFF2F5F5F0F1F1EEF0F0EEF0F0F0F1F1F2F5F59FA0
+      D9120EA5120EA5120EA53C3AB4E4E6EFF0F1F1EDEEEEEDEDEDECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECECECECECECEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEFEFEFEFEFEFEFEFEFEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F79F9F9F9F9F9F9F9F9F9E9E9E9E9E9E9D9D9D
+      9D9D9D9C9C9C9B9B9B9B9B9B9A9A9A9999999D9E9EA5AAAAB2BBBBC2D2D2100D
+      A8100DA8100DA84043B7BDCCCCA9B2B29AAAD18FA8EE8FA7EE97AFF0A5BEF2B6
+      D1F69CB0E5100DA8100DA8100DA83E43BDB2CCF5A1B9F293ABEF8BA3ED89A1ED
+      8BA3EE8DA4EF90A8EF95ADF09AB3F19FB9F2A4BDF3A7C1F4A8C2F4A8C2F4A7C1
+      F3A4BDF3B1BED3B8BCBCB4B7B7AFB1B1ADAEAEAAABABAAAAAAAAACACACAFAFAF
+      B3B3B2B7B7B3BABAB3BABAB3BABAB0B7B7AFB6B6AFB7B7AFB8B8B1BABAB1BBBB
+      AFB9B9ACB5B5A6AFAFA2A9A99FA5A59CA2A29DA4A49FA7A7A3ABABA1BDF4A4BF
+      F5A4BFF5A1BCF49CB6F496B0F390A9F28AA3F1859EF0839DF0869FF08FA9F29E
+      B9F4B1CEF73235B7100DA8100DA8100DA86B79D1B3D0F8A1BCF591ABF287A1F1
+      829BF08098EF7E96EF7D96EF7E96EF7E96EF7E96EF7E96EF7E96EF8098EF849C
+      F088A0F091ABF1A0BBF4B3D0F86B79D1100DA8100DA8100DA82728B2B4D0F7A1
+      BAF399B1F29AB3F2A7C0F4BAD5F8100DA8100DA8100DA84144B8CDDCDCC1CCCC
+      BCC5C5BAC1C1BBC2C2BEC6C6C1C9C9C1C9C9C1C9C9BEC5C5BBC1C1B8BDBDB4B8
+      B8B2B4B4AFB0B0AEAEAEAFAFAFB0B2B2B5B7B7BABEBEBFC5C5C3CBCBC5CDCDC4
+      CCCCC1C7C7BBC0C0B6B9B9B3B4B4B0B1B1B1B1B1B2B2B2B4B5B5B8BABABBBFBF
+      BFC4C4C3C8C8C6CDCDC9D0D0C9D1D1CAD1D1C9CFCFC8CDCDC5CACAC3C6C6C0C2
+      C2BFC1C1BCBDBDBCBCBCBBBBBBBCBCBCBEBEBEBEBFBFBFC0C0C2C3C3C5C6C6C7
+      CACACDD2D2D5DCDCDEE7E7CAD4E7100DA8100DA8100DA87A7FCCE2EBEBDBE1E1
+      D6DADAD4D9DBD8DEE6DEE7EFE6F1F74647BC100DA8100DA84647BCE9F3F8E4EC
+      F3DFE6EBDDE1E4DBDEDEDADCDCD9DADAD9DADADADCDCDDDEDEDFE1E1E2E4E4E3
+      E6E6E4E7E7E5E8E8E6E9E9E6E9E9E5E7E7E4E6E6E2E3E3E2E3E3E2E2E2E1E1E1
+      E2E2E2E2E2E2E2E2E2E4E4E4E4E4E4E5E5E5E6E6E6E6E6E6E7E8E8E9EAEAECEE
+      EEEFF2F29D9ED8100DA8100DA8100DA8100DA8100DA8100DA8100DA8100DA810
+      0DA84847BBEEF0F0ECEEEEECEDEDEDEFEFEFF2F24947BC100DA8100DA8100DA8
+      100DA8100DA8100DA8100DA8100DA8100DA8100DA8100DA85857C0C8CAE7F1F4
+      F4EFF1F1EEEFEFECEDEDEBEBEBEAEBEBECECECEDEEEEEFF0F0F1F4F4100DA810
+      0DA8100DA8100DA8F1F3F3EFF0F0EDEEEEEEEFEFEFF0F0F1F2F2F3F5F55857C0
+      100DA8100DA8100DA84947BBF0F1F1EEEFEFEDEDEDECECECECECECECECECECEC
+      ECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEEEEEEEFEFEFEEEEEEEFEFEFEEEE
+      EEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F0F0F0F1F1F1F1F1F1F0F0F0F0F0F0F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7A0A0A0A0A0A09F9F9F9F9F9F9F9F9F9E9E9E9E9E9E9D
+      9D9D9C9C9C9B9B9B9B9B9B9A9A9A9D9E9EA5AAAAB2BBBBC3D3D30F0CAA0F0CAA
+      0F0CAA3F42B8BCCBCBA8B8CE99B2F191A9EF92A9EF9AB3F1A8C2F4BBD6F78495
+      DD0F0CAA0F0CAA0F0CAA6A77D2B2CCF69FB9F293ACF08CA5EE8AA1EE89A1EE8A
+      A2EE8CA4EF8EA6EF91A8EF94ACF096AFF198B2F19AB3F19AB3F199B1F196AFF1
+      97ADE9B1B3B3AFB0B0ADAEAEABABABAAAAAAAAAAAAAAABABABACACACAEAEACAE
+      AEACAFAFABAEAEA9ADADA7ABABA6A9A9A4A8A8A5A9A9A4A9A9A4A9A9A2A7A7A0
+      A4A49CA0A0989B9B959898949696949696959999959FB193ADF294AEF294AEF2
+      92ABF28FA9F18CA5F188A1F0859EF0839BEF829AEF859DF08CA5F197B2F3A9C4
+      F67B8CDB0F0CAA0F0CAA0F0CAA1A19AF9EB6EBAECAF79EB9F591AAF388A1F184
+      9CF18099F07F98F07E97EF7E97EF7F97EF8098EF8199EF839CF089A2F191ABF2
+      9EB8F4AFCAF7AAC3F01A19AF0F0CAA0F0CAA0F0CAA7D8DDBACC7F69BB3F394AD
+      F299B1F2A7C0F4BAD5F80F0CAA0F0CAA0F0CAA4043BBCAD7D7BEC6C6B6BCBCB3
+      B7B7B2B5B5B5BABAB8BCBCB8BCBCB8BCBCB7BABAB5B8B8B3B5B5B2B3B3B1B2B2
+      B0B0B0AEAFAFB0B0B0B1B2B2B4B6B6BABDBDBFC4C4C4CACAC5CCCCC5CCCCC2C8
+      C8BCC0C0B7BABAB3B5B5B1B1B1B0B0B0B1B2B2B3B4B4B5B6B6B7B8B8B9BBBBBC
+      BFBFBEC1C1C0C4C4C1C5C5C2C5C5C1C4C4C1C4C4BFC2C2BEC0C0BEBEBEBCBDBD
+      BCBCBCBCBCBCBEBEBEBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1C3C3C3C5C7C7CACC
+      CCD1D6D6DAE2E2A1A7D90F0CAA0F0CAA0F0CAAD9E3ECDEE6E6D7DCDCD2D5D5D2
+      D5D5D6D9D9DDE3E3E5EDED4646BC0F0CAA0F0CAA4646BCE7EEEEE1E6E6DCDFDF
+      DADCDCD9DADAD9D9D9D8D8D8D8D9D9D9DADADBDCDCDDDEDEDFE0E0E0E1E1E0E2
+      E2E1E3E3E2E4E4E2E4E4E3E4E4E2E3E3E1E1E1E2E2E2E1E1E1E3E3E3E3E3E3E3
+      E3E3E3E3E3E4E4E4E5E5E5E5E5E5E6E6E6E6E6E6E7E7E7EAEAEAEBECECEDEFEF
+      F0F2F2C7C9E76564C60F0CAA0F0CAA0F0CAA0F0CAA0F0CAA1D1BAF4846BC9B9B
+      D7EDEFEFECEDEDECECECECEDEDEFF0F06463C54847BC4947BD4947BD4948BD49
+      47BD4947BD4947BD4947BD6665C79E9FDAD6D9ECF2F5F5F1F3F3EFF1F1EEEFEF
+      EDEDEDECECECEBECECEBEBEBECECECECEDEDEEEFEFF0F2F24846BC4846BC4846
+      BC4846BCF0F2F2EFF0F0EEEEEEEDEEEEEEEEEEEFF0F0F1F2F2E4E5EF5755C148
+      47BC4847BC4846BC9B9BD7EFF0F0EEEEEEEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEE
+      EEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7A2A2A2A1A1A1A0A0A0A0A0A09F9F9F9F9F9F9E9E9E9D9D9D9D9D
+      9D9C9C9C9B9B9B9A9A9A9D9F9FA5AAAAB2BBBBC3D3D30D0AAC0D0AAC0D0AAC3D
+      40BABED3DEACC5F59EB7F298B1F19AB2F1A4BCF3B1CCF6C3DEF9555ECA0D0AAC
+      0D0AAC0D0AAC7381D7AFC9F69EB8F393ABF18DA4EF8AA2EF8AA2EF8AA2EF8AA2
+      EF8BA2EF8BA4EF8CA5F08EA6F08FA7F090A7F090A7F08EA7F08DA6F08CA4F0A1
+      AAC8AEAEAEADAEAEACACACABABABABABABAAABABAAAAAAAAAAAAA8A9A9A8A9A9
+      A6A7A7A5A6A6A3A4A4A1A2A29FA0A09D9F9F9C9E9E9C9E9E9A9C9C989A9A9697
+      979393939192929090908F90908F91918D95A989A2F189A2F189A2F189A1F188
+      A0F1859FF1849CF0839BF0829AF0829AF0839CF088A2F192ACF3A0BBF5B2CFF8
+      3B40C00D0AAC0D0AAC0D0AAC3033BBB3CEF5ADC9F79FBAF593AEF38CA6F287A1
+      F1859EF1839CF1839CF1849CF1869EF188A1F18DA6F294AFF39FBAF5AEC9F7B3
+      CEF53033BB0D0AAC0D0AAC0D0AAC3033BBB5D0F8A3BCF495ADF291A8F198B0F2
+      A6C0F5BBD6F80D0AAC0D0AAC0D0AAC3E41BECAD6D6BDC4C4B4B8B8AFB1B1AFB0
+      B0B0B2B2B2B3B3B2B4B4B3B4B4B2B3B3B1B2B2B2B2B2B1B1B1B0B1B1B0B0B0B0
+      B0B0B0B0B0B2B2B2B6B8B8BCBFBFC1C6C6C7CFCF9BA1C9A6ACCBC5CDCDBFC4C4
+      BABDBDB5B6B6B2B3B3B2B2B2B2B2B2B3B3B3B3B4B4B5B5B5B7B7B7B8B8B8B9BB
+      BBBABBBBBABBBBBCBDBDBCBDBDBCBDBDBCBDBDBBBCBCBCBCBCBCBCBCBDBDBDBD
+      BDBDBEBEBEBEBEBEC0C0C0C0C0C0C1C1C1C2C2C2C2C2C2C4C5C5C8CACACFD3D3
+      D7DEDE777ACB0D0AAC0D0AAC0D0AACE5EFEFDDE4E4D6DADAD1D4D4D2D4D4D6D9
+      D9DDE2E2E6EEEE4444BE0D0AAC0D0AAC4444BEE4EAEADEE2E2D9DBDBD7D8D8D7
+      D8D8D8D8D8D7D8D8D8D8D8D9DADADBDBDBDCDCDCDDDEDEDEDEDEDFE0E0DFE0E0
+      E0E0E0E1E1E1E1E2E2E1E1E1E1E1E1E1E1E1E3E3E3E3E3E3E4E4E4E4E4E4E5E5
+      E5E5E5E5E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E9E9E9EAEAEAECEDEDEDEFEFF0
+      F1F1F1F3F3F2F5F5C8C9E7BABBE3BABBE3D5D8ECF1F4F4F0F2F2EFF0F0EDEEEE
+      ECEDEDECECECECEDEDEDEEEEEFF0F0F0F2F2F1F3F3F2F5F5F3F5F5F3F5F5F3F5
+      F5F2F5F5F2F5F5F2F4F4F1F3F3F0F2F2EFF1F1EEEFEFEEEFEFEDEEEEEDEDEDEC
+      ECECECECECECECECECECECEDEDEDEEEEEEEFF0F0F0F2F2F1F2F2F1F2F2F0F2F2
+      EFF0F0EEEEEEEDEDEDEDEDEDEEEEEEEFEFEFF0F1F1F1F2F2F1F3F3F2F3F3F1F3
+      F3F1F2F2EFF0F0EEEFEFEEEEEEEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7A2A2A2A2A2A2A2A2A2A1A1A1A0A0A0A0A0A09F9F9F9E9E9E9E9E9E9D9D9D
+      9B9B9B9A9A9A9D9F9FA6ABABB2BBBBC3D3D30C09AE0C09AE0C09AE3D40BDC3DF
+      F9B3CDF6A8C1F4A3BCF3A6BFF4B0CAF6BED9F8A8BEED0C09AE0C09AE0C09AE0C
+      09AE9CB1EAABC4F59CB4F292AAF08CA4EF8BA3EF8BA3EF8BA2EF8BA3F08BA3F0
+      8BA2F08AA2EF8AA2F08BA3F08BA3F08BA2F08BA2F089A1F089A1F08DA2E7ADAD
+      ADADADADADADADADADADACACACABABABAAAAAAA9A9A9A8A8A8A7A7A7A5A5A5A3
+      A3A3A1A1A19F9F9F9C9C9C9A9A9A999999989898969696959595939393919191
+      9090908F8F8F8E8E8E8D8D8D8992B1859DF0859DF0859DF0849DF0839CF0839B
+      F0839BF0839BF0829BF0829BF0839BF0869EF18DA5F299B3F4A8C3F798AFEB18
+      17B30C09AE0C09AE0C09AE2E32BCB3CFF5B0CDF8A5C0F69BB5F594AEF490AAF3
+      8EA7F28DA7F28EA8F290A9F395AFF39CB6F5A5C0F6B1CDF8B4CFF52F33BC0C09
+      AE0C09AE0C09AE1817B39AB0EBAAC4F69BB4F491A8F28FA6F298AFF3A7C0F5BC
+      D6F80C09AE0C09AE0C09AE3D41C1CAD6D6BDC4C4B5B8B8AFB0B0ADADADAEAFAF
+      AFB0B0B0B1B1B1B2B2B1B1B1B2B2B2B2B2B2B2B2B2B2B2B2B3B3B3B3B3B3B3B3
+      B3B5B5B5B9BABABFC2C2C6CCCC3C3CB80C09AE0C09AE5F62BFC4CACABDC1C1B8
+      BABAB4B5B5B3B3B3B3B3B3B4B4B4B4B4B4B5B5B5B5B5B5B6B6B6B7B7B7B7B8B8
+      B8B9B9B8B9B9BABBBBBABABABBBBBBBBBBBBBCBCBCBDBDBDBEBEBEBEBEBEBFBF
+      BFBFBFBFC1C1C1C1C1C1C2C2C2C3C3C3C3C3C3C5C5C5C9CACACFD2D2D6DCDC90
+      95D30C09AE0C09AE0C09AED8E2ECDFE7E7D9DEDED5D8D8D5D8D8D9DDDDE0E6E6
+      E8F0F00C09AE0C09AE0C09AE4443BFE3E8E8DDE0E0D9DADAD7D7D7D7D7D7D8D8
+      D8D8D8D8D9D9D9DADADADBDBDBDCDCDCDDDDDDDDDDDDDEDEDEDEDEDEDFDFDFE0
+      E0E0E1E1E1E1E1E1E2E2E2E2E2E2E3E3E3E4E4E4E4E4E4E4E4E4E5E5E5E6E6E6
+      E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E9E9E9EAEAEAEBECECECEDEDEDEEEEEEEF
+      EFEFF1F1F0F1F1F0F2F2F0F2F2F0F1F1F0F1F1EFF0F0EEEFEFEDEDEDECECECEC
+      ECECECECECEDEDEDEEEEEEEEF0F0EFF0F0EFF1F1F0F1F1F0F1F1F0F1F1EFF1F1
+      EFF1F1EFF0F0EFF0F0EFF0F0EEEFEFEDEEEEEDEDEDECEDEDECECECECECECECEC
+      ECECECECECECECEDEDEDEDEDEDEFEFEFEFF0F0EFF0F0F0F1F1EFF0F0EFEFEFEE
+      EEEEEEEEEEEDEDEDEDEDEDEEEEEEEEEFEFEFF0F0EFF0F0F0F1F1F1F1F1EFF0F0
+      EFEFEFEFEFEFEFEFEFEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F3F3
+      F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7A3A3
+      A3A3A3A3A2A2A2A2A2A2A1A1A1A0A0A0A0A0A09F9F9F9E9E9E9D9D9D9C9C9C9A
+      9A9A9D9F9FA6ABABB2BCBCC3D3D30A08B10A08B10A08B13B40C3CDE9FBBFD9F9
+      B6D0F7B3CCF6B6D1F7C0DBF8A7BDED1616B60A08B10A08B10A08B13A3FC3B6D0
+      F7A6BFF498B1F291A9F18DA5F08CA3F08CA3F08CA4F08CA3F08BA3F08BA3F08B
+      A3F08BA3F08BA2F08BA2F08AA2F08AA2F08AA2F08AA2F08AA1F0A0A9C6AEAEAE
+      AEAEAEAEAEAEADADADACACACABABABAAAAAAAAAAAAA8A8A8A6A6A6A4A4A4A2A2
+      A2A0A0A09E9E9E9B9B9B99999998989897979795959594949493939391919190
+      90908F8F8F8E8E8E8995BF859DF1859DF1849DF1849CF1849CF1849CF1849CF1
+      839CF1839BF1839BF1839BF1859DF189A2F291AAF39DB8F5ACC8F77A8BDE0A08
+      B10A08B10A08B10A08B11616B695AAE8B8D4F9AECAF8A6C2F7A1BCF69EB9F59C
+      B7F59EB9F5A1BCF6A6C2F6AFCAF8B7D4F994AAE82224BA0A08B10A08B10A08B1
+      0A08B17B8CDEAEC9F7A0B8F494ACF28DA4F18EA5F197AFF3A8C1F5BCD7F90A08
+      B10A08B10A08B13A40C4C9D7DBBFC5C5B5B8B8B1B1B1AFAFAFB0B0B0B1B1B1B2
+      B2B2B2B2B2B3B3B3B3B3B3B4B4B4B4B4B4B4B4B4B5B5B5B5B5B5B5B5B5B7B8B8
+      BABDBDC1C5C5A5ABCB0A08B10A08B10A08B10A08B1C7CECEBFC3C3B9BBBBB6B6
+      B6B4B4B4B5B5B5B4B4B4B5B5B5B6B6B6B6B6B6B6B6B6B8B8B8B8B8B8B9B9B9BA
+      BABABABABABBBBBBBCBCBCBDBDBDBDBDBDBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1
+      C2C2C2C3C3C3C3C3C3C3C3C3C4C4C4C6C6C6C9CACACED0D0D6DBDBB7BDDD0A08
+      B10A08B10A08B1868BD5E4ECECDFE5E5DCE1E1DCE1E1E0E5E5E6EDED969BDA0A
+      08B10A08B10A08B16C6DCCE2E7E7DCDFDFD9DADAD8D8D8D8D8D8D9D9D9D9D9D9
+      DADADADADADADBDBDBDDDDDDDDDDDDDDDDDDDEDEDEDFDFDFE0E0E0E1E1E1E2E2
+      E2E2E2E2E3E3E3E3E3E3E4E4E4E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E7E7E7E7
+      E7E7E8E8E8E8E8E8E9E9E9EAEAEAEAEAEAEBECECECECECECEDEDEDEDEDEDEEEE
+      EEEFEFEEEFEFEEEFEFEEEFEFEDEEEEEDEDEDECEDEDECECECECECECEBECECECED
+      EDEDEDEDEDEEEEEEEEEEEEEEEEEEEFEFEEEFEFEEEFEFEEEFEFEEEFEFEEEFEFEE
+      EEEEEDEEEEEDEDEDEDEDEDECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEFEFEEEFEFEEEEEEEEEEEEEDEEEEEDED
+      EDEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFF0F0EFF0F0EFF0F0EFEFEFEFEFEFEF
+      EFEFEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7A5A5A5A4A4A4
+      A3A3A3A2A2A2A2A2A2A1A1A1A0A0A0A0A0A09E9E9E9D9D9D9C9C9C9B9B9B9D9F
+      9FA5AAAAB2BBBBC2D1D10907B30907B30907B33A40C5CEE9FBCBE5FBC4DFF9C2
+      DDF9AEC6F16A78D71415B80907B30907B30907B30907B39CB1ECAEC7F6A0B8F4
+      96AEF290A7F08DA5F18DA5F18DA4F18DA4F18CA4F18CA4F18CA4F18CA4F18CA3
+      F18BA3F18BA3F18BA3F18BA3F18BA2F18BA2F18AA2F18FA3E8AEAEAEAEAEAEAE
+      AEAEAEAEAEAEAEAEADADADACACACABABABA9A9A9A8A8A8A6A6A6A4A4A4A2A2A2
+      9F9F9F9D9D9D9B9B9B9999999898989696969595959393939292929191919090
+      908F8F8F8997C5859DF1859DF1859DF1859DF1859DF2859DF2859DF2849CF184
+      9DF2849CF2849CF2859DF2879FF28BA5F394AEF4A0BAF6AFCAF87A8BDF0907B3
+      0907B30907B30907B30907B3383FC593A9E9BAD7FAB5D1F9B1CEF8B0CDF8B1CD
+      F8B5D1F9B9D6F993A8E8505BCE0907B30907B30907B30907B30907B37B8CDFB1
+      CCF8A3BCF596AFF48FA6F28AA2F28FA6F299B1F4AAC4F6BED9F90907B30907B3
+      0907B33A3FC5C6D6E4BFC6C6B7BABAB3B3B3B0B0B0B2B2B2B3B3B3B4B4B4B4B4
+      B4B5B5B5B5B5B5B5B5B5B6B6B6B6B6B6B6B6B6B6B6B6B6B6B6B8B9B9BCBEBEC2
+      C7C7B2B8CD0907B30907B30907B31514B5C8CFCFC0C4C4BABCBCB7B7B7B5B5B5
+      B6B6B6B6B6B6B6B6B6B6B6B6B7B7B7B7B7B7B8B8B8B9B9B9BABABABABABABBBB
+      BBBDBDBDBDBDBDBEBEBEBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1C2C2C2C2C2C2C3
+      C3C3C4C4C4C4C4C4C5C5C5C7C7C7C9CACACED0D0D4D8D8DCE3E32424BA0907B3
+      0907B31616B7BFC6E6E5EDEDE3EAEAE4EAEAE7EEEEBFC6E71616B70907B30907
+      B30907B3BCC2E2E1E5E5DCDEDED9DADAD7D8D8D9D9D9DADADADADADADBDBDBDC
+      DCDCDCDCDCDEDEDEDEDEDEDEDEDEDFDFDFE0E0E0E1E1E1E1E1E1E2E2E2E2E2E2
+      E3E3E3E4E4E4E5E5E5E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E8E8E8E9E9E9E9E9
+      E9E9E9E9E9E9E9EAEAEAEAEAEAEBEBEBEBEBEBEBECECEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDECEDEDECECECECECECECECECECECECECECEC
+      ECEDEDECEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEDEEEEEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFF0F0EFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7A6A6A6A5A5A5A4A4A4A3
+      A3A3A2A2A2A2A2A2A1A1A1A0A0A09F9F9F9E9E9E9C9C9C9B9B9B9E9F9FA4A9A9
+      B0B8B8BFCECE0706B50706B50706B51313B9393EC7393EC7393EC72022BE0706
+      B50706B50706B50706B50706B50706B57B8BE0B3CDF7A6BEF59AB3F393ACF28F
+      A7F18EA5F18EA5F18EA5F18DA5F18DA5F18DA5F18DA4F18CA4F18CA4F18CA4F1
+      8CA4F18CA3F18CA4F18BA3F18BA3F18BA3F18BA3F2A1AAC8AEAEAEAFAFAFAFAF
+      AFAEAEAEAEAEAEADADADACACACABABABA9A9A9A7A7A7A6A6A6A3A3A3A0A0A09E
+      9E9E9C9C9C9A9A9A999999979797969696949494939393929292919191909090
+      899AD9869EF2869EF2869EF2869EF2869EF2869EF2859EF2859EF2859DF2859D
+      F2859DF2849DF2859FF288A0F38DA6F396AFF5A2BCF6AFCBF88497E41314B907
+      06B50706B50706B50706B50706B51313B9434BCB6573D86573D86573D8434BCB
+      1F21BE0706B50706B50706B50706B50706B51314B98597E4B1CCF8A3BEF698B1
+      F591A8F28CA3F28BA2F191A8F29CB4F4AEC7F7C2DDFA0706B50706B50706B539
+      3FC7C0D6EFC1C7C7B8BBBBB4B4B4B1B1B1B3B3B3B4B4B4B5B5B5B6B6B6B5B5B5
+      B6B6B6B7B7B7B7B7B7B7B7B7B7B7B7B7B7B7B7B7B7B9B9B9BCBEBEC1C5C5C8CD
+      CD6A6EC50706B51413B78386C8C6CCCCC0C3C3BBBDBDB8B9B9B6B6B6B6B6B6B7
+      B7B7B7B7B7B7B7B7B8B8B8B8B8B8B9B9B9BABABABABABABABABABBBBBBBDBDBD
+      BDBDBDBEBEBEBFBFBFC0C0C0C1C1C1C1C1C1C1C1C1C3C3C3C4C4C4C4C4C4C5C5
+      C5C5C5C5C6C6C6C7C7C7C9CACACDCECED2D5D5D9DEDE9CA2D90706B50706B507
+      06B50706B55C5FCCA3A8DFA3A8E05C5FCC0706B50706B50706B50706B54E4FC8
+      E3E8E8DFE1E1DBDDDDD9D9D9D9D9D9DADADADBDBDBDBDBDBDBDBDBDDDDDDDEDE
+      DEDFDFDFDFDFDFDFDFDFE0E0E0E1E1E1E2E2E2E3E3E3E3E3E3E3E3E3E4E4E4E4
+      E4E4E5E5E5E7E7E7E7E7E7E6E6E6E8E8E8E8E8E8E9E9E9EAEAEAEAEAEAEAEAEA
+      EAEAEAEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEDEDED
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F1F1F1F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7A6A6A6A6A6A6A5A5A5A4A4A4A3A3
+      A3A3A3A3A2A2A2A1A1A1A0A0A09F9F9F9D9D9D9C9C9C9FA0A0A4A7A7ADB4B4BA
+      C7C70605B80605B80605B80605B80605B80605B80605B80605B80605B80605B8
+      0605B80605B81F21C091A5E9B4CEF8A8C1F69DB6F496AFF392A9F290A7F28FA6
+      F28EA6F28EA6F28EA6F28EA5F28EA5F28DA5F28DA5F28DA5F28DA5F28DA4F28C
+      A4F28CA4F28CA4F28CA4F28CA4F28CA4F290A5EAB0B0B0AFAFAFB0B0B0AFAFAF
+      AFAFAFAEAEAEADADADABABABABABABA8A8A8A6A6A6A4A4A4A2A2A29F9F9F9D9D
+      9D9B9B9B9A9A9A989898979797969696949494939393929292919191899CD987
+      9FF2879FF2869EF2869EF2879FF3869EF2869EF3859EF2869EF3869EF3859EF3
+      859DF3859DF3879FF38AA2F48EA8F496B0F5A1BBF7ACC7F8A3BBF2414ACC0605
+      B80605B80605B80605B80605B80605B80605B80605B80605B80605B80605B806
+      05B80605B80605B80605B8363CC8A3BBF1AEC9F8A3BCF698B1F492AAF38DA4F3
+      8AA2F28CA2F294AAF39FB7F5B1CAF8C5DFFB0605B80605B80605B8383EC9BBD3
+      F9B3C3E1AAB6D7A4AFD3A2ACD2ABB0C3ACB1C4ADB2C4B1B4BDB7B7B7B7B7B7B7
+      B7B7B7B7B7B8B8B8B8B8B8B8B8B8B8B8B8B9BABABCBDBDBFC1C1C4C8C8C8CDCD
+      CAD0D0CAD0D0C7CCCCC3C6C6BEC0C0BABBBBB8B8B8B7B7B7B8B8B8B8B8B8B8B8
+      B8B8B8B8B8B8B8BABABABABABABABABABBBBBBBCBCBCBDBDBDBDBDBDBFBFBFBF
+      BFBFBFBFBFC1C1C1C1C1C1C2C2C2C3C3C3C4C4C4C4C4C4C5C5C5C6C6C6C6C6C6
+      C7C7C7C8C8C8C9C9C9CCCDCDD0D2D2D5D9D9DDE3E3595CCB0605B80605B80605
+      B80605B80605B80605B80605B80605B80605B80605B83131C2D8DDE8E1E4E4DE
+      E0E0DBDCDCD9D9D9DADADADADADADBDBDBDCDCDCDCDCDCDEDEDEDFDFDFE0E0E0
+      E0E0E0E1E1E1E1E1E1E2E2E2E3E3E3E4E4E4E4E4E4E4E4E4E5E5E5E6E6E6E7E7
+      E7E7E7E7E7E7E7E7E7E7E8E8E8E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEBEBEBEC
+      ECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F2F2F2F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7A8A8A8A7A7A7A6A6A6A5A5A5A4A4A4A4A4A4
+      A3A3A3A2A2A2A1A1A19F9F9F9E9E9E9D9D9D9E9F9FA3A5A5AAAFAFB4BEBE0403
+      BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA353BCA7B
+      8BE2BBD5F9B2CBF7A7C1F69FB7F498B1F394ABF391A8F28FA7F28FA7F28FA7F2
+      8FA6F28FA6F28FA6F28FA6F38EA6F28EA6F28EA6F38DA5F28DA5F28DA5F28DA5
+      F28DA4F28DA4F28DA5F38DA4F38DA4F3A2ABC9B0B0B0B0B0B0B0B0B0AFAFAFAF
+      AFAFAEAEAEADADADABABABAAAAAAA8A8A8A6A6A6A3A3A3A0A0A09E9E9E9C9C9C
+      9B9B9B9A9A9A98989897979796969694949494949491949E889FED88A0F388A0
+      F388A0F3879FF2879FF3879FF3879FF3879FF3869FF3869FF3869EF3869EF386
+      9EF3859EF387A0F38AA2F48EA7F495AEF59EB8F6A7C3F8B2CDF98EA3EA4049CE
+      0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403
+      BA4049CE8EA4EAB3CEF9A9C3F8A0B9F697B0F591A8F48DA4F48BA2F38BA1F28E
+      A5F395ACF4A2BAF5B2CCF8C6E0FB0403BA0403BA0403BA363CCAB8D1F8A8BFF6
+      9BB1F494A9F392A6F293A7F293A7F294A8F295A8F296A9F296A9F197AAF19DAD
+      E6A0AEE3A1AEE3A1AFE3AAB3D4ABB4D5ADB7D7B8BDC8C0C2C2C2C5C5C3C6C6C3
+      C7C7C1C4C4BEC1C1BCBDBDBABABAB8B9B9B9B9B9B8B8B8B9B9B9B9B9B9B9B9B9
+      BABABABABABABBBBBBBBBBBBBCBCBCBDBDBDBEBEBEBEBEBEBFBFBFBFBFBFC0C0
+      C0C2C2C2C3C3C3C3C3C3C3C3C3C4C4C4C5C5C5C7C7C7C7C7C7C8C8C8C8C8C8C9
+      C9C9CACACACCCCCCCFD0D0D3D6D6D9DDDDDEE4E48F93D81212BD0403BA0403BA
+      0403BA0403BA0403BA0403BA0403BA696BD1D7DCE7E2E5E5DEE0E0DCDEDEDBDB
+      DBDADBDBDBDBDBDCDCDCDCDCDCDDDDDDDDDDDDDEDEDEDFDFDFE0E0E0E0E0E0E1
+      E1E1E1E1E1E2E2E2E3E3E3E5E5E5E5E5E5E5E5E5E5E5E5E7E7E7E7E7E7E8E8E8
+      E8E8E8E9E9E9E9E9E9EAEAEAEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECEDED
+      EDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F1F1F1F1F1F1F2F2F2F2F2F2F1F1F1F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7A9A9A9A7A7A7A6A6A6A6A6A6A5A5A5A4A4A4A3A3A3A2
+      A2A2A1A1A1A0A0A09F9F9F9D9D9D9E9F9FA0A2A2A5A9A9ACB3B38890BE8E97C5
+      919ED193A7EA94A7EA93A6EA92A5EA91A5EA9CB1EEBDD7F9B8D2F9B3CCF8ACC5
+      F7A4BDF69EB6F598B0F495ACF491A9F390A8F390A8F390A7F390A7F390A7F38F
+      A7F38FA7F390A7F38FA6F38FA7F38FA7F38EA6F38EA6F38EA6F38EA5F38EA6F3
+      8EA5F38DA5F38DA5F38DA5F392A6EBB0B0B0B0B0B0B0B0B0B0B0B0AFAFAFAFAF
+      AFAEAEAEACACACABABABA9A9A9A6A6A6A4A4A4A2A2A29F9F9F9D9D9D9C9C9C9A
+      9A9A999999989898949AAE8F9CCA8B9FE189A1F489A1F488A0F388A1F488A0F3
+      88A0F4879FF388A0F488A0F487A0F4879FF4879FF4879FF4879FF4869FF4869E
+      F4869EF487A0F48AA2F48DA6F593ACF599B3F6A1BBF7A9C4F8B1CDF9ADC7F677
+      88E35663D8333ACC333ACC343ACC343ACC333ACC5663D87789E3ADC7F6B2CDF9
+      ABC6F8A4BDF79CB4F695ADF591A8F48CA4F48AA1F38AA1F38BA2F38EA6F497AE
+      F5A4BBF6191BC40302BC0302BC0302BC0302BC3439CCB3CCF8A5BCF59BB0F495
+      A9F393A7F394A7F294A8F295A9F295A9F296AAF297AAF297AAF298ABF299ABF2
+      9AACF29BADF29BADF29DAEF19EB0F1A8B5E4BCBDBDBDBFBFBEC0C0BEC0C0BDBE
+      BEBBBCBCBBBBBBBABABAB8B8B8B9B9B9B9B9B9B9B9B9BABABABABABABBBBBBBB
+      BBBBBCBCBCBDBDBDBDBDBDBEBEBEBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1C2C2C2
+      C3C3C3C3C3C3C4C4C4C5C5C5C7C7C7C7C7C7C7C7C7C9C9C9C9C9C9CACACACBCB
+      CBCDCDCDCECFCFD1D2D2D5D7D7D9DCDCDEE2E2D3D9E49094DA676AD23C3DC93D
+      3EC95A5CD08386D8C9CEE5E3E8E8E1E4E4DEE0E0DDDEDEDBDCDCDBDBDBDADADA
+      DCDCDCDDDDDDDEDEDEDEDEDEDEDEDEDFDFDFE0E0E0E1E1E1E2E2E2E2E2E2E3E3
+      E3E3E3E3E4E4E4E5E5E5E5E5E5E5E5E5E6E6E6E7E7E7E8E8E8E8E8E8E9E9E9E9
+      E9E9E9E9E9EBEBEBECECECECECECECECECECECECEDEDEDEDEDEDEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7AAAAAAA9A9A9A8A8A8A7A7A7A6A6A6A5A5A5A4A4A4A3A3A3A2A2
+      A2A1A1A19F9F9F9E9E9E9E9F9F9FA0A0A0A3A3A5A9A9AAB0B0ADB6B6B0BABAB2
+      C4DAB5CDF8B3CDF8B3CDF8B2CBF8B0C9F7ADC6F7AAC2F6A4BDF6A0B8F59CB4F5
+      98B0F595ADF493AAF492A9F491A9F491A9F491A9F491A8F490A8F391A8F490A7
+      F390A8F490A8F490A7F490A7F48FA7F48FA7F48FA7F48FA7F48FA6F48EA6F48E
+      A6F48EA6F48EA6F48EA5F4A3ACC9B0B0B0B0B0B0B0B0B0AFAFAFAFAFAFAEAEAE
+      ACACACABABABA9A9A9A7A7A7A5A5A5A3A3A3A0A0A09B9EA8979EB8939FC78EA0
+      DD8AA2F48AA2F48AA2F48AA2F48AA2F489A2F489A1F489A1F489A1F489A1F489
+      A1F488A0F488A0F488A0F488A0F488A0F487A0F487A0F4879FF4879FF4879FF4
+      869FF487A1F489A1F48CA4F590A8F594AEF69AB4F7A0BAF7A5C0F8AAC5F9AEC9
+      F9B1CCF9B2CEF9B3CFFAB3CFF9B1CDF9AFCAF9ACC7F9A8C1F8A1BBF79CB5F797
+      B0F691AAF58FA6F58CA3F48AA1F48AA1F48BA1F48CA3F48FA6F598AEF5A2B9F6
+      8496E90101BE0101BE0101BE0101BE3036CDAFC6F7A3B9F699AFF494A8F393A7
+      F394A8F294A8F295A9F396AAF397AAF398ABF398ABF399ACF39BADF29AADF29C
+      AEF29DAEF29DAFF29EB0F2A0B1F2B4B8C9BABBBBBABBBBBBBCBCBABBBBBABABA
+      B9BABAB9B9B9B9B9B9B9B9B9BABABABABABABBBBBBBBBBBBBCBCBCBCBCBCBDBD
+      BDBDBDBDBEBEBEBFBFBFBFBFBFC0C0C0C0C0C0C2C2C2C2C2C2C3C3C3C4C4C4C4
+      C4C4C6C6C6C6C6C6C7C7C7C7C7C7C8C8C8C9C9C9CACACACCCCCCCBCBCBCDCDCD
+      CFCFCFCFD0D0D3D4D4D6D8D8D8DBDBDCE0E0DFE3E3E1E5E5E2E7E7E3E8E8E3E7
+      E7E2E6E6E0E4E4DFE2E2DDDFDFDCDDDDDBDBDBDBDBDBDBDBDBDBDBDBDCDCDCDD
+      DDDDDEDEDEDEDEDEDEDEDEE1E1E1E1E1E1E2E2E2E3E3E3E3E3E3E4E4E4E5E5E5
+      E5E5E5E6E6E6E6E6E6E7E7E7E7E7E7E8E8E8E9E9E9E9E9E9E9E9E9EAEAEAEAEA
+      EAEBEBEBEBEBEBECECECECECECECECECEDEDEDEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F1F1F1F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7ABABABAAAAAAA9A9A9A8A8A8A7A7A7A6A6A6A5A5A5A4A4A4A3A3A3A2A2A2
+      A1A1A19F9F9F9E9E9E9E9F9F9E9F9F9FA1A1A1A5A5A2A7A7A3A8A8A3AAAAA6BB
+      E8A6BEF6A5BDF6A4BCF6A3BBF6A0B9F69EB6F59BB4F599B1F596AFF495ACF494
+      ABF493AAF492AAF492AAF492AAF492A9F492A9F491A9F491A9F491A9F491A8F4
+      91A8F491A8F490A8F490A8F490A8F490A7F48FA7F48FA7F48FA7F48FA7F48FA6
+      F48FA6F48EA6F493A7ECB0B0B0B0B0B0B0B0B0AFAFAFAFAFAFAEAEAEADADADAC
+      ACACA2A8BC9DA6C499A5CD92A4E08DA4EF8CA4F58BA3F48BA3F48BA3F48BA3F4
+      8BA3F58BA3F58BA3F58AA2F58AA2F58AA2F58AA2F58AA2F589A2F589A1F589A1
+      F589A1F589A1F589A1F588A1F588A0F588A0F588A0F588A0F587A0F5879FF587
+      9FF588A0F588A1F58AA3F58CA5F68FA8F693ACF697B0F79AB4F79DB7F89FB9F7
+      A1BBF8A2BCF8A2BCF8A0BAF89FB9F89BB5F798B2F796AEF691AAF68FA7F58CA5
+      F48CA3F48BA2F48BA1F48BA1F48BA2F48DA3F490A7F495ACF59DB5F6A8C0F764
+      72E05D69DD5E6ADD5C69DC6F7EE3A7BEF69FB5F699AEF496AAF394A8F395A9F3
+      95A9F397ABF397ABF398ABF398ABF399ACF39BADF39BAEF39CAEF39DAFF39DAF
+      F39EB0F39FB0F3A0B1F3A5B3E8BABABABABABABABABABABABAB9B9B9B9B9B9BA
+      BABABABABABBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBCBCBCBDBDBDBDBDBDBEBEBE
+      BFBFBFC0C0C0C0C0C0C1C1C1C2C2C2C3C3C3C3C3C3C4C4C4C5C5C5C6C6C6C7C7
+      C7C7C7C7C8C8C8C9C9C9C9C9C9CACACACACACACCCCCCCCCCCCCDCDCDCECECECF
+      CFCFD1D1D1D3D4D4D6D7D7D8DADAD9DCDCDBDEDEDDE0E0DEE1E1DEE0E0DEE0E0
+      DCDEDEDCDDDDDBDCDCDADBDBDBDBDBDBDBDBDCDCDCDDDDDDDDDDDDDEDEDEDFDF
+      DFE0E0E0E0E0E0E1E1E1E1E1E1E2E2E2E3E3E3E3E3E3E4E4E4E6E6E6E7E7E7E7
+      E7E7E7E7E7E8E8E8E8E8E8E9E9E9EAEAEAEAEAEAEAEAEAEBEBEBEBEBEBECECEC
+      ECECECEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F0F0F0F0F0F0F0F0
+      F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7ADAD
+      ADABABABAAAAAAA9A9A9A8A8A8A7A7A7A6A6A6A5A5A5A4A4A4A2A2A2A1A1A1A0
+      A0A09E9E9E9E9E9E9C9D9D9C9D9D9C9D9D9B9D9D9A9C9C9A9C9C999EA69CB2EF
+      9CB3F59AB3F599B2F598B1F597AFF496AEF595ACF495ACF594ABF594ABF593AB
+      F593ABF593AAF593AAF592AAF592AAF592AAF592A9F592A9F592A9F591A9F591
+      A9F591A9F591A8F591A8F590A8F590A8F590A8F590A8F590A7F58FA7F58FA7F5
+      8FA7F58FA7F5A0ABD2A3ACCA9FABD29FABD296A8E396A7E38EA5F58DA5F58DA5
+      F58DA5F58DA5F58CA4F58CA4F58CA4F58CA4F58CA4F58CA4F58BA3F58CA4F58C
+      A4F58BA3F58BA3F58BA3F58BA3F58AA3F58AA2F58AA2F58AA2F58AA2F58AA2F5
+      89A1F589A1F589A1F589A1F589A1F588A1F588A1F588A0F588A0F588A0F587A0
+      F587A0F588A0F588A1F58AA2F58CA4F68CA6F68EA7F690A9F692ABF693ACF694
+      ADF694ADF693ABF692ABF690A9F68FA7F68DA6F68CA4F58BA2F58CA3F58AA2F5
+      8BA2F58CA2F58BA2F58CA3F58CA3F58FA6F594AAF599B1F59FB7F6A7BFF7ACC4
+      F8AEC5F8ACC3F8A7BEF7A1B6F69BB1F598ACF595AAF494A9F496AAF496AAF497
+      ABF399ACF499ACF399ACF39BADF49BAEF49CAEF49DAFF49EB0F39EB0F39FB1F3
+      A0B1F3A0B2F3A2B3F3B0B6CFB9B9B9BABABABABABABABABABABABABABABABABA
+      BABBBBBBBBBBBBBBBBBBBCBCBCBDBDBDBDBDBDBDBDBDBEBEBEBEBEBEC0C0C0C0
+      C0C0C1C1C1C1C1C1C2C2C2C3C3C3C4C4C4C5C5C5C5C5C5C7C7C7C7C7C7C8C8C8
+      C9C9C9CACACACBCBCBCBCBCBCCCCCCCDCDCDCDCDCDCECECECFCFCFCFCFCFD1D2
+      D2D2D2D2D3D4D4D5D6D6D6D7D7D8D9D9D9DADAD9DADAD9DBDBDADBDBD9DADAD9
+      DADADBDBDBDADBDBDBDBDBDCDCDCDDDDDDDEDEDEDEDEDEDFDFDFE0E0E0E1E1E1
+      E1E1E1E2E2E2E2E2E2E4E4E4E4E4E4E4E4E4E5E5E5E6E6E6E7E7E7E7E7E7E7E7
+      E7E8E8E8E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEBEBEBEDEDEDEDEDEDEEEEEEEE
+      EEEEEEEEEEEEEEEEEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F2F2
+      F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F4F4F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7AEAEAEACACAC
+      ABABABAAAAAAA9A9A9A8A8A8A7A7A7A6A6A6A5A5A5A3A3A3A2A2A2A1A1A19F9F
+      9F9E9E9E9C9C9C9B9B9B999999989898969696969797949595959EB897AEF597
+      AEF596AEF595ADF595ADF595ACF595ACF595ACF594ACF594ACF594ABF594ABF5
+      94ABF593ABF593ABF593ABF593AAF593AAF592AAF592AAF592AAF592A9F592A9
+      F592A9F591A9F591A9F591A9F591A8F590A8F590A8F590A8F590A8F590A7F590
+      A7F58FA7F58FA7F58FA7F58FA7F58FA7F68EA6F58EA6F58EA6F58EA6F68EA6F6
+      8EA6F68DA5F58DA5F58DA5F58DA5F58DA5F68CA4F58CA4F58CA4F68CA4F68CA4
+      F68CA4F68CA4F68BA3F68BA3F68BA3F68BA3F68BA3F68AA3F68AA2F68AA2F68A
+      A2F68AA2F68AA2F689A2F689A1F689A1F689A1F689A1F688A1F688A0F688A0F6
+      88A0F688A0F687A0F688A1F688A1F689A1F689A2F68AA2F58BA4F58BA3F58BA4
+      F58BA3F58AA3F58BA3F58BA2F68BA2F68AA1F68BA2F68BA2F58BA2F58BA3F58C
+      A3F58DA4F58DA3F58DA4F58FA5F592A9F595ACF69AB1F69EB4F7A2B8F7A2B8F7
+      A1B7F79EB5F69BB1F698ADF596ABF496AAF496AAF497ABF497ABF498ACF499AC
+      F49AACF49AADF49BAEF49BAEF49CAFF49EB0F49EB0F39FB1F49FB1F3A1B2F3A1
+      B2F3A3B4F4A5B5F0B8B9BDB9B9B9B9B9B9BABABABABABABABABABBBBBBBBBBBB
+      BBBBBBBCBCBCBCBCBCBDBDBDBEBEBEBEBEBEBFBFBFBFBFBFC1C1C1C1C1C1C2C2
+      C2C2C2C2C3C3C3C3C3C3C4C4C4C6C6C6C6C6C6C7C7C7C8C8C8C8C8C8CACACACB
+      CBCBCCCCCCCCCCCCCDCDCDCECECECECECECFCFCFCFCFCFD1D1D1D2D2D2D2D2D2
+      D3D3D3D5D5D5D5D5D5D6D6D6D7D7D7D7D7D7D8D8D8D9D9D9D9DADAD9D9D9DADA
+      DADBDBDBDBDBDBDCDCDCDDDDDDDEDEDEDFDFDFDFDFDFE0E0E0E1E1E1E2E2E2E3
+      E3E3E4E4E4E5E5E5E5E5E5E5E5E5E6E6E6E7E7E7E8E8E8E8E8E8E8E8E8E9E9E9
+      EAEAEAEAEAEAEBEBEBEBEBEBECECECECECECEDEDEDEDEDEDEEEEEEEEEEEEEEEE
+      EEEEEEEEEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F2F2F2F1F1F1F1F1F1F2F2F2F1F1F1F2F2F2F1F1F1F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F4
+      F4F4F4F4F4F5F5F5F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7B0B0B0AEAEAEADADADAB
+      ABABAAAAAAA9A9A9A7A7A7A7A7A7A6A6A6A4A4A4A3A3A3A2A2A2A0A0A09F9F9F
+      9D9D9D9B9B9B9A9A9A98989896969696969694949493939395A3D096AEF696AE
+      F696ADF696ADF696ADF695ADF695ADF695ADF695ACF695ACF695ACF694ACF694
+      ACF694ABF694ABF693ABF693ABF693ABF693AAF693AAF693AAF692AAF692AAF6
+      92AAF692A9F692A9F691A9F691A9F691A9F691A9F691A8F690A8F690A8F690A8
+      F690A8F690A7F690A7F68FA7F68FA7F68FA7F68FA6F68FA6F68FA7F58EA6F68E
+      A6F68EA6F68EA6F68DA5F68DA5F68DA5F58DA5F68DA5F68DA5F68DA5F68DA5F6
+      8CA4F68CA4F68CA4F68CA4F68BA4F68BA3F68BA3F68BA3F68BA3F68BA3F68AA2
+      F68AA2F68AA2F68AA2F68AA2F689A2F689A2F689A1F689A1F689A1F688A1F688
+      A1F688A0F688A0F688A0F688A0F688A0F688A0F688A0F688A0F689A1F689A1F6
+      89A1F68AA1F68AA1F68AA2F68AA2F68BA2F68CA3F58CA3F58CA3F58DA4F68EA4
+      F68EA5F68FA5F68FA5F690A7F692A8F695ABF696ACF698AFF699AFF69AAEF698
+      ADF697ADF597ABF596ABF596AAF597ABF597ABF598ACF599ACF599ADF59AADF5
+      9BAEF49CAEF49CAFF49DAFF49EB0F49FB0F49FB1F4A1B2F4A1B2F4A2B3F4A3B4
+      F4A4B4F4ADB6D9B8B8B8B9B9B9B9B9B9BBBBBBBBBBBBBBBBBBBBBBBBBCBCBCBD
+      BDBDBDBDBDBEBEBEBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1C2C2C2C3C3C3C3C3C3
+      C4C4C4C4C4C4C5C5C5C6C6C6C7C7C7C8C8C8C8C8C8C9C9C9CACACACBCBCBCCCC
+      CCCCCCCCCDCDCDCECECECFCFCFD0D0D0D0D0D0D1D1D1D2D2D2D3D3D3D4D4D4D5
+      D5D5D5D5D5D7D7D7D7D7D7D8D8D8D8D8D8DADADADADADADADADADCDCDCDCDCDC
+      DDDDDDDEDEDEDEDEDEDFDFDFDFDFDFE0E0E0E1E1E1E2E2E2E2E2E2E3E3E3E4E4
+      E4E5E5E5E5E5E5E6E6E6E6E6E6E7E7E7E8E8E8E8E8E8E8E8E8EAEAEAEBEBEBEB
+      EBEBECECECECECECEDEDEDEDEDEDEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEF
+      F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F1
+      F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7B0B0B0AFAFAFAEAEAEACACACABAB
+      ABAAAAAAA9A9A9A8A8A8A7A7A7A6A6A6A5A5A5A3A3A3A2A2A2A0A0A09F9F9F9D
+      9D9D9C9C9C9A9A9A98989897979796969694949493949996A9E397AEF697AEF6
+      96AEF696AEF696AEF696ADF696ADF696ADF695ADF695ADF695ACF695ACF695AC
+      F694ACF694ACF694ACF694ABF694ABF693ABF693ABF693ABF693AAF693AAF693
+      AAF692AAF692AAF692AAF692A9F691A9F691A9F691A9F691A9F691A8F691A8F6
+      90A8F690A8F690A8F690A8F690A7F68FA7F68FA7F68FA7F68FA7F68FA6F68EA6
+      F68FA7F68EA6F68EA6F68EA6F68DA5F68EA6F78EA6F78DA5F78DA5F78DA5F78D
+      A5F78DA5F78CA4F78CA4F78CA4F78CA4F78CA4F78BA4F78BA3F78BA3F78BA3F7
+      8BA3F78BA3F78AA3F78AA2F78AA2F78AA2F78AA2F789A2F789A1F789A1F789A1
+      F789A1F788A1F788A1F789A1F688A1F689A1F689A1F68AA2F68AA1F68AA2F68B
+      A2F68AA2F68BA2F68CA3F68BA3F68CA3F68DA4F68CA3F68DA4F68EA5F68FA5F6
+      90A6F68FA5F690A6F691A7F692A8F693A9F695AAF696AAF696ABF695AAF696AA
+      F695AAF696AAF697ABF697ACF598ACF599ACF59AADF59AADF59BAEF59CAFF59D
+      AFF59EB0F59EB0F59EB1F59FB1F5A1B2F5A2B3F5A2B4F5A3B4F4A4B5F4A5B5F4
+      A5B6F4B3B7C7B8B8B8B9B9B9B9B9B9BABABABBBBBBBBBBBBBCBCBCBDBDBDBEBE
+      BEBFBFBFBFBFBFC0C0C0C0C0C0C1C1C1C2C2C2C3C3C3C3C3C3C5C5C5C5C5C5C6
+      C6C6C7C7C7C7C7C7C8C8C8C9C9C9C9C9C9CACACACBCBCBCCCCCCCDCDCDCDCDCD
+      CECECECFCFCFCFCFCFD1D1D1D1D1D1D2D2D2D3D3D3D3D3D3D4D4D4D5D5D5D6D6
+      D6D7D7D7D8D8D8D7D7D7D9D9D9DADADADADADADBDBDBDDDDDDDDDDDDDEDEDEDE
+      DEDEE0E0E0E0E0E0E1E1E1E1E1E1E2E2E2E3E3E3E3E3E3E4E4E4E5E5E5E6E6E6
+      E6E6E6E7E7E7E7E7E7E8E8E8E9E9E9E9E9E9EAEAEAEAEAEAEBEBEBECECECECEC
+      ECECECECEDEDEDEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7B2B2B2B1B1B1B0B0B0AFAFAFACACACABABAB
+      AAAAAAA9A9A9A8A8A8A7A7A7A5A5A5A5A5A5A3A3A3A2A2A2A0A0A09F9F9F9C9C
+      9C9B9B9B9999999898989797979696969595959599A697ADF197AFF797AFF797
+      AEF797AEF797AEF796AEF796AEF796AEF796ADF796ADF796ADF795ADF795ADF7
+      95ACF795ACF794ACF794ACF794ACF794ABF794ABF794ABF793ABF793ABF793AB
+      F793AAF793AAF792AAF792AAF792AAF792AAF792A9F791A9F791A9F791A9F791
+      A9F791A8F791A8F790A8F790A8F790A8F790A7F790A7F78FA7F78FA7F78FA7F7
+      8FA7F78EA6F78EA6F78EA6F78EA6F78EA6F78EA6F78EA6F78EA6F78EA6F78DA5
+      F78DA5F78DA5F78CA4F78CA4F78CA4F78CA4F78CA4F78BA3F78CA4F78BA3F78B
+      A3F78BA3F78BA3F78BA3F78AA3F78AA3F78AA2F78AA2F78AA2F789A2F789A2F7
+      89A1F789A1F789A2F789A1F78AA2F78AA1F78AA2F78BA3F78BA2F78BA3F78BA3
+      F78BA3F78CA4F78CA4F78DA4F78DA4F68DA4F68EA4F68FA5F68FA6F690A6F691
+      A7F691A7F691A7F691A7F693A8F794A9F694A9F694A9F696AAF695AAF696ABF6
+      97ABF697ABF698ACF698ACF59AADF69AADF59BAEF69DAFF69DB0F69DB0F69FB1
+      F69FB1F6A0B2F5A1B3F5A2B3F5A3B4F5A3B4F5A4B5F5A4B5F5A5B6F5A7B7F5AA
+      B8EDB7B8BCB9B9B9B9B9B9BABABABBBBBBBCBCBCBCBCBCBDBDBDBEBEBEBEBEBE
+      BFBFBFC0C0C0C0C0C0C2C2C2C2C2C2C3C3C3C3C3C3C4C4C4C5C5C5C7C7C7C7C7
+      C7C8C8C8C9C9C9C9C9C9CBCBCBCBCBCBCCCCCCCDCDCDCDCDCDCFCFCFCFCFCFD0
+      D0D0D1D1D1D1D1D1D2D2D2D3D3D3D4D4D4D4D4D4D6D6D6D6D6D6D7D7D7D8D8D8
+      D8D8D8D9D9D9DADADADBDBDBDBDBDBDCDCDCDDDDDDDDDDDDDEDEDEDFDFDFE0E0
+      E0E0E0E0E1E1E1E2E2E2E3E3E3E3E3E3E3E3E3E4E4E4E6E6E6E7E7E7E7E7E7E8
+      E8E8E7E7E7E9E9E9EAEAEAEAEAEAEBEBEBECECECECECECEDEDEDEDEDEDEDEDED
+      EEEEEEEEEEEEEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F6F6F6F5F5F5F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7B3B3B3B2B2B2B0B0B0AFAFAFAFAFAFACACACABABABAA
+      AAAAA9A9A9A8A8A8A6A6A6A5A5A5A4A4A4A2A2A2A1A1A1A0A0A09E9E9E9D9D9D
+      9A9A9A999999989898979797969696959595969FB998AFF798AFF798AFF797AF
+      F797AFF797AFF797AEF797AEF797AEF796AEF796AEF796ADF796ADF796ADF795
+      ADF795ADF795ADF795ACF795ACF794ACF794ACF794ACF794ABF794ABF794ABF7
+      93ABF793ABF793ABF793AAF792AAF792AAF792AAF792AAF792A9F792A9F791A9
+      F791A9F791A9F791A9F791A8F790A8F790A8F790A8F790A8F790A7F78FA7F78F
+      A7F78FA7F78FA7F78FA7F78FA7F88EA6F78EA6F78EA6F78EA6F78EA6F78DA5F7
+      8DA5F78DA5F88DA5F78DA5F88CA4F78DA5F88CA4F78CA4F78CA4F78BA3F78CA4
+      F88CA4F88BA4F88BA3F88BA3F88BA3F88BA3F88AA3F88AA2F88AA2F88AA2F88A
+      A2F88AA2F78AA2F78BA2F78AA2F78BA3F78BA3F78BA3F78CA3F78CA3F78CA4F7
+      8DA4F78EA5F78EA5F78EA5F78FA5F78FA5F78FA6F790A6F790A7F791A7F791A7
+      F792A7F792A8F793A9F794A9F695A9F695AAF696AAF697ABF698ACF797ABF697
+      ACF699ADF79AADF69BAEF69BAEF69CAFF69CB0F69EB0F69DB0F6A0B2F6A0B2F6
+      A1B3F6A2B4F6A2B4F6A3B5F6A4B5F6A5B6F6A5B6F6A7B7F6A8B8F6A9B8F6B2B8
+      CFB9B9B9BABABABBBBBBBBBBBBBCBCBCBDBDBDBDBDBDBEBEBEBFBFBFC0C0C0C1
+      C1C1C1C1C1C2C2C2C3C3C3C4C4C4C4C4C4C5C5C5C6C6C6C7C7C7C7C7C7C8C8C8
+      CACACACACACACBCBCBCBCBCBCCCCCCCDCDCDCECECECFCFCFD0D0D0D0D0D0D1D1
+      D1D2D2D2D2D2D2D3D3D3D5D5D5D6D6D6D7D7D7D7D7D7D8D8D8D9D9D9D9D9D9DA
+      DADADBDBDBDCDCDCDCDCDCDDDDDDDEDEDEDEDEDEDFDFDFE0E0E0E1E1E1E1E1E1
+      E2E2E2E3E3E3E4E4E4E4E4E4E5E5E5E5E5E5E6E6E6E7E7E7E7E7E7E8E8E8E8E8
+      E8EAEAEAEAEAEAEAEAEAEBEBEBECECECECECECEDEDEDEDEDEDEDEDEDEEEEEEEF
+      EFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4
+      F4F4F4F4F4F4F4F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F4F4F4F5F5F5F4F4F4F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7B5B5B5B3B3B3B2B2B2B1B1B1AFAFAFAEAEAEACACACABABABAAAA
+      AAA9A9A9A8A8A8A7A7A7A6A6A6A4A4A4A3A3A3A1A1A19F9F9F9E9E9E9C9C9C9B
+      9B9B9A9A9A98989897979796969695959596A4CB99B0F898AFF798B0F898AFF8
+      98AFF898AFF897AFF897AFF897AFF897AEF897AEF897AEF896AEF896AEF896AD
+      F896ADF895ADF895ADF895ADF895ACF895ADF795ACF894ACF894ACF894ACF894
+      ABF894ABF893ABF893ABF893ABF893ABF893AAF892AAF892AAF892AAF892AAF8
+      92A9F892A9F891A9F891A9F891A9F891A8F891A8F890A8F890A8F890A8F890A8
+      F88FA7F88FA7F88FA7F88FA7F88FA7F88FA7F88EA6F88EA6F88EA6F88EA6F88E
+      A6F88DA5F88DA5F88DA5F88DA5F88DA5F88CA5F88CA4F88CA4F88CA4F88CA4F8
+      8CA4F88BA4F88CA4F88BA4F88BA4F88BA3F88BA3F88BA3F88AA3F88AA3F88BA3
+      F88BA3F88BA3F88CA4F88CA4F88CA4F88CA4F88DA4F88DA4F88DA4F88EA5F88E
+      A5F88EA5F88FA6F88FA6F78FA6F790A7F791A7F791A7F792A8F793A8F793A8F7
+      93A9F794A9F794AAF795AAF796ABF796ABF797ACF798ACF798ACF799ADF79AAE
+      F79AADF79CAFF69BAFF69CAFF69DB0F69EB1F69FB1F6A0B2F6A0B3F6A1B3F6A2
+      B4F6A3B4F6A3B5F6A4B5F6A5B6F6A6B7F6A7B8F6A8B8F6AAB9F2B7B8BCB9B9B9
+      BABABABCBCBCBCBCBCBCBCBCBDBDBDBEBEBEC0C0C0C0C0C0C1C1C1C2C2C2C2C2
+      C2C3C3C3C4C4C4C5C5C5C6C6C6C6C6C6C7C7C7C8C8C8C9C9C9CACACACACACACB
+      CBCBCCCCCCCCCCCCCECECECECECECFCFCFD0D0D0D0D0D0D1D1D1D2D2D2D2D2D2
+      D3D3D3D4D4D4D5D5D5D6D6D6D7D7D7D7D7D7D8D8D8D9D9D9DADADADADADADBDB
+      DBDCDCDCDCDCDCDDDDDDDEDEDEDFDFDFDFDFDFE0E0E0E1E1E1E1E1E1E3E3E3E3
+      E3E3E5E5E5E4E4E4E6E6E6E6E6E6E8E8E8E7E7E7E8E8E8E8E8E8E9E9E9EBEBEB
+      EBEBEBEBEBEBECECECEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFF0F0F0F0F0
+      F0F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F3F3F3F4F4
+      F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7B6B6B6B5B5B5B4B4B4B2B2B2B0B0B0AFAFAFAEAEAEADADADABABABAAAAAA
+      A9A9A9A8A8A8A7A7A7A5A5A5A4A4A4A2A2A2A1A1A19F9F9F9E9E9E9C9C9C9B9B
+      9B9A9A9A98989898989897979796969698A8D999B0F899B0F899B0F898B0F898
+      B0F898B0F898AFF898AFF898AFF897AFF897AFF897AEF897AEF897AEF896AEF8
+      96AEF896AEF896ADF896ADF895ADF895ADF895ADF895ACF895ACF895ACF894AC
+      F894ACF894ACF894ABF893ABF893ABF893ABF893ABF893AAF893AAF892AAF892
+      AAF892AAF892AAF892A9F891A9F891A9F891A9F891A9F891A8F890A8F890A8F8
+      90A8F890A8F890A8F88FA7F88FA7F88FA7F88FA7F88FA7F88FA7F88EA6F88EA6
+      F88EA6F88EA6F88DA6F88DA5F88DA5F88DA5F88DA5F88DA5F88CA4F88CA4F88C
+      A4F88CA4F88CA4F88BA4F88BA4F88BA3F88BA3F88BA3F88BA3F88BA3F88BA3F8
+      8BA3F88BA3F88DA4F88CA4F88CA4F88DA5F88DA5F88EA5F88EA6F88FA6F890A6
+      F890A6F890A7F891A7F891A7F892A8F892A8F893A9F893A9F893A9F895AAF894
+      AAF895AAF896ABF897ABF897ACF798ADF799ADF799ADF79AAEF79BAEF79BAFF7
+      9CAFF79DB0F79DB1F79EB1F79FB2F7A0B2F7A1B3F7A1B3F7A2B4F7A3B4F7A4B6
+      F7A4B6F7A5B6F6A6B7F6A7B8F6A8B8F6A9B9F6B0B8D7B8B8B8B9B9B9BABABABB
+      BBBBBCBCBCBDBDBDBDBDBDBFBFBFC0C0C0C0C0C0C1C1C1C2C2C2C2C2C2C3C3C3
+      C5C5C5C5C5C5C6C6C6C6C6C6C7C7C7C9C9C9C9C9C9CACACACBCBCBCBCBCBCCCC
+      CCCCCCCCCFCFCFCFCFCFD0D0D0D1D1D1D1D1D1D2D2D2D3D3D3D3D3D3D5D5D5D6
+      D6D6D6D6D6D7D7D7D8D8D8D8D8D8D9D9D9DADADADADADADBDBDBDCDCDCDDDDDD
+      DDDDDDDEDEDEDFDFDFE0E0E0E0E0E0E2E2E2E2E2E2E3E3E3E3E3E3E4E4E4E5E5
+      E5E5E5E5E6E6E6E7E7E7E8E8E8E8E8E8E9E9E9E9E9E9EAEAEAEBEBEBEBEBEBEB
+      EBEBECECECEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEFEFEFF0F0F0F0F0F0F1F1F1
+      F1F1F1F1F1F1F3F3F3F2F2F2F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F6F6F6F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7B8B8
+      B8B6B6B6B5B5B5B4B4B4B2B2B2B0B0B0AFAFAFAFAFAFACACACABABABAAAAAAA9
+      A9A9A7A7A7A7A7A7A6A6A6A4A4A4A3A3A3A1A1A1A0A0A09E9E9E9C9C9C9B9B9B
+      9A9A9A98989897979797979796979C99ACE69AB1F999B0F899B1F999B0F998B0
+      F898B0F898AFF898B0F998AFF898AFF998AFF997AEF897AEF897AEF897AEF996
+      AEF896AEF996AEF996ADF896ADF996ADF995ADF895ACF895ADF995ADF995ACF9
+      95ACF994ACF994ACF994ACF994ACF994ABF993ABF993ABF993ABF993ABF993AA
+      F993AAF992AAF992AAF992AAF992A9F992A9F991A9F991A9F991A9F991A9F990
+      A8F990A8F990A8F990A8F990A8F990A8F98FA7F98FA7F98FA7F98FA7F98FA7F9
+      8EA6F98EA6F98EA6F98EA6F98EA6F98DA6F98DA5F98DA5F98DA5F98DA5F98DA5
+      F98CA5F98CA4F98CA4F98CA4F98CA4F98BA4F98CA4F88BA4F88CA4F88CA4F88D
+      A5F88DA5F88DA5F88EA5F88EA5F88EA5F88FA6F88FA6F88FA6F890A7F890A6F8
+      90A7F892A8F992A8F892A8F892A8F893A9F894A9F894AAF895AAF895AAF895AA
+      F896ABF897ACF898ADF899ADF899ADF799ADF79AAEF79BAEF79CB0F89CB0F79E
+      B1F89EB1F89FB2F8A0B2F8A0B3F7A1B4F7A2B4F7A3B5F7A3B5F7A4B6F7A6B7F7
+      A7B8F7A7B8F7A8B9F7A9B9F7A9BAF7B6B8C0B9B9B9BABABABBBBBBBCBCBCBDBD
+      BDBDBDBDBFBFBFC0C0C0C0C0C0C1C1C1C2C2C2C2C2C2C3C3C3C5C5C5C6C6C6C6
+      C6C6C7C7C7C7C7C7C8C8C8C9C9C9CACACACBCBCBCCCCCCCCCCCCCDCDCDCECECE
+      CFCFCFCFCFCFD0D0D0D1D1D1D1D1D1D3D3D3D4D4D4D4D4D4D5D5D5D6D6D6D6D6
+      D6D7D7D7D8D8D8D8D8D8D9D9D9DADADADBDBDBDBDBDBDEDEDEDDDDDDDEDEDEDE
+      DEDEE0E0E0E0E0E0E0E0E0E2E2E2E2E2E2E2E2E2E3E3E3E5E5E5E5E5E5E6E6E6
+      E7E7E7E8E8E8E8E8E8E9E9E9EAEAEAEAEAEAEBEBEBECECECECECECECECECEDED
+      EDEEEEEEEEEEEEEFEFEFEFEFEFF0F0F0F0F0F0F1F1F1F1F1F1F2F2F2F2F2F2F2
+      F2F2F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F6F6F6F6F6F6F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7B9B9B9B8B8B8
+      B6B6B6B5B5B5B4B4B4B2B2B2B1B1B1AFAFAFAEAEAEACACACABABABAAAAAAA9A9
+      A9A8A8A8A7A7A7A5A5A5A4A4A4A2A2A2A1A1A1A0A0A09E9E9E9C9C9C9B9B9B9A
+      9A9A999999989898979797979AA39AB0F39AB1F999B1F999B1F999B0F999B0F9
+      99B0F998B0F998B0F998B0F998AFF998AFF998AFF998AFF997AFF997AEF997AF
+      F997AFF997AEF996AEF996ADF996ADF996ADF996ADF995ADF996ADF995ADF895
+      ADF995ADF995ACF994ACF994ACF994ABF994ACF993ABF994ABF993ABF993AAF9
+      93ABF993ABF993AAF992AAF992AAF992AAF992AAF992A9F991A9F991A9F991A9
+      F991A9F991A9F990A8F990A8F990A8F990A8F990A8F990A8F98FA7F98FA7F98F
+      A7F98FA7F98EA7F98EA6F98EA6F98EA6F98EA6F98EA6F98DA5F98DA5F98DA5F9
+      8DA5F98DA5F98CA5F98CA5F98CA4F98CA5F98CA4F98DA5F98DA5F98EA5F98DA5
+      F98EA6F98FA6F98EA6F98FA6F98FA7F990A7F990A7F991A7F991A8F991A8F992
+      A8F993A9F893A9F893A9F894AAF894AAF895ABF895ABF895ABF897ACF897ACF8
+      98ACF898ADF899ADF89AAEF89AAEF89BAFF89CAFF89CB0F89DB0F89EB1F89EB1
+      F89FB2F8A1B3F7A1B3F7A1B4F7A2B4F7A4B5F7A4B6F7A5B7F7A6B7F7A7B8F7A8
+      B9F8A8B9F7AABBF8B0BADFB8B8B8B9B9B9BABABABBBBBBBCBCBCBDBDBDBEBEBE
+      C0C0C0C0C0C0C0C0C0C1C1C1C2C2C2C3C3C3C5C5C5C5C5C5C6C6C6C7C7C7C8C8
+      C8C8C8C8CACACACACACACBCBCBCCCCCCCDCDCDCECECECECECECFCFCFD0D0D0D0
+      D0D0D1D1D1D2D2D2D3D3D3D4D4D4D4D4D4D5D5D5D6D6D6D7D7D7D7D7D7D8D8D8
+      D9D9D9D9D9D9DBDBDBDBDBDBDCDCDCDDDDDDDEDEDEDEDEDEDFDFDFE0E0E0E0E0
+      E0E1E1E1E2E2E2E3E3E3E3E3E3E4E4E4E5E5E5E5E5E5E6E6E6E6E6E6E7E7E7E8
+      E8E8E8E8E8E9E9E9E9E9E9EAEAEAEBEBEBECECECECECECEDEDEDEDEDEDEEEEEE
+      EFEFEFEFEFEFEFEFEFF0F0F0F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F3F3
+      F3F3F3F3F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F4F4F4F4F4F4F5F5F5F5F5F5F4
+      F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F6F6F6F5F5F5F5F5F5F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7BBBBBBB9B9B9B8B8B8B6
+      B6B6B5B5B5B4B4B4B2B2B2B1B1B1AFAFAFAEAEAEACACACABABABAAAAAAA9A9A9
+      A8A8A8A7A7A7A5A5A5A4A4A4A2A2A2A1A1A1A0A0A09E9E9E9D9D9D9C9C9C9A9A
+      9A999999989898989898989CAA9AB0F39AB1F99AB1F99AB1F999B1F999B1F999
+      B1F999B0F999B0F999B0F998B0F998B0F998AFF998AFF998AFF997AFF997AFF9
+      97AFF997AEF997AEF996AEF996AEF996AEF996ADF996ADF996ADF995ADF995AD
+      F995ADF995ACF994ACF994ACF994ACF994ACF994ACF994ABF993ABF993ABF993
+      ABF993ABF993ABF992AAF992AAF992AAF992AAF992A9F991A9F991A9F991A9FA
+      91A9F991A9F990A8F990A8F991A9FA90A8FA90A8FA90A8FA8FA7F98FA7F98FA7
+      F98FA7F98FA7FA8EA6F98EA6F98EA6F98EA6F98EA6FA8DA5F98DA5F98DA5F98D
+      A5F98DA5F98CA5F98DA5F98DA5F98DA5F98DA5F98DA5F98EA6F98EA6F98EA6F9
+      8FA7F98FA6F990A7F990A7F991A8F991A8F992A8F992A9F992A9F992A9F993A9
+      F994AAF994AAF995ABF995ABF996ABF996ACF997ACF998ADF999ADF998ADF99A
+      AEF999AEF99BAFF89BAFF89CB0F89CB0F89DB1F89EB1F89FB2F89FB2F8A1B3F8
+      A1B3F8A1B4F8A3B5F8A4B6F8A4B6F8A5B7F8A6B7F8A7B8F8A8B8F8A8B9F8A9BA
+      F8AABBF8B5B7BFB9B9B9BABABABABABABBBBBBBDBDBDBEBEBEBEBEBEC0C0C0C0
+      C0C0C1C1C1C2C2C2C3C3C3C4C4C4C5C5C5C6C6C6C7C7C7C7C7C7C9C9C9C9C9C9
+      CACACACBCBCBCBCBCBCCCCCCCDCDCDCECECECFCFCFCFCFCFD0D0D0D1D1D1D2D2
+      D2D3D3D3D3D3D3D4D4D4D5D5D5D5D5D5D6D6D6D7D7D7D8D8D8DADADADADADADB
+      DBDBDBDBDBDCDCDCDDDDDDDDDDDDDEDEDEDFDFDFDFDFDFE0E0E0E1E1E1E1E1E1
+      E2E2E2E3E3E3E4E4E4E5E5E5E6E6E6E6E6E6E7E7E7E8E8E8E9E9E9E9E9E9E9E9
+      E9EAEAEAEBEBEBECECECECECECECECECEDEDEDEEEEEEEFEFEFEFEFEFF0F0F0F0
+      F0F0F0F0F0F1F1F1F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F6F6F6F6F6F6F6F6F6F5F5F5
+      F6F6F6F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F6F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7BCBCBCBBBBBBBABABAB8B8B8B6B6
+      B6B5B5B5B4B4B4B2B2B2B1B1B1B0B0B0AEAEAEADADADACACACABABABAAAAAAA8
+      A8A8A7A7A7A6A6A6A4A4A4A3A3A3A1A1A1A0A0A09F9F9F9D9D9D9C9C9C9B9B9B
+      9A9A9A99999998989899A0B69BB2FA9BB2FA9AB2FA9AB2FA9AB1FA9AB1FA9AB1
+      FA99B1FA99B1FA99B1FA99B0FA99B0FA99B0FA98B0FA98B0FA98AFFA98AFFA97
+      AFFA97AFFA97AFFA97AEFA97AEFA97AEFA96AEFA96AEFA96AEFA96ADFA96ADFA
+      95ADFA95ADFA95ADFA95ADFA95ACFA94ACFA94ACFA94ACFA94ACFA94ABFA94AB
+      FA93ABFA93ABFA93ABFA93AAFA93AAFA92AAFA92AAFA92AAFA92AAFA91A9FA91
+      A9FA91A9FA91A9FA91A9FA91A9FA90A8FA90A8FA90A8FA90A8FA90A8FA8FA7FA
+      8FA7FA8FA7FA8FA7FA8FA7FA8EA7FA8EA6FA8EA6FA8EA6FA8EA6FA8EA6FA8DA6
+      FA8DA5FA8DA6F98DA6F98DA5F98EA6F98EA5F98EA6F98FA7F98FA6F98FA7F98F
+      A7F990A7F990A8F991A8F991A8F992A8F992A9F992A9F993A9F993A9F994ABFA
+      95ABF994AAF997ACF996ACF996ACF998ADF998ADF999ADF999AEF99AAEF99AAE
+      F99AAFF99CB0F89DB1F99EB2F99EB1F89FB2F8A0B3F9A0B3F8A1B4F8A2B4F8A3
+      B5F9A4B6F9A5B6F9A5B7F9A6B8F9A7B8F8A7B9F8A9BAF8AABAF8ABBBF8B0BAE0
+      B8B8B8B9B9B9BABABABBBBBBBCBCBCBEBEBEBFBFBFC0C0C0C0C0C0C1C1C1C2C2
+      C2C3C3C3C4C4C4C5C5C5C6C6C6C6C6C6C7C7C7C9C9C9CACACACACACACBCBCBCC
+      CCCCCDCDCDCECECECFCFCFCFCFCFD0D0D0D1D1D1D1D1D1D2D2D2D3D3D3D4D4D4
+      D4D4D4D5D5D5D6D6D6D6D6D6D7D7D7D8D8D8D9D9D9DADADADADADADBDBDBDCDC
+      DCDCDCDCDDDDDDDEDEDEDEDEDEDFDFDFE0E0E0E1E1E1E1E1E1E2E2E2E3E3E3E4
+      E4E4E4E4E4E5E5E5E6E6E6E6E6E6E7E7E7E8E8E8E8E8E8E9E9E9E9E9E9EAEAEA
+      EBEBEBECECECEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEFEFEFF0F0F0F0F0F0F0F0
+      F0F1F1F1F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F5
+      F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7BDBDBDBCBCBCBABABAB9B9B9B8B8B8B6B6B6
+      B5B5B5B4B4B4B2B2B2B1B1B1AFAFAFAEAEAEADADADACACACABABABAAAAAAA8A8
+      A8A7A7A7A6A6A6A5A5A5A3A3A3A1A1A1A0A0A09F9F9F9D9D9D9C9C9C9B9B9B9A
+      9A9A9999999999999AA2BD9BB2FA9BB2FA9BB2FA9BB2FA9AB2FA9AB2FA9AB2FA
+      9AB1FA9AB1FA9AB1FA99B1FA99B1FA99B0FA99B0FA99B0FA98B0FA98B0FA98B0
+      FA98AFFA98AFFA97AEFA97AFFA97AFFA97AEFA97AEFA97AEFA96AEFA96AEFA96
+      AEFA96ADFA95ADFA95ADFA95ADFA95ADFA95ACFA95ACFA94ACFA94ACFA94ACFA
+      94ACFA94ABFA93ABFA93ABFA93ABFA93ABFA93AAFA92AAFA92AAFA92AAFA92AA
+      FA92AAFA91A9FA91A9FA91A9FA91A9FA91A9FA91A9FA90A8FA90A8FA90A8FA90
+      A8FA8FA8FA8FA7FA8FA7FA8FA7FA8FA7FA8FA7FA8EA6FA8EA6FA8EA6FA8EA6FA
+      8EA6FA8EA6FA8EA6FA8FA6FA8EA6FA8FA7FA8FA7FA8FA7FA90A7FA91A8FA91A8
+      FA91A8FA92A9FA92A8FA92A9FA93AAFA94AAFA93AAFA94AAFA94ABFA95ABF996
+      ACF997ACF997ACF997ADF998ADF999AEF999AEF99AAFF99BAFF99BAFF99CB0F9
+      9DB1F99DB1F99EB2F99FB2F9A0B3F9A0B3F9A1B4F9A2B4F9A2B5F9A3B5F9A4B6
+      F9A5B7F9A5B7F9A6B8F9A7B8F8A9B9F8A9BAF8AABBF8ABBBF8B4B8C7B8B8B8B9
+      B9B9BBBBBBBCBCBCBDBDBDBEBEBEBFBFBFC0C0C0C1C1C1C2C2C2C3C3C3C3C3C3
+      C4C4C4C5C5C5C6C6C6C8C8C8C8C8C8C9C9C9CACACACBCBCBCCCCCCCCCCCCCDCD
+      CDCECECECFCFCFD0D0D0D0D0D0D2D2D2D2D2D2D3D3D3D3D3D3D4D4D4D5D5D5D5
+      D5D5D7D7D7D7D7D7D8D8D8D8D8D8D9D9D9DADADADADADADBDBDBDCDCDCDCDCDC
+      DDDDDDDEDEDEDFDFDFDFDFDFE1E1E1E1E1E1E1E1E1E2E2E2E3E3E3E4E4E4E4E4
+      E4E5E5E5E6E6E6E7E7E7E8E8E8E9E9E9EAEAEAEAEAEAEAEAEAEBEBEBECECECED
+      EDEDEDEDEDEEEEEEEEEEEEEFEFEFF0F0F0F0F0F0F1F1F1F1F1F1F2F2F2F2F2F2
+      F3F3F3F2F2F2F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7BEBEBEBDBDBDBCBCBCBBBBBBB9B9B9B8B8B8B6B6B6B5
+      B5B5B4B4B4B2B2B2B1B1B1AFAFAFAEAEAEADADADACACACABABABAAAAAAA8A8A8
+      A7A7A7A6A6A6A4A4A4A3A3A3A1A1A1A0A0A09F9F9F9D9D9D9C9C9C9B9B9B9A9A
+      9A9999999898989AA2BD9BB3FA9BB2FA9BB2FA9BB2FA9AB2FA9AB2FA9AB2FA9A
+      B1FA9AB1FA9AB1FA99B1FA99B1FA99B0FA99B0FA99B0FA98B0FA98B0FA98B0FA
+      98AFFA98AFFA97AFFA97AFFA97AFFA97AEFA97AEFA97AEFA96AEFA96AEFA96AE
+      FA96ADFA95ADFA95ADFA95ADFA95ADFA95ACFA95ACFA94ACFA94ACFA94ACFA94
+      ACFA94ABFA93ABFA93ABFA94ABFB93ABFB93AAFA93ABFB92AAFA92AAFA92AAFB
+      92AAFA92AAFB92AAFB92AAFB91A9FB91A9FA91A9FB91A9FB90A8FA90A8FA90A8
+      FB90A8FB90A8FB8FA7FA8FA8FB8FA7FA8FA7FA8FA7FB8FA7FB8EA6FA8FA7FA8E
+      A6FA8FA7FA8FA7FA90A8FA8FA7FA90A7FA8FA7FA91A8FA91A8FA92A9FA91A9FA
+      92A9FA93A9FA93A9FA93AAFA94AAFA95AAFA95ABFA95ACFA95ABF996ACF998AD
+      FA97ACF998ADFA98ADF999AEFA9AAEF99AAFF99BAFF99CB0F99CB0F99EB1FA9D
+      B1F99FB2FAA0B3FAA0B3F9A1B4F9A2B5F9A2B5F9A3B6F9A4B6F9A5B7F9A6B7F9
+      A6B8F9A8B9F9A8BAF9A9BAF9AABBF9ABBBF9AFBBE8B8B8B8B9B9B9BBBBBBBCBC
+      BCBCBCBCBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1C3C3C3C4C4C4C4C4C4C5C5C5C7
+      C7C7C8C8C8C8C8C8C9C9C9CACACACBCBCBCCCCCCCDCDCDCDCDCDCFCFCFD0D0D0
+      D0D0D0D1D1D1D2D2D2D3D3D3D4D4D4D4D4D4D5D5D5D5D5D5D6D6D6D7D7D7D8D8
+      D8D8D8D8D9D9D9D9D9D9DADADADBDBDBDBDBDBDCDCDCDDDDDDDDDDDDDEDEDEDF
+      DFDFDFDFDFE0E0E0E2E2E2E2E2E2E2E2E2E4E4E4E5E5E5E5E5E5E5E5E5E6E6E6
+      E7E7E7E7E7E7E8E8E8E9E9E9EAEAEAEAEAEAEAEAEAECECECECECECEDEDEDEDED
+      EDEEEEEEEFEFEFEFEFEFF0F0F0F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F3F3F3F3
+      F3F3F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F7F7F7
+      F6F6F6F7F7F7F7F7F7F6F6F6F7F7F7F7F7F7F6F6F6F7F7F7F6F6F6F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7BFBFBFBEBEBEBEBEBEBCBCBCBBBBBBBABABAB9B9B9B7B7B7B5B5
+      B5B4B4B4B2B2B2B1B1B1B0B0B0AEAEAEADADADACACACABABABAAAAAAA8A8A8A7
+      A7A7A6A6A6A5A5A5A3A3A3A2A2A2A0A0A09F9F9F9E9E9E9C9C9C9C9C9C9A9A9A
+      9999999999999AA2BD9CB3FB9CB3FB9BB3FB9BB3FB9BB2FB9BB2FB9BB2FB9AB2
+      FB9AB2FB9AB2FB9AB1FB9AB1FB9AB1FB99B1FB99B1FB99B0FB99B0FB98B0FB98
+      B0FB98B0FB98AFFB98AFFB98AFFB97AFFB97AFFB97AFFB97AEFB97AEFB96AEFB
+      96AEFB96AEFB96AEFB96ADFB95ADFB95ADFB95ADFB95ADFB95ACFB95ACFB94AC
+      FB94ACFB94ACFB94ABFB94ABFB93ABFB93ABFB93ABFB93ABFB92AAFB92AAFB92
+      AAFB92AAFB92AAFB92AAFB91A9FB91A9FB91A9FB91A9FB91A9FB90A8FB90A8FB
+      90A8FB90A8FB90A8FB8FA8FB8FA7FB8FA7FB8FA7FB8FA7FB8FA7FA8FA7FA8FA7
+      FA8FA7FA90A8FA91A8FA90A8FA90A8FA91A8FA92A9FA92A9FA92A9FA93AAFA94
+      AAFA93AAFA94AAFA94ABFA95ABFA95ABFA95ACFA96ACFA97ACFA98ADFA98ADFA
+      98ADFA99AEFA9AAFFA9AAFFA9BB0FA9BB0FA9CB0FA9DB1FA9EB1FA9EB2FA9FB3
+      FAA0B3FAA1B4F9A1B4F9A2B5F9A3B5F9A3B6F9A4B6F9A5B7F9A6B8F9A7B9F9A8
+      B9F9A8B9F9A9BAF9AABBF9ABBBF9B4B8C8B8B8B8BABABABBBBBBBCBCBCBDBDBD
+      BEBEBEBFBFBFC0C0C0C1C1C1C2C2C2C3C3C3C4C4C4C4C4C4C5C5C5C6C6C6C8C8
+      C8C9C9C9CACACACACACACCCCCCCDCDCDCECECECECECECFCFCFD0D0D0D1D1D1D1
+      D1D1D3D3D3D3D3D3D4D4D4D4D4D4D5D5D5D6D6D6D6D6D6D7D7D7D8D8D8D8D8D8
+      D9D9D9DADADADADADADBDBDBDCDCDCDCDCDCDDDDDDDEDEDEDEDEDEE0E0E0E0E0
+      E0E1E1E1E2E2E2E2E2E2E3E3E3E4E4E4E5E5E5E5E5E5E6E6E6E7E7E7E7E7E7E7
+      E7E7E8E8E8E9E9E9EAEAEAEAEAEAEBEBEBEBEBEBEDEDEDEDEDEDEEEEEEEEEEEE
+      EFEFEFEFEFEFF0F0F0F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F3F3F3F4F4F4F4F4
+      F4F4F4F4F4F4F4F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7
+      F7F7F6F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F6F6F6F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7
+    }
+  end
+  object Bevel2: TBevel
+    Height = 2
+    Top = 64
+    Width = 499
+    Align = alTop
+    Shape = bsTopLine
+  end
+  object Bevel3: TBevel
+    Height = 2
+    Top = 375
+    Width = 499
+    Align = alBottom
+    Shape = bsTopLine
+  end
+  object Label1: TLabel
+    Left = 8
+    Height = 16
+    Top = 80
+    Width = 317
+    Caption = 'You are about to create your RemObjects SDK Server Project'
+    ParentColor = False
+  end
+  object lbl_CreateClientAndGroup: TLabel
+    Left = 44
+    Height = 31
+    Top = 225
+    Width = 361
+    Caption = 'In addition to the Server project, RemObjects SDK will create a client project to connect to your server.'
+    ParentColor = False
+    WordWrap = True
+  end
+  object lbl_GuideWizard: TLabel
+    Left = 44
+    Height = 31
+    Top = 289
+    Width = 377
+    Caption = 'After creating your project(s), a template-specific wizard will guide you through the further steps needed to complete your application.'
+    ParentColor = False
+    WordWrap = True
+  end
+  object Label5: TLabel
+    Left = 16
+    Height = 14
+    Top = 99
+    Width = 83
+    Caption = 'Project Folder:'
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    Font.Style = [fsBold]
+    ParentColor = False
+  end
+  object Label2: TLabel
+    Left = 16
+    Height = 14
+    Top = 147
+    Width = 80
+    Caption = 'Project Name:'
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    Font.Style = [fsBold]
+    ParentColor = False
+  end
+  object Panel1: TPanel
+    Height = 41
+    Top = 377
+    Width = 499
+    Align = alBottom
+    BevelOuter = bvNone
+    ClientHeight = 41
+    ClientWidth = 499
+    TabOrder = 6
+    object btn_Ok: TBitBtn
+      Left = 340
+      Height = 25
+      Top = 8
+      Width = 75
+      Anchors = [akRight, akBottom]
+      Caption = 'OK'
+      Default = True
+      Glyph.Data = {
+        36060000424D3606000000000000360000002800000020000000100000000100
+        18000000000000060000C40E0000C40E00000000000000000000FF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FF006600006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565656565FF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FF0066001EB2311FB133006600FF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6565659A9A9A9A9A9A65
+        6565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FF00660031C24F22B7381AB02D21B437006600FF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565ABABAB9E9E9E9797979C
+        9C9C656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        00660047D36D3BCB5E25A83B0066001BA92E1DB132006600FF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FF656565BFBFBFB5B5B598989865656594
+        9494999999656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF006600
+        4FD67953DE7F31B54D006600FF00FF006600179D271EAE31006600FF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FF656565C4C4C4CACACAA5A5A5656565FF00FF65
+        65658C8C8C989898656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        00660041C563006600FF00FFFF00FFFF00FFFF00FF00660019AA2B006600FF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FF656565B5B5B5656565FF00FFFF00FFFF
+        00FFFF00FF656565939393656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FF006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF006600149D210066
+        00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565FF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FF6565658A8A8A656565FF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0066
+        00006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FF656565656565FF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FF006600006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565656565FF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      }
+      ModalResult = 1
+      NumGlyphs = 2
+      TabOrder = 0
+    end
+    object btn_Cancel: TBitBtn
+      Left = 419
+      Height = 25
+      Top = 8
+      Width = 75
+      Anchors = [akRight, akBottom]
+      Cancel = True
+      Caption = 'Cancel'
+      Glyph.Data = {
+        36060000424D3606000000000000360000002800000020000000100000000100
+        18000000000000060000C40E0000C40E00000000000000000000FF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A00009AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00009A0000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        00009A174AFD103BF400009AFF00FFFF00FFFF00FFFF00FF00009A002CF80030
+        FC00009AFF00FFFF00FFFF00FFFF00FF6B6B6BA8A8A8A0A0A06B6B6BFF00FFFF
+        00FFFF00FFFF00FF6B6B6B9A9A9A9C9C9C6B6B6BFF00FFFF00FFFF00FFFF00FF
+        00009A1A47F81A4CFF123BF100009AFF00FFFF00FF00009A012DF60132FF002A
+        F300009AFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7AAAAAA9F9F9F6B6B6BFF
+        00FFFF00FF6B6B6B9999999E9E9E9797976B6B6BFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A1C47F61B4DFF143EF400009A00009A002DF80134FF032BF20000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7ABABABA2A2A26B
+        6B6B6B6B6B9A9A9A9E9E9E9898986B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FF00009A1D48F61D50FF103DFB0431FE0132FF002CF600009AFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7ACACACA3
+        A3A39F9F9F9E9E9E9999996B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FF00009A1A48F91342FF0C3CFF0733F600009AFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7A7
+        A7A7A3A3A39C9C9C6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FF00009A214EFC1D4BFF1847FF1743F600009AFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BACACACAC
+        ACACA9A9A9A4A4A46B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FF00009A2E5BF92C5FFF224DF8204BF82355FF1B46F600009AFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BB1B1B1B3B3B3AB
+        ABABAAAAAAAFAFAFA6A6A66B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A3664FA386BFF2D59F400009A00009A224CF42558FF1D49F60000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BB6B6B6B9B9B9AEAEAE6B
+        6B6B6B6B6BA9A9A9B0B0B0A7A7A76B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        00009A4071FA4274FF325DF100009AFF00FFFF00FF00009A224DF1275AFF204C
+        F800009AFF00FFFF00FFFF00FFFF00FF6B6B6BBBBBBBBEBEBEAFAFAF6B6B6BFF
+        00FFFF00FF6B6B6BA7A7A7B1B1B1AAAAAA6B6B6BFF00FFFF00FFFF00FFFF00FF
+        00009A497AFC3B66F300009AFF00FFFF00FFFF00FFFF00FF00009A2550F42655
+        FA00009AFF00FFFF00FFFF00FFFF00FF6B6B6BC0C0C0B5B5B56B6B6BFF00FFFF
+        00FFFF00FFFF00FF6B6B6BAAAAAAAEAEAE6B6B6BFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A00009AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00009A0000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      }
+      ModalResult = 2
+      NumGlyphs = 2
+      TabOrder = 1
+    end
+  end
+  object cb_CreateClientAndGroup: TCheckBox
+    Left = 16
+    Height = 21
+    Top = 203
+    Width = 371
+    Caption = 'Also create a matching client application and a project group'
+    Checked = True
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    Font.Style = [fsBold]
+    OnClick = cb_CreateClientAndGroupClick
+    State = cbChecked
+    TabOrder = 3
+  end
+  object cb_GuideWizard: TCheckBox
+    Left = 16
+    Height = 21
+    Top = 267
+    Width = 446
+    Caption = 'Run the New Server Wizard to guide you through the setup of your project'
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    Font.Style = [fsBold]
+    TabOrder = 4
+  end
+  object btn_AdvancedOptions: TBitBtn
+    Left = 16
+    Height = 25
+    Top = 336
+    Width = 177
+    Caption = 'Advanced Project Options...'
+    Glyph.Data = {
+      36050000424D3605000000000000360400002800000010000000100000000100
+      0800000000000001000000000000000000000001000000010000FF00FF002423
+      25002D2A2A00383435003A3A3A00413B3B00413D3D003733470021346A002A3B
+      6900273F7300484343004D4948005C47420045465B005A5757005B5959005F5E
+      5E007E5F5800737373007676770089575300895754009A7E65009C7F6600AD70
+      6B00B4766D00BB7D6E0082807F0091847800AC8C6F00C4866F00CA8C7200D193
+      7300D7997400DA9D7500E7AB7900244283003B5781003B528E0041628E00787D
+      83004F7EAF004074B7003481DC007FB1CE004397E2004398E3004399E50053AC
+      EA0053AFED0062B4E000918B80008890A400D19D8000D79F8000D8A18100C1AF
+      9D00D4B79700C6B6A700EEC29800F3C99F00F6CA9D00D4C2B100D1C9B700F6CB
+      A200F8CBA100F3CFAA00E1CAB500E1CDB900E2CFBC00E7D5BD00EED5BA00F7D5
+      B200F6D5B500F3D7B800F3D9BC008FE2F000B4E5F300BCEAF300E1D4C600E7D5
+      C400EDDDC700EDDECA00F4DAC000F6DCC200EFE1CE00F0E3CB00F6E2CC00F3E6
+      CE00F6E7CE00EFE3D300F2E6D700F8EEDD00EDEDED00F7EFE300F6EBE600F8EE
+      E700F7F3EA00FAF6EE00FBF7F200FBFBFA00FBFBFC00FEFEFE00000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000015151515151515151515000000000000155146464444
+      44444715000000000000195D5C5B565352525A150000000000001A5F49424141
+      3E435A150000000000001B625A55554B4B4856150000000000001F63493E4142
+      3C3A40150000000000002064513B3F46391D341200000000000021663517171E
+      26280E0D000000060202226626261C26332609070014040601062366264F2633
+      2633260A081429060306246666264F263326332F2C145E060C0B24635F5F264D
+      2633312E2C145E060F102437373737262D4E312F25145E061414000000000000
+      002A2B2700141406141000000000000000000000000000060406
+    }
+    NumGlyphs = 0
+    OnClick = btn_AdvancedOptionsClick
+    TabOrder = 5
+  end
+  object ed_ProjectFolder: TComboBox
+    Left = 44
+    Height = 21
+    Top = 118
+    Width = 448
+    Anchors = [akTop, akLeft, akRight]
+    AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
+    ItemHeight = 13
+    OnChange = ed_ProjectFolderChange
+    TabOrder = 0
+  end
+  object btn_Browse: TBitBtn
+    Left = 596
+    Height = 25
+    Top = 116
+    Width = 75
+    Anchors = [akTop, akRight]
+    Caption = '&Browse'
+    Glyph.Data = {
+      36030000424D3603000000000000360000002800000010000000100000000100
+      18000000000000030000120B0000120B00000000000000000000FF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FF1C99CE2BA5D51C9DD10A8AC6FF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFBFA5A34D5A72FF00FFFF00FF249CCFA6EEF7
+      6CEBF85DD9F04AC7E739B8E020A0D40F91CA0F91C9FF00FFFF00FFBFA5A35766
+      831276E23C91DCFF00FF0C8CC799DDEF8BFFFF80FCFF82FBFF7FFAFF79F3FF65
+      E1F74ECEED3CBAE07591A05B66811170D833A1FF2A9AFEFF00FF1296CC59BADE
+      9FFEFF75F7FF78F6FF77F2FC89D9E087D7DE7BE2EA91BCC05168891370D531A0
+      FF319EFBFF00FFFF00FF26A5D448C1E69FEFF879F6FB87D8DCBACABCDABCA5D0
+      B59EAF9A8C817A734179AF32A3FF3DACFE1B9CD4FF00FFFF00FF27AFDE8B97A1
+      88CFE28BD1D3CBB4ADF7F0DDFFFFD8FFFFD9FAF8C5CFB08CC4A9A34DC1FC55D0
+      FB41C1E3FF00FFFF00FF25AFE1AD706B5DBCDDB5A69EF7F4EEFFFFFFFFFFE3FF
+      FFD4FFF7C1FFE6A5D8A0826FD4EB59D7FB68E2F80E90C9FF00FF26AFE1B5776D
+      A4CFD9CEB69EFFFFEAFFFFF3FFFFEAFFFFD7F7DCA9F6C986E1B89191C0C753D3
+      FB7EF3FF28AAD8FF00FF28B0E0BC7F6EFFF4EBD5BCA1FFFFDDFFFFDDFFFFE0FF
+      FACAEFBD81F4BD77E7C49A93C0C44FD3FB7DF4FF56D5EFFF00FF28AFE1C58870
+      FFFCF8CAAA99FEFFCEFFFFC9F8E1ADF0C78CF3CA96FFEBB5D5AF959AC9D37AE0
+      FE9DFBFF96F8FF23A1D328B0E1CE9173FFFAF7D8C4BDDCC59EFCE5A7FAC782FB
+      D08BFFF7E0E7DCCE8CA5AA6BC9E65FBCE060BBDE6CC4E329A1D12DB2E2D59975
+      FFF8F3FCFBFAE5D1C9E9CAA6E7C599E1C298CCB59FB18B8875E7F86DEDFE179D
+      D1FF00FFFF00FFFF00FF1FA1D9DDA077FFFBF6FFFFFFFFFFFFFFFFFEFBF4EBB4
+      8379BF7849B16F5350C0E550C4E71C9DD0FF00FFFF00FFFF00FFFF00FFE2A678
+      FFFFFFFFFFFFFFFFFFFFFFFFF8FAFCB6877AE29955FF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFE7AB79D1926DD1926DD1926DD1926DD1926DB4
+      7E6FFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+    }
+    NumGlyphs = 0
+    OnClick = btn_BrowseClick
+    TabOrder = 1
+  end
+  object ed_ProjectName: TEdit
+    Left = 44
+    Height = 21
+    Top = 166
+    Width = 448
+    Anchors = [akTop, akLeft, akRight]
+    OnChange = ed_ProjectNameChange
+    TabOrder = 2
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fNewProjectForm.lrs b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fNewProjectForm.lrs
new file mode 100644
index 0000000..087ad38
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fNewProjectForm.lrs	
@@ -0,0 +1,5159 @@
+{ This is an automatically generated lazarus resource file }
+
+LazarusResources.Add('TNewProjectForm','FORMDATA',[
+  'TPF0'#15'TNewProjectForm'#14'NewProjectForm'#4'Left'#3'R'#1#6'Height'#3#162#1
+  +#3'Top'#3#184#0#5'Width'#3#243#1#18'HorzScrollBar.Page'#3#242#1#18'VertScrol'
+  +'lBar.Page'#3#161#1#13'ActiveControl'#7#16'ed_ProjectFolder'#11'BorderIcons'
+  +#11#12'biSystemMenu'#0#11'BorderStyle'#7#8'bsDialog'#7'Caption'#6#25'New Rem'
+  +'Objects SDK Server'#12'ClientHeight'#3#162#1#11'ClientWidth'#3#243#1#21'Con'
+  +'straints.MinHeight'#3#238#0#20'Constraints.MinWidth'#3','#1#11'Font.Height'
+  +#2#245#9'Font.Name'#6#6'Tahoma'#8'Position'#7#14'poScreenCenter'#0#6'TBevel'
+  +#6'Bevel1'#4'Left'#2#4#6'Height'#2#2#3'Top'#3'&'#2#5'Width'#3#161#2#7'Anchor'
+  +'s'#11#6'akLeft'#7'akRight'#8'akBottom'#0#0#0#6'TImage'#6'Image2'#6'Height'#2
+  +'@'#5'Width'#3#243#1#5'Align'#7#5'alTop'#8'AutoSize'#9#12'Picture.Data'#10'B'
+  +'w'#1#0#7'TBitmap6w'#1#0'BM6w'#1#0#0#0#0#0'6'#0#0#0'('#0#0#0#244#1#0#0'@'#0#0
+  +#0#1#0#24#0#0#0#0#0#0'w'#1#0#192#30#0#0#192#30#0#0#0#0#0#0#0#0#0#0#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#133#132#132#132#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#132#132#132#132#132#131#131#131#131#131#131#131#131#131#131#131#131
+  +#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131
+  +#131#131#131#131#131#131#131#131#130#130#130#130#130#130#130#130#130#130#130
+  +#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130
+  +#130#130#130#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129
+  +#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129
+  +#129#128#128#128#129#129#129#129#129#129#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~'
+  +'~~~~~~~~~~~~~~~~~~~~~~~~~~}}}}}}}}}}}}||||||{{{zzzyyyyyyxxxxxxwwwvvvuuuuuut'
+  +'ttuuutttttttttj|'#195'g'#221'g'#221'h'#128#220'i'#128#221'i'#129#221'j'
+  +#129#220'j'#129#220'k'#130#220'k'#130#220'l'#130#220'l'#131#220'n'#131#214
+  +#128#132#149#135#135#135#139#139#139#141#141#141#143#143#143#144#144#144#145
+  +#145#145#146#146#146#146#146#146#146#146#146#146#146#146#145#145#145#145#145
+  +#145#144#144#144#144#144#144#144#144#144#143#143#143#143#143#143#143#143#143
+  +#143#143#143#143#143#143#144#144#144#145#145#145#145#145#145#146#146#146#146
+  +#146#146#146#146#146#148#148#148#148#148#148#149#149#149#150#150#150#150#150
+  +#150#151#151#151#151#151#151#152#152#152#154#154#154#154#154#154#154#154#154
+  +#155#155#155#156#156#156#157#157#157#157#157#157#158#158#158#159#159#159#160
+  +#160#160#160#160#160#162#162#162#162#162#162#162#162#162#163#163#163#165#165
+  +#165#165#165#165#166#166#166#167#167#167#168#168#168#168#168#168#169#169#169
+  +#169#169#169#171#171#171#172#172#172#172#172#172#174#174#174#175#175#175#176
+  +#176#176#178#178#178#179#179#179#181#181#181#182#182#182#183#183#183#185#185
+  +#185#186#186#186#187#187#187#188#188#188#189#189#189#190#190#190#191#191#191
+  +#191#191#191#192#192#192#192#192#192#193#193#193#194#194#194#194#194#194#194
+  +#194#194#194#194#194#195#195#195#195#195#195#196#196#196#196#196#196#197#197
+  +#197#197#197#197#198#198#198#198#198#198#199#199#199#199#199#199#200#200#200
+  +#200#200#200#201#201#201#202#202#202#203#203#203#203#203#203#204#204#204#204
+  +#204#204#205#205#205#206#206#206#206#206#206#207#207#207#208#208#208#209#209
+  +#209#209#209#209#210#210#210#210#210#210#210#210#210#211#211#211#211#211#211
+  +#212#212#212#212#212#212#212#212#212#212#212#212#212#212#212#212#212#212#213
+  +#213#213#213#213#213#213#213#213#213#213#213#213#213#213#214#214#214#214#214
+  +#214#214#214#214#214#214#214#214#214#214#214#214#214#215#215#215#215#215#215
+  +#215#215#215#215#215#215#215#215#215#216#216#216#216#216#216#216#216#216#216
+  +#216#216#216#216#216#216#216#216#217#217#217#217#217#217#217#217#217#217#217
+  +#217#217#217#217#217#217#217#217#217#217#218#218#218#218#218#218#218#218#218
+  +#218#218#218#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219
+  +#219#219#219#219#219#220#220#220#220#220#220#220#220#220#220#220#220#220#220
+  +#220#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221
+  +#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222#223
+  +#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#224#224
+  +#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#225#225#225
+  +#225#225#225#225#225#225#225#225#225#225#225#225#226#226#226#226#226#226#226
+  +#226#226#226#226#226#226#226#226#226#226#226#227#227#227#227#227#227#227#227
+  +#227#227#227#227#227#227#227#227#227#227#228#228#228#228#228#228#228#228#228
+  +#228#228#228#228#228#228#228#228#228#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#229#230#230#230#230#230
+  +#230#230#230#230#230#230#230#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#232#232#232#232#232#232#232#232#232#232
+  ,#232#232#232#232#232#232#232#232#232#232#232#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237
+  +#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#238#238#238#237
+  +#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245#244#244
+  +#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#134#134#134#133#133#133#133#133#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133
+  +#133#133#133#133#133#133#133#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131
+  +#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131
+  +#131#131#131#130#130#130#130#130#130#131#131#131#130#130#130#130#130#130#130
+  +#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#129#129
+  +#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129
+  +#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129
+  +#129#129#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128''
+  +#128#128#128#128#128#128''#128#128#128#128#128#128''
+  +'~~~~~~~~~~~~~~~~~~~~~~~~~~~}}}}}}}}}||||||{{{zzzzzzy'
+  +'yyyyyxxxwwwvvvvvvuuuvvvvvvuuuuuusw'#137'h'#128#221'h'#128#221'i'#129#221'i'
+  +#129#221'j'#129#221'j'#130#221'k'#130#221'j'#130#221'l'#131#221'm'#131#221'm'
+  +#131#220'n'#132#220'p'#132#215''#135#168#140#140#140#142#142#142#145#145#145
+  +#145#145#145#147#147#147#147#147#147#148#148#148#148#149#149#149#150#150#150
+  +#151#151#149#151#151#150#152#152#150#152#152#149#150#150#148#149#149#147#148
+  +#148#146#147#147#145#145#145#145#145#145#145#145#145#146#146#146#146#146#146
+  +#147#147#147#147#147#147#147#147#147#148#148#148#149#149#149#149#149#149#151
+  +#151#151#151#151#151#152#152#152#152#152#152#153#153#153#154#154#154#155#155
+  +#155#156#156#156#157#157#157#157#157#157#158#158#158#158#158#158#159#159#159
+  +#160#160#160#160#160#160#161#161#161#162#162#162#163#163#163#164#164#164#164
+  +#164#164#165#165#165#166#166#166#167#167#167#168#168#168#168#168#168#169#169
+  +#169#170#170#170#171#171#171#172#172#172#173#173#173#173#173#173#174#174#174
+  +#175#175#175#177#177#177#177#178#186#176#179#193#175#179#199#176#180#201#178
+  +#182#202#178#182#202#180#183#202#181#184#202#184#186#198#187#188#195#191#191
+  +#192#192#192#192#192#192#192#193#193#193#193#193#193#195#195#195#195#195#195
+  +#195#195#195#196#196#196#196#196#196#196#196#196#196#196#196#198#198#198#197
+  +#197#197#198#198#198#198#198#198#199#199#199#199#199#199#200#200#200#201#201
+  +#201#201#201#201#201#201#201#202#202#202#204#204#204#204#204#204#204#204#204
+  +#205#205#205#206#206#206#206#206#206#207#207#207#207#207#207#208#208#208#209
+  +#209#209#210#210#210#211#211#211#211#211#211#211#211#211#211#211#211#212#212
+  +#212#212#212#212#213#213#213#213#213#213#213#213#213#213#213#213#213#213#213
+  +#213#213#213#214#214#214#214#214#214#214#214#214#214#214#214#214#214#214#215
+  +#215#215#215#215#215#215#215#215#215#215#215#215#215#215#215#215#215#216#216
+  +#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216
+  +#216#216#216#216#216#216#217#217#217#216#216#216#216#216#216#217#217#217#217
+  +#217#217#217#217#217#217#217#217#218#218#218#217#217#217#218#218#218#218#218
+  +#218#218#218#218#218#218#218#218#218#218#219#219#219#219#219#219#219#219#219
+  +#219#219#219#220#220#220#219#219#219#220#220#220#220#220#220#220#220#220#221
+  +#221#221#220#220#220#221#221#221#222#222#222#221#221#221#222#222#222#222#222
+  +#222#221#221#221#221#221#221#222#222#222#222#222#222#222#222#222#222#222#222
+  ,#222#222#222#222#222#222#223#223#223#223#223#223#223#223#223#223#223#223#224
+  +#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#225#225
+  +#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225
+  +#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#227#227#227#227
+  +#227#227#227#227#227#227#227#227#227#227#227#227#227#227#228#228#228#228#228
+  +#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#234#234#234#233#233
+  +#233#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#244#244#244#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#134#134#134#134#134#134
+  +#134#134#134#134#134#134#134#134#134#133#133#133#133#133#133#134#134#134#134
+  +#134#134#134#134#134#133#133#133#133#133#133#133#133#133#133#133#133#133#133
+  +#133#133#133#133#133#133#133#133#133#133#132#132#132#133#133#133#133#133#133
+  +#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#132#132#132#132#132#131#131#131#131#131
+  +#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131
+  +#131#131#131#131#131#131#131#131#131#130#130#130#130#130#130#130#130#130#130
+  +#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130
+  +#130#130#130#130#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129
+  +#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129
+  +#129#129#129#129#129#129#129#129#129#129#129#129#129#129#128#128#128#128#128
+  +#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +''#128#128#128#128#128#128#128#128#128''#128#128#128#128#128#128#128
+  +#128#128''#128#128#128#128#128#128''#128#128#128#128#128#128
+  +#128#128#128#128#128#128''#128#128#128#128#128#128'~~~~~~~~~~~~}'
+  +'}}}}}|||{{{{{{zzzyyyyyyyyyxxxwwwwwwvvvvvvvvvvvvvvvn|'#176'i'#129#222'i'#128
+  +#221'j'#130#222'k'#130#221'k'#130#221'k'#130#221'l'#131#221'l'#131#222'm'#132
+  +#220'n'#132#221'n'#133#221'o'#133#221'o'#133#220#128#137#175#143#143#143#145
+  +#145#145#147#147#147#147#147#147#148#148#148#151#151#151#152#153#153#154#156
+  +#156#155#158#158#158#161#161#159#163#163#159#163#163#158#162#162#156#159#159
+  +#153#155#155#150#152#152#148#149#149#146#147#147#145#145#145#145#145#145#146
+  +#146#146#147#147#147#147#147#147#148#148#148#149#149#149#149#149#149#150#150
+  +#150#151#151#151#151#151#151#152#152#152#152#152#152#154#154#154#155#155#155
+  +#155#155#155#156#156#156#156#156#156#157#157#157#158#158#158#159#159#159#159
+  +#159#159#160#160#160#160#160#160#161#161#161#163#163#163#163#163#163#164#164
+  +#164#164#164#164#165#165#165#166#166#166#167#167#167#168#168#168#168#168#168
+  +#169#169#169#169#169#169#172#172#172#172#172#172#173#173#173#174#174#174#174
+  +#175#179#171#175#195#170#175#205#171#177#208#172#178#207#174#179#207#174#179
+  +#207#176#181#208#177#182#207#178#182#207#178#183#207#179#184#207#180#184#207
+  +#182#186#208#186#188#203#190#191#197#193#193#193#194#194#194#194#194#194#195
+  +#195#195#195#195#195#196#196#196#196#196#196#196#196#196#197#197#197#198#198
+  +#198#198#198#198#198#198#198#198#198#198#199#199#199#200#200#200#201#201#201
+  +#200#200#200#202#202#202#202#202#202#202#202#202#204#204#204#204#204#204#204
+  +#204#204#205#205#205#206#206#206#206#206#206#207#207#207#208#208#208#208#208
+  ,#208#208#208#208#209#209#209#211#211#211#211#211#211#211#211#211#211#211#211
+  +#212#212#212#212#212#212#213#213#213#213#213#213#213#213#213#213#213#213#213
+  +#213#213#213#213#213#213#213#213#214#214#214#214#214#214#214#214#214#215#215
+  +#215#215#215#215#215#215#215#215#215#215#215#215#215#215#215#215#215#215#215
+  +#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216#217#217#217#217
+  +#217#217#217#217#217#217#217#217#217#217#217#217#217#217#218#218#218#218#218
+  +#218#218#218#218#218#218#218#218#218#218#218#218#218#219#219#219#219#219#219
+  +#219#219#219#219#219#219#219#219#219#220#220#220#220#220#220#220#220#220#220
+  +#220#220#220#220#220#220#220#220#220#220#220#221#221#221#221#221#221#221#221
+  +#221#221#221#221#221#221#221#222#222#222#222#222#222#222#222#222#222#222#222
+  +#222#222#222#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223
+  +#223#223#223#223#223#224#224#224#224#224#224#224#224#224#224#224#224#224#224
+  +#224#224#224#224#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225
+  +#225#225#225#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226
+  +#226#226#227#227#227#227#227#227#227#227#227#226#226#226#227#227#227#228#228
+  +#228#227#227#227#228#228#228#227#227#227#227#227#227#229#229#229#228#228#228
+  +#228#228#228#229#229#229#228#228#228#229#229#229#228#228#228#229#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#239#239#239#238#238#238#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#242#242#242#241#241#241#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#247#247#247#246#246#246#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#135#135#135#135
+  +#135#135#135#135#135#134#134#134#134#134#134#134#134#134#134#134#134#134#134
+  +#134#134#134#134#134#134#134#134#134#134#133#133#133#133#133#133#133#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133
+  +#133#133#133#133#133#132#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131
+  +#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#130#130
+  +#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130
+  +#130#130#130#130#130#130#130#130#130#129#129#129#129#129#129#129#129#129#130
+  +#130#130#130#130#130#129#129#129#129#129#129#129#129#129#129#129#129#129#129
+  +#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#130#130#130
+  +#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128#128#128#128#128#128#128#128#128#128#129#129#129#129#129#129
+  +#128#128#128#128#128#128#129#129#129#129#129#129#129#129#129#129#129#129#129
+  +#129#129#129#129#129#129#129#129#129#129#129#128#128#128#128#128#128#128#128
+  +#128'~~~~~~~~~}}}||||||{{{{{{zzzyyyyyyxxxwwwxxxwwwwwwvvvvvvwwwwx~j'#128
+  +#215'j'#129#221'k'#130#222'k'#131#221'k'#131#221'l'#131#221'm'#132#222'n'#132
+  +#221'n'#132#221'n'#132#221'o'#133#221'o'#133#221'p'#134#220'p'#134#220'|'#138
+  +#191#145#145#145#147#147#147#148#148#148#150#151#151#152#153#153#156#158#158
+  +#160#164#164#165#171#171#169#177#177#172#181#181#172#181#181#172#180#180#167
+  +#175#175#163#169#169#158#163#163#154#157#157#150#152#152#149#150#150#148#148
+  +#148#147#147#147#148#148#148#148#148#148#149#149#149#149#149#149#150#150#150
+  ,#151#151#151#151#151#151#152#152#152#153#153#153#153#153#153#154#154#154#155
+  +#155#155#156#156#156#156#156#156#157#157#157#159#159#159#159#159#159#159#159
+  +#159#160#160#160#160#160#160#161#161#161#162#162#162#163#163#163#164#164#164
+  +#164#164#164#165#165#165#167#167#167#167#167#167#168#168#168#168#168#168#169
+  +#169#169#170#170#170#170#170#170#172#172#172#173#173#173#173#174#178#170#175
+  +#196#169#175#208#170#176#208#170#176#208#172#178#208#174#179#208#174#179#208
+  +#175#180#208#176#181#208#178#183#208#179#183#208#179#184#208#180#184#208#181
+  +#185#208#182#186#208#183#186#208#183#187#208#186#189#206#191#192#197#194#194
+  +#194#195#195#195#196#196#196#196#196#196#196#196#196#196#196#196#197#197#197
+  +#198#198#198#198#198#198#198#198#198#198#198#198#199#199#199#199#199#199#201
+  +#201#201#202#202#202#202#202#202#202#202#202#203#203#203#204#204#204#204#204
+  +#204#205#205#205#205#205#205#206#206#206#207#207#207#207#207#207#208#208#208
+  +#208#208#208#209#209#209#210#210#210#211#211#211#211#211#211#211#211#211#212
+  +#212#212#212#212#212#212#212#212#213#213#213#213#213#213#213#213#213#213#213
+  +#213#213#213#213#213#213#213#213#213#213#214#214#214#214#214#214#214#214#214
+  +#214#214#214#214#214#214#215#215#215#215#215#215#215#215#215#215#215#215#215
+  +#215#215#216#216#216#216#216#216#216#216#216#216#216#216#217#217#217#217#217
+  +#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#218#218#218
+  +#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#219
+  +#219#219#219#219#219#219#219#219#219#219#219#219#219#219#220#220#220#220#220
+  +#220#220#220#220#220#220#220#220#220#220#220#220#220#221#221#221#221#221#221
+  +#221#221#221#221#221#221#222#222#222#222#222#222#222#222#222#222#222#222#222
+  +#222#222#222#222#222#222#222#222#222#222#222#223#223#223#223#223#223#223#223
+  +#223#223#223#223#223#223#223#223#223#223#224#224#224#224#224#224#224#224#224
+  +#224#224#224#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225
+  +#225#225#225#225#225#226#226#226#226#226#226#226#226#226#226#226#226#227#227
+  +#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227
+  +#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#229#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#242#242#242#241#241#241#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#246#246#246#245#245#245#245#245
+  +#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#246
+  +#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#135#135
+  +#135#135#135#135#135#135#135#135#135#135#134#134#134#134#134#134#134#134#134
+  +#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134
+  +#134#134#134#134#134#133#133#133#133#133#133#133#133#133#133#133#133#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133
+  +#132#132#132#132#132#132#132#132#132#133#133#133#133#133#133#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#132#132#131#131#131#132#132#132#131#131#131#131#131#131#131#131#131
+  +#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#130#130#130#131
+  +#131#131#131#131#131#130#130#130#130#130#130#130#130#130#130#130#130#130#130
+  +#130#130#130#130#131#131#131#130#130#130#130#130#130#130#130#130#130#130#130
+  +#129#129#129#129#129#129#129#129#129#130#130#130#129#129#129#129#129#129#129
+  ,#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129
+  +#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129
+  +#128#128#128#129#129#129#129#129#129#130#130#130#130#130#130#129#129#129#130
+  +#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130
+  +#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#129#129#129
+  +#129#129#129#128#128#128#128#128#128'~~~~~~~~~}}}||||||{{{{{{zzzzzzyyy'
+  +'xxxxxxwwwwwwxxxwwwxxxr|'#165'k'#130#222'k'#131#222'l'#131#222'l'#131#222'l'
+  +#132#222'n'#132#222'n'#132#221'n'#133#222'o'#133#221'o'#133#221'p'#134#221'p'
+  +#134#221'p'#134#220'r'#135#220'x'#137#206#145#146#152#148#148#148#151#151#151
+  +#154#156#156#159#163#163#166#172#172#175#184#184#181#192#192#186#199#199#188
+  +#202#202#187#201#201#183#195#195#176#187#187#169#177#177#162#167#167#155#158
+  +#158#150#152#152#148#148#148#147#147#147#148#148#148#149#149#149#149#149#149
+  +#149#149#149#150#150#150#151#151#151#151#151#151#152#152#152#153#153#153#154
+  +#154#154#155#155#155#155#155#155#156#156#156#157#157#157#157#157#157#159#159
+  +#159#159#159#159#159#159#159#160#160#160#161#161#161#161#161#161#162#162#162
+  +#163#163#163#164#164#164#164#164#164#165#165#165#166#166#166#167#167#167#168
+  +#168#168#168#168#168#169#169#169#170#170#170#171#171#171#172#172#172#170#173
+  +#189#168#174#206#168#175#208#170#176#208#170#176#208#171#177#208#173#179#208
+  +#174#179#208#174#180#208#175#180#208#177#182#209#178#183#208#179#183#208#179
+  +#184#208#180#185#208#181#185#208#183#187#209#184#188#209#184#188#209#186#189
+  +#208#187#190#208#190#192#205#196#196#197#197#197#197#197#197#197#197#197#197
+  +#198#198#198#198#198#198#198#198#198#199#199#199#200#200#200#200#200#200#200
+  +#200#200#200#200#200#202#202#202#202#202#202#203#203#203#203#203#203#203#203
+  +#203#205#205#205#205#205#205#205#205#205#206#206#206#207#207#207#208#208#208
+  +#208#208#208#209#209#209#209#209#209#210#210#210#211#211#211#212#212#212#212
+  +#212#212#212#212#212#213#213#213#213#213#213#213#213#213#213#213#213#214#214
+  +#214#214#214#214#214#214#214#214#214#214#214#214#214#214#214#214#215#215#215
+  +#215#215#215#214#214#214#215#215#215#216#216#216#216#216#216#215#215#215#216
+  +#216#216#216#216#216#216#216#216#217#217#217#217#217#217#217#217#217#217#217
+  +#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217
+  +#217#217#217#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218
+  +#218#218#218#218#218#219#219#219#219#219#219#219#219#219#219#219#219#220#220
+  +#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220
+  +#221#221#221#221#221#221#221#221#221#221#221#221#222#222#222#222#222#222#222
+  +#222#222#222#222#222#222#222#222#222#222#222#222#222#222#223#223#223#223#223
+  +#223#223#223#223#223#223#223#223#223#223#223#223#223#224#224#224#224#224#224
+  +#224#224#224#224#224#224#224#224#224#224#224#224#225#225#225#225#225#225#225
+  +#225#225#225#225#225#225#225#225#226#226#226#226#226#226#226#226#226#226#226
+  +#226#226#226#226#226#226#226#226#226#226#227#227#227#227#227#227#227#227#227
+  +#227#227#227#227#227#227#228#228#228#228#228#228#228#228#228#228#228#228#228
+  +#228#228#228#228#228#229#229#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#229#229#229#229#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#231#231#231#231#231#231#231#231#231#231
+  +#231#231#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236
+  +#236#236#236#236#236#236#237#237#237#236#236#236#237#237#237#237#237#237#236
+  +#236#236#237#237#237#237#237#237#237#237#237#236#236#236#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  ,#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#136#136#136#136#136#136#135#135#135#135#135#135#136#136#136
+  +#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135
+  +#135#135#135#135#135#134#134#134#134#134#134#134#134#134#134#134#134#134#134
+  +#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134
+  +#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#133#133#133#132#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#131#131#131#131#131#131#131#131#131#131
+  +#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131
+  +#131#131#131#131#130#130#130#130#130#130#131#131#131#131#131#131#131#131#131
+  +#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130
+  +#130#130#130#130#130#130#130#130#130#130#130#130#130#130#129#129#129#129#129
+  +#129#130#130#130#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129
+  +#129#129#129#129#129#129#130#130#130#129#129#129#130#130#130#130#130#130#131
+  +#131#131#130#130#130#130#130#130#130#130#130#131#131#131#131#131#131#132#132
+  +#132#132#132#132#131#131#131#131#131#131#131#131#131#132#132#132#131#131#131
+  +#131#131#131#131#131#131#131#131#131#130#130#130#129#129#129#129#129#129#128
+  +#128#128'~~~~~~}}}}}}||||||{{{zzzzzzyyyyyyyyyxxxxxxxxxxxxxxxyyym'#130#210
+  +'l'#131#222'l'#132#222'l'#131#222'l'#132#222'm'#132#222'o'#133#222'o'#133#222
+  +'p'#134#221'p'#134#221'q'#135#221'q'#135#221'r'#135#221'r'#135#220's'#136#221
+  +'w'#138#211#141#145#161#150#151#151#155#157#157#163#167#167#172#180#180'ODkA'
+  +'3^A3^A3^A3^ZRv'#144#149#166#183#196#196#172#181#181#162#168#168#155#158#158
+  +#151#152#152#149#149#149#149#149#149#149#149#149#150#150#150#151#151#151#151
+  +#151#151#152#152#152#153#153#153#153#153#153#154#154#154#154#154#154#156#156
+  +#156#156#156#156#157#157#157#158#158#158#158#158#158#159#159#159#160#160#160
+  +#160#160#160#161#161#161#162#162#162#162#162#162#163#163#163#164#164#164#165
+  +#165#165#165#165#165#166#166#166#166#166#166#168#168#168#168#168#168#169#169
+  +#169#170#170#170#171#171#171#171#171#171#168#173#195#167#174#210#167#174#209
+  +#168#175#208#170#177#209#170#177#208#171#177#208#173#179#208#174#180#209#175
+  +#181#209#176#181#209#177#182#209#179#184#209#179#184#209#181#185#209#181#185
+  +#209#182#186#208#183#187#209#184#188#209#185#189#208#186#189#208#187#190#208
+  +#187#190#208#190#192#207#196#196#199#198#198#198#197#197#197#198#198#198#199
+  +#199#199#199#199#199#199#199#199#200#200#200#200#200#200#200#200#200#201#201
+  +#201#202#202#202#202#202#202#203#203#203#203#203#203#204#204#204#205#205#205
+  +#205#205#205#206#206#206#206#206#206#207#207#207#207#207#207#208#208#208#209
+  +#209#209#209#209#209#210#210#210#210#210#210#212#212#212#212#212#212#212#212
+  +#212#213#213#213#213#213#213#213#213#213#214#214#214#214#214#214#214#214#214
+  +#214#214#214#214#214#214#214#214#214#215#215#215#215#215#215#215#215#215#215
+  +#215#215#215#215#215#216#216#216#216#216#216#216#216#216#216#216#216#216#216
+  +#216#216#216#216#216#216#216#217#217#217#217#217#217#217#217#217#217#217#217
+  +#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#219
+  +#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219#220#220
+  +#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220#221#221#221
+  +#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#222#222#222#221
+  +#221#221#222#222#222#222#222#222#221#221#221#222#222#222#223#223#223#222#222
+  +#222#222#222#222#222#222#222#223#223#223#223#223#223#223#223#223#223#223#223
+  +#223#223#223#223#223#223#223#223#223#224#224#224#224#224#224#224#224#224#224
+  +#224#224#224#224#224#225#225#225#225#225#225#225#225#225#225#225#225#225#225
+  +#225#225#225#225#225#225#225#226#226#226#226#226#226#226#226#226#226#226#226
+  +#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227
+  +#227#227#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228
+  +#228#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239#239#239#239
+  ,#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242#241#241#241
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#244#244#244#243#243#243#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#245#245#245
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136
+  +#136#136#136#136#136#136#136#136#135#135#135#135#135#135#135#135#135#135#135
+  +#135#135#135#135#135#135#135#135#135#135#135#135#135#134#134#134#134#134#134
+  +#135#135#135#135#135#135#135#135#135#134#134#134#134#134#134#134#134#134#134
+  +#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134
+  +#134#134#134#134#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133
+  +#133#133#133#133#133#133#133#133#133#132#132#132#133#133#133#132#132#132#132
+  +#132#132#132#132#132#132#132#132#131#131#131#132#132#132#131#131#131#131#131
+  +#131#132#132#132#132#132#132#132#132#132#132#132#132#131#131#131#132#132#132
+  +#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131
+  +#131#131#131#131#131#130#130#130#130#130#130#131#131#131#130#130#130#131#131
+  +#131#130#130#130#130#130#130#130#130#130#130#130#130#129#129#129#130#130#130
+  +#130#130#130#129#129#129#129#129#129#130#130#130#130#130#130#130#130#130#129
+  +#129#129#130#130#130#131#131#131#130#130#130#131#131#131#131#131#131#131#131
+  +#131#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#133#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#132
+  +#132#132#132#132#132#131#131#131#131#131#131#130#130#130#130#130#130#129#129
+  +#129#128#128#128'~~~~~~}}}}}}|||{{{{{{zzzzzzzzzyyyyyyyyyxxxyyyzzzw}'#147
+  +'l'#132#223'm'#132#223'm'#133#222'n'#133#222'n'#133#222'o'#133#222'p'#134#222
+  +'p'#135#222'q'#135#222'q'#135#221'q'#135#221's'#136#221's'#136#222't'#137#221
+  +'t'#137#221'w'#138#216#140#147#173#156#158#158#164#169#169#174#183#183'?2`?2'
+  +'`?2`?2`?2`?2`?2`qo'#141#185#198#198#171#179#179#161#166#166#154#156#156#151
+  +#151#151#150#150#150#150#150#150#151#151#151#152#152#152#152#152#152#152#152
+  +#152#153#153#153#154#154#154#154#154#154#154#154#154#156#156#156#157#157#157
+  +#157#157#157#158#158#158#158#158#158#160#160#160#160#160#160#160#160#160#161
+  +#161#161#162#162#162#162#162#162#163#163#163#164#164#164#164#164#164#165#165
+  +#165#166#166#166#166#166#166#168#168#168#169#169#169#169#169#169#170#170#170
+  +#170#170#173#166#172#202#166#174#210#167#174#210#169#176#210#169#176#209#170
+  +#177#209#171#177#209#172#178#209#174#179#209#174#180#209#175#181#209#176#181
+  +#209#178#183#210#179#184#209#180#185#209#180#185#209#182#186#209#183#187#209
+  +#183#187#209#185#189#210#186#190#209#187#190#209#188#191#209#189#192#210#190
+  +#193#210#191#194#209#197#198#201#199#199#199#199#199#199#200#200#200#200#200
+  +#200#200#200#200#201#201#201#201#201#201#202#202#202#201#201#201#203#203#203
+  +#203#203#203#204#204#204#204#204#204#205#205#205#206#206#206#206#206#206#207
+  +#207#207#208#208#208#208#208#208#208#208#208#208#208#208#210#210#210#211#211
+  +#211#211#211#211#212#212#212#213#213#213#213#213#213#212#212#212#213#213#213
+  +#213#213#213#214#214#214#214#214#214#214#214#214#214#214#214#214#214#214#214
+  +#214#214#214#214#214#215#215#215#215#215#215#215#215#215#215#215#215#215#215
+  +#215#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216
+  +#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#218#218#218#218
+  +#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#219#219
+  +#219#219#219#219#219#219#219#219#219#219#219#219#219#220#220#220#220#220#220
+  +#220#220#220#220#220#220#220#220#220#221#221#221#221#221#221#221#221#221#221
+  +#221#221#221#221#221#221#221#221#222#222#222#222#222#222#222#222#222#222#222
+  +#222#222#222#222#222#222#222#223#223#223#223#223#223#223#223#223#223#223#223
+  +#223#223#223#223#223#223#224#224#224#224#224#224#224#224#224#224#224#224#224
+  +#224#224#224#224#224#225#225#225#225#225#225#225#225#225#225#225#225#225#225
+  +#225#225#225#225#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226
+  +#226#226#226#227#227#227#226#226#226#227#227#227#226#226#226#227#227#227#227
+  +#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#228#228
+  +#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#229#229#229
+  ,#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#233#233#233#232
+  +#232#232#233#233#233#233#233#233#233#233#233#233#233#233#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#137#137#137#137
+  +#137#137#137#137#137#137#137#137#136#136#136#137#137#137#136#136#136#136#136
+  +#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136
+  +#136#136#136#135#135#135#135#135#135#135#135#135#135#135#135#134#134#134#135
+  +#135#135#135#135#135#135#135#135#135#135#135#134#134#134#135#135#135#134#134
+  +#134#134#134#134#135#135#135#134#134#134#134#134#134#134#134#134#134#134#134
+  +#134#134#134#134#134#134#134#134#134#133#133#133#133#133#133#133#133#133#133
+  +#133#133#134#134#134#133#133#133#133#133#133#133#133#133#133#133#133#133#133
+  +#133#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#132#132#132#131#131#131#132#132#132#131
+  +#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131
+  +#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131
+  +#131#131#131#130#130#130#130#130#130#131#131#131#130#130#130#130#130#130#130
+  +#130#130#130#130#130#131#131#131#130#130#130#130#130#130#130#130#130#130#130
+  +#130#131#131#131#132#132#132#131#131#131#132#132#132#132#132#132#133#133#133
+  +#133#133#133#133#133#133#134#134#134#134#134#134#134#134#134#135#135#135#135
+  +#135#135#135#135#135#135#135#135#135#135#135#135#135#135#134#134#134#133#133
+  +#133#133#133#133#133#133#133#131#131#131#131#131#131#130#130#130#129#129#129
+  +#128#128#128'~~~}}}||||||{{{{{{zzzzzzzzzzzzyyyzzzzzzzzzq'#129#191'm'
+  +#132#223'n'#133#223'o'#134#223'o'#133#222'p'#134#223'p'#135#223'q'#135#222'q'
+  +#136#222'r'#136#222'r'#136#222's'#137#222't'#137#221't'#137#221't'#138#221'u'
+  +#138#221'x'#142#222#142#154#186#161#166#166#172#180#180'>0c>0c>0c>0c>0c>0c>0'
+  +'c>0c'#137#141#163#181#192#192#167#174#174#158#161#161#152#153#153#150#150
+  +#150#150#150#150#151#151#151#152#152#152#153#153#153#153#153#153#154#154#154
+  +#154#154#154#155#155#155#155#155#155#157#157#157#158#158#158#158#158#158#158
+  +#158#158#160#160#160#161#161#161#161#161#161#162#162#162#162#162#162#163#163
+  +#163#163#163#163#164#164#164#165#165#165#166#166#166#166#166#166#166#166#166
+  +#167#167#167#169#169#169#169#169#169#170#170#170#171#171#171#167#172#198#166
+  +#173#210#167#175#211#169#176#211#170#177#210#170#177#210#171#178#210#172#178
+  +#210#173#179#210#175#180#210#175#181#210#176#182#210#178#183#210#179#184#210
+  +#179#184#210#181#186#210#181#186#209#183#187#210#183#187#209#184#188#210#185
+  +#189#210#186#190#209#187#190#209#188#191#209#189#193#210#190#193#210#191#194
+  +#210#192#195#209#198#198#200#199#199#199#199#199#199#201#201#201#200#200#200
+  +#201#201#201#201#201#201#202#202#202#202#202#202#203#203#203#204#204#204#204
+  +#204#204#204#204#204#205#205#205#206#206#206#206#206#206#207#207#207#207#207
+  +#207#208#208#208#209#209#209#209#209#209#210#210#210#211#211#211#211#211#211
+  +#213#213#213#213#213#213#213#213#213#213#213#213#214#214#214#214#214#214#214
+  +#214#214#215#215#215#215#215#215#215#215#215#215#215#215#215#215#215#215#215
+  +#215#216#216#216#216#216#216#216#216#216#216#216#216#217#217#217#217#217#217
+  +#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#218#218#218#218
+  ,#218#218#218#218#218#218#218#218#218#218#218#219#219#219#219#219#219#219#219
+  +#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219
+  +#219#219#219#219#219#219#219#219#219#219#219#219#220#220#220#220#220#220#220
+  +#220#220#220#220#220#220#220#220#221#221#221#221#221#221#221#221#221#221#221
+  +#221#221#221#221#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222
+  +#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223
+  +#223#223#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224
+  +#224#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225
+  +#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226
+  +#226#226#227#227#227#227#227#227#227#227#227#228#228#228#228#228#228#228#228
+  +#228#228#228#228#228#228#228#228#228#228#228#228#228#229#229#229#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#231#231#231
+  +#231#231#231#231#231#231#231#231#231#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#137#137#137#137#137#137#137#137
+  +#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137#136#136#136
+  +#137#137#137#137#137#137#136#136#136#136#136#136#136#136#136#136#136#136#136
+  +#136#136#136#136#136#136#136#136#136#136#136#135#135#135#135#135#135#135#135
+  +#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#134#134#134
+  +#134#134#134#135#135#135#134#134#134#134#134#134#134#134#134#134#134#134#134
+  +#134#134#134#134#134#134#134#134#134#134#134#133#133#133#133#133#133#134#134
+  +#134#134#134#134#134#134#134#133#133#133#133#133#133#133#133#133#133#133#133
+  +#133#133#133#133#133#133#132#132#132#132#132#132#133#133#133#133#133#133#133
+  +#133#133#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#131#131#131
+  +#131#131#131#132#132#132#131#131#131#131#131#131#131#131#131#131#131#131#131
+  +#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131
+  +#131#130#130#130#131#131#131#131#131#131#131#131#131#131#131#131#132#132#132
+  +#132#132#132#133#133#133#133#133#133#133#133#133#134#134#134#134#134#134#135
+  +#135#135#136#136#136#136#136#136#137#137#137#136#136#136#137#137#137#137#137
+  +#137#137#137#137#137#137#137#136#136#136#136#136#136#136#136#136#135#135#135
+  +#135#135#135#134#134#134#133#133#133#132#132#132#131#131#131#129#129#129#128
+  +#128#128'~~~~~~}}}||||||{{{{{{zzzzzzzzzyyyzzzzzzzzzz}'#136'n'#133#223
+  +'n'#133#223'o'#134#223'p'#134#222'p'#134#223'p'#135#223'q'#136#222'r'#136#222
+  +'r'#136#222's'#137#222's'#137#222'u'#138#222'u'#139#222'v'#139#221'v'#139#221
+  +'z'#142#222#128#149#224#143#159#202#166#173#173'}}'#148#178#189#193#197#213
+  +#213#179#193#203'XQ}</e</e</eE:m'#190#204#204#174#183#183#162#166#166#155#157
+  +#157#151#151#151#152#152#152#152#152#152#152#152#152#153#153#153#154#154#154
+  +#154#154#154#155#155#155#155#155#155#157#157#157#157#157#157#158#158#158#159
+  +#159#159#159#159#159#161#161#161#160#160#160#162#162#162#162#162#162#163#163
+  +#163#162#162#162#164#164#164#165#165#165#165#165#165#165#165#165#166#166#166
+  +#166#166#166#167#167#167#169#169#169#169#169#169#170#170#170#167#171#193#166
+  ,#173#211#166#174#210#168#175#211#169#176#211#170#177#210#170#177#210#171#178
+  +#210#172#178#210#174#180#211#175#181#210#176#182#210#177#182#210#178#183#210
+  +#179#185#211#180#185#210#181#186#210#182#186#210#183#187#210#184#188#210#185
+  +#189#211#186#190#211#187#191#210#188#191#210#189#192#210#189#193#210#191#194
+  +#211#192#195#211#193#195#211#195#197#209#199#200#201#200#200#200#202#202#202
+  +#201#201#201#202#202#202#202#202#202#203#203#203#203#203#203#204#204#204#204
+  +#204#204#205#205#205#205#205#205#206#206#206#207#207#207#207#207#207#208#208
+  +#208#209#209#209#209#209#209#209#209#209#209#209#209#210#210#210#211#211#211
+  +#211#211#211#212#212#212#213#213#213#213#213#213#214#214#214#214#214#214#214
+  +#214#214#214#214#214#215#215#215#215#215#215#215#215#215#215#215#215#215#215
+  +#215#215#215#215#215#215#215#216#216#216#216#216#216#216#216#216#217#217#217
+  +#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#218
+  +#218#218#218#218#218#218#218#218#218#218#218#218#218#218#219#219#219#219#219
+  +#219#219#219#219#219#219#219#219#219#219#219#219#219#220#220#220#220#220#220
+  +#220#220#220#220#220#220#220#220#220#220#220#220#221#221#221#221#221#221#221
+  +#221#221#221#221#221#221#221#221#221#221#221#222#222#222#222#222#222#222#222
+  +#222#222#222#222#222#222#222#222#222#222#223#223#223#223#223#223#223#223#223
+  +#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223
+  +#223#223#223#223#223#224#224#224#224#224#224#224#224#224#224#224#224#224#224
+  +#224#224#224#224#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225
+  +#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#227
+  +#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#228#228
+  +#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#232#232#232#232#232#232#232#232#232#232#232#232#233#233#233#233#233#233#232
+  +#232#232#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#245#245#245#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#138#138#138#138#138
+  +#138#138#138#138#138#138#138#138#138#138#138#138#138#137#137#137#137#137#137
+  +#138#138#138#137#137#137#137#137#137#137#137#137#136#136#136#136#136#136#136
+  +#136#136#137#137#137#136#136#136#136#136#136#136#136#136#136#136#136#135#135
+  +#135#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136
+  +#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135
+  +#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#134#134
+  +#134#134#134#134#135#135#135#134#134#134#134#134#134#134#134#134#134#134#134
+  +#134#134#134#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#132#132
+  +#132#133#133#133#133#133#133#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#132#132#132#132#132#132#131#131#131#132#132#132#132#132#132#131#131
+  +#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#132#132#132
+  +#133#133#133#133#133#133#133#133#133#134#134#134#134#134#134#135#135#135#136
+  +#136#136#136#136#136#138#138#138#137#137#137#138#138#138#138#138#138#138#138
+  ,#138#139#139#139#139#139#139#139#139#139#139#139#139#138#138#138#138#138#138
+  +#137#137#137#136#136#136#136#136#136#135#135#135#134#134#134#132#132#132#131
+  +#131#131#129#129#129#129#129#129#128#128#128'~~~}}}}}}|||||||||{{{{{{{'
+  +'{{zzz{{{{{{{{{v'#129#174'o'#134#223'p'#134#223'q'#135#223'q'#136#223'r'#136
+  +#223'r'#136#223'r'#137#223's'#137#223't'#137#222't'#138#222'u'#139#222'v'#139
+  +#222'w'#140#222'w'#140#222'z'#142#223'~'#147#224#132#153#225#153#163#184#167
+  +#174#174#174#183#183#184#196#196#196#212#212#198#217#220'NEw;.g;.g;.g'#153
+  +#161#178#180#191#191#166#172#172#158#160#160#153#153#153#152#152#152#152#152
+  +#152#153#153#153#153#153#153#154#154#154#155#155#155#155#155#155#156#156#156
+  +#157#157#157#158#158#158#158#158#158#159#159#159#160#160#160#161#161#161#161
+  +#161#161#162#162#162#162#162#162#163#163#163#163#163#163#164#164#164#165#165
+  +#165#165#165#165#166#166#166#167#167#167#168#168#168#168#168#168#169#169#169
+  +#170#170#170#169#171#181#165#173#212#166#173#211#167#175#211#168#175#211#170
+  +#177#212#170#177#211#171#178#211#172#179#211#173#179#211#175#181#211#175#181
+  +#211#177#183#211#178#183#211#179#184#211#180#185#211#181#186#211#182#187#211
+  +#183#187#211#184#188#211#184#189#211#185#189#211#186#190#211#188#191#211#189
+  +#192#211#189#192#210#190#193#211#191#194#211#193#196#212#193#195#211#194#196
+  +#211#197#198#206#201#201#201#201#201#201#201#201#201#202#202#202#202#202#202
+  +#202#202#202#204#204#204#204#204#204#205#205#205#205#205#205#205#205#205#206
+  +#206#206#207#207#207#208#208#208#208#208#208#209#209#209#209#209#209#209#209
+  +#209#211#211#211#211#211#211#212#212#212#213#213#213#214#214#214#214#214#214
+  +#214#214#214#215#215#215#215#215#215#215#215#215#215#215#215#216#216#216#216
+  +#216#216#216#216#216#216#216#216#216#216#216#216#216#216#217#217#217#217#217
+  +#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#218#218#218
+  +#218#218#218#218#218#218#217#217#217#218#218#218#219#219#219#218#218#218#218
+  +#218#218#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219
+  +#219#219#219#219#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220
+  +#220#220#220#220#220#220#221#221#221#221#221#221#221#221#221#221#221#221#222
+  +#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222#223#223
+  +#223#223#223#223#223#223#223#223#223#223#223#223#223#224#224#224#224#224#224
+  +#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#225#225#225#225
+  +#225#225#225#225#225#225#225#225#225#225#225#225#225#225#226#226#226#226#226
+  +#226#226#226#226#226#226#226#226#226#226#226#226#226#227#227#227#226#226#226
+  +#227#227#227#226#226#226#226#226#226#227#227#227#227#227#227#227#227#227#227
+  +#227#227#227#227#227#227#227#227#228#228#228#228#228#228#228#228#228#228#228
+  +#228#228#228#228#228#228#228#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#229#229#229#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#235#235#235#235#235#235
+  +#234#234#234#235#235#235#234#234#234#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#239#239#239#238#238#238#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#139#139#139#139#139#139#138#138#138#138#138#138#138#138
+  +#138#138#138#138#138#138#138#138#138#138#138#138#138#138#138#138#138#138#138
+  +#138#138#138#138#138#138#137#137#137#137#137#137#137#137#137#137#137#137#137
+  ,#137#137#137#137#137#137#137#137#137#137#137#136#136#136#136#136#136#136#136
+  +#136#136#136#136#136#136#136#136#136#136#136#136#136#137#137#137#136#136#136
+  +#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136
+  +#136#136#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135
+  +#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#134#134#134
+  +#134#134#134#134#134#134#133#133#133#134#134#134#134#134#134#134#134#134#134
+  +#134#134#133#133#133#133#133#133#134#134#134#133#133#133#133#133#133#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133
+  +#133#133#133#133#133#133#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#132#132#131#131#131#132#132#132#131#131
+  +#131#131#131#131#132#132#132#132#132#132#133#133#133#134#134#134#133#133#133
+  +#135#135#135#135#135#135#135#135#135#137#137#137#138#138#138#139#139#139#139
+  +#139#139#139#139#139#140#140#140#141#141#141#140#140#140#141#141#141#141#141
+  +#141#140#140#140#140#140#140#140#140#140#139#139#139#139#139#139#138#138#138
+  +#137#137#137#136#136#136#134#134#134#133#133#133#131#131#131#130#130#130#129
+  +#129#129#129#129#129#128#128#128'~~~~~~}}}|||||||||{{{|||{{{{{{{{{|||{'
+  +#137'p'#135#224'p'#135#224'q'#135#223'r'#136#223's'#137#224's'#137#224's'#137
+  +#223't'#138#223't'#137#222'u'#138#223'v'#139#222'v'#139#222'w'#140#223'w'#140
+  +#222'y'#142#222'|'#145#223''#148#224#147#154#167#157#161#161#161#167#167#170
+  +#178#178#181#193#193#195#212#212#151#159#182'9-i9-i9-i'#129#132#162#185#197
+  +#197#170#177#177#159#162#162#154#155#155#152#152#152#153#153#153#154#154#154
+  +#155#155#155#155#155#155#156#156#156#156#156#156#157#157#157#157#157#157#159
+  +#159#159#159#159#159#160#160#160#161#161#161#162#162#162#162#162#162#162#162
+  +#162#163#163#163#163#163#163#164#164#164#165#165#165#166#166#166#166#166#166
+  +#167#167#167#168#168#168#168#168#168#169#169#169#169#169#169#170#170#170#166
+  +#173#208#166#174#212#166#174#211#168#176#212#169#176#212#170#177#212#170#178
+  +#212#171#178#211#172#179#211#174#180#211#175#181#211#176#182#211#177#183#211
+  +#178#183#211#179#184#211#179#185#211#181#186#211#182#187#211#184#188#211#184
+  +#188#211#185#189#211#186#190#212#187#191#212#188#191#211#189#193#211#189#193
+  +#211#191#194#211#192#195#212#193#196#212#194#196#212#194#197#212#195#198#212
+  +#200#200#203#202#202#202#203#203#203#203#203#203#203#203#203#203#203#203#204
+  +#204#204#205#205#205#206#206#206#206#206#206#206#206#206#208#208#208#208#208
+  +#208#208#208#208#209#209#209#210#210#210#209#209#209#209#209#209#211#211#211
+  +#211#211#211#212#212#212#213#213#213#214#214#214#214#214#214#214#214#214#215
+  +#215#215#215#215#215#215#215#215#215#215#215#216#216#216#216#216#216#216#216
+  +#216#216#216#216#216#216#216#216#216#216#217#217#217#217#217#217#217#217#217
+  +#217#217#217#217#217#217#217#217#217#218#218#218#218#218#218#218#218#218#218
+  +#218#218#218#218#218#219#219#219#219#219#219#219#219#219#219#219#219#219#219
+  +#219#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220
+  +#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221
+  +#221#221#221#221#221#221#221#221#222#222#222#221#221#221#222#222#222#222#222
+  +#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222#223#223#223
+  +#223#223#223#223#223#223#223#223#223#224#224#224#224#224#224#224#224#224#224
+  +#224#224#224#224#224#224#224#224#224#224#224#225#225#225#225#225#225#225#225
+  +#225#225#225#225#225#225#225#225#225#225#225#225#225#226#226#226#226#226#226
+  +#226#226#226#226#226#226#227#227#227#227#227#227#227#227#227#227#227#227#227
+  +#227#227#227#227#227#227#227#227#228#228#228#228#228#228#228#228#228#228#228
+  +#228#228#228#228#229#229#229#228#228#228#229#229#229#228#228#228#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#230#230#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  ,#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#139#139#139#139#139#139#139#139#139#139#139#139#139#139#139#138#138#138
+  +#139#139#139#139#139#139#139#139#139#138#138#138#139#139#139#138#138#138#138
+  +#138#138#138#138#138#137#137#137#138#138#138#137#137#137#137#137#137#137#137
+  +#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137
+  +#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137
+  +#137#137#137#137#137#136#136#136#136#136#136#136#136#136#136#136#136#136#136
+  +#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136
+  +#136#136#136#136#136#136#135#135#135#136#136#136#136#136#136#136#136#136#135
+  +#135#135#135#135#135#135#135#135#135#135#135#134#134#134#134#134#134#134#134
+  +#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134
+  +#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133
+  +#133#133#133#133#133#132#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#132#131#131#131#132#132#132#132#132#132
+  +#132#132#132#132#132#132#133#133#133#134#134#134#134#134#134#135#135#135#136
+  +#136#136#137#137#137#138#138#138#138#138#138#140#140#140#141#141#141#141#141
+  +#141#142#142#142#142#142#142#143#143#143#143#143#143#143#143#143#143#143#143
+  +#143#143#143#142#142#142#142#142#142#142#142#142#142#142#142#141#142#142#139
+  +#140#140#138#139#139#136#136#136#134#134#134#131#131#131#130#130#130#130#130
+  +#130#129#129#129#128#128#128'~~~~~~}}}}}}|||||||||{{{{{{||||||u'#131#187
+  +'q'#136#224'q'#135#224'r'#136#224'r'#137#224's'#137#224't'#138#224't'#138#224
+  +'t'#138#224'u'#138#223'u'#138#223'v'#140#223'w'#140#223'w'#140#223'x'#141#222
+  +'y'#141#222'z'#143#222'}'#145#223#147#148#148#148#150#150#152#154#154#159#164
+  +#164#170#178#178#186#199#199#194#210#214'8,l8,l8,l]Y'#137#188#202#202#172#180
+  +#180#162#165#165#156#157#157#153#153#153#154#154#154#154#154#154#156#156#156
+  +#156#156#156#157#157#157#157#157#157#158#158#158#158#158#158#159#159#159#162
+  +#162#162#162#162#162#161#161#161#162#162#162#163#163#163#163#163#163#164#164
+  +#164#164#164#164#164#164#164#165#165#165#166#166#166#166#166#166#167#167#167
+  +#168#168#168#168#168#168#169#169#169#170#170#170#169#172#187#166#174#213#166
+  +#174#213#167#175#212#168#176#212#169#176#212#170#178#213#171#178#212#173#180
+  +#212#174#180#212#175#181#212#175#181#212#177#183#212#178#184#212#179#184#212
+  +#179#185#212#181#186#213#183#188#212#184#188#212#184#188#212#185#190#212#185
+  +#190#212#186#190#212#189#192#212#189#193#212#190#194#212#191#194#212#192#195
+  +#212#193#196#212#194#197#213#196#199#213#195#198#213#196#199#213#198#201#211
+  +#202#202#202#202#202#202#203#203#203#203#203#203#203#203#203#204#204#204#205
+  +#205#205#206#206#206#206#206#206#207#207#207#207#207#207#208#208#208#209#209
+  +#209#209#209#209#210#210#210#210#210#210#210#210#210#212#212#212#213#213#213
+  +#213#213#213#214#214#214#214#214#214#215#215#215#215#215#215#216#216#216#216
+  +#216#216#216#216#216#217#217#217#217#217#217#217#217#217#217#217#217#217#217
+  +#217#217#217#217#217#217#217#217#217#217#218#218#218#218#218#218#218#218#218
+  +#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#219#219#219#219
+  +#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219#220#220
+  +#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220#221#221#221
+  +#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#222
+  +#222#222#222#222#222#222#222#222#222#222#222#223#223#223#223#223#223#223#223
+  +#223#223#223#223#223#223#223#223#223#223#223#223#223#224#224#224#224#224#224
+  +#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224
+  +#224#224#224#224#224#225#225#225#225#225#225#225#225#225#225#225#225#225#225
+  +#225#225#225#225#225#225#225#225#225#225#226#226#226#226#226#226#226#226#226
+  +#226#226#226#226#226#226#227#227#227#227#227#227#227#227#227#227#227#227#227
+  +#227#227#227#227#227#228#228#228#228#228#228#228#228#228#228#228#228#228#228
+  +#228#228#228#228#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#230#230#230#230#230#230#230#230#230#230#230#230#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  ,#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#238#238#238#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#243#243#243#242#242#242#242#242#242#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#140#140
+  +#140#140#140#140#140#140#140#140#140#140#139#139#139#139#139#139#139#139#139
+  +#139#139#139#139#139#139#139#139#139#139#139#139#139#139#139#138#138#138#138
+  +#138#138#139#139#139#139#140#140#140#141#141#140#141#141#140#141#141#140#141
+  +#141#139#140#140#139#139#139#138#138#138#138#138#138#138#138#138#138#138#138
+  +#138#138#138#138#138#138#137#137#137#139#139#139#139#140#140#139#139#139#140
+  +#141#141#141#142#142#140#141#141#140#141#141#140#141#141#139#140#140#139#139
+  +#139#138#138#138#138#138#138#139#139#139#138#139#139#139#140#140#140#142#142
+  +#142#143#143#142#143#143#143#145#145#143#145#145#142#144#144#142#143#143#141
+  +#142#142#139#141#141#137#138#138#136#137#137#136#136#136#135#135#135#135#135
+  +#135#134#134#134#136#136#136#137#137#137#136#137#137#136#137#137#136#137#137
+  +#136#136#136#135#136#136#135#135#135#134#134#134#134#134#134#133#133#133#134
+  +#134#134#134#135#135#135#136#136#135#136#136#135#136#136#135#136#136#134#135
+  +#135#133#133#133#132#132#132#132#132#132#132#132#132#132#132#132#133#133#133
+  +#134#134#134#135#136#136#136#137#137#137#138#138#138#138#138#137#138#138#139
+  +#139#139#139#139#139#139#139#139#141#141#141#142#142#142#143#143#143#144#144
+  +#144#144#144#144#145#145#145#146#146#146#146#146#146#147#148#148#148#149#149
+  +#148#149#149#148#150#150#149#150#150#150#152#152#149#152#152#148#150#150#146
+  +#149#149#144#146#146#141#143#143#138#139#139#136#137#137#133#134#134#131#132
+  +#132#129#129#129#128#128#128#128#128#128'~~~~~~|||||||||||||}}|}}y'#131
+  +#169's'#139#225't'#139#225't'#139#225'u'#139#225'u'#141#225'v'#141#225'w'#141
+  +#225'y'#144#225'z'#144#225'|'#146#225'|'#146#225'}'#147#226'}'#147#225'|'#145
+  +#224'|'#144#224'{'#144#224'|'#144#223'|'#143#218#144#144#144#146#146#146#147
+  +#147#147#153#155#155#163#169#169#178#189#189#197#213#213'6*n6*n6*n\X'#139#190
+  +#204#204#175#183#183#163#167#167#156#157#157#155#155#155#155#155#155#154#154
+  +#154#155#155#155#157#157#157#158#159#159#159#160#160#161#162#162#162#164#164
+  +#165#166#166#166#168#168#166#168#168#167#168#168#166#167#167#166#167#167#166
+  +#167#167#165#166#166#166#166#166#165#165#165#166#166#166#166#166#166#167#167
+  +#167#168#168#168#168#168#168#169#169#169#170#170#170#171#171#171#167#176#210
+  +#168#178#215#170#178#215#172#180#215#174#182#217#174#183#217#175#184#217#177
+  +#184#215#177#184#215#177#184#214#176#183#214#178#184#213#178#184#213#180#185
+  +#213#180#185#213#181#186#213#182#187#213#184#189#213#186#190#213#186#192#214
+  +#187#193#214#188#193#214#190#194#215#191#194#213#190#194#213#191#195#213#192
+  +#195#213#194#198#214#196#200#215#197#201#216#198#202#216#200#204#216#200#204
+  +#216#200#203#216#204#205#207#205#205#205#205#205#205#205#205#205#205#205#205
+  +#205#205#205#206#206#206#207#207#207#207#207#207#207#207#207#208#208#208#209
+  +#209#209#210#210#210#210#210#210#211#211#211#211#211#211#211#211#211#213#213
+  +#213#214#214#214#215#215#215#216#217#217#217#218#218#217#218#218#217#218#218
+  +#218#219#219#218#219#219#218#218#218#217#218#218#218#218#218#218#218#218#217
+  +#217#217#217#217#217#217#217#217#217#217#217#218#218#218#218#219#219#219#219
+  +#219#219#219#219#219#219#219#220#220#220#220#221#221#220#221#221#220#221#221
+  +#220#220#220#220#220#220#221#221#221#221#221#221#220#221#221#220#220#220#221
+  ,#221#221#220#220#220#221#221#221#221#221#221#221#221#221#221#221#221#221#221
+  +#221#221#221#221#221#221#221#221#221#221#221#222#222#222#222#222#222#222#222
+  +#223#223#223#223#223#223#222#223#223#222#222#222#222#222#222#223#223#223#223
+  +#223#223#223#223#223#223#223#223#223#223#223#223#224#224#224#224#224#225#225
+  +#225#225#225#225#225#225#225#225#225#225#225#226#226#225#225#225#225#225#225
+  +#225#225#225#225#225#225#225#225#225#226#226#226#226#226#226#226#226#226#226
+  +#226#226#226#226#226#226#226#226#226#226#226#227#227#227#227#227#227#227#227
+  +#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227
+  +#227#227#227#227#227#227#227#227#227#228#228#228#228#228#228#228#228#228#228
+  +#228#228#228#228#228#229#229#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#229#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#234#234#234#234#234#234#234#234#234#234#234
+  +#234#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247
+  +#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#140#140#140#141#141#141#140#140#140#140#140#140#140#140#140#140#140
+  +#140#140#140#140#140#140#140#140#140#140#140#140#140#140#140#140#140#140#140
+  +#140#140#140#140#141#141#142#143#143#144#146#146#146#149#149#147#150#150#147
+  +#150#150#145#148#148#144#146#146#141#142#142#140#141#141#139#139#139#138#138
+  +#138#138#138#138#138#138#138#138#138#138#139#140#140#140#141#141#143#145#145
+  +#146#148#148#148#151#151#148#152#152#148#152#152#147#149#149#144#147#147#142
+  +#144#144#140#141#141#140#140#140#140#141#141#141#143#143#144#146#146#147#149
+  +#149#150#154#154#152#157#157#154#160#160#155#161#161#155#161#161#154#160#160
+  +#153#158#158#150#154#154#147#150#150#144#147#147#142#143#143#139#140#140#138
+  +#138#138#137#138#138#138#139#139#138#140#140#141#143#143#142#145#145#143#146
+  +#146#143#145#145#140#143#143#138#140#140#136#137#137#135#135#135#135#135#135
+  +#135#136#136#137#138#138#139#141#141#140#142#142#141#144#144#141#144#144#140
+  +#143#143#138#140#140#136#137#137#133#134#134#133#133#133#133#133#133#134#135
+  +#135#136#137#137#138#140#140#140#143#143#141#144#144#143#145#145#142#144#144
+  +#141#143#143#140#141#141#140#140#140#141#141#141#142#142#142#144#144#144#145
+  +#145#145#146#146#146#147#147#147#148#148#148#150#150#150#151#152#152#153#155
+  +#155#156#158#158#158#161#161#160#164#164#161#166#166#162#167#167#162#168#168
+  +#162#168#168#160#166#166#157#163#163#154#160#160#149#154#154#144#148#148#141
+  +#144#144#137#139#139#134#135#135#131#131#131#129#129#129#128#128#128'~~~~'
+  +'~~}}}}}}|}}~~~~'#134#160'w'#143#227'{'#147#227'|'#148#228'|'#149#228'|'#148
+  +#228'|'#148#227'}'#149#228#128#151#228#130#153#228#133#157#229#136#159#229
+  +#137#162#230#137#161#229#137#159#229#135#157#228#132#154#226#130#151#225''
+  +#149#225#131#147#204#145#145#145#145#145#145#145#145#145#152#153#153#161#166
+  +#166#176#185#185#194#209#209'\X'#141'5)p5)p\X'#141#192#206#206#176#184#184
+  +#164#168#168#157#158#158#154#154#154#155#155#155#156#156#156#158#159#159#161
+  +#162#162#163#165#165#166#169#169#169#173#173#172#176#176#174#179#179#175#179
+  +#179#176#180#180#176#180#180#175#179#179#173#176#176#172#175#175#170#172#172
+  +#169#170#170#168#168#168#168#168#168#168#168#168#168#168#168#168#168#168#169
+  ,#169#169#170#170#170#172#172#172#174#176#184#171#181#218#174#185#219#177#187
+  +#220#179#189#220#181#192#221#183#194#222#183#193#221#183#192#220#182#191#219
+  +#181#189#217#179#187#216#179#186#215#180#186#214#180#186#213#181#186#213#182
+  +#188#214#186#191#215#188#194#216#191#196#218#192#199#219#193#200#219#194#200
+  +#219#195#201#219#195#199#217#194#199#216#194#199#216#196#200#216#198#202#217
+  +#201#206#219#203#208#221#204#210#222#206#212#223#207#212#223#208#212#222#209
+  +#212#218#209#211#211#207#208#208#207#208#208#207#208#208#206#206#206#206#206
+  +#206#207#207#207#207#207#207#208#208#208#208#208#208#209#209#209#210#210#210
+  +#211#211#211#211#211#211#211#212#212#213#213#213#214#214#214#216#217#217#217
+  +#219#219#219#221#221#220#222#222#222#223#223#223#225#225#223#225#225#222#224
+  +#224#222#224#224#221#223#223#221#222#222#220#221#221#219#220#220#219#219#219
+  +#218#219#219#218#219#219#220#220#220#220#221#221#221#222#222#222#223#223#222
+  +#224#224#222#223#223#223#224#224#223#224#224#223#224#224#223#224#224#223#224
+  +#224#222#223#223#223#223#223#222#223#223#221#222#222#222#222#222#221#222#222
+  +#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#222
+  +#223#223#223#223#223#223#224#224#224#225#225#224#225#225#225#226#226#225#226
+  +#226#224#225#225#224#224#224#223#224#224#224#224#224#224#224#224#224#224#224
+  +#225#225#225#225#225#225#226#226#226#226#227#227#227#227#227#227#228#228#226
+  +#227#227#226#227#227#226#227#227#226#226#226#225#225#225#225#225#225#225#225
+  +#225#225#225#225#225#225#225#226#226#226#226#226#226#226#226#226#226#226#226
+  +#226#226#226#226#226#226#227#227#227#227#227#227#227#227#227#227#227#227#227
+  +#227#227#227#227#227#228#228#228#228#228#228#228#228#228#228#228#228#228#228
+  +#228#228#228#228#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#234#234#234#233#233
+  +#233#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242
+  +#242#242#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#141#141#141
+  +#141#141#141#141#141#141#141#141#141#141#141#141#141#141#141#141#141#141#140
+  +#140#140#141#141#141#141#141#141#140#140#140#140#140#140#141#141#141#143#145
+  +#145#146#149#149#151#154#154#154#159#159#156#162#162#156#162#162#154#159#159
+  +#150#154#154#145#148#148#142#144#144#140#140#140#139#139#139#139#139#139#139
+  +#139#139#140#141#141#142#144#144#146#149#149#150#154#154#156#161#161#159#165
+  +#165#159#166#166#159#166#166#157#162#162#152#156#156#148#150#150#145#147#147
+  +#145#146#146#146#149#149#150#153#153#155#159#159#160#166#166#163#171#171#167
+  +#177#177#170#180#180#171#182#182#171#183#183#170#181#181#168#178#178#165#174
+  +#174#159#167#167#154#160#160#149#153#153#143#146#146#140#142#142#139#141#141
+  +#141#142#142#144#146#146#148#152#152#152#157#157#152#158#158#151#157#157#148
+  +#152#152#144#147#147#140#142#142#136#137#137#136#137#137#137#138#138#141#143
+  +#143#144#148#148#148#153#153#151#157#157#150#156#156#148#154#154#144#148#148
+  +#140#142#142#137#138#138#133#134#134#133#134#134#136#138#138#140#143#143#145
+  +#149#149#149#155#155#150#156#156#150#156#156#149#153#153#146#149#149#144#145
+  ,#145#142#143#143#142#142#142#143#143#143#144#144#144#146#146#146#147#147#147
+  +#149#150#150#152#153#153#156#157#157#159#162#162#163#168#168#167#173#173#171
+  +#178#178#175#184#184#177#187#187#179#190#190#180#191#191#180#192#192#178#190
+  +#190#175#186#186#171#181#181#166#176#176#159#167#167#153#159#159#146#151#151
+  +#141#145#145#137#139#139#133#134#134#129#130#130#128#128#128'~~~~~~}}}'
+  +''#132#148'z'#145#222''#151#230#133#157#231#136#161#231#137#162#231#138#163
+  +#231#137#163#231#138#163#231#142#167#232#146#171#233#150#176#234#153#180#235
+  +#156#182#235#156#181#235#154#179#234#151#175#233#145#168#231#141#163#229#135
+  +#157#228#137#153#207#147#148#148#146#147#147#146#146#146#150#152#152#160#164
+  +#164#174#183#183#192#206#206'ZW'#144'3(s3(sZW'#143#192#206#206#177#185#185
+  +#164#168#168#159#160#160#156#156#156#157#158#158#159#160#160#163#165#165#167
+  +#171#171#171#176#176#177#183#183#181#188#188#184#192#192#187#196#196#188#197
+  +#197#188#197#197#189#197#197#186#194#194#183#190#190#180#185#185#177#181#181
+  +#174#177#177#170#172#172#169#169#169#168#168#168#168#168#168#169#169#169#171
+  +#171#171#172#173#173#176#178#178#177#184#204#179#190#223#183#196#225#187#200
+  +#226#191#204#228#193#206#229#195#208#230#195#207#229#193#205#227#191#201#225
+  +#187#197#222#184#193#219#182#190#217#182#188#216#182#188#215#183#189#215#186
+  +#192#217#190#196#219#194#201#221#197#206#224#200#209#226#202#210#226#202#210
+  +#226#201#209#224#200#206#222#198#204#220#199#205#220#201#206#221#203#209#223
+  +#207#213#225#209#216#227#212#219#229#214#221#230#214#221#230#214#221#229#214
+  +#220#227#214#218#218#212#215#215#210#212#212#208#209#209#208#208#208#208#208
+  +#208#208#208#208#208#208#208#209#209#209#209#209#209#210#210#210#211#211#211
+  +#212#212#212#212#212#212#213#213#213#216#216#216#217#218#218#220#221#221#222
+  +#224#224#224#227#227#226#229#229#227#230#230#227#231#231#228#232#232#227#231
+  +#231#227#230#230#225#228#228#225#227#227#223#224#224#221#222#222#220#220#220
+  +#219#219#219#219#220#220#220#221#221#222#223#223#224#225#225#225#227#227#226
+  +#229#229#228#230#230#228#231#231#228#231#231#228#231#231#228#230#230#227#230
+  +#230#228#230#230#227#229#229#226#227#227#225#226#226#224#224#224#223#223#223
+  +#223#223#223#222#223#223#222#222#222#222#222#222#221#221#221#222#222#222#223
+  +#223#223#224#224#224#225#226#226#226#228#228#227#229#229#227#229#229#227#229
+  +#229#226#227#227#225#225#225#224#224#224#223#224#224#224#224#224#225#225#225
+  +#225#226#226#227#227#227#228#229#229#229#231#231#230#232#232#230#232#232#230
+  +#231#231#229#230#230#227#228#228#227#228#228#227#227#227#226#226#226#226#226
+  +#226#226#226#226#226#226#226#227#227#227#227#227#227#227#227#227#227#227#227
+  +#227#227#227#226#226#226#227#227#227#227#227#227#227#227#227#227#227#227#227
+  +#227#227#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228
+  +#228#228#228#228#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#233#233#233#233#233#233#233#233#233#233#233#233#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#245#245#245
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#247#247#247#246#246#246#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#142#142#142
+  ,#142#142#142#142#142#142#142#142#142#141#141#141#141#141#141#142#142#142#141
+  +#141#141#141#141#141#141#141#141#141#141#141#141#141#141#143#143#143#146#148
+  +#148#152#156#156#159#165#165#166#174#174#170#180#180#170#180#180#166#174#174
+  +#159#165#165#151#155#155#146#148#148#142#142#142#140#140#140#140#140#140#141
+  +#141#141#143#144#144#147#149#149#153#157#157#161#168#168#168#177#177#173#184
+  +#184#174#186#186#172#183#183#166#175#175#159#166#166#153#158#158#150#154#154
+  +#151#154#154#155#160#160#160#167#167#168#177#177#175#186#186#180#194#194#185
+  +#200#200#170#182#192#154#163#183#154#163#183#152#162#182#184#200#200#180#194
+  +#194#174#186#186#166#176#176#157#164#164#150#154#154#144#147#147#143#144#144
+  +#145#147#147#150#155#155#157#164#164#163#171#171#165#175#175#164#173#173#158
+  +#166#166#151#157#157#145#148#148#139#140#140#137#138#138#140#142#142#145#149
+  +#149#152#158#158#159#167#167#163#173#173#164#174#174#159#168#168#152#158#158
+  +#145#149#149#139#141#141#135#136#136#135#136#136#139#142#142#147#151#151#153
+  +#160#160#160#169#169#164#174#174#162#171#171#157#165#165#152#157#157#147#149
+  +#149#144#145#145#143#143#143#142#143#149#141#144#156#148#148#148#151#152#152
+  +#154#156#156#159#161#161#164#169#169#170#176#176#177#185#185#183#193#193#188
+  +#200#200#192#206#206#177#188#198#160#169#189#161#170#190'{'#166#159#169#189
+  +#157#167#187#172#185#195#185#200#200#178#192#192#169#181#181#161#171#171#154
+  +#161#161#146#151#151#140#143#143#135#137#137#132#132#132#129#129#129''
+  +'~'#129#135'z'#143#216#129#154#230#137#163#232#146#173#235#153#179#236#156
+  +#183#237#157#184#237#156#183#236#157#184#237#160#187#238#164#192#238#170#197
+  +#240#166#192#233#144#163#211#160#183#226#174#201#240#170#197#239#164#189#237
+  +#156#180#234#148#171#231#146#162#203#152#154#154#149#150#150#148#148#148#151
+  +#153#153#159#164#164#174#183#183#191#205#205'ZV'#145'2''u2''uZV'#145#193#206
+  +#206#178#186#186#166#170#170#159#160#160#158#159#159#160#161#161#165#168#168
+  +#171#175#175#178#184#184#184#192#192#190#200#200#195#207#207#198#211#211#172
+  +#181#196#164#171#191#164#171#191#182#192#202#199#211#211#195#205#205#190#199
+  +#199#185#191#191#179#183#183#174#176#176#171#172#172#169#169#169#170#170#170
+  +#172#172#172#174#175#175#178#181#181#183#187#187#185#196#221#190#204#230#196
+  +#210#232#200#215#235#204#219#236#176#187#215#168#177#208#187#198#222#205#218
+  +#235#201#214#232#196#208#228#190#199#224#187#195#220#184#191#217#184#190#217
+  +#185#192#217#191#197#221#195#203#223#202#210#227#206#217#231#210#221#233#212
+  +#223#234#211#221#233#208#218#230#206#214#227#204#211#225#204#211#224#206#212
+  +#225#210#217#229#214#222#232#217#226#234#177#182#207#168#171#200#147#147#185
+  +#179#183#207#200#206#221#221#227#228#219#223#223#215#218#218#212#214#214#211
+  +#212#212#208#209#209#208#209#209#209#209#209#209#209#209#210#210#210#210#210
+  +#210#211#211#211#212#212#212#212#213#213#213#214#214#216#217#217#219#221#221
+  +#223#226#226#226#230#230#229#233#233#231#236#236#186#188#208#187#189#209#188
+  +#189#209#188#189#209#198#200#215#232#236#236#229#233#233#227#230#230#225#227
+  +#227#223#224#224#221#222#222#221#222#222#223#224#224#225#227#227#228#230#230
+  +#230#233#233#232#236#236#233#237#237#233#238#238#233#238#238#233#238#238#233
+  +#237#237#233#237#237#232#236#236#231#235#235#230#233#233#228#231#231#227#229
+  +#229#226#227#227#224#225#225#223#224#224#223#223#223#222#222#222#222#222#222
+  +#222#223#223#225#225#225#226#227#227#228#230#230#230#233#233#231#234#234#232
+  +#234#234#231#233#233#229#230#230#227#228#228#225#226#226#225#225#225#225#225
+  +#225#226#226#226#227#228#228#229#231#231#231#233#233#232#235#235#234#237#237
+  +#233#236#236#232#235#235#230#232#232#228#230#230#228#229#229#227#227#227#226
+  +#226#226#226#226#226#226#226#226#226#226#226#227#227#227#227#227#227#227#227
+  +#227#227#227#227#227#227#227#227#227#227#227#227#227#228#228#228#228#228#228
+  +#228#228#228#228#228#228#228#228#228#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#229#229#228#228#228#229#229#229#229#229#229#229#229#229#229#229
+  +#229#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#230#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#233#233#233#233#233#233#232#232#232#232#232#232#232#232#232
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#236#236
+  +#236#236#236#236#236#236#236#236#236#236#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240
+  ,#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#143#143#143#142#142#142#142#142#142#142#142#142#142#142#142#142#142#142
+  +#142#142#142#142#142#142#142#142#142#142#142#142#142#142#142#142#142#142#145
+  +#146#146#149#152#152#158#163#163#169#178#178'QL'#138'RN'#139'RN'#139'QL'#137
+  +#168#178#178#157#163#163#148#151#151#144#145#145#141#141#141#141#141#141#143
+  +#144#144#147#149#149#154#158#158#163#171#171#174#186#186#142#149#175'TP'#141
+  +'TP'#141'SN'#140'QK'#137'eb'#144#161#167#167#157#162#162#160#166#166#166#175
+  +#175#175#186#186#184#199#199#137#144#175'_]'#150'0&w0&w0&w0&w0&w0&wB;'#131'd'
+  +'d'#151#137#143#169#151#159#169#156#162#162#149#152#152#146#149#149#150#154
+  +#154#158#165#165#146#152#168'PL'#137'QM'#138'QL'#138'}'#158#159#167#167#149
+  +#153#153#142#143#143#138#140#140#143#146#146#150#156#156#162#171#171'_]'#144
+  +'QL'#138'QM'#138'PK'#136#162#172#172#151#157#157#142#145#145#137#138#138#138
+  +#139#139#143#147#147#154#161#161#143#150#165'PK'#137'QL'#138'PL'#137'{'#158
+  +#160#168#168#151#155#155#145#147#147#132#142#175'r'#137#222'q'#137#227#128
+  +#145#199#150#155#165#161#164#164#168#173#173#177#184#184#184#195#195#192#205
+  +#205#162#170#191'kk'#158'D='#133'0&w0&w0&w0&w0&w0&w0&wC<'#132'hi'#156#154#165
+  +#186#180#196#196#169#182#182#160#169#169#150#156#156#142#146#146#136#138#138
+  +#132#133#133#129#129#129#128#128#128'~'#128#133'x'#139#210'}'#149#230#136#161
+  +#232#144#168#229'ML'#149'OO'#150'QP'#150'jq'#174#179#209#243#178#208#243#155
+  +#177#221'ch'#166'900&w0&w0&w0&wSS'#151#132#146#197#174#201#240#164#189#236
+  +#160#176#204#159#164#164#153#156#156#150#152#152#152#154#154#161#165#165#174
+  +#182#182#191#205#205'XU'#146'0&w0&wXV'#146#193#207#207#178#186#186#168#172
+  +#172#161#163#163#162#163#163#166#169#169#173#178#178#182#189#189#190#201#201
+  +#189#200#205'~'#128#170'NI'#139'0&w0&w0&w0&w0&w0&wWS'#144'||'#165#156#161#181
+  +#184#190#190#178#181#181#173#174#174#171#172#172#172#172#172#174#176#176#179
+  +#182#182#185#189#189#192#199#199#197#212#234#184#197#223#129#132#180'OJ'#142
+  +'0&w0&w0&w0&w0&wD='#134'WR'#148#195#205#227#190#199#222#186#194#219#186#193
+  +#219#189#197#220#196#204#225#204#214#230#201#211#228'pn'#165';10&w0&w0&wnk'
+  +#162#210#218#230#210#217#229#202#209#224#142#142#184'fb'#156'0&w0&w0&w0&w0&w'
+  +'0&w]W'#149#180#183#204#220#225#225#216#219#219#213#215#215#210#211#211#210
+  +#210#210#209#209#209#210#210#210#210#210#210#212#212#212#212#212#212#213#213
+  +#213#214#214#214#215#216#216#218#220#220#223#226#226#193#194#210#128'|'#170
+  +'SK'#142'0&w0&w0&w0&w0&w0&wH?'#135#141#139#180#220#224#230#229#232#232#225
+  +#227#227#223#225#225#223#224#224#224#226#226#228#230#230'up'#163'_X'#149'_Y'
+  +#150'`Y'#151'`Y'#151'`Y'#151'`Y'#151'`Y'#151'`Y'#150'xs'#166#166#165#197#212
+  +#215#226#234#238#238#232#235#235#230#232#232#228#229#229#226#227#227#225#225
+  +#225#224#224#224#223#223#223#224#224#224#225#226#226#228#229#229#231#233#233
+  +'_W'#149'_X'#149'_X'#149'_W'#149#231#234#234#228#230#230#226#227#227#226#227
+  +#227#226#227#227#228#229#229#230#232#232#233#236#236#224#226#232'`X'#150'`Y'
+  +#150'`X'#150'_X'#149'^W'#148#197#196#212#229#230#230#228#228#228#227#227#227
+  +#226#226#226#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227
+  +#227#227#227#227#227#227#227#227#228#228#228#228#228#228#228#228#228#228#228
+  +#228#228#228#228#228#228#228#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#230#230#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#235#235#235#235#235#235#235#235#235#235#235#235#236#236
+  ,#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#243#243
+  +#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#143
+  +#143#143#143#143#143#143#143#143#143#143#143#143#143#143#143#143#143#143#143
+  +#143#143#143#143#143#143#143#142#142#142#142#142#142#142#142#142#146#147#147
+  +#153#157#157#164#171#171#178#190#190'/%z/%z/%z/%z'#177#189#189#162#170#170
+  +#151#155#155#145#146#146#142#142#142#142#143#143#146#147#147#153#157#157#163
+  +#170#170#176#188#188#171#184#195'80'#128'/%z/%z/%z8/~'#166#175#180#167#174
+  +#174#166#173#173#171#180#180#180#193#193#165#176#192'KG'#140'/%z/%z/%z/%z/%z'
+  +'/%z/%z/%z/%z/%z/%zno'#153#161#168#168#152#157#157#149#153#153#154#159#159
+  +#164#173#173#145#153#174'/%z/%z/%zrt'#159#167#177#177#153#159#159#144#147#147
+  +#141#142#142#146#149#149#156#163#163#170#182#182'QN'#142'/%z/%z/%z'#172#185
+  +#185#157#165#165#145#149#149#138#139#139#139#141#141#148#153#153#160#169#169
+  +#143#151#172'/%z/%z/%zqt'#159#167#177#177#150#160#174#128#148#209's'#140#229
+  +'r'#138#228's'#141#229'x'#146#230#128#154#232#150#169#212#177#188#196#191#204
+  +#204#162#171#192'WT'#148'/%z/%z/%z/%z/%z/%z/%z/%z/%z/%z/%z/%z/%zTR'#147#152
+  +#164#186#177#192#192#164#175#175#153#161#161#144#149#149#136#138#138#132#133
+  +#133#130#130#130'u'#136#209'w'#144#228#128#153#231#143#169#234#161#189#239'/'
+  +'%z/%z/%zTT'#154#195#227#248'px'#177'/%z/%z/%z/%z/%z/%z/%z/%z/%z@;'#138#149
+  +#166#213#175#195#216#170#178#178#161#167#167#155#158#158#155#157#157#161#165
+  +#165#174#182#182#191#205#205'WU'#148'/%z/%zXU'#149#194#207#207#179#187#187
+  +#168#173#173#164#167#167#166#169#169#174#179#179#184#192#192#194#205#205#135
+  +#138#176'80'#129'/%z/%z/%z/%z/%z/%z/%z/%z/%z/%z/%z'#188#195#195#180#184#184
+  +#175#177#177#173#174#174#175#176#176#179#182#182#186#191#191#194#202#202#203
+  +#214#218''#131#181'/%z/%z/%z/%z/%z/%z/%z/%z/%z/%z'#199#209#229#192#201#224
+  +#189#197#222#190#197#222#194#203#224#203#213#230#182#189#215'90'#130'/%z/%z/'
+  +'%z/%z/%zYU'#151#213#222#233#214#221#232#174#178#206'/%z/%z/%z/%z/%z/%z/%z/%'
+  +'z/%z/%z'#159#159#191#221#226#226#216#219#219#213#215#215#211#212#212#211#211
+  +#211#211#211#211#211#211#211#213#213#213#213#213#213#214#214#214#215#215#215
+  +#218#218#218#220#222#222#225#228#228']V'#150'/%z/%z/%z/%z/%z/%z/%z/%z/%z/%zR'
+  +'K'#145#221#225#231#229#232#232#226#228#228#225#227#227#228#230#230#231#234
+  +#234'^X'#152'/%z/%z/%z/%z/%z/%z/%z/%z/%z/%z/%zkf'#161#189#190#212#234#238#238
+  +#231#234#234#228#230#230#226#227#227#225#225#225#224#224#224#225#226#226#227
+  +#228#228#230#232#232#234#237#237'/%z/%z/%z/%z'#234#237#237#231#233#233#228
+  +#229#229#227#228#228#228#229#229#230#232#232#234#237#237#225#228#234'SK'#145
+  +'/%z/%z/%z/%z'#164#162#193#232#233#233#229#230#230#228#228#228#227#227#227
+  +#227#227#227#227#227#227#227#227#227#228#228#228#228#228#228#228#228#228#228
+  +#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228
+  +#228#228#228#228#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  ,#235#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241#240#240#240
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#246#246#246
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#144
+  +#144#144#144#144#144#144#144#144#143#143#143#143#143#143#143#143#143#144#144
+  +#144#143#143#143#143#143#143#143#143#143#143#143#143#143#143#143#147#149#149
+  +#156#160#160#168#177#177#184#199#199'-#|-#|-#|-#|'#183#197#197#166#175#175
+  +#154#158#158#146#147#147#143#143#143#146#147#147#151#154#154#160#167#167#174
+  +#185#185#189#205#205'KG'#143'-#|-#|-#|7.'#130#160#170#186#176#187#187#172#181
+  +#181#175#185#185#184#197#197#139#145#179'-#|-#|-#|-#|-#|-#|A;'#137'UR'#148'U'
+  +'R'#148'-#|-#|-#|-#|no'#155#162#170#170#154#158#158#152#157#157#157#163#163
+  +#170#180#180#151#160#182'-#|-#|-#|ux'#165#172#184#184#156#163#163#146#149#149
+  +#142#143#143#148#152#152#160#168#168#176#190#190'RP'#146'-#|-#|-#|'#179#194
+  +#194#161#170#170#147#152#152#138#140#140#139#141#141#150#156#156#165#177#177
+  +#148#159#181'-#|-#|-#|ty'#167#162#185#218#137#165#234'|'#150#231'u'#142#229
+  +'t'#141#229'y'#147#230#129#155#232#140#168#235#155#183#239#161#190#236'nt'
+  +#174'-#|-#|-#|-#|-#|-#|-#|-#|-#|-#|-#|-#|-#|-#|-#|-#|-#|nr'#164#173#189#194
+  +#168#180#180#156#164#164#144#149#149#137#139#139'{'#138#193't'#140#228'x'#145
+  +#229#132#157#232#148#174#236#169#198#242'-#|-#|-#|SS'#155'fk'#171'-#|-#|-#|-'
+  +'#|-#|-#|-#|-#|-#|-#|-#|-#|'#136#147#189#183#195#195#170#178#178#160#165#165
+  +#158#161#161#163#168#168#175#184#184#191#205#205'VS'#150'-#|-#|VS'#150#194
+  +#207#207#180#188#188#170#174#174#167#171#171#172#177#177#182#190#190#195#207
+  +#207'ji'#161'-#|-#|-#|-#|-#|-#|WT'#150'WT'#150'B;'#137'-#|-#|-#|-#|'#189#196
+  +#196#182#186#186#177#179#179#176#178#178#179#181#181#185#190#190#193#201#201
+  +#194#204#209'WT'#151'-#|-#|-#|-#|-#|-#|-#|-#|-#|-#|-#|'#199#210#229#193#202
+  +#225#192#200#223#194#202#224#200#209#228#210#222#235'NH'#146'-#|-#|-#|-#|-#|'
+  +'-#|XS'#152#213#222#232#214#222#232#174#177#206'-#|-#|-#|[V'#153#137#138#184
+  +#138#139#184'\W'#154'-#|-#|-#|90'#131#215#220#225#219#223#223#215#217#217#213
+  +#214#214#211#211#211#211#211#211#211#211#211#213#213#213#213#213#213#214#214
+  +#214#215#215#215#218#219#219#221#223#223#226#229#229'[U'#152'-#|-#|-#|]X'#154
+  +#130''#177'vr'#169'E='#139'-#|-#|-#|-#|]W'#154#233#237#237#229#232#232#228
+  +#230#230#229#232#232#233#237#237']W'#154'-#|-#|-#|-#|-#|-#|-#|-#|-#|-#|-#|-#'
+  +'|-#|'#130''#177#236#240#240#232#235#235#229#231#231#227#228#228#225#226#226
+  +#226#226#226#228#229#229#231#233#233#235#239#239'-#|-#|-#|E='#139#236#240#240
+  +#232#234#234#229#231#231#230#231#231#231#233#233#234#237#237#238#242#242'wr'
+  +#170'-#|-#|-#|-#|'#165#164#197#234#237#237#231#233#233#229#230#230#228#228
+  +#228#227#227#227#227#227#227#227#227#227#228#228#228#228#228#228#228#228#228
+  +#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#229#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#230#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#232#232#232#232#232#232#232#232#232#232#232
+  +#232#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  ,#236#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#246#246#246#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#247#247#247#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#145#145#145#145#145#145#145#145#145#144#144#144#144#144#144#144
+  +#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#143#143
+  +#143#148#149#149#157#162#162#171#181#181#189#205#205',"~,"~,"~@:'#139#187#203
+  +#203#169#178#178#155#159#159#147#148#148#144#145#145#150#153#153#158#163#163
+  +#171#180#180#186#201#201'qt'#168',"~,"~,"~,"~'#149#158#186#184#197#197#178
+  +#188#188#177#187#187#184#196#196#166#178#195',"~,"~,"~,"~A:'#139#144#152#187
+  +#187#203#208#193#209#209#190#205#205#189#205#205#190#206#206#162#173#190'ru'
+  +#163'=6'#134'kk'#153#160#167#167#154#158#158#152#157#157#160#166#166#174#185
+  +#185#154#165#188',"~,"~,"~w{'#169#175#188#188#159#166#166#146#149#149#143#144
+  +#144#149#154#154#163#171#171#181#196#196'SQ'#150',"~,"~,"~'#183#200#200#164
+  +#174#174#148#154#154#138#141#141#140#143#143#152#159#159#169#181#181#152#164
+  +#187',"~,"~,"~r}'#185#161#191#240#140#168#235'~'#152#231'x'#145#229'y'#146
+  +#231#128#154#233#140#167#236#155#185#239#164#193#237'FE'#149',"~,"~,"~,"~,"~'
+  +'a`'#159#146#153#187#184#197#208#201#216#216#200#215#215#199#215#215#180#194
+  +#205#143#151#185'__'#158',"~,"~,"~,"~,"~HE'#144#175#191#196#169#182#182#154
+  +#163#163#135#153#201'{'#146#231'v'#142#229'{'#147#230#134#159#233#152#179#237
+  +#175#204#243',"~,"~,"~,"~,"~,"~,"~dj'#172#152#172#216#184#214#245#186#214#244
+  +#171#195#230#129#142#194'6.'#134',"~,"~,"~,"~'#138#145#180#181#193#193#169
+  +#176#176#163#168#168#166#171#171#175#184#184#192#206#206'US'#152',"~,"~VS'
+  +#152#194#207#207#181#190#190#173#178#178#173#178#178#180#187#187#192#203#203
+  +'hh'#162',"~,"~,"~,"~WT'#153#158#166#194#206#220#220#203#216#216#203#215#215
+  +#204#216#216#204#216#216#153#158#187'fd'#158',"~'#187#193#193#182#186#186#177
+  +#180#180#178#180#180#183#187#187#192#199#199#203#213#213'a_'#158',"~,"~,"~,"'
+  +'~XU'#156#162#171#207#203#217#235#213#228#241#212#226#240#168#176#210'jh'#168
+  +',"~'#196#207#228#194#202#226#193#201#225#197#205#227#204#215#232#161#167#204
+  +',"~,"~,"~,"~'#147#150#192#211#221#235#184#190#215#159#162#198#211#219#230
+  +#212#219#231#172#176#206',"~d_'#161#200#206#224#223#232#239#225#234#240#228
+  +#237#241#232#243#245'sq'#171',"~,"~,"~'#148#148#188#222#227#227#217#220#220
+  +#214#215#215#213#213#213#212#212#212#213#213#213#214#214#214#214#214#214#215
+  +#215#215#216#216#216#218#219#219#221#223#223#226#229#229'[T'#153'8/'#133#139
+  +#136#182#222#226#232#234#239#239#234#239#239#236#241#241#238#245#245#166#166
+  +#201',"~,"~,"~,"~'#175#176#205#231#235#235#229#232#232#230#234#234#235#239
+  +#239']W'#156',"~,"~,"~'#142#140#186#142#140#186#142#140#186#142#140#186'vr'
+  +#171'E='#141',"~,"~,"~,"~,"~PJ'#149#224#227#233#232#235#235#229#231#231#227
+  +#227#227#227#228#228#229#230#230#232#235#235#237#242#242',"~,"~,"~^W'#156#238
+  +#242#242#234#236#236#232#234#234#232#234#234#234#237#237#238#242#242'vr'#171
+  +',"~,"~,"~,"~'#166#165#200#236#239#239#233#235#235#231#232#232#229#230#230
+  +#229#229#229#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228
+  +#228#228#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#232#232#232#231#231#231#232#232#232#231#231
+  +#231#232#232#232#231#231#231#231#231#231#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  ,#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#146#146#146#145#145#145#145#145#145#145#145#145#145#145
+  +#145#145#145#145#145#145#145#145#145#145#145#145#145#144#144#144#144#144#144
+  +#144#144#144#149#151#151#159#164#164#174#184#184#192#208#208'*!'#128'*!'#128
+  +'*!'#128'SR'#153#188#204#204#170#179#179#156#161#161#149#151#151#148#150#150
+  +#155#159#159#166#175#175#181#194#194#159#171#195'*!'#128'*!'#128'*!'#128'*!'
+  +#128'z'#128#175#191#205#205#181#192#192#178#187#187#182#193#193#193#208#208
+  +'?9'#140'*!'#128'*!'#128'*!'#128'hk'#166#192#208#214#193#207#207#185#197#197
+  +#179#190#190#176#186#186#176#186#186#176#187#187#176#186#186#174#184#184#163
+  +#171#177#141#146#164#156#161#161#152#155#155#154#158#158#161#168#168#176#188
+  +#188#156#167#191'*!'#128'*!'#128'*!'#128#138#146#182#177#190#190#159#166#166
+  +#147#150#150#144#146#146#150#154#154#164#174#174#183#199#199'RQ'#152'*!'#128
+  +'*!'#128'*!'#128#186#204#204#165#177#177#149#155#155#140#142#142#140#143#143
+  +#152#159#159#171#184#184#153#166#192'*!'#128'*!'#128'*!'#128's~'#187#164#195
+  +#241#143#170#236#129#154#232'{'#148#231''#153#232#138#166#235#154#183#239
+  +#164#193#236'FE'#151'*!'#128'*!'#128'*!'#128'*!'#128'PQ'#158#177#197#221#199
+  +#213#216#194#206#206#189#200#200#186#197#197#185#195#195#184#195#195#186#197
+  +#197#188#201#201#193#209#209#180#195#207']^'#159'*!'#128'*!'#128'*!'#128'*!'
+  +#128'HE'#146#175#190#196#160#183#217#141#167#235#129#154#232'z'#146#230'}'
+  +#149#231#136#161#234#154#182#238#178#208#244'*!'#128'*!'#128'*!'#128'*!'#128
+  +'*!'#128'4-'#136#154#175#217#180#209#244#172#199#241#167#194#239#168#193#239
+  +#172#199#240#180#208#243#182#208#239'[^'#165'*!'#128'*!'#128'*!'#128'4-'#134
+  +#183#196#202#177#186#186#169#175#175#169#175#175#178#187#187#192#206#206'TR'
+  +#153'*!'#128'*!'#128'TR'#153#195#208#208#183#191#191#177#183#183#178#185#185
+  +#188#198#198#162#170#194'*!'#128'*!'#128'*!'#128'*!'#128#150#157#193#207#221
+  +#221#199#211#211#194#204#204#192#200#200#191#199#199#192#200#200#193#201#201
+  +#193#201#201#191#198#198#161#165#182#183#187#187#179#182#182#178#181#181#181
+  +#184#184#189#194#194#199#208#208#137#141#183'*!'#128'*!'#128'*!'#128'5.'#135
+  +#152#160#202#211#227#241#206#220#238#202#215#235#201#214#234#201#214#234#201
+  +#213#233#200#211#232#168#175#210#193#202#226#192#200#224#194#202#225#199#208
+  +#228#208#219#234'xy'#178'*!'#128'*!'#128'*!'#128#146#149#194#224#236#243#216
+  +#227#237#211#219#232#208#215#229#207#213#228#209#215#228#168#172#204'jh'#167
+  +#215#222#232#216#223#233#217#225#233#219#227#234#223#231#238#230#240#243#221
+  +#230#239'*!'#128'*!'#128'*!'#128'ro'#170#225#230#230#219#222#222#215#216#216
+  +#213#213#213#213#213#213#213#213#213#215#215#215#216#216#216#216#216#216#217
+  +#217#217#218#219#219#221#223#223#224#226#226'd_'#160#194#195#213#230#233#233
+  +#230#233#233#231#234#234#231#234#234#232#236#236#236#241#241#240#246#246'uq'
+  +#172'*!'#128'*!'#128'*!'#128#129'~'#179#234#238#238#232#235#235#232#236#236
+  +#236#240#240'\W'#158'*!'#128'*!'#128'*!'#128#241#247#247#240#246#246#237#242
+  +#242#236#240#240#236#240#240#238#243#243#190#193#216'OI'#150'*!'#128'*!'#128
+  +'*!'#128'*!'#128'uq'#173#236#240#240#232#235#235#229#230#230#228#229#229#229
+  +#231#231#233#236#236#238#242#242'*!'#128'*!'#128'*!'#128'\W'#158#239#243#243
+  ,#235#238#238#234#237#237#235#238#238#238#242#242#142#139#187'*!'#128'*!'#128
+  +'*!'#128'*!'#128#166#166#202#238#242#242#235#237#237#232#234#234#230#231#231
+  +#229#229#229#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#236#236#236#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#146#146#146#146#146#146#146#146#146#146#146
+  +#146#146#146#146#146#146#146#146#146#146#146#146#146#146#146#146#146#146#146
+  +#145#145#145#145#145#145#150#151#151#160#165#165#174#184#184#192#209#209'( '
+  +#131'( '#131'( '#131'RQ'#155#189#205#205#171#180#180#157#162#162#151#154#154
+  +#152#156#156#164#170#170#178#189#189#183#199#205'2+'#137'( '#131'( '#131'( '
+  +#131'\]'#161#193#208#208#181#192#192#175#184#184#177#186#186#187#199#199#140
+  +#148#185'( '#131'( '#131'( '#131']^'#162#208#227#227#195#210#210#184#195#195
+  +#176#184#184#170#178#178#167#174#174#166#172#172#166#172#172#165#171#171#163
+  +#170#170#163#168#168#157#162#162#153#156#156#150#152#152#152#156#156#161#168
+  +#168#177#189#189#156#168#192'( '#131'( '#131'( '#131#157#169#194#177#190#190
+  +#160#167#167#147#149#149#143#145#145#151#155#155#165#174#174#184#200#200'QP'
+  +#155'( '#131'( '#131'( '#131#186#204#204#165#177#177#149#155#155#139#141#141
+  +#140#143#143#151#160#169#164#187#218#148#168#216'( '#131'( '#131'( '#131'r~'
+  +#189#166#195#241#144#172#236#130#157#233#128#154#232#135#162#235#151#180#239
+  +#170#200#243'MO'#160'( '#131'( '#131'( '#131'( '#131'}'#140#196#177#208#245
+  +#163#194#242#155#182#237#163#180#212#174#181#186#174#179#179#172#177#177#171
+  +#177#177#171#177#177#173#181#181#178#188#188#183#196#196#193#210#210#142#152
+  +#189'( '#131'( '#131'( '#131'( '#131'EC'#151#171#201#243#153#180#239#138#163
+  +#234'~'#151#231''#151#231#137#162#234#154#182#238#180#209#244'( '#131'( '
+  +#131'( '#131'( '#131'( '#131#167#190#226#178#206#243#164#190#239#154#179#236
+  +#149#173#235#149#173#235#153#177#235#162#187#238#179#199#219#197#217#219'GE'
+  +#149'( '#131'( '#131'( '#131'ef'#164#185#197#197#174#183#183#172#180#180#179
+  +#189#189#193#207#207'RQ'#155'( '#131'( '#131'SQ'#156#196#209#209#185#194#194
+  +#180#188#188#185#193#193#195#207#207'SP'#155'( '#131'( '#131'( '#131#149#157
+  +#194#210#226#226#200#212#212#193#201#201#187#193#193#184#189#189#184#189#189
+  +#183#188#188#184#189#189#184#189#189#183#188#188#182#186#186#179#182#182#178
+  +#180#180#179#181#181#184#188#188#194#201#201#196#206#213'3,'#137'( '#131'( '
+  +#131'( '#131#162#172#210#209#224#240#201#214#235#194#206#231#191#202#229#190
+  +#201#227#191#200#227#192#202#227#191#201#226#191#200#225#189#197#222#189#197
+  +#222#194#202#225#201#210#230#211#222#236'VS'#159'( '#131'( '#131'( '#131#214
+  +#226#238#218#228#238#210#219#231#206#212#227#204#209#225#203#208#224#204#209
+  ,#224#195#201#219#209#214#227#210#215#228#211#217#228#213#218#229#216#222#231
+  +#221#229#235#229#238#242#221#230#239'( '#131'( '#131'( '#131'XT'#159#226#231
+  +#231#220#223#223#215#217#217#214#214#214#213#213#213#213#213#213#215#215#215
+  +#216#216#216#216#216#216#216#217#217#218#219#219#220#221#221#223#224#224#213
+  +#215#221#226#228#228#226#228#228#226#228#228#227#229#229#228#230#230#230#233
+  +#233#234#238#238#239#245#245#140#139#189'( '#131'( '#131'( '#131'ZU'#160#235
+  +#239#239#232#235#235#233#237#237#237#241#241'ZV'#160'( '#131'( '#131'( '#131
+  +#241#247#247#237#242#242#234#237#237#232#235#235#232#235#235#234#237#237#236
+  +#241#241#239#244#244'tq'#174'( '#131'( '#131'( '#131'( '#131#164#164#201#234
+  +#238#238#231#233#233#230#231#231#231#232#232#234#237#237#239#243#243'( '#131
+  +'( '#131'( '#131'[V'#160#241#245#245#238#241#241#237#241#241#239#242#242#165
+  +#165#203'( '#131'( '#131'( '#131'( '#131#141#139#189#239#242#242#235#238#238
+  +#232#234#234#230#231#231#229#229#229#229#230#230#229#229#229#229#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#230#230#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#232#232#232#232#232#232#231#231#231#231#231#231#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#235#235#235#235#235#235#235#235#235#235#235#235#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#147#147
+  +#147#147#147#147#147#147#147#146#146#146#146#146#146#147#147#147#147#147#147
+  +#146#146#146#146#146#146#146#146#146#146#146#146#146#146#146#151#152#152#161
+  +#166#166#174#184#184#193#209#209''''#31#133''''#31#133''''#31#133'QP'#157#189
+  +#205#205#171#180#180#159#164#164#155#159#159#160#165#165#173#182#182#188#203
+  +#203'[['#162''''#31#133''''#31#133''''#31#133'<8'#145#186#202#208#182#193#193
+  +#173#181#181#171#178#178#178#187#187#192#205#205'GC'#151''''#31#133''''#31
+  +#133'2+'#139#189#205#218#207#225#225#194#208#208#183#194#194#176#184#184#171
+  +#177#177#168#173#173#166#171#171#164#169#169#164#169#169#162#167#167#160#164
+  +#164#156#160#160#152#155#155#151#153#153#154#157#157#163#169#169#178#190#190
+  +#156#167#193''''#31#133''''#31#133''''#31#133#156#168#194#177#189#189#159#166
+  +#166#147#150#150#144#146#146#151#155#155#165#174#174#184#200#200'PP'#156''''
+  +#31#133''''#31#133''''#31#133#186#204#204#165#177#177#149#155#155#139#141#141
+  +#136#147#177#141#167#236#160#189#240#147#169#218''''#31#133''''#31#133''''#31
+  +#133'r~'#190#166#196#242#146#174#237#135#162#235#134#160#234#145#173#237#165
+  +#194#242'p{'#190''''#31#133''''#31#133''''#31#133''''#31#133#133#151#205#173
+  +#204#244#157#186#241#145#172#238#135#162#236#128#155#234#128#152#229#144#158
+  +#200#161#164#169#162#164#164#161#164#164#162#166#166#165#170#170#170#177#177
+  +#178#189#189#188#204#204#139#150#188''''#31#133''''#31#133''''#31#133''''#31
+  +#133'p{'#190#166#195#242#147#174#237#133#158#234#131#155#233#138#164#235#156
+  +#182#238#180#209#245''''#31#133''''#31#133''''#31#133''''#31#133'u'#129#190
+  ,#183#211#245#164#190#240#149#173#236#140#163#232#136#159#231#136#158#231#144
+  +#160#203#156#165#173#170#180#180#185#200#200#182#199#212''''#31#133''''#31
+  +#133''''#31#133'2*'#139#192#206#206#180#190#190#176#184#184#181#191#191#194
+  +#208#208'RP'#157''''#31#133''''#31#133'RQ'#157#197#210#210#187#197#197#185
+  +#193#193#190#200#200#171#182#201''''#31#133''''#31#133''''#31#133'^^'#164#215
+  +#232#232#208#223#223#198#209#209#191#199#199#186#192#192#183#188#188#182#187
+  +#187#182#186#186#181#185#185#182#186#186#182#185#185#181#184#184#179#181#181
+  +#179#181#181#182#185#185#190#195#195#200#208#208#147#152#191''''#31#133''''
+  +#31#133''''#31#133'jl'#176#210#227#241#200#213#235#191#202#229#185#195#226
+  +#183#193#224#184#192#223#185#193#223#185#194#223#185#193#223#186#194#222#186
+  +#193#221#189#196#223#194#201#226#202#211#231#213#225#237'VS'#161''''#31#133
+  +''''#31#133'?9'#147#222#234#242#213#222#234#205#212#227#200#206#223#199#204
+  +#222#200#204#222#201#206#222#204#208#223#205#210#225#207#212#225#209#214#227
+  +#212#217#229#217#223#232#223#231#237#231#240#244#148#149#196''''#31#133''''
+  +#31#133''''#31#133'|{'#180#226#230#230#220#223#223#216#217#217#214#214#214
+  +#214#214#214#214#214#214#216#216#216#217#217#217#217#217#217#217#217#217#219
+  +#219#219#219#220#220#222#223#223#223#224#224#224#225#225#224#225#225#224#225
+  +#225#225#226#226#226#228#228#229#232#232#234#238#238#239#245#245#128'}'#183
+  +''''#31#133''''#31#133''''#31#133'YU'#161#235#239#239#233#236#236#234#237#237
+  +#237#242#242'ZU'#162''''#31#133''''#31#133''''#31#133#239#244#244#234#238#238
+  +#231#233#233#229#230#230#228#229#229#230#232#232#232#235#235#235#239#239#239
+  +#244#244'sp'#176''''#31#133''''#31#133''''#31#133'4,'#140#238#242#242#233#236
+  +#236#231#233#233#231#233#233#234#237#237#239#243#243''''#31#133''''#31#133
+  +''''#31#133'ZU'#162#242#247#247#240#245#245#240#245#245#166#165#204''''#31
+  +#133''''#31#133''''#31#133''''#31#133'sp'#176#239#243#243#235#238#238#233#235
+  +#235#230#231#231#229#229#229#228#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#229#229#229#229#229#229#230#230#230#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#232#232#232#232#232#232#232#232#232#232#232#232#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247
+  +#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#148
+  +#148#148#148#148#148#148#148#148#148#148#148#147#147#147#147#147#147#147#147
+  +#147#147#147#147#147#147#147#147#147#147#147#147#147#147#147#147#151#152#152
+  +#161#166#166#175#185#185#193#209#209'%'#29#135'%'#29#135'%'#29#135'OO'#158
+  +#190#205#205#172#182#182#163#169#169#160#165#165#168#176#176#183#196#196#148
+  +#159#192'%'#29#135'%'#29#135'%'#29#135'%'#29#135#159#170#196#186#198#198#173
+  +#181#181#167#173#173#169#176#176#181#190#190#186#200#206'%'#29#135'%'#29#135
+  +'%'#29#135'gi'#171#211#230#230#209#227#227#199#213#213#189#201#201#183#193
+  ,#193#180#188#188#177#185#185#174#182#182#172#180#180#170#177#177#168#174#174
+  +#165#170#170#161#166#166#158#161#161#154#157#157#157#161#161#166#173#173#179
+  +#191#191#156#168#194'%'#29#135'%'#29#135'%'#29#135#155#167#193#176#189#189
+  +#160#166#166#148#150#150#144#146#146#151#155#155#165#175#175#184#200#200'ON'
+  +#158'%'#29#135'%'#29#135'%'#29#135#186#204#204#165#177#177#149#155#155#139
+  +#141#141#133#149#199#141#168#236#161#190#241#147#168#218'%'#29#135'%'#29#135
+  +'%'#29#135'q}'#191#167#197#243#148#175#237#139#166#236#142#169#237#156#184
+  +#240#160#186#231'/)'#142'%'#29#135'%'#29#135'%'#29#135'|'#139#199#175#205#245
+  +#157#185#240#142#168#237#130#157#234'|'#149#233'w'#145#232'u'#142#232't'#141
+  +#232'v'#142#227#137#149#195#154#156#162#155#156#156#157#159#159#159#163#163
+  +#165#171#171#174#185#185#187#204#204#130#139#186'%'#29#135'%'#29#135'%'#29
+  +#135'%'#29#135#161#186#231#158#185#240#142#167#235#136#160#234#141#166#235
+  +#157#183#240#180#209#245'%'#29#135'%'#29#135'%'#29#135'%'#29#135#184#211#240
+  +#171#197#241#152#177#236#139#162#233#132#153#231#132#148#207#137#144#163#142
+  +#144#144#149#152#152#160#166#166#176#187#187#194#211#211'eh'#170'%'#29#135'%'
+  +#29#135'%'#29#135#157#167#193#185#196#196#180#189#189#183#194#194#195#209#209
+  +'PO'#159'%'#29#135'%'#29#135'QO'#159#198#211#211#189#199#199#188#197#197#194
+  +#206#206#133#138#185'%'#29#135'%'#29#135'%'#29#135#181#194#214#215#233#233
+  +#210#225#225#202#214#214#196#205#205#193#201#201#190#197#197#189#196#196#188
+  +#194#194#187#192#192#187#193#193#186#191#191#185#189#189#183#186#186#182#185
+  +#185#186#190#190#194#200#200#205#215#215'^]'#165'%'#29#135'%'#29#135'%'#29
+  +#135#194#208#229#203#218#238#192#204#231#184#195#226#180#188#223#179#187#222
+  +#181#188#222#181#189#222#182#189#222#183#191#222#184#192#221#185#191#221#189
+  +#195#223#194#202#225#203#212#231#214#225#238'TR'#163'%'#29#135'%'#29#135'UR'
+  +#163#219#230#240#210#218#232#203#209#225#200#205#222#199#202#221#199#203#221
+  +#201#205#221#203#206#222#206#210#224#208#212#226#212#217#228#216#222#232#221
+  +#229#236#228#237#241#160#162#205'%'#29#135'%'#29#135'%'#29#135'%'#29#135#169
+  +#172#205#224#228#228#220#222#222#217#217#217#214#215#215#215#215#215#216#216
+  +#216#217#217#217#218#218#218#218#218#218#218#218#218#219#220#220#220#220#220
+  +#221#221#221#222#223#223#222#223#223#223#223#223#223#224#224#226#227#227#228
+  +#230#230#232#235#235#236#240#240#228#233#240'2+'#142'%'#29#135'%'#29#135'%'
+  +#29#135'~|'#183#235#239#239#233#236#236#234#237#237#237#242#242'XT'#163'%'#29
+  +#135'%'#29#135'%'#29#135#238#243#243#233#236#236#230#231#231#227#228#228#226
+  +#227#227#227#228#228#230#231#231#233#235#235#237#240#240#228#232#239'2+'#142
+  +'%'#29#135'%'#29#135'%'#29#135#164#164#204#235#238#238#233#235#235#233#235
+  +#235#235#238#238#239#243#243'%'#29#135'%'#29#135'%'#29#135'YT'#163#243#248
+  +#248#243#248#248#204#207#227'2+'#142'%'#29#135'%'#29#135'%'#29#135'ro'#177
+  +#239#243#243#236#238#238#233#235#235#231#232#232#230#231#231#229#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  ,#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#149#149#149#149#149#149#148#148#148
+  +#148#148#148#148#148#148#148#148#148#148#148#148#148#148#148#148#148#148#148
+  +#148#148#147#147#147#147#147#147#152#153#153#161#166#166#175#185#185#193#210
+  +#210'$'#28#138'$'#28#138'$'#28#138'ON'#160#191#207#207#176#186#186#168#176
+  +#176#169#177#177#178#190#190#184#200#206'/('#144'$'#28#138'$'#28#138'$'#28
+  +#138'w}'#179#189#203#203#175#184#184#165#170#170#163#167#167#170#175#175#182
+  +#192#192#159#168#196'$'#28#138'$'#28#138'$'#28#138'EB'#156'|'#129#184#134#141
+  +#190#162#173#201#178#190#204#195#208#208#193#205#205#190#202#202#188#200#200
+  +#185#197#197#184#194#194#180#191#191#177#186#186#172#179#179#165#172#172#160
+  +#165#165#161#166#166#168#176#176#181#193#193#156#167#195'$'#28#138'$'#28#138
+  +'$'#28#138#155#167#194#177#189#189#160#167#167#149#151#151#145#147#147#152
+  +#156#156#165#175#175#184#200#200'NM'#160'$'#28#138'$'#28#138'$'#28#138#186
+  +#204#204#165#177#177#149#154#154#139#141#141#131#151#210#142#168#236#161#190
+  +#241#147#168#219'$'#28#138'$'#28#138'$'#28#138'q}'#193#168#197#243#150#179
+  +#239#144#171#237#150#177#239#167#197#243'^e'#179'$'#28#138'$'#28#138'$'#28
+  +#138'LN'#165#180#210#246#160#188#242#142#170#238#129#156#235'{'#148#233'w'
+  +#143#233'u'#141#232't'#141#232't'#140#232't'#140#232's'#140#232'v'#141#227
+  +#135#148#193#151#153#158#153#154#154#156#160#160#163#170#170#173#187#190#181
+  +#210#239'LN'#165'$'#28#138'$'#28#138'$'#28#138'^e'#179#169#197#243#148#175
+  +#238#140#165#236#144#168#236#158#186#240#180#209#245'$'#28#138'$'#28#138'$'
+  +#28#138'LN'#166#185#213#245#163#188#240#146#169#235#135#155#221#137#143#169
+  +#139#139#139#139#139#139#142#142#142#146#148#148#156#161#161#170#178#178#188
+  +#202#202#153#165#199'$'#28#138'$'#28#138'$'#28#138'v{'#178#188#200#200#183
+  +#192#192#186#196#196#196#210#210'PN'#161'$'#28#138'$'#28#138'PN'#161#199#212
+  +#212#190#201#201#190#200#200#197#210#210'fg'#172'$'#28#138'$'#28#138'$'#28
+  +#138'hi'#174'~'#130#185#159#168#203#165#174#202#193#204#211#202#213#213#200
+  +#211#211#200#210#210#199#208#208#198#207#207#197#205#205#195#203#203#193#200
+  +#200#190#196#196#189#194#194#191#197#197#198#206#206#209#220#220';6'#150'$'
+  +#28#138'$'#28#138'GC'#156#213#228#237#198#212#235#188#200#229#182#192#225#178
+  +#187#223#180#187#222#180#187#221#181#189#222#182#189#222#183#190#221#184#191
+  +#221#186#192#221#188#196#224#195#202#227#203#212#232#215#226#238'SQ'#165'$'
+  +#28#138'$'#28#138'TQ'#165#218#229#239#210#217#232#203#209#225#200#205#223#198
+  +#202#221#199#204#221#201#206#222#204#208#223#207#212#226#212#217#228#216#222
+  +#232#222#229#237#204#211#229'b_'#172'$'#28#138'$'#28#138'$'#28#138'$'#28#138
+  +'ID'#157#228#233#233#222#226#226#219#220#220#217#217#217#215#215#215#216#216
+  +#216#217#217#217#217#217#217#218#218#218#218#218#218#218#218#218#219#219#219
+  +#221#221#221#221#222#222#223#223#223#223#224#224#224#225#225#226#228#228#229
+  +#231#231#232#235#235#236#240#240#227#232#239'KE'#159'$'#28#138'$'#28#138'$'
+  +#28#138'$'#28#138#175#176#210#234#237#237#232#235#235#234#237#237#237#242#242
+  +'WS'#165'$'#28#138'$'#28#138'$'#28#138#239#243#243#234#236#236#230#231#231
+  +#227#228#228#226#226#226#227#227#227#228#228#228#230#232#232#234#236#236#238
+  +#242#242#139#138#192'$'#28#138'$'#28#138'$'#28#138'ea'#172#237#240#240#234
+  +#236#236#234#236#236#235#238#238#240#244#244'$'#28#138'$'#28#138'$'#28#138'X'
+  +'S'#166#243#248#248#204#207#227'1*'#145'$'#28#138'$'#28#138'$'#28#138'KE'#158
+  +#240#244#244#237#239#239#234#235#235#232#232#232#230#231#231#230#231#231#229
+  +#229#229#229#229#229#230#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#230#230#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  ,#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#241#241#241#240#240#240#240#240#240#241#241#241
+  +#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#246#246
+  +#246#247#247#247#247#247#247#247#247#247#247#247#247#149#149#149#149#149#149
+  +#149#149#149#149#149#149#149#149#149#149#149#149#149#149#149#149#149#149#149
+  +#149#149#149#149#149#148#148#148#148#148#148#153#154#154#162#167#167#176#186
+  +#186#194#210#210'"'#27#140'"'#27#140'"'#27#140'MM'#162#196#214#214#183#196
+  +#196#177#188#188#180#192#192#191#206#206'XY'#167'"'#27#140'"'#27#140'"'#27
+  +#140'MM'#162#192#208#208#178#188#188#166#172#172#159#162#162#161#165#165#169
+  +#175#175#183#194#194#160#170#198'"'#27#140'"'#27#140'"'#27#140'"'#27#140'"'
+  +#27#140'"'#27#140'"'#27#140'"'#27#140'"'#27#140'73'#150'LK'#160'ln'#174'uy'
+  +#178#147#156#192#155#165#193#191#206#206#186#198#198#178#188#188#169#177#177
+  +#166#173#173#170#179#179#183#195#195#156#168#196'"'#27#140'"'#27#140'"'#27
+  +#140#155#167#195#178#190#190#160#167#167#148#151#151#145#147#147#153#157#157
+  +#166#175#175#185#201#201'LM'#161'"'#27#140'"'#27#140'"'#27#140#186#204#204
+  +#165#176#176#149#154#154#138#140#140#131#152#217#143#169#236#162#191#241#147
+  +#168#220'"'#27#140'"'#27#140'"'#27#140'p|'#194#169#198#243#153#181#240#150
+  +#177#239#157#186#241#167#196#238'"'#27#140'"'#27#140'"'#27#140'"'#27#140#150
+  +#172#221#167#197#243#147#175#239#132#158#235'{'#149#233'w'#143#232'u'#141#232
+  +'t'#141#232't'#141#232't'#141#233't'#141#233'u'#141#232't'#141#232't'#141#232
+  +'w'#142#227#134#147#191#151#152#152#151#159#174#150#174#226#166#196#243#169
+  +#195#234'"'#27#140'"'#27#140'"'#27#140'"'#27#140#170#197#238#156#184#240#146
+  +#171#237#147#172#237#159#186#240#180#209#245'"'#27#140'"'#27#140'"'#27#140't'
+  +''#194#180#209#245#159#183#235#148#160#186#143#145#145#139#139#139#140#140
+  +#140#141#141#141#142#142#142#147#147#147#154#157#157#168#175#175#185#198#198
+  +#161#175#203'"'#27#140'"'#27#140'"'#27#140'w|'#181#191#204#204#184#194#194
+  +#187#197#197#197#210#210'NN'#162'"'#27#140'"'#27#140'ON'#163#200#213#213#192
+  +#203#203#192#202#202#200#213#213'ON'#163'"'#27#140'"'#27#140'"'#27#140'"'#27
+  +#140'"'#27#140'"'#27#140'"'#27#140'"'#27#140'"'#27#140'NM'#161'NL'#161'z}'
+  +#182#133#136#187#165#173#202#185#195#209#205#215#215#201#209#209#198#206#206
+  +#198#205#205#202#211#211#212#224#224'"'#27#140'"'#27#140'"'#27#140'QO'#164
+  +#213#225#230#197#210#235#187#198#229#182#191#225#179#188#222#180#187#222#180
+  +#188#222#182#189#223#183#190#222#184#191#222#185#191#222#186#193#222#189#196
+  +#223#195#203#227#204#214#232#215#226#239'RP'#167'"'#27#140'"'#27#140'RP'#167
+  +#219#229#239#210#217#232#204#209#226#200#204#223#198#202#221#200#204#222#202
+  +#207#223#207#211#226#210#216#228#217#224#233#223#231#238#143#145#198'.)'#147
+  +'"'#27#140'"'#27#140'"'#27#140'"'#27#140'/)'#146#193#197#218#225#229#229#221
+  +#223#223#218#219#219#216#217#217#216#216#216#216#216#216#218#218#218#219#219
+  +#219#219#219#219#219#219#219#219#219#219#220#220#220#222#222#222#222#223#223
+  +#224#225#225#225#226#226#227#228#228#229#232#232#233#236#236#237#241#241#188
+  +#191#220'<7'#153'"'#27#140'"'#27#140'"'#27#140'"'#27#140'ID'#160#236#240#240
+  +#233#235#235#232#234#234#233#236#236#238#242#242'VR'#167'"'#27#140'"'#27#140
+  +'"'#27#140#239#243#243#234#236#236#230#231#231#227#228#228#226#226#226#227
+  +#227#227#228#228#228#230#230#230#233#234#234#237#240#240#216#219#234'"'#27
+  +#140'"'#27#140'"'#27#140'<7'#154#238#242#242#235#238#238#234#237#237#236#239
+  +#239#240#244#244'"'#27#140'"'#27#140'"'#27#140'VR'#167#230#234#241'<7'#154'"'
+  +#27#140'"'#27#140'"'#27#140'IE'#160#227#231#238#237#240#240#234#236#236#232
+  +#233#233#231#232#232#231#231#231#230#230#230#230#230#230#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#232#232#232#232
+  ,#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245
+  +#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#150#150#150#150#150#150#150#150#150#150#150#150#149
+  +#149#149#150#150#150#150#150#150#149#149#149#149#149#149#149#149#149#149#149
+  +#149#148#148#148#153#154#154#162#167#167#177#186#186#194#210#210'!'#26#142'!'
+  +#26#142'!'#26#142'LL'#163#205#226#226#194#211#211#190#206#206#195#211#211#150
+  +#163#199'!'#26#142'!'#26#142'!'#26#142','''#147#188#204#211#182#194#194#168
+  +#175#175#155#164#180#152#157#166#159#161#161#169#175#175#183#194#194#160#170
+  +#199'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'
+  +#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142
+  +'!'#26#142'!'#26#142'IG'#158#152#159#181#174#183#183#174#184#184#184#197#197
+  +#157#168#197'!'#26#142'!'#26#142'!'#26#142#156#168#197#179#191#191#162#169
+  +#169#149#152#152#146#148#148#153#158#158#166#176#176#185#201#201'LL'#163'!'
+  +#26#142'!'#26#142'!'#26#142#187#205#205#166#177#177#149#154#154#138#140#140
+  +#130#155#234#143#170#237#163#192#242#147#168#221'!'#26#142'!'#26#142'!'#26
+  +#142'p{'#195#170#199#243#156#184#240#154#183#240#166#194#243#128#144#207'!'
+  +#26#142'!'#26#142'!'#26#142'JL'#169#178#209#246#156#185#241#138#165#237''
+  +#152#235'y'#145#234'u'#142#233'u'#142#233'u'#142#233'u'#142#233'u'#142#233'u'
+  +#142#233'u'#142#233'u'#142#233'v'#142#233'v'#142#233'v'#142#233'}'#146#223
+  +#129#152#230#138#164#236#156#184#241#178#208#246'TY'#176'!'#26#142'!'#26#142
+  +'!'#26#142#128#145#207#164#192#242#152#177#239#150#176#238#160#187#241#181
+  +#209#245'!'#26#142'!'#26#142'!'#26#142's'#195#184#205#224#166#178#181#153
+  +#158#158#144#145#145#140#140#140#142#142#142#143#143#143#144#144#144#147#147
+  +#147#156#159#159#168#176#176#185#198#198#161#174#203'!'#26#142'!'#26#142'!'
+  +#26#142'w|'#182#192#204#204#185#195#195#187#198#198#197#211#211'NM'#164'!'#26
+  +#142'!'#26#142'NM'#164#200#213#213#193#203#203#193#203#203#201#213#213'NM'
+  +#164'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'
+  +#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142
+  +'!'#26#142'73'#152'MJ'#161#204#213#213#206#216#216#214#226#226'!'#26#142'!'
+  +#26#142'!'#26#142'PO'#166#214#225#225#198#211#234#189#199#230#183#192#226#179
+  +#189#223#180#188#223#181#189#223#182#189#223#183#190#223#185#192#222#186#192
+  +#222#186#193#222#190#197#224#196#204#228#205#215#232#216#227#239'QP'#168'!'
+  +#26#142'!'#26#142'RP'#168#219#229#239#210#218#232#204#210#227#200#205#223#199
+  +#203#222#201#206#223#205#210#225#209#215#228#216#222#233#223#231#239'kj'#180
+  +'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'GC'#161#206#211#225#227
+  +#231#231#221#224#224#219#220#220#218#218#218#217#217#217#217#217#217#218#218
+  +#218#219#219#219#220#220#220#220#220#220#220#220#220#221#221#221#221#221#221
+  ,#222#223#223#223#223#223#225#226#226#227#229#229#230#233#233#234#238#238#225
+  +#229#237'om'#182'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'.('#149
+  +#200#202#224#233#236#236#231#233#233#232#233#233#234#236#236#238#242#242'UR'
+  +#169'!'#26#142'!'#26#142'!'#26#142#239#243#243#234#237#237#231#232#232#228
+  +#229#229#227#227#227#227#227#227#227#227#227#229#229#229#232#233#233#236#239
+  +#239#241#245#245'!'#26#142'!'#26#142'!'#26#142'!'#26#142#239#243#243#236#239
+  +#239#235#238#238#237#240#240#240#244#244'!'#26#142'!'#26#142'!'#26#142'ID'
+  +#162'ID'#162'!'#26#142'!'#26#142'!'#26#142'ID'#162#230#233#240#239#242#242
+  +#236#238#238#233#234#234#231#232#232#231#231#231#230#230#230#230#230#230#230
+  +#230#230#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#151#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#151#150#150#150#151#151#151#150#150#150#150
+  +#150#150#150#150#150#149#149#149#149#149#149#153#154#154#162#167#167#177#186
+  +#186#195#211#211#31#25#145#31#25#145#31#25#145'KL'#166#206#227#227#206#227
+  +#227#204#224#224#195#214#222'51'#155#31#25#145#31#25#145#31#25#145#151#164
+  +#201#192#208#208#175#185#185#153#171#210#138#162#233#133#157#232#137#160#228
+  +#152#172#220#173#192#220#153#167#208#31#25#145#31#25#145#31#25#145#156#166
+  +#204#168#180#210#157#167#204'x}'#185'ac'#173'KJ'#163'52'#154#31#25#145#31#25
+  +#145#31#25#145#31#25#145#31#25#145#31#25#145#31#25#145#31#25#145#149#156#186
+  +#179#189#189#178#188#188#186#198#198#156#168#198#31#25#145#31#25#145#31#25
+  +#145#158#170#200#181#194#194#163#170#170#151#154#154#147#149#149#153#158#158
+  +#167#177#177#186#203#203'JK'#165#31#25#145#31#25#145#31#25#145#188#207#207
+  +#167#178#178#150#156#156#139#142#142#132#157#235#145#172#238#164#192#242#148
+  +#170#221#31#25#145#31#25#145#31#25#145'n{'#196#170#200#244#159#187#241#159
+  +#187#241#171#200#244'\c'#184#31#25#145#31#25#145#31#25#145#131#150#209#169
+  +#199#244#149#176#239#133#159#236'{'#148#234'w'#144#233'w'#143#233'v'#143#233
+  +'v'#142#233'v'#142#233'v'#142#234'v'#142#234'v'#143#233'v'#142#233'v'#142#233
+  +'w'#143#234'w'#143#233'w'#144#233'|'#149#234#132#158#236#149#176#239#170#199
+  +#244#132#149#209#31#25#145#31#25#145#31#25#145'RW'#178#171#198#243#156#182
+  +#240#153#179#239#161#189#241#181#210#245#31#25#145#31#25#145#31#25#145'UW'
+  +#171#191#209#209#171#182#182#157#162#162#147#149#149#143#144#144#143#143#143
+  +#144#144#144#146#146#146#151#152#152#159#163#163#172#180#180#190#204#204#152
+  +#163#201#31#25#145#31#25#145#31#25#145'v{'#183#191#203#203#184#194#194#188
+  +#198#198#198#211#211'LL'#166#31#25#145#31#25#145'ML'#166#201#214#214#193#203
+  ,#203#193#202#202#200#212#212'XY'#171#31#25#145#31#25#145'B?'#162#194#207#222
+  +#171#181#211#135#141#193'z}'#185'WW'#169'LK'#164'*&'#149#31#25#145#31#25#145
+  +#31#25#145#31#25#145#31#25#145#31#25#145#31#25#145'*&'#149#208#219#219#209
+  +#220#220#215#227#227'+&'#150#31#25#145#31#25#145'C@'#162#216#228#228#203#213
+  +#225#192#202#232#184#194#227#181#189#225#181#189#224#182#190#224#183#190#224
+  +#185#192#223#185#192#223#186#193#223#187#194#223#190#197#225#197#205#229#206
+  +#215#233#217#227#240'PO'#170#31#25#145#31#25#145'PO'#170#219#229#240#210#218
+  +#232#204#211#227#201#205#224#200#205#223#204#209#225#208#212#228#214#219#232
+  +#222#229#238'ji'#182#31#25#145#31#25#145#31#25#145#31#25#145','''#150#133#133
+  +#193#229#235#235#225#230#230#222#225#225#220#221#221#218#219#219#218#218#218
+  +#217#217#217#218#218#218#218#218#218#219#219#219#220#220#220#220#220#220#220
+  +#220#220#221#221#221#221#221#221#224#224#224#226#227#227#228#229#229#231#233
+  +#233#235#238#238#187#189#219',&'#151#31#25#145#31#25#145#31#25#145#31#25#145
+  +#31#25#145','''#151#200#202#224#235#238#238#232#234#234#230#231#231#231#232
+  +#232#234#236#236#238#242#242'TQ'#171#31#25#145#31#25#145#31#25#145#239#243
+  +#243#234#237#237#231#232#232#228#229#229#227#227#227#227#227#227#228#228#228
+  +#230#230#230#232#234#234#236#239#239#241#245#245'TQ'#171#31#25#145#31#25#145
+  +#31#25#145#240#244#244#236#239#239#236#238#238#237#240#240#240#244#244#31#25
+  +#145#31#25#145#31#25#145#31#25#145#31#25#145#31#25#145#31#25#145','''#151#204
+  +#207#229#242#246#246#238#240#240#234#236#236#232#233#233#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#235#235#235#234#234#234#234#234#234#235#235#235#235#235
+  +#235#234#234#234#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#238#238#238#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247
+  +#247#247#152#152#152#152#152#152#151#151#151#151#151#151#151#151#151#152#152
+  +#152#151#151#151#151#151#151#151#151#151#150#150#150#150#150#150#150#150#150
+  +#154#155#155#163#168#168#177#186#186#195#211#211#30#23#147#30#23#147#30#23
+  +#147'41'#157'v}'#187'v}'#187'v}'#187'UW'#172#30#23#147#30#23#147#30#23#147'v'
+  +'}'#187#206#227#227#190#205#205#168#186#212#147#172#236#138#162#234#133#158
+  +#233#137#161#234#146#171#236#162#189#240#163#188#233#30#23#147#30#23#147#30
+  +#23#147'}'#139#204#203#230#245#197#223#242#187#212#238#188#207#224#197#208
+  +#208#198#210#210#200#214#214#184#196#212#167#179#210#133#140#194'LK'#168#30
+  +#23#147#30#23#147#30#23#147#162#171#194#182#192#192#179#190#190#186#199#199
+  +#157#169#200#30#23#147#30#23#147#30#23#147'u{'#185#185#199#199#167#175#175
+  +#154#158#158#150#153#153#156#161#161#169#179#179#189#206#206'IJ'#167#30#23
+  +#147#30#23#147#30#23#147#192#211#211#170#182#182#152#159#159#140#148#162#135
+  ,#160#236#147#175#239#167#196#243#150#171#223#30#23#147#30#23#147#30#23#147'm'
+  +'y'#197#171#200#244#160#188#242#162#191#243#175#205#245'=='#166#30#23#147#30
+  +#23#147#30#23#147#167#194#235#164#192#243#144#171#239#129#155#236'y'#147#234
+  +'w'#144#234'w'#143#234'w'#143#234'v'#143#234'w'#143#234'w'#143#234'v'#143#234
+  +'w'#143#234'v'#143#234'v'#143#234'x'#144#234'x'#144#234'x'#144#234'z'#146#234
+  +#131#156#236#144#170#239#163#192#243#177#205#241#30#23#147#30#23#147#30#23
+  +#147'31'#160#174#203#245#160#187#241#156#182#240#164#191#241#182#211#246#30
+  +#23#147#30#23#147#30#23#147')$'#152#199#218#218#179#192#192#163#171#171#153
+  +#157#157#148#149#149#145#146#146#146#147#147#150#150#150#155#158#158#165#171
+  +#171#179#190#190#196#212#212'mq'#183#30#23#147#30#23#147#30#23#147#148#157
+  +#196#190#201#201#184#193#193#188#197#197#198#211#211'LK'#168#30#23#147#30#23
+  +#147'LK'#168#201#213#213#192#202#202#191#200#200#198#209#209'x|'#186#30#23
+  +#147#30#23#147#30#23#147#205#220#228#217#234#234#211#224#224#205#216#216#202
+  +#213#213#203#213#213#205#216#216#209#221#221#169#178#208#172#182#213'}'#129
+  +#190'*$'#153#30#23#147#30#23#147'MK'#168#210#221#221#209#219#219#213#224#224
+  +'ZZ'#175#30#23#147#30#23#147#30#23#147#196#207#222#209#219#220#196#207#232
+  +#188#199#229#183#192#226#182#191#225#185#192#225#186#193#224#186#194#224#187
+  +#194#224#188#195#225#189#196#224#192#199#226#199#206#229#207#215#234#217#228
+  +#240'OM'#172#30#23#147#30#23#147'PN'#172#220#230#240#211#219#233#205#212#228
+  +#202#206#224#202#206#225#206#210#226#211#216#230#218#225#235#178#182#218#30
+  +#23#147#30#23#147#30#23#147#30#23#147'QN'#171#208#214#230#229#235#235#226#229
+  +#229#222#224#224#220#222#222#219#220#220#217#218#218#218#218#218#218#218#218
+  +#219#219#219#219#219#219#220#220#220#221#221#221#221#221#221#221#221#221#222
+  +#222#222#223#224#224#225#225#225#227#228#228#230#233#233#235#238#238#160#161
+  +#207#30#23#147#30#23#147#30#23#147#30#23#147#30#23#147#30#23#147'a]'#178#226
+  +#229#237#236#239#239#233#235#235#230#232#232#230#231#231#231#232#232#234#236
+  +#236#238#242#242'SO'#172#30#23#147#30#23#147#30#23#147#240#244#244#235#238
+  +#238#232#233#233#229#230#230#228#228#228#228#228#228#229#229#229#231#231#231
+  +#233#235#235#237#240#240#241#246#246#30#23#147#30#23#147#30#23#147#30#23#147
+  +#240#243#243#237#240#240#236#238#238#238#240#240#241#245#245#30#23#147#30#23
+  +#147#30#23#147'93'#160'+%'#153#30#23#147#30#23#147'+%'#153#231#235#243#242
+  +#246#246#238#241#241#235#236#236#233#233#233#232#232#232#231#231#231#232#232
+  +#232#231#231#231#231#231#231#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#236#236#236#236#236#236#236#236#236#235#235#235#235#235#235#235#235#235
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#152
+  ,#152#152#152#152#152#153#153#153#152#152#152#152#152#152#152#152#152#152#152
+  +#152#151#151#151#151#151#151#151#151#151#150#150#150#150#150#150#155#156#156
+  +#163#168#168#177#187#187#195#211#211#28#22#149#28#22#149#28#22#149#28#22#149
+  +#28#22#149#28#22#149#28#22#149#28#22#149#28#22#149#28#22#149#28#22#149#128
+  +#137#193#195#214#222#190#211#223#167#194#241#152#178#237#141#166#235#136#159
+  +#233#137#160#233#144#169#235#158#184#239#177#205#244'10'#162#28#22#149#28#22
+  +#149'GJ'#174#200#229#249#188#217#247#176#204#244#168#195#242#184#198#210#192
+  +#201#201#196#206#206#203#216#216#212#229#229#213#231#231'VX'#175#28#22#149#28
+  +#22#149'''#'#154#193#206#206#183#193#193#180#190#190#187#200#200#158#170#201
+  +#28#22#149#28#22#149#28#22#149'u|'#188#192#208#208#174#184#184#161#167#167
+  +#156#161#161#162#169#169#176#188#188#194#213#213'=<'#163#28#22#149#28#22#149
+  +#28#22#149#186#206#214#175#190#190#158#167#167#147#157#175#142#169#238#155
+  +#182#241#174#203#245#143#162#218#28#22#149#28#22#149#28#22#149'u'#131#205#169
+  +#198#244#160#189#242#164#193#243#178#208#246#28#22#149#28#22#149#28#22#149#28
+  +#22#149#183#213#247#159#187#242#141#168#238#128#153#236'y'#146#235'x'#145#235
+  +'x'#145#235'x'#145#234'x'#144#235'w'#144#235'w'#144#235'w'#144#235'w'#144#234
+  +'w'#144#234'x'#144#234'x'#144#235'y'#145#235'x'#145#235'z'#146#234#128#154
+  +#236#141#167#238#160#187#242#183#213#247'''#'#155#28#22#149#28#22#149#28#22
+  +#149#179#207#246#163#190#242#158#185#241#165#192#242#183#212#246#28#22#149#28
+  +#22#149#28#22#149#28#22#149#138#150#198#190#206#206#175#185#185#163#169#169
+  +#156#160#160#153#155#155#154#156#156#157#160#160#165#170#170#176#184#184#190
+  +#203#203#194#210#218'''#'#154#28#22#149#28#22#149#28#22#149#178#189#205#187
+  +#197#197#183#191#191#188#197#197#198#211#211'JJ'#169#28#22#149#28#22#149'KJ'
+  +#170#201#213#213#191#200#200#189#197#197#195#205#205#172#183#207#28#22#149#28
+  +#22#149#28#22#149#146#154#202#215#231#231#208#220#220#201#210#210#198#206#206
+  +#196#205#205#200#208#208#205#215#215#213#225#225#220#235#235#208#222#230#28
+  +#22#149#28#22#149#28#22#149'oq'#185#209#219#219#206#215#215#210#220#220#135
+  +#139#194#28#22#149#28#22#149#28#22#149'rt'#188#216#227#227#205#214#221#194
+  +#206#233#189#199#230#189#197#229#189#197#228#189#198#227#190#199#227#191#199
+  +#227#192#200#227#193#199#227#195#202#228#201#209#231#209#218#235#218#230#241
+  +'NM'#174#28#22#149#28#22#149'NM'#174#223#232#241#214#222#235#208#214#230#206
+  +#210#228#205#210#227#209#213#229#214#220#233#222#229#238'hh'#185#28#22#149#28
+  +#22#149#28#22#149'jj'#186#234#243#245#229#235#235#226#230#230#223#226#226#222
+  +#223#223#220#221#221#219#220#220#218#219#219#219#219#219#218#218#218#219#219
+  +#219#220#220#220#220#220#220#222#222#222#222#222#222#222#222#222#223#223#223
+  +#225#225#225#226#227#227#230#231#231#233#236#236#185#187#219#28#22#149#28#22
+  +#149#28#22#149#28#22#149#28#22#149'72'#161#188#190#221#238#242#242#236#238
+  +#238#233#235#235#231#232#232#230#230#230#230#230#230#231#232#232#234#237#237
+  +#239#243#243'RO'#174#28#22#149#28#22#149#28#22#149#240#244#244#236#238#238
+  +#232#234#234#230#231#231#229#229#229#229#229#229#230#230#230#231#232#232#234
+  +#236#236#238#241#241#216#219#235#28#22#149#28#22#149#28#22#149'72'#162#240
+  +#243#243#237#239#239#236#238#238#238#240#240#241#245#245#28#22#149#28#22#149
+  +#28#22#149'RO'#174#176#178#218#28#22#149#28#22#149#28#22#149'EA'#168#230#233
+  +#241#239#242#242#236#238#238#234#234#234#233#233#233#232#233#233#232#232#232
+  +#232#232#232#232#232#232#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  ,#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#153#152#152#152
+  +#152#152#152#151#151#151#151#151#151#151#151#151#150#150#150#155#156#156#164
+  +#169#169#177#187#187#195#211#211#27#21#151#27#21#151#27#21#151#27#21#151#27
+  +#21#151#27#21#151#27#21#151#27#21#151#27#21#151#27#21#151#27#21#151#27#21#151
+  +'&"'#156#142#160#218#178#205#244#162#188#240#149#173#237#140#164#235#137#162
+  +#235#142#167#236#154#180#239#171#198#242'lx'#199#27#21#151#27#21#151#27#21
+  +#151#157#178#225#189#218#247#176#204#244#166#193#242#168#190#229#189#197#197
+  +#194#204#204#202#215#215#212#228#228#191#206#222#27#21#151#27#21#151#27#21
+  +#151'_a'#178#192#204#204#183#192#192#181#191#191#189#202#202#160#172#204#27
+  +#21#151#27#21#151#27#21#151'=<'#165#200#219#219#184#197#197#172#181#181#168
+  +#176#176#173#184#184#185#200#200#192#211#219#27#21#151#27#21#151#27#21#151#27
+  +#21#151#146#161#202#185#202#202#168#181#181#158#173#192#156#182#241#167#195
+  +#243#185#214#247'fp'#194#27#21#151#27#21#151#27#21#151#144#165#223#167#195
+  +#244#160#188#243#164#193#243#180#210#247#27#21#151#27#21#151#27#21#151'EI'
+  +#176#180#211#247#157#185#242#139#166#239''#153#236'y'#146#235'y'#145#235'y'
+  +#145#235'x'#145#235'x'#145#235'x'#145#235'x'#145#235'x'#144#235'x'#145#235'x'
+  +#144#235'y'#145#235'y'#146#235'y'#145#235'y'#145#235'z'#146#235#128#153#236
+  +#140#166#239#158#185#242#180#210#247'EI'#176#27#21#151#27#21#151#27#21#151
+  +#181#209#246#164#191#242#160#186#241#166#193#243#183#212#246#27#21#151#27#21
+  +#151#27#21#151#27#21#151'&"'#156#191#209#218#188#202#202#176#186#186#168#175
+  +#175#165#171#171#166#172#172#169#176#176#177#186#186#189#201#201#202#219#219
+  +'TW'#176#27#21#151#27#21#151#27#21#151'IH'#170#194#206#206#184#192#192#182
+  +#189#189#189#198#198#200#214#214'JJ'#171#27#21#151#27#21#151'JJ'#171#201#213
+  +#213#191#199#199#187#194#194#191#199#199#202#213#213'3/'#161#27#21#151#27#21
+  +#151'30'#161#216#232#232#208#220#220#200#210#210#196#204#204#194#202#202#198
+  +#206#206#204#213#213#212#224#224#220#235#235'|'#128#194#27#21#151#27#21#151
+  +#27#21#151#179#187#212#206#214#214#203#210#210#205#213#213#202#211#219'''#'
+  +#156#27#21#151#27#21#151#27#21#151#174#182#215#215#225#225#206#216#231#199
+  +#210#235#197#207#234#196#206#233#196#206#232#197#206#232#198#207#232#198#207
+  +#231#198#206#231#200#208#232#205#214#233#213#223#238#222#234#243'NL'#175#27
+  +#21#151#27#21#151'NL'#175#226#237#244#218#228#239#213#220#234#209#215#230#209
+  +#214#229#211#216#231#216#222#234#224#231#240'NL'#175#27#21#151#27#21#151#27
+  +#21#151#222#230#241#233#241#241#228#234#234#226#230#230#224#226#226#223#225
+  +#225#223#224#224#220#221#221#220#221#221#219#219#219#219#220#220#220#220#220
+  +#221#221#221#222#222#222#222#222#222#223#223#223#224#224#224#224#224#224#226
+  +#226#226#228#229#229#231#233#233#235#239#239'QM'#175#27#21#151#27#21#151#27
+  +#21#151#27#21#151'lj'#188#228#232#240#238#241#241#235#237#237#233#234#234#231
+  +#232#232#230#230#230#229#229#229#229#230#230#231#232#232#235#237#237#239#243
+  +#243'QN'#175#27#21#151#27#21#151#27#21#151#240#244#244#236#238#238#232#234
+  +#234#230#231#231#229#229#229#231#231#231#232#232#232#234#235#235#237#239#239
+  +#241#244#244#149#149#206#27#21#151#27#21#151#27#21#151'_\'#181#239#242#242
+  +#237#239#239#236#238#238#238#240#240#242#245#245#27#21#151#27#21#151#27#21
+  +#151'QN'#176#244#249#249#162#163#212#27#21#151#27#21#151#27#21#151'_]'#182
+  +#241#245#245#238#241#241#236#237#237#234#235#235#233#233#233#232#232#232#232
+  +#232#232#232#232#232#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  ,#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#155#155#155
+  +#154#154#154#154#154#154#154#154#154#154#154#154#153#153#153#153#153#153#153
+  +#153#153#152#152#152#152#152#152#152#152#152#151#151#151#156#157#157#163#168
+  +#168#177#187#187#195#211#211#25#20#154#25#20#154#25#20#154'0.'#162't{'#190't'
+  +'{'#190't{'#190't{'#190'RU'#176#25#20#154#25#20#154#25#20#154#25#20#154#25#20
+  +#154#128#144#212#174#201#243#159#185#240#147#171#237#140#165#236#141#166#236
+  +#150#175#238#164#190#241#171#196#239'$!'#159#25#20#154#25#20#154'/.'#166#184
+  +#211#243#183#211#246#174#202#243#169#196#243#188#202#213#198#209#209#205#219
+  +#219#202#218#226'=<'#169#25#20#154#25#20#154#25#20#154#179#191#207#187#198
+  +#198#180#189#189#181#190#190#191#205#205#162#174#208#25#20#154#25#20#154#25
+  +#20#154#25#20#154#161#176#209#195#213#213#186#200#200#183#196#196#187#202#202
+  +#198#217#217'}'#136#194#25#20#154#25#20#154#25#20#154#25#20#154':;'#167#194
+  +#215#215#182#199#199#173#195#217#173#201#245#182#212#247#186#215#244'/.'#166
+  +#25#20#154#25#20#154#25#20#154#169#196#240#163#191#243#157#185#242#163#192
+  +#243#180#210#247#25#20#154#25#20#154#25#20#154'DH'#178#180#211#247#157#185
+  +#242#140#166#239#128#154#237'z'#146#236'z'#146#236'y'#146#236'y'#146#236'y'
+  +#146#236'y'#145#236'y'#145#236'x'#145#236'y'#145#235'y'#145#235'y'#145#235'z'
+  +#146#236'z'#146#236'{'#146#235'{'#146#235#129#153#236#140#166#238#157#185#242
+  +#181#210#247'DH'#178#25#20#154#25#20#154#25#20#154#181#210#246#165#192#243
+  +#160#186#241#167#194#243#184#212#247#25#20#154#25#20#154#25#20#154#25#20#154
+  +#25#20#154';;'#168#190#206#215#191#206#206#184#196#196#182#193#193#183#193
+  +#193#186#198#198#194#207#207#203#220#220'_c'#183#25#20#154#25#20#154#25#20
+  +#154#25#20#154#157#168#201#189#199#199#182#189#189#182#189#189#191#200#200
+  +#204#217#217'II'#174#25#20#154#25#20#154'II'#174#202#214#214#191#198#198#185
+  +#191#191#187#193#193#196#205#205#139#145#195#25#20#154#25#20#154#25#20#154'b'
+  +'e'#184#212#226#226#206#217#217#201#210#210#200#208#208#202#211#211#207#218
+  +#218#215#228#228#184#195#221#25#20#154#25#20#154#25#20#154'JI'#173#209#218
+  +#218#201#207#207#197#203#203#200#206#206#208#216#216'y}'#191#25#20#154#25#20
+  +#154#25#20#154'%"'#159#174#182#216#218#228#230#211#223#237#207#219#239#206
+  +#218#238#207#218#238#206#217#237#207#218#237#195#204#231#194#202#230#207#216
+  +#235#211#221#237#218#229#241#227#239#247'LK'#178#25#20#154#25#20#154'LL'#178
+  +#231#242#248#224#235#243#219#227#239#215#222#235#214#220#234#215#221#234#219
+  +#225#236#225#233#241'ML'#177#25#20#154#25#20#154#25#20#154#236#245#245#235
+  +#242#242#231#236#236#228#232#232#226#230#230#226#229#229#187#188#213#223#225
+  +#225#222#223#223#222#222#222#221#221#221#221#221#221#222#222#222#223#223#223
+  +#223#223#223#223#223#223#224#224#224#224#224#224#226#227#227#229#230#230#233
+  +#235#235#211#214#231#25#20#154#25#20#154#25#20#154#25#20#154'yx'#195#241#246
+  +#246#238#241#241#234#237#237#233#234#234#231#232#232#231#231#231#230#230#230
+  +#230#230#230#230#231#231#232#233#233#235#237#237#239#243#243'PM'#178#25#20
+  +#154#25#20#154#25#20#154#241#245#245#237#240#240#234#235#235#232#233#233#231
+  +#232#232#232#232#232#233#234#234#236#238#238#239#242#242#229#233#241'''"'#160
+  ,#25#20#154#25#20#154#25#20#154#160#161#211#238#241#241#236#238#238#236#238
+  +#238#238#240#240#242#245#245#25#20#154#25#20#154#25#20#154'PM'#178#245#249
+  +#249#245#249#249'lj'#189#25#20#154#25#20#154#25#20#154'kj'#189#241#244#244
+  +#239#241#241#236#238#238#235#235#235#234#234#234#233#233#233#233#233#233#233
+  +#233#233#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#233#233
+  +#233#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#235#235#235#234#234#234#235#235#235#234#234#234#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#156#156#156#155#155#155#154#154#154
+  +#154#154#154#154#154#154#154#154#154#154#154#154#153#153#153#153#153#153#153
+  +#153#153#152#152#152#151#151#151#156#157#157#164#169#169#177#187#187#195#211
+  +#211#24#19#156#24#19#156#24#19#156'FG'#174#206#227#227#201#220#220#193#210
+  +#210#191#207#207#193#211#211#180#197#214'QU'#180#24#19#156#24#19#156#24#19
+  +#156#24#19#156#146#165#224#168#195#242#153#179#239#144#169#236#141#165#236
+  +#145#169#237#156#181#239#171#198#243#135#154#218#24#19#156#24#19#156#24#19
+  +#156'.-'#168#152#172#226#186#215#247#181#210#246#187#211#238#206#219#219#187
+  +#201#218'<:'#170#24#19#156#24#19#156#24#19#156'gl'#185#193#204#204#183#191
+  +#191#178#185#185#182#191#191#193#206#206#163#176#210#24#19#156#24#19#156#24
+  +#19#156#24#19#156'#'#31#161#160#174#209#198#217#217#197#215#215#201#221#221
+  +#159#175#209'#'#31#160#24#19#156#24#19#156#24#19#156'# '#160#24#19#156'[`'
+  +#182#182#202#210#188#213#228#190#220#249#186#215#244'Za'#191#24#19#156#24#19
+  +#156#24#19#156'BF'#179#171#199#245#157#184#242#154#180#242#161#189#243#180
+  +#209#247#24#19#156#24#19#156#24#19#156'.,'#168#182#212#247#159#187#243#141
+  +#167#240#130#154#237'z'#147#236'z'#147#236'z'#147#236'z'#146#236'z'#146#236
+  +'y'#146#236'z'#146#237'z'#146#236'z'#147#236'z'#146#236'z'#146#236'{'#147#236
+  +'{'#147#236'{'#147#236'{'#147#236#130#155#237#142#168#240#160#187#243#183#212
+  +#247'9:'#174#24#19#156#24#19#156#24#19#156#181#210#246#165#192#243#161#187
+  +#242#167#194#243#185#213#247#24#19#156#24#19#156#24#19#156#24#19#156#24#19
+  +#156#24#19#156'$'#31#161#136#145#198#188#203#211#197#212#212#198#213#213#202
+  +#218#218#151#161#204';:'#170#24#19#156#24#19#156#24#19#156#24#19#156'hm'#185
+  +#194#206#206#184#192#192#178#184#184#181#188#188#192#201#201#206#220#220'HH'
+  +#175#24#19#156#24#19#156'HH'#175#201#213#213#189#197#197#183#188#188#183#188
+  +#188#190#196#196#201#211#211'GG'#174#24#19#156#24#19#156#24#19#156'ac'#185
+  +#202#214#223#210#221#221#208#219#219#210#221#221#213#226#226#145#153#205'$ '
+  +#161#24#19#156#24#19#156#24#19#156#177#185#210#203#210#210#196#201#201#194
+  +#197#197#196#200#200#202#208#208#212#221#221'=;'#170#24#19#156#24#19#156#24
+  +#19#156#24#19#156'de'#187#185#194#221#219#233#243#219#233#245#218#231#244#205
+  ,#217#238#143#150#210'0,'#167#165#172#218#213#223#239#217#228#241#224#236#245
+  +#229#242#248'KK'#179#24#19#156#24#19#156'LK'#179#231#243#248#230#241#247#225
+  +#234#243#221#229#240#219#226#237#219#225#237#221#227#238#225#233#241'st'#196
+  +#24#19#156#24#19#156#24#19#156#170#174#217#237#244#244#235#241#241#232#238
+  +#238#231#236#236#178#180#215'%'#31#161#226#228#228#224#225#225#222#223#223
+  +#222#222#222#222#222#222#222#222#222#223#223#223#224#224#224#224#224#224#225
+  +#225#225#225#225#225#227#228#228#230#231#231#234#237#237#185#188#222#24#19
+  +#156#24#19#156#24#19#156'&!'#162#243#248#248#240#244#244#237#239#239#234#236
+  +#236#232#233#233#231#232#232#231#232#232#232#232#232#230#231#231#231#231#231
+  +#232#233#233#235#237#237#240#243#243'OM'#179#24#19#156#24#19#156#24#19#156
+  +#242#246#246#239#241#241#236#238#238#234#235#235#234#235#235#234#236#236#237
+  +#239#239#239#242#242#242#246#246'ki'#191#24#19#156#24#19#156#24#19#156'40'
+  +#168#241#244#244#238#240#240#236#237#237#236#238#238#238#241#241#242#245#245
+  +#24#19#156#24#19#156#24#19#156'OM'#179#245#249#249#244#248#248#244#248#248'O'
+  +'M'#179#24#19#156#24#19#156#24#19#156#161#161#213#241#244#244#238#240#240#236
+  +#237#237#235#235#235#234#234#234#233#233#233#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#235#235#235#235#235#235#234#234#234
+  +#234#234#234#234#234#234#235#235#235#234#234#234#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#236#236#236#235#235#235#236#236#236#236#236
+  +#236#236#236#236#235#235#235#235#235#235#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#237#237#237#236#236#236#236#236#236#236
+  +#236#236#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#238#238#238#237#237#237#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239#239#238#238
+  +#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#240#240#240#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#242#242#242#241#241#241#242#242#242#241#241
+  +#241#242#242#242#242#242#242#241#241#241#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243
+  +#243#243#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244#243
+  +#243#243#244#244#244#243#243#243#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245
+  +#244#244#244#244#244#244#245#245#245#244#244#244#244#244#244#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#245#245#245
+  +#246#246#246#246#246#246#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#246#246#246#247#247#247#247#247#247#247#247#247#246#246#246#246#246
+  +#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#156#156#156#156#156#156#156#156#156#155#155#155#155#155#155#155
+  +#155#155#155#155#155#154#154#154#154#154#154#153#153#153#153#153#153#152#152
+  +#152#157#158#158#164#169#169#178#187#187#195#211#211#22#18#158#22#18#158#22
+  +#18#158'DG'#176#203#223#223#189#204#204#179#190#190#174#184#184#178#189#189
+  +#186#201#204#195#222#246'Zb'#193#22#18#158#22#18#158#22#18#158',+'#169#179
+  +#206#245#161#187#241#148#173#238#141#165#237#141#165#237#149#174#238#161#187
+  +#241#175#202#244'U]'#192#22#18#158#22#18#158#22#18#158#22#18#158'79'#175'my'
+  +#204'my'#204'RT'#182#22#18#158#22#18#158#22#18#158#22#18#158'99'#170#197#209
+  +#209#185#194#194#178#184#184#177#182#182#172#179#188#151#159#195'~'#134#196
+  +#22#18#158#22#18#158#22#18#158'-,'#167#22#18#158#22#18#158'99'#171'DF'#175'9'
+  +'9'#171#22#18#158#22#18#158#22#18#158#22#18#158'-,'#166'py'#191#22#18#158#22
+  +#18#158'!'#30#162'BF'#180'BF'#181'!'#30#164#22#18#158#22#18#158#22#18#158#22
+  +#18#158#141#163#225#162#189#243#150#177#241#149#176#241#159#186#243#177#207
+  +#246'!'#31#164#22#18#158#22#18#158#22#18#158#187#216#249#164#191#244#145#171
+  +#241#131#157#239'}'#150#237'{'#148#237'{'#147#237'{'#147#237'z'#147#237'z'
+  +#147#237'z'#147#237'{'#147#237'{'#147#237'{'#148#237'{'#147#237'|'#148#237'{'
+  +#147#237'|'#148#237'~'#151#236#132#157#238#146#171#240#164#191#244#187#216
+  ,#248#22#18#158#22#18#158#22#18#158#22#18#158#180#208#246#165#191#243#160#186
+  +#242#167#194#244#185#213#247#22#18#158#22#18#158#22#18#158'EG'#176'\a'#185#22
+  +#18#158#22#18#158#22#18#158#22#18#158'EF'#176'EF'#176#22#18#158#22#18#158#22
+  +#18#158#22#18#158#22#18#158#22#18#158'99'#171#197#210#210#186#195#195#179#184
+  +#184#178#182#182#182#188#188#161#167#194#160#169#205';:'#172#22#18#158#22#18
+  +#158'FG'#176#199#210#210#189#195#195#181#185#185#180#184#184#185#189#189#194
+  +#202#202#194#204#212'::'#171#22#18#158#22#18#158#22#18#158'"'#31#163'`b'#186
+  +'w|'#195'lp'#191'/,'#168#22#18#158#22#18#158#22#18#158#22#18#158#142#147#200
+  +#206#214#214#199#203#203#193#195#195#190#192#192#192#194#194#197#201#201#205
+  +#212#212#201#210#219'<;'#172#22#18#158#22#18#158#22#18#158#22#18#158#22#18
+  +#158#22#18#158'0-'#169#22#18#158#22#18#158#22#18#158#22#18#158#169#177#222
+  +#218#229#242'HH'#180#22#18#158#22#18#158#22#18#158#22#18#158#22#18#158#22#18
+  +#158#22#18#158#22#18#158#22#18#158#22#18#158#22#18#158#172#175#219#221#228
+  +#238#224#231#240#177#182#222#22#18#158#22#18#158#22#18#158#22#18#158'tu'#196
+  +#130#131#202#129#130#201'>;'#174#22#18#158#22#18#158#228#231#231#225#227#227
+  +#224#225#225#223#223#223#222#222#222#223#223#223#224#224#224#225#225#225#225
+  +#225#225#226#226#226#226#226#226#228#229#229#231#232#232#234#237#237#185#187
+  +#222#22#18#158#22#18#158#22#18#158'NL'#181#244#249#249#241#245#245#238#240
+  +#240#236#237#237#234#236#236#234#235#235#234#235#235#233#234#234#232#233#233
+  +#232#233#233#234#235#235#236#238#238#241#244#244'NL'#181#22#18#158#22#18#158
+  +#22#18#158#244#249#249#241#245#245#239#241#241#237#239#239#237#239#239#238
+  +#241#241#241#244#244#243#247#247'jh'#192#22#18#158#22#18#158#22#18#158#22#18
+  +#158#160#160#213#239#242#242#236#238#238#236#237#237#237#238#238#239#241#241
+  +#242#246#246#22#18#158#22#18#158#22#18#158'NL'#181#244#248#248#242#246#246
+  +#242#245#245#229#233#241'@='#175#22#18#158#22#18#158#22#18#158#174#175#219
+  +#241#244#244#239#241#241#237#238#238#235#236#236#235#235#235#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#236#236#236#235#235#235#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#245#245#245#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#157#157#157#156#156#156#156#156#156#156#156#156
+  +#155#155#155#155#155#155#155#155#155#155#155#155#154#154#154#154#154#154#153
+  +#153#153#153#153#153#156#157#157#165#170#170#178#187#187#195#211#211#21#16
+  +#161#21#16#161#21#16#161'CE'#178#195#213#213#179#190#190#167#174#174#160#166
+  +#166#162#170#174#168#191#231#181#208#245#187#213#243' '#29#166#21#16#161#21
+  +#16#161#21#16#161#156#178#231#168#194#243#152#177#240#143#167#238#140#164#237
+  +#143#168#238#152#177#240#163#189#242#176#203#245'r'#128#209#21#16#161#21#16
+  ,#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21
+  +#16#161'[]'#183#188#198#207#188#196#196#180#185#185#174#178#178#174#179#179
+  +#172#178#187'+('#166#21#16#161#21#16#161#21#16#161#21#16#161#150#162#207'88'
+  +#173#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21
+  +#16#161#169#187#214#203#225#225'77'#172#21#16#161#21#16#161#21#16#161#21#16
+  +#161#21#16#161#21#16#161#21#16#161#21#16#161'S['#193#169#197#245#153#180#242
+  +#144#170#240#144#171#241#155#182#243#174#203#246'AE'#183#21#16#161#21#16#161
+  +#21#16#161#149#171#227#169#198#245#150#177#242#136#161#239''#151#238'|'#148
+  +#237'{'#148#237'{'#148#237'{'#148#237'{'#147#237'{'#148#238'{'#148#237'{'#148
+  +#237'|'#148#237'|'#148#237'|'#148#237'|'#148#237'}'#149#237#128#152#238#136
+  +#161#239#151#176#242#171#198#245#160#183#232#21#16#161#21#16#161#21#16#161'A'
+  +'E'#183#177#205#246#163#188#243#159#184#242#167#193#244#185#213#247#21#16#161
+  +#21#16#161#21#16#161'DE'#178#210#229#229'\`'#186#21#16#161#21#16#161#21#16
+  +#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161'g'
+  +'k'#188#198#210#210#189#197#197#181#186#186#176#179#179#177#180#180#182#187
+  +#187'kl'#180#21#16#161#21#16#161#21#16#161#21#16#161',*'#169#196#205#205#187
+  +#192#192#180#183#183#178#180#180#180#183#183#188#193#193#196#204#204#193#204
+  +#212'EE'#177#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21
+  +#16#161#21#16#161#21#16#161'!'#30#165#141#147#201#207#215#215#200#205#205#194
+  +#197#197#190#192#192#188#189#189#190#191#191#193#195#195#200#204#204#206#213
+  +#213#202#210#219'mo'#192#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21
+  +#16#161#21#16#161#21#16#161#21#16#161#21#16#161#170#179#223#221#232#244'HG'
+  +#182#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21
+  +#16#161#21#16#161#21#16#161#21#16#161#172#176#220#220#227#238#222#229#239#226
+  +#233#239'qr'#195#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161
+  +#21#16#161#21#16#161#21#16#161#229#232#232#225#227#227#224#225#225#224#224
+  +#224#224#224#224#224#224#224#224#224#224#224#224#224#225#225#225#227#227#227
+  +#227#227#227#228#229#229#231#232#232#235#237#237#199#200#227#21#16#161#21#16
+  +#161#21#16#161#21#16#161#230#234#243#242#246#246#240#243#243#238#241#241#237
+  +#240#240#237#240#240#237#239#239#155#154#209#234#236#236#234#235#235#235#236
+  +#236#237#239#239#241#244#244'MJ'#183#21#16#161#21#16#161#21#16#161#245#249
+  +#249#244#248#248#242#246#246#241#245#245#241#245#245#242#246#246#188#190#226
+  +'><'#178#21#16#161#21#16#161#21#16#161#21#16#161'ig'#193#241#244#244#238#240
+  +#240#236#237#237#235#236#236#236#237#237#239#241#241#242#246#246#21#16#161#21
+  +#16#161#21#16#161'MK'#183#244#247#247#241#244#244#241#243#243#242#244#244#202
+  +#204#231'#'#31#166#21#16#161#21#16#161'"'#31#167#202#204#231#242#244#244#239
+  +#241#241#237#238#238#236#236#236#235#236#236#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  ,#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#158#158#158#158#158#158#157#157#157#157#157#157#157#157#157#156#156#156#156
+  +#156#156#155#155#155#155#155#155#154#154#154#153#153#153#153#153#153#157#158
+  +#158#165#170#170#178#187#187#195#211#211#19#15#163#19#15#163#19#15#163'BD'
+  +#179#190#206#206#172#182#182#158#164#164#151#154#154#148#168#222#157#181#240
+  +#172#197#243#189#217#247'dn'#201#19#15#163#19#15#163#19#15#163'jv'#205#173
+  +#200#244#156#181#240#144#168#238#138#163#237#140#164#237#145#170#238#153#177
+  +#240#163#188#242#172#199#244#162#186#235'S['#195#19#15#163#19#15#163#19#15
+  +#163#19#15#163#19#15#163#19#15#163'OP'#182#158#166#202#197#207#207#189#197
+  +#197#181#186#186#175#178#178#172#175#175#173#177#177#179#185#185#146#151#188
+  +#19#15#163#19#15#163#19#15#163#19#15#163#158#171#208#191#207#216'X\'#184#19
+  +#15#163#19#15#163#19#15#163#19#15#163#19#15#163'*)'#170#161#176#203#189#206
+  +#206#185#202#202#176#191#200'hn'#184#30#27#166#19#15#163#19#15#163#19#15#163
+  +#19#15#163'))'#174'o}'#210#170#198#246#156#184#243#145#170#241#139#164#240
+  +#141#166#240#151#178#242#169#198#246'iv'#206#19#15#163#19#15#163#19#15#163'b'
+  +'m'#202#178#207#247#157#184#244#141#167#241#131#156#239'~'#151#238'|'#149#238
+  +'|'#149#238'|'#148#238'|'#149#238'|'#148#238'|'#149#238'|'#149#238'}'#149#238
+  +'}'#149#238'}'#149#238'}'#149#238#128#152#238#132#157#238#142#167#240#157#184
+  +#243#178#206#247'bm'#201#19#15#163#19#15#163#19#15#163'`j'#201#173#199#245
+  +#159#185#243#157#183#242#168#193#244#185#213#248#19#15#163#19#15#163#19#15
+  +#163'CE'#180#210#230#230#210#228#228#159#171#208'BC'#178#19#15#163#19#15#163
+  +#19#15#163#19#15#163#19#15#163#19#15#163'OQ'#182#158#166#203#196#207#207#190
+  +#197#197#182#187#187#177#180#180#174#177#177#177#179#179#182#186#186#191#198
+  +#198'*'''#169#19#15#163#19#15#163#19#15#163#19#15#163#192#199#199#185#189#189
+  +#179#181#181#177#178#178#177#179#179#182#185#185#189#194#194#196#203#203#204
+  +#213#213#138#143#199'87'#175#19#15#163#19#15#163#19#15#163#19#15#163#19#15
+  +#163#31#29#167']_'#187#187#195#214#206#213#213#200#206#206#195#198#198#191
+  +#193#193#188#189#189#188#189#189#189#189#189#191#192#192#196#198#198#201#205
+  +#205#206#212#212#213#221#221#170#175#212'ac'#191' '#29#168#19#15#163#19#15
+  +#163#19#15#163#19#15#163#19#15#163#19#15#163'-+'#174#181#190#228#219#230#243
+  +'FF'#184#19#15#163#19#15#163#19#15#163#19#15#163#19#15#163#19#15#163#19#15
+  +#163#19#15#163#19#15#163#19#15#163#19#15#163#170#174#219#219#224#236#220#225
+  +#230#224#228#228#228#232#232#165#167#213'.+'#173#19#15#163#19#15#163#19#15
+  +#163#19#15#163#19#15#163' '#29#168'HF'#181#228#231#231#227#229#229#224#225
+  +#225#225#225#225#225#225#225#225#225#225#225#225#225#226#226#226#226#226#226
+  +#227#227#227#227#227#227#229#229#229#232#233#233#234#236#236#239#242#242'/,'
+  +#174#19#15#163#19#15#163#19#15#163'ZX'#190#230#234#244#243#247#247#242#245
+  +#245#241#244#244#198#200#228'JH'#183'JG'#182#236#237#237#235#236#236#235#236
+  +#236#237#239#239#241#244#244'LJ'#185#19#15#163#19#15#163#19#15#163#132#132
+  +#206#132#132#206#132#132#206#131#132#206'vv'#201'/,'#174#19#15#163#19#15#163
+  +#19#15#163#19#15#163#19#15#163'KI'#184#227#231#240#239#241#241#236#238#238
+  +#235#235#235#236#236#236#237#238#238#239#241#241#243#246#246#19#15#163#19#15
+  +#163#19#15#163'LJ'#185#243#246#246#240#242#242#239#241#241#240#241#241#242
+  +#244#244#188#189#226#19#15#163#19#15#163#19#15#163'!'#30#168#229#232#241#240
+  +#242#242#238#239#239#237#237#237#236#236#236#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239
+  +#239#238#238#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243
+  ,#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#159#159#159#159#159#159#158#158#158#158#158#158#157#157#157#157#157#157#156
+  +#156#156#156#156#156#155#155#155#155#155#155#154#154#154#153#153#153#157#158
+  +#158#165#170#170#178#187#187#195#211#211#18#14#165#18#14#165#18#14#165'AC'
+  +#181#189#204#204#169#178#178#156#160#160#145#160#204#142#167#238#151#176#240
+  +#165#190#243#184#211#247#145#163#223#18#14#165#18#14#165#18#14#165'kw'#207
+  +#177#203#245#158#184#242#146#170#239#139#163#238#138#162#237#141#164#238#144
+  +#169#239#151#176#240#158#184#242#166#193#243#173#200#245#179#206#246#141#161
+  +#226#142#162#226#142#162#226#141#160#226#173#195#235#198#208#208#193#201#201
+  +#187#194#194#181#185#185#175#178#178#171#173#173#170#171#171#171#174#174#175
+  +#179#179#181#188#188#187#195#195#190#200#200#192#203#203#191#203#203#189#201
+  +#201#188#200#200#187#200#200#178#191#201#148#158#195#148#159#197#148#159#197
+  +#156#167#196#182#196#196#177#189#189#171#182#182#169#179#179#170#181#181#173
+  +#185#185#178#192#192#138#159#226#140#161#226#140#161#227#149#171#231#173#201
+  +#246#165#193#245#155#181#243#146#171#241#138#163#240#135#159#239#137#163#240
+  +#147#173#242#164#191#245#154#177#232#18#14#165#18#14#165#18#14#165#28#27#170
+  +#176#204#244#167#195#246#149#176#243#136#162#240#130#154#240'~'#150#238'}'
+  +#150#239'|'#149#238'}'#149#239'}'#149#239'}'#149#238'}'#149#238'}'#150#238'}'
+  +#149#238'~'#150#238''#152#238#130#154#239#137#162#240#149#175#242#167#195
+  +#245#188#217#249#28#27#170#18#14#165#18#14#165#18#14#165#156#178#233#166#193
+  +#245#156#181#243#156#181#242#166#192#244#185#213#247#18#14#165#18#14#165#18
+  +#14#165'BD'#181#210#228#228#200#215#215#196#208#208#195#207#207#186#197#206
+  +#156#164#201#157#165#203#157#166#204#157#166#204#201#213#213#198#208#208#193
+  +#201#201#187#194#194#181#185#185#178#180#180#174#176#176#174#175#175#177#179
+  +#179#180#183#183#187#192#192#194#202#202#199#208#208#201#211#211#200#209#209
+  +#195#203#203#188#194#194#183#186#186#178#180#180#176#177#177#176#177#177#179
+  +#181#181#184#187#187#188#193#193#194#200#200#200#208#208#204#213#213#184#192
+  +#211#162#168#206#163#169#207#163#170#207#174#181#209#208#217#217#206#213#213
+  +#203#209#209#198#203#203#194#197#197#191#193#193#190#190#190#188#188#188#187
+  +#187#187#189#189#189#190#190#190#193#194#194#196#198#198#201#204#204#206#211
+  +#211#212#219#219#219#228#228#227#238#238#188#197#226'GG'#184#18#14#165#18#14
+  +#165#18#14#165#136#141#207#222#232#237#216#225#238#214#224#240#218#229#242
+  +#224#236#246#230#242#249'GG'#186#18#14#165#18#14#165'HG'#186#233#243#249#233
+  +#242#248#228#237#245#223#231#241#221#227#237#219#223#230#218#220#221#219#221
+  +#221#221#223#223#223#226#226#227#230#230#230#234#234#192#195#223#179#182#219
+  +#180#183#220#180#183#220#193#195#223#231#235#235#230#233#233#227#229#229#226
+  +#227#227#225#226#226#224#225#225#225#225#225#225#225#225#225#225#225#227#227
+  +#227#228#228#228#228#228#228#229#229#229#230#230#230#231#232#232#234#235#235
+  +#237#240#240#171#172#219#18#14#165#18#14#165#18#14#165#18#14#165#31#29#170'J'
+  +'I'#186'JI'#186'-+'#175#18#14#165#18#14#165'JG'#184#237#239#239#236#237#237
+  +#236#237#237#237#239#239#240#243#243'KI'#186#18#14#165#18#14#165#18#14#165#18
+  +#14#165#18#14#165#18#14#165#18#14#165#18#14#165#18#14#165#18#14#165#18#14#165
+  +#18#14#165#18#14#165'uu'#201#242#245#245#240#242#242#238#239#239#236#237#237
+  +#235#235#235#235#235#235#237#237#237#239#240#240#242#244#244#18#14#165#18#14
+  +#165#18#14#165'.+'#175#242#245#245#240#241#241#238#240#240#238#240#240#240
+  +#241#241#242#245#245#159#160#217#18#14#165#18#14#165#18#14#165'<:'#180#228
+  +#230#239#240#241#241#237#238#238#237#237#237#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  ,#237#237#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#239#239#239#239#239#239#239#239#239#238#238#238#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#159#159#159#159#159#159#159#159#159#158#158#158#158#158#158#157#157#157#157
+  +#157#157#156#156#156#155#155#155#155#155#155#154#154#154#153#153#153#157#158
+  +#158#165#170#170#178#187#187#194#210#210#16#13#168#16#13#168#16#13#168'@C'
+  +#183#189#204#204#169#178#178#154#170#209#143#168#238#143#167#238#151#175#240
+  +#165#190#242#182#209#246#156#176#229#16#13#168#16#13#168#16#13#168'>C'#189
+  +#178#204#245#161#185#242#147#171#239#139#163#237#137#161#237#139#163#238#141
+  +#164#239#144#168#239#149#173#240#154#179#241#159#185#242#164#189#243#167#193
+  +#244#168#194#244#168#194#244#167#193#243#164#189#243#177#190#211#184#188#188
+  +#180#183#183#175#177#177#173#174#174#170#171#171#170#170#170#170#172#172#172
+  +#175#175#175#179#179#178#183#183#179#186#186#179#186#186#179#186#186#176#183
+  +#183#175#182#182#175#183#183#175#184#184#177#186#186#177#187#187#175#185#185
+  +#172#181#181#166#175#175#162#169#169#159#165#165#156#162#162#157#164#164#159
+  +#167#167#163#171#171#161#189#244#164#191#245#164#191#245#161#188#244#156#182
+  +#244#150#176#243#144#169#242#138#163#241#133#158#240#131#157#240#134#159#240
+  +#143#169#242#158#185#244#177#206#247'25'#183#16#13#168#16#13#168#16#13#168'k'
+  +'y'#209#179#208#248#161#188#245#145#171#242#135#161#241#130#155#240#128#152
+  +#239'~'#150#239'}'#150#239'~'#150#239'~'#150#239'~'#150#239'~'#150#239'~'#150
+  +#239#128#152#239#132#156#240#136#160#240#145#171#241#160#187#244#179#208#248
+  +'ky'#209#16#13#168#16#13#168#16#13#168'''('#178#180#208#247#161#186#243#153
+  +#177#242#154#179#242#167#192#244#186#213#248#16#13#168#16#13#168#16#13#168'A'
+  +'D'#184#205#220#220#193#204#204#188#197#197#186#193#193#187#194#194#190#198
+  +#198#193#201#201#193#201#201#193#201#201#190#197#197#187#193#193#184#189#189
+  +#180#184#184#178#180#180#175#176#176#174#174#174#175#175#175#176#178#178#181
+  +#183#183#186#190#190#191#197#197#195#203#203#197#205#205#196#204#204#193#199
+  +#199#187#192#192#182#185#185#179#180#180#176#177#177#177#177#177#178#178#178
+  +#180#181#181#184#186#186#187#191#191#191#196#196#195#200#200#198#205#205#201
+  +#208#208#201#209#209#202#209#209#201#207#207#200#205#205#197#202#202#195#198
+  +#198#192#194#194#191#193#193#188#189#189#188#188#188#187#187#187#188#188#188
+  +#190#190#190#190#191#191#191#192#192#194#195#195#197#198#198#199#202#202#205
+  +#210#210#213#220#220#222#231#231#202#212#231#16#13#168#16#13#168#16#13#168'z'
+  +''#204#226#235#235#219#225#225#214#218#218#212#217#219#216#222#230#222#231
+  +#239#230#241#247'FG'#188#16#13#168#16#13#168'FG'#188#233#243#248#228#236#243
+  +#223#230#235#221#225#228#219#222#222#218#220#220#217#218#218#217#218#218#218
+  +#220#220#221#222#222#223#225#225#226#228#228#227#230#230#228#231#231#229#232
+  +#232#230#233#233#230#233#233#229#231#231#228#230#230#226#227#227#226#227#227
+  +#226#226#226#225#225#225#226#226#226#226#226#226#226#226#226#228#228#228#228
+  ,#228#228#229#229#229#230#230#230#230#230#230#231#232#232#233#234#234#236#238
+  +#238#239#242#242#157#158#216#16#13#168#16#13#168#16#13#168#16#13#168#16#13
+  +#168#16#13#168#16#13#168#16#13#168#16#13#168'HG'#187#238#240#240#236#238#238
+  +#236#237#237#237#239#239#239#242#242'IG'#188#16#13#168#16#13#168#16#13#168#16
+  +#13#168#16#13#168#16#13#168#16#13#168#16#13#168#16#13#168#16#13#168#16#13#168
+  +'XW'#192#200#202#231#241#244#244#239#241#241#238#239#239#236#237#237#235#235
+  +#235#234#235#235#236#236#236#237#238#238#239#240#240#241#244#244#16#13#168#16
+  +#13#168#16#13#168#16#13#168#241#243#243#239#240#240#237#238#238#238#239#239
+  +#239#240#240#241#242#242#243#245#245'XW'#192#16#13#168#16#13#168#16#13#168'I'
+  +'G'#187#240#241#241#238#239#239#237#237#237#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#239#239#239#239#239#239#238#238#238#239#239#239#238#238#238#239
+  +#239#239#238#238#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#241#241#241#241#241#241#240#240#240#241#241#241#241#241#241#240#240#240
+  +#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#160#160#160#160#160#160#159#159#159#159#159#159#159#159#159#158#158#158#158
+  +#158#158#157#157#157#156#156#156#155#155#155#155#155#155#154#154#154#157#158
+  +#158#165#170#170#178#187#187#195#211#211#15#12#170#15#12#170#15#12#170'?B'
+  +#184#188#203#203#168#184#206#153#178#241#145#169#239#146#169#239#154#179#241
+  +#168#194#244#187#214#247#132#149#221#15#12#170#15#12#170#15#12#170'jw'#210
+  +#178#204#246#159#185#242#147#172#240#140#165#238#138#161#238#137#161#238#138
+  +#162#238#140#164#239#142#166#239#145#168#239#148#172#240#150#175#241#152#178
+  +#241#154#179#241#154#179#241#153#177#241#150#175#241#151#173#233#177#179#179
+  +#175#176#176#173#174#174#171#171#171#170#170#170#170#170#170#170#171#171#171
+  +#172#172#172#174#174#172#174#174#172#175#175#171#174#174#169#173#173#167#171
+  +#171#166#169#169#164#168#168#165#169#169#164#169#169#164#169#169#162#167#167
+  +#160#164#164#156#160#160#152#155#155#149#152#152#148#150#150#148#150#150#149
+  +#153#153#149#159#177#147#173#242#148#174#242#148#174#242#146#171#242#143#169
+  +#241#140#165#241#136#161#240#133#158#240#131#155#239#130#154#239#133#157#240
+  +#140#165#241#151#178#243#169#196#246'{'#140#219#15#12#170#15#12#170#15#12#170
+  +#26#25#175#158#182#235#174#202#247#158#185#245#145#170#243#136#161#241#132
+  +#156#241#128#153#240''#152#240'~'#151#239'~'#151#239''#151#239#128#152#239
+  +#129#153#239#131#156#240#137#162#241#145#171#242#158#184#244#175#202#247#170
+  +#195#240#26#25#175#15#12#170#15#12#170#15#12#170'}'#141#219#172#199#246#155
+  +#179#243#148#173#242#153#177#242#167#192#244#186#213#248#15#12#170#15#12#170
+  +#15#12#170'@C'#187#202#215#215#190#198#198#182#188#188#179#183#183#178#181
+  +#181#181#186#186#184#188#188#184#188#188#184#188#188#183#186#186#181#184#184
+  +#179#181#181#178#179#179#177#178#178#176#176#176#174#175#175#176#176#176#177
+  ,#178#178#180#182#182#186#189#189#191#196#196#196#202#202#197#204#204#197#204
+  +#204#194#200#200#188#192#192#183#186#186#179#181#181#177#177#177#176#176#176
+  +#177#178#178#179#180#180#181#182#182#183#184#184#185#187#187#188#191#191#190
+  +#193#193#192#196#196#193#197#197#194#197#197#193#196#196#193#196#196#191#194
+  +#194#190#192#192#190#190#190#188#189#189#188#188#188#188#188#188#190#190#190
+  +#190#190#190#191#191#191#191#191#191#192#192#192#193#193#193#195#195#195#197
+  +#199#199#202#204#204#209#214#214#218#226#226#161#167#217#15#12#170#15#12#170
+  +#15#12#170#217#227#236#222#230#230#215#220#220#210#213#213#210#213#213#214
+  +#217#217#221#227#227#229#237#237'FF'#188#15#12#170#15#12#170'FF'#188#231#238
+  +#238#225#230#230#220#223#223#218#220#220#217#218#218#217#217#217#216#216#216
+  +#216#217#217#217#218#218#219#220#220#221#222#222#223#224#224#224#225#225#224
+  +#226#226#225#227#227#226#228#228#226#228#228#227#228#228#226#227#227#225#225
+  +#225#226#226#226#225#225#225#227#227#227#227#227#227#227#227#227#227#227#227
+  +#228#228#228#229#229#229#229#229#229#230#230#230#230#230#230#231#231#231#234
+  +#234#234#235#236#236#237#239#239#240#242#242#199#201#231'ed'#198#15#12#170#15
+  +#12#170#15#12#170#15#12#170#15#12#170#29#27#175'HF'#188#155#155#215#237#239
+  +#239#236#237#237#236#236#236#236#237#237#239#240#240'dc'#197'HG'#188'IG'#189
+  +'IG'#189'IH'#189'IG'#189'IG'#189'IG'#189'IG'#189'fe'#199#158#159#218#214#217
+  +#236#242#245#245#241#243#243#239#241#241#238#239#239#237#237#237#236#236#236
+  +#235#236#236#235#235#235#236#236#236#236#237#237#238#239#239#240#242#242'HF'
+  +#188'HF'#188'HF'#188'HF'#188#240#242#242#239#240#240#238#238#238#237#238#238
+  +#238#238#238#239#240#240#241#242#242#228#229#239'WU'#193'HG'#188'HG'#188'HF'
+  +#188#155#155#215#239#240#240#238#238#238#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#239#239#239#238#238#238#238#238#238#238
+  +#238#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#162
+  +#162#162#161#161#161#160#160#160#160#160#160#159#159#159#159#159#159#158#158
+  +#158#157#157#157#157#157#157#156#156#156#155#155#155#154#154#154#157#159#159
+  +#165#170#170#178#187#187#195#211#211#13#10#172#13#10#172#13#10#172'=@'#186
+  +#190#211#222#172#197#245#158#183#242#152#177#241#154#178#241#164#188#243#177
+  +#204#246#195#222#249'U^'#202#13#10#172#13#10#172#13#10#172's'#129#215#175#201
+  +#246#158#184#243#147#171#241#141#164#239#138#162#239#138#162#239#138#162#239
+  +#138#162#239#139#162#239#139#164#239#140#165#240#142#166#240#143#167#240#144
+  +#167#240#144#167#240#142#167#240#141#166#240#140#164#240#161#170#200#174#174
+  +#174#173#174#174#172#172#172#171#171#171#171#171#171#170#171#171#170#170#170
+  +#170#170#170#168#169#169#168#169#169#166#167#167#165#166#166#163#164#164#161
+  ,#162#162#159#160#160#157#159#159#156#158#158#156#158#158#154#156#156#152#154
+  +#154#150#151#151#147#147#147#145#146#146#144#144#144#143#144#144#143#145#145
+  +#141#149#169#137#162#241#137#162#241#137#162#241#137#161#241#136#160#241#133
+  +#159#241#132#156#240#131#155#240#130#154#240#130#154#240#131#156#240#136#162
+  +#241#146#172#243#160#187#245#178#207#248';@'#192#13#10#172#13#10#172#13#10
+  +#172'03'#187#179#206#245#173#201#247#159#186#245#147#174#243#140#166#242#135
+  +#161#241#133#158#241#131#156#241#131#156#241#132#156#241#134#158#241#136#161
+  +#241#141#166#242#148#175#243#159#186#245#174#201#247#179#206#245'03'#187#13
+  +#10#172#13#10#172#13#10#172'03'#187#181#208#248#163#188#244#149#173#242#145
+  +#168#241#152#176#242#166#192#245#187#214#248#13#10#172#13#10#172#13#10#172'>'
+  +'A'#190#202#214#214#189#196#196#180#184#184#175#177#177#175#176#176#176#178
+  +#178#178#179#179#178#180#180#179#180#180#178#179#179#177#178#178#178#178#178
+  +#177#177#177#176#177#177#176#176#176#176#176#176#176#176#176#178#178#178#182
+  +#184#184#188#191#191#193#198#198#199#207#207#155#161#201#166#172#203#197#205
+  +#205#191#196#196#186#189#189#181#182#182#178#179#179#178#178#178#178#178#178
+  +#179#179#179#179#180#180#181#181#181#183#183#183#184#184#184#185#187#187#186
+  +#187#187#186#187#187#188#189#189#188#189#189#188#189#189#188#189#189#187#188
+  +#188#188#188#188#188#188#188#189#189#189#189#189#189#190#190#190#190#190#190
+  +#192#192#192#192#192#192#193#193#193#194#194#194#194#194#194#196#197#197#200
+  +#202#202#207#211#211#215#222#222'wz'#203#13#10#172#13#10#172#13#10#172#229
+  +#239#239#221#228#228#214#218#218#209#212#212#210#212#212#214#217#217#221#226
+  +#226#230#238#238'DD'#190#13#10#172#13#10#172'DD'#190#228#234#234#222#226#226
+  +#217#219#219#215#216#216#215#216#216#216#216#216#215#216#216#216#216#216#217
+  +#218#218#219#219#219#220#220#220#221#222#222#222#222#222#223#224#224#223#224
+  +#224#224#224#224#225#225#225#225#226#226#225#225#225#225#225#225#225#225#225
+  +#227#227#227#227#227#227#228#228#228#228#228#228#229#229#229#229#229#229#230
+  +#230#230#230#230#230#231#231#231#231#231#231#231#231#231#233#233#233#234#234
+  +#234#236#237#237#237#239#239#240#241#241#241#243#243#242#245#245#200#201#231
+  +#186#187#227#186#187#227#213#216#236#241#244#244#240#242#242#239#240#240#237
+  +#238#238#236#237#237#236#236#236#236#237#237#237#238#238#239#240#240#240#242
+  +#242#241#243#243#242#245#245#243#245#245#243#245#245#243#245#245#242#245#245
+  +#242#245#245#242#244#244#241#243#243#240#242#242#239#241#241#238#239#239#238
+  +#239#239#237#238#238#237#237#237#236#236#236#236#236#236#236#236#236#236#236
+  +#236#237#237#237#238#238#238#239#240#240#240#242#242#241#242#242#241#242#242
+  +#240#242#242#239#240#240#238#238#238#237#237#237#237#237#237#238#238#238#239
+  +#239#239#240#241#241#241#242#242#241#243#243#242#243#243#241#243#243#241#242
+  +#242#239#240#240#238#239#239#238#238#238#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  ,#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#162
+  +#162#162#162#162#162#162#162#162#161#161#161#160#160#160#160#160#160#159#159
+  +#159#158#158#158#158#158#158#157#157#157#155#155#155#154#154#154#157#159#159
+  +#166#171#171#178#187#187#195#211#211#12#9#174#12#9#174#12#9#174'=@'#189#195
+  +#223#249#179#205#246#168#193#244#163#188#243#166#191#244#176#202#246#190#217
+  +#248#168#190#237#12#9#174#12#9#174#12#9#174#12#9#174#156#177#234#171#196#245
+  +#156#180#242#146#170#240#140#164#239#139#163#239#139#163#239#139#162#239#139
+  +#163#240#139#163#240#139#162#240#138#162#239#138#162#240#139#163#240#139#163
+  +#240#139#162#240#139#162#240#137#161#240#137#161#240#141#162#231#173#173#173
+  +#173#173#173#173#173#173#173#173#173#172#172#172#171#171#171#170#170#170#169
+  +#169#169#168#168#168#167#167#167#165#165#165#163#163#163#161#161#161#159#159
+  +#159#156#156#156#154#154#154#153#153#153#152#152#152#150#150#150#149#149#149
+  +#147#147#147#145#145#145#144#144#144#143#143#143#142#142#142#141#141#141#137
+  +#146#177#133#157#240#133#157#240#133#157#240#132#157#240#131#156#240#131#155
+  +#240#131#155#240#131#155#240#130#155#240#130#155#240#131#155#240#134#158#241
+  +#141#165#242#153#179#244#168#195#247#152#175#235#24#23#179#12#9#174#12#9#174
+  +#12#9#174'.2'#188#179#207#245#176#205#248#165#192#246#155#181#245#148#174#244
+  +#144#170#243#142#167#242#141#167#242#142#168#242#144#169#243#149#175#243#156
+  +#182#245#165#192#246#177#205#248#180#207#245'/3'#188#12#9#174#12#9#174#12#9
+  +#174#24#23#179#154#176#235#170#196#246#155#180#244#145#168#242#143#166#242
+  +#152#175#243#167#192#245#188#214#248#12#9#174#12#9#174#12#9#174'=A'#193#202
+  +#214#214#189#196#196#181#184#184#175#176#176#173#173#173#174#175#175#175#176
+  +#176#176#177#177#177#178#178#177#177#177#178#178#178#178#178#178#178#178#178
+  +#178#178#178#179#179#179#179#179#179#179#179#179#181#181#181#185#186#186#191
+  +#194#194#198#204#204'<<'#184#12#9#174#12#9#174'_b'#191#196#202#202#189#193
+  +#193#184#186#186#180#181#181#179#179#179#179#179#179#180#180#180#180#180#180
+  +#181#181#181#181#181#181#182#182#182#183#183#183#183#184#184#184#185#185#184
+  +#185#185#186#187#187#186#186#186#187#187#187#187#187#187#188#188#188#189#189
+  +#189#190#190#190#190#190#190#191#191#191#191#191#191#193#193#193#193#193#193
+  +#194#194#194#195#195#195#195#195#195#197#197#197#201#202#202#207#210#210#214
+  +#220#220#144#149#211#12#9#174#12#9#174#12#9#174#216#226#236#223#231#231#217
+  +#222#222#213#216#216#213#216#216#217#221#221#224#230#230#232#240#240#12#9#174
+  +#12#9#174#12#9#174'DC'#191#227#232#232#221#224#224#217#218#218#215#215#215
+  +#215#215#215#216#216#216#216#216#216#217#217#217#218#218#218#219#219#219#220
+  +#220#220#221#221#221#221#221#221#222#222#222#222#222#222#223#223#223#224#224
+  +#224#225#225#225#225#225#225#226#226#226#226#226#226#227#227#227#228#228#228
+  +#228#228#228#228#228#228#229#229#229#230#230#230#231#231#231#231#231#231#232
+  +#232#232#232#232#232#232#232#232#233#233#233#234#234#234#235#236#236#236#237
+  +#237#237#238#238#238#239#239#239#241#241#240#241#241#240#242#242#240#242#242
+  +#240#241#241#240#241#241#239#240#240#238#239#239#237#237#237#236#236#236#236
+  +#236#236#236#236#236#237#237#237#238#238#238#238#240#240#239#240#240#239#241
+  +#241#240#241#241#240#241#241#240#241#241#239#241#241#239#241#241#239#240#240
+  +#239#240#240#239#240#240#238#239#239#237#238#238#237#237#237#236#237#237#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237#237#237
+  +#237#239#239#239#239#240#240#239#240#240#240#241#241#239#240#240#239#239#239
+  +#238#238#238#238#238#238#237#237#237#237#237#237#238#238#238#238#239#239#239
+  +#240#240#239#240#240#240#241#241#241#241#241#239#240#240#239#239#239#239#239
+  +#239#239#239#239#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243
+  ,#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#244#244#244#243#243#243#243#243#243#243#243#243#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#163#163#163#163#163#163#162
+  +#162#162#162#162#162#161#161#161#160#160#160#160#160#160#159#159#159#158#158
+  +#158#157#157#157#156#156#156#154#154#154#157#159#159#166#171#171#178#188#188
+  +#195#211#211#10#8#177#10#8#177#10#8#177';@'#195#205#233#251#191#217#249#182
+  +#208#247#179#204#246#182#209#247#192#219#248#167#189#237#22#22#182#10#8#177
+  +#10#8#177#10#8#177':?'#195#182#208#247#166#191#244#152#177#242#145#169#241
+  +#141#165#240#140#163#240#140#163#240#140#164#240#140#163#240#139#163#240#139
+  +#163#240#139#163#240#139#163#240#139#162#240#139#162#240#138#162#240#138#162
+  +#240#138#162#240#138#162#240#138#161#240#160#169#198#174#174#174#174#174#174
+  +#174#174#174#173#173#173#172#172#172#171#171#171#170#170#170#170#170#170#168
+  +#168#168#166#166#166#164#164#164#162#162#162#160#160#160#158#158#158#155#155
+  +#155#153#153#153#152#152#152#151#151#151#149#149#149#148#148#148#147#147#147
+  +#145#145#145#144#144#144#143#143#143#142#142#142#137#149#191#133#157#241#133
+  +#157#241#132#157#241#132#156#241#132#156#241#132#156#241#132#156#241#131#156
+  +#241#131#155#241#131#155#241#131#155#241#133#157#241#137#162#242#145#170#243
+  +#157#184#245#172#200#247'z'#139#222#10#8#177#10#8#177#10#8#177#10#8#177#22#22
+  +#182#149#170#232#184#212#249#174#202#248#166#194#247#161#188#246#158#185#245
+  +#156#183#245#158#185#245#161#188#246#166#194#246#175#202#248#183#212#249#148
+  +#170#232'"$'#186#10#8#177#10#8#177#10#8#177#10#8#177'{'#140#222#174#201#247
+  +#160#184#244#148#172#242#141#164#241#142#165#241#151#175#243#168#193#245#188
+  +#215#249#10#8#177#10#8#177#10#8#177':@'#196#201#215#219#191#197#197#181#184
+  +#184#177#177#177#175#175#175#176#176#176#177#177#177#178#178#178#178#178#178
+  +#179#179#179#179#179#179#180#180#180#180#180#180#180#180#180#181#181#181#181
+  +#181#181#181#181#181#183#184#184#186#189#189#193#197#197#165#171#203#10#8#177
+  +#10#8#177#10#8#177#10#8#177#199#206#206#191#195#195#185#187#187#182#182#182
+  +#180#180#180#181#181#181#180#180#180#181#181#181#182#182#182#182#182#182#182
+  +#182#182#184#184#184#184#184#184#185#185#185#186#186#186#186#186#186#187#187
+  +#187#188#188#188#189#189#189#189#189#189#190#190#190#191#191#191#191#191#191
+  +#192#192#192#193#193#193#194#194#194#195#195#195#195#195#195#195#195#195#196
+  +#196#196#198#198#198#201#202#202#206#208#208#214#219#219#183#189#221#10#8#177
+  +#10#8#177#10#8#177#134#139#213#228#236#236#223#229#229#220#225#225#220#225
+  +#225#224#229#229#230#237#237#150#155#218#10#8#177#10#8#177#10#8#177'lm'#204
+  +#226#231#231#220#223#223#217#218#218#216#216#216#216#216#216#217#217#217#217
+  +#217#217#218#218#218#218#218#218#219#219#219#221#221#221#221#221#221#221#221
+  +#221#222#222#222#223#223#223#224#224#224#225#225#225#226#226#226#226#226#226
+  +#227#227#227#227#227#227#228#228#228#229#229#229#229#229#229#229#229#229#230
+  +#230#230#230#230#230#231#231#231#231#231#231#232#232#232#232#232#232#233#233
+  +#233#234#234#234#234#234#234#235#236#236#236#236#236#236#237#237#237#237#237
+  +#237#238#238#238#239#239#238#239#239#238#239#239#238#239#239#237#238#238#237
+  +#237#237#236#237#237#236#236#236#236#236#236#235#236#236#236#237#237#237#237
+  +#237#237#238#238#238#238#238#238#238#238#238#239#239#238#239#239#238#239#239
+  +#238#239#239#238#239#239#238#239#239#238#238#238#237#238#238#237#237#237#237
+  +#237#237#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#238#238#238#238#238#238#238#238
+  +#238#239#239#238#239#239#238#238#238#238#238#238#237#238#238#237#237#237#238
+  +#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239#240#240#239#240
+  +#240#239#240#240#239#239#239#239#239#239#239#239#239#238#238#238#238#238#238
+  ,#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#165#165#165#164#164#164#163#163#163#162#162#162#162#162
+  +#162#161#161#161#160#160#160#160#160#160#158#158#158#157#157#157#156#156#156
+  +#155#155#155#157#159#159#165#170#170#178#187#187#194#209#209#9#7#179#9#7#179
+  +#9#7#179':@'#197#206#233#251#203#229#251#196#223#249#194#221#249#174#198#241
+  +'jx'#215#20#21#184#9#7#179#9#7#179#9#7#179#9#7#179#156#177#236#174#199#246
+  +#160#184#244#150#174#242#144#167#240#141#165#241#141#165#241#141#164#241#141
+  +#164#241#140#164#241#140#164#241#140#164#241#140#164#241#140#163#241#139#163
+  +#241#139#163#241#139#163#241#139#163#241#139#162#241#139#162#241#138#162#241
+  +#143#163#232#174#174#174#174#174#174#174#174#174#174#174#174#174#174#174#173
+  +#173#173#172#172#172#171#171#171#169#169#169#168#168#168#166#166#166#164#164
+  +#164#162#162#162#159#159#159#157#157#157#155#155#155#153#153#153#152#152#152
+  +#150#150#150#149#149#149#147#147#147#146#146#146#145#145#145#144#144#144#143
+  +#143#143#137#151#197#133#157#241#133#157#241#133#157#241#133#157#241#133#157
+  +#242#133#157#242#133#157#242#132#156#241#132#157#242#132#156#242#132#156#242
+  +#133#157#242#135#159#242#139#165#243#148#174#244#160#186#246#175#202#248'z'
+  +#139#223#9#7#179#9#7#179#9#7#179#9#7#179#9#7#179'8?'#197#147#169#233#186#215
+  +#250#181#209#249#177#206#248#176#205#248#177#205#248#181#209#249#185#214#249
+  +#147#168#232'P['#206#9#7#179#9#7#179#9#7#179#9#7#179#9#7#179'{'#140#223#177
+  +#204#248#163#188#245#150#175#244#143#166#242#138#162#242#143#166#242#153#177
+  +#244#170#196#246#190#217#249#9#7#179#9#7#179#9#7#179':?'#197#198#214#228#191
+  +#198#198#183#186#186#179#179#179#176#176#176#178#178#178#179#179#179#180#180
+  +#180#180#180#180#181#181#181#181#181#181#181#181#181#182#182#182#182#182#182
+  +#182#182#182#182#182#182#182#182#182#184#185#185#188#190#190#194#199#199#178
+  +#184#205#9#7#179#9#7#179#9#7#179#21#20#181#200#207#207#192#196#196#186#188
+  +#188#183#183#183#181#181#181#182#182#182#182#182#182#182#182#182#182#182#182
+  +#183#183#183#183#183#183#184#184#184#185#185#185#186#186#186#186#186#186#187
+  +#187#187#189#189#189#189#189#189#190#190#190#190#190#190#191#191#191#191#191
+  +#191#192#192#192#193#193#193#194#194#194#194#194#194#195#195#195#196#196#196
+  +#196#196#196#197#197#197#199#199#199#201#202#202#206#208#208#212#216#216#220
+  +#227#227'$$'#186#9#7#179#9#7#179#22#22#183#191#198#230#229#237#237#227#234
+  +#234#228#234#234#231#238#238#191#198#231#22#22#183#9#7#179#9#7#179#9#7#179
+  +#188#194#226#225#229#229#220#222#222#217#218#218#215#216#216#217#217#217#218
+  +#218#218#218#218#218#219#219#219#220#220#220#220#220#220#222#222#222#222#222
+  ,#222#222#222#222#223#223#223#224#224#224#225#225#225#225#225#225#226#226#226
+  +#226#226#226#227#227#227#228#228#228#229#229#229#230#230#230#230#230#230#230
+  +#230#230#231#231#231#231#231#231#232#232#232#233#233#233#233#233#233#233#233
+  +#233#233#233#233#234#234#234#234#234#234#235#235#235#235#235#235#235#236#236
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#236#237#237#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#237#237#236#237#237#237#237#237#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#237#238#238#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#239#239#239#239#240#240#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#166#166#166#165#165#165#164#164#164#163#163
+  +#163#162#162#162#162#162#162#161#161#161#160#160#160#159#159#159#158#158#158
+  +#156#156#156#155#155#155#158#159#159#164#169#169#176#184#184#191#206#206#7#6
+  +#181#7#6#181#7#6#181#19#19#185'9>'#199'9>'#199'9>'#199' "'#190#7#6#181#7#6
+  +#181#7#6#181#7#6#181#7#6#181#7#6#181'{'#139#224#179#205#247#166#190#245#154
+  +#179#243#147#172#242#143#167#241#142#165#241#142#165#241#142#165#241#141#165
+  +#241#141#165#241#141#165#241#141#164#241#140#164#241#140#164#241#140#164#241
+  +#140#164#241#140#163#241#140#164#241#139#163#241#139#163#241#139#163#241#139
+  +#163#242#161#170#200#174#174#174#175#175#175#175#175#175#174#174#174#174#174
+  +#174#173#173#173#172#172#172#171#171#171#169#169#169#167#167#167#166#166#166
+  +#163#163#163#160#160#160#158#158#158#156#156#156#154#154#154#153#153#153#151
+  +#151#151#150#150#150#148#148#148#147#147#147#146#146#146#145#145#145#144#144
+  +#144#137#154#217#134#158#242#134#158#242#134#158#242#134#158#242#134#158#242
+  +#134#158#242#133#158#242#133#158#242#133#157#242#133#157#242#133#157#242#132
+  +#157#242#133#159#242#136#160#243#141#166#243#150#175#245#162#188#246#175#203
+  +#248#132#151#228#19#20#185#7#6#181#7#6#181#7#6#181#7#6#181#7#6#181#19#19#185
+  +'CK'#203'es'#216'es'#216'es'#216'CK'#203#31'!'#190#7#6#181#7#6#181#7#6#181#7
+  +#6#181#7#6#181#19#20#185#133#151#228#177#204#248#163#190#246#152#177#245#145
+  +#168#242#140#163#242#139#162#241#145#168#242#156#180#244#174#199#247#194#221
+  +#250#7#6#181#7#6#181#7#6#181'9?'#199#192#214#239#193#199#199#184#187#187#180
+  ,#180#180#177#177#177#179#179#179#180#180#180#181#181#181#182#182#182#181#181
+  +#181#182#182#182#183#183#183#183#183#183#183#183#183#183#183#183#183#183#183
+  +#183#183#183#185#185#185#188#190#190#193#197#197#200#205#205'jn'#197#7#6#181
+  +#20#19#183#131#134#200#198#204#204#192#195#195#187#189#189#184#185#185#182
+  +#182#182#182#182#182#183#183#183#183#183#183#183#183#183#184#184#184#184#184
+  +#184#185#185#185#186#186#186#186#186#186#186#186#186#187#187#187#189#189#189
+  +#189#189#189#190#190#190#191#191#191#192#192#192#193#193#193#193#193#193#193
+  +#193#193#195#195#195#196#196#196#196#196#196#197#197#197#197#197#197#198#198
+  +#198#199#199#199#201#202#202#205#206#206#210#213#213#217#222#222#156#162#217
+  +#7#6#181#7#6#181#7#6#181#7#6#181'\_'#204#163#168#223#163#168#224'\_'#204#7#6
+  +#181#7#6#181#7#6#181#7#6#181'NO'#200#227#232#232#223#225#225#219#221#221#217
+  +#217#217#217#217#217#218#218#218#219#219#219#219#219#219#219#219#219#221#221
+  +#221#222#222#222#223#223#223#223#223#223#223#223#223#224#224#224#225#225#225
+  +#226#226#226#227#227#227#227#227#227#227#227#227#228#228#228#228#228#228#229
+  +#229#229#231#231#231#231#231#231#230#230#230#232#232#232#232#232#232#233#233
+  +#233#234#234#234#234#234#234#234#234#234#234#234#234#235#235#235#235#235#235
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#238#238#238#237#237#237#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#241#241#241#240#240#240#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#166#166
+  +#166#166#166#166#165#165#165#164#164#164#163#163#163#163#163#163#162#162#162
+  +#161#161#161#160#160#160#159#159#159#157#157#157#156#156#156#159#160#160#164
+  +#167#167#173#180#180#186#199#199#6#5#184#6#5#184#6#5#184#6#5#184#6#5#184#6#5
+  +#184#6#5#184#6#5#184#6#5#184#6#5#184#6#5#184#6#5#184#31'!'#192#145#165#233
+  +#180#206#248#168#193#246#157#182#244#150#175#243#146#169#242#144#167#242#143
+  +#166#242#142#166#242#142#166#242#142#166#242#142#165#242#142#165#242#141#165
+  +#242#141#165#242#141#165#242#141#165#242#141#164#242#140#164#242#140#164#242
+  ,#140#164#242#140#164#242#140#164#242#140#164#242#144#165#234#176#176#176#175
+  +#175#175#176#176#176#175#175#175#175#175#175#174#174#174#173#173#173#171#171
+  +#171#171#171#171#168#168#168#166#166#166#164#164#164#162#162#162#159#159#159
+  +#157#157#157#155#155#155#154#154#154#152#152#152#151#151#151#150#150#150#148
+  +#148#148#147#147#147#146#146#146#145#145#145#137#156#217#135#159#242#135#159
+  +#242#134#158#242#134#158#242#135#159#243#134#158#242#134#158#243#133#158#242
+  +#134#158#243#134#158#243#133#158#243#133#157#243#133#157#243#135#159#243#138
+  +#162#244#142#168#244#150#176#245#161#187#247#172#199#248#163#187#242'AJ'#204
+  +#6#5#184#6#5#184#6#5#184#6#5#184#6#5#184#6#5#184#6#5#184#6#5#184#6#5#184#6#5
+  +#184#6#5#184#6#5#184#6#5#184#6#5#184#6#5#184'6<'#200#163#187#241#174#201#248
+  +#163#188#246#152#177#244#146#170#243#141#164#243#138#162#242#140#162#242#148
+  +#170#243#159#183#245#177#202#248#197#223#251#6#5#184#6#5#184#6#5#184'8>'#201
+  +#187#211#249#179#195#225#170#182#215#164#175#211#162#172#210#171#176#195#172
+  +#177#196#173#178#196#177#180#189#183#183#183#183#183#183#183#183#183#183#183
+  +#183#184#184#184#184#184#184#184#184#184#184#184#184#185#186#186#188#189#189
+  +#191#193#193#196#200#200#200#205#205#202#208#208#202#208#208#199#204#204#195
+  +#198#198#190#192#192#186#187#187#184#184#184#183#183#183#184#184#184#184#184
+  +#184#184#184#184#184#184#184#184#184#184#186#186#186#186#186#186#186#186#186
+  +#187#187#187#188#188#188#189#189#189#189#189#189#191#191#191#191#191#191#191
+  +#191#191#193#193#193#193#193#193#194#194#194#195#195#195#196#196#196#196#196
+  +#196#197#197#197#198#198#198#198#198#198#199#199#199#200#200#200#201#201#201
+  +#204#205#205#208#210#210#213#217#217#221#227#227'Y\'#203#6#5#184#6#5#184#6#5
+  +#184#6#5#184#6#5#184#6#5#184#6#5#184#6#5#184#6#5#184#6#5#184'11'#194#216#221
+  +#232#225#228#228#222#224#224#219#220#220#217#217#217#218#218#218#218#218#218
+  +#219#219#219#220#220#220#220#220#220#222#222#222#223#223#223#224#224#224#224
+  +#224#224#225#225#225#225#225#225#226#226#226#227#227#227#228#228#228#228#228
+  +#228#228#228#228#229#229#229#230#230#230#231#231#231#231#231#231#231#231#231
+  +#231#231#231#232#232#232#233#233#233#233#233#233#234#234#234#234#234#234#234
+  +#234#234#235#235#235#236#236#236#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243
+  +#243#243#243#243#243#243#242#242#242#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  ,#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#168#168#168#167#167#167#166#166#166#165
+  +#165#165#164#164#164#164#164#164#163#163#163#162#162#162#161#161#161#159#159
+  +#159#158#158#158#157#157#157#158#159#159#163#165#165#170#175#175#180#190#190
+  +#4#3#186#4#3#186#4#3#186#4#3#186#4#3#186#4#3#186#4#3#186#4#3#186#4#3#186#4#3
+  +#186'5;'#202'{'#139#226#187#213#249#178#203#247#167#193#246#159#183#244#152
+  +#177#243#148#171#243#145#168#242#143#167#242#143#167#242#143#167#242#143#166
+  +#242#143#166#242#143#166#242#143#166#243#142#166#242#142#166#242#142#166#243
+  +#141#165#242#141#165#242#141#165#242#141#165#242#141#164#242#141#164#242#141
+  +#165#243#141#164#243#141#164#243#162#171#201#176#176#176#176#176#176#176#176
+  +#176#175#175#175#175#175#175#174#174#174#173#173#173#171#171#171#170#170#170
+  +#168#168#168#166#166#166#163#163#163#160#160#160#158#158#158#156#156#156#155
+  +#155#155#154#154#154#152#152#152#151#151#151#150#150#150#148#148#148#148#148
+  +#148#145#148#158#136#159#237#136#160#243#136#160#243#136#160#243#135#159#242
+  +#135#159#243#135#159#243#135#159#243#135#159#243#134#159#243#134#159#243#134
+  +#158#243#134#158#243#134#158#243#133#158#243#135#160#243#138#162#244#142#167
+  +#244#149#174#245#158#184#246#167#195#248#178#205#249#142#163#234'@I'#206#4#3
+  +#186#4#3#186#4#3#186#4#3#186#4#3#186#4#3#186#4#3#186#4#3#186#4#3#186#4#3#186
+  +#4#3#186'@I'#206#142#164#234#179#206#249#169#195#248#160#185#246#151#176#245
+  +#145#168#244#141#164#244#139#162#243#139#161#242#142#165#243#149#172#244#162
+  +#186#245#178#204#248#198#224#251#4#3#186#4#3#186#4#3#186'6<'#202#184#209#248
+  +#168#191#246#155#177#244#148#169#243#146#166#242#147#167#242#147#167#242#148
+  +#168#242#149#168#242#150#169#242#150#169#241#151#170#241#157#173#230#160#174
+  +#227#161#174#227#161#175#227#170#179#212#171#180#213#173#183#215#184#189#200
+  +#192#194#194#194#197#197#195#198#198#195#199#199#193#196#196#190#193#193#188
+  +#189#189#186#186#186#184#185#185#185#185#185#184#184#184#185#185#185#185#185
+  +#185#185#185#185#186#186#186#186#186#186#187#187#187#187#187#187#188#188#188
+  +#189#189#189#190#190#190#190#190#190#191#191#191#191#191#191#192#192#192#194
+  +#194#194#195#195#195#195#195#195#195#195#195#196#196#196#197#197#197#199#199
+  +#199#199#199#199#200#200#200#200#200#200#201#201#201#202#202#202#204#204#204
+  +#207#208#208#211#214#214#217#221#221#222#228#228#143#147#216#18#18#189#4#3
+  +#186#4#3#186#4#3#186#4#3#186#4#3#186#4#3#186#4#3#186'ik'#209#215#220#231#226
+  +#229#229#222#224#224#220#222#222#219#219#219#218#219#219#219#219#219#220#220
+  +#220#220#220#220#221#221#221#221#221#221#222#222#222#223#223#223#224#224#224
+  +#224#224#224#225#225#225#225#225#225#226#226#226#227#227#227#229#229#229#229
+  +#229#229#229#229#229#229#229#229#231#231#231#231#231#231#232#232#232#232#232
+  +#232#233#233#233#233#233#233#234#234#234#235#235#235#235#235#235#235#235#235
+  +#235#235#235#236#236#236#236#236#236#237#237#237#237#237#237#237#237#237#237
+  +#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#241#241#241#240#240#240#240#240#240#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#242#242#242#242#242#242#241#241#241
+  +#241#241#241#242#242#242#242#242#242#241#241#241#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244
+  ,#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#247#247#247#246#246#246#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#169#169#169#167#167#167#166#166#166
+  +#166#166#166#165#165#165#164#164#164#163#163#163#162#162#162#161#161#161#160
+  +#160#160#159#159#159#157#157#157#158#159#159#160#162#162#165#169#169#172#179
+  +#179#136#144#190#142#151#197#145#158#209#147#167#234#148#167#234#147#166#234
+  +#146#165#234#145#165#234#156#177#238#189#215#249#184#210#249#179#204#248#172
+  +#197#247#164#189#246#158#182#245#152#176#244#149#172#244#145#169#243#144#168
+  +#243#144#168#243#144#167#243#144#167#243#144#167#243#143#167#243#143#167#243
+  +#144#167#243#143#166#243#143#167#243#143#167#243#142#166#243#142#166#243#142
+  +#166#243#142#165#243#142#166#243#142#165#243#141#165#243#141#165#243#141#165
+  +#243#146#166#235#176#176#176#176#176#176#176#176#176#176#176#176#175#175#175
+  +#175#175#175#174#174#174#172#172#172#171#171#171#169#169#169#166#166#166#164
+  +#164#164#162#162#162#159#159#159#157#157#157#156#156#156#154#154#154#153#153
+  +#153#152#152#152#148#154#174#143#156#202#139#159#225#137#161#244#137#161#244
+  +#136#160#243#136#161#244#136#160#243#136#160#244#135#159#243#136#160#244#136
+  +#160#244#135#160#244#135#159#244#135#159#244#135#159#244#135#159#244#134#159
+  +#244#134#158#244#134#158#244#135#160#244#138#162#244#141#166#245#147#172#245
+  +#153#179#246#161#187#247#169#196#248#177#205#249#173#199#246'w'#136#227'Vc'
+  +#216'3:'#204'3:'#204'4:'#204'4:'#204'3:'#204'Vc'#216'w'#137#227#173#199#246
+  +#178#205#249#171#198#248#164#189#247#156#180#246#149#173#245#145#168#244#140
+  +#164#244#138#161#243#138#161#243#139#162#243#142#166#244#151#174#245#164#187
+  +#246#25#27#196#3#2#188#3#2#188#3#2#188#3#2#188'49'#204#179#204#248#165#188
+  +#245#155#176#244#149#169#243#147#167#243#148#167#242#148#168#242#149#169#242
+  +#149#169#242#150#170#242#151#170#242#151#170#242#152#171#242#153#171#242#154
+  +#172#242#155#173#242#155#173#242#157#174#241#158#176#241#168#181#228#188#189
+  +#189#189#191#191#190#192#192#190#192#192#189#190#190#187#188#188#187#187#187
+  +#186#186#186#184#184#184#185#185#185#185#185#185#185#185#185#186#186#186#186
+  +#186#186#187#187#187#187#187#187#188#188#188#189#189#189#189#189#189#190#190
+  +#190#190#190#190#191#191#191#191#191#191#192#192#192#193#193#193#194#194#194
+  +#195#195#195#195#195#195#196#196#196#197#197#197#199#199#199#199#199#199#199
+  +#199#199#201#201#201#201#201#201#202#202#202#203#203#203#205#205#205#206#207
+  +#207#209#210#210#213#215#215#217#220#220#222#226#226#211#217#228#144#148#218
+  +'gj'#210'<='#201'=>'#201'Z\'#208#131#134#216#201#206#229#227#232#232#225#228
+  +#228#222#224#224#221#222#222#219#220#220#219#219#219#218#218#218#220#220#220
+  +#221#221#221#222#222#222#222#222#222#222#222#222#223#223#223#224#224#224#225
+  +#225#225#226#226#226#226#226#226#227#227#227#227#227#227#228#228#228#229#229
+  +#229#229#229#229#229#229#229#230#230#230#231#231#231#232#232#232#232#232#232
+  +#233#233#233#233#233#233#233#233#233#235#235#235#236#236#236#236#236#236#236
+  +#236#236#236#236#236#237#237#237#237#237#237#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  ,#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#170#170#170#169#169#169#168
+  +#168#168#167#167#167#166#166#166#165#165#165#164#164#164#163#163#163#162#162
+  +#162#161#161#161#159#159#159#158#158#158#158#159#159#159#160#160#160#163#163
+  +#165#169#169#170#176#176#173#182#182#176#186#186#178#196#218#181#205#248#179
+  +#205#248#179#205#248#178#203#248#176#201#247#173#198#247#170#194#246#164#189
+  +#246#160#184#245#156#180#245#152#176#245#149#173#244#147#170#244#146#169#244
+  +#145#169#244#145#169#244#145#169#244#145#168#244#144#168#243#145#168#244#144
+  +#167#243#144#168#244#144#168#244#144#167#244#144#167#244#143#167#244#143#167
+  +#244#143#167#244#143#167#244#143#166#244#142#166#244#142#166#244#142#166#244
+  +#142#166#244#142#165#244#163#172#201#176#176#176#176#176#176#176#176#176#175
+  +#175#175#175#175#175#174#174#174#172#172#172#171#171#171#169#169#169#167#167
+  +#167#165#165#165#163#163#163#160#160#160#155#158#168#151#158#184#147#159#199
+  +#142#160#221#138#162#244#138#162#244#138#162#244#138#162#244#138#162#244#137
+  +#162#244#137#161#244#137#161#244#137#161#244#137#161#244#137#161#244#136#160
+  +#244#136#160#244#136#160#244#136#160#244#136#160#244#135#160#244#135#160#244
+  +#135#159#244#135#159#244#135#159#244#134#159#244#135#161#244#137#161#244#140
+  +#164#245#144#168#245#148#174#246#154#180#247#160#186#247#165#192#248#170#197
+  +#249#174#201#249#177#204#249#178#206#249#179#207#250#179#207#249#177#205#249
+  +#175#202#249#172#199#249#168#193#248#161#187#247#156#181#247#151#176#246#145
+  +#170#245#143#166#245#140#163#244#138#161#244#138#161#244#139#161#244#140#163
+  +#244#143#166#245#152#174#245#162#185#246#132#150#233#1#1#190#1#1#190#1#1#190
+  +#1#1#190'06'#205#175#198#247#163#185#246#153#175#244#148#168#243#147#167#243
+  +#148#168#242#148#168#242#149#169#243#150#170#243#151#170#243#152#171#243#152
+  +#171#243#153#172#243#155#173#242#154#173#242#156#174#242#157#174#242#157#175
+  +#242#158#176#242#160#177#242#180#184#201#186#187#187#186#187#187#187#188#188
+  +#186#187#187#186#186#186#185#186#186#185#185#185#185#185#185#185#185#185#186
+  +#186#186#186#186#186#187#187#187#187#187#187#188#188#188#188#188#188#189#189
+  +#189#189#189#189#190#190#190#191#191#191#191#191#191#192#192#192#192#192#192
+  +#194#194#194#194#194#194#195#195#195#196#196#196#196#196#196#198#198#198#198
+  +#198#198#199#199#199#199#199#199#200#200#200#201#201#201#202#202#202#204#204
+  +#204#203#203#203#205#205#205#207#207#207#207#208#208#211#212#212#214#216#216
+  +#216#219#219#220#224#224#223#227#227#225#229#229#226#231#231#227#232#232#227
+  ,#231#231#226#230#230#224#228#228#223#226#226#221#223#223#220#221#221#219#219
+  +#219#219#219#219#219#219#219#219#219#219#220#220#220#221#221#221#222#222#222
+  +#222#222#222#222#222#222#225#225#225#225#225#225#226#226#226#227#227#227#227
+  +#227#227#228#228#228#229#229#229#229#229#229#230#230#230#230#230#230#231#231
+  +#231#231#231#231#232#232#232#233#233#233#233#233#233#233#233#233#234#234#234
+  +#234#234#234#235#235#235#235#235#235#236#236#236#236#236#236#236#236#236#237
+  +#237#237#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242#241
+  +#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#246#246#246#245#245#245#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#171#171#171#170#170#170#169#169#169#168#168#168#167
+  +#167#167#166#166#166#165#165#165#164#164#164#163#163#163#162#162#162#161#161
+  +#161#159#159#159#158#158#158#158#159#159#158#159#159#159#161#161#161#165#165
+  +#162#167#167#163#168#168#163#170#170#166#187#232#166#190#246#165#189#246#164
+  +#188#246#163#187#246#160#185#246#158#182#245#155#180#245#153#177#245#150#175
+  +#244#149#172#244#148#171#244#147#170#244#146#170#244#146#170#244#146#170#244
+  +#146#169#244#146#169#244#145#169#244#145#169#244#145#169#244#145#168#244#145
+  +#168#244#145#168#244#144#168#244#144#168#244#144#168#244#144#167#244#143#167
+  +#244#143#167#244#143#167#244#143#167#244#143#166#244#143#166#244#142#166#244
+  +#147#167#236#176#176#176#176#176#176#176#176#176#175#175#175#175#175#175#174
+  +#174#174#173#173#173#172#172#172#162#168#188#157#166#196#153#165#205#146#164
+  +#224#141#164#239#140#164#245#139#163#244#139#163#244#139#163#244#139#163#244
+  +#139#163#245#139#163#245#139#163#245#138#162#245#138#162#245#138#162#245#138
+  +#162#245#138#162#245#137#162#245#137#161#245#137#161#245#137#161#245#137#161
+  +#245#137#161#245#136#161#245#136#160#245#136#160#245#136#160#245#136#160#245
+  +#135#160#245#135#159#245#135#159#245#136#160#245#136#161#245#138#163#245#140
+  +#165#246#143#168#246#147#172#246#151#176#247#154#180#247#157#183#248#159#185
+  ,#247#161#187#248#162#188#248#162#188#248#160#186#248#159#185#248#155#181#247
+  +#152#178#247#150#174#246#145#170#246#143#167#245#140#165#244#140#163#244#139
+  +#162#244#139#161#244#139#161#244#139#162#244#141#163#244#144#167#244#149#172
+  +#245#157#181#246#168#192#247'dr'#224']i'#221'^j'#221'\i'#220'o~'#227#167#190
+  +#246#159#181#246#153#174#244#150#170#243#148#168#243#149#169#243#149#169#243
+  +#151#171#243#151#171#243#152#171#243#152#171#243#153#172#243#155#173#243#155
+  +#174#243#156#174#243#157#175#243#157#175#243#158#176#243#159#176#243#160#177
+  +#243#165#179#232#186#186#186#186#186#186#186#186#186#186#186#186#185#185#185
+  +#185#185#185#186#186#186#186#186#186#187#187#187#187#187#187#187#187#187#187
+  +#187#187#187#187#187#188#188#188#189#189#189#189#189#189#190#190#190#191#191
+  +#191#192#192#192#192#192#192#193#193#193#194#194#194#195#195#195#195#195#195
+  +#196#196#196#197#197#197#198#198#198#199#199#199#199#199#199#200#200#200#201
+  +#201#201#201#201#201#202#202#202#202#202#202#204#204#204#204#204#204#205#205
+  +#205#206#206#206#207#207#207#209#209#209#211#212#212#214#215#215#216#218#218
+  +#217#220#220#219#222#222#221#224#224#222#225#225#222#224#224#222#224#224#220
+  +#222#222#220#221#221#219#220#220#218#219#219#219#219#219#219#219#219#220#220
+  +#220#221#221#221#221#221#221#222#222#222#223#223#223#224#224#224#224#224#224
+  +#225#225#225#225#225#225#226#226#226#227#227#227#227#227#227#228#228#228#230
+  +#230#230#231#231#231#231#231#231#231#231#231#232#232#232#232#232#232#233#233
+  +#233#234#234#234#234#234#234#234#234#234#235#235#235#235#235#235#236#236#236
+  +#236#236#236#237#237#237#237#237#237#237#237#237#238#238#238#238#238#238#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#241#241#241#240#240#240#240#240#240#240#240#240#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#242#242#242#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#173#173#173#171#171#171#170#170#170#169#169#169#168#168#168#167#167#167#166
+  +#166#166#165#165#165#164#164#164#162#162#162#161#161#161#160#160#160#158#158
+  ,#158#158#158#158#156#157#157#156#157#157#156#157#157#155#157#157#154#156#156
+  +#154#156#156#153#158#166#156#178#239#156#179#245#154#179#245#153#178#245#152
+  +#177#245#151#175#244#150#174#245#149#172#244#149#172#245#148#171#245#148#171
+  +#245#147#171#245#147#171#245#147#170#245#147#170#245#146#170#245#146#170#245
+  +#146#170#245#146#169#245#146#169#245#146#169#245#145#169#245#145#169#245#145
+  +#169#245#145#168#245#145#168#245#144#168#245#144#168#245#144#168#245#144#168
+  +#245#144#167#245#143#167#245#143#167#245#143#167#245#143#167#245#160#171#210
+  +#163#172#202#159#171#210#159#171#210#150#168#227#150#167#227#142#165#245#141
+  +#165#245#141#165#245#141#165#245#141#165#245#140#164#245#140#164#245#140#164
+  +#245#140#164#245#140#164#245#140#164#245#139#163#245#140#164#245#140#164#245
+  +#139#163#245#139#163#245#139#163#245#139#163#245#138#163#245#138#162#245#138
+  +#162#245#138#162#245#138#162#245#138#162#245#137#161#245#137#161#245#137#161
+  +#245#137#161#245#137#161#245#136#161#245#136#161#245#136#160#245#136#160#245
+  +#136#160#245#135#160#245#135#160#245#136#160#245#136#161#245#138#162#245#140
+  +#164#246#140#166#246#142#167#246#144#169#246#146#171#246#147#172#246#148#173
+  +#246#148#173#246#147#171#246#146#171#246#144#169#246#143#167#246#141#166#246
+  +#140#164#245#139#162#245#140#163#245#138#162#245#139#162#245#140#162#245#139
+  +#162#245#140#163#245#140#163#245#143#166#245#148#170#245#153#177#245#159#183
+  +#246#167#191#247#172#196#248#174#197#248#172#195#248#167#190#247#161#182#246
+  +#155#177#245#152#172#245#149#170#244#148#169#244#150#170#244#150#170#244#151
+  +#171#243#153#172#244#153#172#243#153#172#243#155#173#244#155#174#244#156#174
+  +#244#157#175#244#158#176#243#158#176#243#159#177#243#160#177#243#160#178#243
+  +#162#179#243#176#182#207#185#185#185#186#186#186#186#186#186#186#186#186#186
+  +#186#186#186#186#186#186#186#186#187#187#187#187#187#187#187#187#187#188#188
+  +#188#189#189#189#189#189#189#189#189#189#190#190#190#190#190#190#192#192#192
+  +#192#192#192#193#193#193#193#193#193#194#194#194#195#195#195#196#196#196#197
+  +#197#197#197#197#197#199#199#199#199#199#199#200#200#200#201#201#201#202#202
+  +#202#203#203#203#203#203#203#204#204#204#205#205#205#205#205#205#206#206#206
+  +#207#207#207#207#207#207#209#210#210#210#210#210#211#212#212#213#214#214#214
+  +#215#215#216#217#217#217#218#218#217#218#218#217#219#219#218#219#219#217#218
+  +#218#217#218#218#219#219#219#218#219#219#219#219#219#220#220#220#221#221#221
+  +#222#222#222#222#222#222#223#223#223#224#224#224#225#225#225#225#225#225#226
+  +#226#226#226#226#226#228#228#228#228#228#228#228#228#228#229#229#229#230#230
+  +#230#231#231#231#231#231#231#231#231#231#232#232#232#233#233#233#233#233#233
+  +#234#234#234#234#234#234#234#234#234#235#235#235#237#237#237#237#237#237#238
+  +#238#238#238#238#238#238#238#238#238#238#238#239#239#239#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#243#243#243#242#242#242#242#242#242#242#242#242
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#243#243
+  +#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#245#245#245#244#244#244#245#245#245#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  ,#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#174
+  +#174#174#172#172#172#171#171#171#170#170#170#169#169#169#168#168#168#167#167
+  +#167#166#166#166#165#165#165#163#163#163#162#162#162#161#161#161#159#159#159
+  +#158#158#158#156#156#156#155#155#155#153#153#153#152#152#152#150#150#150#150
+  +#151#151#148#149#149#149#158#184#151#174#245#151#174#245#150#174#245#149#173
+  +#245#149#173#245#149#172#245#149#172#245#149#172#245#148#172#245#148#172#245
+  +#148#171#245#148#171#245#148#171#245#147#171#245#147#171#245#147#171#245#147
+  +#170#245#147#170#245#146#170#245#146#170#245#146#170#245#146#169#245#146#169
+  +#245#146#169#245#145#169#245#145#169#245#145#169#245#145#168#245#144#168#245
+  +#144#168#245#144#168#245#144#168#245#144#167#245#144#167#245#143#167#245#143
+  +#167#245#143#167#245#143#167#245#143#167#246#142#166#245#142#166#245#142#166
+  +#245#142#166#246#142#166#246#142#166#246#141#165#245#141#165#245#141#165#245
+  +#141#165#245#141#165#246#140#164#245#140#164#245#140#164#246#140#164#246#140
+  +#164#246#140#164#246#140#164#246#139#163#246#139#163#246#139#163#246#139#163
+  +#246#139#163#246#138#163#246#138#162#246#138#162#246#138#162#246#138#162#246
+  +#138#162#246#137#162#246#137#161#246#137#161#246#137#161#246#137#161#246#136
+  +#161#246#136#160#246#136#160#246#136#160#246#136#160#246#135#160#246#136#161
+  +#246#136#161#246#137#161#246#137#162#246#138#162#245#139#164#245#139#163#245
+  +#139#164#245#139#163#245#138#163#245#139#163#245#139#162#246#139#162#246#138
+  +#161#246#139#162#246#139#162#245#139#162#245#139#163#245#140#163#245#141#164
+  +#245#141#163#245#141#164#245#143#165#245#146#169#245#149#172#246#154#177#246
+  +#158#180#247#162#184#247#162#184#247#161#183#247#158#181#246#155#177#246#152
+  +#173#245#150#171#244#150#170#244#150#170#244#151#171#244#151#171#244#152#172
+  +#244#153#172#244#154#172#244#154#173#244#155#174#244#155#174#244#156#175#244
+  +#158#176#244#158#176#243#159#177#244#159#177#243#161#178#243#161#178#243#163
+  +#180#244#165#181#240#184#185#189#185#185#185#185#185#185#186#186#186#186#186
+  +#186#186#186#186#187#187#187#187#187#187#187#187#187#188#188#188#188#188#188
+  +#189#189#189#190#190#190#190#190#190#191#191#191#191#191#191#193#193#193#193
+  +#193#193#194#194#194#194#194#194#195#195#195#195#195#195#196#196#196#198#198
+  +#198#198#198#198#199#199#199#200#200#200#200#200#200#202#202#202#203#203#203
+  +#204#204#204#204#204#204#205#205#205#206#206#206#206#206#206#207#207#207#207
+  +#207#207#209#209#209#210#210#210#210#210#210#211#211#211#213#213#213#213#213
+  +#213#214#214#214#215#215#215#215#215#215#216#216#216#217#217#217#217#218#218
+  +#217#217#217#218#218#218#219#219#219#219#219#219#220#220#220#221#221#221#222
+  +#222#222#223#223#223#223#223#223#224#224#224#225#225#225#226#226#226#227#227
+  +#227#228#228#228#229#229#229#229#229#229#229#229#229#230#230#230#231#231#231
+  +#232#232#232#232#232#232#232#232#232#233#233#233#234#234#234#234#234#234#235
+  +#235#235#235#235#235#236#236#236#236#236#236#237#237#237#237#237#237#238#238
+  +#238#238#238#238#238#238#238#238#238#238#239#239#239#239#239#239#240#240#240
+  +#240#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242
+  +#242#241#241#241#241#241#241#242#242#242#241#241#241#242#242#242#241#241#241
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#243#243#243#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  ,#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#245#245#245#244#244#244#244#244#244#245#245#245#244#244#244#244#244#244#245
+  +#245#245#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#176#176
+  +#176#174#174#174#173#173#173#171#171#171#170#170#170#169#169#169#167#167#167
+  +#167#167#167#166#166#166#164#164#164#163#163#163#162#162#162#160#160#160#159
+  +#159#159#157#157#157#155#155#155#154#154#154#152#152#152#150#150#150#150#150
+  +#150#148#148#148#147#147#147#149#163#208#150#174#246#150#174#246#150#173#246
+  +#150#173#246#150#173#246#149#173#246#149#173#246#149#173#246#149#172#246#149
+  +#172#246#149#172#246#148#172#246#148#172#246#148#171#246#148#171#246#147#171
+  +#246#147#171#246#147#171#246#147#170#246#147#170#246#147#170#246#146#170#246
+  +#146#170#246#146#170#246#146#169#246#146#169#246#145#169#246#145#169#246#145
+  +#169#246#145#169#246#145#168#246#144#168#246#144#168#246#144#168#246#144#168
+  +#246#144#167#246#144#167#246#143#167#246#143#167#246#143#167#246#143#166#246
+  +#143#166#246#143#167#245#142#166#246#142#166#246#142#166#246#142#166#246#141
+  +#165#246#141#165#246#141#165#245#141#165#246#141#165#246#141#165#246#141#165
+  +#246#141#165#246#140#164#246#140#164#246#140#164#246#140#164#246#139#164#246
+  +#139#163#246#139#163#246#139#163#246#139#163#246#139#163#246#138#162#246#138
+  +#162#246#138#162#246#138#162#246#138#162#246#137#162#246#137#162#246#137#161
+  +#246#137#161#246#137#161#246#136#161#246#136#161#246#136#160#246#136#160#246
+  +#136#160#246#136#160#246#136#160#246#136#160#246#136#160#246#136#160#246#137
+  +#161#246#137#161#246#137#161#246#138#161#246#138#161#246#138#162#246#138#162
+  +#246#139#162#246#140#163#245#140#163#245#140#163#245#141#164#246#142#164#246
+  +#142#165#246#143#165#246#143#165#246#144#167#246#146#168#246#149#171#246#150
+  +#172#246#152#175#246#153#175#246#154#174#246#152#173#246#151#173#245#151#171
+  +#245#150#171#245#150#170#245#151#171#245#151#171#245#152#172#245#153#172#245
+  +#153#173#245#154#173#245#155#174#244#156#174#244#156#175#244#157#175#244#158
+  +#176#244#159#176#244#159#177#244#161#178#244#161#178#244#162#179#244#163#180
+  +#244#164#180#244#173#182#217#184#184#184#185#185#185#185#185#185#187#187#187
+  +#187#187#187#187#187#187#187#187#187#188#188#188#189#189#189#189#189#189#190
+  +#190#190#190#190#190#191#191#191#191#191#191#192#192#192#193#193#193#194#194
+  +#194#195#195#195#195#195#195#196#196#196#196#196#196#197#197#197#198#198#198
+  +#199#199#199#200#200#200#200#200#200#201#201#201#202#202#202#203#203#203#204
+  +#204#204#204#204#204#205#205#205#206#206#206#207#207#207#208#208#208#208#208
+  +#208#209#209#209#210#210#210#211#211#211#212#212#212#213#213#213#213#213#213
+  +#215#215#215#215#215#215#216#216#216#216#216#216#218#218#218#218#218#218#218
+  +#218#218#220#220#220#220#220#220#221#221#221#222#222#222#222#222#222#223#223
+  +#223#223#223#223#224#224#224#225#225#225#226#226#226#226#226#226#227#227#227
+  +#228#228#228#229#229#229#229#229#229#230#230#230#230#230#230#231#231#231#232
+  +#232#232#232#232#232#232#232#232#234#234#234#235#235#235#235#235#235#236#236
+  ,#236#236#236#236#237#237#237#237#237#237#238#238#238#238#238#238#239#239#239
+  +#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242#241#241#241#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#176#176#176
+  +#175#175#175#174#174#174#172#172#172#171#171#171#170#170#170#169#169#169#168
+  +#168#168#167#167#167#166#166#166#165#165#165#163#163#163#162#162#162#160#160
+  +#160#159#159#159#157#157#157#156#156#156#154#154#154#152#152#152#151#151#151
+  +#150#150#150#148#148#148#147#148#153#150#169#227#151#174#246#151#174#246#150
+  +#174#246#150#174#246#150#174#246#150#173#246#150#173#246#150#173#246#149#173
+  +#246#149#173#246#149#172#246#149#172#246#149#172#246#148#172#246#148#172#246
+  +#148#172#246#148#171#246#148#171#246#147#171#246#147#171#246#147#171#246#147
+  +#170#246#147#170#246#147#170#246#146#170#246#146#170#246#146#170#246#146#169
+  +#246#145#169#246#145#169#246#145#169#246#145#169#246#145#168#246#145#168#246
+  +#144#168#246#144#168#246#144#168#246#144#168#246#144#167#246#143#167#246#143
+  +#167#246#143#167#246#143#167#246#143#166#246#142#166#246#143#167#246#142#166
+  +#246#142#166#246#142#166#246#141#165#246#142#166#247#142#166#247#141#165#247
+  +#141#165#247#141#165#247#141#165#247#141#165#247#140#164#247#140#164#247#140
+  +#164#247#140#164#247#140#164#247#139#164#247#139#163#247#139#163#247#139#163
+  +#247#139#163#247#139#163#247#138#163#247#138#162#247#138#162#247#138#162#247
+  +#138#162#247#137#162#247#137#161#247#137#161#247#137#161#247#137#161#247#136
+  +#161#247#136#161#247#137#161#246#136#161#246#137#161#246#137#161#246#138#162
+  +#246#138#161#246#138#162#246#139#162#246#138#162#246#139#162#246#140#163#246
+  +#139#163#246#140#163#246#141#164#246#140#163#246#141#164#246#142#165#246#143
+  +#165#246#144#166#246#143#165#246#144#166#246#145#167#246#146#168#246#147#169
+  +#246#149#170#246#150#170#246#150#171#246#149#170#246#150#170#246#149#170#246
+  ,#150#170#246#151#171#246#151#172#245#152#172#245#153#172#245#154#173#245#154
+  +#173#245#155#174#245#156#175#245#157#175#245#158#176#245#158#176#245#158#177
+  +#245#159#177#245#161#178#245#162#179#245#162#180#245#163#180#244#164#181#244
+  +#165#181#244#165#182#244#179#183#199#184#184#184#185#185#185#185#185#185#186
+  +#186#186#187#187#187#187#187#187#188#188#188#189#189#189#190#190#190#191#191
+  +#191#191#191#191#192#192#192#192#192#192#193#193#193#194#194#194#195#195#195
+  +#195#195#195#197#197#197#197#197#197#198#198#198#199#199#199#199#199#199#200
+  +#200#200#201#201#201#201#201#201#202#202#202#203#203#203#204#204#204#205#205
+  +#205#205#205#205#206#206#206#207#207#207#207#207#207#209#209#209#209#209#209
+  +#210#210#210#211#211#211#211#211#211#212#212#212#213#213#213#214#214#214#215
+  +#215#215#216#216#216#215#215#215#217#217#217#218#218#218#218#218#218#219#219
+  +#219#221#221#221#221#221#221#222#222#222#222#222#222#224#224#224#224#224#224
+  +#225#225#225#225#225#225#226#226#226#227#227#227#227#227#227#228#228#228#229
+  +#229#229#230#230#230#230#230#230#231#231#231#231#231#231#232#232#232#233#233
+  +#233#233#233#233#234#234#234#234#234#234#235#235#235#236#236#236#236#236#236
+  +#236#236#236#237#237#237#238#238#238#238#238#238#238#238#238#239#239#239#239
+  +#239#239#239#239#239#240#240#240#240#240#240#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#178#178#178#177
+  +#177#177#176#176#176#175#175#175#172#172#172#171#171#171#170#170#170#169#169
+  +#169#168#168#168#167#167#167#165#165#165#165#165#165#163#163#163#162#162#162
+  +#160#160#160#159#159#159#156#156#156#155#155#155#153#153#153#152#152#152#151
+  +#151#151#150#150#150#149#149#149#149#153#166#151#173#241#151#175#247#151#175
+  +#247#151#174#247#151#174#247#151#174#247#150#174#247#150#174#247#150#174#247
+  +#150#173#247#150#173#247#150#173#247#149#173#247#149#173#247#149#172#247#149
+  ,#172#247#148#172#247#148#172#247#148#172#247#148#171#247#148#171#247#148#171
+  +#247#147#171#247#147#171#247#147#171#247#147#170#247#147#170#247#146#170#247
+  +#146#170#247#146#170#247#146#170#247#146#169#247#145#169#247#145#169#247#145
+  +#169#247#145#169#247#145#168#247#145#168#247#144#168#247#144#168#247#144#168
+  +#247#144#167#247#144#167#247#143#167#247#143#167#247#143#167#247#143#167#247
+  +#142#166#247#142#166#247#142#166#247#142#166#247#142#166#247#142#166#247#142
+  +#166#247#142#166#247#142#166#247#141#165#247#141#165#247#141#165#247#140#164
+  +#247#140#164#247#140#164#247#140#164#247#140#164#247#139#163#247#140#164#247
+  +#139#163#247#139#163#247#139#163#247#139#163#247#139#163#247#138#163#247#138
+  +#163#247#138#162#247#138#162#247#138#162#247#137#162#247#137#162#247#137#161
+  +#247#137#161#247#137#162#247#137#161#247#138#162#247#138#161#247#138#162#247
+  +#139#163#247#139#162#247#139#163#247#139#163#247#139#163#247#140#164#247#140
+  +#164#247#141#164#247#141#164#246#141#164#246#142#164#246#143#165#246#143#166
+  +#246#144#166#246#145#167#246#145#167#246#145#167#246#145#167#246#147#168#247
+  +#148#169#246#148#169#246#148#169#246#150#170#246#149#170#246#150#171#246#151
+  +#171#246#151#171#246#152#172#246#152#172#245#154#173#246#154#173#245#155#174
+  +#246#157#175#246#157#176#246#157#176#246#159#177#246#159#177#246#160#178#245
+  +#161#179#245#162#179#245#163#180#245#163#180#245#164#181#245#164#181#245#165
+  +#182#245#167#183#245#170#184#237#183#184#188#185#185#185#185#185#185#186#186
+  +#186#187#187#187#188#188#188#188#188#188#189#189#189#190#190#190#190#190#190
+  +#191#191#191#192#192#192#192#192#192#194#194#194#194#194#194#195#195#195#195
+  +#195#195#196#196#196#197#197#197#199#199#199#199#199#199#200#200#200#201#201
+  +#201#201#201#201#203#203#203#203#203#203#204#204#204#205#205#205#205#205#205
+  +#207#207#207#207#207#207#208#208#208#209#209#209#209#209#209#210#210#210#211
+  +#211#211#212#212#212#212#212#212#214#214#214#214#214#214#215#215#215#216#216
+  +#216#216#216#216#217#217#217#218#218#218#219#219#219#219#219#219#220#220#220
+  +#221#221#221#221#221#221#222#222#222#223#223#223#224#224#224#224#224#224#225
+  +#225#225#226#226#226#227#227#227#227#227#227#227#227#227#228#228#228#230#230
+  +#230#231#231#231#231#231#231#232#232#232#231#231#231#233#233#233#234#234#234
+  +#234#234#234#235#235#235#236#236#236#236#236#236#237#237#237#237#237#237#237
+  +#237#237#238#238#238#238#238#238#239#239#239#240#240#240#240#240#240#240#240
+  +#240#240#240#240#241#241#241#241#241#241#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#246#246#246#245#245#245#246#246#246#245#245#245#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  ,#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#179#179#179#178#178
+  +#178#176#176#176#175#175#175#175#175#175#172#172#172#171#171#171#170#170#170
+  +#169#169#169#168#168#168#166#166#166#165#165#165#164#164#164#162#162#162#161
+  +#161#161#160#160#160#158#158#158#157#157#157#154#154#154#153#153#153#152#152
+  +#152#151#151#151#150#150#150#149#149#149#150#159#185#152#175#247#152#175#247
+  +#152#175#247#151#175#247#151#175#247#151#175#247#151#174#247#151#174#247#151
+  +#174#247#150#174#247#150#174#247#150#173#247#150#173#247#150#173#247#149#173
+  +#247#149#173#247#149#173#247#149#172#247#149#172#247#148#172#247#148#172#247
+  +#148#172#247#148#171#247#148#171#247#148#171#247#147#171#247#147#171#247#147
+  +#171#247#147#170#247#146#170#247#146#170#247#146#170#247#146#170#247#146#169
+  +#247#146#169#247#145#169#247#145#169#247#145#169#247#145#169#247#145#168#247
+  +#144#168#247#144#168#247#144#168#247#144#168#247#144#167#247#143#167#247#143
+  +#167#247#143#167#247#143#167#247#143#167#247#143#167#248#142#166#247#142#166
+  +#247#142#166#247#142#166#247#142#166#247#141#165#247#141#165#247#141#165#248
+  +#141#165#247#141#165#248#140#164#247#141#165#248#140#164#247#140#164#247#140
+  +#164#247#139#163#247#140#164#248#140#164#248#139#164#248#139#163#248#139#163
+  +#248#139#163#248#139#163#248#138#163#248#138#162#248#138#162#248#138#162#248
+  +#138#162#248#138#162#247#138#162#247#139#162#247#138#162#247#139#163#247#139
+  +#163#247#139#163#247#140#163#247#140#163#247#140#164#247#141#164#247#142#165
+  +#247#142#165#247#142#165#247#143#165#247#143#165#247#143#166#247#144#166#247
+  +#144#167#247#145#167#247#145#167#247#146#167#247#146#168#247#147#169#247#148
+  +#169#246#149#169#246#149#170#246#150#170#246#151#171#246#152#172#247#151#171
+  +#246#151#172#246#153#173#247#154#173#246#155#174#246#155#174#246#156#175#246
+  +#156#176#246#158#176#246#157#176#246#160#178#246#160#178#246#161#179#246#162
+  +#180#246#162#180#246#163#181#246#164#181#246#165#182#246#165#182#246#167#183
+  +#246#168#184#246#169#184#246#178#184#207#185#185#185#186#186#186#187#187#187
+  +#187#187#187#188#188#188#189#189#189#189#189#189#190#190#190#191#191#191#192
+  +#192#192#193#193#193#193#193#193#194#194#194#195#195#195#196#196#196#196#196
+  +#196#197#197#197#198#198#198#199#199#199#199#199#199#200#200#200#202#202#202
+  +#202#202#202#203#203#203#203#203#203#204#204#204#205#205#205#206#206#206#207
+  +#207#207#208#208#208#208#208#208#209#209#209#210#210#210#210#210#210#211#211
+  +#211#213#213#213#214#214#214#215#215#215#215#215#215#216#216#216#217#217#217
+  +#217#217#217#218#218#218#219#219#219#220#220#220#220#220#220#221#221#221#222
+  +#222#222#222#222#222#223#223#223#224#224#224#225#225#225#225#225#225#226#226
+  +#226#227#227#227#228#228#228#228#228#228#229#229#229#229#229#229#230#230#230
+  +#231#231#231#231#231#231#232#232#232#232#232#232#234#234#234#234#234#234#234
+  +#234#234#235#235#235#236#236#236#236#236#236#237#237#237#237#237#237#237#237
+  +#237#238#238#238#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240
+  +#240#240#240#241#241#241#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244#244
+  +#244#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245
+  +#244#244#244#245#245#245#244#244#244#245#245#245#244#244#244#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  ,#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#181#181#181#179#179#179
+  +#178#178#178#177#177#177#175#175#175#174#174#174#172#172#172#171#171#171#170
+  +#170#170#169#169#169#168#168#168#167#167#167#166#166#166#164#164#164#163#163
+  +#163#161#161#161#159#159#159#158#158#158#156#156#156#155#155#155#154#154#154
+  +#152#152#152#151#151#151#150#150#150#149#149#149#150#164#203#153#176#248#152
+  +#175#247#152#176#248#152#175#248#152#175#248#152#175#248#151#175#248#151#175
+  +#248#151#175#248#151#174#248#151#174#248#151#174#248#150#174#248#150#174#248
+  +#150#173#248#150#173#248#149#173#248#149#173#248#149#173#248#149#172#248#149
+  +#173#247#149#172#248#148#172#248#148#172#248#148#172#248#148#171#248#148#171
+  +#248#147#171#248#147#171#248#147#171#248#147#171#248#147#170#248#146#170#248
+  +#146#170#248#146#170#248#146#170#248#146#169#248#146#169#248#145#169#248#145
+  +#169#248#145#169#248#145#168#248#145#168#248#144#168#248#144#168#248#144#168
+  +#248#144#168#248#143#167#248#143#167#248#143#167#248#143#167#248#143#167#248
+  +#143#167#248#142#166#248#142#166#248#142#166#248#142#166#248#142#166#248#141
+  +#165#248#141#165#248#141#165#248#141#165#248#141#165#248#140#165#248#140#164
+  +#248#140#164#248#140#164#248#140#164#248#140#164#248#139#164#248#140#164#248
+  +#139#164#248#139#164#248#139#163#248#139#163#248#139#163#248#138#163#248#138
+  +#163#248#139#163#248#139#163#248#139#163#248#140#164#248#140#164#248#140#164
+  +#248#140#164#248#141#164#248#141#164#248#141#164#248#142#165#248#142#165#248
+  +#142#165#248#143#166#248#143#166#247#143#166#247#144#167#247#145#167#247#145
+  +#167#247#146#168#247#147#168#247#147#168#247#147#169#247#148#169#247#148#170
+  +#247#149#170#247#150#171#247#150#171#247#151#172#247#152#172#247#152#172#247
+  +#153#173#247#154#174#247#154#173#247#156#175#246#155#175#246#156#175#246#157
+  +#176#246#158#177#246#159#177#246#160#178#246#160#179#246#161#179#246#162#180
+  +#246#163#180#246#163#181#246#164#181#246#165#182#246#166#183#246#167#184#246
+  +#168#184#246#170#185#242#183#184#188#185#185#185#186#186#186#188#188#188#188
+  +#188#188#188#188#188#189#189#189#190#190#190#192#192#192#192#192#192#193#193
+  +#193#194#194#194#194#194#194#195#195#195#196#196#196#197#197#197#198#198#198
+  +#198#198#198#199#199#199#200#200#200#201#201#201#202#202#202#202#202#202#203
+  +#203#203#204#204#204#204#204#204#206#206#206#206#206#206#207#207#207#208#208
+  +#208#208#208#208#209#209#209#210#210#210#210#210#210#211#211#211#212#212#212
+  +#213#213#213#214#214#214#215#215#215#215#215#215#216#216#216#217#217#217#218
+  +#218#218#218#218#218#219#219#219#220#220#220#220#220#220#221#221#221#222#222
+  +#222#223#223#223#223#223#223#224#224#224#225#225#225#225#225#225#227#227#227
+  +#227#227#227#229#229#229#228#228#228#230#230#230#230#230#230#232#232#232#231
+  +#231#231#232#232#232#232#232#232#233#233#233#235#235#235#235#235#235#235#235
+  +#235#236#236#236#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238
+  +#239#239#239#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241#241
+  +#241#241#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  ,#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#244#244#244#243#243#243#244#244#244#243#243#243#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#244#244#244
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246
+  +#246#246#246#246#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#182#182#182#181#181#181#180
+  +#180#180#178#178#178#176#176#176#175#175#175#174#174#174#173#173#173#171#171
+  +#171#170#170#170#169#169#169#168#168#168#167#167#167#165#165#165#164#164#164
+  +#162#162#162#161#161#161#159#159#159#158#158#158#156#156#156#155#155#155#154
+  +#154#154#152#152#152#152#152#152#151#151#151#150#150#150#152#168#217#153#176
+  +#248#153#176#248#153#176#248#152#176#248#152#176#248#152#176#248#152#175#248
+  +#152#175#248#152#175#248#151#175#248#151#175#248#151#174#248#151#174#248#151
+  +#174#248#150#174#248#150#174#248#150#174#248#150#173#248#150#173#248#149#173
+  +#248#149#173#248#149#173#248#149#172#248#149#172#248#149#172#248#148#172#248
+  +#148#172#248#148#172#248#148#171#248#147#171#248#147#171#248#147#171#248#147
+  +#171#248#147#170#248#147#170#248#146#170#248#146#170#248#146#170#248#146#170
+  +#248#146#169#248#145#169#248#145#169#248#145#169#248#145#169#248#145#168#248
+  +#144#168#248#144#168#248#144#168#248#144#168#248#144#168#248#143#167#248#143
+  +#167#248#143#167#248#143#167#248#143#167#248#143#167#248#142#166#248#142#166
+  +#248#142#166#248#142#166#248#141#166#248#141#165#248#141#165#248#141#165#248
+  +#141#165#248#141#165#248#140#164#248#140#164#248#140#164#248#140#164#248#140
+  +#164#248#139#164#248#139#164#248#139#163#248#139#163#248#139#163#248#139#163
+  +#248#139#163#248#139#163#248#139#163#248#139#163#248#141#164#248#140#164#248
+  +#140#164#248#141#165#248#141#165#248#142#165#248#142#166#248#143#166#248#144
+  +#166#248#144#166#248#144#167#248#145#167#248#145#167#248#146#168#248#146#168
+  +#248#147#169#248#147#169#248#147#169#248#149#170#248#148#170#248#149#170#248
+  +#150#171#248#151#171#248#151#172#247#152#173#247#153#173#247#153#173#247#154
+  +#174#247#155#174#247#155#175#247#156#175#247#157#176#247#157#177#247#158#177
+  +#247#159#178#247#160#178#247#161#179#247#161#179#247#162#180#247#163#180#247
+  +#164#182#247#164#182#247#165#182#246#166#183#246#167#184#246#168#184#246#169
+  +#185#246#176#184#215#184#184#184#185#185#185#186#186#186#187#187#187#188#188
+  ,#188#189#189#189#189#189#189#191#191#191#192#192#192#192#192#192#193#193#193
+  +#194#194#194#194#194#194#195#195#195#197#197#197#197#197#197#198#198#198#198
+  +#198#198#199#199#199#201#201#201#201#201#201#202#202#202#203#203#203#203#203
+  +#203#204#204#204#204#204#204#207#207#207#207#207#207#208#208#208#209#209#209
+  +#209#209#209#210#210#210#211#211#211#211#211#211#213#213#213#214#214#214#214
+  +#214#214#215#215#215#216#216#216#216#216#216#217#217#217#218#218#218#218#218
+  +#218#219#219#219#220#220#220#221#221#221#221#221#221#222#222#222#223#223#223
+  +#224#224#224#224#224#224#226#226#226#226#226#226#227#227#227#227#227#227#228
+  +#228#228#229#229#229#229#229#229#230#230#230#231#231#231#232#232#232#232#232
+  +#232#233#233#233#233#233#233#234#234#234#235#235#235#235#235#235#235#235#235
+  +#236#236#236#237#237#237#237#237#237#238#238#238#238#238#238#238#238#238#239
+  +#239#239#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241#243#243
+  +#243#242#242#242#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246
+  +#246#246#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#184#184#184#182#182#182#181#181
+  +#181#180#180#180#178#178#178#176#176#176#175#175#175#175#175#175#172#172#172
+  +#171#171#171#170#170#170#169#169#169#167#167#167#167#167#167#166#166#166#164
+  +#164#164#163#163#163#161#161#161#160#160#160#158#158#158#156#156#156#155#155
+  +#155#154#154#154#152#152#152#151#151#151#151#151#151#150#151#156#153#172#230
+  +#154#177#249#153#176#248#153#177#249#153#176#249#152#176#248#152#176#248#152
+  +#175#248#152#176#249#152#175#248#152#175#249#152#175#249#151#174#248#151#174
+  +#248#151#174#248#151#174#249#150#174#248#150#174#249#150#174#249#150#173#248
+  +#150#173#249#150#173#249#149#173#248#149#172#248#149#173#249#149#173#249#149
+  +#172#249#149#172#249#148#172#249#148#172#249#148#172#249#148#172#249#148#171
+  +#249#147#171#249#147#171#249#147#171#249#147#171#249#147#170#249#147#170#249
+  ,#146#170#249#146#170#249#146#170#249#146#169#249#146#169#249#145#169#249#145
+  +#169#249#145#169#249#145#169#249#144#168#249#144#168#249#144#168#249#144#168
+  +#249#144#168#249#144#168#249#143#167#249#143#167#249#143#167#249#143#167#249
+  +#143#167#249#142#166#249#142#166#249#142#166#249#142#166#249#142#166#249#141
+  +#166#249#141#165#249#141#165#249#141#165#249#141#165#249#141#165#249#140#165
+  +#249#140#164#249#140#164#249#140#164#249#140#164#249#139#164#249#140#164#248
+  +#139#164#248#140#164#248#140#164#248#141#165#248#141#165#248#141#165#248#142
+  +#165#248#142#165#248#142#165#248#143#166#248#143#166#248#143#166#248#144#167
+  +#248#144#166#248#144#167#248#146#168#249#146#168#248#146#168#248#146#168#248
+  +#147#169#248#148#169#248#148#170#248#149#170#248#149#170#248#149#170#248#150
+  +#171#248#151#172#248#152#173#248#153#173#248#153#173#247#153#173#247#154#174
+  +#247#155#174#247#156#176#248#156#176#247#158#177#248#158#177#248#159#178#248
+  +#160#178#248#160#179#247#161#180#247#162#180#247#163#181#247#163#181#247#164
+  +#182#247#166#183#247#167#184#247#167#184#247#168#185#247#169#185#247#169#186
+  +#247#182#184#192#185#185#185#186#186#186#187#187#187#188#188#188#189#189#189
+  +#189#189#189#191#191#191#192#192#192#192#192#192#193#193#193#194#194#194#194
+  +#194#194#195#195#195#197#197#197#198#198#198#198#198#198#199#199#199#199#199
+  +#199#200#200#200#201#201#201#202#202#202#203#203#203#204#204#204#204#204#204
+  +#205#205#205#206#206#206#207#207#207#207#207#207#208#208#208#209#209#209#209
+  +#209#209#211#211#211#212#212#212#212#212#212#213#213#213#214#214#214#214#214
+  +#214#215#215#215#216#216#216#216#216#216#217#217#217#218#218#218#219#219#219
+  +#219#219#219#222#222#222#221#221#221#222#222#222#222#222#222#224#224#224#224
+  +#224#224#224#224#224#226#226#226#226#226#226#226#226#226#227#227#227#229#229
+  +#229#229#229#229#230#230#230#231#231#231#232#232#232#232#232#232#233#233#233
+  +#234#234#234#234#234#234#235#235#235#236#236#236#236#236#236#236#236#236#237
+  +#237#237#238#238#238#238#238#238#239#239#239#239#239#239#240#240#240#240#240
+  +#240#241#241#241#241#241#241#242#242#242#242#242#242#242#242#242#243#243#243
+  +#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#245#245#245#244#244#244#245#245#245
+  +#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246
+  +#246#246#246#246#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  ,#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#185#185#185#184#184#184#182#182#182
+  +#181#181#181#180#180#180#178#178#178#177#177#177#175#175#175#174#174#174#172
+  +#172#172#171#171#171#170#170#170#169#169#169#168#168#168#167#167#167#165#165
+  +#165#164#164#164#162#162#162#161#161#161#160#160#160#158#158#158#156#156#156
+  +#155#155#155#154#154#154#153#153#153#152#152#152#151#151#151#151#154#163#154
+  +#176#243#154#177#249#153#177#249#153#177#249#153#176#249#153#176#249#153#176
+  +#249#152#176#249#152#176#249#152#176#249#152#175#249#152#175#249#152#175#249
+  +#152#175#249#151#175#249#151#174#249#151#175#249#151#175#249#151#174#249#150
+  +#174#249#150#173#249#150#173#249#150#173#249#150#173#249#149#173#249#150#173
+  +#249#149#173#248#149#173#249#149#173#249#149#172#249#148#172#249#148#172#249
+  +#148#171#249#148#172#249#147#171#249#148#171#249#147#171#249#147#170#249#147
+  +#171#249#147#171#249#147#170#249#146#170#249#146#170#249#146#170#249#146#170
+  +#249#146#169#249#145#169#249#145#169#249#145#169#249#145#169#249#145#169#249
+  +#144#168#249#144#168#249#144#168#249#144#168#249#144#168#249#144#168#249#143
+  +#167#249#143#167#249#143#167#249#143#167#249#142#167#249#142#166#249#142#166
+  +#249#142#166#249#142#166#249#142#166#249#141#165#249#141#165#249#141#165#249
+  +#141#165#249#141#165#249#140#165#249#140#165#249#140#164#249#140#165#249#140
+  +#164#249#141#165#249#141#165#249#142#165#249#141#165#249#142#166#249#143#166
+  +#249#142#166#249#143#166#249#143#167#249#144#167#249#144#167#249#145#167#249
+  +#145#168#249#145#168#249#146#168#249#147#169#248#147#169#248#147#169#248#148
+  +#170#248#148#170#248#149#171#248#149#171#248#149#171#248#151#172#248#151#172
+  +#248#152#172#248#152#173#248#153#173#248#154#174#248#154#174#248#155#175#248
+  +#156#175#248#156#176#248#157#176#248#158#177#248#158#177#248#159#178#248#161
+  +#179#247#161#179#247#161#180#247#162#180#247#164#181#247#164#182#247#165#183
+  +#247#166#183#247#167#184#247#168#185#248#168#185#247#170#187#248#176#186#223
+  +#184#184#184#185#185#185#186#186#186#187#187#187#188#188#188#189#189#189#190
+  +#190#190#192#192#192#192#192#192#192#192#192#193#193#193#194#194#194#195#195
+  +#195#197#197#197#197#197#197#198#198#198#199#199#199#200#200#200#200#200#200
+  +#202#202#202#202#202#202#203#203#203#204#204#204#205#205#205#206#206#206#206
+  +#206#206#207#207#207#208#208#208#208#208#208#209#209#209#210#210#210#211#211
+  +#211#212#212#212#212#212#212#213#213#213#214#214#214#215#215#215#215#215#215
+  +#216#216#216#217#217#217#217#217#217#219#219#219#219#219#219#220#220#220#221
+  +#221#221#222#222#222#222#222#222#223#223#223#224#224#224#224#224#224#225#225
+  +#225#226#226#226#227#227#227#227#227#227#228#228#228#229#229#229#229#229#229
+  +#230#230#230#230#230#230#231#231#231#232#232#232#232#232#232#233#233#233#233
+  +#233#233#234#234#234#235#235#235#236#236#236#236#236#236#237#237#237#237#237
+  +#237#238#238#238#239#239#239#239#239#239#239#239#239#240#240#240#241#241#241
+  +#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243
+  +#243#243#244#244#244#244#244#244#245#245#245#244#244#244#245#245#245#244#244
+  +#244#244#244#244#245#245#245#245#245#245#244#244#244#244#244#244#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246
+  +#245#245#245#246#246#246#245#245#245#245#245#245#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  ,#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#187#187#187#185#185#185#184#184#184#182
+  +#182#182#181#181#181#180#180#180#178#178#178#177#177#177#175#175#175#174#174
+  +#174#172#172#172#171#171#171#170#170#170#169#169#169#168#168#168#167#167#167
+  +#165#165#165#164#164#164#162#162#162#161#161#161#160#160#160#158#158#158#157
+  +#157#157#156#156#156#154#154#154#153#153#153#152#152#152#152#152#152#152#156
+  +#170#154#176#243#154#177#249#154#177#249#154#177#249#153#177#249#153#177#249
+  +#153#177#249#153#176#249#153#176#249#153#176#249#152#176#249#152#176#249#152
+  +#175#249#152#175#249#152#175#249#151#175#249#151#175#249#151#175#249#151#174
+  +#249#151#174#249#150#174#249#150#174#249#150#174#249#150#173#249#150#173#249
+  +#150#173#249#149#173#249#149#173#249#149#173#249#149#172#249#148#172#249#148
+  +#172#249#148#172#249#148#172#249#148#172#249#148#171#249#147#171#249#147#171
+  +#249#147#171#249#147#171#249#147#171#249#146#170#249#146#170#249#146#170#249
+  +#146#170#249#146#169#249#145#169#249#145#169#249#145#169#250#145#169#249#145
+  +#169#249#144#168#249#144#168#249#145#169#250#144#168#250#144#168#250#144#168
+  +#250#143#167#249#143#167#249#143#167#249#143#167#249#143#167#250#142#166#249
+  +#142#166#249#142#166#249#142#166#249#142#166#250#141#165#249#141#165#249#141
+  +#165#249#141#165#249#141#165#249#140#165#249#141#165#249#141#165#249#141#165
+  +#249#141#165#249#141#165#249#142#166#249#142#166#249#142#166#249#143#167#249
+  +#143#166#249#144#167#249#144#167#249#145#168#249#145#168#249#146#168#249#146
+  +#169#249#146#169#249#146#169#249#147#169#249#148#170#249#148#170#249#149#171
+  +#249#149#171#249#150#171#249#150#172#249#151#172#249#152#173#249#153#173#249
+  +#152#173#249#154#174#249#153#174#249#155#175#248#155#175#248#156#176#248#156
+  +#176#248#157#177#248#158#177#248#159#178#248#159#178#248#161#179#248#161#179
+  +#248#161#180#248#163#181#248#164#182#248#164#182#248#165#183#248#166#183#248
+  +#167#184#248#168#184#248#168#185#248#169#186#248#170#187#248#181#183#191#185
+  +#185#185#186#186#186#186#186#186#187#187#187#189#189#189#190#190#190#190#190
+  +#190#192#192#192#192#192#192#193#193#193#194#194#194#195#195#195#196#196#196
+  +#197#197#197#198#198#198#199#199#199#199#199#199#201#201#201#201#201#201#202
+  +#202#202#203#203#203#203#203#203#204#204#204#205#205#205#206#206#206#207#207
+  +#207#207#207#207#208#208#208#209#209#209#210#210#210#211#211#211#211#211#211
+  +#212#212#212#213#213#213#213#213#213#214#214#214#215#215#215#216#216#216#218
+  +#218#218#218#218#218#219#219#219#219#219#219#220#220#220#221#221#221#221#221
+  +#221#222#222#222#223#223#223#223#223#223#224#224#224#225#225#225#225#225#225
+  +#226#226#226#227#227#227#228#228#228#229#229#229#230#230#230#230#230#230#231
+  +#231#231#232#232#232#233#233#233#233#233#233#233#233#233#234#234#234#235#235
+  +#235#236#236#236#236#236#236#236#236#236#237#237#237#238#238#238#239#239#239
+  +#239#239#239#240#240#240#240#240#240#240#240#240#241#241#241#242#242#242#242
+  +#242#242#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244#244
+  +#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  ,#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#246#246#246#245#245#245#246#246#246#246#246#246#246#246#246
+  +#245#245#245#246#246#246#245#245#245#245#245#245#245#245#245#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247#246#246#246
+  +#247#247#247#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#188#188#188#187#187#187#186#186#186#184#184
+  +#184#182#182#182#181#181#181#180#180#180#178#178#178#177#177#177#176#176#176
+  +#174#174#174#173#173#173#172#172#172#171#171#171#170#170#170#168#168#168#167
+  +#167#167#166#166#166#164#164#164#163#163#163#161#161#161#160#160#160#159#159
+  +#159#157#157#157#156#156#156#155#155#155#154#154#154#153#153#153#152#152#152
+  +#153#160#182#155#178#250#155#178#250#154#178#250#154#178#250#154#177#250#154
+  +#177#250#154#177#250#153#177#250#153#177#250#153#177#250#153#176#250#153#176
+  +#250#153#176#250#152#176#250#152#176#250#152#175#250#152#175#250#151#175#250
+  +#151#175#250#151#175#250#151#174#250#151#174#250#151#174#250#150#174#250#150
+  +#174#250#150#174#250#150#173#250#150#173#250#149#173#250#149#173#250#149#173
+  +#250#149#173#250#149#172#250#148#172#250#148#172#250#148#172#250#148#172#250
+  +#148#171#250#148#171#250#147#171#250#147#171#250#147#171#250#147#170#250#147
+  +#170#250#146#170#250#146#170#250#146#170#250#146#170#250#145#169#250#145#169
+  +#250#145#169#250#145#169#250#145#169#250#145#169#250#144#168#250#144#168#250
+  +#144#168#250#144#168#250#144#168#250#143#167#250#143#167#250#143#167#250#143
+  +#167#250#143#167#250#142#167#250#142#166#250#142#166#250#142#166#250#142#166
+  +#250#142#166#250#141#166#250#141#165#250#141#166#249#141#166#249#141#165#249
+  +#142#166#249#142#165#249#142#166#249#143#167#249#143#166#249#143#167#249#143
+  +#167#249#144#167#249#144#168#249#145#168#249#145#168#249#146#168#249#146#169
+  +#249#146#169#249#147#169#249#147#169#249#148#171#250#149#171#249#148#170#249
+  +#151#172#249#150#172#249#150#172#249#152#173#249#152#173#249#153#173#249#153
+  +#174#249#154#174#249#154#174#249#154#175#249#156#176#248#157#177#249#158#178
+  +#249#158#177#248#159#178#248#160#179#249#160#179#248#161#180#248#162#180#248
+  +#163#181#249#164#182#249#165#182#249#165#183#249#166#184#249#167#184#248#167
+  +#185#248#169#186#248#170#186#248#171#187#248#176#186#224#184#184#184#185#185
+  +#185#186#186#186#187#187#187#188#188#188#190#190#190#191#191#191#192#192#192
+  +#192#192#192#193#193#193#194#194#194#195#195#195#196#196#196#197#197#197#198
+  +#198#198#198#198#198#199#199#199#201#201#201#202#202#202#202#202#202#203#203
+  +#203#204#204#204#205#205#205#206#206#206#207#207#207#207#207#207#208#208#208
+  +#209#209#209#209#209#209#210#210#210#211#211#211#212#212#212#212#212#212#213
+  ,#213#213#214#214#214#214#214#214#215#215#215#216#216#216#217#217#217#218#218
+  +#218#218#218#218#219#219#219#220#220#220#220#220#220#221#221#221#222#222#222
+  +#222#222#222#223#223#223#224#224#224#225#225#225#225#225#225#226#226#226#227
+  +#227#227#228#228#228#228#228#228#229#229#229#230#230#230#230#230#230#231#231
+  +#231#232#232#232#232#232#232#233#233#233#233#233#233#234#234#234#235#235#235
+  +#236#236#236#237#237#237#237#237#237#237#237#237#238#238#238#238#238#238#239
+  +#239#239#240#240#240#240#240#240#240#240#240#241#241#241#242#242#242#242#242
+  +#242#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#246#246#246#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246
+  +#246#246#246#246#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#189#189#189#188#188#188#186#186#186#185#185#185
+  +#184#184#184#182#182#182#181#181#181#180#180#180#178#178#178#177#177#177#175
+  +#175#175#174#174#174#173#173#173#172#172#172#171#171#171#170#170#170#168#168
+  +#168#167#167#167#166#166#166#165#165#165#163#163#163#161#161#161#160#160#160
+  +#159#159#159#157#157#157#156#156#156#155#155#155#154#154#154#153#153#153#153
+  +#153#153#154#162#189#155#178#250#155#178#250#155#178#250#155#178#250#154#178
+  +#250#154#178#250#154#178#250#154#177#250#154#177#250#154#177#250#153#177#250
+  +#153#177#250#153#176#250#153#176#250#153#176#250#152#176#250#152#176#250#152
+  +#176#250#152#175#250#152#175#250#151#174#250#151#175#250#151#175#250#151#174
+  +#250#151#174#250#151#174#250#150#174#250#150#174#250#150#174#250#150#173#250
+  +#149#173#250#149#173#250#149#173#250#149#173#250#149#172#250#149#172#250#148
+  +#172#250#148#172#250#148#172#250#148#172#250#148#171#250#147#171#250#147#171
+  +#250#147#171#250#147#171#250#147#170#250#146#170#250#146#170#250#146#170#250
+  +#146#170#250#146#170#250#145#169#250#145#169#250#145#169#250#145#169#250#145
+  +#169#250#145#169#250#144#168#250#144#168#250#144#168#250#144#168#250#143#168
+  ,#250#143#167#250#143#167#250#143#167#250#143#167#250#143#167#250#142#166#250
+  +#142#166#250#142#166#250#142#166#250#142#166#250#142#166#250#142#166#250#143
+  +#166#250#142#166#250#143#167#250#143#167#250#143#167#250#144#167#250#145#168
+  +#250#145#168#250#145#168#250#146#169#250#146#168#250#146#169#250#147#170#250
+  +#148#170#250#147#170#250#148#170#250#148#171#250#149#171#249#150#172#249#151
+  +#172#249#151#172#249#151#173#249#152#173#249#153#174#249#153#174#249#154#175
+  +#249#155#175#249#155#175#249#156#176#249#157#177#249#157#177#249#158#178#249
+  +#159#178#249#160#179#249#160#179#249#161#180#249#162#180#249#162#181#249#163
+  +#181#249#164#182#249#165#183#249#165#183#249#166#184#249#167#184#248#169#185
+  +#248#169#186#248#170#187#248#171#187#248#180#184#199#184#184#184#185#185#185
+  +#187#187#187#188#188#188#189#189#189#190#190#190#191#191#191#192#192#192#193
+  +#193#193#194#194#194#195#195#195#195#195#195#196#196#196#197#197#197#198#198
+  +#198#200#200#200#200#200#200#201#201#201#202#202#202#203#203#203#204#204#204
+  +#204#204#204#205#205#205#206#206#206#207#207#207#208#208#208#208#208#208#210
+  +#210#210#210#210#210#211#211#211#211#211#211#212#212#212#213#213#213#213#213
+  +#213#215#215#215#215#215#215#216#216#216#216#216#216#217#217#217#218#218#218
+  +#218#218#218#219#219#219#220#220#220#220#220#220#221#221#221#222#222#222#223
+  +#223#223#223#223#223#225#225#225#225#225#225#225#225#225#226#226#226#227#227
+  +#227#228#228#228#228#228#228#229#229#229#230#230#230#231#231#231#232#232#232
+  +#233#233#233#234#234#234#234#234#234#234#234#234#235#235#235#236#236#236#237
+  +#237#237#237#237#237#238#238#238#238#238#238#239#239#239#240#240#240#240#240
+  +#240#241#241#241#241#241#241#242#242#242#242#242#242#243#243#243#242#242#242
+  +#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#247#247#247#246#246#246#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  ,#247#247#247#247#247#247#190#190#190#189#189#189#188#188#188#187#187#187#185
+  +#185#185#184#184#184#182#182#182#181#181#181#180#180#180#178#178#178#177#177
+  +#177#175#175#175#174#174#174#173#173#173#172#172#172#171#171#171#170#170#170
+  +#168#168#168#167#167#167#166#166#166#164#164#164#163#163#163#161#161#161#160
+  +#160#160#159#159#159#157#157#157#156#156#156#155#155#155#154#154#154#153#153
+  +#153#152#152#152#154#162#189#155#179#250#155#178#250#155#178#250#155#178#250
+  +#154#178#250#154#178#250#154#178#250#154#177#250#154#177#250#154#177#250#153
+  +#177#250#153#177#250#153#176#250#153#176#250#153#176#250#152#176#250#152#176
+  +#250#152#176#250#152#175#250#152#175#250#151#175#250#151#175#250#151#175#250
+  +#151#174#250#151#174#250#151#174#250#150#174#250#150#174#250#150#174#250#150
+  +#173#250#149#173#250#149#173#250#149#173#250#149#173#250#149#172#250#149#172
+  +#250#148#172#250#148#172#250#148#172#250#148#172#250#148#171#250#147#171#250
+  +#147#171#250#148#171#251#147#171#251#147#170#250#147#171#251#146#170#250#146
+  +#170#250#146#170#251#146#170#250#146#170#251#146#170#251#146#170#251#145#169
+  +#251#145#169#250#145#169#251#145#169#251#144#168#250#144#168#250#144#168#251
+  +#144#168#251#144#168#251#143#167#250#143#168#251#143#167#250#143#167#250#143
+  +#167#251#143#167#251#142#166#250#143#167#250#142#166#250#143#167#250#143#167
+  +#250#144#168#250#143#167#250#144#167#250#143#167#250#145#168#250#145#168#250
+  +#146#169#250#145#169#250#146#169#250#147#169#250#147#169#250#147#170#250#148
+  +#170#250#149#170#250#149#171#250#149#172#250#149#171#249#150#172#249#152#173
+  +#250#151#172#249#152#173#250#152#173#249#153#174#250#154#174#249#154#175#249
+  +#155#175#249#156#176#249#156#176#249#158#177#250#157#177#249#159#178#250#160
+  +#179#250#160#179#249#161#180#249#162#181#249#162#181#249#163#182#249#164#182
+  +#249#165#183#249#166#183#249#166#184#249#168#185#249#168#186#249#169#186#249
+  +#170#187#249#171#187#249#175#187#232#184#184#184#185#185#185#187#187#187#188
+  +#188#188#188#188#188#190#190#190#191#191#191#191#191#191#192#192#192#193#193
+  +#193#195#195#195#196#196#196#196#196#196#197#197#197#199#199#199#200#200#200
+  +#200#200#200#201#201#201#202#202#202#203#203#203#204#204#204#205#205#205#205
+  +#205#205#207#207#207#208#208#208#208#208#208#209#209#209#210#210#210#211#211
+  +#211#212#212#212#212#212#212#213#213#213#213#213#213#214#214#214#215#215#215
+  +#216#216#216#216#216#216#217#217#217#217#217#217#218#218#218#219#219#219#219
+  +#219#219#220#220#220#221#221#221#221#221#221#222#222#222#223#223#223#223#223
+  +#223#224#224#224#226#226#226#226#226#226#226#226#226#228#228#228#229#229#229
+  +#229#229#229#229#229#229#230#230#230#231#231#231#231#231#231#232#232#232#233
+  +#233#233#234#234#234#234#234#234#234#234#234#236#236#236#236#236#236#237#237
+  +#237#237#237#237#238#238#238#239#239#239#239#239#239#240#240#240#241#241#241
+  +#241#241#241#241#241#241#242#242#242#242#242#242#243#243#243#243#243#243#244
+  +#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#247#247#247#246#246#246#246#246
+  +#246#246#246#246#247#247#247#246#246#246#247#247#247#246#246#246#247#247#247
+  +#247#247#247#246#246#246#247#247#247#247#247#247#246#246#246#247#247#247#246
+  +#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  ,#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#191#191#191#190#190#190#190#190#190#188#188#188#187#187
+  +#187#186#186#186#185#185#185#183#183#183#181#181#181#180#180#180#178#178#178
+  +#177#177#177#176#176#176#174#174#174#173#173#173#172#172#172#171#171#171#170
+  +#170#170#168#168#168#167#167#167#166#166#166#165#165#165#163#163#163#162#162
+  +#162#160#160#160#159#159#159#158#158#158#156#156#156#156#156#156#154#154#154
+  +#153#153#153#153#153#153#154#162#189#156#179#251#156#179#251#155#179#251#155
+  +#179#251#155#178#251#155#178#251#155#178#251#154#178#251#154#178#251#154#178
+  +#251#154#177#251#154#177#251#154#177#251#153#177#251#153#177#251#153#176#251
+  +#153#176#251#152#176#251#152#176#251#152#176#251#152#175#251#152#175#251#152
+  +#175#251#151#175#251#151#175#251#151#175#251#151#174#251#151#174#251#150#174
+  +#251#150#174#251#150#174#251#150#174#251#150#173#251#149#173#251#149#173#251
+  +#149#173#251#149#173#251#149#172#251#149#172#251#148#172#251#148#172#251#148
+  +#172#251#148#171#251#148#171#251#147#171#251#147#171#251#147#171#251#147#171
+  +#251#146#170#251#146#170#251#146#170#251#146#170#251#146#170#251#146#170#251
+  +#145#169#251#145#169#251#145#169#251#145#169#251#145#169#251#144#168#251#144
+  +#168#251#144#168#251#144#168#251#144#168#251#143#168#251#143#167#251#143#167
+  +#251#143#167#251#143#167#251#143#167#250#143#167#250#143#167#250#143#167#250
+  +#144#168#250#145#168#250#144#168#250#144#168#250#145#168#250#146#169#250#146
+  +#169#250#146#169#250#147#170#250#148#170#250#147#170#250#148#170#250#148#171
+  +#250#149#171#250#149#171#250#149#172#250#150#172#250#151#172#250#152#173#250
+  +#152#173#250#152#173#250#153#174#250#154#175#250#154#175#250#155#176#250#155
+  +#176#250#156#176#250#157#177#250#158#177#250#158#178#250#159#179#250#160#179
+  +#250#161#180#249#161#180#249#162#181#249#163#181#249#163#182#249#164#182#249
+  +#165#183#249#166#184#249#167#185#249#168#185#249#168#185#249#169#186#249#170
+  +#187#249#171#187#249#180#184#200#184#184#184#186#186#186#187#187#187#188#188
+  +#188#189#189#189#190#190#190#191#191#191#192#192#192#193#193#193#194#194#194
+  +#195#195#195#196#196#196#196#196#196#197#197#197#198#198#198#200#200#200#201
+  +#201#201#202#202#202#202#202#202#204#204#204#205#205#205#206#206#206#206#206
+  +#206#207#207#207#208#208#208#209#209#209#209#209#209#211#211#211#211#211#211
+  +#212#212#212#212#212#212#213#213#213#214#214#214#214#214#214#215#215#215#216
+  +#216#216#216#216#216#217#217#217#218#218#218#218#218#218#219#219#219#220#220
+  +#220#220#220#220#221#221#221#222#222#222#222#222#222#224#224#224#224#224#224
+  +#225#225#225#226#226#226#226#226#226#227#227#227#228#228#228#229#229#229#229
+  +#229#229#230#230#230#231#231#231#231#231#231#231#231#231#232#232#232#233#233
+  +#233#234#234#234#234#234#234#235#235#235#235#235#235#237#237#237#237#237#237
+  +#238#238#238#238#238#238#239#239#239#239#239#239#240#240#240#241#241#241#241
+  +#241#241#241#241#241#242#242#242#242#242#242#243#243#243#244#244#244#244#244
+  +#244#244#244#244#244#244#244#245#245#245#245#245#245#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#246#246#246
+  +#247#247#247#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#246#246#246#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#246#246#246#247#247#247#247#247#247#247#247#247#247#247
+  ,#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#0#0#6'TBevel'#6'Bevel2'#6'Height'#2#2#3'Top'#2'@'#5'Width'#3
+  +#243#1#5'Align'#7#5'alTop'#5'Shape'#7#9'bsTopLine'#0#0#6'TBevel'#6'Bevel3'#6
+  +'Height'#2#2#3'Top'#3'w'#1#5'Width'#3#243#1#5'Align'#7#8'alBottom'#5'Shape'#7
+  +#9'bsTopLine'#0#0#6'TLabel'#6'Label1'#4'Left'#2#8#6'Height'#2#16#3'Top'#2'P'
+  +#5'Width'#3'='#1#7'Caption'#6':You are about to create your RemObjects SDK S'
+  +'erver Project'#11'ParentColor'#8#0#0#6'TLabel'#24'lbl_CreateClientAndGroup'
+  +#4'Left'#2','#6'Height'#2#31#3'Top'#3#225#0#5'Width'#3'i'#1#7'Caption'#6'iIn'
+  +' addition to the Server project, RemObjects SDK will create a client projec'
+  +'t to connect to your server.'#11'ParentColor'#8#8'WordWrap'#9#0#0#6'TLabel'
+  +#15'lbl_GuideWizard'#4'Left'#2','#6'Height'#2#31#3'Top'#3'!'#1#5'Width'#3'y'
+  +#1#7'Caption'#6#136'After creating your project(s), a template-specific wiza'
+  +'rd will guide you through the further steps needed to complete your applica'
+  +'tion.'#11'ParentColor'#8#8'WordWrap'#9#0#0#6'TLabel'#6'Label5'#4'Left'#2#16
+  +#6'Height'#2#14#3'Top'#2'c'#5'Width'#2'S'#7'Caption'#6#15'Project Folder:'#11
+  +'Font.Height'#2#245#9'Font.Name'#6#6'Tahoma'#10'Font.Style'#11#6'fsBold'#0#11
+  +'ParentColor'#8#0#0#6'TLabel'#6'Label2'#4'Left'#2#16#6'Height'#2#14#3'Top'#3
+  +#147#0#5'Width'#2'P'#7'Caption'#6#13'Project Name:'#11'Font.Height'#2#245#9
+  +'Font.Name'#6#6'Tahoma'#10'Font.Style'#11#6'fsBold'#0#11'ParentColor'#8#0#0#6
+  +'TPanel'#6'Panel1'#6'Height'#2')'#3'Top'#3'y'#1#5'Width'#3#243#1#5'Align'#7#8
+  +'alBottom'#10'BevelOuter'#7#6'bvNone'#12'ClientHeight'#2')'#11'ClientWidth'#3
+  +#243#1#8'TabOrder'#2#6#0#7'TBitBtn'#6'btn_Ok'#4'Left'#3'T'#1#6'Height'#2#25#3
+  +'Top'#2#8#5'Width'#2'K'#7'Anchors'#11#7'akRight'#8'akBottom'#0#7'Caption'#6#2
+  +'OK'#7'Default'#9#10'Glyph.Data'#10':'#6#0#0'6'#6#0#0'BM6'#6#0#0#0#0#0#0'6'#0
+  +#0#0'('#0#0#0' '#0#0#0#16#0#0#0#1#0#24#0#0#0#0#0#0#6#0#0#196#14#0#0#196#14#0
+  +#0#0#0#0#0#0#0#0#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#0'f'#0#0'f'#0#255#0#255#255#0#255#255#0
+  ,#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255'eeeeee'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#0'f'#0#30#178'1'#31#177'3'#0'f'#0#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255'eee'#154#154#154#154#154#154'eee'#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#0'f'#0'1'#194'O"'#183'8'#26#176'-!'#180'7'#0
+  +'f'#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255'eee'#171#171#171#158#158#158#151#151#151#156
+  +#156#156'eee'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#0'f'#0'G'#211'm;'#203'^%'#168';'#0'f'#0#27#169'.'
+  +#29#177'2'#0'f'#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255'eee'#191#191#191#181#181#181#152#152#152'eee'#148#148
+  +#148#153#153#153'eee'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#0'f'#0'O'#214'yS'#222'1'#181'M'#0'f'#0#255#0#255#0'f'#0#23
+  +#157''''#30#174'1'#0'f'#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255'eee'#196#196#196#202#202#202#165#165#165'eee'#255#0#255'eee'#140
+  +#140#140#152#152#152'eee'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#0'f'#0'A'#197'c'#0'f'#0#255#0#255#255#0#255#255#0#255
+  +#255#0#255#0'f'#0#25#170'+'#0'f'#0#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255'eee'#181#181#181'eee'#255#0#255#255#0#255#255#0#255#255
+  +#0#255'eee'#147#147#147'eee'#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#0'f'#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#0'f'#0#20#157'!'#0'f'#0#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255'eee'#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255'eee'#138#138#138'eee'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#0'f'#0#0'f'#0#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255'eeeeee'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0'f'#0#0'f'#0#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'eeeeee'#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#11'ModalResult'#2#1#9'NumGlyphs'#2#2#8'TabOrder'#2#0#0#0
+  +#7'TBitBtn'#10'btn_Cancel'#4'Left'#3#163#1#6'Height'#2#25#3'Top'#2#8#5'Width'
+  +#2'K'#7'Anchors'#11#7'akRight'#8'akBottom'#0#6'Cancel'#9#7'Caption'#6#6'Canc'
+  +'el'#10'Glyph.Data'#10':'#6#0#0'6'#6#0#0'BM6'#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0
+  +' '#0#0#0#16#0#0#0#1#0#24#0#0#0#0#0#0#6#0#0#196#14#0#0#196#14#0#0#0#0#0#0#0#0
+  +#0#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  ,#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0
+  +#0#154#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0
+  +#0#154#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'k'
+  +'kkkkk'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'kkkkkk'
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0#0#154#23'J'#253#16';'
+  +#244#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255#0#0#154#0','#248#0'0'
+  +#252#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255'kkk'#168#168#168#160#160
+  +#160'kkk'#255#0#255#255#0#255#255#0#255#255#0#255'kkk'#154#154#154#156#156
+  +#156'kkk'#255#0#255#255#0#255#255#0#255#255#0#255#0#0#154#26'G'#248#26'L'#255
+  +#18';'#241#0#0#154#255#0#255#255#0#255#0#0#154#1'-'#246#1'2'#255#0'*'#243#0#0
+  +#154#255#0#255#255#0#255#255#0#255#255#0#255'kkk'#167#167#167#170#170#170#159
+  +#159#159'kkk'#255#0#255#255#0#255'kkk'#153#153#153#158#158#158#151#151#151'k'
+  +'kk'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0#0#154#28'G'#246#27
+  +'M'#255#20'>'#244#0#0#154#0#0#154#0'-'#248#1'4'#255#3'+'#242#0#0#154#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'kkk'#167#167#167#171
+  +#171#171#162#162#162'kkkkkk'#154#154#154#158#158#158#152#152#152'kkk'#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0#0#154#29
+  +'H'#246#29'P'#255#16'='#251#4'1'#254#1'2'#255#0','#246#0#0#154#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'kkk'#167
+  +#167#167#172#172#172#163#163#163#159#159#159#158#158#158#153#153#153'kkk'#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#0#0#154#26'H'#249#19'B'#255#12'<'#255#7'3'#246#0#0#154#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255'kkk'#167#167#167#167#167#167#163#163#163#156#156#156'kkk'#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#0#0#154'!N'#252#29'K'#255#24'G'#255#23'C'#246#0#0#154
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255'kkk'#172#172#172#172#172#172#169#169#169#164#164#164
+  +'kkk'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#0#0#154'.['#249',_'#255'"M'#248' K'#248'#U'#255#27'F'
+  +#246#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255'kkk'#177#177#177#179#179#179#171#171#171#170#170#170#175#175
+  +#175#166#166#166'kkk'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#0#0#154'6d'#250'8k'#255'-Y'#244#0#0#154#0#0#154'"L'#244'%X'
+  +#255#29'I'#246#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255'kkk'#182#182#182#185#185#185#174#174#174'kkkkkk'#169#169#169#176#176
+  +#176#167#167#167'kkk'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0#0
+  +#154'@q'#250'Bt'#255'2]'#241#0#0#154#255#0#255#255#0#255#0#0#154'"M'#241'''Z'
+  +#255' L'#248#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255'kkk'#187#187#187
+  +#190#190#190#175#175#175'kkk'#255#0#255#255#0#255'kkk'#167#167#167#177#177
+  +#177#170#170#170'kkk'#255#0#255#255#0#255#255#0#255#255#0#255#0#0#154'Iz'#252
+  +';f'#243#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255#0#0#154'%P'#244'&U'
+  +#250#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255'kkk'#192#192#192#181#181
+  +#181'kkk'#255#0#255#255#0#255#255#0#255#255#0#255'kkk'#170#170#170#174#174
+  +#174'kkk'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0#0#154#0#0#154
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0#0#154#0#0#154
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'kkkkkk'#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'kkkkkk'#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#11'ModalResult'#2#2#9
+  +'NumGlyphs'#2#2#8'TabOrder'#2#1#0#0#0#9'TCheckBox'#23'cb_CreateClientAndGrou'
+  +'p'#4'Left'#2#16#6'Height'#2#21#3'Top'#3#203#0#5'Width'#3's'#1#7'Caption'#6
+  ,'=Also create a matching client application and a project group'#7'Checked'#9
+  +#11'Font.Height'#2#245#9'Font.Name'#6#6'Tahoma'#10'Font.Style'#11#6'fsBold'#0
+  +#7'OnClick'#7#28'cb_CreateClientAndGroupClick'#5'State'#7#9'cbChecked'#8'Tab'
+  +'Order'#2#3#0#0#9'TCheckBox'#14'cb_GuideWizard'#4'Left'#2#16#6'Height'#2#21#3
+  +'Top'#3#11#1#5'Width'#3#190#1#7'Caption'#6'HRun the New Server Wizard to gui'
+  +'de you through the setup of your project'#11'Font.Height'#2#245#9'Font.Name'
+  +#6#6'Tahoma'#10'Font.Style'#11#6'fsBold'#0#8'TabOrder'#2#4#0#0#7'TBitBtn'#19
+  +'btn_AdvancedOptions'#4'Left'#2#16#6'Height'#2#25#3'Top'#3'P'#1#5'Width'#3
+  +#177#0#7'Caption'#6#27'Advanced Project Options...'#10'Glyph.Data'#10':'#5#0
+  +#0'6'#5#0#0'BM6'#5#0#0#0#0#0#0'6'#4#0#0'('#0#0#0#16#0#0#0#16#0#0#0#1#0#8#0#0
+  +#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#1#0#0#255#0#255#0'$#%'#0'-**'#0'845'
+  +#0':::'#0'A;;'#0'A=='#0'73G'#0'!4j'#0'*;i'#0'''?s'#0'HCC'#0'MIH'#0'\GB'#0'EF'
+  +'['#0'ZWW'#0'[YY'#0'_^^'#0'~_X'#0'sss'#0'vvw'#0#137'WS'#0#137'WT'#0#154'~e'#0
+  +#156'f'#0#173'pk'#0#180'vm'#0#187'}n'#0#130#128''#0#145#132'x'#0#172#140'o'
+  +#0#196#134'o'#0#202#140'r'#0#209#147's'#0#215#153't'#0#218#157'u'#0#231#171
+  +'y'#0'$B'#131#0';W'#129#0';R'#142#0'Ab'#142#0'x}'#131#0'O~'#175#0'@t'#183#0
+  +'4'#129#220#0''#177#206#0'C'#151#226#0'C'#152#227#0'C'#153#229#0'S'#172#234
+  +#0'S'#175#237#0'b'#180#224#0#145#139#128#0#136#144#164#0#209#157#128#0#215
+  +#159#128#0#216#161#129#0#193#175#157#0#212#183#151#0#198#182#167#0#238#194
+  +#152#0#243#201#159#0#246#202#157#0#212#194#177#0#209#201#183#0#246#203#162#0
+  +#248#203#161#0#243#207#170#0#225#202#181#0#225#205#185#0#226#207#188#0#231
+  +#213#189#0#238#213#186#0#247#213#178#0#246#213#181#0#243#215#184#0#243#217
+  +#188#0#143#226#240#0#180#229#243#0#188#234#243#0#225#212#198#0#231#213#196#0
+  +#237#221#199#0#237#222#202#0#244#218#192#0#246#220#194#0#239#225#206#0#240
+  +#227#203#0#246#226#204#0#243#230#206#0#246#231#206#0#239#227#211#0#242#230
+  +#215#0#248#238#221#0#237#237#237#0#247#239#227#0#246#235#230#0#248#238#231#0
+  +#247#243#234#0#250#246#238#0#251#247#242#0#251#251#250#0#251#251#252#0#254
+  +#254#254#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#21#21#21#21#21#21#21#21#21#21#0#0
+  +#0#0#0#0#21'QFFDDDDG'#21#0#0#0#0#0#0#25']\[VSRRZ'#21#0#0#0#0#0#0#26'_IBAA>CZ'
+  +#21#0#0#0#0#0#0#27'bZUUKKHV'#21#0#0#0#0#0#0#31'cI>AB<:@'#21#0#0#0#0#0#0' dQ;'
+  +'?F9'#29'4'#18#0#0#0#0#0#0'!f5'#23#23#30'&('#14#13#0#0#0#6#2#2'"f&&'#28'&3&'
+  +#9#7#0#20#4#6#1#6'#f&O&3&3&'#10#8#20')'#6#3#6'$ff&O&3&3/,'#20'^'#6#12#11'$c_'
+  +'_&M&31.,'#20'^'#6#15#16'$7777&-N1/%'#20'^'#6#20#20#0#0#0#0#0#0#0'*+'''#0#20
+  +#20#6#20#16#0#0#0#0#0#0#0#0#0#0#0#0#0#6#4#6#9'NumGlyphs'#2#0#7'OnClick'#7#24
+  +'btn_AdvancedOptionsClick'#8'TabOrder'#2#5#0#0#9'TComboBox'#16'ed_ProjectFol'
+  +'der'#4'Left'#2','#6'Height'#2#21#3'Top'#2'v'#5'Width'#3#192#1#7'Anchors'#11
+  +#5'akTop'#6'akLeft'#7'akRight'#0#16'AutoCompleteText'#11#22'cbactEndOfLineCo'
+  +'mplete'#20'cbactSearchAscending'#0#10'ItemHeight'#2#13#8'OnChange'#7#22'ed_'
+  +'ProjectFolderChange'#8'TabOrder'#2#0#0#0#7'TBitBtn'#10'btn_Browse'#4'Left'#3
+  +'T'#2#6'Height'#2#25#3'Top'#2't'#5'Width'#2'K'#7'Anchors'#11#5'akTop'#7'akRi'
+  +'ght'#0#7'Caption'#6#7'&Browse'#10'Glyph.Data'#10':'#3#0#0'6'#3#0#0'BM6'#3#0
+  +#0#0#0#0#0'6'#0#0#0'('#0#0#0#16#0#0#0#16#0#0#0#1#0#24#0#0#0#0#0#0#3#0#0#18#11
+  +#0#0#18#11#0#0#0#0#0#0#0#0#0#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#28#153#206'+'#165#213#28#157#209#10
+  +#138#198#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#191#165#163'MZr'#255#0#255#255#0#255'$'#156#207#166#238#247'l'
+  +#235#248']'#217#240'J'#199#231'9'#184#224' '#160#212#15#145#202#15#145#201
+  ,#255#0#255#255#0#255#191#165#163'Wf'#131#18'v'#226'<'#145#220#255#0#255#12
+  +#140#199#153#221#239#139#255#255#128#252#255#130#251#255''#250#255'y'#243
+  +#255'e'#225#247'N'#206#237'<'#186#224'u'#145#160'[f'#129#17'p'#216'3'#161#255
+  +'*'#154#254#255#0#255#18#150#204'Y'#186#222#159#254#255'u'#247#255'x'#246#255
+  +'w'#242#252#137#217#224#135#215#222'{'#226#234#145#188#192'Qh'#137#19'p'#213
+  +'1'#160#255'1'#158#251#255#0#255#255#0#255'&'#165#212'H'#193#230#159#239#248
+  +'y'#246#251#135#216#220#186#202#188#218#188#165#208#181#158#175#154#140#129
+  +'zsAy'#175'2'#163#255'='#172#254#27#156#212#255#0#255#255#0#255''''#175#222
+  +#139#151#161#136#207#226#139#209#211#203#180#173#247#240#221#255#255#216#255
+  +#255#217#250#248#197#207#176#140#196#169#163'M'#193#252'U'#208#251'A'#193#227
+  +#255#0#255#255#0#255'%'#175#225#173'pk]'#188#221#181#166#158#247#244#238#255
+  +#255#255#255#255#227#255#255#212#255#247#193#255#230#165#216#160#130'o'#212
+  +#235'Y'#215#251'h'#226#248#14#144#201#255#0#255'&'#175#225#181'wm'#164#207
+  +#217#206#182#158#255#255#234#255#255#243#255#255#234#255#255#215#247#220#169
+  +#246#201#134#225#184#145#145#192#199'S'#211#251'~'#243#255'('#170#216#255#0
+  +#255'('#176#224#188'n'#255#244#235#213#188#161#255#255#221#255#255#221#255
+  +#255#224#255#250#202#239#189#129#244#189'w'#231#196#154#147#192#196'O'#211
+  +#251'}'#244#255'V'#213#239#255#0#255'('#175#225#197#136'p'#255#252#248#202
+  +#170#153#254#255#206#255#255#201#248#225#173#240#199#140#243#202#150#255#235
+  +#181#213#175#149#154#201#211'z'#224#254#157#251#255#150#248#255'#'#161#211'('
+  +#176#225#206#145's'#255#250#247#216#196#189#220#197#158#252#229#167#250#199
+  +#130#251#208#139#255#247#224#231#220#206#140#165#170'k'#201#230'_'#188#224'`'
+  +#187#222'l'#196#227')'#161#209'-'#178#226#213#153'u'#255#248#243#252#251#250
+  +#229#209#201#233#202#166#231#197#153#225#194#152#204#181#159#177#139#136'u'
+  +#231#248'm'#237#254#23#157#209#255#0#255#255#0#255#255#0#255#31#161#217#221
+  +#160'w'#255#251#246#255#255#255#255#255#255#255#255#254#251#244#235#180#131
+  +'y'#191'xI'#177'oSP'#192#229'P'#196#231#28#157#208#255#0#255#255#0#255#255#0
+  +#255#255#0#255#226#166'x'#255#255#255#255#255#255#255#255#255#255#255#255#248
+  +#250#252#182#135'z'#226#153'U'#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#231#171'y'#209#146'm'#209#146'm'#209#146
+  +'m'#209#146'm'#209#146'm'#180'~o'#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#9'NumGlyphs'#2#0#7'OnClick'#7#15'btn_Br'
+  +'owseClick'#8'TabOrder'#2#1#0#0#5'TEdit'#14'ed_ProjectName'#4'Left'#2','#6'H'
+  +'eight'#2#21#3'Top'#3#166#0#5'Width'#3#192#1#7'Anchors'#11#5'akTop'#6'akLeft'
+  +#7'akRight'#0#8'OnChange'#7#20'ed_ProjectNameChange'#8'TabOrder'#2#2#0#0#0
+]);
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fNewProjectForm.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fNewProjectForm.pas
new file mode 100644
index 0000000..880ecc0
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fNewProjectForm.pas	
@@ -0,0 +1,216 @@
+unit fNewProjectForm;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Delphi IDE Integration                            }
+{                                                                            }
+{ compiler: Delphi 5 and up                                                  }
+{ platform: Win32                                                            }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+
+uses
+  {$IFDEF FPC}LCLIntf, LResources,{$ENDIF}
+  {$IFDEF MSWINDOWS}Windows,{$ENDIF}
+  Messages, SysUtils,{$IFDEF DELPHI6UP} Variants, {$ENDIF}
+  Classes, Graphics, Controls, Forms, ExtCtrls,
+  Dialogs, StdCtrls, Buttons, ComCtrls, ImgList,
+  {$IFDEF FPC}uROIDEPrjWizard_laz,{$ELSE} uROIDEPrjWizard,{$ENDIF}  
+  fServerProjectOptions;
+
+type
+  TNewProjectForm = class(TForm)
+    Bevel1: TBevel;
+    Image2: TImage;
+    Bevel2: TBevel;
+    Panel1: TPanel;
+    btn_Ok: TBitBtn;
+    btn_Cancel: TBitBtn;
+    Bevel3: TBevel;
+    cb_CreateClientAndGroup: TCheckBox;
+    Label1: TLabel;
+    cb_GuideWizard: TCheckBox;
+    btn_AdvancedOptions: TBitBtn;
+    lbl_CreateClientAndGroup: TLabel;
+    lbl_GuideWizard: TLabel;
+    Label5: TLabel;
+    ed_ProjectFolder: TComboBox;
+    btn_Browse: TBitBtn;
+    Label2: TLabel;
+    ed_ProjectName: TEdit;
+    procedure btn_AdvancedOptionsClick(Sender: TObject);
+    procedure cb_CreateClientAndGroupClick(Sender: TObject);
+    procedure ed_ProjectFolderChange(Sender: TObject);
+    procedure btn_BrowseClick(Sender: TObject);
+    procedure ed_ProjectNameChange(Sender: TObject);
+  private
+    fOptions: TServerProjectOptions;
+  public
+    constructor Create(const aTemplateDir : string); reintroduce;
+    destructor Destroy; override;
+  end;
+
+var
+  NewProjectForm: TNewProjectForm;
+
+function PromptProjectOptions(
+  const aTemplateDir : string;
+  out someProjectOptions : TROIDEProjectOptions) : boolean;
+
+implementation
+
+uses
+  {$IFDEF FPC}uROIDETools_laz,{$ELSE}uROIDETools,{$ENDIF}
+  IniFiles, uRODLGenTools, uROClient, uROServer, uEWHelpers;
+  
+{$IFNDEF FPC}
+{$R *.dfm}
+{$ENDIF FPC}
+
+const MAX_FOLDER_HISTORY = 10;
+
+function PromptProjectOptions(const aTemplateDir : string; out someProjectOptions : TROIDEProjectOptions) : boolean;
+var
+  i: integer;
+begin
+  with TNewProjectForm.Create(aTemplateDir) do try
+    cb_GuideWizard.Enabled := fOptions.fWizardAvailable;
+    cb_GuideWizard.Checked := fOptions.fWizardAvailable;
+    lbl_GuideWizard.Enabled := fOptions.fWizardAvailable;
+
+    cb_CreateClientAndGroup.Enabled := fOptions.cbCreateClientAndGroup.Enabled;
+    lbl_CreateClientAndGroup.Enabled := fOptions.cbCreateClientAndGroup.Enabled;
+    if not cb_CreateClientAndGroup.Enabled then cb_CreateClientAndGroup.Checked := false;
+
+    ed_ProjectFolder.Text := fOptions.ePrjDir.Text;
+    ed_ProjectFolder.Items := fOptions.fProjectFolders;
+    ed_ProjectName.Text := fOptions.ePrjName.Text;
+    ed_ProjectFolderChange(nil);
+    ed_ProjectNameChange(nil);
+
+    result := (ShowModal=mrOK);
+
+    if result then with someProjectOptions do begin
+      TemplateDir := aTemplateDir;
+
+      ServiceLibraryName := StringReplace(fOptions.eSvcLibName.Text, ' ', '_', [rfReplaceAll]);
+      ServiceName := StringReplace(fOptions.eSvcName.Text, ' ', '_', [rfReplaceAll]);
+      ProjectName := StringReplace(ChangeFileExt(ExtractFileName(fOptions.ePrjName.Text), ''), ' ', '_', [rfReplaceAll]);
+
+      ProjectDir := IncludeTrailingPathDelimiter(fOptions.ePrjDir.Text);
+      MessageClassName := Copy(fOptions.cbMessageClass.Text,4,Length(fOptions.cbMessageClass.Text));
+      ServerClassName := Copy(fOptions.cbServerClass.Text,4,Length(fOptions.cbServerClass.Text));
+
+      with TMemIniFile.Create(GetTemplateOptionsFileName) do
+      try
+        if fOptions.fFixedChannel <> '' then begin
+          ChannelClassName := fOptions.fFixedChannel;
+        end
+        else begin
+          ChannelClassName := StringReplace(someProjectOptions.ServerClassName, 'Server', 'Channel', []);
+          ChannelClassName := ReadString('ServerToChannelMapping',ServerClassName,ChannelClassName);
+        end;
+        ServerUnitName := ReadString('ComponentToUnitMapping', ServerClassName, 'uRO'+ServerClassName);
+        ChannelUnitName := ReadString('ComponentToUnitMapping', ChannelClassName, 'uRO'+ChannelClassName);
+        MessageUnitName := ReadString('ComponentToUnitMapping', MessageClassName, 'uRO'+MessageClassName);
+      finally
+        Free;
+      end;
+
+      CreateClientAndGroup := cb_CreateClientAndGroup.Checked;
+      WizardEnabled := cb_GuideWizard.Checked;
+
+      // Update Project Folder History
+      i := fOptions.fProjectFolders.IndexOf(ed_ProjectFolder.Text);
+      case i of
+        -1: begin
+            if fOptions.fProjectFolders.Count >= MAX_FOLDER_HISTORY then
+              fOptions.fProjectFolders.Delete(fOptions.fProjectFolders.Count-1);
+            fOptions.fProjectFolders.Insert(0, ed_ProjectFolder.Text);
+          end;
+        0: { noop }
+        else begin
+            fOptions.fProjectFolders.Delete(i);
+            fOptions.fProjectFolders.Insert(0, ed_ProjectFolder.Text);
+          end;
+      end;
+
+      // Saves last path entered
+      with TIniFile.Create(GetTemplateConfigFileName) do try
+        WriteString(sect_ProjectGeneration, id_PrjDir, ExtractFilePath(ProjectDir));
+        EraseSection(sect_ProjectFolderHistory);
+        for i := 0 to fOptions.fProjectFolders.Count-1 do
+          WriteString(sect_ProjectFolderHistory, fOptions.fProjectFolders[i], IntToStr(i));
+      finally
+        Free;
+      end;
+      
+    end;
+  finally
+    Free;
+  end;
+end;
+
+{ TNewProjectForm }
+constructor TNewProjectForm.Create(const aTemplateDir: string);
+begin
+  inherited Create(nil);
+  fOptions := TServerProjectOptions.Create(aTemplateDir);
+end;
+
+destructor TNewProjectForm.Destroy;
+begin
+  FreeAndnil(fOptions);
+  inherited;
+end;
+
+procedure TNewProjectForm.btn_AdvancedOptionsClick(Sender: TObject);
+begin
+  fOptions.ShowModal();
+  cb_CreateClientAndGroup.Checked := fOptions.cbCreateClientAndGroup.Checked;
+  ed_ProjectFolder.Text := fOptions.ePrjDir.Text;
+  ed_ProjectName.Text := fOptions.ePrjName.Text;
+end;
+
+procedure TNewProjectForm.cb_CreateClientAndGroupClick(Sender: TObject);
+begin
+  fOptions.cbCreateClientAndGroup.Checked := cb_CreateClientAndGroup.Checked;
+end;
+
+procedure TNewProjectForm.ed_ProjectFolderChange(Sender: TObject);
+begin
+  fOptions.ePrjDir.Text := ed_ProjectFolder.Text;
+  btn_Ok.Enabled := (ed_ProjectFolder.Text <> '') and (ed_ProjectName.Text <> '');
+end;
+
+procedure TNewProjectForm.ed_ProjectNameChange(Sender: TObject);
+begin
+  fOptions.ePrjName.Text := ed_ProjectName.Text;
+  btn_Ok.Enabled := (ed_ProjectFolder.Text <> '') and (ed_ProjectName.Text <> '');
+end;
+
+procedure TNewProjectForm.btn_BrowseClick(Sender: TObject);
+var dir : string;
+begin
+  dir := ed_ProjectFolder.Text;
+  if SelectDirectory({$IFDEF FPC}0{$ELSE}Application.Handle{$ENDIF}, 'Select Project Folder','', Dir) then
+    ed_ProjectFolder.Text := Dir;
+  ed_ProjectFolderChange(nil);
+end;
+
+{$IFDEF FPC}
+initialization
+  {$I fNewProjectForm.lrs}
+{$ENDIF FPC}
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fROAbout.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fROAbout.dfm
new file mode 100644
index 0000000..fbd4f82
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fROAbout.dfm	
@@ -0,0 +1,14167 @@
+object AboutForm: TAboutForm
+  Left = 366
+  Top = 242
+  BorderIcons = []
+  BorderStyle = bsNone
+  Caption = 'About RemObjects SDK'
+  ClientHeight = 300
+  ClientWidth = 500
+  Color = clBtnFace
+  ParentFont = True
+  OldCreateOrder = False
+  Position = poMainFormCenter
+  OnClick = OnCloseClick
+  OnCreate = FormCreate
+  PixelsPerInch = 96
+  TextHeight = 13
+  object Image1: TImage
+    Left = 0
+    Top = 0
+    Width = 500
+    Height = 300
+    AutoSize = True
+    Picture.Data = {
+      07544269746D617006DE0600424D06DE0600000000003600000028000000F401
+      00002C0100000100180000000000D0DD0600C01E0000C01E0000000000000000
+      0000303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030302F2F302F302F30302F302F30
+      30303030302F2F302F302F2F302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2E2F2F2E2E2E2F2F2E2E2E2F2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2D
+      2D2D2D2D2D2E2E2D2E2D2D2E2D2E2D2D2D2D2D2D2D2D2D2D2D2D2D2C2D2C2D2C
+      2D2C2C2C2C2C2C2D2D2C2C2C2C2C2C2C2B2C2C2C2C2C2C2B2B2B2B2B2C2B2B2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2A2A2B2B2B2B2A2A2A2A2A2A2A2A2A2A2A
+      2A292A2A2A2A2A2A2A2A2A292929292929292929292A29292928292929292829
+      2829292829282828282828282828282827272727272728282827272827272728
+      2727272727272727272727272B2B2B2F2F2F3131313333333434342D2C2D2626
+      262625262625262625262626272C2A2B2B2A2A2C2B2A2B2A2A2B2A2A2B2A2A2A
+      2A2A2A2A2A2A292A292A29292929292929292928292929282929282928282829
+      2828282828282828282728282827272727272727272727272627262627272727
+      27262626262626262626252626262626252525252525222222202020201F201F
+      201F2020202120212D2D2D343434363535353536353434303030222222222222
+      1E1E1F1D1D1E1E1D1E1D1D1D1D1D1D1D1D1D1D1C1D1C1C1C1D1D1C1D1C1C1C1C
+      1C1C1C1C1C1B1B1F1F202525252525252626262827272929292A2B2A2120211A
+      1A1B1A1A1B1A191A1A1A1B1A1A1A1A191A1B1B1B1D1D1C1D1C1D1D1C1D1C1D1C
+      1C1C1C1C1C1C1C1B1C1C1B1B1B1C1C1B1B1B1B1B1B1A1B1B1B1A1B1B1A1B1A1B
+      1A1A1A1A1A1A1A1A1A191A191A191919191A1919191919191919191918181818
+      1819181818181818181818181717171717171716151414141414141314131314
+      1615152525263232323838383D3D3D4243422827271111111111111111111110
+      10101110101111101010101011101010101010100F101010100F0F0F0F0F0F0F
+      0F0F0F0F0F0F0E0F0F0F0E0E0E0F0F0E0F0E0E0E0E0E0E0E0E0E0D0D0E0D0E0D
+      0D0D0D0D0D0D0D0D0C0D0D0D0D0C0C0D0D0D0C0D0C0C0D0C0C0C0C0C0C0C0C0C
+      0B0C0B0C0B0C0C0B0B0B0B0B0B0B0B0B0A0B0B0B0B0B0B0B0B0A0B0B0A0A0A0A
+      0A0A0A0A0A0A0A0A090A090909090909090A0A09090909090909080909080909
+      0908090808080808080808080808080807080808070808070808070807070707
+      0707070707070607070607070606070706070706060606060606060606060606
+      0606060606050606060506050505050506050505050505050504040505040504
+      0405040505040405040404040404040404040404040404040404030404040304
+      0403040303030303030303030303030303020303030302030302030202030203
+      0202030202020202020202020202020202020202010201020102020201020202
+      0102020101010201020101010101010101010101010101010101000001000000
+      0100000000000100000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000003030
+      3079797979797979797979797979797979797979797979797979797979797979
+      7979797979797979797979797979797979797979797979797979797979797979
+      7979797979797979797979797979797979797979767976797976797679797976
+      7679767979767676767676797976767676767676767676737676767676737676
+      7676767676767673737373737673737373737373737373737373737373737373
+      737371737171717171717371717171717171717171717171717171716E716E6E
+      6E6E716E6E6E71716E6E6E6E6E6E6E6E6E6C6E6C6C6E6E6C6C6E6C6E6C6C6C6E
+      6C6E6E6C6C6C6C6C6C6C6969696C6C6C6C6C69696C6C69696969696969696969
+      6769676967696767676769676967676767676767676767676767676567676567
+      6765656765656565676565656565656565656565626262626262626262626562
+      62626262626262626E6E6E7676767B7B7B808080838383676969606060605D62
+      605D60605D606565656E6C6C6C6C6C6C69696C6C696C69696C69696C69696969
+      6969676967676969676967696767676767676767676765676567656765656565
+      6565656562656262626565656265626562626262626262626262606262606262
+      6260606060605D6060605D5D606060605D5D605D5D505053505050505050504E
+      5050505058585B8080808380837E80807E7E8079797B7676797173737171716E
+      6C6E6C6E6C6262626262625D5B5D5B585B5053534B4B4E464946464646434646
+      4B4B495D5D5D6060606262626565656767676C6C6C555555434343414143413E
+      43414143414141413E4343434649494949494946494949494646464946464646
+      4646464643464646464643434343434343434343414341434143414343414141
+      4141414141413E4141413E4141413E3E413E41413E3D3E3E3E3E3D3D3D3E3E3D
+      3E3D3D3D3D3D3D3D3A3A3D3A3A3838383532323232323232323032323A3A3865
+      67678380808F8F909C9C9CA9A9A94B4E4E2D2B2D2B2B2B2D2B2B2B2B2B2B2828
+      2B2B2B282B28282B282B28282828282828282826282826262626282626262626
+      2626232626262623232623232323232326232323232320232323232023202020
+      202020202020202020201E20201E1E201E1E1E1E1E1E1E1E1E1E1E1E1B1E1E1E
+      1E1B1E1B1B1E1B1B1B1B1B1B1B1B1B1B1B1B1B1B191B1B1919191919191B1919
+      1919191919191916161919161616161616161616161616161614141416141614
+      1414141414141414141414141414121412141414121412121412121412121412
+      12121212121212121212120F0F0F1212120F0F0F120F0F120F0F0F0F0F0F0F0F
+      0F0D0F0F0F0D0F0D0F0D0D0D0D0D0D0D0D0D0D0D0D0A0D0D0D0A0D0D0A0A0D0A
+      0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A080A0A080808080A0A
+      0808080A08080808080808080808080805080808080508080508050508080508
+      0805080505050505080805050505050305050505030503050305050303050503
+      0303050303030503050303030303030303030303030303030303030003000300
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303030302F30302F30302F2F2F30
+      302F2F302F2F2F2F2F2F2F30302F2F2F302F2F2F2F2F2E2F2F2F2F2E2E2E2F2F
+      2E2F2F2F2E2F2F2E2E2E2E2F2E2E2E2E2E2E2E2E2E2E2E2E2E2D2E2D2E2E2E2E
+      2D2E2D2D2D2D2D2E2E2E2D2D2D2E2E2D2D2D2D2D2D2D2D2C2C2C2D2D2C2D2C2C
+      2D2D2D2C2C2C2C2C2C2C2C2C2C2C2C2C2B2C2C2C2C2B2B2B2C2C2C2C2B2B2B2B
+      2B2B2B2B2B2B2B2B2B2A2A2B2B2B2B2B2A2B2B2A2B2A2A2A2B2A2A2A2A2A2A29
+      2A292A2A2A292A292A29292929292A2929292A29292929292928292929292928
+      2828282829282828282828282828282727272828282727282827272727272727
+      272727272C2C2C2F2F2F3131313333333535352A2A2A26262626262726262626
+      25272A29292C2B2B2C2B2B2C2A2B2C2B2B2B2A2A2B2A2A2B2A2A2A292A2A2A2A
+      292A29292A2A2929292929292929282829292929282829292929282828292828
+      2827282828282828272827282727272727272727272727262727262626272626
+      2726262626262626262626262625252526232223202020201F20201F1F202120
+      2021212929293232323132323131303031312F2F2F2E2E2E2E2E2E2D2D2C2C2D
+      2C2B2B2B2B2B2B2B2B2B2B2B2B2A2B2B2A292A2A292926262723232326262628
+      2828282827282828292A2A2B2B2B2525251B1A1C1B1A1C1B1A1B1A1A1C1A1A1B
+      1A1A1B1B1A1A1D1D1E1D1D1D1D1D1D1D1D1D1D1D1D1D1C1D1D1D1C1C1C1C1C1C
+      1C1C1C1C1C1C1C1B1B1C1B1C1C1B1B1B1B1B1B1B1B1A1B1B1B1A1A1B1A1A1B1B
+      1A1A1A1A1A1A1A1A1A191A19191A191919191919191919191818181919181819
+      1818181818181817171716171415151414141414141515151818182F2E2F3434
+      343A3A3A40404045454515141512121211111111111211111211111111111111
+      1010111111101110101010101010100F100F0F0F0F0F100F0F0F0F100F0F0F0F
+      0E0F0F0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0D0D0D0D0D
+      0D0E0D0D0D0D0D0C0C0D0D0D0D0D0C0C0C0D0D0C0C0C0C0C0C0C0C0C0C0C0B0C
+      0B0B0C0C0C0B0B0B0B0B0B0B0B0B0A0A0B0B0B0B0A0A0A0A0A0A0A0A0A0A0A0A
+      0A0A0A0A090A090A090909090A090909090A0909090909090909090909080808
+      0808090809080808080808080808080708080708080807070707070708070707
+      0707070707070706070607060707060707060706060606060606060506060606
+      0605060606050506060506060505050505050505050505050505050404050504
+      0505040404040505040404040404040404040403040404040404030403040303
+      0303030303030303030303020203030303030302030203030202030203030203
+      0202020203020202020202020202020101020102020201020201010202010101
+      0101010101010201010101010101010101010101000100010101010001000000
+      0100000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030302F30302F303030303030302F2F2F30
+      2F2F2F2F2F2F2F2F2F2F2F302F2F2F2F302F2F2F2F2F2F2F2F2F2F2F2F2F2E2E
+      2E2F2F2F2E2F2E2E2F2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2D2E2D2E2D2D2E2D
+      2E2D2D2E2D2E2E2D2E2E2D2D2D2D2D2D2D2D2D2D2D2D2C2C2D2C2C2C2D2D2E33
+      33322F2F2F2C2C2C2C2C2C2C2C2B2B2C2C2C2B2B2B2B2C2C2C2B2B2B2C2B2B2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2B2A2A2B2A2A2A2A2B2B2A2A2A2A2A2A2A2A2A2A
+      292A2A2A2A292A292A2929292929292929292929292929292929292829282929
+      2829282928282828282828282728272828272727282827272727272727272727
+      2E2E2E2F2F2F3131313333333535352726272626272625272626262625272A29
+      292C2B2B2C2B2B2C2A2B2C2B2B2C2A2B2B2B2A2B2B2B2B2B2A2A2A292A2A2A29
+      292A292929292929292929292929292829282828282929282828282928282828
+      2827282828282828272828282727282727272727272627272727262627272626
+      26262626262626262526262525262525202021202020202020201F2020212021
+      21213030313031313130303031312F2F302E2E2E2E2E2F2E2E2E2D2D2D2C2D2D
+      2C2C2D2C2C2C2C2C2C2B2B2B2A2B2B2A2B2A2A2A29292A292929292929282A2A
+      2A2A2A2B2C2B2B2625251B1B1C1B1B1C1A1A1B1B1B1B1A1B1B1A1B1B1B1B1B1E
+      1E1D1E1E1E1E1D1D1D1D1D1D1D1D1D1D1C1D1D1D1D1C1D1D1C1C1D1C1C1C1C1C
+      1C1C1C1C1C1B1B1C1B1B1C1C1B1B1B1B1B1B1B1B1B1A1A1A1B1B1B1A1B1A1A1A
+      1A1A1A191A191A1A1A1A19191A1A191919191919191918191818181918181818
+      18181817171615151415141415141414141516151A1A1A2F2F2E3435353A3B3A
+      4040414242421212121212121212121211111112121211111111111111101110
+      11101110101111101010101010101010100F0F0F0F100F100F0F0F100F0F0F0F
+      0F0F0F0E0F0E0F0E0F0E0E0F0E0F0E0E0E0E0D0E0E0D0E0D0E0E0E0D0D0D0D0D
+      0D0D0D0C0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0D0C0C0C0C0C0B0C0B0C0C0B
+      0C0C0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B0A0A0A0A0A0A0A0B0A0A0A0A0A0A09
+      0A0A0A090A0A0909090A090909090A0909090909080809090909080808080908
+      0808080809080808080808070808080708070808070708070707070707070707
+      0707070606070607060607060606060706070606060606060606060606050606
+      0605060505050506060605050505050505050505050505040405050504040405
+      0405040504040404050404040404040404040404040304030303030304030303
+      0303040303030303030303030303020302020302020303030302030203020202
+      0202030202020202020202020201020202020202020202020101020101010201
+      0101010101010101010101010101010001000001010001010100010001000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030302F3030303030302F30303030302F30
+      3030302F2F30302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2E2F2F2E2F2F2E
+      2E2E2F2E2F2E2E2F2E2E2E2E2F2E2E2E2F2E2E2E2E2E2E2E2E2E2E2E2E2D2D2D
+      2D2D2D2D2D2E2D2D2D2E2D2D2D2D2D2D2D2D2D2D2C2E2D2E3333343535353737
+      373535353030302C2C2C2B2B2C2B2C2B2B2C2C2B2B2B2B2C2C2B2C2B2B2B2C2B
+      2B2B2B2B2B2B2B2B2A2B2A2B2B2A2A2A2B2B2B2A2A2B2B2A2A2A2A2A2A292A2A
+      292A2A2A2A2A2A292929292A2929292929292929292928292928292928292828
+      282928282928282828272728282827272728282727272727272727272E2E2E2F
+      2F2F3131313333333535352525262626272626262626272625262B2A2B2C2B2B
+      2C2C2B2C2B2B2B2A2B2C2B2B2C2A2B2B2A2B2B2A2A2A2A2A2A2A2A2A2A2A2A2A
+      29292A2A292A2A29292929292928292928292929292828282828282828282827
+      2828282827272727272827282727272727272626262727262726272727262626
+      2626262526252526262626262323232020202020202020202020201F20202829
+      283131313131313030312F2F302F30302E2E2E2E2F2E2E2E2E2D2E2E2D2D2E2D
+      2D2D2D2E2D2C2C2C2C2C2C2C2C2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2C2C
+      2929291C1C1D1C1C1C1B1B1C1B1A1C1B1B1B1B1B1B1C1B1C1E1E1E1E1E1E1D1E
+      1E1E1E1E1E1D1D1D1E1D1D1D1D1D1D1C1D1C1D1D1C1D1C1C1D1C1C1C1C1C1C1C
+      1C1C1B1C1C1B1C1C1B1B1B1C1B1B1B1B1B1B1A1B1B1A1B1A1A1A1B1A1A1A1A1A
+      1A1A1A191A19191A1A191A191919191919191819181919191818181818181818
+      171616161514151415151415151515151D1D1E3030303636363B3C3B41414138
+      3838121212121212121212111112121211111111111111111111111011101010
+      1111111011101010101010101010100F10100F0F0F10100F0F100F0F0F0F0F0F
+      0F0E0E0F0F0E0F0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0D0E0D0D0D
+      0D0D0D0D0D0D0D0C0D0C0C0C0D0C0D0C0D0C0C0C0C0C0C0C0C0C0C0B0C0B0B0B
+      0B0B0C0C0B0C0B0B0B0B0B0A0B0B0B0A0A0B0B0A0A0A0A0A0A0A0B0A0A0A0A09
+      0A0A0A0A0A090A0A09090A090909090909090909090908080809080809080809
+      0808080808080808080808070807080708070807080707070708070707070707
+      0607070706070707070707060606060706060606060606060606060606050605
+      0606060506050605050505050505050505040505050405050504040504050404
+      0404050404040404040404030404030304040304040404030304030403030303
+      0303030403030303030303030303030302030302030202020203030303030202
+      0202020202020202020202020201020102020202010202010202020201010201
+      0201010201010101010101010101010101010101000000010000000001000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030302F2F30303030302F2F302F
+      2F2F2F30302F302F2F2F302F2F2F2F2F2F2F2F2F2F2F2F2F2E2F2F2F2F2F2F2E
+      2E2E2E2F2E2F2E2E2E2E2E2F2E2E2E2F2E2E2E2E2E2E2E2E2E2E2D2E2E2D2E2D
+      2E2D2D2D2D2D2E2D2D2D2D2D2D2D2F2F2F333333343434363636373737393939
+      3A3A3A3737373030302C2C2C2C2B2C2C2C2C2B2C2B2C2C2C2C2C2B2B2B2B2B2C
+      2B2B2B2B2B2B2B2B2A2B2B2A2B2A2B2A2B2B2A2B2A2A2A2A2A2A2A2A29292A2A
+      2A292A2929292A2A292929292929292929292929292929292829282828292829
+      2828292828282827282728272827282728282727272828282F2E2E3030303232
+      323434343434342525262626272626272626272625262B2B2B2C2C2B2C2B2B2C
+      2B2B2C2B2B2B2B2B2C2B2B2B2A2B2B2B2A2B2A2A2A2A2A292A2A29292A29292A
+      29292A2929292929292929292928292929292928282828282828292828272828
+      2828272827272727272727272727272727272726272626272627272626272626
+      2626262626252526252525202021202020202020202020201F1F202020292928
+      2B2A2A2C2C2C2A2A2B2A2A2B2F2F302F2F302F2F2F2F2E2F2E2F2F2E2E2E2D2D
+      2D2D2E2D2D2D2D2C2D2C2D2D2D2D2D2C2C2C2C2C2C2C2D2D2D2A2A291D1C1E1B
+      1B1C1B1B1C1B1B1C1B1B1B1B1B1C1B1C1B1F1E1E1E1E1F1E1E1E1E1E1E1D1E1E
+      1E1D1E1D1D1D1E1D1D1D1D1D1C1D1D1D1D1D1D1D1C1C1C1C1C1C1C1C1C1C1C1C
+      1C1B1B1C1B1B1C1B1B1B1B1B1B1B1B1B1A1B1B1A1B1B1A1B1B1A1A1B1A1A1A19
+      1A1A191A1A191A19191919191919191919191919181819191818181818161616
+      1515151514151414141516162323233131313737373E3E3E4343423333321312
+      1213121211121212111212111111121111121111111111111111111011101010
+      1010101010101010101010100F10101010100F100F0F0F100F100F0F0F0F0F0F
+      0E0E0F0E0F0E0F0E0E0F0F0E0E0E0E0E0E0E0E0E0E0E0E0D0D0E0D0D0D0D0D0D
+      0E0D0D0D0D0D0D0D0C0C0D0C0D0C0D0D0C0C0C0C0C0C0C0C0C0B0C0B0B0B0C0C
+      0B0B0C0B0C0B0B0B0B0B0B0B0A0B0B0A0B0B0A0B0A0A0A0A0A0A0A0A0A0A090A
+      0A090A0A0A0A0A09090A0909090A090909090909090809090809080909080808
+      0809080808080808080807080707080807070807080707070708070707070707
+      0707070607060606060607060606070706060606060606060606050605060505
+      0605060606060505050505050505050505050405040405040505050504040405
+      0404040504040404040404040404040403040404030403030304030303030303
+      0403030303030303030303030303030302020302030302020202030202020202
+      0202020302020202020202020202020202020202010101010101020102010102
+      0101010101010101010201010001010100010100010100000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000030303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030302F30303030302F2F2F302F2F
+      2F2F30302F2F2F302F2F2F2F2F2F2F2F2F2F2F2F2E2F2F2F2F2F2E2F2E2E2E2F
+      2E2F2E2E2E2F2E2E2E2E2E2E2E2E2E2E2E2E2D2E2E2D2E2E2E2D2D2E2D2D2D2D
+      2D2E2D2D2D2D2E2F2F2F3232323333333535353737373838383939393A3A3A3B
+      3B3B3B3B3B3737373030302C2C2C2C2C2C2C2B2B2B2B2C2C2B2B2B2C2B2B2B2B
+      2B2B2B2A2B2B2A2B2A2A2A2A2A2B2A2B2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A29
+      2A2A292A292A292A292929292929292929292929292929292929292928282928
+      2828282828282828272728272827282727292A2A2E2E2E303030323232343434
+      3232322525262626272626272626272626272C2C2B2D2C2C2C2B2B2C2C2B2C2B
+      2B2C2B2B2C2B2B2C2A2B2B2B2B2B2B2B2A2A2A2A2A2A292A2A2A2A2A29292A29
+      292929292A2A2929292929292929292929282829282829282828282828272828
+      2828282827272728272827272727272727262726262626272627262626262626
+      262626252626262322232121202020212020201F20201F201F201F1F201F201F
+      201F1F1F1F1F1F1E1E1E1E1E1F1E1F1F202322232222232525252726272A2929
+      2E2E2D2E2E2E2D2D2E2E2E2D2D2D2D2E2D2D2C2D2C1D1D1E1B1C1D1C1C1C1B1C
+      1C1C1B1C1B1B1C1C1C1C1F1F1E1E1E1F1F1E1E1E1E1E1E1E1E1E1E1E1E1E1E1D
+      1E1D1E1E1D1D1E1D1E1D1D1C1D1C1C1D1D1D1D1D1D1C1D1C1C1D1C1C1C1C1C1C
+      1C1C1B1B1B1C1B1C1C1B1B1B1B1A1B1B1B1B1A1A1B1A1A1B1B1B1A1A1A1A1A1A
+      1A19191A191A191919191A191919191919181919181819181815161515151515
+      15151514141616162525253232323939393E3E3E4443432D2C2D121212121312
+      1213121212121212121211111112111212111112111111111111111010101011
+      101010101011101010100F101010100F100F1010100F0F0F0F0E0F0F0E0F0F0F
+      0F0E0E0F0F0E0E0E0E0E0E0E0E0E0E0D0E0E0E0D0D0D0D0D0E0E0D0D0D0D0D0D
+      0D0D0D0D0D0C0D0D0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0B0C0B0B
+      0C0B0B0B0B0C0B0B0B0B0B0B0B0B0A0A0B0A0B0B0A0A0A0A0A0A0A0A0A0A0A0A
+      090A0A0A09090A0A090909090909090909090908080809080808090808080908
+      0908080808080807080808080707080707070807070707070707070707070707
+      0707070706070707060706060606060606060606060506060606060505050506
+      0605060505050605050605050505050505040505050404040404050504050504
+      0404050404040404040404040403030403040404040404040403040403030303
+      0303030303030303030302020303030202030203030302020302030202020202
+      0302030202020202020202020201020201010202020102010101010101010101
+      0101010101010101010101010001010000010000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000003030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030302F303030303030302F2F302F
+      302F2F2F2F302F2F2F2F2F2F2F2F2F2F2F2E2F2F2E2F2F2E2F2F2F2E2F2F2F2F
+      2E2E2E2E2E2E2F2F2E2E2E2E2E2E2E2E2E2E2E2D2E2D2E2E2D2D2D2E2D2D2D2D
+      2F30303232323333333434343636363838383939393A3A3A3B3B3B3B3B3B3C3C
+      3C3B3B3B3B3B3B3635362E2D2E2B2C2B2B2B2C2B2C2C2C2B2B2B2B2C2B2B2B2B
+      2B2B2B2B2B2B2B2B2B2B2A2A2A2A2A2A2A2B2B2A2A2A2A2A2A2A292A2A2A2A2A
+      29292A292929292A2A2929292929292929292929292928292929292829282828
+      282828282728282727282828272929292F2E2F30303133323234343432323226
+      26272626272626272626272626272D2C2C2C2C2B2D2B2B2C2C2B2C2B2C2C2B2B
+      2C2B2B2C2B2A2B2B2B2B2B2B2A2A2A2A2A2A2A2A2A2A2A2A2A292A2929292929
+      2929292929292929292829292928292928282828282928282828282728272728
+      2727272827282727272827272727272727272727272627262626272626262626
+      252626262525202121202120202020202020201F1F201F1F20201F1F1F201F1F
+      1F1F1E1F1F1F1F1E1F1E1E1E1E1F1E1E1E1E1E1E1E1E1E1E1E1D1D1D1D1D1D1E
+      1E1F222222252524272827292A292020201C1D1D1C1C1D1C1B1D1C1B1C1B1C1D
+      1C1B1C1E1E1E1F1F1F1F1F1E1F1F1F1E1E1E1E1E1E1E1E1E1E1E1E1D1E1E1D1D
+      1E1E1D1D1D1D1D1D1D1D1D1D1D1D1D1D1C1D1C1D1C1C1C1C1C1C1C1B1B1C1B1B
+      1C1B1B1C1C1C1B1B1B1B1B1B1B1B1B1B1A1B1B1A1A1A1B1A1A1A1A1A1A1A1A1A
+      1A1A1A1A1A191A19191919191919191918181818171615151515151516151515
+      1518181729282834343439393940404045444520202012121212131313131212
+      1212121212121212111211121111121211111111111111111111111111101111
+      101011101010100F0F0F101010101010100F0F100F0F0F0F0F0F0F0F0F0F0F0F
+      0F0E0F0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0D0D0D0D0D0E0D0D0D0D
+      0D0D0C0C0C0D0D0C0D0C0D0C0C0D0C0C0C0C0C0C0B0C0C0C0B0C0C0C0B0C0B0B
+      0B0B0B0B0B0B0B0A0B0B0B0B0A0A0B0A0A0A0B0A0A0A0A0A0A0A0A090A0A0A0A
+      09090A0A09090A0909090A090909090908090908090908090908090908090808
+      0808080808070808080708070808070708070707070707070707070707070707
+      0707060706070607060606060606060606060606060606060606060506060506
+      0506050506050505060505050505050505050505050504050504050405040404
+      0404040404040404040403040404040404030403030303040303030404030304
+      0303030303030303030303030303030302020303020202030202020202030202
+      0202020202020202020202020202020201020201020101020102020101010101
+      0101010102010101000101000000010001000001000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030302F3030303030303030303030302F302F3030303030
+      2F2F2F2F2F2F302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2E2E2F2E2E2F2F2E
+      2E2E2F2E2E2E2F2F2E2E2E2E2E2E2E2E2E2E2D2D2E2E2D2E2D302F3032323234
+      33333534343636363838383939393B3B3B3B3B3B3C3C3C3C3C3C3C3C3C3C3C3C
+      3C3C3C3B3B3B3B3B3B3535342E2E2E2C2C2C2B2C2B2B2B2B2B2B2B2B2C2B2B2B
+      2B2B2B2A2A2A2B2B2B2A2A2B2B2B2A2A2A2A2A2A2A2A2A2A2A2A2A2A292A2929
+      29292A292A2929292A2929292929292929292929282929282928292829282828
+      2828282828282827282B2A2B2E2E2F3031303332333434342D2D2D2626272626
+      272626272626272727272D2C2C2C2C2B2D2B2C2D2B2B2C2B2B2D2B2B2C2B2B2C
+      2B2B2B2B2B2B2B2B2B2B2B2B2B2A2A2A2B2A2A2A2A292A2A292A2A2929292929
+      2929292929292929292929292828292829292828282828282828282827282827
+      2728272727272727272827272727262727272726262626262627262626252626
+      25252322232021212020202120212020201F202020202020201F201F1F1F1F1F
+      1F1F1F1F1F1F1E1E1F1F1F1F1E1F1F1E1E1E1E1E1D1D1E1D1D1E1D1D1D1E1D1D
+      1E1D1D1D1D1D1D1D1D1D1D1D1D1C1D1D1C1C1D1C1C1D1C1C1C1B1B1C1E1E1F1F
+      20201F1F201F1F1F1F1F1E1F1F1F1F1E1E1F1E1F1E1E1E1E1E1E1E1E1D1E1E1E
+      1E1D1D1D1D1E1D1D1D1C1D1D1D1C1D1C1C1C1C1C1D1C1C1C1C1C1C1C1B1C1C1C
+      1C1C1C1B1B1C1C1B1B1B1A1B1B1B1B1A1B1B1A1B1B1B1A1A1B1A1A1A1A191A1A
+      1A1A191919191919191919191919181818161516161515151515161617191919
+      2E2D2E3434343A3A3A4040404545451919191213131313131213131212121212
+      1212121212121212111111121111121111111111111110101010111110101011
+      101010101010101010101010101010100F0F0F100F0F0F0F0F0F0E0F0F0F0F0E
+      0F0F0E0E0E0E0E0E0E0D0E0E0E0E0D0D0D0E0D0D0E0E0D0E0D0E0D0D0D0D0D0D
+      0C0D0D0D0D0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0B0C0B0C0B0B0C0B0B0B0B0B
+      0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0A0A0A0A0A0A0A0A0A0A0A0A0A090A0A
+      0A0A0A090A090A090A0909090909090909090909090908090909090808080808
+      0808080808080808070707080707080707080807070807070706070707060707
+      0606070707060707060706060706060606060606060606050605050605050505
+      0606060505050605050504050404040505050405050504050505040404050404
+      0404040504040404040403040304030304040404030304040403040303040303
+      0304030302020303030203030303030202030303030203020202020302030203
+      0202020202020202020202020202010202020102010101020201010101010101
+      0101010101010100010100010101000001000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030302F30302F2F30302F30303030302F3030
+      2F2F2F302F302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2E2F2F2F2F2F2E2E2F
+      2F2E2F2E2E2E2E2E2E2E2E2E2E2E2E2D2E2D3131303333323334343534343636
+      373938383B3A3A3737373231323A3A3A3C3C3C3C3C3C3C3C3C3C3C3C3C3C3C3C
+      3C3C3C3C3C3A3B3B3B3B3B3534342E2E2E2B2B2B2B2B2C2C2B2B2B2B2B2B2B2B
+      2B2B2B2B2B2B2B2B2A2A2A2B2A2A2A2A2B2A2A2A2A2A2A2A2A2A2A2A2929292A
+      2A292A2A292929292A2929292929292929292929292928282928282828282828
+      28282828282B2B2B2F2F2F3131313333333434342E2E2E262627262627262627
+      2626272828282D2C2C2D2C2C2D2C2C2C2C2B2C2C2C2C2B2B2C2B2C2C2B2B2C2B
+      2A2B2B2A2B2B2A2A2A2A2B2A2A2B2A2A2A2A2A2A29292A292A292A2A2A2A2929
+      2A29292929292929282829282828282828292928282828282828282828282827
+      2828272828282727272727272726272726262627262626262626262626262625
+      252121212020202020212020202020202020201F202020201F1F1F1F1F20201F
+      1F1F1F1E1E1F1F1F1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1D1E1D1D1D
+      1D1D1D1D1C1D1D1D1D1C1C1D1C1D1D1C1C1D1C1C1D1E1D1E2020201F1F1F1F1F
+      1F1F1F1F1F1F1F1F1F1F1F1F1E1F1E1E1F1E1E1E1E1E1E1E1E1D1E1E1E1D1E1D
+      1E1D1D1D1D1D1D1D1D1D1D1D1D1D1C1C1C1D1D1C1C1C1C1C1C1C1C1B1B1C1C1B
+      1C1B1B1B1B1C1B1B1B1B1B1B1B1B1B1A1B1A1A1B1A1A1A1A1A1A1A1A1A1A1A1A
+      191A1A1919191919191A1717171516161615161616161617161A1B1A2F2F2F35
+      35353B3B3B404040454545131313121313121313131213121213121212121312
+      1212121211121112121112111112111112111110111111111011101010101011
+      111010101010100F10100F100F100F10100F100F0F0F0F0F0F0F0F0F0E0E0F0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0D0D0D0E0E0D0E0E0E0D0D0D0D0D0D0D0C0D0D
+      0D0D0D0D0C0C0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0B0B0C0B0C0B0B0B
+      0B0B0B0B0B0B0A0B0B0B0B0B0B0A0B0A0A0A0A0A0A0A0A0A0A0A0A0A0A090A0A
+      090A0A0909090909090A09090909090808090908090809090908080908080808
+      0808080707080708070708070807080707070707070707070707070707070707
+      0606060607060706070606060606060606060506050605060606060606050605
+      0506050506050505050505050505050404050504040504040404040505040404
+      0404040404040304040304040404040304030304040304040303030303030303
+      0302030303030303030303030202020203020302030202030203030302020202
+      0202020201020202020201020202020201010201010102010101020201010101
+      0101010101010101010101000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030302F2F302F2F30302F2F302F2F
+      2F2F2F2F2F2F302F2F2F2E2F2F2F2F2E2E2F2F2F2F2F2F2F2F2F2E2F2E2E2E2F
+      2E2F2E2E2E2E2E2E2E2E2E3131303233333433343535353737373938383A3A3A
+      3535362B2B2B2C2C2C2C2C2C3232323B3B3A3D3D3D3D3D3D3C3C3C3C3C3C3C3C
+      3C3C3C3C3C3C3C3B3A3B3B3A3A3535352E2D2D2B2C2B2B2B2B2B2B2B2A2B2B2B
+      2B2B2B2B2B2B2A2B2A2B2A2A2A2B2B2A2A2A2A2A2A2A2A2A2A2A2A292929292A
+      2929292929292929292929292929292929292828292928282828292828282828
+      282C2C2B302F303132323333343636362C2C2C26262726262726262726262728
+      28282D2C2C2D2C2C2D2C2C2C2C2C2D2C2B2C2B2C2C2B2C2C2B2B2C2B2B2B2B2B
+      2B2B2B2B2A2B2A2B2A2A2A2A2A2A2A2A2A292A292A2A292A292A292A292A292A
+      2929292929292928292928292928292928292828282927282828282827282827
+      2827272727272827272727272727272726262727262726262626262626242324
+      222122222122212121212121202021202020201F201F1F1F1F1F1F1F1F1F1E1E
+      1F1F1E1F1E1F1E1E1E1E1F1E1E1E1E1E1E1E1E1E1E1D1D1D1E1D1E1D1D1D1E1D
+      1D1D1C1D1D1C1C1D1D1D1D1D1D1D1E1E1E2020201F202020201F1F1F1F1F201F
+      1F1F1F1F1F1F1F1F1F1E1F1F1F1E1E1F1E1E1E1E1E1E1E1E1D1E1E1E1D1D1D1D
+      1D1D1D1D1D1D1D1D1D1D1D1D1D1C1C1D1C1D1D1D1C1C1C1C1C1C1B1C1B1C1C1B
+      1C1C1B1B1C1B1B1B1B1B1A1B1A1A1A1A1B1B1B1A1A1A1A1A1A1A1A1A191A1A1A
+      1A191A19191A1718171616161616151515151617171E1E1E3131303636363C3C
+      3C4242423C3C3C14141313131313131212131313131312121312121212121212
+      1212111212111211121212111111111111111111101110111011101010101110
+      1010101010100F10100F10100F0F0F0F100F0F0F0F0F0F0F0F0F0E0E0F0E0F0E
+      0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0C0D
+      0D0D0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0B0C0B0C0C0B0B0B0B0B
+      0B0B0B0B0A0B0B0A0B0A0B0A0B0A0B0A0A0A0A0A0A0A0A0A090A0A0A09090909
+      0A090A090A090909090909090909090908090908080908080809090808080808
+      0808080808080708080808080707070707070807070707070707070707060607
+      0706060606070606060606060606060606060606050605050606060506050505
+      0505050505050505050505050504050405040405050404040404040404040404
+      0404040404040404040304040304040403030304030403030303030404030303
+      0303030303030303030303020203020203020202020202030202030202020202
+      0202020202020202020102020101020101020201010101010101010101010101
+      0100000101000000000001000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030302F30302F302F2F2F2F2F2F302F3030
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2E2F2F2E2E2F2F2E2F2E2F2F2E2F2E2F
+      2E2F2E2F3131313333333434343636363737373839393B3B3B3434332B2B2C2C
+      2C2C2C2C2C2C2C2C2B2C2C2C2C2C3232333A3B3A3D3D3D3D3D3D3C3C3C3C3C3C
+      3C3C3C3C3C3C3B3B3B3A3A3A3B3A3B3434352D2D2D2B2B2B2B2B2B2B2B2B2A2B
+      2B2B2A2A2B2B2A2A2B2A2B2A2B2A2B2A2A2A2A292A2A29292A292A2A292A2A2A
+      2A29292A292A29292929292929292928282929282828292828282828282D2D2D
+      3131313332323435343636362B2B2A2626282626272626272626272A292A2D2C
+      2C2D2C2C2D2C2C2D2C2C2C2C2C2D2B2B2C2C2B2C2B2B2C2B2B2B2B2B2B2B2B2B
+      2B2B2B2B2A2A2B2A2A2B2A2B2A2A2A2A2A2A2A2A2A2A292A2A292A2A29292A29
+      2929292929292929292828282828292929292828282728282828282828272727
+      2827272727282727272726262626262626272626262726272626262625262626
+      2526262626252526252525252525242525242424242223232223222222212121
+      202021201F201E1F1E1E1E1E1E1E1E1E1D1E1E1D1E1E1D1D1E1D1D1D1D1D1D1D
+      1D1D1D1D1C1C1D1F1E1F2020202020202020201F1F201F1F201F1F201F20201F
+      1F1F1F1F1F1E1F1F1F1F1F1E1F1E1E1E1E1E1E1E1E1E1E1E1E1E1D1D1E1D1D1D
+      1D1D1D1D1D1C1C1C1D1C1D1D1C1C1D1C1C1D1C1C1D1C1C1C1C1C1C1C1C1B1B1B
+      1C1C1B1B1B1B1B1B1B1B1B1B1B1A1B1B1A1A1A1A1A1A1A1A1A1A191A1A191A19
+      191A1716181616161616161616161717172322223132313837373D3D3D434343
+      3636361314131313131313131313131212121212131312131312121212121212
+      1211111212111212121111111111111111111011101010111111101010101010
+      1010101010101010100F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0C
+      0D0C0D0C0C0C0D0C0C0C0C0C0D0C0C0C0C0B0C0C0C0C0C0B0C0C0B0B0B0B0B0B
+      0B0B0B0B0B0A0B0B0B0B0A0B0A0A0A0A0B0A0A0A0A0A0A0A0A0A0A09090A0A09
+      09090909090A0A09090909090909090909080809080908080809080808080808
+      0808070808080807070708070808070707070807070707070707070707070706
+      0607060607060606060606060606060606060606060505050606050605050606
+      0605050505050505050504050505050505040504050405050504040404040404
+      0404040404040404040403040304040303040304030404030303030303030303
+      0303030303030302020302020302030203020202020302020302030202020202
+      0202020202010202020202020101010101020101010101010101010101010101
+      0101000101000101000100000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030302F30302F3030302F30302F30302F3030302F2F2F3030302F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2E2F2F2F2F2F2F2F2F2E2F2E2E2E2E313131
+      3333333535343636363838383939383B3B3A3232322C2B2C2D2D2D2D2D2C2C2C
+      2C2C2C2C2C2C2C2B2B2C2C2C2C2C2C2C3332323A3B3B3D3D3D3C3C3C3C3C3C3C
+      3C3B3C3C3C3C3C3C3B3B3A3A3A3A3A3B3A3434352D2D2D2B2B2B2B2B2A2B2B2B
+      2B2B2A2B2A2A2A2A2B2A2A2B2A2A2A2A2A2A2A2A2A2A2A2A2A2929292929292A
+      292A292A2A29292929292929292929292928292928282C2C2C2F2F2F31313134
+      34333534353736362B2A2A2727272626272626272626272A2A2A2D2C2C2D2C2C
+      2D2C2C2D2C2C2D2C2C2D2B2C2C2B2B2C2C2C2C2C2C2C2C2C2B2C2B2B2B2B2B2A
+      2A2B2B2B2A2B2A2A2A2A2A2A2A2A2A2A2A292A2A2A29292A2A29292A292A2929
+      2929292829292829282929282928282828282828282828282828282827272728
+      2727272727272727272727262727262626262626262626262626252626262626
+      2525262525262525252525252525252524252524242424252424242424242423
+      23232323232222232221212121212020201F1F1F1E1D1E1D1E1D1D1E1D1D1D1D
+      1E1D1D202121202120202020202021202020201F201F1F201F1F1F1F1F1F1F1F
+      1F1F1F1E1F1F1E1E1F1E1E1E1E1E1F1E1E1E1E1E1E1D1D1D1D1D1E1D1E1E1D1D
+      1D1D1D1D1D1D1D1D1D1D1D1D1D1C1C1C1D1C1C1D1C1C1B1C1C1B1B1B1B1B1B1C
+      1B1C1B1B1B1B1B1A1B1B1B1B1B1B1B1A1A1A1B1B1A1A1A1A1A1A1A19191A1616
+      161616161616161616161818182524253233323838383E3E3E4444442D2D2D13
+      1414131314131313131313131313121312121312121212131312121212121212
+      1111121211111212111111121111111011111111101111111011101011101010
+      1010101010100F0F100F0F0F10100F0F0F0F0F0F0F0F0F0F0E0E0F0F0E0E0E0F
+      0F0E0E0E0E0E0E0E0E0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0C0C
+      0D0C0D0D0D0D0D0C0C0C0C0C0C0C0C0C0C0C0C0B0C0C0C0B0B0C0B0B0B0B0B0B
+      0B0B0B0B0A0A0B0B0A0A0A0A0B0A0A0A0A0A0A0A0A0A0A0A0A090A0A0A090A0A
+      0A0A090909090909090909080909080909080808090908080908080808080808
+      0807070808070707080707070708070707070707070707070706060707070707
+      0707070606060706060606060605050606060606060505050605060605060505
+      0505050506050505050505040405050404040405050405050404040404040404
+      0403040404030403040403040403040404030303040303030303030303030303
+      0203030202030303030303020302020303030302030203020202020202020202
+      0202010201020202010202010202010102020101010101010101010101010101
+      0001000000000000010000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      2F30303030303030303030302F30302F2F2F2F2F302F302F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2E2F2F2E2F2F2E2F2F2E2E2E32323133333334343436
+      37363838383A3A3A3A3A3A3231332C2C2C2D2D2D2C2C2D2C2D2C2C2C2C2C2C2D
+      2D2C2C2C2C2C2B2C2C2C2C2C2C2B2B2C2B2B3333333B3B3B3D3D3D3C3C3C3C3C
+      3C3C3C3B3B3C3C3C3C3C3C3C3B3A3A3B3B3A3A3333332C2C2C2B2B2A2B2B2A2A
+      2A2A2A2B2B2A2B2B2A2A2A2A2A2A2A2A2A2A2A2A2A29292A2A2A29292929292A
+      2929292A29292929292928292D2D2D2F2F303030303131313333333535353636
+      363736372727272627282627272726272626272A2A2A2D2D2C2D2C2C2D2C2C2D
+      2C2C2D2C2C2D2C2C2D2B2B2D2C2C2C2C2C2C2B2B2B2C2B2B2B2B2B2B2B2B2B2B
+      2A2B2B2A2A2B2A2A2A2A2A2B292A292A292A292A292A292A2929292929292929
+      2929282929292928282828282829282928282928272828282828282827272827
+      2727272727272727272627272726262726262627262626262625262625252626
+      2525252525252525252525252524242525242524242424242424242423232423
+      23232323242223232222232222232221222221212121201F20201F1F21212121
+      2120212121202120202020202020202020201F201F1F201F1F201F1F1F1F1F1F
+      1F1F1F1F1F1F1E1F1E1F1E1F1E1E1E1E1E1E1E1E1E1E1E1D1E1D1D1D1E1D1D1D
+      1D1D1D1D1C1C1D1C1C1C1C1D1D1C1C1C1C1C1C1C1C1C1C1B1C1C1C1C1B1B1B1B
+      1B1B1B1B1B1B1B1B1A1B1A1A1A1A1B1A1A1B1A1A1A1A1A191919161617161617
+      1616161616161919192A2A2A3334343A3A393F3F3F4545452423241314141414
+      1313141313131313131313131313131312131312131212121212121212121212
+      1212121111121211111111111111111111101010111110111111101010101010
+      10101010100F100F100F10100F100F0F0F0F0F0F0F0E0F0F0E0F0E0E0F0F0E0F
+      0E0E0E0E0E0E0E0E0E0E0D0D0E0D0E0D0D0D0E0D0D0D0D0D0D0C0D0D0D0C0D0C
+      0D0D0C0D0C0D0C0C0C0C0C0B0C0C0C0C0B0C0C0B0B0C0B0B0B0B0B0B0C0B0B0B
+      0A0B0B0B0B0A0B0A0A0B0A0A0B0A0B0A0A0A0A0A0A0A090A09090A090A0A0A09
+      0909090909090909090908090909080908090808080908080908090808080808
+      0808070808070808070708080807070707070707070607070707060707060606
+      0606070606060606060706060606060606060506060505050605050505050505
+      0505050505050504050504050504040404040505040504040504040404040404
+      0404040404030404030403040303040304030404030303030303030303030303
+      0303030203030303030202030302020202030202020202020202020202020201
+      0202020201020102020201020201010101020101010101010100010101010101
+      0100010000000101000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000030303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030302F3030302F302F2F302F302F2F302F302F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2E2F2F3132323333333534353637373838383A3A
+      3B3A3A3A2F2F2F2C2C2C2C2C2D2D2D2D2C2D2C2C2C2D2D2C2C2C2D2C2D2D2C2C
+      2C2C2C2C2C2C2C2C2C2C2C2C2B2C2C2B2C2D2C2C3434353B3C3C3D3D3D3C3C3C
+      3C3C3C3C3C3B3B3C3C3C3B3B3B3B3C3B3A3A39393A3333332C2C2C2B2B2A2B2B
+      2A2B2B2B2A2B2B2A2A2A2A2A2A2A2A2A2A2A292A2A292A2A2A29292A2A2A2929
+      292A2D2D2E303030303030313030313131333333353535363637373737383838
+      2727282627282727282626272626282B2B2B2D2D2C2D2C2C2D2C2C2D2C2C2D2C
+      2C2D2C2C2D2C2C2D2B2C2C2C2C2C2B2C2B2B2C2B2B2B2B2B2B2B2B2A2B2B2A2A
+      2A2B2A2B2B2A2B2B2A2A2A2A2A2A2A2A2A292A292929292A2A2A292929282929
+      2928292828292829292828282828282828282828282828282827272828272727
+      2827272727272727272727262626262626262626262626262626262626252626
+      2625252525252525252525242525252424242424242424242323242323242323
+      2423232422222322222322222322222322222222212221212221212120212121
+      212121202120202021202020202020201F20201F1F201F2020201F1F1F1F1F1F
+      1F1F1F1E1F1F1E1E1E1F1E1E1E1E1E1E1E1E1E1E1E1E1E1E1D1D1D1E1D1E1D1D
+      1D1D1D1D1D1D1D1D1D1C1D1C1C1C1C1C1D1C1C1C1C1B1B1C1C1C1B1B1B1B1B1B
+      1C1B1B1B1B1A1A1B1B1B1A1A1B1A1A1A1A1A1A19191916161617161717161617
+      1717191A192D2D2D3435353A3A3A4041404545451D1D1D141414141414141413
+      1413131313131313131313121313131313131212121212121212121212121112
+      1111121111111112111111111111111111111010111010101010101010101010
+      10100F0F0F0F10101010100F0F0F0F0F0F0F0F0E0E0F0F0F0E0F0E0E0E0F0E0E
+      0E0E0E0E0E0E0E0D0E0E0D0E0D0E0D0E0E0E0D0D0D0D0D0D0D0C0D0C0C0D0C0C
+      0C0C0D0D0C0C0C0C0C0C0C0C0C0C0C0B0B0C0C0B0B0B0C0B0B0C0B0B0B0B0B0B
+      0B0A0B0B0B0B0A0B0A0B0B0B0B0A0A0A0A0A0A0A0A0A0A0A090A0A0A09090A09
+      09090909090A0909090909090809090908080908080808080808090808080807
+      0807080808080708070707070707070707070707070707060707070607060706
+      0706060606060606060606060606060506060606050506060606050505050506
+      0505050505050505050405040404040405040404050504050404040404040404
+      0404040404040404030304040303040303030404030303030303030303030303
+      0203020203020303020203030202020202020302020202020202020202020202
+      0201020202020101010101010201010102010101010101010101010101010000
+      0100000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000003030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030302F302F302F303030302F2F302F2F302F2F302F
+      2F2F2F2F2F2F2F2F3232323333333534343736363838383A3A3A3A3B3A2F302F
+      2C2D2C2D2D2D2D2D2D2D2D2D2D2D2C2D2D2C2D2E2D2D2D2D2C2C2D2C2D2C2C2C
+      2C2C2C2C2C2C2C2C2C2C2B2C2C2C2B2C2B2B2B2D2C2D3435343B3B3B3D3D3D3C
+      3C3C3C3B3C3B3B3C3C3B3B3B3C3B3B3C3C3A3A3B3939393333332C2C2C2A2A2B
+      2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A29292A292A2A2D2D2D2F30303130
+      3031323132323133333233343336353637373737373838393831313127272826
+      27272727272627282726272B2B2B2D2D2C2D2C2C2D2C2C2D2C2C2D2C2C2D2C2C
+      2D2C2C2D2C2C2C2C2C2C2B2C2C2C2C2C2B2C2B2B2B2B2B2B2B2B2B2A2B2A2A2A
+      2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A292A292A29292A2929292929292929
+      2929292828282828282828282828282828282828272727272728282727272727
+      2727272627272727272727262626262626272626262626262626262525262525
+      2525252525252525242525252524242524242424242424232324232324232324
+      2222242222232222232222232222232122222222222122212121212121212021
+      2120212020202020212021201F20202020201F201F1F1F20201F201F1F1F1F1F
+      1F1F1E1E1F1F1F1F1E1E1E1E1E1E1D1E1E1E1E1D1E1D1D1E1D1D1D1D1D1D1D1C
+      1D1D1D1D1C1D1D1D1D1C1C1C1C1D1D1C1C1C1C1C1B1C1C1B1B1C1B1B1B1B1B1B
+      1B1B1B1B1B1B1B1A1A1A1B1A1A1A1A1919191717171717171717171717181B1A
+      1A2F2F2F3435353B3C3C40404046454515141514141514141414141313141313
+      1413131313131313131312131313121312121313121212121212121212121211
+      1111121211111111111111111111111111111111101010101010101010101010
+      100F0F100F10100F0F100F0F0F0F0F0F0F0F0F0E0F0E0F0F0F0F0E0F0E0E0E0E
+      0E0E0E0D0E0E0E0E0E0D0E0D0D0D0D0E0D0E0D0D0D0D0D0D0D0C0D0D0C0D0D0C
+      0C0D0C0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0B0C0B0B0B0C0B0B0B0A0B0B
+      0B0A0B0B0B0A0B0A0A0B0A0A0A0A0A0A090A0A090A0A0A0A0909090A09090A09
+      0909090909090809090909090909080809080809090808080808080808070807
+      0708080708080808070707070708070707070707060607060707070607060706
+      0707060706060606060606060606050605050605050505050606060606050505
+      0505050405050504050405050505040505040404050404040404040404040404
+      0404040404040404040403030403030304030303030303030303030302030303
+      0303030302030303030202020203030303020202020203020202020202020201
+      0202010201020101010101020102010101010101010001000100010100000100
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030302F3030302F30302F302F302F302F302F2F2F302F2F30302F2F2F2F2F2F
+      2F3232323333333534343637373939383B3B3A3B3A3A302F302C2C2C2D2D2D2D
+      2D2D2D2D2D2C2D2C2D2D2D2D2E2F3433333534343131312E2E2E2C2C2C2C2C2C
+      2C2C2B2C2C2C2B2C2C2C2C2B2B2B2B2B2B2B2B2C2B2C2C2C3434343B3B3B3D3D
+      3D3D3D3D3B3B3C3C3C3B3C3B3C3B3B3B3A3A3A3A3A3A3938393332332C2B2B2A
+      2A2B2A2B2A2A2B2A2A2A2A2A2A2A2C2C2C2F2E2F303030323132323232333333
+      3434343535353636353636373737383131322A292A2727282727282727282627
+      282727272727272D2D2C2D2D2C2D2D2C2D2C2C2D2C2C2D2C2C2D2C2C2D2C2C2D
+      2C2C2D2C2C2C2C2B2C2B2C2C2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2A2B2B
+      2A2A2B2A2A2A2A2A2A2A292A2A2A2A292A2A2A29292A292A2929292929292928
+      2929292928292928282828282828282828282827272727272727282827272727
+      2727262727272626272726262626262726262626262626262526252526252525
+      2525252525252525252525252524242424242424232423232423232423232422
+      2323232223222223212223222222222122222222222121212121212120202121
+      212020202120202020202020201F201F201F1F201F201F1F1F1F1F1F1F1F1F1F
+      1F1F1E1E1F1F1E1E1F1E1F1E1E1E1E1E1E1E1D1D1D1D1D1D1D1D1D1D1D1D1D1D
+      1D1D1C1C1D1C1D1C1C1C1C1C1C1C1C1C1C1C1C1B1B1C1B1B1C1C1C1C1B1C1B1B
+      1B1B1A1B1B1A1B1B1A1A1B1918181717171716171716171717171E1E1F313030
+      3737373C3C3B4343433F40401514141414141514141414141414131414131313
+      1413131313131313131313121212121312131212121212121212121112121212
+      1212111112111111111111111111101111101011111010111010101010101010
+      100F0F0F0F0F0F0F0F0F0F100F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0F0E0E0E
+      0E0E0D0E0E0E0D0E0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0D0D
+      0C0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C0C0C0B0B0B0B0B0B0B0B0B0B0A
+      0A0B0A0A0B0A0A0B0A0A0A0A0B0A0A0A0A0A0A090A090A09090A0A0A090A0909
+      0A09090909090909080909080908080909080809080808090808080807080807
+      0707070808070808080707070707070707070707070607070607070606060607
+      0607060606060606060605060605050506050605060506050506060505050505
+      0505050505040505040505050405050505040505040405040404040404040403
+      0304040403040404030304030303030303030303030303030303030303030303
+      0302030203020202030202030302030202020203020202020202020202020102
+      0201010102010201020101010101010201010101000101000101010101000100
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030303030303030303030302F3030
+      302F302F303030303030302F30302F2F2F2F2F2F2F2F2F2F2F30323232333333
+      3535353636373938393B3A3B3B3B3B2F302F2C2C2D2E2D2E2E2D2D2D2D2D2D2D
+      2D2D2D2D2E2E2F3534343434353435353535343435353232312E2E2D2C2C2C2C
+      2C2C2C2C2C2C2C2C2B2C2B2B2B2C2C2B2B2B2B2C2B2C2B2D2C2C3434343B3B3B
+      3C3D3D3B3C3B3B3C3B3C3B3B3B3B3B3B3B3B3A3A3A3A3A3A3738373231322C2C
+      2C2A2B2A2B2C2B2F2F2F32323232323132323233333234343436353536363638
+      3737383838303030282828272828282728272728272728272728272628262728
+      2726282E2D2C2E2D2C2D2D2C2D2C2C2D2C2C2D2C2C2D2C2C2D2C2C2D2C2C2D2C
+      2C2C2C2B2C2C2C2C2B2B2B2C2C2B2B2B2B2B2C2B2B2B2B2B2B2B2B2B2B2B2B2B
+      2A2B2B2B2A2A2A2A2A2A2A2A2A2A292A2A29292A29292929292A282929292828
+      2928292828282829282828282828282828282828282728272727272827272727
+      2727272726272727262626262627272626262625262625262525252526262526
+      2525252525252524252424252424252424252323242323242323242323232322
+      2322222322222322222221222222222222212122212121212121212121212021
+      21202021202121202020202020201F20202020201F1F201F201F1F1F1F1F1F1F
+      1E1F1F1F1F1E1E1E1E1E1E1E1E1E1E1E1D1E1E1E1D1E1D1D1D1D1D1E1D1D1D1D
+      1D1C1C1C1D1D1C1D1D1C1C1D1C1C1C1C1C1C1C1B1C1C1B1B1B1B1B1B1B1B1B1B
+      1B1B1B1A1B1A1B1717191717181717171717171818172122223233323737373E
+      3E3E4444443A3A3A141515141414141414141414141413131414131314131313
+      1313131313131313121312121212121212131212131212121112121211121112
+      1111111111121111111111111111101111111010111011101010101010101010
+      10100F100F0F0F100F0F0F0F0F0F0F0F0F0E0F0F0F0F0F0E0F0E0F0E0E0E0E0E
+      0E0E0E0E0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0C0C0C0D0D0C0C0D0C0C
+      0C0C0C0C0C0C0C0C0C0C0B0B0C0C0C0B0B0C0B0B0C0C0B0B0B0B0B0B0B0B0B0B
+      0B0B0B0B0A0A0A0A0B0A0A0A0A0A0A0A0A090A0A09090A0A0A0A090909090909
+      0909090908090909090809090909080908080809080808080808080808070808
+      0707070708070807080707070707070707070606070706060706060607060606
+      0606060606060606060606060606050606060506050505060505050505050505
+      0504050504050504040504040405050404050404040404040404040404040304
+      0404040404030403030404040303030303030303030303030303030303020203
+      0203020303030203020202020202020202020202020202020202020202010202
+      0102020201010101020101010101010101010101000000010100000101000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030302F2F30302F2F3030302F2F30302F32323233333435353537373739
+      39393B3B3B3B3B3A3030302D2D2D2D2D2D2D2D2D2D2D2D2D2D2E2D2E2D2F2F2F
+      3534343535343435353535353534343434353434353434343231312E2D2D2C2C
+      2C2C2C2C2C2C2C2C2C2B2C2C2C2B2B2B2B2B2B2B2C2C2B2B2B2C2C2C3434343B
+      3B3B3D3C3D3C3B3C3B3B3B3B3B3C3B3B3B3A3A3A393939383838363636313030
+      3333333333333333333433343433343435353535353738383737373131312929
+      2A2828282828292728292727282728292727282727292727282727282928292D
+      2D2C2D2D2D2D2D2C2D2D2C2D2C2C2D2C2C2D2C2C2D2C2C2D2C2C2D2C2C2C2C2C
+      2C2C2B2C2C2C2C2C2C2B2B2C2B2C2B2B2B2B2B2B2B2B2B2B2B2A2B2B2A2A2B2A
+      2A2A2A2A2A2B2A292A2A2A2A2A29292A2A292929292929292929292929292928
+      2928292928292828282828282828282828272827272728282728272727272727
+      2627272626272726262726262726262626262626262626252625252525252525
+      2525252525242425242425242424232324232324232323232324232323222223
+      2222232222222222222222222222212122212221222121212121212121212121
+      20202120202020202020202020202020201F1F20201F1F1F1F1F1F1F1F1F1F1F
+      1E1E1E1F1F1F1E1E1E1E1E1E1E1E1D1E1E1E1E1D1E1D1E1D1D1D1D1D1D1D1C1D
+      1D1D1C1C1C1D1D1C1C1C1C1C1C1C1C1B1C1C1C1C1C1B1B1B1B1B1B1B1B1B1B1B
+      1A1B1A1817181817171717171717171919192625263333323939393F3F3F4444
+      442E2D2D15151415151414141414151414141414141413141413141313141313
+      1314131313131313131313131312121213121212121212121112121211111212
+      1211111111111111111111111010111010101010101010101010101010101010
+      10100F100F0F0F0F0F0F0F0E0F0F0F0F0F0F0E0F0E0E0F0E0F0E0E0F0E0E0E0E
+      0E0E0E0E0E0D0D0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0C0C0D0C0C0D
+      0C0D0C0C0C0C0C0C0C0C0C0C0B0C0C0B0B0B0B0B0B0B0B0B0B0B0B0B0B0A0B0B
+      0B0B0A0B0A0A0A0A0A0A0A0A0A090A0A09090A09090A09090A0A0A0909090909
+      0909090908080808080809090908080809080808090808070807080707080808
+      0707080808070708070807080707070707070706070607070707070606070606
+      0606070606060606050506060606050505060505060605050505050505050505
+      0505050505050504050405040505040405040404040404040404040403040404
+      0404040404040403030403030303040303030303030303030303030202030303
+      0202020203030303030202020302020202020202020202020202020202020202
+      0102010101010101010101010101010100010000010100000001000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303030303030303030303030302F
+      2F3030302F3030302F302F303132323334343534353737373939393B3B3B3B3B
+      3B3030302D2D2D2E2E2E2E2E2E2D2E2D2E2D2D2D2E2D30313036353535353535
+      35353534353535343535353434353535353434343434333434333131312D2C2D
+      2C2C2C2B2C2C2C2C2B2C2B2C2B2C2B2B2B2B2B2B2C2B2B2B2A2B2B2C2C2C3334
+      343D3D3C3D3D3D3B3B3C3C3C3B3A3A3A3A3A3A39393938373836373735363635
+      353535363536363636363637363738383833333229292B272828282829282829
+      2728292828292827282728282728292728282727292928292C2C2B2D2D2D2E2D
+      2C2E2D2D2D2D2C2D2C2C2D2C2C2D2C2C2D2C2C2D2C2C2D2C2C2D2C2C2C2C2C2C
+      2C2C2C2C2C2B2B2C2C2B2C2B2B2B2B2B2B2B2B2B2B2B2B2A2A2B2A2A2A2A2A2A
+      2A2A2A2A2A2A2A292A292A2A292A292929292A292A2929292929292928292828
+      2929282928282928282828272828282828272727282727272727272727272727
+      2727262727272626262726262726252626262626262625252525252525252525
+      2525252524242524242523242524232423242423232423222322222322222322
+      2323222222222222222222212221212121222221212121212121202020202120
+      2020202120202020202020201F201F1F201F1F1F1F1F1F1F1F1F1F1F1F1F1E1F
+      1E1E1E1F1E1E1E1F1E1E1E1E1D1D1E1E1E1E1D1D1E1E1D1D1D1D1D1D1D1D1D1D
+      1D1C1C1D1C1C1D1C1D1C1C1C1C1C1B1B1B1C1C1C1B1C1B1B1B1B1B1B1B1B1B18
+      1818171818171717181717191A192A2A2A3534353A3B3B404040454545282828
+      1514151415151414151515141414141414141414141314141413131313131313
+      1313131312121313121312131212121213121212121212121211121112111111
+      111111111110111111101111111110111010101010101010101010100F101010
+      0F0F0F0F0F0F0F100F0F0F0F0F0F0F0E0F0F0F0F0F0E0E0E0E0E0F0E0E0E0D0E
+      0E0E0E0E0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0C0C0D0D0D0C0D0D0C0D0C
+      0D0C0C0C0C0C0C0C0B0C0B0C0C0B0B0B0B0B0B0B0B0B0B0B0B0B0B0A0A0A0B0A
+      0A0A0A0A0B0A0A0A0B0A0A0A09090A0A090A0A0A09090A090909090909090909
+      0909090909090908090808090908080808090808080808080808070808070708
+      0807070707070708080707070707070707070707070606060706060606060607
+      0606060606060605060606060505060505050606050505050505050505050505
+      0505050505050505050505050405050504040404040404040404040404040404
+      0404030403030304040303030403030303030303030303030303030203020203
+      0202020303030302030202030202020202030202020202020202020101020101
+      0101010102010201010101010101010100010001000101000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030302F3131313333333434353636373838383A3A3A3B3B3B3030302D2D2D
+      2E2E2E2E2E2E2E2E2E2E2D2E2D2E2D3031313635363535353535353535353535
+      353534353535353535353435353535353534333434333434333433333030302C
+      2C2D2C2B2C2C2C2C2C2B2B2C2C2C2C2C2B2B2B2B2B2B2B2B2B2A2B2B2B2D2C2D
+      3536353C3C3D3B3B3C3B3B3B3A3A3A3A3A3A3939383838383838383737383737
+      373838383838383535352D2D2D28272829292928282928292929282928282928
+      28292728292828292829282A2A2B2D2E2D2E2E2D2E2E2D2E2D2D2D2D2D2E2D2C
+      2D2D2C2E2C2D2D2C2C2D2C2C2D2C2C2D2C2C2D2C2C2D2C2C2C2C2C2C2C2C2C2C
+      2C2C2B2C2C2C2B2B2C2B2C2B2B2B2B2B2B2B2B2B2B2B2B2B2A2A2B2A2A2A2B2A
+      2A2B2A2A2A2A2A2A2A292A2929292A29292929292A292A292929292929282929
+      2829292828282828282828272727282828272728282828272728272726272727
+      2727262627272726262726262626262626262626262526262525252525252525
+      2424252424242424242423242324242323242323232223232223232323232222
+      2322222222222222222121222122212221212121212121212121202020212021
+      202121202020201F201F1F20202020201F201F1F201F1F1F1F1F1F1F1F1E1F1E
+      1F1F1F1E1E1E1E1E1E1E1E1D1D1E1D1E1E1E1E1E1D1D1D1D1D1D1D1D1D1D1C1D
+      1C1D1C1C1C1C1C1C1D1C1C1C1B1C1C1C1B1C1B1C1B1B1B1B1A1B1B1818181818
+      181817181717171A1B1A2D2E2D3535353B3B3B41404147474723222215151515
+      1515151414151415151515141414141314141414131314131314131313131313
+      1313131313131312131212131213121212121212121212121211111111111111
+      11111111111111101111111011101111101110101010101010100F1010101010
+      0F0F100F100F0F0F0F0F0F0F0F0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0D0E
+      0E0E0E0E0D0E0E0E0D0D0D0D0D0D0D0D0C0D0D0D0D0D0C0D0C0C0D0C0D0C0C0C
+      0C0C0C0C0C0C0C0C0B0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B0A0B0B0B0A0A0A
+      0B0B0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0909090A09090A0909090A09090909
+      0909090809090809090908080808090808080908080708080708080808080707
+      0807080807070807070707070707060707070706070706070706070606060606
+      0607060606060506050606060506050606060605050505050505050505050505
+      0505050504050405050404050404040404040404040404040404030404040403
+      0403040404030304030303030303030303040303030303030303030302030302
+      0303030203020302020202020203020202020202020202020202020201010101
+      0201010101010101010101010101000001010000010000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030303030303030302F2F30303131
+      313433343535343737373838393B3A3A3C3D3C3131312E2D2D2E2E2E2E2E2E2D
+      2E2E2E2E2D2E2D2E313031353636353535353535353536353535353635353534
+      3535343535343435353534353534343434333434343433333433333333333030
+      302C2C2D2B2C2B2C2B2C2C2B2B2B2B2B2B2C2B2B2B2B2A2B2B2A2B2B2A2B2A2C
+      2C2D3635353C3B3B3B3B3C3B3B3B3A3A3A3A3A393839383938383A3A39383839
+      3130302828282928292928292928292929292828292828292828292828292929
+      292C2B2C2E2E2D2E2E2E2E2E2E2E2E2D2E2E2D2E2D2D2E2D2D2D2D2C2D2D2D2D
+      2D2C2D2C2C2D2C2C2D2C2C2D2C2C2D2C2C2D2C2C2C2C2C2C2C2C2C2C2C2C2C2C
+      2B2C2C2B2B2C2B2C2C2B2C2B2B2B2B2A2B2B2B2B2B2B2B2B2B2A2B2B2A2A2A2A
+      2A2A2A2A2A292A2A2A2929292A29292A29292929292929282928292829292929
+      2828282828282828282828282827282827272827272728272727272727272727
+      2727262627272727262626262626262626252525252525252525252525252524
+      2425242425232324232424232324232324232223232224222323232223222222
+      2222222222212222212122212221212122212121212121202021212120202020
+      202020202020202020201F20201F1F1F201F201F1F1F1F1F1F1E1E1F1F1F1E1E
+      1E1E1E1E1E1E1E1E1E1E1E1D1E1D1E1E1D1D1D1D1D1D1D1D1D1D1D1C1C1D1D1C
+      1C1D1C1C1C1C1D1D1C1C1C1C1C1C1B1C1B1C1B1C1B1A1A181819181818181818
+      1818191C1C1B3030303636363C3C3B4141424747461918181516151515151515
+      1414151414151414141414141414141413131414141413141313131313131313
+      1313131313131312131212121213131312121212121212111211111212111111
+      1111111011111111101010111011101010101010110F1010101010100F0F100F
+      100F0F0F0F0F0F0F0F0E0F0F0F0E0F0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D
+      0E0E0E0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0C0D0C0D0D0D0C0C0C0C0C0C0C0D
+      0C0C0B0B0C0C0B0B0C0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0A
+      0B0A0B0A0A0A0B0A0A0A0A0A090A090A090A0A090A0909090909090909090909
+      0909090909080808080908090908080808080808080808080708080808070807
+      0808080707070807070707070707070707060706060607070606070606060606
+      0606060606060606060505060605050605050605060505050505050505050505
+      0504040505050504050405040505040404040404040404040404040403040404
+      0304030303030303030403030303040303040203030303030202030303020302
+      0303020302020203020202020202020202020202020202020101010101010101
+      0101010101010101010101010101010000000100000001000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000030303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030313030343433353535
+      3637373938393B3B3B3D3D3D3333342D2D2D2E2E2E2E2E2E2E2E2E2E2E2E2D2E
+      2E31313136353636363535353535353536363535363535363535353535353534
+      3534353435353535343434343434343433353433343333343333333333323333
+      30302F2C2B2C2C2B2C2B2B2B2B2B2B2C2B2B2B2B2B2B2B2A2A2B2A2A2B2B2B2A
+      2B2C2D2D3535353B3B3B3B3B3B3B3B3B3A3A3B3B3B3B3433332A292A29292A29
+      2A292A292929292928292929282928282928282929292A2C2C2C2E2E2E2F2F2F
+      2F2F2F2F2E2E2E2E2E2F2E2E2F2E2D2E2E2D2E2D2D2E2D2D2E2D2C2D2D2D2D2C
+      2C2D2D2C2D2C2C2D2C2C2D2C2C2D2C2C2D2C2C2C2C2C2C2C2C2C2C2C2B2C2C2C
+      2C2C2C2C2C2B2B2C2C2B2B2B2B2B2B2B2B2B2B2B2B2A2A2A2A2B2B2B2A2A2A2A
+      2A2A2A2A2A2A2A292A2A2A2A29292A2A29292929292929292829292829282928
+      2828282828282828282828282828272727272827282727272827262726272727
+      2626262726262626272626262626252525252525262525252525262424252424
+      2524232424242423242423232423232423232422232323232322232322222223
+      2222212222222222212121212121212121212121212121212021202020202020
+      20202020202020202020201F201F1F1F1F1F1F1F1F1F1F1E1F1F1F1F1F1E1E1E
+      1E1E1E1E1E1F1E1E1E1E1D1D1E1E1D1D1D1D1D1E1D1D1D1D1D1C1C1D1C1D1C1C
+      1D1C1C1C1C1C1C1C1C1C1C1C1C1B1C1B191A191918191818181817181918191F
+      1F1E3232313737373D3D3D434342444443161516161615161615151515151414
+      1415151414151414141415141414141414131414141414141314141313131313
+      1212121312121212131312121312121212121211121212121111121112111111
+      1111111110111111101011101010101010101010101010101010100F10100F0F
+      0F0F0F0F100F0F0F0F0F0F0E0F0E0F0F0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0C0D0D0C0C0D0C0C0D0C0C0C0C0C
+      0B0C0C0C0C0B0C0C0C0B0C0C0B0B0B0B0B0B0B0B0B0B0B0A0B0B0A0A0A0B0A0A
+      0A0A0B0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0909090909090909090909090909
+      0909090808080808080809080808080808080808080808080807080808070807
+      0807080807070707070707060707070707060707060607060606060606060606
+      0606060605060606050606060506050505050505050605050505050505050405
+      0504050504050504050504040404050404040404040404040403040403040404
+      0404040303030304030303030303030303030302030303030203020303030303
+      0303030302030202020203020202020202020202020201020101020201010102
+      0101010101010100010101010100000100010000000100000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000003030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303131313333333434343636363838383B
+      3A3B3C3C3D3434342E2D2D2E2E2F2E2E2E2E2E2E2E2E2E2E2E2E313131363635
+      3636363635363635363636363536353535363535353535353535353535353535
+      3535353435353434353435343434343335343334333334333334333333333332
+      33332F30302C2C2C2B2B2B2C2B2C2B2B2B2B2B2B2B2B2B2B2A2B2B2B2B2A2B2B
+      2B2A2B2D2C2D3535353C3C3C39393A2F2E2F2929292A29292A29292A2A29292A
+      292A29292929292829292929292C2B2C2F2F2E2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2E2E2E2E2F2E2E2F2E2D2E2E2D2E2D2D2E2D2D2E2D2C2E2D2C2D2D2C2E2C2C
+      2D2C2D2D2C2C2D2C2C2D2C2C2D2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2B2C2C
+      2C2C2C2B2B2B2B2C2B2B2B2B2B2B2B2B2A2A2B2B2A2A2A2B2B2A2A2A2A2A2B2A
+      2A2A2A2A2A2A2A2A292A292A2A29292929292929292929292929292829292929
+      2928282828282828282828282828272727272727272727272727272727262727
+      2727262726262626262626262526262525252525252525252525242425242425
+      2324242324242323242323242323242323242223232222232322222222222222
+      2222222122222122222221212222212121212121212120202121212120202020
+      211F20201F2020201F1F201F1F201F1F1F1F1F1F1F1F1F1F1F1E1F1E1E1F1F1E
+      1E1E1E1E1E1E1D1E1E1E1E1D1E1E1E1D1E1D1D1D1D1D1D1D1C1D1D1C1C1D1C1D
+      1C1C1C1C1C1C1C1C1C1C1B1B1A191A191818181818181818191919201F203333
+      323838383D3D3D4343433A3B3A16161615161516151616161615151515151514
+      1514141414141514151514141414131314141313131314131314131313131313
+      1312131213121312121213121212121212121212111112121111111112111111
+      111111101110111110111111111010101010110F101010101010100F100F0F0F
+      0F0F0F0F0F0F0E0E0F0E0F0F0F0E0F0E0E0E0F0E0E0E0E0E0E0D0E0E0E0E0E0E
+      0D0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0C0C0C0D0C0C0C0C0C0C0C0C0C
+      0C0B0C0B0B0C0C0B0B0C0B0B0B0B0C0B0B0B0B0A0B0B0B0A0A0B0A0B0B0A0A0A
+      0A0B0A0A0A0A0A0A0A0A0A0A0A09090A0A090A090A09090A0909080909090909
+      0809090809080908080809080808080808080708080808070708080707070708
+      0707070707070707070707060707060706060707070707060606060606060606
+      0505060606060506060606050506060505050605050505050505050505050405
+      0504040505040504050504040405040504040404040404040403040304040404
+      0303030404040303030303030403030303030302030303030302030303030202
+      0203020302030302020202020202020202010201020201020102010201010101
+      0101010101000100010101010001010000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303333333434343635363838383A3A3A3C3C3C3838
+      382D2D2E2F2F2E2E2E2F2E2E2E2E2F2F2F2F2E2F2F3036363636363636363635
+      3636363635353536363536363636353535353535353535353535353535343435
+      3535343535343434343534333433333433333434343433333333333333333333
+      33333332302F302C2B2C2B2B2B2B2B2B2B2B2B2B2A2B2B2B2B2B2B2A2A2B2A2B
+      2B2A2A2A2A2C2C2D2B2B2B2A2A292A2A29292A2A29292A2A2A2A2A29292A2929
+      2929292B2B2B2F2F2F302F30302F2F2F2F2F2F2F2F2F302F2F2F2F2F2F2F2E2E
+      2E2F2F2E2F2E2E2F2E2E2E2E2D2E2D2D2D2D2D2E2D2C2D2D2C2D2C2C2D2C2D2D
+      2C2C2D2C2C2D2C2C2D2C2C2D2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2B2C2B
+      2C2B2C2B2C2B2B2B2B2B2B2B2B2B2B2B2B2A2B2B2B2A2A2A2A2A2A2A2A2A2A2A
+      2A2A2A2A2A2A2A2929292A2A2A29292929292929292929292929282928282928
+      2828282828282828282728272828272727272728272827272727272626262726
+      2626262726262626252626252525252625252525252524242524242524242424
+      2324242424242324232324232424232323232223232222232322222222222322
+      2222222222222221212122212121212121212120212121212120202120202020
+      2020201F201F1F2020202020201F1F1F1F1F1F1F1F1F1E1F1F1F1F1F1E1F1E1E
+      1E1E1E1E1E1D1E1E1D1E1E1E1E1E1E1D1D1E1D1D1D1D1D1D1D1D1D1C1C1C1D1C
+      1C1C1C1D1C1C1C1C181919181919181819191918191919242425333332393939
+      3E3D3D4243423131311616161616161515151615151516151514151515151514
+      1515141514141514141413141414141414131413141413131413131313131313
+      1313131212121312121312121212121212111212121112111112121111111111
+      10111110101010101010101010101010101010101010100F0F0F1010100F0F0F
+      100F0F0F0F0F0F0F0F0F0E0F0E0E0E0E0E0E0E0E0E0E0D0D0E0E0E0E0D0E0E0D
+      0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0C0D0D0D0C0C0C0C0C0C0C0C0C0C
+      0C0B0C0B0C0B0B0B0B0B0C0B0B0C0B0B0B0B0B0B0B0B0B0B0B0A0B0A0A0A0A0A
+      0A0A0A0A0A0A0A0A0A090A090A090A0A09090909090909090909090808080808
+      0909080908090908080808080808080808080808080708070808080707070808
+      0707080707070607060607070606070707060707060606060706060606060606
+      0606060505050606050506060506060505060505050505050505050504050505
+      0505050404040405040404040404040404040404040404030304040303030303
+      0404030303030303030303030303030303030302030303030302020202020302
+      0302020202020202020202020202020201010202020201010102010101010101
+      0101010101010101000101000000000001000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303232323434343636363838383A3A3A3C3C3C3837382E2E2E2E2F2F
+      2F2F2E2F2F2F2F2E2E2E2E2E2F2F303636363636363636363636363636363636
+      3636353636353535363635353635353535363536353535353535353535353535
+      3534343433353433343434343333343333343333343333333333333333323332
+      33323233323230302F2C2C2C2B2B2B2B2B2B2B2B2B2B2B2B2B2A2B2A2B2B2A2B
+      2B2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A29292A2A29292A2B2B2E2E2E30
+      3030303030302F30302F2F2F2F302F2F2F30302F2F2F2F2F2F2F2F2F2E2F2F2E
+      2F2E2E2E2E2E2E2E2D2E2D2D2E2D2D2E2D2D2E2D2D2D2D2C2D2C2C2D2C2C2D2C
+      2C2D2C2C2D2C2C2D2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2B2C2B2B
+      2C2C2B2B2B2B2B2B2B2B2B2B2B2B2A2B2A2A2B2B2B2A2A2B2B2A2A2A2A2A2A2A
+      2A2A2A2A2A2A2A2A2929292A292A292929292929292829292928282828282828
+      2828282828282827282827272728272828272727272727272727272727262726
+      2726262626262625262625252525252525252524262424252424252424252424
+      2424242423242423232423232323232323222323222222222222222222222222
+      2222222222212122212121212120212121212121212120212020202021212020
+      20201F2020201F1F20201F1F1F201F1F201F1F1F1F1F1F1F1F1F1F1E1E1E1E1F
+      1E1E1E1E1E1D1E1E1D1D1E1E1E1D1E1D1D1D1D1D1D1D1D1D1D1D1D1C1D1C1C1C
+      1C1C1C1C191919191919191919191818191A1A2727273232323737373C3C3B41
+      42422A2A2A161616161616151616161616151516151515151515151515141415
+      1514151414141414141414141414131313141314131313131313141313131213
+      1213131213121212121212121212121212111111121212111111121111111111
+      101110111110111011101110101010101010101010101010100F0F100F100F0F
+      0F0F0F0F0F0F0F0F0F0F0E0F0F0E0F0E0E0E0E0E0E0D0E0D0E0E0E0D0E0E0D0E
+      0E0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0B0C0B0B0B0B0B0B0B0B0B0B0B0A0B0B0A0B0A0B0A0B0A0B0B0A0B0A0A0B
+      0A0A0A090A0A0A0A090A0A0A0A0A0A0909090909090909090909090908090908
+      0909090909080808080808080808080808080807080707070808080807070707
+      0707070707070707070707060606060606060607060606060607060606060606
+      0606060606060506060606050506050505050505050505050404050505040405
+      0405040404040405040404040404050404040404040304040404040303030404
+      0303030303040304030303040304030303030303030302030302020302020203
+      0202020202020302020202020202010201020201010201010101010001010101
+      0101010001010100000101000001000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303232
+      323434343535353737373A3A3A3C3C3C3B3B3B2F2F2F2F2F2F2F2E2F2F2F2F2E
+      2F2E2E2E2F302F31363636363636363636363736363636363636363636363635
+      3636363535353635363535353535353535353535353535353535353535353534
+      3434343334343435343334343334343334333333333333323333323332323332
+      32323333323233322E2E2E2C2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2A2A2A
+      2A2B2A2A2A2A2A2A2A2A292A292A2A2B2A2A2E2E2E3131313131303030303030
+      303030303030302F302F2F2F302F2F2F2F2F2F302F2F2F2F2F2E2E2E2F2F2E2E
+      2E2E2E2E2D2E2D2D2E2E2D2E2D2D2D2D2D2D2C2D2E2D2D2D2C2D2D2C2C2D2C2C
+      2D2C2C2D2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2B2C
+      2C2B2B2B2B2C2B2B2B2B2B2B2B2B2A2B2A2A2A2A2A2B2B2A2A2A2A2B2A2A2A2A
+      2929292A2A292929292929292929292929292929282929292928292928282828
+      2828282828282827282727272827282727272727272727272727272726262726
+      2626262526262526252525252526252526242425242425242425242424232424
+      2423242323242324242323232323232222232223222222222222222222222222
+      2122212122222122212121212121212121212121202021212020202020202020
+      201F201F1F20201F20201F1F1F1F1F1F1F1F1F1F1F1F1F1F1E1E1F1F1F1F1E1E
+      1F1E1E1D1E1E1E1D1E1E1D1D1E1E1E1D1D1D1D1D1D1D1D1D1C1D1C1C1C1B1B1C
+      19191918191919191918191919191A2A29293132313636363B3B3B3F3F3F2121
+      2117161616161616161615161516161515151515151515141514151514141515
+      1515151414141414141413131414141313131313131314131313131313121313
+      1313131212131212121212121212111212111112121111111111111111111111
+      111111111011111110101110101010101010100F100F0F0F100F0F0F100F100F
+      0F0F0F0F0E0E0F0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0D0D0E0D0E
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0C0C0D0C0C0C0C0C0C0C0C0B0C0C0C
+      0B0B0C0B0C0B0B0C0C0B0B0B0B0B0B0B0A0B0B0B0B0A0B0B0B0A0A0A0B0A0A0A
+      0A0B0A0A0A090A0A0A090A090A09090A09090909090909090909090809080908
+      0808080908080808080808080808080808080807070807070708070807070807
+      0707070707070707070707070707070606060706060607060606060606060606
+      0605060605060605050505050505050505050505050505050505040505040505
+      0405050404040405040504050404050404040303040404030303040404030304
+      0304030303030304030303030303030303030203030303020202030202020202
+      0303020202020202020202010202020202010202010101010101010101010101
+      0101010000000001010000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030313131343434353535
+      3737373939393B3B3B3C3C3C2F2F2F2E2E2E2F2F2F2F2F2F2F2E2F2F2F2F2F2F
+      2F35353537363637373636363636363636363636363636353636363636363635
+      3635363635363636353636353535353535353635353535353535353534343434
+      3534343434343433333433333433333333333333333333333233333333333332
+      323333333332323131322E2E2E2B2B2B2A2B2B2B2A2B2B2B2B2B2A2A2B2A2A2B
+      2B2A2A2A2B2A2A2A2C2C2C302F30313131313130303130303031303030303030
+      30303030303030302F2F30302F30302F2F2F2F2F2F2F2E2E2F2F2E2F2E2E2F2E
+      2D2E2E2D2E2D2E2E2D2D2E2D2D2E2D2D2E2D2C2E2D2D2D2C2C2D2C2C2D2C2C2D
+      2C2C2D2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2B2C2C2B2B
+      2B2B2C2B2B2B2B2B2B2B2B2B2B2B2A2A2B2A2A2A2A2B2A2A2A2A2A2A2A2A2A29
+      2A292A2929292929292929292929292929292828282829292929282928282828
+      2828282728282828282728272727272827272727262727272726272726272625
+      2626252625252625252625252625242525252524252524242424242423242423
+      2424232324232323232323232323222223232222222222222222222222222222
+      2222222121222121212121212121212121212121202121202020202020201F20
+      2020202020201F1F201F1F201F1F1F1F1F1E1F1F1F1F1E1F1E1E1E1E1E1E1E1E
+      1E1E1E1E1E1E1D1E1D1E1E1E1E1D1D1D1C1D1D1D1C1D1C1D1D1B1B1C1A191919
+      1919191919191819191A192C2C2C3131323434343838383B3B3B1C1B1B161616
+      1717161616161616161616161616161515161615151515141515151415151515
+      1514141414141414141414131314131313131413131313131313131212131312
+      1312121313121212121212121212111112121211111111111111111111111111
+      101110111111101111101010101010100F101010100F0F0F0F0F100F0F0F0F0F
+      0F0E0F0F0F0F0E0F0F0E0F0E0F0E0E0E0F0E0E0E0D0E0E0E0E0E0D0E0D0D0D0D
+      0D0E0E0D0D0D0D0D0D0C0D0D0D0D0C0C0D0C0C0C0D0D0C0C0C0C0C0C0C0B0C0B
+      0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0A0B0B0A0A0A0A0A0A0A0B0A0A
+      0A0A0A0A09090A09090A09090909090909090909090909090908090909090908
+      0909090808080908090808080808070808070808070707070708080708080707
+      0707070707070707070607070607060607070706060607060606060605060606
+      0605060505060506050505050505060505050505050504050405050405040504
+      0404050404040405040404040404040404040404040404040404040303040304
+      0303030303040303030303030303030303020303030202030202020202030203
+      0202020302020202020202010101010202010101010101010101010101000101
+      0101000001000000000100000000000001000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303131313333333434343636363939393B
+      3B3B3D3D3D3131312E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2E2F30363635373736
+      3736363736363636363636363636363636363636363636363536363636363635
+      3636353535353535363635363536353536363535353535353535343335343435
+      3434343434353433343333343333333333333333333233333333333333323332
+      3333323232323232323131312E2E2E2B2B2B2B2B2A2B2A2B2A2B2A2A2A2A2C2A
+      2B2F2F2F31313131313131313130313130313030303030303030313030303030
+      302F3030302F2F302F30302F2F2F2F2F2F2F2F2F2F2F2E2F2E2E2F2E2E2F2E2E
+      2F2D2D2F2D2D2E2D2D2E2D2D2E2D2D2D2D2D2E2C2C2D2D2D2D2C2D2D2C2C2D2C
+      2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2B2C2B2C2B2B2B2B2B2B2C
+      2C2B2B2C2C2B2B2B2B2B2B2B2B2B2A2B2B2B2B2A2A2A2A2A2A2B2A2A2A2A2A2A
+      2A2A2A2929292929292929292929292829292928282828292928292828282828
+      2828282827282727282728282727282727272727272726272627272626262627
+      2625262525262525262525262524252425252524252424242324242424242424
+      2424242323232323232323232323222322232322222222222222222222222222
+      2222212121212121212121212121212121202021212120202020202020202020
+      202020201F1F201F201F1F1F1F1F1F1F1E1F1F1F1F1F1F1F1F1E1E1E1E1E1E1E
+      1E1D1E1E1E1D1E1D1D1D1D1D1E1D1D1D1D1D1D1C1D1B1A1B19191A1919191919
+      191919191C1C1C2D2C2D2F2F303231313434343737372C2C2C19191916171617
+      1616161616161615161516151515161515151615151515151515151414141415
+      1415141414141414131414141314131413141314131313131313131213121313
+      1212121313131312121212121211121112111211111111111111111111111111
+      1110101011111110111110101010101010100F1010100F0F0F0F0F0F0F0F0F0F
+      0F0F0F0F0F0F0F0E0E0E0E0F0E0E0F0E0E0E0E0D0E0E0D0D0E0D0D0D0E0D0D0D
+      0E0D0D0D0D0D0D0D0D0C0D0C0D0C0C0C0D0D0C0C0C0C0C0D0C0C0C0C0C0C0B0C
+      0C0C0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0A0B0A0A0A0A0B0A0B0A0A0A
+      0A0A0A0A0A090A0A0A09090A09090A090A0A0909090909090809090909080808
+      0908080808080909080808080807080808080808080808070807070807070707
+      0707060706070607070707070607060607060706060607060606060606060506
+      0506060605060505050505060605060605050505050405050505050504040405
+      0505040404040504040404040404040303040403030304040403030403040304
+      0303030403030303030303030303030303020303030303030302020202020202
+      0202020202020201020101010202020101010102020101010101010101010101
+      0100000101000000010001000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303333333434343636363838383A3A3A3D3D3D3434
+      342E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F34343438363737363637373737
+      3737363636363637363636363636363636363636363636363636363636353636
+      3635363635353635353535353635353535353535353535343434343534343434
+      3435343334343434333434343333333333333333323232333332333332323232
+      32323333333232323232323131312E2E2D2B2B2A2B2A2B2D2C2D313130313232
+      313131313131313131313130313131313131303130303031303030303030302F
+      30303030302F2F302F2F2F302F2F302F2F2F2E2F2F2E2F2E2E2F2E2E2F2E2E2F
+      2D2D2F2D2E2E2D2D2E2D2D2E2D2D2E2C2D2D2C2C2D2C2C2D2D2C2D2C2C2C2C2C
+      2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2B2C2C2C2C2C2C2B2C2C2B2B2B2B
+      2B2C2B2B2B2B2B2B2A2B2A2B2B2B2B2B2B2B2B2B2A2A2A2A2A2A2A2A2A2A2A2A
+      292A292A292A292A292929292929292929292928282928282929282828282828
+      2828282728272827272828272728272727272727262627262626262626262626
+      2526252526252526252525242525242425252424242424242324242424232424
+      2424232323232323232323232223232223222222232322212222222222212122
+      2221212221212121212121212121212120212120212021202120202020201F1F
+      201F1F1F2020201F1F1F1F1F1F1F1F1E1E1F1E1F1F1F1E1E1E1E1E1E1E1E1E1E
+      1E1E1E1D1E1D1E1D1D1D1D1D1D1D1D1D1D1A1A1B1A191A1A1A1A1A1A1A1A1A1A
+      1F1F1F2D2D2D2D2E2E303031323233353535353635302F30191A191817171817
+      1717171617171717171716161616171616161615161616161616161615161615
+      1515151515141515141414141415141414151414141415141414141313141313
+      1413141414131313131312131312131212131213121213121212121212121112
+      1111111010101010111010101010101010100F0F10100F100F0F100F0F0F0F0F
+      0F0F0F0E0E0E0E0F0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0D0D0D0E0E0E
+      0D0D0E0D0D0D0D0D0D0D0C0D0D0C0D0C0D0C0C0C0D0C0C0C0C0B0C0C0C0C0B0C
+      0B0B0C0B0B0C0C0B0B0B0B0B0B0A0B0B0A0A0A0B0B0A0B0A0B0B0B0A0A0A0A0A
+      0A0A090A0A0A090A090A09090A09090A09090909090809090809090909080908
+      0909080809080808080808070708070808080708070808080707070707070807
+      0707070707070707060606060706070706060606070606060606060605060606
+      0606050505050505050505050605050505050505040405050405050404040405
+      0505050404040404040404040404040304040304040403030304030304040303
+      0303040303030303030303030303030303030303030202020202020202020202
+      0202010202020202020202020201010102010101010101010101010101010000
+      0001010000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000030303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303232323434343535353737373A3A3A3C3C3C3838382E2E2E2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F3434343737373837373837373736363736363736
+      3636363636363737363736373636373636363636363636353636363536363635
+      3635353535353536363535353535353535353534353434343434353433353434
+      3533333433343333333333333333333333333333333333333333333333323232
+      3232323232323232323232323230313130303032323231323232313231313231
+      31313131313131313031313131313131313031313030303130303030302F302F
+      3030302F302F302F2F302F2F2F2F2E2F2F2E2F2E2E2F2E2E2E2E2D2F2D2E2F2E
+      2D2E2E2D2E2D2E2E2D2D2E2D2C2D2D2D2D2C2C2D2C2D2D2C2C2D2C2D2C2C2C2C
+      2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2B2C2B2B2C2C2C2B2C2C2C2B2C2C2B
+      2B2B2B2B2B2B2B2A2B2A2A2B2A2B2A2C2B2B2B2B2B2B2B2B2B2B2B2D2C2B2C2B
+      2C2D2B2C2D2B2B2D2B2B2C2B2B2C2C2B2B2C2A2B2A2B2A2929292A2929292929
+      2828282728272727282727272727272726272726272626272625272626262525
+      2625252625252625242524242525242424242424242423242423232423242324
+      2323232423232323232323232323222323222222222222222222222222222222
+      21222121212121212121212121212020212021212120212020201F2020201F20
+      201F202020201F1F1F1F1F1F1F1F1F1F1F1F1F1F1E1F1E1E1F1F1F1F1F1F1F1F
+      1F1E1F1E1E1E1F1E1E1E1E1E1F1B1B1B1B1A1B1B1A1B1B1A1B1A1A1B1C1C1C27
+      26272E2E2E2E2D2E3130303131313232323232322C2C2D1D1D1C181717181717
+      1717171617171616171717171616161616161616161516161615161515161516
+      1515151514151514151414151515141415141514141414141413141414131413
+      1313131313131313131313121313121212121213121312121112121212121211
+      1111111111111111111111111111111010101111111011100F0F0F0F0F0F0F0F
+      0F0F0F0F0F0F0E0E0F0F0E0E0F0E0E0E0D0E0E0D0D0E0E0D0E0D0E0D0D0D0D0D
+      0D0D0D0D0D0D0C0D0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0B0B
+      0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B0B0B0A0A0B0A0A0A0A0A0A0A0A0A0A09
+      0A0A090A09090909090909090909090909090909090909080809090908080908
+      0908080909080808080808070807070707080807070807070707070707070707
+      0706070607070707060707070606060606060607060606060605060605050606
+      0505050606050506060505050605050505050504050405040505050405040405
+      0405040404040404040404040404040404040404030404040303030303030303
+      0303030303030303030303030302030303030303020203030203020202020202
+      0202020202010202010101010101010101010101010101010101010100010101
+      0001000100000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000003030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303232
+      323434343535353737373939393B3B3B3B3B3B2E2E2E2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F323232373737383737383737383737383636373737373736363636
+      3736373636363636363637363636363636363636363636363636363535353635
+      3635353535363535363535363535353535343435343435343435333435343434
+      3333343334333433333334333333333333333333323333333332323232323233
+      3232323333323232323232323132323232313231313232313131313131313131
+      313131313130313031303131303130313131313030313030303030302F30302F
+      2F2F2F302F2F2F2F302F2E2F2F2F2F2F2E2F2E2E2F2E2E2E2E2E2E2E2E2E2D2E
+      2F2E2E2E2D2D2E2D2D2E2D2D2D2D2C2D2D2D2D2C2C2D2C2C2D2C2C2C2C2C2C2C
+      2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2B2C2C2C2C2B2D2D2D2E2D2D2D2D2D2E
+      2E2E2E2E2E2F2E2E302F2F302E2F2F2F2E2F2F2E2F2F2E2F2F2F2F2F2F2F2E2F
+      2E2E2F2E2E2F2E2E2E2E2E2E2F2D2E2F2E2E2E2D2E2E2E2E2E2F2D2E2E2D2E2E
+      2E2E2D2D2C2B2B2C2C2C2A2A2A29292928282827262626262527252526252526
+      2525262525262524252525252425242424242424242424242423242323242423
+      2323232323232223232323232222222223222222222222222222222122212122
+      212122212121212121212121212021212120212020202020211F201F201F1F21
+      21202020202120202020202020201F2020201F20201F201F1F1F1F1F1F1E1F1F
+      1F1E1E1E1F1E1F1E1F1B1A1B1B1A1B1B1A1B1B1A1A1B1A1B1A1A1A1B1B1B2323
+      232F2F2F2F2F2F2F2F2F3031303131313131312F2E2E1D1E1E18181819181818
+      1818181718181818181717181717171717171717171716171616161716161617
+      1616161616161616161515161516151515151515151515141514151415151514
+      1415141414141413131213121212131212131213121312121213121316161619
+      1A1A1E1D1E212122222222121212111011101010101010101010101010101010
+      100F0F100F100F100F0F0E0E0E0E0E0E0E0E0D0D0E0E0D0D0D0D0D0D0D0D0D0D
+      0E0D0D0D0D0D0D0D0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0B0B
+      0B0C0B0B0B0B0B0B0B0B0B0B0A0B0B0B0B0B0B0A0A0A0A0B0B0A0A0A0A0A0A0A
+      0A090909090A0909090909090909090909090909090909090808090808090809
+      0808080808080808080807080708080808070707070808080807070707070707
+      0707060707070607070607060706070606060606060606060606060606060605
+      0505060506050506050505050505050505050405040504050405040404040504
+      0404040405040404040404040404040404030403040404030304030304040303
+      0403040303030303030303030303030202030302020202020202020202020202
+      0202010201020101010101010101010101010101010101000101000001000100
+      0000010100000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030313131343434353535
+      3636363838383A3A3A3C3C3C3030302E2E2E2F2F2F2F2F2F2F2F2F2F2F2F3030
+      3137373738373738373738373738373738363737373637363737363736373636
+      3636363636363637363636363636363636353635363536353636363636363635
+      3635363536353536353636353535343534343534343433343534343433343434
+      3433343334333333333333333333333333333333323333323232333232323333
+      3232323232323332323232313232313232323132313131323232313131313131
+      3131313131313131303031303131303130303030303031303030302F30302F30
+      2F302F2F30302F2F2F2E2F2F2E2F2E2E2F2E2E2E2E2E2F2E2D2E2E2E2E2E2E2F
+      2D2D2E2D2D2E2D2D2D2D2D2D2D2D2D2C2D2D2C2C2C2C2C2C2C2C2C2C2C2C2C2C
+      2C2C2C2D2D2D2E2E2E2F2E2E302F2F3030302F30303030302F302F302F2F2F2F
+      2F2F2F2F2F2F2F302F2F302F2E2F2F2E302F2E2F2F2E2F2F2F2E2E2F2E2F2F2E
+      2F2F2E2F2F2F2E2E2E2E2E2F2D2D2E2D2E2F2D2E2F2E2D2E2E2D2E2D2D2E2E2E
+      2E2E2D2E2D2E2D2E2E2D2E2E2D2D2D2D2D2D2B2B2B2B2A2B2928292827272625
+      2526252525252525242424252524242424242424232424242423232423232423
+      2323232323222323232223222322222223222222222222222222222222222121
+      2121212121212121212021212121222222222221222121212120212121212020
+      202020212020202020201F20202020201F1F1F1F1F1F201F201E1F1F1F1E1E1F
+      20201F1F1F1D1C1C1C1B1C1C1B1C1C1B1B1B1B1C1B1B1C1C1C1D1C1C1C212222
+      2D2E2E2E2E2E2F2F2E2E2E2E2F2F2F302F302F2F2F1E1F1E1A19191919191919
+      1919191919181918181919181918191818181817181817171718171817171817
+      1717171617171716171716161717161616161616151616161615161615151515
+      1515141414141414131718171919191D1D1E1F20202121202222222221212222
+      232322222323231F1F1F1011111010101110101011101010100F101010101010
+      0F100F0F0F100F0F0F0F0F0F0F0F0F0F0F0E0E0E0D0E0E0E0D0D0D0E0D0D0D0D
+      0D0D0D0C0D0D0C0D0D0C0C0C0C0C0C0C0C0C0C0C0C0C0B0B0C0C0C0C0C0B0C0B
+      0C0B0B0C0B0B0B0B0B0B0B0B0B0B0B0A0A0B0B0B0A0B0A0A0A0A0A0A090A090A
+      090A090A0A09090A0A0909090A09090909090909090908080908080908090908
+      0808080808090808080808080808080708080707070708070707070707070707
+      0706070706070607060606060706060607060606050605060606060505050606
+      0505060506050605060505050505050505050505050405040504040404040404
+      0405040404040404040403040404040303040403030403030304030403030303
+      0303030303030303030303030203020202020303020202020202020202020201
+      0101010102010102010101010101010101010101010001010000000100000100
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303034343435353536363637373739
+      39393B3B3B3333332E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F30373736383837
+      3837373837373837373837373837373737373736363737363736373737373637
+      3636373636363737363636363636363636363636363635353636353636353635
+      3635353535363535353534353434353434353434353434353434343333343333
+      3333333333333333333333333333333233333333333333323232333332333232
+      3332323232323332323232323132313231323132313131313131313131313131
+      31313031303131313031313130313131303130303030303030303030302F302F
+      30302F2F2F2F2F2F2E2F2E2E2F2E2E2F2E2E2E2E2E2F2E2E2F2E2D2E2D2D2E2D
+      2D2E2D2D2E2D2D2D2D2C2D2D2D2D2C2C2D2C2C2D2E2D2E2F2E2F2F2E302F2F30
+      302F30302F30302F3030303030303030302F303030303030302F2F30302F2F2F
+      2F2F2F2F2F2F302F2F2F2E2E2F2F2E2F2F2E2F302E2F2F2F2F2F2F2E2F2F2E2F
+      2E2F2E2E2E2E2E2E2E2E2F2E2E2F2E2E2E2D2D2F2E2D2E2E2D2E2E2D2E2E2E2E
+      2E2E2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2C2C2D2C2C2D2C2C2A2A2A
+      2928282626262424252524252424242424242424242424242424232323242323
+      2323232323232322232323222322232222222222222222222222222123232322
+      2322222322222122222221222221212121212121212121202121202121202120
+      20202020202020202021212121212021202020202120212020202020201F2020
+      202021211E1E1E1D1C1D1D1C1D1D1C1D1C1C1C1C1C1D1C1C1D1E1E1E2020202C
+      2D2C2F2E2F302F2F2F2F2F302F303131313030301F1F1F1B1A1A1A1A1A1A1A1A
+      1A1A191919191A191A1919191919191919191918191919191818181818181818
+      18181718181818181818181718171718171617171717191A1A1B1B1C1E1E1E20
+      2120232223232223222322222222232423232323232323232323242324242524
+      2625262828281A1A1A111212121212111010101010101111101010101010100F
+      100F0F0F100F100F0F0F0F0F0F0E0F0F0F0E0F0E0F0E0F0F0E0E0E0E0D0D0D0D
+      0D0D0D0C0D0C0D0D0D0D0C0C0C0D0D0C0C0C0C0C0C0C0B0B0C0C0C0C0B0C0B0B
+      0B0B0B0B0B0B0B0B0B0B0A0B0B0A0B0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A090A
+      0A0A0A090909090A090909090909090909090909090908080809080909080808
+      0809080808080808080808080807080708080808070708070707070707070707
+      0707070707060606060606060606060606060606060506060505060606060606
+      0605050506060505050505050504050504050505050405050505040404040404
+      0404040404040404040404040404040404040303030303040403040303030303
+      0403040303030303030302030302020302020303020202020202020101010202
+      0102020101020101010101010101010101010100010101010101000100000001
+      0000000001000000000100000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303131313636363737373838383A3A3A3C3C
+      3C3A3A3A2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F30303038383738383738383738
+      3737383737383737383737383737373737373737363637373736363637363636
+      3636363636363636363636363636363636363635363536353635363536363535
+      3535353535353535353435343435343435343435343334333434343333333434
+      3334333334333333333333333333323333333333333232333232323332333232
+      3233323232323232323232313232323131323231323131313231313131313131
+      31313131303131303130313030313030303030313030302F3030302F2F2F2F30
+      2F2E302F2E2F2F2E2F2E2F2F2E2E2F2E2E2F2D2E2F2D2D2E2E2D2E2E2D2E2D2D
+      2E2D2D2D2D2D2E2E2E2F2F2E30302F2F302F302F2F302F2F302F2F302F2F3030
+      2F30302F30302F30303030303030303030303030302F30302F2F2F2F2F2F2F2F
+      2F2F2F2F2F302E2F2F2E2F302F2E2F2F2E2F2F2E2F2F2F2F2E2F2E2E2E2F2E2F
+      2E2E2E2E2E2E2E2E2E2F2E2E2F2D2E2E2D2D2E2E2E2E2E2D2E2E2D2E2E2D2D2E
+      2D2D2D2D2D2E2D2D2D2E2D2D2C2C2C2D2D2D2C2D2C2D2D2C2D2D2C2C2D2C2C2D
+      2D2C2B2C2C2A2829262726242424242424242424232423232424232323232323
+      2323232222232323222222222324232323232323232323232223232222222222
+      2222222222222221222121212121222121212121212122222221222121222221
+      2222212221212121222222222221222221212121212121212120212121202121
+      202020201F201E1E1E1E1D1E1D1D1D1D1D1E1E1D1D1E1D1D1D1D1D2020202B2C
+      2C2E2E2E2F2F2F2F303030302F3130303031311E1F1E1B1B1B1B1B1B1B1B1A1A
+      1B1A1A1B1A1A1A1A1B1A1B1A1A1A1A1A1A1A1A1A1A1A1A1A1A1919191A191919
+      1817171818181B1B1B1E1F1E2020202323232423242324232324232424242424
+      242424242324232424242424242425242424242425252525242526262727282A
+      2B2A2C2C2D151515121212121111111111111211111111111111101010101010
+      0F100F0F0F100F100F0F0F0F0E0F0F0F0E0E0E0F0F0F0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0B0C0B0C0C0C0B0C0C0B0B0B0B
+      0B0B0B0B0B0B0B0A0A0B0A0A0A0A0A0B0A0B0A0A0A0B0A0A0A0A090A0A0A0A0A
+      0A090A090909090A0A090A090909090909090808090809090908090808080808
+      0808080908080808080708080807080707070707070807070707070707070707
+      0707070707070707070606060606060606060606060606050506060505050505
+      0606050505050605050505050505050505050504050405040404040405040405
+      0404040404040404040403030404040304040403030404030303030303030303
+      0403030303030303030203030303020202020202020202020101010101020201
+      0202010201010101010101010101010101010001010100010000000001000000
+      0100000100010001000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303434343737373939393A3A3A3C3C3C3D3D3D
+      3232322F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3333333838373838373837373837
+      3738373738373738373737363737373737373737363737363737373736363636
+      3637363637363637363636363636363636353635363635363636353536353535
+      3636353535343534343534343533343534343433343434343333333334343333
+      3434343333333334333333333332333332333233323332333232323232323332
+      3232323232323231323232313132313232313131313132313132313131313131
+      31313131313130313130303030303030303030303030303030302F2F302F2F2F
+      2F2F2F2E2F2E2E2F2E2E2F2E2E2F2E2E2F2D2E2F2E2E2F2E2D2E2F2F2F2F2F30
+      30303030303030302F2F30302F302F2F2F303030302F2F302F2F302F2F30302F
+      30302F30302F3030303030303030302F2F302F30302F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F302E2F2F2F2E2F2F2E2F2F2E2F2F2E2E2E2E2F2E2F2F2E2F2F2F2E2E
+      2E2E2E2E2E2E2D2E2E2E2E2E2E2D2E2D2D2F2E2D2E2E2E2E2E2D2D2E2E2E2D2D
+      2D2D2D2E2D2E2D2D2D2D2D2D2C2D2D2C2D2D2D2D2C2D2C2D2D2C2C2D2C2C2D2D
+      2C2D2C2C2D2D2C2B2C2B29292826262624232424242324232323232323232324
+      2424242324232424242323232324232323232323222323232323232223222322
+      2222222222222323232323222222232222222222222221222323222322232322
+      2322222222222222212222212221222221212121212121212121202021212020
+      20202020201E1E1E1E1D1E1E1D1E1E1D1E1E1D1E1D1D1D1E1D1E1F1F202D2D2D
+      3031313131313131313232323130302F30301F1E1E1B1B1B1B1B1B1B1B1B1B1A
+      1B1B1B1A1B1B1B1A1A1B1A1A1A1A1A1A1A1A1A1D1C1D1F1F1F21212124242426
+      2626262626262626262626262626262626262626262626262626272626262626
+      252525242425242525262525262526262626262626262726292A292E2D2D3031
+      3028282813131313131313121212121211111111111110111111111110111111
+      10101010110F0F0F0F0F0F0E0F0E0E0F0F0F0F0F0F0E0E0E0E0E0E0E0E0E0D0E
+      0D0D0E0E0D0D0E0D0E0C0C0C0C0C0D0C0C0C0B0C0C0C0C0B0B0B0C0C0C0B0B0B
+      0B0B0B0B0B0B0B0B0B0A0B0B0B0A0B0A0A0A0B0A0A0A0A0A0A0A0A0909090A09
+      0A0A09090909090A090909090909080909090808090909080908080808080808
+      0808080808080807080708080707070807080707080707070707070706070707
+      0707060706070706070606060706060606060606050606060605060505050505
+      0605050505050505050505050505050405050405050405040504040404040404
+      0404040404040404040404040304030304030403030303040303030403030303
+      0303030303020302020303030202020202020202020202020201010202010101
+      0102010202010101010101010101010100010001010000010000000001000000
+      0000010000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303737373939393A3A3A3C3C3C3D3D3D3D3D3D2E
+      2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F30373737383837383737383737383737
+      3837373837373737373736373737373737363737373736373736363737373637
+      3736373636363636363636363636363636363636363635353536363535363535
+      3534363434353434353434343434353434343434343334333433333334333333
+      3333333433333333333333323233333333333233333232333232323232333232
+      3232323232323132313232323232313232313131323232313131313131313131
+      303131313130313031313030303031313030303030302F30302F302F2F302F2E
+      2F2F2F302E2E2F2F2E2F2E2E2F2F2F303030312F303030313030303130303030
+      303030302F3030303030302F2F2F2F2F302F2F302F30302F2F302F2F30302F30
+      302F30302F303030303030303030303030302F2F2F2F2F2F2F302E2E2D2E2E2E
+      2D2D2E2D2C2D2C2B2B2B2C2B2B2B2B2C2B2B2B2B2B2A2A2B2A2B2B2B2B2B2C2C
+      2C2C2C2C2D2D2D2F2E2E2E2E2D2F2D2E2E2E2D2E2F2D2E2E2D2D2D2E2D2E2D2E
+      2E2E2E2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2C2D2C2C2D2C2C2D2C2C2D2C2C
+      2D2D2C2D2C2C2C2C2C2D2C2C2B2B2B2828272625262424252424242424242324
+      2423242424242324232423242323232323232323232323242323232323232323
+      2323232323242423232324242323232323232323222223232323222322222222
+      2222222222222222222221212121212223222222222222222221212222212223
+      222221211F1F1F1F1E1F1F1E1F1F1F1F1F1F1F1F1F1F2020202121212E2E2E31
+      32313233323232323232323030302D2E2D1F201F1C1C1D1C1C1C1B1C1C1C1C1C
+      1E1D1D2020202222222424242828282827282827272828272727272828282828
+      2828282828282828282829292929292929292928272828282929282828292828
+      28282726272727272323231F1F1F242323282828292A2A2E2F2E323231333333
+      2121211414141314131413141312131212121212121212111112121111101010
+      101011101010101010100F0E0F0F0F0F0E0F0E0E0E0E0E0E0E0E0E0E0E0D0E0E
+      0E0E0D0D0D0D0E0E0E0D0D0D0D0D0C0C0C0C0C0C0C0C0B0B0B0C0C0C0B0B0B0B
+      0B0B0B0B0B0B0B0A0A0B0B0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A090A
+      0909090A0A0909090A0909090908090908090808090909090809080808080808
+      0808070808080808070807070807080707070708070707070706070707060707
+      0607060607060607070607060606060606060606060506050605060506060505
+      0505050505050505050505050505050404050504040404040404040404040404
+      0404040404040404040404040304030404030303030304030303030303030303
+      0303030203020303030302030203020202020202020202020201020101010101
+      0101010101010101010101010001010100010100000101000001010000000101
+      0001000001000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303333333939393A3A3A3B3B3B3D3D3D3E3E3E3736372F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F32323238383738383738373738373738373738
+      3737383737373737373737363637373736373637373637373637373637363736
+      3636363636363636363636363635353636363535363635353535353635353535
+      3435343435343435343435343435333434343333333334343433333433333333
+      3433333334333333333333333333333333323233323332323232323232323232
+      3232323232323231323232323131323232313131313131313131313130313131
+      3131313131313031303030313030303030302F30302F30302F302F2F302F2F30
+      2E2F2F2F2F30303031302F313130303030303130313130313030313030303030
+      30303030302F302F2F2F2F2F2F302F302F2F302F2F302F2F302F2F30302F2F2F
+      2F2E2E2E2D2D2D2D2C2C2B2B2A2B2B2B29292A2A292929292929292929292928
+      2829292929282829292828292828282828282728272727272627272626272626
+      2726262626262625262727272727272A292A2A2A2A2C2B2A2D2E2E2D2E2E2D2D
+      2E2D2D2D2D2D2D2D2D2D2D2D2C2C2D2C2D2C2C2D2D2D2D2C2C2D2C2C2D2D2B2D
+      2C2C2D2D2C2E2D2E2D2D2D2D2D2D2D2D2C2A2929272626242424242424242424
+      2424232424242424252425242424242323242423242423242424252425242424
+      2424232424232423232323232423232323232323232322222222232324232323
+      2323232323232322232323232324232323232323242424242324242424242323
+      232222212121201F20201F1F2120212020202020202121212221222E2E2F3332
+      32333333313131302F302F2F2F2F2E2E2323242626262828282A29292A2A2A2A
+      2B2B2B2A2A2A2A2A2A2A2A2A2B2B2A2B2A2A2B2A2A2A2B2B2B2B2A2A2A2A2A2A
+      2A2A2A2A2A2A2B2B2B2B2B2B2A2A2A292A292B2A2B2728282524242020211D1D
+      1D1919191818181818181818192A2A2A2C2C2C2E2E2F32323233333432323316
+      1616141414131413141313141314131314131413121212121111111211111212
+      1110101010101010100F0F101010100F100F0E0E0F0E0E0E0E0E0E0D0E0E0E0D
+      0D0D0D0E0D0D0D0D0D0E0D0D0D0D0D0D0D0D0C0C0B0C0C0C0C0C0B0B0B0B0B0B
+      0B0B0B0B0A0A0A0B0B0B0B0B0A0A0A0A0B0A0A0B0A0A0A0A0A0A0A090909090A
+      09090A0909090A0A090909090908090909080808090908080908080809080808
+      0808080708080808080707070707070707080707070707070707070607070606
+      0707060607070706070606060606060506060606060506060606060506050605
+      0506060506050505050505050505050504040404050404040404050404040404
+      0404040404040403040304040304040403030303040403030303030303030303
+      0303020203020302020202020302020202020202020101020102020202010102
+      0101010101010001010101010100010101000101000000010100010000000100
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000030303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303737373939393A3A3A3C3C3C3D3D3D3E3E3E2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F3635353838373837373837373837373837373837
+      3737373737373737373737373736373736373637373636363736363636363636
+      3636363636363636363536363636363636353536353635363635353535353435
+      3535343534343534343534343434343434343433343334343434333334343334
+      3333333333333333323332333333333232323333323232333232323232323232
+      3232323232313232323131323131313231313231313131323131313131313031
+      30303031303030303030303030303030302F30302F302F2F302F303030313130
+      3131303131303031303031313030313030303131303030313030313030303030
+      2F30303030303030302F2F302F302E2F2F2D2D2D2C2C2C2B2B2B2A2A2A2A2A2A
+      2A2A2A2A2A2A2A2A2A2A2A2A2A292A2A292A2A292A2929292929292929292928
+      2929282928292929282829282828282828282828272727262727262627272626
+      2626262525262526252626252625252525252526252525262625282827292A29
+      2B2B2B2D2D2D2D2D2D2C2C2D2D2D2C2D2D2D2E2C2C2E2C2C2D2C2C2D2E2C2E2D
+      2D2E2D2D2E2E2E2D2D2D2D2D2D2D2D2D2C2D2D2B2B2B27282724242425252525
+      2525252425242524252525252525252525242525252425242424252424242424
+      2424232423232423242423242524242424242324242525242424242524242525
+      2525252525242425242424242424242424242425252525252425242524242425
+      2525232323222122222122222223222222222222232323232324303030323333
+      32323231313130303030302F2F2E2F2E2E2D2D2D2D2C2C2C2C2C2C2C2C2C2C2C
+      2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2D2C2C2C2C2C2C2C2D
+      2D2D2D2D2D2828282425242121211E1E1E1A1B1B1A1A1B1A1B1A1A1A1A191919
+      191919181918191A192021202D2D2D3030303232323334343637362C2B2C1515
+      1515151514141414141313131313131313131413131313131211111111121212
+      11111111111111110F100F101010100F100F0F0F0E0E0E0E0E0E0D0E0D0D0E0E
+      0D0D0D0D0E0E0D0E0D0D0D0D0D0D0D0D0C0D0D0D0C0B0C0B0B0B0B0B0B0B0B0B
+      0B0B0B0B0B0A0A0B0B0B0A0A0B0A0A0A0A0A0A0A0A0A0A090A0A0A090A090A0A
+      09090909090A0909090909090909090808090809080908080908080808080808
+      0808070707080808080807070808080707070707070707070707070706070706
+      0607070706060607060706060606060506060605050605060606050606050606
+      0505050505050505050505050504040505040404040405040404040404040404
+      0404040404040404040404040403040303030303040303030303030303030303
+      0303020202020302020202020202020202020202020101010101010101010101
+      0101010101000101010100010101000000010100000001010000000000010000
+      0001000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000003030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303232323939393A3A3A3B3B3B3C3C3C3E3E3E3939392F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F313131383837383737383737383737383737383737373737
+      3737373737373637363737373637363637373737373736373636373736363636
+      3636363636363636363636363536353536363535353536363536353536343535
+      3534353434353434343334343434343334343334343333343334333433333334
+      3333333333333333333332333332323332333332323232323232323232323232
+      3232323232323232323232313131323132323131323131313131313130303031
+      3130313130303130313030303030303030313131313131313130303131313030
+      3131303130313130303131303131303130313131303030303031303030302F2F
+      2F2E2E2E2D2C2B2B2B2B2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A
+      2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A29292A292A2A2929292929292929282929
+      2928282929282829292828282827282828282826272726272726262726262626
+      2626262626262625252525262625252625252525242525252524252424242525
+      25252727282929292C2B2C2C2C2D2D2D2C2F2D2D2E2D2D2E2D2D2E2E2C2D2D2D
+      2E2E2D2D2D2D2D2D2D2C2D2D2C2C2D2E2D2D2D2D2E2D2C2C2828282525252626
+      2625262626252625252525252525242425242525242524242424242425252525
+      2425252525262626262525252525262625252625262626252526252625252525
+      2626262626262626262627262626262626262727272726272626262626262625
+      2624242424232424232323232323232323232325252526252631313233343433
+      33343232323232323132323231323030313030303030303030303030302F2F2F
+      2F2E2F2F2F2F2F2F2F2F2F2F2E2F2F2F2F2F2C2C2C2929292524252222221F1F
+      1E1F1E1E1D1D1E1D1D1D1D1D1D1C1D1C1D1D1C1D1C1C1B1C1B1B1B1B1B1B1B1A
+      191A1A1A1B1A1B1B2727272E2E2E313131333332363536383837202021161616
+      1616161515151514151414151313131313131313131312121213131312121112
+      111111111111111110100F0F10100F100F100F0F0F0F0F0F0F0E0D0E0E0E0E0D
+      0E0D0D0E0E0D0D0D0D0D0D0D0D0C0D0C0D0D0D0C0D0C0C0B0B0B0B0B0B0B0B0B
+      0B0B0B0B0A0B0A0B0B0A0A0A0A0A0A0A0A0A0A0A0A0A090A0A0A0A0A0A0A0A09
+      0A0A0A0909090909090909090909090909090908080908090808080808080808
+      0708080707080808070708080808070708070707070707060607060607060706
+      0606060607070607060606060606060606060506050606060605060506050605
+      0505050505050504050504050504050404040404040404040504040404040404
+      0404040403030403040404030303030403030303030303030303030303030303
+      0302020302020202020202020202010202020201020102010101010101010101
+      0101010001010101010101010001010100000000010001000100000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303535353939393A3A3A3C3C3C3D3D3D3E3E3E3232322F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F34343438383738373738373738373738373738373737373737
+      3637373637373737373737373737373737363736373737363636373636363636
+      3636363636363636363636363636353636353636353535353534343634343534
+      3435343435343434343434333434343434333434343334333333333333343333
+      3333333333333333323232323233333232333233333232323232323232323232
+      3232323231323232323132313231313232313131313131313131313131303131
+      3030303130313132313131313131313131313131313130313131303131313031
+      30313130303130303031303131303131312F302F2E2E2E2C2C2C2C2B2B2B2B2B
+      2B2B2B2A2A2A2B2B2A2B2A2B2A2A2B2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A
+      2A2A2A2A2A2A2A2A292A2A2A2A29292A2929292A292929292929292928292929
+      2928282929282829282828282828272728272727272727272726272626262626
+      2626262625262526252625262525262525252524252525252524242524242524
+      252424242424242726272828282C2B2B2E2D2D2E2D2D2E2D2D2E2E2D2D2E2D2D
+      2E2D2F2E2E2E2E2E2E2E2E2E2E2D2D2E2E2E2D2E2D2D2E2C2C2C282929262625
+      2526262525262525262525252525252626262526252525252726262626262727
+      2726262727262726272626262627272727272727272627272827272728282927
+      2828272728272728272828282829282828282828282727282727272727292728
+      2626262625252525262525252525252525252626262626263332323535363535
+      3534343434343433323333323332323232323232323232313232323132313231
+      30302D2D2D2A2A2A252525212122212221222121212121212121212121202020
+      202021201F201F1F1F1F1F1E1D1D1D1E1E1E1D1D1E1C1C1C1C1C1C1B1C1C1B1C
+      1B1C1C1C1D1C1D2E2E2E30303034343435353537383736363618181816161616
+      1616151616161515141414141414141414131313121213121312131212121213
+      121212111111101111101011101110100F0F0F0F0F0F0F0F0F0F0F0F0F0F0D0D
+      0D0D0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0D0D0C0D0C0C0C0C0B0B0B0B0B0B0B
+      0B0A0A0B0A0B0B0B0A0B0A0A0A0A0A0A0A0A0A0A0A0A0A0A09090A0A090A0A09
+      09090A090A090909090908090809080809080808090808090808080808080708
+      0808070807070807070807070707080708070707070707060707060606070706
+      0706060706060606060606060606060606060606060506050505060605050505
+      0506050505050505050404050404040504050404040404040404040404040404
+      0403040404040404040403040304030403030303030303030303030303020302
+      0303020203020202020202020202010202020101010102020102010101010101
+      0101010001010100010100010101000001000000010000000000000000010100
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303031
+      31313838383A3A3A3B3B3B3C3C3C3D3D3D3B3B3B2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F303737373837373837373837373837373837373737373737373737
+      3737373736363736373636373637363736363637363736363636363636363636
+      3636363636363636363635353535353635363534363535353435353434353435
+      3534343434343434343334343333333434343433343433333333333333343433
+      3333333333333233323333333333323332323332323233333232333232313232
+      3232323232323132323131313231313231323131313131313130313131313131
+      3231313132313131313132323131313131303030313030313030313130313130
+      303131303030302E2E2E2C2D2D2D2C2B2C2B2B2C2B2C2C2B2C2C2B2B2B2B2A2B
+      2B2A2B2B2B2A2A2A2A2A2A2B2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A
+      2A2A2A2A2A2A2A2A2A2A2A2A2A29292A2A292929292929292929292929292829
+      2929292828292829282828282827272827262728272727262727272626262626
+      2626262526252526252525252525252525252525242425252424242424252525
+      2525252525252525252425242526252929292C2C2C2E2D2D2E2F2E2E2F2E2E2E
+      2E2E2E2E2E2E2E2E2E2E2E2D2E2D2D2D2F2F2E2E2F2F2E2E2E2E2D2D28282926
+      2625262727262626262626262726272626272828282727282728272726262727
+      2728282828272829292828282929292928292929292928292929292929292929
+      292929292929292A292A2929292929292929292928282929292A292829282828
+      2828272627272627262626272727272727272727282828333334363736353535
+      3535353535353435353534353434343131312D2C2D2929292727272524242424
+      2424242424242424242423242323242424232323232323232322222221212222
+      2221202021202021201F2020202020201F1E1F1E1E1E1E1D1D1D1C1D1D1C1C1D
+      1C1C1D2423242F302F3232323433343636363738382B2B2B1616161616161616
+      1616161616161615151515151514141414141414141412131313121312121212
+      12121212121212121110111010101010101010100F0F0F0F0E0F0E0F0E0E0E0F
+      0D0D0D0E0D0D0D0D0D0D0D0D0D0C0C0C0C0D0C0C0C0C0D0C0C0C0C0B0B0B0B0B
+      0B0B0A0A0A0A0B0A0B0B0A0B0A0A0A0A0A0A0A0A0A0A090A0A0A0A0A090A0909
+      090A090909090909090909080908080809080808080808080808070808080808
+      0708080808080707080707070707070707070607070707070707060707060607
+      0606060606060606060706060606060606060506060605060605050505050505
+      0505050505050405040404040504050404040404040404040404040404040404
+      0404040404040404030303030303030303030403030303030202020302020203
+      0202020202020202020202020102010201010201020201010101010101010101
+      0101000001010100010100010101010000010001010001000000000001000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303434
+      343939393A3A3A3B3B3B3D3D3D3E3E3E3434342F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F333333383737383737383737383737383737383737373737373737373737
+      3737373736373737373737373737373636363737363636363636363636363636
+      3636363636363636363536353536363535353435353435343535343435343535
+      3434343434343434333434333434333434343334343434333433343433333333
+      3333333333333333333333333232333232323232333332333232323232323232
+      3232323232313231323131323131323131323132313132313131323132323232
+      3232323131323131313131313131313131313031303031313131302F302D2D2D
+      2D2D2D2D2D2C2D2D2C2D2C2C2D2C2B2C2B2C2C2B2C2C2B2B2C2B2B2B2B2B2B2B
+      2B2A2B2A2B2A2A2A2A2B2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A
+      2A2A2A2A2A2A2A292A2A2A2A2A2A292929292929292929292929292929292829
+      2928292928282828282828282727282826272727272726272727262626262625
+      2526262625252525252525262525252525242425262526262525252526252525
+      25252424252525252525242525252525252828282C2A2B2E2F2E2F2F2E2F2E2E
+      2E2E2F2E2E2E2F2F2F2E2E2E2E2F2E2E2E2E2F2E2E2F2F2F302E2F2D2D2D2929
+      292728272828282828282728282828282829282829282929292929292A2A292A
+      2A2A2929292929292929292929292A2A2A2A292A2A2B2A2A2A2A2A2B2A2A2A2A
+      2B2A2B2A2A2A2A2A2A2C2B2B2B2B2B2C2B2B2C2B2B2C2A2B2B2B2A2B2A2A2A2A
+      2A2828282828282828282929292929292929292A2B2A3737373A3A3A36363633
+      33332F2F2F2C2C2C282828292828282828282828282728262727262727262626
+      2626262626262525252424252424252524242323232323232323232323232323
+      232322232222222121212121222222211F1F1F201F201F1F1F1F1F1F1F1E1F1E
+      1F1E2B2B2A3232333434343737363A3A393A3B3B1F1F1F181918171717171716
+      1616161616161616161616161515151515151414141314131313131213121212
+      121212111212111211121010101010101110101010100F0F0E0F0F0F0F0F0F0E
+      0F0E0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0C0C0D0C0D0C0C0D0C0C0C0C0B0B0B
+      0A0A0B0B0B0A0A0A0B0A0A0A0A0A0A0A0A0A0A0A090A0A090A0A090909090909
+      0909090909090909090908080908080808080908080808080808080808080808
+      0808080807070708080708070807070707070607070607060606060706070606
+      0706060606060606060605060506060606050506060606060606050505060605
+      0505040505050505050504040404040404040404040404040404040404040404
+      0404030404030403030303030403030303030303030303030303020302020202
+      0202020202020201010102020202020201020102020101010101010101010101
+      0101010101010101000000010000000000000000000100000100010000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030373737
+      3A3A3A3B3B3B3C3C3C3D3D3D3D3D3D2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F37363638373738373738373738373738373737373737373737373737373737
+      3737363736373736363737373737363737363737373637363637363636363636
+      3636363636353636353636353635343634353635343534343534343535343434
+      3434343434343434343433343433343333333333343434333434343333333333
+      3333323333333332333332333332323232323233333233323232323232323232
+      3231323132323132313232323231313231323231313231313231313132313232
+      313231313131313131313131313131302E2F2F2E2E2E2E2D2E2D2D2D2D2E2D2D
+      2D2D2D2D2D2D2D2C2D2C2B2D2C2C2C2B2B2C2B2B2C2B2B2C2B2B2B2A2A2B2B2A
+      2B2B2B2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A
+      2A2A2A2A2A292A29292A292A2929292A29292929292928292928292929282828
+      2828282928282828282828282828282727272627272626272626262626262526
+      2526252625262625252626272626262626252526262626262526262526252525
+      252525252625262525252525252525252626262727272A2A2A2F2F2F2F302F2F
+      2F2F2F2F2F2F2F2F2F2F2F30302F2F2F2F3130303030303230313131302D2E2D
+      2928282929292929292A292A2A292A2B2B2A2A2A2B2A2A2A2A292A2A2A2A2929
+      292A2B2B2B2C2B2B2B2B2B2B2B2B2B2A2C2C2B2B2B2B2C2C2D2D2D2D2D2D2D2C
+      2D2C2D2D2C2D2D2D2E2D2D2D2C2C2E2D2D2E2D2D2E2E2E2E2D2E2E2D2D2C2B2C
+      2B2A2B2B2A2B2B2B2B2B2B2B2B2B2B2B2B2B2E2D2E2B2B2C2B2B2B2B2B2C2B2B
+      2B2B2B2B2B2A2B2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A29292829292828292828
+      2828262727272627272726262627262626262626252525252525242525242424
+      2424242323242323232323232323232122212120212020201F1E1F2020202222
+      233131313434343636363939393A393A32323219191919191918181817181717
+      1716171616161616161616161616161616151514141414141313141313121212
+      1212121211121212121211111111111010101010101010100F0E0E0F0F0F0E0E
+      0E0E0E0F0D0D0D0D0D0D0D0C0D0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0B0C0B0B
+      0B0A0A0A0A0A0B0B0A0A0A0A0A0A0A0A0A090A090A0A0909090A0A0A09090A09
+      0909090909090909090909080808090908080808080808080708080807080808
+      0708080708070808080707070707070707070707070606060607070706060606
+      0607060606060606060606060605060605050605050505060505060505050505
+      0504050504050504050404050405040404040404040404040404040404040304
+      0404040304040303030303030303030303020302030303030202020202020202
+      0202020202010201010202020201010202010101010101010101010101010101
+      0101010101000100000101000000000100010000010001000001010000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303030303030303232323939393A
+      3A3A3B3B3B3D3D3D3E3E3E3736372F2F2F2F2F2F2F2F2F2F2F2F2F2F2F313131
+      3837373837373837373837373837373737373737373737373737373736373736
+      3637363737373636363636373736363737363737373736363637373736363636
+      3636363535363635363535363535353535363534353435353434343434343434
+      3434343333343334343434343434343434343333333334333433333333333333
+      3333333333333333323233323233333232323232323232323232323132323232
+      3231313132323132323231323131323131323131323131313231323132323132
+      3131313130312F2F2F2E2E2E2D2E2D2E2D2E2E2D2E2D2E2D2D2D2E2D2D2D2D2D
+      2D2D2C2D2D2D2C2D2C2C2C2C2B2C2C2B2C2B2C2C2B2B2C2B2A2B2B2B2B2B2B2B
+      2A2A2A2B2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A
+      2A2A2A292A2A292A2A2A2A292A292929292A2929292929292929292928282929
+      2828282828282828282828282828272728272727262627262626262626262627
+      2627272627262627262626262626262625262526252626252526262726262626
+      2526262625262626262726262626262626262625262625252829292E2E2D3031
+      31303030302F2F3031313030313231323132313131313231313331313132312D
+      2D2D2B2B2B2B2B2B2B2B2B2A2B2A2B2B2A2B2B2B2B2B2C2C2C2C2B2C2B2C2B2B
+      2D2C2C2D2C2C2D2E2D2D2E2D2D2E2D2E2D2E2E2E2E2E2F2E2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2E2E2F2E2E302F2E2F2E2F2F2F2F2F2F2F2E2E2E2D
+      2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D
+      2C2D2C2D2D2C2D2C2C2D2C2C2C2C2C2C2C2C2C2C2C2B2B2A2A2B2A2A2B2A2A2B
+      2A2A2A29292A2A2B2A2B292A292A292929282929282927272827272726272726
+      27272525252425252424242323232222222222232222222021212021202A2A2B
+      3433333636373939393C3C3C3D3D3D272727191A191A191A1919191819191817
+      1816161616161716161615161616161616161614141414151513131313131313
+      1313111111111211111112111111111111101010100F10100F0F0F0F0E0F0E0E
+      0E0E0E0E0E0E0C0D0D0C0C0D0D0D0D0D0C0D0C0C0D0C0C0C0C0C0C0C0C0C0C0B
+      0C0A0B0A0A0A0A0A0A0A0A0A0A0A0A0A090A0A09090909090A090A0909090909
+      0909090908080909090808080808080808090808080808080708080808080807
+      0807080707070707070707070707070607070707070606070607070606060606
+      0606060606060605060606060606050606050505060505050505050505050505
+      0505050505040505040505040404040404040404040404040404040404040404
+      0404040403040403040303030303030303030203030303030202020202030202
+      0201020201020202010101010101020102010201010101010101010101010100
+      0101010000010101000100000000000101010101000100000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303636363939393A3A
+      3A3C3C3C3D3D3D3E3E3E3030302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F35353538
+      3737383737383737383737383737373737373737373737373737373737373737
+      3737363637363737373737373737363736373637373636363636363636363636
+      3536363536363536353536353436353535353435353435343535343434343434
+      3434343434333334333433343433343334333433333333333333333333333333
+      3333333332333332323332323233323232323232323232323232323232323232
+      323131323231313232313231323232313231313231303232313131313030302E
+      2E2F2E2E2F2F2E2E2E2E2E2D2D2E2E2E2D2D2E2E2D2D2E2E2D2D2D2D2E2D2D2D
+      2D2D2D2D2D2C2D2C2B2D2C2B2C2C2B2C2B2B2C2B2B2C2B2B2B2B2B2B2B2B2A2A
+      2A2B2A2B2B2B2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A
+      2A2A2A2A2A29292A2A2929292929292929292929292929292929282929292829
+      2929282828282828282828282727272727272726262726262727272726262626
+      2727262626272626262726262626262627272727272627262626262627272727
+      27272727262726272627272626262626262625262726262625272A2B2A30302F
+      3232323232323131323132313232323332323232323331323432333333333030
+      302C2B2B2C2C2C2C2B2C2D2C2C2D2C2D2C2C2C2D2D2E2E2E2E2E2D2E2F2E2E2F
+      2F2E2F2F2F2F2F2F303030302F302F2F30303030303030303030313131313131
+      3131313131313130303130303231313131303231313231313232323131312F2F
+      2F2F2F2F2F2F302F2F2F2F2F2F2F2F2F2F30302F2F30302F2F2F2F2F2F2F2F2E
+      2E2F2F2F2F2F2E2F2D2D2D2D2E2D2D2D2D2D2D2D2D2D2E2E2D2D2D2D2D2E2E2E
+      2D2D2D2D2D2D2C2C2D2C2C2C2B2A2B2B2A2B2A2A2B2A2A2B2829292929292727
+      2727272726262626262624252523232323232323232323232323232332313236
+      36363838383A3A3A3D3D3D3A3A3A1E1D1E1B1B1B1A1A1B191919191919181919
+      1717171818181716161616161516161616161615151515151514141414151313
+      131213131112121112111111111112111111111010100F0F0F100F100E0E0F0E
+      0E0E0E0E0E0D0E0E0D0C0D0C0D0D0D0C0C0C0C0C0C0C0C0C0B0C0C0C0C0B0B0C
+      0A0A0B0A0A0A0A0A0B0A0A0A0A0A0A090A090A090A090A090909090909090909
+      0909090908080908080908080908080808080808080808080808080808070808
+      0808070807070707070707070707070607070607070707060707060606060706
+      0606060606060606060606060606060605050506050506050505050505050505
+      0505050505050404040404040404040404040404040404040404040404040404
+      0403030403030403030303030303030302020303030202020203020202020202
+      0202020202020201020202010201020101020101010101010101010101010101
+      0001000100010001000001010100000100000000000100000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000030303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030303131313939393A3A3A3B3B3B
+      3C3C3C3E3E3E3A3A3A2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3030303837373837
+      3738373738373738373737373737373737373737373737373737373737373736
+      3736373737363637363636363737363636363636363637373636363636363635
+      3536353635353635353535343534343635343534353434343435343434353434
+      3434343334343433333434343433343434343333333333333333333333333333
+      3333333332333332323232333332333233323232323232323232323132323231
+      323232323131323231323131323131313131302F2F2F2F2E2F2F2F2E2E2F2E2E
+      2E2E2E2E2E2E2E2E2E2E2D2E2E2D2E2E2D2E2D2E2D2D2D2D2E2D2D2D2D2D2D2D
+      2D2D2D2D2C2D2C2B2D2C2C2C2B2B2C2B2B2C2B2B2C2B2B2B2B2B2B2B2B2B2A2B
+      2A2B2B2A2A2A2B2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A
+      2A292A2A292A292A29292A292929292A29292929292929282928282928292928
+      2828282828282828282827272727292728282827282727272727272727272727
+      2727272627262727272727272727272727272728282727272828282727272627
+      272627272626272627262827272727272827282727282827282827282C2C2C31
+      3131333332333233323332333334333333333333353334363435353534353535
+      3030302D2D2D2D2E2E2E2F2E302F2F302F302F2F2F2F30303030303030303031
+      3030303031313131313131313233323232323332323233333333333334333335
+      3434343434343334343333343433343333343534343434353535343333333233
+      3232333232333332323232323132323132323332333233323332323232323131
+      313131313232313131313232333232323232323232313231313030303030302F
+      2F2E2F2E2E2D2D2E2D2D2E2D2D2E2D2D2D2C2C2D2B2A2C2B2A2B29292A2A2929
+      2929292828282627262626262425242424252323232424242828293535363939
+      383B3B3B3E3E3E3E3E3E2E2D2D1C1D1D1D1D1C1C1B1B1B1B1B1A1A1919181819
+      1918191819171817171717161616151616161615151515151516141414141413
+      1313131212121111121111111111111111111111110F100F0F0F0F0F100F0E0E
+      0E0E0E0E0E0E0D0E0E0D0D0C0D0D0C0C0C0C0C0C0C0D0B0C0C0B0C0C0C0C0C0C
+      0C0C0B0A0A0B0A0A0A0A0A0A0A090A0A0A0A0A0A09090A0A0909090909090909
+      0909090809090909080809080908080908080808080808070808080808070808
+      0807070707070707070707070707060607070707060707060606060606060706
+      0606060606050606050606060505060605050505050505050505050505040505
+      0505050504040405040404040404040404040404040404040404040404040404
+      0403030303030303030303030303030302030302020202020202020202020202
+      0201020102020102010101020101010102010202010101010101010001010100
+      0000000001010100000001000000010101000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000003030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303535353939393A3A3A3C3C3C3D
+      3D3D3E3E3E3232322F2F2F2F2F2F2F2F2F2F2F2F2F2F2F343434383737383737
+      3837373837373737373737373737373737373737373737373737373737373736
+      3737373737363637373736373637363637373636363636363636363536363535
+      3535353535363434363535353435353535343435343434343434343434343434
+      3434343434343334343334343433333334333333333333343333333333333333
+      3333333232333332323232323232333233323232323232323232323232323131
+      32313132313131313130302F2F2F2F2F2F2F2F2E2F2F2E2E2E2F2F2E2F2F2F2F
+      2E2E2E2E2E2E2E2E2E2E2E2E2E2D2D2D2D2E2D2D2D2D2E2D2D2D2D2D2D2D2D2D
+      2D2D2D2C2D2C2C2C2C2C2C2B2B2C2B2B2C2C2C2C2B2B2B2B2B2B2A2B2A2A2A2A
+      2A2A2A2B2B2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A
+      2A2A292A2A2A2A292A292A2A2A29292929292929292929292928292928282829
+      2828282828282828292929272828282828272728272727272727272727272627
+      2728272728282727282828272828272827282827272727282727272727272727
+      27282727272828282828292829292929282929282928272829292A2A2A2A2F2F
+      2F34343434343434343434343435353536363637363637363637373637373634
+      3434303030303030313030313130313231313131313131323232333333333333
+      3333333333333334343434353635353535353535353636363635353636363636
+      3636353636363536353537353636363637363636363737373735353635353535
+      3535353535353535353535353435353535353535353535353535353535353535
+      3535353535353535353535353535343534353433333333333232323232323131
+      31313030313031312F312F2E2F2D2D2E2D2D2E2D2D2D2C2D2D2C2C2C2B2B2B2A
+      2A2A2929282727282728272626262525252525252525253233333839383B3B3C
+      3C3C3C4040403F3F3F2021211D1E1D1C1D1C1C1C1C1C1C1C1B1A1A1A1A1A1919
+      1918181818181817171717171716151515151615161515151515151514131414
+      14131212121212131212121111111111101011111111110F100F0F0F100F0F0F
+      0E0E0E0E0E0D0E0E0D0D0D0C0C0C0C0C0C0D0C0C0C0C0C0C0C0C0B0C0B0C0C0B
+      0C0B0A0A0A0A0A0A0A0A09090A0909090A090A09090A09090909090909090908
+      0908080808080908080908090808080808080808080808080807080707070707
+      0707080708070707070707060707070706070606070706060706070707060606
+      0606060606060606060506060505050505050605050505050505050505040404
+      0504040405040404040404040404040404040404040404040304030303040304
+      0303030303030303030303020303030303020202030203020202020202020102
+      0202020201010201020201010101010201010101010101010101010101010100
+      0101000101000001010000000000000000000100010000010000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303131313838383A3A3A3B3B3B3C3C3C3D3D
+      3D3D3D3D2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3037373738373738373738
+      3737383737373737373737373737373737373737373737363737373636373736
+      3637373737363737373736363636373736363636363636363636353636353535
+      3536353436353536343435353435343434353434343434343434343434343434
+      3334343433333434333334333333343333343334333334343333333332333332
+      3333323332323332333332323332323232323232323232323231323232323231
+      302F2F30302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2E2F2E2E2F2E2E2F2F2E
+      2E2E2E2E2E2E2E2E2E2E2E2E2E2E2D2E2D2D2D2D2D2D2D2E2E2E2E2D2D2D2D2D
+      2D2D2C2D2C2C2C2C2B2D2B2C2C2B2B2C2B2B2C2B2B2B2A2B2B2B2A2B2B2A2A2B
+      2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A292A
+      2A2A292A2A2A292929292A292929292928282929282929292928282828292929
+      2929292928292928292927282928282827282827272828282828282828272727
+      2728282828282828282828282828282728272827282728282828282828292829
+      28292A292A292929292A292929292A292A2A2A2B2A292A2B2A2B2B2B2B2C2C2C
+      3232313635353737363636363737373737373737373937373938373939383838
+      3834333332323233333333323233333334343433343434353535363636363636
+      36363636363636363737363737373838383837373838383938383938383A3838
+      3939383938383A3939393939393A393A393A3A3A3A3B3A3A3837373838373838
+      383838393939393939393A3A3A3A3A3939393A3A393939383838383838383838
+      3838373737373737373737373737363636363636353535353535343434343334
+      3333343232333231333131312F2F302F2F2F2E2F2F2E2D2E2D2D2D2C2C2C2C2C
+      2C2C2C2C29292928282827272727272727272729292A3939393B3B3C3D3D3D40
+      414141404134343420201F1E1E1F1D1D1D1D1D1D1C1C1C1B1B1C1A1B1A191A19
+      19191A1818181818181717171716171616151515161515161515151514151413
+      141313141213131213121111111111111111101011111110100F0F0F0F0F0F0D
+      0E0E0E0D0E0D0E0D0E0E0D0D0C0C0D0D0D0C0C0C0C0B0C0C0B0C0C0B0B0B0B0B
+      0B0B0B0A0A0A0A0A0A0A0A0A09090A09090A09090A090A090A09090909090908
+      0909080908090909090909080809080808080808080807080708070807070707
+      0708070808070807070707070707070607070707060607070707070607060606
+      0606060606050606050606050505060505050505060505050505050505050405
+      0404040504040404040404040404040404040404040404040403030403030303
+      0303030303030303030303030303020303020202020202010202010202020102
+      0201010202020101010101010101010201010101010100010101010001000001
+      0101010101000101010101000000010001010000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303333333939393A3A3A3B3B3B3D3D3D3E3E3E
+      3535362F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3232323837373837373837373837
+      3737373737373737373737373737373737373737373737373737373736363736
+      3636373636363637373637363736363736373736363635363635363535353535
+      3535353534353535353535353534343434343434353534343434343434343433
+      3434343333333334343433333434333333333334333333333333333333333333
+      33333233333333333332323332323232333232323232323031312F302F303030
+      3030302F2F302F2F2F2F2F2F2F2F2F2F2F2F2E2F2F2F2E2E2F2F2E2E2E2E2E2E
+      2E2E2E2E2E2E2E2E2E2E2D2E2E2E2D2E2E2D2E2E2D2E2D2D2D2E2D2D2D2D2D2D
+      2D2C2C2C2B2C2C2B2D2B2B2C2B2B2C2B2B2C2A2A2B2B2B2B2B2A2A2B2B2A2B2A
+      2A2A2B2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A
+      29292A29292A29292A29292929292929282829292829292A2929292A29292A29
+      2929292829282929292728282728292829292828282828292929292829282829
+      2828282829282728282828272829292829282A292A2929292A2A2A2A292A292A
+      2A2A2A292A2A2A2B2B2C2C2C2C2C2B2B2B2B2B2C2A2C2C2B2C2B2B2C2C2C2C30
+      2F303736363737373838383938383939393B393A3C3B3B3C3B3A3B3B3B3A3A3A
+      3636373535343535353535363636363636363636363736363737383838383938
+      38393939393A3A39393A3A3A3B3B3A3A3B3B3B3C3B3B3C3B3B3C3C3C3C3C3C3C
+      3B3B3C3C3C3C3C3C3C3C3C3C3C3C3D3D3D3D3D3D3D3D3D3C3C3D3C3D3D3C3D3D
+      3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3C3D3D3C3D3C3C3C3C3B3B3B3B3B3B3A3A
+      3B3A3B3A3A3B3A3A3A3A38393939393838373837373836363636363636363636
+      35363634363434343232333232333131313131312F30302E2E2E2E2E2E2D2D2D
+      2C2C2D2B2B2B2B2A2B29292A2929292828273332333B3B3B3E3D3D3F3F3F4242
+      424343432525262021201F201F1F201F1E1E1E1D1D1D1C1C1C1C1C1B1B1B1A1A
+      1B1A191919181818181818181717161716151515151615151515151515151415
+      1413141314131213121212121111111110111010111110100F0F0F0F0F0F0F0F
+      0F0E0E0E0E0E0E0E0E0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0C0B0C0B0B
+      0B0C0A0A0A0A0A0A0A0A0A0A090A0A0A090A0909090A09090A09090909090909
+      0908090909090909090908080808080808080708080808080807080807080707
+      0708080707070707070707070607070706060706060606060606070606060706
+      0506060605060605050505050505050505050505050505040405050404040404
+      0404040404040404040404040404040404040404040404040303030303040303
+      0303030303030303030303020202020202030302020202020202020202020201
+      0202010102020101010101010101010101010101010101010100000101010000
+      0000000000000001010000000000000001000001000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303737373A3A3A3A3A3A3C3C3C3D3D3D3E3E3E2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F363636383737383737383737373737
+      3737373737373737373737373737373737373737373637373737373737373737
+      3737363636373736373736363736363636363636363536363536343436353536
+      3535363534353434353435343435343434353435353434343434343433343434
+      3433333434343334343333343333333333333333323333323233333333333233
+      32323333333333333332323232313131303030303030302F302F2F30302F302F
+      302F2F302F2F302F2F2F2F2F2F2F2F2E2F2F2F2F2E2F2F2F2E2F2F2E2E2E2E2E
+      2E2E2E2E2E2E2E2D2E2D2D2E2D2D2D2E2E2E2D2D2E2D2E2D2D2D2D2D2D2C2D2D
+      2C2D2C2B2C2C2B2C2C2B2C2B2B2C2B2B2C2B2B2B2A2B2B2A2A2A2A2B2A2A2B2A
+      2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A292A2A2A2A2A
+      2A2A2A2A2A292929292A29292929292A2A2A292A2A29292A292A2A2929292929
+      292929292A29292A29292929292A29292A292929292829292829282929292828
+      29282828282929292929292A2A2A2A2B2B2A2A2A2A2A2A2A2A2A2B2B2A2C2C2C
+      2C2C2C2C2C2C2C2C2C2C2C2C2D2C2D2D2D2E2E2C2E2D2C2D2E2D2E2E2E2E3030
+      2F3535363A393A3A3A3A3B3B3B3B3B3B3C3B3B3C3B3B3D3D3C3D3D3C3E3E3E3A
+      3B3B373737373637373737383938393939393939393A393A3A3B3C3B3B3B3B3B
+      3C3C3C3C3C3C3D3C3D3C3C3C3D3D3D3E3D3D3E3D3D3F3E3E3F3D3D3E3D3D3F3F
+      3E403F3F3E3F3F40403F3F3F403F3F3F403F403F3F3F404040403F3F3F3F403F
+      3F3F403F3F3F3F3F3F3F3F3E3E3E3E3E3E3E3F3F3E3E3E3E3E3E3D3D3D3D3D3D
+      3D3D3D3D3D3D3D3D3D3C3C3C3C3C3C3A3A3B393A3939393A3938393837383737
+      383736363535363535363434343333333131313231313030312F2F2F2E2E2E2D
+      2D2D2D2C2C2C2C2B2A2A2A2B2B2B2C2C2C3939393E3D3D404040434443444444
+      373737232323212221212020201F1F1F1F1F1D1E1E1D1D1D1B1B1C1B1B1B1C1B
+      1B1A1A1A19191918181818171818171717171615161515151515151415141514
+      15141413131212121212121111111111111010111011101010110F0F0F0F0F0F
+      0F0F0F0D0D0E0D0D0E0D0D0D0C0C0D0C0C0C0C0C0C0C0C0B0C0C0C0B0C0B0C0B
+      0C0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A090A0A09090909090909090909090909
+      0809090909090809080808080808080808080808080807080708070708080707
+      0707070707070707060707070707070607070707060606070606060606060506
+      0605060606050606060605050505050505050505050505050505050404040404
+      0405040404040404040404040404040404040403040303030404040303030303
+      0303030303020302030203020202020202020202020202020202020202010102
+      0101020102010201010101010101020101010100010101010101010101010000
+      0101010001000000010101000000000101000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303232323939393A3A3A3B3B3B3D3D3D3E3E3E3838382F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F31313138373738373738373738373737373737
+      3737373737373737373737373737373737373737373737373636373737373736
+      3737373636363737363636363636353736353636363635353635353635353535
+      3435353435343535343434343535353434343434343534343433343434333434
+      3333343333343433343332333232333333333332333332333333323333333332
+      333333323332323131303031303030303030303030303030302F2F2F302F2F30
+      30302F2F302F2F2F302F2F2F2F2E2F2F2F2E2E2E2E2E2F2E2F2E2E2E2E2E2E2E
+      2E2E2E2E2E2D2E2E2D2D2E2D2D2D2E2E2E2E2E2D2E2D2D2D2D2D2D2D2D2D2D2C
+      2D2C2C2D2C2B2C2B2B2D2C2B2C2B2B2C2B2B2B2B2B2B2B2B2B2A2A2A2A2B2A2A
+      2B2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2929
+      2A2A29292A2A2A2A2A2A2A2A2A2A292A2A29292A29292A29292A292A292A2A2A
+      2A2A2A2A2A292A292A2A292A2A2A292A292A2929292928292828282A29292A2A
+      2A2A2A2A2A2A2A2B2B2A2B2A2B2A2A2B2B2B2B2C2C2C2C2C2C2C2C2C2C2C2C2D
+      2C2C2D2E2D2E2E2E2E2E2D2E2D2E2F2E2E2F2F2F3030312F2F30303030303030
+      3535343B3A3B3C3C3C3D3D3D3D3D3D3F3E3E3F3E3E40404040403F40403F3F3F
+      3F3A3A3A3B3B3B3C3B3B3D3C3C3C3C3C3C3C3C3C3D3D3D3D3E3D3E3E3E3E3E3F
+      3F3F3F403F404040414040414141424141424141424141424142424141434242
+      4343434343434243424342424343434343434343434444444344444344434344
+      434344434343434242424343424343424242424141414141414140403F403F40
+      3F3F3F3F403F3F403E3E3E3D3D3D3D3D3D3C3C3C3C3B3C3C3B3B3B3A3B3A383A
+      3837383737383636373635363535353434353433343332323131313030312F2F
+      2F2D2E2E2D2D2D2D2D2D2C2C2C3535353E3E3F41414143424244454446464628
+      29292323232323232122222020201F1F1F1F1F1F1E1E1E1C1C1D1B1C1C1C1B1B
+      1B1C1B1A1A1A1919181817171718171717161616171515151415151515151414
+      151314131413131212121211121011111011101011101110100F0F0F0F0F0F0F
+      0F0F0E0E0E0D0E0D0E0D0D0D0C0D0C0C0C0C0C0C0C0C0B0C0C0C0B0C0B0C0B0B
+      0B0B0B0A090A0A090A0A090A0A0A090A0A090A09090909090909090908090909
+      0908090809090808080808080808080808080808070808080807080708070807
+      0708080707060707060707070707060706070707060606060606060606060606
+      0606060606060506050505050505050505050504050505050505040404040404
+      0404040404040404040404040404040404040403040404030303030303030303
+      0303030202020302020302020202020202020202020202020202020201010102
+      0102010201020102010102010101010001010101010100000101000101000100
+      0100000100010001000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303636363939393A3A3A3C3C3C3D3D3D3E3E3E3131312F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F3434343837373837373837373737373737373737
+      3737373737373737373737373737373737373736373737373737373737373737
+      3737363637363636363736363635363635363535363535363435363535353435
+      3535353435353434343534343535343434343434343434343434343434343434
+      3434323333333333323334333233323233333233333233333333323232323132
+      31313131313030303030303030303030303030303030303030302F2F2F302F2F
+      2F2F2F30302F2F2F2F2F2E2F2F2F2F2F2F2E2E2F2E2E2F2E2E2E2F2E2E2E2E2E
+      2E2E2D2E2D2E2E2E2E2D2D2E2E2E2D2D2D2E2E2D2E2D2D2D2D2D2D2D2D2D2C2C
+      2C2C2D2C2B2D2B2B2D2B2B2C2B2B2C2B2A2B2A2B2B2B2A2A2B2B2B2A2A2B2A2B
+      2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A292A2929292A2B
+      2A2A2A2A2A2B2A2A2A2A2A2A2A2929292A292A2B2B2A2A2B2A2A2A2A2A2A2A2A
+      2A2A2A2A2A2B292A2A2A2A2A2A2A2A29292929292A29292B2A2A2B2A2B2C2B2B
+      2C2B2B2B2B2B2B2B2C2C2C2C2D2C2C2D2D2C2C2C2C2D2D2D2E2E2D2E2D2E2E2F
+      2F2E2E2E2F2F2F302F3031303130303131303132323231313231323233333334
+      34353B3B3B3F3F3F404040404040414040424140424242444342444443434343
+      3D3D3D3D3E3D3E3E3E3F3E3E3F3F3F40403F4140414041404141414242424343
+      4342434243434343434344434344444344444445434446444446464546454646
+      4545464646464546454646464646464646464646474746474747464747464646
+      4746474646464546454646464545454545454545454444434444444344444343
+      424242424242424141414040403F403F3E3E3E3E3E3E3E3D3E3D3C3D3B3B3B3A
+      3A3B39393A383838373737373737363636353535343534343434323232303030
+      2F2F2F2E2E2F2F2E2E2F2F2F3D3D3D4141404343424647474747473A3A3A2425
+      252424232323232223232222222121211F1F1E1E1F1F1E1E1E1C1C1C1B1B1B1B
+      1B1B191A1A1A191A191818171718181718161616151515151515151414141414
+      1415151313131313131212121111111110111010111010101010100F0F0F0F0F
+      0F0E0D0E0E0D0E0D0D0D0D0D0D0C0C0C0C0C0C0C0C0C0C0B0C0B0B0C0B0B0B0B
+      0B0B0A0A0A0A0A09090A090A0A0A0A09090A0909090909090909090909080909
+      0809090908080809090808080808080808080808080708080708070808070808
+      0707080707070707070707060707070606070707070706060606060606060606
+      0506060505050505050506050505050505050505040404050405040404040404
+      0404040404040404040404040404040404040403030303030304030303030302
+      0303030303020302030303030202020202020202020202020201020101020201
+      0201020102010101010101010101010101010101010101010101010101000100
+      0101000001000100010000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303131313838383A3A3A3B3B3B3C3C3C3D3D3D3B3B3B2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F303030373737383737383737383737373737373737373737
+      3737373737373737373737373737373637373737373737363637373736373636
+      3636373636363636363636363536363536353536353536353536353535353535
+      3535353435343434353535343534343434343435353434343434333333333332
+      3332323332323432333433333332323333323332323232323130313131303231
+      31313130303031303031303030303030302F30303030302F30302F2F2F2F2F30
+      2F2F2F2F2F2F2F2F2F2F2F2F2E2F2E2F2F2E2F2F2F2F2E2E2E2E2E2E2F2E2E2E
+      2E2E2E2E2D2E2D2E2E2D2D2D2D2E2D2D2D2D2D2E2D2D2D2D2D2D2D2D2D2C2C2C
+      2C2C2C2C2D2B2C2D2B2B2C2B2B2C2B2B2B2A2B2B2A2B2A2A2B2A2A2B2A2A2A2A
+      2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2B2B2B2A2B2B2B2A2A
+      2A2B2B2A2A2A2A2A2A2A2A2A2A2A2B2A2B2B2A2A2A2B2A2A2A2A2A2A2A2A2B2B
+      2B2A2A2B2A2A2A2A2A2A2B2A2A2B2A2A2B2B2A2B2B2A2B2C2B2B2B2B2D2C2D2C
+      2C2C2D2D2D2C2C2D2D2D2C2C2C2C2D2D2D2E2E2E2E2F2F2E2F2F2F302F313131
+      3131323131313232323232333332333333333433343434353535353636363636
+      363C3D3D41414142424242414245444445454545454447464547474646464641
+      4041414242424141424242424242434343434343444444454546464545464646
+      4746464847474847474947484847474948484948494949484949484949494949
+      49494A4A4A4A494A4A4A4A4A4A4A4A4A4A4A4A4A494A49494A4A4A49494A4A49
+      4949494949494948484848494948484849474747474747464646464646454545
+      454545454545444343434242434243414042414041403F403F3F3F3D3E3E3D3E
+      3E3C3D3D3A3A3A3A3A3A39393837383837373737373735343533333333333332
+      31322F302F303030393939414141444444464746484848494A4A2C2C2C262526
+      2425252424232323232322222222222120211F1F1E1E1F1F1D1D1E1C1D1C1B1B
+      1B1B1B1A1A1A1A18191917171717181717171716161615151514151414151414
+      14151313131313131212121112121111101110111010101010100F0F0F0F0F0F
+      0F0F0E0E0D0E0D0D0E0D0D0D0C0C0C0C0C0B0B0C0C0C0C0B0B0B0C0C0C0B0B0B
+      0B0A0A0A0A0A0A0A0A09090A0A09090A0A09090A090909090908090908090908
+      0909090808080808080808080808080808080708080808080808070707070708
+      0707070707070707070707070606060706060606070606060606060606060606
+      0605050606060506050505050505050504040404040404040404040404040404
+      0404040404040404040404040404040403030403030303030303030303030303
+      0303020302030302030202020202020202020202020201010202020101020201
+      0202010201010201020101010101010101010101010001010001010101000100
+      0000010001000101000000000000000100000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000030303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303535353939393A3A3A3B3B3B3D3D3D3E3E3E3333332F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F33333338373738373738373737373737373737373737373737
+      3737373737373737373737373737373737363737373737373737373736363737
+      3636363636353637363636353735353635353635353635353635353535353435
+      3534343535353434343434343435353434343433333333333332333333333333
+      3332333232333332333232333233323232323231323131323131313031323130
+      31313130313131303030303030303030303030302F3030302F302F2F30302F2F
+      2F2F2F302F2F2F2F2F2F2E2F2F2E2F2E2E2F2E2E2E2F2E2F2E2E2F2E2E2E2E2E
+      2E2E2D2E2E2E2E2E2D2E2D2E2E2D2D2E2D2D2D2D2D2D2D2D2D2D2C2D2C2D2C2C
+      2C2C2C2D2B2B2D2B2B2C2B2B2C2B2B2B2B2B2B2A2A2A2B2B2A2A2A2A2A2A2A2A
+      2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2B2B2B2B2B2B2B2B2B2B2B2A2A2B2B2B
+      2A2B2A2B2A2B2B2B2B2A2B2B2B2A2B2A2B2A2B2A2B2C2B2B2B2B2B2B2B2B2A2B
+      2B2A2A2C2B2B2C2B2C2C2B2B2D2C2C2C2B2B2C2C2C2D2D2D2E2D2D2E2D2D2D2D
+      2D2D2D2D2E2E2E2F2E2F302F2F2F2F2F30303031313031323232323232313233
+      3334333334343434353434353536363537373637363637373737383838383839
+      3D3D3C4444434545454545454646464746464848474949494949484949484545
+      454344434444444545454645464746474747484848494848484949494949494A
+      49494949494A4A4A4B4A4A4C4B4B4C4B4B4C4C4C4C4C4B4C4C4C4D4D4D4D4D4D
+      4D4D4D4D4D4C4D4D4D4D4D4D4D4D4D4D4D4D4D4C4C4C4D4D4D4D4D4C4C4C4C4C
+      4C4C4C4C4C4C4C4B4B4C4B4B4B4B4B4B4B4B4B4B4B4B4A4A4A49484948484847
+      47474747474646464645454444454443444343434241424040403F3F403F3F3F
+      3E3E3F3D3D3D3C3C3C3A3B3B393A3A3A39393737373636363636363433343332
+      323232323333334040404445454747474949484949493F3E3E28282827272726
+      26262525242323232323232222222221222121211F1F1F1E1E1E1D1E1D1C1C1C
+      1A1B1A1A1A1B1A1A191819181717171717171717171616151515151515141415
+      141414141313131313131211121011101010111010101010101010100F0E0F0F
+      0F0E0E0E0D0D0D0D0D0D0E0C0C0C0B0C0C0C0C0C0C0C0C0C0B0B0B0B0B0B0B0B
+      0A0A0A090A0A0A0A0A090A0A0A0A09090909090A090909090908090809090909
+      0808080809080808080808080808080808080807080808080707080707070707
+      0707070707060607070706060707060606070606060606060606050606050605
+      0505060505050505050505050504050404050404050404040404040404040404
+      0404040404040404040403040404040404030304030303030303030302030303
+      0302020203030202020202020202010202010202020102020202020202010102
+      0101020101010101010101020100010101010101010101010100010100010001
+      0000000001010100000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000003030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303838383A3A3A3B3B3B3C3C3C3D3D3D3D3D3D2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F303736363837373837373737373737373737373737373737373737
+      3737373737373737373737373737373737373737373736373736363637363636
+      3636373635363636363535363535363535363535363535353535353434353435
+      3535343535343434343434343333333333333333333333333333333332333332
+      3233333232323332323232323132323132323132313132313131313132303131
+      3030303031303030303130303030303030302F302F303030302F2F302F302F2F
+      2F2F2F302F2F2F2F2F2E2E2F2F2F2E2F2E2F2E2F2E2E2E2F2E2E2E2E2E2E2E2E
+      2E2E2E2E2E2E2D2D2D2E2D2E2D2D2D2E2D2D2D2D2D2D2D2C2D2C2D2C2D2C2C2D
+      2C2C2C2B2C2C2B2C2C2B2B2C2B2B2B2A2B2B2B2A2B2B2A2A2A2A2A2B2A2A2A2A
+      2A2A2A2A2A2A2A2A2A2B2B2B2B2B2B2B2B2B2B2B2B2B2A2B2A2B2B2A2A2A2C2B
+      2B2B2B2C2B2B2B2B2B2B2B2B2B2B2C2C2C2C2C2B2B2B2B2B2B2C2C2C2C2C2B2D
+      2D2D2C2B2C2D2C2D2D2C2C2E2D2D2D2D2D2E2E2E2D2E2D2D2E2E2E2E2E2F2F2F
+      30303030302F3031303131313232323232323232323333343334333434343535
+      363636363737373737373837383838383A393A39393A3A3A3A3B3C3C3B3C3B3E
+      3E3F4546454848484949494949484B4A4A4C4C4B4C4C4B4D4D4C4D4D4D484848
+      4848484949494949494949494B4A4A4A4B4B4B4B4B4C4C4C4D4D4D4D4C4C4E4D
+      4D4F4E4E4F4E4E4F4E4F504F4F50505050505050505050505051515151515151
+      5151515151515151515151525252525252525151525151525251515152505050
+      4F504F4F504F4F4E4F4E4F4E4E4F4E4D4D4D4D4D4D4D4D4D4C4C4C4C4C4C4A4A
+      4A4A4A4A4948494847484746464646474646464544454343434342434140403F
+      3F3F3F3F3F3F3F3E3C3D3D3D3D3D3A3A3B393A39383938373637363536343534
+      3434343D3C3C4646464747474A4B4B4B4C4B4D4C4D2F2F302929292828272626
+      272626262424242324232323232222212222211F1F1F1F1E1F1F1E1E1D1D1D1C
+      1C1C1B1A1A1B1B1B1A1A1A181819171717171717161516151514141414141514
+      1414141213131213131112111111111110101010101010101010100E0F0E0E0F
+      0E0D0D0D0E0D0D0D0D0D0C0C0C0C0C0C0C0C0C0B0B0C0B0B0B0B0B0C0C0B0B0A
+      0A0A090A0A090A0A090A090A0909090909090909080909090909090908090809
+      0809090808080808080808080807080807070808080708080707070707070707
+      0707070707070707060707070606060606060706060606060606060606060605
+      0505060505050505050505040505050404040404040404040404040404040404
+      0404040404040404040404040403030304040403030303030303030303020302
+      0202030202020302030202020202020202020102010202010201010102020101
+      0102010101020101010101010101000101000001010001000100010000000101
+      0000010001000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303232
+      323939393A3A3A3B3B3B3D3D3D3E3E3E3736372F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F323132383737383737383737373737373737373737373737373737373737
+      3737373737373737373737373637373737373737373737373736363636363736
+      3636363536363536353536353536353536353535353435353535353535343535
+      3534343534343333333433333433333334333333333233333333333332323333
+      3233323232323232313332313232313232313231303231313130313130303130
+      3130303130303030303030303030303030303030302F2F30302F2F2F2F302F2F
+      2F302F2F2F2F2F2F2F2E2F2F2F2F2F2E2E2E2E2F2E2F2F2E2F2E2E2E2E2E2D2E
+      2E2E2D2D2E2D2D2D2D2D2D2E2D2D2D2D2D2D2D2D2D2D2D2D2C2D2C2C2C2B2C2C
+      2C2C2B2C2C2B2B2C2B2B2C2B2B2B2B2B2B2A2A2A2A2A2A2B2A2A2A2A2A2A2A2A
+      2A2A2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2C2C2B2B2B2C2B2C2C2B2B
+      2B2B2C2B2B2B2C2C2C2C2B2B2B2C2B2B2C2B2C2C2C2D2C2C2D2D2D2D2E2E2E2D
+      2E2D2D2D2E2D2E2F2E2E2F2E2E2E2D2E2E2D2E2E2F2E302F2F30303030303031
+      3131323232323232323332333333343434353535363636373637373737373838
+      3838383939393B3A3B3B3A3B3C3B3D3D3C3D3C3C3D3D3D3D3D3E3E3F3F3F4141
+      424848484B4B4B4C4B4C4E4D4D4E4E4D4F4E4D50504F5151505150514C4C4C4C
+      4C4B4C4C4D4D4D4D4E4E4E4F4F4F4F4F4F504F4F4F4F4F515050525151525151
+      5352515452525453535453535352535454545454535554545555555555555555
+      5554545554545454545454545454545454545453535353535453535353535353
+      535353535353535352525351515151515150504F50505050504F4E4E4F4E4E4E
+      4D4D4D4D4C4D4C4A4C4A49494949494847484747474545464544454343444242
+      424141414040403F3F3F3F3F3F3C3D3C3C3B3B39393938383837373737373737
+      37374343434949494B4B4B4C4D4C4E4E4D3F3F402B2C2B2B2B2B292929282828
+      2627272526252524242323232223222221222021211F1F1F1E1E1F1E1E1E1C1C
+      1C1B1A1B1A1A1B19191918191817171717171717161715151614141415141415
+      14151414131213131112121211111011111010101010101010100E0F0F0E0E0F
+      0F0E0E0E0D0D0D0D0D0D0D0D0B0C0C0C0B0B0C0C0C0B0C0B0B0B0B0B0B0B090A
+      0A090A0A0A090A0A0A09090A090A090909090909090909080909090908080909
+      0808090808090808080808080808080808070707070808070807070807070707
+      0707070607070707070606060606060706060607060606060505050506050605
+      0506060505050504050504050405040504040404040404040405040404040404
+      0404040404040404040304030303030303030303030303030303020203020303
+      0203020202020202020202020202010202020202020102010201020102020101
+      0201010101010101010100010101010101010001010000000100010100010100
+      0101010101000100010000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030373737
+      3939393A3A3A3C3C3C3D3D3D3D3D3D3030302F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F35353538373738373737373737373737373737373737373737373737373737
+      3737373737373737373737373737373737373737373637373636373736363636
+      3636353636353635353635353635363635353535353535353535353535343434
+      3434333333343433333334333333343333333333333333333333323232323333
+      3232333232323232323231323231323231323131313131313031313131313130
+      30313030303030313030303030302F3030302F2F30302F302F2F30302F2F2F30
+      2F2F2F2F2E2E2F2F2F2F2F2F2F2F2E2F2F2E2E2F2E2E2E2F2E2E2E2E2E2E2D2D
+      2D2E2D2E2E2E2D2E2E2D2D2D2D2D2D2D2D2D2D2D2D2D2D2C2C2C2D2C2C2C2C2B
+      2C2B2C2C2B2B2C2B2B2C2B2A2B2A2B2B2B2B2A2A2B2B2B2A2A2A2A2B2B2B2B2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2B2C2C2C2C2C2C2B2C2C2C2C2C2C2B2B2B2B2B2C
+      2C2C2C2C2C2C2C2C2C2B2B2C2C2D2D2D2E2D2D2D2E2E2E2E2E2E2E2F2E2E2E2E
+      2F2E2F2F2F2F2F2E2E302F2F3030303131313031313131313232323232323333
+      333334343434353536353636363737373737373838373938383A39393B3C3B3B
+      3B3B3D3D3C3D3D3D3E3D3D403E3F3F3E3F404041414141424242434343434343
+      4A4B4A4E4E4E4F4E4F5250515251525353525353525454535454554F4E4E4F4F
+      4F50515051515152525253525353545355545455555555545455555556565556
+      5656575656575757585757585858585858585858585858585858585858595959
+      5959595959595959595959595959595959595958585858595958585757575757
+      565655565556565555555555565454545454545353535252535151525050504F
+      4F4F4F4F4F4E4E4E4D4D4D4C4B4C4A4A4B494949484848474747454545464545
+      4343434242424141414040403F3F3F3C3C3C3B3B3B3A3A393838393839384141
+      424949494B4B4B4E4E4E504F4F4E4F4F2F2F2F2D2D2D2B2B2B2B2B2B29282927
+      28272626262525262424242323232322222122212021211F1F1F1E1E1E1D1D1D
+      1C1C1B1B1B1B1A1A1A1919191818181617171617171516151514151514151415
+      141414141312131213131111121110111010101010101010100F0F0F0F0E0E0E
+      0E0E0E0D0D0D0D0D0D0D0C0C0C0B0C0C0B0B0C0C0B0B0C0B0B0B0B0B0B0A0A0A
+      090A09090A0909090A0909090A090909090A0909090909090909090809090908
+      0909080808080807080808080707080808080707070807070707070707070707
+      0707070607060707060606060606060606060606060606050606050606060505
+      0505050405050505050405050404040404040504050404040404040404040404
+      0404040404040304030303030303030303030303030303030303020303030203
+      0203020203020202020202020202020102020201020201020102020102010201
+      0101010201010101010101010101010101010101010101010101000101010001
+      0100010000000000000100010000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303030303030303131313939393A
+      3A3A3B3B3B3C3C3C3D3D3D3939392F2F2F2F2F2F2F2F2F2F2F2F2F2F2F303031
+      3837373837373737373737373737373737373737373737373737373737373737
+      3737373737373737373737373737373737373737373737373637373636363536
+      3636363535363536363536363536353535343535343535343434343434343433
+      3334343433333433333334333333333333333333333233333232323333323232
+      3233323232323132323133323132323132313132313032303131303131303030
+      3030313030303030303030303030303030302F2F2F302F302F2F2F302F2F2F2F
+      2F2F2F2F2F2F2F2F2E2F2F2F2E2F2F2F2F2E2F2E2E2E2E2E2E2E2E2E2E2E2E2D
+      2E2D2E2D2E2D2D2D2E2D2D2D2D2E2D2E2C2D2D2D2D2D2C2D2C2C2C2B2C2C2C2C
+      2B2C2C2B2B2C2B2B2C2B2B2B2B2A2B2B2B2B2A2B2B2B2B2B2B2B2B2B2B2B2B2B
+      2B2B2B2B2B2B2C2C2C2C2C2C2C2C2C2C2B2C2C2B2C2C2D2C2D2C2D2D2C2C2C2C
+      2C2D2D2D2C2D2C2D2E2D2F2E2F2E2F2F2E2E2E2F2F2F2F2F2F2F2F2F302F3030
+      2E2F313030313030323131323232333333333232323232333334353535353534
+      353536373737373737383839393939393A3A3C3C3C3B3C3B3D3D3D3E3D3D3E3E
+      3E4040404140414141424241424343434343444443444645464646474847474D
+      4D4D535353535353555354575556575756575756585857585858545454535353
+      5555555555555656565757575857575757575958595A59595A59595A595A5C5B
+      5A5C5B5C5C5B5B5B5B5B5C5C5C5C5D5D5D5C5D5D5D5D5D5E5D5D5D5D5D5C5D5D
+      5D5D5D5C5C5C5C5D5C5C5C5C5C5C5C5C5C5B5B5C5C5B5C5B5B5C5B5B5B5B5B5B
+      5B5B5B5A5A595859585858585858585757575656565555555555555454545251
+      525151515150514F4F4F4F4E4F4D4D4D4B4B4B4B4B4B49494948484847474746
+      46464545454343434242414040403E3E3E3D3D3D3C3C3C3C3B3B3C3C3C484948
+      4D4E4D4E4E4E5050505152524142422E2E2E2E2E2E2D2D2D2B2B2B2A2B2B2928
+      282727272627262324242323242323222122222121211F1F1F1E1E1E1E1E1E1D
+      1D1D1C1C1B1A1A1A19191A181818171716171617161515151515151414141414
+      1413141414141313121112111111111010101010101010100F0F0F0E0F0E0E0E
+      0F0D0D0E0D0E0D0D0D0D0B0C0B0C0C0C0B0C0B0C0C0B0B0B0B0B0B0B0A0A0909
+      09090A0A0A0A090A090909090909090909090909090909090808080808080808
+      0908080808080808080808080807080807080707070707070707070707070707
+      0707070706060706060706060606060606060605060605060606050605060505
+      0505050505050404040505040504040404040504040505050405040404040404
+      0404040304030303030403030303030303030303030303030302030302030202
+      0202020202020202020201020202010202020101010202020201010101010102
+      0102010101010101010101010001010101010001000100000001000001000000
+      0001000000000100000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303434343939393A3A
+      3A3B3B3B3D3D3D3E3E3E3232322F2F2F2F2F2F2F2F2F2F2F2F2F2F2F34343438
+      3737383737373737373737373737373737373737373737373737373737373737
+      3737373737373737373737363637373737373737363737363736363636353635
+      3636353536353536353536353535353534343434343433343434343434343433
+      3333343333333433333333333333333333333333333333333233323232323232
+      3333323332313232313232313132313231313131313131313130313130303031
+      3030303130303030303030303030302F30302F2F30302F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2E2F2E2F2E2E2F2F2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+      2E2D2D2E2D2D2D2E2D2E2D2D2D2D2D2D2D2D2D2D2D2D2D2C2D2C2B2C2C2B2C2B
+      2C2C2B2B2C2B2B2C2B2B2B2A2B2C2C2B2B2C2B2B2C2B2B2B2B2B2B2B2B2B2B2C
+      2C2C2C2C2C2C2C2C2C2C2C2C2C2C2D2D2D2C2D2D2D2D2C2D2C2D2D2D2D2E2D2D
+      2E2E2E2F2F2F2E2F2E2F2E2F2F302F2F302F3030303030303131313131323232
+      3232313233323234333333323334343334343436353536363637373738383838
+      37373A3A393A3A3A3B3B3B3C3C3C3D3D3D3E3D3E3E3E3E414040414141424242
+      4242424443434544444645464746474747484849494949494B4A4B4B4C4C4F4F
+      4F5656565756575858575B595A5B5B5B5C5C5B5C5D5C5C5C5B58585959595859
+      59595A5A5A5B5B5B5B5B5B5C5C5C5C5C5C5D5D5D5E5D5D5F5E5E5F5E5E5F5E5F
+      605F5F6060606060606060606161616060606262616162616161616161616262
+      626261616161626161616160616160616060606060615F5F5F5F5F5F5E5E5E5E
+      5D5D5E5D5E5C5C5D5C5C5C5B5B5B5B5B5B5A5A59585859575757575656565556
+      5554545353535251525050505050504E4E4E4D4E4E4B4B4C4A4B4A4949494848
+      484747474544444443444141424141413F3F3F3E3E3E3C3C3C4646464E4E4E4F
+      4F4F5252525353535050503132313130302E2E2E2E2E2E2D2D2D2A2B2A2A2A29
+      2928282727272525252424242323232222222221212020201F1F1F1E1D1E1D1C
+      1D1C1B1B1A1A1A1A1B1A19191918171817161717171615161514141414141414
+      1414141414131213111111111111101010101010100F1010100F0F0F0F0F0E0F
+      0D0D0D0D0D0D0D0D0D0B0C0C0B0B0C0C0B0C0B0B0C0B0B0B0B0B0B0A0A0A0A0A
+      0A0A0A09090A0A09090909090A09090909090908080809090808090808090908
+      0808080808080808070807080708070808070707070707070707070707060706
+      0706070706060606060606060606060506060605060605050505050505050505
+      0505050505050504050505050504040404040404040404040504050404040404
+      0404040303030403030303030303030303030303030203030302030202020202
+      0202020202020202020202020202020201020202010101020201020102010102
+      0101010101010101010001010001000101010001010101000000000100010000
+      0100000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030303131313737373939393A3A3A
+      3C3C3C3D3D3D3C3C3C2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F303737373837
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737373737373737373737373737373736363736373636363636363536373536
+      3635353635363635353434343434343434343434343434343434343433333333
+      3334343333333333333333333333333333333333333233333232333332333233
+      3332323231323231333232323131323131323031323130313130313030303031
+      3030303030303030303030303030302F2F2F30302F2F2F2F2F2F2F2F2F2F2F2F
+      2F2E2F2E2F2F2F2F2F2F2F2F2F2E2E2F2E2E2F2E2E2F2E2E2E2D2D2E2E2E2D2E
+      2E2E2D2D2E2D2D2D2D2D2D2D2D2D2D2C2D2D2D2D2D2C2C2D2C2C2C2C2C2C2B2B
+      2C2B2B2C2B2B2D2C2C2C2B2C2C2C2B2B2B2C2B2B2B2B2C2B2C2C2C2C2C2C2C2C
+      2C2C2C2C2C2C2C2D2D2D2D2D2D2D2D2D2D2D2D2E2D2E2F2E2E2E2E2E2F2F302F
+      2F2F2F2F2F2F2F302F2F30303030303030313131323132333232323233343434
+      3433343433333534343636363636363737373838383838383939393A3A3A3C3B
+      3C3C3C3D3D3D3D3E3F3E3F3F3F41414041414142424242434244444445454547
+      47474747474848484A49494B4A4B4B4B4C4D4D4D4D4D4E4E4F4E504F4F535353
+      5B5B5B5C5B5C5D5C5D5D5D5C5F5F5F60605F6161606060605C5C5C5D5C5C5E5D
+      5D5E5E5E5F6060605F5F60606062616162616162626263636364636363636364
+      6464656565656565656565656565656565656565666666666666666666656565
+      6666656566656565666565656464646464636364646463636262626262626262
+      626061616060615F5F5F5E5E5E5D5D5D5D5D5D5B5B5B5A5A5A5A595A58575857
+      57575655565455555353535252525050505050504E4E4D4D4E4D4B4B4B4A4A4A
+      4949494748474544454343434242424141414040404140414F4F4F5151515353
+      535454545556564141413333333130303030302E2E2E2E2E2E2B2B2B2A2B2A29
+      29292727272626262525242423232323232121212121211F1F1F1E1E1E1D1E1D
+      1D1D1D1A1A1A1A1A1A1919191818181717171617161516151514141414141414
+      14141414131313131312111111101110101010101010100F100E0F0F0F0F0F0D
+      0E0D0D0D0D0D0D0D0C0B0C0B0B0C0B0B0B0B0C0B0B0B0B0B0B0B0A0A090A0909
+      0A09090A0A090909090A09090909090909090908090809090809080808080808
+      0808090808080807080808070808070707070707080707070707070707070607
+      0606070606070607060606060606060606060606050606050505050505050405
+      0405050505050405050405040405040405050405040404040404040404040404
+      0304040403040303030303030303030303030303020303020202020202020202
+      0202020202020202020202020201020102020201020102020102010201010101
+      0102010101010101010001010101010100010000000100000101010001000100
+      0000000000000000000100000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303333333737373939393B3B3B3D
+      3D3D3E3E3E3535352F2F2F2F2F2F2F2F2F2F2F2F2F2F2F333333383737373737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737373737373737373737373637373637373637363637363636353636363536
+      3536343534343534343434343434343433343434343434343334343434333433
+      3433333333333333333333333332333332333233333332333233323332323232
+      3232323133323232323132323132313132313131313132303031313130313030
+      3030303030303030303030302F302F302F302F302F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2E2F2F2F2F2E2F2F2E2E2E2E2E2F2F2E2E2E2E2E2E2E2E2E2E2E2E2D2E
+      2E2E2D2E2D2E2D2D2D2D2D2D2D2D2C2D2D2D2D2C2C2C2D2C2B2C2C2B2C2B2B2D
+      2C2C2D2C2C2C2C2C2C2C2B2C2B2C2B2B2B2C2D2C2C2C2C2C2C2C2C2C2C2C2C2C
+      2D2D2D2D2D2D2D2D2D2D2D2D2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F3130313030
+      3030303031313031313131313233333433333334343434343434353535353536
+      35363736363837373838373838383939393A3B3A3B3B3B3D3D3D3D3D3D3D3D3D
+      3F3E3E4040404141424242424342434444454546454847484848484949494A4A
+      4A4B4B4C4D4C4D4E4D4E4E4E4E4F4F50504F505252525252525455555858585F
+      5F5F606060616061626162636362656564656564656565606060616161626262
+      6463636463636464646664646665666766666766666767666868686969686969
+      68696969696969696A6A6B6B6B6B6A6B6A6A6A6A6A6A6A6A6A6A6A6A6A696A6A
+      69696A6969696969696969696969686868676867676768666666666666646564
+      646464636363636363626262606061605F605E5E5E5E5D5E5D5C5D5C5B5C5959
+      595959595757575656565454545253535252525050504F4F4F4D4D4D4C4C4C4A
+      4A4A4948494747464545454343434343434141414C4B4B525352545454565656
+      5858584F4E4F3635363433343232323031302F2F2F2E2E2E2C2C2C2B2C2B2A2A
+      2A2828282727272625262324242323232222232122212020201E1F1F1D1E1D1C
+      1C1D1C1C1C1A1A1A1A1A1A181818171717171716151516151515141414131414
+      1414141212131312121111111011100F1010100F10100F100E0F0F0F0E0E0D0D
+      0D0D0D0D0D0D0D0C0C0C0B0C0C0C0B0B0B0B0B0C0B0B0B0B0B0A0A0A0A0A0A0A
+      0A0A09090909090A0A0A09090909080909080809090809090908080808080808
+      0908090808080808080708070707080707070707070707070707070706070606
+      0606070606060606060606060606060605060505050506050505050505040505
+      0405050505040505050405050505050405040405040404040404040403040404
+      0404030403030303030303030303030303030303020203030203020203020202
+      0202020202020202020201020201010102020101020102020101010101010201
+      0101010101010101010100000101000100000000010101010100010000000000
+      0001000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000030303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303535353838383A3A3A3C3C3C3E3E
+      3E3F3F3F3030302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F36363638373737373737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737373737373637373737363737363637363636353735363636353434343434
+      3435343434343434343434343434343434343433343334333433343334333334
+      3334333333333433333333333332333333333233323233333333333332323332
+      3232313232323232313232313131313230313231303230313131303030303130
+      30303030303030303030302F302F2F302F2F302F302F2F302F2F2F2F2F2F2F2F
+      2F2E2F2F2E2E2F2E2E2F2E2E2E2E2E2E2E2F2E2E2E2E2E2E2E2E2E2E2E2E2D2E
+      2D2E2E2E2D2D2D2D2D2D2D2D2D2D2D2C2D2D2D2C2C2C2C2B2E2D2C2D2C2C2D2C
+      2C2D2C2C2D2C2B2C2C2B2D2C2D2D2C2D2C2D2C2C2C2D2C2C2C2D2D2D2D2D2D2D
+      2D2D2D2D2D2E2E2E2F2F2F2F2F2F2F30302F2F2F313130313031313131313131
+      3132323233333433333333333435343535353535353635363837383737373938
+      393938383A39393B3B3A3B3B3A3C3D3C3D3D3D3E3E3E3F3F3F41414141414143
+      43434344434546454646464848484848484949494A4B4A4C4C4C4D4D4D4E4E4E
+      504F505151515251525453545454545555555655565757585858585E5E5E6363
+      636565656564646766666968686A6A696A6A6967686866656567676767676768
+      68686868686969696A6A6A6B6B6A6C6B6B6C6B6B6C6B6C6D6C6C6E6D6E6D6D6E
+      6D6D6D6E6E6E6E6E6D6F6F6F6F6F6E6F6F6E6E6E6E6F6F6F6F6F6F6E6E6E6E6E
+      6E6E6E6E6E6E6E6D6D6D6C6D6D6C6C6C6C6B6B6B6B6B6A6A6A696A6A69686968
+      68686867686666666565656464646463636262636160615F5F5F5E5E5E5D5D5D
+      5C5B5C5959595959595757575656565454545352525151515050504E4E4E4D4D
+      4D4A4A4A49494A4747474647464545444847495353545556565757575959595B
+      5B5B3D3D3D363736363536333333313131302F302F2F2F2E2E2E2D2D2C2B2B2A
+      2929292727272627262525252323242323232121212121211E1F1F1E1E1D1E1D
+      1D1B1B1B1A1B1A1A1A1A19191918181816161616161615151514141414141414
+      141313121312131211111111101010101010101010100F0F0E0E0E0F0F0D0D0D
+      0D0D0D0D0D0D0C0C0C0C0C0C0B0B0B0C0B0B0B0B0B0B0B0B0A0A0A090A090A09
+      0A0A0A090A090A09090A09090909090809090809080909090808080808080808
+      0808080808080708070707070708070707070707070707070707070707070607
+      0707070606060606060606060606060605060506050505050505040505050505
+      0505050505050505050504050405040504040404040404040404040403040404
+      0403030303030303030303030303030302020203030203020203020202020202
+      0202020102020202020201010201010102010202010102010101010101020101
+      0101010101010101000100010101010100010101000000010100010000000001
+      0000010000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000003030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303535353838383A3A3A3C3C3C3E3E3E3D3D3D
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F303737373837373737373737373737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737373737373736373636373736373635373636353535353434343434343534
+      3434343434343434343434343434343434343434343333343434343433333433
+      3333343333333333333333333332333333333333323332333332323232323232
+      3231323232323231323231313131323030323131313030313030303030313030
+      303030303030302F303030302F30302F2F2F2F2F302F302F2F2F2F2F2F2F2F2F
+      2F2F2F2F2E2E2E2F2E2F2F2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2D2E2D2D2E2E
+      2E2D2D2E2D2E2D2D2D2D2D2D2D2D2D2D2C2D2E2D2D2D2C2D2D2C2D2D2C2D2C2C
+      2D2C2C2E2D2D2D2C2D2D2C2D2C2D2C2C2C2C2D2D2D2D2D2D2D2D2D2D2D2D2E2E
+      2E2F2F2F30303030303030303031313131303031313231313132323232333334
+      33343433343434343535353535353737373837383939393939393A39393B3A3B
+      3C3C3B3D3C3C3D3D3D3E3D3E3F3F3F4040404243424343434344444545444646
+      464847474848484A4A4A4B4B4B4D4D4D4D4D4D4F504F50515052525253525254
+      54545555565655565858585858595B5A5B5B5B5B5C5D5C5D5D5D656464686868
+      6A6A6A6A6A696C6C6C6D6D6C6F6F6E6F6F6E6C6C6C6A6A6A6C6C6C6D6D6D6D6D
+      6D6E6E6E6F6E6F6F6F6F70707071707071707071717172727272727273727272
+      7272727272737373737373737373747474747474747474737473727273727273
+      7272737171717171717171717070707070706F6F6F6E6E6E6E6D6E6D6C6D6C6C
+      6C6B6B6B6A6A6A696969686767676667656565646364636263616161605F605E
+      5E5E5D5C5C5B5B5B5959595959585657565555565353535252525151514E4E4F
+      4C4C4C4B4B4B4949494848484848485353525958595959595B5C5B5D5D5D4E4E
+      4E393939383838373637343434343333313131302F302E2E2E2E2E2D2C2B2B2A
+      2A2A2828282626272625262324242323232222222120212020201D1D1D1D1D1D
+      1C1C1C1A1A1A1A1A1A1919191717171717171616161515151414141414141414
+      13141314131213111211101110101010100F101010100F0E0E0F0F0E0E0E0D0D
+      0D0D0D0C0D0C0B0C0C0C0C0C0B0C0C0B0C0B0B0B0B0B0B0A0A0A0A0A0A09090A
+      090A0A0909090909090909090909090908090908080808090809080808080808
+      0808080807080708070707070807080807070707070707070707070706060606
+      0706070606060606060506050505060506050505050505050505050504050505
+      0505050505050505050505050405040504040404050404030404040404030303
+      0303030303030203030303030203020302030302020202020302020202020302
+      0202020201020202010202010201020102020101010101010101010102010101
+      0101010101010101010100010100010101010100010001010001000100010000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303232323535353737373A3A3A3C3C3C3E3E3E3333332F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F343434383737383737383737373737373737373737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737373737373637373637363636363635333435343335343434343434343434
+      3434343434343435343433343434343434343433343333333434343333343333
+      3333333433343333333332333333333333333233333333323332323233323232
+      3232323232323132323131313131313132313032303031303030303130313130
+      30303030302F2F3030302F302F2F2F302F2F302F302F302F2F2F2F2F2F2F2F2F
+      2F2F2F2F2E2F2E2F2F2F2E2E2E2E2F2E2E2E2E2E2E2D2E2E2D2E2D2E2E2E2E2E
+      2E2E2D2D2D2D2D2D2D2D2E2E2E2E2E2E2E2E2D2D2D2D2E2D2C2D2C2C2E2D2D2E
+      2D2D2E2D2D2D2D2D2D2D2C2E2D2D2D2D2D2D2D2D2D2D2D2E2E2E2F2F2F303030
+      3030303030303131313131313131323232323333323333333434343535353535
+      353635353636363737373838383939393A39393B3B3A3B3B3C3C3B3C3E3D3E3E
+      3E3D403F3F403F3F4242424242424343434444444646464848484948494A4949
+      4B4C4B4D4D4D4E4E4E4F4E4F5151505352525454545455545656565858585959
+      595A5A5A5B5B5B5D5D5D5D5D5E5F5E5F6161616262626362626969696D6D6D6F
+      6E6E6F6E6F7271707272717373727474737170716F6F6F717171727171737272
+      7373727474747574747575757676767676767777767777777777777878787878
+      7878787878787779787879787879787878787878787878787876777677767776
+      76767676767675767576757474757373737373737272727171717070706F6F6F
+      6E6E6E6D6D6E6C6C6C6A6A6B6A696A6868686767676565656464646262626161
+      615F605F5F5E5F5C5C5C5B5B5B5959595857585556555454555252524F50504F
+      4F4E4D4C4C4C4B4B4A4A4A5050505B5B5B5E5D5E5F5F5F6161606060603F3F3F
+      3A3A3A3939393738373536353333333131322F30302F2F2F2E2D2D2C2C2C2B2A
+      2A29292926272726252525242523232322222221202120201F1F1F1F1E1D1E1C
+      1D1D1C1B1B1A1A1A191919181718161716161616151515141414131414141414
+      1414141213121211121010111010100F101010100F0E0F0E0F0E0E0E0D0E0D0D
+      0D0D0D0D0C0C0C0C0B0B0B0C0B0B0B0C0B0B0B0B0B0B0A0A0A0A090A09090909
+      0A09090909090909090909090909090909080809090808080908080908080808
+      0808080807080808080807070807070707080707070707070706060606060606
+      0606060606060605050506050605050505050505050505050405050505050505
+      0505050505050505040405040404040404040404030404030304030303030304
+      0303030303030303030302030303020302020202020202030202020202020202
+      0202020102020202020202020101020201010102010201020101010101010101
+      0101010101000001010101010100010001010000010001010001000000000100
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303333333535353838383A3A3A3C3C3C3A3A3A2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F30303138373738373738373738373737373737373737373737373737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737363737363636363433343434343533333434343434343435343435343434
+      3434343534343434343434333434343434333434343433343334333433333333
+      3333333333333333333333333233333333333333323233323232333232323232
+      3232323232313232313231313131313131303231303131303030303031303030
+      30303030303030302F2F2F2F2F2F2F2F2F2F302F30302F2F2F2F2F2F2F2E2E2F
+      2E2F2F2E2F2E2E2E2F2F2E2E2E2F2E2E2E2E2E2E2E2E2E2E2D2E2D2E2E2D2D2E
+      2E2D2D2E2E2E2E2E2E2E2E2E2D2E2E2E2E2D2D2D2C2E2E2E2E2D2D2E2D2D2E2D
+      2C2D2D2D2E2E2E2E2D2E2D2D2D2E2E2E2E2E2E2F2F2F30303030303030303031
+      3131313131323232323132333332343433343534363536353535353636363736
+      39383838383939393A3B3A3A3B3B3B3D3D3D3E3E3E3F3E3E3F3F3F4140414241
+      414343434343434545444545454747474848484949494C4C4C4C4D4D4E4E4E4F
+      4F4F5050505253535353535454555756565958585959595B5B5B5C5C5B5E5E5F
+      5F5F5F6060606261626262636564656565666767676868686F6F6F7373737372
+      7376757476767578787778787778787874747576757577767677767678777779
+      79797978797A79797B7B7A7B7B7B7B7B7B7C7C7C7D7C7D7C7D7C7D7D7D7D7D7D
+      7D7D7D7D7D7D7D7D7D7D7D7C7D7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7B7B
+      7B7B7B7B7A7A7A79797979797978787877777776767675767674747473737372
+      7272717171706F706E6E6E6D6D6D6C6C6C696969686868676767666566636364
+      6262626161615F5F5F5E5E5E5B5B5B5A5A5A5859585555555454545251525051
+      504F4F4F4F4E4E5050505E5E5D6060606363636566656667664D4D4D3D3D3D3C
+      3C3C3939393839383636363434343233323131302F30302E2E2E2D2E2D2B2B2B
+      2A2A2A2828282726272525252323232323232121212021211F1F1E1D1E1E1C1D
+      1D1B1B1B1A1A1A19181817181816161617171715161514141413141414141314
+      131312131211111111111110101010100F100F100E0E0E0F0E0E0E0D0D0D0D0D
+      0D0D0D0C0C0C0C0C0C0B0B0B0B0B0B0B0B0B0B0B0B0A0A0A090A0A0A0A0A090A
+      0A090909090A0909090909090909090909090908080808090808080808080808
+      0807080707080708070808070707070707070707070707070607060606060606
+      0606060606060606060506060505060505050505050505050505050505050505
+      0504050404050505040405040404040404040404040404040403030303030403
+      0303030303030303030303020302030302030302030202020202020202020201
+      0202020101020201020101020102020101020101010201010101010101010100
+      0101010001010101010101000101000101000000000100000100000000010000
+      0001000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303031313134
+      34343636363838383B3B3B3D3D3D3232322F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      3535353837373837373837373837373737373737373737373737373737373737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3636353534343434343434343434353434343433343434353435343435353534
+      3435343434343434343434343433343434343434343434343433343433333333
+      3333333333333333333332333333323333333232323333333232323232323132
+      3232323231323231323131323031323131313031313130303031303031303030
+      303030302F30302F2F2F2F2F2F2F2F2F302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2E2F2F2F2F2E2F2F2E2E2E2E2E2E2E2E2E2E2E2E2D2E2D2E2E2D2E2E2D2E2E2F
+      2E2E2E2E2E2E2E2E2E2D2E2E2D2E2E2F2E2F2E2E2E2E2D2E2E2D2E2D2D2F2E2E
+      2F2D2E2E2D2E2E2E2E2F2F2E2F2F303030303030303030303131313131313232
+      323232323333333535353534353635363636363636363737373939393A3A3A39
+      3A3A3A3A3A3C3C3C3E3D3D3E3E3E3F3F3F404040424142434243444343454444
+      4645454847484848484A4A494B4B4B4C4C4C4E4E4E4F4E4F5051505252525353
+      535555555757575959595A5A595C5B5B5D5D5D5F5F5F60606060606164636465
+      646566656667676768686969696A6A6A6B6C6D6D6F6E6E757575787878787778
+      7B7A7A7B7B7A7D7D7C7D7D7C7D7D7D7A79797B7A7A7C7C7B7D7C7C7E7D7D7F7E
+      7E7E7D7E80807F81808180808180808080818182828282818182828283828282
+      8282828282828282828282828282828282828282828282818181818180807F80
+      7E7E7E7E7E7E7E7E7E7E7E7D7B7B7C7B7B7B7A7A7A7979787879797676767575
+      757474747372737171716F6F6F6E6E6E6C6C6C6B6B6B69696968686866666665
+      6464636463626262605F605E5E5D5B5B5B5A5B5B575757565656555555535353
+      5354535959596363636666666868686A6A6A6A6A6B6161614040403F3F3F3B3C
+      3B3B3A3B3939393737373636363333333132312F30302F2F2F2D2D2E2B2B2B2A
+      2A2A2727282627272525252323232323232222212020201F1E1F1E1D1E1E1D1D
+      1B1B1C1A1A1A1A1A191717181716171616161516151414141314141314141413
+      141212121212121010101010101010101010100F0F0E0E0E0E0D0D0D0D0D0D0D
+      0D0D0C0C0C0B0C0B0B0B0C0B0B0B0B0B0B0A0A0A09090A0A0909090A0A090A0A
+      090A090909090809090909090909080908090808080808080808090808080808
+      0808070807080808070707070707070707070706060606070706060706060606
+      0506060606050605060605060505050505050505050505050505050505050405
+      0504050404050405040404050404040304040404030304040403030403030303
+      0303030303030203020203030302030202020202020202020202020202020201
+      0101020202020102020102020101010201020201010102010201010101010101
+      0101010100000101000001000100010001000000000000000100000001000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303333333434343737
+      373939393C3C3C3A3A3A2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F31313138383738
+      3737383737383737383737383737373737373737373737373737373737373737
+      3737373737373737373737373737373737373737373737373737373535353434
+      3434343334343434343335343434343334343435343435343434343534343434
+      3434343434343434343434343433343333333434333433333433333433333433
+      3333333333333233323333333233333333333332333333323333323232323232
+      3132323132313131313131313032313132313131303130303030303030303030
+      30303030302F302F302F303030302F302F2F2F2F2F2F2F2F2F2E2F2F2F2E2E2F
+      2E2F2F2E2E2F2E2E2E2E2E2E2E2E2E2E2D2D2D2E2E2D2E2D2E2E2E2E2E2E2E2D
+      2D2D2E2D2D2D2D2D2D2C2E2C2D2D2D2C2D2C2C2C2C2D2D2D2D2D2D2D2D2D2C2D
+      2D2C2E2E2E2E2E2E2F2F30302F30303030313131313131323232323232343434
+      3535353535353636353637363636363839383A39393A3A3A3B3B3B3A3B3B3D3D
+      3D3E3D3E3E3E3E3F3F3F4141414242424444444444444645464746474848484A
+      49494B4A4B4D4D4C4D4E4D4F4E4F515251535353535353565556585757585858
+      5A5A5A5C5C5C5E5E5E5F5F5F6061606362626464646565656666676868686A6A
+      6A6B6A6B6D6D6D6D6D6D6F6F6F7171717372737675767C7C7B7C7D7C7E7E7E80
+      807F8180818282818383828181817F7F7F818080828181828181848383848383
+      8484848585858586858585858686868787878787868887878788888787878787
+      8787878787878787878787878787878787878786868685858685858584848484
+      84848382828281828180808080817F7F7F7E7E7E7D7C7D7B7B7B7B7B7B797879
+      7877787676767575757373737272717070706F6F6F6D6C6D6B6B6B6969696767
+      67666666636363616261605F605E5D5D5C5C5C5B5B5B5959595959595D5D5D66
+      66666A6A6A6C6C6C6D6D6D7070706F6F6F5E5D5E4444444242423F3F3F3E3E3E
+      3C3C3B3A3A3A38383837363633343433333331313030302F2D2D2D2C2C2C2A2A
+      2A292929272727262525232323232323212221212121201F1F1E1E1D1D1D1D1C
+      1B1B1A1A1A1A1A1A191819161617161616151516141414141413141314131413
+      131212111111101010101010100F0F0F100F0E0F0F0E0E0E0D0D0E0D0D0D0C0C
+      0C0C0B0C0C0C0C0B0B0B0B0B0B0B0C0B0A0A0A0A0A0A0A0A09090A0A0A090A09
+      0A09090909090909080909080908090808080808080908080808080808080808
+      0808070808070807070707080707070607070707060707070706060606060606
+      0506050606060605050505050505050505050505050505050505050504050504
+      0504040504040404040404040304040403040404040303040303030304030303
+      0302020303030303030203020302020203020202030203020203020202020202
+      0201020102020202020101010102010101010101010101010101010101010101
+      0101010001010100010100000001010100010000010100010001000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303131313434343535353838383A3A3A
+      3D3D3D3232322F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3635353838373837373837
+      3738373738373738373737373737373737373737373737373737373737373737
+      3737373737373737373737373737373737373737363636343434343434343434
+      3433333433343434343534343434353535353534353434343434343434353435
+      3434343434343434343434343434333333343434333333333334333433333333
+      3333333333333333323333323233323333333332333232323232333232323232
+      32323132323132313131313132303032303131303030303030313030302F3030
+      30302F302F2F302F3030302F2F302F302F2F2F302F2F2E2F2F2F2F2F2F2E2F2F
+      2F2E2F2E2E2E2E2E2F2F2E2E2D2D2D2D2C2E2D2E2D2D2D2D2E2D2D2D2E2D2E2E
+      2D2D2D2E2E2E2E2D2D2E2C2D2D2C2C2E2E2D2D2D2E2D2D2D2D2D2D2E2D2E2F2E
+      2F2F2F30302F2F302F2F303030302F3031303131313133333335353535353536
+      36363737373737373939383A3A3A3A3A3A3B3B3C3C3C3C3E3E3E3F3E3E3F3F40
+      4041414242424343434444444546464646474848484949494B4A4B4D4C4C4E4D
+      4D4F4F4E5151515252525353545555555757575858585B5B5B5B5B5B5D5D5D5F
+      5F5F6161616263636464646665666767676969696B6B6B6C6C6C6D6D6D707070
+      7171717272727373747575757677777978797B7B7B8281818383828584848686
+      868887878888878A8A898585858685858686868787878888888988888989898A
+      8A8A8B8A8A8A8A8A8B8B8B8C8C8C8C8C8C8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D
+      8D8D8C8D8D8D8C8C8D8C8C8D8C8C8C8B8B8B8B8B8B8A8A8A8989898989898888
+      888787878686868585858585848383848282828080808080807F7E7F7D7D7D7B
+      7B7B7A797A787878767676747474737373717171706F706E6D6E6B6C6B6A6A6A
+      6868686565656464646363626060615E5F5E5E5E5E6262626B6B6B6D6D6D7070
+      707272727474747575756363634848484646464444444343434141413F3F3F3C
+      3C3C3A3B3A3939393737373435353332323132322F2F2F2E2E2E2D2D2D2B2B2B
+      2A2A29272728272726242424232323212222212020201F1F1E1D1E1D1D1D1D1C
+      1C1A1A1A1A191918191817171616171615151514141414141314141413131412
+      1213111111101010101010100F0F1010100E0F0E0E0E0E0E0D0D0D0D0D0C0C0C
+      0C0B0C0C0B0B0B0B0C0B0B0B0C0B0B0A090A0A0A0A09090A0909090909090A09
+      0A09090908090909090809090809090808080808080908080808080808080808
+      0708070707070707070707070707060706070706060606060606060606060606
+      0606060605060605050505050505050505050505050505050505050504050505
+      0505040404050404040404040403040304040404030404030403040403030302
+      0303030303020203030203020302020202020202020202020202020202010202
+      0202010102010101020202010201020101020101010101010101010101010100
+      0101010001010100010100010001010001010100000000000001000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303232323434343636363939393B3B3B3A3A3A2E
+      2E2E2F2F2F2F2F2F2F2F2F2F2F2F323232383837383837383737383737383737
+      3837373837373737373737373737373737373737373737373737373737373737
+      3737373737373737373737373737373634343434343434343434343434343434
+      3434343334343535353435353535343534343435343534343434353534343434
+      3434343434333434343434333434343334333434333333343333343333333433
+      3333333333333333333233333333333333323333323233333232323132323132
+      3231323231323130323130313031323030313030303030303030303030303030
+      303030302F302F2F2F2F2F2F2F2F2F302F2F2F2F2F2E2F2F2F2F2F2F2F2E2E2E
+      2D2E2D2E2D2D2D2D2E2D2E2E2E2E2D2E2D2D2E2D2D2E2E2E2D2D2D2E2F2E2E2E
+      2E2E2E2E2E2E2D2D2F2E2D2F2D2D2E2E2E2D2D2D2E2E2E2F2F2F303030302F30
+      3030303030303031303231313231323332333333333333333434343636363737
+      373939393A3A3A3B3A3A3B3C3B3C3C3C3E3E3E3F3F3F403F3F40414143434343
+      44434444444646464848484949484A4A4A4C4D4C4D4D4D4F4E4F515050525252
+      5353535555555757565858585A5A5A5C5C5C5D5D5D605F5F6262616363636464
+      646666666768676969696B6C6B6E6D6E6F6F6F70707072727274737475757677
+      777778787879797A7B7B7B7C7D7D7E7F7E8484848787878989898A8A898B8B8A
+      8D8C8B8E8E8E8D8D8D8B8B8B8B8B8B8C8C8C8D8D8D8E8E8E8E8E8E8F8F8F9090
+      9090909091919191919191919192929292929292929292929292929291919291
+      92929292929191919191919090909090909090908F8F8F8E8F8F8D8D8D8C8C8C
+      8C8C8C8B8A8B898989888888888888868686858485838383828182807F807E7E
+      7E7D7D7D7C7C7C79797A7878787676767474747272727171716D6D6D6C6C6C6B
+      6B6B686868676667656565656565676768707070717171747474767676797979
+      7A7A7A6969694E4E4E4D4D4C4A4B4B4747484545464444444242423F3F403D3E
+      3D3C3C3B3A3A3A3838383635363434333231312F2F302F2F2F2D2D2D2B2B2B29
+      292A2828282626262425242323242323222121212020201E1E1F1D1D1D1C1C1C
+      1A191A1A1A1A1818191717181616161515151414141414141313141314141212
+      12111112101011101010101010100F0F0F0E0E0E0F0E0D0D0D0D0D0D0C0B0C0C
+      0B0B0B0B0C0B0B0B0B0C0B0B0B0B0A0A0A090A090A0A0A0909090A090A09090A
+      0909090909090909090909080909080908090808080808080808080807070807
+      0708070707070707070706070707070606060706060706060606060606060606
+      0506050506050505050505050505050505050505050505050505050404050404
+      0404040404040404040404040403040404040303040303030303030303030303
+      0303030203020303030202030302020303030302020202020202020202020202
+      0202020102020102010101020202010101020101020102010101000101010101
+      0100000101000001010101010000010000000000010101000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000030303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303131313434343535353838383A3A3A3C3C3C3232322F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F37373638383738383738383738373738373738373738
+      3737383737373737373737373737373737373737373737373737373737373737
+      3737373737373737373535353434343434343434343434343434343434343535
+      3435353535343435343535353435353534343435343435343434343434343434
+      3434343434343434343334343434343333333334333434333333333333333333
+      3333333333333333333233333233323233323233323232323332313232323232
+      31323231323131323131313030323030313030303030303030303030302F3030
+      302F2F3030302F303030302F2F2F2F2F2F2F2F2F2F2E2E2E2E2E2E2D2E2E2D2E
+      2D2D2D2D2D2E2E2E2E2E2E2E2E2E2E2E2E2E2D2E2E2E2F2F2E2E2E2E2E2E2E2E
+      2E2E2E2E2E2E2E2E2E2D2E2D2E2F2F2E2F2F2F30303030303030302F30303131
+      3030313131323232333333343335343334343434353535363636373737383838
+      3A3A3A3B3A3A3C3C3D3F3F3F3F3F3F4040404242434243424444444645454747
+      484848484949494C4C4C4D4D4D4E4D4E51515052515253525355535457575758
+      58585A5A595B5B5B5D5D5D5F5F5F616161626362656464676666686868696969
+      6B6C6C6D6D6E6F6F6F7170707473737575757676767877787B7A7B7C7C7C7D7D
+      7D7F7F7F8080818181818484848585858B8B8B8E8E8E8F8F8F90909091909093
+      9292949493929292919190929292939393939393949494949494959595959595
+      9696969797979797979797979797979797979797979797979797979797979797
+      9797979797979797979796969695959593949493949493939392929291919190
+      91918F8F8F8E8E8E8D8D8D8B8B8B8A8A8A888888878788858585848484828282
+      8080807F7F7F7C7C7D7C7C7B7A797A7777777575757373737071706E6E6F6D6D
+      6D6B6B6B6B6B6B6D6D6D7575757777777878787B7B7B7D7D7D7E7E7E6E6E6E55
+      555552525250504F4D4D4D4B4C4C494A494747474444444343434140413F3F3F
+      3C3C3C3A3A3A3939393636363535353333323030302F2F2F2D2D2D2C2C2C292A
+      2A2727272626262424252323232323222121211F1F1F1E1F1E1D1E1D1C1C1C1A
+      1A1A19191A181918171818161616151515141414141314141414131314131212
+      111112111010100F1010100F0F0E0F0E0F0E0D0E0D0D0D0D0D0D0D0C0C0C0C0B
+      0B0B0B0C0B0C0B0B0B0C0B0A0A0A0A0A0A090A090A090A09090A0A0A090A0A09
+      0909090909080909090909080808090908080809080808080808080808070708
+      0707070807070707070707060606070606060606060606060606060606060605
+      0605050505050505050505050505050505050505050505050504050505040404
+      0404040404040404040404040304040404030303030303030303030303020303
+      0302030202020203030303030202020202020202020202020202020102010202
+      0201010202020101010101010201010101010102010101010201010001010101
+      0101000000000100000000010000010000010000010000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000003030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303232323434343737373939393B3B3B3B3B3B2E2E2E2F2F2F2F2F2F2F2F2F
+      2F2F2F3231323838383838373838373838373837373837373837373837373837
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737363636343434343434343434343434343434343434343434353535363535
+      3635353535343535353535353434353434343534343435353434343434343434
+      3434343434343434333334343334333434343333343333333333343333333333
+      3333333333333333323333323333333233333332323232323231323231323231
+      323231323131313131323131313131313030303130303030303030302F30302F
+      303030302F302F2F302F2F2F2E2F2E2E2F2E2E2F2E2E2E2E2E2D2E2E2E2D2E2E
+      2F2E2E2E2F2E2E2E2E2E2E2D2E2E2E2E2F2F2F2F2F2E2E2F2E2E2E2E2E2F2F2F
+      2F2F2F2F2E2E302E2F30302F3030303130313030303131313130313132313132
+      323333333435343435343534363636363636363737373838383939393A3A3A3C
+      3C3C3D3D3D3F3E3E4141414242434343434545454646464747484948484B4A4B
+      4C4C4C4E4E4E4F4F4F5151515253535554545755565757575A59595C5B5B5D5D
+      5D5F5E5E6060606363636464646666666868686A6A696C6D6C6E6E6E6F6F6F72
+      72717474747676767877787979797B7B7B7D7D7D7E7E7F808081828282838384
+      8585858686878888888A8A8A8D8D8C9393939494949595959696959897989999
+      989A9A999797979797979898989898989A9A9A9B9B9B9B9B9B9B9B9B9C9C9C9D
+      9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9E9D9D9E9D9D9D9E9D9D9D9D9D9D9C9C9C
+      9C9C9C9C9C9C9C9C9C9B9B9B9A9A9A9999999999999898989696969696969494
+      949393939292939090908F8F8F8E8D8E8D8C8D8B8A8B8A898A87878786868684
+      84848282828080807E7E7E7C7C7C7A7A79777778767676737474727272727272
+      7474757B7B7B7D7D7D7D7D7D8080808282828282827474745959595858585656
+      565353535150514E4E4E4D4D4D4A4B4A4747474545454444444241413F3F3F3C
+      3C3D3C3B3B3939393736373434353232323030302F2F2F2D2D2D2C2B2C292A29
+      282828262727252525232323232323212121201F201E1F1E1D1D1E1C1C1C1A1A
+      1A191A1918181916171616161615151514141414131414141412121213131211
+      11111010101010100F0F100E0E0E0F0F0F0D0E0D0D0D0D0D0D0D0C0C0C0B0C0C
+      0B0B0B0C0C0B0B0C0B0A0A0A0A0A0A090A0A0A0A0A0A0A090A09090909090909
+      0909090909090809080909080808090808080808080808080807080807080707
+      0807070707070707070606070706060606060606060606050506060605050506
+      0505050505050505050505050505050505050505040405050505040404040405
+      0404040404040404040404040304040303030303030303030303030303030302
+      0202020302030202020203030202020203020302020202020202020202010201
+      0102020202020202010201010201010101010101010101010101010101010101
+      0100000100000100010101000000010000010000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303131313434
+      343636363838383A3A3A3C3C3C3434342E2E2E2F2F2F2F2F2F2F2F2F2F2F2F36
+      3535383838383838383837383837383737383737383737383737383737373737
+      3737373737373737373737373737373737373737373737373737373737373434
+      3434343434343434343434343434343434343435353536353536353536353535
+      3535353534353534353534353434343434343534353434343434343434343434
+      3434343434343433333334343434343333343333333334343333333333333333
+      3333333333333333333233333232333332333232323232323132323132323132
+      32313231303231313231303131303130303131303030303030303030302F302F
+      302F302F2F302F2F2F2F2E2E2F2E2E2F2E2E2F2E2E2E2D2E2F2F2E2F2E2F2E2E
+      2E2F2F2E2E2F2E2E2E2E2F2E2F2F2F2F2F2E2F2F2F2F30303030303030303031
+      3131323232323232333232323232333233323232323231323232343334353534
+      3435343635353736363736373938393838393939393A3A3A3C3C3C3D3D3D3E3E
+      3E3F3F3F4140404343434545454747474848484A4A4A4C4B4C4D4D4D4F4F4F51
+      50505252525352535656555757575A5A5A5B5B5B5C5C5C5F5E5E615F60626262
+      6463636565656868686A6A6A6C6C6C6E6E6E7070707271717474747676767778
+      787979797C7C7C7D7E7D8080808181818383838485848787878989898A8A8A8C
+      8B8C8D8D8D8E8E8F9090919494959999999A9A9A9B9A9B9D9D9D9E9C9DA09F9E
+      9E9E9E9D9D9D9E9D9E9E9E9E9F9F9FA0A0A0A1A1A1A1A1A1A2A2A2A2A2A2A2A2
+      A2A3A3A3A3A3A3A3A3A3A3A4A4A4A3A3A3A4A3A3A3A3A2A2A2A2A2A2A2A2A2A1
+      A1A1A1A1A1A1A1A1A0A0A09F9F9F9E9E9E9D9E9E9C9C9D9B9B9B9A9A9A999899
+      9898979696969595959393939292929090908F8F8F8D8D8D8B8B8B8989898787
+      878685858383838181817E7E7E7C7C7C7B7B7B7979797979787A7B7C81818183
+      83828484848585858687868787877A797A6060605F5F5F5B5C5C585858575757
+      5555555353534F4F504D4D4D4B4B4B4949494646464444444242424040403D3D
+      3E3B3B3C3A3A3A3838383636363233323131312F2F2F2E2E2E2B2C2C2A292A29
+      28292626272525252323232323232121212120211E1E1E1D1D1E1C1C1C1A1A1A
+      1A1A191819181616161616161615151414141314141413131312121213121111
+      1110101010100F10100F0F0E0E0E0E0E0D0D0D0D0D0D0C0C0C0C0B0C0C0C0C0C
+      0B0C0B0B0B0C0B0C0A0A0A0A0A0A0A090A0A0A0A0A09090A0A0A090A09090909
+      0909090909090809090809080808080908080808080808070807070707070707
+      0807070707070706070706060706060606060606060606060606050605060505
+      0505050505050505050505050505050505050505050405050404040404040404
+      0404040404040404040304040303030303030304030303030303030303020303
+      0203020303030202030202020202030202020202020202020202020201020201
+      0202020102020201010101010201010201010201010101010101010101010101
+      0101010101010001010000010101010100010000000001000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030333333363636373737
+      3939393B3B3B3C3C3C2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F3131313838383838
+      3838383838383738383738383738373738373738373738373738373737373737
+      3737373737373737373737373737373737373737373737353535343434343434
+      3434343434343434343434343535343635353635353635353635353635353635
+      3535353435353434353534353434353535353534343434343534343434343434
+      3434333434333434343334343334333333333433333333333333333333333333
+      3333333332323332333332333232333233323332323232313232313232313232
+      313231313231313230303131303130303131303030302F30303030302F30302F
+      302F2F2F2F302F2F2F2E2E2F2E2E2F2E2E2F2E2E2F2F2E2E2E2E2E2F2F2F2F30
+      2F302F3131303131313130303130303231313131323131313232323232323333
+      3334333434343434343434343535353535353537373737373736353637373736
+      37373838383A3A3939383A3A3A3A3A3A3A3C3D3D3D3D3D3E3E3E3F3F3F424241
+      4343424344434646454848484A4A4A4C4C4C4D4D4D4F4F4F5251515253525555
+      545656565858585B5B5B5C5C5C5E5F5E6060606161616363636666666868686A
+      6A6A6B6B6B6E6E6E6F6F6F7272727474747777777878787A7A7A7C7C7C7E7E7E
+      8080808383838484848686868787878A8A8A8D8D8D8D8D8D8F8F8F9191919392
+      939494959596969897989C9C9CA0A0A0A1A1A1A2A2A2A3A2A2A5A4A4A6A5A6A4
+      A3A3A3A3A3A4A4A4A5A5A5A5A5A5A6A6A6A7A7A7A7A7A7A7A7A7A8A8A8A9A9A9
+      A9A9A9A9A9A9AAAAAAAAAAAAA9AAA9A9AAA9A8A9A8A8A8A8A8A8A8A8A8A8A6A7
+      A6A6A6A7A5A5A5A5A5A5A4A3A4A4A4A3A3A2A2A1A1A1A0A0A09F9F9F9E9E9E9C
+      9C9C9B9B9B9999999898989695969494949392939090908F8F8F8D8D8D8A8A8A
+      8788888787868484848282828080808080808181828787878888888A8A8A8C8C
+      8C8C8C8C8C8D8D7F7F7F6767676464646262625F605F5E5E5E5B5C5B58585856
+      56565353535051514F4F4F4C4C4C4A4A4A4747474444444243424040403E3F3E
+      3B3B3B3A3A3A3838383635363334343131312F2F2F2E2E2E2D2D2D2A292A2928
+      292626262525262323232323232120202120201E1E1E1D1D1D1C1C1C1A1A1A1A
+      1A19181818161616161616151515141414141414141414131212111211121111
+      10101010101010100F0E0E0E0E0F0E0D0D0D0D0D0D0C0C0C0B0C0C0C0C0B0C0B
+      0C0C0C0B0A0A0A0A0A0A090A0A0A0A0A0A0A0A090A0A090A0909090909090909
+      0908090809080809080809090809080808080808080808080808070808070707
+      0707070707060607070607070606060605060606060606060606060506060505
+      0505050505050505050505050505050505050505040505040404040404040404
+      0404040404030304040303030403030403030303030303030303030203020302
+      0303020202020202030302030202020202020202020202020201020202020101
+      0201020102010102020201020101010201010101010100010101010101000101
+      0101010101010000010001000101000000000001000000000100000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303131313232323333333434343434343636363737373939393B3B3B3D
+      3D3D3635362E2E2E2F2F2F2F2F2F2F2F2F2F2F2F353535383838383838383838
+      3838383838373838373837373837373837373837373837373737373737373737
+      3737373737373737373737373737373737373634343434343434343434343434
+      3434343434343434363535363535363535363535363535363535363535353535
+      3535353535353434353435343434343434343534343434343434353434343434
+      3433343334343433343434343434333333333333333333333433333333333333
+      3233333233333333333332323332323332333232323231323231323231323231
+      32313032313131313131303031303030303030303030303030302F2F2F302F2F
+      302F2F2F302F2F2F2F2E2F2E2E30303030302F30313130313130313132313131
+      3131313131313131323232323232323232313131323232333433343434343434
+      3434343535353536363635363636363838383838383938393A3A3A3B3B3B3C3B
+      3C3B3A3B3B3A3B3C3A3C3D3C3D3D3D3D3E3E3E40404042434243434344444447
+      47474847474848494B4C4C4D4E4D505050525252535454555656575757595A59
+      5B5B5B5D5D5D6060606161616363636564656767676A69696B6B6B6D6D6D7070
+      707272727574757676767878787A7A7A7C7D7D7E7E7E80808083838385858587
+      87878988888B8B8B8D8D8D8F8F8F9191919292929494949696979898989A999A
+      9B9B9B9D9D9D9F9F9FA5A5A5A6A6A6A7A7A7A8A8A9AAA9A9ACABABABABACA9A9
+      A9ABAAAAAAAAAAABABABACACACADADADADAEADADADADAEAEAEAFAFAFAFAFAFAF
+      AFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAEAEAEAEADACACADACAC
+      ACACACABABABAAAAAAA9A9A9A9A9A9A7A7A7A6A6A6A5A5A5A3A3A3A2A2A2A1A0
+      A19E9E9E9E9D9E9C9B9C9A999A9897989696969494949292928F8F8F8D8D8D8B
+      8B8B8A8A8A8787878787878888888E8E8E8F8F8F909090919191919191929292
+      8585856E6E6F6B6C6C6A6A6A6767676463646161615E5F5E5C5D5D5959595757
+      57555555525152504F4F4D4D4D4A4A4A4848484646464443444242413F3E3E3C
+      3C3C3A3A3A393839363535333333323232302F2F2E2E2E2D2C2D2B2B2B292829
+      2726262525252323232323232120212120201E1E1E1D1D1D1C1C1C1A1A191A19
+      1A18171816161616161615151514141414131414141412131212111111101010
+      10101010101010100F0F0E0D0E0D0D0D0E0D0D0D0C0B0B0B0C0C0C0C0C0C0C0B
+      0B0C0B0A0A0A0A0A0A0A0A0A0A0A0A090A090A090A090909090A090909090909
+      0909090909080908090908080808080808080808080807080707080707070706
+      0707060607060606060607060606060606060606060606060506060605050505
+      0505050505050505050505050504050505050404040405040404040404040404
+      0404040404040404040403040304030303030303030303030303020203030302
+      0302020303020202020202020202020202020202020202020202020201010101
+      0101020101020101020102010101010102010101010101010100000100010100
+      0101010001010101000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030323232333333343434353535363636373737
+      3737373737373737373737373838383838383A3A3A3B3B3B3D3D3D3E3E3E3030
+      302F2F2F2F2F2F2F2F2F2F2F2F30303038383838383838383838383838383838
+      3837383837383737383737383737383737383737383737373737373737373737
+      3737373737373737373737373535343434343434343434343434343434343434
+      3435353536363536353536353536353536353536353536353536353536353535
+      3535353534343434343434343534343434353434343434343434343434333434
+      3333343434333434343333333433333333333333343433333334333333333333
+      3333333333323233323232323332323233323232323132323132323132313131
+      31313131313130313031313131313030303030303030302F3030302F302F2F30
+      2F2F2F30302F3131323131313131313131313031313130313132313132323132
+      3131313132323232323232323233333234333334353434343434343434353536
+      36363535353737363938393838383939393A3A3A3B3B3B3C3C3B3C3C3C3E3E3D
+      3F3F3E404040404040403F404041404342424343434445444747474848484949
+      494B4B4C4D4D4D4E4E4F5151515454545757575858575B5B5A5C5C5C5E5E5E60
+      60606262626465656767676969696B6A6B6D6C6D706F6F727172737373767675
+      7878787A7B7A7C7C7C7E7E7E8181818383838585858888888A8A8A8C8C8C8E8D
+      8E908F8F9292929594949695969898989A9A9A9B9B9C9D9D9E9F9E9FA1A0A1A3
+      A2A3A3A3A4A8A7A8ABABABACACACAFAFAFB0B0B0B1B1B1B2B1B1ACACACA1A1A1
+      8B8B8B7474746363635353534242423434342929292020201414141414141313
+      131313131313131313131313131111111D1D1D2626263131313E3E3E4F4F4F60
+      60607171718888889E9E9EA8A8A8ABABABACABABA9A9A9A9A9A9A6A6A6A5A5A5
+      A3A3A3A1A1A1A0A0A09D9D9D9B9B9B9999999797979695969292929191918F8F
+      8F8E8E8E8F8F8F9494949595959696969797979998989797978B8B8B75747472
+      72727070706D6E6E6B6A6A6868686666666262636060605D5D5D5C5B5B585858
+      5655565253534F4F4F4E4E4E4B4B4B4949494646464444444141423F3F3F3D3C
+      3C3A3A3A3938393635353434353232322F2F2F2F2F2F2C2D2D2A2A2A29292827
+      26262625252323232323232120211F1F1F1E1E1E1E1D1D1C1C1C1A1A1A191A1A
+      1718181717161617161515151414141414141413141312121111111011101010
+      101010100E0E0E0E0F0F0D0D0D0E0D0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0B0B
+      0B0C0A0A0A0A0A0A090A0A0A0A090A0A09090909090909090909090909090809
+      0809090808090808080808080808080808080807070707070707080707070707
+      0707070706070706060606060606060606050506060606050505050505050505
+      0505050505050505050505050405050504040405050505040404040404040404
+      0403040404040404040403030303030303030303030303030302030303030303
+      0303030203020202020302030202020202020202020202020202010201010201
+      0102020201020101020101010101010101010101010101010101010101010101
+      0101010101000000000000000100010000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303232323333333434
+      3435353536363637373738383838383838383838383839393939393939393939
+      39393939393939393A3A3A3A3A3A3C3C3C3D3D3D3E3E3E3939392E2E2E2F2F2F
+      2F2F2F2F2F2F2F2F2F3434343838383838383838383838383838383838373838
+      3738383738373738373738373738373738373737373737373737373737373737
+      3737373737363636343434343434343434343434343434343434353434363636
+      3636353636353635353635353635353635353635353635353635353635343534
+      3535343535343535353535343535343434343435343434343534343433343434
+      3433343434343334333433343333333333333333333333333333333333333332
+      3333333232323332333333323232323232323232313232313131313131313031
+      31303031313031313131303031313030303030302F3030303031303031313130
+      3030323132313131313131313131313131323132313232323131323131323232
+      3232323232323333333434343434353534353534343535353636363636363636
+      373837383938383939393A3A3A3B3B3B3B3C3C3C3C3C3E3E3E3F3F3E41414041
+      41404443434544444544454544454444444747474848484A4A4A4C4C4C4D4E4D
+      504F4F5151515353545555555858585B5B5B5C5D5C60605F6161626464636666
+      666868686A6A6A6B6B6B6E6E6E7170717372737675757877777A7A797C7C7C7E
+      7E7E8181818383838686868888878A8A8A8C8D8C8F8F8F909090939393949594
+      9797979999999B9B9B9E9E9E9F9F9FA1A1A1A3A3A3A5A5A5A7A6A7A8A8A8AAAA
+      AAABABABB1B0B1B1B1B1A4A4A48686866868684B4B4B2B2B2B1616160F0F0F0D
+      0D0D0D0D0D0C0C0C0C0C0C0C0C0C0C0C0C0B0B0B0A0A0A0B0B0B0B0B0B0A0A0A
+      0A0A0A0909090909090909090707070808080707070707070707070606060505
+      050707070E0E0E2323234242426160617F7F7F9E9E9EABABABABABABA9A9A9A7
+      A7A7A6A6A6A3A3A3A1A1A19F9F9F9D9C9C9B9B9B999999979697969696979697
+      9B9B9B9C9C9C9C9C9C9D9D9D9E9E9E9D9E9D9191927D7E7D7A7A7A7878787574
+      74727272706F706C6C6C6A6A6A6767676463646161615F5F5F5B5C5B59595957
+      57575454545151514F4F4F4C4C4C4A4A4A474747444444434242403F3F3D3D3D
+      3B3B3B3939393736373534353232322F302F2F2F2F2C2D2D2A2B2B292A2A2626
+      272525252323232323232020211F1F1F1F1E1E1D1D1E1B1B1B191A1A18191917
+      1718171617161616151515141414141414141314121312111211101010101010
+      100F100F0E0F0E0E0E0D0D0D0D0E0D0C0C0C0C0C0C0B0C0C0B0C0B0C0C0C0B0A
+      0B0A0A0A0A0A0A0A0A0A0A090A0A0A0A0A090909090909090A09090909090909
+      0808080808080808080808080808080808080807070707070707070607070706
+      0707060606060606060606060606050506050606060506050506050506060505
+      0505050505050505050504050504040504050504040404040404040403040404
+      0404040404040304030403030303030303030303030303030203030203030202
+      0302030203020202030302020302020202020202020201020201020201010101
+      0101010101010101020101020101010101010101010100010101010101010001
+      0100010000000000000100000000000100000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303031
+      3131323232343434343434353535373737383838383838383838383838383838
+      3939393939393939393939393A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3B3B3B3B3B
+      3B3B3B3B3C3C3C3C3C3C3D3D3D3E3E3E3F3F3F3333332F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F30383737383838383838383838383838383838383838383837383837
+      3837373837373837373837373837373737373737373737373737373737373737
+      3734343434343434343434343434343434343434343436353536363636363636
+      3635363635363535363535363535363535363535353435363534363534353535
+      3534353435353434343535343534353534343434343434343434343334343333
+      3433343334343334333334343333333334333333333333333333333333333333
+      3332333232323233333333323332333231323131323131313131313131313131
+      3131303031303030303030313030303131313131313130313031313132313131
+      3232323132313231313232323232323232323232323233333333323232333233
+      3333333333343434353534343534353435353635363636373737383838393938
+      3939393A3A3A3A3B3A3C3C3D3C3C3C3E3E3E3F3F3F4141404141404343424544
+      4446454548474749494949494A4A4A4A4A4A4A4C4C4C4E4E4E50505052525254
+      53545657565757575A5A5A5D5C5D606060626363646464666667696A696B6B6B
+      6D6E6E7070707273737575757777777A797A7C7B7C7F7E7E8180818383838685
+      858888888A8A8A8D8D8C8F8F8F919190939393969696989898999A9A9C9C9C9E
+      9E9FA1A1A1A3A3A3A4A4A4A6A6A6A9A8A9AAAAAAACACACADADADA7A7A7858585
+      5F5F5F3939391919190E0E0E0F0F0F0F0F0F0E0E0E0E0E0E0D0D0D0E0E0E0E0E
+      0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0C0C0C0C0C0C0B0B0B0B0B0B0B0B0B0A
+      0A0A0909090A0A0A090909090909080808070707070707070707060606050505
+      0505050505050505050404040303030D0D0D2E2E2E575757818080A4A4A4AAAA
+      AAA9A8A8A7A7A7A5A5A5A2A2A2A0A0A09F9F9F9E9E9E9E9E9EA3A3A3A2A2A2A3
+      A3A3A3A3A3A4A4A4A3A3A39899998484848282827F7F7F7C7C7C7A7A7A777676
+      7474747171716E6E6E6B6B6B6969686566656362626060605D5D5D5A5A5A5758
+      585554555252534F4F4F4D4D4D4A4A4A4747474545454243424140403D3D3E3B
+      3B3B3838393737363535343233323130302F2F2F2D2D2D2A2B2A282928262626
+      2525262323232323232121211F1F1F1D1D1D1D1D1D1B1B1B1A1A191918181717
+      1817171715151614141414141414131412131311121112121210101010101010
+      10100E0F0E0F0E0F0D0D0D0D0E0D0C0C0C0C0C0C0B0C0C0B0C0C0B0B0B0A0B0A
+      0A0A0A0A0A0A0A0A0A090A0A0A0909090A090A09090A09090909090909090809
+      0908080808080808080808080808080708070707080707070807070707070606
+      0707060606060606060606060605050606050606060505050505050505050505
+      0505050505050505050504050505040504040404050404040404040404030404
+      0304040303040303040304030303030303030303030303030303030303020203
+      0302030302020203020302020202020202020201020202020102010102010201
+      0201010101020101010101010101020101010101010101010101010100010100
+      0000010000010000010000000000010000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000030303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303232323333333434343535353636363737373838383838
+      383838383838383838383939393939393939393939393A3A3A3A3A3A3A3A3A3A
+      3A3A3B3B3B3B3B3B3B3B3B3B3B3B3C3C3C3C3C3C3C3C3C3C3C3C3D3D3D3D3D3D
+      3D3D3D3E3E3E3E3E3E3B3B3B3B3B3B2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3232
+      3238383838383838383838383838383838383838383838383738383738383738
+      3737383737383737383737383737373737373737373737373737363636343434
+      3434343434343434343434343434343535343636363636363636363636363636
+      3536363536353536353536353536353536353536353536343436343435353435
+      3434343434343535353534343435343435343434343434343434343434343434
+      3333343434343433343433333334343333333433333333333333333333333333
+      3232323333323332333232323132313132313132313131313131313131313130
+      3131303130313131313132313232313131313130313131313132323232323131
+      3131313132313232323232323132323231323332323233333232333333333434
+      343435353535353535353536363636363837383938383939393939393A3B3B3B
+      3B3A3C3D3D3C3C3D3E3F3E3F3F3F414141414141434342454544464545484747
+      4A49494B4A4A4C4C4C4E4D4E4E4E4E504F4F5151515252525554555757575858
+      595A5A5A5C5C5C5F5F606161616565656768676A6A6A6C6D6C6F6F6F71717174
+      74747676767878797B7B7B7D7C7D807F808382828585858787878A8A898C8C8C
+      8E8E8E9191919393939696969998999B9B9B9C9C9C9F9F9FA1A1A1A4A3A3A6A6
+      A6A8A8A8AAAAAAACACACAEAEAEA5A5A57C7C7C4E4E4E22222210101010101010
+      10101010101010100F0F0F1010101010100F0F0F1010100F0F0F0F0F0F0F0F0F
+      0F0F0F0E0E0E0E0E0E0E0E0E0E0E0E0D0D0D0C0C0C0C0C0C0C0C0C0C0C0C0A0A
+      0A0A0A0A0A0A0A0A0A0A09090909090908080808080807070707070706060606
+      0606060606050505050505030303030303030303030303161616444445757575
+      A1A1A1AAAAAAA9A9A9A7A7A7A5A5A5A6A6A6AAAAAAA9A9A9A9A9A9AAAAA9AAAA
+      AAAAAAAA9F9F9F8C8C8C8989898787878484848181817E7E7E7B7B7B78797975
+      75757272726F706F6C6C6C6A69696766666464636161615E5E5E5B5B5B585858
+      5656565253525050504D4D4D494A4A4847484545454444444141413E3E3E3B3B
+      3B3939393737373434343232333030302E2E2F2C2D2D2A2B2A29292926262725
+      25252323232323232020212020201D1D1D1D1D1D1B1B1B1A1A19191918171717
+      1616161515151414141414141414131212121211121111101010101010100E0F
+      0E0F0E0E0D0E0E0E0D0D0C0C0C0C0C0C0C0C0C0C0C0C0C0B0B0A0A0A0B0A0A0A
+      0A0A0A0A0A0A0A0A0A0A090A090A090909090909090909090909080809080808
+      0808080808080808080707070707080707070707070707060707070706070706
+      0606070606060606060605060605060606050605060505050605050605050505
+      0505050505050405050504050505050404040404040404040404030403030303
+      0304030304030404040304040303030303030303030303020303020203030302
+      0303020302020302020202020202020202010202010201020101020202010201
+      0101010101020101010201010102000101010101000101010101010101000000
+      0101000000010000000000010000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000003030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303032323234343434
+      34343636363737373737373838383838383939393939393939393939393A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3B3B3B3B3B3B3B3B3B3C3C3C3C3C3C3C3C3C3C3C
+      3C3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3A3A3A37373737363732323230
+      30302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F363636383838
+      3838383838383838383838383838383838383838373838373838373837373837
+      3738373738373738373737373737373737373737373734343434343334343434
+      3434343434343434343434363636363636363636363636363636363636363635
+      3636353635353635353635353635353635353635353635353635353535343535
+      3534353535353535343434353534343434343535343434343334343434343434
+      3334343434343433333333333434343333333434333333333333333233323332
+      3333323232323232323232323231323231313231313130313131313232313232
+      3132323132323231313132323131313132323232323232323231323231313233
+      3332323232323232323232333333323333333332343334353534353535353535
+      353535363536373737373737383838393A3A393A393A3A3A3B3B3B3D3D3D3D3D
+      3C3E3F3F3F3F3F4141414141414343434545444646454848474A49494B4A4A4D
+      4C4C4E4E4E504E4E5252515453535554545555555757575859595B5C5C5E5D5E
+      6161616362626565656767676B6B6B6E6D6E7070707272737574747878787A7A
+      7A7D7D7D7F7F7F8383828584858787878A88898C8C8C8E8E8E91919093939395
+      95959899989B9B9B9D9D9DA0A0A0A1A1A1A4A4A4A6A6A6A9A9A9ABABABAEAEAE
+      ABACAC8282824E4E4E2020201111111212121212121111111111111111111111
+      1112121211111111111111111111111111111111111110101010101010101010
+      10100F0F0F0F0F0F0F0F0F0E0E0E0E0E0E0D0D0D0C0C0C0D0D0D0C0C0C0B0B0B
+      0B0B0B0B0B0B0A0A0A0A0A0A0909090808080808080808080707070606060606
+      0606060605050505050503030303030303030303030303030302020213131344
+      44447B7B7BA8A8A8AEAEAEB1B1B1B1B1B1B0B0B0B0B0B0B0B0B0B0B0B0A6A6A6
+      9594949292928E8D8E8B8B8B8889898586858383838080807D7D7D7A7A7A7777
+      787474747171716E6E6E6B6B6B686867646564626262605F5F5C5C5C59595956
+      57575353535051504E4E4E4B4B4B4848484646464343444040403E3E3E3B3B3B
+      3939383636373534343232323030302F2F2F2C2C2D2A2B2A2829282626272525
+      252323232323222021211F1F201D1D1E1C1C1D1B1B1B1A191A18191816161616
+      16161515151414141414141413141212121211111010101010111010100E0E0F
+      0F0F0E0E0D0E0D0E0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0A0A0B0B0A0A0A0A
+      0A0A0A0A0A0A0A0A0A0A090A090A0A0909090909090909080908090908090808
+      0808080808080808070808080707070808070707070707070707070606060706
+      0606060606060606060606050605060505050505050505050605050505050505
+      0505050505050505050405050504040505040404040404040404040404040403
+      0403030404030303030303030303030303030303030203030202020202020302
+      0203030202020202020202020202020202010102010102010102020202010201
+      0201020102010101010101010101010101010101010001010101010001000001
+      0000000001010001010000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303333333535353535353636
+      363737373939393A3A3A3A3A3A3A3A3A3A3A3A3B3B3B3B3B3B3B3B3B3B3B3B3C
+      3C3C3C3C3C3C3C3C3C3C3C3D3D3D3D3D3D3D3D3D3D3D3D3E3E3E3C3C3C3A3A3A
+      3736373434343232322F2F2F2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F30303038383838383838383838
+      3838383838383838383838383838383838383837383837383737383737383737
+      3837373837373737373737373737373636363434333434333434333434343434
+      3434343435353536363636363636363636363636363636363636363636363536
+      3635363535363535363535363535363535363535363535353534353435353435
+      3435343435343435343434343434343434343434343434343433343434343434
+      3434343333333334343333343433333333333333333333333332333333323333
+      3333333232333232333232323131323231323231323232323232313232313131
+      3131323132313131313131313232323231323232313131323233333233323232
+      3332323233333333333332333334343435353434343435353535353536363637
+      3737373637373838393A3A39393A3B3A3A3B3B3C3C3C3C3D3D3D3E3D3D403F3F
+      4040404141414343434444444646454848474949484B4A4A4D4C4C4E4E4E504F
+      4F5351525554535757565858575A5A5A5B5B5B5C5C5C5E5E5E61616063626366
+      65656868686B6B6B6D6D6C7070707474747776777979797B7B7B7E7E7E808080
+      8383838585858989898B8B8B8E8D8E9191919493939696969898989B9A9A9D9D
+      9D9F9F9FA1A2A1A4A4A4A6A7A6A9A9A9ACACACAEAEAE9B9A9A6767672F2F2F12
+      1212131313121212121212131313131313141414141414141414131313131313
+      1414141313131313131313131212121212121212121111111111111111111010
+      101010101010101010100F0F0F0E0E0E0E0E0E0D0D0D0E0E0E0D0D0D0C0C0C0B
+      0B0B0C0C0C0B0B0B0A0A0A090909090909090909080808070707070707060606
+      0606060505050404040404040404040404040404040303030202020202020202
+      022121216261629F9F9FB7B7B7B7B7B7B7B7B7B6B6B6ACACAC9B9B9C99999996
+      96969393939091918D8E8E8B8B8B8888888584848282827F7E7F7B7B7B787878
+      7575757272726F6F6F6C6C6C6969696667676262626060605C5D5D5A5A5A5657
+      565453545150504E4E4E4B4B4B4849494646464443444141413E3E3E3B3B3B3A
+      3A3A3637373435343232332F2F2F2F2F2E2D2C2D292929292829262727252424
+      2323232222222120211E1E1E1E1E1D1C1C1C1A1A191A19191818171717171617
+      161516151414141413141313121313131211111111101010101010100F0F0F0D
+      0D0D0E0D0D0E0E0E0C0C0C0C0C0C0C0C0C0C0C0B0B0A0B0A0B0B0A0A0A0A0A0A
+      0A0A0A090A0A090A090A0A0A090A09090A090909090909090909080809080808
+      0808080808080707080707070707070807070707070707070707070607060606
+      0606060606060606060605050506050506050505050505050505050505050505
+      0405050505050505050404040404040404040404040404040404040404040304
+      0403030303030303040303030303030303020303030303030303020302020203
+      0202020202020202020202020202010202020202020202010202020102020101
+      0101020101010102010101010101010101010100010100010001010101010000
+      0100000000010100000000000000010000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030343434353535363636373737393939
+      3A3A3A3B3B3B3B3B3B3C3C3C3C3C3C3C3C3C3C3C3C3D3D3D3D3D3D3D3D3D3D3D
+      3D3E3E3E3A3A3A3838383736373333333131312E2E2E2E2E2E2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3434343838383838383838383838383838
+      3838383838383838383838383838383738383738383738373738373738373738
+      3737383737373737373737353434343333343433343433343433343434343434
+      3636363636363636363636363636363636363636363636363636363636353636
+      3536353536353536353536353536353436353535353436343535343435343435
+      3535343435343434353434353434343434343434343434343334343434343434
+      3434343333333333343334343333333333333333333333333332333333333232
+      3332323232323232323232333233323232323232323232313231313231323131
+      3131323131323232323232323232323232313232333333333333323233323232
+      3334343333333333333434343333343534353332323333333333333434343535
+      353737373736373939383B3A393C3B3B3E3D3D3E3E3E40404041404142414244
+      43434444444647464747474949484B4B4A4D4C4C4E4E4E504F4F535252555454
+      5757575957585B5B5A5D5D5C605F5F6160616161616463646666666968686B6B
+      6B6E6E6E71717173737377767679797A7C7C7D7F7F7F8282828585858888878A
+      8A8A8D8C8D8F90909392939595959897979B9B9B9D9D9DA09F9FA2A2A2A4A4A4
+      A7A7A7A9A9A9ACACACAEAEAE8D8D8D4F4F4F1D1D1D1313131414141414141414
+      1414141415151515151516161616161616161616161615151515151515151516
+      1616151515141414141414151515141414141414131313121212121212121212
+      1111111111111111111010100F0F0F0E0E0E0E0E0E0E0E0E0D0D0D0C0C0C0C0C
+      0C0C0C0C0C0C0C0B0B0B0A0A0A09090909090909090908080807070707070706
+      0606060606050505050505040404040404040404020202020202020202020202
+      0101010C0C0C484848929292BCBDBDB3B3B3A4A4A4A1A1A19F9E9E9C9B9B9999
+      9996969693939390908F8D8D8D8A8A8A8686868383837F807F7D7D7D7A7A7A76
+      76767474747070706D6D6D6A696A6666666463636161615D5E5E5A5A5A585858
+      5455545151514F4F4F4C4C4C4849494646464343434141413E3E3E3B3B3B3838
+      393636363434343232322F2F2F2E2E2E2D2D2D292A2928282827262624242423
+      23232222222020201F1E1F1D1D1D1C1C1C1A1A1A1A1919181717171716161615
+      1414141414141414141313121112111010101010101010100F0F0F0F0E0F0E0E
+      0D0D0E0D0C0C0C0C0C0C0C0C0C0C0C0C0B0B0B0A0B0B0B0B0B0A0A0A0A0A0A0A
+      0A0A0A0A0A0A090A0A090A0A090A090909090909090909090908080808080808
+      0808080808080708070707080707070707070607070607060607060607070606
+      0606060606060606060605050606050605060505060505050505050505050505
+      0505050505050404050504040404040404040404040404040404040404030403
+      0403040303030303040303030303030302030303030303020202020302030202
+      0202020202020202020202020202020202020101020102010201010102010201
+      0202010201010201010101010101010101000101010100000001010101010101
+      0100000000010000000100000001000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303131313434343535353737373838383A3A3A3C3C3C3D
+      3D3D3D3D3D3D3D3D3D3D3D3D3D3D3A3A3A3737373535363232323030302E2E2E
+      2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F373737383838383838383838383838383838383838
+      3838383838383838383838373838373838373837373837373837373837373837
+      3737373736363634333334333334333334343334343334343335353536363636
+      3636363636363636363636363636363636363636363636363636363635363635
+      3635353635353635353635353635353635353635353535343534343535353435
+      3535343435343434343434353434343434343434343433343433343334343433
+      3334333433343433343333333333333333333333333333333333323332323233
+      3332323332333333323332323332323232323232323232323232323132313231
+      323333333232323232323232323333323333323332333333333332323131312F
+      2F2F2F2F2F2E2F2F30303030302F303130313031313131333232333433343434
+      35353536363636363738393939393A3C3C3C3E3E3E4040404243434544454545
+      45484747494A494B4B4A4D4D4C4E4E4E504F4F5352525554545757575958585B
+      5B5B5D5D5D60605F6262616464656665656767676A6A696B6C6C6E6F6F717171
+      7474747676767A7A7A7E7E7E8180818383838686868888888C8C8C8F8F8F9292
+      929494949797979999999D9C9D9F9F9FA3A2A2A5A5A5A7A7A7A9A9A9ACACACAE
+      AEAE8D8D8D494949161616141414151515161616161616171717161616171717
+      1717171818181818181818181818181818181717171616161717171717171717
+      1716161616161616161616161615151514141414141413131314141413131313
+      13131313131414141313131212121111111010101010100F0F0F0D0D0D0D0D0D
+      0D0D0D0C0C0C0A0A0A0A0A0A0909090909090909090808080707070707070707
+      0706060606060604040404040404040404040402020202020202020202020201
+      01010101010303033E3E3E848484A9A9A9A7A7A7A4A4A4A1A1A19E9E9F9B9B9B
+      9898989595959292928F8F8F8B8B8B8888888585858281817E7E7E7B7B7B7777
+      777474747172726E6D6D6A6A6A6768686363636161615E5E5E5B5A5B58585854
+      54545151524F4F4F4C4C4C4849494646464443434241413E3E3E3B3B3B393938
+      3636363534343232332F2F2F2E2E2E2C2C2B292A2A2727282626262424242323
+      232221222120201F1E1E1D1D1D1B1B1B1A1A1A19181918171717161715161514
+      14151414141413141213131212111010111110101010100F0F0F0F0F0F0E0E0E
+      0E0E0D0C0C0C0C0C0C0C0C0C0C0C0C0A0A0B0A0B0B0A0A0B0A0A0A0A0A0A0A0A
+      0A090A0A0A090A0909090A090909090909090909080908080809080809080807
+      0808080708080707070707070707070707070707060706060606070606060606
+      0606060605060605060505060505060605050506060505050505050505050405
+      0505040504040504040504040405040504040404040404040404040304030303
+      0304030303040303030303030303030303030203030302020302020302020203
+      0202030202030202020202020202020102010102020102010201010101010101
+      0201020201010201010101010001010101000001000101000000010101000001
+      0100010000000001000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303232323434343636363838383A3A3A3A3A3A3A3A3A3635363434
+      343232322E2E2E2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3130313232
+      3234333435353538383838383838383838383838383838383838383838383838
+      3838383838383838383837383837383737383737383737383737383737373737
+      3535343333333433333433333433333434333434343636363636363636363636
+      3636363636363636363636363636363636363636363636363636363536363536
+      3535363535363535363535363535363535363535353535353535353434343435
+      3434353534343535343435343434343434343434343434333434343333343334
+      3333333434333333333333343434333333333333333233333332333333333333
+      3333343232333232333232333232323232313232323232323132323332323233
+      3232323332323232323333333232323030312F2E2F2E2D2D2D2D2D2E2F2E2F2F
+      2F2F2F2F30303030313131313132323232313133333334353435353536363636
+      353637383839393939393A3A3A3B3D3D3E3E3E3F3F4040434342454545494949
+      4B4C4B4D4D4D4E4E4E50504F5352525554545757575958585B5B5B5E5D5D6060
+      606262626564656767676A6A6A6C6C6C6D6D6D6F6F6F7272717575757778777B
+      7B7B7D7D7D8080808483838787878B8B8B8D8D8D909090929292969596999999
+      9C9B9B9E9E9EA1A1A1A4A4A4A6A6A6AAAAAAACACACAFAEAE8D8D8D4949491616
+      161515151616161616161717171717171818181818181919191A1A1A1A1A1A1A
+      1A1A1A1A1A1A1A1A1919191A1A1A191919191919181818181818181818171717
+      1717171717171717171717171818181919191A1A1A1B1B1B1C1C1C1C1C1C1D1D
+      1D1E1E1E1E1E1E1D1D1D1D1D1D1B1B1B1A1A1A19191918181816161614141413
+      13131010100E0E0E0D0D0D0A0A0A0A0A0A090909080808080808070707070707
+      0606060505050404040404040404040404040202020202020202020202020101
+      010101010101010101013A3A3A848484A9A9A9A6A6A7A4A4A4A0A0A09E9D9D9A
+      9A9A9696969393939091918D8D8D8989898686868383837F80807C7C7C797879
+      7575757272726F6F6F6B6B6B6868686464646262625E5D5E5A5B5A5858585656
+      565151514F4F4F4C4C4C4849494646464343434141423E3F3E3B3B3B38383937
+      36373534343232322F2F2F2E2D2E2C2C2B292929282827262626232323232323
+      2120201F201F1D1D1D1D1D1D1B1B1B191A1A1919191716161716161515161414
+      141414141213131213121212121111111010101010100F0F0F0E0E0E0D0E0E0C
+      0C0D0D0C0C0D0C0C0C0C0C0C0C0C0B0A0A0B0A0A0A0A0A0A0A0B0A0A0A0A0A0A
+      0A0A0A0A0A090909090909090909090809090809090809090808080808080708
+      0807070707070707070707070707070707070706070606060706060606060606
+      0606060606050505060505050505050506060505050605050505050504040505
+      0504050504040404040404050404040404040404040304030403040404040403
+      0404030403040403030303030303030203020302030202020302020302020203
+      0202020203020202020202020202010202020102010201010202020201010101
+      0101010101010101010101010101010101010001000100000001000001000000
+      0000010000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303232323535353737373939393B3B3B3333332E2E2E2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F313131333233343434363636373737393838393838393838383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838383738383738383738373738373738373738373737373733333333
+      3333333333343333343333343333353535363636363636363636363636363636
+      3636363636363636363636363636363636363636363636363636353636353635
+      3536353536353536353536343536353536353536353535353435353534353435
+      3534343534343435343434343434343434343434343434343433343333333433
+      3433333334343333343333333333333333333333333433333432323432323432
+      3333323233323233323232323232323232313232323233333332333332323232
+      32323232322F2F2F2D2D2D2D2D2D2E2E2D2D2D2E2E2D2E2F2E2E2F302F303030
+      3030303130313232323232323332323434343434343535353636363838383939
+      393A3A3A3B3B3B3D3D3D3E3E3F3F3F404141424242434444444646474A49494D
+      4D4E50504F5353525554545756565958585B5B5B5E5D5D606060636262656565
+      6868686A6A6A6C6D6C6F6F6F7272727373737676767978787B7B7B7E7E7E8281
+      818585858787878B8A8B8E8E8F9191919595949797979A9A9A9D9D9DA1A0A0A3
+      A3A3A5A6A5A9A8A8ACABACAFAFAF9A9999515151161616161616161616181818
+      1919191919191919191A1A1A1B1B1B1B1B1B1B1B1B1C1C1C1C1C1C1C1C1C1B1B
+      1B1B1B1B1B1B1B1B1B1B1B1B1B1A1A1A19191919191918181819191919191918
+      18181919191B1B1B1D1D1D1F1F1F212121232323252525262626272727282828
+      2828282828282828282727272525252525252424242323232121211F1F1F1E1E
+      1E1A1A1A1818181515151212120F0F0F0C0C0C0A0A0A08080807070707070707
+      0707060606040404040404040404040404020202020202020202020202010101
+      010101010101000000010101424242929292A9A9A9A6A5A5A2A2A29F9F9F9B9B
+      9B9999999595959291918E8D8E8B8B8B8787878484848180817D7D7D7A7A7A76
+      76767273736F6F6F6C6C6C696A6A6665656262625E5E5E5B5B5B585858555656
+      5352524F4F4F4C4B4B4949494646464443434040403E3E3E3B3B3B3938393635
+      363434333131312F2F2F2D2D2D2C2B2B292A2A27272825252623232323222221
+      212120201F1D1E1E1C1C1C1A1A1A191A1A181818171716171616141414141415
+      1414141312131111121110111011101010100F0F0F0F0F0F0E0E0E0E0D0E0D0D
+      0C0C0D0C0C0C0C0C0C0C0B0B0B0B0B0B0A0B0A0A0A0B0A0A0A0A0A0A0A0A0A09
+      0A0A09090A090909090909090909090909080808080808080808080808070808
+      0807080708070707070707070607070707060607060607070606070606060606
+      0606060606060606050506050605060605060505050505050505050505050505
+      0405040404040404040404040404040404040403040304040304040404030403
+      0304040303030303030303030303030303020302030303030203020202020202
+      0202030202020202020202020102020202020201020101010101010201010101
+      0101020101010101010101000101010101000001010000010100010001000100
+      0001000100000100000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303434
+      343535353838383A3A3A3C3C3C3131312F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F3030303131313333333534343636363838383939
+      3939393839393839393839383839383839383839383839383838383838383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838373838373837373837373837373837373535353333333333333333
+      3333333334333334333336363636363636363636363636363636363636363636
+      3636363636363636363636363636363636363636363636363635363635363535
+      3635353635353635353635353635353534353534353535343535353435353434
+      3435343534343434343434343434333433343434343434343334343433343434
+      3433333333343334333334333333343333343333333333343333343332333332
+      3332323332323232333233323232323333333332323333323031312E2D2D2E2D
+      2D2D2D2D2D2D2D2E2E2E2D2E2E2E2E2E2F2F2E302F2F30313131303031313131
+      31313232313434343435353635353536363736363738373939393A3A3A3B3B3B
+      3C3D3D3D3E3E403F4041404142424344444546464748484849494A4B4B4C4F4F
+      4F5353545757565958585B5B5B5E5D5D6060606362626665656968686A6A6A6D
+      6D6D706F6F7373737575757878787979797C7C7C7F7F7F838283858585888888
+      8B8B8B8F8F8F9292929595959998999C9C9C9E9E9EA1A1A1A4A5A5A8A8A8AAAB
+      AAADAEAEAAAAAA6868682222221717171818181919191919191B1B1B1B1B1B1C
+      1C1C1C1C1C1C1C1C1D1D1D1E1E1E1E1E1E1D1D1D1D1D1D1E1E1E1D1D1D1C1C1C
+      1C1C1C1C1C1C1C1C1C1B1B1B1B1B1B1A1A1A1919191919191919191818181919
+      191B1B1B1E1E1E2121212424242727272828282B2B2B2C2C2C2E2E2E2E2E2E2E
+      2E2E2E2E2E2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2B2B2B292929282828272727
+      2525252222221F1F1F1C1C1C1818181515151111110C0C0C0909090808080707
+      0706060605050504040405050503030302020202020202020201010101010101
+      01010000000000000000000D0D0D5B5B5BA3A3A3A7A8A7A4A4A4A1A1A19D9D9D
+      999A9A9696969393938F8F908C8C8C8888888585858182817E7E7E7A7A7A7777
+      77747474706F6F6C6C6C696A696566656262625F5F5F5B5A5A58585856555552
+      52534F4F4F4C4C4C4849494646464343434140403D3D3D3B3B3B393938353636
+      3333343131312F2F2F2D2C2D2B2A2A2A29292727262526252323232222222121
+      201F1E1F1D1D1E1C1C1C1A1A1A19191918181817171616151614151414141414
+      14141313131211111011101010111010100F0F0F0E0E0E0D0E0E0C0C0D0C0C0C
+      0C0C0C0C0C0C0C0C0C0B0B0B0B0B0B0B0A0B0A0A0A0A0A0A0A0A0A0A0A0A090A
+      0A0A090A09090909090908080909080808080808080808080807080808080808
+      0807070707070707070707070707060707060706060606060606060606060605
+      0506060505050605060606050606050605050505050505050505050505050505
+      0505040405040404040404050404040403040404040403030403030303030304
+      0403030303030303030303030302030302030303030202030303020203020202
+      0202020202020202020102020202020202020102010101020201020201010102
+      0201010101010101010100010101010101000001010100000000000000000000
+      0100000100000101010000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000030303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030313131343434363636
+      3838383A3A3A3C3C3C2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F31313132323234343435
+      3535373736393939393939393939393939393939393939393939393939393939
+      3939383939383938383938383938383938383938383838383838383838383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3837383837383737383737383737383737343333333333333333333333333333
+      3333333534343736363736363636363636363636363636363636363636363636
+      3636363636363636363636363636363636363636363636363536363536353536
+      3535363535363535363535353435363535353535353434353435353534343535
+      3435343434343534343434343434343334343434343433343333343434333433
+      3334333333343334333334333334333333333334333334323333333333323233
+      33323233333232323232323333333132322F2E2F2D2D2C2E2D2E2D2E2E2D2E2E
+      2E2D2E2E2E2E2E2E2E2E2F2F2F302F3030303132313333333333333434343636
+      373A3A3B3B3A3A3C3B3B3E3D3D3E3D3D3E3E3E3A3A3A3C3C3C3D3C3D3E3E3E3E
+      3E3F40414142434343444445454647474848494A4C4C4C4D4D4E4F5050525252
+      5656565B5B5B5E5D5D6060606362626565656968686B6A6A6D6D6D706F6F7373
+      737777767978797C7C7C7F7F7F8181818383828586858989898C8C8D8F8F8F93
+      93939696969A9A9A9D9C9CA0A0A0A3A3A3A6A6A6A9A9A9ACACACAFB0B0898989
+      3737371818181818181919191B1B1B1C1C1C1C1C1C1D1D1D1E1E1E1E1E1E1F1F
+      1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1E1E1E1E1E1E1F1F1F1F1F1F1E1E1E1D
+      1D1D1C1C1C1C1C1C1C1C1C1A1A1A191919191919181818181818181818191919
+      1C1C1C2020202424242828282B2B2B2E2E2E3030303232323333333333333333
+      333333333434343434343434343434343333333232323131313030302F2F2F2D
+      2D2D2B2B2B2828282424242121211E1E1E1919191515151010100C0C0C080808
+      0606060505050505050505050404040303030303030202020202020101010101
+      010000000000000000000000002323237E7E7EA9A9A9A5A5A5A2A2A29E9E9E9B
+      9B9B9898989494949090908D8D8D8A8A8A8585858283827F7E7F7B7B7B777777
+      7474747170716D6D6D6A696A6666676262625F5F5F5B5B5A5858585655555151
+      514F4F4F4C4B4B4948494646464343434040403D3D3D3A3A3A39393935353532
+      32323031302F2F2F2D2D2D2B2B2B292829262727242424232323222222202121
+      1F1F1F1D1D1E1C1B1B1A1A1A1919191717171616161515151414141414141313
+      131212121212121010101110100F0F0F0F0F0F0D0E0E0E0D0E0D0D0D0C0D0C0C
+      0C0C0C0C0C0A0B0B0B0B0A0B0B0B0A0A0A0A0A0A0A0A0A0A0A0A0A0909090A09
+      09090A0909090909090908090809080908080808080808080808080708080707
+      0807070707070707070607070707070607070706070606060606060606060605
+      0506050506050506050505050505050505050505050505050505050505040505
+      0404050504040404040404040404040404040404040404040304030403040303
+      0403030303030303030203030303030302030303030202020302020202020202
+      0302020202020201020202010101020102020201010102010201010101010101
+      0101010101010001010100010101010101010101010100000001000100010100
+      0100000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000003030307979793030303030303030303030303030303030303030
+      303030303030303030303030303030303030303232323434343737373939393B
+      3B3B3939392E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      3231323333333434343737373837373A39393A39393A39393939393939393939
+      3939393939393939393939393939393939393939393939393939393939393839
+      3938393938393838393838393838393838393838383838383838383838383838
+      3838383838383838383838383838383838383838383838383838383838373838
+      3738383738373738373736363633333333333333333333333333333333333336
+      3636373636373636373636363636363636363636363636363636363636363636
+      3636363636363636363636363636363636363636363636353636353635353635
+      3536353536353536353536353536353535343535343435353535353534343434
+      3434343435343535343434353434353434343433343433343434343334343433
+      3434333434343433333433333433333433333433323433333332333332333332
+      323232333333333030312D2D2D2D2D2D2D2D2C2D2D2D2D2D2D2D2D2E2E2E2F2F
+      2F2F2F2F2F3030303231323536363B3B3B40403F4444444948484949494B4B4B
+      4B4B4B4B4B4A4B4C4B4C4B4C4C4D4C4D4D4D4D4D4D4B4B4B4848484747474545
+      4543444445454648474849494A4B4B4C4D4D4E4F4F5052515254545557575759
+      595A5F5F5F6362626565656968686B6A6A6D6D6D707070737373767777797879
+      7C7C7C80807F8282828585858787878A8A8A8D8D8D9090909494949696969999
+      999E9E9EA1A1A1A4A4A4A7A8A8ABABABAEAEAEA6A6A65B5B5B1818181919191B
+      1B1B1A1A1A1C1C1C1D1D1D1E1E1E1F1F1F1F1F1F1F1F1F202020212121212121
+      2121212020202020202020202020201F1F1F1F1F1F1F1F1F1F1F1F1E1E1E1D1D
+      1D1C1C1C1C1C1C1A1A1A1A1A1A1919191818181818181818181818181919191D
+      1D1D2424232929282E2E2C323230343431373634383836393936393937393937
+      3A3A393A3A393A3A393A3A3A3939393939393939393838383737373636363434
+      343232322F2F2F2D2D2D2A2A2A2626262222221D1D1D1919191414140F0F0F09
+      0909060606050505050505050505040404030303030303020202020202010101
+      0000000000000000000000000000004B4B4A9E9E9EA7A8A7A4A4A4A0A0A09C9C
+      9C9899989696969191928D8D8D8B8B8B868686838383807F7F7C7C7C77777874
+      74747171706D6D6D69696A6666666262625F5F5E5A5A5B585858555655515151
+      4F4F4F4B4B4B484848454545424242403F3F3B3C3C3A3A3A3838383535353332
+      333130302F2F2F2D2D2D292A29282727262626252425232323212121201F201E
+      1D1D1C1C1C1B1B1C1A1A1A181818161717161617141415141414141414131213
+      1212121110111110101010100F0F0F0E0E0E0E0E0E0C0D0D0D0C0D0C0D0D0C0D
+      0C0C0C0C0B0B0B0B0A0B0B0B0B0A0A0A0A0A0A0A0A0A0A0A0A0A090A09090909
+      090909090A090809090908090808080808080808080808070807070807080707
+      0707080707070707070707070707060707070706060606070606060606060606
+      0505050505060606050606060505050505050505050505050405050405050404
+      0404040404050404040404040404040404040304030404030403040404030303
+      0303040303030303030302030203020303020302020203020203030202020202
+      0202020202020202020202010101020102010102020202010102010101010101
+      0101010101010101010101010000010100010101010001000000010100010000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303232323535353737373939393C3C3C3635
+      362F2F2F2F2F2F2F2F2F2F2F2F2F2F303535353737373939393A3A393A3A393A
+      3A393A3A393A39393A39393A39393A39393A3939393939393939393939393939
+      3939393939393939393939393939393939393939393939393939383939383939
+      3839383839383839383839383839383838383838383838383838383838383838
+      3838383838383838383838383838383838383838383838383838383837383837
+      3837373837373534343333333333333333333333333333333434343737363736
+      3637363637363637363636363636363636363636363636363636363636363636
+      3636363636363636363636363636363636363636363635363635363535363535
+      3635353635353535353635353535353635353534343534343535343434353434
+      3534353435343435343435343435343434343434333333343334343335343434
+      3433343333343333343333343333343333333332333232333333333232323131
+      2E2E2E2D2D2E2D2D2D2C2D2D2E2E2E2E2D2E2F2F2E2F2F2F2F2F303130303536
+      363E3E3E4444444747474949494A4B4A4B4C4B4D4C4D4D4D4E4D4D4D4F4F4F4F
+      4E4F4E4E4E4F4F4F5050504F4F4F515050515151525252545454545354505150
+      4D4E4E49494A4B4C4C4D4D4D4F4F505252525454545756575958595B5B5C5D5D
+      5E6363636867676B6A6A6D6D6D7170707473737777777979797C7C7C7F807F82
+      83828686868989898C8C8C8D8D8D9191909494949797979B9B9B9E9E9EA1A1A1
+      A5A5A6A8A8A8ABACACB0B0B08B8B8B3232321919191A1A1A1B1B1B1D1D1D1E1E
+      1E1F1F1F20202021212122222222222222222222222222222223232322222222
+      22222121212121212121212121211F1F1F1F1F1F1F1F1F1F1F1F1E1E1E1D1D1D
+      1B1B1B1B1B1B1A1A1B19191919191718181518171219181019180D1B1A0F2020
+      192727242D2D2C30313434343936373B39393E393A3F3A3B3F3C3C3B3E3E3C40
+      3F3942413743423742423941403B40403D3F3F3E3E3E3D3D3D3D3D3D3D3B3B3B
+      3939393737373434343131312E2E2E2929292525252020201B1B1B1616161010
+      100A0A0A06060605050504040403030303030303030303030302020201010100
+      00000000000000000000000000001E1E1E818181A9A9A9A5A5A5A1A1A19E9E9E
+      9A99999696969393938E8E8E8A8B8B8787878383837F7F807C7C7C7878787474
+      747171716D6D6D6A69696666666262625F5F5F5B5B5B5858585554545151514E
+      4E4E4B4A4A4747484545454243433F3F3F3C3C3C3A3A3A373837353534323233
+      2F2F2F2E2E2E2B2C2C2A2A2A2828272525252323232323232121211F1E1F1D1D
+      1D1D1C1C1A1A1A19191918181816171716161615141414141414141413131312
+      12111111111011100F10100F0F0F0E0E0E0D0D0E0D0D0C0C0C0C0C0D0C0C0C0C
+      0B0B0B0A0B0B0B0B0B0B0A0A0B0A0B0A0A0A0A0A0A0A0A090909090A0A0A0A09
+      0909090909090908090808090808080808080808070807070808080807070707
+      0708070707070707070707070607060706060606060606060606060606050606
+      0505050505060506050505050505050505050405050504040404040405040504
+      0504050404040504050404040404030403030304030303030404030303030303
+      0303030303020303030302020303030203030303020302030203030202020202
+      0202020202020202010102010201020201020102010201020102010102010101
+      0101010100010101010100010101010100010001000100010100010000000000
+      0101000001000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      30303030303030303030303333333535353737373A3A3A3C3C3C3232322F2F2F
+      2F2F2F2F2F2F2F2F2F3232323A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A
+      393A39393A39393A39393A39393A39393A393939393939393939393939393939
+      3939393939393939393939393939393939393939393939393938393938393838
+      3938383938383938383938383838383838383838383838383838383838383838
+      3838383838383838383838383838383838383838383838383738383738383737
+      3737333333333333333333333333333333333333353535373736373736373636
+      3736363736363736363636363636363636363636363636363636363636363636
+      3636363636363636363636363636363636363636363536363536353536353536
+      3535363535363535363535353534353435353535353434343435343434353534
+      3534343535343534343534343534343433343534333434343534333534343434
+      333434333433333433333433333433323333333332333030312E2D2F2D2D2D2D
+      2D2D2D2D2D2D2D2D2F2F2F2F2F2F2F3030313031393839424241474747494949
+      4A4A4A4C4C4C4D4C4C4F4F4F4E4F4E5151505150515051505151515151515252
+      5253535353535253525353535354545454545454545457575756575759595959
+      59595656575050515151525253545656565857585B5A5B5D5D5E606061646364
+      6868686D6D6D706F6F7473737777777979797C7C7C8080808383838686868A8A
+      8A8D8C8C9090909494949594959898989C9B9B9F9F9EA3A3A3A5A5A5A9A9A9AD
+      ADADAEAEAE6969691D1D1D1A1A1A1C1C1C1D1D1D1E1E1E202020212121222222
+      2323232424242424242424242424242323232323232323232323232323232323
+      232121212121212121212121211F1F1F1F1F1F1F1F1F1E1E1E1D1D1D1C1C1C1B
+      1B1B1A1A1A19191B17181E16172113173510184D0E18620B17730B18830B1A93
+      0C1C9A0A1AA5091AAB0A1AA90A1AA90A1AA90C1AA6111D9A121E9618238C1E26
+      81242B742D31673538573F3F4943434447463D47463C45443F43434142424140
+      40403E3E3E3A3A3A3838383535353030302C2C2C2727272222221C1C1C171717
+      1111110A0A0A0606060404040303030303030303030303030202020101010000
+      00000000000000000000000000040404595959A6A6A6A6A6A6A3A3A39E9E9E9B
+      9B9B9797979393938F8F8F8C8C8C8888888484847F7F7F7D7D7D787878747474
+      7171706D6D6D6969696766666262625E5D5E5B5B5B5858585454545050504E4E
+      4D4A494A4646474444444241413E3E3E3B3B3B3A3A3A3737363434343131312F
+      2F2F2D2D2D2B2B2B2A29292626262526252323242222212021211F1E1F1E1E1D
+      1C1B1C1B1B1B1919191716171717161414151414141415151313141212121110
+      111011111111100F100F0F0E0E0E0E0E0D0D0C0D0D0D0C0C0D0C0C0C0C0C0C0B
+      0B0B0B0B0B0B0B0B0A0A0B0B0A0A0A0A0A0A0A0A0A090A0A090A090A0A090909
+      0909090909090908080908080808080808080808080707080708080707070707
+      0707070707060707060607060606070706060606070706060606050506060605
+      0506060606060605050506050505050505050505050405040405050405050405
+      0405040405040404040403040403030304030303030403030404030304030303
+      0303030303030303030203030202030203030302030202020202020203020202
+      0202020102020202010102020201020201010102020102010102010101020101
+      0101010101010100010001010100010001010000000001000000000100000100
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303434343636363838383A3A3A3D3D3D2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F3434343A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A39
+      3A39393A39393A39393A39393A39393939393939393939393939393939393939
+      3939393939393939393939393939393939393939393839393839393839383839
+      3838393838393838393838383838383838383838383838383838383838383838
+      3838383838383838383838383838383838383838373838373838373635353333
+      3333333333333333333333333333333337363637373737373637373637363637
+      3636373636373636363636363636363636363636363636363636363636363636
+      3636363636363636363636363636363636363636353636353635353635353635
+      3536353536353535343436353536343435353535343435343536363535353435
+      3434353435353434353433353434353433353434353434343434343334343333
+      3533333433333433333433333333333030302C2C2D2D2D2E2D2D2D2D2D2D2F2E
+      2E2F2F2F2F2F2F3030303636374342434747474949494B4B4B4E4E4E4F4F4F51
+      5151515151525252535353545454545454555555535353555555555555555555
+      5555545555555655565555565656575757575858585959595A595A5B5B5B5E5E
+      5D605F5F5D5C5C5757575858595A5B5B5C5D5E60616162626366666769696A6C
+      6C6C7272727676767A79797C7C7C8080808383838686868A8A8A8D8D8D909090
+      9494949797979A9A9A9C9C9BA0A09FA3A3A3A6A6A6AAAAAAADADADA0A0A04949
+      491A1A1A1B1B1B1D1D1D1F1F1F20202021212123232324242425252525252525
+      2525252525252525252525252525252525242424242424242424232323232323
+      2121212121212121212121211F1F1F1F1F1F1F1F1F1D1D1D1C1C1C1B1B1B1919
+      1818191D0B1977021AC30019CD0019CC0018D20018D40017D10015CE0015CC00
+      15CA0014C80013C60013C50012C40012C30011C4000FC3000EC3000EC3000EC0
+      000FBB0110B60613AD101B9A1E26862B30703A3C594444494949424A49404646
+      434444434141413F3F3F3B3B3B3737373333332E2E2E2828282323231D1D1D17
+      17171010100A0A0A050505030303030303030303030303020202010101000000
+      000000000000000000000000000000333333989898A7A7A7A4A4A49F9F9F9B9B
+      9B9898979494949090908C8C8C888888848484807F807D7D7D78787874747471
+      71716D6D6D6A69696565656262625D5D5D5B5A5B5757575353535050504D4D4D
+      4A49494646474444444241423E3E3E3B3B3B3938393536363334333232322F2F
+      2F2D2C2D2B2B2B2829282627272425242323232121212020201E1D1D1C1C1D1A
+      1A1A1A1A1A181818171716161616141415141514141414131313121212111111
+      1111100F10100F0F0F0E0F0E0E0E0E0D0D0C0D0C0D0D0C0D0D0D0C0B0B0B0B0B
+      0B0A0B0B0B0B0A0A0A0A0A0A0B0A0A0A0A0A090A0A0A0909090A090909090909
+      0909080909090809090908080808080708080708070807070707070708070707
+      0707070607070707070607060606060707070606060606060605060605050605
+      0506060505050505050505050505050505050505050405050505050404040505
+      0404040404040404040404030404040404030304040404030303030303030303
+      0303030303030303030303030303030302020203020302020202020203030202
+      0202020202020102010102020101010101010202010102010101010101010101
+      0101010101010101010101000000000000010000000101010000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3131313434343636363838383B3B3B3B3B3B2E2E2E2F2F2F2F2F2F2F2F2F2F2F
+      2F3737373A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A
+      39393A39393A39393A3939393939393939393939393939393939393939393939
+      3939393939393939393939393939393939393939383939383938383938383938
+      3839383839383838383838383838383838383838383838383838383838383838
+      3838383838383838383838383838383838383837383837343434333333333333
+      3333333333333333333534343737373737373737373737363737363736363736
+      3637363637363636363636363636363636363636363636363636363636363636
+      3636363636363636363636363636363636363635363635363535363535363535
+      3635353635353535353535353635343635353535363635363535353635343534
+      3435343535343435353435353435343335343335343434343334343334343334
+      33333433333433332F2F2F2D2C2C2D2D2D2E2E2E2E2E2E2E2E2E2E2E2E303030
+      3333334040404747474949494B4B4B4E4E4E5050505353535353535555555757
+      575656555656575757575556565051514F4F4F50505150505050505053535358
+      5857575757595958585858585858595959595A5A5D5D5D5D5D5E5F5F5F626261
+      6464646565656161615D5D5E6060606363636665666968696B6B6C6F6F6F7373
+      737978787D7C7C8080808383838686868A8A8A8D8D8D9190919494949898989B
+      9B9B9E9E9FA1A1A1A4A4A3A7A7A7AAABABAEAFAE9191913232321B1B1B1D1D1D
+      1E1E1E2020202222222323232424242525252626262727272727272727272626
+      2627272726262626262626262625252524242424242424242423232323232321
+      21212121212121212121212020201F1F1F1E1E1E1D1D1D1B1B1B191919181816
+      1617220D18640319B80019CF0019CB0018CA0018C90017C70016C60016C60016
+      C50015C30015C20014C10014C00013BF0013BE0011BD0011BC0011BB0010BA00
+      0FBA000EBA000DBB000BBD000BB9020EB20B15A21D238830346D4243524A4A45
+      4C4B424848444444444141413D3D3D3939393434342F2F2F2929292323231C1C
+      1C17171710101008080804040403030303030303030302020201010100000000
+      00000000000000000000000000001C1C1B878787A8A8A8A3A4A4A0A0A09C9C9C
+      9999989494949090908D8D8D8888888484847F7F7F7D7D7D7878787474747171
+      706D6D6D6969696565656262625E5D5E5A5A5A5656565353534F4F504D4D4D4A
+      4A4A4646464443434040403D3D3E3B3B3B3939393535363333333031302F2F2F
+      2D2D2D2A2A2A2727272626272323242323232121211F1E1F1D1E1E1C1B1B1A1A
+      1A191A1917171717171716161614151414141413141312121211111010111110
+      1011100F100E0E0F0E0E0E0D0D0D0D0C0D0D0C0C0C0C0C0C0B0B0B0B0B0B0B0B
+      0A0B0B0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A090A0909090909090909090908
+      0909090808090908080808080808080808080807070807080707070707070707
+      0707070707060607070607070606060606060606060606060605050606050606
+      0506050505060606050605060505050505050505050504050404040404040404
+      0404040404040404040404040304040304030404040303030303030303030303
+      0303030303030303020302030203020302020202020202030202020202020202
+      0102020102020202020201010102010202020202010101020101010101010101
+      0101010101010101000101000101010100010100000000010000000000000000
+      0100000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303032323234
+      34343737373939393B3B3B3939392E2E2E2F2F2F2F2F2F2F2F2F2F2F2F393939
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39
+      393A39393A39393A393939393939393939393939393939393939393939393939
+      3939393939393939393939393939393938393938393838393838393838393838
+      3938383938383838383838383838383838383838383838383838383838383838
+      3838383838383838383838383838383738373733333333333333333333333333
+      3333333333363636373737373737373737373737373736373736373636373636
+      3736363736363636363636363636363636363636363636363636363636363636
+      3636363636363636363636363636363636363536363536353536353536353536
+      3535363435363535363535363535363536353535353636363535353534353534
+      3535343535343435343534333534343534343434333433343433333534343433
+      332F2F2F2D2D2D2D2D2D2D2E2E2D2D2E2F2F2F2E2E2E3030313A3B3A44454448
+      48484B4B4B4E4E4E5151515454545656565757575757575858584F4F4F474747
+      3F3F3F3737373839383A3A393B3B3B3C3B3B3D3D3D3F403F4040404142424646
+      464B4B4B5151515959585B5B5C5C5C5C5D5C5D5F5F5F60616163636366656568
+      68686A6A6A6A6A6A64646565666669686A6C6B6C6F6F6F717272767676797979
+      807F7F8383838686868A8A8A8D8D8D9191919494949898989B9B9BA0A0A0A3A2
+      A3A6A6A6A8A8A8ABABABAFB0B07C7C7C2525251C1C1C1E1E1E20202022222223
+      2323252525262626272727282828282828292929282828282828282828282828
+      2727272727272626262626262525252424242424242424242323232323232121
+      212121212121212020201F1F1F1E1E1E1D1D1D1B1B1B191A1A18181816161316
+      1507101638001AC80019CE0019CB0018CA0018C90017C70016C60016C60016C5
+      0015C30015C20014C10014C00013BF0013BE0011BD0011BC0011BB0010BA0010
+      B9000FB8000FB7000EB6000DB6000BB70009B9000AB50510A919208E30346E46
+      46524E4D454B4B444646454343433F3F3F3939393535352E2E2E282828212121
+      1B1B1B1414140C0C0C0606060303030303030303030202020101010000000000
+      000000000000000000000000000B0B0B6F6F6FA9A9A9A5A5A5A1A1A19C9C9C98
+      99999595959090908D8D8D8888888484847F807F7D7D7D787878747474717071
+      6C6C6C69696A6464646061615E5E5E5A5A5A5756575252534F4F504C4B4B4849
+      494545454342433F3F403C3C3C3A3A3A3838373535353233322F302F2E2E2E2C
+      2C2C292A2A2626262625252323242222222121211F1F1F1E1E1D1B1C1B1A1A1B
+      181818171717161516151415141514151414141313121212111111111111100F
+      0F0F100F0F0E0E0E0E0E0D0D0D0D0C0D0C0D0D0C0D0C0C0B0C0B0B0B0B0B0B0A
+      0B0A0A0A0B0A0A0B0A0A0A0A0A0A090A0A0A090A0A0909090909090909090909
+      0809090908090808080808080808080708080708080708070808070707070707
+      0707070706060706070706060606060606060606060606060605060506050505
+      0506060505050505050505050505050505050505050504050404040404050405
+      0404040404040404040304040304040303040403040403030303040303030303
+      0303030203020302030302030302020303020202020302020303020202020202
+      0102020102020201020102010101010102010101010102010101010101010101
+      0101000101000001010101010100010000010101010001000101000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303232323535353737
+      373939393B3B3B3635362F2F2F2F2F2F2F2F2F2F2F2F3030303A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A3939
+      3A39393A39393939393939393939393939393939393939393939393939393939
+      3939393939393939393939393839393839393839383839383839383839383839
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838383838383838373636363333333333333333333333333333333333
+      3337373737373737373737373737373737373737373637373637363637363637
+      3636373636363636363636363636363636363636363636363636363636363636
+      3636363636363636363636363636363636353636353635353635353635353635
+      3436353535363536363635363635363636363535363636353535353535353536
+      3534353534353434353433353433353434353434343333343434302F2F2D2D2D
+      2E2D2D2D2D2D2E2E2E2F2F2F2F2F303131323F3F3F4747464A4A4A4E4E4E5151
+      515353535555555959595A5A5A52525242424337363635353536363637373738
+      38383939393A3A3A3C3B3C3D3D3D3F3E3E404040414141434343444545464747
+      4948484A494A4F4F4F5858585D5D5D6060606161626464636767666969696C6C
+      6C706F6F7171716D6C6D6B6B6B6F6E6F7171727575757878797B7B7C80808085
+      85858A89898D8D8D9191919494949898989B9B9BA0A0A0A3A2A3A7A7A7AAAAAA
+      AEAEADB0B0B06C6C6C1B1B1B1D1D1D1F1F1F2222222323232525252626262727
+      272828282929292929292929292929292A2A2A29292929292929292927272727
+      2727272727262626262626252525242424242424242424232323232323212121
+      2121212121212020201E1E1E1D1D1D1B1B1B1A1A1A17171716161615140C0F15
+      40001ACD001ACF0019CB0019CB0018CA0018C90017C70016C60016C60016C500
+      15C30015C20014C10014C00013BF0013BE0011BD0011BC0011BB0010BA0010B9
+      000FB8000FB7000EB6000EB5000DB4000CB3000BB30008B60008B30811A52126
+      843C3E5F4C4C494E4E454848464343433F3F3F3939393434342D2D2D2525251F
+      1F1F191919111111090909040404030303020202020202010101000000000000
+      0000000000000000000000000000005C5C5CA9A9A9A5A5A5A1A1A19D9D9D9898
+      989595959090908D8D8C8888888484847F7F7F7C7C7C77777774747470706F6C
+      6C6C6869696463636161615C5D5D5959595556555253524F4F4F4B4B4B484848
+      4444444142413E3E3E3B3B3B3A3A3A3736373334333131312F2F2F2D2E2D2B2B
+      2B2828292726272424252323232122212020201E1D1E1D1D1C1A1A1B1A191918
+      1818171717151616151414141514141413121212111111111111111110101010
+      0E0E0F0E0E0E0D0D0D0D0D0D0D0D0D0D0D0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B
+      0B0A0B0B0A0B0A0A0A0A0A0A0A0A0A0A09090909090A09090909090909090908
+      0908080808080808080808080808080808080807070707070707070707070706
+      0607070607070707060606060606070606060606060606050606060606060605
+      0605060505060505050505050404050504050404040404050505050405040404
+      0405040304040404040404040403040403030403030303030403030303030303
+      0203030303030303020303020203020302030303020202020202020202020202
+      0102020101010102010201020201020101010201010101010101010101010001
+      0101010101010001000000010000000001000100000000000001000100000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000030303079797930303030303030303030303030303030
+      30303030303030303030303030303030303030303333333535353737373A3A3A
+      3C3C3C3333332F2F2F2F2F2F2F2F2F2F2F2F3231323A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393939393939393939383939383938383938383938383938383938383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838383838343434333333333333333333333333333333353434373737
+      3737373737373737373737373737373737373737363737363736363736363736
+      3637363636363636363636363636363636363636363636363636363636363636
+      3636363636363636363636363636363635363635363535363535363535363435
+      3636363636353636353535363636363535363636353535353535353535353535
+      343535343534343434343434343434343533343132312D2E2D2E2D2E2D2D2D2D
+      2D2D2F2F2F2F30303232314141414646464C4C4B4F4F4F535353565656585959
+      5B5B5B5151513C3C3C3434343433333434343636363737373737373939393A3A
+      3A3C3B3C3C3B3C3E3D3E403F404040404343424545454646464747484949484B
+      4B4B4D4D4E5051505353535C5C5C6362636666666969696B6C6B6E6F6E707070
+      7373737676767474747171727474747878787B7B7B7F7F7F8282838787878D8D
+      8D9191919494949898989B9B9BA0A0A0A2A2A3A7A7A7AAAAAAAEAEAEB1B1B161
+      61611C1C1C1F1F1F2020202222222525252626262828282929292A2A2A2B2B2B
+      2B2B2B2B2B2B2A2A2A2A2A2A2B2B2B2A2A2A2A2A2A2929292929292727272727
+      2727272726262626262625252524242424242424242423232323232322222221
+      21212020201F1F1F1D1D1D1B1B1B1A1A1A1818181515151513080B165C001BD6
+      001ACF001ACD0019CB0019CB0018CA0018C90017C70016C60016C60016C50015
+      C30015C20014C10014C00013BF0013BE0011BD0011BC0011BB0010BA0010B900
+      0FB8000FB7000EB6000EB5000DB4000CB2000CB1000BB10009B10007B5010AAD
+      161C9335376C4D4D4D4F4F464848464343433F3F3F3838383232322B2B2B2323
+      231C1C1C1515150D0D0D05050503030302020202020201010100000000000000
+      00000000000000000000000000004F4F4FA9A9A9A5A5A5A1A1A19D9D9D989898
+      9595959090908D8D8D8888888484847F7F7F7C7C7C7777777473746E6E6F6B6B
+      6B6767676363636060605C5B5C5858585454555251514E4E4E4A4A4A47474744
+      44444241423E3F3E3B3B3B3939383636363233333031312F2F2F2D2D2D2A2A2A
+      2827272625252324242222222121211F1F1F1E1E1E1C1C1C1A1A1A1A19191717
+      171616161415141515141415151313131212121111111111111010100F100F0F
+      0E0E0D0D0D0D0D0D0D0D0D0D0D0D0B0C0B0B0C0C0B0B0B0B0B0B0B0B0B0B0A0A
+      0B0B0A0A0A0A0A0A0A0A0A0A0A0A0909090A09090A0909090909090908080808
+      0808080808080808080708070807070807070808070707070707070707070707
+      0706070706070706070706060606060706060606060606050605060506050606
+      0505060506050505050505050505040504050405050505040504040505040404
+      0404040404040404030404040404040403030303040404040303030303030303
+      0303030302030303020202020203020203030302030202020202020202010202
+      0102010102020201020201010102010201010201010101010101020001010001
+      0101010101010101010101000000000000010001000101010000000001000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000003030307979793030303030303030303030303030303030303030
+      303030303030303030303030303030303333333636363838383A3A3A3C3C3C31
+      31312F2F2F2F2F2F2F2F2F2F2F2F3534343A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A39
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393939393938393938393938393838393838393838393838393838383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383833333333333333333333333333333333333336353537373737373737
+      3737373737373737373737373737373737373736373736373636373636373636
+      3736363636363636363636363636363636363636363636363636363636363636
+      3636363636363636363636363636363536363536353536353536363636363636
+      3636363636353636363635353536363636363535353535353534353534353535
+      3534343534343534333534343332322E2D2D2D2E2E2E2D2D2E2E2E2F2F2F3030
+      303434344243434848474B4B4C5050515555555958585A5B5A5656563D3D3D33
+      33333333333334343535343536353636363837373838383939393B3B3B3C3C3C
+      3E3E3E3F3F3F4040404342434444444645454747474949494C4C4C4E4E4E5050
+      4F5352525555555656565A5A5A636363696A6A6C6C6C6F6F7072737276757579
+      79797C7C7C7B7B7B7777787B7B7B7E7E7E8282838585868A8A8A8E8E8E949494
+      9797979B9B9BA0A0A0A3A3A3A7A7A7AAAAAAAEAEAEAEAEAD5655551D1D1D1F1F
+      1F2121212424242626262727272929292A2A2A2B2B2B2C2C2C2C2C2C2C2C2C2C
+      2C2C2B2B2B2C2C2C2B2B2B2B2B2B2A2A2A2A2A2A292929292929272727272727
+      2727272626262626262525252424242424242424242323232323232121212020
+      201F1F1F1E1E1E1B1B1B191919171717151515151308091879001CDD001ACE00
+      1ACE001ACD0019CB0019CB0018CA0018C90017C70016C60016C60016C50015C3
+      0015C20014C10014C00013BF0013BE0011BD0011BC0011BB0010BA0010B9000F
+      B8000FB7000EB6000EB5000DB4000CB2000CB2000CB0000BAF000AB00007B200
+      07B013189735386C4D4D4D4E4E464848474242423C3C3C3636362E2E2E272727
+      1F1F1F1919191010100808080303030202020202020101010000000000000000
+      00000000000000000000000000414141A5A5A5A5A5A5A1A1A19D9D9D98999895
+      95959090908C8C8C888888848383807F807B7B7B7777777273726F6F6E6A6A6A
+      6666666262625E5F5F5A5B5B5858585354534F504F4D4D4D4A494A4646464444
+      444140413D3D3D3B3A3B3838383635353232332F302F2E2E2E2C2C2C2A292A26
+      27272424252324232222222020201D1E1E1D1D1D1B1A1A1A1919181818171717
+      1516161514141515151314131212121111121111111010100F0F100E0F0E0F0E
+      0E0D0D0D0D0D0D0D0D0D0D0D0D0B0C0B0B0B0C0B0B0B0B0B0B0B0A0B0A0B0A0A
+      0A0A0A0A0A0A0A0A0A0A0A090A09090909090909090909090909080909080808
+      0808080708080808080808080808080708070807070707070707070707060707
+      0706070706070606060606060606060606060606060606060605060505060506
+      0605050505050505050505040505040505040504050404050404040405040404
+      0404040404040303040304040403030303030304030303030303030303030203
+      0302030303020302030203030303030302030202020202020302020202020202
+      0202020101020202010201010101010101010101010101020101010101010101
+      0001010001010100010001010100000101000100000001000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303434343636363838383A3A3A3D3D3D2E2E2E2F2F
+      2F2F2F2F2F2F2F2F2F2F3636363A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A3939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393839393839393839383839383839383839383839383838383838383838
+      3838383838383838383838383838383838383838383838383838383838373636
+      3333333333333333333333333333333333333737373737373737373737373737
+      3737373737373737373737373737373737373637373637363637363637363637
+      3636363636363636363636363636363636363636363636363636363636363636
+      3636363636363636363636363636353636353635353636363736363636363636
+      3636353636363636363636353536363536363536353535353435353436343435
+      34343534343434342E2E2E2E2E2D2E2D2E2D2E2D2E2E2E313130343434444444
+      4949494D4C4D5151505657565B5B5A5C5C5C4A4A4B3535353333333333333434
+      343535353534353636363838383738383939393A3A3A3C3C3C3D3D3D3E3D3E40
+      40404242424444444545454747474A49494A4A4A4D4D4D4F4F4F525251545353
+      5756575858595B5B5C5E5E5E6464646D6D6D7172727574757878777A7A7A7F7F
+      7F8181818181817D7E7E81818285858589898A8C8C8D9090919696969B9B9B9F
+      9F9FA3A3A3A7A7A7AAAAAAAEAEAEAEAEAE5353531F1F1F202020222222242424
+      2727272828282A2A2A2B2B2B2D2D2D2D2D2D2E2E2E2D2D2D2D2D2D2D2D2D2C2C
+      2C2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A2A2A2A29292929292927272727272727
+      27272626262626262525252424242424242424242323232222222121211F1F1F
+      1E1E1E1C1C1C191919161616151513141311061994001CDA001BD0001ACE001A
+      CE001ACD0019CB0019CB0018CA0018C90017C70016C60016C60016C50015C300
+      15C20014C10014C00013BF0013BE0011BD0011BC0011BB0010BA0010B9000FB8
+      000FB7000EB6000EB5000DB4000CB2000CB2000CB0000BAF000BAF000AAE0007
+      B10007AF121896383A684F4F4A4D4D464646464040403A3A3A3232322B2B2B22
+      22221C1C1C1313130A0A0A040404020202020202010101000000000000000000
+      0000000000000000000000003E3E3EA6A6A6A5A5A5A1A1A19D9D9D9898989494
+      949090908C8C8C8787878283837E7F7E7A7A7A7676767272716E6E6D696A6A66
+      66666262625E5E5E5A5A5A575757535253504F4F4C4C4C494949454545434242
+      3F3F3F3C3C3C3A3A3A3736373434343231312F302F2D2D2E2B2B2B2929292726
+      272323242323232222211F1F1F1E1E1E1C1B1C1A1B1A19191917171817171715
+      15151514151515151413131312121111111111111010100F0E0F0E0E0E0D0D0E
+      0D0E0D0D0D0D0D0D0C0C0C0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B0A0B0A0A0A0A
+      0A0A0A0A0A0A0A0A0A0909090909090909090909090808090908090908080808
+      0809080808080808070807080708070707070807070707070607070707060607
+      0707060706070606070606060706060606060606060506050605060606060505
+      0505050505050505050505050505050405050404040504040404040404040404
+      0404040403040403040403030303040404040303030303030403030303030303
+      0303030302020203020303030302030302020302020202020202020202020201
+      0101010201020101010201010101010201010101010101010101010101010001
+      0001010001010001010101010100000000000100000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      30303030303131313434343636363939393B3B3B3B3B3B2E2E2E2F2F2F2F2F2F
+      2F2F2F2F2F2F3737373A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A393A3A393A3A393A39393A39393A39393A39393A393939393939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939383939383938383938383938383938383938383838383838383838383838
+      3838383838383838383838383838383838383838383838383835353533333333
+      3333333333333333333333343434373737373737373737373737373737373737
+      3737373737373737373737373737373737363737363736363736363736363736
+      3636363636363636363636363636363636363636363636363636363636363636
+      3636363636363636363636363635363636373636373636373636363636363636
+      3635353636363535363536353535353535353535353535353535343534343534
+      343030302E2D2E2E2E2D2D2D2E2E2E2E3030303332334242414A49494D4D4D52
+      52525757575A5A5A5B5B5B3E3E3F313232333233333433333334353434353535
+      3636363838383837373838383939393C3C3C3C3C3C3F3E3E4040404141414243
+      43454544474647484948494A494C4C4C4E4E4E5151515352525655555858575B
+      5A5B5D5D5E6061606363636767677170717776777979797C7C7C818181848484
+      8888888585858585868888888C8C8D8F8F909494949898989D9D9DA3A3A3A6A6
+      A6AAAAAAAEAEAEAEAEAE5454541F1F1F2121212323232626262828282A2A2A2C
+      2C2C2D2D2D2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2D2D2D2C2C2C
+      2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A2A2A2A2929292929292727272727272727
+      272626262626262525252424242424242424242323232222222020201E1E1E1B
+      1B1B1A1A1A171717151412131417031AAE001CD8001CD1001BD0001ACE001ACE
+      001ACD0019CB0019CB0018CA0018C90017C70016C60016C60016C50015C30015
+      C20014C10014C00013BF0013BE0011BD0011BC0011BB0010BA0010B9000FB800
+      0FB7000EB6000EB5000DB4000CB2000CB2000CB0000BAF000BAF000AAD0009AD
+      0006AF0007AC191E8D42425E5151474A4A474343433D3D3D3636362D2D2D2626
+      261E1E1E1515150D0D0D05050502020202020201010100000000000000000000
+      00000000000000000000003E3E3EA5A5A5A5A5A5A1A1A19C9C9C989899939393
+      8F8F8F8B8B8B8686868283827E7E7E7A7A7A7575757271716D6D6D6A69696564
+      646161615D5C5D5959595556555151514F4F4F4B4B4B4747474444444242423E
+      3F3E3B3B3B3939393636353332323031312F2F2F2C2C2C2A2B2A272828262526
+      2423242222232121211E1E1E1D1D1D1B1B1B1A1B1A1818181717171616161515
+      15141414141313121212121111111111101010100F100F0F0F0D0E0E0D0D0D0D
+      0D0D0D0D0D0B0B0C0B0C0C0B0B0B0B0B0B0B0B0B0B0A0B0B0A0B0A0A0A0B0A0A
+      0A0A0A0A0A0A090A09090A090909090909090909090909090909080908090808
+      0808080808080807080708070807070807080707070707070707070706060707
+      0607070606060606060606070606060606060605050605060605050606050505
+      0505050605050505050405050504050505050504040505050504050404040304
+      0404040404040404040403030403030303030303030303030303030203030303
+      0203020202020203020302020302020202020202020202020202020202020202
+      0202010201010102010101010101010201020101010101010001010101010101
+      0001000100010101010001000001000000000000000000000000010100000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      303131313434343737373939393B3B3B3A3A3A2E2E2E2F2F2F2F2F2F2F2F2F2F
+      2F2F3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A39
+      3A3A393A3A393A3A393A39393A39393A39393A39393A39393939393939393939
+      3939393939393939393939393939393939393939393939393939393939393839
+      3938393938393838393838393838393838393838383838383838383838383838
+      3838383838383838383838383838383838383838383434343333333333333333
+      3333333333333335353537373737373737373737373737373737373737373737
+      3737373737373737373737373737373736373736373636373636373636373636
+      3636363636363636363636363636363636363636363636363636363636363636
+      3636363636363636363637363637373637363637363637363636363636363636
+      36363535353636363636353636353635353535353635343534343332322E2E2E
+      2E2E2E2D2E2E2E2F2F2F2E2F3132324242424848494D4D4E5252525656565B5B
+      5B5C5B5C3A3A3A31313132323233333434333434343434343436353537373738
+      38383837373A3A3A3B3B3A3C3C3C3D3D3E3F3F3F404040424242444444454545
+      4848484A494A4B4C4B4E4E4E5050505353535555555757575A5B5A5D5D5C5F5F
+      5F6262626565656969696B6B6B7576757C7B7C7E7F7F8283838686868A8A8A8E
+      8E8E8A8B8B8C8C8C8F8F8F9494959797979C9B9CA0A0A0A6A6A6AAAAAAAEAEAE
+      B2B2B25757571F1F1F2121212424242727272929292B2B2B2D2D2D2E2E2E2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C
+      2C2C2C2C2C2B2B2B2B2B2B2A2A2A2A2A2A292929292929272727272727272727
+      2626262626262525252424242424242323232222222121211E1E1E1B1B1B1919
+      19181818161511121423011CC9001DD6001CD2001CD1001BD0001ACE001ACE00
+      1ACD0019CB0019CB0018CA0018C90017C70016C60016C60016C50015C30015C2
+      0014C10014C00013BF0013BE0011BD0011BC0011BB0010BA0010B9000FB8000F
+      B7000EB6000EB5000DB4000CB2000CB2000CB0000BAF000BAF000AAE000AAC00
+      08AC0005AF050AA6292C7B4D4D4F4E4E47454545404040393939303030272727
+      2020201717170E0E0E0707070202020202020101010000000000000000000000
+      00000000000000000000414141A9A9A9A5A5A5A1A1A19C9C9C9898979393938E
+      8E8E8B8B8B8585858182827D7D7D7878787474747070706C6C6C676767646363
+      6060605B5B5B5858585455545051504D4D4D4A4A4A4747464444444041403E3E
+      3D3A3A3A3838383535353332333030302E2D2E2C2C2C29292927272725252423
+      23232221211F1F1F1E1E1E1C1C1C1B1B1B19191A171817161616151515151515
+      1515151313121111121112121111111010100E0E0F0F0F0E0E0D0D0D0D0D0D0D
+      0D0D0D0D0B0C0C0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B0A0A0B0B0A0A0A0A0A0A
+      0A0A0A090A0A0A09090909090909090909080908090809090808080808080808
+      0808080807080808080808080707070707070707070707070607070607070606
+      0607060706070707060606060606060605050606050606060605050505050505
+      0506050505050505040505040504040505050404040404050404040404040404
+      0403040403040304030404040403030304030303030303030303030303030303
+      0302030303030302030202030202020203020203020202020202020102020202
+      0102020202020202010101010202010201010101010101010101010101010101
+      0001010100010001010100000100000000000000010000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030303030323232
+      3535353737373939393B3B3B3737372E2E2E2F2F2F2F2F2F2F2F2F2F2F303A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A
+      3A393A3A393A39393A39393A39393A39393A3939393939393939393939393939
+      3939393939393939393939393939393939393939393939393939383939383939
+      3839383839383839383839383839383838383838383838383838383838383838
+      3838383838383838383838383838383838333333333333333333333333333333
+      3333333636363837373737373737373737373737373737373737373737373737
+      3737373737373737373737373737373637373637363637363637363637363636
+      3636363636363636363636363636363636363636363636363636363636363636
+      3636363636363737373737373737363736363736363636363636363636363636
+      363636363636363636353636353535353535353435342E2F2E2E2E2E2E2E2E2E
+      2E2E2F2F2F3030303D3D3D4847474D4D4C5252525756565C5B5B5B5B5B3A3A3A
+      3130313132323332333333333333333434343536363636363838383838383938
+      39393A393C3C3C3D3C3D3E3F3E4040404141414343444545454647474949494A
+      4B4A4E4D4E4E4F4F5151515353535757575859595B5C5C5F5F5F616162646464
+      6768676B6B6B6E6E6E7272727A7A7A8182818584848989898C8C8D9090909494
+      949090919393949697979B9B9C9F9E9FA3A3A3A8A8A8ADADADB2B2B263636320
+      20202222222525252828282A2A2A2C2C2C2E2E2E2F2F2F2F2F2F313131313131
+      3131313030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C
+      2C2C2C2C2B2B2B2B2B2B2A2A2A2A2A2A29292929292927272727272727272726
+      26262626262525252424242424242323232121211F1F1F1C1C1C191919171717
+      16150F0F163C001ED2001DD6001DD3001CD2001CD1001BD0001ACE001ACE001A
+      CD0019CB0019CB0018CA0018C90017C70016C60016C60016C50015C30015C200
+      14C10014C00013BF0013BE0011BD0011BC0011BB0010BA0010B9000FB8000FB7
+      000EB6000EB5000DB4000CB2000CB2000CB0000BAF000BAF000AAE000AAD0009
+      AB0007AC0003AF1216963E40625150474848464242423A3A3A3232322A2A2A22
+      2222181818101010070707020202010101010101000000000000000000000000
+      0000000000000000004E4E4EA9A9A9A5A5A5A0A0A09B9B9B9797979393938D8D
+      8D8A898A8585858081817C7C7C7777777474746F6E6F6B6B6B6667666262625E
+      5E5E5B5B5B5757575253524F4F4F4C4C4D4949494545454342433F3E3F3C3B3B
+      3939393737373434343031302F2F2F2D2D2D2A2A2A2828282625262424242323
+      232121211E1E1E1D1D1D1B1A1B1B1A1B18181818171716171615151515151414
+      14141213131112111111111010100F0F0F0F0F0F0E0D0D0D0D0D0D0D0D0D0D0D
+      0C0C0C0C0C0B0B0B0C0B0B0B0B0B0B0B0B0B0A0B0B0A0A0A0A0A0A0A0A0A0A0A
+      090A0A0A09090A09090909090909090809090908090909080908080908080808
+      0808080808070808080808070707070708070707070707070707070706070707
+      0707060606070606070606060606060605060505060606060505050606050505
+      0505050505050505050504050505050505050404050404040404040404040403
+      0403040304030304030404030303030303040303030303030303030303030302
+      0302030302030202020302030302020202020202020202020202020202020202
+      0202020101010102010101020101020101010101010101010101010101010101
+      0001010101010001010100000000000100000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      3030303030303030303030303030303030303030303030303032323235353537
+      37373A3A3A3C3C3C3635362F2F2F2F2F2F2F2F2F2F2F2F3232323A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A
+      393A39393A39393A39393A39393A39393A393939393939393939393939393939
+      3939393939393939393939393939393939393939393939393938393938393838
+      3938383938383938383938383838383838383838383838383838383838383838
+      3838383838383838383837373733323233333333333333333333333333333338
+      3737383737383737373737373737373737373737373737373737373737373737
+      3737373737373737373737373737363737363736363736363736363736363636
+      3636363636363636363636363636363636363636363636363636363636363637
+      3636373737373737373737373736373636363636363636363636363636363535
+      3535363635353635353635343635353131322E2E2E2F2E2E2E2E2E2F2F2F3030
+      303635364847474C4C4C5151515757575B5C5C5C5B5B39393931313131313132
+      32323332323433333434343534353635353838383838383838383A3A3A3B3C3C
+      3C3C3C3E3E3D403F404140414344434545454646474848484A4A494D4D4D4F4F
+      4F5252515353535656575958585B5B5B5E5E5E6161606464636766666969696D
+      6E6D7070707474747777778080808787878A8B8A8F8F8F939393979797989898
+      9797979A9A9A9E9E9EA3A3A3A6A6A7ABABABB2B2B27070702020202323232626
+      262828282B2B2B2D2D2D2F2F2F30303031313132323232323232323232323232
+      32323030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C
+      2C2C2C2B2B2B2B2B2B2A2A2A2A2A2A2929292929292727272727272727272626
+      262626262525252424242323232222222020201D1D1D1A1A1A17171717150B0D
+      1858001EDB001ED6001DD4001DD3001CD2001CD1001BD0001ACE001ACE001ACD
+      0019CB0019CB0018CA0018C90017C70016C60016C60016C50015C30015C20014
+      C10014C00013BF0013BE0011BD0011BC0011BB0010BA0010B9000FB8000FB700
+      0EB6000EB5000DB4000CB2000CB2000CB0000BAF000BAF000AAE000AAD0009AB
+      0008AA0004AE0208A72A2D794F4F4B4B4B464343433C3C3C3434342B2B2B2323
+      2319191911111108080802020201010101010100000000000000000000000000
+      00000000000000005D5D5DA9A9A9A4A4A49F9F9F9B9B9B9696969191918D8D8D
+      888888848484807F807B7B7B7676767272726E6E6E6A6A6A6565666161615D5D
+      5D5959595656565152524E4E4E4B4C4B4747474444444242423F3E3E3B3C3B39
+      3939363636333233302F2F2E2E2E2C2D2C2A2A2A272727242525232323222121
+      2020211E1E1E1C1C1C1B1A1B1A191A1817181717171516161515151414141312
+      131112111111121010111010100F0F0F0E0D0E0D0D0D0D0D0D0D0D0D0C0C0C0C
+      0C0C0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0A0A0A0B0A0A0A0A0A0A0A0A0A0A0A
+      0A0909090A090909090909090909090808090908090808080808080808080808
+      0808080808080808070708070707080707070706070706070707060606070707
+      0707060607060706060606060606060606060605050505060505050505050505
+      0505050505050405050405040504050405040504040404040404040404040403
+      0404040304030404030304040303030404030304030303030303030303030302
+      0202030203020303020202020202020202020202020202020202010102010102
+      0102020101020102010101010101020101010101010101010101010101000101
+      0100000000000001000000000000000100010000000100000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303333333535353737373A3A
+      3A3C3C3C3333332F2F2F2F2F2F2F2F2F2F2F2F3232323A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A39
+      3A39393A39393A39393A39393A39393939393939393939393939393939393939
+      3939393939393939393939393939393939393939393839393839393839383839
+      3838393838393838393838383838383838383838383838383838383838383838
+      3838383838383635353332323332323333333333333333333434343837373837
+      3738373738373737373737373737373737373737373737373737373737373737
+      3737373737373737373737373736373736373636373636373636373636363636
+      3636363636363636363636363636363636363636363636363636363737373737
+      3737373737373737373737373636363636363636363636363636353636363635
+      36363536353636353434342F2F2E2F2E2F2E2F2E2E2E2E2F2F2F323232434343
+      4B4B4B504F505656565A5A5B5D5E5E3D3C3C3131313131313232323233333434
+      343434343435343636353736363737373839393939393A3A3A3C3C3C3D3D3D3F
+      3F3F4040414242414343444545454848484A4A4A4C4C4C4E4E4E505050535252
+      5454545758575B5A5A5D5D5E60606063636265666669696A6C6C6D6F706F7273
+      727878777A7A7A7E7E7E8686868D8D8D9191919595959A99999D9D9D9D9D9D9E
+      9E9EA1A1A1A6A5A6AAABABAFAEAF7F7F7F2222222323232626262929292C2C2C
+      2E2E2E3030303131313232323434343333333333333333333333333232323232
+      323030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C
+      2C2C2B2B2B2B2B2B2A2A2A2A2A2A292929292929272727272727272727262626
+      2626262525252323232222222020201E1E1E1B1B1B1818181715090B1A77001F
+      E4001ED6001ED5001DD4001DD3001CD2001CD1001BD0001ACE001ACE001ACD00
+      19CB0019CB0018CA0018C90017C70016C60016C60016C50015C30015C20014C1
+      0014C00013BF0013BE0011BD0011BC0011BB0010BA0010B9000FB8000FB7000E
+      B6000EB5000DB4000CB2000CB2000CB0000BAF000BAF000AAE000AAD0009AB00
+      09AA0006AB0003AD191D8D4648554D4D454545443D3D3D3535352C2C2C232323
+      1B1B1B1212120909090202020101010101010000000000000000000000000000
+      00000000010101707070A8A8A8A3A4A49E9E9E9A99999696969091908C8C8B87
+      87878382837E7E7E7A7A7A7474747071706C6C6C6869686464636060605C5C5C
+      5858585554555050514D4D4D4A4A4A4646464344444040403D3D3C3A3A3A3737
+      373535353132323030302E2E2D2A2A2A2829282626252424242223232222221E
+      1E1E1D1D1D1B1B1B1A1A1A191918181717161616151515151515141414131313
+      1111121112111010100F0F0F0F0F0F0E0D0E0D0D0D0D0D0D0C0C0C0C0C0C0C0C
+      0C0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0A0B0A0A0A0A0A0A0A090A0A0A0A0A0A
+      0A09090909090909090909090909090808080809090808080808080808070808
+      0808080708070808070807070807070707070607060707060606060706070707
+      0706060706060606060605060605060605050506050506050605050606050505
+      0505050504050504050404050405050404050404040404040404040404040304
+      0404040404030303040403030303030303030303030303030303030203020203
+      0202030302020202020202030302020202020202020202020201020102020202
+      0202010201010201010101010101010101010101010101010101010001010100
+      0101000101010001000000000001010100000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000030303079797930303030303030303030303030303030
+      30303030303030303030303030303030303333333636363838383A3A3A3C3C3C
+      3232322F2F2F2F2F2F2F2F2F2F2F2F3534353A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A
+      39393A39393A39393A3939393939393939393939393939393939393939393939
+      3939393939393939393939393939393939393939383939383938383938383938
+      3839383839383838383838383838383838383838383838383838383838383838
+      3838353434333232333232333232333333333333353535383737383737383737
+      3837373837373737373737373737373737373737373737373737373737373737
+      3737373737373737373737373637373637363637363637363637363636363636
+      3636363636363636363636363636363636363636363636373737373737373737
+      3737373737373736363636363636363636363636363636363536363636353536
+      353636353231312E2E2E2E2E2E2E2F2E2F2F2F3030303C3C3C4949494D4E4E54
+      54545A5A595E5E5E454546303131323231313231323232333334343434343434
+      3534353636363736363938393838393A3A3B3D3C3C3C3C3D3E3E3E4040404141
+      414443444545454747464848484A4A4B4D4D4D4F4F4F52515253545456565758
+      59585C5C5C6060606262626564656868676C6C6C6F6E6F737273757576797979
+      7C7C7C8080808686858E8F8F9493949898989C9C9CA1A1A0A4A4A4A1A1A1A5A6
+      A6AAA9AAADAEAE9393932929292323232727272929292C2C2C2F2F2F30303032
+      3232333333343434343434343434343434333333333333333333323232323232
+      3030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C
+      2C2B2B2B2B2B2B2A2A2A2A2A2A29292929292927272727272727272726262625
+      25252424242222222020201E1E1E1B1B1B191918171610071C940020E3001FD7
+      001ED6001ED5001DD4001DD3001CD2001CD1001BD0001ACE001ACE001ACD0019
+      CB0019CB0018CA0018C90017C70016C60016C60016C50015C30015C20014C100
+      14C00013BF0013BE0011BD0011BC0011BB0010BA0010B9000FB8000FB7000EB6
+      000EB5000DB4000CB2000CB2000CB0000BAF000BAF000AAE000AAD0009AB0009
+      AA0007AA0003AE0B109D3C3D614F4E454545443E3E3E3535352D2D2D2424241B
+      1B1B121212090909020202010101010101000000000000000000000000000000
+      0000000A0A0A888888A7A7A7A3A3A39E9E9E9999989494948F8F8F8B8B8B8686
+      868182817D7D7D7878787474746F6E6E6B6B6B6767676362625E5E5E5B5B5B57
+      56575252534F4F4F4C4C4D4949484444444242413F3F3F3B3C3C393939363636
+      3333332F2F302E2E2E2D2D2C2A2A2B2827272525252323232121222020211E1F
+      1E1C1C1C1B1B1B19191917181817171616151516151514141413121212121212
+      12121110101011100F0F0F0E0E0E0D0D0E0D0D0D0D0D0D0C0C0C0C0C0C0C0C0C
+      1211111312131313131313121312121212131212121212121112121212111111
+      120E0E0F0D0D0D0D0D0D0D0D0C0A0A0B09080908080809080808080808080807
+      0808080808070807070807070708070707070707070706060707060707060706
+      0606070606060606060606060605060606050605050506050506050505050505
+      0505050505050505050505050404050405050404040504040404030404030404
+      0304040403040403040403040403030303030303030303030303030303030203
+      0202020303020202020202020202020202020101020102020202020202020201
+      0201020101020101010101020101010201010101010101010101010100010001
+      0101000000000001010000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000003030307979793030303030303030303030303030303030303030
+      303030303030303030303030303434343636363838383A3A3A3C3C3C3030302F
+      2F2F2F2F2F2F2F2F2F2F2F3534353A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39
+      393A39393A39393A393939393939393939393939393939393939393939393939
+      3939393939393939393939393939393938393938393838393838393838393838
+      3938383938383838383838383838383838383838383838383838383838383434
+      3433323233323233323233323233333336363638383738373738373738373738
+      3737383737373737373737373737373737373737373737373737373737373737
+      3737373737373737373737363737363736363736363736363736363636363636
+      3636363636363636363636363636363637373737373737373737373737373737
+      3737363636363636363636363636363636363636353636363535353635353535
+      2E2F2F2F2F2F2E2E2F2E2E2E2F302F3333334545454C4C4C5151515757575C5D
+      5D53535230313030303132323132313232323334343434343434343436363635
+      3536383837383939393A393A3A3A3C3D3C3D3D3D3F3F3F414141424242444443
+      4646464948494A4A4A4D4D4D4E4F4E5151515353535656565858585B5B5C5E5E
+      5E6161616464646767676A6A6A6E6E6E7171707474757878787C7C7D807F7F84
+      84848787878D8D8D969696999A999E9E9EA3A3A3A7A7A7A9A9A9A8A8A8ADADAD
+      A3A3A43737372424242727272929292D2D2D2E2E2E3131313333333434343535
+      3535353535353535353535353534343433333333333333333332323232323230
+      30303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C
+      2B2B2B2B2B2B2A2A2A2A2A2A2929292929292727272727272727272626262525
+      252323232121211F1F1F1D1D1D1A1A18171716061DA40020E7001FD8001FD700
+      1ED6001ED5001DD4001DD3001CD2001CD1001BD0001ACE001ACE001ACD0019CB
+      0019CB0018CA0018C90017C70016C60016C60016C50015C30015C20014C10014
+      C00013BF0013BE0011BD0011BC0011BB0010BA0010B9000FB8000FB7000EB600
+      0EB5000DB4000CB2000CB2000CB0000BAF000BAF000AAE000AAD0009AB0009AA
+      0008A90004AC0509A532346C4E4E454646443E3E3E3535352D2D2D2424241B1B
+      1B12121208080802020201010101010100000000000000000000000000000000
+      00001A1A1A9B9B9BA6A6A6A1A1A19C9C9C9898979393938D8D8D898988858585
+      80807F7B7B7B7777777272726E6E6E6969696566666161615D5D5D5858585656
+      565152514E4E4E4B4B4A4747474444444141403E3E3E3B3B3A38393935353532
+      3232302F302E2E2E2A2A2A2829282626262424242323222222221E1F1F1D1D1E
+      1B1B1B1A1A1A1818171818181616161516151515151313131212121212111010
+      101110100F0F0F0E0E0E0E0E0E0D0E0D0E0D0D0C0C0C0C0C0C0F0F0F191A1919
+      191A1A1A1A1A1A1A1A1A1A1B1B1A1A1A1A1B1A1A1A191A1A1A1A1A19191A1A19
+      191A191919191919191918181919191819191615151414141313131111110D0C
+      0D0C0B0C08070707070807080707070707070707060707060606070607060706
+      0606060607060606060506060506060505050505060605050505050505050505
+      0505050505050404040404040405040405040404040404040304040404030403
+      0303030403030304030303030303040303030303030303020303020202030303
+      0303020202020202020202020202020202020201020202010102020201010201
+      0101010101020102020201010201010101010101010101010101010101010001
+      0000010001010100000000000000010001000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303434343636363838383A3A3A3D3D3D2E2E2E2F2F2F2F2F
+      2F2F2F2F2F2F2F3837373A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A3939
+      3A39393A39393939393939393939393939393939393939393939393939393939
+      3939393939393939393939393839393839393839383839383839383839383839
+      3838383838383838383838383838383838383838383838383838323232323232
+      3332323332323332323332323737373838373838373837373837373837373837
+      3738373737373737373737373737373737373737373737373737373737373737
+      3737373737373737373736373736373636373636373636373636363636363636
+      3636363636363636363636363737373837373737373737373737373737373636
+      363636363636363636363636363636363636363636363535363232332F2F2F2F
+      2E2E2F2F2E2F30303030303E3E3F4949494F504F5555555B5B5B5E5E5D373737
+      3130303231323232323332323333333434343434343536353536363736373939
+      383939393B3A3B3B3B3C3C3C3C3E3F3E4040404141414344444545454747464A
+      494A4B4A4B4D4D4E504F505252525454545757575A5A5A5D5D5D606060636363
+      6565666969696C6C6C6F6F6F7372737677767A7B7A7E7E7F8182818686868A8A
+      8A8D8E8D9696969D9C9DA1A1A0A5A5A5AAAAAAAFAEAEACACACADADAD4D4D4D24
+      24242626262929292D2D2D303030323232343434353535363636363636363636
+      3636363636363535353535353434343333333333333333333232323232323030
+      303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B
+      2B2B2B2B2B2A2A2A2A2A2A292929292929272727272727272727252525242424
+      2222222020201E1E1E1B1B1B191814131733041EB10020E5001FD8001FD7001E
+      D6001ED5001DD4001DD3001CD2001CD1001BD0001ACE001ACE001ACD0019CB00
+      19CB0018CA0018C90017C70016C60016C60016C50015C30015C20014C10014C0
+      0013BF0013BE0011BD0011BC0011BB0010BA0010B9000FB8000FB7000EB6000E
+      B5000DB4000CB2000CB2000CB0000BAF000BAF000AAE000AAD0009AB0009AA00
+      08A90005AB0005AA292C764D4C474646433E3E3E3535352D2D2D2424241B1B1B
+      1111110808080202020101010101010000000000000000000000000000000000
+      00343434A6A6A6A5A5A5A0A0A09B9B9B9696969191918D8D8D8888888282827F
+      7F7E7A7A7A7574747171716C6C6C6768686363635F5F5F5C5C5B585858545454
+      50504F4D4D4D4A49494545454242423F3F3F3B3C3B3939393736363433333131
+      312E2E2E2C2C2C2B2A2A2727272526252323232222221F20201E1F1E1C1C1C1B
+      1B1B191919181817161617161516161515141415131313121211121111101010
+      0F0F0F0F0F0F0E0E0E0D0E0D0E0E0D0C0D0C0C0C0C141414191919191A1A1A1A
+      1A1A1A1A1B1B1B1B1B1B1B1B1C1B1B1B1B1B1B1B1B1B1A1B1B1A1A1B1A1B1A1A
+      1A1A1A1A1A1A1A1A19191A1A1A1919191A1A1919191919191919191919191918
+      1918191616161415141010100C0C0C0909090707060707070606070607060607
+      0607060706060606050606060605050605050505050505050505050505050505
+      0505050505040405040405050505040504040405040404040404040404040303
+      0303040303040403030303030303030303030303020302020303030203030302
+      0202020203020202030202020202020202020201020202020202010102010101
+      0102010201010101010101010201010101010101010101010100010001010101
+      0001010000010100000100000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      30303030303434343636363939393B3B3B3D3D3D2E2E2E2F2F2F2F2F2F2F2F2F
+      2F2F2F3837373A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393939393939393939383939383938383938383938383938383938383838
+      3838383838383838383838383838383838383837373732323232323232323233
+      3232333232333232383838383838383837383837383737383737383737383737
+      3837373737373737373737373737373737373737373737373737373737373737
+      3737373737373737373637373637363637363637363637363636363636363636
+      3636363636373636383737383737383737373737373737373737363636363636
+      3636363636363636363636363636363635363536362F30302F2F2F2F2F2F2E2E
+      2F30302F3332334646464C4B4C5252525859585D5D5D48484731313131313032
+      3232323131333333333333343434343434353535363636383837393939393A3A
+      3B3B3A3D3C3D3D3D3D3F403F4141414342434444444646464949494A4A4A4C4D
+      4D4F4F4E5151515353535656565959595C5C5C5D5D5E6161616565656868686A
+      6A6B6F6F6F7272727676767979797C7D7D8081818586858989898D8D8D919191
+      9696969F9F9FA4A4A3A8A8A8ACADACB1B1B1B4B4B46D6D6D2323232727272929
+      292D2D2D30303033333335353536363637373737373737373737373737373736
+      3636363636353535353535343434333333333333333333323232323232303030
+      3030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B
+      2B2B2B2B2A2A2A2A2A2A29292929292928282827272726262625252523232321
+      21211E1E1E1C1C1C1A191A19170F14161E071C9C0020E4001FD9001FD7001ED6
+      001ED5001DD4001DD3001CD2001CD1001BD0001ACF001AD0001AD00019D30019
+      CE0018C90018C90017C70016C60016C60016C50015C30015C20014C10014C000
+      13BF0013BE0011BD0011BC0011BB0010BA0010B9000FB8000FB7000EB6000EB5
+      000DB4000CB2000CB2000CB0000BAF000BAF000AAE000AAD0009AB0009AA0008
+      A90006AA0004AC22257E4B4B464646433D3D3E3535352C2C2C2323231A1A1A10
+      1010070707020202020202010101000000000000000000000000000000000000
+      595959A9A9A9A4A4A39E9E9E9999999595959190908B8B8B8686868282827D7D
+      7D7978787474746F6F6F6A6A6A6767676262625F5F5F5959595655565352534E
+      4E4E4A4B4B4747474444444141413D3E3D3B3A3A393838353635323232303030
+      2E2E2E2B2B2A2929282626272424242323232120211E1F1F1D1E1E1B1B1B1A1B
+      1A181818171717161616151615141414131313121212121212111111100F0F0F
+      0F0F0E0E0E0E0E0E0E0D0D0C0C0C0E0D0D1818181A1A1A1A1A1A1A1B1B1B1B1B
+      1C1C1C1C1C1C1B1C1C1C1B1C1C1B1B1B1B1B1B1B1B1A1A1B1B1A1A1A1A1A1A1A
+      1A1A1A1A1A1A1A1A1A191A1A191A191919191A19191919191919191919191818
+      19181919191818191818181918181818181414141011110E0D0D070606070706
+      0606060606060606050606060606050605050505060505050505060505050505
+      0505050505050505050504050405040504040404040404030403040404040304
+      0403030403040403030403040303030303030203030302030303030303020303
+      0202020202020202020202030202020202020202020202020102020202010202
+      0102010101010101010201010101010101010101010001000101010100010101
+      0100000001010000000000000000000100000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303131
+      313434343737373939393B3B3B3939392E2E2E2F2F2F2F2F2F2F2F2F2F2F2F39
+      39393A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A39
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393939393938393938393938393838393838393838393838393838383838
+      3838383838383838383838383838383737363232323232323232323232323332
+      3234333338383838383838383838383738383738373738373738373738373738
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737373737373737363737363736363736363736363736363636363636363636
+      3637373738383738373738373738373737373737363636363636363636363636
+      36363636363636363636363636363535352F2F2F2F2F2E2F2E2E2F3030313031
+      3B3B3C4848494E4E4E5655555B5A5A5C5C5B3434343131313131303131313231
+      323233333535353434343435343637363737373939393939393B3B3B3B3C3C3D
+      3C3C3F3E3F4040414142414544454545454747474A4A4A4B4B4B4D4E4D4F5050
+      5353535554555757585B5A5A5D5D5D6060606263636767676A6A6A6D6D6D7071
+      707373737878787C7C7C8080808384848787878B8C8B8F8F8F9493939898989F
+      9F9FA6A6A6ABABABAFAFAFB4B4B49494942727272626262929292D2D2D303030
+      3333333535353737373838383838383838383838383838383838383636363636
+      3636363635353535353534343433333333333333333332323232323230303030
+      30303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B
+      2B2B2B2A2A2A2A2A2A2929292929292727272727272525252424242222222020
+      201D1D1D1B1B1B191A1A181710161513081C950020E5001FD9001FD7001ED600
+      1ED5001DD5001DD6001CD7001CDB001CDB001ACF0119C20417A10119BD0019CF
+      0018C90018C90017C70016C60016C60016C50015C30015C20014C10014C00013
+      BF0013BE0011BD0011BC0011BB0010BA0010B9000FB8000FB7000EB6000EB500
+      0DB4000CB2000CB2000CB0000BAF000BAF000AAE000AAD0009AB0009AA0007A9
+      0006AA0003AC21257D4B4A454544413C3C3D3434342B2B2B2222221919190F0F
+      0F06060602020202020201010100000000000000000000000000000005050582
+      8282A8A7A7A2A1A29D9D9D9999999393938F8E8E8989898484847F807F7B7B7B
+      7677777272726D6D6D6A696A6363646060605D5C5C58585855555550504F4D4D
+      4D4A4A4A4545464343433F3F3F3C3C3C3939393636363333333131312E2E2E2C
+      2C2D2A2A2B2728282525262323232222222020201F1F1E1D1D1C1B1C1B191919
+      1818181516151615151615161313131212121212121111111110100F0F0F0E0E
+      0E0E0E0E0E0E0D0D0E0E1111111919191A1A1A1B1A1A1B1C1C1C1C1C1C1C1C1D
+      1D1D1C1D1D1D1D1C1C1C1C1C1C1C1C1C1C1C1C1C1C1B1C1C1C1B1C1B1B1B1B1B
+      1B1B1B1B1B1B1B1B1A1A1B1B1B1A1B1A1B1A1A1A1A1A1A1A1A1A1A19191A1918
+      19181819191919191A191919191A1A1A1B1B1B2020200A0B0B07060607070606
+      0606060606060606050605050605050505060605050505050505050505050505
+      0505050405050504040404040404050404040404040404040404030404030304
+      0404030303040404030403030303030303030303030202020303020302020203
+      0202020303020202020202020202020202020202010202020202020101010101
+      0202010101010101010101010101010101010100000100010001010100010000
+      0101000100010100010000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030313131353535
+      3737373939393B3B3B3A3A3A2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F3B3A3A3B3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A3939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393839393839393839383839383839383839383839383838383838383838
+      3838383838383838383838363535323232323232323232323232323232343434
+      3838383838383838383838383838373838373837373837373837373837373837
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737373737373736373736373636373636373636373636363636363636373737
+      3838383838373837373837373837373636363636363636363636363636363636
+      363636363636363636363333332F2F2F2F2E2F2F2F2F2F302F3031304443434B
+      4A4B5151515757575D5D5D4A4A4A313131313131323232323231333333333434
+      3535343534353635363736363839393939393939393B3B3B3D3D3C3E3E3E3F3F
+      404141414242434445454647464949494A4A4A4D4D4D4F4F4F52525254545457
+      57575A595A5C5C5C605F5F6262626565656768686C6C6C6F6F6F737373777676
+      7A7A7A7E7E7E8282828685868A8B8A8F8E8F9494939897979B9B9BA0A0A0A8A8
+      A8AEAEADB2B2B2AEAEAE3A3A3A2626262929292D2D2D30303034343435353537
+      37373838383A3A3A393939393939393939383838383838383838363636363636
+      3636363535353535353434343333333333333333333232323232323030303030
+      303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B
+      2B2B2A2A2A2A2A2A2929292929292727272626262525252424242222221F1F1F
+      1D1D1D1B1B1B191919181712161515081C950020E4001FDD001FE0001FE3001E
+      DA011DCE031BB60619910916690C13440F11221010090A1352001AD10019CC00
+      18C90018C90017C70016C60016C60016C50015C30015C20014C10014C00013BF
+      0013BE0011BD0011BC0011BB0010BA0010B9000FB8000FB7000EB6000EB5000D
+      B4000CB2000CB2000CB0000BAF000BAF000AAE000AAD0009AB0009AA0007A900
+      06AA0003AC20247C4A49444443413C3C3C3333332A2A2A2121211717170D0D0D
+      0404040202020202020101010000000000000000000000000000001B1B1BA0A0
+      A0A6A5A5A1A1A19B9B9B9696969191918D8D8D8888888383837E7E7E7A7A7A74
+      74757070706B6B6B6767666363635E5F5E5A5A5A5656565353534F4F4F4C4C4C
+      4747474445454242423E3E3E3B3B3A3839393536363232333030302E2E2E2B2B
+      2B2928292626262424242323232121211F1E1E1D1C1D1C1B1C1A1A1A18181817
+      17171616161616161515151313131212121212121110110F100F0F0F0F0F0E0E
+      0E0E0E0D0E0D1818171A19191A1B1A1B1B1B1D1C1D1A1A1A1414151515161515
+      161515151515151515151514151818181818181718181718171B1A1A1B1B1B1B
+      1B1B1A1B1B1B1B1B1A1B1A1B1B1B1A1A1A1A1A1A1A1A1A1A191A1A1A1A1A1A19
+      1919191A1A191A1A1A1B1B1B2020202626261211110607070607060606060606
+      0606060606060606050606060605060505060506050505050505050505050505
+      0505040505050404050404040404040404040404040404040404040404040304
+      0404030303030303030303030303030303030203030303030303030203030302
+      0202020202020202020302010202020202020202010101010102020202020202
+      0101010101010101010102010101010101010100000100000100000001010000
+      0001010000010000010000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      3030303030303030303030303030303030303030303031313135353537373739
+      39393B3B3B3A3A3A2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F3B3A3A3B3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A393A3A393A3A393A39393A39393A39393A39393A393939393939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939383939383938383938383938383938383938383838383838383838383838
+      3838383838383835353532323232323232323232323232323235353538383838
+      3838383838383838383838383837383837383737383737383737383737383737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737373737373637373637363637363637363637363636363638383838383838
+      3838383837383737373737363636363636363636363636363636363636363636
+      3636363636363130312F2F2F2F2F2F2F2F2F3030303435354747474D4D4D5453
+      545A5A5A5E5E5E37373731313231313132323232323233333334343434353434
+      353536373637363638383839393A3A3A3B3C3C3C3D3D3D3F3F3E404040424141
+      4443444645454748484A49494B4B4B4E4E4E4F4F505253525455545857585A5A
+      5A5D5D5E6060606464646767676A6A6A6E6E6E7272727474747878797D7D7D80
+      80808585858989898D8C8D9090919695969999999E9F9EA2A2A2A9A9A9B0B0B0
+      B5B4B56464642626262929292C2C2C3030303232323636363838383939393939
+      393A3A3A3A3A3A3A3A3A3A3A3A38383838383838383838383836363636363636
+      3636353535353535343434333333333333333333323232323232303030303030
+      3030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B
+      2B2A2A2A2A2A2A2929292828282727272626262525252323232121211F1F1F1C
+      1C1C1B1B1B191919181712161616071D9D021FCE061CA1091A7D0D1755101430
+      12131913120E13110512100910100C10100D100F0905168E001AD60019CA0018
+      CA0018C90017C70016C60016C60016C50015C30015C20014C10014C00013BF00
+      13BE0011BD0011BC0011BB0010BA0010B9000FB8000FB7000EB6000EB5000DB4
+      000CB2000CB2000CB0000BAF000BAF000AAE000AAD0009AB0009AA0007A90006
+      AA0003AC20247C49484242424039393A3131312828281F1F1F1515150B0B0B04
+      04040202020202020101010000000000000000000000000000004A4A4AA9A9A9
+      A4A4A49E9E9E99999A959595908F908B8B8B8585858181817C7C7C7777777272
+      726F6E6E6A6A6A6565656161615C5D5D5858595555565151514D4D4D49494946
+      46464343433F3F403B3C3C3939393637363433343030302E2E2E2C2C2C292A2A
+      282727252425232323222222201F201E1D1E1C1C1B1B1A1A1818181818181616
+      1616161514141413141312121212121211111110100F100F0F0F0E0E0E0E0E10
+      10101A19191A1A1A1C1B1C1C1C1C1D1D1C0F0F100D0D0D0D0D0D0D0D0D0D0D0D
+      0D0C0D0C0D0D0D0D0C0C0C0C0C0C0C0C0C0B0C0B0B0B0B0B0C0B0B0B0B0B0F0F
+      0F0E0F0F1212131313131718171818181A1A1A1A1A1A1A1A1A19191A191A191A
+      1B1B1B1B1C1F1F1F2424242929291B1B1B070707060606060606060606060606
+      0606060606050606050505060605060605050505050505050505050504050505
+      0505050505040404040404040404040404040404040404040404040404040304
+      0403030303030403030303030303030303020303030303020203030302030202
+      0302020202020202020202020102020201020102010101020202010202020102
+      0102010102010101010101010101010101010101010001010100010000000001
+      0000000000010000000100000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303232323535353737373939393B3B
+      3B3838382E2E2E2F2F2F2F2F2F2F2F2F2F2F2F3B3A3A3B3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A39
+      3A3A393A3A393A3A393A39393A39393A39393A39393A39393939393939393939
+      3939393939393939393939393939393939393939393939393939393939393839
+      3938393938393838393838393838393838393838383838383838383838383838
+      3838383434343232323232323232323232323232323635353838383838383838
+      3838383838383838383838383738383738373738373738373738373738373737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737373737363737363736363736363736363736363838383838383838383838
+      3838383737373736363636363636363636363636363636363636363636363636
+      36362F2F2F2F2F2F2F2F2F2F2F2F3131313D3C3C4A4A4A4F4F4E5555555B5B5B
+      5253533132313132323231313232323232323333333535353434343636353736
+      373738373A39393A3A393B3B3B3D3D3D3D3D3D40404041414143434345444447
+      46464849494B4A4B4D4D4D504F505252525453545757575A5A5A5C5C5C5F5F5F
+      6363626565656969696C6C6C6F6F6F7373737677777B7C7B7F7E7E8382828788
+      878B8B8B8F8F8F9493949999999C9C9CA1A2A1A6A7A6ABABABB3B3B391919127
+      27272929292C2C2C3030303333333636363737373A3A3A3B3B3B3B3B3B3B3B3B
+      3B3B3B3B3B3B3A3A3A3A3A3A3838383838383838383838383636363636363636
+      3635353535353534343433333333333333333332323232323230303030303030
+      30302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B
+      2A2A2A2A2A2A2929292828282626262626262424242323232121211F1F1F1D1D
+      1D1C1C1C1A1A1A18181416171D15172316151417150A16140B15140F15141215
+      14131313131212121111111111111110090E112A0119C30019CF0019CA0018CA
+      0018C90017C70016C60016C60016C50015C30015C20014C10014C00013BF0013
+      BE0011BD0011BC0011BB0010BA0010B9000FB8000FB7000EB6000EB5000DB400
+      0CB2000CB2000CB0000BAF000BAF000AAE000AAD0009AB0009AA0007A90006AA
+      0004AB26297348474040403F3838382F2F2F2626261D1D1D1313130909090303
+      030202020202020101010000000000000000000000000101017F7F7FA7A7A7A2
+      A2A29D9D9D9798979393938E8D8D8888888484837F7F7F7A7A7A757575707070
+      6C6C6C6767676363635F5F5F5A5B5A5757575353534F4F4F4B4C4C4848484544
+      444141413E3E3E3B3B3B3839393535363333322F2F2F2E2E2E2B2B2B29292926
+      27272424242222222121211F1F1F1D1D1D1C1B1B1A1919181818171717161616
+      161616131414121312121212111111111111100F100F0E0E0E0E0E1616161919
+      1A1B1A1B1B1C1C1D1E1D1A191A0E0D0D0E0D0E0E0D0D0D0D0D0D0D0D0D0D0C0C
+      0D0D0D0C0C0C0C0C0C0C0C0C0C0C0B0B0C0C0B0B0B0B0B0C0B0B0B0B0B0B0B0B
+      0B0B0B0B0B0B0A0A0A0A0A0A0A0A0A0D0D0D1010111414131716171A1B1B1E1E
+      1E2223232827272D2D2D23232307070606070707070707060706060606060706
+      0606050606050606050606050606050605050505050505050505050505050504
+      0405050504050404040404040504050404040303040404040303040404030403
+      0403030404030303030303030303030303020303030203020302020203020203
+      0303020202020202020202020202020102010202010102010202020201010102
+      0101010102010101010101000101010101010101000101010001000000010100
+      0101000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000030303079797930303030303030303030303030303030
+      30303030303030303030303030303232323535353737373939393B3B3B363536
+      2F2F2F2F2F2F2F2F2F2F2F2F3232323B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A
+      3A393A3A393A39393A39393A39393A39393A3939393939393939393939393939
+      3939393939393939393939393939393939393939393939393939383939383939
+      3839383839383839383839383839383838383838383838383838383838383834
+      3434323232323232323232323232323232373737383838383838383838383838
+      3838383838383838383838373838373837373837373837373837373837373737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737373736373736373636373636373737383838383838383838383838383838
+      3737373636363636363636363636363636363636363636363636363434342F2F
+      2F2F2F2F2F2F2F3030303131314141424B4B4B5050505757575D5D5C41424231
+      3131323131323232323332333334343434353535343535363635373737393938
+      393A3A3A3A3A3B3C3B3D3D3D3E3F3E4040404242424444444546464746474A49
+      494B4B4B4E4E4E5050505353535555555858585B5B5A5D5E5E61616164646467
+      68686B6A6B6E6E6E7272727575757879797D7D7D8181818585858A8A8A8E8E8E
+      9292929596969B9B9AA0A09FA5A5A5A9A8A9ADADAEB0B0B04242422929292C2C
+      2C2F2F2F3333333636363838383A3A3A3B3B3B3C3C3C3C3C3C3C3C3C3B3B3B3B
+      3B3B3B3B3B3A3A3A3A3A3A383838383838383838383838363636363636363636
+      3535353535353434343333333333333333333232323232323030303030303030
+      302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2A
+      2A2A2A2A2A2929292828282626262626262424242323232121211F1F1F1D1D1D
+      1C1C1C1B1B1B1A19171919151817161817171818181717171616161616161515
+      15151515131313121212111111110F04081570001AD80019CB0019CB0018CA00
+      18C90017C70016C60016C60016C50015C30015C20014C10014C00013BF0013BE
+      0011BD0011BC0011BB0010BA0010B9000FB8000FB7000EB6000EB5000DB4000C
+      B2000CB2000CB0000BAF000BAF000AAE000AAD0009AB0009AA0008A90006AA00
+      05AA2D2F6947473D3D3D3D3636362C2C2C2323231A1A1A101010060606030303
+      020202020202010101000000000000000000000000212121A4A4A4A5A5A5A0A0
+      A09B9B9B9696969090918B8B8B8686868282827D7D7D7877777373736E6F6F6A
+      6A6A6565656161615D5C5C5858595655565453534D4D4D4A4A4A464646434343
+      403F3F3C3C3D3939393636373333333130302E2E2E2C2C2C2A2A2A2727282424
+      242323232222221F1F1F1E1E1D1B1C1C1A1A1A19181917181716161615161615
+      15141313141212121212121111111010100E0F0F0F0F101B1B1B1A1A1A1B1C1C
+      1C1D1D1D1D1E1313130E0D0E0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D
+      0D0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0B0B0C0B0C0B0B0B0B0B0B0B0B
+      0B0B0B0A0B0B0A0A0B0A0A0A0A0A0A0B0A090A0A0A0A0A0F0F10212020252525
+      2929292F2F2F2D2D2D0607070707060706070607060606070706060606060606
+      0606050606050505060505060505050505050505050505050505050505040505
+      0504050404040404040504040404040303040404040404030304030303030304
+      0304040304040303030303030303020203020303030303030202030203020302
+      0202020202020202020201010202010102020101010102010202020101020101
+      0101010101010101010101000101010100000100010000000001000101000100
+      0100000000000000000001000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000003030307979793030303030303030303030303030303030303030
+      303030303030303030303232323535353737373A3A3A3C3C3C3635362F2F2F2F
+      2F2F2F2F2F2F2F2F3232323B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A
+      393A39393A39393A39393A39393A39393A393939393939393939393939393939
+      3939393939393939393939393939393939393939393939393938393938393838
+      3938383938383938383938383838383838383838383838383838383333333232
+      3232323232323232323232323237373738383838383838383838383838383838
+      3838383838383838383837383837383737383737383737383737383737373737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737373637373637363637373738383838383838383838383838383837363636
+      36363636363636363636363636363636363636363636363333332F2F2F2F2F2F
+      2F2F2F3030303232324747474C4C4B5353535857585D5D5D3737373131323231
+      323232333232323333333434343535353535353636373737373938393A3A393C
+      3B3B3C3C3C3D3D3D3F3F3F4141424242424545454546464949494A4A4A4C4C4D
+      4F4F4F5251515455545757575A595A5C5C5C60605F6262626566666969696D6C
+      6D6F6F707373737777777C7C7C7F80808382828787888C8C8C91919194949499
+      99999D9D9DA2A2A2A6A6A6ABABACB0B0B07272722727272B2B2B2F2F2F323232
+      3535353838383B3B3B3C3C3C3D3D3D3C3C3C3D3D3D3D3D3D3C3C3C3B3B3B3B3B
+      3B3B3B3B3A3A3A3A3A3A38383838383838383838383836363636363636363635
+      3535353535343434333333333333333333323232323232303030303030303030
+      2F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2A2A
+      2A2A2A2A2929292828282626262525252424242323232222222020201E1E1E1D
+      1D1D1C1C1C1B1B1B1A1A1A1919191919191A1A1A191919181818171717171717
+      15151513131312121212100C0F101D0219B7001AD30019CB0019CB0018CA0018
+      C90017C70016C60016C60016C50015C30015C20014C10014C00013BF0013BE00
+      11BD0011BC0011BB0010BA0010B9000FB8000FB7000EB6000EB5000DB4000CB2
+      000CB2000CB0000BAF000BAF000AAE000AAD0009AB0009AA0008A90005AB0409
+      A435365B44443B3B3B3B3333332A2A2A2121211717170E0E0E04040403030303
+      03030202020101010000000000000000000000005B5B5BA9A9A9A4A4A49E9E9E
+      9999989393938D8E8D8989898484847F7F7F7A7A7A7575757171716D6C6C6868
+      686262635F5F5E5D5D5D5E5E5E5F5F5F5757574C4C4C4848484544454241423E
+      3E3E3A3A3A3838383435353131312F2F2F2D2D2D2B2B2B282828252625242424
+      2322232020201F1F1F1C1C1C1B1B1A1918181818191616171616161515151314
+      141312121313131211111010100E0E0F1414141B1B1B1C1C1C1C1C1C1D1C1D1D
+      1D1D0E0D0E0E0D0E0E0D0E0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0C0D0C0C0C0D
+      0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0C0B0B0B0C0C0B0B0B0B0B0B0B0A0A0B0B
+      0B0A0A0B0B0A0A0B0A0B0A0A0A0A0A0A0B0B0B0C0C0D2020202726262C2C2C30
+      30303333330A0A0A070707060706070707060606060606070707060606060606
+      0606060606050505050606060506060505050505050505050405040505050505
+      0404050404040404040404040404040404040403040404030304040303040304
+      0303040303030303030303030303020303030303020302030202020303030202
+      0202020202020202010202020102020201010202020202010102020101020101
+      0101010101010101010101000101010000010101000101010101000001010000
+      0000000000000101000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303232323535353737373A3A3A3C3C3C3635362F2F2F2F2F2F2F2F
+      2F2F2F2F3232323B3A3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A39
+      3A39393A39393A39393A39393A39393939393939393939393939393939393939
+      3939393939393939393939393939393939393939393839393839393839383839
+      3838393838393838393838383838383838383838383838323232323232323232
+      3232323232323232323838383838383838383838383838383838383838383838
+      3838383838383838383738383738373738373738373738373738373737373737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737363737363837373838383838383838383838383838383636363636363636
+      363636363636363636363636363636363636363232322F2F2F2F2F2F2F2F2F30
+      30303636364848484D4D4D5454545A5A5A575757323132313132313231323332
+      323332343334353635353635363636373736383838393A39393A393C3C3C3E3E
+      3D3E3D3D4040414141414343434545454747464A4A494B4C4B4E4E4E51515153
+      53535556555757575B5B5B5E5E5E6161616364636868686B6B6B6E6E6E727272
+      7575767979797D7D7D8181818585858A8A8A8E8E8E9393939797979C9C9CA0A0
+      A0A5A5A4A9AAAAAFAFAEA0A0A13232322B2B2B2E2E2E3232323535353939393A
+      3A3A3C3C3C3D3D3D3E3E3E3E3E3E3E3E3E3D3D3D3D3D3D3C3C3C3B3B3B3B3B3B
+      3B3B3B3A3A3A3A3A3A3838383838383838383838383636363636363636363535
+      353535353434343333333333333232323232323232323030303030303030302F
+      2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A
+      2A2A2A2929292828282727272626262424242323232222222121211F1F1F1F1F
+      1F1E1E1E1D1D1D1C1C1C1C1C1C1C1C1C1C1C1C1B1B1B1A1A1A19191916161615
+      1515141414121212121005091463001BD8001ACD0019CB0019CB0018CA0018C9
+      0017C70016C60016C60016C50015C30015C20014C10014C00013BF0013BE0011
+      BD0011BC0011BB0010BA0010B9000FB8000FB7000EB6000EB5000DB4000CB200
+      0CB2000CB0000BAF000BAF000AAE000AAD0009AB0009AA0008A90004AD090E9A
+      3D3D4C41403C3838393030302727271E1E1E1515150B0B0B0303030303030303
+      030202020101010000000000000000000C0C0C949494A7A7A6A1A1A19B9B9B96
+      96969192928C8C8C8787878282827D7D7D7878787373736F6F6F6A6A6A686868
+      6868686666666363636060605D5D5D5757574B4B4B4646464242433F3F403C3C
+      3C3939393736373434343131312E2E2E2B2B2B29292927272724252522222322
+      21211F1F1F1D1D1D1C1C1C1A1A19181819171717161616161616141414121212
+      1313121112111010101010101919191B1B1C1C1C1C1D1D1D1E1E1E1617170E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0E0E0E0E0E0E0E0E0E0E0D0D0D0D0C0C0C0C
+      0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0B0C0C0B0B0B0C0C0B0B0B0B0B0B0B
+      0B0B0B0A0B0B0B0A0A0A0A0A0A0A0A0C0C0C1D1D1E2726272A2B2A2F2F2F3433
+      3313131307070707070607070607060607070606060606060606060606060605
+      0605060606050506060505050506050505050505050505050505050505040505
+      0505050404040404050404050304040404040403030404040303030304030303
+      0404030303030303030303030303030303030303030302030203030202020202
+      0202020202020202020201010202020101010202010102010202010101010102
+      0101010101010101010001000101010101010101010001000001010000000001
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      30303232323535353737373A3A3A3C3C3C3635362F2F2F2F2F2F2F2F2F2F2F2F
+      3232323B3A3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A
+      39393A39393A39393A3939393939393939393939393939393939393939393939
+      3939393939393939393939393939393939393939383939383938383938383938
+      3839383839383838383838383838383838383832323232323232323232323232
+      3232323232383838383838383838383838383838383838383838383838383838
+      3838383838383838373838373837373837373837373837373837373737373737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3736383838393838383838383838383838383838363636363636363636363636
+      3636363636363636363636363636363130312F2F2F2F2F2F2F2F2F3030303A3A
+      3B4949494E4E4E5555555A5A5A4F4F4F31323232323231313133333333323234
+      34343635363635363636363737373939393A3A3A3A3B3B3C3B3B3D3D3E3E3E3E
+      4040414242424444444646464848484A4A4A4D4D4D4F4F4E5251525453545757
+      575A5A5A5D5C5C5F5F5F6262626666656969696C6C6D6F6F6F7374747777777C
+      7C7C7F7F7F8383838888888C8C8D9091919595949A999A9E9E9EA2A2A2A7A7A7
+      ACACACB0B1B15E5E5E2B2B2B2E2E2E3131313535353838383A3A3A3C3C3C3E3E
+      3E3F3F3F3F3F3F3F3F3F3E3E3E3D3D3D3D3D3D3D3D3D3C3C3C3B3B3B3B3B3B3B
+      3B3B3A3A3A3A3A3A383838383838383838383838363636363636363636353535
+      3535353434343333333333333333333232323232323030303030303030302F2F
+      2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A2A
+      2A2A292929282828262626262626252525232323232323222222202020202020
+      1F1F1F1F1F1F1E1E1E1D1D1D1D1D1D1D1D1D1C1C1C1B1B1B1919191717171515
+      1513131312120E0F111B0219B6001AD4001ACD0019CB0019CB0018CA0018C900
+      17C70016C60016C60016C50015C30015C20014C10014C00013BF0013BE0011BD
+      0011BC0011BB0010BA0010B9000FB8000FB7000EB6000EB5000DB4000CB2000C
+      B2000CB0000BAF000BAF000AAE000AAD0009AB0009AA0007A90003AE14198A42
+      423F3D3D3B3535362D2D2D2424241B1B1B121212070707030303030303030303
+      020202010101000000000000000000424242A9A9A9A4A4A49E9E9E9999999494
+      948F8E8E8989898484858080807A7A7A7475757373737272726F6F6F6C6C6C67
+      67676565656262626060605C5C5C5757574949494444444141413D3D3D3A3A3B
+      3838383535343232312F2F2F2D2D2D2A2A2A2828282425252323232323231F20
+      1F1E1E1E1C1C1C1B1A1B18191818181716161616161615151513131313131211
+      11111010111313131C1C1C1D1D1D1D1E1D1D1D1D1E1E1E1111110E0D0E0E0D0E
+      0E0D0E0E0D0D0E0E0E1211111112111111111111111111111011101010101111
+      100F0F100F0F0F0E0E0E0D0E0E0C0D0D0C0C0C0B0B0C0B0B0B0B0B0B0B0B0B0B
+      0B0B0A0B0B0A0B0A0A0A0B0B0B0B1B1B1A2525252929282F2F2F3433341E1F1F
+      0707070707070707070707070707060706070707060606060606060605060605
+      0606050606060505060606050605050605050505040404050505050405040504
+      0504040504040404040404040404040404040304030304040304030304030303
+      0303030303030303030303030203030302030303020303020202020202020202
+      0202020201020202020202020201010101010102020202020201020202010101
+      0102010101010101010101010100000000000001010001000101010000010001
+      0000010000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303232
+      323636363838383A3A3A3C3C3C3635362F2F2F2F2F2F2F2F2F2F2F2F2F2F2F31
+      31313636363B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39
+      393A39393A39393A393939393939393939393939393939393939393939393939
+      3939393939393939393939393939393938393938393838393838393838393838
+      3938383938383838383838383838383232323232323232323232323232323232
+      3239383838383838383838383838383838383838383838383838383838383838
+      3838383838383837383837383737383737383737383737383737373737373737
+      3737373737373737373737373737373737373737373737373737373737373838
+      3839383839383838383838383838383836363636363636363636363636363636
+      36363636363636363636363130312F2F2F2F2F2F2F2F2F3030303D3C3D4A4A4A
+      4F4F4F5555555A5A5A4747473232323232323332333333323333343435343536
+      353536353737373737373939393A3A3A3C3C3C3D3D3D3E3E3E403F3F42414142
+      42424545454747474949494B4B4B4E4E4E504F505353525556555858575B5B5A
+      5D5D5D6160616464646767676B6B6B6E6E6E727272767676797A797D7D7D8182
+      818585858A8A8A8E8E8E9393939797979C9C9CA1A1A1A5A5A5AAAAAAAFAFAF96
+      96962D2D2D2E2E2E3131313434343737373B3B3B3D3D3D3E3E3E3F3F3F3F3F3F
+      4040404040403F3F3F3E3E3E3D3D3D3D3D3D3D3D3D3C3C3C3B3B3B3B3B3B3B3B
+      3B3A3A3A39393938383838383839393938383838383837373737373736363636
+      36363535353434343434343333333232323232323030303030303030302F2F2F
+      2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A2A2A
+      2A29292928282827272726262625252525252524242423232321212121212121
+      21212020202020201F1F1F1F1F1F1E1E1E1C1C1C1A1A1A181818161616141414
+      131313131107081670001BD8001ACE001ACD0019CB0019CB0018CA0018C90017
+      C70016C60016C60016C50015C30015C20014C10014C00013BF0013BE0011BD00
+      11BC0011BB0010BA0010B9000FB8000FB7000EB6000EB5000DB4000CB2000CB2
+      000CB0000BAF000BAF000AAE000AAD0009AB0009AA0007AA0004AD2326714242
+      393A3A393232322929292020201717170D0D0D05050503030303030303030302
+      0202010101000000000000030303888888A6A6A6A1A1A19B9B9C979797929192
+      8C8C8C878787828282807F7F7D7D7D7A7A7A7676767272726E6E6E6B6B6B6767
+      676464646161615E5E5E5C5C5C5757574646454343423F3F3F3B3B3B39393936
+      36363332332F2F302E2E2E2B2B2C2828282626262424242223232120201F1F1F
+      1C1C1C1B1B1B1819191918191617171616161615151414141213131213121112
+      111717171B1C1C1C1C1D1D1E1E1E1E1F1B1B1B0E0E0F0E0D0F0E0D0E0E0D0E0E
+      0D0E101010121212111212111111111111111111111111111111101110101011
+      1011101010100F1010100F0F1010100F0F0F0F0F0F0E0E0E0C0D0D0A0A0C0B0B
+      0B0A0B0B0A0B0A0C0B0B1615162424242928292D2E2E33323228272707070707
+      0707070707070706070707070606060606060607060607060606060606060606
+      0506060505050506050605050505050505050405050505040505050404050405
+      0404050504040404040404040403040404040403030404030303030304040303
+      0303030303030303020203030302030302030203020303020202030202020202
+      0202020202020202020202020102020102010102020101010101010102010101
+      0102010101010101000100010101010101000101010001000000010000010000
+      0000000000000001000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030323232363636
+      3838383A3A3A3C3C3C3635362F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F3030303534353A3A393A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A3939
+      3A39393A39393939393939393939393939393939393939393939393939393939
+      3939393939393939393939393839393839393839383839383839383839383839
+      3838383838383838383838323232323232323232323232323232323232393838
+      3938383838383838383838383838383838383838383838383838383838383838
+      3838383838383738383738373738373738373738373738373737373737373737
+      3737373737373737373737373737373737373737373737373737383838393938
+      3938383938383838383838383636363636363636363636363636363636363636
+      363636363636362F2F2F2F2F2F2F2F2F2F2F2F3131313F3F3F4A4A4A4F4F4F56
+      56565A5A5A424242323232323232333333333232333433353434353635363536
+      3737383938383A3A3A3A3A3A3C3C3C3E3E3E3F3F3E4141414142414343444646
+      464747474A4A4A4C4C4C4E4E4E5151515353535757575958585C5B5C605F5F61
+      61616566656969696C6C6C7070707273737777777B7B7B7F7F7F838383888888
+      8C8C8C9091919495959A9A9A9E9F9EA4A4A3A8A7A7ADACACB1B2B15757572D2D
+      2D3030303434343737373A3A3A3D3D3D3E3E3E40404040404040404040404040
+      40404040403F3F3F3E3E3E3D3D3D3D3D3D3D3D3D3C3C3C3B3B3B3B3B3B3B3B3B
+      3B3B3B3A3A3A3A3A3A3939393939393939393939393939393838383838383737
+      373636363636363535353434343434343232323131313030303030302F2F2F2F
+      2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A2A2A2A
+      2929292929292727272626262626262525252525252424242323232323232323
+      232222222121212020201F1F1F1E1E1E1C1C1C19191917171715151513141413
+      120D101223011BC2001AD2001ACE001ACD0019CB0019CB0018CA0018C90017C7
+      0016C60016C60016C50015C30015C20014C10014C00013BF0013BE0011BD0011
+      BC0011BB0010BA0010B9000FB8000FB7000EB6000EB5000DB4000CB2000CB200
+      0CB0000BAF000BAF000AAE000AAD0009AB0009AA0006AB0208A73234553F3F38
+      3737372F2F2F2525251D1D1D1414140A0A0A0303030303030303030303030202
+      02010101000000000000383838A9A9A9A4A4A49E9E9F9A9A9A9494948F8F8F8B
+      8B8B8A8A8A8585858181817C7C7C7878787575747070706C6C6C696969666666
+      6363636060605D5D5D5B5B5B5656564645464141403D3C3D3939393737373434
+      343131312E2E2E2D2C2C2A292A272727242525232323212222201F1F1D1D1D1C
+      1C1C1A1A1A1918191717171616161515151414141313131313121213131D1D1D
+      1C1C1C1E1E1E1F1F1E1E1E1E1414140E0E0F0E0D0F0E0D0F0E0D0E0E0D0E1212
+      1212121211121211121211111111111111111111111111101110111110101010
+      10101010100F0F100F1010101010100F0F0F100F0F0F0F0C0C0C0A0B0B0A0A0A
+      0A0A0B0B0C0B1212122323232828282D2D2D3031312C2D2C0707070807070707
+      0707070707070706060607060707060607060607060606060606060606060506
+      0506060606050605060506060505050505040405040504050505040504040405
+      0404050404040404040403040404040404040403030303030403030303040403
+      0303030303030302030302030303030302020302020303020203020203020202
+      0202020202020202010201010202020201010102020102010101010101010102
+      0101010101010101010100010101010100010001010001000101000000000001
+      0100000000000100000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      303030303030303030303030303030303030303030303333333636363838383A
+      3A3A3C3C3C3535352F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F303333333939393A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393939393939393939383939383938383938383938383938383938383838
+      3838383837373732323232323232323232323232323233323239383839383839
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838373838373837373837373837373837373837373737373737373737
+      3737373737373737373737373737373737373737373738383839393839393839
+      3838393838383838363636363636363636363636363636363636363636363636
+      3636362F2F2F2F2F2F2F2F2F2F2F2F3131314141414A4A4A5050505656565A5A
+      5A3C3C3C32323232323233333333333333343435363535353637373637383738
+      39393A3A3A3B3B3B3C3C3C3E3E3E3F3F3F4040414242434545464746464A4949
+      4A4A4A4D4E4D4F4F4F5152525555555757575B5B5B5C5D5D6060606464646766
+      676A6A6A6D6D6D7272727475757879787D7C7C8080818585868989898E8E8E93
+      92929797979C9C9CA0A0A0A5A5A5AAAAAAAFAFAF9696962E2E2E2F2F2F333333
+      3737373A3A3A3D3D3D3F3F3F4040404141414141414141414141414040404040
+      404040403F3F3F3E3E3E3D3D3D3D3D3D3D3D3D3C3C3C3B3B3B3C3C3C3C3C3C3B
+      3B3B3B3B3B3A3A3A3B3B3B3B3B3B3C3C3C3C3C3C3C3C3C3D3D3D3C3C3C3B3B3B
+      3A3A3A3838383737373636363434343333333232323131313030302F2F2F2F2F
+      2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A2A2A2A29
+      2929292929282828272727262626262626262626252525242424232323232323
+      2222222121212020201E1E1E1D1D1D1A1A1A1818181616161514141412070E15
+      43011BC9001BD3001ACE001ACE001ACD0019CB0019CB0018CA0018C90017C700
+      16C60016C60016C50015C30015C20014C10014C00013BF0013BE0011BD0011BC
+      0011BB0010BA0010B9000FB8000FB7000EB6000EB5000DB4000CB2000CB2000C
+      B0000BAF000BAF000AAE000AAD0009AB0009AA0005AF0D12923C3C3E3A3A3733
+      33332B2B2B222222191919101010060606030303030303030303030303020202
+      010101010101020202878787A7A7A6A1A1A19B9C9B9797979696969291928D8C
+      8C8787878484848080807B7B7B7676777373736F6F6F6A6A6A67676765656561
+      61616060605C5C5C5A5A5A5757574646463F3E3E3A3A3B383838353535323232
+      3030302D2E2D2B2C2B2828282525252323232323232020201E1F1E1C1D1C1A1A
+      1A1919191818181616161616161414141313131312131617171D1D1D1D1D1D1E
+      1E1E1F1F1E1E1E1E0E0E100E0E0F0E0E0E0E0E0F0E0D0F0F0F0F121212121212
+      1212111111121111111111121111111111111111101011101010101110101010
+      10101010100F10101010100F0F10100F10100F0D0D0D0B0B0B0B0A0A0B0A0B0C
+      0B0C0D0E0D2222232727272C2C2C303131353435080807080807070707070707
+      0707070607070707070707070706060606060606060606060506060606060506
+      0606060605050505060505050505050505050505050405040405050404050504
+      0504040404050404040404040404040403030304030303040403030304030303
+      0303030303030303030303030303020203020302030203030303020202020202
+      0202020202020202010202010201010102010101010202010201010101010101
+      0101010101000100010101000100000001000000000101010100000100000000
+      0001000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303434343737373939393B3B3B3D3D
+      3D3939393232322F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F3232323737373A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A39
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393939393938393938393938393838393838393838393838393838383838
+      3737373232323232323232323232323232323434343938383938383938383938
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383837383837383737383737383737383737383737373737373737373737
+      3737373737373737373737373737373737373939393939393939383939383938
+      383838383636363636363636363636363636363636363636363636363636362F
+      2F2F2F2F2F2F2F2F2F2F2F3131314141414A4A4A4F4F4F5555555A5A5A3D3D3D
+      323232323232333333333333343534353536363535363637383738393A393A3A
+      3A3B3B3B3D3D3D3E3E3E4040404242424343434546464847474A4A4A4D4C4C4F
+      4F4E5151515453545656565858585B5B5B5F5F5F6162626564656868686B6B6B
+      6F6F6F7273727777777A7A7A7F7F7F8383838788888B8C8C9090919494949999
+      999E9E9EA3A2A2A7A7A7ADADADB2B2B25A5A5A2F2F2F3333333636363939393D
+      3D3D3F3F3F414141414141424242414141424242424242404040404040404040
+      4040403F3F3F3E3E3E3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3C3C3C3C3C3C3D3D
+      3D3D3D3D3D3D3D3E3E3E4040404040404040404242424141414040403F3F3F3E
+      3E3E3B3B3B3A3A3A3838383636363333333232323131313030303030302F2F2F
+      2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A2A2A2A2929
+      2929292927272727272727272726262626262625252524242423232323232322
+      22222020201E1E1E1C1C1C1B1B1B1919191616161614080E1645011CCA001CD7
+      001CD1001BD0001ACE001ACE001ACD0019CB0019CB0018CA0018C90017C70016
+      C60016C60016C50015C30015C20014C10014C00013BF0013BE0011BD0011BC00
+      11BB0010BA0010B9000FB8000FB7000EB6000EB5000DB4000CB2000CB2000CB0
+      000BAF000BAF000AAE000AAD0009AB0009AA0004AF1E22723D3D343636362F2F
+      2F2727271E1E1E1515150B0B0B05050503030303030303030302020201010101
+      0101010101393939A9A9A9A4A4A4A2A1A29E9E9E9999999494948F8F8F8B8B8B
+      8686868282827E7E7E7979797373736A6A696262636060606565656363636161
+      615E5E5E5B5B5B5858585454544344443D3C3C393A3A3737373434343131312E
+      2E2E2C2B2B2829292626272424242223232121211F1F1F1C1C1D1B1B1B191919
+      1818181717171616161515151314141313131C1C1C1E1D1E1E1E1E1F1F1F1F1F
+      201818170E0F0F0E0E100E0E0F0E0E0F0E0E0F12111213121212121212121212
+      1212111112111112111111111111111111101110101110101110101010101010
+      1010100F101010100F10100F100F0F0E0E0E0B0B0B0B0A0B0B0B0B0A0B0A0D0D
+      0D1F1F1F2827282B2B2B30303034343314131307080808070807070707070707
+      0707070707070706060607060607060607060706060606060606060606060605
+      0505060505050605050505060505050505050405050405050405040405040405
+      0404040404040404030404030404030403030404030303030403030304030303
+      0303030303020303030303030202020303030302020202020202020202020202
+      0202010202020102010202020101010201010101020101010101010101010101
+      0101010101010100010001010100000001000001010100000100000000000000
+      0101000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000030303079797930303030303030303030303030303030
+      30303030303030303030303030303535353838383A3A3A3B3B3B3D3D3D3E3E3E
+      4040403C3C3C3434342F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F3131313636363A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A3939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393839393839393839383839383839383839383839383838383837373732
+      3232323232323232323232323232343434393938393838393838393838393838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383738383738373738373738373738373738373737373737373737373737
+      3737373737373737373737373737393939393939393939393938393938383838
+      3636363636363636363636363636363636363636363636363636362F2F2F2F2F
+      2F2F2F2F2F2F2F3131314141414A4A4A5050505454545A5A5A3D3D3D32323232
+      32323333333334343535353636353536363837373839383A3A3A3B3B3B3C3C3D
+      3E3E3E3E3E3E4141414242424444444646464847474A4A4A4C4C4C4F4E4F5252
+      515454545757575A5A5A5D5D5D60605F626363676766696A696E6D6D71717175
+      75757878787C7C7C8181818585858989898D8D8D9292929797979B9B9BA1A0A0
+      A5A5A5AAAAAAAFAFAF9898983131313232323535353939393C3C3C3F3F3F4141
+      4143434343434342424243434342424242424242424240404040404040404040
+      40403F3F3F3E3E3E3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3E3E3E3F3F3F
+      4040404242424444444545454747474747474848484747474646464444444242
+      423F3F3F3C3C3C3A3A3A3737373535353333333232323131313030302F2F2F2E
+      2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A2A2A2A292929
+      2929292727272727272727272626262626262424242424242323232222222020
+      201E1E1E1C1C1C1A1A1A18191818160A0F1746011DCD001DDB001DD3001CD200
+      1CD1001BD0001ACE001ACE001ACD0019CB0019CB0018CA0018C90017C70016C6
+      0016C60016C50015C30015C20014C10014C00013BF0013BE0011BD0011BC0011
+      BB0010BA0010B9000FB8000FB7000EB6000EB5000DB4000CB2000CB2000CB000
+      0BAF000BAF000AAE000AAD0009AB0007AC020AA531324C3A39333333332B2B2B
+      2323231A1A1A1111110707070404040404040303030202020101010101010101
+      01030303898989ABABABA5A5A6A1A1A19C9C9C9797979292928D8E8E88888884
+      85847D7D7D7373736D6D6D6969686565656060605F605F6464646262625F5F5F
+      5B5B5B5959595656565252524242413A39393738373434343131312E2E2E2C2D
+      2C2A2A2A2727272525252323232222222020201E1D1E1C1C1C1A1B1A19191917
+      17171616161515151414141616161E1E1E1F1F1F1F1F201F1F1F202020131313
+      0E0F100F0E0F0E0E0F0E0E0F0F0F0F1312121312121212121212121212121212
+      1112121111111211111111111011111111101011101111101010101010101010
+      1010100F0F1010100F10100F0E0E0B0B0C0B0B0B0B0B0B0B0B0A0C0C0B1B1B1C
+      2625252A2A2A2F2F2F3434341C1C1C0807080807070708070807070707070706
+      0707070706060607070706060606060606060606060605060606060606060606
+      0505050505050506050505050505040505050505040504050405050404040405
+      0505040404040404040404030404030304030404030303040303030403030303
+      0303030303030202030302030202020202030302020302020202020202020201
+      0202020202010202020202020201020101010102020201010101010101010101
+      0101010001010001010000010101000000000001000001000000010000000001
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000003030307979793030303030303030303030303030303030303030
+      303030303030303030303636363939393B3B3B3C3C3C3D3D3D3F3F3F40404040
+      40404040403E3E3E3535353030302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F3030303434343939393A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A393A3A393A3A393A39393A39393A39393A39393A393939393939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939383939383938383938383938383938383938383838383737373232323232
+      3232323232323232323234343439393839393839383839383839383839383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838373838373837373837373837373837373837373737373737373737373737
+      3737373737373737373739393939393939393939393939393838383836363636
+      36363636363636363636363636363636363636363636362F2F2F2F2F2F2F2F2F
+      2F2F2F3131314141414A4A4A4F4F4F5454545858583C3C3C3232323333333333
+      333434343535353535353535363837383839393A3A3A3B3B3B3C3C3D3E3E3E3F
+      3F404141414343434545454746474A4A494A4B4A4E4E4E4F4F4F535353555555
+      5858585B5B5B5E5E5E6161616464646867686C6B6B6E6F6E7272737676767A7A
+      7A7F7F7F8383838787878B8B8B9090909494959999999E9E9EA3A3A3A8A8A8AD
+      ADADB2B1B26362623131313434343838383C3C3C3F3F3F414141424242434343
+      4444444444444444444242424242424242424242424040404040404040404040
+      403F3F3F3E3E3E3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3E3E3E40404043434345
+      45454747474A4A4A4D4D4D4E4E4E4F4F4F4E4E4E4E4E4E4B4B4B494949464646
+      4242423F3F3F3B3B3B3838383636363333333131313131313030302F2F2F2E2E
+      2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A2A2A2A29292929
+      29292727272727272727272626262525252424242222222121212020201E1E1E
+      1C1C1C1A1A1A19180C111948021ECF001EDD001ED5001DD4001DD3001CD2001C
+      D1001BD0001ACE001ACE001ACD0019CB0019CB0018CA0018C90017C70016C600
+      16C60016C50015C30015C20014C10014C00013BF0013BE0011BD0011BC0011BB
+      0010BA0010B9000FB8000FB7000EB6000EB5000DB4000CB2000CB2000CB0000B
+      AF000BAF000AAE000AAD0009AB0006B01217873939353535342F2F2F2727271E
+      1E1E1616160C0C0C050505040404040404030303020202010101010101010101
+      444444AEAEADA9A9A9A3A3A49F9F9F9A9A9A9595969191918989887E7F7F7979
+      797575757070706B6B6B6666666362625E5E5F5D5D5D6262626060605D5D5D5A
+      5A5A5757575555555151514343423838383535353232323030302E2D2E2A2B2B
+      2929292625252423232222222020201D1D1D1C1D1D1A1A1B1919191717171616
+      161516151414141B1A1A2020202020201F201F2020201D1D1D1010110F0F100E
+      0E100E0E0F0E0E0F111111131312121313121312121212121212121212121212
+      1111111111121111111011111111111110111111101011111010111010101010
+      100F0F0F10100F100F0F0C0C0C0B0B0B0B0B0B0B0A0B0C0B0C18191924242429
+      29292F2F30333333252525080707080807070707070707080707070707070707
+      0607070606060707070707070606070606060606060605060606060506050506
+      0605050505060505050504050505050505050505050405040505050504050404
+      0404040404040404040403040404040403030404030304030303030304030303
+      0202030203030203030203020302020202020202020202020202020202020202
+      0202020202020201020101010201010101010101020201020201010101010101
+      0101010100010101010000010100000001000001000101000100000001000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303535353B3B3B3C3C3C3D3D3D3E3E3E3F3F3F4040404040404040
+      404040404040403F3F3F3837383131312F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3333333938383A3A3A3A3A3A3A3A39
+      3A3A393A3A393A3A393A39393A39393A39393A39393A39393939393939393939
+      3939393939393939393939393939393939393939393939393939393939393839
+      3938393938393838393838393838393838393838373736323232323232323232
+      3232323232323434343939393939383939383938383938383938383938383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3837383837383737383737383737383737383737373737373737373737373737
+      3737373737373939393939393939393939393939393838383636363636363636
+      363636363636363636363636363636363636362F2F2F2F2F2F2F2F2F2F2F2F30
+      30304141414949494E4E4E5353535757573F3F3F323232333333333333343434
+      363636353636363637373838393A393A3A3A3B3C3C3E3D3E3E3E3E4041404242
+      424343434646464848484A4A4A4D4D4D4F4F4E525252535453565757595A5A5C
+      5C5C6060606262626565656969696D6D6D7170707474747777777B7B7B7F7F80
+      8383848888888D8D8D9292929696969B9B9BA0A0A0A5A5A6AAAAAAAFAFAFA3A3
+      A33939393434343737373B3B3B3E3E3E40404042424244444444444445454545
+      45454444444444444242424242424242424242424040404040404040403F3F3F
+      3E3E3E3E3E3E3D3D3D3D3D3D3D3D3D3D3D3D3E3E3E4040404444444747474A4A
+      4A4E4E4E5151515353535555555656565555555454545151514E4E4E49494944
+      44444040403C3C3C3939393636363333333131313131313030302E2E2E2E2E2E
+      2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A2A2A2A2929292929
+      292828282727272626262525252424242222222121211F1F1F1E1E1E1B1B1B1B
+      190D121B4A011FD1001FDF001FD7001ED6001ED5001DD4001DD3001CD2001CD1
+      001BD0001ACE001ACE001ACD0019CB0019CB0018CA0018C90017C70016C60016
+      C60016C50015C30015C20014C10014C00013BF0013BE0011BD0011BC0011BB00
+      10BA0010B9000FB8000FB7000EB6000EB5000DB4000CB2000CB2000CB0000BAF
+      000BAF000AAE000AAD0008AC0007AD2729583838303131312A2A2A2222221A1A
+      1A1111110707070505050505050303030202020202020202020101010B0B0B9B
+      9B9BACACACA7A7A7A2A2A29C9C9C9696968C8C8C8686868180817B7C7C767676
+      7171716D6D6D6868676463635F605F5B5B5B5A5A5A5E5E5E5D5D5D5B5B5B5858
+      585555555252525150514141413837373434343231312E2E2E2C2C2C28292926
+      26272424242323232121211F1F1F1D1C1D1B1C1C191919181818161616161616
+      151615201F1F2020202020202121212020211616161010110F0F100E0F0F0F0E
+      100E0E1013131313131313121313131212121312121212121212121212121111
+      111211111111121111111111101111101111111011111011101010101010100F
+      1010100F100F0C0D0D0B0B0B0B0C0B0B0B0B0C0C0C1312132324242828292D2D
+      2E3232322D2D2D08080807070807070807070707080707070707070707060707
+      0707060707070706070607060606060606060606060606050605050605050605
+      0506060505050505050505050505050505040405040404050404040404040404
+      0504040407070704040403040304030404030304040403030303030303030303
+      0302020302020302020303020302020302020203020202020202020202020202
+      0202010102020102020202020201010101010101010101010101010101000101
+      0101000101010101000101010100000001000100010100000000000000000000
+      0100000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      30303030303131313737373D3D3D3F3F3F3F3F3F404040404040404040404040
+      4040404040404040404040403A3A3A3232322F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3231323737373A3A393A3A393A
+      3A393A3A393A39393A39393A39393A39393A3939393939393939393939393939
+      3939393939393939393939393939393939393939393939393939383939383939
+      3839383839383839383839383839383837373632313232323232323232323232
+      3232323232393939393939393938393938393838393838393838393838383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3738383738373738373738373738373738373737373737373737373737373737
+      3737393939393939393939393939393939383838363636363636363636363636
+      3636363636363636363636363636363030302F2F2F2F2F2F2F2F2F3030303C3B
+      3C4848484E4E4E52525256565645454532323233333333333334343436363636
+      36353737373838383A3A393A3A3A3D3D3D3D3E3E3E3E3E414142424342444445
+      4646464848484A4A4A4D4D4C4F4F4E5251525555545757575B5A5B5E5D5D6060
+      606464646767676A696A6E6E6E7171717575757979797D7D7D8181818686868A
+      8A8A8F8F8F9393939898979C9D9DA2A2A2A7A7A7ACACACB2B2B2777777333333
+      3737373A3A3A3D3D3D4040404242424444444545454545454545454545454545
+      454444444444444242424242424242424242424040403F3F3F3F3F3F3E3E3E3D
+      3D3D3D3D3D3C3C3C3C3C3C3C3C3C3D3D3D3F3F3F4343434848474D4C4951514D
+      56544F5A59555C5B585D5D5C5C5C5C5C5C5C5959595555555151514C4C4C4747
+      474242423D3D3D3939393636363333333131313030303030302E2E2E2E2E2E2E
+      2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A2A2A2A292929292929
+      2727272626262525252424242222222020201E1E1E1C1C1C1C1A0E121C4B0120
+      D30021E1001FD9001FD8001FD7001ED6001ED5001DD4001DD3001CD2001CD100
+      1BD0001ACE001ACE001ACD0019CB0019CB0018CA0018C90017C70016C60016C6
+      0016C50015C30015C20014C10014C00013BF0013BE0011BD0011BC0011BB0010
+      BA0010B9000FB8000FB7000EB6000EB5000DB4000CB2000CB2000CB0000BAF00
+      0BAF000AAE000AAC0007B00B13913535353333312D2D2D2626261E1E1E161616
+      0C0C0C0505050505050404040202020202020202020202020101015F5F5FAFAF
+      AFA9A9A9A3A3A39A9A9A9292928D8D8D8787878383837D7D7D7878797373736E
+      6F6E6A6A6A6565656060615D5D5D5959595756565C5C5C5B5B5B595959565656
+      5252525151514E4E4E3F3E3F3434343231322E2F2F2C2C2C2A2A2A2828282525
+      252323232121222020201D1D1C1C1B1C191A1A1818181616161616161A1A1A20
+      20202020202121222121212020201110111011110F0F100F0F100F0F0F101110
+      1313131313131312121313131313121212121212121212121212121212121111
+      1212111111111111111110111110111011101010101110101010101010101010
+      0F0F0D0E0E0B0C0C0B0B0C0B0B0B0C0C0C0F0E0F2323232727272D2C2D313131
+      3535350808080808080808080808070808070807070708070707070707070707
+      0706060706060706070606060606060606060606050506060606050505050505
+      0505050505050505050505050405050504050404040505050404080808131313
+      1616160D0D0D0404040304040404040303030303030303040303030303030303
+      0303030303030202030202020203020202020202020202020202020202020202
+      0201020201020102010102020101020101010201010101010101010101010100
+      0101000101010101000101000100000000000001000000010000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303636363E3E3E40404040404040404040404040404040
+      40404040404040404040404040403C3C3C3434342F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3030303636363A3A393A3A
+      393A39393A39393A39393A39393A39393A393939393939393939393939393939
+      3939393939393939393939393939393939393939393939393938393938393838
+      3938383938383938383938383838383231323231323232323232323232323232
+      3239393939393939393939393839393839383839383839383839383838383838
+      3838383838383838383838383838383838383838383838383838383838383837
+      3838373837373837373837373837373837373737373737373737373737373939
+      3939393939393939393939393938383836363636363636363636363636363636
+      36363636363636363636363130312F2F2F2F2F2F2F2F2F3030303B3A3B474747
+      4D4D4D5151515555554949493232323333333333333535353636363636363838
+      383938393A3A3A3B3A3B3D3D3C3E3E3E3F3F3F41414244434345454546464649
+      49494B4B4B4E4E4E504F4F5353535655555859595B5B5B5F5E5F616161646464
+      6868686C6C6C6F6F6F7373737776767B7B7A7F7F7F8383838888888C8C8C9191
+      919595959999999F9F9FA4A4A4A9A9A9AFAEAEB0B0B04A4A4A3636363838383D
+      3D3D3F3F3F424242444444454545464646464646464646454545454545454545
+      4444444444444242424242424242424141413F3F3F3E3E3E3E3E3E3D3D3D3C3C
+      3C3B3B3B3B3B3B3B3B3B3C3C3B3E3D3A4340354746404A4B514C4F5C4A526F54
+      58695B5D6464635F68655A65645F6161605E5E5E5959595454544D4D4D474747
+      4242423D3D3D3939393535353333333232323131312F2F2F2E2E2E2E2E2E2E2E
+      2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A2A2A2A29292928282826
+      26262525252323232121211F1F1F1D1D1C1C1A0F131C4C0121D50022E30021DB
+      0021DA001FD9001FD8001FD7001ED6001ED5001DD4001DD3001CD2001CD1001B
+      D0001ACE001ACE001ACD0019CB0019CB0018CA0018C90017C70016C60016C600
+      16C50015C30015C20014C10014C00013BF0013BE0011BD0011BC0011BB0010BA
+      0010B9000FB8000FB7000EB6000EB5000DB4000CB2000CB2000CB0000BAF000B
+      AF000AAE0009AD0008B024265B35352C2F2F2F2929292121211A1A1A11111107
+      07070505050505050404040202020202020202020202021F1F1FACACACA8A8A8
+      A0A0A09B9A9B9595958F8F8F8989898585857F7F7F7B7A7B7575757070706C6C
+      6C6767676363635D5E5E5A5A5B57565653535359595959595957575754545451
+      51514F4F4F4D4C4D3D3D3D3332332F2F2F2D2D2D2B2B2B292929262625242324
+      2222222020201E1E1E1D1D1D1A1B1A19191A1717171616161F1F1F2020202020
+      202222222222221A1A191111111011110F0F100E0E100F0E1012131313131313
+      1313131313131313131212131212121213121212121212111211111111111211
+      111111111111111111111110101010101110101011101010101010100F100F0F
+      0E0B0C0C0B0C0B0B0B0B0B0B0B0D0D0D2020202827282C2C2B31313034343514
+      1414080808080708080708070808080707080707070807070707060707070607
+      0707070707070606060606060606060606060505050606060506050606050505
+      060506050505050505050505050505050606050F0E0F15151515151516161616
+      1616121212060707040303040303030304030303030303030303030303030303
+      0302030202030202020302030303030202020203020202020202020202020202
+      0202010201020201020201010202010101010101010101010101010101010101
+      0101000101000000000000000101000001000001010100000100000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303434343C3C3C4040404040404040404040404040
+      404040404040404040404040404040403E3E3E3636373030302F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F30343434393939
+      3A39393A39393A39393A39393A39393939393939393939393939393939393939
+      3939393939393939393939393939393939393939393839393839393839383839
+      3838393838393838393838323131323132323132323232323232323232393939
+      3939393939393939393939383939383938383938383938383938383838383838
+      3838383838383838383838383838383838383838383838383838383838383738
+      38373837373837373837373837373837373737373737373737373939393A3939
+      3939393939393939393939393736363636363636363636363636363636363636
+      363636363636363131312F2F2F2F2F2F2F2F2F3030303636364747474B4B4B4F
+      4F4F545454505050323232333333343434353535363636363636383838393939
+      3A3A3A3B3B3B3C3D3D3E3F3F4040404241414343444647474847474B4B4A4D4C
+      4C4F4F4F5151515454545757575958595B5B5C6060606262626565656969696D
+      6D6D7171717575757778777D7D7D8181818584858988898E8E8D929292979797
+      9C9C9CA1A1A1A6A5A5AAAAAAB0B0B09090903636363838383B3B3B3F3F3F4141
+      4144444445454546464646464647474747474746464645454545454545454544
+      44444444444242424141414141413F3F3F3E3E3E3D3D3D3B3B3B3B3B3B3A3A3A
+      3A3A3A3A39373D3A2F393C472B3D841E3FBB143DE20C3CF50A3AF90A3BF6113D
+      EB2346CC3E53A45E62766C695F6665616060605B5B5B5555554D4D4D47474742
+      42423C3C3C3838383535353232323131313030302F2F2F2F2F2F2E2E2E2E2E2E
+      2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A2929292828282727272525
+      252323232121211E1F1E1D1C17131D500122D60023E50022DD0022DC0021DB00
+      21DA001FD9001FD8001FD7001ED6001ED5001DD4001DD3001CD2001CD1001BD0
+      001ACE001ACE001ACD0019CB0019CB0018CA0018C90017C70016C60016C60016
+      C50015C30015C20014C10014C00013BF0013BE0011BD0011BC0011BB0010BA00
+      10B9000FB8000FB7000EB6000EB5000DB4000CB2000CB2000CB0000BAF000BAF
+      000AAD0007B20B129133333231312F2B2B2B2525251D1D1D1515150B0B0B0505
+      050505050404040303030202020202020202020202027C7C7CA8A8A8A2A2A29C
+      9C9C9797979191918C8C8C8687868181817C7C7B7878787676756F6F6F686868
+      646464605F5F5B5B5B5857575353535050505858585656565353535252524F4F
+      4F4D4D4D4A4B4B4040413131302E2E2E2C2C2C29292925262624242323232320
+      20201E1E1E1D1D1D1B1A1B191A1A171817191919212121212121222221222222
+      2222221414151011111110110F0F100F0F100F10101414131413131313131313
+      1313121313121312121212121212121312121212121212111211121112111111
+      1211111111111111111110111111101010101110101011101010100E0F0C0B0C
+      0C0C0C0C0B0B0B0B0C0D0D0D1D1D1D2727272B2A2B2F2F2F3434341919190808
+      0808080808080707080807070707070707070707080707070706070607070706
+      0706070607060606060606060606060606060606060606050505050606050506
+      0505050505050505050A0B0B1413131514151615151515161616161717171717
+      171717170A0A0A03040304040404030403030303030303030303030303030302
+      0303020203030203020302030202020202020202020202020202020202010201
+      0201020201020101020202010201010101010101020101010101010101010101
+      0101000101010100010101010000000000000000000100000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303232323A3A3A404040404040404040404040
+      4040404040404040404040404040404040403F3F3F3939393131312F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F33333338
+      38383A39393A39393A3939393939393939393939393939393939393939393939
+      3939393939393939393939393939393939393939383939383938383938383938
+      3839383839383832313132313132313232313232323232323239393939393939
+      3939393939393939393938393938393838393838393838393838383838383838
+      3838383838383838383838383838383838383838383838383838383838373838
+      373837373837373837373837373837373737373737373938383A39393A393939
+      3939393939393939373636363636363636363636363636363636363636363636
+      3636363232322F2F2F2F2F2F2F2F2F3030303232324545454B4B4B4E4E4E5252
+      525656563434343333333434343535353636363636363838383939393A3A3A3C
+      3C3B3E3E3E3E3F3F4140414242424343444746474948484A4A4A4D4D4D4F4F4F
+      5252525454545757575B5B5B5E5E5E6060606464646767676B6B6B6E6E6E7171
+      717575757979797E7E7E8281828686868B8B8B8F8F8F9494949999999E9E9EA2
+      A2A2A8A8A8ADADADB2B2B26565663737373B3B3B3E3E3E404040434343454545
+      4646464848484848484848484747474747474646464545454545454545454444
+      444343434141414040403F3F3F3D3D3D3B3B3B3A3A3A39393938383839373037
+      3839263B8C123DE3083DFF073CFF073BFF083BFF073AFF0639FF0438FF0136FF
+      0035FF0C3BF2354FB563666F6A675E6061605A5A5A5353534C4C4C4545454040
+      403B3B3B3737373434343232323131313030302F2F2F2F2F2F2E2E2E2E2E2E2D
+      2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A292929272727252525232323
+      2020201E1E1B1A1C210422C60024EA0023DF0023DE0022DD0022DC0021DB0021
+      DA001FD9001FD8001FD7001ED6001ED5001DD4001DD3001CD2001CD1001BD000
+      1ACE001ACE001ACD0019CB0019CB0018CA0018C90017C70016C60016C60016C5
+      0015C30015C20014C10014C00013BF0013BE0011BD0011BC0011BB0010BA0010
+      B9000FB8000FB7000EB6000EB5000DB4000CB2000CB2000CB0000BAF000BAF00
+      09AE0008B121245933322A2C2C2D272727202020181818101010070707050505
+      050505040404040404020202020202020202434343AAAAAAA4A4A49F9F9F9998
+      999393938E8E8E8988898484848282817D7C7C7777777272726B6C6B65656561
+      61615D5D5D5858595455545152514D4D4D5353535454545252524F4F4F4D4D4D
+      4B4B4B4848483E3E3E2F2E2E2C2C2C29292A2727272525242323232122211F1F
+      201D1D1D1B1B1B1919191717171D1D1D2222222222222222222323241F1E1F12
+      12131111121110110F10110F0F10121212141314141413131414131313131313
+      1213131312131313121212121213121212121212111212111112111211111111
+      121111111011111010101011111110101010101010101010100C0C0C0C0C0C0C
+      0C0B0B0B0B0D0C0C19191925252529292A302F2F333434222222080809080808
+      0808080808080708080808070707080708070707070707070706070707070706
+      0607060606060706060706060605060606060506050606060506060505050508
+      0707101010151515151515151616151516161616161616171717171717181818
+      1818180F0F0F0505050303030303030403040303030304030303030303030303
+      0302020302030303030203030203020202020203020202020202020202010201
+      0102010201020101020101020101020101010101010101010101010101010101
+      0100010100010101000001010100010100000100010100000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303131313838383F3F3F40404040404040
+      40404040404040404040404040404040404040404040403A3A3A3333332F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3131
+      323636363A39393A393939393939393939393939393939393939393939393939
+      3939393939393939393939393939393938393938393838393838393838393838
+      3938383131313231313231313231323231323232323938383939393939393939
+      3939393939393939393839393839383839383839383839383838383838383838
+      3838383838383838383838383838383838383838383838383838383837383837
+      3837373837373837373837373837373737373938383A3A393A39393A39393939
+      3939393937373736363636363636363636363636363636363636363636363634
+      34342F2F2F2F2F2F2F2F2F2F2F2F3131314343434848484D4D4D515151555555
+      3E3E3E3333333434343535353636363737373838383A3A3A3A3A3A3D3D3D3E3E
+      3E3F3F3E4242424242424545444647464848494B4A4A4E4D4D4F4F4F53535355
+      55555858585B5B5B5D5E5D6262616465656868686C6C6C70706F737373777777
+      7A7A7A7F7F7F8383838888888C8C8C9191919596959A9A9A9F9F9FA4A4A4AAAA
+      AAAFAFAFABABAB4444443A3A3A3D3D3D40404043434345454547474748484849
+      4949494949484848474747474747474747464646454545454545444444434343
+      4141414040403E3E3E3C3C3C3A3A3A38383836363637352C31374B183EC90B40
+      FF0B3FFF0B3EFF0B3EFF0A3DFF093CFF093BFF083BFF073AFF0639FF0638FF02
+      37FF0034FF153FE4545E8469665C5F5F5F5858585151514A4A4A4343433D3D3D
+      3939393636363333333131313131312F2F2F2F2F2F2F2F2F2E2E2E2E2E2E2D2D
+      2D2C2C2C2C2C2C2C2C2C2B2B2B2A2A2A2929292727272525252323232020201D
+      1D1C1B1B170821A30025EC0024E00023DF0023DE0022DD0022DC0021DB0021DA
+      001FD9001FD8001FD7001ED6001ED5001DD4001DD3001CD2001CD1001BD0001A
+      CE001ACE001ACD0019CB0019CB0018CA0018C90017C70016C60016C60016C500
+      15C30015C20014C10014C00013BF0013BE0011BD0011BC0011BB0010BA0010B9
+      000FB8000FB7000EB6000EB5000DB4000CB2000CB2000CB0000BAF000BAE0008
+      B30C138C2F2F2C2E2E2C2929292222221B1B1B1414140A0A0A06060606060604
+      0404040404040404020202020202121212A0A0A1A7A6A7A1A1A19B9B9B959595
+      9090918C8D8C8988888382827F7E7E7978797474746F6F6F6A696A6363635E5E
+      5E5B5A5B5556555252524E4E4E4A4A4A4F50505252525050504D4D4D4A4A4A48
+      48484545453C3B3C2D2D2D2A2A2A2828282626262323232222222120201D1D1D
+      1C1C1C1A1A1A191A192323232323232323232323232423231919191213131111
+      121110121010100F0F1014141415141414141413141413131313131313131313
+      1213131213121213121212121212121212111112121111111111111211111111
+      1111111110111011101110111110101011101010110D0D0D0C0B0C0C0C0C0C0C
+      0C0C0C0C1414142525252929292E2D2E3231322B2B2B08090908080808080807
+      0807080808080707070808080707070707070707070707070706070607060707
+      0606060707070606060606060606060606060505060505050E0E0D1515151515
+      1515151515161616161616161716161717171717171718181818181818181819
+      1919151515070708030304040303030303030303030303030303030202020302
+      0303020302020203030202020302020202020202020202020202020201010201
+      0201020201020201010101010101020101010101010101010101010101010101
+      0001010101000100000101000100000000010001000001000100000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000030303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303636363D3D3D4040404040
+      404040404040404040404040404040404040404040404040403C3C3C3535352F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      3030303535353939383939393939393939393939393939393939393939393939
+      3939393939393939393939393839393839393839383839383839383839383833
+      3333313131323131323131323132323132373737393939393939393939393939
+      3939393939393939383939383938383938383938383938383838383838383838
+      3838383838383838383838383838383838383838383838383838383738383738
+      37373837373837373837373837373838383A3A393A3A393A39393A3939393939
+      3737373736363636363636363636363636363636363636363636363635352F2F
+      2F2F2F2F2F2F2F2F2F2F3030303D3D3D4848484B4B4B4F4F4F53535349494933
+      33333434343636363636363737373838383A3A3A3B3B3B3D3D3D3E3E3E403F3F
+      4241424344444546464847484A49494B4C4B4E4F4F5152515353535757575959
+      595C5C5C5F5F5F6362626665666A6A696D6D6D7171717474747878787C7C7C80
+      80808585858989898E8E8E9393939798989C9C9CA1A1A1A6A6A6ABABABB0B0B0
+      8D8D8D3A3A3A3C3C3C3E3E3E4242424545454646464848484949494949494A4A
+      4A4949494848484747474747474747474646464545454444444343434141413F
+      3F3F3D3D3D3A3A3A3737373636363533292D35541440E20C41FF0E40FF0E40FF
+      0D3FFF0C3EFF0B3EFF0A3DFF093CFF093BFF083BFF073AFF0639FF0639FF0438
+      FF0035FF0939F44C598D6663585B5B5B5454544D4D4D4646464040403B3B3B37
+      37373434343333333131313030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D
+      2C2C2C2C2C2C2C2C2C2B2B2B2929292828282525252323232020201D1D1D1C1A
+      0E0E1F780025EE0024E10024E10023DF0023DE0022DD0022DC0021DB0021DA00
+      1FD9001FD8001FD7001ED6001ED5001DD4001DD3001CD2001CD1001BD0001ACE
+      001ACE001ACD0019CB0019CB0018CA0018C90017C70016C60016C60016C50015
+      C30015C20014C10014C00013BF0013BE0011BD0011BC0011BB0010BA0010B900
+      0FB8000FB7000EB6000EB5000DB4000CB2000CB2000CB0000BAF000AB0010AAD
+      2225482E2E2729292A2424241D1D1D1717170E0E0E0707070606060505050404
+      04040404040404020202020202757675A8A8A8A3A3A39D9C9D99999995949490
+      8F8F8A8A8A858485807F7F7B7B7B7575757071716C6C6C6666666060605B5B5B
+      5758575353534F4F4F4B4B4B4949494E4D4E5050504D4D4D4C4C4C4848484646
+      464242423938392C2C2D2929292626262424242223232121201E1E1F1E1E1E1E
+      1E1E222222242424252525242424242424232222131314121213111112111112
+      1010111112121514141514141414141414141414131313141313131313131313
+      1313131312131312121212121212121211121212121212111211111111111111
+      11111111111011111010111111111011100E0E0E0C0C0C0C0C0C0C0B0B0C0C0D
+      1211122323232828282D2C2D3030303333340908090809090808090808080808
+      0808080808070707080707080707070707070707070707060706060707060606
+      07070606060606060606060606060A090A131212161615151615151515161616
+      1717171617171818181717171415151818181818181819181818181919191819
+      191718180B0C0C03030403030304030303030303030303030302030303020303
+      0203030203020302020202020202020202020202020202020202020102010102
+      0101010102010102020101010101010101020101010101010001010001000000
+      0000010100010001010000000000000001010000010000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000003030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030303030303434343B3B3B404040
+      4040404040404040404040404040404040404040404040404040403E3E3E3636
+      373030302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F30363636393939393939393939393939393939393939393939393939
+      3939393939393939393939383939383938383938383938383938383333333131
+      3131313132313132313132313237373739393939393939393939393939393939
+      3939393939393938393938393838393838393838393838383838383838383838
+      3838383838383838383838383838383838383838383838383838373838373837
+      373837373837373837373838383A3A3A3A3A393A3A393A39393A393938383837
+      36363636363636363636363636363636363636363636363636363030302F2F2F
+      2F2F2F2F2F2F3030303838384646464A4A4A4D4D4D5252525353533333333434
+      343636363636363737373939393A3A3A3B3B3B3D3D3D3E3E3E40404042424144
+      44434746474747484A4B4A4D4D4D4F4F4F5352525454545757575A5A5A5D5D5D
+      6060606464646666676A69696D6D6E72727175767579797A7D7D7D8282828686
+      868B8B8B8F8F8F9494949999999E9E9EA2A3A2A9A8A8ADADADB2B2B26868683C
+      3C3C3E3E3E4141414444444646464848484949494949494A4A4A4A4A4A4A4A4A
+      4949494848484747474747474747474646464444444343434141413E3E3E3B3B
+      3B37373735353534322D2F323F1740DB0F43FF1041FF0F40FF0E40FF0E40FF0D
+      3FFF0C3EFF0B3EFF0A3DFF093CFF093BFF083BFF073AFF0639FF0639FF0538FF
+      0035FF0A3AF3525A7A5F5D565656565050504949494242423C3C3C3838383535
+      353434343232323131313030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C
+      2C2C2C2C2C2B2B2B2929292828282525252323232121211E1E1E1C1A11111C54
+      0025E50024E40024E20024E10023DF0023DE0022DD0022DC0021DB0021DA001F
+      D9001FD8001FD7001ED6001ED5001DD4001DD3001CD2001CD1001BD0001ACE00
+      1ACE001ACD0019CB0019CB0018CA0018C90017C70016C60016C60016C50015C3
+      0015C20014C10014C00013BF0013BE0011BD0011BC0011BB0010BA0010B9000F
+      B8000FB7000EB6000EB5000DB4000CB2000CB2000CB0000BAF0008B61117782C
+      2C24292929262626202020191919111111090909070707060606040404040404
+      040404030303030303424242AAAAAAA6A6A6A2A1A29C9B9B9796969191918C8C
+      8B8786868181817D7D7C7777777272716E6E6E6969696464645C5C5C58585854
+      54545050504C4D4C4949494646464949494D4D4D4C4C4C494949464646424242
+      3E3E3E3A393A2B2B2A262626272728282828292A2A292A292A29292929292727
+      272727272626262525252424241D1D1D14141412131311121211111211111214
+      1414161414151414151414141413141414131314131313131313131313131313
+      1312131213121212121212121212121112121211121111111112111111121111
+      111111111111101110101010110F0F0E0C0D0C0C0C0C0C0B0C0C0B0B0F0E0E22
+      22222727272A2A2A2E2E2F323231111011090909080808080808080808080807
+      0708070808080808080707070707080707070707070707070706070707060607
+      070706070707080F0F0F15151515161615151617171616171617181718181718
+      1818121212080808070808131212181819181818191A1A191919181919191919
+      1A1A1A100F100303040403030304040303030303030203030302030203030203
+      0203030302020202030202020203020202020202020202020202020202020202
+      0101020201010201010101020102010101010101010101010101010100010100
+      0001010100010000010000010100010100000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303030303030303232323A3A3A3F
+      3F3F4040404040404040404040404040404040404040404040404040403F3F3F
+      3939393131312F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F34343439393939393939393939393939393939393939393939393939393939
+      3939393939393938393938393938393838393838393838333333313131313131
+      3131313231313231313636363939393939393939393939393939393939393939
+      3939393939393839393839383839383839383839383838383838383838383838
+      3838383838383838383838383838383838383838383838383837383837383737
+      3837373837373837373A3A3A3A3A3A3A3A393A3A393A39393938383736363636
+      363636363636363636363636363636363636363636363232322F2F2F2F2F2F2F
+      2F2F3030303232324444444848484B4B4B4F4F4F5353533F3F3F353535363636
+      3636363838383939393A3A3A3B3B3B3D3D3D3F3F3F4141414242424444434747
+      474949494A4B4A4E4E4D5050505253525554545757575B5B5B5E5E5E61616164
+      64646868686C6B6B6F6E6E7373727677777A7A7A7E7F7E8382828787878B8B8B
+      9090909595959A9A999E9E9EA4A4A4A9A9A9AFAFAFADADAD4747473D3D3D4141
+      414444444646464747474949494A4A4A4B4B4B4A4A4A4A4A4A4A4A4A4A4A4A49
+      49494848484747474747474646464444444242423F3F3F3D3D3D393939363636
+      323231302F291C3DB41045FF1243FF1042FF1041FF0F40FF0E40FF0E40FF0D3F
+      FF0C3EFF0B3EFF0A3DFF093CFF093BFF083BFF073AFF0639FF0639FF0538FF00
+      35FF183FDB595A5C5756545050504A4A4A4343433E3E3E3A3A3A363636343434
+      3333333232323030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C
+      2C2C2C2C2A2A2A2828282626262323232121211E1E1E1B1A16151A320125DD00
+      25E70024E20024E20024E10023DF0023DE0022DD0022DC0021DB0021DA001FD9
+      001FD8001FD7001ED6001ED5001DD4001DD3001CD2001CD1001BD0001ACE001A
+      CE001ACD0019CB0019CB0018CA0018C90017C70016C60016C60016C50015C300
+      15C20014C10014C00013BF0013BE0011BD0011BC0011BB0010BA0010B9000FB8
+      000FB7000EB6000EB5000DB4000CB2000CB2000CB0000AB3030DA22425312929
+      252626262222221B1B1B1414140B0B0B08080807070705050504040404040403
+      0303030303161616A6A6A6A9A9A8A3A3A29E9E9D9797979292928D8D8D878787
+      8282827E7D7D7878787474746F6F6F6A6B6A6666666060605A5A5A5554555251
+      524D4E4D4A4A4A4646464343434544454B4B4B4848484646464343433F3F3F3D
+      3D3D3636373535353334333131312F2F2F2B2B2C2B2C2B292929292929282728
+      2827272626262525251717181414141312131112121111121212121515151514
+      1415141515141414141414131413131413131313131313131313131212121313
+      1313131212121212121212121212121212121111121111111112111111111111
+      1111111011101011100F0F100C0C0C0C0C0C0C0C0C0C0B0C0E0D0D1E1D1E2525
+      262828282C2C2C2F2E2F17171608080908080908090808080808080808080808
+      08070808080807070707070707080707070707070707060607070707060B0B0B
+      1414141616161616161616161717171818181818171818181615150C0B0C0707
+      070706070707070706070E0E0E1818171919191A19191919191919191A191A1B
+      1A1A151515050506030403030403030303030303030303030303030302030302
+      0303020202020303020202020202020202020202020202020202020201010201
+      0201010201010101020101010101010101010100010101010101010101000000
+      0101010100000100000001010001000100000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303131313838
+      383E3E3E40404040404040404040404040404040404040404040404040404040
+      40403B3B3B3333332F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F323232
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393839393839393839383839383839383835353531313131313131313131
+      3131323131353535393939393939393939393939393939393939393939393939
+      3939393939383939383938383938383938383938383838383838383838383838
+      3838383838383838383838383838383838383838383838383738383738373738
+      37373837373A39393A3A3A3A3A3A3A3A393A3A39393939373636373636363636
+      3636363636363636363636363636363636363434342F2F2F2F2F2F2F2F2F2F2F
+      2F3131313E3E3E4646464949494E4E4E5151514F4F4F35353536363636363638
+      38383939393A3A3A3C3C3C3E3E3E3F3F3F414141424242454545474747494849
+      4A4B4B4E4E4D4F4F505353535555565858585B5B5B5F5F5F6262626565656868
+      686C6C6C7070707473737878787B7B7C7F7F7F8585858989898D8D8D92929197
+      97979C9C9CA1A1A1A6A6A6ABABABB0B1B09595953D3D3D3F3F3F434343454545
+      4848484949494A4A4A4B4B4B4C4C4C4C4C4C4A4A4A4A4A4A4A4A4A4A4A4A4949
+      494848484747474646464545454242423F3F3F3C3C3C383838343434312F2627
+      34661345FF1345FF1244FF1143FF1042FF1041FF0F40FF0E40FF0E40FF0D3FFF
+      0C3EFF0B3EFF0A3DFF093CFF093BFF083BFF073AFF0639FF0639FF0537FF0035
+      FF374B9758554A4E4F4E4A4A4A4343433F3F3F3B3B3B37373735353533333332
+      32323232323030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C
+      2B2B2B2929292727272525252222221F1F1F1C1B19191A210324CB0026EA0025
+      E30024E20024E20024E10023DF0023DE0022DD0022DC0021DB0021DA001FD900
+      1FD8001FD7001ED6001ED5001DD4001DD3001CD2001CD1001BD0001ACE001ACE
+      001ACD0019CB0019CB0018CA0018C90017C70016C60016C60016C50015C30015
+      C20014C10014C00013BF0013BE0011BD0011BC0011BB0010BA0010B9000FB800
+      0FB7000EB6000EB5000DB4000CB2000CB2000BB1000AB5171B5729281F262626
+      2222221D1D1D1616160E0E0E0808080707070606060606060505050303030303
+      03030303828282ABABAAA4A4A4A09F9F9A9A9A9494948F8E8E89898984838480
+      7F807A7A7A7474747070706C6D6D6767676364635E5E5E5656565252524F4E4E
+      4A4A4A4747474343434040404343434848484545454343433F3F3F3D3D3D3A3A
+      3A3737373434343232323030302E2E2E2C2D2D2B2A2A2A2A2A29292927282828
+      2727202020151515141414131313111112111112141414161514161415151414
+      1514141414141414141414141314131313141413131313131313131213121313
+      1213121312121212121212121211121211121212111112121111111111111111
+      11111111111111110D0C0C0C0C0D0D0D0C0C0C0B0D0D0C181819232223262627
+      2829292A2A2A1A1A1A0809080909090808080808090808090808090807070708
+      0807080808080808080807070707070707070709090911111116161616161616
+      1616171717171717181818171818191819101110080909080807070807070707
+      0707070707070606070A090A1515151A19191A19191919191A1A1A1B1B1B1B1A
+      1A16171707060703040303030303030303030303030303030303030303030303
+      0302030302030202020202020202020202020202020202020102020202010102
+      0202020102010101010101010101010101010101010101010101010101010100
+      0100000000000001010000000001000000010000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3636363D3D3D4040404040404040404040404040404040403F3F3F3F3F3F3F3F
+      3F3F3F3F3D3D3D3535352F2F2F2F2F2F2F2F2F2F2F2F2F2F2F31313139393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939383939383938383938383938383535353131313131313131313131313131
+      3134343439393939393939393939393939393939393939393939393939393939
+      3939393938393938393838393838393838393838383838383838383838383838
+      3838383838383838383838383838383838383838383838373838373837373837
+      373939393A3A3A3A3A3A3A3A3A3A3A393A3A3937373737363636363636363636
+      36363636363636363636363636363636363030302F2F2F2F2F2F2F2F2F313131
+      3535354545454848484C4C4C4F4F4F5151514040403636363636363838383A3A
+      3A3A3A3A3C3C3C3E3E3E3F3F3F4242424343434545454747474A4A4A4C4C4C4F
+      4E4F505151545353565756595A595C5B5C5F5F5F6363636666666A6A6A6D6D6D
+      7171717575757979787D7D7D8181818585858A8A8A8E8E8E9393939898989C9C
+      9CA2A2A2A7A7A7ACACADB2B2B27979793E3E3E4141414444444747474949494B
+      4B4B4B4B4B4C4C4C4C4C4C4C4C4C4C4C4C4A4A4A4A4A4A4A4A4A4A4A4A494949
+      4747474646464444444242423E3E3E3A3A3A3737373232312F2E281C3EBD1347
+      FF1445FF1345FF1244FF1143FF1042FF1041FF0F40FF0E40FF0E40FF0D3FFF0C
+      3EFF0B3EFF0A3DFF093CFF093BFF083BFF073AFF0639FF0639FF0236FF123CE0
+      4E4F524D4C4A4848484343433F3F3F3B3B3B3838383535353434343232323232
+      323232323030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2C2C2C2C2C2C2A
+      2A2A2828282626262323232020201D1D1B1B1A1C0623B80027EF0026E40025E3
+      0024E20024E20024E10023DF0023DE0022DD0022DC0021DB0021DA001FD9001F
+      D8001FD7001ED6001ED5001DD4001DD3001CD2001CD1001BD0001ACE001ACE00
+      1ACD0019CB0019CB0018CA0018C90017C70016C60016C60016C50015C30015C2
+      0014C10014C00013C10013C00012BF0011BD0011BC0010BA0010B9000FB8000F
+      B7000EB6000EB5000DB4000CB2000CB1000AB80B128025251F2525242323231E
+      1E1E181818111111090909080808070707060606060606040404030303030303
+      585858ADACACA7A6A6A1A0A09B9B9A959494908F8F8A8A8A8585848080807B7B
+      7B7676767272726D6D6D6968686464656060605B5B5B535353504F504C4C4C48
+      48474444444040403F3F3F4140414646464343434141413D3D3D3B3B3B383838
+      3737373333333131313030302D2E2D2C2C2D2B2B2B2A2A2A2929282828271C1B
+      1B15151514141413131312121211121216171716151516151516151515141415
+      1414141414141414141414141314131413141313131313131313131312121313
+      1212131212121212121212111211121212111111121211121111111111111011
+      111111110E0D0D0C0C0C0C0C0C0C0C0C0C0D0D14151522212224232426262526
+      27262121210B0A0A080809090909090809080808080808080808080707080707
+      0808070808080807080707070E0E0E1414141616161616161717171717171818
+      181818181919191414140B0B0B08080807070808070807080807080807070707
+      07070707070607070807081212121919191919191919191A1A1A1A1A1A1B1C1C
+      19191A0808090303030303040303040304030303020203030202020203030302
+      0203030202020202020202020202020202020202020102020202010202020102
+      0102010201010102010101010101010101010101010101010101010100000101
+      0000000100010100000000000101000000000000010000000000000000000000
+      0000000000000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303434343B3B3B4040404040403F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F
+      3F3F3F3F3F3F3837382F2F2F2F2F2F2F2F2F2F2F2F3030303939393939393939
+      3939393939393939393939393939393939393939393939393939393939393839
+      3938393938393838393838373736313131313131313131313131313131333333
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393839393839383839383839383839383838383838383838383838383838
+      3838383838383838383838383838383838383838383837383837383737393838
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A393838383736363636363636363636363636
+      363636363636363636363636363232322F2F2F2F2F2F2F2F2F31313131313140
+      40404646464949494D4D4D5050504D4D4D3636363737373838383A3A3A3A3A3A
+      3D3D3D3E3E3E3F3F3F4242424444444646464848484A4B4B4D4D4D4F4F4F5252
+      52555554575757595A595D5D5D6061606363636767676A6A6A6E6E6E72727276
+      7676797A797E7E7E8282828686868B8C8B8F8F8F9494949999999E9E9EA3A4A4
+      A9A8A9ADADADB3B3B35C5C5D4141414444444646464848484B4B4B4C4C4C4D4D
+      4D4C4C4C4C4C4C4C4C4C4C4C4C4C4C4C4A4A4A4A4A4A4A4A4A4A4A4A48484847
+      47474444444141413E3E3E39393935353531302B2A30471646F61447FF1546FF
+      1446FF1345FF1244FF1143FF1042FF1041FF0F40FF0E40FF0E40FF0D3FFF0C3E
+      FF0B3EFF0A3DFF093CFF093BFF083BFF073AFF0639FF0538FF0437FF3745794A
+      483F4545454242423E3E3E3B3B3B383838363636353535333333323232323232
+      3232323030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2C2C2C2A2A2A2929
+      292626262424242121211F1E1E1D1B160A22980028F70027EE0026E60025E300
+      24E20024E20024E10023DF0023DE0022DD0022DC0021DB0021DA001FD9001FD8
+      001FD7001ED6001ED5001DD4001DD3001CD2001CD1001BD0001ACE001ACE001A
+      CD0019CB0019CB0018CA0018C90017C70016C60016C60016C50015C30015C200
+      14C30014C20013C00013BF0012C00011C30011C70010C30010BF000FB9000FB7
+      000EB6000EB5000DB4000CB2000CB4020CA61E1F2E2424212323231F1F1F1919
+      191313130C0C0C0808080707070707070606060505050303030303032E2E2EAD
+      ACACA7A7A7A2A2A19D9C9D9796979191918C8C8C8786868382827D7C7D787778
+      7373736E6E6E6A6A6A6666656161615C5C5C5858585050504D4D4D4949494444
+      444141413F3F3F3B3B3B3C3C3C4342424242423E3E3E3C3C3C3A3A3A37383834
+      34343131313232322F2F2F2828292424252121221D1C1D181718171717151615
+      1415141313131211121414131717161615151615151615141515151515141514
+      1414141413141414131414131313131313131313131313121313131213121213
+      1213121312121212121212121211121212111112121111111111111111111111
+      0E0F0E0D0C0D0D0C0C0D0C0D0D0D0D1011102020212120202122222322222222
+      212020201515140E0E0D09090809080809080808080808080808080808080808
+      08070B0B0C121212161616161616161616171717171717181818181818171717
+      1010100808080808080808080708080708070708080707070708070707070707
+      070707070606070707060F0F101919191919191A1A1A1B1B1B1C1C1C1C1B1C1B
+      1A1A0C0C0B040403030304030403030303020303020303030302030302030303
+      0202020303020303020302020202020202020201020101020102020201010201
+      0201010101010201010101010101010101000101010100010101010000000100
+      0101000100000001000000010001000000000000000000000000000000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303232323939393E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3F
+      3F3F3B3B3B2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F393939393939393939393939
+      3939393939393939393939393939393939393939393939393939383939383939
+      383938383938383838373131313131313131313131313131313131313A393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939383939383938383938383938383938383838383838383838383838383838
+      383838383838383838383838383838383838383838373838373838383A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A393939373636373636363636363636363636363636
+      3636363636363636363535352F2F2F2F2F2F2F2F2F3030303131313636364545
+      454747474B4B4B4E4E4E5050504343433737373838383A3A3A3B3B3B3D3D3D3E
+      3E3E4040404242424444444747474848484B4B4B4D4D4D504F50525353555455
+      5757575B5A5A5E5F5E6161606564646868686B6B6B6F6F6F7273737677777B7B
+      7B7F7F7F8282828787888C8C8B9090909595969A9A9A9F9F9FA4A5A5AAAAAAB0
+      B0B0A9A9A94747474343434545454747474A4A4A4B4B4B4D4D4D4E4E4E4E4E4E
+      4E4E4E4C4C4C4C4C4C4C4C4C4C4C4C4A4A4A4A4A4A4A4A4A4949494747474444
+      444040403D3D3D393939333333302D232436771649FF1647FF1547FF1546FF14
+      46FF1345FF1244FF1143FF1042FF1041FF0F40FF0E40FF0E40FF0D3FFF0C3EFF
+      0B3EFF0A3DFF093CFF093BFF083BFF073AFF0639FF0238FF233CA04542364040
+      403E3E3E3D3D3D3A3A3A38383836363635353534343433333333333332323232
+      32323030303030303030302F2F2F2F2F2F2E2E2E2D2D2D2C2C2C2A2A2A282828
+      2525252323232121211F1E1C1A1C25101F660623B90026EA0027F00025E60024
+      E20024E20024E10023DF0023DE0022DD0022DC0021DB0021DA001FD9001FD800
+      1FD7001ED6001ED5001DD4001DD3001CD2001CD1001BD0001ACE001ACE001ACD
+      0019CB0019CB0018CA0018C90017C70016C60016C60016C50015C60114B4080E
+      47090E3C090E3D080E45070E51050E65040E79020F930010B5000FB9000FB700
+      0EB6000EB5000DB4000CB3000BB71317542322192222221F1F1F1A1A1A151515
+      0E0E0E0909090808080707070707070505050404040303030E0D0D9F9F9FAAAA
+      AAA4A3A49E9E9E9897979292928D8D8D8887878382827E7E7D7979787474746F
+      6F6F6B6B6B6666666162625E5D5D59595A5555554E4E4E4A4A4A464546424142
+      3F3F3F3C3C3C3939393838384041413F3F3F3D3D3D3A3A3A363636302F302A2A
+      2A2525262020201E1D1E1C1B1C1A1B1B18181818181817171716161514141413
+      1314121212161616171617161615161515161515161515151415141414141514
+      1414141314131413141314131414131413131313131312131312121313131312
+      121312121212121212111212121112111112111211121111111111110F0E0F0C
+      0C0D0D0D0D0C0C0C0C0C0C0D0D0D1F1F1F1F20202120212120201F201F1D1E1E
+      1C1D1C1B1B1B17181710100F0909080809090808080808080909090F100F1616
+      16161717161716181817171717181818181818191919141414090A0A08080808
+      0908080807070808080808080808070808080708070707070708070707060707
+      0707070607070606070D0C0D1819181919191A1A1A1B1B1B1B1B1B1C1B1C1C1D
+      1D0C0C0D03040304040303030303030303020302030302030303030303020303
+      0202020202020203020202020202010202010202020102010201020202010102
+      0101020101010201010101010101010101000101010101000101010101010001
+      0001000001000000000101000000000000000000000000000000000000000000
+      0000000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303131313636363B3B3B3C3C3C3C3C3C3D3D3D3D3D3D3E3E3E3C3C
+      3C2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F38373739393939393939393939393939
+      3939393939393939393939393939393939393939393939393938393938393838
+      3938383938383131313131313131313131313131313131313838383A39393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3938393938393838393838393838393838383838383838383838383838383838
+      3838383838383838383838383838383838383838373838373A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A37373737363636363636363636363636363636363636
+      36363636363636363130312F2F2F2F2F2F3030303131313232323F3F3F474747
+      4949494C4C4C4F4F4F5050503C3C3C3838383A3A3A3B3B3B3D3D3D3E3E3E4040
+      404242424444444747474949494B4B4B4D4E4E5050505253535655565858585B
+      5B5B5F5E5F6162616665656968686C6C6C7070707474747878787C7C7C80807F
+      8584858989898D8E8E9292929797979C9C9CA0A0A0A6A6A6ABABABB1B1B19595
+      954141414444444747474A4A4A4B4B4B4D4D4D4D4D4D4E4E4E4F4F4F4E4E4E4E
+      4E4E4C4C4C4C4C4C4C4C4C4C4C4C4B4B4B4A4A4A494949474747444444414141
+      3C3C3C373737333333302C21213C9C164BFF1748FF1648FF1547FF1546FF1446
+      FF1345FF1244FF1143FF1042FF1041FF0F40FF0E40FF0E40FF0D3FFF0C3EFF0B
+      3EFF0A3DFF093CFF093BFF083BFF073AFF0339FF1738BE3B39353B3B3A3B3B3B
+      3A3A3A3939393838383636363636363535353333333333333333333232323232
+      323030303030303030302F2F2F2F2F2F2E2E2E2D2D2D2B2B2B29292927272725
+      25252222222020201E1D1B1D1B0F1A1A19121D500822A30026E20026EF0024E6
+      0024E20024E00023DF0023DE0022DD0022DC0021DB0021DA001FD9001FD8001F
+      D7001ED6001ED5001DD4001DD3001CD2001CD1001BD0001ACE001ACE001ACD00
+      19CB0019CB0018CA0018C90017C70016C60016C50016CF0512780E0C000D0C03
+      0C0C040D0C030C0B010C0B000B0A040A0A09030E840010C1000FB8000FB7000E
+      B6000EB5000DB4000CBC0910781E1E1720201F1E1E1E1A1A1A1515150F0F0F0A
+      0A0A090909070707070707060606050505050505040404818181ABABABA5A4A4
+      A09F9F9A99999494948F8F8E8A89898484847F7F7F7A7A7A7574747071706C6C
+      6C6767676363625F5F5F5B5A5A5757585252524B4B4B4747464343434040403C
+      3C3C3939393737373636363C3D3D3737362E2E2F282828252626232424222223
+      2020201F1F1F1C1B1B1A1B1A1818191818181717171615161515151313131414
+      1418171718171716151516151516151516141515151515151414141414141514
+      1414141414141314131313131413131313131313131313131212121312121212
+      1212121212121212121212111212121111121111111111111010100D0C0D0D0D
+      0D0C0D0C0C0C0D0D0D0E1A1A1A1E1E1E1E1D1E1D1E1D1E1E1D1C1C1C1C1C1C1B
+      1B1B1B1B1B1B1B1A1918191111110909090D0D0D161616171717171716171717
+      1717171818181818181919191717170D0D0E0809090909090808080808080808
+      090808080808080708080708080A090A08080807070707070707070707070706
+      06070607060706070B0A0B161617191A191A1A1A1C1C1C1C1C1C1D1D1D1D1C1C
+      0D0D0D0303040304030303030303030303030302030303020303020202030302
+      0302030302020202020202020202020201020201010202020201010201020101
+      0101020101010101010101010101010101010001010000010101010100010000
+      0001010000000001000000000000000100000000000000000000000000000000
+      0000000000000000000030303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303434343B3B3B3C3C3C3D3D3D3D3D3D3E3E3E2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F3737373939393939393939393939393939393939
+      3939393939393939393939393939393939393939393839393839393839383839
+      38383332323131313131313131313131313131313737373A39393A3939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3839393839383839383839383839383838383838383838383838383838383838
+      38383838383838383838383838383838383838373939393A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3838383736363736363636363636363636363636363636363636
+      363636363434342F2F2F2F2F2F3030303030303232323535354646464747474B
+      4B4B4D4D4D5050504D4D4D3B3B3B3A3A3A3B3B3B3D3D3D3F3F3F414141424242
+      4444444747474949494B4B4B4E4E4E5050505353535656555959595C5C5B5F5F
+      5F6362636665666969696C6C6C7070707474747979797C7D7D80808184858489
+      89898E8E8E9393939898989C9D9DA1A1A1A7A7A7ADADADB2B2B2808080444444
+      4646464949494B4B4B4D4D4D4E4E4E4F4F4F4E4E4E4F4F4F4F4F4F4E4E4E4E4E
+      4E4C4C4C4C4C4C4C4C4C4C4C4C4A4A4A4949494848484545454141413C3C3C37
+      37373332312E2D26203EAD174BFF1749FF1748FF1648FF1547FF1546FF1446FF
+      1345FF1244FF1143FF1042FF1041FF0F40FF0E40FF0E40FF0D3FFF0C3EFF0B3E
+      FF0A3DFF093CFF093BFF083BFF053AFF1338C837363637373537373738383837
+      3737373737373737363636353535343434333333333333333333323232323232
+      3030303030303030302F2F2F2F2F2F2D2D2D2C2C2C2B2B2B2929292626262424
+      242121212020201E1E1F1C1B191C1A101A1912131A3D091F8E0224D60025EE00
+      24E80024E10023DF0023DE0022DD0022DC0021DB0021DA001FD9001FD8001FD7
+      001ED5001ED7001EDC001DD5001CD2001CD1001BD0001ACE001ACE001ACD0019
+      CB0019CB0018CA0018C90017C70016C80016C40A0F330E0D060D0D0D0D0D0D0C
+      0C0C0C0C0C0C0B0B0B0B0A0B0A00050D660011C60010B9000FB8000FB7000EB6
+      000EB5000DB8020D9C16161C1C1C191C1C1C1919191616161010100A0A0A0909
+      09080808070707060606060606050505040404616161ADADACA7A6A7A1A0A09B
+      9A9A9595959090908A8A8A8585858080807A7A7A7576757172726D6D6D696868
+      6464645F5F5F5B5C5C5758575353535050504848484444444040403D3D3D3939
+      393737373434343131312E2D2D2B2B2C2A29292727272425252223232020201F
+      1F1F1D1D1D1A1B1A191919191818171717161616161616151414161616181716
+      1717171716151715151615161615151515151515151414141414141514151314
+      1414141414141413141313131313131413131313121212121313131213131212
+      12121212121212121212121211121211121111121111110D0D0D0C0C0D0C0D0D
+      0D0D0C0C0C0D1212121C1C1C1E1D1E1D1D1C1D1D1D1C1D1C1C1C1C1B1B1B1B1B
+      1B1B1A1B191A1A1A191A18191818181919181918181818171817181818191818
+      18191919191212120A0A0A090909080808090809080808080809080809080808
+      0808080909080A0A0A0A0A0A0909090909090707080707070707070706070706
+      07070607060707080909151515191A191B1B1B1C1C1C1C1D1D1D1C1D1E1E1E0D
+      0E0D030403030303030303030303030303030203020302030302030203020202
+      0302020202020202020202020202010202020101010202020201010201020101
+      0101010201010101010101010101010101010100000101010100010101000001
+      0101000000010101010000000001000000000000000000000000000000000000
+      0000000000003030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303939393A3A3A3B3B3B3D3D3D3E3E3E3030302F2F2F2F
+      2F2F2F2F2F2F2F2F343434393939393939393939393939393939393939393939
+      3939393939393939393939393939393939393939383939383938383938383434
+      343131313131313131313131313131313535353A39393A39393A393939393939
+      3939393939393939393939393939393939393939393939393939393939393938
+      3939383938383938383938383938383838383838383838383838383838383838
+      383838383838383838383838383838383838383B3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A393939373636373636363636363636363636363636363636363636363636
+      3636363130312F2F2F3030303030303232323232323D3C3D4646464848484B4B
+      4B4D4D4D4F4F4F4949493A3A3A3C3C3C3D3D3D3F3F3F41414142424245454547
+      47474949494B4B4B4E4E4E5151515353535757575A5A5A5C5C5B5F6060636363
+      6767666A6B6B6D6D6D7171717576757979797D7D7D8282828686868A8A8A8F8F
+      8F9394939898999D9D9DA3A3A3A8A8A8ADADADB2B2B26C6C6C4545454848484A
+      4A4A4D4D4D4E4E4E4F4F4F5050505050504F4F4F4F4F4F4F4F4F4E4E4E4E4E4E
+      4C4C4C4C4C4C4C4C4C4B4B4B4A4A4A4848484545454141413D3D3D3838383332
+      312E2D26203FAF184CFF1849FF1749FF1748FF1648FF1547FF1546FF1446FF13
+      45FF1244FF1143FF1042FF1041FF0F40FF0E40FF0E40FF0D3FFF0C3EFF0B3EFF
+      0A3DFF093CFF093BFF063AFF1438C73635343636343636363737373737373737
+      3737373737373736363635353534343433333333333333333332323232323230
+      30303030303030302F2F2F2E2E2E2D2D2D2C2C2C2A2A2A292929272727242424
+      2222222020201E1E1E1C1C1D1B1B1A1A191219170D14182C0B1D760322C60025
+      E80024E20023DF0023DE0022DD0022DC0021DB0021DA001FD9001FD9001FE200
+      1ED2041BA7001DD2001DD7001CD2001CD1001BD0001ACE001ACE001ACD0019CB
+      0019CB0018CA0018C80018D00314990E0E0B0E0E0D0E0E0E0E0E0E0E0E0E0C0C
+      0C0C0C0C0C0C0C0B0A02060C490011C00010BA0010B9000FB8000FB7000EB600
+      0EB7000DB10D0F2F15150F1818181717171515151010100B0B0B090909090909
+      080808070707060606060606040404414141ADADACA8A7A7A1A1A19C9C9C9696
+      969190908B8B8B8686868180807D7C7C7878777272726D6D6D69696A65656560
+      60605C5D5D5858585454555151514D4C4C4646464141413E3E3E3B3A3B373737
+      3434343131312D2D2E2C2C2D2929292727272525252222222122211F1F201D1D
+      1D1B1C1C19191918181817171716161616161616161618181918171718171717
+      1615171615161616161615161515151515151415151514141414141414141414
+      1413141413131314141413131313131313131313121213121212121312121212
+      121212121211121112111111111111111111120E0E0E0D0D0D0C0C0D0D0D0D0D
+      0C0D0C0D0C0C0C0C100F0F1616161C1B1C1C1C1D1C1D1C1C1C1C1B1B1B1B1B1B
+      1B1B1B1A1A191A19191A1919191919191919191919191919191A1A1615160C0D
+      0D0A09090909090909090909090909080909080908080809080908090A0A0A0A
+      0A0A0A0A0A0A0A0A0A09090A090A090909080709070707070707070707060607
+      0706060606070809091415141A1A1B1B1B1B1C1C1C1D1D1C1E1E1E1E1D1E0D0D
+      0D03040303030403030303030303030303030303030302030303020302020202
+      0203020202020202020202020202010202020201020102020201020102010101
+      0101010101010101010101010101010101010101010001010100000101000001
+      0100010101000000000000000001000000000000000000000000000000000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303636363939393A3A3A3C3C3C3D3D3D3232322F2F2F2F2F2F2F2F
+      2F2F2F2F3333333A393939393939393939393939393939393939393939393939
+      3939393939393939393939393939393938393938393838393838353535313131
+      3131313131313131313131313333333A39393A39393A39393A39393939393939
+      3939393939393939393939393939393939393939393939393939393939393839
+      3938393838393838393838393838383838383838383838383838383838383838
+      3838383838383838383838383838383A3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A37373737363636363636363636363636363636363636363636363636363635
+      34342F2F2F3030303030303131313232323333334242424747474949494B4B4B
+      4E4E4E4F4F4F4848483C3C3C3E3E3E3F3F3F4242424343434545454747474A4A
+      4A4C4C4C4F4F4F515151545454575757595A5A5D5D5D6160616363636767676A
+      6B6A6E6F6E7171717676767A7A7A7E7E7E8282828787878B8C8C909090959495
+      9A9A9A9F9F9FA4A4A4A9A9A9AEAEAEB2B2B25A5A5A4747474949494C4C4C4D4D
+      4D4F4F4F5050505151515151515050504F4F4F4F4F4F4F4F4F4E4E4E4E4E4E4C
+      4C4C4C4C4C4C4C4C4B4B4B4848484545454242423E3E3E3838383333332F2C23
+      223EA3184DFF194AFF1849FF1749FF1748FF1648FF1547FF1546FF1446FF1345
+      FF1244FF1143FF1042FF1041FF0F40FF0E40FF0E40FF0D3FFF0C3EFF0B3EFF0A
+      3DFF093CFF073CFF1538C1333330353433363636363636373737373737373737
+      3636363636363535353535353434343333333333333333333232323232323030
+      303030303030302F2F2F2E2E2E2D2D2D2C2C2C2A2A2A29292927272725252523
+      23232121211F1F1F1C1C1C1B1B1B19191918171217150914151B0C1B700124E1
+      0024E20023DF0023DE0022DD0022DC0021DB0021E20020DF061C9D0E153B1212
+      0C0B165B001DD4001DD8001CD2001CD1001BD0001ACE001ACE001ACD0019CB00
+      19CB0018CA0018D10A1155100E040F0F0F0F0F0F0F0F0F0F0F0F0E0E0E0D0D0D
+      0C0C0C0C0B06090C2B0011B90011BD0010BA0010B9000FB8000FB7000EB6000D
+      BC080D53100F051212121313131313131010100C0C0C0A0A0A09090909090908
+      0808060606060606050505242424ACABABA8A8A8A3A2A29D9D9D989797939292
+      8C8C8C8786878382827D7D7D7878787373736E6E6F6B6A6A6565656161615D5D
+      5D5959595455545252524D4D4D4A4A4A4444443F3E3F3B3A3A37373735353532
+      32322F2F2F2C2D2D2B2B2A2828282525252323232222211F1F1F1D1D1D1E1D1E
+      1D1C1D1B1B1C1B1B1C1B1B1B1C1C1B1B1B1A1919191818171817171716161716
+      1617161516151516151515151515151514141414141414141414141414141414
+      1414141413131414131313131314131313131313131213121213121212121312
+      1212121212111212111112111211120E0E0F0D0D0D0C0D0D0D0D0D0D0C0D0C0C
+      0C0C0D0D0C0C0D0C0C0C0B0C0C1112121919191C1D1C1C1C1C1B1B1B1B1B1B1B
+      1B1B1A1B1B191A1A1A1A191A1A1A1A1A1A1919191211120A09090909090A0A0A
+      0909090909090909090909090909080808080909090B0B0A0A0A0A0A0A0A0A0A
+      0A0A0A0A0A090A0A0A0A0A090A09090909080807070707070706070707070606
+      07060606070707081212121A1A1B1B1B1B1C1C1C1D1C1D1D1E1D1D1E1D0D0E0D
+      0303030303040303030303030303030303030302020203030303020202020202
+      0203020202020202020202010102020101010201020201010201010101020101
+      0201010201010101010101010101010101010101010100000101010101000001
+      0000010000000001010000000001000000000000000000000000000000003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303434343838383939393B3B3B3D3D3D3635362F2F2F2F2F2F2F2F2F2F2F2F
+      3131313A39393939393939393939393939393939393939393939393939393939
+      3939393939393939393939393839393839393839383837373631313131313131
+      31313131313131313131313A3A393A39393A39393A39393A3939393939393939
+      3939393939393939393939393939393939393939393939393939393939383939
+      3839383839383839383839383838383838383838383838383838383838383838
+      38383838383838383838383939393B3A3A3B3A3A3A3A3A3A3A3A3A3A3A393938
+      3736363736363636363636363636363636363636363636363636363636363232
+      323030303030303131313131313333333535354545454848484A4A4A4C4C4C4D
+      4D4D4E4E4E4747473E3E3E3F3F3F4242424343434646464747474A4A4A4C4C4C
+      4F4F4F5252525555555757575B5B5B5E5E5E6161616464646868686B6B6B6F6F
+      707372737776767B7B7C7F7F7F8383838787878C8C8C9191919596969A9A9A9F
+      9F9FA5A5A5AAAAAAB0B0B0ABABAB4C4C4C4949494B4B4B4D4D4D4F4F4F505050
+      5050505252525252525151515050504F4F4F4F4F4F4F4F4F4E4E4E4E4E4E4D4D
+      4D4C4C4C4B4B4B4949494646464242423E3E3E3A3A3A343434312D222539841A
+      4DFF194BFF194AFF1849FF1749FF1748FF1648FF1547FF1546FF1446FF1345FF
+      1244FF1143FF1042FF1041FF0F40FF0E40FF0E40FF0D3FFF0C3EFF0B3EFF0A3D
+      FF073DFF1A37A534312634333335353536363637373737373737373736363636
+      3636363636353535353535343434333333333333333333323232323232303030
+      3030303030302F2F2F2E2E2E2D2D2D2C2C2C2B2B2B2929292828282525252424
+      242222221F1F1F1C1C1C1B1B1B18181817171616140B12162E0124DC0024E400
+      24E10023DF0023DE0022E00022E7041FB70D175014130E14130A131210131206
+      0C1555011DD3001DD9001CD2001CD1001BD0001ACE001ACE001ACD0019CB0019
+      CF0217B70F101C10100C1010101111111111111111111010100E0E0E0D0D0D0C
+      0C0A0B0C130111A80011C00011BB0010BA0010B9000FB8000FB7000EC0050E72
+      0E0E060E0D0D0E0E0E0F0F0F0E0E0E0C0C0C0B0B0B0909090909090808080707
+      070606060505050D0D0DA09F9FAAAAAAA4A4A49E9E9E9897979392928D8D8D88
+      88888383837D7D7D7979797474747070706A6B6A6666666262635E5E5E5A5A5A
+      5555565252524F4E4E4B4B4B4747474141413C3C3C3838393536353232322F2F
+      2F2D2D2D2B2A2A2829282525262525252424242524252323232222222020201E
+      1E1E1D1D1D1C1C1C1C1C1B1B1B1A191919181718181717171616171616171616
+      1715151616161616151515141514151415141514151414141414141414141413
+      1414141314131313131313141313131313131213131312121213121312131212
+      12121212121112111212110F10100E0D0E0D0D0D0D0D0D0C0D0C0D0C0D0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0B0C0C0F0F0E1717161C1C1C1B1C1C1B1B1B1B1B
+      1A1A1A1A1A1B1A1A1A1B1615160B0C0B0A090A090A0A09090A0A090A09090A0A
+      0909090909090909090A0A0B0B0B0B0B0B0B0B0A0B0A0B0A0A0A0A0A0A0A0A0A
+      0A0A0A0A0A0A0A0A090A090A0909090808080707070707070707070707070607
+      060706060807081212121A1A1A1B1B1B1C1C1C1C1C1D1D1E1E1D1E1E0D0E0D03
+      0403030304030303030303030203030303030302020203020202030302020202
+      0202020202020202020202010102010201020201020201020101020102010101
+      0201010101010101010101010101000101010000000101010101000101010000
+      0000000101000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303333
+      333737373939393A3A3A3C3C3C3838382F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3A
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393939393939393939383939383938383938383131313131313131313131
+      313131313131313838373A3A393A39393A39393A39393A393939393939393939
+      3939393939393939393939393939393939393939393939393939393938393938
+      3938383938383938383938383838383838383838383838383838383838383838
+      383838383838383838383B3B3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A37373737
+      3636363636363636363636363636363636363636363636363636363535313131
+      3030303131313131313232323333333939394646464949494A4A4A4C4C4C4D4D
+      4D4E4E4E4C4C4C4040404242424444444646464848484B4B4B4D4D4D4F4F4F53
+      53535555555757575B5B5B5F5F5F6161616565656868686C6C6C706F70737474
+      7778787B7B7C8080808484848989898D8D8C9291929696969B9B9BA1A1A1A6A6
+      A5ABABABB0B0B09D9D9D4A4A4A4A4A4A4C4C4C4E4E4E50505051515152525252
+      52525252525252525151515050504F4F4F4F4F4F4F4F4F4E4E4E4E4E4E4C4C4C
+      4B4B4B4A4A4A4747474343433F3F3F3B3B3B35353531302A2A33561B4CFD1A4C
+      FF1A4BFF194AFF1849FF1749FF1748FF1648FF1547FF1546FF1446FF1345FF12
+      44FF1143FF1042FF1041FF0F40FF0E40FF0E40FF0D3FFF0C3EFF0B3DFF093DFF
+      223373322F253333333535353636363737373737373838383838383636363636
+      3636363635353535353534343433333333333333333332323232323230303030
+      30303030302F2F2F2E2E2E2D2D2D2C2C2C2B2B2B2A2A2A282828262626242424
+      2222221F1F1F1D1D1D1A1A1A18181816150E0F18440025E20024E50024E20023
+      E00023E40022DC0B1C7A15161C16140A1515131414141414141313131312070D
+      1545011DCC001DDA001CD2001CD1001BD0001ACE001ACE001ACC001AD607157B
+      1210071211111212121212121212121212121111111010100F0F0F0D0D0B0C0C
+      0B03108C0012C50011BC0011BB0010BA0010B9000FB8000FBD030E900E0E100E
+      0E0C0E0E0E0D0D0D0D0D0D0D0D0D0C0C0C0A0A0A090909090909080808060606
+      050505070707888888AAAAAAA5A5A59F9F9F9A99999493938E8E8E8989898483
+      847F7F7F7979797575756F70706B6B6B6666666262625F5F5F5A5A5A57575752
+      52524F50504B4B4B4848474444443E3E3E3939393636363334343030302E2E2E
+      2E2D2E2D2D2D2B2B2B2929292727272626252324232222222020201F1F1F1E1E
+      1D1C1C1C1C1C1C1B1B1A19191918181719171817161617161617161617151516
+      1616161515151515151515151515141515141414151414141414131414141414
+      1313131413141314131413131313131312131313121312121212121312121212
+      121112121211121111110D0D0F0D0D0D0D0D0E0C0D0D0D0D0D0D0C0D0C0C0C0D
+      0C0C0C0D0C0C0C0C0C0B0C0B0B0B0C0B0B0E0E0D1617171C1C1C1C1C1C1C1C1C
+      191A1A0F0F0E0A0A0A0A0A0B0A0A0A0A0A0A0A0A0A0A0909090909090A0A0909
+      090B0B0C0C0C0C0C0C0C0C0B0B0B0B0B0B0A0B0B0A0B0A0A0A0A0A0A0A0A0A0A
+      0A0A0A0909090A0909090909090A080808080707070607070607070707070706
+      0606070808071212131A1A1B1B1B1B1C1C1C1D1D1D1D1D1E1F1E1F0F0F0F0403
+      0304030303030303030303030303030303030303020202020203020203030303
+      0202020202020202020202020101020202010202020201010201020101010101
+      0101010101010101010101010101010101010100010101000100000001000100
+      0000000100000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030323232373737
+      3838383A3A3A3C3C3C3B3B3B2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F3737373A39
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393939393938393938393938393838333333313131313131313131313131
+      3131313635353A3A393A3A393A39393A39393A39393A39393939393939393939
+      3939393939393939393939393939393939393939393939393939393839393839
+      3838393838393838393838383838383838383838383838383838383838383838
+      3838383838383A3A393B3B3A3B3A3A3B3A3A3A3A3A3A3A3A3939393736363636
+      3636363636363636363636363636363636363636363636363635353530303031
+      31313131313232323232323535353B3B3B4747474949494B4B4B4C4C4C4E4E4E
+      4E4E4E4D4D4D4444444444444747474848484B4B4B4D4D4D5050505353535555
+      555858585B5B5B5E5F5F6262626666666868686D6C6D7070707474747878787C
+      7C7C8080808585858989898E8E8E9292929797979C9C9CA2A1A2A6A6A7ABABAB
+      B1B1B18F8F8F4A4A4A4C4C4C4E4E4E4F4F4F5151515252525353535252525252
+      525252525252525151515050504F4F4F4F4F4F4F4F4F4E4E4E4E4E4E4C4C4C4B
+      4B4B4848484545454040403B3B3B3737373232302E2E301F46D41B4EFF1A4CFF
+      1A4BFF194AFF1849FF1749FF1748FF1648FF1547FF1546FF1446FF1345FF1244
+      FF1143FF1042FF1041FF0F40FF0E40FF0E40FF0D3FFF0B3FFF0E3CEB2B2E3B30
+      2F2B323232353535373737373737383838383838383838383838363636363636
+      3636363535353535353434343333333333333333333232323232323030303030
+      303030302F2F2F2E2E2E2D2D2D2C2C2C2C2C2C2A2A2A28282827272724242421
+      21211E1E1E1C1C1C19191918160D0F1B540026E70025E50024E20024E50222CD
+      111A4918160B1817141717181717171616161515151515151414131412070D15
+      43021CC7001DDB001CD2001CD2001BD2001AD3001AD9001AD30E133713120A13
+      13131414141414141313131313131212121111111010100E0E0E0D0C03050F6F
+      0013CA0011BD0011BC0011BB0010BA0010B9000FBB010FAB0D0D190E0E0A0E0E
+      0E0E0E0E0D0D0D0D0D0D0C0C0C0B0B0B0A0A0A09090908080807070706060605
+      0505727272ABABABA5A5A5A0A0A09B9A9A9494948F8F8F8A8A8A848484808080
+      7B7A7A7575757171716C6C6C6868686364645F5F5F5A5A5A5858585353535050
+      504B4B4C4848494444444242423D3C3D3838373736363535353434343131312D
+      2E2D2B2B2B2929292828282625262425242322222020201F1F1F1E1E1E1C1D1C
+      1C1C1C1B1B1A1A1A191818181918181717161716161716161716161616161615
+      1515161515151514151514151515151514141414141414141414141314141414
+      1314131314131313131313131313131313121212121212131213131212121212
+      11121212111111121110101110100F0D0D0E0C0D0D0C0D0C0C0D0C0C0C0C0D0C
+      0C0C0C0C0C0C0C0C0B0C0B0C0C0C0C0C0C0C0B0C0C0C1616161515150C0C0B0B
+      0A0B0A0B0B0A0B0A0A0A0A0A0A0A0A0A0A090A0A0A0A090A0A0B0D0C0D0C0C0C
+      0C0C0C0C0C0C0B0B0B0C0B0B0B0B0A0B0A0B0B0A0A0A0A0A0A0A0A0A0A0A0A0A
+      0A0A09090A0A0A09090A09090908080907070707070706060706060707070707
+      06060708071212121A1A1A1C1C1C1D1D1D1D1E1E1F1F1E2021200E0E0E040303
+      0303030303030303030303030303030303030203020302030202020302020202
+      0202020202020202020202020202010202020201010101020201010201010201
+      0101010101010101010100010000010001010101010100000100010000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303030303030303636363838383A
+      3A3A3B3B3B3D3D3D2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F3535353A3939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393839393839393839383835353531313131313131313131313131313133
+      33333A3A393A3A393A3A393A39393A39393A39393A3939393939393939393939
+      3939393939393939393939393939393939393939393939393939383939383938
+      3839383839383839383838383838383838383838383838383838383838383838
+      38383838383B3B3B3B3B3A3B3A3A3B3A3A3A3A3A3A3A3A373737373636363636
+      3636363636363636363636363636363636363636363737373333333131313131
+      313232323232323434343636363D3D3D4848484A4A4A4B4B4B4D4D4D4E4E4E4F
+      4F4F5050504B4B4B4747474949494B4B4B4E4E4E505050535353565656585858
+      5C5C5C5F5F5F6262626566666969686C6D6D7170717474747979797D7D7D8181
+      818585858989898F8E8E9394939898989C9D9DA2A1A2A7A7A7ADADADB3B3B384
+      84844B4B4B4E4E4E4F4F4F515151525252525252535353535353535353525252
+      5252525252525151515050504F4F4F4F4F4F4F4F4F4E4E4E4D4D4D4B4B4B4949
+      494646464242423D3D3D393939353535312E25273A7D1B4FFF1B4DFF1A4CFF1A
+      4BFF194AFF1849FF1749FF1748FF1648FF1547FF1546FF1446FF1345FF1244FF
+      1143FF1042FF1041FF0F40FF0E40FF0D40FF0B40FF1A35A02E2C23302F2F3232
+      3235353537373738383839393938383838383838383838383836363636363636
+      3636353535353535343434333333333333333333323232323232303030303030
+      3030302F2F2F2E2E2E2D2D2D2D2D2D2B2B2B2A2A2A2929292626262323232020
+      201E1E1E1A1A1A1A170C0E1D670027ED0026E50025E30025E90422BC1918151A
+      19161A1A1A1A1A1A1A1A1A1919191818181616161616161514141413090F1436
+      021CBF001EE2001DDC001CCE021ABA0518990A166C1313131313131515151515
+      151515151616161414141414141313131111111010100F0D03080F510013CB00
+      13C10011BD0011BC0011BB0010BA0010BB000FB60B0D310E0E080E0E0E0E0E0E
+      0E0E0E0D0D0D0D0D0D0C0C0C0B0B0B0A0A0A0808080808080707070606066060
+      60ACACACA6A6A6A1A1A19B9B9B9595959090908A8A8A8585858080807B7B7B76
+      76767272726D6D6D686868646564605F5F5B5B5C5858585353535050504D4D4C
+      4949484645454243423F3F3F3D3D3D393A3A3636363434343131312E2E2E2D2D
+      2D2A2A2A2828282626262525252222232121211F1F1F1E1E1E1D1C1C1D1D1C1B
+      1B1A1A1A19191818191818171717181616171616171516171616161616161516
+      1516151515151515151515151515141414141415141414141413141314141414
+      1313131313141313131313121312131312121313131313121212121212121212
+      12121111121211111111111110101010100F0E0F0D0D0D0D0C0C0C0D0C0C0C0D
+      0C0C0C0C0C0C0C0B0C0B0B0C0C0C0C0C0C0C0B0B0B0B0B0B0B0A0B0A0B0B0A0A
+      0A0A0A0B0A0A0A0B0A0A0A0A0B0A0A0B0C0B0C0D0C0C0D0D0D0D0D0C0C0D0C0D
+      0C0C0C0B0B0C0B0B0B0B0B0B0B0B0A0B0A0B0A0A0A0A0A0A0A0A0A0A0A0A0A0A
+      0A090909090A0A0909090A0A0808090707070707070707070706060606070607
+      060708071212121A1A1A1C1C1C1D1D1D1E1E1E2222222323240A0A0903030303
+      0303030303030303030303020303020203030303020302020302020303020202
+      0202020202020102020202020201020202010101010102010101010101010101
+      0101010101010101010101000101000101010000010001010001010001000000
+      0100000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303535353737373939393B3B
+      3B3D3D3D3232322F2F2F2F2F2F2F2F2F2F2F2F3333333A393939393939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939383939383938383737363131313131313131313131313131313131313939
+      393A3A393A3A393A3A393A39393A39393A39393A393939393939393939393939
+      3939393939393939393939393939393939393939393939393938393938393838
+      3938383938383938383838383838383838383838383838383838383838383838
+      383A3A3A3B3B3B3B3B3A3B3A3A3B3A3A3A3A3A39393937363636363636363636
+      3636363636363636363636363636363636373737373737333233313131323232
+      3232323434343535353737373E3E3E4A4A4A4B4B4B4D4D4D4E4E4E4F4F4F5050
+      505252525252524D4D4D4B4B4B4E4E4E5050505353535656565959595C5C5C5F
+      5F5F6363636666666A6A6A6C6D6D7171707475757979797D7D7D818281858585
+      898A8A8F8E8E9493949898989C9D9DA3A3A3A9A9A9AFAFAFB4B4B47B7B7B4D4D
+      4D4F4F4F51515152525253535354545454545454545454545452525252525252
+      52525252525151515050504F4F4F4F4F4F4F4F4F4D4D4D4C4C4C4A4A4A474747
+      4444444040403B3B3B3636363332302E2F322047D31B4FFF1B4CFF1A4CFF1A4B
+      FF194AFF1849FF1749FF1748FF1648FF1547FF1546FF1446FF1345FF1244FF11
+      43FF1042FF1041FF0F40FF0D41FF103DE9282C3D2E2C27303131333333353535
+      3737373939393939393939393939393838383838383838383636363636363636
+      3635353535353534343433333333333333333332323232323231313131313131
+      31313131313030302F2F2F2E2E2E2C2C2C2A2A2A2828282525252222221F1F1F
+      1D1D1D1C190C0C1F7D0028F40026E60026E50025E60024DD161C3B1D1C161D1D
+      1D1D1D1D1D1D1D1C1C1C1B1B1B19191919191917171715151615140A0F153807
+      1A920B17680F143712131A13121014130C151414161616161616161616171717
+      1717171717171515151414141313131111110F0F0A0C0F290212A20013C30013
+      C80012C00011BC0011BB0010BE000FC3090E460E0E050E0E0E0E0E0E0E0E0E0E
+      0E0E0D0D0D0C0C0C0C0C0C0A0A0A0909090808080707070707074F4F4FADADAD
+      A7A7A7A2A1A19C9B9B9695959090908B8A8B8585858080807C7B7B7777777272
+      726D6D6D6969696565656060605C5C5D5858585454545050504D4D4D494A4A45
+      46464242423F3F3F3D3D3D3A3A3A3636363534343132312E2E2E2D2D2C2B2A2B
+      2928282626262525252323232122211F1F1F1E1D1E1C1D1C1C1D1C1B1B1B1A1A
+      1919181819181817171618171617161617161617161616161616151515161615
+      1515151515151415151515141414141414141414141414141414131314131313
+      1414141313131313131313131313121313121212121312121212121212121212
+      1212111212111112111111111011101011100F0F0E0F0E0D0D0D0C0D0D0C0C0C
+      0C0C0C0C0B0C0C0C0B0C0C0C0C0B0B0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0A0A
+      0B0A0B0B0A0A0B0B0C0D0D0D0D0D0D0D0C0D0D0D0D0C0D0C0C0C0C0C0C0C0C0C
+      0C0B0B0B0C0B0B0B0B0B0A0B0B0A0A0A0A0B0A0B0A0B0A0A0B0A090A0A0A090A
+      0A090A0A090A0909090909090909070707070707070706060607070607070607
+      0708071312121B1B1B1D1D1D2020202323222626262526260A0B0A0303030303
+      0303030303030303030303030203030303030302030202030302030302030202
+      0202020202020202010102020101010201020201010101010102010102010101
+      0101010101010101010101010100010001010101000000010000000000010000
+      0000000000000000000030303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303333333737373939393A3A3A3D3D3D
+      3535362F2F2F2F2F2F2F2F2F2F2F2F3030303A39393A39393939393939393939
+      3939393939393939393939393939393939393939393939393939393939393839
+      39383939383938383131313131313131313131313131313131313737373A3A3A
+      3A3A393A3A393A3A393A39393A39393A39393A39393939393939393939393939
+      3939393939393939393939393939393939393939393939393839393839383839
+      3838393838393838383838383838383838383838383838383838383838393938
+      3B3B3B3B3B3B3B3B3A3B3A3A3B3A3A3A3A3A3837373636363636363636363636
+      3636363636363636363636363637373737373738373732323232323233333334
+      34343535353636363737373D3D3D4A4A4A4D4D4D4D4D4D4F4F4F505050525252
+      5454545555555656565252525151515353535656565959595C5C5C5F5F5F6363
+      636666666A6A6A6E6D6E7172727475747979797D7D7E8182828687868B8A8A8F
+      8F8F949494999999A0A0A0A6A6A6ABABABB0B0B0B6B6B67171714E4E4E4F4F4F
+      5151515454545454545555555555555454545454545454545252525252525252
+      525252525151515050504F4F4F4F4F4F4F4F4F4D4D4D4B4B4B49494945454542
+      42423E3E3E393939343535312F272B35581D4DF31C4EFF1B4CFF1A4CFF1A4BFF
+      194AFF1849FF1749FF1748FF1648FF1547FF1546FF1446FF1345FF1244FF1143
+      FF1042FF1042FF0E41FF20306F2C291F2E2E2E31313134343437373738383839
+      39393A3A3A3A3A3A3A3A3A383838383838383838383838363636363636363636
+      3535353535353434343333333333333232323232323232323232323232323232
+      323333333333333232322F2F2F2C2C2C2A2A2A2727272424242121211E1E1D1C
+      1B130A22950028F40027E60026E60026E50025EB12206A201E131F1F1F202020
+      1F1F1F1E1E1E1D1D1D1C1C1C1B1B1B19191917171717171716151015140E1614
+      0915140E15141215141316151516161617171718181818181818181817171717
+      17171616161515151313131212121111110F0F0D0D0E12090F3D04107F0012B7
+      0012C70011C50111B7070F670E0E170E0E0C0E0E0E0E0E0E0E0E0E0F0F0F0D0D
+      0D0C0C0C0C0C0C0B0B0B0A0A0A0909090707070707073E3E3EAEADAEA8A7A7A3
+      A2A29D9C9C9796969191918C8C8B8686868181817D7D7D7777777273726D6D6D
+      6969696565656161615D5C5C5858585555555151514D4D4D4A4A4A4645454343
+      433F40403D3D3D3A3A3A3636373435353131312E2E2E2D2D2D2B2B2B28292826
+      2726252525232323222222201F1F1E1E1E1D1D1D1C1D1C1B1B1B1A1A19191918
+      1918181817171817171716161716161716161616161615161515161615161515
+      1515151515151515151514141515151414141414141414141413141413141413
+      1314131313131313131312131312131312121213131212121212121112111212
+      121111121111111010111010111010101010100F100F0F0F0D0E0D0C0C0D0C0C
+      0C0C0C0C0C0C0C0C0B0C0B0C0B0B0C0B0B0B0B0C0B0B0B0B0B0B0B0B0B0C0B0D
+      0D0E0D0E0D0E0D0D0D0D0D0D0D0D0C0D0D0D0C0C0C0C0C0D0C0C0D0C0C0C0B0B
+      0C0B0B0B0B0A0B0A0A0A0B0B0A0A0A0A0A0A0A0B0B0A0A0A0A0A0A0A0A0A0A09
+      09090A0909090A0A090909090907070706070606060707070707060707060607
+      07071414141D1D1D2121212525252829292C2B2B2B2A2B0C0C0C030304030304
+      0303030303020303030203020203030303020302020202020202020202020202
+      0201020202020101020101010201020101010102010202020102010101010101
+      0101010101000101010100010101000000000101000000010101010100010100
+      0000000000003030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303232323636363838383A3A3A3C3C3C3939392F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F3838383A3939393939393939393939393939
+      3939393939393939393939393939393939393939393939393939383939383939
+      383938383333333131313131313131313131313131313434343A3A3A3A3A3A3A
+      3A393A3A393A3A393A39393A39393A39393A3939393939393939393939393939
+      3939393939393939393939393939393939393939393939383939383938383938
+      383938383938383838383838383838383838383838383838383838383A3A3A3B
+      3B3B3B3B3B3B3B3A3B3A3A3B3A3A3A3939373636363636363636363636363636
+      3636363636363636363737373737373838383737373333333333333434343535
+      353636363737373939393C3C3C4949494D4D4D4F4F4F51515152525254545455
+      55555757575959595B5B5B5A5A5A5B5B5B5B5B5B5C5C5C5F5F5F636363676767
+      6B6B6B6E6E6E727172767675797A7A7D7D7D8382838787878C8C8C9292929798
+      979D9D9DA2A2A2A7A7A7ACACACB1B1B1B7B7B769696950505051515153535354
+      5454555555555555555555555555545454545454545454525252525252525252
+      5252525151515050504F4F4F4F4F4F4E4E4E4D4D4D4A4A4A4747474545454141
+      413C3C3C373737333333312E252838761D4EFB1C4EFF1B4CFF1A4CFF1A4BFF19
+      4AFF1849FF1749FF1748FF1648FF1547FF1546FF1446FF1345FF1244FF1144FF
+      1043FF1D32882B29202D2C2C3030303232323535353838383939393939393B3B
+      3B3B3B3B3A3A3A3A3A3A38383838383838383838383836363636363636363635
+      3535353535343434333333333333323232323232323232323232333333353535
+      3636363535353232322D2D2D2B2B2B2828282525252222221F1F1D1C1C1C0725
+      B40028F10027E70027E70026E50026F00B239C21201A22222122222221212121
+      21212020201F1F1F1D1D1D1C1C1C1A1A1A1A1A1A181818171716161616171717
+      1717171717171818181717171818181919191919191919191919191818181818
+      181616161515151313131212121010100F0F0D0F0E050D0D060B0E2606107703
+      11900B0E2E0F0E040F0F0C0F0F0F0F0F0F0E0E0E0F0F0F0F0F0F0F0F0F0D0D0D
+      0C0C0C0B0B0B0A0A0A090909080808070707313131AEAEAEA8A8A7A3A3A29E9D
+      9E9897979291918D8C8C8787878282827D7D7D7878787373736F6E6E6A6A6A66
+      65656161615E5E5E5959595655555151514E4D4D4A4A4A474747434343403F40
+      3D3D3D3A3A3A3737373435343232322F302F2D2D2D2A2B2A2929292626262525
+      25232323222222201F1F1E1E1E1D1D1D1D1D1D1C1C1B1B1A1A19191819181818
+      1717181716181717171616171616171616161616161616161515151515151515
+      1515151515151515141515151514151414141414141414141414131314131314
+      1314131413131313131213131313121312121312121213121212121211121212
+      11111210111111111110101110101010101010101010101010100E0D0E0C0C0C
+      0C0C0C0B0C0C0C0C0C0C0B0B0C0B0C0B0B0B0B0B0B0D0D0D0E0D0E0D0D0E0D0E
+      0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0C0C0C0D0C0B0C0B0B0B
+      0B0B0B0B0B0A0B0B0A0A0B0B0B0B0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A090A0A
+      0A0A0909090A090A090908090707070706070707070606060706060707070A09
+      0A1A1A1A2222222726272C2C2C30303031313117181803040304030403030303
+      0303030303030303030303030302030202020202030303020302020202020202
+      0202020202020202010102020102020102010101020101010101010102010101
+      0101010101010101000100000100010001000001000100000000000100000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303131313636363838383A3A3A3C3C3C3D3D3D2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F3535353A39393A393939393939393939393939393939
+      3939393939393939393939393939393939393939393939393938393938393838
+      3535353131313131313131313131313131313131313A3A3A3A3A3A3A3A3A3A3A
+      393A3A393A3A393A39393A39393A39393A393939393939393939393939393939
+      3939393939393939393939393939393939393939393938393938393838393838
+      3938383938383838383838383838383838383838383838383938383B3B3B3B3B
+      3B3B3B3B3B3B3A3B3A3A3B3A3A38383836363636363636363636363636363636
+      3636363636373737373737383838383838383838343434343434353535363636
+      3737373939393A3A3A3C3C3C4645464F4F4F5151515252525454545656565757
+      575A5A5A5C5C5C5E5E5E6060606363636464646666666767676A6A6A6C6C6C70
+      70707373737979797D7D7C8080808685868B8B8B908F909494949999999D9E9D
+      A3A3A3A8A8A8ADADADB3B3B3B9B8B86363635151515353535454545555555656
+      5656565656565656565654545454545454545454545452525252525252525252
+      52525151515050504F4F4F4F4F4F4E4E4E4C4C4C4949494747474343433F3F3F
+      3B3B3B363737333332312E252838711E4CED1B4FFF1B4CFF1A4CFF1A4BFF194A
+      FF1849FF1749FF1748FF1648FF1547FF1546FF1446FF1246FF1243F91E33822A
+      281F2D2C2A2F2F303232323535353737373939393A3A3A3B3B3B3B3B3B3B3B3B
+      3B3B3B3A3A3A3A3A3A3838383838383838383838383636363636363636363535
+      3535353534343433333333333332323232323233333333333335353536363636
+      36363333332F2F2F2C2C2C292929262626232323201F1C1B1D260327D50028EF
+      0028E90027E70027E70026EB0425CA2021282322202424242323232323232121
+      212121212020201E1E1E1D1D1D1C1C1C1B1B1B1A1A1A1919191919191A1A1A1A
+      1A1A1A1A1A1A1A1A1919191A1A1A1A1A1A1A1A1A191919191919181818171717
+      1616161515151313131212121010101010100F0F0E0E0E080E0E090E0E0E0F0E
+      080E0E0E0F0F0F1010100F0F0F1010100F0F0F0F0F0F0F0F0F0E0E0E0C0C0C0C
+      0C0C0B0B0B0A0A0A090909080808262626AFAFAFA9A9A8A3A2A39E9D9D989898
+      9292928D8D8D8888888282827D7D7D7878787373736E6E6F6B6B6B6566656161
+      615E5E5E5959595656565152514D4E4E4A4A4A4747474343434140403D3D3D3A
+      3A3A3737373535353231322F302F2E2E2E2B2B2B292929272627252525232323
+      2122221F20201F1F1E1D1D1D1D1D1D1C1B1B1B1B1A1A19181918181817171817
+      1718161717171717161617161616161616161616161616161615151515151515
+      1515151414141415151414141414141414141414141414131413131314131413
+      1413141313131313131213121212131212131312121212121212121211111111
+      11111110111010111010101010100F100F0F10100F0F0F100F0F0F100E0D0F0C
+      0C0C0C0C0C0C0C0B0B0B0B0C0C0C0E0E0E0E0E0E0E0E0E0D0E0D0E0E0E0E0E0E
+      0D0E0D0E0D0D0D0D0D0D0D0D0C0D0D0D0D0C0C0C0C0D0C0C0C0B0C0C0B0B0B0B
+      0B0B0B0B0B0B0A0A0B0A0A0A0B0A0A0A0A0A0A0A0A0A0A0A0A0A09090A0A0A09
+      0A090909090A09090908090707070707070707070607060708080A0909161616
+      2424242A2A2A3030303434343737370707070303030303040403030303030303
+      0303030303030303030203030203030203020302020202020202020202020202
+      0202020102020201010102020102020101020201010101010202010201010101
+      0101010001010101000101010100010000000100000000000003000001003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303636363838383A3A3A3C3C3C3E3E3E3131312F2F2F2F2F2F
+      2F2F2F2F2F2F3333333A39393A39393939393939393939393939393939393939
+      3939393939393939393939393939393939393939393839393839393838373731
+      31313131313131313131313131313131313737373A3A3A3A3A3A3A3A3A3A3A39
+      3A3A393A3A393A39393A39393A39393A39393939393939393939393939393939
+      3939393939393939393939393939393939393939393839393839383839383839
+      38383938383838383838383838383838383838383838383A39393B3B3B3B3B3B
+      3B3B3B3B3B3A3B3A3A3B3A3A3737373636363636363636363636363636363636
+      3637373737373738383838383839393939393935353535353536363637373739
+      39393A3A3A3C3C3C3E3E3E4242424C4C4C5353535454545656565858585A5A5A
+      5D5D5D5F5F5F6161616363636666666969696C6C6C6F6F6F7272727676767878
+      787D7D7D8080808484848888888C8C8C9191919596959B9A9A9F9F9FA4A4A4A9
+      A9A9AFAFAFB4B4B4BAB9BA5E5E5E525252535353565656565656565656575757
+      5757575656565656565454545454545454545454545252525252525252525252
+      525151515050504F4F4F4F4F4F4D4D4D4B4B4B4949494545454242423E3E3E3A
+      3A3A363636333332312E242C334E2145C11C4DFF1A4EFF1A4DFF1A4BFF194BFF
+      1849FF1749FF1748FF1548FF1448FF1447FF183FCD232F5C2B281F2C2C2A2F2F
+      2F3232323535353737373939393A3A3A3B3B3B3C3C3C3C3C3C3B3B3B3B3B3B3B
+      3B3B3A3A3A3A3A3A383838383838383838383838363636363636363636353535
+      3434343333333232323232323232323131313232323434343636363636363333
+      332F2F2F2C2C2C292929262626222222201F17171F460029E90029ED0028EA00
+      28E90027E70027E90026E31B234724231D242424242424242424232323222222
+      2222222121211F1F1F1D1D1D1C1C1C1D1D1D1C1C1C1B1B1B1B1B1B1B1B1B1C1C
+      1C1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1A1A1A19191918181817171716
+      1616141414141414121212111111111111101010100F0F100F0E101010101010
+      1010101010101111111010101010101010100F0F0F0E0E0E0E0E0E0C0C0C0B0B
+      0B0A0A0A0909090808081D1D1DB0B0B0AAAAA9A4A4A39E9E9E9898989393938E
+      8E8E8888888383837D7D7D7878787474747070706B6B6B6665656262635E5E5E
+      5A5A5A5656565151514E4E4E4A4A4A4747474444444141413D3D3D3A3A3A3737
+      373535353232322F2F2F2E2E2E2C2C2C29292927272626252523232322222220
+      1F201F1F1F1D1D1D1D1D1D1C1C1B1B1B1A191919191918181717181717171717
+      1717171717171716161716161616161616161616161615151515161515151515
+      1515141514151515151414141514141414141414141413141313141413141313
+      1314131313131313131313121313131212121212121212121111111111121110
+      1111101110111010101010101010100F0F0F101010100F0F100F0F0F0F0F0D0D
+      0D0B0C0D0E0E0D0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0D0E0E0E0E0D
+      0D0D0D0D0D0D0D0D0C0D0D0D0D0D0D0C0D0C0C0C0C0B0B0C0B0B0B0B0B0B0B0B
+      0B0B0B0B0B0A0A0A0B0A0B0A0A0B0A0A0A0A0A0A0A0A0A0A090A090A0909090A
+      090909090A09090707080707070706070706060808070B0A0B1E1E1F2627262E
+      2E2E343434393939252626030303040303040304040404030403030403030303
+      0303030302020303030303020202020302020302020202020202020202020202
+      0202020202010102020201010201020101010101010101010201010101010001
+      0001010001000001010001000100000001000000030300010000303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303232323636363838383B3B3B3D3D3D3E3E3E3535352F2F2F2F2F2F2F2F2F2F
+      2F2F3030303A39393A3939393939393939393939393939393939393939393939
+      3939393939393939393939393939393939393939383939383938383232323131
+      313131313131313131313131313434343A3A3A3A3A3A3A3A3A3A3A3A3A3A393A
+      3A393A3A393A39393A39393A39393A3939393939393939393939393939393939
+      3939393939393939393939393939393939393939383939383938383938383938
+      383938383838383838383838383838383838383838383B3B3A3B3B3B3B3B3B3B
+      3B3B3B3B3A3B3A3A3A3A39373636363636363636363636363636363636373737
+      3737373838383838383939393A3A3A3A3A3A3737373636363737373A3A3A3A3A
+      3A3C3C3C3E3E3E4040404242424848485151515656565858585B5B5B5D5D5D60
+      60606262626464646767676969696C6C6C6F6F6F7373737676767979797D7D7D
+      8181818584858988898D8D8D9292929797979C9C9CA0A1A0A5A5A5AAAAAAAFAF
+      AFB2B2B2B5B5B558585853535354545456565657575758585858585857575757
+      5757565656565656545454545454545454545454525252525252525252525252
+      5151515050504F4F4F4E4E4E4D4D4D4B4B4B4747474545454141413E3E3E3B3B
+      3B37373733333332302A302F2B2937642241B01D49EA1A4CFC194CFF184CFF18
+      4AFF1748FD1845EF1B3EBC22336E29292A2C2A212E2E2D303030323232353535
+      3838383A3A3A3B3B3B3C3C3C3C3C3C3D3D3D3D3D3D3C3C3C3B3B3B3B3B3B3B3B
+      3B3A3A3A3A3A3A38383838383838383838383837373736363635353534343434
+      343432323232323231313131313131313132323232323232323231302F2F2E2C
+      2D2C292A292328261C252215221D0911226F002BF50029ED0029EA0028EA0028
+      E90027E80027F014247426231725252525252525252524242423232323232322
+      22222121212020201F1F1F1E1E1E1E1E1E1E1E1E1D1D1D1D1D1D1D1D1D1D1D1D
+      1D1D1D1C1C1C1C1C1C1C1C1C1C1C1C1B1B1B1A1A1A1818181818181717171616
+      1615151514141413131312121212121211111111111111111111111111111111
+      11111111111111111111111111111010100F0F0F0E0E0E0D0D0D0C0C0C0A0A0A
+      090909080808111111B0B0B0AAAAAAA4A3A49E9E9E9898989393938E8E8E8888
+      888383837D7E7E7879787474747070706B6B6B6767676263625E5E5E5A5A5A56
+      56565252524F4F4E4B4B4A4848494444444141413D3E3D3A3A3A373737353535
+      333333302F302E2E2E2D2C2C2929292627262626262323232222222020201F1E
+      1F1E1E1E1D1E1D1C1C1C1B1B1A1A1A1919191918171718181718171718171617
+      1616171616171617161616161516151616151516151515151616151515151515
+      1514151414151415141414141414141414141414141414141313141413141413
+      1413131312131213121212131212131212121212121212111112111111111111
+      10111111111010101010101010101010100F10100F100F0F100F0F0F0F0F0F0F
+      0F0F0E0F0F0F0E0F0F0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0E0D
+      0E0D0D0D0D0D0D0C0D0C0D0C0C0D0C0C0C0B0C0C0B0C0C0B0B0C0B0B0A0B0B0B
+      0B0B0B0B0B0B0B0A0A0A0B0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A090A0909
+      0908080707080707070707070808070909091515152425242A2B2A3131313838
+      373B3B3B0B0B0B04040404030404040404030404040404030304030303030303
+      0303030302030203020302030303030303020202020202020202020202020202
+      0202020202010201020102020201010201010101010102010101010101010101
+      0101010101010101000101010100010103000300010130303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030323232353535
+      3737373939393B3B3B3D3D3D3F3F3F3434342F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F3837373A39393A393939393939393939393939393939393939393939393939
+      3939393939393939393939393939393938393938393838353535313031313131
+      3131313131313131313131313A39393A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A
+      393A3A393A39393A39393A39393A393939393939393939393939393939393939
+      3939393939393939393939393939393939393938393938393838393838393838
+      3938383838383838383838383838383838383939393B3B3B3B3B3B3B3B3B3B3B
+      3B3B3B3A3B3A3A39393936363636363636363636363636363637373737373738
+      38383838383939393A3A3A3B3B3B3B3B3B3939393737373A3A3A3A3A3A3C3C3C
+      3E3E3E4040404242424444444646464A4A4A5353535A5A5A5E5E5E6161616363
+      636565656868686B6B6B6D6D6D7171717373737777777B7B7B7F7F7F82828286
+      86868B8B8B8E8E8E9393929898989D9D9CA1A1A1A4A4A4A7A7A7A9A9A9AFAFAF
+      B5B5B55959595555555555555656565757575959595858585757575757575757
+      5756565656565654545454545454545454545452525252525252525252525251
+      51515050504F4F4F4E4E4E4D4D4D4A4A4A4747474545454141413F3F3F3B3B3B
+      383838353535323230312F272F2E272D303A29345B2637782538802536792732
+      5E292D3C2C2B272E2B212E2E2C2F2F2F3131313434343636363838383A3A3A3C
+      3C3C3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3C3C3C3B3B3B3B3B3B3B3B3B
+      3A3A3A3A3A3A3838383838383838383737373636363535353434343333333232
+      3231313130303030302F31302C323029323025333023302F292D2D2F292C3722
+      2A4D1927661226810D26960428D2002BF3002AED0029EC0029EA0028EA0028E9
+      0027F20B25A424231E2424232525252525252525252424242323232323232222
+      222222222121212020201F1F1F2020201F1F1F1E1E1E1E1E1E1E1E1E1E1E1E1D
+      1D1D1D1D1D1C1C1C1C1C1C1C1C1C1B1B1B1A1A1A191919181818181818161616
+      1515151515151414141313131313131313131212121212121212121212121111
+      111212121212121111111111110F0F0F0E0E0E0E0E0E0C0C0C0B0B0B0A0A0A09
+      0909131313B0B0B0AAAAAAA4A4A49E9E9E9998989393938E8E8E888888838383
+      7D7E7E7979797474747070706B6B6B6767676363635E5E5E5A5A5B5656565353
+      534F4F4F4A4A4B4949484445444141413E3E3E3B3A3A3837373535353333332F
+      30302E2E2E2D2C2C2929292727272626262423242223222020201F1F1F1E1E1E
+      1E1E1D1C1C1C1B1B1A191A191A19191818181918171817171817171717171716
+      1617171716161616161616161616161616161616151515151515151515151514
+      1515151514151514141414141414141414141414131414141414131314131314
+      1313131312131213131212121312121212121211111211111210111111101110
+      10111111101010101010100F0F10101010100F0F0F0F0F0F100F0F0F0F0F0E0F
+      0F0F0F0F0E0E0E0F0E0E0F0E0E0F0E0E0E0D0E0D0E0D0E0D0E0D0E0E0D0D0E0D
+      0D0E0D0D0D0D0D0D0D0D0C0C0D0C0C0C0B0C0C0C0C0B0B0B0C0B0B0B0B0B0A0B
+      0B0B0B0B0A0B0B0A0B0B0A0A0B0A0A0A0A0A0A090A0A090A090A0A0A09080808
+      07070708080707070807080B0B0B1E1E1E2627262F2F2E3535343A3A3B272727
+      0404040404040404040404040304040304040303030303030303030303030303
+      0302030303030302030302030302030302030202020203030302020202010202
+      0202020201010202020101010101020101010102010101010101010101010101
+      0001010101010000010101000303030100003030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303232323434343636363838383A
+      3A3A3C3C3C3E3E3E3434342F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F353535
+      3A39393A39393939393939393939393939393939393939393939393939393939
+      3939393939393939393939393839393839393838373731303131303131313131
+      31313131313131313737363A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A39
+      3A3A393A39393A39393A39393A39393939393939393939393939393939393939
+      3939393939393939393939393939393939393839393839383839383839383839
+      38383838383838383838383838383838383A3A3A3B3B3B3B3B3B3B3B3B3B3B3B
+      3B3B3A3B3A3A3838383636363636363636363636363737373737373838383838
+      383939393A3A3A3B3B3B3B3B3B3D3D3D3C3C3C3A3A3A3A3A3A3C3C3C3E3E3E40
+      40404242424444444646464848484B4B4B4E4E4E5353535C5C5C616161666666
+      6868686C6C6C6E6E6E7272727474747878787B7B7B7F7F7F8383838888888B8B
+      8B8F8F8F9493939695959999999B9B9A9F9E9FA5A5A5AAAAAAB0B0B0B5B5B55B
+      5B5B565656565656575757595959595959595959585858585858575757575757
+      5656565656565454545454545454545454545252525252525252525252525151
+      515050504E4E4E4D4D4D4D4D4D4A4A4A4848484545454242423F3F3F3D3D3D39
+      393936363634343434333232312E312F28302D24302D23302D23302E272F2E2A
+      302F2E3131313333333434343535353838383939393B3B3B3C3C3C3D3D3D3E3E
+      3E3E3E3E3E3E3E3E3E3E3D3D3D3D3D3D3D3D3D3C3C3C3B3B3B3B3B3B3B3B3B3A
+      3A3A3A3A3A383838383838373737363636343434333333323232313131303030
+      2F2E2E2F2E2C2B2E3E242F5D1E2F79182F94102FB00A2EC9032EE4012DF0002D
+      F6002DFE002DFE002CF5002AEE002AEE002AED0029EC0029EA0028EA0028F407
+      25BB232323242422252525252525252525252525252525242424242424232323
+      2222222222222121212020202020201F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1E1E
+      1E1D1D1D1C1C1C1C1C1C1C1C1C1B1B1B1A1A1A18181818181818181817171716
+      1616151515151515151515141414141414131313131313131313121212121212
+      1212121212121111111010100E0E0E0E0E0E0C0C0C0B0B0B0A0A0A0909091313
+      13B0B0B0ABAAAAA5A4A49F9E9E9898989493938E8E8E8988888383837E7E7D79
+      79797575757070706B6B6B6767676363635E5E5E5B5A5B5656565353534F4F4F
+      4B4B4B4949494444454141413E3E3E3C3B3C3837383535353333333030302E2E
+      2E2D2D2C29292A2727272626262423232322222120201F1F1F1E1E1E1E1E1E1D
+      1D1C1B1B1A1A1A191A1918191818181718181718181717171717171717171717
+      1716161616161617161616161616161616151616161515151515151515151415
+      1415151514151514141414141414141314141414141413131314141313131413
+      1312131312131312131212121212121111121111121111121010111111101011
+      10111010101010101010101010101010100F0F10100F0F0F0F0F0F0E0F0F0E0E
+      0E0E0E0E0F0F0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0E0E0D0E0D0D0D0E0E0D0D
+      0D0D0D0D0D0D0C0D0D0C0C0C0B0B0C0C0B0C0B0B0B0B0B0B0B0C0B0B0B0A0B0B
+      0B0B0B0B0A0B0B0A0A0A0B0A0A0A0A0A0A090A0A0A0908090808070707070708
+      07080808090909141414242424292A2A3232313838383C3C3C0F0F0F04040404
+      0404040404030304030404030303030304040303030303030303030303030303
+      0303030303030302030203020202020202020303020203020202020201020202
+      0201010202010102020102010101010201010101010102010101010101010101
+      0101010101010001000300000101303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303232323434343535353737373A3A3A3C3C3C3D3D
+      3D3434342F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F303837373A39393A
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393939393939393939383939383938383332323130313130313131313131
+      313131313333333A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A
+      3A393A39393A39393A39393A3939393939393939393939393939393939393939
+      3939393939393939393939393939393939383939383938383938383938383938
+      383838383838383838383838383838383B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B
+      3B3A3B3A3A383838363636363636363636373737373737383838383838393939
+      3A3A3A3B3B3B3B3B3B3D3D3D3E3E3E3F3F3F3D3D3D3C3C3C3E3E3E4040404242
+      424444444646464848484B4B4B4E4E4E5050505353535757575959595F5F5F64
+      64646968696D6C6D7373737777777A7A7A7D7D7D807F80848384858585888888
+      8B8B8B9191919696959A9A9A9F9F9FA5A5A5AAABAAB0B0B0B5B5B55C5C5C5757
+      575858585959595A5A5A5959595959595A5A5A59595957575757575757575756
+      5656565656545454545454545454545454525252525252525252525252515151
+      5050504E4E4E4D4D4D4D4D4D4A4A4A4848484545454343434141413E3E3E3C3C
+      3C39393938383836363635353534343433333333333333333334343434343435
+      35353737373838383A3A3A3B3B3B3C3C3C3E3E3E3F3F3F3F3F3F3F3F3F3F3F3F
+      4040403F3F3F3E3E3E3D3D3D3D3D3D3D3D3D3C3C3C3B3B3B3B3B3B3B3B3B3A3A
+      3A3A3A3A3838383737373636363434343232323030302F2F2F2E2E2E2F2C2322
+      2D5D0331F00031FB0031FF0030FF002FFF002FFE002FFA002EF8002EF5002DF3
+      002DF2002CF1002CF0002AEF002AEE002AED0029EB0029F20327D71A22472322
+      1D24242425252525252526262626262626262625252524242424242424242423
+      23232222222121212121212121212020201F1F1F1F1F1F1F1F1F1F1F1F1E1E1E
+      1D1D1D1C1C1C1C1C1C1C1C1C1B1B1B1A1A1A1919191919191818181717171616
+      1616161616161615151515151514141414141414141413131313131312121212
+      12121212121111110F0F0F0E0E0E0D0D0D0C0C0C0B0B0B0A0A0A121212B0B0B0
+      ABAAABA5A4A49F9E9E9998989493938E8E8E8988888383837E7E7E7A7A7A7575
+      757071706B6B6C6767676363635E5E5E5B5B5A5656565453534F4F4F4B4B4B48
+      48494444444142413E3E3E3C3C3C3838383535363334333030302E2E2E2D2D2D
+      2A292A2727272626262423242322222021201F1F1F1E1E1E1E1E1E1D1C1C1C1C
+      1B1A1A191A1A1919181819181818181718181718171817171717171617171716
+      1616161616161617161616151616161516151515161515151515151515151415
+      1514141414151415141414141414141414141314131413141314141313141313
+      1313131313131212121213121212111112111111111111111111111110111111
+      11101011101010100F0F10100F10100F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F
+      0E0F0F0E0F0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0D0D0D0E0D0D0D0D0D
+      0E0D0D0D0C0C0C0D0C0C0C0B0C0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0A
+      0B0B0A0A0B0A0B0A0A0A0B0A0A0A0A0A0A090909080808080807070707080909
+      0C0B0B1C1C1C2627272E2E2E3535353A3A3A2F2F300505040404040404050404
+      0404040403040404040403030303030304030403040303030303030303030303
+      0303020203020303020202020202020202020303020202020202010202010201
+      0202020201020201020201020202020102010101010101010101010101010100
+      0101010103000301010130303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303232323434343535353737373939393B3B3B3D3D3D3434342E2E2E
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F303837373A39393A39393A39393A39
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393939393938393938393938363535303030313031313031313131313131
+      3131313939393A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A
+      393A39393A39393A39393A393939393939393939393939393939393939393939
+      3939393939393939393939393939393938393938393838393838393838393838
+      3838383838383838383838383939383B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B
+      3A3B3A3A3737373636363636363737373737373838383838383939393A3A3A3B
+      3B3B3B3B3B3D3D3D3E3E3E404040414141424242404040404040424242444444
+      4646464848484B4B4B4E4E4E5050505353535757575959595C5C5C6060606363
+      636767676A6A6A6F6F6F7272727676767B7B7B7F7F7F8383838787878C8C8C91
+      91919696969A9A9A9F9F9FA5A5A5ABABABB0B0B0B5B5B55C5C5C575757595959
+      5A5A5A5A5A5A5B5B5B5A5A5A5A5A5A5A5A5A5858585757575757575757575656
+      5656565654545454545454545454545452525252525252525252525251515150
+      50504E4E4E4E4E4E4D4D4D4B4B4B4949494646464545454343434040403E3E3E
+      3C3C3C3B3B3B3939393939393838383737373838383838383939393A3A3A3B3B
+      3B3C3C3C3D3D3D3E3E3E3F3F3F40404041414140404040404040404040404040
+      40403F3F3F3E3E3E3D3D3D3D3D3D3D3D3D3C3C3C3B3B3B3B3B3B3B3B3B3A3A3A
+      3939393737373636363434343232322F2F2F2E2E2E2B2B2B2C291F102FAD0033
+      FF0032FF0031FC0031FA0030F9002FF8002FF7002FFF002FFF002EFB002DF700
+      2DF4002CF3002CF1002AEF002AEE002AF20229E5172151222014232323242424
+      2525252626262626262626262626262626262525252424242424242424242323
+      232323232121212121212121212121211F1F1F1F1F1F1F1F1F1F1F1F1E1E1E1D
+      1D1D1C1C1C1C1C1C1C1C1C1B1B1B1B1B1B1A1A1A191919191919181818171717
+      1616161717171616161515151515151414141414141414141313131212121212
+      121111111010100E0E0E0D0D0D0C0C0C0B0B0B0A0A0A121212B0B0B0ABAAAAA5
+      A5A49F9E9E9998989393938E8E8E8988888383837E7E7D7A7A7A757575717171
+      6C6C6C6867676463635E5E5E5B5B5B56565653535350504F4B4B4B4949494544
+      454142423E3E3E3C3C3C3838383536363334333030312E2E2E2C2D2D2A292928
+      27272626262424232222222121201F1F1F1E1E1E1E1E1E1C1D1C1B1C1B1A1A19
+      1A1A191A1A1A1A1A1A1A1A1A1919191A191919191A1919191918181818191818
+      1916161616161616161615161615161615151515151515151515151515151515
+      1515151414141414141414131414131414131414131413131314131413131313
+      1313121312121212121211121212111211111211111111111010101010101011
+      101010101010100F10101010100F100F0F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0F
+      0E0E0E0F0F0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0E0E0D0D0E0D0D0D0D0D0D
+      0D0C0D0D0C0C0C0B0C0C0C0B0C0C0C0B0B0B0B0C0B0B0B0B0A0B0A0B0B0B0B0B
+      0A0B0A0B0A0A0A0A0A0A0A0A0A0808080808070707070809080A0A0912121324
+      24242A2A2A3131313839383C3D3C121213050405040404050404040404040404
+      0404040404030303040303030304030303030303030303030303030303030303
+      0302020302030303030302030302020302030202020201020202020201020202
+      0202020102010202020201010202010201010101010101010101000101010100
+      0003030100003030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303232
+      323434343535353737373939393B3B3B3D3D3D3434342E2E2E2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F303838373A39393A39393A39393A39393A3939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393839393839393838383831313130303031303131303131313131313134
+      34343A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A39
+      3A39393A39393A39393A39393939393939393939393939393939393939393939
+      3939393939393939393939393939393839393839383839383839383839383838
+      38383838383838383838383939393B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A
+      3A3A3A3737373636363737373737373838383838383939393A3A3A3B3B3B3B3B
+      3B3D3D3D3E3E3E40404041414142424245454445454543434344444446464648
+      48484B4B4B4E4E4E5050505353535757575959595C5C5C606060636363676767
+      6A6A6A6F6F6F7272727676767A7A7A7F7F7F8383838787878C8C8C9191919596
+      969A9A9A9F9F9FA5A5A5AAAAAAB0B0B0B5B5B55D5D5D5858585959595B5B5B5B
+      5B5B5C5C5C5B5B5B5A5A5A5A5A5A595959585858575757575757575757565656
+      5656565454545454545454545454545252525252525252525252525151515050
+      504F4F4F4E4E4E4D4D4D4B4B4B4A4A4A4848484646464444444343434141413F
+      3F3F3E3E3E3D3D3D3C3C3C3D3D3D3D3D3D3D3D3D3E3E3E3E3E3E3F3F3F3F3F3F
+      4141414141414141414141414141414242424242424141414040404040404040
+      403F3F3F3E3E3E3D3D3D3D3D3D3D3D3D3C3C3C3B3B3B3B3B3B3B3B3B39393937
+      37373535353333333131312F2F2F2B2B2B2A29222329430232F20033FF0032FD
+      0032FD0031FB0031FA0030FA002FFB0A2BB80A2AB6052BD1022CE6012CEC002C
+      F2002DF8002DFE002CFE002BF5132268211E1221212123232324242425252527
+      2727262626272727272727262626262626252525242424242424242424232323
+      2323232121212121212121212121211F1F1F1F1F1F1F1F1F1F1F1F1E1E1E1D1D
+      1D1C1C1C1C1C1C1C1C1C1B1B1B1B1B1B19191919191919191919191918181817
+      1717171717171717161616151515141414141414141414131313131313121212
+      1111110F0F0F0E0E0E0C0C0C0B0B0B0A0A0A131313B0B0B0ABABABA5A4A49F9F
+      9E9998989493938F8E8E8989888483837E7E7E7A7A797575757070706C6C6C68
+      68686364635E5F5E5B5B5B565656545454504F4F4B4B4B494949454445414141
+      3F3F3E3C3C3C3838383636353433333030302E2E2E2D2D2D2A2A2A2728282626
+      2624242422232320202121201F20201F20201F20201F1F1F1F1F1E1E1E1E1E1E
+      1D1E1D1D1D1D1C1D1E1C1C1E1D1C1D1D1C1D1D1D1D1D1D1C1C1D1D1D1C1C1C1C
+      1D1C1D1C1C1C1B1B1B1A1A1A1919181817171616171515151515151515141415
+      1515141514141414141414141414141314131314131313131313131313131213
+      1312131212121112121111121111121111111111111111111011101011101010
+      1010101010101010100F100F101010100F0F0F0F0F0F0F0F0F0F0F0F0F0F0E0F
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0D0E0D0D0D0D0D0D0D0D
+      0C0C0D0C0C0C0C0C0B0B0B0C0B0C0B0B0C0B0C0B0B0B0B0B0A0B0A0B0B0A0B0A
+      0A0A0B0B0B0A09090A0808080808080808080908090C0B0C1B1C1B2727272E2F
+      2E3535353A3A3A30303005050504050405050505040404040505040504040404
+      0403040403040304040403030403030304030303030303030303030303030303
+      0302020302030203020303020302020202020202020201020202010201010202
+      0201010201010202020202010202020101010101010101010101010103030301
+      0001303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030323232343434353535
+      3737373939393B3B3B3D3D3D3434342E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F303838383A3A393A39393A39393A39393A39393A393939393939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939383939383938383433333030303030303130313130313131313131313A3A
+      393A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A
+      39393A39393A39393A3939393939393939393939393939393939393939393939
+      3939393939393939393939393939383939383938383938383938383938383838
+      383838383838383838383A3A3A3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A3A
+      3A3A3737373737373737373838383838383939393A3A3A3B3B3B3B3B3B3D3D3D
+      3E3E3E4040404141414242424545444646454847474949494848484949494A4A
+      4A4E4E4E5050505353535757575959595C5C5C6060606363636767676A6A6A6E
+      6E6E7272727676767A7A7A7E7E7E8383838787878C8C8C9191919696959A9A9A
+      9F9F9FA5A5A5AAAAAAB1B1B1B7B7B75F5F5F5A5A5A5A5A5A5B5B5B5D5D5D5D5D
+      5D5C5C5C5B5B5B5A5A5A59595959595958585857575757575757575756565656
+      5656545454545454545454545454525252525252525252525252515151505050
+      4F4F4F4E4E4E4E4E4E4C4C4C4A4A4A4949494747474646464545454444444343
+      4342424242424241414141414141414141414142424242424242424243434343
+      4343434343434343424242424242424242424242404040404040404040404040
+      3F3F3F3E3E3E3D3D3D3D3D3D3D3D3D3C3C3C3B3B3B3B3B3B3A3A3A3838383535
+      353232323030302C2C2C29292929261B112EA00035FF0033FF0032FF0032FE00
+      32FD0031FB0032FF072ECF22222421201C1E1F251C1E2B181F3E14205511226C
+      0E24830B26A210237C201E1721201F2223232424242626262727272727272727
+      2727272727272727272726262626262625252524242424242424242423232323
+      23232222222121212222222222222020202020202020201F1F1F1E1E1E1D1D1D
+      1D1D1D1C1C1C1C1C1C1B1B1B1A1A1A1919191919191919191919191717171717
+      1717171717171716161615151514141414141414141413131312121211111110
+      10100F0F0F0D0D0D0C0C0C0A0A0A141414B0B0B0AAAAAAA4A4A49F9E9F999898
+      9493938F8E8E8988898483837E7E7E7A7A7A7575757070706C6C6C6868686363
+      635E5E5F5C5B5B5656565454544F504F4B4B4C4949494545454242423E3F3F3B
+      3B3B3838383535353434333030302E2E2E2D2D2D2A2A2A282828272828272626
+      2626262424242422232322222121202121202020201F1F1F1E1E1F1D1E1E1D1D
+      1D1D1C1D1D1D1D1D1C1D1D1D1D1E1D1C1D1D1D1D1D1D1C1C1D1C1D1C1C1C1C1D
+      1C1C1C1C1C1C1B1C1D1C1C1D1C1C1C1C1B1B1B1C1A1A1A181718161615151414
+      1414141514141414141413131414141313131314141314131313131313121312
+      1212121213121113121112111111111111101011111111111010111111101110
+      10101010101010101010100F0F0F0F10100F0F0F0F0F0F0F0F0F0E0F0F0F0F0F
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0D0E0E0D0E0E0D0E0E0D0D0D0C0C0D0C
+      0C0C0C0C0C0C0B0B0C0B0B0C0C0C0C0C0B0B0C0B0B0B0B0B0A0B0B0B0B0B0B0B
+      0A0A090808080808090808090809090A0A1111122423232B2B2A313232383838
+      3D3D3D1717170505040404050404040504040405040504040404050404040404
+      0403030404030304030303040303040303030303030303030303030303020302
+      0203020302030203030302020302020202020202020202020201010202010202
+      0101020201010101020201010101010101010101010001010300030101013030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303232323434343535353737373939393B
+      3B3B3D3D3D3434342E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F30383838
+      3A3A393A3A393A3A393A39393A39393A39393A39393A39393939393939393939
+      3939393939393939393939393939393939393939393939393939393939393839
+      39383939383837373030303030303030303130313130313131313635353A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A39
+      393A39393A39393A393939393939393939393939393939393939393939393939
+      3939393939393939393939393938393938393838393838393838393838383838
+      3838383838383838383A3A3A3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A3B3A
+      3A3939393737373838383838383939393A3A3A3B3B3B3B3B3B3D3D3D3E3E3E40
+      40404141414242424545444646454848474A49494C4B4B4E4D4D4F4F4F505050
+      5151525353535757575959595C5C5C5F5F5F6363636767676A6A6A6E6E6E7272
+      727676767A7A7A7E7E7E8282828787878C8C8C9191919696969B9B9BA1A1A1A7
+      A6A6ACACACB2B2B2B7B7B75F5F5F5B5B5B5C5C5C5C5C5C5D5D5D5D5D5D5D5D5D
+      5C5C5C5B5B5B5959595959595959595858585757575757575757575656565656
+      565454545454545454545454545252525252525252525252525151515050504F
+      4F4F4E4E4E4E4E4E4C4C4C4C4C4C4A4A4A494949494949474747464646454545
+      4545454545454444444444444444444444444545454545454444444444444444
+      444444444444444242424242424242424242424040404040404040404040403F
+      3F3F3E3E3E3D3D3D3D3D3D3D3D3D3C3C3C3B3B3B3A3A3A383838353535323232
+      2E2E2E2B2B2B2927212127400434F20135FF0134FF0034FF0032FF0032FE0032
+      FE0032FF17276A25221623222121201E201F1C1F1E181F1D151F1D121F1C0F20
+      1E16211F1921201F222222242424252525262626282828282828282828282828
+      2828282727272727272626262626262525252525252525252525252424242424
+      242323232323232323232323232222222222222222222121211F1F1F1F1F1F1D
+      1D1D1D1D1D1C1C1C1C1C1C1A1A1A191919191919191919191919171717171717
+      1717171717171616161515151414141414141414141212121111111010100F0F
+      0F0E0E0E0C0C0C0B0B0B131313B0B0B0AAAAAAA4A4A49E9E9E9998989493938E
+      8E8E8989898483847F7E7E7979797575757070706C6C6C6868686363635E5F5F
+      5B5C5B5656565353535050504C4B4B4949494545454242423E3F3F3B3B3C3838
+      383535353433343131312F2F2F2F2F2E2D2C2C2A2B2B2A292927272826262624
+      232423232323212121212021212020201F1E1F1F1F1E1F1D1E1D1D1D1D1D1D1D
+      1D1D1D1D1D1C1D1C1C1D1D1C1D1D1C1D1D1D1D1D1C1D1D1D1C1D1C1C1C1C1C1C
+      1C1C1C1C1C1C1C1D1B1B1D1C1B1D1C1B1C1C1C1C1D1C1C1C1C1C1B1B19191817
+      1716141415141414141414141414131414131313131313131313131312131212
+      1312121311121211111211111111111111101111111010101011111010101010
+      10101010100F101010101010100F0F0F0F100F0F0F0F0F0F0F0E0E0F0E0E0E0E
+      0F0F0F0E0E0E0E0E0E0E0E0E0E0E0D0D0E0D0D0E0D0D0D0E0C0D0D0C0C0C0C0C
+      0C0C0B0C0C0B0C0C0C0C0B0B0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B090A090809
+      080809080808080A09090B0B0B1919192627272D2D2D3635353B3A3B38383705
+      0505050504050404040505050405040405040405040404050404040304040404
+      0404040303030304030303030403030304030304030303030303020203030303
+      0202020202020203020202020203020202020202020202020202020201020102
+      0201010201020202010201010201010202020101030303010101303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303232323434343535353737373939393B3B3B3D3D3D3434
+      342E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F303838383A3A393A3A393A
+      3A393A3A393A39393A39393A39393A39393A3939393939393939393939393939
+      3939393939393939393939393939393939393939393939393939383939383939
+      383938383232323030303030303030303130313130313131313A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3939
+      3A39393A39393A39393939393939393939393939393939393939393939393939
+      3939393939393939393939393839393839383839383839383839383838383838
+      38383838383838383B3A3A3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A3C3B3B
+      3939393838383838383939393A3A3A3B3B3B3B3B3B3D3D3D3E3E3E3F3F3F4141
+      414242424545454646454848474A49494C4B4B4E4D4D51505053525256555559
+      58585A5A5A5C5B5C5F5F5F6060616363646767676A6A6A6E6E6E717171767676
+      7B7B7B7F7F7F8383838989898E8E8E9393939999999D9D9DA2A2A2A7A7A7ACAC
+      ACB2B1B1B7B7B76767675C5C5C5D5D5D5D5D5D5E5E5E5D5D5D5D5D5D5D5D5D5C
+      5C5C5B5B5B595959595959595959585858575757575757575757565656565656
+      5454545454545454545454545252525252525252525252525151515050504F4F
+      4F4F4F4F4E4E4E4D4D4D4C4C4C4B4B4B4A4A4A4A4A4A49494948484848484848
+      4848474747474747464646464646464646464646464646454545454545454545
+      4444444444444242424242424242424242424040404040404040404040403F3F
+      3F3E3E3E3D3D3D3D3D3D3D3D3D3B3B3B3A3A3A3838383535353232322E2E2E2A
+      2A2928261E112FA50137FF0335FF0235FF0134FF0034FF0032FF0033FF062FD7
+      2324292524212424242424242222222222222121212121212121212222212323
+      2223232324242425252527272728282829292928282828282829292929292927
+      2727272727272727262626262626262626252525252525262626252525252525
+      2525252626262626262626262525252424242424242323232121212020201E1E
+      1E1D1D1D1D1D1D1B1B1B1B1B1B19191919191919191919191917171717171717
+      17171717171616161515151414141414141313131212121111110F0F0F0E0E0E
+      0D0D0D0B0B0B1F1F1FB1B0B0AAAAAAA4A4A49E9E9E9999999493938F8E8E8989
+      898483847F7E7E7979797575757070716C6C6C6767676363635E5F5F5B5C5C56
+      56565353535050504C4C4C4848484545454242423D3E3E3B3B3C383938363635
+      3534333232323230312F2F2F2D2D2C2B2B2A2929282728282626262424242323
+      2322222222202121212020201F1F1F1E1F1E1F1E1E1D1E1D1E1E1D1D1D1D1D1D
+      1D1D1D1C1D1D1C1C1D1D1C1D1D1C1D1D1D1D1D1D1C1D1D1C1D1C1D1C1C1D1C1C
+      1C1C1C1C1C1B1C1C1C1D1C1C1D1C1C1C1C1C1C1C1C1C1C1B1B1C1C1B1B1C1B1B
+      1C191A1917171614141413141313131314131313131313131312121213121212
+      1211121212121111111111111111111011111010111011101010101010101010
+      1010101010101010100F10100F100F0F0F100F0F0F0F0F0F0E0F0E0E0F0E0E0E
+      0F0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0D0D0D0E0D0C0C0D0C0C0C0C0C0C
+      0B0C0C0B0C0B0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B0B090809090808090809
+      0A09090909090F0F0F2323232A2A2A3131313939393D3D3D1A1A1A0605050505
+      0505050405050405050504040504050405040404040404050404040404040404
+      0404040304040403030304030303030303030303030303020303020303030202
+      0302020202020302020202030202020202020201020202020201020202020101
+      0101010201020102010101010101010103030301010130303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303232323434343535353737373939393B3B3B3D3D3D3434342E2E2E2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F303838383A3A3A3A3A3A3A3A393A3A393A3A
+      393A39393A39393A39393A39393A39393A393939393939393939393939393939
+      3939393939393939393939393939393939393939393939393938393938393838
+      3636363030303030303030303030303130313130313737373A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A39393A
+      39393A39393A3939393939393939393939393939393939393939393939393939
+      3939393939393939393939383939383938383938383938383938383838383838
+      383838383938383B3B3A3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3C3C3B3C3B3B3B
+      3B3B3838383939393A3A3A3B3B3B3B3B3B3D3D3D3E3E3E3F3F3F414141424242
+      4444444646454848474A49494C4B4B4E4D4D5150505352525655555858585B5B
+      5B5F5E5E6160606464646767676A6A6A6E6E6E7272727575757A7A7A7D7D7D81
+      81818686868A8A8A8E8E8E9393939898989D9D9DA2A2A2A7A7A7ABABABB1B1B1
+      B6B6B66D6D6D5D5D5D5E5E5E5F5F5F5F5F5F5F5F5F5E5E5E5D5D5D5D5D5D5B5B
+      5B5A5A5A59595959595959595958585857575757575757575756565656565654
+      54545454545454545454545252525252525252525252525151515050504F4F4F
+      4F4F4F4F4F4F4E4E4E4D4D4D4C4C4C4C4C4C4C4C4C4B4B4B4A4A4A4949494A4A
+      4A49494948484848484847474747474747474746464645454545454545454544
+      44444444444242424242424242424242424040404040404040404040403F3F3F
+      3E3E3E3D3D3D3D3D3D3D3D3D3B3B3B3838383636363232322E2E2E2B29232128
+      490537FC0337FF0436FF0335FF0235FF0134FF0034FF0033FF152B8229251927
+      2727272727272727272727252525252525252525252525252525262626262626
+      2727272828282929292929292A2A2A2A2A2A2A2A2A2A2A2A2929292929292727
+      272727272727272626262626262626262626262727272828282828282929292A
+      2A2A2B2B2B2B2B2B2A2A2A2A2A2A2828282727272525252323232121211F1F1F
+      1D1D1D1D1D1D1C1C1C1B1B1B1919191919191919191919191717171717171717
+      171717171616161515151414141313131212121111111010100E0E0E0D0D0D0C
+      0C0C292929AFAFAFA9A9A9A3A3A39E9E9E9998989392928E8D8D898888838382
+      7F7F7E7979797474746F6F6F6C6C6C6767676262625F5F5F5A5B5B5657575353
+      534F4F4F4C4B4C4849494445454242423E3E3E3C3C3C3B3B3A37383735353533
+      33333131302F2F2E2D2D2C2B2B2A292928282728272627242425232323222122
+      21212020201F1E1E1D1C1B1B1C1B1B1919191919181918181818191918181818
+      181817181718181818171718171919191919191A191A1A1A1B1C1D1D1C1D1C1C
+      1C1C1C1B1C1C1C1B1C1C1B1C1C1C1C1C1C1C1C1C1C1C1C1C1C1C1C1B1B1B1B1B
+      1B1B1B1B1B1B1818181515151414131413131313121312121312121311121211
+      1112111112111111111111101111111111101111111011101010101010101010
+      101010100F100F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0E0E0E0E0F0F0F0F0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0D0D0E0D0E0E0C0C0D0C0C0C0D0C0C0C0C0C0C
+      0C0B0B0C0C0C0C0C0B0B0B0B0B0B0B0B0A0A0A0909090809090908090A0A090B
+      0B0C1919192727272D2E2E3535343B3B3B383837050606050505050506050505
+      0505050404050505050504050404050405040404040404040404040404030404
+      0403030303040403030403040403030403030303030302030303030302030203
+      0302020303020203020202030202020202020202020202020202020202010201
+      0101020201020101010101020303050101013030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303232323434
+      343535353737373939393B3B3B3D3D3D3434342E2E2E2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F303838383A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A39
+      3A39393A39393A39393A39393A39393939393939393939393939393939393939
+      3939393939393939393939393939393939393939393839393839393839383831
+      31313030303030303030303030303130313232323A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A39393A39
+      393A39393A393939393939393939393939393939393939393939393939393939
+      3939393939393939393938393938393838393838393838393838383838383838
+      3838383938383B3A3A3B3B3B3B3B3B3B3B3B3B3B3B3C3C3C3C3C3B3D3C3C3C3C
+      3C3A3A3A3A3A3A3B3B3B3B3B3B3D3D3D3E3E3E3F3F3F41414142424244444446
+      46464848474A4A494C4B4B4E4D4D5150505352525554545858585B5B5B5F5E5E
+      6160606363636767676A6A6A6E6E6E7171717575757979797D7D7D8181818686
+      868A8A8A8E8E8E9393939898989D9D9DA1A1A1A7A7A7ABABABB0B0B0B6B6B574
+      74745E5E5E6060606060606161616161615F5F5F5D5D5D5D5D5D5C5C5C5B5B5B
+      5A5A5A5959595959595959595858585757575757575757575656565656565454
+      545454545454545454545252525252525252525252525151515050504F4F4F4F
+      4F4F4F4F4F4E4E4E4E4E4E4D4D4D4C4C4C4C4C4C4C4C4C4B4B4B4A4A4A4A4A4A
+      4A4A4A4949494848484747474747474747474646464545454545454545454444
+      444444444242424242424242424242424040404040404040404040403F3F3F3E
+      3E3E3D3D3D3D3D3D3B3B3B3939393636363232322F2F2F2A29262426300B34D5
+      0439FF0437FF0436FF0335FF0235FF0034FF0332F124293E2A29242A2A2A2B2B
+      2B2B2B2B2A2A2A2A2A2A2929292929292828282828282828282929292A2A2A2A
+      2A2A2A2A2A2A2A2A2B2B2B2A2A2A2A2A2A2A2A2A2A2A2A292929292929272727
+      2727272727272626262727272727272828282A2A2A2C2C2C2E2E2E2F2F2F3030
+      303131313131313030302F2F2F2D2D2D2A2A2A2828282525252222222020201E
+      1E1E1D1D1D1C1C1C1B1B1B191919191919191919191919171717171717171717
+      1717171616161515151313131313131111111010100E0E0E0D0D0D0C0C0C3534
+      34AFAFAEA9A8A9A3A3A39E9E9E9898989393928E8E8D8988888383837E7E7E79
+      797974747470706F6C6C6C6767676262625F5F5F5B5B5B5756575252524F4F4F
+      4C4C4C4949494544454242434040403D3C3D3A3B3A373837353535333333302F
+      302F2E2F2D2C2C2B2B2A2928282828272625252221211F1F1F1D1D1D1C1C1C1C
+      1B1B1A1A19191818181818171716161717161717161617161616161616161516
+      1615151515151515151516151515151515151415151514151515151716161818
+      181A1A1A1C1B1C1C1C1B1D1C1B1C1C1C1C1C1C1C1B1C1B1C1B1B1B1C1B1B1B1C
+      1B1B1C1B1B1C1B1B1A1918151515131312131312131212131212131212121111
+      1211111112121111111111111111111011111011111010101011101010101010
+      101010100F100F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0E0E0F0F0F0F0E0F0F0F
+      0F0F0E0E0E0D0E0E0D0E0E0D0D0E0D0D0D0D0C0C0C0D0C0C0C0C0B0C0C0C0B0B
+      0C0C0B0B0B0C0B0B0B0B0B0C0A09090909090909090808080A09090E0F0E2323
+      232929293030303939393D3D3C1E1E1E06050506060505050605050505050505
+      0405050504050404050404040504050404040504040404040404040404040304
+      0403030403040403040303030303030303030303030303020303020202020302
+      0203030202020302020202020202020202020102020102020102010202010101
+      0101010101010101030303020102303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030323232343434353535373737
+      3939393B3B3B3D3D3D3434342E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      303838383A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A
+      39393A39393A39393A3939393939393939393939393939393939393939393939
+      3939393939393939393939393939393939393939383939383938383635353030
+      303030303030303030303030303130313635353A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A39393A3939
+      3A39393A39393939393939393939393939393939393939393939393939393939
+      3939393939393939393839393839383839383839383839383838383838383838
+      38383838383A3A3A3B3B3B3B3B3B3B3B3B3C3C3C3C3C3C3D3D3C3D3C3C3E3D3D
+      3D3C3C3B3B3B3B3B3B3D3D3D3E3E3E3F3F3F4141414242424444444646464747
+      464A4A494C4B4B4E4D4D5150505352525554545858585B5A5A5E5D5D61606063
+      63636767676A6A6A6D6D6D7171717575757878787C7C7C8181818585858A8A8A
+      8E8E8E9292929797979C9C9CA0A0A0A6A6A6ABABABB0B0B0B6B6B67D7D7D6060
+      606161616161616262626262626060605F5F5F5D5D5D5D5D5D5B5B5B5B5B5B5A
+      5A5A595959595959595959585858575757575757575757565656565656545454
+      5454545454545454545252525252525252525252525151515050504F4F4F4F4F
+      4F4F4F4F4E4E4E4E4E4E4C4C4C4C4C4C4C4C4C4C4C4C4A4A4A4A4A4A4A4A4A4A
+      4A4A494949484848474747474747474747464646454545454545454545444444
+      4444444242424242424242424242424040404040404040404040403F3F3F3E3E
+      3E3D3D3D3C3C3C3939393636363333332F2F2F2B2B2B28251B1B29610539FE05
+      38FF0437FF0436FF0335FF0035FF0F30B22C2A222D2D2C2E2E2E2F2F2F2F2F2F
+      2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2B2B2B2B2B2B2B2B2B2C2C2C2C2C2C2C2C
+      2C2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2A2A2A2A2A2A29292929292928282827
+      27272727272626262727272929292B2B2B2D2D2D323232343434363636383838
+      3939393939393838383535353131312E2E2E2A2A2A2626262323232020201F1F
+      1F1D1D1D1C1C1C1A1A1A19191919191919191919191917171717171717171717
+      17171616161414141313131212121010100F0F0F0D0D0D0C0C0C424242AFAFAF
+      A9A8A8A3A3A39E9D9D9797979292928D8D8D8887878382827E7E7E7979797474
+      746F6F6F6B6B6B6767676262625E5E5E5A5A5A5757575352524F4F4F4B4B4B49
+      494846464643434340403F3D3D3D3A3B3B3738383535353232323030302F2F2E
+      2C2C2B2A292826262623232322212220201F1E1E1F1D1D1D1D1C1C1C1B1A1A1A
+      1919181819181917171717171717171717171717171616161616161616161616
+      1616151616161615151515151515151515141415141415141415141314141314
+      1313131415141817181A1A1A1C1C1C1C1C1C1C1C1C1B1C1C1B1B1C1B1B1B1B1B
+      1B1C1B1B1C1A1B1C1B1B1A1A1915161513131213121212111213121212121111
+      1211111111111111111111111011101011101010111110101110101010101010
+      0F0F1010100F0F1010100F0F0F0F0F0E0F0F0F0F0E0F0F0F0F0E0E0F0F0F0E0E
+      0E0E0F0E0E0E0E0E0D0D0D0D0E0D0C0C0D0D0D0D0C0C0C0C0C0C0C0C0B0B0C0C
+      0C0C0C0C0C0B0A0B0909090909090909090A0A090C0C0C1918182626262D2D2D
+      3434343B3B3B3B3B3B0A0A0A0506060606050505050605050505050505050405
+      0505050504050405050504050505040504040404040404040304040404040404
+      0303030303040303040303040303030303030303030303030202020202030303
+      0202020303020202030202030202020202020202020202020202010202010101
+      0101010203030301010130303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303232323434343535353737373939393B3B3B3D
+      3D3D3434342E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F303838383A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39
+      393A39393A39393A393939393939393939393939393939393939393939393939
+      3939393939393939393939393939393938393938393838393838313131303030
+      3030303030303030303030303131313A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A39393A39393A
+      39393A3939393939393939393939393939393939393939393939393939393939
+      3939393939393939383939383938383938383938383938383838383838383838
+      383838383A3A393B3B3B3B3B3B3C3C3C3C3C3C3D3D3D3D3D3C3E3D3D3E3D3D3F
+      3F3F3C3C3C3D3D3D3E3E3E3F3F3F4040404242424444444646464747464A4A49
+      4C4B4B4E4D4D5150505352525554545857575B5A5A5E5D5D6160606362626666
+      666A6A6A6D6D6D7171717575757878787C7C7C8080808585858989898D8D8D92
+      92929696969B9B9BA0A0A0A5A5A5ABABABAFAFAFB5B5B5868686626262626262
+      6363636363636262626161616060605D5D5D5D5D5D5C5C5C5C5C5C5B5B5B5A5A
+      5A59595959595959595958585857575757575757575756565656565654545454
+      54545454545454545252525252525252525252525151515050504F4F4F4F4F4F
+      4F4F4F4E4E4E4E4E4E4C4C4C4C4C4C4C4C4C4C4C4C4A4A4A4A4A4A4A4A4A4A4A
+      4A49494948484847474747474747474746464645454545454545454544444444
+      44444242424242424242424242424040404040404040404040403F3F3F3D3D3D
+      3C3C3C3A3A3A3838383333333030302B2B2B27272624231C0F31B5043AFF0538
+      FF0437FF0336FF0235FF202E6A312E2031313133333333333334343434343432
+      32323030303030302E2E2E2D2D2D2E2E2E2E2E2E2D2D2D2D2D2D2D2D2D2D2D2D
+      2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A2929292929292828282727272727
+      272626262727272828282C2C2C2F2F2F3333333838383C3C3C3E3E3E40404040
+      40404040403D3D3D3939393535353030302C2C2C2727272323232020201F1F1F
+      1D1D1D1C1C1C1B1B1B1919191919191919191919191717171717171717171616
+      161515151414141212121010100F0F0F0E0E0E0C0C0C525252AEAEADA8A8A7A3
+      A3A29D9C9C9796969291918D8B8C8786868281817D7D7D7979797373736F6F6F
+      6B6B6B6666666262625E5E5E5A5A5A5656565252514F4F504C4C4C4949494545
+      4543424341403F3D3D3C3B3B3B3738383535363131312E2E2E2C2B2B28292926
+      26262625252323232222221F201F1F1E1E1D1D1D1D1D1D1C1B1B1B1A1A1A1919
+      1918181817171717171716171716161616171616171616161616161616161515
+      1616161615161516151515151515151515151414141415141514141414131413
+      13131213121213121413141616161A1A1A1C1C1C1C1C1C1C1C1B1B1C1B1B1B1B
+      1C1B1B1C1B1A1B1B1A1B1B1B191A1A1515151312121312111212121211111211
+      121211111112111111101111111110101010111010101010101010100F100F10
+      0F100F10100F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0E0E0E0E0E0F0E0E0E0F0E0E
+      0E0E0E0E0D0E0E0D0D0D0C0D0E0C0D0C0C0C0C0D0C0C0C0C0B0B0C0C0C0C0C0B
+      0C0A090909090909090A0909090A0A0A0E0E0D2221222929293030303838383D
+      3D3D232323050606050506050606050606060506060505050505050505050505
+      0505050404040405050404040504040404040404040404040404040404030303
+      0403030403030403030403030303030303030302030302030303030202020202
+      0203030203020302020202020202020202020102010201020202010101010101
+      0503050102013030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303232323434343535353737373939393B3B3B3D3D3D3434342E2E
+      2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F303838383A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A3939
+      3A39393A39393939393939393939393939393939393939393939393939393939
+      3939393939393939393939393839393839393839383835353530303030303030
+      30303030303030303030303635353B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A39393A39393A39
+      393A393939393939393939393939393939393939393939393939393939393939
+      3939393939393938393938393838393838393838393838383838383838383838
+      3838383939393B3B3B3C3C3C3C3C3C3D3D3D3D3D3D3E3E3D3E3D3D403F3F3F3F
+      3F4040403F3F3F3F3F3F4040404242424444444646464747474A4A494C4C4B4E
+      4D4D5150505352525554545857575B5A5A5D5C5C6160606362626666666A6A6A
+      6D6D6D7171717575757878787C7C7C8080808484848888888D8D8D9292929696
+      969B9B9BA0A0A0A4A4A4AAAAAAAFAFAFB4B4B48F909063636364646464646463
+      63636363636262626060605F5F5F5D5D5D5C5C5C5C5C5C5C5C5C5B5B5B5A5A5A
+      5959595959595959595858585757575757575757575656565656565454545454
+      545454545454545252525252525252525252525151515050504F4F4F4F4F4F4F
+      4F4F4E4E4E4E4E4E4C4C4C4C4C4C4C4C4C4C4C4C4A4A4A4A4A4A4A4A4A4A4A4A
+      4949494848484747474747474747474646464545454545454545454444444343
+      434242424242424242424242424040404040404040403F3F3F3E3E3E3D3D3D3B
+      3B3B3838383636363131312D2D2D29292926251D1F26450838F30539FF0538FF
+      0437FF0236FF16329F32322F36352E3A3A3A3F3F3F4141413F3F3F3C3C3C3939
+      393434343232323030303030302F2F2F2E2E2E2E2E2E2E2E2E2E2E2E2D2D2D2C
+      2C2C2C2C2C2C2C2C2B2B2B2A2A2A292929282828282828272727262626262626
+      2626262626262A2A2A2F2F2F3434333B3A3841413E4545424848464848484747
+      484545454141413C3C3C3737373232322C2C2C2727272323232020201E1E1E1D
+      1D1D1C1C1C1A1A1A191919191919191919191919171717171717161616151515
+      1414141212121010100F0F0F0E0E0E0C0C0C646464ADADADA7A7A7A2A2A19C9B
+      9B9797969291918D8C8C8787868281817D7C7C7878787373736F6F6F6A696A66
+      66666262625D5E5D5A5A5A56565553525250504F4B4C4B494949454545434243
+      413F3F3E3D3C3B3A3A3736353233332F2F2E2D2D2D2B2B2B2928292626262525
+      2623232422222220201F1F1F1F1D1E1E1E1D1D1C1C1C1B1A1A1A19191A191918
+      1817181817171717171717171616171616161616161617161616161616151616
+      1516151615151515151515151514151515151515151414141413141413141313
+      131212131212131212121312121313131718181B1B1A1B1C1B1B1B1C1C1B1B1C
+      1B1B1B1B1B1C1B1A1B1B1B1B1B1B1A191A141313121212121112111212111111
+      111111111111111111111010111110111011101010101010101010101010100F
+      0F10100F0F10100F0F0F0F0F0F0F0F0F0F0F0E0E0F0E0F0F0E0E0E0F0E0E0E0E
+      0E0E0E0D0E0E0D0D0D0C0D0D0D0C0C0C0D0C0C0C0C0C0C0C0C0C0B0B0B0A0A09
+      0A0A090909090A0A0A0C0C0C1919192626262D2D2D3434343A3A3A3A3A3A0A0A
+      0A06060606060606060606060505050606050605060505050505050505040504
+      0504040504050405050404040404050404040404040404040404040404040404
+      0404040403040403030303030303030303030303030302020303020303030302
+      0302020202020202020202020202020202010202020102010102010203030501
+      0102303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303032
+      32323434343535353737373939393B3B3B3D3D3D3434342E2E2E2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F303838383A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393939393939393939383939383938383938383131313030303030303030
+      303030303030303030303939393B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A39393A39393A3939
+      3A39393939393939393939393939393939393939393939393939393939393939
+      3939393939393839393839383839383839383839383838383838383838383838
+      38383939383C3C3B3C3C3C3D3D3D3D3D3D3E3E3E3E3E3D403F3F403F3F404040
+      4242424241414141414242424343434545454747474A4A494C4C4B4D4D4D504F
+      4F5251515554545857575A59595D5C5C605F5F6362626666666A6A6A6C6C6C70
+      70707474747878787C7C7C8080808383838888888D8D8D9191919595959A9A9A
+      9F9F9FA4A4A4A9A9A9AEAEAEB3B3B39A9A9A6464646565656666666666666565
+      656262626262626060605E5E5E5D5D5D5C5C5C5C5C5C5C5C5C5B5B5B5A5A5A59
+      5959595959595959585858575757575757575757565656565656545454545454
+      5454545454545252525252525252525252525151515050504F4F4F4F4F4F4F4F
+      4F4E4E4E4E4E4E4C4C4C4C4C4C4C4C4C4C4C4C4A4A4A4A4A4A4A4A4A4A4A4A49
+      4949484848474747474747474747464646454545454545454545454545444444
+      4444444343434343434242424242424141414040404040403E3E3E3B3B3B3939
+      393737373333332F2F2F2A2A2A272727262418152E95053AFF0638FF0538FF04
+      37FF0137FF1234BD38394447443C4A4A4A4C4C4C4A4A4A4646464141413C3C3C
+      3838383434343131313030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C
+      2C2C2C2C2B2B2B2A2A2A29292929292927272727272726262625252525252525
+      25252726232E2C2133332E39393E3F404646474C4E4D4A53514651504B4D4D4C
+      4949494444443E3E3E3737373131312B2B2B2626262222221F1F1F1D1D1D1D1D
+      1D1B1B1B1A1A1A19191919191919191919191918181817171716161615151513
+      13131111110F0F0F0E0E0E0D0D0D757575ACACACA6A6A6A1A1A19C9B9C969695
+      9190908C8B8B8786868281827D7D7C7777777373736E6E6F6A6A6A6666666262
+      625D5C5D5B5B5B5656565353534F4F4F4B4B4C4848484545454343433E3F3E3B
+      3A3A3636363535353131322F2F2E2D2C2C2A2A2A282929262626262626232423
+      2121212020201F1F1F1D1D1E1E1E1D1C1C1C1B1B1B1A19191919191818171917
+      1818171817171717171717171716161616161616161616161616161616151515
+      1516151516151515151515151515141515141414151414141314141313131313
+      1313131213121212121212121212121212121616151B1B1A1B1C1C1B1C1C1C1B
+      1B1C1A1B1C1B1B1B1C1B1C1B1B1C1B1B17171712121111121212121211111112
+      11111111111111111111101111111110101110111010101010100F1010100F10
+      0F0F0F0F0F0F100F0F0F0F0F0F0F0F0F0F0E0E0E0E0F0E0F0E0F0E0E0E0E0E0D
+      0E0E0D0D0E0C0D0D0D0C0C0D0D0C0C0D0C0C0D0C0C0C0A0A0A0A090A090A0909
+      09090B0B0A0E0F0E2121212828283030303737373D3D3D2A2A2A060706060606
+      0606060606060506060606050506050506060505050505050505050505050505
+      0505050504050404050405050504040404040404040304040404040304040403
+      0304040303030304030403030303020303020302030302020202020302020203
+      0302020202020202020202020102020101020202010202010303030201013030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303232323434343535
+      353737373939393B3B3B3D3D3D3434342E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F303838383A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A39
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393939393938393938393938393838363636303030303030303030303030
+      3030303030303433343B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A39393A39393A39393A
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393939383939383938383938383938383938383838383838383838383838
+      383939393B3B3B3D3D3D3D3D3D3E3E3E3E3E3E40403F403F3F41404042424242
+      42424444444545454444444545454747474A4A494B4B4A4D4D4D504F4F525151
+      5454545857575A59595C5B5B5F5F5F6362626665656969696C6C6C7070707373
+      737777777B7B7B7F7F7F8383838787878C8C8C9090909595959999999E9E9EA4
+      A4A4A8A8A8AEAEAEB2B2B2A5A5A5666666676767676767676767666666646464
+      6363636161615F5F5F5E5E5E5C5C5C5C5C5C5C5C5C5C5C5C5B5B5B5A5A5A5959
+      5959595959595958585857575757575757575756565656565654545454545454
+      54545454545252525252525252525252525151515050504F4F4F4F4F4F4F4F4F
+      4E4E4E4E4E4E4C4C4C4C4C4C4C4C4C4C4C4C4A4A4A4A4A4A4A4A4A4A4A4A4949
+      4948484847474747474747474746464646464646464646464645454545454544
+      44444444444444444343434242424242424141413F3F3F3E3E3E3B3B3B383838
+      3535353030302D2D2D29292A2726212327320B37E1053AFF0639FF0538FF0437
+      FF0036FF0F37D93F46605350445251515050504C4C4C4747474141413B3B3B38
+      38383434343232323030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C
+      2B2B2B2A2A2A29292928282827272726262625252525252525252327251B2325
+      301827721028A80B28C30B28C60C29C41930B12D3C904A4E6257554B50504D4A
+      4A4B4444443D3D3D3636362F2F2F2A2A2A2525252121211E1E1E1D1D1D1C1C1C
+      1B1B1B1B1B1B1919191919191919191919191717171616161515151313131111
+      110F0F0F0E0E0E0F0F0F8C8C8BACACABA6A6A6A0A0A09B9B9B9695959090908B
+      8A8A8685858181817C7C7C7777777272726D6D6D6969696565656261615D5D5D
+      5A5A5A5555555353534F4E4F4B4A4A4848494645454140403C3C3C3A393A3636
+      363434343232322F2F2F2D2D2D2A2B2A28282826262624252524242421212120
+      20201F1F1F1E1E1E1E1D1E1D1C1D1B1B1B1A1A1A1A1919191817191817181817
+      1817171717171716171717171716161716161616161616161616151516161616
+      1615151515151515151515151515141415151514141514131414131413131313
+      13121313131212131212121212121212121111121414151919191B1C1B1C1B1B
+      1C1A1B1C1B1B1C1B1B1B1C1C1B1B1B1A1A1A1514141112121211121111111211
+      1111111111101110101110111110111010111111101010100F10100F100F1010
+      10100F0F0F0F0F0F0F0F0F0F0F0F0F0E0F0F0F0F0E0E0E0E0E0E0E0E0E0E0D0E
+      0E0D0D0E0D0D0D0C0C0D0C0C0C0D0D0D0B0C0A0A0A0A090A0A0A0A0B0A0B0C0B
+      0B1616172526252B2B2B3333333939393E3E3E0E0D0D06060607060606060606
+      0606060506060606050606050605050506050505060506050504050505040504
+      0405050405050405040404050404040404040404040404040404030403040304
+      0403040403030303030303030303020303030303030202030303030202020302
+      0302020302020202020202020102020202010201050505020202303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030323232343434353535373737393939
+      3B3B3B3D3D3D3434342E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F303838
+      383A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A3939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393839393839393839383839383832323230303030303030303030303030
+      30303030303737373B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A39393A39393A39393A39
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393938393938393838393838393838393838383838383838383838393939
+      3939393B3B3B3D3D3D3E3E3E3E3E3E40404040403F4140404342424242424444
+      444545454747474949484949494A49494B4B4A4D4D4C4F4E4E51505054545457
+      56565A59595C5B5B5F5F5F6262626665656868686C6C6C6F6F6F737373767676
+      7A7A7A7F7F7F8383838787878A8A8A8F8F8F9494949999999D9D9DA2A2A2A8A8
+      A8ADADADB2B2B2B0B0B06B6B6B68686868686868686867676765656563636361
+      61615F5F5F5E5E5E5D5D5D5C5C5C5C5C5C5C5C5C5C5C5C5B5B5B5A5A5A595959
+      5959595959595858585757575757575757575656565656565454545454545454
+      545454545252525252525252525252525151515050504F4F4F4F4F4F4F4F4F4E
+      4E4E4E4E4E4C4C4C4C4C4C4C4C4C4C4C4C4A4A4A4A4A4A4A4A4A4A4A4A494949
+      4848484747474747474848484747474646464646464747474747474747474747
+      474747474747474646464444444343434141413F3F3F3D3D3D39393936363633
+      33332F2F2F2B2B2B2828282825191B2D76063BFF0639FF0639FF0538FF0437FF
+      0035FF0B37E83C48795653465151504D4D4D4848484141413C3C3C3939393535
+      353333333232323131313030302F2F2F2F2F2F2E2E2E2E2E2E2C2C2C2B2B2B2A
+      2A2A29292928282826262625252523242424231F24231D16256E0526CD0025EE
+      0023EC0023E70023E50022E40020E5001FE50725D42C3B9652535450504A4949
+      494242423A3A3A3232322C2C2C2727272323232020201D1D1D1D1D1D1C1C1C1B
+      1B1B1B1B1B191919191919191919181818161616151515131313121212101010
+      0E0E0E151515A1A1A1ACACABA6A5A5A09F9F9A9999959494908F8F8A89898584
+      84807F7F7B7B7B7777777272726D6D6D6868686666656161615D5D5D59595856
+      55555252524F4F4F4A4A4A4747474342423F403F3B3B3C383938353535353434
+      3131312F2F2E2C2D2C2A2A2A2828282626262525252424232221222020201F1F
+      1F1E1E1E1E1D1E1D1D1D1B1B1C1A1A1B1A1A1A19181819181718181819171718
+      1717171717171717171717161617171616161616161616161616161616161516
+      1615151515151515151515151414141414151514141414141413141313131313
+      121212131212121212121212121212111212111112111515151A1A1A1C1B1B1C
+      1B1B1B1B1B1B1C1B1B1B1B1B1B1B1B1B1B161717111112121112111212111112
+      1211111111111110111110111010101011101010101010101010101010100F0F
+      10100F100F0F0F0F0F0F0F0E0F0F0E0F0E0F0E0F0E0E0E0E0E0E0D0E0E0D0D0E
+      0C0D0D0D0D0D0D0C0C0C0C0B0A0B0B0A0A0A0A0A0A0A0A0B0A0B0D0D0D1F1E1E
+      2727272E2E2E3535353B3B3B2929290707070706060606070706060606060606
+      0606060606060606060505050605050505060505050505050505050505050405
+      0505040505040404050504040404040404040404040404040304030303040303
+      0303030403030303030303030203030302030303020303020302030303030203
+      0202020202030202020102020102020203050301020230303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303232323434343535353737373939393B3B3B3D3D3D34
+      34342E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F303838383B3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A393A3A393A3A393A39393A39393A39393A39393A393939393939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939383939383938383938383736363030303030303030303030303030303030
+      303232323A3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A39393A39393A39393A3939
+      3939393939393939393939393939393939393939393939393939393939393939
+      393939383939383938383938383938383938383838383838383939393939393A
+      3A3A3A3A3A3D3C3C3E3E3E404040404040414140434242434242444444454545
+      4747474949494B4B4B4C4C4C4D4D4D4E4E4E5050505151515453535655555958
+      585C5B5B5F5E5E6261616665656867676B6B6B6E6E6E7272727575757A7A7A7E
+      7E7E8282828686868A8A8A8F8F8F9393939898989D9D9DA2A2A2A7A7A7ACACAC
+      B2B2B2B5B5B57777776969696969696969696868686666666464646262626161
+      615F5F5F5E5E5E5E5E5E5C5C5C5C5C5C5C5C5C5C5C5C5B5B5B5A5A5A59595959
+      5959595959585858575757575757575757565656565656545454545454545454
+      5454545252525252525252525252525151515050504F4F4F4F4F4F4F4F4F4E4E
+      4E4E4E4E4C4C4C4C4C4C4C4C4C4C4C4C4A4A4A4A4A4A4A4A4A4A4A4A49494948
+      48484747474848484848484747474848484949494A4A4A4A4A4A4B4B4B4B4B4B
+      4A4A4A4A4A4A4949494747474444444242423E3E3E3C3C3C3939393535353131
+      312D2D2D2A2A2A2827252726251036CB063BFF0639FF0639FF0538FF0437FF00
+      36FF0435F7314390504E444B4B494747474242423C3C3C393939363636343434
+      3333333131313030303030302F2F2F2F2F2F2E2E2E2D2D2D2C2C2C2A2A2A2929
+      2927272725252523232423221F2222210E25960027EF0026EC0026E50025E300
+      24E20024E20024E10023DF0022DE0021E0001EE51930B34C4E574D4C47444445
+      3C3C3C3535352E2E2E2929292424242121211F1F1F1D1D1D1C1C1C1C1C1C1B1B
+      1B1B1B1B1A1A1A1919191818181717171515151313131212121010100E0E0E2B
+      2B2BADADADAAAAAAA4A4A39F9E9E9A99999594948F8E8E89898985848480807F
+      7B7A7A7676767272726D6D6D6767676564646060605D5C5C5858585655555250
+      504D4D4D4949494544454241413F3E3F3C3C3C3939393635353333333131312F
+      2F2F2D2D2D2B2B2B2828292626262425252424242222222121201F201F1E1E1E
+      1E1E1D1D1D1D1B1C1B1A1B1A1A1A1A1919191918181918181818181817171817
+      1717171717171617171616161616161617161616161616161616161616151615
+      1615151515151515141515151515151414141414151314131314131313131212
+      1213121213131212121212121112121212121211121111111615151B1A1B1C1B
+      1B1C1B1A1C1B1B1C1B1B1B1B1B1B1B1B19191914131312111111121112121111
+      111111111111111011101011101010101010101010101010101010100F10100F
+      0F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0E0E0F0E0D0E0E0D0E0E0D0D0D0D
+      0D0D0C0C0C0C0D0A0A0B0A0A0B0A0A0A0A090A0A0A0B14141423222328292830
+      2F303636363B3B3B0E0E0E070706060706070707060707060706060606060606
+      0605060605050605050505050606050605050505050505050505040504050405
+      0404040504050405040404040404040404040304030403030303040303030304
+      0303030403030304030203030302030203030302030203030303020202020202
+      0202020202020202020202010505050102023030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303232323434343535353737373939393B3B3B3D3D3D3434342E2E2E2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F302F303838383B3A3A3B3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A39
+      3A3A393A3A393A3A393A39393A39393A39393A39393A39393939393939393939
+      3939393939393939393939393939393939393939393939393939393939393839
+      3938393938393838393838333333303030303030303030303030303030303030
+      3535353B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A39393A39393A39393A393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939383939383938383938383938383938383838383939393939393A3A3A3A3A
+      3A3B3B3B3B3B3B3E3E3E40404041414143434243424245444445454546464649
+      49494A4A4A4C4C4C4E4E4E4F4F4F5252515453535555555858585A59595C5B5B
+      5F5F5F6160606564646867676A6A6A6E6E6E7171717575757979797D7D7D8181
+      818686868A8A8A8F8E8E9393939898989D9D9DA2A1A1A7A7A7ABABABB1B1B1B6
+      B6B68686866B6B6B6B6B6B6B6B6B696969676767656565626262616161606060
+      5F5F5F5E5E5E5E5E5E5C5C5C5C5C5C5C5C5C5C5C5C5B5B5B5A5A5A5959595959
+      5959595958585857575757575757575756565655555554545454545454545454
+      54545252525252525252525151515151515050504F4F4F4F4F4F4F4F4F4E4E4E
+      4E4E4E4C4C4C4C4C4C4C4C4C4C4C4C4A4A4A4A4A4A4A4A4A4A4A4A4949494848
+      484848484848484848484A4A4A4B4B4B4C4C4C4E4E4E4F4F4F50505050505050
+      50504F4F4F4D4D4D4A4A4A4646464242423E3E3E3B3B3B3737373232322E2E2E
+      2B2B2B29282928251C202B58083AF9073AFF0639FF0639FF0538FF0437FF0236
+      FF0034FF243DA44545464343423F3F3F3B3B3B38383835353534343433333332
+      32323030303030303030302F2F2F2E2E2E2D2D2D2C2C2C2A2A2A282828262626
+      2424242222212221190E258F0028F60027E90027E60026E60026E50025E30024
+      E20024E20024E10023DF0023DE0022DE001EE6182FAF4A49494544423E3E3E36
+      36362F2F2F2A2A2A2626262222222020201E1E1E1C1C1C1C1C1C1C1C1C1B1B1B
+      1B1B1B1919191818181717171616161414141212121010100E0E0E484848AEAE
+      AEA9A9A9A3A3A39E9E9E9898989392928E8D8D8888888383837F7E7F7B7B7A75
+      75757171716C6C6C6768686363636060605C5B5B5958585555554F4F4F4C4C4B
+      4949484444444342423E3E3E3C3B3B3838383535353333333030302E2E2E2D2D
+      2D2A2A2A2929282726272525252424242122222020201E1F1E1E1F1E1E1E1E1D
+      1D1D1B1B1C1B1A1A1A1A1B191919191919191818191818181818181717181718
+      1716171716171717161716171617161616171616161616161615161515151515
+      1515151515151514151415151414141414141414131414131413121313131312
+      13121312131212121212121212111211111112111111111211121817171B1B1A
+      1C1B1B1B1C1B1B1C1B1B1B1C1B1B1B1A1A1A1515151112121111121111111111
+      111011111111111110111011111010111010101010100F1010101010100F0F0F
+      10100F0F0F0F0F0F0F0F0F0F0F0F0E0E0E0E0E0E0E0E0E0E0D0D0E0D0D0D0D0D
+      0B0B0C0A0A0A0B0A0B0A0B0A0A0A0A0B0B0B1D1D1D2322232928282F2F2F3536
+      3529292A07070706070706060707070607070707070606070606060606060606
+      0605050605050605060506050505050506050505050505040405040504040505
+      0504040404040404040504040404040404040304040304040403040303040303
+      0303040403030303030303030203030203020203020303030202020202020202
+      0302020202020202050505020202303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303032323234
+      34343535353737373939393B3B3B3D3D3D3434342E2E2E2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F302F303838383B3A3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A
+      3A393A3A393A39393A39393A39393A39393A3939393939393939393939393939
+      3939393939393939393939393939393939393939393939393939383939383939
+      3839383839383838383831303130303030303030303030303030303030303038
+      38383B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A39393A39393A39393A39393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      39383939383938383938383938383938383939393939393A3A3A3A3A3A3B3B3B
+      3B3B3B3C3C3C3D3D3D4040404242424343424544444645454646464949494A4A
+      4A4C4C4C4D4D4D4F4F4F5252515454535655555958585B5B5B5D5D5D60606063
+      63636666666969696C6C6C7070707373737777767A7A7A7E7E7E828282868686
+      8A8A8A8F8F8F9393939898979C9C9CA1A1A1A6A5A5ABABABB0B0B0B6B6B69595
+      956C6C6C6C6C6C6C6C6C6B6B6B6969696666666363636161616161615F5F5F5E
+      5E5E5E5E5E5E5E5E5C5C5C5C5C5C5C5C5C5C5C5C5B5B5B5A5A5A595959595959
+      5959595858585757575757575757575757575656565555555555555555555454
+      545454545353535252525252525151515050505050504F4F4F4F4F4F4E4E4E4E
+      4E4E4C4C4C4C4C4C4C4C4C4C4C4C4B4B4B4A4A4A4A4A4A494949484848484848
+      4848484949494A4A4A4C4C4C4E4E4E5151515454545555555757575656565656
+      565454545151514D4D4D4747474141413C3C3C3939393535353030302C2C2C29
+      29292727262724181334B2063CFF073AFF0639FF0639FF0538FF0437FF0236FF
+      0234FF333B5B3F3D383B3B3B3939393737373535353434343434343333333131
+      313030303030303030302E2E2E2D2D2D2B2B2B2A2A2A27272725252523232322
+      201616235C0029F10028EC0028E80027E70027E70026E60026E50025E30024E2
+      0024E20024E10023DF0023DE0022DE001FE52735874543393C3C3C3636363030
+      302A2A2A2626262323232121211F1F1F1D1D1D1C1C1C1C1C1C1C1C1C1B1B1B1A
+      1A1A1919191717171616161414141111111010100E0E0E676767AEAEAEA9A9A8
+      A3A2A29D9C9C9797979292928D8D8D8887878282827D7D7D7878787474747070
+      706C6C6C6767676362635F60605B5B5B5656565352534F4F4F4B4B4B49484745
+      45444241403F3D3D3C3B3C3938383535353333333131312E2F2F2D2D2D2A2A2A
+      2827282626272625262323232222222121211E1E1F1E1E1E1E1E1F1D1D1D1B1C
+      1C1B1B1B1B1A1A191A1919191919191919181819181818181819171718171717
+      1717171617171717171617161716161616161616161516161515151615151515
+      1515151515151515141415141415141414151413141413141313131313131213
+      121212121212121212121212121211121212111111121111111313131A1A1A1C
+      1B1B1B1C1B1B1B1B1C1B1B1B1B1B1B1A1B161617111212111111111111111111
+      10111011111011101011111010101010101010101010100F0F10100F10100F10
+      0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0F0E0D0E0F0D0E0E0D0E0D0D0D0B0B0B0B
+      0B0A0A0B0A0A0A0B0A0A0B0F0F0F1F1F1F2322232928292E2E2E333433131313
+      0807070707070707070706070706070606060607060706070606060506060606
+      0605060506060606050505050505050605050505050505050504050405040405
+      0505040404040404040404040404040404040304040304040303040403040303
+      0303030303030303030203030303030303030302030203020202030302030202
+      0202020205050502020230303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303232323434343535353737
+      373939393B3B3B3D3D3D3434342E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F30
+      2F303838383B3B3A3B3A3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A
+      393A39393A39393A39393A39393A39393A393939393939393939393939393939
+      3939393939393939393939393939393939393939393939393938393938393838
+      3938383938383535353030303030303030303030303030303030303232323A3A
+      3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A39393A39393A39393A3939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      383939383938383938383938383A39393939393A3A3A3A3A3A3B3B3B3B3B3B3C
+      3C3C3D3D3D3D3D3D3F3F3F4141414444444645454746464848484949494B4B4B
+      4D4D4D4F4F4F5252525454535656555958585B5A5A5D5D5D5F5F5F6363636666
+      666969696C6C6C70706F7373737676767A7A7A7E7E7E8181818585858A8A8A8E
+      8E8E9292929797979C9C9BA0A0A0A5A4A4AAAAAAAFAFAFB4B4B4A4A4A46D6D6D
+      6E6E6E6D6D6D6C6C6C6B6B6B6868686565656363636161616060605F5F5F5F5F
+      5F5E5E5E5E5E5E5C5C5C5C5C5C5C5C5C5C5C5C5B5B5B5A5A5A59595959595959
+      5959585858585858585858585858575757575757565656565656565656555555
+      5454545353535454545353535252525151515050505050504F4F4F4E4E4E4E4E
+      4E4C4C4C4C4C4C4C4C4C4B4B4B4A4A4A49494949494948484848484847474748
+      48484A4A4A4D4D4D5151515454545858585C5C5C5E5E5E5E5E5E5E5E5E5C5C5C
+      5959595454544E4E4E4646463F3F3F3B3B3B3636363232322D2D2D2929292826
+      1E2228400E39E0083CFF083BFF073AFF0639FF0639FF0538FF0337FF0736F033
+      3542373733373737363636353535353535343434343434333333323232323232
+      3131313030302F2F2F2D2D2D2B2B2B29292926262624242422211F1F1F1F0627
+      C0002AF50029EA0028EA0028E90027E70027E70026E60026E50025E30024E200
+      24E20024E10023DF0023DE0021E20624CC373A463838343333332F2F2F2A2A2A
+      2626262323232121211F1F1F1E1E1E1D1D1D1C1C1C1C1C1C1C1C1C1A1A1A1919
+      191717171616161414141212121010100F0F0F858585ADADADA7A7A6A2A2A19C
+      9B9B9696969191918C8C8C8787878182817D7D7D7877787473746F6F6F6B6B6B
+      6666666363635F5E5F5A5A5A5555565252524F4F4E4B4A4B4948484444434142
+      413F3E3D3C3B3B393838363535333333302F302E2E2E2C2C2C2A2A2A28282827
+      27272525252323232121212121211F1F1F1E1E1E1F1F1E1C1C1C1C1C1C1B1B1B
+      1B1B1B19191A1919191919191919181918181918181818181817181817181717
+      1717171717171616161717161616161616161616161615161615151515151515
+      1515151515151415141415141415141414141314141314131313131212121312
+      1312121212121212121212121112121111111111111111111111111717181C1B
+      1B1C1B1B1B1C1C1B1B1B1B1B1B1B1B1B18181713131211111111111111111111
+      11111110111110111010101010111010101010100F100F100F0F100F100F100F
+      0F0F100F0F0F0F0E0F0E0E0F0E0E0F0E0D0E0E0D0D0C0C0C0B0B0B0B0B0B0B0B
+      0A0B0B0B0A0A0B1615151F201F2222222627272C2C2C30303116151508070708
+      0707070707060707060706060706060707060606070606060606060606060605
+      0606050605050606050505050505060505050505050505050505040405040504
+      0404050404040404040504040404040403030304030404040303030403030303
+      0303030303030303030303030203030202030202020202020203030202030202
+      0505050202023030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303232323434343535353737373939393B3B3B
+      3D3D3D3434342E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F302F303938383B3B
+      3B3B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A39
+      3A39393A39393A39393A39393A39393939393939393939393939393939393939
+      3939393939393939393939393939393939393939393839393839393839383839
+      38383938383232323030303030303030303030303030303030303433343B3B3A
+      3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A393A3A393A3A393A39393A39393A39393A393939393939
+      3939393939393939393939393939393939393939393939393939393939393938
+      3939383938383938383A39393A39393939393A3A3A3A3A3A3B3B3B3C3C3C3D3D
+      3D3D3D3D3F3F3F4040404141414444434646454948484949494B4B4B4D4D4D4F
+      4F4F5151515353535656555959585B5A5A5D5C5C5F5F5F626262666666686868
+      6C6C6C6F6F6F7272717676757A79797D7D7D8181818484848888888D8D8D9191
+      919595959A9A9A9F9F9EA3A3A3A9A8A8AEAEAEB3B3B3B1B1B17373736F6F6F6E
+      6E6E6E6E6E6C6C6C6969696666666464646262626161615F5F5F5F5F5F5F5F5F
+      5E5E5E5E5E5E5C5C5C5C5C5C5C5C5C5C5C5C5B5B5B5A5A5A5959595959595959
+      5959595958585858585858585858585858585858585858585858585858585856
+      56565656565555555454545252525151515050505050504F4F4F4E4E4E4E4E4E
+      4D4D4D4C4C4C4B4B4B4A4A4A4949494848484848484747474646464646464848
+      484B4B4B5151515756515F5C5162615A6464636666666666666464646161615C
+      5C5C5555554C4C4C4242423D3D3D3838383333332E2E2E2B292325282F1039D0
+      093EFF093BFF093BFF083BFF073AFF0639FF0639FF0438FF0C36DD3333393534
+      3135353535353535353535353534343434343433333332323232323232323230
+      30302F2F2F2D2D2D2B2B2B29292926262623232321201817214D002AEF002AEF
+      0029EC0029EA0028EA0028E90027E70027E70026E60026E50025E30024E20024
+      E20024E10023DF0022DF0021E4202C713432272E2E2E2B2B2B29292925252523
+      23232121212020201F1F1F1E1E1E1D1D1D1C1C1C1C1C1C1B1B1B1A1A1A181818
+      161616131313121212101010191919A2A2A2ACACACA6A6A6A0A0A09A9A9A9595
+      959090908B8A8A8585858181817C7C7C7777777373736E6E6E6A6A6A66666661
+      61615D5D5D5959595555555252524D4E4E4A4A494747484444444141413E3E3D
+      3C3B3B3937373635353433333030302E2E2E2C2C2C2A2A2A2828282727272525
+      252323242221212020201F1F1F1F1E1E1D1E1D1D1D1C1C1B1B1B1B1B1B1B1B19
+      1A1A191A1919191A191919191919181818191817191818181718181717171717
+      1716171617161616161616161616161516161615151616151516151615161515
+      1514151514151514141414151514141414131414131413131312131312121212
+      12121212121212121111121111111111121111111111111111111515151B1B1A
+      1C1B1B1B1C1B1B1B1B1B1B1B1B1B1B1918191312121111121211111011111110
+      1010111111101010101110111010101010101010100F0F100F0F1010100F0F10
+      0F0F0F0F0F0F0E0E0F0E0E0F0E0E0E0E0E0D0D0D0B0B0C0B0B0B0A0B0A0A0A0B
+      0B0B0B0C0D0C1D1D1D2121212525252928292E2F2F2E2E2D0A0A0B0707070707
+      0707070707070707070707060706060707060706070706060606060605060605
+      0605060606060505050506050605050505050505050405040504050505040405
+      0504050404040404040404040404040404030404040303040403040303030303
+      0303030302030303020303020302030303030302030302030303030205050502
+      0202303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303232323434343535353737373939393B3B3B3D3D3D3434342E
+      2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F302F303938383B3B3B3B3B3B3B3B3A
+      3B3B3A3B3A3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A
+      39393A39393A39393A3939393939393939393939393939393939393939393939
+      3939393939393939393939393939393939393939383939383938383938383938
+      383837373130313030303030303030303030303030303030303737373B3B3A3B
+      3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A393A3A393A3A393A39393A39393A39393A39393939393939
+      3939393939393939393939393939393939393939393939393939393939393839
+      39383938383A39393A39393A39393A3A3A3A3A3A3B3B3B3C3C3C3D3D3D3D3D3D
+      3F3F3F4040404141414242424444444545454848474A4A4A4D4D4D4F4F4F5151
+      515353535656565858575A5A595D5C5C5F5F5F6161616565656868686A6A6A6E
+      6E6E7171717575747979787D7C7C8080808484848888888C8C8C919191959595
+      9999999E9E9EA3A3A2A8A8A8ACACACB1B1B1B6B6B68181817070707070706F6F
+      6F6D6D6D6A6A6A6868686464646262626262626161615F5F5F5F5F5F5F5F5F5E
+      5E5E5E5E5E5C5C5C5C5C5C5C5C5C5C5C5C5B5B5B5A5A5A595959595959595959
+      5959595858585A5A5A5B5B5B5B5B5B5B5B5B5B5B5B5C5C5C5C5C5C5B5B5B5959
+      595858585757575555555353535151515050505050504F4F4F4E4E4E4D4D4D4C
+      4C4C4B4B4B4A4A4A494949474747454545464646454545454545464646494845
+      514E434C536D3953B1505C886A69636F6D656D6D6C6B6B6B6969696464645D5D
+      5D5454544848483E3E3E393939343435302F2B2B2B2A1537B70A3FFF0B3DFF0A
+      3DFF093CFF093BFF083BFF073AFF0639FF0438FF1035CB323133333331343434
+      3535353535353535353535353434343333333333333333333232323131312F2F
+      2F2E2E2E2B2B2B292929262626222222211E11102480002BFC002AEE002AED00
+      29EC0029EA0028EA0028E90027E70027E70026E60026E50025E30024E20024E2
+      0024E10023DF0021E90F24982A29212828262626262525252424242323232121
+      212020201F1F1F1E1E1E1E1E1E1D1D1D1C1C1C1B1B1B1A1A1A18181816161613
+      1313121212101010373737AEAEAEAAA9AAA4A4A49F9F9F9999999494948F8F8F
+      8A898A8585858080807B7B7B7676767272726E6E6D6969696464646060605C5C
+      5C5858585555555151514D4D4D494A494848484343434141413E3E3D3C3C3B38
+      38383635363433333130302E2E2D2C2B2C2A2A2A272727272727252525242424
+      2121212020211F1F1F1F1E1F1E1D1D1C1C1C1B1C1B1B1B1B1B1B1B191A1A191A
+      191A1A19191A1919191919191919181819181718181818171718171717171717
+      1717171716161616171617161616161616161616151616151616151516161515
+      1515151415151415151415141414141413141413141313131212131312121212
+      121212121212121111121111111111111112111111111111111312131A1A191B
+      1B1B1B1B1B1B1B1B1B1B1B1B1B1A191918121213121211121111111111111111
+      1011111111101010101010101010101010100F10101010101010100F0F0F0F0F
+      0F0F0F0F0F0E0E0F0E0E0E0D0E0E0D0D0B0B0C0B0B0B0B0B0B0B0B0B0A0B0B0C
+      0B0C1211121F1F1F2323242726272B2B2B2E2E2E1E1D1E070808070707070707
+      0707070707070707070707060606070606070607070606060606060505060606
+      0606060605060606060605050505050505050405050504050504040404040404
+      0404040404040404040404040303040403040304040304030404040304030303
+      0303040303030303030203030203030303030303020202030505050202033030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3232323434343535353636363838383A3A3A3D3D3D3434342E2E2E2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F302F303939383B3B3B3B3B3B3B3B3B3B3B3A3B3B3A3B
+      3A3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39
+      393A39393A39393A393939393939393939393939393939393939393939393939
+      3939393939393939393939393939393938393938393838393838393838393838
+      3535353030303030303030303030303030303030303131313939393B3B3A3B3A
+      3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A393A3A393A3A393A39393A39393A39393A3939393939393939
+      3939393939393939393939393939393939393939393939393939393939383939
+      383A39393A39393A39393B3A3A3A3A3A3B3B3B3C3C3C3D3D3D3D3D3D3E3E3E40
+      40404141414242424444444545454747464949484B4A4A4C4C4C4F4F4E525252
+      5554545757575959595C5C5C5F5E5E6261616363636767676A6A6A6D6D6D7171
+      717474747878777C7C7B7F7E7E8483838787878B8B8B8F8F8F9393939897979C
+      9C9CA1A0A0A6A6A6AAAAAAB0B0B0B5B5B59494947272727272727171716F6F6F
+      6C6C6C6969696666666363636262626161616060605F5F5F5F5F5F5F5F5F5E5E
+      5E5E5E5E5C5C5C5C5C5C5C5C5C5C5C5C5B5B5B5A5A5A5959595959595A5A5A5A
+      5A5A5B5B5B5C5C5C5E5E5E5F5F5F6060606060606060606060605E5E5E5C5C5C
+      5A5A5A5858585656565353535252525050505050504F4F4F4E4E4E4C4C4C4B4B
+      4B49494948484847474744444443434343434344434047443945464E354B9C1F
+      4CEF154AFF194AFE3354CD5C668E75736B75736B6F6F6E6A6A6A626262595959
+      4D4D4D4141413B3B3B3635323230281A38A90C41FF0C3FFF0C3EFF0B3EFF0A3D
+      FF093CFF093BFF083BFF073AFF033AFF1036C9302F2D33313034343434343435
+      35353535353535353535353434343333333333333333333232323030302E2E2E
+      2B2B2B282828252525222221201E150B269B002CFD002AEF002AEE002AED0029
+      EC0029EA0028EA0028E90027E70027E70026E60026E50025E30024E20024E200
+      24E10023E70923AD232323232221222222232323222222222222212121212121
+      1F1F1F1F1F1F1F1F1F1E1E1E1D1D1D1B1B1B1919191818181616161414141111
+      110F0F0F5F5F5FAFAFAFA9A9A9A3A3A39E9E9E9898979392928E8D8D88888884
+      83837E7E7E7A7A7A7676767070706D6D6D6768686363646060605B5B5B585858
+      5554544F4F4F4D4D4D4949494746464343434040403D3D3D3B3B3A3838373535
+      353332323130302F2E2E2C2B2C29292927282727272725252523232321212121
+      20211F1F1F1F1F1F1E1E1E1C1D1D1B1C1C1C1C1B1B1B1B1A1A1A1A1A1A19191A
+      191919191919191A191919191818181918181918171817171817171717161717
+      1617171717171617161616161616151616151616161615161515151515151515
+      1515151515141415141514141414141314141314131313121312131213131212
+      1212121212121212121112111112111111111111111111111111111A19191B1B
+      1B1B1B1B1B1B1B1B1B1A1A1B1B19191812121211111111111111101110111011
+      11111110111011101010101010101010100F0F100F10100F0F100F0F0F0F0F0F
+      0F0E0F0E0E0F0E0E0E0E0D0D0E0E0E0B0B0C0B0B0B0A0B0B0B0B0A0B0B0A0B0C
+      0C1A1B1B2121212424242828282A2A2A2C2C2C10101108070808080707070707
+      0607070707060707060607070606060607060606060706060606060605060605
+      0506050505050505050505050505050505050405050505050505050505050504
+      0504040405040404040404040404040403040403030404040403030303030303
+      0303030303030303030303030303020303030203080805020202303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303031313135353534
+      34343636363737373A3A3A3C3C3C3333332E2E2E2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F302F303939393B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A3B3B3A3B3A
+      3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A3939
+      3A39393A39393939393939393939393939393939393939393939393939393939
+      3939393939393939393939393839393839393839383839383839383839383833
+      33333030303030303030303030303030303030303231323A3A3A3B3B3A3B3A3A
+      3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A393A3A393A3A393A39393A39393A39393A393939393939393939
+      39393939393939393939393939393939393939393939393939393939383A3A39
+      3A39393A39393B3A3A3B3A3A3B3B3B3B3B3B3D3D3D3D3D3D3E3E3E4040404040
+      404242424444444545454747474848474A4A494C4B4B4E4D4D504F4F52515155
+      54545757575A5A5A5D5C5C5F5F5F6362626666666969696C6C6C706F6F737373
+      7777777A7A7A7E7E7E8181818585858989898E8D8D9291919696969B9B9B9F9F
+      9FA5A5A5A9A9A9AEAEAEB4B4B4A6A6A67373737373737272727171716E6E6E6A
+      6A6A6767676565656262626262626161616060605F5F5F5F5F5F5F5F5F5E5E5E
+      5E5E5E5C5C5C5C5C5C5C5C5C5B5B5B5A5A5A5A5A5A5959595959595A5A5A5B5B
+      5B5D5D5D5F5F5F6262626464646565656565656464646363636161615E5E5E5B
+      5B5B5959595656565454545151515050505050504E4E4E4D4D4D4B4B4B494949
+      464646454545424343404040413F3740414735478A244DDD1A4DFF1A4CFF1A4C
+      FF194BFF1449FF1849FE3A59C9646C8C76746B716F686666655C5C5C51515143
+      43433D3C383836301F3AA30D41FF0E40FF0E40FF0D3FFF0C3EFF0B3EFF0A3DFF
+      093CFF083CFF073BFF0D37D62130692F2F2B3131303434343434343535353535
+      353636363535353535353434343333333333333232323030302E2E2E2B2B2B29
+      2929252525222221201E180B26A1002DFD002CF0002AEF002AEE002AED0029EC
+      0029EA0028EA0028E90027E70027E70026E60026E50025E30024E20024E20024
+      E70722B62121242322202222222222222222222121212121212121212020201F
+      1F1F1F1F1F1E1E1E1D1D1D1C1C1C1919191818181616161414141111110F0F0F
+      878787ADADADA7A7A7A2A2A29D9D9D9797979291918C8C8C8787878382827E7D
+      7D7879787474747070706B6B6B6767676362635E5E5E5B5B5B57575753545450
+      4F4F4C4D4C494949464646434342403F3F3C3C3C3A3A3A373736353535323231
+      302F2F2F2E2E2D2C2C2A2A2A2727282727262525252323232221212121211F1F
+      1F1F1F1F1E1E1E1C1C1D1C1C1B1C1C1B1B1B1B1A1B1A1A1A191A1A1A1A1A1919
+      191A191919191919191919181818191818181818181817181717171717171717
+      1717161716161717161616161616161616151615161616161616151515151515
+      1515151514141415141514141414131414131413121312121312121313121212
+      12121212121212111111111112111111121111111111101111101817171C1B1B
+      1B1B1B1B1B1C1A1B1B1A1B1B1919191313121211111111111111111111101110
+      111111111010111110101010101010101010100F100F10100F0F0F0F100E0F0F
+      0E0F0F0E0E0F0E0D0E0E0D0D0C0C0B0B0B0B0B0B0B0A0B0A0A0A0C0C0C0E0D0D
+      1F1E1E2121222525252727272828281F20200808080708070707070707070707
+      0707070606070706070606070606060606060606060605050606060506050605
+      0506060506050605050505050505050505050505050505050504040405040504
+      0404040404040404040404030404040403030403030404030403030303030303
+      0303030303030303020303030202030305050502030230303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303333333535353737
+      373838383A3A3A3A3A3A2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F302F3039
+      39393B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A3B3B3A3B3A3A3B3A3A
+      3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393939393939393939383939383938383938383938383938383838383030
+      313030303030303030303030303030303030303333333B3B3A3B3B3A3B3A3A3B
+      3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A393A3A393A3A393A39393A39393A39393A39393939393939393939
+      393939393939393939393939393939393939393939393939393A3A393A3A393A
+      39393B3A3A3B3A3A3C3B3B3B3B3B3D3D3D3D3D3D3E3E3E404040404040424242
+      4343434444444747474848484A4A494B4B4A4E4D4D504F4F5251515554545756
+      565858585B5B5B5E5E5E6161616464646767676A6A6A6D6D6D71717174747478
+      78787C7C7C80807F8484838887878C8C8C9090909594949999999E9E9EA2A2A2
+      A8A8A8ADADADB2B2B2B4B4B47C7C7C7575757474747272726F6F6F6C6C6C6969
+      696666666464646363636262626161616060605F5F5F5F5F5F5F5F5F5E5E5E5E
+      5E5E5D5D5D5B5B5B5B5B5B5A5A5A5959595959595858585959595B5B5B5D5D5D
+      6161616464646767676969696A6A6A6A6A6A6969696767676464645F5F5F5C5C
+      5C5959595656565454545151515050504E4E4E4D4D4D4B4B4B47474745454543
+      434340403F3F3E3A334484234EE01D50FF1C4FFF1C4EFF1C4DFF1B4CFF1A4CFF
+      1A4BFF184AFF1347FF1A4AFB3A58C95F68886B69616160585353524645413E3D
+      37223EA60E43FF0F41FF0F40FF0E40FF0E40FF0D3FFF0C3EFF0B3EFF093EFF0C
+      39E21A2F7E2A2A2E2E2C232F2F2F313132333333343434363636363636363636
+      3636363535353535353434343333333333333131312E2E2E2C2C2C2929292626
+      26232322211E130C2695002EFF002CF1002CF0002AEF002AEE002AED0029EC00
+      29EA0028EA0028E90027E70027E70026E60026E50025E30024E20024EA0922A6
+      20201D21211F2222222222222222222222222121212121212121211F1F1F1F1F
+      1F1F1F1F1D1D1D1C1C1C1A1A1A181818151515141414111111212121A9A8A9AB
+      ABABA6A6A6A1A1A19B9B9A9695959090908A8A8A8585858181817C7B7C787777
+      7372726F6E6E6A6A6A6666666161625D5E5D5A5A5A5656565253534F4F4F4B4B
+      4C4848484545454343433F40403D3C3C3A3A3A3737373535343333323030302F
+      2E2E2C2B2B292929282827272626252525232323222222212120201F201F1F1F
+      1E1E1E1D1D1D1C1C1B1C1C1C1B1C1C1A1B1A1A1A1A1A1A1A1A1A1A1A1A191A1A
+      1919191919191919191919181818181718181818171818171717171717171617
+      1616171616161617161616161616161516151516151616151515151515151515
+      1514141414151414151414141413141413141313131313131313131213121212
+      121212121212121212111111121111111111111111111011101717171B1B1B1B
+      1B1B1C1B1B1B1B1B1B1B1B181819121212111111111111111111111110111011
+      101110101011101010101010100F10100F100F100F0F0F0F0F0F0F0F0E0F0F0E
+      0E0E0E0E0E0E0E0E0E0E0B0C0D0B0B0B0B0B0B0B0B0B0B0B0B0B0C0C1514151F
+      1F20222222252424262626252424121213070808070707070807070707070707
+      0707070607060706060607060606060606060706060606060506060606060605
+      0505060605050505050605050505050405050505050505040405050505040404
+      0404040405040404040404040403040303030303030403030403030303030303
+      0303030303030303030302030805080302023030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030323232363636373737393939
+      3B3B3B3D3D3D3030302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3939393B3B3B3B3B
+      3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A3B3B3A3B3B3A3B3A3A3B3A3A3B
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A39
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393939393938393938393938393838393838393838393838363636303030
+      3030303030303030303030303030303030303434343B3B3A3B3B3A3B3A3A3B3A
+      3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A393A3A393A3A393A39393A39393A39393A3939393939393939393939
+      3939393939393939393939393939393939393939393A3A3A3A3A393A3A393B3A
+      3A3B3A3A3C3B3B3C3B3B3C3C3C3D3D3D3E3E3E3F3F3F40404042424243434344
+      44444646464747474949494B4B4A4E4E4D4F4E4E515151545353565555595858
+      5B5B5B5D5D5D6060606363636666666969696D6D6D7070707474747777777B7B
+      7B7F7F7F8282828787868C8B8B908F8F9494949998989D9D9DA2A2A2A6A6A6AC
+      ACACB1B1B1B5B5B58F8F8F7676767676767474747272726F6F6F6A6A6A676767
+      6565656363636363636161616161616060605F5F5F5F5F5F5F5F5F5E5E5E5D5D
+      5D5C5C5C5A5A5A5959595959595858585858585757575959595C5C5B62615D66
+      65636969676D6D6D6F6F6F7070706E6E6E6C6C6C6969696565656060605B5B5B
+      5858585656565353535050504E4E4E4D4D4D4A4A4A4747474444444141413E3D
+      3B3B3C3E254DDE1D52FF1F50FF1F4FFF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A
+      4BFF194AFF1748FF1246FF1949FB3554C5525B7A5754494646462342B51044FF
+      1143FF1042FF1041FF0F40FF0E40FF0D40FF0B40FF0D3DF11832952428382926
+      1B2B2B282E2E2E30303032323234343435353536363637373736363636363636
+      36363535353535353434343333333131313030302D2D2D2A2A2A262626232323
+      211E13122370002EFC002CF2002CF1002CF0002AEF002AEE002AED0029EC0029
+      EA0028EA0028E90027E70027E70026E60026E50025E30025EF0E2287211F1420
+      201F2121212222222222222222222222222121212121212121212020201F1F1F
+      1E1E1E1C1C1C1A1A1A1818181515151414141111114D4D4DAFAFAFAAAAAAA5A5
+      A59F9F9F9A9A999494948F8F8E8A8A898484848080807B7B7B7676767272726E
+      6D6D696A696565656060605C5D5D5959595556555252524F4F4F4A4B4A484948
+      4545454242423F3F3E3C3C3C39393937373735353532323130302F2E2E2D2C2B
+      2B2A292928282827272725252423232322232220202020201F1F201F1E1F1E1D
+      1D1D1C1B1C1C1C1C1B1B1C1A1A1A1B1A1B1A1A1B1A1A1A1A1A1A1A1A1A19191A
+      1919191919191919191918181918171818171817181817171717161717161617
+      1716161616161616161616161616151516161516151515151515151515141515
+      1414141515151414141414141314141313131313131313131213131212121212
+      1212121212121112111111111111111111111111111010111716171B1C1B1C1B
+      1C1B1B1B1B1B1B1B1B1A19181913121211111111111111111011101110111110
+      1010101111101010100F100F10100F0F0F0F100F100F10100E0F0F0E0F0F0E0E
+      0E0E0E0E0E0E0E0D0E0B0C0B0B0B0B0B0B0B0B0B0B0B0C0C0B0C0B1C1C1D2020
+      202121212222222222221D1D1D07080808080707070707070707070706070707
+      0707070706070706060606070706060607060606050606060606060506050505
+      0506050605050505050505050505050505050404040505040505050404050404
+      0404040404040404030403040403040403040304030303030403030303030303
+      0303030303030302080808020203303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303636363838383939393B3B3B3D
+      3D3D3838382F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3736363B3B3B3B3B3B3B3B3B
+      3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3B3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A3939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393839393839393839383839383839383839383839383834343430303030
+      30303030303030303030303030303030303737373B3B3A3B3B3A3B3A3A3B3A3A
+      3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A393A3A393A3A393A39393A39393A39393A393939393939393939393939
+      39393939393939393939393939393939393939393A3A3A3A3A393B3B3A3B3A3A
+      3C3B3B3C3B3B3D3C3C3D3D3D3D3D3D3F3F3F4040404141414343434444444646
+      464747474949494B4B4B4D4D4C4F4F4E5150505352525555555858585B5A5A5D
+      5D5D5F5F5F6262626666666969696C6C6C7070707373737777777A7A7A7E7E7E
+      8282828585858A8A8A8E8D8D9392929797979C9B9BA0A0A0A5A5A5A9A9A9AFAF
+      AFB4B4B4A3A3A37777777777777676767474747070706D6D6D68686865656564
+      64646363636262626161616161616060606060605F5F5F5E5E5E5D5D5D5C5C5C
+      5959595858585858585757575656565656565756555A5A5A59607563646B6A6A
+      69716F6776736877756B77756D7272716D6D6D6969696565655F5F5F5B5B5B57
+      57575454545151514E4E4E4C4C4C4949494646464343433E3E3E3B3A37373941
+      234FEB2052FF2051FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A4B
+      FF194AFF1849FF1648FF1247FF1848FA2F4BB42547C71145FF1245FF1244FF11
+      43FF1042FF1041FF0E41FF0F3FFB1736AB23294329261B2A28232B2B2B2D2D2D
+      3030303333333434343535353636363636363737373737373737373636363636
+      363535353535353333333232323030302E2E2E2B2B2B28282824242421211B1A
+      2039022DEA002DF7002DF1002CF1002CF0002AEF002AEE002AED0029EC0029EA
+      0028EA0028E90027E70027E70026E50026E70025E7171F4F201E162020202121
+      212222222323232222222222222121212121212121212020201F1F1F1E1E1E1C
+      1C1C1A1A1A1818181515151313131111117D7D7DADADADA8A8A8A3A2A29D9D9D
+      9898989292928D8D8D8888888382837E7E7F7A79797575757070706C6C6C6868
+      686464646060605B5C5C5859585555555151514D4E4E4B4A4A47474844444441
+      41413E3E3E3C3B3B3A393A37363635353532323230302F2F2F2E2C2C2B2A2929
+      28272726252625252522232323222220202020201F201F201E1E1F1E1D1D1C1C
+      1C1C1C1C1B1B1B1A1A1B1B1A1B1B1A1A1A1A1A1A1A1A1A1A1A191A1A1A1A1919
+      1919191919191919191818191818191817181717181717171617171717171616
+      1717171716171516161516151616151616161516151515151515151415151515
+      1414141414141414141414131414131313121312131312131212121212121212
+      12111212121111111112111111111111111111111110101817171C1C1B1B1B1B
+      1B1B1B1A1B1B1B1A1B1817171111121112111111111110101110111111101010
+      1010101111111110101010100F0F10101010100F0F0F0F0E0F0F0E0E0F0D0E0E
+      0E0D0E0E0D0D0D0C0B0B0B0B0B0C0B0B0B0B0B0B0C0C0B111011201F20201F1F
+      1F1F1F1F1F1F1C1C1D1112110D0C0D0C0C0D0C0B0B0707080707070607070606
+      0606070606070607060606060606060606060606060506060605060605050605
+      0605050505050505050505050405040505050404050505050505040404040404
+      0404040404040404040304040404040403030303040303030303030303030303
+      0303020305080502020330303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303333333838383939393B3B3B3C3C3C3D3D
+      3D2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3131313B3B3B3B3B3B3B3B3B3B3B3B3B
+      3B3B3B3B3B3B3B3B3B3B3B3B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3B3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A393A3A393A3A393A39393A39393A39393A39393A393939393939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939383939383938383938383938383938383938383838383332333030303030
+      303030303030303030303030303030303737373B3B3A3B3B3A3B3A3A3B3A3A3B
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A393A3A393A3A393A39393A39393A39393A39393939393939393939393939
+      393939393939393939393939393939393A3A3A3A3A3A3B3B3A3B3B3A3C3B3B3C
+      3B3B3D3C3C3E3D3D3D3D3D3F3F3F404040414141424242444444454545474747
+      4949494B4B4B4C4C4C4E4E4E50504F5251515554545756565A59595C5B5B5F5F
+      5F6262626464646868686B6B6B6E6E6E7272727575757979797D7D7D80808085
+      85858989888D8D8D9191919695959A9A9A9F9F9FA3A3A3A8A8A8ADADADB2B2B2
+      B3B3B37E7E7E7979797878787676767171716F6F6F6B6B6B6767676464646363
+      636363636161616161616161616060605F5F5F5E5E5E5C5C5C5B5B5B59595957
+      575755555554545453545454535256544D455DAF3564F93A63EB4365D54B67C2
+      546AB65A6DAD6170A07676757272726D6D6D6969696464645E5E5E5959595757
+      575252524F4F4F4C4C4C4949494545454141413D3D3D39383434394A2352F721
+      52FF2152FF2051FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF
+      194AFF1849FF1749FF1648FF1247FF1347FF1546FF1446FF1345FF1244FF1143
+      FF1043FF143EE025305B2B2A202B2A232C2C2C2D2D2D2F2F2F30303032323234
+      3434363636363636373737383838383838383838373737363636363636363636
+      3535353535353333333131312F2F2F2C2C2C292929262626222221201E160B27
+      A1002EFF002DF3002DF2002CF1002CF0002AEF002AEE002AED0029EC0029EA00
+      28EA0028E90027E70027E60027F00724B31D1D1C1F1E1D202020222222222222
+      2323232323232323232323232121212121212020201F1F1F1E1E1E1C1C1C1A1A
+      1A181818151515131313202020A7A7A7ACACACA7A7A7A1A1A19B9B9B96969690
+      90908B8B8B8686868182827D7D7D7978797373737070706B6B6B666667636364
+      5F5F5F5B5B5B5858585354535050504D4D4D4949494747474343434040403D3D
+      3D3B3B3B3839393636363435343232322F2F2F2E2E2D2C2D2C29292828272727
+      26252625252322222221222020202020201F20201F1F1E1D1E1D1C1C1C1C1C1C
+      1B1B1B1A1B1A1A1B1A1A1A1A1B1A1A1A1A1A1A1A1A1A1A19191A191919191919
+      1A19191919191918181818181819181818171718171717171617171717161716
+      1616171616161616161516161516151515151515161616151515151515151415
+      1414141414141414141413141313141313131213121213121212121212121211
+      121211121112111212121111111111111111111011111717171B1C1B1B1B1C1B
+      1B1B1A1B1B1B1B1A171617111211111112111111111111111110111110101111
+      11101010101010101010100F10100F0F0F0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E
+      0D0E0E0E0B0C0B0B0B0C0B0B0B0B0B0B0C0C0C0C0B0C1B1A1B1E1E1E1F1F1F1D
+      1D1D1B1B1B1B1B1B1A1A1A191919181918181818171817171718161616131313
+      1313131313131010100F0F0F0F0F0F0F0F0F0A0A0A0A0A0A0A0A0A0809090506
+      0605050505050505050504050504050505050504040504050404040404040404
+      0404040404040404040404040403040304030304030303030304030303030203
+      0805080303033030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303131313737373939393A3A3A3C3C3C3D3D3D343434
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3838383B3B3B3B3B3B3B3B3B3B3B3B3B3B
+      3B3B3B3B3B3B3B3B3B3B3B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A39
+      3A3A393A3A393A3A393A39393A39393A39393A39393A39393939393939393939
+      3939393939393939393939393939393939393939393939393939393939393839
+      3938393938393838393838393838393838393838383838313131303030303030
+      3030303030303030303030303030303837373B3B3A3B3B3A3B3A3A3B3A3A3B3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A393A3A393A3A393A39393A39393A39393A3939393939393939393939393939
+      3939393939393939393939393A3A3A3A3A3A3B3B3B3B3B3A3B3B3A3C3B3B3D3C
+      3C3E3D3D3E3D3D3E3E3E4040404040404242424444444545454747474848484A
+      4A4A4B4B4B4E4E4E50504F5252515554545756565958585C5B5B5F5E5E616161
+      6464646666666A6A6A6D6D6D7070707474747777777B7B7B7F7F7F8383838787
+      878C8C8B9090909494949998989D9D9DA2A2A2A6A6A6ACACACB1B1B1B5B5B592
+      92927A7A7A7979797777777474747171716D6D6D6A6A6A676767646464646464
+      6262626161616161616060605E5E5E5D5D5D5B5B5B5959595757575454545252
+      5251515150504F524F47465B9F3566FF3565FF3464FF3263FF3062FF2E60FF2F
+      60FF2F60FF65729C79776F7272726D6D6D6767676262625D5D5D585858555555
+      5050504D4D4D4949494444444040403B3B3B383731313A5B2353FB2253FF2152
+      FF2152FF2051FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF19
+      4AFF1849FF1749FF1748FF1648FF1547FF1546FF1446FF1345FF1244FF1044FF
+      183ECB312F2A302F2C3031313131313232323333333535353636363737373838
+      3839393939393939393939393938383839393938383837373736363636363635
+      35353434343232323030302D2D2D2A2A2A28282824242422201B1B2034032DE0
+      002EFD002DF3002DF2002CF1002CF0002AEF002AEE002AED0029EC0029EA0028
+      EA0028E80027ED0127E4151E451F1D151F1F1F21212122222222222223232323
+      23232424242323232323232222222020202020201E1E1E1C1C1C1A1A1A171717
+      1515151212124E4E4EAFAFAFAAAAAAA5A5A59F9F9F9999999494948F8F8F8A8A
+      8A8585858080807C7B7B7876767372726E6E6E6A6A696666666162615F5E5E5A
+      5A5A5556565354544F4F504C4C4C4949494646464343434040413D3D3D3B3B3B
+      3838383635363433333131312F2F2F2E2E2E2B2C2B2929292928282726262523
+      232423232221222121202020201F1F1F1E1D1E1D1E1E1C1D1C1C1C1D1B1B1B1B
+      1B1B1B1B1B1B1B1A1B1A1B1B1B1A1A1A1B1A1A1A1A191A1A1A1A1A191A191919
+      1919191919181918181918171818181818171817171717171717171717161617
+      1616161616161616161515151516151615151515161515151514141515141414
+      1515151415141414141313141314131213121212131213131212121211121212
+      1211111212111111111111121111111010111110101717161B1C1B1B1B1B1B1B
+      1B1B1B1B1A1B1B15151511111211111111111111111110111111111110111010
+      1110101010101010100F100F1010100F0F100E0F0F0F0E0E0E0E0E0E0E0D0E0E
+      0D0D0E0B0C0C0C0B0B0B0B0B0B0B0B0C0B0C0E0E0D1C1D1C1D1D1C1C1C1C1B1B
+      1B1B1B1B1A1A1A1A1A1A19181918181819181818181818181818181818181818
+      1818181818181818181818181818181818171717171717171717171717171717
+      1717171414141312131414140E0E0E0505040405040404040504040405040404
+      0404040403040304030404040304030303030303030303030303030308080802
+      0303303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303535353838383A3A3A3B3B3B3D3D3D3C3C3C2E2E2E2F
+      2F2F2F2F2F2F2F2F2F2F2F3232323B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B
+      3B3B3B3B3B3B3B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A
+      3A393A3A393A39393A39393A39393A39393A3939393939393939393939393939
+      3939393939393939393939393939393939393939393939393939383939383939
+      3839383839383839383839383839383838383837373730303030303030303030
+      30303030303030303030303131313939393B3B3A3B3B3A3B3A3A3B3A3A3B3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      393A3A393A3A393A39393A39393A39393A393939393939393939393939393939
+      39393939393939393A3A3A3A3A3A3B3B3B3B3B3B3B3B3A3C3C3B3D3C3C3E3D3D
+      3E3D3D3F3E3E4040404040404242424343434444444747474747474949494B4B
+      4B4E4E4E4F4F4F5151515454535655555858585C5B5B5E5D5D605F5F62626266
+      66666969696C6C6C7070707373737777777B7B7B7E7E7E8282828686868A8A8A
+      8E8E8D9393929797979C9B9BA1A0A0A5A5A5A9A9A9AEAEAEB4B4B4A6A6A67B7B
+      7B7B7B7B7979797777777272726E6E6E6B6B6B68686865656564646463636362
+      62626161616060605E5E5E5D5D5D5A5A5A5757575555555252524F4F4F4D4D4D
+      4E4B4146568C3767FD3667FF3666FF3665FF3564FF3464FF3363FF3261FF2E5F
+      FF4467DB7A79767675747070706B6B6B6666666060605B5B5B5656565151514D
+      4D4D4949494444443F3F3F3A3A3A36342D2F3C6D2455FF2354FF2253FF2152FF
+      2152FF2051FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF194A
+      FF1849FF1749FF1748FF1648FF1547FF1546FF1446FF1345FF1144FF1542EC34
+      363F3736323737373737373838383838383939393A3A3A3B3B3B3B3B3B3B3B3B
+      3C3C3C3B3B3B3B3B3B3A3A3A3939393939393838383737373636363636363434
+      343333333131312F2F2F2C2C2C292929262626232323211F16172254022EEC00
+      2EFE002DF3002DF1002CF1002CF0002AEF002AEE002AED0029EC0029EA0028F0
+      0028F110206D1D1B101E1D1E2020202121212222222424242424242323232424
+      242424242323232222222020201F1F1F1E1E1E1C1C1C19191917171714141412
+      1212848584AEAEAEA8A8A8A3A3A39D9D9D9898979392938E8D8E888888838383
+      7F7E7F7A7A7A7776767270716E6D6D6969696565656160615C5C5C5959595656
+      565252524E4E4E4B4B4C4949494545454242423F3F403C3C3C3A3A3A38383836
+      36363333323030302F2F2F2D2D2D2B2B2B292A29282928272726252424242223
+      2321212121202020201F1F201E1E1E1E1E1E1D1C1C1D1C1C1B1C1B1B1B1B1A1B
+      1B1A1B1B1B1A1A1A1B1A1A1B1A1A1A1A1A1A191919191A1A1A1A191A19191919
+      1919191919191818181817181817181717181717171716171717161716171616
+      1616161616161616161615161616151615151515151515151415151515141514
+      1414151414141514131413131313121312131312121212121212121212121211
+      11121211121111121111111111111010111011101919191C1B1B1B1B1B1B1B1B
+      1A1A1B1A1A191314131211111111111111111111111010111011111111101110
+      111010100F10100F1010100F0F0F0F0F0F0E0E0F0E0F0E0E0E0E0E0E0D0D0D0B
+      0B0D0B0C0B0B0C0B0B0B0B0C0C0C0C0C0C1717171C1B1C1C1C1B1B1B1C1B1B1C
+      1A1A1A1A191A1A191A1A191A1919191819181918191818181818181818181818
+      1818181818181818181818181818181818181718181818181817181817171719
+      18181918181919191B1B1B050505040405050504040405040405040404040404
+      0404030403030403040403040304040303040403030303030808080303033030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303131313838383939393A3A3A3C3C3C3E3E3E3333332F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F3838383B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B
+      3B3B3B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A
+      393A39393A39393A39393A39393A39393A393939393939393939393939393939
+      3939393939393939393939393939393939393939393939393938393938393838
+      3938383938383938383938383938383838383737373030303030303030303030
+      303030303030303030303131313939393B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A39
+      3A3A393A3A393A39393A39393A39393A39393939393939393939393939393939
+      393939393A3A3A3A3A3A3A3A3A3B3B3B3B3B3B3C3C3B3C3C3B3E3D3D3E3D3D3F
+      3E3E4140404040404242424343434444444646464747474949494B4B4B4D4D4D
+      4E4E4E5151515353525555555857575B5A5A5D5C5C605F5F6262626565656868
+      686B6B6B6E6E6E7272727575757979797D7D7D8181818585858989898D8D8D91
+      91919696959A99999E9E9EA4A3A3A8A8A8ADADADB2B2B2B6B6B68787877C7C7C
+      7B7B7B7979797575757070706C6C6C6969696767676565656363636363636161
+      615F5F5F5E5E5E5C5C5C5959595555555151514E4E4E4B4B4B4A473F45517939
+      68FA3868FF3867FF3767FF3666FF3665FF3564FF3464FF3363FF3262FF3061FE
+      66739D7B79717374746F6F6F6969696565656060605959595353534E4E4E4949
+      494545453F3F3F3A3A3A37342A2D40822456FF2455FF2354FF2253FF2152FF21
+      52FF2051FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF194AFF
+      1849FF1749FF1748FF1648FF1547FF1546FF1446FF1245FF1343FC343C5E3C3B
+      353C3C3C3D3D3D3E3E3E3F3F3F3F3F3F40404042424241414142424241414140
+      40403E3E3E3D3D3D3B3B3B3A3A3A393939383838363636363636353535343434
+      3333333131312E2E2E2B2B2B282828252525222222221F13172254042CDD002E
+      FF002DF8002DF3002CF1002CF0002AEF002AEF002AF1002AF90228DF1120681C
+      1B131E1D1C1F1F1F202020222222242424242424252525252525242424242424
+      2424242222222121211F1F1F1D1D1D1B1B1B1919191616161313132D2D2DADAD
+      ADACACACA6A6A6A1A0A09B9B9B9595959090908C8B8B8687868382827E7E7D79
+      79797574747170706C6B6B6867666463645F5F5F5B5C5B585858545454515151
+      4E4E4E4A4B4A4848484444444242423E3F3E3C3C3C3939393737373636363333
+      333131312F2F2F2D2D2D2B2B2B2A2A2A29282827272726252424232323222221
+      20202020201F1F1F1E1E1E1D1D1D1C1D1D1D1D1C1C1B1B1C1B1B1B1C1B1A1A1A
+      1B1A191A19191A191A19191A1919191918191A191819191919191A1919191919
+      1919191918181819181719181718171718171717171717161717161617161616
+      1616161616161616161516151615151515151516151515151415141514151415
+      1514151414141413131313141313131212121212121213131212121212121112
+      1111111111111111111211111111111111111119191A1B1B1B1B1B1B1B1B1B1B
+      1B1B191918121112111211111111111111111111111111111111111110101110
+      101010101010100F0F0F0F0F100E0F0F0F0E0E0E0E0E0E0E0E0E0E0D0E0E0C0C
+      0B0B0B0B0B0C0C0B0C0B0A0B0B0D0D0D1B1C1B1C1B1B1B1B1B1B1B1B1A1A1B1A
+      1A1A1A1A1A1A191A191A1A191A19191919191919191919191919191919191919
+      1919191919191818181818181818181817181817181818181819181919181A19
+      1A1D1D1D2323230B0B0B05050505040405040404040404050404040404040404
+      0404030404040303040303030304030403040303080808030303303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303636363939393A3A3A3B3B3B3D3D3D3B3B3B2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F3333333B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B
+      3B3B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A39
+      3A39393A39393A39393A39393A39393939393939393939393939393939393939
+      3939393939393939393939393939393939393939393839393839393839383839
+      3838393838393838393838383838383838363635303030303030303030303030
+      3030303030303030303131313939393B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A
+      3A393A3A393A39393A39393A39393A3939393939393939393939393939393939
+      3A3A3A3A3A3A3A3A3A3B3B3B3B3B3B3C3C3C3C3C3B3D3D3C3E3D3D3E3D3D403F
+      3F4140404141414242424444444545454747474949494B4B4B4C4C4C4E4E4E50
+      50505252525555545757565958585C5B5B5F5E5E6261616564646666666A6A6A
+      6D6D6D7070707474747777777B7B7B7F7F7F8383838787878C8C8C9090909494
+      949898989D9C9CA1A1A1A7A6A6ABABABB0B0B0B5B5B59D9D9D7E7E7E7D7D7D7A
+      7A7A7777777373736F6F6F6C6C6C686868666666656565636363626262606060
+      5E5E5E5B5B5B5757575353534E4E4E4B4A4B48453E434D683B68F23A6AFF3A68
+      FF3968FF3867FF3767FF3666FF3665FF3564FF3464FF3463FF2F60FF4467DD79
+      79777776757272726D6D6D6969696464645E5E5E5656564F4F4F4B4B4B464646
+      4040403B3B3B3734282D43922458FF2455FF2455FF2354FF2253FF2152FF2152
+      FF2051FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF194AFF18
+      49FF1749FF1748FF1648FF1547FF1546FF1446FF1145FF2F4185454136444545
+      4848484B4B4B4C4C4C4C4C4C4C4C4C4C4C4C4B4B4B4949494747474545454242
+      424040403D3D3D3B3B3B39393939393938383836363636363635353534343432
+      32323030302D2D2D2B2B2B282828252525222222211F161C1F300E2795032CE2
+      002DF8002DFF002DFF002DFE002BF50229E00A249D171D391E1B111E1E1D1F20
+      2021212123232324242424242425252525252526262625252525252524242423
+      23232121211F1F1F1D1D1D1B1B1B181818161616131313686868B0B0B0AAAAA9
+      A4A4A49E9E9E9999999393938E8E8E8A8A8A8685858181817C7C7B7778777373
+      736F6F6F6A6A6A6766666362625F5F5F5B5A5B5757565454545050504D4D4C49
+      4A4A4746474343434141413D3E3E3C3C3B3838393636363535353333332F3030
+      2E2E2E2D2D2D2A2A2A2929292828272727262524242424232221212120202120
+      2020201F1F1F1E1D1D1D1D1D1D1D1C1C1A1B1B1B1B1A1A1A1B1A1A1A1A1A1A1A
+      1A19191A1A191A19191919191818171818181818171818181718181818181817
+      1818171818181918181918181817171817171717171717161617161717161616
+      1716161616151616151616151516161515151515151515151415151514141414
+      1414141414141314141314131213131312121212121212121212111212111112
+      1112111112111211111110111111101213131A1A1A1B1C1B1B1B1C1B1A1B1B1B
+      1B17161712111111111111121111111111111111101110101010111010101010
+      101010100F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0F0E0E0E0D0D0D0C0C0C
+      0C0B0C0B0B0B0B0B0B0B0B0B1111121313141313141616161817171817171717
+      171A1A1A1A1A1A1A191A191A1A1A191A19191919191919191919191919191919
+      191919191919191919191919191819191919191919191919191A1C1C1C202020
+      2726261A1A1A0504050505040405040405040404040404040405040404040404
+      0404040404030404040403030303030408080A03030330303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303232323838383939393B3B3B3C3C3C3E3E3E3232322F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F3A39393B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A
+      3B3B3A3B3A3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A
+      39393A39393A39393A3939393939393939393939393939393939393939393939
+      3939393939393939393939393939393939393939383939383938383938383938
+      3839383839383838383838383838383835353530303030303030303030303030
+      30303030303030303030303737373B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A
+      393A3A393A39393A39393A39393A39393939393939393939393939393A3A3A3A
+      3A3A3A3A3A3B3B3B3B3B3B3C3C3C3C3C3C3D3D3C3E3E3D3E3D3D403F3F414040
+      4241414242424444444545454747474848484A4A4A4B4B4B4E4E4E5050505252
+      525555555757565959585C5B5B5E5D5D6160606463636766666969696C6C6C70
+      70707373737777777A7A7A7E7E7E8282828585858989898E8E8E939393979797
+      9B9B9BA09F9FA4A4A4AAA9A9AFAEAEB3B3B3B1B1B18282827E7E7E7D7D7D7A7A
+      7A7575757171716E6E6E6969696767676565656464646262625F5F5F5D5D5D59
+      59595555555050504B4B4B47453E42495C3D66E83B6CFF3B69FF3A69FF3A69FF
+      3968FF3867FF3767FF3666FF3665FF3564FF3464FF3362FF3061FF6272A57D7A
+      727676767373736E6E6E6969696363635B5B5B5252524D4D4D4848484242423D
+      3D3C38352C2D48A42559FF2556FF2455FF2455FF2354FF2253FF2152FF2152FF
+      2051FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF194AFF1849
+      FF1749FF1748FF1648FF1547FF1546FF1045FF2B47AF4F4D4251515054545457
+      57575858585757575656565555555353535151514D4D4D4A4A4A464646434343
+      4040403D3D3D3A3A3A3939393939393838383737373535353535353333333131
+      312F2F2F2C2C2C2A2A2A27272725252524242421201B201E151B1F2E14225F0F
+      25830E24890E2484122164191D321D1C141E1D161F1F1F212121222222232323
+      2424242525252525252626262626262626262626262525252424242323232121
+      211F1F1F1D1D1D1A1A1A1818181515151C1C1C9E9E9EADADADA8A8A8A2A1A29C
+      9C9C9797969292928E8E8E8888888384837F7E7E7B7A7A7676757172716E6D6C
+      6969696565656261615E5D5D5959595757575353534F4F4F4C4C4C4949494746
+      464344434141413E3E3E3B3C3C3839393636363434343232323030302F2F2F2D
+      2D2C2B2A2A2929292828282626262525242425242222212020202020201F2020
+      1F1E1E1D1D1C1D1C1D1C1C1C1B1A1B1B1A1A1A1A1B1A1B1A1A1A1A1A1A1A1A19
+      1A1A191919191919191919181817181818181818171818171717171717171717
+      1717171717181718191818191717181717171616171617161716161716161616
+      1615151516151515151615151515161515151515151514151415141414151414
+      1514141414131414131413131312121212121212121212121211121111111111
+      11111111111112111111111010111415151B1B1B1C1B1B1C1B1B1B1B1B1B1B1B
+      1414141112121112111111111111111111111110111011101111101110101010
+      10100F0F100E0F0F0E0F0F0E0E0E0E0E0E0E0F0E0E0E0E0E0E0C0C0B0B0C0C0B
+      0C0B0B0B0B0C0B0B0B0B0B0B0B0B0A0B0A0B0A0B0B0B0B0A0A0A0A0A0A0A0A0A
+      0A0A090A0A090C0B0C0E0E0E0E0D0E0D0D0E1111111212121111121112111616
+      151515151515151616161919191919181A1A191B1B1A1E1E1E24242528292828
+      2828050505050505050505040505050404040404040405040404040404040403
+      0304040403040303040403030808080304033030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3636363939393A3A3A3C3C3C3D3D3D3B3B3B2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F3333333B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A3B3B3A3B
+      3A3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39
+      393A39393A39393A393939393939393939393939393939393939393939393939
+      3939393939393939393939393939393938393938393938393838393838393838
+      3938383938383838383838383838383535353030303030303030303030303030
+      303030303030303030303737373B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A39
+      3A3A393A39393A39393A39393A39393939393939393939393A3A3A3A3A3A3A3A
+      3A3B3B3B3B3B3B3C3C3C3C3C3C3D3D3D3E3E3D3E3E3D3F3E3E41404041404043
+      42424343434444444646464747474949494B4B4B4D4D4D4F4F4F515151535353
+      5555555858575B5B5A5D5C5C605F5F6262626665656968686B6B6B6E6E6E7272
+      727575757979797C7C7C8080808585858989898C8C8C9090909595959A9A999E
+      9E9EA3A2A2A8A7A7ACACACB1B1B1B5B5B59696968080807F7F7F7D7D7D787878
+      7474746F6F6F6C6C6C6868686666666565656262625F5F5F5C5C5C5858585353
+      534E4E4E4847414347523E65DC3D6EFF3C6BFF3B6BFF3B6AFF3A69FF3A69FF39
+      68FF3867FF3767FF3666FF3665FF3564FF3464FF3061FF4267E37B7B7B7B7A78
+      7777777373736E6E6E6868686060605656564E4E4E4949494444443E3E3D3939
+      332D4CB82659FF2657FF2556FF2455FF2455FF2354FF2253FF2152FF2152FF20
+      51FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF194AFF1849FF
+      1749FF1748FF1648FF1547FF1345FF2048DD5555585B5A585D5D5D6060606161
+      616060605F5F5F5C5C5C5A5A5A5656565353534F4F4F4A4A4A47474743434340
+      40403D3D3D3A3A3A393939383838373737373737353535343434333333313131
+      2F2F2F2D2D2D2A2A2A28282826262624242422222121211D211F15201D10201D
+      0F201D0F201E131F1F1A1F1F1E20202022222222222224242424242425252526
+      26262727272626262727272727272626262525252424242323232121211F1F1F
+      1D1D1D1A1A1A171717141414515151B0B0B0ABABABA5A5A59F9F9F9A9A9A9695
+      959090908B8B8B8787878282827E7E7E7A79797474746F706F6D6D6C68686864
+      6464605F5F5D5C5C5959595554555251514E4E4E4B4B4B484848454444424242
+      3F3F3F3D3D3D3B3B3B3838383636363334333131312F30302E2E2E2C2B2C2A2A
+      2A2929292828282626262525242223222121222020202020202020201E1F1F1D
+      1D1D1D1C1D1D1C1C1B1B1B1B1A1B1A1A1B1A1B1A1A1A1A1A1B1A1A1A1A1A1A19
+      1A1A1A19191A1919191918181818181718171717171817171717181717171716
+      1617161717161717161717171718171717161717161717171716171616161716
+      1616151616161616161515151515151515151515141514141515151414141414
+      1414141413141313141312131212121312121212121212121212121211121112
+      111112121111111110101011111718181C1B1A1B1B1B1B1C1B1B1B1B1A1A1A13
+      1112111111111111111211111111101111111010111110101010101010100F10
+      100F0F100F0F0F0F0F0E0E0F0F0E0F0E0E0F0E0E0E0D0D0C0C0C0C0C0C0C0B0B
+      0B0B0B0B0C0B0B0B0B0B0A0B0B0B0A0A0B0B0A0B0A0A0A0A0A0A0B0A0A0A0A09
+      090A0A0A0A0A0A090A09090909090A090A090909080909090909090908080908
+      0809080809080808080808080808091E1D1E2122212626272B2A2B2F2F300D0D
+      0D05050505040505040504040505040405050404050404040404040404040403
+      0404030404040303080A0A030403303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303033333338
+      38383A3A3A3B3B3B3D3D3D3E3E3E3232322F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      3838383B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A3B3B3A3B3A
+      3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A3939
+      3A39393A39393939393939393939393939393939393939393939393939393939
+      3939393939393939393939393839393839393839383839383839383839383839
+      3838383838383838383838383838353535303030303030303030303030303030
+      3030303030303030303535353B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A
+      3A393A39393A39393A39393A39393939393939393A3A3A3A3A3A3A3A3A3B3B3B
+      3B3B3B3B3B3B3C3C3C3D3D3D3E3E3E3E3E3D3F3F3E4140404140404342424443
+      434444444646464747474949494B4B4B4C4C4C4E4E4E50505052525255555557
+      57575959585C5C5B5F5E5E6261616564646766666A69696D6D6D707070747474
+      7777777B7B7B7E7E7E8282828787878B8B8B8F8F8F9393939797979C9C9BA1A1
+      A0A5A5A5AAA9A9AFAEAEB3B3B3ACACAC8282828181817F7F7F7B7B7B77777772
+      72726E6E6E6A6A6A6868686565656262625F5F5F5B5B5B5757575151514B4B48
+      4549544063CF3E70FF3E6DFF3E6CFF3C6CFF3B6BFF3B6AFF3A69FF3A69FF3968
+      FF3867FF3767FF3666FF3665FF3564FF3463FF3162FF6372A67F7C747A7A7A76
+      76767272726B6B6B6262625959595151514A4A4A45454540403E3C3B3B2D50CB
+      2759FF2758FF2657FF2556FF2455FF2455FF2354FF2253FF2152FF2152FF2051
+      FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF194AFF1849FF17
+      49FF1748FF1648FF1447FF1647FB51587366625367655E696762696864686764
+      66656364636160605E5C5B5A5858585353534F4F4F4A4A4A4545454242423E3E
+      3E3C3C3C3A3A3A3939393838383838383636363535353434343333333232322F
+      2F2F2D2D2D2B2B2B292929272727262626242424232323222222222222212121
+      2121212222222222222323232424242525252626262727272727272828282828
+      282828282727272727272727272626262424242323232121211F1F1F1C1C1C19
+      1919161616161616909090ADADADA8A8A8A2A2A29D9D9D9898989392938E8E8D
+      898A898585858181817C7C7C777777737373706F6F6B6B6A686867636362605F
+      5F5B5A5A5857575554545150504E4D4D4A4A4A4747474444444242423F3E3F3C
+      3C3C3A3A3A3637373636363434333030303030302E2E2D2B2C2B2A2A2B292929
+      2828282625252424232323222222212020202120202020201F1E1F1D1E1E1D1D
+      1D1E1C1C1C1B1B1B1B1B1B1C1B1C1C1C1B1B1C1B1B1B1C1B1B1A1A1A1B1A1A1A
+      1A1A191919191919191818171818181817171717171717171817171717171717
+      1616171615171616171616171717171717171717171617171716171616161615
+      1616151515151615161515161515151515151515151515141514141415141414
+      1414141314141314131313121212121212121212121212121112121212121112
+      1111111111111111101211111A19191C1B1A1B1B1B1B1B1B1B1B1B1616161112
+      11121112111112111111111111111011111110101010101010101010100F0F10
+      0F0F0F0F0F0F0F0F0E0E0E0E0F0E0E0E0E0E0E0E0B0C0C0C0B0B0C0B0C0B0C0B
+      0B0B0C0B0B0B0B0B0B0A0B0B0A0A0B0A0B0A0A0B0B0A0B0A0A0A0A0A0A0A0A0A
+      0A0A0A090A0909090A0909090909090909090909090809090909080909080908
+      08080808080808080909091919192323232727272A2B2A2F302F1D1D1D050506
+      0505050505050405050405040404050405040405040404040404040304040404
+      040303040A0A0803030430303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303737373939
+      393A3A3A3C3C3C3D3D3D3B3B3B2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3232323B
+      3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A3B3B3A3B3A3A3B3A3A
+      3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393939393939393939383939383938383938383938383938383938383838
+      3838383838383838383838383835353530303030303030303030303030303030
+      30303030303030303434343A3A3A3B3B3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A
+      393A39393A39393A39393A39393939393939393A3A3A3A3A3A3B3B3B3B3B3B3B
+      3B3B3C3C3C3C3C3C3E3E3E3E3E3E3F3F3E40403F414040424141434242454444
+      4545454747474848484A4A4A4B4B4B4E4E4E5050505252525555555757575959
+      595C5C5B5E5E5D605F5F6362626666666969696D6C6C6F6F6F72727276767679
+      79797E7E7E8181818585858989898D8D8D9191919696969A9A9A9E9E9EA3A3A2
+      A8A7A7ACACACB1B1B1B6B5B59595958383838181817D7D7D7A7A7A7575757171
+      716D6D6D6969696666666363636060605B5B5B5656565151514A484043538340
+      72FF3F6FFF3F6EFF3E6DFF3E6CFF3C6CFF3B6BFF3B6AFF3A69FF3A69FF3968FF
+      3867FF3767FF3666FF3665FF3564FF3162FF4368E27A7B7A7C7B797878787474
+      746E6E6E6666665C5C5C5352524E4D4C4847454441383F3E392C54DE2859FF28
+      58FF2758FF2657FF2556FF2455FF2455FF2354FF2253FF2152FF2152FF2051FF
+      1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF194AFF1849FF1749
+      FF1748FF1648FF1346FF3350BC4E5B89535E885A628161657763667064666C63
+      6469626262605F5C5B5B5A5656565151514C4C4C4747474242423F3F3F3D3D3D
+      3A3A3A3A3A3A3838383838383838383636363535353434343333333131312F2F
+      2F2E2E2E2D2D2D2A2A2A29292928282826262625252525252525252525252525
+      2525262626262626262626282828282828282828292929292929292929292929
+      2929292828282727272626262424242323232020201E1E1E1C1C1C1919191616
+      16494949B0B0B0ABABABA5A5A4A09FA09A9A9A9595959090908C8C8C87878883
+      83847F7F7F797A797576767272726D6D6D6969696565646262615E5E5D5B5959
+      5756565353534F4F4E4D4D4C4A49494747474443444241423E3F3E3D3C3C3939
+      39363636353535323232303130302F2F2D2D2D2B2B2A292A2A29292827262625
+      25252424242323232120212020212020201F1F1F1F1F1F1E1E1D1E1E1E1D1E1E
+      1D1D1D1E1E1D1E1D1D1E1D1D1D1C1D1D1C1C1D1D1C1D1C1C1D1C1C1C1C1B1C1B
+      1C1B1C1C1C1B1B1A1A1A19191919191818171717181717171717171717171617
+      1716161516151516161516161616161717171716161616161617161616161616
+      1615151616151616151515161515151415151514151415141514141414141414
+      1414131414131413121313121212131312121211121112121212111112121211
+      12121111111111111313131C1B1B1B1B1A1B1B1B1B1B1B1B1B1B131213111111
+      121112111112111111111111111111101111101110111010100F0F100F0F0F0F
+      0F0F0F0E0E0F0F0F0F0E0E0E0E0E0E0E0D0D0D0B0C0C0C0C0C0C0B0B0B0B0C0B
+      0B0B0C0B0B0B0B0B0B0B0B0A0B0A0A0A0A0A0B0B0B0A0A0A0A0B0A0A0A090A0A
+      09090A0A0A09090A0A090A0A0A09090909090809080909090809090809080809
+      090908080909091313132121212526262A2A2A2F2E2E2B2B2C05050505050504
+      0505050405050505040404050404040404040404040404040404040403040404
+      0A080A0403043030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030303030303333333939393A3A3A
+      3B3B3B3D3D3D3E3E3E3232322F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3838383B3B
+      3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A3B3B3A3B3B3A3B3A3A3B3A3A3B
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A39
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393939393938393938393938393838393838393838393838393838383838
+      3838383838383838383838383535353030303030303030303030303030303030
+      303030303030303232323939393B3B3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A39
+      3A39393A39393A39393A39393939393A3A3A3A3A3A3A3A3A3B3B3B3B3B3B3C3C
+      3C3C3C3C3D3D3D3E3E3E3E3E3E40403F41414041404043424245444445444447
+      47474747474949494B4B4B4E4E4E4F4F4F5151515353535555555858585A5A5A
+      5D5D5C5F5F5F6262626564646867676C6B6B6E6D6D7171717474747878787B7B
+      7B7F7F7F8383838787878C8C8C9090909393939898989D9D9DA1A1A1A5A5A5AA
+      A9A9AFAEAEB3B3B3ADADAD8585858484848181817D7D7D7878787474746F6F6F
+      6B6B6B6767676464646060605C5C5C5656565151514A49484343444062CB4072
+      FF406EFF3F6EFF3E6DFF3E6CFF3C6CFF3B6BFF3B6AFF3A69FF3A69FF3968FF38
+      67FF3767FF3666FF3665FF3464FF3162FF6373A57E7B727A797877767471706D
+      6A6964615F5657544A504F4C494A513F4A6E354EA22A59F7295AFF2958FF2858
+      FF2758FF2657FF2556FF2455FF2455FF2354FF2253FF2152FF2152FF2051FF1F
+      50FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF194AFF1849FF1749FF
+      1748FF1547FF1447FF1446FF1546FD1546FA1645F71745F51D48E81F48E32449
+      D6314EB95A5A5A5656545151514C4C4C4747474343434040403D3D3D3C3C3C3A
+      3A3A393939383838383838373737363636353535343434333333323232313131
+      2F2F2F2E2E2E2C2C2C2A2A2A2A2A2A2929292828282828282828282929292828
+      282929292929292A2A2A2A2A2A2A2A2A2A2A2A2929292A2A2A2A2A2A29292928
+      28282727272626262424242222222020201D1D1D1A1A1A181818181818909090
+      ADADADA8A8A7A2A2A29D9D9D9999999393938F8F8E8A8A8A8686868181817C7C
+      7C7878787373747070706C6C6C68686864646460605F5D5D5D59595855545453
+      52524F4E4E4C4C4C4848484645454242424040403E3E3E3C3C3B3A393A363636
+      3434343132323130312E2E2E2E2D2D2B2B2B2929292928282826262524252424
+      2422222220202121202020212121202020201F20202020201F1F1E1D1E1E1E1E
+      1E1D1E1E1D1E1D1D1E1D1D1D1C1C1D1D1C1D1C1C1D1C1C1D1C1B1C1C1C1C1B1B
+      1B1C1C1B1B1B1B1B1B1A1A1B1B1A1A19191A1817181717171717161717171716
+      1716161615161615151516151616171717161617161616161616161616161616
+      1516161615161516151515151515141515151515141514151514141414141414
+      1413141413141313131312121212121212121212121111121112121211111211
+      111111111111111817171C1A1A1C1B1A1B1B1B1B1B1C19191812121212121111
+      1111111211111111111111111111111111101010101010100F0F100F0F0F0F0E
+      0E0F0F0E0E0F0E0E0E0E0E0F0E0E0E0D0D0C0D0C0D0C0C0C0B0C0D0B0B0C0C0B
+      0C0B0B0C0B0B0B0B0B0A0A0B0B0A0B0B0A0B0B0A0A0B0A0A0A0A0A0A090A0A0A
+      090A0A09090A0909090A09090909090909080909080808090909080909090909
+      090A090D0C0C2020202525252928282D2E2D3031300B0B0B0505050505050504
+      04040505050505040405050504050404050404040404040404040404080A0A04
+      0404303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303030303737373939393A3A3A3C
+      3C3C3D3D3D3B3B3B2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3131313B3B3B3B3B3B
+      3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3B3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A3939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393839393839393839383839383839383839383839383838383838383838
+      3838383838383838383838353535303030303030303030303030303030303030
+      3030303030303131313837373B3B3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A
+      39393A39393A39393A39393A3A3A3A3A3A3A3A3A3B3B3B3B3B3B3C3C3C3C3C3C
+      3D3D3D3E3E3E3E3E3E3F3F3F4141404141404342424443434544444746464747
+      474949494B4B4B4C4C4C4E4E4E5050505252525555555757575959595C5C5C5F
+      5F5E6161606463636766666969696D6D6D7070707373737777777A7A7A7E7E7E
+      8282828585858989898E8E8E9292929797979A9A9A9F9F9FA4A4A3A8A8A8ACAC
+      ACB1B1B1B6B5B59696968585858383838080807B7B7B7676767272726D6D6D69
+      69696565656161615D5D5D5757575151514A4B4B44423D3E455A406DF24071FF
+      406EFF3F6EFF3E6DFF3E6CFF3C6CFF3B6BFF3B6AFF3A69FF3A69FF3968FF3867
+      FF3767FF3666FF3665FF3263FF4368E27878787878757374786C6F795F678550
+      6096425BAD3959C6315BEA2C5CFE2A5CFF2A5BFF2A5AFF2959FF2958FF2858FF
+      2758FF2657FF2556FF2455FF2455FF2354FF2253FF2152FF2152FF2051FF1F50
+      FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF194AFF1849FF1749FF17
+      48FF1547FF1447FF1446FF1345FF1144FF1043FF0F42FF0D41FF0C3FFF0C3FFF
+      42508757544A4F4F4F4B4B4B4848484343434040403D3D3D3C3C3C3B3B3B3A3A
+      3A38383838383838383838383836363635353534343434343433333331313130
+      30302F2F2F2E2E2E2D2D2D2C2C2C2B2B2B2B2B2B2B2B2B2A2A2A2B2B2B2B2B2B
+      2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2B2B2B2B2B2B2A2A2A2A2A2A2828282727
+      272626262424242222221F1F1F1D1D1D1A1A1A171717484848B0B0B0ABABABA5
+      A5A5A1A0A19B9B9B9696969191918E8E8E89898985858580807F7B7B7B777777
+      7272726E6E6E6B6B6A6767666363635F5F5F5B5A5A5858585554545150504E4E
+      4E4B4A494847474544444242423F3F3F3D3D3D3B3B3B38373836363634343431
+      32323030302E2E2F2C2C2C2B2B2B292929292828262625262425242323222223
+      22222222222223222221222121202021202020201F1F1F1E1F1E1E1E1E1D1F1E
+      1D1E1D1D1E1D1D1D1D1D1D1D1D1D1C1D1D1C1C1D1C1C1C1C1C1C1C1C1B1C1C1B
+      1B1B1B1B1B1B1B1B1B1A1B1A1A1B1A1B1A191A19181818171617171617171717
+      1615161515161515151515151616161716161616161616161616161516161616
+      1616161515161615161515151515151514151515151415141514151414141414
+      1314141314131313131212121212121212111212121211111211121111111111
+      1111111211121B1B1B1B1B1A1C1B1A1C1B1B1B1B1B1414141212111212121112
+      1112111111111110101111101110101111101010100F100F0F0F0F0F0F0F0E0F
+      0E0F0F0F0E0E0F0E0F0F0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0C0D0B0C0C0B0C0C0C0B0C0B0B0B0B0C0C0B0B0B0A0B0B0A0A
+      0A0A0A0A090A0A09090A0909090909090908090909090809080808080808080A
+      0A0A1B1B1B2322232828282C2C2D303030181818050505050605050505050505
+      0505050505050405040405040504040405040404040304040A0A0A0304043030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303333333939393A3A3A3B3B3B3D3D
+      3D3E3E3E3232322F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3736363B3B3B3B3B3B3B
+      3B3B3B3B3B3B3B3B3B3B3B3B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3B3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A393A3A393A3A393A39393A39393A39393A39393A393939393939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939383939383938383938383938383938383938383838383838383838383838
+      3838383838383838383837363630303030303030303030303030303030303030
+      30303030303030303535353B3B3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A39
+      393A39393A39393B3A3A3A3A3A3A3A3A3B3B3B3B3B3B3C3C3C3C3C3C3D3D3D3E
+      3E3E3E3E3E3F3F3F414141414140424241434242454444464545484747484848
+      4A4A4A4B4B4B4E4E4E5050505151515454545656565858585B5B5B5E5E5E6060
+      5F6262626665656968686C6B6B6F6E6E7372727575757979797C7C7C80808084
+      84848888888C8C8C9090909494949999999D9D9DA1A1A1A6A6A6AAAAA9AFAEAE
+      B3B3B3ADADAD8787878686868383837F7F7F7979797575757171716B6B6B6767
+      676262625E5E5E5959595353534C4C4C4545453F3C333D4F854171FF4070FF40
+      6FFF3F6EFF3E6DFF3E6CFF3C6CFF3B6BFF3B6AFF3A69FF3A69FF3968FF3867FF
+      3767FF3666FF3665FF3464FF4769D84768D73D65E73662F63261FC2E60FF2C60
+      FF2D5FFF2D5EFF2D5DFF2D5CFF2B5BFF2A5BFF2A5AFF2959FF2958FF2858FF27
+      58FF2657FF2556FF2455FF2455FF2354FF2253FF2152FF2152FF2051FF1F50FF
+      1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF194AFF1849FF1749FF1748
+      FF1648FF1547FF1546FF1446FF1345FF1244FF1143FF1042FF0D40FF1C44DD4D
+      4D504C4C484848484545454343434040403D3D3D3C3C3C3C3C3C3A3A3A393939
+      3838383838383838383838383636363636363535353434343434343232323131
+      313131313030302E2E2E2E2E2E2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D
+      2D2D2C2C2C2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A292929272727262626
+      2424242121211E1E1E1C1C1C191919191919929192ADAEADA8A8A8A2A2A29E9E
+      9E9999999394939090908B8B8C8787878181827E7E7D7A797A7575757171716D
+      6D6D6868696565656161615D5D5D5A595A56575653535350504F4E4D4D4A4949
+      4847464543444241413F3E3E3D3D3D3A393A373737353635333333313131302F
+      302F2F2F2C2C2B2B2A2A29292A29292926272625252524252425242323232423
+      232323232321212120212121202021201F1F1F1E1E1E1E1F1E1D1F1E1E1F1E1D
+      1E1D1D1E1D1D1D1D1D1D1C1C1D1D1D1D1C1C1C1C1C1C1C1C1C1C1B1B1C1C1C1B
+      1C1B1B1B1B1B1B1A1B1B1B1B1B1A1B1A1A1A1A1A1A1A18181817171716161616
+      1616151616151515151515161516171617171616161616161616151616151516
+      1515161515161516151515151515151515141414141414141414141414141413
+      1414131413121313121213131212121212121212121112111211111111111111
+      11111615151C1B1B1B1A1B1C1B1A1B1C1B191918121211121212121111111211
+      111212111111111111111111111010100F10100F0F0F0F0F0F0F0F0F0F0F0E0E
+      0E0F0F0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0D0D0D0E0D0D0D0D
+      0D0D0D0D0D0C0D0D0C0C0D0C0D0C0C0B0C0C0C0C0C0C0C0B0B0C0B0A0B0A0B0A
+      0A0B0A0A0A0B0B0A0A0A0A0A0A0A0A080909080908090808090908090A0A1414
+      142222222627272A2B2A30303025252405060605050505060505050505050505
+      05050505040404040404040504040404050404050A0A0A040404303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303838383939393A3A3A3C3C3C3D3D3D
+      3C3C3C2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F302F303A3A3A3B3B3B3B3B3B3B3B
+      3B3B3B3B3B3B3B3B3B3B3B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A39
+      3A3A393A3A393A3A393A39393A39393A39393A39393A39393939393939393939
+      3939393939393939393939393939393939393939393939393939393939393839
+      3938393938393838393838393838393838393838383838383838383838383838
+      3838383838383838383736363131313030303030303030303030303030303030
+      303030303030303232323939393B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3939
+      3A39393B3A3A3B3A3A3A3A3A3B3B3B3B3B3B3B3B3B3C3C3C3C3C3C3E3E3E3E3E
+      3E3E3E3E4040404141414242414343424544444544444847474847474949494B
+      4B4B4D4D4D4F4F4F5151515353535555555858585A5A5A5C5C5C5F5F5F626261
+      6565646766666A69696E6D6D7070707474747777777B7B7B7E7E7E8282828585
+      858989898E8E8E9393939797979A9A9A9F9F9FA4A4A4A8A8A7ACACACB1B1B1B6
+      B5B59A9A9A8787878686868282827D7D7D7979797373736E6E6E696969656565
+      6060605B5B5B5555554F4F4F4848484241403C3A363F5BB34173FF406FFF406F
+      FF3F6EFF3E6DFF3E6CFF3C6CFF3B6BFF3B6AFF3A69FF3A69FF3968FF3867FF37
+      67FF3666FF3565FF3263FF3163FF3162FF3161FF3161FF3161FF3060FF2F5FFF
+      2F5FFF2E5EFF2D5DFF2D5CFF2B5BFF2A5BFF2A5AFF2959FF2958FF2858FF2758
+      FF2657FF2556FF2455FF2455FF2354FF2253FF2152FF2152FF2051FF1F50FF1F
+      50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF194AFF1849FF1749FF1748FF
+      1648FF1547FF1546FF1446FF1345FF1244FF1143FF1043FF0D41FF2D439C4745
+      3D4344434242424040403F3F3F3D3D3D3C3C3C3C3C3C3B3B3B3A3A3A3A3A3A38
+      3838383838383838383838373737363636353535343434343434333333323232
+      3131313131313030303030302F2F2F2F2F2F2F2F2F2E2E2E2E2E2E2E2E2E2D2D
+      2D2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2A2A2A29292927272726262623232320
+      20201E1E1E1B1B1B181818525252B0B0B0ABABABA5A5A5A0A0A09B9B9B969696
+      9191918E8E8E8A8A8A85858580807F7B7B7B7877787272726F6F6F6B6B6B6767
+      676363636060615C5C5C58585856565653525250504F4C4C4C49484846464644
+      43434141403E3E3D3D3C3D3939393737373435353232323232312F2F2F2E2E2E
+      2B2B2C2A2B2A2929292828282626262726262526252423242423242323232222
+      222222212121202121202020201F1F1E1F1E1E1F1E1E1E1E1E1E1E1D1E1D1E1E
+      1D1D1D1D1D1D1C1C1D1D1C1D1C1C1D1C1C1C1C1C1B1C1C1C1C1B1C1B1B1B1C1B
+      1B1B1B1B1B1B1A1B1A1B1A1B1B1A1B1A1A1A1A1A1A1919191616171716161715
+      1616151615151515151515151417161616161616171616161616151516151616
+      1616151515151515151515141515151515141414141414141414131414141314
+      1413141312131213121312121212121212121212121111121111111111111111
+      111A1A1A1C1B1B1B1B1B1B1B1A1B1B1B15151512121211121212121111111111
+      1111111111111111111010111010100F0F10100F0F100F0F0F0F0F0F0F0F0E0E
+      0E0E0E0F0E0E0E0E0F0E0E0E0E0E0E0E0E0E0D0E0D0D0D0D0E0D0D0D0D0D0D0D
+      0D0D0D0C0D0D0D0D0C0D0D0C0C0C0B0C0C0B0C0C0B0C0B0B0B0B0B0B0B0B0A0A
+      0A0A0A0B0B0A0B0A0A0A0A09090A080909090908090909090A09100F0F212121
+      2626262B2B2B2F2F2E3232320605050506050505060505050505050505050505
+      050404050404040404040504040404040A0A0A04040430303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303333333939393A3A3A3B3B3B3D3D3D3E3E3E34
+      34342F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3535353B3B3B3B3B3B3B3B3B3B3B3B
+      3B3B3B3B3B3B3B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A
+      3A393A3A393A39393A39393A39393A39393A3939393939393939393939393939
+      3939393939393939393939393939393939393939393939393939393939383939
+      3839383839383839383839383839383838383838383838383838383838383838
+      3838383838383838383737323232303030303030303030303030303030303030
+      3030303030303131313636363B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A39393B
+      3A3A3B3A3A3B3A3A3B3B3B3B3B3B3B3B3B3C3C3C3C3C3C3D3D3D3E3E3E3E3E3E
+      4040404141414141414343424444434544444746464847474A49494B4B4B4C4C
+      4C4E4E4E5050505252525555555757575959595C5C5C5E5E5E60606063636266
+      66666969696C6B6B706F6F7372727675757979797C7C7C808080848484888888
+      8C8C8C9090909494949999999D9D9DA1A1A1A5A5A5AAAAA9AFAFAEB3B3B3B1B1
+      B18C8B8B8888888585858181817C7C7C7676767171716C6C6C6666666262625D
+      5D5D5858585252524B4B4B4545453F3E3B3C3E444066D84172FF406FFF406FFF
+      3F6EFF3E6DFF3E6CFF3C6CFF3B6BFF3B6AFF3A69FF3A69FF3968FF3867FF3767
+      FF3666FF3665FF3564FF3464FF3363FF3262FF3261FF3161FF3060FF2F5FFF2F
+      5FFF2E5EFF2D5DFF2D5CFF2B5BFF2A5BFF2A5AFF2959FF2958FF2858FF2758FF
+      2657FF2556FF2455FF2455FF2354FF2253FF2152FF2152FF2051FF1F50FF1F50
+      FF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF194AFF1849FF1749FF1748FF16
+      48FF1547FF1546FF1446FF1345FF1244FF1143FF0F42FF1141F7383F5A403F3A
+      3F3F3F3D3D3D3E3E3E3D3D3D3D3D3D3C3C3C3B3B3B3B3B3B3A3A3A3939393838
+      3838383838383837373736363636363636363635353534343434343433333333
+      33333232323232323131313030303030303030302F2F2F2F2F2F2E2E2E2E2E2E
+      2D2D2D2C2C2C2C2C2C2B2B2B2A2A2A2929292727272525252222222020201D1D
+      1D1A1A1A2323239D9D9DAEAEAEA8A8A7A2A3A29D9D9D9999999494949090908C
+      8C8C8787888282827E7E7E7A7A7A7676767171716D6D6E696969666666626262
+      5E5D5D5B5B5C5858585453545150514E4E4E4B4B4B4848484645454342424040
+      403D3D3D3B3A3A3938383737363535353232323130302F2F2F2D2D2D2B2C2C29
+      292A29292A292829272727272727252525242424232324242323222222222222
+      2121212021202120201F1F1E1F1F1F1D1D1D1C1B1C1C1B1B1B1B1B1A191A1919
+      19191A1A1B1A1A1B1A1B1A1B1B1B1B1B1C1C1C1B1C1C1B1B1B1C1B1C1B1B1B1B
+      1B1B1B1B1B1B1B1A1B1B1B1A1B1B1B1B1A1A1A1A1A1A1A181818171717161616
+      1515161515151515151515151616161616161616161616161516161616151516
+      1615151515161515151515151515151414141414141515141414141414131414
+      1313131213121313121212121212111212121211111112111212111111141414
+      1B1B1A1B1B1B1C1A1B1B1B1A1919191212121112121211121211111111121211
+      12111111111110111010110F0F100F0F0F10100F0F0F0F0F0F0F0F0F0F0F0F0F
+      0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0D0E0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0C0D0D0B0D0C0B0C0C0B0C0B0B0B0B0B0B0A0B0B0B0B0B0B0A
+      0A0B0B0A0A0B0A0A0A0A0909090809090909090A09090A0B0B1F1E1E25252529
+      29292E2E2E313232101110060605060605050605050505050505050505050504
+      0405050505050404050405040A0A0A0404043030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303737373939393A3A3A3C3C3C3D3D3D3D3D3D2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3939393B3B3B3B3B3B3B3B3B3B3B3B3B
+      3B3B3B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A
+      393A39393A39393A39393A39393A39393A393939393836363634343431313135
+      3535393939393939393939393939393939393939393939393938393938393838
+      3938383938383938383938383938383838383838383838383838383838383838
+      3838383838383838383833333330303030303030303030303030303030303030
+      30303030303030303333333939383B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393B3A3A3B3A
+      3A3B3A3A3B3A3A3B3B3B3B3B3B3C3C3C3C3C3C3D3D3D3E3E3E3E3E3E3F3F3F41
+      41414141414242424343424545444645454847474948484B4A4A4B4B4B4E4E4E
+      4F4F4F5151515353535555555858585A5A5A5D5D5D5F5F5F6262626565646868
+      676B6A6A6E6D6D7170707474747777777B7B7B7E7E7E8282828686868989898E
+      8E8E9292929797979A9A9A9E9E9EA3A3A3A8A8A8ACACACB1B1B1B6B5B5A2A2A2
+      8989898787878484848080807A7A7A7575756F6F6F6A6A6A6565656060605B5B
+      5B5656564F4F4F4949494344443E3C363C435A416CEC4172FF406FFF406FFF3F
+      6EFF3E6DFF3E6CFF3C6CFF3B6BFF3B6AFF3A69FF3A69FF3968FF3867FF3767FF
+      3666FF3665FF3564FF3464FF3363FF3262FF3261FF3161FF3060FF2F5FFF2F5F
+      FF2E5EFF2D5DFF2D5CFF2B5BFF2A5BFF2A5AFF2959FF2958FF2858FF2758FF26
+      57FF2556FF2455FF2455FF2354FF2253FF2152FF2152FF2051FF1F50FF1F50FF
+      1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF194AFF1849FF1749FF1748FF1648
+      FF1547FF1546FF1446FF1345FF1244FF1043FF1741E1393C473E3D3A3D3D3D3D
+      3D3D3D3D3D3D3D3D3D3D3D3D3D3D3C3C3C3B3B3B3B3B3B3B3B3B3A3A3A393939
+      3838383939393838383636363636363636363535353535353434343333333333
+      333333333232323232323030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D
+      2D2D2C2C2C2B2B2B2A2A2A2828282727272424242222221F1F1F1C1C1C1A1A1A
+      696969B1B0B0ABABABA5A5A5A0A0A09B9B9B9696969191918E8E8E8989898585
+      858080807D7C7C787878747474706F706B6B6B6767676464646160605D5D5D59
+      59595657575353535050504D4D4D4A4949484747444443414141403F3F3D3C3D
+      3C3A3A3837383736363434343232323130312F2F302D2D2C2B2B2B2A2A292B2B
+      2A2929292727272626262525252424232424242423232322222121222121211F
+      1E1F1D1D1C1A1A1A191919191919191919191818191918191918191818181818
+      1818181718171717171817171717171818181919181B1B1A1C1B1B1C1C1B1B1B
+      1B1B1A1B1B1B1B1A1B1A1A1A1A1A1A1A1A1A1A1A1A1919191916161616151615
+      1616151515151515151515171616161616161617161616151616161616161515
+      1615151515151515151514151515141415151514141414151414141413141413
+      141313131313121212121212121112121211121111111111111111111919191B
+      1A1B1B1B1B1B1A1A1B1B1B141414121212121212111111121212111111121111
+      11111111101010101010100F100F0F100F0F0F0F0F0F0F0F0F0F0F0F0E0E0E0E
+      0F0F0F0F0F0E0E0E0E0E0E0E0E0E0D0D0E0E0D0E0D0D0D0D0E0D0D0D0D0D0D0D
+      0C0D0D0D0D0C0B0D0C0B0C0C0C0C0B0B0C0B0B0B0B0B0B0A0B0B0B0B0B0B0B0B
+      0A0A0B0B0B0A090909090909090909090809090A0A1818192323232828282D2D
+      2D3131311D1D1D06050505050605060505050505050505050504050405050504
+      05050504040405050A0A0A040404303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303232323939393A3A3A3B3B3B3D3D3D3E3E3E3736372F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F3232323B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B
+      3B3B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A39
+      3A39393737373535353232323030302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3535
+      3539393939393939393939393939393939393939393839393839393839383839
+      3838393838393838393838383838383838383838383838383838383838383838
+      3838383838383838383535353030313030303030303030303030303030303030
+      303030303030303030303635353A3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393B3A3A3B3A3A
+      3B3A3A3C3B3B3B3B3B3C3C3C3C3C3C3D3D3D3E3E3E3E3E3E3F3F3F4040404141
+      414242424343434545444545444847474847474A49494C4B4B4D4D4D4E4E4E50
+      50505252525555555757575959595C5C5C5E5E5E616161636363666666696969
+      6D6C6C706F6F7372727675757A79797C7C7C8080808484848888888C8C8C9090
+      909494949898989C9C9CA1A1A1A5A5A5AAAAAAAEAEADB2B2B2B4B4B49393938A
+      8A8A8787878383837F7F7F7979797373736E6E6E6868686363635E5E5E595959
+      5454544E4E4E4848484243433E3B333E4A714270F94171FF406FFF406FFF3F6E
+      FF3E6DFF3E6CFF3C6CFF3B6BFF3B6AFF3A69FF3A69FF3968FF3867FF3767FF36
+      66FF3665FF3564FF3464FF3363FF3262FF3261FF3161FF3060FF2F5FFF2F5FFF
+      2E5EFF2D5DFF2D5CFF2B5BFF2A5BFF2A5AFF2959FF2958FF2858FF2758FF2657
+      FF2556FF2455FF2455FF2354FF2253FF2152FF2152FF2051FF1F50FF1F50FF1E
+      4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF194AFF1849FF1749FF1748FF1648FF
+      1547FF1546FF1446FF1345FF1044FF283E8F3D3A2F3C3C3C3D3D3D3D3D3D3D3D
+      3D3D3D3D3D3D3D3E3E3E3D3D3D3D3D3D3C3C3C3C3C3C3C3C3C3B3B3B3A3A3A39
+      3939393939383838373737363636363636353535353535343434333333333333
+      3333333232323232323030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2C2C
+      2C2B2B2B2A2A2A2828282626262424242121211E1E1E1B1B1B363636ADADACAE
+      ADADA7A7A7A3A2A29E9D9D989998939393908F8F8C8C8C8888888283837E7E7E
+      7A7A7A7676767171716E6E6D6A696A6666666262625F5F5F5C5C5C5858585455
+      545252524E4E4E4C4C4C4849494646464343434141403E3D3D3D3C3C3B3A3A39
+      3737373535343333333132302F302F2F2E2D2D2C2C2C2B2B2B2B2A2A2A282829
+      2728272726262525252424242424242324242222221F1E1F1B1B1B1B1A1A1A19
+      1A19191A1A19191A191919191919191918191918191919181818181818181818
+      18181818181817181718181817171717171717171717181A18191B1B1C1B1B1B
+      1B1B1B1B1B1B1A1A1B1B1A1B1A1A1A1A1A1A1A1A1A1A191A1716171615161515
+      1615151515151415141516161616171616161616161615161615161616151515
+      1516151515151515151514151414151415151414141414141414141314141313
+      1313131212121212121112121212121112121111111111121413141B1B1B1B1B
+      1B1C1B1B1B1B1B19181812121312121211121211121212121111111111111111
+      10101110101010101010100F0F100F0F0F0F0F0F0F0F0F0E0F0F0F0E0E0E0E0F
+      0E0E0E0E0F0E0E0E0E0E0E0E0E0D0E0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D
+      0D0D0C0D0D0B0C0C0C0C0C0B0C0B0B0C0B0B0B0A0B0B0B0A0B0B0B0B0B0A0B0A
+      0A0B0909090909090909090808090A09091313142323232727272C2C2C303030
+      2828280506060505050605050606050505050505050505050505050505040505
+      050504050A0D0D04040430303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303636363939393A3A3A3C3C3C3D3D3D3E3E3E3030302F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F3737373B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A
+      3B3B3A3B3A3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3938383636363433343131322F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F373636
+      3939393939393939393939393939393939393939383939383938383938383938
+      3839383839383838383838383838383838383838383838383838383838383838
+      3838383838383838373737313131303030303030303030303030303030303030
+      3030303030303030303232323737373B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393B3B3A3B3A3A3B3A3A3C
+      3B3B3C3B3B3B3B3B3C3C3C3C3C3C3D3D3D3E3E3E3E3E3E404040414141414141
+      4343434444444545444747464847474A49494B4B4B4D4C4C4E4E4E5050505151
+      515454545656565858585B5B5B5D5D5D5F5F5F6262626565656868676B6B6A6E
+      6D6D7170707474747777777B7B7B7E7E7E8282828585858989898E8E8E929292
+      9696969A9A9A9E9E9EA3A3A3A7A7A7ABABABAFAFAFB4B4B4ACACAC8B8B8B8B8B
+      8B8787878383837D7D7D7777777171716C6C6C6666666262625D5D5D58585853
+      53534C4C4C4747474242413E3B333F50864272FF4171FF406FFF406FFF3F6EFF
+      3E6DFF3E6CFF3C6CFF3B6BFF3B6AFF3A69FF3A69FF3968FF3867FF3767FF3666
+      FF3665FF3564FF3464FF3363FF3262FF3261FF3161FF3060FF2F5FFF2F5FFF2E
+      5EFF2D5DFF2D5CFF2B5BFF2A5BFF2A5AFF2959FF2958FF2858FF2758FF2657FF
+      2556FF2455FF2455FF2354FF2253FF2152FF2152FF2051FF1F50FF1F50FF1E4F
+      FF1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF194AFF1849FF1749FF1748FF1648FF15
+      47FF1546FF1246FF1743E63639443A39363B3B3B3C3C3C3D3D3D3E3E3E3E3E3E
+      3E3E3E3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3E3E3E3D3D3D3B3B3B3A3A
+      3A39393939393937373737373736363635353535353534343433333333333333
+      33333232323232323030303030303030302F2F2F2F2F2F2E2E2E2D2D2D2B2B2B
+      2A2A2A2828282525252323232020201D1D1D1C1C1C8A8989B0AFB0ABABAAA4A4
+      A49F9F9F9B9B9B9696969191918E8E8D8989898585858080807B7C7C78787873
+      73737070706B6B6B6868686564646161615D5D5D5A5A5A565757545453505151
+      4D4D4D4B4B4B4848484546464343424040403F3E3D3B3B3B3A39383737373737
+      363433323231313130302E2E2E2E2D2C2C2B2C2B2B2B2A2A2A28282728282726
+      25262424242424242423232121201C1D1D1B1A1B1B1B1B1B1A1B1A191A1A191A
+      1A191A1919191919191919191819191919191918181919181819181818181718
+      181817181817171717171717171717171717161717171716161918191B1B1B1B
+      1B1B1B1B1B1B1A1B1A1B1B1A1A1A1A1A1A191A191A1A19181717161516151516
+      1515151515151414151716161617171616161616161616161516161516161515
+      1516151515151515151514141514141414141414141414141414131314131413
+      13131212121212121212121112121211111211111112121A1A1A1B1B1B1A1B1B
+      1B1A1A1C1A1B1314131212131212121212121211121112121111111211111110
+      10110F0F10100F0F100F0F0F0F0F0F0F0F0F100F0F0F0F0F0F0F0E0E0E0F0E0E
+      0F0E0F0E0E0E0E0E0E0E0E0D0D0E0E0E0D0D0E0E0D0D0E0D0E0D0D0D0D0D0D0C
+      0D0C0D0C0C0D0C0B0C0B0C0B0B0B0B0B0B0B0B0B0B0A0B0A0A0B0A0A0A0B0909
+      0A0909090909090909090A0A090F0F0F2121212626262B2B2B30303033333306
+      0506050606060606050505050605050505060605050505050505050505040505
+      0A0D0D0404043030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303131313939393A3A3A3B3B3B3C3C3C3E3E3E3A3A3A2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F302F303A3A3A3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A3B3B3A3B
+      3A3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393939
+      3737373434343231322F2F302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3037373739
+      3939393939393939393939393939393938393938393938393838393838393838
+      3938383938383838383838383838383838383838383838383838383838383838
+      3838383838383838383834343430303030303030303030303030303030303030
+      30303030303030303030303333333838383A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393B3B3A3B3B3A3B3A3A3C3B3B3C3B
+      3B3C3B3B3C3C3C3C3C3C3D3D3D3E3E3E3E3E3E3F3F3F41414141414142424243
+      43434545454646454848474948484A49494C4B4B4E4D4D4E4E4E515151525252
+      5555555757575959595C5C5C5E5E5E6161616464646666666969696D6D6C706F
+      6F7372727675757A79797D7C7C8080808484848787878C8C8C90909093939397
+      97979C9C9CA0A0A0A4A4A4A8A8A8ACACACB1B1B1B6B6B59F9F9F8C8C8C8B8B8B
+      8686868181817C7C7C7676767070706B6B6B6565656161615C5C5C5757575252
+      524B4B4B4647474141403D3B353F53934272FF4171FF406FFF406FFF3F6EFF3E
+      6DFF3E6CFF3C6CFF3B6BFF3B6AFF3A69FF3A69FF3968FF3867FF3767FF3666FF
+      3665FF3564FF3464FF3363FF3262FF3261FF3161FF3060FF2F5FFF2F5FFF2E5E
+      FF2D5DFF2D5CFF2B5BFF2A5BFF2A5AFF2959FF2958FF2858FF2758FF2657FF25
+      56FF2455FF2455FF2354FF2253FF2152FF2152FF2051FF1F50FF1F50FF1E4FFF
+      1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF194AFF1849FF1749FF1748FF1648FF1547
+      FF1247FF263E9A3A382D3A3A3A3B3B3B3C3C3C3E3E3E3E3E3E3E3E3E40404040
+      40404141414242424242424343434242424141414040403E3E3E3D3D3D3B3B3B
+      3A3A3A3939393838383737373535353535353535353434343333333333333333
+      333232323232323030303030303030302F2F2F2E2E2E2D2D2D2B2B2B29292927
+      27272525252222221F1F1F1D1D1D5C5C5CB1B1B1ADACACA7A7A7A1A1A19C9C9C
+      9897979393938F8F8F8C8B8B8887878383837E7E7E7A7A7A7676767172716E6E
+      6E6A6A6A6666666363635F605F5C5C5C5858585656565252524F4E4E4C4C4C49
+      49494747474444444141413F3F3F3D3D3D3B3B3A393938363736353535333333
+      313131302F2F2D2E2E2D2D2C2B2C2B2B2B2B292A292828282727272626262424
+      242121211E1E1F1C1C1D1C1C1D1B1B1B1B1A1C1B1A1B1A191B1A191A19191A1A
+      191A1919191A1A1A1A1A1A191A1A191A19191A1A181818181818181818181818
+      1718171717171817171717171717171717171616161716171716161919191B1B
+      1B1A1B1A1B1A1A1A1A1A1B1A1B1A1A1A1A1A1A1A191A18171716151615151615
+      1515151515141515161617161617161616161616151516161616161516151515
+      1515151515151415151515141415151514141414141414141413141313141312
+      131312121312121211121112121211111212111515151B1C1B1B1B1B1A1B1B1C
+      1B1B171717121213121213121212121211121212121112121111111011111010
+      101010101010100F100F10100F0F0F0F0F100F0F0F0F0E0F0E0F0F0F0F0F0E0E
+      0F0E0E0E0E0E0E0E0E0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D
+      0C0D0C0C0C0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B0B0B0A0B0B0A0A0B0A090909
+      0909090909090A0A0A0A0A0B1F1F1E2626262A2A2A2F2F2F3333330E0F0F0506
+      050606060505060606050605050506050505060505050505050405050A0A0A05
+      0505303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303535353939393A3A3A3C3C3C3D3D3D3E3E3E3333332F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F3434343B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A3B3B3A3B3A
+      3A3B3A3A3B3A3A3B3A3A3A3A3A3837373535353333333030302F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F303737373939
+      3939393939393939393939393839393839393839383839383839383839383839
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838383838383636363131313030303030303030303030303030303030
+      303030303030303030303130313333333838383A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3B3B3A3B3B3A3B3B3A3C3B3B3C3B3B3C3B3B
+      3D3C3C3C3C3C3D3D3D3E3E3E3E3E3E3F3F3F4040404141414242424343434444
+      444545454747464848474A49494B4B4B4D4C4C4F4E4E50505052525254545456
+      56565858585B5B5B5D5D5D6060606262626565656868686B6B6A6E6E6D707070
+      7474747777777B7B7B7E7E7E8282828585858989898D8D8D9191919595959A9A
+      9A9D9D9DA1A1A1A5A5A5AAAAAAAFAFAFB2B2B2B4B4B49494948D8D8D89898985
+      85858181817B7B7B7575756F6F6F6969696464646060605B5B5B565656515151
+      4B4B4B45454641403F3D3A343E53934272FF4171FF406FFF406FFF3F6EFF3E6D
+      FF3E6CFF3C6CFF3B6BFF3B6AFF3A69FF3A69FF3968FF3867FF3767FF3666FF36
+      65FF3564FF3464FF3363FF3262FF3261FF3161FF3060FF2F5FFF2F5FFF2E5EFF
+      2D5DFF2D5CFF2B5BFF2A5BFF2A5AFF2959FF2958FF2858FF2758FF2657FF2556
+      FF2455FF2455FF2354FF2253FF2152FF2152FF2051FF1F50FF1F50FF1E4FFF1D
+      4EFF1C4DFF1B4CFF1A4CFF1A4BFF194AFF1849FF1749FF1748FF1548FF1845ED
+      34394A3938343B3B3B3D3D3D3E3E3E3E3E3E3F3F3F4040404242424343434444
+      444545454747474747474646464646464545454242424040403E3E3E3C3C3C3A
+      3A3A383838373737373737363636353535353535343434333333333333333333
+      3232323232323131313030302F2F2F2E2E2E2D2D2D2B2B2B2929292626262424
+      242121211F1F1F333333A9A9A9AEAEAEAAAAAAA3A3A39E9D9E99999995959591
+      91918E8D8D8A89888584848180817C7C7C7878777473737070706B6B6C686868
+      6464646161615D5D5E5B5A5A5757575454545152524E4E4E4C4B4B4848484646
+      464343434142423F3E3E3D3C3C3A3A3A38383837373734353532333231313130
+      2F2F2E2E2E2D2D2D2C2C2C2B2A2A2A2A2A2828282727272524242020201F1E1F
+      1D1D1F1C1D1E1C1C1D1B1B1C1B1B1C1C1C1D1B1B1C1B1A1B1B1A1B1C1B1C1C1B
+      1B1F1F1F2020202222222322231F201F1E1D1E1D1D1E19191919191918171818
+      18171818171717171717171717171617171717171717161616161717171A1A1A
+      1B1B1B1A1B1B1B1B1B1A1B1A1A1A1A1A1A1A1A1A1A1718171615171516161515
+      1515141415151516171716171616161616161615161616161515161515151515
+      1515151515141415141514141415151414141414141414141313131313131213
+      1213131212121212121111121211121112111B1A1A1B1B1B1B1B1B1B1B1B1B1A
+      1B13121312121212121212121212121211121112111111111011101010101010
+      101010100F0F10100F0F100F100F0F0F0F0F0F0F0F0F0F0F0E0E0F0E0E0E0E0F
+      0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0E0D0D0D0D0D0C0D0C0C0D0D0C
+      0D0C0B0C0B0B0C0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B0A0A0B090A0A0A090909
+      09090909090B0B0A1B1A1B2424242929292E2E2E3333331A1A1A060606060606
+      0606060506060506060605050505050505050505050505050A0A0D0405053030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303131
+      313838383A3A3A3B3B3B3C3C3C3D3D3D3D3D3D2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F3838383B3B3B3B3B3B3B3B3B3B3B3B3B3B3A3B3B3A393939363636
+      3434343232322F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F30373737393939
+      3939393939393939393939383939383938383938383938383938383938383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838383838373737343434303030303030303030303030303030303030
+      3030303030303030303130313130313333333838383A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3B3B3B3B3B3A3B3B3A3B3B3A3C3B3B3C3B3B3C3B3B3D
+      3C3C3C3C3C3D3D3D3E3E3E3E3E3E3F3F3F414141414141434343444444454545
+      4646464848474949484B4A4A4C4B4B4F4E4E504F4F5151515353535555555757
+      575959595C5C5C5E5E5E6161616363636666666969696C6C6B70706F73727276
+      75757978787C7B7B8180808383838787878B8B8B8F8F8F9393939797979B9B9B
+      9F9F9FA3A3A3A8A8A8ABABABAFAFAFB4B4B4AEAEAE8E8E8E8D8D8D8989898585
+      857F7F7F7A7A7A7474746E6E6E6868686464645F5F5F5A5A5A5656565050504A
+      4A4A45454541413F3D3A343E53934272FF4171FF406FFF406FFF3F6EFF3E6DFF
+      3E6CFF3C6CFF3B6BFF3B6AFF3A69FF3A69FF3968FF3867FF3767FF3666FF3665
+      FF3564FF3464FF3363FF3262FF3261FF3161FF3060FF2F5FFF2F5FFF2E5EFF2D
+      5DFF2D5CFF2B5BFF2A5BFF2A5AFF2959FF2958FF2858FF2758FF2657FF2556FF
+      2455FF2455FF2354FF2253FF2152FF2152FF2051FF1F50FF1F50FF1E4FFF1D4E
+      FF1C4DFF1B4CFF1A4CFF1A4BFF194AFF1849FF1749FF1549FF2641A73C3A303C
+      3C3C3D3D3D3F3F3F3F3F3F3F3F3F414141434343454545464646474747484848
+      4A4A4A4A4A4A4A4A4A4949494848484646464343434040403D3D3D3B3B3B3A3A
+      3A39393937373736363636363635353535353534343433333333333333333332
+      32323131313030302F2F2F2E2E2E2C2C2C2A2A2A282828262626232323202020
+      2121218F8F8FB0B0B0ABABABA7A6A6A0A0A09B9B9B9797979292928E8E8E8B8B
+      8B8787878382827E7E7E7A79797676767171716E6E6D6A6A6B6666666263635F
+      5F5E5C5C5C5959585655555253524F4F4F4D4D4D494A4A474847444444434343
+      403F403E3E3E3C3C3C393A3A3837373636363434333232323232312F2F302E2F
+      2E2C2C2C2C2C2C2A2A2A2928282828282424242020201E1F201E1D1E1D1D1E1D
+      1C1D1B1C1C1C1C1D1C1C1C1C1C1C1D1C1D2323232626272C2B2B303030303030
+      313030302F2F2F2F2F2E2E2E2D2D2D2D2C2D2C2B2B2727272323231E1D1D1718
+      181817181817171717171717171717171716161616171616171616161919191B
+      1B1B1B1A1B1A1A1A1B1A1A1A1A1A1A1A191A191A171718161516151516151515
+      1515151516151717171617161616161616161615161515161515161515151515
+      1514141515151515151514141514151414141414141414131413131413131312
+      12121212121112121212111212111817181B1B1B1B1B1B1B1B1B1B1A1A151616
+      1313131212121212121212121212121211111111111211101110101010101010
+      1010101010100F0F0F0F0F10100F0F0F0F0F0F0F0F0F0F0F0F0F0F0E0E0F0F0E
+      0E0E0E0E0E0E0E0E0D0D0E0D0D0D0E0D0E0D0D0D0D0D0D0D0C0D0D0C0D0C0C0C
+      0B0B0C0B0B0C0B0B0B0B0B0B0B0B0B0B0A0B0A0B0A0A0A0A0A0A090909090A09
+      090A0A0A1717172323232828282E2E2E32323223232306060606060606060605
+      06060606060606050505050505050505050505050D0D0D040405303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030333333
+      3939393A3A3A3B3B3B3D3D3D3E3E3E3838382F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F3030303A3A3A3A3A3A383838353535323232302F302F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F3030303030303030303030303030303030303434343737383C3C3C3F3F
+      3F3A3A3A2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3037373739393939
+      3939393939393938393938393938393838393838393838393838393838383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838383738383736363632323230303030303030303030303030303030
+      30303030303030303130313130313131313332323737373A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3B3B3B3B3B3A3B3B3A3C3C3B3C3B3B3C3B3B3D3C3C3D3C
+      3C3D3D3D3E3E3E3E3E3E3F3F3F40404041414142424243434345454545454547
+      47474848474A4A494B4B4B4D4C4C4F4E4E515050525252545454565656585858
+      5B5B5B5D5D5D5F5F5F6262626565656767676A6A6A6E6E6D7070707373737777
+      777A7A7A7E7E7E8181818585858989898C8C8C9090909494949898989C9C9CA1
+      A1A1A4A4A4A8A8A8ACACACB1B1B1B6B6B5A4A4A48E8E8E8D8D8D898989848484
+      7E7E7E7979797373736D6D6D6868686363635F5F5F5A5A5A5555555050504A4A
+      4A45454541413F3D3A343F54934272FF4171FF406FFF406FFF3F6EFF3E6DFF3E
+      6CFF3C6CFF3B6BFF3B6AFF3A69FF3A69FF3968FF3867FF3767FF3666FF3665FF
+      3564FF3464FF3363FF3262FF3261FF3161FF3060FF2F5FFF2F5FFF2E5EFF2D5D
+      FF2D5CFF2B5BFF2A5BFF2A5AFF2959FF2958FF2858FF2758FF2657FF2556FF24
+      55FF2455FF2354FF2253FF2152FF2152FF2051FF1F50FF1F50FF1E4FFF1D4EFF
+      1C4DFF1B4CFF1A4CFF1A4BFF194AFF1849FF1948F33A3F57403E394040404141
+      414242424343434343434444444545454646464747474848484A4A4A4B4B4B4C
+      4C4C4D4D4D4B4B4B4A4A4A4747474545454242423E3E3E3C3C3C3A3A3A393939
+      3838383636363636363636363535353535353434343333333333333232323131
+      313030302F2F2F2E2E2E2C2C2C2A2A2A2727272525252222221F1F1F6C6C6CB2
+      B2B2ADACADA8A7A7A2A2A29D9D9D9898989494938F8F8F8C8C8C898989858584
+      8080807C7B7B7878777474746F6F6F6C6B6C6768686465646161625D5D5D5A5A
+      595757575554555151524E4E4E4C4B4C4949494647464344444242423F3F3F3C
+      3D3D3B3A3B3838393737373535363333333232313131302F2E2F2E2E2E2C2C2C
+      2B2B2B2A292A292828252425202021201F201F1F201E1D1F1C1D1D1D1E1E1C1C
+      1D1D1D1E22222228282831313033323232333233333333333333333332333332
+      33333232323030302F2F302E2E2D2D2C2C2D2C2D2B2B2A2A2A2A292829222221
+      1A1A191817171717171716171717171616161617161616161616161919191A1B
+      1B1A1A1A1A1A1A1A1A1A1A1A1A191A1A19191917161616161715151615151515
+      1514171617171616161617171716161616161616161615151515151515161515
+      1414151515141515151415141415141414141314141413131313131313131212
+      131212121212121212121212131C1C1B1B1B1B1B1B1C1B1B1B19191812131313
+      13121312121212121212121212121111111110111110111110101010100F100F
+      10100F0F10100F10100F100F0F0F0F0F0F0F0E0F0F0F0F0F0E0F0E0F0F0E0E0E
+      0E0E0E0E0E0E0D0E0E0E0D0E0D0E0D0E0D0D0D0D0C0D0D0C0D0C0C0C0C0C0C0B
+      0C0C0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0A0A0A09090A09090A09090A0A0A0A
+      1111122323232727272C2C2C3131312C2C2C0607060606070606060606050605
+      060506060506050505050505050505050D0D0D05050530303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303030303030303030303737373A
+      3A3A3B3B3B3C3C3C3D3D3D3E3E3E3131312F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      302F302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F30303030303030303030303031313131
+      31313434343838383C3C3C414141434343434343434343414141414141414141
+      3A3A3A2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F303737373939393939
+      3939393839393839393839383839383839383839383839383838383838383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838373838373837373535353131313030303030303030303030303030
+      303030303030303130313130313131313131313131313635353939393A3A3A3A
+      3A3A3A3A3A3B3B3B3B3B3B3B3B3A3C3C3B3C3C3B3C3B3B3D3C3C3D3C3C3E3D3D
+      3E3E3E3E3E3E3E3E3E4040404141414141414343434444444545454646464848
+      484949484B4B4A4C4B4B4F4E4E504F4F5251515353535555555757575959595C
+      5C5C5E5E5E6060606363636666666969696C6C6C6F6F6E727271757474787777
+      7C7B7B7F7E7E8382828686868989898E8E8E9292929595959A9A9A9D9D9DA1A1
+      A1A5A5A5AAAAAAAEAEAEB2B2B2B4B4B49B9B9B8F8F8F8D8D8D8989898484847E
+      7E7E7878787373736C6C6C6868686363635F5F5F5A5A5A5555554F4F4F4A4A4A
+      45454541403F3D3B343E51874270FA4172FF406FFF406FFF3F6EFF3E6DFF3E6C
+      FF3C6CFF3B6BFF3B6AFF3A69FF3A69FF3968FF3867FF3767FF3666FF3665FF35
+      64FF3464FF3363FF3262FF3261FF3161FF3060FF2F5FFF2F5FFF2E5EFF2D5DFF
+      2D5CFF2B5BFF2A5BFF2A5AFF2959FF2958FF2858FF2758FF2657FF2556FF2455
+      FF2455FF2354FF2253FF2152FF2152FF2051FF1F50FF1F50FF1E4FFF1D4EFF1C
+      4DFF1B4CFF1A4CFF1A4BFF174BFF2946B44542374444444646464949494A4A4A
+      4A4A4A4A4A4A4848484747474747474747474949494A4A474D4B454C4C4A4D4D
+      4D4C4C4C4A4A4A4848484646464242423F3F3F3D3D3D3A3A3A39393939393938
+      3838363636363636363636353535353535343434343434333333323232303030
+      2F2F2F2D2D2D2B2B2B2929292626262424242222224B4B4BAFAFAFAEAEADA9A9
+      A9A6A5A59E9E9E9999999595959191918C8D8D8B8A8A8686868181817E7E7D7A
+      79797575747271726E6D6D6A6A6A6666666262625F5F605C5C5C595958565656
+      52525250504F4D4D4D4A4A4A4848484545454343434040403E3F3E3D3D3D393A
+      393738383636363435353233323232323030302F2E2F2C2D2C2C2C2C2B2B2B29
+      2929252525212122201F20201F201F1F201F1F201E1E1F1F1E20212022292929
+      3333333434343635363637363737373938383838383838383737373536353534
+      3532323332323230302F2D2D2E2D2D2D2B2B2B2A2B2A2A2A2929292829292821
+      21211918181717171717171617171616161717161716171616161818181B1B1A
+      1B1A1B1B1A1A1A1A1A1A1A1A191A1A1819191617161615161515161515151515
+      1517161717171716171616161616161516161516161515151616151515151515
+      1415151415151415151414141414141414141414131313141314131213121212
+      1212121212121212121A191A1B1C1C1B1B1B1B1B1B1B1B1B1312131312121213
+      1312131312121212121211111112111111101111101011101010101010101010
+      10100F1010100F100F100F0F0F0F0F0F0F0F0E0F0F0F0F0E0E0F0E0E0E0E0E0F
+      0E0E0E0E0D0E0E0E0E0D0E0E0E0D0D0D0C0D0D0C0D0D0C0D0C0B0C0C0B0B0B0C
+      0C0B0B0B0C0B0B0B0C0B0B0B0B0B0A0B0909090909090A090A0B0B0A0E0F0E21
+      21212727272B2B2B303030353535060606060606060606060606060606060505
+      0505060505050505060505050D0D0D0505053030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303131313838383A3A
+      3A3B3B3B3C3C3C3E3E3E3C3C3C2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      3030303030303030303030303131313232323737373B3A3B4040404444444545
+      454646464747474747474646464545454444444242424141414040404040403A
+      3A3A2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F30363636393939393939
+      3939383939383938383938383938383938383938383838383838383838383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3837383837383837383737373737343434313131303030303030303030303030
+      3030303030303130313130313131313131313131313131313333333737363A39
+      393B3B3B3B3B3B3B3B3B3B3B3A3C3C3B3C3C3B3C3B3B3D3C3C3D3C3C3E3D3D3E
+      3E3E3E3E3E3F3F3F414141414141424242434343454545454545484848484848
+      4A4A494B4B4B4D4C4C4F4E4E5150505352525454545656565858585B5B5B5D5D
+      5D5F5F5F6262626565656767676A6A6A6D6D6D7070707373727776767A79797E
+      7D7D8180808484848787878C8C8C8F8F8F9393939797979A9A9A9E9E9EA3A3A3
+      A7A7A6AAAAAAADADADB2B2B2B2B2B29696968F8F8F8C8C8C8888888383837D7D
+      7D7878787171716C6C6C6767676363635F5F5F5A5A5A5555555050504A4A4A45
+      46464141403E3B333E4B74416CED4172FF406FFF406EFF3F6EFF3E6DFF3E6CFF
+      3C6CFF3B6BFF3B6AFF3A69FF3A69FF3968FF3867FF3767FF3666FF3665FF3564
+      FF3464FF3363FF3262FF3261FF3161FF3060FF2F5FFF2F5FFF2E5EFF2D5DFF2D
+      5CFF2B5BFF2A5BFF2A5AFF2959FF2958FF2858FF2758FF2657FF2556FF2455FF
+      2455FF2354FF2253FF2152FF2152FF2051FF1F50FF1F50FF1E4FFF1D4EFF1C4D
+      FF1B4CFF1A4CFF184BFF2349D6484A53514F485252535454545454545252524E
+      4E4E4C4C4C49494947474745454448463C45474F3C476F4A4A494D4B414B4A48
+      4A4A494747474545454242424040403D3D3D3B3B3B3A3A3A3939393838383838
+      383636363636363636363535353535353434343232323232323030302F2F2F2D
+      2D2D2A2A2A282828252525232323353535A5A5A4B0B0AFABABAAA6A6A6A1A1A1
+      9B9B9B9696969292928E8F8F8B8B8B8788878484847F7F7F7C7C7C7777777473
+      736F6F6F6C6B6B6867676564656161615E5E5D5A5A5A5758575454545252524F
+      4E4F4C4D4C494949474747444444424243403F403D3D3D3B3B3B393939383738
+      3636363435343232323131312F2F2F2E2E2D2C2C2C2C2C2C2A2A2A2626262222
+      23202020202020201F201F1F201F1F2020202026252532333335353538383839
+      39393B3B3B3C3C3B3D3D3C3C3D3C3C3D3C3C3C3C3B3A3B393939373838353536
+      3433333232322F30302D2C2D2C2C2C2A2A2A2929292929292828292828292728
+      271C1C1C1717171716171717161617171717161716161616161819191A1A1A1B
+      1B1A1A1B1A1A1A1A1A1A1A1A1A1A181818171617161616161516151515151615
+      1716171716161616161616171616151615151616161516151515151515151515
+      1515151515141414141415141414141413141413131413131313131312121212
+      12121212121615151B1C1C1C1C1B1B1B1B1B1B1B161616131313121313121212
+      12121212121212111112111112101111111110101010101010100F100F100F10
+      1010100F0F0F100F0F0F0F100F0F0F0F0E0F0F0F0E0E0F0F0E0E0E0E0E0E0F0E
+      0E0E0E0E0E0E0D0D0E0D0D0E0D0D0D0C0D0D0C0D0C0C0C0B0C0C0C0B0C0B0C0B
+      0C0C0B0C0C0B0B0B0B0B0B0B0A090A0A0A0A090A090A0A090C0C0C1E1E1F2626
+      262B2B2B303030343434100F1006060606060606060606060606060505060606
+      06060505060506050D0F0D050505303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030303030303535353A3A3A3A3A3A
+      3C3C3C3D3D3D3E3E3E3736372F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F30303030303030303030303031313131313136
+      363639393A3F3F3F4343434545454646464747474747474848484A4A4A4A4A4A
+      4A4A4A4A4A4A4949494747474545454343434141414040403F3F3F3F3F3F3A3A
+      3A2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F35353539393939393839
+      3938393938393838393838393838393838393838383838383838383838383838
+      3838383838383838383838383838383838383838383838383838383838373838
+      3738383738373738373738373737373733333330303030303030303030303030
+      3030303030313031313031313131313131313131313131313131313131353535
+      3838373A3A3A3B3B3B3C3C3B3C3C3B3C3C3B3D3C3C3D3C3C3E3D3D3F3E3E3E3E
+      3E3F3F3F4040404141414141414343434444444545454747474848484949494B
+      4B4A4C4C4B4F4E4E504F4F5251515352525555555757575959595C5C5C5E5E5E
+      6060606262626666666969696C6C6C6E6E6E7171707575747777777B7B7B7E7E
+      7E8282828585858989898C8C8C9090909494949898989B9B9B9E9E9EA2A2A2A6
+      A6A6ABABABAFAFAFB3B3B3AEAEAE9292929090908C8C8C8888888383837E7E7E
+      7777777272726B6B6B6767676363635F5F5F5A5A5A5555555050504B4B4B4646
+      464242413E3B333D455C4066D84173FF4070FF406EFF3F6EFF3E6DFF3E6CFF3C
+      6CFF3B6BFF3B6AFF3A69FF3A69FF3968FF3867FF3767FF3666FF3665FF3564FF
+      3464FF3363FF3262FF3261FF3161FF3060FF2F5FFF2F5FFF2E5EFF2D5DFF2D5C
+      FF2B5BFF2A5BFF2A5AFF2959FF2958FF2858FF2758FF2657FF2556FF2455FF24
+      55FF2354FF2253FF2152FF2152FF2051FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF
+      1B4CFF1A4BFF174BFF284DD35558625F5D555E5D5E5B5B5B5656565151514C4C
+      4C47474745433E43413735416E1A42D60E40FC1D42CC36447B46464749463B46
+      46444444444242423F3F3F3D3D3D3C3C3C3B3B3B393939383838383838383838
+      3636363636363636363535353434343333333131313030302E2E2E2C2C2C2A2A
+      2A2727272525252A2A2A959495B0B1B0ACACACA8A8A8A3A3A39D9D9D98989894
+      94948F8F8F8B8B8B8988898586868080807C7C7C7979797575747271716D6E6D
+      6B6A6A66666663626260605F5C5C5C5858585555555252525050504D4D4D4B4A
+      4A4848484545454343434141413F3E3F3D3D3D3C3A3A38383837373735353534
+      3434323232303031302F2F2D2D2D2C2C2C2C2C2C282828222323212122202020
+      201F202020202021212423242D2D2D3535353939393A3B3B3E3E3E3E3E3E4141
+      414242424242424242424040403A3A3A3434342F2F2F2929292D2E2E2F2E2E2F
+      2F2F3130312F2E2F2C2D2C2A2A2A2929292A2929292929292929292929292828
+      2223231818181717171617171616171616161616161616161919181A1B1B1A1A
+      1A1A1A1B1B1A1A1A1A1A1A191A17171717161617151616151615151517171717
+      1717171616161616161616161516161616151616151516151615151515151515
+      1414151415151514141515141414141414141313141313131312131212121212
+      121413131C1B1C1B1C1C1B1B1B1B1B1B19181812131313121213121312131212
+      1212121212121111121110121110111010111010101110101010100F0F0F1010
+      0F0F100F0F0F0F100F0F0F0F0F0F0E0F0F0F0F0F0F0E0F0F0E0E0F0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0D0E0D0C0D0D0C0D0C0C0D0C0C0C0B0C0B0C0B0B0B0B0B0C
+      0B0B0B0B0B0B0B0B0A0A0A0A090A0A0A090A0A0A0C0B0C1C1C1C2626262A2A2A
+      3030303434341616150606070706060607060606060606050606060606060505
+      060505060D0D0D05060530303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303030303737373A3A3A3B3B3B3C
+      3C3C3D3D3D3E3E3E3131312F2F2F2F2F2F2F2F2F2F2F2F2F2F2F303030303030
+      3030303030303131313131313434343838383D3D3D4242424545454646464747
+      474747474848484949494A4A4A4A4A4A4B4B4B4C4C4C4D4D4D4D4D4D4E4E4E4D
+      4D4D4C4C4C4A4A4A4747474343434040403F3F3F3F3F3F3F3F3F3F3F3F3A3A3A
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3535353939393939383939
+      3839383839383839383839383839383838383838383838383838383838383838
+      3838383838383838383838383838383838383838383838383838383837383837
+      3837373837373837373837373837373736363333333131313030303030303030
+      3030303031303131303131313131313131313131313131313131313132323232
+      32323434343838383A3A3A3C3C3B3D3D3C3D3C3C3E3D3D3F3E3E3F3E3E3E3E3E
+      4040404141414141414242424343434545454545454848484848484A4A4A4B4B
+      4B4D4D4C4F4E4E5150505352525554545656565858585A5A5A5C5C5C5F5F5F62
+      62626464646767676969696D6D6D7070707373727676757978787C7B7B807F7F
+      8382828786868989898D8D8D8F8F8F9393939797979B9B9B9F9F9FA3A3A3A7A7
+      A7ABABABAFAFAFB3B3B3AAAAAA9191919090908C8C8C8888888484847D7D7D77
+      77777171716B6B6B6767676363635F5F5F5A5A5A5656565151514B4B4B474747
+      4242433F3D363D3F463F5DB74172FF4070FF406EFF3F6EFF3E6DFF3E6CFF3C6C
+      FF3B6BFF3B6AFF3A69FF3A69FF3968FF3867FF3767FF3666FF3665FF3564FF34
+      64FF3363FF3262FF3261FF3161FF3060FF2F5FFF2F5FFF2E5EFF2D5DFF2D5CFF
+      2B5BFF2A5BFF2A5AFF2959FF2958FF2858FF2758FF2657FF2556FF2455FF2455
+      FF2354FF2253FF2152FF2152FF2051FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B
+      4CFF1A4CFF164AFF274FE0585E736562585E5E5E585858515151494948454338
+      3D404E2541AC1143FD0E42FF0F41FF0C40FF0C40FF1841D72B40944041444241
+      404040403E3E3E3D3D3D3C3C3C3B3B3B3A3A3A39393938383838383838383837
+      37373636363535353434343333333131312F2F2F2D2D2D2B2B2B292929262626
+      252525818181B1B1B2ADADADA8A8A8A4A4A4A1A1A09999999494959192928C8C
+      8C8888888687878282827E7F7E7A7A7A7777777272726F6F6F6C6C6B69686865
+      64646161615E5D5D5B5B5A5757575454545152514E4E4E4C4C4C484949484848
+      4444444343434040403D3D3D3D3B3C3A393A3938383636363535353232323132
+      312F2F302E2E2E2E2D2D2C2C2C2B2B2B24232322222321212220212120202121
+      21222424253332323737373A3A3A3E3E3E414041424243444545464746464646
+      3435352727261D1C1C1A19191919191919191918191819181819181819181A1A
+      1A1F1F1F2525242A2A2B2A292929292928282828282827282828272729282825
+      26251818181617171716171616171717161616161616161A19191B1A1A1A1A1A
+      1A1A1A1A1A1A1A1A1A1919191717161616161615161615161616161817161716
+      1717161616161616161616161616161615161615151515151515151514151514
+      1414141515141514151414141414131314131313141314131313121212121212
+      1A1A1A1C1C1C1B1C1C1B1B1B1B1A1A1313131213131212131313131312121212
+      121211111111111211101111111011101010101010100F10100F1010100F1010
+      100F0F100F0F0F0F0F0F0F0F0F0F0F0E0F0F0F0F0E0E0E0F0E0E0E0E0E0E0E0D
+      0D0E0E0E0D0D0E0D0E0D0C0D0D0D0D0C0C0C0C0C0C0C0C0C0B0C0C0B0B0B0B0C
+      0C0B0B0B0A0A0A0A0A0A0A0A0A0A09090A0B0B1918182424242929292F2F2F33
+      33331E1F1F070606070607060607060706060606060606050606060506050606
+      0D0D0D0505053030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303232323A3A3A3A3A3A3B3B3B3D3D
+      3D3E3E3E3C3C3C3030302F2F2F3030303030303030303131313232323737373B
+      3A3B4040404444444545454747474747474747474949494A4A4A4A4A4A4B4B4B
+      4C4C4C4D4D4D4D4D4D4E4E4E4F4F4F5050505050505151515151515050504E4E
+      4E4848484040403B3B3B4040403F3F3F3E3E3E3E3E3E3E3E3E3F3F3F3A3A3A2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F333233393938393938393838
+      3938383938383938383938383938383838383838383838383838383838383838
+      3838383838383838383838383838383838383838383838383738383738383738
+      3737383737383737383737383737373737373737343434313131303030303030
+      3030303130313130313131313131313131313131313131313232323232323232
+      323232323333333434343636363939393B3A3A3E3D3D3F3E3E3F3E3E3F3F3F40
+      40404141414242424343434444444545454747474848484949494B4B4B4C4C4B
+      4F4F4E504F4F5251515352525555555757575959595C5C5C5E5E5E6060606262
+      626565656868686A6A6A6D6D6D7070707373737676767878787C7C7C7E7E7E81
+      81818585858989898D8D8D9090909494949898989C9C9CA0A0A0A3A3A3A8A8A8
+      ABABABAFAFAFB4B4B4A6A6A69292929090908C8C8C8888888484847D7D7D7878
+      787171716B6B6B6767676464645F5F5F5B5B5B5656565151514D4D4D48484843
+      4444403F3A3D3C373E5089406DF14072FF406FFF3F6EFF3E6DFF3E6CFF3C6CFF
+      3B6BFF3B6AFF3A69FF3A69FF3968FF3867FF3767FF3666FF3665FF3564FF3464
+      FF3363FF3262FF3261FF3161FF3060FF2F5FFF2F5FFF2E5EFF2D5DFF2D5CFF2B
+      5BFF2A5BFF2A5AFF2959FF2958FF2858FF2758FF2657FF2556FF2455FF2455FF
+      2354FF2253FF2152FF2152FF2051FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B4C
+      FF1A4CFF164AFF234DE9525C80605D525656544E4C4645443F31427F1944E310
+      45FF1144FF1143FF1042FF1041FF0E40FF0B40FF0B3FFF323D693F3D363D3D3D
+      3D3D3D3C3C3C3C3C3C3C3C3C3B3B3B3A3A3A3838383838383838383737373636
+      363535353434343333333131312E2E2E2C2C2C2A2A2A282828252525717171B2
+      B2B2ADADADA9A9A9A6A6A5A1A1A09C9C9C9797969192918E8E8E8A8A8A878787
+      8484847F80807D7D7D7777787474747070706E6E6E696969666665636463605F
+      605C5C5C5958585656565352535050504D4D4D4B4B4B48484845464543434341
+      42413F3F3F3D3D3D3C3C3C3A3A39393737363535353434323232313130303030
+      2F2F2F2C2D2C2C2C2B2525252323232122222120212020212122222424253333
+      333A393A3B3B3B4140404444444848474748474646463132321D1D1D1A1A1A1A
+      1A1A1A1A1919191919191A1A1919191919191919181919181918181918181818
+      1818171819182020202727282828282828282828282828282727272728272526
+      251818181617161717171617161616171616161717171B1A1A1B1B1B1B1A1A1A
+      1A1B1A1A1A1A1A1A181818171616161716161516151516171717181717171616
+      1716171616161616161616161616151516161516151615151515151415151514
+      151415151414141514141414141313141413141313131312131212121717171C
+      1C1B1C1C1C1C1B1C1B1B1B141414131313131313131313131212121212121212
+      1211111211111110111111111010111010101011101010100F100F1010100F0F
+      100F0F0F100F0F0F0F0F0F0F0F0E0F0F0F0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0D0D0E0D0D0D0D0C0D0C0C0D0C0C0C0C0C0C0B0C0B0B0B0B0C0C0B0C0C0B
+      0A0B0A0A0A0A0A0A0909090A0B0A0B1716162324232928282E2E2E3333332727
+      270606070607060606060606060606060606060506050506060505060F0F0D05
+      0505303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303535353A3A3A3B3B3B3C3C3C3D3D3D
+      3E3E3E39393930303035353539393A3F3F3F4343434545454646464747474747
+      474848484A4A4A4A4A4A4A4A4A4C4C4C4C4C4C4D4D4D4E4E4E4E4E4E50505050
+      50505050505151515252525353535151514A4A4A4242423A3A3A323232303030
+      3030303030303939393E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3F3F3F3939392F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F31313138383839393839383839
+      3838393838393838393838383838383838383838383838383838383838383838
+      3838383838383838383838383838383838383838373838373838373837373837
+      3738373738373738373737373737373737373737373735343532313230303030
+      3030313031313031313131313131313131313131323232323232323232323232
+      3333333333333333333434343434343535353838383A3A3A3B3A3A3E3E3E3F3F
+      3F4141414343434343434545454545454848484848484A4A4A4B4B4B4D4D4C4F
+      4F4E5150505251515453535655555858585959595C5C5C5E5E5E616161636363
+      6666656767676A6A6A6B6B6B6E6E6E7272727474747878787B7B7B7F7F7F8282
+      828686868989898D8D8D9191919595959999999C9C9CA1A1A1A4A4A4A8A8A8AC
+      ACACB0B0B0B4B4B4A3A3A39292929090908C8C8C8989898383837D7D7D787878
+      7272726D6D6D6868686363636060605B5B5B5757575353534E4E4E4949494445
+      4541403F3E3B323D455D3F62CD4071FF4070FF3F6EFF3E6DFF3E6CFF3C6CFF3B
+      6BFF3B6AFF3A69FF3A69FF3968FF3867FF3767FF3666FF3665FF3564FF3464FF
+      3363FF3262FF3261FF3161FF3060FF2F5FFF2F5FFF2E5EFF2D5DFF2D5CFF2B5B
+      FF2A5BFF2A5AFF2959FF2958FF2858FF2758FF2657FF2556FF2455FF2455FF23
+      54FF2253FF2152FF2152FF2051FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF
+      1A4CFF174AFF1D4BF4405193504E4540475E2445C01446FF1346FF1446FF1345
+      FF1244FF1143FF1042FF1041FF0E41FF0A40FF2A3D853E3B303C3C3C3C3C3C3C
+      3C3C3C3C3C3B3B3B3B3B3B3A3A3A3A3A3A393939383838373737363636353535
+      3434343232323030302E2E2E2C2C2C292929262626666666B2B2B2AEAEAEAAAA
+      AAA6A6A6A2A2A29E9E9E9999999393938F8F8F8A8B8A8786878484848181817D
+      7D7D7A7A7A7675767272726F6E6F6B6B6B6767676463646061605E5D5D5B5A5A
+      5757575554545151514D4E4E4C4B4B4949494747474444444242424140403E3D
+      3D3D3D3C3B3B3B3938393838373735353232323232323030303030302E2D2D2D
+      2D2D2828282323242323232221222221222121222524253333333A3A3A3F3F3F
+      4142414746464949494C4C4D3C3C3C1E1E1E1A1A1A1A1B1A1A1A1A1A1A1A1A19
+      1A191A1A191A1919191919191919191919191918191819191818181818181817
+      1818181818191819232424282828272727262727282827272728272827242424
+      1818181716171717171716161716161616161818181B1B1B1A1A1B1A1A1A1A1A
+      1B1A1A1A1A191917171717161716171616151616161618171717161717161617
+      1616161616161616161616151616151515161516151515151515151515141414
+      1415141414141414141414141314141313141413131313131514141C1C1B1C1C
+      1B1C1C1C1C1C1C18171813131313131313131313131313121213121212111112
+      11111211101111111111111110111110111111100F1010100F10101010100F10
+      100F0F0F0F0F0F0F0F0E0E0E0F0E0F0E0F0E0F0E0E0E0E0E0E0E0E0E0E0E0D0D
+      0E0D0D0E0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0B0C0B0C0C0C0B0C0B0B0A0C0B
+      0B0B0A0A0A0A0A0A0A0B0B1211122324242929282E2E2E3232332A2A2A070707
+      0706070606060606060606070606060606060606050606050D0F0F0605053030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303838383A3A3A3C3C3C3D3D3D3E3E3E40
+      40404343434545454646464747474848484949494A4A4A4A4A4A4B4B4B4C4C4C
+      4D4D4D4E4E4E4E4E4E4F4F4F5050505050505151515252525353535353534C4C
+      4C4444443D3D3D37373730303030303030303030303030303030303030303030
+      30303030303939393D3D3D3D3D3D3D3D3D3E3E3E3E3E3E3F3F3F3B3B3B303030
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3131313737373938383938383938
+      3839383839383838383838383838383838383838383838383838383838383838
+      3838383838383838383838383838383838383837383837383737383737383737
+      3837373837373737373737373737373737373737373737373636363333333131
+      3131303131303131313131313131313132323232323232323232323233333333
+      33333333333434343434343434343535353737373737373737373938383A3939
+      3C3B3C3E3D3D3F3E3E4140404242424444444545454747474949494A4A4A4C4C
+      4C4D4D4D5050505252525454545555555757575A59595B5B5B5D5D5D60606063
+      63636665656968686C6B6B6F6F6F7272727676767979797C7C7C808080838383
+      8787878A8A8A8E8E8E9292929595959A9A9A9D9D9DA1A1A1A5A5A5A9A9A9AEAE
+      ADB2B2B2B5B5B5A1A1A19393939090908D8D8D8989898383837E7E7E78787872
+      72726D6D6D6868686464646161615D5D5D5858585353534F4F4F4B4B4B464646
+      4242423F3D373D3C3B3E528E406BEC4071FF3F6FFF3E6DFF3E6CFF3C6CFF3B6B
+      FF3B6AFF3A69FF3A69FF3968FF3867FF3767FF3666FF3665FF3564FF3464FF33
+      63FF3262FF3261FF3161FF3060FF2F5FFF2F5FFF2E5EFF2D5DFF2D5CFF2B5BFF
+      2A5BFF2A5AFF2959FF2958FF2858FF2758FF2657FF2556FF2455FF2455FF2354
+      FF2253FF2152FF2152FF2051FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A
+      4CFF184BFF184AFF2748C61B48ED1448FF1548FF1547FF1546FF1446FF1345FF
+      1244FF1143FF0F43FF1141F4243C98383A413B3B393B3B3B3C3C3C3C3C3C3C3C
+      3C3B3B3B3B3B3B3B3B3B3A3A3A39393938383837373736363635353533333331
+      31313030302D2D2D2B2B2B2828285A5B5AB3B3B2AFAFAFABABABA7A7A7A3A3A2
+      9E9F9E9B9B9A9595958F8F8F8C8C8C8888878383838282837E7E7E7B7B7B7777
+      777273737070706D6C6D69696A6565656262625F5F5F5B5C5B5A5A5956555553
+      52525150504D4D4D4B4A4B4848484646464343434141413E3E3E3D3E3E3C3C3C
+      3A3A3A3939393637363434333332333131313030302F2F2F2D2C2D2C2B2B2525
+      242423232323232222222020212323243232313A3A3A3F3F3F4343434848484C
+      4B4C4949492E2E2E1B1B1B1B1B1B1B1A1B1A1B1A1A1A1A1A1A1A1A1A1A1A191A
+      1A1A191919191A191919191A1919191919181819181918181818181818181818
+      181718181817181E1D1E26262627272727272626272728272727272723222217
+      17171617161716171617171616161616161A1A1A1B1B1B1B1B1B1A1A1A1A1A1A
+      1A1A1A1818181617161717161717161615161817171817171716171716161716
+      1616161616161616161616161615151515151615151515151515151414141514
+      15141414141414141414141414141413131313141312131B1B1B1C1C1B1C1C1B
+      1C1B1C1919181313131313141313131313131312121212121212121211111211
+      111111111111101111111010101010101010100F10100F10100F100F100F1010
+      0F100F100F0F0F0F0F0F0F0F0F0F0E0F0F0F0E0F0F0E0E0E0E0E0E0D0E0E0D0E
+      0D0D0D0D0C0D0D0C0C0C0C0C0D0C0C0C0C0B0C0C0B0B0C0C0B0B0C0A0A0A0B0A
+      0A0A0A0A0A0B0B0F100F2222232728282E2D2D32323333333307070707070706
+      07070706070706060606060607060606060606060F0F0F050506303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303232323A3A3A3C3C3C3D3D3D3F3F3F4141414545
+      454747474A4A4A4B4B4B4C4C4C4D4D4D4D4D4D4E4E4E4F4F4F50505050505051
+      51515252525353535353534F4F4F4848483F3F3F393939303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303535353C3C3C3D3D3D3D3D3D3D3D3D3E3E3E3F3F3F3C3C3C3030302F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F30363535393838393838393838
+      3938383938383838383838383838383838383838383838383838383838383838
+      3838383838383838383838383838383738383738383738373738373738373738
+      3737383737373737373737373737373737373737373737373737373736353434
+      3332333130313131313131313131313232323232323232323232323333333333
+      333333333434343434343535353636363737373737373838383A39393B3A3A3C
+      3B3C3C3B3C3E3E3E3F3F3F4141414242424444444545454747474848484A4A4A
+      4C4C4C4E4E4E4F4F4F5252525454545757575959595B5B5B5E5E5E6060606463
+      636767676A69696D6C6C7070707373737676767A7A7A7D7D7D81818185858588
+      88888C8C8C8F8F8F9393939696969A9A9A9E9E9EA3A3A3A7A7A7AAAAAAAEAEAE
+      B2B2B2B4B4B4A2A2A19494949191918D8D8D8989898484847F7F7F7878787373
+      736E6E6E6969696565656161615D5D5D5959595555555050504C4C4C47474743
+      434340403E3D3B323D42533E5CB5406FFF3F70FF3E6DFF3E6CFF3C6CFF3B6BFF
+      3B6AFF3A69FF3A69FF3968FF3867FF3767FF3666FF3665FF3564FF3464FF3363
+      FF3262FF3261FF3161FF3060FF2F5FFF2F5FFF2E5EFF2D5DFF2D5CFF2B5BFF2A
+      5BFF2A5AFF2959FF2958FF2858FF2758FF2657FF2556FF2455FF2455FF2354FF
+      2253FF2152FF2152FF2051FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4C
+      FF194BFF174AFF1749FF1749FF1748FF1648FF1547FF1546FF1446FF1146FF11
+      44FF1C3EBC2F37563A362B3A39363A3B3B3B3B3B3C3C3C3C3C3C3C3C3C3C3C3C
+      3B3B3B3B3B3B3B3B3B3939393838383737373636363434343333333030302E2E
+      2E2C2C2C2A2A2A5B5A5BAFB0B0AFAFAFABABABA7A7A7A4A4A4A0A0A09B9C9C98
+      98979090908D8C8C8888888585858181818080807C7C7C787878747474717171
+      6E6E6D6A69696667666363636060605C5D5D5A5A5A5757575454545251514F4E
+      4E4C4C4C4949494747474545444343434040403E3E3E3E3D3D3B3B3B3A393A38
+      38393737373233333233333031303030312F2F2E2D2D2D282828232323242324
+      2222232222222323232D2E2E3938393D3E3E4443434848484D4D4C4C4B4C2727
+      261B1B1C1B1B1B1B1B1B1B1B1B1B1A1B1A1B1B1A1A1A1B1A1A1A1A1A1A191A1A
+      1A191A1A1A19191919191A191819191819191919191818181918181818181718
+      1718181717181A1A1B2525252626262726262727272828272827271E1E1F1717
+      171716171616171716161617161717171A1A1B1B1B1B1B1A1B1B1A1A1A1A1A19
+      1919171717161617171716161617171817181817181717171716171616171616
+      1617161616161616161516161515161515151515151515151515151515151414
+      151515141414141414141414141413141313131919191C1B1B1C1C1B1C1C1B1A
+      1B1B141414131313131313131313121313131212131212121112121112111111
+      1011101011111011101010101010101010101010101010100F100F10100F0F10
+      0F0F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0E0E0E0E0E0E0E0E0D0E0D0D0D0D
+      0D0D0D0C0C0D0C0C0C0D0C0C0C0C0C0C0C0B0B0C0C0B0B0B0B0A0B0A0A0A0B0A
+      0A0A0A0D0D0D2222212728272D2D2D3131313636360707070707070707070706
+      070706070606070706060606060606060D0F0D06060630303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303535353C3C3C3D3D3D3F3F3F4343434747474A4A4A
+      4D4D4D4E4E4E5050505050505050505151515252525353535151514A4A4A4242
+      423B3B3B32323230303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303535353C3C3C3C3C3C3D3D3D3D3D3D3E3E3E3E3E3E3D3D3D3232322F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F31313139383839383839383839383839
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838383838383838383838373838373837373837373837373837373837
+      3737373737373737373737373737373737373737373737373737373737373737
+      3636353434333333313131323232323232323232323232333333333333333333
+      3434343434343535353636363737373737373737373939393A39393C3B3B3C3B
+      3C3D3C3D3F3F3F4040404141414343434444444646464747474949494B4B4B4D
+      4D4D4F4F4F5050505353535555555757575A5A5A5C5C5C5F5F5F626262656464
+      6867676A6A6A6E6D6D7171717474747777777B7B7B7D7D7D8181818585858989
+      898C8C8C9090909494949898989C9C9CA0A0A0A3A3A3A7A7A7ABABABAEAEAEB2
+      B2B2B5B5B5A2A2A19494949292928E8E8E8A8A8A8585857F7F7F797979747474
+      6E6E6E6A6A6A6565656262625E5E5E5A5A5A5656565151514E4E4E4949494545
+      454242423F3E393D3B343D486B3E61C73F6FFF3E6FFF3E6DFF3C6BFF3B6BFF3B
+      6AFF3A69FF3A69FF3968FF3867FF3767FF3666FF3665FF3564FF3464FF3363FF
+      3262FF3261FF3161FF3060FF2F5FFF2F5FFF2E5EFF2D5DFF2D5CFF2B5BFF2A5B
+      FF2A5AFF2959FF2958FF2858FF2758FF2657FF2556FF2455FF2455FF2354FF22
+      53FF2152FF2152FF2051FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF
+      1A4BFF194AFF1849FF1749FF1748FF1548FF1448FF1347FF1A40CE2836693332
+      2D35342C3736363939393A3A3A3B3B3B3C3C3C3C3C3C3D3D3D3D3D3D3C3C3C3B
+      3B3B3B3B3B3A3A3A3838383737373535353333333232323030302D2D2D2B2B2B
+      5C5C5CB0B0B0AFAFAFABABABA8A8A8A4A4A4A0A0A09C9C9C9898989494948C8D
+      8D8989898585858281817F7F7E7E7D7D7979797776777272726F6F6F6B6B6B68
+      67686565656161625E5F5E5B5B5B5858585556565353525150504E4D4D4B4A49
+      48484846464544434441424240403F3E3E3E3D3D3D3A3A3A3939393737383535
+      353333323232323030302F2F302D2D2D2C2C2C25252524242423242323232323
+      24232626263939393D3C3C4142414848484D4D4D4D4D4D2727271C1D1D1B1C1C
+      1B1B1C1B1B1C1B1B1B1A1B1B1B1B1B1B1A1A1B1A1A1A1A1A1A1A1A1A1A1A1919
+      1A1A191919191919191919191918191919191918181819181818181918181818
+      18171818171A1A1A252525262626262626272727272728262627191919171717
+      1717171616171717161617171A191A1B1B1B1A1B1A1B1A1B1A1B1A1A1A191818
+      1817171717171617171716161618181718181718171718171717161717161616
+      1717151616151516151616151616161515151515151515141515151515151415
+      1414141414141314141314131413141717171C1C1B1C1B1B1C1C1B1C1C1B1414
+      1513131413131313131313131313121212121212111112111212111111111111
+      11111111111011101111101010111010101010100F1010100F1010100F0F0F10
+      0F0F0F0F0F0F0F0F0E0F0F0F0F0F0E0E0E0E0E0E0F0E0D0E0D0D0E0D0D0D0D0D
+      0D0D0C0C0C0C0C0C0D0C0C0C0C0C0C0C0B0A0B0A0A0B0A0B0B0B0A0A0A0A0B0D
+      0D0D2020202728282D2C2D323131363636101010070707070707070707060706
+      0607070606070707060606060F0F0F0606063030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303A3A3A3E3E3E4040404545454A4A4A4D4D4D50505052
+      52525353535353534C4C4C4444443D3D3D373737303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303434343B3B3B3B3B3B3C3C3C3D3D3D3E3E3E3E3E3E3E3E3E3434342F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F3434343938383938383938383938383938383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838383838383837383837383737383737383737383737383737383737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737373737373736363634343433333332323233333333333333333333333334
+      34343434343535353636363737373737373838383939393B3A3A3C3B3B3C3B3C
+      3E3D3E3F3F3F4040404242424444444444444646464848484A4A4A4B4B4B4D4D
+      4D4F4F4F5252525353535656565858585B5B5B5D5D5D5F5F5F63636366656568
+      67676B6B6B6E6E6E7272727575757878787B7B7B7F7F7F8383838787878A8A8A
+      8E8E8E9292929595959999999C9C9CA0A0A0A4A4A4A7A7A7ABABABAEAEAEB2B2
+      B2B4B4B3A3A3A29595959292928E8E8E8A8A8A8585858080807B7B7B75757570
+      70706B6B6B6666666363636060605C5C5C5858585454545050504C4C4C474747
+      4444454242413F3D363C3C393D4A713E60C73E6EFF3E6FFF3C6CFF3B6BFF3B6A
+      FF3A69FF3A69FF3968FF3867FF3767FF3666FF3665FF3564FF3464FF3363FF32
+      62FF3261FF3161FF3060FF2F5FFF2F5FFF2E5EFF2D5DFF2D5CFF2B5BFF2A5BFF
+      2A5AFF2959FF2958FF2858FF2758FF2657FF2556FF2455FF2455FF2354FF2253
+      FF2152FF2152FF2051FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A
+      4BFF194AFF1849FF164AFF1649FF1B42CE2536702F2F2E322F26333231353535
+      3737373838383A3A3A3C3C3C3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3B3B3B3A3A
+      3A3A3A3A3939393737373535353333333131313030302D2D2D5D5D5DB0B0B0AF
+      AFAFABABABA8A8A8A4A4A4A1A1A19C9C9C9898989595959190908A8A8A858586
+      8382827E7E7E7D7D7D7A7A7A777776747373706F6F6C6C6C6969696465656262
+      625F60605C5C5C5959595656565454545152514E4F4E4C4C4C4A494948474745
+      44444343434040413E3F3E3D3C3C3C3B3B3B3A39393839363737343333333333
+      31303130302F2F2E2E2D2D2E2A2A2A2424242424232223232323232324233333
+      343C3C3C4140414747464C4C4B5151502D2D2D1D1D1D1C1D1D1C1C1C1C1B1B1C
+      1B1B1B1B1B1B1B1B1B1B1B1A1B1A1A1B1A1A1A1A1A1A1A1A1A1A1A1A191A1A1A
+      1919191A19191919191819191919181818181918181818181818181818181818
+      181817181B1B1B25252526262626262627262727272723232417171717171717
+      17161617171617161818181B1B1B1B1B1A1B1A1B1B1B1A1A1A1A191919171717
+      1617171716171617161717171818181818171817171817171717161716161716
+      1616161616161615151616151516151615151615151515151515151514141414
+      14141414141414141414131616151B1B1C1C1C1B1C1B1B1C1C1B161515141413
+      1413141313131313131312121212121211111212111211111111111111111011
+      1111111010101110101010111110101010100F0F0F10100F100F10100F100F0F
+      0F0F0F0F0F0F0E0F0F0F0F0F0E0F0F0E0E0E0D0E0E0D0E0D0D0D0D0C0D0D0D0C
+      0D0D0D0C0C0C0B0B0B0B0B0B0B0B0B0B0B0B0B0B0A0B0B0B0B0B0C0D0D0D1F1F
+      1F2828282E2D2E33323238383814141407070707070707070606070607070606
+      07070606070706070F0F0F060606303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303131313E3E3E4242424747474C4C4C4C4C4C4747473F3F3F3939
+      3930303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303333333939393A3A3A3B3B3B3D3D3D3E3E3E3F3F3F3F3F3F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F353535393938393838393838393838393838393838383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838383738383738383738373738373738373738373738373737373737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737373737373838383838373737373636363636363434343333333434343434
+      343535353636363737373737373737373838383939393C3B3B3C3B3B3D3C3D3F
+      3E3F4040404141414242424444444545454747474848484B4B4B4C4C4C4E4E4E
+      4F4F4F5252525454545757575959595B5B5B5E5E5E6060606363636666666A6A
+      6A6C6C6C7070707473737777777A7A7A7D7D7D8080808383838787878A8A8A8E
+      8E8E9292929595959999999D9D9DA0A0A0A4A4A4A7A7A7ABABABAEAEAEB2B2B1
+      B5B5B4A5A5A59595959393938F8F8F8C8C8C8787878181817C7C7C7777777272
+      726D6D6D6868686464646060605E5E5E5959595656565252524E4E4E4A4A4A46
+      464743434341403F3E3C353D3C3A3D49703D5DC03D6BFB3C6EFF3B6CFF3B6AFF
+      3A69FF3A69FF3968FF3867FF3767FF3666FF3665FF3564FF3464FF3363FF3262
+      FF3261FF3161FF3060FF2F5FFF2F5FFF2E5EFF2D5DFF2D5CFF2B5BFF2A5BFF2A
+      5AFF2959FF2958FF2858FF2758FF2657FF2556FF2455FF2455FF2354FF2253FF
+      2152FF2152FF2051FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4DFF194D
+      FF194AFC1E41C126366D2E2E2F302D2331302E3131323434343636363838383A
+      3A3A3B3B3B3D3D3D3E3E3E3E3E3E3D3D3D3D3D3D3C3C3C3C3C3C3A3A3A393939
+      3838383737373535353232323030302D2D2D6B6B6BB3B3B3B0AFB0ABABABA8A8
+      A8A4A4A4A0A0A19C9D9D99999A9596959292928D8D8D8687878382837F7F7F7B
+      7B7B7B7A7A7878777574747171716E6D6D6A6A6A6666666464646161615C5D5D
+      5A5B5A57585855555552525250504F4D4D4D4B4A4A4848484645454443434342
+      423F3F3E3D3D3E3D3C3C3B3B3A3A393939373836363533333433323331313230
+      30302E2D2E2D2C2D25262624252424242523232323232229292A3B3A3A3F3F3F
+      454545494A4A504F503738371E1E1D1D1D1D1D1C1C1B1C1C1C1B1C1C1B1B1B1B
+      1B1B1C1B1B1B1B1B1B1B1B1B1B1A1A1B1B1A1B1A1A1A1A1A1A1A1A1A191A1919
+      1A19191A19191919191919191919191819181919181818181818181818181818
+      1717182020202625252626262526262727272828281B1B1B1717171717171717
+      171617171617171B1B1A1B1B1B1A1B1B1A1A1A1B1A1A1A1A1A17171717171717
+      1717171716171817181818181817181817181717181617171716171616161616
+      1616161615161616161615151516151515151515151515151514151414141414
+      141514141414141515151C1C1B1C1C1B1C1B1B1C1B1B18181713141314141414
+      1413131313141313121212131212121211121111121112111111111111111110
+      11111010111011101011101110101010101010100F0F0F0F10100F0F100F0F0F
+      0F0F0F0F0F0F0F0E0E0F0F0E0E0E0E0E0E0D0E0D0D0D0D0D0D0D0D0D0B0B0B0B
+      0C0B0C0B0B0B0B0B0B0B0B0A0B0B0B0B0A0C0C0B0C0B0C0F0E0E2020202A2A2A
+      3030303434353939391B1A1A0707070707080707070707060606070706060606
+      060606070F0F0F06060630303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303535353A3A3A383838343434303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3232323838383A3A3A3B3B3B3D3D3D3E3E3E3D3D3D2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F36363639393839383839383839383839383839383838383838383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838373838373837373837373837373837373837373737373737373737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737383838383838383837383837393838393838393838393938383838373737
+      3737373837373837373737373838383939393A3A3A3C3B3B3C3B3B3E3D3E3F3E
+      3F4040404141414343434444444646464747474949494B4B4B4D4D4D4F4F4F50
+      50505353535555555757575A5A5A5D5C5C5F5F5F6363636666666969696C6C6C
+      6E6E6E7171717575757878787A7A7A7E7E7E8181818484848888888A8A8A8E8E
+      8E9292929595959999999D9D9DA0A0A0A4A4A4A7A7A7ABABABAEAEAEB2B2B1B5
+      B5B4A7A7A79595959494949090908D8D8D8888888383837D7D7D787878737373
+      6E6E6E6969696565656262625F5F5F5B5B5B5858585555555151514C4C4C4949
+      4945454543434340403F3F3C353D3C373C445E3D56A53C66E63C6CFF3B6CFF3A
+      6AFF3A69FF3968FF3867FF3767FF3666FF3665FF3564FF3464FF3363FF3262FF
+      3261FF3161FF3060FF2F5FFF2F5FFF2E5EFF2D5DFF2D5CFF2B5BFF2A5BFF2A5A
+      FF2959FF2958FF2858FF2758FF2657FF2556FF2455FF2455FF2354FF2253FF21
+      52FF2152FF2051FF1F50FF1E50FF1E50FF1C50FF1C4EFF1D49E92340A62B3559
+      2F2E2A302D2430302E3131313333333434343636363838383A3A3A3C3C3C3D3D
+      3D3D3D3D3E3E3E3E3E3E3E3E3E3D3D3D3C3C3C3C3C3C3A3A3A39393937373735
+      35353434343232322F2F2F757474B3B3B3B0B0AFACABACA8A8A9A4A4A4A1A1A1
+      9D9C9D9A9A999695969292928E8E8E8989898383838080807B7C7C7878787979
+      797575747272726F6E6E6C6B6B6867686565656161615E5E5E5C5C5C58585855
+      55555352525050504D4E4E4C4C4C4949484748474645454342424140403F3E3E
+      3D3D3C3C3C3B3A3A3A3939383837373534343334333132313031302F2F2F2E2E
+      2E2B2A2B2524252425242324232323232424243433343D3D3E4342424848484D
+      4D4D4A4B4B1E1E1E1D1E1D1D1E1D1C1C1D1C1C1C1C1B1C1B1C1B1C1C1B1B1B1C
+      1B1B1B1B1A1B1B1B1B1A1B1B1B1A1A1B1A1A1A1A1A1A191A1A1A1A191A1A191A
+      191A191919191919191919191819191918181818181818181818181818181818
+      1919232323252525262626272726272727242424171717171717171717161717
+      1616161A191A1B1B1B1B1B1B1B1A1B1A1B1A1B1A1A1818181717181717171717
+      1718171818191918181818181718181718171718161717171617161616161616
+      1616151616151515151516151516151515141514151415151415151514141414
+      1415151414141B1C1C1C1C1B1C1C1B1C1B1B1918181414141414141414131313
+      1314131313121213121213111212121112111211111111111111111010111110
+      1111101110101010101010101010101010100F10100F101010100F0F0F0F0F10
+      0F0F0F0F0F0F0E0E0F0E0E0E0E0E0E0D0D0E0C0D0C0C0C0C0C0C0C0C0B0C0B0C
+      0C0B0B0B0B0B0C0C0C0C0C0C0C0D0D0E1110101D1D1C2828282E2E2E33333338
+      38383C3C3C222221080707070708070807070707070707060707060706070706
+      0F120F0606063030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303033
+      33333939393A3A3A3C3C3C3D3D3D3B3B3B2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      3939383939383938383938383938383938383938383838383838383838383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3837383837383837383737383737383737383737383737373737373737373737
+      3737373737373737373737373737373737373737373737373737373737373838
+      383838383838373838373938383938383938383938383A39393939393A3A3A3B
+      3B3B3B3B3B3B3B3B3C3B3B3C3C3C3D3D3D3D3D3D3E3E3E3F3F3F414141414141
+      4343434444444545454747474848484A4A4A4C4C4C4D4D4D5050505252525454
+      545756565958585B5A5A5D5C5C5F5F5F6262626464646666666A6A6A6C6C6C6F
+      6F6F7272727575757878787B7B7B7F7F7F8181818585858888888B8B8B8F8F8F
+      9292929595959999999D9D9DA0A0A0A4A4A4A7A7A7AAAAAAAEAEADB1B1B1B5B5
+      B4ACACAC9797979494949191918E8E8E8A8A8A8585857F7F7F7A7A7A75757570
+      70706C6C6C6767676363636161615D5D5D5A5A5A5656565353534F4F4F4C4C4C
+      4848484646464343444141403F3D383D3B333C3F463C4B7B3B59B53B66ED3A6A
+      FF396BFF3969FF3868FF3767FF3666FF3665FF3564FF3464FF3363FF3262FF32
+      61FF3161FF3060FF2F5FFF2F5FFF2E5EFF2D5DFF2D5CFF2B5BFF2A5BFF2A5AFF
+      2959FF2958FF2858FF2758FF2657FF2556FF2455FF2455FF2354FF2253FF2152
+      FF2153FF1F53FF1F51FF1F4DF02344B9293A792E323E302E25312F2831313032
+      32323333333434343636363737373939393B3B3B3D3D3D3D3D3D3E3E3E3E3E3E
+      3E3E3E3F3F3F3F3F3F3E3E3E3C3C3C3B3B3B3A3A3A3939393737373434343333
+      333A3A3A868686B3B3B3AFAFAFABACACA8A8A8A4A4A4A1A1A19D9D9D9A9A9A95
+      96969292928E8E8E8B8B8B8584848080807D7D7D787878777677767676727272
+      70706F6C6D6C696968666565636262605F5F5C5C5C5A5A5A5757565353545252
+      51504F4F4D4D4D4A4A4A484848464646444343434242403F3F3E3D3D3C3C3C3C
+      3B3B3A3A3A3939393838363535353332333232313030302E2F2E2E2E2E282828
+      2525252525242423232323242626273B3B3B3F3F3F4545464B4C4B5050513131
+      311D1E1E1E1E1E1D1D1D1C1C1C1C1C1C1C1C1C1C1C1B1B1C1B1C1C1B1B1B1C1B
+      1B1B1B1B1B1B1A1B1B1B1A1A1B1A1A1A1A1A1A1A1A1A1A1A191A191A19191919
+      1A19191919191918191919191818181918181818181818181818181817171D1D
+      1C24242425252526262627272627272819191918171717171717171717171618
+      17171C1C1B1B1B1B1B1B1B1B1B1A1A1B1A1A1919171717171818171717161717
+      1818191819181918181818181818171717171817161716171716161616161616
+      1616161616161516151515151515151515151515151515151414141514141414
+      14141A1A191C1C1C1C1C1C1B1B1B1B1919141414141414131414141414141313
+      1312131312121312121311121211111112121111111111111111111110111110
+      111011111010101010101010101010100F0F100F0F0F1010100F0F0F0F0F0F0F
+      0F0F0F0E0E0E0E0E0D0C0E0C0D0C0C0C0C0C0C0C0C0C0C0B0C0B0C0C0B0C0D0D
+      0C0C0C0D0E0D1010101A1A192424242827272C2C2C3131313737373A3A3A3C3B
+      3C212221080807070707080707070707070707070707060706070706120F0F06
+      0606303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303333333838
+      383939393B3B3B3D3D3D3736372F2F2F2F2F2F2F2F2F2F2F2F2F2F3039393839
+      3938393938393838393838393838393838393838383838383838383838383838
+      3838383838383838383838383838383838383838383838383838383838373838
+      3738383738373738373738373738373738373737373737373737373737373737
+      3737373737373737373737373737373737373737373737373737373737383838
+      3838373838373838373938383938383938383A39393A39393939393A3A3A3B3B
+      3B3B3B3B3B3B3B3D3D3D3E3E3E3E3E3E3F3F3F40404041414142424243434345
+      45454646464747474A4A494A4A494C4C4B4E4D4D504F4F515050535252555454
+      5857575A59595B5B5B5E5D5D5F5F5F6262626565656767676A6A6A6D6D6D6F6F
+      6F7272727575757878787C7C7C7F7F7F8282828585858888888B8B8B8F8F8F92
+      92929595959999999D9D9DA0A0A0A3A3A3A7A7A7AAAAAAADADADB0B0B0B4B4B4
+      B0B0B09B9B9B9595959292928F8F8F8B8B8B8686868181817C7C7C7878787373
+      736E6E6E6A6A6A6565656262626060605C5C5C5959595656565252524F4F4F4B
+      4B4B4848484646464444444242423F3E3C3E3B343C3A353B3F4A3B4A793A55AD
+      3960DE3967F93869FF3669FF3668FF3566FF3565FF3464FF3363FF3262FF3261
+      FF3161FF3060FF2F5FFF2F5FFF2E5EFF2D5DFF2D5CFF2B5BFF2A5BFF2A5AFF29
+      59FF2958FF2858FF2658FF2657FF2556FF2457FF2357FF2355FF2251F9234CDD
+      2643AA2A3A752E3242312F2A32302632312E3333323333333535353636363737
+      373838383A3A3A3B3B3B3D3D3D3E3E3E3F3F3F3F3F3F4040404040403F3F3F3F
+      3F3F3F3F3F3E3E3E3C3C3C3B3B3B393939373737363636343434464646999898
+      B3B2B2AFAEAEABABABA8A8A8A4A5A5A1A1A09D9D9D9A9A9A9696969292928E8E
+      8E8C8B8C8787878181817D7D7D7979797676767373737473747170706D6D6D69
+      69696767666363636060605E5D5E5B5A5A5757575554555352535150504E4E4D
+      4B4B4B4848494746474545454444444140403F3F3F3E3D3D3B3B3A3A3B3B393A
+      3A3838373637373433333232313131312E2F2F2F2F2E2F2E2F25262525252524
+      2424222223242423302F2F3D3D3D4140414748484D4D4D4B4B4B1F1E1E1E1E1E
+      1E1E1E1D1D1D1D1D1D1C1D1C1D1C1C1C1C1C1C1C1B1C1C1C1B1B1B1B1C1B1B1B
+      1C1B1B1B1B1B1B1B1A1B1A1A1B1B1B1A1A1A1A1A191A1A191A191A1919191919
+      19191A1919181919181919181918181818181918181818181818171818222222
+      2424252525252526262627271D1E1E1718181818171717171717171717171B1B
+      1B1C1C1B1B1C1B1B1B1B1B1B1A1A1A1917181818181817171717171719181918
+      1919181819181818181817181817181717181617171617171716161616161616
+      1616161515151615151516151515151515141515141514141414151514141919
+      191C1C1C1C1C1C1C1C1C1C1B1B14141414141414141413141413131313131313
+      1212131212131212121212121112111112121111111111111111111110101110
+      111010111011101110101010101010100F10100F101010100F100F0F0E0F0E0E
+      0E0D0D0D0D0C0C0D0C0C0C0D0C0D0C0C0C0C0C0D0D0D0D0D0D0E0D0E100F0F19
+      19192222222626262828282D2D2D3131323736363939393C3C3C3D3D3D282727
+      08070807080707080708070707070707070707070706070712120F0706073030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030333333373737393939
+      3B3B3B3D3D3D3434342F2F2F2F2F2F2F2F2F2F2F2F3131313939393939383939
+      3839383839383839383839383839383838383838383838383838383838383838
+      3838383838383838383838383838383838383838383838383838383837383837
+      3837373837373837373837373837373737373737373737373737373737373737
+      3737373737373737373737373737373737373737373737373738383838383838
+      38373838373938383938383938383938383A39393939393A3A3A3B3B3B3B3B3B
+      3B3B3B3C3C3C3D3D3D3E3E3E3F3F3F4040404040404242424242424444444545
+      454646464848484A4A494B4B4A4D4C4C4E4D4D51505052515154535355545458
+      57575A59595C5B5B5E5E5E6060606262626565656767676A6A6A6D6D6D707070
+      7373737575757878787C7C7C7F7F7F8282828585858888888B8B8B8F8F8F9292
+      929595959999999C9C9CA0A0A0A3A3A3A6A6A6A9A9A9ACACACB0B0B0B3B3B3B2
+      B2B2A0A0A09595959393939090908C8C8C8888888383837F7F7F797979757575
+      7171716C6C6C6868686565656161615E5E5E5B5B5B5858585555555252524F4F
+      4F4C4C4C4949494747474545454242424040403F3E3B3E3B343D3B343B3C403A
+      425B3A4C853954AA375BCF3761EB3564F93565FF3465FF3366FF3264FF3263FF
+      3162FF2F61FF2F60FF2E60FF2E5FFF2D5EFF2C5EFF2B5DFF2A5DFF295CFF285C
+      FF285AFF2859FF2757FA2754ED284DCD2945A52B3D802D36542F3035312E2732
+      2F2532312D3333323434343535353636363737373939393A3A3A3B3B3B3C3C3C
+      3D3D3D3F3F3F4040404040404141414141414141414141414141413F3F3F3E3E
+      3E3E3E3E3C3C3C3B3B3B3939393737373535355A5A5AA5A4A5B2B1B1AFAEAFAB
+      AAABA7A7A7A4A3A4A1A1A19D9D9D9999999696969292928E8E8E8C8C8C888888
+      8485847D7D7D7979797676767373737171707071716D6D6D6A6B6A6767676464
+      646161605E5E5D5C5C5C5A58585756565353535151514E4E4D4B4C4C4A494948
+      48484646464444434242423F40403F3E3E3C3D3C3B3A3A3A3A3A393939373636
+      3535363232333232323030302F2E2E2E2F2F2C2B2C2525252525252424242423
+      232425253536363D3D3D4444444949494F4F4F3534351E1E1F1E1E1E1E1E1E1D
+      1D1D1D1D1D1D1C1C1D1C1D1C1C1C1C1C1C1C1C1C1C1C1B1B1C1B1B1B1C1B1B1B
+      1B1B1B1B1B1B1B1A1B1A1B1B1A1A1A1A1A1B1A1A1A1A191A19191919191A191A
+      191919191819191919191919181918191818181818181818181D1D1D24252425
+      25262626262727272525251817181718171717171717171717171B1A1A1B1C1C
+      1C1C1B1B1B1B1B1B1A1A1B1A1917171818171718181717171818181819191818
+      1818181819181818181717171718171718161717161617161616161616161616
+      16161616161616151515151515151515151515151415141414151818181C1C1C
+      1C1C1C1C1C1B1B1B1C1514151414151414141413141314141313131312131312
+      1213131213121212121112111212111111111211111111111111111110101111
+      10101110101010101010101010100F0F0F0F10100F0E0F0D0D0D0E0D0D0C0D0D
+      0D0D0D0D0C0C0D0C0D0D0E0E0D0D0D0E0E0E0F0F0E1617172121212525252829
+      282B2B2C3030303232323737373A39393D3D3D35353515151508080808080708
+      0807080707070807070708070707070707070706120F12060707303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303434343636363838383A3A3A3D
+      3D3D3232322F2F2F2F2F2F2F2F2F2F2F2F333333393939393938393938393838
+      3938383938383938383938383938383838383838383838383838383838383838
+      3838383838383838383838383838383838383838383838383738383738383738
+      3737383737383737383737383737373737373737373737373737373737373737
+      3737373737373737373737373737373737373737373838383838383838373838
+      373838373938383938383938383A39393939393939393A3A3A3B3B3B3B3B3B3B
+      3B3B3C3C3C3E3E3E3E3E3E3F3F3F404040414141424242434343454545464646
+      4747474949484A4A494C4B4B4D4C4C4E4D4D5150505251515454545655555858
+      585A59595C5B5B5E5E5E6060606262626565656868686A6A6A6D6D6D71717173
+      73737575757979797C7C7C7F7F7F8282828585858888888B8B8B8F8F8F929292
+      9595959999999C9C9C9F9F9FA2A2A2A5A5A5A9A9A9ABABABAFAFAFB2B2B2B4B4
+      B4A7A7A79696969494949292928E8E8E8A8A8A8686868181817C7C7C78787874
+      74747070706B6B6B6767676464646161615E5E5E5B5B5B595959555555525252
+      5050504D4D4D4A4A4A4848484646464343434242424141403F3F3D3E3C383D3A
+      313C3A323C3C3D3B3D453A425B394776374B8C374FA03553B13454C13456C933
+      59D93159DD3058DD3058DD2F57DD2E56DB2F51C92E4FC22E4CB12E489F2F448B
+      2F3E74313A5931343D32323332302733302633322C3332303333333535353636
+      363737373838383939393B3B3B3C3C3C3D3D3D3E3E3E3F3F3F40404041414141
+      41414343434343434343434242424242424141414141414040403E3E3E3D3D3D
+      3C3C3C3A3A3A383838393939757576ADADAEAFAFAFAEADAEAAA9A9A7A7A7A3A3
+      A3A0A0A09D9D9D9999999696969392928F8E8E8C8C8C88888885858581818179
+      79797677767474747070706F6F6F6E6E6D6B6C6C6868686564646262625F5F5E
+      5C5C5C5A59595757565453535251514F4F4F4D4D4D4B4B4B4949494747474444
+      444242424041413F3F3E3E3E3D3C3B3B3B3A3A3B3A3A38383737373735353533
+      33333131312F2F2F2F2F2F2D2E2E29292A252626242424232323232323262626
+      3B3C3B3F3F404444444B4B4B5050502425251F1F1E1F1E1F1E1E1E1D1D1D1D1C
+      1D1C1C1D1D1D1C1D1C1C1C1C1C1C1C1C1C1C1C1C1C1C1C1B1B1C1B1C1B1B1C1B
+      1B1B1B1A1B1A1A1A1A1A1B1B1B1A1A1A1A1A1A1A1A1A1A19191A1919191A1A19
+      191919191919181918181818181818181818181818191A1A2424242524252525
+      252626262728281819181717181717171717171717171919191B1B1B1C1B1B1B
+      1B1B1B1B1B1B1B1A191919191717171817181717191818191919181919181818
+      1818191918181818171818171817171717171717161716161617161616161616
+      151515151615161616151515151415151515141414141819181D1C1C1C1C1C1B
+      1C1B1C1C1B151415141414151414141414141414141313141313141312131212
+      1312121211111212121112111111121111111111111111111111101111101010
+      111011101010101010100F0F0F0D0D0D0E0D0E0E0D0E0D0D0E0D0D0D0C0D0C0E
+      0E0D0E0E0E0D0D0D100F0F1414141F1F1F2526262929292C2C2B2F3030333232
+      3535353838383A3A3A3839391C1C1D0908080808080808080807080808070808
+      0808070707080808070707070707070712121206060730303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303434343636363838383A3A3A3D3D3D2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F35343439393939393839393839393839383839
+      3838393838393838393838383838383838383838383838383838383838383838
+      3838383838383838383838383838383838383838373838373838373837373837
+      3738373738373738373737373737373737373737373737373737373737373737
+      3737373737373737373737373737373737373737383838383837383837383837
+      3938383938383938383938383A39393939393A3A3A3B3B3B3B3B3B3B3B3B3C3C
+      3C3D3D3D3E3E3E3F3F3F3F3F3F40404042424242424243434345454546464647
+      47474949484A4A494C4B4B4D4D4D4F4E4E515050535252545454575656585858
+      5B5A5A5C5C5C5F5F5F6161616363636666666868686B6B6B6D6D6D7171717373
+      737676767979797C7C7C7F7F7F8282828585858888888B8B8B8E8E8E92929295
+      95959898989B9B9B9E9E9EA2A2A2A4A4A4A8A8A7ABABABAEAEADB1B1B1B5B4B4
+      AEAEAE9B9B9B9595959393939090908C8C8C8989898484847F7F7F7B7B7B7777
+      777373736E6E6E6A6A6A6666666363636161615E5E5E5B5B5B58585856565653
+      53535151514E4E4E4C4C4C494949484848464646444444424242414141403F3F
+      3F3E3D3E3D3B3E3C373C3A333C392F3C392F3B39333A3A383A3939393A3E393A
+      3F38393E37393D37393D37383C36363636353436342F37342937332936342C36
+      352F3635323635343636353737373737373737373838383939393B3B3B3C3C3C
+      3C3C3C3E3E3E3F3F3F4040404141414242424343434343434444444444444444
+      444444444545454444444242424242424040404040403E3E3E3C3C3C3B3B3B3A
+      3A3A4D4D4D939393AFB0B0ABABABABAAAAAAAAAAA6A5A5A3A2A2A0A0A09C9C9C
+      9999999595959292928E8E8E8C8B8B8888888585858181817E7E7E7676777474
+      747070706D6D6E6C6C6C6C6C6C6868686566666362626060605D5D5D5B5B5A58
+      5857565554535252504F4F4E4E4E4B4B4B494949474746444444444343414241
+      3F3F3F3E3E3E3C3C3B3A3A3A3A3A3A3938383837373636363534343132323031
+      3130302F2F2F2F2E2D2E28282826262525242523232323242429292A3C3C3C42
+      42424546454C4C4C4848481F1F1F1F1E1F1E1F1E1D1D1E1D1D1D1D1D1D1D1D1D
+      1D1C1D1D1D1C1D1C1C1C1C1C1C1C1C1C1B1C1B1C1B1B1B1B1B1B1B1B1B1B1B1B
+      1B1B1B1A1A1A1A1B1B1B1B1A1B1A1A1A1A1A1A1A191A1A1A1A19191A19191919
+      1919181919181919191918191918181818181818222122252525262525262626
+      2727271C1C1C1817181818181817171717181818181C1C1C1C1B1B1C1C1B1C1B
+      1B1B1B1A19191919191918181718181818181819191919191919191918191918
+      1918191818181817181817181717181617171716171716161616161616161616
+      1516151616151515161515151515141515151717161D1D1C1D1C1C1C1C1C1C1C
+      1C16171615141514141414141414141413131313131314121213131213121212
+      1212121212121212121212121111111111121211111111101111111111111111
+      1010110F0E0E0E0D0E0E0D0E0D0D0E0E0D0E0D0D0D0D0D0D0F0E0E0E0D0E100F
+      0F1312131E1F1E2626262929292B2B2B2E2F2E323232343534383838393A3A37
+      37372222220C0C0C080809090808090809080808080808080808080808070808
+      0707080708080707070707071212120707073030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303131313434343636363838383B3B3B3C3C3C2E2E2E2F2F2F
+      2F2F2F2F2F2F2F2F2F3636363939393939393939383939383938383938383938
+      3839383839383838383838383838383838383838383838383838383838383838
+      3838383838383838383838383838383838383837383837383737383737383737
+      3837373837373737373737373737373737373737373737373737373737373737
+      3737373737373737373737373737373738383838383838383738383738373739
+      38383938383938383A39393939393939393A3A3A3B3B3B3B3B3B3B3B3B3C3C3C
+      3E3E3E3E3E3E3F3F3F4040404141414242424242424444444545454646464848
+      474A4A494A49494C4B4B4E4D4D504F4F5150505352525554545756565958585A
+      5A5A5C5C5C5F5F5F6161616363636666666969696B6B6B6E6E6E717171737373
+      7676767979797C7C7C7F7F7F8282828585858888888A8A8A8E8E8E9292929494
+      949797979B9B9B9D9D9DA0A0A0A4A4A4A7A7A6AAAAA9ADADADB0B0B0B3B3B3B4
+      B4B4A5A4A49595959494949191918F8F8F8B8B8B8787878282827E7E7E7A7A7A
+      7676767272726E6E6E6A6A6A6666666363636161615E5E5E5B5B5B5959595757
+      575454545252524F4F4F4D4D4D4C4C4C4A4A4A47474746464645454544444443
+      43434242424040404040403F3F3F3F3E3E3E3E3D3D3D3B3C3B393C3B393C3B39
+      3B3A383B3A383B3A383A3A383A3A383A3A393A3A3A3A3A3A3A3A3A3A3A3A3B3B
+      3B3B3B3B3B3B3B3C3C3C3D3D3D3D3D3D3E3E3E3F3F3F40404041414141414142
+      4242434343444444454545454545454545454545464646474747464646454545
+      4545454444444343434242424040403F3F3F3E3E3E3C3C3C3A3A3A6E6E6EA8A8
+      A9ADADAEAAABABA7A7A7A7A6A6A5A5A5A3A3A29F9F9F9B9B9B99999994949491
+      91918F8F8E8C8C8C8887878585858281817E7E7F7A7A7A7474747171716D6D6D
+      6A6A6A6A6A6A6969696666666364646060605D5D5E5B5B5B5859585656555353
+      535151504E4E4E4E4C4C4A4949484848464646444544424142403F403F3F3F3D
+      3D3D3B3A3B3A3A3A393A3A383837373636373636343433303131302F30302F30
+      2E2F2E2D2E2D2828272525252424242323232324243030303D3C3D4141414748
+      474D4D4D3E3E3E1F1F1F1E1F1F1E1F1E1D1D1D1E1D1D1D1D1D1D1D1D1D1D1D1C
+      1D1C1C1C1D1C1C1C1C1D1C1C1C1C1C1B1B1C1C1B1B1B1B1B1B1C1B1B1C1B1B1B
+      1A1B1B1A1A1B1A1A1B1A1A1A1A1A1A191A1A191A1919191919191A1A1A1A1919
+      191919191919191818181819181818181E1F1F2424232524252626262728271F
+      1F201818181818181818181717171818191C1C1C1C1C1C1C1C1B1B1B1B1B1B1A
+      1A1A1A1919191819191918171918191A19191919191919191819191919191919
+      1918181818181718181717171717161717161717161616161616161616161615
+      15161515151515151515151515151717171C1D1C1D1C1D1C1C1C1C1C1C171616
+      1415151515141414141414141414141413131413131412121313121312131212
+      121212121211121212121212111112111111111111111011110F0E0F0E0E0F0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0E0E0E0E0F100F0F1213121C1D1D252626
+      2928292C2B2B2E2E2E3131313535353838383839393A3B3A2828290C0D0C0909
+      0909090809090909090908090808080908080808080808070807080808070708
+      0707080807080707121212070707303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303131313434343737373939393B3B3B3A3A3A2E2E2E2F2F2F2F2F2F2F
+      2F2F2F2F2F383837393939393939393938393938393938393838393838393838
+      3938383938383838383838383838383838383838383838383838383838383838
+      3838383838383838383838383838383738383738383738373738373738373738
+      3737383737373737373737373737373737373737373737373737373737373737
+      3737373737373737373737373737373838383838373838373838373938383938
+      383938383938383939393939393A3A3A3A3A3A3B3B3B3B3B3B3C3C3C3D3D3D3E
+      3E3E3E3E3E3F3F3F404040414141424242434343454545464646474746484847
+      4A49494B4A4A4D4C4C4E4D4D504F4F5150505352525554545857575958585B5B
+      5B5D5D5D5F5F5F6262626464646666666969696B6B6B6E6E6E71717173737376
+      76767979797C7C7C7F7F7F8282828585858888888A8A8A8E8E8E919191949494
+      9696969A9A9A9D9D9DA0A09FA3A3A2A6A6A6A9A9A9ABABABAFAEAEB2B1B1B4B4
+      B4ADADAD9C9C9C9595959393939090908D8D8D8A8A8A8585858282827E7E7E7A
+      7A7A7676767272726E6E6E6B6B6B6868686464646161615E5E5E5C5C5C5A5A5A
+      5858585656565353535151514F4F4F4E4E4E4D4D4D4A4A4A4949494848484747
+      4746464645454544444443434343434343434341414141414140404040404040
+      40403F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F404040404040404040
+      4040404040404242424343434343434444444444444545454646464646464747
+      4747474748484848484848484848484847474748484848484846464645454544
+      44444343434242424141413F3F3F3D3D3D555555959595B2B2B2ACACADA8A8A9
+      A5A6A6A3A3A3A2A2A2A1A1A19E9E9E9C9B9B9998989494949191928E8E8E8B8B
+      8B8888888585858282827E7E7E7B7C7B7878777171716E6E6E6A6A6A68676869
+      69696666666464646160605F5F5E5C5C5C595A5957575754545452525150504F
+      4D4D4C4A4949494848474646454545434343414140403F403D3E3D3C3C3C3A3A
+      3A3A3A3A3939393939383737363635353433333030303030302F2F2F2E2E2F2D
+      2D2D2626262424242324242222222324232F2F2F3E3E3E4241424747484D4D4D
+      3938382020201F1F1F1D1E1E1D1E1E1E1D1D1D1E1E1D1D1D1D1D1D1D1D1D1D1D
+      1D1C1C1C1D1C1D1C1D1C1C1C1C1C1C1C1B1C1B1B1B1B1B1B1C1B1C1C1B1B1B1B
+      1A1B1A1B1A1B1A1B1A1A1A1A1A1A1A1A1A191A1A191A1919191A1A1A19191919
+      1819191919191818191819181E1E1E2424242525252626262728281F1F201818
+      181817181817181717181817181C1C1C1C1C1C1B1C1B1C1B1B1B1B1B1B1B1A19
+      191A1919191919191818191A1A1A19191A191919191919181919181818181919
+      1818181818171818171717171816161716171716161616161616151616161515
+      161515161516161515151717171C1D1C1D1D1B1C1C1D1C1C1C17171615151415
+      1415141414141414141414141313131313131212141212131212121213121212
+      1211121111121112111211121111111010100F0F0F0E0E0F0E0D0F0E0D0E0E0D
+      0F0E0D0F0F0E0F0F0E0F0F0F0F1213131B1B1B2424252828282B2B2B2E2F2F30
+      31313534343738373939393B3B3B2E2F2F10100F0A0A09090A090909090A0909
+      0909090809080808090809080908090909080908080808080807080708080707
+      0807070712121207070730303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3232323535353737373939393B3B3B3737372E2E2E2F2F2F2F2F2F2F2F2F2F2F
+      2F39393939393939393939393839393839393839383839383839383839383839
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838383838383838383838373838373837373837373837373837373837
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737373737373737373737383838383837383837383837383737393838393838
+      3938383A39393939393939393A3A3A3B3B3B3B3B3B3B3B3B3C3C3C3D3D3D3E3E
+      3E3F3F3F3F3F3F4040404242424242424343434545454646464747464949484A
+      49494C4B4B4D4C4C4E4D4D5150505251515453535554545857575959595B5B5B
+      5D5D5D5F5F5F6262626464646666666969696C6C6C6E6E6E7171717373737676
+      767979797C7C7C7F7F7F8181818484848787878A8A8A8D8D8D90909093939396
+      96969999999C9C9B9F9F9EA2A2A2A4A4A4A8A7A7AAAAAAACACACAEAEAEB1B1B1
+      B2B2B2A7A7A79898989494949292928F8F8F8C8C8C8888888585858181817E7E
+      7E7A7A7A7676767373736F6F6F6C6C6C6868686565656262626060605E5E5E5C
+      5C5C5A5A5A5858585555555454545353535151514F4F4F4D4D4D4D4D4D4B4B4B
+      4A4A4A4949494848484747474747474747474646464545454545454545454444
+      4444444444444443434344444444444444444444444445454545454546464646
+      46464646464747474848484848484949494949494949494A4A4A4A4A4A4A4A4A
+      4A4A4A4B4B4B4B4B4B4A4A4A4A4A4A4949494848484848484646464444444444
+      444242424040404848487E7E7EB1B1B1B1B1B1ABABABA8A8A8A5A4A5A1A1A29E
+      9E9E9E9E9E9D9D9D9A9A9A9797969594949191908D8D8E8A8A8B888888848484
+      8181817E7E7E7B7B7B7878787574746E6E6E6A6A6A6867686565656666666464
+      646161615F5F5F5C5C5C5A5A5A5757575454555353535050504E4E4D4B4B4B4A
+      4A4A48474845454544434342424240403F3E3F3F3C3C3C3B3A3A3A3A3A383838
+      3938383838373636363635353332323030302F2F2F2F2F2F2D2E2E2E2D2E2525
+      252424242323232323232423233535343E3E3E4242424848484D4D4D2F2E2F20
+      1F201F201F1E1E1E1E1E1E1E1E1E1D1D1E1E1D1E1D1D1D1C1D1D1D1C1D1D1D1C
+      1D1C1C1C1C1C1D1C1C1C1C1C1B1C1C1C1B1C1C1C1C1B1B1C1B1B1B1A1B1B1A1A
+      1B1B1A1A1A1A1B1A1A1A1A1A1A1A1A191A19191A191A19191919191919191919
+      19191918181918191C1B1C232423252525262626272727242524181819181818
+      1818171718171718181C1C1C1C1C1C1C1C1C1B1C1B1C1C1B1A1B1B19191A1A19
+      191919191919191A1A19191A1A1A191919191919191919191918181919181918
+      1818181817181817181717171617171716171617161616161616161616151616
+      1515161615161717171D1C1B1D1D1C1D1D1C1C1C1C1717161515151515151514
+      1414141515141415141314131314121314131313121212121212121212121212
+      12111112111211110F0F0F0E0E0F0E0E0F0E0E0F0E0E0F0E0D0E0F0E0F0F0E10
+      1010101211121819182323232827282A2A2A2E2E2F3131313334343737373839
+      393B3C3B3232331616160A0A0A0A0A0A0A0A0A0A09090A0A0A090A0909090909
+      0909080908090809080808090808080909080808080808080708080708070807
+      1412140707073030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303032323235
+      35353737373A3A3A3C3C3C3635362F2F2F2F2F2F2F2F2F2F2F2F313131393939
+      3939393939393939393939383939383938383938383938383938383938383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838383838383837383837383737383737383737383737383737383737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737373737373737373738383838383738383738373739383839383839383839
+      38383939393939393939393A3A3A3B3B3B3B3B3B3B3B3B3C3C3C3E3E3E3E3E3E
+      3F3F3F4040404040404242424242424444444545454646454747464948484A49
+      494C4B4B4D4D4D4E4D4D5150505251515453535554545757575959595B5B5B5D
+      5D5D5F5F5F6262626464646666666969696C6C6C6E6E6E717171737373757575
+      7878787C7C7C7F7F7F8181818383838787878A8A8A8D8D8D8F8F8F9292929595
+      959999989B9B9A9D9D9DA0A0A0A2A2A2A4A4A4A7A7A7AAAAAAACACACAFAFAFB3
+      B3B3B0B0B0A2A2A29595959393939191918E8E8E8B8B8B888888848484818181
+      7D7D7D7A7A7A7777777373737070706D6D6D6A6A6A6767676464646161616060
+      605D5D5D5C5C5C5A5A5A5858585656565656565454545252525151515050504F
+      4F4F4E4E4E4D4D4D4C4C4C4B4B4B4B4B4B4A4A4A4A4A4A4949494A4A4A494949
+      4949494949494949494949494949494949494A4A4A4A4A4A4B4B4B4B4B4B4B4B
+      4B4B4B4B4C4C4C4C4C4C4C4C4C4C4C4C4C4C4C4D4D4D4D4D4D4E4E4E4E4E4E4D
+      4D4D4D4D4D4D4D4D4C4C4C4A4A4A484848474747464646444444424242434343
+      6E6E6EA5A5A5B3B3B3ACACADA9A9A9A6A6A7A3A3A3A0A1A19D9D9E99999A9A99
+      999999999797979493939190908E8D8D8B8A8A8787878484848080807D7E7D7C
+      7C7B7878787475747170706A6A6A6868686565656363636464646261615F5F5F
+      5C5C5C5A5A5A5757575656565353535050514E4E4E4C4C4C4A4A4A4948474645
+      454545444343424140403F3F3F3D3D3D3B3C3C3A3A3A39393A37373738373736
+      37373737363434343232313030302F2F2F2E2E2D2D2E2E2D2C2D242424232323
+      2323232323232424243535353E3E3E4141414747474D4D4D2C2B2C201F1F1F1E
+      1E1E1E1E1E1D1E1E1E1E1E1E1D1D1E1D1D1D1D1D1D1D1D1D1D1D1D1D1C1C1C1C
+      1C1C1D1C1C1D1C1C1C1C1C1B1C1C1C1B1B1B1C1B1B1B1B1B1B1B1A1B1B1A1B1B
+      1A1B1A1A1B1A1A1A1A1A1A1A1A191A1A19191A191A19191A1919191919191919
+      181919191C1C1B24242325252525262626272624242518181819181818181818
+      18181718181D1D1D1C1C1C1C1C1C1C1C1B1B1C1B1B1A1B1919191A191A191919
+      1919191A19191A1919191A1A1A19191919191919191919191818191818181818
+      1818181718181718171718161617171617161616161616161616151615151615
+      15151718171D1C1B1D1B1C1C1C1C1C1D1C171616151515151515151515141514
+      1514141414141513131412131313131313131313121313121312121212121212
+      111111110E0E100E0E100E0E0F0E0E0F0E0E0F0F0F0F0F0E0F11101117171622
+      23222828282A2A2A2D2E2D3131313434353738373939393B3B3A3636361D1E1D
+      0A0A0A0B0A0A0A0A0A0A0A0A0A0A0A0A0909090A0A0909090909090909090909
+      0909090909090809080808080908090908080808080708080808080814141408
+      0708303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303333333535353838
+      383A3A3A3C3C3C3232322F2F2F2F2F2F2F2F2F2F2F2F33333339393939393939
+      3939393939393938393938393938393838393838393838393838393838383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838383738383738383738373738373738373738373738373737373737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737373737373838383838373838373838373837373938383938383938383939
+      393939393939393A3A3A3B3B3B3B3B3B3B3B3B3C3C3C3D3D3D3E3E3E3E3E3E3F
+      3F3F4040404141414242424242424444444545444646454747464A49494A4949
+      4C4B4B4D4D4D4F4E4E5150505352525454545655555757575959595B5B5B5E5E
+      5E5F5F5F6262626464646666666969696B6B6B6E6E6E71717173737375757578
+      78787B7B7B7E7E7E8080808383838686868989898B8B8B8E8E8E929292949493
+      9696969797979A9A9A9D9D9D9F9F9FA2A2A2A5A5A5A8A8A8ABABABAEAEAEB1B1
+      B1B3B3B3AFAFAFA3A3A39494949292929090908D8D8D8B8B8B88888885858581
+      81817F7F7F7B7B7B7878787575757272726F6F6F6D6D6D696969676767646464
+      6262626060605E5E5E5C5C5C5B5B5B5A5A5A5858585757575656565555555353
+      535353535252525151515050505050505050504F4F4F4F4F4F5050504E4E4E4E
+      4E4E4E4E4E4E4E4E4F4F4F4F4F4F4E4E4E4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F
+      4F4F4F5050505151515050505151515151515050505151515151515050504F4F
+      4F4E4E4E4C4C4C4A4A4A4848484646464646464545456A6A6A9D9D9DB4B3B4AD
+      ADAEABABABA8A7A8A5A5A5A1A1A29E9E9E9C9B9C999999959696969595969695
+      929292908F8F8D8C8C8989898787868383838080817D7D7D7B7B7B7878787575
+      757172726E6E6D6868676565656262626060606161615F5F5F5D5C5D5A5A5A58
+      58585656565353535150504F4F4F4D4D4E4B4B4B494949474746454544434342
+      4140404040403E3D3D3C3C3C3B3B3B3A3A3A3837373737373738373737373536
+      363434333332312F2F2F302F2F2E2E2E2D2D2D2C2C2C25242423242423232323
+      23232423243534353E3E3E4141414646464B4A4B2B2B2B2020201F1F1E1E1E1F
+      1E1E1E1E1E1E1E1E1E1E1D1E1D1D1D1D1D1D1D1D1D1D1C1D1C1D1D1C1C1D1D1D
+      1D1D1C1C1C1C1C1C1C1C1C1C1C1B1B1C1C1B1B1B1B1B1B1B1B1A1B1B1B1A1B1B
+      1A1B1A1A1A1A1B1A1A1A1A1A1A19191A1A1919191919191A1A19191919191919
+      1B1B1B2323242425242626262626272524251919181918191818181818181817
+      181D1D1D1D1D1C1C1D1C1D1C1C1C1C1B1B1B1B1A1A1A191A191919191A19191A
+      1A1A1A1A19191A19191A19191919191919191918181919181919181918191818
+      1818171817171717171717161717161716161616161616161616151515151818
+      181C1C1D1D1C1C1D1C1C1D1C1C18161715161515151614151515141515141414
+      1414141413141314141313141313131313121212131312121213121212101011
+      0E0F0F0E0E0F0F0E0F0E0E0F0F0F100F0F0F141314201F202726272A2A2A2D2D
+      2D303030343434383737393A393B3B3B3939392424240B0B0B0B0B0B0A0A0A0B
+      0B0B0A0B0A0A0A0A0A0A0A0A0A0A0A0A0A090909090A09090909090909080909
+      0909090808080808080808080809080808080808080707081212140807073030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030303434343636363838383A3A3A
+      3C3C3C3030302F2F2F2F2F2F2F2F2F2F2F2F3434343939393939393939393939
+      3939393839393839393839383839383839383839383839383838383838383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838373838373837373837373837373837373837373737373737373737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737373737383838383837383837383737393838393838393838393838393939
+      3939393939393A3A3A3B3B3B3B3B3B3B3B3B3C3C3C3D3D3D3E3E3E3F3F3F3F3F
+      3F4040404141414242424343434545454646454747464847474A49494A49494C
+      4B4B4E4D4D4F4E4E5150505352525454545555555757575959595B5B5B5E5E5E
+      5F5F5F6262626464646666666969696B6B6B6D6D6D7171717373737575757878
+      787A7A7A7D7D7D8080808383838686868888888A8A8A8D8D8D8D8D8D90909093
+      93939696969898989B9B9B9E9E9EA1A1A1A4A4A4A7A7A7AAAAAAADADADB4B4B4
+      B9B9B9BCBCBCB6B6B6A2A2A29494949191918F8F8F8D8D8D8B8B8B8888888585
+      858383837F7F7F7D7D7D7A7A7A7777777474747272726F6F6F6D6D6D6B6B6B68
+      68686666666464646262626060605E5E5E5D5D5D5B5B5B5B5B5B5A5A5A595959
+      5757575656565555555555555555555555555454545454545353535353535353
+      5353535353535353535353535353535353535353535354545455555554545455
+      55555555555555555555555454545353535353535353535151514F4F4F4E4E4E
+      4C4C4C4A4A4A4848484747476C6C6C9E9E9EB4B4B4AEAEAFABABABA8A8A8A6A6
+      A6A3A3A3A0A0A09D9E9E9A9A9A9797989494959494949494949292918F8E8E8C
+      8B8B8988888686868383838080807D7D7C7B7A7A777777747474727272706F70
+      6C6C6C6565646261616060605D5D5D5E5F5F5E5C5D5B5A5B5959585656565353
+      535151514F4F4F4D4E4D4C4B4C4949494747474646464444434241414040403F
+      3E3F3E3E3D3C3B3B3B3B3B393939383838373636373737363636353535333434
+      3132312F2F2F2E2E2F2E2E2E2D2D2D2C2C2C2324232323232424232323232424
+      243233323D3D3D4141414545454A4A4A3131311F1F1F1E1F1E1E1F1F1F1E1E1E
+      1E1E1E1E1E1E1E1E1E1E1E1E1E1D1D1D1D1D1D1D1D1D1D1D1D1C1D1D1C1C1C1C
+      1C1C1C1C1C1C1B1C1C1C1C1C1C1B1C1B1C1C1C1B1B1B1B1B1B1B1B1B1B1A1B1A
+      1B1A1A1A1A1A1A1A1A1A1A1A1A1A19191A1919191A191919191819191C1D1D24
+      23242524242726262727272323231918191818191819181818181818181D1D1D
+      1C1D1C1C1C1C1C1D1C1C1C1B1A1B1A1A1A191A1A1A191A1A1919191A1A1A1A1A
+      1A1A191A1A19191A1A191A1919191A1919181918191919191819191919181818
+      18171817171817171816171717161716161616161616161616161818171C1C1C
+      1C1C1C1D1C1C1C1C1C1716171516151615151516151515151515151514141414
+      131413141413141413131312131313131213131212121212121011110F0F0F0F
+      0E0F0E0F100E0E101111111B1B1C2424242727272B2A2B2F2E2E323232373736
+      3839393B3C3C3C3C3D2827270F0E0E0B0B0B0B0B0B0B0B0B0B0B0B0B0A0B0A0B
+      0B0B0A0A0A0A0A0A090A090A0A0A0A0A09090A090A0909090909090909090909
+      0909080908080909080908090808080808080808141414070808303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303434343636363838383A3A3A3D3D3D2E
+      2E2E2F2F2F2F2F2F2F2F2F2F2F2F373636393939393939393939393939393939
+      3939383939383938383938383938383938383938383838383838383838383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3837383837383837383737383737383737383737383737373737373737373737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3738383838383738383738373738373739383839383839383838383839393939
+      39393939393A3A3A3B3B3B3B3B3B3B3B3B3C3C3C3D3D3D3E3E3E3F3F3F404040
+      4040404242424242424343434545444646454746464847474A49494B4A4A4C4B
+      4B4E4D4D4F4E4E5150505352525454545555555757575959595B5B5B5E5E5E5F
+      5F5F6262626464646666666969696B6B6B6D6D6D707070727272757575787878
+      7A7A7A7C7C7C7F7F7F8282828484848787878888888989898C8C8C8E8E8E9191
+      919494949797979A9A9A9D9D9DA0A0A0A4A4A4ABABABB1B1B1B4B4B4B6B6B6BA
+      BABABDBDBDBFBFBFB7B7B7A5A5A59595959191918E8E8E8C8C8C8A8A8A888888
+      8585858383838181817F7F7F7C7C7C7A7A7A7777777474747373737070706F6F
+      6F6C6C6C6A6A6A6969696666666565656363636262626060606060605F5F5F5E
+      5E5E5C5C5C5C5C5C5B5B5B5B5B5B5A5A5A5A5A5A5A5A5A5A5A5A595959595959
+      5959595959595959595959595A5A5A5A5A5A5A5A5A5A5A5A5A5A5A5959595858
+      585858585858585757575656565454545353535151514F4F4F4C4C4C4A4A4A50
+      50507373739F9F9EB5B4B5B0B0B0ABABABA8A8A8A6A6A6A3A3A3A1A1A19E9E9E
+      9C9C9C9998999696969595959494949494949090908E8E8D8B8B8B8887888685
+      86828282807F7F7C7C7C797A797777777474757372736F6F6F6C6C6C68686862
+      6261605F5F5D5C5C5B5B5B5C5C5C5B5B5B5958595757565453535151514F4F4F
+      4E4E4E4C4C4C4A494A48484746464644444443434341414040403E3E3E3D3C3B
+      3B3C3B3B3A39393838383737373635363737373736353434343333333131312F
+      2F2E2E2E2E2D2D2E2C2C2C2B2A2B2525252423242323242324232324232F2F2F
+      3A3A3A3F3F3F4444444949493636361F1F1F1F1F1F1F1F1E1E1E1F1E1E1E1E1E
+      1E1D1E1E1E1E1E1D1D1E1D1D1E1D1D1D1D1D1D1D1D1D1D1D1C1D1D1C1C1C1D1C
+      1C1C1C1C1C1C1B1C1B1C1B1B1C1B1B1C1C1B1B1B1B1B1B1B1B1B1A1B1B1A1A1B
+      1A1A1A1A1A1A1A1A1A1A1A191A1A1A1A191A1A191A1919191E1E1D2423242525
+      2427262627272820202018191919191919181818181919191A1D1D1D1D1C1C1D
+      1C1D1D1D1C1D1C1B1B1B1B1A1A1A1A1A191A191919191A1A1A1A1A1A1A1A1A1A
+      1A1919191A19191A1A1919191919191918191919191919181818181818181818
+      171818171817171816161716161716161616161616161818181C1D1C1C1C1C1D
+      1C1C1D1C1C181717161616161516161515151515151515141414151414151413
+      1413131413131312131313121213121313121212121111120F0F100F0F100F0E
+      100F0F0F1514152323232626262A2A2A2F30303434343838393C3C3C3E3E3E2F
+      2E2F1212120C0C0B0C0C0C0C0B0B0B0B0B0B0B0B0B0A0A0B0A0A0A0A0A0B0B0A
+      0A0A0A0A0A0A0A0A0A09090A0A090A090A0A0A09090909090909090909090808
+      0808080808080808080808090808080814141408080830303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303131313434343636363939393B3B3B3939392E2E2E2F2F
+      2F2F2F2F2F2F2F2F2F2F37373739393939393939393939393939393939393839
+      3938393938393838393838393838393838393838383838383838383838383838
+      3838383838383838383838383838383838383838383838383838383838373838
+      3738383738373738373738373738373738373737373737373737373737373737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3838373838373838373837373938383938383938383938383939393939393939
+      393A3A3A3B3B3B3B3B3B3B3B3B3C3C3C3D3D3D3E3E3E3E3E3E3F3F3F40404040
+      40404242424242424343424545444646454746464847474A49494B4A4A4C4B4B
+      4E4D4D504F4F5150505352525454545555555858585959595B5B5B5E5E5E5F5F
+      5F6262626464646666666868686A6A6A6D6D6D6F6F6F72727275757577777779
+      79797C7C7C7F7F7F8181818383838484848585858888888A8A8A8E8E8E909090
+      9393939797979A9A9AA2A2A2A8A8A8ABABABAEAEAEB1B1B1B4B4B4B8B8B8BABA
+      BABCBCBCBEBEBEBCBCBCB3B3B3A6A6A69898989090908E8E8E8C8C8C8A8A8A88
+      88888686868484848282827F7F7F7D7D7D7B7B7B797979787878767676747474
+      7272727070706F6F6F6D6D6D6C6C6C6A6A6A6969696868686767676565656565
+      656464646363636363636363636262626161616161616161616060606060605F
+      5F5F5F5F5F5F5F5F5F5F5F5F5F5F5E5E5E5E5E5E5D5D5D5C5C5C5B5B5B595959
+      5959595858585656565454545252525050504E4E4E606060858585AAAAAAB6B6
+      B6B0B0B0ABABABA9A9A8A6A6A6A3A4A3A1A1A19E9E9E9C9C9C999A9A97979795
+      95969696969696959293939090908D8D8C8A8A8A8786868583848281817F7F7F
+      7D7C7D7A7A7A7777777474747171726F6F6F6B6B6B696A696666665F5F5F5C5C
+      5C5B5B5A5857585959585A5A59575757545354535353504F4F4E4F4E4C4C4C4A
+      4A4A4849494746474444454343434142414040403F3E3E3C3C3C3C3C3C3A3A39
+      3938383837373636363636363635353534343634343333333232322F2F2F2E2E
+      2E2E2E2D2D2C2C2B2B2B2626262424242423242223232424232D2D2D3939393E
+      3E3E4242424646463B3B3B20201F1F1F1F1F1F1F1E1F1E1E1E1E1E1E1F1E1E1E
+      1E1E1E1E1E1D1E1E1E1D1E1D1E1D1E1D1D1D1D1D1C1D1D1D1D1C1D1C1C1D1C1C
+      1D1C1C1C1C1C1C1B1C1C1C1B1C1B1B1B1B1B1C1B1B1B1B1B1B1A1B1B1B1A1B1A
+      1A1A1A1A1A1A1A1A1A1A1A1A1A1A191A19191919202020242424252525272726
+      2828281E1E1F1919191919191918191919191A19191E1D1D1D1D1D1D1D1D1D1D
+      1C1C1C1C1C1C1B1B1A1A1A1A1A191A1A1A1A1A1A1A1A1B1B1A1A1A1A1A1A1A1A
+      1A1A191A1A19191919191A191919191919181919181918181819191818181817
+      1717171817171716161716161716161616161817181D1D1D1C1C1D1C1C1C1C1C
+      1C18171616151616161615151515151515151515151515141415131314131314
+      14141414131313131213131313121313121211110F10110F0F100F0F0F0F1011
+      151515252525292A292E2E2E3434343A3A3A3D3D3E333333191A190C0C0C0C0C
+      0C0B0B0C0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B0B0B0A0B0B0B0B0B0B0B0A0A0A
+      0A0A0A0A0A090A0A09090A0A090A0A090A090909090909090909090909080809
+      0909090808080909080808091414140808083030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303232323535353737373939393B3B3B3838382E2E2E2F2F2F2F2F2F
+      2F2F2F2F2F2F3939393939393939393939393939393939393939393939383939
+      3839383839383839383839383839383838383838383838383838383838383838
+      3838383838383838383838383838383838383838383838383838383837383837
+      3837373837373837373837373837373737373737373737373737373737373737
+      3737373737373737373737373737373737373737373737373737373738383838
+      3837383837383737383737393838393838393838383838393939393939393939
+      3A3A3A3B3B3B3B3B3B3B3B3B3C3C3C3D3D3D3E3E3E3E3E3E3F3F3F4040404141
+      414242424242424444434545444645454746464948484A49494B4A4A4D4C4C4E
+      4D4D504F4F5150505252525454545555555757575959595B5B5B5D5D5D5F5F5F
+      6262626363636666666868686A6A6A6D6D6D6F6F6F7171717474747676767878
+      787B7B7B7D7D7D8080808080808181818484848787878989898C8C8C92929298
+      98989E9E9EA2A2A2A5A5A5A9A9A9ADADADB0B0B0B3B3B3B6B6B6B8B8B8B8B8B8
+      B1B1B1AEAEAEB1B1B1B3B3B3B4B4B4ACACACA1A1A19494948E8E8E8C8C8C8A8A
+      8A8888888686868484848383838181817E7E7E7D7D7D7B7B7B79797978787876
+      76767474747373737272727070706F6F6F6E6E6E6C6C6C6C6C6C6B6B6B6A6A6A
+      6969696868686868686767676666666565656565656565656464646464646363
+      636262626262626161616060605F5F5F5F5F5F5D5D5D5C5C5C5B5B5B59595958
+      58585656565454545C5C5C787878999999B5B5B5B6B6B6B1B1B1ABABABA9A9A9
+      A6A6A6A3A4A4A2A2A29F9F9F9D9D9D9A9A9B9797979595959696959596959393
+      939190918F8E8F8C8C8C8989898686868484838181817F7E7E7B7B7B79787876
+      76767373737171716F6F6F6C6B6C6A69696767676464645C5C5C5A5A59585857
+      56555556565657575755555452535151504F4F4E4E4D4C4D4A4A4A4949494747
+      474646464444444241414141413F3F3F3E3E3E3C3C3C3C3C3B39393838383837
+      37373736363535353534343635353434333433333231312F2F2F2E2E2E2D2D2C
+      2C2B2B2C2B2B2727282424242423242223232424232829293838383D3D3D4141
+      414545454444441F1F1F1F201F1F1F1F1E1F1F1F1F1F1E1E1E1E1E1E1E1E1E1E
+      1E1E1E1E1D1D1E1E1D1E1D1E1D1E1D1D1D1D1D1D1C1D1C1C1C1D1C1C1D1D1C1C
+      1C1C1C1C1C1B1C1B1C1B1B1C1B1C1B1B1B1B1B1B1B1B1A1B1B1A1B1A1A1A1A1A
+      1A1A1A1A1A1A1A191A1A1A1A1A191A1A2323222424242626262627262828291B
+      1C1B1919191919191919191819191B1A1B1D1D1E1D1D1D1D1D1D1D1D1C1C1D1C
+      1C1C1B1B1A1B1A1A1B1A1A1A1B1B1B1B1A1A1A1B1A1A1A1B1A1A1A1A1A1A1A1A
+      1A1A191A191919191A1919191918181819181919191819191818181818181718
+      18171717171816161716161716161918181D1D1D1D1D1D1C1C1D1D1C1D181717
+      1616161616161516151516161615151515151514141514141514131413141413
+      13131313131313131313121313111112100F100F0F100F0F1010101118181827
+      27282B2C2C3132313838383B3B3B2021210D0D0C0C0C0C0D0C0C0C0C0C0C0B0B
+      0C0B0B0C0C0B0C0C0B0B0B0B0B0B0B0B0B0B0B0B0A0B0B0A0B0B0B0B0A0A0A0A
+      0A0B0A0A0A0A0A090A0A0A090A09090909090909090909090909090809090909
+      0909090809090808141414080808303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303232323535353737373939393C3C3C3635362F2F2F2F2F2F2F2F2F2F2F2F31
+      3131393939393939393939393939393939393939393939393938393938393838
+      3938383938383938383938383938383838383838383838383838383838383838
+      3838383838383838383838383838383838383838383838383738383738383738
+      3737383737383737383737383737373737373737373737373737373737373737
+      3737373737373737373737373737373737373737373737373737373838373838
+      373838373837373837373938383938383838383838383939393939393939393A
+      3A3A3B3B3B3B3B3B3B3B3B3C3C3C3D3D3D3E3E3E3F3F3F3F3F3F404040414141
+      4242424242424444434544444645454746464948484A49494B4A4A4D4C4C4E4D
+      4D504F4F5150505252525454545555555757575959595B5B5B5D5D5D5F5F5F61
+      61616363636565656767676A6A6A6C6C6C6E6E6E717171737373757575787878
+      7A7A7A7C7C7C7C7C7C7D7D7D8080808282828585858C8C8D9595959999999C9C
+      9CA0A0A0A4A4A4A8A8A8ABABABAEAEAEB1B1B1B2B2B2AAAAAAA5A5A5A7A7A7A9
+      A9A9ACACACADADADB0B0B0B1B1B1B3B3B3B3B3B3ABABABA0A0A09292928B8B8B
+      8A8A8A8888888686868585858383838181817F7F7F7E7E7E7C7C7C7B7B7B7979
+      797777777676767474747272727272727070706F6F6F6E6E6E6D6D6D6C6C6C6B
+      6B6B6A6A6A6A6A6A696969686868686868676767676767666666656565646464
+      6363636363636262626060605F5F5F5F5F5F5D5D5D5B5B5B5959596262627C7C
+      7C979797B1B1B1B6B7B7B5B5B5B1B1B1ABAAABA9A9A9A6A7A6A4A5A4A1A1A19F
+      9F9E9D9D9D9B9B9B9898989595959696969796969494949192928F8F8F8D8D8D
+      8B8A8B8787878585858282827F807F7D7D7D7A7A7A7877787675767373737070
+      706E6E6E6B6B6B6968696667666363646161615A5A5A57575756565653525354
+      54545555555353525151504F4F4F4D4C4D4B4B4B4A494A474847464646444444
+      414242414141403F3F3F3E3E3C3C3C3C3C3B3939393A39393837373837363636
+      353534343434343534353434333433323232322F2E2E2D2D2D2C2B2B2C2B2B2C
+      2B2B2928282424242323232323222323232323233737383A3A3A3F3F3F414141
+      454545262727201F201F1F1F1F1F1F1F1E1F1E1F1F1E1F1E1E1E1F1E1E1E1E1E
+      1E1D1E1D1D1E1E1D1E1D1E1D1E1D1D1D1D1D1D1D1D1D1C1D1D1D1C1D1C1C1C1C
+      1C1C1C1C1C1B1C1B1C1C1B1B1C1B1C1B1C1B1B1B1B1A1B1B1A1B1A1A1A1A1A1A
+      1A1A1A1A1A1A191A1A1C1C1C2323242425242626262827272728281919191A19
+      191919191919191919191C1B1C1E1D1D1D1E1D1D1D1D1D1D1D1D1C1C1C1C1B1B
+      1A1A1A1A1B1A1A1A1B1B1B1B1B1B1B1B1A1A1A1B1A1B1A1A1B1A1A1A1A1A191A
+      1A19191919191A19191919191919181918181818191918181918181818171818
+      171817171716171717161A1A191D1C1D1D1D1C1C1C1D1C1C1C17161616161716
+      1616161615161615151515161515151414151414151413141313141313141313
+      1313131313131313131112121010110F0F100F0F1010101117181829292A2E2E
+      2F3434353B3B3B3333330D0C0D0C0C0D0C0C0C0C0C0D0C0D0C0C0C0C0C0C0C0C
+      0C0C0C0B0C0C0C0B0C0B0B0B0B0B0A0B0B0B0B0B0B0A0B0A0B0B0A0A0A0A0A0A
+      0A0A0A090A0A0A0A0A0A0A0A090A090A09090A09090909090809090909080808
+      0808080916141608090830303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030333333
+      3535353737373A3A3A3C3C3C3333332F2F2F2F2F2F2F2F2F2F2F2F3232323939
+      3939393939393939393939393939393939393939393839393839393839383839
+      3838393838393838393838383838383838383838383838383838383838383838
+      3838383838383838383838383838383838383838373838373838373837373837
+      3738373738373738373737373737373737373737373737373737373736353532
+      3232343434363636373737373737373737373737373737383837383837383837
+      3837373837373938383938383938383838383939393939393939393A3A3A3A3A
+      3A3B3B3B3B3B3B3B3B3B3C3C3C3D3D3D3E3E3E3F3F3F3F3F3F40404041414142
+      42424242424444434544444645454746464948484A49494B4A4A4D4C4C4E4D4D
+      504F4F5050505252525454545555555757575959595B5B5B5D5D5D5F5F5F6161
+      616262626565656767676A6A6A6C6C6C6D6D6D70707072727275757577777779
+      79797878787A7A7A7D7D7D7F7F7F8282828A8A8A9292929696969B9B9B9F9F9F
+      A3A3A3A7A7A7AAAAAAAAAAAAA4A4A49D9D9D9E9E9EA0A0A0A2A2A2A5A5A5A7A7
+      A7A9A9A9AAAAAAACACACAEAEAEB0B0B0B1B1B1B4B4B4B7B7B7AFAFAFA3A3A397
+      97978C8C8C8888888686868585858484848282828181817F7F7F7D7D7D7C7C7C
+      7979797878787676767575757474747272727171717171717070706E6E6E6E6E
+      6E6D6D6D6C6C6C6C6C6C6B6B6B6A6A6A69696969696968686867676765656564
+      64646363636161616060606464647474748A8A8A9F9F9FB3B3B3B6B6B6B5B5B5
+      B4B4B4B0B0B0AAAAAAA7A7A7A7A7A6A4A5A4A1A1A2A09F9F9C9C9C9B9B9B9898
+      989695969596969797979595959393939090908E8E8E8B8B8B89898986878784
+      84848182817F7F7E7D7D7C7A7A7A787777767575727272706F6F6D6D6D6B6B6B
+      6969696667676364646162625F5F5F5858575555555353535151515152515353
+      535151514F4F4F4E4E4D4C4C4B4B4A4A48474846464644454442424241414140
+      3F403E3F3E3C3C3C3D3C3C3A3B3A3A3A3A383837373736363635353534343333
+      3333333434343434343334333231312E2E2D2D2D2D2C2C2C2B2C2C2B2C2B2A2A
+      2A2424242323232323232221222323233030303A393A3D3D3D40404043434336
+      36361F20201F1F201F1F1F1F1F1E1E1F1F1E1F1E1F1F1F1E1F1E1E1E1E1E1E1E
+      1E1E1E1D1D1E1E1D1E1E1D1E1D1D1D1C1D1D1D1C1C1C1D1C1C1D1C1C1C1C1C1C
+      1C1C1C1C1C1B1C1B1B1B1C1B1C1B1B1C1B1B1B1B1A1B1B1B1A1B1B1A1A1B1A1A
+      1B1A1A1A1A1F1F1F2424232526252827282829282525251A19191A191A191919
+      1919191919191D1D1D1E1E1E1D1E1D1D1D1E1D1D1D1D1C1C1C1B1B1C1A1B1B1A
+      1B1B1A1A1C1B1B1A1B1B1B1B1B1B1B1B1B1B1A1A1A1B1A1A1A1A1A1A1A1A191A
+      1A1A191919191919191819191819191919181818181818181818181817181817
+      1817171717171A1A191E1E1D1D1D1D1C1D1D1D1D1C1716161616161616161616
+      1616151616151515151515151515141415131415141314141414141413131313
+      1313121213101111101010100F100F0F101010121B1C1C2B2A2B323131363636
+      3E3F3E2E2E2E0D0D0D0D0D0D0D0C0D0D0C0D0D0C0C0C0D0C0C0C0C0C0B0C0B0C
+      0C0C0C0C0B0B0C0B0B0B0B0B0B0A0B0B0A0B0B0B0B0B0B0B0B0B0A0A0A0A0A0A
+      0A0A0A0A0A0A0A0A0A0A0909090A090909090909090909080909090908080809
+      1416140808083030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303034343436363638
+      38383A3A3A3C3C3C3131312F2F2F2F2F2F2F2F2F2F2F2F343434393939393939
+      3939393939393939393939393939393939393939383939383938383938383938
+      3839383839383838383838383838383838383838383838383838383838383838
+      3838383838383838383838383838383838383837383837383737383737383737
+      3837373837373737373737373737373737373737373737363030302F2F2F2F2F
+      2F2F2F2F2F2F2F31313133333334343435353537373738383738383738373738
+      37373837373938383938383838383838383939393939393939393A3A3A3B3B3B
+      3B3B3B3B3B3B3B3B3B3D3D3D3E3E3E3E3E3E3F3F3F3F3F3F4040404141414242
+      424343424443434544444645454746464948484A49494C4B4B4D4C4C4E4D4D4F
+      4F4F5050505252525454545555555757575959595B5B5B5C5C5C5F5F5F606060
+      6262626565656666666969696B6B6B6D6D6D6F6F6F7171717474747575757474
+      747676767979797B7B7B7E7E7E8A8A8A9090909494949999999E9E9EA2A2A2A3
+      A3A39C9C9C9494949595959797979999999B9B9B9D9D9DA0A0A0A1A1A1A4A4A4
+      A5A5A5A7A7A7A9A9A9ABABABADADADAEAEAEB0B0B0B2B2B2B6B6B6B9B9B9B6B6
+      B6ADADADA4A4A49A999A8F8F8F8787878484848181818080807F7F7F7D7D7D7C
+      7C7C7A7A7A7878787777777676767474747373737373737171717070706F6F6F
+      6F6F6F6E6E6E6D6D6D6C6C6C6B6B6B6969696969696868686B6B6B7474748383
+      83909090A1A1A1B0B0B0B7B7B7B6B6B6B5B5B5B4B4B4B2B2B2AFAFAFAAAAAAA6
+      A6A6A5A5A5A3A3A3A2A2A19F9E9F9C9C9D9A9A9A989898969696959595979796
+      9695959393939190918F8F8F8C8C8C8A8A8A8888888585858383838080807E7E
+      7D7C7B7B7979787676767473737272726F6F6F6D6C6D6B6B6A68696866666663
+      63636262625F5F5F5C5D5C5757575252525151514F4F4E4E4E4E52515250504F
+      4E4E4E4B4B4A4B4B4A4949484646464645454342424141424040403F3F3F3D3D
+      3D3C3C3C3B3C3B3B3A3A39383938383836363636363434343434343333323234
+      34343334333433343233322F2E2F2D2D2C2C2C2C2B2C2C2A2B2B2B2B2B232324
+      2323232222222121222323232B2B2C383939393A393D3D3D4040404040402221
+      22201F201F1F201F1F1F1F1F1F1E1E1F1F1E1F1E1F1E1E1E1E1E1E1F1E1E1E1D
+      1E1E1E1E1E1D1D1E1D1D1E1D1D1D1D1C1D1C1D1D1C1C1D1D1C1C1C1C1C1C1C1C
+      1C1C1C1C1B1C1B1C1B1B1B1B1C1C1B1B1B1B1B1B1B1B1A1A1B1A1B1B1B1A1B1B
+      1B2424242424242626262728272929291F1F1F1A191A1A191A19191A19191919
+      19191E1E1E1E1E1E1D1E1E1D1E1D1D1E1D1C1C1C1C1C1C1C1B1B1C1A1B1B1B1B
+      1B1B1B1C1B1C1B1B1B1A1B1B1B1B1A1A1B1B1A1B1A1A1A1A1A1A1A1A19191919
+      1A1919191A191919191919191918191919181818181818181818181717181718
+      17171C1C1B1D1D1D1D1D1D1D1D1D1C1B1C171717161617161616161716151616
+      1515151515151515151514141514141514141414141414141314141313131313
+      13111111101011100F110F10111011111D1D1D2C2C2B3231313938393F3F3F28
+      28290D0D0D0D0D0D0D0D0D0C0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B0A0A0A0A0A0A0A0A0A0B0A0A0A0A0A
+      0A0A0A0A090A0A09090A090A0A090909090A0909090908090909090916141409
+      0808303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303434343636363838383A3A
+      3A3D3D3D2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F35353539393939393939393939
+      3939393939393939393939393939393938393938393938393838393838393838
+      3938383938383838383838383838383838383838383838383838383838383838
+      3838383838383838383838383838383738383738383738373738373738373738
+      37373837373737373737373737373737373030302F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3131313232323434343434343635
+      353635353838383838383838383838383939393939393939393A3A3A3B3B3B3B
+      3B3B3B3B3B3C3C3C3D3D3D3E3E3E3E3E3E3F3F3F404040404040424241424242
+      4342424443434544444645454746464948484A49494B4A4A4D4C4C4E4D4D4F4F
+      4F5050505252525454545454545757575858585A5A5A5C5C5C5E5E5E60606062
+      62626464646666666868686A6A6A6C6C6C6E6E6E717171737373717171737373
+      7575757878787B7B7B8787878E8E8E9393939797979C9C9C9595958C8C8C8C8C
+      8C8F8F8F9090909393939494949696969999999B9B9B9D9D9D9E9E9EA1A1A1A2
+      A2A2A4A4A4A5A5A5A7A7A7A9A9A9AAAAAAACACACADADADAFAFAFB4B4B4B7B7B7
+      B8B8B8B8B8B8B9B9B9B6B6B6AFAFAEA7A7A7A0A0A09A9A9A9393938C8C8C8686
+      868181817C7C7C7B7B7B7A7A7A7878787777777676767676767474747979797D
+      7D7D828282888888919191989898A0A0A0A8A8A8AEADAEB5B5B5B7B7B7B6B6B6
+      B4B5B4B4B4B4B2B2B2B1B1B1B0B0B0AEADAEA9A9A9A5A4A4A4A4A3A2A2A2A09F
+      A09E9D9E9C9C9B9A9A9A9899989595969494959696969695959493939292928F
+      8F8F8C8C8C8A8A8A8888888585868484848181817F7F7F7D7D7D7A7A7B797878
+      7676757474737271716F6E6F6D6C6C6A6A6A6767676565656363636161615F5F
+      5F5D5D5D5B5A5B5454545151504F4E4E4D4D4D4C4C4C50504F4E4E4F4B4B4B4B
+      4B4B4949484746464645444343424341424140404040403D3D3D3D3D3D3C3C3C
+      3A3B3A3939393938383838393636363435343535343433333432323533333434
+      343333333232312E2E2E2D2C2D2D2C2D2B2B2B2B2B2B2B2B2A27272622222222
+      22222222222323232525253534343737373B3B3B3E3E3E40404032323220201F
+      1F1F2020201F201F1F1F1F1F1F1E1F1E1E1F1E1E1E1E1E1F1E1E1E1E1E1E1E1E
+      1E1D1D1D1E1E1D1D1D1E1D1D1D1D1D1D1D1D1D1D1C1C1C1D1D1C1C1C1C1C1C1C
+      1C1C1C1B1B1B1C1C1B1B1B1B1B1B1B1B1B1B1B1B1B1A1B1B1B1A1F1F1F242425
+      2525252627272828282828281A191A1A191A1A19191A191A1A19191C1B1C1E1E
+      1E1E1E1E1D1D1E1E1E1D1E1E1D1C1D1C1C1C1C1C1C1C1B1B1B1B1C1B1C1B1B1B
+      1B1B1B1B1C1B1B1B1A1B1B1B1B1B1B1A1B1A1A1A1A1A1A1A1A191A1A191A1919
+      19191A1919191919191919191819191918181819181818181818171818171B1B
+      1B1D1D1C1D1D1C1D1D1D1B1B1B17161616161716171616161616161616161616
+      1515151515161414151414151414151414141314141413131313131313121211
+      0F1010100F11100F111111121E1E1E2C2C2C3232323938393F3F3F2827280D0D
+      0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0C0C0C0C0C0C0C0C0C0C0C0C0C0B0C0C0C
+      0C0C0B0C0C0B0B0B0B0B0B0B0B0B0B0B0B0A0A0A0A0B0B0A0A0A0A0A0A0A0A0A
+      0A0A0A0A0A0A0A0A090A090909090A0909090909090909081616140809093030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303131313434343636363939393B3B3B3A3A3A
+      2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F3737363939393939393939393939393939
+      3939393939393939393939393839393839393839383839383839383839383839
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838383838383838383838373838373837373837373837373837373837
+      373737373737373737373131312F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F303030303030303030303030303030
+      3131313131313131313232323434343434343434343939393A3A3A3B3B3B3B3B
+      3B3B3B3B3C3C3C3D3D3D3E3E3E3E3E3E3F3F3F40404040404042424142424243
+      42424544444544444645454746464948484A49494B4A4A4D4C4C4D4D4D4E4E4E
+      5050505252525353535454545757575858585A5A5A5B5B5B5E5E5E5F5F5F6262
+      626363636565656767676A6A6A6B6B6B6D6D6D6E6E6E6D6D6D70707071717174
+      74747777778585858C8C8C9090909696969A9A9A8888888585858888888A8A8A
+      8C8C8C8E8E8E9090909292929494949696969898989999999B9B9B9D9D9D9F9F
+      9FA1A1A1A2A2A2A4A4A4A5A5A5A7A7A7A8A8A8A9A9A9ABABABADADADB1B1B1B4
+      B4B4B5B5B5B6B6B6B6B6B6B7B7B7B8B8B8B8B8B8BAB9BAB9B9BABAB9B9B7B7B7
+      B5B5B5B5B5B5B5B5B5B4B5B5B5B5B5B5B5B5B6B6B6BBBBBBBDBDBEBFBFBEBFBF
+      BFC0C0C0C0C0C0BFBFBFB7B8B8B0B0B0B0B0B0B1B1B1B1B1B2B1B1B1AFAFAFAF
+      AEAEADADADACACACA8A7A8A3A2A3A2A2A2A0A0A09E9E9E9D9D9D9B9B9B999999
+      969797959594949494959495959695939393929191908F8F8D8D8D8A8A8A8888
+      888786878484848383838080807E7E7E7C7C7C79797977777675757473727270
+      706F6E6E6E6C6B6B6A69696767676665646362636061605F5F5F5C5C5C5B5A5B
+      5757585353534E4E4F4D4D4D4A4A4A4848484F4F4E4B4C4B4A4A4B49494A4748
+      47474645444443424341424140413F3F3E3D3D3D3E3D3C3C3C3B3B3B3A3A3A39
+      3939393938363637353535353535343333333433323231343333333333323232
+      313131312F302D2D2C2D2C2D2B2B2C2B2B2B2B2B2A2829292222222222222222
+      222222222323222C2C2D3737363838383B3B3B3D3D3D3E3E3E262625201F201F
+      1F1F201F1F1F1F1F1F1F1E1E1F1F1E1E1F1F1F1E1E1E1E1E1E1E1E1E1E1D1E1E
+      1E1E1E1D1E1E1D1D1E1D1D1D1D1D1D1D1D1C1C1C1C1D1C1D1C1C1C1C1C1C1B1C
+      1C1B1C1C1B1C1C1B1C1C1C1B1B1A1B1B1B1A1A1C1C1D24242425252526262628
+      27282929292122211A191A1A191B1A191A1A191A19191A1C1C1C1F1E1E1E1E1E
+      1E1E1E1D1E1E1E1D1E1C1C1D1C1C1C1C1D1C1C1C1C1C1B1C1C1B1C1C1B1C1B1B
+      1B1B1B1B1B1B1B1B1B1B1A1B1B1A1A1B1A1B1A1A191A1A1A1A1A1919191A1A1A
+      1A191919191919191919191919191819191818191818181818171D1D1D1D1D1D
+      1E1E1C1D1D1C1B1A1A1617171716171617171716171616161616161616161515
+      151615151514151514141514141413141414141413131313131010111010110F
+      10100F10101111132323232D2D2C3232323939393F3E3F1E1E1E0D0E0D0E0D0D
+      0D0D0D0D0D0D0D0D0D0D0C0D0C0C0D0D0C0D0C0D0C0C0C0C0B0C0C0C0B0B0C0B
+      0C0B0B0C0B0B0C0B0B0B0B0B0B0B0B0B0A0B0B0A0A0A0A0A0A0A0B0A0A0A0A0A
+      0A0A0A0A090A0A0A090909090909090909080909161616080909303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303232323434343737373939393B3B3B3A3A3A2E2E2E2F
+      2F2F2F2F2F2F2F2F2F2F2F393939393939393939393939393939393939393939
+      3939393939393939393939383939383938383938383938383938383938383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838383838383837383837383737383737383737383737383737383737
+      3737373232322F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F30303030303030303030303030303031
+      31313131313131313131313232323232323636363A3A3A3A3A3A3B3B3B3B3B3B
+      3B3B3B3C3C3C3D3D3D3E3E3E3E3E3E3F3F3F40404040403F4242414242424342
+      424544444544444645454746464948484A49494B4A4A4B4B4B4D4D4D4E4E4E50
+      50505151515353535454545656565858585959595B5B5B5D5D5D5F5F5F606060
+      6262626565656666666969696A6A6A6A6A6A6A6A6A6C6C6C6F6F6F7070707373
+      738484848888888E8E8E9494949999998080808282828484848585858888888A
+      8A8A8C8C8C8D8D8D8F8F8F9191919494949494949696969999999A9A9A9C9C9C
+      9D9D9D9F9F9FA0A0A0A2A2A2A3A3A3A5A5A5A5A5A5A7A7A7A8A8A8A9A9A9ADAD
+      ADB1B1B1B2B2B2B2B2B2B2B2B2B3B3B3B4B4B4B4B4B4B5B5B5B5B5B5B5B5B5B1
+      B1B2B0B0B0B0B0B0B1B1B0B2B2B2B6B7B7B9B9B9BBBABABCBCBBBCBDBCBEBEBE
+      BDBDBDB4B4B4ABABABABABABAAAAAAAAABABABACABABABABAAAAAAA9A9A9A8A8
+      A8A1A1A1A0A0A09D9E9E9D9D9D9B9B9B99999A98989897969694949492929294
+      9494949494939392919190908F8E8D8D8D8B8B8A898888878787858585838382
+      8080817E7E7F7C7C7C79797978787875757574747472727270706F6D6E6D6A6A
+      6A69686867676765636463626260605F5D5E5D5B5B5B5A5A5A58585856565651
+      52524D4C4D4B4B4A4848494747474A4A4A4B4B4B4A4A49474747464747444444
+      4343424242414141403F3D3D3F3D3E3D3C3D3B3B3C3A3A3A3939393838393838
+      3736363536353534343434343433333232333231313233323332323231313130
+      31312D2E2D2C2C2B2C2C2C2B2B2B2B2B2B2A2A29242424232223232223222223
+      222222242424343434373737393A3A3B3B3C3C3C3C373737202020201F201F20
+      1F1F1F1F1F1F1F1F1F1F1F1E1F1E1F1E1E1E1E1F1E1F1E1E1E1E1E1E1E1E1D1E
+      1D1E1E1D1E1D1D1D1D1D1D1D1D1D1C1C1D1C1C1D1C1C1C1C1C1C1C1C1C1C1C1C
+      1C1C1C1C1C1C1B1B1C1B1B1B1C1C1C2122222525242626262727272929292929
+      291A1A1B1A1A1B1A191A1A191A1A191A191A191F1E1F1F1E1F1F1E1E1E1E1E1E
+      1D1E1D1E1D1D1C1D1C1C1C1C1C1C1C1C1C1C1C1C1C1C1C1C1C1C1B1B1C1B1B1B
+      1B1B1B1B1A1B1B1A1B1A1B1A1A1A1A1A1A1A1A1A1A1A1A19191A1A191A1A191A
+      191919191919191919191919181918181819181818181D1D1D1E1C1D1D1C1C1D
+      1E1C1A1A1A171717171717171717161716171616161616161616161515161515
+      1514151614141515141414141413141314141314131011111010111010111010
+      111111122323242C2C2C3232323737373C3C3C1A1A190D0E0D0D0E0D0D0D0D0D
+      0D0D0D0D0D0C0D0C0C0D0D0C0D0C0C0C0C0D0C0C0B0B0C0C0C0B0B0C0C0B0C0C
+      0B0C0B0B0B0B0B0B0B0B0B0B0B0B0A0B0A0B0A0A0A0A0A0A0A0A0B0A0A0A090A
+      0A0A090A090A090A090909090A09090916161609080830303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303232323535353737373939393C3C3C3635362F2F2F2F2F2F2F2F
+      2F2F2F2F30303039393939393939393939393939393939393939393939393939
+      3939393939393938393938393938393838393838393838393838393838383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      383838383838373838373838373837373837373837373837373837373332332F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F3030303030303030303030303030303030303131
+      313131313131313131313232323232323938383A3A3A3B3B3B3B3B3B3B3B3B3B
+      3B3B3C3C3C3D3D3D3E3E3E3E3E3E3F3F3F40403F40403F424241424242434242
+      4544444544444645454746464948484A49494B4A4A4B4B4B4D4D4D4E4E4E5050
+      505151515252525454545656565858585959595B5B5B5C5C5C5E5E5E60606062
+      62626464646666666767676868686868686969696B6B6B6D6D6D717171828282
+      8686868C8C8C9191919595957C7C7C7E7E7E8080808181818484848585858888
+      888989898B8B8B8C8C8C8F8F8F9090909292929494949595959797979999999A
+      9A9A9B9B9B9D9D9D9D9D9D9F9F9FA0A0A0A1A1A1A2A2A2A4A4A4A5A5A5A6A6A6
+      AAAAAAADADADAEAEAEAFAFAFB0B0B0B0B0B0B0B0B0B0B1B0B0B0B0B1B0B0B1B1
+      B1ADADAEADADADB3B3B3B4B4B4B6B6B6B8B8B8B8B8B8BBBABBBBBBBBAEAFAEA7
+      A7A7A6A6A6A5A5A5A5A5A5A5A5A5A6A6A6A5A5A5A4A4A4A4A4A4A2A2A29B9B9B
+      9B9B9B9999999898989796969495949393939191919292929393939393939090
+      908F8E8E8D8D8D8B8B8B8989888787878584848383838181817F7E7F7C7C7C7B
+      7A7B7979797776777575757272727070706E6E6E6C6D6C6A6B6A696867666666
+      646363626262605F5F5E5D5E5B5B5B595A595757575656565354545252514A4B
+      4B4848484848474546454848474A4A4947474746464745444544444342424241
+      41403F3E3E3F3F3D3E3D3D3C3C3B3B3A3A393939393939383738363536363635
+      3535343434343333333333323232313132313233323131313131313131312E2D
+      2E2C2C2C2C2C2C2B2B2B2A2A2A2A2A2A27262723232222222223222321212122
+      22222C2D2D3534353738373838393939393A3A3A303030201F1F1F201F1F201F
+      1F1F1F1F1F1F1E1F1F1F1F1E1E1E1E1F1E1F1E1E1E1E1E1E1E1E1E1E1D1E1E1E
+      1E1D1D1D1D1D1D1D1D1D1D1C1D1D1D1D1D1D1D1D1C1D1C1C1D1C1B1C1B1C1C1B
+      1C1C1B1B1C1B1B1B2122212524252625252727272828282A2A2A2222221A1A1B
+      1A191B1A191B1A191A1A191A1C1C1C1F1E1E1E1F1F1E1E1F1F1E1E1E1E1E1D1D
+      1D1C1D1D1C1D1D1D1C1C1C1C1C1D1C1C1D1B1C1C1B1C1C1C1C1C1B1B1B1B1B1B
+      1B1B1B1B1A1A1A1B1B1A1B1A1A1B1A1A1A1A1A1A191A1A1A191A19191A191919
+      1919191919181919191919181919191A1A191E1D1D1D1C1D1D1C1C1E1C1C1818
+      1817181717171716171717171716171717161616161616161616151516151515
+      1414151415151414141414141314131313111111101011101011101011121213
+      2728272B2B2B3030303434343939391414140E0E0D0E0D0D0E0D0E0E0D0D0D0D
+      0D0C0C0D0D0D0D0D0D0D0C0C0C0D0D0C0C0C0C0C0C0C0B0C0C0B0C0C0C0C0B0C
+      0B0B0B0B0B0B0B0B0B0B0B0B0B0A0B0A0A0B0A0A0A0A0A0A0A0A0A0A0A090A09
+      0A0A0A0A0A090909090A090A1616160909093030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303333333535353737373A3A3A3C3C3C3434342F2F2F2F2F2F2F2F2F2F2F2F
+      3131313939393939393939393939393939393939393939393939393939393939
+      3939393839393839393839383839383839383839383839383838383838383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838373838373837373837373837373837373434342F2F2F2F2F2F2F2F
+      2F2F2F2F3030303030303333333D3D3D39383935353532323230303030303030
+      30303030302F2F2F2F2F2F303030303030303030303030303030313131313131
+      3131313131313131313232323635353939393A3A3A3B3B3B3B3B3B3B3B3B3B3B
+      3B3C3C3C3D3D3D3E3E3E3E3E3E3F3F3F40403F40403F42414142424243424244
+      43434544444645454746464948484A49494A4A4A4B4B4B4D4D4D4D4D4D505050
+      5050505252525454545555555757575959595A5A5A5B5B5B5E5E5E5F5F5F6161
+      616262626565656464646464646666666868686B6B6B7171717F7F7F8484848A
+      8A8A8F8F8F8E8E8E7878787A7A7A7C7C7C7E7E7E808080818181838383858585
+      8787878888888A8A8A8C8C8C8D8D8D8F8F8F9090909292929494949595959696
+      969898989999999A9A9A9B9B9B9D9D9D9D9D9D9E9E9EA0A0A0A0A0A0A1A1A1A4
+      A4A4A7A7A7AAAAAAAAAAAAABABABABABABABABABABABABACACACADADADADADAD
+      AEAEAEB0B0B0B2B2B2B3B3B3B5B5B5B6B6B6B8B8B8AAAAABA2A2A2A1A1A1A1A1
+      A1A0A0A09F9F9FA0A09FA0A1A0A0A0A0A0A0A09FA0A09E9F9F96969696969694
+      9494939393929292909090908F909292929191919090908E8E8E8C8C8C8B8B8B
+      8989898786868585858383838281827F7F7F7E7D7D7B7B7A7979797878787575
+      757473737171716F6F6F6E6E6E6B6B6B6A6A696868676565656363636160605F
+      5F5F5E5C5C5C5B5B595959575757565657535353525252505050484848474746
+      4545464343434545454747474747474545454344434242434242413F3F3F3E3E
+      3E3E3E3C3D3D3C3C3B3B3A393A3A393938393836363636363634353534343433
+      343333333332323332313231313032313132323131313130303130302F2C2B2B
+      2C2C2C2B2B2C2B2A2B2A2A2A2A2A2A2322232223222122212121222223222222
+      223031313434343737373737383838383838382E2E2E201F201F20201F20201F
+      1F1F1F1F1F1F1E1F1F1F1F1E1E1E1E1E1E1F1F1E1E1E1E1E1E1E1E1E1D1D1D1E
+      1E1D1E1D1D1D1D1D1D1D1D1D1C1C1D1C1D1C1C1C1C1C1C1C1C1C1B1C1C1C1C1B
+      1B2121222526252627262727272929282A29292828291A1A1C1A1A1B1A191B1A
+      1A1B1A1A1A1A1B1B1F1E1E1F1F1F1E1F1E1E1E1E1E1E1F1E1F1F1D1D1D1D1D1D
+      1C1D1D1D1D1C1C1C1D1D1C1D1D1C1C1C1C1C1C1C1C1C1B1B1B1B1B1B1B1B1B1B
+      1B1B1A1B1B1B1A1B1A1A1B1B1A1B1A1A1A1A1A1A1A191A1A191A1A1919191919
+      19191919191919191919181B1B1A1D1E1D1D1D1D1D1D1D1D1D1D181718171717
+      1717181717171717171717161617171616161616161615151515151614151515
+      141514141414141414141313131111111011111011111010111212132626262B
+      2B2A2D2D2E3232323636370E0E0E0D0E0E0E0E0E0E0D0E0D0D0D0D0D0D0D0D0D
+      0D0C0D0D0C0D0C0D0C0D0C0D0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0B0B0C0B0C
+      0C0B0B0B0B0B0B0B0B0B0B0B0B0B0B0A0A0B0A0B0A0A0A0A0A0A0A0A0A090A0A
+      0A0A0A0A0A0A0A0A191616090909303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303333
+      333636363838383A3A3A3C3C3C3232322F2F2F2F2F2F2F2F2F2F2F2F34343439
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939383939383938383938383938383938383938383838383838383838383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      38373838373838373837373837373434342F2F2F2F2F2F2F2F2F2F2F2F303030
+      3030303434344141414343434343434343434343434343433E3E3E3D3D3D3A39
+      3A36363634343432323231313131313130303030303030303031313131313131
+      31313131313131313232323938383939393A3A3A3B3B3B3B3B3B3B3B3B3B3B3B
+      3C3C3C3D3D3D3E3E3E3F3F3F3F3F3E40403F403F3F4241414242424342424443
+      434544444645454746464847474A49494949494B4B4B4D4D4D4D4D4D4F4F4F50
+      50505252525454545454545757575858585959595B5B5B5D5D5D5F5F5F606060
+      6262626262626161616363636565656767676E6E6E7D7D7D8282828787878C8C
+      8C8888887474747676767878787979797C7C7C7D7D7D7F7F7F80808083838384
+      84848585858888888989898A8A8A8C8C8C8D8D8D8F8F8F909090919191939393
+      9494949595959696969898989999999999999B9B9B9A9A9A9B9A9B9C9C9C9C9C
+      9C9E9E9EA2A2A2A5A5A5A6A6A6A6A6A6A6A6A6A6A6A6A6A7A6A9A9A9ABABABAD
+      ADADAFAFAFB1B1B1B3B3B3B2B2B2A2A3A39D9D9D9C9C9C9C9C9C9C9C9C9B9B9B
+      9A9A9A9A9A9A9C9C9B9B9B9B9B9B9C9A9A9B9A9A9B9192919191918F8F8F8E8E
+      8E8D8D8D8F8F8F9090918F8E8F8E8E8D8C8C8C89898989898987878784858482
+      83828181817F7F7F7D7D7C7B7B7B7A7979787878757575737374717172707171
+      6E6E6E6C6D6D6A6A6A6969696666666565646363626161615F5E5F5D5C5C5B5B
+      5B5A59595757575655565354535251525050504F4F4F48474844444444444443
+      43424141414746464545454343434343434142413F3F3F3E3F3E3F3F3E3D3E3C
+      3C3C3B3A3A393A3A3A3938383838373636373535353434343434343334343333
+      33323232313131303030302F303232313130303030303030302E2D2E2C2C2C2B
+      2B2B2A2A2B2A2A2B2A2B2B272627222222212221212222212121222222252525
+      3434343534353536363737363737373636362C2C2C201F201F1F1F1F20201F1F
+      1F1F1F1F1E1E1F1F1E1E1E1E1E1F1E1E1E1E1E1E1E1E1E1D1E1E1E1D1E1D1E1E
+      1D1E1D1E1D1C1D1D1D1D1D1D1D1C1C1C1D1C1C1C1C1C1C1C1C1C212222262525
+      2727272727272929292A292A2A2A291D1E1E1A1B1B1A1A1B1A1A1B1A1A1B1A1A
+      1A1D1C1D1F20201F1F1F1F1F1F1F1F1F1E1F1E1E1E1E1D1D1E1D1D1D1D1D1D1D
+      1D1D1D1C1D1E1D1C1D1C1C1D1C1C1D1B1B1C1B1C1C1B1B1B1B1C1B1B1B1B1B1B
+      1B1B1B1A1A1B1A1B1A1B1A1A1A1A1A1A1A1A1A1A1A1A1A1A1A1A1A191A191A19
+      191918191819181C1D1C1E1D1D1D1D1D1D1D1D1C1C1C18171818171718181817
+      1717171717171717161716161616171616161516161515151515161515151415
+      1514141414141313131111111111111010111110111716162525252828282C2C
+      2B2F2F2E3232321515150E0E0E0E0E0E0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0C0C0D0D0C0C0C0D0D0D0C0D0C0C0C0C0C0C0B0C0B0B0C0B0B0B0B0B0C
+      0B0B0B0B0B0B0B0B0B0A0B0A0B0A0A0A0A0A0A0A0A0A0A0A0A090A090A09090A
+      0A090A0A1916190A0A0930303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030343434363636
+      3838383A3A3A3D3D3D2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F3535353939393939
+      3939393939393939393939393939393939393939393939393939393939393839
+      3938393938393838393838393838393838393838383838383838383838383838
+      3838383838383838383838383838383838383838383838383838383838373838
+      373838373837373636362F2F2F2F2F2F2F2F2F2F2F2F30303031313134343443
+      4343454545464646464646464646454545454545444444444444434343434343
+      4343434242424242424141413E3E3E3D3D3D3D3D3D3535353131313131313131
+      313131313232323535353939393939393A3A3A3B3B3B3B3B3B3B3B3B3B3B3B3C
+      3C3C3D3D3D3E3E3E3F3F3E3F3F3E40403F403F3F424141424242434242444343
+      4544444645454746464847474949494949494B4B4B4C4C4C4D4D4D4F4F4F5050
+      505151515353535454545656565858585959595B5B5B5C5C5C5E5E5E5F5F5F5D
+      5D5D5E5E5E6060606262626464646D6D6D7B7B7B7F7F7F8484848A8A8A848484
+      7070707272727474747676767878787979797C7C7C7C7C7C7E7E7E8080808181
+      818383838484848686868888888989898A8A8A8C8C8C8C8C8C8E8E8E8F8F8F90
+      9090919191929292939393939393949494959595969696979797979898979898
+      9898989B9B9B9E9E9EA1A1A2A1A1A2A2A2A2A3A3A3A5A5A5A7A7A7A9A9A9ACAC
+      ACAEAEAEADADAD9D9D9D99999999999998989898989897979796969695959594
+      94949796979797979697979695969696968D8D8D8C8C8C8B8A8A898989888888
+      8A8A8A8C8C8C8B8A8B89898988888785858585858582828281818180807F7E7D
+      7D7C7B7B7B79797878787676757474747272727171706E6E6E6D6D6D6C6C6B69
+      696A676867666666646464626261605F5F5F5F5D5D5B5B5B5A5A595858575757
+      5555555353535151524F4F4F4F4E4E4D4C4C4948484443444141424141403F3F
+      3F45444444444343444341424240403F3E3F3E3F3E3E3D3D3D3C3C3C3A3A3A3A
+      3A3A3A3938393738373637363635343435343434343434333433333333313231
+      3031303030303030303132323230303130303030302F2F2F2B2B2B2B2B2A2B2A
+      2A2A2B2A2A2A2A2A2A2A23232322222221222221212121222122222229282934
+      33343534353534343434353435343333332D2D2D2221211F1F1F1F1F1F1F2020
+      1F1F1F1F1F1E1E1F1F1F1E1F1E1E1E1E1E1E1E1E1E1D1E1D1E1E1E1D1E1D1E1E
+      1D1D1D1D1D1D1D1D1D1C1D1C1C1C1C1D1D1E1D24242426262626272628282829
+      29292A2A2A2B2B2B2121211A1B1B1A1B1C1B1B1B1A1A1B1A1A1A1A1B1A201E1F
+      1F20201F201F1F1F201F1F1F1F1F1E1F1D1E1D1D1D1E1D1D1D1D1D1C1D1D1D1E
+      1E1E1D1D1E1D1D1D1C1C1D1C1C1D1C1C1C1B1C1C1B1B1B1C1B1B1B1B1B1B1B1B
+      1B1B1B1B1A1B1B1A1A1A1A1A1A1A1A1A1A19191A1A1A1A19191A191919191919
+      1918191E1D1D1D1E1E1D1E1D1D1E1D1C1B1B1818181718181818181718171717
+      1717171717161716171717161616161616151516151516151515141415141514
+      14141212121111111011111111111011111818182525252626262929282A2B2A
+      2C2C2C2D2E2D1919190E0E0E0E0E0E0D0D0E0E0D0E0D0D0E0D0D0D0D0D0D0D0D
+      0D0D0C0D0D0C0D0C0C0C0C0C0D0C0C0C0C0C0B0B0B0B0B0B0C0C0C0B0B0C0B0B
+      0B0C0B0B0B0B0B0B0A0B0B0B0A0B0B0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A090A
+      1619160A09093030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303131313434343636363838383B
+      3B3B3B3B3B2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F373737393939393939393939
+      3939393939393939393939393939393939393939393939393939393939383939
+      3839383839383839383839383839383838383838383838383838383838383838
+      3838383838383838383838383838383838383838383838383838383837383837
+      3636362F2F302F2F2F2F2F2F2F2F2F3030303131313333334242424747474848
+      484A4A4A4A4A4A4A4A4A49494947474747474745454545454544444444444443
+      4343424242424242414141414141414141404040313131313131313131313131
+      3131313232323938383939393939393A3A3A3B3B3B3B3B3B3B3B3B3B3B3B3C3C
+      3C3D3D3D3E3E3E3E3E3D3F3F3E403F3F403F3F42414142424242424244434345
+      44444645454746464747474949494949494B4B4B4C4C4C4D4D4D4E4E4E505050
+      5151515252525454545555555757575858585A5A5A5B5B5B5D5D5D5B5B5B5B5B
+      5B5D5D5D5F5F5F6161616D6C6D7878787D7D7D8282828787877B7B7B6D6D6D6F
+      6F6F7070707272727474747575757777777979797A7A7A7C7C7C7D7D7D7F7F7F
+      8080808282828383838484848686868888888888888A8A8A8A8A8A8B8B8B8B8B
+      8B8D8D8D8E8E8E8F8F8F8F8F8F90909091919192929291929291929292929293
+      93939393939696969A9A9A9E9E9E9F9F9FA1A1A1A4A4A4A6A6A6A8A8A8A6A6A6
+      9696969394949493939494939393939393939292929292919090908F8F8F9191
+      909292919292919191919292928A8A8B88888887868685858584848485858588
+      88888787878585858483848282828080807E7E7E7E7E7E7B7B7B7A7A79787878
+      777576757474737272717171706F6F6D6D6D6B6C6C6A6A6A6768676667666464
+      646363636161615F5F5F5E5E5C5B5C5B5A5A5959575757565655545453535351
+      51514F4F4F4F4E4E4D4C4C4B4B4B4848484141414140413F3F3F3E3F3E414241
+      4443434242414040403F3F3F3E3D3D3E3E3E3D3C3C3A3A3A3B3B3A3A3B393838
+      3738383737353635343535353534353434343433323331323130313030313130
+      30303030303030303232313230303130302F2F2F2C2C2D2B2B2B2B2B2B2B2B2A
+      2B2A2A2A2A292727272222222221222121212221222322222322222B2B2B3434
+      3434333434343333333332323231313130303027272620201F1F1F1F1F1F1F1E
+      1F1F1F1E1E1F1F1E1F1E1F1E1E1E1F1E1E1E1E1E1E1D1D1D1E1D1E1E1D1D1E1D
+      1D1D1D1D1D1D1D1D1C2222222525262626272727272828282929292B2A2A2B2C
+      2C2324231B1B1C1B1B1C1B1B1B1A1B1B1B1A1B1A1A1B1F1E1E1F1F2020202020
+      1F1F1F1F1F1F1F1F1F1F1F1F1D1E1E1D1E1D1D1D1D1E1D1E1D1D1E1E1D1E1E1D
+      1D1E1D1D1D1D1D1D1C1D1C1C1D1C1C1C1B1C1C1B1B1B1C1B1B1C1B1B1B1B1B1A
+      1B1A1B1B1A1A1A1A1B1A1A1A1A1A1A1A1A1A191A1A1919191919191A1A1A1A1E
+      1E1E1E1E1E1D1D1E1E1D1D1A1A1A181818181818181718171717181718171717
+      1717171717171716161716161615151615161615151615151515141415141111
+      111112111111111111111010111717162423242525262626262828282A2A2A2A
+      2A2A2A29291D1D1D0E0E0E0E0E0E0D0E0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0C
+      0C0C0D0D0D0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0B0C0C0B0B0B0B0B0B0B0B
+      0B0B0B0B0A0B0B0A0A0B0A0B0A0A0A0A0A0A0A0A0A0A0A0A0A090A0A1619190A
+      0A09303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303131313434343737373939393B3B3B3A3A
+      3A2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F39393839393939393939393939393939
+      3939393939393939393939393939393939393939393939393938393938393838
+      3938383938383938383938383938383838383838383838383838383838383838
+      383838383838383838383838383838383838383838383838373736362F2F302F
+      2F2F2F2F2F2F2F2F3030303131313333334242424848484B4B4B4D4D4D4F4F4F
+      4F4F4F4E4E4E4C4C4C4A4A4A4949494747474747474646464545454343434242
+      4241414141414140404040404040404039383930303031313131313131313131
+      31313535353939393939393939393A3A3A3B3B3B3B3B3B3B3B3B3B3B3B3C3C3C
+      3D3D3D3E3E3D3E3E3D3F3E3E403F3F403F3F4140404242424242424443434544
+      444645454746464646464848484949494A4A4A4B4B4B4D4D4D4D4D4D50505050
+      50505252525353535454545656565858585959595B5B5B5757575959595B5B5B
+      5B5B5B5F5F5F6B6B6B7575757B7B7B8080808585857878786A6A6A6B6B6B6D6D
+      6D6F6F6F7070707272727474747474747777777878787979797B7B7B7C7C7C7E
+      7E7E7F7F7F808080818181838383838383848484858585878787878787888888
+      8989898989898A8A8A8A8A8A8B8B8B8C8C8C8D8D8D8D8D8D8D8D8D8D8D8D8D8D
+      8D8F8F8F8F8F8F9292919797989D9C9D9F9F9FA1A1A19C9C9C90909090908F8E
+      8F8F8F8E8F8E8E8E8D8D8D8E8E8E8D8D8D8C8C8C8C8C8B8B8B8C8C8D8C8D8D8D
+      8D8D8D8E8D8E8D8D8E8888888383838282828080807F7F7F8080808484848383
+      8381818180807F7E7E7E7D7D7C7B7B7B79797978787877777674747474727372
+      71717070706E6D6D6C6C6C6A6A6A696969676666656465646464626262605F60
+      5F5F5F5D5D5D5B5B5A5A5A59585757565556545353535252515050504F4F4E4E
+      4E4D4C4D4B4B4A4949494747473F3F403E3E3E3E3D3E3C3B3C3F3F3F43424141
+      4140403F3F3E3E3E3E3E3D3B3B3B3A3B3B3A3B3B3A3A3B383838383837373736
+      363534363435363434353535333333323232313130303031303030303130302F
+      2F2F2F2F323131313231302F2F302F2F2F2F302C2B2B2B2B2B2B2A2A29292A29
+      29292A29292525252222222221212121222221222121212222222B2C2C323233
+      3333333332323231313131313030303030302D2D2D2626272021211F1F1F1F1F
+      1F1E1F1F1E1F1F1E1E1F1E1E1E1E1F1E1E1E1E1E1E1E1E1E1E1E1D1D1E1E1E21
+      21212626262727272827282828292A29292A2A2A2B2A2B2C2C2C2524251B1C1D
+      1B1C1C1B1B1C1B1A1C1B1B1C1A1A1C1E1E1D2020202020202020201F1F201F1F
+      201F1F1F1F1F1F1F1E1E1F1E1E1E1D1E1E1E1D1F1E1E1E1E1E1E1E1E1D1E1D1E
+      1D1D1D1D1C1D1D1C1D1C1C1D1B1B1C1C1C1C1B1C1B1C1B1C1B1B1B1B1B1B1B1B
+      1A1B1B1A1B1B1B1A1A1A1A1A191A1A1A19191A1A1A1A19191D1C1B1E1E1D1E1E
+      1E1E1E1E1E1D1E19191918181818181818171817181817171817171717171716
+      1617171717171616161615161515161515161515151415141515111112111212
+      1111111111111111111111121515152222222526252525252727272627262727
+      262726261E1E1E0E0F0F0E0E0D0E0D0E0E0D0E0D0E0E0E0E0D0D0D0D0D0D0D0C
+      0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0B0B0B0B0B0B0B0B0C0B0B
+      0B0B0B0A0B0B0B0A0A0A0B0B0A0A0A0A0A0A0A0A0A0A0A0A19191609090A3030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303232323535353737373939393B3B3B3737372F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F303A39393939393939393939393939393939393939
+      3939393939393939393939393939393939393939393839393839393839383839
+      3838393838393838393838383838383838383838383838383838383838383838
+      3838383838383838383838383838383838383737373030312F2F2F2F2F2F2F2F
+      2F3030303030303232324040404949494D4D4D50505053535354545451515149
+      49494E4E4E4D4D4D4B4B4B4A4A4A484848474747454545444444414141404040
+      3F3F3F4040404040404040403F3F3F3131313131313131313131313131313131
+      313938383939393939393939393A3A3A3B3B3B3B3B3B3B3B3B3B3B3B3C3C3C3D
+      3D3D3E3E3D3E3E3D3F3E3E403F3F403F3F414040424242424242434242454444
+      4645454545454646464848484949494949494B4B4B4C4C4C4D4D4D4F4F4F5050
+      505151515252525454545555555757575858585454545757575757575959595C
+      5C5C6B6B6B7373737979797E7E7E8383836D6D6D6767676868686A6A6A6B6B6B
+      6D6D6D6E6E6E7070707171717373737474747575757777777878787979797B7B
+      7B7C7C7C7D7D7D7E7E7E7F7F7F7F7F7F81818182828283838383838383838385
+      8585858585858585868686878787878787868686878787888888888788888888
+      8989898989898989898D8C8D9696969292928A8A8A8A8A8A8B8B8B8A8A8A8A8A
+      8A89898988888888888888888889898887878687868687878788888889898988
+      88888989898584847F7E7F7D7E7D7C7C7C7B7B7B7A7A7A8080807E7E7E7D7E7E
+      7B7B7B7A7A7A7A7979787778767776747474737372727271706F6E6F6E6E6D6C
+      6D6B6A6A6969696767676666666464646262626161615F5F5F5D5D5E5C5B5C5B
+      5B5B585858575757565655545353535353504F50504F4F4E4D4D4C4C4C4A4A4B
+      4848494748484747464040403E3D3D3B3B3B3B3A3B3A3A3A424141403F3F3F3F
+      3E3F3E3F3C3C3C3B3B3B3B3B3B39393938383838393837373736373536363536
+      3534363434343434333232313131313131313131313031302F2F3030302F302F
+      30303032323231313030302F302F2F2D2D2D2B2B2B2A2A2A2A2A292A29292A29
+      2929292823232322222222212222222221212121222122222228282933333332
+      33333231323131323030303030303030302F2F2F2F2F2F2A2A2A262626232323
+      2121211F1E1F1E1F1F1F1E1E2020202121212424232526262828282828282828
+      28292829282828292A2A2B2B2A2B2B2B2C2C2C2222221C1B1D1C1B1C1C1B1D1B
+      1B1D1B1B1C1B1B1B1C1B1D212021202121202020202020201F20201F1F1F201F
+      1F1F1F1F1F1E1F1E1E1F1E1E1E1E1E1F1E1F1F1E1E1E1E1E1D1D1E1D1D1E1E1E
+      1D1D1D1D1D1C1C1D1C1C1D1C1C1C1B1B1C1C1C1C1B1B1B1B1B1B1B1B1B1B1B1B
+      1A1B1B1B1A1A1A1B1A1A1A1A1A1A191A1A1A1A191E1D1E1E1D1D1E1E1D1D1E1E
+      1D1D1C1918191918181818181818181818181818181818171718171717171717
+      1717161616161616151617151516151515151515151511121211121111111111
+      1111111111111011121212121213202020242424252524242525252425242525
+      2424242020211111110E0D0E0D0E0D0D0E0D0D0D0E0D0D0D0D0D0D0D0C0D0D0C
+      0C0C0C0D0D0C0C0C0C0C0C0C0C0C0C0C0C0C0B0B0C0C0B0C0B0B0B0B0C0B0B0B
+      0B0B0B0B0B0A0B0B0B0A0A0B0B0B0A0A0A0A0A0A1916160A0A0A303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303333333535353737373A3A3A3C3C3C3535352F2F2F2F2F2F2F
+      2F2F2F2F2F3131323A3939393939393939393939393939393939393939393939
+      3939393939393939393939393939393939393939383939383938383938383938
+      3839383839383838383838383838383838383838383838383838383838383838
+      38383838383838383838383737373030312F2F2F2F2F2F2F2F2F303030303030
+      3232323F3F3F4949494D4D4D5252525555555858585656563737373030303030
+      303232323737373B3B3B3D3D3D4040404040404343434141413F3F3F3E3E3E3F
+      3F3F3F3F3F3F3F3F3F3F3F383738303030313131313131313131313131343434
+      3939393939393939393A3A3A3A3A3A3B3B3B3B3B3B3B3B3B3B3B3B3C3C3C3D3D
+      3C3E3E3D3E3D3D3F3E3E3F3E3E403F3F41404042414142424243424245444444
+      44444545454646464747474949494949494B4B4B4C4C4C4D4D4D4E4E4E505050
+      5050505252525353535454545655555252525454545555555757575A5A5A6868
+      687171717676767C7C7C8080806A6A6A6363636565656666666868686969696B
+      6B6B6C6C6C6D6D6D707070707070727272737373747474767676777777787878
+      7979797B7B7B7C7C7C7B7B7B7D7D7D7E7E7E7E7E7E7E7E7E7E7E7E8080807F7F
+      7F80808080808080808080808081818182828282828283828383838382828383
+      8383848483848384838383848484848485858585858585858585858585858585
+      8484848384848483848383838283828282828383838484848484848484848585
+      848283827A797A7A797A7879787777777676767B7B7B7B7B7B7A7A7A77787877
+      777775767674757572727271717170706F6E6E6D6D6D6D6B6A6A6A6A6A686868
+      6666666465646263626161616060605E5D5E5D5D5D5B5B5B5A5A595858585657
+      555555555453535151515150504F4F4F4E4D4D4C4B4C4B4C4B49494948484747
+      47474645464140403B3B3B3A3B3A39393939393A3D3E3D3F3F3F3F3E3D3E3D3D
+      3C3B3B3B3C3B3A3A3A3939393838383738373636363636363636353536353534
+      3434323233323232313131313131313130302F2F302F302F2F2F2F302F2F2F31
+      3030303131313030302F302F2F2F2C2D2D2A2A2A2A2A2A292A29292A292A2929
+      2928292222222122222222212222212222222221212121222525253030303132
+      313131313031313030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2D2D2D2C
+      2B2C2C2C2C2B2B2B2A2A2B2A2A2A2A2A2A2A292A292A2A29292A2A2A2A2A2A2A
+      2B2B2B2B2B2C2C2C2D2B2B2A1F1F1F1C1C1D1C1C1D1C1B1D1C1B1D1B1B1D1B1B
+      1D1C1C1C2021202120212121202121202121202020201F20201F201F201F1F1F
+      201F1F1F1E1F1E1E1F1F1E1F1E1F1E1E1E1E1E1E1E1E1E1E1E1E1D1E1D1D1D1D
+      1E1D1D1D1C1C1D1C1C1D1C1B1C1C1C1C1C1C1B1B1B1B1B1B1B1B1B1B1A1A1A1A
+      1B1A1A1A1A1B1A1A1A1A1A1A1A1A1A191E1D1D1E1D1D1E1D1D1E1E1D1C1C1C19
+      1919181919181818181818181818181818171718171717171717171717171616
+      1716161716161616151615151615151515151514151213131111121112111111
+      111111111111111112121112121C1C1C23242324242424242424242524242425
+      24242323231212120E0D0D0E0E0D0E0D0D0D0E0D0D0E0D0D0D0D0D0D0C0D0D0D
+      0C0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0B0B0C0B0C0B0C0B0B0B0C0B0B0B0B0B
+      0B0B0B0B0A0A0B0A0A0B0A0A0A0B0A0A191919090A0A30303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303333333535353838383A3A3A3C3C3C3232322F2F2F2F2F2F2F2F2F2F2F
+      2F3232323A39393A393939393939393939393939393939393939393939393939
+      3939393939393939393939393939393938393938393938393838393838393838
+      3938383938383838383838383838383838383838383838383838383838383838
+      383838383838383232322F2F2F2F2F2F2F2F2F3030303030303232323E3E3E48
+      48484D4D4D525252565656595959595959383838303030303030303030303030
+      3030303030303030303030303030303030303030303131313939393D3D3D3E3E
+      3E3E3E3E3F3F3F3F3F3F30303030303031313131313131313131313138373739
+      39393939393939393939393A3A3A3B3B3B3B3B3B3B3B3B3B3B3B3C3C3B3D3D3C
+      3E3D3D3E3D3D3F3E3E3F3E3E403F3F4140404241414242424342424443434444
+      444545454646464747474848484949494A4A4A4B4B4B4D4D4D4D4D4D4F4F4F50
+      50505151515252525352525050505252525353535454545757576969696F6F6F
+      7474747A7A7A7F7F7F6363636060606262626363636464646666666767676868
+      686A6A6A6B6B6B6D6D6D6E6E6E70707070707072727273737374747475757576
+      76767777777878787878787979797A7A7A7979797A7A7A7A7A7A7B7B7B7B7B7B
+      7A7A7A7A7A7A7B7B7B7C7C7C7B7B7B7C7C7C7C7C7C7D7D7D7C7D7C7E7E7E7E7E
+      7D7F7E7F7F7F7F7F807F7F7F7F7F7F7F807F7F8180808080807F7F7F80808080
+      7F7F7F7F7F7F7F7F7E7E7F7E7E7E7D7D7E808080808180818181818181808080
+      7777777676757574747372727272727576757778777676767575757373737273
+      737171716F706F6D6D6D6D6D6C6B6B6A69696969686867666665656563626262
+      62626061605F5F5F5D5E5D5B5B5B5A5B5B595859585858565657555454535352
+      5151505050504F4E4E4D4C4D4C4C4B4B4A4A4849484747474646464545454344
+      444342423A3A3A3A39393838383737373A3A393F3F3E3D3D3D3D3B3C3C3B3B3B
+      3A3A393939383939373738373637363737373636363636353534343433323331
+      323132333232323131303130302F30302F2F302F2F30302F2E2E2E2F2F2F3131
+      3131303131313030302F2E2E2E2A2A2A2A2A2A2A292A2A2A2A2A2A2A2A2A2A28
+      28282222222222222222222121212121222121212121212222222B2B2B323232
+      3231323030303031303030302F2F2F2F2F2F2F2F2F2E2E2E2D2D2D2D2D2D2D2D
+      2D2B2B2C2C2C2C2B2B2B2B2C2B2B2A2B2B2B2B2C2B2B2B2C2B2D2D2C2D2D2D2D
+      2D2D2526261D1E1F1C1D1D1C1C1D1C1C1D1B1C1C1C1C1D1B1C1C1C1C1C202020
+      2121212021202121212121202021202020201F202020201F1F202020201F201F
+      1F1F1F1F1F1F1F1E1F1F1F1F1E1E1F1E1E1E1E1E1E1E1E1E1E1E1E1D1E1E1D1E
+      1D1D1D1C1C1D1C1C1D1C1B1C1C1C1C1C1B1C1B1C1C1B1B1B1B1B1A1B1B1B1A1B
+      1A1B1B1A1A1A1A1A1A1C1B1C1E1D1E1E1E1E1E1E1D1E1D1D1B1A1A1919191919
+      1818191819191818181918181817181817171717181718171717171717161617
+      1615161615161515161515151515151515151515131312121212111212111111
+      1010111011111111111111121919192323232323232323232424242425252424
+      242424241616160E0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0C0C
+      0C0D0C0C0C0C0C0C0C0C0C0C0C0C0B0C0C0C0C0C0B0C0B0B0B0B0B0B0C0B0B0B
+      0B0B0B0B0A0B0B0A0B0B0A0A19191B0A0A0A3030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303034
+      34343636363838383A3A3A3D3D3D2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      3232323838383939393939393939393939393939393939393939393939393939
+      3939393939393939393939393839393839393839383839383839383839383839
+      3838383838383838383838383838383838383838383838383838383838383838
+      3232322F2F2F2F2F2F2F2F2F3030303030303131313A3A3A4848484D4D4D5252
+      525757575B5B5B5D5D5D41414130303030303030303030303030303030303030
+      30303030303030303030303030303030303030303232323B3B3B3B3B3B3D3D3D
+      3E3E3E3F3F3F3837383030303030303131313131313131313434343838383939
+      393939393939393939393A3A3A3B3B3B3B3B3B3B3B3B3B3B3B3C3C3B3D3D3C3E
+      3D3D3E3D3D3F3E3E3F3E3E403F3F403F3F424141424242424242434343444444
+      4545454545454646464848484949494949494B4B4B4C4C4C4D4D4D4E4E4E5050
+      505050505150504E4E4E4F4F4F5050505353535656566868686D6D6D72727278
+      78787D7D7D5C5C5C5D5D5D5F5F5F606060616161636363646464666666676767
+      6868686969696B6B6B6B6B6B6D6D6D6E6E6E7070707070707171717272727373
+      7372727274747474747475757574747475757575757575757576767675757575
+      7575757575757575767676767676767676777777777677787877797978797979
+      7A7A797A7A7A7979797A7A7A7B7B7B7B7A7A7B7B7B7B7B7B7C7C7C7C7B7C7B7B
+      7A7B7B7B7A7B7B7A7A7A7979797C7C7C7C7C7C7D7D7D7D7D7D7D7D7D73737371
+      727171707170706F6E6E6E7171727474737373737171717070706F6F6F6D6E6E
+      6D6D6D6B6C6B696A696869676766666665656463636262616161615F5F5F5E5F
+      5E5B5B5B5B5B5B59595958585757575755555454545452535251515050504F4F
+      4F4E4C4C4C4C4B4B4A4A4A494949484847464646454546444444434343424241
+      3B3B3B3839383736373637363637363D3D3C3D3C3B3C3C3C3B3B3A3A39393A39
+      3A38383837363736363736363637363735353534343433333233333132323233
+      323231303131313030303030303030302F2F2F2E2E2F2E2F2E2F313030313131
+      31313130302F2F2F2E2C2D2C2A2A2A2A2A2A2A2A2A2A2A292A292A2929292827
+      272222222222212122222222212121212121212121212120212223222C2C2B32
+      31323030313030303030302F2F2F2F2F2F2F2F2F2E2E2E2E2E2E2E2E2E2D2E2D
+      2D2D2C2C2D2C2C2C2C2D2D2D2D2D2D2D2D2C2D2E2D2E2D2D2727271E1E1F1D1D
+      1D1C1D1D1D1D1D1C1D1D1C1C1D1C1C1D1C1C1D1C1C1D21212021212121212121
+      2121212121202021212120202021202020202020201F2020201F1F1F201F201F
+      1F1F1F1E1F1F1E1E1F1E1F1E1F1E1E1E1E1E1E1E1E1D1E1E1E1E1E1E1D1D1D1D
+      1C1D1C1C1D1C1C1D1C1B1C1C1B1C1B1B1C1C1B1B1B1B1B1B1A1B1A1A1B1B1A1B
+      1B1A1A1B1A1E1E1D1E1E1E1E1E1D1E1D1D1D1D1D191919191919191919191819
+      1819181818181818181818181818181818171817171717171716161716161716
+      1517151616151615151515151515151515151413131312111111121111111111
+      1111111111111111101111171717222222232322232322232324242424242424
+      2424241A1A1A0E0E0E0D0E0E0E0D0D0D0D0E0D0D0D0D0C0D0D0D0C0D0D0D0C0D
+      0D0C0C0C0C0D0C0C0C0C0B0C0C0C0B0C0B0B0B0B0C0B0C0B0B0B0B0B0B0B0B0A
+      0B0B0B0B0A0A0A0B1B1B190A0A0A303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303131313535353737
+      373939393B3B3B3D3D3D2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F343434393938393939393939393939393939393939393939393939393939
+      3939393939393939393939383939383938383938383938383938383938383838
+      383838383838383838383838383838383838383838383838383333332F2F2F2F
+      2F2F2F2F2F3030303030303131313A3A3A4747474C4C4C5151515656565B5B5B
+      5E5E5E4141413030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303636363A3A3A3B3B3B3D3D3D3E
+      3E3E3E3E3E303030303030303030313131313131313131383737383838393939
+      3939393939393939393A3A3A3B3B3B3B3B3B3B3B3B3B3B3A3C3C3B3D3C3C3E3D
+      3D3E3D3D3F3E3E3F3E3E403F3F403F3F41404042424242424242424244444444
+      44444545454646464747474949494949494A4A4A4B4B4B4D4D4D4D4D4D4F4F4F
+      4D4D4D4B4B4B4D4D4D4F4F4F5050505454546666666C6C6C7171717676767B7B
+      7B5959595B5B5B5C5C5C5D5D5D5F5F5F5F5F5F61616162626263636364646466
+      66666767676868686969696B6B6B6B6B6B6C6C6C6D6D6D6E6E6E6E6E6E6F6F6F
+      6F6F6F6F6F6F7070706F6F6F6F6F6F7070707070707070707070706F6F6F7070
+      7070707070707070707070707071717172727272727272727174747475757474
+      7373747474757576757675757575767676777777777777787878777777767676
+      76767675757675757576777678787879787879797979797A7272726D6D6D6C6D
+      6C6C6B6C6A6B6A6B6B6B7070706F6F6F6E6E6E6D6D6D6C6C6C69696A69696968
+      6767666766666564656463636262626161605F5F5E5E5E5C5C5C5B5B5B5A5959
+      5858585757585656565454545454545252525050504F4F4E4E4E4E4C4C4C4C4B
+      4B4A49494948484746464747474544454444444344444141414141413C3B3B37
+      36363637363635363434343A3A3A3D3C3C3B3C3A3B3A3A3A3A39393838383737
+      3737373737373635363535363435353433343333333333323333313231313230
+      313130303131313030302F2F2F2F2F2F2E2E2E2E2F2F2E2E2E3131313030302F
+      302F2F302F302E2F2D2B2C2B2A2A2A2A2A292A2A2A2A2A2A292A292A29282828
+      2323232222222122222122212121222121212121212121212020212322232B2A
+      2A2E2F2F3030303030303030302F2F2F2F2F2F2F2F2F2F2F2F2E2F2F2E2F2F2F
+      2F2F2E2E2F2E2F2E2E2E2E2C2C2C2627271F1F1F1E1D1E1D1D1D1D1D1D1D1D1D
+      1D1D1D1C1D1D1C1C1D1C1D1D1D1D1E2021212122212222212221222121212121
+      2121212121212021212121202020202020202020202020201F1F1F1F1F1F1F1F
+      1F1F1F1E1F1F1F1F1F1F1F1E1E1E1E1E1E1E1E1E1E1E1E1E1E1D1D1D1D1E1D1D
+      1D1C1C1D1C1C1C1C1C1C1B1B1C1B1B1B1B1C1B1B1B1B1B1A1B1B1B1A1A1A1B1C
+      1B1E1F1E1E1E1E1E1E1E1E1D1E1C1D1C19191A19191919191919191819181919
+      1919181819181818181818181817181717181717181717171616171616171616
+      1616151616151515151515151515141514151414131112121211111111111110
+      1111111111111111101115151621212123232322232224242423242424242424
+      24241D1D1D0F0F0F0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0C0C0C0C
+      0C0C0D0D0C0C0C0C0C0C0B0C0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B0B0A0A0A0B
+      0B0B0B0A1B1B190A0A0A30303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030323232363636373737393939
+      3B3B3B3B3B3B3030302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F3035353539393939393939393939393939393939393939393939393939
+      3939393939393938393938393938393838393838393838393838393838383838
+      3838383838383838383838383838383838383534342F2F2F2F2F2F2F2F2F2F2F
+      2F3030303131313636364747474C4C4C5050505656565B5B5B5E5E5E48484830
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303131313838383A3A3A3B3B3B3D3D3D3E3E
+      3E38373830303030303030303031313131313134343438383838383839393939
+      39393939393939393A3A3A3B3B3B3B3B3B3B3B3A3B3B3A3C3C3B3D3C3C3D3C3C
+      3E3D3D3E3D3D3F3E3E403F3F403F3F4140404241414242424242424343434444
+      444545454545454646464848484949494949494B4B4B4C4C4C4D4D4D4B4B4B4A
+      4A4A4A4A4A4C4C4C4E4E4E5555556464646A6A6A707070757575707070575757
+      5757575959595A5A5A5B5B5B5C5C5C5E5E5E5F5F5F6060606161616363636363
+      636565656666666767676767676868686A6A6A6969696A6A6A6A6A6A6B6B6B6B
+      6B6B6B6B6B6A6A6A6A6A6A6A6A6A6A6A6A6A6A6A6A6A6A6A6A6A6969696A6A6A
+      6A6A6A6A6A6A6B6B6B6B6B6B6C6C6C6C6C6C6D6D6D6D6E6E6E6E6E6E6F6E706F
+      7070707070707172727271727170707171727172727272727272717271717170
+      70707171717272727474747575747575757676767171716A6A6A686969696969
+      6767666667666D6D6D6C6C6C6B6C6B6969696969696666676666666464646363
+      63626261616160605F5F5F5E5E5D5C5C5B5B5B5A595A59585958575857565654
+      54545454545252525151515050504F4F4F4D4D4C4C4C4B4B4B4A4A4A49484848
+      4846474646464444444444444342434141424040404040403E3D3D3536363636
+      363435343435343535353B3B3A3B3A3A393A393A393839373738383738373736
+      3636363636343435333434343333333333333433323231323230313230323130
+      323130302F2F2F2F302F2F2F2F2F2F2F2E2F2E2E2E2F2E2E3030302F30303030
+      3030302F2E2F2E2B2B2B2A2B2A2A2A2A292A2A292A2A2A29292A292A29282924
+      2424222222222222212121212121222121212121212121212121202020202020
+      2323232828282A2A2A2C2C2B2E2D2E3030303030303030302E2E2E2B2A2A2829
+      292625252020221E1E1E1E1D1E1E1D1E1D1D1D1E1E1E1D1D1D1D1D1D1D1C1D1C
+      1D1D1C1D1D1F1F20222222222222212222222222212122212121212122212121
+      212121202121212020202120202020201F20201F2020201F1F1F201F1F1F1F1F
+      1F1F1F1F1F1E1F1F1F1F1F1E1E1E1E1E1E1E1E1E1D1D1D1D1E1E1E1D1E1D1C1D
+      1C1C1D1C1C1C1C1B1C1C1B1C1B1B1B1B1C1B1B1B1B1B1B1B1B1B1E1C1D1F1E1F
+      1E1E1E1E1E1E1E1D1E1B1A1A191A1A1919191919191919191919191818181819
+      1818191818181818181718181717171717171717161717161617161616161516
+      1515161516151515151615151515141515141414121212111111121211111111
+      1110111010111010111212142020202323232323232423232324232425242424
+      242020200F0F0F0E0E0E0D0D0E0E0D0E0D0D0D0D0D0D0D0D0D0C0D0D0C0D0D0D
+      0C0C0C0C0C0C0C0C0C0C0B0C0B0C0B0B0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B
+      191B1B0A0B0B3030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303434343737373838383A3A3A3C3C3C3D
+      3D3D3E3E3E3636372F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F3030303535353939393939393939393939393939393939393939393939
+      3939393839393839393839383839383839383839383839383838383838383838
+      38383838383838383838383534342F2F2F2F2F2F2F2F2F2F2F2F303030313131
+      3636364646464B4B4B5050505555555A5A5A5E5E5E4D4D4D3030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303535353939393A3A3A3B3B3B3E3E3E3E3E3E
+      3131313030303030303030303131313131313837373838383838383939393939
+      393939393939393A3A3A3B3B3B3B3B3B3B3B3A3B3B3A3B3A3A3C3B3B3D3C3C3E
+      3D3D3E3D3D3F3E3E3F3E3E403F3F403F3F414141424242424242424242444444
+      4444444545454646464747474848484949494A4A4A4B4B4B4848484848484949
+      494A4A4A4B4B4B5353536363636969696E6E6E7474746E6E6E54545455555557
+      57575757575959595A5A5A5B5B5B5C5C5C5D5D5D5F5F5F5F5F5F616161616161
+      6363636262626464646565656565656565656565656565656767676666666565
+      6566666665656565656565656565656565656564646465656564646465656565
+      6565656565656565666666666666676767676867696968696A6A6A6A6A6B6A6B
+      6B6A6B6C6B6B6D6D6C6D6D6D6D6D6C6E6D6D6E6E6E6D6D6D6E6E6E6D6D6D6C6C
+      6C6D6C6D7171717070707070707272726F6F6F65656565656564646464646463
+      636369686969696967686767676766666665656563626362626261606060605F
+      5F5F5E5E5D5D5C5B5B5B5A5A5A59595858585757565455555454545353525151
+      514F4F504F4F4F4D4D4D4D4D4D4B4B4B4B4B4949494848484848464646454544
+      44444443434242424141414040403F3F3F3F3F3F3E3E3E373636353534333434
+      3332333131323B3A393A3A393939383938383938383837373736373737363535
+      35343434343433343434343334323333323232323231323231323130312F3031
+      2F2F302F2F2F2F2F2E2F2F2F2E2E2E2E2D2D2E2E2F2F2F303031303030303030
+      30302F2E2E2E2B2B2C2A2A2B2A2A2A292A2A2A2A292A2A2A2A2929292A292727
+      2722222221222122212222212221212221212121212021212020212021212021
+      20202020201F2020201F201F1F1F1F20201F1F201F1F1F1F1F1F1F1E1F1F1E1F
+      1E1F1F1E1F1E1E1E1E1D1D1E1E1E1E1D1D1D1D1D1E1D1D1D1D1D1D1E1E1E2120
+      2123222223222222222222222222222221212122212122212122212122212121
+      2021212020202020202021202020201F1F1F20201F20201F1F201F1F1F1F1F1F
+      1F1F1F1F1F1E1E1E1E1F1E1E1E1E1E1E1E1E1D1E1E1E1E1D1E1D1D1D1D1C1D1C
+      1C1D1C1C1C1B1C1C1B1B1C1B1B1B1B1B1B1B1B1C1B1B1F1E1D1F1E1E1F1F1E1E
+      1E1E1E1E1D191A1919191A1A191A1A1919191919191919181819191819191819
+      1818181818181818171817171817171716161716161716161616161616151516
+      1515151515151615151515151515141515141512131212111111111111111111
+      10111111111111111111121C1C1C232223232223232323242323242424242424
+      2322231212120E0D0D0D0D0E0D0D0E0D0D0D0D0C0D0C0C0C0C0D0D0D0C0C0C0C
+      0C0C0C0C0B0C0C0B0C0C0B0C0B0B0B0C0C0C0B0B0B0C0B0B0B0B0B0B1B1B1B0A
+      0B0B303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303434343838383A3A3A3B3B3B3C3C3C3E3E3E3F3F
+      3F4040403D3D3D3333332F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F303030353535393939393939393939393939393939393939393939
+      3939383939383938383938383938383938383938383838383838383838383838
+      383838383736362F2F302F2F2F2F2F2F2F2F2F3030303131313333334646464A
+      4A4A5050505555555959595C5C5C4F4F4F303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303131313838383838383A3A3A3B3B3B3D3D3D3939392F
+      2F2F2F2F2F2F2F2F2F2F2F303030333333383838383838383838393939393939
+      3939393939393A3A3A3A3A3A3B3B3A3B3B3A3B3A3A3B3A3A3C3B3B3D3C3C3E3D
+      3D3E3D3D3F3E3E3F3E3E3F3F3F3F3F3F3F3F3F40404041414141414142424243
+      4343444444444444454545464646484848484848454545454545464646474747
+      4949495655566262626767676C6C6C7171716464645151515252525252525454
+      545555555656565757575858585959595A5A5A5B5B5B5D5D5D5E5E5E5E5E5E60
+      60605F5F5F616161616161616161616161626262626262616161616161616161
+      6060606161616060605F5F5F5F5F5F5F5F5F5E5E5E5E5E5E5F5F5F5F5F5F6060
+      6060606060606061616162626263636363646465656465656466666567666767
+      6768686767676767676768686868696969696969696969686867696869696968
+      6C6C6C6C6C6C6C6D6C6D6D6E6D6D6D616161616161605F605F5F5F5E5D5E6363
+      636565656564646463646161616161615F5E5F5E5E5E5D5E5D5C5C5C5A5B5A5A
+      5A5A595858575757575656545454535353525251505151504F4F50504F4D4D4D
+      4C4C4C4C4C4C4A4A4A4948494747474747474545444444434444434342424141
+      414040403F3F3F3F3F3F3E3E3F3D3E3D3C3C3C3A3A3A34343332323332323231
+      3231343434383938383837383837373737373635353435353435343333333333
+      33323333323331323131313232333232323232323131313030313030302F3030
+      2F302F302F2F2F2E2E2E2E2E2E2D2D2E2D2D2D2F2F2F3030303030302F302F30
+      302F2F2F2F2B2B2B2A2A2B2A2A2A292A2A29292A29292A292A2A292A29292828
+      2423252221222221212121212121212121212121212121212121212020212020
+      202020202020201F1F1F1F201F201F1F1F1F1F201F1F1E1F1F1F1F1E1F1F1F1E
+      1E1E1E1F1E1E1E1E1D1E1E1E1E1E1E1E1D1E1D1D201F20232323232323222323
+      2223222323232222222122222121222222222321212222212221212221212120
+      2120202020212020202020202120201F1F2020201F1F1F1F1F1F1F1F1F1F1F1F
+      1F1F1E1F1E1E1E1F1F1F1E1E1E1E1E1E1E1E1E1D1E1E1E1E1D1D1D1D1C1D1C1C
+      1C1C1C1D1C1C1C1C1C1C1C1B1B1B1B1D1D1D1F1F1F1F1F1F1F1E1F1F1E1F1C1C
+      1C1A1A1A1A1A1A1A1A1A1A19191A1919191A1919191919181918191919181918
+      1818181817181817181717171717181616171716171616161616161516161615
+      1516151516161515151515151515151415151212121112111111111011111111
+      111010111110111111121A1A1B23222323232224232323232425242424242423
+      23231616160E0E0E0E0D0D0D0E0D0D0D0D0C0D0D0D0C0C0D0D0C0D0D0D0D0C0D
+      0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0B0B0B0B0B0B0B0B0B1B1B1B0B0B0B3030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303131313737373B3B3B3C3C3C3D3D3D3E3E3E3F3F3F3F3F3F
+      3F3F3F4040403B3B3B3131312F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F30303035353539393939393939393939393939393939393839
+      3938393938393838393838393838393838393838383838383838383838373636
+      2F2F302F2F2F2F2F2F2F2F2F3030303131313333334343434949494E4E4E5353
+      535858585C5C5C5555553232322F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F3333333838383939393A3A3A3C3C3C3E3E3E3030302F2F
+      2F2F2F2F2F2F2F2F2F2F30303036363637373737373737373738383838383838
+      38383838383939393939393A3A393A3A393A39393A39393B3A3A3C3B3B3C3B3B
+      3D3C3C3D3C3C3E3D3D3E3D3D3E3E3E3F3F3F4040404141414141414141414343
+      4343434344444445454545454547474743434343434345454545454547474753
+      52535E5E5E6464646A6A6A6E6E6E5F5F5F4E4E4E4F4F4F505050525252525252
+      5353535454545656565656565757575959595A5A5A5A5A5A5B5B5B5B5B5B5D5D
+      5D5C5C5C5D5D5D5D5D5D5D5D5D5E5E5E5D5D5D5C5C5C5C5C5C5C5C5C5B5B5B5B
+      5B5B5A5A5A5A5A5A5959595959595959595959595959595A5A5A5A5A5A5A5A5A
+      5B5B5B5B5B5B5C5C5C5D5D5D5E5E5E5E5E5E5F5E5F6060606160616262626363
+      6363626364646464646364646464646465656565656464646463626268686868
+      68686868686869686A696A5F5F5F5E5E5E5D5D5D5B5B5B5B5B5B5C5D5C616061
+      6061615F5F605E5E5E5E5E5E5D5D5D5C5C5C5B5A5B5A59595959585858575756
+      555554555453535252525151515050505050504D4D4C4B4B4C4B4B4B4A4A4A4B
+      4B4A4848484848484647464544434544444443424241414241413F3F3F3F3F3F
+      3F3F3E3E3E3D3D3C3C3B3C3C3B3B3B3A3939313131313131303030302F303131
+      3037373738383838383737373636363535353434333434343434333333333332
+      323232323232313232313231313130303030302F30302F2F302F302E2F2F2F2E
+      2E2D2D2D2D2D2C2D2D2D2D2D2D2D2D2C2D2D302F2E2F2F2F2F2F2F2F2F2F2E2E
+      2E2D2E2E2B2A2A29292929292929292929292929282828282828282828282827
+      2627242324222221212121212221212121212121202021212121202121202020
+      20202020202020201F201F2020201F1F1F1F1F1F1F1F1F1F1E1F1F1F1E1F1F1E
+      1E1E1E1E1E1E1E1E1E1E201F2123232223232323242323232323232222222323
+      2223222222222322222222232322222322222222222222222121222121212121
+      2021202021202021202020202020202020201F20201F201F1F1F201F1F1F1F1F
+      1F1E1F1F1F1F1E1E1E1E1E1E1E1E1E1E1E1D1E1E1E1D1D1D1D1D1D1C1D1C1C1D
+      1C1C1D1B1C1C1C1B1C1C1C1F1E1F1F1F1E1E1F1E1E1E1F1E1F1E1B1B1B1A1A1A
+      1A1A1A1A1A1A1A191A1A191A19191A1919191819191919181918191918181818
+      1818181718171717171717161718171717161617161616161616151616151515
+      1515161515151515151515151414151415121312111211111111101111111011
+      1010111011111010111818182222212323222323222423242424242424242424
+      241918180E0E0E0D0D0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0D0D0C0D0D0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0B0B0C0C0B0C0C0B0B0B1B1B1B0A0B0B303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303434343C3C3C3D3D3D3E3E3E3F3F3F3F3F3F3F3F3F3F
+      3F3F4040404040403837383030302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F3030303535353838383939393939393939393939383939
+      383938383938383938383938383938383838383838383838383030302F2F2F2F
+      2F2F2F2F2F3030303131313333334141414949494D4D4D5252525858585B5B5B
+      5555553232322F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F3030303636363838383939393B3B3B3C3C3C3939392F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F3232333737373737373737373737373737373838383838
+      383838383838383939383A3A393A39393A39393A39393B3A3A3B3A3A3C3B3B3D
+      3C3C3D3C3C3E3D3D3D3D3D3E3E3E3E3E3E3E3E3E3F3F3F404040414141424242
+      4343434444444444444545454141414141414141414242424545455252525D5D
+      5D6363636868686C6C6C5959594B4B4B4C4C4C4D4D4D4E4E4E4F4F4F50505051
+      5151515151535353545454555555555555565656585858585858585858595959
+      5959595959595959595959595858585858585757575757575757575656565555
+      5555555555555555555555555554545454545455555555555555555556565656
+      56565656565757575858585959595A5A5A5B5B5B5C5C5C5D5D5D5D5E5E5D5E5D
+      5F5F5E60605F60616060606060606060606060605F5F5F5F6262626464646465
+      656665656766676060605A59595959595858585657575656565E5F5F5D5D5D5C
+      5C5D5C5B5B5A5A5A5A5A5A585858575757565656565655555454535352525152
+      5250504F4F4F4F4F4F4D4D4D4C4B4B4B4B4B494A4949494A4747474847474746
+      46454545444443434342434242414140414140413F3F403F3F3E3E3E3D3D3D3C
+      3B3C3C3B3B3B3B3C3A3B3B393A3A34343430303030302F2F302F2F2F2F343434
+      3636373636363535353535343535343534343433343332323332323232323232
+      3232323231323230303030303030303030302F2F302F30302E2E2E2D2E2D2D2E
+      2D2E2D2D2D2D2D2D2D2C2C2C2C2C2C2D2C2F2F2E2F2F2F2F2F2F2F2E2E2E2E2E
+      2F2D2D2B2B2C2929292929292929292829282828282928282828282828282828
+      27272727252425222221202021202020201F1F20212020212020212021202020
+      2020201F201F1F1F201F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1E1F1F1E1E201F20
+      2222222424242424242424242423232424242324232323232323232323222223
+      2223222223232423232323232323222223222222222222212121212121212120
+      212020202120202021202020201F202020201F201F1F1F201F1F1F1F1F1F1F1F
+      1E1F1F1F1E1F1E1E1F1E1E1E1E1D1E1E1D1E1E1E1E1D1E1D1D1D1C1D1C1C1D1C
+      1C1D1C1C1D1D1C201E1E1F1E1E1F1F1E1E1F1E1D1D1D1A1A1B1A1B1A1A1A1A1A
+      1A1A191A191A1A19191919191919191919191919191919191818191818181817
+      1818171817171816171817171717161716171616161616161515151516151616
+      1516151515151515151514151515151413131411111111111111111110101111
+      1011101011101111151515222222232323232323242323242424242424252524
+      1E1E1D0F0F0F0D0E0E0E0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0B0B0C0C0C0C0C0B1B1B1E0B0B0B30303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303131313838383E3E3E3F3F3F3F3F3F3F3F3F3F3F3F3F3F
+      3F4040404040403F3F3F3636372F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F30343434383837393939393938393938393838
+      3938383938383938383938383938383838383130312F2F2F2F2F2F2F2F2F3030
+      303030303232323F3F3F4949494D4D4D5252525757575A5A5A5A5A5A3535352F
+      2F2F2F2F2F2F2F2F2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+      2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+      2E2E2E2E3232323737373838383939393B3B3B3C3C3C2F2F2F2E2E2E2E2E2E2E
+      2E2E2E2E2E2E2E2E353535363636363636363636363636363636373737373737
+      3737373737363838373837373938383938383938383938383A39393B3A3A3C3B
+      3B3C3B3B3C3B3B3C3C3C3C3C3C3D3D3D3D3D3D3E3E3E40404040404040404041
+      41414242424343433E3E3E3F3F3F4040404040404343435252525C5C5C606060
+      6565656A6A6A5050504848484848484949494B4B4B4C4C4C4D4D4D4D4D4D4E4E
+      4E50505050505051515152525253535354545454545454545455555555555555
+      5555555555545454535353545454545454535353525252525252525252515151
+      5050505050505050505050505050505050505050505050505050505151515252
+      525252525353535454545555555656565757575858585959595A5A5A5B5B5B5A
+      5B5A5C5B5C5C5B5B5C5B5B5B5B5C5B5B5B5B5B5B5D5D5D605F60616061616061
+      6262615E5F5F5655565454555454545353535252525959585A595A5959595859
+      58565656575657555555545454535352525252525251504F4F4E4E4E4E4D4D4D
+      4C4C4B4B4B4A4A4A494949494849474746474746454646454444434343434443
+      4343434242414141403F3F3E3F3E3E403F3F3D3D3C3B3C3C3B3B3B3B3A3B3A3A
+      393839393839393939383636362F2F2F2E2E2E2D2E2E2E2E2D2E2E2E34343535
+      3535343434343433343433343332323232323131323231323131313131313031
+      2F3030302F2F302F2F2F2F302F2F2F2F2F2E2E2E2E2E2E2D2E2E2D2E2D2E2E2D
+      2E2D2D2D2C2C2D2D2C2D2D2D2D2D2C2D2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+      2D2D2C2D2C292929292929292829282829282828282929282828282828282828
+      272727272727272726242425232223212122202020201F1F2020212020202020
+      20201F1F2020201F201F1F1F2020202022212222232325242425242524252425
+      2424242424232423232324232324232324232323232323222323242324242424
+      2323232323232322232323222322222321212221212221212121212121212021
+      2020202020202020202020202020201F1F201F1F1F1F1F1F1F1F1F1F1F1F1F1E
+      1F1F1E1E1F1E1E1E1E1E1E1E1E1D1E1D1E1D1E1E1D1D1D1D1D1C1D1C1C1D1C1C
+      1F1F1F1F1E1F1F1E1E201E1F1F1F1E1C1C1B1A1A1A1A1A1A1A1B1B1A1A1A1A1A
+      1A1A1A191A1A1A19191919191919191919181919191819181818181818181718
+      1717181717171716171716171617171617161616161616151616151515151615
+      1515151515151514151415141514141313131111121110111111111111111010
+      1110101110111112121320202022232222232223232324242427272729292925
+      24250F10100E0E0D0D0D0D0D0E0D0D0D0D0D0C0D0C0C0C0C0D0D0C0C0C0C0C0C
+      0C0C0B0C0C0C0C0C0B0C0C0B1E1B1B0C0B0B3030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303333333B3B3B3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F
+      3F3F3F4040404040403E3E3E3535352F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F33323336363639393839393839383839
+      38383938383938383938383130312F2F2F2F2F2F2F2F2F303030303030323232
+      3E3E3E4848484C4C4C5151515656565A5A5A5959593737372E2E2E2E2E2E2E2E
+      2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+      2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+      2F2F2F3434343636363737373939393A3A3A3636362E2E2E2E2E2E2E2E2E2E2E
+      2E2E2E2E30303034343435353535353535353535353535353536363636363636
+      36363737363737363736363837373837373837373837373938383938383A3939
+      3B3A3A3A3A3A3B3B3B3B3B3B3C3C3C3C3C3C3D3D3D3E3E3E3F3F3F3F3F3F3F3F
+      3F4040403B3B3B3C3C3C3D3D3D3E3E3E4040405151515959595D5D5D63636367
+      67674D4D4D4646464646464747474747474848484A4A4A4B4B4B4C4C4C4D4D4D
+      4D4D4D4E4E4E4F4F4F4F4F4F5050505151515050505151515151515151515050
+      505151515050504F4F4F4F4F4F4E4E4E4E4E4E4D4D4D4D4D4D4D4D4D4D4D4D4C
+      4C4C4C4C4C4C4C4C4B4B4B4B4B4B4C4C4C4C4C4C4D4D4D4E4E4E4E4E4E4F4F4F
+      5050505151515151515252525353535454535454545555555656565757565758
+      575757575757575757575656575656565757575B5B5B5B5B5B5D5D5D5E5E5D5D
+      5E5D515051515252504F4F4F4F4F4F4F4F535353565656565556555455535353
+      5453535151515151515050504F4F4E4E4E4D4D4D4D4B4B4A4C4B4B4A4A494848
+      484848484646464646454545454443444243424241414242424141414141413F
+      3F3E3F3F3E3F3E3D3E3D3D3C3B3C3C3C3B3B3C3B3B3B3B3A3A3A393939393939
+      3737383636373636363131312E2E2E2D2D2D2D2D2D2C2C2C3130313333333334
+      333333333333333333323333313232323232313332313130302F302F30303030
+      30302F302F2F302F2F2F302E2E2E2E2E2D2E2E2D2E2D2C2E2D2D2D2C2C2D2C2C
+      2C2C2C2C2C2C2C2C2B2B2C2B2B2B2C2E2E2D2E2E2E2E2E2D2D2E2E2D2E2D2D2D
+      2D2C2C2C29292928282828282827282727272728272727272727272727272726
+      2626282727282727272727272726272726272625242425242524252525252525
+      2524252726262625262626252625252525252525252424242525242425252524
+      2524242424232423232424242324232324232324242424242323242324242423
+      2324232323232323232222232221222121222121222121212121212021202121
+      2021212020202020202020202020201F201F1F1F1F1F1F1F1F1F1F1F1F1E1E1F
+      1E1E1E1E1E1E1E1E1E1E1E1E1D1E1E1E1E1E1D1D1D1D1D1D1C1E1D1D1F1F1F1F
+      1F1E1F1F1F1F1E1E1E1E1E1B1B1B1B1B1B1B1B1B1B1A1A1A1A1A1A1A1A1A1A1A
+      1A1A1A1A1A1A1919191A1A191919191919191918181818181818171818171817
+      1718171718161717171717161616161616161615161616151615161515151515
+      1515151415151515141514151515141314121112111111111111111111111011
+      1010111010111212131C1C1C2322222324242525252828282B2B2B2E2E2E2D2D
+      2E1414150E0E0E0D0D0D0D0D0D0D0C0D0D0C0C0D0C0D0C0D0D0C0D0C0C0C0C0C
+      0C0C0C0B0C0B0C0C1B1B1B0B0B0B303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303636363E3E3E3F3F3F3F3F3F3F3F3F3F3F3F3F
+      3F3F4040404040404040403E3E3E3535352F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3131313434343838383938383938
+      383938383232322F2F2F2F2F2F2F2F2F3030303030303232323B3B3B4747474C
+      4C4C5151515555555959595B5B5B3737372E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+      2E2E2E2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D
+      2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D31
+      31313535353636363737373939393A3A3A2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D
+      2D2D2D3333333434343535353535353535353535353535353636363636363636
+      3536363536353537363638373738373738373738373738373738383839383839
+      39393939393939393A3A3A3B3B3B3C3C3C3C3C3C3C3C3C3D3D3D3E3E3E3D3C3C
+      3B3B3B3B3B3B3B3B3B3C3C3C3E3E3E5252525656565B5B5B6060606565654343
+      434343434343434343434545454646464747474747474848484A4A4A4A4A4A4B
+      4B4B4C4C4C4C4C4C4C4C4C4D4D4D4D4D4D4D4D4D4D4D4D4D4D4D4C4C4C4D4D4D
+      4C4C4C4B4B4B4A4A4A4A4A4A4A4A4A4A4A4A4949494949494848484848484949
+      494848484848484848484848484949494949494949494A4A4A4A4A4A4B4B4B4C
+      4C4C4D4D4D4E4E4E4E4E4E4E4F4F505050505051525151535353525252525252
+      535353525352535453525252525252575757575858595959595959595A5A5151
+      514D4E4D4D4D4D4C4B4C4A4A4A4B4B4B5252525252525150515050505050504E
+      4E4E4D4D4D4D4C4C4C4C4B4B4B4A4A4A49494949484747474747464545454545
+      4445444343434242424040404040404040404141403F40403E3E3E3E3E3D3D3D
+      3C3C3C3C3C3B3B3B3B3B3B3A3A3A3A3938383938383838383737373736353536
+      35363636353434342C2C2C2C2C2C2B2A2B2A2A2A2A2A2B333232333334333433
+      323233323231323231313131323130302F2F312F3030302F2F2F2F2F2E2F2F2F
+      2E2F2F2F2E2D2D2D2D2D2D2D2D2D2D2C2C2C2C2D2D2C2C2B2B2C2B2B2C2B2B2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2B2B2C2C2C2D2D2D2D2D2D2D2D2D2C2D2C2D2C2C
+      2C2B2B2A2A2A2828282827282828282728282727272727272727272727272726
+      2626272626262627272627272627262626262626252526262527262627262627
+      2526262526262525262526252625252525252425252424242424242424242424
+      2424242424232423232424242424242424242424242424242424242423232324
+      2323232223222223222123212122212122222122212121212121212120202020
+      202020202120202020201F1F20201F1F1F20201F1F1F201F1F1F1F1F1F1E1F1E
+      1E1E1F1E1F1E1E1E1E1E1E1E1D1D1E1E1D1E1E1E1D201F1F1F1F1F1F1F1F1F1F
+      1F1F1E1E1C1D1C1B1C1B1B1B1B1B1B1B1B1A1B1A1B1A1B1B1A1A1A1A1A1A1A1A
+      19191A191A1A1919191919191919191818191818191817181818181717181717
+      1817171716161716171616161616161616161615151616161515151516161515
+      1615151515141514151414151414141412121211111111111111101110101110
+      10111010111111111A1A1A2525242626262B2B2A2E2E2E323232343535303031
+      0E0D0D0D0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0C0C0D0C0C0C0C0B
+      0B0C0B0C1E1E1E0C0C0C30303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303131313838383E3E3E3F3F3F3F3F3F3F3F3F3F3F
+      3F4040404040404040404040403E3E3E3535352F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F333233363535323232
+      2F2F2F2F2F2F2F2F2F3030303030303131313939394646464B4B4B5050505555
+      555959595A5A5A3F3F3F2E2E2E2E2E2E2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D
+      2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2C2C2C
+      2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2D2D2D3333
+      333535353535353737373838383535352B2B2B2C2C2C2C2C2C2C2C2C2C2C2C2E
+      2E2E333333333333343434343434343434343434343434343434353534353534
+      3534343534343635353635353736363736363736363736363837373837373838
+      383838383838383939393A3A3A3A3A3A3B3B3B3B3B3B3B3B3B3B3B3B38383838
+      38383A3A3A3B3B3B3C3C3C4F4F4F5454545959595E5E5E6262623F3F3F404040
+      4141414141414242424343434444444444444646464646464646464747474848
+      484848484949494949494949494949494A4A4A4A4A4A49494949494948484848
+      4848474747474747464646464646464646454545444444454545444444454545
+      4545454545454646464646464646464646464646464747474747474848484949
+      494A4A4A4B4B4B4C4C4C4D4D4C4C4D4D4D4D4D4E4E4E4D4D4D4E4E4E4F4F4F4F
+      4F4F4F4F4F4E4E4E4F4F4F515151545555555555565656565656525151494A4A
+      4848484848484747474646464F4F4E4E4E4E4D4C4C4C4C4C4C4C4C4C4C4B4A4A
+      4B4B4A4A49494849484748484747464646454444444444444343434241414241
+      41414040403F3F3F3F3F3F3E3E3E3D3D3D3D3D3D3C3D3C3B3B3B3B3A393B3B3A
+      3939393A38393938373838383837373637363535353535353534353534353334
+      333333342D2D2D2B2B2B2929292929292929292C2C2C32313232313131313131
+      313131313031313030302E302F2E2F2E2E2F2E2E2F2E2F2E2E2E2E2E2E2D2D2C
+      2C2C2C2D2C2D2D2D2D2D2D2D2D2D2C2D2D2C2D2D2B2C2B2C2C2B2B2C2B2B2B2B
+      2B2B2B2B2B2B2A2A2A2A2A2A2A2C2B2B2D2D2D2D2C2D2C2C2C2C2B2B2B2B2B2B
+      2B2B2B2B2B2A292A272828272626272626262726262626262626272726262726
+      2627262626262626252727262726252626252726252626252625252726262626
+      2626262626252526252526262525252525252525252525242524242425252425
+      2525252425252524252424242425242424232424242324242424232423242323
+      2323222322222322212222212222212222212221212121212121212021212120
+      202020202020202020201F1F201F201F1F1F201F1F1F1E1F1F1E1F1E1F1F1F1F
+      1E1E1F1E1E1E1E1E1E1E1E1D1E1E1E1E1F1F1F1F201F1F1E1F1F1F1F1F1F1D1D
+      1B1C1B1C1B1B1C1B1B1B1B1B1B1A1B1A1A1B1A1B1A1A1B1A1A1A1A1A1A191A1A
+      1A1A19191A1A1919191919191918181818181719181719171819181718171717
+      1716171616161717161617161616161616151516161516161515161615151516
+      1415151515141414141514141415141213121011111111111011111110111010
+      11101011111112191A1A2726262C2C2D3232323636363939392929290E0E0D0D
+      0E0D0E0E0E0D0E0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0C0C0C0C0C0C0C0C0C0C
+      1E1E1E0B0C0B3030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303232323939393F3F3F3F3F3F3F3F3F3F3F3F
+      4040404040404040404040404040403F3F3F3837383030302F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F3030303030303131313838384646464B4B4B4F4F4F5353535757575A5A5A
+      3F3F3F2D2D2D2D2D2D2D2D2D2D2D2D2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C
+      2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C
+      2C2C2C2C2C2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2F2F2F333333
+      3434343535353737373838382B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B3131
+      3132323232323233333333333333333333333333333333333334343334343334
+      3333343333343333353434363535363535363535363535363535363636363636
+      3737373737373737373939393939393939393A3A3A3737373535353636363737
+      373737373C3C3C4D4D4D5252525757575B5B5B5D5D5D3C3C3C3C3C3C3E3E3E3E
+      3E3E3F3F3F404040414141414141424242434343434343454545454545454545
+      4545454646464646464646464646464545454545454545454545454444444444
+      4444444443434342424242424242424242424241414142424241414141414142
+      4242424242424242434343434343434343444444444444454545454545464646
+      474747484848494948494948494A494A4949494A4A4B4B4A4A4A4B4A4A4A4B4B
+      4B4B4B4B4A4A4A4C4C4C4F4F4F50504F51515151515150505145454544454445
+      4544434343434343454545474747484747474747464646464646474747474847
+      464646454544444443444443444343424141424040403F3F3F3F403E3E3F3F3E
+      3E3D3D3D3C3C3C3C3C3C3C3C3C3B3B3A3939393A393938383738383739383838
+      3737373637373635353434343534343434343435343434333232333333313131
+      2F2F2F2A292A292929292A292829292828282F2E2D3030313031313030303130
+      302F2F2E2F2F2E2F2E2D2F2E2E2F2D2D2F2D2E2E2D2D2C2C2C2C2C2C2D2C2D2D
+      2C2C2D2C2C2C2C2C2C2C2C2C2C2B2C2C2B2C2C2B2C2A2B2C2A2B2B2B2A2A2A2A
+      2A292A2A2A2A2A292A2A29292A29292B2B2B2B2B2B2C2B2C2C2C2B2C2A2A2B2A
+      2A2A2A2A2A2A2928292927272726252626262626262626262626262525262526
+      2626262625262625262525272626272626262626262525262525272626262625
+      2626252626252525262525252525252525252625252626262626262626262625
+      2526252525252524242424242425242424242424232423232324232323232223
+      2322232222232222232221222122222121222121212121212021202021202021
+      2020212020202020201F201F201F201F1F1F1F1F1F1F1F1F1F1F1E1E1F1F1E1F
+      1E1E1E1E1E1E1E1E1E1E202020201F1F1F1F201F1F1F1F1F1F1D1C1C1C1B1C1C
+      1B1C1B1B1B1B1B1B1B1B1B1A1A1B1B1B1A1B1A1B1B1A1A1A1A1A1A1A1A1A1A1A
+      19191A1919191A19191918181918181918181818171817171817171817171717
+      1617161617171716161716161616161615161615161515151516151615151515
+      1515151515151515141414141414131313111111101111101111111011101011
+      1111121414152A2A2A2F2F303435343939393E3E3E1D1D1D0E0E0E0D0E0D0D0D
+      0E0D0D0D0D0D0D0D0D0D0D0D0D0C0C0D0D0D0C0C0C0C0C0C0D0C0C0C1B1E1E0B
+      0C0B303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303232323A3A3A3F3F3F3F3F3F3F3F3F40
+      40404040404040404040404040404040403F3F3F3A3A3A3131312F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3030
+      303131313535354646464B4B4B4E4E4E5353535656565A5A5A4646462D2D2D2D
+      2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B31313132323233
+      33333535353636363232322A2A2A2A2A2A2B2B2B2B2B2B2B2B2B2C2C2C313131
+      3131313131313131313232323232323232323232323232313232313332323332
+      3233323233323234333334333335343435343435343435343434343435353536
+      3636363636373737373737373737373737363636343434343434343434353535
+      3C3C3C4B4B4B5050505454545858585353533939393A3A3A3A3A3A3A3A3A3C3C
+      3C3D3D3D3D3D3D3E3E3E3F3F3F40404040404041414142424241414142424242
+      4242424242424242424242424242424242424242424242414141414141404040
+      3F3F3F4040403F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3E3E3E3E3E3E3E3E
+      3E3F3F3F40404040404040404041414141414142424242424243434343434343
+      4343444444454545464645464646474747484748474647464646464646464647
+      4646474647464B4B4B4C4C4C4C4C4C4E4E4D4F4E4F4243434141414242414041
+      403F403F3E3F3E3E3E3E3D3D3D3D3D3D3C3C3B3C3C3C3A3A3A393939393A3A39
+      39393A3A3A3A3A3A3A3A3A3939393A3A3A383938383838393839393838383838
+      3838383939393838383838383938383838373737373737363736363635353535
+      3535343434343333333333343332333232323231313130313130302F302F302B
+      2C2B2828282828272727272727272928293030302F2F302E2E2E2E2E2E2E2E2E
+      2E2D2D2D2E2D2D2E2D2D2D2C2D2D2C2C2B2B2C2B2B2C2C2C2C2C2C2B2C2C2B2B
+      2B2B2B2B2B2C2B2B2B2B2B2B2A2B2A2A2A2A2A2A2A2A2A29292A292A29292929
+      29292929282828292828282828282929292B2A2B2B2B2B2A2A2A2A2A292A2A2A
+      2929292929292929292928282828272626272525252525252625252626252625
+      2426262527262526252527262626252626252626252526252526262626252626
+      2525262625262626272727272727272726272727262626272626262626262524
+      2525252525242524252425242424242424242323242323232423232323222323
+      2223222223222123212122212222212222212121202021212121212020202021
+      20202020201F1F1F1F1F20201F1F201F201F1F1F1F1F1E1F1F1F1F1F1E1E1E1E
+      1E1E1E1F1F1F202020201F1F202020201F1F1E1E1E1C1C1C1C1C1C1C1C1C1B1B
+      1C1B1B1C1C1B1B1B1B1B1B1B1B1B1B1A1A1B1A1A1A1A1B1A1B1A1A1A1A1A1A19
+      1A191A1919191818191818191818191818181818181717181718171717171717
+      1616161717161716171616171616161616161515161615151516151515151515
+      1515151515141514151514141513131311111110101111111110101111121219
+      19192C2C2C3232323938393D3D3E4141411111110E0E0E0E0E0E0D0E0D0D0D0E
+      0E0D0E0D0D0D0D0C0D0D0D0D0C0C0D0C0C0D0C0C0D0C0C0C1E1E1E0C0C0C3030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303434343B3B3B3F3F3F4040404040
+      404040404040404040404040404040404040404040403B3B3B3434342F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F303030313131353535
+      4545454A4A4A4E4E4E5252525555555959594848482D2D2D2C2C2C2C2C2C2B2B
+      2B2B2B2B2B2B2B2B2B2B2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A
+      2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A
+      2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2929292929292D2D2D3131313232323333
+      333535353535352929292929292929292929292A2A2A2A2A2A2F2F2F30303030
+      3030303030303030313131313131313131313130313130313130313131313131
+      3131313131313231313232323232323332323332323232323232323232323434
+      343434343535353535353535353333333232323333333333333232323B3B3B4A
+      4A4A4D4D4D515151565656505050363636363636373737383838393939393939
+      3939393B3B3B3B3B3B3B3B3B3D3D3D3D3D3D3E3E3E3E3E3E3E3E3E3E3E3E3F3F
+      3F3F3F3F3F3F3F3F3F3F3F3F3F3E3E3E3E3E3E3E3E3E3D3D3D3D3D3D3D3D3D3D
+      3D3D3D3D3D3C3C3C3C3C3C3C3C3C3C3C3C3C3C3C3C3C3C3C3C3C3D3D3D3D3D3D
+      3D3D3D3D3D3D3D3D3D3E3E3E3E3E3E3E3E3E3F3F3F3F3F3F4040404040404040
+      4041414142414242424143434243434343434343444442424242424243434442
+      42424747474747474848484949494A4A494343443D3D3D3D3E3E3D3C3C3D3D3C
+      3B3B3B3B3B3B3A3A3A3939393838383838373838383737373737363636373536
+      353434343434343434343333323132323031313031302F2F2F2F2F2F2E2E2E2F
+      2F2F2F2F2F2E2D2E2E2E2F2F2F2F363535353634343434343333333333333333
+      3333333333323232313031303130302F2F2F2F2F2F2F2F2F2F2E2E2E2D2D2726
+      282626262726262626262626262A2A2A2E2E2E2E2D2E2E2D2D2D2D2D2D2D2D2C
+      2D2C2D2D2C2C2C2B2B2B2A2B2A2A2C2B2A2B2A2A2A2B2B2B2B2A2B2B2A2A2A2B
+      2B2A2B2A2A2B2A2A2A2A2A292A29292A29292A29292929282928282828282828
+      282827282828282727282727272727272928282A2A292A292929282929292929
+      2828272828272828282828292929282828272727282727272625272627272525
+      2625252726262626262626262726262627262827262828282828282929282829
+      2829282828272728272726262727262727262726262626262726262525252524
+      2525252525252424242425242424242424242424232424242423232322232322
+      2222222322222221222221212221222221212121212121202020212120212020
+      202020201F201F201F201F1F1F1F1F1F1F1F1F1E1F1F1F1F1F1E1F1F20201F20
+      201F2020202020201F20201F1F1F1C1C1C1C1C1C1C1C1C1B1C1C1C1B1B1B1C1B
+      1B1B1C1B1B1B1B1B1B1B1B1A1B1B1B1A1B1B1A1A1A1A1A1A1A1A191A1A191A19
+      1919191919181819181818181819171719181818171818171717171717161717
+      1716171616161616161716161616161616151515161516151516151515151515
+      1514151514151414141414131111111111111110111212121212132120202E2F
+      2E3435353A3A3A4140413232320E0E0E0E0E0E0E0E0E0E0D0E0E0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0C0C0C0C0D0C0C0C0C1E1E1E0C0C0C303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030303434343C3C3C404040404040
+      4040404040404040404040404040404040404040404040403E3E3E3837383131
+      312F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3030303131313232324444444949494E
+      4E4E5252525555555858584E4E4E2D2D2D2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A
+      2A2A2A2A2A2A2929292929292929292929292929292929292929292929292929
+      2929292929292929292929292929292929292929292929292929292929292929
+      29292929292828282828282828282828282929292F2F2F303030313131333333
+      3333333030302828282828282828282828282929292A2A2A2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F302F2F30
+      2F2F302F2F302F2F313030313030323131313131313131313131313131313131
+      3131313030302F2F2F2F2F2F2F2F2F3030303131313131313C3C3C4646464B4B
+      4B4F4F4F53535344444434343434343435353535353535353536363637373738
+      38383838383838383A3A3A3A3A3A3A3A3A3B3B3B3C3C3C3C3C3C3C3C3C3C3C3C
+      3C3C3C3B3B3B3C3C3C3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A3A3A3939393A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3B3B3B3B
+      3B3B3B3B3B3B3B3B3C3C3C3C3C3C3C3C3C3D3D3D3D3D3D3D3D3D3E3E3E3E3E3E
+      3F3F3F3F3F3F3F3F3E3F3F3F3E3F3F3F3F3F3F3E3E3E3E3E404040403F3F4241
+      414444444444444646464747474545453B3B3B3A3A3A3A3A3A3A393938383838
+      3737373737373737363636353534353535353435333434333333333333333333
+      3232323131313030303030302F2F2E2E2E2E2E2D2D2E2E2D2C2C2D2C2C2C2C2C
+      2C2B2B2B2B2B2B2B2B2A31313132323232323232323232323232323231313131
+      31313030302F2F2F2E2F2F2F2E2E2E2E2E2E2E2E2D2C2C2C2C2C2A2A2A252425
+      2525252625252424242324242B2A2B2D2C2C2C2D2C2C2D2D2C2D2C2C2C2C2A2B
+      2A2B2B2A2B2B292A2A2A2A2A2A2A2A2A2A2A2A292A2A292A29292A29292A292A
+      2A2A292929292928292928292927292928282827282727282728272727262726
+      2727262726262627272726262626262526262727262828272828272827272727
+      2727272728282827282728282828282728272728262728282827282729282928
+      2928292A29292928292828292929282829282829292929292929292929292928
+      2828272927272827272727272627262627272626262525262525252425252524
+      2524242425242524252424242424242423242323232323242323232223232222
+      2222232222232222232121222121212020212121212121212021212020202020
+      20201F1F2020201F201F1F1F1F1F1F1F1F1F1F1F1F1F1F1E21202021201F2020
+      1F20202020201F1D1E1E1C1C1C1D1D1D1D1C1C1C1C1C1C1C1C1B1B1C1C1C1C1C
+      1B1C1B1B1B1B1B1B1B1B1B1A1B1B1A1A1A1A1A1A1B1A1A191A1A1A1A19191919
+      1919191918181918181918181918171817171817171717171717171617171717
+      1616161617161716161616161616161615161516151515151615151515151515
+      1415151415131313121211111111111111121212151415292929313131383838
+      3E3E3D4343432323230F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0E0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0C1E1E1E0C0C0C30303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303030303232323A3A3A40404040
+      40404040404040404040404040404141414141414141414141414141413C3C3C
+      3535352F2F2F2F2F2F3030303131313333334242424949494D4D4D5151515656
+      565858585151512F2F2F2C2C2C2B2B2B2B2B2B2A2A2A2A2A2A29292929292929
+      2929282828282828282828282828282828282828282828282828282828282828
+      2828282828282828282828282828282828282828282828282828282828282828
+      282828282828282828282828282828282B2B2B2F2F2F30303031313132323233
+      33332828282727272727272727272727272828282D2D2D2E2E2E2E2E2E2E2E2E
+      2E2E2E2E2E2E2E2E2E2F2F2F2F2F2E2F2F2E2F2E2E2F2E2E2F2E2E2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F302F2F2F2F2F2F2F2F2D2D2D2D2C2D2C2C2C2C2C2C2C
+      2C2C2C2C2C2D2D2D2D2D2D2E2E2E2E2E2E3030303939394444444A4A4A4E4E4E
+      5151514242423131313232323232323333333333333434343434343535353535
+      353636363737373737373737373838383939393939393838383939393939393A
+      3A3A393939393939383838383838383838383838383838383838383838383838
+      3838383838383838387C7C7C9393939393938C8C8C6E6E6E4040403838383939
+      393939393939393A3A3A3939393939393A3A3A3A3A3A3B3B3B3B3B3B3B3B3B3C
+      3C3C3C3C3C3D3D3D3C3C3C3C3D3D3B3C3B3B3B3C3C3C3C3B3B3B3C3C3C414141
+      4141414242424343434343433938393737363738383737373636363635353534
+      343434343333333232323232323232323232323132313030302F2F2F2F2F2F2E
+      2E2E2D2D2D2D2D2D2D2C2D2D2D2D2C2C2C2B2C2B2C2C2C2A2B2A2A2A2A292929
+      292929292A2A2A2B2B313030313030303030313030313030302F2F2F2F2E2E2E
+      2D2D2D2E2D2D2E2E2D2D2D2E2E2C2C2C2B2C2C2B2C2C2B2B2C27262624242423
+      23232323232323232525252C2B2B2C2B2C2B2B2B2C2C2B2A2A2A2A2A2A292929
+      2929292A2A292929292929292A2A292A29292928292928292829292829292929
+      2828282828282828282728282628282628262727262627262626262626252625
+      2526252526252625252525252525252525252525252526272725272626262626
+      2727272726272626272827272727262827272727272828282828282828282828
+      292929292928282929292928282928282828282A292929292929282929292828
+      2827282727272727272626262626262626262526252525252525252525242525
+      2524242424242424252424242424242423242424232323232423222323222322
+      2123222223212122222122212121202121212021212021202120202020202120
+      20201F1F1F201F1F201F20201F1F1F1F1F20201F201F2020201F21201F20201F
+      1F1F1F1D1C1C1C1C1D1D1C1D1C1C1C1C1C1C1B1C1C1B1B1C1C1C1C1C1B1B1C1B
+      1B1B1B1B1B1B1B1B1A1B1A1A1A1A1A1A1B1A1A1A1A1A1A1A1A1919191919191A
+      1918191918191818191818181818181718181717171717171717171717171717
+      1616161616161616161615151616161516151516161515151515151515151415
+      1512111311111212111111111112121219191A2C2D2D3232323A3A3A3F3F3F45
+      45451212120E0F0E0E0F0E0E0F0F0E0E0E0D0E0E0E0E0E0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0C0C0D0D1E20200D0C0D3030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303232323939393F3F
+      3F40404040404041414141414141414141414141414141414141414141414140
+      40403B3B3B3636363232324141414949494C4C4C515151565656585858515151
+      2F2F2F2C2C2C2B2B2B2B2B2B2A2A2A2A2A2A2929292929292828282828282828
+      2828282827272727272727272727272727272727272727272727272727272727
+      2727272727272727272727272727272727272727272727272727272727272727
+      2727272727272727272727272727272D2D2D2E2E2E2F2F2F3030303131312E2E
+      2E2626262626262626262626262626262828282D2D2D2D2D2D2D2D2D2D2D2D2D
+      2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2C2C2C2C2C2C
+      2B2B2B29292A2929292929292A2A2A2A2A2A2A2A2A2A2A2A2B2B2B2B2B2B2B2B
+      2B2B2B2B2B2B2B2C2C2C2C2C2C2E2E2E3A3A3A4343434747474B4B4B4F4F4F3D
+      3D3D2F2F2F303030303030323232323232323232333333333333333333343434
+      3434343434343535353636363636363636363535353636363636363636363636
+      3636363636363636363637373736363636363635353535353535353536363636
+      3636363636B3B3B3B3B3B3B3B3B3B3B3B3B3B3B39B9B9B3E3E3E363636363636
+      3737373737373737373737373838383838383838383939393939393939393939
+      3939393939383939393939393939393939393A3939393938383C3C3C3E3E3E3F
+      3F3F4040404141403D3D3D3B3C3B3A393A383838383838363636343334323232
+      3232323232323232323131312F303030303030302F2E2E2E2D2D2D2D2D2D2D2D
+      2D2C2C2C2C2B2B2A2A2B2A2A2A292A2A29292A29282928282828282828282828
+      28282828272E2E2E2F2F2E3030302F2E2E302E2E2E2D2D2D2D2D2D2D2D2D2D2C
+      2C2C2D2C2C2B2B2B2C2B2B2C2B2B2B2B2B2B2B2B2B2828292423242423242423
+      232423232323232626252B2B2B2A2A2A292A2A2A292929292929292929292929
+      2929292928292929292828292828292828282828282827272827282827272727
+      2727272727272727272727262626262626262726262626262626262526252626
+      2525252525252525252524252524252525252524252424252425252526252526
+      2625262626262726262626272726272626282727282828282828282828282828
+      2929292929282929292A28292829292A2A292929292929292827282728272726
+      2726262626262626262625252625252626252525252525252525252524252424
+      2525252524242424242424242424242423242423242323232322232322232222
+      2222212222212221212222212221212121212120212120212020202120202020
+      202020201F201F1F201F20202020202020202021201F201F2020201F1D1E1D1D
+      1D1D1D1D1D1C1C1D1D1D1C1C1C1D1C1C1C1B1C1C1C1C1C1C1C1B1C1C1B1C1C1B
+      1B1B1B1B1B1B1B1B1B1A1B1A1B1A1B1A1A1A1A1A1A1A19191A19191A18191918
+      1819191819181819181818171818181817181717171717161716161716161616
+      1616161616171616151616161615151515151515161615151516141414121212
+      1211121211111212121414142222222F2F2F3635353D3D3C4343423434340F0F
+      0F0F0F0F0E0F0E0E0E0E0F0E0E0E0E0E0E0E0D0E0D0D0E0D0E0D0D0E0D0D0E0E
+      0D0D0D0D0D0C0C0C1E20200D0C0C303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030313131373737
+      3F3F3F4141414141414141414141414141414141414141414141414141414141
+      414343434444444848484C4C4C5151515555555858585757573535352C2C2C2B
+      2B2B2B2B2B2A2A2A292929292929282828282828282828272727272727272727
+      2727272727272626262626262626262626262626262626262626262626262626
+      2626262626262626262626262626262626262626262626262626262626262626
+      26262626262626262626262828282D2D2D2E2E2E2F2F2F303030313131272727
+      2525252525252525252525252525252A2A2A2C2C2C2C2C2C2C2C2C2C2C2C2C2C
+      2C2C2C2C2A2A2A2A292929292929292928282927272727272727272727272728
+      28282828282828282828282828282929292929292A2A2A2A2A2A2B2B2B2B2B2B
+      2B2B2B2B2B2B2B2B2B2E2E2E3C3C3C4343434848484B4B4B4E4E4E3636362E2E
+      2E2E2E2E2E2E2E2E2E2E2F2F2F30303031313131313131313132323232323232
+      3232333333333333333333333333343434343434343434343434343434333333
+      3434343434343434343333333333333434343434343434343434343535353535
+      35B5B5B5B5B5B5B5B5B5B5B5B5B5B5B5B5B5B595959535353535353535353535
+      3535353535353535363636363636363636363636373737373737373737373737
+      3737373636363737373536353635353536363636363839383B3B3B3D3D3D3E3E
+      3E3E3E3E3E3F3F40404041404141404040403F403F3F3E3F3E3F3E3E3E3E3E3D
+      3D3D3A3A3A3A3A3A3939383636373535353534353334333030313030302E2E2F
+      2C2C2C2A2A29292A2A2828282828282828282727272727272727272727272626
+      262929292F2F2E2E2E2D2D2D2D2D2D2D2D2D2C2D2C2C2C2C2C2B2B2B2B2B2B2B
+      2B2B2A2B2A2B2A2A2A2A2A2A2A2A292929292929272727222123232222222222
+      2222222222222626262828292828292828292828282929292929292929282929
+      2829282829282828282729272728272727262727272727272727272727272727
+      2727272727272726272726262625262626262525262525252525252524252524
+      2425252424242424242424242423242424242423232423232424242423232423
+      2424242426252526252626262627262628272628282828282829282828282829
+      2928282828282928282828272828282828282727272727272726272627262726
+      2626262626262626262626262626252626252626252525252525252425252424
+      2424242524242424242424242424232424232323232323232223232223222123
+      2221232122222221222121222120212121212020202020202120202021201F1F
+      1F201F21201F202020212020202020201F1F2120201F1F1E1E1E1D1D1D1D1D1D
+      1D1D1C1D1C1D1D1C1D1D1C1C1D1C1C1C1C1B1C1C1C1C1B1B1B1B1C1B1B1B1B1C
+      1B1B1B1B1B1A1A1B1A1B1B1A1A1A1A1A1A1A1A1A1919191919181A1919191918
+      1919181918181818181818171718181717171717171717171717161616161716
+      1716161616161616161616161516151615151515151613131312121212121212
+      11111212131516152B2B2B3132323839383F3F3F4444442324230F0F0F0F0F0F
+      0E0F0E0E0E0E0F0F0F0E0E0E0E0E0E0E0E0E0E0E0E0D0D0D0E0D0D0D0D0D0D0D
+      0D0D0C0D2020200D0D0D30303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303035
+      35353C3C3C414141414141414141414141414141414141424242434343454545
+      4747474B4B4B5050505454545858585656563535352C2C2C2C2C2C2B2B2B2A2A
+      2A2A2A2A29292928282828282827272727272727272726262626262626262626
+      2626262626262626262626262626262626262626262626262626262626262626
+      2626262626262626262626262626262626262626262525252525252525252525
+      252525252525252525252B2B2B2C2C2C2D2D2D2F2F2F3030302E2E2E25252525
+      2525252525252525252525262626272727272727272627272627262626262626
+      2626262626262626262626262626262626262626262626262626262626262626
+      262727272727272727272727272727272929292929292A2A2A2B2B2B2B2B2B2F
+      2F2F3434343A3A3A4040404343434747474A4A4A4C4C4C3434342C2C2C2C2C2C
+      2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2F2F2F2F2F2F2F2F2F3030303030303131
+      3131313131313131313131313131313132323231313132323232323232323232
+      3232323232323232313131313131323232323232333333323232323232535353
+      3232323A3A3A848484B6B6B6B6B6B6B6B6B65454543333333333333333333434
+      3434343433333333333333333334343434343434343434343435353534343334
+      34343434343434343433343433343433343534353A3A3A3B3A3B3B3B3B3C3C3D
+      3D3D3D404040404040403F403F3F3F3F3F3E3E3E3E3E3E3E3E3D3D3D3D3D3C3C
+      3C3C3C3C3C3C3C3B3B3B3B3B3B3B3B3B39393939383938373738373737373737
+      37373535353535353232313030302A2A2A262626262626262626252525252425
+      2B2A2A2D2D2B2D2C2C2D2C2C2C2C2C2C2B2B2B2B2B2B2B2B2B2B2A2B2A2A2B2B
+      2B2A2A2A292A2A29292929292929292929292825242522222222212222212121
+      2121212121272727292928292928282928292829282828282828282827282827
+      2727272727272826272727272727272726272726272727272726262627272626
+      2626262626262526262525252525252426252425242424242424232324242424
+      2323242323232323232323232323232323232323232323242322232323232222
+      2423232423242424242424242525252425252626262727262626272828282727
+      2728282827272728272729282728272728272727272727272627272726262626
+      2727262626262626262626262526252526252526252525252525242524252425
+      2524252524242424242424242424242424242324232423232323222322222322
+      2122212122212122222122212121212121202120202021202021202020202020
+      20202121202120212020202020202020201D1D1D1D1D1D1D1E1D1D1D1E1D1D1D
+      1D1D1D1D1C1C1D1C1C1C1D1D1D1C1C1C1C1C1C1B1C1B1C1B1B1B1C1C1B1B1B1B
+      1B1B1B1B1B1A1B1B1B1A1A1A1A1A1A1A1A19191A19191A181919181919181819
+      1818191818181818181818181718171717181717171716171717161716161617
+      1616171616161616161616161516151616151212121212121212121213131414
+      141C1C1C2E2E2E3434343B3A3B4140414342421213130F0F0F0F0F0F0F0F0F0E
+      0F0E0E0F0E0F0F0F0E0E0F0E0E0E0E0E0D0E0E0E0E0E0E0E0D0D0E0D0D0D0D0D
+      2020200D0D0D3030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303232323939393F3F3F4141414242424242424343434444444646464949494E
+      4E4E5353535656565858583939392D2D2D2C2C2C2B2B2B2A2A2A2A2A2A292929
+      2828282828282727272727272626262626262626262525252525252525252525
+      2525252525252525252525252525252525252525252525252525252525252525
+      2525252525252525252525252525252525252525252525252525252525252525
+      2525252525252727272C2C2C2D2D2D2E2E2E2F2F2F3030302727272424242424
+      2424242424242424242424242424242424242425252525252525252525252525
+      2525252525252525252525252525262626262626262626262626262626262626
+      2727272828282828282828282828282B2B2B2F2F303535353838383A3A3A3A3A
+      3A3D3D3D4040404444444646464949494B4B4B2A2A2A2B2B2B2B2B2B2B2B2B2B
+      2B2B2C2C2C2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2E2E2E2E2E2E2F2F2F2F2F2F
+      2F2F2F2F2F2F3030303030303030302F2F2F3030303030303030302F2F2F3030
+      3030303031313130303031313131313131313131313131313131313131313131
+      3131313131A7A7A7B8B8B8B8B8B87D7D7D313131313131313131313131313131
+      3131313131313232323232323232323232323232323232323232323333333232
+      323232323131313131313130313031313738383939393A3A3A3B3B3B3C3C3C3F
+      3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3E3F3E3E3D3C3D3C3C3C3C3C3D3C3C3C3C
+      3C3C3C3B3B3B3A3B3A3A3A3A3A3A3A3838393838393737383636363434343333
+      333333333333333333332F302F2424242424242524252424242424242424252C
+      2B2B2C2C2C2C2A2B2B2B2A2C2A2A2B2A2A2A2A2A2A2A2A2A2A29292929292829
+      2828282928292828292828282827282727272323232020212020202021202020
+      2020202027272628282827282827272727282727272727272727272727272727
+      2727272727272626272627272625262526262625252526262526262525262525
+      2425252525242525242525242424242424242424242424232424242324242323
+      2324232323232323232322232323232222232223232223232223222224232324
+      2323242424242423242425252525252425262526272627262726272727272727
+      2828282827282727272828272827282827272727272726272627262726262626
+      2626262626262626262626262526262525252525252525242525252424242524
+      2424242424242424242424232424232424232323232322232322232222232221
+      2222212321222221212220212121212120202120212020202121212121212120
+      212020212020202020201E1E1E1D1E1D1E1E1D1E1D1D1D1E1D1D1D1D1D1D1D1D
+      1D1D1D1D1C1C1C1C1D1C1C1C1C1C1B1C1C1C1C1C1C1B1B1C1C1C1B1B1B1B1B1B
+      1A1B1B1A1B1B1B1A1A1A1A1A1A1A191A19191A18191A19191A18181918191918
+      1818181818181718181817171717181717171717171717171717161616171716
+      1616161616161616151616151515121312121213121212131313151514242425
+      3231313737373E3E3E4243433231320F0F0F100F0F0F0F100F0F0F0F0F0F0E0F
+      0E0E0F0E0F0E0E0E0E0E0E0E0E0E0E0D0D0E0E0D0D0D0D0D0E0D0D0D2020200D
+      0D0D303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303535353B3B3B4242424343434545454747474B4B4B4E4E4E5454
+      545757573E3E3E2D2D2D2C2C2C2B2B2B2B2B2B2A2A2A29292928282828282827
+      2727272727262626262626252525252525252525252525252525252525252525
+      2525252525252525252525252525252525252525252525252525252525252525
+      2525252525252525252525252525252525252525252525252525252525252525
+      25252525252A2A2A2B2B2B2C2C2C2E2E2E2E2E2E2D2D2D242424242424242424
+      2424242424242424242424242424242424242424242525252525252525252525
+      252525252525252525252525252525252626262626262626262727272727272A
+      2A2A2D2D2E3232323636363838383939393939393A3A3A3C3C3C3C3C3C3F3F3F
+      4242424444444747474848484949492929292929292A2A2A2A2A2A2B2B2B2B2B
+      2B2B2B2B2B2B2B2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2D2D2D2D
+      2D2D2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2F2F2F2F2F2F2E2E2E2E2E2E2E2E2E
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3030
+      306D6D6DBABABABABABA97979730303030303030303030303030303030303030
+      30303030303030303030303030302F2F2F303030303030303030303030303030
+      2F2F2F2F2F2F2F2F2F2F2F2F3232323838383939393B3A3A3D3D3D3F3F3F3F3F
+      3F3F3F3F3E3E3E3E3E3E3D3E3E3E3E3E3D3E3E3C3C3D3C3C3C3B3B3B3B3C3B3B
+      3B3B3B3B3B3A3A393A3A3939393A383939363737353636343434333433323232
+      3232323131313131312828282423232324242324232323232323232626262B2A
+      2A2A2A2A2A2A2A2B2A2A2A2A2A2A2A2A29292929292928292928282928292928
+      2828282828282828282828272727252525212120202021202020202021202120
+      2121212828272827272728282828272827272727272727272727262627262626
+      2627262627252626252526252525252525252525252525252525252525252525
+      2525242524252424252524242423242323242323232323232223222223222322
+      2222222222222222222323232223222222222323222323222322222323232423
+      2224242325252424242425252526262627262727272728282727272828282828
+      2828282828282827292828282727282727272627272726272726272626262626
+      2626262626262625252526252526262625252525252525252524242525252524
+      2425242424242424242424242423232323232323232223232223222223222222
+      2121222121222121222121212121212120222122222121212121212121212021
+      2020211F1F1E1E1E1F1E1E1E1E1D1E1D1E1E1D1D1D1D1D1D1D1D1D1C1D1D1D1C
+      1C1C1C1D1C1C1D1C1C1C1C1C1C1C1B1C1B1B1B1C1C1B1B1B1B1B1B1B1B1B1B1B
+      1A1B1B1B1B1B1A1A1A1A1A1A19191A19191A19191A1919191819191818191818
+      1818181817181718171818171817171717171717171717161616171616161616
+      1716161616161613121313121212131212121213131318191A2C2C2C34333439
+      3A3A4040414645461E1E1D100F100F100F0F0F0F0F10100F0F0F0F0F0F0F0F0E
+      0F0E0F0F0F0E0E0E0E0E0E0E0D0E0E0D0D0E0D0D0E0D0D0E2020200D0D0D3030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303636363E3E3E4848484C4C4C4F4F4F5353533F3F3F
+      2E2E2E2D2D2D2C2C2C2B2B2B2A2A2A2A2A2A2929292828282727272727272626
+      2626262625252525252525252525252524242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      242626262B2B2B2C2C2C2C2C2C2E2E2E2F2F2F26262623232323232323232323
+      2323232323232323232323232323242424242424232323252525252525252525
+      2525252525252626262626262727272A2A2A2E2D2E3232323535353535353737
+      373737373838383A3A3A3A3A3A3C3C3C3D3D3D3D3D3D3F3F3F40404043434344
+      44444646464747474242422929292929292929292929292929292929292A2A2A
+      2A2A2A2A2A2A2A2A2A2A2A2A2B2B2B2B2B2B2C2C2C2C2C2C2C2C2C2C2C2C2C2C
+      2C2C2C2C2C2C2C2C2C2C2C2C2C2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D
+      2D2D2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E525252
+      BCBCBCBCBCBCAAAAAA2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2E2E2E2E2E
+      2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2F2F2F2F2F2F2E2E2E2E2E2D2E2E2E2E
+      2E2D2E2E2E2D2D2D2E2E2D2F2F2F303030333333343435353536383838393939
+      3939393839393E3E3E3E3E3E3C3D3D3C3D3C3C3C3C3C3C3D3B3B3C3B3B3B3B3B
+      3B3B3B3B3A3A393A393A3838383738383535353332323131313030303030302F
+      2F2F2F2F2F2E2E2D2323232424232322222222222222222323222929282B2A29
+      2B2A2A2A2A2A2928282828282828282828282828282828282728282827282727
+      272626272626262626262626262324241F202020202020202020202020202021
+      2121272726272727262727272626272626262626272727272626272726272725
+      2626252625252625252625252425252425242524242524252424242424242424
+      2424242424242424242324232324232324232323232323232323232322222322
+      2223222222222222222222222222222322222222232322232222232323242323
+      2423232524242625252626262525262727272827272827282828282828282827
+      2829292828282729282728272728272727272727272727262727272726272626
+      2626262626262526262625252525252525252524252425252425242524252425
+      2424242424242424242323242324242324232323222323222222212322222222
+      212221212221212221212222212122222121212122212121212120211F20201E
+      1E1F1F1E1E1E1E1E1E1E1E1D1E1D1E1E1E1D1E1E1E1D1D1D1D1D1D1D1D1D1D1D
+      1C1C1C1D1C1D1C1D1C1C1C1C1C1C1B1C1C1C1B1B1C1C1B1B1B1B1B1B1B1B1B1B
+      1B1A1A1A1A1A1A1A191A1A19191A19191A191819191919181819191818181818
+      1818171817181718171717171718171717171717161617161616161717171616
+      1515151313121313121212131414141515152021212F2E2F3636373D3D3D4344
+      443F3F3F1010100F100F10100F100F0F0F0F100F0F0F0E0F0F0F0F0E0F0F0E0F
+      0F0F0F0E0F0E0E0F0E0E0E0E0E0E0D0E0D0D0D0D2023230D0D0E303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303232323A3A3A4444444242422E2E2E2D2D2D2D
+      2D2D2C2C2C2B2B2B2A2A2A292929282828282828272727262626262626252525
+      2525252525252424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2929292B2B2B2B2B2B2D2D2D2E2E2E2C2C2C2323232323232323232424242424
+      242424242424242424242424242424242525252525252626262929292D2C2D2F
+      2F2F313131343434343434353535363636363636373737383838383838393939
+      3A3A3A3B3B3B3C3C3C3D3D3D3E3E3E4040404040404242424343433E3E3E3434
+      342D2D2D27272728282828282828282828282828282828282828282828282828
+      28282929292929292A2A2A2A2A2A2A2A2A2A2A2A2B2B2B2B2B2B2B2B2B2B2B2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2C2C2C2C2C2C2C2C2C2C2C2C2C2C
+      2C2C2C2C2C2C2C2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D515151BEBEBEBE
+      BEBEBEBEBE2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D
+      2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2C2C2C2C2C2C2C2C2B2B2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2A2A2B2A2A2A2A2A2A29292929
+      29292929292929282828282929292C2C2D2C2C2C2B2C2B2E2E2E313131313031
+      3031313434343434333332333131313332333030302E2E2E2E2E2E2E2E2E2E2E
+      2E2F2F2F2828282222222222222222222223222222222424242A292929292829
+      2829292928292829282829282828282828282828272828272627262726272626
+      2626262626262626262626252323231F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2121
+      2127272627262727262726272726262626262626262626262525262525252525
+      2525252525262525262525252525242525242525252524242424242524242423
+      2424232323232423232322222322222322222222222222222222222222222222
+      2222222222222122212222222223232222222223232223232224232325232425
+      2424252424252525262626272727262726282728292828282828282728292928
+      2929282828272828272828272827272727272727262627262726262626262626
+      2626262526262625262626252626262525242525252425252424242525242524
+      2424242424242424242324242324232323232322232322222222222222222221
+      2221212222212222222222212222222221222121212020201F1F1F1F1F1E1F1E
+      1E1E1E1E1E1E1E1E1E1D1E1D1E1D1E1D1E1D1D1E1E1E1E1D1D1D1D1D1D1D1C1C
+      1D1C1C1C1C1C1C1C1C1C1C1B1C1C1C1B1C1C1B1C1B1B1B1B1B1B1B1B1B1B1B1B
+      1B1A1A1B191A1A19191A19191A19191A19191A19191918181819181818181718
+      1818181818181717171717171817171717171716171716171617161614151413
+      13131213131312131314131616172C2C2C3333333939394040404545452B2C2B
+      1010101010100F1010101010100F10100F100F0F0F0F0F0F0F0F0F0F0E0F0E0F
+      0E0E0E0E0E0E0E0E0E0E0E0E0D0D0E0E2020200D0D0E30303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030302F2F2F2F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2B2B
+      2B2B2B2B2A2A2A29292928282827272727272726262625252525252525252524
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      242424242424242424242424242424242424242424242424242424242626262A
+      2A2A2B2B2B2C2C2C2D2D2D2E2E2E262626242424252525252525272727272727
+      2A2A2A2C2B2C2D2D2D3030303030303333333333333333333434343636363636
+      363636363737373838383838383939393939393A3A3A3B3B3B3C3C3C3C3C3C3D
+      3D3D3F3F3F3F3F3F4040403F3F3F363636303030272727262626262626262626
+      2626262727272727272727272727272727272828282828282828282828282828
+      282828282828282828282929292929292A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A
+      2A2A2A2A2A2A2A2A2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2C2C2C2C2C2C2C2C2C515151C0C0C0C0C0C0C0C0
+      C02C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2B2B2B2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2A2A2B2B2B2B
+      2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2929292A29292A29292828282828282727
+      2727272727272727272727272727272727272727272726262626272625252525
+      25252525252424242524252524252525242B2B2B2D2E2D2D2D2D2D2D2D2D2D2D
+      2D2D2D2222222222222222222222222222222121212626262928282928282828
+      2828282827282727272827272727272727272727262727272626272726272727
+      26262626262626262626252222221F1F1F1F1F20201F1F1F1F201F1F1F212121
+      2727262727262627272626262626262626262625262525252626252626252525
+      2525252525252525242525252525242525252524242424252424242424242423
+      2423232323232422232222232222232222222222222222222222222222222222
+      2222222221222221222222222222222323222323222423232424242424232525
+      2526262526262727262727272728282828282828282828282829292929292928
+      2828282828282827282727282727272727272727272727262626262726262626
+      2526262626262525252526252525252525242525252424242424252524242424
+      2424242424242423232324232424242323232222232222222123222122222223
+      22212222212222222122222222222020201F1F1F1F1F1F1F1E1F1E1F1F1E1F1F
+      1E1E1E1E1E1E1E1D1E1D1E1E1D1D1E1D1D1D1D1D1D1D1D1D1D1D1D1D1D1C1D1D
+      1D1C1C1D1D1C1C1C1C1C1B1C1C1B1B1C1C1C1C1B1B1B1C1B1B1B1B1B1B1A1A1B
+      1A1A1A1A191A1A191A19191A19191A1919191819191819181818181818181818
+      1817181818171717171717181717171717171717171616151313131413131313
+      131414141514151F1E1F2F2F303535353C3C3C43434246464613141310101010
+      10101010100F1010100F100F0F0F100F0F0F0F0F0F0F0F0F0F0F0F0E0E0E0F0F
+      0E0F0E0E0F0F0E0E0E0E0D0D2023230D0D0E3030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030302F2F2F2F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2B2B2B2A2A2A
+      2929292828282828282727272626262626262525252525252424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424243838384C4C4C4C4C4C4C4C4C4C4C4C2E2E2E2A2A2A2B2B
+      2B2C2C2C2D2D2D2E2E2E2F2F2F31313132323232323233333333333333333334
+      3434353535353535353535353535353535363636373737373737383838393939
+      3939393A3A3A3B3B3B3B3B3B3C3C3C3C3C3C3D3D3D3E3E3E3E3E3E3E3E3E3939
+      393333332A2A2A25252525252525252525252525252526262643434357575774
+      74747474747474745858583A3A3A272727272727272727272727282828282828
+      2828282828282828282828282828282828282828282929292929292929292A2A
+      2A2A2A2A2A2A2A2A2A2A4747475050505050504747472A2A2A2A2A2A2A2A2A2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B515151C2C2C2C2C2C2C2C2C22B2B2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B5151515151
+      515050505050503D3D3D2A2A2A2A2A2A2A2A2A2A2A2A292A2A2A2A2A2A2A2A2A
+      2A2A2929292829292929292727272827284F4E4F4E4E4E4E4F4E4E4E4E272727
+      2727272727272726262626272626262525252525262525253838384C4C4C4C4C
+      4C2424242424242424242324242424243E3E3E6464647777777777775C5C5C34
+      3434212221222221212221212121212121222222282827292827292828282828
+      2728282727272727272727272727273A3A3A4E4E4D7575747474756B6B6B4343
+      432626262626252626252121211F1F1F1F1E201F1F1F1F1F1F1F1F1F21212126
+      2726262726262726262626262626262626262626262625252625252525262525
+      2525252525252525252424242424242424242424242424242424242424232423
+      2324242224242223232223222223222222222221212122222222222222222222
+      2222212222212222222322222222242422242424242323242323262525262526
+      2726262727272727272827282728282928282828282929292929292929292828
+      2928282828282728272828272727272727272627262726262626262626262626
+      2625252526252525252525252525252525252425242524252525242424242424
+      2424242324242324242323232423232423222322222322222222222222212222
+      21222221222222212121201F201F1F1F1F201F1F1F1F1F1F1F1F1E1E1F1F1E1E
+      1E1E1E1E1E1E1E1E1E1E1E1D1E1E1E1E1E1E1D1E1D1D1D1C1D1C1C1D1D1D1D1D
+      1C1D1C1C1C1C1C1C1C1C1C1B1C1B1C1B1B1C1C1C1B1B1B1B1B1A1A1A1A1A1A1A
+      191A191A1A1A191A19191A191919181919191918181918181818181817181818
+      1818181717171718171817171717171717151415131413131313131313141314
+      1717172A292A3333333A393A3F403F4545453232331110111110101010101010
+      100F1010100F10100F100F10100F0F0F0F0F100F0F0F0F0F0F0E0F0E0E0E0F0F
+      0F0F0E0E0E0E0E0E2320230E0D0D303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      302F2F2F2F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2B2B2B2A2A2A29292928
+      28282828282727272626262525252525252525252424242424242424249C9C9C
+      C4C4C4C4C4C49C9C9C2424242424242424242424242424242424242424242424
+      242E2E2EB0B0B0C4C4C4C4C4C4C4C4C460606024242424242424242424242460
+      6060A6A6A6C4C4C4C4C4C4C4C4C4C4C4C4C4C4C4C4C4C4A6A6A67878782C2C2C
+      2D2D2D2F2F2F303030323232C4C4C4C4C4C4C4C4C45959593636363636363737
+      373737373737377E7E7EC4C4C4C4C4C49898983939393A3A3A3B3B3B3B3B3B3C
+      3C3C4E4E4EC4C4C4C4C4C4C4C4C43636363232322B2B2B242424242424242424
+      2525252525252525252525252F2F2F757575B0B0B0C4C4C4C4C4C4C4C4C4C4C4
+      C4C4C4C4C4C4C4C4C4C4B0B0B075757531313127272727272727272727272727
+      27272828282828282828282828282828289D9D9DC4C4C4C4C4C44F4F4F282828
+      6D6D6DB1B1B1C4C4C4C4C4C4C4C4C4C4C4C4B1B1B17777773434342A2A2A2A2A
+      2A2A2A2A2A2A2A2A2A2A2A2A2A515151C4C4C4C4C4C4C4C4C42A2A2A2A2A2A2A
+      2A2A2A2A2A2A2A2A2A2A2A2A2A2A4747478A8A8AC4C4C4C4C4C4C4C4C4C4C4C4
+      C4C4C4C4C4C4B1B1B18A8A8A5050502929292929292828282828272828282728
+      27282728454545898989C4C4C4C4C4C4C4C4C4C4C4C4C4C4C4C4C4C493939226
+      26262525262626252424242424254242429C9C9CC4C4C4C4C4C4C4C4C4C4C4C4
+      242424232323565656A6A6A6C4C4C4C4C4C4C4C4C4C4C4C4C4C4C4BABABA6060
+      6021212121212121212121212121212123232328282829272828272727272727
+      27272727276C6C6CA6A6A6C4C4C4C4C4C4C4C4C4C4C4C4C4C4C4C4C4C4B0B0B0
+      4E4E4D2626252625242121211E1E1F1F1F1FC4C4C4C4C4C4C4C4C4C4C4C4C4C4
+      C4C4C4C4C4C4C4B0B0B089898958585826252626252526252525252425252525
+      2424252424252424242424747474C4C4C4C4C4C49C9C9C242424242424232423
+      2323222424222422222D2C2CBABABAC4C4C4C4C4C4C4C4C45F5F5F2222222222
+      2222222123222222222324232324242324242325242426252527262627272627
+      2727272727282828282828292928292829292A2A292929292829292929292928
+      2828282828272827272827272726272726272627262626262726262626262625
+      2626252625252625252525252525252525242525242424242524242424242524
+      2424242323242323242423232322232222222222222122222122232222222221
+      2221212020202020201F201F1F201F1F1F1F1F1F1F1F1F1F1E1F1E1E1E1E1F1E
+      1E1E1E1E1E1E1E1D1E1D1D1D1D1D1D1E1D1D1D1D1D1D1D1D1D1C1D1D1D1C1D1D
+      1C1C1C1C1C1C1C1C1B1B1C1C1C1C1C1B1C1B1B1B1B1B1B1B1A1A1B1A1A1B191A
+      1A19191A19191A19191919191919191819191818181818181818181818181818
+      181718181818181717171616161414131414141314141414141515151C1C1D2F
+      2F2F3535353D3C3C4242424646461B1B1B111011101111111011101010101011
+      101010100F100F10100F0F0F101010100F0F0F0F0F0E0E0F0F0F0F0F0E0E0E0E
+      0E0E0E0E2323230E0E0D30303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030303030303030303030302F2F2F
+      2F2F2F2E2E2E2E2E2E2D2D2D2D2D2D2C2C2C2B2B2B2A2A2A2929292828282727
+      272727272626262525252525252424242424242424242424249E9E9EC7C7C7C7
+      C7C79E9E9E2424242424242424242424242424242424242424242424248A8A8A
+      C7C7C7C7C7C7C7C7C77F7F7F2424242424242424242E2E2E9E9E9EC7C7C7C7C7
+      C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C72C2C2C2D2D2D2F
+      2F2F323232353535C7C7C7C7C7C7C7C7C75C5C5C383838383838393939393939
+      393939818181C7C7C7C7C7C78181813B3B3B3C3C3C3D3D3D3C3C3C3737373232
+      32C7C7C7C7C7C7C7C7C724242424242424242424242424242424242424242424
+      24242525256C6C6CBDBDBDC7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7
+      C7C7C7C7C7C7C7C7C7C7C7C7BDBDBD5959592626262626262727272727272727
+      272727272727272727272727279F9F9FC7C7C7C7C7C75050508B8B8BC7C7C7C7
+      C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7B3B3B3464646292929292929
+      292929292929292929515151C7C7C7C7C7C7C7C7C72929292929292929292929
+      29292929292929646464C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7
+      C7C7C7C7C7C7C7C77878782828282828282828282828282828282828286E6E6E
+      C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C79E9E9E2525252524
+      252525252525252F2E2EBDBDBDC7C7C7C7C7C7C7C7C7C7C7C7C7C7C724232424
+      2424767676C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7555655
+      2121212121212121212121212121212524252827272827272727272727272727
+      279F9F9FC7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C74E
+      4E4E2626252525242121211F1F1FC7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7
+      C7C7C7C7C7C7C7C7C7C7C7C7B3B3B34E4E4E2626252625252625252625252624
+      24252424252424767676C7C7C7C7C7C79E9E9E24242424242424232424232324
+      2423232323A8A8A8C7C7C7C7C7C7C7C7C7606060222222222222222222222222
+      2323232323232424242424242425232525242625242626262727262727272827
+      282828282827282829292828282A292A29292929292929292929292828282929
+      2828282827282827272727272727272726272726262626262626262626262625
+      2625262526262525252525252525252525252425252425242424252424242424
+      2423242324242322222323222222222222212222212122212221212121202020
+      20202020201F1F201F1F1F1F201F1F1F1F1F1F1F1F1E1F1F1E1E1F1E1E1E1F1E
+      1E1E1E1E1E1E1E1E1E1E1E1E1E1D1E1D1D1D1D1D1D1D1D1C1C1C1C1B1C1C1B1C
+      1C1C1C1C1C1C1B1C1C1C1C1C1C1C1B1B1B1B1B1B1A1A1B1A1A1B1A1A1A191A1A
+      1A191A1A1A1A1919191919191919181918191918181819181818181817171817
+      1817171717171515151414141414141313131514151818182727273232323939
+      39403F404544443A393911111111111110111111111110101011101010101010
+      10100F10100F10101010100F10100F0F100F0F0F0E0E0F0E0F0F0E0E0E0E0E0E
+      2323230E0E0E3030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303030303030302F2F2F2F2F2F2E
+      2E2E2E2E2E2D2D2D2D2D2D2C2C2C2B2B2B2A2A2A292929282828272727272727
+      262626252525252525242424242424242424242424818181C9C9C9C9C9C97777
+      77242424242424242424242424242424242424242424585858C9C9C9C9C9C9C9
+      C9C99595952424242424242424242E2E2EAAAAAAC9C9C9C9C9C9C9C9C9B4B4B4
+      7777774D4D4D4D4D4D626262818181BFBFBFC9C9C92D2D2D2E2E2E2F2F2F3333
+      33363636C9C9C9C9C9C9C9C9C93A3A3A3A3A3A3B3B3B3B3B3B3B3B3B3B3B3B82
+      8282C9C9C9C9C9C97E7E7E3030302A2A2A272727242424242424242424C9C9C9
+      C9C9C9C9C9C92424242424242424242424242424242424242424242424248B8B
+      8BC9C9C9C9C9C9C9C9C9C9C9C9BFBFBF8B8B8B777777777777777777969696BF
+      BFBFC9C9C9C9C9C9C9C9C9C9C9C98C8C8C262626262626262626262626262626
+      262626272727272727A0A0A0C9C9C9C9C9C9ABABABC9C9C9C9C9C9BFBFBF8282
+      82797979797979B5B5B5C9C9C9C9C9C9C9C9C9BFBFBF3C3C3C28282828282828
+      2828282828505050C9C9C9C9C9C9C9C9C9282828282828282828282828282828
+      656565C9C9C9C9C9C9C9C9C9BFBFBF8C8C8C6565655050505B5B5B797979ABAB
+      ABC9C9C9797979272727272727272727272727272727787878C9C9C9C9C9C9C9
+      C9C9C9C9C99696967778787878788B8B8CBFBFBFA0A0A0252525252525252525
+      242424818181C9C9C9C9C9C9C9C9C9A0A0A0777777B4B4B42424242424247676
+      76C9C9C98B8A8A4343442828283434348D8D8DC9C9C9C9C9C9B5B5B521212121
+      2121202020212020202020212121272727282727272727272727272727A0A0A0
+      C9C9C9A0A0A06464643B3B3B3B3B3A6E6E6EBFBFBFC9C9C9C9C9C9B5B5B42626
+      25262525252525212121C9C9C9C9C9C9C9C9C9A9A9A99E9E9E9E9E9EBFBFBFC9
+      C9C9C9C9C9C9C9C9C9C9C9C9C9C9636363262525262625262625262524252424
+      252424777777C9C9C9C9C9C9A0A0A02424242424242424242424242324238B8B
+      8AC9C9C9C9C9C9C9C9C976767622222222222222222223232322222223232323
+      2323242424242424242424262624262625272626282726282727282828292928
+      2928282929292929282A29292A2A292A292A292A292929292928292829292928
+      2728282728272728272727272627272726262626262626262626262526262625
+      2626252525252525252625252525252525252424242524252424242424242323
+      2222232223232222232222222222222222222221212120202021202020202020
+      2020202020201F1F1F1F1F1F20201F1F1F1F1F1F1F1F1E1F1F1F1F1E1F1E1E1E
+      1E1E1E1E1D1E1E1D1E1E1D1D1E1D1D1D1D1C1C1C181818191919191818191818
+      181819191819191918191A1A191A1A1B1A1B1A1B1A1A1A1A1B19191A1A1A1A1A
+      191A191919191919191819181919191818181818181918181718171818171817
+      16171415141414141414141515151616161C1D1E2F2F2E3535353C3C3C424241
+      4647472322221111111111111111111111111111101110111010101010101010
+      10101010100F100F100F0F0F0F0F0F0F0F0F0F0E0F0F0F0F0E0E0E0E2323260E
+      0E0E303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030302F2F2F2F2F2F2E2E2E2E2E
+      2E2D2D2D2D2D2D2C2C2C2B2B2B2A2A2A29292928282827272726262626262625
+      2525252525242424242424242424242424787878CBCBCBCBCBCB787878242424
+      2424242424242424242424242424242E2E2EC1C1C1CBCBCBCBCBCBB6B6B62E2E
+      2E242424242424242424787878CBCBCBCBCBCBCBCBCB6D6D6D24242424242424
+      24242424242424242424242424247878782C2C2C2F2F2F323232353535383838
+      CBCBCBCBCBCBCBCBCB3535353434342F2F2F2F2F2F2A2A2A2A2A2A787878CBCB
+      CBCBCBCB787878242424242424242424242424242424242424CBCBCBCBCBCBCB
+      CBCB2424242424242424242424242424242424242424248C8C8CCBCBCBCBCBCB
+      CBCBCBC1C1C16363632424242424242525252525252525252525252525256E6E
+      6EC1C1C1CBCBCBCBCBCBCBCBCB8D8D8D25252526262626262626262626262626
+      2626262626A2A2A2CBCBCBCBCBCBCBCBCBCBCBCB8D8D8D313131272727272727
+      2727272727276F6F6FCBCBCBCBCBCBCBCBCBA2A2A22727272727272727272727
+      27505050CBCBCBCBCBCBCBCBCB272727272727272727272727464646CBCBCBCB
+      CBCBCBCBCBA2A2A2313131272727272727272727272727272727272727505050
+      6565652727272727272727272626264F4F4FCBCBCBCBCBCBCBCBCBACACAC3A3A
+      3B2526252625252525262525252E2F2E6D6D6D242424242424242424242424B6
+      B6B6CBCBCBCBCBCB828282242424242424232323232323232323777777626262
+      222223222323272727292A29343534CBCBCBCBCBCBCBCBCB4041412120212021
+      212020212020202121212827272827272827272727272727279898985A5A5A27
+      2727272727272727272727272727646565CBCBCBCBCBCBCBCBCB454544262525
+      262525262525CBCBCBCBCBCBCBCBCB4B494A1F1F1F1F1F1F1F1E1F3637368D8D
+      8DCBCBCBCBCBCBCBCBCBCBCBCB64646426252525252526252525252425252478
+      7878CBCBCBCBCBCBA1A1A1242424242424242424242424787778CBCBCBCBCBCB
+      CBCBCB8C8B8C2322222322222222222222222322222222232323232323232424
+      242424242525242626252626252727262827272727272827282929282928282A
+      29292928292A292A292A2A29292A29292A292929292928292928292928292827
+      2828272827282827272727272726272627262726272726272626262626262525
+      2626262625252525252525242525252524252424242423232323232323232323
+      2322232323222323222222222222222021212121212020212120202020202020
+      1F20201F1F1F1F1F201F1F201F1F201F1F1F1F1F1F1F1F1E1F1E1F1E1E1E1E1E
+      1E1E1E1E1E1E1E1D1E1E1D1D1E19191A19191919191918191918181818181918
+      1818181718171818181717171718171718171717171717171818181818181818
+      1818181918191919191919181819181919181818191818181818181615161415
+      1514141414141515151518181728282833333239393940404045454440414012
+      1212121212111212111111111110101011101110101110101010101010101010
+      1010101010100F0F10100F100F0F0F0F0F0F0F0F0E0F0F0F2626260E0E0E3030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D
+      2D2D2D2C2C2C2B2B2B2A2A2A2929292828282727272626262626262525252525
+      25242424242424242424242424797979CECECECECECE79797924242424242424
+      2424242424242424242424A3A3A3CECECECECECECECECE444444242424242424
+      2424242F2F2FCECECECECECECECECE6F6F6F2424242424242424242424242424
+      24242424242424242424242424252525272727272727272727242424CECECECE
+      CECECECECE242424242424242424242424242424242424797979CECECECECECE
+      797979242424242424242424242424242424242424CECECECECECECECECE2424
+      24242424242424242424242424242424838383CECECECECECECECECEA3A3A32F
+      2F2F242424242424242424242424242424242424242424242424252525303030
+      AEAEAECECECECECECECECECE7A7A7A2525252525252525252525252525252525
+      25A4A4A4CECECECECECECECECE8F8F8F26262626262626262626262626262626
+      2626262626656565CECECECECECECECECE505050272727272727272727515151
+      CECECECECECECECECE2727272727272727272727279A9A9ACECECECECECEAFAF
+      AF27272726262626262626262626262626262626262626262626262626262626
+      2626262626262626262626A4A4A4CECECECECECEAEAEAE302F30242524252525
+      242424242424252425242524242524242424242424242424242424CECECECECE
+      CECECECE39383823242323242323232323232323242338383823232322232322
+      22232727272929292A292AAFAFAFCECECECECECE4C4C4C212121202020202120
+      2021202424242827282827272827272727272727274646462727272727272727
+      27272727272727272727262727CECECECECECECECECE51514F27262526252525
+      2424CECECECECECECECECE4B4B4B1F1E1F1F1F1F1F1F1F1F1F1F1F1F1F444544
+      C3C3C3CECECECECECEC3C3C33B3B3A2526252526252626242525257A7979CECE
+      CECECECEA3A3A3242424242424242424646464CECECECECECECECECEA3A3A323
+      2322232222242222222222222222222323232223242323242323242424252525
+      2525252626262626262727262828272928282928272A29282929292A29292929
+      29292A2A292A2A2A2A292A29292A292929292929282929292929282928282728
+      2828282727282727272727272626262726272627262626262525262526252625
+      2626252525252525252525252425242323242323232323232323232323232222
+      2323232322232222212222212121212121212121212020202020212020201F20
+      20201F1F201F1F1F1F20201F1F1F1E1F1F1F1F1F1F1E1F1F1E1F1E1E1E1E1E1E
+      1E1E1E1E1E1E1A1B1A1919191919191919191819191819181818191818181818
+      1818181817171818181817181818181717171717171717161716161617171616
+      1616161616161516161616171717161716171717161616151415151414141515
+      1615151616161D1D1E2F2E2F3536363C3C3C4342424747472626261111121211
+      1211111111111211111111111111111011101010111110101010101010101010
+      100F10100F0F0F100F0F0F0F0F0F0F0F0F0E0F0F2326230E0E0E303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2D2D2D2C
+      2C2C2B2B2B2A2A2A292929282828272727262626262626252525252525242424
+      2424242424242424247A7A7AD0D0D0D0D0D07A7A7A2424242424242424242424
+      24242424656565D0D0D0D0D0D0D0D0D07A7A7A24242424242424242424242470
+      7070D0D0D0D0D0D0A5A5A5242424242424242424242424242424242424242424
+      242424242424242424242424242424242424242424242424D0D0D0D0D0D0D0D0
+      D02424242424242424242424242424242424247A7A7AD0D0D0D0D0D07A7A7A24
+      2424242424242424242424242424242424D0D0D0D0D0D0D0D0D0242424242424
+      2424242424242424244F4F4FD0D0D0D0D0D0D0D0D0A5A5A52424242424242424
+      242424242424242424242424242424242424242424242424242424242F2F2FB0
+      B0B0D0D0D0D0D0D0D0D0D0454545252525252525252525252525252525A5A5A5
+      D0D0D0D0D0D0C5C5C53030302525252525252525252626262626262626262626
+      26262626A5A5A5D0D0D0D0D0D09B9B9B262626262626262626515151D0D0D0D0
+      D0D0D0D0D0262626262626262626313131D0D0D0D0D0D0D0D0D03B3B3B262626
+      2626262626262626262626262626262626262626262626262626262525252525
+      25252525454545D0D0D0D0D0D0D0D0D03A3A3A25252525252424252525242425
+      2425252525242424242424242424242424242424242424D0D0D0D0D0D0D0D0D0
+      2324232323232323242323232423232423232323232323232122222424242626
+      27282727535453D0D0D0D0D0D0D0D0D037373721212120202120212021212128
+      2728282727282727282727282727272727272727272727272727272727272727
+      2727272727273C3B3CD0D0D0D0D0D0D0D0D0515151262626272526262525D0D0
+      D0D0D0D0D0D0D04B4C4B1F1E1F1F1F201F1F1F1F1F1F1F1F1F1E1F1F434443D0
+      D0D0D0D0D0D0D0D09090902626262626252626252525247B7B7AD0D0D0D0D0D0
+      A5A5A5242424242424444444D0D0D0D0D0D0D0D0D0B0B0AF2F2F2E2423222424
+      2323222323222223222223222222222323232424232324242425252525252526
+      26262627272727272828272929282928282929292A29292A2A2A2A29292A2A2A
+      2A2A2A292A2A292A292A2A2929292A2929292929292828292828292828272828
+      2728272728272727262727262626262726272626262625262626262526262525
+      2525252525242424242423242323242423232323232323232323232223222323
+      222222222122222121222121212121212121212020212020202020201F1F2020
+      202020201F201F1F201F1F1F1F1F1F1F1F1F1E1E1E1F1F1E1E1E1E1E1E1E1E1C
+      1C1B1A191919191919191A19191A191919191919191819191819191818181818
+      1818171717181717171817181717171717171717171716171616161616161616
+      1616161616161616151615161515161615151515151515151514141515161518
+      18182828283333333A393A404040454545414141121212111112121212111211
+      111211121111111111111111111011111111101110111010101010101010100F
+      0F0F100F0F0F100F0F0F0F0F0F0E0F0F2626230F0E0F30303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2B2B
+      2B2A2A2A29292928282827272726262626262625252525252524242424242424
+      24242424247C7C7CD3D3D3D3D3D37C7C7C2424242424242424242424242F2F2F
+      C8C8C8D3D3D3D3D3D3B2B2B22424242424242424242424242424249C9C9CD3D3
+      D3D3D3D366666624242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424D3D3D3D3D3D3D3D3D3242424
+      2424242424242424242424242424247C7C7CD3D3D3D3D3D37C7C7C2424242424
+      24242424242424242424242424D3D3D3D3D3D3D3D3D324242424242424242424
+      2424242424BDBDBDD3D3D3D3D3D3BDBDBD2F2F2F242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242F2F2FC8C8
+      C8D3D3D3D3D3D3A7A7A7242424242424242424252525252525A7A7A7D3D3D3D3
+      D3D3878787252525252525252525252525252525252525252525252525252525
+      5C5C5CD3D3D3D3D3D3C8C8C8252525252525252525515151D3D3D3D3D3D3D3D3
+      D3252525252525252525515151D3D3D3D3D3D3B2B2B225252525252525252525
+      2525252525252525252525252525252525252525252525252525252525252525
+      7C7C7CD3D3D3D3D3D39C9C9C2525252525242525252424242424242424242424
+      24242424242424242424242424242424242424D3D3D3D3D3D3D3D3D324242324
+      23242323232323232223222222222222222222222122222424242626275E5D5E
+      C8C8C8D3D3D3D3D3D3BDBDBD2121212121212121212121212424242928282927
+      2728272728282728272727272727272727272727272727272727272727272727
+      27279D9D9DD3D3D3D3D3D3D3D3D3515251262626262525262526D3D3D3D3D3D3
+      D3D3D35050502121201F1E1F1F1E1F1F1F1F1F1F1F1F1F1F1F1F1F7A797AD3D3
+      D3D3D3D3D3D3D33131312625262626252525257C7D7CD3D3D3D3D3D3A7A7A725
+      2424454545C8C8C8D3D3D3D3D3D3C8C8C82F2F2E242423242423242322242322
+      2323222323232422232322232424242423232525242525252626262625262727
+      272728272828282929292929282A29292929292A2A292A2A292B2A2A2A2A2A2A
+      2A2A2A2A2A2A292A29292A292929292929292929292928282928292828282827
+      2827272827272727272727272727272627262626262625262625262625262524
+      2524232324232324242324242424242423232323242423232223222223222222
+      222122212122212221212121212120212121202021202020202020202020201F
+      201F201F2020201F1F1F1F1F1F1F1F1E1F1E1F1F1E1E1E1E1E1D1E1A191A1A19
+      1A19191919191A19191919191919191919181919181918181819191918181818
+      1818181818181818181817171717171717161716161717171617161616161716
+      1616161615161616161615151615151515151515151616151617171E1E1E3030
+      303636363E3E3E42434347474827262612121212131212121212121112111211
+      1212111112111111111110111011111011111010101011101010100F10100F10
+      0F100F0F100F0F100F0F0F0F2623260F0F0F3030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2B2B2B2A2A2A
+      2929292828282727272626262626262525252525252424242424242424242424
+      247D7D7DD5D5D5D5D5D57D7D7D2424242424242424242424249D9D9DD5D5D5D5
+      D5D5CACACA3A3A3A242424242424242424242424242424A9A9A9D5D5D5D5D5D5
+      D5D5D5B4B4B4A9A9A97D7D7D7272725050503A3A3A2424242424242424242424
+      24242424242424242424242424242424D5D5D5D5D5D5D5D5D524242424242424
+      24242424242424242424247D7D7DD5D5D5D5D5D57D7D7D242424242424242424
+      242424242424242424D5D5D5D5D5D5D5D5D52424242424242424242424245C5C
+      5CD5D5D5D5D5D5D5D5D55C5C5C24242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424676767D5D5D5
+      D5D5D5D5D5D5454545242424242424242424242424A9A9A9D5D5D5D5D5D55050
+      50242424242424242424242424252525252525252525252525252525252525D5
+      D5D5D5D5D5D5D5D5252525252525252525515151D5D5D5D5D5D5D5D5D5252525
+      2525252525257D7D7DD5D5D5D5D5D5D5D5D5BFBFBFA9A9A98888887D7D7D5151
+      51464646252525252525252525252525252525242424242424242424878787D5
+      D5D5D5D5D57D7D7D242424242424242424242424242424242424242424242424
+      242424242424242424242424242424D5D5D5D5D5D5D5D5D52223232323222322
+      23222223232222232222222222222222242424303030898889D5D5D5D5D5D5D5
+      D5D5D5D5D5595959212121212121212121212121282728292928282827292728
+      292727282728272727272727272727272727272727272727272727939393D5D5
+      D5D5D5D5D5D5D5BFBFBF262726262725262626272525D5D5D5D5D5D5D5D5D551
+      51512525242221221F1E20201E1F1F1F1F1F1F1F1F1E1F363636D5D5D5D5D5D5
+      D5D5D55252522625262625262526257D7D7DD5D5D5D5D5D5A9A9A9302F2FB4B4
+      B4D5D5D5D5D5D5CACACA45454524242424242424242424242324242223242324
+      2323242423242323242423242424252425252525262626272727272727282828
+      2829282A2A292A2A292A2A292B2A2A2B2A2A2A2A2A2B2A2A2B2A2A2A2A2A2A2A
+      2A2A2A2A292A2929292929292929292928292928282928282829282728282728
+      2727282727272726272627272627262626262626252525242423232423242323
+      2524232423232424232424232323232423222323222322222321222221222221
+      222221212121212121212121212120212121202020202020202020201F201F20
+      1F20201F1F1F1F1F1F1F1F1F1F1F1F1F1F1E1E1E1A1A1A1A191A1A191A1A191A
+      1A1A1B1B1A1A1D1D1D2728272323242323231F201F1E1E1D1A1A1A1919191919
+      1919191819191819181817171717171717171716171617161617171616161615
+      16161616151515161516161516151515151616161919192B2C2C3434343A3A3A
+      4040404645464241411312131313121212121212121212121212121211111111
+      121111111111111111111111101011111010101010101010101010100F100F0F
+      100F0F0F0F0F100F2626260F0F0F303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2B2B2B2A2A2A29292928
+      28282727272626262626262525252525252424242424242424242424247E7E7E
+      D8D8D8D8D8D87E7E7E242424242424242424515151D8D8D8D8D8D8D8D8D87373
+      73242424242424242424242424242424242424ABABABD8D8D8D8D8D8D8D8D8D8
+      D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8B6B6B6ABABAB7E7E7E737373
+      3B3B3B242424242424242424D8D8D8D8D8D8D8D8D82424242424242424242424
+      242424242424247E7E7ED8D8D8D8D8D87E7E7E24242424242424242424242424
+      2424242424D8D8D8D8D8D8D8D8D8242424242424242424242424949494D8D8D8
+      D8D8D8B6B6B62424242424242424242424242424242424242424242424242424
+      24242424242424242424242424242424242424242424242424C1C1C1D8D8D8D8
+      D8D8898989242424242424242424242424ABABABD8D8D8D8D8D8515151242424
+      242424242424242424242424242424242424242424242424242424D8D8D8D8D8
+      D8D8D8D8515151242424242424515151D8D8D8D8D8D8D8D8D824242424242424
+      24247E7E7ED8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8
+      D8D8D8CDCDCDABABAB9494947E7E7E5C5C5C242424242424ABABABD8D8D8D8D8
+      D868686824242424242424242424242424242424242424242424242424232423
+      2324242323242323242323D8D8D8D8D8D8D8D8D8232323232223232222232323
+      222223222323222322232322464647C2C2C2D8D8D8D8D8D8D8D8D8D8D8D86566
+      6521212121212121212121212124242429292829282729282728272828272729
+      2827282727272727272727272727272727484848B7B7B7D8D8D8D8D8D8D8D8D8
+      D8D8D85F5F5E272726262726262626262625D8D8D8D8D8D8D8D8D85252522424
+      25252424232324201F20201E1F1F1F1F1F1F1F1F1E1FC1C1C1D8D8D8D8D8D87D
+      7D7D2525252626262526267F7F7FD8D8D8D8D8D8ABABABABABABD8D8D8D8D8D8
+      D8D8D85C5C5C2424242424242424242424242324232324232323222423232423
+      232423232524242424242424252626252626262728272828282828282828282A
+      29292A2A2A2A2A292B2B2A2B2A292A2A2A2B2B2A2B2A2B2B2A2A2B2A2A2A2929
+      2A2A292A2A2A29292A2929292929292929292929282829292928272928272827
+      2728272727272726262625252624252524242424242324242324242424232325
+      2324242323242423242323232323232322232222232222222222222122222122
+      2221212121212121212120212120202120202020202020202020202020201F20
+      201F201F1F20201F1F1F1F1F1F1B1B1A1A191B1A191A1A191A1B1A1B1A1A1B1D
+      1D1C2B2C2B2D2D2E2E2E2E2E2E2E2E2E2E2D2C2D2D2D2C2C2C2D292929282728
+      2423242221221E1E1F1C1D1D1919191818181717181718171717181717171616
+      161615161516161615151617161818182323233131313737373E3E3E44444448
+      4848212120131312131313121213121312121212111212111212111211121111
+      1111111111111110111011111111111110101110101010101010100F100F0F0F
+      100F0F0F2626260F0F0F30303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030303030303030303030302F2F2F
+      2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2B2B2B2A2A2A2929292828282727
+      27262626262626252525252525242424242424242424242424808080DBDBDBDB
+      DBDB808080242424242424242424C4C4C4DBDBDBDBDBDBA2A2A2242424242424
+      242424242424242424242424242424ADADADDBDBDBDBDBDB8B8B8B8B8B8BADAD
+      ADB9B9B9DBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDB80808024
+      2424242424242424DBDBDBDBDBDBDBDBDB242424242424242424242424242424
+      242424808080DBDBDBDBDBDB8080802424242424242424242424242424242424
+      24DBDBDBDBDBDBDBDBDB242424242424242424242424D0D0D0DBDBDBDBDBDB74
+      7474242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424248B8B8BDBDBDBDBDBDBC4C4
+      C4242424242424242424242424ADADADDBDBDBDBDBDB52525224242424242424
+      2424242424242424242424242424242424242424242424DBDBDBDBDBDBDBDBDB
+      2F2F2F242424242424525252DBDBDBDBDBDBDBDBDB2424242424242424248080
+      80DBDBDBDBDBDBADADAD808080A2A2A2ADADADDBDBDBDBDBDBDBDBDBDBDBDBDB
+      DBDBDBDBDBDBDBDBDBDBDBB9B9B92424242424248B8B8BDBDBDBDBDBDB808080
+      2424242424242424242424242324242423242424242424232424232323232324
+      23232423242423DBDBDBDBDBDBDBDBDB23232322232323232223222223232223
+      2223232222464646D0D0D0DBDBDBDBDBDBDBDBDBC5C5C5525252212121212121
+      2121212121212121212827272929282929282929282828272828282827282828
+      27272727272727272727767676DBDBDBDBDBDBDBDBDBDBDBDBDBDBDB97979727
+      2727272726262726262725272525DBDBDBDBDBDBDBDBDB535353242525242525
+      2424242424242121211F1E201F1F1F1F1F1FACACACDBDBDBDBDBDB7D7D7D201F
+      1F232222252525808181DBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDB69696924
+      2424242424242424242424242424242424242424232423242423242423242424
+      2524242525252525252525262726262727272828282929292829292A2A292B2A
+      2B2A2A2A2C2B2A2B2B2A2B2A2A2C2B2A2C2A2A2B2A2A2B2A2A2A2A2A2A2A292A
+      2A2A2A292A292929292A29292929282929292929292829282827292827282727
+      2626262425242425242425252424242424242424242423242323242424232424
+      2423242324242324232323232223232223222223222222222222222122222122
+      222121212121212021212021212120212020202020212020202020201F20201F
+      201F1F201F1F1B1B1B1A1A1A1A1A1B1A1A1A1B1A1B1B1A1C1D1C1D2A2A293030
+      31313232323332323232323232303130302F2F2F2F2F2D2D2D2D2D2E2B2C2C2B
+      2C2C2C2B2B2B2C2B2B2B2B2B2B2B2828282627272323232121211D1E1E1B1B1B
+      1818171617161919181B1B1B2E2E2E3434343B3B3B4141414747473C3B3C1313
+      1313121312121313131313121212121212121212121112111212121211121111
+      1111111111111110101111111110111010101010101010100F0F100F0F0F100F
+      2626260F0F0F3030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303030303030302F2F2F2F2F2F2E
+      2E2E2E2E2E2D2D2D2C2C2C2C2C2C2B2B2B2A2A2A292929282828272727262626
+      262626252525252525242424242424242424242424818181DDDDDDDDDDDD9797
+      97525252525252818181DDDDDDDDDDDDD1D1D130303024242424242424242424
+      2424242424242424242424A3A3A3DDDDDDDDDDDD525252242424242424242424
+      2424243B3B3B525252757575818181D1D1D1DDDDDDDDDDDD6A6A6A2424242424
+      24242424DDDDDDDDDDDDDDDDDD30303024242424242424242424242424242481
+      8181DDDDDDDDDDDD818181242424242424242424242424242424242424DDDDDD
+      DDDDDDDDDDDD2424242424242424243B3B3BDDDDDDDDDDDDDDDDDD4747472424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424525252DDDDDDDDDDDDDDDDDD303030
+      242424242424242424AFAFAFDDDDDDDDDDDD8181812424242424242424242424
+      242424242424242424242424242424245E5E5EDDDDDDDDDDDDDDDDDD24242424
+      2424242424525252DDDDDDDDDDDDDDDDDD2424242424242424245E5E5EDDDDDD
+      DDDDDD9797972424242424242424242424243030305252525E5E5E818181A3A3
+      A3DDDDDDDDDDDDAFAFAF242424242424757575DDDDDDDDDDDDA3A3A324242424
+      2424242424242424242424242324232324232324242424242324232424242424
+      232423DDDDDDDDDDDDDDDDDD2323232323232323222323232322232323232323
+      23AFAFAFDDDDDDDDDDDDDDDDDD8E8E8E35353521212021212121212121212121
+      21212424242A2929292928292928292928292828282828292827282727272727
+      272727989898DDDDDDDDDDDDDDDDDDDDDDDDD2D2D26C6C6C2727272727272727
+      26272726272726262626DDDDDDDDDDDDDDDDDD54535325252525252524252424
+      2424242524232324201F201F1F1FADADADDDDDDDDDDDDD7E7E7E1F1E1E1F1E1E
+      1E1E1E7F7F7FDDDDDDDDDDDDD2D2D1DDDDDDDDDDDDD1D1D13C3B3B2524242424
+      2424242424242424242424242424242424242423242324242324242425242425
+      25252625252626262626272727272829282929292929292A2A292B2A2A2B2B2A
+      2B2C2B2B2B2A2B2B2A2C2B2B2C2B2B2C2B2B2B2A2A2B2A2A2A2A2A292A2A2A2A
+      292A292A2A292A29292929292929292829292828282727262725252525252525
+      2525252525252425242424252424242424232424252423242424242424242423
+      2424232423232423232323222323222322222222222222222221212121212121
+      2121212121212021212120202020202120202020202020201F1F20202020201C
+      1C1B1A1A1B1A1A1B1A1A1B1B1B1C1B1A1C1E1D1F29292A323232343434373637
+      373737373737353535343434313132313132303030302F2F2F2F2F2F2F2E2F2F
+      2E2D2E2E2E2D2E2C2C2D2C2C2C2C2C2C2B2A2B2B2A2B2A2A2A2A2A2A2A2A2A29
+      2A2A2828292C2B2C3333333939393F3F3F4545454848481D1D1D131313141313
+      1313131312121313121213121212121212121212121112121112111211121211
+      1111111111111110101110111110101110101010101010100F1010102826260F
+      100F303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030302F2F2F2F2F2F2E2E2E2E2E
+      2E2D2D2D2C2C2C2C2C2C2B2B2B2A2A2A29292928282827272726262626262625
+      2525252525242424242424242424242424828282E0E0E0E0E0E0E0E0E0E0E0E0
+      E0E0E0E0E0E0E0E0E0E0E0E0B1B1B15353532424242424242424242424242424
+      24242424242424777777E0E0E0E0E0E08D8D8D24242424242424242424242424
+      2424242424242424242424C8C8C8E0E0E0E0E0E0474747242424242424242424
+      E0E0E0E0E0E0E0E0E05353532424242424242424242424242424248D8D8DE0E0
+      E0E0E0E0A5A5A52424242424242424242424242424243C3C3CE0E0E0E0E0E0E0
+      E0E0242424242424242424535353E0E0E0E0E0E0E0E0E0242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      24242424242424242424242424242424E0E0E0E0E0E0E0E0E053535324242424
+      2424242424B1B1B1E0E0E0E0E0E0C8C8C8242424242424242424242424242424
+      242424242424242424242424A5A5A5E0E0E0E0E0E0B1B1B12424242424242424
+      24535353E0E0E0E0E0E0E0E0E0242424242424242424303030E0E0E0E0E0E0D4
+      D4D4242424242424242424242424242424242424242424242424777777E0E0E0
+      E0E0E08D8D8D242424242424474747E0E0E0E0E0E0E0E0E04747472424242424
+      24242424242424242424242423242423242424232424242423232424242423E0
+      E0E0E0E0E0E0E0E02323232323232323222323232223232322233C3B3CE0E0E0
+      E0E0E0E0E0E07A7A7A2C2C2C2324242121212121212121212121212121212828
+      28292929292929292928292928292827282727282828282828282827848484E0
+      E0E0E0E0E0E0E0E0E0E0E0A6A6A63E3E3E272727272727272727272726272726
+      272626262626E0E0E0E0E0E0E0E0E05554542525252525252525242524252525
+      25242525242424222121E0E0E0E0E0E0E0E0E06868681F1F1F1E1E1F1E1E1E7F
+      7F7FE0E0E0E0E0E0B0B1B1999A9AE0E0E0E0E0E0BDBDBD303030252424242424
+      2424242424242424242424242424242424242525242425242525252525252625
+      252626252727272728282829292929292929292A2A2A2B2A2B2A2A2B2C2C2B2B
+      2B2B2B2B2A2C2C2B2C2B2B2C2B2B2B2A2A2B2A2A2B2A2A2A2A2A2A2A2A2A2929
+      2929292929292929292828272625262625252525252526252525262525252524
+      2525242424252425252525242425252524252525242424252424242424242324
+      2323242323232322232222232223232223222222222122222122212222212122
+      2122212121212021212021202121212020202020202020201C1C1C1A1B1B1A1B
+      1B1A1A1B1B1B1C1B1B1C1E1D1E2727283333333737373A3A3A3C3C3C3C3D3C3C
+      3C3C3B3A3A37373836363633343332313232323231313131313131313130302F
+      302F2F2F2F302E2E2E2E2E2E2E2D2E2E2D2D2D2D2D2C2C2C2C2D2C2D2D2D2F2F
+      2E3232323636363D3C3C43444347474735353513131313131413141313131312
+      1313121313121313121212121212121212121212111211111211121111111111
+      1111111110111110101011101011111010111010101010102828260F0F103030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D
+      2C2C2C2C2C2C2B2B2B2A2A2A2929292828282727272626262626262525252525
+      25242424242424242424242424838383E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2
+      E2E2E2E2E2E2E2E2E2E2E2E2E2E28F8F8F242424242424242424242424242424
+      2424243C3C3CE2E2E2E2E2E2D6D6D63C3C3C2424242424242424242424242424
+      24242424545454E2E2E2E2E2E2CACACA242424242424242424242424E2E2E2E2
+      E2E2E2E2E2838383242424242424242424242424242424BEBEBEE2E2E2E2E2E2
+      D6D6D63030302424242424242424242424246C6C6CE2E2E2E2E2E2CACACA2424
+      24242424242424545454E2E2E2E2E2E2E2E2E224242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      242424242424242424242424E2E2E2E2E2E2E2E2E25454542424242424242424
+      24B2B2B2E2E2E2E2E2E2E2E2E283838324242424242424242424242424242424
+      24242424246C6C6CE2E2E2E2E2E2E2E2E26C6C6C242424242424242424545454
+      E2E2E2E2E2E2E2E2E2242424242424242424242424A6A6A6E2E2E2E2E2E27777
+      77242424242424242424242424242424242424303030CACACAE2E2E2E2E2E248
+      4848242424242424242424B2B2B2E2E2E2E2E2E2BEBEBE303030242424242424
+      242424242324242424242424232424242424242424232324232423E2E2E2E2E2
+      E2E2E2E2242324242323232323232323232322222322545454E2E2E2E2E2E2CB
+      CBCB2A2A2A2B2B2B2121212121212121212121212121212324242A292A292929
+      2929292A29282A2928292928292828282828282727343434D6D6D6E2E2E2E2E2
+      E2E2E2E26D6D6D27272727272727272727272727272727272727272727272627
+      2626E2E2E2E2E2E2E2E2E2555555252525252525252525252425252425252524
+      252425606060E2E2E2E2E2E2E2E2E24443431E1E1F1F1F1E1E1F1F808080E2E2
+      E2E2E2E2B1B1B11F1E1EBEBEBEE2E2E2E2E2E2A7A6A624242424242424242424
+      2424242424242424242425242324242524242424252625252525262625272626
+      2827272828282829292929292929292A2A2A2B2B2B2A2A2B2B2B2B2B2B2B2B2B
+      2B2C2C2B2C2C2B2C2B2B2C2B2B2B2A2A2B2A2B2B2A2A2A2A2A292A2A28282927
+      2827262626252525262525262425262525252525252525262525252525252424
+      2525252525252625252525252525252525252425242525242424242424232423
+      2324232324222223222323222222222222222222222122222222222221212121
+      21212121212121212021212020212020201C1C1C1B1B1C1B1B1C1A1A1B1B1B1C
+      1B1B1C1D1D1E2625263433343938393C3C3C4140404242424242422E2E2E3434
+      3433323238383835363635343434343334333332323232323231313130303130
+      3131313130303030303030303030302F302E2E2E2E2E2E302F2F313130343535
+      3A3A3A3F3F3F4544444545451716171314131314141413141313141313131313
+      1313121313121312121313121212121212121212111211111211111111121111
+      11111111101011111011101110111010101010102826280F1010303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C
+      2C2C2B2B2B2A2A2A292929282828272727262626262626252525252525242424
+      242424242424242424858585E5E5E5E5E5E59C9C9C5454545454545454547979
+      79CDCDCDE5E5E5E5E5E5E5E5E590909024242424242424242424242424242424
+      2424909090E5E5E5E5E5E5C1C1C1303030242424242424242424242424484848
+      D9D9D9E5E5E5E5E5E56D6D6D242424242424242424242424E5E5E5E5E5E5E5E5
+      E5D9D9D93C3C3C242424242424242424545454E5E5E5E5E5E5E5E5E5E5E5E585
+      8585242424242424242424242424C1C1C1E5E5E5E5E5E59C9C9C242424242424
+      242424545454E5E5E5E5E5E5E5E5E52424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424E5E5E5E5E5E5E5E5E5545454242424242424242424B5B5B5
+      E5E5E5E5E5E5E5E5E5E5E5E58585852424242424242424242424242424246D6D
+      6DE5E5E5E5E5E5E5E5E5CDCDCD242424242424242424242424545454E5E5E5E5
+      E5E5E5E5E5242424242424242424242424545454E5E5E5E5E5E5D9D9D9484848
+      2424242424242424242424242424249C9C9CE5E5E5E5E5E5B5B5B52424242424
+      24242424242424545454E5E5E5E5E5E5E5E5E5C1C1C13C3C3C24242424242424
+      2424242424242424616060232424242424232324242423E5E5E5E5E5E5E5E5E5
+      2424232324232324232323232323232323234A4A4AE5E5E5E5E5E5D9D9D92B2B
+      2C2525262121212121212121217777772121212727272A29292A2A2A292A2929
+      2928292928292928292828292728292827585757E5E5E5E5E5E5E5E5E5868686
+      272727272727272727272727272727272727272727272726272726272726E5E5
+      E5E5E5E5E5E5E5565555262525252525252525252425252425252424252424C1
+      C1C1E5E5E5E5E5E5CDCDCD2121211F1F1F1E1F1F1F1F1F828282E5E5E5E5E5E5
+      B3B3B31E1E1E2A2A2AD9D9D9E5E5E5E5E5E58484842424242524242424242424
+      2424252524252424242425252524252526252526252526262528272628272729
+      2728292928292929292A2A2B2A2A2B2B2B2B2B2B2C2C2C2C2C2B2B2B2C2C2C2C
+      2C2C2C2C2C2B2C2B2B2C2B2B2B2B2B29292A2727272626262525262525262625
+      2525252625252526252526252426252525262526252525252526262626262626
+      2526262626252625252525252525252425242424252423242423242323242323
+      2323232323222323222222222222222222222221222221222221222121212121
+      212121212021212121201C1C1D1B1B1C1B1B1C1A1B1C1A1B1C1C1B1D1E1D1E25
+      25253434343938393D3E3E4342424546464747482A2A2A191819181918181819
+      1818181818181F1F1F1E1E1F2627262627272D2E2D2C2D2D3434343334343333
+      3232323232323231313131313030302F2F302F3131323434343736373C3B3C40
+      40414444442D2E2D141414141414141414141413131413131313131313131313
+      1313131213131212121212121212121212111212121112111111111111111111
+      11111111101011101011101011101010282828100F1030303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2B2B
+      2B2A2A2A29292928282827272726262626262625252525252524242424242424
+      2424242424868686E7E7E7E7E7E7868686242424242424242424242424303030
+      9E9E9EE7E7E7E7E7E7E7E7E75555552424242424242424242424242424243030
+      30C2C2C2E7E7E7E7E7E7CFCFCF6D6D6D3030303C3C3C868686DBDBDBE7E7E7E7
+      E7E7B6B6B6242424242424242424242424242424E7E7E7E7E7E7E7E7E7E7E7E7
+      DBDBDB6D6D6D555555868686DBDBDBE7E7E7E7E7E7CFCFCFE7E7E7E7E7E79E9E
+      9E555555616161B6B6B6E7E7E7E7E7E7E7E7E755555524242424242424242455
+      5555E7E7E7E7E7E7E7E7E7242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      24303030E7E7E7E7E7E7E7E7E7555555242424242424242424B6B6B6E7E7E7E7
+      E7E7B6B6B6E7E7E7E7E7E7CFCFCF868686555555868686C2C2C2E7E7E7E7E7E7
+      E7E7E7E7E7E7494949242424242424242424242424555555E7E7E7E7E7E7E7E7
+      E7242424242424242424242424242424919191E7E7E7E7E7E7E7E7E786868649
+      4949303030616161C2C2C2E7E7E7E7E7E7DBDBDB494949242424242424242424
+      242424242424919191E7E7E7E7E7E7E7E7E7E7E7E79E9E9E8686868686869191
+      91CFCFCFB6B6B6242424555555858686868686E7E7E7E7E7E7E7E7E785858685
+      8685858585858585545454242424262626DBDBDBE7E7E7E7E7E7A0A0A02D2D2D
+      2121215F5F5FC2C2C2B5B5B52424232A2A2A2A2A2A2A2A292929292929282929
+      28292929292828292828282827595757E7E7E7E7E7E7E7E7E733343328272827
+      2727272727272727272727272727272727272726272726272726E7E7E7E7E7E7
+      E7E7E75756562626262526252525262525252525252525259E9E9EE7E7E7E7E7
+      E7E7E7E76D6D6D242424242424212121202020838383E7E7E7E7E7E7B5B5B51E
+      1E1E1E1E1E444444E7E7E7E7E7E7E7E7E76A6A6A1E1E1E212020212121222322
+      2423232424242525252525252525252526252626262727272827272928282929
+      292A29292A2A2A2A2B2A2B2B2B2B2B2B2B2C2B2B2C2B2C2B2C2C2C2B2B2A2A29
+      2929282728272727272727262727262626262626262626262625262626262525
+      2525252525252625252626252526262726262626262726262626262626252525
+      2626252525252525252525252525252424242425242325242324232423232324
+      2323232223232222222322222222222222212221212122222122212121212121
+      2121211D1C1D1C1B1D1B1B1C1B1B1C1B1B1C1C1C1C1C1B1C2323233434333838
+      383D3D3D4343424647474A4A4A35343519191A19191919191818191918181819
+      18181818181818181718171717171718181717171717171617171D1E1E1D1D1E
+      2625252525252C2C2C2C2C2C3232333334333535363A3A3B3D3D3D4040403E3D
+      3D14141415141414141414141413131314131313131413131313131312131313
+      1212131312121212121212121212121112121111111111111211111111111111
+      1111111011101110101110102828280F10103030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2B2B2B2A2A2A
+      2929292828282727272626262626262525252525252424242424242424242424
+      24878787E9E9E9E9E9E9878787242424242424242424242424242424303030D0
+      D0D0E9E9E9E9E9E99F9F9F242424242424242424242424242424242424494949
+      C4C4C4E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9C4C4C43030
+      302424242424242424246E6E6EE9E9E9E9E9E9E9E9E9E9E9E9929292E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9626262878787E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9ABABAB2424242424242424242424243D3D3DE9E9
+      E9E9E9E9E9E9E949494924242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424555555
+      E9E9E9E9E9E9E9E9E9242424242424242424242424B8B8B8E9E9E9E9E9E95555
+      559F9F9FE9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9DDDDDD6E
+      6E6E2424242424242424242424249F9F9FE9E9E9E9E9E9E9E9E9E9E9E9242424
+      2424242424242424242424242424249F9F9FE9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9DDDDDD49494924242424242424242424242424242424
+      2424242424878787E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      B8B8B8242424878787E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E98787872626262726277D7C7CE9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9B7B7B72727272A2A2A2929292A2A2A2A2A2A2A2929292A28292929
+      292928292828292828595858E9E9E9E9E9E9E9E9E94C4C4C2727282827282727
+      27272727272727585858272727272727272727272726E9E9E9E9E9E9E9E9E957
+      5757272525262626252625252625313131ACACACE9E9E9E9E9E9E9E9E9C4C4C4
+      252525242424242424242424242424868686E9E9E9E9E9E9B6B6B61E1E1E1E1E
+      1E1E1E1E6A6A6AE9E9E9E9E9E9DCDCDC4444441E1E1E1E1E1E1E1F1F1F1E1E1E
+      1F1F212020202020222121232322242324232324262525282727282828282827
+      2828282728272828282827272828282726272727272727262727262827272727
+      2727272727272726272726272727262627262626262626262626252626252626
+      2626262626272727272727262727272627262726262626262626252626262626
+      2626252526252525252525242525242524242424232423242423232422222322
+      222323232323232322222222222222222122222221212221222222211F1E1F1C
+      1C1C1C1C1D1C1B1C1B1C1C1B1B1C1C1C1D2222223030303636353B3B3B414141
+      4747474B4B4B3839391A1A19191A191919191919191819191919191918181818
+      1918181818181818181817181817181817171717171717171716171717161717
+      16161616161616161516151615161D1D1E1E1E1E2828282A2A2A202020151514
+      1514141414141414141414131314141314131313131313131313131312121213
+      1312121312121212121212121212121211111212121111121111121211111110
+      1111111111101011282B28101010303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2B2B2B2A2A2A29292928
+      2828272727262626262626252525252525242424242424242424242424888888
+      ECECECECECEC8888882424242424242424242424242424242424247C7C7CECEC
+      ECECECECDFDFDF24242424242424242424242424242424242424242431313194
+      9494ECECECECECECECECECECECECECECECDFDFDF888888242424242424242424
+      242424242424242424D3D3D3ECECECECECECECECEC242424949494ECECECECEC
+      ECECECECECECECECECEC888888242424242424888888ECECECECECECECECECEC
+      ECECECECECA1A1A1313131242424242424242424242424242424DFDFDFECECEC
+      ECECEC7C7C7C2424242424242424242424242424242424242424242424242424
+      24242424242424242424242424242424242424242424242424949494ECECECEC
+      ECECD3D3D3242424242424242424242424BABABAECECECECECEC565656242424
+      7C7C7CDFDFDFECECECECECECECECECECECECECECECA1A1A13D3D3D2424242424
+      242424242424242424243D3D3DECECECECECECECECECECECEC24242424242424
+      2424242424242424242424242424636363D3D3D3ECECECECECECECECECECECEC
+      ECECECA1A1A13D3D3D2424242424242424242424242424242424242424242424
+      24242424565656ADADADECECECECECECECECECECECECECECECECECECBABABA24
+      2424888888ECECECECECECECECECECECECECECECECECECECECECECECECECECEC
+      8888882626262727272929297F8080E0E0E0ECECECECECECECECECECECECECEC
+      EC9393932A2A2A2A2A2A2A2A2A2A2A2A2A2A2A292929292A2929292829292829
+      2829292828353434ECECECECECECECECECAEAEAF272828272728272727333333
+      959595BBBBBB272727272727272726272727ECECECECECECECECEC7D7D7D5858
+      58585858717170A1A1A1E0E0E0ECECECECECECECECECC7C6C731313124242524
+      2424242424242424242424888888ECECECECECECB9B9B9201F1F1E1E1E1E1E1E
+      1E1E1E9E9E9EECECECECECECD2D2D22B2B2B1E1E1E1F1F1F1F1E1F1F1E1F1F1E
+      1F1F1F1F1F1F1F20202020202021222122222323232323232324242424252525
+      2524252625252526262627262626272727262627272627282626272727272727
+      2627272726272727272627272626262626262626262727272727282728282827
+      2727282727272727272627272626272727272626262726262625262626262525
+      2525252625262525252524252424242424242323242423242323232323232223
+      2323222323232223222222222222222222212122222121212020211C1C1D1C1C
+      1D1C1C1C1B1B1C1C1B1C2222222F2F2F3434343938393F3E3E4546454B4A4A3D
+      3D3D191A191A1A19191919191919191919191919191819191819181918191818
+      1818181818181718181718181817181717171717171717161617171716161717
+      1716161616161616161616161616151616161515151515151515141514151514
+      1415141414141414131314131313141313131313131413131312131313131313
+      1313131212121212121212121212121212111111121211111111111111111111
+      11101111282B2810101030303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030303030303030303030302F2F2F
+      2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2B2B2B2A2A2A2929292828282727
+      27262626262626252525252525242424242424242424242424898989EEEEEEEE
+      EEEE898989242424242424242424242424242424242424575757EEEEEEEEEEEE
+      EEEEEE2424242424242424242424242424242424242424242424242424243131
+      315757577D7D7D70707057575724242424242424242424242424242424242424
+      24242424242424242424242424242424242424242424243D3D3D636363898989
+      5757573131312424242424242424242424243131315757578989896363633D3D
+      3D242424242424242424242424242424242424242424A2A2A2EEEEEEEEEEEED5
+      D5D5242424242424242424242424242424242424242424242424242424242424
+      242424242424242424242424242424242424242424D5D5D5EEEEEEEEEEEE9595
+      95242424242424242424242424BBBBBBEEEEEEEEEEEE57575724242424242424
+      24245757577070707D7D7D575757313131242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      242424242424242424242424242424244A4A4A70707089898957575731313124
+      2424242424242424242424242424242424242424242424242424242424242424
+      242424242424313131636363EEEEEEEEEEEEEEEEEE7D7D7D2424242424242424
+      24242424242324EEEEEEEEEEEEEEEEEE24232423232323232323232426262627
+      27272828282A2A2A2C2C2C2727275454547C7C7C7B7C7C545455212122272727
+      2A2A2A2A2A2A2A2A2A2A2A29292A2A2A29292929292A2A282929282928282929
+      282928288C8B8BEEEEEEEEEEEEEEEEEED5D5D5BCBCBCBCBCBCEEEEEEEEEEEEBC
+      BCBC272727272727272727272727EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEBCBCBC3232312425252524242524252425
+      25242424242424898989EEEEEEEEEEEEBBBBBB242423232322212121201F201E
+      1E1EC7C7C7EEEEEEEEEEEEC7C7C71E1E1E1F1F1F1E1E1F1F1F1E1F1F1E201F1F
+      1F1F1F2020202120202221212322222323232424232424242525252525252626
+      2626252526262726262727272726272727272727272727272627272727272727
+      2727272627272726272728282828282828282728282728272828272728272728
+      2727282727272727272727272727262626262626262626262625262626252625
+      2525252525252425252424242425242324242324232424232323232323222322
+      23232323222222232222222222222222212221212221221C1C1D1C1C1D1C1C1D
+      1B1C1D1B1B1D2827283130303535353A3A394140414647474242431D1D1D1A1A
+      1A1A1A1A1A1A191A191A1A191919191919191919181818181918181818181818
+      1818181818171718171817171717171817171717161717171617161716161616
+      1616161616161616161615161515151516151515151515151515151414151415
+      1414141514141414141314141313141413131313141313131312131213131313
+      1212121212121212121212121212121112111111121211111111111111111011
+      2B28281110103030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303030303030302F2F2F2F2F2F2E
+      2E2E2E2E2E2D2D2D2C2C2C2C2C2C2B2B2B2A2A2A292929282828272727262626
+      2626262525252525252424242424242424242424248A8A8AF0F0F0F0F0F08A8A
+      8A242424242424242424242424242424242424575757F0F0F0F0F0F0F0F0F024
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      242424242424242424242424242424242424575757F0F0F0F0F0F0F0F0F07171
+      7124242424242424242424242424242424242424242424242424242424242424
+      24242424242424242424242424247E7E7EF0F0F0F0F0F0F0F0F04A4A4A242424
+      242424242424242424BDBDBDF0F0F0F0F0F05757572424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424717171F0F0F0F0F0F0969696242424242424242424242424242424
+      242424F0F0F0F0F0F0F0F0F02324232324242323232525242626262727282A29
+      292B2B2B2C2C2C2222222122222222222222222222222222222A2A2A2A2A2A2A
+      2A2A2A2A2A2A2A2A2A2A2A292A2A2A2A292A2929292928292928292828292828
+      292828A5A5A5F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0BEBEBE2727
+      27272727272727272727F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0D7D7D7727171252525252525242525242525242525242425242424
+      2424248A8A8AF0F0F0F0F0F0BDBDBD2423242424232423232323232323223B3B
+      3BE3E3E3F0F0F0F0F0F0A1A1A11F1F1F1F1F1F1F1F1F1F1F1E1F20201F1F1F20
+      2020202020212120232222232323232324242424252525252525252625252526
+      2726272626262727272727272726262627262727272727282828282928282929
+      2929292928282929282829282828282828282828282828272727272827272827
+      2727272727272727262727272727262626262626262625252625262625262625
+      2525252525242524232524242524242523242423242323232323232323222323
+      232323222222222222222222212222222122211D1D1E1D1D1D1C1C1D1C1B1D1C
+      1B1D2324243132313736363C3C3C4242414545451D1D1D1A1B1A1A1A1A1A191A
+      1A191A1A1A1A1A19191919191919191919181819181918191918181818181818
+      1818181818171818181717171717171717171617161617171617171616161616
+      1716161616161516151516151615151515151515151515151514151415151514
+      1414151414141414141413131314131313141313131313121313131213131212
+      131212121212121212121211111211111211121211121111111111112B282B11
+      1111303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030302F2F2F2F2F2F2E2E2E2E2E
+      2E2D2D2D2C2C2C2C2C2C2B2B2B2A2A2A29292928282827272726262626262625
+      25252525252424242424242424242424248B8B8BF2F2F2F2F2F28B8B8B242424
+      242424242424242424242424242424656565F2F2F2F2F2F2F2F2F22424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424BEBEBEF2F2F2F2F2F2E5E5E5313131
+      2424242424242424242424242424242424242424242424242424242424242424
+      242424242424243E3E3EE5E5E5F2F2F2F2F2F2BEBEBE24242424242424242424
+      2424242424BEBEBEF2F2F2F2F2F2585858242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      248B8B8BF2F2F2F2F2F2585858242424242424242424242424242424242424F2
+      F2F2F2F2F2F2F2F22424242424242423232626262727272828292A2A2A2C2C2C
+      2828282222222222222222222222222222222626272A2A2A2A2A2A2A2A2A2A2B
+      2A2A2A2A292A2A2A2A2A2A29292929292929292929292928282A282829292829
+      28285B5B5BA6A6A6BFBFBFF2F2F2BFBFBFB2B3B28080804D4D4D272727272727
+      2727272727278D8D8D8D8D8C8D8C8D8D8C8D8D8C8C8D8C8C8C8C8C7373733F3F
+      4026252525262525252525252525252525242525242425252425242425242458
+      58588B8B8B8B8B8B727272242324242424242423232324232323232323646464
+      8B8B8A8B8B8A8A8A8A3C3C3B212121202020201F20202020201F1F2020202020
+      2021212123222223232323232325242525252525252526262626252527272728
+      28282A28282A292A2A29292A2A292929292A2A2A292A2A292929292929292929
+      2828282929292929282829282828282828272828282728282827272727282727
+      2727272626272727272627272626262626262626262525262526262525262526
+      2524252424252424242323242324242323242324232323232322232323232322
+      2223232222222222222222222122221F1F1F1D1C1D1D1C1D1C1C1D1C1C1D201F
+      203332323737363C3C3C4142424747471E1D1D1B1A1B1A1A1A1B1A1A1A191A1A
+      1A1A19191919191A191919191919191919191819191919181818181818181818
+      1818181817181817181717171717171717171717161617161716171716161616
+      1616161615161616161615161515151615151515151515141514151414141514
+      1414131414131413141413141413131413131313131313131213131312121313
+      1313121212121212121212111211121111111211111111112B282B1011113030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D
+      2D2D2D2C2C2C2B2B2B2A2A2A2929292828282727272626262626262525252525
+      252424242424242424242424248C8C8CF4F4F4F4F4F48C8C8C24242424242424
+      2424242424242424242424C0C0C0F4F4F4F4F4F4CDCDCD242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      24242424242424242424242424585858F4F4F4F4F4F4F4F4F4CDCDCD31313124
+      2424242424242424242424242424242424242424242424242424242424242424
+      313131CDCDCDF4F4F4F4F4F4F4F4F44B4B4B2424242424242424242424242424
+      24C0C0C0F4F4F4F4F4F458585824242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      999999C0C0C06565652424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      24242424242424242424242424242424242424242424242424242424248C8C8C
+      F4F4F4F4F4F45858582424242424242424242424242424243E3E3EF4F4F4F4F4
+      F4F4F4F423242424242324242426262628272829292A2B2B2B2D2D2D23232322
+      22222222222222222222222323232A29292A2A2A2A2B2A2A2B2A2A2A2A2A2A2A
+      2A2A2A292A2A292A29292A29292A282929282929292929282928282928282828
+      2828282828282828272827282828272727282827282827272727272727272727
+      2727272726272726272726272626272726272626262626252526262525262625
+      2626252526252525252525252525252525252525252525252525252525252525
+      2425252425242425242424232424232323232323242323232323232323222322
+      2322232222232222232323232323232222242423242423252524252524252524
+      2626252726262827262928282929292928282A29292A29292B2A292A292A2A2A
+      2A2B2B2B2A2B2A2A2A2A2A2A2A292A2A2A292929292A29292929292929292829
+      2929292828282929282928282828282828282828272828272727282727272727
+      2627272727262726272727262626262626262626252626252626252625242525
+      2426242425242324242424242424232323232323232323232323232322222322
+      23232222222222222222222121201D1C1D1C1C1D1C1D1D1C1C1D1D1D1E30302F
+      3637373B3B3B4141414747472929281B1A1B1B1A1A1B1B1A1A1A1A1A1A1A1A1A
+      1A1A19191A1A1919191919191919191919181918191918191818181818171818
+      1818171718171717181817171717161716171717161617161717161616161616
+      1616161616161616151515161515151515151515151514141415141414141514
+      1414141414141314131413141313131313131313131312131213131312121312
+      12121213121112121211121211111112111111122D2B2B111111303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2D2D2D2C
+      2C2C2B2B2B2A2A2A292929282828272727262626262626252525252525242424
+      2424242424242424248D8D8DF6F6F6F6F6F68D8D8D2424242424242424242424
+      24242424737373F6F6F6F6F6F6F6F6F68D8D8D24242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2525252525252525252525252525252525252525252525252525252525252525
+      2525252525252525252525252525252525252525252524242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424248D8D8DF6F6F6F6F6F6F6F6F6CECECE3131312424
+      242424242424242424242424242424242424242424242424243E3E3ECECECEF6
+      F6F6F6F6F6F6F6F6808080242424242424242424242424242424242424C1C1C1
+      F6F6F6F6F6F65959592424242424242424242424242424242424242424242424
+      24242424242424242424242424242424242424242424242424737373F6F6F6F6
+      F6F6E9E9E9242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      242424242424242424242424242424242424242424242424248D8D8DF6F6F6F6
+      F6F6808080242424242424242424242424242424808080F6F6F6F6F6F6C1C1C1
+      2424242424242526252727272929282A2A2A2D2D2C292A292222222323232323
+      232322232322232727272B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B
+      2B2B2B2B2B2A2A2A2A2A292A2A292A29292A29292A2929292828282828282828
+      2828282827282728272727282828282727272727272727272727272727272727
+      2627272627272727262627262727262627262626262626262625262626262525
+      2625252525252525252525252525252525252525252525252525252524252524
+      2524242523242523232424242424232323232323232323232323232323232323
+      2323232323232423232323232324242423242425242425252525252526262527
+      27262827272928282A29292929282A292A2A29292B2A2A2A2A2A2A2A2A2B2A2A
+      2B2B2A2A2A2A2A292A2A292A2A2A2A292A2A2A292A29292A2929292928282829
+      2929292828282928282828282827272828272827272827282827272727272727
+      2727272727262726272626262626262625262625252625262525262524252524
+      2524242524242424242424242324232323232323232222232222232323232323
+      232223232222222221221D1D1D1C1D1D1C1C1D1C1C1D1D1D1E2A2B2B3635363A
+      3B3B3F3F3F4544453334341B1A1B1A1B1B1A1A1B1A1B1A1A1A1A1A191A1A1A19
+      191A191A1A191919191919191919191918191919181818191818181818181817
+      1818171717181717171717171817171716161717161717161717161616161615
+      1516151616151615151516151515151515151415151414151415141415141414
+      1314141313141414131414131313131313131313131313131212121313131312
+      121212131112121212121111111111112D2B2D11111130303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2D2D2D2C2C2C2B2B
+      2B2A2A2A29292928282827272726262626262625252525252524242424242424
+      24242424248E8E8EF8F8F8F8F8F88E8E8E2424242424242424243131318E8E8E
+      F8F8F8F8F8F8F8F8F8EBEBEB3131312424242424242424242424242424242424
+      2424242424242424242424242425252525252525252525252525252525252525
+      2525252525252525252525252525252525252525252525252525252525252525
+      2525252525252525252525252525252525252525252525252525252525252525
+      2525252525252525252525252524242424242424242424242424242424242424
+      2424242424242424242424A8A8A8F8F8F8F8F8F8F8F8F8EBEBEB8E8E8E313131
+      2424242424242424242424242424243131318E8E8EEBEBEBF8F8F8F8F8F8F8F8
+      F8A8A8A8242424242424242424242424242424242424242424C3C3C3F8F8F8F8
+      F8F8595959242424242424242424242424242424242424242424242424242424
+      242424242424242424242424242424242424242424818181F8F8F8F8F8F8F8F8
+      F824242424242424242424242424242424242424242424242424242424242424
+      2424252525252525252525252525252525252525252525242424242424242424
+      2424242424242424242424242424242424242424244C4C4CF8F8F8F8F8F8EBEB
+      EB4C4C4C2424242424242424244C4C4CEBEBEBF8F8F8F8F8F881818124242425
+      25242727272727272A292A2B2B2B2D2D2D232323232323232323232323232323
+      2423242B2C2B2C2C2B2C2C2C2B2B2B2C2C2B2B2B2C2C2B2B2B2B2B2B2B2B2B2B
+      2B2B2B2A2B2A2A2B2A292B2A2A2A292A2A2A292A292929292929292929292929
+      2929282828282828282828282828282828282828282828282827282827282827
+      2827262726272726262726262726262626262626262626262626262626262626
+      2626262626262626262626262625262625262525262525252425252426242425
+      2424252424242324242423232324232323232323232323232323242423242323
+      2323232324232424242324242525252524252626252626252626262727262828
+      272928282928292A28282A2A292A29292B2A2A2A2A2A2A2A2A2B2B2B2B2B2B2B
+      2A2B2A2A2B2A2A2A292A2A292929292A292A2A29292929292929282829292928
+      2829282828292829282828282827282727282828272728282727272727272727
+      2726262627272726262626262526262525252526262526252426252425252425
+      2424252323242424242324242323242323232323222323222323222323222222
+      2222222222221D1E1E1D1C1D1D1C1D1C1C1D1D1E1E2626263534353A3A393E3D
+      3D4242423E3E3E1B1B1B1B1B1B1B1B1B1B1B1B1A1A1A1A1A1A191A1A1A1A191A
+      1A191A19191A1919191919191918191919181819181918181818181818181818
+      1718181717171718171717171717171717171617161616161616171616161516
+      1616161615161616151515151515151515151515141414141514141414141413
+      1414141414131413131413131313131413131313131313131312121212121312
+      1212121212121111121211112D2B2B1111113030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2D2D2D2C2C2C2B2B2B2A2A2A
+      2929292828282727272727272626262525252525252424242424242424242424
+      249C9C9CFAFAFAFAFAFADFDFDFC4C4C4C4C4C4D2D2D2FAFAFAFAFAFAFAFAFAFA
+      FAFAEDEDED5A5A5A242424242424242424242424242424242424242424242424
+      2525252525252525252525252525252525252525252525252525252525252525
+      2525252526262625252525252525252525252525252525252525252525252525
+      2525252525252525252525252525252525252525252525252525252525252525
+      2525252525252525252525252525252525252424242424242424242424242424
+      24242424242424242424A9A9A9FAFAFAFAFAFAFAFAFAFAFAFAFAFAFAB7B7B78F
+      8F8F8F8F8F8F8F8FC4C4C4FAFAFAFAFAFAFAFAFAFAFAFAFAFAFA9C9C9C242424
+      242424242424242424242424242424242424242424C4C4C4FAFAFAFAFAFA5A5A
+      5A24242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424313131C4C4C4FAFAFA8F8F8F242424
+      2424242424242424242424242424242424242424242525252525252525252525
+      2525252525252525252525252525252525252525252525252525252524242424
+      2424242424242424242424242424242424242424C4C4C4FAFAFAFAFAFAEDEDED
+      9C9C9C5A5A5A9C9C9CEDEDEDFAFAFAFAFAFAEDEDED3131312424242625262727
+      272828292A2B2A2C2C2C2A2A2A2222222323232323232323232424242727272D
+      2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2D2D2C2D2C2C2C2C2C2C2C2C2C2C2B2B2B
+      2B2B2B2B2B2A2B2A2A2B2A2A2A292A2B2A2A2A29292929292929292929292929
+      2928292928292928282828282929282929282828282828282728282727282727
+      2727272727282727272727272727272727272727262726262727272626262626
+      2627262726262626262526252626252625252525252625252525252525252524
+      2425242424242424242424242424242424242524242423242424242423242424
+      2424242424242424252525252626252625272626272726282827282828292828
+      2A29292B292A2A29292B2B2A2B2B2A2B2A2A2B2B2B2B2B2B2B2B2B2B2A2A2A2A
+      2A2B2A2A2A2A2A2A2A2A2A2A2A292A292A292A2A292929292928282928292828
+      2929282928282829282828272828282828272728282827272727272727272626
+      2727272626262727262626252626252626252525252625252524242524252524
+      2424242424232423242423232323232322232322232323232222232323222222
+      22221F1F1F1D1C1D1D1D1D1D1C1D1D1D1E2221223434343938393D3E3E414241
+      4545441E1E1E1B1B1B1B1B1B1A1A1B1A1A1B1A1A1A1A1A1A1A1A1A191A1A1A19
+      19191A1919191919191919181918181918191818181819181818181818181818
+      1818171717171717171717171617171617171616171716161616161616161616
+      1515161516161515161515151515151514151515151415141414151414141414
+      1414131414141314131413141313131413131313131312121212121213121212
+      12121212121211122B2D2D111111303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2D2D2D2C2C2C2B2B2B2A2A2A29292928
+      2828272727272727262626252525252525242424242424242424242424C5C5C5
+      FBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBE0E0E04C4C
+      4C24242424242424242424242424242424242424242425252525252525252525
+      2525252525252525252525262626262626262626262626262626262626262626
+      2626262626262626262626262626262626262626262626262626262626262626
+      2626262626262626262626262626262626262626262626262626262625252525
+      2525252525252525252525252525252525252525242424242424242424242424
+      242424242424242424676767EEEEEEFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFB
+      FBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBE0E0E067676724242424242424242424
+      2424242424242424242424242424242424C5C5C5FBFBFBFBFBFB5A5A5A242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424252525252525252525252525252525252525252525
+      2525252525252525252525252525252525252525252525252525252525252424
+      242424242424242424242424242424243F3F3FE0E0E0FBFBFBFBFBFBFBFBFBFB
+      FBFBFBFBFBFBFBFBFBFBFBEEEEEE6767672424242525252627272828282A292A
+      2C2C2B2D2D2D2525262424242323242424242424242424242C2C2C2E2D2D2E2D
+      2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2C2D2C2C2C2C2C2C2B2B2B
+      2C2B2B2B2B2B2B2A2B2B2B2A2A2A2A2A2A2A2A2A2A2A2A292929292929292929
+      2929292929292929292929292929292929292929282829272928282928282726
+      2727272828282728272827272727272727272727272727272727272727272727
+      2727272727272727262626262626262626262626262625262526262525252525
+      2625242525242424242525252424242425242424242424242424252524242424
+      242525252626262626262627262726262827272828282929292929292A29282B
+      2A2A2B2A2A2B2A2B2B2A2A2B2A2B2B2B2B2B2B2B2B2B2A2B2A2B2A2B2A2A2A2A
+      2A2B2A2A2A2A2A2A2A2A2A2A292929292A292929292929292929292929282828
+      2829282828282828282828282828282827282828282727282727272726262727
+      2727262626262625262625262625262625262525262524252524252424252424
+      2424232324232323242423242323232323232323232223232322222222222221
+      221D1D1D1D1D1D1C1D1D1C1D1D1E1E1F3232323838373B3B3C40403F43444429
+      28281B1B1B1B1A1B1A1B1A1B1A1A1B1B1B1A1A1A1A1A1A1A1A1A1A1A1A1A1A19
+      191A1919191A1919191819181919181819181819181818191818181818181717
+      1717171817171817171717171717171717161716161616161616161616161616
+      1515151515151515151515151515151515141514141515141515141414141414
+      1314141314141413131313131313131313131313131212121212131312131212
+      121112122D2B2D11111130303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030303030303030303030302F2F2F
+      2F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2B2B2B2A2A2A2929292828282828
+      28272727262626252525252525252525242424242424242424C7C7C7FDFDFDFD
+      FDFDFDFDFDFDFDFDFDFDFDFDFDFDD4D4D4ABABAB686868242424242424242424
+      2424242424242424242424242525252525252525252525252525252626262626
+      2626262626262626262626262627272727272727272727272727272727272727
+      2727272727272727272727272727272727272727272727272727272727272727
+      2727272727272727272727272727272727272626262626262626262626262626
+      2626262625252525252525252525252525252524242424242424242424242424
+      2424242424242424323232838383D4D4D4FDFDFDFDFDFDFDFDFDFDFDFDFDFDFD
+      FDFDFDFDFDFDD4D4D47676762424242424242424242424242424242424242424
+      242424242424243232325A5A5AD4D4D4FDFDFDFDFDFD5A5A5A24242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2425252525252525252525252525252525252526262626262626262626262626
+      2626262626262626262626262626252525252525252525252525252525252525
+      242424242424242424242424242424323232ABABABFDFDFDFDFDFDFDFDFDFDFD
+      FDFDFDFDC7C7C74D4D4D2424242424242626262828282929292B2B2B2D2C2D2C
+      2C2C2323232424242424252424252525242627262E2E2D2E2E2E2F2E2E2E2E2E
+      2D2E2E2D2E2D2E2E2D2E2D2E2E2E2D2D2D2D2D2E2D2D2D2D2D2D2D2D2D2B2C2C
+      2C2C2B2B2C2B2B2C2A2B2B2A2B2B2B2A2A2A2A2B2A2A2A2A2A2A2A2A2A2A2929
+      2A292A2A29292A292A2A2A2929292929292A2928282828242424212121222122
+      2425252928282829282828282828282728282828282727272727272727272728
+      2727272727272726262627262627262526262627262626252526252526242525
+      2524252525252525252525252525252525252525242525252525262626262626
+      2726262727272727272828272928282928282929282A2A292A29292A2A2A2B2A
+      2A2C2B2B2B2B2B2B2A2B2C2B2B2B2B2B2B2B2B2B2A2B2A2A2B2B2B2A2A2B2A2A
+      2A2A2A2A2A2A2A29292A2A2A29292A292929292A292929282929282929282929
+      2829282829282828282728282727282827282727282727282727272727272626
+      2626262527262526262526262525252526252526242425252425242424242424
+      23242323232324232424232323232323232323232222222322222222231D1D1D
+      1D1D1D1D1C1D1D1D1D1D1E1E2B2B2B3636363B3B3B3F3F3E4342423333331B1B
+      1B1B1B1B1B1A1B1A1B1B1A1A1A1B1A1A1A1A1B1A1A1A1A1A191A1A1A19191A19
+      191A191919191919181818191819181918181918181818181818171817171718
+      1717181717171717171717161616171617161717171616161616161615161516
+      1515161616151615151515151515151514151414141514141414141414141414
+      1414141413131413131313131313131312131313121213131313121212121212
+      2D2D2D1212123030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303030303030302F2F2F2F2F2F2F
+      2F2F2E2E2E2E2E2E2D2D2D2C2C2C2B2B2B2A2A2A292929282828282828272727
+      2626262626262525252525252424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424252525252525252525252525252525262626262626262626262626272727
+      2727272727272727272727272828282828282828282828282828282828282828
+      2828282828282828282828282828282828282828282828282828282827272727
+      2727272727272727272727272727272727272727272727272727262626262626
+      2626262626262525252525252525252525252525252424242424242424242424
+      242424242424242424242424243F3F3F5B5B5B8484849191918484845B5B5B32
+      3232242424242424242424242424242424242424242424242424242424242424
+      2424243F3F3FFEFEFEFEFEFEFEFEFEFEFEFE5B5B5B2424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424252525252525252525
+      2525252525252626262626262626262626262727272727272727272727272727
+      2727272727272726262626262626262625252525252525252525252525252524
+      24242424242424242424242424242424243232325B5B5B5B5B5B5B5B5B323232
+      2424242424242424242525252828282929292A2A2A2C2C2C2E2E2E2727272324
+      232524242524252525252525262525252929292F2E2E302F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2E2E2F2E2E2E2E2E2F2E2E2E2E2E2E2E2E2E2D2D2D2D2D2C2D2C2C
+      2D2C2C2C2B2C2D2C2C2C2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2A2B
+      2A2A2A2A2B2B2A2A2B2A2A2A2A27272723232322212221222222222122222223
+      2322262626282928282928282828292828292928282829292828292928282829
+      2828282828282828272827272827262827262726272726262726272726262626
+      2626262625262625262625252526262626262626262527272726272727272727
+      27272828282828282929282A29282A29292B2A292B2B2A2B2A2B2C2B2A2C2B2B
+      2C2A2A2B2A2A2C2B2B2B2C2B2B2B2B2B2B2B2A2B2A2A2A2B2B2A2A2A2B2A2A2A
+      2A2A2A2A2A2A2A2A2929292A2A29292A29292929292928292929292928282828
+      2828292828282828282828272828272727272827272727272727272726262626
+      2726252726252626252625252625242525242525242524242524242424242323
+      242424242324232323232423232323232323232323222322221E1E1F1E1E1D1D
+      1D1D1D1D1D1D1E1E2627273535353939393D3E3E4242423C3C3C1B1C1B1B1B1B
+      1B1B1C1A1B1B1A1B1B1B1A1A1B1A1B1A1A1A1A1A1A1A1A191A1A1A191A1A1919
+      1919191919191919191819181918191819181818181818181818181817181817
+      1717171717171717171617171717161616161616161617161616161615151615
+      1616161615161515151515151515151415151414151414141414141414141314
+      141314131314131314131313131313121313131212121212121213122D2D2D12
+      1212303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030302F2F2F2F2F2F2F2F2F2E2E
+      2E2E2E2E2D2D2D2C2C2C2B2B2B2B2B2B2A2A2A29292928282827272727272726
+      2626252525252525252525242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242525252525
+      2525252525252526262626262626262627272727272727272727272728282828
+      2828282828282828282828282828282828282828292929282828282828282828
+      2828282828282828282828282828282828282828282828282828282828282828
+      2828282828282828282828282828282828282827272727272727272727272726
+      2626262626262626252525252525252525252525252525242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424848484C8C8C8C8C8C8C8C8C85B5B5B242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242525
+      2525252525252525252525252525252525252525252525252525252526262626
+      2626262626272727272727272727272727272727272727282828282828272727
+      2727272727272727272626262626262626262525252525252525252525252424
+      2424242424242424242424242424242424242424242424242424242424242424
+      24242424242626262A2A2A2A2A2A2C2C2C2D2D2D2F2F2F303030272726252525
+      2526262526252626262627262726272A2A2A3030303130303030303030303030
+      303030303030302F302F30302F2F302F2F2F2F2E2E2E2E2E2D2E2D2D2E2D2C2D
+      2D2D2D2C2C2C2C2C2C2B2C2B2B2C2B2B2C2B2C2B2B2B2B2B2A2B2B2B2B2A2B2A
+      2B2B2B2A2A292524262323232323232323232323232223232323232322232223
+      2224232327272729292929292929292929292929292929292928292828292828
+      2828282828282828282828272727272727282727272727272727272727272626
+      2727262726272626262627262727272726272727272728272728272928292828
+      282929282929292929292B2A2A2B2B2A2B2B2A2B2A2A2C2B2B2C2B2A2B2B2B2D
+      2B2C2C2B2C2B2C2B2B2C2C2B2B2B2B2B2B2B2B2B2B2B2B2A2B2B2A2A2A2A2A2A
+      2A2A2A292A29292A2A292929292A292929292829292929292929292929282828
+      2928282828282828282727282728272727272727272727272727272626262626
+      2625272626272625262525252525252525252524252424242424242424232323
+      2424242324232323242323232323232223232223231F1F201D1D1D1D1D1D1C1D
+      1D1E1D1E222122343534393A393D3D3D4141414545451E1E1F1B1B1C1B1B1B1B
+      1B1B1B1B1B1A1B1A1B1B1B1B1B1B1A1A1B1A1A1A19191A191A1A1A191A1A1A19
+      1919191919191819191918181818191818181818181817181817171718181717
+      1717171717171716171617161716161616161617161616161615161616161615
+      1515151615151515151515151515151514151514141415141414141413131414
+      1413131413141313131313131313131313121312121313132D2D2D1212123030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030302F2F2F2F2F2F2E2E2E2E2E2E
+      2D2D2D2D2D2D2C2C2C2B2B2B2A2A2A2929292828282828282727272626262626
+      2625252525252525252524242424242424242424242424242424242424242424
+      2424242424242424242424242424242424252525252525252525252525252525
+      2626262626262727272727272727272828282828282828282828282929292929
+      292929292929292929292929292A2A2A2A2A2A2A2A2A2A2A2A29292929292929
+      2929292929292929292929292929292929292929292929292929292929292929
+      2929292929292929292929292828282828282828282828282727272727272727
+      2726262626262626262625252525252525252525252525252524242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424252525252525252525252525252525252525252525252525252525252525
+      2525252525252525252525252525252525252626262626262626262727272727
+      2727272728282828282828282828282828282828282828282828282828282828
+      2828272727272727272727262626262626262626252525252525252525252525
+      2424242424242424242424242424242424242424242424242424242424242424
+      242525252929292B2B2B2C2C2C2E2E2E2F2F2F31313131323228282826262626
+      26262626262727272727272727272B2B2B323131313131313131313131313131
+      3131303131313130313130303030302F302F302F2E2F2F2E2F2E2E2F2E2E2D2D
+      2D2D2D2D2D2D2D2D2C2C2C2D2C2C2D2C2D2D2C2C2C2C2C2B2C2C2C2C28282825
+      2525232424232323232423232323232323232323232323222323232323232323
+      2323232423232727272A29292A2A2929292A2A29292A292A292A292A29292929
+      2929292829282829282828282728272728272728282727272727272728272828
+      28282727282727272828272828282828282828282929292829292A29292A2929
+      2A2A292B2A2A2B2A2A2B2B2B2B2B2A2D2B2B2C2B2C2C2B2B2C2B2B2C2C2C2C2C
+      2C2C2C2C2B2B2B2B2B2B2B2B2B2B2B2A2B2B2B2A2A2A2A2A2A2A2A2A2A2A2A29
+      2A2A292A2A292A29292A2A292929292929292929292928282928282828282828
+      2828282828282727282728272727272728272728272727262727262726262626
+      2526262526252526252525252425252425252524252424252424242423242324
+      24242323232323242423232323232323232222221E1D1D1D1D1D1D1D1D1D1D1D
+      1F1F1F3332323737373C3C3D4040404444442929291B1B1B1B1B1C1B1B1B1B1B
+      1B1B1B1B1B1A1B1B1B1A1A1B1A1A1A1B1A1A1A1A1A1A19191A1A191A191A1A19
+      1919191819191918191918181819181818181818181817181718171817181817
+      1718171717171717171716161717171616161616161616161615161615151516
+      1615161515151515151515141415151514141414141514141413141414141413
+      1314131413131413131313131213121312121212302D2D121212303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2E2E2E2D
+      2D2D2C2C2C2B2B2B2A2A2A2A2A2A292929282828272727272727262626262626
+      2525252525252525252525252424242424242424242424242424242424242424
+      2424242425252525252525252525252525252525252526262626262626262627
+      27272727272828282828282828282929292929292929292A2A2A2A2A2A2A2A2A
+      2A2A2A2A2A2A2A2A2A2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2A2A2A2A2A
+      2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A
+      2A2A2A2A2A2A2A2A292929292929292929282828282828282828272727272727
+      2727272626262626262626262525252525252525252525252525252424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242525252525252525252525
+      2525252525252525252525252525252525252525252525252525252525252525
+      2525262626262626262626262626262626272727272727272727282828282828
+      2828282929292929292929292929292929292929292929292929292929292828
+      2828282827272727272727272726262626262625252525252525252525252525
+      2525252525242424242424242424242424242424242424252525252525252525
+      2525252B2B2B2D2D2D2F2F2F303030313131333333333233292A2A2828282727
+      282828282828292828282828292C2D2C33323232323233333333333332313232
+      313231313132313131313131313130303030302F302F2F2F2F2F2F2E2E2F2E2E
+      2E2E2D2E2E2E2E2D2E2D2D2D2E2D2E2D2D2D2B2B2B2626262524252525252525
+      2425242425252524242524242424242424242424242424242323232324242324
+      23232323232423232726272828292B2B2B2B2B2B2A2B2A2B2B2A2A2A2A2A2A29
+      292A292929292A29282A29292928282928282928282828282828282828282928
+      292929282928292929292929292929292929292929292A2B2B2B2A2A2B2B2A2B
+      2B2A2C2B2B2C2B2B2C2C2B2C2B2B2D2C2B2C2B2B2D2C2C2D2C2C2C2C2B2C2C2C
+      2C2B2C2B2B2B2B2B2B2B2B2B2B2A2B2A2B2B2A2A2B2B2A2A2A2B2A2A2A2A2A2A
+      2A2A292929292929292929292929292929292929282829292829282828292929
+      2828282828282828272727282828272827272727272726272626272625262626
+      2625252725252625252625252525242524242424242524242424242423242424
+      242423242323232323232323222322231D1D1E1E1D1D1D1D1D1D1D1D1E1E1E2C
+      2B2B3736363B3B3B3F3F3F4343433333331C1C1C1C1B1B1B1B1B1B1C1B1B1B1B
+      1B1B1A1A1B1B1B1A1B1B1B1A1B1A1A1A1A1A191A1A1A191A19191919191A1919
+      1919191919191918181818181918181918181817181718171717171718171717
+      1717171717171716171617161716161617161616161616161616161616161615
+      1515161515151515151515141415141414151414141414141414141413141413
+      141314131314131313131313121313122D302D12131230303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030302F2F2F2F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C
+      2C2B2B2B2B2B2B2A2A2A29292928282828282827272727272726262626262625
+      2525252525252525252525252525252525252525252525252525252525252525
+      2525252525252525252525252626262626262626262727272727272828282828
+      282828282929292929292A2A2A2A2A2A2A2A2A2B2B2B2B2B2B2B2B2B2B2B2B2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B
+      2B2B2B2B2A2A2A2A2A2A2A2A2A29292929292929292928282828282827272727
+      2727272727262626262626262626252525252525252525252525252525252525
+      2525252525252525252525252525252525252525252525252525252525252525
+      2525252524242424242424242424242424242424242424242424242424242424
+      2424242424242424252525252525252525252525252525252525252525252525
+      2626262626262626262626262626262626262626262626262626262626262626
+      262626262727272727272727272727272828282828282828282929292929292A
+      2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A292929292929292929
+      2828282828282727272727272626262626262626262525252525252525252525
+      2525252525252525252525252525252525252525252525252525252526262627
+      27272D2D2D2F2F2F313131323232343433343434353535282929282829282829
+      292929292A2A292A292929292D2D2D3333333434343434343333333333333232
+      32323332333232313231313130313130313030313030302F2F302F2F2F2F2E2F
+      2E2F2F2E2F2E2E2E2E2D2E2A292A252525252525252525252525252525262526
+      2526252525252626262525252525252525252525252525252525252524242424
+      242424242424242424242424252928292A2A2A2C2C2C2B2B2B2C2B2A2B2B2A2B
+      2A2A2B2A2A2B292A2A2A292A29292A2A29292A292929292929292A2A2A2A292A
+      2929292A29292A2A2A2A2A2A2A2A2A2B2A2B2A2B2A2B2C2B2C2B2B2C2C2B2C2B
+      2B2C2B2A2C2C2C2D2C2B2C2B2C2D2B2C2D2C2C2D2C2C2D2C2C2C2B2B2C2C2B2C
+      2C2C2B2B2B2B2B2B2B2B2B2B2B2B2B2B2A2A2B2A2A2A2A2A2A2A2A2A2A2A2A2A
+      292A292A2A292A292A292A292929292929292929292829292929282928282828
+      2828282828282827282827272727272727272627262627262626262626262526
+      2625262525262525252425252425242424252424252425242423232423232424
+      2423232324232323232323231F1F1F1D1E1E1D1D1E1E1D1D1E1E1E2727273535
+      36393A3A3E3E3E4342423D3D3D1C1C1B1B1C1B1B1C1C1B1B1C1B1B1B1B1B1B1B
+      1B1A1B1B1A1A1A1A1A1A1B1B1A1A1A1A1A191A1A1A191A1A1A191A1A19191919
+      1919191919191818181819181819181818181818181718181717171718181717
+      1717171717171717171717161616171716161616161616161516151616161515
+      1515151515151515151415151515141415151414141414141314131414131413
+      1413131313131313131313133030301212123030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030302F2F2F2F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2D2D2D2C2C2C
+      2B2B2B2A2A2A2A2A2A2929292828282828282727272727272626262626262626
+      2625252525252525252525252525252525252525252525252525252525252526
+      2626262626262626262626272727272727272727282828282828292929292929
+      2A2A2A2A2A2A2B2B2B2B2B2B2B2B2B2B2B2B2C2C2C2C2C2C2C2C2C2C2C2C2C2C
+      2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C
+      2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2B2B2B
+      2B2B2B2B2B2B2B2B2B2A2A2A2A2A2A2929292929292828282828282828282727
+      2727272727272726262626262626262625252525252525252525252525252525
+      2525252525252525252525252525252525252525252525252525252525252525
+      2525252525252525252525252525252525252525252525252525252525252525
+      2525252525252525252525252525252526262626262626262626262626262626
+      2626272727272727272727272727272727272727272727272727272727272727
+      2727272828282828282828282828282929292929292A2A2A2A2A2A2A2A2A2B2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2A2A2A2A2A2A29292929292928
+      2828282828282828272727272727262626262626262626252525252525252525
+      2525252525252525252525252525252525252626262626262626262727272828
+      282F2F2F3131313232323434343535353636363434352B2B2B2A292A292A292B
+      2B2B2B2A2A2A2B2B2A2B2A2D2D2D353434353535353535343434343433343434
+      3334333333333232323233313332313231313131313130303030303030302F30
+      302D2D2D2727272627272627262626262626262626262727272726272627272A
+      2A2B3534353434352D2D2D272727262526262626262526252626252625262526
+      2525252525252525252525252425252626262A2A2A2C2C2C2C2C2B2C2C2B2C2B
+      2B2C2B2B2C2A2B2B2A2B2B2B2A2B2A2A2A2A2A2A2A2A2B2B2B2B2A2B2B2B2B2A
+      2B2A2B2B2B2B2B2B2B2B2B2B2B2B2C2C2C2B2C2C2C2D2C2D2C2B2C2B2B2D2C2C
+      2D2C2B2D2C2B2C2B2C2D2C2C2E2C2C2D2C2C2D2C2C2C2C2B2C2C2C2B2C2C2B2C
+      2C2B2B2B2B2B2B2B2B2B2B2B2B2B2A2A2A2A2A2A2B2A2A2A2A2A2A2A2A2A2A29
+      2A29282929262627262626292929292929282929282828292829282828282828
+      2828282828272727272728272727262727262726262726262626262625252625
+      2526252526252525252524242525242524252424242424242424232323242324
+      2323232323232323201F201E1D1E1D1D1E1E1E1D1F1E1E2222233535353A3939
+      3D3E3E4141414545461F1F1F1C1C1C1B1C1C1C1C1B1B1B1B1B1B1B1B1B1B1B1A
+      1B1B1B1B1B1A1B1B1A1A1A1B1A1A1A19191A19191A1A19191A191A1A1A191919
+      1919191919191819181819181818181818171818171817181817181817171817
+      1717171716161616161616171617161616161615151515161616151615151515
+      1615151515151514151414141414151414141413141413141414141313131313
+      1413131313131313303030131213303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030302F2F2F2F2F2F2E2E2E2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2B
+      2B2B2A2A2A2A2A2A292929282828282828272727272727262626262626262626
+      2626262626262626262626262626262626262626262626262626262626262626
+      262727272727272727272828282828282929292929292A2A2A2A2A2A2A2A2A2B
+      2B2B2B2B2B2C2C2C2C2C2C2C2C2C2C2C2C2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D
+      2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D
+      2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2C2C2C2C2C2C2C2C2C2C
+      2C2C2B2B2B2B2B2B2B2B2B2A2A2A2A2A2A292929292929282828282828282828
+      2727272727272727272626262626262626262626262626262626262525252525
+      2525252525252525252525252525252525252525252525252525252525252525
+      2525252525252525252525252525252525252525252525252525252525252525
+      2525252626262626262626262626262626262727272727272727272727272727
+      2727272727272727272727272727272728282828282828282828282828282828
+      28282929292929292929292A2A2A2A2A2A2B2B2B2B2B2B2B2B2B2B2B2B2C2C2C
+      2C2C2C2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2B2B2B2A2A2A2A2A2A2929292929
+      2928282828282827272727272727272726262626262626262626262626262626
+      2626262626262626262626262626262626272727272727272727282828292929
+      3131313333333434343535353737373837383737372D2D2D2B2B2B2B2B2B2C2B
+      2C2C2B2B2B2C2B2C2C2B2D2D2E35343435353535353535353535343435353434
+      35343433333333323333323332323332323231313231313030302B2A2B282827
+      272727272827272828272727282828282828292929292A2A3535343939393939
+      3939393939393935353530303028282826272726272626272626272726272627
+      26272726262626262626262625262929292D2D2D2D2D2C2D2D2D2D2C2C2D2C2C
+      2D2C2C2C2C2C2C2B2B2C2B2B2C2B2B2B2B2B2B2B2B2B2B2B2C2C2C2B2C2C2B2C
+      2B2B2C2B2C2C2C2C2C2C2C2C2C2D2D2D2C2D2C2D2C2B2D2D2C2D2C2C2D2C2C2D
+      2C2C2E2D2D2D2D2D2D2C2C2E2D2C2D2C2C2D2C2C2C2B2C2C2C2B2C2B2C2B2B2C
+      2C2B2C2B2B2C2B2B2A2B2A2A2B2B2B2A2A2B2B2B2A2828282726272424252424
+      2324242323232326252529292929292929292928292928282828282828282828
+      2827282728282727272727272726272626262626262626272626262525262625
+      2625252525252525252424252425252524242524242424242424242423232324
+      242423232222221D1E1E1D1E1D1E1D1D1E1D1D1F1F1F3333333838383D3D3D40
+      41404444452929291C1C1C1C1B1C1C1C1C1B1C1C1C1B1C1B1B1B1B1B1B1B1A1B
+      1B1A1A1B1A1B1A1A1A1A1A1A1A1A1A1A19191A191A1A19191919191919191919
+      1919181919191818181818181818181817181718181817181717171718181717
+      1717171717161716161616161716161616161516151516161515151515151516
+      1515151515151514151415141514141414141414141414141414131314141313
+      1313141330303013131230303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030302F2F2F2F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2D2D2D2C2C2C2B2B2B2B2B
+      2B2A2A2A29292929292928282828282828282827272727272727272726262626
+      2626262626262626262626262626262626272727272727272727272727282828
+      2828282828282828282929292929292A2A2A2A2A2A2B2B2B2B2B2B2C2C2C2C2C
+      2C2C2C2C2D2D2D2D2D2D2D2D2D2D2D2D2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+      2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+      2E2E2E2E2E2E2E2E2E2E2E2E2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2C2C
+      2C2C2C2C2B2B2B2B2B2B2B2B2B2A2A2A2A2A2A29292929292928282828282828
+      2828272727272727272727272727262626262626262626262626262626262626
+      2626262626262626262626262626262626262626262626262626262626262626
+      2626262626262625252525252525252525252525252526262626262626262626
+      2626262626272727272727272727272727282828282828282828282828282828
+      2828282828282828282828282828282828282828282929292929292929292929
+      292A2A2A2A2A2A2B2B2B2B2B2B2B2B2B2C2C2C2C2C2C2C2C2C2C2C2C2D2D2D2D
+      2D2D2C2C2C2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2B2B2B2A2A2A292929292929
+      2828282828282828282727272727272727272727272626262626262626262626
+      262626262727272727272727272727272828282828282828282929292B2B2B33
+      3333353535363636373737383837393A3A3938382F2E2F2C2C2B2B2B2C2C2C2D
+      2C2C2C2D2C2C2C2C2C2D2C2E3434343636363636363636353535363535353535
+      343535343534343433333433333332322E2E2E2A292A29292929292929282929
+      28292A2A292929292A2A2A2B2B2B3333333B3B3B3C3C3C3D3D3D3D3D3D3D3D3D
+      3B3B3B3A3A3A3939393737373131312929292728282727282828272827272727
+      272727272727272726272929292F2E2E2E2F2D2E2E2E2F2E2D2E2D2D2E2D2D2E
+      2D2D2D2C2C2D2C2D2C2C2C2C2C2D2C2C2C2C2C2C2D2D2D2D2C2C2D2C2D2C2C2C
+      2C2C2C2E2D2D2D2D2D2D2C2D2E2E2D2D2E2D2E2D2C2D2C2C2D2C2C2E2D2D2E2D
+      2D2E2C2D2E2D2D2D2C2C2D2D2C2D2C2C2C2C2C2C2C2C2C2B2C2C2C2C2C2B2B2B
+      2B2B2A2A2A292929282727262626242524242424242424242424232324232323
+      2424232323232525252929292829292928292828292828282828282828282828
+      2828272727272727272727262627262626262627262527262526252626252525
+      2525252425242524252524252424242524242424242424242424232423232324
+      2323231E1E1E1E1E1E1D1E1E1D1E1E1E1E1E2C2C2C3737373C3B3C3F3F404444
+      433433331D1C1C1C1C1C1C1C1C1B1C1B1B1C1C1B1C1B1B1B1B1B1B1B1B1B1B1B
+      1B1B1A1A1A1A1A1A1A1A1A1A1A1A1A191A1A191A191A191A1A19191919191919
+      1818181918181918181919181818171818181718181718181717171817171717
+      1716171616171616161716161617161616161616151616161515151515161515
+      1515151514151514141514151414141415141414131414131313131414141313
+      3030301312133030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303030303030303030303030302F
+      2F2F2F2F2F2F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2D2D2D2C2C2C2B2B2B2B2B2B
+      2A2A2A2A2A2A2929292929292828282828282828282727272727272727272727
+      2727272727272727272727272727272728282828282828282828282829292929
+      29292929292A2A2A2A2A2A2B2B2B2B2B2B2C2C2C2C2C2C2C2C2C2D2D2D2D2D2D
+      2D2D2D2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+      2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+      2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2D2D2D2D2D2D2D2D2D
+      2C2C2C2C2C2C2B2B2B2B2B2B2B2B2B2A2A2A2A2A2A2929292929292828282828
+      2828282828282827272727272727272727272727272727272727272727272727
+      2727272727272727272727272727272727272727272727272727262626262626
+      2626262626262626262626262626262626262626262626262727272727272727
+      2727272728282828282828282828282829292929292929292929292929292929
+      29292929292929292929292929292929292A2A2A2A2A2A2A2A2A2A2A2A2B2B2B
+      2B2B2B2B2B2B2C2C2C2C2C2C2C2C2C2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D
+      2D2D2D2D2D2D2D2D2D2D2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A2A2A2A29292929
+      2929282828282828282828282828272727272727272727272727272727272727
+      2727272828282828282828282828282929292929292A2A2A2A2A2A2C2C2C3535
+      3536363638383838383839393A3A3B3A3A3B3B2F2F2F2D2D2D2C2D2C2D2C2D2D
+      2C2D2C2C2D2C2D2C2D2C2D333333373737373737363636363535363636353535
+      3535353534343433322C2C2D2A2A2A2A2A2A2A2A2A2A292A2A292A2B2A2B2A2B
+      2A2C2B2B2F2E2E3A3B3A4040404040404242424242424141414040403E3E3E3C
+      3C3C3B3B3B3939393939393939393433342E2D2D282828272727282728272727
+      272727272727262627303030302F2F302F2F302F2E2F2E2E2F2E2E2F2E2E2F2E
+      2D2E2E2E2D2E2E2D2D2D2D2E2D2D2D2D2D2D2D2D2D2D2E2E2E2D2D2D2E2D2D2E
+      2E2E2E2E2E2E2E2E2E2D2E2E2D2D2E2D2D2E2D2C2E2E2D2E2D2D2E2D2D2D2D2D
+      2D2C2D2D2D2D2D2D2C2D2C2C2B2B2B2B2B2B2929292828272726272525262625
+      2625252625242424252524242424242424242424242424242424242324242323
+      2423232324252525292929282929292929292829282828282828282828282828
+      2727272827272727262726272726262626262726252725262626252625262525
+      2524252525242425242524242524242424242424242423242424232423232320
+      1F201E1E1E1D1E1E1D1E1E1E1F1E2728283636363A3A3A3E3E3E4242423D3D3D
+      1C1C1D1C1C1C1C1C1C1B1C1C1B1C1B1C1C1B1B1B1B1B1B1B1B1B1B1B1B1B1B1A
+      1A1A1B1B1A1A1A1A1B1A1A1A1A191A1A191A1919191919191919191919191919
+      1818191818181918191818181818171718181717181817171717171817171717
+      1717161616161616161617161616161616161615161515161515151515151515
+      1514141515141414141414151414141414141414131413141314131332303013
+      1413303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030302F2F
+      2F2F2F2F2F2F2F2E2E2E2E2E2E2E2E2E2D2D2D2D2D2D2C2C2C2B2B2B2B2B2B2A
+      2A2A2A2A2A292929292929292929282828282828282828282828282828282828
+      2828282828282828282828282828282929292929292929292929292A2A2A2A2A
+      2A2B2B2B2B2B2B2B2B2B2C2C2C2C2C2C2D2D2D2D2D2D2E2E2E2E2E2E2E2E2E2E
+      2E2E2E2E2E2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2D2D2D2D2D2D2D
+      2D2D2C2C2C2C2C2C2B2B2B2B2B2B2B2B2B2A2A2A2A2A2A292929292929292929
+      2828282828282828282828282828282828282828282828282828282828282828
+      2828282828282828282828282827272727272727272727272727272727272727
+      2727272727272727272727272727272727272727272727282828282828282828
+      2828282929292929292929292A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A
+      2A2A2A2A2A2A2A2A2A2A2A2A2A2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2C2C2C2C
+      2C2C2D2D2D2D2D2D2D2D2D2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+      2E2E2E2D2D2D2D2D2D2C2C2C2C2C2C2B2B2B2B2B2B2B2B2B2A2A2A2A2A2A2929
+      2929292929292928282828282828282828282828282828282828282828282828
+      28282929292929292929292A2A2A2A2A2A2A2A2A2B2B2B2B2B2B2E2E2E363636
+      3838383939393A3A3A3B3B3B3D3C3D3C3C3C3131302E2E2E2E2E2D2E2D2D2E2E
+      2D2D2D2E2E2E2D2D2D2D32313137373737373737373737363736373635353531
+      30302B2B2B2B2C2C2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2C2B2C2E2D2D383738
+      4141414344434545454747474747474747474545454343434141413E3E3E3C3C
+      3C3A3A3A3A3A3A39393938393939393A36373731313128292928292828282828
+      28282828282E2E2E30302F302F2F2F2F2F302F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2E2F2E2E2E2F2E2F2E2E2E2E2E2E2E2E2E2E2D2E2D2E2E2E2E2E2F2E2E
+      2E2E2E2E2E2E2E2E2E2D2D2D2D2F2E2E2E2D2D2F2D2D2F2D2E2E2D2D2E2D2D2E
+      2D2D2B2B2B262526262526262526262526262526262526262525252525262526
+      2525252525252525252524252524252424242424242424242323242424232324
+      2423242325252428282829292929292928292829282828282828282828282727
+      2827272727272626272626272626272626272626262626262526252525252525
+      2524252425252425242525252424242424242424242424242424232020201E1E
+      1E1E1E1E1E1E1E1F1E1E2323233536353A3A3A3E3E3E4242424546451F1F201C
+      1D1C1C1C1C1C1C1C1B1C1C1C1B1C1B1B1C1B1B1B1B1B1B1B1B1B1B1B1B1A1B1B
+      1A1A1A1A1B1A1A1A1A1A1A1A1A1A1A1A191A191A19191A191819191919191918
+      1918181818191819181818181818171817171817181818171717171817171717
+      1717161716171617161616161616151616161516151616151515151515151515
+      1415151515151514151414141414141414141414141314143030321413133030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030303030303030302F2F2F2F2F2F
+      2F2F2F2F2F2F2E2E2E2E2E2E2E2E2E2D2D2D2D2D2D2C2C2C2C2C2C2B2B2B2B2B
+      2B2A2A2A2A2A2A2A2A2A29292929292929292929292929292929292929292929
+      29292929292929292929292929292A2A2A2A2A2A2A2A2A2B2B2B2B2B2B2B2B2B
+      2C2C2C2C2C2C2D2D2D2D2D2D2D2D2D2E2E2E2E2E2E2E2E2E2E2E2E2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2D2D2D2D2D
+      2D2D2D2D2C2C2C2C2C2C2B2B2B2B2B2B2B2B2B2A2A2A2A2A2A2A2A2A29292929
+      2929292929292929292929282828282828282828282828282828282828282828
+      2828282828282828282828282828282828282828282828282828282828282828
+      282828282828282828282828282828282828282828282929292929292929292A
+      2A2A2A2A2A2A2A2A2A2A2A2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2C2C2C2C2C2C2C2C2C2C2C2C2D2D2D2D2D2D2D2D
+      2D2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+      2E2E2E2E2E2D2D2D2D2D2D2C2C2C2C2C2C2B2B2B2B2B2B2B2B2B2A2A2A2A2A2A
+      2A2A2A2929292929292929292929292929292929292929292929292929292929
+      292A2A2A2A2A2A2A2A2A2B2B2B2B2B2B2C2C2C2C2C2C2D2D2D2F2F2F38383839
+      39393B3B3B3B3B3B3C3C3C3D3D3D3E3E3E3433342D2D2E2E2D2E2D2E2D2D2E2D
+      2E2E2E2D2E2E2D2D2D3030303737373737363737363333322D2D2D2B2C2B2B2B
+      2C2C2B2B2B2B2B2C2B2B2C2C2C2C2C2C2D2D2D3333333E3E3E43434346454648
+      49484B4C4B4D4D4D4D4D4D4C4C4C4848483C3C3C4242423E3E3E3C3C3C3B3B3B
+      3A3A3A3A3A3A3A3A3A3A393A3A39393A3B3B2929292929292929292929292828
+      282D2D2D313131313030313030313030302F2F30302F302F2F2F2F2F2F2E2F2E
+      2E2E2F2F2F2F2E2E2F2E2E2E2E2E2F2F2F2F2F2F2F2F2F2F2F2E2F2F2E2E2E2E
+      2E2E2E2F2F2E2E2E2E2F2E2D2E2D2D2F2D2D2E2D2D2E2D2D2E2D2D2E2D2D2928
+      2926252626262626262626252626252626252626252626252625252625252525
+      2525252524242524252425242424242425242424242424242424242424232323
+      2423232425242828282928292829292928282929282828282828272828272827
+      2727262727262728262627262627262626262526262526252525252525252525
+      25252525242525242425242424242424242424242423242222221F1E1E1F1E1E
+      1E1E1E1E1D1E201F203333343939393D3D3D4141414545452A2A2A1C1C1D1D1D
+      1C1C1C1C1C1C1C1C1C1C1C1C1B1B1C1B1B1B1B1B1B1B1B1B1B1A1B1B1B1A1A1A
+      1A1B1A1A1A1A1A1A1A1A1A1A1A19191919191A191A1919191919191918191919
+      1818191818181818181818181818181818171817181717181717171717161716
+      1716161617161616161616161616151616151615161515161515151515151514
+      1515151415141414141514141415141414141414323230141313303030797979
+      7979797979797979797979797979797979797979797979797979797979797979
+      7979797979797979797979797979797979797979797979797979797979797979
+      7979797979797979797979797979797979797979797979797979797979797979
+      7979797979797979797979797979797979797979797979797979797979797979
+      7979797979797979797979797979797979797979797979797979797979797979
+      7979797979797979797979797979797979797979797979797979797979797979
+      7979797979797979797979797979797979797979797979797979797979797979
+      7979797979797979797979797979797979797979797979797979797979797979
+      7979797979797979797979797979797979797979797979797979797979797979
+      7979797979797979797979797979797979797979797979797979797979797979
+      7979797979797979797979797979797979797979797978787878787877777777
+      77777676767575757474747373737272727171717070706F6F6F6E6E6E6D6D6D
+      6C6C6C6B6B6B6A6A6A6A6A6A6A6A6A6969696969696969696969696969696A6A
+      6A6A6A6A6A6A6A6B6B6B6C6C6C6C6C6C6D6D6D6E6E6E6F6F6F70707070707071
+      7171727272737373747474757575757575767676767676777777777777777777
+      7878787878787878787878787878787878787878787878787878787878787878
+      7878787878787878787878787878787878787878787878787878787878787877
+      7777777777777777777777767676767676757575747474747474737373727272
+      7171717070706F6F6F6E6E6E6E6E6E6D6D6D6C6C6C6B6B6B6A6A6A6A6A6A6969
+      6969696969696968686868686868686868686868686868686868686868686868
+      6868686868686868686868676767676767666666666666666666666666666666
+      6666666666666666666767676767676868686969696969696A6A6A6B6B6B6C6C
+      6C6D6D6D6D6D6D6E6E6E6E6E6E6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F70
+      7070707070707070707070707070717171717171727272737373747474747474
+      7575757575757676767676767676767676767676767676767575757575757474
+      747373737272727171717070707070706F6F6F6E6E6E6D6D6D6C6C6C6B6B6B6A
+      6A6A6A6A6A6A6A6A6969696969696969696969696A6A6A6A6A6A6B6B6B6C6C6C
+      6C6C6C6D6D6D6E6E6E6F6F6F7070707171717272727373737979798B8B8B9292
+      929393939494949794979A989A989A9A8B8D8D72757575757272727575727572
+      7272727275717171747474858282797979707070706E70706E706E7070707070
+      6F6F726F6F6F727275777777959595A6A6A6AAAAAAAEAEAEB5B5B5B9BAB9BBBB
+      BBBEBEBEBCBCBC9E9E9E7272726B6E6E767676898B8B9191919191918F8F8F90
+      90909090908D90909191919191907373766769676967676669666666696E6E6E
+      7C7C7C7C7C7B7C7C7B7B7B7B7B78787B78787B78787B78787876787876767678
+      7678767676767679777777777777777777777778757878787875787575757575
+      7575767673767373767373767173737373737171737171717171606062606062
+      606062605D60606062605D60605D60605D60605D606060626260606260606060
+      60606060626262696C6C7979796262625D5B5B5B5B5B5B585B585B58585B5B5B
+      5B585B5D5B656265676767676765656565676565656565656562656262656260
+      65606265626065606062606062606060606060605D605D5D5D5D5D5D5D5D5D5D
+      5D5D5D5D5D5D5D5D5B5B5B5D5B5B5B5B5B5B5B5B585B4B4E4B4E4B4B4B4E4B4B
+      4B4B4E4E4E6E6E718D8D8D9597959E9E9EA7A7A7808383464946494946464646
+      4649464646464646464343434343434643434343434343434343434341414141
+      41414141414141413E413E413E413E41413E3E3E3E3E3E3E3E3D3E3D3D3E3D3E
+      3D3D3D3D3D3D3D3D3A3D3D3D3D3A3D3D3A3D3A3D3D3A3A3A3A3A3A383A3A383A
+      3838383838383838383838383835383838383835353535353535353535353535
+      3532323232323232323232323230323232323213141330303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030302F2F2F2F2F2F2F2F
+      2F2F2F2F2E2E2E2E2E2E2E2E2E2D2D2D2D2D2D2D2D2D2C2C2C2C2C2C2C2C2C2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B
+      2B2B2B2B2B2B2C2C2C2C2C2C2C2C2C2C2C2C2D2D2D2D2D2D2D2D2D2E2E2E2E2E
+      2E2E2E2E2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F30303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2E2E2E2E2E2E2E2E2E2E2E2E2D
+      2D2D2D2D2D2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B
+      2B2B2B2B2B2B2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A
+      2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A29292929292929292929292929
+      29292A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2B2B2B2B2B2B2B2B2B2C2C2C2C2C2C
+      2C2C2C2C2C2C2C2C2C2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D
+      2D2D2D2D2D2D2D2D2D2D2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2E2E2E2E2E2E
+      2E2E2E2E2E2E2D2D2D2D2D2D2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2B2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2C2C2C2C
+      2C2C2C2C2C2D2D2D2D2D2D2E2E2E2E2E2E2E2E2E2E2E2E3030303939393C3C3C
+      3C3C3C3C3C3C3E3E3E3F3F3F3F3F3F3B3B3B2F302F2E2F2E2E2E2E2E2F2E2E2F
+      2E2E2E2E2D2D2D2D2E2D2D2D2D2D2D2D2D2D2D2C2C2D2E2E2D2D2E2E2E2E2E2F
+      2F2F3938394242424746464949494B4B4B4F4F4F5151515354535655564D4D4D
+      3636362C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2D2D2D3232323737373838383939
+      393939393A393A3A393A303030292A292A292A2A29292929292C2B2B32313232
+      3231323231323131323131323131313031313030302F303030303030302F2F30
+      2F2F2F302F2F2F302F2F2F2F2F2F2F302F30302F302F302F2F30302F302F302F
+      2E2F2E2E2F2E2E2F2E2D2F2E2E2E2D2D2E2D2E2A2A2A26262726262726262726
+      25262625262726272726272726272827282727282B2A2A2D2E2D313132353535
+      3838383736373736363535362727272525242424232424242324242423242324
+      2424252528282829292829292828292829282828282728282727272628262727
+      2727272626272626272626262626262625252526252526262625252525242525
+      242424242525252424252424242424242424201F1F1F1F1E1E1F1E1E1E1E1F1F
+      1F2828283838383C3B3C4041404444443F3F3F1C1D1D1D1D1C1C1C1C1C1C1C1C
+      1C1C1C1C1C1B1C1C1B1B1B1C1B1C1C1B1B1B1B1B1B1B1B1B1B1B1B1A1B1A1B1B
+      1A1A1A1A1A1A1A1A1A191A1A191A1A191A191919191919191919191819191818
+      1818181918181818181818171818171718181717171717171717171717171717
+      1617171616161616161616151615161615161616151515151515151515141515
+      141515151414151514141414141414141414}
+    OnClick = OnCloseClick
+  end
+  object Label1: TLabel
+    Left = 8
+    Top = 264
+    Width = 312
+    Height = 13
+    Caption = 'Copyright RemObjects Software, 2002-2008. All rights reserved.'
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWhite
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    Font.Style = []
+    ParentFont = False
+    Transparent = True
+    OnClick = OnCloseClick
+  end
+  object lbl_Version: TLabel
+    Left = 253
+    Top = 40
+    Width = 10
+    Height = 16
+    Caption = '[]'
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWhite
+    Font.Height = -13
+    Font.Name = 'Tahoma'
+    Font.Style = []
+    ParentFont = False
+    Transparent = True
+  end
+  object Label7: TLabel
+    Left = 8
+    Top = 280
+    Width = 91
+    Height = 13
+    Caption = 'Visit our website at'
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWhite
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    Font.Style = []
+    ParentFont = False
+    Transparent = True
+  end
+  object Label3: TLabel
+    Left = 102
+    Top = 280
+    Width = 150
+    Height = 13
+    Cursor = crHandPoint
+    Caption = 'http://www.remobjects.com/ro'
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWhite
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    Font.Style = [fsUnderline]
+    ParentFont = False
+    Transparent = True
+    OnClick = Label3Click
+  end
+  object btn_Cancel: TButton
+    Left = 418
+    Top = 272
+    Width = 77
+    Height = 25
+    Cancel = True
+    Caption = 'btn_Cancel'
+    Default = True
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWhite
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    Font.Style = []
+    ParentFont = False
+    TabOrder = 0
+    OnClick = OnCloseClick
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fROAbout.lfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fROAbout.lfm
new file mode 100644
index 0000000..594c5e0
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fROAbout.lfm	
@@ -0,0 +1,14157 @@
+object AboutForm: TAboutForm
+  Left = 366
+  Height = 299
+  Top = 242
+  Width = 497
+  HorzScrollBar.Page = 496
+  VertScrollBar.Page = 298
+  ActiveControl = btn_Cancel
+  BorderIcons = []
+  BorderStyle = bsNone
+  Caption = 'About RemObjects SDK'
+  ClientHeight = 299
+  ClientWidth = 497
+  Font.Color = clWhite
+  Font.Height = -11
+  Font.Name = 'Tahoma'
+  OnClick = OnCloseClick
+  OnCreate = FormCreate
+  Position = poMainFormCenter
+  LCLVersion = '0.9.25'
+  object Image1: TImage
+    Height = 300
+    Width = 500
+    AutoSize = True
+    OnClick = OnCloseClick
+    Picture.Data = {
+      07544269746D617006DE0600424D06DE0600000000003600000028000000F401
+      00002C0100000100180000000000D0DD0600C01E0000C01E0000000000000000
+      0000303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030302F2F302F302F30302F302F30
+      30303030302F2F302F302F2F302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2E2F2F2E2E2E2F2F2E2E2E2F2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2D
+      2D2D2D2D2D2E2E2D2E2D2D2E2D2E2D2D2D2D2D2D2D2D2D2D2D2D2D2C2D2C2D2C
+      2D2C2C2C2C2C2C2D2D2C2C2C2C2C2C2C2B2C2C2C2C2C2C2B2B2B2B2B2C2B2B2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2A2A2B2B2B2B2A2A2A2A2A2A2A2A2A2A2A
+      2A292A2A2A2A2A2A2A2A2A292929292929292929292A29292928292929292829
+      2829292829282828282828282828282827272727272728282827272827272728
+      2727272727272727272727272B2B2B2F2F2F3131313333333434342D2C2D2626
+      262625262625262625262626272C2A2B2B2A2A2C2B2A2B2A2A2B2A2A2B2A2A2A
+      2A2A2A2A2A2A292A292A29292929292929292928292929282929282928282829
+      2828282828282828282728282827272727272727272727272627262627272727
+      27262626262626262626252626262626252525252525222222202020201F201F
+      201F2020202120212D2D2D343434363535353536353434303030222222222222
+      1E1E1F1D1D1E1E1D1E1D1D1D1D1D1D1D1D1D1D1C1D1C1C1C1D1D1C1D1C1C1C1C
+      1C1C1C1C1C1B1B1F1F202525252525252626262827272929292A2B2A2120211A
+      1A1B1A1A1B1A191A1A1A1B1A1A1A1A191A1B1B1B1D1D1C1D1C1D1D1C1D1C1D1C
+      1C1C1C1C1C1C1C1B1C1C1B1B1B1C1C1B1B1B1B1B1B1A1B1B1B1A1B1B1A1B1A1B
+      1A1A1A1A1A1A1A1A1A191A191A191919191A1919191919191919191918181818
+      1819181818181818181818181717171717171716151414141414141314131314
+      1615152525263232323838383D3D3D4243422827271111111111111111111110
+      10101110101111101010101011101010101010100F101010100F0F0F0F0F0F0F
+      0F0F0F0F0F0F0E0F0F0F0E0E0E0F0F0E0F0E0E0E0E0E0E0E0E0E0D0D0E0D0E0D
+      0D0D0D0D0D0D0D0D0C0D0D0D0D0C0C0D0D0D0C0D0C0C0D0C0C0C0C0C0C0C0C0C
+      0B0C0B0C0B0C0C0B0B0B0B0B0B0B0B0B0A0B0B0B0B0B0B0B0B0A0B0B0A0A0A0A
+      0A0A0A0A0A0A0A0A090A090909090909090A0A09090909090909080909080909
+      0908090808080808080808080808080807080808070808070808070807070707
+      0707070707070607070607070606070706070706060606060606060606060606
+      0606060606050606060506050505050506050505050505050504040505040504
+      0405040505040405040404040404040404040404040404040404030404040304
+      0403040303030303030303030303030303020303030302030302030202030203
+      0202030202020202020202020202020202020202010201020102020201020202
+      0102020101010201020101010101010101010101010101010101000001000000
+      0100000000000100000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000003030
+      3079797979797979797979797979797979797979797979797979797979797979
+      7979797979797979797979797979797979797979797979797979797979797979
+      7979797979797979797979797979797979797979767976797976797679797976
+      7679767979767676767676797976767676767676767676737676767676737676
+      7676767676767673737373737673737373737373737373737373737373737373
+      737371737171717171717371717171717171717171717171717171716E716E6E
+      6E6E716E6E6E71716E6E6E6E6E6E6E6E6E6C6E6C6C6E6E6C6C6E6C6E6C6C6C6E
+      6C6E6E6C6C6C6C6C6C6C6969696C6C6C6C6C69696C6C69696969696969696969
+      6769676967696767676769676967676767676767676767676767676567676567
+      6765656765656565676565656565656565656565626262626262626262626562
+      62626262626262626E6E6E7676767B7B7B808080838383676969606060605D62
+      605D60605D606565656E6C6C6C6C6C6C69696C6C696C69696C69696C69696969
+      6969676967676969676967696767676767676767676765676567656765656565
+      6565656562656262626565656265626562626262626262626262606262606262
+      6260606060605D6060605D5D606060605D5D605D5D505053505050505050504E
+      5050505058585B8080808380837E80807E7E8079797B7676797173737171716E
+      6C6E6C6E6C6262626262625D5B5D5B585B5053534B4B4E464946464646434646
+      4B4B495D5D5D6060606262626565656767676C6C6C555555434343414143413E
+      43414143414141413E4343434649494949494946494949494646464946464646
+      4646464643464646464643434343434343434343414341434143414343414141
+      4141414141413E4141413E4141413E3E413E41413E3D3E3E3E3E3D3D3D3E3E3D
+      3E3D3D3D3D3D3D3D3A3A3D3A3A3838383532323232323232323032323A3A3865
+      67678380808F8F909C9C9CA9A9A94B4E4E2D2B2D2B2B2B2D2B2B2B2B2B2B2828
+      2B2B2B282B28282B282B28282828282828282826282826262626282626262626
+      2626232626262623232623232323232326232323232320232323232023202020
+      202020202020202020201E20201E1E201E1E1E1E1E1E1E1E1E1E1E1E1B1E1E1E
+      1E1B1E1B1B1E1B1B1B1B1B1B1B1B1B1B1B1B1B1B191B1B1919191919191B1919
+      1919191919191916161919161616161616161616161616161614141416141614
+      1414141414141414141414141414121412141414121412121412121412121412
+      12121212121212121212120F0F0F1212120F0F0F120F0F120F0F0F0F0F0F0F0F
+      0F0D0F0F0F0D0F0D0F0D0D0D0D0D0D0D0D0D0D0D0D0A0D0D0D0A0D0D0A0A0D0A
+      0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A080A0A080808080A0A
+      0808080A08080808080808080808080805080808080508080508050508080508
+      0805080505050505080805050505050305050505030503050305050303050503
+      0303050303030503050303030303030303030303030303030303030003000300
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303030302F30302F30302F2F2F30
+      302F2F302F2F2F2F2F2F2F30302F2F2F302F2F2F2F2F2E2F2F2F2F2E2E2E2F2F
+      2E2F2F2F2E2F2F2E2E2E2E2F2E2E2E2E2E2E2E2E2E2E2E2E2E2D2E2D2E2E2E2E
+      2D2E2D2D2D2D2D2E2E2E2D2D2D2E2E2D2D2D2D2D2D2D2D2C2C2C2D2D2C2D2C2C
+      2D2D2D2C2C2C2C2C2C2C2C2C2C2C2C2C2B2C2C2C2C2B2B2B2C2C2C2C2B2B2B2B
+      2B2B2B2B2B2B2B2B2B2A2A2B2B2B2B2B2A2B2B2A2B2A2A2A2B2A2A2A2A2A2A29
+      2A292A2A2A292A292A29292929292A2929292A29292929292928292929292928
+      2828282829282828282828282828282727272828282727282827272727272727
+      272727272C2C2C2F2F2F3131313333333535352A2A2A26262626262726262626
+      25272A29292C2B2B2C2B2B2C2A2B2C2B2B2B2A2A2B2A2A2B2A2A2A292A2A2A2A
+      292A29292A2A2929292929292929282829292929282829292929282828292828
+      2827282828282828272827282727272727272727272727262727262626272626
+      2726262626262626262626262625252526232223202020201F20201F1F202120
+      2021212929293232323132323131303031312F2F2F2E2E2E2E2E2E2D2D2C2C2D
+      2C2B2B2B2B2B2B2B2B2B2B2B2B2A2B2B2A292A2A292926262723232326262628
+      2828282827282828292A2A2B2B2B2525251B1A1C1B1A1C1B1A1B1A1A1C1A1A1B
+      1A1A1B1B1A1A1D1D1E1D1D1D1D1D1D1D1D1D1D1D1D1D1C1D1D1D1C1C1C1C1C1C
+      1C1C1C1C1C1C1C1B1B1C1B1C1C1B1B1B1B1B1B1B1B1A1B1B1B1A1A1B1A1A1B1B
+      1A1A1A1A1A1A1A1A1A191A19191A191919191919191919191818181919181819
+      1818181818181817171716171415151414141414141515151818182F2E2F3434
+      343A3A3A40404045454515141512121211111111111211111211111111111111
+      1010111111101110101010101010100F100F0F0F0F0F100F0F0F0F100F0F0F0F
+      0E0F0F0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0D0D0D0D0D
+      0D0E0D0D0D0D0D0C0C0D0D0D0D0D0C0C0C0D0D0C0C0C0C0C0C0C0C0C0C0C0B0C
+      0B0B0C0C0C0B0B0B0B0B0B0B0B0B0A0A0B0B0B0B0A0A0A0A0A0A0A0A0A0A0A0A
+      0A0A0A0A090A090A090909090A090909090A0909090909090909090909080808
+      0808090809080808080808080808080708080708080807070707070708070707
+      0707070707070706070607060707060707060706060606060606060506060606
+      0605060606050506060506060505050505050505050505050505050404050504
+      0505040404040505040404040404040404040403040404040404030403040303
+      0303030303030303030303020203030303030302030203030202030203030203
+      0202020203020202020202020202020101020102020201020201010202010101
+      0101010101010201010101010101010101010101000100010101010001000000
+      0100000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030302F30302F303030303030302F2F2F30
+      2F2F2F2F2F2F2F2F2F2F2F302F2F2F2F302F2F2F2F2F2F2F2F2F2F2F2F2F2E2E
+      2E2F2F2F2E2F2E2E2F2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2D2E2D2E2D2D2E2D
+      2E2D2D2E2D2E2E2D2E2E2D2D2D2D2D2D2D2D2D2D2D2D2C2C2D2C2C2C2D2D2E33
+      33322F2F2F2C2C2C2C2C2C2C2C2B2B2C2C2C2B2B2B2B2C2C2C2B2B2B2C2B2B2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2B2A2A2B2A2A2A2A2B2B2A2A2A2A2A2A2A2A2A2A
+      292A2A2A2A292A292A2929292929292929292929292929292929292829282929
+      2829282928282828282828282728272828272727282827272727272727272727
+      2E2E2E2F2F2F3131313333333535352726272626272625272626262625272A29
+      292C2B2B2C2B2B2C2A2B2C2B2B2C2A2B2B2B2A2B2B2B2B2B2A2A2A292A2A2A29
+      292A292929292929292929292929292829282828282929282828282928282828
+      2827282828282828272828282727282727272727272627272727262627272626
+      26262626262626262526262525262525202021202020202020201F2020212021
+      21213030313031313130303031312F2F302E2E2E2E2E2F2E2E2E2D2D2D2C2D2D
+      2C2C2D2C2C2C2C2C2C2B2B2B2A2B2B2A2B2A2A2A29292A292929292929282A2A
+      2A2A2A2B2C2B2B2625251B1B1C1B1B1C1A1A1B1B1B1B1A1B1B1A1B1B1B1B1B1E
+      1E1D1E1E1E1E1D1D1D1D1D1D1D1D1D1D1C1D1D1D1D1C1D1D1C1C1D1C1C1C1C1C
+      1C1C1C1C1C1B1B1C1B1B1C1C1B1B1B1B1B1B1B1B1B1A1A1A1B1B1B1A1B1A1A1A
+      1A1A1A191A191A1A1A1A19191A1A191919191919191918191818181918181818
+      18181817171615151415141415141414141516151A1A1A2F2F2E3435353A3B3A
+      4040414242421212121212121212121211111112121211111111111111101110
+      11101110101111101010101010101010100F0F0F0F100F100F0F0F100F0F0F0F
+      0F0F0F0E0F0E0F0E0F0E0E0F0E0F0E0E0E0E0D0E0E0D0E0D0E0E0E0D0D0D0D0D
+      0D0D0D0C0D0D0D0D0D0D0C0C0D0C0C0C0C0C0C0C0D0C0C0C0C0C0B0C0B0C0C0B
+      0C0C0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B0A0A0A0A0A0A0A0B0A0A0A0A0A0A09
+      0A0A0A090A0A0909090A090909090A0909090909080809090909080808080908
+      0808080809080808080808070808080708070808070708070707070707070707
+      0707070606070607060607060606060706070606060606060606060606050606
+      0605060505050506060605050505050505050505050505040405050504040405
+      0405040504040404050404040404040404040404040304030303030304030303
+      0303040303030303030303030303020302020302020303030302030203020202
+      0202030202020202020202020201020202020202020202020101020101010201
+      0101010101010101010101010101010001000001010001010100010001000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030302F3030303030302F30303030302F30
+      3030302F2F30302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2E2F2F2E2F2F2E
+      2E2E2F2E2F2E2E2F2E2E2E2E2F2E2E2E2F2E2E2E2E2E2E2E2E2E2E2E2E2D2D2D
+      2D2D2D2D2D2E2D2D2D2E2D2D2D2D2D2D2D2D2D2D2C2E2D2E3333343535353737
+      373535353030302C2C2C2B2B2C2B2C2B2B2C2C2B2B2B2B2C2C2B2C2B2B2B2C2B
+      2B2B2B2B2B2B2B2B2A2B2A2B2B2A2A2A2B2B2B2A2A2B2B2A2A2A2A2A2A292A2A
+      292A2A2A2A2A2A292929292A2929292929292929292928292928292928292828
+      282928282928282828272728282827272728282727272727272727272E2E2E2F
+      2F2F3131313333333535352525262626272626262626272625262B2A2B2C2B2B
+      2C2C2B2C2B2B2B2A2B2C2B2B2C2A2B2B2A2B2B2A2A2A2A2A2A2A2A2A2A2A2A2A
+      29292A2A292A2A29292929292928292928292929292828282828282828282827
+      2828282827272727272827282727272727272626262727262726272727262626
+      2626262526252526262626262323232020202020202020202020201F20202829
+      283131313131313030312F2F302F30302E2E2E2E2F2E2E2E2E2D2E2E2D2D2E2D
+      2D2D2D2E2D2C2C2C2C2C2C2C2C2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2C2C
+      2929291C1C1D1C1C1C1B1B1C1B1A1C1B1B1B1B1B1B1C1B1C1E1E1E1E1E1E1D1E
+      1E1E1E1E1E1D1D1D1E1D1D1D1D1D1D1C1D1C1D1D1C1D1C1C1D1C1C1C1C1C1C1C
+      1C1C1B1C1C1B1C1C1B1B1B1C1B1B1B1B1B1B1A1B1B1A1B1A1A1A1B1A1A1A1A1A
+      1A1A1A191A19191A1A191A191919191919191819181919191818181818181818
+      171616161514151415151415151515151D1D1E3030303636363B3C3B41414138
+      3838121212121212121212111112121211111111111111111111111011101010
+      1111111011101010101010101010100F10100F0F0F10100F0F100F0F0F0F0F0F
+      0F0E0E0F0F0E0F0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0D0E0D0D0D
+      0D0D0D0D0D0D0D0C0D0C0C0C0D0C0D0C0D0C0C0C0C0C0C0C0C0C0C0B0C0B0B0B
+      0B0B0C0C0B0C0B0B0B0B0B0A0B0B0B0A0A0B0B0A0A0A0A0A0A0A0B0A0A0A0A09
+      0A0A0A0A0A090A0A09090A090909090909090909090908080809080809080809
+      0808080808080808080808070807080708070807080707070708070707070707
+      0607070706070707070707060606060706060606060606060606060606050605
+      0606060506050605050505050505050505040505050405050504040504050404
+      0404050404040404040404030404030304040304040404030304030403030303
+      0303030403030303030303030303030302030302030202020203030303030202
+      0202020202020202020202020201020102020202010202010202020201010201
+      0201010201010101010101010101010101010101000000010000000001000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030302F2F30303030302F2F302F
+      2F2F2F30302F302F2F2F302F2F2F2F2F2F2F2F2F2F2F2F2F2E2F2F2F2F2F2F2E
+      2E2E2E2F2E2F2E2E2E2E2E2F2E2E2E2F2E2E2E2E2E2E2E2E2E2E2D2E2E2D2E2D
+      2E2D2D2D2D2D2E2D2D2D2D2D2D2D2F2F2F333333343434363636373737393939
+      3A3A3A3737373030302C2C2C2C2B2C2C2C2C2B2C2B2C2C2C2C2C2B2B2B2B2B2C
+      2B2B2B2B2B2B2B2B2A2B2B2A2B2A2B2A2B2B2A2B2A2A2A2A2A2A2A2A29292A2A
+      2A292A2929292A2A292929292929292929292929292929292829282828292829
+      2828292828282827282728272827282728282727272828282F2E2E3030303232
+      323434343434342525262626272626272626272625262B2B2B2C2C2B2C2B2B2C
+      2B2B2C2B2B2B2B2B2C2B2B2B2A2B2B2B2A2B2A2A2A2A2A292A2A29292A29292A
+      29292A2929292929292929292928292929292928282828282828292828272828
+      2828272827272727272727272727272727272726272626272627272626272626
+      2626262626252526252525202021202020202020202020201F1F202020292928
+      2B2A2A2C2C2C2A2A2B2A2A2B2F2F302F2F302F2F2F2F2E2F2E2F2F2E2E2E2D2D
+      2D2D2E2D2D2D2D2C2D2C2D2D2D2D2D2C2C2C2C2C2C2C2D2D2D2A2A291D1C1E1B
+      1B1C1B1B1C1B1B1C1B1B1B1B1B1C1B1C1B1F1E1E1E1E1F1E1E1E1E1E1E1D1E1E
+      1E1D1E1D1D1D1E1D1D1D1D1D1C1D1D1D1D1D1D1D1C1C1C1C1C1C1C1C1C1C1C1C
+      1C1B1B1C1B1B1C1B1B1B1B1B1B1B1B1B1A1B1B1A1B1B1A1B1B1A1A1B1A1A1A19
+      1A1A191A1A191A19191919191919191919191919181819191818181818161616
+      1515151514151414141516162323233131313737373E3E3E4343423333321312
+      1213121211121212111212111111121111121111111111111111111011101010
+      1010101010101010101010100F10101010100F100F0F0F100F100F0F0F0F0F0F
+      0E0E0F0E0F0E0F0E0E0F0F0E0E0E0E0E0E0E0E0E0E0E0E0D0D0E0D0D0D0D0D0D
+      0E0D0D0D0D0D0D0D0C0C0D0C0D0C0D0D0C0C0C0C0C0C0C0C0C0B0C0B0B0B0C0C
+      0B0B0C0B0C0B0B0B0B0B0B0B0A0B0B0A0B0B0A0B0A0A0A0A0A0A0A0A0A0A090A
+      0A090A0A0A0A0A09090A0909090A090909090909090809090809080909080808
+      0809080808080808080807080707080807070807080707070708070707070707
+      0707070607060606060607060606070706060606060606060606050605060505
+      0605060606060505050505050505050505050405040405040505050504040405
+      0404040504040404040404040404040403040404030403030304030303030303
+      0403030303030303030303030303030302020302030302020202030202020202
+      0202020302020202020202020202020202020202010101010101020102010102
+      0101010101010101010201010001010100010100010100000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000030303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030302F30303030302F2F2F302F2F
+      2F2F30302F2F2F302F2F2F2F2F2F2F2F2F2F2F2F2E2F2F2F2F2F2E2F2E2E2E2F
+      2E2F2E2E2E2F2E2E2E2E2E2E2E2E2E2E2E2E2D2E2E2D2E2E2E2D2D2E2D2D2D2D
+      2D2E2D2D2D2D2E2F2F2F3232323333333535353737373838383939393A3A3A3B
+      3B3B3B3B3B3737373030302C2C2C2C2C2C2C2B2B2B2B2C2C2B2B2B2C2B2B2B2B
+      2B2B2B2A2B2B2A2B2A2A2A2A2A2B2A2B2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A29
+      2A2A292A292A292A292929292929292929292929292929292929292928282928
+      2828282828282828272728272827282727292A2A2E2E2E303030323232343434
+      3232322525262626272626272626272626272C2C2B2D2C2C2C2B2B2C2C2B2C2B
+      2B2C2B2B2C2B2B2C2A2B2B2B2B2B2B2B2A2A2A2A2A2A292A2A2A2A2A29292A29
+      292929292A2A2929292929292929292929282829282829282828282828272828
+      2828282827272728272827272727272727262726262626272627262626262626
+      262626252626262322232121202020212020201F20201F201F201F1F201F201F
+      201F1F1F1F1F1F1E1E1E1E1E1F1E1F1F202322232222232525252726272A2929
+      2E2E2D2E2E2E2D2D2E2E2E2D2D2D2D2E2D2D2C2D2C1D1D1E1B1C1D1C1C1C1B1C
+      1C1C1B1C1B1B1C1C1C1C1F1F1E1E1E1F1F1E1E1E1E1E1E1E1E1E1E1E1E1E1E1D
+      1E1D1E1E1D1D1E1D1E1D1D1C1D1C1C1D1D1D1D1D1D1C1D1C1C1D1C1C1C1C1C1C
+      1C1C1B1B1B1C1B1C1C1B1B1B1B1A1B1B1B1B1A1A1B1A1A1B1B1B1A1A1A1A1A1A
+      1A19191A191A191919191A191919191919181919181819181815161515151515
+      15151514141616162525253232323939393E3E3E4443432D2C2D121212121312
+      1213121212121212121211111112111212111112111111111111111010101011
+      101010101011101010100F101010100F100F1010100F0F0F0F0E0F0F0E0F0F0F
+      0F0E0E0F0F0E0E0E0E0E0E0E0E0E0E0D0E0E0E0D0D0D0D0D0E0E0D0D0D0D0D0D
+      0D0D0D0D0D0C0D0D0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0B0C0B0B
+      0C0B0B0B0B0C0B0B0B0B0B0B0B0B0A0A0B0A0B0B0A0A0A0A0A0A0A0A0A0A0A0A
+      090A0A0A09090A0A090909090909090909090908080809080808090808080908
+      0908080808080807080808080707080707070807070707070707070707070707
+      0707070706070707060706060606060606060606060506060606060505050506
+      0605060505050605050605050505050505040505050404040404050504050504
+      0404050404040404040404040403030403040404040404040403040403030303
+      0303030303030303030302020303030202030203030302020302030202020202
+      0302030202020202020202020201020201010202020102010101010101010101
+      0101010101010101010101010001010000010000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000003030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030302F303030303030302F2F302F
+      302F2F2F2F302F2F2F2F2F2F2F2F2F2F2F2E2F2F2E2F2F2E2F2F2F2E2F2F2F2F
+      2E2E2E2E2E2E2F2F2E2E2E2E2E2E2E2E2E2E2E2D2E2D2E2E2D2D2D2E2D2D2D2D
+      2F30303232323333333434343636363838383939393A3A3A3B3B3B3B3B3B3C3C
+      3C3B3B3B3B3B3B3635362E2D2E2B2C2B2B2B2C2B2C2C2C2B2B2B2B2C2B2B2B2B
+      2B2B2B2B2B2B2B2B2B2B2A2A2A2A2A2A2A2B2B2A2A2A2A2A2A2A292A2A2A2A2A
+      29292A292929292A2A2929292929292929292929292928292929292829282828
+      282828282728282727282828272929292F2E2F30303133323234343432323226
+      26272626272626272626272626272D2C2C2C2C2B2D2B2B2C2C2B2C2B2C2C2B2B
+      2C2B2B2C2B2A2B2B2B2B2B2B2A2A2A2A2A2A2A2A2A2A2A2A2A292A2929292929
+      2929292929292929292829292928292928282828282928282828282728272728
+      2727272827282727272827272727272727272727272627262626272626262626
+      252626262525202121202120202020202020201F1F201F1F20201F1F1F201F1F
+      1F1F1E1F1F1F1F1E1F1E1E1E1E1F1E1E1E1E1E1E1E1E1E1E1E1D1D1D1D1D1D1E
+      1E1F222222252524272827292A292020201C1D1D1C1C1D1C1B1D1C1B1C1B1C1D
+      1C1B1C1E1E1E1F1F1F1F1F1E1F1F1F1E1E1E1E1E1E1E1E1E1E1E1E1D1E1E1D1D
+      1E1E1D1D1D1D1D1D1D1D1D1D1D1D1D1D1C1D1C1D1C1C1C1C1C1C1C1B1B1C1B1B
+      1C1B1B1C1C1C1B1B1B1B1B1B1B1B1B1B1A1B1B1A1A1A1B1A1A1A1A1A1A1A1A1A
+      1A1A1A1A1A191A19191919191919191918181818171615151515151516151515
+      1518181729282834343439393940404045444520202012121212131313131212
+      1212121212121212111211121111121211111111111111111111111111101111
+      101011101010100F0F0F101010101010100F0F100F0F0F0F0F0F0F0F0F0F0F0F
+      0F0E0F0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0D0D0D0D0D0E0D0D0D0D
+      0D0D0C0C0C0D0D0C0D0C0D0C0C0D0C0C0C0C0C0C0B0C0C0C0B0C0C0C0B0C0B0B
+      0B0B0B0B0B0B0B0A0B0B0B0B0A0A0B0A0A0A0B0A0A0A0A0A0A0A0A090A0A0A0A
+      09090A0A09090A0909090A090909090908090908090908090908090908090808
+      0808080808070808080708070808070708070707070707070707070707070707
+      0707060706070607060606060606060606060606060606060606060506060506
+      0506050506050505060505050505050505050505050504050504050405040404
+      0404040404040404040403040404040404030403030303040303030404030304
+      0303030303030303030303030303030302020303020202030202020202030202
+      0202020202020202020202020202020201020201020101020102020101010101
+      0101010102010101000101000000010001000001000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030302F3030303030303030303030302F302F3030303030
+      2F2F2F2F2F2F302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2E2E2F2E2E2F2F2E
+      2E2E2F2E2E2E2F2F2E2E2E2E2E2E2E2E2E2E2D2D2E2E2D2E2D302F3032323234
+      33333534343636363838383939393B3B3B3B3B3B3C3C3C3C3C3C3C3C3C3C3C3C
+      3C3C3C3B3B3B3B3B3B3535342E2E2E2C2C2C2B2C2B2B2B2B2B2B2B2B2C2B2B2B
+      2B2B2B2A2A2A2B2B2B2A2A2B2B2B2A2A2A2A2A2A2A2A2A2A2A2A2A2A292A2929
+      29292A292A2929292A2929292929292929292929282929282928292829282828
+      2828282828282827282B2A2B2E2E2F3031303332333434342D2D2D2626272626
+      272626272626272727272D2C2C2C2C2B2D2B2C2D2B2B2C2B2B2D2B2B2C2B2B2C
+      2B2B2B2B2B2B2B2B2B2B2B2B2B2A2A2A2B2A2A2A2A292A2A292A2A2929292929
+      2929292929292929292929292828292829292828282828282828282827282827
+      2728272727272727272827272727262727272726262626262627262626252626
+      25252322232021212020202120212020201F202020202020201F201F1F1F1F1F
+      1F1F1F1F1F1F1E1E1F1F1F1F1E1F1F1E1E1E1E1E1D1D1E1D1D1E1D1D1D1E1D1D
+      1E1D1D1D1D1D1D1D1D1D1D1D1D1C1D1D1C1C1D1C1C1D1C1C1C1B1B1C1E1E1F1F
+      20201F1F201F1F1F1F1F1E1F1F1F1F1E1E1F1E1F1E1E1E1E1E1E1E1E1D1E1E1E
+      1E1D1D1D1D1E1D1D1D1C1D1D1D1C1D1C1C1C1C1C1D1C1C1C1C1C1C1C1B1C1C1C
+      1C1C1C1B1B1C1C1B1B1B1A1B1B1B1B1A1B1B1A1B1B1B1A1A1B1A1A1A1A191A1A
+      1A1A191919191919191919191919181818161516161515151515161617191919
+      2E2D2E3434343A3A3A4040404545451919191213131313131213131212121212
+      1212121212121212111111121111121111111111111110101010111110101011
+      101010101010101010101010101010100F0F0F100F0F0F0F0F0F0E0F0F0F0F0E
+      0F0F0E0E0E0E0E0E0E0D0E0E0E0E0D0D0D0E0D0D0E0E0D0E0D0E0D0D0D0D0D0D
+      0C0D0D0D0D0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0B0C0B0C0B0B0C0B0B0B0B0B
+      0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0A0A0A0A0A0A0A0A0A0A0A0A0A090A0A
+      0A0A0A090A090A090A0909090909090909090909090908090909090808080808
+      0808080808080808070707080707080707080807070807070706070707060707
+      0606070707060707060706060706060606060606060606050605050605050505
+      0606060505050605050504050404040505050405050504050505040404050404
+      0404040504040404040403040304030304040404030304040403040303040303
+      0304030302020303030203030303030202030303030203020202020302030203
+      0202020202020202020202020202010202020102010101020201010101010101
+      0101010101010100010100010101000001000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030302F30302F2F30302F30303030302F3030
+      2F2F2F302F302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2E2F2F2F2F2F2E2E2F
+      2F2E2F2E2E2E2E2E2E2E2E2E2E2E2E2D2E2D3131303333323334343534343636
+      373938383B3A3A3737373231323A3A3A3C3C3C3C3C3C3C3C3C3C3C3C3C3C3C3C
+      3C3C3C3C3C3A3B3B3B3B3B3534342E2E2E2B2B2B2B2B2C2C2B2B2B2B2B2B2B2B
+      2B2B2B2B2B2B2B2B2A2A2A2B2A2A2A2A2B2A2A2A2A2A2A2A2A2A2A2A2929292A
+      2A292A2A292929292A2929292929292929292929292928282928282828282828
+      28282828282B2B2B2F2F2F3131313333333434342E2E2E262627262627262627
+      2626272828282D2C2C2D2C2C2D2C2C2C2C2B2C2C2C2C2B2B2C2B2C2C2B2B2C2B
+      2A2B2B2A2B2B2A2A2A2A2B2A2A2B2A2A2A2A2A2A29292A292A292A2A2A2A2929
+      2A29292929292929282829282828282828292928282828282828282828282827
+      2828272828282727272727272726272726262627262626262626262626262625
+      252121212020202020212020202020202020201F202020201F1F1F1F1F20201F
+      1F1F1F1E1E1F1F1F1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1D1E1D1D1D
+      1D1D1D1D1C1D1D1D1D1C1C1D1C1D1D1C1C1D1C1C1D1E1D1E2020201F1F1F1F1F
+      1F1F1F1F1F1F1F1F1F1F1F1F1E1F1E1E1F1E1E1E1E1E1E1E1E1D1E1E1E1D1E1D
+      1E1D1D1D1D1D1D1D1D1D1D1D1D1D1C1C1C1D1D1C1C1C1C1C1C1C1C1B1B1C1C1B
+      1C1B1B1B1B1C1B1B1B1B1B1B1B1B1B1A1B1A1A1B1A1A1A1A1A1A1A1A1A1A1A1A
+      191A1A1919191919191A1717171516161615161616161617161A1B1A2F2F2F35
+      35353B3B3B404040454545131313121313121313131213121213121212121312
+      1212121211121112121112111112111112111110111111111011101010101011
+      111010101010100F10100F100F100F10100F100F0F0F0F0F0F0F0F0F0E0E0F0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0D0D0D0E0E0D0E0E0E0D0D0D0D0D0D0D0C0D0D
+      0D0D0D0D0C0C0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0B0B0C0B0C0B0B0B
+      0B0B0B0B0B0B0A0B0B0B0B0B0B0A0B0A0A0A0A0A0A0A0A0A0A0A0A0A0A090A0A
+      090A0A0909090909090A09090909090808090908090809090908080908080808
+      0808080707080708070708070807080707070707070707070707070707070707
+      0606060607060706070606060606060606060506050605060606060606050605
+      0506050506050505050505050505050404050504040504040404040505040404
+      0404040404040304040304040404040304030304040304040303030303030303
+      0302030303030303030303030202020203020302030202030203030302020202
+      0202020201020202020201020202020201010201010102010101020201010101
+      0101010101010101010101000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030302F2F302F2F30302F2F302F2F
+      2F2F2F2F2F2F302F2F2F2E2F2F2F2F2E2E2F2F2F2F2F2F2F2F2F2E2F2E2E2E2F
+      2E2F2E2E2E2E2E2E2E2E2E3131303233333433343535353737373938383A3A3A
+      3535362B2B2B2C2C2C2C2C2C3232323B3B3A3D3D3D3D3D3D3C3C3C3C3C3C3C3C
+      3C3C3C3C3C3C3C3B3A3B3B3A3A3535352E2D2D2B2C2B2B2B2B2B2B2B2A2B2B2B
+      2B2B2B2B2B2B2A2B2A2B2A2A2A2B2B2A2A2A2A2A2A2A2A2A2A2A2A292929292A
+      2929292929292929292929292929292929292828292928282828292828282828
+      282C2C2B302F303132323333343636362C2C2C26262726262726262726262728
+      28282D2C2C2D2C2C2D2C2C2C2C2C2D2C2B2C2B2C2C2B2C2C2B2B2C2B2B2B2B2B
+      2B2B2B2B2A2B2A2B2A2A2A2A2A2A2A2A2A292A292A2A292A292A292A292A292A
+      2929292929292928292928292928292928292828282927282828282827282827
+      2827272727272827272727272727272726262727262726262626262626242324
+      222122222122212121212121202021202020201F201F1F1F1F1F1F1F1F1F1E1E
+      1F1F1E1F1E1F1E1E1E1E1F1E1E1E1E1E1E1E1E1E1E1D1D1D1E1D1E1D1D1D1E1D
+      1D1D1C1D1D1C1C1D1D1D1D1D1D1D1E1E1E2020201F202020201F1F1F1F1F201F
+      1F1F1F1F1F1F1F1F1F1E1F1F1F1E1E1F1E1E1E1E1E1E1E1E1D1E1E1E1D1D1D1D
+      1D1D1D1D1D1D1D1D1D1D1D1D1D1C1C1D1C1D1D1D1C1C1C1C1C1C1B1C1B1C1C1B
+      1C1C1B1B1C1B1B1B1B1B1A1B1A1A1A1A1B1B1B1A1A1A1A1A1A1A1A1A191A1A1A
+      1A191A19191A1718171616161616151515151617171E1E1E3131303636363C3C
+      3C4242423C3C3C14141313131313131212131313131312121312121212121212
+      1212111212111211121212111111111111111111101110111011101010101110
+      1010101010100F10100F10100F0F0F0F100F0F0F0F0F0F0F0F0F0E0E0F0E0F0E
+      0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0C0D
+      0D0D0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0B0C0B0C0C0B0B0B0B0B
+      0B0B0B0B0A0B0B0A0B0A0B0A0B0A0B0A0A0A0A0A0A0A0A0A090A0A0A09090909
+      0A090A090A090909090909090909090908090908080908080809090808080808
+      0808080808080708080808080707070707070807070707070707070707060607
+      0706060606070606060606060606060606060606050605050606060506050505
+      0505050505050505050505050504050405040405050404040404040404040404
+      0404040404040404040304040304040403030304030403030303030404030303
+      0303030303030303030303020203020203020202020202030202030202020202
+      0202020202020202020102020101020101020201010101010101010101010101
+      0100000101000000000001000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030302F30302F302F2F2F2F2F2F302F3030
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2E2F2F2E2E2F2F2E2F2E2F2F2E2F2E2F
+      2E2F2E2F3131313333333434343636363737373839393B3B3B3434332B2B2C2C
+      2C2C2C2C2C2C2C2C2B2C2C2C2C2C3232333A3B3A3D3D3D3D3D3D3C3C3C3C3C3C
+      3C3C3C3C3C3C3B3B3B3A3A3A3B3A3B3434352D2D2D2B2B2B2B2B2B2B2B2B2A2B
+      2B2B2A2A2B2B2A2A2B2A2B2A2B2A2B2A2A2A2A292A2A29292A292A2A292A2A2A
+      2A29292A292A29292929292929292928282929282828292828282828282D2D2D
+      3131313332323435343636362B2B2A2626282626272626272626272A292A2D2C
+      2C2D2C2C2D2C2C2D2C2C2C2C2C2D2B2B2C2C2B2C2B2B2C2B2B2B2B2B2B2B2B2B
+      2B2B2B2B2A2A2B2A2A2B2A2B2A2A2A2A2A2A2A2A2A2A292A2A292A2A29292A29
+      2929292929292929292828282828292929292828282728282828282828272727
+      2827272727282727272726262626262626272626262726272626262625262626
+      2526262626252526252525252525242525242424242223232223222222212121
+      202021201F201E1F1E1E1E1E1E1E1E1E1D1E1E1D1E1E1D1D1E1D1D1D1D1D1D1D
+      1D1D1D1D1C1C1D1F1E1F2020202020202020201F1F201F1F201F1F201F20201F
+      1F1F1F1F1F1E1F1F1F1F1F1E1F1E1E1E1E1E1E1E1E1E1E1E1E1E1D1D1E1D1D1D
+      1D1D1D1D1D1C1C1C1D1C1D1D1C1C1D1C1C1D1C1C1D1C1C1C1C1C1C1C1C1B1B1B
+      1C1C1B1B1B1B1B1B1B1B1B1B1B1A1B1B1A1A1A1A1A1A1A1A1A1A191A1A191A19
+      191A1716181616161616161616161717172322223132313837373D3D3D434343
+      3636361314131313131313131313131212121212131312131312121212121212
+      1211111212111212121111111111111111111011101010111111101010101010
+      1010101010101010100F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0C
+      0D0C0D0C0C0C0D0C0C0C0C0C0D0C0C0C0C0B0C0C0C0C0C0B0C0C0B0B0B0B0B0B
+      0B0B0B0B0B0A0B0B0B0B0A0B0A0A0A0A0B0A0A0A0A0A0A0A0A0A0A09090A0A09
+      09090909090A0A09090909090909090909080809080908080809080808080808
+      0808070808080807070708070808070707070807070707070707070707070706
+      0607060607060606060606060606060606060606060505050606050605050606
+      0605050505050505050504050505050505040504050405050504040404040404
+      0404040404040404040403040304040303040304030404030303030303030303
+      0303030303030302020302020302030203020202020302020302030202020202
+      0202020202010202020202020101010101020101010101010101010101010101
+      0101000101000101000100000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030302F30302F3030302F30302F30302F3030302F2F2F3030302F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2E2F2F2F2F2F2F2F2F2E2F2E2E2E2E313131
+      3333333535343636363838383939383B3B3A3232322C2B2C2D2D2D2D2D2C2C2C
+      2C2C2C2C2C2C2C2B2B2C2C2C2C2C2C2C3332323A3B3B3D3D3D3C3C3C3C3C3C3C
+      3C3B3C3C3C3C3C3C3B3B3A3A3A3A3A3B3A3434352D2D2D2B2B2B2B2B2A2B2B2B
+      2B2B2A2B2A2A2A2A2B2A2A2B2A2A2A2A2A2A2A2A2A2A2A2A2A2929292929292A
+      292A292A2A29292929292929292929292928292928282C2C2C2F2F2F31313134
+      34333534353736362B2A2A2727272626272626272626272A2A2A2D2C2C2D2C2C
+      2D2C2C2D2C2C2D2C2C2D2B2C2C2B2B2C2C2C2C2C2C2C2C2C2B2C2B2B2B2B2B2A
+      2A2B2B2B2A2B2A2A2A2A2A2A2A2A2A2A2A292A2A2A29292A2A29292A292A2929
+      2929292829292829282929282928282828282828282828282828282827272728
+      2727272727272727272727262727262626262626262626262626252626262626
+      2525262525262525252525252525252524252524242424252424242424242423
+      23232323232222232221212121212020201F1F1F1E1D1E1D1E1D1D1E1D1D1D1D
+      1E1D1D202121202120202020202021202020201F201F1F201F1F1F1F1F1F1F1F
+      1F1F1F1E1F1F1E1E1F1E1E1E1E1E1F1E1E1E1E1E1E1D1D1D1D1D1E1D1E1E1D1D
+      1D1D1D1D1D1D1D1D1D1D1D1D1D1C1C1C1D1C1C1D1C1C1B1C1C1B1B1B1B1B1B1C
+      1B1C1B1B1B1B1B1A1B1B1B1B1B1B1B1A1A1A1B1B1A1A1A1A1A1A1A19191A1616
+      161616161616161616161818182524253233323838383E3E3E4444442D2D2D13
+      1414131314131313131313131313121312121312121212131312121212121212
+      1111121211111212111111121111111011111111101111111011101011101010
+      1010101010100F0F100F0F0F10100F0F0F0F0F0F0F0F0F0F0E0E0F0F0E0E0E0F
+      0F0E0E0E0E0E0E0E0E0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0C0C
+      0D0C0D0D0D0D0D0C0C0C0C0C0C0C0C0C0C0C0C0B0C0C0C0B0B0C0B0B0B0B0B0B
+      0B0B0B0B0A0A0B0B0A0A0A0A0B0A0A0A0A0A0A0A0A0A0A0A0A090A0A0A090A0A
+      0A0A090909090909090909080909080909080808090908080908080808080808
+      0807070808070707080707070708070707070707070707070706060707070707
+      0707070606060706060606060605050606060606060505050605060605060505
+      0505050506050505050505040405050404040405050405050404040404040404
+      0403040404030403040403040403040404030303040303030303030303030303
+      0203030202030303030303020302020303030302030203020202020202020202
+      0202010201020202010202010202010102020101010101010101010101010101
+      0001000000000000010000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      2F30303030303030303030302F30302F2F2F2F2F302F302F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2E2F2F2E2F2F2E2F2F2E2E2E32323133333334343436
+      37363838383A3A3A3A3A3A3231332C2C2C2D2D2D2C2C2D2C2D2C2C2C2C2C2C2D
+      2D2C2C2C2C2C2B2C2C2C2C2C2C2B2B2C2B2B3333333B3B3B3D3D3D3C3C3C3C3C
+      3C3C3C3B3B3C3C3C3C3C3C3C3B3A3A3B3B3A3A3333332C2C2C2B2B2A2B2B2A2A
+      2A2A2A2B2B2A2B2B2A2A2A2A2A2A2A2A2A2A2A2A2A29292A2A2A29292929292A
+      2929292A29292929292928292D2D2D2F2F303030303131313333333535353636
+      363736372727272627282627272726272626272A2A2A2D2D2C2D2C2C2D2C2C2D
+      2C2C2D2C2C2D2C2C2D2B2B2D2C2C2C2C2C2C2B2B2B2C2B2B2B2B2B2B2B2B2B2B
+      2A2B2B2A2A2B2A2A2A2A2A2B292A292A292A292A292A292A2929292929292929
+      2929282929292928282828282829282928282928272828282828282827272827
+      2727272727272727272627272726262726262627262626262625262625252626
+      2525252525252525252525252524242525242524242424242424242423232423
+      23232323242223232222232222232221222221212121201F20201F1F21212121
+      2120212121202120202020202020202020201F201F1F201F1F201F1F1F1F1F1F
+      1F1F1F1F1F1F1E1F1E1F1E1F1E1E1E1E1E1E1E1E1E1E1E1D1E1D1D1D1E1D1D1D
+      1D1D1D1D1C1C1D1C1C1C1C1D1D1C1C1C1C1C1C1C1C1C1C1B1C1C1C1C1B1B1B1B
+      1B1B1B1B1B1B1B1B1A1B1A1A1A1A1B1A1A1B1A1A1A1A1A191919161617161617
+      1616161616161919192A2A2A3334343A3A393F3F3F4545452423241314141414
+      1313141313131313131313131313131312131312131212121212121212121212
+      1212121111121211111111111111111111101010111110111111101010101010
+      10101010100F100F100F10100F100F0F0F0F0F0F0F0E0F0F0E0F0E0E0F0F0E0F
+      0E0E0E0E0E0E0E0E0E0E0D0D0E0D0E0D0D0D0E0D0D0D0D0D0D0C0D0D0D0C0D0C
+      0D0D0C0D0C0D0C0C0C0C0C0B0C0C0C0C0B0C0C0B0B0C0B0B0B0B0B0B0C0B0B0B
+      0A0B0B0B0B0A0B0A0A0B0A0A0B0A0B0A0A0A0A0A0A0A090A09090A090A0A0A09
+      0909090909090909090908090909080908090808080908080908090808080808
+      0808070808070808070708080807070707070707070607070707060707060606
+      0606070606060606060706060606060606060506060505050605050505050505
+      0505050505050504050504050504040404040505040504040504040404040404
+      0404040404030404030403040303040304030404030303030303030303030303
+      0303030203030303030202030302020202030202020202020202020202020201
+      0202020201020102020201020201010101020101010101010100010101010101
+      0100010000000101000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000030303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030302F3030302F302F2F302F302F2F302F302F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2E2F2F3132323333333534353637373838383A3A
+      3B3A3A3A2F2F2F2C2C2C2C2C2D2D2D2D2C2D2C2C2C2D2D2C2C2C2D2C2D2D2C2C
+      2C2C2C2C2C2C2C2C2C2C2C2C2B2C2C2B2C2D2C2C3434353B3C3C3D3D3D3C3C3C
+      3C3C3C3C3C3B3B3C3C3C3B3B3B3B3C3B3A3A39393A3333332C2C2C2B2B2A2B2B
+      2A2B2B2B2A2B2B2A2A2A2A2A2A2A2A2A2A2A292A2A292A2A2A29292A2A2A2929
+      292A2D2D2E303030303030313030313131333333353535363637373737383838
+      2727282627282727282626272626282B2B2B2D2D2C2D2C2C2D2C2C2D2C2C2D2C
+      2C2D2C2C2D2C2C2D2B2C2C2C2C2C2B2C2B2B2C2B2B2B2B2B2B2B2B2A2B2B2A2A
+      2A2B2A2B2B2A2B2B2A2A2A2A2A2A2A2A2A292A292929292A2A2A292929282929
+      2928292828292829292828282828282828282828282828282827272828272727
+      2827272727272727272727262626262626262626262626262626262626252626
+      2625252525252525252525242525252424242424242424242323242323242323
+      2423232422222322222322222322222322222222212221212221212120212121
+      212121202120202021202020202020201F20201F1F201F2020201F1F1F1F1F1F
+      1F1F1F1E1F1F1E1E1E1F1E1E1E1E1E1E1E1E1E1E1E1E1E1E1D1D1D1E1D1E1D1D
+      1D1D1D1D1D1D1D1D1D1C1D1C1C1C1C1C1D1C1C1C1C1B1B1C1C1C1B1B1B1B1B1B
+      1C1B1B1B1B1A1A1B1B1B1A1A1B1A1A1A1A1A1A19191916161617161717161617
+      1717191A192D2D2D3435353A3A3A4041404545451D1D1D141414141414141413
+      1413131313131313131313121313131313131212121212121212121212121112
+      1111121111111112111111111111111111111010111010101010101010101010
+      10100F0F0F0F10101010100F0F0F0F0F0F0F0F0E0E0F0F0F0E0F0E0E0E0F0E0E
+      0E0E0E0E0E0E0E0D0E0E0D0E0D0E0D0E0E0E0D0D0D0D0D0D0D0C0D0C0C0D0C0C
+      0C0C0D0D0C0C0C0C0C0C0C0C0C0C0C0B0B0C0C0B0B0B0C0B0B0C0B0B0B0B0B0B
+      0B0A0B0B0B0B0A0B0A0B0B0B0B0A0A0A0A0A0A0A0A0A0A0A090A0A0A09090A09
+      09090909090A0909090909090809090908080908080808080808090808080807
+      0807080808080708070707070707070707070707070707060707070607060706
+      0706060606060606060606060606060506060606050506060606050505050506
+      0505050505050505050405040404040405040404050504050404040404040404
+      0404040404040404030304040303040303030404030303030303030303030303
+      0203020203020303020203030202020202020302020202020202020202020202
+      0201020202020101010101010201010102010101010101010101010101010000
+      0100000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000003030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030302F302F302F303030302F2F302F2F302F2F302F
+      2F2F2F2F2F2F2F2F3232323333333534343736363838383A3A3A3A3B3A2F302F
+      2C2D2C2D2D2D2D2D2D2D2D2D2D2D2C2D2D2C2D2E2D2D2D2D2C2C2D2C2D2C2C2C
+      2C2C2C2C2C2C2C2C2C2C2B2C2C2C2B2C2B2B2B2D2C2D3435343B3B3B3D3D3D3C
+      3C3C3C3B3C3B3B3C3C3B3B3B3C3B3B3C3C3A3A3B3939393333332C2C2C2A2A2B
+      2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A29292A292A2A2D2D2D2F30303130
+      3031323132323133333233343336353637373737373838393831313127272826
+      27272727272627282726272B2B2B2D2D2C2D2C2C2D2C2C2D2C2C2D2C2C2D2C2C
+      2D2C2C2D2C2C2C2C2C2C2B2C2C2C2C2C2B2C2B2B2B2B2B2B2B2B2B2A2B2A2A2A
+      2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A292A292A29292A2929292929292929
+      2929292828282828282828282828282828282828272727272728282727272727
+      2727272627272727272727262626262626272626262626262626262525262525
+      2525252525252525242525252524242524242424242424232324232324232324
+      2222242222232222232222232222232122222222222122212121212121212021
+      2120212020202020212021201F20202020201F201F1F1F20201F201F1F1F1F1F
+      1F1F1E1E1F1F1F1F1E1E1E1E1E1E1D1E1E1E1E1D1E1D1D1E1D1D1D1D1D1D1D1C
+      1D1D1D1D1C1D1D1D1D1C1C1C1C1D1D1C1C1C1C1C1B1C1C1B1B1C1B1B1B1B1B1B
+      1B1B1B1B1B1B1B1A1A1A1B1A1A1A1A1919191717171717171717171717181B1A
+      1A2F2F2F3435353B3C3C40404046454515141514141514141414141313141313
+      1413131313131313131312131313121312121313121212121212121212121211
+      1111121211111111111111111111111111111111101010101010101010101010
+      100F0F100F10100F0F100F0F0F0F0F0F0F0F0F0E0F0E0F0F0F0F0E0F0E0E0E0E
+      0E0E0E0D0E0E0E0E0E0D0E0D0D0D0D0E0D0E0D0D0D0D0D0D0D0C0D0D0C0D0D0C
+      0C0D0C0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0C0B0B0C0B0B0B0C0B0B0B0A0B0B
+      0B0A0B0B0B0A0B0A0A0B0A0A0A0A0A0A090A0A090A0A0A0A0909090A09090A09
+      0909090909090809090909090909080809080809090808080808080808070807
+      0708080708080808070707070708070707070707060607060707070607060706
+      0707060706060606060606060606050605050605050505050606060606050505
+      0505050405050504050405050505040505040404050404040404040404040404
+      0404040404040404040403030403030304030303030303030303030302030303
+      0303030302030303030202020203030303020202020203020202020202020201
+      0202010201020101010101020102010101010101010001000100010100000100
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030302F3030302F30302F302F302F302F302F2F2F302F2F30302F2F2F2F2F2F
+      2F3232323333333534343637373939383B3B3A3B3A3A302F302C2C2C2D2D2D2D
+      2D2D2D2D2D2C2D2C2D2D2D2D2E2F3433333534343131312E2E2E2C2C2C2C2C2C
+      2C2C2B2C2C2C2B2C2C2C2C2B2B2B2B2B2B2B2B2C2B2C2C2C3434343B3B3B3D3D
+      3D3D3D3D3B3B3C3C3C3B3C3B3C3B3B3B3A3A3A3A3A3A3938393332332C2B2B2A
+      2A2B2A2B2A2A2B2A2A2A2A2A2A2A2C2C2C2F2E2F303030323132323232333333
+      3434343535353636353636373737383131322A292A2727282727282727282627
+      282727272727272D2D2C2D2D2C2D2D2C2D2C2C2D2C2C2D2C2C2D2C2C2D2C2C2D
+      2C2C2D2C2C2C2C2B2C2B2C2C2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2A2B2B
+      2A2A2B2A2A2A2A2A2A2A292A2A2A2A292A2A2A29292A292A2929292929292928
+      2929292928292928282828282828282828282827272727272727282827272727
+      2727262727272626272726262626262726262626262626262526252526252525
+      2525252525252525252525252524242424242424232423232423232423232422
+      2323232223222223212223222222222122222222222121212121212120202121
+      212020202120202020202020201F201F201F1F201F201F1F1F1F1F1F1F1F1F1F
+      1F1F1E1E1F1F1E1E1F1E1F1E1E1E1E1E1E1E1D1D1D1D1D1D1D1D1D1D1D1D1D1D
+      1D1D1C1C1D1C1D1C1C1C1C1C1C1C1C1C1C1C1C1B1B1C1B1B1C1C1C1C1B1C1B1B
+      1B1B1A1B1B1A1B1B1A1A1B1918181717171716171716171717171E1E1F313030
+      3737373C3C3B4343433F40401514141414141514141414141414131414131313
+      1413131313131313131313121212121312131212121212121212121112121212
+      1212111112111111111111111111101111101011111010111010101010101010
+      100F0F0F0F0F0F0F0F0F0F100F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0F0E0E0E
+      0E0E0D0E0E0E0D0E0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0D0D0D
+      0C0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C0C0C0B0B0B0B0B0B0B0B0B0B0A
+      0A0B0A0A0B0A0A0B0A0A0A0A0B0A0A0A0A0A0A090A090A09090A0A0A090A0909
+      0A09090909090909080909080908080909080809080808090808080807080807
+      0707070808070808080707070707070707070707070607070607070606060607
+      0607060606060606060605060605050506050605060506050506060505050505
+      0505050505040505040505050405050505040505040405040404040404040403
+      0304040403040404030304030303030303030303030303030303030303030303
+      0302030203020202030202030302030202020203020202020202020202020102
+      0201010102010201020101010101010201010101000101000101010101000100
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030303030303030303030302F3030
+      302F302F303030303030302F30302F2F2F2F2F2F2F2F2F2F2F30323232333333
+      3535353636373938393B3A3B3B3B3B2F302F2C2C2D2E2D2E2E2D2D2D2D2D2D2D
+      2D2D2D2D2E2E2F3534343434353435353535343435353232312E2E2D2C2C2C2C
+      2C2C2C2C2C2C2C2C2B2C2B2B2B2C2C2B2B2B2B2C2B2C2B2D2C2C3434343B3B3B
+      3C3D3D3B3C3B3B3C3B3C3B3B3B3B3B3B3B3B3A3A3A3A3A3A3738373231322C2C
+      2C2A2B2A2B2C2B2F2F2F32323232323132323233333234343436353536363638
+      3737383838303030282828272828282728272728272728272728272628262728
+      2726282E2D2C2E2D2C2D2D2C2D2C2C2D2C2C2D2C2C2D2C2C2D2C2C2D2C2C2D2C
+      2C2C2C2B2C2C2C2C2B2B2B2C2C2B2B2B2B2B2C2B2B2B2B2B2B2B2B2B2B2B2B2B
+      2A2B2B2B2A2A2A2A2A2A2A2A2A2A292A2A29292A29292929292A282929292828
+      2928292828282829282828282828282828282828282728272727272827272727
+      2727272726272727262626262627272626262625262625262525252526262526
+      2525252525252524252424252424252424252323242323242323242323232322
+      2322222322222322222221222222222222212122212121212121212121212021
+      21202021202121202020202020201F20202020201F1F201F201F1F1F1F1F1F1F
+      1E1F1F1F1F1E1E1E1E1E1E1E1E1E1E1E1D1E1E1E1D1E1D1D1D1D1D1E1D1D1D1D
+      1D1C1C1C1D1D1C1D1D1C1C1D1C1C1C1C1C1C1C1B1C1C1B1B1B1B1B1B1B1B1B1B
+      1B1B1B1A1B1A1B1717191717181717171717171818172122223233323737373E
+      3E3E4444443A3A3A141515141414141414141414141413131414131314131313
+      1313131313131313121312121212121212131212131212121112121211121112
+      1111111111121111111111111111101111111010111011101010101010101010
+      10100F100F0F0F100F0F0F0F0F0F0F0F0F0E0F0F0F0F0F0E0F0E0F0E0E0E0E0E
+      0E0E0E0E0D0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0C0C0C0D0D0C0C0D0C0C
+      0C0C0C0C0C0C0C0C0C0C0B0B0C0C0C0B0B0C0B0B0C0C0B0B0B0B0B0B0B0B0B0B
+      0B0B0B0B0A0A0A0A0B0A0A0A0A0A0A0A0A090A0A09090A0A0A0A090909090909
+      0909090908090909090809090909080908080809080808080808080808070808
+      0707070708070807080707070707070707070606070706060706060607060606
+      0606060606060606060606060606050606060506050505060505050505050505
+      0504050504050504040504040405050404050404040404040404040404040304
+      0404040404030403030404040303030303030303030303030303030303020203
+      0203020303030203020202020202020202020202020202020202020202010202
+      0102020201010101020101010101010101010101000000010100000101000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030302F2F30302F2F3030302F2F30302F32323233333435353537373739
+      39393B3B3B3B3B3A3030302D2D2D2D2D2D2D2D2D2D2D2D2D2D2E2D2E2D2F2F2F
+      3534343535343435353535353534343434353434353434343231312E2D2D2C2C
+      2C2C2C2C2C2C2C2C2C2B2C2C2C2B2B2B2B2B2B2B2C2C2B2B2B2C2C2C3434343B
+      3B3B3D3C3D3C3B3C3B3B3B3B3B3C3B3B3B3A3A3A393939383838363636313030
+      3333333333333333333433343433343435353535353738383737373131312929
+      2A2828282828292728292727282728292727282727292727282727282928292D
+      2D2C2D2D2D2D2D2C2D2D2C2D2C2C2D2C2C2D2C2C2D2C2C2D2C2C2D2C2C2C2C2C
+      2C2C2B2C2C2C2C2C2C2B2B2C2B2C2B2B2B2B2B2B2B2B2B2B2B2A2B2B2A2A2B2A
+      2A2A2A2A2A2B2A292A2A2A2A2A29292A2A292929292929292929292929292928
+      2928292928292828282828282828282828272827272728282728272727272727
+      2627272626272726262726262726262626262626262626252625252525252525
+      2525252525242425242425242424232324232324232323232324232323222223
+      2222232222222222222222222222212122212221222121212121212121212121
+      20202120202020202020202020202020201F1F20201F1F1F1F1F1F1F1F1F1F1F
+      1E1E1E1F1F1F1E1E1E1E1E1E1E1E1D1E1E1E1E1D1E1D1E1D1D1D1D1D1D1D1C1D
+      1D1D1C1C1C1D1D1C1C1C1C1C1C1C1C1B1C1C1C1C1C1B1B1B1B1B1B1B1B1B1B1B
+      1A1B1A1817181817171717171717171919192625263333323939393F3F3F4444
+      442E2D2D15151415151414141414151414141414141413141413141313141313
+      1314131313131313131313131312121213121212121212121112121211111212
+      1211111111111111111111111010111010101010101010101010101010101010
+      10100F100F0F0F0F0F0F0F0E0F0F0F0F0F0F0E0F0E0E0F0E0F0E0E0F0E0E0E0E
+      0E0E0E0E0E0D0D0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0C0C0D0C0C0D
+      0C0D0C0C0C0C0C0C0C0C0C0C0B0C0C0B0B0B0B0B0B0B0B0B0B0B0B0B0B0A0B0B
+      0B0B0A0B0A0A0A0A0A0A0A0A0A090A0A09090A09090A09090A0A0A0909090909
+      0909090908080808080809090908080809080808090808070807080707080808
+      0707080808070708070807080707070707070706070607070707070606070606
+      0606070606060606050506060606050505060505060605050505050505050505
+      0505050505050504050405040505040405040404040404040404040403040404
+      0404040404040403030403030303040303030303030303030303030202030303
+      0202020203030303030202020302020202020202020202020202020202020202
+      0102010101010101010101010101010100010000010100000001000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303030303030303030303030302F
+      2F3030302F3030302F302F303132323334343534353737373939393B3B3B3B3B
+      3B3030302D2D2D2E2E2E2E2E2E2D2E2D2E2D2D2D2E2D30313036353535353535
+      35353534353535343535353434353535353434343434333434333131312D2C2D
+      2C2C2C2B2C2C2C2C2B2C2B2C2B2C2B2B2B2B2B2B2C2B2B2B2A2B2B2C2C2C3334
+      343D3D3C3D3D3D3B3B3C3C3C3B3A3A3A3A3A3A39393938373836373735363635
+      353535363536363636363637363738383833333229292B272828282829282829
+      2728292828292827282728282728292728282727292928292C2C2B2D2D2D2E2D
+      2C2E2D2D2D2D2C2D2C2C2D2C2C2D2C2C2D2C2C2D2C2C2D2C2C2D2C2C2C2C2C2C
+      2C2C2C2C2C2B2B2C2C2B2C2B2B2B2B2B2B2B2B2B2B2B2B2A2A2B2A2A2A2A2A2A
+      2A2A2A2A2A2A2A292A292A2A292A292929292A292A2929292929292928292828
+      2929282928282928282828272828282828272727282727272727272727272727
+      2727262727272626262726262726252626262626262625252525252525252525
+      2525252524242524242523242524232423242423232423222322222322222322
+      2323222222222222222222212221212121222221212121212121202020202120
+      2020202120202020202020201F201F1F201F1F1F1F1F1F1F1F1F1F1F1F1F1E1F
+      1E1E1E1F1E1E1E1F1E1E1E1E1D1D1E1E1E1E1D1D1E1E1D1D1D1D1D1D1D1D1D1D
+      1D1C1C1D1C1C1D1C1D1C1C1C1C1C1B1B1B1C1C1C1B1C1B1B1B1B1B1B1B1B1B18
+      1818171818171717181717191A192A2A2A3534353A3B3B404040454545282828
+      1514151415151414151515141414141414141414141314141413131313131313
+      1313131312121313121312131212121213121212121212121211121112111111
+      111111111110111111101111111110111010101010101010101010100F101010
+      0F0F0F0F0F0F0F100F0F0F0F0F0F0F0E0F0F0F0F0F0E0E0E0E0E0F0E0E0E0D0E
+      0E0E0E0E0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0C0C0D0D0D0C0D0D0C0D0C
+      0D0C0C0C0C0C0C0C0B0C0B0C0C0B0B0B0B0B0B0B0B0B0B0B0B0B0B0A0A0A0B0A
+      0A0A0A0A0B0A0A0A0B0A0A0A09090A0A090A0A0A09090A090909090909090909
+      0909090909090908090808090908080808090808080808080808070808070708
+      0807070707070708080707070707070707070707070606060706060606060607
+      0606060606060605060606060505060505050606050505050505050505050505
+      0505050505050505050505050405050504040404040404040404040404040404
+      0404030403030304040303030403030303030303030303030303030203020203
+      0202020303030302030202030202020202030202020202020202020101020101
+      0101010102010201010101010101010100010001000101000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030302F3131313333333434353636373838383A3A3A3B3B3B3030302D2D2D
+      2E2E2E2E2E2E2E2E2E2E2D2E2D2E2D3031313635363535353535353535353535
+      353534353535353535353435353535353534333434333434333433333030302C
+      2C2D2C2B2C2C2C2C2C2B2B2C2C2C2C2C2B2B2B2B2B2B2B2B2B2A2B2B2B2D2C2D
+      3536353C3C3D3B3B3C3B3B3B3A3A3A3A3A3A3939383838383838383737383737
+      373838383838383535352D2D2D28272829292928282928292929282928282928
+      28292728292828292829282A2A2B2D2E2D2E2E2D2E2E2D2E2D2D2D2D2D2E2D2C
+      2D2D2C2E2C2D2D2C2C2D2C2C2D2C2C2D2C2C2D2C2C2D2C2C2C2C2C2C2C2C2C2C
+      2C2C2B2C2C2C2B2B2C2B2C2B2B2B2B2B2B2B2B2B2B2B2B2B2A2A2B2A2A2A2B2A
+      2A2B2A2A2A2A2A2A2A292A2929292A29292929292A292A292929292929282929
+      2829292828282828282828272727282828272728282828272728272726272727
+      2727262627272726262726262626262626262626262526262525252525252525
+      2424252424242424242423242324242323242323232223232223232323232222
+      2322222222222222222121222122212221212121212121212121202020212021
+      202121202020201F201F1F20202020201F201F1F201F1F1F1F1F1F1F1F1E1F1E
+      1F1F1F1E1E1E1E1E1E1E1E1D1D1E1D1E1E1E1E1E1D1D1D1D1D1D1D1D1D1D1C1D
+      1C1D1C1C1C1C1C1C1D1C1C1C1B1C1C1C1B1C1B1C1B1B1B1B1A1B1B1818181818
+      181817181717171A1B1A2D2E2D3535353B3B3B41404147474723222215151515
+      1515151414151415151515141414141314141414131314131314131313131313
+      1313131313131312131212131213121212121212121212121211111111111111
+      11111111111111101111111011101111101110101010101010100F1010101010
+      0F0F100F100F0F0F0F0F0F0F0F0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0D0E
+      0E0E0E0E0D0E0E0E0D0D0D0D0D0D0D0D0C0D0D0D0D0D0C0D0C0C0D0C0D0C0C0C
+      0C0C0C0C0C0C0C0C0B0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B0A0B0B0B0A0A0A
+      0B0B0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0909090A09090A0909090A09090909
+      0909090809090809090908080808090808080908080708080708080808080707
+      0807080807070807070707070707060707070706070706070706070606060606
+      0607060606060506050606060506050606060605050505050505050505050505
+      0505050504050405050404050404040404040404040404040404030404040403
+      0403040404030304030303030303030303040303030303030303030302030302
+      0303030203020302020202020203020202020202020202020202020201010101
+      0201010101010101010101010101000001010000010000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030303030303030302F2F30303131
+      313433343535343737373838393B3A3A3C3D3C3131312E2D2D2E2E2E2E2E2E2D
+      2E2E2E2E2D2E2D2E313031353636353535353535353536353535353635353534
+      3535343535343435353534353534343434333434343433333433333333333030
+      302C2C2D2B2C2B2C2B2C2C2B2B2B2B2B2B2C2B2B2B2B2A2B2B2A2B2B2A2B2A2C
+      2C2D3635353C3B3B3B3B3C3B3B3B3A3A3A3A3A393839383938383A3A39383839
+      3130302828282928292928292928292929292828292828292828292828292929
+      292C2B2C2E2E2D2E2E2E2E2E2E2E2E2D2E2E2D2E2D2D2E2D2D2D2D2C2D2D2D2D
+      2D2C2D2C2C2D2C2C2D2C2C2D2C2C2D2C2C2D2C2C2C2C2C2C2C2C2C2C2C2C2C2C
+      2B2C2C2B2B2C2B2C2C2B2C2B2B2B2B2A2B2B2B2B2B2B2B2B2B2A2B2B2A2A2A2A
+      2A2A2A2A2A292A2A2A2929292A29292A29292929292929282928292829292929
+      2828282828282828282828282827282827272827272728272727272727272727
+      2727262627272727262626262626262626252525252525252525252525252524
+      2425242425232324232424232324232324232223232224222323232223222222
+      2222222222212222212122212221212122212121212121202021212120202020
+      202020202020202020201F20201F1F1F201F201F1F1F1F1F1F1E1E1F1F1F1E1E
+      1E1E1E1E1E1E1E1E1E1E1E1D1E1D1E1E1D1D1D1D1D1D1D1D1D1D1D1C1C1D1D1C
+      1C1D1C1C1C1C1D1D1C1C1C1C1C1C1B1C1B1C1B1C1B1A1A181819181818181818
+      1818191C1C1B3030303636363C3C3B4141424747461918181516151515151515
+      1414151414151414141414141414141413131414141413141313131313131313
+      1313131313131312131212121213131312121212121212111211111212111111
+      1111111011111111101010111011101010101010110F1010101010100F0F100F
+      100F0F0F0F0F0F0F0F0E0F0F0F0E0F0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D
+      0E0E0E0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0C0D0C0D0D0D0C0C0C0C0C0C0C0D
+      0C0C0B0B0C0C0B0B0C0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0A
+      0B0A0B0A0A0A0B0A0A0A0A0A090A090A090A0A090A0909090909090909090909
+      0909090909080808080908090908080808080808080808080708080808070807
+      0808080707070807070707070707070707060706060607070606070606060606
+      0606060606060606060505060605050605050605060505050505050505050505
+      0504040505050504050405040505040404040404040404040404040403040404
+      0304030303030303030403030303040303040203030303030202030303020302
+      0303020302020203020202020202020202020202020202020101010101010101
+      0101010101010101010101010101010000000100000001000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000030303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030313030343433353535
+      3637373938393B3B3B3D3D3D3333342D2D2D2E2E2E2E2E2E2E2E2E2E2E2E2D2E
+      2E31313136353636363535353535353536363535363535363535353535353534
+      3534353435353535343434343434343433353433343333343333333333323333
+      30302F2C2B2C2C2B2C2B2B2B2B2B2B2C2B2B2B2B2B2B2B2A2A2B2A2A2B2B2B2A
+      2B2C2D2D3535353B3B3B3B3B3B3B3B3B3A3A3B3B3B3B3433332A292A29292A29
+      2A292A292929292928292929282928282928282929292A2C2C2C2E2E2E2F2F2F
+      2F2F2F2F2E2E2E2E2E2F2E2E2F2E2D2E2E2D2E2D2D2E2D2D2E2D2C2D2D2D2D2C
+      2C2D2D2C2D2C2C2D2C2C2D2C2C2D2C2C2D2C2C2C2C2C2C2C2C2C2C2C2B2C2C2C
+      2C2C2C2C2C2B2B2C2C2B2B2B2B2B2B2B2B2B2B2B2B2A2A2A2A2B2B2B2A2A2A2A
+      2A2A2A2A2A2A2A292A2A2A2A29292A2A29292929292929292829292829282928
+      2828282828282828282828282828272727272827282727272827262726272727
+      2626262726262626272626262626252525252525262525252525262424252424
+      2524232424242423242423232423232423232422232323232322232322222223
+      2222212222222222212121212121212121212121212121212021202020202020
+      20202020202020202020201F201F1F1F1F1F1F1F1F1F1F1E1F1F1F1F1F1E1E1E
+      1E1E1E1E1E1F1E1E1E1E1D1D1E1E1D1D1D1D1D1E1D1D1D1D1D1C1C1D1C1D1C1C
+      1D1C1C1C1C1C1C1C1C1C1C1C1C1B1C1B191A191918191818181817181918191F
+      1F1E3232313737373D3D3D434342444443161516161615161615151515151414
+      1415151414151414141415141414141414131414141414141314141313131313
+      1212121312121212131312121312121212121211121212121111121112111111
+      1111111110111111101011101010101010101010101010101010100F10100F0F
+      0F0F0F0F100F0F0F0F0F0F0E0F0E0F0F0E0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0D0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0C0D0D0C0C0D0C0C0D0C0C0C0C0C
+      0B0C0C0C0C0B0C0C0C0B0C0C0B0B0B0B0B0B0B0B0B0B0B0A0B0B0A0A0A0B0A0A
+      0A0A0B0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0909090909090909090909090909
+      0909090808080808080809080808080808080808080808080807080808070807
+      0807080807070707070707060707070707060707060607060606060606060606
+      0606060605060606050606060506050505050505050605050505050505050405
+      0504050504050504050504040404050404040404040404040403040403040404
+      0404040303030304030303030303030303030302030303030203020303030303
+      0303030302030202020203020202020202020202020201020101020201010102
+      0101010101010100010101010100000100010000000100000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000003030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303131313333333434343636363838383B
+      3A3B3C3C3D3434342E2D2D2E2E2F2E2E2E2E2E2E2E2E2E2E2E2E313131363635
+      3636363635363635363636363536353535363535353535353535353535353535
+      3535353435353434353435343434343335343334333334333334333333333332
+      33332F30302C2C2C2B2B2B2C2B2C2B2B2B2B2B2B2B2B2B2B2A2B2B2B2B2A2B2B
+      2B2A2B2D2C2D3535353C3C3C39393A2F2E2F2929292A29292A29292A2A29292A
+      292A29292929292829292929292C2B2C2F2F2E2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2E2E2E2E2F2E2E2F2E2D2E2E2D2E2D2D2E2D2D2E2D2C2E2D2C2D2D2C2E2C2C
+      2D2C2D2D2C2C2D2C2C2D2C2C2D2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2B2C2C
+      2C2C2C2B2B2B2B2C2B2B2B2B2B2B2B2B2A2A2B2B2A2A2A2B2B2A2A2A2A2A2B2A
+      2A2A2A2A2A2A2A2A292A292A2A29292929292929292929292929292829292929
+      2928282828282828282828282828272727272727272727272727272727262727
+      2727262726262626262626262526262525252525252525252525242425242425
+      2324242324242323242323242323242323242223232222232322222222222222
+      2222222122222122222221212222212121212121212120202121212120202020
+      211F20201F2020201F1F201F1F201F1F1F1F1F1F1F1F1F1F1F1E1F1E1E1F1F1E
+      1E1E1E1E1E1E1D1E1E1E1E1D1E1E1E1D1E1D1D1D1D1D1D1D1C1D1D1C1C1D1C1D
+      1C1C1C1C1C1C1C1C1C1C1B1B1A191A191818181818181818191919201F203333
+      323838383D3D3D4343433A3B3A16161615161516151616161615151515151514
+      1514141414141514151514141414131314141313131314131314131313131313
+      1312131213121312121213121212121212121212111112121111111112111111
+      111111101110111110111111111010101010110F101010101010100F100F0F0F
+      0F0F0F0F0F0F0E0E0F0E0F0F0F0E0F0E0E0E0F0E0E0E0E0E0E0D0E0E0E0E0E0E
+      0D0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0C0C0C0D0C0C0C0C0C0C0C0C0C
+      0C0B0C0B0B0C0C0B0B0C0B0B0B0B0C0B0B0B0B0A0B0B0B0A0A0B0A0B0B0A0A0A
+      0A0B0A0A0A0A0A0A0A0A0A0A0A09090A0A090A090A09090A0909080909090909
+      0809090809080908080809080808080808080708080808070708080707070708
+      0707070707070707070707060707060706060707070707060606060606060606
+      0505060606060506060606050506060505050605050505050505050505050405
+      0504040505040504050504040405040504040404040404040403040304040404
+      0303030404040303030303030403030303030302030303030302030303030202
+      0203020302030302020202020202020202010201020201020102010201010101
+      0101010101000100010101010001010000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303333333434343635363838383A3A3A3C3C3C3838
+      382D2D2E2F2F2E2E2E2F2E2E2E2E2F2F2F2F2E2F2F3036363636363636363635
+      3636363635353536363536363636353535353535353535353535353535343435
+      3535343535343434343534333433333433333434343433333333333333333333
+      33333332302F302C2B2C2B2B2B2B2B2B2B2B2B2B2A2B2B2B2B2B2B2A2A2B2A2B
+      2B2A2A2A2A2C2C2D2B2B2B2A2A292A2A29292A2A29292A2A2A2A2A29292A2929
+      2929292B2B2B2F2F2F302F30302F2F2F2F2F2F2F2F2F302F2F2F2F2F2F2F2E2E
+      2E2F2F2E2F2E2E2F2E2E2E2E2D2E2D2D2D2D2D2E2D2C2D2D2C2D2C2C2D2C2D2D
+      2C2C2D2C2C2D2C2C2D2C2C2D2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2B2C2B
+      2C2B2C2B2C2B2B2B2B2B2B2B2B2B2B2B2B2A2B2B2B2A2A2A2A2A2A2A2A2A2A2A
+      2A2A2A2A2A2A2A2929292A2A2A29292929292929292929292929282928282928
+      2828282828282828282728272828272727272728272827272727272626262726
+      2626262726262626252626252525252625252525252524242524242524242424
+      2324242424242324232324232424232323232223232222232322222222222322
+      2222222222222221212122212121212121212120212121212120202120202020
+      2020201F201F1F2020202020201F1F1F1F1F1F1F1F1F1E1F1F1F1F1F1E1F1E1E
+      1E1E1E1E1E1D1E1E1D1E1E1E1E1E1E1D1D1E1D1D1D1D1D1D1D1D1D1C1C1C1D1C
+      1C1C1C1D1C1C1C1C181919181919181819191918191919242425333332393939
+      3E3D3D4243423131311616161616161515151615151516151514151515151514
+      1515141514141514141413141414141414131413141413131413131313131313
+      1313131212121312121312121212121212111212121112111112121111111111
+      10111110101010101010101010101010101010101010100F0F0F1010100F0F0F
+      100F0F0F0F0F0F0F0F0F0E0F0E0E0E0E0E0E0E0E0E0E0D0D0E0E0E0E0D0E0E0D
+      0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0C0D0D0D0C0C0C0C0C0C0C0C0C0C
+      0C0B0C0B0C0B0B0B0B0B0C0B0B0C0B0B0B0B0B0B0B0B0B0B0B0A0B0A0A0A0A0A
+      0A0A0A0A0A0A0A0A0A090A090A090A0A09090909090909090909090808080808
+      0909080908090908080808080808080808080808080708070808080707070808
+      0707080707070607060607070606070707060707060606060706060606060606
+      0606060505050606050506060506060505060505050505050505050504050505
+      0505050404040405040404040404040404040404040404030304040303030303
+      0404030303030303030303030303030303030302030303030302020202020302
+      0302020202020202020202020202020201010202020201010102010101010101
+      0101010101010101000101000000000001000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303232323434343636363838383A3A3A3C3C3C3837382E2E2E2E2F2F
+      2F2F2E2F2F2F2F2E2E2E2E2E2F2F303636363636363636363636363636363636
+      3636353636353535363635353635353535363536353535353535353535353535
+      3534343433353433343434343333343333343333343333333333333333323332
+      33323233323230302F2C2C2C2B2B2B2B2B2B2B2B2B2B2B2B2B2A2B2A2B2B2A2B
+      2B2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A29292A2A29292A2B2B2E2E2E30
+      3030303030302F30302F2F2F2F302F2F2F30302F2F2F2F2F2F2F2F2F2E2F2F2E
+      2F2E2E2E2E2E2E2E2D2E2D2D2E2D2D2E2D2D2E2D2D2D2D2C2D2C2C2D2C2C2D2C
+      2C2D2C2C2D2C2C2D2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2B2C2B2B
+      2C2C2B2B2B2B2B2B2B2B2B2B2B2B2A2B2A2A2B2B2B2A2A2B2B2A2A2A2A2A2A2A
+      2A2A2A2A2A2A2A2A2929292A292A292929292929292829292928282828282828
+      2828282828282827282827272728272828272727272727272727272727262726
+      2726262626262625262625252525252525252524262424252424252424252424
+      2424242423242423232423232323232323222323222222222222222222222222
+      2222222222212122212121212120212121212121212120212020202021212020
+      20201F2020201F1F20201F1F1F201F1F201F1F1F1F1F1F1F1F1F1F1E1E1E1E1F
+      1E1E1E1E1E1D1E1E1D1D1E1E1E1D1E1D1D1D1D1D1D1D1D1D1D1D1D1C1D1C1C1C
+      1C1C1C1C191919191919191919191818191A1A2727273232323737373C3C3B41
+      42422A2A2A161616161616151616161616151516151515151515151515141415
+      1514151414141414141414141414131313141314131313131313141313131213
+      1213131213121212121212121212121212111111121212111111121111111111
+      101110111110111011101110101010101010101010101010100F0F100F100F0F
+      0F0F0F0F0F0F0F0F0F0F0E0F0F0E0F0E0E0E0E0E0E0D0E0D0E0E0E0D0E0E0D0E
+      0E0D0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0B0C0B0B0B0B0B0B0B0B0B0B0B0A0B0B0A0B0A0B0A0B0A0B0B0A0B0A0A0B
+      0A0A0A090A0A0A0A090A0A0A0A0A0A0909090909090909090909090908090908
+      0909090909080808080808080808080808080807080707070808080807070707
+      0707070707070707070707060606060606060607060606060607060606060606
+      0606060606060506060606050506050505050505050505050404050505040405
+      0405040404040405040404040404050404040404040304040404040303030404
+      0303030303040304030303040304030303030303030302030302020302020203
+      0202020202020302020202020202010201020201010201010101010001010101
+      0101010001010100000101000001000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303232
+      323434343535353737373A3A3A3C3C3C3B3B3B2F2F2F2F2F2F2F2E2F2F2F2F2E
+      2F2E2E2E2F302F31363636363636363636363736363636363636363636363635
+      3636363535353635363535353535353535353535353535353535353535353534
+      3434343334343435343334343334343334333333333333323333323332323332
+      32323333323233322E2E2E2C2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2A2A2A
+      2A2B2A2A2A2A2A2A2A2A292A292A2A2B2A2A2E2E2E3131313131303030303030
+      303030303030302F302F2F2F302F2F2F2F2F2F302F2F2F2F2F2E2E2E2F2F2E2E
+      2E2E2E2E2D2E2D2D2E2E2D2E2D2D2D2D2D2D2C2D2E2D2D2D2C2D2D2C2C2D2C2C
+      2D2C2C2D2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2B2C
+      2C2B2B2B2B2C2B2B2B2B2B2B2B2B2A2B2A2A2A2A2A2B2B2A2A2A2A2B2A2A2A2A
+      2929292A2A292929292929292929292929292929282929292928292928282828
+      2828282828282827282727272827282727272727272727272727272726262726
+      2626262526262526252525252526252526242425242425242425242424232424
+      2423242323242324242323232323232222232223222222222222222222222222
+      2122212122222122212121212121212121212121202021212020202020202020
+      201F201F1F20201F20201F1F1F1F1F1F1F1F1F1F1F1F1F1F1E1E1F1F1F1F1E1E
+      1F1E1E1D1E1E1E1D1E1E1D1D1E1E1E1D1D1D1D1D1D1D1D1D1C1D1C1C1C1B1B1C
+      19191918191919191918191919191A2A29293132313636363B3B3B3F3F3F2121
+      2117161616161616161615161516161515151515151515141514151514141515
+      1515151414141414141413131414141313131313131314131313131313121313
+      1313131212131212121212121212111212111112121111111111111111111111
+      111111111011111110101110101010101010100F100F0F0F100F0F0F100F100F
+      0F0F0F0F0E0E0F0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0D0D0E0D0E
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D0C0C0D0C0C0C0C0C0C0C0C0B0C0C0C
+      0B0B0C0B0C0B0B0C0C0B0B0B0B0B0B0B0A0B0B0B0B0A0B0B0B0A0A0A0B0A0A0A
+      0A0B0A0A0A090A0A0A090A090A09090A09090909090909090909090809080908
+      0808080908080808080808080808080808080807070807070708070807070807
+      0707070707070707070707070707070606060706060607060606060606060606
+      0605060605060605050505050505050505050505050505050505040505040505
+      0405050404040405040504050404050404040303040404030303040404030304
+      0304030303030304030303030303030303030203030303020202030202020202
+      0303020202020202020202010202020202010202010101010101010101010101
+      0101010000000001010000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030313131343434353535
+      3737373939393B3B3B3C3C3C2F2F2F2E2E2E2F2F2F2F2F2F2F2E2F2F2F2F2F2F
+      2F35353537363637373636363636363636363636363636353636363636363635
+      3635363635363636353636353535353535353635353535353535353534343434
+      3534343434343433333433333433333333333333333333333233333333333332
+      323333333332323131322E2E2E2B2B2B2A2B2B2B2A2B2B2B2B2B2A2A2B2A2A2B
+      2B2A2A2A2B2A2A2A2C2C2C302F30313131313130303130303031303030303030
+      30303030303030302F2F30302F30302F2F2F2F2F2F2F2E2E2F2F2E2F2E2E2F2E
+      2D2E2E2D2E2D2E2E2D2D2E2D2D2E2D2D2E2D2C2E2D2D2D2C2C2D2C2C2D2C2C2D
+      2C2C2D2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2B2C2C2B2B
+      2B2B2C2B2B2B2B2B2B2B2B2B2B2B2A2A2B2A2A2A2A2B2A2A2A2A2A2A2A2A2A29
+      2A292A2929292929292929292929292929292828282829292929282928282828
+      2828282728282828282728272727272827272727262727272726272726272625
+      2626252625252625252625252625242525252524252524242424242423242423
+      2424232324232323232323232323222223232222222222222222222222222222
+      2222222121222121212121212121212121212121202121202020202020201F20
+      2020202020201F1F201F1F201F1F1F1F1F1E1F1F1F1F1E1F1E1E1E1E1E1E1E1E
+      1E1E1E1E1E1E1D1E1D1E1E1E1E1D1D1D1C1D1D1D1C1D1C1D1D1B1B1C1A191919
+      1919191919191819191A192C2C2C3131323434343838383B3B3B1C1B1B161616
+      1717161616161616161616161616161515161615151515141515151415151515
+      1514141414141414141414131314131313131413131313131313131212131312
+      1312121313121212121212121212111112121211111111111111111111111111
+      101110111111101111101010101010100F101010100F0F0F0F0F100F0F0F0F0F
+      0F0E0F0F0F0F0E0F0F0E0F0E0F0E0E0E0F0E0E0E0D0E0E0E0E0E0D0E0D0D0D0D
+      0D0E0E0D0D0D0D0D0D0C0D0D0D0D0C0C0D0C0C0C0D0D0C0C0C0C0C0C0C0B0C0B
+      0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0A0B0B0A0A0A0A0A0A0A0B0A0A
+      0A0A0A0A09090A09090A09090909090909090909090909090908090909090908
+      0909090808080908090808080808070808070808070707070708080708080707
+      0707070707070707070607070607060607070706060607060606060605060606
+      0605060505060506050505050505060505050505050504050405050405040504
+      0404050404040405040404040404040404040404040404040404040303040304
+      0303030303040303030303030303030303020303030202030202020202030203
+      0202020302020202020202010101010202010101010101010101010101000101
+      0101000001000000000100000000000001000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303131313333333434343636363939393B
+      3B3B3D3D3D3131312E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2E2F30363635373736
+      3736363736363636363636363636363636363636363636363536363636363635
+      3636353535353535363635363536353536363535353535353535343335343435
+      3434343434353433343333343333333333333333333233333333333333323332
+      3333323232323232323131312E2E2E2B2B2B2B2B2A2B2A2B2A2B2A2A2A2A2C2A
+      2B2F2F2F31313131313131313130313130313030303030303030313030303030
+      302F3030302F2F302F30302F2F2F2F2F2F2F2F2F2F2F2E2F2E2E2F2E2E2F2E2E
+      2F2D2D2F2D2D2E2D2D2E2D2D2E2D2D2D2D2D2E2C2C2D2D2D2D2C2D2D2C2C2D2C
+      2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2B2C2B2C2B2B2B2B2B2B2C
+      2C2B2B2C2C2B2B2B2B2B2B2B2B2B2A2B2B2B2B2A2A2A2A2A2A2B2A2A2A2A2A2A
+      2A2A2A2929292929292929292929292829292928282828292928292828282828
+      2828282827282727282728282727282727272727272726272627272626262627
+      2625262525262525262525262524252425252524252424242324242424242424
+      2424242323232323232323232323222322232322222222222222222222222222
+      2222212121212121212121212121212121202021212120202020202020202020
+      202020201F1F201F201F1F1F1F1F1F1F1E1F1F1F1F1F1F1F1F1E1E1E1E1E1E1E
+      1E1D1E1E1E1D1E1D1D1D1D1D1E1D1D1D1D1D1D1C1D1B1A1B19191A1919191919
+      191919191C1C1C2D2C2D2F2F303231313434343737372C2C2C19191916171617
+      1616161616161615161516151515161515151615151515151515151414141415
+      1415141414141414131414141314131413141314131313131313131213121313
+      1212121313131312121212121211121112111211111111111111111111111111
+      1110101011111110111110101010101010100F1010100F0F0F0F0F0F0F0F0F0F
+      0F0F0F0F0F0F0F0E0E0E0E0F0E0E0F0E0E0E0E0D0E0E0D0D0E0D0D0D0E0D0D0D
+      0E0D0D0D0D0D0D0D0D0C0D0C0D0C0C0C0D0D0C0C0C0C0C0D0C0C0C0C0C0C0B0C
+      0C0C0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0A0B0A0A0A0A0B0A0B0A0A0A
+      0A0A0A0A0A090A0A0A09090A09090A090A0A0909090909090809090909080808
+      0908080808080909080808080807080808080808080808070807070807070707
+      0707060706070607070707070607060607060706060607060606060606060506
+      0506060605060505050505060605060605050505050405050505050504040405
+      0505040404040504040404040404040303040403030304040403030403040304
+      0303030403030303030303030303030303020303030303030302020202020202
+      0202020202020201020101010202020101010102020101010101010101010101
+      0100000101000000010001000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303333333434343636363838383A3A3A3D3D3D3434
+      342E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F34343438363737363637373737
+      3737363636363637363636363636363636363636363636363636363636353636
+      3635363635353635353535353635353535353535353535343434343534343434
+      3435343334343434333434343333333333333333323232333332333332323232
+      32323333333232323232323131312E2E2D2B2B2A2B2A2B2D2C2D313130313232
+      313131313131313131313130313131313131303130303031303030303030302F
+      30303030302F2F302F2F2F302F2F302F2F2F2E2F2F2E2F2E2E2F2E2E2F2E2E2F
+      2D2D2F2D2E2E2D2D2E2D2D2E2D2D2E2C2D2D2C2C2D2C2C2D2D2C2D2C2C2C2C2C
+      2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2B2C2C2C2C2C2C2B2C2C2B2B2B2B
+      2B2C2B2B2B2B2B2B2A2B2A2B2B2B2B2B2B2B2B2B2A2A2A2A2A2A2A2A2A2A2A2A
+      292A292A292A292A292929292929292929292928282928282929282828282828
+      2828282728272827272828272728272727272727262627262626262626262626
+      2526252526252526252525242525242425252424242424242324242424232424
+      2424232323232323232323232223232223222222232322212222222222212122
+      2221212221212121212121212121212120212120212021202120202020201F1F
+      201F1F1F2020201F1F1F1F1F1F1F1F1E1E1F1E1F1F1F1E1E1E1E1E1E1E1E1E1E
+      1E1E1E1D1E1D1E1D1D1D1D1D1D1D1D1D1D1A1A1B1A191A1A1A1A1A1A1A1A1A1A
+      1F1F1F2D2D2D2D2E2E303031323233353535353635302F30191A191817171817
+      1717171617171717171716161616171616161615161616161616161615161615
+      1515151515141515141414141415141414151414141415141414141313141313
+      1413141414131313131312131312131212131213121213121212121212121112
+      1111111010101010111010101010101010100F0F10100F100F0F100F0F0F0F0F
+      0F0F0F0E0E0E0E0F0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0D0D0D0E0E0E
+      0D0D0E0D0D0D0D0D0D0D0C0D0D0C0D0C0D0C0C0C0D0C0C0C0C0B0C0C0C0C0B0C
+      0B0B0C0B0B0C0C0B0B0B0B0B0B0A0B0B0A0A0A0B0B0A0B0A0B0B0B0A0A0A0A0A
+      0A0A090A0A0A090A090A09090A09090A09090909090809090809090909080908
+      0909080809080808080808070708070808080708070808080707070707070807
+      0707070707070707060606060706070706060606070606060606060605060606
+      0606050505050505050505050605050505050505040405050405050404040405
+      0505050404040404040404040404040304040304040403030304030304040303
+      0303040303030303030303030303030303030303030202020202020202020202
+      0202010202020202020202020201010102010101010101010101010101010000
+      0001010000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000030303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303232323434343535353737373A3A3A3C3C3C3838382E2E2E2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F3434343737373837373837373736363736363736
+      3636363636363737363736373636373636363636363636353636363536363635
+      3635353535353536363535353535353535353534353434343434353433353434
+      3533333433343333333333333333333333333333333333333333333333323232
+      3232323232323232323232323230313130303032323231323232313231313231
+      31313131313131313031313131313131313031313030303130303030302F302F
+      3030302F302F302F2F302F2F2F2F2E2F2F2E2F2E2E2F2E2E2E2E2D2F2D2E2F2E
+      2D2E2E2D2E2D2E2E2D2D2E2D2C2D2D2D2D2C2C2D2C2D2D2C2C2D2C2D2C2C2C2C
+      2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2B2C2B2B2C2C2C2B2C2C2C2B2C2C2B
+      2B2B2B2B2B2B2B2A2B2A2A2B2A2B2A2C2B2B2B2B2B2B2B2B2B2B2B2D2C2B2C2B
+      2C2D2B2C2D2B2B2D2B2B2C2B2B2C2C2B2B2C2A2B2A2B2A2929292A2929292929
+      2828282728272727282727272727272726272726272626272625272626262525
+      2625252625252625242524242525242424242424242423242423232423242324
+      2323232423232323232323232323222323222222222222222222222222222222
+      21222121212121212121212121212020212021212120212020201F2020201F20
+      201F202020201F1F1F1F1F1F1F1F1F1F1F1F1F1F1E1F1E1E1F1F1F1F1F1F1F1F
+      1F1E1F1E1E1E1F1E1E1E1E1E1F1B1B1B1B1A1B1B1A1B1B1A1B1A1A1B1C1C1C27
+      26272E2E2E2E2D2E3130303131313232323232322C2C2D1D1D1C181717181717
+      1717171617171616171717171616161616161616161516161615161515161516
+      1515151514151514151414151515141415141514141414141413141414131413
+      1313131313131313131313121313121212121213121312121112121212121211
+      1111111111111111111111111111111010101111111011100F0F0F0F0F0F0F0F
+      0F0F0F0F0F0F0E0E0F0F0E0E0F0E0E0E0D0E0E0D0D0E0E0D0E0D0E0D0D0D0D0D
+      0D0D0D0D0D0D0C0D0C0C0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0B0B
+      0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B0B0B0A0A0B0A0A0A0A0A0A0A0A0A0A09
+      0A0A090A09090909090909090909090909090909090909080809090908080908
+      0908080909080808080808070807070707080807070807070707070707070707
+      0706070607070707060707070606060606060607060606060605060605050606
+      0505050606050506060505050605050505050504050405040505050405040405
+      0405040404040404040404040404040404040404030404040303030303030303
+      0303030303030303030303030302030303030303020203030203020202020202
+      0202020202010202010101010101010101010101010101010101010100010101
+      0001000100000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000003030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303232
+      323434343535353737373939393B3B3B3B3B3B2E2E2E2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F323232373737383737383737383737383636373737373736363636
+      3736373636363636363637363636363636363636363636363636363535353635
+      3635353535363535363535363535353535343435343435343435333435343434
+      3333343334333433333334333333333333333333323333333332323232323233
+      3232323333323232323232323132323232313231313232313131313131313131
+      313131313130313031303131303130313131313030313030303030302F30302F
+      2F2F2F302F2F2F2F302F2E2F2F2F2F2F2E2F2E2E2F2E2E2E2E2E2E2E2E2E2D2E
+      2F2E2E2E2D2D2E2D2D2E2D2D2D2D2C2D2D2D2D2C2C2D2C2C2D2C2C2C2C2C2C2C
+      2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2B2C2C2C2C2B2D2D2D2E2D2D2D2D2D2E
+      2E2E2E2E2E2F2E2E302F2F302E2F2F2F2E2F2F2E2F2F2E2F2F2F2F2F2F2F2E2F
+      2E2E2F2E2E2F2E2E2E2E2E2E2F2D2E2F2E2E2E2D2E2E2E2E2E2F2D2E2E2D2E2E
+      2E2E2D2D2C2B2B2C2C2C2A2A2A29292928282827262626262527252526252526
+      2525262525262524252525252425242424242424242424242423242323242423
+      2323232323232223232323232222222223222222222222222222222122212122
+      212122212121212121212121212021212120212020202020211F201F201F1F21
+      21202020202120202020202020201F2020201F20201F201F1F1F1F1F1F1E1F1F
+      1F1E1E1E1F1E1F1E1F1B1A1B1B1A1B1B1A1B1B1A1A1B1A1B1A1A1A1B1B1B2323
+      232F2F2F2F2F2F2F2F2F3031303131313131312F2E2E1D1E1E18181819181818
+      1818181718181818181717181717171717171717171716171616161716161617
+      1616161616161616161515161516151515151515151515141514151415151514
+      1415141414141413131213121212131212131213121312121213121316161619
+      1A1A1E1D1E212122222222121212111011101010101010101010101010101010
+      100F0F100F100F100F0F0E0E0E0E0E0E0E0E0D0D0E0E0D0D0D0D0D0D0D0D0D0D
+      0E0D0D0D0D0D0D0D0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0B0B
+      0B0C0B0B0B0B0B0B0B0B0B0B0A0B0B0B0B0B0B0A0A0A0A0B0B0A0A0A0A0A0A0A
+      0A090909090A0909090909090909090909090909090909090808090808090809
+      0808080808080808080807080708080808070707070808080807070707070707
+      0707060707070607070607060706070606060606060606060606060606060605
+      0505060506050506050505050505050505050405040504050405040404040504
+      0404040405040404040404040404040404030403040404030304030304040303
+      0403040303030303030303030303030202030302020202020202020202020202
+      0202010201020101010101010101010101010101010101000101000001000100
+      0000010100000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030313131343434353535
+      3636363838383A3A3A3C3C3C3030302E2E2E2F2F2F2F2F2F2F2F2F2F2F2F3030
+      3137373738373738373738373738373738363737373637363737363736373636
+      3636363636363637363636363636363636353635363536353636363636363635
+      3635363536353536353636353535343534343534343433343534343433343434
+      3433343334333333333333333333333333333333323333323232333232323333
+      3232323232323332323232313232313232323132313131323232313131313131
+      3131313131313131303031303131303130303030303031303030302F30302F30
+      2F302F2F30302F2F2F2E2F2F2E2F2E2E2F2E2E2E2E2E2F2E2D2E2E2E2E2E2E2F
+      2D2D2E2D2D2E2D2D2D2D2D2D2D2D2D2C2D2D2C2C2C2C2C2C2C2C2C2C2C2C2C2C
+      2C2C2C2D2D2D2E2E2E2F2E2E302F2F3030302F30303030302F302F302F2F2F2F
+      2F2F2F2F2F2F2F302F2F302F2E2F2F2E302F2E2F2F2E2F2F2F2E2E2F2E2F2F2E
+      2F2F2E2F2F2F2E2E2E2E2E2F2D2D2E2D2E2F2D2E2F2E2D2E2E2D2E2D2D2E2E2E
+      2E2E2D2E2D2E2D2E2E2D2E2E2D2D2D2D2D2D2B2B2B2B2A2B2928292827272625
+      2526252525252525242424252524242424242424232424242423232423232423
+      2323232323222323232223222322222223222222222222222222222222222121
+      2121212121212121212021212121222222222221222121212120212121212020
+      202020212020202020201F20202020201F1F1F1F1F1F201F201E1F1F1F1E1E1F
+      20201F1F1F1D1C1C1C1B1C1C1B1C1C1B1B1B1B1C1B1B1C1C1C1D1C1C1C212222
+      2D2E2E2E2E2E2F2F2E2E2E2E2F2F2F302F302F2F2F1E1F1E1A19191919191919
+      1919191919181918181919181918191818181817181817171718171817171817
+      1717171617171716171716161717161616161616151616161615161615151515
+      1515141414141414131718171919191D1D1E1F20202121202222222221212222
+      232322222323231F1F1F1011111010101110101011101010100F101010101010
+      0F100F0F0F100F0F0F0F0F0F0F0F0F0F0F0E0E0E0D0E0E0E0D0D0D0E0D0D0D0D
+      0D0D0D0C0D0D0C0D0D0C0C0C0C0C0C0C0C0C0C0C0C0C0B0B0C0C0C0C0C0B0C0B
+      0C0B0B0C0B0B0B0B0B0B0B0B0B0B0B0A0A0B0B0B0A0B0A0A0A0A0A0A090A090A
+      090A090A0A09090A0A0909090A09090909090909090908080908080908090908
+      0808080808090808080808080808080708080707070708070707070707070707
+      0706070706070607060606060706060607060606050605060606060505050606
+      0505060506050605060505050505050505050505050405040504040404040404
+      0405040404040404040403040404040303040403030403030304030403030303
+      0303030303030303030303030203020202020303020202020202020202020201
+      0101010102010102010101010101010101010101010001010000000100000100
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303034343435353536363637373739
+      39393B3B3B3333332E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F30373736383837
+      3837373837373837373837373837373737373736363737363736373737373637
+      3636373636363737363636363636363636363636363635353636353636353635
+      3635353535363535353534353434353434353434353434353434343333343333
+      3333333333333333333333333333333233333333333333323232333332333232
+      3332323232323332323232323132313231323132313131313131313131313131
+      31313031303131313031313130313131303130303030303030303030302F302F
+      30302F2F2F2F2F2F2E2F2E2E2F2E2E2F2E2E2E2E2E2F2E2E2F2E2D2E2D2D2E2D
+      2D2E2D2D2E2D2D2D2D2C2D2D2D2D2C2C2D2C2C2D2E2D2E2F2E2F2F2E302F2F30
+      302F30302F30302F3030303030303030302F303030303030302F2F30302F2F2F
+      2F2F2F2F2F2F302F2F2F2E2E2F2F2E2F2F2E2F302E2F2F2F2F2F2F2E2F2F2E2F
+      2E2F2E2E2E2E2E2E2E2E2F2E2E2F2E2E2E2D2D2F2E2D2E2E2D2E2E2D2E2E2E2E
+      2E2E2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2C2C2D2C2C2D2C2C2A2A2A
+      2928282626262424252524252424242424242424242424242424232323242323
+      2323232323232322232323222322232222222222222222222222222123232322
+      2322222322222122222221222221212121212121212121202121202121202120
+      20202020202020202021212121212021202020202120212020202020201F2020
+      202021211E1E1E1D1C1D1D1C1D1D1C1D1C1C1C1C1C1D1C1C1D1E1E1E2020202C
+      2D2C2F2E2F302F2F2F2F2F302F303131313030301F1F1F1B1A1A1A1A1A1A1A1A
+      1A1A191919191A191A1919191919191919191918191919191818181818181818
+      18181718181818181818181718171718171617171717191A1A1B1B1C1E1E1E20
+      2120232223232223222322222222232423232323232323232323242324242524
+      2625262828281A1A1A111212121212111010101010101111101010101010100F
+      100F0F0F100F100F0F0F0F0F0F0E0F0F0F0E0F0E0F0E0F0F0E0E0E0E0D0D0D0D
+      0D0D0D0C0D0C0D0D0D0D0C0C0C0D0D0C0C0C0C0C0C0C0B0B0C0C0C0C0B0C0B0B
+      0B0B0B0B0B0B0B0B0B0B0A0B0B0A0B0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A090A
+      0A0A0A090909090A090909090909090909090909090908080809080909080808
+      0809080808080808080808080807080708080808070708070707070707070707
+      0707070707060606060606060606060606060606060506060505060606060606
+      0605050506060505050505050504050504050505050405050505040404040404
+      0404040404040404040404040404040404040303030303040403040303030303
+      0403040303030303030302030302020302020303020202020202020101010202
+      0102020101020101010101010101010101010100010101010101000100000001
+      0000000001000000000100000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303131313636363737373838383A3A3A3C3C
+      3C3A3A3A2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F30303038383738383738383738
+      3737383737383737383737383737373737373737363637373736363637363636
+      3636363636363636363636363636363636363635363536353635363536363535
+      3535353535353535353435343435343435343435343334333434343333333434
+      3334333334333333333333333333323333333333333232333232323332333232
+      3233323232323232323232313232323131323231323131313231313131313131
+      31313131303131303130313030313030303030313030302F3030302F2F2F2F30
+      2F2E302F2E2F2F2E2F2E2F2F2E2E2F2E2E2F2D2E2F2D2D2E2E2D2E2E2D2E2D2D
+      2E2D2D2D2D2D2E2E2E2F2F2E30302F2F302F302F2F302F2F302F2F302F2F3030
+      2F30302F30302F30303030303030303030303030302F30302F2F2F2F2F2F2F2F
+      2F2F2F2F2F302E2F2F2E2F302F2E2F2F2E2F2F2E2F2F2F2F2E2F2E2E2E2F2E2F
+      2E2E2E2E2E2E2E2E2E2F2E2E2F2D2E2E2D2D2E2E2E2E2E2D2E2E2D2E2E2D2D2E
+      2D2D2D2D2D2E2D2D2D2E2D2D2C2C2C2D2D2D2C2D2C2D2D2C2D2D2C2C2D2C2C2D
+      2D2C2B2C2C2A2829262726242424242424242424232423232424232323232323
+      2323232222232323222222222324232323232323232323232223232222222222
+      2222222222222221222121212121222121212121212122222221222121222221
+      2222212221212121222222222221222221212121212121212120212121202121
+      202020201F201E1E1E1E1D1E1D1D1D1D1D1E1E1D1D1E1D1D1D1D1D2020202B2C
+      2C2E2E2E2F2F2F2F303030302F3130303031311E1F1E1B1B1B1B1B1B1B1B1A1A
+      1B1A1A1B1A1A1A1A1B1A1B1A1A1A1A1A1A1A1A1A1A1A1A1A1A1919191A191919
+      1817171818181B1B1B1E1F1E2020202323232423242324232324232424242424
+      242424242324232424242424242425242424242425252525242526262727282A
+      2B2A2C2C2D151515121212121111111111111211111111111111101010101010
+      0F100F0F0F100F100F0F0F0F0E0F0F0F0E0E0E0F0F0F0E0E0E0E0E0E0E0E0E0E
+      0E0E0E0E0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0B0C0B0C0C0C0B0C0C0B0B0B0B
+      0B0B0B0B0B0B0B0A0A0B0A0A0A0A0A0B0A0B0A0A0A0B0A0A0A0A090A0A0A0A0A
+      0A090A090909090A0A090A090909090909090808090809090908090808080808
+      0808080908080808080708080807080707070707070807070707070707070707
+      0707070707070707070606060606060606060606060606050506060505050505
+      0606050505050605050505050505050505050504050405040404040405040405
+      0404040404040404040403030404040304040403030404030303030303030303
+      0403030303030303030203030303020202020202020202020101010101020201
+      0202010201010101010101010101010101010001010100010000000001000000
+      0100000100010001000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303434343737373939393A3A3A3C3C3C3D3D3D
+      3232322F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3333333838373838373837373837
+      3738373738373738373737363737373737373737363737363737373736363636
+      3637363637363637363636363636363636353635363635363636353536353535
+      3636353535343534343534343533343534343433343434343333333334343333
+      3434343333333334333333333332333332333233323332333232323232323332
+      3232323232323231323232313132313232313131313132313132313131313131
+      31313131313130313130303030303030303030303030303030302F2F302F2F2F
+      2F2F2F2E2F2E2E2F2E2E2F2E2E2F2E2E2F2D2E2F2E2E2F2E2D2E2F2F2F2F2F30
+      30303030303030302F2F30302F302F2F2F303030302F2F302F2F302F2F30302F
+      30302F30302F3030303030303030302F2F302F30302F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F302E2F2F2F2E2F2F2E2F2F2E2F2F2E2E2E2E2F2E2F2F2E2F2F2F2E2E
+      2E2E2E2E2E2E2D2E2E2E2E2E2E2D2E2D2D2F2E2D2E2E2E2E2E2D2D2E2E2E2D2D
+      2D2D2D2E2D2E2D2D2D2D2D2D2C2D2D2C2D2D2D2D2C2D2C2D2D2C2C2D2C2C2D2D
+      2C2D2C2C2D2D2C2B2C2B29292826262624232424242324232323232323232324
+      2424242324232424242323232324232323232323222323232323232223222322
+      2222222222222323232323222222232222222222222221222323222322232322
+      2322222222222222212222212221222221212121212121212121202021212020
+      20202020201E1E1E1E1D1E1E1D1E1E1D1E1E1D1E1D1D1D1E1D1E1F1F202D2D2D
+      3031313131313131313232323130302F30301F1E1E1B1B1B1B1B1B1B1B1B1B1A
+      1B1B1B1A1B1B1B1A1A1B1A1A1A1A1A1A1A1A1A1D1C1D1F1F1F21212124242426
+      2626262626262626262626262626262626262626262626262626272626262626
+      252525242425242525262525262526262626262626262726292A292E2D2D3031
+      3028282813131313131313121212121211111111111110111111111110111111
+      10101010110F0F0F0F0F0F0E0F0E0E0F0F0F0F0F0F0E0E0E0E0E0E0E0E0E0D0E
+      0D0D0E0E0D0D0E0D0E0C0C0C0C0C0D0C0C0C0B0C0C0C0C0B0B0B0C0C0C0B0B0B
+      0B0B0B0B0B0B0B0B0B0A0B0B0B0A0B0A0A0A0B0A0A0A0A0A0A0A0A0909090A09
+      0A0A09090909090A090909090909080909090808090909080908080808080808
+      0808080808080807080708080707070807080707080707070707070706070707
+      0707060706070706070606060706060606060606050606060605060505050505
+      0605050505050505050505050505050405050405050405040504040404040404
+      0404040404040404040404040304030304030403030303040303030403030303
+      0303030303020302020303030202020202020202020202020201010202010101
+      0102010202010101010101010101010100010001010000010000000001000000
+      0000010000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303737373939393A3A3A3C3C3C3D3D3D3D3D3D2E
+      2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F30373737383837383737383737383737
+      3837373837373737373736373737373737363737373736373736363737373637
+      3736373636363636363636363636363636363636363635353536363535363535
+      3534363434353434353434343434353434343434343334333433333334333333
+      3333333433333333333333323233333333333233333232333232323232333232
+      3232323232323132313232323232313232313131323232313131313131313131
+      303131313130313031313030303031313030303030302F30302F302F2F302F2E
+      2F2F2F302E2E2F2F2E2F2E2E2F2F2F303030312F303030313030303130303030
+      303030302F3030303030302F2F2F2F2F302F2F302F30302F2F302F2F30302F30
+      302F30302F303030303030303030303030302F2F2F2F2F2F2F302E2E2D2E2E2E
+      2D2D2E2D2C2D2C2B2B2B2C2B2B2B2B2C2B2B2B2B2B2A2A2B2A2B2B2B2B2B2C2C
+      2C2C2C2C2D2D2D2F2E2E2E2E2D2F2D2E2E2E2D2E2F2D2E2E2D2D2D2E2D2E2D2E
+      2E2E2E2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2C2D2C2C2D2C2C2D2C2C2D2C2C
+      2D2D2C2D2C2C2C2C2C2D2C2C2B2B2B2828272625262424252424242424242324
+      2423242424242324232423242323232323232323232323242323232323232323
+      2323232323242423232324242323232323232323222223232323222322222222
+      2222222222222222222221212121212223222222222222222221212222212223
+      222221211F1F1F1F1E1F1F1E1F1F1F1F1F1F1F1F1F1F2020202121212E2E2E31
+      32313233323232323232323030302D2E2D1F201F1C1C1D1C1C1C1B1C1C1C1C1C
+      1E1D1D2020202222222424242828282827282827272828272727272828282828
+      2828282828282828282829292929292929292928272828282929282828292828
+      28282726272727272323231F1F1F242323282828292A2A2E2F2E323231333333
+      2121211414141314131413141312131212121212121212111112121111101010
+      101011101010101010100F0E0F0F0F0F0E0F0E0E0E0E0E0E0E0E0E0E0E0D0E0E
+      0E0E0D0D0D0D0E0E0E0D0D0D0D0D0C0C0C0C0C0C0C0C0B0B0B0C0C0C0B0B0B0B
+      0B0B0B0B0B0B0B0A0A0B0B0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A090A
+      0909090A0A0909090A0909090908090908090808090909090809080808080808
+      0808070808080808070807070807080707070708070707070706070707060707
+      0607060607060607070607060606060606060606060506050605060506060505
+      0505050505050505050505050505050404050504040404040404040404040404
+      0404040404040404040404040304030404030303030304030303030303030303
+      0303030203020303030302030203020202020202020202020201020101010101
+      0101010101010101010101010001010100010100000101000001010000000101
+      0001000001000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303333333939393A3A3A3B3B3B3D3D3D3E3E3E3736372F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F32323238383738383738373738373738373738
+      3737383737373737373737363637373736373637373637373637373637363736
+      3636363636363636363636363635353636363535363635353535353635353535
+      3435343435343435343435343435333434343333333334343433333433333333
+      3433333334333333333333333333333333323233323332323232323232323232
+      3232323232323231323232323131323232313131313131313131313130313131
+      3131313131313031303030313030303030302F30302F30302F302F2F302F2F30
+      2E2F2F2F2F30303031302F313130303030303130313130313030313030303030
+      30303030302F302F2F2F2F2F2F302F302F2F302F2F302F2F302F2F30302F2F2F
+      2F2E2E2E2D2D2D2D2C2C2B2B2A2B2B2B29292A2A292929292929292929292928
+      2829292929282829292828292828282828282728272727272627272626272626
+      2726262626262625262727272727272A292A2A2A2A2C2B2A2D2E2E2D2E2E2D2D
+      2E2D2D2D2D2D2D2D2D2D2D2D2C2C2D2C2D2C2C2D2D2D2D2C2C2D2C2C2D2D2B2D
+      2C2C2D2D2C2E2D2E2D2D2D2D2D2D2D2D2C2A2929272626242424242424242424
+      2424232424242424252425242424242323242423242423242424252425242424
+      2424232424232423232323232423232323232323232322222222232324232323
+      2323232323232322232323232324232323232323242424242324242424242323
+      232222212121201F20201F1F2120212020202020202121212221222E2E2F3332
+      32333333313131302F302F2F2F2F2E2E2323242626262828282A29292A2A2A2A
+      2B2B2B2A2A2A2A2A2A2A2A2A2B2B2A2B2A2A2B2A2A2A2B2B2B2B2A2A2A2A2A2A
+      2A2A2A2A2A2A2B2B2B2B2B2B2A2A2A292A292B2A2B2728282524242020211D1D
+      1D1919191818181818181818192A2A2A2C2C2C2E2E2F32323233333432323316
+      1616141414131413141313141314131314131413121212121111111211111212
+      1110101010101010100F0F101010100F100F0E0E0F0E0E0E0E0E0E0D0E0E0E0D
+      0D0D0D0E0D0D0D0D0D0E0D0D0D0D0D0D0D0D0C0C0B0C0C0C0C0C0B0B0B0B0B0B
+      0B0B0B0B0A0A0A0B0B0B0B0B0A0A0A0A0B0A0A0B0A0A0A0A0A0A0A090909090A
+      09090A0909090A0A090909090908090909080808090908080908080809080808
+      0808080708080808080707070707070707080707070707070707070607070606
+      0707060607070706070606060606060506060606060506060606060506050605
+      0506060506050505050505050505050504040404050404040404050404040404
+      0404040404040403040304040304040403030303040403030303030303030303
+      0303020203020302020202020302020202020202020101020102020202010102
+      0101010101010001010101010100010101000101000000010100010000000100
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000030303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303737373939393A3A3A3C3C3C3D3D3D3E3E3E2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F3635353838373837373837373837373837373837
+      3737373737373737373737373736373736373637373636363736363636363636
+      3636363636363636363536363636363636353536353635363635353535353435
+      3535343534343534343534343434343434343433343334343434333334343334
+      3333333333333333323332333333333232323333323232333232323232323232
+      3232323232313232323131323131313231313231313131323131313131313031
+      30303031303030303030303030303030302F30302F302F2F302F303030313130
+      3131303131303031303031313030313030303131303030313030313030303030
+      2F30303030303030302F2F302F302E2F2F2D2D2D2C2C2C2B2B2B2A2A2A2A2A2A
+      2A2A2A2A2A2A2A2A2A2A2A2A2A292A2A292A2A292A2929292929292929292928
+      2929282928292929282829282828282828282828272727262727262627272626
+      2626262525262526252626252625252525252526252525262625282827292A29
+      2B2B2B2D2D2D2D2D2D2C2C2D2D2D2C2D2D2D2E2C2C2E2C2C2D2C2C2D2E2C2E2D
+      2D2E2D2D2E2E2E2D2D2D2D2D2D2D2D2D2C2D2D2B2B2B27282724242425252525
+      2525252425242524252525252525252525242525252425242424252424242424
+      2424232423232423242423242524242424242324242525242424242524242525
+      2525252525242425242424242424242424242425252525252425242524242425
+      2525232323222122222122222223222222222222232323232324303030323333
+      32323231313130303030302F2F2E2F2E2E2D2D2D2D2C2C2C2C2C2C2C2C2C2C2C
+      2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2D2C2C2C2C2C2C2C2D
+      2D2D2D2D2D2828282425242121211E1E1E1A1B1B1A1A1B1A1B1A1A1A1A191919
+      191919181918191A192021202D2D2D3030303232323334343637362C2B2C1515
+      1515151514141414141313131313131313131413131313131211111111121212
+      11111111111111110F100F101010100F100F0F0F0E0E0E0E0E0E0D0E0D0D0E0E
+      0D0D0D0D0E0E0D0E0D0D0D0D0D0D0D0D0C0D0D0D0C0B0C0B0B0B0B0B0B0B0B0B
+      0B0B0B0B0B0A0A0B0B0B0A0A0B0A0A0A0A0A0A0A0A0A0A090A0A0A090A090A0A
+      09090909090A0909090909090909090808090809080908080908080808080808
+      0808070707080808080807070808080707070707070707070707070706070706
+      0607070706060607060706060606060506060605050605060606050606050606
+      0505050505050505050505050504040505040404040405040404040404040404
+      0404040404040404040404040403040303030303040303030303030303030303
+      0303020202020302020202020202020202020202020101010101010101010101
+      0101010101000101010100010101000000010100000001010000000000010000
+      0001000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000003030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303232323939393A3A3A3B3B3B3C3C3C3E3E3E3939392F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F313131383837383737383737383737383737383737373737
+      3737373737373637363737373637363637373737373736373636373736363636
+      3636363636363636363636363536353536363535353536363536353536343535
+      3534353434353434343334343434343334343334343333343334333433333334
+      3333333333333333333332333332323332333332323232323232323232323232
+      3232323232323232323232313131323132323131323131313131313130303031
+      3130313130303130313030303030303030313131313131313130303131313030
+      3131303130313130303131303131303130313131303030303031303030302F2F
+      2F2E2E2E2D2C2B2B2B2B2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A
+      2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A29292A292A2A2929292929292929282929
+      2928282929282829292828282827282828282826272726272726262726262626
+      2626262626262625252525262625252625252525242525252524252424242525
+      25252727282929292C2B2C2C2C2D2D2D2C2F2D2D2E2D2D2E2D2D2E2E2C2D2D2D
+      2E2E2D2D2D2D2D2D2D2C2D2D2C2C2D2E2D2D2D2D2E2D2C2C2828282525252626
+      2625262626252625252525252525242425242525242524242424242425252525
+      2425252525262626262525252525262625252625262626252526252625252525
+      2626262626262626262627262626262626262727272726272626262626262625
+      2624242424232424232323232323232323232325252526252631313233343433
+      33343232323232323132323231323030313030303030303030303030302F2F2F
+      2F2E2F2F2F2F2F2F2F2F2F2F2E2F2F2F2F2F2C2C2C2929292524252222221F1F
+      1E1F1E1E1D1D1E1D1D1D1D1D1D1C1D1C1D1D1C1D1C1C1B1C1B1B1B1B1B1B1B1A
+      191A1A1A1B1A1B1B2727272E2E2E313131333332363536383837202021161616
+      1616161515151514151414151313131313131313131312121213131312121112
+      111111111111111110100F0F10100F100F100F0F0F0F0F0F0F0E0D0E0E0E0E0D
+      0E0D0D0E0E0D0D0D0D0D0D0D0D0C0D0C0D0D0D0C0D0C0C0B0B0B0B0B0B0B0B0B
+      0B0B0B0B0A0B0A0B0B0A0A0A0A0A0A0A0A0A0A0A0A0A090A0A0A0A0A0A0A0A09
+      0A0A0A0909090909090909090909090909090908080908090808080808080808
+      0708080707080808070708080808070708070707070707060607060607060706
+      0606060607070607060606060606060606060506050606060605060506050605
+      0505050505050504050504050504050404040404040404040504040404040404
+      0404040403030403040404030303030403030303030303030303030303030303
+      0302020302020202020202020202010202020201020102010101010101010101
+      0101010001010101010101010001010100000000010001000100000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303535353939393A3A3A3C3C3C3D3D3D3E3E3E3232322F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F34343438383738373738373738373738373738373737373737
+      3637373637373737373737373737373737363736373737363636373636363636
+      3636363636363636363636363636353636353636353535353534343634343534
+      3435343435343434343434333434343434333434343334333333333333343333
+      3333333333333333323232323233333232333233333232323232323232323232
+      3232323231323232323132313231313232313131313131313131313131303131
+      3030303130313132313131313131313131313131313130313131303131313031
+      30313130303130303031303131303131312F302F2E2E2E2C2C2C2C2B2B2B2B2B
+      2B2B2B2A2A2A2B2B2A2B2A2B2A2A2B2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A
+      2A2A2A2A2A2A2A2A292A2A2A2A29292A2929292A292929292929292928292929
+      2928282929282829282828282828272728272727272727272726272626262626
+      2626262625262526252625262525262525252524252525252524242524242524
+      252424242424242726272828282C2B2B2E2D2D2E2D2D2E2D2D2E2E2D2D2E2D2D
+      2E2D2F2E2E2E2E2E2E2E2E2E2E2D2D2E2E2E2D2E2D2D2E2C2C2C282929262625
+      2526262525262525262525252525252626262526252525252726262626262727
+      2726262727262726272626262627272727272727272627272827272728282927
+      2828272728272728272828282829282828282828282727282727272727292728
+      2626262625252525262525252525252525252626262626263332323535363535
+      3534343434343433323333323332323232323232323232313232323132313231
+      30302D2D2D2A2A2A252525212122212221222121212121212121212121202020
+      202021201F201F1F1F1F1F1E1D1D1D1E1E1E1D1D1E1C1C1C1C1C1C1B1C1C1B1C
+      1B1C1C1C1D1C1D2E2E2E30303034343435353537383736363618181816161616
+      1616151616161515141414141414141414131313121213121312131212121213
+      121212111111101111101011101110100F0F0F0F0F0F0F0F0F0F0F0F0F0F0D0D
+      0D0D0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0D0D0C0D0C0C0C0C0B0B0B0B0B0B0B
+      0B0A0A0B0A0B0B0B0A0B0A0A0A0A0A0A0A0A0A0A0A0A0A0A09090A0A090A0A09
+      09090A090A090909090908090809080809080808090808090808080808080708
+      0808070807070807070807070707080708070707070707060707060606070706
+      0706060706060606060606060606060606060606060506050505060605050505
+      0506050505050505050404050404040504050404040404040404040404040404
+      0403040404040404040403040304030403030303030303030303030303020302
+      0303020203020202020202020202010202020101010102020102010101010101
+      0101010001010100010100010101000001000000010000000000000000010100
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303031
+      31313838383A3A3A3B3B3B3C3C3C3D3D3D3B3B3B2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F303737373837373837373837373837373837373737373737373737
+      3737373736363736373636373637363736363637363736363636363636363636
+      3636363636363636363635353535353635363534363535353435353434353435
+      3534343434343434343334343333333434343433343433333333333333343433
+      3333333333333233323333333333323332323332323233333232333232313232
+      3232323232323132323131313231313231323131313131313130313131313131
+      3231313132313131313132323131313131303030313030313030313130313130
+      303131303030302E2E2E2C2D2D2D2C2B2C2B2B2C2B2C2C2B2C2C2B2B2B2B2A2B
+      2B2A2B2B2B2A2A2A2A2A2A2B2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A
+      2A2A2A2A2A2A2A2A2A2A2A2A2A29292A2A292929292929292929292929292829
+      2929292828292829282828282827272827262728272727262727272626262626
+      2626262526252526252525252525252525252525242425252424242424252525
+      2525252525252525252425242526252929292C2C2C2E2D2D2E2F2E2E2F2E2E2E
+      2E2E2E2E2E2E2E2E2E2E2E2D2E2D2D2D2F2F2E2E2F2F2E2E2E2E2D2D28282926
+      2625262727262626262626262726272626272828282727282728272726262727
+      2728282828272829292828282929292928292929292928292929292929292929
+      292929292929292A292A2929292929292929292928282929292A292829282828
+      2828272627272627262626272727272727272727282828333334363736353535
+      3535353535353435353534353434343131312D2C2D2929292727272524242424
+      2424242424242424242423242323242424232323232323232322222221212222
+      2221202021202021201F2020202020201F1E1F1E1E1E1E1D1D1D1C1D1D1C1C1D
+      1C1C1D2423242F302F3232323433343636363738382B2B2B1616161616161616
+      1616161616161615151515151514141414141414141412131313121312121212
+      12121212121212121110111010101010101010100F0F0F0F0E0F0E0F0E0E0E0F
+      0D0D0D0E0D0D0D0D0D0D0D0D0D0C0C0C0C0D0C0C0C0C0D0C0C0C0C0B0B0B0B0B
+      0B0B0A0A0A0A0B0A0B0B0A0B0A0A0A0A0A0A0A0A0A0A090A0A0A0A0A090A0909
+      090A090909090909090909080908080809080808080808080808070808080808
+      0708080808080707080707070707070707070607070707070707060707060607
+      0606060606060606060706060606060606060506060605060605050505050505
+      0505050505050405040404040504050404040404040404040404040404040404
+      0404040404040404030303030303030303030403030303030202020302020203
+      0202020202020202020202020102010201010201020201010101010101010101
+      0101000001010100010100010101010000010001010001000000000001000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303434
+      343939393A3A3A3B3B3B3D3D3D3E3E3E3434342F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F333333383737383737383737383737383737383737373737373737373737
+      3737373736373737373737373737373636363737363636363636363636363636
+      3636363636363636363536353536363535353435353435343535343435343535
+      3434343434343434333434333434333434343334343434333433343433333333
+      3333333333333333333333333232333232323232333332333232323232323232
+      3232323232313231323131323131323131323132313132313131323132323232
+      3232323131323131313131313131313131313031303031313131302F302D2D2D
+      2D2D2D2D2D2C2D2D2C2D2C2C2D2C2B2C2B2C2C2B2C2C2B2B2C2B2B2B2B2B2B2B
+      2B2A2B2A2B2A2A2A2A2B2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A
+      2A2A2A2A2A2A2A292A2A2A2A2A2A292929292929292929292929292929292829
+      2928292928282828282828282727282826272727272726272727262626262625
+      2526262625252525252525262525252525242425262526262525252526252525
+      25252424252525252525242525252525252828282C2A2B2E2F2E2F2F2E2F2E2E
+      2E2E2F2E2E2E2F2F2F2E2E2E2E2F2E2E2E2E2F2E2E2F2F2F302E2F2D2D2D2929
+      292728272828282828282728282828282829282829282929292929292A2A292A
+      2A2A2929292929292929292929292A2A2A2A292A2A2B2A2A2A2A2A2B2A2A2A2A
+      2B2A2B2A2A2A2A2A2A2C2B2B2B2B2B2C2B2B2C2B2B2C2A2B2B2B2A2B2A2A2A2A
+      2A2828282828282828282929292929292929292A2B2A3737373A3A3A36363633
+      33332F2F2F2C2C2C282828292828282828282828282728262727262727262626
+      2626262626262525252424252424252524242323232323232323232323232323
+      232322232222222121212121222222211F1F1F201F201F1F1F1F1F1F1F1E1F1E
+      1F1E2B2B2A3232333434343737363A3A393A3B3B1F1F1F181918171717171716
+      1616161616161616161616161515151515151414141314131313131213121212
+      121212111212111211121010101010101110101010100F0F0E0F0F0F0F0F0F0E
+      0F0E0D0D0D0D0D0D0D0D0D0C0D0D0D0D0C0C0C0D0C0D0C0C0D0C0C0C0C0B0B0B
+      0A0A0B0B0B0A0A0A0B0A0A0A0A0A0A0A0A0A0A0A090A0A090A0A090909090909
+      0909090909090909090908080908080808080908080808080808080808080808
+      0808080807070708080708070807070707070607070607060606060706070606
+      0706060606060606060605060506060606050506060606060606050505060605
+      0505040505050505050504040404040404040404040404040404040404040404
+      0404030404030403030303030403030303030303030303030303020302020202
+      0202020202020201010102020202020201020102020101010101010101010101
+      0101010101010101000000010000000000000000000100000100010000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030373737
+      3A3A3A3B3B3B3C3C3C3D3D3D3D3D3D2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F37363638373738373738373738373738373737373737373737373737373737
+      3737363736373736363737373737363737363737373637363637363636363636
+      3636363636353636353636353635343634353635343534343534343535343434
+      3434343434343434343433343433343333333333343434333434343333333333
+      3333323333333332333332333332323232323233333233323232323232323232
+      3231323132323132313232323231313231323231313231313231313132313232
+      313231313131313131313131313131302E2F2F2E2E2E2E2D2E2D2D2D2D2E2D2D
+      2D2D2D2D2D2D2D2C2D2C2B2D2C2C2C2B2B2C2B2B2C2B2B2C2B2B2B2A2A2B2B2A
+      2B2B2B2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A
+      2A2A2A2A2A292A29292A292A2929292A29292929292928292928292929282828
+      2828282928282828282828282828282727272627272626272626262626262526
+      2526252625262625252626272626262626252526262626262526262526252525
+      252525252625262525252525252525252626262727272A2A2A2F2F2F2F302F2F
+      2F2F2F2F2F2F2F2F2F2F2F30302F2F2F2F3130303030303230313131302D2E2D
+      2928282929292929292A292A2A292A2B2B2A2A2A2B2A2A2A2A292A2A2A2A2929
+      292A2B2B2B2C2B2B2B2B2B2B2B2B2B2A2C2C2B2B2B2B2C2C2D2D2D2D2D2D2D2C
+      2D2C2D2D2C2D2D2D2E2D2D2D2C2C2E2D2D2E2D2D2E2E2E2E2D2E2E2D2D2C2B2C
+      2B2A2B2B2A2B2B2B2B2B2B2B2B2B2B2B2B2B2E2D2E2B2B2C2B2B2B2B2B2C2B2B
+      2B2B2B2B2B2A2B2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A29292829292828292828
+      2828262727272627272726262627262626262626252525252525242525242424
+      2424242323242323232323232323232122212120212020201F1E1F2020202222
+      233131313434343636363939393A393A32323219191919191918181817181717
+      1716171616161616161616161616161616151514141414141313141313121212
+      1212121211121212121211111111111010101010101010100F0E0E0F0F0F0E0E
+      0E0E0E0F0D0D0D0D0D0D0D0C0D0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0B0C0B0B
+      0B0A0A0A0A0A0B0B0A0A0A0A0A0A0A0A0A090A090A0A0909090A0A0A09090A09
+      0909090909090909090909080808090908080808080808080708080807080808
+      0708080708070808080707070707070707070707070606060607070706060606
+      0607060606060606060606060605060605050605050505060505060505050505
+      0504050504050504050404050405040404040404040404040404040404040304
+      0404040304040303030303030303030303020302030303030202020202020202
+      0202020202010201010202020201010202010101010101010101010101010101
+      0101010101000100000101000000000100010000010001000001010000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303030303030303232323939393A
+      3A3A3B3B3B3D3D3D3E3E3E3736372F2F2F2F2F2F2F2F2F2F2F2F2F2F2F313131
+      3837373837373837373837373837373737373737373737373737373736373736
+      3637363737373636363636373736363737363737373736363637373736363636
+      3636363535363635363535363535353535363534353435353434343434343434
+      3434343333343334343434343434343434343333333334333433333333333333
+      3333333333333333323233323233333232323232323232323232323132323232
+      3231313132323132323231323131323131323131323131313231323132323132
+      3131313130312F2F2F2E2E2E2D2E2D2E2D2E2E2D2E2D2E2D2D2D2E2D2D2D2D2D
+      2D2D2C2D2D2D2C2D2C2C2C2C2B2C2C2B2C2B2C2C2B2B2C2B2A2B2B2B2B2B2B2B
+      2A2A2A2B2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A
+      2A2A2A292A2A292A2A2A2A292A292929292A2929292929292929292928282929
+      2828282828282828282828282828272728272727262627262626262626262627
+      2627272627262627262626262626262625262526252626252526262726262626
+      2526262625262626262726262626262626262625262625252829292E2E2D3031
+      31303030302F2F3031313030313231323132313131313231313331313132312D
+      2D2D2B2B2B2B2B2B2B2B2B2A2B2A2B2B2A2B2B2B2B2B2C2C2C2C2B2C2B2C2B2B
+      2D2C2C2D2C2C2D2E2D2D2E2D2D2E2D2E2D2E2E2E2E2E2F2E2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2E2E2F2E2E302F2E2F2E2F2F2F2F2F2F2F2E2E2E2D
+      2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D
+      2C2D2C2D2D2C2D2C2C2D2C2C2C2C2C2C2C2C2C2C2C2B2B2A2A2B2A2A2B2A2A2B
+      2A2A2A29292A2A2B2A2B292A292A292929282929282927272827272726272726
+      27272525252425252424242323232222222222232222222021212021202A2A2B
+      3433333636373939393C3C3C3D3D3D272727191A191A191A1919191819191817
+      1816161616161716161615161616161616161614141414151513131313131313
+      1313111111111211111112111111111111101010100F10100F0F0F0F0E0F0E0E
+      0E0E0E0E0E0E0C0D0D0C0C0D0D0D0D0D0C0D0C0C0D0C0C0C0C0C0C0C0C0C0C0B
+      0C0A0B0A0A0A0A0A0A0A0A0A0A0A0A0A090A0A09090909090A090A0909090909
+      0909090908080909090808080808080808090808080808080708080808080807
+      0807080707070707070707070707070607070707070606070607070606060606
+      0606060606060605060606060606050606050505060505050505050505050505
+      0505050505040505040505040404040404040404040404040404040404040404
+      0404040403040403040303030303030303030203030303030202020202030202
+      0201020201020202010101010101020102010201010101010101010101010100
+      0101010000010101000100000000000101010101000100000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303636363939393A3A
+      3A3C3C3C3D3D3D3E3E3E3030302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F35353538
+      3737383737383737383737383737373737373737373737373737373737373737
+      3737363637363737373737373737363736373637373636363636363636363636
+      3536363536363536353536353436353535353435353435343535343434343434
+      3434343434333334333433343433343334333433333333333333333333333333
+      3333333332333332323332323233323232323232323232323232323232323232
+      323131323231313232313231323232313231313231303232313131313030302E
+      2E2F2E2E2F2F2E2E2E2E2E2D2D2E2E2E2D2D2E2E2D2D2E2E2D2D2D2D2E2D2D2D
+      2D2D2D2D2D2C2D2C2B2D2C2B2C2C2B2C2B2B2C2B2B2C2B2B2B2B2B2B2B2B2A2A
+      2A2B2A2B2B2B2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A
+      2A2A2A2A2A29292A2A2929292929292929292929292929292929282929292829
+      2929282828282828282828282727272727272726262726262727272726262626
+      2727262626272626262726262626262627272727272627262626262627272727
+      27272727262726272627272626262626262625262726262625272A2B2A30302F
+      3232323232323131323132313232323332323232323331323432333333333030
+      302C2B2B2C2C2C2C2B2C2D2C2C2D2C2D2C2C2C2D2D2E2E2E2E2E2D2E2F2E2E2F
+      2F2E2F2F2F2F2F2F303030302F302F2F30303030303030303030313131313131
+      3131313131313130303130303231313131303231313231313232323131312F2F
+      2F2F2F2F2F2F302F2F2F2F2F2F2F2F2F2F30302F2F30302F2F2F2F2F2F2F2F2E
+      2E2F2F2F2F2F2E2F2D2D2D2D2E2D2D2D2D2D2D2D2D2D2E2E2D2D2D2D2D2E2E2E
+      2D2D2D2D2D2D2C2C2D2C2C2C2B2A2B2B2A2B2A2A2B2A2A2B2829292929292727
+      2727272726262626262624252523232323232323232323232323232332313236
+      36363838383A3A3A3D3D3D3A3A3A1E1D1E1B1B1B1A1A1B191919191919181919
+      1717171818181716161616161516161616161615151515151514141414151313
+      131213131112121112111111111112111111111010100F0F0F100F100E0E0F0E
+      0E0E0E0E0E0D0E0E0D0C0D0C0D0D0D0C0C0C0C0C0C0C0C0C0B0C0C0C0C0B0B0C
+      0A0A0B0A0A0A0A0A0B0A0A0A0A0A0A090A090A090A090A090909090909090909
+      0909090908080908080908080908080808080808080808080808080808070808
+      0808070807070707070707070707070607070607070707060707060606060706
+      0606060606060606060606060606060605050506050506050505050505050505
+      0505050505050404040404040404040404040404040404040404040404040404
+      0403030403030403030303030303030302020303030202020203020202020202
+      0202020202020201020202010201020101020101010101010101010101010101
+      0001000100010001000001010100000100000000000100000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000030303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030303131313939393A3A3A3B3B3B
+      3C3C3C3E3E3E3A3A3A2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3030303837373837
+      3738373738373738373737373737373737373737373737373737373737373736
+      3736373737363637363636363737363636363636363637373636363636363635
+      3536353635353635353535343534343635343534353434343435343434353434
+      3434343334343433333434343433343434343333333333333333333333333333
+      3333333332333332323232333332333233323232323232323232323132323231
+      323232323131323231323131323131313131302F2F2F2F2E2F2F2F2E2E2F2E2E
+      2E2E2E2E2E2E2E2E2E2E2D2E2E2D2E2E2D2E2D2E2D2D2D2D2E2D2D2D2D2D2D2D
+      2D2D2D2D2C2D2C2B2D2C2C2C2B2B2C2B2B2C2B2B2C2B2B2B2B2B2B2B2B2B2A2B
+      2A2B2B2A2A2A2B2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A
+      2A292A2A292A292A29292A292929292A29292929292929282928282928292928
+      2828282828282828282827272727292728282827282727272727272727272727
+      2727272627262727272727272727272727272728282727272828282727272627
+      272627272626272627262827272727272827282727282827282827282C2C2C31
+      3131333332333233323332333334333333333333353334363435353534353535
+      3030302D2D2D2D2E2E2E2F2E302F2F302F302F2F2F2F30303030303030303031
+      3030303031313131313131313233323232323332323233333333333334333335
+      3434343434343334343333343433343333343534343434353535343333333233
+      3232333232333332323232323132323132323332333233323332323232323131
+      313131313232313131313232333232323232323232313231313030303030302F
+      2F2E2F2E2E2D2D2E2D2D2E2D2D2E2D2D2D2C2C2D2B2A2C2B2A2B29292A2A2929
+      2929292828282627262626262425242424252323232424242828293535363939
+      383B3B3B3E3E3E3E3E3E2E2D2D1C1D1D1D1D1C1C1B1B1B1B1B1A1A1919181819
+      1918191819171817171717161616151616161615151515151516141414141413
+      1313131212121111121111111111111111111111110F100F0F0F0F0F100F0E0E
+      0E0E0E0E0E0E0D0E0E0D0D0C0D0D0C0C0C0C0C0C0C0D0B0C0C0B0C0C0C0C0C0C
+      0C0C0B0A0A0B0A0A0A0A0A0A0A090A0A0A0A0A0A09090A0A0909090909090909
+      0909090809090909080809080908080908080808080808070808080808070808
+      0807070707070707070707070707060607070707060707060606060606060706
+      0606060606050606050606060505060605050505050505050505050505040505
+      0505050504040405040404040404040404040404040404040404040404040404
+      0403030303030303030303030303030302030302020202020202020202020202
+      0201020102020102010101020101010102010202010101010101010001010100
+      0000000001010100000001000000010101000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000003030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303535353939393A3A3A3C3C3C3D
+      3D3D3E3E3E3232322F2F2F2F2F2F2F2F2F2F2F2F2F2F2F343434383737383737
+      3837373837373737373737373737373737373737373737373737373737373736
+      3737373737363637373736373637363637373636363636363636363536363535
+      3535353535363434363535353435353535343435343434343434343434343434
+      3434343434343334343334343433333334333333333333343333333333333333
+      3333333232333332323232323232333233323232323232323232323232323131
+      32313132313131313130302F2F2F2F2F2F2F2F2E2F2F2E2E2E2F2F2E2F2F2F2F
+      2E2E2E2E2E2E2E2E2E2E2E2E2E2D2D2D2D2E2D2D2D2D2E2D2D2D2D2D2D2D2D2D
+      2D2D2D2C2D2C2C2C2C2C2C2B2B2C2B2B2C2C2C2C2B2B2B2B2B2B2A2B2A2A2A2A
+      2A2A2A2B2B2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A
+      2A2A292A2A2A2A292A292A2A2A29292929292929292929292928292928282829
+      2828282828282828292929272828282828272728272727272727272727272627
+      2728272728282727282828272828272827282827272727282727272727272727
+      27282727272828282828292829292929282929282928272829292A2A2A2A2F2F
+      2F34343434343434343434343435353536363637363637363637373637373634
+      3434303030303030313030313130313231313131313131323232333333333333
+      3333333333333334343434353635353535353535353636363635353636363636
+      3636353636363536353537353636363637363636363737373735353635353535
+      3535353535353535353535353435353535353535353535353535353535353535
+      3535353535353535353535353535343534353433333333333232323232323131
+      31313030313031312F312F2E2F2D2D2E2D2D2E2D2D2D2C2D2D2C2C2C2B2B2B2A
+      2A2A2929282727282728272626262525252525252525253233333839383B3B3C
+      3C3C3C4040403F3F3F2021211D1E1D1C1D1C1C1C1C1C1C1C1B1A1A1A1A1A1919
+      1918181818181817171717171716151515151615161515151515151514131414
+      14131212121212131212121111111111101011111111110F100F0F0F100F0F0F
+      0E0E0E0E0E0D0E0E0D0D0D0C0C0C0C0C0C0D0C0C0C0C0C0C0C0C0B0C0B0C0C0B
+      0C0B0A0A0A0A0A0A0A0A09090A0909090A090A09090A09090909090909090908
+      0908080808080908080908090808080808080808080808080807080707070707
+      0707080708070707070707060707070706070606070706060706070707060606
+      0606060606060606060506060505050505050605050505050505050505040404
+      0504040405040404040404040404040404040404040404040304030303040304
+      0303030303030303030303020303030303020202030203020202020202020102
+      0202020201010201020201010101010201010101010101010101010101010100
+      0101000101000001010000000000000000000100010000010000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303131313838383A3A3A3B3B3B3C3C3C3D3D
+      3D3D3D3D2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3037373738373738373738
+      3737383737373737373737373737373737373737373737363737373636373736
+      3637373737363737373736363636373736363636363636363636353636353535
+      3536353436353536343435353435343434353434343434343434343434343434
+      3334343433333434333334333333343333343334333334343333333332333332
+      3333323332323332333332323332323232323232323232323231323232323231
+      302F2F30302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2E2F2E2E2F2E2E2F2F2E
+      2E2E2E2E2E2E2E2E2E2E2E2E2E2E2D2E2D2D2D2D2D2D2D2E2E2E2E2D2D2D2D2D
+      2D2D2C2D2C2C2C2C2B2D2B2C2C2B2B2C2B2B2C2B2B2B2A2B2B2B2A2B2B2A2A2B
+      2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A292A
+      2A2A292A2A2A292929292A292929292928282929282929292928282828292929
+      2929292928292928292927282928282827282827272828282828282828272727
+      2728282828282828282828282828282728272827282728282828282828292829
+      28292A292A292929292A292929292A292A2A2A2B2A292A2B2A2B2B2B2B2C2C2C
+      3232313635353737363636363737373737373737373937373938373939383838
+      3834333332323233333333323233333334343433343434353535363636363636
+      36363636363636363737363737373838383837373838383938383938383A3838
+      3939383938383A3939393939393A393A393A3A3A3A3B3A3A3837373838373838
+      383838393939393939393A3A3A3A3A3939393A3A393939383838383838383838
+      3838373737373737373737373737363636363636353535353535343434343334
+      3333343232333231333131312F2F302F2F2F2E2F2F2E2D2E2D2D2D2C2C2C2C2C
+      2C2C2C2C29292928282827272727272727272729292A3939393B3B3C3D3D3D40
+      414141404134343420201F1E1E1F1D1D1D1D1D1D1C1C1C1B1B1C1A1B1A191A19
+      19191A1818181818181717171716171616151515161515161515151514151413
+      141313141213131213121111111111111111101011111110100F0F0F0F0F0F0D
+      0E0E0E0D0E0D0E0D0E0E0D0D0C0C0D0D0D0C0C0C0C0B0C0C0B0C0C0B0B0B0B0B
+      0B0B0B0A0A0A0A0A0A0A0A0A09090A09090A09090A090A090A09090909090908
+      0909080908090909090909080809080808080808080807080708070807070707
+      0708070808070807070707070707070607070707060607070707070607060606
+      0606060606050606050606050505060505050505060505050505050505050405
+      0404040504040404040404040404040404040404040404040403030403030303
+      0303030303030303030303030303020303020202020202010202010202020102
+      0201010202020101010101010101010201010101010100010101010001000001
+      0101010101000101010101000000010001010000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303333333939393A3A3A3B3B3B3D3D3D3E3E3E
+      3535362F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3232323837373837373837373837
+      3737373737373737373737373737373737373737373737373737373736363736
+      3636373636363637373637363736363736373736363635363635363535353535
+      3535353534353535353535353534343434343434353534343434343434343433
+      3434343333333334343433333434333333333334333333333333333333333333
+      33333233333333333332323332323232333232323232323031312F302F303030
+      3030302F2F302F2F2F2F2F2F2F2F2F2F2F2F2E2F2F2F2E2E2F2F2E2E2E2E2E2E
+      2E2E2E2E2E2E2E2E2E2E2D2E2E2E2D2E2E2D2E2E2D2E2D2D2D2E2D2D2D2D2D2D
+      2D2C2C2C2B2C2C2B2D2B2B2C2B2B2C2B2B2C2A2A2B2B2B2B2B2A2A2B2B2A2B2A
+      2A2A2B2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A
+      29292A29292A29292A29292929292929282829292829292A2929292A29292A29
+      2929292829282929292728282728292829292828282828292929292829282829
+      2828282829282728282828272829292829282A292A2929292A2A2A2A292A292A
+      2A2A2A292A2A2A2B2B2C2C2C2C2C2B2B2B2B2B2C2A2C2C2B2C2B2B2C2C2C2C30
+      2F303736363737373838383938383939393B393A3C3B3B3C3B3A3B3B3B3A3A3A
+      3636373535343535353535363636363636363636363736363737383838383938
+      38393939393A3A39393A3A3A3B3B3A3A3B3B3B3C3B3B3C3B3B3C3C3C3C3C3C3C
+      3B3B3C3C3C3C3C3C3C3C3C3C3C3C3D3D3D3D3D3D3D3D3D3C3C3D3C3D3D3C3D3D
+      3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3C3D3D3C3D3C3C3C3C3B3B3B3B3B3B3A3A
+      3B3A3B3A3A3B3A3A3A3A38393939393838373837373836363636363636363636
+      35363634363434343232333232333131313131312F30302E2E2E2E2E2E2D2D2D
+      2C2C2D2B2B2B2B2A2B29292A2929292828273332333B3B3B3E3D3D3F3F3F4242
+      424343432525262021201F201F1F201F1E1E1E1D1D1D1C1C1C1C1C1B1B1B1A1A
+      1B1A191919181818181818181717161716151515151615151515151515151415
+      1413141314131213121212121111111110111010111110100F0F0F0F0F0F0F0F
+      0F0E0E0E0E0E0E0E0E0D0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0B0C0C0B0C0B0B
+      0B0C0A0A0A0A0A0A0A0A0A0A090A0A0A090A0909090A09090A09090909090909
+      0908090909090909090908080808080808080708080808080807080807080707
+      0708080707070707070707070607070706060706060606060606070606060706
+      0506060605060605050505050505050505050505050505040405050404040404
+      0404040404040404040404040404040404040404040404040303030303040303
+      0303030303030303030303020202020202030302020202020202020202020201
+      0202010102020101010101010101010101010101010101010100000101010000
+      0000000000000001010000000000000001000001000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303737373A3A3A3A3A3A3C3C3C3D3D3D3E3E3E2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F363636383737383737383737373737
+      3737373737373737373737373737373737373737373637373737373737373737
+      3737363636373736373736363736363636363636363536363536343436353536
+      3535363534353434353435343435343434353435353434343434343433343434
+      3433333434343334343333343333333333333333323333323233333333333233
+      32323333333333333332323232313131303030303030302F302F2F30302F302F
+      302F2F302F2F302F2F2F2F2F2F2F2F2E2F2F2F2F2E2F2F2F2E2F2F2E2E2E2E2E
+      2E2E2E2E2E2E2E2D2E2D2D2E2D2D2D2E2E2E2D2D2E2D2E2D2D2D2D2D2D2C2D2D
+      2C2D2C2B2C2C2B2C2C2B2C2B2B2C2B2B2C2B2B2B2A2B2B2A2A2A2A2B2A2A2B2A
+      2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A292A2A2A2A2A
+      2A2A2A2A2A292929292A29292929292A2A2A292A2A29292A292A2A2929292929
+      292929292A29292A29292929292A29292A292929292829292829282929292828
+      29282828282929292929292A2A2A2A2B2B2A2A2A2A2A2A2A2A2A2B2B2A2C2C2C
+      2C2C2C2C2C2C2C2C2C2C2C2C2D2C2D2D2D2E2E2C2E2D2C2D2E2D2E2E2E2E3030
+      2F3535363A393A3A3A3A3B3B3B3B3B3B3C3B3B3C3B3B3D3D3C3D3D3C3E3E3E3A
+      3B3B373737373637373737383938393939393939393A393A3A3B3C3B3B3B3B3B
+      3C3C3C3C3C3C3D3C3D3C3C3C3D3D3D3E3D3D3E3D3D3F3E3E3F3D3D3E3D3D3F3F
+      3E403F3F3E3F3F40403F3F3F403F3F3F403F403F3F3F404040403F3F3F3F403F
+      3F3F403F3F3F3F3F3F3F3F3E3E3E3E3E3E3E3F3F3E3E3E3E3E3E3D3D3D3D3D3D
+      3D3D3D3D3D3D3D3D3D3C3C3C3C3C3C3A3A3B393A3939393A3938393837383737
+      383736363535363535363434343333333131313231313030312F2F2F2E2E2E2D
+      2D2D2D2C2C2C2C2B2A2A2A2B2B2B2C2C2C3939393E3D3D404040434443444444
+      373737232323212221212020201F1F1F1F1F1D1E1E1D1D1D1B1B1C1B1B1B1C1B
+      1B1A1A1A19191918181818171818171717171615161515151515151415141514
+      15141413131212121212121111111111111010111011101010110F0F0F0F0F0F
+      0F0F0F0D0D0E0D0D0E0D0D0D0C0C0D0C0C0C0C0C0C0C0C0B0C0C0C0B0C0B0C0B
+      0C0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A090A0A09090909090909090909090909
+      0809090909090809080808080808080808080808080807080708070708080707
+      0707070707070707060707070707070607070707060606070606060606060506
+      0605060606050606060605050505050505050505050505050505050404040404
+      0405040404040404040404040404040404040403040303030404040303030303
+      0303030303020302030203020202020202020202020202020202020202010102
+      0101020102010201010101010101020101010100010101010101010101010000
+      0101010001000000010101000000000101000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303232323939393A3A3A3B3B3B3D3D3D3E3E3E3838382F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F31313138373738373738373738373737373737
+      3737373737373737373737373737373737373737373737373636373737373736
+      3737373636363737363636363636353736353636363635353635353635353535
+      3435353435343535343434343535353434343434343534343433343434333434
+      3333343333343433343332333232333333333332333332333333323333333332
+      333333323332323131303031303030303030303030303030302F2F2F302F2F30
+      30302F2F302F2F2F302F2F2F2F2E2F2F2F2E2E2E2E2E2F2E2F2E2E2E2E2E2E2E
+      2E2E2E2E2E2D2E2E2D2D2E2D2D2D2E2E2E2E2E2D2E2D2D2D2D2D2D2D2D2D2D2C
+      2D2C2C2D2C2B2C2B2B2D2C2B2C2B2B2C2B2B2B2B2B2B2B2B2B2A2A2A2A2B2A2A
+      2B2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2929
+      2A2A29292A2A2A2A2A2A2A2A2A2A292A2A29292A29292A29292A292A292A2A2A
+      2A2A2A2A2A292A292A2A292A2A2A292A292A2929292928292828282A29292A2A
+      2A2A2A2A2A2A2A2B2B2A2B2A2B2A2A2B2B2B2B2C2C2C2C2C2C2C2C2C2C2C2C2D
+      2C2C2D2E2D2E2E2E2E2E2D2E2D2E2F2E2E2F2F2F3030312F2F30303030303030
+      3535343B3A3B3C3C3C3D3D3D3D3D3D3F3E3E3F3E3E40404040403F40403F3F3F
+      3F3A3A3A3B3B3B3C3B3B3D3C3C3C3C3C3C3C3C3C3D3D3D3D3E3D3E3E3E3E3E3F
+      3F3F3F403F404040414040414141424141424141424141424142424141434242
+      4343434343434243424342424343434343434343434444444344444344434344
+      434344434343434242424343424343424242424141414141414140403F403F40
+      3F3F3F3F403F3F403E3E3E3D3D3D3D3D3D3C3C3C3C3B3C3C3B3B3B3A3B3A383A
+      3837383737383636373635363535353434353433343332323131313030312F2F
+      2F2D2E2E2D2D2D2D2D2D2C2C2C3535353E3E3F41414143424244454446464628
+      29292323232323232122222020201F1F1F1F1F1F1E1E1E1C1C1D1B1C1C1C1B1B
+      1B1C1B1A1A1A1919181817171718171717161616171515151415151515151414
+      151314131413131212121211121011111011101011101110100F0F0F0F0F0F0F
+      0F0F0E0E0E0D0E0D0E0D0D0D0C0D0C0C0C0C0C0C0C0C0B0C0C0C0B0C0B0C0B0B
+      0B0B0B0A090A0A090A0A090A0A0A090A0A090A09090909090909090908090909
+      0908090809090808080808080808080808080808070808080807080708070807
+      0708080707060707060707070707060706070707060606060606060606060606
+      0606060606060506050505050505050505050504050505050505040404040404
+      0404040404040404040404040404040404040403040404030303030303030303
+      0303030202020302020302020202020202020202020202020202020201010102
+      0102010201020102010102010101010001010101010100000101000101000100
+      0100000100010001000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303636363939393A3A3A3C3C3C3D3D3D3E3E3E3131312F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F3434343837373837373837373737373737373737
+      3737373737373737373737373737373737373736373737373737373737373737
+      3737363637363636363736363635363635363535363535363435363535353435
+      3535353435353434343534343535343434343434343434343434343434343434
+      3434323333333333323334333233323233333233333233333333323232323132
+      31313131313030303030303030303030303030303030303030302F2F2F302F2F
+      2F2F2F30302F2F2F2F2F2E2F2F2F2F2F2F2E2E2F2E2E2F2E2E2E2F2E2E2E2E2E
+      2E2E2D2E2D2E2E2E2E2D2D2E2E2E2D2D2D2E2E2D2E2D2D2D2D2D2D2D2D2D2C2C
+      2C2C2D2C2B2D2B2B2D2B2B2C2B2B2C2B2A2B2A2B2B2B2A2A2B2B2B2A2A2B2A2B
+      2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A292A2929292A2B
+      2A2A2A2A2A2B2A2A2A2A2A2A2A2929292A292A2B2B2A2A2B2A2A2A2A2A2A2A2A
+      2A2A2A2A2A2B292A2A2A2A2A2A2A2A29292929292A29292B2A2A2B2A2B2C2B2B
+      2C2B2B2B2B2B2B2B2C2C2C2C2D2C2C2D2D2C2C2C2C2D2D2D2E2E2D2E2D2E2E2F
+      2F2E2E2E2F2F2F302F3031303130303131303132323231313231323233333334
+      34353B3B3B3F3F3F404040404040414040424140424242444342444443434343
+      3D3D3D3D3E3D3E3E3E3F3E3E3F3F3F40403F4140414041404141414242424343
+      4342434243434343434344434344444344444445434446444446464546454646
+      4545464646464546454646464646464646464646474746474747464747464646
+      4746474646464546454646464545454545454545454444434444444344444343
+      424242424242424141414040403F403F3E3E3E3E3E3E3E3D3E3D3C3D3B3B3B3A
+      3A3B39393A383838373737373737363636353535343534343434323232303030
+      2F2F2F2E2E2F2F2E2E2F2F2F3D3D3D4141404343424647474747473A3A3A2425
+      252424232323232223232222222121211F1F1E1E1F1F1E1E1E1C1C1C1B1B1B1B
+      1B1B191A1A1A191A191818171718181718161616151515151515151414141414
+      1415151313131313131212121111111110111010111010101010100F0F0F0F0F
+      0F0E0D0E0E0D0E0D0D0D0D0D0D0C0C0C0C0C0C0C0C0C0C0B0C0B0B0C0B0B0B0B
+      0B0B0A0A0A0A0A09090A090A0A0A0A09090A0909090909090909090909080909
+      0809090908080809090808080808080808080808080708080708070808070808
+      0707080707070707070707060707070606070707070706060606060606060606
+      0506060505050505050506050505050505050505040404050405040404040404
+      0404040404040404040404040404040404040403030303030304030303030302
+      0303030303020302030303030202020202020202020202020201020101020201
+      0201020102010101010101010101010101010101010101010101010101000100
+      0101000001000100010000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303131313838383A3A3A3B3B3B3C3C3C3D3D3D3B3B3B2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F303030373737383737383737383737373737373737373737
+      3737373737373737373737373737373637373737373737363637373736373636
+      3636373636363636363636363536363536353536353536353536353535353535
+      3535353435343434353535343534343434343435353434343434333333333332
+      3332323332323432333433333332323333323332323232323130313131303231
+      31313130303031303031303030303030302F30303030302F30302F2F2F2F2F30
+      2F2F2F2F2F2F2F2F2F2F2F2F2E2F2E2F2F2E2F2F2F2F2E2E2E2E2E2E2F2E2E2E
+      2E2E2E2E2D2E2D2E2E2D2D2D2D2E2D2D2D2D2D2E2D2D2D2D2D2D2D2D2D2C2C2C
+      2C2C2C2C2D2B2C2D2B2B2C2B2B2C2B2B2B2A2B2B2A2B2A2A2B2A2A2B2A2A2A2A
+      2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2B2B2B2A2B2B2B2A2A
+      2A2B2B2A2A2A2A2A2A2A2A2A2A2A2B2A2B2B2A2A2A2B2A2A2A2A2A2A2A2A2B2B
+      2B2A2A2B2A2A2A2A2A2A2B2A2A2B2A2A2B2B2A2B2B2A2B2C2B2B2B2B2D2C2D2C
+      2C2C2D2D2D2C2C2D2D2D2C2C2C2C2D2D2D2E2E2E2E2F2F2E2F2F2F302F313131
+      3131323131313232323232333332333333333433343434353535353636363636
+      363C3D3D41414142424242414245444445454545454447464547474646464641
+      4041414242424141424242424242434343434343444444454546464545464646
+      4746464847474847474947484847474948484948494949484949484949494949
+      49494A4A4A4A494A4A4A4A4A4A4A4A4A4A4A4A4A494A49494A4A4A49494A4A49
+      4949494949494948484848494948484849474747474747464646464646454545
+      454545454545444343434242434243414042414041403F403F3F3F3D3E3E3D3E
+      3E3C3D3D3A3A3A3A3A3A39393837383837373737373735343533333333333332
+      31322F302F303030393939414141444444464746484848494A4A2C2C2C262526
+      2425252424232323232322222222222120211F1F1E1E1F1F1D1D1E1C1D1C1B1B
+      1B1B1B1A1A1A1A18191917171717181717171716161615151514151414151414
+      14151313131313131212121112121111101110111010101010100F0F0F0F0F0F
+      0F0F0E0E0D0E0D0D0E0D0D0D0C0C0C0C0C0B0B0C0C0C0C0B0B0B0C0C0C0B0B0B
+      0B0A0A0A0A0A0A0A0A09090A0A09090A0A09090A090909090908090908090908
+      0909090808080808080808080808080808080708080808080808070707070708
+      0707070707070707070707070606060706060606070606060606060606060606
+      0605050606060506050505050505050504040404040404040404040404040404
+      0404040404040404040404040404040403030403030303030303030303030303
+      0303020302030302030202020202020202020202020201010202020101020201
+      0202010201010201020101010101010101010101010001010001010101000100
+      0000010001000101000000000000000100000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000030303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303535353939393A3A3A3B3B3B3D3D3D3E3E3E3333332F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F33333338373738373738373737373737373737373737373737
+      3737373737373737373737373737373737363737373737373737373736363737
+      3636363636353637363636353735353635353635353635353635353535353435
+      3534343535353434343434343435353434343433333333333332333333333333
+      3332333232333332333232333233323232323231323131323131313031323130
+      31313130313131303030303030303030303030302F3030302F302F2F30302F2F
+      2F2F2F302F2F2F2F2F2F2E2F2F2E2F2E2E2F2E2E2E2F2E2F2E2E2F2E2E2E2E2E
+      2E2E2D2E2E2E2E2E2D2E2D2E2E2D2D2E2D2D2D2D2D2D2D2D2D2D2C2D2C2D2C2C
+      2C2C2C2D2B2B2D2B2B2C2B2B2C2B2B2B2B2B2B2A2A2A2B2B2A2A2A2A2A2A2A2A
+      2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2B2B2B2B2B2B2B2B2B2B2B2A2A2B2B2B
+      2A2B2A2B2A2B2B2B2B2A2B2B2B2A2B2A2B2A2B2A2B2C2B2B2B2B2B2B2B2B2A2B
+      2B2A2A2C2B2B2C2B2C2C2B2B2D2C2C2C2B2B2C2C2C2D2D2D2E2D2D2E2D2D2D2D
+      2D2D2D2D2E2E2E2F2E2F302F2F2F2F2F30303031313031323232323232313233
+      3334333334343434353434353536363537373637363637373737383838383839
+      3D3D3C4444434545454545454646464746464848474949494949484949484545
+      454344434444444545454645464746474747484848494848484949494949494A
+      49494949494A4A4A4B4A4A4C4B4B4C4B4B4C4C4C4C4C4B4C4C4C4D4D4D4D4D4D
+      4D4D4D4D4D4C4D4D4D4D4D4D4D4D4D4D4D4D4D4C4C4C4D4D4D4D4D4C4C4C4C4C
+      4C4C4C4C4C4C4C4B4B4C4B4B4B4B4B4B4B4B4B4B4B4B4A4A4A49484948484847
+      47474747474646464645454444454443444343434241424040403F3F403F3F3F
+      3E3E3F3D3D3D3C3C3C3A3B3B393A3A3A39393737373636363636363433343332
+      323232323333334040404445454747474949484949493F3E3E28282827272726
+      26262525242323232323232222222221222121211F1F1F1E1E1E1D1E1D1C1C1C
+      1A1B1A1A1A1B1A1A191819181717171717171717171616151515151515141415
+      141414141313131313131211121011101010111010101010101010100F0E0F0F
+      0F0E0E0E0D0D0D0D0D0D0E0C0C0C0B0C0C0C0C0C0C0C0C0C0B0B0B0B0B0B0B0B
+      0A0A0A090A0A0A0A0A090A0A0A0A09090909090A090909090908090809090909
+      0808080809080808080808080808080808080807080808080707080707070707
+      0707070707060607070706060707060606070606060606060606050606050605
+      0505060505050505050505050504050404050404050404040404040404040404
+      0404040404040404040403040404040404030304030303030303030302030303
+      0302020203030202020202020202010202010202020102020202020202010102
+      0101020101010101010101020100010101010101010101010100010100010001
+      0000000001010100000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000003030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303838383A3A3A3B3B3B3C3C3C3D3D3D3D3D3D2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F303736363837373837373737373737373737373737373737373737
+      3737373737373737373737373737373737373737373736373736363637363636
+      3636373635363636363535363535363535363535363535353535353434353435
+      3535343535343434343434343333333333333333333333333333333332333332
+      3233333232323332323232323132323132323132313132313131313132303131
+      3030303031303030303130303030303030302F302F303030302F2F302F302F2F
+      2F2F2F302F2F2F2F2F2E2E2F2F2F2E2F2E2F2E2F2E2E2E2F2E2E2E2E2E2E2E2E
+      2E2E2E2E2E2E2D2D2D2E2D2E2D2D2D2E2D2D2D2D2D2D2D2C2D2C2D2C2D2C2C2D
+      2C2C2C2B2C2C2B2C2C2B2B2C2B2B2B2A2B2B2B2A2B2B2A2A2A2A2A2B2A2A2A2A
+      2A2A2A2A2A2A2A2A2A2B2B2B2B2B2B2B2B2B2B2B2B2B2A2B2A2B2B2A2A2A2C2B
+      2B2B2B2C2B2B2B2B2B2B2B2B2B2B2C2C2C2C2C2B2B2B2B2B2B2C2C2C2C2C2B2D
+      2D2D2C2B2C2D2C2D2D2C2C2E2D2D2D2D2D2E2E2E2D2E2D2D2E2E2E2E2E2F2F2F
+      30303030302F3031303131313232323232323232323333343334333434343535
+      363636363737373737373837383838383A393A39393A3A3A3A3B3C3C3B3C3B3E
+      3E3F4546454848484949494949484B4A4A4C4C4B4C4C4B4D4D4C4D4D4D484848
+      4848484949494949494949494B4A4A4A4B4B4B4B4B4C4C4C4D4D4D4D4C4C4E4D
+      4D4F4E4E4F4E4E4F4E4F504F4F50505050505050505050505051515151515151
+      5151515151515151515151525252525252525151525151525251515152505050
+      4F504F4F504F4F4E4F4E4F4E4E4F4E4D4D4D4D4D4D4D4D4D4C4C4C4C4C4C4A4A
+      4A4A4A4A4948494847484746464646474646464544454343434342434140403F
+      3F3F3F3F3F3F3F3E3C3D3D3D3D3D3A3A3B393A39383938373637363536343534
+      3434343D3C3C4646464747474A4B4B4B4C4B4D4C4D2F2F302929292828272626
+      272626262424242324232323232222212222211F1F1F1F1E1F1F1E1E1D1D1D1C
+      1C1C1B1A1A1B1B1B1A1A1A181819171717171717161516151514141414141514
+      1414141213131213131112111111111110101010101010101010100E0F0E0E0F
+      0E0D0D0D0E0D0D0D0D0D0C0C0C0C0C0C0C0C0C0B0B0C0B0B0B0B0B0C0C0B0B0A
+      0A0A090A0A090A0A090A090A0909090909090909080909090909090908090809
+      0809090808080808080808080807080807070808080708080707070707070707
+      0707070707070707060707070606060606060706060606060606060606060605
+      0505060505050505050505040505050404040404040404040404040404040404
+      0404040404040404040404040403030304040403030303030303030303020302
+      0202030202020302030202020202020202020102010202010201010102020101
+      0102010101020101010101010101000101000001010001000100010000000101
+      0000010001000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303232
+      323939393A3A3A3B3B3B3D3D3D3E3E3E3736372F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F323132383737383737383737373737373737373737373737373737373737
+      3737373737373737373737373637373737373737373737373736363636363736
+      3636363536363536353536353536353536353535353435353535353535343535
+      3534343534343333333433333433333334333333333233333333333332323333
+      3233323232323232313332313232313232313231303231313130313130303130
+      3130303130303030303030303030303030303030302F2F30302F2F2F2F302F2F
+      2F302F2F2F2F2F2F2F2E2F2F2F2F2F2E2E2E2E2F2E2F2F2E2F2E2E2E2E2E2D2E
+      2E2E2D2D2E2D2D2D2D2D2D2E2D2D2D2D2D2D2D2D2D2D2D2D2C2D2C2C2C2B2C2C
+      2C2C2B2C2C2B2B2C2B2B2C2B2B2B2B2B2B2A2A2A2A2A2A2B2A2A2A2A2A2A2A2A
+      2A2A2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2C2C2B2B2B2C2B2C2C2B2B
+      2B2B2C2B2B2B2C2C2C2C2B2B2B2C2B2B2C2B2C2C2C2D2C2C2D2D2D2D2E2E2E2D
+      2E2D2D2D2E2D2E2F2E2E2F2E2E2E2D2E2E2D2E2E2F2E302F2F30303030303031
+      3131323232323232323332333333343434353535363636373637373737373838
+      3838383939393B3A3B3B3A3B3C3B3D3D3C3D3C3C3D3D3D3D3D3E3E3F3F3F4141
+      424848484B4B4B4C4B4C4E4D4D4E4E4D4F4E4D50504F5151505150514C4C4C4C
+      4C4B4C4C4D4D4D4D4E4E4E4F4F4F4F4F4F504F4F4F4F4F515050525151525151
+      5352515452525453535453535352535454545454535554545555555555555555
+      5554545554545454545454545454545454545453535353535453535353535353
+      535353535353535352525351515151515150504F50505050504F4E4E4F4E4E4E
+      4D4D4D4D4C4D4C4A4C4A49494949494847484747474545464544454343444242
+      424141414040403F3F3F3F3F3F3C3D3C3C3B3B39393938383837373737373737
+      37374343434949494B4B4B4C4D4C4E4E4D3F3F402B2C2B2B2B2B292929282828
+      2627272526252524242323232223222221222021211F1F1F1E1E1F1E1E1E1C1C
+      1C1B1A1B1A1A1B19191918191817171717171717161715151614141415141415
+      14151414131213131112121211111011111010101010101010100E0F0F0E0E0F
+      0F0E0E0E0D0D0D0D0D0D0D0D0B0C0C0C0B0B0C0C0C0B0C0B0B0B0B0B0B0B090A
+      0A090A0A0A090A0A0A09090A090A090909090909090909080909090908080909
+      0808090808090808080808080808080808070707070808070807070807070707
+      0707070607070707070606060606060706060607060606060505050506050605
+      0506060505050504050504050405040504040404040404040405040404040404
+      0404040404040404040304030303030303030303030303030303020203020303
+      0203020202020202020202020202010202020202020102010201020102020101
+      0201010101010101010100010101010101010001010000000100010100010100
+      0101010101000100010000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030373737
+      3939393A3A3A3C3C3C3D3D3D3D3D3D3030302F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F35353538373738373737373737373737373737373737373737373737373737
+      3737373737373737373737373737373737373737373637373636373736363636
+      3636353636353635353635353635363635353535353535353535353535343434
+      3434333333343433333334333333343333333333333333333333323232323333
+      3232333232323232323231323231323231323131313131313031313131313130
+      30313030303030313030303030302F3030302F2F30302F302F2F30302F2F2F30
+      2F2F2F2F2E2E2F2F2F2F2F2F2F2F2E2F2F2E2E2F2E2E2E2F2E2E2E2E2E2E2D2D
+      2D2E2D2E2E2E2D2E2E2D2D2D2D2D2D2D2D2D2D2D2D2D2D2C2C2C2D2C2C2C2C2B
+      2C2B2C2C2B2B2C2B2B2C2B2A2B2A2B2B2B2B2A2A2B2B2B2A2A2A2A2B2B2B2B2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2B2C2C2C2C2C2C2B2C2C2C2C2C2C2B2B2B2B2B2C
+      2C2C2C2C2C2C2C2C2C2B2B2C2C2D2D2D2E2D2D2D2E2E2E2E2E2E2E2F2E2E2E2E
+      2F2E2F2F2F2F2F2E2E302F2F3030303131313031313131313232323232323333
+      333334343434353536353636363737373737373838373938383A39393B3C3B3B
+      3B3B3D3D3C3D3D3D3E3D3D403E3F3F3E3F404041414141424242434343434343
+      4A4B4A4E4E4E4F4E4F5250515251525353525353525454535454554F4E4E4F4F
+      4F50515051515152525253525353545355545455555555545455555556565556
+      5656575656575757585757585858585858585858585858585858585858595959
+      5959595959595959595959595959595959595958585858595958585757575757
+      565655565556565555555555565454545454545353535252535151525050504F
+      4F4F4F4F4F4E4E4E4D4D4D4C4B4C4A4A4B494949484848474747454545464545
+      4343434242424141414040403F3F3F3C3C3C3B3B3B3A3A393838393839384141
+      424949494B4B4B4E4E4E504F4F4E4F4F2F2F2F2D2D2D2B2B2B2B2B2B29282927
+      28272626262525262424242323232322222122212021211F1F1F1E1E1E1D1D1D
+      1C1C1B1B1B1B1A1A1A1919191818181617171617171516151514151514151415
+      141414141312131213131111121110111010101010101010100F0F0F0F0E0E0E
+      0E0E0E0D0D0D0D0D0D0D0C0C0C0B0C0C0B0B0C0C0B0B0C0B0B0B0B0B0B0A0A0A
+      090A09090A0909090A0909090A090909090A0909090909090909090809090908
+      0909080808080807080808080707080808080707070807070707070707070707
+      0707070607060707060606060606060606060606060606050606050606060505
+      0505050405050505050405050404040404040504050404040404040404040404
+      0404040404040304030303030303030303030303030303030303020303030203
+      0203020203020202020202020202020102020201020201020102020102010201
+      0101010201010101010101010101010101010101010101010101000101010001
+      0100010000000000000100010000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303030303030303131313939393A
+      3A3A3B3B3B3C3C3C3D3D3D3939392F2F2F2F2F2F2F2F2F2F2F2F2F2F2F303031
+      3837373837373737373737373737373737373737373737373737373737373737
+      3737373737373737373737373737373737373737373737373637373636363536
+      3636363535363536363536363536353535343535343535343434343434343433
+      3334343433333433333334333333333333333333333233333232323333323232
+      3233323232323132323133323132323132313132313032303131303131303030
+      3030313030303030303030303030303030302F2F2F302F302F2F2F302F2F2F2F
+      2F2F2F2F2F2F2F2F2E2F2F2F2E2F2F2F2F2E2F2E2E2E2E2E2E2E2E2E2E2E2E2D
+      2E2D2E2D2E2D2D2D2E2D2D2D2D2E2D2E2C2D2D2D2D2D2C2D2C2C2C2B2C2C2C2C
+      2B2C2C2B2B2C2B2B2C2B2B2B2B2A2B2B2B2B2A2B2B2B2B2B2B2B2B2B2B2B2B2B
+      2B2B2B2B2B2B2C2C2C2C2C2C2C2C2C2C2B2C2C2B2C2C2D2C2D2C2D2D2C2C2C2C
+      2C2D2D2D2C2D2C2D2E2D2F2E2F2E2F2F2E2E2E2F2F2F2F2F2F2F2F2F302F3030
+      2E2F313030313030323131323232333333333232323232333334353535353534
+      353536373737373737383839393939393A3A3C3C3C3B3C3B3D3D3D3E3D3D3E3E
+      3E4040404140414141424241424343434343444443444645464646474847474D
+      4D4D535353535353555354575556575756575756585857585858545454535353
+      5555555555555656565757575857575757575958595A59595A59595A595A5C5B
+      5A5C5B5C5C5B5B5B5B5B5C5C5C5C5D5D5D5C5D5D5D5D5D5E5D5D5D5D5D5C5D5D
+      5D5D5D5C5C5C5C5D5C5C5C5C5C5C5C5C5C5B5B5C5C5B5C5B5B5C5B5B5B5B5B5B
+      5B5B5B5A5A595859585858585858585757575656565555555555555454545251
+      525151515150514F4F4F4F4E4F4D4D4D4B4B4B4B4B4B49494948484847474746
+      46464545454343434242414040403E3E3E3D3D3D3C3C3C3C3B3B3C3C3C484948
+      4D4E4D4E4E4E5050505152524142422E2E2E2E2E2E2D2D2D2B2B2B2A2B2B2928
+      282727272627262324242323242323222122222121211F1F1F1E1E1E1E1E1E1D
+      1D1D1C1C1B1A1A1A19191A181818171716171617161515151515151414141414
+      1413141414141313121112111111111010101010101010100F0F0F0E0F0E0E0E
+      0F0D0D0E0D0E0D0D0D0D0B0C0B0C0C0C0B0C0B0C0C0B0B0B0B0B0B0B0A0A0909
+      09090A0A0A0A090A090909090909090909090909090909090808080808080808
+      0908080808080808080808080807080807080707070707070707070707070707
+      0707070706060706060706060606060606060605060605060606050605060505
+      0505050505050404040505040504040404040504040505050405040404040404
+      0404040304030303030403030303030303030303030303030302030302030202
+      0202020202020202020201020202010202020101010202020201010101010102
+      0102010101010101010101010001010101010001000100000001000001000000
+      0001000000000100000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303434343939393A3A
+      3A3B3B3B3D3D3D3E3E3E3232322F2F2F2F2F2F2F2F2F2F2F2F2F2F2F34343438
+      3737383737373737373737373737373737373737373737373737373737373737
+      3737373737373737373737363637373737373737363737363736363636353635
+      3636353536353536353536353535353534343434343433343434343434343433
+      3333343333333433333333333333333333333333333333333233323232323232
+      3333323332313232313232313132313231313131313131313130313130303031
+      3030303130303030303030303030302F30302F2F30302F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2E2F2E2F2E2E2F2F2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+      2E2D2D2E2D2D2D2E2D2E2D2D2D2D2D2D2D2D2D2D2D2D2D2C2D2C2B2C2C2B2C2B
+      2C2C2B2B2C2B2B2C2B2B2B2A2B2C2C2B2B2C2B2B2C2B2B2B2B2B2B2B2B2B2B2C
+      2C2C2C2C2C2C2C2C2C2C2C2C2C2C2D2D2D2C2D2D2D2D2C2D2C2D2D2D2D2E2D2D
+      2E2E2E2F2F2F2E2F2E2F2E2F2F302F2F302F3030303030303131313131323232
+      3232313233323234333333323334343334343436353536363637373738383838
+      37373A3A393A3A3A3B3B3B3C3C3C3D3D3D3E3D3E3E3E3E414040414141424242
+      4242424443434544444645464746474747484849494949494B4A4B4B4C4C4F4F
+      4F5656565756575858575B595A5B5B5B5C5C5B5C5D5C5C5C5B58585959595859
+      59595A5A5A5B5B5B5B5B5B5C5C5C5C5C5C5D5D5D5E5D5D5F5E5E5F5E5E5F5E5F
+      605F5F6060606060606060606161616060606262616162616161616161616262
+      626261616161626161616160616160616060606060615F5F5F5F5F5F5E5E5E5E
+      5D5D5E5D5E5C5C5D5C5C5C5B5B5B5B5B5B5A5A59585859575757575656565556
+      5554545353535251525050505050504E4E4E4D4E4E4B4B4C4A4B4A4949494848
+      484747474544444443444141424141413F3F3F3E3E3E3C3C3C4646464E4E4E4F
+      4F4F5252525353535050503132313130302E2E2E2E2E2E2D2D2D2A2B2A2A2A29
+      2928282727272525252424242323232222222221212020201F1F1F1E1D1E1D1C
+      1D1C1B1B1A1A1A1A1B1A19191918171817161717171615161514141414141414
+      1414141414131213111111111111101010101010100F1010100F0F0F0F0F0E0F
+      0D0D0D0D0D0D0D0D0D0B0C0C0B0B0C0C0B0C0B0B0C0B0B0B0B0B0B0A0A0A0A0A
+      0A0A0A09090A0A09090909090A09090909090908080809090808090808090908
+      0808080808080808070807080708070808070707070707070707070707060706
+      0706070706060606060606060606060506060605060605050505050505050505
+      0505050505050504050505050504040404040404040404040504050404040404
+      0404040303030403030303030303030303030303030203030302030202020202
+      0202020202020202020202020202020201020202010101020201020102010102
+      0101010101010101010001010001000101010001010101000000000100010000
+      0100000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030303131313737373939393A3A3A
+      3C3C3C3D3D3D3C3C3C2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F303737373837
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737373737373737373737373737373736363736373636363636363536373536
+      3635353635363635353434343434343434343434343434343434343433333333
+      3334343333333333333333333333333333333333333233333232333332333233
+      3332323231323231333232323131323131323031323130313130313030303031
+      3030303030303030303030303030302F2F2F30302F2F2F2F2F2F2F2F2F2F2F2F
+      2F2E2F2E2F2F2F2F2F2F2F2F2F2E2E2F2E2E2F2E2E2F2E2E2E2D2D2E2E2E2D2E
+      2E2E2D2D2E2D2D2D2D2D2D2D2D2D2D2C2D2D2D2D2D2C2C2D2C2C2C2C2C2C2B2B
+      2C2B2B2C2B2B2D2C2C2C2B2C2C2C2B2B2B2C2B2B2B2B2C2B2C2C2C2C2C2C2C2C
+      2C2C2C2C2C2C2C2D2D2D2D2D2D2D2D2D2D2D2D2E2D2E2F2E2E2E2E2E2F2F302F
+      2F2F2F2F2F2F2F302F2F30303030303030313131323132333232323233343434
+      3433343433333534343636363636363737373838383838383939393A3A3A3C3B
+      3C3C3C3D3D3D3D3E3F3E3F3F3F41414041414142424242434244444445454547
+      47474747474848484A49494B4A4B4B4B4C4D4D4D4D4D4E4E4F4E504F4F535353
+      5B5B5B5C5B5C5D5C5D5D5D5C5F5F5F60605F6161606060605C5C5C5D5C5C5E5D
+      5D5E5E5E5F6060605F5F60606062616162616162626263636364636363636364
+      6464656565656565656565656565656565656565666666666666666666656565
+      6666656566656565666565656464646464636364646463636262626262626262
+      626061616060615F5F5F5E5E5E5D5D5D5D5D5D5B5B5B5A5A5A5A595A58575857
+      57575655565455555353535252525050505050504E4E4D4D4E4D4B4B4B4A4A4A
+      4949494748474544454343434242424141414040404140414F4F4F5151515353
+      535454545556564141413333333130303030302E2E2E2E2E2E2B2B2B2A2B2A29
+      29292727272626262525242423232323232121212121211F1F1F1E1E1E1D1E1D
+      1D1D1D1A1A1A1A1A1A1919191818181717171617161516151514141414141414
+      14141414131313131312111111101110101010101010100F100E0F0F0F0F0F0D
+      0E0D0D0D0D0D0D0D0C0B0C0B0B0C0B0B0B0B0C0B0B0B0B0B0B0B0A0A090A0909
+      0A09090A0A090909090A09090909090909090908090809090809080808080808
+      0808090808080807080808070808070707070707080707070707070707070607
+      0606070606070607060606060606060606060606050606050505050505050405
+      0405050505050405050405040405040405050405040404040404040404040404
+      0304040403040303030303030303030303030303020303020202020202020202
+      0202020202020202020202020201020102020201020102020102010201010101
+      0102010101010101010001010101010100010000000100000101010001000100
+      0000000000000000000100000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303333333737373939393B3B3B3D
+      3D3D3E3E3E3535352F2F2F2F2F2F2F2F2F2F2F2F2F2F2F333333383737373737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737373737373737373737373637373637373637363637363636353636363536
+      3536343534343534343434343434343433343434343434343334343434333433
+      3433333333333333333333333332333332333233333332333233323332323232
+      3232323133323232323132323132313132313131313132303031313130313030
+      3030303030303030303030302F302F302F302F302F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2E2F2F2F2F2E2F2F2E2E2E2E2E2F2F2E2E2E2E2E2E2E2E2E2E2E2E2D2E
+      2E2E2D2E2D2E2D2D2D2D2D2D2D2D2C2D2D2D2D2C2C2C2D2C2B2C2C2B2C2B2B2D
+      2C2C2D2C2C2C2C2C2C2C2B2C2B2C2B2B2B2C2D2C2C2C2C2C2C2C2C2C2C2C2C2C
+      2D2D2D2D2D2D2D2D2D2D2D2D2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F3130313030
+      3030303031313031313131313233333433333334343434343434353535353536
+      35363736363837373838373838383939393A3B3A3B3B3B3D3D3D3D3D3D3D3D3D
+      3F3E3E4040404141424242424342434444454546454847484848484949494A4A
+      4A4B4B4C4D4C4D4E4D4E4E4E4E4F4F50504F505252525252525455555858585F
+      5F5F606060616061626162636362656564656564656565606060616161626262
+      6463636463636464646664646665666766666766666767666868686969686969
+      68696969696969696A6A6B6B6B6B6A6B6A6A6A6A6A6A6A6A6A6A6A6A6A696A6A
+      69696A6969696969696969696969686868676867676768666666666666646564
+      646464636363636363626262606061605F605E5E5E5E5D5E5D5C5D5C5B5C5959
+      595959595757575656565454545253535252525050504F4F4F4D4D4D4C4C4C4A
+      4A4A4948494747464545454343434343434141414C4B4B525352545454565656
+      5858584F4E4F3635363433343232323031302F2F2F2E2E2E2C2C2C2B2C2B2A2A
+      2A2828282727272625262324242323232222232122212020201E1F1F1D1E1D1C
+      1C1D1C1C1C1A1A1A1A1A1A181818171717171716151516151515141414131414
+      1414141212131312121111111011100F1010100F10100F100E0F0F0F0E0E0D0D
+      0D0D0D0D0D0D0D0C0C0C0B0C0C0C0B0B0B0B0B0C0B0B0B0B0B0A0A0A0A0A0A0A
+      0A0A09090909090A0A0A09090909080909080809090809090908080808080808
+      0908090808080808080708070707080707070707070707070707070706070606
+      0606070606060606060606060606060605060505050506050505050505040505
+      0405050505040505050405050505050405040405040404040404040403040404
+      0404030403030303030303030303030303030303020203030203020203020202
+      0202020202020202020201020201010102020101020102020101010101010201
+      0101010101010101010100000101000100000000010101010100010000000000
+      0001000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000030303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303535353838383A3A3A3C3C3C3E3E
+      3E3F3F3F3030302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F36363638373737373737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737373737373637373737363737363637363636353735363636353434343434
+      3435343434343434343434343434343434343433343334333433343334333334
+      3334333333333433333333333332333333333233323233333333333332323332
+      3232313232323232313232313131313230313231303230313131303030303130
+      30303030303030303030302F302F2F302F2F302F302F2F302F2F2F2F2F2F2F2F
+      2F2E2F2F2E2E2F2E2E2F2E2E2E2E2E2E2E2F2E2E2E2E2E2E2E2E2E2E2E2E2D2E
+      2D2E2E2E2D2D2D2D2D2D2D2D2D2D2D2C2D2D2D2C2C2C2C2B2E2D2C2D2C2C2D2C
+      2C2D2C2C2D2C2B2C2C2B2D2C2D2D2C2D2C2D2C2C2C2D2C2C2C2D2D2D2D2D2D2D
+      2D2D2D2D2D2E2E2E2F2F2F2F2F2F2F30302F2F2F313130313031313131313131
+      3132323233333433333333333435343535353535353635363837383737373938
+      393938383A39393B3B3A3B3B3A3C3D3C3D3D3D3E3E3E3F3F3F41414141414143
+      43434344434546454646464848484848484949494A4B4A4C4C4C4D4D4D4E4E4E
+      504F505151515251525453545454545555555655565757585858585E5E5E6363
+      636565656564646766666968686A6A696A6A6967686866656567676767676768
+      68686868686969696A6A6A6B6B6A6C6B6B6C6B6B6C6B6C6D6C6C6E6D6E6D6D6E
+      6D6D6D6E6E6E6E6E6D6F6F6F6F6F6E6F6F6E6E6E6E6F6F6F6F6F6F6E6E6E6E6E
+      6E6E6E6E6E6E6E6D6D6D6C6D6D6C6C6C6C6B6B6B6B6B6A6A6A696A6A69686968
+      68686867686666666565656464646463636262636160615F5F5F5E5E5E5D5D5D
+      5C5B5C5959595959595757575656565454545352525151515050504E4E4E4D4D
+      4D4A4A4A49494A4747474647464545444847495353545556565757575959595B
+      5B5B3D3D3D363736363536333333313131302F302F2F2F2E2E2E2D2D2C2B2B2A
+      2929292727272627262525252323242323232121212121211E1F1F1E1E1D1E1D
+      1D1B1B1B1A1B1A1A1A1A19191918181816161616161615151514141414141414
+      141313121312131211111111101010101010101010100F0F0E0E0E0F0F0D0D0D
+      0D0D0D0D0D0D0C0C0C0C0C0C0B0B0B0C0B0B0B0B0B0B0B0B0A0A0A090A090A09
+      0A0A0A090A090A09090A09090909090809090809080909090808080808080808
+      0808080808080708070707070708070707070707070707070707070707070607
+      0707070606060606060606060606060605060506050505050505040505050505
+      0505050505050505050504050405040504040404040404040404040403040404
+      0403030303030303030303030303030302020203030203020203020202020202
+      0202020102020202020201010201010102010202010102010101010101020101
+      0101010101010101000100010101010100010101000000010100010000000001
+      0000010000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000003030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303535353838383A3A3A3C3C3C3E3E3E3D3D3D
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F303737373837373737373737373737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737373737373736373636373736373635373636353535353434343434343534
+      3434343434343434343434343434343434343434343333343434343433333433
+      3333343333333333333333333332333333333333323332333332323232323232
+      3231323232323231323231313131323030323131313030313030303030313030
+      303030303030302F303030302F30302F2F2F2F2F302F302F2F2F2F2F2F2F2F2F
+      2F2F2F2F2E2E2E2F2E2F2F2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2D2E2D2D2E2E
+      2E2D2D2E2D2E2D2D2D2D2D2D2D2D2D2D2C2D2E2D2D2D2C2D2D2C2D2D2C2D2C2C
+      2D2C2C2E2D2D2D2C2D2D2C2D2C2D2C2C2C2C2D2D2D2D2D2D2D2D2D2D2D2D2E2E
+      2E2F2F2F30303030303030303031313131303031313231313132323232333334
+      33343433343434343535353535353737373837383939393939393A39393B3A3B
+      3C3C3B3D3C3C3D3D3D3E3D3E3F3F3F4040404243424343434344444545444646
+      464847474848484A4A4A4B4B4B4D4D4D4D4D4D4F504F50515052525253525254
+      54545555565655565858585858595B5A5B5B5B5B5C5D5C5D5D5D656464686868
+      6A6A6A6A6A696C6C6C6D6D6C6F6F6E6F6F6E6C6C6C6A6A6A6C6C6C6D6D6D6D6D
+      6D6E6E6E6F6E6F6F6F6F70707071707071707071717172727272727273727272
+      7272727272737373737373737373747474747474747474737473727273727273
+      7272737171717171717171717070707070706F6F6F6E6E6E6E6D6E6D6C6D6C6C
+      6C6B6B6B6A6A6A696969686767676667656565646364636263616161605F605E
+      5E5E5D5C5C5B5B5B5959595959585657565555565353535252525151514E4E4F
+      4C4C4C4B4B4B4949494848484848485353525958595959595B5C5B5D5D5D4E4E
+      4E393939383838373637343434343333313131302F302E2E2E2E2E2D2C2B2B2A
+      2A2A2828282626272625262324242323232222222120212020201D1D1D1D1D1D
+      1C1C1C1A1A1A1A1A1A1919191717171717171616161515151414141414141414
+      13141314131213111211101110101010100F101010100F0E0E0F0F0E0E0E0D0D
+      0D0D0D0C0D0C0B0C0C0C0C0C0B0C0C0B0C0B0B0B0B0B0B0A0A0A0A0A0A09090A
+      090A0A0909090909090909090909090908090908080808090809080808080808
+      0808080807080708070707070807080807070707070707070707070706060606
+      0706070606060606060506050505060506050505050505050505050504050505
+      0505050505050505050505050405040504040404050404030404040404030303
+      0303030303030203030303030203020302030302020202020302020202020302
+      0202020201020202010202010201020102020101010101010101010102010101
+      0101010101010101010100010100010101010100010001010001000100010000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303232323535353737373A3A3A3C3C3C3E3E3E3333332F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F343434383737383737383737373737373737373737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737373737373637373637363636363635333435343335343434343434343434
+      3434343434343435343433343434343434343433343333333434343333343333
+      3333333433343333333332333333333333333233333333323332323233323232
+      3232323232323132323131313131313132313032303031303030303130313130
+      30303030302F2F3030302F302F2F2F302F2F302F302F302F2F2F2F2F2F2F2F2F
+      2F2F2F2F2E2F2E2F2F2F2E2E2E2E2F2E2E2E2E2E2E2D2E2E2D2E2D2E2E2E2E2E
+      2E2E2D2D2D2D2D2D2D2D2E2E2E2E2E2E2E2E2D2D2D2D2E2D2C2D2C2C2E2D2D2E
+      2D2D2E2D2D2D2D2D2D2D2C2E2D2D2D2D2D2D2D2D2D2D2D2E2E2E2F2F2F303030
+      3030303030303131313131313131323232323333323333333434343535353535
+      353635353636363737373838383939393A39393B3B3A3B3B3C3C3B3C3E3D3E3E
+      3E3D403F3F403F3F4242424242424343434444444646464848484948494A4949
+      4B4C4B4D4D4D4E4E4E4F4E4F5151505352525454545455545656565858585959
+      595A5A5A5B5B5B5D5D5D5D5D5E5F5E5F6161616262626362626969696D6D6D6F
+      6E6E6F6E6F7271707272717373727474737170716F6F6F717171727171737272
+      7373727474747574747575757676767676767777767777777777777878787878
+      7878787878787779787879787879787878787878787878787876777677767776
+      76767676767675767576757474757373737373737272727171717070706F6F6F
+      6E6E6E6D6D6E6C6C6C6A6A6B6A696A6868686767676565656464646262626161
+      615F605F5F5E5F5C5C5C5B5B5B5959595857585556555454555252524F50504F
+      4F4E4D4C4C4C4B4B4A4A4A5050505B5B5B5E5D5E5F5F5F6161606060603F3F3F
+      3A3A3A3939393738373536353333333131322F30302F2F2F2E2D2D2C2C2C2B2A
+      2A29292926272726252525242523232322222221202120201F1F1F1F1E1D1E1C
+      1D1D1C1B1B1A1A1A191919181718161716161616151515141414131414141414
+      1414141213121211121010111010100F101010100F0E0F0E0F0E0E0E0D0E0D0D
+      0D0D0D0D0C0C0C0C0B0B0B0C0B0B0B0C0B0B0B0B0B0B0A0A0A0A090A09090909
+      0A09090909090909090909090909090909080809090808080908080908080808
+      0808080807080808080807070807070707080707070707070706060606060606
+      0606060606060605050506050605050505050505050505050405050505050505
+      0505050505050505040405040404040404040404030404030304030303030304
+      0303030303030303030302030303020302020202020202030202020202020202
+      0202020102020202020202020101020201010102010201020101010101010101
+      0101010101000001010101010100010001010000010001010001000000000100
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303333333535353838383A3A3A3C3C3C3A3A3A2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F30303138373738373738373738373737373737373737373737373737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737363737363636363433343434343533333434343434343435343435343434
+      3434343534343434343434333434343434333434343433343334333433333333
+      3333333333333333333333333233333333333333323233323232333232323232
+      3232323232313232313231313131313131303231303131303030303031303030
+      30303030303030302F2F2F2F2F2F2F2F2F2F302F30302F2F2F2F2F2F2F2E2E2F
+      2E2F2F2E2F2E2E2E2F2F2E2E2E2F2E2E2E2E2E2E2E2E2E2E2D2E2D2E2E2D2D2E
+      2E2D2D2E2E2E2E2E2E2E2E2E2D2E2E2E2E2D2D2D2C2E2E2E2E2D2D2E2D2D2E2D
+      2C2D2D2D2E2E2E2E2D2E2D2D2D2E2E2E2E2E2E2F2F2F30303030303030303031
+      3131313131323232323132333332343433343534363536353535353636363736
+      39383838383939393A3B3A3A3B3B3B3D3D3D3E3E3E3F3E3E3F3F3F4140414241
+      414343434343434545444545454747474848484949494C4C4C4C4D4D4E4E4E4F
+      4F4F5050505253535353535454555756565958585959595B5B5B5C5C5B5E5E5F
+      5F5F5F6060606261626262636564656565666767676868686F6F6F7373737372
+      7376757476767578787778787778787874747576757577767677767678777779
+      79797978797A79797B7B7A7B7B7B7B7B7B7C7C7C7D7C7D7C7D7C7D7D7D7D7D7D
+      7D7D7D7D7D7D7D7D7D7D7D7C7D7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7B7B
+      7B7B7B7B7A7A7A79797979797978787877777776767675767674747473737372
+      7272717171706F706E6E6E6D6D6D6C6C6C696969686868676767666566636364
+      6262626161615F5F5F5E5E5E5B5B5B5A5A5A5859585555555454545251525051
+      504F4F4F4F4E4E5050505E5E5D6060606363636566656667664D4D4D3D3D3D3C
+      3C3C3939393839383636363434343233323131302F30302E2E2E2D2E2D2B2B2B
+      2A2A2A2828282726272525252323232323232121212021211F1F1E1D1E1E1C1D
+      1D1B1B1B1A1A1A19181817181816161617171715161514141413141414141314
+      131312131211111111111110101010100F100F100E0E0E0F0E0E0E0D0D0D0D0D
+      0D0D0D0C0C0C0C0C0C0B0B0B0B0B0B0B0B0B0B0B0B0A0A0A090A0A0A0A0A090A
+      0A090909090A0909090909090909090909090908080808090808080808080808
+      0807080707080708070808070707070707070707070707070607060606060606
+      0606060606060606060506060505060505050505050505050505050505050505
+      0504050404050505040405040404040404040404040404040403030303030403
+      0303030303030303030303020302030302030302030202020202020202020201
+      0202020101020201020101020102020101020101010201010101010101010100
+      0101010001010101010101000101000101000000000100000100000000010000
+      0001000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303031313134
+      34343636363838383B3B3B3D3D3D3232322F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      3535353837373837373837373837373737373737373737373737373737373737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3636353534343434343434343434353434343433343434353435343435353534
+      3435343434343434343434343433343434343434343434343433343433333333
+      3333333333333333333332333333323333333232323333333232323232323132
+      3232323231323231323131323031323131313031313130303031303031303030
+      303030302F30302F2F2F2F2F2F2F2F2F302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2E2F2F2F2F2E2F2F2E2E2E2E2E2E2E2E2E2E2E2E2D2E2D2E2E2D2E2E2D2E2E2F
+      2E2E2E2E2E2E2E2E2E2D2E2E2D2E2E2F2E2F2E2E2E2E2D2E2E2D2E2D2D2F2E2E
+      2F2D2E2E2D2E2E2E2E2F2F2E2F2F303030303030303030303131313131313232
+      323232323333333535353534353635363636363636363737373939393A3A3A39
+      3A3A3A3A3A3C3C3C3E3D3D3E3E3E3F3F3F404040424142434243444343454444
+      4645454847484848484A4A494B4B4B4C4C4C4E4E4E4F4E4F5051505252525353
+      535555555757575959595A5A595C5B5B5D5D5D5F5F5F60606060606164636465
+      646566656667676768686969696A6A6A6B6C6D6D6F6E6E757575787878787778
+      7B7A7A7B7B7A7D7D7C7D7D7C7D7D7D7A79797B7A7A7C7C7B7D7C7C7E7D7D7F7E
+      7E7E7D7E80807F81808180808180808080818182828282818182828283828282
+      8282828282828282828282828282828282828282828282818181818180807F80
+      7E7E7E7E7E7E7E7E7E7E7E7D7B7B7C7B7B7B7A7A7A7979787879797676767575
+      757474747372737171716F6F6F6E6E6E6C6C6C6B6B6B69696968686866666665
+      6464636463626262605F605E5E5D5B5B5B5A5B5B575757565656555555535353
+      5354535959596363636666666868686A6A6A6A6A6B6161614040403F3F3F3B3C
+      3B3B3A3B3939393737373636363333333132312F30302F2F2F2D2D2E2B2B2B2A
+      2A2A2727282627272525252323232323232222212020201F1E1F1E1D1E1E1D1D
+      1B1B1C1A1A1A1A1A191717181716171616161516151414141314141314141413
+      141212121212121010101010101010101010100F0F0E0E0E0E0D0D0D0D0D0D0D
+      0D0D0C0C0C0B0C0B0B0B0C0B0B0B0B0B0B0A0A0A09090A0A0909090A0A090A0A
+      090A090909090809090909090909080908090808080808080808090808080808
+      0808070807080808070707070707070707070706060606070706060706060606
+      0506060606050605060605060505050505050505050505050505050505050405
+      0504050404050405040404050404040304040404030304040403030403030303
+      0303030303030203020203030302030202020202020202020202020202020201
+      0101020202020102020102020101010201020201010102010201010101010101
+      0101010100000101000001000100010001000000000000000100000001000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303333333434343737
+      373939393C3C3C3A3A3A2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F31313138383738
+      3737383737383737383737383737373737373737373737373737373737373737
+      3737373737373737373737373737373737373737373737373737373535353434
+      3434343334343434343335343434343334343435343435343434343534343434
+      3434343434343434343434343433343333333434333433333433333433333433
+      3333333333333233323333333233333333333332333333323333323232323232
+      3132323132313131313131313032313132313131303130303030303030303030
+      30303030302F302F302F303030302F302F2F2F2F2F2F2F2F2F2E2F2F2F2E2E2F
+      2E2F2F2E2E2F2E2E2E2E2E2E2E2E2E2E2D2D2D2E2E2D2E2D2E2E2E2E2E2E2E2D
+      2D2D2E2D2D2D2D2D2D2C2E2C2D2D2D2C2D2C2C2C2C2D2D2D2D2D2D2D2D2D2C2D
+      2D2C2E2E2E2E2E2E2F2F30302F30303030313131313131323232323232343434
+      3535353535353636353637363636363839383A39393A3A3A3B3B3B3A3B3B3D3D
+      3D3E3D3E3E3E3E3F3F3F4141414242424444444444444645464746474848484A
+      49494B4A4B4D4D4C4D4E4D4F4E4F515251535353535353565556585757585858
+      5A5A5A5C5C5C5E5E5E5F5F5F6061606362626464646565656666676868686A6A
+      6A6B6A6B6D6D6D6D6D6D6F6F6F7171717372737675767C7C7B7C7D7C7E7E7E80
+      807F8180818282818383828181817F7F7F818080828181828181848383848383
+      8484848585858586858585858686868787878787868887878788888787878787
+      8787878787878787878787878787878787878786868685858685858584848484
+      84848382828281828180808080817F7F7F7E7E7E7D7C7D7B7B7B7B7B7B797879
+      7877787676767575757373737272717070706F6F6F6D6C6D6B6B6B6969696767
+      67666666636363616261605F605E5D5D5C5C5C5B5B5B5959595959595D5D5D66
+      66666A6A6A6C6C6C6D6D6D7070706F6F6F5E5D5E4444444242423F3F3F3E3E3E
+      3C3C3B3A3A3A38383837363633343433333331313030302F2D2D2D2C2C2C2A2A
+      2A292929272727262525232323232323212221212121201F1F1E1E1D1D1D1D1C
+      1B1B1A1A1A1A1A1A191819161617161616151516141414141413141314131413
+      131212111111101010101010100F0F0F100F0E0F0F0E0E0E0D0D0E0D0D0D0C0C
+      0C0C0B0C0C0C0C0B0B0B0B0B0B0B0C0B0A0A0A0A0A0A0A0A09090A0A0A090A09
+      0A09090909090909080909080908090808080808080908080808080808080808
+      0808070808070807070707080707070607070707060707070706060606060606
+      0506050606060605050505050505050505050505050505050505050504050504
+      0504040504040404040404040304040403040404040303040303030304030303
+      0302020303030303030203020302020203020202030203020203020202020202
+      0201020102020202020101010102010101010101010101010101010101010101
+      0101010001010100010100000001010100010000010100010001000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303131313434343535353838383A3A3A
+      3D3D3D3232322F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3635353838373837373837
+      3738373738373738373737373737373737373737373737373737373737373737
+      3737373737373737373737373737373737373737363636343434343434343434
+      3433333433343434343534343434353535353534353434343434343434353435
+      3434343434343434343434343434333333343434333333333334333433333333
+      3333333333333333323333323233323333333332333232323232333232323232
+      32323132323132313131313132303032303131303030303030313030302F3030
+      30302F302F2F302F3030302F2F302F302F2F2F302F2F2E2F2F2F2F2F2F2E2F2F
+      2F2E2F2E2E2E2E2E2F2F2E2E2D2D2D2D2C2E2D2E2D2D2D2D2E2D2D2D2E2D2E2E
+      2D2D2D2E2E2E2E2D2D2E2C2D2D2C2C2E2E2D2D2D2E2D2D2D2D2D2D2E2D2E2F2E
+      2F2F2F30302F2F302F2F303030302F3031303131313133333335353535353536
+      36363737373737373939383A3A3A3A3A3A3B3B3C3C3C3C3E3E3E3F3E3E3F3F40
+      4041414242424343434444444546464646474848484949494B4A4B4D4C4C4E4D
+      4D4F4F4E5151515252525353545555555757575858585B5B5B5B5B5B5D5D5D5F
+      5F5F6161616263636464646665666767676969696B6B6B6C6C6C6D6D6D707070
+      7171717272727373747575757677777978797B7B7B8281818383828584848686
+      868887878888878A8A898585858685858686868787878888888988888989898A
+      8A8A8B8A8A8A8A8A8B8B8B8C8C8C8C8C8C8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D
+      8D8D8C8D8D8D8C8C8D8C8C8D8C8C8C8B8B8B8B8B8B8A8A8A8989898989898888
+      888787878686868585858585848383848282828080808080807F7E7F7D7D7D7B
+      7B7B7A797A787878767676747474737373717171706F706E6D6E6B6C6B6A6A6A
+      6868686565656464646363626060615E5F5E5E5E5E6262626B6B6B6D6D6D7070
+      707272727474747575756363634848484646464444444343434141413F3F3F3C
+      3C3C3A3B3A3939393737373435353332323132322F2F2F2E2E2E2D2D2D2B2B2B
+      2A2A29272728272726242424232323212222212020201F1F1E1D1E1D1D1D1D1C
+      1C1A1A1A1A191918191817171616171615151514141414141314141413131412
+      1213111111101010101010100F0F1010100E0F0E0E0E0E0E0D0D0D0D0D0C0C0C
+      0C0B0C0C0B0B0B0B0C0B0B0B0C0B0B0A090A0A0A0A09090A0909090909090A09
+      0A09090908090909090809090809090808080808080908080808080808080808
+      0708070707070707070707070707060706070706060606060606060606060606
+      0606060605060605050505050505050505050505050505050505050504050505
+      0505040404050404040404040403040304040404030404030403040403030302
+      0303030303020203030203020302020202020202020202020202020202010202
+      0202010102010101020202010201020101020101010101010101010101010100
+      0101010001010100010100010001010001010100000000000001000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303232323434343636363939393B3B3B3A3A3A2E
+      2E2E2F2F2F2F2F2F2F2F2F2F2F2F323232383837383837383737383737383737
+      3837373837373737373737373737373737373737373737373737373737373737
+      3737373737373737373737373737373634343434343434343434343434343434
+      3434343334343535353435353535343534343435343534343434353534343434
+      3434343434333434343434333434343334333434333333343333343333333433
+      3333333333333333333233333333333333323333323233333232323132323132
+      3231323231323130323130313031323030313030303030303030303030303030
+      303030302F302F2F2F2F2F2F2F2F2F302F2F2F2F2F2E2F2F2F2F2F2F2F2E2E2E
+      2D2E2D2E2D2D2D2D2E2D2E2E2E2E2D2E2D2D2E2D2D2E2E2E2D2D2D2E2F2E2E2E
+      2E2E2E2E2E2E2D2D2F2E2D2F2D2D2E2E2E2D2D2D2E2E2E2F2F2F303030302F30
+      3030303030303031303231313231323332333333333333333434343636363737
+      373939393A3A3A3B3A3A3B3C3B3C3C3C3E3E3E3F3F3F403F3F40414143434343
+      44434444444646464848484949484A4A4A4C4D4C4D4D4D4F4E4F515050525252
+      5353535555555757565858585A5A5A5C5C5C5D5D5D605F5F6262616363636464
+      646666666768676969696B6C6B6E6D6E6F6F6F70707072727274737475757677
+      777778787879797A7B7B7B7C7D7D7E7F7E8484848787878989898A8A898B8B8A
+      8D8C8B8E8E8E8D8D8D8B8B8B8B8B8B8C8C8C8D8D8D8E8E8E8E8E8E8F8F8F9090
+      9090909091919191919191919192929292929292929292929292929291919291
+      92929292929191919191919090909090909090908F8F8F8E8F8F8D8D8D8C8C8C
+      8C8C8C8B8A8B898989888888888888868686858485838383828182807F807E7E
+      7E7D7D7D7C7C7C79797A7878787676767474747272727171716D6D6D6C6C6C6B
+      6B6B686868676667656565656565676768707070717171747474767676797979
+      7A7A7A6969694E4E4E4D4D4C4A4B4B4747484545464444444242423F3F403D3E
+      3D3C3C3B3A3A3A3838383635363434333231312F2F302F2F2F2D2D2D2B2B2B29
+      292A2828282626262425242323242323222121212020201E1E1F1D1D1D1C1C1C
+      1A191A1A1A1A1818191717181616161515151414141414141313141314141212
+      12111112101011101010101010100F0F0F0E0E0E0F0E0D0D0D0D0D0D0C0B0C0C
+      0B0B0B0B0C0B0B0B0B0C0B0B0B0B0A0A0A090A090A0A0A0909090A090A09090A
+      0909090909090909090909080909080908090808080808080808080807070807
+      0708070707070707070706070707070606060706060706060606060606060606
+      0506050506050505050505050505050505050505050505050505050404050404
+      0404040404040404040404040403040404040303040303030303030303030303
+      0303030203020303030202030302020303030302020202020202020202020202
+      0202020102020102010101020202010101020101020102010101000101010101
+      0100000101000001010101010000010000000000010101000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000030303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303131313434343535353838383A3A3A3C3C3C3232322F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F37373638383738383738383738373738373738373738
+      3737383737373737373737373737373737373737373737373737373737373737
+      3737373737373737373535353434343434343434343434343434343434343535
+      3435353535343435343535353435353534343435343435343434343434343434
+      3434343434343434343334343434343333333334333434333333333333333333
+      3333333333333333333233333233323233323233323232323332313232323232
+      31323231323131323131313030323030313030303030303030303030302F3030
+      302F2F3030302F303030302F2F2F2F2F2F2F2F2F2F2E2E2E2E2E2E2D2E2E2D2E
+      2D2D2D2D2D2E2E2E2E2E2E2E2E2E2E2E2E2E2D2E2E2E2F2F2E2E2E2E2E2E2E2E
+      2E2E2E2E2E2E2E2E2E2D2E2D2E2F2F2E2F2F2F30303030303030302F30303131
+      3030313131323232333333343335343334343434353535363636373737383838
+      3A3A3A3B3A3A3C3C3D3F3F3F3F3F3F4040404242434243424444444645454747
+      484848484949494C4C4C4D4D4D4E4D4E51515052515253525355535457575758
+      58585A5A595B5B5B5D5D5D5F5F5F616161626362656464676666686868696969
+      6B6C6C6D6D6E6F6F6F7170707473737575757676767877787B7A7B7C7C7C7D7D
+      7D7F7F7F8080818181818484848585858B8B8B8E8E8E8F8F8F90909091909093
+      9292949493929292919190929292939393939393949494949494959595959595
+      9696969797979797979797979797979797979797979797979797979797979797
+      9797979797979797979796969695959593949493949493939392929291919190
+      91918F8F8F8E8E8E8D8D8D8B8B8B8A8A8A888888878788858585848484828282
+      8080807F7F7F7C7C7D7C7C7B7A797A7777777575757373737071706E6E6F6D6D
+      6D6B6B6B6B6B6B6D6D6D7575757777777878787B7B7B7D7D7D7E7E7E6E6E6E55
+      555552525250504F4D4D4D4B4C4C494A494747474444444343434140413F3F3F
+      3C3C3C3A3A3A3939393636363535353333323030302F2F2F2D2D2D2C2C2C292A
+      2A2727272626262424252323232323222121211F1F1F1E1F1E1D1E1D1C1C1C1A
+      1A1A19191A181918171818161616151515141414141314141414131314131212
+      111112111010100F1010100F0F0E0F0E0F0E0D0E0D0D0D0D0D0D0D0C0C0C0C0B
+      0B0B0B0C0B0C0B0B0B0C0B0A0A0A0A0A0A090A090A090A09090A0A0A090A0A09
+      0909090909080909090909080808090908080809080808080808080808070708
+      0707070807070707070707060606070606060606060606060606060606060605
+      0605050505050505050505050505050505050505050505050504050505040404
+      0404040404040404040404040304040404030303030303030303030303020303
+      0302030202020203030303030202020202020202020202020202020102010202
+      0201010202020101010101010201010101010102010101010201010001010101
+      0101000000000100000000010000010000010000010000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000003030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303232323434343737373939393B3B3B3B3B3B2E2E2E2F2F2F2F2F2F2F2F2F
+      2F2F2F3231323838383838373838373838373837373837373837373837373837
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737363636343434343434343434343434343434343434343434353535363535
+      3635353535343535353535353434353434343534343435353434343434343434
+      3434343434343434333334343334333434343333343333333333343333333333
+      3333333333333333323333323333333233333332323232323231323231323231
+      323231323131313131323131313131313030303130303030303030302F30302F
+      303030302F302F2F302F2F2F2E2F2E2E2F2E2E2F2E2E2E2E2E2D2E2E2E2D2E2E
+      2F2E2E2E2F2E2E2E2E2E2E2D2E2E2E2E2F2F2F2F2F2E2E2F2E2E2E2E2E2F2F2F
+      2F2F2F2F2E2E302E2F30302F3030303130313030303131313130313132313132
+      323333333435343435343534363636363636363737373838383939393A3A3A3C
+      3C3C3D3D3D3F3E3E4141414242434343434545454646464747484948484B4A4B
+      4C4C4C4E4E4E4F4F4F5151515253535554545755565757575A59595C5B5B5D5D
+      5D5F5E5E6060606363636464646666666868686A6A696C6D6C6E6E6E6F6F6F72
+      72717474747676767877787979797B7B7B7D7D7D7E7E7F808081828282838384
+      8585858686878888888A8A8A8D8D8C9393939494949595959696959897989999
+      989A9A999797979797979898989898989A9A9A9B9B9B9B9B9B9B9B9B9C9C9C9D
+      9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9E9D9D9E9D9D9D9E9D9D9D9D9D9D9C9C9C
+      9C9C9C9C9C9C9C9C9C9B9B9B9A9A9A9999999999999898989696969696969494
+      949393939292939090908F8F8F8E8D8E8D8C8D8B8A8B8A898A87878786868684
+      84848282828080807E7E7E7C7C7C7A7A79777778767676737474727272727272
+      7474757B7B7B7D7D7D7D7D7D8080808282828282827474745959595858585656
+      565353535150514E4E4E4D4D4D4A4B4A4747474545454444444241413F3F3F3C
+      3C3D3C3B3B3939393736373434353232323030302F2F2F2D2D2D2C2B2C292A29
+      282828262727252525232323232323212121201F201E1F1E1D1D1E1C1C1C1A1A
+      1A191A1918181916171616161615151514141414131414141412121213131211
+      11111010101010100F0F100E0E0E0F0F0F0D0E0D0D0D0D0D0D0D0C0C0C0B0C0C
+      0B0B0B0C0C0B0B0C0B0A0A0A0A0A0A090A0A0A0A0A0A0A090A09090909090909
+      0909090909090809080909080808090808080808080808080807080807080707
+      0807070707070707070606070706060606060606060606050506060605050506
+      0505050505050505050505050505050505050505040405050505040404040405
+      0404040404040404040404040304040303030303030303030303030303030302
+      0202020302030202020203030202020203020302020202020202020202010201
+      0102020202020202010201010201010101010101010101010101010101010101
+      0100000100000100010101000000010000010000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303131313434
+      343636363838383A3A3A3C3C3C3434342E2E2E2F2F2F2F2F2F2F2F2F2F2F2F36
+      3535383838383838383837383837383737383737383737383737383737373737
+      3737373737373737373737373737373737373737373737373737373737373434
+      3434343434343434343434343434343434343435353536353536353536353535
+      3535353534353534353534353434343434343534353434343434343434343434
+      3434343434343433333334343434343333343333333334343333333333333333
+      3333333333333333333233333232333332333232323232323132323132323132
+      32313231303231313231303131303130303131303030303030303030302F302F
+      302F302F2F302F2F2F2F2E2E2F2E2E2F2E2E2F2E2E2E2D2E2F2F2E2F2E2F2E2E
+      2E2F2F2E2E2F2E2E2E2E2F2E2F2F2F2F2F2E2F2F2F2F30303030303030303031
+      3131323232323232333232323232333233323232323231323232343334353534
+      3435343635353736363736373938393838393939393A3A3A3C3C3C3D3D3D3E3E
+      3E3F3F3F4140404343434545454747474848484A4A4A4C4B4C4D4D4D4F4F4F51
+      50505252525352535656555757575A5A5A5B5B5B5C5C5C5F5E5E615F60626262
+      6463636565656868686A6A6A6C6C6C6E6E6E7070707271717474747676767778
+      787979797C7C7C7D7E7D8080808181818383838485848787878989898A8A8A8C
+      8B8C8D8D8D8E8E8F9090919494959999999A9A9A9B9A9B9D9D9D9E9C9DA09F9E
+      9E9E9E9D9D9D9E9D9E9E9E9E9F9F9FA0A0A0A1A1A1A1A1A1A2A2A2A2A2A2A2A2
+      A2A3A3A3A3A3A3A3A3A3A3A4A4A4A3A3A3A4A3A3A3A3A2A2A2A2A2A2A2A2A2A1
+      A1A1A1A1A1A1A1A1A0A0A09F9F9F9E9E9E9D9E9E9C9C9D9B9B9B9A9A9A999899
+      9898979696969595959393939292929090908F8F8F8D8D8D8B8B8B8989898787
+      878685858383838181817E7E7E7C7C7C7B7B7B7979797979787A7B7C81818183
+      83828484848585858687868787877A797A6060605F5F5F5B5C5C585858575757
+      5555555353534F4F504D4D4D4B4B4B4949494646464444444242424040403D3D
+      3E3B3B3C3A3A3A3838383636363233323131312F2F2F2E2E2E2B2C2C2A292A29
+      28292626272525252323232323232121212120211E1E1E1D1D1E1C1C1C1A1A1A
+      1A1A191819181616161616161615151414141314141413131312121213121111
+      1110101010100F10100F0F0E0E0E0E0E0D0D0D0D0D0D0C0C0C0C0B0C0C0C0C0C
+      0B0C0B0B0B0C0B0C0A0A0A0A0A0A0A090A0A0A0A0A09090A0A0A090A09090909
+      0909090909090809090809080808080908080808080808070807070707070707
+      0807070707070706070706060706060606060606060606060606050605060505
+      0505050505050505050505050505050505050505050405050404040404040404
+      0404040404040404040304040303030303030304030303030303030303020303
+      0203020303030202030202020202030202020202020202020202020201020201
+      0202020102020201010101010201010201010201010101010101010101010101
+      0101010101010001010000010101010100010000000001000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030333333363636373737
+      3939393B3B3B3C3C3C2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F3131313838383838
+      3838383838383738383738383738373738373738373738373738373737373737
+      3737373737373737373737373737373737373737373737353535343434343434
+      3434343434343434343434343535343635353635353635353635353635353635
+      3535353435353434353534353434353535353534343434343534343434343434
+      3434333434333434343334343334333333333433333333333333333333333333
+      3333333332323332333332333232333233323332323232313232313232313232
+      313231313231313230303131303130303131303030302F30303030302F30302F
+      302F2F2F2F302F2F2F2E2E2F2E2E2F2E2E2F2E2E2F2F2E2E2E2E2E2F2F2F2F30
+      2F302F3131303131313130303130303231313131323131313232323232323333
+      3334333434343434343434343535353535353537373737373736353637373736
+      37373838383A3A3939383A3A3A3A3A3A3A3C3D3D3D3D3D3E3E3E3F3F3F424241
+      4343424344434646454848484A4A4A4C4C4C4D4D4D4F4F4F5251515253525555
+      545656565858585B5B5B5C5C5C5E5F5E6060606161616363636666666868686A
+      6A6A6B6B6B6E6E6E6F6F6F7272727474747777777878787A7A7A7C7C7C7E7E7E
+      8080808383838484848686868787878A8A8A8D8D8D8D8D8D8F8F8F9191919392
+      939494959596969897989C9C9CA0A0A0A1A1A1A2A2A2A3A2A2A5A4A4A6A5A6A4
+      A3A3A3A3A3A4A4A4A5A5A5A5A5A5A6A6A6A7A7A7A7A7A7A7A7A7A8A8A8A9A9A9
+      A9A9A9A9A9A9AAAAAAAAAAAAA9AAA9A9AAA9A8A9A8A8A8A8A8A8A8A8A8A8A6A7
+      A6A6A6A7A5A5A5A5A5A5A4A3A4A4A4A3A3A2A2A1A1A1A0A0A09F9F9F9E9E9E9C
+      9C9C9B9B9B9999999898989695969494949392939090908F8F8F8D8D8D8A8A8A
+      8788888787868484848282828080808080808181828787878888888A8A8A8C8C
+      8C8C8C8C8C8D8D7F7F7F6767676464646262625F605F5E5E5E5B5C5B58585856
+      56565353535051514F4F4F4C4C4C4A4A4A4747474444444243424040403E3F3E
+      3B3B3B3A3A3A3838383635363334343131312F2F2F2E2E2E2D2D2D2A292A2928
+      292626262525262323232323232120202120201E1E1E1D1D1D1C1C1C1A1A1A1A
+      1A19181818161616161616151515141414141414141414131212111211121111
+      10101010101010100F0E0E0E0E0F0E0D0D0D0D0D0D0C0C0C0B0C0C0C0C0B0C0B
+      0C0C0C0B0A0A0A0A0A0A090A0A0A0A0A0A0A0A090A0A090A0909090909090909
+      0908090809080809080809090809080808080808080808080808070808070707
+      0707070707060607070607070606060605060606060606060606060506060505
+      0505050505050505050505050505050505050505040505040404040404040404
+      0404040404030304040303030403030403030303030303030303030203020302
+      0303020202020202030302030202020202020202020202020201020202020101
+      0201020102010102020201020101010201010101010100010101010101000101
+      0101010101010000010001000101000000000001000000000100000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303131313232323333333434343434343636363737373939393B3B3B3D
+      3D3D3635362E2E2E2F2F2F2F2F2F2F2F2F2F2F2F353535383838383838383838
+      3838383838373838373837373837373837373837373837373737373737373737
+      3737373737373737373737373737373737373634343434343434343434343434
+      3434343434343434363535363535363535363535363535363535363535353535
+      3535353535353434353435343434343434343534343434343434353434343434
+      3433343334343433343434343434333333333333333333333433333333333333
+      3233333233333333333332323332323332333232323231323231323231323231
+      32313032313131313131303031303030303030303030303030302F2F2F302F2F
+      302F2F2F302F2F2F2F2E2F2E2E30303030302F30313130313130313132313131
+      3131313131313131323232323232323232313131323232333433343434343434
+      3434343535353536363635363636363838383838383938393A3A3A3B3B3B3C3B
+      3C3B3A3B3B3A3B3C3A3C3D3C3D3D3D3D3E3E3E40404042434243434344444447
+      47474847474848494B4C4C4D4E4D505050525252535454555656575757595A59
+      5B5B5B5D5D5D6060606161616363636564656767676A69696B6B6B6D6D6D7070
+      707272727574757676767878787A7A7A7C7D7D7E7E7E80808083838385858587
+      87878988888B8B8B8D8D8D8F8F8F9191919292929494949696979898989A999A
+      9B9B9B9D9D9D9F9F9FA5A5A5A6A6A6A7A7A7A8A8A9AAA9A9ACABABABABACA9A9
+      A9ABAAAAAAAAAAABABABACACACADADADADAEADADADADAEAEAEAFAFAFAFAFAFAF
+      AFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAFAEAEAEAEADACACADACAC
+      ACACACABABABAAAAAAA9A9A9A9A9A9A7A7A7A6A6A6A5A5A5A3A3A3A2A2A2A1A0
+      A19E9E9E9E9D9E9C9B9C9A999A9897989696969494949292928F8F8F8D8D8D8B
+      8B8B8A8A8A8787878787878888888E8E8E8F8F8F909090919191919191929292
+      8585856E6E6F6B6C6C6A6A6A6767676463646161615E5F5E5C5D5D5959595757
+      57555555525152504F4F4D4D4D4A4A4A4848484646464443444242413F3E3E3C
+      3C3C3A3A3A393839363535333333323232302F2F2E2E2E2D2C2D2B2B2B292829
+      2726262525252323232323232120212120201E1E1E1D1D1D1C1C1C1A1A191A19
+      1A18171816161616161615151514141414131414141412131212111111101010
+      10101010101010100F0F0E0D0E0D0D0D0E0D0D0D0C0B0B0B0C0C0C0C0C0C0C0B
+      0B0C0B0A0A0A0A0A0A0A0A0A0A0A0A090A090A090A090909090A090909090909
+      0909090909080908090908080808080808080808080807080707080707070706
+      0707060607060606060607060606060606060606060606060506060605050505
+      0505050505050505050505050504050505050404040405040404040404040404
+      0404040404040404040403040304030303030303030303030303020203030302
+      0302020303020202020202020202020202020202020202020202020201010101
+      0101020101020101020102010101010102010101010101010100000100010100
+      0101010001010101000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030323232333333343434353535363636373737
+      3737373737373737373737373838383838383A3A3A3B3B3B3D3D3D3E3E3E3030
+      302F2F2F2F2F2F2F2F2F2F2F2F30303038383838383838383838383838383838
+      3837383837383737383737383737383737383737383737373737373737373737
+      3737373737373737373737373535343434343434343434343434343434343434
+      3435353536363536353536353536353536353536353536353536353536353535
+      3535353534343434343434343534343434353434343434343434343434333434
+      3333343434333434343333333433333333333333343433333334333333333333
+      3333333333323233323232323332323233323232323132323132323132313131
+      31313131313130313031313131313030303030303030302F3030302F302F2F30
+      2F2F2F30302F3131323131313131313131313031313130313132313132323132
+      3131313132323232323232323233333234333334353434343434343434353536
+      36363535353737363938393838383939393A3A3A3B3B3B3C3C3B3C3C3C3E3E3D
+      3F3F3E404040404040403F404041404342424343434445444747474848484949
+      494B4B4C4D4D4D4E4E4F5151515454545757575858575B5B5A5C5C5C5E5E5E60
+      60606262626465656767676969696B6A6B6D6C6D706F6F727172737373767675
+      7878787A7B7A7C7C7C7E7E7E8181818383838585858888888A8A8A8C8C8C8E8D
+      8E908F8F9292929594949695969898989A9A9A9B9B9C9D9D9E9F9E9FA1A0A1A3
+      A2A3A3A3A4A8A7A8ABABABACACACAFAFAFB0B0B0B1B1B1B2B1B1ACACACA1A1A1
+      8B8B8B7474746363635353534242423434342929292020201414141414141313
+      131313131313131313131313131111111D1D1D2626263131313E3E3E4F4F4F60
+      60607171718888889E9E9EA8A8A8ABABABACABABA9A9A9A9A9A9A6A6A6A5A5A5
+      A3A3A3A1A1A1A0A0A09D9D9D9B9B9B9999999797979695969292929191918F8F
+      8F8E8E8E8F8F8F9494949595959696969797979998989797978B8B8B75747472
+      72727070706D6E6E6B6A6A6868686666666262636060605D5D5D5C5B5B585858
+      5655565253534F4F4F4E4E4E4B4B4B4949494646464444444141423F3F3F3D3C
+      3C3A3A3A3938393635353434353232322F2F2F2F2F2F2C2D2D2A2A2A29292827
+      26262625252323232323232120211F1F1F1E1E1E1E1D1D1C1C1C1A1A1A191A1A
+      1718181717161617161515151414141414141413141312121111111011101010
+      101010100E0E0E0E0F0F0D0D0D0E0D0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0B0B
+      0B0C0A0A0A0A0A0A090A0A0A0A090A0A09090909090909090909090909090809
+      0809090808090808080808080808080808080807070707070707080707070707
+      0707070706070706060606060606060606050506060606050505050505050505
+      0505050505050505050505050405050504040405050505040404040404040404
+      0403040404040404040403030303030303030303030303030302030303030303
+      0303030203020202020302030202020202020202020202020202010201010201
+      0102020201020101020101010101010101010101010101010101010101010101
+      0101010101000000000000000100010000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303232323333333434
+      3435353536363637373738383838383838383838383839393939393939393939
+      39393939393939393A3A3A3A3A3A3C3C3C3D3D3D3E3E3E3939392E2E2E2F2F2F
+      2F2F2F2F2F2F2F2F2F3434343838383838383838383838383838383838373838
+      3738383738373738373738373738373738373737373737373737373737373737
+      3737373737363636343434343434343434343434343434343434353434363636
+      3636353636353635353635353635353635353635353635353635353635343534
+      3535343535343535353535343535343434343435343434343534343433343434
+      3433343434343334333433343333333333333333333333333333333333333332
+      3333333232323332333333323232323232323232313232313131313131313031
+      31303031313031313131303031313030303030302F3030303031303031313130
+      3030323132313131313131313131313131323132313232323131323131323232
+      3232323232323333333434343434353534353534343535353636363636363636
+      373837383938383939393A3A3A3B3B3B3B3C3C3C3C3C3E3E3E3F3F3E41414041
+      41404443434544444544454544454444444747474848484A4A4A4C4C4C4D4E4D
+      504F4F5151515353545555555858585B5B5B5C5D5C60605F6161626464636666
+      666868686A6A6A6B6B6B6E6E6E7170717372737675757877777A7A797C7C7C7E
+      7E7E8181818383838686868888878A8A8A8C8D8C8F8F8F909090939393949594
+      9797979999999B9B9B9E9E9E9F9F9FA1A1A1A3A3A3A5A5A5A7A6A7A8A8A8AAAA
+      AAABABABB1B0B1B1B1B1A4A4A48686866868684B4B4B2B2B2B1616160F0F0F0D
+      0D0D0D0D0D0C0C0C0C0C0C0C0C0C0C0C0C0B0B0B0A0A0A0B0B0B0B0B0B0A0A0A
+      0A0A0A0909090909090909090707070808080707070707070707070606060505
+      050707070E0E0E2323234242426160617F7F7F9E9E9EABABABABABABA9A9A9A7
+      A7A7A6A6A6A3A3A3A1A1A19F9F9F9D9C9C9B9B9B999999979697969696979697
+      9B9B9B9C9C9C9C9C9C9D9D9D9E9E9E9D9E9D9191927D7E7D7A7A7A7878787574
+      74727272706F706C6C6C6A6A6A6767676463646161615F5F5F5B5C5B59595957
+      57575454545151514F4F4F4C4C4C4A4A4A474747444444434242403F3F3D3D3D
+      3B3B3B3939393736373534353232322F302F2F2F2F2C2D2D2A2B2B292A2A2626
+      272525252323232323232020211F1F1F1F1E1E1D1D1E1B1B1B191A1A18191917
+      1718171617161616151515141414141414141314121312111211101010101010
+      100F100F0E0F0E0E0E0D0D0D0D0E0D0C0C0C0C0C0C0B0C0C0B0C0B0C0C0C0B0A
+      0B0A0A0A0A0A0A0A0A0A0A090A0A0A0A0A090909090909090A09090909090909
+      0808080808080808080808080808080808080807070707070707070607070706
+      0707060606060606060606060606050506050606060506050506050506060505
+      0505050505050505050504050504040504050504040404040404040403040404
+      0404040404040304030403030303030303030303030303030203030203030202
+      0302030203020202030302020302020202020202020201020201020201010101
+      0101010101010101020101020101010101010101010100010101010101010001
+      0100010000000000000100000000000100000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303031
+      3131323232343434343434353535373737383838383838383838383838383838
+      3939393939393939393939393A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3B3B3B3B3B
+      3B3B3B3B3C3C3C3C3C3C3D3D3D3E3E3E3F3F3F3333332F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F30383737383838383838383838383838383838383838383837383837
+      3837373837373837373837373837373737373737373737373737373737373737
+      3734343434343434343434343434343434343434343436353536363636363636
+      3635363635363535363535363535363535363535353435363534363534353535
+      3534353435353434343535343534353534343434343434343434343334343333
+      3433343334343334333334343333333334333333333333333333333333333333
+      3332333232323233333333323332333231323131323131313131313131313131
+      3131303031303030303030313030303131313131313130313031313132313131
+      3232323132313231313232323232323232323232323233333333323232333233
+      3333333333343434353534343534353435353635363636373737383838393938
+      3939393A3A3A3A3B3A3C3C3D3C3C3C3E3E3E3F3F3F4141404141404343424544
+      4446454548474749494949494A4A4A4A4A4A4A4C4C4C4E4E4E50505052525254
+      53545657565757575A5A5A5D5C5D606060626363646464666667696A696B6B6B
+      6D6E6E7070707273737575757777777A797A7C7B7C7F7E7E8180818383838685
+      858888888A8A8A8D8D8C8F8F8F919190939393969696989898999A9A9C9C9C9E
+      9E9FA1A1A1A3A3A3A4A4A4A6A6A6A9A8A9AAAAAAACACACADADADA7A7A7858585
+      5F5F5F3939391919190E0E0E0F0F0F0F0F0F0E0E0E0E0E0E0D0D0D0E0E0E0E0E
+      0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0C0C0C0C0C0C0B0B0B0B0B0B0B0B0B0A
+      0A0A0909090A0A0A090909090909080808070707070707070707060606050505
+      0505050505050505050404040303030D0D0D2E2E2E575757818080A4A4A4AAAA
+      AAA9A8A8A7A7A7A5A5A5A2A2A2A0A0A09F9F9F9E9E9E9E9E9EA3A3A3A2A2A2A3
+      A3A3A3A3A3A4A4A4A3A3A39899998484848282827F7F7F7C7C7C7A7A7A777676
+      7474747171716E6E6E6B6B6B6969686566656362626060605D5D5D5A5A5A5758
+      585554555252534F4F4F4D4D4D4A4A4A4747474545454243424140403D3D3E3B
+      3B3B3838393737363535343233323130302F2F2F2D2D2D2A2B2A282928262626
+      2525262323232323232121211F1F1F1D1D1D1D1D1D1B1B1B1A1A191918181717
+      1817171715151614141414141414131412131311121112121210101010101010
+      10100E0F0E0F0E0F0D0D0D0D0E0D0C0C0C0C0C0C0B0C0C0B0C0C0B0B0B0A0B0A
+      0A0A0A0A0A0A0A0A0A090A0A0A0909090A090A09090A09090909090909090809
+      0908080808080808080808080808080708070707080707070807070707070606
+      0707060606060606060606060605050606050606060505050505050505050505
+      0505050505050505050504050505040504040404050404040404040404030404
+      0304040303040303040304030303030303030303030303030303030303020203
+      0302030302020203020302020202020202020201020202020102010102010201
+      0201010101020101010101010101020101010101010101010101010100010100
+      0000010000010000010000000000010000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000030303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303232323333333434343535353636363737373838383838
+      383838383838383838383939393939393939393939393A3A3A3A3A3A3A3A3A3A
+      3A3A3B3B3B3B3B3B3B3B3B3B3B3B3C3C3C3C3C3C3C3C3C3C3C3C3D3D3D3D3D3D
+      3D3D3D3E3E3E3E3E3E3B3B3B3B3B3B2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3232
+      3238383838383838383838383838383838383838383838383738383738383738
+      3737383737383737383737383737373737373737373737373737363636343434
+      3434343434343434343434343434343535343636363636363636363636363636
+      3536363536353536353536353536353536353536353536343436343435353435
+      3434343434343535353534343435343435343434343434343434343434343434
+      3333343434343433343433333334343333333433333333333333333333333333
+      3232323333323332333232323132313132313132313131313131313131313130
+      3131303130313131313132313232313131313130313131313132323232323131
+      3131313132313232323232323132323231323332323233333232333333333434
+      343435353535353535353536363636363837383938383939393939393A3B3B3B
+      3B3A3C3D3D3C3C3D3E3F3E3F3F3F414141414141434342454544464545484747
+      4A49494B4A4A4C4C4C4E4D4E4E4E4E504F4F5151515252525554555757575858
+      595A5A5A5C5C5C5F5F606161616565656768676A6A6A6C6D6C6F6F6F71717174
+      74747676767878797B7B7B7D7C7D807F808382828585858787878A8A898C8C8C
+      8E8E8E9191919393939696969998999B9B9B9C9C9C9F9F9FA1A1A1A4A3A3A6A6
+      A6A8A8A8AAAAAAACACACAEAEAEA5A5A57C7C7C4E4E4E22222210101010101010
+      10101010101010100F0F0F1010101010100F0F0F1010100F0F0F0F0F0F0F0F0F
+      0F0F0F0E0E0E0E0E0E0E0E0E0E0E0E0D0D0D0C0C0C0C0C0C0C0C0C0C0C0C0A0A
+      0A0A0A0A0A0A0A0A0A0A09090909090908080808080807070707070706060606
+      0606060606050505050505030303030303030303030303161616444445757575
+      A1A1A1AAAAAAA9A9A9A7A7A7A5A5A5A6A6A6AAAAAAA9A9A9A9A9A9AAAAA9AAAA
+      AAAAAAAA9F9F9F8C8C8C8989898787878484848181817E7E7E7B7B7B78797975
+      75757272726F706F6C6C6C6A69696766666464636161615E5E5E5B5B5B585858
+      5656565253525050504D4D4D494A4A4847484545454444444141413E3E3E3B3B
+      3B3939393737373434343232333030302E2E2F2C2D2D2A2B2A29292926262725
+      25252323232323232020212020201D1D1D1D1D1D1B1B1B1A1A19191918171717
+      1616161515151414141414141414131212121211121111101010101010100E0F
+      0E0F0E0E0D0E0E0E0D0D0C0C0C0C0C0C0C0C0C0C0C0C0C0B0B0A0A0A0B0A0A0A
+      0A0A0A0A0A0A0A0A0A0A090A090A090909090909090909090909080809080808
+      0808080808080808080707070707080707070707070707060707070706070706
+      0606070606060606060605060605060606050605060505050605050605050505
+      0505050505050405050504050505050404040404040404040404030403030303
+      0304030304030404040304040303030303030303030303020303020203030302
+      0303020302020302020202020202020202010202010201020101020202010201
+      0101010101020101010201010102000101010101000101010101010101000000
+      0101000000010000000000010000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000003030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303032323234343434
+      34343636363737373737373838383838383939393939393939393939393A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3B3B3B3B3B3B3B3B3B3C3C3C3C3C3C3C3C3C3C3C
+      3C3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3A3A3A37373737363732323230
+      30302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F363636383838
+      3838383838383838383838383838383838383838373838373838373837373837
+      3738373738373738373737373737373737373737373734343434343334343434
+      3434343434343434343434363636363636363636363636363636363636363635
+      3636353635353635353635353635353635353635353635353635353535343535
+      3534353535353535343434353534343434343535343434343334343434343434
+      3334343434343433333333333434343333333434333333333333333233323332
+      3333323232323232323232323231323231313231313130313131313232313232
+      3132323132323231313132323131313132323232323232323231323231313233
+      3332323232323232323232333333323333333332343334353534353535353535
+      353535363536373737373737383838393A3A393A393A3A3A3B3B3B3D3D3D3D3D
+      3C3E3F3F3F3F3F4141414141414343434545444646454848474A49494B4A4A4D
+      4C4C4E4E4E504E4E5252515453535554545555555757575859595B5C5C5E5D5E
+      6161616362626565656767676B6B6B6E6D6E7070707272737574747878787A7A
+      7A7D7D7D7F7F7F8383828584858787878A88898C8C8C8E8E8E91919093939395
+      95959899989B9B9B9D9D9DA0A0A0A1A1A1A4A4A4A6A6A6A9A9A9ABABABAEAEAE
+      ABACAC8282824E4E4E2020201111111212121212121111111111111111111111
+      1112121211111111111111111111111111111111111110101010101010101010
+      10100F0F0F0F0F0F0F0F0F0E0E0E0E0E0E0D0D0D0C0C0C0D0D0D0C0C0C0B0B0B
+      0B0B0B0B0B0B0A0A0A0A0A0A0909090808080808080808080707070606060606
+      0606060605050505050503030303030303030303030303030302020213131344
+      44447B7B7BA8A8A8AEAEAEB1B1B1B1B1B1B0B0B0B0B0B0B0B0B0B0B0B0A6A6A6
+      9594949292928E8D8E8B8B8B8889898586858383838080807D7D7D7A7A7A7777
+      787474747171716E6E6E6B6B6B686867646564626262605F5F5C5C5C59595956
+      57575353535051504E4E4E4B4B4B4848484646464343444040403E3E3E3B3B3B
+      3939383636373534343232323030302F2F2F2C2C2D2A2B2A2829282626272525
+      252323232323222021211F1F201D1D1E1C1C1D1B1B1B1A191A18191816161616
+      16161515151414141414141413141212121211111010101010111010100E0E0F
+      0F0F0E0E0D0E0D0E0D0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0A0A0B0B0A0A0A0A
+      0A0A0A0A0A0A0A0A0A0A090A090A0A0909090909090909080908090908090808
+      0808080808080808070808080707070808070707070707070707070606060706
+      0606060606060606060606050605060505050505050505050605050505050505
+      0505050505050505050405050504040505040404040404040404040404040403
+      0403030404030303030303030303030303030303030203030202020202020302
+      0203030202020202020202020202020202010102010102010102020202010201
+      0201020102010101010101010101010101010101010001010101010001000001
+      0000000001010001010000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303333333535353535353636
+      363737373939393A3A3A3A3A3A3A3A3A3A3A3A3B3B3B3B3B3B3B3B3B3B3B3B3C
+      3C3C3C3C3C3C3C3C3C3C3C3D3D3D3D3D3D3D3D3D3D3D3D3E3E3E3C3C3C3A3A3A
+      3736373434343232322F2F2F2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F30303038383838383838383838
+      3838383838383838383838383838383838383837383837383737383737383737
+      3837373837373737373737373737373636363434333434333434333434343434
+      3434343435353536363636363636363636363636363636363636363636363536
+      3635363535363535363535363535363535363535363535353534353435353435
+      3435343435343435343434343434343434343434343434343433343434343434
+      3434343333333334343333343433333333333333333333333332333333323333
+      3333333232333232333232323131323231323231323232323232313232313131
+      3131323132313131313131313232323231323232313131323233333233323232
+      3332323233333333333332333334343435353434343435353535353536363637
+      3737373637373838393A3A39393A3B3A3A3B3B3C3C3C3C3D3D3D3E3D3D403F3F
+      4040404141414343434444444646454848474949484B4A4A4D4C4C4E4E4E504F
+      4F5351525554535757565858575A5A5A5B5B5B5C5C5C5E5E5E61616063626366
+      65656868686B6B6B6D6D6C7070707474747776777979797B7B7B7E7E7E808080
+      8383838585858989898B8B8B8E8D8E9191919493939696969898989B9A9A9D9D
+      9D9F9F9FA1A2A1A4A4A4A6A7A6A9A9A9ACACACAEAEAE9B9A9A6767672F2F2F12
+      1212131313121212121212131313131313141414141414141414131313131313
+      1414141313131313131313131212121212121212121111111111111111111010
+      101010101010101010100F0F0F0E0E0E0E0E0E0D0D0D0E0E0E0D0D0D0C0C0C0B
+      0B0B0C0C0C0B0B0B0A0A0A090909090909090909080808070707070707060606
+      0606060505050404040404040404040404040404040303030202020202020202
+      022121216261629F9F9FB7B7B7B7B7B7B7B7B7B6B6B6ACACAC9B9B9C99999996
+      96969393939091918D8E8E8B8B8B8888888584848282827F7E7F7B7B7B787878
+      7575757272726F6F6F6C6C6C6969696667676262626060605C5D5D5A5A5A5657
+      565453545150504E4E4E4B4B4B4849494646464443444141413E3E3E3B3B3B3A
+      3A3A3637373435343232332F2F2F2F2F2E2D2C2D292929292829262727252424
+      2323232222222120211E1E1E1E1E1D1C1C1C1A1A191A19191818171717171617
+      161516151414141413141313121313131211111111101010101010100F0F0F0D
+      0D0D0E0D0D0E0E0E0C0C0C0C0C0C0C0C0C0C0C0B0B0A0B0A0B0B0A0A0A0A0A0A
+      0A0A0A090A0A090A090A0A0A090A09090A090909090909090909080809080808
+      0808080808080707080707070707070807070707070707070707070607060606
+      0606060606060606060605050506050506050505050505050505050505050505
+      0405050505050505050404040404040404040404040404040404040404040304
+      0403030303030303040303030303030303020303030303030303020302020203
+      0202020202020202020202020202010202020202020202010202020102020101
+      0101020101010102010101010101010101010100010100010001010101010000
+      0100000000010100000000000000010000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030343434353535363636373737393939
+      3A3A3A3B3B3B3B3B3B3C3C3C3C3C3C3C3C3C3C3C3C3D3D3D3D3D3D3D3D3D3D3D
+      3D3E3E3E3A3A3A3838383736373333333131312E2E2E2E2E2E2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3434343838383838383838383838383838
+      3838383838383838383838383838383738383738383738373738373738373738
+      3737383737373737373737353434343333343433343433343433343434343434
+      3636363636363636363636363636363636363636363636363636363636353636
+      3536353536353536353536353536353436353535353436343535343435343435
+      3535343435343434353434353434343434343434343434343334343434343434
+      3434343333333333343334343333333333333333333333333332333333333232
+      3332323232323232323232333233323232323232323232313231313231323131
+      3131323131323232323232323232323232313232333333333333323233323232
+      3334343333333333333434343333343534353332323333333333333434343535
+      353737373736373939383B3A393C3B3B3E3D3D3E3E3E40404041404142414244
+      43434444444647464747474949484B4B4A4D4C4C4E4E4E504F4F535252555454
+      5757575957585B5B5A5D5D5C605F5F6160616161616463646666666968686B6B
+      6B6E6E6E71717173737377767679797A7C7C7D7F7F7F8282828585858888878A
+      8A8A8D8C8D8F90909392939595959897979B9B9B9D9D9DA09F9FA2A2A2A4A4A4
+      A7A7A7A9A9A9ACACACAEAEAE8D8D8D4F4F4F1D1D1D1313131414141414141414
+      1414141415151515151516161616161616161616161615151515151515151516
+      1616151515141414141414151515141414141414131313121212121212121212
+      1111111111111111111010100F0F0F0E0E0E0E0E0E0E0E0E0D0D0D0C0C0C0C0C
+      0C0C0C0C0C0C0C0B0B0B0A0A0A09090909090909090908080807070707070706
+      0606060606050505050505040404040404040404020202020202020202020202
+      0101010C0C0C484848929292BCBDBDB3B3B3A4A4A4A1A1A19F9E9E9C9B9B9999
+      9996969693939390908F8D8D8D8A8A8A8686868383837F807F7D7D7D7A7A7A76
+      76767474747070706D6D6D6A696A6666666463636161615D5E5E5A5A5A585858
+      5455545151514F4F4F4C4C4C4849494646464343434141413E3E3E3B3B3B3838
+      393636363434343232322F2F2F2E2E2E2D2D2D292A2928282827262624242423
+      23232222222020201F1E1F1D1D1D1C1C1C1A1A1A1A1919181717171716161615
+      1414141414141414141313121112111010101010101010100F0F0F0F0E0F0E0E
+      0D0D0E0D0C0C0C0C0C0C0C0C0C0C0C0C0B0B0B0A0B0B0B0B0B0A0A0A0A0A0A0A
+      0A0A0A0A0A0A090A0A090A0A090A090909090909090909090908080808080808
+      0808080808080708070707080707070707070607070607060607060607070606
+      0606060606060606060605050606050605060505060505050505050505050505
+      0505050505050404050504040404040404040404040404040404040404030403
+      0403040303030303040303030303030302030303030303020202020302030202
+      0202020202020202020202020202020202020101020102010201010102010201
+      0202010201010201010101010101010101000101010100000001010101010101
+      0100000000010000000100000001000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303131313434343535353737373838383A3A3A3C3C3C3D
+      3D3D3D3D3D3D3D3D3D3D3D3D3D3D3A3A3A3737373535363232323030302E2E2E
+      2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F373737383838383838383838383838383838383838
+      3838383838383838383838373838373838373837373837373837373837373837
+      3737373736363634333334333334333334343334343334343335353536363636
+      3636363636363636363636363636363636363636363636363636363635363635
+      3635353635353635353635353635353635353635353535343534343535353435
+      3535343435343434343434353434343434343434343433343433343334343433
+      3334333433343433343333333333333333333333333333333333323332323233
+      3332323332333333323332323332323232323232323232323232323132313231
+      323333333232323232323232323333323333323332333333333332323131312F
+      2F2F2F2F2F2E2F2F30303030302F303130313031313131333232333433343434
+      35353536363636363738393939393A3C3C3C3E3E3E4040404243434544454545
+      45484747494A494B4B4A4D4D4C4E4E4E504F4F5352525554545757575958585B
+      5B5B5D5D5D60605F6262616464656665656767676A6A696B6C6C6E6F6F717171
+      7474747676767A7A7A7E7E7E8180818383838686868888888C8C8C8F8F8F9292
+      929494949797979999999D9C9D9F9F9FA3A2A2A5A5A5A7A7A7A9A9A9ACACACAE
+      AEAE8D8D8D494949161616141414151515161616161616171717161616171717
+      1717171818181818181818181818181818181717171616161717171717171717
+      1716161616161616161616161615151514141414141413131314141413131313
+      13131313131414141313131212121111111010101010100F0F0F0D0D0D0D0D0D
+      0D0D0D0C0C0C0A0A0A0A0A0A0909090909090909090808080707070707070707
+      0706060606060604040404040404040404040402020202020202020202020201
+      01010101010303033E3E3E848484A9A9A9A7A7A7A4A4A4A1A1A19E9E9F9B9B9B
+      9898989595959292928F8F8F8B8B8B8888888585858281817E7E7E7B7B7B7777
+      777474747172726E6D6D6A6A6A6768686363636161615E5E5E5B5A5B58585854
+      54545151524F4F4F4C4C4C4849494646464443434241413E3E3E3B3B3B393938
+      3636363534343232332F2F2F2E2E2E2C2C2B292A2A2727282626262424242323
+      232221222120201F1E1E1D1D1D1B1B1B1A1A1A19181918171717161715161514
+      14151414141413141213131212111010111110101010100F0F0F0F0F0F0E0E0E
+      0E0E0D0C0C0C0C0C0C0C0C0C0C0C0C0A0A0B0A0B0B0A0A0B0A0A0A0A0A0A0A0A
+      0A090A0A0A090A0909090A090909090909090909080908080809080809080807
+      0808080708080707070707070707070707070707060706060606070606060606
+      0606060605060605060505060505060605050506060505050505050505050405
+      0505040504040504040504040405040504040404040404040404040304030303
+      0304030303040303030303030303030303030203030302020302020302020203
+      0202030202030202020202020202020102010102020102010201010101010101
+      0201020201010201010101010001010101000001000101000000010101000001
+      0100010000000001000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303232323434343636363838383A3A3A3A3A3A3A3A3A3635363434
+      343232322E2E2E2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3130313232
+      3234333435353538383838383838383838383838383838383838383838383838
+      3838383838383838383837383837383737383737383737383737383737373737
+      3535343333333433333433333433333434333434343636363636363636363636
+      3636363636363636363636363636363636363636363636363636363536363536
+      3535363535363535363535363535363535363535353535353535353434343435
+      3434353534343535343435343434343434343434343434333434343333343334
+      3333333434333333333333343434333333333333333233333332333333333333
+      3333343232333232333232333232323232313232323232323132323332323233
+      3232323332323232323333333232323030312F2E2F2E2D2D2D2D2D2E2F2E2F2F
+      2F2F2F2F30303030313131313132323232313133333334353435353536363636
+      353637383839393939393A3A3A3B3D3D3E3E3E3F3F4040434342454545494949
+      4B4C4B4D4D4D4E4E4E50504F5352525554545757575958585B5B5B5E5D5D6060
+      606262626564656767676A6A6A6C6C6C6D6D6D6F6F6F7272717575757778777B
+      7B7B7D7D7D8080808483838787878B8B8B8D8D8D909090929292969596999999
+      9C9B9B9E9E9EA1A1A1A4A4A4A6A6A6AAAAAAACACACAFAEAE8D8D8D4949491616
+      161515151616161616161717171717171818181818181919191A1A1A1A1A1A1A
+      1A1A1A1A1A1A1A1A1919191A1A1A191919191919181818181818181818171717
+      1717171717171717171717171818181919191A1A1A1B1B1B1C1C1C1C1C1C1D1D
+      1D1E1E1E1E1E1E1D1D1D1D1D1D1B1B1B1A1A1A19191918181816161614141413
+      13131010100E0E0E0D0D0D0A0A0A0A0A0A090909080808080808070707070707
+      0606060505050404040404040404040404040202020202020202020202020101
+      010101010101010101013A3A3A848484A9A9A9A6A6A7A4A4A4A0A0A09E9D9D9A
+      9A9A9696969393939091918D8D8D8989898686868383837F80807C7C7C797879
+      7575757272726F6F6F6B6B6B6868686464646262625E5D5E5A5B5A5858585656
+      565151514F4F4F4C4C4C4849494646464343434141423E3F3E3B3B3B38383937
+      36373534343232322F2F2F2E2D2E2C2C2B292929282827262626232323232323
+      2120201F201F1D1D1D1D1D1D1B1B1B191A1A1919191716161716161515161414
+      141414141213131213121212121111111010101010100F0F0F0E0E0E0D0E0E0C
+      0C0D0D0C0C0D0C0C0C0C0C0C0C0C0B0A0A0B0A0A0A0A0A0A0A0B0A0A0A0A0A0A
+      0A0A0A0A0A090909090909090909090809090809090809090808080808080708
+      0807070707070707070707070707070707070706070606060706060606060606
+      0606060606050505060505050505050506060505050605050505050504040505
+      0504050504040404040404050404040404040404040304030403040404040403
+      0404030403040403030303030303030203020302030202020302020302020203
+      0202020203020202020202020202010202020102010201010202020201010101
+      0101010101010101010101010101010101010001000100000001000001000000
+      0000010000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303232323535353737373939393B3B3B3333332E2E2E2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F313131333233343434363636373737393838393838393838383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838383738383738383738373738373738373738373737373733333333
+      3333333333343333343333343333353535363636363636363636363636363636
+      3636363636363636363636363636363636363636363636363636353636353635
+      3536353536353536353536343536353536353536353535353435353534353435
+      3534343534343435343434343434343434343434343434343433343333333433
+      3433333334343333343333333333333333333333333433333432323432323432
+      3333323233323233323232323232323232313232323233333332333332323232
+      32323232322F2F2F2D2D2D2D2D2D2E2E2D2D2D2E2E2D2E2F2E2E2F302F303030
+      3030303130313232323232323332323434343434343535353636363838383939
+      393A3A3A3B3B3B3D3D3D3E3E3F3F3F404141424242434444444646474A49494D
+      4D4E50504F5353525554545756565958585B5B5B5E5D5D606060636262656565
+      6868686A6A6A6C6D6C6F6F6F7272727373737676767978787B7B7B7E7E7E8281
+      818585858787878B8A8B8E8E8F9191919595949797979A9A9A9D9D9DA1A0A0A3
+      A3A3A5A6A5A9A8A8ACABACAFAFAF9A9999515151161616161616161616181818
+      1919191919191919191A1A1A1B1B1B1B1B1B1B1B1B1C1C1C1C1C1C1C1C1C1B1B
+      1B1B1B1B1B1B1B1B1B1B1B1B1B1A1A1A19191919191918181819191919191918
+      18181919191B1B1B1D1D1D1F1F1F212121232323252525262626272727282828
+      2828282828282828282727272525252525252424242323232121211F1F1F1E1E
+      1E1A1A1A1818181515151212120F0F0F0C0C0C0A0A0A08080807070707070707
+      0707060606040404040404040404040404020202020202020202020202010101
+      010101010101000000010101424242929292A9A9A9A6A5A5A2A2A29F9F9F9B9B
+      9B9999999595959291918E8D8E8B8B8B8787878484848180817D7D7D7A7A7A76
+      76767273736F6F6F6C6C6C696A6A6665656262625E5E5E5B5B5B585858555656
+      5352524F4F4F4C4B4B4949494646464443434040403E3E3E3B3B3B3938393635
+      363434333131312F2F2F2D2D2D2C2B2B292A2A27272825252623232323222221
+      212120201F1D1E1E1C1C1C1A1A1A191A1A181818171716171616141414141415
+      1414141312131111121110111011101010100F0F0F0F0F0F0E0E0E0E0D0E0D0D
+      0C0C0D0C0C0C0C0C0C0C0B0B0B0B0B0B0A0B0A0A0A0B0A0A0A0A0A0A0A0A0A09
+      0A0A09090A090909090909090909090909080808080808080808080808070808
+      0807080708070707070707070607070707060607060607070606070606060606
+      0606060606060606050506050605060605060505050505050505050505050505
+      0405040404040404040404040404040404040403040304040304040404030403
+      0304040303030303030303030303030303020302030303030203020202020202
+      0202030202020202020202020102020202020201020101010101010201010101
+      0101020101010101010101000101010101000001010000010100010001000100
+      0001000100000100000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303434
+      343535353838383A3A3A3C3C3C3131312F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F3030303131313333333534343636363838383939
+      3939393839393839393839383839383839383839383839383838383838383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838373838373837373837373837373837373535353333333333333333
+      3333333334333334333336363636363636363636363636363636363636363636
+      3636363636363636363636363636363636363636363636363635363635363535
+      3635353635353635353635353635353534353534353535343535353435353434
+      3435343534343434343434343434333433343434343434343334343433343434
+      3433333333343334333334333333343333343333333333343333343332333332
+      3332323332323232333233323232323333333332323333323031312E2D2D2E2D
+      2D2D2D2D2D2D2D2E2E2E2D2E2E2E2E2E2F2F2E302F2F30313131303031313131
+      31313232313434343435353635353536363736363738373939393A3A3A3B3B3B
+      3C3D3D3D3E3E403F4041404142424344444546464748484849494A4B4B4C4F4F
+      4F5353545757565958585B5B5B5E5D5D6060606362626665656968686A6A6A6D
+      6D6D706F6F7373737575757878787979797C7C7C7F7F7F838283858585888888
+      8B8B8B8F8F8F9292929595959998999C9C9C9E9E9EA1A1A1A4A5A5A8A8A8AAAB
+      AAADAEAEAAAAAA6868682222221717171818181919191919191B1B1B1B1B1B1C
+      1C1C1C1C1C1C1C1C1D1D1D1E1E1E1E1E1E1D1D1D1D1D1D1E1E1E1D1D1D1C1C1C
+      1C1C1C1C1C1C1C1C1C1B1B1B1B1B1B1A1A1A1919191919191919191818181919
+      191B1B1B1E1E1E2121212424242727272828282B2B2B2C2C2C2E2E2E2E2E2E2E
+      2E2E2E2E2E2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2B2B2B292929282828272727
+      2525252222221F1F1F1C1C1C1818181515151111110C0C0C0909090808080707
+      0706060605050504040405050503030302020202020202020201010101010101
+      01010000000000000000000D0D0D5B5B5BA3A3A3A7A8A7A4A4A4A1A1A19D9D9D
+      999A9A9696969393938F8F908C8C8C8888888585858182817E7E7E7A7A7A7777
+      77747474706F6F6C6C6C696A696566656262625F5F5F5B5A5A58585856555552
+      52534F4F4F4C4C4C4849494646464343434140403D3D3D3B3B3B393938353636
+      3333343131312F2F2F2D2C2D2B2A2A2A29292727262526252323232222222121
+      201F1E1F1D1D1E1C1C1C1A1A1A19191918181817171616151614151414141414
+      14141313131211111011101010111010100F0F0F0E0E0E0D0E0E0C0C0D0C0C0C
+      0C0C0C0C0C0C0C0C0C0B0B0B0B0B0B0B0A0B0A0A0A0A0A0A0A0A0A0A0A0A090A
+      0A0A090A09090909090908080909080808080808080808080807080808080808
+      0807070707070707070707070707060707060706060606060606060606060605
+      0506060505050605060606050606050605050505050505050505050505050505
+      0505040405040404040404050404040403040404040403030403030303030304
+      0403030303030303030303030302030302030303030202030303020203020202
+      0202020202020202020102020202020202020102010101020201020201010102
+      0201010101010101010100010101010101000001010100000000000000000000
+      0100000100000101010000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000030303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030313131343434363636
+      3838383A3A3A3C3C3C2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F31313132323234343435
+      3535373736393939393939393939393939393939393939393939393939393939
+      3939383939383938383938383938383938383938383838383838383838383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3837383837383737383737383737383737343333333333333333333333333333
+      3333333534343736363736363636363636363636363636363636363636363636
+      3636363636363636363636363636363636363636363636363536363536353536
+      3535363535363535363535353435363535353535353434353435353534343535
+      3435343434343534343434343434343334343434343433343333343434333433
+      3334333333343334333334333334333333333334333334323333333333323233
+      33323233333232323232323333333132322F2E2F2D2D2C2E2D2E2D2E2E2D2E2E
+      2E2D2E2E2E2E2E2E2E2E2F2F2F302F3030303132313333333333333434343636
+      373A3A3B3B3A3A3C3B3B3E3D3D3E3D3D3E3E3E3A3A3A3C3C3C3D3C3D3E3E3E3E
+      3E3F40414142434343444445454647474848494A4C4C4C4D4D4E4F5050525252
+      5656565B5B5B5E5D5D6060606362626565656968686B6A6A6D6D6D706F6F7373
+      737777767978797C7C7C7F7F7F8181818383828586858989898C8C8D8F8F8F93
+      93939696969A9A9A9D9C9CA0A0A0A3A3A3A6A6A6A9A9A9ACACACAFB0B0898989
+      3737371818181818181919191B1B1B1C1C1C1C1C1C1D1D1D1E1E1E1E1E1E1F1F
+      1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1E1E1E1E1E1E1F1F1F1F1F1F1E1E1E1D
+      1D1D1C1C1C1C1C1C1C1C1C1A1A1A191919191919181818181818181818191919
+      1C1C1C2020202424242828282B2B2B2E2E2E3030303232323333333333333333
+      333333333434343434343434343434343333333232323131313030302F2F2F2D
+      2D2D2B2B2B2828282424242121211E1E1E1919191515151010100C0C0C080808
+      0606060505050505050505050404040303030303030202020202020101010101
+      010000000000000000000000002323237E7E7EA9A9A9A5A5A5A2A2A29E9E9E9B
+      9B9B9898989494949090908D8D8D8A8A8A8585858283827F7E7F7B7B7B777777
+      7474747170716D6D6D6A696A6666676262625F5F5F5B5B5A5858585655555151
+      514F4F4F4C4B4B4948494646464343434040403D3D3D3A3A3A39393935353532
+      32323031302F2F2F2D2D2D2B2B2B292829262727242424232323222222202121
+      1F1F1F1D1D1E1C1B1B1A1A1A1919191717171616161515151414141414141313
+      131212121212121010101110100F0F0F0F0F0F0D0E0E0E0D0E0D0D0D0C0D0C0C
+      0C0C0C0C0C0A0B0B0B0B0A0B0B0B0A0A0A0A0A0A0A0A0A0A0A0A0A0909090A09
+      09090A0909090909090908090809080908080808080808080808080708080707
+      0807070707070707070607070707070607070706070606060606060606060605
+      0506050506050506050505050505050505050505050505050505050505040505
+      0404050504040404040404040404040404040404040404040304030403040303
+      0403030303030303030203030303030302030303030202020302020202020202
+      0302020202020201020202010101020102020201010102010201010101010101
+      0101010101010001010100010101010101010101010100000001000100010100
+      0100000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000003030307979793030303030303030303030303030303030303030
+      303030303030303030303030303030303030303232323434343737373939393B
+      3B3B3939392E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      3231323333333434343737373837373A39393A39393A39393939393939393939
+      3939393939393939393939393939393939393939393939393939393939393839
+      3938393938393838393838393838393838393838383838383838383838383838
+      3838383838383838383838383838383838383838383838383838383838373838
+      3738383738373738373736363633333333333333333333333333333333333336
+      3636373636373636373636363636363636363636363636363636363636363636
+      3636363636363636363636363636363636363636363636353636353635353635
+      3536353536353536353536353536353535343535343435353535353534343434
+      3434343435343535343434353434353434343433343433343434343334343433
+      3434333434343433333433333433333433333433323433333332333332333332
+      323232333333333030312D2D2D2D2D2D2D2D2C2D2D2D2D2D2D2D2D2E2E2E2F2F
+      2F2F2F2F2F3030303231323536363B3B3B40403F4444444948484949494B4B4B
+      4B4B4B4B4B4A4B4C4B4C4B4C4C4D4C4D4D4D4D4D4D4B4B4B4848484747474545
+      4543444445454648474849494A4B4B4C4D4D4E4F4F5052515254545557575759
+      595A5F5F5F6362626565656968686B6A6A6D6D6D707070737373767777797879
+      7C7C7C80807F8282828585858787878A8A8A8D8D8D9090909494949696969999
+      999E9E9EA1A1A1A4A4A4A7A8A8ABABABAEAEAEA6A6A65B5B5B1818181919191B
+      1B1B1A1A1A1C1C1C1D1D1D1E1E1E1F1F1F1F1F1F1F1F1F202020212121212121
+      2121212020202020202020202020201F1F1F1F1F1F1F1F1F1F1F1F1E1E1E1D1D
+      1D1C1C1C1C1C1C1A1A1A1A1A1A1919191818181818181818181818181919191D
+      1D1D2424232929282E2E2C323230343431373634383836393936393937393937
+      3A3A393A3A393A3A393A3A3A3939393939393939393838383737373636363434
+      343232322F2F2F2D2D2D2A2A2A2626262222221D1D1D1919191414140F0F0F09
+      0909060606050505050505050505040404030303030303020202020202010101
+      0000000000000000000000000000004B4B4A9E9E9EA7A8A7A4A4A4A0A0A09C9C
+      9C9899989696969191928D8D8D8B8B8B868686838383807F7F7C7C7C77777874
+      74747171706D6D6D69696A6666666262625F5F5E5A5A5B585858555655515151
+      4F4F4F4B4B4B484848454545424242403F3F3B3C3C3A3A3A3838383535353332
+      333130302F2F2F2D2D2D292A29282727262626252425232323212121201F201E
+      1D1D1C1C1C1B1B1C1A1A1A181818161717161617141415141414141414131213
+      1212121110111110101010100F0F0F0E0E0E0E0E0E0C0D0D0D0C0D0C0D0D0C0D
+      0C0C0C0C0B0B0B0B0A0B0B0B0B0A0A0A0A0A0A0A0A0A0A0A0A0A090A09090909
+      090909090A090809090908090808080808080808080808070807070807080707
+      0707080707070707070707070707060707070706060606070606060606060606
+      0505050505060606050606060505050505050505050505050405050405050404
+      0404040404050404040404040404040404040304030404030403040404030303
+      0303040303030303030302030203020303020302020203020203030202020202
+      0202020202020202020202010101020102010102020202010102010101010101
+      0101010101010101010101010000010100010101010001000000010100010000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303232323535353737373939393C3C3C3635
+      362F2F2F2F2F2F2F2F2F2F2F2F2F2F303535353737373939393A3A393A3A393A
+      3A393A3A393A39393A39393A39393A39393A3939393939393939393939393939
+      3939393939393939393939393939393939393939393939393939383939383939
+      3839383839383839383839383839383838383838383838383838383838383838
+      3838383838383838383838383838383838383838383838383838383837383837
+      3837373837373534343333333333333333333333333333333434343737363736
+      3637363637363637363636363636363636363636363636363636363636363636
+      3636363636363636363636363636363636363636363635363635363535363535
+      3635353635353535353635353535353635353534343534343535343434353434
+      3534353435343435343435343435343434343434333333343334343335343434
+      3433343333343333343333343333343333333332333232333333333232323131
+      2E2E2E2D2D2E2D2D2D2C2D2D2E2E2E2E2D2E2F2F2E2F2F2F2F2F303130303536
+      363E3E3E4444444747474949494A4B4A4B4C4B4D4C4D4D4D4E4D4D4D4F4F4F4F
+      4E4F4E4E4E4F4F4F5050504F4F4F515050515151525252545454545354505150
+      4D4E4E49494A4B4C4C4D4D4D4F4F505252525454545756575958595B5B5C5D5D
+      5E6363636867676B6A6A6D6D6D7170707473737777777979797C7C7C7F807F82
+      83828686868989898C8C8C8D8D8D9191909494949797979B9B9B9E9E9EA1A1A1
+      A5A5A6A8A8A8ABACACB0B0B08B8B8B3232321919191A1A1A1B1B1B1D1D1D1E1E
+      1E1F1F1F20202021212122222222222222222222222222222223232322222222
+      22222121212121212121212121211F1F1F1F1F1F1F1F1F1F1F1F1E1E1E1D1D1D
+      1B1B1B1B1B1B1A1A1B19191919191718181518171219181019180D1B1A0F2020
+      192727242D2D2C30313434343936373B39393E393A3F3A3B3F3C3C3B3E3E3C40
+      3F3942413743423742423941403B40403D3F3F3E3E3E3D3D3D3D3D3D3D3B3B3B
+      3939393737373434343131312E2E2E2929292525252020201B1B1B1616161010
+      100A0A0A06060605050504040403030303030303030303030302020201010100
+      00000000000000000000000000001E1E1E818181A9A9A9A5A5A5A1A1A19E9E9E
+      9A99999696969393938E8E8E8A8B8B8787878383837F7F807C7C7C7878787474
+      747171716D6D6D6A69696666666262625F5F5F5B5B5B5858585554545151514E
+      4E4E4B4A4A4747484545454243433F3F3F3C3C3C3A3A3A373837353534323233
+      2F2F2F2E2E2E2B2C2C2A2A2A2828272525252323232323232121211F1E1F1D1D
+      1D1D1C1C1A1A1A19191918181816171716161615141414141414141413131312
+      12111111111011100F10100F0F0F0E0E0E0D0D0E0D0D0C0C0C0C0C0D0C0C0C0C
+      0B0B0B0A0B0B0B0B0B0B0A0A0B0A0B0A0A0A0A0A0A0A0A090909090A0A0A0A09
+      0909090909090908090808090808080808080808070807070808080807070707
+      0708070707070707070707070607060706060606060606060606060606050606
+      0505050505060506050505050505050505050405050504040404040405040504
+      0504050404040504050404040404030403030304030303030404030303030303
+      0303030303020303030302020303030203030303020302030203030202020202
+      0202020202020202010102010201020201020102010201020102010102010101
+      0101010100010101010100010101010100010001000100010100010000000000
+      0101000001000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      30303030303030303030303333333535353737373A3A3A3C3C3C3232322F2F2F
+      2F2F2F2F2F2F2F2F2F3232323A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A
+      393A39393A39393A39393A39393A39393A393939393939393939393939393939
+      3939393939393939393939393939393939393939393939393938393938393838
+      3938383938383938383938383838383838383838383838383838383838383838
+      3838383838383838383838383838383838383838383838383738383738383737
+      3737333333333333333333333333333333333333353535373736373736373636
+      3736363736363736363636363636363636363636363636363636363636363636
+      3636363636363636363636363636363636363636363536363536353536353536
+      3535363535363535363535353534353435353535353434343435343434353534
+      3534343535343534343534343534343433343534333434343534333534343434
+      333434333433333433333433333433323333333332333030312E2D2F2D2D2D2D
+      2D2D2D2D2D2D2D2D2F2F2F2F2F2F2F3030313031393839424241474747494949
+      4A4A4A4C4C4C4D4C4C4F4F4F4E4F4E5151505150515051505151515151515252
+      5253535353535253525353535354545454545454545457575756575759595959
+      59595656575050515151525253545656565857585B5A5B5D5D5E606061646364
+      6868686D6D6D706F6F7473737777777979797C7C7C8080808383838686868A8A
+      8A8D8C8C9090909494949594959898989C9B9B9F9F9EA3A3A3A5A5A5A9A9A9AD
+      ADADAEAEAE6969691D1D1D1A1A1A1C1C1C1D1D1D1E1E1E202020212121222222
+      2323232424242424242424242424242323232323232323232323232323232323
+      232121212121212121212121211F1F1F1F1F1F1F1F1F1E1E1E1D1D1D1C1C1C1B
+      1B1B1A1A1A19191B17181E16172113173510184D0E18620B17730B18830B1A93
+      0C1C9A0A1AA5091AAB0A1AA90A1AA90A1AA90C1AA6111D9A121E9618238C1E26
+      81242B742D31673538573F3F4943434447463D47463C45443F43434142424140
+      40403E3E3E3A3A3A3838383535353030302C2C2C2727272222221C1C1C171717
+      1111110A0A0A0606060404040303030303030303030303030202020101010000
+      00000000000000000000000000040404595959A6A6A6A6A6A6A3A3A39E9E9E9B
+      9B9B9797979393938F8F8F8C8C8C8888888484847F7F7F7D7D7D787878747474
+      7171706D6D6D6969696766666262625E5D5E5B5B5B5858585454545050504E4E
+      4D4A494A4646474444444241413E3E3E3B3B3B3A3A3A3737363434343131312F
+      2F2F2D2D2D2B2B2B2A29292626262526252323242222212021211F1E1F1E1E1D
+      1C1B1C1B1B1B1919191716171717161414151414141415151313141212121110
+      111011111111100F100F0F0E0E0E0E0E0D0D0C0D0D0D0C0C0D0C0C0C0C0C0C0B
+      0B0B0B0B0B0B0B0B0A0A0B0B0A0A0A0A0A0A0A0A0A090A0A090A090A0A090909
+      0909090909090908080908080808080808080808080707080708080707070707
+      0707070707060707060607060606070706060606070706060606050506060605
+      0506060606060605050506050505050505050505050405040405050405050405
+      0405040405040404040403040403030304030303030403030404030304030303
+      0303030303030303030203030202030203030302030202020202020203020202
+      0202020102020202010102020201020201010102020102010102010101020101
+      0101010101010100010001010100010001010000000001000000000100000100
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303434343636363838383A3A3A3D3D3D2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F3434343A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A39
+      3A39393A39393A39393A39393A39393939393939393939393939393939393939
+      3939393939393939393939393939393939393939393839393839393839383839
+      3838393838393838393838383838383838383838383838383838383838383838
+      3838383838383838383838383838383838383838373838373838373635353333
+      3333333333333333333333333333333337363637373737373637373637363637
+      3636373636373636363636363636363636363636363636363636363636363636
+      3636363636363636363636363636363636363636353636353635353635353635
+      3536353536353535343436353536343435353535343435343536363535353435
+      3434353435353434353433353434353433353434353434343434343334343333
+      3533333433333433333433333333333030302C2C2D2D2D2E2D2D2D2D2D2D2F2E
+      2E2F2F2F2F2F2F3030303636374342434747474949494B4B4B4E4E4E4F4F4F51
+      5151515151525252535353545454545454555555535353555555555555555555
+      5555545555555655565555565656575757575858585959595A595A5B5B5B5E5E
+      5D605F5F5D5C5C5757575858595A5B5B5C5D5E60616162626366666769696A6C
+      6C6C7272727676767A79797C7C7C8080808383838686868A8A8A8D8D8D909090
+      9494949797979A9A9A9C9C9BA0A09FA3A3A3A6A6A6AAAAAAADADADA0A0A04949
+      491A1A1A1B1B1B1D1D1D1F1F1F20202021212123232324242425252525252525
+      2525252525252525252525252525252525242424242424242424232323232323
+      2121212121212121212121211F1F1F1F1F1F1F1F1F1D1D1D1C1C1C1B1B1B1919
+      1818191D0B1977021AC30019CD0019CC0018D20018D40017D10015CE0015CC00
+      15CA0014C80013C60013C50012C40012C30011C4000FC3000EC3000EC3000EC0
+      000FBB0110B60613AD101B9A1E26862B30703A3C594444494949424A49404646
+      434444434141413F3F3F3B3B3B3737373333332E2E2E2828282323231D1D1D17
+      17171010100A0A0A050505030303030303030303030303020202010101000000
+      000000000000000000000000000000333333989898A7A7A7A4A4A49F9F9F9B9B
+      9B9898979494949090908C8C8C888888848484807F807D7D7D78787874747471
+      71716D6D6D6A69696565656262625D5D5D5B5A5B5757575353535050504D4D4D
+      4A49494646474444444241423E3E3E3B3B3B3938393536363334333232322F2F
+      2F2D2C2D2B2B2B2829282627272425242323232121212020201E1D1D1C1C1D1A
+      1A1A1A1A1A181818171716161616141415141514141414131313121212111111
+      1111100F10100F0F0F0E0F0E0E0E0E0D0D0C0D0C0D0D0C0D0D0D0C0B0B0B0B0B
+      0B0A0B0B0B0B0A0A0A0A0A0A0B0A0A0A0A0A090A0A0A0909090A090909090909
+      0909080909090809090908080808080708080708070807070707070708070707
+      0707070607070707070607060606060707070606060606060605060605050605
+      0506060505050505050505050505050505050505050405050505050404040505
+      0404040404040404040404030404040404030304040404030303030303030303
+      0303030303030303030303030303030302020203020302020202020203030202
+      0202020202020102010102020101010101010202010102010101010101010101
+      0101010101010101010101000000000000010000000101010000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3131313434343636363838383B3B3B3B3B3B2E2E2E2F2F2F2F2F2F2F2F2F2F2F
+      2F3737373A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A
+      39393A39393A39393A3939393939393939393939393939393939393939393939
+      3939393939393939393939393939393939393939383939383938383938383938
+      3839383839383838383838383838383838383838383838383838383838383838
+      3838383838383838383838383838383838383837383837343434333333333333
+      3333333333333333333534343737373737373737373737363737363736363736
+      3637363637363636363636363636363636363636363636363636363636363636
+      3636363636363636363636363636363636363635363635363535363535363535
+      3635353635353535353535353635343635353535363635363535353635343534
+      3435343535343435353435353435343335343335343434343334343334343334
+      33333433333433332F2F2F2D2C2C2D2D2D2E2E2E2E2E2E2E2E2E2E2E2E303030
+      3333334040404747474949494B4B4B4E4E4E5050505353535353535555555757
+      575656555656575757575556565051514F4F4F50505150505050505053535358
+      5857575757595958585858585858595959595A5A5D5D5D5D5D5E5F5F5F626261
+      6464646565656161615D5D5E6060606363636665666968696B6B6C6F6F6F7373
+      737978787D7C7C8080808383838686868A8A8A8D8D8D9190919494949898989B
+      9B9B9E9E9FA1A1A1A4A4A3A7A7A7AAABABAEAFAE9191913232321B1B1B1D1D1D
+      1E1E1E2020202222222323232424242525252626262727272727272727272626
+      2627272726262626262626262625252524242424242424242423232323232321
+      21212121212121212121212020201F1F1F1E1E1E1D1D1D1B1B1B191919181816
+      1617220D18640319B80019CF0019CB0018CA0018C90017C70016C60016C60016
+      C50015C30015C20014C10014C00013BF0013BE0011BD0011BC0011BB0010BA00
+      0FBA000EBA000DBB000BBD000BB9020EB20B15A21D238830346D4243524A4A45
+      4C4B424848444444444141413D3D3D3939393434342F2F2F2929292323231C1C
+      1C17171710101008080804040403030303030303030302020201010100000000
+      00000000000000000000000000001C1C1B878787A8A8A8A3A4A4A0A0A09C9C9C
+      9999989494949090908D8D8D8888888484847F7F7F7D7D7D7878787474747171
+      706D6D6D6969696565656262625E5D5E5A5A5A5656565353534F4F504D4D4D4A
+      4A4A4646464443434040403D3D3E3B3B3B3939393535363333333031302F2F2F
+      2D2D2D2A2A2A2727272626272323242323232121211F1E1F1D1E1E1C1B1B1A1A
+      1A191A1917171717171716161614151414141413141312121211111010111110
+      1011100F100E0E0F0E0E0E0D0D0D0D0C0D0D0C0C0C0C0C0C0B0B0B0B0B0B0B0B
+      0A0B0B0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A090A0909090909090909090908
+      0909090808090908080808080808080808080807070807080707070707070707
+      0707070707060607070607070606060606060606060606060605050606050606
+      0506050505060606050605060505050505050505050504050404040404040404
+      0404040404040404040404040304040304030404040303030303030303030303
+      0303030303030303020302030203020302020202020202030202020202020202
+      0102020102020202020201010102010202020202010101020101010101010101
+      0101010101010101000101000101010100010100000000010000000000000000
+      0100000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303032323234
+      34343737373939393B3B3B3939392E2E2E2F2F2F2F2F2F2F2F2F2F2F2F393939
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39
+      393A39393A39393A393939393939393939393939393939393939393939393939
+      3939393939393939393939393939393938393938393838393838393838393838
+      3938383938383838383838383838383838383838383838383838383838383838
+      3838383838383838383838383838383738373733333333333333333333333333
+      3333333333363636373737373737373737373737373736373736373636373636
+      3736363736363636363636363636363636363636363636363636363636363636
+      3636363636363636363636363636363636363536363536353536353536353536
+      3535363435363535363535363535363536353535353636363535353534353534
+      3535343535343435343534333534343534343434333433343433333534343433
+      332F2F2F2D2D2D2D2D2D2D2E2E2D2D2E2F2F2F2E2E2E3030313A3B3A44454448
+      48484B4B4B4E4E4E5151515454545656565757575757575858584F4F4F474747
+      3F3F3F3737373839383A3A393B3B3B3C3B3B3D3D3D3F403F4040404142424646
+      464B4B4B5151515959585B5B5C5C5C5C5D5C5D5F5F5F60616163636366656568
+      68686A6A6A6A6A6A64646565666669686A6C6B6C6F6F6F717272767676797979
+      807F7F8383838686868A8A8A8D8D8D9191919494949898989B9B9BA0A0A0A3A2
+      A3A6A6A6A8A8A8ABABABAFB0B07C7C7C2525251C1C1C1E1E1E20202022222223
+      2323252525262626272727282828282828292929282828282828282828282828
+      2727272727272626262626262525252424242424242424242323232323232121
+      212121212121212020201F1F1F1E1E1E1D1D1D1B1B1B191A1A18181816161316
+      1507101638001AC80019CE0019CB0018CA0018C90017C70016C60016C60016C5
+      0015C30015C20014C10014C00013BF0013BE0011BD0011BC0011BB0010BA0010
+      B9000FB8000FB7000EB6000DB6000BB70009B9000AB50510A919208E30346E46
+      46524E4D454B4B444646454343433F3F3F3939393535352E2E2E282828212121
+      1B1B1B1414140C0C0C0606060303030303030303030202020101010000000000
+      000000000000000000000000000B0B0B6F6F6FA9A9A9A5A5A5A1A1A19C9C9C98
+      99999595959090908D8D8D8888888484847F807F7D7D7D787878747474717071
+      6C6C6C69696A6464646061615E5E5E5A5A5A5756575252534F4F504C4B4B4849
+      494545454342433F3F403C3C3C3A3A3A3838373535353233322F302F2E2E2E2C
+      2C2C292A2A2626262625252323242222222121211F1F1F1E1E1D1B1C1B1A1A1B
+      181818171717161516151415141514151414141313121212111111111111100F
+      0F0F100F0F0E0E0E0E0E0D0D0D0D0C0D0C0D0D0C0D0C0C0B0C0B0B0B0B0B0B0A
+      0B0A0A0A0B0A0A0B0A0A0A0A0A0A090A0A0A090A0A0909090909090909090909
+      0809090908090808080808080808080708080708080708070808070707070707
+      0707070706060706070706060606060606060606060606060605060506050505
+      0506060505050505050505050505050505050505050504050404040404050405
+      0404040404040404040304040304040303040403040403030303040303030303
+      0303030203020302030302030302020303020202020302020303020202020202
+      0102020102020201020102010101010102010101010102010101010101010101
+      0101000101000001010101010100010000010101010001000101000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303232323535353737
+      373939393B3B3B3635362F2F2F2F2F2F2F2F2F2F2F2F3030303A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A3939
+      3A39393A39393939393939393939393939393939393939393939393939393939
+      3939393939393939393939393839393839393839383839383839383839383839
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838383838383838373636363333333333333333333333333333333333
+      3337373737373737373737373737373737373737373637373637363637363637
+      3636373636363636363636363636363636363636363636363636363636363636
+      3636363636363636363636363636363636353636353635353635353635353635
+      3436353535363536363635363635363636363535363636353535353535353536
+      3534353534353434353433353433353434353434343333343434302F2F2D2D2D
+      2E2D2D2D2D2D2E2E2E2F2F2F2F2F303131323F3F3F4747464A4A4A4E4E4E5151
+      515353535555555959595A5A5A52525242424337363635353536363637373738
+      38383939393A3A3A3C3B3C3D3D3D3F3E3E404040414141434343444545464747
+      4948484A494A4F4F4F5858585D5D5D6060606161626464636767666969696C6C
+      6C706F6F7171716D6C6D6B6B6B6F6E6F7171727575757878797B7B7C80808085
+      85858A89898D8D8D9191919494949898989B9B9BA0A0A0A3A2A3A7A7A7AAAAAA
+      AEAEADB0B0B06C6C6C1B1B1B1D1D1D1F1F1F2222222323232525252626262727
+      272828282929292929292929292929292A2A2A29292929292929292927272727
+      2727272727262626262626252525242424242424242424232323232323212121
+      2121212121212020201E1E1E1D1D1D1B1B1B1A1A1A17171716161615140C0F15
+      40001ACD001ACF0019CB0019CB0018CA0018C90017C70016C60016C60016C500
+      15C30015C20014C10014C00013BF0013BE0011BD0011BC0011BB0010BA0010B9
+      000FB8000FB7000EB6000EB5000DB4000CB3000BB30008B60008B30811A52126
+      843C3E5F4C4C494E4E454848464343433F3F3F3939393434342D2D2D2525251F
+      1F1F191919111111090909040404030303020202020202010101000000000000
+      0000000000000000000000000000005C5C5CA9A9A9A5A5A5A1A1A19D9D9D9898
+      989595959090908D8D8C8888888484847F7F7F7C7C7C77777774747470706F6C
+      6C6C6869696463636161615C5D5D5959595556555253524F4F4F4B4B4B484848
+      4444444142413E3E3E3B3B3B3A3A3A3736373334333131312F2F2F2D2E2D2B2B
+      2B2828292726272424252323232122212020201E1D1E1D1D1C1A1A1B1A191918
+      1818171717151616151414141514141413121212111111111111111110101010
+      0E0E0F0E0E0E0D0D0D0D0D0D0D0D0D0D0D0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B
+      0B0A0B0B0A0B0A0A0A0A0A0A0A0A0A0A09090909090A09090909090909090908
+      0908080808080808080808080808080808080807070707070707070707070706
+      0607070607070707060606060606070606060606060606050606060606060605
+      0605060505060505050505050404050504050404040404050505050405040404
+      0405040304040404040404040403040403030403030303030403030303030303
+      0203030303030303020303020203020302030303020202020202020202020202
+      0102020101010102010201020201020101010201010101010101010101010001
+      0101010101010001000000010000000001000100000000000001000100000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000030303079797930303030303030303030303030303030
+      30303030303030303030303030303030303030303333333535353737373A3A3A
+      3C3C3C3333332F2F2F2F2F2F2F2F2F2F2F2F3231323A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393939393939393939383939383938383938383938383938383938383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838383838343434333333333333333333333333333333353434373737
+      3737373737373737373737373737373737373737363737363736363736363736
+      3637363636363636363636363636363636363636363636363636363636363636
+      3636363636363636363636363636363635363635363535363535363535363435
+      3636363636353636353535363636363535363636353535353535353535353535
+      343535343534343434343434343434343533343132312D2E2D2E2D2E2D2D2D2D
+      2D2D2F2F2F2F30303232314141414646464C4C4B4F4F4F535353565656585959
+      5B5B5B5151513C3C3C3434343433333434343636363737373737373939393A3A
+      3A3C3B3C3C3B3C3E3D3E403F404040404343424545454646464747484949484B
+      4B4B4D4D4E5051505353535C5C5C6362636666666969696B6C6B6E6F6E707070
+      7373737676767474747171727474747878787B7B7B7F7F7F8282838787878D8D
+      8D9191919494949898989B9B9BA0A0A0A2A2A3A7A7A7AAAAAAAEAEAEB1B1B161
+      61611C1C1C1F1F1F2020202222222525252626262828282929292A2A2A2B2B2B
+      2B2B2B2B2B2B2A2A2A2A2A2A2B2B2B2A2A2A2A2A2A2929292929292727272727
+      2727272726262626262625252524242424242424242423232323232322222221
+      21212020201F1F1F1D1D1D1B1B1B1A1A1A1818181515151513080B165C001BD6
+      001ACF001ACD0019CB0019CB0018CA0018C90017C70016C60016C60016C50015
+      C30015C20014C10014C00013BF0013BE0011BD0011BC0011BB0010BA0010B900
+      0FB8000FB7000EB6000EB5000DB4000CB2000CB1000BB10009B10007B5010AAD
+      161C9335376C4D4D4D4F4F464848464343433F3F3F3838383232322B2B2B2323
+      231C1C1C1515150D0D0D05050503030302020202020201010100000000000000
+      00000000000000000000000000004F4F4FA9A9A9A5A5A5A1A1A19D9D9D989898
+      9595959090908D8D8D8888888484847F7F7F7C7C7C7777777473746E6E6F6B6B
+      6B6767676363636060605C5B5C5858585454555251514E4E4E4A4A4A47474744
+      44444241423E3F3E3B3B3B3939383636363233333031312F2F2F2D2D2D2A2A2A
+      2827272625252324242222222121211F1F1F1E1E1E1C1C1C1A1A1A1A19191717
+      171616161415141515141415151313131212121111111111111010100F100F0F
+      0E0E0D0D0D0D0D0D0D0D0D0D0D0D0B0C0B0B0C0C0B0B0B0B0B0B0B0B0B0B0A0A
+      0B0B0A0A0A0A0A0A0A0A0A0A0A0A0909090A09090A0909090909090908080808
+      0808080808080808080708070807070807070808070707070707070707070707
+      0706070706070706070706060606060706060606060606050605060506050606
+      0505060506050505050505050505040504050405050505040504040505040404
+      0404040404040404030404040404040403030303040404040303030303030303
+      0303030302030303020202020203020203030302030202020202020202010202
+      0102010102020201020201010102010201010201010101010101020001010001
+      0101010101010101010101000000000000010001000101010000000001000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000003030307979793030303030303030303030303030303030303030
+      303030303030303030303030303030303333333636363838383A3A3A3C3C3C31
+      31312F2F2F2F2F2F2F2F2F2F2F2F3534343A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A39
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393939393938393938393938393838393838393838393838393838383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383833333333333333333333333333333333333336353537373737373737
+      3737373737373737373737373737373737373736373736373636373636373636
+      3736363636363636363636363636363636363636363636363636363636363636
+      3636363636363636363636363636363536363536353536353536363636363636
+      3636363636353636363635353536363636363535353535353534353534353535
+      3534343534343534333534343332322E2D2D2D2E2E2E2D2D2E2E2E2F2F2F3030
+      303434344243434848474B4B4C5050515555555958585A5B5A5656563D3D3D33
+      33333333333334343535343536353636363837373838383939393B3B3B3C3C3C
+      3E3E3E3F3F3F4040404342434444444645454747474949494C4C4C4E4E4E5050
+      4F5352525555555656565A5A5A636363696A6A6C6C6C6F6F7072737276757579
+      79797C7C7C7B7B7B7777787B7B7B7E7E7E8282838585868A8A8A8E8E8E949494
+      9797979B9B9BA0A0A0A3A3A3A7A7A7AAAAAAAEAEAEAEAEAD5655551D1D1D1F1F
+      1F2121212424242626262727272929292A2A2A2B2B2B2C2C2C2C2C2C2C2C2C2C
+      2C2C2B2B2B2C2C2C2B2B2B2B2B2B2A2A2A2A2A2A292929292929272727272727
+      2727272626262626262525252424242424242424242323232323232121212020
+      201F1F1F1E1E1E1B1B1B191919171717151515151308091879001CDD001ACE00
+      1ACE001ACD0019CB0019CB0018CA0018C90017C70016C60016C60016C50015C3
+      0015C20014C10014C00013BF0013BE0011BD0011BC0011BB0010BA0010B9000F
+      B8000FB7000EB6000EB5000DB4000CB2000CB2000CB0000BAF000AB00007B200
+      07B013189735386C4D4D4D4E4E464848474242423C3C3C3636362E2E2E272727
+      1F1F1F1919191010100808080303030202020202020101010000000000000000
+      00000000000000000000000000414141A5A5A5A5A5A5A1A1A19D9D9D98999895
+      95959090908C8C8C888888848383807F807B7B7B7777777273726F6F6E6A6A6A
+      6666666262625E5F5F5A5B5B5858585354534F504F4D4D4D4A494A4646464444
+      444140413D3D3D3B3A3B3838383635353232332F302F2E2E2E2C2C2C2A292A26
+      27272424252324232222222020201D1E1E1D1D1D1B1A1A1A1919181818171717
+      1516161514141515151314131212121111121111111010100F0F100E0F0E0F0E
+      0E0D0D0D0D0D0D0D0D0D0D0D0D0B0C0B0B0B0C0B0B0B0B0B0B0B0A0B0A0B0A0A
+      0A0A0A0A0A0A0A0A0A0A0A090A09090909090909090909090909080909080808
+      0808080708080808080808080808080708070807070707070707070707060707
+      0706070706070606060606060606060606060606060606060605060505060506
+      0605050505050505050505040505040505040504050404050404040405040404
+      0404040404040303040304040403030303030304030303030303030303030203
+      0302030303020302030203030303030302030202020202020302020202020202
+      0202020101020202010201010101010101010101010101020101010101010101
+      0001010001010100010001010100000101000100000001000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303434343636363838383A3A3A3D3D3D2E2E2E2F2F
+      2F2F2F2F2F2F2F2F2F2F3636363A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A3939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393839393839393839383839383839383839383839383838383838383838
+      3838383838383838383838383838383838383838383838383838383838373636
+      3333333333333333333333333333333333333737373737373737373737373737
+      3737373737373737373737373737373737373637373637363637363637363637
+      3636363636363636363636363636363636363636363636363636363636363636
+      3636363636363636363636363636353636353635353636363736363636363636
+      3636353636363636363636353536363536363536353535353435353436343435
+      34343534343434342E2E2E2E2E2D2E2D2E2D2E2D2E2E2E313130343434444444
+      4949494D4C4D5151505657565B5B5A5C5C5C4A4A4B3535353333333333333434
+      343535353534353636363838383738383939393A3A3A3C3C3C3D3D3D3E3D3E40
+      40404242424444444545454747474A49494A4A4A4D4D4D4F4F4F525251545353
+      5756575858595B5B5C5E5E5E6464646D6D6D7172727574757878777A7A7A7F7F
+      7F8181818181817D7E7E81818285858589898A8C8C8D9090919696969B9B9B9F
+      9F9FA3A3A3A7A7A7AAAAAAAEAEAEAEAEAE5353531F1F1F202020222222242424
+      2727272828282A2A2A2B2B2B2D2D2D2D2D2D2E2E2E2D2D2D2D2D2D2D2D2D2C2C
+      2C2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A2A2A2A29292929292927272727272727
+      27272626262626262525252424242424242424242323232222222121211F1F1F
+      1E1E1E1C1C1C191919161616151513141311061994001CDA001BD0001ACE001A
+      CE001ACD0019CB0019CB0018CA0018C90017C70016C60016C60016C50015C300
+      15C20014C10014C00013BF0013BE0011BD0011BC0011BB0010BA0010B9000FB8
+      000FB7000EB6000EB5000DB4000CB2000CB2000CB0000BAF000BAF000AAE0007
+      B10007AF121896383A684F4F4A4D4D464646464040403A3A3A3232322B2B2B22
+      22221C1C1C1313130A0A0A040404020202020202010101000000000000000000
+      0000000000000000000000003E3E3EA6A6A6A5A5A5A1A1A19D9D9D9898989494
+      949090908C8C8C8787878283837E7F7E7A7A7A7676767272716E6E6D696A6A66
+      66666262625E5E5E5A5A5A575757535253504F4F4C4C4C494949454545434242
+      3F3F3F3C3C3C3A3A3A3736373434343231312F302F2D2D2E2B2B2B2929292726
+      272323242323232222211F1F1F1E1E1E1C1B1C1A1B1A19191917171817171715
+      15151514151515151413131312121111111111111010100F0E0F0E0E0E0D0D0E
+      0D0E0D0D0D0D0D0D0C0C0C0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B0A0B0A0A0A0A
+      0A0A0A0A0A0A0A0A0A0909090909090909090909090808090908090908080808
+      0809080808080808070807080708070707070807070707070607070707060607
+      0707060706070606070606060706060606060606060506050605060606060505
+      0505050505050505050505050505050405050404040504040404040404040404
+      0404040403040403040403030303040404040303030303030403030303030303
+      0303030302020203020303030302030302020302020202020202020202020201
+      0101010201020101010201010101010201010101010101010101010101010001
+      0001010001010001010101010100000000000100000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      30303030303131313434343636363939393B3B3B3B3B3B2E2E2E2F2F2F2F2F2F
+      2F2F2F2F2F2F3737373A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A393A3A393A3A393A39393A39393A39393A39393A393939393939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939383939383938383938383938383938383938383838383838383838383838
+      3838383838383838383838383838383838383838383838383835353533333333
+      3333333333333333333333343434373737373737373737373737373737373737
+      3737373737373737373737373737373737363737363736363736363736363736
+      3636363636363636363636363636363636363636363636363636363636363636
+      3636363636363636363636363635363636373636373636373636363636363636
+      3635353636363535363536353535353535353535353535353535343534343534
+      343030302E2D2E2E2E2D2D2D2E2E2E2E3030303332334242414A49494D4D4D52
+      52525757575A5A5A5B5B5B3E3E3F313232333233333433333334353434353535
+      3636363838383837373838383939393C3C3C3C3C3C3F3E3E4040404141414243
+      43454544474647484948494A494C4C4C4E4E4E5151515352525655555858575B
+      5A5B5D5D5E6061606363636767677170717776777979797C7C7C818181848484
+      8888888585858585868888888C8C8D8F8F909494949898989D9D9DA3A3A3A6A6
+      A6AAAAAAAEAEAEAEAEAE5454541F1F1F2121212323232626262828282A2A2A2C
+      2C2C2D2D2D2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2D2D2D2C2C2C
+      2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A2A2A2A2929292929292727272727272727
+      272626262626262525252424242424242424242323232222222020201E1E1E1B
+      1B1B1A1A1A171717151412131417031AAE001CD8001CD1001BD0001ACE001ACE
+      001ACD0019CB0019CB0018CA0018C90017C70016C60016C60016C50015C30015
+      C20014C10014C00013BF0013BE0011BD0011BC0011BB0010BA0010B9000FB800
+      0FB7000EB6000EB5000DB4000CB2000CB2000CB0000BAF000BAF000AAD0009AD
+      0006AF0007AC191E8D42425E5151474A4A474343433D3D3D3636362D2D2D2626
+      261E1E1E1515150D0D0D05050502020202020201010100000000000000000000
+      00000000000000000000003E3E3EA5A5A5A5A5A5A1A1A19C9C9C989899939393
+      8F8F8F8B8B8B8686868283827E7E7E7A7A7A7575757271716D6D6D6A69696564
+      646161615D5C5D5959595556555151514F4F4F4B4B4B4747474444444242423E
+      3F3E3B3B3B3939393636353332323031312F2F2F2C2C2C2A2B2A272828262526
+      2423242222232121211E1E1E1D1D1D1B1B1B1A1B1A1818181717171616161515
+      15141414141313121212121111111111101010100F100F0F0F0D0E0E0D0D0D0D
+      0D0D0D0D0D0B0B0C0B0C0C0B0B0B0B0B0B0B0B0B0B0A0B0B0A0B0A0A0A0B0A0A
+      0A0A0A0A0A0A090A09090A090909090909090909090909090909080908090808
+      0808080808080807080708070807070807080707070707070707070706060707
+      0607070606060606060606070606060606060605050605060605050606050505
+      0505050605050505050405050504050505050504040505050504050404040304
+      0404040404040404040403030403030303030303030303030303030203030303
+      0203020202020203020302020302020202020202020202020202020202020202
+      0202010201010102010101010101010201020101010101010001010101010101
+      0001000100010101010001000001000000000000000000000000010100000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      303131313434343737373939393B3B3B3A3A3A2E2E2E2F2F2F2F2F2F2F2F2F2F
+      2F2F3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A39
+      3A3A393A3A393A3A393A39393A39393A39393A39393A39393939393939393939
+      3939393939393939393939393939393939393939393939393939393939393839
+      3938393938393838393838393838393838393838383838383838383838383838
+      3838383838383838383838383838383838383838383434343333333333333333
+      3333333333333335353537373737373737373737373737373737373737373737
+      3737373737373737373737373737373736373736373636373636373636373636
+      3636363636363636363636363636363636363636363636363636363636363636
+      3636363636363636363637363637373637363637363637363636363636363636
+      36363535353636363636353636353635353535353635343534343332322E2E2E
+      2E2E2E2D2E2E2E2F2F2F2E2F3132324242424848494D4D4E5252525656565B5B
+      5B5C5B5C3A3A3A31313132323233333434333434343434343436353537373738
+      38383837373A3A3A3B3B3A3C3C3C3D3D3E3F3F3F404040424242444444454545
+      4848484A494A4B4C4B4E4E4E5050505353535555555757575A5B5A5D5D5C5F5F
+      5F6262626565656969696B6B6B7576757C7B7C7E7F7F8283838686868A8A8A8E
+      8E8E8A8B8B8C8C8C8F8F8F9494959797979C9B9CA0A0A0A6A6A6AAAAAAAEAEAE
+      B2B2B25757571F1F1F2121212424242727272929292B2B2B2D2D2D2E2E2E2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C
+      2C2C2C2C2C2B2B2B2B2B2B2A2A2A2A2A2A292929292929272727272727272727
+      2626262626262525252424242424242323232222222121211E1E1E1B1B1B1919
+      19181818161511121423011CC9001DD6001CD2001CD1001BD0001ACE001ACE00
+      1ACD0019CB0019CB0018CA0018C90017C70016C60016C60016C50015C30015C2
+      0014C10014C00013BF0013BE0011BD0011BC0011BB0010BA0010B9000FB8000F
+      B7000EB6000EB5000DB4000CB2000CB2000CB0000BAF000BAF000AAE000AAC00
+      08AC0005AF050AA6292C7B4D4D4F4E4E47454545404040393939303030272727
+      2020201717170E0E0E0707070202020202020101010000000000000000000000
+      00000000000000000000414141A9A9A9A5A5A5A1A1A19C9C9C9898979393938E
+      8E8E8B8B8B8585858182827D7D7D7878787474747070706C6C6C676767646363
+      6060605B5B5B5858585455545051504D4D4D4A4A4A4747464444444041403E3E
+      3D3A3A3A3838383535353332333030302E2D2E2C2C2C29292927272725252423
+      23232221211F1F1F1E1E1E1C1C1C1B1B1B19191A171817161616151515151515
+      1515151313121111121112121111111010100E0E0F0F0F0E0E0D0D0D0D0D0D0D
+      0D0D0D0D0B0C0C0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B0A0A0B0B0A0A0A0A0A0A
+      0A0A0A090A0A0A09090909090909090909080908090809090808080808080808
+      0808080807080808080808080707070707070707070707070607070607070606
+      0607060706070707060606060606060605050606050606060605050505050505
+      0506050505050505040505040504040505050404040404050404040404040404
+      0403040403040304030404040403030304030303030303030303030303030303
+      0302030303030302030202030202020203020203020202020202020102020202
+      0102020202020202010101010202010201010101010101010101010101010101
+      0001010100010001010100000100000000000000010000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030303030323232
+      3535353737373939393B3B3B3737372E2E2E2F2F2F2F2F2F2F2F2F2F2F303A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A
+      3A393A3A393A39393A39393A39393A39393A3939393939393939393939393939
+      3939393939393939393939393939393939393939393939393939383939383939
+      3839383839383839383839383839383838383838383838383838383838383838
+      3838383838383838383838383838383838333333333333333333333333333333
+      3333333636363837373737373737373737373737373737373737373737373737
+      3737373737373737373737373737373637373637363637363637363637363636
+      3636363636363636363636363636363636363636363636363636363636363636
+      3636363636363737373737373737363736363736363636363636363636363636
+      363636363636363636353636353535353535353435342E2F2E2E2E2E2E2E2E2E
+      2E2E2F2F2F3030303D3D3D4847474D4D4C5252525756565C5B5B5B5B5B3A3A3A
+      3130313132323332333333333333333434343536363636363838383838383938
+      39393A393C3C3C3D3C3D3E3F3E4040404141414343444545454647474949494A
+      4B4A4E4D4E4E4F4F5151515353535757575859595B5C5C5F5F5F616162646464
+      6768676B6B6B6E6E6E7272727A7A7A8182818584848989898C8C8D9090909494
+      949090919393949697979B9B9C9F9E9FA3A3A3A8A8A8ADADADB2B2B263636320
+      20202222222525252828282A2A2A2C2C2C2E2E2E2F2F2F2F2F2F313131313131
+      3131313030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C
+      2C2C2C2C2B2B2B2B2B2B2A2A2A2A2A2A29292929292927272727272727272726
+      26262626262525252424242424242323232121211F1F1F1C1C1C191919171717
+      16150F0F163C001ED2001DD6001DD3001CD2001CD1001BD0001ACE001ACE001A
+      CD0019CB0019CB0018CA0018C90017C70016C60016C60016C50015C30015C200
+      14C10014C00013BF0013BE0011BD0011BC0011BB0010BA0010B9000FB8000FB7
+      000EB6000EB5000DB4000CB2000CB2000CB0000BAF000BAF000AAE000AAD0009
+      AB0007AC0003AF1216963E40625150474848464242423A3A3A3232322A2A2A22
+      2222181818101010070707020202010101010101000000000000000000000000
+      0000000000000000004E4E4EA9A9A9A5A5A5A0A0A09B9B9B9797979393938D8D
+      8D8A898A8585858081817C7C7C7777777474746F6E6F6B6B6B6667666262625E
+      5E5E5B5B5B5757575253524F4F4F4C4C4D4949494545454342433F3E3F3C3B3B
+      3939393737373434343031302F2F2F2D2D2D2A2A2A2828282625262424242323
+      232121211E1E1E1D1D1D1B1A1B1B1A1B18181818171716171615151515151414
+      14141213131112111111111010100F0F0F0F0F0F0E0D0D0D0D0D0D0D0D0D0D0D
+      0C0C0C0C0C0B0B0B0C0B0B0B0B0B0B0B0B0B0A0B0B0A0A0A0A0A0A0A0A0A0A0A
+      090A0A0A09090A09090909090909090809090908090909080908080908080808
+      0808080808070808080808070707070708070707070707070707070706070707
+      0707060606070606070606060606060605060505060606060505050606050505
+      0505050505050505050504050505050505050404050404040404040404040403
+      0403040304030304030404030303030303040303030303030303030303030302
+      0302030302030202020302030302020202020202020202020202020202020202
+      0202020101010102010101020101020101010101010101010101010101010101
+      0001010101010001010100000000000100000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      3030303030303030303030303030303030303030303030303032323235353537
+      37373A3A3A3C3C3C3635362F2F2F2F2F2F2F2F2F2F2F2F3232323A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A
+      393A39393A39393A39393A39393A39393A393939393939393939393939393939
+      3939393939393939393939393939393939393939393939393938393938393838
+      3938383938383938383938383838383838383838383838383838383838383838
+      3838383838383838383837373733323233333333333333333333333333333338
+      3737383737383737373737373737373737373737373737373737373737373737
+      3737373737373737373737373737363737363736363736363736363736363636
+      3636363636363636363636363636363636363636363636363636363636363637
+      3636373737373737373737373736373636363636363636363636363636363535
+      3535363635353635353635343635353131322E2E2E2F2E2E2E2E2E2F2F2F3030
+      303635364847474C4C4C5151515757575B5C5C5C5B5B39393931313131313132
+      32323332323433333434343534353635353838383838383838383A3A3A3B3C3C
+      3C3C3C3E3E3D403F404140414344434545454646474848484A4A494D4D4D4F4F
+      4F5252515353535656575958585B5B5B5E5E5E6161606464636766666969696D
+      6E6D7070707474747777778080808787878A8B8A8F8F8F939393979797989898
+      9797979A9A9A9E9E9EA3A3A3A6A6A7ABABABB2B2B27070702020202323232626
+      262828282B2B2B2D2D2D2F2F2F30303031313132323232323232323232323232
+      32323030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C
+      2C2C2C2B2B2B2B2B2B2A2A2A2A2A2A2929292929292727272727272727272626
+      262626262525252424242323232222222020201D1D1D1A1A1A17171717150B0D
+      1858001EDB001ED6001DD4001DD3001CD2001CD1001BD0001ACE001ACE001ACD
+      0019CB0019CB0018CA0018C90017C70016C60016C60016C50015C30015C20014
+      C10014C00013BF0013BE0011BD0011BC0011BB0010BA0010B9000FB8000FB700
+      0EB6000EB5000DB4000CB2000CB2000CB0000BAF000BAF000AAE000AAD0009AB
+      0008AA0004AE0208A72A2D794F4F4B4B4B464343433C3C3C3434342B2B2B2323
+      2319191911111108080802020201010101010100000000000000000000000000
+      00000000000000005D5D5DA9A9A9A4A4A49F9F9F9B9B9B9696969191918D8D8D
+      888888848484807F807B7B7B7676767272726E6E6E6A6A6A6565666161615D5D
+      5D5959595656565152524E4E4E4B4C4B4747474444444242423F3E3E3B3C3B39
+      3939363636333233302F2F2E2E2E2C2D2C2A2A2A272727242525232323222121
+      2020211E1E1E1C1C1C1B1A1B1A191A1817181717171516161515151414141312
+      131112111111121010111010100F0F0F0E0D0E0D0D0D0D0D0D0D0D0D0C0C0C0C
+      0C0C0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0A0A0A0B0A0A0A0A0A0A0A0A0A0A0A
+      0A0909090A090909090909090909090808090908090808080808080808080808
+      0808080808080808070708070707080707070706070706070707060606070707
+      0707060607060706060606060606060606060605050505060505050505050505
+      0505050505050405050405040504050405040504040404040404040404040403
+      0404040304030404030304040303030404030304030303030303030303030302
+      0202030203020303020202020202020202020202020202020202010102010102
+      0102020101020102010101010101020101010101010101010101010101000101
+      0100000000000001000000000000000100010000000100000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303333333535353737373A3A
+      3A3C3C3C3333332F2F2F2F2F2F2F2F2F2F2F2F3232323A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A39
+      3A39393A39393A39393A39393A39393939393939393939393939393939393939
+      3939393939393939393939393939393939393939393839393839393839383839
+      3838393838393838393838383838383838383838383838383838383838383838
+      3838383838383635353332323332323333333333333333333434343837373837
+      3738373738373737373737373737373737373737373737373737373737373737
+      3737373737373737373737373736373736373636373636373636373636363636
+      3636363636363636363636363636363636363636363636363636363737373737
+      3737373737373737373737373636363636363636363636363636353636363635
+      36363536353636353434342F2F2E2F2E2F2E2F2E2E2E2E2F2F2F323232434343
+      4B4B4B504F505656565A5A5B5D5E5E3D3C3C3131313131313232323233333434
+      343434343435343636353736363737373839393939393A3A3A3C3C3C3D3D3D3F
+      3F3F4040414242414343444545454848484A4A4A4C4C4C4E4E4E505050535252
+      5454545758575B5A5A5D5D5E60606063636265666669696A6C6C6D6F706F7273
+      727878777A7A7A7E7E7E8686868D8D8D9191919595959A99999D9D9D9D9D9D9E
+      9E9EA1A1A1A6A5A6AAABABAFAEAF7F7F7F2222222323232626262929292C2C2C
+      2E2E2E3030303131313232323434343333333333333333333333333232323232
+      323030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C
+      2C2C2B2B2B2B2B2B2A2A2A2A2A2A292929292929272727272727272727262626
+      2626262525252323232222222020201E1E1E1B1B1B1818181715090B1A77001F
+      E4001ED6001ED5001DD4001DD3001CD2001CD1001BD0001ACE001ACE001ACD00
+      19CB0019CB0018CA0018C90017C70016C60016C60016C50015C30015C20014C1
+      0014C00013BF0013BE0011BD0011BC0011BB0010BA0010B9000FB8000FB7000E
+      B6000EB5000DB4000CB2000CB2000CB0000BAF000BAF000AAE000AAD0009AB00
+      09AA0006AB0003AD191D8D4648554D4D454545443D3D3D3535352C2C2C232323
+      1B1B1B1212120909090202020101010101010000000000000000000000000000
+      00000000010101707070A8A8A8A3A4A49E9E9E9A99999696969091908C8C8B87
+      87878382837E7E7E7A7A7A7474747071706C6C6C6869686464636060605C5C5C
+      5858585554555050514D4D4D4A4A4A4646464344444040403D3D3C3A3A3A3737
+      373535353132323030302E2E2D2A2A2A2829282626252424242223232222221E
+      1E1E1D1D1D1B1B1B1A1A1A191918181717161616151515151515141414131313
+      1111121112111010100F0F0F0F0F0F0E0D0E0D0D0D0D0D0D0C0C0C0C0C0C0C0C
+      0C0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0A0B0A0A0A0A0A0A0A090A0A0A0A0A0A
+      0A09090909090909090909090909090808080809090808080808080808070808
+      0808080708070808070807070807070707070607060707060606060706070707
+      0706060706060606060605060605060605050506050506050605050606050505
+      0505050504050504050404050405050404050404040404040404040404040304
+      0404040404030303040403030303030303030303030303030303030203020203
+      0202030302020202020202030302020202020202020202020201020102020202
+      0202010201010201010101010101010101010101010101010101010001010100
+      0101000101010001000000000001010100000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000030303079797930303030303030303030303030303030
+      30303030303030303030303030303030303333333636363838383A3A3A3C3C3C
+      3232322F2F2F2F2F2F2F2F2F2F2F2F3534353A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A
+      39393A39393A39393A3939393939393939393939393939393939393939393939
+      3939393939393939393939393939393939393939383939383938383938383938
+      3839383839383838383838383838383838383838383838383838383838383838
+      3838353434333232333232333232333333333333353535383737383737383737
+      3837373837373737373737373737373737373737373737373737373737373737
+      3737373737373737373737373637373637363637363637363637363636363636
+      3636363636363636363636363636363636363636363636373737373737373737
+      3737373737373736363636363636363636363636363636363536363636353536
+      353636353231312E2E2E2E2E2E2E2F2E2F2F2F3030303C3C3C4949494D4E4E54
+      54545A5A595E5E5E454546303131323231313231323232333334343434343434
+      3534353636363736363938393838393A3A3B3D3C3C3C3C3D3E3E3E4040404141
+      414443444545454747464848484A4A4B4D4D4D4F4F4F52515253545456565758
+      59585C5C5C6060606262626564656868676C6C6C6F6E6F737273757576797979
+      7C7C7C8080808686858E8F8F9493949898989C9C9CA1A1A0A4A4A4A1A1A1A5A6
+      A6AAA9AAADAEAE9393932929292323232727272929292C2C2C2F2F2F30303032
+      3232333333343434343434343434343434333333333333333333323232323232
+      3030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C
+      2C2B2B2B2B2B2B2A2A2A2A2A2A29292929292927272727272727272726262625
+      25252424242222222020201E1E1E1B1B1B191918171610071C940020E3001FD7
+      001ED6001ED5001DD4001DD3001CD2001CD1001BD0001ACE001ACE001ACD0019
+      CB0019CB0018CA0018C90017C70016C60016C60016C50015C30015C20014C100
+      14C00013BF0013BE0011BD0011BC0011BB0010BA0010B9000FB8000FB7000EB6
+      000EB5000DB4000CB2000CB2000CB0000BAF000BAF000AAE000AAD0009AB0009
+      AA0007AA0003AE0B109D3C3D614F4E454545443E3E3E3535352D2D2D2424241B
+      1B1B121212090909020202010101010101000000000000000000000000000000
+      0000000A0A0A888888A7A7A7A3A3A39E9E9E9999989494948F8F8F8B8B8B8686
+      868182817D7D7D7878787474746F6E6E6B6B6B6767676362625E5E5E5B5B5B57
+      56575252534F4F4F4C4C4D4949484444444242413F3F3F3B3C3C393939363636
+      3333332F2F302E2E2E2D2D2C2A2A2B2827272525252323232121222020211E1F
+      1E1C1C1C1B1B1B19191917181817171616151516151514141413121212121212
+      12121110101011100F0F0F0E0E0E0D0D0E0D0D0D0D0D0D0C0C0C0C0C0C0C0C0C
+      1211111312131313131313121312121212131212121212121112121212111111
+      120E0E0F0D0D0D0D0D0D0D0D0C0A0A0B09080908080809080808080808080807
+      0808080808070807070807070708070707070707070706060707060707060706
+      0606070606060606060606060605060606050605050506050506050505050505
+      0505050505050505050505050404050405050404040504040404030404030404
+      0304040403040403040403040403030303030303030303030303030303030203
+      0202020303020202020202020202020202020101020102020202020202020201
+      0201020101020101010101020101010201010101010101010101010100010001
+      0101000000000001010000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000003030307979793030303030303030303030303030303030303030
+      303030303030303030303030303434343636363838383A3A3A3C3C3C3030302F
+      2F2F2F2F2F2F2F2F2F2F2F3534353A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39
+      393A39393A39393A393939393939393939393939393939393939393939393939
+      3939393939393939393939393939393938393938393838393838393838393838
+      3938383938383838383838383838383838383838383838383838383838383434
+      3433323233323233323233323233333336363638383738373738373738373738
+      3737383737373737373737373737373737373737373737373737373737373737
+      3737373737373737373737363737363736363736363736363736363636363636
+      3636363636363636363636363636363637373737373737373737373737373737
+      3737363636363636363636363636363636363636353636363535353635353535
+      2E2F2F2F2F2F2E2E2F2E2E2E2F302F3333334545454C4C4C5151515757575C5D
+      5D53535230313030303132323132313232323334343434343434343436363635
+      3536383837383939393A393A3A3A3C3D3C3D3D3D3F3F3F414141424242444443
+      4646464948494A4A4A4D4D4D4E4F4E5151515353535656565858585B5B5C5E5E
+      5E6161616464646767676A6A6A6E6E6E7171707474757878787C7C7D807F7F84
+      84848787878D8D8D969696999A999E9E9EA3A3A3A7A7A7A9A9A9A8A8A8ADADAD
+      A3A3A43737372424242727272929292D2D2D2E2E2E3131313333333434343535
+      3535353535353535353535353534343433333333333333333332323232323230
+      30303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C
+      2B2B2B2B2B2B2A2A2A2A2A2A2929292929292727272727272727272626262525
+      252323232121211F1F1F1D1D1D1A1A18171716061DA40020E7001FD8001FD700
+      1ED6001ED5001DD4001DD3001CD2001CD1001BD0001ACE001ACE001ACD0019CB
+      0019CB0018CA0018C90017C70016C60016C60016C50015C30015C20014C10014
+      C00013BF0013BE0011BD0011BC0011BB0010BA0010B9000FB8000FB7000EB600
+      0EB5000DB4000CB2000CB2000CB0000BAF000BAF000AAE000AAD0009AB0009AA
+      0008A90004AC0509A532346C4E4E454646443E3E3E3535352D2D2D2424241B1B
+      1B12121208080802020201010101010100000000000000000000000000000000
+      00001A1A1A9B9B9BA6A6A6A1A1A19C9C9C9898979393938D8D8D898988858585
+      80807F7B7B7B7777777272726E6E6E6969696566666161615D5D5D5858585656
+      565152514E4E4E4B4B4A4747474444444141403E3E3E3B3B3A38393935353532
+      3232302F302E2E2E2A2A2A2829282626262424242323222222221E1F1F1D1D1E
+      1B1B1B1A1A1A1818171818181616161516151515151313131212121212111010
+      101110100F0F0F0E0E0E0E0E0E0D0E0D0E0D0D0C0C0C0C0C0C0F0F0F191A1919
+      191A1A1A1A1A1A1A1A1A1A1B1B1A1A1A1A1B1A1A1A191A1A1A1A1A19191A1A19
+      191A191919191919191918181919191819191615151414141313131111110D0C
+      0D0C0B0C08070707070807080707070707070707060707060606070607060706
+      0606060607060606060506060506060505050505060605050505050505050505
+      0505050505050404040404040405040405040404040404040304040404030403
+      0303030403030304030303030303040303030303030303020303020202030303
+      0303020202020202020202020202020202020201020202010102020201010201
+      0101010101020102020201010201010101010101010101010101010101010001
+      0000010001010100000000000000010001000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303434343636363838383A3A3A3D3D3D2E2E2E2F2F2F2F2F
+      2F2F2F2F2F2F2F3837373A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A3939
+      3A39393A39393939393939393939393939393939393939393939393939393939
+      3939393939393939393939393839393839393839383839383839383839383839
+      3838383838383838383838383838383838383838383838383838323232323232
+      3332323332323332323332323737373838373838373837373837373837373837
+      3738373737373737373737373737373737373737373737373737373737373737
+      3737373737373737373736373736373636373636373636373636363636363636
+      3636363636363636363636363737373837373737373737373737373737373636
+      363636363636363636363636363636363636363636363535363232332F2F2F2F
+      2E2E2F2F2E2F30303030303E3E3F4949494F504F5555555B5B5B5E5E5D373737
+      3130303231323232323332323333333434343434343536353536363736373939
+      383939393B3A3B3B3B3C3C3C3C3E3F3E4040404141414344444545454747464A
+      494A4B4A4B4D4D4E504F505252525454545757575A5A5A5D5D5D606060636363
+      6565666969696C6C6C6F6F6F7372737677767A7B7A7E7E7F8182818686868A8A
+      8A8D8E8D9696969D9C9DA1A1A0A5A5A5AAAAAAAFAEAEACACACADADAD4D4D4D24
+      24242626262929292D2D2D303030323232343434353535363636363636363636
+      3636363636363535353535353434343333333333333333333232323232323030
+      303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B
+      2B2B2B2B2B2A2A2A2A2A2A292929292929272727272727272727252525242424
+      2222222020201E1E1E1B1B1B191814131733041EB10020E5001FD8001FD7001E
+      D6001ED5001DD4001DD3001CD2001CD1001BD0001ACE001ACE001ACD0019CB00
+      19CB0018CA0018C90017C70016C60016C60016C50015C30015C20014C10014C0
+      0013BF0013BE0011BD0011BC0011BB0010BA0010B9000FB8000FB7000EB6000E
+      B5000DB4000CB2000CB2000CB0000BAF000BAF000AAE000AAD0009AB0009AA00
+      08A90005AB0005AA292C764D4C474646433E3E3E3535352D2D2D2424241B1B1B
+      1111110808080202020101010101010000000000000000000000000000000000
+      00343434A6A6A6A5A5A5A0A0A09B9B9B9696969191918D8D8D8888888282827F
+      7F7E7A7A7A7574747171716C6C6C6768686363635F5F5F5C5C5B585858545454
+      50504F4D4D4D4A49494545454242423F3F3F3B3C3B3939393736363433333131
+      312E2E2E2C2C2C2B2A2A2727272526252323232222221F20201E1F1E1C1C1C1B
+      1B1B191919181817161617161516161515141415131313121211121111101010
+      0F0F0F0F0F0F0E0E0E0D0E0D0E0E0D0C0D0C0C0C0C141414191919191A1A1A1A
+      1A1A1A1A1B1B1B1B1B1B1B1B1C1B1B1B1B1B1B1B1B1B1A1B1B1A1A1B1A1B1A1A
+      1A1A1A1A1A1A1A1A19191A1A1A1919191A1A1919191919191919191919191918
+      1918191616161415141010100C0C0C0909090707060707070606070607060607
+      0607060706060606050606060605050605050505050505050505050505050505
+      0505050505040405040405050505040504040405040404040404040404040303
+      0303040303040403030303030303030303030303020302020303030203030302
+      0202020203020202030202020202020202020201020202020202010102010101
+      0102010201010101010101010201010101010101010101010100010001010101
+      0001010000010100000100000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      30303030303434343636363939393B3B3B3D3D3D2E2E2E2F2F2F2F2F2F2F2F2F
+      2F2F2F3837373A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393939393939393939383939383938383938383938383938383938383838
+      3838383838383838383838383838383838383837373732323232323232323233
+      3232333232333232383838383838383837383837383737383737383737383737
+      3837373737373737373737373737373737373737373737373737373737373737
+      3737373737373737373637373637363637363637363637363636363636363636
+      3636363636373636383737383737383737373737373737373737363636363636
+      3636363636363636363636363636363635363536362F30302F2F2F2F2F2F2E2E
+      2F30302F3332334646464C4B4C5252525859585D5D5D48484731313131313032
+      3232323131333333333333343434343434353535363636383837393939393A3A
+      3B3B3A3D3C3D3D3D3D3F403F4141414342434444444646464949494A4A4A4C4D
+      4D4F4F4E5151515353535656565959595C5C5C5D5D5E6161616565656868686A
+      6A6B6F6F6F7272727676767979797C7D7D8081818586858989898D8D8D919191
+      9696969F9F9FA4A4A3A8A8A8ACADACB1B1B1B4B4B46D6D6D2323232727272929
+      292D2D2D30303033333335353536363637373737373737373737373737373736
+      3636363636353535353535343434333333333333333333323232323232303030
+      3030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B
+      2B2B2B2B2A2A2A2A2A2A29292929292928282827272726262625252523232321
+      21211E1E1E1C1C1C1A191A19170F14161E071C9C0020E4001FD9001FD7001ED6
+      001ED5001DD4001DD3001CD2001CD1001BD0001ACF001AD0001AD00019D30019
+      CE0018C90018C90017C70016C60016C60016C50015C30015C20014C10014C000
+      13BF0013BE0011BD0011BC0011BB0010BA0010B9000FB8000FB7000EB6000EB5
+      000DB4000CB2000CB2000CB0000BAF000BAF000AAE000AAD0009AB0009AA0008
+      A90006AA0004AC22257E4B4B464646433D3D3E3535352C2C2C2323231A1A1A10
+      1010070707020202020202010101000000000000000000000000000000000000
+      595959A9A9A9A4A4A39E9E9E9999999595959190908B8B8B8686868282827D7D
+      7D7978787474746F6F6F6A6A6A6767676262625F5F5F5959595655565352534E
+      4E4E4A4B4B4747474444444141413D3E3D3B3A3A393838353635323232303030
+      2E2E2E2B2B2A2929282626272424242323232120211E1F1F1D1E1E1B1B1B1A1B
+      1A181818171717161616151615141414131313121212121212111111100F0F0F
+      0F0F0E0E0E0E0E0E0E0D0D0C0C0C0E0D0D1818181A1A1A1A1A1A1A1B1B1B1B1B
+      1C1C1C1C1C1C1B1C1C1C1B1C1C1B1B1B1B1B1B1B1B1A1A1B1B1A1A1A1A1A1A1A
+      1A1A1A1A1A1A1A1A1A191A1A191A191919191A19191919191919191919191818
+      19181919191818191818181918181818181414141011110E0D0D070606070706
+      0606060606060606050606060606050605050505060505050505060505050505
+      0505050505050505050504050405040504040404040404030403040404040304
+      0403030403040403030403040303030303030203030302030303030303020303
+      0202020202020202020202030202020202020202020202020102020202010202
+      0102010101010101010201010101010101010101010001000101010100010101
+      0100000001010000000000000000000100000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303131
+      313434343737373939393B3B3B3939392E2E2E2F2F2F2F2F2F2F2F2F2F2F2F39
+      39393A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A39
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393939393938393938393938393838393838393838393838393838383838
+      3838383838383838383838383838383737363232323232323232323232323332
+      3234333338383838383838383838383738383738373738373738373738373738
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737373737373737363737363736363736363736363736363636363636363636
+      3637373738383738373738373738373737373737363636363636363636363636
+      36363636363636363636363636363535352F2F2F2F2F2E2F2E2E2F3030313031
+      3B3B3C4848494E4E4E5655555B5A5A5C5C5B3434343131313131303131313231
+      323233333535353434343435343637363737373939393939393B3B3B3B3C3C3D
+      3C3C3F3E3F4040414142414544454545454747474A4A4A4B4B4B4D4E4D4F5050
+      5353535554555757585B5A5A5D5D5D6060606263636767676A6A6A6D6D6D7071
+      707373737878787C7C7C8080808384848787878B8C8B8F8F8F9493939898989F
+      9F9FA6A6A6ABABABAFAFAFB4B4B49494942727272626262929292D2D2D303030
+      3333333535353737373838383838383838383838383838383838383636363636
+      3636363635353535353534343433333333333333333332323232323230303030
+      30303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B
+      2B2B2B2A2A2A2A2A2A2929292929292727272727272525252424242222222020
+      201D1D1D1B1B1B191A1A181710161513081C950020E5001FD9001FD7001ED600
+      1ED5001DD5001DD6001CD7001CDB001CDB001ACF0119C20417A10119BD0019CF
+      0018C90018C90017C70016C60016C60016C50015C30015C20014C10014C00013
+      BF0013BE0011BD0011BC0011BB0010BA0010B9000FB8000FB7000EB6000EB500
+      0DB4000CB2000CB2000CB0000BAF000BAF000AAE000AAD0009AB0009AA0007A9
+      0006AA0003AC21257D4B4A454544413C3C3D3434342B2B2B2222221919190F0F
+      0F06060602020202020201010100000000000000000000000000000005050582
+      8282A8A7A7A2A1A29D9D9D9999999393938F8E8E8989898484847F807F7B7B7B
+      7677777272726D6D6D6A696A6363646060605D5C5C58585855555550504F4D4D
+      4D4A4A4A4545464343433F3F3F3C3C3C3939393636363333333131312E2E2E2C
+      2C2D2A2A2B2728282525262323232222222020201F1F1E1D1D1C1B1C1B191919
+      1818181516151615151615161313131212121212121111111110100F0F0F0E0E
+      0E0E0E0E0E0E0D0D0E0E1111111919191A1A1A1B1A1A1B1C1C1C1C1C1C1C1C1D
+      1D1D1C1D1D1D1D1C1C1C1C1C1C1C1C1C1C1C1C1C1C1B1C1C1C1B1C1B1B1B1B1B
+      1B1B1B1B1B1B1B1B1A1A1B1B1B1A1B1A1B1A1A1A1A1A1A1A1A1A1A19191A1918
+      19181819191919191A191919191A1A1A1B1B1B2020200A0B0B07060607070606
+      0606060606060606050605050605050505060605050505050505050505050505
+      0505050405050504040404040404050404040404040404040404030404030304
+      0404030303040404030403030303030303030303030202020303020302020203
+      0202020303020202020202020202020202020202010202020202020101010101
+      0202010101010101010101010101010101010100000100010001010100010000
+      0101000100010100010000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030313131353535
+      3737373939393B3B3B3A3A3A2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F3B3A3A3B3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A3939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393839393839393839383839383839383839383839383838383838383838
+      3838383838383838383838363535323232323232323232323232323232343434
+      3838383838383838383838383838373838373837373837373837373837373837
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737373737373736373736373636373636373636373636363636363636373737
+      3838383838373837373837373837373636363636363636363636363636363636
+      363636363636363636363333332F2F2F2F2E2F2F2F2F2F302F3031304443434B
+      4A4B5151515757575D5D5D4A4A4A313131313131323232323231333333333434
+      3535343534353635363736363839393939393939393B3B3B3D3D3C3E3E3E3F3F
+      404141414242434445454647464949494A4A4A4D4D4D4F4F4F52525254545457
+      57575A595A5C5C5C605F5F6262626565656768686C6C6C6F6F6F737373777676
+      7A7A7A7E7E7E8282828685868A8B8A8F8E8F9494939897979B9B9BA0A0A0A8A8
+      A8AEAEADB2B2B2AEAEAE3A3A3A2626262929292D2D2D30303034343435353537
+      37373838383A3A3A393939393939393939383838383838383838363636363636
+      3636363535353535353434343333333333333333333232323232323030303030
+      303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B
+      2B2B2A2A2A2A2A2A2929292929292727272626262525252424242222221F1F1F
+      1D1D1D1B1B1B191919181712161515081C950020E4001FDD001FE0001FE3001E
+      DA011DCE031BB60619910916690C13440F11221010090A1352001AD10019CC00
+      18C90018C90017C70016C60016C60016C50015C30015C20014C10014C00013BF
+      0013BE0011BD0011BC0011BB0010BA0010B9000FB8000FB7000EB6000EB5000D
+      B4000CB2000CB2000CB0000BAF000BAF000AAE000AAD0009AB0009AA0007A900
+      06AA0003AC20247C4A49444443413C3C3C3333332A2A2A2121211717170D0D0D
+      0404040202020202020101010000000000000000000000000000001B1B1BA0A0
+      A0A6A5A5A1A1A19B9B9B9696969191918D8D8D8888888383837E7E7E7A7A7A74
+      74757070706B6B6B6767666363635E5F5E5A5A5A5656565353534F4F4F4C4C4C
+      4747474445454242423E3E3E3B3B3A3839393536363232333030302E2E2E2B2B
+      2B2928292626262424242323232121211F1E1E1D1C1D1C1B1C1A1A1A18181817
+      17171616161616161515151313131212121212121110110F100F0F0F0F0F0E0E
+      0E0E0E0D0E0D1818171A19191A1B1A1B1B1B1D1C1D1A1A1A1414151515161515
+      161515151515151515151514151818181818181718181718171B1A1A1B1B1B1B
+      1B1B1A1B1B1B1B1B1A1B1A1B1B1B1A1A1A1A1A1A1A1A1A1A191A1A1A1A1A1A19
+      1919191A1A191A1A1A1B1B1B2020202626261211110607070607060606060606
+      0606060606060606050606060605060505060506050505050505050505050505
+      0505040505050404050404040404040404040404040404040404040404040304
+      0404030303030303030303030303030303030203030303030303030203030302
+      0202020202020202020302010202020202020202010101010102020202020202
+      0101010101010101010102010101010101010100000100000100000001010000
+      0001010000010000010000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      3030303030303030303030303030303030303030303031313135353537373739
+      39393B3B3B3A3A3A2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F3B3A3A3B3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A393A3A393A3A393A39393A39393A39393A39393A393939393939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939383939383938383938383938383938383938383838383838383838383838
+      3838383838383835353532323232323232323232323232323235353538383838
+      3838383838383838383838383837383837383737383737383737383737383737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737373737373637373637363637363637363637363636363638383838383838
+      3838383837383737373737363636363636363636363636363636363636363636
+      3636363636363130312F2F2F2F2F2F2F2F2F3030303435354747474D4D4D5453
+      545A5A5A5E5E5E37373731313231313132323232323233333334343434353434
+      353536373637363638383839393A3A3A3B3C3C3C3D3D3D3F3F3E404040424141
+      4443444645454748484A49494B4B4B4E4E4E4F4F505253525455545857585A5A
+      5A5D5D5E6060606464646767676A6A6A6E6E6E7272727474747878797D7D7D80
+      80808585858989898D8C8D9090919695969999999E9F9EA2A2A2A9A9A9B0B0B0
+      B5B4B56464642626262929292C2C2C3030303232323636363838383939393939
+      393A3A3A3A3A3A3A3A3A3A3A3A38383838383838383838383836363636363636
+      3636353535353535343434333333333333333333323232323232303030303030
+      3030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B
+      2B2A2A2A2A2A2A2929292828282727272626262525252323232121211F1F1F1C
+      1C1C1B1B1B191919181712161616071D9D021FCE061CA1091A7D0D1755101430
+      12131913120E13110512100910100C10100D100F0905168E001AD60019CA0018
+      CA0018C90017C70016C60016C60016C50015C30015C20014C10014C00013BF00
+      13BE0011BD0011BC0011BB0010BA0010B9000FB8000FB7000EB6000EB5000DB4
+      000CB2000CB2000CB0000BAF000BAF000AAE000AAD0009AB0009AA0007A90006
+      AA0003AC20247C49484242424039393A3131312828281F1F1F1515150B0B0B04
+      04040202020202020101010000000000000000000000000000004A4A4AA9A9A9
+      A4A4A49E9E9E99999A959595908F908B8B8B8585858181817C7C7C7777777272
+      726F6E6E6A6A6A6565656161615C5D5D5858595555565151514D4D4D49494946
+      46464343433F3F403B3C3C3939393637363433343030302E2E2E2C2C2C292A2A
+      282727252425232323222222201F201E1D1E1C1C1B1B1A1A1818181818181616
+      1616161514141413141312121212121211111110100F100F0F0F0E0E0E0E0E10
+      10101A19191A1A1A1C1B1C1C1C1C1D1D1C0F0F100D0D0D0D0D0D0D0D0D0D0D0D
+      0D0C0D0C0D0D0D0D0C0C0C0C0C0C0C0C0C0B0C0B0B0B0B0B0C0B0B0B0B0B0F0F
+      0F0E0F0F1212131313131718171818181A1A1A1A1A1A1A1A1A19191A191A191A
+      1B1B1B1B1C1F1F1F2424242929291B1B1B070707060606060606060606060606
+      0606060606050606050505060605060605050505050505050505050504050505
+      0505050505040404040404040404040404040404040404040404040404040304
+      0403030303030403030303030303030303020303030303020203030302030202
+      0302020202020202020202020102020201020102010101020202010202020102
+      0102010102010101010101010101010101010101010001010100010000000001
+      0000000000010000000100000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303232323535353737373939393B3B
+      3B3838382E2E2E2F2F2F2F2F2F2F2F2F2F2F2F3B3A3A3B3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A39
+      3A3A393A3A393A3A393A39393A39393A39393A39393A39393939393939393939
+      3939393939393939393939393939393939393939393939393939393939393839
+      3938393938393838393838393838393838393838383838383838383838383838
+      3838383434343232323232323232323232323232323635353838383838383838
+      3838383838383838383838383738383738373738373738373738373738373737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737373737363737363736363736363736363736363838383838383838383838
+      3838383737373736363636363636363636363636363636363636363636363636
+      36362F2F2F2F2F2F2F2F2F2F2F2F3131313D3C3C4A4A4A4F4F4E5555555B5B5B
+      5253533132313132323231313232323232323333333535353434343636353736
+      373738373A39393A3A393B3B3B3D3D3D3D3D3D40404041414143434345444447
+      46464849494B4A4B4D4D4D504F505252525453545757575A5A5A5C5C5C5F5F5F
+      6363626565656969696C6C6C6F6F6F7373737677777B7C7B7F7E7E8382828788
+      878B8B8B8F8F8F9493949999999C9C9CA1A2A1A6A7A6ABABABB3B3B391919127
+      27272929292C2C2C3030303333333636363737373A3A3A3B3B3B3B3B3B3B3B3B
+      3B3B3B3B3B3B3A3A3A3A3A3A3838383838383838383838383636363636363636
+      3635353535353534343433333333333333333332323232323230303030303030
+      30302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B
+      2A2A2A2A2A2A2929292828282626262626262424242323232121211F1F1F1D1D
+      1D1C1C1C1A1A1A18181416171D15172316151417150A16140B15140F15141215
+      14131313131212121111111111111110090E112A0119C30019CF0019CA0018CA
+      0018C90017C70016C60016C60016C50015C30015C20014C10014C00013BF0013
+      BE0011BD0011BC0011BB0010BA0010B9000FB8000FB7000EB6000EB5000DB400
+      0CB2000CB2000CB0000BAF000BAF000AAE000AAD0009AB0009AA0007A90006AA
+      0004AB26297348474040403F3838382F2F2F2626261D1D1D1313130909090303
+      030202020202020101010000000000000000000000000101017F7F7FA7A7A7A2
+      A2A29D9D9D9798979393938E8D8D8888888484837F7F7F7A7A7A757575707070
+      6C6C6C6767676363635F5F5F5A5B5A5757575353534F4F4F4B4C4C4848484544
+      444141413E3E3E3B3B3B3839393535363333322F2F2F2E2E2E2B2B2B29292926
+      27272424242222222121211F1F1F1D1D1D1C1B1B1A1919181818171717161616
+      161616131414121312121212111111111111100F100F0E0E0E0E0E1616161919
+      1A1B1A1B1B1C1C1D1E1D1A191A0E0D0D0E0D0E0E0D0D0D0D0D0D0D0D0D0D0C0C
+      0D0D0D0C0C0C0C0C0C0C0C0C0C0C0B0B0C0C0B0B0B0B0B0C0B0B0B0B0B0B0B0B
+      0B0B0B0B0B0B0A0A0A0A0A0A0A0A0A0D0D0D1010111414131716171A1B1B1E1E
+      1E2223232827272D2D2D23232307070606070707070707060706060606060706
+      0606050606050606050606050606050605050505050505050505050505050504
+      0405050504050404040404040504050404040303040404040303040404030403
+      0403030404030303030303030303030303020303030203020302020203020203
+      0303020202020202020202020202020102010202010102010202020201010102
+      0101010102010101010101000101010101010101000101010001000000010100
+      0101000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000030303079797930303030303030303030303030303030
+      30303030303030303030303030303232323535353737373939393B3B3B363536
+      2F2F2F2F2F2F2F2F2F2F2F2F3232323B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A
+      3A393A3A393A39393A39393A39393A39393A3939393939393939393939393939
+      3939393939393939393939393939393939393939393939393939383939383939
+      3839383839383839383839383839383838383838383838383838383838383834
+      3434323232323232323232323232323232373737383838383838383838383838
+      3838383838383838383838373838373837373837373837373837373837373737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737373736373736373636373636373737383838383838383838383838383838
+      3737373636363636363636363636363636363636363636363636363434342F2F
+      2F2F2F2F2F2F2F3030303131314141424B4B4B5050505757575D5D5C41424231
+      3131323131323232323332333334343434353535343535363635373737393938
+      393A3A3A3A3A3B3C3B3D3D3D3E3F3E4040404242424444444546464746474A49
+      494B4B4B4E4E4E5050505353535555555858585B5B5A5D5E5E61616164646467
+      68686B6A6B6E6E6E7272727575757879797D7D7D8181818585858A8A8A8E8E8E
+      9292929596969B9B9AA0A09FA5A5A5A9A8A9ADADAEB0B0B04242422929292C2C
+      2C2F2F2F3333333636363838383A3A3A3B3B3B3C3C3C3C3C3C3C3C3C3B3B3B3B
+      3B3B3B3B3B3A3A3A3A3A3A383838383838383838383838363636363636363636
+      3535353535353434343333333333333333333232323232323030303030303030
+      302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2A
+      2A2A2A2A2A2929292828282626262626262424242323232121211F1F1F1D1D1D
+      1C1C1C1B1B1B1A19171919151817161817171818181717171616161616161515
+      15151515131313121212111111110F04081570001AD80019CB0019CB0018CA00
+      18C90017C70016C60016C60016C50015C30015C20014C10014C00013BF0013BE
+      0011BD0011BC0011BB0010BA0010B9000FB8000FB7000EB6000EB5000DB4000C
+      B2000CB2000CB0000BAF000BAF000AAE000AAD0009AB0009AA0008A90006AA00
+      05AA2D2F6947473D3D3D3D3636362C2C2C2323231A1A1A101010060606030303
+      020202020202010101000000000000000000000000212121A4A4A4A5A5A5A0A0
+      A09B9B9B9696969090918B8B8B8686868282827D7D7D7877777373736E6F6F6A
+      6A6A6565656161615D5C5C5858595655565453534D4D4D4A4A4A464646434343
+      403F3F3C3C3D3939393636373333333130302E2E2E2C2C2C2A2A2A2727282424
+      242323232222221F1F1F1E1E1D1B1C1C1A1A1A19181917181716161615161615
+      15141313141212121212121111111010100E0F0F0F0F101B1B1B1A1A1A1B1C1C
+      1C1D1D1D1D1E1313130E0D0E0E0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D
+      0D0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0B0B0C0B0C0B0B0B0B0B0B0B0B
+      0B0B0B0A0B0B0A0A0B0A0A0A0A0A0A0B0A090A0A0A0A0A0F0F10212020252525
+      2929292F2F2F2D2D2D0607070707060706070607060606070706060606060606
+      0606050606050505060505060505050505050505050505050505050505040505
+      0504050404040404040504040404040303040404040404030304030303030304
+      0304040304040303030303030303020203020303030303030202030203020302
+      0202020202020202020201010202010102020101010102010202020101020101
+      0101010101010101010101000101010100000100010000000001000101000100
+      0100000000000000000001000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000003030307979793030303030303030303030303030303030303030
+      303030303030303030303232323535353737373A3A3A3C3C3C3635362F2F2F2F
+      2F2F2F2F2F2F2F2F3232323B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A
+      393A39393A39393A39393A39393A39393A393939393939393939393939393939
+      3939393939393939393939393939393939393939393939393938393938393838
+      3938383938383938383938383838383838383838383838383838383333333232
+      3232323232323232323232323237373738383838383838383838383838383838
+      3838383838383838383837383837383737383737383737383737383737373737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737373637373637363637373738383838383838383838383838383837363636
+      36363636363636363636363636363636363636363636363333332F2F2F2F2F2F
+      2F2F2F3030303232324747474C4C4B5353535857585D5D5D3737373131323231
+      323232333232323333333434343535353535353636373737373938393A3A393C
+      3B3B3C3C3C3D3D3D3F3F3F4141424242424545454546464949494A4A4A4C4C4D
+      4F4F4F5251515455545757575A595A5C5C5C60605F6262626566666969696D6C
+      6D6F6F707373737777777C7C7C7F80808382828787888C8C8C91919194949499
+      99999D9D9DA2A2A2A6A6A6ABABACB0B0B07272722727272B2B2B2F2F2F323232
+      3535353838383B3B3B3C3C3C3D3D3D3C3C3C3D3D3D3D3D3D3C3C3C3B3B3B3B3B
+      3B3B3B3B3A3A3A3A3A3A38383838383838383838383836363636363636363635
+      3535353535343434333333333333333333323232323232303030303030303030
+      2F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2A2A
+      2A2A2A2A2929292828282626262525252424242323232222222020201E1E1E1D
+      1D1D1C1C1C1B1B1B1A1A1A1919191919191A1A1A191919181818171717171717
+      15151513131312121212100C0F101D0219B7001AD30019CB0019CB0018CA0018
+      C90017C70016C60016C60016C50015C30015C20014C10014C00013BF0013BE00
+      11BD0011BC0011BB0010BA0010B9000FB8000FB7000EB6000EB5000DB4000CB2
+      000CB2000CB0000BAF000BAF000AAE000AAD0009AB0009AA0008A90005AB0409
+      A435365B44443B3B3B3B3333332A2A2A2121211717170E0E0E04040403030303
+      03030202020101010000000000000000000000005B5B5BA9A9A9A4A4A49E9E9E
+      9999989393938D8E8D8989898484847F7F7F7A7A7A7575757171716D6C6C6868
+      686262635F5F5E5D5D5D5E5E5E5F5F5F5757574C4C4C4848484544454241423E
+      3E3E3A3A3A3838383435353131312F2F2F2D2D2D2B2B2B282828252625242424
+      2322232020201F1F1F1C1C1C1B1B1A1918181818191616171616161515151314
+      141312121313131211111010100E0E0F1414141B1B1B1C1C1C1C1C1C1D1C1D1D
+      1D1D0E0D0E0E0D0E0E0D0E0E0D0D0E0D0D0D0D0D0D0D0D0D0D0D0C0D0C0C0C0D
+      0C0C0D0C0C0C0C0C0C0C0C0C0B0C0C0C0B0B0B0C0C0B0B0B0B0B0B0B0A0A0B0B
+      0B0A0A0B0B0A0A0B0A0B0A0A0A0A0A0A0B0B0B0C0C0D2020202726262C2C2C30
+      30303333330A0A0A070707060706070707060606060606070707060606060606
+      0606060606050505050606060506060505050505050505050405040505050505
+      0404050404040404040404040404040404040403040404030304040303040304
+      0303040303030303030303030303020303030303020302030202020303030202
+      0202020202020202010202020102020201010202020202010102020101020101
+      0101010101010101010101000101010000010101000101010101000001010000
+      0000000000000101000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303232323535353737373A3A3A3C3C3C3635362F2F2F2F2F2F2F2F
+      2F2F2F2F3232323B3A3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A39
+      3A39393A39393A39393A39393A39393939393939393939393939393939393939
+      3939393939393939393939393939393939393939393839393839393839383839
+      3838393838393838393838383838383838383838383838323232323232323232
+      3232323232323232323838383838383838383838383838383838383838383838
+      3838383838383838383738383738373738373738373738373738373737373737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737363737363837373838383838383838383838383838383636363636363636
+      363636363636363636363636363636363636363232322F2F2F2F2F2F2F2F2F30
+      30303636364848484D4D4D5454545A5A5A575757323132313132313231323332
+      323332343334353635353635363636373736383838393A39393A393C3C3C3E3E
+      3D3E3D3D4040414141414343434545454747464A4A494B4C4B4E4E4E51515153
+      53535556555757575B5B5B5E5E5E6161616364636868686B6B6B6E6E6E727272
+      7575767979797D7D7D8181818585858A8A8A8E8E8E9393939797979C9C9CA0A0
+      A0A5A5A4A9AAAAAFAFAEA0A0A13232322B2B2B2E2E2E3232323535353939393A
+      3A3A3C3C3C3D3D3D3E3E3E3E3E3E3E3E3E3D3D3D3D3D3D3C3C3C3B3B3B3B3B3B
+      3B3B3B3A3A3A3A3A3A3838383838383838383838383636363636363636363535
+      353535353434343333333333333232323232323232323030303030303030302F
+      2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A
+      2A2A2A2929292828282727272626262424242323232222222121211F1F1F1F1F
+      1F1E1E1E1D1D1D1C1C1C1C1C1C1C1C1C1C1C1C1B1B1B1A1A1A19191916161615
+      1515141414121212121005091463001BD8001ACD0019CB0019CB0018CA0018C9
+      0017C70016C60016C60016C50015C30015C20014C10014C00013BF0013BE0011
+      BD0011BC0011BB0010BA0010B9000FB8000FB7000EB6000EB5000DB4000CB200
+      0CB2000CB0000BAF000BAF000AAE000AAD0009AB0009AA0008A90004AD090E9A
+      3D3D4C41403C3838393030302727271E1E1E1515150B0B0B0303030303030303
+      030202020101010000000000000000000C0C0C949494A7A7A6A1A1A19B9B9B96
+      96969192928C8C8C8787878282827D7D7D7878787373736F6F6F6A6A6A686868
+      6868686666666363636060605D5D5D5757574B4B4B4646464242433F3F403C3C
+      3C3939393736373434343131312E2E2E2B2B2B29292927272724252522222322
+      21211F1F1F1D1D1D1C1C1C1A1A19181819171717161616161616141414121212
+      1313121112111010101010101919191B1B1C1C1C1C1D1D1D1E1E1E1617170E0D
+      0E0E0D0E0E0D0E0E0D0E0E0D0E0E0E0E0E0E0E0E0E0E0E0E0D0D0D0D0C0C0C0C
+      0C0C0C0D0C0C0C0C0C0C0C0C0C0C0C0B0C0B0C0C0B0B0B0C0C0B0B0B0B0B0B0B
+      0B0B0B0A0B0B0B0A0A0A0A0A0A0A0A0C0C0C1D1D1E2726272A2B2A2F2F2F3433
+      3313131307070707070607070607060607070606060606060606060606060605
+      0605060606050506060505050506050505050505050505050505050505040505
+      0505050404040404050404050304040404040403030404040303030304030303
+      0404030303030303030303030303030303030303030302030203030202020202
+      0202020202020202020201010202020101010202010102010202010101010102
+      0101010101010101010001000101010101010101010001000001010000000001
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      30303232323535353737373A3A3A3C3C3C3635362F2F2F2F2F2F2F2F2F2F2F2F
+      3232323B3A3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A
+      39393A39393A39393A3939393939393939393939393939393939393939393939
+      3939393939393939393939393939393939393939383939383938383938383938
+      3839383839383838383838383838383838383832323232323232323232323232
+      3232323232383838383838383838383838383838383838383838383838383838
+      3838383838383838373838373837373837373837373837373837373737373737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3736383838393838383838383838383838383838363636363636363636363636
+      3636363636363636363636363636363130312F2F2F2F2F2F2F2F2F3030303A3A
+      3B4949494E4E4E5555555A5A5A4F4F4F31323232323231313133333333323234
+      34343635363635363636363737373939393A3A3A3A3B3B3C3B3B3D3D3E3E3E3E
+      4040414242424444444646464848484A4A4A4D4D4D4F4F4E5251525453545757
+      575A5A5A5D5C5C5F5F5F6262626666656969696C6C6D6F6F6F7374747777777C
+      7C7C7F7F7F8383838888888C8C8D9091919595949A999A9E9E9EA2A2A2A7A7A7
+      ACACACB0B1B15E5E5E2B2B2B2E2E2E3131313535353838383A3A3A3C3C3C3E3E
+      3E3F3F3F3F3F3F3F3F3F3E3E3E3D3D3D3D3D3D3D3D3D3C3C3C3B3B3B3B3B3B3B
+      3B3B3A3A3A3A3A3A383838383838383838383838363636363636363636353535
+      3535353434343333333333333333333232323232323030303030303030302F2F
+      2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A2A
+      2A2A292929282828262626262626252525232323232323222222202020202020
+      1F1F1F1F1F1F1E1E1E1D1D1D1D1D1D1D1D1D1C1C1C1B1B1B1919191717171515
+      1513131312120E0F111B0219B6001AD4001ACD0019CB0019CB0018CA0018C900
+      17C70016C60016C60016C50015C30015C20014C10014C00013BF0013BE0011BD
+      0011BC0011BB0010BA0010B9000FB8000FB7000EB6000EB5000DB4000CB2000C
+      B2000CB0000BAF000BAF000AAE000AAD0009AB0009AA0007A90003AE14198A42
+      423F3D3D3B3535362D2D2D2424241B1B1B121212070707030303030303030303
+      020202010101000000000000000000424242A9A9A9A4A4A49E9E9E9999999494
+      948F8E8E8989898484858080807A7A7A7475757373737272726F6F6F6C6C6C67
+      67676565656262626060605C5C5C5757574949494444444141413D3D3D3A3A3B
+      3838383535343232312F2F2F2D2D2D2A2A2A2828282425252323232323231F20
+      1F1E1E1E1C1C1C1B1A1B18191818181716161616161615151513131313131211
+      11111010111313131C1C1C1D1D1D1D1E1D1D1D1D1E1E1E1111110E0D0E0E0D0E
+      0E0D0E0E0D0D0E0E0E1211111112111111111111111111111011101010101111
+      100F0F100F0F0F0E0E0E0D0E0E0C0D0D0C0C0C0B0B0C0B0B0B0B0B0B0B0B0B0B
+      0B0B0A0B0B0A0B0A0A0A0B0B0B0B1B1B1A2525252929282F2F2F3433341E1F1F
+      0707070707070707070707070707060706070707060606060606060605060605
+      0606050606060505060606050605050605050505040404050505050405040504
+      0504040504040404040404040404040404040304030304040304030304030303
+      0303030303030303030303030203030302030303020303020202020202020202
+      0202020201020202020202020201010101010102020202020201020202010101
+      0102010101010101010101010100000000000001010001000101010000010001
+      0000010000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303232
+      323636363838383A3A3A3C3C3C3635362F2F2F2F2F2F2F2F2F2F2F2F2F2F2F31
+      31313636363B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39
+      393A39393A39393A393939393939393939393939393939393939393939393939
+      3939393939393939393939393939393938393938393838393838393838393838
+      3938383938383838383838383838383232323232323232323232323232323232
+      3239383838383838383838383838383838383838383838383838383838383838
+      3838383838383837383837383737383737383737383737383737373737373737
+      3737373737373737373737373737373737373737373737373737373737373838
+      3839383839383838383838383838383836363636363636363636363636363636
+      36363636363636363636363130312F2F2F2F2F2F2F2F2F3030303D3C3D4A4A4A
+      4F4F4F5555555A5A5A4747473232323232323332333333323333343435343536
+      353536353737373737373939393A3A3A3C3C3C3D3D3D3E3E3E403F3F42414142
+      42424545454747474949494B4B4B4E4E4E504F505353525556555858575B5B5A
+      5D5D5D6160616464646767676B6B6B6E6E6E727272767676797A797D7D7D8182
+      818585858A8A8A8E8E8E9393939797979C9C9CA1A1A1A5A5A5AAAAAAAFAFAF96
+      96962D2D2D2E2E2E3131313434343737373B3B3B3D3D3D3E3E3E3F3F3F3F3F3F
+      4040404040403F3F3F3E3E3E3D3D3D3D3D3D3D3D3D3C3C3C3B3B3B3B3B3B3B3B
+      3B3A3A3A39393938383838383839393938383838383837373737373736363636
+      36363535353434343434343333333232323232323030303030303030302F2F2F
+      2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A2A2A
+      2A29292928282827272726262625252525252524242423232321212121212121
+      21212020202020201F1F1F1F1F1F1E1E1E1C1C1C1A1A1A181818161616141414
+      131313131107081670001BD8001ACE001ACD0019CB0019CB0018CA0018C90017
+      C70016C60016C60016C50015C30015C20014C10014C00013BF0013BE0011BD00
+      11BC0011BB0010BA0010B9000FB8000FB7000EB6000EB5000DB4000CB2000CB2
+      000CB0000BAF000BAF000AAE000AAD0009AB0009AA0007AA0004AD2326714242
+      393A3A393232322929292020201717170D0D0D05050503030303030303030302
+      0202010101000000000000030303888888A6A6A6A1A1A19B9B9C979797929192
+      8C8C8C878787828282807F7F7D7D7D7A7A7A7676767272726E6E6E6B6B6B6767
+      676464646161615E5E5E5C5C5C5757574646454343423F3F3F3B3B3B39393936
+      36363332332F2F302E2E2E2B2B2C2828282626262424242223232120201F1F1F
+      1C1C1C1B1B1B1819191918191617171616161615151414141213131213121112
+      111717171B1C1C1C1C1D1D1E1E1E1E1F1B1B1B0E0E0F0E0D0F0E0D0E0E0D0E0E
+      0D0E101010121212111212111111111111111111111111111111101110101011
+      1011101010100F1010100F0F1010100F0F0F0F0F0F0E0E0E0C0D0D0A0A0C0B0B
+      0B0A0B0B0A0B0A0C0B0B1615162424242928292D2E2E33323228272707070707
+      0707070707070706070707070606060606060607060607060606060606060606
+      0506060505050506050605050505050505050405050505040505050404050405
+      0404050504040404040404040403040404040403030404030303030304040303
+      0303030303030303020203030302030302030203020303020202030202020202
+      0202020202020202020202020102020102010102020101010101010102010101
+      0102010101010101000100010101010101000101010001000000010000010000
+      0000000000000001000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030323232363636
+      3838383A3A3A3C3C3C3635362F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F3030303534353A3A393A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A3939
+      3A39393A39393939393939393939393939393939393939393939393939393939
+      3939393939393939393939393839393839393839383839383839383839383839
+      3838383838383838383838323232323232323232323232323232323232393838
+      3938383838383838383838383838383838383838383838383838383838383838
+      3838383838383738383738373738373738373738373738373737373737373737
+      3737373737373737373737373737373737373737373737373737383838393938
+      3938383938383838383838383636363636363636363636363636363636363636
+      363636363636362F2F2F2F2F2F2F2F2F2F2F2F3131313F3F3F4A4A4A4F4F4F56
+      56565A5A5A424242323232323232333333333232333433353434353635363536
+      3737383938383A3A3A3A3A3A3C3C3C3E3E3E3F3F3E4141414142414343444646
+      464747474A4A4A4C4C4C4E4E4E5151515353535757575958585C5B5C605F5F61
+      61616566656969696C6C6C7070707273737777777B7B7B7F7F7F838383888888
+      8C8C8C9091919495959A9A9A9E9F9EA4A4A3A8A7A7ADACACB1B2B15757572D2D
+      2D3030303434343737373A3A3A3D3D3D3E3E3E40404040404040404040404040
+      40404040403F3F3F3E3E3E3D3D3D3D3D3D3D3D3D3C3C3C3B3B3B3B3B3B3B3B3B
+      3B3B3B3A3A3A3A3A3A3939393939393939393939393939393838383838383737
+      373636363636363535353434343434343232323131313030303030302F2F2F2F
+      2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A2A2A2A
+      2929292929292727272626262626262525252525252424242323232323232323
+      232222222121212020201F1F1F1E1E1E1C1C1C19191917171715151513141413
+      120D101223011BC2001AD2001ACE001ACD0019CB0019CB0018CA0018C90017C7
+      0016C60016C60016C50015C30015C20014C10014C00013BF0013BE0011BD0011
+      BC0011BB0010BA0010B9000FB8000FB7000EB6000EB5000DB4000CB2000CB200
+      0CB0000BAF000BAF000AAE000AAD0009AB0009AA0006AB0208A73234553F3F38
+      3737372F2F2F2525251D1D1D1414140A0A0A0303030303030303030303030202
+      02010101000000000000383838A9A9A9A4A4A49E9E9F9A9A9A9494948F8F8F8B
+      8B8B8A8A8A8585858181817C7C7C7878787575747070706C6C6C696969666666
+      6363636060605D5D5D5B5B5B5656564645464141403D3C3D3939393737373434
+      343131312E2E2E2D2C2C2A292A272727242525232323212222201F1F1D1D1D1C
+      1C1C1A1A1A1918191717171616161515151414141313131313121213131D1D1D
+      1C1C1C1E1E1E1F1F1E1E1E1E1414140E0E0F0E0D0F0E0D0F0E0D0E0E0D0E1212
+      1212121211121211121211111111111111111111111111101110111110101010
+      10101010100F0F100F1010101010100F0F0F100F0F0F0F0C0C0C0A0B0B0A0A0A
+      0A0A0B0B0C0B1212122323232828282D2D2D3031312C2D2C0707070807070707
+      0707070707070706060607060707060607060607060606060606060606060506
+      0506060606050605060506060505050505040405040504050505040504040405
+      0404050404040404040403040404040404040403030303030403030303040403
+      0303030303030302030302030303030302020302020303020203020203020202
+      0202020202020202010201010202020201010102020102010101010101010102
+      0101010101010101010100010101010100010001010001000101000000000001
+      0100000000000100000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      303030303030303030303030303030303030303030303333333636363838383A
+      3A3A3C3C3C3535352F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F303333333939393A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393939393939393939383939383938383938383938383938383938383838
+      3838383837373732323232323232323232323232323233323239383839383839
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838373838373837373837373837373837373837373737373737373737
+      3737373737373737373737373737373737373737373738383839393839393839
+      3838393838383838363636363636363636363636363636363636363636363636
+      3636362F2F2F2F2F2F2F2F2F2F2F2F3131314141414A4A4A5050505656565A5A
+      5A3C3C3C32323232323233333333333333343435363535353637373637383738
+      39393A3A3A3B3B3B3C3C3C3E3E3E3F3F3F4040414242434545464746464A4949
+      4A4A4A4D4E4D4F4F4F5152525555555757575B5B5B5C5D5D6060606464646766
+      676A6A6A6D6D6D7272727475757879787D7C7C8080818585868989898E8E8E93
+      92929797979C9C9CA0A0A0A5A5A5AAAAAAAFAFAF9696962E2E2E2F2F2F333333
+      3737373A3A3A3D3D3D3F3F3F4040404141414141414141414141414040404040
+      404040403F3F3F3E3E3E3D3D3D3D3D3D3D3D3D3C3C3C3B3B3B3C3C3C3C3C3C3B
+      3B3B3B3B3B3A3A3A3B3B3B3B3B3B3C3C3C3C3C3C3C3C3C3D3D3D3C3C3C3B3B3B
+      3A3A3A3838383737373636363434343333333232323131313030302F2F2F2F2F
+      2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A2A2A2A29
+      2929292929282828272727262626262626262626252525242424232323232323
+      2222222121212020201E1E1E1D1D1D1A1A1A1818181616161514141412070E15
+      43011BC9001BD3001ACE001ACE001ACD0019CB0019CB0018CA0018C90017C700
+      16C60016C60016C50015C30015C20014C10014C00013BF0013BE0011BD0011BC
+      0011BB0010BA0010B9000FB8000FB7000EB6000EB5000DB4000CB2000CB2000C
+      B0000BAF000BAF000AAE000AAD0009AB0009AA0005AF0D12923C3C3E3A3A3733
+      33332B2B2B222222191919101010060606030303030303030303030303020202
+      010101010101020202878787A7A7A6A1A1A19B9C9B9797979696969291928D8C
+      8C8787878484848080807B7B7B7676777373736F6F6F6A6A6A67676765656561
+      61616060605C5C5C5A5A5A5757574646463F3E3E3A3A3B383838353535323232
+      3030302D2E2D2B2C2B2828282525252323232323232020201E1F1E1C1D1C1A1A
+      1A1919191818181616161616161414141313131312131617171D1D1D1D1D1D1E
+      1E1E1F1F1E1E1E1E0E0E100E0E0F0E0E0E0E0E0F0E0D0F0F0F0F121212121212
+      1212111111121111111111121111111111111111101011101010101110101010
+      10101010100F10101010100F0F10100F10100F0D0D0D0B0B0B0B0A0A0B0A0B0C
+      0B0C0D0E0D2222232727272C2C2C303131353435080807080807070707070707
+      0707070607070707070707070706060606060606060606060506060606060506
+      0606060605050505060505050505050505050505050405040405050404050504
+      0504040404050404040404040404040403030304030303040403030304030303
+      0303030303030303030303030303020203020302030203030303020202020202
+      0202020202020202010202010201010102010101010202010201010101010101
+      0101010101000100010101000100000001000000000101010100000100000000
+      0001000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303434343737373939393B3B3B3D3D
+      3D3939393232322F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F3232323737373A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A39
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393939393938393938393938393838393838393838393838393838383838
+      3737373232323232323232323232323232323434343938383938383938383938
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383837383837383737383737383737383737383737373737373737373737
+      3737373737373737373737373737373737373939393939393939383939383938
+      383838383636363636363636363636363636363636363636363636363636362F
+      2F2F2F2F2F2F2F2F2F2F2F3131314141414A4A4A4F4F4F5555555A5A5A3D3D3D
+      323232323232333333333333343534353536363535363637383738393A393A3A
+      3A3B3B3B3D3D3D3E3E3E4040404242424343434546464847474A4A4A4D4C4C4F
+      4F4E5151515453545656565858585B5B5B5F5F5F6162626564656868686B6B6B
+      6F6F6F7273727777777A7A7A7F7F7F8383838788888B8C8C9090919494949999
+      999E9E9EA3A2A2A7A7A7ADADADB2B2B25A5A5A2F2F2F3333333636363939393D
+      3D3D3F3F3F414141414141424242414141424242424242404040404040404040
+      4040403F3F3F3E3E3E3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3C3C3C3C3C3C3D3D
+      3D3D3D3D3D3D3D3E3E3E4040404040404040404242424141414040403F3F3F3E
+      3E3E3B3B3B3A3A3A3838383636363333333232323131313030303030302F2F2F
+      2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A2A2A2A2929
+      2929292927272727272727272726262626262625252524242423232323232322
+      22222020201E1E1E1C1C1C1B1B1B1919191616161614080E1645011CCA001CD7
+      001CD1001BD0001ACE001ACE001ACD0019CB0019CB0018CA0018C90017C70016
+      C60016C60016C50015C30015C20014C10014C00013BF0013BE0011BD0011BC00
+      11BB0010BA0010B9000FB8000FB7000EB6000EB5000DB4000CB2000CB2000CB0
+      000BAF000BAF000AAE000AAD0009AB0009AA0004AF1E22723D3D343636362F2F
+      2F2727271E1E1E1515150B0B0B05050503030303030303030302020201010101
+      0101010101393939A9A9A9A4A4A4A2A1A29E9E9E9999999494948F8F8F8B8B8B
+      8686868282827E7E7E7979797373736A6A696262636060606565656363636161
+      615E5E5E5B5B5B5858585454544344443D3C3C393A3A3737373434343131312E
+      2E2E2C2B2B2829292626272424242223232121211F1F1F1C1C1D1B1B1B191919
+      1818181717171616161515151314141313131C1C1C1E1D1E1E1E1E1F1F1F1F1F
+      201818170E0F0F0E0E100E0E0F0E0E0F0E0E0F12111213121212121212121212
+      1212111112111112111111111111111111101110101110101110101010101010
+      1010100F101010100F10100F100F0F0E0E0E0B0B0B0B0A0B0B0B0B0A0B0A0D0D
+      0D1F1F1F2827282B2B2B30303034343314131307080808070807070707070707
+      0707070707070706060607060607060607060706060606060606060606060605
+      0505060505050605050505060505050505050405050405050405040405040405
+      0404040404040404030404030404030403030404030303030403030304030303
+      0303030303020303030303030202020303030302020202020202020202020202
+      0202010202020102010202020101010201010101020101010101010101010101
+      0101010101010100010001010100000001000001010100000100000000000000
+      0101000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000030303079797930303030303030303030303030303030
+      30303030303030303030303030303535353838383A3A3A3B3B3B3D3D3D3E3E3E
+      4040403C3C3C3434342F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F3131313636363A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A3939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393839393839393839383839383839383839383839383838383837373732
+      3232323232323232323232323232343434393938393838393838393838393838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383738383738373738373738373738373738373737373737373737373737
+      3737373737373737373737373737393939393939393939393938393938383838
+      3636363636363636363636363636363636363636363636363636362F2F2F2F2F
+      2F2F2F2F2F2F2F3131314141414A4A4A5050505454545A5A5A3D3D3D32323232
+      32323333333334343535353636353536363837373839383A3A3A3B3B3B3C3C3D
+      3E3E3E3E3E3E4141414242424444444646464847474A4A4A4C4C4C4F4E4F5252
+      515454545757575A5A5A5D5D5D60605F626363676766696A696E6D6D71717175
+      75757878787C7C7C8181818585858989898D8D8D9292929797979B9B9BA1A0A0
+      A5A5A5AAAAAAAFAFAF9898983131313232323535353939393C3C3C3F3F3F4141
+      4143434343434342424243434342424242424242424240404040404040404040
+      40403F3F3F3E3E3E3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3E3E3E3F3F3F
+      4040404242424444444545454747474747474848484747474646464444444242
+      423F3F3F3C3C3C3A3A3A3737373535353333333232323131313030302F2F2F2E
+      2E2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A2A2A2A292929
+      2929292727272727272727272626262626262424242424242323232222222020
+      201E1E1E1C1C1C1A1A1A18191818160A0F1746011DCD001DDB001DD3001CD200
+      1CD1001BD0001ACE001ACE001ACD0019CB0019CB0018CA0018C90017C70016C6
+      0016C60016C50015C30015C20014C10014C00013BF0013BE0011BD0011BC0011
+      BB0010BA0010B9000FB8000FB7000EB6000EB5000DB4000CB2000CB2000CB000
+      0BAF000BAF000AAE000AAD0009AB0007AC020AA531324C3A39333333332B2B2B
+      2323231A1A1A1111110707070404040404040303030202020101010101010101
+      01030303898989ABABABA5A5A6A1A1A19C9C9C9797979292928D8E8E88888884
+      85847D7D7D7373736D6D6D6969686565656060605F605F6464646262625F5F5F
+      5B5B5B5959595656565252524242413A39393738373434343131312E2E2E2C2D
+      2C2A2A2A2727272525252323232222222020201E1D1E1C1C1C1A1B1A19191917
+      17171616161515151414141616161E1E1E1F1F1F1F1F201F1F1F202020131313
+      0E0F100F0E0F0E0E0F0E0E0F0F0F0F1312121312121212121212121212121212
+      1112121111111211111111111011111111101011101111101010101010101010
+      1010100F0F1010100F10100F0E0E0B0B0C0B0B0B0B0B0B0B0B0A0C0C0B1B1B1C
+      2625252A2A2A2F2F2F3434341C1C1C0807080807070708070807070707070706
+      0707070706060607070706060606060606060606060605060606060606060606
+      0505050505050506050505050505040505050505040504050405050404040405
+      0505040404040404040404030404030304030404030303040303030403030303
+      0303030303030202030302030202020202030302020302020202020202020201
+      0202020202010202020202020201020101010102020201010101010101010101
+      0101010001010001010000010101000000000001000001000000010000000001
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000003030307979793030303030303030303030303030303030303030
+      303030303030303030303636363939393B3B3B3C3C3C3D3D3D3F3F3F40404040
+      40404040403E3E3E3535353030302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F3030303434343939393A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A393A3A393A3A393A39393A39393A39393A39393A393939393939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939383939383938383938383938383938383938383838383737373232323232
+      3232323232323232323234343439393839393839383839383839383839383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838373838373837373837373837373837373837373737373737373737373737
+      3737373737373737373739393939393939393939393939393838383836363636
+      36363636363636363636363636363636363636363636362F2F2F2F2F2F2F2F2F
+      2F2F2F3131314141414A4A4A4F4F4F5454545858583C3C3C3232323333333333
+      333434343535353535353535363837383839393A3A3A3B3B3B3C3C3D3E3E3E3F
+      3F404141414343434545454746474A4A494A4B4A4E4E4E4F4F4F535353555555
+      5858585B5B5B5E5E5E6161616464646867686C6B6B6E6F6E7272737676767A7A
+      7A7F7F7F8383838787878B8B8B9090909494959999999E9E9EA3A3A3A8A8A8AD
+      ADADB2B1B26362623131313434343838383C3C3C3F3F3F414141424242434343
+      4444444444444444444242424242424242424242424040404040404040404040
+      403F3F3F3E3E3E3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3E3E3E40404043434345
+      45454747474A4A4A4D4D4D4E4E4E4F4F4F4E4E4E4E4E4E4B4B4B494949464646
+      4242423F3F3F3B3B3B3838383636363333333131313131313030302F2F2F2E2E
+      2E2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A2A2A2A29292929
+      29292727272727272727272626262525252424242222222121212020201E1E1E
+      1C1C1C1A1A1A19180C111948021ECF001EDD001ED5001DD4001DD3001CD2001C
+      D1001BD0001ACE001ACE001ACD0019CB0019CB0018CA0018C90017C70016C600
+      16C60016C50015C30015C20014C10014C00013BF0013BE0011BD0011BC0011BB
+      0010BA0010B9000FB8000FB7000EB6000EB5000DB4000CB2000CB2000CB0000B
+      AF000BAF000AAE000AAD0009AB0006B01217873939353535342F2F2F2727271E
+      1E1E1616160C0C0C050505040404040404030303020202010101010101010101
+      444444AEAEADA9A9A9A3A3A49F9F9F9A9A9A9595969191918989887E7F7F7979
+      797575757070706B6B6B6666666362625E5E5F5D5D5D6262626060605D5D5D5A
+      5A5A5757575555555151514343423838383535353232323030302E2D2E2A2B2B
+      2929292625252423232222222020201D1D1D1C1D1D1A1A1B1919191717171616
+      161516151414141B1A1A2020202020201F201F2020201D1D1D1010110F0F100E
+      0E100E0E0F0E0E0F111111131312121313121312121212121212121212121212
+      1111111111121111111011111111111110111111101011111010111010101010
+      100F0F0F10100F100F0F0C0C0C0B0B0B0B0B0B0B0A0B0C0B0C18191924242429
+      29292F2F30333333252525080707080807070707070707080707070707070707
+      0607070606060707070707070606070606060606060605060606060506050506
+      0605050505060505050504050505050505050505050405040505050504050404
+      0404040404040404040403040404040403030404030304030303030304030303
+      0202030203030203030203020302020202020202020202020202020202020202
+      0202020202020201020101010201010101010101020201020201010101010101
+      0101010100010101010000010100000001000001000101000100000001000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303535353B3B3B3C3C3C3D3D3D3E3E3E3F3F3F4040404040404040
+      404040404040403F3F3F3837383131312F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3333333938383A3A3A3A3A3A3A3A39
+      3A3A393A3A393A3A393A39393A39393A39393A39393A39393939393939393939
+      3939393939393939393939393939393939393939393939393939393939393839
+      3938393938393838393838393838393838393838373736323232323232323232
+      3232323232323434343939393939383939383938383938383938383938383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3837383837383737383737383737383737383737373737373737373737373737
+      3737373737373939393939393939393939393939393838383636363636363636
+      363636363636363636363636363636363636362F2F2F2F2F2F2F2F2F2F2F2F30
+      30304141414949494E4E4E5353535757573F3F3F323232333333333333343434
+      363636353636363637373838393A393A3A3A3B3C3C3E3D3E3E3E3E4041404242
+      424343434646464848484A4A4A4D4D4D4F4F4E525252535453565757595A5A5C
+      5C5C6060606262626565656969696D6D6D7170707474747777777B7B7B7F7F80
+      8383848888888D8D8D9292929696969B9B9BA0A0A0A5A5A6AAAAAAAFAFAFA3A3
+      A33939393434343737373B3B3B3E3E3E40404042424244444444444445454545
+      45454444444444444242424242424242424242424040404040404040403F3F3F
+      3E3E3E3E3E3E3D3D3D3D3D3D3D3D3D3D3D3D3E3E3E4040404444444747474A4A
+      4A4E4E4E5151515353535555555656565555555454545151514E4E4E49494944
+      44444040403C3C3C3939393636363333333131313131313030302E2E2E2E2E2E
+      2E2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A2A2A2A2929292929
+      292828282727272626262525252424242222222121211F1F1F1E1E1E1B1B1B1B
+      190D121B4A011FD1001FDF001FD7001ED6001ED5001DD4001DD3001CD2001CD1
+      001BD0001ACE001ACE001ACD0019CB0019CB0018CA0018C90017C70016C60016
+      C60016C50015C30015C20014C10014C00013BF0013BE0011BD0011BC0011BB00
+      10BA0010B9000FB8000FB7000EB6000EB5000DB4000CB2000CB2000CB0000BAF
+      000BAF000AAE000AAD0008AC0007AD2729583838303131312A2A2A2222221A1A
+      1A1111110707070505050505050303030202020202020202020101010B0B0B9B
+      9B9BACACACA7A7A7A2A2A29C9C9C9696968C8C8C8686868180817B7C7C767676
+      7171716D6D6D6868676463635F605F5B5B5B5A5A5A5E5E5E5D5D5D5B5B5B5858
+      585555555252525150514141413837373434343231312E2E2E2C2C2C28292926
+      26272424242323232121211F1F1F1D1C1D1B1C1C191919181818161616161616
+      151615201F1F2020202020202121212020211616161010110F0F100E0F0F0F0E
+      100E0E1013131313131313121313131212121312121212121212121212121111
+      111211111111121111111111101111101111111011111011101010101010100F
+      1010100F100F0C0D0D0B0B0B0B0C0B0B0B0B0C0C0C1312132324242828292D2D
+      2E3232322D2D2D08080807070807070807070707080707070707070707060707
+      0707060707070706070607060606060606060606060606050605050605050605
+      0506060505050505050505050505050505040405040404050404040404040404
+      0504040407070704040403040304030404030304040403030303030303030303
+      0302020302020302020303020302020302020203020202020202020202020202
+      0202010102020102020202020201010101010101010101010101010101000101
+      0101000101010101000101010100000001000100010100000000000000000000
+      0100000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      30303030303131313737373D3D3D3F3F3F3F3F3F404040404040404040404040
+      4040404040404040404040403A3A3A3232322F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3231323737373A3A393A3A393A
+      3A393A3A393A39393A39393A39393A39393A3939393939393939393939393939
+      3939393939393939393939393939393939393939393939393939383939383939
+      3839383839383839383839383839383837373632313232323232323232323232
+      3232323232393939393939393938393938393838393838393838393838383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3738383738373738373738373738373738373737373737373737373737373737
+      3737393939393939393939393939393939383838363636363636363636363636
+      3636363636363636363636363636363030302F2F2F2F2F2F2F2F2F3030303C3B
+      3C4848484E4E4E52525256565645454532323233333333333334343436363636
+      36353737373838383A3A393A3A3A3D3D3D3D3E3E3E3E3E414142424342444445
+      4646464848484A4A4A4D4D4C4F4F4E5251525555545757575B5A5B5E5D5D6060
+      606464646767676A696A6E6E6E7171717575757979797D7D7D8181818686868A
+      8A8A8F8F8F9393939898979C9D9DA2A2A2A7A7A7ACACACB2B2B2777777333333
+      3737373A3A3A3D3D3D4040404242424444444545454545454545454545454545
+      454444444444444242424242424242424242424040403F3F3F3F3F3F3E3E3E3D
+      3D3D3D3D3D3C3C3C3C3C3C3C3C3C3D3D3D3F3F3F4343434848474D4C4951514D
+      56544F5A59555C5B585D5D5C5C5C5C5C5C5C5959595555555151514C4C4C4747
+      474242423D3D3D3939393636363333333131313030303030302E2E2E2E2E2E2E
+      2E2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A2A2A2A292929292929
+      2727272626262525252424242222222020201E1E1E1C1C1C1C1A0E121C4B0120
+      D30021E1001FD9001FD8001FD7001ED6001ED5001DD4001DD3001CD2001CD100
+      1BD0001ACE001ACE001ACD0019CB0019CB0018CA0018C90017C70016C60016C6
+      0016C50015C30015C20014C10014C00013BF0013BE0011BD0011BC0011BB0010
+      BA0010B9000FB8000FB7000EB6000EB5000DB4000CB2000CB2000CB0000BAF00
+      0BAF000AAE000AAC0007B00B13913535353333312D2D2D2626261E1E1E161616
+      0C0C0C0505050505050404040202020202020202020202020101015F5F5FAFAF
+      AFA9A9A9A3A3A39A9A9A9292928D8D8D8787878383837D7D7D7878797373736E
+      6F6E6A6A6A6565656060615D5D5D5959595756565C5C5C5B5B5B595959565656
+      5252525151514E4E4E3F3E3F3434343231322E2F2F2C2C2C2A2A2A2828282525
+      252323232121222020201D1D1C1C1B1C191A1A1818181616161616161A1A1A20
+      20202020202121222121212020201110111011110F0F100F0F100F0F0F101110
+      1313131313131312121313131313121212121212121212121212121212121111
+      1212111111111111111110111110111011101010101110101010101010101010
+      0F0F0D0E0E0B0C0C0B0B0C0B0B0B0C0C0C0F0E0F2323232727272D2C2D313131
+      3535350808080808080808080808070808070807070708070707070707070707
+      0706060706060706070606060606060606060606050506060606050505050505
+      0505050505050505050505050405050504050404040505050404080808131313
+      1616160D0D0D0404040304040404040303030303030303040303030303030303
+      0303030303030202030202020203020202020202020202020202020202020202
+      0201020201020102010102020101020101010201010101010101010101010100
+      0101000101010101000101000100000000000001000000010000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303636363E3E3E40404040404040404040404040404040
+      40404040404040404040404040403C3C3C3434342F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3030303636363A3A393A3A
+      393A39393A39393A39393A39393A39393A393939393939393939393939393939
+      3939393939393939393939393939393939393939393939393938393938393838
+      3938383938383938383938383838383231323231323232323232323232323232
+      3239393939393939393939393839393839383839383839383839383838383838
+      3838383838383838383838383838383838383838383838383838383838383837
+      3838373837373837373837373837373837373737373737373737373737373939
+      3939393939393939393939393938383836363636363636363636363636363636
+      36363636363636363636363130312F2F2F2F2F2F2F2F2F3030303B3A3B474747
+      4D4D4D5151515555554949493232323333333333333535353636363636363838
+      383938393A3A3A3B3A3B3D3D3C3E3E3E3F3F3F41414244434345454546464649
+      49494B4B4B4E4E4E504F4F5353535655555859595B5B5B5F5E5F616161646464
+      6868686C6C6C6F6F6F7373737776767B7B7A7F7F7F8383838888888C8C8C9191
+      919595959999999F9F9FA4A4A4A9A9A9AFAEAEB0B0B04A4A4A3636363838383D
+      3D3D3F3F3F424242444444454545464646464646464646454545454545454545
+      4444444444444242424242424242424141413F3F3F3E3E3E3E3E3E3D3D3D3C3C
+      3C3B3B3B3B3B3B3B3B3B3C3C3B3E3D3A4340354746404A4B514C4F5C4A526F54
+      58695B5D6464635F68655A65645F6161605E5E5E5959595454544D4D4D474747
+      4242423D3D3D3939393535353333333232323131312F2F2F2E2E2E2E2E2E2E2E
+      2E2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A2A2A2A29292928282826
+      26262525252323232121211F1F1F1D1D1C1C1A0F131C4C0121D50022E30021DB
+      0021DA001FD9001FD8001FD7001ED6001ED5001DD4001DD3001CD2001CD1001B
+      D0001ACE001ACE001ACD0019CB0019CB0018CA0018C90017C70016C60016C600
+      16C50015C30015C20014C10014C00013BF0013BE0011BD0011BC0011BB0010BA
+      0010B9000FB8000FB7000EB6000EB5000DB4000CB2000CB2000CB0000BAF000B
+      AF000AAE0009AD0008B024265B35352C2F2F2F2929292121211A1A1A11111107
+      07070505050505050404040202020202020202020202021F1F1FACACACA8A8A8
+      A0A0A09B9A9B9595958F8F8F8989898585857F7F7F7B7A7B7575757070706C6C
+      6C6767676363635D5E5E5A5A5B57565653535359595959595957575754545451
+      51514F4F4F4D4C4D3D3D3D3332332F2F2F2D2D2D2B2B2B292929262625242324
+      2222222020201E1E1E1D1D1D1A1B1A19191A1717171616161F1F1F2020202020
+      202222222222221A1A191111111011110F0F100E0E100F0E1012131313131313
+      1313131313131313131212131212121213121212121212111211111111111211
+      111111111111111111111110101010101110101011101010101010100F100F0F
+      0E0B0C0C0B0C0B0B0B0B0B0B0B0D0D0D2020202827282C2C2B31313034343514
+      1414080808080708080708070808080707080707070807070707060707070607
+      0707070707070606060606060606060606060505050606060506050606050505
+      060506050505050505050505050505050606050F0E0F15151515151516161616
+      1616121212060707040303040303030304030303030303030303030303030303
+      0302030202030202020302030303030202020203020202020202020202020202
+      0202010201020201020201010202010101010101010101010101010101010101
+      0101000101000000000000000101000001000001010100000100000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303434343C3C3C4040404040404040404040404040
+      404040404040404040404040404040403E3E3E3636373030302F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F30343434393939
+      3A39393A39393A39393A39393A39393939393939393939393939393939393939
+      3939393939393939393939393939393939393939393839393839393839383839
+      3838393838393838393838323131323132323132323232323232323232393939
+      3939393939393939393939383939383938383938383938383938383838383838
+      3838383838383838383838383838383838383838383838383838383838383738
+      38373837373837373837373837373837373737373737373737373939393A3939
+      3939393939393939393939393736363636363636363636363636363636363636
+      363636363636363131312F2F2F2F2F2F2F2F2F3030303636364747474B4B4B4F
+      4F4F545454505050323232333333343434353535363636363636383838393939
+      3A3A3A3B3B3B3C3D3D3E3F3F4040404241414343444647474847474B4B4A4D4C
+      4C4F4F4F5151515454545757575958595B5B5C6060606262626565656969696D
+      6D6D7171717575757778777D7D7D8181818584858988898E8E8D929292979797
+      9C9C9CA1A1A1A6A5A5AAAAAAB0B0B09090903636363838383B3B3B3F3F3F4141
+      4144444445454546464646464647474747474746464645454545454545454544
+      44444444444242424141414141413F3F3F3E3E3E3D3D3D3B3B3B3B3B3B3A3A3A
+      3A3A3A3A39373D3A2F393C472B3D841E3FBB143DE20C3CF50A3AF90A3BF6113D
+      EB2346CC3E53A45E62766C695F6665616060605B5B5B5555554D4D4D47474742
+      42423C3C3C3838383535353232323131313030302F2F2F2F2F2F2E2E2E2E2E2E
+      2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A2929292828282727272525
+      252323232121211E1F1E1D1C17131D500122D60023E50022DD0022DC0021DB00
+      21DA001FD9001FD8001FD7001ED6001ED5001DD4001DD3001CD2001CD1001BD0
+      001ACE001ACE001ACD0019CB0019CB0018CA0018C90017C70016C60016C60016
+      C50015C30015C20014C10014C00013BF0013BE0011BD0011BC0011BB0010BA00
+      10B9000FB8000FB7000EB6000EB5000DB4000CB2000CB2000CB0000BAF000BAF
+      000AAD0007B20B129133333231312F2B2B2B2525251D1D1D1515150B0B0B0505
+      050505050404040303030202020202020202020202027C7C7CA8A8A8A2A2A29C
+      9C9C9797979191918C8C8C8687868181817C7C7B7878787676756F6F6F686868
+      646464605F5F5B5B5B5857575353535050505858585656565353535252524F4F
+      4F4D4D4D4A4B4B4040413131302E2E2E2C2C2C29292925262624242323232320
+      20201E1E1E1D1D1D1B1A1B191A1A171817191919212121212121222221222222
+      2222221414151011111110110F0F100F0F100F10101414131413131313131313
+      1313121313121312121212121212121312121212121212111211121112111111
+      1211111111111111111110111111101010101110101011101010100E0F0C0B0C
+      0C0C0C0C0B0B0B0B0C0D0D0D1D1D1D2727272B2A2B2F2F2F3434341919190808
+      0808080808080707080807070707070707070707080707070706070607070706
+      0706070607060606060606060606060606060606060606050505050606050506
+      0505050505050505050A0B0B1413131514151615151515161616161717171717
+      171717170A0A0A03040304040404030403030303030303030303030303030302
+      0303020203030203020302030202020202020202020202020202020202010201
+      0201020201020101020202010201010101010101020101010101010101010101
+      0101000101010100010101010000000000000000000100000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303232323A3A3A404040404040404040404040
+      4040404040404040404040404040404040403F3F3F3939393131312F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F33333338
+      38383A39393A39393A3939393939393939393939393939393939393939393939
+      3939393939393939393939393939393939393939383939383938383938383938
+      3839383839383832313132313132313232313232323232323239393939393939
+      3939393939393939393938393938393838393838393838393838383838383838
+      3838383838383838383838383838383838383838383838383838383838373838
+      373837373837373837373837373837373737373737373938383A39393A393939
+      3939393939393939373636363636363636363636363636363636363636363636
+      3636363232322F2F2F2F2F2F2F2F2F3030303232324545454B4B4B4E4E4E5252
+      525656563434343333333434343535353636363636363838383939393A3A3A3C
+      3C3B3E3E3E3E3F3F4140414242424343444746474948484A4A4A4D4D4D4F4F4F
+      5252525454545757575B5B5B5E5E5E6060606464646767676B6B6B6E6E6E7171
+      717575757979797E7E7E8281828686868B8B8B8F8F8F9494949999999E9E9EA2
+      A2A2A8A8A8ADADADB2B2B26565663737373B3B3B3E3E3E404040434343454545
+      4646464848484848484848484747474747474646464545454545454545454444
+      444343434141414040403F3F3F3D3D3D3B3B3B3A3A3A39393938383839373037
+      3839263B8C123DE3083DFF073CFF073BFF083BFF073AFF0639FF0438FF0136FF
+      0035FF0C3BF2354FB563666F6A675E6061605A5A5A5353534C4C4C4545454040
+      403B3B3B3737373434343232323131313030302F2F2F2F2F2F2E2E2E2E2E2E2D
+      2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A292929272727252525232323
+      2020201E1E1B1A1C210422C60024EA0023DF0023DE0022DD0022DC0021DB0021
+      DA001FD9001FD8001FD7001ED6001ED5001DD4001DD3001CD2001CD1001BD000
+      1ACE001ACE001ACD0019CB0019CB0018CA0018C90017C70016C60016C60016C5
+      0015C30015C20014C10014C00013BF0013BE0011BD0011BC0011BB0010BA0010
+      B9000FB8000FB7000EB6000EB5000DB4000CB2000CB2000CB0000BAF000BAF00
+      09AE0008B121245933322A2C2C2D272727202020181818101010070707050505
+      050505040404040404020202020202020202434343AAAAAAA4A4A49F9F9F9998
+      999393938E8E8E8988898484848282817D7C7C7777777272726B6C6B65656561
+      61615D5D5D5858595455545152514D4D4D5353535454545252524F4F4F4D4D4D
+      4B4B4B4848483E3E3E2F2E2E2C2C2C29292A2727272525242323232122211F1F
+      201D1D1D1B1B1B1919191717171D1D1D2222222222222222222323241F1E1F12
+      12131111121110110F10110F0F10121212141314141413131414131313131313
+      1213131312131313121212121213121212121212111212111112111211111111
+      121111111011111010101011111110101010101010101010100C0C0C0C0C0C0C
+      0C0B0B0B0B0D0C0C19191925252529292A302F2F333434222222080809080808
+      0808080808080708080808070707080708070707070707070706070707070706
+      0607060606060706060706060605060606060506050606060506060505050508
+      0707101010151515151515151616151516161616161616171717171717181818
+      1818180F0F0F0505050303030303030403040303030304030303030303030303
+      0302020302030303030203030203020202020203020202020202020202010201
+      0102010201020101020101020101020101010101010101010101010101010101
+      0100010100010101000001010100010100000100010100000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303131313838383F3F3F40404040404040
+      40404040404040404040404040404040404040404040403A3A3A3333332F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3131
+      323636363A39393A393939393939393939393939393939393939393939393939
+      3939393939393939393939393939393938393938393838393838393838393838
+      3938383131313231313231313231323231323232323938383939393939393939
+      3939393939393939393839393839383839383839383839383838383838383838
+      3838383838383838383838383838383838383838383838383838383837383837
+      3837373837373837373837373837373737373938383A3A393A39393A39393939
+      3939393937373736363636363636363636363636363636363636363636363634
+      34342F2F2F2F2F2F2F2F2F2F2F2F3131314343434848484D4D4D515151555555
+      3E3E3E3333333434343535353636363737373838383A3A3A3A3A3A3D3D3D3E3E
+      3E3F3F3E4242424242424545444647464848494B4A4A4E4D4D4F4F4F53535355
+      55555858585B5B5B5D5E5D6262616465656868686C6C6C70706F737373777777
+      7A7A7A7F7F7F8383838888888C8C8C9191919596959A9A9A9F9F9FA4A4A4AAAA
+      AAAFAFAFABABAB4444443A3A3A3D3D3D40404043434345454547474748484849
+      4949494949484848474747474747474747464646454545454545444444434343
+      4141414040403E3E3E3C3C3C3A3A3A38383836363637352C31374B183EC90B40
+      FF0B3FFF0B3EFF0B3EFF0A3DFF093CFF093BFF083BFF073AFF0639FF0638FF02
+      37FF0034FF153FE4545E8469665C5F5F5F5858585151514A4A4A4343433D3D3D
+      3939393636363333333131313131312F2F2F2F2F2F2F2F2F2E2E2E2E2E2E2D2D
+      2D2C2C2C2C2C2C2C2C2C2B2B2B2A2A2A2929292727272525252323232020201D
+      1D1C1B1B170821A30025EC0024E00023DF0023DE0022DD0022DC0021DB0021DA
+      001FD9001FD8001FD7001ED6001ED5001DD4001DD3001CD2001CD1001BD0001A
+      CE001ACE001ACD0019CB0019CB0018CA0018C90017C70016C60016C60016C500
+      15C30015C20014C10014C00013BF0013BE0011BD0011BC0011BB0010BA0010B9
+      000FB8000FB7000EB6000EB5000DB4000CB2000CB2000CB0000BAF000BAE0008
+      B30C138C2F2F2C2E2E2C2929292222221B1B1B1414140A0A0A06060606060604
+      0404040404040404020202020202121212A0A0A1A7A6A7A1A1A19B9B9B959595
+      9090918C8D8C8988888382827F7E7E7978797474746F6F6F6A696A6363635E5E
+      5E5B5A5B5556555252524E4E4E4A4A4A4F50505252525050504D4D4D4A4A4A48
+      48484545453C3B3C2D2D2D2A2A2A2828282626262323232222222120201D1D1D
+      1C1C1C1A1A1A191A192323232323232323232323232423231919191213131111
+      121110121010100F0F1014141415141414141413141413131313131313131313
+      1213131213121213121212121212121212111112121111111111111211111111
+      1111111110111011101110111110101011101010110D0D0D0C0B0C0C0C0C0C0C
+      0C0C0C0C1414142525252929292E2D2E3231322B2B2B08090908080808080807
+      0807080808080707070808080707070707070707070707070706070607060707
+      0606060707070606060606060606060606060505060505050E0E0D1515151515
+      1515151515161616161616161716161717171717171718181818181818181819
+      1919151515070708030304040303030303030303030303030303030202020302
+      0303020302020203030202020302020202020202020202020202020201010201
+      0201020201020201010101010101020101010101010101010101010101010101
+      0001010101000100000101000100000000010001000001000100000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000030303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303636363D3D3D4040404040
+      404040404040404040404040404040404040404040404040403C3C3C3535352F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      3030303535353939383939393939393939393939393939393939393939393939
+      3939393939393939393939393839393839393839383839383839383839383833
+      3333313131323131323131323132323132373737393939393939393939393939
+      3939393939393939383939383938383938383938383938383838383838383838
+      3838383838383838383838383838383838383838383838383838383738383738
+      37373837373837373837373837373838383A3A393A3A393A39393A3939393939
+      3737373736363636363636363636363636363636363636363636363635352F2F
+      2F2F2F2F2F2F2F2F2F2F3030303D3D3D4848484B4B4B4F4F4F53535349494933
+      33333434343636363636363737373838383A3A3A3B3B3B3D3D3D3E3E3E403F3F
+      4241424344444546464847484A49494B4C4B4E4F4F5152515353535757575959
+      595C5C5C5F5F5F6362626665666A6A696D6D6D7171717474747878787C7C7C80
+      80808585858989898E8E8E9393939798989C9C9CA1A1A1A6A6A6ABABABB0B0B0
+      8D8D8D3A3A3A3C3C3C3E3E3E4242424545454646464848484949494949494A4A
+      4A4949494848484747474747474747474646464545454444444343434141413F
+      3F3F3D3D3D3A3A3A3737373636363533292D35541440E20C41FF0E40FF0E40FF
+      0D3FFF0C3EFF0B3EFF0A3DFF093CFF093BFF083BFF073AFF0639FF0639FF0438
+      FF0035FF0939F44C598D6663585B5B5B5454544D4D4D4646464040403B3B3B37
+      37373434343333333131313030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D
+      2C2C2C2C2C2C2C2C2C2B2B2B2929292828282525252323232020201D1D1D1C1A
+      0E0E1F780025EE0024E10024E10023DF0023DE0022DD0022DC0021DB0021DA00
+      1FD9001FD8001FD7001ED6001ED5001DD4001DD3001CD2001CD1001BD0001ACE
+      001ACE001ACD0019CB0019CB0018CA0018C90017C70016C60016C60016C50015
+      C30015C20014C10014C00013BF0013BE0011BD0011BC0011BB0010BA0010B900
+      0FB8000FB7000EB6000EB5000DB4000CB2000CB2000CB0000BAF000AB0010AAD
+      2225482E2E2729292A2424241D1D1D1717170E0E0E0707070606060505050404
+      04040404040404020202020202757675A8A8A8A3A3A39D9C9D99999995949490
+      8F8F8A8A8A858485807F7F7B7B7B7575757071716C6C6C6666666060605B5B5B
+      5758575353534F4F4F4B4B4B4949494E4D4E5050504D4D4D4C4C4C4848484646
+      464242423938392C2C2D2929292626262424242223232121201E1E1F1E1E1E1E
+      1E1E222222242424252525242424242424232222131314121213111112111112
+      1010111112121514141514141414141414141414131313141313131313131313
+      1313131312131312121212121212121211121212121212111211111111111111
+      11111111111011111010111111111011100E0E0E0C0C0C0C0C0C0C0B0B0C0C0D
+      1211122323232828282D2C2D3030303333340908090809090808090808080808
+      0808080808070707080707080707070707070707070707060706060707060606
+      07070606060606060606060606060A090A131212161615151615151515161616
+      1717171617171818181717171415151818181818181819181818181919191819
+      191718180B0C0C03030403030304030303030303030303030302030303020303
+      0203030203020302020202020202020202020202020202020202020102010102
+      0101010102010102020101010101010101020101010101010001010001000000
+      0000010100010001010000000000000001010000010000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000003030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030303030303434343B3B3B404040
+      4040404040404040404040404040404040404040404040404040403E3E3E3636
+      373030302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F30363636393939393939393939393939393939393939393939393939
+      3939393939393939393939383939383938383938383938383938383333333131
+      3131313132313132313132313237373739393939393939393939393939393939
+      3939393939393938393938393838393838393838393838383838383838383838
+      3838383838383838383838383838383838383838383838383838373838373837
+      373837373837373837373838383A3A3A3A3A393A3A393A39393A393938383837
+      36363636363636363636363636363636363636363636363636363030302F2F2F
+      2F2F2F2F2F2F3030303838384646464A4A4A4D4D4D5252525353533333333434
+      343636363636363737373939393A3A3A3B3B3B3D3D3D3E3E3E40404042424144
+      44434746474747484A4B4A4D4D4D4F4F4F5352525454545757575A5A5A5D5D5D
+      6060606464646666676A69696D6D6E72727175767579797A7D7D7D8282828686
+      868B8B8B8F8F8F9494949999999E9E9EA2A3A2A9A8A8ADADADB2B2B26868683C
+      3C3C3E3E3E4141414444444646464848484949494949494A4A4A4A4A4A4A4A4A
+      4949494848484747474747474747474646464444444343434141413E3E3E3B3B
+      3B37373735353534322D2F323F1740DB0F43FF1041FF0F40FF0E40FF0E40FF0D
+      3FFF0C3EFF0B3EFF0A3DFF093CFF093BFF083BFF073AFF0639FF0639FF0538FF
+      0035FF0A3AF3525A7A5F5D565656565050504949494242423C3C3C3838383535
+      353434343232323131313030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C
+      2C2C2C2C2C2B2B2B2929292828282525252323232121211E1E1E1C1A11111C54
+      0025E50024E40024E20024E10023DF0023DE0022DD0022DC0021DB0021DA001F
+      D9001FD8001FD7001ED6001ED5001DD4001DD3001CD2001CD1001BD0001ACE00
+      1ACE001ACD0019CB0019CB0018CA0018C90017C70016C60016C60016C50015C3
+      0015C20014C10014C00013BF0013BE0011BD0011BC0011BB0010BA0010B9000F
+      B8000FB7000EB6000EB5000DB4000CB2000CB2000CB0000BAF0008B61117782C
+      2C24292929262626202020191919111111090909070707060606040404040404
+      040404030303030303424242AAAAAAA6A6A6A2A1A29C9B9B9796969191918C8C
+      8B8786868181817D7D7C7777777272716E6E6E6969696464645C5C5C58585854
+      54545050504C4D4C4949494646464949494D4D4D4C4C4C494949464646424242
+      3E3E3E3A393A2B2B2A262626272728282828292A2A292A292A29292929292727
+      272727272626262525252424241D1D1D14141412131311121211111211111214
+      1414161414151414151414141413141414131314131313131313131313131313
+      1312131213121212121212121212121112121211121111111112111111121111
+      111111111111101110101010110F0F0E0C0D0C0C0C0C0C0B0C0C0B0B0F0E0E22
+      22222727272A2A2A2E2E2F323231111011090909080808080808080808080807
+      0708070808080808080707070707080707070707070707070706070707060607
+      070706070707080F0F0F15151515161615151617171616171617181718181718
+      1818121212080808070808131212181819181818191A1A191919181919191919
+      1A1A1A100F100303040403030304040303030303030203030302030203030203
+      0203030302020202030202020203020202020202020202020202020202020202
+      0101020201010201010101020102010101010101010101010101010100010100
+      0001010100010000010000010100010100000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303030303030303232323A3A3A3F
+      3F3F4040404040404040404040404040404040404040404040404040403F3F3F
+      3939393131312F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F34343439393939393939393939393939393939393939393939393939393939
+      3939393939393938393938393938393838393838393838333333313131313131
+      3131313231313231313636363939393939393939393939393939393939393939
+      3939393939393839393839383839383839383839383838383838383838383838
+      3838383838383838383838383838383838383838383838383837383837383737
+      3837373837373837373A3A3A3A3A3A3A3A393A3A393A39393938383736363636
+      363636363636363636363636363636363636363636363232322F2F2F2F2F2F2F
+      2F2F3030303232324444444848484B4B4B4F4F4F5353533F3F3F353535363636
+      3636363838383939393A3A3A3B3B3B3D3D3D3F3F3F4141414242424444434747
+      474949494A4B4A4E4E4D5050505253525554545757575B5B5B5E5E5E61616164
+      64646868686C6B6B6F6E6E7373727677777A7A7A7E7F7E8382828787878B8B8B
+      9090909595959A9A999E9E9EA4A4A4A9A9A9AFAFAFADADAD4747473D3D3D4141
+      414444444646464747474949494A4A4A4B4B4B4A4A4A4A4A4A4A4A4A4A4A4A49
+      49494848484747474747474646464444444242423F3F3F3D3D3D393939363636
+      323231302F291C3DB41045FF1243FF1042FF1041FF0F40FF0E40FF0E40FF0D3F
+      FF0C3EFF0B3EFF0A3DFF093CFF093BFF083BFF073AFF0639FF0639FF0538FF00
+      35FF183FDB595A5C5756545050504A4A4A4343433E3E3E3A3A3A363636343434
+      3333333232323030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C
+      2C2C2C2C2A2A2A2828282626262323232121211E1E1E1B1A16151A320125DD00
+      25E70024E20024E20024E10023DF0023DE0022DD0022DC0021DB0021DA001FD9
+      001FD8001FD7001ED6001ED5001DD4001DD3001CD2001CD1001BD0001ACE001A
+      CE001ACD0019CB0019CB0018CA0018C90017C70016C60016C60016C50015C300
+      15C20014C10014C00013BF0013BE0011BD0011BC0011BB0010BA0010B9000FB8
+      000FB7000EB6000EB5000DB4000CB2000CB2000CB0000AB3030DA22425312929
+      252626262222221B1B1B1414140B0B0B08080807070705050504040404040403
+      0303030303161616A6A6A6A9A9A8A3A3A29E9E9D9797979292928D8D8D878787
+      8282827E7D7D7878787474746F6F6F6A6B6A6666666060605A5A5A5554555251
+      524D4E4D4A4A4A4646464343434544454B4B4B4848484646464343433F3F3F3D
+      3D3D3636373535353334333131312F2F2F2B2B2C2B2C2B292929292929282728
+      2827272626262525251717181414141312131112121111121212121515151514
+      1415141515141414141414131413131413131313131313131313131212121313
+      1313131212121212121212121212121212121111121111111112111111111111
+      1111111011101011100F0F100C0C0C0C0C0C0C0C0C0C0B0C0E0D0D1E1D1E2525
+      262828282C2C2C2F2E2F17171608080908080908090808080808080808080808
+      08070808080807070707070707080707070707070707060607070707060B0B0B
+      1414141616161616161616161717171818181818171818181615150C0B0C0707
+      070706070707070706070E0E0E1818171919191A19191919191919191A191A1B
+      1A1A151515050506030403030403030303030303030303030303030302030302
+      0303020202020303020202020202020202020202020202020202020201010201
+      0201010201010101020101010101010101010100010101010101010101000000
+      0101010100000100000001010001000100000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303131313838
+      383E3E3E40404040404040404040404040404040404040404040404040404040
+      40403B3B3B3333332F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F323232
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393839393839393839383839383839383835353531313131313131313131
+      3131323131353535393939393939393939393939393939393939393939393939
+      3939393939383939383938383938383938383938383838383838383838383838
+      3838383838383838383838383838383838383838383838383738383738373738
+      37373837373A39393A3A3A3A3A3A3A3A393A3A39393939373636373636363636
+      3636363636363636363636363636363636363434342F2F2F2F2F2F2F2F2F2F2F
+      2F3131313E3E3E4646464949494E4E4E5151514F4F4F35353536363636363638
+      38383939393A3A3A3C3C3C3E3E3E3F3F3F414141424242454545474747494849
+      4A4B4B4E4E4D4F4F505353535555565858585B5B5B5F5F5F6262626565656868
+      686C6C6C7070707473737878787B7B7C7F7F7F8585858989898D8D8D92929197
+      97979C9C9CA1A1A1A6A6A6ABABABB0B1B09595953D3D3D3F3F3F434343454545
+      4848484949494A4A4A4B4B4B4C4C4C4C4C4C4A4A4A4A4A4A4A4A4A4A4A4A4949
+      494848484747474646464545454242423F3F3F3C3C3C383838343434312F2627
+      34661345FF1345FF1244FF1143FF1042FF1041FF0F40FF0E40FF0E40FF0D3FFF
+      0C3EFF0B3EFF0A3DFF093CFF093BFF083BFF073AFF0639FF0639FF0537FF0035
+      FF374B9758554A4E4F4E4A4A4A4343433F3F3F3B3B3B37373735353533333332
+      32323232323030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C
+      2B2B2B2929292727272525252222221F1F1F1C1B19191A210324CB0026EA0025
+      E30024E20024E20024E10023DF0023DE0022DD0022DC0021DB0021DA001FD900
+      1FD8001FD7001ED6001ED5001DD4001DD3001CD2001CD1001BD0001ACE001ACE
+      001ACD0019CB0019CB0018CA0018C90017C70016C60016C60016C50015C30015
+      C20014C10014C00013BF0013BE0011BD0011BC0011BB0010BA0010B9000FB800
+      0FB7000EB6000EB5000DB4000CB2000CB2000BB1000AB5171B5729281F262626
+      2222221D1D1D1616160E0E0E0808080707070606060606060505050303030303
+      03030303828282ABABAAA4A4A4A09F9F9A9A9A9494948F8E8E89898984838480
+      7F807A7A7A7474747070706C6D6D6767676364635E5E5E5656565252524F4E4E
+      4A4A4A4747474343434040404343434848484545454343433F3F3F3D3D3D3A3A
+      3A3737373434343232323030302E2E2E2C2D2D2B2A2A2A2A2A29292927282828
+      2727202020151515141414131313111112111112141414161514161415151414
+      1514141414141414141414141314131313141413131313131313131213121313
+      1213121312121212121212121211121211121212111112121111111111111111
+      11111111111111110D0C0C0C0C0D0D0D0C0C0C0B0D0D0C181819232223262627
+      2829292A2A2A1A1A1A0809080909090808080808090808090808090807070708
+      0807080808080808080807070707070707070709090911111116161616161616
+      1616171717171717181818171818191819101110080909080807070807070707
+      0707070707070606070A090A1515151A19191A19191919191A1A1A1B1B1B1B1A
+      1A16171707060703040303030303030303030303030303030303030303030303
+      0302030302030202020202020202020202020202020202020102020202010102
+      0202020102010101010101010101010101010101010101010101010101010100
+      0100000000000001010000000001000000010000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3636363D3D3D4040404040404040404040404040404040403F3F3F3F3F3F3F3F
+      3F3F3F3F3D3D3D3535352F2F2F2F2F2F2F2F2F2F2F2F2F2F2F31313139393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939383939383938383938383938383535353131313131313131313131313131
+      3134343439393939393939393939393939393939393939393939393939393939
+      3939393938393938393838393838393838393838383838383838383838383838
+      3838383838383838383838383838383838383838383838373838373837373837
+      373939393A3A3A3A3A3A3A3A3A3A3A393A3A3937373737363636363636363636
+      36363636363636363636363636363636363030302F2F2F2F2F2F2F2F2F313131
+      3535354545454848484C4C4C4F4F4F5151514040403636363636363838383A3A
+      3A3A3A3A3C3C3C3E3E3E3F3F3F4242424343434545454747474A4A4A4C4C4C4F
+      4E4F505151545353565756595A595C5B5C5F5F5F6363636666666A6A6A6D6D6D
+      7171717575757979787D7D7D8181818585858A8A8A8E8E8E9393939898989C9C
+      9CA2A2A2A7A7A7ACACADB2B2B27979793E3E3E4141414444444747474949494B
+      4B4B4B4B4B4C4C4C4C4C4C4C4C4C4C4C4C4A4A4A4A4A4A4A4A4A4A4A4A494949
+      4747474646464444444242423E3E3E3A3A3A3737373232312F2E281C3EBD1347
+      FF1445FF1345FF1244FF1143FF1042FF1041FF0F40FF0E40FF0E40FF0D3FFF0C
+      3EFF0B3EFF0A3DFF093CFF093BFF083BFF073AFF0639FF0639FF0236FF123CE0
+      4E4F524D4C4A4848484343433F3F3F3B3B3B3838383535353434343232323232
+      323232323030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2C2C2C2C2C2C2A
+      2A2A2828282626262323232020201D1D1B1B1A1C0623B80027EF0026E40025E3
+      0024E20024E20024E10023DF0023DE0022DD0022DC0021DB0021DA001FD9001F
+      D8001FD7001ED6001ED5001DD4001DD3001CD2001CD1001BD0001ACE001ACE00
+      1ACD0019CB0019CB0018CA0018C90017C70016C60016C60016C50015C30015C2
+      0014C10014C00013C10013C00012BF0011BD0011BC0010BA0010B9000FB8000F
+      B7000EB6000EB5000DB4000CB2000CB1000AB80B128025251F2525242323231E
+      1E1E181818111111090909080808070707060606060606040404030303030303
+      585858ADACACA7A6A6A1A0A09B9B9A959494908F8F8A8A8A8585848080807B7B
+      7B7676767272726D6D6D6968686464656060605B5B5B535353504F504C4C4C48
+      48474444444040403F3F3F4140414646464343434141413D3D3D3B3B3B383838
+      3737373333333131313030302D2E2D2C2C2D2B2B2B2A2A2A2929282828271C1B
+      1B15151514141413131312121211121216171716151516151516151515141415
+      1414141414141414141414141314131413141313131313131313131312121313
+      1212131212121212121212111211121212111111121211121111111111111011
+      111111110E0D0D0C0C0C0C0C0C0C0C0C0C0D0D14151522212224232426262526
+      27262121210B0A0A080809090909090809080808080808080808080707080707
+      0808070808080807080707070E0E0E1414141616161616161717171717171818
+      181818181919191414140B0B0B08080807070808070807080807080807070707
+      07070707070607070807081212121919191919191919191A1A1A1A1A1A1B1C1C
+      19191A0808090303030303040303040304030303020203030202020203030302
+      0203030202020202020202020202020202020202020102020202010202020102
+      0102010201010102010101010101010101010101010101010101010100000101
+      0000000100010100000000000101000000000000010000000000000000000000
+      0000000000000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303434343B3B3B4040404040403F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F
+      3F3F3F3F3F3F3837382F2F2F2F2F2F2F2F2F2F2F2F3030303939393939393939
+      3939393939393939393939393939393939393939393939393939393939393839
+      3938393938393838393838373736313131313131313131313131313131333333
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393839393839383839383839383839383838383838383838383838383838
+      3838383838383838383838383838383838383838383837383837383737393838
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A393838383736363636363636363636363636
+      363636363636363636363636363232322F2F2F2F2F2F2F2F2F31313131313140
+      40404646464949494D4D4D5050504D4D4D3636363737373838383A3A3A3A3A3A
+      3D3D3D3E3E3E3F3F3F4242424444444646464848484A4B4B4D4D4D4F4F4F5252
+      52555554575757595A595D5D5D6061606363636767676A6A6A6E6E6E72727276
+      7676797A797E7E7E8282828686868B8C8B8F8F8F9494949999999E9E9EA3A4A4
+      A9A8A9ADADADB3B3B35C5C5D4141414444444646464848484B4B4B4C4C4C4D4D
+      4D4C4C4C4C4C4C4C4C4C4C4C4C4C4C4C4A4A4A4A4A4A4A4A4A4A4A4A48484847
+      47474444444141413E3E3E39393935353531302B2A30471646F61447FF1546FF
+      1446FF1345FF1244FF1143FF1042FF1041FF0F40FF0E40FF0E40FF0D3FFF0C3E
+      FF0B3EFF0A3DFF093CFF093BFF083BFF073AFF0639FF0538FF0437FF3745794A
+      483F4545454242423E3E3E3B3B3B383838363636353535333333323232323232
+      3232323030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2C2C2C2A2A2A2929
+      292626262424242121211F1E1E1D1B160A22980028F70027EE0026E60025E300
+      24E20024E20024E10023DF0023DE0022DD0022DC0021DB0021DA001FD9001FD8
+      001FD7001ED6001ED5001DD4001DD3001CD2001CD1001BD0001ACE001ACE001A
+      CD0019CB0019CB0018CA0018C90017C70016C60016C60016C50015C30015C200
+      14C30014C20013C00013BF0012C00011C30011C70010C30010BF000FB9000FB7
+      000EB6000EB5000DB4000CB2000CB4020CA61E1F2E2424212323231F1F1F1919
+      191313130C0C0C0808080707070707070606060505050303030303032E2E2EAD
+      ACACA7A7A7A2A2A19D9C9D9796979191918C8C8C8786868382827D7C7D787778
+      7373736E6E6E6A6A6A6666656161615C5C5C5858585050504D4D4D4949494444
+      444141413F3F3F3B3B3B3C3C3C4342424242423E3E3E3C3C3C3A3A3A37383834
+      34343131313232322F2F2F2828292424252121221D1C1D181718171717151615
+      1415141313131211121414131717161615151615151615141515151515141514
+      1414141413141414131414131313131313131313131313121313131213121213
+      1213121312121212121212121211121212111112121111111111111111111111
+      0E0F0E0D0C0D0D0C0C0D0C0D0D0D0D1011102020212120202122222322222222
+      212020201515140E0E0D09090809080809080808080808080808080808080808
+      08070B0B0C121212161616161616161616171717171717181818181818171717
+      1010100808080808080808080708080708070708080707070708070707070707
+      070707070606070707060F0F101919191919191A1A1A1B1B1B1C1C1C1C1B1C1B
+      1A1A0C0C0B040403030304030403030303020303020303030302030302030303
+      0202020303020303020302020202020202020201020101020102020201010201
+      0201010101010201010101010101010101000101010100010101010000000100
+      0101000100000001000000010001000000000000000000000000000000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303232323939393E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3F
+      3F3F3B3B3B2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F393939393939393939393939
+      3939393939393939393939393939393939393939393939393939383939383939
+      383938383938383838373131313131313131313131313131313131313A393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939383939383938383938383938383938383838383838383838383838383838
+      383838383838383838383838383838383838383838373838373838383A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A393939373636373636363636363636363636363636
+      3636363636363636363535352F2F2F2F2F2F2F2F2F3030303131313636364545
+      454747474B4B4B4E4E4E5050504343433737373838383A3A3A3B3B3B3D3D3D3E
+      3E3E4040404242424444444747474848484B4B4B4D4D4D504F50525353555455
+      5757575B5A5A5E5F5E6161606564646868686B6B6B6F6F6F7273737677777B7B
+      7B7F7F7F8282828787888C8C8B9090909595969A9A9A9F9F9FA4A5A5AAAAAAB0
+      B0B0A9A9A94747474343434545454747474A4A4A4B4B4B4D4D4D4E4E4E4E4E4E
+      4E4E4E4C4C4C4C4C4C4C4C4C4C4C4C4A4A4A4A4A4A4A4A4A4949494747474444
+      444040403D3D3D393939333333302D232436771649FF1647FF1547FF1546FF14
+      46FF1345FF1244FF1143FF1042FF1041FF0F40FF0E40FF0E40FF0D3FFF0C3EFF
+      0B3EFF0A3DFF093CFF093BFF083BFF073AFF0639FF0238FF233CA04542364040
+      403E3E3E3D3D3D3A3A3A38383836363635353534343433333333333332323232
+      32323030303030303030302F2F2F2F2F2F2E2E2E2D2D2D2C2C2C2A2A2A282828
+      2525252323232121211F1E1C1A1C25101F660623B90026EA0027F00025E60024
+      E20024E20024E10023DF0023DE0022DD0022DC0021DB0021DA001FD9001FD800
+      1FD7001ED6001ED5001DD4001DD3001CD2001CD1001BD0001ACE001ACE001ACD
+      0019CB0019CB0018CA0018C90017C70016C60016C60016C50015C60114B4080E
+      47090E3C090E3D080E45070E51050E65040E79020F930010B5000FB9000FB700
+      0EB6000EB5000DB4000CB3000BB71317542322192222221F1F1F1A1A1A151515
+      0E0E0E0909090808080707070707070505050404040303030E0D0D9F9F9FAAAA
+      AAA4A3A49E9E9E9897979292928D8D8D8887878382827E7E7D7979787474746F
+      6F6F6B6B6B6666666162625E5D5D59595A5555554E4E4E4A4A4A464546424142
+      3F3F3F3C3C3C3939393838384041413F3F3F3D3D3D3A3A3A363636302F302A2A
+      2A2525262020201E1D1E1C1B1C1A1B1B18181818181817171716161514141413
+      1314121212161616171617161615161515161515161515151415141414141514
+      1414141314131413141314131414131413131313131312131312121313131312
+      121312121212121212111212121112111112111211121111111111110F0E0F0C
+      0C0D0D0D0D0C0C0C0C0C0C0D0D0D1F1F1F1F20202120212120201F201F1D1E1E
+      1C1D1C1B1B1B17181710100F0909080809090808080808080909090F100F1616
+      16161717161716181817171717181818181818191919141414090A0A08080808
+      0908080807070808080808080808070808080708070707070708070707060707
+      0707070607070606070D0C0D1819181919191A1A1A1B1B1B1B1B1B1C1B1C1C1D
+      1D0C0C0D03040304040303030303030303020302030302030303030303020303
+      0202020202020203020202020202010202010202020102010201020202010102
+      0101020101010201010101010101010101000101010101000101010101010001
+      0001000001000000000101000000000000000000000000000000000000000000
+      0000000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303131313636363B3B3B3C3C3C3C3C3C3D3D3D3D3D3D3E3E3E3C3C
+      3C2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F38373739393939393939393939393939
+      3939393939393939393939393939393939393939393939393938393938393838
+      3938383938383131313131313131313131313131313131313838383A39393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3938393938393838393838393838393838383838383838383838383838383838
+      3838383838383838383838383838383838383838373838373A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A37373737363636363636363636363636363636363636
+      36363636363636363130312F2F2F2F2F2F3030303131313232323F3F3F474747
+      4949494C4C4C4F4F4F5050503C3C3C3838383A3A3A3B3B3B3D3D3D3E3E3E4040
+      404242424444444747474949494B4B4B4D4E4E5050505253535655565858585B
+      5B5B5F5E5F6162616665656968686C6C6C7070707474747878787C7C7C80807F
+      8584858989898D8E8E9292929797979C9C9CA0A0A0A6A6A6ABABABB1B1B19595
+      954141414444444747474A4A4A4B4B4B4D4D4D4D4D4D4E4E4E4F4F4F4E4E4E4E
+      4E4E4C4C4C4C4C4C4C4C4C4C4C4C4B4B4B4A4A4A494949474747444444414141
+      3C3C3C373737333333302C21213C9C164BFF1748FF1648FF1547FF1546FF1446
+      FF1345FF1244FF1143FF1042FF1041FF0F40FF0E40FF0E40FF0D3FFF0C3EFF0B
+      3EFF0A3DFF093CFF093BFF083BFF073AFF0339FF1738BE3B39353B3B3A3B3B3B
+      3A3A3A3939393838383636363636363535353333333333333333333232323232
+      323030303030303030302F2F2F2F2F2F2E2E2E2D2D2D2B2B2B29292927272725
+      25252222222020201E1D1B1D1B0F1A1A19121D500822A30026E20026EF0024E6
+      0024E20024E00023DF0023DE0022DD0022DC0021DB0021DA001FD9001FD8001F
+      D7001ED6001ED5001DD4001DD3001CD2001CD1001BD0001ACE001ACE001ACD00
+      19CB0019CB0018CA0018C90017C70016C60016C50016CF0512780E0C000D0C03
+      0C0C040D0C030C0B010C0B000B0A040A0A09030E840010C1000FB8000FB7000E
+      B6000EB5000DB4000CBC0910781E1E1720201F1E1E1E1A1A1A1515150F0F0F0A
+      0A0A090909070707070707060606050505050505040404818181ABABABA5A4A4
+      A09F9F9A99999494948F8F8E8A89898484847F7F7F7A7A7A7574747071706C6C
+      6C6767676363625F5F5F5B5A5A5757585252524B4B4B4747464343434040403C
+      3C3C3939393737373636363C3D3D3737362E2E2F282828252626232424222223
+      2020201F1F1F1C1B1B1A1B1A1818191818181717171615161515151313131414
+      1418171718171716151516151516151516141515151515151414141414141514
+      1414141414141314131313131413131313131313131313131212121312121212
+      1212121212121212121212111212121111121111111111111010100D0C0D0D0D
+      0D0C0D0C0C0C0D0D0D0E1A1A1A1E1E1E1E1D1E1D1E1D1E1E1D1C1C1C1C1C1C1B
+      1B1B1B1B1B1B1B1A1918191111110909090D0D0D161616171717171716171717
+      1717171818181818181919191717170D0D0E0809090909090808080808080808
+      090808080808080708080708080A090A08080807070707070707070707070706
+      06070607060706070B0A0B161617191A191A1A1A1C1C1C1C1C1C1D1D1D1D1C1C
+      0D0D0D0303040304030303030303030303030302030303020303020202030302
+      0302030302020202020202020202020201020201010202020201010201020101
+      0101020101010101010101010101010101010001010000010101010100010000
+      0001010000000001000000000000000100000000000000000000000000000000
+      0000000000000000000030303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303434343B3B3B3C3C3C3D3D3D3D3D3D3E3E3E2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F3737373939393939393939393939393939393939
+      3939393939393939393939393939393939393939393839393839393839383839
+      38383332323131313131313131313131313131313737373A39393A3939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3839393839383839383839383839383838383838383838383838383838383838
+      38383838383838383838383838383838383838373939393A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3838383736363736363636363636363636363636363636363636
+      363636363434342F2F2F2F2F2F3030303030303232323535354646464747474B
+      4B4B4D4D4D5050504D4D4D3B3B3B3A3A3A3B3B3B3D3D3D3F3F3F414141424242
+      4444444747474949494B4B4B4E4E4E5050505353535656555959595C5C5B5F5F
+      5F6362636665666969696C6C6C7070707474747979797C7D7D80808184858489
+      89898E8E8E9393939898989C9D9DA1A1A1A7A7A7ADADADB2B2B2808080444444
+      4646464949494B4B4B4D4D4D4E4E4E4F4F4F4E4E4E4F4F4F4F4F4F4E4E4E4E4E
+      4E4C4C4C4C4C4C4C4C4C4C4C4C4A4A4A4949494848484545454141413C3C3C37
+      37373332312E2D26203EAD174BFF1749FF1748FF1648FF1547FF1546FF1446FF
+      1345FF1244FF1143FF1042FF1041FF0F40FF0E40FF0E40FF0D3FFF0C3EFF0B3E
+      FF0A3DFF093CFF093BFF083BFF053AFF1338C837363637373537373738383837
+      3737373737373737363636353535343434333333333333333333323232323232
+      3030303030303030302F2F2F2F2F2F2D2D2D2C2C2C2B2B2B2929292626262424
+      242121212020201E1E1F1C1B191C1A101A1912131A3D091F8E0224D60025EE00
+      24E80024E10023DF0023DE0022DD0022DC0021DB0021DA001FD9001FD8001FD7
+      001ED5001ED7001EDC001DD5001CD2001CD1001BD0001ACE001ACE001ACD0019
+      CB0019CB0018CA0018C90017C70016C80016C40A0F330E0D060D0D0D0D0D0D0C
+      0C0C0C0C0C0C0B0B0B0B0A0B0A00050D660011C60010B9000FB8000FB7000EB6
+      000EB5000DB8020D9C16161C1C1C191C1C1C1919191616161010100A0A0A0909
+      09080808070707060606060606050505040404616161ADADACA7A6A7A1A0A09B
+      9A9A9595959090908A8A8A8585858080807A7A7A7576757172726D6D6D696868
+      6464645F5F5F5B5C5C5758575353535050504848484444444040403D3D3D3939
+      393737373434343131312E2D2D2B2B2C2A29292727272425252223232020201F
+      1F1F1D1D1D1A1B1A191919191818171717161616161616151414161616181716
+      1717171716151715151615161615151515151515151414141414141514151314
+      1414141414141413141313131313131413131313121212121313131213131212
+      12121212121212121212121211121211121111121111110D0D0D0C0C0D0C0D0D
+      0D0D0C0C0C0D1212121C1C1C1E1D1E1D1D1C1D1D1D1C1D1C1C1C1C1B1B1B1B1B
+      1B1B1A1B191A1A1A191A18191818181919181918181818171817181818191818
+      18191919191212120A0A0A090909080808090809080808080809080809080808
+      0808080909080A0A0A0A0A0A0909090909090707080707070707070706070706
+      07070607060707080909151515191A191B1B1B1C1C1C1C1D1D1D1C1D1E1E1E0D
+      0E0D030403030303030303030303030303030203020302030302030203020202
+      0302020202020202020202020202010202020101010202020201010201020101
+      0101010201010101010101010101010101010100000101010100010101000001
+      0101000000010101010000000001000000000000000000000000000000000000
+      0000000000003030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303939393A3A3A3B3B3B3D3D3D3E3E3E3030302F2F2F2F
+      2F2F2F2F2F2F2F2F343434393939393939393939393939393939393939393939
+      3939393939393939393939393939393939393939383939383938383938383434
+      343131313131313131313131313131313535353A39393A39393A393939393939
+      3939393939393939393939393939393939393939393939393939393939393938
+      3939383938383938383938383938383838383838383838383838383838383838
+      383838383838383838383838383838383838383B3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A393939373636373636363636363636363636363636363636363636363636
+      3636363130312F2F2F3030303030303232323232323D3C3D4646464848484B4B
+      4B4D4D4D4F4F4F4949493A3A3A3C3C3C3D3D3D3F3F3F41414142424245454547
+      47474949494B4B4B4E4E4E5151515353535757575A5A5A5C5C5B5F6060636363
+      6767666A6B6B6D6D6D7171717576757979797D7D7D8282828686868A8A8A8F8F
+      8F9394939898999D9D9DA3A3A3A8A8A8ADADADB2B2B26C6C6C4545454848484A
+      4A4A4D4D4D4E4E4E4F4F4F5050505050504F4F4F4F4F4F4F4F4F4E4E4E4E4E4E
+      4C4C4C4C4C4C4C4C4C4B4B4B4A4A4A4848484545454141413D3D3D3838383332
+      312E2D26203FAF184CFF1849FF1749FF1748FF1648FF1547FF1546FF1446FF13
+      45FF1244FF1143FF1042FF1041FF0F40FF0E40FF0E40FF0D3FFF0C3EFF0B3EFF
+      0A3DFF093CFF093BFF063AFF1438C73635343636343636363737373737373737
+      3737373737373736363635353534343433333333333333333332323232323230
+      30303030303030302F2F2F2E2E2E2D2D2D2C2C2C2A2A2A292929272727242424
+      2222222020201E1E1E1C1C1D1B1B1A1A191219170D14182C0B1D760322C60025
+      E80024E20023DF0023DE0022DD0022DC0021DB0021DA001FD9001FD9001FE200
+      1ED2041BA7001DD2001DD7001CD2001CD1001BD0001ACE001ACE001ACD0019CB
+      0019CB0018CA0018C80018D00314990E0E0B0E0E0D0E0E0E0E0E0E0E0E0E0C0C
+      0C0C0C0C0C0C0C0B0A02060C490011C00010BA0010B9000FB8000FB7000EB600
+      0EB7000DB10D0F2F15150F1818181717171515151010100B0B0B090909090909
+      080808070707060606060606040404414141ADADACA8A7A7A1A1A19C9C9C9696
+      969190908B8B8B8686868180807D7C7C7878777272726D6D6D69696A65656560
+      60605C5D5D5858585454555151514D4C4C4646464141413E3E3E3B3A3B373737
+      3434343131312D2D2E2C2C2D2929292727272525252222222122211F1F201D1D
+      1D1B1C1C19191918181817171716161616161616161618181918171718171717
+      1615171615161616161615161515151515151415151514141414141414141414
+      1413141413131314141413131313131313131313121213121212121312121212
+      121212121211121112111111111111111111120E0E0E0D0D0D0C0C0D0D0D0D0D
+      0C0D0C0D0C0C0C0C100F0F1616161C1B1C1C1C1D1C1D1C1C1C1C1B1B1B1B1B1B
+      1B1B1B1A1A191A19191A1919191919191919191919191919191A1A1615160C0D
+      0D0A09090909090909090909090909080909080908080809080908090A0A0A0A
+      0A0A0A0A0A0A0A0A0A09090A090A090909080709070707070707070707060607
+      0706060606070809091415141A1A1B1B1B1B1C1C1C1D1D1C1E1E1E1E1D1E0D0D
+      0D03040303030403030303030303030303030303030302030303020302020202
+      0203020202020202020202020202010202020201020102020201020102010101
+      0101010101010101010101010101010101010101010001010100000101000001
+      0100010101000000000000000001000000000000000000000000000000000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303636363939393A3A3A3C3C3C3D3D3D3232322F2F2F2F2F2F2F2F
+      2F2F2F2F3333333A393939393939393939393939393939393939393939393939
+      3939393939393939393939393939393938393938393838393838353535313131
+      3131313131313131313131313333333A39393A39393A39393A39393939393939
+      3939393939393939393939393939393939393939393939393939393939393839
+      3938393838393838393838393838383838383838383838383838383838383838
+      3838383838383838383838383838383A3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A37373737363636363636363636363636363636363636363636363636363635
+      34342F2F2F3030303030303131313232323333334242424747474949494B4B4B
+      4E4E4E4F4F4F4848483C3C3C3E3E3E3F3F3F4242424343434545454747474A4A
+      4A4C4C4C4F4F4F515151545454575757595A5A5D5D5D6160616363636767676A
+      6B6A6E6F6E7171717676767A7A7A7E7E7E8282828787878B8C8C909090959495
+      9A9A9A9F9F9FA4A4A4A9A9A9AEAEAEB2B2B25A5A5A4747474949494C4C4C4D4D
+      4D4F4F4F5050505151515151515050504F4F4F4F4F4F4F4F4F4E4E4E4E4E4E4C
+      4C4C4C4C4C4C4C4C4B4B4B4848484545454242423E3E3E3838383333332F2C23
+      223EA3184DFF194AFF1849FF1749FF1748FF1648FF1547FF1546FF1446FF1345
+      FF1244FF1143FF1042FF1041FF0F40FF0E40FF0E40FF0D3FFF0C3EFF0B3EFF0A
+      3DFF093CFF073CFF1538C1333330353433363636363636373737373737373737
+      3636363636363535353535353434343333333333333333333232323232323030
+      303030303030302F2F2F2E2E2E2D2D2D2C2C2C2A2A2A29292927272725252523
+      23232121211F1F1F1C1C1C1B1B1B19191918171217150914151B0C1B700124E1
+      0024E20023DF0023DE0022DD0022DC0021DB0021E20020DF061C9D0E153B1212
+      0C0B165B001DD4001DD8001CD2001CD1001BD0001ACE001ACE001ACD0019CB00
+      19CB0018CA0018D10A1155100E040F0F0F0F0F0F0F0F0F0F0F0F0E0E0E0D0D0D
+      0C0C0C0C0B06090C2B0011B90011BD0010BA0010B9000FB8000FB7000EB6000D
+      BC080D53100F051212121313131313131010100C0C0C0A0A0A09090909090908
+      0808060606060606050505242424ACABABA8A8A8A3A2A29D9D9D989797939292
+      8C8C8C8786878382827D7D7D7878787373736E6E6F6B6A6A6565656161615D5D
+      5D5959595455545252524D4D4D4A4A4A4444443F3E3F3B3A3A37373735353532
+      32322F2F2F2C2D2D2B2B2A2828282525252323232222211F1F1F1D1D1D1E1D1E
+      1D1C1D1B1B1C1B1B1C1B1B1B1C1C1B1B1B1A1919191818171817171716161716
+      1617161516151516151515151515151514141414141414141414141414141414
+      1414141413131414131313131314131313131313131213121213121212121312
+      1212121212111212111112111211120E0E0F0D0D0D0C0D0D0D0D0D0D0C0D0C0C
+      0C0C0D0D0C0C0D0C0C0C0B0C0C1112121919191C1D1C1C1C1C1B1B1B1B1B1B1B
+      1B1B1A1B1B191A1A1A1A191A1A1A1A1A1A1919191211120A09090909090A0A0A
+      0909090909090909090909090909080808080909090B0B0A0A0A0A0A0A0A0A0A
+      0A0A0A0A0A090A0A0A0A0A090A09090909080807070707070706070707070606
+      07060606070707081212121A1A1B1B1B1B1C1C1C1D1C1D1D1E1D1D1E1D0D0E0D
+      0303030303040303030303030303030303030302020203030303020202020202
+      0203020202020202020202010102020101010201020201010201010101020101
+      0201010201010101010101010101010101010101010100000101010101000001
+      0000010000000001010000000001000000000000000000000000000000003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303434343838383939393B3B3B3D3D3D3635362F2F2F2F2F2F2F2F2F2F2F2F
+      3131313A39393939393939393939393939393939393939393939393939393939
+      3939393939393939393939393839393839393839383837373631313131313131
+      31313131313131313131313A3A393A39393A39393A39393A3939393939393939
+      3939393939393939393939393939393939393939393939393939393939383939
+      3839383839383839383839383838383838383838383838383838383838383838
+      38383838383838383838383939393B3A3A3B3A3A3A3A3A3A3A3A3A3A3A393938
+      3736363736363636363636363636363636363636363636363636363636363232
+      323030303030303131313131313333333535354545454848484A4A4A4C4C4C4D
+      4D4D4E4E4E4747473E3E3E3F3F3F4242424343434646464747474A4A4A4C4C4C
+      4F4F4F5252525555555757575B5B5B5E5E5E6161616464646868686B6B6B6F6F
+      707372737776767B7B7C7F7F7F8383838787878C8C8C9191919596969A9A9A9F
+      9F9FA5A5A5AAAAAAB0B0B0ABABAB4C4C4C4949494B4B4B4D4D4D4F4F4F505050
+      5050505252525252525151515050504F4F4F4F4F4F4F4F4F4E4E4E4E4E4E4D4D
+      4D4C4C4C4B4B4B4949494646464242423E3E3E3A3A3A343434312D222539841A
+      4DFF194BFF194AFF1849FF1749FF1748FF1648FF1547FF1546FF1446FF1345FF
+      1244FF1143FF1042FF1041FF0F40FF0E40FF0E40FF0D3FFF0C3EFF0B3EFF0A3D
+      FF073DFF1A37A534312634333335353536363637373737373737373736363636
+      3636363636353535353535343434333333333333333333323232323232303030
+      3030303030302F2F2F2E2E2E2D2D2D2C2C2C2B2B2B2929292828282525252424
+      242222221F1F1F1C1C1C1B1B1B18181817171616140B12162E0124DC0024E400
+      24E10023DF0023DE0022E00022E7041FB70D175014130E14130A131210131206
+      0C1555011DD3001DD9001CD2001CD1001BD0001ACE001ACE001ACD0019CB0019
+      CF0217B70F101C10100C1010101111111111111111111010100E0E0E0D0D0D0C
+      0C0A0B0C130111A80011C00011BB0010BA0010B9000FB8000FB7000EC0050E72
+      0E0E060E0D0D0E0E0E0F0F0F0E0E0E0C0C0C0B0B0B0909090909090808080707
+      070606060505050D0D0DA09F9FAAAAAAA4A4A49E9E9E9897979392928D8D8D88
+      88888383837D7D7D7979797474747070706A6B6A6666666262635E5E5E5A5A5A
+      5555565252524F4E4E4B4B4B4747474141413C3C3C3838393536353232322F2F
+      2F2D2D2D2B2A2A2829282525262525252424242524252323232222222020201E
+      1E1E1D1D1D1C1C1C1C1C1B1B1B1A191919181718181717171616171616171616
+      1715151616161616151515141514151415141514151414141414141414141413
+      1414141314131313131313141313131313131213131312121213121312131212
+      12121212121112111212110F10100E0D0E0D0D0D0D0D0D0C0D0C0D0C0D0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0C0C0B0C0C0F0F0E1717161C1C1C1B1C1C1B1B1B1B1B
+      1A1A1A1A1A1B1A1A1A1B1615160B0C0B0A090A090A0A09090A0A090A09090A0A
+      0909090909090909090A0A0B0B0B0B0B0B0B0B0A0B0A0B0A0A0A0A0A0A0A0A0A
+      0A0A0A0A0A0A0A0A090A090A0909090808080707070707070707070707070607
+      060706060807081212121A1A1A1B1B1B1C1C1C1C1C1D1D1E1E1D1E1E0D0E0D03
+      0403030304030303030303030203030303030302020203020202030302020202
+      0202020202020202020202010102010201020201020201020101020102010101
+      0201010101010101010101010101000101010000000101010101000101010000
+      0000000101000000000000000000000000000000000000000000303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303333
+      333737373939393A3A3A3C3C3C3838382F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3A
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393939393939393939383939383938383938383131313131313131313131
+      313131313131313838373A3A393A39393A39393A39393A393939393939393939
+      3939393939393939393939393939393939393939393939393939393938393938
+      3938383938383938383938383838383838383838383838383838383838383838
+      383838383838383838383B3B3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A37373737
+      3636363636363636363636363636363636363636363636363636363535313131
+      3030303131313131313232323333333939394646464949494A4A4A4C4C4C4D4D
+      4D4E4E4E4C4C4C4040404242424444444646464848484B4B4B4D4D4D4F4F4F53
+      53535555555757575B5B5B5F5F5F6161616565656868686C6C6C706F70737474
+      7778787B7B7C8080808484848989898D8D8C9291929696969B9B9BA1A1A1A6A6
+      A5ABABABB0B0B09D9D9D4A4A4A4A4A4A4C4C4C4E4E4E50505051515152525252
+      52525252525252525151515050504F4F4F4F4F4F4F4F4F4E4E4E4E4E4E4C4C4C
+      4B4B4B4A4A4A4747474343433F3F3F3B3B3B35353531302A2A33561B4CFD1A4C
+      FF1A4BFF194AFF1849FF1749FF1748FF1648FF1547FF1546FF1446FF1345FF12
+      44FF1143FF1042FF1041FF0F40FF0E40FF0E40FF0D3FFF0C3EFF0B3DFF093DFF
+      223373322F253333333535353636363737373737373838383838383636363636
+      3636363635353535353534343433333333333333333332323232323230303030
+      30303030302F2F2F2E2E2E2D2D2D2C2C2C2B2B2B2A2A2A282828262626242424
+      2222221F1F1F1D1D1D1A1A1A18181816150E0F18440025E20024E50024E20023
+      E00023E40022DC0B1C7A15161C16140A1515131414141414141313131312070D
+      1545011DCC001DDA001CD2001CD1001BD0001ACE001ACE001ACC001AD607157B
+      1210071211111212121212121212121212121111111010100F0F0F0D0D0B0C0C
+      0B03108C0012C50011BC0011BB0010BA0010B9000FB8000FBD030E900E0E100E
+      0E0C0E0E0E0D0D0D0D0D0D0D0D0D0C0C0C0A0A0A090909090909080808060606
+      050505070707888888AAAAAAA5A5A59F9F9F9A99999493938E8E8E8989898483
+      847F7F7F7979797575756F70706B6B6B6666666262625F5F5F5A5A5A57575752
+      52524F50504B4B4B4848474444443E3E3E3939393636363334343030302E2E2E
+      2E2D2E2D2D2D2B2B2B2929292727272626252324232222222020201F1F1F1E1E
+      1D1C1C1C1C1C1C1B1B1A19191918181719171817161617161617161617151516
+      1616161515151515151515151515141515141414151414141414131414141414
+      1313131413141314131413131313131312131313121312121212121312121212
+      121112121211121111110D0D0F0D0D0D0D0D0E0C0D0D0D0D0D0D0C0D0C0C0C0D
+      0C0C0C0D0C0C0C0C0C0B0C0B0B0B0C0B0B0E0E0D1617171C1C1C1C1C1C1C1C1C
+      191A1A0F0F0E0A0A0A0A0A0B0A0A0A0A0A0A0A0A0A0A0909090909090A0A0909
+      090B0B0C0C0C0C0C0C0C0C0B0B0B0B0B0B0A0B0B0A0B0A0A0A0A0A0A0A0A0A0A
+      0A0A0A0909090A0909090909090A080808080707070607070607070707070706
+      0606070808071212131A1A1B1B1B1B1C1C1C1D1D1D1D1D1E1F1E1F0F0F0F0403
+      0304030303030303030303030303030303030303020202020203020203030303
+      0202020202020202020202020101020202010202020201010201020101010101
+      0101010101010101010101010101010101010100010101000100000001000100
+      0000000100000000000000000000000000000000000030303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030323232373737
+      3838383A3A3A3C3C3C3B3B3B2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F3737373A39
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393939393938393938393938393838333333313131313131313131313131
+      3131313635353A3A393A3A393A39393A39393A39393A39393939393939393939
+      3939393939393939393939393939393939393939393939393939393839393839
+      3838393838393838393838383838383838383838383838383838383838383838
+      3838383838383A3A393B3B3A3B3A3A3B3A3A3A3A3A3A3A3A3939393736363636
+      3636363636363636363636363636363636363636363636363635353530303031
+      31313131313232323232323535353B3B3B4747474949494B4B4B4C4C4C4E4E4E
+      4E4E4E4D4D4D4444444444444747474848484B4B4B4D4D4D5050505353535555
+      555858585B5B5B5E5F5F6262626666666868686D6C6D7070707474747878787C
+      7C7C8080808585858989898E8E8E9292929797979C9C9CA2A1A2A6A6A7ABABAB
+      B1B1B18F8F8F4A4A4A4C4C4C4E4E4E4F4F4F5151515252525353535252525252
+      525252525252525151515050504F4F4F4F4F4F4F4F4F4E4E4E4E4E4E4C4C4C4B
+      4B4B4848484545454040403B3B3B3737373232302E2E301F46D41B4EFF1A4CFF
+      1A4BFF194AFF1849FF1749FF1748FF1648FF1547FF1546FF1446FF1345FF1244
+      FF1143FF1042FF1041FF0F40FF0E40FF0E40FF0D3FFF0B3FFF0E3CEB2B2E3B30
+      2F2B323232353535373737373737383838383838383838383838363636363636
+      3636363535353535353434343333333333333333333232323232323030303030
+      303030302F2F2F2E2E2E2D2D2D2C2C2C2C2C2C2A2A2A28282827272724242421
+      21211E1E1E1C1C1C19191918160D0F1B540026E70025E50024E20024E50222CD
+      111A4918160B1817141717181717171616161515151515151414131412070D15
+      43021CC7001DDB001CD2001CD2001BD2001AD3001AD9001AD30E133713120A13
+      13131414141414141313131313131212121111111010100E0E0E0D0C03050F6F
+      0013CA0011BD0011BC0011BB0010BA0010B9000FBB010FAB0D0D190E0E0A0E0E
+      0E0E0E0E0D0D0D0D0D0D0C0C0C0B0B0B0A0A0A09090908080807070706060605
+      0505727272ABABABA5A5A5A0A0A09B9A9A9494948F8F8F8A8A8A848484808080
+      7B7A7A7575757171716C6C6C6868686364645F5F5F5A5A5A5858585353535050
+      504B4B4C4848494444444242423D3C3D3838373736363535353434343131312D
+      2E2D2B2B2B2929292828282625262425242322222020201F1F1F1E1E1E1C1D1C
+      1C1C1C1B1B1A1A1A191818181918181717161716161716161716161616161615
+      1515161515151514151514151515151514141414141414141414141314141414
+      1314131314131313131313131313131313121212121212131213131212121212
+      11121212111111121110101110100F0D0D0E0C0D0D0C0D0C0C0D0C0C0C0C0D0C
+      0C0C0C0C0C0C0C0C0B0C0B0C0C0C0C0C0C0C0B0C0C0C1616161515150C0C0B0B
+      0A0B0A0B0B0A0B0A0A0A0A0A0A0A0A0A0A090A0A0A0A090A0A0B0D0C0D0C0C0C
+      0C0C0C0C0C0C0B0B0B0C0B0B0B0B0A0B0A0B0B0A0A0A0A0A0A0A0A0A0A0A0A0A
+      0A0A09090A0A0A09090A09090908080907070707070706060706060707070707
+      06060708071212121A1A1A1C1C1C1D1D1D1D1E1E1F1F1E2021200E0E0E040303
+      0303030303030303030303030303030303030203020302030202020302020202
+      0202020202020202020202020202010202020201010101020201010201010201
+      0101010101010101010100010000010001010101010100000100010000000000
+      0000000000000000000000000000000000003030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303030303030303636363838383A
+      3A3A3B3B3B3D3D3D2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F3535353A3939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393839393839393839383835353531313131313131313131313131313133
+      33333A3A393A3A393A3A393A39393A39393A39393A3939393939393939393939
+      3939393939393939393939393939393939393939393939393939383939383938
+      3839383839383839383838383838383838383838383838383838383838383838
+      38383838383B3B3B3B3B3A3B3A3A3B3A3A3A3A3A3A3A3A373737373636363636
+      3636363636363636363636363636363636363636363737373333333131313131
+      313232323232323434343636363D3D3D4848484A4A4A4B4B4B4D4D4D4E4E4E4F
+      4F4F5050504B4B4B4747474949494B4B4B4E4E4E505050535353565656585858
+      5C5C5C5F5F5F6262626566666969686C6D6D7170717474747979797D7D7D8181
+      818585858989898F8E8E9394939898989C9D9DA2A1A2A7A7A7ADADADB3B3B384
+      84844B4B4B4E4E4E4F4F4F515151525252525252535353535353535353525252
+      5252525252525151515050504F4F4F4F4F4F4F4F4F4E4E4E4D4D4D4B4B4B4949
+      494646464242423D3D3D393939353535312E25273A7D1B4FFF1B4DFF1A4CFF1A
+      4BFF194AFF1849FF1749FF1748FF1648FF1547FF1546FF1446FF1345FF1244FF
+      1143FF1042FF1041FF0F40FF0E40FF0D40FF0B40FF1A35A02E2C23302F2F3232
+      3235353537373738383839393938383838383838383838383836363636363636
+      3636353535353535343434333333333333333333323232323232303030303030
+      3030302F2F2F2E2E2E2D2D2D2D2D2D2B2B2B2A2A2A2929292626262323232020
+      201E1E1E1A1A1A1A170C0E1D670027ED0026E50025E30025E90422BC1918151A
+      19161A1A1A1A1A1A1A1A1A1919191818181616161616161514141413090F1436
+      021CBF001EE2001DDC001CCE021ABA0518990A166C1313131313131515151515
+      151515151616161414141414141313131111111010100F0D03080F510013CB00
+      13C10011BD0011BC0011BB0010BA0010BB000FB60B0D310E0E080E0E0E0E0E0E
+      0E0E0E0D0D0D0D0D0D0C0C0C0B0B0B0A0A0A0808080808080707070606066060
+      60ACACACA6A6A6A1A1A19B9B9B9595959090908A8A8A8585858080807B7B7B76
+      76767272726D6D6D686868646564605F5F5B5B5C5858585353535050504D4D4C
+      4949484645454243423F3F3F3D3D3D393A3A3636363434343131312E2E2E2D2D
+      2D2A2A2A2828282626262525252222232121211F1F1F1E1E1E1D1C1C1D1D1C1B
+      1B1A1A1A19191818191818171717181616171616171516171616161616161516
+      1516151515151515151515151515141414141415141414141413141314141414
+      1313131313141313131313121312131312121313131313121212121212121212
+      12121111121211111111111110101010100F0E0F0D0D0D0D0C0C0C0D0C0C0C0D
+      0C0C0C0C0C0C0C0B0C0B0B0C0C0C0C0C0C0C0B0B0B0B0B0B0B0A0B0A0B0B0A0A
+      0A0A0A0B0A0A0A0B0A0A0A0A0B0A0A0B0C0B0C0D0C0C0D0D0D0D0D0C0C0D0C0D
+      0C0C0C0B0B0C0B0B0B0B0B0B0B0B0A0B0A0B0A0A0A0A0A0A0A0A0A0A0A0A0A0A
+      0A090909090A0A0909090A0A0808090707070707070707070706060606070607
+      060708071212121A1A1A1C1C1C1D1D1D1E1E1E2222222323240A0A0903030303
+      0303030303030303030303020303020203030303020302020302020303020202
+      0202020202020102020202020201020202010101010102010101010101010101
+      0101010101010101010101000101000101010000010001010001010001000000
+      0100000000000000000000000000303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303535353737373939393B3B
+      3B3D3D3D3232322F2F2F2F2F2F2F2F2F2F2F2F3333333A393939393939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939383939383938383737363131313131313131313131313131313131313939
+      393A3A393A3A393A3A393A39393A39393A39393A393939393939393939393939
+      3939393939393939393939393939393939393939393939393938393938393838
+      3938383938383938383838383838383838383838383838383838383838383838
+      383A3A3A3B3B3B3B3B3A3B3A3A3B3A3A3A3A3A39393937363636363636363636
+      3636363636363636363636363636363636373737373737333233313131323232
+      3232323434343535353737373E3E3E4A4A4A4B4B4B4D4D4D4E4E4E4F4F4F5050
+      505252525252524D4D4D4B4B4B4E4E4E5050505353535656565959595C5C5C5F
+      5F5F6363636666666A6A6A6C6D6D7171707475757979797D7D7D818281858585
+      898A8A8F8E8E9493949898989C9D9DA3A3A3A9A9A9AFAFAFB4B4B47B7B7B4D4D
+      4D4F4F4F51515152525253535354545454545454545454545452525252525252
+      52525252525151515050504F4F4F4F4F4F4F4F4F4D4D4D4C4C4C4A4A4A474747
+      4444444040403B3B3B3636363332302E2F322047D31B4FFF1B4CFF1A4CFF1A4B
+      FF194AFF1849FF1749FF1748FF1648FF1547FF1546FF1446FF1345FF1244FF11
+      43FF1042FF1041FF0F40FF0D41FF103DE9282C3D2E2C27303131333333353535
+      3737373939393939393939393939393838383838383838383636363636363636
+      3635353535353534343433333333333333333332323232323231313131313131
+      31313131313030302F2F2F2E2E2E2C2C2C2A2A2A2828282525252222221F1F1F
+      1D1D1D1C190C0C1F7D0028F40026E60026E50025E60024DD161C3B1D1C161D1D
+      1D1D1D1D1D1D1D1C1C1C1B1B1B19191919191917171715151615140A0F153807
+      1A920B17680F143712131A13121014130C151414161616161616161616171717
+      1717171717171515151414141313131111110F0F0A0C0F290212A20013C30013
+      C80012C00011BC0011BB0010BE000FC3090E460E0E050E0E0E0E0E0E0E0E0E0E
+      0E0E0D0D0D0C0C0C0C0C0C0A0A0A0909090808080707070707074F4F4FADADAD
+      A7A7A7A2A1A19C9B9B9695959090908B8A8B8585858080807C7B7B7777777272
+      726D6D6D6969696565656060605C5C5D5858585454545050504D4D4D494A4A45
+      46464242423F3F3F3D3D3D3A3A3A3636363534343132312E2E2E2D2D2C2B2A2B
+      2928282626262525252323232122211F1F1F1E1D1E1C1D1C1C1D1C1B1B1B1A1A
+      1919181819181817171618171617161617161617161616161616151515161615
+      1515151515151415151515141414141414141414141414141414131314131313
+      1414141313131313131313131313121313121212121312121212121212121212
+      1212111212111112111111111011101011100F0F0E0F0E0D0D0D0C0D0D0C0C0C
+      0C0C0C0C0B0C0C0C0B0C0C0C0C0B0B0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0A0A
+      0B0A0B0B0A0A0B0B0C0D0D0D0D0D0D0D0C0D0D0D0D0C0D0C0C0C0C0C0C0C0C0C
+      0C0B0B0B0C0B0B0B0B0B0A0B0B0A0A0A0A0B0A0B0A0B0A0A0B0A090A0A0A090A
+      0A090A0A090A0909090909090909070707070707070706060607070607070607
+      0708071312121B1B1B1D1D1D2020202323222626262526260A0B0A0303030303
+      0303030303030303030303030203030303030302030202030302030302030202
+      0202020202020202010102020101010201020201010101010102010102010101
+      0101010101010101010101010100010001010101000000010000000000010000
+      0000000000000000000030303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303333333737373939393A3A3A3D3D3D
+      3535362F2F2F2F2F2F2F2F2F2F2F2F3030303A39393A39393939393939393939
+      3939393939393939393939393939393939393939393939393939393939393839
+      39383939383938383131313131313131313131313131313131313737373A3A3A
+      3A3A393A3A393A3A393A39393A39393A39393A39393939393939393939393939
+      3939393939393939393939393939393939393939393939393839393839383839
+      3838393838393838383838383838383838383838383838383838383838393938
+      3B3B3B3B3B3B3B3B3A3B3A3A3B3A3A3A3A3A3837373636363636363636363636
+      3636363636363636363636363637373737373738373732323232323233333334
+      34343535353636363737373D3D3D4A4A4A4D4D4D4D4D4D4F4F4F505050525252
+      5454545555555656565252525151515353535656565959595C5C5C5F5F5F6363
+      636666666A6A6A6E6D6E7172727475747979797D7D7E8182828687868B8A8A8F
+      8F8F949494999999A0A0A0A6A6A6ABABABB0B0B0B6B6B67171714E4E4E4F4F4F
+      5151515454545454545555555555555454545454545454545252525252525252
+      525252525151515050504F4F4F4F4F4F4F4F4F4D4D4D4B4B4B49494945454542
+      42423E3E3E393939343535312F272B35581D4DF31C4EFF1B4CFF1A4CFF1A4BFF
+      194AFF1849FF1749FF1748FF1648FF1547FF1546FF1446FF1345FF1244FF1143
+      FF1042FF1042FF0E41FF20306F2C291F2E2E2E31313134343437373738383839
+      39393A3A3A3A3A3A3A3A3A383838383838383838383838363636363636363636
+      3535353535353434343333333333333232323232323232323232323232323232
+      323333333333333232322F2F2F2C2C2C2A2A2A2727272424242121211E1E1D1C
+      1B130A22950028F40027E60026E60026E50025EB12206A201E131F1F1F202020
+      1F1F1F1E1E1E1D1D1D1C1C1C1B1B1B19191917171717171716151015140E1614
+      0915140E15141215141316151516161617171718181818181818181817171717
+      17171616161515151313131212121111110F0F0D0D0E12090F3D04107F0012B7
+      0012C70011C50111B7070F670E0E170E0E0C0E0E0E0E0E0E0E0E0E0F0F0F0D0D
+      0D0C0C0C0C0C0C0B0B0B0A0A0A0909090707070707073E3E3EAEADAEA8A7A7A3
+      A2A29D9C9C9796969191918C8C8B8686868181817D7D7D7777777273726D6D6D
+      6969696565656161615D5C5C5858585555555151514D4D4D4A4A4A4645454343
+      433F40403D3D3D3A3A3A3636373435353131312E2E2E2D2D2D2B2B2B28292826
+      2726252525232323222222201F1F1E1E1E1D1D1D1C1D1C1B1B1B1A1A19191918
+      1918181817171817171716161716161716161616161615161515161615161515
+      1515151515151515151514141515151414141414141414141413141413141413
+      1314131313131313131312131312131312121213131212121212121112111212
+      121111121111111010111010111010101010100F100F0F0F0D0E0D0C0C0D0C0C
+      0C0C0C0C0C0C0C0C0B0C0B0C0B0B0C0B0B0B0B0C0B0B0B0B0B0B0B0B0B0C0B0D
+      0D0E0D0E0D0E0D0D0D0D0D0D0D0D0C0D0D0D0C0C0C0C0C0D0C0C0D0C0C0C0B0B
+      0C0B0B0B0B0A0B0A0A0A0B0B0A0A0A0A0A0A0A0B0B0A0A0A0A0A0A0A0A0A0A09
+      09090A0909090A0A090909090907070706070606060707070707060707060607
+      07071414141D1D1D2121212525252829292C2B2B2B2A2B0C0C0C030304030304
+      0303030303020303030203020203030303020302020202020202020202020202
+      0201020202020101020101010201020101010102010202020102010101010101
+      0101010101000101010100010101000000000101000000010101010100010100
+      0000000000003030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303232323636363838383A3A3A3C3C3C3939392F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F3838383A3939393939393939393939393939
+      3939393939393939393939393939393939393939393939393939383939383939
+      383938383333333131313131313131313131313131313434343A3A3A3A3A3A3A
+      3A393A3A393A3A393A39393A39393A39393A3939393939393939393939393939
+      3939393939393939393939393939393939393939393939383939383938383938
+      383938383938383838383838383838383838383838383838383838383A3A3A3B
+      3B3B3B3B3B3B3B3A3B3A3A3B3A3A3A3939373636363636363636363636363636
+      3636363636363636363737373737373838383737373333333333333434343535
+      353636363737373939393C3C3C4949494D4D4D4F4F4F51515152525254545455
+      55555757575959595B5B5B5A5A5A5B5B5B5B5B5B5C5C5C5F5F5F636363676767
+      6B6B6B6E6E6E727172767675797A7A7D7D7D8382838787878C8C8C9292929798
+      979D9D9DA2A2A2A7A7A7ACACACB1B1B1B7B7B769696950505051515153535354
+      5454555555555555555555555555545454545454545454525252525252525252
+      5252525151515050504F4F4F4F4F4F4E4E4E4D4D4D4A4A4A4747474545454141
+      413C3C3C373737333333312E252838761D4EFB1C4EFF1B4CFF1A4CFF1A4BFF19
+      4AFF1849FF1749FF1748FF1648FF1547FF1546FF1446FF1345FF1244FF1144FF
+      1043FF1D32882B29202D2C2C3030303232323535353838383939393939393B3B
+      3B3B3B3B3A3A3A3A3A3A38383838383838383838383836363636363636363635
+      3535353535343434333333333333323232323232323232323232333333353535
+      3636363535353232322D2D2D2B2B2B2828282525252222221F1F1D1C1C1C0725
+      B40028F10027E70027E70026E50026F00B239C21201A22222122222221212121
+      21212020201F1F1F1D1D1D1C1C1C1A1A1A1A1A1A181818171716161616171717
+      1717171717171818181717171818181919191919191919191919191818181818
+      181616161515151313131212121010100F0F0D0F0E050D0D060B0E2606107703
+      11900B0E2E0F0E040F0F0C0F0F0F0F0F0F0E0E0E0F0F0F0F0F0F0F0F0F0D0D0D
+      0C0C0C0B0B0B0A0A0A090909080808070707313131AEAEAEA8A8A7A3A3A29E9D
+      9E9897979291918D8C8C8787878282827D7D7D7878787373736F6E6E6A6A6A66
+      65656161615E5E5E5959595655555151514E4D4D4A4A4A474747434343403F40
+      3D3D3D3A3A3A3737373435343232322F302F2D2D2D2A2B2A2929292626262525
+      25232323222222201F1F1E1E1E1D1D1D1D1D1D1C1C1B1B1A1A19191819181818
+      1717181716181717171616171616171616161616161616161515151515151515
+      1515151515151515141515151514151414141414141414141414131314131314
+      1314131413131313131213131313121312121312121213121212121211121212
+      11111210111111111110101110101010101010101010101010100E0D0E0C0C0C
+      0C0C0C0B0C0C0C0C0C0C0B0B0C0B0C0B0B0B0B0B0B0D0D0D0E0D0E0D0D0E0D0E
+      0D0D0D0D0D0D0E0D0D0D0D0D0D0D0D0C0D0D0D0C0D0D0C0C0C0D0C0B0C0B0B0B
+      0B0B0B0B0B0A0B0B0A0A0B0B0B0B0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A090A0A
+      0A0A0909090A090A090908090707070706070707070606060706060707070A09
+      0A1A1A1A2222222726272C2C2C30303031313117181803040304030403030303
+      0303030303030303030303030302030202020202030303020302020202020202
+      0202020202020202010102020102020102010101020101010101010102010101
+      0101010101010101000100000100010001000001000100000000000100000000
+      0000303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303131313636363838383A3A3A3C3C3C3D3D3D2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F3535353A39393A393939393939393939393939393939
+      3939393939393939393939393939393939393939393939393938393938393838
+      3535353131313131313131313131313131313131313A3A3A3A3A3A3A3A3A3A3A
+      393A3A393A3A393A39393A39393A39393A393939393939393939393939393939
+      3939393939393939393939393939393939393939393938393938393838393838
+      3938383938383838383838383838383838383838383838383938383B3B3B3B3B
+      3B3B3B3B3B3B3A3B3A3A3B3A3A38383836363636363636363636363636363636
+      3636363636373737373737383838383838383838343434343434353535363636
+      3737373939393A3A3A3C3C3C4645464F4F4F5151515252525454545656565757
+      575A5A5A5C5C5C5E5E5E6060606363636464646666666767676A6A6A6C6C6C70
+      70707373737979797D7D7C8080808685868B8B8B908F909494949999999D9E9D
+      A3A3A3A8A8A8ADADADB3B3B3B9B8B86363635151515353535454545555555656
+      5656565656565656565654545454545454545454545452525252525252525252
+      52525151515050504F4F4F4F4F4F4E4E4E4C4C4C4949494747474343433F3F3F
+      3B3B3B363737333332312E252838711E4CED1B4FFF1B4CFF1A4CFF1A4BFF194A
+      FF1849FF1749FF1748FF1648FF1547FF1546FF1446FF1246FF1243F91E33822A
+      281F2D2C2A2F2F303232323535353737373939393A3A3A3B3B3B3B3B3B3B3B3B
+      3B3B3B3A3A3A3A3A3A3838383838383838383838383636363636363636363535
+      3535353534343433333333333332323232323233333333333335353536363636
+      36363333332F2F2F2C2C2C292929262626232323201F1C1B1D260327D50028EF
+      0028E90027E70027E70026EB0425CA2021282322202424242323232323232121
+      212121212020201E1E1E1D1D1D1C1C1C1B1B1B1A1A1A1919191919191A1A1A1A
+      1A1A1A1A1A1A1A1A1919191A1A1A1A1A1A1A1A1A191919191919181818171717
+      1616161515151313131212121010101010100F0F0E0E0E080E0E090E0E0E0F0E
+      080E0E0E0F0F0F1010100F0F0F1010100F0F0F0F0F0F0F0F0F0E0E0E0C0C0C0C
+      0C0C0B0B0B0A0A0A090909080808262626AFAFAFA9A9A8A3A2A39E9D9D989898
+      9292928D8D8D8888888282827D7D7D7878787373736E6E6F6B6B6B6566656161
+      615E5E5E5959595656565152514D4E4E4A4A4A4747474343434140403D3D3D3A
+      3A3A3737373535353231322F302F2E2E2E2B2B2B292929272627252525232323
+      2122221F20201F1F1E1D1D1D1D1D1D1C1B1B1B1B1A1A19181918181817171817
+      1718161717171717161617161616161616161616161616161615151515151515
+      1515151414141415151414141414141414141414141414131413131314131413
+      1413141313131313131213121212131212131312121212121212121211111111
+      11111110111010111010101010100F100F0F10100F0F0F100F0F0F100E0D0F0C
+      0C0C0C0C0C0C0C0B0B0B0B0C0C0C0E0E0E0E0E0E0E0E0E0D0E0D0E0E0E0E0E0E
+      0D0E0D0E0D0D0D0D0D0D0D0D0C0D0D0D0D0C0C0C0C0D0C0C0C0B0C0C0B0B0B0B
+      0B0B0B0B0B0B0A0A0B0A0A0A0B0A0A0A0A0A0A0A0A0A0A0A0A0A09090A0A0A09
+      0A090909090A09090908090707070707070707070607060708080A0909161616
+      2424242A2A2A3030303434343737370707070303030303040403030303030303
+      0303030303030303030203030203030203020302020202020202020202020202
+      0202020102020201010102020102020101020201010101010202010201010101
+      0101010001010101000101010100010000000100000000000003000001003030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303636363838383A3A3A3C3C3C3E3E3E3131312F2F2F2F2F2F
+      2F2F2F2F2F2F3333333A39393A39393939393939393939393939393939393939
+      3939393939393939393939393939393939393939393839393839393838373731
+      31313131313131313131313131313131313737373A3A3A3A3A3A3A3A3A3A3A39
+      3A3A393A3A393A39393A39393A39393A39393939393939393939393939393939
+      3939393939393939393939393939393939393939393839393839383839383839
+      38383938383838383838383838383838383838383838383A39393B3B3B3B3B3B
+      3B3B3B3B3B3A3B3A3A3B3A3A3737373636363636363636363636363636363636
+      3637373737373738383838383839393939393935353535353536363637373739
+      39393A3A3A3C3C3C3E3E3E4242424C4C4C5353535454545656565858585A5A5A
+      5D5D5D5F5F5F6161616363636666666969696C6C6C6F6F6F7272727676767878
+      787D7D7D8080808484848888888C8C8C9191919596959B9A9A9F9F9FA4A4A4A9
+      A9A9AFAFAFB4B4B4BAB9BA5E5E5E525252535353565656565656565656575757
+      5757575656565656565454545454545454545454545252525252525252525252
+      525151515050504F4F4F4F4F4F4D4D4D4B4B4B4949494545454242423E3E3E3A
+      3A3A363636333332312E242C334E2145C11C4DFF1A4EFF1A4DFF1A4BFF194BFF
+      1849FF1749FF1748FF1548FF1448FF1447FF183FCD232F5C2B281F2C2C2A2F2F
+      2F3232323535353737373939393A3A3A3B3B3B3C3C3C3C3C3C3B3B3B3B3B3B3B
+      3B3B3A3A3A3A3A3A383838383838383838383838363636363636363636353535
+      3434343333333232323232323232323131313232323434343636363636363333
+      332F2F2F2C2C2C292929262626222222201F17171F460029E90029ED0028EA00
+      28E90027E70027E90026E31B234724231D242424242424242424232323222222
+      2222222121211F1F1F1D1D1D1C1C1C1D1D1D1C1C1C1B1B1B1B1B1B1B1B1B1C1C
+      1C1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1B1A1A1A19191918181817171716
+      1616141414141414121212111111111111101010100F0F100F0E101010101010
+      1010101010101111111010101010101010100F0F0F0E0E0E0E0E0E0C0C0C0B0B
+      0B0A0A0A0909090808081D1D1DB0B0B0AAAAA9A4A4A39E9E9E9898989393938E
+      8E8E8888888383837D7D7D7878787474747070706B6B6B6665656262635E5E5E
+      5A5A5A5656565151514E4E4E4A4A4A4747474444444141413D3D3D3A3A3A3737
+      373535353232322F2F2F2E2E2E2C2C2C29292927272626252523232322222220
+      1F201F1F1F1D1D1D1D1D1D1C1C1B1B1B1A191919191918181717181717171717
+      1717171717171716161716161616161616161616161615151515161515151515
+      1515141514151515151414141514141414141414141413141313141413141313
+      1314131313131313131313121313131212121212121212121111111111121110
+      1111101110111010101010101010100F0F0F101010100F0F100F0F0F0F0F0D0D
+      0D0B0C0D0E0E0D0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0D0D0E0E0E0E0D
+      0D0D0D0D0D0D0D0D0C0D0D0D0D0D0D0C0D0C0C0C0C0B0B0C0B0B0B0B0B0B0B0B
+      0B0B0B0B0B0A0A0A0B0A0B0A0A0B0A0A0A0A0A0A0A0A0A0A090A090A0909090A
+      090909090A09090707080707070706070706060808070B0A0B1E1E1F2627262E
+      2E2E343434393939252626030303040303040304040404030403030403030303
+      0303030302020303030303020202020302020302020202020202020202020202
+      0202020202010102020201010201020101010101010101010201010101010001
+      0001010001000001010001000100000001000000030300010000303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303232323636363838383B3B3B3D3D3D3E3E3E3535352F2F2F2F2F2F2F2F2F2F
+      2F2F3030303A39393A3939393939393939393939393939393939393939393939
+      3939393939393939393939393939393939393939383939383938383232323131
+      313131313131313131313131313434343A3A3A3A3A3A3A3A3A3A3A3A3A3A393A
+      3A393A3A393A39393A39393A39393A3939393939393939393939393939393939
+      3939393939393939393939393939393939393939383939383938383938383938
+      383938383838383838383838383838383838383838383B3B3A3B3B3B3B3B3B3B
+      3B3B3B3B3A3B3A3A3A3A39373636363636363636363636363636363636373737
+      3737373838383838383939393A3A3A3A3A3A3737373636363737373A3A3A3A3A
+      3A3C3C3C3E3E3E4040404242424848485151515656565858585B5B5B5D5D5D60
+      60606262626464646767676969696C6C6C6F6F6F7373737676767979797D7D7D
+      8181818584858988898D8D8D9292929797979C9C9CA0A1A0A5A5A5AAAAAAAFAF
+      AFB2B2B2B5B5B558585853535354545456565657575758585858585857575757
+      5757565656565656545454545454545454545454525252525252525252525252
+      5151515050504F4F4F4E4E4E4D4D4D4B4B4B4747474545454141413E3E3E3B3B
+      3B37373733333332302A302F2B2937642241B01D49EA1A4CFC194CFF184CFF18
+      4AFF1748FD1845EF1B3EBC22336E29292A2C2A212E2E2D303030323232353535
+      3838383A3A3A3B3B3B3C3C3C3C3C3C3D3D3D3D3D3D3C3C3C3B3B3B3B3B3B3B3B
+      3B3A3A3A3A3A3A38383838383838383838383837373736363635353534343434
+      343432323232323231313131313131313132323232323232323231302F2F2E2C
+      2D2C292A292328261C252215221D0911226F002BF50029ED0029EA0028EA0028
+      E90027E80027F014247426231725252525252525252524242423232323232322
+      22222121212020201F1F1F1E1E1E1E1E1E1E1E1E1D1D1D1D1D1D1D1D1D1D1D1D
+      1D1D1D1C1C1C1C1C1C1C1C1C1C1C1C1B1B1B1A1A1A1818181818181717171616
+      1615151514141413131312121212121211111111111111111111111111111111
+      11111111111111111111111111111010100F0F0F0E0E0E0D0D0D0C0C0C0A0A0A
+      090909080808111111B0B0B0AAAAAAA4A3A49E9E9E9898989393938E8E8E8888
+      888383837D7E7E7879787474747070706B6B6B6767676263625E5E5E5A5A5A56
+      56565252524F4F4E4B4B4A4848494444444141413D3E3D3A3A3A373737353535
+      333333302F302E2E2E2D2C2C2929292627262626262323232222222020201F1E
+      1F1E1E1E1D1E1D1C1C1C1B1B1A1A1A1919191918171718181718171718171617
+      1616171616171617161616161516151616151516151515151616151515151515
+      1514151414151415141414141414141414141414141414141313141413141413
+      1413131312131213121212131212131212121212121212111112111111111111
+      10111111111010101010101010101010100F10100F100F0F100F0F0F0F0F0F0F
+      0F0F0E0F0F0F0E0F0F0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0E0D0E0E0E0D
+      0E0D0D0D0D0D0D0C0D0C0D0C0C0D0C0C0C0B0C0C0B0C0C0B0B0C0B0B0A0B0B0B
+      0B0B0B0B0B0B0B0A0A0A0B0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A090A0909
+      0908080707080707070707070808070909091515152425242A2B2A3131313838
+      373B3B3B0B0B0B04040404030404040404030404040404030304030303030303
+      0303030302030203020302030303030303020202020202020202020202020202
+      0202020202010201020102020201010201010101010102010101010101010101
+      0101010101010101000101010100010103000300010130303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030323232353535
+      3737373939393B3B3B3D3D3D3F3F3F3434342F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F3837373A39393A393939393939393939393939393939393939393939393939
+      3939393939393939393939393939393938393938393838353535313031313131
+      3131313131313131313131313A39393A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A
+      393A3A393A39393A39393A39393A393939393939393939393939393939393939
+      3939393939393939393939393939393939393938393938393838393838393838
+      3938383838383838383838383838383838383939393B3B3B3B3B3B3B3B3B3B3B
+      3B3B3B3A3B3A3A39393936363636363636363636363636363637373737373738
+      38383838383939393A3A3A3B3B3B3B3B3B3939393737373A3A3A3A3A3A3C3C3C
+      3E3E3E4040404242424444444646464A4A4A5353535A5A5A5E5E5E6161616363
+      636565656868686B6B6B6D6D6D7171717373737777777B7B7B7F7F7F82828286
+      86868B8B8B8E8E8E9393929898989D9D9CA1A1A1A4A4A4A7A7A7A9A9A9AFAFAF
+      B5B5B55959595555555555555656565757575959595858585757575757575757
+      5756565656565654545454545454545454545452525252525252525252525251
+      51515050504F4F4F4E4E4E4D4D4D4A4A4A4747474545454141413F3F3F3B3B3B
+      383838353535323230312F272F2E272D303A29345B2637782538802536792732
+      5E292D3C2C2B272E2B212E2E2C2F2F2F3131313434343636363838383A3A3A3C
+      3C3C3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3C3C3C3B3B3B3B3B3B3B3B3B
+      3A3A3A3A3A3A3838383838383838383737373636363535353434343333333232
+      3231313130303030302F31302C323029323025333023302F292D2D2F292C3722
+      2A4D1927661226810D26960428D2002BF3002AED0029EC0029EA0028EA0028E9
+      0027F20B25A424231E2424232525252525252525252424242323232323232222
+      222222222121212020201F1F1F2020201F1F1F1E1E1E1E1E1E1E1E1E1E1E1E1D
+      1D1D1D1D1D1C1C1C1C1C1C1C1C1C1B1B1B1A1A1A191919181818181818161616
+      1515151515151414141313131313131313131212121212121212121212121111
+      111212121212121111111111110F0F0F0E0E0E0E0E0E0C0C0C0B0B0B0A0A0A09
+      0909131313B0B0B0AAAAAAA4A4A49E9E9E9998989393938E8E8E888888838383
+      7D7E7E7979797474747070706B6B6B6767676363635E5E5E5A5A5B5656565353
+      534F4F4F4A4A4B4949484445444141413E3E3E3B3A3A3837373535353333332F
+      30302E2E2E2D2C2C2929292727272626262423242223222020201F1F1F1E1E1E
+      1E1E1D1C1C1C1B1B1A191A191A19191818181918171817171817171717171716
+      1617171716161616161616161616161616161616151515151515151515151514
+      1515151514151514141414141414141414141414131414141414131314131314
+      1313131312131213131212121312121212121211111211111210111111101110
+      10111111101010101010100F0F10101010100F0F0F0F0F0F100F0F0F0F0F0E0F
+      0F0F0F0F0E0E0E0F0E0E0F0E0E0F0E0E0E0D0E0D0E0D0E0D0E0D0E0E0D0D0E0D
+      0D0E0D0D0D0D0D0D0D0D0C0C0D0C0C0C0B0C0C0C0C0B0B0B0C0B0B0B0B0B0A0B
+      0B0B0B0B0A0B0B0A0B0B0A0A0B0A0A0A0A0A0A090A0A090A090A0A0A09080808
+      07070708080707070807080B0B0B1E1E1E2627262F2F2E3535343A3A3B272727
+      0404040404040404040404040304040304040303030303030303030303030303
+      0302030303030302030302030302030302030202020203030302020202010202
+      0202020201010202020101010101020101010102010101010101010101010101
+      0001010101010000010101000303030100003030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303232323434343636363838383A
+      3A3A3C3C3C3E3E3E3434342F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F353535
+      3A39393A39393939393939393939393939393939393939393939393939393939
+      3939393939393939393939393839393839393838373731303131303131313131
+      31313131313131313737363A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A39
+      3A3A393A39393A39393A39393A39393939393939393939393939393939393939
+      3939393939393939393939393939393939393839393839383839383839383839
+      38383838383838383838383838383838383A3A3A3B3B3B3B3B3B3B3B3B3B3B3B
+      3B3B3A3B3A3A3838383636363636363636363636363737373737373838383838
+      383939393A3A3A3B3B3B3B3B3B3D3D3D3C3C3C3A3A3A3A3A3A3C3C3C3E3E3E40
+      40404242424444444646464848484B4B4B4E4E4E5353535C5C5C616161666666
+      6868686C6C6C6E6E6E7272727474747878787B7B7B7F7F7F8383838888888B8B
+      8B8F8F8F9493939695959999999B9B9A9F9E9FA5A5A5AAAAAAB0B0B0B5B5B55B
+      5B5B565656565656575757595959595959595959585858585858575757575757
+      5656565656565454545454545454545454545252525252525252525252525151
+      515050504E4E4E4D4D4D4D4D4D4A4A4A4848484545454242423F3F3F3D3D3D39
+      393936363634343434333232312E312F28302D24302D23302D23302E272F2E2A
+      302F2E3131313333333434343535353838383939393B3B3B3C3C3C3D3D3D3E3E
+      3E3E3E3E3E3E3E3E3E3E3D3D3D3D3D3D3D3D3D3C3C3C3B3B3B3B3B3B3B3B3B3A
+      3A3A3A3A3A383838383838373737363636343434333333323232313131303030
+      2F2E2E2F2E2C2B2E3E242F5D1E2F79182F94102FB00A2EC9032EE4012DF0002D
+      F6002DFE002DFE002CF5002AEE002AEE002AED0029EC0029EA0028EA0028F407
+      25BB232323242422252525252525252525252525252525242424242424232323
+      2222222222222121212020202020201F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1E1E
+      1E1D1D1D1C1C1C1C1C1C1C1C1C1B1B1B1A1A1A18181818181818181817171716
+      1616151515151515151515141414141414131313131313131313121212121212
+      1212121212121111111010100E0E0E0E0E0E0C0C0C0B0B0B0A0A0A0909091313
+      13B0B0B0ABAAAAA5A4A49F9E9E9898989493938E8E8E8988888383837E7E7D79
+      79797575757070706B6B6B6767676363635E5E5E5B5A5B5656565353534F4F4F
+      4B4B4B4949494444454141413E3E3E3C3B3C3837383535353333333030302E2E
+      2E2D2D2C29292A2727272626262423232322222120201F1F1F1E1E1E1E1E1E1D
+      1D1C1B1B1A1A1A191A1918191818181718181718181717171717171717171717
+      1716161616161617161616161616161616151616161515151515151515151415
+      1415151514151514141414141414141314141414141413131314141313131413
+      1312131312131312131212121212121111121111121111121010111111101011
+      10111010101010101010101010101010100F0F10100F0F0F0F0F0F0E0F0F0E0E
+      0E0E0E0E0F0F0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0E0E0D0E0D0D0D0E0E0D0D
+      0D0D0D0D0D0D0C0D0D0C0C0C0B0B0C0C0B0C0B0B0B0B0B0B0B0C0B0B0B0A0B0B
+      0B0B0B0B0A0B0B0A0A0A0B0A0A0A0A0A0A090A0A0A0908090808070707070708
+      07080808090909141414242424292A2A3232313838383C3C3C0F0F0F04040404
+      0404040404030304030404030303030304040303030303030303030303030303
+      0303030303030302030203020202020202020303020203020202020201020202
+      0201010202010102020102010101010201010101010102010101010101010101
+      0101010101010001000300000101303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303232323434343535353737373A3A3A3C3C3C3D3D
+      3D3434342F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F303837373A39393A
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393939393939393939383939383938383332323130313130313131313131
+      313131313333333A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A
+      3A393A39393A39393A39393A3939393939393939393939393939393939393939
+      3939393939393939393939393939393939383939383938383938383938383938
+      383838383838383838383838383838383B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B
+      3B3A3B3A3A383838363636363636363636373737373737383838383838393939
+      3A3A3A3B3B3B3B3B3B3D3D3D3E3E3E3F3F3F3D3D3D3C3C3C3E3E3E4040404242
+      424444444646464848484B4B4B4E4E4E5050505353535757575959595F5F5F64
+      64646968696D6C6D7373737777777A7A7A7D7D7D807F80848384858585888888
+      8B8B8B9191919696959A9A9A9F9F9FA5A5A5AAABAAB0B0B0B5B5B55C5C5C5757
+      575858585959595A5A5A5959595959595A5A5A59595957575757575757575756
+      5656565656545454545454545454545454525252525252525252525252515151
+      5050504E4E4E4D4D4D4D4D4D4A4A4A4848484545454343434141413E3E3E3C3C
+      3C39393938383836363635353534343433333333333333333334343434343435
+      35353737373838383A3A3A3B3B3B3C3C3C3E3E3E3F3F3F3F3F3F3F3F3F3F3F3F
+      4040403F3F3F3E3E3E3D3D3D3D3D3D3D3D3D3C3C3C3B3B3B3B3B3B3B3B3B3A3A
+      3A3A3A3A3838383737373636363434343232323030302F2F2F2E2E2E2F2C2322
+      2D5D0331F00031FB0031FF0030FF002FFF002FFE002FFA002EF8002EF5002DF3
+      002DF2002CF1002CF0002AEF002AEE002AED0029EB0029F20327D71A22472322
+      1D24242425252525252526262626262626262625252524242424242424242423
+      23232222222121212121212121212020201F1F1F1F1F1F1F1F1F1F1F1F1E1E1E
+      1D1D1D1C1C1C1C1C1C1C1C1C1B1B1B1A1A1A1919191919191818181717171616
+      1616161616161615151515151514141414141414141413131313131312121212
+      12121212121111110F0F0F0E0E0E0D0D0D0C0C0C0B0B0B0A0A0A121212B0B0B0
+      ABAAABA5A4A49F9E9E9998989493938E8E8E8988888383837E7E7E7A7A7A7575
+      757071706B6B6C6767676363635E5E5E5B5B5A5656565453534F4F4F4B4B4B48
+      48494444444142413E3E3E3C3C3C3838383535363334333030302E2E2E2D2D2D
+      2A292A2727272626262423242322222021201F1F1F1E1E1E1E1E1E1D1C1C1C1C
+      1B1A1A191A1A1919181819181818181718181718171817171717171617171716
+      1616161616161617161616151616161516151515161515151515151515151415
+      1514141414151415141414141414141414141314131413141314141313141313
+      1313131313131212121213121212111112111111111111111111111110111111
+      11101011101010100F0F10100F10100F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F
+      0E0F0F0E0F0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0D0D0D0E0D0D0D0D0D
+      0E0D0D0D0C0C0C0D0C0C0C0B0C0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0A
+      0B0B0A0A0B0A0B0A0A0A0B0A0A0A0A0A0A090909080808080807070707080909
+      0C0B0B1C1C1C2627272E2E2E3535353A3A3A2F2F300505040404040404050404
+      0404040403040404040403030303030304030403040303030303030303030303
+      0303020203020303020202020202020202020303020202020202010202010201
+      0202020201020201020201020202020102010101010101010101010101010100
+      0101010103000301010130303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303232323434343535353737373939393B3B3B3D3D3D3434342E2E2E
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F303837373A39393A39393A39393A39
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393939393938393938393938363535303030313031313031313131313131
+      3131313939393A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A
+      393A39393A39393A39393A393939393939393939393939393939393939393939
+      3939393939393939393939393939393938393938393838393838393838393838
+      3838383838383838383838383939383B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B
+      3A3B3A3A3737373636363636363737373737373838383838383939393A3A3A3B
+      3B3B3B3B3B3D3D3D3E3E3E404040414141424242404040404040424242444444
+      4646464848484B4B4B4E4E4E5050505353535757575959595C5C5C6060606363
+      636767676A6A6A6F6F6F7272727676767B7B7B7F7F7F8383838787878C8C8C91
+      91919696969A9A9A9F9F9FA5A5A5ABABABB0B0B0B5B5B55C5C5C575757595959
+      5A5A5A5A5A5A5B5B5B5A5A5A5A5A5A5A5A5A5858585757575757575757575656
+      5656565654545454545454545454545452525252525252525252525251515150
+      50504E4E4E4E4E4E4D4D4D4B4B4B4949494646464545454343434040403E3E3E
+      3C3C3C3B3B3B3939393939393838383737373838383838383939393A3A3A3B3B
+      3B3C3C3C3D3D3D3E3E3E3F3F3F40404041414140404040404040404040404040
+      40403F3F3F3E3E3E3D3D3D3D3D3D3D3D3D3C3C3C3B3B3B3B3B3B3B3B3B3A3A3A
+      3939393737373636363434343232322F2F2F2E2E2E2B2B2B2C291F102FAD0033
+      FF0032FF0031FC0031FA0030F9002FF8002FF7002FFF002FFF002EFB002DF700
+      2DF4002CF3002CF1002AEF002AEE002AF20229E5172151222014232323242424
+      2525252626262626262626262626262626262525252424242424242424242323
+      232323232121212121212121212121211F1F1F1F1F1F1F1F1F1F1F1F1E1E1E1D
+      1D1D1C1C1C1C1C1C1C1C1C1B1B1B1B1B1B1A1A1A191919191919181818171717
+      1616161717171616161515151515151414141414141414141313131212121212
+      121111111010100E0E0E0D0D0D0C0C0C0B0B0B0A0A0A121212B0B0B0ABAAAAA5
+      A5A49F9E9E9998989393938E8E8E8988888383837E7E7D7A7A7A757575717171
+      6C6C6C6867676463635E5E5E5B5B5B56565653535350504F4B4B4B4949494544
+      454142423E3E3E3C3C3C3838383536363334333030312E2E2E2C2D2D2A292928
+      27272626262424232222222121201F1F1F1E1E1E1E1E1E1C1D1C1B1C1B1A1A19
+      1A1A191A1A1A1A1A1A1A1A1A1919191A191919191A1919191918181818191818
+      1916161616161616161615161615161615151515151515151515151515151515
+      1515151414141414141414131414131414131414131413131314131413131313
+      1313121312121212121211121212111211111211111111111010101010101011
+      101010101010100F10101010100F100F0F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0F
+      0E0E0E0F0F0E0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0E0E0D0D0E0D0D0D0D0D0D
+      0D0C0D0D0C0C0C0B0C0C0C0B0C0C0C0B0B0B0B0C0B0B0B0B0A0B0A0B0B0B0B0B
+      0A0B0A0B0A0A0A0A0A0A0A0A0A0808080808070707070809080A0A0912121324
+      24242A2A2A3131313839383C3D3C121213050405040404050404040404040404
+      0404040404030303040303030304030303030303030303030303030303030303
+      0302020302030303030302030302020302030202020201020202020201020202
+      0202020102010202020201010202010201010101010101010101000101010100
+      0003030100003030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303232
+      323434343535353737373939393B3B3B3D3D3D3434342E2E2E2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F303838373A39393A39393A39393A39393A3939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393839393839393838383831313130303031303131303131313131313134
+      34343A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A39
+      3A39393A39393A39393A39393939393939393939393939393939393939393939
+      3939393939393939393939393939393839393839383839383839383839383838
+      38383838383838383838383939393B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A
+      3A3A3A3737373636363737373737373838383838383939393A3A3A3B3B3B3B3B
+      3B3D3D3D3E3E3E40404041414142424245454445454543434344444446464648
+      48484B4B4B4E4E4E5050505353535757575959595C5C5C606060636363676767
+      6A6A6A6F6F6F7272727676767A7A7A7F7F7F8383838787878C8C8C9191919596
+      969A9A9A9F9F9FA5A5A5AAAAAAB0B0B0B5B5B55D5D5D5858585959595B5B5B5B
+      5B5B5C5C5C5B5B5B5A5A5A5A5A5A595959585858575757575757575757565656
+      5656565454545454545454545454545252525252525252525252525151515050
+      504F4F4F4E4E4E4D4D4D4B4B4B4A4A4A4848484646464444444343434141413F
+      3F3F3E3E3E3D3D3D3C3C3C3D3D3D3D3D3D3D3D3D3E3E3E3E3E3E3F3F3F3F3F3F
+      4141414141414141414141414141414242424242424141414040404040404040
+      403F3F3F3E3E3E3D3D3D3D3D3D3D3D3D3C3C3C3B3B3B3B3B3B3B3B3B39393937
+      37373535353333333131312F2F2F2B2B2B2A29222329430232F20033FF0032FD
+      0032FD0031FB0031FA0030FA002FFB0A2BB80A2AB6052BD1022CE6012CEC002C
+      F2002DF8002DFE002CFE002BF5132268211E1221212123232324242425252527
+      2727262626272727272727262626262626252525242424242424242424232323
+      2323232121212121212121212121211F1F1F1F1F1F1F1F1F1F1F1F1E1E1E1D1D
+      1D1C1C1C1C1C1C1C1C1C1B1B1B1B1B1B19191919191919191919191918181817
+      1717171717171717161616151515141414141414141414131313131313121212
+      1111110F0F0F0E0E0E0C0C0C0B0B0B0A0A0A131313B0B0B0ABABABA5A4A49F9F
+      9E9998989493938F8E8E8989888483837E7E7E7A7A797575757070706C6C6C68
+      68686364635E5F5E5B5B5B565656545454504F4F4B4B4B494949454445414141
+      3F3F3E3C3C3C3838383636353433333030302E2E2E2D2D2D2A2A2A2728282626
+      2624242422232320202121201F20201F20201F20201F1F1F1F1F1E1E1E1E1E1E
+      1D1E1D1D1D1D1C1D1E1C1C1E1D1C1D1D1C1D1D1D1D1D1D1C1C1D1D1D1C1C1C1C
+      1D1C1D1C1C1C1B1B1B1A1A1A1919181817171616171515151515151515141415
+      1515141514141414141414141414141314131314131313131313131313131213
+      1312131212121112121111121111121111111111111111111011101011101010
+      1010101010101010100F100F101010100F0F0F0F0F0F0F0F0F0F0F0F0F0F0E0F
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0D0E0D0D0D0D0D0D0D0D
+      0C0C0D0C0C0C0C0C0B0B0B0C0B0C0B0B0C0B0C0B0B0B0B0B0A0B0A0B0B0A0B0A
+      0A0A0B0B0B0A09090A0808080808080808080908090C0B0C1B1C1B2727272E2F
+      2E3535353A3A3A30303005050504050405050505040404040505040504040404
+      0403040403040304040403030403030304030303030303030303030303030303
+      0302020302030203020303020302020202020202020201020202010201010202
+      0201010201010202020202010202020101010101010101010101010103030301
+      0001303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030323232343434353535
+      3737373939393B3B3B3D3D3D3434342E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F303838383A3A393A39393A39393A39393A39393A393939393939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939383939383938383433333030303030303130313130313131313131313A3A
+      393A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A
+      39393A39393A39393A3939393939393939393939393939393939393939393939
+      3939393939393939393939393939383939383938383938383938383938383838
+      383838383838383838383A3A3A3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A3A
+      3A3A3737373737373737373838383838383939393A3A3A3B3B3B3B3B3B3D3D3D
+      3E3E3E4040404141414242424545444646454847474949494848484949494A4A
+      4A4E4E4E5050505353535757575959595C5C5C6060606363636767676A6A6A6E
+      6E6E7272727676767A7A7A7E7E7E8383838787878C8C8C9191919696959A9A9A
+      9F9F9FA5A5A5AAAAAAB1B1B1B7B7B75F5F5F5A5A5A5A5A5A5B5B5B5D5D5D5D5D
+      5D5C5C5C5B5B5B5A5A5A59595959595958585857575757575757575756565656
+      5656545454545454545454545454525252525252525252525252515151505050
+      4F4F4F4E4E4E4E4E4E4C4C4C4A4A4A4949494747474646464545454444444343
+      4342424242424241414141414141414141414142424242424242424243434343
+      4343434343434343424242424242424242424242404040404040404040404040
+      3F3F3F3E3E3E3D3D3D3D3D3D3D3D3D3C3C3C3B3B3B3B3B3B3A3A3A3838383535
+      353232323030302C2C2C29292929261B112EA00035FF0033FF0032FF0032FE00
+      32FD0031FB0032FF072ECF22222421201C1E1F251C1E2B181F3E14205511226C
+      0E24830B26A210237C201E1721201F2223232424242626262727272727272727
+      2727272727272727272726262626262625252524242424242424242423232323
+      23232222222121212222222222222020202020202020201F1F1F1E1E1E1D1D1D
+      1D1D1D1C1C1C1C1C1C1B1B1B1A1A1A1919191919191919191919191717171717
+      1717171717171716161615151514141414141414141413131312121211111110
+      10100F0F0F0D0D0D0C0C0C0A0A0A141414B0B0B0AAAAAAA4A4A49F9E9F999898
+      9493938F8E8E8988898483837E7E7E7A7A7A7575757070706C6C6C6868686363
+      635E5E5F5C5B5B5656565454544F504F4B4B4C4949494545454242423E3F3F3B
+      3B3B3838383535353434333030302E2E2E2D2D2D2A2A2A282828272828272626
+      2626262424242422232322222121202121202020201F1F1F1E1E1F1D1E1E1D1D
+      1D1D1C1D1D1D1D1D1C1D1D1D1D1E1D1C1D1D1D1D1D1D1C1C1D1C1D1C1C1C1C1D
+      1C1C1C1C1C1C1B1C1D1C1C1D1C1C1C1C1B1B1B1C1A1A1A181718161615151414
+      1414141514141414141413131414141313131314141314131313131313121312
+      1212121213121113121112111111111111101011111111111010111111101110
+      10101010101010101010100F0F0F0F10100F0F0F0F0F0F0F0F0F0E0F0F0F0F0F
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0D0E0E0D0E0E0D0E0E0D0D0D0C0C0D0C
+      0C0C0C0C0C0C0B0B0C0B0B0C0C0C0C0C0B0B0C0B0B0B0B0B0A0B0B0B0B0B0B0B
+      0A0A090808080808090808090809090A0A1111122423232B2B2A313232383838
+      3D3D3D1717170505040404050404040504040405040504040404050404040404
+      0403030404030304030303040303040303030303030303030303030303020302
+      0203020302030203030302020302020202020202020202020201010202010202
+      0101020201010101020201010101010101010101010001010300030101013030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303232323434343535353737373939393B
+      3B3B3D3D3D3434342E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F30383838
+      3A3A393A3A393A3A393A39393A39393A39393A39393A39393939393939393939
+      3939393939393939393939393939393939393939393939393939393939393839
+      39383939383837373030303030303030303130313130313131313635353A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A39
+      393A39393A39393A393939393939393939393939393939393939393939393939
+      3939393939393939393939393938393938393838393838393838393838383838
+      3838383838383838383A3A3A3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A3B3A
+      3A3939393737373838383838383939393A3A3A3B3B3B3B3B3B3D3D3D3E3E3E40
+      40404141414242424545444646454848474A49494C4B4B4E4D4D4F4F4F505050
+      5151525353535757575959595C5C5C5F5F5F6363636767676A6A6A6E6E6E7272
+      727676767A7A7A7E7E7E8282828787878C8C8C9191919696969B9B9BA1A1A1A7
+      A6A6ACACACB2B2B2B7B7B75F5F5F5B5B5B5C5C5C5C5C5C5D5D5D5D5D5D5D5D5D
+      5C5C5C5B5B5B5959595959595959595858585757575757575757575656565656
+      565454545454545454545454545252525252525252525252525151515050504F
+      4F4F4E4E4E4E4E4E4C4C4C4C4C4C4A4A4A494949494949474747464646454545
+      4545454545454444444444444444444444444545454545454444444444444444
+      444444444444444242424242424242424242424040404040404040404040403F
+      3F3F3E3E3E3D3D3D3D3D3D3D3D3D3C3C3C3B3B3B3A3A3A383838353535323232
+      2E2E2E2B2B2B2927212127400434F20135FF0134FF0034FF0032FF0032FE0032
+      FE0032FF17276A25221623222121201E201F1C1F1E181F1D151F1D121F1C0F20
+      1E16211F1921201F222222242424252525262626282828282828282828282828
+      2828282727272727272626262626262525252525252525252525252424242424
+      242323232323232323232323232222222222222222222121211F1F1F1F1F1F1D
+      1D1D1D1D1D1C1C1C1C1C1C1A1A1A191919191919191919191919171717171717
+      1717171717171616161515151414141414141414141212121111111010100F0F
+      0F0E0E0E0C0C0C0B0B0B131313B0B0B0AAAAAAA4A4A49E9E9E9998989493938E
+      8E8E8989898483847F7E7E7979797575757070706C6C6C6868686363635E5F5F
+      5B5C5B5656565353535050504C4B4B4949494545454242423E3F3F3B3B3C3838
+      383535353433343131312F2F2F2F2F2E2D2C2C2A2B2B2A292927272826262624
+      232423232323212121212021212020201F1E1F1F1F1E1F1D1E1D1D1D1D1D1D1D
+      1D1D1D1D1D1C1D1C1C1D1D1C1D1D1C1D1D1D1D1D1C1D1D1D1C1D1C1C1C1C1C1C
+      1C1C1C1C1C1C1C1D1B1B1D1C1B1D1C1B1C1C1C1C1D1C1C1C1C1C1B1B19191817
+      1716141415141414141414141414131414131313131313131313131312131212
+      1312121311121211111211111111111111101111111010101011111010101010
+      10101010100F101010101010100F0F0F0F100F0F0F0F0F0F0F0E0E0F0E0E0E0E
+      0F0F0F0E0E0E0E0E0E0E0E0E0E0E0D0D0E0D0D0E0D0D0D0E0C0D0D0C0C0C0C0C
+      0C0C0B0C0C0B0C0C0C0C0B0B0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B090A090809
+      080809080808080A09090B0B0B1919192627272D2D2D3635353B3A3B38383705
+      0505050504050404040505050405040405040405040404050404040304040404
+      0404040303030304030303030403030304030304030303030303020203030303
+      0202020202020203020202020203020202020202020202020202020201020102
+      0201010201020202010201010201010202020101030303010101303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303232323434343535353737373939393B3B3B3D3D3D3434
+      342E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F303838383A3A393A3A393A
+      3A393A3A393A39393A39393A39393A39393A3939393939393939393939393939
+      3939393939393939393939393939393939393939393939393939383939383939
+      383938383232323030303030303030303130313130313131313A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3939
+      3A39393A39393A39393939393939393939393939393939393939393939393939
+      3939393939393939393939393839393839383839383839383839383838383838
+      38383838383838383B3A3A3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A3C3B3B
+      3939393838383838383939393A3A3A3B3B3B3B3B3B3D3D3D3E3E3E3F3F3F4141
+      414242424545454646454848474A49494C4B4B4E4D4D51505053525256555559
+      58585A5A5A5C5B5C5F5F5F6060616363646767676A6A6A6E6E6E717171767676
+      7B7B7B7F7F7F8383838989898E8E8E9393939999999D9D9DA2A2A2A7A7A7ACAC
+      ACB2B1B1B7B7B76767675C5C5C5D5D5D5D5D5D5E5E5E5D5D5D5D5D5D5D5D5D5C
+      5C5C5B5B5B595959595959595959585858575757575757575757565656565656
+      5454545454545454545454545252525252525252525252525151515050504F4F
+      4F4F4F4F4E4E4E4D4D4D4C4C4C4B4B4B4A4A4A4A4A4A49494948484848484848
+      4848474747474747464646464646464646464646464646454545454545454545
+      4444444444444242424242424242424242424040404040404040404040403F3F
+      3F3E3E3E3D3D3D3D3D3D3D3D3D3B3B3B3A3A3A3838383535353232322E2E2E2A
+      2A2928261E112FA50137FF0335FF0235FF0134FF0034FF0032FF0033FF062FD7
+      2324292524212424242424242222222222222121212121212121212222212323
+      2223232324242425252527272728282829292928282828282829292929292927
+      2727272727272727262626262626262626252525252525262626252525252525
+      2525252626262626262626262525252424242424242323232121212020201E1E
+      1E1D1D1D1D1D1D1B1B1B1B1B1B19191919191919191919191917171717171717
+      17171717171616161515151414141414141313131212121111110F0F0F0E0E0E
+      0D0D0D0B0B0B1F1F1FB1B0B0AAAAAAA4A4A49E9E9E9999999493938F8E8E8989
+      898483847F7E7E7979797575757070716C6C6C6767676363635E5F5F5B5C5C56
+      56565353535050504C4C4C4848484545454242423D3E3E3B3B3C383938363635
+      3534333232323230312F2F2F2D2D2C2B2B2A2929282728282626262424242323
+      2322222222202121212020201F1F1F1E1F1E1F1E1E1D1E1D1E1E1D1D1D1D1D1D
+      1D1D1D1C1D1D1C1C1D1D1C1D1D1C1D1D1D1D1D1D1C1D1D1C1D1C1D1C1C1D1C1C
+      1C1C1C1C1C1B1C1C1C1D1C1C1D1C1C1C1C1C1C1C1C1C1C1B1B1C1C1B1B1C1B1B
+      1C191A1917171614141413141313131314131313131313131312121213121212
+      1211121212121111111111111111111011111010111011101010101010101010
+      1010101010101010100F10100F100F0F0F100F0F0F0F0F0F0E0F0E0E0F0E0E0E
+      0F0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0D0D0D0E0D0C0C0D0C0C0C0C0C0C
+      0B0C0C0B0C0B0B0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B0B090809090808090809
+      0A09090909090F0F0F2323232A2A2A3131313939393D3D3D1A1A1A0605050505
+      0505050405050405050504040504050405040404040404050404040404040404
+      0404040304040403030304030303030303030303030303020303020303030202
+      0302020202020302020202030202020202020201020202020201020202020101
+      0101010201020102010101010101010103030301010130303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303232323434343535353737373939393B3B3B3D3D3D3434342E2E2E2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F303838383A3A3A3A3A3A3A3A393A3A393A3A
+      393A39393A39393A39393A39393A39393A393939393939393939393939393939
+      3939393939393939393939393939393939393939393939393938393938393838
+      3636363030303030303030303030303130313130313737373A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A39393A
+      39393A39393A3939393939393939393939393939393939393939393939393939
+      3939393939393939393939383939383938383938383938383938383838383838
+      383838383938383B3B3A3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3C3C3B3C3B3B3B
+      3B3B3838383939393A3A3A3B3B3B3B3B3B3D3D3D3E3E3E3F3F3F414141424242
+      4444444646454848474A49494C4B4B4E4D4D5150505352525655555858585B5B
+      5B5F5E5E6160606464646767676A6A6A6E6E6E7272727575757A7A7A7D7D7D81
+      81818686868A8A8A8E8E8E9393939898989D9D9DA2A2A2A7A7A7ABABABB1B1B1
+      B6B6B66D6D6D5D5D5D5E5E5E5F5F5F5F5F5F5F5F5F5E5E5E5D5D5D5D5D5D5B5B
+      5B5A5A5A59595959595959595958585857575757575757575756565656565654
+      54545454545454545454545252525252525252525252525151515050504F4F4F
+      4F4F4F4F4F4F4E4E4E4D4D4D4C4C4C4C4C4C4C4C4C4B4B4B4A4A4A4949494A4A
+      4A49494948484848484847474747474747474746464645454545454545454544
+      44444444444242424242424242424242424040404040404040404040403F3F3F
+      3E3E3E3D3D3D3D3D3D3D3D3D3B3B3B3838383636363232322E2E2E2B29232128
+      490537FC0337FF0436FF0335FF0235FF0134FF0034FF0033FF152B8229251927
+      2727272727272727272727252525252525252525252525252525262626262626
+      2727272828282929292929292A2A2A2A2A2A2A2A2A2A2A2A2929292929292727
+      272727272727272626262626262626262626262727272828282828282929292A
+      2A2A2B2B2B2B2B2B2A2A2A2A2A2A2828282727272525252323232121211F1F1F
+      1D1D1D1D1D1D1C1C1C1B1B1B1919191919191919191919191717171717171717
+      171717171616161515151414141313131212121111111010100E0E0E0D0D0D0C
+      0C0C292929AFAFAFA9A9A9A3A3A39E9E9E9998989392928E8D8D898888838382
+      7F7F7E7979797474746F6F6F6C6C6C6767676262625F5F5F5A5B5B5657575353
+      534F4F4F4C4B4C4849494445454242423E3E3E3C3C3C3B3B3A37383735353533
+      33333131302F2F2E2D2D2C2B2B2A292928282728272627242425232323222122
+      21212020201F1E1E1D1C1B1B1C1B1B1919191919181918181818191918181818
+      181817181718181818171718171919191919191A191A1A1A1B1C1D1D1C1D1C1C
+      1C1C1C1B1C1C1C1B1C1C1B1C1C1C1C1C1C1C1C1C1C1C1C1C1C1C1C1B1B1B1B1B
+      1B1B1B1B1B1B1818181515151414131413131313121312121312121311121211
+      1112111112111111111111101111111111101111111011101010101010101010
+      101010100F100F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0E0E0E0E0F0F0F0F0E
+      0E0E0E0E0E0E0E0E0E0E0E0E0E0D0D0E0D0E0E0C0C0D0C0C0C0D0C0C0C0C0C0C
+      0C0B0B0C0C0C0C0C0B0B0B0B0B0B0B0B0A0A0A0909090809090908090A0A090B
+      0B0C1919192727272D2E2E3535343B3B3B383837050606050505050506050505
+      0505050404050505050504050404050405040404040404040404040404030404
+      0403030303040403030403040403030403030303030302030303030302030203
+      0302020303020203020202030202020202020202020202020202020202010201
+      0101020201020101010101020303050101013030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303232323434
+      343535353737373939393B3B3B3D3D3D3434342E2E2E2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F303838383A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A39
+      3A39393A39393A39393A39393A39393939393939393939393939393939393939
+      3939393939393939393939393939393939393939393839393839393839383831
+      31313030303030303030303030303130313232323A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A39393A39
+      393A39393A393939393939393939393939393939393939393939393939393939
+      3939393939393939393938393938393838393838393838393838383838383838
+      3838383938383B3A3A3B3B3B3B3B3B3B3B3B3B3B3B3C3C3C3C3C3B3D3C3C3C3C
+      3C3A3A3A3A3A3A3B3B3B3B3B3B3D3D3D3E3E3E3F3F3F41414142424244444446
+      46464848474A4A494C4B4B4E4D4D5150505352525554545858585B5B5B5F5E5E
+      6160606363636767676A6A6A6E6E6E7171717575757979797D7D7D8181818686
+      868A8A8A8E8E8E9393939898989D9D9DA1A1A1A7A7A7ABABABB0B0B0B6B6B574
+      74745E5E5E6060606060606161616161615F5F5F5D5D5D5D5D5D5C5C5C5B5B5B
+      5A5A5A5959595959595959595858585757575757575757575656565656565454
+      545454545454545454545252525252525252525252525151515050504F4F4F4F
+      4F4F4F4F4F4E4E4E4E4E4E4D4D4D4C4C4C4C4C4C4C4C4C4B4B4B4A4A4A4A4A4A
+      4A4A4A4949494848484747474747474747474646464545454545454545454444
+      444444444242424242424242424242424040404040404040404040403F3F3F3E
+      3E3E3D3D3D3D3D3D3B3B3B3939393636363232322F2F2F2A29262426300B34D5
+      0439FF0437FF0436FF0335FF0235FF0034FF0332F124293E2A29242A2A2A2B2B
+      2B2B2B2B2A2A2A2A2A2A2929292929292828282828282828282929292A2A2A2A
+      2A2A2A2A2A2A2A2A2B2B2B2A2A2A2A2A2A2A2A2A2A2A2A292929292929272727
+      2727272727272626262727272727272828282A2A2A2C2C2C2E2E2E2F2F2F3030
+      303131313131313030302F2F2F2D2D2D2A2A2A2828282525252222222020201E
+      1E1E1D1D1D1C1C1C1B1B1B191919191919191919191919171717171717171717
+      1717171616161515151313131313131111111010100E0E0E0D0D0D0C0C0C3534
+      34AFAFAEA9A8A9A3A3A39E9E9E9898989393928E8E8D8988888383837E7E7E79
+      797974747470706F6C6C6C6767676262625F5F5F5B5B5B5756575252524F4F4F
+      4C4C4C4949494544454242434040403D3C3D3A3B3A373837353535333333302F
+      302F2E2F2D2C2C2B2B2A2928282828272625252221211F1F1F1D1D1D1C1C1C1C
+      1B1B1A1A19191818181818171716161717161717161617161616161616161516
+      1615151515151515151516151515151515151415151514151515151716161818
+      181A1A1A1C1B1C1C1C1B1D1C1B1C1C1C1C1C1C1C1B1C1B1C1B1B1B1C1B1B1B1C
+      1B1B1C1B1B1C1B1B1A1918151515131312131312131212131212131212121111
+      1211111112121111111111111111111011111011111010101011101010101010
+      101010100F100F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0E0E0F0F0F0F0E0F0F0F
+      0F0F0E0E0E0D0E0E0D0E0E0D0D0E0D0D0D0D0C0C0C0D0C0C0C0C0B0C0C0C0B0B
+      0C0C0B0B0B0C0B0B0B0B0B0C0A09090909090909090808080A09090E0F0E2323
+      232929293030303939393D3D3C1E1E1E06050506060505050605050505050505
+      0405050504050404050404040504050404040504040404040404040404040304
+      0403030403040403040303030303030303030303030303020303020202020302
+      0203030202020302020202020202020202020102020102020102010202010101
+      0101010101010101030303020102303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030323232343434353535373737
+      3939393B3B3B3D3D3D3434342E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      303838383A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A
+      39393A39393A39393A3939393939393939393939393939393939393939393939
+      3939393939393939393939393939393939393939383939383938383635353030
+      303030303030303030303030303130313635353A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A39393A3939
+      3A39393A39393939393939393939393939393939393939393939393939393939
+      3939393939393939393839393839383839383839383839383838383838383838
+      38383838383A3A3A3B3B3B3B3B3B3B3B3B3C3C3C3C3C3C3D3D3C3D3C3C3E3D3D
+      3D3C3C3B3B3B3B3B3B3D3D3D3E3E3E3F3F3F4141414242424444444646464747
+      464A4A494C4B4B4E4D4D5150505352525554545858585B5A5A5E5D5D61606063
+      63636767676A6A6A6D6D6D7171717575757878787C7C7C8181818585858A8A8A
+      8E8E8E9292929797979C9C9CA0A0A0A6A6A6ABABABB0B0B0B6B6B67D7D7D6060
+      606161616161616262626262626060605F5F5F5D5D5D5D5D5D5B5B5B5B5B5B5A
+      5A5A595959595959595959585858575757575757575757565656565656545454
+      5454545454545454545252525252525252525252525151515050504F4F4F4F4F
+      4F4F4F4F4E4E4E4E4E4E4C4C4C4C4C4C4C4C4C4C4C4C4A4A4A4A4A4A4A4A4A4A
+      4A4A494949484848474747474747474747464646454545454545454545444444
+      4444444242424242424242424242424040404040404040404040403F3F3F3E3E
+      3E3D3D3D3C3C3C3939393636363333332F2F2F2B2B2B28251B1B29610539FE05
+      38FF0437FF0436FF0335FF0035FF0F30B22C2A222D2D2C2E2E2E2F2F2F2F2F2F
+      2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2B2B2B2B2B2B2B2B2B2C2C2C2C2C2C2C2C
+      2C2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2A2A2A2A2A2A29292929292928282827
+      27272727272626262727272929292B2B2B2D2D2D323232343434363636383838
+      3939393939393838383535353131312E2E2E2A2A2A2626262323232020201F1F
+      1F1D1D1D1C1C1C1A1A1A19191919191919191919191917171717171717171717
+      17171616161414141313131212121010100F0F0F0D0D0D0C0C0C424242AFAFAF
+      A9A8A8A3A3A39E9D9D9797979292928D8D8D8887878382827E7E7E7979797474
+      746F6F6F6B6B6B6767676262625E5E5E5A5A5A5757575352524F4F4F4B4B4B49
+      494846464643434340403F3D3D3D3A3B3B3738383535353232323030302F2F2E
+      2C2C2B2A292826262623232322212220201F1E1E1F1D1D1D1D1C1C1C1B1A1A1A
+      1919181819181917171717171717171717171717171616161616161616161616
+      1616151616161615151515151515151515141415141415141415141314141314
+      1313131415141817181A1A1A1C1C1C1C1C1C1C1C1C1B1C1C1B1B1C1B1B1B1B1B
+      1B1C1B1B1C1A1B1C1B1B1A1A1915161513131213121212111213121212121111
+      1211111111111111111111111011101011101010111110101110101010101010
+      0F0F1010100F0F1010100F0F0F0F0F0E0F0F0F0F0E0F0F0F0F0E0E0F0F0F0E0E
+      0E0E0F0E0E0E0E0E0D0D0D0D0E0D0C0C0D0D0D0D0C0C0C0C0C0C0C0C0B0B0C0C
+      0C0C0C0C0C0B0A0B0909090909090909090A0A090C0C0C1918182626262D2D2D
+      3434343B3B3B3B3B3B0A0A0A0506060606050505050605050505050505050405
+      0505050504050405050504050505040504040404040404040304040404040404
+      0303030303040303040303040303030303030303030303030202020202030303
+      0202020303020202030202030202020202020202020202020202010202010101
+      0101010203030301010130303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303232323434343535353737373939393B3B3B3D
+      3D3D3434342E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F303838383A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39
+      393A39393A39393A393939393939393939393939393939393939393939393939
+      3939393939393939393939393939393938393938393838393838313131303030
+      3030303030303030303030303131313A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A39393A39393A
+      39393A3939393939393939393939393939393939393939393939393939393939
+      3939393939393939383939383938383938383938383938383838383838383838
+      383838383A3A393B3B3B3B3B3B3C3C3C3C3C3C3D3D3D3D3D3C3E3D3D3E3D3D3F
+      3F3F3C3C3C3D3D3D3E3E3E3F3F3F4040404242424444444646464747464A4A49
+      4C4B4B4E4D4D5150505352525554545857575B5A5A5E5D5D6160606362626666
+      666A6A6A6D6D6D7171717575757878787C7C7C8080808585858989898D8D8D92
+      92929696969B9B9BA0A0A0A5A5A5ABABABAFAFAFB5B5B5868686626262626262
+      6363636363636262626161616060605D5D5D5D5D5D5C5C5C5C5C5C5B5B5B5A5A
+      5A59595959595959595958585857575757575757575756565656565654545454
+      54545454545454545252525252525252525252525151515050504F4F4F4F4F4F
+      4F4F4F4E4E4E4E4E4E4C4C4C4C4C4C4C4C4C4C4C4C4A4A4A4A4A4A4A4A4A4A4A
+      4A49494948484847474747474747474746464645454545454545454544444444
+      44444242424242424242424242424040404040404040404040403F3F3F3D3D3D
+      3C3C3C3A3A3A3838383333333030302B2B2B27272624231C0F31B5043AFF0538
+      FF0437FF0336FF0235FF202E6A312E2031313133333333333334343434343432
+      32323030303030302E2E2E2D2D2D2E2E2E2E2E2E2D2D2D2D2D2D2D2D2D2D2D2D
+      2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A2929292929292828282727272727
+      272626262727272828282C2C2C2F2F2F3333333838383C3C3C3E3E3E40404040
+      40404040403D3D3D3939393535353030302C2C2C2727272323232020201F1F1F
+      1D1D1D1C1C1C1B1B1B1919191919191919191919191717171717171717171616
+      161515151414141212121010100F0F0F0E0E0E0C0C0C525252AEAEADA8A8A7A3
+      A3A29D9C9C9796969291918D8B8C8786868281817D7D7D7979797373736F6F6F
+      6B6B6B6666666262625E5E5E5A5A5A5656565252514F4F504C4C4C4949494545
+      4543424341403F3D3D3C3B3B3B3738383535363131312E2E2E2C2B2B28292926
+      26262625252323232222221F201F1F1E1E1D1D1D1D1D1D1C1B1B1B1A1A1A1919
+      1918181817171717171716171716161616171616171616161616161616161515
+      1616161615161516151515151515151515151414141415141514141414131413
+      13131213121213121413141616161A1A1A1C1C1C1C1C1C1C1C1B1B1C1B1B1B1B
+      1C1B1B1C1B1A1B1B1A1B1B1B191A1A1515151312121312111212121211111211
+      121211111112111111101111111110101010111010101010101010100F100F10
+      0F100F10100F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0E0E0E0E0E0F0E0E0E0F0E0E
+      0E0E0E0E0D0E0E0D0D0D0C0D0E0C0D0C0C0C0C0D0C0C0C0C0B0B0C0C0C0C0C0B
+      0C0A090909090909090A0909090A0A0A0E0E0D2221222929293030303838383D
+      3D3D232323050606050506050606050606060506060505050505050505050505
+      0505050404040405050404040504040404040404040404040404040404030303
+      0403030403030403030403030303030303030302030302030303030202020202
+      0203030203020302020202020202020202020102010201020202010101010101
+      0503050102013030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303232323434343535353737373939393B3B3B3D3D3D3434342E2E
+      2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F303838383A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A3939
+      3A39393A39393939393939393939393939393939393939393939393939393939
+      3939393939393939393939393839393839393839383835353530303030303030
+      30303030303030303030303635353B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A39393A39393A39
+      393A393939393939393939393939393939393939393939393939393939393939
+      3939393939393938393938393838393838393838393838383838383838383838
+      3838383939393B3B3B3C3C3C3C3C3C3D3D3D3D3D3D3E3E3D3E3D3D403F3F3F3F
+      3F4040403F3F3F3F3F3F4040404242424444444646464747474A4A494C4C4B4E
+      4D4D5150505352525554545857575B5A5A5D5C5C6160606362626666666A6A6A
+      6D6D6D7171717575757878787C7C7C8080808484848888888D8D8D9292929696
+      969B9B9BA0A0A0A4A4A4AAAAAAAFAFAFB4B4B48F909063636364646464646463
+      63636363636262626060605F5F5F5D5D5D5C5C5C5C5C5C5C5C5C5B5B5B5A5A5A
+      5959595959595959595858585757575757575757575656565656565454545454
+      545454545454545252525252525252525252525151515050504F4F4F4F4F4F4F
+      4F4F4E4E4E4E4E4E4C4C4C4C4C4C4C4C4C4C4C4C4A4A4A4A4A4A4A4A4A4A4A4A
+      4949494848484747474747474747474646464545454545454545454444444343
+      434242424242424242424242424040404040404040403F3F3F3E3E3E3D3D3D3B
+      3B3B3838383636363131312D2D2D29292926251D1F26450838F30539FF0538FF
+      0437FF0236FF16329F32322F36352E3A3A3A3F3F3F4141413F3F3F3C3C3C3939
+      393434343232323030303030302F2F2F2E2E2E2E2E2E2E2E2E2E2E2E2D2D2D2C
+      2C2C2C2C2C2C2C2C2B2B2B2A2A2A292929282828282828272727262626262626
+      2626262626262A2A2A2F2F2F3434333B3A3841413E4545424848464848484747
+      484545454141413C3C3C3737373232322C2C2C2727272323232020201E1E1E1D
+      1D1D1C1C1C1A1A1A191919191919191919191919171717171717161616151515
+      1414141212121010100F0F0F0E0E0E0C0C0C646464ADADADA7A7A7A2A2A19C9B
+      9B9797969291918D8C8C8787868281817D7C7C7878787373736F6F6F6A696A66
+      66666262625D5E5D5A5A5A56565553525250504F4B4C4B494949454545434243
+      413F3F3E3D3C3B3A3A3736353233332F2F2E2D2D2D2B2B2B2928292626262525
+      2623232422222220201F1F1F1F1D1E1E1E1D1D1C1C1C1B1A1A1A19191A191918
+      1817181817171717171717171616171616161616161617161616161616151616
+      1516151615151515151515151514151515151515151414141413141413141313
+      131212131212131212121312121313131718181B1B1A1B1C1B1B1B1C1C1B1B1C
+      1B1B1B1B1B1C1B1A1B1B1B1B1B1B1A191A141313121212121112111212111111
+      111111111111111111111010111110111011101010101010101010101010100F
+      0F10100F0F10100F0F0F0F0F0F0F0F0F0F0F0E0E0F0E0F0F0E0E0E0F0E0E0E0E
+      0E0E0E0D0E0E0D0D0D0C0D0D0D0C0C0C0D0C0C0C0C0C0C0C0C0C0B0B0B0A0A09
+      0A0A090909090A0A0A0C0C0C1919192626262D2D2D3434343A3A3A3A3A3A0A0A
+      0A06060606060606060606060505050606050605060505050505050505040504
+      0504040504050405050404040404050404040404040404040404040404040404
+      0404040403040403030303030303030303030303030302020303020303030302
+      0302020202020202020202020202020202010202020102010102010203030501
+      0102303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303032
+      32323434343535353737373939393B3B3B3D3D3D3434342E2E2E2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F303838383A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393939393939393939383939383938383938383131313030303030303030
+      303030303030303030303939393B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A39393A39393A3939
+      3A39393939393939393939393939393939393939393939393939393939393939
+      3939393939393839393839383839383839383839383838383838383838383838
+      38383939383C3C3B3C3C3C3D3D3D3D3D3D3E3E3E3E3E3D403F3F403F3F404040
+      4242424241414141414242424343434545454747474A4A494C4C4B4D4D4D504F
+      4F5251515554545857575A59595D5C5C605F5F6362626666666A6A6A6C6C6C70
+      70707474747878787C7C7C8080808383838888888D8D8D9191919595959A9A9A
+      9F9F9FA4A4A4A9A9A9AEAEAEB3B3B39A9A9A6464646565656666666666666565
+      656262626262626060605E5E5E5D5D5D5C5C5C5C5C5C5C5C5C5B5B5B5A5A5A59
+      5959595959595959585858575757575757575757565656565656545454545454
+      5454545454545252525252525252525252525151515050504F4F4F4F4F4F4F4F
+      4F4E4E4E4E4E4E4C4C4C4C4C4C4C4C4C4C4C4C4A4A4A4A4A4A4A4A4A4A4A4A49
+      4949484848474747474747474747464646454545454545454545454545444444
+      4444444343434343434242424242424141414040404040403E3E3E3B3B3B3939
+      393737373333332F2F2F2A2A2A272727262418152E95053AFF0638FF0538FF04
+      37FF0137FF1234BD38394447443C4A4A4A4C4C4C4A4A4A4646464141413C3C3C
+      3838383434343131313030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C
+      2C2C2C2C2B2B2B2A2A2A29292929292927272727272726262625252525252525
+      25252726232E2C2133332E39393E3F404646474C4E4D4A53514651504B4D4D4C
+      4949494444443E3E3E3737373131312B2B2B2626262222221F1F1F1D1D1D1D1D
+      1D1B1B1B1A1A1A19191919191919191919191918181817171716161615151513
+      13131111110F0F0F0E0E0E0D0D0D757575ACACACA6A6A6A1A1A19C9B9C969695
+      9190908C8B8B8786868281827D7D7C7777777373736E6E6F6A6A6A6666666262
+      625D5C5D5B5B5B5656565353534F4F4F4B4B4C4848484545454343433E3F3E3B
+      3A3A3636363535353131322F2F2E2D2C2C2A2A2A282929262626262626232423
+      2121212020201F1F1F1D1D1E1E1E1D1C1C1C1B1B1B1A19191919191818171917
+      1818171817171717171717171716161616161616161616161616161616151515
+      1516151516151515151515151515141515141414151414141314141313131313
+      1313131213121212121212121212121212121616151B1B1A1B1C1C1B1C1C1C1B
+      1B1C1A1B1C1B1B1B1C1B1C1B1B1C1B1B17171712121111121212121211111112
+      11111111111111111111101111111110101110111010101010100F1010100F10
+      0F0F0F0F0F0F100F0F0F0F0F0F0F0F0F0F0E0E0E0E0F0E0F0E0F0E0E0E0E0E0D
+      0E0E0D0D0E0C0D0D0D0C0C0D0D0C0C0D0C0C0D0C0C0C0A0A0A0A090A090A0909
+      09090B0B0A0E0F0E2121212828283030303737373D3D3D2A2A2A060706060606
+      0606060606060506060606050506050506060505050505050505050505050505
+      0505050504050404050405050504040404040404040304040404040304040403
+      0304040303030304030403030303020303020302030302020202020302020203
+      0302020202020202020202020102020101020202010202010303030201013030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303232323434343535
+      353737373939393B3B3B3D3D3D3434342E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F303838383A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A39
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393939393938393938393938393838363636303030303030303030303030
+      3030303030303433343B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A39393A39393A39393A
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393939383939383938383938383938383938383838383838383838383838
+      383939393B3B3B3D3D3D3D3D3D3E3E3E3E3E3E40403F403F3F41404042424242
+      42424444444545454444444545454747474A4A494B4B4A4D4D4D504F4F525151
+      5454545857575A59595C5B5B5F5F5F6362626665656969696C6C6C7070707373
+      737777777B7B7B7F7F7F8383838787878C8C8C9090909595959999999E9E9EA4
+      A4A4A8A8A8AEAEAEB2B2B2A5A5A5666666676767676767676767666666646464
+      6363636161615F5F5F5E5E5E5C5C5C5C5C5C5C5C5C5C5C5C5B5B5B5A5A5A5959
+      5959595959595958585857575757575757575756565656565654545454545454
+      54545454545252525252525252525252525151515050504F4F4F4F4F4F4F4F4F
+      4E4E4E4E4E4E4C4C4C4C4C4C4C4C4C4C4C4C4A4A4A4A4A4A4A4A4A4A4A4A4949
+      4948484847474747474747474746464646464646464646464645454545454544
+      44444444444444444343434242424242424141413F3F3F3E3E3E3B3B3B383838
+      3535353030302D2D2D29292A2726212327320B37E1053AFF0639FF0538FF0437
+      FF0036FF0F37D93F46605350445251515050504C4C4C4747474141413B3B3B38
+      38383434343232323030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C
+      2B2B2B2A2A2A29292928282827272726262625252525252525252327251B2325
+      301827721028A80B28C30B28C60C29C41930B12D3C904A4E6257554B50504D4A
+      4A4B4444443D3D3D3636362F2F2F2A2A2A2525252121211E1E1E1D1D1D1C1C1C
+      1B1B1B1B1B1B1919191919191919191919191717171616161515151313131111
+      110F0F0F0E0E0E0F0F0F8C8C8BACACABA6A6A6A0A0A09B9B9B9695959090908B
+      8A8A8685858181817C7C7C7777777272726D6D6D6969696565656261615D5D5D
+      5A5A5A5555555353534F4E4F4B4A4A4848494645454140403C3C3C3A393A3636
+      363434343232322F2F2F2D2D2D2A2B2A28282826262624252524242421212120
+      20201F1F1F1E1E1E1E1D1E1D1C1D1B1B1B1A1A1A1A1919191817191817181817
+      1817171717171716171717171716161716161616161616161616151516161616
+      1615151515151515151515151515141415151514141514131414131413131313
+      13121313131212131212121212121212121111121414151919191B1C1B1C1B1B
+      1C1A1B1C1B1B1C1B1B1B1C1C1B1B1B1A1A1A1514141112121211121111111211
+      1111111111101110101110111110111010111111101010100F10100F100F1010
+      10100F0F0F0F0F0F0F0F0F0F0F0F0F0E0F0F0F0F0E0E0E0E0E0E0E0E0E0E0D0E
+      0E0D0D0E0D0D0D0C0C0D0C0C0C0D0D0D0B0C0A0A0A0A090A0A0A0A0B0A0B0C0B
+      0B1616172526252B2B2B3333333939393E3E3E0E0D0D06060607060606060606
+      0606060506060606050606050605050506050505060506050504050505040504
+      0405050405050405040404050404040404040404040404040404030403040304
+      0403040403030303030303030303020303030303030202030303030202020302
+      0302020302020202020202020102020202010201050505020202303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030323232343434353535373737393939
+      3B3B3B3D3D3D3434342E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F303838
+      383A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A3939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393839393839393839383839383832323230303030303030303030303030
+      30303030303737373B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A39393A39393A39393A39
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393938393938393838393838393838393838383838383838383838393939
+      3939393B3B3B3D3D3D3E3E3E3E3E3E40404040403F4140404342424242424444
+      444545454747474949484949494A49494B4B4A4D4D4C4F4E4E51505054545457
+      56565A59595C5B5B5F5F5F6262626665656868686C6C6C6F6F6F737373767676
+      7A7A7A7F7F7F8383838787878A8A8A8F8F8F9494949999999D9D9DA2A2A2A8A8
+      A8ADADADB2B2B2B0B0B06B6B6B68686868686868686867676765656563636361
+      61615F5F5F5E5E5E5D5D5D5C5C5C5C5C5C5C5C5C5C5C5C5B5B5B5A5A5A595959
+      5959595959595858585757575757575757575656565656565454545454545454
+      545454545252525252525252525252525151515050504F4F4F4F4F4F4F4F4F4E
+      4E4E4E4E4E4C4C4C4C4C4C4C4C4C4C4C4C4A4A4A4A4A4A4A4A4A4A4A4A494949
+      4848484747474747474848484747474646464646464747474747474747474747
+      474747474747474646464444444343434141413F3F3F3D3D3D39393936363633
+      33332F2F2F2B2B2B2828282825191B2D76063BFF0639FF0639FF0538FF0437FF
+      0035FF0B37E83C48795653465151504D4D4D4848484141413C3C3C3939393535
+      353333333232323131313030302F2F2F2F2F2F2E2E2E2E2E2E2C2C2C2B2B2B2A
+      2A2A29292928282826262625252523242424231F24231D16256E0526CD0025EE
+      0023EC0023E70023E50022E40020E5001FE50725D42C3B9652535450504A4949
+      494242423A3A3A3232322C2C2C2727272323232020201D1D1D1D1D1D1C1C1C1B
+      1B1B1B1B1B191919191919191919181818161616151515131313121212101010
+      0E0E0E151515A1A1A1ACACABA6A5A5A09F9F9A9999959494908F8F8A89898584
+      84807F7F7B7B7B7777777272726D6D6D6868686666656161615D5D5D59595856
+      55555252524F4F4F4A4A4A4747474342423F403F3B3B3C383938353535353434
+      3131312F2F2E2C2D2C2A2A2A2828282626262525252424232221222020201F1F
+      1F1E1E1E1E1D1E1D1D1D1B1B1C1A1A1B1A1A1A19181819181718181819171718
+      1717171717171717171717161617171616161616161616161616161616161516
+      1615151515151515151515151414141414151514141414141413141313131313
+      121212131212121212121212121212111212111112111515151A1A1A1C1B1B1C
+      1B1B1B1B1B1B1C1B1B1B1B1B1B1B1B1B1B161717111112121112111212111112
+      1211111111111110111110111010101011101010101010101010101010100F0F
+      10100F100F0F0F0F0F0F0F0E0F0F0E0F0E0F0E0F0E0E0E0E0E0E0D0E0E0D0D0E
+      0C0D0D0D0D0D0D0C0C0C0C0B0A0B0B0A0A0A0A0A0A0A0A0B0A0B0D0D0D1F1E1E
+      2727272E2E2E3535353B3B3B2929290707070706060606070706060606060606
+      0606060606060606060505050605050505060505050505050505050505050405
+      0505040505040404050504040404040404040404040404040304030303040303
+      0303030403030303030303030203030302030303020303020302030303030203
+      0202020202030202020102020102020203050301020230303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303232323434343535353737373939393B3B3B3D3D3D34
+      34342E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F303838383B3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A393A3A393A3A393A39393A39393A39393A39393A393939393939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939383939383938383938383736363030303030303030303030303030303030
+      303232323A3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A39393A39393A39393A3939
+      3939393939393939393939393939393939393939393939393939393939393939
+      393939383939383938383938383938383938383838383838383939393939393A
+      3A3A3A3A3A3D3C3C3E3E3E404040404040414140434242434242444444454545
+      4747474949494B4B4B4C4C4C4D4D4D4E4E4E5050505151515453535655555958
+      585C5B5B5F5E5E6261616665656867676B6B6B6E6E6E7272727575757A7A7A7E
+      7E7E8282828686868A8A8A8F8F8F9393939898989D9D9DA2A2A2A7A7A7ACACAC
+      B2B2B2B5B5B57777776969696969696969696868686666666464646262626161
+      615F5F5F5E5E5E5E5E5E5C5C5C5C5C5C5C5C5C5C5C5C5B5B5B5A5A5A59595959
+      5959595959585858575757575757575757565656565656545454545454545454
+      5454545252525252525252525252525151515050504F4F4F4F4F4F4F4F4F4E4E
+      4E4E4E4E4C4C4C4C4C4C4C4C4C4C4C4C4A4A4A4A4A4A4A4A4A4A4A4A49494948
+      48484747474848484848484747474848484949494A4A4A4A4A4A4B4B4B4B4B4B
+      4A4A4A4A4A4A4949494747474444444242423E3E3E3C3C3C3939393535353131
+      312D2D2D2A2A2A2827252726251036CB063BFF0639FF0639FF0538FF0437FF00
+      36FF0435F7314390504E444B4B494747474242423C3C3C393939363636343434
+      3333333131313030303030302F2F2F2F2F2F2E2E2E2D2D2D2C2C2C2A2A2A2929
+      2927272725252523232423221F2222210E25960027EF0026EC0026E50025E300
+      24E20024E20024E10023DF0022DE0021E0001EE51930B34C4E574D4C47444445
+      3C3C3C3535352E2E2E2929292424242121211F1F1F1D1D1D1C1C1C1C1C1C1B1B
+      1B1B1B1B1A1A1A1919191818181717171515151313131212121010100E0E0E2B
+      2B2BADADADAAAAAAA4A4A39F9E9E9A99999594948F8E8E89898985848480807F
+      7B7A7A7676767272726D6D6D6767676564646060605D5C5C5858585655555250
+      504D4D4D4949494544454241413F3E3F3C3C3C3939393635353333333131312F
+      2F2F2D2D2D2B2B2B2828292626262425252424242222222121201F201F1E1E1E
+      1E1E1D1D1D1D1B1C1B1A1B1A1A1A1A1919191918181918181818181817171817
+      1717171717171617171616161616161617161616161616161616161616151615
+      1615151515151515141515151515151414141414151314131314131313131212
+      1213121213131212121212121112121212121211121111111615151B1A1B1C1B
+      1B1C1B1A1C1B1B1C1B1B1B1B1B1B1B1B19191914131312111111121112121111
+      111111111111111011101011101010101010101010101010101010100F10100F
+      0F0F0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0E0E0F0E0D0E0E0D0E0E0D0D0D0D
+      0D0D0C0C0C0C0D0A0A0B0A0A0B0A0A0A0A090A0A0A0B14141423222328292830
+      2F303636363B3B3B0E0E0E070706060706070707060707060706060606060606
+      0605060605050605050505050606050605050505050505050505040504050405
+      0404040504050405040404040404040404040304030403030303040303030304
+      0303030403030304030203030302030203030302030203030303020202020202
+      0202020202020202020202010505050102023030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303232323434343535353737373939393B3B3B3D3D3D3434342E2E2E2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F302F303838383B3A3A3B3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A39
+      3A3A393A3A393A3A393A39393A39393A39393A39393A39393939393939393939
+      3939393939393939393939393939393939393939393939393939393939393839
+      3938393938393838393838333333303030303030303030303030303030303030
+      3535353B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A39393A39393A39393A393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939383939383938383938383938383938383838383939393939393A3A3A3A3A
+      3A3B3B3B3B3B3B3E3E3E40404041414143434243424245444445454546464649
+      49494A4A4A4C4C4C4E4E4E4F4F4F5252515453535555555858585A59595C5B5B
+      5F5F5F6160606564646867676A6A6A6E6E6E7171717575757979797D7D7D8181
+      818686868A8A8A8F8E8E9393939898989D9D9DA2A1A1A7A7A7ABABABB1B1B1B6
+      B6B68686866B6B6B6B6B6B6B6B6B696969676767656565626262616161606060
+      5F5F5F5E5E5E5E5E5E5C5C5C5C5C5C5C5C5C5C5C5C5B5B5B5A5A5A5959595959
+      5959595958585857575757575757575756565655555554545454545454545454
+      54545252525252525252525151515151515050504F4F4F4F4F4F4F4F4F4E4E4E
+      4E4E4E4C4C4C4C4C4C4C4C4C4C4C4C4A4A4A4A4A4A4A4A4A4A4A4A4949494848
+      484848484848484848484A4A4A4B4B4B4C4C4C4E4E4E4F4F4F50505050505050
+      50504F4F4F4D4D4D4A4A4A4646464242423E3E3E3B3B3B3737373232322E2E2E
+      2B2B2B29282928251C202B58083AF9073AFF0639FF0639FF0538FF0437FF0236
+      FF0034FF243DA44545464343423F3F3F3B3B3B38383835353534343433333332
+      32323030303030303030302F2F2F2E2E2E2D2D2D2C2C2C2A2A2A282828262626
+      2424242222212221190E258F0028F60027E90027E60026E60026E50025E30024
+      E20024E20024E10023DF0023DE0022DE001EE6182FAF4A49494544423E3E3E36
+      36362F2F2F2A2A2A2626262222222020201E1E1E1C1C1C1C1C1C1C1C1C1B1B1B
+      1B1B1B1919191818181717171616161414141212121010100E0E0E484848AEAE
+      AEA9A9A9A3A3A39E9E9E9898989392928E8D8D8888888383837F7E7F7B7B7A75
+      75757171716C6C6C6768686363636060605C5B5B5958585555554F4F4F4C4C4B
+      4949484444444342423E3E3E3C3B3B3838383535353333333030302E2E2E2D2D
+      2D2A2A2A2929282726272525252424242122222020201E1F1E1E1F1E1E1E1E1D
+      1D1D1B1B1C1B1A1A1A1A1B191919191919191818191818181818181717181718
+      1716171716171717161716171617161616171616161616161615161515151515
+      1515151515151514151415151414141414141414131414131413121313131312
+      13121312131212121212121212111211111112111111111211121817171B1B1A
+      1C1B1B1B1C1B1B1C1B1B1B1C1B1B1B1A1A1A1515151112121111121111111111
+      111011111111111110111011111010111010101010100F1010101010100F0F0F
+      10100F0F0F0F0F0F0F0F0F0F0F0F0E0E0E0E0E0E0E0E0E0E0D0D0E0D0D0D0D0D
+      0B0B0C0A0A0A0B0A0B0A0B0A0A0A0A0B0B0B1D1D1D2322232928282F2F2F3536
+      3529292A07070706070706060707070607070707070606070606060606060606
+      0605050605050605060506050505050506050505050505040405040504040505
+      0504040404040404040504040404040404040304040304040403040303040303
+      0303040403030303030303030203030203020203020303030202020202020202
+      0302020202020202050505020202303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303032323234
+      34343535353737373939393B3B3B3D3D3D3434342E2E2E2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F302F303838383B3A3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A
+      3A393A3A393A39393A39393A39393A39393A3939393939393939393939393939
+      3939393939393939393939393939393939393939393939393939383939383939
+      3839383839383838383831303130303030303030303030303030303030303038
+      38383B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A39393A39393A39393A39393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      39383939383938383938383938383938383939393939393A3A3A3A3A3A3B3B3B
+      3B3B3B3C3C3C3D3D3D4040404242424343424544444645454646464949494A4A
+      4A4C4C4C4D4D4D4F4F4F5252515454535655555958585B5B5B5D5D5D60606063
+      63636666666969696C6C6C7070707373737777767A7A7A7E7E7E828282868686
+      8A8A8A8F8F8F9393939898979C9C9CA1A1A1A6A5A5ABABABB0B0B0B6B6B69595
+      956C6C6C6C6C6C6C6C6C6B6B6B6969696666666363636161616161615F5F5F5E
+      5E5E5E5E5E5E5E5E5C5C5C5C5C5C5C5C5C5C5C5C5B5B5B5A5A5A595959595959
+      5959595858585757575757575757575757575656565555555555555555555454
+      545454545353535252525252525151515050505050504F4F4F4F4F4F4E4E4E4E
+      4E4E4C4C4C4C4C4C4C4C4C4C4C4C4B4B4B4A4A4A4A4A4A494949484848484848
+      4848484949494A4A4A4C4C4C4E4E4E5151515454545555555757575656565656
+      565454545151514D4D4D4747474141413C3C3C3939393535353030302C2C2C29
+      29292727262724181334B2063CFF073AFF0639FF0639FF0538FF0437FF0236FF
+      0234FF333B5B3F3D383B3B3B3939393737373535353434343434343333333131
+      313030303030303030302E2E2E2D2D2D2B2B2B2A2A2A27272725252523232322
+      201616235C0029F10028EC0028E80027E70027E70026E60026E50025E30024E2
+      0024E20024E10023DF0023DE0022DE001FE52735874543393C3C3C3636363030
+      302A2A2A2626262323232121211F1F1F1D1D1D1C1C1C1C1C1C1C1C1C1B1B1B1A
+      1A1A1919191717171616161414141111111010100E0E0E676767AEAEAEA9A9A8
+      A3A2A29D9C9C9797979292928D8D8D8887878282827D7D7D7878787474747070
+      706C6C6C6767676362635F60605B5B5B5656565352534F4F4F4B4B4B49484745
+      45444241403F3D3D3C3B3C3938383535353333333131312E2F2F2D2D2D2A2A2A
+      2827282626272625262323232222222121211E1E1F1E1E1E1E1E1F1D1D1D1B1C
+      1C1B1B1B1B1A1A191A1919191919191919181819181818181819171718171717
+      1717171617171717171617161716161616161616161516161515151615151515
+      1515151515151515141415141415141414151413141413141313131313131213
+      121212121212121212121212121211121212111111121111111313131A1A1A1C
+      1B1B1B1C1B1B1B1B1C1B1B1B1B1B1B1A1B161617111212111111111111111111
+      10111011111011101011111010101010101010101010100F0F10100F10100F10
+      0F0F0F0F0F0F0F0F0F0F0E0F0E0F0E0F0E0D0E0F0D0E0E0D0E0D0D0D0B0B0B0B
+      0B0A0A0B0A0A0A0B0A0A0B0F0F0F1F1F1F2322232928292E2E2E333433131313
+      0807070707070707070706070706070606060607060706070606060506060606
+      0605060506060606050505050505050605050505050505050504050405040405
+      0505040404040404040404040404040404040304040304040303040403040303
+      0303030303030303030203030303030303030302030203020202030302030202
+      0202020205050502020230303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303232323434343535353737
+      373939393B3B3B3D3D3D3434342E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F30
+      2F303838383B3B3A3B3A3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A
+      393A39393A39393A39393A39393A39393A393939393939393939393939393939
+      3939393939393939393939393939393939393939393939393938393938393838
+      3938383938383535353030303030303030303030303030303030303232323A3A
+      3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A39393A39393A39393A3939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      383939383938383938383938383A39393939393A3A3A3A3A3A3B3B3B3B3B3B3C
+      3C3C3D3D3D3D3D3D3F3F3F4141414444444645454746464848484949494B4B4B
+      4D4D4D4F4F4F5252525454535656555958585B5A5A5D5D5D5F5F5F6363636666
+      666969696C6C6C70706F7373737676767A7A7A7E7E7E8181818585858A8A8A8E
+      8E8E9292929797979C9C9BA0A0A0A5A4A4AAAAAAAFAFAFB4B4B4A4A4A46D6D6D
+      6E6E6E6D6D6D6C6C6C6B6B6B6868686565656363636161616060605F5F5F5F5F
+      5F5E5E5E5E5E5E5C5C5C5C5C5C5C5C5C5C5C5C5B5B5B5A5A5A59595959595959
+      5959585858585858585858585858575757575757565656565656565656555555
+      5454545353535454545353535252525151515050505050504F4F4F4E4E4E4E4E
+      4E4C4C4C4C4C4C4C4C4C4B4B4B4A4A4A49494949494948484848484847474748
+      48484A4A4A4D4D4D5151515454545858585C5C5C5E5E5E5E5E5E5E5E5E5C5C5C
+      5959595454544E4E4E4646463F3F3F3B3B3B3636363232322D2D2D2929292826
+      1E2228400E39E0083CFF083BFF073AFF0639FF0639FF0538FF0337FF0736F033
+      3542373733373737363636353535353535343434343434333333323232323232
+      3131313030302F2F2F2D2D2D2B2B2B29292926262624242422211F1F1F1F0627
+      C0002AF50029EA0028EA0028E90027E70027E70026E60026E50025E30024E200
+      24E20024E10023DF0023DE0021E20624CC373A463838343333332F2F2F2A2A2A
+      2626262323232121211F1F1F1E1E1E1D1D1D1C1C1C1C1C1C1C1C1C1A1A1A1919
+      191717171616161414141212121010100F0F0F858585ADADADA7A7A6A2A2A19C
+      9B9B9696969191918C8C8C8787878182817D7D7D7877787473746F6F6F6B6B6B
+      6666666363635F5E5F5A5A5A5555565252524F4F4E4B4A4B4948484444434142
+      413F3E3D3C3B3B393838363535333333302F302E2E2E2C2C2C2A2A2A28282827
+      27272525252323232121212121211F1F1F1E1E1E1F1F1E1C1C1C1C1C1C1B1B1B
+      1B1B1B19191A1919191919191919181918181918181818181817181817181717
+      1717171717171616161717161616161616161616161615161615151515151515
+      1515151515151415141415141415141414141314141314131313131212121312
+      1312121212121212121212121112121111111111111111111111111717181C1B
+      1B1C1B1B1B1C1C1B1B1B1B1B1B1B1B1B18181713131211111111111111111111
+      11111110111110111010101010111010101010100F100F100F0F100F100F100F
+      0F0F100F0F0F0F0E0F0E0E0F0E0E0F0E0D0E0E0D0D0C0C0C0B0B0B0B0B0B0B0B
+      0A0B0B0B0A0A0B1615151F201F2222222627272C2C2C30303116151508070708
+      0707070707060707060706060706060707060606070606060606060606060605
+      0606050605050606050505050505060505050505050505050505040405040504
+      0404050404040404040504040404040403030304030404040303030403030303
+      0303030303030303030303030203030202030202020202020203030202030202
+      0505050202023030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303232323434343535353737373939393B3B3B
+      3D3D3D3434342E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F302F303938383B3B
+      3B3B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A39
+      3A39393A39393A39393A39393A39393939393939393939393939393939393939
+      3939393939393939393939393939393939393939393839393839393839383839
+      38383938383232323030303030303030303030303030303030303433343B3B3A
+      3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A393A3A393A3A393A39393A39393A39393A393939393939
+      3939393939393939393939393939393939393939393939393939393939393938
+      3939383938383938383A39393A39393939393A3A3A3A3A3A3B3B3B3C3C3C3D3D
+      3D3D3D3D3F3F3F4040404141414444434646454948484949494B4B4B4D4D4D4F
+      4F4F5151515353535656555959585B5A5A5D5C5C5F5F5F626262666666686868
+      6C6C6C6F6F6F7272717676757A79797D7D7D8181818484848888888D8D8D9191
+      919595959A9A9A9F9F9EA3A3A3A9A8A8AEAEAEB3B3B3B1B1B17373736F6F6F6E
+      6E6E6E6E6E6C6C6C6969696666666464646262626161615F5F5F5F5F5F5F5F5F
+      5E5E5E5E5E5E5C5C5C5C5C5C5C5C5C5C5C5C5B5B5B5A5A5A5959595959595959
+      5959595958585858585858585858585858585858585858585858585858585856
+      56565656565555555454545252525151515050505050504F4F4F4E4E4E4E4E4E
+      4D4D4D4C4C4C4B4B4B4A4A4A4949494848484848484747474646464646464848
+      484B4B4B5151515756515F5C5162615A6464636666666666666464646161615C
+      5C5C5555554C4C4C4242423D3D3D3838383333332E2E2E2B292325282F1039D0
+      093EFF093BFF093BFF083BFF073AFF0639FF0639FF0438FF0C36DD3333393534
+      3135353535353535353535353534343434343433333332323232323232323230
+      30302F2F2F2D2D2D2B2B2B29292926262623232321201817214D002AEF002AEF
+      0029EC0029EA0028EA0028E90027E70027E70026E60026E50025E30024E20024
+      E20024E10023DF0022DF0021E4202C713432272E2E2E2B2B2B29292925252523
+      23232121212020201F1F1F1E1E1E1D1D1D1C1C1C1C1C1C1B1B1B1A1A1A181818
+      161616131313121212101010191919A2A2A2ACACACA6A6A6A0A0A09A9A9A9595
+      959090908B8A8A8585858181817C7C7C7777777373736E6E6E6A6A6A66666661
+      61615D5D5D5959595555555252524D4E4E4A4A494747484444444141413E3E3D
+      3C3B3B3937373635353433333030302E2E2E2C2C2C2A2A2A2828282727272525
+      252323242221212020201F1F1F1F1E1E1D1E1D1D1D1C1C1B1B1B1B1B1B1B1B19
+      1A1A191A1919191A191919191919181818191817191818181718181717171717
+      1716171617161616161616161616161516161615151616151516151615161515
+      1514151514151514141414151514141414131414131413131312131312121212
+      12121212121212121111121111111111121111111111111111111515151B1B1A
+      1C1B1B1B1C1B1B1B1B1B1B1B1B1B1B1918191312121111121211111011111110
+      1010111111101010101110111010101010101010100F0F100F0F1010100F0F10
+      0F0F0F0F0F0F0E0E0F0E0E0F0E0E0E0E0E0D0D0D0B0B0C0B0B0B0A0B0A0A0A0B
+      0B0B0B0C0D0C1D1D1D2121212525252928292E2F2F2E2E2D0A0A0B0707070707
+      0707070707070707070707060706060707060706070706060606060605060605
+      0605060606060505050506050605050505050505050405040504050505040405
+      0504050404040404040404040404040404030404040303040403040303030303
+      0303030302030303020303020302030303030302030302030303030205050502
+      0202303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303232323434343535353737373939393B3B3B3D3D3D3434342E
+      2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F302F303938383B3B3B3B3B3B3B3B3A
+      3B3B3A3B3A3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A
+      39393A39393A39393A3939393939393939393939393939393939393939393939
+      3939393939393939393939393939393939393939383939383938383938383938
+      383837373130313030303030303030303030303030303030303737373B3B3A3B
+      3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A393A3A393A3A393A39393A39393A39393A39393939393939
+      3939393939393939393939393939393939393939393939393939393939393839
+      39383938383A39393A39393A39393A3A3A3A3A3A3B3B3B3C3C3C3D3D3D3D3D3D
+      3F3F3F4040404141414242424444444545454848474A4A4A4D4D4D4F4F4F5151
+      515353535656565858575A5A595D5C5C5F5F5F6161616565656868686A6A6A6E
+      6E6E7171717575747979787D7C7C8080808484848888888C8C8C919191959595
+      9999999E9E9EA3A3A2A8A8A8ACACACB1B1B1B6B6B68181817070707070706F6F
+      6F6D6D6D6A6A6A6868686464646262626262626161615F5F5F5F5F5F5F5F5F5E
+      5E5E5E5E5E5C5C5C5C5C5C5C5C5C5C5C5C5B5B5B5A5A5A595959595959595959
+      5959595858585A5A5A5B5B5B5B5B5B5B5B5B5B5B5B5C5C5C5C5C5C5B5B5B5959
+      595858585757575555555353535151515050505050504F4F4F4E4E4E4D4D4D4C
+      4C4C4B4B4B4A4A4A494949474747454545464646454545454545464646494845
+      514E434C536D3953B1505C886A69636F6D656D6D6C6B6B6B6969696464645D5D
+      5D5454544848483E3E3E393939343435302F2B2B2B2A1537B70A3FFF0B3DFF0A
+      3DFF093CFF093BFF083BFF073AFF0639FF0438FF1035CB323133333331343434
+      3535353535353535353535353434343333333333333333333232323131312F2F
+      2F2E2E2E2B2B2B292929262626222222211E11102480002BFC002AEE002AED00
+      29EC0029EA0028EA0028E90027E70027E70026E60026E50025E30024E20024E2
+      0024E10023DF0021E90F24982A29212828262626262525252424242323232121
+      212020201F1F1F1E1E1E1E1E1E1D1D1D1C1C1C1B1B1B1A1A1A18181816161613
+      1313121212101010373737AEAEAEAAA9AAA4A4A49F9F9F9999999494948F8F8F
+      8A898A8585858080807B7B7B7676767272726E6E6D6969696464646060605C5C
+      5C5858585555555151514D4D4D494A494848484343434141413E3E3D3C3C3B38
+      38383635363433333130302E2E2D2C2B2C2A2A2A272727272727252525242424
+      2121212020211F1F1F1F1E1F1E1D1D1C1C1C1B1C1B1B1B1B1B1B1B191A1A191A
+      191A1A19191A1919191919191919181819181718181818171718171717171717
+      1717171716161616171617161616161616161616151616151616151516161515
+      1515151415151415151415141414141413141413141313131212131312121212
+      121212121212121111121111111111111112111111111111111312131A1A191B
+      1B1B1B1B1B1B1B1B1B1B1B1B1B1A191918121213121211121111111111111111
+      1011111111101010101010101010101010100F10101010101010100F0F0F0F0F
+      0F0F0F0F0F0E0E0F0E0E0E0D0E0E0D0D0B0B0C0B0B0B0B0B0B0B0B0B0A0B0B0C
+      0B0C1211121F1F1F2323242726272B2B2B2E2E2E1E1D1E070808070707070707
+      0707070707070707070707060606070606070607070606060606060505060606
+      0606060605060606060605050505050505050405050504050504040404040404
+      0404040404040404040404040303040403040304040304030404040304030303
+      0303040303030303030203030203030303030303020202030505050202033030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3232323434343535353636363838383A3A3A3D3D3D3434342E2E2E2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F302F303939383B3B3B3B3B3B3B3B3B3B3B3A3B3B3A3B
+      3A3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39
+      393A39393A39393A393939393939393939393939393939393939393939393939
+      3939393939393939393939393939393938393938393838393838393838393838
+      3535353030303030303030303030303030303030303131313939393B3B3A3B3A
+      3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A393A3A393A3A393A39393A39393A39393A3939393939393939
+      3939393939393939393939393939393939393939393939393939393939383939
+      383A39393A39393A39393B3A3A3A3A3A3B3B3B3C3C3C3D3D3D3D3D3D3E3E3E40
+      40404141414242424444444545454747464949484B4A4A4C4C4C4F4F4E525252
+      5554545757575959595C5C5C5F5E5E6261616363636767676A6A6A6D6D6D7171
+      717474747878777C7C7B7F7E7E8483838787878B8B8B8F8F8F9393939897979C
+      9C9CA1A0A0A6A6A6AAAAAAB0B0B0B5B5B59494947272727272727171716F6F6F
+      6C6C6C6969696666666363636262626161616060605F5F5F5F5F5F5F5F5F5E5E
+      5E5E5E5E5C5C5C5C5C5C5C5C5C5C5C5C5B5B5B5A5A5A5959595959595A5A5A5A
+      5A5A5B5B5B5C5C5C5E5E5E5F5F5F6060606060606060606060605E5E5E5C5C5C
+      5A5A5A5858585656565353535252525050505050504F4F4F4E4E4E4C4C4C4B4B
+      4B49494948484847474744444443434343434344434047443945464E354B9C1F
+      4CEF154AFF194AFE3354CD5C668E75736B75736B6F6F6E6A6A6A626262595959
+      4D4D4D4141413B3B3B3635323230281A38A90C41FF0C3FFF0C3EFF0B3EFF0A3D
+      FF093CFF093BFF083BFF073AFF033AFF1036C9302F2D33313034343434343435
+      35353535353535353535353434343333333333333333333232323030302E2E2E
+      2B2B2B282828252525222221201E150B269B002CFD002AEF002AEE002AED0029
+      EC0029EA0028EA0028E90027E70027E70026E60026E50025E30024E20024E200
+      24E10023E70923AD232323232221222222232323222222222222212121212121
+      1F1F1F1F1F1F1F1F1F1E1E1E1D1D1D1B1B1B1919191818181616161414141111
+      110F0F0F5F5F5FAFAFAFA9A9A9A3A3A39E9E9E9898979392928E8D8D88888884
+      83837E7E7E7A7A7A7676767070706D6D6D6768686363646060605B5B5B585858
+      5554544F4F4F4D4D4D4949494746464343434040403D3D3D3B3B3A3838373535
+      353332323130302F2E2E2C2B2C29292927282727272725252523232321212121
+      20211F1F1F1F1F1F1E1E1E1C1D1D1B1C1C1C1C1B1B1B1B1A1A1A1A1A1A19191A
+      191919191919191A191919191818181918181918171817171817171717161717
+      1617171717171617161616161616151616151616161615161515151515151515
+      1515151515141415141514141414141314141314131313121312131213131212
+      1212121212121212121112111112111111111111111111111111111A19191B1B
+      1B1B1B1B1B1B1B1B1B1A1A1B1B19191812121211111111111111101110111011
+      11111110111011101010101010101010100F0F100F10100F0F100F0F0F0F0F0F
+      0F0E0F0E0E0F0E0E0E0E0D0D0E0E0E0B0B0C0B0B0B0A0B0B0B0B0A0B0B0A0B0C
+      0C1A1B1B2121212424242828282A2A2A2C2C2C10101108070808080707070707
+      0607070707060707060607070606060607060606060706060606060605060605
+      0506050505050505050505050505050505050405050505050505050505050504
+      0504040405040404040404040404040403040403030404040403030303030303
+      0303030303030303030303030303020303030203080805020202303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303031313135353534
+      34343636363737373A3A3A3C3C3C3333332E2E2E2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F302F303939393B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A3B3B3A3B3A
+      3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A3939
+      3A39393A39393939393939393939393939393939393939393939393939393939
+      3939393939393939393939393839393839393839383839383839383839383833
+      33333030303030303030303030303030303030303231323A3A3A3B3B3A3B3A3A
+      3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A393A3A393A3A393A39393A39393A39393A393939393939393939
+      39393939393939393939393939393939393939393939393939393939383A3A39
+      3A39393A39393B3A3A3B3A3A3B3B3B3B3B3B3D3D3D3D3D3D3E3E3E4040404040
+      404242424444444545454747474848474A4A494C4B4B4E4D4D504F4F52515155
+      54545757575A5A5A5D5C5C5F5F5F6362626666666969696C6C6C706F6F737373
+      7777777A7A7A7E7E7E8181818585858989898E8D8D9291919696969B9B9B9F9F
+      9FA5A5A5A9A9A9AEAEAEB4B4B4A6A6A67373737373737272727171716E6E6E6A
+      6A6A6767676565656262626262626161616060605F5F5F5F5F5F5F5F5F5E5E5E
+      5E5E5E5C5C5C5C5C5C5C5C5C5B5B5B5A5A5A5A5A5A5959595959595A5A5A5B5B
+      5B5D5D5D5F5F5F6262626464646565656565656464646363636161615E5E5E5B
+      5B5B5959595656565454545151515050505050504E4E4E4D4D4D4B4B4B494949
+      464646454545424343404040413F3740414735478A244DDD1A4DFF1A4CFF1A4C
+      FF194BFF1449FF1849FE3A59C9646C8C76746B716F686666655C5C5C51515143
+      43433D3C383836301F3AA30D41FF0E40FF0E40FF0D3FFF0C3EFF0B3EFF0A3DFF
+      093CFF083CFF073BFF0D37D62130692F2F2B3131303434343434343535353535
+      353636363535353535353434343333333333333232323030302E2E2E2B2B2B29
+      2929252525222221201E180B26A1002DFD002CF0002AEF002AEE002AED0029EC
+      0029EA0028EA0028E90027E70027E70026E60026E50025E30024E20024E20024
+      E70722B62121242322202222222222222222222121212121212121212020201F
+      1F1F1F1F1F1E1E1E1D1D1D1C1C1C1919191818181616161414141111110F0F0F
+      878787ADADADA7A7A7A2A2A29D9D9D9797979291918C8C8C8787878382827E7D
+      7D7879787474747070706B6B6B6767676362635E5E5E5B5B5B57575753545450
+      4F4F4C4D4C494949464646434342403F3F3C3C3C3A3A3A373736353535323231
+      302F2F2F2E2E2D2C2C2A2A2A2727282727262525252323232221212121211F1F
+      1F1F1F1F1E1E1E1C1C1D1C1C1B1C1C1B1B1B1B1A1B1A1A1A191A1A1A1A1A1919
+      191A191919191919191919181818191818181818181817181717171717171717
+      1717161716161717161616161616161616151615161616161616151515151515
+      1515151514141415141514141414131414131413121312121312121313121212
+      12121212121212111111111112111111121111111111101111101817171C1B1B
+      1B1B1B1B1B1C1A1B1B1A1B1B1919191313121211111111111111111111101110
+      111111111010111110101010101010101010100F100F10100F0F0F0F100E0F0F
+      0E0F0F0E0E0F0E0D0E0E0D0D0C0C0B0B0B0B0B0B0B0A0B0A0A0A0C0C0C0E0D0D
+      1F1E1E2121222525252727272828281F20200808080708070707070707070707
+      0707070606070706070606070606060606060606060605050606060506050605
+      0506060506050605050505050505050505050505050505050504040405040504
+      0404040404040404040404030404040403030403030404030403030303030303
+      0303030303030303020303030202030305050502030230303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303333333535353737
+      373838383A3A3A3A3A3A2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F302F3039
+      39393B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A3B3B3A3B3A3A3B3A3A
+      3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393939393939393939383939383938383938383938383938383838383030
+      313030303030303030303030303030303030303333333B3B3A3B3B3A3B3A3A3B
+      3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A393A3A393A3A393A39393A39393A39393A39393939393939393939
+      393939393939393939393939393939393939393939393939393A3A393A3A393A
+      39393B3A3A3B3A3A3C3B3B3B3B3B3D3D3D3D3D3D3E3E3E404040404040424242
+      4343434444444747474848484A4A494B4B4A4E4D4D504F4F5251515554545756
+      565858585B5B5B5E5E5E6161616464646767676A6A6A6D6D6D71717174747478
+      78787C7C7C80807F8484838887878C8C8C9090909594949999999E9E9EA2A2A2
+      A8A8A8ADADADB2B2B2B4B4B47C7C7C7575757474747272726F6F6F6C6C6C6969
+      696666666464646363636262626161616060605F5F5F5F5F5F5F5F5F5E5E5E5E
+      5E5E5D5D5D5B5B5B5B5B5B5A5A5A5959595959595858585959595B5B5B5D5D5D
+      6161616464646767676969696A6A6A6A6A6A6969696767676464645F5F5F5C5C
+      5C5959595656565454545151515050504E4E4E4D4D4D4B4B4B47474745454543
+      434340403F3F3E3A334484234EE01D50FF1C4FFF1C4EFF1C4DFF1B4CFF1A4CFF
+      1A4BFF184AFF1347FF1A4AFB3A58C95F68886B69616160585353524645413E3D
+      37223EA60E43FF0F41FF0F40FF0E40FF0E40FF0D3FFF0C3EFF0B3EFF093EFF0C
+      39E21A2F7E2A2A2E2E2C232F2F2F313132333333343434363636363636363636
+      3636363535353535353434343333333333333131312E2E2E2C2C2C2929292626
+      26232322211E130C2695002EFF002CF1002CF0002AEF002AEE002AED0029EC00
+      29EA0028EA0028E90027E70027E70026E60026E50025E30024E20024EA0922A6
+      20201D21211F2222222222222222222222222121212121212121211F1F1F1F1F
+      1F1F1F1F1D1D1D1C1C1C1A1A1A181818151515141414111111212121A9A8A9AB
+      ABABA6A6A6A1A1A19B9B9A9695959090908A8A8A8585858181817C7B7C787777
+      7372726F6E6E6A6A6A6666666161625D5E5D5A5A5A5656565253534F4F4F4B4B
+      4C4848484545454343433F40403D3C3C3A3A3A3737373535343333323030302F
+      2E2E2C2B2B292929282827272626252525232323222222212120201F201F1F1F
+      1E1E1E1D1D1D1C1C1B1C1C1C1B1C1C1A1B1A1A1A1A1A1A1A1A1A1A1A1A191A1A
+      1919191919191919191919181818181718181818171818171717171717171617
+      1616171616161617161616161616161516151516151616151515151515151515
+      1514141414151414151414141413141413141313131313131313131213121212
+      121212121212121212111111121111111111111111111011101717171B1B1B1B
+      1B1B1C1B1B1B1B1B1B1B1B181819121212111111111111111111111110111011
+      101110101011101010101010100F10100F100F100F0F0F0F0F0F0F0F0E0F0F0E
+      0E0E0E0E0E0E0E0E0E0E0B0C0D0B0B0B0B0B0B0B0B0B0B0B0B0B0C0C1514151F
+      1F20222222252424262626252424121213070808070707070807070707070707
+      0707070607060706060607060606060606060706060606060506060606060605
+      0505060605050505050605050505050405050505050505040405050505040404
+      0404040405040404040404040403040303030303030403030403030303030303
+      0303030303030303030302030805080302023030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030323232363636373737393939
+      3B3B3B3D3D3D3030302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3939393B3B3B3B3B
+      3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A3B3B3A3B3B3A3B3A3A3B3A3A3B
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A39
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393939393938393938393938393838393838393838393838363636303030
+      3030303030303030303030303030303030303434343B3B3A3B3B3A3B3A3A3B3A
+      3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A393A3A393A3A393A39393A39393A39393A3939393939393939393939
+      3939393939393939393939393939393939393939393A3A3A3A3A393A3A393B3A
+      3A3B3A3A3C3B3B3C3B3B3C3C3C3D3D3D3E3E3E3F3F3F40404042424243434344
+      44444646464747474949494B4B4A4E4E4D4F4E4E515151545353565555595858
+      5B5B5B5D5D5D6060606363636666666969696D6D6D7070707474747777777B7B
+      7B7F7F7F8282828787868C8B8B908F8F9494949998989D9D9DA2A2A2A6A6A6AC
+      ACACB1B1B1B5B5B58F8F8F7676767676767474747272726F6F6F6A6A6A676767
+      6565656363636363636161616161616060605F5F5F5F5F5F5F5F5F5E5E5E5D5D
+      5D5C5C5C5A5A5A5959595959595858585858585757575959595C5C5B62615D66
+      65636969676D6D6D6F6F6F7070706E6E6E6C6C6C6969696565656060605B5B5B
+      5858585656565353535050504E4E4E4D4D4D4A4A4A4747474444444141413E3D
+      3B3B3C3E254DDE1D52FF1F50FF1F4FFF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A
+      4BFF194AFF1748FF1246FF1949FB3554C5525B7A5754494646462342B51044FF
+      1143FF1042FF1041FF0F40FF0E40FF0D40FF0B40FF0D3DF11832952428382926
+      1B2B2B282E2E2E30303032323234343435353536363637373736363636363636
+      36363535353535353434343333333131313030302D2D2D2A2A2A262626232323
+      211E13122370002EFC002CF2002CF1002CF0002AEF002AEE002AED0029EC0029
+      EA0028EA0028E90027E70027E70026E60026E50025E30025EF0E2287211F1420
+      201F2121212222222222222222222222222121212121212121212020201F1F1F
+      1E1E1E1C1C1C1A1A1A1818181515151414141111114D4D4DAFAFAFAAAAAAA5A5
+      A59F9F9F9A9A999494948F8F8E8A8A898484848080807B7B7B7676767272726E
+      6D6D696A696565656060605C5D5D5959595556555252524F4F4F4A4B4A484948
+      4545454242423F3F3E3C3C3C39393937373735353532323130302F2E2E2D2C2B
+      2B2A292928282827272725252423232322232220202020201F1F201F1E1F1E1D
+      1D1D1C1B1C1C1C1C1B1B1C1A1A1A1B1A1B1A1A1B1A1A1A1A1A1A1A1A1A19191A
+      1919191919191919191918181918171818171817181817171717161717161617
+      1716161616161616161616161616151516161516151515151515151515141515
+      1414141515151414141414141314141313131313131313131213131212121212
+      1212121212121112111111111111111111111111111010111716171B1C1B1C1B
+      1C1B1B1B1B1B1B1B1B1A19181913121211111111111111111011101110111110
+      1010101111101010100F100F10100F0F0F0F100F100F10100E0F0F0E0F0F0E0E
+      0E0E0E0E0E0E0E0D0E0B0C0B0B0B0B0B0B0B0B0B0B0B0C0C0B0C0B1C1C1D2020
+      202121212222222222221D1D1D07080808080707070707070707070706070707
+      0707070706070706060606070706060607060606050606060606060506050505
+      0506050605050505050505050505050505050404040505040505050404050404
+      0404040404040404030403040403040403040304030303030403030303030303
+      0303030303030302080808020203303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303636363838383939393B3B3B3D
+      3D3D3838382F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3736363B3B3B3B3B3B3B3B3B
+      3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3B3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A3939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393839393839393839383839383839383839383839383834343430303030
+      30303030303030303030303030303030303737373B3B3A3B3B3A3B3A3A3B3A3A
+      3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A393A3A393A3A393A39393A39393A39393A393939393939393939393939
+      39393939393939393939393939393939393939393A3A3A3A3A393B3B3A3B3A3A
+      3C3B3B3C3B3B3D3C3C3D3D3D3D3D3D3F3F3F4040404141414343434444444646
+      464747474949494B4B4B4D4D4C4F4F4E5150505352525555555858585B5A5A5D
+      5D5D5F5F5F6262626666666969696C6C6C7070707373737777777A7A7A7E7E7E
+      8282828585858A8A8A8E8D8D9392929797979C9B9BA0A0A0A5A5A5A9A9A9AFAF
+      AFB4B4B4A3A3A37777777777777676767474747070706D6D6D68686865656564
+      64646363636262626161616161616060606060605F5F5F5E5E5E5D5D5D5C5C5C
+      5959595858585858585757575656565656565756555A5A5A59607563646B6A6A
+      69716F6776736877756B77756D7272716D6D6D6969696565655F5F5F5B5B5B57
+      57575454545151514E4E4E4C4C4C4949494646464343433E3E3E3B3A37373941
+      234FEB2052FF2051FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A4B
+      FF194AFF1849FF1648FF1247FF1848FA2F4BB42547C71145FF1245FF1244FF11
+      43FF1042FF1041FF0E41FF0F3FFB1736AB23294329261B2A28232B2B2B2D2D2D
+      3030303333333434343535353636363636363737373737373737373636363636
+      363535353535353333333232323030302E2E2E2B2B2B28282824242421211B1A
+      2039022DEA002DF7002DF1002CF1002CF0002AEF002AEE002AED0029EC0029EA
+      0028EA0028E90027E70027E70026E50026E70025E7171F4F201E162020202121
+      212222222323232222222222222121212121212121212020201F1F1F1E1E1E1C
+      1C1C1A1A1A1818181515151313131111117D7D7DADADADA8A8A8A3A2A29D9D9D
+      9898989292928D8D8D8888888382837E7E7F7A79797575757070706C6C6C6868
+      686464646060605B5C5C5859585555555151514D4E4E4B4A4A47474844444441
+      41413E3E3E3C3B3B3A393A37363635353532323230302F2F2F2E2C2C2B2A2929
+      28272726252625252522232323222220202020201F201F201E1E1F1E1D1D1C1C
+      1C1C1C1C1B1B1B1A1A1B1B1A1B1B1A1A1A1A1A1A1A1A1A1A1A191A1A1A1A1919
+      1919191919191919191818191818191817181717181717171617171717171616
+      1717171716171516161516151616151616161516151515151515151415151515
+      1414141414141414141414131414131313121312131312131212121212121212
+      12111212121111111112111111111111111111111110101817171C1C1B1B1B1B
+      1B1B1B1A1B1B1B1A1B1817171111121112111111111110101110111111101010
+      1010101111111110101010100F0F10101010100F0F0F0F0E0F0F0E0E0F0D0E0E
+      0E0D0E0E0D0D0D0C0B0B0B0B0B0C0B0B0B0B0B0B0C0C0B111011201F20201F1F
+      1F1F1F1F1F1F1C1C1D1112110D0C0D0C0C0D0C0B0B0707080707070607070606
+      0606070606070607060606060606060606060606060506060605060605050605
+      0605050505050505050505050405040505050404050505050505040404040404
+      0404040404040404040304040404040403030303040303030303030303030303
+      0303020305080502020330303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303333333838383939393B3B3B3C3C3C3D3D
+      3D2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3131313B3B3B3B3B3B3B3B3B3B3B3B3B
+      3B3B3B3B3B3B3B3B3B3B3B3B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3B3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A393A3A393A3A393A39393A39393A39393A39393A393939393939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939383939383938383938383938383938383938383838383332333030303030
+      303030303030303030303030303030303737373B3B3A3B3B3A3B3A3A3B3A3A3B
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A393A3A393A3A393A39393A39393A39393A39393939393939393939393939
+      393939393939393939393939393939393A3A3A3A3A3A3B3B3A3B3B3A3C3B3B3C
+      3B3B3D3C3C3E3D3D3D3D3D3F3F3F404040414141424242444444454545474747
+      4949494B4B4B4C4C4C4E4E4E50504F5251515554545756565A59595C5B5B5F5F
+      5F6262626464646868686B6B6B6E6E6E7272727575757979797D7D7D80808085
+      85858989888D8D8D9191919695959A9A9A9F9F9FA3A3A3A8A8A8ADADADB2B2B2
+      B3B3B37E7E7E7979797878787676767171716F6F6F6B6B6B6767676464646363
+      636363636161616161616161616060605F5F5F5E5E5E5C5C5C5B5B5B59595957
+      575755555554545453545454535256544D455DAF3564F93A63EB4365D54B67C2
+      546AB65A6DAD6170A07676757272726D6D6D6969696464645E5E5E5959595757
+      575252524F4F4F4C4C4C4949494545454141413D3D3D39383434394A2352F721
+      52FF2152FF2051FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF
+      194AFF1849FF1749FF1648FF1247FF1347FF1546FF1446FF1345FF1244FF1143
+      FF1043FF143EE025305B2B2A202B2A232C2C2C2D2D2D2F2F2F30303032323234
+      3434363636363636373737383838383838383838373737363636363636363636
+      3535353535353333333131312F2F2F2C2C2C292929262626222221201E160B27
+      A1002EFF002DF3002DF2002CF1002CF0002AEF002AEE002AED0029EC0029EA00
+      28EA0028E90027E70027E60027F00724B31D1D1C1F1E1D202020222222222222
+      2323232323232323232323232121212121212020201F1F1F1E1E1E1C1C1C1A1A
+      1A181818151515131313202020A7A7A7ACACACA7A7A7A1A1A19B9B9B96969690
+      90908B8B8B8686868182827D7D7D7978797373737070706B6B6B666667636364
+      5F5F5F5B5B5B5858585354535050504D4D4D4949494747474343434040403D3D
+      3D3B3B3B3839393636363435343232322F2F2F2E2E2D2C2D2C29292828272727
+      26252625252322222221222020202020201F20201F1F1E1D1E1D1C1C1C1C1C1C
+      1B1B1B1A1B1A1A1B1A1A1A1A1B1A1A1A1A1A1A1A1A1A1A19191A191919191919
+      1A19191919191918181818181819181818171718171717171617171717161716
+      1616171616161616161516161516151515151515161616151515151515151415
+      1414141414141414141413141313141313131213121213121212121212121211
+      121211121112111212121111111111111111111011111717171B1C1B1B1B1C1B
+      1B1B1A1B1B1B1B1A171617111211111112111111111111111110111110101111
+      11101010101010101010100F10100F0F0F0F0F0E0F0F0E0E0F0E0E0E0E0E0E0E
+      0D0E0E0E0B0C0B0B0B0C0B0B0B0B0B0B0C0C0C0C0B0C1B1A1B1E1E1E1F1F1F1D
+      1D1D1B1B1B1B1B1B1A1A1A191919181918181818171817171718161616131313
+      1313131313131010100F0F0F0F0F0F0F0F0F0A0A0A0A0A0A0A0A0A0809090506
+      0605050505050505050504050504050505050504040504050404040404040404
+      0404040404040404040404040403040304030304030303030304030303030203
+      0805080303033030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303131313737373939393A3A3A3C3C3C3D3D3D343434
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3838383B3B3B3B3B3B3B3B3B3B3B3B3B3B
+      3B3B3B3B3B3B3B3B3B3B3B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A39
+      3A3A393A3A393A3A393A39393A39393A39393A39393A39393939393939393939
+      3939393939393939393939393939393939393939393939393939393939393839
+      3938393938393838393838393838393838393838383838313131303030303030
+      3030303030303030303030303030303837373B3B3A3B3B3A3B3A3A3B3A3A3B3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A393A3A393A3A393A39393A39393A39393A3939393939393939393939393939
+      3939393939393939393939393A3A3A3A3A3A3B3B3B3B3B3A3B3B3A3C3B3B3D3C
+      3C3E3D3D3E3D3D3E3E3E4040404040404242424444444545454747474848484A
+      4A4A4B4B4B4E4E4E50504F5252515554545756565958585C5B5B5F5E5E616161
+      6464646666666A6A6A6D6D6D7070707474747777777B7B7B7F7F7F8383838787
+      878C8C8B9090909494949998989D9D9DA2A2A2A6A6A6ACACACB1B1B1B5B5B592
+      92927A7A7A7979797777777474747171716D6D6D6A6A6A676767646464646464
+      6262626161616161616060605E5E5E5D5D5D5B5B5B5959595757575454545252
+      5251515150504F524F47465B9F3566FF3565FF3464FF3263FF3062FF2E60FF2F
+      60FF2F60FF65729C79776F7272726D6D6D6767676262625D5D5D585858555555
+      5050504D4D4D4949494444444040403B3B3B383731313A5B2353FB2253FF2152
+      FF2152FF2051FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF19
+      4AFF1849FF1749FF1748FF1648FF1547FF1546FF1446FF1345FF1244FF1044FF
+      183ECB312F2A302F2C3031313131313232323333333535353636363737373838
+      3839393939393939393939393938383839393938383837373736363636363635
+      35353434343232323030302D2D2D2A2A2A28282824242422201B1B2034032DE0
+      002EFD002DF3002DF2002CF1002CF0002AEF002AEE002AED0029EC0029EA0028
+      EA0028E80027ED0127E4151E451F1D151F1F1F21212122222222222223232323
+      23232424242323232323232222222020202020201E1E1E1C1C1C1A1A1A171717
+      1515151212124E4E4EAFAFAFAAAAAAA5A5A59F9F9F9999999494948F8F8F8A8A
+      8A8585858080807C7B7B7876767372726E6E6E6A6A696666666162615F5E5E5A
+      5A5A5556565354544F4F504C4C4C4949494646464343434040413D3D3D3B3B3B
+      3838383635363433333131312F2F2F2E2E2E2B2C2B2929292928282726262523
+      232423232221222121202020201F1F1F1E1D1E1D1E1E1C1D1C1C1C1D1B1B1B1B
+      1B1B1B1B1B1B1B1A1B1A1B1B1B1A1A1A1B1A1A1A1A191A1A1A1A1A191A191919
+      1919191919181918181918171818181818171817171717171717171717161617
+      1616161616161616161515151516151615151515161515151514141515141414
+      1515151415141414141313141314131213121212131213131212121211121212
+      1211111212111111111111121111111010111110101717161B1C1B1B1B1B1B1B
+      1B1B1B1B1A1B1B15151511111211111111111111111110111111111110111010
+      1110101010101010100F100F1010100F0F100E0F0F0F0E0E0E0E0E0E0E0D0E0E
+      0D0D0E0B0C0C0C0B0B0B0B0B0B0B0B0C0B0C0E0E0D1C1D1C1D1D1C1C1C1C1B1B
+      1B1B1B1B1A1A1A1A1A1A19181918181819181818181818181818181818181818
+      1818181818181818181818181818181818171717171717171717171717171717
+      1717171414141312131414140E0E0E0505040405040404040504040405040404
+      0404040403040304030404040304030303030303030303030303030308080802
+      0303303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303535353838383A3A3A3B3B3B3D3D3D3C3C3C2E2E2E2F
+      2F2F2F2F2F2F2F2F2F2F2F3232323B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B
+      3B3B3B3B3B3B3B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A
+      3A393A3A393A39393A39393A39393A39393A3939393939393939393939393939
+      3939393939393939393939393939393939393939393939393939383939383939
+      3839383839383839383839383839383838383837373730303030303030303030
+      30303030303030303030303131313939393B3B3A3B3B3A3B3A3A3B3A3A3B3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      393A3A393A3A393A39393A39393A39393A393939393939393939393939393939
+      39393939393939393A3A3A3A3A3A3B3B3B3B3B3B3B3B3A3C3C3B3D3C3C3E3D3D
+      3E3D3D3F3E3E4040404040404242424343434444444747474747474949494B4B
+      4B4E4E4E4F4F4F5151515454535655555858585C5B5B5E5D5D605F5F62626266
+      66666969696C6C6C7070707373737777777B7B7B7E7E7E8282828686868A8A8A
+      8E8E8D9393929797979C9B9BA1A0A0A5A5A5A9A9A9AEAEAEB4B4B4A6A6A67B7B
+      7B7B7B7B7979797777777272726E6E6E6B6B6B68686865656564646463636362
+      62626161616060605E5E5E5D5D5D5A5A5A5757575555555252524F4F4F4D4D4D
+      4E4B4146568C3767FD3667FF3666FF3665FF3564FF3464FF3363FF3261FF2E5F
+      FF4467DB7A79767675747070706B6B6B6666666060605B5B5B5656565151514D
+      4D4D4949494444443F3F3F3A3A3A36342D2F3C6D2455FF2354FF2253FF2152FF
+      2152FF2051FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF194A
+      FF1849FF1749FF1748FF1648FF1547FF1546FF1446FF1345FF1144FF1542EC34
+      363F3736323737373737373838383838383939393A3A3A3B3B3B3B3B3B3B3B3B
+      3C3C3C3B3B3B3B3B3B3A3A3A3939393939393838383737373636363636363434
+      343333333131312F2F2F2C2C2C292929262626232323211F16172254022EEC00
+      2EFE002DF3002DF1002CF1002CF0002AEF002AEE002AED0029EC0029EA0028F0
+      0028F110206D1D1B101E1D1E2020202121212222222424242424242323232424
+      242424242323232222222020201F1F1F1E1E1E1C1C1C19191917171714141412
+      1212848584AEAEAEA8A8A8A3A3A39D9D9D9898979392938E8D8E888888838383
+      7F7E7F7A7A7A7776767270716E6D6D6969696565656160615C5C5C5959595656
+      565252524E4E4E4B4B4C4949494545454242423F3F403C3C3C3A3A3A38383836
+      36363333323030302F2F2F2D2D2D2B2B2B292A29282928272726252424242223
+      2321212121202020201F1F201E1E1E1E1E1E1D1C1C1D1C1C1B1C1B1B1B1B1A1B
+      1B1A1B1B1B1A1A1A1B1A1A1B1A1A1A1A1A1A191919191A1A1A1A191A19191919
+      1919191919191818181817181817181717181717171716171717161716171616
+      1616161616161616161615161616151615151515151515151415151515141514
+      1414151414141514131413131313121312131312121212121212121212121211
+      11121211121111121111111111111010111011101919191C1B1B1B1B1B1B1B1B
+      1A1A1B1A1A191314131211111111111111111111111010111011111111101110
+      111010100F10100F1010100F0F0F0F0F0F0E0E0F0E0F0E0E0E0E0E0E0D0D0D0B
+      0B0D0B0C0B0B0C0B0B0B0B0C0C0C0C0C0C1717171C1B1C1C1C1B1B1B1C1B1B1C
+      1A1A1A1A191A1A191A1A191A1919191819181918191818181818181818181818
+      1818181818181818181818181818181818181718181818181817181817171719
+      18181918181919191B1B1B050505040405050504040405040405040404040404
+      0404030403030403040403040304040303040403030303030808080303033030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303131313838383939393A3A3A3C3C3C3E3E3E3333332F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F3838383B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B
+      3B3B3B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A
+      393A39393A39393A39393A39393A39393A393939393939393939393939393939
+      3939393939393939393939393939393939393939393939393938393938393838
+      3938383938383938383938383938383838383737373030303030303030303030
+      303030303030303030303131313939393B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A39
+      3A3A393A3A393A39393A39393A39393A39393939393939393939393939393939
+      393939393A3A3A3A3A3A3A3A3A3B3B3B3B3B3B3C3C3B3C3C3B3E3D3D3E3D3D3F
+      3E3E4140404040404242424343434444444646464747474949494B4B4B4D4D4D
+      4E4E4E5151515353525555555857575B5A5A5D5C5C605F5F6262626565656868
+      686B6B6B6E6E6E7272727575757979797D7D7D8181818585858989898D8D8D91
+      91919696959A99999E9E9EA4A3A3A8A8A8ADADADB2B2B2B6B6B68787877C7C7C
+      7B7B7B7979797575757070706C6C6C6969696767676565656363636363636161
+      615F5F5F5E5E5E5C5C5C5959595555555151514E4E4E4B4B4B4A473F45517939
+      68FA3868FF3867FF3767FF3666FF3665FF3564FF3464FF3363FF3262FF3061FE
+      66739D7B79717374746F6F6F6969696565656060605959595353534E4E4E4949
+      494545453F3F3F3A3A3A37342A2D40822456FF2455FF2354FF2253FF2152FF21
+      52FF2051FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF194AFF
+      1849FF1749FF1748FF1648FF1547FF1546FF1446FF1245FF1343FC343C5E3C3B
+      353C3C3C3D3D3D3E3E3E3F3F3F3F3F3F40404042424241414142424241414140
+      40403E3E3E3D3D3D3B3B3B3A3A3A393939383838363636363636353535343434
+      3333333131312E2E2E2B2B2B282828252525222222221F13172254042CDD002E
+      FF002DF8002DF3002CF1002CF0002AEF002AEF002AF1002AF90228DF1120681C
+      1B131E1D1C1F1F1F202020222222242424242424252525252525242424242424
+      2424242222222121211F1F1F1D1D1D1B1B1B1919191616161313132D2D2DADAD
+      ADACACACA6A6A6A1A0A09B9B9B9595959090908C8B8B8687868382827E7E7D79
+      79797574747170706C6B6B6867666463645F5F5F5B5C5B585858545454515151
+      4E4E4E4A4B4A4848484444444242423E3F3E3C3C3C3939393737373636363333
+      333131312F2F2F2D2D2D2B2B2B2A2A2A29282827272726252424232323222221
+      20202020201F1F1F1E1E1E1D1D1D1C1D1D1D1D1C1C1B1B1C1B1B1B1C1B1A1A1A
+      1B1A191A19191A191A19191A1919191918191A191819191919191A1919191919
+      1919191918181819181719181718171718171717171717161717161617161616
+      1616161616161616161516151615151515151516151515151415141514151415
+      1514151414141413131313141313131212121212121213131212121212121112
+      1111111111111111111211111111111111111119191A1B1B1B1B1B1B1B1B1B1B
+      1B1B191918121112111211111111111111111111111111111111111110101110
+      101010101010100F0F0F0F0F100E0F0F0F0E0E0E0E0E0E0E0E0E0E0D0E0E0C0C
+      0B0B0B0B0B0C0C0B0C0B0A0B0B0D0D0D1B1C1B1C1B1B1B1B1B1B1B1B1A1A1B1A
+      1A1A1A1A1A1A191A191A1A191A19191919191919191919191919191919191919
+      1919191919191818181818181818181817181817181818181819181919181A19
+      1A1D1D1D2323230B0B0B05050505040405040404040404050404040404040404
+      0404030404040303040303030304030403040303080808030303303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303636363939393A3A3A3B3B3B3D3D3D3B3B3B2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F3333333B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B
+      3B3B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A39
+      3A39393A39393A39393A39393A39393939393939393939393939393939393939
+      3939393939393939393939393939393939393939393839393839393839383839
+      3838393838393838393838383838383838363635303030303030303030303030
+      3030303030303030303131313939393B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A
+      3A393A3A393A39393A39393A39393A3939393939393939393939393939393939
+      3A3A3A3A3A3A3A3A3A3B3B3B3B3B3B3C3C3C3C3C3B3D3D3C3E3D3D3E3D3D403F
+      3F4140404141414242424444444545454747474949494B4B4B4C4C4C4E4E4E50
+      50505252525555545757565958585C5B5B5F5E5E6261616564646666666A6A6A
+      6D6D6D7070707474747777777B7B7B7F7F7F8383838787878C8C8C9090909494
+      949898989D9C9CA1A1A1A7A6A6ABABABB0B0B0B5B5B59D9D9D7E7E7E7D7D7D7A
+      7A7A7777777373736F6F6F6C6C6C686868666666656565636363626262606060
+      5E5E5E5B5B5B5757575353534E4E4E4B4A4B48453E434D683B68F23A6AFF3A68
+      FF3968FF3867FF3767FF3666FF3665FF3564FF3464FF3463FF2F60FF4467DD79
+      79777776757272726D6D6D6969696464645E5E5E5656564F4F4F4B4B4B464646
+      4040403B3B3B3734282D43922458FF2455FF2455FF2354FF2253FF2152FF2152
+      FF2051FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF194AFF18
+      49FF1749FF1748FF1648FF1547FF1546FF1446FF1145FF2F4185454136444545
+      4848484B4B4B4C4C4C4C4C4C4C4C4C4C4C4C4B4B4B4949494747474545454242
+      424040403D3D3D3B3B3B39393939393938383836363636363635353534343432
+      32323030302D2D2D2B2B2B282828252525222222211F161C1F300E2795032CE2
+      002DF8002DFF002DFF002DFE002BF50229E00A249D171D391E1B111E1E1D1F20
+      2021212123232324242424242425252525252526262625252525252524242423
+      23232121211F1F1F1D1D1D1B1B1B181818161616131313686868B0B0B0AAAAA9
+      A4A4A49E9E9E9999999393938E8E8E8A8A8A8685858181817C7C7B7778777373
+      736F6F6F6A6A6A6766666362625F5F5F5B5A5B5757565454545050504D4D4C49
+      4A4A4746474343434141413D3E3E3C3C3B3838393636363535353333332F3030
+      2E2E2E2D2D2D2A2A2A2929292828272727262524242424232221212120202120
+      2020201F1F1F1E1D1D1D1D1D1D1D1C1C1A1B1B1B1B1A1A1A1B1A1A1A1A1A1A1A
+      1A19191A1A191A19191919191818171818181818171818181718181818181817
+      1818171818181918181918181817171817171717171717161617161717161616
+      1716161616151616151616151516161515151515151515151415151514141414
+      1414141414141314141314131213131312121212121212121212111212111112
+      1112111112111211111110111111101213131A1A1A1B1C1B1B1B1C1B1A1B1B1B
+      1B17161712111111111111121111111111111111101110101010111010101010
+      101010100F0F0F0F0F0F0F0F0F0E0F0E0F0E0E0F0E0E0F0E0E0E0D0D0D0C0C0C
+      0C0B0C0B0B0B0B0B0B0B0B0B1111121313141313141616161817171817171717
+      171A1A1A1A1A1A1A191A191A1A1A191A19191919191919191919191919191919
+      191919191919191919191919191819191919191919191919191A1C1C1C202020
+      2726261A1A1A0504050505040405040405040404040404040405040404040404
+      0404040404030404040403030303030408080A03030330303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303232323838383939393B3B3B3C3C3C3E3E3E3232322F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F3A39393B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A
+      3B3B3A3B3A3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A
+      39393A39393A39393A3939393939393939393939393939393939393939393939
+      3939393939393939393939393939393939393939383939383938383938383938
+      3839383839383838383838383838383835353530303030303030303030303030
+      30303030303030303030303737373B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A
+      393A3A393A39393A39393A39393A39393939393939393939393939393A3A3A3A
+      3A3A3A3A3A3B3B3B3B3B3B3C3C3C3C3C3C3D3D3C3E3E3D3E3D3D403F3F414040
+      4241414242424444444545454747474848484A4A4A4B4B4B4E4E4E5050505252
+      525555555757565959585C5B5B5E5D5D6160606463636766666969696C6C6C70
+      70707373737777777A7A7A7E7E7E8282828585858989898E8E8E939393979797
+      9B9B9BA09F9FA4A4A4AAA9A9AFAEAEB3B3B3B1B1B18282827E7E7E7D7D7D7A7A
+      7A7575757171716E6E6E6969696767676565656464646262625F5F5F5D5D5D59
+      59595555555050504B4B4B47453E42495C3D66E83B6CFF3B69FF3A69FF3A69FF
+      3968FF3867FF3767FF3666FF3665FF3564FF3464FF3362FF3061FF6272A57D7A
+      727676767373736E6E6E6969696363635B5B5B5252524D4D4D4848484242423D
+      3D3C38352C2D48A42559FF2556FF2455FF2455FF2354FF2253FF2152FF2152FF
+      2051FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF194AFF1849
+      FF1749FF1748FF1648FF1547FF1546FF1045FF2B47AF4F4D4251515054545457
+      57575858585757575656565555555353535151514D4D4D4A4A4A464646434343
+      4040403D3D3D3A3A3A3939393939393838383737373535353535353333333131
+      312F2F2F2C2C2C2A2A2A27272725252524242421201B201E151B1F2E14225F0F
+      25830E24890E2484122164191D321D1C141E1D161F1F1F212121222222232323
+      2424242525252525252626262626262626262626262525252424242323232121
+      211F1F1F1D1D1D1A1A1A1818181515151C1C1C9E9E9EADADADA8A8A8A2A1A29C
+      9C9C9797969292928E8E8E8888888384837F7E7E7B7A7A7676757172716E6D6C
+      6969696565656261615E5D5D5959595757575353534F4F4F4C4C4C4949494746
+      464344434141413E3E3E3B3C3C3839393636363434343232323030302F2F2F2D
+      2D2C2B2A2A2929292828282626262525242425242222212020202020201F2020
+      1F1E1E1D1D1C1D1C1D1C1C1C1B1A1B1B1A1A1A1A1B1A1B1A1A1A1A1A1A1A1A19
+      1A1A191919191919191919181817181818181818171818171717171717171717
+      1717171717181718191818191717181717171616171617161716161716161616
+      1615151516151515151615151515161515151515151514151415141414151414
+      1514141414131414131413131312121212121212121212121211121111111111
+      11111111111112111111111010111415151B1B1B1C1B1B1C1B1B1B1B1B1B1B1B
+      1414141112121112111111111111111111111110111011101111101110101010
+      10100F0F100E0F0F0E0F0F0E0E0E0E0E0E0E0F0E0E0E0E0E0E0C0C0B0B0C0C0B
+      0C0B0B0B0B0C0B0B0B0B0B0B0B0B0A0B0A0B0A0B0B0B0B0A0A0A0A0A0A0A0A0A
+      0A0A090A0A090C0B0C0E0E0E0E0D0E0D0D0E1111111212121111121112111616
+      151515151515151616161919191919181A1A191B1B1A1E1E1E24242528292828
+      2828050505050505050505040505050404040404040405040404040404040403
+      0304040403040303040403030808080304033030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3636363939393A3A3A3C3C3C3D3D3D3B3B3B2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F3333333B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A3B3B3A3B
+      3A3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39
+      393A39393A39393A393939393939393939393939393939393939393939393939
+      3939393939393939393939393939393938393938393938393838393838393838
+      3938383938383838383838383838383535353030303030303030303030303030
+      303030303030303030303737373B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A39
+      3A3A393A39393A39393A39393A39393939393939393939393A3A3A3A3A3A3A3A
+      3A3B3B3B3B3B3B3C3C3C3C3C3C3D3D3D3E3E3D3E3E3D3F3E3E41404041404043
+      42424343434444444646464747474949494B4B4B4D4D4D4F4F4F515151535353
+      5555555858575B5B5A5D5C5C605F5F6262626665656968686B6B6B6E6E6E7272
+      727575757979797C7C7C8080808585858989898C8C8C9090909595959A9A999E
+      9E9EA3A2A2A8A7A7ACACACB1B1B1B5B5B59696968080807F7F7F7D7D7D787878
+      7474746F6F6F6C6C6C6868686666666565656262625F5F5F5C5C5C5858585353
+      534E4E4E4847414347523E65DC3D6EFF3C6BFF3B6BFF3B6AFF3A69FF3A69FF39
+      68FF3867FF3767FF3666FF3665FF3564FF3464FF3061FF4267E37B7B7B7B7A78
+      7777777373736E6E6E6868686060605656564E4E4E4949494444443E3E3D3939
+      332D4CB82659FF2657FF2556FF2455FF2455FF2354FF2253FF2152FF2152FF20
+      51FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF194AFF1849FF
+      1749FF1748FF1648FF1547FF1345FF2048DD5555585B5A585D5D5D6060606161
+      616060605F5F5F5C5C5C5A5A5A5656565353534F4F4F4A4A4A47474743434340
+      40403D3D3D3A3A3A393939383838373737373737353535343434333333313131
+      2F2F2F2D2D2D2A2A2A28282826262624242422222121211D211F15201D10201D
+      0F201D0F201E131F1F1A1F1F1E20202022222222222224242424242425252526
+      26262727272626262727272727272626262525252424242323232121211F1F1F
+      1D1D1D1A1A1A171717141414515151B0B0B0ABABABA5A5A59F9F9F9A9A9A9695
+      959090908B8B8B8787878282827E7E7E7A79797474746F706F6D6D6C68686864
+      6464605F5F5D5C5C5959595554555251514E4E4E4B4B4B484848454444424242
+      3F3F3F3D3D3D3B3B3B3838383636363334333131312F30302E2E2E2C2B2C2A2A
+      2A2929292828282626262525242223222121222020202020202020201E1F1F1D
+      1D1D1D1C1D1D1C1C1B1B1B1B1A1B1A1A1B1A1B1A1A1A1A1A1B1A1A1A1A1A1A19
+      1A1A1A19191A1919191918181818181718171717171817171717181717171716
+      1617161717161717161717171718171717161717161717171716171616161716
+      1616151616161616161515151515151515151515141514141515151414141414
+      1414141413141313141312131212121312121212121212121212121211121112
+      111112121111111110101011111718181C1B1A1B1B1B1B1C1B1B1B1B1A1A1A13
+      1112111111111111111211111111101111111010111110101010101010100F10
+      100F0F100F0F0F0F0F0E0E0F0F0E0F0E0E0F0E0E0E0D0D0C0C0C0C0C0C0C0B0B
+      0B0B0B0B0C0B0B0B0B0B0A0B0B0B0A0A0B0B0A0B0A0A0A0A0A0A0B0A0A0A0A09
+      090A0A0A0A0A0A090A09090909090A090A090909080909090909090908080908
+      0809080809080808080808080808091E1D1E2122212626272B2A2B2F2F300D0D
+      0D05050505040505040504040505040405050404050404040404040404040403
+      0404030404040303080A0A030403303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303033333338
+      38383A3A3A3B3B3B3D3D3D3E3E3E3232322F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      3838383B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A3B3B3A3B3A
+      3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A3939
+      3A39393A39393939393939393939393939393939393939393939393939393939
+      3939393939393939393939393839393839393839383839383839383839383839
+      3838383838383838383838383838353535303030303030303030303030303030
+      3030303030303030303535353B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A
+      3A393A39393A39393A39393A39393939393939393A3A3A3A3A3A3A3A3A3B3B3B
+      3B3B3B3B3B3B3C3C3C3D3D3D3E3E3E3E3E3D3F3F3E4140404140404342424443
+      434444444646464747474949494B4B4B4C4C4C4E4E4E50505052525255555557
+      57575959585C5C5B5F5E5E6261616564646766666A69696D6D6D707070747474
+      7777777B7B7B7E7E7E8282828787878B8B8B8F8F8F9393939797979C9C9BA1A1
+      A0A5A5A5AAA9A9AFAEAEB3B3B3ACACAC8282828181817F7F7F7B7B7B77777772
+      72726E6E6E6A6A6A6868686565656262625F5F5F5B5B5B5757575151514B4B48
+      4549544063CF3E70FF3E6DFF3E6CFF3C6CFF3B6BFF3B6AFF3A69FF3A69FF3968
+      FF3867FF3767FF3666FF3665FF3564FF3463FF3162FF6372A67F7C747A7A7A76
+      76767272726B6B6B6262625959595151514A4A4A45454540403E3C3B3B2D50CB
+      2759FF2758FF2657FF2556FF2455FF2455FF2354FF2253FF2152FF2152FF2051
+      FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF194AFF1849FF17
+      49FF1748FF1648FF1447FF1647FB51587366625367655E696762696864686764
+      66656364636160605E5C5B5A5858585353534F4F4F4A4A4A4545454242423E3E
+      3E3C3C3C3A3A3A3939393838383838383636363535353434343333333232322F
+      2F2F2D2D2D2B2B2B292929272727262626242424232323222222222222212121
+      2121212222222222222323232424242525252626262727272727272828282828
+      282828282727272727272727272626262424242323232121211F1F1F1C1C1C19
+      1919161616161616909090ADADADA8A8A8A2A2A29D9D9D9898989392938E8E8D
+      898A898585858181817C7C7C777777737373706F6F6B6B6A686867636362605F
+      5F5B5A5A5857575554545150504E4D4D4A4A4A4747474444444242423F3E3F3C
+      3C3C3A3A3A3637373636363434333030303030302E2E2D2B2C2B2A2A2B292929
+      2828282625252424232323222222212020202120202020201F1E1F1D1E1E1D1D
+      1D1E1C1C1C1B1B1B1B1B1B1C1B1C1C1C1B1B1C1B1B1B1C1B1B1A1A1A1B1A1A1A
+      1A1A191919191919191818171818181817171717171717171817171717171717
+      1616171615171616171616171717171717171717171617171716171616161615
+      1616151515151615161515161515151515151515151515141514141415141414
+      1414141314141314131313121212121212121212121212121112121212121112
+      1111111111111111101211111A19191C1B1A1B1B1B1B1B1B1B1B1B1616161112
+      11121112111112111111111111111011111110101010101010101010100F0F10
+      0F0F0F0F0F0F0F0F0E0E0E0E0F0E0E0E0E0E0E0E0B0C0C0C0B0B0C0B0C0B0C0B
+      0B0B0C0B0B0B0B0B0B0A0B0B0A0A0B0A0B0A0A0B0B0A0B0A0A0A0A0A0A0A0A0A
+      0A0A0A090A0909090A0909090909090909090909090809090909080909080908
+      08080808080808080909091919192323232727272A2B2A2F302F1D1D1D050506
+      0505050505050405050405040404050405040405040404040404040304040404
+      040303040A0A0803030430303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303737373939
+      393A3A3A3C3C3C3D3D3D3B3B3B2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3232323B
+      3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A3B3B3A3B3A3A3B3A3A
+      3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393939393939393939383939383938383938383938383938383938383838
+      3838383838383838383838383835353530303030303030303030303030303030
+      30303030303030303434343A3A3A3B3B3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A
+      393A39393A39393A39393A39393939393939393A3A3A3A3A3A3B3B3B3B3B3B3B
+      3B3B3C3C3C3C3C3C3E3E3E3E3E3E3F3F3E40403F414040424141434242454444
+      4545454747474848484A4A4A4B4B4B4E4E4E5050505252525555555757575959
+      595C5C5B5E5E5D605F5F6362626666666969696D6C6C6F6F6F72727276767679
+      79797E7E7E8181818585858989898D8D8D9191919696969A9A9A9E9E9EA3A3A2
+      A8A7A7ACACACB1B1B1B6B5B59595958383838181817D7D7D7A7A7A7575757171
+      716D6D6D6969696666666363636060605B5B5B5656565151514A484043538340
+      72FF3F6FFF3F6EFF3E6DFF3E6CFF3C6CFF3B6BFF3B6AFF3A69FF3A69FF3968FF
+      3867FF3767FF3666FF3665FF3564FF3162FF4368E27A7B7A7C7B797878787474
+      746E6E6E6666665C5C5C5352524E4D4C4847454441383F3E392C54DE2859FF28
+      58FF2758FF2657FF2556FF2455FF2455FF2354FF2253FF2152FF2152FF2051FF
+      1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF194AFF1849FF1749
+      FF1748FF1648FF1346FF3350BC4E5B89535E885A628161657763667064666C63
+      6469626262605F5C5B5B5A5656565151514C4C4C4747474242423F3F3F3D3D3D
+      3A3A3A3A3A3A3838383838383838383636363535353434343333333131312F2F
+      2F2E2E2E2D2D2D2A2A2A29292928282826262625252525252525252525252525
+      2525262626262626262626282828282828282828292929292929292929292929
+      2929292828282727272626262424242323232020201E1E1E1C1C1C1919191616
+      16494949B0B0B0ABABABA5A5A4A09FA09A9A9A9595959090908C8C8C87878883
+      83847F7F7F797A797576767272726D6D6D6969696565646262615E5E5D5B5959
+      5756565353534F4F4E4D4D4C4A49494747474443444241423E3F3E3D3C3C3939
+      39363636353535323232303130302F2F2D2D2D2B2B2A292A2A29292827262625
+      25252424242323232120212020212020201F1F1F1F1F1F1E1E1D1E1E1E1D1E1E
+      1D1D1D1E1E1D1E1D1D1E1D1D1D1C1D1D1C1C1D1D1C1D1C1C1D1C1C1C1C1B1C1B
+      1C1B1C1C1C1B1B1A1A1A19191919191818171717181717171717171717171617
+      1716161516151516161516161616161717171716161616161617161616161616
+      1615151616151616151515161515151415151514151415141514141414141414
+      1414131414131413121313121212131312121211121112121212111112121211
+      12121111111111111313131C1B1B1B1B1A1B1B1B1B1B1B1B1B1B131213111111
+      121112111112111111111111111111101111101110111010100F0F100F0F0F0F
+      0F0F0F0E0E0F0F0F0F0E0E0E0E0E0E0E0D0D0D0B0C0C0C0C0C0C0B0B0B0B0C0B
+      0B0B0C0B0B0B0B0B0B0B0B0A0B0A0A0A0A0A0B0B0B0A0A0A0A0B0A0A0A090A0A
+      09090A0A0A09090A0A090A0A0A09090909090809080909090809090809080809
+      090908080909091313132121212526262A2A2A2F2E2E2B2B2C05050505050504
+      0505050405050505040404050404040404040404040404040404040403040404
+      0A080A0403043030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030303030303333333939393A3A3A
+      3B3B3B3D3D3D3E3E3E3232322F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3838383B3B
+      3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A3B3B3A3B3B3A3B3A3A3B3A3A3B
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A39
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393939393938393938393938393838393838393838393838393838383838
+      3838383838383838383838383535353030303030303030303030303030303030
+      303030303030303232323939393B3B3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A39
+      3A39393A39393A39393A39393939393A3A3A3A3A3A3A3A3A3B3B3B3B3B3B3C3C
+      3C3C3C3C3D3D3D3E3E3E3E3E3E40403F41414041404043424245444445444447
+      47474747474949494B4B4B4E4E4E4F4F4F5151515353535555555858585A5A5A
+      5D5D5C5F5F5F6262626564646867676C6B6B6E6D6D7171717474747878787B7B
+      7B7F7F7F8383838787878C8C8C9090909393939898989D9D9DA1A1A1A5A5A5AA
+      A9A9AFAEAEB3B3B3ADADAD8585858484848181817D7D7D7878787474746F6F6F
+      6B6B6B6767676464646060605C5C5C5656565151514A49484343444062CB4072
+      FF406EFF3F6EFF3E6DFF3E6CFF3C6CFF3B6BFF3B6AFF3A69FF3A69FF3968FF38
+      67FF3767FF3666FF3665FF3464FF3162FF6373A57E7B727A797877767471706D
+      6A6964615F5657544A504F4C494A513F4A6E354EA22A59F7295AFF2958FF2858
+      FF2758FF2657FF2556FF2455FF2455FF2354FF2253FF2152FF2152FF2051FF1F
+      50FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF194AFF1849FF1749FF
+      1748FF1547FF1447FF1446FF1546FD1546FA1645F71745F51D48E81F48E32449
+      D6314EB95A5A5A5656545151514C4C4C4747474343434040403D3D3D3C3C3C3A
+      3A3A393939383838383838373737363636353535343434333333323232313131
+      2F2F2F2E2E2E2C2C2C2A2A2A2A2A2A2929292828282828282828282929292828
+      282929292929292A2A2A2A2A2A2A2A2A2A2A2A2929292A2A2A2A2A2A29292928
+      28282727272626262424242222222020201D1D1D1A1A1A181818181818909090
+      ADADADA8A8A7A2A2A29D9D9D9999999393938F8F8E8A8A8A8686868181817C7C
+      7C7878787373747070706C6C6C68686864646460605F5D5D5D59595855545453
+      52524F4E4E4C4C4C4848484645454242424040403E3E3E3C3C3B3A393A363636
+      3434343132323130312E2E2E2E2D2D2B2B2B2929292928282826262524252424
+      2422222220202121202020212121202020201F20202020201F1F1E1D1E1E1E1E
+      1E1D1E1E1D1E1D1D1E1D1D1D1C1C1D1D1C1D1C1C1D1C1C1D1C1B1C1C1C1C1B1B
+      1B1C1C1B1B1B1B1B1B1A1A1B1B1A1A19191A1817181717171717161717171716
+      1716161615161615151516151616171717161617161616161616161616161616
+      1516161615161516151515151515141515151515141514151514141414141414
+      1413141413141313131312121212121212121212121111121112121211111211
+      111111111111111817171C1A1A1C1B1A1B1B1B1B1B1C19191812121212121111
+      1111111211111111111111111111111111101010101010100F0F100F0F0F0F0E
+      0E0F0F0E0E0F0E0E0E0E0E0F0E0E0E0D0D0C0D0C0D0C0C0C0B0C0D0B0B0C0C0B
+      0C0B0B0C0B0B0B0B0B0A0A0B0B0A0B0B0A0B0B0A0A0B0A0A0A0A0A0A090A0A0A
+      090A0A09090A0909090A09090909090909080909080808090909080909090909
+      090A090D0C0C2020202525252928282D2E2D3031300B0B0B0505050505050504
+      04040505050505040405050504050404050404040404040404040404080A0A04
+      0404303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303030303737373939393A3A3A3C
+      3C3C3D3D3D3B3B3B2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3131313B3B3B3B3B3B
+      3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3B3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A393A3A393A3A393A3A393A39393A39393A39393A39393A3939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939393839393839393839383839383839383839383839383838383838383838
+      3838383838383838383838353535303030303030303030303030303030303030
+      3030303030303131313837373B3B3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A
+      39393A39393A39393A39393A3A3A3A3A3A3A3A3A3B3B3B3B3B3B3C3C3C3C3C3C
+      3D3D3D3E3E3E3E3E3E3F3F3F4141404141404342424443434544444746464747
+      474949494B4B4B4C4C4C4E4E4E5050505252525555555757575959595C5C5C5F
+      5F5E6161606463636766666969696D6D6D7070707373737777777A7A7A7E7E7E
+      8282828585858989898E8E8E9292929797979A9A9A9F9F9FA4A4A3A8A8A8ACAC
+      ACB1B1B1B6B5B59696968585858383838080807B7B7B7676767272726D6D6D69
+      69696565656161615D5D5D5757575151514A4B4B44423D3E455A406DF24071FF
+      406EFF3F6EFF3E6DFF3E6CFF3C6CFF3B6BFF3B6AFF3A69FF3A69FF3968FF3867
+      FF3767FF3666FF3665FF3263FF4368E27878787878757374786C6F795F678550
+      6096425BAD3959C6315BEA2C5CFE2A5CFF2A5BFF2A5AFF2959FF2958FF2858FF
+      2758FF2657FF2556FF2455FF2455FF2354FF2253FF2152FF2152FF2051FF1F50
+      FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF194AFF1849FF1749FF17
+      48FF1547FF1447FF1446FF1345FF1144FF1043FF0F42FF0D41FF0C3FFF0C3FFF
+      42508757544A4F4F4F4B4B4B4848484343434040403D3D3D3C3C3C3B3B3B3A3A
+      3A38383838383838383838383836363635353534343434343433333331313130
+      30302F2F2F2E2E2E2D2D2D2C2C2C2B2B2B2B2B2B2B2B2B2A2A2A2B2B2B2B2B2B
+      2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2B2B2B2B2B2B2A2A2A2A2A2A2828282727
+      272626262424242222221F1F1F1D1D1D1A1A1A171717484848B0B0B0ABABABA5
+      A5A5A1A0A19B9B9B9696969191918E8E8E89898985858580807F7B7B7B777777
+      7272726E6E6E6B6B6A6767666363635F5F5F5B5A5A5858585554545150504E4E
+      4E4B4A494847474544444242423F3F3F3D3D3D3B3B3B38373836363634343431
+      32323030302E2E2F2C2C2C2B2B2B292929292828262625262425242323222223
+      22222222222223222221222121202021202020201F1F1F1E1F1E1E1E1E1D1F1E
+      1D1E1D1D1E1D1D1D1D1D1D1D1D1D1C1D1D1C1C1D1C1C1C1C1C1C1C1C1B1C1C1B
+      1B1B1B1B1B1B1B1B1B1A1B1A1A1B1A1B1A191A19181818171617171617171717
+      1615161515161515151515151616161716161616161616161616161516161616
+      1616161515161615161515151515151514151515151415141514151414141414
+      1314141314131313131212121212121212111212121211111211121111111111
+      1111111211121B1B1B1B1B1A1C1B1A1C1B1B1B1B1B1414141212111212121112
+      1112111111111110101111101110101111101010100F100F0F0F0F0F0F0F0E0F
+      0E0F0F0F0E0E0F0E0F0F0E0E0E0E0E0E0E0E0D0E0E0E0E0E0D0E0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0C0D0B0C0C0B0C0C0C0B0C0B0B0B0B0C0C0B0B0B0A0B0B0A0A
+      0A0A0A0A090A0A09090A0909090909090908090909090809080808080808080A
+      0A0A1B1B1B2322232828282C2C2D303030181818050505050605050505050505
+      0505050505050405040405040504040405040404040304040A0A0A0304043030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303333333939393A3A3A3B3B3B3D3D
+      3D3E3E3E3232322F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3736363B3B3B3B3B3B3B
+      3B3B3B3B3B3B3B3B3B3B3B3B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3B3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A393A3A393A3A393A39393A39393A39393A39393A393939393939393939
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939383939383938383938383938383938383938383838383838383838383838
+      3838383838383838383837363630303030303030303030303030303030303030
+      30303030303030303535353B3B3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A39
+      393A39393A39393B3A3A3A3A3A3A3A3A3B3B3B3B3B3B3C3C3C3C3C3C3D3D3D3E
+      3E3E3E3E3E3F3F3F414141414140424241434242454444464545484747484848
+      4A4A4A4B4B4B4E4E4E5050505151515454545656565858585B5B5B5E5E5E6060
+      5F6262626665656968686C6B6B6F6E6E7372727575757979797C7C7C80808084
+      84848888888C8C8C9090909494949999999D9D9DA1A1A1A6A6A6AAAAA9AFAEAE
+      B3B3B3ADADAD8787878686868383837F7F7F7979797575757171716B6B6B6767
+      676262625E5E5E5959595353534C4C4C4545453F3C333D4F854171FF4070FF40
+      6FFF3F6EFF3E6DFF3E6CFF3C6CFF3B6BFF3B6AFF3A69FF3A69FF3968FF3867FF
+      3767FF3666FF3665FF3464FF4769D84768D73D65E73662F63261FC2E60FF2C60
+      FF2D5FFF2D5EFF2D5DFF2D5CFF2B5BFF2A5BFF2A5AFF2959FF2958FF2858FF27
+      58FF2657FF2556FF2455FF2455FF2354FF2253FF2152FF2152FF2051FF1F50FF
+      1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF194AFF1849FF1749FF1748
+      FF1648FF1547FF1546FF1446FF1345FF1244FF1143FF1042FF0D40FF1C44DD4D
+      4D504C4C484848484545454343434040403D3D3D3C3C3C3C3C3C3A3A3A393939
+      3838383838383838383838383636363636363535353434343434343232323131
+      313131313030302E2E2E2E2E2E2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D
+      2D2D2C2C2C2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A292929272727262626
+      2424242121211E1E1E1C1C1C191919191919929192ADAEADA8A8A8A2A2A29E9E
+      9E9999999394939090908B8B8C8787878181827E7E7D7A797A7575757171716D
+      6D6D6868696565656161615D5D5D5A595A56575653535350504F4E4D4D4A4949
+      4847464543444241413F3E3E3D3D3D3A393A373737353635333333313131302F
+      302F2F2F2C2C2B2B2A2A29292A29292926272625252524252425242323232423
+      232323232321212120212121202021201F1F1F1E1E1E1E1F1E1D1F1E1E1F1E1D
+      1E1D1D1E1D1D1D1D1D1D1C1C1D1D1D1D1C1C1C1C1C1C1C1C1C1C1B1B1C1C1C1B
+      1C1B1B1B1B1B1B1A1B1B1B1B1B1A1B1A1A1A1A1A1A1A18181817171716161616
+      1616151616151515151515161516171617171616161616161616151616151516
+      1515161515161516151515151515151515141414141414141414141414141413
+      1414131413121313121213131212121212121212121112111211111111111111
+      11111615151C1B1B1B1A1B1C1B1A1B1C1B191918121211121212121111111211
+      111212111111111111111111111010100F10100F0F0F0F0F0F0F0F0F0F0F0E0E
+      0E0F0F0F0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E0D0D0D0D0E0D0D0D0D
+      0D0D0D0D0D0C0D0D0C0C0D0C0D0C0C0B0C0C0C0C0C0C0C0B0B0C0B0A0B0A0B0A
+      0A0B0A0A0A0B0B0A0A0A0A0A0A0A0A080909080908090808090908090A0A1414
+      142222222627272A2B2A30303025252405060605050505060505050505050505
+      05050505040404040404040504040404050404050A0A0A040404303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303838383939393A3A3A3C3C3C3D3D3D
+      3C3C3C2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F302F303A3A3A3B3B3B3B3B3B3B3B
+      3B3B3B3B3B3B3B3B3B3B3B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A39
+      3A3A393A3A393A3A393A39393A39393A39393A39393A39393939393939393939
+      3939393939393939393939393939393939393939393939393939393939393839
+      3938393938393838393838393838393838393838383838383838383838383838
+      3838383838383838383736363131313030303030303030303030303030303030
+      303030303030303232323939393B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3939
+      3A39393B3A3A3B3A3A3A3A3A3B3B3B3B3B3B3B3B3B3C3C3C3C3C3C3E3E3E3E3E
+      3E3E3E3E4040404141414242414343424544444544444847474847474949494B
+      4B4B4D4D4D4F4F4F5151515353535555555858585A5A5A5C5C5C5F5F5F626261
+      6565646766666A69696E6D6D7070707474747777777B7B7B7E7E7E8282828585
+      858989898E8E8E9393939797979A9A9A9F9F9FA4A4A4A8A8A7ACACACB1B1B1B6
+      B5B59A9A9A8787878686868282827D7D7D7979797373736E6E6E696969656565
+      6060605B5B5B5555554F4F4F4848484241403C3A363F5BB34173FF406FFF406F
+      FF3F6EFF3E6DFF3E6CFF3C6CFF3B6BFF3B6AFF3A69FF3A69FF3968FF3867FF37
+      67FF3666FF3565FF3263FF3163FF3162FF3161FF3161FF3161FF3060FF2F5FFF
+      2F5FFF2E5EFF2D5DFF2D5CFF2B5BFF2A5BFF2A5AFF2959FF2958FF2858FF2758
+      FF2657FF2556FF2455FF2455FF2354FF2253FF2152FF2152FF2051FF1F50FF1F
+      50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF194AFF1849FF1749FF1748FF
+      1648FF1547FF1546FF1446FF1345FF1244FF1143FF1043FF0D41FF2D439C4745
+      3D4344434242424040403F3F3F3D3D3D3C3C3C3C3C3C3B3B3B3A3A3A3A3A3A38
+      3838383838383838383838373737363636353535343434343434333333323232
+      3131313131313030303030302F2F2F2F2F2F2F2F2F2E2E2E2E2E2E2E2E2E2D2D
+      2D2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2A2A2A29292927272726262623232320
+      20201E1E1E1B1B1B181818525252B0B0B0ABABABA5A5A5A0A0A09B9B9B969696
+      9191918E8E8E8A8A8A85858580807F7B7B7B7877787272726F6F6F6B6B6B6767
+      676363636060615C5C5C58585856565653525250504F4C4C4C49484846464644
+      43434141403E3E3D3D3C3D3939393737373435353232323232312F2F2F2E2E2E
+      2B2B2C2A2B2A2929292828282626262726262526252423242423242323232222
+      222222212121202121202020201F1F1E1F1E1E1F1E1E1E1E1E1E1E1D1E1D1E1E
+      1D1D1D1D1D1D1C1C1D1D1C1D1C1C1D1C1C1C1C1C1B1C1C1C1C1B1C1B1B1B1C1B
+      1B1B1B1B1B1B1A1B1A1B1A1B1B1A1B1A1A1A1A1A1A1919191616171716161715
+      1616151615151515151515151417161616161616171616161616151516151616
+      1616151515151515151515141515151515141414141414141414131414141314
+      1413141312131213121312121212121212121212121111121111111111111111
+      111A1A1A1C1B1B1B1B1B1B1B1A1B1B1B15151512121211121212121111111111
+      1111111111111111111010111010100F0F10100F0F100F0F0F0F0F0F0F0F0E0E
+      0E0E0E0F0E0E0E0E0F0E0E0E0E0E0E0E0E0E0D0E0D0D0D0D0E0D0D0D0D0D0D0D
+      0D0D0D0C0D0D0D0D0C0D0D0C0C0C0B0C0C0B0C0C0B0C0B0B0B0B0B0B0B0B0A0A
+      0A0A0A0B0B0A0B0A0A0A0A09090A080909090908090909090A09100F0F212121
+      2626262B2B2B2F2F2E3232320605050506050505060505050505050505050505
+      050404050404040404040504040404040A0A0A04040430303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303333333939393A3A3A3B3B3B3D3D3D3E3E3E34
+      34342F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3535353B3B3B3B3B3B3B3B3B3B3B3B
+      3B3B3B3B3B3B3B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A
+      3A393A3A393A39393A39393A39393A39393A3939393939393939393939393939
+      3939393939393939393939393939393939393939393939393939393939383939
+      3839383839383839383839383839383838383838383838383838383838383838
+      3838383838383838383737323232303030303030303030303030303030303030
+      3030303030303131313636363B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A39393B
+      3A3A3B3A3A3B3A3A3B3B3B3B3B3B3B3B3B3C3C3C3C3C3C3D3D3D3E3E3E3E3E3E
+      4040404141414141414343424444434544444746464847474A49494B4B4B4C4C
+      4C4E4E4E5050505252525555555757575959595C5C5C5E5E5E60606063636266
+      66666969696C6B6B706F6F7372727675757979797C7C7C808080848484888888
+      8C8C8C9090909494949999999D9D9DA1A1A1A5A5A5AAAAA9AFAFAEB3B3B3B1B1
+      B18C8B8B8888888585858181817C7C7C7676767171716C6C6C6666666262625D
+      5D5D5858585252524B4B4B4545453F3E3B3C3E444066D84172FF406FFF406FFF
+      3F6EFF3E6DFF3E6CFF3C6CFF3B6BFF3B6AFF3A69FF3A69FF3968FF3867FF3767
+      FF3666FF3665FF3564FF3464FF3363FF3262FF3261FF3161FF3060FF2F5FFF2F
+      5FFF2E5EFF2D5DFF2D5CFF2B5BFF2A5BFF2A5AFF2959FF2958FF2858FF2758FF
+      2657FF2556FF2455FF2455FF2354FF2253FF2152FF2152FF2051FF1F50FF1F50
+      FF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF194AFF1849FF1749FF1748FF16
+      48FF1547FF1546FF1446FF1345FF1244FF1143FF0F42FF1141F7383F5A403F3A
+      3F3F3F3D3D3D3E3E3E3D3D3D3D3D3D3C3C3C3B3B3B3B3B3B3A3A3A3939393838
+      3838383838383837373736363636363636363635353534343434343433333333
+      33333232323232323131313030303030303030302F2F2F2F2F2F2E2E2E2E2E2E
+      2D2D2D2C2C2C2C2C2C2B2B2B2A2A2A2929292727272525252222222020201D1D
+      1D1A1A1A2323239D9D9DAEAEAEA8A8A7A2A3A29D9D9D9999999494949090908C
+      8C8C8787888282827E7E7E7A7A7A7676767171716D6D6E696969666666626262
+      5E5D5D5B5B5C5858585453545150514E4E4E4B4B4B4848484645454342424040
+      403D3D3D3B3A3A3938383737363535353232323130302F2F2F2D2D2D2B2C2C29
+      292A29292A292829272727272727252525242424232324242323222222222222
+      2121212021202120201F1F1E1F1F1F1D1D1D1C1B1C1C1B1B1B1B1B1A191A1919
+      19191A1A1B1A1A1B1A1B1A1B1B1B1B1B1C1C1C1B1C1C1B1B1B1C1B1C1B1B1B1B
+      1B1B1B1B1B1B1B1A1B1B1B1A1B1B1B1B1A1A1A1A1A1A1A181818171717161616
+      1515161515151515151515151616161616161616161616161516161616151516
+      1615151515161515151515151515151414141414141515141414141414131414
+      1313131213121313121212121212111212121211111112111212111111141414
+      1B1B1A1B1B1B1C1A1B1B1B1A1919191212121112121211121211111111121211
+      12111111111110111010110F0F100F0F0F10100F0F0F0F0F0F0F0F0F0F0F0F0F
+      0E0F0E0E0F0E0E0E0E0E0E0E0E0E0E0E0E0E0D0E0E0D0E0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0C0D0D0B0D0C0B0C0C0B0C0B0B0B0B0B0B0A0B0B0B0B0B0B0A
+      0A0B0B0A0A0B0A0A0A0A0909090809090909090A09090A0B0B1F1E1E25252529
+      29292E2E2E313232101110060605060605050605050505050505050505050504
+      0405050505050404050405040A0A0A0404043030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303737373939393A3A3A3C3C3C3D3D3D3D3D3D2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3939393B3B3B3B3B3B3B3B3B3B3B3B3B
+      3B3B3B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A
+      393A39393A39393A39393A39393A39393A393939393836363634343431313135
+      3535393939393939393939393939393939393939393939393938393938393838
+      3938383938383938383938383938383838383838383838383838383838383838
+      3838383838383838383833333330303030303030303030303030303030303030
+      30303030303030303333333939383B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393B3A3A3B3A
+      3A3B3A3A3B3A3A3B3B3B3B3B3B3C3C3C3C3C3C3D3D3D3E3E3E3E3E3E3F3F3F41
+      41414141414242424343424545444645454847474948484B4A4A4B4B4B4E4E4E
+      4F4F4F5151515353535555555858585A5A5A5D5D5D5F5F5F6262626565646868
+      676B6A6A6E6D6D7170707474747777777B7B7B7E7E7E8282828686868989898E
+      8E8E9292929797979A9A9A9E9E9EA3A3A3A8A8A8ACACACB1B1B1B6B5B5A2A2A2
+      8989898787878484848080807A7A7A7575756F6F6F6A6A6A6565656060605B5B
+      5B5656564F4F4F4949494344443E3C363C435A416CEC4172FF406FFF406FFF3F
+      6EFF3E6DFF3E6CFF3C6CFF3B6BFF3B6AFF3A69FF3A69FF3968FF3867FF3767FF
+      3666FF3665FF3564FF3464FF3363FF3262FF3261FF3161FF3060FF2F5FFF2F5F
+      FF2E5EFF2D5DFF2D5CFF2B5BFF2A5BFF2A5AFF2959FF2958FF2858FF2758FF26
+      57FF2556FF2455FF2455FF2354FF2253FF2152FF2152FF2051FF1F50FF1F50FF
+      1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF194AFF1849FF1749FF1748FF1648
+      FF1547FF1546FF1446FF1345FF1244FF1043FF1741E1393C473E3D3A3D3D3D3D
+      3D3D3D3D3D3D3D3D3D3D3D3D3D3D3C3C3C3B3B3B3B3B3B3B3B3B3A3A3A393939
+      3838383939393838383636363636363636363535353535353434343333333333
+      333333333232323232323030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D
+      2D2D2C2C2C2B2B2B2A2A2A2828282727272424242222221F1F1F1C1C1C1A1A1A
+      696969B1B0B0ABABABA5A5A5A0A0A09B9B9B9696969191918E8E8E8989898585
+      858080807D7C7C787878747474706F706B6B6B6767676464646160605D5D5D59
+      59595657575353535050504D4D4D4A4949484747444443414141403F3F3D3C3D
+      3C3A3A3837383736363434343232323130312F2F302D2D2C2B2B2B2A2A292B2B
+      2A2929292727272626262525252424232424242423232322222121222121211F
+      1E1F1D1D1C1A1A1A191919191919191919191818191918191918191818181818
+      1818181718171717171817171717171818181919181B1B1A1C1B1B1C1C1B1B1B
+      1B1B1A1B1B1B1B1A1B1A1A1A1A1A1A1A1A1A1A1A1A1919191916161616151615
+      1616151515151515151515171616161616161617161616151616161616161515
+      1615151515151515151514151515141415151514141414151414141413141413
+      141313131313121212121212121112121211121111111111111111111919191B
+      1A1B1B1B1B1B1A1A1B1B1B141414121212121212111111121212111111121111
+      11111111101010101010100F100F0F100F0F0F0F0F0F0F0F0F0F0F0F0E0E0E0E
+      0F0F0F0F0F0E0E0E0E0E0E0E0E0E0D0D0E0E0D0E0D0D0D0D0E0D0D0D0D0D0D0D
+      0C0D0D0D0D0C0B0D0C0B0C0C0C0C0B0B0C0B0B0B0B0B0B0A0B0B0B0B0B0B0B0B
+      0A0A0B0B0B0A090909090909090909090809090A0A1818192323232828282D2D
+      2D3131311D1D1D06050505050605060505050505050505050504050405050504
+      05050504040405050A0A0A040404303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303232323939393A3A3A3B3B3B3D3D3D3E3E3E3736372F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F3232323B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B
+      3B3B3B3A3B3B3A3B3A3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393A3A39
+      3A39393737373535353232323030302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3535
+      3539393939393939393939393939393939393939393839393839393839383839
+      3838393838393838393838383838383838383838383838383838383838383838
+      3838383838383838383535353030313030303030303030303030303030303030
+      303030303030303030303635353A3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393A3A393B3A3A3B3A3A
+      3B3A3A3C3B3B3B3B3B3C3C3C3C3C3C3D3D3D3E3E3E3E3E3E3F3F3F4040404141
+      414242424343434545444545444847474847474A49494C4B4B4D4D4D4E4E4E50
+      50505252525555555757575959595C5C5C5E5E5E616161636363666666696969
+      6D6C6C706F6F7372727675757A79797C7C7C8080808484848888888C8C8C9090
+      909494949898989C9C9CA1A1A1A5A5A5AAAAAAAEAEADB2B2B2B4B4B49393938A
+      8A8A8787878383837F7F7F7979797373736E6E6E6868686363635E5E5E595959
+      5454544E4E4E4848484243433E3B333E4A714270F94171FF406FFF406FFF3F6E
+      FF3E6DFF3E6CFF3C6CFF3B6BFF3B6AFF3A69FF3A69FF3968FF3867FF3767FF36
+      66FF3665FF3564FF3464FF3363FF3262FF3261FF3161FF3060FF2F5FFF2F5FFF
+      2E5EFF2D5DFF2D5CFF2B5BFF2A5BFF2A5AFF2959FF2958FF2858FF2758FF2657
+      FF2556FF2455FF2455FF2354FF2253FF2152FF2152FF2051FF1F50FF1F50FF1E
+      4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF194AFF1849FF1749FF1748FF1648FF
+      1547FF1546FF1446FF1345FF1044FF283E8F3D3A2F3C3C3C3D3D3D3D3D3D3D3D
+      3D3D3D3D3D3D3D3E3E3E3D3D3D3D3D3D3C3C3C3C3C3C3C3C3C3B3B3B3A3A3A39
+      3939393939383838373737363636363636353535353535343434333333333333
+      3333333232323232323030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2C2C
+      2C2B2B2B2A2A2A2828282626262424242121211E1E1E1B1B1B363636ADADACAE
+      ADADA7A7A7A3A2A29E9D9D989998939393908F8F8C8C8C8888888283837E7E7E
+      7A7A7A7676767171716E6E6D6A696A6666666262625F5F5F5C5C5C5858585455
+      545252524E4E4E4C4C4C4849494646464343434141403E3D3D3D3C3C3B3A3A39
+      3737373535343333333132302F302F2F2E2D2D2C2C2C2B2B2B2B2A2A2A282829
+      2728272726262525252424242424242324242222221F1E1F1B1B1B1B1A1A1A19
+      1A19191A1A19191A191919191919191918191918191919181818181818181818
+      18181818181817181718181817171717171717171717181A18191B1B1C1B1B1B
+      1B1B1B1B1B1B1A1A1B1B1A1B1A1A1A1A1A1A1A1A1A1A191A1716171615161515
+      1615151515151415141516161616171616161616161615161615161616151515
+      1516151515151515151514151414151415151414141414141414141314141313
+      1313131212121212121112121212121112121111111111121413141B1B1B1B1B
+      1B1C1B1B1B1B1B19181812121312121211121211121212121111111111111111
+      10101110101010101010100F0F100F0F0F0F0F0F0F0F0F0E0F0F0F0E0E0E0E0F
+      0E0E0E0E0F0E0E0E0E0E0E0E0E0D0E0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D
+      0D0D0C0D0D0B0C0C0C0C0C0B0C0B0B0C0B0B0B0A0B0B0B0A0B0B0B0B0B0A0B0A
+      0A0B0909090909090909090808090A09091313142323232727272C2C2C303030
+      2828280506060505050605050606050505050505050505050505050505040505
+      050504050A0D0D04040430303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303636363939393A3A3A3C3C3C3D3D3D3E3E3E3030302F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F3737373B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A
+      3B3B3A3B3A3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3938383636363433343131322F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F373636
+      3939393939393939393939393939393939393939383939383938383938383938
+      3839383839383838383838383838383838383838383838383838383838383838
+      3838383838383838373737313131303030303030303030303030303030303030
+      3030303030303030303232323737373B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393A3A393B3B3A3B3A3A3B3A3A3C
+      3B3B3C3B3B3B3B3B3C3C3C3C3C3C3D3D3D3E3E3E3E3E3E404040414141414141
+      4343434444444545444747464847474A49494B4B4B4D4C4C4E4E4E5050505151
+      515454545656565858585B5B5B5D5D5D5F5F5F6262626565656868676B6B6A6E
+      6D6D7170707474747777777B7B7B7E7E7E8282828585858989898E8E8E929292
+      9696969A9A9A9E9E9EA3A3A3A7A7A7ABABABAFAFAFB4B4B4ACACAC8B8B8B8B8B
+      8B8787878383837D7D7D7777777171716C6C6C6666666262625D5D5D58585853
+      53534C4C4C4747474242413E3B333F50864272FF4171FF406FFF406FFF3F6EFF
+      3E6DFF3E6CFF3C6CFF3B6BFF3B6AFF3A69FF3A69FF3968FF3867FF3767FF3666
+      FF3665FF3564FF3464FF3363FF3262FF3261FF3161FF3060FF2F5FFF2F5FFF2E
+      5EFF2D5DFF2D5CFF2B5BFF2A5BFF2A5AFF2959FF2958FF2858FF2758FF2657FF
+      2556FF2455FF2455FF2354FF2253FF2152FF2152FF2051FF1F50FF1F50FF1E4F
+      FF1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF194AFF1849FF1749FF1748FF1648FF15
+      47FF1546FF1246FF1743E63639443A39363B3B3B3C3C3C3D3D3D3E3E3E3E3E3E
+      3E3E3E3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3E3E3E3D3D3D3B3B3B3A3A
+      3A39393939393937373737373736363635353535353534343433333333333333
+      33333232323232323030303030303030302F2F2F2F2F2F2E2E2E2D2D2D2B2B2B
+      2A2A2A2828282525252323232020201D1D1D1C1C1C8A8989B0AFB0ABABAAA4A4
+      A49F9F9F9B9B9B9696969191918E8E8D8989898585858080807B7C7C78787873
+      73737070706B6B6B6868686564646161615D5D5D5A5A5A565757545453505151
+      4D4D4D4B4B4B4848484546464343424040403F3E3D3B3B3B3A39383737373737
+      363433323231313130302E2E2E2E2D2C2C2B2C2B2B2B2A2A2A28282728282726
+      25262424242424242423232121201C1D1D1B1A1B1B1B1B1B1A1B1A191A1A191A
+      1A191A1919191919191919191819191919191918181919181819181818181718
+      181817181817171717171717171717171717161717171716161918191B1B1B1B
+      1B1B1B1B1B1B1A1B1A1B1B1A1A1A1A1A1A191A191A1A19181717161516151516
+      1515151515151414151716161617171616161616161616161516161516161515
+      1516151515151515151514141514141414141414141414141414131314131413
+      13131212121212121212121112121211111211111112121A1A1A1B1B1B1A1B1B
+      1B1A1A1C1A1B1314131212131212121212121211121112121111111211111110
+      10110F0F10100F0F100F0F0F0F0F0F0F0F0F100F0F0F0F0F0F0F0E0E0E0F0E0E
+      0F0E0F0E0E0E0E0E0E0E0E0D0D0E0E0E0D0D0E0E0D0D0E0D0E0D0D0D0D0D0D0C
+      0D0C0D0C0C0D0C0B0C0B0C0B0B0B0B0B0B0B0B0B0B0A0B0A0A0B0A0A0A0B0909
+      0A0909090909090909090A0A090F0F0F2121212626262B2B2B30303033333306
+      0506050606060606050505050605050505060605050505050505050505040505
+      0A0D0D0404043030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303131313939393A3A3A3B3B3B3C3C3C3E3E3E3A3A3A2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F302F303A3A3A3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A3B3B3A3B
+      3A3A3B3A3A3B3A3A3B3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393939
+      3737373434343231322F2F302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3037373739
+      3939393939393939393939393939393938393938393938393838393838393838
+      3938383938383838383838383838383838383838383838383838383838383838
+      3838383838383838383834343430303030303030303030303030303030303030
+      30303030303030303030303333333838383A3A3A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A393B3B3A3B3B3A3B3A3A3C3B3B3C3B
+      3B3C3B3B3C3C3C3C3C3C3D3D3D3E3E3E3E3E3E3F3F3F41414141414142424243
+      43434545454646454848474948484A49494C4B4B4E4D4D4E4E4E515151525252
+      5555555757575959595C5C5C5E5E5E6161616464646666666969696D6D6C706F
+      6F7372727675757A79797D7C7C8080808484848787878C8C8C90909093939397
+      97979C9C9CA0A0A0A4A4A4A8A8A8ACACACB1B1B1B6B6B59F9F9F8C8C8C8B8B8B
+      8686868181817C7C7C7676767070706B6B6B6565656161615C5C5C5757575252
+      524B4B4B4647474141403D3B353F53934272FF4171FF406FFF406FFF3F6EFF3E
+      6DFF3E6CFF3C6CFF3B6BFF3B6AFF3A69FF3A69FF3968FF3867FF3767FF3666FF
+      3665FF3564FF3464FF3363FF3262FF3261FF3161FF3060FF2F5FFF2F5FFF2E5E
+      FF2D5DFF2D5CFF2B5BFF2A5BFF2A5AFF2959FF2958FF2858FF2758FF2657FF25
+      56FF2455FF2455FF2354FF2253FF2152FF2152FF2051FF1F50FF1F50FF1E4FFF
+      1D4EFF1C4DFF1B4CFF1A4CFF1A4BFF194AFF1849FF1749FF1748FF1648FF1547
+      FF1247FF263E9A3A382D3A3A3A3B3B3B3C3C3C3E3E3E3E3E3E3E3E3E40404040
+      40404141414242424242424343434242424141414040403E3E3E3D3D3D3B3B3B
+      3A3A3A3939393838383737373535353535353535353434343333333333333333
+      333232323232323030303030303030302F2F2F2E2E2E2D2D2D2B2B2B29292927
+      27272525252222221F1F1F1D1D1D5C5C5CB1B1B1ADACACA7A7A7A1A1A19C9C9C
+      9897979393938F8F8F8C8B8B8887878383837E7E7E7A7A7A7676767172716E6E
+      6E6A6A6A6666666363635F605F5C5C5C5858585656565252524F4E4E4C4C4C49
+      49494747474444444141413F3F3F3D3D3D3B3B3A393938363736353535333333
+      313131302F2F2D2E2E2D2D2C2B2C2B2B2B2B292A292828282727272626262424
+      242121211E1E1F1C1C1D1C1C1D1B1B1B1B1A1C1B1A1B1A191B1A191A19191A1A
+      191A1919191A1A1A1A1A1A191A1A191A19191A1A181818181818181818181818
+      1718171717171817171717171717171717171616161716171716161919191B1B
+      1B1A1B1A1B1A1A1A1A1A1B1A1B1A1A1A1A1A1A1A191A18171716151615151615
+      1515151515141515161617161617161616161616151516161616161516151515
+      1515151515151415151515141415151514141414141414141413141313141312
+      131312121312121211121112121211111212111515151B1C1B1B1B1B1A1B1B1C
+      1B1B171717121213121213121212121211121212121112121111111011111010
+      101010101010100F100F10100F0F0F0F0F100F0F0F0F0E0F0E0F0F0F0F0F0E0E
+      0F0E0E0E0E0E0E0E0E0D0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0D
+      0C0D0C0C0C0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B0B0B0A0B0B0A0A0B0A090909
+      0909090909090A0A0A0A0A0B1F1F1E2626262A2A2A2F2F2F3333330E0F0F0506
+      050606060505060606050605050506050505060505050505050405050A0A0A05
+      0505303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303535353939393A3A3A3C3C3C3D3D3D3E3E3E3333332F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F3434343B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A3B3B3A3B3A
+      3A3B3A3A3B3A3A3B3A3A3A3A3A3837373535353333333030302F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F303737373939
+      3939393939393939393939393839393839393839383839383839383839383839
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838383838383636363131313030303030303030303030303030303030
+      303030303030303030303130313333333838383A3A3A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3B3B3A3B3B3A3B3B3A3C3B3B3C3B3B3C3B3B
+      3D3C3C3C3C3C3D3D3D3E3E3E3E3E3E3F3F3F4040404141414242424343434444
+      444545454747464848474A49494B4B4B4D4C4C4F4E4E50505052525254545456
+      56565858585B5B5B5D5D5D6060606262626565656868686B6B6A6E6E6D707070
+      7474747777777B7B7B7E7E7E8282828585858989898D8D8D9191919595959A9A
+      9A9D9D9DA1A1A1A5A5A5AAAAAAAFAFAFB2B2B2B4B4B49494948D8D8D89898985
+      85858181817B7B7B7575756F6F6F6969696464646060605B5B5B565656515151
+      4B4B4B45454641403F3D3A343E53934272FF4171FF406FFF406FFF3F6EFF3E6D
+      FF3E6CFF3C6CFF3B6BFF3B6AFF3A69FF3A69FF3968FF3867FF3767FF3666FF36
+      65FF3564FF3464FF3363FF3262FF3261FF3161FF3060FF2F5FFF2F5FFF2E5EFF
+      2D5DFF2D5CFF2B5BFF2A5BFF2A5AFF2959FF2958FF2858FF2758FF2657FF2556
+      FF2455FF2455FF2354FF2253FF2152FF2152FF2051FF1F50FF1F50FF1E4FFF1D
+      4EFF1C4DFF1B4CFF1A4CFF1A4BFF194AFF1849FF1749FF1748FF1548FF1845ED
+      34394A3938343B3B3B3D3D3D3E3E3E3E3E3E3F3F3F4040404242424343434444
+      444545454747474747474646464646464545454242424040403E3E3E3C3C3C3A
+      3A3A383838373737373737363636353535353535343434333333333333333333
+      3232323232323131313030302F2F2F2E2E2E2D2D2D2B2B2B2929292626262424
+      242121211F1F1F333333A9A9A9AEAEAEAAAAAAA3A3A39E9D9E99999995959591
+      91918E8D8D8A89888584848180817C7C7C7878777473737070706B6B6C686868
+      6464646161615D5D5E5B5A5A5757575454545152524E4E4E4C4B4B4848484646
+      464343434142423F3E3E3D3C3C3A3A3A38383837373734353532333231313130
+      2F2F2E2E2E2D2D2D2C2C2C2B2A2A2A2A2A2828282727272524242020201F1E1F
+      1D1D1F1C1D1E1C1C1D1B1B1C1B1B1C1C1C1D1B1B1C1B1A1B1B1A1B1C1B1C1C1B
+      1B1F1F1F2020202222222322231F201F1E1D1E1D1D1E19191919191918171818
+      18171818171717171717171717171617171717171717161616161717171A1A1A
+      1B1B1B1A1B1B1B1B1B1A1B1A1A1A1A1A1A1A1A1A1A1718171615171516161515
+      1515141415151516171716171616161616161615161616161515161515151515
+      1515151515141415141514141415151414141414141414141313131313131213
+      1213131212121212121111121211121112111B1A1A1B1B1B1B1B1B1B1B1B1B1A
+      1B13121312121212121212121212121211121112111111111011101010101010
+      101010100F0F10100F0F100F100F0F0F0F0F0F0F0F0F0F0F0E0E0F0E0E0E0E0F
+      0E0F0E0E0E0E0E0E0E0E0E0E0D0E0D0E0D0D0D0E0D0D0D0D0D0C0D0C0C0D0D0C
+      0D0C0B0C0B0B0C0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B0A0A0B090A0A0A090909
+      09090909090B0B0A1B1A1B2424242929292E2E2E3333331A1A1A060606060606
+      0606060506060506060605050505050505050505050505050A0A0D0405053030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303131
+      313838383A3A3A3B3B3B3C3C3C3D3D3D3D3D3D2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F3838383B3B3B3B3B3B3B3B3B3B3B3B3B3B3A3B3B3A393939363636
+      3434343232322F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F30373737393939
+      3939393939393939393939383939383938383938383938383938383938383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838383838373737343434303030303030303030303030303030303030
+      3030303030303030303130313130313333333838383A3A3A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3A3B3B3B3B3B3A3B3B3A3B3B3A3C3B3B3C3B3B3C3B3B3D
+      3C3C3C3C3C3D3D3D3E3E3E3E3E3E3F3F3F414141414141434343444444454545
+      4646464848474949484B4A4A4C4B4B4F4E4E504F4F5151515353535555555757
+      575959595C5C5C5E5E5E6161616363636666666969696C6C6B70706F73727276
+      75757978787C7B7B8180808383838787878B8B8B8F8F8F9393939797979B9B9B
+      9F9F9FA3A3A3A8A8A8ABABABAFAFAFB4B4B4AEAEAE8E8E8E8D8D8D8989898585
+      857F7F7F7A7A7A7474746E6E6E6868686464645F5F5F5A5A5A5656565050504A
+      4A4A45454541413F3D3A343E53934272FF4171FF406FFF406FFF3F6EFF3E6DFF
+      3E6CFF3C6CFF3B6BFF3B6AFF3A69FF3A69FF3968FF3867FF3767FF3666FF3665
+      FF3564FF3464FF3363FF3262FF3261FF3161FF3060FF2F5FFF2F5FFF2E5EFF2D
+      5DFF2D5CFF2B5BFF2A5BFF2A5AFF2959FF2958FF2858FF2758FF2657FF2556FF
+      2455FF2455FF2354FF2253FF2152FF2152FF2051FF1F50FF1F50FF1E4FFF1D4E
+      FF1C4DFF1B4CFF1A4CFF1A4BFF194AFF1849FF1749FF1549FF2641A73C3A303C
+      3C3C3D3D3D3F3F3F3F3F3F3F3F3F414141434343454545464646474747484848
+      4A4A4A4A4A4A4A4A4A4949494848484646464343434040403D3D3D3B3B3B3A3A
+      3A39393937373736363636363635353535353534343433333333333333333332
+      32323131313030302F2F2F2E2E2E2C2C2C2A2A2A282828262626232323202020
+      2121218F8F8FB0B0B0ABABABA7A6A6A0A0A09B9B9B9797979292928E8E8E8B8B
+      8B8787878382827E7E7E7A79797676767171716E6E6D6A6A6B6666666263635F
+      5F5E5C5C5C5959585655555253524F4F4F4D4D4D494A4A474847444444434343
+      403F403E3E3E3C3C3C393A3A3837373636363434333232323232312F2F302E2F
+      2E2C2C2C2C2C2C2A2A2A2928282828282424242020201E1F201E1D1E1D1D1E1D
+      1C1D1B1C1C1C1C1D1C1C1C1C1C1C1D1C1D2323232626272C2B2B303030303030
+      313030302F2F2F2F2F2E2E2E2D2D2D2D2C2D2C2B2B2727272323231E1D1D1718
+      181817181817171717171717171717171716161616171616171616161919191B
+      1B1B1B1A1B1A1A1A1B1A1A1A1A1A1A1A191A191A171718161516151516151515
+      1515151516151717171617161616161616161615161515161515161515151515
+      1514141515151515151514141514151414141414141414131413131413131312
+      12121212121112121212111212111817181B1B1B1B1B1B1B1B1B1B1A1A151616
+      1313131212121212121212121212121211111111111211101110101010101010
+      1010101010100F0F0F0F0F10100F0F0F0F0F0F0F0F0F0F0F0F0F0F0E0E0F0F0E
+      0E0E0E0E0E0E0E0E0D0D0E0D0D0D0E0D0E0D0D0D0D0D0D0D0C0D0D0C0D0C0C0C
+      0B0B0C0B0B0C0B0B0B0B0B0B0B0B0B0B0A0B0A0B0A0A0A0A0A0A090909090A09
+      090A0A0A1717172323232828282E2E2E32323223232306060606060606060605
+      06060606060606050505050505050505050505050D0D0D040405303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030333333
+      3939393A3A3A3B3B3B3D3D3D3E3E3E3838382F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F3030303A3A3A3A3A3A383838353535323232302F302F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F3030303030303030303030303030303030303434343737383C3C3C3F3F
+      3F3A3A3A2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3037373739393939
+      3939393939393938393938393938393838393838393838393838393838383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838383738383736363632323230303030303030303030303030303030
+      30303030303030303130313130313131313332323737373A3A3A3A3A3A3A3A3A
+      3A3A3A3A3A3A3A3A3A3B3B3B3B3B3A3B3B3A3C3C3B3C3B3B3C3B3B3D3C3C3D3C
+      3C3D3D3D3E3E3E3E3E3E3F3F3F40404041414142424243434345454545454547
+      47474848474A4A494B4B4B4D4C4C4F4E4E515050525252545454565656585858
+      5B5B5B5D5D5D5F5F5F6262626565656767676A6A6A6E6E6D7070707373737777
+      777A7A7A7E7E7E8181818585858989898C8C8C9090909494949898989C9C9CA1
+      A1A1A4A4A4A8A8A8ACACACB1B1B1B6B6B5A4A4A48E8E8E8D8D8D898989848484
+      7E7E7E7979797373736D6D6D6868686363635F5F5F5A5A5A5555555050504A4A
+      4A45454541413F3D3A343F54934272FF4171FF406FFF406FFF3F6EFF3E6DFF3E
+      6CFF3C6CFF3B6BFF3B6AFF3A69FF3A69FF3968FF3867FF3767FF3666FF3665FF
+      3564FF3464FF3363FF3262FF3261FF3161FF3060FF2F5FFF2F5FFF2E5EFF2D5D
+      FF2D5CFF2B5BFF2A5BFF2A5AFF2959FF2958FF2858FF2758FF2657FF2556FF24
+      55FF2455FF2354FF2253FF2152FF2152FF2051FF1F50FF1F50FF1E4FFF1D4EFF
+      1C4DFF1B4CFF1A4CFF1A4BFF194AFF1849FF1948F33A3F57403E394040404141
+      414242424343434343434444444545454646464747474848484A4A4A4B4B4B4C
+      4C4C4D4D4D4B4B4B4A4A4A4747474545454242423E3E3E3C3C3C3A3A3A393939
+      3838383636363636363636363535353535353434343333333333333232323131
+      313030302F2F2F2E2E2E2C2C2C2A2A2A2727272525252222221F1F1F6C6C6CB2
+      B2B2ADACADA8A7A7A2A2A29D9D9D9898989494938F8F8F8C8C8C898989858584
+      8080807C7B7B7878777474746F6F6F6C6B6C6768686465646161625D5D5D5A5A
+      595757575554555151524E4E4E4C4B4C4949494647464344444242423F3F3F3C
+      3D3D3B3A3B3838393737373535363333333232313131302F2E2F2E2E2E2C2C2C
+      2B2B2B2A292A292828252425202021201F201F1F201E1D1F1C1D1D1D1E1E1C1C
+      1D1D1D1E22222228282831313033323232333233333333333333333332333332
+      33333232323030302F2F302E2E2D2D2C2C2D2C2D2B2B2A2A2A2A292829222221
+      1A1A191817171717171716171717171616161617161616161616161919191A1B
+      1B1A1A1A1A1A1A1A1A1A1A1A1A191A1A19191917161616161715151615151515
+      1514171617171616161617171716161616161616161615151515151515161515
+      1414151515141515151415141415141414141314141413131313131313131212
+      131212121212121212121212131C1C1B1B1B1B1B1B1C1B1B1B19191812131313
+      13121312121212121212121212121111111110111110111110101010100F100F
+      10100F0F10100F10100F100F0F0F0F0F0F0F0E0F0F0F0F0F0E0F0E0F0F0E0E0E
+      0E0E0E0E0E0E0D0E0E0E0D0E0D0E0D0E0D0D0D0D0C0D0D0C0D0C0C0C0C0C0C0B
+      0C0C0B0B0B0B0B0B0B0B0B0B0B0B0B0B0B0A0A0A09090A09090A09090A0A0A0A
+      1111122323232727272C2C2C3131312C2C2C0607060606070606060606050605
+      060506060506050505050505050505050D0D0D05050530303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303030303030303030303737373A
+      3A3A3B3B3B3C3C3C3D3D3D3E3E3E3131312F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      302F302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F30303030303030303030303031313131
+      31313434343838383C3C3C414141434343434343434343414141414141414141
+      3A3A3A2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F303737373939393939
+      3939393839393839393839383839383839383839383839383838383838383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838373838373837373535353131313030303030303030303030303030
+      303030303030303130313130313131313131313131313635353939393A3A3A3A
+      3A3A3A3A3A3B3B3B3B3B3B3B3B3A3C3C3B3C3C3B3C3B3B3D3C3C3D3C3C3E3D3D
+      3E3E3E3E3E3E3E3E3E4040404141414141414343434444444545454646464848
+      484949484B4B4A4C4B4B4F4E4E504F4F5251515353535555555757575959595C
+      5C5C5E5E5E6060606363636666666969696C6C6C6F6F6E727271757474787777
+      7C7B7B7F7E7E8382828686868989898E8E8E9292929595959A9A9A9D9D9DA1A1
+      A1A5A5A5AAAAAAAEAEAEB2B2B2B4B4B49B9B9B8F8F8F8D8D8D8989898484847E
+      7E7E7878787373736C6C6C6868686363635F5F5F5A5A5A5555554F4F4F4A4A4A
+      45454541403F3D3B343E51874270FA4172FF406FFF406FFF3F6EFF3E6DFF3E6C
+      FF3C6CFF3B6BFF3B6AFF3A69FF3A69FF3968FF3867FF3767FF3666FF3665FF35
+      64FF3464FF3363FF3262FF3261FF3161FF3060FF2F5FFF2F5FFF2E5EFF2D5DFF
+      2D5CFF2B5BFF2A5BFF2A5AFF2959FF2958FF2858FF2758FF2657FF2556FF2455
+      FF2455FF2354FF2253FF2152FF2152FF2051FF1F50FF1F50FF1E4FFF1D4EFF1C
+      4DFF1B4CFF1A4CFF1A4BFF174BFF2946B44542374444444646464949494A4A4A
+      4A4A4A4A4A4A4848484747474747474747474949494A4A474D4B454C4C4A4D4D
+      4D4C4C4C4A4A4A4848484646464242423F3F3F3D3D3D3A3A3A39393939393938
+      3838363636363636363636353535353535343434343434333333323232303030
+      2F2F2F2D2D2D2B2B2B2929292626262424242222224B4B4BAFAFAFAEAEADA9A9
+      A9A6A5A59E9E9E9999999595959191918C8D8D8B8A8A8686868181817E7E7D7A
+      79797575747271726E6D6D6A6A6A6666666262625F5F605C5C5C595958565656
+      52525250504F4D4D4D4A4A4A4848484545454343434040403E3F3E3D3D3D393A
+      393738383636363435353233323232323030302F2E2F2C2D2C2C2C2C2B2B2B29
+      2929252525212122201F20201F201F1F201F1F201E1E1F1F1E20212022292929
+      3333333434343635363637363737373938383838383838383737373536353534
+      3532323332323230302F2D2D2E2D2D2D2B2B2B2A2B2A2A2A2929292829292821
+      21211918181717171717171617171616161717161716171616161818181B1B1A
+      1B1A1B1B1A1A1A1A1A1A1A1A191A1A1819191617161615161515161515151515
+      1517161717171716171616161616161516161516161515151616151515151515
+      1415151415151415151414141414141414141414131313141314131213121212
+      1212121212121212121A191A1B1C1C1B1B1B1B1B1B1B1B1B1312131312121213
+      1312131312121212121211111112111111101111101011101010101010101010
+      10100F1010100F100F100F0F0F0F0F0F0F0F0E0F0F0F0F0E0E0F0E0E0E0E0E0F
+      0E0E0E0E0D0E0E0E0E0D0E0E0E0D0D0D0C0D0D0C0D0D0C0D0C0B0C0C0B0B0B0C
+      0C0B0B0B0C0B0B0B0C0B0B0B0B0B0A0B0909090909090A090A0B0B0A0E0F0E21
+      21212727272B2B2B303030353535060606060606060606060606060606060505
+      0505060505050505060505050D0D0D0505053030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303131313838383A3A
+      3A3B3B3B3C3C3C3E3E3E3C3C3C2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      3030303030303030303030303131313232323737373B3A3B4040404444444545
+      454646464747474747474646464545454444444242424141414040404040403A
+      3A3A2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F30363636393939393939
+      3939383939383938383938383938383938383938383838383838383838383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3837383837383837383737373737343434313131303030303030303030303030
+      3030303030303130313130313131313131313131313131313333333737363A39
+      393B3B3B3B3B3B3B3B3B3B3B3A3C3C3B3C3C3B3C3B3B3D3C3C3D3C3C3E3D3D3E
+      3E3E3E3E3E3F3F3F414141414141424242434343454545454545484848484848
+      4A4A494B4B4B4D4C4C4F4E4E5150505352525454545656565858585B5B5B5D5D
+      5D5F5F5F6262626565656767676A6A6A6D6D6D7070707373727776767A79797E
+      7D7D8180808484848787878C8C8C8F8F8F9393939797979A9A9A9E9E9EA3A3A3
+      A7A7A6AAAAAAADADADB2B2B2B2B2B29696968F8F8F8C8C8C8888888383837D7D
+      7D7878787171716C6C6C6767676363635F5F5F5A5A5A5555555050504A4A4A45
+      46464141403E3B333E4B74416CED4172FF406FFF406EFF3F6EFF3E6DFF3E6CFF
+      3C6CFF3B6BFF3B6AFF3A69FF3A69FF3968FF3867FF3767FF3666FF3665FF3564
+      FF3464FF3363FF3262FF3261FF3161FF3060FF2F5FFF2F5FFF2E5EFF2D5DFF2D
+      5CFF2B5BFF2A5BFF2A5AFF2959FF2958FF2858FF2758FF2657FF2556FF2455FF
+      2455FF2354FF2253FF2152FF2152FF2051FF1F50FF1F50FF1E4FFF1D4EFF1C4D
+      FF1B4CFF1A4CFF184BFF2349D6484A53514F485252535454545454545252524E
+      4E4E4C4C4C49494947474745454448463C45474F3C476F4A4A494D4B414B4A48
+      4A4A494747474545454242424040403D3D3D3B3B3B3A3A3A3939393838383838
+      383636363636363636363535353535353434343232323232323030302F2F2F2D
+      2D2D2A2A2A282828252525232323353535A5A5A4B0B0AFABABAAA6A6A6A1A1A1
+      9B9B9B9696969292928E8F8F8B8B8B8788878484847F7F7F7C7C7C7777777473
+      736F6F6F6C6B6B6867676564656161615E5E5D5A5A5A5758575454545252524F
+      4E4F4C4D4C494949474747444444424243403F403D3D3D3B3B3B393939383738
+      3636363435343232323131312F2F2F2E2E2D2C2C2C2C2C2C2A2A2A2626262222
+      23202020202020201F201F1F201F1F2020202026252532333335353538383839
+      39393B3B3B3C3C3B3D3D3C3C3D3C3C3D3C3C3C3C3B3A3B393939373838353536
+      3433333232322F30302D2C2D2C2C2C2A2A2A2929292929292828292828292728
+      271C1C1C1717171716171717161617171717161716161616161819191A1A1A1B
+      1B1A1A1B1A1A1A1A1A1A1A1A1A1A181818171617161616161516151515151615
+      1716171716161616161616171616151615151616161516151515151515151515
+      1515151515141414141415141414141413141413131413131313131312121212
+      12121212121615151B1C1C1C1C1B1B1B1B1B1B1B161616131313121313121212
+      12121212121212111112111112101111111110101010101010100F100F100F10
+      1010100F0F0F100F0F0F0F100F0F0F0F0E0F0F0F0E0E0F0F0E0E0E0E0E0E0F0E
+      0E0E0E0E0E0E0D0D0E0D0D0E0D0D0D0C0D0D0C0D0C0C0C0B0C0C0C0B0C0B0C0B
+      0C0C0B0C0C0B0B0B0B0B0B0B0A090A0A0A0A090A090A0A090C0C0C1E1E1F2626
+      262B2B2B303030343434100F1006060606060606060606060606060505060606
+      06060505060506050D0F0D050505303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030303030303535353A3A3A3A3A3A
+      3C3C3C3D3D3D3E3E3E3736372F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F30303030303030303030303031313131313136
+      363639393A3F3F3F4343434545454646464747474747474848484A4A4A4A4A4A
+      4A4A4A4A4A4A4949494747474545454343434141414040403F3F3F3F3F3F3A3A
+      3A2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F35353539393939393839
+      3938393938393838393838393838393838393838383838383838383838383838
+      3838383838383838383838383838383838383838383838383838383838373838
+      3738383738373738373738373737373733333330303030303030303030303030
+      3030303030313031313031313131313131313131313131313131313131353535
+      3838373A3A3A3B3B3B3C3C3B3C3C3B3C3C3B3D3C3C3D3C3C3E3D3D3F3E3E3E3E
+      3E3F3F3F4040404141414141414343434444444545454747474848484949494B
+      4B4A4C4C4B4F4E4E504F4F5251515352525555555757575959595C5C5C5E5E5E
+      6060606262626666666969696C6C6C6E6E6E7171707575747777777B7B7B7E7E
+      7E8282828585858989898C8C8C9090909494949898989B9B9B9E9E9EA2A2A2A6
+      A6A6ABABABAFAFAFB3B3B3AEAEAE9292929090908C8C8C8888888383837E7E7E
+      7777777272726B6B6B6767676363635F5F5F5A5A5A5555555050504B4B4B4646
+      464242413E3B333D455C4066D84173FF4070FF406EFF3F6EFF3E6DFF3E6CFF3C
+      6CFF3B6BFF3B6AFF3A69FF3A69FF3968FF3867FF3767FF3666FF3665FF3564FF
+      3464FF3363FF3262FF3261FF3161FF3060FF2F5FFF2F5FFF2E5EFF2D5DFF2D5C
+      FF2B5BFF2A5BFF2A5AFF2959FF2958FF2858FF2758FF2657FF2556FF2455FF24
+      55FF2354FF2253FF2152FF2152FF2051FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF
+      1B4CFF1A4BFF174BFF284DD35558625F5D555E5D5E5B5B5B5656565151514C4C
+      4C47474745433E43413735416E1A42D60E40FC1D42CC36447B46464749463B46
+      46444444444242423F3F3F3D3D3D3C3C3C3B3B3B393939383838383838383838
+      3636363636363636363535353434343333333131313030302E2E2E2C2C2C2A2A
+      2A2727272525252A2A2A959495B0B1B0ACACACA8A8A8A3A3A39D9D9D98989894
+      94948F8F8F8B8B8B8988898586868080807C7C7C7979797575747271716D6E6D
+      6B6A6A66666663626260605F5C5C5C5858585555555252525050504D4D4D4B4A
+      4A4848484545454343434141413F3E3F3D3D3D3C3A3A38383837373735353534
+      3434323232303031302F2F2D2D2D2C2C2C2C2C2C282828222323212122202020
+      201F202020202021212423242D2D2D3535353939393A3B3B3E3E3E3E3E3E4141
+      414242424242424242424040403A3A3A3434342F2F2F2929292D2E2E2F2E2E2F
+      2F2F3130312F2E2F2C2D2C2A2A2A2929292A2929292929292929292929292828
+      2223231818181717171617171616171616161616161616161919181A1B1B1A1A
+      1A1A1A1B1B1A1A1A1A1A1A191A17171717161617151616151615151517171717
+      1717171616161616161616161516161616151616151516151615151515151515
+      1414151415151514141515141414141414141313141313131312131212121212
+      121413131C1B1C1B1C1C1B1B1B1B1B1B19181812131313121213121312131212
+      1212121212121111121110121110111010111010101110101010100F0F0F1010
+      0F0F100F0F0F0F100F0F0F0F0F0F0E0F0F0F0F0F0F0E0F0F0E0E0F0E0E0E0E0E
+      0E0E0E0E0E0E0E0E0D0E0D0C0D0D0C0D0C0C0D0C0C0C0B0C0B0C0B0B0B0B0B0C
+      0B0B0B0B0B0B0B0B0A0A0A0A090A0A0A090A0A0A0C0B0C1C1C1C2626262A2A2A
+      3030303434341616150606070706060607060606060606050606060606060505
+      060505060D0D0D05060530303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303030303737373A3A3A3B3B3B3C
+      3C3C3D3D3D3E3E3E3131312F2F2F2F2F2F2F2F2F2F2F2F2F2F2F303030303030
+      3030303030303131313131313434343838383D3D3D4242424545454646464747
+      474747474848484949494A4A4A4A4A4A4B4B4B4C4C4C4D4D4D4D4D4D4E4E4E4D
+      4D4D4C4C4C4A4A4A4747474343434040403F3F3F3F3F3F3F3F3F3F3F3F3A3A3A
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3535353939393939383939
+      3839383839383839383839383839383838383838383838383838383838383838
+      3838383838383838383838383838383838383838383838383838383837383837
+      3837373837373837373837373837373736363333333131313030303030303030
+      3030303031303131303131313131313131313131313131313131313132323232
+      32323434343838383A3A3A3C3C3B3D3D3C3D3C3C3E3D3D3F3E3E3F3E3E3E3E3E
+      4040404141414141414242424343434545454545454848484848484A4A4A4B4B
+      4B4D4D4C4F4E4E5150505352525554545656565858585A5A5A5C5C5C5F5F5F62
+      62626464646767676969696D6D6D7070707373727676757978787C7B7B807F7F
+      8382828786868989898D8D8D8F8F8F9393939797979B9B9B9F9F9FA3A3A3A7A7
+      A7ABABABAFAFAFB3B3B3AAAAAA9191919090908C8C8C8888888484847D7D7D77
+      77777171716B6B6B6767676363635F5F5F5A5A5A5656565151514B4B4B474747
+      4242433F3D363D3F463F5DB74172FF4070FF406EFF3F6EFF3E6DFF3E6CFF3C6C
+      FF3B6BFF3B6AFF3A69FF3A69FF3968FF3867FF3767FF3666FF3665FF3564FF34
+      64FF3363FF3262FF3261FF3161FF3060FF2F5FFF2F5FFF2E5EFF2D5DFF2D5CFF
+      2B5BFF2A5BFF2A5AFF2959FF2958FF2858FF2758FF2657FF2556FF2455FF2455
+      FF2354FF2253FF2152FF2152FF2051FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B
+      4CFF1A4CFF164AFF274FE0585E736562585E5E5E585858515151494948454338
+      3D404E2541AC1143FD0E42FF0F41FF0C40FF0C40FF1841D72B40944041444241
+      404040403E3E3E3D3D3D3C3C3C3B3B3B3A3A3A39393938383838383838383837
+      37373636363535353434343333333131312F2F2F2D2D2D2B2B2B292929262626
+      252525818181B1B1B2ADADADA8A8A8A4A4A4A1A1A09999999494959192928C8C
+      8C8888888687878282827E7F7E7A7A7A7777777272726F6F6F6C6C6B69686865
+      64646161615E5D5D5B5B5A5757575454545152514E4E4E4C4C4C484949484848
+      4444444343434040403D3D3D3D3B3C3A393A3938383636363535353232323132
+      312F2F302E2E2E2E2D2D2C2C2C2B2B2B24232322222321212220212120202121
+      21222424253332323737373A3A3A3E3E3E414041424243444545464746464646
+      3435352727261D1C1C1A19191919191919191918191819181819181819181A1A
+      1A1F1F1F2525242A2A2B2A292929292928282828282827282828272729282825
+      26251818181617171716171616171717161616161616161A19191B1A1A1A1A1A
+      1A1A1A1A1A1A1A1A1A1919191717161616161615161615161616161817161716
+      1717161616161616161616161616161615161615151515151515151514151514
+      1414141515141514151414141414131314131313141314131313121212121212
+      1A1A1A1C1C1C1B1C1C1B1B1B1B1A1A1313131213131212131313131312121212
+      121211111111111211101111111011101010101010100F10100F1010100F1010
+      100F0F100F0F0F0F0F0F0F0F0F0F0F0E0F0F0F0F0E0E0E0F0E0E0E0E0E0E0E0D
+      0D0E0E0E0D0D0E0D0E0D0C0D0D0D0D0C0C0C0C0C0C0C0C0C0B0C0C0B0B0B0B0C
+      0C0B0B0B0A0A0A0A0A0A0A0A0A0A09090A0B0B1918182424242929292F2F2F33
+      33331E1F1F070606070607060607060706060606060606050606060506050606
+      0D0D0D0505053030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303232323A3A3A3A3A3A3B3B3B3D3D
+      3D3E3E3E3C3C3C3030302F2F2F3030303030303030303131313232323737373B
+      3A3B4040404444444545454747474747474747474949494A4A4A4A4A4A4B4B4B
+      4C4C4C4D4D4D4D4D4D4E4E4E4F4F4F5050505050505151515151515050504E4E
+      4E4848484040403B3B3B4040403F3F3F3E3E3E3E3E3E3E3E3E3F3F3F3A3A3A2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F333233393938393938393838
+      3938383938383938383938383938383838383838383838383838383838383838
+      3838383838383838383838383838383838383838383838383738383738383738
+      3737383737383737383737383737373737373737343434313131303030303030
+      3030303130313130313131313131313131313131313131313232323232323232
+      323232323333333434343636363939393B3A3A3E3D3D3F3E3E3F3E3E3F3F3F40
+      40404141414242424343434444444545454747474848484949494B4B4B4C4C4B
+      4F4F4E504F4F5251515352525555555757575959595C5C5C5E5E5E6060606262
+      626565656868686A6A6A6D6D6D7070707373737676767878787C7C7C7E7E7E81
+      81818585858989898D8D8D9090909494949898989C9C9CA0A0A0A3A3A3A8A8A8
+      ABABABAFAFAFB4B4B4A6A6A69292929090908C8C8C8888888484847D7D7D7878
+      787171716B6B6B6767676464645F5F5F5B5B5B5656565151514D4D4D48484843
+      4444403F3A3D3C373E5089406DF14072FF406FFF3F6EFF3E6DFF3E6CFF3C6CFF
+      3B6BFF3B6AFF3A69FF3A69FF3968FF3867FF3767FF3666FF3665FF3564FF3464
+      FF3363FF3262FF3261FF3161FF3060FF2F5FFF2F5FFF2E5EFF2D5DFF2D5CFF2B
+      5BFF2A5BFF2A5AFF2959FF2958FF2858FF2758FF2657FF2556FF2455FF2455FF
+      2354FF2253FF2152FF2152FF2051FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B4C
+      FF1A4CFF164AFF234DE9525C80605D525656544E4C4645443F31427F1944E310
+      45FF1144FF1143FF1042FF1041FF0E40FF0B40FF0B3FFF323D693F3D363D3D3D
+      3D3D3D3C3C3C3C3C3C3C3C3C3B3B3B3A3A3A3838383838383838383737373636
+      363535353434343333333131312E2E2E2C2C2C2A2A2A282828252525717171B2
+      B2B2ADADADA9A9A9A6A6A5A1A1A09C9C9C9797969192918E8E8E8A8A8A878787
+      8484847F80807D7D7D7777787474747070706E6E6E696969666665636463605F
+      605C5C5C5958585656565352535050504D4D4D4B4B4B48484845464543434341
+      42413F3F3F3D3D3D3C3C3C3A3A39393737363535353434323232313130303030
+      2F2F2F2C2D2C2C2C2B2525252323232122222120212020212122222424253333
+      333A393A3B3B3B4140404444444848474748474646463132321D1D1D1A1A1A1A
+      1A1A1A1A1919191919191A1A1919191919191919181919181918181918181818
+      1818171819182020202727282828282828282828282828282727272728272526
+      251818181617161717171617161616171616161717171B1A1A1B1B1B1B1A1A1A
+      1A1B1A1A1A1A1A1A181818171616161716161516151516171717181717171616
+      1716171616161616161616161616151516161516151615151515151415151514
+      151415151414141514141414141313141413141313131312131212121717171C
+      1C1B1C1C1C1C1B1C1B1B1B141414131313131313131313131212121212121212
+      1211111211111110111111111010111010101011101010100F100F1010100F0F
+      100F0F0F100F0F0F0F0F0F0F0F0E0F0F0F0F0E0E0E0E0E0E0E0E0E0E0E0E0E0E
+      0E0E0D0D0E0D0D0D0D0C0D0C0C0D0C0C0C0C0C0C0B0C0B0B0B0B0C0C0B0C0C0B
+      0A0B0A0A0A0A0A0A0909090A0B0A0B1716162324232928282E2E2E3333332727
+      270606070607060606060606060606060606060506050506060505060F0F0D05
+      0505303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303535353A3A3A3B3B3B3C3C3C3D3D3D
+      3E3E3E39393930303035353539393A3F3F3F4343434545454646464747474747
+      474848484A4A4A4A4A4A4A4A4A4C4C4C4C4C4C4D4D4D4E4E4E4E4E4E50505050
+      50505050505151515252525353535151514A4A4A4242423A3A3A323232303030
+      3030303030303939393E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3F3F3F3939392F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F31313138383839393839383839
+      3838393838393838393838383838383838383838383838383838383838383838
+      3838383838383838383838383838383838383838373838373838373837373837
+      3738373738373738373737373737373737373737373735343532313230303030
+      3030313031313031313131313131313131313131323232323232323232323232
+      3333333333333333333434343434343535353838383A3A3A3B3A3A3E3E3E3F3F
+      3F4141414343434343434545454545454848484848484A4A4A4B4B4B4D4D4C4F
+      4F4E5150505251515453535655555858585959595C5C5C5E5E5E616161636363
+      6666656767676A6A6A6B6B6B6E6E6E7272727474747878787B7B7B7F7F7F8282
+      828686868989898D8D8D9191919595959999999C9C9CA1A1A1A4A4A4A8A8A8AC
+      ACACB0B0B0B4B4B4A3A3A39292929090908C8C8C8989898383837D7D7D787878
+      7272726D6D6D6868686363636060605B5B5B5757575353534E4E4E4949494445
+      4541403F3E3B323D455D3F62CD4071FF4070FF3F6EFF3E6DFF3E6CFF3C6CFF3B
+      6BFF3B6AFF3A69FF3A69FF3968FF3867FF3767FF3666FF3665FF3564FF3464FF
+      3363FF3262FF3261FF3161FF3060FF2F5FFF2F5FFF2E5EFF2D5DFF2D5CFF2B5B
+      FF2A5BFF2A5AFF2959FF2958FF2858FF2758FF2657FF2556FF2455FF2455FF23
+      54FF2253FF2152FF2152FF2051FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF
+      1A4CFF174AFF1D4BF4405193504E4540475E2445C01446FF1346FF1446FF1345
+      FF1244FF1143FF1042FF1041FF0E41FF0A40FF2A3D853E3B303C3C3C3C3C3C3C
+      3C3C3C3C3C3B3B3B3B3B3B3A3A3A3A3A3A393939383838373737363636353535
+      3434343232323030302E2E2E2C2C2C292929262626666666B2B2B2AEAEAEAAAA
+      AAA6A6A6A2A2A29E9E9E9999999393938F8F8F8A8B8A8786878484848181817D
+      7D7D7A7A7A7675767272726F6E6F6B6B6B6767676463646061605E5D5D5B5A5A
+      5757575554545151514D4E4E4C4B4B4949494747474444444242424140403E3D
+      3D3D3D3C3B3B3B3938393838373735353232323232323030303030302E2D2D2D
+      2D2D2828282323242323232221222221222121222524253333333A3A3A3F3F3F
+      4142414746464949494C4C4D3C3C3C1E1E1E1A1A1A1A1B1A1A1A1A1A1A1A1A19
+      1A191A1A191A1919191919191919191919191918191819191818181818181817
+      1818181818191819232424282828272727262727282827272728272827242424
+      1818181716171717171716161716161616161818181B1B1B1A1A1B1A1A1A1A1A
+      1B1A1A1A1A191917171717161716171616151616161618171717161717161617
+      1616161616161616161616151616151515161516151515151515151515141414
+      1415141414141414141414141314141313141413131313131514141C1C1B1C1C
+      1B1C1C1C1C1C1C18171813131313131313131313131313121213121212111112
+      11111211101111111111111110111110111111100F1010100F10101010100F10
+      100F0F0F0F0F0F0F0F0E0E0E0F0E0F0E0F0E0F0E0E0E0E0E0E0E0E0E0E0E0D0D
+      0E0D0D0E0D0C0D0C0C0C0C0C0C0C0C0C0C0C0C0B0C0B0C0C0C0B0C0B0B0A0C0B
+      0B0B0A0A0A0A0A0A0A0B0B1211122324242929282E2E2E3232332A2A2A070707
+      0706070606060606060606070606060606060606050606050D0F0F0605053030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303838383A3A3A3C3C3C3D3D3D3E3E3E40
+      40404343434545454646464747474848484949494A4A4A4A4A4A4B4B4B4C4C4C
+      4D4D4D4E4E4E4E4E4E4F4F4F5050505050505151515252525353535353534C4C
+      4C4444443D3D3D37373730303030303030303030303030303030303030303030
+      30303030303939393D3D3D3D3D3D3D3D3D3E3E3E3E3E3E3F3F3F3B3B3B303030
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3131313737373938383938383938
+      3839383839383838383838383838383838383838383838383838383838383838
+      3838383838383838383838383838383838383837383837383737383737383737
+      3837373837373737373737373737373737373737373737373636363333333131
+      3131303131303131313131313131313132323232323232323232323233333333
+      33333333333434343434343434343535353737373737373737373938383A3939
+      3C3B3C3E3D3D3F3E3E4140404242424444444545454747474949494A4A4A4C4C
+      4C4D4D4D5050505252525454545555555757575A59595B5B5B5D5D5D60606063
+      63636665656968686C6B6B6F6F6F7272727676767979797C7C7C808080838383
+      8787878A8A8A8E8E8E9292929595959A9A9A9D9D9DA1A1A1A5A5A5A9A9A9AEAE
+      ADB2B2B2B5B5B5A1A1A19393939090908D8D8D8989898383837E7E7E78787872
+      72726D6D6D6868686464646161615D5D5D5858585353534F4F4F4B4B4B464646
+      4242423F3D373D3C3B3E528E406BEC4071FF3F6FFF3E6DFF3E6CFF3C6CFF3B6B
+      FF3B6AFF3A69FF3A69FF3968FF3867FF3767FF3666FF3665FF3564FF3464FF33
+      63FF3262FF3261FF3161FF3060FF2F5FFF2F5FFF2E5EFF2D5DFF2D5CFF2B5BFF
+      2A5BFF2A5AFF2959FF2958FF2858FF2758FF2657FF2556FF2455FF2455FF2354
+      FF2253FF2152FF2152FF2051FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A
+      4CFF184BFF184AFF2748C61B48ED1448FF1548FF1547FF1546FF1446FF1345FF
+      1244FF1143FF0F43FF1141F4243C98383A413B3B393B3B3B3C3C3C3C3C3C3C3C
+      3C3B3B3B3B3B3B3B3B3B3A3A3A39393938383837373736363635353533333331
+      31313030302D2D2D2B2B2B2828285A5B5AB3B3B2AFAFAFABABABA7A7A7A3A3A2
+      9E9F9E9B9B9A9595958F8F8F8C8C8C8888878383838282837E7E7E7B7B7B7777
+      777273737070706D6C6D69696A6565656262625F5F5F5B5C5B5A5A5956555553
+      52525150504D4D4D4B4A4B4848484646464343434141413E3E3E3D3E3E3C3C3C
+      3A3A3A3939393637363434333332333131313030302F2F2F2D2C2D2C2B2B2525
+      242423232323232222222020212323243232313A3A3A3F3F3F4343434848484C
+      4B4C4949492E2E2E1B1B1B1B1B1B1B1A1B1A1B1A1A1A1A1A1A1A1A1A1A1A191A
+      1A1A191919191A191919191A1919191919181819181918181818181818181818
+      181718181817181E1D1E26262627272727272626272728272727272723222217
+      17171617161716171617171616161616161A1A1A1B1B1B1B1B1B1A1A1A1A1A1A
+      1A1A1A1818181617161717161717161615161817171817171716171716161716
+      1616161616161616161616161615151515151615151515151515151414141514
+      15141414141414141414141414141413131313141312131B1B1B1C1C1B1C1C1B
+      1C1B1C1919181313131313141313131313131312121212121212121211111211
+      111111111111101111111010101010101010100F10100F10100F100F100F1010
+      0F100F100F0F0F0F0F0F0F0F0F0F0E0F0F0F0E0F0F0E0E0E0E0E0E0D0E0E0D0E
+      0D0D0D0D0C0D0D0C0C0C0C0C0D0C0C0C0C0B0C0C0B0B0C0C0B0B0C0A0A0A0B0A
+      0A0A0A0A0A0B0B0F100F2222232728282E2D2D32323333333307070707070706
+      07070706070706060606060607060606060606060F0F0F050506303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303232323A3A3A3C3C3C3D3D3D3F3F3F4141414545
+      454747474A4A4A4B4B4B4C4C4C4D4D4D4D4D4D4E4E4E4F4F4F50505050505051
+      51515252525353535353534F4F4F4848483F3F3F393939303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303535353C3C3C3D3D3D3D3D3D3D3D3D3E3E3E3F3F3F3C3C3C3030302F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F30363535393838393838393838
+      3938383938383838383838383838383838383838383838383838383838383838
+      3838383838383838383838383838383738383738383738373738373738373738
+      3737383737373737373737373737373737373737373737373737373736353434
+      3332333130313131313131313131313232323232323232323232323333333333
+      333333333434343434343535353636363737373737373838383A39393B3A3A3C
+      3B3C3C3B3C3E3E3E3F3F3F4141414242424444444545454747474848484A4A4A
+      4C4C4C4E4E4E4F4F4F5252525454545757575959595B5B5B5E5E5E6060606463
+      636767676A69696D6C6C7070707373737676767A7A7A7D7D7D81818185858588
+      88888C8C8C8F8F8F9393939696969A9A9A9E9E9EA3A3A3A7A7A7AAAAAAAEAEAE
+      B2B2B2B4B4B4A2A2A19494949191918D8D8D8989898484847F7F7F7878787373
+      736E6E6E6969696565656161615D5D5D5959595555555050504C4C4C47474743
+      434340403E3D3B323D42533E5CB5406FFF3F70FF3E6DFF3E6CFF3C6CFF3B6BFF
+      3B6AFF3A69FF3A69FF3968FF3867FF3767FF3666FF3665FF3564FF3464FF3363
+      FF3262FF3261FF3161FF3060FF2F5FFF2F5FFF2E5EFF2D5DFF2D5CFF2B5BFF2A
+      5BFF2A5AFF2959FF2958FF2858FF2758FF2657FF2556FF2455FF2455FF2354FF
+      2253FF2152FF2152FF2051FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4C
+      FF194BFF174AFF1749FF1749FF1748FF1648FF1547FF1546FF1446FF1146FF11
+      44FF1C3EBC2F37563A362B3A39363A3B3B3B3B3B3C3C3C3C3C3C3C3C3C3C3C3C
+      3B3B3B3B3B3B3B3B3B3939393838383737373636363434343333333030302E2E
+      2E2C2C2C2A2A2A5B5A5BAFB0B0AFAFAFABABABA7A7A7A4A4A4A0A0A09B9C9C98
+      98979090908D8C8C8888888585858181818080807C7C7C787878747474717171
+      6E6E6D6A69696667666363636060605C5D5D5A5A5A5757575454545251514F4E
+      4E4C4C4C4949494747474545444343434040403E3E3E3E3D3D3B3B3B3A393A38
+      38393737373233333233333031303030312F2F2E2D2D2D282828232323242324
+      2222232222222323232D2E2E3938393D3E3E4443434848484D4D4C4C4B4C2727
+      261B1B1C1B1B1B1B1B1B1B1B1B1B1A1B1A1B1B1A1A1A1B1A1A1A1A1A1A191A1A
+      1A191A1A1A19191919191A191819191819191919191818181918181818181718
+      1718181717181A1A1B2525252626262726262727272828272827271E1E1F1717
+      171716171616171716161617161717171A1A1B1B1B1B1B1A1B1B1A1A1A1A1A19
+      1919171717161617171716161617171817181817181717171716171616171616
+      1617161616161616161516161515161515151515151515151515151515151414
+      151515141414141414141414141413141313131919191C1B1B1C1C1B1C1C1B1A
+      1B1B141414131313131313131313121313131212131212121112121112111111
+      1011101011111011101010101010101010101010101010100F100F10100F0F10
+      0F0F0F0F0F0F0F0F0F0F0E0F0F0E0F0F0E0E0E0E0E0E0E0E0E0E0D0E0D0D0D0D
+      0D0D0D0C0C0D0C0C0C0D0C0C0C0C0C0C0C0B0B0C0C0B0B0B0B0A0B0A0A0A0B0A
+      0A0A0A0D0D0D2222212728272D2D2D3131313636360707070707070707070706
+      070706070606070706060606060606060D0F0D06060630303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303535353C3C3C3D3D3D3F3F3F4343434747474A4A4A
+      4D4D4D4E4E4E5050505050505050505151515252525353535151514A4A4A4242
+      423B3B3B32323230303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303535353C3C3C3C3C3C3D3D3D3D3D3D3E3E3E3E3E3E3D3D3D3232322F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F31313139383839383839383839383839
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838383838383838383838373838373837373837373837373837373837
+      3737373737373737373737373737373737373737373737373737373737373737
+      3636353434333333313131323232323232323232323232333333333333333333
+      3434343434343535353636363737373737373737373939393A39393C3B3B3C3B
+      3C3D3C3D3F3F3F4040404141414343434444444646464747474949494B4B4B4D
+      4D4D4F4F4F5050505353535555555757575A5A5A5C5C5C5F5F5F626262656464
+      6867676A6A6A6E6D6D7171717474747777777B7B7B7D7D7D8181818585858989
+      898C8C8C9090909494949898989C9C9CA0A0A0A3A3A3A7A7A7ABABABAEAEAEB2
+      B2B2B5B5B5A2A2A19494949292928E8E8E8A8A8A8585857F7F7F797979747474
+      6E6E6E6A6A6A6565656262625E5E5E5A5A5A5656565151514E4E4E4949494545
+      454242423F3E393D3B343D486B3E61C73F6FFF3E6FFF3E6DFF3C6BFF3B6BFF3B
+      6AFF3A69FF3A69FF3968FF3867FF3767FF3666FF3665FF3564FF3464FF3363FF
+      3262FF3261FF3161FF3060FF2F5FFF2F5FFF2E5EFF2D5DFF2D5CFF2B5BFF2A5B
+      FF2A5AFF2959FF2958FF2858FF2758FF2657FF2556FF2455FF2455FF2354FF22
+      53FF2152FF2152FF2051FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF
+      1A4BFF194AFF1849FF1749FF1748FF1548FF1448FF1347FF1A40CE2836693332
+      2D35342C3736363939393A3A3A3B3B3B3C3C3C3C3C3C3D3D3D3D3D3D3C3C3C3B
+      3B3B3B3B3B3A3A3A3838383737373535353333333232323030302D2D2D2B2B2B
+      5C5C5CB0B0B0AFAFAFABABABA8A8A8A4A4A4A0A0A09C9C9C9898989494948C8D
+      8D8989898585858281817F7F7E7E7D7D7979797776777272726F6F6F6B6B6B68
+      67686565656161625E5F5E5B5B5B5858585556565353525150504E4D4D4B4A49
+      48484846464544434441424240403F3E3E3E3D3D3D3A3A3A3939393737383535
+      353333323232323030302F2F302D2D2D2C2C2C25252524242423242323232323
+      24232626263939393D3C3C4142414848484D4D4D4D4D4D2727271C1D1D1B1C1C
+      1B1B1C1B1B1C1B1B1B1A1B1B1B1B1B1B1A1A1B1A1A1A1A1A1A1A1A1A1A1A1919
+      1A1A191919191919191919191918191919191918181819181818181918181818
+      18171818171A1A1A252525262626262626272727272728262627191919171717
+      1717171616171717161617171A191A1B1B1B1A1B1A1B1A1B1A1B1A1A1A191818
+      1817171717171617171716161618181718181718171718171717161717161616
+      1717151616151516151616151616161515151515151515141515151515151415
+      1414141414141314141314131413141717171C1C1B1C1B1B1C1C1B1C1C1B1414
+      1513131413131313131313131313121212121212111112111212111111111111
+      11111111111011101111101010111010101010100F1010100F1010100F0F0F10
+      0F0F0F0F0F0F0F0F0E0F0F0F0F0F0E0E0E0E0E0E0F0E0D0E0D0D0E0D0D0D0D0D
+      0D0D0C0C0C0C0C0C0D0C0C0C0C0C0C0C0B0A0B0A0A0B0A0B0B0B0A0A0A0A0B0D
+      0D0D2020202728282D2C2D323131363636101010070707070707070707060706
+      0607070606070707060606060F0F0F0606063030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303A3A3A3E3E3E4040404545454A4A4A4D4D4D50505052
+      52525353535353534C4C4C4444443D3D3D373737303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303434343B3B3B3B3B3B3C3C3C3D3D3D3E3E3E3E3E3E3E3E3E3434342F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F3434343938383938383938383938383938383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838383838383837383837383737383737383737383737383737383737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737373737373736363634343433333332323233333333333333333333333334
+      34343434343535353636363737373737373838383939393B3A3A3C3B3B3C3B3C
+      3E3D3E3F3F3F4040404242424444444444444646464848484A4A4A4B4B4B4D4D
+      4D4F4F4F5252525353535656565858585B5B5B5D5D5D5F5F5F63636366656568
+      67676B6B6B6E6E6E7272727575757878787B7B7B7F7F7F8383838787878A8A8A
+      8E8E8E9292929595959999999C9C9CA0A0A0A4A4A4A7A7A7ABABABAEAEAEB2B2
+      B2B4B4B3A3A3A29595959292928E8E8E8A8A8A8585858080807B7B7B75757570
+      70706B6B6B6666666363636060605C5C5C5858585454545050504C4C4C474747
+      4444454242413F3D363C3C393D4A713E60C73E6EFF3E6FFF3C6CFF3B6BFF3B6A
+      FF3A69FF3A69FF3968FF3867FF3767FF3666FF3665FF3564FF3464FF3363FF32
+      62FF3261FF3161FF3060FF2F5FFF2F5FFF2E5EFF2D5DFF2D5CFF2B5BFF2A5BFF
+      2A5AFF2959FF2958FF2858FF2758FF2657FF2556FF2455FF2455FF2354FF2253
+      FF2152FF2152FF2051FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4CFF1A
+      4BFF194AFF1849FF164AFF1649FF1B42CE2536702F2F2E322F26333231353535
+      3737373838383A3A3A3C3C3C3D3D3D3D3D3D3D3D3D3D3D3D3D3D3D3B3B3B3A3A
+      3A3A3A3A3939393737373535353333333131313030302D2D2D5D5D5DB0B0B0AF
+      AFAFABABABA8A8A8A4A4A4A1A1A19C9C9C9898989595959190908A8A8A858586
+      8382827E7E7E7D7D7D7A7A7A777776747373706F6F6C6C6C6969696465656262
+      625F60605C5C5C5959595656565454545152514E4F4E4C4C4C4A494948474745
+      44444343434040413E3F3E3D3C3C3C3B3B3B3A39393839363737343333333333
+      31303130302F2F2E2E2D2D2E2A2A2A2424242424232223232323232324233333
+      343C3C3C4140414747464C4C4B5151502D2D2D1D1D1D1C1D1D1C1C1C1C1B1B1C
+      1B1B1B1B1B1B1B1B1B1B1B1A1B1A1A1B1A1A1A1A1A1A1A1A1A1A1A1A191A1A1A
+      1919191A19191919191819191919181818181918181818181818181818181818
+      181817181B1B1B25252526262626262627262727272723232417171717171717
+      17161617171617161818181B1B1B1B1B1A1B1A1B1B1B1A1A1A1A191919171717
+      1617171716171617161717171818181818171817171817171717161716161716
+      1616161616161615151616151516151615151615151515151515151514141414
+      14141414141414141414131616151B1B1C1C1C1B1C1B1B1C1C1B161515141413
+      1413141313131313131312121212121211111212111211111111111111111011
+      1111111010101110101010111110101010100F0F0F10100F100F10100F100F0F
+      0F0F0F0F0F0F0E0F0F0F0F0F0E0F0F0E0E0E0D0E0E0D0E0D0D0D0D0C0D0D0D0C
+      0D0D0D0C0C0C0B0B0B0B0B0B0B0B0B0B0B0B0B0B0A0B0B0B0B0B0C0D0D0D1F1F
+      1F2828282E2D2E33323238383814141407070707070707070606070607070606
+      07070606070706070F0F0F060606303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303131313E3E3E4242424747474C4C4C4C4C4C4747473F3F3F3939
+      3930303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303333333939393A3A3A3B3B3B3D3D3D3E3E3E3F3F3F3F3F3F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F353535393938393838393838393838393838393838383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838383738383738383738373738373738373738373738373737373737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737373737373838383838373737373636363636363434343333333434343434
+      343535353636363737373737373737373838383939393C3B3B3C3B3B3D3C3D3F
+      3E3F4040404141414242424444444545454747474848484B4B4B4C4C4C4E4E4E
+      4F4F4F5252525454545757575959595B5B5B5E5E5E6060606363636666666A6A
+      6A6C6C6C7070707473737777777A7A7A7D7D7D8080808383838787878A8A8A8E
+      8E8E9292929595959999999D9D9DA0A0A0A4A4A4A7A7A7ABABABAEAEAEB2B2B1
+      B5B5B4A5A5A59595959393938F8F8F8C8C8C8787878181817C7C7C7777777272
+      726D6D6D6868686464646060605E5E5E5959595656565252524E4E4E4A4A4A46
+      464743434341403F3E3C353D3C3A3D49703D5DC03D6BFB3C6EFF3B6CFF3B6AFF
+      3A69FF3A69FF3968FF3867FF3767FF3666FF3665FF3564FF3464FF3363FF3262
+      FF3261FF3161FF3060FF2F5FFF2F5FFF2E5EFF2D5DFF2D5CFF2B5BFF2A5BFF2A
+      5AFF2959FF2958FF2858FF2758FF2657FF2556FF2455FF2455FF2354FF2253FF
+      2152FF2152FF2051FF1F50FF1F50FF1E4FFF1D4EFF1C4DFF1B4CFF1A4DFF194D
+      FF194AFC1E41C126366D2E2E2F302D2331302E3131323434343636363838383A
+      3A3A3B3B3B3D3D3D3E3E3E3E3E3E3D3D3D3D3D3D3C3C3C3C3C3C3A3A3A393939
+      3838383737373535353232323030302D2D2D6B6B6BB3B3B3B0AFB0ABABABA8A8
+      A8A4A4A4A0A0A19C9D9D99999A9596959292928D8D8D8687878382837F7F7F7B
+      7B7B7B7A7A7878777574747171716E6D6D6A6A6A6666666464646161615C5D5D
+      5A5B5A57585855555552525250504F4D4D4D4B4A4A4848484645454443434342
+      423F3F3E3D3D3E3D3C3C3B3B3A3A393939373836363533333433323331313230
+      30302E2D2E2D2C2D25262624252424242523232323232229292A3B3A3A3F3F3F
+      454545494A4A504F503738371E1E1D1D1D1D1D1C1C1B1C1C1C1B1C1C1B1B1B1B
+      1B1B1C1B1B1B1B1B1B1B1B1B1B1A1A1B1B1A1B1A1A1A1A1A1A1A1A1A191A1919
+      1A19191A19191919191919191919191819181919181818181818181818181818
+      1717182020202625252626262526262727272828281B1B1B1717171717171717
+      171617171617171B1B1A1B1B1B1A1B1B1A1A1A1B1A1A1A1A1A17171717171717
+      1717171716171817181818181817181817181717181617171716171616161616
+      1616161615161616161615151516151515151515151515151514151414141414
+      141514141414141515151C1C1B1C1C1B1C1B1B1C1B1B18181713141314141414
+      1413131313141313121212131212121211121111121112111111111111111110
+      11111010111011101011101110101010101010100F0F0F0F10100F0F100F0F0F
+      0F0F0F0F0F0F0F0E0E0F0F0E0E0E0E0E0E0D0E0D0D0D0D0D0D0D0D0D0B0B0B0B
+      0C0B0C0B0B0B0B0B0B0B0B0A0B0B0B0B0A0C0C0B0C0B0C0F0E0E2020202A2A2A
+      3030303434353939391B1A1A0707070707080707070707060606070706060606
+      060606070F0F0F06060630303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303535353A3A3A383838343434303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3232323838383A3A3A3B3B3B3D3D3D3E3E3E3D3D3D2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F36363639393839383839383839383839383839383838383838383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838373838373837373837373837373837373837373737373737373737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737383838383838383837383837393838393838393838393938383838373737
+      3737373837373837373737373838383939393A3A3A3C3B3B3C3B3B3E3D3E3F3E
+      3F4040404141414343434444444646464747474949494B4B4B4D4D4D4F4F4F50
+      50505353535555555757575A5A5A5D5C5C5F5F5F6363636666666969696C6C6C
+      6E6E6E7171717575757878787A7A7A7E7E7E8181818484848888888A8A8A8E8E
+      8E9292929595959999999D9D9DA0A0A0A4A4A4A7A7A7ABABABAEAEAEB2B2B1B5
+      B5B4A7A7A79595959494949090908D8D8D8888888383837D7D7D787878737373
+      6E6E6E6969696565656262625F5F5F5B5B5B5858585555555151514C4C4C4949
+      4945454543434340403F3F3C353D3C373C445E3D56A53C66E63C6CFF3B6CFF3A
+      6AFF3A69FF3968FF3867FF3767FF3666FF3665FF3564FF3464FF3363FF3262FF
+      3261FF3161FF3060FF2F5FFF2F5FFF2E5EFF2D5DFF2D5CFF2B5BFF2A5BFF2A5A
+      FF2959FF2958FF2858FF2758FF2657FF2556FF2455FF2455FF2354FF2253FF21
+      52FF2152FF2051FF1F50FF1E50FF1E50FF1C50FF1C4EFF1D49E92340A62B3559
+      2F2E2A302D2430302E3131313333333434343636363838383A3A3A3C3C3C3D3D
+      3D3D3D3D3E3E3E3E3E3E3E3E3E3D3D3D3C3C3C3C3C3C3A3A3A39393937373735
+      35353434343232322F2F2F757474B3B3B3B0B0AFACABACA8A8A9A4A4A4A1A1A1
+      9D9C9D9A9A999695969292928E8E8E8989898383838080807B7C7C7878787979
+      797575747272726F6E6E6C6B6B6867686565656161615E5E5E5C5C5C58585855
+      55555352525050504D4E4E4C4C4C4949484748474645454342424140403F3E3E
+      3D3D3C3C3C3B3A3A3A3939383837373534343334333132313031302F2F2F2E2E
+      2E2B2A2B2524252425242324232323232424243433343D3D3E4342424848484D
+      4D4D4A4B4B1E1E1E1D1E1D1D1E1D1C1C1D1C1C1C1C1B1C1B1C1B1C1C1B1B1B1C
+      1B1B1B1B1A1B1B1B1B1A1B1B1B1A1A1B1A1A1A1A1A1A191A1A1A1A191A1A191A
+      191A191919191919191919191819191918181818181818181818181818181818
+      1919232323252525262626272726272727242424171717171717171717161717
+      1616161A191A1B1B1B1B1B1B1B1A1B1A1B1A1B1A1A1818181717181717171717
+      1718171818191918181818181718181718171718161717171617161616161616
+      1616151616151515151516151516151515141514151415151415151514141414
+      1415151414141B1C1C1C1C1B1C1C1B1C1B1B1918181414141414141414131313
+      1314131313121213121213111212121112111211111111111111111010111110
+      1111101110101010101010101010101010100F10100F101010100F0F0F0F0F10
+      0F0F0F0F0F0F0E0E0F0E0E0E0E0E0E0D0D0E0C0D0C0C0C0C0C0C0C0C0B0C0B0C
+      0C0B0B0B0B0B0C0C0C0C0C0C0C0D0D0E1110101D1D1C2828282E2E2E33333338
+      38383C3C3C222221080707070708070807070707070707060707060706070706
+      0F120F0606063030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303033
+      33333939393A3A3A3C3C3C3D3D3D3B3B3B2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      3939383939383938383938383938383938383938383838383838383838383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3837383837383837383737383737383737383737383737373737373737373737
+      3737373737373737373737373737373737373737373737373737373737373838
+      383838383838373838373938383938383938383938383A39393939393A3A3A3B
+      3B3B3B3B3B3B3B3B3C3B3B3C3C3C3D3D3D3D3D3D3E3E3E3F3F3F414141414141
+      4343434444444545454747474848484A4A4A4C4C4C4D4D4D5050505252525454
+      545756565958585B5A5A5D5C5C5F5F5F6262626464646666666A6A6A6C6C6C6F
+      6F6F7272727575757878787B7B7B7F7F7F8181818585858888888B8B8B8F8F8F
+      9292929595959999999D9D9DA0A0A0A4A4A4A7A7A7AAAAAAAEAEADB1B1B1B5B5
+      B4ACACAC9797979494949191918E8E8E8A8A8A8585857F7F7F7A7A7A75757570
+      70706C6C6C6767676363636161615D5D5D5A5A5A5656565353534F4F4F4C4C4C
+      4848484646464343444141403F3D383D3B333C3F463C4B7B3B59B53B66ED3A6A
+      FF396BFF3969FF3868FF3767FF3666FF3665FF3564FF3464FF3363FF3262FF32
+      61FF3161FF3060FF2F5FFF2F5FFF2E5EFF2D5DFF2D5CFF2B5BFF2A5BFF2A5AFF
+      2959FF2958FF2858FF2758FF2657FF2556FF2455FF2455FF2354FF2253FF2152
+      FF2153FF1F53FF1F51FF1F4DF02344B9293A792E323E302E25312F2831313032
+      32323333333434343636363737373939393B3B3B3D3D3D3D3D3D3E3E3E3E3E3E
+      3E3E3E3F3F3F3F3F3F3E3E3E3C3C3C3B3B3B3A3A3A3939393737373434343333
+      333A3A3A868686B3B3B3AFAFAFABACACA8A8A8A4A4A4A1A1A19D9D9D9A9A9A95
+      96969292928E8E8E8B8B8B8584848080807D7D7D787878777677767676727272
+      70706F6C6D6C696968666565636262605F5F5C5C5C5A5A5A5757565353545252
+      51504F4F4D4D4D4A4A4A484848464646444343434242403F3F3E3D3D3C3C3C3C
+      3B3B3A3A3A3939393838363535353332333232313030302E2F2E2E2E2E282828
+      2525252525242423232323242626273B3B3B3F3F3F4545464B4C4B5050513131
+      311D1E1E1E1E1E1D1D1D1C1C1C1C1C1C1C1C1C1C1C1B1B1C1B1C1C1B1B1B1C1B
+      1B1B1B1B1B1B1A1B1B1B1A1A1B1A1A1A1A1A1A1A1A1A1A1A191A191A19191919
+      1A19191919191918191919191818181918181818181818181818181817171D1D
+      1C24242425252526262627272627272819191918171717171717171717171618
+      17171C1C1B1B1B1B1B1B1B1B1B1A1A1B1A1A1919171717171818171717161717
+      1818191819181918181818181818171717171817161716171716161616161616
+      1616161616161516151515151515151515151515151515151414141514141414
+      14141A1A191C1C1C1C1C1C1B1B1B1B1919141414141414131414141414141313
+      1312131312121312121311121211111112121111111111111111111110111110
+      111011111010101010101010101010100F0F100F0F0F1010100F0F0F0F0F0F0F
+      0F0F0F0E0E0E0E0E0D0C0E0C0D0C0C0C0C0C0C0C0C0C0C0B0C0B0C0C0B0C0D0D
+      0C0C0C0D0E0D1010101A1A192424242827272C2C2C3131313737373A3A3A3C3B
+      3C212221080807070707080707070707070707070707060706070706120F0F06
+      0606303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303333333838
+      383939393B3B3B3D3D3D3736372F2F2F2F2F2F2F2F2F2F2F2F2F2F3039393839
+      3938393938393838393838393838393838393838383838383838383838383838
+      3838383838383838383838383838383838383838383838383838383838373838
+      3738383738373738373738373738373738373737373737373737373737373737
+      3737373737373737373737373737373737373737373737373737373737383838
+      3838373838373838373938383938383938383A39393A39393939393A3A3A3B3B
+      3B3B3B3B3B3B3B3D3D3D3E3E3E3E3E3E3F3F3F40404041414142424243434345
+      45454646464747474A4A494A4A494C4C4B4E4D4D504F4F515050535252555454
+      5857575A59595B5B5B5E5D5D5F5F5F6262626565656767676A6A6A6D6D6D6F6F
+      6F7272727575757878787C7C7C7F7F7F8282828585858888888B8B8B8F8F8F92
+      92929595959999999D9D9DA0A0A0A3A3A3A7A7A7AAAAAAADADADB0B0B0B4B4B4
+      B0B0B09B9B9B9595959292928F8F8F8B8B8B8686868181817C7C7C7878787373
+      736E6E6E6A6A6A6565656262626060605C5C5C5959595656565252524F4F4F4B
+      4B4B4848484646464444444242423F3E3C3E3B343C3A353B3F4A3B4A793A55AD
+      3960DE3967F93869FF3669FF3668FF3566FF3565FF3464FF3363FF3262FF3261
+      FF3161FF3060FF2F5FFF2F5FFF2E5EFF2D5DFF2D5CFF2B5BFF2A5BFF2A5AFF29
+      59FF2958FF2858FF2658FF2657FF2556FF2457FF2357FF2355FF2251F9234CDD
+      2643AA2A3A752E3242312F2A32302632312E3333323333333535353636363737
+      373838383A3A3A3B3B3B3D3D3D3E3E3E3F3F3F3F3F3F4040404040403F3F3F3F
+      3F3F3F3F3F3E3E3E3C3C3C3B3B3B393939373737363636343434464646999898
+      B3B2B2AFAEAEABABABA8A8A8A4A5A5A1A1A09D9D9D9A9A9A9696969292928E8E
+      8E8C8B8C8787878181817D7D7D7979797676767373737473747170706D6D6D69
+      69696767666363636060605E5D5E5B5A5A5757575554555352535150504E4E4D
+      4B4B4B4848494746474545454444444140403F3F3F3E3D3D3B3B3A3A3B3B393A
+      3A3838373637373433333232313131312E2F2F2F2F2E2F2E2F25262525252524
+      2424222223242423302F2F3D3D3D4140414748484D4D4D4B4B4B1F1E1E1E1E1E
+      1E1E1E1D1D1D1D1D1D1C1D1C1D1C1C1C1C1C1C1C1B1C1C1C1B1B1B1B1C1B1B1B
+      1C1B1B1B1B1B1B1B1A1B1A1A1B1B1B1A1A1A1A1A191A1A191A191A1919191919
+      19191A1919181919181919181918181818181918181818181818171818222222
+      2424252525252526262627271D1E1E1718181818171717171717171717171B1B
+      1B1C1C1B1B1C1B1B1B1B1B1B1A1A1A1917181818181817171717171719181918
+      1919181819181818181817181817181717181617171617171716161616161616
+      1616161515151615151516151515151515141515141514141414151514141919
+      191C1C1C1C1C1C1C1C1C1C1B1B14141414141414141413141413131313131313
+      1212131212131212121212121112111112121111111111111111111110101110
+      111010111011101110101010101010100F10100F101010100F100F0F0E0F0E0E
+      0E0D0D0D0D0C0C0D0C0C0C0D0C0D0C0C0C0C0C0D0D0D0D0D0D0E0D0E100F0F19
+      19192222222626262828282D2D2D3131323736363939393C3C3C3D3D3D282727
+      08070807080707080708070707070707070707070706070712120F0706073030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030333333373737393939
+      3B3B3B3D3D3D3434342F2F2F2F2F2F2F2F2F2F2F2F3131313939393939383939
+      3839383839383839383839383839383838383838383838383838383838383838
+      3838383838383838383838383838383838383838383838383838383837383837
+      3837373837373837373837373837373737373737373737373737373737373737
+      3737373737373737373737373737373737373737373737373738383838383838
+      38373838373938383938383938383938383A39393939393A3A3A3B3B3B3B3B3B
+      3B3B3B3C3C3C3D3D3D3E3E3E3F3F3F4040404040404242424242424444444545
+      454646464848484A4A494B4B4A4D4C4C4E4D4D51505052515154535355545458
+      57575A59595C5B5B5E5E5E6060606262626565656767676A6A6A6D6D6D707070
+      7373737575757878787C7C7C7F7F7F8282828585858888888B8B8B8F8F8F9292
+      929595959999999C9C9CA0A0A0A3A3A3A6A6A6A9A9A9ACACACB0B0B0B3B3B3B2
+      B2B2A0A0A09595959393939090908C8C8C8888888383837F7F7F797979757575
+      7171716C6C6C6868686565656161615E5E5E5B5B5B5858585555555252524F4F
+      4F4C4C4C4949494747474545454242424040403F3E3B3E3B343D3B343B3C403A
+      425B3A4C853954AA375BCF3761EB3564F93565FF3465FF3366FF3264FF3263FF
+      3162FF2F61FF2F60FF2E60FF2E5FFF2D5EFF2C5EFF2B5DFF2A5DFF295CFF285C
+      FF285AFF2859FF2757FA2754ED284DCD2945A52B3D802D36542F3035312E2732
+      2F2532312D3333323434343535353636363737373939393A3A3A3B3B3B3C3C3C
+      3D3D3D3F3F3F4040404040404141414141414141414141414141413F3F3F3E3E
+      3E3E3E3E3C3C3C3B3B3B3939393737373535355A5A5AA5A4A5B2B1B1AFAEAFAB
+      AAABA7A7A7A4A3A4A1A1A19D9D9D9999999696969292928E8E8E8C8C8C888888
+      8485847D7D7D7979797676767373737171707071716D6D6D6A6B6A6767676464
+      646161605E5E5D5C5C5C5A58585756565353535151514E4E4D4B4C4C4A494948
+      48484646464444434242423F40403F3E3E3C3D3C3B3A3A3A3A3A393939373636
+      3535363232333232323030302F2E2E2E2F2F2C2B2C2525252525252424242423
+      232425253536363D3D3D4444444949494F4F4F3534351E1E1F1E1E1E1E1E1E1D
+      1D1D1D1D1D1D1C1C1D1C1D1C1C1C1C1C1C1C1C1C1C1C1B1B1C1B1B1B1C1B1B1B
+      1B1B1B1B1B1B1B1A1B1A1B1B1A1A1A1A1A1B1A1A1A1A191A19191919191A191A
+      191919191819191919191919181918191818181818181818181D1D1D24252425
+      25262626262727272525251817181718171717171717171717171B1A1A1B1C1C
+      1C1C1B1B1B1B1B1B1A1A1B1A1917171818171718181717171818181819191818
+      1818181819181818181717171718171718161717161617161616161616161616
+      16161616161616151515151515151515151515151415141414151818181C1C1C
+      1C1C1C1C1C1B1B1B1C1514151414151414141413141314141313131312131312
+      1213131213121212121112111212111111111211111111111111111110101111
+      10101110101010101010101010100F0F0F0F10100F0E0F0D0D0D0E0D0D0C0D0D
+      0D0D0D0D0C0C0D0C0D0D0E0E0D0D0D0E0E0E0F0F0E1617172121212525252829
+      282B2B2C3030303232323737373A39393D3D3D35353515151508080808080708
+      0807080707070807070708070707070707070706120F12060707303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303434343636363838383A3A3A3D
+      3D3D3232322F2F2F2F2F2F2F2F2F2F2F2F333333393939393938393938393838
+      3938383938383938383938383938383838383838383838383838383838383838
+      3838383838383838383838383838383838383838383838383738383738383738
+      3737383737383737383737383737373737373737373737373737373737373737
+      3737373737373737373737373737373737373737373838383838383838373838
+      373838373938383938383938383A39393939393939393A3A3A3B3B3B3B3B3B3B
+      3B3B3C3C3C3E3E3E3E3E3E3F3F3F404040414141424242434343454545464646
+      4747474949484A4A494C4B4B4D4C4C4E4D4D5150505251515454545655555858
+      585A59595C5B5B5E5E5E6060606262626565656868686A6A6A6D6D6D71717173
+      73737575757979797C7C7C7F7F7F8282828585858888888B8B8B8F8F8F929292
+      9595959999999C9C9C9F9F9FA2A2A2A5A5A5A9A9A9ABABABAFAFAFB2B2B2B4B4
+      B4A7A7A79696969494949292928E8E8E8A8A8A8686868181817C7C7C78787874
+      74747070706B6B6B6767676464646161615E5E5E5B5B5B595959555555525252
+      5050504D4D4D4A4A4A4848484646464343434242424141403F3F3D3E3C383D3A
+      313C3A323C3C3D3B3D453A425B394776374B8C374FA03553B13454C13456C933
+      59D93159DD3058DD3058DD2F57DD2E56DB2F51C92E4FC22E4CB12E489F2F448B
+      2F3E74313A5931343D32323332302733302633322C3332303333333535353636
+      363737373838383939393B3B3B3C3C3C3D3D3D3E3E3E3F3F3F40404041414141
+      41414343434343434343434242424242424141414141414040403E3E3E3D3D3D
+      3C3C3C3A3A3A383838393939757576ADADAEAFAFAFAEADAEAAA9A9A7A7A7A3A3
+      A3A0A0A09D9D9D9999999696969392928F8E8E8C8C8C88888885858581818179
+      79797677767474747070706F6F6F6E6E6D6B6C6C6868686564646262625F5F5E
+      5C5C5C5A59595757565453535251514F4F4F4D4D4D4B4B4B4949494747474444
+      444242424041413F3F3E3E3E3D3C3B3B3B3A3A3B3A3A38383737373735353533
+      33333131312F2F2F2F2F2F2D2E2E29292A252626242424232323232323262626
+      3B3C3B3F3F404444444B4B4B5050502425251F1F1E1F1E1F1E1E1E1D1D1D1D1C
+      1D1C1C1D1D1D1C1D1C1C1C1C1C1C1C1C1C1C1C1C1C1C1C1B1B1C1B1C1B1B1C1B
+      1B1B1B1A1B1A1A1A1A1A1B1B1B1A1A1A1A1A1A1A1A1A1A19191A1919191A1A19
+      191919191919181918181818181818181818181818191A1A2424242524252525
+      252626262728281819181717181717171717171717171919191B1B1B1C1B1B1B
+      1B1B1B1B1B1B1B1A191919191717171817181717191818191919181919181818
+      1818191918181818171818171817171717171717161716161617161616161616
+      151515151615161616151515151415151515141414141819181D1C1C1C1C1C1B
+      1C1B1C1C1B151415141414151414141414141414141313141313141312131212
+      1312121211111212121112111111121111111111111111111111101111101010
+      111011101010101010100F0F0F0D0D0D0E0D0E0E0D0E0D0D0E0D0D0D0C0D0C0E
+      0E0D0E0E0E0D0D0D100F0F1414141F1F1F2526262929292C2C2B2F3030333232
+      3535353838383A3A3A3839391C1C1D0908080808080808080807080808070808
+      0808070707080808070707070707070712121206060730303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303434343636363838383A3A3A3D3D3D2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F35343439393939393839393839393839383839
+      3838393838393838393838383838383838383838383838383838383838383838
+      3838383838383838383838383838383838383838373838373838373837373837
+      3738373738373738373737373737373737373737373737373737373737373737
+      3737373737373737373737373737373737373737383838383837383837383837
+      3938383938383938383938383A39393939393A3A3A3B3B3B3B3B3B3B3B3B3C3C
+      3C3D3D3D3E3E3E3F3F3F3F3F3F40404042424242424243434345454546464647
+      47474949484A4A494C4B4B4D4D4D4F4E4E515050535252545454575656585858
+      5B5A5A5C5C5C5F5F5F6161616363636666666868686B6B6B6D6D6D7171717373
+      737676767979797C7C7C7F7F7F8282828585858888888B8B8B8E8E8E92929295
+      95959898989B9B9B9E9E9EA2A2A2A4A4A4A8A8A7ABABABAEAEADB1B1B1B5B4B4
+      AEAEAE9B9B9B9595959393939090908C8C8C8989898484847F7F7F7B7B7B7777
+      777373736E6E6E6A6A6A6666666363636161615E5E5E5B5B5B58585856565653
+      53535151514E4E4E4C4C4C494949484848464646444444424242414141403F3F
+      3F3E3D3E3D3B3E3C373C3A333C392F3C392F3B39333A3A383A3939393A3E393A
+      3F38393E37393D37393D37383C36363636353436342F37342937332936342C36
+      352F3635323635343636353737373737373737373838383939393B3B3B3C3C3C
+      3C3C3C3E3E3E3F3F3F4040404141414242424343434343434444444444444444
+      444444444545454444444242424242424040404040403E3E3E3C3C3C3B3B3B3A
+      3A3A4D4D4D939393AFB0B0ABABABABAAAAAAAAAAA6A5A5A3A2A2A0A0A09C9C9C
+      9999999595959292928E8E8E8C8B8B8888888585858181817E7E7E7676777474
+      747070706D6D6E6C6C6C6C6C6C6868686566666362626060605D5D5D5B5B5A58
+      5857565554535252504F4F4E4E4E4B4B4B494949474746444444444343414241
+      3F3F3F3E3E3E3C3C3B3A3A3A3A3A3A3938383837373636363534343132323031
+      3130302F2F2F2F2E2D2E28282826262525242523232323242429292A3C3C3C42
+      42424546454C4C4C4848481F1F1F1F1E1F1E1F1E1D1D1E1D1D1D1D1D1D1D1D1D
+      1D1C1D1D1D1C1D1C1C1C1C1C1C1C1C1C1B1C1B1C1B1B1B1B1B1B1B1B1B1B1B1B
+      1B1B1B1A1A1A1A1B1B1B1B1A1B1A1A1A1A1A1A1A191A1A1A1A19191A19191919
+      1919181919181919191918191918181818181818222122252525262525262626
+      2727271C1C1C1817181818181817171717181818181C1C1C1C1B1B1C1C1B1C1B
+      1B1B1B1A19191919191918181718181818181819191919191919191918191918
+      1918191818181817181817181717181617171716171716161616161616161616
+      1516151616151515161515151515141515151717161D1D1C1D1C1C1C1C1C1C1C
+      1C16171615141514141414141414141413131313131314121213131213121212
+      1212121212121212121212121111111111121211111111101111111111111111
+      1010110F0E0E0E0D0E0E0D0E0D0D0E0E0D0E0D0D0D0D0D0D0F0E0E0E0D0E100F
+      0F1312131E1F1E2626262929292B2B2B2E2F2E323232343534383838393A3A37
+      37372222220C0C0C080809090808090809080808080808080808080808070808
+      0707080708080707070707071212120707073030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303131313434343636363838383B3B3B3C3C3C2E2E2E2F2F2F
+      2F2F2F2F2F2F2F2F2F3636363939393939393939383939383938383938383938
+      3839383839383838383838383838383838383838383838383838383838383838
+      3838383838383838383838383838383838383837383837383737383737383737
+      3837373837373737373737373737373737373737373737373737373737373737
+      3737373737373737373737373737373738383838383838383738383738373739
+      38383938383938383A39393939393939393A3A3A3B3B3B3B3B3B3B3B3B3C3C3C
+      3E3E3E3E3E3E3F3F3F4040404141414242424242424444444545454646464848
+      474A4A494A49494C4B4B4E4D4D504F4F5150505352525554545756565958585A
+      5A5A5C5C5C5F5F5F6161616363636666666969696B6B6B6E6E6E717171737373
+      7676767979797C7C7C7F7F7F8282828585858888888A8A8A8E8E8E9292929494
+      949797979B9B9B9D9D9DA0A0A0A4A4A4A7A7A6AAAAA9ADADADB0B0B0B3B3B3B4
+      B4B4A5A4A49595959494949191918F8F8F8B8B8B8787878282827E7E7E7A7A7A
+      7676767272726E6E6E6A6A6A6666666363636161615E5E5E5B5B5B5959595757
+      575454545252524F4F4F4D4D4D4C4C4C4A4A4A47474746464645454544444443
+      43434242424040404040403F3F3F3F3E3E3E3E3D3D3D3B3C3B393C3B393C3B39
+      3B3A383B3A383B3A383A3A383A3A383A3A393A3A3A3A3A3A3A3A3A3A3A3A3B3B
+      3B3B3B3B3B3B3B3C3C3C3D3D3D3D3D3D3E3E3E3F3F3F40404041414141414142
+      4242434343444444454545454545454545454545464646474747464646454545
+      4545454444444343434242424040403F3F3F3E3E3E3C3C3C3A3A3A6E6E6EA8A8
+      A9ADADAEAAABABA7A7A7A7A6A6A5A5A5A3A3A29F9F9F9B9B9B99999994949491
+      91918F8F8E8C8C8C8887878585858281817E7E7F7A7A7A7474747171716D6D6D
+      6A6A6A6A6A6A6969696666666364646060605D5D5E5B5B5B5859585656555353
+      535151504E4E4E4E4C4C4A4949484848464646444544424142403F403F3F3F3D
+      3D3D3B3A3B3A3A3A393A3A383837373636373636343433303131302F30302F30
+      2E2F2E2D2E2D2828272525252424242323232324243030303D3C3D4141414748
+      474D4D4D3E3E3E1F1F1F1E1F1F1E1F1E1D1D1D1E1D1D1D1D1D1D1D1D1D1D1D1C
+      1D1C1C1C1D1C1C1C1C1D1C1C1C1C1C1B1B1C1C1B1B1B1B1B1B1C1B1B1C1B1B1B
+      1A1B1B1A1A1B1A1A1B1A1A1A1A1A1A191A1A191A1919191919191A1A1A1A1919
+      191919191919191818181819181818181E1F1F2424232524252626262728271F
+      1F201818181818181818181717171818191C1C1C1C1C1C1C1C1B1B1B1B1B1B1A
+      1A1A1A1919191819191918171918191A19191919191919191819191919191919
+      1918181818181718181717171717161717161717161616161616161616161615
+      15161515151515151515151515151717171C1D1C1D1C1D1C1C1C1C1C1C171616
+      1415151515141414141414141414141413131413131412121313121312131212
+      121212121211121212121212111112111111111111111011110F0E0F0E0E0F0E
+      0D0E0E0D0E0E0D0E0E0D0E0E0D0E0E0E0E0E0E0F100F0F1213121C1D1D252626
+      2928292C2B2B2E2E2E3131313535353838383839393A3B3A2828290C0D0C0909
+      0909090809090909090908090808080908080808080808070807080808070708
+      0707080807080707121212070707303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303131313434343737373939393B3B3B3A3A3A2E2E2E2F2F2F2F2F2F2F
+      2F2F2F2F2F383837393939393939393938393938393938393838393838393838
+      3938383938383838383838383838383838383838383838383838383838383838
+      3838383838383838383838383838383738383738383738373738373738373738
+      3737383737373737373737373737373737373737373737373737373737373737
+      3737373737373737373737373737373838383838373838373838373938383938
+      383938383938383939393939393A3A3A3A3A3A3B3B3B3B3B3B3C3C3C3D3D3D3E
+      3E3E3E3E3E3F3F3F404040414141424242434343454545464646474746484847
+      4A49494B4A4A4D4C4C4E4D4D504F4F5150505352525554545857575958585B5B
+      5B5D5D5D5F5F5F6262626464646666666969696B6B6B6E6E6E71717173737376
+      76767979797C7C7C7F7F7F8282828585858888888A8A8A8E8E8E919191949494
+      9696969A9A9A9D9D9DA0A09FA3A3A2A6A6A6A9A9A9ABABABAFAEAEB2B1B1B4B4
+      B4ADADAD9C9C9C9595959393939090908D8D8D8A8A8A8585858282827E7E7E7A
+      7A7A7676767272726E6E6E6B6B6B6868686464646161615E5E5E5C5C5C5A5A5A
+      5858585656565353535151514F4F4F4E4E4E4D4D4D4A4A4A4949494848484747
+      4746464645454544444443434343434343434341414141414140404040404040
+      40403F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F404040404040404040
+      4040404040404242424343434343434444444444444545454646464646464747
+      4747474748484848484848484848484847474748484848484846464645454544
+      44444343434242424141413F3F3F3D3D3D555555959595B2B2B2ACACADA8A8A9
+      A5A6A6A3A3A3A2A2A2A1A1A19E9E9E9C9B9B9998989494949191928E8E8E8B8B
+      8B8888888585858282827E7E7E7B7C7B7878777171716E6E6E6A6A6A68676869
+      69696666666464646160605F5F5E5C5C5C595A5957575754545452525150504F
+      4D4D4C4A4949494848474646454545434343414140403F403D3E3D3C3C3C3A3A
+      3A3A3A3A3939393939383737363635353433333030303030302F2F2F2E2E2F2D
+      2D2D2626262424242324242222222324232F2F2F3E3E3E4241424747484D4D4D
+      3938382020201F1F1F1D1E1E1D1E1E1E1D1D1D1E1E1D1D1D1D1D1D1D1D1D1D1D
+      1D1C1C1C1D1C1D1C1D1C1C1C1C1C1C1C1B1C1B1B1B1B1B1B1C1B1C1C1B1B1B1B
+      1A1B1A1B1A1B1A1B1A1A1A1A1A1A1A1A1A191A1A191A1919191A1A1A19191919
+      1819191919191818191819181E1E1E2424242525252626262728281F1F201818
+      181817181817181717181817181C1C1C1C1C1C1B1C1B1C1B1B1B1B1B1B1B1A19
+      191A1919191919191818191A1A1A19191A191919191919181919181818181919
+      1818181818171818171717171816161716171716161616161616151616161515
+      161515161516161515151717171C1D1C1D1D1B1C1C1D1C1C1C17171615151415
+      1415141414141414141414141313131313131212141212131212121213121212
+      1211121111121112111211121111111010100F0F0F0E0E0F0E0D0F0E0D0E0E0D
+      0F0E0D0F0F0E0F0F0E0F0F0F0F1213131B1B1B2424252828282B2B2B2E2F2F30
+      31313534343738373939393B3B3B2E2F2F10100F0A0A09090A090909090A0909
+      0909090809080808090809080908090909080908080808080807080708080707
+      0807070712121207070730303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3232323535353737373939393B3B3B3737372E2E2E2F2F2F2F2F2F2F2F2F2F2F
+      2F39393939393939393939393839393839393839383839383839383839383839
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838383838383838383838373838373837373837373837373837373837
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737373737373737373737383838383837383837383837383737393838393838
+      3938383A39393939393939393A3A3A3B3B3B3B3B3B3B3B3B3C3C3C3D3D3D3E3E
+      3E3F3F3F3F3F3F4040404242424242424343434545454646464747464949484A
+      49494C4B4B4D4C4C4E4D4D5150505251515453535554545857575959595B5B5B
+      5D5D5D5F5F5F6262626464646666666969696C6C6C6E6E6E7171717373737676
+      767979797C7C7C7F7F7F8181818484848787878A8A8A8D8D8D90909093939396
+      96969999999C9C9B9F9F9EA2A2A2A4A4A4A8A7A7AAAAAAACACACAEAEAEB1B1B1
+      B2B2B2A7A7A79898989494949292928F8F8F8C8C8C8888888585858181817E7E
+      7E7A7A7A7676767373736F6F6F6C6C6C6868686565656262626060605E5E5E5C
+      5C5C5A5A5A5858585555555454545353535151514F4F4F4D4D4D4D4D4D4B4B4B
+      4A4A4A4949494848484747474747474747474646464545454545454545454444
+      4444444444444443434344444444444444444444444445454545454546464646
+      46464646464747474848484848484949494949494949494A4A4A4A4A4A4A4A4A
+      4A4A4A4B4B4B4B4B4B4A4A4A4A4A4A4949494848484848484646464444444444
+      444242424040404848487E7E7EB1B1B1B1B1B1ABABABA8A8A8A5A4A5A1A1A29E
+      9E9E9E9E9E9D9D9D9A9A9A9797969594949191908D8D8E8A8A8B888888848484
+      8181817E7E7E7B7B7B7878787574746E6E6E6A6A6A6867686565656666666464
+      646161615F5F5F5C5C5C5A5A5A5757575454555353535050504E4E4D4B4B4B4A
+      4A4A48474845454544434342424240403F3E3F3F3C3C3C3B3A3A3A3A3A383838
+      3938383838373636363635353332323030302F2F2F2F2F2F2D2E2E2E2D2E2525
+      252424242323232323232423233535343E3E3E4242424848484D4D4D2F2E2F20
+      1F201F201F1E1E1E1E1E1E1E1E1E1D1D1E1E1D1E1D1D1D1C1D1D1D1C1D1D1D1C
+      1D1C1C1C1C1C1D1C1C1C1C1C1B1C1C1C1B1C1C1C1C1B1B1C1B1B1B1A1B1B1A1A
+      1B1B1A1A1A1A1B1A1A1A1A1A1A1A1A191A19191A191A19191919191919191919
+      19191918181918191C1B1C232423252525262626272727242524181819181818
+      1818171718171718181C1C1C1C1C1C1C1C1C1B1C1B1C1C1B1A1B1B19191A1A19
+      191919191919191A1A19191A1A1A191919191919191919191918181919181918
+      1818181817181817181717171617171716171617161616161616161616151616
+      1515161615161717171D1C1B1D1D1C1D1D1C1C1C1C1717161515151515151514
+      1414141515141415141314131314121314131313121212121212121212121212
+      12111112111211110F0F0F0E0E0F0E0E0F0E0E0F0E0E0F0E0D0E0F0E0F0F0E10
+      1010101211121819182323232827282A2A2A2E2E2F3131313334343737373839
+      393B3C3B3232331616160A0A0A0A0A0A0A0A0A0A09090A0A0A090A0909090909
+      0909080908090809080808090808080909080808080808080708080708070807
+      1412140707073030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303032323235
+      35353737373A3A3A3C3C3C3635362F2F2F2F2F2F2F2F2F2F2F2F313131393939
+      3939393939393939393939383939383938383938383938383938383938383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838383838383837383837383737383737383737383737383737383737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737373737373737373738383838383738383738373739383839383839383839
+      38383939393939393939393A3A3A3B3B3B3B3B3B3B3B3B3C3C3C3E3E3E3E3E3E
+      3F3F3F4040404040404242424242424444444545454646454747464948484A49
+      494C4B4B4D4D4D4E4D4D5150505251515453535554545757575959595B5B5B5D
+      5D5D5F5F5F6262626464646666666969696C6C6C6E6E6E717171737373757575
+      7878787C7C7C7F7F7F8181818383838787878A8A8A8D8D8D8F8F8F9292929595
+      959999989B9B9A9D9D9DA0A0A0A2A2A2A4A4A4A7A7A7AAAAAAACACACAFAFAFB3
+      B3B3B0B0B0A2A2A29595959393939191918E8E8E8B8B8B888888848484818181
+      7D7D7D7A7A7A7777777373737070706D6D6D6A6A6A6767676464646161616060
+      605D5D5D5C5C5C5A5A5A5858585656565656565454545252525151515050504F
+      4F4F4E4E4E4D4D4D4C4C4C4B4B4B4B4B4B4A4A4A4A4A4A4949494A4A4A494949
+      4949494949494949494949494949494949494A4A4A4A4A4A4B4B4B4B4B4B4B4B
+      4B4B4B4B4C4C4C4C4C4C4C4C4C4C4C4C4C4C4C4D4D4D4D4D4D4E4E4E4E4E4E4D
+      4D4D4D4D4D4D4D4D4C4C4C4A4A4A484848474747464646444444424242434343
+      6E6E6EA5A5A5B3B3B3ACACADA9A9A9A6A6A7A3A3A3A0A1A19D9D9E99999A9A99
+      999999999797979493939190908E8D8D8B8A8A8787878484848080807D7E7D7C
+      7C7B7878787475747170706A6A6A6868686565656363636464646261615F5F5F
+      5C5C5C5A5A5A5757575656565353535050514E4E4E4C4C4C4A4A4A4948474645
+      454545444343424140403F3F3F3D3D3D3B3C3C3A3A3A39393A37373738373736
+      37373737363434343232313030302F2F2F2E2E2D2D2E2E2D2C2D242424232323
+      2323232323232424243535353E3E3E4141414747474D4D4D2C2B2C201F1F1F1E
+      1E1E1E1E1E1D1E1E1E1E1E1E1D1D1E1D1D1D1D1D1D1D1D1D1D1D1D1D1C1C1C1C
+      1C1C1D1C1C1D1C1C1C1C1C1B1C1C1C1B1B1B1C1B1B1B1B1B1B1B1A1B1B1A1B1B
+      1A1B1A1A1B1A1A1A1A1A1A1A1A191A1A19191A191A19191A1919191919191919
+      181919191C1C1B24242325252525262626272624242518181819181818181818
+      18181718181D1D1D1C1C1C1C1C1C1C1C1B1B1C1B1B1A1B1919191A191A191919
+      1919191A19191A1919191A1A1A19191919191919191919191818191818181818
+      1818181718181718171718161617171617161616161616161616151615151615
+      15151718171D1C1B1D1B1C1C1C1C1C1D1C171616151515151515151515141514
+      1514141414141513131412131313131313131313121313121312121212121212
+      111111110E0E100E0E100E0E0F0E0E0F0E0E0F0F0F0F0F0E0F11101117171622
+      23222828282A2A2A2D2E2D3131313434353738373939393B3B3A3636361D1E1D
+      0A0A0A0B0A0A0A0A0A0A0A0A0A0A0A0A0909090A0A0909090909090909090909
+      0909090909090809080808080908090908080808080708080808080814141408
+      0708303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303333333535353838
+      383A3A3A3C3C3C3232322F2F2F2F2F2F2F2F2F2F2F2F33333339393939393939
+      3939393939393938393938393938393838393838393838393838393838383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838383738383738383738373738373738373738373738373737373737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737373737373838383838373838373838373837373938383938383938383939
+      393939393939393A3A3A3B3B3B3B3B3B3B3B3B3C3C3C3D3D3D3E3E3E3E3E3E3F
+      3F3F4040404141414242424242424444444545444646454747464A49494A4949
+      4C4B4B4D4D4D4F4E4E5150505352525454545655555757575959595B5B5B5E5E
+      5E5F5F5F6262626464646666666969696B6B6B6E6E6E71717173737375757578
+      78787B7B7B7E7E7E8080808383838686868989898B8B8B8E8E8E929292949493
+      9696969797979A9A9A9D9D9D9F9F9FA2A2A2A5A5A5A8A8A8ABABABAEAEAEB1B1
+      B1B3B3B3AFAFAFA3A3A39494949292929090908D8D8D8B8B8B88888885858581
+      81817F7F7F7B7B7B7878787575757272726F6F6F6D6D6D696969676767646464
+      6262626060605E5E5E5C5C5C5B5B5B5A5A5A5858585757575656565555555353
+      535353535252525151515050505050505050504F4F4F4F4F4F5050504E4E4E4E
+      4E4E4E4E4E4E4E4E4F4F4F4F4F4F4E4E4E4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F
+      4F4F4F5050505151515050505151515151515050505151515151515050504F4F
+      4F4E4E4E4C4C4C4A4A4A4848484646464646464545456A6A6A9D9D9DB4B3B4AD
+      ADAEABABABA8A7A8A5A5A5A1A1A29E9E9E9C9B9C999999959696969595969695
+      929292908F8F8D8C8C8989898787868383838080817D7D7D7B7B7B7878787575
+      757172726E6E6D6868676565656262626060606161615F5F5F5D5C5D5A5A5A58
+      58585656565353535150504F4F4F4D4D4E4B4B4B494949474746454544434342
+      4140404040403E3D3D3C3C3C3B3B3B3A3A3A3837373737373738373737373536
+      363434333332312F2F2F302F2F2E2E2E2D2D2D2C2C2C25242423242423232323
+      23232423243534353E3E3E4141414646464B4A4B2B2B2B2020201F1F1E1E1E1F
+      1E1E1E1E1E1E1E1E1E1E1D1E1D1D1D1D1D1D1D1D1D1D1C1D1C1D1D1C1C1D1D1D
+      1D1D1C1C1C1C1C1C1C1C1C1C1C1B1B1C1C1B1B1B1B1B1B1B1B1A1B1B1B1A1B1B
+      1A1B1A1A1A1A1B1A1A1A1A1A1A19191A1A1919191919191A1A19191919191919
+      1B1B1B2323242425242626262626272524251919181918191818181818181817
+      181D1D1D1D1D1C1C1D1C1D1C1C1C1C1B1B1B1B1A1A1A191A191919191A19191A
+      1A1A1A1A19191A19191A19191919191919191918181919181919181918191818
+      1818171817171717171717161717161716161616161616161616151515151818
+      181C1C1D1D1C1C1D1C1C1D1C1C18161715161515151614151515141515141414
+      1414141413141314141313141313131313121212131312121213121212101011
+      0E0F0F0E0E0F0F0E0F0E0E0F0F0F100F0F0F141314201F202726272A2A2A2D2D
+      2D303030343434383737393A393B3B3B3939392424240B0B0B0B0B0B0A0A0A0B
+      0B0B0A0B0A0A0A0A0A0A0A0A0A0A0A0A0A090909090A09090909090909080909
+      0909090808080808080808080809080808080808080707081212140807073030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030303434343636363838383A3A3A
+      3C3C3C3030302F2F2F2F2F2F2F2F2F2F2F2F3434343939393939393939393939
+      3939393839393839393839383839383839383839383839383838383838383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838373838373837373837373837373837373837373737373737373737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3737373737383838383837383837383737393838393838393838393838393939
+      3939393939393A3A3A3B3B3B3B3B3B3B3B3B3C3C3C3D3D3D3E3E3E3F3F3F3F3F
+      3F4040404141414242424343434545454646454747464847474A49494A49494C
+      4B4B4E4D4D4F4E4E5150505352525454545555555757575959595B5B5B5E5E5E
+      5F5F5F6262626464646666666969696B6B6B6D6D6D7171717373737575757878
+      787A7A7A7D7D7D8080808383838686868888888A8A8A8D8D8D8D8D8D90909093
+      93939696969898989B9B9B9E9E9EA1A1A1A4A4A4A7A7A7AAAAAAADADADB4B4B4
+      B9B9B9BCBCBCB6B6B6A2A2A29494949191918F8F8F8D8D8D8B8B8B8888888585
+      858383837F7F7F7D7D7D7A7A7A7777777474747272726F6F6F6D6D6D6B6B6B68
+      68686666666464646262626060605E5E5E5D5D5D5B5B5B5B5B5B5A5A5A595959
+      5757575656565555555555555555555555555454545454545353535353535353
+      5353535353535353535353535353535353535353535354545455555554545455
+      55555555555555555555555454545353535353535353535151514F4F4F4E4E4E
+      4C4C4C4A4A4A4848484747476C6C6C9E9E9EB4B4B4AEAEAFABABABA8A8A8A6A6
+      A6A3A3A3A0A0A09D9E9E9A9A9A9797989494959494949494949292918F8E8E8C
+      8B8B8988888686868383838080807D7D7C7B7A7A777777747474727272706F70
+      6C6C6C6565646261616060605D5D5D5E5F5F5E5C5D5B5A5B5959585656565353
+      535151514F4F4F4D4E4D4C4B4C4949494747474646464444434241414040403F
+      3E3F3E3E3D3C3B3B3B3B3B393939383838373636373737363636353535333434
+      3132312F2F2F2E2E2F2E2E2E2D2D2D2C2C2C2324232323232424232323232424
+      243233323D3D3D4141414545454A4A4A3131311F1F1F1E1F1E1E1F1F1F1E1E1E
+      1E1E1E1E1E1E1E1E1E1E1E1E1E1D1D1D1D1D1D1D1D1D1D1D1D1C1D1D1C1C1C1C
+      1C1C1C1C1C1C1B1C1C1C1C1C1C1B1C1B1C1C1C1B1B1B1B1B1B1B1B1B1B1A1B1A
+      1B1A1A1A1A1A1A1A1A1A1A1A1A1A19191A1919191A191919191819191C1D1D24
+      23242524242726262727272323231918191818191819181818181818181D1D1D
+      1C1D1C1C1C1C1C1D1C1C1C1B1A1B1A1A1A191A1A1A191A1A1919191A1A1A1A1A
+      1A1A191A1A19191A1A191A1919191A1919181918191919191819191919181818
+      18171817171817171816171717161716161616161616161616161818171C1C1C
+      1C1C1C1D1C1C1C1C1C1716171516151615151516151515151515151514141414
+      131413141413141413131312131313131213131212121212121011110F0F0F0F
+      0E0F0E0F100E0E101111111B1B1C2424242727272B2A2B2F2E2E323232373736
+      3839393B3C3C3C3C3D2827270F0E0E0B0B0B0B0B0B0B0B0B0B0B0B0B0A0B0A0B
+      0B0B0A0A0A0A0A0A090A090A0A0A0A0A09090A090A0909090909090909090909
+      0909080908080909080908090808080808080808141414070808303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303434343636363838383A3A3A3D3D3D2E
+      2E2E2F2F2F2F2F2F2F2F2F2F2F2F373636393939393939393939393939393939
+      3939383939383938383938383938383938383938383838383838383838383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3837383837383837383737383737383737383737383737373737373737373737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3738383838383738383738373738373739383839383839383838383839393939
+      39393939393A3A3A3B3B3B3B3B3B3B3B3B3C3C3C3D3D3D3E3E3E3F3F3F404040
+      4040404242424242424343434545444646454746464847474A49494B4A4A4C4B
+      4B4E4D4D4F4E4E5150505352525454545555555757575959595B5B5B5E5E5E5F
+      5F5F6262626464646666666969696B6B6B6D6D6D707070727272757575787878
+      7A7A7A7C7C7C7F7F7F8282828484848787878888888989898C8C8C8E8E8E9191
+      919494949797979A9A9A9D9D9DA0A0A0A4A4A4ABABABB1B1B1B4B4B4B6B6B6BA
+      BABABDBDBDBFBFBFB7B7B7A5A5A59595959191918E8E8E8C8C8C8A8A8A888888
+      8585858383838181817F7F7F7C7C7C7A7A7A7777777474747373737070706F6F
+      6F6C6C6C6A6A6A6969696666666565656363636262626060606060605F5F5F5E
+      5E5E5C5C5C5C5C5C5B5B5B5B5B5B5A5A5A5A5A5A5A5A5A5A5A5A595959595959
+      5959595959595959595959595A5A5A5A5A5A5A5A5A5A5A5A5A5A5A5959595858
+      585858585858585757575656565454545353535151514F4F4F4C4C4C4A4A4A50
+      50507373739F9F9EB5B4B5B0B0B0ABABABA8A8A8A6A6A6A3A3A3A1A1A19E9E9E
+      9C9C9C9998999696969595959494949494949090908E8E8D8B8B8B8887888685
+      86828282807F7F7C7C7C797A797777777474757372736F6F6F6C6C6C68686862
+      6261605F5F5D5C5C5B5B5B5C5C5C5B5B5B5958595757565453535151514F4F4F
+      4E4E4E4C4C4C4A494A48484746464644444443434341414040403E3E3E3D3C3B
+      3B3C3B3B3A39393838383737373635363737373736353434343333333131312F
+      2F2E2E2E2E2D2D2E2C2C2C2B2A2B2525252423242323242324232324232F2F2F
+      3A3A3A3F3F3F4444444949493636361F1F1F1F1F1F1F1F1E1E1E1F1E1E1E1E1E
+      1E1D1E1E1E1E1E1D1D1E1D1D1E1D1D1D1D1D1D1D1D1D1D1D1C1D1D1C1C1C1D1C
+      1C1C1C1C1C1C1B1C1B1C1B1B1C1B1B1C1C1B1B1B1B1B1B1B1B1B1A1B1B1A1A1B
+      1A1A1A1A1A1A1A1A1A1A1A191A1A1A1A191A1A191A1919191E1E1D2423242525
+      2427262627272820202018191919191919181818181919191A1D1D1D1D1C1C1D
+      1C1D1D1D1C1D1C1B1B1B1B1A1A1A1A1A191A191919191A1A1A1A1A1A1A1A1A1A
+      1A1919191A19191A1A1919191919191918191919191919181818181818181818
+      171818171817171816161716161716161616161616161818181C1D1C1C1C1C1D
+      1C1C1D1C1C181717161616161516161515151515151515141414151414151413
+      1413131413131312131313121213121313121212121111120F0F100F0F100F0E
+      100F0F0F1514152323232626262A2A2A2F30303434343838393C3C3C3E3E3E2F
+      2E2F1212120C0C0B0C0C0C0C0B0B0B0B0B0B0B0B0B0A0A0B0A0A0A0A0A0B0B0A
+      0A0A0A0A0A0A0A0A0A09090A0A090A090A0A0A09090909090909090909090808
+      0808080808080808080808090808080814141408080830303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303131313434343636363939393B3B3B3939392E2E2E2F2F
+      2F2F2F2F2F2F2F2F2F2F37373739393939393939393939393939393939393839
+      3938393938393838393838393838393838393838383838383838383838383838
+      3838383838383838383838383838383838383838383838383838383838373838
+      3738383738373738373738373738373738373737373737373737373737373737
+      3737373737373737373737373737373737373737373737373737373737373737
+      3838373838373838373837373938383938383938383938383939393939393939
+      393A3A3A3B3B3B3B3B3B3B3B3B3C3C3C3D3D3D3E3E3E3E3E3E3F3F3F40404040
+      40404242424242424343424545444646454746464847474A49494B4A4A4C4B4B
+      4E4D4D504F4F5150505352525454545555555858585959595B5B5B5E5E5E5F5F
+      5F6262626464646666666868686A6A6A6D6D6D6F6F6F72727275757577777779
+      79797C7C7C7F7F7F8181818383838484848585858888888A8A8A8E8E8E909090
+      9393939797979A9A9AA2A2A2A8A8A8ABABABAEAEAEB1B1B1B4B4B4B8B8B8BABA
+      BABCBCBCBEBEBEBCBCBCB3B3B3A6A6A69898989090908E8E8E8C8C8C8A8A8A88
+      88888686868484848282827F7F7F7D7D7D7B7B7B797979787878767676747474
+      7272727070706F6F6F6D6D6D6C6C6C6A6A6A6969696868686767676565656565
+      656464646363636363636363636262626161616161616161616060606060605F
+      5F5F5F5F5F5F5F5F5F5F5F5F5F5F5E5E5E5E5E5E5D5D5D5C5C5C5B5B5B595959
+      5959595858585656565454545252525050504E4E4E606060858585AAAAAAB6B6
+      B6B0B0B0ABABABA9A9A8A6A6A6A3A4A3A1A1A19E9E9E9C9C9C999A9A97979795
+      95969696969696959293939090908D8D8C8A8A8A8786868583848281817F7F7F
+      7D7C7D7A7A7A7777777474747171726F6F6F6B6B6B696A696666665F5F5F5C5C
+      5C5B5B5A5857585959585A5A59575757545354535353504F4F4E4F4E4C4C4C4A
+      4A4A4849494746474444454343434142414040403F3E3E3C3C3C3C3C3C3A3A39
+      3938383837373636363636363635353534343634343333333232322F2F2F2E2E
+      2E2E2E2D2D2C2C2B2B2B2626262424242423242223232424232D2D2D3939393E
+      3E3E4242424646463B3B3B20201F1F1F1F1F1F1F1E1F1E1E1E1E1E1E1F1E1E1E
+      1E1E1E1E1E1D1E1E1E1D1E1D1E1D1E1D1D1D1D1D1C1D1D1D1D1C1D1C1C1D1C1C
+      1D1C1C1C1C1C1C1B1C1C1C1B1C1B1B1B1B1B1C1B1B1B1B1B1B1A1B1B1B1A1B1A
+      1A1A1A1A1A1A1A1A1A1A1A1A1A1A191A19191919202020242424252525272726
+      2828281E1E1F1919191919191918191919191A19191E1D1D1D1D1D1D1D1D1D1D
+      1C1C1C1C1C1C1B1B1A1A1A1A1A191A1A1A1A1A1A1A1A1B1B1A1A1A1A1A1A1A1A
+      1A1A191A1A19191919191A191919191919181919181918181819191818181817
+      1717171817171716161716161716161616161817181D1D1D1C1C1D1C1C1C1C1C
+      1C18171616151616161615151515151515151515151515141415131314131314
+      14141414131313131213131313121313121211110F10110F0F100F0F0F0F1011
+      151515252525292A292E2E2E3434343A3A3A3D3D3E333333191A190C0C0C0C0C
+      0C0B0B0C0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B0B0B0A0B0B0B0B0B0B0B0A0A0A
+      0A0A0A0A0A090A0A09090A0A090A0A090A090909090909090909090909080809
+      0909090808080909080808091414140808083030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303232323535353737373939393B3B3B3838382E2E2E2F2F2F2F2F2F
+      2F2F2F2F2F2F3939393939393939393939393939393939393939393939383939
+      3839383839383839383839383839383838383838383838383838383838383838
+      3838383838383838383838383838383838383838383838383838383837383837
+      3837373837373837373837373837373737373737373737373737373737373737
+      3737373737373737373737373737373737373737373737373737373738383838
+      3837383837383737383737393838393838393838383838393939393939393939
+      3A3A3A3B3B3B3B3B3B3B3B3B3C3C3C3D3D3D3E3E3E3E3E3E3F3F3F4040404141
+      414242424242424444434545444645454746464948484A49494B4A4A4D4C4C4E
+      4D4D504F4F5150505252525454545555555757575959595B5B5B5D5D5D5F5F5F
+      6262626363636666666868686A6A6A6D6D6D6F6F6F7171717474747676767878
+      787B7B7B7D7D7D8080808080808181818484848787878989898C8C8C92929298
+      98989E9E9EA2A2A2A5A5A5A9A9A9ADADADB0B0B0B3B3B3B6B6B6B8B8B8B8B8B8
+      B1B1B1AEAEAEB1B1B1B3B3B3B4B4B4ACACACA1A1A19494948E8E8E8C8C8C8A8A
+      8A8888888686868484848383838181817E7E7E7D7D7D7B7B7B79797978787876
+      76767474747373737272727070706F6F6F6E6E6E6C6C6C6C6C6C6B6B6B6A6A6A
+      6969696868686868686767676666666565656565656565656464646464646363
+      636262626262626161616060605F5F5F5F5F5F5D5D5D5C5C5C5B5B5B59595958
+      58585656565454545C5C5C787878999999B5B5B5B6B6B6B1B1B1ABABABA9A9A9
+      A6A6A6A3A4A4A2A2A29F9F9F9D9D9D9A9A9B9797979595959696959596959393
+      939190918F8E8F8C8C8C8989898686868484838181817F7E7E7B7B7B79787876
+      76767373737171716F6F6F6C6B6C6A69696767676464645C5C5C5A5A59585857
+      56555556565657575755555452535151504F4F4E4E4D4C4D4A4A4A4949494747
+      474646464444444241414141413F3F3F3E3E3E3C3C3C3C3C3B39393838383837
+      37373736363535353534343635353434333433333231312F2F2F2E2E2E2D2D2C
+      2C2B2B2C2B2B2727282424242423242223232424232829293838383D3D3D4141
+      414545454444441F1F1F1F201F1F1F1F1E1F1F1F1F1F1E1E1E1E1E1E1E1E1E1E
+      1E1E1E1E1D1D1E1E1D1E1D1E1D1E1D1D1D1D1D1D1C1D1C1C1C1D1C1C1D1D1C1C
+      1C1C1C1C1C1B1C1B1C1B1B1C1B1C1B1B1B1B1B1B1B1B1A1B1B1A1B1A1A1A1A1A
+      1A1A1A1A1A1A1A191A1A1A1A1A191A1A2323222424242626262627262828291B
+      1C1B1919191919191919191819191B1A1B1D1D1E1D1D1D1D1D1D1D1D1C1C1D1C
+      1C1C1B1B1A1B1A1A1B1A1A1A1B1B1B1B1A1A1A1B1A1A1A1B1A1A1A1A1A1A1A1A
+      1A1A191A191919191A1919191918181819181919191819191818181818181718
+      18171717171816161716161716161918181D1D1D1D1D1D1C1C1D1D1C1D181717
+      1616161616161516151516161615151515151514141514141514131413141413
+      13131313131313131313121313111112100F100F0F100F0F1010101118181827
+      27282B2C2C3132313838383B3B3B2021210D0D0C0C0C0C0D0C0C0C0C0C0C0B0B
+      0C0B0B0C0C0B0C0C0B0B0B0B0B0B0B0B0B0B0B0B0A0B0B0A0B0B0B0B0A0A0A0A
+      0A0B0A0A0A0A0A090A0A0A090A09090909090909090909090909090809090909
+      0909090809090808141414080808303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303232323535353737373939393C3C3C3635362F2F2F2F2F2F2F2F2F2F2F2F31
+      3131393939393939393939393939393939393939393939393938393938393838
+      3938383938383938383938383938383838383838383838383838383838383838
+      3838383838383838383838383838383838383838383838383738383738383738
+      3737383737383737383737383737373737373737373737373737373737373737
+      3737373737373737373737373737373737373737373737373737373838373838
+      373838373837373837373938383938383838383838383939393939393939393A
+      3A3A3B3B3B3B3B3B3B3B3B3C3C3C3D3D3D3E3E3E3F3F3F3F3F3F404040414141
+      4242424242424444434544444645454746464948484A49494B4A4A4D4C4C4E4D
+      4D504F4F5150505252525454545555555757575959595B5B5B5D5D5D5F5F5F61
+      61616363636565656767676A6A6A6C6C6C6E6E6E717171737373757575787878
+      7A7A7A7C7C7C7C7C7C7D7D7D8080808282828585858C8C8D9595959999999C9C
+      9CA0A0A0A4A4A4A8A8A8ABABABAEAEAEB1B1B1B2B2B2AAAAAAA5A5A5A7A7A7A9
+      A9A9ACACACADADADB0B0B0B1B1B1B3B3B3B3B3B3ABABABA0A0A09292928B8B8B
+      8A8A8A8888888686868585858383838181817F7F7F7E7E7E7C7C7C7B7B7B7979
+      797777777676767474747272727272727070706F6F6F6E6E6E6D6D6D6C6C6C6B
+      6B6B6A6A6A6A6A6A696969686868686868676767676767666666656565646464
+      6363636363636262626060605F5F5F5F5F5F5D5D5D5B5B5B5959596262627C7C
+      7C979797B1B1B1B6B7B7B5B5B5B1B1B1ABAAABA9A9A9A6A7A6A4A5A4A1A1A19F
+      9F9E9D9D9D9B9B9B9898989595959696969796969494949192928F8F8F8D8D8D
+      8B8A8B8787878585858282827F807F7D7D7D7A7A7A7877787675767373737070
+      706E6E6E6B6B6B6968696667666363646161615A5A5A57575756565653525354
+      54545555555353525151504F4F4F4D4C4D4B4B4B4A494A474847464646444444
+      414242414141403F3F3F3E3E3C3C3C3C3C3B3939393A39393837373837363636
+      353534343434343534353434333433323232322F2E2E2D2D2D2C2B2B2C2B2B2C
+      2B2B2928282424242323232323222323232323233737383A3A3A3F3F3F414141
+      454545262727201F201F1F1F1F1F1F1F1E1F1E1F1F1E1F1E1E1E1F1E1E1E1E1E
+      1E1D1E1D1D1E1E1D1E1D1E1D1E1D1D1D1D1D1D1D1D1D1C1D1D1D1C1D1C1C1C1C
+      1C1C1C1C1C1B1C1B1C1C1B1B1C1B1C1B1C1B1B1B1B1A1B1B1A1B1A1A1A1A1A1A
+      1A1A1A1A1A1A191A1A1C1C1C2323242425242626262827272728281919191A19
+      191919191919191919191C1B1C1E1D1D1D1E1D1D1D1D1D1D1D1D1C1C1C1C1B1B
+      1A1A1A1A1B1A1A1A1B1B1B1B1B1B1B1B1A1A1A1B1A1B1A1A1B1A1A1A1A1A191A
+      1A19191919191A19191919191919181918181818191918181918181818171818
+      171817171716171717161A1A191D1C1D1D1D1C1C1C1D1C1C1C17161616161716
+      1616161615161615151515161515151414151414151413141313141313141313
+      1313131313131313131112121010110F0F100F0F1010101117181829292A2E2E
+      2F3434353B3B3B3333330D0C0D0C0C0D0C0C0C0C0C0D0C0D0C0C0C0C0C0C0C0C
+      0C0C0C0B0C0C0C0B0C0B0B0B0B0B0A0B0B0B0B0B0B0A0B0A0B0B0A0A0A0A0A0A
+      0A0A0A090A0A0A0A0A0A0A0A090A090A09090A09090909090809090909080808
+      0808080916141608090830303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030333333
+      3535353737373A3A3A3C3C3C3333332F2F2F2F2F2F2F2F2F2F2F2F3232323939
+      3939393939393939393939393939393939393939393839393839393839383839
+      3838393838393838393838383838383838383838383838383838383838383838
+      3838383838383838383838383838383838383838373838373838373837373837
+      3738373738373738373737373737373737373737373737373737373736353532
+      3232343434363636373737373737373737373737373737383837383837383837
+      3837373837373938383938383938383838383939393939393939393A3A3A3A3A
+      3A3B3B3B3B3B3B3B3B3B3C3C3C3D3D3D3E3E3E3F3F3F3F3F3F40404041414142
+      42424242424444434544444645454746464948484A49494B4A4A4D4C4C4E4D4D
+      504F4F5050505252525454545555555757575959595B5B5B5D5D5D5F5F5F6161
+      616262626565656767676A6A6A6C6C6C6D6D6D70707072727275757577777779
+      79797878787A7A7A7D7D7D7F7F7F8282828A8A8A9292929696969B9B9B9F9F9F
+      A3A3A3A7A7A7AAAAAAAAAAAAA4A4A49D9D9D9E9E9EA0A0A0A2A2A2A5A5A5A7A7
+      A7A9A9A9AAAAAAACACACAEAEAEB0B0B0B1B1B1B4B4B4B7B7B7AFAFAFA3A3A397
+      97978C8C8C8888888686868585858484848282828181817F7F7F7D7D7D7C7C7C
+      7979797878787676767575757474747272727171717171717070706E6E6E6E6E
+      6E6D6D6D6C6C6C6C6C6C6B6B6B6A6A6A69696969696968686867676765656564
+      64646363636161616060606464647474748A8A8A9F9F9FB3B3B3B6B6B6B5B5B5
+      B4B4B4B0B0B0AAAAAAA7A7A7A7A7A6A4A5A4A1A1A2A09F9F9C9C9C9B9B9B9898
+      989695969596969797979595959393939090908E8E8E8B8B8B89898986878784
+      84848182817F7F7E7D7D7C7A7A7A787777767575727272706F6F6D6D6D6B6B6B
+      6969696667676364646162625F5F5F5858575555555353535151515152515353
+      535151514F4F4F4E4E4D4C4C4B4B4A4A48474846464644454442424241414140
+      3F403E3F3E3C3C3C3D3C3C3A3B3A3A3A3A383837373736363635353534343333
+      3333333434343434343334333231312E2E2D2D2D2D2C2C2C2B2C2C2B2C2B2A2A
+      2A2424242323232323232221222323233030303A393A3D3D3D40404043434336
+      36361F20201F1F201F1F1F1F1F1E1E1F1F1E1F1E1F1F1F1E1F1E1E1E1E1E1E1E
+      1E1E1E1D1D1E1E1D1E1E1D1E1D1D1D1C1D1D1D1C1C1C1D1C1C1D1C1C1C1C1C1C
+      1C1C1C1C1C1B1C1B1B1B1C1B1C1B1B1C1B1B1B1B1A1B1B1B1A1B1B1A1A1B1A1A
+      1B1A1A1A1A1F1F1F2424232526252827282829282525251A19191A191A191919
+      1919191919191D1D1D1E1E1E1D1E1D1D1D1E1D1D1D1D1C1C1C1B1B1C1A1B1B1A
+      1B1B1A1A1C1B1B1A1B1B1B1B1B1B1B1B1B1B1A1A1A1B1A1A1A1A1A1A1A1A191A
+      1A1A191919191919191819191819191919181818181818181818181817181817
+      1817171717171A1A191E1E1D1D1D1D1C1D1D1D1D1C1716161616161616161616
+      1616151616151515151515151515141415131415141314141414141413131313
+      1313121213101111101010100F100F0F101010121B1C1C2B2A2B323131363636
+      3E3F3E2E2E2E0D0D0D0D0D0D0D0C0D0D0C0D0D0C0C0C0D0C0C0C0C0C0B0C0B0C
+      0C0C0C0C0B0B0C0B0B0B0B0B0B0A0B0B0A0B0B0B0B0B0B0B0B0B0A0A0A0A0A0A
+      0A0A0A0A0A0A0A0A0A0A0909090A090909090909090909080909090908080809
+      1416140808083030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303034343436363638
+      38383A3A3A3C3C3C3131312F2F2F2F2F2F2F2F2F2F2F2F343434393939393939
+      3939393939393939393939393939393939393939383939383938383938383938
+      3839383839383838383838383838383838383838383838383838383838383838
+      3838383838383838383838383838383838383837383837383737383737383737
+      3837373837373737373737373737373737373737373737363030302F2F2F2F2F
+      2F2F2F2F2F2F2F31313133333334343435353537373738383738383738373738
+      37373837373938383938383838383838383939393939393939393A3A3A3B3B3B
+      3B3B3B3B3B3B3B3B3B3D3D3D3E3E3E3E3E3E3F3F3F3F3F3F4040404141414242
+      424343424443434544444645454746464948484A49494C4B4B4D4C4C4E4D4D4F
+      4F4F5050505252525454545555555757575959595B5B5B5C5C5C5F5F5F606060
+      6262626565656666666969696B6B6B6D6D6D6F6F6F7171717474747575757474
+      747676767979797B7B7B7E7E7E8A8A8A9090909494949999999E9E9EA2A2A2A3
+      A3A39C9C9C9494949595959797979999999B9B9B9D9D9DA0A0A0A1A1A1A4A4A4
+      A5A5A5A7A7A7A9A9A9ABABABADADADAEAEAEB0B0B0B2B2B2B6B6B6B9B9B9B6B6
+      B6ADADADA4A4A49A999A8F8F8F8787878484848181818080807F7F7F7D7D7D7C
+      7C7C7A7A7A7878787777777676767474747373737373737171717070706F6F6F
+      6F6F6F6E6E6E6D6D6D6C6C6C6B6B6B6969696969696868686B6B6B7474748383
+      83909090A1A1A1B0B0B0B7B7B7B6B6B6B5B5B5B4B4B4B2B2B2AFAFAFAAAAAAA6
+      A6A6A5A5A5A3A3A3A2A2A19F9E9F9C9C9D9A9A9A989898969696959595979796
+      9695959393939190918F8F8F8C8C8C8A8A8A8888888585858383838080807E7E
+      7D7C7B7B7979787676767473737272726F6F6F6D6C6D6B6B6A68696866666663
+      63636262625F5F5F5C5D5C5757575252525151514F4F4E4E4E4E52515250504F
+      4E4E4E4B4B4A4B4B4A4949484646464645454342424141424040403F3F3F3D3D
+      3D3C3C3C3B3C3B3B3A3A39383938383836363636363434343434343333323234
+      34343334333433343233322F2E2F2D2D2C2C2C2C2B2C2C2A2B2B2B2B2B232324
+      2323232222222121222323232B2B2C383939393A393D3D3D4040404040402221
+      22201F201F1F201F1F1F1F1F1F1E1E1F1F1E1F1E1F1E1E1E1E1E1E1F1E1E1E1D
+      1E1E1E1E1E1D1D1E1D1D1E1D1D1D1D1C1D1C1D1D1C1C1D1D1C1C1C1C1C1C1C1C
+      1C1C1C1C1B1C1B1C1B1B1B1B1C1C1B1B1B1B1B1B1B1B1A1A1B1A1B1B1B1A1B1B
+      1B2424242424242626262728272929291F1F1F1A191A1A191A19191A19191919
+      19191E1E1E1E1E1E1D1E1E1D1E1D1D1E1D1C1C1C1C1C1C1C1B1B1C1A1B1B1B1B
+      1B1B1B1C1B1C1B1B1B1A1B1B1B1B1A1A1B1B1A1B1A1A1A1A1A1A1A1A19191919
+      1A1919191A191919191919191918191919181818181818181818181717181718
+      17171C1C1B1D1D1D1D1D1D1D1D1D1C1B1C171717161617161616161716151616
+      1515151515151515151514141514141514141414141414141314141313131313
+      13111111101011100F110F10111011111D1D1D2C2C2B3231313938393F3F3F28
+      28290D0D0D0D0D0D0D0D0D0C0D0C0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C
+      0C0C0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B0A0A0A0A0A0A0A0A0A0B0A0A0A0A0A
+      0A0A0A0A090A0A09090A090A0A090909090A0909090908090909090916141409
+      0808303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303434343636363838383A3A
+      3A3D3D3D2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F35353539393939393939393939
+      3939393939393939393939393939393938393938393938393838393838393838
+      3938383938383838383838383838383838383838383838383838383838383838
+      3838383838383838383838383838383738383738383738373738373738373738
+      37373837373737373737373737373737373030302F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3131313232323434343434343635
+      353635353838383838383838383838383939393939393939393A3A3A3B3B3B3B
+      3B3B3B3B3B3C3C3C3D3D3D3E3E3E3E3E3E3F3F3F404040404040424241424242
+      4342424443434544444645454746464948484A49494B4A4A4D4C4C4E4D4D4F4F
+      4F5050505252525454545454545757575858585A5A5A5C5C5C5E5E5E60606062
+      62626464646666666868686A6A6A6C6C6C6E6E6E717171737373717171737373
+      7575757878787B7B7B8787878E8E8E9393939797979C9C9C9595958C8C8C8C8C
+      8C8F8F8F9090909393939494949696969999999B9B9B9D9D9D9E9E9EA1A1A1A2
+      A2A2A4A4A4A5A5A5A7A7A7A9A9A9AAAAAAACACACADADADAFAFAFB4B4B4B7B7B7
+      B8B8B8B8B8B8B9B9B9B6B6B6AFAFAEA7A7A7A0A0A09A9A9A9393938C8C8C8686
+      868181817C7C7C7B7B7B7A7A7A7878787777777676767676767474747979797D
+      7D7D828282888888919191989898A0A0A0A8A8A8AEADAEB5B5B5B7B7B7B6B6B6
+      B4B5B4B4B4B4B2B2B2B1B1B1B0B0B0AEADAEA9A9A9A5A4A4A4A4A3A2A2A2A09F
+      A09E9D9E9C9C9B9A9A9A9899989595969494959696969695959493939292928F
+      8F8F8C8C8C8A8A8A8888888585868484848181817F7F7F7D7D7D7A7A7B797878
+      7676757474737271716F6E6F6D6C6C6A6A6A6767676565656363636161615F5F
+      5F5D5D5D5B5A5B5454545151504F4E4E4D4D4D4C4C4C50504F4E4E4F4B4B4B4B
+      4B4B4949484746464645444343424341424140404040403D3D3D3D3D3D3C3C3C
+      3A3B3A3939393938383838393636363435343535343433333432323533333434
+      343333333232312E2E2E2D2C2D2D2C2D2B2B2B2B2B2B2B2B2A27272622222222
+      22222222222323232525253534343737373B3B3B3E3E3E40404032323220201F
+      1F1F2020201F201F1F1F1F1F1F1E1F1E1E1F1E1E1E1E1E1F1E1E1E1E1E1E1E1E
+      1E1D1D1D1E1E1D1D1D1E1D1D1D1D1D1D1D1D1D1D1C1C1C1D1D1C1C1C1C1C1C1C
+      1C1C1C1B1B1B1C1C1B1B1B1B1B1B1B1B1B1B1B1B1B1A1B1B1B1A1F1F1F242425
+      2525252627272828282828281A191A1A191A1A19191A191A1A19191C1B1C1E1E
+      1E1E1E1E1D1D1E1E1E1D1E1E1D1C1D1C1C1C1C1C1C1C1B1B1B1B1C1B1C1B1B1B
+      1B1B1B1B1C1B1B1B1A1B1B1B1B1B1B1A1B1A1A1A1A1A1A1A1A191A1A191A1919
+      19191A1919191919191919191819191918181819181818181818171818171B1B
+      1B1D1D1C1D1D1C1D1D1D1B1B1B17161616161716171616161616161616161616
+      1515151515161414151414151414151414141314141413131313131313121211
+      0F1010100F11100F111111121E1E1E2C2C2C3232323938393F3F3F2827280D0D
+      0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0C0C0C0C0C0C0C0C0C0C0C0C0C0B0C0C0C
+      0C0C0B0C0C0B0B0B0B0B0B0B0B0B0B0B0B0A0A0A0A0B0B0A0A0A0A0A0A0A0A0A
+      0A0A0A0A0A0A0A0A090A090909090A0909090909090909081616140809093030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303131313434343636363939393B3B3B3A3A3A
+      2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F3737363939393939393939393939393939
+      3939393939393939393939393839393839393839383839383839383839383839
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838383838383838383838373838373837373837373837373837373837
+      373737373737373737373131312F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F303030303030303030303030303030
+      3131313131313131313232323434343434343434343939393A3A3A3B3B3B3B3B
+      3B3B3B3B3C3C3C3D3D3D3E3E3E3E3E3E3F3F3F40404040404042424142424243
+      42424544444544444645454746464948484A49494B4A4A4D4C4C4D4D4D4E4E4E
+      5050505252525353535454545757575858585A5A5A5B5B5B5E5E5E5F5F5F6262
+      626363636565656767676A6A6A6B6B6B6D6D6D6E6E6E6D6D6D70707071717174
+      74747777778585858C8C8C9090909696969A9A9A8888888585858888888A8A8A
+      8C8C8C8E8E8E9090909292929494949696969898989999999B9B9B9D9D9D9F9F
+      9FA1A1A1A2A2A2A4A4A4A5A5A5A7A7A7A8A8A8A9A9A9ABABABADADADB1B1B1B4
+      B4B4B5B5B5B6B6B6B6B6B6B7B7B7B8B8B8B8B8B8BAB9BAB9B9BABAB9B9B7B7B7
+      B5B5B5B5B5B5B5B5B5B4B5B5B5B5B5B5B5B5B6B6B6BBBBBBBDBDBEBFBFBEBFBF
+      BFC0C0C0C0C0C0BFBFBFB7B8B8B0B0B0B0B0B0B1B1B1B1B1B2B1B1B1AFAFAFAF
+      AEAEADADADACACACA8A7A8A3A2A3A2A2A2A0A0A09E9E9E9D9D9D9B9B9B999999
+      969797959594949494959495959695939393929191908F8F8D8D8D8A8A8A8888
+      888786878484848383838080807E7E7E7C7C7C79797977777675757473727270
+      706F6E6E6E6C6B6B6A69696767676665646362636061605F5F5F5C5C5C5B5A5B
+      5757585353534E4E4F4D4D4D4A4A4A4848484F4F4E4B4C4B4A4A4B49494A4748
+      47474645444443424341424140413F3F3E3D3D3D3E3D3C3C3C3B3B3B3A3A3A39
+      3939393938363637353535353535343333333433323231343333333333323232
+      313131312F302D2D2C2D2C2D2B2B2C2B2B2B2B2B2A2829292222222222222222
+      222222222323222C2C2D3737363838383B3B3B3D3D3D3E3E3E262625201F201F
+      1F1F201F1F1F1F1F1F1F1E1E1F1F1E1E1F1F1F1E1E1E1E1E1E1E1E1E1E1D1E1E
+      1E1E1E1D1E1E1D1D1E1D1D1D1D1D1D1D1D1C1C1C1C1D1C1D1C1C1C1C1C1C1B1C
+      1C1B1C1C1B1C1C1B1C1C1C1B1B1A1B1B1B1A1A1C1C1D24242425252526262628
+      27282929292122211A191A1A191B1A191A1A191A19191A1C1C1C1F1E1E1E1E1E
+      1E1E1E1D1E1E1E1D1E1C1C1D1C1C1C1C1D1C1C1C1C1C1B1C1C1B1C1C1B1C1B1B
+      1B1B1B1B1B1B1B1B1B1B1A1B1B1A1A1B1A1B1A1A191A1A1A1A1A1919191A1A1A
+      1A191919191919191919191919191819191818191818181818171D1D1D1D1D1D
+      1E1E1C1D1D1C1B1A1A1617171716171617171716171616161616161616161515
+      151615151514151514141514141413141414141413131313131010111010110F
+      10100F10101111132323232D2D2C3232323939393F3E3F1E1E1E0D0E0D0E0D0D
+      0D0D0D0D0D0D0D0D0D0D0C0D0C0C0D0D0C0D0C0D0C0C0C0C0B0C0C0C0B0B0C0B
+      0C0B0B0C0B0B0C0B0B0B0B0B0B0B0B0B0A0B0B0A0A0A0A0A0A0A0B0A0A0A0A0A
+      0A0A0A0A090A0A0A090909090909090909080909161616080909303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303232323434343737373939393B3B3B3A3A3A2E2E2E2F
+      2F2F2F2F2F2F2F2F2F2F2F393939393939393939393939393939393939393939
+      3939393939393939393939383939383938383938383938383938383938383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838383838383837383837383737383737383737383737383737383737
+      3737373232322F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F30303030303030303030303030303031
+      31313131313131313131313232323232323636363A3A3A3A3A3A3B3B3B3B3B3B
+      3B3B3B3C3C3C3D3D3D3E3E3E3E3E3E3F3F3F40404040403F4242414242424342
+      424544444544444645454746464948484A49494B4A4A4B4B4B4D4D4D4E4E4E50
+      50505151515353535454545656565858585959595B5B5B5D5D5D5F5F5F606060
+      6262626565656666666969696A6A6A6A6A6A6A6A6A6C6C6C6F6F6F7070707373
+      738484848888888E8E8E9494949999998080808282828484848585858888888A
+      8A8A8C8C8C8D8D8D8F8F8F9191919494949494949696969999999A9A9A9C9C9C
+      9D9D9D9F9F9FA0A0A0A2A2A2A3A3A3A5A5A5A5A5A5A7A7A7A8A8A8A9A9A9ADAD
+      ADB1B1B1B2B2B2B2B2B2B2B2B2B3B3B3B4B4B4B4B4B4B5B5B5B5B5B5B5B5B5B1
+      B1B2B0B0B0B0B0B0B1B1B0B2B2B2B6B7B7B9B9B9BBBABABCBCBBBCBDBCBEBEBE
+      BDBDBDB4B4B4ABABABABABABAAAAAAAAABABABACABABABABAAAAAAA9A9A9A8A8
+      A8A1A1A1A0A0A09D9E9E9D9D9D9B9B9B99999A98989897969694949492929294
+      9494949494939392919190908F8E8D8D8D8B8B8A898888878787858585838382
+      8080817E7E7F7C7C7C79797978787875757574747472727270706F6D6E6D6A6A
+      6A69686867676765636463626260605F5D5E5D5B5B5B5A5A5A58585856565651
+      52524D4C4D4B4B4A4848494747474A4A4A4B4B4B4A4A49474747464747444444
+      4343424242414141403F3D3D3F3D3E3D3C3D3B3B3C3A3A3A3939393838393838
+      3736363536353534343434343433333232333231313233323332323231313130
+      31312D2E2D2C2C2B2C2C2C2B2B2B2B2B2B2A2A29242424232223232223222223
+      222222242424343434373737393A3A3B3B3C3C3C3C373737202020201F201F20
+      1F1F1F1F1F1F1F1F1F1F1F1E1F1E1F1E1E1E1E1F1E1F1E1E1E1E1E1E1E1E1D1E
+      1D1E1E1D1E1D1D1D1D1D1D1D1D1D1C1C1D1C1C1D1C1C1C1C1C1C1C1C1C1C1C1C
+      1C1C1C1C1C1C1B1B1C1B1B1B1C1C1C2122222525242626262727272929292929
+      291A1A1B1A1A1B1A191A1A191A1A191A191A191F1E1F1F1E1F1F1E1E1E1E1E1E
+      1D1E1D1E1D1D1C1D1C1C1C1C1C1C1C1C1C1C1C1C1C1C1C1C1C1C1B1B1C1B1B1B
+      1B1B1B1B1A1B1B1A1B1A1B1A1A1A1A1A1A1A1A1A1A1A1A19191A1A191A1A191A
+      191919191919191919191919181918181819181818181D1D1D1E1C1D1D1C1C1D
+      1E1C1A1A1A171717171717171717161716171616161616161616161515161515
+      1514151614141515141414141413141314141314131011111010111010111010
+      111111122323242C2C2C3232323737373C3C3C1A1A190D0E0D0D0E0D0D0D0D0D
+      0D0D0D0D0D0C0D0C0C0D0D0C0D0C0C0C0C0D0C0C0B0B0C0C0C0B0B0C0C0B0C0C
+      0B0C0B0B0B0B0B0B0B0B0B0B0B0B0A0B0A0B0A0A0A0A0A0A0A0A0B0A0A0A090A
+      0A0A090A090A090A090909090A09090916161609080830303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303232323535353737373939393C3C3C3635362F2F2F2F2F2F2F2F
+      2F2F2F2F30303039393939393939393939393939393939393939393939393939
+      3939393939393938393938393938393838393838393838393838393838383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      383838383838373838373838373837373837373837373837373837373332332F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F3030303030303030303030303030303030303131
+      313131313131313131313232323232323938383A3A3A3B3B3B3B3B3B3B3B3B3B
+      3B3B3C3C3C3D3D3D3E3E3E3E3E3E3F3F3F40403F40403F424241424242434242
+      4544444544444645454746464948484A49494B4A4A4B4B4B4D4D4D4E4E4E5050
+      505151515252525454545656565858585959595B5B5B5C5C5C5E5E5E60606062
+      62626464646666666767676868686868686969696B6B6B6D6D6D717171828282
+      8686868C8C8C9191919595957C7C7C7E7E7E8080808181818484848585858888
+      888989898B8B8B8C8C8C8F8F8F9090909292929494949595959797979999999A
+      9A9A9B9B9B9D9D9D9D9D9D9F9F9FA0A0A0A1A1A1A2A2A2A4A4A4A5A5A5A6A6A6
+      AAAAAAADADADAEAEAEAFAFAFB0B0B0B0B0B0B0B0B0B0B1B0B0B0B0B1B0B0B1B1
+      B1ADADAEADADADB3B3B3B4B4B4B6B6B6B8B8B8B8B8B8BBBABBBBBBBBAEAFAEA7
+      A7A7A6A6A6A5A5A5A5A5A5A5A5A5A6A6A6A5A5A5A4A4A4A4A4A4A2A2A29B9B9B
+      9B9B9B9999999898989796969495949393939191919292929393939393939090
+      908F8E8E8D8D8D8B8B8B8989888787878584848383838181817F7E7F7C7C7C7B
+      7A7B7979797776777575757272727070706E6E6E6C6D6C6A6B6A696867666666
+      646363626262605F5F5E5D5E5B5B5B595A595757575656565354545252514A4B
+      4B4848484848474546454848474A4A4947474746464745444544444342424241
+      41403F3E3E3F3F3D3E3D3D3C3C3B3B3A3A393939393939383738363536363635
+      3535343434343333333333323232313132313233323131313131313131312E2D
+      2E2C2C2C2C2C2C2B2B2B2A2A2A2A2A2A27262723232222222223222321212122
+      22222C2D2D3534353738373838393939393A3A3A303030201F1F1F201F1F201F
+      1F1F1F1F1F1F1E1F1F1F1F1E1E1E1E1F1E1F1E1E1E1E1E1E1E1E1E1E1D1E1E1E
+      1E1D1D1D1D1D1D1D1D1D1D1C1D1D1D1D1D1D1D1D1C1D1C1C1D1C1B1C1B1C1C1B
+      1C1C1B1B1C1B1B1B2122212524252625252727272828282A2A2A2222221A1A1B
+      1A191B1A191B1A191A1A191A1C1C1C1F1E1E1E1F1F1E1E1F1F1E1E1E1E1E1D1D
+      1D1C1D1D1C1D1D1D1C1C1C1C1C1D1C1C1D1B1C1C1B1C1C1C1C1C1B1B1B1B1B1B
+      1B1B1B1B1A1A1A1B1B1A1B1A1A1B1A1A1A1A1A1A191A1A1A191A19191A191919
+      1919191919181919191919181919191A1A191E1D1D1D1C1D1D1C1C1E1C1C1818
+      1817181717171716171717171716171717161616161616161616151516151515
+      1414151415151414141414141314131313111111101011101011101011121213
+      2728272B2B2B3030303434343939391414140E0E0D0E0D0D0E0D0E0E0D0D0D0D
+      0D0C0C0D0D0D0D0D0D0D0C0C0C0D0D0C0C0C0C0C0C0C0B0C0C0B0C0C0C0C0B0C
+      0B0B0B0B0B0B0B0B0B0B0B0B0B0A0B0A0A0B0A0A0A0A0A0A0A0A0A0A0A090A09
+      0A0A0A0A0A090909090A090A1616160909093030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303333333535353737373A3A3A3C3C3C3434342F2F2F2F2F2F2F2F2F2F2F2F
+      3131313939393939393939393939393939393939393939393939393939393939
+      3939393839393839393839383839383839383839383839383838383838383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      3838383838373838373837373837373837373837373434342F2F2F2F2F2F2F2F
+      2F2F2F2F3030303030303333333D3D3D39383935353532323230303030303030
+      30303030302F2F2F2F2F2F303030303030303030303030303030313131313131
+      3131313131313131313232323635353939393A3A3A3B3B3B3B3B3B3B3B3B3B3B
+      3B3C3C3C3D3D3D3E3E3E3E3E3E3F3F3F40403F40403F42414142424243424244
+      43434544444645454746464948484A49494A4A4A4B4B4B4D4D4D4D4D4D505050
+      5050505252525454545555555757575959595A5A5A5B5B5B5E5E5E5F5F5F6161
+      616262626565656464646464646666666868686B6B6B7171717F7F7F8484848A
+      8A8A8F8F8F8E8E8E7878787A7A7A7C7C7C7E7E7E808080818181838383858585
+      8787878888888A8A8A8C8C8C8D8D8D8F8F8F9090909292929494949595959696
+      969898989999999A9A9A9B9B9B9D9D9D9D9D9D9E9E9EA0A0A0A0A0A0A1A1A1A4
+      A4A4A7A7A7AAAAAAAAAAAAABABABABABABABABABABABABACACACADADADADADAD
+      AEAEAEB0B0B0B2B2B2B3B3B3B5B5B5B6B6B6B8B8B8AAAAABA2A2A2A1A1A1A1A1
+      A1A0A0A09F9F9FA0A09FA0A1A0A0A0A0A0A0A09FA0A09E9F9F96969696969694
+      9494939393929292909090908F909292929191919090908E8E8E8C8C8C8B8B8B
+      8989898786868585858383838281827F7F7F7E7D7D7B7B7A7979797878787575
+      757473737171716F6F6F6E6E6E6B6B6B6A6A696868676565656363636160605F
+      5F5F5E5C5C5C5B5B595959575757565657535353525252505050484848474746
+      4545464343434545454747474747474545454344434242434242413F3F3F3E3E
+      3E3E3E3C3D3D3C3C3B3B3A393A3A393938393836363636363634353534343433
+      343333333332323332313231313032313132323131313130303130302F2C2B2B
+      2C2C2C2B2B2C2B2A2B2A2A2A2A2A2A2322232223222122212121222223222222
+      223031313434343737373737383838383838382E2E2E201F201F20201F20201F
+      1F1F1F1F1F1F1E1F1F1F1F1E1E1E1E1E1E1F1F1E1E1E1E1E1E1E1E1E1D1D1D1E
+      1E1D1E1D1D1D1D1D1D1D1D1D1C1C1D1C1D1C1C1C1C1C1C1C1C1C1B1C1C1C1C1B
+      1B2121222526252627262727272929282A29292828291A1A1C1A1A1B1A191B1A
+      1A1B1A1A1A1A1B1B1F1E1E1F1F1F1E1F1E1E1E1E1E1E1F1E1F1F1D1D1D1D1D1D
+      1C1D1D1D1D1C1C1C1D1D1C1D1D1C1C1C1C1C1C1C1C1C1B1B1B1B1B1B1B1B1B1B
+      1B1B1A1B1B1B1A1B1A1A1B1B1A1B1A1A1A1A1A1A1A191A1A191A1A1919191919
+      19191919191919191919181B1B1A1D1E1D1D1D1D1D1D1D1D1D1D181718171717
+      1717181717171717171717161617171616161616161615151515151614151515
+      141514141414141414141313131111111011111011111010111212132626262B
+      2B2A2D2D2E3232323636370E0E0E0D0E0E0E0E0E0E0D0E0D0D0D0D0D0D0D0D0D
+      0D0C0D0D0C0D0C0D0C0D0C0D0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0B0B0C0B0C
+      0C0B0B0B0B0B0B0B0B0B0B0B0B0B0B0A0A0B0A0B0A0A0A0A0A0A0A0A0A090A0A
+      0A0A0A0A0A0A0A0A191616090909303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303333
+      333636363838383A3A3A3C3C3C3232322F2F2F2F2F2F2F2F2F2F2F2F34343439
+      3939393939393939393939393939393939393939393939393939393939393939
+      3939383939383938383938383938383938383938383838383838383838383838
+      3838383838383838383838383838383838383838383838383838383838383838
+      38373838373838373837373837373434342F2F2F2F2F2F2F2F2F2F2F2F303030
+      3030303434344141414343434343434343434343434343433E3E3E3D3D3D3A39
+      3A36363634343432323231313131313130303030303030303031313131313131
+      31313131313131313232323938383939393A3A3A3B3B3B3B3B3B3B3B3B3B3B3B
+      3C3C3C3D3D3D3E3E3E3F3F3F3F3F3E40403F403F3F4241414242424342424443
+      434544444645454746464847474A49494949494B4B4B4D4D4D4D4D4D4F4F4F50
+      50505252525454545454545757575858585959595B5B5B5D5D5D5F5F5F606060
+      6262626262626161616363636565656767676E6E6E7D7D7D8282828787878C8C
+      8C8888887474747676767878787979797C7C7C7D7D7D7F7F7F80808083838384
+      84848585858888888989898A8A8A8C8C8C8D8D8D8F8F8F909090919191939393
+      9494949595959696969898989999999999999B9B9B9A9A9A9B9A9B9C9C9C9C9C
+      9C9E9E9EA2A2A2A5A5A5A6A6A6A6A6A6A6A6A6A6A6A6A6A7A6A9A9A9ABABABAD
+      ADADAFAFAFB1B1B1B3B3B3B2B2B2A2A3A39D9D9D9C9C9C9C9C9C9C9C9C9B9B9B
+      9A9A9A9A9A9A9C9C9B9B9B9B9B9B9C9A9A9B9A9A9B9192919191918F8F8F8E8E
+      8E8D8D8D8F8F8F9090918F8E8F8E8E8D8C8C8C89898989898987878784858482
+      83828181817F7F7F7D7D7C7B7B7B7A7979787878757575737374717172707171
+      6E6E6E6C6D6D6A6A6A6969696666666565646363626161615F5E5F5D5C5C5B5B
+      5B5A59595757575655565354535251525050504F4F4F48474844444444444443
+      43424141414746464545454343434343434142413F3F3F3E3F3E3F3F3E3D3E3C
+      3C3C3B3A3A393A3A3A3938383838373636373535353434343434343334343333
+      33323232313131303030302F303232313130303030303030302E2D2E2C2C2C2B
+      2B2B2A2A2B2A2A2B2A2B2B272627222222212221212222212121222222252525
+      3434343534353536363737363737373636362C2C2C201F201F1F1F1F20201F1F
+      1F1F1F1F1E1E1F1F1E1E1E1E1E1F1E1E1E1E1E1E1E1E1E1D1E1E1E1D1E1D1E1E
+      1D1E1D1E1D1C1D1D1D1D1D1D1D1C1C1C1D1C1C1C1C1C1C1C1C1C212222262525
+      2727272727272929292A292A2A2A291D1E1E1A1B1B1A1A1B1A1A1B1A1A1B1A1A
+      1A1D1C1D1F20201F1F1F1F1F1F1F1F1F1E1F1E1E1E1E1D1D1E1D1D1D1D1D1D1D
+      1D1D1D1C1D1E1D1C1D1C1C1D1C1C1D1B1B1C1B1C1C1B1B1B1B1C1B1B1B1B1B1B
+      1B1B1B1A1A1B1A1B1A1B1A1A1A1A1A1A1A1A1A1A1A1A1A1A1A1A1A191A191A19
+      191918191819181C1D1C1E1D1D1D1D1D1D1D1D1C1C1C18171818171718181817
+      1717171717171717161716161616171616161516161515151515161515151415
+      1514141414141313131111111111111010111110111716162525252828282C2C
+      2B2F2F2E3232321515150E0E0E0E0E0E0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D
+      0D0D0D0C0C0D0D0C0C0C0D0D0D0C0D0C0C0C0C0C0C0B0C0B0B0C0B0B0B0B0B0C
+      0B0B0B0B0B0B0B0B0B0A0B0A0B0A0A0A0A0A0A0A0A0A0A0A0A090A090A09090A
+      0A090A0A1916190A0A0930303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030343434363636
+      3838383A3A3A3D3D3D2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F3535353939393939
+      3939393939393939393939393939393939393939393939393939393939393839
+      3938393938393838393838393838393838393838383838383838383838383838
+      3838383838383838383838383838383838383838383838383838383838373838
+      373838373837373636362F2F2F2F2F2F2F2F2F2F2F2F30303031313134343443
+      4343454545464646464646464646454545454545444444444444434343434343
+      4343434242424242424141413E3E3E3D3D3D3D3D3D3535353131313131313131
+      313131313232323535353939393939393A3A3A3B3B3B3B3B3B3B3B3B3B3B3B3C
+      3C3C3D3D3D3E3E3E3F3F3E3F3F3E40403F403F3F424141424242434242444343
+      4544444645454746464847474949494949494B4B4B4C4C4C4D4D4D4F4F4F5050
+      505151515353535454545656565858585959595B5B5B5C5C5C5E5E5E5F5F5F5D
+      5D5D5E5E5E6060606262626464646D6D6D7B7B7B7F7F7F8484848A8A8A848484
+      7070707272727474747676767878787979797C7C7C7C7C7C7E7E7E8080808181
+      818383838484848686868888888989898A8A8A8C8C8C8C8C8C8E8E8E8F8F8F90
+      9090919191929292939393939393949494959595969696979797979898979898
+      9898989B9B9B9E9E9EA1A1A2A1A1A2A2A2A2A3A3A3A5A5A5A7A7A7A9A9A9ACAC
+      ACAEAEAEADADAD9D9D9D99999999999998989898989897979796969695959594
+      94949796979797979697979695969696968D8D8D8C8C8C8B8A8A898989888888
+      8A8A8A8C8C8C8B8A8B89898988888785858585858582828281818180807F7E7D
+      7D7C7B7B7B79797878787676757474747272727171706E6E6E6D6D6D6C6C6B69
+      696A676867666666646464626261605F5F5F5F5D5D5B5B5B5A5A595858575757
+      5555555353535151524F4F4F4F4E4E4D4C4C4948484443444141424141403F3F
+      3F45444444444343444341424240403F3E3F3E3F3E3E3D3D3D3C3C3C3A3A3A3A
+      3A3A3A3938393738373637363635343435343434343434333433333333313231
+      3031303030303030303132323230303130303030302F2F2F2B2B2B2B2B2A2B2A
+      2A2A2B2A2A2A2A2A2A2A23232322222221222221212121222122222229282934
+      33343534353534343434353435343333332D2D2D2221211F1F1F1F1F1F1F2020
+      1F1F1F1F1F1E1E1F1F1F1E1F1E1E1E1E1E1E1E1E1E1D1E1D1E1E1E1D1E1D1E1E
+      1D1D1D1D1D1D1D1D1D1C1D1C1C1C1C1D1D1E1D24242426262626272628282829
+      29292A2A2A2B2B2B2121211A1B1B1A1B1C1B1B1B1A1A1B1A1A1A1A1B1A201E1F
+      1F20201F201F1F1F201F1F1F1F1F1E1F1D1E1D1D1D1E1D1D1D1D1D1C1D1D1D1E
+      1E1E1D1D1E1D1D1D1C1C1D1C1C1D1C1C1C1B1C1C1B1B1B1C1B1B1B1B1B1B1B1B
+      1B1B1B1B1A1B1B1A1A1A1A1A1A1A1A1A1A19191A1A1A1A19191A191919191919
+      1918191E1D1D1D1E1E1D1E1D1D1E1D1C1B1B1818181718181818181718171717
+      1717171717161716171717161616161616151516151516151515141415141514
+      14141212121111111011111111111011111818182525252626262929282A2B2A
+      2C2C2C2D2E2D1919190E0E0E0E0E0E0D0D0E0E0D0E0D0D0E0D0D0D0D0D0D0D0D
+      0D0D0C0D0D0C0D0C0C0C0C0C0D0C0C0C0C0C0B0B0B0B0B0B0C0C0C0B0B0C0B0B
+      0B0C0B0B0B0B0B0B0A0B0B0B0A0B0B0A0A0A0A0A0A0A0A0A0A0A0A0A0A0A090A
+      1619160A09093030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303131313434343636363838383B
+      3B3B3B3B3B2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F373737393939393939393939
+      3939393939393939393939393939393939393939393939393939393939383939
+      3839383839383839383839383839383838383838383838383838383838383838
+      3838383838383838383838383838383838383838383838383838383837383837
+      3636362F2F302F2F2F2F2F2F2F2F2F3030303131313333334242424747474848
+      484A4A4A4A4A4A4A4A4A49494947474747474745454545454544444444444443
+      4343424242424242414141414141414141404040313131313131313131313131
+      3131313232323938383939393939393A3A3A3B3B3B3B3B3B3B3B3B3B3B3B3C3C
+      3C3D3D3D3E3E3E3E3E3D3F3F3E403F3F403F3F42414142424242424244434345
+      44444645454746464747474949494949494B4B4B4C4C4C4D4D4D4E4E4E505050
+      5151515252525454545555555757575858585A5A5A5B5B5B5D5D5D5B5B5B5B5B
+      5B5D5D5D5F5F5F6161616D6C6D7878787D7D7D8282828787877B7B7B6D6D6D6F
+      6F6F7070707272727474747575757777777979797A7A7A7C7C7C7D7D7D7F7F7F
+      8080808282828383838484848686868888888888888A8A8A8A8A8A8B8B8B8B8B
+      8B8D8D8D8E8E8E8F8F8F8F8F8F90909091919192929291929291929292929293
+      93939393939696969A9A9A9E9E9E9F9F9FA1A1A1A4A4A4A6A6A6A8A8A8A6A6A6
+      9696969394949493939494939393939393939292929292919090908F8F8F9191
+      909292919292919191919292928A8A8B88888887868685858584848485858588
+      88888787878585858483848282828080807E7E7E7E7E7E7B7B7B7A7A79787878
+      777576757474737272717171706F6F6D6D6D6B6C6C6A6A6A6768676667666464
+      646363636161615F5F5F5E5E5C5B5C5B5A5A5959575757565655545453535351
+      51514F4F4F4F4E4E4D4C4C4B4B4B4848484141414140413F3F3F3E3F3E414241
+      4443434242414040403F3F3F3E3D3D3E3E3E3D3C3C3A3A3A3B3B3A3A3B393838
+      3738383737353635343535353534353434343433323331323130313030313130
+      30303030303030303232313230303130302F2F2F2C2C2D2B2B2B2B2B2B2B2B2A
+      2B2A2A2A2A292727272222222221222121212221222322222322222B2B2B3434
+      3434333434343333333332323231313130303027272620201F1F1F1F1F1F1F1E
+      1F1F1F1E1E1F1F1E1F1E1F1E1E1E1F1E1E1E1E1E1E1D1D1D1E1D1E1E1D1D1E1D
+      1D1D1D1D1D1D1D1D1C2222222525262626272727272828282929292B2A2A2B2C
+      2C2324231B1B1C1B1B1C1B1B1B1A1B1B1B1A1B1A1A1B1F1E1E1F1F2020202020
+      1F1F1F1F1F1F1F1F1F1F1F1F1D1E1E1D1E1D1D1D1D1E1D1E1D1D1E1E1D1E1E1D
+      1D1E1D1D1D1D1D1D1C1D1C1C1D1C1C1C1B1C1C1B1B1B1C1B1B1C1B1B1B1B1B1A
+      1B1A1B1B1A1A1A1A1B1A1A1A1A1A1A1A1A1A191A1A1919191919191A1A1A1A1E
+      1E1E1E1E1E1D1D1E1E1D1D1A1A1A181818181818181718171717181718171717
+      1717171717171716161716161615151615161615151615151515141415141111
+      111112111111111111111010111717162423242525262626262828282A2A2A2A
+      2A2A2A29291D1D1D0E0E0E0E0E0E0D0E0D0D0E0D0D0D0E0D0D0D0D0D0D0D0D0C
+      0C0C0D0D0D0C0C0C0C0C0D0C0C0C0C0C0C0C0C0C0C0B0C0C0B0B0B0B0B0B0B0B
+      0B0B0B0B0A0B0B0A0A0B0A0B0A0A0A0A0A0A0A0A0A0A0A0A0A090A0A1619190A
+      0A09303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303131313434343737373939393B3B3B3A3A
+      3A2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F39393839393939393939393939393939
+      3939393939393939393939393939393939393939393939393938393938393838
+      3938383938383938383938383938383838383838383838383838383838383838
+      383838383838383838383838383838383838383838383838373736362F2F302F
+      2F2F2F2F2F2F2F2F3030303131313333334242424848484B4B4B4D4D4D4F4F4F
+      4F4F4F4E4E4E4C4C4C4A4A4A4949494747474747474646464545454343434242
+      4241414141414140404040404040404039383930303031313131313131313131
+      31313535353939393939393939393A3A3A3B3B3B3B3B3B3B3B3B3B3B3B3C3C3C
+      3D3D3D3E3E3D3E3E3D3F3E3E403F3F403F3F4140404242424242424443434544
+      444645454746464646464848484949494A4A4A4B4B4B4D4D4D4D4D4D50505050
+      50505252525353535454545656565858585959595B5B5B5757575959595B5B5B
+      5B5B5B5F5F5F6B6B6B7575757B7B7B8080808585857878786A6A6A6B6B6B6D6D
+      6D6F6F6F7070707272727474747474747777777878787979797B7B7B7C7C7C7E
+      7E7E7F7F7F808080818181838383838383848484858585878787878787888888
+      8989898989898A8A8A8A8A8A8B8B8B8C8C8C8D8D8D8D8D8D8D8D8D8D8D8D8D8D
+      8D8F8F8F8F8F8F9292919797989D9C9D9F9F9FA1A1A19C9C9C90909090908F8E
+      8F8F8F8E8F8E8E8E8D8D8D8E8E8E8D8D8D8C8C8C8C8C8B8B8B8C8C8D8C8D8D8D
+      8D8D8D8E8D8E8D8D8E8888888383838282828080807F7F7F8080808484848383
+      8381818180807F7E7E7E7D7D7C7B7B7B79797978787877777674747474727372
+      71717070706E6D6D6C6C6C6A6A6A696969676666656465646464626262605F60
+      5F5F5F5D5D5D5B5B5A5A5A59585757565556545353535252515050504F4F4E4E
+      4E4D4C4D4B4B4A4949494747473F3F403E3E3E3E3D3E3C3B3C3F3F3F43424141
+      4140403F3F3E3E3E3E3E3D3B3B3B3A3B3B3A3B3B3A3A3B383838383837373736
+      363534363435363434353535333333323232313130303031303030303130302F
+      2F2F2F2F323131313231302F2F302F2F2F2F302C2B2B2B2B2B2B2A2A29292A29
+      29292A29292525252222222221212121222221222121212222222B2C2C323233
+      3333333332323231313131313030303030302D2D2D2626272021211F1F1F1F1F
+      1F1E1F1F1E1F1F1E1E1F1E1E1E1E1F1E1E1E1E1E1E1E1E1E1E1E1D1D1E1E1E21
+      21212626262727272827282828292A29292A2A2A2B2A2B2C2C2C2524251B1C1D
+      1B1C1C1B1B1C1B1A1C1B1B1C1A1A1C1E1E1D2020202020202020201F1F201F1F
+      201F1F1F1F1F1F1F1E1E1F1E1E1E1D1E1E1E1D1F1E1E1E1E1E1E1E1E1D1E1D1E
+      1D1D1D1D1C1D1D1C1D1C1C1D1B1B1C1C1C1C1B1C1B1C1B1C1B1B1B1B1B1B1B1B
+      1A1B1B1A1B1B1B1A1A1A1A1A191A1A1A19191A1A1A1A19191D1C1B1E1E1D1E1E
+      1E1E1E1E1E1D1E19191918181818181818171817181817171817171717171716
+      1617171717171616161615161515161515161515151415141515111112111212
+      1111111111111111111111121515152222222526252525252727272627262727
+      262726261E1E1E0E0F0F0E0E0D0E0D0E0E0D0E0D0E0E0E0E0D0D0D0D0D0D0D0C
+      0C0D0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0B0B0B0B0B0B0B0B0C0B0B
+      0B0B0B0A0B0B0B0A0A0A0B0B0A0A0A0A0A0A0A0A0A0A0A0A19191609090A3030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303232323535353737373939393B3B3B3737372F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F303A39393939393939393939393939393939393939
+      3939393939393939393939393939393939393939393839393839393839383839
+      3838393838393838393838383838383838383838383838383838383838383838
+      3838383838383838383838383838383838383737373030312F2F2F2F2F2F2F2F
+      2F3030303030303232324040404949494D4D4D50505053535354545451515149
+      49494E4E4E4D4D4D4B4B4B4A4A4A484848474747454545444444414141404040
+      3F3F3F4040404040404040403F3F3F3131313131313131313131313131313131
+      313938383939393939393939393A3A3A3B3B3B3B3B3B3B3B3B3B3B3B3C3C3C3D
+      3D3D3E3E3D3E3E3D3F3E3E403F3F403F3F414040424242424242434242454444
+      4645454545454646464848484949494949494B4B4B4C4C4C4D4D4D4F4F4F5050
+      505151515252525454545555555757575858585454545757575757575959595C
+      5C5C6B6B6B7373737979797E7E7E8383836D6D6D6767676868686A6A6A6B6B6B
+      6D6D6D6E6E6E7070707171717373737474747575757777777878787979797B7B
+      7B7C7C7C7D7D7D7E7E7E7F7F7F7F7F7F81818182828283838383838383838385
+      8585858585858585868686878787878787868686878787888888888788888888
+      8989898989898989898D8C8D9696969292928A8A8A8A8A8A8B8B8B8A8A8A8A8A
+      8A89898988888888888888888889898887878687868687878788888889898988
+      88888989898584847F7E7F7D7E7D7C7C7C7B7B7B7A7A7A8080807E7E7E7D7E7E
+      7B7B7B7A7A7A7A7979787778767776747474737372727271706F6E6F6E6E6D6C
+      6D6B6A6A6969696767676666666464646262626161615F5F5F5D5D5E5C5B5C5B
+      5B5B585858575757565655545353535353504F50504F4F4E4D4D4C4C4C4A4A4B
+      4848494748484747464040403E3D3D3B3B3B3B3A3B3A3A3A424141403F3F3F3F
+      3E3F3E3F3C3C3C3B3B3B3B3B3B39393938383838393837373736373536363536
+      3534363434343434333232313131313131313131313031302F2F3030302F302F
+      30303032323231313030302F302F2F2D2D2D2B2B2B2A2A2A2A2A292A29292A29
+      2929292823232322222222212222222221212121222122222228282933333332
+      33333231323131323030303030303030302F2F2F2F2F2F2A2A2A262626232323
+      2121211F1E1F1E1F1F1F1E1E2020202121212424232526262828282828282828
+      28292829282828292A2A2B2B2A2B2B2B2C2C2C2222221C1B1D1C1B1C1C1B1D1B
+      1B1D1B1B1C1B1B1B1C1B1D212021202121202020202020201F20201F1F1F201F
+      1F1F1F1F1F1E1F1E1E1F1E1E1E1E1E1F1E1F1F1E1E1E1E1E1D1D1E1D1D1E1E1E
+      1D1D1D1D1D1C1C1D1C1C1D1C1C1C1B1B1C1C1C1C1B1B1B1B1B1B1B1B1B1B1B1B
+      1A1B1B1B1A1A1A1B1A1A1A1A1A1A191A1A1A1A191E1D1E1E1D1D1E1E1D1D1E1E
+      1D1D1C1918191918181818181818181818181818181818171718171717171717
+      1717161616161616151617151516151515151515151511121211121111111111
+      1111111111111011121212121213202020242424252524242525252425242525
+      2424242020211111110E0D0E0D0E0D0D0E0D0D0D0E0D0D0D0D0D0D0D0C0D0D0C
+      0C0C0C0D0D0C0C0C0C0C0C0C0C0C0C0C0C0C0B0B0C0C0B0C0B0B0B0B0C0B0B0B
+      0B0B0B0B0B0A0B0B0B0A0A0B0B0B0A0A0A0A0A0A1916160A0A0A303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303333333535353737373A3A3A3C3C3C3535352F2F2F2F2F2F2F
+      2F2F2F2F2F3131323A3939393939393939393939393939393939393939393939
+      3939393939393939393939393939393939393939383939383938383938383938
+      3839383839383838383838383838383838383838383838383838383838383838
+      38383838383838383838383737373030312F2F2F2F2F2F2F2F2F303030303030
+      3232323F3F3F4949494D4D4D5252525555555858585656563737373030303030
+      303232323737373B3B3B3D3D3D4040404040404343434141413F3F3F3E3E3E3F
+      3F3F3F3F3F3F3F3F3F3F3F383738303030313131313131313131313131343434
+      3939393939393939393A3A3A3A3A3A3B3B3B3B3B3B3B3B3B3B3B3B3C3C3C3D3D
+      3C3E3E3D3E3D3D3F3E3E3F3E3E403F3F41404042414142424243424245444444
+      44444545454646464747474949494949494B4B4B4C4C4C4D4D4D4E4E4E505050
+      5050505252525353535454545655555252525454545555555757575A5A5A6868
+      687171717676767C7C7C8080806A6A6A6363636565656666666868686969696B
+      6B6B6C6C6C6D6D6D707070707070727272737373747474767676777777787878
+      7979797B7B7B7C7C7C7B7B7B7D7D7D7E7E7E7E7E7E7E7E7E7E7E7E8080807F7F
+      7F80808080808080808080808081818182828282828283828383838382828383
+      8383848483848384838383848484848485858585858585858585858585858585
+      8484848384848483848383838283828282828383838484848484848484848585
+      848283827A797A7A797A7879787777777676767B7B7B7B7B7B7A7A7A77787877
+      777775767674757572727271717170706F6E6E6D6D6D6D6B6A6A6A6A6A686868
+      6666666465646263626161616060605E5D5E5D5D5D5B5B5B5A5A595858585657
+      555555555453535151515150504F4F4F4E4D4D4C4B4C4B4C4B49494948484747
+      47474645464140403B3B3B3A3B3A39393939393A3D3E3D3F3F3F3F3E3D3E3D3D
+      3C3B3B3B3C3B3A3A3A3939393838383738373636363636363636353536353534
+      3434323233323232313131313131313130302F2F302F302F2F2F2F302F2F2F31
+      3030303131313030302F302F2F2F2C2D2D2A2A2A2A2A2A292A29292A292A2929
+      2928292222222122222222212222212222222221212121222525253030303132
+      313131313031313030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2D2D2D2C
+      2B2C2C2C2C2B2B2B2A2A2B2A2A2A2A2A2A2A292A292A2A29292A2A2A2A2A2A2A
+      2B2B2B2B2B2C2C2C2D2B2B2A1F1F1F1C1C1D1C1C1D1C1B1D1C1B1D1B1B1D1B1B
+      1D1C1C1C2021202120212121202121202121202020201F20201F201F201F1F1F
+      201F1F1F1E1F1E1E1F1F1E1F1E1F1E1E1E1E1E1E1E1E1E1E1E1E1D1E1D1D1D1D
+      1E1D1D1D1C1C1D1C1C1D1C1B1C1C1C1C1C1C1B1B1B1B1B1B1B1B1B1B1A1A1A1A
+      1B1A1A1A1A1B1A1A1A1A1A1A1A1A1A191E1D1D1E1D1D1E1D1D1E1E1D1C1C1C19
+      1919181919181818181818181818181818171718171717171717171717171616
+      1716161716161616151615151615151515151514151213131111121112111111
+      111111111111111112121112121C1C1C23242324242424242424242524242425
+      24242323231212120E0D0D0E0E0D0E0D0D0D0E0D0D0E0D0D0D0D0D0D0C0D0D0D
+      0C0C0C0C0D0C0D0C0C0C0C0C0C0C0C0C0B0B0C0B0C0B0C0B0B0B0C0B0B0B0B0B
+      0B0B0B0B0A0A0B0A0A0B0A0A0A0B0A0A191919090A0A30303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303333333535353838383A3A3A3C3C3C3232322F2F2F2F2F2F2F2F2F2F2F
+      2F3232323A39393A393939393939393939393939393939393939393939393939
+      3939393939393939393939393939393938393938393938393838393838393838
+      3938383938383838383838383838383838383838383838383838383838383838
+      383838383838383232322F2F2F2F2F2F2F2F2F3030303030303232323E3E3E48
+      48484D4D4D525252565656595959595959383838303030303030303030303030
+      3030303030303030303030303030303030303030303131313939393D3D3D3E3E
+      3E3E3E3E3F3F3F3F3F3F30303030303031313131313131313131313138373739
+      39393939393939393939393A3A3A3B3B3B3B3B3B3B3B3B3B3B3B3C3C3B3D3D3C
+      3E3D3D3E3D3D3F3E3E3F3E3E403F3F4140404241414242424342424443434444
+      444545454646464747474848484949494A4A4A4B4B4B4D4D4D4D4D4D4F4F4F50
+      50505151515252525352525050505252525353535454545757576969696F6F6F
+      7474747A7A7A7F7F7F6363636060606262626363636464646666666767676868
+      686A6A6A6B6B6B6D6D6D6E6E6E70707070707072727273737374747475757576
+      76767777777878787878787979797A7A7A7979797A7A7A7A7A7A7B7B7B7B7B7B
+      7A7A7A7A7A7A7B7B7B7C7C7C7B7B7B7C7C7C7C7C7C7D7D7D7C7D7C7E7E7E7E7E
+      7D7F7E7F7F7F7F7F807F7F7F7F7F7F7F807F7F8180808080807F7F7F80808080
+      7F7F7F7F7F7F7F7F7E7E7F7E7E7E7D7D7E808080808180818181818181808080
+      7777777676757574747372727272727576757778777676767575757373737273
+      737171716F706F6D6D6D6D6D6C6B6B6A69696969686867666665656563626262
+      62626061605F5F5F5D5E5D5B5B5B5A5B5B595859585858565657555454535352
+      5151505050504F4E4E4D4C4D4C4C4B4B4A4A4849484747474646464545454344
+      444342423A3A3A3A39393838383737373A3A393F3F3E3D3D3D3D3B3C3C3B3B3B
+      3A3A393939383939373738373637363737373636363636353534343433323331
+      323132333232323131303130302F30302F2F302F2F30302F2E2E2E2F2F2F3131
+      3131303131313030302F2E2E2E2A2A2A2A2A2A2A292A2A2A2A2A2A2A2A2A2A28
+      28282222222222222222222121212121222121212121212222222B2B2B323232
+      3231323030303031303030302F2F2F2F2F2F2F2F2F2E2E2E2D2D2D2D2D2D2D2D
+      2D2B2B2C2C2C2C2B2B2B2B2C2B2B2A2B2B2B2B2C2B2B2B2C2B2D2D2C2D2D2D2D
+      2D2D2526261D1E1F1C1D1D1C1C1D1C1C1D1B1C1C1C1C1D1B1C1C1C1C1C202020
+      2121212021202121212121202021202020201F202020201F1F202020201F201F
+      1F1F1F1F1F1F1F1E1F1F1F1F1E1E1F1E1E1E1E1E1E1E1E1E1E1E1E1D1E1E1D1E
+      1D1D1D1C1C1D1C1C1D1C1B1C1C1C1C1C1B1C1B1C1C1B1B1B1B1B1A1B1B1B1A1B
+      1A1B1B1A1A1A1A1A1A1C1B1C1E1D1E1E1E1E1E1E1D1E1D1D1B1A1A1919191919
+      1818191819191818181918181817181817171717181718171717171717161617
+      1615161615161515161515151515151515151515131312121212111212111111
+      1010111011111111111111121919192323232323232323232424242425252424
+      242424241616160E0D0E0D0D0D0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0C0C
+      0C0D0C0C0C0C0C0C0C0C0C0C0C0C0B0C0C0C0C0C0B0C0B0B0B0B0B0B0C0B0B0B
+      0B0B0B0B0A0B0B0A0B0B0A0A19191B0A0A0A3030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303034
+      34343636363838383A3A3A3D3D3D2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      3232323838383939393939393939393939393939393939393939393939393939
+      3939393939393939393939393839393839393839383839383839383839383839
+      3838383838383838383838383838383838383838383838383838383838383838
+      3232322F2F2F2F2F2F2F2F2F3030303030303131313A3A3A4848484D4D4D5252
+      525757575B5B5B5D5D5D41414130303030303030303030303030303030303030
+      30303030303030303030303030303030303030303232323B3B3B3B3B3B3D3D3D
+      3E3E3E3F3F3F3837383030303030303131313131313131313434343838383939
+      393939393939393939393A3A3A3B3B3B3B3B3B3B3B3B3B3B3B3C3C3B3D3D3C3E
+      3D3D3E3D3D3F3E3E3F3E3E403F3F403F3F424141424242424242434343444444
+      4545454545454646464848484949494949494B4B4B4C4C4C4D4D4D4E4E4E5050
+      505050505150504E4E4E4F4F4F5050505353535656566868686D6D6D72727278
+      78787D7D7D5C5C5C5D5D5D5F5F5F606060616161636363646464666666676767
+      6868686969696B6B6B6B6B6B6D6D6D6E6E6E7070707070707171717272727373
+      7372727274747474747475757574747475757575757575757576767675757575
+      7575757575757575767676767676767676777777777677787877797978797979
+      7A7A797A7A7A7979797A7A7A7B7B7B7B7A7A7B7B7B7B7B7B7C7C7C7C7B7C7B7B
+      7A7B7B7B7A7B7B7A7A7A7979797C7C7C7C7C7C7D7D7D7D7D7D7D7D7D73737371
+      727171707170706F6E6E6E7171727474737373737171717070706F6F6F6D6E6E
+      6D6D6D6B6C6B696A696869676766666665656463636262616161615F5F5F5E5F
+      5E5B5B5B5B5B5B59595958585757575755555454545452535251515050504F4F
+      4F4E4C4C4C4C4B4B4A4A4A494949484847464646454546444444434343424241
+      3B3B3B3839383736373637363637363D3D3C3D3C3B3C3C3C3B3B3A3A39393A39
+      3A38383837363736363736363637363735353534343433333233333132323233
+      323231303131313030303030303030302F2F2F2E2E2F2E2F2E2F313030313131
+      31313130302F2F2F2E2C2D2C2A2A2A2A2A2A2A2A2A2A2A292A292A2929292827
+      272222222222212122222222212121212121212121212120212223222C2C2B32
+      31323030313030303030302F2F2F2F2F2F2F2F2F2E2E2E2E2E2E2E2E2E2D2E2D
+      2D2D2C2C2D2C2C2C2C2D2D2D2D2D2D2D2D2C2D2E2D2E2D2D2727271E1E1F1D1D
+      1D1C1D1D1D1D1D1C1D1D1C1C1D1C1C1D1C1C1D1C1C1D21212021212121212121
+      2121212121202021212120202021202020202020201F2020201F1F1F201F201F
+      1F1F1F1E1F1F1E1E1F1E1F1E1F1E1E1E1E1E1E1E1E1D1E1E1E1E1E1E1D1D1D1D
+      1C1D1C1C1D1C1C1D1C1B1C1C1B1C1B1B1C1C1B1B1B1B1B1B1A1B1A1A1B1B1A1B
+      1B1A1A1B1A1E1E1D1E1E1E1E1E1D1E1D1D1D1D1D191919191919191919191819
+      1819181818181818181818181818181818171817171717171716161716161716
+      1517151616151615151515151515151515151413131312111111121111111111
+      1111111111111111101111171717222222232322232322232324242424242424
+      2424241A1A1A0E0E0E0D0E0E0E0D0D0D0D0E0D0D0D0D0C0D0D0D0C0D0D0D0C0D
+      0D0C0C0C0C0D0C0C0C0C0B0C0C0C0B0C0B0B0B0B0C0B0C0B0B0B0B0B0B0B0B0A
+      0B0B0B0B0A0A0A0B1B1B190A0A0A303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303131313535353737
+      373939393B3B3B3D3D3D2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F343434393938393939393939393939393939393939393939393939393939
+      3939393939393939393939383939383938383938383938383938383938383838
+      383838383838383838383838383838383838383838383838383333332F2F2F2F
+      2F2F2F2F2F3030303030303131313A3A3A4747474C4C4C5151515656565B5B5B
+      5E5E5E4141413030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303636363A3A3A3B3B3B3D3D3D3E
+      3E3E3E3E3E303030303030303030313131313131313131383737383838393939
+      3939393939393939393A3A3A3B3B3B3B3B3B3B3B3B3B3B3A3C3C3B3D3C3C3E3D
+      3D3E3D3D3F3E3E3F3E3E403F3F403F3F41404042424242424242424244444444
+      44444545454646464747474949494949494A4A4A4B4B4B4D4D4D4D4D4D4F4F4F
+      4D4D4D4B4B4B4D4D4D4F4F4F5050505454546666666C6C6C7171717676767B7B
+      7B5959595B5B5B5C5C5C5D5D5D5F5F5F5F5F5F61616162626263636364646466
+      66666767676868686969696B6B6B6B6B6B6C6C6C6D6D6D6E6E6E6E6E6E6F6F6F
+      6F6F6F6F6F6F7070706F6F6F6F6F6F7070707070707070707070706F6F6F7070
+      7070707070707070707070707071717172727272727272727174747475757474
+      7373747474757576757675757575767676777777777777787878777777767676
+      76767675757675757576777678787879787879797979797A7272726D6D6D6C6D
+      6C6C6B6C6A6B6A6B6B6B7070706F6F6F6E6E6E6D6D6D6C6C6C69696A69696968
+      6767666766666564656463636262626161605F5F5E5E5E5C5C5C5B5B5B5A5959
+      5858585757585656565454545454545252525050504F4F4E4E4E4E4C4C4C4C4B
+      4B4A49494948484746464747474544454444444344444141414141413C3B3B37
+      36363637363635363434343A3A3A3D3C3C3B3C3A3B3A3A3A3A39393838383737
+      3737373737373635363535363435353433343333333333323333313231313230
+      313130303131313030302F2F2F2F2F2F2E2E2E2E2F2F2E2E2E3131313030302F
+      302F2F302F302E2F2D2B2C2B2A2A2A2A2A292A2A2A2A2A2A292A292A29282828
+      2323232222222122222122212121222121212121212121212020212322232B2A
+      2A2E2F2F3030303030303030302F2F2F2F2F2F2F2F2F2F2F2F2E2F2F2E2F2F2F
+      2F2F2E2E2F2E2F2E2E2E2E2C2C2C2627271F1F1F1E1D1E1D1D1D1D1D1D1D1D1D
+      1D1D1D1C1D1D1C1C1D1C1D1D1D1D1E2021212122212222212221222121212121
+      2121212121212021212121202020202020202020202020201F1F1F1F1F1F1F1F
+      1F1F1F1E1F1F1F1F1F1F1F1E1E1E1E1E1E1E1E1E1E1E1E1E1E1D1D1D1D1E1D1D
+      1D1C1C1D1C1C1C1C1C1C1B1B1C1B1B1B1B1C1B1B1B1B1B1A1B1B1B1A1A1A1B1C
+      1B1E1F1E1E1E1E1E1E1E1E1D1E1C1D1C19191A19191919191919191819181919
+      1919181819181818181818181817181717181717181717171616171616171616
+      1616151616151515151515151515141514151414131112121211111111111110
+      1111111111111111101115151621212123232322232224242423242424242424
+      24241D1D1D0F0F0F0E0E0E0E0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0D0C0C0C0C
+      0C0C0D0D0C0C0C0C0C0C0B0C0B0B0C0B0B0B0B0B0B0B0B0B0B0B0B0B0A0A0A0B
+      0B0B0B0A1B1B190A0A0A30303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030323232363636373737393939
+      3B3B3B3B3B3B3030302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F3035353539393939393939393939393939393939393939393939393939
+      3939393939393938393938393938393838393838393838393838393838383838
+      3838383838383838383838383838383838383534342F2F2F2F2F2F2F2F2F2F2F
+      2F3030303131313636364747474C4C4C5050505656565B5B5B5E5E5E48484830
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303131313838383A3A3A3B3B3B3D3D3D3E3E
+      3E38373830303030303030303031313131313134343438383838383839393939
+      39393939393939393A3A3A3B3B3B3B3B3B3B3B3A3B3B3A3C3C3B3D3C3C3D3C3C
+      3E3D3D3E3D3D3F3E3E403F3F403F3F4140404241414242424242424343434444
+      444545454545454646464848484949494949494B4B4B4C4C4C4D4D4D4B4B4B4A
+      4A4A4A4A4A4C4C4C4E4E4E5555556464646A6A6A707070757575707070575757
+      5757575959595A5A5A5B5B5B5C5C5C5E5E5E5F5F5F6060606161616363636363
+      636565656666666767676767676868686A6A6A6969696A6A6A6A6A6A6B6B6B6B
+      6B6B6B6B6B6A6A6A6A6A6A6A6A6A6A6A6A6A6A6A6A6A6A6A6A6A6969696A6A6A
+      6A6A6A6A6A6A6B6B6B6B6B6B6C6C6C6C6C6C6D6D6D6D6E6E6E6E6E6E6F6E706F
+      7070707070707172727271727170707171727172727272727272717271717170
+      70707171717272727474747575747575757676767171716A6A6A686969696969
+      6767666667666D6D6D6C6C6C6B6C6B6969696969696666676666666464646363
+      63626261616160605F5F5F5E5E5D5C5C5B5B5B5A595A59585958575857565654
+      54545454545252525151515050504F4F4F4D4D4C4C4C4B4B4B4A4A4A49484848
+      4846474646464444444444444342434141424040404040403E3D3D3536363636
+      363435343435343535353B3B3A3B3A3A393A393A393839373738383738373736
+      3636363636343435333434343333333333333433323231323230313230323130
+      323130302F2F2F2F302F2F2F2F2F2F2F2E2F2E2E2E2F2E2E3030302F30303030
+      3030302F2E2F2E2B2B2B2A2B2A2A2A2A292A2A292A2A2A29292A292A29282924
+      2424222222222222212121212121222121212121212121212121202020202020
+      2323232828282A2A2A2C2C2B2E2D2E3030303030303030302E2E2E2B2A2A2829
+      292625252020221E1E1E1E1D1E1E1D1E1D1D1D1E1E1E1D1D1D1D1D1D1D1C1D1C
+      1D1D1C1D1D1F1F20222222222222212222222222212122212121212122212121
+      212121202121212020202120202020201F20201F2020201F1F1F201F1F1F1F1F
+      1F1F1F1F1F1E1F1F1F1F1F1E1E1E1E1E1E1E1E1E1D1D1D1D1E1E1E1D1E1D1C1D
+      1C1C1D1C1C1C1C1B1C1C1B1C1B1B1B1B1C1B1B1B1B1B1B1B1B1B1E1C1D1F1E1F
+      1E1E1E1E1E1E1E1D1E1B1A1A191A1A1919191919191919191919191818181819
+      1818191818181818181718181717171717171717161717161617161616161516
+      1515161516151515151615151515141515141414121212111111121211111111
+      1110111010111010111212142020202323232323232423232324232425242424
+      242020200F0F0F0E0E0E0D0D0E0E0D0E0D0D0D0D0D0D0D0D0D0C0D0D0C0D0D0D
+      0C0C0C0C0C0C0C0C0C0C0B0C0B0C0B0B0B0C0B0C0B0B0B0B0B0B0B0B0B0B0B0B
+      191B1B0A0B0B3030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303434343737373838383A3A3A3C3C3C3D
+      3D3D3E3E3E3636372F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F3030303535353939393939393939393939393939393939393939393939
+      3939393839393839393839383839383839383839383839383838383838383838
+      38383838383838383838383534342F2F2F2F2F2F2F2F2F2F2F2F303030313131
+      3636364646464B4B4B5050505555555A5A5A5E5E5E4D4D4D3030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303535353939393A3A3A3B3B3B3E3E3E3E3E3E
+      3131313030303030303030303131313131313837373838383838383939393939
+      393939393939393A3A3A3B3B3B3B3B3B3B3B3A3B3B3A3B3A3A3C3B3B3D3C3C3E
+      3D3D3E3D3D3F3E3E3F3E3E403F3F403F3F414141424242424242424242444444
+      4444444545454646464747474848484949494A4A4A4B4B4B4848484848484949
+      494A4A4A4B4B4B5353536363636969696E6E6E7474746E6E6E54545455555557
+      57575757575959595A5A5A5B5B5B5C5C5C5D5D5D5F5F5F5F5F5F616161616161
+      6363636262626464646565656565656565656565656565656767676666666565
+      6566666665656565656565656565656565656564646465656564646465656565
+      6565656565656565666666666666676767676867696968696A6A6A6A6A6B6A6B
+      6B6A6B6C6B6B6D6D6C6D6D6D6D6D6C6E6D6D6E6E6E6D6D6D6E6E6E6D6D6D6C6C
+      6C6D6C6D7171717070707070707272726F6F6F65656565656564646464646463
+      636369686969696967686767676766666665656563626362626261606060605F
+      5F5F5E5E5D5D5C5B5B5B5A5A5A59595858585757565455555454545353525151
+      514F4F504F4F4F4D4D4D4D4D4D4B4B4B4B4B4949494848484848464646454544
+      44444443434242424141414040403F3F3F3F3F3F3E3E3E373636353534333434
+      3332333131323B3A393A3A393939383938383938383837373736373737363535
+      35343434343433343434343334323333323232323231323231323130312F3031
+      2F2F302F2F2F2F2F2E2F2F2F2E2E2E2E2D2D2E2E2F2F2F303031303030303030
+      30302F2E2E2E2B2B2C2A2A2B2A2A2A292A2A2A2A292A2A2A2A2929292A292727
+      2722222221222122212222212221212221212121212021212020212021212021
+      20202020201F2020201F201F1F1F1F20201F1F201F1F1F1F1F1F1F1E1F1F1E1F
+      1E1F1F1E1F1E1E1E1E1D1D1E1E1E1E1D1D1D1D1D1E1D1D1D1D1D1D1E1E1E2120
+      2123222223222222222222222222222221212122212122212122212122212121
+      2021212020202020202021202020201F1F1F20201F20201F1F201F1F1F1F1F1F
+      1F1F1F1F1F1E1E1E1E1F1E1E1E1E1E1E1E1E1D1E1E1E1E1D1E1D1D1D1D1C1D1C
+      1C1D1C1C1C1B1C1C1B1B1C1B1B1B1B1B1B1B1B1C1B1B1F1E1D1F1E1E1F1F1E1E
+      1E1E1E1E1D191A1919191A1A191A1A1919191919191919181819191819191819
+      1818181818181818171817171817171716161716161716161616161616151516
+      1515151515151615151515151515141515141512131212111111111111111111
+      10111111111111111111121C1C1C232223232223232323242323242424242424
+      2322231212120E0D0D0D0D0E0D0D0E0D0D0D0D0C0D0C0C0C0C0D0D0D0C0C0C0C
+      0C0C0C0C0B0C0C0B0C0C0B0C0B0B0B0C0C0C0B0B0B0C0B0B0B0B0B0B1B1B1B0A
+      0B0B303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303434343838383A3A3A3B3B3B3C3C3C3E3E3E3F3F
+      3F4040403D3D3D3333332F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F303030353535393939393939393939393939393939393939393939
+      3939383939383938383938383938383938383938383838383838383838383838
+      383838383736362F2F302F2F2F2F2F2F2F2F2F3030303131313333334646464A
+      4A4A5050505555555959595C5C5C4F4F4F303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303131313838383838383A3A3A3B3B3B3D3D3D3939392F
+      2F2F2F2F2F2F2F2F2F2F2F303030333333383838383838383838393939393939
+      3939393939393A3A3A3A3A3A3B3B3A3B3B3A3B3A3A3B3A3A3C3B3B3D3C3C3E3D
+      3D3E3D3D3F3E3E3F3E3E3F3F3F3F3F3F3F3F3F40404041414141414142424243
+      4343444444444444454545464646484848484848454545454545464646474747
+      4949495655566262626767676C6C6C7171716464645151515252525252525454
+      545555555656565757575858585959595A5A5A5B5B5B5D5D5D5E5E5E5E5E5E60
+      60605F5F5F616161616161616161616161626262626262616161616161616161
+      6060606161616060605F5F5F5F5F5F5F5F5F5E5E5E5E5E5E5F5F5F5F5F5F6060
+      6060606060606061616162626263636363646465656465656466666567666767
+      6768686767676767676768686868696969696969696969686867696869696968
+      6C6C6C6C6C6C6C6D6C6D6D6E6D6D6D616161616161605F605F5F5F5E5D5E6363
+      636565656564646463646161616161615F5E5F5E5E5E5D5E5D5C5C5C5A5B5A5A
+      5A5A595858575757575656545454535353525251505151504F4F50504F4D4D4D
+      4C4C4C4C4C4C4A4A4A4948494747474747474545444444434444434342424141
+      414040403F3F3F3F3F3F3E3E3F3D3E3D3C3C3C3A3A3A34343332323332323231
+      3231343434383938383837383837373737373635353435353435343333333333
+      33323333323331323131313232333232323232323131313030313030302F3030
+      2F302F302F2F2F2E2E2E2E2E2E2D2D2E2D2D2D2F2F2F3030303030302F302F30
+      302F2F2F2F2B2B2B2A2A2B2A2A2A292A2A29292A29292A292A2A292A29292828
+      2423252221222221212121212121212121212121212121212121212020212020
+      202020202020201F1F1F1F201F201F1F1F1F1F201F1F1E1F1F1F1F1E1F1F1F1E
+      1E1E1E1F1E1E1E1E1D1E1E1E1E1E1E1E1D1E1D1D201F20232323232323222323
+      2223222323232222222122222121222222222321212222212221212221212120
+      2120202020212020202020202120201F1F2020201F1F1F1F1F1F1F1F1F1F1F1F
+      1F1F1E1F1E1E1E1F1F1F1E1E1E1E1E1E1E1E1E1D1E1E1E1E1D1D1D1D1C1D1C1C
+      1C1C1C1D1C1C1C1C1C1C1C1B1B1B1B1D1D1D1F1F1F1F1F1F1F1E1F1F1E1F1C1C
+      1C1A1A1A1A1A1A1A1A1A1A19191A1919191A1919191919181918191919181918
+      1818181817181817181717171717181616171716171616161616161516161615
+      1516151516161515151515151515151415151212121112111111111011111111
+      111010111110111111121A1A1B23222323232224232323232425242424242423
+      23231616160E0E0E0E0D0D0D0E0D0D0D0D0C0D0D0D0C0C0D0D0C0D0D0D0D0C0D
+      0C0C0C0C0C0C0C0C0C0C0C0B0C0C0B0B0B0B0B0B0B0B0B0B1B1B1B0B0B0B3030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303131313737373B3B3B3C3C3C3D3D3D3E3E3E3F3F3F3F3F3F
+      3F3F3F4040403B3B3B3131312F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F30303035353539393939393939393939393939393939393839
+      3938393938393838393838393838393838393838383838383838383838373636
+      2F2F302F2F2F2F2F2F2F2F2F3030303131313333334343434949494E4E4E5353
+      535858585C5C5C5555553232322F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F3333333838383939393A3A3A3C3C3C3E3E3E3030302F2F
+      2F2F2F2F2F2F2F2F2F2F30303036363637373737373737373738383838383838
+      38383838383939393939393A3A393A3A393A39393A39393B3A3A3C3B3B3C3B3B
+      3D3C3C3D3C3C3E3D3D3E3D3D3E3E3E3F3F3F4040404141414141414141414343
+      4343434344444445454545454547474743434343434345454545454547474753
+      52535E5E5E6464646A6A6A6E6E6E5F5F5F4E4E4E4F4F4F505050525252525252
+      5353535454545656565656565757575959595A5A5A5A5A5A5B5B5B5B5B5B5D5D
+      5D5C5C5C5D5D5D5D5D5D5D5D5D5E5E5E5D5D5D5C5C5C5C5C5C5C5C5C5B5B5B5B
+      5B5B5A5A5A5A5A5A5959595959595959595959595959595A5A5A5A5A5A5A5A5A
+      5B5B5B5B5B5B5C5C5C5D5D5D5E5E5E5E5E5E5F5E5F6060606160616262626363
+      6363626364646464646364646464646465656565656464646463626268686868
+      68686868686869686A696A5F5F5F5E5E5E5D5D5D5B5B5B5B5B5B5C5D5C616061
+      6061615F5F605E5E5E5E5E5E5D5D5D5C5C5C5B5A5B5A59595959585858575756
+      555554555453535252525151515050505050504D4D4C4B4B4C4B4B4B4A4A4A4B
+      4B4A4848484848484647464544434544444443424241414241413F3F3F3F3F3F
+      3F3F3E3E3E3D3D3C3C3B3C3C3B3B3B3A3939313131313131303030302F303131
+      3037373738383838383737373636363535353434333434343434333333333332
+      323232323232313232313231313130303030302F30302F2F302F302E2F2F2F2E
+      2E2D2D2D2D2D2C2D2D2D2D2D2D2D2D2C2D2D302F2E2F2F2F2F2F2F2F2F2F2E2E
+      2E2D2E2E2B2A2A29292929292929292929292929282828282828282828282827
+      2627242324222221212121212221212121212121202021212121202121202020
+      20202020202020201F201F2020201F1F1F1F1F1F1F1F1F1F1E1F1F1F1E1F1F1E
+      1E1E1E1E1E1E1E1E1E1E201F2123232223232323242323232323232222222323
+      2223222222222322222222232322222322222222222222222121222121212121
+      2021202021202021202020202020202020201F20201F201F1F1F201F1F1F1F1F
+      1F1E1F1F1F1F1E1E1E1E1E1E1E1E1E1E1E1D1E1E1E1D1D1D1D1D1D1C1D1C1C1D
+      1C1C1D1B1C1C1C1B1C1C1C1F1E1F1F1F1E1E1F1E1E1E1F1E1F1E1B1B1B1A1A1A
+      1A1A1A1A1A1A1A191A1A191A19191A1919191819191919181918191918181818
+      1818181718171717171717161718171717161617161616161616151616151515
+      1515161515151515151515151414151415121312111211111111101111111011
+      1010111011111010111818182222212323222323222423242424242424242424
+      241918180E0E0E0D0D0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0D0D0C0D0D0C0C0C
+      0C0C0C0C0C0C0C0C0C0C0B0B0C0C0B0C0C0B0B0B1B1B1B0A0B0B303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303434343C3C3C3D3D3D3E3E3E3F3F3F3F3F3F3F3F3F3F
+      3F3F4040404040403837383030302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F3030303535353838383939393939393939393939383939
+      383938383938383938383938383938383838383838383838383030302F2F2F2F
+      2F2F2F2F2F3030303131313333334141414949494D4D4D5252525858585B5B5B
+      5555553232322F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F3030303636363838383939393B3B3B3C3C3C3939392F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F3232333737373737373737373737373737373838383838
+      383838383838383939383A3A393A39393A39393A39393B3A3A3B3A3A3C3B3B3D
+      3C3C3D3C3C3E3D3D3D3D3D3E3E3E3E3E3E3E3E3E3F3F3F404040414141424242
+      4343434444444444444545454141414141414141414242424545455252525D5D
+      5D6363636868686C6C6C5959594B4B4B4C4C4C4D4D4D4E4E4E4F4F4F50505051
+      5151515151535353545454555555555555565656585858585858585858595959
+      5959595959595959595959595858585858585757575757575757575656565555
+      5555555555555555555555555554545454545455555555555555555556565656
+      56565656565757575858585959595A5A5A5B5B5B5C5C5C5D5D5D5D5E5E5D5E5D
+      5F5F5E60605F60616060606060606060606060605F5F5F5F6262626464646465
+      656665656766676060605A59595959595858585657575656565E5F5F5D5D5D5C
+      5C5D5C5B5B5A5A5A5A5A5A585858575757565656565655555454535352525152
+      5250504F4F4F4F4F4F4D4D4D4C4B4B4B4B4B494A4949494A4747474847474746
+      46454545444443434342434242414140414140413F3F403F3F3E3E3E3D3D3D3C
+      3B3C3C3B3B3B3B3C3A3B3B393A3A34343430303030302F2F302F2F2F2F343434
+      3636373636363535353535343535343534343433343332323332323232323232
+      3232323231323230303030303030303030302F2F302F30302E2E2E2D2E2D2D2E
+      2D2E2D2D2D2D2D2D2D2C2C2C2C2C2C2D2C2F2F2E2F2F2F2F2F2F2F2E2E2E2E2E
+      2F2D2D2B2B2C2929292929292929292829282828282928282828282828282828
+      27272727252425222221202021202020201F1F20212020212020212021202020
+      2020201F201F1F1F201F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1E1F1F1E1E201F20
+      2222222424242424242424242423232424242324232323232323232323222223
+      2223222223232423232323232323222223222222222222212121212121212120
+      212020202120202021202020201F202020201F201F1F1F201F1F1F1F1F1F1F1F
+      1E1F1F1F1E1F1E1E1F1E1E1E1E1D1E1E1D1E1E1E1E1D1E1D1D1D1C1D1C1C1D1C
+      1C1D1C1C1D1D1C201E1E1F1E1E1F1F1E1E1F1E1D1D1D1A1A1B1A1B1A1A1A1A1A
+      1A1A191A191A1A19191919191919191919191919191919191818191818181817
+      1818171817171816171817171717161716171616161616161515151516151616
+      1516151515151515151514151515151413131411111111111111111110101111
+      1011101011101111151515222222232323232323242323242424242424252524
+      1E1E1D0F0F0F0D0E0E0E0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0C0C0C0C0C0C
+      0C0C0C0C0C0C0C0C0B0B0C0C0C0C0C0B1B1B1E0B0B0B30303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303131313838383E3E3E3F3F3F3F3F3F3F3F3F3F3F3F3F3F
+      3F4040404040403F3F3F3636372F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F30343434383837393939393938393938393838
+      3938383938383938383938383938383838383130312F2F2F2F2F2F2F2F2F3030
+      303030303232323F3F3F4949494D4D4D5252525757575A5A5A5A5A5A3535352F
+      2F2F2F2F2F2F2F2F2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+      2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+      2E2E2E2E3232323737373838383939393B3B3B3C3C3C2F2F2F2E2E2E2E2E2E2E
+      2E2E2E2E2E2E2E2E353535363636363636363636363636363636373737373737
+      3737373737363838373837373938383938383938383938383A39393B3A3A3C3B
+      3B3C3B3B3C3B3B3C3C3C3C3C3C3D3D3D3D3D3D3E3E3E40404040404040404041
+      41414242424343433E3E3E3F3F3F4040404040404343435252525C5C5C606060
+      6565656A6A6A5050504848484848484949494B4B4B4C4C4C4D4D4D4D4D4D4E4E
+      4E50505050505051515152525253535354545454545454545455555555555555
+      5555555555545454535353545454545454535353525252525252525252515151
+      5050505050505050505050505050505050505050505050505050505151515252
+      525252525353535454545555555656565757575858585959595A5A5A5B5B5B5A
+      5B5A5C5B5C5C5B5B5C5B5B5B5B5C5B5B5B5B5B5B5D5D5D605F60616061616061
+      6262615E5F5F5655565454555454545353535252525959585A595A5959595859
+      58565656575657555555545454535352525252525251504F4F4E4E4E4E4D4D4D
+      4C4C4B4B4B4A4A4A494949494849474746474746454646454444434343434443
+      4343434242414141403F3F3E3F3E3E403F3F3D3D3C3B3C3C3B3B3B3B3A3B3A3A
+      393839393839393939383636362F2F2F2E2E2E2D2E2E2E2E2D2E2E2E34343535
+      3535343434343433343433343332323232323131323231323131313131313031
+      2F3030302F2F302F2F2F2F302F2F2F2F2F2E2E2E2E2E2E2D2E2E2D2E2D2E2E2D
+      2E2D2D2D2C2C2D2D2C2D2D2D2D2D2C2D2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+      2D2D2C2D2C292929292929292829282829282828282929282828282828282828
+      272727272727272726242425232223212122202020201F1F2020212020202020
+      20201F1F2020201F201F1F1F2020202022212222232325242425242524252425
+      2424242424232423232324232324232324232323232323222323242324242424
+      2323232323232322232323222322222321212221212221212121212121212021
+      2020202020202020202020202020201F1F201F1F1F1F1F1F1F1F1F1F1F1F1F1E
+      1F1F1E1E1F1E1E1E1E1E1E1E1E1D1E1D1E1D1E1E1D1D1D1D1D1C1D1C1C1D1C1C
+      1F1F1F1F1E1F1F1E1E201E1F1F1F1E1C1C1B1A1A1A1A1A1A1A1B1B1A1A1A1A1A
+      1A1A1A191A1A1A19191919191919191919181919191819181818181818181718
+      1717181717171716171716171617171617161616161616151616151515151615
+      1515151515151514151415141514141313131111121110111111111111111010
+      1110101110111112121320202022232222232223232324242427272729292925
+      24250F10100E0E0D0D0D0D0D0E0D0D0D0D0D0C0D0C0C0C0C0D0D0C0C0C0C0C0C
+      0C0C0B0C0C0C0C0C0B0C0C0B1E1B1B0C0B0B3030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303333333B3B3B3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F
+      3F3F3F4040404040403E3E3E3535352F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F33323336363639393839393839383839
+      38383938383938383938383130312F2F2F2F2F2F2F2F2F303030303030323232
+      3E3E3E4848484C4C4C5151515656565A5A5A5959593737372E2E2E2E2E2E2E2E
+      2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+      2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+      2F2F2F3434343636363737373939393A3A3A3636362E2E2E2E2E2E2E2E2E2E2E
+      2E2E2E2E30303034343435353535353535353535353535353536363636363636
+      36363737363737363736363837373837373837373837373938383938383A3939
+      3B3A3A3A3A3A3B3B3B3B3B3B3C3C3C3C3C3C3D3D3D3E3E3E3F3F3F3F3F3F3F3F
+      3F4040403B3B3B3C3C3C3D3D3D3E3E3E4040405151515959595D5D5D63636367
+      67674D4D4D4646464646464747474747474848484A4A4A4B4B4B4C4C4C4D4D4D
+      4D4D4D4E4E4E4F4F4F4F4F4F5050505151515050505151515151515151515050
+      505151515050504F4F4F4F4F4F4E4E4E4E4E4E4D4D4D4D4D4D4D4D4D4D4D4D4C
+      4C4C4C4C4C4C4C4C4B4B4B4B4B4B4C4C4C4C4C4C4D4D4D4E4E4E4E4E4E4F4F4F
+      5050505151515151515252525353535454535454545555555656565757565758
+      575757575757575757575656575656565757575B5B5B5B5B5B5D5D5D5E5E5D5D
+      5E5D515051515252504F4F4F4F4F4F4F4F535353565656565556555455535353
+      5453535151515151515050504F4F4E4E4E4D4D4D4D4B4B4A4C4B4B4A4A494848
+      484848484646464646454545454443444243424241414242424141414141413F
+      3F3E3F3F3E3F3E3D3E3D3D3C3B3C3C3C3B3B3C3B3B3B3B3A3A3A393939393939
+      3737383636373636363131312E2E2E2D2D2D2D2D2D2C2C2C3130313333333334
+      333333333333333333323333313232323232313332313130302F302F30303030
+      30302F302F2F302F2F2F302E2E2E2E2E2D2E2E2D2E2D2C2E2D2D2D2C2C2D2C2C
+      2C2C2C2C2C2C2C2C2B2B2C2B2B2B2C2E2E2D2E2E2E2E2E2D2D2E2E2D2E2D2D2D
+      2D2C2C2C29292928282828282827282727272728272727272727272727272726
+      2626282727282727272727272726272726272625242425242524252525252525
+      2524252726262625262626252625252525252525252424242525242425252524
+      2524242424232423232424242324232324232324242424242323242324242423
+      2324232323232323232222232221222121222121222121212121212021202121
+      2021212020202020202020202020201F201F1F1F1F1F1F1F1F1F1F1F1F1E1E1F
+      1E1E1E1E1E1E1E1E1E1E1E1E1D1E1E1E1E1E1D1D1D1D1D1D1C1E1D1D1F1F1F1F
+      1F1E1F1F1F1F1E1E1E1E1E1B1B1B1B1B1B1B1B1B1B1A1A1A1A1A1A1A1A1A1A1A
+      1A1A1A1A1A1A1919191A1A191919191919191918181818181818171818171817
+      1718171718161717171717161616161616161615161616151615161515151515
+      1515151415151515141514151515141314121112111111111111111111111011
+      1010111010111212131C1C1C2322222324242525252828282B2B2B2E2E2E2D2D
+      2E1414150E0E0E0D0D0D0D0D0D0D0C0D0D0C0C0D0C0D0C0D0D0C0D0C0C0C0C0C
+      0C0C0C0B0C0B0C0C1B1B1B0B0B0B303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303636363E3E3E3F3F3F3F3F3F3F3F3F3F3F3F3F
+      3F3F4040404040404040403E3E3E3535352F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3131313434343838383938383938
+      383938383232322F2F2F2F2F2F2F2F2F3030303030303232323B3B3B4747474C
+      4C4C5151515555555959595B5B5B3737372E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+      2E2E2E2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D
+      2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D31
+      31313535353636363737373939393A3A3A2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D
+      2D2D2D3333333434343535353535353535353535353535353636363636363636
+      3536363536353537363638373738373738373738373738373738383839383839
+      39393939393939393A3A3A3B3B3B3C3C3C3C3C3C3C3C3C3D3D3D3E3E3E3D3C3C
+      3B3B3B3B3B3B3B3B3B3C3C3C3E3E3E5252525656565B5B5B6060606565654343
+      434343434343434343434545454646464747474747474848484A4A4A4A4A4A4B
+      4B4B4C4C4C4C4C4C4C4C4C4D4D4D4D4D4D4D4D4D4D4D4D4D4D4D4C4C4C4D4D4D
+      4C4C4C4B4B4B4A4A4A4A4A4A4A4A4A4A4A4A4949494949494848484848484949
+      494848484848484848484848484949494949494949494A4A4A4A4A4A4B4B4B4C
+      4C4C4D4D4D4E4E4E4E4E4E4E4F4F505050505051525151535353525252525252
+      535353525352535453525252525252575757575858595959595959595A5A5151
+      514D4E4D4D4D4D4C4B4C4A4A4A4B4B4B5252525252525150515050505050504E
+      4E4E4D4D4D4D4C4C4C4C4B4B4B4A4A4A49494949484747474747464545454545
+      4445444343434242424040404040404040404141403F40403E3E3E3E3E3D3D3D
+      3C3C3C3C3C3B3B3B3B3B3B3A3A3A3A3938383938383838383737373736353536
+      35363636353434342C2C2C2C2C2C2B2A2B2A2A2A2A2A2B333232333334333433
+      323233323231323231313131323130302F2F312F3030302F2F2F2F2F2E2F2F2F
+      2E2F2F2F2E2D2D2D2D2D2D2D2D2D2D2C2C2C2C2D2D2C2C2B2B2C2B2B2C2B2B2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2B2B2C2C2C2D2D2D2D2D2D2D2D2D2C2D2C2D2C2C
+      2C2B2B2A2A2A2828282827282828282728282727272727272727272727272726
+      2626272626262627272627272627262626262626252526262527262627262627
+      2526262526262525262526252625252525252425252424242424242424242424
+      2424242424232423232424242424242424242424242424242424242423232324
+      2323232223222223222123212122212122222122212121212121212120202020
+      202020202120202020201F1F20201F1F1F20201F1F1F201F1F1F1F1F1F1E1F1E
+      1E1E1F1E1F1E1E1E1E1E1E1E1D1D1E1E1D1E1E1E1D201F1F1F1F1F1F1F1F1F1F
+      1F1F1E1E1C1D1C1B1C1B1B1B1B1B1B1B1B1A1B1A1B1A1B1B1A1A1A1A1A1A1A1A
+      19191A191A1A1919191919191919191818191818191817181818181717181717
+      1817171716161716171616161616161616161615151616161515151516161515
+      1615151515141514151414151414141412121211111111111111101110101110
+      10111010111111111A1A1A2525242626262B2B2A2E2E2E323232343535303031
+      0E0D0D0D0D0E0E0D0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0D0C0C0D0C0C0C0C0B
+      0B0C0B0C1E1E1E0C0C0C30303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303131313838383E3E3E3F3F3F3F3F3F3F3F3F3F3F
+      3F4040404040404040404040403E3E3E3535352F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F333233363535323232
+      2F2F2F2F2F2F2F2F2F3030303030303131313939394646464B4B4B5050505555
+      555959595A5A5A3F3F3F2E2E2E2E2E2E2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D
+      2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2C2C2C
+      2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2D2D2D3333
+      333535353535353737373838383535352B2B2B2C2C2C2C2C2C2C2C2C2C2C2C2E
+      2E2E333333333333343434343434343434343434343434343434353534353534
+      3534343534343635353635353736363736363736363736363837373837373838
+      383838383838383939393A3A3A3A3A3A3B3B3B3B3B3B3B3B3B3B3B3B38383838
+      38383A3A3A3B3B3B3C3C3C4F4F4F5454545959595E5E5E6262623F3F3F404040
+      4141414141414242424343434444444444444646464646464646464747474848
+      484848484949494949494949494949494A4A4A4A4A4A49494949494948484848
+      4848474747474747464646464646464646454545444444454545444444454545
+      4545454545454646464646464646464646464646464747474747474848484949
+      494A4A4A4B4B4B4C4C4C4D4D4C4C4D4D4D4D4D4E4E4E4D4D4D4E4E4E4F4F4F4F
+      4F4F4F4F4F4E4E4E4F4F4F515151545555555555565656565656525151494A4A
+      4848484848484747474646464F4F4E4E4E4E4D4C4C4C4C4C4C4C4C4C4C4B4A4A
+      4B4B4A4A49494849484748484747464646454444444444444343434241414241
+      41414040403F3F3F3F3F3F3E3E3E3D3D3D3D3D3D3C3D3C3B3B3B3B3A393B3B3A
+      3939393A38393938373838383837373637363535353535353534353534353334
+      333333342D2D2D2B2B2B2929292929292929292C2C2C32313232313131313131
+      313131313031313030302E302F2E2F2E2E2F2E2E2F2E2F2E2E2E2E2E2E2D2D2C
+      2C2C2C2D2C2D2D2D2D2D2D2D2D2D2C2D2D2C2D2D2B2C2B2C2C2B2B2C2B2B2B2B
+      2B2B2B2B2B2B2A2A2A2A2A2A2A2C2B2B2D2D2D2D2C2D2C2C2C2C2B2B2B2B2B2B
+      2B2B2B2B2B2A292A272828272626272626262726262626262626272726262726
+      2627262626262626252727262726252626252726252626252625252726262626
+      2626262626252526252526262525252525252525252525242524242425252425
+      2525252425252524252424242425242424232424242324242424232423242323
+      2323222322222322212222212222212222212221212121212121212021212120
+      202020202020202020201F1F201F201F1F1F201F1F1F1E1F1F1E1F1E1F1F1F1F
+      1E1E1F1E1E1E1E1E1E1E1E1D1E1E1E1E1F1F1F1F201F1F1E1F1F1F1F1F1F1D1D
+      1B1C1B1C1B1B1C1B1B1B1B1B1B1A1B1A1A1B1A1B1A1A1B1A1A1A1A1A1A191A1A
+      1A1A19191A1A1919191919191918181818181719181719171819181718171717
+      1716171616161717161617161616161616151516161516161515161615151516
+      1415151515141414141514141415141213121011111111111011111110111010
+      11101011111112191A1A2726262C2C2D3232323636363939392929290E0E0D0D
+      0E0D0E0E0E0D0E0D0D0D0D0D0D0D0D0D0D0C0D0D0D0C0C0C0C0C0C0C0C0C0C0C
+      1E1E1E0B0C0B3030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303232323939393F3F3F3F3F3F3F3F3F3F3F3F
+      4040404040404040404040404040403F3F3F3837383030302F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F3030303030303131313838384646464B4B4B4F4F4F5353535757575A5A5A
+      3F3F3F2D2D2D2D2D2D2D2D2D2D2D2D2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C
+      2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C
+      2C2C2C2C2C2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2F2F2F333333
+      3434343535353737373838382B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B3131
+      3132323232323233333333333333333333333333333333333334343334343334
+      3333343333343333353434363535363535363535363535363535363636363636
+      3737373737373737373939393939393939393A3A3A3737373535353636363737
+      373737373C3C3C4D4D4D5252525757575B5B5B5D5D5D3C3C3C3C3C3C3E3E3E3E
+      3E3E3F3F3F404040414141414141424242434343434343454545454545454545
+      4545454646464646464646464646464545454545454545454545454444444444
+      4444444443434342424242424242424242424241414142424241414141414142
+      4242424242424242434343434343434343444444444444454545454545464646
+      474747484848494948494948494A494A4949494A4A4B4B4A4A4A4B4A4A4A4B4B
+      4B4B4B4B4A4A4A4C4C4C4F4F4F50504F51515151515150505145454544454445
+      4544434343434343454545474747484747474747464646464646474747474847
+      464646454544444443444443444343424141424040403F3F3F3F403E3E3F3F3E
+      3E3D3D3D3C3C3C3C3C3C3C3C3C3B3B3A3939393A393938383738383739383838
+      3737373637373635353434343534343434343435343434333232333333313131
+      2F2F2F2A292A292929292A292829292828282F2E2D3030313031313030303130
+      302F2F2E2F2F2E2F2E2D2F2E2E2F2D2D2F2D2E2E2D2D2C2C2C2C2C2C2D2C2D2D
+      2C2C2D2C2C2C2C2C2C2C2C2C2C2B2C2C2B2C2C2B2C2A2B2C2A2B2B2B2A2A2A2A
+      2A292A2A2A2A2A292A2A29292A29292B2B2B2B2B2B2C2B2C2C2C2B2C2A2A2B2A
+      2A2A2A2A2A2A2928292927272726252626262626262626262626262525262526
+      2626262625262625262525272626272626262626262525262525272626262625
+      2626252626252525262525252525252525252625252626262626262626262625
+      2526252525252524242424242425242424242424232423232324232323232223
+      2322232222232222232221222122222121222121212121212021202021202021
+      2020212020202020201F201F201F201F1F1F1F1F1F1F1F1F1F1F1E1E1F1F1E1F
+      1E1E1E1E1E1E1E1E1E1E202020201F1F1F1F201F1F1F1F1F1F1D1C1C1C1B1C1C
+      1B1C1B1B1B1B1B1B1B1B1B1A1A1B1B1B1A1B1A1B1B1A1A1A1A1A1A1A1A1A1A1A
+      19191A1919191A19191918181918181918181818171817171817171817171717
+      1617161617171716161716161616161615161615161515151516151615151515
+      1515151515151515141414141414131313111111101111101111111011101011
+      1111121414152A2A2A2F2F303435343939393E3E3E1D1D1D0E0E0E0D0E0D0D0D
+      0E0D0D0D0D0D0D0D0D0D0D0D0D0C0C0D0D0D0C0C0C0C0C0C0D0C0C0C1B1E1E0B
+      0C0B303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303232323A3A3A3F3F3F3F3F3F3F3F3F40
+      40404040404040404040404040404040403F3F3F3A3A3A3131312F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3030
+      303131313535354646464B4B4B4E4E4E5353535656565A5A5A4646462D2D2D2D
+      2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B31313132323233
+      33333535353636363232322A2A2A2A2A2A2B2B2B2B2B2B2B2B2B2C2C2C313131
+      3131313131313131313232323232323232323232323232313232313332323332
+      3233323233323234333334333335343435343435343435343434343435353536
+      3636363636373737373737373737373737363636343434343434343434353535
+      3C3C3C4B4B4B5050505454545858585353533939393A3A3A3A3A3A3A3A3A3C3C
+      3C3D3D3D3D3D3D3E3E3E3F3F3F40404040404041414142424241414142424242
+      4242424242424242424242424242424242424242424242414141414141404040
+      3F3F3F4040403F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3E3E3E3E3E3E3E3E
+      3E3F3F3F40404040404040404041414141414142424242424243434343434343
+      4343444444454545464645464646474747484748474647464646464646464647
+      4646474647464B4B4B4C4C4C4C4C4C4E4E4D4F4E4F4243434141414242414041
+      403F403F3E3F3E3E3E3E3D3D3D3D3D3D3C3C3B3C3C3C3A3A3A393939393A3A39
+      39393A3A3A3A3A3A3A3A3A3939393A3A3A383938383838393839393838383838
+      3838383939393838383838383938383838373737373737363736363635353535
+      3535343434343333333333343332333232323231313130313130302F302F302B
+      2C2B2828282828272727272727272928293030302F2F302E2E2E2E2E2E2E2E2E
+      2E2D2D2D2E2D2D2E2D2D2D2C2D2D2C2C2B2B2C2B2B2C2C2C2C2C2C2B2C2C2B2B
+      2B2B2B2B2B2C2B2B2B2B2B2B2A2B2A2A2A2A2A2A2A2A2A29292A292A29292929
+      29292929282828292828282828282929292B2A2B2B2B2B2A2A2A2A2A292A2A2A
+      2929292929292929292928282828272626272525252525252625252626252625
+      2426262527262526252527262626252626252626252526252526262626252626
+      2525262625262626272727272727272726272727262626272626262626262524
+      2525252525242524252425242424242424242323242323232423232323222323
+      2223222223222123212122212222212222212121202021212121212020202021
+      20202020201F1F1F1F1F20201F1F201F201F1F1F1F1F1E1F1F1F1F1F1E1E1E1E
+      1E1E1E1F1F1F202020201F1F202020201F1F1E1E1E1C1C1C1C1C1C1C1C1C1B1B
+      1C1B1B1C1C1B1B1B1B1B1B1B1B1B1B1A1A1B1A1A1A1A1B1A1B1A1A1A1A1A1A19
+      1A191A1919191818191818191818191818181818181717181718171717171717
+      1616161717161716171616171616161616161515161615151516151515151515
+      1515151515141514151514141513131311111110101111111110101111121219
+      19192C2C2C3232323938393D3D3E4141411111110E0E0E0E0E0E0D0E0D0D0D0E
+      0E0D0E0D0D0D0D0C0D0D0D0D0C0C0D0C0C0D0C0C0D0C0C0C1E1E1E0C0C0C3030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303434343B3B3B3F3F3F4040404040
+      404040404040404040404040404040404040404040403B3B3B3434342F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F303030313131353535
+      4545454A4A4A4E4E4E5252525555555959594848482D2D2D2C2C2C2C2C2C2B2B
+      2B2B2B2B2B2B2B2B2B2B2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A
+      2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A
+      2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2929292929292D2D2D3131313232323333
+      333535353535352929292929292929292929292A2A2A2A2A2A2F2F2F30303030
+      3030303030303030313131313131313131313130313130313130313131313131
+      3131313131313231313232323232323332323332323232323232323232323434
+      343434343535353535353535353333333232323333333333333232323B3B3B4A
+      4A4A4D4D4D515151565656505050363636363636373737383838393939393939
+      3939393B3B3B3B3B3B3B3B3B3D3D3D3D3D3D3E3E3E3E3E3E3E3E3E3E3E3E3F3F
+      3F3F3F3F3F3F3F3F3F3F3F3F3F3E3E3E3E3E3E3E3E3E3D3D3D3D3D3D3D3D3D3D
+      3D3D3D3D3D3C3C3C3C3C3C3C3C3C3C3C3C3C3C3C3C3C3C3C3C3C3D3D3D3D3D3D
+      3D3D3D3D3D3D3D3D3D3E3E3E3E3E3E3E3E3E3F3F3F3F3F3F4040404040404040
+      4041414142414242424143434243434343434343444442424242424243434442
+      42424747474747474848484949494A4A494343443D3D3D3D3E3E3D3C3C3D3D3C
+      3B3B3B3B3B3B3A3A3A3939393838383838373838383737373737363636373536
+      353434343434343434343333323132323031313031302F2F2F2F2F2F2E2E2E2F
+      2F2F2F2F2F2E2D2E2E2E2F2F2F2F363535353634343434343333333333333333
+      3333333333323232313031303130302F2F2F2F2F2F2F2F2F2F2E2E2E2D2D2726
+      282626262726262626262626262A2A2A2E2E2E2E2D2E2E2D2D2D2D2D2D2D2D2C
+      2D2C2D2D2C2C2C2B2B2B2A2B2A2A2C2B2A2B2A2A2A2B2B2B2B2A2B2B2A2A2A2B
+      2B2A2B2A2A2B2A2A2A2A2A292A29292A29292A29292929282928282828282828
+      282827282828282727282727272727272928282A2A292A292929282929292929
+      2828272828272828282828292929282828272727282727272625272627272525
+      2625252726262626262626262726262627262827262828282828282929282829
+      2829282828272728272726262727262727262726262626262726262525252524
+      2525252525252424242425242424242424242424232424242423232322232322
+      2222222322222221222221212221222221212121212121202020212120212020
+      202020201F201F201F201F1F1F1F1F1F1F1F1F1E1F1F1F1F1F1E1F1F20201F20
+      201F2020202020201F20201F1F1F1C1C1C1C1C1C1C1C1C1B1C1C1C1B1B1B1C1B
+      1B1B1C1B1B1B1B1B1B1B1B1A1B1B1B1A1B1B1A1A1A1A1A1A1A1A191A1A191A19
+      1919191919181819181818181819171719181818171818171717171717161717
+      1716171616161616161716161616161616151515161516151516151515151515
+      1514151514151414141414131111111111111110111212121212132120202E2F
+      2E3435353A3A3A4140413232320E0E0E0E0E0E0E0E0E0E0D0E0E0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0C0C0C0C0D0C0C0C0C1E1E1E0C0C0C303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030303434343C3C3C404040404040
+      4040404040404040404040404040404040404040404040403E3E3E3837383131
+      312F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3030303131313232324444444949494E
+      4E4E5252525555555858584E4E4E2D2D2D2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A
+      2A2A2A2A2A2A2929292929292929292929292929292929292929292929292929
+      2929292929292929292929292929292929292929292929292929292929292929
+      29292929292828282828282828282828282929292F2F2F303030313131333333
+      3333333030302828282828282828282828282929292A2A2A2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F302F2F30
+      2F2F302F2F302F2F313030313030323131313131313131313131313131313131
+      3131313030302F2F2F2F2F2F2F2F2F3030303131313131313C3C3C4646464B4B
+      4B4F4F4F53535344444434343434343435353535353535353536363637373738
+      38383838383838383A3A3A3A3A3A3A3A3A3B3B3B3C3C3C3C3C3C3C3C3C3C3C3C
+      3C3C3C3B3B3B3C3C3C3B3B3B3B3B3B3B3B3B3B3B3B3B3B3B3A3A3A3939393A3A
+      3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3A3B3B3B3B
+      3B3B3B3B3B3B3B3B3C3C3C3C3C3C3C3C3C3D3D3D3D3D3D3D3D3D3E3E3E3E3E3E
+      3F3F3F3F3F3F3F3F3E3F3F3F3E3F3F3F3F3F3F3E3E3E3E3E404040403F3F4241
+      414444444444444646464747474545453B3B3B3A3A3A3A3A3A3A393938383838
+      3737373737373737363636353534353535353435333434333333333333333333
+      3232323131313030303030302F2F2E2E2E2E2E2D2D2E2E2D2C2C2D2C2C2C2C2C
+      2C2B2B2B2B2B2B2B2B2A31313132323232323232323232323232323231313131
+      31313030302F2F2F2E2F2F2F2E2E2E2E2E2E2E2E2D2C2C2C2C2C2A2A2A252425
+      2525252625252424242324242B2A2B2D2C2C2C2D2C2C2D2D2C2D2C2C2C2C2A2B
+      2A2B2B2A2B2B292A2A2A2A2A2A2A2A2A2A2A2A292A2A292A29292A29292A292A
+      2A2A292929292928292928292927292928282827282727282728272727262726
+      2727262726262627272726262626262526262727262828272828272827272727
+      2727272728282827282728282828282728272728262728282827282729282928
+      2928292A29292928292828292929282829282829292929292929292929292928
+      2828272927272827272727272627262627272626262525262525252425252524
+      2524242425242524252424242424242423242323232323242323232223232222
+      2222232222232222232121222121212020212121212121212021212020202020
+      20201F1F2020201F201F1F1F1F1F1F1F1F1F1F1F1F1F1F1E21202021201F2020
+      1F20202020201F1D1E1E1C1C1C1D1D1D1D1C1C1C1C1C1C1C1C1B1B1C1C1C1C1C
+      1B1C1B1B1B1B1B1B1B1B1B1A1B1B1A1A1A1A1A1A1B1A1A191A1A1A1A19191919
+      1919191918181918181918181918171817171817171717171717171617171717
+      1616161617161716161616161616161615161516151515151615151515151515
+      1415151415131313121211111111111111121212151415292929313131383838
+      3E3E3D4343432323230F0E0E0F0E0E0E0E0E0E0E0E0E0E0D0E0E0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0D0D0D0D0D0D0C0C1E1E1E0C0C0C30303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303030303232323A3A3A40404040
+      40404040404040404040404040404141414141414141414141414141413C3C3C
+      3535352F2F2F2F2F2F3030303131313333334242424949494D4D4D5151515656
+      565858585151512F2F2F2C2C2C2B2B2B2B2B2B2A2A2A2A2A2A29292929292929
+      2929282828282828282828282828282828282828282828282828282828282828
+      2828282828282828282828282828282828282828282828282828282828282828
+      282828282828282828282828282828282B2B2B2F2F2F30303031313132323233
+      33332828282727272727272727272727272828282D2D2D2E2E2E2E2E2E2E2E2E
+      2E2E2E2E2E2E2E2E2E2F2F2F2F2F2E2F2F2E2F2E2E2F2E2E2F2E2E2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F302F2F2F2F2F2F2F2F2D2D2D2D2C2D2C2C2C2C2C2C2C
+      2C2C2C2C2C2D2D2D2D2D2D2E2E2E2E2E2E3030303939394444444A4A4A4E4E4E
+      5151514242423131313232323232323333333333333434343434343535353535
+      353636363737373737373737373838383939393939393838383939393939393A
+      3A3A393939393939383838383838383838383838383838383838383838383838
+      3838383838383838387C7C7C9393939393938C8C8C6E6E6E4040403838383939
+      393939393939393A3A3A3939393939393A3A3A3A3A3A3B3B3B3B3B3B3B3B3B3C
+      3C3C3C3C3C3D3D3D3C3C3C3C3D3D3B3C3B3B3B3C3C3C3C3B3B3B3C3C3C414141
+      4141414242424343434343433938393737363738383737373636363635353534
+      343434343333333232323232323232323232323132313030302F2F2F2F2F2F2E
+      2E2E2D2D2D2D2D2D2D2C2D2D2D2D2C2C2C2B2C2B2C2C2C2A2B2A2A2A2A292929
+      292929292A2A2A2B2B313030313030303030313030313030302F2F2F2F2E2E2E
+      2D2D2D2E2D2D2E2E2D2D2D2E2E2C2C2C2B2C2C2B2C2C2B2B2C27262624242423
+      23232323232323232525252C2B2B2C2B2C2B2B2B2C2C2B2A2A2A2A2A2A292929
+      2929292A2A292929292929292A2A292A29292928292928292829292829292929
+      2828282828282828282728282628282628262727262627262626262626252625
+      2526252526252625252525252525252525252525252526272725272626262626
+      2727272726272626272827272727262827272727272828282828282828282828
+      292929292928282929292928282928282828282A292929292929282929292828
+      2827282727272727272626262626262626262526252525252525252525242525
+      2524242424242424252424242424242423242424232323232423222323222322
+      2123222223212122222122212121202121212021212021202120202020202120
+      20201F1F1F201F1F201F20201F1F1F1F1F20201F201F2020201F21201F20201F
+      1F1F1F1D1C1C1C1C1D1D1C1D1C1C1C1C1C1C1B1C1C1B1B1C1C1C1C1C1B1B1C1B
+      1B1B1B1B1B1B1B1B1A1B1A1A1A1A1A1A1B1A1A1A1A1A1A1A1A1919191919191A
+      1918191918191818191818181818181718181717171717171717171717171717
+      1616161616161616161615151616161516151516161515151515151515151415
+      1512111311111212111111111112121219191A2C2D2D3232323A3A3A3F3F3F45
+      45451212120E0F0E0E0F0E0E0F0F0E0E0E0D0E0E0E0E0E0D0D0D0D0D0D0D0D0D
+      0D0D0D0D0D0D0D0D0C0C0D0D1E20200D0C0D3030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303232323939393F3F
+      3F40404040404041414141414141414141414141414141414141414141414140
+      40403B3B3B3636363232324141414949494C4C4C515151565656585858515151
+      2F2F2F2C2C2C2B2B2B2B2B2B2A2A2A2A2A2A2929292929292828282828282828
+      2828282827272727272727272727272727272727272727272727272727272727
+      2727272727272727272727272727272727272727272727272727272727272727
+      2727272727272727272727272727272D2D2D2E2E2E2F2F2F3030303131312E2E
+      2E2626262626262626262626262626262828282D2D2D2D2D2D2D2D2D2D2D2D2D
+      2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2C2C2C2C2C2C
+      2B2B2B29292A2929292929292A2A2A2A2A2A2A2A2A2A2A2A2B2B2B2B2B2B2B2B
+      2B2B2B2B2B2B2B2C2C2C2C2C2C2E2E2E3A3A3A4343434747474B4B4B4F4F4F3D
+      3D3D2F2F2F303030303030323232323232323232333333333333333333343434
+      3434343434343535353636363636363636363535353636363636363636363636
+      3636363636363636363637373736363636363635353535353535353536363636
+      3636363636B3B3B3B3B3B3B3B3B3B3B3B3B3B3B39B9B9B3E3E3E363636363636
+      3737373737373737373737373838383838383838383939393939393939393939
+      3939393939383939393939393939393939393A3939393938383C3C3C3E3E3E3F
+      3F3F4040404141403D3D3D3B3C3B3A393A383838383838363636343334323232
+      3232323232323232323131312F303030303030302F2E2E2E2D2D2D2D2D2D2D2D
+      2D2C2C2C2C2B2B2A2A2B2A2A2A292A2A29292A29282928282828282828282828
+      28282828272E2E2E2F2F2E3030302F2E2E302E2E2E2D2D2D2D2D2D2D2D2D2D2C
+      2C2C2D2C2C2B2B2B2C2B2B2C2B2B2B2B2B2B2B2B2B2828292423242423242423
+      232423232323232626252B2B2B2A2A2A292A2A2A292929292929292929292929
+      2929292928292929292828292828292828282828282827272827282827272727
+      2727272727272727272727262626262626262726262626262626262526252626
+      2525252525252525252524252524252525252524252424252425252526252526
+      2625262626262726262626272726272626282727282828282828282828282828
+      2929292929282929292A28292829292A2A292929292929292827282728272726
+      2726262626262626262625252625252626252525252525252525252524252424
+      2525252524242424242424242424242423242423242323232322232322232222
+      2222212222212221212222212221212121212120212120212020202120202020
+      202020201F201F1F201F20202020202020202021201F201F2020201F1D1E1D1D
+      1D1D1D1D1D1C1C1D1D1D1C1C1C1D1C1C1C1B1C1C1C1C1C1C1C1B1C1C1B1C1C1B
+      1B1B1B1B1B1B1B1B1B1A1B1A1B1A1B1A1A1A1A1A1A1A19191A19191A18191918
+      1819191819181819181818171818181817181717171717161716161716161616
+      1616161616171616151616161615151515151515161615151516141414121212
+      1211121211111212121414142222222F2F2F3635353D3D3C4343423434340F0F
+      0F0F0F0F0E0F0E0E0E0E0F0E0E0E0E0E0E0E0D0E0D0D0E0D0E0D0D0E0D0D0E0E
+      0D0D0D0D0D0C0C0C1E20200D0C0C303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030313131373737
+      3F3F3F4141414141414141414141414141414141414141414141414141414141
+      414343434444444848484C4C4C5151515555555858585757573535352C2C2C2B
+      2B2B2B2B2B2A2A2A292929292929282828282828282828272727272727272727
+      2727272727272626262626262626262626262626262626262626262626262626
+      2626262626262626262626262626262626262626262626262626262626262626
+      26262626262626262626262828282D2D2D2E2E2E2F2F2F303030313131272727
+      2525252525252525252525252525252A2A2A2C2C2C2C2C2C2C2C2C2C2C2C2C2C
+      2C2C2C2C2A2A2A2A292929292929292928282927272727272727272727272728
+      28282828282828282828282828282929292929292A2A2A2A2A2A2B2B2B2B2B2B
+      2B2B2B2B2B2B2B2B2B2E2E2E3C3C3C4343434848484B4B4B4E4E4E3636362E2E
+      2E2E2E2E2E2E2E2E2E2E2F2F2F30303031313131313131313132323232323232
+      3232333333333333333333333333343434343434343434343434343434333333
+      3434343434343434343333333333333434343434343434343434343535353535
+      35B5B5B5B5B5B5B5B5B5B5B5B5B5B5B5B5B5B595959535353535353535353535
+      3535353535353535363636363636363636363636373737373737373737373737
+      3737373636363737373536353635353536363636363839383B3B3B3D3D3D3E3E
+      3E3E3E3E3E3F3F40404041404141404040403F403F3F3E3F3E3F3E3E3E3E3E3D
+      3D3D3A3A3A3A3A3A3939383636373535353534353334333030313030302E2E2F
+      2C2C2C2A2A29292A2A2828282828282828282727272727272727272727272626
+      262929292F2F2E2E2E2D2D2D2D2D2D2D2D2D2C2D2C2C2C2C2C2B2B2B2B2B2B2B
+      2B2B2A2B2A2B2A2A2A2A2A2A2A2A292929292929272727222123232222222222
+      2222222222222626262828292828292828292828282929292929292929282929
+      2829282829282828282729272728272727262727272727272727272727272727
+      2727272727272726272726262625262626262525262525252525252524252524
+      2425252424242424242424242423242424242423232423232424242423232423
+      2424242426252526252626262627262628272628282828282829282828282829
+      2928282828282928282828272828282828282727272727272726272627262726
+      2626262626262626262626262626252626252626252525252525252425252424
+      2424242524242424242424242424232424232323232323232223232223222123
+      2221232122222221222121222120212121212020202020202120202021201F1F
+      1F201F21201F202020212020202020201F1F2120201F1F1E1E1E1D1D1D1D1D1D
+      1D1D1C1D1C1D1D1C1D1D1C1C1D1C1C1C1C1B1C1C1C1C1B1B1B1B1C1B1B1B1B1C
+      1B1B1B1B1B1A1A1B1A1B1B1A1A1A1A1A1A1A1A1A1919191919181A1919191918
+      1919181918181818181818171718181717171717171717171717161616161716
+      1716161616161616161616161516151615151515151613131312121212121212
+      11111212131516152B2B2B3132323839383F3F3F4444442324230F0F0F0F0F0F
+      0E0F0E0E0E0E0F0F0F0E0E0E0E0E0E0E0E0E0E0E0E0D0D0D0E0D0D0D0D0D0D0D
+      0D0D0C0D2020200D0D0D30303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303035
+      35353C3C3C414141414141414141414141414141414141424242434343454545
+      4747474B4B4B5050505454545858585656563535352C2C2C2C2C2C2B2B2B2A2A
+      2A2A2A2A29292928282828282827272727272727272726262626262626262626
+      2626262626262626262626262626262626262626262626262626262626262626
+      2626262626262626262626262626262626262626262525252525252525252525
+      252525252525252525252B2B2B2C2C2C2D2D2D2F2F2F3030302E2E2E25252525
+      2525252525252525252525262626272727272727272627272627262626262626
+      2626262626262626262626262626262626262626262626262626262626262626
+      262727272727272727272727272727272929292929292A2A2A2B2B2B2B2B2B2F
+      2F2F3434343A3A3A4040404343434747474A4A4A4C4C4C3434342C2C2C2C2C2C
+      2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2F2F2F2F2F2F2F2F2F3030303030303131
+      3131313131313131313131313131313132323231313132323232323232323232
+      3232323232323232313131313131323232323232333333323232323232535353
+      3232323A3A3A848484B6B6B6B6B6B6B6B6B65454543333333333333333333434
+      3434343433333333333333333334343434343434343434343435353534343334
+      34343434343434343433343433343433343534353A3A3A3B3A3B3B3B3B3C3C3D
+      3D3D3D404040404040403F403F3F3F3F3F3E3E3E3E3E3E3E3E3D3D3D3D3D3C3C
+      3C3C3C3C3C3C3C3B3B3B3B3B3B3B3B3B39393939383938373738373737373737
+      37373535353535353232313030302A2A2A262626262626262626252525252425
+      2B2A2A2D2D2B2D2C2C2D2C2C2C2C2C2C2B2B2B2B2B2B2B2B2B2B2A2B2A2A2B2B
+      2B2A2A2A292A2A29292929292929292929292825242522222222212222212121
+      2121212121272727292928292928282928292829282828282828282827282827
+      2727272727272826272727272727272726272726272727272726262627272626
+      2626262626262526262525252525252426252425242424242424232324242424
+      2323242323232323232323232323232323232323232323242322232323232222
+      2423232423242424242424242525252425252626262727262626272828282727
+      2728282827272728272729282728272728272727272727272627272726262626
+      2727262626262626262626262526252526252526252525252525242524252425
+      2524252524242424242424242424242424242324232423232323222322222322
+      2122212122212122222122212121212121202120202021202021202020202020
+      20202121202120212020202020202020201D1D1D1D1D1D1D1E1D1D1D1E1D1D1D
+      1D1D1D1D1C1C1D1C1C1C1D1D1D1C1C1C1C1C1C1B1C1B1C1B1B1B1C1C1B1B1B1B
+      1B1B1B1B1B1A1B1B1B1A1A1A1A1A1A1A1A19191A19191A181919181919181819
+      1818191818181818181818181718171717181717171716171717161716161617
+      1616171616161616161616161516151616151212121212121212121213131414
+      141C1C1C2E2E2E3434343B3A3B4140414342421213130F0F0F0F0F0F0F0F0F0E
+      0F0E0E0F0E0F0F0F0E0E0F0E0E0E0E0E0D0E0E0E0E0E0E0E0D0D0E0D0D0D0D0D
+      2020200D0D0D3030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303232323939393F3F3F4141414242424242424343434444444646464949494E
+      4E4E5353535656565858583939392D2D2D2C2C2C2B2B2B2A2A2A2A2A2A292929
+      2828282828282727272727272626262626262626262525252525252525252525
+      2525252525252525252525252525252525252525252525252525252525252525
+      2525252525252525252525252525252525252525252525252525252525252525
+      2525252525252727272C2C2C2D2D2D2E2E2E2F2F2F3030302727272424242424
+      2424242424242424242424242424242424242425252525252525252525252525
+      2525252525252525252525252525262626262626262626262626262626262626
+      2727272828282828282828282828282B2B2B2F2F303535353838383A3A3A3A3A
+      3A3D3D3D4040404444444646464949494B4B4B2A2A2A2B2B2B2B2B2B2B2B2B2B
+      2B2B2C2C2C2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2E2E2E2E2E2E2F2F2F2F2F2F
+      2F2F2F2F2F2F3030303030303030302F2F2F3030303030303030302F2F2F3030
+      3030303031313130303031313131313131313131313131313131313131313131
+      3131313131A7A7A7B8B8B8B8B8B87D7D7D313131313131313131313131313131
+      3131313131313232323232323232323232323232323232323232323333333232
+      323232323131313131313130313031313738383939393A3A3A3B3B3B3C3C3C3F
+      3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3E3F3E3E3D3C3D3C3C3C3C3C3D3C3C3C3C
+      3C3C3C3B3B3B3A3B3A3A3A3A3A3A3A3838393838393737383636363434343333
+      333333333333333333332F302F2424242424242524252424242424242424252C
+      2B2B2C2C2C2C2A2B2B2B2A2C2A2A2B2A2A2A2A2A2A2A2A2A2A29292929292829
+      2828282928292828292828282827282727272323232020212020202021202020
+      2020202027272628282827282827272727282727272727272727272727272727
+      2727272727272626272627272625262526262625252526262526262525262525
+      2425252525242525242525242424242424242424242424232424242324242323
+      2324232323232323232322232323232222232223232223232223222224232324
+      2323242424242423242425252525252425262526272627262726272727272727
+      2828282827282727272828272827282827272727272726272627262726262626
+      2626262626262626262626262526262525252525252525242525252424242524
+      2424242424242424242424232424232424232323232322232322232222232221
+      2222212321222221212220212121212120202120212020202121212121212120
+      212020212020202020201E1E1E1D1E1D1E1E1D1E1D1D1D1E1D1D1D1D1D1D1D1D
+      1D1D1D1D1C1C1C1C1D1C1C1C1C1C1B1C1C1C1C1C1C1B1B1C1C1C1B1B1B1B1B1B
+      1A1B1B1A1B1B1B1A1A1A1A1A1A1A191A19191A18191A19191A18181918191918
+      1818181818181718181817171717181717171717171717171717161616171716
+      1616161616161616151616151515121312121213121212131313151514242425
+      3231313737373E3E3E4243433231320F0F0F100F0F0F0F100F0F0F0F0F0F0E0F
+      0E0E0F0E0F0E0E0E0E0E0E0E0E0E0E0D0D0E0E0D0D0D0D0D0E0D0D0D2020200D
+      0D0D303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303535353B3B3B4242424343434545454747474B4B4B4E4E4E5454
+      545757573E3E3E2D2D2D2C2C2C2B2B2B2B2B2B2A2A2A29292928282828282827
+      2727272727262626262626252525252525252525252525252525252525252525
+      2525252525252525252525252525252525252525252525252525252525252525
+      2525252525252525252525252525252525252525252525252525252525252525
+      25252525252A2A2A2B2B2B2C2C2C2E2E2E2E2E2E2D2D2D242424242424242424
+      2424242424242424242424242424242424242424242525252525252525252525
+      252525252525252525252525252525252626262626262626262727272727272A
+      2A2A2D2D2E3232323636363838383939393939393A3A3A3C3C3C3C3C3C3F3F3F
+      4242424444444747474848484949492929292929292A2A2A2A2A2A2B2B2B2B2B
+      2B2B2B2B2B2B2B2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2D2D2D2D
+      2D2D2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2F2F2F2F2F2F2E2E2E2E2E2E2E2E2E
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3030
+      306D6D6DBABABABABABA97979730303030303030303030303030303030303030
+      30303030303030303030303030302F2F2F303030303030303030303030303030
+      2F2F2F2F2F2F2F2F2F2F2F2F3232323838383939393B3A3A3D3D3D3F3F3F3F3F
+      3F3F3F3F3E3E3E3E3E3E3D3E3E3E3E3E3D3E3E3C3C3D3C3C3C3B3B3B3B3C3B3B
+      3B3B3B3B3B3A3A393A3A3939393A383939363737353636343434333433323232
+      3232323131313131312828282423232324242324232323232323232626262B2A
+      2A2A2A2A2A2A2A2B2A2A2A2A2A2A2A2A29292929292928292928282928292928
+      2828282828282828282828272727252525212120202021202020202021202120
+      2121212828272827272728282828272827272727272727272727262627262626
+      2627262627252626252526252525252525252525252525252525252525252525
+      2525242524252424252524242423242323242323232323232223222223222322
+      2222222222222222222323232223222222222323222323222322222323232423
+      2224242325252424242425252526262627262727272728282727272828282828
+      2828282828282827292828282727282727272627272726272726272626262626
+      2626262626262625252526252526262625252525252525252524242525252524
+      2425242424242424242424242423232323232323232223232223222223222222
+      2121222121222121222121212121212120222122222121212121212121212021
+      2020211F1F1E1E1E1F1E1E1E1E1D1E1D1E1E1D1D1D1D1D1D1D1D1D1C1D1D1D1C
+      1C1C1C1D1C1C1D1C1C1C1C1C1C1C1B1C1B1B1B1C1C1B1B1B1B1B1B1B1B1B1B1B
+      1A1B1B1B1B1B1A1A1A1A1A1A19191A19191A19191A1919191819191818191818
+      1818181817181718171818171817171717171717171717161616171616161616
+      1716161616161613121313121212131212121213131318191A2C2C2C34333439
+      3A3A4040414645461E1E1D100F100F100F0F0F0F0F10100F0F0F0F0F0F0F0F0E
+      0F0E0F0F0F0E0E0E0E0E0E0E0D0E0E0D0D0E0D0D0E0D0D0E2020200D0D0D3030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303636363E3E3E4848484C4C4C4F4F4F5353533F3F3F
+      2E2E2E2D2D2D2C2C2C2B2B2B2A2A2A2A2A2A2929292828282727272727272626
+      2626262625252525252525252525252524242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      242626262B2B2B2C2C2C2C2C2C2E2E2E2F2F2F26262623232323232323232323
+      2323232323232323232323232323242424242424232323252525252525252525
+      2525252525252626262626262727272A2A2A2E2D2E3232323535353535353737
+      373737373838383A3A3A3A3A3A3C3C3C3D3D3D3D3D3D3F3F3F40404043434344
+      44444646464747474242422929292929292929292929292929292929292A2A2A
+      2A2A2A2A2A2A2A2A2A2A2A2A2B2B2B2B2B2B2C2C2C2C2C2C2C2C2C2C2C2C2C2C
+      2C2C2C2C2C2C2C2C2C2C2C2C2C2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D
+      2D2D2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E525252
+      BCBCBCBCBCBCAAAAAA2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2E2E2E2E2E
+      2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2F2F2F2F2F2F2E2E2E2E2E2D2E2E2E2E
+      2E2D2E2E2E2D2D2D2E2E2D2F2F2F303030333333343435353536383838393939
+      3939393839393E3E3E3E3E3E3C3D3D3C3D3C3C3C3C3C3C3D3B3B3C3B3B3B3B3B
+      3B3B3B3B3A3A393A393A3838383738383535353332323131313030303030302F
+      2F2F2F2F2F2E2E2D2323232424232322222222222222222323222929282B2A29
+      2B2A2A2A2A2A2928282828282828282828282828282828282728282827282727
+      272626272626262626262626262324241F202020202020202020202020202021
+      2121272726272727262727272626272626262626272727272626272726272725
+      2626252625252625252625252425252425242524242524252424242424242424
+      2424242424242424242324232324232324232323232323232323232322222322
+      2223222222222222222222222222222322222222232322232222232323242323
+      2423232524242625252626262525262727272827272827282828282828282827
+      2829292828282729282728272728272727272727272727262727272726272626
+      2626262626262526262625252525252525252524252425252425242524252425
+      2424242424242424242323242324242324232323222323222222212322222222
+      212221212221212221212222212122222121212122212121212120211F20201E
+      1E1F1F1E1E1E1E1E1E1E1E1D1E1D1E1E1E1D1E1E1E1D1D1D1D1D1D1D1D1D1D1D
+      1C1C1C1D1C1D1C1D1C1C1C1C1C1C1B1C1C1C1B1B1C1C1B1B1B1B1B1B1B1B1B1B
+      1B1A1A1A1A1A1A1A191A1A19191A19191A191819191919181819191818181818
+      1818171817181718171717171718171717171717161617161616161717171616
+      1515151313121313121212131414141515152021212F2E2F3636373D3D3D4344
+      443F3F3F1010100F100F10100F100F0F0F0F100F0F0F0E0F0F0F0F0E0F0F0E0F
+      0F0F0F0E0F0E0E0F0E0E0E0E0E0E0D0E0D0D0D0D2023230D0D0E303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303232323A3A3A4444444242422E2E2E2D2D2D2D
+      2D2D2C2C2C2B2B2B2A2A2A292929282828282828272727262626262626252525
+      2525252525252424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2929292B2B2B2B2B2B2D2D2D2E2E2E2C2C2C2323232323232323232424242424
+      242424242424242424242424242424242525252525252626262929292D2C2D2F
+      2F2F313131343434343434353535363636363636373737383838383838393939
+      3A3A3A3B3B3B3C3C3C3D3D3D3E3E3E4040404040404242424343433E3E3E3434
+      342D2D2D27272728282828282828282828282828282828282828282828282828
+      28282929292929292A2A2A2A2A2A2A2A2A2A2A2A2B2B2B2B2B2B2B2B2B2B2B2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2C2C2C2C2C2C2C2C2C2C2C2C2C2C
+      2C2C2C2C2C2C2C2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D515151BEBEBEBE
+      BEBEBEBEBE2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D
+      2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2C2C2C2C2C2C2C2C2B2B2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2A2A2B2A2A2A2A2A2A29292929
+      29292929292929282828282929292C2C2D2C2C2C2B2C2B2E2E2E313131313031
+      3031313434343434333332333131313332333030302E2E2E2E2E2E2E2E2E2E2E
+      2E2F2F2F2828282222222222222222222223222222222424242A292929292829
+      2829292928292829282829282828282828282828272828272627262726272626
+      2626262626262626262626252323231F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2121
+      2127272627262727262726272726262626262626262626262525262525252525
+      2525252525262525262525252525242525242525252524242424242524242423
+      2424232323232423232322222322222322222222222222222222222222222222
+      2222222222222122212222222223232222222223232223232224232325232425
+      2424252424252525262626272727262726282728292828282828282728292928
+      2929282828272828272828272827272727272727262627262726262626262626
+      2626262526262625262626252626262525242525252425252424242525242524
+      2424242424242424242324242324232323232322232322222222222222222221
+      2221212222212222222222212222222221222121212020201F1F1F1F1F1E1F1E
+      1E1E1E1E1E1E1E1E1E1D1E1D1E1D1E1D1E1D1D1E1E1E1E1D1D1D1D1D1D1D1C1C
+      1D1C1C1C1C1C1C1C1C1C1C1B1C1C1C1B1C1C1B1C1B1B1B1B1B1B1B1B1B1B1B1B
+      1B1A1A1B191A1A19191A19191A19191A19191A19191918181819181818181718
+      1818181818181717171717171817171717171716171716171617161614151413
+      13131213131312131314131616172C2C2C3333333939394040404545452B2C2B
+      1010101010100F1010101010100F10100F100F0F0F0F0F0F0F0F0F0F0E0F0E0F
+      0E0E0E0E0E0E0E0E0E0E0E0E0D0D0E0E2020200D0D0E30303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030302F2F2F2F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2B2B
+      2B2B2B2B2A2A2A29292928282827272727272726262625252525252525252524
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      242424242424242424242424242424242424242424242424242424242626262A
+      2A2A2B2B2B2C2C2C2D2D2D2E2E2E262626242424252525252525272727272727
+      2A2A2A2C2B2C2D2D2D3030303030303333333333333333333434343636363636
+      363636363737373838383838383939393939393A3A3A3B3B3B3C3C3C3C3C3C3D
+      3D3D3F3F3F3F3F3F4040403F3F3F363636303030272727262626262626262626
+      2626262727272727272727272727272727272828282828282828282828282828
+      282828282828282828282929292929292A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A
+      2A2A2A2A2A2A2A2A2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2C2C2C2C2C2C2C2C2C515151C0C0C0C0C0C0C0C0
+      C02C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2B2B2B2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2A2A2B2B2B2B
+      2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2929292A29292A29292828282828282727
+      2727272727272727272727272727272727272727272726262626272625252525
+      25252525252424242524252524252525242B2B2B2D2E2D2D2D2D2D2D2D2D2D2D
+      2D2D2D2222222222222222222222222222222121212626262928282928282828
+      2828282827282727272827272727272727272727262727272626272726272727
+      26262626262626262626252222221F1F1F1F1F20201F1F1F1F201F1F1F212121
+      2727262727262627272626262626262626262625262525252626252626252525
+      2525252525252525242525252525242525252524242424252424242424242423
+      2423232323232422232222232222232222222222222222222222222222222222
+      2222222221222221222222222222222323222323222423232424242424232525
+      2526262526262727262727272728282828282828282828282829292929292928
+      2828282828282827282727282727272727272727272727262626262726262626
+      2526262626262525252526252525252525242525252424242424252524242424
+      2424242424242423232324232424242323232222232222222123222122222223
+      22212222212222222122222222222020201F1F1F1F1F1F1F1E1F1E1F1F1E1F1F
+      1E1E1E1E1E1E1E1D1E1D1E1E1D1D1E1D1D1D1D1D1D1D1D1D1D1D1D1D1D1C1D1D
+      1D1C1C1D1D1C1C1C1C1C1B1C1C1B1B1C1C1C1C1B1B1B1C1B1B1B1B1B1B1A1A1B
+      1A1A1A1A191A1A191A19191A19191A1919191819191819181818181818181818
+      1817181818171717171717181717171717171717171616151313131413131313
+      131414141514151F1E1F2F2F303535353C3C3C43434246464613141310101010
+      10101010100F1010100F100F0F0F100F0F0F0F0F0F0F0F0F0F0F0F0E0E0E0F0F
+      0E0F0E0E0F0F0E0E0E0E0D0D2023230D0D0E3030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030302F2F2F2F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2B2B2B2A2A2A
+      2929292828282828282727272626262626262525252525252424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424243838384C4C4C4C4C4C4C4C4C4C4C4C2E2E2E2A2A2A2B2B
+      2B2C2C2C2D2D2D2E2E2E2F2F2F31313132323232323233333333333333333334
+      3434353535353535353535353535353535363636373737373737383838393939
+      3939393A3A3A3B3B3B3B3B3B3C3C3C3C3C3C3D3D3D3E3E3E3E3E3E3E3E3E3939
+      393333332A2A2A25252525252525252525252525252526262643434357575774
+      74747474747474745858583A3A3A272727272727272727272727282828282828
+      2828282828282828282828282828282828282828282929292929292929292A2A
+      2A2A2A2A2A2A2A2A2A2A4747475050505050504747472A2A2A2A2A2A2A2A2A2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B515151C2C2C2C2C2C2C2C2C22B2B2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B5151515151
+      515050505050503D3D3D2A2A2A2A2A2A2A2A2A2A2A2A292A2A2A2A2A2A2A2A2A
+      2A2A2929292829292929292727272827284F4E4F4E4E4E4E4F4E4E4E4E272727
+      2727272727272726262626272626262525252525262525253838384C4C4C4C4C
+      4C2424242424242424242324242424243E3E3E6464647777777777775C5C5C34
+      3434212221222221212221212121212121222222282827292827292828282828
+      2728282727272727272727272727273A3A3A4E4E4D7575747474756B6B6B4343
+      432626262626252626252121211F1F1F1F1E201F1F1F1F1F1F1F1F1F21212126
+      2726262726262726262626262626262626262626262625252625252525262525
+      2525252525252525252424242424242424242424242424242424242424232423
+      2324242224242223232223222223222222222221212122222222222222222222
+      2222212222212222222322222222242422242424242323242323262525262526
+      2726262727272727272827282728282928282828282929292929292929292828
+      2928282828282728272828272727272727272627262726262626262626262626
+      2625252526252525252525252525252525252425242524252525242424242424
+      2424242324242324242323232423232423222322222322222222222222212222
+      21222221222222212121201F201F1F1F1F201F1F1F1F1F1F1F1F1E1E1F1F1E1E
+      1E1E1E1E1E1E1E1E1E1E1E1D1E1E1E1E1E1E1D1E1D1D1D1C1D1C1C1D1D1D1D1D
+      1C1D1C1C1C1C1C1C1C1C1C1B1C1B1C1B1B1C1C1C1B1B1B1B1B1A1A1A1A1A1A1A
+      191A191A1A1A191A19191A191919181919191918181918181818181817181818
+      1818181717171718171817171717171717151415131413131313131313141314
+      1717172A292A3333333A393A3F403F4545453232331110111110101010101010
+      100F1010100F10100F100F10100F0F0F0F0F100F0F0F0F0F0F0E0F0E0E0E0F0F
+      0F0F0E0E0E0E0E0E2320230E0D0D303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      302F2F2F2F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2B2B2B2A2A2A29292928
+      28282828282727272626262525252525252525252424242424242424249C9C9C
+      C4C4C4C4C4C49C9C9C2424242424242424242424242424242424242424242424
+      242E2E2EB0B0B0C4C4C4C4C4C4C4C4C460606024242424242424242424242460
+      6060A6A6A6C4C4C4C4C4C4C4C4C4C4C4C4C4C4C4C4C4C4A6A6A67878782C2C2C
+      2D2D2D2F2F2F303030323232C4C4C4C4C4C4C4C4C45959593636363636363737
+      373737373737377E7E7EC4C4C4C4C4C49898983939393A3A3A3B3B3B3B3B3B3C
+      3C3C4E4E4EC4C4C4C4C4C4C4C4C43636363232322B2B2B242424242424242424
+      2525252525252525252525252F2F2F757575B0B0B0C4C4C4C4C4C4C4C4C4C4C4
+      C4C4C4C4C4C4C4C4C4C4B0B0B075757531313127272727272727272727272727
+      27272828282828282828282828282828289D9D9DC4C4C4C4C4C44F4F4F282828
+      6D6D6DB1B1B1C4C4C4C4C4C4C4C4C4C4C4C4B1B1B17777773434342A2A2A2A2A
+      2A2A2A2A2A2A2A2A2A2A2A2A2A515151C4C4C4C4C4C4C4C4C42A2A2A2A2A2A2A
+      2A2A2A2A2A2A2A2A2A2A2A2A2A2A4747478A8A8AC4C4C4C4C4C4C4C4C4C4C4C4
+      C4C4C4C4C4C4B1B1B18A8A8A5050502929292929292828282828272828282728
+      27282728454545898989C4C4C4C4C4C4C4C4C4C4C4C4C4C4C4C4C4C493939226
+      26262525262626252424242424254242429C9C9CC4C4C4C4C4C4C4C4C4C4C4C4
+      242424232323565656A6A6A6C4C4C4C4C4C4C4C4C4C4C4C4C4C4C4BABABA6060
+      6021212121212121212121212121212123232328282829272828272727272727
+      27272727276C6C6CA6A6A6C4C4C4C4C4C4C4C4C4C4C4C4C4C4C4C4C4C4B0B0B0
+      4E4E4D2626252625242121211E1E1F1F1F1FC4C4C4C4C4C4C4C4C4C4C4C4C4C4
+      C4C4C4C4C4C4C4B0B0B089898958585826252626252526252525252425252525
+      2424252424252424242424747474C4C4C4C4C4C49C9C9C242424242424232423
+      2323222424222422222D2C2CBABABAC4C4C4C4C4C4C4C4C45F5F5F2222222222
+      2222222123222222222324232324242324242325242426252527262627272627
+      2727272727282828282828292928292829292A2A292929292829292929292928
+      2828282828272827272827272726272726272627262626262726262626262625
+      2626252625252625252525252525252525242525242424242524242424242524
+      2424242323242323242423232322232222222222222122222122232222222221
+      2221212020202020201F201F1F201F1F1F1F1F1F1F1F1F1F1E1F1E1E1E1E1F1E
+      1E1E1E1E1E1E1E1D1E1D1D1D1D1D1D1E1D1D1D1D1D1D1D1D1D1C1D1D1D1C1D1D
+      1C1C1C1C1C1C1C1C1B1B1C1C1C1C1C1B1C1B1B1B1B1B1B1B1A1A1B1A1A1B191A
+      1A19191A19191A19191919191919191819191818181818181818181818181818
+      181718181818181717171616161414131414141314141414141515151C1C1D2F
+      2F2F3535353D3C3C4242424646461B1B1B111011101111111011101010101011
+      101010100F100F10100F0F0F101010100F0F0F0F0F0E0E0F0F0F0F0F0E0E0E0E
+      0E0E0E0E2323230E0E0D30303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030303030303030303030302F2F2F
+      2F2F2F2E2E2E2E2E2E2D2D2D2D2D2D2C2C2C2B2B2B2A2A2A2929292828282727
+      272727272626262525252525252424242424242424242424249E9E9EC7C7C7C7
+      C7C79E9E9E2424242424242424242424242424242424242424242424248A8A8A
+      C7C7C7C7C7C7C7C7C77F7F7F2424242424242424242E2E2E9E9E9EC7C7C7C7C7
+      C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C72C2C2C2D2D2D2F
+      2F2F323232353535C7C7C7C7C7C7C7C7C75C5C5C383838383838393939393939
+      393939818181C7C7C7C7C7C78181813B3B3B3C3C3C3D3D3D3C3C3C3737373232
+      32C7C7C7C7C7C7C7C7C724242424242424242424242424242424242424242424
+      24242525256C6C6CBDBDBDC7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7
+      C7C7C7C7C7C7C7C7C7C7C7C7BDBDBD5959592626262626262727272727272727
+      272727272727272727272727279F9F9FC7C7C7C7C7C75050508B8B8BC7C7C7C7
+      C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7B3B3B3464646292929292929
+      292929292929292929515151C7C7C7C7C7C7C7C7C72929292929292929292929
+      29292929292929646464C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7
+      C7C7C7C7C7C7C7C77878782828282828282828282828282828282828286E6E6E
+      C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C79E9E9E2525252524
+      252525252525252F2E2EBDBDBDC7C7C7C7C7C7C7C7C7C7C7C7C7C7C724232424
+      2424767676C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7555655
+      2121212121212121212121212121212524252827272827272727272727272727
+      279F9F9FC7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C74E
+      4E4E2626252525242121211F1F1FC7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7C7
+      C7C7C7C7C7C7C7C7C7C7C7C7B3B3B34E4E4E2626252625252625252625252624
+      24252424252424767676C7C7C7C7C7C79E9E9E24242424242424232424232324
+      2423232323A8A8A8C7C7C7C7C7C7C7C7C7606060222222222222222222222222
+      2323232323232424242424242425232525242625242626262727262727272827
+      282828282827282829292828282A292A29292929292929292929292828282929
+      2828282827282827272727272727272726272726262626262626262626262625
+      2625262526262525252525252525252525252425252425242424252424242424
+      2423242324242322222323222222222222212222212122212221212121202020
+      20202020201F1F201F1F1F1F201F1F1F1F1F1F1F1F1E1F1F1E1E1F1E1E1E1F1E
+      1E1E1E1E1E1E1E1E1E1E1E1E1E1D1E1D1D1D1D1D1D1D1D1C1C1C1C1B1C1C1B1C
+      1C1C1C1C1C1C1B1C1C1C1C1C1C1C1B1B1B1B1B1B1A1A1B1A1A1B1A1A1A191A1A
+      1A191A1A1A1A1919191919191919181918191918181819181818181817171817
+      1817171717171515151414141414141313131514151818182727273232323939
+      39403F404544443A393911111111111110111111111110101011101010101010
+      10100F10100F10101010100F10100F0F100F0F0F0E0E0F0E0F0F0E0E0E0E0E0E
+      2323230E0E0E3030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303030303030302F2F2F2F2F2F2E
+      2E2E2E2E2E2D2D2D2D2D2D2C2C2C2B2B2B2A2A2A292929282828272727272727
+      262626252525252525242424242424242424242424818181C9C9C9C9C9C97777
+      77242424242424242424242424242424242424242424585858C9C9C9C9C9C9C9
+      C9C99595952424242424242424242E2E2EAAAAAAC9C9C9C9C9C9C9C9C9B4B4B4
+      7777774D4D4D4D4D4D626262818181BFBFBFC9C9C92D2D2D2E2E2E2F2F2F3333
+      33363636C9C9C9C9C9C9C9C9C93A3A3A3A3A3A3B3B3B3B3B3B3B3B3B3B3B3B82
+      8282C9C9C9C9C9C97E7E7E3030302A2A2A272727242424242424242424C9C9C9
+      C9C9C9C9C9C92424242424242424242424242424242424242424242424248B8B
+      8BC9C9C9C9C9C9C9C9C9C9C9C9BFBFBF8B8B8B777777777777777777969696BF
+      BFBFC9C9C9C9C9C9C9C9C9C9C9C98C8C8C262626262626262626262626262626
+      262626272727272727A0A0A0C9C9C9C9C9C9ABABABC9C9C9C9C9C9BFBFBF8282
+      82797979797979B5B5B5C9C9C9C9C9C9C9C9C9BFBFBF3C3C3C28282828282828
+      2828282828505050C9C9C9C9C9C9C9C9C9282828282828282828282828282828
+      656565C9C9C9C9C9C9C9C9C9BFBFBF8C8C8C6565655050505B5B5B797979ABAB
+      ABC9C9C9797979272727272727272727272727272727787878C9C9C9C9C9C9C9
+      C9C9C9C9C99696967778787878788B8B8CBFBFBFA0A0A0252525252525252525
+      242424818181C9C9C9C9C9C9C9C9C9A0A0A0777777B4B4B42424242424247676
+      76C9C9C98B8A8A4343442828283434348D8D8DC9C9C9C9C9C9B5B5B521212121
+      2121202020212020202020212121272727282727272727272727272727A0A0A0
+      C9C9C9A0A0A06464643B3B3B3B3B3A6E6E6EBFBFBFC9C9C9C9C9C9B5B5B42626
+      25262525252525212121C9C9C9C9C9C9C9C9C9A9A9A99E9E9E9E9E9EBFBFBFC9
+      C9C9C9C9C9C9C9C9C9C9C9C9C9C9636363262525262625262625262524252424
+      252424777777C9C9C9C9C9C9A0A0A02424242424242424242424242324238B8B
+      8AC9C9C9C9C9C9C9C9C976767622222222222222222223232322222223232323
+      2323242424242424242424262624262625272626282726282727282828292928
+      2928282929292929282A29292A2A292A292A292A292929292928292829292928
+      2728282728272728272727272627272726262626262626262626262526262625
+      2626252525252525252625252525252525252424242524252424242424242323
+      2222232223232222232222222222222222222221212120202021202020202020
+      2020202020201F1F1F1F1F1F20201F1F1F1F1F1F1F1F1E1F1F1F1F1E1F1E1E1E
+      1E1E1E1E1D1E1E1D1E1E1D1D1E1D1D1D1D1C1C1C181818191919191818191818
+      181819191819191918191A1A191A1A1B1A1B1A1B1A1A1A1A1B19191A1A1A1A1A
+      191A191919191919191819181919191818181818181918181718171818171817
+      16171415141414141414141515151616161C1D1E2F2F2E3535353C3C3C424241
+      4647472322221111111111111111111111111111101110111010101010101010
+      10101010100F100F100F0F0F0F0F0F0F0F0F0F0E0F0F0F0F0E0E0E0E2323260E
+      0E0E303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030302F2F2F2F2F2F2E2E2E2E2E
+      2E2D2D2D2D2D2D2C2C2C2B2B2B2A2A2A29292928282827272726262626262625
+      2525252525242424242424242424242424787878CBCBCBCBCBCB787878242424
+      2424242424242424242424242424242E2E2EC1C1C1CBCBCBCBCBCBB6B6B62E2E
+      2E242424242424242424787878CBCBCBCBCBCBCBCBCB6D6D6D24242424242424
+      24242424242424242424242424247878782C2C2C2F2F2F323232353535383838
+      CBCBCBCBCBCBCBCBCB3535353434342F2F2F2F2F2F2A2A2A2A2A2A787878CBCB
+      CBCBCBCB787878242424242424242424242424242424242424CBCBCBCBCBCBCB
+      CBCB2424242424242424242424242424242424242424248C8C8CCBCBCBCBCBCB
+      CBCBCBC1C1C16363632424242424242525252525252525252525252525256E6E
+      6EC1C1C1CBCBCBCBCBCBCBCBCB8D8D8D25252526262626262626262626262626
+      2626262626A2A2A2CBCBCBCBCBCBCBCBCBCBCBCB8D8D8D313131272727272727
+      2727272727276F6F6FCBCBCBCBCBCBCBCBCBA2A2A22727272727272727272727
+      27505050CBCBCBCBCBCBCBCBCB272727272727272727272727464646CBCBCBCB
+      CBCBCBCBCBA2A2A2313131272727272727272727272727272727272727505050
+      6565652727272727272727272626264F4F4FCBCBCBCBCBCBCBCBCBACACAC3A3A
+      3B2526252625252525262525252E2F2E6D6D6D242424242424242424242424B6
+      B6B6CBCBCBCBCBCB828282242424242424232323232323232323777777626262
+      222223222323272727292A29343534CBCBCBCBCBCBCBCBCB4041412120212021
+      212020212020202121212827272827272827272727272727279898985A5A5A27
+      2727272727272727272727272727646565CBCBCBCBCBCBCBCBCB454544262525
+      262525262525CBCBCBCBCBCBCBCBCB4B494A1F1F1F1F1F1F1F1E1F3637368D8D
+      8DCBCBCBCBCBCBCBCBCBCBCBCB64646426252525252526252525252425252478
+      7878CBCBCBCBCBCBA1A1A1242424242424242424242424787778CBCBCBCBCBCB
+      CBCBCB8C8B8C2322222322222222222222222322222222232323232323232424
+      242424242525242626252626252727262827272727272827282929282928282A
+      29292928292A292A292A2A29292A29292A292929292928292928292928292827
+      2828272827282827272727272726272627262726272726272626262626262525
+      2626262625252525252525242525252524252424242423232323232323232323
+      2322232323222323222222222222222021212121212020212120202020202020
+      1F20201F1F1F1F1F201F1F201F1F201F1F1F1F1F1F1F1F1E1F1E1F1E1E1E1E1E
+      1E1E1E1E1E1E1E1D1E1E1D1D1E19191A19191919191918191918181818181918
+      1818181718171818181717171718171718171717171717171818181818181818
+      1818181918191919191919181819181919181818191818181818181615161415
+      1514141414141515151518181728282833333239393940404045454440414012
+      1212121212111212111111111110101011101110101110101010101010101010
+      1010101010100F0F10100F100F0F0F0F0F0F0F0F0E0F0F0F2626260E0E0E3030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D
+      2D2D2D2C2C2C2B2B2B2A2A2A2929292828282727272626262626262525252525
+      25242424242424242424242424797979CECECECECECE79797924242424242424
+      2424242424242424242424A3A3A3CECECECECECECECECE444444242424242424
+      2424242F2F2FCECECECECECECECECE6F6F6F2424242424242424242424242424
+      24242424242424242424242424252525272727272727272727242424CECECECE
+      CECECECECE242424242424242424242424242424242424797979CECECECECECE
+      797979242424242424242424242424242424242424CECECECECECECECECE2424
+      24242424242424242424242424242424838383CECECECECECECECECEA3A3A32F
+      2F2F242424242424242424242424242424242424242424242424252525303030
+      AEAEAECECECECECECECECECE7A7A7A2525252525252525252525252525252525
+      25A4A4A4CECECECECECECECECE8F8F8F26262626262626262626262626262626
+      2626262626656565CECECECECECECECECE505050272727272727272727515151
+      CECECECECECECECECE2727272727272727272727279A9A9ACECECECECECEAFAF
+      AF27272726262626262626262626262626262626262626262626262626262626
+      2626262626262626262626A4A4A4CECECECECECEAEAEAE302F30242524252525
+      242424242424252425242524242524242424242424242424242424CECECECECE
+      CECECECE39383823242323242323232323232323242338383823232322232322
+      22232727272929292A292AAFAFAFCECECECECECE4C4C4C212121202020202120
+      2021202424242827282827272827272727272727274646462727272727272727
+      27272727272727272727262727CECECECECECECECECE51514F27262526252525
+      2424CECECECECECECECECE4B4B4B1F1E1F1F1F1F1F1F1F1F1F1F1F1F1F444544
+      C3C3C3CECECECECECEC3C3C33B3B3A2526252526252626242525257A7979CECE
+      CECECECEA3A3A3242424242424242424646464CECECECECECECECECEA3A3A323
+      2322232222242222222222222222222323232223242323242323242424252525
+      2525252626262626262727262828272928282928272A29282929292A29292929
+      29292A2A292A2A2A2A292A29292A292929292929282929292929282928282728
+      2828282727282727272727272626262726272627262626262525262526252625
+      2626252525252525252525252425242323242323232323232323232323232222
+      2323232322232222212222212121212121212121212020202020212020201F20
+      20201F1F201F1F1F1F20201F1F1F1E1F1F1F1F1F1F1E1F1F1E1F1E1E1E1E1E1E
+      1E1E1E1E1E1E1A1B1A1919191919191919191819191819181818191818181818
+      1818181817171818181817181818181717171717171717161716161617171616
+      1616161616161516161616171717161716171717161616151415151414141515
+      1615151616161D1D1E2F2E2F3536363C3C3C4342424747472626261111121211
+      1211111111111211111111111111111011101010111110101010101010101010
+      100F10100F0F0F100F0F0F0F0F0F0F0F0F0E0F0F2326230E0E0E303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2D2D2D2C
+      2C2C2B2B2B2A2A2A292929282828272727262626262626252525252525242424
+      2424242424242424247A7A7AD0D0D0D0D0D07A7A7A2424242424242424242424
+      24242424656565D0D0D0D0D0D0D0D0D07A7A7A24242424242424242424242470
+      7070D0D0D0D0D0D0A5A5A5242424242424242424242424242424242424242424
+      242424242424242424242424242424242424242424242424D0D0D0D0D0D0D0D0
+      D02424242424242424242424242424242424247A7A7AD0D0D0D0D0D07A7A7A24
+      2424242424242424242424242424242424D0D0D0D0D0D0D0D0D0242424242424
+      2424242424242424244F4F4FD0D0D0D0D0D0D0D0D0A5A5A52424242424242424
+      242424242424242424242424242424242424242424242424242424242F2F2FB0
+      B0B0D0D0D0D0D0D0D0D0D0454545252525252525252525252525252525A5A5A5
+      D0D0D0D0D0D0C5C5C53030302525252525252525252626262626262626262626
+      26262626A5A5A5D0D0D0D0D0D09B9B9B262626262626262626515151D0D0D0D0
+      D0D0D0D0D0262626262626262626313131D0D0D0D0D0D0D0D0D03B3B3B262626
+      2626262626262626262626262626262626262626262626262626262525252525
+      25252525454545D0D0D0D0D0D0D0D0D03A3A3A25252525252424252525242425
+      2425252525242424242424242424242424242424242424D0D0D0D0D0D0D0D0D0
+      2324232323232323242323232423232423232323232323232122222424242626
+      27282727535453D0D0D0D0D0D0D0D0D037373721212120202120212021212128
+      2728282727282727282727282727272727272727272727272727272727272727
+      2727272727273C3B3CD0D0D0D0D0D0D0D0D0515151262626272526262525D0D0
+      D0D0D0D0D0D0D04B4C4B1F1E1F1F1F201F1F1F1F1F1F1F1F1F1E1F1F434443D0
+      D0D0D0D0D0D0D0D09090902626262626252626252525247B7B7AD0D0D0D0D0D0
+      A5A5A5242424242424444444D0D0D0D0D0D0D0D0D0B0B0AF2F2F2E2423222424
+      2323222323222223222223222222222323232424232324242425252525252526
+      26262627272727272828272929282928282929292A29292A2A2A2A29292A2A2A
+      2A2A2A292A2A292A292A2A2929292A2929292929292828292828292828272828
+      2728272728272727262727262626262726272626262625262626262526262525
+      2525252525242424242423242323242423232323232323232323232223222323
+      222222222122222121222121212121212121212020212020202020201F1F2020
+      202020201F201F1F201F1F1F1F1F1F1F1F1F1E1E1E1F1F1E1E1E1E1E1E1E1E1C
+      1C1B1A191919191919191A19191A191919191919191819191819191818181818
+      1818171717181717171817181717171717171717171716171616161616161616
+      1616161616161616151615161515161615151515151515151514141515161518
+      18182828283333333A393A404040454545414141121212111112121212111211
+      111211121111111111111111111011111111101110111010101010101010100F
+      0F0F100F0F0F100F0F0F0F0F0F0E0F0F2626230F0E0F30303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2B2B
+      2B2A2A2A29292928282827272726262626262625252525252524242424242424
+      24242424247C7C7CD3D3D3D3D3D37C7C7C2424242424242424242424242F2F2F
+      C8C8C8D3D3D3D3D3D3B2B2B22424242424242424242424242424249C9C9CD3D3
+      D3D3D3D366666624242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424D3D3D3D3D3D3D3D3D3242424
+      2424242424242424242424242424247C7C7CD3D3D3D3D3D37C7C7C2424242424
+      24242424242424242424242424D3D3D3D3D3D3D3D3D324242424242424242424
+      2424242424BDBDBDD3D3D3D3D3D3BDBDBD2F2F2F242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242F2F2FC8C8
+      C8D3D3D3D3D3D3A7A7A7242424242424242424252525252525A7A7A7D3D3D3D3
+      D3D3878787252525252525252525252525252525252525252525252525252525
+      5C5C5CD3D3D3D3D3D3C8C8C8252525252525252525515151D3D3D3D3D3D3D3D3
+      D3252525252525252525515151D3D3D3D3D3D3B2B2B225252525252525252525
+      2525252525252525252525252525252525252525252525252525252525252525
+      7C7C7CD3D3D3D3D3D39C9C9C2525252525242525252424242424242424242424
+      24242424242424242424242424242424242424D3D3D3D3D3D3D3D3D324242324
+      23242323232323232223222222222222222222222122222424242626275E5D5E
+      C8C8C8D3D3D3D3D3D3BDBDBD2121212121212121212121212424242928282927
+      2728272728282728272727272727272727272727272727272727272727272727
+      27279D9D9DD3D3D3D3D3D3D3D3D3515251262626262525262526D3D3D3D3D3D3
+      D3D3D35050502121201F1E1F1F1E1F1F1F1F1F1F1F1F1F1F1F1F1F7A797AD3D3
+      D3D3D3D3D3D3D33131312625262626252525257C7D7CD3D3D3D3D3D3A7A7A725
+      2424454545C8C8C8D3D3D3D3D3D3C8C8C82F2F2E242423242423242322242322
+      2323222323232422232322232424242423232525242525252626262625262727
+      272728272828282929292929282A29292929292A2A292A2A292B2A2A2A2A2A2A
+      2A2A2A2A2A2A292A29292A292929292929292929292928282928292828282827
+      2827272827272727272727272727272627262626262625262625262625262524
+      2524232324232324242324242424242423232323242423232223222223222222
+      222122212122212221212121212120212121202021202020202020202020201F
+      201F201F2020201F1F1F1F1F1F1F1F1E1F1E1F1F1E1E1E1E1E1D1E1A191A1A19
+      1A19191919191A19191919191919191919181919181918181819191918181818
+      1818181818181818181817171717171717161716161717171617161616161716
+      1616161615161616161615151615151515151515151616151617171E1E1E3030
+      303636363E3E3E42434347474827262612121212131212121212121112111211
+      1212111112111111111110111011111011111010101011101010100F10100F10
+      0F100F0F100F0F100F0F0F0F2623260F0F0F3030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2B2B2B2A2A2A
+      2929292828282727272626262626262525252525252424242424242424242424
+      247D7D7DD5D5D5D5D5D57D7D7D2424242424242424242424249D9D9DD5D5D5D5
+      D5D5CACACA3A3A3A242424242424242424242424242424A9A9A9D5D5D5D5D5D5
+      D5D5D5B4B4B4A9A9A97D7D7D7272725050503A3A3A2424242424242424242424
+      24242424242424242424242424242424D5D5D5D5D5D5D5D5D524242424242424
+      24242424242424242424247D7D7DD5D5D5D5D5D57D7D7D242424242424242424
+      242424242424242424D5D5D5D5D5D5D5D5D52424242424242424242424245C5C
+      5CD5D5D5D5D5D5D5D5D55C5C5C24242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424676767D5D5D5
+      D5D5D5D5D5D5454545242424242424242424242424A9A9A9D5D5D5D5D5D55050
+      50242424242424242424242424252525252525252525252525252525252525D5
+      D5D5D5D5D5D5D5D5252525252525252525515151D5D5D5D5D5D5D5D5D5252525
+      2525252525257D7D7DD5D5D5D5D5D5D5D5D5BFBFBFA9A9A98888887D7D7D5151
+      51464646252525252525252525252525252525242424242424242424878787D5
+      D5D5D5D5D57D7D7D242424242424242424242424242424242424242424242424
+      242424242424242424242424242424D5D5D5D5D5D5D5D5D52223232323222322
+      23222223232222232222222222222222242424303030898889D5D5D5D5D5D5D5
+      D5D5D5D5D5595959212121212121212121212121282728292928282827292728
+      292727282728272727272727272727272727272727272727272727939393D5D5
+      D5D5D5D5D5D5D5BFBFBF262726262725262626272525D5D5D5D5D5D5D5D5D551
+      51512525242221221F1E20201E1F1F1F1F1F1F1F1F1E1F363636D5D5D5D5D5D5
+      D5D5D55252522625262625262526257D7D7DD5D5D5D5D5D5A9A9A9302F2FB4B4
+      B4D5D5D5D5D5D5CACACA45454524242424242424242424242324242223242324
+      2323242423242323242423242424252425252525262626272727272727282828
+      2829282A2A292A2A292A2A292B2A2A2B2A2A2A2A2A2B2A2A2B2A2A2A2A2A2A2A
+      2A2A2A2A292A2929292929292929292928292928282928282829282728282728
+      2727282727272726272627272627262626262626252525242423232423242323
+      2524232423232424232424232323232423222323222322222321222221222221
+      222221212121212121212121212120212121202020202020202020201F201F20
+      1F20201F1F1F1F1F1F1F1F1F1F1F1F1F1F1E1E1E1A1A1A1A191A1A191A1A191A
+      1A1A1B1B1A1A1D1D1D2728272323242323231F201F1E1E1D1A1A1A1919191919
+      1919191819191819181817171717171717171716171617161617171616161615
+      16161616151515161516161516151515151616161919192B2C2C3434343A3A3A
+      4040404645464241411312131313121212121212121212121212121211111111
+      121111111111111111111111101011111010101010101010101010100F100F0F
+      100F0F0F0F0F100F2626260F0F0F303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2B2B2B2A2A2A29292928
+      28282727272626262626262525252525252424242424242424242424247E7E7E
+      D8D8D8D8D8D87E7E7E242424242424242424515151D8D8D8D8D8D8D8D8D87373
+      73242424242424242424242424242424242424ABABABD8D8D8D8D8D8D8D8D8D8
+      D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8B6B6B6ABABAB7E7E7E737373
+      3B3B3B242424242424242424D8D8D8D8D8D8D8D8D82424242424242424242424
+      242424242424247E7E7ED8D8D8D8D8D87E7E7E24242424242424242424242424
+      2424242424D8D8D8D8D8D8D8D8D8242424242424242424242424949494D8D8D8
+      D8D8D8B6B6B62424242424242424242424242424242424242424242424242424
+      24242424242424242424242424242424242424242424242424C1C1C1D8D8D8D8
+      D8D8898989242424242424242424242424ABABABD8D8D8D8D8D8515151242424
+      242424242424242424242424242424242424242424242424242424D8D8D8D8D8
+      D8D8D8D8515151242424242424515151D8D8D8D8D8D8D8D8D824242424242424
+      24247E7E7ED8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8
+      D8D8D8CDCDCDABABAB9494947E7E7E5C5C5C242424242424ABABABD8D8D8D8D8
+      D868686824242424242424242424242424242424242424242424242424232423
+      2324242323242323242323D8D8D8D8D8D8D8D8D8232323232223232222232323
+      222223222323222322232322464647C2C2C2D8D8D8D8D8D8D8D8D8D8D8D86566
+      6521212121212121212121212124242429292829282729282728272828272729
+      2827282727272727272727272727272727484848B7B7B7D8D8D8D8D8D8D8D8D8
+      D8D8D85F5F5E272726262726262626262625D8D8D8D8D8D8D8D8D85252522424
+      25252424232324201F20201E1F1F1F1F1F1F1F1F1E1FC1C1C1D8D8D8D8D8D87D
+      7D7D2525252626262526267F7F7FD8D8D8D8D8D8ABABABABABABD8D8D8D8D8D8
+      D8D8D85C5C5C2424242424242424242424242324232324232323222423232423
+      232423232524242424242424252626252626262728272828282828282828282A
+      29292A2A2A2A2A292B2B2A2B2A292A2A2A2B2B2A2B2A2B2B2A2A2B2A2A2A2929
+      2A2A292A2A2A29292A2929292929292929292929282829292928272928272827
+      2728272727272726262625252624252524242424242324242324242424232325
+      2324242323242423242323232323232322232222232222222222222122222122
+      2221212121212121212120212120202120202020202020202020202020201F20
+      201F201F1F20201F1F1F1F1F1F1B1B1A1A191B1A191A1A191A1B1A1B1A1A1B1D
+      1D1C2B2C2B2D2D2E2E2E2E2E2E2E2E2E2E2D2C2D2D2D2C2C2C2D292929282728
+      2423242221221E1E1F1C1D1D1919191818181717181718171717181717171616
+      161615161516161615151617161818182323233131313737373E3E3E44444448
+      4848212120131312131313121213121312121212111212111212111211121111
+      1111111111111110111011111111111110101110101010101010100F100F0F0F
+      100F0F0F2626260F0F0F30303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030303030303030303030302F2F2F
+      2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2B2B2B2A2A2A2929292828282727
+      27262626262626252525252525242424242424242424242424808080DBDBDBDB
+      DBDB808080242424242424242424C4C4C4DBDBDBDBDBDBA2A2A2242424242424
+      242424242424242424242424242424ADADADDBDBDBDBDBDB8B8B8B8B8B8BADAD
+      ADB9B9B9DBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDB80808024
+      2424242424242424DBDBDBDBDBDBDBDBDB242424242424242424242424242424
+      242424808080DBDBDBDBDBDB8080802424242424242424242424242424242424
+      24DBDBDBDBDBDBDBDBDB242424242424242424242424D0D0D0DBDBDBDBDBDB74
+      7474242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424248B8B8BDBDBDBDBDBDBC4C4
+      C4242424242424242424242424ADADADDBDBDBDBDBDB52525224242424242424
+      2424242424242424242424242424242424242424242424DBDBDBDBDBDBDBDBDB
+      2F2F2F242424242424525252DBDBDBDBDBDBDBDBDB2424242424242424248080
+      80DBDBDBDBDBDBADADAD808080A2A2A2ADADADDBDBDBDBDBDBDBDBDBDBDBDBDB
+      DBDBDBDBDBDBDBDBDBDBDBB9B9B92424242424248B8B8BDBDBDBDBDBDB808080
+      2424242424242424242424242324242423242424242424232424232323232324
+      23232423242423DBDBDBDBDBDBDBDBDB23232322232323232223222223232223
+      2223232222464646D0D0D0DBDBDBDBDBDBDBDBDBC5C5C5525252212121212121
+      2121212121212121212827272929282929282929282828272828282827282828
+      27272727272727272727767676DBDBDBDBDBDBDBDBDBDBDBDBDBDBDB97979727
+      2727272726262726262725272525DBDBDBDBDBDBDBDBDB535353242525242525
+      2424242424242121211F1E201F1F1F1F1F1FACACACDBDBDBDBDBDB7D7D7D201F
+      1F232222252525808181DBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDB69696924
+      2424242424242424242424242424242424242424232423242423242423242424
+      2524242525252525252525262726262727272828282929292829292A2A292B2A
+      2B2A2A2A2C2B2A2B2B2A2B2A2A2C2B2A2C2A2A2B2A2A2B2A2A2A2A2A2A2A292A
+      2A2A2A292A292929292A29292929282929292929292829282827292827282727
+      2626262425242425242425252424242424242424242423242323242424232424
+      2423242324242324232323232223232223222223222222222222222122222122
+      222121212121212021212021212120212020202020212020202020201F20201F
+      201F1F201F1F1B1B1B1A1A1A1A1A1B1A1A1A1B1A1B1B1A1C1D1C1D2A2A293030
+      31313232323332323232323232303130302F2F2F2F2F2D2D2D2D2D2E2B2C2C2B
+      2C2C2C2B2B2B2C2B2B2B2B2B2B2B2828282627272323232121211D1E1E1B1B1B
+      1818171617161919181B1B1B2E2E2E3434343B3B3B4141414747473C3B3C1313
+      1313121312121313131313121212121212121212121112111212121211121111
+      1111111111111110101111111110111010101010101010100F0F100F0F0F100F
+      2626260F0F0F3030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303030303030302F2F2F2F2F2F2E
+      2E2E2E2E2E2D2D2D2C2C2C2C2C2C2B2B2B2A2A2A292929282828272727262626
+      262626252525252525242424242424242424242424818181DDDDDDDDDDDD9797
+      97525252525252818181DDDDDDDDDDDDD1D1D130303024242424242424242424
+      2424242424242424242424A3A3A3DDDDDDDDDDDD525252242424242424242424
+      2424243B3B3B525252757575818181D1D1D1DDDDDDDDDDDD6A6A6A2424242424
+      24242424DDDDDDDDDDDDDDDDDD30303024242424242424242424242424242481
+      8181DDDDDDDDDDDD818181242424242424242424242424242424242424DDDDDD
+      DDDDDDDDDDDD2424242424242424243B3B3BDDDDDDDDDDDDDDDDDD4747472424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424525252DDDDDDDDDDDDDDDDDD303030
+      242424242424242424AFAFAFDDDDDDDDDDDD8181812424242424242424242424
+      242424242424242424242424242424245E5E5EDDDDDDDDDDDDDDDDDD24242424
+      2424242424525252DDDDDDDDDDDDDDDDDD2424242424242424245E5E5EDDDDDD
+      DDDDDD9797972424242424242424242424243030305252525E5E5E818181A3A3
+      A3DDDDDDDDDDDDAFAFAF242424242424757575DDDDDDDDDDDDA3A3A324242424
+      2424242424242424242424242324232324232324242424242324232424242424
+      232423DDDDDDDDDDDDDDDDDD2323232323232323222323232322232323232323
+      23AFAFAFDDDDDDDDDDDDDDDDDD8E8E8E35353521212021212121212121212121
+      21212424242A2929292928292928292928292828282828292827282727272727
+      272727989898DDDDDDDDDDDDDDDDDDDDDDDDD2D2D26C6C6C2727272727272727
+      26272726272726262626DDDDDDDDDDDDDDDDDD54535325252525252524252424
+      2424242524232324201F201F1F1FADADADDDDDDDDDDDDD7E7E7E1F1E1E1F1E1E
+      1E1E1E7F7F7FDDDDDDDDDDDDD2D2D1DDDDDDDDDDDDD1D1D13C3B3B2524242424
+      2424242424242424242424242424242424242423242324242324242425242425
+      25252625252626262626272727272829282929292929292A2A292B2A2A2B2B2A
+      2B2C2B2B2B2A2B2B2A2C2B2B2C2B2B2C2B2B2B2A2A2B2A2A2A2A2A292A2A2A2A
+      292A292A2A292A29292929292929292829292828282727262725252525252525
+      2525252525252425242424252424242424232424252423242424242424242423
+      2424232423232423232323222323222322222222222222222221212121212121
+      2121212121212021212120202020202120202020202020201F1F20202020201C
+      1C1B1A1A1B1A1A1B1A1A1B1B1B1C1B1A1C1E1D1F29292A323232343434373637
+      373737373737353535343434313132313132303030302F2F2F2F2F2F2F2E2F2F
+      2E2D2E2E2E2D2E2C2C2D2C2C2C2C2C2C2B2A2B2B2A2B2A2A2A2A2A2A2A2A2A29
+      2A2A2828292C2B2C3333333939393F3F3F4545454848481D1D1D131313141313
+      1313131312121313121213121212121212121212121112121112111211121211
+      1111111111111110101110111110101110101010101010100F1010102826260F
+      100F303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030302F2F2F2F2F2F2E2E2E2E2E
+      2E2D2D2D2C2C2C2C2C2C2B2B2B2A2A2A29292928282827272726262626262625
+      2525252525242424242424242424242424828282E0E0E0E0E0E0E0E0E0E0E0E0
+      E0E0E0E0E0E0E0E0E0E0E0E0B1B1B15353532424242424242424242424242424
+      24242424242424777777E0E0E0E0E0E08D8D8D24242424242424242424242424
+      2424242424242424242424C8C8C8E0E0E0E0E0E0474747242424242424242424
+      E0E0E0E0E0E0E0E0E05353532424242424242424242424242424248D8D8DE0E0
+      E0E0E0E0A5A5A52424242424242424242424242424243C3C3CE0E0E0E0E0E0E0
+      E0E0242424242424242424535353E0E0E0E0E0E0E0E0E0242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      24242424242424242424242424242424E0E0E0E0E0E0E0E0E053535324242424
+      2424242424B1B1B1E0E0E0E0E0E0C8C8C8242424242424242424242424242424
+      242424242424242424242424A5A5A5E0E0E0E0E0E0B1B1B12424242424242424
+      24535353E0E0E0E0E0E0E0E0E0242424242424242424303030E0E0E0E0E0E0D4
+      D4D4242424242424242424242424242424242424242424242424777777E0E0E0
+      E0E0E08D8D8D242424242424474747E0E0E0E0E0E0E0E0E04747472424242424
+      24242424242424242424242423242423242424232424242423232424242423E0
+      E0E0E0E0E0E0E0E02323232323232323222323232223232322233C3B3CE0E0E0
+      E0E0E0E0E0E07A7A7A2C2C2C2324242121212121212121212121212121212828
+      28292929292929292928292928292827282727282828282828282827848484E0
+      E0E0E0E0E0E0E0E0E0E0E0A6A6A63E3E3E272727272727272727272726272726
+      272626262626E0E0E0E0E0E0E0E0E05554542525252525252525242524252525
+      25242525242424222121E0E0E0E0E0E0E0E0E06868681F1F1F1E1E1F1E1E1E7F
+      7F7FE0E0E0E0E0E0B0B1B1999A9AE0E0E0E0E0E0BDBDBD303030252424242424
+      2424242424242424242424242424242424242525242425242525252525252625
+      252626252727272728282829292929292929292A2A2A2B2A2B2A2A2B2C2C2B2B
+      2B2B2B2B2A2C2C2B2C2B2B2C2B2B2B2A2A2B2A2A2B2A2A2A2A2A2A2A2A2A2929
+      2929292929292929292828272625262625252525252526252525262525252524
+      2525242424252425252525242425252524252525242424252424242424242324
+      2323242323232322232222232223232223222222222122222122212222212122
+      2122212121212021212021202121212020202020202020201C1C1C1A1B1B1A1B
+      1B1A1A1B1B1B1C1B1B1C1E1D1E2727283333333737373A3A3A3C3C3C3C3D3C3C
+      3C3C3B3A3A37373836363633343332313232323231313131313131313130302F
+      302F2F2F2F302E2E2E2E2E2E2E2D2E2E2D2D2D2D2D2C2C2C2C2D2C2D2D2D2F2F
+      2E3232323636363D3C3C43444347474735353513131313131413141313131312
+      1313121313121313121212121212121212121212111211111211121111111111
+      1111111110111110101011101011111010111010101010102828260F0F103030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D
+      2C2C2C2C2C2C2B2B2B2A2A2A2929292828282727272626262626262525252525
+      25242424242424242424242424838383E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2
+      E2E2E2E2E2E2E2E2E2E2E2E2E2E28F8F8F242424242424242424242424242424
+      2424243C3C3CE2E2E2E2E2E2D6D6D63C3C3C2424242424242424242424242424
+      24242424545454E2E2E2E2E2E2CACACA242424242424242424242424E2E2E2E2
+      E2E2E2E2E2838383242424242424242424242424242424BEBEBEE2E2E2E2E2E2
+      D6D6D63030302424242424242424242424246C6C6CE2E2E2E2E2E2CACACA2424
+      24242424242424545454E2E2E2E2E2E2E2E2E224242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      242424242424242424242424E2E2E2E2E2E2E2E2E25454542424242424242424
+      24B2B2B2E2E2E2E2E2E2E2E2E283838324242424242424242424242424242424
+      24242424246C6C6CE2E2E2E2E2E2E2E2E26C6C6C242424242424242424545454
+      E2E2E2E2E2E2E2E2E2242424242424242424242424A6A6A6E2E2E2E2E2E27777
+      77242424242424242424242424242424242424303030CACACAE2E2E2E2E2E248
+      4848242424242424242424B2B2B2E2E2E2E2E2E2BEBEBE303030242424242424
+      242424242324242424242424232424242424242424232324232423E2E2E2E2E2
+      E2E2E2E2242324242323232323232323232322222322545454E2E2E2E2E2E2CB
+      CBCB2A2A2A2B2B2B2121212121212121212121212121212324242A292A292929
+      2929292A29282A2928292928292828282828282727343434D6D6D6E2E2E2E2E2
+      E2E2E2E26D6D6D27272727272727272727272727272727272727272727272627
+      2626E2E2E2E2E2E2E2E2E2555555252525252525252525252425252425252524
+      252425606060E2E2E2E2E2E2E2E2E24443431E1E1F1F1F1E1E1F1F808080E2E2
+      E2E2E2E2B1B1B11F1E1EBEBEBEE2E2E2E2E2E2A7A6A624242424242424242424
+      2424242424242424242425242324242524242424252625252525262625272626
+      2827272828282829292929292929292A2A2A2B2B2B2A2A2B2B2B2B2B2B2B2B2B
+      2B2C2C2B2C2C2B2C2B2B2C2B2B2B2A2A2B2A2B2B2A2A2A2A2A292A2A28282927
+      2827262626252525262525262425262525252525252525262525252525252424
+      2525252525252625252525252525252525252425242525242424242424232423
+      2324232324222223222323222222222222222222222122222222222221212121
+      21212121212121212021212020212020201C1C1C1B1B1C1B1B1C1A1A1B1B1B1C
+      1B1B1C1D1D1E2625263433343938393C3C3C4140404242424242422E2E2E3434
+      3433323238383835363635343434343334333332323232323231313130303130
+      3131313130303030303030303030302F302E2E2E2E2E2E302F2F313130343535
+      3A3A3A3F3F3F4544444545451716171314131314141413141313141313131313
+      1313121313121312121313121212121212121212111211111211111111121111
+      11111111101011111011101110111010101010102826280F1010303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C
+      2C2C2B2B2B2A2A2A292929282828272727262626262626252525252525242424
+      242424242424242424858585E5E5E5E5E5E59C9C9C5454545454545454547979
+      79CDCDCDE5E5E5E5E5E5E5E5E590909024242424242424242424242424242424
+      2424909090E5E5E5E5E5E5C1C1C1303030242424242424242424242424484848
+      D9D9D9E5E5E5E5E5E56D6D6D242424242424242424242424E5E5E5E5E5E5E5E5
+      E5D9D9D93C3C3C242424242424242424545454E5E5E5E5E5E5E5E5E5E5E5E585
+      8585242424242424242424242424C1C1C1E5E5E5E5E5E59C9C9C242424242424
+      242424545454E5E5E5E5E5E5E5E5E52424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424E5E5E5E5E5E5E5E5E5545454242424242424242424B5B5B5
+      E5E5E5E5E5E5E5E5E5E5E5E58585852424242424242424242424242424246D6D
+      6DE5E5E5E5E5E5E5E5E5CDCDCD242424242424242424242424545454E5E5E5E5
+      E5E5E5E5E5242424242424242424242424545454E5E5E5E5E5E5D9D9D9484848
+      2424242424242424242424242424249C9C9CE5E5E5E5E5E5B5B5B52424242424
+      24242424242424545454E5E5E5E5E5E5E5E5E5C1C1C13C3C3C24242424242424
+      2424242424242424616060232424242424232324242423E5E5E5E5E5E5E5E5E5
+      2424232324232324232323232323232323234A4A4AE5E5E5E5E5E5D9D9D92B2B
+      2C2525262121212121212121217777772121212727272A29292A2A2A292A2929
+      2928292928292928292828292728292827585757E5E5E5E5E5E5E5E5E5868686
+      272727272727272727272727272727272727272727272726272726272726E5E5
+      E5E5E5E5E5E5E5565555262525252525252525252425252425252424252424C1
+      C1C1E5E5E5E5E5E5CDCDCD2121211F1F1F1E1F1F1F1F1F828282E5E5E5E5E5E5
+      B3B3B31E1E1E2A2A2AD9D9D9E5E5E5E5E5E58484842424242524242424242424
+      2424252524252424242425252524252526252526252526262528272628272729
+      2728292928292929292A2A2B2A2A2B2B2B2B2B2B2C2C2C2C2C2B2B2B2C2C2C2C
+      2C2C2C2C2C2B2C2B2B2C2B2B2B2B2B29292A2727272626262525262525262625
+      2525252625252526252526252426252525262526252525252526262626262626
+      2526262626252625252525252525252425242424252423242423242323242323
+      2323232323222323222222222222222222222221222221222221222121212121
+      212121212021212121201C1C1D1B1B1C1B1B1C1A1B1C1A1B1C1C1B1D1E1D1E25
+      25253434343938393D3E3E4342424546464747482A2A2A191819181918181819
+      1818181818181F1F1F1E1E1F2627262627272D2E2D2C2D2D3434343334343333
+      3232323232323231313131313030302F2F302F3131323434343736373C3B3C40
+      40414444442D2E2D141414141414141414141413131413131313131313131313
+      1313131213131212121212121212121212111212121112111111111111111111
+      11111111101011101011101011101010282828100F1030303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2B2B
+      2B2A2A2A29292928282827272726262626262625252525252524242424242424
+      2424242424868686E7E7E7E7E7E7868686242424242424242424242424303030
+      9E9E9EE7E7E7E7E7E7E7E7E75555552424242424242424242424242424243030
+      30C2C2C2E7E7E7E7E7E7CFCFCF6D6D6D3030303C3C3C868686DBDBDBE7E7E7E7
+      E7E7B6B6B6242424242424242424242424242424E7E7E7E7E7E7E7E7E7E7E7E7
+      DBDBDB6D6D6D555555868686DBDBDBE7E7E7E7E7E7CFCFCFE7E7E7E7E7E79E9E
+      9E555555616161B6B6B6E7E7E7E7E7E7E7E7E755555524242424242424242455
+      5555E7E7E7E7E7E7E7E7E7242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      24303030E7E7E7E7E7E7E7E7E7555555242424242424242424B6B6B6E7E7E7E7
+      E7E7B6B6B6E7E7E7E7E7E7CFCFCF868686555555868686C2C2C2E7E7E7E7E7E7
+      E7E7E7E7E7E7494949242424242424242424242424555555E7E7E7E7E7E7E7E7
+      E7242424242424242424242424242424919191E7E7E7E7E7E7E7E7E786868649
+      4949303030616161C2C2C2E7E7E7E7E7E7DBDBDB494949242424242424242424
+      242424242424919191E7E7E7E7E7E7E7E7E7E7E7E79E9E9E8686868686869191
+      91CFCFCFB6B6B6242424555555858686868686E7E7E7E7E7E7E7E7E785858685
+      8685858585858585545454242424262626DBDBDBE7E7E7E7E7E7A0A0A02D2D2D
+      2121215F5F5FC2C2C2B5B5B52424232A2A2A2A2A2A2A2A292929292929282929
+      28292929292828292828282827595757E7E7E7E7E7E7E7E7E733343328272827
+      2727272727272727272727272727272727272726272726272726E7E7E7E7E7E7
+      E7E7E75756562626262526252525262525252525252525259E9E9EE7E7E7E7E7
+      E7E7E7E76D6D6D242424242424212121202020838383E7E7E7E7E7E7B5B5B51E
+      1E1E1E1E1E444444E7E7E7E7E7E7E7E7E76A6A6A1E1E1E212020212121222322
+      2423232424242525252525252525252526252626262727272827272928282929
+      292A29292A2A2A2A2B2A2B2B2B2B2B2B2B2C2B2B2C2B2C2B2C2C2C2B2B2A2A29
+      2929282728272727272727262727262626262626262626262625262626262525
+      2525252525252625252626252526262726262626262726262626262626252525
+      2626252525252525252525252525252424242425242325242324232423232324
+      2323232223232222222322222222222222212221212122222122212121212121
+      2121211D1C1D1C1B1D1B1B1C1B1B1C1B1B1C1C1C1C1C1B1C2323233434333838
+      383D3D3D4343424647474A4A4A35343519191A19191919191818191918181819
+      18181818181818181718171717171718181717171717171617171D1E1E1D1D1E
+      2625252525252C2C2C2C2C2C3232333334333535363A3A3B3D3D3D4040403E3D
+      3D14141415141414141414141413131314131313131413131313131312131313
+      1212131312121212121212121212121112121111111111111211111111111111
+      1111111011101110101110102828280F10103030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2B2B2B2A2A2A
+      2929292828282727272626262626262525252525252424242424242424242424
+      24878787E9E9E9E9E9E9878787242424242424242424242424242424303030D0
+      D0D0E9E9E9E9E9E99F9F9F242424242424242424242424242424242424494949
+      C4C4C4E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9C4C4C43030
+      302424242424242424246E6E6EE9E9E9E9E9E9E9E9E9E9E9E9929292E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9626262878787E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9ABABAB2424242424242424242424243D3D3DE9E9
+      E9E9E9E9E9E9E949494924242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424555555
+      E9E9E9E9E9E9E9E9E9242424242424242424242424B8B8B8E9E9E9E9E9E95555
+      559F9F9FE9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9DDDDDD6E
+      6E6E2424242424242424242424249F9F9FE9E9E9E9E9E9E9E9E9E9E9E9242424
+      2424242424242424242424242424249F9F9FE9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9DDDDDD49494924242424242424242424242424242424
+      2424242424878787E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      B8B8B8242424878787E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E98787872626262726277D7C7CE9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9B7B7B72727272A2A2A2929292A2A2A2A2A2A2A2929292A28292929
+      292928292828292828595858E9E9E9E9E9E9E9E9E94C4C4C2727282827282727
+      27272727272727585858272727272727272727272726E9E9E9E9E9E9E9E9E957
+      5757272525262626252625252625313131ACACACE9E9E9E9E9E9E9E9E9C4C4C4
+      252525242424242424242424242424868686E9E9E9E9E9E9B6B6B61E1E1E1E1E
+      1E1E1E1E6A6A6AE9E9E9E9E9E9DCDCDC4444441E1E1E1E1E1E1E1F1F1F1E1E1E
+      1F1F212020202020222121232322242324232324262525282727282828282827
+      2828282728272828282827272828282726272727272727262727262827272727
+      2727272727272726272726272727262627262626262626262626252626252626
+      2626262626272727272727262727272627262726262626262626252626262626
+      2626252526252525252525242525242524242424232423242423232422222322
+      222323232323232322222222222222222122222221212221222222211F1E1F1C
+      1C1C1C1C1D1C1B1C1B1C1C1B1B1C1C1C1D2222223030303636353B3B3B414141
+      4747474B4B4B3839391A1A19191A191919191919191819191919191918181818
+      1918181818181818181817181817181817171717171717171716171717161717
+      16161616161616161516151615161D1D1E1E1E1E2828282A2A2A202020151514
+      1514141414141414141414131314141314131313131313131313131312121213
+      1312121312121212121212121212121211111212121111121111121211111110
+      1111111111101011282B28101010303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2B2B2B2A2A2A29292928
+      2828272727262626262626252525252525242424242424242424242424888888
+      ECECECECECEC8888882424242424242424242424242424242424247C7C7CECEC
+      ECECECECDFDFDF24242424242424242424242424242424242424242431313194
+      9494ECECECECECECECECECECECECECECECDFDFDF888888242424242424242424
+      242424242424242424D3D3D3ECECECECECECECECEC242424949494ECECECECEC
+      ECECECECECECECECECEC888888242424242424888888ECECECECECECECECECEC
+      ECECECECECA1A1A1313131242424242424242424242424242424DFDFDFECECEC
+      ECECEC7C7C7C2424242424242424242424242424242424242424242424242424
+      24242424242424242424242424242424242424242424242424949494ECECECEC
+      ECECD3D3D3242424242424242424242424BABABAECECECECECEC565656242424
+      7C7C7CDFDFDFECECECECECECECECECECECECECECECA1A1A13D3D3D2424242424
+      242424242424242424243D3D3DECECECECECECECECECECECEC24242424242424
+      2424242424242424242424242424636363D3D3D3ECECECECECECECECECECECEC
+      ECECECA1A1A13D3D3D2424242424242424242424242424242424242424242424
+      24242424565656ADADADECECECECECECECECECECECECECECECECECECBABABA24
+      2424888888ECECECECECECECECECECECECECECECECECECECECECECECECECECEC
+      8888882626262727272929297F8080E0E0E0ECECECECECECECECECECECECECEC
+      EC9393932A2A2A2A2A2A2A2A2A2A2A2A2A2A2A292929292A2929292829292829
+      2829292828353434ECECECECECECECECECAEAEAF272828272728272727333333
+      959595BBBBBB272727272727272726272727ECECECECECECECECEC7D7D7D5858
+      58585858717170A1A1A1E0E0E0ECECECECECECECECECC7C6C731313124242524
+      2424242424242424242424888888ECECECECECECB9B9B9201F1F1E1E1E1E1E1E
+      1E1E1E9E9E9EECECECECECECD2D2D22B2B2B1E1E1E1F1F1F1F1E1F1F1E1F1F1E
+      1F1F1F1F1F1F1F20202020202021222122222323232323232324242424252525
+      2524252625252526262627262626272727262627272627282626272727272727
+      2627272726272727272627272626262626262626262727272727282728282827
+      2727282727272727272627272626272727272626262726262625262626262525
+      2525252625262525252524252424242424242323242423242323232323232223
+      2323222323232223222222222222222222212122222121212020211C1C1D1C1C
+      1D1C1C1C1B1B1C1C1B1C2222222F2F2F3434343938393F3E3E4546454B4A4A3D
+      3D3D191A191A1A19191919191919191919191919191819191819181918191818
+      1818181818181718181718181817181717171717171717161617171716161717
+      1716161616161616161616161616151616161515151515151515141514151514
+      1415141414141414131314131313141313131313131413131312131313131313
+      1313131212121212121212121212121212111111121211111111111111111111
+      11101111282B2810101030303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030303030303030303030302F2F2F
+      2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2B2B2B2A2A2A2929292828282727
+      27262626262626252525252525242424242424242424242424898989EEEEEEEE
+      EEEE898989242424242424242424242424242424242424575757EEEEEEEEEEEE
+      EEEEEE2424242424242424242424242424242424242424242424242424243131
+      315757577D7D7D70707057575724242424242424242424242424242424242424
+      24242424242424242424242424242424242424242424243D3D3D636363898989
+      5757573131312424242424242424242424243131315757578989896363633D3D
+      3D242424242424242424242424242424242424242424A2A2A2EEEEEEEEEEEED5
+      D5D5242424242424242424242424242424242424242424242424242424242424
+      242424242424242424242424242424242424242424D5D5D5EEEEEEEEEEEE9595
+      95242424242424242424242424BBBBBBEEEEEEEEEEEE57575724242424242424
+      24245757577070707D7D7D575757313131242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      242424242424242424242424242424244A4A4A70707089898957575731313124
+      2424242424242424242424242424242424242424242424242424242424242424
+      242424242424313131636363EEEEEEEEEEEEEEEEEE7D7D7D2424242424242424
+      24242424242324EEEEEEEEEEEEEEEEEE24232423232323232323232426262627
+      27272828282A2A2A2C2C2C2727275454547C7C7C7B7C7C545455212122272727
+      2A2A2A2A2A2A2A2A2A2A2A29292A2A2A29292929292A2A282929282928282929
+      282928288C8B8BEEEEEEEEEEEEEEEEEED5D5D5BCBCBCBCBCBCEEEEEEEEEEEEBC
+      BCBC272727272727272727272727EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEBCBCBC3232312425252524242524252425
+      25242424242424898989EEEEEEEEEEEEBBBBBB242423232322212121201F201E
+      1E1EC7C7C7EEEEEEEEEEEEC7C7C71E1E1E1F1F1F1E1E1F1F1F1E1F1F1E201F1F
+      1F1F1F2020202120202221212322222323232424232424242525252525252626
+      2626252526262726262727272726272727272727272727272627272727272727
+      2727272627272726272728282828282828282728282728272828272728272728
+      2727282727272727272727272727262626262626262626262625262626252625
+      2525252525252425252424242425242324242324232424232323232323222322
+      23232323222222232222222222222222212221212221221C1C1D1C1C1D1C1C1D
+      1B1C1D1B1B1D2827283130303535353A3A394140414647474242431D1D1D1A1A
+      1A1A1A1A1A1A191A191A1A191919191919191919181818181918181818181818
+      1818181818171718171817171717171817171717161717171617161716161616
+      1616161616161616161615161515151516151515151515151515151414151415
+      1414141514141414141314141313141413131313141313131312131213131313
+      1212121212121212121212121212121112111111121211111111111111111011
+      2B28281110103030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303030303030302F2F2F2F2F2F2E
+      2E2E2E2E2E2D2D2D2C2C2C2C2C2C2B2B2B2A2A2A292929282828272727262626
+      2626262525252525252424242424242424242424248A8A8AF0F0F0F0F0F08A8A
+      8A242424242424242424242424242424242424575757F0F0F0F0F0F0F0F0F024
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      242424242424242424242424242424242424575757F0F0F0F0F0F0F0F0F07171
+      7124242424242424242424242424242424242424242424242424242424242424
+      24242424242424242424242424247E7E7EF0F0F0F0F0F0F0F0F04A4A4A242424
+      242424242424242424BDBDBDF0F0F0F0F0F05757572424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424717171F0F0F0F0F0F0969696242424242424242424242424242424
+      242424F0F0F0F0F0F0F0F0F02324232324242323232525242626262727282A29
+      292B2B2B2C2C2C2222222122222222222222222222222222222A2A2A2A2A2A2A
+      2A2A2A2A2A2A2A2A2A2A2A292A2A2A2A292A2929292928292928292828292828
+      292828A5A5A5F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0BEBEBE2727
+      27272727272727272727F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0D7D7D7727171252525252525242525242525242525242425242424
+      2424248A8A8AF0F0F0F0F0F0BDBDBD2423242424232423232323232323223B3B
+      3BE3E3E3F0F0F0F0F0F0A1A1A11F1F1F1F1F1F1F1F1F1F1F1E1F20201F1F1F20
+      2020202020212120232222232323232324242424252525252525252625252526
+      2726272626262727272727272726262627262727272727282828282928282929
+      2929292928282929282829282828282828282828282828272727272827272827
+      2727272727272727262727272727262626262626262625252625262625262625
+      2525252525242524232524242524242523242423242323232323232323222323
+      232323222222222222222222212222222122211D1D1E1D1D1D1C1C1D1C1B1D1C
+      1B1D2324243132313736363C3C3C4242414545451D1D1D1A1B1A1A1A1A1A191A
+      1A191A1A1A1A1A19191919191919191919181819181918191918181818181818
+      1818181818171818181717171717171717171617161617171617171616161616
+      1716161616161516151516151615151515151515151515151514151415151514
+      1414151414141414141413131314131313141313131313121313131213131212
+      131212121212121212121211111211111211121211121111111111112B282B11
+      1111303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030302F2F2F2F2F2F2E2E2E2E2E
+      2E2D2D2D2C2C2C2C2C2C2B2B2B2A2A2A29292928282827272726262626262625
+      25252525252424242424242424242424248B8B8BF2F2F2F2F2F28B8B8B242424
+      242424242424242424242424242424656565F2F2F2F2F2F2F2F2F22424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424BEBEBEF2F2F2F2F2F2E5E5E5313131
+      2424242424242424242424242424242424242424242424242424242424242424
+      242424242424243E3E3EE5E5E5F2F2F2F2F2F2BEBEBE24242424242424242424
+      2424242424BEBEBEF2F2F2F2F2F2585858242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      248B8B8BF2F2F2F2F2F2585858242424242424242424242424242424242424F2
+      F2F2F2F2F2F2F2F22424242424242423232626262727272828292A2A2A2C2C2C
+      2828282222222222222222222222222222222626272A2A2A2A2A2A2A2A2A2A2B
+      2A2A2A2A292A2A2A2A2A2A29292929292929292929292928282A282829292829
+      28285B5B5BA6A6A6BFBFBFF2F2F2BFBFBFB2B3B28080804D4D4D272727272727
+      2727272727278D8D8D8D8D8C8D8C8D8D8C8D8D8C8C8D8C8C8C8C8C7373733F3F
+      4026252525262525252525252525252525242525242425252425242425242458
+      58588B8B8B8B8B8B727272242324242424242423232324232323232323646464
+      8B8B8A8B8B8A8A8A8A3C3C3B212121202020201F20202020201F1F2020202020
+      2021212123222223232323232325242525252525252526262626252527272728
+      28282A28282A292A2A29292A2A292929292A2A2A292A2A292929292929292929
+      2828282929292929282829282828282828272828282728282827272727282727
+      2727272626272727272627272626262626262626262525262526262525262526
+      2524252424252424242323242324242323242324232323232322232323232322
+      2223232222222222222222222122221F1F1F1D1C1D1D1C1D1C1C1D1C1C1D201F
+      203332323737363C3C3C4142424747471E1D1D1B1A1B1A1A1A1B1A1A1A191A1A
+      1A1A19191919191A191919191919191919191819191919181818181818181818
+      1818181817181817181717171717171717171717161617161716171716161616
+      1616161615161616161615161515151615151515151515141514151414141514
+      1414131414131413141413141413131413131313131313131213131312121313
+      1313121212121212121212111211121111111211111111112B282B1011113030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D
+      2D2D2D2C2C2C2B2B2B2A2A2A2929292828282727272626262626262525252525
+      252424242424242424242424248C8C8CF4F4F4F4F4F48C8C8C24242424242424
+      2424242424242424242424C0C0C0F4F4F4F4F4F4CDCDCD242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      24242424242424242424242424585858F4F4F4F4F4F4F4F4F4CDCDCD31313124
+      2424242424242424242424242424242424242424242424242424242424242424
+      313131CDCDCDF4F4F4F4F4F4F4F4F44B4B4B2424242424242424242424242424
+      24C0C0C0F4F4F4F4F4F458585824242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      999999C0C0C06565652424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      24242424242424242424242424242424242424242424242424242424248C8C8C
+      F4F4F4F4F4F45858582424242424242424242424242424243E3E3EF4F4F4F4F4
+      F4F4F4F423242424242324242426262628272829292A2B2B2B2D2D2D23232322
+      22222222222222222222222323232A29292A2A2A2A2B2A2A2B2A2A2A2A2A2A2A
+      2A2A2A292A2A292A29292A29292A282929282929292929282928282928282828
+      2828282828282828272827282828272727282827282827272727272727272727
+      2727272726272726272726272626272726272626262626252526262525262625
+      2626252526252525252525252525252525252525252525252525252525252525
+      2425252425242425242424232424232323232323242323232323232323222322
+      2322232222232222232323232323232222242423242423252524252524252524
+      2626252726262827262928282929292928282A29292A29292B2A292A292A2A2A
+      2A2B2B2B2A2B2A2A2A2A2A2A2A292A2A2A292929292A29292929292929292829
+      2929292828282929282928282828282828282828272828272727282727272727
+      2627272727262726272727262626262626262626252626252626252625242525
+      2426242425242324242424242424232323232323232323232323232322222322
+      23232222222222222222222121201D1C1D1C1C1D1C1D1D1C1C1D1D1D1E30302F
+      3637373B3B3B4141414747472929281B1A1B1B1A1A1B1B1A1A1A1A1A1A1A1A1A
+      1A1A19191A1A1919191919191919191919181918191918191818181818171818
+      1818171718171717181817171717161716171717161617161717161616161616
+      1616161616161616151515161515151515151515151514141415141414141514
+      1414141414141314131413141313131313131313131312131213131312121312
+      12121213121112121211121211111112111111122D2B2B111111303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2D2D2D2C
+      2C2C2B2B2B2A2A2A292929282828272727262626262626252525252525242424
+      2424242424242424248D8D8DF6F6F6F6F6F68D8D8D2424242424242424242424
+      24242424737373F6F6F6F6F6F6F6F6F68D8D8D24242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2525252525252525252525252525252525252525252525252525252525252525
+      2525252525252525252525252525252525252525252524242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424248D8D8DF6F6F6F6F6F6F6F6F6CECECE3131312424
+      242424242424242424242424242424242424242424242424243E3E3ECECECEF6
+      F6F6F6F6F6F6F6F6808080242424242424242424242424242424242424C1C1C1
+      F6F6F6F6F6F65959592424242424242424242424242424242424242424242424
+      24242424242424242424242424242424242424242424242424737373F6F6F6F6
+      F6F6E9E9E9242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      242424242424242424242424242424242424242424242424248D8D8DF6F6F6F6
+      F6F6808080242424242424242424242424242424808080F6F6F6F6F6F6C1C1C1
+      2424242424242526252727272929282A2A2A2D2D2C292A292222222323232323
+      232322232322232727272B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B
+      2B2B2B2B2B2A2A2A2A2A292A2A292A29292A29292A2929292828282828282828
+      2828282827282728272727282828282727272727272727272727272727272727
+      2627272627272727262627262727262627262626262626262625262626262525
+      2625252525252525252525252525252525252525252525252525252524252524
+      2524242523242523232424242424232323232323232323232323232323232323
+      2323232323232423232323232324242423242425242425252525252526262527
+      27262827272928282A29292929282A292A2A29292B2A2A2A2A2A2A2A2A2B2A2A
+      2B2B2A2A2A2A2A292A2A292A2A2A2A292A2A2A292A29292A2929292928282829
+      2929292828282928282828282827272828272827272827282827272727272727
+      2727272727262726272626262626262625262625252625262525262524252524
+      2524242524242424242424242324232323232323232222232222232323232323
+      232223232222222221221D1D1D1C1D1D1C1C1D1C1C1D1D1D1E2A2B2B3635363A
+      3B3B3F3F3F4544453334341B1A1B1A1B1B1A1A1B1A1B1A1A1A1A1A191A1A1A19
+      191A191A1A191919191919191919191918191919181818191818181818181817
+      1818171717181717171717171817171716161717161717161717161616161615
+      1516151616151615151516151515151515151415151414151415141415141414
+      1314141313141414131414131313131313131313131313131212121313131312
+      121212131112121212121111111111112D2B2D11111130303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2D2D2D2C2C2C2B2B
+      2B2A2A2A29292928282827272726262626262625252525252524242424242424
+      24242424248E8E8EF8F8F8F8F8F88E8E8E2424242424242424243131318E8E8E
+      F8F8F8F8F8F8F8F8F8EBEBEB3131312424242424242424242424242424242424
+      2424242424242424242424242425252525252525252525252525252525252525
+      2525252525252525252525252525252525252525252525252525252525252525
+      2525252525252525252525252525252525252525252525252525252525252525
+      2525252525252525252525252524242424242424242424242424242424242424
+      2424242424242424242424A8A8A8F8F8F8F8F8F8F8F8F8EBEBEB8E8E8E313131
+      2424242424242424242424242424243131318E8E8EEBEBEBF8F8F8F8F8F8F8F8
+      F8A8A8A8242424242424242424242424242424242424242424C3C3C3F8F8F8F8
+      F8F8595959242424242424242424242424242424242424242424242424242424
+      242424242424242424242424242424242424242424818181F8F8F8F8F8F8F8F8
+      F824242424242424242424242424242424242424242424242424242424242424
+      2424252525252525252525252525252525252525252525242424242424242424
+      2424242424242424242424242424242424242424244C4C4CF8F8F8F8F8F8EBEB
+      EB4C4C4C2424242424242424244C4C4CEBEBEBF8F8F8F8F8F881818124242425
+      25242727272727272A292A2B2B2B2D2D2D232323232323232323232323232323
+      2423242B2C2B2C2C2B2C2C2C2B2B2B2C2C2B2B2B2C2C2B2B2B2B2B2B2B2B2B2B
+      2B2B2B2A2B2A2A2B2A292B2A2A2A292A2A2A292A292929292929292929292929
+      2929282828282828282828282828282828282828282828282827282827282827
+      2827262726272726262726262726262626262626262626262626262626262626
+      2626262626262626262626262625262625262525262525252425252426242425
+      2424252424242324242423232324232323232323232323232323242423242323
+      2323232324232424242324242525252524252626252626252626262727262828
+      272928282928292A28282A2A292A29292B2A2A2A2A2A2A2A2A2B2B2B2B2B2B2B
+      2A2B2A2A2B2A2A2A292A2A292929292A292A2A29292929292929282829292928
+      2829282828292829282828282827282727282828272728282727272727272727
+      2726262627272726262626262526262525252526262526252426252425252425
+      2424252323242424242324242323242323232323222323222323222323222222
+      2222222222221D1E1E1D1C1D1D1C1D1C1C1D1D1E1E2626263534353A3A393E3D
+      3D4242423E3E3E1B1B1B1B1B1B1B1B1B1B1B1B1A1A1A1A1A1A191A1A1A1A191A
+      1A191A19191A1919191919191918191919181819181918181818181818181818
+      1718181717171718171717171717171717171617161616161616171616161516
+      1616161615161616151515151515151515151515141414141514141414141413
+      1414141414131413131413131313131413131313131313131312121212121312
+      1212121212121111121211112D2B2B1111113030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2D2D2D2C2C2C2B2B2B2A2A2A
+      2929292828282727272727272626262525252525252424242424242424242424
+      249C9C9CFAFAFAFAFAFADFDFDFC4C4C4C4C4C4D2D2D2FAFAFAFAFAFAFAFAFAFA
+      FAFAEDEDED5A5A5A242424242424242424242424242424242424242424242424
+      2525252525252525252525252525252525252525252525252525252525252525
+      2525252526262625252525252525252525252525252525252525252525252525
+      2525252525252525252525252525252525252525252525252525252525252525
+      2525252525252525252525252525252525252424242424242424242424242424
+      24242424242424242424A9A9A9FAFAFAFAFAFAFAFAFAFAFAFAFAFAFAB7B7B78F
+      8F8F8F8F8F8F8F8FC4C4C4FAFAFAFAFAFAFAFAFAFAFAFAFAFAFA9C9C9C242424
+      242424242424242424242424242424242424242424C4C4C4FAFAFAFAFAFA5A5A
+      5A24242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424313131C4C4C4FAFAFA8F8F8F242424
+      2424242424242424242424242424242424242424242525252525252525252525
+      2525252525252525252525252525252525252525252525252525252524242424
+      2424242424242424242424242424242424242424C4C4C4FAFAFAFAFAFAEDEDED
+      9C9C9C5A5A5A9C9C9CEDEDEDFAFAFAFAFAFAEDEDED3131312424242625262727
+      272828292A2B2A2C2C2C2A2A2A2222222323232323232323232424242727272D
+      2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2D2D2C2D2C2C2C2C2C2C2C2C2C2C2B2B2B
+      2B2B2B2B2B2A2B2A2A2B2A2A2A292A2B2A2A2A29292929292929292929292929
+      2928292928292928282828282929282929282828282828282728282727282727
+      2727272727282727272727272727272727272727262726262727272626262626
+      2627262726262626262526252626252625252525252625252525252525252524
+      2425242424242424242424242424242424242524242423242424242423242424
+      2424242424242424252525252626252625272626272726282827282828292828
+      2A29292B292A2A29292B2B2A2B2B2A2B2A2A2B2B2B2B2B2B2B2B2B2B2A2A2A2A
+      2A2B2A2A2A2A2A2A2A2A2A2A2A292A292A292A2A292929292928282928292828
+      2929282928282829282828272828282828272728282827272727272727272626
+      2727272626262727262626252626252626252525252625252524242524252524
+      2424242424232423242423232323232322232322232323232222232323222222
+      22221F1F1F1D1C1D1D1D1D1D1C1D1D1D1E2221223434343938393D3E3E414241
+      4545441E1E1E1B1B1B1B1B1B1A1A1B1A1A1B1A1A1A1A1A1A1A1A1A191A1A1A19
+      19191A1919191919191919181918181918191818181819181818181818181818
+      1818171717171717171717171617171617171616171716161616161616161616
+      1515161516161515161515151515151514151515151415141414151414141414
+      1414131414141314131413141313131413131313131312121212121213121212
+      12121212121211122B2D2D111111303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      302F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2D2D2D2C2C2C2B2B2B2A2A2A29292928
+      2828272727272727262626252525252525242424242424242424242424C5C5C5
+      FBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBE0E0E04C4C
+      4C24242424242424242424242424242424242424242425252525252525252525
+      2525252525252525252525262626262626262626262626262626262626262626
+      2626262626262626262626262626262626262626262626262626262626262626
+      2626262626262626262626262626262626262626262626262626262625252525
+      2525252525252525252525252525252525252525242424242424242424242424
+      242424242424242424676767EEEEEEFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFB
+      FBFBFBFBFBFBFBFBFBFBFBFBFBFBFBFBE0E0E067676724242424242424242424
+      2424242424242424242424242424242424C5C5C5FBFBFBFBFBFB5A5A5A242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424252525252525252525252525252525252525252525
+      2525252525252525252525252525252525252525252525252525252525252424
+      242424242424242424242424242424243F3F3FE0E0E0FBFBFBFBFBFBFBFBFBFB
+      FBFBFBFBFBFBFBFBFBFBFBEEEEEE6767672424242525252627272828282A292A
+      2C2C2B2D2D2D2525262424242323242424242424242424242C2C2C2E2D2D2E2D
+      2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2C2D2C2C2C2C2C2C2B2B2B
+      2C2B2B2B2B2B2B2A2B2B2B2A2A2A2A2A2A2A2A2A2A2A2A292929292929292929
+      2929292929292929292929292929292929292929282829272928282928282726
+      2727272828282728272827272727272727272727272727272727272727272727
+      2727272727272727262626262626262626262626262625262526262525252525
+      2625242525242424242525252424242425242424242424242424252524242424
+      242525252626262626262627262726262827272828282929292929292A29282B
+      2A2A2B2A2A2B2A2B2B2A2A2B2A2B2B2B2B2B2B2B2B2B2A2B2A2B2A2B2A2A2A2A
+      2A2B2A2A2A2A2A2A2A2A2A2A292929292A292929292929292929292929282828
+      2829282828282828282828282828282827282828282727282727272726262727
+      2727262626262625262625262625262625262525262524252524252424252424
+      2424232324232323242423242323232323232323232223232322222222222221
+      221D1D1D1D1D1D1C1D1D1C1D1D1E1E1F3232323838373B3B3C40403F43444429
+      28281B1B1B1B1A1B1A1B1A1B1A1A1B1B1B1A1A1A1A1A1A1A1A1A1A1A1A1A1A19
+      191A1919191A1919191819181919181819181819181818191818181818181717
+      1717171817171817171717171717171717161716161616161616161616161616
+      1515151515151515151515151515151515141514141515141515141414141414
+      1314141314141413131313131313131313131313131212121212131312131212
+      121112122D2B2D11111130303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030303030303030303030302F2F2F
+      2F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C2C2B2B2B2A2A2A2929292828282828
+      28272727262626252525252525252525242424242424242424C7C7C7FDFDFDFD
+      FDFDFDFDFDFDFDFDFDFDFDFDFDFDD4D4D4ABABAB686868242424242424242424
+      2424242424242424242424242525252525252525252525252525252626262626
+      2626262626262626262626262627272727272727272727272727272727272727
+      2727272727272727272727272727272727272727272727272727272727272727
+      2727272727272727272727272727272727272626262626262626262626262626
+      2626262625252525252525252525252525252524242424242424242424242424
+      2424242424242424323232838383D4D4D4FDFDFDFDFDFDFDFDFDFDFDFDFDFDFD
+      FDFDFDFDFDFDD4D4D47676762424242424242424242424242424242424242424
+      242424242424243232325A5A5AD4D4D4FDFDFDFDFDFD5A5A5A24242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2425252525252525252525252525252525252526262626262626262626262626
+      2626262626262626262626262626252525252525252525252525252525252525
+      242424242424242424242424242424323232ABABABFDFDFDFDFDFDFDFDFDFDFD
+      FDFDFDFDC7C7C74D4D4D2424242424242626262828282929292B2B2B2D2C2D2C
+      2C2C2323232424242424252424252525242627262E2E2D2E2E2E2F2E2E2E2E2E
+      2D2E2E2D2E2D2E2E2D2E2D2E2E2E2D2D2D2D2D2E2D2D2D2D2D2D2D2D2D2B2C2C
+      2C2C2B2B2C2B2B2C2A2B2B2A2B2B2B2A2A2A2A2B2A2A2A2A2A2A2A2A2A2A2929
+      2A292A2A29292A292A2A2A2929292929292A2928282828242424212121222122
+      2425252928282829282828282828282728282828282727272727272727272728
+      2727272727272726262627262627262526262627262626252526252526242525
+      2524252525252525252525252525252525252525242525252525262626262626
+      2726262727272727272828272928282928282929282A2A292A29292A2A2A2B2A
+      2A2C2B2B2B2B2B2B2A2B2C2B2B2B2B2B2B2B2B2B2A2B2A2A2B2B2B2A2A2B2A2A
+      2A2A2A2A2A2A2A29292A2A2A29292A292929292A292929282929282929282929
+      2829282829282828282728282727282827282727282727282727272727272626
+      2626262527262526262526262525252526252526242425252425242424242424
+      23242323232324232424232323232323232323232222222322222222231D1D1D
+      1D1D1D1D1C1D1D1D1D1D1E1E2B2B2B3636363B3B3B3F3F3E4342423333331B1B
+      1B1B1B1B1B1A1B1A1B1B1A1A1A1B1A1A1A1A1B1A1A1A1A1A191A1A1A19191A19
+      191A191919191919181818191819181918181918181818181818171817171718
+      1717181717171717171717161616171617161717171616161616161615161516
+      1515161616151615151515151515151514151414141514141414141414141414
+      1414141413131413131313131313131312131313121213131313121212121212
+      2D2D2D1212123030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303030303030302F2F2F2F2F2F2F
+      2F2F2E2E2E2E2E2E2D2D2D2C2C2C2B2B2B2A2A2A292929282828282828272727
+      2626262626262525252525252424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424252525252525252525252525252525262626262626262626262626272727
+      2727272727272727272727272828282828282828282828282828282828282828
+      2828282828282828282828282828282828282828282828282828282827272727
+      2727272727272727272727272727272727272727272727272727262626262626
+      2626262626262525252525252525252525252525252424242424242424242424
+      242424242424242424242424243F3F3F5B5B5B8484849191918484845B5B5B32
+      3232242424242424242424242424242424242424242424242424242424242424
+      2424243F3F3FFEFEFEFEFEFEFEFEFEFEFEFE5B5B5B2424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424252525252525252525
+      2525252525252626262626262626262626262727272727272727272727272727
+      2727272727272726262626262626262625252525252525252525252525252524
+      24242424242424242424242424242424243232325B5B5B5B5B5B5B5B5B323232
+      2424242424242424242525252828282929292A2A2A2C2C2C2E2E2E2727272324
+      232524242524252525252525262525252929292F2E2E302F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2E2E2F2E2E2E2E2E2F2E2E2E2E2E2E2E2E2E2D2D2D2D2D2C2D2C2C
+      2D2C2C2C2B2C2D2C2C2C2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2A2B
+      2A2A2A2A2B2B2A2A2B2A2A2A2A27272723232322212221222222222122222223
+      2322262626282928282928282828292828292928282829292828292928282829
+      2828282828282828272827272827262827262726272726262726272726262626
+      2626262625262625262625252526262626262626262527272726272727272727
+      27272828282828282929282A29282A29292B2A292B2B2A2B2A2B2C2B2A2C2B2B
+      2C2A2A2B2A2A2C2B2B2B2C2B2B2B2B2B2B2B2A2B2A2A2A2B2B2A2A2A2B2A2A2A
+      2A2A2A2A2A2A2A2A2929292A2A29292A29292929292928292929292928282828
+      2828292828282828282828272828272727272827272727272727272726262626
+      2726252726252626252625252625242525242525242524242524242424242323
+      242424242324232323232423232323232323232323222322221E1E1F1E1E1D1D
+      1D1D1D1D1D1D1E1E2627273535353939393D3E3E4242423C3C3C1B1C1B1B1B1B
+      1B1B1C1A1B1B1A1B1B1B1A1A1B1A1B1A1A1A1A1A1A1A1A191A1A1A191A1A1919
+      1919191919191919191819181918191819181818181818181818181817181817
+      1717171717171717171617171717161616161616161617161616161615151615
+      1616161615161515151515151515151415151414151414141414141414141314
+      141314131314131314131313131313121313131212121212121213122D2D2D12
+      1212303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030302F2F2F2F2F2F2F2F2F2E2E
+      2E2E2E2E2D2D2D2C2C2C2B2B2B2B2B2B2A2A2A29292928282827272727272726
+      2626252525252525252525242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242525252525
+      2525252525252526262626262626262627272727272727272727272728282828
+      2828282828282828282828282828282828282828292929282828282828282828
+      2828282828282828282828282828282828282828282828282828282828282828
+      2828282828282828282828282828282828282827272727272727272727272726
+      2626262626262626252525252525252525252525252525242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424848484C8C8C8C8C8C8C8C8C85B5B5B242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242525
+      2525252525252525252525252525252525252525252525252525252526262626
+      2626262626272727272727272727272727272727272727282828282828272727
+      2727272727272727272626262626262626262525252525252525252525252424
+      2424242424242424242424242424242424242424242424242424242424242424
+      24242424242626262A2A2A2A2A2A2C2C2C2D2D2D2F2F2F303030272726252525
+      2526262526252626262627262726272A2A2A3030303130303030303030303030
+      303030303030302F302F30302F2F302F2F2F2F2E2E2E2E2E2D2E2D2D2E2D2C2D
+      2D2D2D2C2C2C2C2C2C2B2C2B2B2C2B2B2C2B2C2B2B2B2B2B2A2B2B2B2B2A2B2A
+      2B2B2B2A2A292524262323232323232323232323232223232323232322232223
+      2224232327272729292929292929292929292929292929292928292828292828
+      2828282828282828282828272727272727282727272727272727272727272626
+      2727262726272626262627262727272726272727272728272728272928292828
+      282929282929292929292B2A2A2B2B2A2B2B2A2B2A2A2C2B2B2C2B2A2B2B2B2D
+      2B2C2C2B2C2B2C2B2B2C2C2B2B2B2B2B2B2B2B2B2B2B2B2A2B2B2A2A2A2A2A2A
+      2A2A2A292A29292A2A292929292A292929292829292929292929292929282828
+      2928282828282828282727282728272727272727272727272727272626262626
+      2625272626272625262525252525252525252524252424242424242424232323
+      2424242324232323242323232323232223232223231F1F201D1D1D1D1D1D1C1D
+      1D1E1D1E222122343534393A393D3D3D4141414545451E1E1F1B1B1C1B1B1B1B
+      1B1B1B1B1B1A1B1A1B1B1B1B1B1B1A1A1B1A1A1A19191A191A1A1A191A1A1A19
+      1919191919191819191918181818191818181818181817181817171718181717
+      1717171717171716171617161716161616161617161616161615161616161615
+      1515151615151515151515151515151514151514141415141414141413131414
+      1413131413141313131313131313131313121312121313132D2D2D1212123030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030302F2F2F2F2F2F2E2E2E2E2E2E
+      2D2D2D2D2D2D2C2C2C2B2B2B2A2A2A2929292828282828282727272626262626
+      2625252525252525252524242424242424242424242424242424242424242424
+      2424242424242424242424242424242424252525252525252525252525252525
+      2626262626262727272727272727272828282828282828282828282929292929
+      292929292929292929292929292A2A2A2A2A2A2A2A2A2A2A2A29292929292929
+      2929292929292929292929292929292929292929292929292929292929292929
+      2929292929292929292929292828282828282828282828282727272727272727
+      2726262626262626262625252525252525252525252525252524242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424252525252525252525252525252525252525252525252525252525252525
+      2525252525252525252525252525252525252626262626262626262727272727
+      2727272728282828282828282828282828282828282828282828282828282828
+      2828272727272727272727262626262626262626252525252525252525252525
+      2424242424242424242424242424242424242424242424242424242424242424
+      242525252929292B2B2B2C2C2C2E2E2E2F2F2F31313131323228282826262626
+      26262626262727272727272727272B2B2B323131313131313131313131313131
+      3131303131313130313130303030302F302F302F2E2F2F2E2F2E2E2F2E2E2D2D
+      2D2D2D2D2D2D2D2D2C2C2C2D2C2C2D2C2D2D2C2C2C2C2C2B2C2C2C2C28282825
+      2525232424232323232423232323232323232323232323222323232323232323
+      2323232423232727272A29292A2A2929292A2A29292A292A292A292A29292929
+      2929292829282829282828282728272728272728282727272727272728272828
+      28282727282727272828272828282828282828282929292829292A29292A2929
+      2A2A292B2A2A2B2A2A2B2B2B2B2B2A2D2B2B2C2B2C2C2B2B2C2B2B2C2C2C2C2C
+      2C2C2C2C2B2B2B2B2B2B2B2B2B2B2B2A2B2B2B2A2A2A2A2A2A2A2A2A2A2A2A29
+      2A2A292A2A292A29292A2A292929292929292929292928282928282828282828
+      2828282828282727282728272727272728272728272727262727262726262626
+      2526262526252526252525252425252425252524252424252424242423242324
+      24242323232323242423232323232323232222221E1D1D1D1D1D1D1D1D1D1D1D
+      1F1F1F3332323737373C3C3D4040404444442929291B1B1B1B1B1C1B1B1B1B1B
+      1B1B1B1B1B1A1B1B1B1A1A1B1A1A1A1B1A1A1A1A1A1A19191A1A191A191A1A19
+      1919191819191918191918181819181818181818181817181718171817181817
+      1718171717171717171716161717171616161616161616161615161615151516
+      1615161515151515151515141415151514141414141514141413141414141413
+      1314131413131413131313131213121312121212302D2D121212303030797979
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030302F2F2F2F2F2F2E2E2E2E2E2E2E2E2E2D
+      2D2D2C2C2C2B2B2B2A2A2A2A2A2A292929282828272727272727262626262626
+      2525252525252525252525252424242424242424242424242424242424242424
+      2424242425252525252525252525252525252525252526262626262626262627
+      27272727272828282828282828282929292929292929292A2A2A2A2A2A2A2A2A
+      2A2A2A2A2A2A2A2A2A2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2A2A2A2A2A
+      2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A
+      2A2A2A2A2A2A2A2A292929292929292929282828282828282828272727272727
+      2727272626262626262626262525252525252525252525252525252424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242424242424242424242424
+      2424242424242424242424242424242424242424242525252525252525252525
+      2525252525252525252525252525252525252525252525252525252525252525
+      2525262626262626262626262626262626272727272727272727282828282828
+      2828282929292929292929292929292929292929292929292929292929292828
+      2828282827272727272727272726262626262625252525252525252525252525
+      2525252525242424242424242424242424242424242424252525252525252525
+      2525252B2B2B2D2D2D2F2F2F303030313131333333333233292A2A2828282727
+      282828282828292828282828292C2D2C33323232323233333333333332313232
+      313231313132313131313131313130303030302F302F2F2F2F2F2F2E2E2F2E2E
+      2E2E2D2E2E2E2E2D2E2D2D2D2E2D2E2D2D2D2B2B2B2626262524252525252525
+      2425242425252524242524242424242424242424242424242323232324242324
+      23232323232423232726272828292B2B2B2B2B2B2A2B2A2B2B2A2A2A2A2A2A29
+      292A292929292A29282A29292928282928282928282828282828282828282928
+      292929282928292929292929292929292929292929292A2B2B2B2A2A2B2B2A2B
+      2B2A2C2B2B2C2B2B2C2C2B2C2B2B2D2C2B2C2B2B2D2C2C2D2C2C2C2C2B2C2C2C
+      2C2B2C2B2B2B2B2B2B2B2B2B2B2A2B2A2B2B2A2A2B2B2A2A2A2B2A2A2A2A2A2A
+      2A2A292929292929292929292929292929292929282829292829282828292929
+      2828282828282828272727282828272827272727272726272626272625262626
+      2625252725252625252625252525242524242424242524242424242423242424
+      242423242323232323232323222322231D1D1E1E1D1D1D1D1D1D1D1D1E1E1E2C
+      2B2B3736363B3B3B3F3F3F4343433333331C1C1C1C1B1B1B1B1B1B1C1B1B1B1B
+      1B1B1A1A1B1B1B1A1B1B1B1A1B1A1A1A1A1A191A1A1A191A19191919191A1919
+      1919191919191918181818181918181918181817181718171717171718171717
+      1717171717171716171617161716161617161616161616161616161616161615
+      1515161515151515151515141415141414151414141414141414141413141413
+      141314131314131313131313121313122D302D12131230303079797930303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030302F2F2F2F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2C2C
+      2C2B2B2B2B2B2B2A2A2A29292928282828282827272727272726262626262625
+      2525252525252525252525252525252525252525252525252525252525252525
+      2525252525252525252525252626262626262626262727272727272828282828
+      282828282929292929292A2A2A2A2A2A2A2A2A2B2B2B2B2B2B2B2B2B2B2B2B2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B
+      2B2B2B2B2A2A2A2A2A2A2A2A2A29292929292929292928282828282827272727
+      2727272727262626262626262626252525252525252525252525252525252525
+      2525252525252525252525252525252525252525252525252525252525252525
+      2525252524242424242424242424242424242424242424242424242424242424
+      2424242424242424252525252525252525252525252525252525252525252525
+      2626262626262626262626262626262626262626262626262626262626262626
+      262626262727272727272727272727272828282828282828282929292929292A
+      2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A292929292929292929
+      2828282828282727272727272626262626262626262525252525252525252525
+      2525252525252525252525252525252525252525252525252525252526262627
+      27272D2D2D2F2F2F313131323232343433343434353535282929282829282829
+      292929292A2A292A292929292D2D2D3333333434343434343333333333333232
+      32323332333232313231313130313130313030313030302F2F302F2F2F2F2E2F
+      2E2F2F2E2F2E2E2E2E2D2E2A292A252525252525252525252525252525262526
+      2526252525252626262525252525252525252525252525252525252524242424
+      242424242424242424242424252928292A2A2A2C2C2C2B2B2B2C2B2A2B2B2A2B
+      2A2A2B2A2A2B292A2A2A292A29292A2A29292A292929292929292A2A2A2A292A
+      2929292A29292A2A2A2A2A2A2A2A2A2B2A2B2A2B2A2B2C2B2C2B2B2C2C2B2C2B
+      2B2C2B2A2C2C2C2D2C2B2C2B2C2D2B2C2D2C2C2D2C2C2D2C2C2C2B2B2C2C2B2C
+      2C2C2B2B2B2B2B2B2B2B2B2B2B2B2B2B2A2A2B2A2A2A2A2A2A2A2A2A2A2A2A2A
+      292A292A2A292A292A292A292929292929292929292829292929282928282828
+      2828282828282827282827272727272727272627262627262626262626262526
+      2625262525262525252425252425242424252424252425242423232423232424
+      2423232324232323232323231F1F1F1D1E1E1D1D1E1E1D1D1E1E1E2727273535
+      36393A3A3E3E3E4342423D3D3D1C1C1B1B1C1B1B1C1C1B1B1C1B1B1B1B1B1B1B
+      1B1A1B1B1A1A1A1A1A1A1B1B1A1A1A1A1A191A1A1A191A1A1A191A1A19191919
+      1919191919191818181819181819181818181818181718181717171718181717
+      1717171717171717171717161616171716161616161616161516151616161515
+      1515151515151515151415151515141415151414141414141314131414131413
+      1413131313131313131313133030301212123030307979793030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030302F2F2F2F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2D2D2D2C2C2C
+      2B2B2B2A2A2A2A2A2A2929292828282828282727272727272626262626262626
+      2625252525252525252525252525252525252525252525252525252525252526
+      2626262626262626262626272727272727272727282828282828292929292929
+      2A2A2A2A2A2A2B2B2B2B2B2B2B2B2B2B2B2B2C2C2C2C2C2C2C2C2C2C2C2C2C2C
+      2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C
+      2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2B2B2B
+      2B2B2B2B2B2B2B2B2B2A2A2A2A2A2A2929292929292828282828282828282727
+      2727272727272726262626262626262625252525252525252525252525252525
+      2525252525252525252525252525252525252525252525252525252525252525
+      2525252525252525252525252525252525252525252525252525252525252525
+      2525252525252525252525252525252526262626262626262626262626262626
+      2626272727272727272727272727272727272727272727272727272727272727
+      2727272828282828282828282828282929292929292A2A2A2A2A2A2A2A2A2B2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2A2A2A2A2A2A29292929292928
+      2828282828282828272727272727262626262626262626252525252525252525
+      2525252525252525252525252525252525252626262626262626262727272828
+      282F2F2F3131313232323434343535353636363434352B2B2B2A292A292A292B
+      2B2B2B2A2A2A2B2B2A2B2A2D2D2D353434353535353535343434343433343434
+      3334333333333232323233313332313231313131313130303030303030302F30
+      302D2D2D2727272627272627262626262626262626262727272726272627272A
+      2A2B3534353434352D2D2D272727262526262626262526252626252625262526
+      2525252525252525252525252425252626262A2A2A2C2C2C2C2C2B2C2C2B2C2B
+      2B2C2B2B2C2A2B2B2A2B2B2B2A2B2A2A2A2A2A2A2A2A2B2B2B2B2A2B2B2B2B2A
+      2B2A2B2B2B2B2B2B2B2B2B2B2B2B2C2C2C2B2C2C2C2D2C2D2C2B2C2B2B2D2C2C
+      2D2C2B2D2C2B2C2B2C2D2C2C2E2C2C2D2C2C2D2C2C2C2C2B2C2C2C2B2C2C2B2C
+      2C2B2B2B2B2B2B2B2B2B2B2B2B2B2A2A2A2A2A2A2B2A2A2A2A2A2A2A2A2A2A29
+      2A29282929262627262626292929292929282929282828292829282828282828
+      2828282828272727272728272727262727262726262726262626262625252625
+      2526252526252525252524242525242524252424242424242424232323242324
+      2323232323232323201F201E1D1E1D1D1E1E1E1D1F1E1E2222233535353A3939
+      3D3E3E4141414545461F1F1F1C1C1C1B1C1C1C1C1B1B1B1B1B1B1B1B1B1B1B1A
+      1B1B1B1B1B1A1B1B1A1A1A1B1A1A1A19191A19191A1A19191A191A1A1A191919
+      1919191919191819181819181818181818171818171817181817181817171817
+      1717171716161616161616171617161616161615151515161616151615151515
+      1615151515151514151414141414151414141413141413141414141313131313
+      1413131313131313303030131213303030797979303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030302F2F2F2F2F2F2E2E2E2E2E2E2E2E2E2D2D2D2C2C2C2C2C2C2B
+      2B2B2A2A2A2A2A2A292929282828282828272727272727262626262626262626
+      2626262626262626262626262626262626262626262626262626262626262626
+      262727272727272727272828282828282929292929292A2A2A2A2A2A2A2A2A2B
+      2B2B2B2B2B2C2C2C2C2C2C2C2C2C2C2C2C2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D
+      2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D
+      2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2C2C2C2C2C2C2C2C2C2C
+      2C2C2B2B2B2B2B2B2B2B2B2A2A2A2A2A2A292929292929282828282828282828
+      2727272727272727272626262626262626262626262626262626262525252525
+      2525252525252525252525252525252525252525252525252525252525252525
+      2525252525252525252525252525252525252525252525252525252525252525
+      2525252626262626262626262626262626262727272727272727272727272727
+      2727272727272727272727272727272728282828282828282828282828282828
+      28282929292929292929292A2A2A2A2A2A2B2B2B2B2B2B2B2B2B2B2B2B2C2C2C
+      2C2C2C2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2B2B2B2A2A2A2A2A2A2929292929
+      2928282828282827272727272727272726262626262626262626262626262626
+      2626262626262626262626262626262626272727272727272727282828292929
+      3131313333333434343535353737373837383737372D2D2D2B2B2B2B2B2B2C2B
+      2C2C2B2B2B2C2B2C2C2B2D2D2E35343435353535353535353535343435353434
+      35343433333333323333323332323332323231313231313030302B2A2B282827
+      272727272827272828272727282828282828292929292A2A3535343939393939
+      3939393939393935353530303028282826272726272626272626272726272627
+      26272726262626262626262625262929292D2D2D2D2D2C2D2D2D2D2C2C2D2C2C
+      2D2C2C2C2C2C2C2B2B2C2B2B2C2B2B2B2B2B2B2B2B2B2B2B2C2C2C2B2C2C2B2C
+      2B2B2C2B2C2C2C2C2C2C2C2C2C2D2D2D2C2D2C2D2C2B2D2D2C2D2C2C2D2C2C2D
+      2C2C2E2D2D2D2D2D2D2C2C2E2D2C2D2C2C2D2C2C2C2B2C2C2C2B2C2B2C2B2B2C
+      2C2B2C2B2B2C2B2B2A2B2A2A2B2B2B2A2A2B2B2B2A2828282726272424252424
+      2324242323232326252529292929292929292928292928282828282828282828
+      2827282728282727272727272726272626262626262626272626262525262625
+      2625252525252525252424252425252524242524242424242424242423232324
+      242423232222221D1E1E1D1E1D1E1D1D1E1D1D1F1F1F3333333838383D3D3D40
+      41404444452929291C1C1C1C1B1C1C1C1C1B1C1C1C1B1C1B1B1B1B1B1B1B1A1B
+      1B1A1A1B1A1B1A1A1A1A1A1A1A1A1A1A19191A191A1A19191919191919191919
+      1919181919191818181818181818181817181718181817181717171718181717
+      1717171717161716161616161716161616161516151516161515151515151516
+      1515151515151514151415141514141414141414141414141414131314141313
+      1313141330303013131230303079797930303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030302F2F2F2F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2D2D2D2C2C2C2B2B2B2B2B
+      2B2A2A2A29292929292928282828282828282827272727272727272726262626
+      2626262626262626262626262626262626272727272727272727272727282828
+      2828282828282828282929292929292A2A2A2A2A2A2B2B2B2B2B2B2C2C2C2C2C
+      2C2C2C2C2D2D2D2D2D2D2D2D2D2D2D2D2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+      2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+      2E2E2E2E2E2E2E2E2E2E2E2E2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2C2C
+      2C2C2C2C2B2B2B2B2B2B2B2B2B2A2A2A2A2A2A29292929292928282828282828
+      2828272727272727272727272727262626262626262626262626262626262626
+      2626262626262626262626262626262626262626262626262626262626262626
+      2626262626262625252525252525252525252525252526262626262626262626
+      2626262626272727272727272727272727282828282828282828282828282828
+      2828282828282828282828282828282828282828282929292929292929292929
+      292A2A2A2A2A2A2B2B2B2B2B2B2B2B2B2C2C2C2C2C2C2C2C2C2C2C2C2D2D2D2D
+      2D2D2C2C2C2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2B2B2B2A2A2A292929292929
+      2828282828282828282727272727272727272727272626262626262626262626
+      262626262727272727272727272727272828282828282828282929292B2B2B33
+      3333353535363636373737383837393A3A3938382F2E2F2C2C2B2B2B2C2C2C2D
+      2C2C2C2D2C2C2C2C2C2D2C2E3434343636363636363636353535363535353535
+      343535343534343433333433333332322E2E2E2A292A29292929292929282929
+      28292A2A292929292A2A2A2B2B2B3333333B3B3B3C3C3C3D3D3D3D3D3D3D3D3D
+      3B3B3B3A3A3A3939393737373131312929292728282727282828272827272727
+      272727272727272726272929292F2E2E2E2F2D2E2E2E2F2E2D2E2D2D2E2D2D2E
+      2D2D2D2C2C2D2C2D2C2C2C2C2C2D2C2C2C2C2C2C2D2D2D2D2C2C2D2C2D2C2C2C
+      2C2C2C2E2D2D2D2D2D2D2C2D2E2E2D2D2E2D2E2D2C2D2C2C2D2C2C2E2D2D2E2D
+      2D2E2C2D2E2D2D2D2C2C2D2D2C2D2C2C2C2C2C2C2C2C2C2B2C2C2C2C2C2B2B2B
+      2B2B2A2A2A292929282727262626242524242424242424242424232324232323
+      2424232323232525252929292829292928292828292828282828282828282828
+      2828272727272727272727262627262626262627262527262526252626252525
+      2525252425242524252524252424242524242424242424242424232423232324
+      2323231E1E1E1E1E1E1D1E1E1D1E1E1E1E1E2C2C2C3737373C3B3C3F3F404444
+      433433331D1C1C1C1C1C1C1C1C1B1C1B1B1C1C1B1C1B1B1B1B1B1B1B1B1B1B1B
+      1B1B1A1A1A1A1A1A1A1A1A1A1A1A1A191A1A191A191A191A1A19191919191919
+      1818181918181918181919181818171818181718181718181717171817171717
+      1716171616171616161716161617161616161616151616161515151515161515
+      1515151514151514141514151414141415141414131414131313131414141313
+      3030301312133030307979793030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      303030303030303030303030303030303030303030303030303030303030302F
+      2F2F2F2F2F2F2F2F2F2F2F2E2E2E2E2E2E2D2D2D2D2D2D2C2C2C2B2B2B2B2B2B
+      2A2A2A2A2A2A2929292929292828282828282828282727272727272727272727
+      2727272727272727272727272727272728282828282828282828282829292929
+      29292929292A2A2A2A2A2A2B2B2B2B2B2B2C2C2C2C2C2C2C2C2C2D2D2D2D2D2D
+      2D2D2D2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+      2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+      2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2D2D2D2D2D2D2D2D2D
+      2C2C2C2C2C2C2B2B2B2B2B2B2B2B2B2A2A2A2A2A2A2929292929292828282828
+      2828282828282827272727272727272727272727272727272727272727272727
+      2727272727272727272727272727272727272727272727272727262626262626
+      2626262626262626262626262626262626262626262626262727272727272727
+      2727272728282828282828282828282829292929292929292929292929292929
+      29292929292929292929292929292929292A2A2A2A2A2A2A2A2A2A2A2A2B2B2B
+      2B2B2B2B2B2B2C2C2C2C2C2C2C2C2C2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D
+      2D2D2D2D2D2D2D2D2D2D2C2C2C2C2C2C2B2B2B2B2B2B2A2A2A2A2A2A29292929
+      2929282828282828282828282828272727272727272727272727272727272727
+      2727272828282828282828282828282929292929292A2A2A2A2A2A2C2C2C3535
+      3536363638383838383839393A3A3B3A3A3B3B2F2F2F2D2D2D2C2D2C2D2C2D2D
+      2C2D2C2C2D2C2D2C2D2C2D333333373737373737363636363535363636353535
+      3535353534343433322C2C2D2A2A2A2A2A2A2A2A2A2A292A2A292A2B2A2B2A2B
+      2A2C2B2B2F2E2E3A3B3A4040404040404242424242424141414040403E3E3E3C
+      3C3C3B3B3B3939393939393939393433342E2D2D282828272727282728272727
+      272727272727262627303030302F2F302F2F302F2E2F2E2E2F2E2E2F2E2E2F2E
+      2D2E2E2E2D2E2E2D2D2D2D2E2D2D2D2D2D2D2D2D2D2D2E2E2E2D2D2D2E2D2D2E
+      2E2E2E2E2E2E2E2E2E2D2E2E2D2D2E2D2D2E2D2C2E2E2D2E2D2D2E2D2D2D2D2D
+      2D2C2D2D2D2D2D2D2C2D2C2C2B2B2B2B2B2B2929292828272726272525262625
+      2625252625242424252524242424242424242424242424242424242324242323
+      2423232324252525292929282929292929292829282828282828282828282828
+      2727272827272727262726272726262626262726252725262626252625262525
+      2524252525242425242524242524242424242424242423242424232423232320
+      1F201E1E1E1D1E1E1D1E1E1E1F1E2728283636363A3A3A3E3E3E4242423D3D3D
+      1C1C1D1C1C1C1C1C1C1B1C1C1B1C1B1C1C1B1B1B1B1B1B1B1B1B1B1B1B1B1B1A
+      1A1A1B1B1A1A1A1A1B1A1A1A1A191A1A191A1919191919191919191919191919
+      1818191818181918191818181818171718181717181817171717171817171717
+      1717161616161616161617161616161616161615161515161515151515151515
+      1514141515141414141414151414141414141414131413141314131332303013
+      1413303030797979303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030302F2F
+      2F2F2F2F2F2F2F2E2E2E2E2E2E2E2E2E2D2D2D2D2D2D2C2C2C2B2B2B2B2B2B2A
+      2A2A2A2A2A292929292929292929282828282828282828282828282828282828
+      2828282828282828282828282828282929292929292929292929292A2A2A2A2A
+      2A2B2B2B2B2B2B2B2B2B2C2C2C2C2C2C2D2D2D2D2D2D2E2E2E2E2E2E2E2E2E2E
+      2E2E2E2E2E2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2D2D2D2D2D2D2D
+      2D2D2C2C2C2C2C2C2B2B2B2B2B2B2B2B2B2A2A2A2A2A2A292929292929292929
+      2828282828282828282828282828282828282828282828282828282828282828
+      2828282828282828282828282827272727272727272727272727272727272727
+      2727272727272727272727272727272727272727272727282828282828282828
+      2828282929292929292929292A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A
+      2A2A2A2A2A2A2A2A2A2A2A2A2A2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2C2C2C2C
+      2C2C2D2D2D2D2D2D2D2D2D2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+      2E2E2E2D2D2D2D2D2D2C2C2C2C2C2C2B2B2B2B2B2B2B2B2B2A2A2A2A2A2A2929
+      2929292929292928282828282828282828282828282828282828282828282828
+      28282929292929292929292A2A2A2A2A2A2A2A2A2B2B2B2B2B2B2E2E2E363636
+      3838383939393A3A3A3B3B3B3D3C3D3C3C3C3131302E2E2E2E2E2D2E2D2D2E2E
+      2D2D2D2E2E2E2D2D2D2D32313137373737373737373737363736373635353531
+      30302B2B2B2B2C2C2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2C2B2C2E2D2D383738
+      4141414344434545454747474747474747474545454343434141413E3E3E3C3C
+      3C3A3A3A3A3A3A39393938393939393A36373731313128292928292828282828
+      28282828282E2E2E30302F302F2F2F2F2F302F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2E2F2E2E2E2F2E2F2E2E2E2E2E2E2E2E2E2E2D2E2D2E2E2E2E2E2F2E2E
+      2E2E2E2E2E2E2E2E2E2D2D2D2D2F2E2E2E2D2D2F2D2D2F2D2E2E2D2D2E2D2D2E
+      2D2D2B2B2B262526262526262526262526262526262526262525252525262526
+      2525252525252525252524252524252424242424242424242323242424232324
+      2423242325252428282829292929292928292829282828282828282828282727
+      2827272727272626272626272626272626272626262626262526252525252525
+      2524252425252425242525252424242424242424242424242424232020201E1E
+      1E1E1E1E1E1E1E1F1E1E2323233536353A3A3A3E3E3E4242424546451F1F201C
+      1D1C1C1C1C1C1C1C1B1C1C1C1B1C1B1B1C1B1B1B1B1B1B1B1B1B1B1B1B1A1B1B
+      1A1A1A1A1B1A1A1A1A1A1A1A1A1A1A1A191A191A19191A191819191919191918
+      1918181818191819181818181818171817171817181818171717171817171717
+      1717161716171617161616161616151616161516151616151515151515151515
+      1415151515151514151414141414141414141414141314143030321413133030
+      3079797930303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      30303030303030303030303030303030303030303030303030302F2F2F2F2F2F
+      2F2F2F2F2F2F2E2E2E2E2E2E2E2E2E2D2D2D2D2D2D2C2C2C2C2C2C2B2B2B2B2B
+      2B2A2A2A2A2A2A2A2A2A29292929292929292929292929292929292929292929
+      29292929292929292929292929292A2A2A2A2A2A2A2A2A2B2B2B2B2B2B2B2B2B
+      2C2C2C2C2C2C2D2D2D2D2D2D2D2D2D2E2E2E2E2E2E2E2E2E2E2E2E2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2D2D2D2D2D
+      2D2D2D2D2C2C2C2C2C2C2B2B2B2B2B2B2B2B2B2A2A2A2A2A2A2A2A2A29292929
+      2929292929292929292929282828282828282828282828282828282828282828
+      2828282828282828282828282828282828282828282828282828282828282828
+      282828282828282828282828282828282828282828282929292929292929292A
+      2A2A2A2A2A2A2A2A2A2A2A2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2C2C2C2C2C2C2C2C2C2C2C2C2D2D2D2D2D2D2D2D
+      2D2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+      2E2E2E2E2E2D2D2D2D2D2D2C2C2C2C2C2C2B2B2B2B2B2B2B2B2B2A2A2A2A2A2A
+      2A2A2A2929292929292929292929292929292929292929292929292929292929
+      292A2A2A2A2A2A2A2A2A2B2B2B2B2B2B2C2C2C2C2C2C2D2D2D2F2F2F38383839
+      39393B3B3B3B3B3B3C3C3C3D3D3D3E3E3E3433342D2D2E2E2D2E2D2E2D2D2E2D
+      2E2E2E2D2E2E2D2D2D3030303737373737363737363333322D2D2D2B2C2B2B2B
+      2C2C2B2B2B2B2B2C2B2B2C2C2C2C2C2C2D2D2D3333333E3E3E43434346454648
+      49484B4C4B4D4D4D4D4D4D4C4C4C4848483C3C3C4242423E3E3E3C3C3C3B3B3B
+      3A3A3A3A3A3A3A3A3A3A393A3A39393A3B3B2929292929292929292929292828
+      282D2D2D313131313030313030313030302F2F30302F302F2F2F2F2F2F2E2F2E
+      2E2E2F2F2F2F2E2E2F2E2E2E2E2E2F2F2F2F2F2F2F2F2F2F2F2E2F2F2E2E2E2E
+      2E2E2E2F2F2E2E2E2E2F2E2D2E2D2D2F2D2D2E2D2D2E2D2D2E2D2D2E2D2D2928
+      2926252626262626262626252626252626252626252626252625252625252525
+      2525252524242524252425242424242425242424242424242424242424232323
+      2423232425242828282928292829292928282929282828282828272828272827
+      2727262727262728262627262627262626262526262526252525252525252525
+      25252525242525242425242424242424242424242423242222221F1E1E1F1E1E
+      1E1E1E1E1D1E201F203333343939393D3D3D4141414545452A2A2A1C1C1D1D1D
+      1C1C1C1C1C1C1C1C1C1C1C1C1B1B1C1B1B1B1B1B1B1B1B1B1B1A1B1B1B1A1A1A
+      1A1B1A1A1A1A1A1A1A1A1A1A1A19191919191A191A1919191919191918191919
+      1818191818181818181818181818181818171817181717181717171717161716
+      1716161617161616161616161616151616151615161515161515151515151514
+      1515151415141414141514141415141414141414323230141313303030797979
+      7979797979797979797979797979797979797979797979797979797979797979
+      7979797979797979797979797979797979797979797979797979797979797979
+      7979797979797979797979797979797979797979797979797979797979797979
+      7979797979797979797979797979797979797979797979797979797979797979
+      7979797979797979797979797979797979797979797979797979797979797979
+      7979797979797979797979797979797979797979797979797979797979797979
+      7979797979797979797979797979797979797979797979797979797979797979
+      7979797979797979797979797979797979797979797979797979797979797979
+      7979797979797979797979797979797979797979797979797979797979797979
+      7979797979797979797979797979797979797979797979797979797979797979
+      7979797979797979797979797979797979797979797978787878787877777777
+      77777676767575757474747373737272727171717070706F6F6F6E6E6E6D6D6D
+      6C6C6C6B6B6B6A6A6A6A6A6A6A6A6A6969696969696969696969696969696A6A
+      6A6A6A6A6A6A6A6B6B6B6C6C6C6C6C6C6D6D6D6E6E6E6F6F6F70707070707071
+      7171727272737373747474757575757575767676767676777777777777777777
+      7878787878787878787878787878787878787878787878787878787878787878
+      7878787878787878787878787878787878787878787878787878787878787877
+      7777777777777777777777767676767676757575747474747474737373727272
+      7171717070706F6F6F6E6E6E6E6E6E6D6D6D6C6C6C6B6B6B6A6A6A6A6A6A6969
+      6969696969696968686868686868686868686868686868686868686868686868
+      6868686868686868686868676767676767666666666666666666666666666666
+      6666666666666666666767676767676868686969696969696A6A6A6B6B6B6C6C
+      6C6D6D6D6D6D6D6E6E6E6E6E6E6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F70
+      7070707070707070707070707070717171717171727272737373747474747474
+      7575757575757676767676767676767676767676767676767575757575757474
+      747373737272727171717070707070706F6F6F6E6E6E6D6D6D6C6C6C6B6B6B6A
+      6A6A6A6A6A6A6A6A6969696969696969696969696A6A6A6A6A6A6B6B6B6C6C6C
+      6C6C6C6D6D6D6E6E6E6F6F6F7070707171717272727373737979798B8B8B9292
+      929393939494949794979A989A989A9A8B8D8D72757575757272727575727572
+      7272727275717171747474858282797979707070706E70706E706E7070707070
+      6F6F726F6F6F727275777777959595A6A6A6AAAAAAAEAEAEB5B5B5B9BAB9BBBB
+      BBBEBEBEBCBCBC9E9E9E7272726B6E6E767676898B8B9191919191918F8F8F90
+      90909090908D90909191919191907373766769676967676669666666696E6E6E
+      7C7C7C7C7C7B7C7C7B7B7B7B7B78787B78787B78787B78787876787876767678
+      7678767676767679777777777777777777777778757878787875787575757575
+      7575767673767373767373767173737373737171737171717171606062606062
+      606062605D60606062605D60605D60605D60605D606060626260606260606060
+      60606060626262696C6C7979796262625D5B5B5B5B5B5B585B585B58585B5B5B
+      5B585B5D5B656265676767676765656565676565656565656562656262656260
+      65606265626065606062606062606060606060605D605D5D5D5D5D5D5D5D5D5D
+      5D5D5D5D5D5D5D5D5B5B5B5D5B5B5B5B5B5B5B5B585B4B4E4B4E4B4B4B4E4B4B
+      4B4B4E4E4E6E6E718D8D8D9597959E9E9EA7A7A7808383464946494946464646
+      4649464646464646464343434343434643434343434343434343434341414141
+      41414141414141413E413E413E413E41413E3E3E3E3E3E3E3E3D3E3D3D3E3D3E
+      3D3D3D3D3D3D3D3D3A3D3D3D3D3A3D3D3A3D3A3D3D3A3A3A3A3A3A383A3A383A
+      3838383838383838383838383835383838383835353535353535353535353535
+      3532323232323232323232323230323232323213141330303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030302F2F2F2F2F2F2F2F
+      2F2F2F2F2E2E2E2E2E2E2E2E2E2D2D2D2D2D2D2D2D2D2C2C2C2C2C2C2C2C2C2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B
+      2B2B2B2B2B2B2C2C2C2C2C2C2C2C2C2C2C2C2D2D2D2D2D2D2D2D2D2E2E2E2E2E
+      2E2E2E2E2E2E2E2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F30303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      3030303030303030303030303030303030303030303030303030303030303030
+      302F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2E2E2E2E2E2E2E2E2E2E2E2E2D
+      2D2D2D2D2D2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B
+      2B2B2B2B2B2B2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A
+      2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2A29292929292929292929292929
+      29292A2A2A2A2A2A2A2A2A2A2A2A2A2A2A2B2B2B2B2B2B2B2B2B2C2C2C2C2C2C
+      2C2C2C2C2C2C2C2C2C2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D2D
+      2D2D2D2D2D2D2D2D2D2D2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2F2F2F2F
+      2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2E2E2E2E2E2E
+      2E2E2E2E2E2E2D2D2D2D2D2D2D2D2D2C2C2C2C2C2C2C2C2C2B2B2B2B2B2B2B2B
+      2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2B2C2C2C2C
+      2C2C2C2C2C2D2D2D2D2D2D2E2E2E2E2E2E2E2E2E2E2E2E3030303939393C3C3C
+      3C3C3C3C3C3C3E3E3E3F3F3F3F3F3F3B3B3B2F302F2E2F2E2E2E2E2E2F2E2E2F
+      2E2E2E2E2D2D2D2D2E2D2D2D2D2D2D2D2D2D2D2C2C2D2E2E2D2D2E2E2E2E2E2F
+      2F2F3938394242424746464949494B4B4B4F4F4F5151515354535655564D4D4D
+      3636362C2C2C2C2C2C2C2C2C2C2C2C2C2C2C2D2D2D3232323737373838383939
+      393939393A393A3A393A303030292A292A292A2A29292929292C2B2B32313232
+      3231323231323131323131323131313031313030302F303030303030302F2F30
+      2F2F2F302F2F2F302F2F2F2F2F2F2F302F30302F302F302F2F30302F302F302F
+      2E2F2E2E2F2E2E2F2E2D2F2E2E2E2D2D2E2D2E2A2A2A26262726262726262726
+      25262625262726272726272726272827282727282B2A2A2D2E2D313132353535
+      3838383736373736363535362727272525242424232424242324242423242324
+      2424252528282829292829292828292829282828282728282727272628262727
+      2727272626272626272626262626262625252526252526262625252525242525
+      242424242525252424252424242424242424201F1F1F1F1E1E1F1E1E1E1E1F1F
+      1F2828283838383C3B3C4041404444443F3F3F1C1D1D1D1D1C1C1C1C1C1C1C1C
+      1C1C1C1C1C1B1C1C1B1B1B1C1B1C1C1B1B1B1B1B1B1B1B1B1B1B1B1A1B1A1B1B
+      1A1A1A1A1A1A1A1A1A191A1A191A1A191A191919191919191919191819191818
+      1818181918181818181818171818171718181717171717171717171717171717
+      1617171616161616161616151615161615161616151515151515151515141515
+      141515151414151514141414141414141414
+    }
+    Transparent = False
+  end
+  object Label1: TLabel
+    Left = 8
+    Height = 27
+    Top = 264
+    Width = 313
+    Caption = 'Copyright RemObjects Software, 2002-2008. All rights reserved.'#10
+    Font.Color = clWhite
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    ParentColor = False
+    OnClick = OnCloseClick
+  end
+  object lbl_Version: TLabel
+    Left = 253
+    Height = 17
+    Top = 40
+    Width = 11
+    Caption = '[]'
+    Font.Color = clWhite
+    Font.Height = -13
+    Font.Name = 'Tahoma'
+    ParentColor = False
+  end
+  object Label7: TLabel
+    Left = 8
+    Height = 14
+    Top = 280
+    Width = 92
+    Caption = 'Visit our website at'
+    Font.Color = clWhite
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    ParentColor = False
+  end
+  object Label3: TLabel
+    Cursor = crHandPoint
+    Left = 102
+    Height = 14
+    Top = 280
+    Width = 151
+    Caption = 'http://www.remobjects.com/ro'
+    Font.Color = clWhite
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    Font.Style = [fsUnderline]
+    ParentColor = False
+    OnClick = Label3Click
+  end
+  object btn_Cancel: TButton
+    Left = 418
+    Height = 25
+    Top = 272
+    Width = 77
+    Cancel = True
+    Caption = 'btn_Cancel'
+    Default = True
+    Font.Color = clWhite
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    OnClick = OnCloseClick
+    TabOrder = 0
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fROAbout.lrs b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fROAbout.lrs
new file mode 100644
index 0000000..1c911a5
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fROAbout.lrs	
@@ -0,0 +1,10254 @@
+{ This is an automatically generated lazarus resource file }
+
+LazarusResources.Add('TAboutForm','FORMDATA',[
+  'TPF0'#10'TAboutForm'#9'AboutForm'#4'Left'#3'n'#1#6'Height'#3'+'#1#3'Top'#3
+  +#242#0#5'Width'#3#241#1#18'HorzScrollBar.Page'#3#240#1#18'VertScrollBar.Page'
+  +#3'*'#1#13'ActiveControl'#7#10'btn_Cancel'#11'BorderIcons'#11#0#11'BorderSty'
+  +'le'#7#6'bsNone'#7'Caption'#6#20'About RemObjects SDK'#12'ClientHeight'#3'+'
+  +#1#11'ClientWidth'#3#241#1#10'Font.Color'#7#7'clWhite'#11'Font.Height'#2#245
+  +#9'Font.Name'#6#6'Tahoma'#7'OnClick'#7#12'OnCloseClick'#8'OnCreate'#7#10'For'
+  +'mCreate'#8'Position'#7#16'poMainFormCenter'#10'LCLVersion'#6#6'0.9.25'#0#6
+  +'TImage'#6'Image1'#6'Height'#3','#1#5'Width'#3#244#1#8'AutoSize'#9#7'OnClick'
+  +#7#12'OnCloseClick'#12'Picture.Data'#10#18#222#6#0#7'TBitmap'#6#222#6#0'BM'#6
+  +#222#6#0#0#0#0#0'6'#0#0#0'('#0#0#0#244#1#0#0','#1#0#0#1#0#24#0#0#0#0#0#208
+  +#221#6#0#192#30#0#0#192#30#0#0#0#0#0#0#0#0#0#0'00000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000000000000//0/0/00/0/000000//0/0'
+  +'//0/////////////////////.//...//.../.................------..-.--.-.-------'
+  +'------,-,-,-,,,,,,--,,,,,,,+,,,,,,+++++,++++++++++++++++++**++++***********'
+  +'*)*********))))))))))*)))())))()())()(((((((((((''''''''''''(((''''(''''''('
+  +'''''''''''''''''''''''''+++///111333444-,-&&&&%&&%&&%&&&'',*++**,+*+**+**+*'
+  +'********)*)*)))))))))()))())()((()(((((((((''(((''''''''''''''''''''''&''&&'
+  +'''''''''''&&&&&&&&&%&&&&&%%%%%%"""    '#31' '#31' '#31'   ! !---44465555654'
+  +'4000""""""'#30#30#31#29#29#30#30#29#30#29#29#29#29#29#29#29#29#29#29#28#29
+  +#28#28#28#29#29#28#29#28#28#28#28#28#28#28#28#28#27#27#31#31' %%%%%%&&&('''''
+  +')))*+*! !'#26#26#27#26#26#27#26#25#26#26#26#27#26#26#26#26#25#26#27#27#27#29
+  +#29#28#29#28#29#29#28#29#28#29#28#28#28#28#28#28#28#28#27#28#28#27#27#27#28
+  +#28#27#27#27#27#27#27#26#27#27#27#26#27#27#26#27#26#27#26#26#26#26#26#26#26
+  +#26#26#25#26#25#26#25#25#25#25#26#25#25#25#25#25#25#25#25#25#25#24#24#24#24
+  +#24#25#24#24#24#24#24#24#24#24#24#24#23#23#23#23#23#23#23#22#21#20#20#20#20
+  +#20#20#19#20#19#19#20#22#21#21'%%&222888===BCB('''''#17#17#17#17#17#17#17#17
+  +#17#17#16#16#16#17#16#16#17#17#16#16#16#16#16#17#16#16#16#16#16#16#16#15#16
+  +#16#16#16#15#15#15#15#15#15#15#15#15#15#15#15#15#14#15#15#15#14#14#14#15#15
+  +#14#15#14#14#14#14#14#14#14#14#14#13#13#14#13#14#13#13#13#13#13#13#13#13#13
+  +#12#13#13#13#13#12#12#13#13#13#12#13#12#12#13#12#12#12#12#12#12#12#12#12#11
+  +#12#11#12#11#12#12#11#11#11#11#11#11#11#11#11#10#11#11#11#11#11#11#11#11#10
+  +#11#11#10#10#10#10#10#10#10#10#10#10#10#10#9#10#9#9#9#9#9#9#9#10#10#9#9#9#9#9
+  +#9#9#8#9#9#8#9#9#9#8#9#8#8#8#8#8#8#8#8#8#8#8#8#8#7#8#8#8#7#8#8#7#8#8#7#8#7#7
+  +#7#7#7#7#7#7#7#7#6#7#7#6#7#7#6#6#7#7#6#7#7#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6
+  +#6#5#6#6#6#5#6#5#5#5#5#5#6#5#5#5#5#5#5#5#5#4#4#5#5#4#5#4#4#5#4#5#5#4#4#5#4#4
+  +#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#4#4#4#3#4#4#3#4#3#3#3#3#3#3#3#3#3#3#3#3#3
+  +#3#2#3#3#3#3#2#3#3#2#3#2#2#3#2#3#2#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2
+  +#1#2#1#2#2#2#1#2#2#2#1#2#2#1#1#1#2#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#0
+  +#1#0#0#0#1#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0'000yyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyy'
+  +'yyyyyyyyyyyyyyyyyyyyyyyvyvyyvyvyyyvvyvyyvvvvvvyyvvvvvvvvvvsvvvvvsvvvvvvvvvs'
+  +'ssssvsssssssssssssssssssssqsqqqqqqsqqqqqqqqqqqqqqqqqnqnnnnqnnnqqnnnnnnnnnln'
+  +'llnnllnlnlllnlnnllllllliiillllliilliiiiiiiiiigigigiggggigiggggggggggggggegg'
+  +'eggeegeeeegeeeeeeeeeeebbbbbbbbbbebbbbbbbbbnnnvvv{{{'#128#128#128#131#131#131
+  +'gii````]b`]``]`eeenlllllliilliliiliiliiiiiigiggiigigiggggggggggegegegeeeeee'
+  +'eebebbbeeebebebbbbbbbbbb`bb`bbb`````]```]]````]]`]]PPSPPPPPPPNPPPPXX['#128
+  +#128#128#131#128#131'~'#128#128'~~'#128'yy{vvyqssqqqnlnlnlbbbbbb][][X[PSSKKN'
+  +'FIFFFFCFFKKI]]]```bbbeeeggglllUUUCCCAACA>CAACAAAA>CCCFIIIIIIFIIIIFFFIFFFFFF'
+  +'FFCFFFFFCCCCCCCCCCACACACACCAAAAAAAAA>AAA>AAA>>A>AA>=>>>>===>>=>=======::=::'
+  +'888522222222022::8egg'#131#128#128#143#143#144#156#156#156#169#169#169'KNN-'
+  +'+-+++-++++++((+++(+((+(+(((((((((&((&&&&(&&&&&&&#&&&&##&######&##### #### #'
+  +'             '#30'  '#30#30' '#30#30#30#30#30#30#30#30#30#30#30#30#27#30#30
+  +#30#30#27#30#27#27#30#27#27#27#27#27#27#27#27#27#27#27#27#27#27#25#27#27#25
+  +#25#25#25#25#25#27#25#25#25#25#25#25#25#25#25#22#22#25#25#22#22#22#22#22#22
+  +#22#22#22#22#22#22#22#22#20#20#20#22#20#22#20#20#20#20#20#20#20#20#20#20#20
+  ,#20#20#20#20#18#20#18#20#20#20#18#20#18#18#20#18#18#20#18#18#20#18#18#18#18
+  +#18#18#18#18#18#18#18#18#15#15#15#18#18#18#15#15#15#18#15#15#18#15#15#15#15
+  +#15#15#15#15#15#13#15#15#15#13#15#13#15#13#13#13#13#13#13#13#13#13#13#13#13
+  +#10#13#13#13#10#13#13#10#10#13#10#10#10#10#10#10#10#10#10#10#10#10#10#10#10
+  +#10#10#10#10#10#10#10#10#10#8#10#10#8#8#8#8#10#10#8#8#8#10#8#8#8#8#8#8#8#8#8
+  +#8#8#8#5#8#8#8#8#5#8#8#5#8#5#5#8#8#5#8#8#5#8#5#5#5#5#5#8#8#5#5#5#5#5#3#5#5#5
+  +#5#3#5#3#5#3#5#5#3#3#5#5#3#3#3#5#3#3#3#5#3#5#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3
+  +#3#3#0#3#0#3#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0'000yyy00000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000/00/00///00//0///////00///0/////.////...//.///./'
+  +'/..../.............-.-....-.-----...---..--------,,,--,-,,---,,,,,,,,,,,,,+'
+  +',,,,+++,,,,+++++++++++++**+++++*++*+***+******)*)***)*)*)))))*)))*))))))())'
+  +')))((((()((((((((((''''''(((''''(('''''''''''''''''''''',,,///111333555***&'
+  +'&&&&''&&&&%''*)),++,++,*+,+++**+**+***)****)*))**))))))))(())))(())))((()(('
+  +'(''((((((''(''(''''''''''''''''''''''&''''&&&''&&''&&&&&&&&&&&&%%%&#"#    '
+  +#31'  '#31#31' !  !!)))222122110011///......--,,-,++++++++++++*++*)**))&&''#'
+  +'##&&&(((((''((()**+++%%%'#27#26#28#27#26#28#27#26#27#26#26#28#26#26#27#26#26
+  +#27#27#26#26#29#29#30#29#29#29#29#29#29#29#29#29#29#29#29#29#28#29#29#29#28
+  +#28#28#28#28#28#28#28#28#28#28#28#28#27#27#28#27#28#28#27#27#27#27#27#27#27
+  +#27#26#27#27#27#26#26#27#26#26#27#27#26#26#26#26#26#26#26#26#26#25#26#25#25
+  +#26#25#25#25#25#25#25#25#25#25#25#24#24#24#25#25#24#24#25#24#24#24#24#24#24
+  +#24#23#23#23#22#23#20#21#21#20#20#20#20#20#20#21#21#21#24#24#24'/./444:::@@@'
+  +'EEE'#21#20#21#18#18#18#17#17#17#17#17#18#17#17#18#17#17#17#17#17#17#17#16#16
+  +#17#17#17#16#17#16#16#16#16#16#16#16#16#15#16#15#15#15#15#15#16#15#15#15#15
+  +#16#15#15#15#15#14#15#15#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#14#14#14#13#14#14#13#13#13#13#13#13#14#13#13#13#13#13#12#12#13#13#13#13
+  +#13#12#12#12#13#13#12#12#12#12#12#12#12#12#12#12#12#11#12#11#11#12#12#12#11
+  +#11#11#11#11#11#11#11#11#10#10#11#11#11#11#10#10#10#10#10#10#10#10#10#10#10
+  +#10#10#10#10#10#9#10#9#10#9#9#9#9#10#9#9#9#9#10#9#9#9#9#9#9#9#9#9#9#9#8#8#8#8
+  +#8#9#8#9#8#8#8#8#8#8#8#8#8#8#7#8#8#7#8#8#8#7#7#7#7#7#7#8#7#7#7#7#7#7#7#7#7#7
+  +#6#7#6#7#6#7#7#6#7#7#6#7#6#6#6#6#6#6#6#6#5#6#6#6#6#6#5#6#6#6#5#5#6#6#5#6#6#5
+  +#5#5#5#5#5#5#5#5#5#5#5#5#5#5#4#4#5#5#4#5#5#4#4#4#4#5#5#4#4#4#4#4#4#4#4#4#4#4
+  +#3#4#4#4#4#4#4#3#4#3#4#3#3#3#3#3#3#3#3#3#3#3#3#3#2#2#3#3#3#3#3#3#2#3#2#3#3#2
+  +#2#3#2#3#3#2#3#2#2#2#2#3#2#2#2#2#2#2#2#2#2#2#1#1#2#1#2#2#2#1#2#2#1#1#2#2#1#1
+  +#1#1#1#1#1#1#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1#0#1#1#1#1#0#1#0#0#0#1#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy000000000000000'
+  +'0000000000000000000000000000000000000000000000000000000000000000000000/00/0'
+  +'000000///0///////////0////0/////////////...///./../...............-.-.--.-.'
+  +'--.-..-..------------,,-,,,--.332///,,,,,,,,++,,,++++,,,+++,+++++++++++++++'
+  +'+**+****++**********)****)*)*))))))))))))))))))()())()()((((((((''(''(('''''
+  +'''((''''''''''''''''''''...///111333555''&''&&''&%''&&&&%''*)),++,++,*+,++,'
+  +'*+++*+++++***)***))*)))))))))))))()(((())(((()(((((''((((((''(((''''('''''''
+  +'''''''&''''''''&&''''&&&&&&&&&&%&&%%&%%  !       '#31'  ! !!!001011100011//'
+  +'0...../...---,--,,-,,,,,,+++*++*+***))*))))))(*****+,++&%%'#27#27#28#27#27
+  +#28#26#26#27#27#27#27#26#27#27#26#27#27#27#27#27#30#30#29#30#30#30#30#29#29
+  +#29#29#29#29#29#29#29#29#28#29#29#29#29#28#29#29#28#28#29#28#28#28#28#28#28
+  ,#28#28#28#28#27#27#28#27#27#28#28#27#27#27#27#27#27#27#27#27#26#26#26#27#27
+  +#27#26#27#26#26#26#26#26#26#25#26#25#26#26#26#26#25#25#26#26#25#25#25#25#25
+  +#25#25#25#24#25#24#24#24#25#24#24#24#24#24#24#24#23#23#22#21#21#20#21#20#20
+  +#21#20#20#20#20#21#22#21#26#26#26'//.455:;:@@ABBB'#18#18#18#18#18#18#18#18#18
+  +#18#17#17#17#18#18#18#17#17#17#17#17#17#17#16#17#16#17#16#17#16#16#17#17#16
+  +#16#16#16#16#16#16#16#16#16#15#15#15#15#16#15#16#15#15#15#16#15#15#15#15#15
+  +#15#15#14#15#14#15#14#15#14#14#15#14#15#14#14#14#14#13#14#14#13#14#13#14#14
+  +#14#13#13#13#13#13#13#13#13#12#13#13#13#13#13#13#12#12#13#12#12#12#12#12#12
+  +#12#13#12#12#12#12#12#11#12#11#12#12#11#12#12#11#11#11#12#11#11#11#11#11#11
+  +#11#11#11#11#11#10#10#10#10#10#10#10#11#10#10#10#10#10#10#9#10#10#10#9#10#10
+  +#9#9#9#10#9#9#9#9#10#9#9#9#9#9#8#8#9#9#9#9#8#8#8#8#9#8#8#8#8#8#9#8#8#8#8#8#8
+  +#7#8#8#8#7#8#7#8#8#7#7#8#7#7#7#7#7#7#7#7#7#7#7#7#6#6#7#6#7#6#6#7#6#6#6#6#7#6
+  +#7#6#6#6#6#6#6#6#6#6#6#6#5#6#6#6#5#6#5#5#5#5#6#6#6#5#5#5#5#5#5#5#5#5#5#5#5#5
+  +#4#4#5#5#5#4#4#4#5#4#5#4#5#4#4#4#4#5#4#4#4#4#4#4#4#4#4#4#4#4#3#4#3#3#3#3#3#4
+  +#3#3#3#3#3#4#3#3#3#3#3#3#3#3#3#3#3#2#3#2#2#3#2#2#3#3#3#3#2#3#2#3#2#2#2#2#2#3
+  +#2#2#2#2#2#2#2#2#2#2#1#2#2#2#2#2#2#2#2#2#2#1#1#2#1#1#1#2#1#1#1#1#1#1#1#1#1#1
+  +#1#1#1#1#1#1#0#1#0#0#1#1#0#1#1#1#0#1#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy0000000000000000000000000000000000000000000'
+  +'0000000000000000000000000000000000000000000000/000000/00000/0000//00///////'
+  +'///////////.//.//..././../..../.../............--------.---.----------,.-.3'
+  +'34555777555000,,,++,+,++,,++++,,+,+++,+++++++++*+*++***+++**++******)**)***'
+  +'***))))*))))))))))())())()((()(()((((''''(((''''''((''''''''''''''''''...//'
+  +'/111333555%%&&&''&&&&&''&%&+*+,++,,+,+++*+,++,*++*++*************))**)**)))'
+  +')))())())))((((((((((''((((''''''''''(''(''''''''''''&&&''''&''&''''''&&&&&'
+  +'&%&%%&&&&&###            '#31'  ()(111111001//0/00..../....-..--.----.-,,,,'
+  +',,,,+++++++++++++++++,,)))'#28#28#29#28#28#28#27#27#28#27#26#28#27#27#27#27
+  +#27#27#28#27#28#30#30#30#30#30#30#29#30#30#30#30#30#30#29#29#29#30#29#29#29
+  +#29#29#29#28#29#28#29#29#28#29#28#28#29#28#28#28#28#28#28#28#28#28#27#28#28
+  +#27#28#28#27#27#27#28#27#27#27#27#27#27#26#27#27#26#27#26#26#26#27#26#26#26
+  +#26#26#26#26#26#25#26#25#25#26#26#25#26#25#25#25#25#25#25#25#24#25#24#25#25
+  +#25#24#24#24#24#24#24#24#24#23#22#22#22#21#20#21#20#21#21#20#21#21#21#21#21
+  +#29#29#30'000666;<;AAA888'#18#18#18#18#18#18#18#18#18#17#17#18#18#18#17#17#17
+  +#17#17#17#17#17#17#17#17#16#17#16#16#16#17#17#17#16#17#16#16#16#16#16#16#16
+  +#16#16#16#15#16#16#15#15#15#16#16#15#15#16#15#15#15#15#15#15#15#14#14#15#15
+  +#14#15#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#13#13#14#13
+  +#13#13#13#13#13#13#13#13#13#12#13#12#12#12#13#12#13#12#13#12#12#12#12#12#12
+  +#12#12#12#12#11#12#11#11#11#11#11#12#12#11#12#11#11#11#11#11#10#11#11#11#10
+  +#10#11#11#10#10#10#10#10#10#10#11#10#10#10#10#9#10#10#10#10#10#9#10#10#9#9#10
+  +#9#9#9#9#9#9#9#9#9#9#9#8#8#8#9#8#8#9#8#8#9#8#8#8#8#8#8#8#8#8#8#8#7#8#7#8#7#8
+  +#7#8#7#8#7#7#7#7#8#7#7#7#7#7#7#6#7#7#7#6#7#7#7#7#7#7#6#6#6#6#7#6#6#6#6#6#6#6
+  +#6#6#6#6#6#6#5#6#5#6#6#6#5#6#5#6#5#5#5#5#5#5#5#5#5#5#4#5#5#5#4#5#5#5#4#4#5#4
+  +#5#4#4#4#4#5#4#4#4#4#4#4#4#4#3#4#4#3#3#4#4#3#4#4#4#4#3#3#4#3#4#3#3#3#3#3#3#3
+  +#4#3#3#3#3#3#3#3#3#3#3#3#3#2#3#3#2#3#2#2#2#2#3#3#3#3#3#2#2#2#2#2#2#2#2#2#2#2
+  +#2#2#2#2#1#2#1#2#2#2#2#1#2#2#1#2#2#2#2#1#1#2#1#2#1#1#2#1#1#1#1#1#1#1#1#1#1#1
+  +#1#1#1#1#1#0#0#0#1#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0'000yyy000000000000000000000000000000000000000000000000000000000000000'
+  ,'0000000000000000000000000000000000//00000//0////00/0///0/////////////./////'
+  +'/...././...../.../..........-..-.-.-----.-------///333444666777999:::777000'
+  +',,,,+,,,,+,+,,,,,+++++,++++++++*++*+*+*++*+********))***)*)))**))))))))))))'
+  +'))))()((()()(()((((''(''(''(''(''((''''''(((/..000222444444%%&&&''&&''&&''&'
+  +'%&+++,,+,++,++,+++++,+++*+++*+*****)**))*))*))*))))))))))()))))((((((()(('''
+  +'((((''(''''''''''''''''''''''''''''''&''&&''&''''&&''&&&&&&&%%&%%%  !      '
+  +'    '#31#31'   ))(+**,,,**+**+//0//0////././/...----.----,-,-----,,,,,,,---'
+  +'**)'#29#28#30#27#27#28#27#27#28#27#27#28#27#27#27#27#27#28#27#28#27#31#30#30
+  +#30#30#31#30#30#30#30#30#30#29#30#30#30#29#30#29#29#29#30#29#29#29#29#29#28
+  +#29#29#29#29#29#29#29#28#28#28#28#28#28#28#28#28#28#28#28#28#27#27#28#27#27
+  +#28#27#27#27#27#27#27#27#27#27#26#27#27#26#27#27#26#27#27#26#26#27#26#26#26
+  +#25#26#26#25#26#26#25#26#25#25#25#25#25#25#25#25#25#25#25#25#25#24#24#25#25
+  +#24#24#24#24#24#22#22#22#21#21#21#21#20#21#20#20#20#21#22#22'###111777>>>CCB'
+  +'332'#19#18#18#19#18#18#17#18#18#18#17#18#18#17#17#17#18#17#17#18#17#17#17#17
+  +#17#17#17#17#17#16#17#16#16#16#16#16#16#16#16#16#16#16#16#16#16#16#15#16#16
+  +#16#16#16#15#16#15#15#15#16#15#16#15#15#15#15#15#15#14#14#15#14#15#14#15#14
+  +#14#15#15#14#14#14#14#14#14#14#14#14#14#14#14#13#13#14#13#13#13#13#13#13#14
+  +#13#13#13#13#13#13#13#12#12#13#12#13#12#13#13#12#12#12#12#12#12#12#12#12#11
+  +#12#11#11#11#12#12#11#11#12#11#12#11#11#11#11#11#11#11#10#11#11#10#11#11#10
+  +#11#10#10#10#10#10#10#10#10#10#10#9#10#10#9#10#10#10#10#10#9#9#10#9#9#9#10#9
+  +#9#9#9#9#9#9#8#9#9#8#9#8#9#9#8#8#8#8#9#8#8#8#8#8#8#8#8#7#8#7#7#8#8#7#7#8#7#8
+  +#7#7#7#7#8#7#7#7#7#7#7#7#7#7#6#7#6#6#6#6#6#7#6#6#6#7#7#6#6#6#6#6#6#6#6#6#6#5
+  +#6#5#6#5#5#6#5#6#6#6#6#5#5#5#5#5#5#5#5#5#5#5#5#4#5#4#4#5#4#5#5#5#5#4#4#4#5#4
+  +#4#4#5#4#4#4#4#4#4#4#4#4#4#4#4#3#4#4#4#3#4#3#3#3#4#3#3#3#3#3#3#4#3#3#3#3#3#3
+  +#3#3#3#3#3#3#3#3#3#2#2#3#2#3#3#2#2#2#2#3#2#2#2#2#2#2#2#2#3#2#2#2#2#2#2#2#2#2
+  +#2#2#2#2#2#2#2#1#1#1#1#1#1#2#1#2#1#1#2#1#1#1#1#1#1#1#1#1#2#1#1#0#1#1#1#0#1#1
+  +#0#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0000000000000000000000/00000///0////00///0////////////./////./..././.../...'
+  +'.........-..-...--.-----.----.///222333555777888999:::;;;;;;777000,,,,,,,++'
+  +'++,,+++,+++++++*++*+*****+*+***************)**)*)*)*))))))))))))))))))))(()'
+  +'(((((((((''''(''(''('''')**...000222444222%%&&&''&&''&&''&&'',,+-,,,++,,+,+'
+  +'+,++,++,*+++++++******)*****))*)))))**)))))))))))(()(()((((((''(((((('''''''
+  +'(''(''''''''''''''&''&&&&''&''&&&&&&&&&%&&&#"#!!   !   '#31'  '#31' '#31' '
+  +#31#31' '#31' '#31' '#31#31#31#31#31#31#30#30#30#30#30#31#30#31#31' #"#""#%%'
+  +'%''&''*))..-...--...----.--,-,'#29#29#30#27#28#29#28#28#28#27#28#28#28#27#28
+  +#27#27#28#28#28#28#31#31#30#30#30#31#31#30#30#30#30#30#30#30#30#30#30#30#30
+  +#30#30#29#30#29#30#30#29#29#30#29#30#29#29#28#29#28#28#29#29#29#29#29#29#28
+  +#29#28#28#29#28#28#28#28#28#28#28#28#27#27#27#28#27#28#28#27#27#27#27#26#27
+  +#27#27#27#26#26#27#26#26#27#27#27#26#26#26#26#26#26#26#25#25#26#25#26#25#25
+  +#25#25#26#25#25#25#25#25#25#24#25#25#24#24#25#24#24#21#22#21#21#21#21#21#21
+  +#21#21#20#20#22#22#22'%%%222999>>>DCC-,-'#18#18#18#18#19#18#18#19#18#18#18#18
+  +#18#18#18#18#17#17#17#18#17#18#18#17#17#18#17#17#17#17#17#17#17#16#16#16#16
+  +#17#16#16#16#16#16#17#16#16#16#16#15#16#16#16#16#15#16#15#16#16#16#15#15#15
+  +#15#14#15#15#14#15#15#15#15#14#14#15#15#14#14#14#14#14#14#14#14#14#14#13#14
+  +#14#14#13#13#13#13#13#14#14#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#11#12#11#11#12#11#11
+  +#11#11#12#11#11#11#11#11#11#11#11#10#10#11#10#11#11#10#10#10#10#10#10#10#10
+  +#10#10#10#10#9#10#10#10#9#9#10#10#9#9#9#9#9#9#9#9#9#9#9#8#8#8#9#8#8#8#9#8#8#8
+  +#9#8#9#8#8#8#8#8#8#7#8#8#8#8#7#7#8#7#7#7#8#7#7#7#7#7#7#7#7#7#7#7#7#7#7#7#7#7
+  +#6#7#7#7#6#7#6#6#6#6#6#6#6#6#6#6#6#5#6#6#6#6#6#5#5#5#5#6#6#5#6#5#5#5#6#5#5#6
+  +#5#5#5#5#5#5#5#4#5#5#5#4#4#4#4#4#5#5#4#5#5#4#4#4#5#4#4#4#4#4#4#4#4#4#4#3#3#4
+  +#3#4#4#4#4#4#4#4#4#3#4#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#2#3#3#3#2#2#3#2#3#3#3
+  +#2#2#3#2#3#2#2#2#2#2#3#2#3#2#2#2#2#2#2#2#2#2#2#1#2#2#1#1#2#2#2#1#2#1#1#1#1#1
+  +#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1#1#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy00000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000/0000000//0/'
+  +'0////0///////////.//.//.///.////......//...........-.-..---.----/0022233344'
+  +'4666888999:::;;;;;;<<<;;;;;;656.-.+,+++,+,,,++++,++++++++++++++*******++***'
+  +'****)*****))*))))**)))))))))))))())))()(((((((''((''''((('')))/./0013224442'
+  +'22&&''&&''&&''&&''&&''-,,,,+-++,,+,+,,++,++,+*++++++*************)*))))))))'
+  +'))))))()))())((((()(((((''(''''(''''''(''(''''''(''''''''''''''''''''''&''&'
+  +'&&''&&&&&%&&&%% !! !        '#31#31' '#31#31'  '#31#31#31' '#31#31#31#31#30
+  +#31#31#31#31#30#31#30#30#30#30#31#30#30#30#30#30#30#30#30#30#30#30#29#29#29
+  +#29#29#29#30#30#31'"""%%$''('')*)   '#28#29#29#28#28#29#28#27#29#28#27#28#27
+  +#28#29#28#27#28#30#30#30#31#31#31#31#31#30#31#31#31#30#30#30#30#30#30#30#30
+  +#30#30#30#30#29#30#30#29#29#30#30#29#29#29#29#29#29#29#29#29#29#29#29#29#29
+  +#28#29#28#29#28#28#28#28#28#28#28#27#27#28#27#27#28#27#27#28#28#28#27#27#27
+  +#27#27#27#27#27#27#27#26#27#27#26#26#26#27#26#26#26#26#26#26#26#26#26#26#26
+  +#26#26#26#25#26#25#25#25#25#25#25#25#25#25#24#24#24#24#23#22#21#21#21#21#21
+  +#21#22#21#21#21#21#24#24#23')((444999@@@EDE   '#18#18#18#18#19#19#19#19#18#18
+  +#18#18#18#18#18#18#18#18#17#18#17#18#17#17#18#18#17#17#17#17#17#17#17#17#17
+  +#17#17#17#17#16#17#17#16#16#17#16#16#16#16#15#15#15#16#16#16#16#16#16#16#15
+  +#15#16#15#15#15#15#15#15#15#15#15#15#15#15#15#14#15#14#15#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#13#14#14#13#13#13#13#13#14#13#13#13#13#13#13#12#12
+  +#12#13#13#12#13#12#13#12#12#13#12#12#12#12#12#12#11#12#12#12#11#12#12#12#11
+  +#12#11#11#11#11#11#11#11#11#11#10#11#11#11#11#10#10#11#10#10#10#11#10#10#10
+  +#10#10#10#10#10#9#10#10#10#10#9#9#10#10#9#9#10#9#9#9#10#9#9#9#9#9#8#9#9#8#9#9
+  +#8#9#9#8#9#9#8#9#8#8#8#8#8#8#8#7#8#8#8#7#8#7#8#8#7#7#8#7#7#7#7#7#7#7#7#7#7#7
+  +#7#7#7#7#7#7#6#7#6#7#6#7#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#5#6#6#5#6#5#6
+  +#5#5#6#5#5#5#6#5#5#5#5#5#5#5#5#5#5#5#5#5#4#5#5#4#5#4#5#4#4#4#4#4#4#4#4#4#4#4
+  +#4#4#3#4#4#4#4#4#4#3#4#3#3#3#3#4#3#3#3#4#4#3#3#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3
+  +#3#3#2#2#3#3#2#2#2#3#2#2#2#2#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2#2#1
+  +#2#1#1#2#1#2#2#1#1#1#1#1#1#1#1#1#2#1#1#1#0#1#1#0#0#0#1#0#1#0#0#1#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000/00000000'
+  +'0000/0/00000//////0/////////////////../..//.../...//..........--..-.-0/0222'
+  +'433544666888999;;;;;;<<<<<<<<<<<<<<<;;;;;;554...,,,+,++++++++,++++++***+++*'
+  +'*+++**************)*))))*)*)))*)))))))))))())()()()((((((((((''(+*+../01032'
+  +'3444---&&''&&''&&''&&''''''''-,,,,+-+,-++,++-++,++,+++++++++++++***+****)**'
+  +')**)))))))))))))))))(()())((((((((((''((''''(''''''''''''''(''''''''&'''''''
+  +'''&&&&&&''&&&%&&%%#"# !!   ! !   '#31'       '#31' '#31#31#31#31#31#31#31#31
+  +#31#31#31#30#30#31#31#31#31#30#31#31#30#30#30#30#30#29#29#30#29#29#30#29#29
+  +#29#30#29#29#30#29#29#29#29#29#29#29#29#29#29#29#29#28#29#29#28#28#29#28#28
+  +#29#28#28#28#27#27#28#30#30#31#31'  '#31#31' '#31#31#31#31#31#30#31#31#31#31
+  +#30#30#31#30#31#30#30#30#30#30#30#30#30#29#30#30#30#30#29#29#29#29#30#29#29
+  +#29#28#29#29#29#28#29#28#28#28#28#28#29#28#28#28#28#28#28#28#27#28#28#28#28
+  +#28#28#27#27#28#28#27#27#27#26#27#27#27#27#26#27#27#26#27#27#27#26#26#27#26
+  +#26#26#26#25#26#26#26#26#25#25#25#25#25#25#25#25#25#25#25#25#24#24#24#22#21
+  +#22#22#21#21#21#21#21#22#22#23#25#25#25'.-.444:::@@@EEE'#25#25#25#18#19#19#19
+  +#19#19#18#19#19#18#18#18#18#18#18#18#18#18#18#18#18#18#17#17#17#18#17#17#18
+  ,#17#17#17#17#17#17#17#16#16#16#16#17#17#16#16#16#17#16#16#16#16#16#16#16#16
+  +#16#16#16#16#16#16#16#16#15#15#15#16#15#15#15#15#15#15#14#15#15#15#15#14#15
+  +#15#14#14#14#14#14#14#14#13#14#14#14#14#13#13#13#14#13#13#14#14#13#14#13#14
+  +#13#13#13#13#13#13#12#13#13#13#13#12#12#12#12#12#13#12#12#12#12#12#12#12#12
+  +#12#11#12#11#12#11#11#12#11#11#11#11#11#11#11#11#11#11#11#11#11#11#11#11#11
+  +#11#11#11#11#10#10#10#10#10#10#10#10#10#10#10#10#10#9#10#10#10#10#10#9#10#9
+  +#10#9#10#9#9#9#9#9#9#9#9#9#9#9#9#9#8#9#9#9#9#8#8#8#8#8#8#8#8#8#8#8#8#8#7#7#7
+  +#8#7#7#8#7#7#8#8#7#7#8#7#7#7#6#7#7#7#6#7#7#6#6#7#7#7#6#7#7#6#7#6#6#7#6#6#6#6
+  +#6#6#6#6#6#6#5#6#5#5#6#5#5#5#5#6#6#6#5#5#5#6#5#5#5#4#5#4#4#4#5#5#5#4#5#5#5#4
+  +#5#5#5#4#4#4#5#4#4#4#4#4#5#4#4#4#4#4#4#3#4#3#4#3#3#4#4#4#4#3#3#4#4#4#3#4#3#3
+  +#4#3#3#3#4#3#3#2#2#3#3#3#2#3#3#3#3#3#2#2#3#3#3#3#2#3#2#2#2#2#3#2#3#2#3#2#2#2
+  +#2#2#2#2#2#2#2#2#2#2#2#1#2#2#2#1#2#1#1#1#2#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1
+  +#1#0#1#1#1#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy0000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000/00//00/00000/00///0/0/////////////////./////..//'
+  +'./............-.-110332344544667988;::777212:::<<<<<<<<<<<<<<<<<<<<<:;;;;;5'
+  +'44...+++++,,++++++++++++++++***+****+***********)))**)**))))*)))))))))))))('
+  +'()((((((((((((+++///111333444...&&''&&''&&''&&''(((-,,-,,-,,,,+,,,,++,+,,++'
+  +',+*++*++****+**+******))*)*)****))*)))))))(()(((((())((((((((((((''((''((('
+  +'''''''''''''''&''''&&&''&&&&&&&&&&&%%!!!     !         '#31'    '#31#31#31
+  +#31#31'  '#31#31#31#31#30#30#31#31#31#30#30#30#30#30#30#30#30#30#30#30#30#30
+  +#30#30#30#30#30#30#29#30#29#29#29#29#29#29#29#28#29#29#29#29#28#28#29#28#29
+  +#29#28#28#29#28#28#29#30#29#30'   '#31#31#31#31#31#31#31#31#31#31#31#31#31#31
+  +#31#31#31#30#31#30#30#31#30#30#30#30#30#30#30#30#29#30#30#30#29#30#29#30#29
+  +#29#29#29#29#29#29#29#29#29#29#29#29#28#28#28#29#29#28#28#28#28#28#28#28#28
+  +#27#27#28#28#27#28#27#27#27#27#28#27#27#27#27#27#27#27#27#27#26#27#26#26#27
+  +#26#26#26#26#26#26#26#26#26#26#26#26#25#26#26#25#25#25#25#25#25#26#23#23#23
+  +#21#22#22#22#21#22#22#22#22#22#23#22#26#27#26'///555;;;@@@EEE'#19#19#19#18#19
+  +#19#18#19#19#19#18#19#18#18#19#18#18#18#18#19#18#18#18#18#18#17#18#17#18#18
+  +#17#18#17#17#18#17#17#18#17#17#16#17#17#17#17#16#17#16#16#16#16#16#17#17#16
+  +#16#16#16#16#16#15#16#16#15#16#15#16#15#16#16#15#16#15#15#15#15#15#15#15#15
+  +#15#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#13#13#14#14#13#14
+  +#14#14#13#13#13#13#13#13#13#12#13#13#13#13#13#13#12#12#12#12#13#12#12#12#12
+  +#12#12#12#12#12#11#12#12#11#12#11#11#11#12#11#12#11#11#11#11#11#11#11#11#11
+  +#10#11#11#11#11#11#11#10#11#10#10#10#10#10#10#10#10#10#10#10#10#10#10#9#10#10
+  +#9#10#10#9#9#9#9#9#9#10#9#9#9#9#9#8#8#9#9#8#9#8#9#9#9#8#8#9#8#8#8#8#8#8#8#7#7
+  +#8#7#8#7#7#8#7#8#7#8#7#7#7#7#7#7#7#7#7#7#7#7#7#7#7#7#7#6#6#6#6#7#6#7#6#7#6#6
+  +#6#6#6#6#6#6#6#5#6#5#6#5#6#6#6#6#6#6#5#6#5#5#6#5#5#6#5#5#5#5#5#5#5#5#5#5#4#4
+  +#5#5#4#4#5#4#4#4#4#4#5#5#4#4#4#4#4#4#4#4#4#3#4#4#3#4#4#4#4#4#3#4#3#3#4#4#3#4
+  +#4#3#3#3#3#3#3#3#3#3#2#3#3#3#3#3#3#3#3#3#3#2#2#2#2#3#2#3#2#3#2#2#3#2#3#3#3#2
+  +#2#2#2#2#2#2#2#1#2#2#2#2#2#1#2#2#2#2#2#1#1#2#1#1#1#2#1#1#1#2#2#1#1#1#1#1#1#1
+  +#1#1#1#1#1#1#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000//0//00//0////////0///.////..////////'
+  +'/./..././.........110233434555777988:::556+++,,,,,,222;;:======<<<<<<<<<<<<'
+  +'<<<;:;;::555.--+,+++++++*+++++++++*+*+***++************))))*)))))))))))))))'
+  ,')))(())(((()((((((,,+0/0122334666,,,&&''&&''&&''&&''(((-,,-,,-,,,,,-,+,+,,+'
+  +',,++,+++++++++*+*+*********)*)**)*)*)*)*)*)))))))())())())()((()''(((((''(('
+  +'''(''''''''''(''''''''''''''''''&&''''&''&&&&&&&$#$"!""!"!!!!!!  !    '#31
+  +' '#31#31#31#31#31#31#31#31#31#30#30#31#31#30#31#30#31#30#30#30#30#31#30#30
+  +#30#30#30#30#30#30#30#30#29#29#29#30#29#30#29#29#29#30#29#29#29#28#29#29#28
+  +#28#29#29#29#29#29#29#29#30#30#30'   '#31'    '#31#31#31#31#31' '#31#31#31#31
+  +#31#31#31#31#31#31#30#31#31#31#30#30#31#30#30#30#30#30#30#30#30#29#30#30#30
+  +#29#29#29#29#29#29#29#29#29#29#29#29#29#29#29#29#29#28#28#29#28#29#29#29#28
+  +#28#28#28#28#28#27#28#27#28#28#27#28#28#27#27#28#27#27#27#27#27#26#27#26#26
+  +#26#26#27#27#27#26#26#26#26#26#26#26#26#26#25#26#26#26#26#25#26#25#25#26#23
+  +#24#23#22#22#22#22#22#21#21#21#21#22#23#23#30#30#30'110666<<<BBB<<<'#20#20#19
+  +#19#19#19#19#19#18#18#19#19#19#19#19#18#18#19#18#18#18#18#18#18#18#18#18#17
+  +#18#18#17#18#17#18#18#18#17#17#17#17#17#17#17#17#17#16#17#16#17#16#17#16#16
+  +#16#16#17#16#16#16#16#16#16#16#15#16#16#15#16#16#15#15#15#15#16#15#15#15#15
+  +#15#15#15#15#15#14#14#15#14#15#14#14#14#14#15#14#14#14#14#14#14#14#14#14#14
+  +#14#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#13#12#13#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#11#12#11#12#12#11#11#11#11#11
+  +#11#11#11#11#10#11#11#10#11#10#11#10#11#10#11#10#10#10#10#10#10#10#10#10#9#10
+  +#10#10#9#9#9#9#10#9#10#9#10#9#9#9#9#9#9#9#9#9#9#9#8#9#9#8#8#9#8#8#8#9#9#8#8#8
+  +#8#8#8#8#8#8#8#8#7#8#8#8#8#8#7#7#7#7#7#7#8#7#7#7#7#7#7#7#7#7#7#6#6#7#7#6#6#6
+  +#6#7#6#6#6#6#6#6#6#6#6#6#6#6#6#6#5#6#5#5#6#6#6#5#6#5#5#5#5#5#5#5#5#5#5#5#5#5
+  +#5#5#5#4#5#4#5#4#4#5#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#4#4#3#4#4#4
+  +#3#3#3#4#3#4#3#3#3#3#3#4#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#2#3#2#2#3#2#2#2#2#2
+  +#2#3#2#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2#2#1#1#2#1#1#2#2#1#1#1#1#1#1#1#1#1
+  +#1#1#1#1#1#0#0#1#1#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000'
+  +'yyy000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000/00/0//////0/00///////////////'
+  +'/.//..//././/././././111333444666777899;;;443++,,,,,,,,,,+,,,,,223:;:======'
+  +'<<<<<<<<<<<<;;;:::;:;445---+++++++++*+++**++**+*+*+*+****)**))*)**)****))*)'
+  +'*)))))))))(())((()((((((---111322454666++*&&(&&''&&''&&''*)*-,,-,,-,,-,,,,,'
+  +'-++,,+,++,+++++++++++++**+**+*+**********)**)**))*))))))))))((((())))(((''('
+  +'((((((''''''(''''''''(''''''''&&&&&&&''&&&''&''&&&&%&&&%&&&&%%&%%%%%%$%%$$$'
+  +'$"##"#"""!!!  ! '#31' '#30#31#30#30#30#30#30#30#30#30#29#30#30#29#30#30#29
+  +#29#30#29#29#29#29#29#29#29#29#29#29#29#28#28#29#31#30#31'         '#31#31' '
+  +#31#31' '#31#31' '#31'  '#31#31#31#31#31#31#30#31#31#31#31#31#30#31#30#30#30
+  +#30#30#30#30#30#30#30#30#30#30#29#29#30#29#29#29#29#29#29#29#29#28#28#28#29
+  +#28#29#29#28#28#29#28#28#29#28#28#29#28#28#28#28#28#28#28#28#27#27#27#28#28
+  +#27#27#27#27#27#27#27#27#27#27#27#26#27#27#26#26#26#26#26#26#26#26#26#26#25
+  +#26#26#25#26#25#25#26#23#22#24#22#22#22#22#22#22#22#22#22#23#23#23'#""121877'
+  +'===CCC666'#19#20#19#19#19#19#19#19#19#19#19#19#18#18#18#18#18#19#19#18#19#19
+  +#18#18#18#18#18#18#18#18#17#17#18#18#17#18#18#18#17#17#17#17#17#17#17#17#17
+  +#16#17#16#16#16#17#17#17#16#16#16#16#16#16#16#16#16#16#16#16#16#16#16#15#15
+  +#15#15#15#15#15#15#15#15#15#15#15#15#15#15#15#15#15#14#15#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#13#14#13#13#13#14#13#13#14#13#13#13#13#13#13#13#13
+  +#13#13#12#13#12#13#12#12#12#13#12#12#12#12#12#13#12#12#12#12#11#12#12#12#12
+  +#12#11#12#12#11#11#11#11#11#11#11#11#11#11#11#10#11#11#11#11#10#11#10#10#10
+  +#10#11#10#10#10#10#10#10#10#10#10#10#9#9#10#10#9#9#9#9#9#9#10#10#9#9#9#9#9#9
+  +#9#9#9#9#8#8#9#8#9#8#8#8#9#8#8#8#8#8#8#8#8#7#8#8#8#8#7#7#7#8#7#8#8#7#7#7#7#8
+  +#7#7#7#7#7#7#7#7#7#7#7#7#6#6#7#6#6#7#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#5#5#5#6
+  +#6#5#6#5#5#6#6#6#5#5#5#5#5#5#5#5#5#4#5#5#5#5#5#5#4#5#4#5#4#5#5#5#4#4#4#4#4#4
+  +#4#4#4#4#4#4#4#4#4#4#4#3#4#3#4#4#3#3#4#3#4#3#4#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3
+  +#3#3#2#2#3#2#2#3#2#3#2#3#2#2#2#2#3#2#2#3#2#3#2#2#2#2#2#2#2#2#2#2#1#2#2#2#2#2
+  +#2#1#1#1#1#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1#1#0#1#1#0#1#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0'000yyy00000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000000000000000000000000/00/000/00'
+  +'/00/000///000///////////////.////////./....111333554666888998;;:222,+,-----'
+  +',,,,,,,,,,++,,,,,,,322:;;===<<<<<<<<;<<<<<<;;:::::;:445---+++++*+++++*+****'
+  +'+**+*************))))))*)*)**))))))))))))())((,,,///111443545766+**''''''&&'
+  +'''&&''&&''***-,,-,,-,,-,,-,,-+,,++,,,,,,,,,+,+++++**+++*+***********)***))*'
+  +'*))*)*)))))())()())()(((((((((((((((''''''(''''''''''''''''''''''&''''&&&&&'
+  +'&&&&&&&%&&&&&%%&%%&%%%%%%%%%%$%%$$$$%$$$$$$$######""#"!!!!!   '#31#31#31#30
+  +#29#30#29#30#29#29#30#29#29#29#29#30#29#29' !! !      !    '#31' '#31#31' '
+  +#31#31#31#31#31#31#31#31#31#31#31#30#31#31#30#30#31#30#30#30#30#30#31#30#30
+  +#30#30#30#30#29#29#29#29#29#30#29#30#30#29#29#29#29#29#29#29#29#29#29#29#29
+  +#29#29#29#28#28#28#29#28#28#29#28#28#27#28#28#27#27#27#27#27#27#28#27#28#27
+  +#27#27#27#27#26#27#27#27#27#27#27#27#26#26#26#27#27#26#26#26#26#26#26#26#25
+  +#25#26#22#22#22#22#22#22#22#22#22#22#22#22#24#24#24'%$%232888>>>DDD---'#19#20
+  +#20#19#19#20#19#19#19#19#19#19#19#19#19#18#19#18#18#19#18#18#18#18#19#19#18
+  +#18#18#18#18#18#18#17#17#18#18#17#17#18#18#17#17#17#18#17#17#17#16#17#17#17
+  +#17#16#17#17#17#16#17#16#16#17#16#16#16#16#16#16#16#16#16#15#15#16#15#15#15
+  +#16#16#15#15#15#15#15#15#15#15#15#15#14#14#15#15#14#14#14#15#15#14#14#14#14
+  +#14#14#14#14#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12
+  +#12#12#13#12#13#13#13#13#13#12#12#12#12#12#12#12#12#12#12#12#12#11#12#12#12
+  +#11#11#12#11#11#11#11#11#11#11#11#11#11#10#10#11#11#10#10#10#10#11#10#10#10
+  +#10#10#10#10#10#10#10#10#10#9#10#10#10#9#10#10#10#10#9#9#9#9#9#9#9#9#9#8#9#9
+  +#8#9#9#8#8#8#9#9#8#8#9#8#8#8#8#8#8#8#8#7#7#8#8#7#7#7#8#7#7#7#7#8#7#7#7#7#7#7
+  +#7#7#7#7#7#6#6#7#7#7#7#7#7#7#7#6#6#6#7#6#6#6#6#6#6#5#5#6#6#6#6#6#6#5#5#5#6#5
+  +#6#6#5#6#5#5#5#5#5#5#6#5#5#5#5#5#5#4#4#5#5#4#4#4#4#5#5#4#5#5#4#4#4#4#4#4#4#4
+  +#4#3#4#4#4#3#4#3#4#4#3#4#4#3#4#4#4#3#3#3#4#3#3#3#3#3#3#3#3#3#3#3#2#3#3#2#2#3
+  +#3#3#3#3#3#2#3#2#2#3#3#3#3#2#3#2#3#2#2#2#2#2#2#2#2#2#2#2#1#2#1#2#2#2#1#2#2#1
+  +#2#2#1#1#2#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0'000yyy000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000/00000000000/00/////0/0/'
+  +'//////////////////.//.//.//...221333444676888::::::213,,,---,,-,-,,,,,,--,,'
+  +',,,+,,,,,,++,++333;;;===<<<<<<<<;;<<<<<<<;::;;::333,,,++*++*****++*++******'
+  +'*******))***)))))*)))*))))))()---//0000111333555666767''''''&''(&''''''&''&'
+  +'&''***--,-,,-,,-,,-,,-,,-++-,,,,,,+++,++++++++++*++**+*****+)*)*)*)*)*)*)))'
+  +')))))))())))(((((()()(()(''(((((((''''(''''''''''''''''''''&''''''&&''&&&'''
+  +'&&&&&%&&%%&&%%%%%%%%%%%%%$$%%$%$$$$$$$$$##$#####$"##""#""#"!""!!!! '#31'  '
+  +#31#31'!!!!! !!! !           '#31' '#31#31' '#31#31' '#31#31#31#31#31#31#31
+  +#31#31#31#31#31#30#31#30#31#30#31#30#30#30#30#30#30#30#30#30#30#30#29#30#29
+  +#29#29#30#29#29#29#29#29#29#29#28#28#29#28#28#28#28#29#29#28#28#28#28#28#28
+  +#28#28#28#28#27#28#28#28#28#27#27#27#27#27#27#27#27#27#27#27#27#26#27#26#26
+  +#26#26#27#26#26#27#26#26#26#26#26#25#25#25#22#22#23#22#22#23#22#22#22#22#22
+  +#22#25#25#25'***344::9???EEE$#$'#19#20#20#20#20#19#19#20#19#19#19#19#19#19#19
+  +#19#19#19#19#19#19#18#19#19#18#19#18#18#18#18#18#18#18#18#18#18#18#18#18#18
+  +#17#17#18#18#17#17#17#17#17#17#17#17#17#17#16#16#16#17#17#16#17#17#17#16#16
+  +#16#16#16#16#16#16#16#16#16#15#16#15#16#15#16#16#15#16#15#15#15#15#15#15#15
+  +#14#15#15#14#15#14#14#15#15#14#15#14#14#14#14#14#14#14#14#14#14#13#13#14#13
+  +#14#13#13#13#14#13#13#13#13#13#13#12#13#13#13#12#13#12#13#13#12#13#12#13#12
+  +#12#12#12#12#11#12#12#12#12#11#12#12#11#11#12#11#11#11#11#11#11#12#11#11#11
+  ,#10#11#11#11#11#10#11#10#10#11#10#10#11#10#11#10#10#10#10#10#10#10#9#10#9#9
+  +#10#9#10#10#10#9#9#9#9#9#9#9#9#9#9#9#8#9#9#9#8#9#8#9#8#8#8#9#8#8#9#8#9#8#8#8
+  +#8#8#8#8#7#8#8#7#8#8#7#7#8#8#8#7#7#7#7#7#7#7#7#6#7#7#7#7#6#7#7#6#6#6#6#6#7#6
+  +#6#6#6#6#6#7#6#6#6#6#6#6#6#6#5#6#6#5#5#5#6#5#5#5#5#5#5#5#5#5#5#5#5#5#5#4#5#5
+  +#4#5#5#4#4#4#4#4#5#5#4#5#4#4#5#4#4#4#4#4#4#4#4#4#4#4#4#3#4#4#3#4#3#4#3#3#4#3
+  +#4#3#4#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#3#3#3#3#3#2#2#3#3#2#2#2#2#3#2#2#2#2
+  +#2#2#2#2#2#2#2#2#2#1#2#2#2#2#1#2#1#2#2#2#1#2#2#1#1#1#1#2#1#1#1#1#1#1#1#0#1#1
+  +#1#1#1#1#1#0#1#0#0#0#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000/000/0//0/0//0/0///////////////////////.//122333545677'
+  +'888::;:::///,,,,,----,-,,,--,,,-,--,,,,,,,,,,,,,,+,,+,-,,445;<<===<<<<<<<<;'
+  +';<<<;;;;<;::99:333,,,++*++*+++*++***********)**)***))***)))*--.000000100111'
+  +'333555667777888''''(&''(''''(&&''&&(+++--,-,,-,,-,,-,,-,,-,,-+,,,,,+,++,+++'
+  +'+++++*++***+*++*++*********)*))))***)))()))()(()())((((((((((((((((''''(('''
+  +'''''(''''''''''''''''''''&&&&&&&&&&&&&&&&&&%&&&%%%%%%%%%%$%%%$$$$$$$$$##$##'
+  +'$##$##$""#""#""#""#""""!"!!"!!! !!!!!! !   !       '#31'  '#31#31' '#31'   '
+  +#31#31#31#31#31#31#31#31#31#30#31#31#30#30#30#31#30#30#30#30#30#30#30#30#30
+  +#30#30#30#30#30#29#29#29#30#29#30#29#29#29#29#29#29#29#29#29#29#29#28#29#28
+  +#28#28#28#28#29#28#28#28#28#27#27#28#28#28#27#27#27#27#27#27#28#27#27#27#27
+  +#26#26#27#27#27#26#26#27#26#26#26#26#26#26#25#25#25#22#22#22#23#22#23#23#22
+  +#22#23#23#23#25#26#25'---455:::@A@EEE'#29#29#29#20#20#20#20#20#20#20#20#19#20
+  +#19#19#19#19#19#19#19#19#19#19#18#19#19#19#19#19#19#18#18#18#18#18#18#18#18
+  +#18#18#18#18#17#18#17#17#18#17#17#17#17#18#17#17#17#17#17#17#17#17#17#17#16
+  +#16#17#16#16#16#16#16#16#16#16#16#16#16#16#16#15#15#15#15#16#16#16#16#16#15
+  +#15#15#15#15#15#15#15#14#14#15#15#15#14#15#14#14#14#15#14#14#14#14#14#14#14
+  +#14#14#13#14#14#13#14#13#14#13#14#14#14#13#13#13#13#13#13#13#12#13#12#12#13
+  +#12#12#12#12#13#13#12#12#12#12#12#12#12#12#12#12#12#11#11#12#12#11#11#11#12
+  +#11#11#12#11#11#11#11#11#11#11#10#11#11#11#11#10#11#10#11#11#11#11#10#10#10
+  +#10#10#10#10#10#10#10#10#9#10#10#10#9#9#10#9#9#9#9#9#9#10#9#9#9#9#9#9#8#9#9#9
+  +#8#8#9#8#8#8#8#8#8#8#9#8#8#8#8#7#8#7#8#8#8#8#7#8#7#7#7#7#7#7#7#7#7#7#7#7#7#7
+  +#7#6#7#7#7#6#7#6#7#6#7#6#6#6#6#6#6#6#6#6#6#6#6#6#6#5#6#6#6#6#5#5#6#6#6#6#5#5
+  +#5#5#5#6#5#5#5#5#5#5#5#5#5#4#5#4#4#4#4#4#5#4#4#4#5#5#4#5#4#4#4#4#4#4#4#4#4#4
+  +#4#4#4#4#4#4#3#3#4#4#3#3#4#3#3#3#4#4#3#3#3#3#3#3#3#3#3#3#3#3#2#3#2#2#3#2#3#3
+  +#2#2#3#3#2#2#2#2#2#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2#2#2#2#1#1#1#1#1#1#2#1
+  +#1#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy0'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000000000000/0/0/0000//0//0//0////'
+  +'/////222333544766888::::;:/0/,-,-----------,--,-.----,,-,-,,,,,,,,,,,,,+,,,'
+  +'+,+++-,-454;;;===<<<<;<;;<<;;;<;;<<::;999333,,,**+******************))*)**-'
+  +'--/00100121221332343656777778898111''''(&''''''''''&''(''&''+++--,-,,-,,-,,'
+  +'-,,-,,-,,-,,,,,,+,,,,,+,+++++++++*+********************)*)*))*)))))))))))(('
+  +'(((((((((((((((''''''''''((''''''''''''''''&''''''''''''''&&&&&&''&&&&&&&&&'
+  +'%%&%%%%%%%%%%$%%%%$$%$$$$$$$##$##$##$""$""#""#""#""#!"""""!"!!!!!!! !! !   '
+  +'  ! ! '#31'     '#31' '#31#31#31'  '#31' '#31#31#31#31#31#31#31#30#30#31#31
+  +#31#31#30#30#30#30#30#30#29#30#30#30#30#29#30#29#29#30#29#29#29#29#29#29#29
+  +#28#29#29#29#29#28#29#29#29#29#28#28#28#28#29#29#28#28#28#28#28#27#28#28#27
+  ,#27#28#27#27#27#27#27#27#27#27#27#27#27#27#27#26#26#26#27#26#26#26#26#25#25
+  +#25#23#23#23#23#23#23#23#23#23#23#23#24#27#26#26'///455;<<@@@FEE'#21#20#21#20
+  +#20#21#20#20#20#20#20#19#19#20#19#19#20#19#19#19#19#19#19#19#19#19#18#19#19
+  +#19#18#19#18#18#19#19#18#18#18#18#18#18#18#18#18#18#18#17#17#17#18#18#17#17
+  +#17#17#17#17#17#17#17#17#17#17#17#17#17#17#16#16#16#16#16#16#16#16#16#16#16
+  +#16#16#15#15#16#15#16#16#15#15#16#15#15#15#15#15#15#15#15#15#14#15#14#15#15
+  +#15#15#14#15#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#13#13#13#13#14#13
+  +#14#13#13#13#13#13#13#13#12#13#13#12#13#13#12#12#13#12#12#12#12#12#12#12#12
+  +#12#12#12#12#11#12#12#11#12#11#11#12#11#11#11#12#11#11#11#10#11#11#11#10#11
+  +#11#11#10#11#10#10#11#10#10#10#10#10#10#9#10#10#9#10#10#10#10#9#9#9#10#9#9#10
+  +#9#9#9#9#9#9#9#8#9#9#9#9#9#9#9#8#8#9#8#8#9#9#8#8#8#8#8#8#8#8#7#8#7#7#8#8#7#8
+  +#8#8#8#7#7#7#7#7#8#7#7#7#7#7#7#6#6#7#6#7#7#7#6#7#6#7#6#7#7#6#7#6#6#6#6#6#6#6
+  +#6#6#6#5#6#5#5#6#5#5#5#5#5#6#6#6#6#6#5#5#5#5#5#5#4#5#5#5#4#5#4#5#5#5#5#4#5#5
+  +#4#4#4#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#3#4#3#3#3#4#3#3#3#3#3#3
+  +#3#3#3#3#3#2#3#3#3#3#3#3#3#2#3#3#3#3#2#2#2#2#3#3#3#3#2#2#2#2#2#3#2#2#2#2#2#2
+  +#2#2#1#2#2#1#2#1#2#1#1#1#1#1#2#1#2#1#1#1#1#1#1#1#0#1#0#1#0#1#1#0#0#1#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0'000yyy000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000/00'
+  +'0/00/0/0/0/0///0//00///////222333544677998;;:;::0/0,,,---------,-,----./433'
+  +'544111...,,,,,,,,+,,,+,,,,++++++++,+,,,444;;;======;;<<<;<;<;;;::::::989323'
+  +',++**+*+**+*******,,,/./000212222333444555665667778112*)*''''(''''(''''(&'''
+  +'(''''''''''''--,--,--,-,,-,,-,,-,,-,,-,,-,,,,+,+,,+++++++++++++++++*++**+**'
+  +'*****)****)***))*)*)))))))())))())((((((((((((''''''''''''''((''''''''''''&'
+  +'''''''&&''''&&&&&''&&&&&&&&%&%%&%%%%%%%%%%%%%%%%$$$$$$$#$##$##$##$"###"#""#'
+  +'!"#""""!"""""!!!!!!!  !!!   !        '#31' '#31' '#31#31' '#31' '#31#31#31
+  +#31#31#31#31#31#31#31#31#31#30#30#31#31#30#30#31#30#31#30#30#30#30#30#30#30
+  +#29#29#29#29#29#29#29#29#29#29#29#29#29#29#29#29#28#28#29#28#29#28#28#28#28
+  +#28#28#28#28#28#28#28#28#27#27#28#27#27#28#28#28#28#27#28#27#27#27#27#26#27
+  +#27#26#27#27#26#26#27#25#24#24#23#23#23#23#22#23#23#22#23#23#23#23#30#30#31
+  +'100777<<;CCC?@@'#21#20#20#20#20#20#21#20#20#20#20#20#20#20#19#20#20#19#19#19
+  +#20#19#19#19#19#19#19#19#19#19#19#18#18#18#18#19#18#19#18#18#18#18#18#18#18
+  +#18#18#17#18#18#18#18#18#18#17#17#18#17#17#17#17#17#17#17#17#17#16#17#17#16
+  +#16#17#17#16#16#17#16#16#16#16#16#16#16#16#16#15#15#15#15#15#15#15#15#15#15
+  +#16#15#15#15#15#15#15#15#15#15#14#15#14#15#14#14#15#15#14#14#14#14#14#13#14
+  +#14#14#13#14#14#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13
+  +#13#13#13#12#13#12#12#13#12#12#12#12#12#12#12#12#12#12#12#11#12#12#12#12#11
+  +#11#11#11#11#11#11#11#11#11#10#10#11#10#10#11#10#10#11#10#10#10#10#11#10#10
+  +#10#10#10#10#9#10#9#10#9#9#10#10#10#9#10#9#9#10#9#9#9#9#9#9#9#8#9#9#8#9#8#8#9
+  +#9#8#8#9#8#8#8#9#8#8#8#8#7#8#8#7#7#7#7#8#8#7#8#8#8#7#7#7#7#7#7#7#7#7#7#7#7#6
+  +#7#7#6#7#7#6#6#6#6#7#6#7#6#6#6#6#6#6#6#6#5#6#6#5#5#5#6#5#6#5#6#5#6#5#5#6#6#5
+  +#5#5#5#5#5#5#5#5#5#4#5#5#4#5#5#5#4#5#5#5#5#4#5#5#4#4#5#4#4#4#4#4#4#4#4#3#3#4
+  +#4#4#3#4#4#4#3#3#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#3#2#3#2#2#2
+  +#3#2#2#3#3#2#3#2#2#2#2#3#2#2#2#2#2#2#2#2#2#2#1#2#2#1#1#1#2#1#2#1#2#1#1#1#1#1
+  +#1#2#1#1#1#1#0#1#1#0#1#1#1#1#1#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy00000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000/000/0/0000000/00///////////0222333555667989;:'
+  ,';;;;/0/,,-.-..-----------../544445455554455221..-,,,,,,,,,,,,+,+++,,++++,+,'
+  +'+-,,444;;;<==;<;;<;<;;;;;;;;::::::787212,,,*+*+,+///22222122233244465566687'
+  +'7888000(((''(((''(''''(''''(''''(''&(&''(''&(.-,.-,--,-,,-,,-,,-,,-,,-,,-,,'
+  +',,+,,,,+++,,+++++,+++++++++++++*+++**********)**))*)))))*()))(()()(((()(((('
+  +'(((((((((''(''''''''(''''''''''''''''&''''''&&&&&''''&&&&%&&%&%%%%&&%&%%%%%'
+  +'%%$%$$%$$%$$%##$##$##$####"#""#""#"""!""""""!!"!!!!!!!!!! !!  ! !!       '
+  +#31'     '#31#31' '#31' '#31#31#31#31#31#31#31#30#31#31#31#31#30#30#30#30#30
+  +#30#30#30#30#30#30#29#30#30#30#29#30#29#29#29#29#29#30#29#29#29#29#29#28#28
+  +#28#29#29#28#29#29#28#28#29#28#28#28#28#28#28#28#27#28#28#27#27#27#27#27#27
+  +#27#27#27#27#27#27#27#26#27#26#27#23#23#25#23#23#24#23#23#23#23#23#23#24#24
+  +#23'!""232777>>>DDD:::'#20#21#21#20#20#20#20#20#20#20#20#20#20#20#19#19#20#20
+  +#19#19#20#19#19#19#19#19#19#19#19#19#19#19#18#19#18#18#18#18#18#18#18#19#18
+  +#18#19#18#18#18#17#18#18#18#17#18#17#18#17#17#17#17#17#18#17#17#17#17#17#17
+  +#17#17#16#17#17#17#16#16#17#16#17#16#16#16#16#16#16#16#16#16#16#16#15#16#15
+  +#15#15#16#15#15#15#15#15#15#15#15#15#14#15#15#15#15#15#14#15#14#15#14#14#14
+  +#14#14#14#14#14#14#13#13#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#12
+  +#12#12#13#13#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#11#11#12#12#12#11
+  +#11#12#11#11#12#12#11#11#11#11#11#11#11#11#11#11#11#11#11#11#10#10#10#10#11
+  +#10#10#10#10#10#10#10#10#9#10#10#9#9#10#10#10#10#9#9#9#9#9#9#9#9#9#9#8#9#9#9
+  +#9#8#9#9#9#9#8#9#8#8#8#9#8#8#8#8#8#8#8#8#8#7#8#8#7#7#7#7#8#7#8#7#8#7#7#7#7#7
+  +#7#7#7#7#6#6#7#7#6#6#7#6#6#6#7#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#5#6#6#6#5#6
+  +#5#5#5#6#5#5#5#5#5#5#5#5#5#4#5#5#4#5#5#4#4#5#4#4#4#5#5#4#4#5#4#4#4#4#4#4#4#4
+  +#4#4#4#4#3#4#4#4#4#4#4#3#4#3#3#4#4#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#2#3
+  +#2#3#2#3#3#3#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2#2#1#2#2#2#1#1
+  +#1#1#2#1#1#1#1#1#1#1#1#1#1#1#0#0#0#1#1#0#0#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0000000000000000000000000000000000000000000000000//00//000//00/222334555777'
+  +'999;;;;;:000--------------.-.-///544554455555544445445444211.--,,,,,,,,,,,+'
+  +',,,+++++++,,+++,,,444;;;=<=<;<;;;;;<;;;:::999888666100333333333434434455555'
+  +'788777111))*((((()''()''''(''()''''('''')''''(''''()()--,-----,--,-,,-,,-,,'
+  +'-,,-,,-,,,,,,,+,,,,,,++,+,+++++++++++*++**+******+*)*****))**))))))))))))))'
+  +'()())()(((((((((((''(''''''((''(''''''''''''&''''&&''''&&''&&''&&&&&&&&&&%&'
+  +'%%%%%%%%%%%%$$%$$%$$$##$##$#####$###""#""#"""""""""""!!"!"!"!!!!!!!!!!!  ! '
+  +'             '#31#31'  '#31#31#31#31#31#31#31#31#31#31#31#30#30#30#31#31#31
+  +#30#30#30#30#30#30#30#30#29#30#30#30#30#29#30#29#30#29#29#29#29#29#29#29#28
+  +#29#29#29#28#28#28#29#29#28#28#28#28#28#28#28#28#27#28#28#28#28#28#27#27#27
+  +#27#27#27#27#27#27#27#27#26#27#26#24#23#24#24#23#23#23#23#23#23#23#23#25#25
+  +#25'&%&332999???DDD.--'#21#21#20#21#21#20#20#20#20#20#21#20#20#20#20#20#20#20
+  +#19#20#20#19#20#19#19#20#19#19#19#20#19#19#19#19#19#19#19#19#19#19#19#18#18
+  +#18#19#18#18#18#18#18#18#18#17#18#18#18#17#17#18#18#18#17#17#17#17#17#17#17
+  +#17#17#17#17#16#16#17#16#16#16#16#16#16#16#16#16#16#16#16#16#16#16#16#16#16
+  +#16#15#16#15#15#15#15#15#15#15#14#15#15#15#15#15#15#14#15#14#14#15#14#15#14
+  +#14#15#14#14#14#14#14#14#14#14#14#13#13#14#14#14#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#12#13#12#12#13#12#12#13#12#13#12#12#12#12#12#12#12#12#12#12
+  +#11#12#12#11#11#11#11#11#11#11#11#11#11#11#11#11#11#10#11#11#11#11#10#11#10
+  +#10#10#10#10#10#10#10#10#9#10#10#9#9#10#9#9#10#9#9#10#10#10#9#9#9#9#9#9#9#9#9
+  +#8#8#8#8#8#8#9#9#9#8#8#8#9#8#8#8#9#8#8#7#8#7#8#7#7#8#8#8#7#7#8#8#8#7#7#8#7#8
+  +#7#8#7#7#7#7#7#7#7#6#7#6#7#7#7#7#7#6#6#7#6#6#6#6#7#6#6#6#6#6#5#5#6#6#6#6#5#5
+  +#5#6#5#5#6#6#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#4#5#4#5#4#5#5#4#4#5#4#4#4#4#4
+  +#4#4#4#4#4#4#3#4#4#4#4#4#4#4#4#4#4#3#3#4#3#3#3#3#4#3#3#3#3#3#3#3#3#3#3#3#3#2
+  +#2#3#3#3#2#2#2#2#3#3#3#3#3#2#2#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2
+  +#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1#0#0#1#1#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000000//000/000/0/0122344545777999'
+  +';;;;;;000---......-.-.---.-010655555555545554555445555444443443111-,-,,,+,,'
+  +',,+,+,+,++++++,+++*++,,,344==<===;;<<<;::::::999878677566555565666666767888'
+  +'332))+''(((()(()''()(()(''(''((''()''((''''))(),,+---.-,.----,-,,-,,-,,-,,-'
+  +',,-,,-,,,,,,,,,,,++,,+,++++++++++++**+*************)*)**)*))))*)*)))))))()('
+  +'())()(()((((''(((((''''''(''''''''''''''''''''''''''&''''''&&&''&&''&%&&&&&'
+  +'&&%%%%%%%%%%%%%%$$%$$%#$%$#$#$$##$#"#""#""#"##"""""""""!"!!!!""!!!!!!!    !'
+  +'    !        '#31' '#31#31' '#31#31#31#31#31#31#31#31#31#31#31#31#31#30#31
+  +#30#30#30#31#30#30#30#31#30#30#30#30#29#29#30#30#30#30#29#29#30#30#29#29#29
+  +#29#29#29#29#29#29#29#29#28#28#29#28#28#29#28#29#28#28#28#28#28#27#27#27#28
+  +#28#28#27#28#27#27#27#27#27#27#27#27#27#24#24#24#23#24#24#23#23#23#24#23#23
+  +#25#26#25'***545:;;@@@EEE((('#21#20#21#20#21#21#20#20#21#21#21#20#20#20#20#20
+  +#20#20#20#20#20#19#20#20#20#19#19#19#19#19#19#19#19#19#19#19#18#18#19#19#18
+  +#19#18#19#18#18#18#18#19#18#18#18#18#18#18#18#18#17#18#17#18#17#17#17#17#17
+  +#17#17#17#16#17#17#17#16#17#17#17#17#16#17#16#16#16#16#16#16#16#16#16#16#16
+  +#16#15#16#16#16#15#15#15#15#15#15#15#16#15#15#15#15#15#15#15#14#15#15#15#15
+  +#15#14#14#14#14#14#15#14#14#14#13#14#14#14#14#14#14#13#13#14#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#12#12#13#13#13#12#13#13#12#13#12#13#12#12#12#12#12
+  +#12#12#11#12#11#12#12#11#11#11#11#11#11#11#11#11#11#11#11#11#11#10#10#10#11
+  +#10#10#10#10#10#11#10#10#10#11#10#10#10#9#9#10#10#9#10#10#10#9#9#10#9#9#9#9#9
+  +#9#9#9#9#9#9#9#9#9#9#9#8#9#8#8#9#9#8#8#8#8#9#8#8#8#8#8#8#8#8#7#8#8#7#7#8#8#7
+  +#7#7#7#7#7#8#8#7#7#7#7#7#7#7#7#7#7#7#7#6#6#6#7#6#6#6#6#6#6#7#6#6#6#6#6#6#6#5
+  +#6#6#6#6#5#5#6#5#5#5#6#6#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#4#5
+  +#5#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#4#3#3#3#4#4#3#3#3#4#3#3#3#3#3#3#3
+  +#3#3#3#3#3#3#3#2#3#2#2#3#2#2#2#3#3#3#3#2#3#2#2#3#2#2#2#2#2#3#2#2#2#2#2#2#2#2
+  +#2#1#1#2#1#1#1#1#1#1#2#1#2#1#1#1#1#1#1#1#1#1#0#1#0#1#0#1#1#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy0'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0000000000000000000000000000000000000000000000000000000000000000/1113334456'
+  +'67888:::;;;000---..........-.-.-0116565555555555555455555554555555434434434'
+  +'33000,,-,+,,,,,++,,,,,+++++++++*+++-,-565<<=;;<;;;::::::9988888887787778888'
+  +'88555---(''()))(()()))()(()(()''()(()()(**+-.-..-..-.-----.-,--,.,--,,-,,-,'
+  +',-,,-,,-,,,,,,,,,,,,+,,,++,+,+++++++++++++**+***+**+*******)*)))*)))))*)*))'
+  +'))))())())((((((((''''''(((''''((((''''(''''&''''''''''&&''''''&&''&&&&&&&&'
+  +'&&&%&&%%%%%%%%$$%$$$$$$$#$#$$##$###"##"#####""#""""""""!!"!"!"!!!!!!!!!!   '
+  +'! ! !!    '#31' '#31#31'     '#31' '#31#31' '#31#31#31#31#31#31#31#31#30#31
+  +#30#31#31#31#30#30#30#30#30#30#30#30#29#29#30#29#30#30#30#30#30#29#29#29#29
+  +#29#29#29#29#29#29#28#29#28#29#28#28#28#28#28#28#29#28#28#28#27#28#28#28#27
+  +#28#27#28#27#27#27#27#26#27#27#24#24#24#24#24#24#24#23#24#23#23#23#26#27#26
+  +'-.-555;;;A@AGGG#""'#21#21#21#21#21#21#21#20#20#21#20#21#21#21#21#20#20#20#20
+  +#19#20#20#20#20#19#19#20#19#19#20#19#19#19#19#19#19#19#19#19#19#19#19#19#18
+  +#19#18#18#19#18#19#18#18#18#18#18#18#18#18#18#18#18#17#17#17#17#17#17#17#17
+  +#17#17#17#17#17#17#16#17#17#17#16#17#16#17#17#16#17#16#16#16#16#16#16#16#16
+  +#15#16#16#16#16#16#15#15#16#15#16#15#15#15#15#15#15#15#15#15#14#15#14#14#15
+  +#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14#14#13#13#13#13
+  +#13#13#13#13#12#13#13#13#13#13#12#13#12#12#13#12#13#12#12#12#12#12#12#12#12
+  +#12#12#12#11#11#11#11#12#11#11#11#11#11#11#11#11#11#11#11#11#10#11#11#11#10
+  +#10#10#11#11#10#10#10#10#10#10#10#10#10#10#10#10#10#10#10#9#9#9#10#9#9#10#9#9
+  +#9#10#9#9#9#9#9#9#9#8#9#9#8#9#9#9#8#8#8#8#9#8#8#8#9#8#8#7#8#8#7#8#8#8#8#8#7#7
+  ,#8#7#8#8#7#7#8#7#7#7#7#7#7#7#6#7#7#7#7#6#7#7#6#7#7#6#7#6#6#6#6#6#6#7#6#6#6#6
+  +#5#6#5#6#6#6#5#6#5#6#6#6#6#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#4#5#4#5#5#4#4#5
+  +#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#4#4#4#4#3#4#3#4#4#4#3#3#4#3#3#3#3#3#3#3#3#3#4
+  +#3#3#3#3#3#3#3#3#3#3#2#3#3#2#3#3#3#2#3#2#3#2#2#2#2#2#2#3#2#2#2#2#2#2#2#2#2#2
+  +#2#2#2#2#1#1#1#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#0#0#1#1#0#0#1#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy00000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000//00111434554777889;:'
+  +':<=<111.--......-....-.-.10156655555555655556555455455445554554444344443343'
+  +'3333000,,-+,+,+,,++++++,++++*++*++*+*,,-655<;;;;<;;;:::::9898988::9889100(('
+  +'()())())())))(()(()(()(()))),+,..-........-..-.--.----,-----,-,,-,,-,,-,,-,'
+  +',-,,,,,,,,,,,,,,+,,++,+,,+,++++*+++++++++*++*********)***)))*))*)))))))()()'
+  +'())))(((((((((((((''((''''(''''''(''''''''''''''''''''''&&''''''''&&&&&&&&&'
+  +'%%%%%%%%%%%%%%$$%$$%##$#$$##$##$#"##"$"###"#""""""""!""!!"!"!!!"!!!!!!  !!!'
+  +'              '#31'  '#31#31#31' '#31' '#31#31#31#31#31#31#30#30#31#31#31#30
+  +#30#30#30#30#30#30#30#30#30#30#30#30#29#30#29#30#30#29#29#29#29#29#29#29#29
+  +#29#29#29#28#28#29#29#28#28#29#28#28#28#28#29#29#28#28#28#28#28#28#27#28#27
+  +#28#27#28#27#26#26#24#24#25#24#24#24#24#24#24#24#24#25#28#28#27'000666<<;AAB'
+  +'GGF'#25#24#24#21#22#21#21#21#21#21#21#20#20#21#20#20#21#20#20#20#20#20#20#20
+  +#20#20#20#19#19#20#20#20#20#19#20#19#19#19#19#19#19#19#19#19#19#19#19#19#19
+  +#19#18#19#18#18#18#18#19#19#19#18#18#18#18#18#18#18#17#18#17#17#18#18#17#17
+  +#17#17#17#17#16#17#17#17#17#16#16#16#17#16#17#16#16#16#16#16#16#17#15#16#16
+  +#16#16#16#16#15#15#16#15#16#15#15#15#15#15#15#15#15#14#15#15#15#14#15#15#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14#14#13#14#13#13#13#13
+  +#13#13#13#13#13#13#13#13#12#13#12#13#13#13#12#12#12#12#12#12#12#13#12#12#11
+  +#11#12#12#11#11#12#11#11#12#11#11#11#11#11#11#11#11#11#11#11#11#11#11#11#11
+  +#11#11#11#10#11#10#11#10#10#10#11#10#10#10#10#10#9#10#9#10#9#10#10#9#10#9#9#9
+  +#9#9#9#9#9#9#9#9#9#9#9#9#9#8#8#8#8#9#8#9#9#8#8#8#8#8#8#8#8#8#8#8#7#8#8#8#8#7
+  +#8#7#8#8#8#7#7#7#8#7#7#7#7#7#7#7#7#7#7#6#7#6#6#6#7#7#6#6#7#6#6#6#6#6#6#6#6#6
+  +#6#6#6#6#6#5#5#6#6#5#5#6#5#5#6#5#6#5#5#5#5#5#5#5#5#5#5#5#5#4#4#5#5#5#5#4#5#4
+  +#5#4#5#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#4#4#4#3#4#3#3#3#3#3#3#3#4#3#3#3#3#4#3
+  +#3#4#2#3#3#3#3#3#2#2#3#3#3#2#3#2#3#3#2#3#2#2#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2
+  +#2#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#0#0#1#0#0#0#1#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000100443555677989;;;===334'
+  +'---............-..111656665555555665565565555555454545555444444443543433433'
+  +'33323300/,+,,+,++++++,+++++++**+**+++*+,--555;;;;;;;;;::;;;;433*)*))*)*)*))'
+  +')))()))()(()(()))*,,,...///////...../../.-..-.--.--.-,----,,--,-,,-,,-,,-,,'
+  +'-,,,,,,,,,,,+,,,,,,,,++,,++++++++++++****+++***********)****))**))))))))())'
+  +'()()(((((((((((((((''''''''(''(''''''(''&''&''''''&&&''&&&&''&&&&&%%%%%%&%%'
+  +'%%%&$$%$$%$#$$$$#$$##$##$##$"#####"##"""#""!"""""!!!!!!!!!!!!!!!! !        '
+  +'         '#31' '#31#31#31#31#31#31#31#31#31#31#30#31#31#31#31#31#30#30#30#30
+  +#30#30#30#30#31#30#30#30#30#29#29#30#30#29#29#29#29#29#30#29#29#29#29#29#28
+  +#28#29#28#29#28#28#29#28#28#28#28#28#28#28#28#28#28#28#28#27#28#27#25#26#25
+  +#25#24#25#24#24#24#24#23#24#25#24#25#31#31#30'221777===CCBDDC'#22#21#22#22#22
+  +#21#22#22#21#21#21#21#21#20#20#20#21#21#20#20#21#20#20#20#20#21#20#20#20#20
+  +#20#20#19#20#20#20#20#20#20#19#20#20#19#19#19#19#19#18#18#18#19#18#18#18#18
+  ,#19#19#18#18#19#18#18#18#18#18#18#17#18#18#18#18#17#17#18#17#18#17#17#17#17
+  +#17#17#17#16#17#17#17#16#16#17#16#16#16#16#16#16#16#16#16#16#16#16#16#16#16
+  +#16#15#16#16#15#15#15#15#15#15#16#15#15#15#15#15#15#14#15#14#15#15#14#14#14
+  +#15#14#14#14#14#14#14#14#14#14#14#14#14#14#13#13#14#13#13#14#13#13#13#13#13
+  +#13#13#13#13#13#13#12#13#13#12#12#13#12#12#13#12#12#12#12#12#11#12#12#12#12
+  +#11#12#12#12#11#12#12#11#11#11#11#11#11#11#11#11#11#11#10#11#11#10#10#10#11
+  +#10#10#10#10#11#10#10#10#10#10#10#10#10#10#10#10#10#10#10#10#9#9#9#9#9#9#9#9
+  +#9#9#9#9#9#9#9#9#9#8#8#8#8#8#8#8#9#8#8#8#8#8#8#8#8#8#8#8#8#8#8#7#8#8#8#7#8#7
+  +#8#7#8#8#7#7#7#7#7#7#7#6#7#7#7#7#7#6#7#7#6#6#7#6#6#6#6#6#6#6#6#6#6#6#6#6#5#6
+  +#6#6#5#6#6#6#5#6#5#5#5#5#5#5#5#6#5#5#5#5#5#5#5#5#4#5#5#4#5#5#4#5#5#4#5#5#4#4
+  +#4#4#5#4#4#4#4#4#4#4#4#4#4#3#4#4#3#4#4#4#4#4#4#3#3#3#3#4#3#3#3#3#3#3#3#3#3#3
+  +#3#2#3#3#3#3#2#3#2#3#3#3#3#3#3#3#3#3#2#3#2#2#2#2#3#2#2#2#2#2#2#2#2#2#2#2#1#2
+  +#1#1#2#2#1#1#1#2#1#1#1#1#1#1#1#0#1#1#1#1#1#0#0#1#0#1#0#0#0#1#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000111333444666888;:;<<=444.--../.........'
+  +'...111665666656656666565556555555555555555554554454544443543433433433333233'
+  +'/00,,,+++,+,++++++++++*++++*+++*+-,-555<<<99:/./)))*))*))**))*)*)))))()))))'
+  +',+,//.//////////////..../../.-..-.--.--.-,.-,--,.,,-,--,,-,,-,,-,,,,,,,,,,,'
+  +',,,,,+,,,,,++++,++++++++**++***++*****+*********)*)**))))))))))))))()))))(('
+  +'(((((((((((''''''''''''''''''''''''''''''&''''''''&''&&&&&&&&%&&%%%%%%%%%%%'
+  +'$$%$$%#$$#$$##$##$##$##$"##""##""""""""""!""!"""!!""!!!!!!!!  !!!!    !'#31
+  +'  '#31'   '#31#31' '#31#31' '#31#31#31#31#31#31#31#31#31#31#31#30#31#30#30
+  +#31#31#30#30#30#30#30#30#30#29#30#30#30#30#29#30#30#30#29#30#29#29#29#29#29
+  +#29#29#28#29#29#28#28#29#28#29#28#28#28#28#28#28#28#28#28#28#27#27#26#25#26
+  +#25#24#24#24#24#24#24#24#24#25#25#25' '#31' 332888===CCC:;:'#22#22#22#21#22
+  +#21#22#21#22#22#22#22#21#21#21#21#21#21#20#21#20#20#20#20#20#21#20#21#21#20
+  +#20#20#20#19#19#20#20#19#19#19#19#20#19#19#20#19#19#19#19#19#19#19#18#19#18
+  +#19#18#19#18#18#18#19#18#18#18#18#18#18#18#18#18#17#17#18#18#17#17#17#17#18
+  +#17#17#17#17#17#17#16#17#16#17#17#16#17#17#17#17#16#16#16#16#16#17#15#16#16
+  +#16#16#16#16#16#15#16#15#15#15#15#15#15#15#15#15#14#14#15#14#15#15#15#14#15
+  +#14#14#14#15#14#14#14#14#14#14#13#14#14#14#14#14#14#13#14#14#13#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#12#12#12#12#13#12#12#12#12#12#12#12#12#12#12
+  +#11#12#11#11#12#12#11#11#12#11#11#11#11#12#11#11#11#11#10#11#11#11#10#10#11
+  +#10#11#11#10#10#10#10#11#10#10#10#10#10#10#10#10#10#10#10#9#9#10#10#9#10#9#10
+  +#9#9#10#9#9#8#9#9#9#9#9#8#9#9#8#9#8#9#8#8#8#9#8#8#8#8#8#8#8#7#8#8#8#8#7#7#8#8
+  +#7#7#7#7#8#7#7#7#7#7#7#7#7#7#7#7#6#7#7#6#7#6#6#7#7#7#7#7#6#6#6#6#6#6#6#6#6#5
+  +#5#6#6#6#6#5#6#6#6#6#5#5#6#6#5#5#5#6#5#5#5#5#5#5#5#5#5#5#5#4#5#5#4#4#5#5#4#5
+  +#4#5#5#4#4#4#5#4#5#4#4#4#4#4#4#4#4#4#3#4#3#4#4#4#4#3#3#3#4#4#4#3#3#3#3#3#3#4
+  +#3#3#3#3#3#3#2#3#3#3#3#3#2#3#3#3#3#2#2#2#3#2#3#2#3#3#2#2#2#2#2#2#2#2#2#2#1#2
+  +#1#2#2#1#2#1#2#1#2#1#1#1#1#1#1#1#1#1#0#1#0#1#1#1#1#0#1#1#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy0000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000333444656888:::<<<888--.//.../....///'
+  +'/.//06666666665666655566566665555555555555554455545544445434334334444333333'
+  +'333333320/0,+,++++++++++*++++++**+*++****,,-+++**)**))**))*****))*)))))+++/'
+  +'//0/00/////////0///////...//./../....-.-----.-,--,-,,-,--,,-,,-,,-,,-,,,,,,'
+  +',,,,,,,,,,,+,+,+,+,++++++++++++*+++******************)))***)))))))))))))()('
+  ,'()((((((((((''(''((''''''''''(''(''''''''''&&&''&&&&''&&&&%&&%%%%&%%%%%%$$%'
+  +'$$%$$$$#$$$$$#$##$#$$####"##""##"""""#""""""""!!!"!!!!!!!! !!!!!  !       '
+  +#31' '#31#31'      '#31#31#31#31#31#31#31#31#31#30#31#31#31#31#31#30#31#30#30
+  +#30#30#30#30#30#29#30#30#29#30#30#30#30#30#30#29#29#30#29#29#29#29#29#29#29
+  +#29#29#28#28#28#29#28#28#28#28#29#28#28#28#28#24#25#25#24#25#25#24#24#25#25
+  +#25#24#25#25#25'$$%332999>==BCB111'#22#22#22#22#22#22#21#21#21#22#21#21#21#22
+  +#21#21#20#21#21#21#21#21#20#21#21#20#21#20#20#21#20#20#20#19#20#20#20#20#20
+  +#20#19#20#19#20#20#19#19#20#19#19#19#19#19#19#19#19#19#19#18#18#18#19#18#18
+  +#19#18#18#18#18#18#18#18#17#18#18#18#17#18#17#17#18#18#17#17#17#17#17#16#17
+  +#17#16#16#16#16#16#16#16#16#16#16#16#16#16#16#16#16#16#16#16#16#15#15#15#16
+  +#16#16#15#15#15#16#15#15#15#15#15#15#15#15#15#14#15#14#14#14#14#14#14#14#14
+  +#14#14#13#13#14#14#14#14#13#14#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#12#12#13#13#13#12#12#12#12#12#12#12#12#12#12#12#11#12#11#12#11
+  +#11#11#11#11#12#11#11#12#11#11#11#11#11#11#11#11#11#11#11#10#11#10#10#10#10
+  +#10#10#10#10#10#10#10#10#10#10#9#10#9#10#9#10#10#9#9#9#9#9#9#9#9#9#9#9#8#8#8
+  +#8#8#9#9#8#9#8#9#9#8#8#8#8#8#8#8#8#8#8#8#8#8#8#7#8#7#8#8#8#7#7#7#8#8#7#7#8#7
+  +#7#7#6#7#6#6#7#7#6#6#7#7#7#6#7#7#6#6#6#6#7#6#6#6#6#6#6#6#6#6#6#5#5#5#6#6#5#5
+  +#6#6#5#6#6#5#5#6#5#5#5#5#5#5#5#5#5#5#4#5#5#5#5#5#5#4#4#4#4#5#4#4#4#4#4#4#4#4
+  +#4#4#4#4#4#4#4#3#3#4#4#3#3#3#3#3#4#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#3#3
+  +#3#3#3#2#2#2#2#2#3#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#1#2#2#2#2#1#1#1#2#1#1
+  +#1#1#1#1#1#1#1#1#1#1#1#1#0#1#1#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0'000yyy000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000222444666888:::<<<878....////.////.....//0666666666666666666656655'
+  +'56655655556565555555555555444354344443343343343333333323232232200/,,,++++++'
+  +'+++++++*+*++*++******************))**))*++...0000000/00////0///00/////////.'
+  +'//./.......-.--.--.--.----,-,,-,,-,,-,,-,,-,,,,,,,,,,,,,,,,,,,,+,++,,++++++'
+  +'++++++*+**+++**++***************)))*)*)))))))()))((((((((((((((''((''''''('
+  +'''((''''''''''''''''''''''''&''&''&&&&&&%&&%%%%%%%%%$&$$%$$%$$%$$$$$$#$$##$'
+  +'#######"##"""""""""""""""""!!"!!!!! !!!!!!!! !    !!    '#31'   '#31#31'  '
+  +#31#31#31' '#31#31' '#31#31#31#31#31#31#31#31#31#31#30#30#30#30#31#30#30#30
+  +#30#30#29#30#30#29#29#30#30#30#29#30#29#29#29#29#29#29#29#29#29#29#29#29#28
+  +#29#28#28#28#28#28#28#28#25#25#25#25#25#25#25#25#25#25#24#24#25#26#26''''''''
+  +'222777<<;ABB***'#22#22#22#22#22#22#21#22#22#22#22#22#21#21#22#21#21#21#21#21
+  +#21#21#21#21#20#20#21#21#20#21#20#20#20#20#20#20#20#20#20#20#20#19#19#19#20
+  +#19#20#19#19#19#19#19#19#20#19#19#19#18#19#18#19#19#18#19#18#18#18#18#18#18
+  +#18#18#18#18#18#18#17#17#17#18#18#18#17#17#17#18#17#17#17#17#17#16#17#16#17
+  +#17#16#17#16#17#16#17#16#16#16#16#16#16#16#16#16#16#16#16#16#16#15#15#16#15
+  +#16#15#15#15#15#15#15#15#15#15#15#15#15#14#15#15#14#15#14#14#14#14#14#14#13
+  +#14#13#14#14#14#13#14#14#13#14#14#13#14#13#13#14#13#13#13#13#13#13#13#13#13
+  +#13#13#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#11#12#11#11#11#11
+  +#11#11#11#11#11#11#11#10#11#11#10#11#10#11#10#11#10#11#11#10#11#10#10#11#10
+  +#10#10#9#10#10#10#10#9#10#10#10#10#10#10#9#9#9#9#9#9#9#9#9#9#9#9#9#8#9#9#8#9
+  +#9#9#9#9#8#8#8#8#8#8#8#8#8#8#8#8#8#8#7#8#7#7#7#8#8#8#8#7#7#7#7#7#7#7#7#7#7#7
+  +#7#7#7#7#6#6#6#6#6#6#6#6#7#6#6#6#6#6#7#6#6#6#6#6#6#6#6#6#6#6#6#5#6#6#6#6#5#5
+  +#6#5#5#5#5#5#5#5#5#5#5#4#4#5#5#5#4#4#5#4#5#4#4#4#4#4#5#4#4#4#4#4#4#5#4#4#4#4
+  +#4#4#3#4#4#4#4#4#3#3#3#4#4#3#3#3#3#3#4#3#4#3#3#3#4#3#4#3#3#3#3#3#3#3#3#2#3#3
+  +#2#2#3#2#2#2#3#2#2#2#2#2#2#3#2#2#2#2#2#2#2#1#2#1#2#2#1#1#2#1#1#1#1#1#0#1#1#1
+  +#1#1#1#1#0#1#1#1#0#0#1#1#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0'000yyy00000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000022244455'
+  +'5777:::<<<;;;///////.////./.../0/166666666667666666666666566655565655555555'
+  +'5555555555555544443444543443443433333323323223222332232...,++++++++++++++++'
+  +'+****+********)*)**+**...111110000000000000/0///0//////0/////...//......-.-'
+  +'-..-.------,-.---,--,,-,,-,,-,,,,,,,,,,,,,,,,,,,,,,,,,,+,,++++,++++++++*+**'
+  +'***++****+****)))**)))))))))))))))())))())(((((((((((''(''''''(''('''''''''
+  +'''''''''''''''''''&&''&&&&%&&%&%%%%%&%%&$$%$$%$$%$$$#$$$#$##$#$$######""#"#'
+  +'""""""""""""!"!!""!"!!!!!!!!!!!!  !!         '#31' '#31#31'  '#31'  '#31#31
+  +#31#31#31#31#31#31#31#31#31#31#31#31#30#30#31#31#31#31#30#30#31#30#30#29#30
+  +#30#30#29#30#30#29#29#30#30#30#29#29#29#29#29#29#29#29#29#28#29#28#28#28#27
+  +#27#28#25#25#25#24#25#25#25#25#25#24#25#25#25#25#26'*))121666;;;???!!!'#23#22
+  +#22#22#22#22#22#22#22#21#22#21#22#22#21#21#21#21#21#21#21#21#20#21#20#21#21
+  +#20#20#21#21#21#21#21#20#20#20#20#20#20#20#19#19#20#20#20#19#19#19#19#19#19
+  +#19#20#19#19#19#19#19#19#18#19#19#19#19#19#18#18#19#18#18#18#18#18#18#18#18
+  +#17#18#18#17#17#18#18#17#17#17#17#17#17#17#17#17#17#17#17#17#17#17#16#17#17
+  +#17#16#16#17#16#16#16#16#16#16#16#16#15#16#15#15#15#16#15#15#15#16#15#16#15
+  +#15#15#15#15#14#14#15#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#13#13#13#14#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#12
+  +#12#13#12#12#12#12#12#12#12#12#11#12#12#12#11#11#12#11#12#11#11#12#12#11#11
+  +#11#11#11#11#11#10#11#11#11#11#10#11#11#11#10#10#10#11#10#10#10#10#11#10#10
+  +#10#9#10#10#10#9#10#9#10#9#9#10#9#9#9#9#9#9#9#9#9#9#9#8#9#8#9#8#8#8#8#9#8#8#8
+  +#8#8#8#8#8#8#8#8#8#8#8#8#7#7#8#7#7#7#8#7#8#7#7#8#7#7#7#7#7#7#7#7#7#7#7#7#7#7
+  +#7#7#6#6#6#7#6#6#6#7#6#6#6#6#6#6#6#6#6#6#5#6#6#5#6#6#5#5#5#5#5#5#5#5#5#5#5#5
+  +#5#5#5#5#5#5#5#4#5#5#4#5#5#4#5#5#4#4#4#4#5#4#5#4#5#4#4#5#4#4#4#3#3#4#4#4#3#3
+  +#3#4#4#4#3#3#4#3#4#3#3#3#3#3#4#3#3#3#3#3#3#3#3#3#3#2#3#3#3#3#2#2#2#3#2#2#2#2
+  +#2#3#3#2#2#2#2#2#2#2#2#2#1#2#2#2#2#2#1#2#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#0
+  +#0#0#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000111444555777999;;;<<<///...///'
+  +'////.///////555766776666666666666656666666565665666566555555565555555554444'
+  +'544444433433433333333333233333322333322112...+++*+++*+++++**+**++***+***,,,'
+  +'0/011111001000100000000000000//00/00///////..//./../.-..-.-..--.--.--.-,.--'
+  +'-,,-,,-,,-,,-,,,,,,,,,,,,,,,,,,,,,,,,+,,++++,+++++++++++**+****+*********)*'
+  +')*)))))))))))))))(((())))()(((((((''(((((''(''''''''(''''''''&''''''''&'''''
+  +'&''&%&&%&%%&%%&%%&%$%%%%$%%$$$$$$#$$#$$##$#########""##"""""""""""""""""!!"'
+  +'!!!!!!!!!!!!!! !!       '#31'       '#31#31' '#31#31' '#31#31#31#31#31#30#31
+  +#31#31#31#30#31#30#30#30#30#30#30#30#30#30#30#30#30#30#30#29#30#29#30#30#30
+  +#30#29#29#29#28#29#29#29#28#29#28#29#29#27#27#28#26#25#25#25#25#25#25#25#25
+  +#25#24#25#25#26#25',,,112444888;;;'#28#27#27#22#22#22#23#23#22#22#22#22#22#22
+  +#22#22#22#22#22#22#22#21#21#22#22#21#21#21#21#20#21#21#21#20#21#21#21#21#21
+  +#20#20#20#20#20#20#20#20#20#20#19#19#20#19#19#19#19#20#19#19#19#19#19#19#19
+  +#19#18#18#19#19#18#19#18#18#19#19#18#18#18#18#18#18#18#18#18#17#17#18#18#18
+  +#17#17#17#17#17#17#17#17#17#17#17#17#17#16#17#16#17#17#17#16#17#17#16#16#16
+  +#16#16#16#16#15#16#16#16#16#15#15#15#15#15#16#15#15#15#15#15#15#14#15#15#15
+  +#15#14#15#15#14#15#14#15#14#14#14#15#14#14#14#13#14#14#14#14#14#13#14#13#13
+  +#13#13#13#14#14#13#13#13#13#13#13#12#13#13#13#13#12#12#13#12#12#12#13#13#12
+  +#12#12#12#12#12#12#11#12#11#11#11#11#11#11#11#11#11#11#11#11#11#11#11#11#11
+  +#11#11#11#10#11#11#10#10#10#10#10#10#10#11#10#10#10#10#10#10#9#9#10#9#9#10#9
+  +#9#9#9#9#9#9#9#9#9#9#9#9#9#9#8#9#9#9#9#9#8#9#9#9#8#8#8#9#8#9#8#8#8#8#8#7#8#8
+  +#7#8#8#7#7#7#7#7#8#8#7#8#8#7#7#7#7#7#7#7#7#7#7#7#6#7#7#6#7#6#6#7#7#7#6#6#6#7
+  +#6#6#6#6#6#5#6#6#6#6#5#6#5#5#6#5#6#5#5#5#5#5#5#6#5#5#5#5#5#5#5#4#5#4#5#5#4#5
+  +#4#5#4#4#4#5#4#4#4#4#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#3#4#3#4#3#3#3
+  +#3#3#4#3#3#3#3#3#3#3#3#3#3#3#2#3#3#3#2#2#3#2#2#2#2#2#3#2#3#2#2#2#3#2#2#2#2#2
+  +#2#2#1#1#1#1#2#2#1#1#1#1#1#1#1#1#1#1#1#1#0#1#1#1#1#0#0#1#0#0#0#0#1#0#0#0#0#0
+  ,#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy0000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000111333444666999;;;===111...////////////./06657767667666666666'
+  +'666666666665666666566555555665656556655555555435445444445434334333333333233'
+  +'33333232332222222111...+++++*+*+*+****,*+///11111111101101000000001000000/0'
+  +'00//0/00///////////./../../../--/--.--.--.-----.,,----,--,,-,,,,,,,,,,,,,,,'
+  +',,,,,,,+,+,++++++,,++,,+++++++++*++++******+*********))))))))))))()))(((())'
+  +'()(((((((((''(''''(''((''''(''''''''''''''&''&''''&&&&''&%&%%&%%&%%&%$%$%%%'
+  +'$%$$$#$$$$$$$$$$###########"#"##"""""""""""""""!!!!!!!!!!!!!!!  !!!        '
+  +'      '#31#31' '#31' '#31#31#31#31#31#31#31#30#31#31#31#31#31#31#31#31#30#30
+  +#30#30#30#30#30#30#29#30#30#30#29#30#29#29#29#29#29#30#29#29#29#29#29#29#28
+  +#29#27#26#27#25#25#26#25#25#25#25#25#25#25#25#25#28#28#28'-,-//0211444777,,,'
+  +#25#25#25#22#23#22#23#22#22#22#22#22#22#22#21#22#21#22#21#21#21#22#21#21#21
+  +#22#21#21#21#21#21#21#21#21#20#20#20#20#21#20#21#20#20#20#20#20#20#19#20#20
+  +#20#19#20#19#20#19#20#19#20#19#19#19#19#19#19#19#18#19#18#19#19#18#18#18#19
+  +#19#19#19#18#18#18#18#18#18#17#18#17#18#17#18#17#17#17#17#17#17#17#17#17#17
+  +#17#17#17#17#16#16#16#17#17#17#16#17#17#16#16#16#16#16#16#16#16#15#16#16#16
+  +#15#15#15#15#15#15#15#15#15#15#15#15#15#15#15#15#15#14#14#14#14#15#14#14#15
+  +#14#14#14#14#13#14#14#13#13#14#13#13#13#14#13#13#13#14#13#13#13#13#13#13#13
+  +#13#12#13#12#13#12#12#12#13#13#12#12#12#12#12#13#12#12#12#12#12#12#11#12#12
+  +#12#11#11#11#11#11#11#11#11#11#11#11#11#11#11#11#11#11#11#10#11#10#10#10#10
+  +#11#10#11#10#10#10#10#10#10#10#10#9#10#10#10#9#9#10#9#9#10#9#10#10#9#9#9#9#9
+  +#9#8#9#9#9#9#8#8#8#9#8#8#8#8#8#9#9#8#8#8#8#8#7#8#8#8#8#8#8#8#8#8#7#8#7#7#8#7
+  +#7#7#7#7#7#6#7#6#7#6#7#7#7#7#7#6#7#6#6#7#6#7#6#6#6#7#6#6#6#6#6#6#6#5#6#5#6#6
+  +#6#5#6#5#5#5#5#5#6#6#5#6#6#5#5#5#5#5#4#5#5#5#5#5#5#4#4#4#5#5#5#4#4#4#4#5#4#4
+  +#4#4#4#4#4#4#3#3#4#4#3#3#3#4#4#4#3#3#4#3#4#3#4#3#3#3#4#3#3#3#3#3#3#3#3#3#3#3
+  +#3#3#2#3#3#3#3#3#3#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2#1#1#1#2#2#2#1#1#1#1#2#2
+  +#1#1#1#1#1#1#1#1#1#1#1#1#0#0#1#1#0#0#0#1#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0'000yyy000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000333444666888:::==='
+  +'444...///////////////444867766777777666667666666666666666666666566656655655'
+  +'555655555555554444544444543444434443333333322233233222222333222222111..-++*'
+  +'+*+-,-1101221111111111101111110100010000000/00000//0///0//0///.//./../../..'
+  +'/--/-..--.--.--.,--,,-,,--,-,,,,,,,,,,,,,,,,,,,,,,,+,,,,,,+,,+++++,++++++*+'
+  +'*+++++++++************)*)*)*)*)))))))))))(()(())(((((((((''(''(''''((''''('
+  +'''''''''''''&&''&&&&&&&&&%&%%&%%&%%%$%%$$%%$$$$$$#$$$$#$$$$##########"##"#"'
+  +'""##"!"""""!!""!!"!!!!!!!!!!!! !! ! ! !     '#31#31' '#31#31#31'   '#31#31
+  +#31#31#31#31#31#31#30#30#31#30#31#31#31#30#30#30#30#30#30#30#30#30#30#30#30
+  +#30#29#30#29#30#29#29#29#29#29#29#29#29#29#29#26#26#27#26#25#26#26#26#26#26
+  +#26#26#26#26#26#31#31#31'----..0012235555650/0'#25#26#25#24#23#23#24#23#23#23
+  +#23#22#23#23#23#23#23#23#22#22#22#22#23#22#22#22#22#21#22#22#22#22#22#22#22
+  +#22#21#22#22#21#21#21#21#21#21#20#21#21#20#20#20#20#20#21#20#20#20#21#20#20
+  +#20#20#21#20#20#20#20#19#19#20#19#19#20#19#20#20#20#19#19#19#19#19#18#19#19
+  +#18#19#18#18#19#18#19#18#18#19#18#18#18#18#18#18#18#17#18#17#17#17#16#16#16
+  +#16#16#17#16#16#16#16#16#16#16#16#16#15#15#16#16#15#16#15#15#16#15#15#15#15
+  +#15#15#15#15#14#14#14#14#15#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14
+  +#14#13#13#13#13#14#14#14#13#13#14#13#13#13#13#13#13#13#12#13#13#12#13#12#13
+  +#12#12#12#13#12#12#12#12#11#12#12#12#12#11#12#11#11#12#11#11#12#12#11#11#11
+  ,#11#11#11#10#11#11#10#10#10#11#11#10#11#10#11#11#11#10#10#10#10#10#10#10#9#10
+  +#10#10#9#10#9#10#9#9#10#9#9#10#9#9#9#9#9#8#9#9#8#9#9#9#9#8#9#8#9#9#8#8#9#8#8
+  +#8#8#8#8#7#7#8#7#8#8#8#7#8#7#8#8#8#7#7#7#7#7#7#8#7#7#7#7#7#7#7#7#7#6#6#6#6#7
+  +#6#7#7#6#6#6#6#7#6#6#6#6#6#6#6#5#6#6#6#6#6#5#5#5#5#5#5#5#5#5#5#6#5#5#5#5#5#5
+  +#5#4#4#5#5#4#5#5#4#4#4#4#5#5#5#5#4#4#4#4#4#4#4#4#4#4#4#4#3#4#4#3#4#4#4#3#3#3
+  +#4#3#3#4#4#3#3#3#3#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#2#2#2#2#2#2#2#2#2
+  +#2#2#2#1#2#2#2#2#2#2#2#2#2#2#1#1#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#0#0#0#1#1#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000222444555777:::<<<888...///////////////444777877877766766766'
+  +'666667767676676666666656665666565555556655555555554544444543544533434333333'
+  +'333333333333333332222222222222222011000222122212112111111111011111111011000'
+  +'100000/0/000/0/0//0////.//./../....-/-./.-..-.-..--.-,----,,-,--,,-,-,,,,,,'
+  +',,,,,,,,,,,,,,,+,++,,,+,,,+,,++++++++*+**+*+*,+++++++++++-,+,+,-+,-++-++,++'
+  +',,++,*+*+*)))*)))))(((''(''''''(''''''''''''''&''''&''&&''&%''&&&%%&%%&%%&%'
+  +'$%$$%%$$$$$$$$#$$##$#$#$###$##########"##"""""""""""""""!"!!!!!!!!!!!!  ! !'
+  +'!! !   '#31'   '#31'  '#31'    '#31#31#31#31#31#31#31#31#31#31#31#31#31#31
+  +#30#31#30#30#31#31#31#31#31#31#31#31#31#30#31#30#30#30#31#30#30#30#30#30#31
+  +#27#27#27#27#26#27#27#26#27#27#26#27#26#26#27#28#28#28'''&''....-.1001112222'
+  +'22,,-'#29#29#28#24#23#23#24#23#23#23#23#23#22#23#23#22#22#23#23#23#23#22#22
+  +#22#22#22#22#22#22#22#21#22#22#22#21#22#21#21#22#21#22#21#21#21#21#20#21#21
+  +#20#21#20#20#21#21#21#20#20#21#20#21#20#20#20#20#20#20#19#20#20#20#19#20#19
+  +#19#19#19#19#19#19#19#19#19#19#19#18#19#19#18#18#18#18#18#19#18#19#18#18#17
+  +#18#18#18#18#18#18#17#17#17#17#17#17#17#17#17#17#17#17#17#17#17#17#16#16#16
+  +#17#17#17#16#17#16#15#15#15#15#15#15#15#15#15#15#15#15#15#15#14#14#15#15#14
+  +#14#15#14#14#14#13#14#14#13#13#14#14#13#14#13#14#13#13#13#13#13#13#13#13#13
+  +#13#13#12#13#12#12#13#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#11#12#12
+  +#11#11#11#11#11#11#12#11#11#11#11#11#11#11#11#11#11#11#11#11#11#10#10#11#10
+  +#10#10#10#10#10#10#10#10#10#9#10#10#9#10#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9
+  +#9#8#8#9#9#9#8#8#9#8#9#8#8#9#9#8#8#8#8#8#8#7#8#7#7#7#7#8#8#7#7#8#7#7#7#7#7#7
+  +#7#7#7#7#7#6#7#6#7#7#7#7#6#7#7#7#6#6#6#6#6#6#6#7#6#6#6#6#6#5#6#6#5#5#6#6#5#5
+  +#5#6#6#5#5#6#6#5#5#5#6#5#5#5#5#5#5#4#5#4#5#4#5#5#5#4#5#4#4#5#4#5#4#4#4#4#4#4
+  +#4#4#4#4#4#4#4#4#4#4#4#4#3#4#4#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2
+  +#3#3#3#3#3#3#2#2#3#3#2#3#2#2#2#2#2#2#2#2#2#2#2#1#2#2#1#1#1#1#1#1#1#1#1#1#1#1
+  +#1#1#1#1#1#1#1#1#0#1#1#1#0#1#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy0'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000222444555777999;;;;;;.../////////////'
+  +'//2227778778778778667777766667676666666766666666666666665556565555655655655'
+  +'555445445445345444334343433343333333332333322222232223322222221222212112211'
+  +'11111111111101010110101111001000000/00////0////0/./////./../.........-./...'
+  +'--.--.----,----,,-,,-,,,,,,,,,,,,,,,,,,,,,,,+,,,,+---.-----....../..0//0.//'
+  +'/.//.//.///////./../../....../-./...-...../-..-....--,++,,,***)))(((''&&&&%'
+  +'''%%&%%&%%&%%&%$%%%%$%$$$$$$$$$$$#$##$$#######"#####""""#""""""""""!"!!"!!"'
+  +'!!!!!!!!!! !!! !     !'#31' '#31' '#31#31'!!    !        '#31'   '#31'  '#31
+  +' '#31#31#31#31#31#31#30#31#31#31#30#30#30#31#30#31#30#31#27#26#27#27#26#27
+  +#27#26#27#27#26#26#27#26#27#26#26#26#27#27#27'###/////////010111111/..'#29#30
+  +#30#24#24#24#25#24#24#24#24#24#24#23#24#24#24#24#24#23#23#24#23#23#23#23#23
+  +#23#23#23#23#23#22#23#22#22#22#23#22#22#22#23#22#22#22#22#22#22#22#22#22#21
+  ,#21#22#21#22#21#21#21#21#21#21#21#21#21#20#21#20#21#20#21#21#21#20#20#21#20
+  +#20#20#20#20#19#19#18#19#18#18#18#19#18#18#19#18#19#18#19#18#18#18#19#18#19
+  +#22#22#22#25#26#26#30#29#30'!!""""'#18#18#18#17#16#17#16#16#16#16#16#16#16#16
+  +#16#16#16#16#16#16#16#16#15#15#16#15#16#15#16#15#15#14#14#14#14#14#14#14#14
+  +#13#13#14#14#13#13#13#13#13#13#13#13#13#13#14#13#13#13#13#13#13#13#13#12#13
+  +#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#11#12#12#11#11#11#11#12#11#11
+  +#11#11#11#11#11#11#11#11#10#11#11#11#11#11#11#10#10#10#10#11#11#10#10#10#10
+  +#10#10#10#10#9#9#9#9#10#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#8#8#9#8#8#9#8#9#8
+  +#8#8#8#8#8#8#8#8#8#7#8#7#8#8#8#8#7#7#7#7#8#8#8#8#7#7#7#7#7#7#7#7#7#6#7#7#7#6
+  +#7#7#6#7#6#7#6#7#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#5#5#5#6#5#6#5#5#6#5#5#5#5#5
+  +#5#5#5#5#5#4#5#4#5#4#5#4#5#4#4#4#4#5#4#4#4#4#4#5#4#4#4#4#4#4#4#4#4#4#4#4#3#4
+  +#3#4#4#4#3#3#4#3#3#4#4#3#3#4#3#4#3#3#3#3#3#3#3#3#3#3#3#3#2#2#3#3#2#2#2#2#2#2
+  +#2#2#2#2#2#2#2#2#2#1#2#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1#1#0#0#1#0#1
+  +#0#0#0#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy0000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000111444555666888:::<<<000...////////////0017778778778778778677767677676'
+  +'766666666676666666665656565666666656565655656655545445444345444344443434333'
+  +'333333333333233222322233222222322221221222121112221111111111111100101101000'
+  +'00010000/00/0/0//00///.//./../...../.-....../--.--.---------,--,,,,,,,,,,,,'
+  +',,,,,---.../..0//000/00000/0/0///////////0//0/.//.0/.//.///.././/.//.///...'
+  +'../--.-./-./.-..-.--.....-.-.-..-..------++++*+)()(''''&%%&%%%%%%$$$%%$$$$$'
+  +'$$#$$$$##$##$######"###"#"#"""#"""""""""""""!!!!!!!!!!! !!!!"""""!"!!!! !!!'
+  +'!     !      '#31'     '#31#31#31#31#31#31' '#31' '#30#31#31#31#30#30#31'  '
+  +#31#31#31#29#28#28#28#27#28#28#27#28#28#27#27#27#27#28#27#27#28#28#28#29#28
+  +#28#28'!""-.....//....///0/0///'#30#31#30#26#25#25#25#25#25#25#25#25#25#25#25
+  +#25#24#25#24#24#25#25#24#25#24#25#24#24#24#24#23#24#24#23#23#23#24#23#24#23
+  +#23#24#23#23#23#23#22#23#23#23#22#23#23#22#22#23#23#22#22#22#22#22#22#21#22
+  +#22#22#22#21#22#22#21#21#21#21#21#21#20#20#20#20#20#20#19#23#24#23#25#25#25
+  +#29#29#30#31'  !! """"!!""##""###'#31#31#31#16#17#17#16#16#16#17#16#16#16#17
+  +#16#16#16#16#15#16#16#16#16#16#16#15#16#15#15#15#16#15#15#15#15#15#15#15#15
+  +#15#15#15#14#14#14#13#14#14#14#13#13#13#14#13#13#13#13#13#13#13#12#13#13#12
+  +#13#13#12#12#12#12#12#12#12#12#12#12#12#12#12#11#11#12#12#12#12#12#11#12#11
+  +#12#11#11#12#11#11#11#11#11#11#11#11#11#11#11#10#10#11#11#11#10#11#10#10#10
+  +#10#10#10#9#10#9#10#9#10#9#10#10#9#9#10#10#9#9#9#10#9#9#9#9#9#9#9#9#9#8#8#9#8
+  +#8#9#8#9#9#8#8#8#8#8#8#9#8#8#8#8#8#8#8#8#8#7#8#8#7#7#7#7#8#7#7#7#7#7#7#7#7#7
+  +#7#6#7#7#6#7#6#7#6#6#6#6#7#6#6#6#7#6#6#6#5#6#5#6#6#6#6#5#5#5#6#6#5#5#6#5#6#5
+  +#6#5#6#5#5#5#5#5#5#5#5#5#5#5#5#4#5#4#5#4#4#4#4#4#4#4#4#5#4#4#4#4#4#4#4#4#3#4
+  +#4#4#4#3#3#4#4#3#3#4#3#3#3#4#3#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#3#2#2#2#2
+  +#3#3#2#2#2#2#2#2#2#2#2#2#2#1#1#1#1#1#2#1#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1#1
+  +#0#0#0#1#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy0000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000444555666777999;;;333...//////////////07768878778778778778777777'
+  +'667767677776766766677666666666666665566566565655556555545445445445445444334'
+  +'333333333333333332333333322233232232222232222212121212111111111111110101110'
+  +'11101110100000000000/0/00//////./../../...../../.-.--.--.--.----,----,,-,,-'
+  +'.-././/.0//00/00/00/000000000/0000000//00/////////0///..//.//./0.//////.//.'
+  +'/./......../../...--/.-..-..-......-------------------,,-,,-,,***)((&&&$$%%'
+  +'$%$$$$$$$$$$$$$$###$#########"###"#"#""""""""""""!###"#""#""!"""!""!!!!!!!!'
+  ,'!! !! !! !          !!!!! !    ! !      '#31'    !!'#30#30#30#29#28#29#29#28
+  +#29#29#28#29#28#28#28#28#28#29#28#28#29#30#30#30'   ,-,/./0/////0/0111000'#31
+  +#31#31#27#26#26#26#26#26#26#26#26#26#26#25#25#25#25#26#25#26#25#25#25#25#25
+  +#25#25#25#25#25#24#25#25#25#25#24#24#24#24#24#24#24#24#24#24#23#24#24#24#24
+  +#24#24#24#24#23#24#23#23#24#23#22#23#23#23#23#25#26#26#27#27#28#30#30#30' ! '
+  +'#"##"#"#""""#$##########$#$$%$&%&((('#26#26#26#17#18#18#18#18#18#17#16#16#16
+  +#16#16#16#17#17#16#16#16#16#16#16#16#15#16#15#15#15#16#15#16#15#15#15#15#15
+  +#15#14#15#15#15#14#15#14#15#14#15#15#14#14#14#14#13#13#13#13#13#13#13#12#13
+  +#12#13#13#13#13#12#12#12#13#13#12#12#12#12#12#12#12#11#11#12#12#12#12#11#12
+  +#11#11#11#11#11#11#11#11#11#11#11#11#10#11#11#10#11#10#10#10#10#10#10#10#10
+  +#10#10#10#10#10#10#10#9#10#10#10#10#9#9#9#9#10#9#9#9#9#9#9#9#9#9#9#9#9#9#9#8
+  +#8#8#9#8#9#9#8#8#8#8#9#8#8#8#8#8#8#8#8#8#8#8#7#8#7#8#8#8#8#7#7#8#7#7#7#7#7#7
+  +#7#7#7#7#7#7#7#7#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#5#6#6#5#5#6#6#6#6#6#6#6#5#5
+  +#5#6#6#5#5#5#5#5#5#5#4#5#5#4#5#5#5#5#4#5#5#5#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4
+  +#4#4#4#4#4#4#4#4#4#3#3#3#3#3#4#4#3#4#3#3#3#3#3#4#3#4#3#3#3#3#3#3#3#2#3#3#2#2
+  +#3#2#2#3#3#2#2#2#2#2#2#2#1#1#1#2#2#1#2#2#1#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1
+  +#1#1#1#1#1#0#1#0#0#0#1#0#0#0#0#1#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000111666777888:::<<<:::...////////////000887887887877877877877877777'
+  +'777667776667666666666666666666666656565656566555555555554544544544543434443'
+  +'334434334333333333233333322322232322232222222221222112212111211111111111011'
+  +'0101001000001000/000////0/.0/.//././/../../-./--..-..-.--.-----...//.00//0/'
+  +'0//0//0//0//00/00/00/00000000000000/00/////////////0.//./0/.//.//.////./...'
+  +'/./........./../-..--.....-..-..--.-----.---.--,,,---,-,--,--,,-,,--,+,,*()'
+  +'&''&$$$$$$$$$#$##$$#########""###""""#$##########"##""""""""""""!"!!!!!"!!!'
+  +'!!!!"""!"!!""!""!"!!!!"""""!""!!!!!!!!! !!! !!    '#31' '#30#30#30#30#29#30
+  +#29#29#29#29#29#30#30#29#29#30#29#29#29#29#29'   +,,...////0000/100011'#30#31
+  +#30#27#27#27#27#27#27#27#27#26#26#27#26#26#27#26#26#26#26#27#26#27#26#26#26
+  +#26#26#26#26#26#26#26#26#26#26#26#25#25#25#26#25#25#25#24#23#23#24#24#24#27
+  +#27#27#30#31#30'   ###$#$#$##$#$$$$$$$$$#$#$$$$$$$%$$$$$%%%%$%&&''''(*+*,,-'
+  +#21#21#21#18#18#18#18#17#17#17#17#17#17#18#17#17#17#17#17#17#17#16#16#16#16
+  +#16#16#15#16#15#15#15#16#15#16#15#15#15#15#14#15#15#15#14#14#14#15#15#15#14
+  +#14#14#14#14#14#14#14#14#14#14#14#14#14#12#12#12#12#12#13#12#12#12#12#12#12
+  +#12#12#12#11#12#11#12#12#12#11#12#12#11#11#11#11#11#11#11#11#11#11#11#10#10
+  +#11#10#10#10#10#10#11#10#11#10#10#10#11#10#10#10#10#9#10#10#10#10#10#10#9#10
+  +#9#9#9#9#10#10#9#10#9#9#9#9#9#9#9#8#8#9#8#9#9#9#8#9#8#8#8#8#8#8#8#8#9#8#8#8#8
+  +#8#7#8#8#8#7#8#7#7#7#7#7#7#8#7#7#7#7#7#7#7#7#7#7#7#7#7#7#7#7#7#7#7#6#6#6#6#6
+  +#6#6#6#6#6#6#6#6#6#5#5#6#6#5#5#5#5#5#6#6#5#5#5#5#6#5#5#5#5#5#5#5#5#5#5#5#5#4
+  +#5#4#5#4#4#4#4#4#5#4#4#5#4#4#4#4#4#4#4#4#4#4#3#3#4#4#4#3#4#4#4#3#3#4#4#3#3#3
+  +#3#3#3#3#3#3#4#3#3#3#3#3#3#3#3#2#3#3#3#3#2#2#2#2#2#2#2#2#2#2#1#1#1#1#1#2#2#1
+  +#2#2#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1#1#1#0#1#0#0#0#0#1#0#0#0#1#0#0#1#0#1
+  +#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +'000yyy000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000444777999:::<<<===222/////////'
+  +'//////333887887877877877877877767777777767767777666667667667666666666565665'
+  +'666556555665554544544534544434444333344334443333433333233232323232222223222'
+  +'22222122211212211111211211111111111101100000000000000000//0//////./../../..'
+  +'/../-./../.-./////000000000//00/0///0000//0//0//00/00/00/000000000//0/00///'
+  +'////////////0.///.//.//.//...././/.///........-......-.--/.-.....--...-----'
+  ,'.-.------,--,----,-,--,,-,,--,-,,--,+,+))(&&&$#$$$#$########$$$$#$#$$$####$'
+  +'######"######"#"#"""""""#####"""#"""""""!"##"#"##"#"""""""!""!"!""!!!!!!!!!'
+  +'!  !!       '#30#30#30#30#29#30#30#29#30#30#29#30#30#29#30#29#29#29#30#29#30
+  +#31#31' ---011111111222100/00'#31#30#30#27#27#27#27#27#27#27#27#27#27#26#27
+  +#27#27#26#27#27#27#26#26#27#26#26#26#26#26#26#26#26#26#29#28#29#31#31#31'!!!'
+  +'$$$&&&&&&&&&&&&&&&&&&&&&&&&&&&''&&&&&%%%$$%$%%&%%&%&&&&&&&&''&)*).--010((('
+  +#19#19#19#19#19#19#19#18#18#18#18#18#17#17#17#17#17#17#16#17#17#17#17#17#16
+  +#17#17#17#16#16#16#16#17#15#15#15#15#15#15#14#15#14#14#15#15#15#15#15#15#14
+  +#14#14#14#14#14#14#14#14#13#14#13#13#14#14#13#13#14#13#14#12#12#12#12#12#13
+  +#12#12#12#11#12#12#12#12#11#11#11#12#12#12#11#11#11#11#11#11#11#11#11#11#11
+  +#11#10#11#11#11#10#11#10#10#10#11#10#10#10#10#10#10#10#10#9#9#9#10#9#10#10#9
+  +#9#9#9#9#10#9#9#9#9#9#9#8#9#9#9#8#8#9#9#9#8#9#8#8#8#8#8#8#8#8#8#8#8#8#8#8#7#8
+  +#7#8#8#7#7#7#8#7#8#7#7#8#7#7#7#7#7#7#7#6#7#7#7#7#7#6#7#6#7#7#6#7#6#6#6#7#6#6
+  +#6#6#6#6#6#5#6#6#6#6#5#6#5#5#5#5#5#6#5#5#5#5#5#5#5#5#5#5#5#5#5#5#4#5#5#4#5#5
+  +#4#5#4#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#4#3#3#4#3#4#3#3#3#3#4#3#3#3
+  +#4#3#3#3#3#3#3#3#3#3#2#3#2#2#3#3#3#2#2#2#2#2#2#2#2#2#2#2#2#2#1#1#2#2#1#1#1#1
+  +#2#1#2#2#1#1#1#1#1#1#1#1#1#1#1#0#1#0#1#1#0#0#1#0#0#0#0#1#0#0#0#0#0#1#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000777999:::<<<======...//////////////0'
+  +'777887877877877877877777767777776777767766777677676666666666666666666555665'
+  +'565554644544544444544444434343334333333433333332233333233223222223222222221'
+  +'21222221221112221111111110111101011000011000000/00/0//0/.///0..//./..///000'
+  +'1/0001000100000000/000000/////0//0/00//0//00/00/00/0000000000000///////0..-'
+  +'...--.-,-,+++,++++,+++++**+*+++++,,,,,,---/....-/-...-./-..---.-.-....-----'
+  +'-----------,-,,-,,-,,-,,--,-,,,,,-,,+++((''&%&$$%$$$$$$#$$#$$$$#$#$#$######'
+  +'#####$#############$$###$$########""####"#""""""""""""""!!!!!"#""""""""!!""'
+  +'!"#""!!'#31#31#31#31#30#31#31#30#31#31#31#31#31#31#31#31#31#31'   !!!...121'
+  +'232222222000-.-'#31' '#31#28#28#29#28#28#28#27#28#28#28#28#28#30#29#29'   "'
+  +'""$$$((((''((''''((''''''''((((((((((((((()))))))))(''((())((()((((''&'''''
+  +'''''###'#31#31#31'$##((()**./.221333!!!'#20#20#20#19#20#19#20#19#20#19#18#19
+  +#18#18#18#18#18#18#18#18#17#17#18#18#17#17#16#16#16#16#16#17#16#16#16#16#16
+  +#16#16#15#14#15#15#15#15#14#15#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14
+  +#14#13#13#13#13#14#14#14#13#13#13#13#13#12#12#12#12#12#12#12#12#11#11#11#12
+  +#12#12#11#11#11#11#11#11#11#11#11#11#11#10#10#11#11#10#10#10#10#10#10#10#10
+  +#10#10#10#10#10#10#10#10#10#10#10#9#10#9#9#9#10#10#9#9#9#10#9#9#9#9#8#9#9#8#9
+  +#8#8#9#9#9#9#8#9#8#8#8#8#8#8#8#8#7#8#8#8#8#8#7#8#7#7#8#7#8#7#7#7#7#8#7#7#7#7
+  +#7#6#7#7#7#6#7#7#6#7#6#6#7#6#6#7#7#6#7#6#6#6#6#6#6#6#6#6#6#5#6#5#6#5#6#5#6#6
+  +#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#4#4#5#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4
+  +#4#4#4#4#4#4#4#4#3#4#3#4#4#3#3#3#3#3#4#3#3#3#3#3#3#3#3#3#3#3#3#2#3#2#3#3#3#3
+  +#2#3#2#3#2#2#2#2#2#2#2#2#2#2#2#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1#1#1
+  +#0#1#1#0#0#1#1#0#0#1#1#0#0#0#1#1#0#1#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy00000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0333999:::;;;===>>>767///////////////22288788787787787787787777777766777676'
+  +'776776776767666666666666665566655665555565555454454454454453444333344433433'
+  +'334333433333333333322323222222222222222221222211222111111111110111111111010'
+  +'001000000/00/00/0//0//0.////00010/11000001011010010000000000/0//////0/0//0/'
+  +'/0//0//00////...----,,++*+++))**)))))))))))(())))(())(()((((((''(''''''''&'
+  +'''''&&''&&''&&&&&&%&''''''''''''*)****,+*-..-..--.-----------,,-,-,,----,,-'
+  ,',,--+-,,--,.-.--------,*))''&&$$$$$$$$$$$#$$$$$%$%$$$$##$$#$$#$$$%$%$$$$$#$'
+  +'$#$#####$#########""""##$##########"#####$######$$$$#$$$$$###""!!! '#31'  '
+  +#31#31'! !      !!!"!"../3223331110/0////..##$&&&(((*))****+++*********++*+*'
+  +'*+***++++************++++++***)*)+*+''((%$$  !'#29#29#29#25#25#25#24#24#24
+  +#24#24#24#24#24#25'***,,,../222334223'#22#22#22#20#20#20#19#20#19#20#19#19#20
+  +#19#20#19#19#20#19#20#19#18#18#18#18#17#17#17#18#17#17#18#18#17#16#16#16#16
+  +#16#16#16#16#15#15#16#16#16#16#15#16#15#14#14#15#14#14#14#14#14#14#13#14#14
+  +#14#13#13#13#13#14#13#13#13#13#13#14#13#13#13#13#13#13#13#13#12#12#11#12#12
+  +#12#12#12#11#11#11#11#11#11#11#11#11#11#10#10#10#11#11#11#11#11#10#10#10#10
+  +#11#10#10#11#10#10#10#10#10#10#10#9#9#9#9#10#9#9#10#9#9#9#10#10#9#9#9#9#9#8#9
+  +#9#9#8#8#8#9#9#8#8#9#8#8#8#9#8#8#8#8#8#8#7#8#8#8#8#8#7#7#7#7#7#7#7#7#8#7#7#7
+  +#7#7#7#7#7#7#6#7#7#6#6#7#7#6#6#7#7#7#6#7#6#6#6#6#6#6#5#6#6#6#6#6#5#6#6#6#6#6
+  +#5#6#5#6#5#5#6#6#5#6#5#5#5#5#5#5#5#5#5#5#5#4#4#4#4#5#4#4#4#4#4#5#4#4#4#4#4#4
+  +#4#4#4#4#4#4#3#4#3#4#4#3#4#4#4#3#3#3#3#4#4#3#3#3#3#3#3#3#3#3#3#3#3#2#2#3#2#3
+  +#2#2#2#2#2#3#2#2#2#2#2#2#2#2#1#1#2#1#2#2#2#2#1#1#2#1#1#1#1#1#1#0#1#1#1#1#1#1
+  +#0#1#1#1#0#1#1#0#0#0#1#1#0#1#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy0000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00777999:::<<<===>>>//////////////////6558878778778778778777777777777776776'
+  +'767766676666666666666666566666665565656655555455545445445444444444343444433'
+  +'443433333333232333322233222322222222222221222112111211211112111111010001000'
+  +'0000000000/00/0//0/00011011011001001100100011000100100000/00000000//0/0.//-'
+  +'--,,,+++*******************)**)**)*))))))))))())()()))(()(((((((((''''''&'''
+  +'''&&''''&&&&&%%&%&%&&%&%%%%%%&%%%&&%(('')*)+++------,,---,---.,,.,,-,,-.,.-'
+  +'-.--...---------,--+++''(''$$$%%%%%%%$%$%$%%%%%%%%%$%%%$%$$$%$$$$$$$#$##$#$'
+  +'$#$%$$$$$#$$%%$$$$%$$%%%%%%%$$%$$$$$$$$$$$%%%%%$%$%$$$%%%###"!""!"""#""""""'
+  +'#####$00023322211100000//./..----,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,-,,,,,,,'
+  +'------((($%$!!!'#30#30#30#26#27#27#26#26#27#26#27#26#26#26#26#25#25#25#25#25
+  +#25#24#25#24#25#26#25' ! ---000222344676,+,'#21#21#21#21#21#21#20#20#20#20#20
+  +#19#19#19#19#19#19#19#19#19#20#19#19#19#19#19#18#17#17#17#17#18#18#18#17#17
+  +#17#17#17#17#17#17#15#16#15#16#16#16#16#15#16#15#15#15#14#14#14#14#14#14#13
+  +#14#13#13#14#14#13#13#13#13#14#14#13#14#13#13#13#13#13#13#13#13#12#13#13#13
+  +#12#11#12#11#11#11#11#11#11#11#11#11#11#11#11#11#11#10#10#11#11#11#10#10#11
+  +#10#10#10#10#10#10#10#10#10#10#9#10#10#10#9#10#9#10#10#9#9#9#9#9#10#9#9#9#9#9
+  +#9#9#9#9#8#8#9#8#9#8#9#8#8#9#8#8#8#8#8#8#8#8#8#7#7#7#8#8#8#8#8#7#7#8#8#8#7#7
+  +#7#7#7#7#7#7#7#7#7#7#7#6#7#7#6#6#7#7#7#6#6#6#7#6#7#6#6#6#6#6#5#6#6#6#5#5#6#5
+  +#6#6#6#5#6#6#5#6#6#5#5#5#5#5#5#5#5#5#5#5#5#5#4#4#5#5#4#4#4#4#4#5#4#4#4#4#4#4
+  +#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#4#3#3#3#3#3#4#3#3#3#3#3#3#3#3#3#3#3#3#3#2
+  +#2#2#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1#1#1
+  +#1#0#1#1#1#0#0#0#1#1#0#0#0#1#1#0#0#0#0#0#1#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy0000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00222999:::;;;<<<>>>999///////////////1118878778778778778777777777776767776'
+  +'766777777676677666666666666666656556655556656556455545445444344444344344334'
+  +'343433343333333333233223233222222222222222222222222111212211211111110001101'
+  +'10010100000000111111110011100110101100110110101110000010000///...-,++++****'
+  +'*********************************))*)**))))))))()))(())(())((((''(((((&'''''
+  +'&''''&&''&&&&&&&&&&&%%%%&&%%&%%%%$%%%%$%$$$%%%%''''())),+,,,---,/--.--.--..'
+  +',---..-------,--,,-.----.-,,(((%%%&&&%&&&%&%%%%%%%$$%$%%$%$$$$$$%%%%$%%%%&&'
+  +'&&%%%%%&&%%&%&&&%%&%&%%%%&&&&&&&&&&''&&&&&&&''''''''&''&&&&&&&%&$$$$#$$####'
+  ,'#######%%%&%&112344334222222122212001000000000000////.//////////./////,,,))'
+  +')%$%"""'#31#31#30#31#30#30#29#29#30#29#29#29#29#29#29#28#29#28#29#29#28#29
+  +#28#28#27#28#27#27#27#27#27#27#27#26#25#26#26#26#27#26#27#27'''''''...111332'
+  +'656887  !'#22#22#22#22#22#22#21#21#21#21#20#21#20#20#21#19#19#19#19#19#19#19
+  +#19#19#19#18#18#18#19#19#19#18#18#17#18#17#17#17#17#17#17#17#17#16#16#15#15
+  +#16#16#15#16#15#16#15#15#15#15#15#15#15#14#13#14#14#14#14#13#14#13#13#14#14
+  +#13#13#13#13#13#13#13#13#12#13#12#13#13#13#12#13#12#12#11#11#11#11#11#11#11
+  +#11#11#11#11#11#11#10#11#10#11#11#10#10#10#10#10#10#10#10#10#10#10#10#10#9#10
+  +#10#10#10#10#10#10#10#9#10#10#10#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#8#8#9#8#9#8
+  +#8#8#8#8#8#8#8#7#8#8#7#7#8#8#8#7#7#8#8#8#8#7#7#8#7#7#7#7#7#7#6#6#7#6#6#7#6#7
+  +#6#6#6#6#6#7#7#6#7#6#6#6#6#6#6#6#6#6#6#5#6#5#6#6#6#6#5#6#5#6#5#6#5#5#5#5#5#5
+  +#5#5#4#5#5#4#5#5#4#5#4#4#4#4#4#4#4#4#4#5#4#4#4#4#4#4#4#4#4#4#4#3#3#4#3#4#4#4
+  +#3#3#3#3#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#2#3#2#2#2#2#2#2#2#2#2#2#1#2#2
+  +#2#2#1#2#1#2#1#1#1#1#1#1#1#1#1#1#1#1#0#1#1#1#1#1#1#1#1#0#1#1#1#0#0#0#0#1#0#1
+  +#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000555999:::<<<===>>>222/////////'
+  +'//////444887877877877877877777767767777777777777676777666766666666666666666'
+  +'665665665555544644544544544444434444434443433333343333333333222223322323322'
+  +'222222222222212222121211221111111111110110001011211111111111111011101110101'
+  +'100100010110111/0/...,,,,++++++++***++*+*+**+*************************)****'
+  +'))*)))*))))))))())))(())(()((((((''''(''''''''''''''''&''&&&&&&&&&%&%&%&%&%'
+  +'%&%%%%$%%%%%$$%$$%$%$$$$$$''&''(((,++.--.--.--..--.--.-/..........--...-.--'
+  +'.,,,())&&%%&&%%&%%&%%%%%%&&&%&%%%%''&&&&&''''''&&''''&''&''&&&&'''''''''''''
+  +'''''&''''(''''''(()''((''''(''''(''(((()(((((((''''('''''''''')''(&&&&%%%%&'
+  +'%%%%%%%%%&&&&&&322556555444444323323222222222212221212100---***%%%!!"!"!"!!'
+  +'!!!!!!!!!     ! '#31' '#31#31#31#31#31#30#29#29#29#30#30#30#29#29#30#28#28
+  +#28#28#28#28#27#28#28#27#28#27#28#28#28#29#28#29'...000444555787666'#24#24#24
+  +#22#22#22#22#22#22#21#22#22#22#21#21#20#20#20#20#20#20#20#20#20#19#19#19#18
+  +#18#19#18#19#18#19#18#18#18#18#19#18#18#18#17#17#17#16#17#17#16#16#17#16#17
+  +#16#16#15#15#15#15#15#15#15#15#15#15#15#15#15#15#13#13#13#13#13#14#14#13#13
+  +#13#13#13#13#13#13#13#13#13#12#13#13#12#13#12#12#12#12#11#11#11#11#11#11#11
+  +#11#10#10#11#10#11#11#11#10#11#10#10#10#10#10#10#10#10#10#10#10#10#10#10#9#9
+  +#10#10#9#10#10#9#9#9#10#9#10#9#9#9#9#9#8#9#8#9#8#8#9#8#8#8#9#8#8#9#8#8#8#8#8
+  +#8#7#8#8#8#7#8#7#7#8#7#7#8#7#7#7#7#8#7#8#7#7#7#7#7#7#6#7#7#6#6#6#7#7#6#7#6#6
+  +#7#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#5#6#5#5#5#6#6#5#5#5#5#5#6#5#5#5#5#5#5#5
+  +#4#4#5#4#4#4#5#4#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#4#4#4#4#4#4#4#4#3#4#3#4#3
+  +#4#3#3#3#3#3#3#3#3#3#3#3#3#3#2#3#2#3#3#2#2#3#2#2#2#2#2#2#2#2#2#1#2#2#2#1#1#1
+  +#1#2#2#1#2#1#1#1#1#1#1#1#1#1#0#1#1#1#0#1#1#0#1#1#1#0#0#1#0#0#0#1#0#0#0#0#0#0
+  +#0#0#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy0000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000111888:::;;;<<<===;;;/////////////////07778778'
+  +'778778778777777777777776676766767676667676666666666666666666655555656546555'
+  +'455445455444444443443334444344333333344333333323233333232232223322322122222'
+  +'22212211121121211111110111111211121111122111110001001001101100110000...,---'
+  +',+,++,+,,+,,++++*++*+++******+*********************************))**))))))))'
+  +')))))())))(()()(((((''''(''&''(''''''&''''''&&&&&&&&%&%%&%%%%%%%%%%%%$$%%$$'
+  +'$$$%%%%%%%%%%%%$%$%&%))),,,.--./../..............-.---//..//....--(()&&%&'''
+  +'''&&&&&&&''&''&&''(((''''(''(''''&&''''''((((''())((())))()))))()))))))))))'
+  +')))))*)*))))))))))(()))*)()(((((''&''''&''&&&''''''''''''''''''(((334676555'
+  ,'555555455545444111-,-)))''''''%$$$$$$$$$$$$$$#$##$$$########"""!!"""!  !  !'
+  +' '#31'      '#31#30#31#30#30#30#30#29#29#29#28#29#29#28#28#29#28#28#29'$#$/'
+  +'0/222434666788+++'#22#22#22#22#22#22#22#22#22#22#22#22#22#22#22#21#21#21#21
+  +#21#21#20#20#20#20#20#20#20#20#20#18#19#19#19#18#19#18#18#18#18#18#18#18#18
+  +#18#18#18#18#17#16#17#16#16#16#16#16#16#16#16#16#15#15#15#15#14#15#14#15#14
+  +#14#14#15#13#13#13#14#13#13#13#13#13#13#13#13#13#12#12#12#12#13#12#12#12#12
+  +#13#12#12#12#12#11#11#11#11#11#11#11#10#10#10#10#11#10#11#11#10#11#10#10#10
+  +#10#10#10#10#10#10#10#9#10#10#10#10#10#9#10#9#9#9#10#9#9#9#9#9#9#9#9#9#8#9#8
+  +#8#8#9#8#8#8#8#8#8#8#8#8#7#8#8#8#8#8#7#8#8#8#8#8#7#7#8#7#7#7#7#7#7#7#7#7#6#7
+  +#7#7#7#7#7#7#6#7#7#6#6#7#6#6#6#6#6#6#6#6#6#7#6#6#6#6#6#6#6#6#5#6#6#6#5#6#6#5
+  +#5#5#5#5#5#5#5#5#5#5#5#5#4#5#4#4#4#4#5#4#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4
+  +#4#4#4#4#4#4#4#4#3#3#3#3#3#3#3#3#3#3#4#3#3#3#3#3#2#2#2#3#2#2#2#3#2#2#2#2#2#2
+  +#2#2#2#2#2#2#1#2#1#2#1#1#2#1#2#2#1#1#1#1#1#1#1#1#1#1#1#1#0#0#1#1#1#0#1#1#0#1
+  +#1#1#1#0#0#1#0#1#1#0#1#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000'
+  +'yyy000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000444999:::;;;===>>>444'
+  +'///////////////333877877877877877877777777777777767777777777666776666666666'
+  +'666666666665655665554554545544545544444444344344344434444343443333333333333'
+  +'333223222223323222222222222212121121121121211211121222222211211111111111101'
+  +'0011110/0--------,--,-,,-,+,+,,+,,++,++++++++*+*+****+*********************'
+  +'********)******))))))))))))))))())())((((((((''''((&''''''''''&''''''&&&&&%'
+  +'%&&&%%%%%%%&%%%%%$$%&%&&%%%%&%%%%%$$%%%%%%$%%%%%%(((,*+././/./..../...///..'
+  +'../..../..///0./---)))''(''((((((''(((((()(()())))))**)***))))))))))))****)'
+  +'**+*****+****+*+******,+++++,++,++,*+++*+*****((((((((()))))))))*+*777:::66'
+  +'6333///,,,((()(((((((((''(&''''&''''&&&&&&&&&%%%$$%$$%%$$################"#'
+  +'"""!!!!!"""!'#31#31#31' '#31' '#31#31#31#31#31#31#31#30#31#30#31#30'++*2234'
+  +'44776::9:;;'#31#31#31#24#25#24#23#23#23#23#23#22#22#22#22#22#22#22#22#22#22
+  +#22#22#22#21#21#21#21#21#21#20#20#20#19#20#19#19#19#19#18#19#18#18#18#18#18
+  +#18#17#18#18#17#18#17#18#16#16#16#16#16#16#17#16#16#16#16#16#15#15#14#15#15
+  +#15#15#15#15#14#15#14#13#13#13#13#13#13#13#13#13#12#13#13#13#13#12#12#12#13
+  +#12#13#12#12#13#12#12#12#12#11#11#11#10#10#11#11#11#10#10#10#11#10#10#10#10
+  +#10#10#10#10#10#10#10#9#10#10#9#10#10#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#8#8#9#8
+  +#8#8#8#8#9#8#8#8#8#8#8#8#8#8#8#8#8#8#8#8#8#8#7#7#7#8#8#7#8#7#8#7#7#7#7#7#6#7
+  +#7#6#7#6#6#6#6#7#6#7#6#6#7#6#6#6#6#6#6#6#6#6#5#6#5#6#6#6#6#5#5#6#6#6#6#6#6#6
+  +#5#5#5#6#6#5#5#5#4#5#5#5#5#5#5#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4
+  +#4#4#3#4#4#3#4#3#3#3#3#3#4#3#3#3#3#3#3#3#3#3#3#3#3#3#2#3#2#2#2#2#2#2#2#2#2#2
+  +#2#1#1#1#2#2#2#2#2#2#1#2#1#2#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#0#0#1
+  +#0#0#0#0#0#0#0#0#0#1#0#0#1#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy00000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0000000000000000000000000000000000000000000000000777:::;;;<<<======////////'
+  +'//////////76687787787787787777777777777777767677667777767767776766766666666'
+  +'666566566565464565454454455444444444444434434333334443444333333323333233233'
+  +'2222223323222222222212122121222211212211211211121221211111111111110.//....-'
+  +'.----.---------,-,+-,,,++,++,++,+++**++*+++********************************'
+  +'**)*))*)*)))*))))))())()))(((((()(((((((((((''''''&''''&&''&&&&&&%&%&%&%&&%'
+  +'%&&''&&&&&%%&&&&&%&&%&%%%%%%%&%&%%%%%%%%%&&&''''''***////0/////////////00//'
+  +'//100000201110-.-)(())))))*)**)*++***+****)****)))*+++,+++++++++*,,++++,,--'
+  +'-----,-,--,---.---,,.--.--....-..--,+,+*++*+++++++++++++.-.++,+++++,+++++++'
+  +'*+***************))())(()((((&''''''&''''''&&&''&&&&&&%%%%%%$%%$$$$$$##$###'
+  +'######!"!! !   '#31#30#31'   ""#111444666999:9:222'#25#25#25#25#25#25#24#24
+  ,#24#23#24#23#23#23#22#23#22#22#22#22#22#22#22#22#22#22#22#22#22#22#21#21#20
+  +#20#20#20#20#19#19#20#19#19#18#18#18#18#18#18#18#17#18#18#18#18#18#17#17#17
+  +#17#17#16#16#16#16#16#16#16#16#16#15#14#14#15#15#15#14#14#14#14#14#15#13#13
+  +#13#13#13#13#13#12#13#12#12#12#13#12#13#12#12#12#12#12#12#12#12#12#11#12#11
+  +#11#11#10#10#10#10#10#11#11#10#10#10#10#10#10#10#10#10#9#10#9#10#10#9#9#9#10
+  +#10#10#9#9#10#9#9#9#9#9#9#9#9#9#9#9#9#8#8#8#9#9#8#8#8#8#8#8#8#8#7#8#8#8#7#8#8
+  +#8#7#8#8#7#8#7#8#8#8#7#7#7#7#7#7#7#7#7#7#7#7#6#6#6#6#7#7#7#6#6#6#6#6#7#6#6#6
+  +#6#6#6#6#6#6#6#6#5#6#6#5#5#6#5#5#5#5#6#5#5#6#5#5#5#5#5#5#4#5#5#4#5#5#4#5#4#4
+  +#5#4#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#4#4#4#4#3#4#4#3#3#3#3#3#3#3#3#3#3#3
+  +#2#3#2#3#3#3#3#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2#1#1#2#2#2#2#1#1#2#2#1#1#1#1#1#1
+  +#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1#0#0#1#1#0#0#0#0#1#0#1#0#0#1#0#1#0#0#1#1#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0'000yyy00000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0000000222999:::;;;===>>>767///////////////11187787787787787777777777777776'
+  +'776676777666667766776777766677766666665566565565555565454554444444444433434'
+  +'444444444433334343333333333333332232233222222222222122222111221222121121121'
+  +'1211121212212111101///...-.-.-..-.-.---.-------,---,-,,,,+,,+,+,,++,+*+++++'
+  +'++***+*******************************)**)****)*))))*))))))))))(())((((((((('
+  +'(((((''''(''''''&&''&&&&&&&&''&''''&''&&''&&&&&&&&%&%&%&&%%&&''&&&&%&&&%&&&'
+  +'&''&&&&&&&&&%&&%%())..-0110000//011001212121111211311121---+++++++++*+*++*+'
+  +'++++,,,,+,+,++-,,-,,-.--.--.-.-....././//////////////////../..0/././//////.'
+  +'..---------------------------------,-,--,-,,-,,,,,,,,,,,++**+**+**+***))**+'
+  +'*+)*)*)))())()''''(''''''&''''&''''%%%$%%$$$###"""""#""" !! ! **+433667999<'
+  +'<<==='''''''#25#26#25#26#25#26#25#25#25#24#25#25#24#23#24#22#22#22#22#22#23
+  +#22#22#22#21#22#22#22#22#22#22#22#22#20#20#20#20#21#21#19#19#19#19#19#19#19
+  +#19#19#17#17#17#17#18#17#17#17#18#17#17#17#17#17#17#16#16#16#16#15#16#16#15
+  +#15#15#15#14#15#14#14#14#14#14#14#14#14#12#13#13#12#12#13#13#13#13#13#12#13
+  +#12#12#13#12#12#12#12#12#12#12#12#12#12#11#12#10#11#10#10#10#10#10#10#10#10
+  +#10#10#10#10#10#9#10#10#9#9#9#9#9#10#9#10#9#9#9#9#9#9#9#9#9#8#8#9#9#9#8#8#8#8
+  +#8#8#8#8#9#8#8#8#8#8#8#7#8#8#8#8#8#8#7#8#7#8#7#7#7#7#7#7#7#7#7#7#7#7#6#7#7#7
+  +#7#7#6#6#7#6#7#7#6#6#6#6#6#6#6#6#6#6#6#6#5#6#6#6#6#6#6#5#6#6#5#5#5#6#5#5#5#5
+  +#5#5#5#5#5#5#5#5#5#5#5#5#4#5#5#4#5#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4
+  +#4#4#4#4#4#3#4#4#3#4#3#3#3#3#3#3#3#3#3#2#3#3#3#3#3#2#2#2#2#2#3#2#2#2#1#2#2#1
+  +#2#2#2#1#1#1#1#1#1#2#1#2#1#2#1#1#1#1#1#1#1#1#1#1#1#1#0#1#1#1#0#0#1#1#1#0#1#0
+  +#0#0#0#0#1#1#1#1#1#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy0000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000666999:::<<<===>>>000///////////////5'
+  +'558778778778778777777777777777777777766767777777767676776666666666656656656'
+  +'556546555545545455444444444443343434434343433333333333333333233223222322222'
+  +'22222222222222112211221212221211210221111000../..//.....--...--..--..----.-'
+  +'-------,-,+-,+,,+,++,++,++++++++***+*+++*******************************))**'
+  +')))))))))))))))))()))()))((((((((((''''''''''''''&&''&&''''''''&&&&''''&&&'
+  +'''&&&''&&&&&&''''''''''&''&&&&&''''''''''''''''&''&''&''''&&&&&&&%&''&&&%'''
+  +'*+*00/222222112121222322222312423333000,++,,,,+,-,,-,-,,,--.....-./..//.///'
+  +'///0000/0//0000000000111111111111100100211110211211222111////////0/////////'
+  +'/00//00////////../////./----.---------..-----...------,,-,,,+*++*+**+**+())'
+  +')))''''''''''''&&&&&&$%%###############212666888:::===:::'#30#29#30#27#27#27
+  +#26#26#27#25#25#25#25#25#25#24#25#25#23#23#23#24#24#24#23#22#22#22#22#22#21
+  +#22#22#22#22#22#22#21#21#21#21#21#21#20#20#20#20#21#19#19#19#18#19#19#17#18
+  +#18#17#18#17#17#17#17#17#18#17#17#17#17#16#16#16#15#15#15#16#15#16#14#14#15
+  ,#14#14#14#14#14#14#13#14#14#13#12#13#12#13#13#13#12#12#12#12#12#12#12#12#12
+  +#11#12#12#12#12#11#11#12#10#10#11#10#10#10#10#10#11#10#10#10#10#10#10#9#10#9
+  +#10#9#10#9#10#9#9#9#9#9#9#9#9#9#9#9#9#9#8#8#9#8#8#9#8#8#9#8#8#8#8#8#8#8#8#8#8
+  +#8#8#8#8#8#8#7#8#8#8#8#7#8#7#7#7#7#7#7#7#7#7#7#7#6#7#7#6#7#7#7#7#6#7#7#6#6#6
+  +#6#7#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#5#5#5#6#5#5#6#5#5#5#5#5#5#5#5#5#5#5#5
+  +#5#5#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#3#4#3#3#4#3#3
+  +#3#3#3#3#3#3#3#2#2#3#3#3#2#2#2#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2#2#2#1#2#1#2
+  +#1#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1#0#1#0#1#0#1#0#0#1#1#1#0#0#1#0#0#0#0#0
+  +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0'000yyy00000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0000000000111999:::;;;<<<>>>:::///////////////00087787787787787777777777777'
+  +'777777777767677766766667766666666776666666556565565555454465454544445444544'
+  +'444344433444434444333333333333333333233222233232322222222221222122221122121'
+  +'12111110////.///../............-..-..-.-.----.-----------,-,+-,,,++,++,++,+'
+  +'++++++++*+*++***+**************************)**)*)*))*))))*)))))))()(()())(('
+  +'((((((((('''''''')''(((''(''''''''''''''''''''''''''''&''&'''''''''''''''''
+  +'''''''''''((''''''(((''''''&''''&''''&&''&''&(''''''''''(''(''''((''((''(,,'
+  +',111332323232334333333534645554555000----.../.0//0/0////0000000001000011111'
+  +'111232222322233333343354444443443344343345444455543332322322332222212212232'
+  +'3232322222111111221111223222222221211000000//./..--.--.--.---,,-+*,+*+))**)'
+  +'))))(((&''&&&&$%$$$%###$$$(()556998;;;>>>>>>.--'#28#29#29#29#29#28#28#27#27
+  +#27#27#27#26#26#25#25#24#24#25#25#24#25#24#25#23#24#23#23#23#23#22#22#22#21
+  +#22#22#22#22#21#21#21#21#21#21#22#20#20#20#20#20#19#19#19#19#18#18#18#17#17
+  +#18#17#17#17#17#17#17#17#17#17#17#17#17#15#16#15#15#15#15#15#16#15#14#14#14
+  +#14#14#14#14#14#13#14#14#13#13#12#13#13#12#12#12#12#12#12#12#13#11#12#12#11
+  +#12#12#12#12#12#12#12#12#11#10#10#11#10#10#10#10#10#10#10#9#10#10#10#10#10#10
+  +#9#9#10#10#9#9#9#9#9#9#9#9#9#9#9#8#9#9#9#9#8#8#9#8#9#8#8#9#8#8#8#8#8#8#8#7#8
+  +#8#8#8#8#7#8#8#8#7#7#7#7#7#7#7#7#7#7#7#7#7#6#6#7#7#7#7#6#7#7#6#6#6#6#6#6#6#7
+  +#6#6#6#6#6#6#5#6#6#5#6#6#6#5#5#6#6#5#5#5#5#5#5#5#5#5#5#5#5#5#4#5#5#5#5#5#5#4
+  +#4#4#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#3#3#3#3#3#3#3#3#3
+  +#3#3#3#3#3#2#3#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2#1#2#2#1#2#1#1#1#2#1#1#1#1#2
+  +#1#2#2#1#1#1#1#1#1#1#0#1#1#1#0#0#0#0#0#1#1#1#0#0#0#1#0#0#0#1#1#1#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0'000yyy00000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0555999:::<<<===>>>222///////////////44487787787787777777777777777777777777'
+  +'776777776677767676677666666666566555555564465554555544544444444444444444434'
+  +'4344433343333334333333333332233222222232322222222222221121121111100////////'
+  +'.//...//.////.............----.----.------------,-,,,,,,++,++,,,,++++++*+**'
+  +'*****++*****************************)****)*)***))))))))))))())((()(((((((()'
+  +'))''(((((''''(''''''''''''''''''''&''''(''''((''''(((''((''(''((''''''''('''
+  +'''''''''''''''''(''''''((((()())))())()(''())****///44444444444455566676676'
+  +'677677644400000010011012111111122233333333333334444565555555566665566666665'
+  +'666565575666676666777755655555555555555554555555555555555555555555555555555'
+  +'45454333332222221111001011/1/./--.--.---,--,,,+++***))(''''(''(''&&&%%%%%%%'
+  +'%%233898;;<<<<@@@??? !!'#29#30#29#28#29#28#28#28#28#28#28#28#27#26#26#26#26
+  +#26#25#25#25#24#24#24#24#24#24#23#23#23#23#23#23#22#21#21#21#21#22#21#22#21
+  +#21#21#21#21#21#21#20#19#20#20#20#19#18#18#18#18#18#19#18#18#18#17#17#17#17
+  +#17#16#16#17#17#17#17#17#15#16#15#15#15#16#15#15#15#14#14#14#14#14#13#14#14
+  +#13#13#13#12#12#12#12#12#12#13#12#12#12#12#12#12#12#12#11#12#11#12#12#11#12
+  +#11#10#10#10#10#10#10#10#10#9#9#10#9#9#9#10#9#10#9#9#10#9#9#9#9#9#9#9#9#9#8#9
+  ,#8#8#8#8#8#9#8#8#9#8#9#8#8#8#8#8#8#8#8#8#8#8#8#8#7#8#7#7#7#7#7#7#7#8#7#8#7#7
+  +#7#7#7#7#6#7#7#7#7#6#7#6#6#7#7#6#6#7#6#7#7#7#6#6#6#6#6#6#6#6#6#6#6#6#5#6#6#5
+  +#5#5#5#5#5#6#5#5#5#5#5#5#5#5#5#5#4#4#4#5#4#4#4#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4
+  +#4#4#4#4#4#3#4#3#3#3#4#3#4#3#3#3#3#3#3#3#3#3#3#3#2#3#3#3#3#3#2#2#2#3#2#3#2#2
+  +#2#2#2#2#2#1#2#2#2#2#2#1#1#2#1#2#2#1#1#1#1#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1
+  +#0#1#1#0#1#1#0#0#1#1#0#0#0#0#0#0#0#0#0#1#0#1#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy0000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000111888:::;;;<<<======/////////////'
+  +'////07778778778778777777777777777777776777667766777767777666677666666666656'
+  +'655556546556445545444544444444444444344433443343334334343344333323323323223'
+  +'23322322222222222212222210//00/////////////////./../..//...............-.--'
+  +'-----....-------,-,,,,+-+,,++,++,+++*+++*++**+*****************************'
+  +'*)***)***))))*)))))(())())))(((()))))))())())''()(((''((''''(((((((('''''''
+  +'''((((((((((((((''(''(''(''((((((()()()*)*))))*))))*)***+*)*+*++++,,,221655'
+  +'776666777777777977987998888433222333322333444344455566666666666666776777888'
+  +'877888988988:88998988:999999:9:9::::;::877887888889999999:::::999::99988888'
+  +'888888777777777777666666555555444434334223213111//0///.//.-.---,,,,,,,,,)))'
+  +'(((''''''''''''''''''))*999;;<===@AAA@A444  '#31#30#30#31#29#29#29#29#29#29
+  +#28#28#28#27#27#28#26#27#26#25#26#25#25#25#26#24#24#24#24#24#24#23#23#23#23
+  +#22#23#22#22#21#21#21#22#21#21#22#21#21#21#21#20#21#20#19#20#19#19#20#18#19
+  +#19#18#19#18#17#17#17#17#17#17#17#17#16#16#17#17#17#16#16#15#15#15#15#15#15
+  +#13#14#14#14#13#14#13#14#13#14#14#13#13#12#12#13#13#13#12#12#12#12#11#12#12
+  +#11#12#12#11#11#11#11#11#11#11#11#10#10#10#10#10#10#10#10#10#9#9#10#9#9#10#9
+  +#9#10#9#10#9#10#9#9#9#9#9#9#8#9#9#8#9#8#9#9#9#9#9#9#8#8#9#8#8#8#8#8#8#8#8#7#8
+  +#7#8#7#8#7#7#7#7#7#8#7#8#8#7#8#7#7#7#7#7#7#7#7#6#7#7#7#7#6#6#7#7#7#7#7#6#7#6
+  +#6#6#6#6#6#6#6#5#6#6#5#6#6#5#5#5#6#5#5#5#5#5#6#5#5#5#5#5#5#5#5#5#4#5#4#4#4#5
+  +#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#3#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3
+  +#3#3#3#3#2#3#3#2#2#2#2#2#2#1#2#2#1#2#2#2#1#2#2#1#1#2#2#2#1#1#1#1#1#1#1#1#1#2
+  +#1#1#1#1#1#1#0#1#1#1#1#0#1#0#0#1#1#1#1#1#1#0#1#1#1#1#1#0#0#0#1#0#1#1#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000'
+  +'yyy000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000333999:::'
+  +';;;===>>>556///////////////222877877877877777777777777777777777777777667666'
+  +'766667767676676776665665655555555545555555544444445544444444434443333444334'
+  +'433333433333333333333233333322322223222222011/0/000000//0////////////.///..'
+  +'//................-...-..-..-.---.-------,,,+,,+-++,++,++,**+++++**++*+***+'
+  +'*****************************))*))*))*)))))))(())())*)))*))*))))()()))''(('
+  +'''()())((((())))()(()(((()(''((((''())()(*)*)))****)*)****)***++,,,,,+++++,'
+  +'*,,+,++,,,,0/0766777888988999;9:<;;<;:;;;:::6675545555566666666667667788889'
+  +'889999::99:::;;::;;;<;;<;;<<<<<<<;;<<<<<<<<<<<<=========<<=<==<============'
+  +'=====<==<=<<<<;;;;;;::;:;::;::::899998878778666666666656646444223223111111/'
+  +'00......---,,-++++*+))*)))((''323;;;>==???BBBCCC%%& ! '#31' '#31#31' '#31#30
+  +#30#30#29#29#29#28#28#28#28#28#27#27#27#26#26#27#26#25#25#25#24#24#24#24#24
+  +#24#24#23#23#22#23#22#21#21#21#21#22#21#21#21#21#21#21#21#21#20#21#20#19#20
+  +#19#20#19#18#19#18#18#18#18#17#17#17#17#16#17#16#16#17#17#16#16#15#15#15#15
+  +#15#15#15#15#15#14#14#14#14#14#14#14#14#13#12#12#13#12#12#12#12#12#12#12#12
+  +#12#11#12#12#11#12#12#11#12#11#11#11#12#10#10#10#10#10#10#10#10#10#10#9#10#10
+  +#10#9#10#9#9#9#10#9#9#10#9#9#9#9#9#9#9#9#8#9#9#9#9#9#9#9#9#8#8#8#8#8#8#8#8#7
+  +#8#8#8#8#8#8#7#8#8#7#8#7#7#7#8#8#7#7#7#7#7#7#7#7#7#6#7#7#7#6#6#7#6#6#6#6#6#6
+  +#6#7#6#6#6#7#6#5#6#6#6#5#6#6#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#4#4#5#5#4#4#4#4
+  +#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#3#3#3#3#4#3#3#3#3#3#3#3
+  ,#3#3#3#3#3#3#2#2#2#2#2#2#3#3#2#2#2#2#2#2#2#2#2#2#2#2#1#2#2#1#1#2#2#1#1#1#1#1
+  +#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#0#1#1#1#0#0#0#0#0#0#0#0#0#1#1#0#0#0#0#0#0#0#1
+  +#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'0'
+  +'00yyy0000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000000000000000000000000000000777:'
+  +':::::<<<===>>>//////////////////6668778778777777777777777777777777776777777'
+  +'777777666776776676666666656656446556556545445454454445455444444434444334443'
+  +'443343333333323322333332322333333322221110000000/0//00/0/0//0//0////////.//'
+  +'//.///.//............-.--.---...--.-.------,--,-,+,,+,,+,++,++,+++*++****+*'
+  +'*+***************************)**********))))*)))))***)**))*)**)))))))))*))*'
+  +')))))*))*))))())()()))(()(((())))))****++*********++*,,,,,,,,,,,,,,,-,---..'
+  +',.-,-.-....00/556:9::::;;;;;;<;;<;;==<==<>>>:;;7777677778989999999:9::;<;;;'
+  +';;<<<<<<=<=<<<===>==>==?>>?==>==??>@??>??@@???@???@?@???@@@@????@???@??????'
+  +'??>>>>>>>??>>>>>>===============<<<<<<::;9:999:9898787787665565564443331112'
+  +'11001///...----,,,,+***+++,,,999>==@@@CDCDDD777###!"!!   '#31#31#31#31#31#29
+  +#30#30#29#29#29#27#27#28#27#27#27#28#27#27#26#26#26#25#25#25#24#24#24#24#23
+  +#24#24#23#23#23#23#22#21#22#21#21#21#21#21#21#20#21#20#21#20#21#20#20#19#19
+  +#18#18#18#18#18#18#17#17#17#17#17#17#16#16#17#16#17#16#16#16#17#15#15#15#15
+  +#15#15#15#15#15#13#13#14#13#13#14#13#13#13#12#12#13#12#12#12#12#12#12#12#12
+  +#11#12#12#12#11#12#11#12#11#12#10#10#10#10#10#10#10#10#10#10#10#10#10#10#10#9
+  +#10#10#9#9#9#9#9#9#9#9#9#9#9#9#9#8#9#9#9#9#9#8#9#8#8#8#8#8#8#8#8#8#8#8#8#8#8
+  +#7#8#7#8#7#7#8#8#7#7#7#7#7#7#7#7#7#7#6#7#7#7#7#7#7#6#7#7#7#7#6#6#6#7#6#6#6#6
+  +#6#6#5#6#6#5#6#6#6#5#6#6#6#6#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#4#4#4#4#4#4#5
+  +#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#4#3#3#3#4#4#4#3#3#3#3#3#3#3#3#3#3#2#3#2
+  +#3#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#1#2#1#1#2#1#2#1#2#1#1#1#1#1#1#1
+  +#2#1#1#1#1#0#1#1#1#1#1#1#1#1#1#1#0#0#1#1#1#0#1#0#0#0#1#1#1#0#0#0#0#1#1#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000222999:::;;;===>>>'
+  +'888///////////////111877877877877777777777777777777777777777766777776777666'
+  +'776666665765666655655655554554545544445554444445444344434433433443432322333'
+  +'3323323332333323332322110010000000000000///0//000//0///0////.///....././...'
+  +'.........-..--.---.....-.----------,-,,-,+,++-,+,++,+++++++++****+**+******'
+  +'***********************))**))**********)**))*))*))*)*)********)*)**)***)*)*'
+  +'))))()(((*))*********++*+*+**++++,,,,,,,,,,,,-,,-.-.....-.-./..///001//0000'
+  +'000554;:;<<<======?>>?>>@@@@@?@@????:::;;;<;;=<<<<<<<<<====>=>>>>>????@?@@@'
+  +'A@@AAABAABAABAABABBAACBBCCCCCCBCBCBBCCCCCCCCCDDDCDDCDCCDCCDCCCCBBBCCBCCBBBB'
+  +'AAAAAAA@@?@?@????@??@>>>======<<<<;<<;;;:;:8:878778667656555445434322111001'
+  +'///-..------,,,555>>?AAACBBDEDFFF())######!""   '#31#31#31#31#31#31#30#30#30
+  +#28#28#29#27#28#28#28#27#27#27#28#27#26#26#26#25#25#24#24#23#23#23#24#23#23
+  +#23#22#22#22#23#21#21#21#20#21#21#21#21#21#20#20#21#19#20#19#20#19#19#18#18
+  +#18#18#17#18#16#17#17#16#17#16#16#17#16#17#16#16#15#15#15#15#15#15#15#15#15
+  +#14#14#14#13#14#13#14#13#13#13#12#13#12#12#12#12#12#12#12#12#11#12#12#12#11
+  +#12#11#12#11#11#11#11#11#10#9#10#10#9#10#10#9#10#10#10#9#10#10#9#10#9#9#9#9#9
+  +#9#9#9#9#8#9#9#9#9#8#9#8#9#9#8#8#8#8#8#8#8#8#8#8#8#8#8#8#7#8#8#8#8#7#8#7#8#7
+  +#8#7#7#8#8#7#7#6#7#7#6#7#7#7#7#7#6#7#6#7#7#7#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6
+  +#6#6#5#6#5#5#5#5#5#5#5#5#5#5#5#4#5#5#5#5#5#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4
+  +#4#4#4#4#4#4#4#4#4#3#4#4#4#3#3#3#3#3#3#3#3#3#3#3#3#2#2#2#3#2#2#3#2#2#2#2#2#2
+  +#2#2#2#2#2#2#2#2#2#2#2#2#1#1#1#2#1#2#1#2#1#2#1#2#1#1#2#1#1#1#1#0#1#1#1#1#1#1
+  +#0#0#1#1#0#1#1#0#1#0#1#0#0#1#0#1#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000666999:::<<<===>>>111///////////////444'
+  +'877877877777777777777777777777777777677777777777777667666676665665655655645'
+  +'655545555455444544554444444444444444444423333323432322332332333322221211111'
+  +'000000000000000000000///0/////00/////.//////../../.../.......-.-....--...--'
+  +'-..-.---------,,,,-,+-++-++,++,+*+*+++**+++**+*+*************************)*'
+  +')))*+*****+*******)))*)*++**+*************+)********)))))*))+**+*+,++,+++++'
+  +'++,,,,-,,--,,,,---..-.-..//...///0/0101001101222112122333445;;;???@@@@@@A@@'
+  +'BA@BBBDCBDDCCCC====>=>>>?>>???@@?A@A@A@AAABBBCCCBCBCCCCCCDCCDDCDDDECDFDDFFE'
+  +'FEFFEEFFFFEFEFFFFFFFFFFFGGFGGGFGGFFFGFGFFFEFEFFFEEEEEEEEEDDCDDDCDDCCBBBBBBB'
+  +'AAA@@@?@?>>>>>>>=>=<=;;;::;99:888777777666555454444222000///..//..///===AA@'
+  +'CCBFGGGGG:::$%%$$####"##"""!!!'#31#31#30#30#31#31#30#30#30#28#28#28#27#27#27
+  +#27#27#27#25#26#26#26#25#26#25#24#24#23#23#24#24#23#24#22#22#22#21#21#21#21
+  +#21#21#21#20#20#20#20#20#20#21#21#19#19#19#19#19#19#18#18#18#17#17#17#17#16
+  +#17#16#16#17#16#16#16#16#16#16#15#15#15#15#15#15#14#13#14#14#13#14#13#13#13
+  +#13#13#13#12#12#12#12#12#12#12#12#12#12#11#12#11#11#12#11#11#11#11#11#11#10
+  +#10#10#10#10#9#9#10#9#10#10#10#10#9#9#10#9#9#9#9#9#9#9#9#9#9#9#8#9#9#8#9#9#9
+  +#8#8#8#9#9#8#8#8#8#8#8#8#8#8#8#8#8#7#8#8#7#8#7#8#8#7#8#8#7#7#8#7#7#7#7#7#7#7
+  +#7#6#7#7#7#6#6#7#7#7#7#7#6#6#6#6#6#6#6#6#6#6#5#6#6#5#5#5#5#5#5#5#6#5#5#5#5#5
+  +#5#5#5#5#4#4#4#5#4#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#3#3
+  +#3#3#3#4#3#3#3#3#3#2#3#3#3#3#3#2#3#2#3#3#3#3#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2#1
+  +#1#2#2#1#2#1#2#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1#0#1#1
+  +#0#0#1#0#1#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0'000yyy00000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0000111888:::;;;<<<===;;;///////////////00077787787787777777777777777777777'
+  +'777767777777667776766667666666666566565565565565555555554544455545444444554'
+  +'44443333323223224234333223323222221011102111100010010000000/00000/00/////0/'
+  +'///////////././/.////....../.......-.-..----.-----.---------,,,,,,,-+,-++,+'
+  +'+,+++*++*+**+**+***************************+++*+++***++***********+*++***+*'
+  +'*******+++**+******+**+**++*++*+,++++-,-,,,---,,---,,,,---....//.///0/11111'
+  +'2111222223323333434445555666666<==AAABBBBABEDDEEEEEDGFEGGFFFFA@AABBBAABBBBB'
+  +'BCCCCCCDDDEEFFEEFFFGFFHGGHGGIGHHGGIHHIHIIIHIIHIIIIIIIJJJJIJJJJJJJJJJJJJIJII'
+  +'JJJIIJJIIIIIIIIHHHHIIHHHIGGGGGGFFFFFFEEEEEEEEEDCCCBBCBCA@BA@A@?@???=>>=>><='
+  +'=::::::998788777777545333333212/0/000999AAADDDFGFHHHIJJ,,,&%&$%%$$#####""""'
+  +'"! !'#31#31#30#30#31#31#29#29#30#28#29#28#27#27#27#27#27#26#26#26#26#24#25
+  +#25#23#23#23#23#24#23#23#23#23#22#22#22#21#21#21#20#21#20#20#21#20#20#20#21
+  +#19#19#19#19#19#19#18#18#18#17#18#18#17#17#16#17#16#17#16#16#16#16#16#16#15
+  +#15#15#15#15#15#15#15#14#14#13#14#13#13#14#13#13#13#12#12#12#12#12#11#11#12
+  +#12#12#12#11#11#11#12#12#12#11#11#11#11#10#10#10#10#10#10#10#10#9#9#10#10#9#9
+  +#10#10#9#9#10#9#9#9#9#9#8#9#9#8#9#9#8#9#9#9#8#8#8#8#8#8#8#8#8#8#8#8#8#8#8#7#8
+  +#8#8#8#8#8#8#7#7#7#7#7#8#7#7#7#7#7#7#7#7#7#7#7#7#6#6#6#7#6#6#6#6#7#6#6#6#6#6
+  +#6#6#6#6#6#6#6#5#5#6#6#6#5#6#5#5#5#5#5#5#5#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4
+  +#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#3#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#3#2#3
+  +#3#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2#1#1#2#2#2#1#1#2#2#1#2#2#1#2#1#1#2#1#2#1#1#1
+  +#1#1#1#1#1#1#1#1#1#0#1#1#0#1#1#1#1#0#1#0#0#0#1#0#1#0#1#1#0#0#0#0#0#0#0#1#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy00000000000000000000000000000'
+  ,'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0000000000000000000000000000000000000000000555999:::;;;===>>>333///////////'
+  +'////33387787787777777777777777777777777777777767777777777667766666567666575'
+  +'565565565565555545544555444444455444433333323333333232233232232322222121121'
+  +'110121011101110000000000000/000/0//00/////0//////.//./../..././../.......-.'
+  +'....-.-..--.----------,-,-,,,,,-++-++,++,++++++***++***********************'
+  +'*+++++++++++**+++*+*+*++++*+++*+*+*+*+,++++++++*++**,++,+,,++-,,,++,,,---.-'
+  +'-.--------..././0/////000110122222212334334444544556657767667777888889==<DD'
+  +'CEEEEEEFFFGFFHHGIIIIIHIIHEEECDCDDDEEEFEFGFGGGHHHIHHHIIIIIIJIIIIIJJJKJJLKKLK'
+  +'KLLLLLKLLLMMMMMMMMMMMLMMMMMMMMMMMMMLLLMMMMMLLLLLLLLLLLLKKLKKKKKKKKKKKKJJJIH'
+  +'IHHHGGGGGGFFFFEEDDEDCDCCCBAB@@@??@???>>?===<<<:;;9:::9977766666643432222233'
+  +'3@@@DEEGGGIIHIII?>>(((''''''&&&%%$######""""!"!!!'#31#31#31#30#30#30#29#30
+  +#29#28#28#28#26#27#26#26#26#27#26#26#25#24#25#24#23#23#23#23#23#23#23#23#23
+  +#22#22#21#21#21#21#21#21#20#20#21#20#20#20#20#19#19#19#19#19#19#18#17#18#16
+  +#17#16#16#16#17#16#16#16#16#16#16#16#16#16#15#14#15#15#15#14#14#14#13#13#13
+  +#13#13#13#14#12#12#12#11#12#12#12#12#12#12#12#12#12#11#11#11#11#11#11#11#11
+  +#10#10#10#9#10#10#10#10#10#9#10#10#10#10#9#9#9#9#9#10#9#9#9#9#9#8#9#8#9#9#9#9
+  +#8#8#8#8#9#8#8#8#8#8#8#8#8#8#8#8#8#8#8#7#8#8#8#8#7#7#8#7#7#7#7#7#7#7#7#7#7#6
+  +#6#7#7#7#6#6#7#7#6#6#6#7#6#6#6#6#6#6#6#6#5#6#6#5#6#5#5#5#6#5#5#5#5#5#5#5#5#5
+  +#5#4#5#4#4#5#4#4#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#4#4#4#4#4#4#3
+  +#3#4#3#3#3#3#3#3#3#3#2#3#3#3#3#2#2#2#3#3#2#2#2#2#2#2#2#2#1#2#2#1#2#2#2#1#2#2
+  +#2#2#2#2#2#1#1#2#1#1#2#1#1#1#1#1#1#1#1#2#1#0#1#1#1#1#1#1#1#1#1#1#1#0#1#1#0#1
+  +#0#1#0#0#0#0#1#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000'
+  +'yyy000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000888:::;;;<<<======/////////////////0766877877777777777777777777777777777'
+  +'777777777777677666766666765666655655655655655555544545554554444444333333333'
+  +'3333333233223322232222212212212112111112011000010000100000000/0/0000//0/0//'
+  +'///0/////..///./././.../..............---.-.---.-------,-,-,-,,-,,,+,,+,,++'
+  +',+++*+++*++*****+*************+++++++++++++*+*++***,++++,++++++++++,,,,,+++'
+  +'+++,,,,,+---,+,-,--,,.-----...-.--.....///00000/010111222222222334343444556'
+  +'666777777878888:9:99::::;<<;<;>>?EFEHHHIIIIIHKJJLLKLLKMMLMMMHHHHHHIIIIIIIII'
+  +'KJJJKKKKKLLLMMMMLLNMMONNONNONOPOOPPPPPPPPPPPPQQQQQQQQQQQQQQQQQQRRRRRRRQQRQQ'
+  +'RRQQQRPPPOPOOPOONONONNONMMMMMMMMMLLLLLLJJJJJJIHIHGHGFFFFGFFFEDECCCCBCA@@???'
+  +'?????><=====::;9:9898767656454444=<<FFFGGGJKKKLKMLM//0)))((''&&''&&&$$$#$##'
+  +'##""!""!'#31#31#31#31#30#31#31#30#30#29#29#29#28#28#28#27#26#26#27#27#27#26
+  +#26#26#24#24#25#23#23#23#23#23#23#22#21#22#21#21#20#20#20#20#20#21#20#20#20
+  +#20#18#19#19#18#19#19#17#18#17#17#17#17#17#16#16#16#16#16#16#16#16#16#16#16
+  +#14#15#14#14#15#14#13#13#13#14#13#13#13#13#13#12#12#12#12#12#12#12#12#12#11
+  +#11#12#11#11#11#11#11#12#12#11#11#10#10#10#9#10#10#9#10#10#9#10#9#10#9#9#9#9
+  +#9#9#9#9#8#9#9#9#9#9#9#9#8#9#8#9#8#9#9#8#8#8#8#8#8#8#8#8#8#7#8#8#7#7#8#8#8#7
+  +#8#8#7#7#7#7#7#7#7#7#7#7#7#7#7#7#7#7#6#7#7#7#6#6#6#6#6#6#7#6#6#6#6#6#6#6#6#6
+  +#6#6#6#5#5#5#6#5#5#5#5#5#5#5#5#4#5#5#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4
+  +#4#4#4#4#4#4#4#4#4#4#4#3#3#3#4#4#4#3#3#3#3#3#3#3#3#3#3#2#3#2#2#2#3#2#2#2#3#2
+  +#3#2#2#2#2#2#2#2#2#2#1#2#1#2#2#1#2#1#1#1#2#2#1#1#1#2#1#1#1#2#1#1#1#1#1#1#1#1
+  +#0#1#1#0#0#1#1#0#1#0#1#0#1#0#0#0#1#1#0#0#1#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0'000yyy0000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000222999:::;;;===>>>767///////////////2128778778777'
+  +'777777777777777777777777777776777777777777666667666656656556556556555545555'
+  +'555455544544333433433343333233333322332322222213212212212102111011001010010'
+  +'0000000000000000//00////0///0///////./////...././/./.....-...--.------.----'
+  ,'--------,-,,,+,,,,+,,++,++,++++++******+**********+++++++++++++++++++,,+++,'
+  +'+,,++++,+++,,,,+++,++,+,,,-,,----...-.---.-./../...-..-../.0//0000001112222'
+  +'22232333444555666767777788888999;:;;:;<;==<=<<=====>>???AABHHHKKKLKLNMMNNMO'
+  +'NMPPOQQPQPQLLLLLKLLMMMMNNNOOOOOOPOOOOOQPPRQQRQQSRQTRRTSSTSSSRSTTTTTSUTTUUUU'
+  +'UUUUUTTUTTTTTTTTTTTTTTTSSSSSTSSSSSSSSSSSSSSSRRSQQQQQQPPOPPPPPONNONNNMMMMLML'
+  +'JLJIIIIIHGHGGGEEFEDECCDBBBAAA@@@??????<=<<;;999888777777777CCCIIIKKKLMLNNM?'
+  +'?@+,++++)))(((&''''%&%%$$###"#""!" !!'#31#31#31#30#30#31#30#30#30#28#28#28
+  +#27#26#27#26#26#27#25#25#25#24#25#24#23#23#23#23#23#23#23#22#23#21#21#22#20
+  +#20#20#21#20#20#21#20#21#20#20#19#18#19#19#17#18#18#18#17#17#16#17#17#16#16
+  +#16#16#16#16#16#16#16#14#15#15#14#14#15#15#14#14#14#13#13#13#13#13#13#13#13
+  +#11#12#12#12#11#11#12#12#12#11#12#11#11#11#11#11#11#11#9#10#10#9#10#10#10#9
+  +#10#10#10#9#9#10#9#10#9#9#9#9#9#9#9#9#9#8#9#9#9#9#8#8#9#9#8#8#9#8#8#9#8#8#8#8
+  +#8#8#8#8#8#8#8#7#7#7#7#8#8#7#8#7#7#8#7#7#7#7#7#7#7#6#7#7#7#7#7#6#6#6#6#6#6#7
+  +#6#6#6#7#6#6#6#6#5#5#5#5#6#5#6#5#5#6#6#5#5#5#5#4#5#5#4#5#4#5#4#5#4#4#4#4#4#4
+  +#4#4#4#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#2
+  +#3#2#3#3#2#3#2#2#2#2#2#2#2#2#2#2#2#2#1#2#2#2#2#2#2#1#2#1#2#1#2#1#2#2#1#1#2#1
+  +#1#1#1#1#1#1#1#1#0#1#1#1#1#1#1#1#0#1#1#0#0#0#1#0#1#1#0#1#1#0#1#1#1#1#1#0#1#0
+  +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000777999:::<<<======000/////////'
+  +'//////555877877777777777777777777777777777777777777777777767766776666665665'
+  +'655655656655555555555554444433344333433343333333333322223322322222221221221'
+  +'21111110111111001000001000000/000//00/0//00///0////..////////.//../.../....'
+  +'..---.-...-..--------------,,,-,,,,+,+,,++,++,+*+*++++**+++****++++++++++++'
+  +'++++++,,,,,,+,,,,,,+++++,,,,,,,,,,++,,---.---......./...././////..0//000111'
+  +'011111222222333344445565666777777887988:99;<;;;;==<===>==@>??>?@@AAAABBBCCC'
+  +'CCCJKJNNNONORPQRQRSSRSSRTTSTTUONNOOOPQPQQQRRRSRSSTSUTTUUUUTTUUUVVUVVVWVVWWW'
+  +'XWWXXXXXXXXXXXXXXXXXXYYYYYYYYYYYYYYYYYYYYYYXXXXYYXXWWWWWVVUVUVVUUUUUVTTTTTT'
+  +'SSSRRSQQRPPPOOOOOONNNMMMLKLJJKIIIHHHGGGEEEFEECCCBBBAAA@@@???<<<;;;::9889898'
+  +'AABIIIKKKNNNPOONOO///---++++++)()''(''&&&%%&$$$####""!"! !!'#31#31#31#30#30
+  +#30#29#29#29#28#28#27#27#27#27#26#26#26#25#25#25#24#24#24#22#23#23#22#23#23
+  +#21#22#21#21#20#21#21#20#21#20#21#20#20#20#20#19#18#19#18#19#19#17#17#18#17
+  +#16#17#16#16#16#16#16#16#16#16#16#15#15#15#15#14#14#14#14#14#14#13#13#13#13
+  +#13#13#13#12#12#12#11#12#12#11#11#12#12#11#11#12#11#11#11#11#11#11#10#10#10#9
+  +#10#9#9#10#9#9#9#10#9#9#9#10#9#9#9#9#10#9#9#9#9#9#9#9#9#9#8#9#9#9#8#9#9#8#8#8
+  +#8#8#7#8#8#8#8#7#7#8#8#8#8#7#7#7#8#7#7#7#7#7#7#7#7#7#7#7#7#7#6#7#6#7#7#6#6#6
+  +#6#6#6#6#6#6#6#6#6#6#6#6#5#6#6#5#6#6#6#5#5#5#5#5#4#5#5#5#5#5#4#5#5#4#4#4#4#4
+  +#4#5#4#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3
+  +#3#3#3#2#3#3#3#2#3#2#3#2#2#3#2#2#2#2#2#2#2#2#2#2#1#2#2#2#1#2#2#1#2#1#2#2#1#2
+  +#1#2#1#1#1#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1#1#1#0#1#1#0#1
+  +#0#0#0#0#0#0#1#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy0000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000000111999:::;;;<<<===999///////'
+  +'////////0018778777777777777777777777777777777777777777777777777777767766656'
+  +'666556566566565554554554444444433444334333433333333332332223322223222212213'
+  +'212212112102011011000001000000000000000///0/0///0////////////.///.////./...'
+  +'.........-.-.-.---.----.-.,-----,-,,,+,,,,+,,++,++,++++*++++*++++++++++++++'
+  +'+++++,,,,,,,,,,+,,+,,-,-,--,,,,,---,-,-.-/././/.../////////0/00./1001002112'
+  +'223333222223345555545567777778899999::<<<;<;===>==>>>@@@A@AAABBABCCCCCDDCDF'
+  +'EFFFGHGGMMMSSSSSSUSTWUVWWVWWVXXWXXXTTTSSSUUUUUUVVVWWWXWWWWWYXYZYYZYYZYZ\[Z\'
+  +'[\\[[[[[\\\\]]]\]]]]]^]]]]]\]]]]]\\\\]\\\\\\\\\[[\\[\[[\[[[[[[[[[ZZYXYXXXXX'
+  +'XXWWWVVVUUUUUUTTTRQRQQQQPQOOOONOMMMKKKKKKIIIHHHGGGFFFEEECCCBBA@@@>>>===<<<<'
+  ,';;<<<HIHMNMNNNPPPQRRABB......---+++*++)((''''''&''&#$$##$##"!""!!!'#31#31#31
+  +#30#30#30#30#30#30#29#29#29#28#28#27#26#26#26#25#25#26#24#24#24#23#23#22#23
+  +#22#23#22#21#21#21#21#21#21#20#20#20#20#20#20#19#20#20#20#20#19#19#18#17#18
+  +#17#17#17#17#16#16#16#16#16#16#16#16#16#15#15#15#14#15#14#14#14#15#13#13#14
+  +#13#14#13#13#13#13#11#12#11#12#12#12#11#12#11#12#12#11#11#11#11#11#11#11#10
+  +#10#9#9#9#9#10#10#10#10#9#10#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#8#8#8#8#8#8#8#8
+  +#9#8#8#8#8#8#8#8#8#8#8#8#8#7#8#8#7#8#7#7#7#7#7#7#7#7#7#7#7#7#7#7#7#7#7#7#6#6
+  +#7#6#6#7#6#6#6#6#6#6#6#6#6#5#6#6#5#6#6#6#5#6#5#6#5#5#5#5#5#5#5#5#4#4#4#5#5#4
+  +#5#4#4#4#4#4#5#4#4#5#5#5#4#5#4#4#4#4#4#4#4#4#4#3#4#3#3#3#3#4#3#3#3#3#3#3#3#3
+  +#3#3#3#3#3#3#3#2#3#3#2#3#2#2#2#2#2#2#2#2#2#2#2#2#1#2#2#2#1#2#2#2#1#1#1#2#2#2
+  +#2#1#1#1#1#1#1#2#1#2#1#1#1#1#1#1#1#1#1#1#0#1#1#1#1#1#0#1#0#1#0#0#0#1#0#0#1#0
+  +#0#0#0#1#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy00000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0000000000000000000000000000000000000000000000000000444999:::;;;===>>>222//'
+  +'/////////////44487787777777777777777777777777777777777777777667777777677676'
+  +'666565665565565565555544444434444444433343334333333333333333332322222233232'
+  +'122122112121111111110110001000100000000000/00//00////////////////////././..'
+  +'//...............--.---.-.-------------,-,+,,+,+,,++,++,+++*+,,++,++,++++++'
+  +'++++,,,,,,,,,,,,,,,---,----,-,----.--...///./././/0//0/00000011111222221232'
+  +'2433323443444655666777888877::9:::;;;<<<===>=>>>>A@@AAABBBBBBDCCEDDFEFGFGGG'
+  +'HHIIIIIKJKKLLOOOVVVWVWXXW[YZ[[[\\[\]\\\[XXYYYXYYYZZZ[[[[[[\\\\\\]]]^]]_^^_^'
+  +'^_^_`__`````````aaa```bbaabaaaaaaabbbbaaaabaaaa`aa`a`````a______^^^^]]^]^\\'
+  +']\\\[[[[[[ZZYXXYWWWWVVVUVUTTSSSRQRPPPPPPNNNMNNKKLJKJIIIHHHGGGEDDDCDAABAAA??'
+  +'?>>><<<FFFNNNOOORRRSSSPPP121100......---*+***))((''''''%%%$$$###""""!!   '
+  +#31#31#31#30#29#30#29#28#29#28#27#27#26#26#26#26#27#26#25#25#25#24#23#24#23
+  +#22#23#23#23#22#21#22#21#20#20#20#20#20#20#20#20#20#20#20#20#19#18#19#17#17
+  +#17#17#17#17#16#16#16#16#16#16#16#15#16#16#16#15#15#15#15#15#14#15#13#13#13
+  +#13#13#13#13#13#13#11#12#12#11#11#12#12#11#12#11#11#12#11#11#11#11#11#11#10
+  +#10#10#10#10#10#10#10#9#9#10#10#9#9#9#9#9#10#9#9#9#9#9#9#8#8#8#9#9#8#8#9#8#8
+  +#9#9#8#8#8#8#8#8#8#8#8#7#8#7#8#7#8#7#8#8#7#7#7#7#7#7#7#7#7#7#7#7#6#7#6#7#6#7
+  +#7#6#6#6#6#6#6#6#6#6#6#6#5#6#6#6#5#6#6#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#4#5
+  +#5#5#5#5#4#4#4#4#4#4#4#4#4#4#4#5#4#5#4#4#4#4#4#4#4#4#3#3#3#4#3#3#3#3#3#3#3#3
+  +#3#3#3#3#3#3#2#3#3#3#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2#2#2#1
+  +#1#1#2#2#1#2#1#2#1#1#2#1#1#1#1#1#1#1#1#1#0#1#1#0#1#0#1#1#1#0#1#1#1#1#0#0#0#0
+  +#1#0#1#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy0000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000000000111777999:::<<<===<<<////'
+  +'/////////////07778777777777777777777777777777777777777777777777777766767666'
+  +'666567566556566554444444444444444444333334433333333333333333323322332323322'
+  +'21221322211211201210110100001000000000000000///00/////////////././////////.'
+  +'./../../...--...-...--.----------,-----,,-,,,,,,++,++,++-,,,+,,,+++,++++,+,'
+  +',,,,,,,,,,,,,,------------.-./.....//0////////0//00000001112123222234444344'
+  +'33544666666777888888999:::<;<<<====>?>???AA@AAABBBBCBDDDEEEGGGGGGHHHJIIKJKK'
+  +'KLMMMMMNNONPOOSSS[[[\[\]\]]]\___``_aa````\\\]\\^]]^^^_```__```baabaabbbcccd'
+  +'cccccdddeeeeeeeeeeeeeeeeeefffffffffeeeffeefeeefeeedddddccdddccbbbbbbbbb`aa`'
+  +'`a___^^^]]]]]][[[ZZZZYZXWXWWWVUVTUUSSSRRRPPPPPPNNMMNMKKKJJJIIIGHGEDECCCBBBA'
+  +'AA@@@A@AOOOQQQSSSTTTUVVAAA333100000......+++*+*)))''''''&&&%%$$#####!!!!!!'
+  +#31#31#31#30#30#30#29#30#29#29#29#29#26#26#26#26#26#26#25#25#25#24#24#24#23
+  +#23#23#22#23#22#21#22#21#21#20#20#20#20#20#20#20#20#20#20#20#19#19#19#19#19
+  +#18#17#17#17#16#17#16#16#16#16#16#16#16#16#15#16#14#15#15#15#15#15#13#14#13
+  +#13#13#13#13#13#13#12#11#12#11#11#12#11#11#11#11#12#11#11#11#11#11#11#11#10
+  +#10#9#10#9#9#10#9#9#10#10#9#9#9#9#10#9#9#9#9#9#9#9#9#9#8#9#8#9#9#8#9#8#8#8#8
+  ,#8#8#8#8#9#8#8#8#8#7#8#8#8#7#8#8#7#7#7#7#7#7#8#7#7#7#7#7#7#7#7#7#6#7#6#6#7#6
+  +#6#7#6#7#6#6#6#6#6#6#6#6#6#6#6#6#5#6#6#5#5#5#5#5#5#5#4#5#4#5#5#5#5#5#4#5#5#4
+  +#5#4#4#5#4#4#5#5#4#5#4#4#4#4#4#4#4#4#4#4#4#4#3#4#4#4#3#4#3#3#3#3#3#3#3#3#3#3
+  +#3#3#3#3#2#3#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2#1#2#2#2#1#2#1
+  +#2#2#1#2#1#2#1#1#1#1#1#2#1#1#1#1#1#1#1#0#1#1#1#1#1#1#0#1#0#0#0#1#0#0#1#1#1#0
+  +#1#0#1#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy00000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0000000000000000000000000000000000000000000333777999;;;===>>>555///////////'
+  +'////33387777777777777777777777777777777777777777777777777677677676676665666'
+  +'565645445444444444344444443444434343333333333332332323332323232222222132222'
+  +'12212112111112001110100000000000000/0/0/0/0///////////////.////.//.....//..'
+  +'..........-...-.-.--------,----,,,-,+,,+,++-,,-,,,,,,,+,+,+++,-,,,,,,,,,,,,'
+  +',------------...////////////10100000011011111233433344444445555565676687788'
+  +'7888999:;:;;;=========?>>@@@AABBBBCBCDDEEFEHGHHHHIIIJJJKKLMLMNMNNNNOOPPOPRR'
+  +'RRRRTUUXXX___```a`ababccbeedeedeee```aaabbbdccdccdddfddfefgffgffggfhhhiihii'
+  +'hiiiiiiijjkkkkjkjjjjjjjjjjjjjijjiijiiiiiiiiiiihhhghggghffffffdeddddccccccbb'
+  +'b``a`_`^^^^]^]\]\[\YYYYYYWWWVVVTTTRSSRRRPPPOOOMMMLLLJJJIHIGGFEEECCCCCCAAALK'
+  +'KRSRTTTVVVXXXONO656434222010///...,,,+,+***(((''''''&%&#$$###""#!"!   '#30
+  +#31#31#29#30#29#28#28#29#28#28#28#26#26#26#26#26#26#24#24#24#23#23#23#23#23
+  +#22#21#21#22#21#21#21#20#20#20#19#20#20#20#20#20#18#18#19#19#18#18#17#17#17
+  +#16#17#16#15#16#16#16#15#16#16#15#16#14#15#15#15#14#14#13#13#13#13#13#13#13
+  +#13#13#12#12#12#11#12#12#12#11#11#11#11#11#12#11#11#11#11#11#10#10#10#10#10
+  +#10#10#10#10#9#9#9#9#9#10#10#10#9#9#9#9#8#9#9#8#8#9#9#8#9#9#9#8#8#8#8#8#8#8#9
+  +#8#9#8#8#8#8#8#8#7#8#7#7#7#8#7#7#7#7#7#7#7#7#7#7#7#7#7#6#7#6#6#6#6#7#6#6#6#6
+  +#6#6#6#6#6#6#6#6#6#5#6#5#5#5#5#6#5#5#5#5#5#5#4#5#5#4#5#5#5#5#4#5#5#5#4#5#5#5
+  +#5#5#4#5#4#4#5#4#4#4#4#4#4#4#4#3#4#4#4#4#4#3#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3
+  +#3#2#2#3#3#2#3#2#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2#2#1#1#1#2#2#1#1#2#1#2#2#1
+  +#1#1#1#1#1#2#1#1#1#1#1#1#1#1#1#1#1#0#0#1#1#0#1#0#0#0#0#1#1#1#1#1#0#1#0#0#0#0
+  +#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0'000yyy0000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000555888:::<<<>>>???000///////////////6668777'
+  +'777777777777777777777777777777777777777776777767766766657566654444445444444'
+  +'444444444443434343434334343333433333323333232233333322322212222212211112012'
+  +'102011100001000000000000/0//0//0/0//0/////////.//../../......./............'
+  +'-.-...-----------,---,,,,+.-,-,,-,,-,,-,+,,+-,--,-,-,,,-,,,------------.../'
+  +'//////00///110101111111122233433333454555555656878777989988:99;;:;;:<=<===>'
+  +'>>???AAAAAACCCCDCEFEFFFHHHHHHIIIJKJLLLMMMNNNPOPQQQRQRTSTTTTUUUVUVWWXXXX^^^c'
+  +'cceeeeddgffihhjjijjighhfeegggggghhhhhhiiijjjkkjlkklkklklmllnmnmmnmmmnnnnnmo'
+  +'oooonoonnnnoooooonnnnnnnnnnnnmmmlmmllllkkkkkjjjijjihihhhhghfffeeeddddccbbca'
+  +'`a___^^^]]]\[\YYYYYYWWWVVVTTTSRRQQQPPPNNNMMMJJJIIJGGGFGFEEDHGISSTUVVWWWYYY['
+  +'[[===6766563331110/0///...--,++*)))''''''&''&%%%##$###!!!!!!'#30#31#31#30#30
+  +#29#30#29#29#27#27#27#26#27#26#26#26#26#25#25#25#24#24#24#22#22#22#22#22#22
+  +#21#21#21#20#20#20#20#20#20#20#20#19#19#18#19#18#19#18#17#17#17#17#16#16#16
+  +#16#16#16#16#16#16#16#15#15#14#14#14#15#15#13#13#13#13#13#13#13#13#13#12#12
+  +#12#12#12#12#11#11#11#12#11#11#11#11#11#11#11#11#10#10#10#9#10#9#10#9#10#10
+  +#10#9#10#9#10#9#9#10#9#9#9#9#9#8#9#9#8#9#8#9#9#9#8#8#8#8#8#8#8#8#8#8#8#8#8#8
+  +#7#8#7#7#7#7#7#8#7#7#7#7#7#7#7#7#7#7#7#7#7#7#7#7#6#7#7#7#7#6#6#6#6#6#6#6#6#6
+  +#6#6#6#6#5#6#5#6#5#5#5#5#5#5#4#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#4#5#4#5#4#5#4#4
+  +#4#4#4#4#4#4#4#4#4#4#3#4#4#4#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#2#2#3#3#2#3#2
+  +#2#3#2#2#2#2#2#2#2#2#2#1#2#2#2#2#2#2#1#1#2#1#1#1#2#1#2#2#1#1#2#1#1#1#1#1#1#2
+  +#1#1#1#1#1#1#1#1#1#1#0#1#0#1#1#1#1#1#0#1#1#1#0#0#0#1#1#0#1#0#0#0#0#1#0#0#1#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000'
+  +'yyy000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000555888:::<<<>>>===/////////////////0777877777777777777777777'
+  +'777777777777777777777777777776766776765766555544444454444444444444444444444'
+  +'334444433433343333333333233333323233222222221222221221111200211100100000100'
+  +'0000000/0000/00/////0/0/////////////..././/...............-.--...--.-.-----'
+  +'-----,-.---,--,--,-,,-,,.---,--,-,-,,,,------------...///000000000111100112'
+  +'111222233434434444555555777878999999:99;:;<<;=<<===>=>???@@@BCBCCCCDDEEDFFF'
+  +'HGGHHHJJJKKKMMMMMMOPOPQPRRRSRRTTTUUVVUVXXXXXY[Z[[[[\]\]]]eddhhhjjjjjilllmml'
+  +'oonoonllljjjlllmmmmmmnnnonoooopppqppqppqqqrrrrrrsrrrrrrrrsssssssssttttttttt'
+  +'stsrrsrrsrrsqqqqqqqqqppppppooonnnnmnmlmlllkkkjjjiiihgggfgeeedcdcbcaaa`_`^^^'
+  +']\\[[[YYYYYXVWVUUVSSSRRRQQQNNOLLLKKKIIIHHHHHHSSRYXYYYY[\[]]]NNN999888767444'
+  +'4331110/0.....-,++***(((&&''&%&#$$###"""! !   '#29#29#29#29#29#29#28#28#28
+  +#26#26#26#26#26#26#25#25#25#23#23#23#23#23#23#22#22#22#21#21#21#20#20#20#20
+  +#20#20#20#20#19#20#19#20#19#18#19#17#18#17#16#17#16#16#16#16#16#15#16#16#16
+  +#16#15#14#14#15#15#14#14#14#13#13#13#13#13#12#13#12#11#12#12#12#12#12#11#12
+  +#12#11#12#11#11#11#11#11#11#10#10#10#10#10#10#9#9#10#9#10#10#9#9#9#9#9#9#9#9
+  +#9#9#9#9#9#8#9#9#8#8#8#8#9#8#9#8#8#8#8#8#8#8#8#8#8#7#8#7#8#7#7#7#7#8#7#8#8#7
+  +#7#7#7#7#7#7#7#7#7#7#7#6#6#6#6#7#6#7#6#6#6#6#6#6#5#6#5#5#5#6#5#6#5#5#5#5#5#5
+  +#5#5#5#5#5#4#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#4#5#4#5#4#4#4#4#5#4#4#3#4#4#4#4#4
+  +#3#3#3#3#3#3#3#3#3#2#3#3#3#3#3#2#3#2#3#2#3#3#2#2#2#2#2#3#2#2#2#2#2#3#2#2#2#2
+  +#2#1#2#2#2#1#2#2#1#2#1#2#1#2#2#1#1#1#1#1#1#1#1#1#1#2#1#1#1#1#1#1#1#1#1#1#1#1
+  +#1#0#1#1#0#1#1#1#1#1#0#1#0#1#1#0#1#0#1#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000222555777:::<<<>>>'
+  +'333///////////////444877877877777777777777777777777777777777777777777777777'
+  +'776776766666534543544444444444444445443444444443433344433433333434333323333'
+  +'333233332322232222222221221111111210200100001011000000//000/0///0//0/0/0///'
+  +'//////////././//..../......-..-.-.......--------........----.-,-,,.--.--.--'
+  +'-----,.-----------...///000000000111111112222332333444555555655666777888999'
+  +':99;;:;;<<;<>=>>>=@??@??BBBBBBCCCDDDFFFHHHIHIJIIKLKMMMNNNONOQQPSRRTTTTUTVVV'
+  +'XXXYYYZZZ[[[]]]]]^_^_aaabbbcbbiiimmmonnonorqprrqssrttsqpqoooqqqrqqsrrssrttt'
+  +'uttuuuvvvvvvwwvwwwwwwxxxxxxxxxxxwyxxyxxyxxxxxxxxxxxvwvwvwvvvvvvvuvuvuttusss'
+  +'sssrrrqqqpppooonnnmmnllljjkjijhhhgggeeedddbbbaaa_`__^_\\\[[[YYYXWXUVUTTURRR'
+  +'OPPOONMLLLKKJJJPPP[[[^]^___aa````???:::999787565333112/00///.--,,,+**)))&'''
+  +'''&%%%$%###"""! !  '#31#31#31#31#30#29#30#28#29#29#28#27#27#26#26#26#25#25
+  +#25#24#23#24#22#23#22#22#22#22#21#21#21#20#20#20#19#20#20#20#20#20#20#20#20
+  +#18#19#18#18#17#18#16#16#17#16#16#16#15#16#16#16#16#15#14#15#14#15#14#14#14
+  +#13#14#13#13#13#13#13#13#12#12#12#12#11#11#11#12#11#11#11#12#11#11#11#11#11
+  +#11#10#10#10#10#9#10#9#9#9#9#10#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#8#8#9#9#8#8#8
+  +#9#8#8#9#8#8#8#8#8#8#8#8#7#8#8#8#8#8#7#7#8#7#7#7#7#8#7#7#7#7#7#7#7#6#6#6#6#6
+  +#6#6#6#6#6#6#6#6#6#5#5#5#6#5#6#5#5#5#5#5#5#5#5#5#5#5#4#5#5#5#5#5#5#5#5#5#5#5
+  +#5#5#5#5#4#4#5#4#4#4#4#4#4#4#4#4#3#4#4#3#3#4#3#3#3#3#3#4#3#3#3#3#3#3#3#3#3#3
+  +#2#3#3#3#2#3#2#2#2#2#2#2#2#3#2#2#2#2#2#2#2#2#2#2#2#1#2#2#2#2#2#2#2#2#1#1#2#2
+  +#1#1#1#2#1#2#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#0#0#1#1#1#1#1#1#0#1#0#1#1#0#0#1#0
+  +#1#1#0#1#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0'000yyy0000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  ,'00000000000000000000000333555888:::<<<:::///////////////0018778778778777777'
+  +'777777777777777777777777777777777777777777767766664344445334444444544544444'
+  +'454444444344444344443434343333333333333333233333332232223222222222212212111'
+  +'111102101100000100000000000//////////0/00///////.././/./...//.../..........'
+  +'-.-..--..--.........-....---,....--.--.-,---....-.---......///0000000001111'
+  +'1122221233244345465655556667698888999:;::;;;===>>>?>>???A@ABAACCCCCCEEDEEEG'
+  +'GGHHHIIILLLLMMNNNOOOPPPRSSSSSTTUWVVYXXYYY[[[\\[^^____```babbbcedeeefggghhho'
+  +'oossssrsvutvvuxxwxxwxxxttuvuuwvvwvvxwwyyyyxyzyy{{z{{{{{{|||}|}|}|}}}}}}}}}}'
+  +'}}}}}}}|}|||||||||||||||||{{{{{{zzzyyyyyyxxxwwwvvvuvvtttsssrrrqqqpopnnnmmml'
+  +'lliiihhhgggfefccdbbbaaa___^^^[[[ZZZXYXUUUTTTRQRPQPOOOONNPPP^^]```cccefefgfM'
+  +'MM===<<<999898666444232110/00...-.-+++***(((''&''%%%######!!! !!'#31#31#30
+  +#29#30#30#28#29#29#27#27#27#26#26#26#25#24#24#23#24#24#22#22#22#23#23#23#21
+  +#22#21#20#20#20#19#20#20#20#20#19#20#19#19#18#19#18#17#17#17#17#17#17#16#16
+  +#16#16#16#15#16#15#16#14#14#14#15#14#14#14#13#13#13#13#13#13#13#13#12#12#12
+  +#12#12#12#11#11#11#11#11#11#11#11#11#11#11#11#10#10#10#9#10#10#10#10#10#9#10
+  +#10#9#9#9#9#10#9#9#9#9#9#9#9#9#9#9#9#9#9#8#8#8#8#9#8#8#8#8#8#8#8#8#8#7#8#7#7
+  +#8#7#8#7#8#8#7#7#7#7#7#7#7#7#7#7#7#7#7#6#7#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#5#6
+  +#6#5#5#6#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#4#5#4#4#5#5#5#4#4#5#4#4#4#4#4#4
+  +#4#4#4#4#4#4#4#4#3#3#3#3#3#4#3#3#3#3#3#3#3#3#3#3#3#3#2#3#2#3#3#2#3#3#2#3#2#2
+  +#2#2#2#2#2#2#2#2#1#2#2#2#1#1#2#2#1#2#1#1#2#1#2#2#1#1#2#1#1#1#2#1#1#1#1#1#1#1
+  +#1#1#0#1#1#1#0#1#1#1#1#1#1#1#0#1#1#0#1#1#0#0#0#0#1#0#0#1#0#0#0#0#1#0#0#0#1#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy0000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000000000000000000000111444666888;'
+  +';;===222///////////////5558778778778777777777777777777777777777777777777777'
+  +'777777777777665544444444445444434445454455544544444444444344444444444344333'
+  +'333333333332333233322233322222212222212212112012111011100010010000000/00///'
+  +'//////0///////////////.////.//............-.-..-..-../.........-..-.././...'
+  +'.-..-.--/../-..-....//.//0000000000111111222222333555545656666666777999:::9'
+  +':::::<<<>==>>>???@@@BABCBCDCCEDDFEEHGHHHHJJIKKKLLLNNNONOPQPRRRSSSUUUWWWYYYZ'
+  +'ZY\[[]]]___`````adcdedefefggghhiiijjjklmmonnuuuxxxxwx{zz{{z}}|}}|}}}zyy{zz|'
+  +'|{}||~}}~~~}~'#128#128''#129#128#129#128#128#129#128#128#128#128#129#129
+  +#130#130#130#130#129#129#130#130#130#131#130#130#130#130#130#130#130#130#130
+  +#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#129#129
+  +#129#129#129#128#128''#128'~~~~~~~~~~~}{{|{{{zzzyyxxyyvvvuuutttsrsqqqooonnn'
+  +'lllkkkiiihhhfffeddcdcbbb`_`^^][[[Z[[WWWVVVUUUSSSSTSYYYcccfffhhhjjjjjkaaa@@@'
+  +'???;<;;:;999777666333121/00///--.+++***''''(&''''%%%######""!   '#31#30#31
+  +#30#29#30#30#29#29#27#27#28#26#26#26#26#26#25#23#23#24#23#22#23#22#22#22#21
+  +#22#21#20#20#20#19#20#20#19#20#20#20#19#20#18#18#18#18#18#18#16#16#16#16#16
+  +#16#16#16#16#16#16#16#15#15#14#14#14#14#13#13#13#13#13#13#13#13#13#12#12#12
+  +#11#12#11#11#11#12#11#11#11#11#11#11#10#10#10#9#9#10#10#9#9#9#10#10#9#10#10#9
+  +#10#9#9#9#9#8#9#9#9#9#9#9#9#8#9#8#9#8#8#8#8#8#8#8#8#9#8#8#8#8#8#8#8#7#8#7#8#8
+  +#8#7#7#7#7#7#7#7#7#7#7#7#6#6#6#6#7#7#6#6#7#6#6#6#6#5#6#6#6#6#5#6#5#6#6#5#6#5
+  +#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#4#5#5#4#5#4#4#5#4#5#4#4#4#5#4#4#4#3#4#4#4
+  +#4#3#3#4#4#4#3#3#4#3#3#3#3#3#3#3#3#3#3#2#3#2#2#3#3#3#2#3#2#2#2#2#2#2#2#2#2#2
+  +#2#2#2#2#2#2#1#1#1#2#2#2#2#1#2#2#1#2#2#1#1#1#2#1#2#2#1#1#1#2#1#2#1#1#1#1#1#1
+  +#1#1#1#1#1#0#0#1#1#0#0#1#0#1#0#1#0#1#0#0#0#0#0#0#0#1#0#0#0#1#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy0000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000000000333444777999<<<:::...////'
+  +'////////1118878778778778778777777777777777777777777777777777777777777777775'
+  +'554444434444435444434445445444454444444444444444434333443433433433433333332'
+  +'32333233333323332332222221221211111110211211101000000000000000/0/0/0000/0//'
+  +'///////.///.././/../..........---..-.-.......---.------,.,---,-,,,,--------'
+  ,'-,--,......//00/0000111111222222444555555665676666898:99:::;;;:;;===>=>>>>?'
+  +'??AAABBBDDDDDDFEFGFGHHHJIIKJKMMLMNMONOQRQSSSSSSVUVXWWXXXZZZ\\\^^^___`a`cbbd'
+  +'ddeeeffghhhjjjkjkmmmmmmoooqqqsrsvuv||{|}|~~~'#128#128''#129#128#129#130#130
+  +#129#131#131#130#129#129#129''#129#128#128#130#129#129#130#129#129#132#131
+  +#131#132#131#131#132#132#132#133#133#133#133#134#133#133#133#133#134#134#134
+  +#135#135#135#135#135#134#136#135#135#135#136#136#135#135#135#135#135#135#135
+  +#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#134#134
+  +#134#133#133#134#133#133#133#132#132#132#132#132#132#131#130#130#130#129#130
+  +#129#128#128#128#128#129'~~~}|}{{{{{{yxyxwxvvvuuusssrrqpppooomlmkkkiiiggg'
+  +'fffcccaba`_`^]]\\\[[[YYYYYY]]]fffjjjlllmmmpppooo^]^DDDBBB???>>><<;:::888766'
+  +'34433311000/---,,,***)))''''''&%%######!"!!!! '#31#31#30#30#29#29#29#29#28
+  +#27#27#26#26#26#26#26#26#25#24#25#22#22#23#22#22#22#21#21#22#20#20#20#20#20
+  +#19#20#19#20#19#20#19#19#18#18#17#17#17#16#16#16#16#16#16#16#15#15#15#16#15
+  +#14#15#15#14#14#14#13#13#14#13#13#13#12#12#12#12#11#12#12#12#12#11#11#11#11
+  +#11#11#11#12#11#10#10#10#10#10#10#10#10#9#9#10#10#10#9#10#9#10#9#9#9#9#9#9#9
+  +#8#9#9#8#9#8#9#8#8#8#8#8#8#9#8#8#8#8#8#8#8#8#8#8#8#8#7#8#8#7#8#7#7#7#7#8#7#7
+  +#7#6#7#7#7#7#6#7#7#7#7#6#6#6#6#6#6#6#5#6#5#6#6#6#6#5#5#5#5#5#5#5#5#5#5#5#5#5
+  +#5#5#5#5#5#5#5#5#4#5#5#4#5#4#4#5#4#4#4#4#4#4#4#4#3#4#4#4#3#4#4#4#4#3#3#4#3#3
+  +#3#3#4#3#3#3#3#2#2#3#3#3#3#3#3#2#3#2#3#2#2#2#3#2#2#2#3#2#3#2#2#3#2#2#2#2#2#2
+  +#2#1#2#1#2#2#2#2#2#1#1#1#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1#1
+  +#1#0#1#1#0#0#0#1#1#1#0#1#0#0#1#1#0#1#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0'000yyy00000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0000000000000000000000000111444555888:::===222///////////////65588787787787'
+  +'787787777777777777777777777777777777777777777777766644444444443343444454444'
+  +'555554544444444545444444444444443334443333343433333333333323322323333232222'
+  +'232222222122121111120020110000001000/0000/0//0/000//0/0///0//.//////.///./.'
+  +'....//..----,.-.----.---.-..---....--.,--,,..---.------.-././//00//0//0000/'
+  +'0101111333555555666777777998::::::;;<<<<>>>?>>??@@AABBBCCCDDDEFFFFGHHHIIIKJ'
+  +'KMLLNMMOONQQQRRRSSTUUUWWWXXX[[[[[[]]]___aaabccdddfefgggiiikkklllmmmpppqqqrr'
+  +'rsstuuuvwwyxy{{{'#130#129#129#131#131#130#133#132#132#134#134#134#136#135
+  +#135#136#136#135#138#138#137#133#133#133#134#133#133#134#134#134#135#135#135
+  +#136#136#136#137#136#136#137#137#137#138#138#138#139#138#138#138#138#138#139
+  +#139#139#140#140#140#140#140#140#141#141#141#141#141#141#141#141#141#141#141
+  +#141#141#141#141#141#141#140#141#141#141#140#140#141#140#140#141#140#140#140
+  +#139#139#139#139#139#139#138#138#138#137#137#137#137#137#137#136#136#136#135
+  +#135#135#134#134#134#133#133#133#133#133#132#131#131#132#130#130#130#128#128
+  +#128#128#128#128'~}}}{{{zyzxxxvvvtttsssqqqpopnmnklkjjjhhheeedddccb``a^_^^^'
+  +'^bbbkkkmmmppprrrtttuuucccHHHFFFDDDCCCAAA???<<<:;:999777455322122///...---++'
+  +'+**)''''(''''&$$$###!""!   '#31#31#30#29#30#29#29#29#29#28#28#26#26#26#26#25
+  +#25#24#25#24#23#23#22#22#23#22#21#21#21#20#20#20#20#20#19#20#20#20#19#19#20
+  +#18#18#19#17#17#17#16#16#16#16#16#16#16#15#15#16#16#16#14#15#14#14#14#14#14
+  +#13#13#13#13#13#12#12#12#12#11#12#12#11#11#11#11#12#11#11#11#12#11#11#10#9#10
+  +#10#10#10#9#9#10#9#9#9#9#9#9#10#9#10#9#9#9#8#9#9#9#9#8#9#9#8#9#9#8#8#8#8#8#8
+  +#9#8#8#8#8#8#8#8#8#8#8#7#8#7#7#7#7#7#7#7#7#7#7#7#7#6#7#6#7#7#6#6#6#6#6#6#6#6
+  +#6#6#6#6#6#6#6#6#6#5#6#6#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#4#5#5#5#5
+  +#5#4#4#4#5#4#4#4#4#4#4#4#3#4#3#4#4#4#4#3#4#4#3#4#3#4#4#3#3#3#2#3#3#3#3#3#2#2
+  +#3#3#2#3#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2#2#2#2#1#1#2#1#1#1#2#2#2#1#2
+  +#1#2#1#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1#1#1#0#1#1#1#0#1#1#0#1#0#1#1#0#1#1#1
+  +#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy00000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000022244466'
+  +'6999;;;:::...////////////22288788787787787787787777777777777777777777777777'
+  +'777777777777777644444444444444444443445554555545444545444455444444444344444'
+  ,'344434344333433433343333333333233333332332233222122122122121021010120010000'
+  +'00000000000000/0/////////0/////.///////...-.-.----.-....-.--.--...---./....'
+  +'.....--/.-/--...---...///0000/0000000010211212323333333444666777999:::;::;<'
+  +';<<<>>>???@??@AACCCCDCDDDFFFHHHIIHJJJLMLMMMONOQPPRRRSSSUUUWWVXXXZZZ\\\]]]`_'
+  +'_bbacccdddfffghgiiiklknmnoooppprrrtstuuvwwwxxxyyz{{{|}}~~'#132#132#132#135
+  +#135#135#137#137#137#138#138#137#139#139#138#141#140#139#142#142#142#141#141
+  +#141#139#139#139#139#139#139#140#140#140#141#141#141#142#142#142#142#142#142
+  +#143#143#143#144#144#144#144#144#144#145#145#145#145#145#145#145#145#145#146
+  +#146#146#146#146#146#146#146#146#146#146#146#146#146#146#145#145#146#145#146
+  +#146#146#146#146#145#145#145#145#145#145#144#144#144#144#144#144#144#144#144
+  +#143#143#143#142#143#143#141#141#141#140#140#140#140#140#140#139#138#139#137
+  +#137#137#136#136#136#136#136#136#134#134#134#133#132#133#131#131#131#130#129
+  +#130#128''#128'~~~}}}|||yyzxxxvvvtttrrrqqqmmmlllkkkhhhgfgeeeeeegghpppqqqttt'
+  +'vvvyyyzzziiiNNNMMLJKKGGHEEFDDDBBB??@=>=<<;:::888656443211//0///---+++))*((('
+  +'&&&$%$##$##"!!!   '#30#30#31#29#29#29#28#28#28#26#25#26#26#26#26#24#24#25#23
+  +#23#24#22#22#22#21#21#21#20#20#20#20#20#20#19#19#20#19#20#20#18#18#18#17#17
+  +#18#16#16#17#16#16#16#16#16#16#16#15#15#15#14#14#14#15#14#13#13#13#13#13#13
+  +#12#11#12#12#11#11#11#11#12#11#11#11#11#12#11#11#11#11#10#10#10#9#10#9#10#10
+  +#10#9#9#9#10#9#10#9#9#10#9#9#9#9#9#9#9#9#9#9#9#8#9#9#8#9#8#9#8#8#8#8#8#8#8#8
+  +#8#8#7#7#8#7#7#8#7#7#7#7#7#7#7#7#6#7#7#7#7#6#6#6#7#6#6#7#6#6#6#6#6#6#6#6#6#6
+  +#5#6#5#5#6#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#4#4#5#4#4#4#4#4#4#4#4
+  +#4#4#4#4#4#4#4#3#4#4#4#4#3#3#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#3#2#3#3#3#2#2#3
+  +#3#2#2#3#3#3#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2#2#1#2#1#1#1#2#2#2#1#1#1#2
+  +#1#1#2#1#2#1#1#1#0#1#1#1#1#1#1#0#0#1#1#0#0#1#1#1#1#1#0#0#1#0#0#0#0#0#1#1#1#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy00000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0000000000000000000000000000000000000000000000111444555888:::<<<222////////'
+  +'///////77688788788787787787787787777777777777777777777777777777777777755544'
+  +'444444444444444455455554454555455544454454444444444444444443444443333434433'
+  +'33333333333333332332322322322223212222212212112111002001000000000000/000//0'
+  +'00/0000//////////......-..-.-----.............-...//.................-.-.//'
+  +'.///00000000/001100111222333435434444555666777888:::;::<<=??????@@@BBCBCBDD'
+  +'DFEEGGHHHHIIILLLMMMNMNQQPRQRSRSUSTWWWXXXZZY[[[]]]___aaabcbeddgffhhhiiikllmm'
+  +'noooqpptssuuuvvvxwx{z{|||}}}'#128#128#129#129#129#129#132#132#132#133#133
+  +#133#139#139#139#142#142#142#143#143#143#144#144#144#145#144#144#147#146#146
+  +#148#148#147#146#146#146#145#145#144#146#146#146#147#147#147#147#147#147#148
+  +#148#148#148#148#148#149#149#149#149#149#149#150#150#150#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151
+  +#151#151#151#151#151#151#151#151#151#151#151#151#151#151#151#150#150#150#149
+  +#149#149#147#148#148#147#148#148#147#147#147#146#146#146#145#145#145#144#145
+  +#145#143#143#143#142#142#142#141#141#141#139#139#139#138#138#138#136#136#136
+  +#135#135#136#133#133#133#132#132#132#130#130#130#128#128#128'||}||{zyzwww'
+  +'uuussspqpnnommmkkkkkkmmmuuuwwwxxx{{{}}}~~~nnnUUURRRPPOMMMKLLIJIGGGDDDCCCA@A'
+  +'???<<<:::999666555332000///---,,,)**''''''&&&$$%#####"!!!'#31#31#31#30#31#30
+  +#29#30#29#28#28#28#26#26#26#25#25#26#24#25#24#23#24#24#22#22#22#21#21#21#20
+  +#20#20#20#19#20#20#20#20#19#19#20#19#18#18#17#17#18#17#16#16#16#15#16#16#16
+  +#15#15#14#15#14#15#14#13#14#13#13#13#13#13#13#13#12#12#12#12#11#11#11#11#12
+  +#11#12#11#11#11#12#11#10#10#10#10#10#10#9#10#9#10#9#10#9#9#10#10#10#9#10#10#9
+  +#9#9#9#9#9#8#9#9#9#9#9#8#8#8#9#9#8#8#8#9#8#8#8#8#8#8#8#8#8#7#7#8#7#7#7#8#7#7
+  +#7#7#7#7#7#6#6#6#7#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#5#6#5#5#5#5#5#5#5#5#5#5#5
+  +#5#5#5#5#5#5#5#5#5#5#5#5#5#4#5#5#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#4#4#4#4#3
+  +#3#3#3#3#3#3#3#3#3#3#3#2#3#3#3#2#3#2#2#2#2#3#3#3#3#3#2#2#2#2#2#2#2#2#2#2#2#2
+  +#2#2#2#1#2#1#2#2#2#1#1#2#2#2#1#1#1#1#1#1#2#1#1#1#1#1#1#2#1#1#1#1#2#1#1#0#1#1
+  +#1#1#1#1#0#0#0#0#1#0#0#0#0#1#0#0#1#0#0#1#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0'000yyy0000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000222444777999;;;;;;...////////////2128888878878878778778778778'
+  +'777777777777777777777777777777777776664444444444444444444445556556555545555'
+  +'554454445444554444444444444444334434344433433333433333333333332332333233322'
+  +'222212212212212111112111111000100000000/00/0000/0//0///./../../.....-...-..'
+  +'/.../......-..../////../.....///////..0./00/0001010001111011211223334544545'
+  +'46666666777888999:::<<<===?>>AAABBCCCCEEEFFFGGHIHHKJKLLLNNNOOOQQQRSSUTTWUVW'
+  +'WWZYY\[[]]]_^^```cccdddfffhhhjjilmlnnnooorrqtttvvvxwxyyy{{{}}}~~'#128#128
+  +#129#130#130#130#131#131#132#133#133#133#134#134#135#136#136#136#138#138#138
+  +#141#141#140#147#147#147#148#148#148#149#149#149#150#150#149#152#151#152#153
+  +#153#152#154#154#153#151#151#151#151#151#151#152#152#152#152#152#152#154#154
+  +#154#155#155#155#155#155#155#155#155#155#156#156#156#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#158#157#157#158#157#157#157#158#157
+  +#157#157#157#157#157#156#156#156#156#156#156#156#156#156#156#156#156#155#155
+  +#155#154#154#154#153#153#153#153#153#153#152#152#152#150#150#150#150#150#150
+  +#148#148#148#147#147#147#146#146#147#144#144#144#143#143#143#142#141#142#141
+  +#140#141#139#138#139#138#137#138#135#135#135#134#134#134#132#132#132#130#130
+  +#130#128#128#128'~~~|||zzywwxvvvsttrrrrrrttu{{{}}}}}}'#128#128#128#130#130
+  +#130#130#130#130'tttYYYXXXVVVSSSQPQNNNMMMJKJGGGEEEDDDBAA???<<=<;;99976744522'
+  +'2000///---,+,)*)(((&''''%%%######!!! '#31' '#30#31#30#29#29#30#28#28#28#26
+  +#26#26#25#26#25#24#24#25#22#23#22#22#22#22#21#21#21#20#20#20#20#19#20#20#20
+  +#20#18#18#18#19#19#18#17#17#17#16#16#16#16#16#16#15#15#16#14#14#14#15#15#15
+  +#13#14#13#13#13#13#13#13#13#12#12#12#11#12#12#11#11#11#12#12#11#11#12#11#10
+  +#10#10#10#10#10#9#10#10#10#10#10#10#10#9#10#9#9#9#9#9#9#9#9#9#9#9#9#9#8#9#8#9
+  +#9#8#8#8#9#8#8#8#8#8#8#8#8#8#8#7#8#8#7#8#7#7#8#7#7#7#7#7#7#7#7#6#6#7#7#6#6#6
+  +#6#6#6#6#6#6#6#5#5#6#6#6#5#5#5#6#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#4#4
+  +#5#5#5#5#4#4#4#4#4#5#4#4#4#4#4#4#4#4#4#4#4#4#3#4#4#3#3#3#3#3#3#3#3#3#3#3#3#3
+  +#3#3#3#2#2#2#2#3#2#3#2#2#2#2#3#3#2#2#2#2#3#2#3#2#2#2#2#2#2#2#2#2#2#1#2#1#1#2
+  +#2#2#2#2#2#2#1#2#1#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#0#1#0#0#1#0
+  +#1#1#1#0#0#0#1#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy0000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000000000000000000111444666888:::<'
+  +'<<444...////////////6558888888878878778778778778777777777777777777777777777'
+  +'777777774444444444444444444445556556556555555545545545444444545444444444444'
+  +'444444333444443343333443333333333333333323322332322222212212212212102112101'
+  +'10100110000000000/0/0/0//0////../../../...-.//././...//../...././////.////0'
+  +'00000000111222222322222323222221222434554454655766767989889999:::<<<===>>>?'
+  +'??A@@CCCEEEGGGHHHJJJLKLMMMOOOQPPRRRSRSVVUWWWZZZ[[[\\\_^^a_`bbbdcceeehhhjjjl'
+  +'llnnnppprqqtttvvvwxxyyy|||}~}'#128#128#128#129#129#129#131#131#131#132#133
+  +#132#135#135#135#137#137#137#138#138#138#140#139#140#141#141#141#142#142#143
+  +#144#144#145#148#148#149#153#153#153#154#154#154#155#154#155#157#157#157#158
+  +#156#157#160#159#158#158#158#158#157#157#157#158#157#158#158#158#158#159#159
+  +#159#160#160#160#161#161#161#161#161#161#162#162#162#162#162#162#162#162#162
+  +#163#163#163#163#163#163#163#163#163#163#164#164#164#163#163#163#164#163#163
+  +#163#163#162#162#162#162#162#162#162#162#162#161#161#161#161#161#161#161#161
+  +#161#160#160#160#159#159#159#158#158#158#157#158#158#156#156#157#155#155#155
+  +#154#154#154#153#152#153#152#152#151#150#150#150#149#149#149#147#147#147#146
+  +#146#146#144#144#144#143#143#143#141#141#141#139#139#139#137#137#137#135#135
+  +#135#134#133#133#131#131#131#129#129#129'~~~|||{{{yyyyyxz{|'#129#129#129#131
+  +#131#130#132#132#132#133#133#133#134#135#134#135#135#135'zyz```___[\\XXXWWWU'
+  +'UUSSSOOPMMMKKKIIIFFFDDDBBB@@@==>;;<:::888666232111///...+,,*)*)()&&''%%%###'
+  +'###!!!! !'#30#30#30#29#29#30#28#28#28#26#26#26#26#26#25#24#25#24#22#22#22#22
+  +#22#22#22#21#21#20#20#20#19#20#20#20#19#19#19#18#18#18#19#18#17#17#17#16#16
+  +#16#16#16#15#16#16#15#15#14#14#14#14#14#13#13#13#13#13#13#12#12#12#12#11#12
+  +#12#12#12#12#11#12#11#11#11#12#11#12#10#10#10#10#10#10#10#9#10#10#10#10#10#9
+  +#9#10#10#10#9#10#9#9#9#9#9#9#9#9#9#9#8#9#9#8#9#8#8#8#8#9#8#8#8#8#8#8#8#7#8#7
+  +#7#7#7#7#7#7#8#7#7#7#7#7#7#6#7#7#6#6#7#6#6#6#6#6#6#6#6#6#6#6#6#6#5#6#5#6#5#5
+  +#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#4#5#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4
+  ,#4#4#4#3#4#4#3#3#3#3#3#3#3#4#3#3#3#3#3#3#3#3#3#2#3#3#2#3#2#3#3#3#2#2#3#2#2#2
+  +#2#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2#2#1#2#2#2#1#2#2#2#1#1#1#1#1#2#1#1#2#1#1
+  +#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1#1#0#0#1#1#1#1#1#0#1#0#0#0#0#1#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0'000yyy00000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0000000000000000000333666777999;;;<<<...////////////11188888888888788788787'
+  +'787787787787777777777777777777777777777755544444444444444444455465565565565'
+  +'565565555455445545445555544444544444444434434443443433334333333333333333332'
+  +'2323323223232322221221221221211211200110100110000/00000/00/0////0///../../.'
+  +'./..//.....////0/0/11011110010021111211122222233343444444444555555577777765'
+  +'6777677888::998:::::::<=====>>>???BBACCBCDCFFEHHHJJJLLLMMMOOORQQRSRUUTVVVXX'
+  +'X[[[\\\^_^```aaacccfffhhhjjjkkknnnooorrrtttwwwxxxzzz|||~~~'#128#128#128#131
+  +#131#131#132#132#132#134#134#134#135#135#135#138#138#138#141#141#141#141#141
+  +#141#143#143#143#145#145#145#147#146#147#148#148#149#149#150#150#152#151#152
+  +#156#156#156#160#160#160#161#161#161#162#162#162#163#162#162#165#164#164#166
+  +#165#166#164#163#163#163#163#163#164#164#164#165#165#165#165#165#165#166#166
+  +#166#167#167#167#167#167#167#167#167#167#168#168#168#169#169#169#169#169#169
+  +#169#169#169#170#170#170#170#170#170#169#170#169#169#170#169#168#169#168#168
+  +#168#168#168#168#168#168#168#168#166#167#166#166#166#167#165#165#165#165#165
+  +#165#164#163#164#164#164#163#163#162#162#161#161#161#160#160#160#159#159#159
+  +#158#158#158#156#156#156#155#155#155#153#153#153#152#152#152#150#149#150#148
+  +#148#148#147#146#147#144#144#144#143#143#143#141#141#141#138#138#138#135#136
+  +#136#135#135#134#132#132#132#130#130#130#128#128#128#128#128#128#129#129#130
+  +#135#135#135#136#136#136#138#138#138#140#140#140#140#140#140#140#141#141''
+  +'gggdddbbb_`_^^^[\[XXXVVVSSSPQQOOOLLLJJJGGGDDDBCB@@@>?>;;;:::888656344111///'
+  +'...---*)*)()&&&%%&######!  !  '#30#30#30#29#29#29#28#28#28#26#26#26#26#26#25
+  +#24#24#24#22#22#22#22#22#22#21#21#21#20#20#20#20#20#20#20#20#20#19#18#18#17
+  +#18#17#18#17#17#16#16#16#16#16#16#16#16#15#14#14#14#14#15#14#13#13#13#13#13
+  +#13#12#12#12#11#12#12#12#12#11#12#11#12#12#12#11#10#10#10#10#10#10#9#10#10#10
+  +#10#10#10#10#10#9#10#10#9#10#9#9#9#9#9#9#9#9#9#8#9#8#9#8#8#9#8#8#9#9#8#9#8#8
+  +#8#8#8#8#8#8#8#8#8#8#7#8#8#7#7#7#7#7#7#7#7#6#6#7#7#6#7#7#6#6#6#6#5#6#6#6#6#6
+  +#6#6#6#6#6#5#6#6#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#4#5#5#4#4#4#4#4
+  +#4#4#4#4#4#4#4#4#4#3#3#4#4#3#3#3#4#3#3#4#3#3#3#3#3#3#3#3#3#3#3#2#3#2#3#2#3#3
+  +#2#2#2#2#2#2#3#3#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2#2#2#2#1#1#2#1#2#1#2#1#1#2
+  +#2#2#1#2#1#1#1#2#1#1#1#1#1#1#0#1#1#1#1#1#1#0#1#1#1#1#1#1#1#1#0#0#1#0#1#0#1#1
+  +#0#0#0#0#0#1#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy00000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0000000000000000111222333444444666777999;;;===656...////////////55588888888'
+  +'888888788787787787787787777777777777777777777777777644444444444444444444465'
+  +'565565565565565565555555555544545444444454444444544444434344434444443333333'
+  +'333433333332332333333223223232222122122122121021111110010000000000000///0//'
+  +'0///0////./..00000/01101101121111111111122222222211122234344444444455556665'
+  +'6666888888989:::;;;<;<;:;;:;<:<=<====>>>@@@BCBCCCDDDGGGHGGHHIKLLMNMPPPRRRST'
+  +'TUVVWWWYZY[[[]]]```aaacccedegggjiikkkmmmppprrrutuvvvxxxzzz|}}~~~'#128#128
+  +#128#131#131#131#133#133#133#135#135#135#137#136#136#139#139#139#141#141#141
+  +#143#143#143#145#145#145#146#146#146#148#148#148#150#150#151#152#152#152#154
+  +#153#154#155#155#155#157#157#157#159#159#159#165#165#165#166#166#166#167#167
+  +#167#168#168#169#170#169#169#172#171#171#171#171#172#169#169#169#171#170#170
+  +#170#170#170#171#171#171#172#172#172#173#173#173#173#174#173#173#173#173#174
+  +#174#174#175#175#175#175#175#175#175#175#175#175#175#175#175#175#175#175#175
+  +#175#175#175#175#175#175#175#175#175#175#175#175#174#174#174#174#173#172#172
+  +#173#172#172#172#172#172#171#171#171#170#170#170#169#169#169#169#169#169#167
+  +#167#167#166#166#166#165#165#165#163#163#163#162#162#162#161#160#161#158#158
+  +#158#158#157#158#156#155#156#154#153#154#152#151#152#150#150#150#148#148#148
+  ,#146#146#146#143#143#143#141#141#141#139#139#139#138#138#138#135#135#135#135
+  +#135#135#136#136#136#142#142#142#143#143#143#144#144#144#145#145#145#145#145
+  +#145#146#146#146#133#133#133'nnoklljjjgggdcdaaa^_^\]]YYYWWWUUURQRPOOMMMJJJHH'
+  +'HFFFDCDBBA?>><<<:::9896553332220//...-,-+++)()''&&%%%######! !!  '#30#30#30
+  +#29#29#29#28#28#28#26#26#25#26#25#26#24#23#24#22#22#22#22#22#22#21#21#21#20
+  +#20#20#20#19#20#20#20#20#18#19#18#18#17#17#17#16#16#16#16#16#16#16#16#16#16
+  +#16#15#15#14#13#14#13#13#13#14#13#13#13#12#11#11#11#12#12#12#12#12#12#12#11
+  +#11#12#11#10#10#10#10#10#10#10#10#10#10#10#10#9#10#9#10#9#10#9#9#9#9#10#9#9#9
+  +#9#9#9#9#9#9#9#9#8#9#8#9#9#8#8#8#8#8#8#8#8#8#8#8#8#7#8#7#7#8#7#7#7#7#6#7#7#6
+  +#6#7#6#6#6#6#6#7#6#6#6#6#6#6#6#6#6#6#6#6#6#5#6#6#6#5#5#5#5#5#5#5#5#5#5#5#5#5
+  +#5#5#5#5#4#5#5#5#5#4#4#4#4#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#4#3#4#3
+  +#3#3#3#3#3#3#3#3#3#3#3#2#2#3#3#3#2#3#2#2#3#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2
+  +#2#2#2#2#2#2#2#1#1#1#1#1#1#2#1#1#2#1#1#2#1#2#1#1#1#1#1#2#1#1#1#1#1#1#1#1#0#0
+  +#1#0#1#1#0#1#1#1#0#1#1#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy00000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0000000000000000000000000000222333444555666777777777777777888888:::;;;===>>'
+  +'>000////////////00088888888888888888788787787787787787787777777777777777777'
+  +'777755444444444444444444455566565565565565565565565565555555444444445444454'
+  +'444444444434433444344433343333333443334333333333332232222322232222122122121'
+  +'1111111101011111000000000/000/0//0///00/11211111111101110112112212111122222'
+  +'2222332433454444444455666555776989888999:::;;;<<;<<<>>=??>@@@@@@@?@@A@CBBCC'
+  +'CDEDGGGHHHIIIKKLMMMNNOQQQTTTWWWXXW[[Z\\\^^^```bbbdeegggiiikjkmlmpoorqrsssvv'
+  +'uxxxz{z|||~~~'#129#129#129#131#131#131#133#133#133#136#136#136#138#138#138
+  +#140#140#140#142#141#142#144#143#143#146#146#146#149#148#148#150#149#150#152
+  +#152#152#154#154#154#155#155#156#157#157#158#159#158#159#161#160#161#163#162
+  +#163#163#163#164#168#167#168#171#171#171#172#172#172#175#175#175#176#176#176
+  +#177#177#177#178#177#177#172#172#172#161#161#161#139#139#139'tttcccSSSBBB444'
+  +')))   '#20#20#20#20#20#20#19#19#19#19#19#19#19#19#19#19#19#19#19#19#19#17#17
+  +#17#29#29#29'&&&111>>>OOO```qqq'#136#136#136#158#158#158#168#168#168#171#171
+  +#171#172#171#171#169#169#169#169#169#169#166#166#166#165#165#165#163#163#163
+  +#161#161#161#160#160#160#157#157#157#155#155#155#153#153#153#151#151#151#150
+  +#149#150#146#146#146#145#145#145#143#143#143#142#142#142#143#143#143#148#148
+  +#148#149#149#149#150#150#150#151#151#151#153#152#152#151#151#151#139#139#139
+  +'uttrrrpppmnnkjjhhhfffbbc```]]]\[[XXXVUVRSSOOONNNKKKIIIFFFDDDAAB???=<<:::989'
+  +'655445222//////,--***))(''&&&%%######! !'#31#31#31#30#30#30#30#29#29#28#28
+  +#28#26#26#26#25#26#26#23#24#24#23#23#22#22#23#22#21#21#21#20#20#20#20#20#20
+  +#20#19#20#19#18#18#17#17#17#16#17#16#16#16#16#16#16#16#14#14#14#14#15#15#13
+  +#13#13#14#13#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#11#11#11#12#10#10
+  +#10#10#10#10#9#10#10#10#10#9#10#10#9#9#9#9#9#9#9#9#9#9#9#9#9#9#8#9#8#9#9#8#8
+  +#9#8#8#8#8#8#8#8#8#8#8#8#8#8#7#7#7#7#7#7#7#8#7#7#7#7#7#7#7#7#7#6#7#7#6#6#6#6
+  +#6#6#6#6#6#6#5#5#6#6#6#6#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#4#5#5#5#4
+  +#4#4#5#5#5#5#4#4#4#4#4#4#4#4#4#4#3#4#4#4#4#4#4#4#4#3#3#3#3#3#3#3#3#3#3#3#3#3
+  +#3#3#2#3#3#3#3#3#3#3#3#3#2#3#2#2#2#2#3#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2#1
+  +#1#2#1#1#2#2#2#1#2#1#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1
+  +#1#1#0#0#0#0#0#0#0#1#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy00000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000022233344455566'
+  +'6777888888888888999999999999999999::::::<<<===>>>999...////////////44488888'
+  +'888888888888788788787787787787787777777777777777777766644444444444444444454'
+  +'466666566565565565565565565565565454554554555554554444454444544434444344443'
+  +'434343333333333333333333233322232333222222222122111111101100110111100110000'
+  +'00/000010011100021211111111111121212221121122222222233344444554554455566666'
+  +'6667878988999:::;;;;<<<<<>>>??>AA@AA@DCCEDDEDEEDEDDDGGGHHHJJJLLLMNMPOOQQQSS'
+  +'TUUUXXX[[[\]\``_aabddcfffhhhjjjkkknnnqpqsrsvuuxwwzzy|||~~~'#129#129#129#131
+  +#131#131#134#134#134#136#136#135#138#138#138#140#141#140#143#143#143#144#144
+  ,#144#147#147#147#148#149#148#151#151#151#153#153#153#155#155#155#158#158#158
+  +#159#159#159#161#161#161#163#163#163#165#165#165#167#166#167#168#168#168#170
+  +#170#170#171#171#171#177#176#177#177#177#177#164#164#164#134#134#134'hhhKKK+'
+  +'++'#22#22#22#15#15#15#13#13#13#13#13#13#12#12#12#12#12#12#12#12#12#12#12#12
+  +#11#11#11#10#10#10#11#11#11#11#11#11#10#10#10#10#10#10#9#9#9#9#9#9#9#9#9#7#7
+  +#7#8#8#8#7#7#7#7#7#7#7#7#7#6#6#6#5#5#5#7#7#7#14#14#14'###BBBa`a'#158#158
+  +#158#171#171#171#171#171#171#169#169#169#167#167#167#166#166#166#163#163#163
+  +#161#161#161#159#159#159#157#156#156#155#155#155#153#153#153#151#150#151#150
+  +#150#150#151#150#151#155#155#155#156#156#156#156#156#156#157#157#157#158#158
+  +#158#157#158#157#145#145#146'}~}zzzxxxuttrrrpopllljjjgggdcdaaa___[\[YYYWWWTT'
+  +'TQQQOOOLLLJJJGGGDDDCBB@??===;;;999767545222/0////,--*++)**&&''%%%######  !'
+  +#31#31#31#31#30#30#29#29#30#27#27#27#25#26#26#24#25#25#23#23#24#23#22#23#22
+  +#22#22#21#21#21#20#20#20#20#20#20#20#19#20#18#19#18#17#18#17#16#16#16#16#16
+  +#16#16#15#16#15#14#15#14#14#14#13#13#13#13#14#13#12#12#12#12#12#12#11#12#12
+  +#11#12#11#12#12#12#11#10#11#10#10#10#10#10#10#10#10#10#10#9#10#10#10#10#10#9
+  +#9#9#9#9#9#9#10#9#9#9#9#9#9#9#8#8#8#8#8#8#8#8#8#8#8#8#8#8#8#8#8#8#8#7#7#7#7#7
+  +#7#7#7#6#7#7#7#6#7#7#6#6#6#6#6#6#6#6#6#6#6#6#5#5#6#5#6#6#6#5#6#5#5#6#5#5#6#6
+  +#5#5#5#5#5#5#5#5#5#5#5#5#4#5#5#4#4#5#4#5#5#4#4#4#4#4#4#4#4#4#3#4#4#4#4#4#4#4
+  +#4#4#3#4#3#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#3#3#2#3#3#2#2#3#2#3#2#3#2#2#2#3#3
+  +#2#2#3#2#2#2#2#2#2#2#2#2#1#2#2#1#2#2#1#1#1#1#1#1#1#1#1#1#1#1#2#1#1#2#1#1#1#1
+  +#1#1#1#1#1#1#0#1#1#1#1#1#1#1#0#1#1#0#1#0#0#0#0#0#0#1#0#0#0#0#0#1#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy00000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000011122'
+  +'2444444555777888888888888888999999999999:::::::::::::::;;;;;;;;;<<<<<<===>>'
+  +'>???333//////////////087788888888888888888888788787787787787787777777777777'
+  +'777777744444444444444444444465566666666566565565565565565554565465455554545'
+  +'544455454554444444444434433434344343344333343333333333333333232222333323232'
+  +'121121111111111111001000000100011111110101112111222121211222222222222233332'
+  +'2232333333444554454545565666777888998999::::;:<<=<<<>>>???AA@AA@CCBEDDFEEHG'
+  +'GIIIIIJJJJJJJLLLNNNPPPRRRTSTVWVWWWZZZ]\]```bccdddffgijikkkmnnppprssuuuwwwzy'
+  +'z|{|~~'#129#128#129#131#131#131#134#133#133#136#136#136#138#138#138#141#141
+  +#140#143#143#143#145#145#144#147#147#147#150#150#150#152#152#152#153#154#154
+  +#156#156#156#158#158#159#161#161#161#163#163#163#164#164#164#166#166#166#169
+  +#168#169#170#170#170#172#172#172#173#173#173#167#167#167#133#133#133'___999'
+  +#25#25#25#14#14#14#15#15#15#15#15#15#14#14#14#14#14#14#13#13#13#14#14#14#14
+  +#14#14#14#14#14#13#13#13#13#13#13#13#13#13#13#13#13#12#12#12#12#12#12#11#11
+  +#11#11#11#11#11#11#11#10#10#10#9#9#9#10#10#10#9#9#9#9#9#9#8#8#8#7#7#7#7#7#7#7
+  +#7#7#6#6#6#5#5#5#5#5#5#5#5#5#5#5#5#4#4#4#3#3#3#13#13#13'...WWW'#129#128#128
+  +#164#164#164#170#170#170#169#168#168#167#167#167#165#165#165#162#162#162#160
+  +#160#160#159#159#159#158#158#158#158#158#158#163#163#163#162#162#162#163#163
+  +#163#163#163#163#164#164#164#163#163#163#152#153#153#132#132#132#130#130#130
+  +'|||zzzwvvtttqqqnnnkkkiihefecbb```]]]ZZZWXXUTURRSOOOMMMJJJGGGEEEBCBA@@==>'
+  +';;;889776554232100///---*+*()(&&&%%&######!!!'#31#31#31#29#29#29#29#29#29#27
+  +#27#27#26#26#25#25#24#24#23#23#24#23#23#23#21#21#22#20#20#20#20#20#20#20#19
+  +#20#18#19#19#17#18#17#18#18#18#16#16#16#16#16#16#16#16#16#14#15#14#15#14#15
+  +#13#13#13#13#14#13#12#12#12#12#12#12#11#12#12#11#12#12#11#11#11#10#11#10#10
+  +#10#10#10#10#10#10#10#10#9#10#10#10#9#9#9#10#9#10#9#9#10#9#9#9#9#9#9#9#9#8#9
+  +#9#8#8#8#8#8#8#8#8#8#8#8#8#8#8#7#8#7#7#7#8#7#7#7#8#7#7#7#7#7#6#6#7#7#6#6#6#6
+  +#6#6#6#6#6#6#6#5#5#6#6#5#6#6#6#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#4#5
+  +#5#5#4#5#4#4#4#4#5#4#4#4#4#4#4#4#4#3#4#4#3#4#4#3#3#4#3#3#4#3#4#3#3#3#3#3#3#3
+  +#3#3#3#3#3#3#3#3#3#3#3#2#2#3#3#2#3#3#2#2#2#3#2#3#2#2#2#2#2#2#2#2#2#1#2#2#2#2
+  +#1#2#1#1#2#1#2#1#2#1#1#1#1#2#1#1#1#1#1#1#1#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1
+  +#1#0#0#0#1#0#0#1#0#0#1#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy00000000000000000000000000000000000000000'
+  +'0000000000000000222333444555666777888888888888888999999999999::::::::::::;;'
+  +';;;;;;;;;;<<<<<<<<<<<<=========>>>>>>;;;;;;///////////////22288888888888888'
+  ,'888888888788788787787787787787777777777777766644444444444444444455466666666'
+  +'666666566565565565565565565564464455454444445555444544544444444444444433444'
+  +'443443334433343333333333333222332323222121121121111111111101101011111212211'
+  +'111011111222221111112122222212221232223322333344445555555556666687898899999'
+  +'9:;;;;:<==<<=>?>???AAAAAACCBEEDFEEHGGJIIKJJLLLNMNNNNPOOQQQRRRUTUWWWXXYZZZ\\'
+  +'\__`aaaeeeghgjjjlmloooqqqtttvvvxxy{{{}|}'#128''#128#131#130#130#133#133#133
+  +#135#135#135#138#138#137#140#140#140#142#142#142#145#145#145#147#147#147#150
+  +#150#150#153#152#153#155#155#155#156#156#156#159#159#159#161#161#161#164#163
+  +#163#166#166#166#168#168#168#170#170#170#172#172#172#174#174#174#165#165#165
+  +'|||NNN"""'#16#16#16#16#16#16#16#16#16#16#16#16#16#16#16#15#15#15#16#16#16#16
+  +#16#16#15#15#15#16#16#16#15#15#15#15#15#15#15#15#15#15#15#15#14#14#14#14#14
+  +#14#14#14#14#14#14#14#13#13#13#12#12#12#12#12#12#12#12#12#12#12#12#10#10#10
+  +#10#10#10#10#10#10#10#10#10#9#9#9#9#9#9#8#8#8#8#8#8#7#7#7#7#7#7#6#6#6#6#6#6#6
+  +#6#6#5#5#5#5#5#5#3#3#3#3#3#3#3#3#3#3#3#3#22#22#22'DDEuuu'#161#161#161#170#170
+  +#170#169#169#169#167#167#167#165#165#165#166#166#166#170#170#170#169#169#169
+  +#169#169#169#170#170#169#170#170#170#170#170#170#159#159#159#140#140#140#137
+  +#137#137#135#135#135#132#132#132#129#129#129'~~~{{{xyyuuurrropollljiigffddca'
+  +'aa^^^[[[XXXVVVRSRPPPMMMIJJHGHEEEDDDAAA>>>;;;999777444223000../,--*+*)))&&'''
+  +'%%%######  !   '#29#29#29#29#29#29#27#27#27#26#26#25#25#25#24#23#23#23#22#22
+  +#22#21#21#21#20#20#20#20#20#20#20#20#19#18#18#18#18#17#18#17#17#16#16#16#16
+  +#16#16#16#14#15#14#15#14#14#13#14#14#14#13#13#12#12#12#12#12#12#12#12#12#12
+  +#12#12#12#11#11#10#10#10#11#10#10#10#10#10#10#10#10#10#10#10#10#10#9#10#9#10
+  +#9#9#9#9#9#9#9#9#9#9#9#9#8#8#9#8#8#8#8#8#8#8#8#8#8#8#8#7#7#7#7#7#8#7#7#7#7#7
+  +#7#7#7#6#7#7#7#7#6#7#7#6#6#6#7#6#6#6#6#6#6#6#5#6#6#5#6#6#6#5#6#5#6#5#5#5#6#5
+  +#5#6#5#5#5#5#5#5#5#5#5#5#4#5#5#5#4#5#5#5#5#4#4#4#4#4#4#4#4#4#4#4#3#4#3#3#3#3
+  +#3#4#3#3#4#3#4#4#4#3#4#4#3#3#3#3#3#3#3#3#3#3#3#2#3#3#2#2#3#3#3#2#3#3#2#3#2#2
+  +#3#2#2#2#2#2#2#2#2#2#2#1#2#2#1#2#1#2#1#1#2#2#2#1#2#1#1#1#1#1#1#2#1#1#1#2#1#1
+  +#1#2#0#1#1#1#1#1#0#1#1#1#1#1#1#1#1#0#0#0#1#1#0#0#0#1#0#0#0#0#0#1#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy0000000000000'
+  +'00000000000000000000000000000000222444444666777777888888999999999999:::::::'
+  +'::::::::;;;;;;;;;<<<<<<<<<<<<==================:::777767222000/////////////'
+  +'///////////6668888888888888888888888878878878778778778778777777777777774444'
+  +'434444444444444446666666666666666666656656556556556556556556556555545554555'
+  +'555444554444455444434444444344444433333444333443333333232323322222222222122'
+  +'112111011112212212212221112211112222222221221123322222222223332333324345545'
+  +'555555556567777778889::9:9:::;;;=====<>?????AAAAAACCCEEDFFEHHGJIIKJJMLLNNNP'
+  +'NNRRQTSSUTTUUUWWWXYY[\\^]^aaacbbeeegggkkknmnppprrsuttxxxzzz}}}'#131#131
+  +#130#133#132#133#135#135#135#138#136#137#140#140#140#142#142#142#145#145#144
+  +#147#147#147#149#149#149#152#153#152#155#155#155#157#157#157#160#160#160#161
+  +#161#161#164#164#164#166#166#166#169#169#169#171#171#171#174#174#174#171#172
+  +#172#130#130#130'NNN   '#17#17#17#18#18#18#18#18#18#17#17#17#17#17#17#17#17
+  +#17#17#17#17#18#18#18#17#17#17#17#17#17#17#17#17#17#17#17#17#17#17#17#17#17
+  +#16#16#16#16#16#16#16#16#16#16#16#16#15#15#15#15#15#15#15#15#15#14#14#14#14
+  +#14#14#13#13#13#12#12#12#13#13#13#12#12#12#11#11#11#11#11#11#11#11#11#10#10
+  +#10#10#10#10#9#9#9#8#8#8#8#8#8#8#8#8#7#7#7#6#6#6#6#6#6#6#6#6#5#5#5#5#5#5#3#3
+  +#3#3#3#3#3#3#3#3#3#3#3#3#3#2#2#2#19#19#19'DDD{{{'#168#168#168#174#174#174#177
+  +#177#177#177#177#177#176#176#176#176#176#176#176#176#176#176#176#176#166#166
+  +#166#149#148#148#146#146#146#142#141#142#139#139#139#136#137#137#133#134#133
+  +#131#131#131#128#128#128'}}}zzzwwxtttqqqnnnkkkhhgdedbbb`__\\\YYYVWWSSSPQPNNN'
+  +'KKKHHHFFFCCD@@@>>>;;;998667544222000///,,-*+*()(&&''%%%#####" !!'#31#31' '
+  +#29#29#30#28#28#29#27#27#27#26#25#26#24#25#24#22#22#22#22#22#22#21#21#21#20
+  +#20#20#20#20#20#20#19#20#18#18#18#18#17#17#16#16#16#16#16#17#16#16#16#14#14
+  +#15#15#15#14#14#13#14#13#14#13#12#12#12#12#12#12#12#12#12#12#12#11#12#12#11
+  +#10#10#11#11#10#10#10#10#10#10#10#10#10#10#10#10#10#10#9#10#9#10#10#9#9#9#9#9
+  +#9#9#9#8#9#8#9#9#8#9#8#8#8#8#8#8#8#8#8#8#7#8#8#8#7#7#7#8#8#7#7#7#7#7#7#7#7#7
+  +#7#6#6#6#7#6#6#6#6#6#6#6#6#6#6#6#6#5#6#5#6#5#5#5#5#5#5#5#5#5#6#5#5#5#5#5#5#5
+  +#5#5#5#5#5#5#5#5#5#4#5#5#5#4#4#5#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#4#3#3#4#4#3
+  +#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#3#3#2#2#2#2#2#2#3#2#2#3#3#2#2#2#2#2#2#2#2#2
+  +#2#2#2#2#2#1#1#2#1#1#2#1#1#2#2#2#2#1#2#1#2#1#2#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1
+  +#1#1#1#0#1#1#1#1#1#0#1#0#0#1#0#0#0#0#1#1#0#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy000000000000000000000000000000000'
+  +'000000000000333555555666777999::::::::::::;;;;;;;;;;;;<<<<<<<<<<<<========='
+  +'===>>><<<:::767444222///...////////////////////////////////////000888888888'
+  +'888888888888888888887887877877877877877777777777666443443443444444444555666'
+  +'666666666666666666665665655655655655655655655554545545454454454444444444444'
+  +'444434444444443333443344333333333333233323333322322322211221221222222122111'
+  +'1121211111112222122211122332322232223333332334445544445555556667777677889::'
+  +'99:;::;;<<<<===>==@??@@@AAACCCDDDFFEHHGIIHKJJMLLNNNPOOSQRUTSWWVXXWZZZ[[[\\\'
+  +'^^^aa`cbcfeehhhkkkmmlppptttwvwyyy{{{~~~'#128#128#128#131#131#131#133#133#133
+  +#137#137#137#139#139#139#142#141#142#145#145#145#148#147#147#150#150#150#152
+  +#152#152#155#154#154#157#157#157#159#159#159#161#162#161#164#164#164#166#167
+  +#166#169#169#169#172#172#172#174#174#174#155#154#154'ggg///'#18#18#18#19#19
+  +#19#18#18#18#18#18#18#19#19#19#19#19#19#20#20#20#20#20#20#20#20#20#19#19#19
+  +#19#19#19#20#20#20#19#19#19#19#19#19#19#19#19#18#18#18#18#18#18#18#18#18#17
+  +#17#17#17#17#17#17#17#17#16#16#16#16#16#16#16#16#16#16#16#16#15#15#15#14#14
+  +#14#14#14#14#13#13#13#14#14#14#13#13#13#12#12#12#11#11#11#12#12#12#11#11#11
+  +#10#10#10#9#9#9#9#9#9#9#9#9#8#8#8#7#7#7#7#7#7#6#6#6#6#6#6#5#5#5#4#4#4#4#4#4#4
+  +#4#4#4#4#4#4#4#4#3#3#3#2#2#2#2#2#2#2#2#2'!!!bab'#159#159#159#183#183#183#183
+  +#183#183#183#183#183#182#182#182#172#172#172#155#155#156#153#153#153#150#150
+  +#150#147#147#147#144#145#145#141#142#142#139#139#139#136#136#136#133#132#132
+  +#130#130#130'~{{{xxxuuurrrooollliiifggbbb```\]]ZZZVWVTSTQPPNNNKKKHIIFFFDCD'
+  +'AAA>>>;;;:::677454223/////.-,-))))()&''''%$$###"""! !'#30#30#30#30#30#29#28
+  +#28#28#26#26#25#26#25#25#24#24#23#23#23#23#22#23#22#21#22#21#20#20#20#20#19
+  +#20#19#19#18#19#19#19#18#17#17#17#17#16#16#16#16#16#16#16#15#15#15#13#13#13
+  +#14#13#13#14#14#14#12#12#12#12#12#12#12#12#12#12#12#11#11#10#11#10#11#11#10
+  +#10#10#10#10#10#10#10#10#9#10#10#9#10#9#10#10#10#9#10#9#9#10#9#9#9#9#9#9#9#9
+  +#9#8#8#9#8#8#8#8#8#8#8#8#8#7#7#8#7#7#7#7#7#7#8#7#7#7#7#7#7#7#7#7#7#7#6#7#6#6
+  +#6#6#6#6#6#6#6#6#6#6#6#5#5#5#6#5#5#6#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#4#5#5#5#5
+  +#5#5#5#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#4#4#3#3#3#3#3#3#3#4#3#3
+  +#3#3#3#3#3#3#2#3#3#3#3#3#3#3#3#2#3#2#2#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2#2
+  +#2#2#2#2#2#2#1#2#2#2#1#2#2#1#1#1#1#2#1#1#1#1#2#1#1#1#1#1#1#1#1#1#1#1#0#1#1#0
+  +#1#0#1#1#1#1#1#0#0#1#0#0#0#0#1#1#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0'000yyy000000000000000000000000000000000000000000000444555'
+  +'666777999:::;;;;;;<<<<<<<<<<<<============>>>:::888767333111....../////////'
+  +'/////////////////////////////////////////////444888888888888888888888888888'
+  +'887887887877877877877877777777544433443443443444444666666666666666666666666'
+  +'666665665655655655655654655554645544544555445444544544444444444434444444444'
+  +'333334344333333333333323333223222222222232322222222212112121111211222222222'
+  +'222122333333223222344333333444334545322333333444555777767998;:9<;;>==>>>@@@'
+  +'A@ABABDCCDDDFGFGGGIIHKKJMLLNNNPOOSRRUTTWWWYWX[[Z]]\`__a`aaaadcdfffihhkkknnn'
+  +'qqqssswvvyyz||}'#130#130#130#133#133#133#136#136#135#138#138#138#141#140
+  +#141#143#144#144#147#146#147#149#149#149#152#151#151#155#155#155#157#157#157
+  +#160#159#159#162#162#162#164#164#164#167#167#167#169#169#169#172#172#172#174
+  +#174#174#141#141#141'OOO'#29#29#29#19#19#19#20#20#20#20#20#20#20#20#20#20#20
+  +#20#21#21#21#21#21#21#22#22#22#22#22#22#22#22#22#22#22#22#21#21#21#21#21#21
+  +#21#21#21#22#22#22#21#21#21#20#20#20#20#20#20#21#21#21#20#20#20#20#20#20#19
+  +#19#19#18#18#18#18#18#18#18#18#18#17#17#17#17#17#17#17#17#17#16#16#16#15#15
+  +#15#14#14#14#14#14#14#14#14#14#13#13#13#12#12#12#12#12#12#12#12#12#12#12#12
+  +#11#11#11#10#10#10#9#9#9#9#9#9#9#9#9#8#8#8#7#7#7#7#7#7#6#6#6#6#6#6#5#5#5#5#5
+  +#5#4#4#4#4#4#4#4#4#4#2#2#2#2#2#2#2#2#2#2#2#2#1#1#1#12#12#12'HHH'#146#146#146
+  +#188#189#189#179#179#179#164#164#164#161#161#161#159#158#158#156#155#155#153
+  +#153#153#150#150#150#147#147#147#144#144#143#141#141#141#138#138#138#134#134
+  +#134#131#131#131''#128'}}}zzzvvvtttpppmmmjijfffdccaaa]^^ZZZXXXTUTQQQOOOLLL'
+  +'HIIFFFCCCAAA>>>;;;889666444222///...---)*)(((''&&$$$###"""   '#31#30#31#29
+  +#29#29#28#28#28#26#26#26#26#25#25#24#23#23#23#23#22#22#22#21#20#20#20#20#20
+  +#20#20#20#20#19#19#18#17#18#17#16#16#16#16#16#16#16#16#16#15#15#15#15#14#15
+  ,#14#14#13#13#14#13#12#12#12#12#12#12#12#12#12#12#12#12#11#11#11#10#11#11#11
+  +#11#11#10#10#10#10#10#10#10#10#10#10#10#10#10#9#10#10#9#10#10#9#10#9#9#9#9#9
+  +#9#9#9#9#9#9#8#8#8#8#8#8#8#8#8#8#8#8#8#7#8#7#7#7#8#7#7#7#7#7#7#6#7#7#6#7#6#6
+  +#7#6#6#7#7#6#6#6#6#6#6#6#6#6#6#6#6#5#5#6#6#5#6#5#6#5#5#6#5#5#5#5#5#5#5#5#5#5
+  +#5#5#5#5#5#5#5#4#4#5#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#4#3#4#3#4#3#3
+  +#3#3#3#4#3#3#3#3#3#3#3#2#3#3#3#3#3#3#2#2#2#2#3#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2
+  +#2#2#2#2#2#2#2#1#1#2#1#2#1#2#1#1#1#2#1#2#1#2#2#1#2#1#1#2#1#1#1#1#1#1#1#1#1#1
+  +#0#1#1#1#1#0#0#0#1#1#1#1#1#1#1#1#0#0#0#0#1#0#0#0#1#0#0#0#1#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0'000yyy00000000000000000000000000000000000000000011144'
+  +'4555777888:::<<<===============:::777556222000......///////////////////////'
+  +'/////////////////////////////////////////////////77788888888888888888888888'
+  +'888888788788787787787787787777766643343343344344344355566666666666666666666'
+  +'666666666666566565565565565565565565555454455545554454444445444444444434434'
+  +'344433434344343333333333333333323222332232333232232222222222222212121233322'
+  +'2222222332332323333322111//////.//00000/01010111132234344455566666789999:<<'
+  +'<>>>@@@BCCEDEEEEHGGIJIKKJMMLNNNPOOSRRUTTWWWYXX[[[]]]``_bbaddefeegggjjikllno'
+  +'oqqqtttvvvzzz~~~'#129#128#129#131#131#131#134#134#134#136#136#136#140#140
+  +#140#143#143#143#146#146#146#148#148#148#151#151#151#153#153#153#157#156#157
+  +#159#159#159#163#162#162#165#165#165#167#167#167#169#169#169#172#172#172#174
+  +#174#174#141#141#141'III'#22#22#22#20#20#20#21#21#21#22#22#22#22#22#22#23#23
+  +#23#22#22#22#23#23#23#23#23#23#24#24#24#24#24#24#24#24#24#24#24#24#24#24#24
+  +#23#23#23#22#22#22#23#23#23#23#23#23#23#23#23#22#22#22#22#22#22#22#22#22#22
+  +#22#22#21#21#21#20#20#20#20#20#20#19#19#19#20#20#20#19#19#19#19#19#19#19#19
+  +#19#20#20#20#19#19#19#18#18#18#17#17#17#16#16#16#16#16#16#15#15#15#13#13#13
+  +#13#13#13#13#13#13#12#12#12#10#10#10#10#10#10#9#9#9#9#9#9#9#9#9#8#8#8#7#7#7#7
+  +#7#7#7#7#7#6#6#6#6#6#6#4#4#4#4#4#4#4#4#4#4#4#4#2#2#2#2#2#2#2#2#2#2#2#2#1#1#1
+  +#1#1#1#3#3#3'>>>'#132#132#132#169#169#169#167#167#167#164#164#164#161#161#161
+  +#158#158#159#155#155#155#152#152#152#149#149#149#146#146#146#143#143#143#139
+  +#139#139#136#136#136#133#133#133#130#129#129'~~~{{{wwwtttqrrnmmjjjghhcccaaa^'
+  +'^^[Z[XXXTTTQQROOOLLLHIIFFFDCCBAA>>>;;;998666544223///...,,+)**''''(&&&$$$##'
+  +'#"!"!  '#31#30#30#29#29#29#27#27#27#26#26#26#25#24#25#24#23#23#23#22#23#21
+  +#22#21#20#20#21#20#20#20#20#19#20#18#19#19#18#18#17#16#16#17#17#16#16#16#16
+  +#16#15#15#15#15#15#15#14#14#14#14#14#13#12#12#12#12#12#12#12#12#12#12#12#12
+  +#10#10#11#10#11#11#10#10#11#10#10#10#10#10#10#10#10#10#9#10#10#10#9#10#9#9#9
+  +#10#9#9#9#9#9#9#9#9#9#8#9#8#8#8#9#8#8#9#8#8#7#8#8#8#7#8#8#7#7#7#7#7#7#7#7#7#7
+  +#7#7#7#7#6#7#6#6#6#6#7#6#6#6#6#6#6#6#6#6#5#6#6#5#6#5#5#6#5#5#6#6#5#5#5#6#6#5
+  +#5#5#5#5#5#5#5#5#4#5#5#5#4#5#4#4#5#4#4#5#4#4#4#5#4#5#4#4#4#4#4#4#4#4#4#4#4#3
+  +#4#3#3#3#3#4#3#3#3#4#3#3#3#3#3#3#3#3#3#3#3#3#2#3#3#3#2#2#3#2#2#3#2#2#2#3#2#2
+  +#3#2#2#3#2#2#2#2#2#2#2#2#2#1#2#1#1#2#2#1#2#1#2#1#1#1#1#1#1#1#2#1#2#2#1#1#2#1
+  +#1#1#1#1#0#1#1#1#1#0#0#1#0#1#1#0#0#0#1#1#1#0#0#1#1#0#1#0#0#0#0#1#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy0000000000000000000000000000000000000'
+  +'00000222444666888:::::::::656444222......//////////////////////////////////'
+  +'///////////////////////////////////////////////1012224345558888888888888888'
+  +'888888888888888888878878778778778778777775543334334334334434446666666666666'
+  +'666666666666666666666666656656556556556556556556555555555444454455445544544'
+  +'444444444434443343433344333333444333333323332333333334223223223222221222222'
+  +'12232223222322222333222001/./.-----././/////0000111112222113334545556666567'
+  +'8899999:::;==>>>??@@CCBEEEIIIKLKMMMNNNPPOSRRUTTWWWYXX[[[^]]```bbbedegggjjjl'
+  +'llmmmooorrquuuwxw{{{}}}'#128#128#128#132#131#131#135#135#135#139#139#139#141
+  +#141#141#144#144#144#146#146#146#150#149#150#153#153#153#156#155#155#158#158
+  +#158#161#161#161#164#164#164#166#166#166#170#170#170#172#172#172#175#174#174
+  +#141#141#141'III'#22#22#22#21#21#21#22#22#22#22#22#22#23#23#23#23#23#23#24#24
+  +#24#24#24#24#25#25#25#26#26#26#26#26#26#26#26#26#26#26#26#26#26#26#25#25#25
+  +#26#26#26#25#25#25#25#25#25#24#24#24#24#24#24#24#24#24#23#23#23#23#23#23#23
+  +#23#23#23#23#23#23#23#23#24#24#24#25#25#25#26#26#26#27#27#27#28#28#28#28#28
+  +#28#29#29#29#30#30#30#30#30#30#29#29#29#29#29#29#27#27#27#26#26#26#25#25#25
+  ,#24#24#24#22#22#22#20#20#20#19#19#19#16#16#16#14#14#14#13#13#13#10#10#10#10
+  +#10#10#9#9#9#8#8#8#8#8#8#7#7#7#7#7#7#6#6#6#5#5#5#4#4#4#4#4#4#4#4#4#4#4#4#2#2
+  +#2#2#2#2#2#2#2#2#2#2#1#1#1#1#1#1#1#1#1#1#1#1':::'#132#132#132#169#169#169#166
+  +#166#167#164#164#164#160#160#160#158#157#157#154#154#154#150#150#150#147#147
+  +#147#144#145#145#141#141#141#137#137#137#134#134#134#131#131#131''#128#128
+  +'|||yxyuuurrroookkkhhhdddbbb^]^Z[ZXXXVVVQQQOOOLLLHIIFFFCCCAAB>?>;;;889767544'
+  +'222///.-.,,+)))((''&&&######!  '#31' '#31#29#29#29#29#29#29#27#27#27#25#26
+  +#26#25#25#25#23#22#22#23#22#22#21#21#22#20#20#20#20#20#20#18#19#19#18#19#18
+  +#18#18#18#17#17#17#16#16#16#16#16#16#15#15#15#14#14#14#13#14#14#12#12#13#13
+  +#12#12#13#12#12#12#12#12#12#12#12#11#10#10#11#10#10#10#10#10#10#10#11#10#10
+  +#10#10#10#10#10#10#10#10#10#9#9#9#9#9#9#9#9#9#9#8#9#9#8#9#9#8#9#9#8#8#8#8#8#8
+  +#7#8#8#7#7#7#7#7#7#7#7#7#7#7#7#7#7#7#7#7#7#6#7#6#6#6#7#6#6#6#6#6#6#6#6#6#6#6
+  +#6#5#5#5#6#5#5#5#5#5#5#5#6#6#5#5#5#6#5#5#5#5#5#5#4#4#5#5#5#4#5#5#4#4#4#4#4#4
+  +#4#5#4#4#4#4#4#4#4#4#4#3#4#3#4#3#4#4#4#4#4#3#4#4#3#4#3#4#4#3#3#3#3#3#3#3#3#2
+  +#3#2#3#2#3#2#2#2#3#2#2#3#2#2#2#3#2#2#2#2#3#2#2#2#2#2#2#2#2#2#1#2#2#2#1#2#1#2
+  +#1#1#2#2#2#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1#0#1#0#0#0#1#0#0
+  +#1#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy000000000'
+  +'000000000000000000000000000000000222555777999;;;333.../////////////////////'
+  +'/////////////////////////////////////////////////////////111323444666777988'
+  +'988988888888888888888888888888888888888888888887887887877877877877777333333'
+  +'333433433433555666666666666666666666666666666666666666665665655655655655645'
+  +'655655655554555454554454445444444444444444443433343433344334333333333333433'
+  +'422422423322322322222222212222333233222222222///------..---..-./../0/000000'
+  +'101222222322444444555666888999:::;;;===>>???@AABBBCDDDFFGJIIMMNPPOSSRUTTWVV'
+  +'YXX[[[^]]```cbbeeehhhjjjlmlooorrrsssvvvyxx{{{~~~'#130#129#129#133#133#133
+  +#135#135#135#139#138#139#142#142#143#145#145#145#149#149#148#151#151#151#154
+  +#154#154#157#157#157#161#160#160#163#163#163#165#166#165#169#168#168#172#171
+  +#172#175#175#175#154#153#153'QQQ'#22#22#22#22#22#22#22#22#22#24#24#24#25#25
+  +#25#25#25#25#25#25#25#26#26#26#27#27#27#27#27#27#27#27#27#28#28#28#28#28#28
+  +#28#28#28#27#27#27#27#27#27#27#27#27#27#27#27#27#27#27#26#26#26#25#25#25#25
+  +#25#25#24#24#24#25#25#25#25#25#25#24#24#24#25#25#25#27#27#27#29#29#29#31#31
+  +#31'!!!###%%%&&&''''''((((((((((((''''''%%%%%%$$$###!!!'#31#31#31#30#30#30#26
+  +#26#26#24#24#24#21#21#21#18#18#18#15#15#15#12#12#12#10#10#10#8#8#8#7#7#7#7#7
+  +#7#7#7#7#6#6#6#4#4#4#4#4#4#4#4#4#4#4#4#2#2#2#2#2#2#2#2#2#2#2#2#1#1#1#1#1#1#1
+  +#1#1#0#0#0#1#1#1'BBB'#146#146#146#169#169#169#166#165#165#162#162#162#159#159
+  +#159#155#155#155#153#153#153#149#149#149#146#145#145#142#141#142#139#139#139
+  +#135#135#135#132#132#132#129#128#129'}}}zzzvvvrssooolllijjfeebbb^^^[[[XXXUVV'
+  +'SRROOOLKKIIIFFFDCC@@@>>>;;;989656443111///---,++)**''''(%%&####""!!!  '#31
+  +#29#30#30#28#28#28#26#26#26#25#26#26#24#24#24#23#23#22#23#22#22#20#20#20#20
+  +#20#21#20#20#20#19#18#19#17#17#18#17#16#17#16#17#16#16#16#16#15#15#15#15#15
+  +#15#14#14#14#14#13#14#13#13#12#12#13#12#12#12#12#12#12#12#11#11#11#11#11#11
+  +#10#11#10#10#10#11#10#10#10#10#10#10#10#10#10#9#10#10#9#9#10#9#9#9#9#9#9#9#9
+  +#9#9#9#9#8#8#8#8#8#8#8#8#8#8#8#8#7#8#8#8#7#8#7#8#7#7#7#7#7#7#7#6#7#7#7#7#6#6
+  +#7#6#6#7#7#6#6#7#6#6#6#6#6#6#6#6#6#6#6#6#6#5#5#6#5#6#5#6#6#5#6#5#5#5#5#5#5#5
+  +#5#5#5#5#5#5#5#4#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#4#3#4#4#3#4#4#4#4#3#4
+  +#3#3#4#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#3#2#3#3#3#3#2#3#2#2#2#2#2#2#2#2#3#2#2
+  +#2#2#2#2#2#2#2#1#2#2#2#2#2#2#1#2#1#1#1#1#1#1#2#1#1#1#1#1#1#2#1#1#1#1#1#1#1#1
+  +#0#1#1#1#1#1#0#0#1#1#0#0#1#1#0#1#0#1#0#1#0#0#1#0#1#0#0#1#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0'000yyy000000000000000000000000000000000000000000444555888:::<<<11'
+  +'1////////////////////////////////////////////////////////////00011133354466'
+  +'688899999899899898898898898898888888888888888888888888888888888888888888888'
+  +'788787787787787755533333333333343343366666666666666666666666666666666666666'
+  +'666666666566565565565565565565554554555455545544454544444444443434444444344'
+  +'4344443333434334333433433333433432332322322223232222333322332011.--.-------'
+  +'-...-.....//.0//011100111111221444455655566766787999:::;;;<===>>@?@A@ABBCDD'
+  +'EFFGHHHIIJKKLOOOSSTWWVYXX[[[^]]```cbbfeeihhjjjmmmpoosssuuuxxxyyy|||'#131
+  ,#130#131#133#133#133#136#136#136#139#139#139#143#143#143#146#146#146#149#149
+  +#149#153#152#153#156#156#156#158#158#158#161#161#161#164#165#165#168#168#168
+  +#170#171#170#173#174#174#170#170#170'hhh"""'#23#23#23#24#24#24#25#25#25#25#25
+  +#25#27#27#27#27#27#27#28#28#28#28#28#28#28#28#28#29#29#29#30#30#30#30#30#30
+  +#29#29#29#29#29#29#30#30#30#29#29#29#28#28#28#28#28#28#28#28#28#28#28#28#27
+  +#27#27#27#27#27#26#26#26#25#25#25#25#25#25#25#25#25#24#24#24#25#25#25#27#27
+  +#27#30#30#30'!!!$$$''''''(((+++,,,..................---,,,,,,+++)))((('''''''
+  +'%%%"""'#31#31#31#28#28#28#24#24#24#21#21#21#17#17#17#12#12#12#9#9#9#8#8#8#7
+  +#7#7#6#6#6#5#5#5#4#4#4#5#5#5#3#3#3#2#2#2#2#2#2#2#2#2#1#1#1#1#1#1#1#1#1#0#0#0
+  +#0#0#0#0#0#0#13#13#13'[[['#163#163#163#167#168#167#164#164#164#161#161#161
+  +#157#157#157#153#154#154#150#150#150#147#147#147#143#143#144#140#140#140#136
+  +#136#136#133#133#133#129#130#129'~~~zzzwwwtttpoolllijiefebbb___[ZZXXXVUURRSO'
+  +'OOLLLHIIFFFCCCA@@===;;;998566334111///-,-+***))''''&%&%###"""!! '#31#30#31
+  +#29#29#30#28#28#28#26#26#26#25#25#25#24#24#24#23#23#22#22#21#22#20#21#20#20
+  +#20#20#20#20#20#19#19#19#18#17#17#16#17#16#16#16#17#16#16#16#15#15#15#14#14
+  +#14#13#14#14#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#11#11#11#11#11#11
+  +#11#10#11#10#10#10#10#10#10#10#10#10#10#10#10#9#10#10#10#9#10#9#9#9#9#9#9#8#8
+  +#9#9#8#8#8#8#8#8#8#8#8#8#8#7#8#8#8#8#8#8#8#7#7#7#7#7#7#7#7#7#7#7#7#7#6#7#7#6
+  +#7#6#6#6#6#6#6#6#6#6#6#6#6#5#5#6#6#5#5#5#6#5#6#6#6#5#6#6#5#6#5#5#5#5#5#5#5#5
+  +#5#5#5#5#5#5#5#5#5#5#4#4#5#4#4#4#4#4#4#5#4#4#4#4#3#4#4#4#4#4#3#3#4#3#3#3#3#3
+  +#3#4#4#3#3#3#3#3#3#3#3#3#3#3#3#2#3#3#2#3#3#3#3#2#2#3#3#3#2#2#3#2#2#2#2#2#2#2
+  +#2#2#2#2#2#1#2#2#2#2#2#2#2#2#1#2#1#1#1#2#2#1#2#2#1#1#1#2#2#1#1#1#1#1#1#1#1#1
+  +#0#1#1#1#1#1#1#0#0#1#1#1#0#0#0#0#0#0#0#0#0#0#1#0#0#1#0#0#1#1#1#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0'000yyy000000000000000000000000000000000000000111444666888:::<<<.../////'
+  +'/////////////////////////////////////11122244455577699999999999999999999999'
+  +'999999899898898898898898888888888888888888888888888888888888888888888788787'
+  +'787787787743333333333333333354476676666666666666666666666666666666666666666'
+  +'666666566565565565565565554565555554454555445545444454444444434444443433444'
+  +'3433433343433433433333433423333322332233222222333122/./--,.-.-..-...-......'
+  +'..///0/000121333333444667::;;::<;;>==>==>>>:::<<<=<=>>>>>?@AABCCCDDEEFGGHHI'
+  +'JLLLMMNOPPRRRVVV[[[^]]```cbbeeeihhkjjmmmpoossswwvyxy|||'#129#129#129#131
+  +#131#130#133#134#133#137#137#137#140#140#141#143#143#143#147#147#147#150#150
+  +#150#154#154#154#157#156#156#160#160#160#163#163#163#166#166#166#169#169#169
+  +#172#172#172#175#176#176#137#137#137'777'#24#24#24#24#24#24#25#25#25#27#27#27
+  +#28#28#28#28#28#28#29#29#29#30#30#30#30#30#30#31#31#31#31#31#31#31#31#31#31
+  +#31#31#31#31#31#31#31#31#30#30#30#30#30#30#31#31#31#31#31#31#30#30#30#29#29
+  +#29#28#28#28#28#28#28#28#28#28#26#26#26#25#25#25#25#25#25#24#24#24#24#24#24
+  +#24#24#24#25#25#25#28#28#28'   $$$(((+++...000222333333333333444444444444333'
+  +'222111000///---+++((($$$!!!'#30#30#30#25#25#25#21#21#21#16#16#16#12#12#12#8
+  +#8#8#6#6#6#5#5#5#5#5#5#5#5#5#4#4#4#3#3#3#3#3#3#2#2#2#2#2#2#1#1#1#1#1#1#0#0#0
+  +#0#0#0#0#0#0#0#0#0'###~~~'#169#169#169#165#165#165#162#162#162#158#158#158
+  +#155#155#155#152#152#152#148#148#148#144#144#144#141#141#141#138#138#138#133
+  +#133#133#130#131#130'~{{{wwwtttqpqmmmjijffgbbb___[[ZXXXVUUQQQOOOLKKIHIFFFC'
+  +'CC@@@===:::999555222010///---+++)()&''''$$$###""" !!'#31#31#31#29#29#30#28
+  +#27#27#26#26#26#25#25#25#23#23#23#22#22#22#21#21#21#20#20#20#20#20#20#19#19
+  +#19#18#18#18#18#18#18#16#16#16#17#16#16#15#15#15#15#15#15#13#14#14#14#13#14
+  +#13#13#13#12#13#12#12#12#12#12#12#12#10#11#11#11#11#10#11#11#11#10#10#10#10
+  +#10#10#10#10#10#10#10#10#10#9#9#9#10#9#9#9#10#9#9#9#9#9#9#9#8#9#8#9#8#9#8#8#8
+  +#8#8#8#8#8#8#8#8#7#8#8#7#7#8#7#7#7#7#7#7#7#7#6#7#7#7#7#7#6#7#7#7#6#7#6#6#6#6
+  +#6#6#6#6#6#6#5#5#6#5#5#6#5#5#6#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#4#5
+  +#5#4#4#5#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#4#3#4#3#4#3#3#4#3#3#3#3
+  +#3#3#3#3#2#3#3#3#3#3#3#2#3#3#3#3#2#2#2#3#2#2#2#2#2#2#2#3#2#2#2#2#2#2#1#2#2#2
+  +#1#1#1#2#1#2#2#2#1#1#1#2#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1#1#1#0#1#1#1#1#1#1
+  +#1#1#1#1#1#0#0#0#1#0#1#0#1#1#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy00000000000'
+  +'0000000000000000000000000000222444777999;;;999...////////////////////////21'
+  +'2333444777877:99:99:9999999999999999999999999999999999999999899899898898898'
+  ,'898898888888888888888888888888888888888888888888788788787787766633333333333'
+  +'333333366676676676666666666666666666666666666666666666666666666566565565565'
+  +'565565565565554554455555544444444545544454454444344344443444344344443343343'
+  +'3433432433323323322223333001--------,--------...///////000212566;;;@@?DDDIH'
+  +'HIIIKKKKKKKKJKLKLKLLMLMMMMMMKKKHHHGGGEEECDDEEFHGHIIJKKLMMNOOPRQRTTUWWWYYZ__'
+  +'_cbbeeeihhkjjmmmpppsssvwwyxy|||'#128#128''#130#130#130#133#133#133#135#135
+  +#135#138#138#138#141#141#141#144#144#144#148#148#148#150#150#150#153#153#153
+  +#158#158#158#161#161#161#164#164#164#167#168#168#171#171#171#174#174#174#166
+  +#166#166'[[['#24#24#24#25#25#25#27#27#27#26#26#26#28#28#28#29#29#29#30#30#30
+  +#31#31#31#31#31#31#31#31#31'   !!!!!!!!!            '#31#31#31#31#31#31#31#31
+  +#31#31#31#31#30#30#30#29#29#29#28#28#28#28#28#28#26#26#26#26#26#26#25#25#25
+  +#24#24#24#24#24#24#24#24#24#24#24#24#25#25#25#29#29#29'$$#))(..,220441764886'
+  +'996997997::9::9::9:::999999999888777666444222///---***&&&"""'#29#29#29#25#25
+  +#25#20#20#20#15#15#15#9#9#9#6#6#6#5#5#5#5#5#5#5#5#5#4#4#4#3#3#3#3#3#3#2#2#2#2
+  +#2#2#1#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'KKJ'#158#158#158#167#168#167#164#164
+  +#164#160#160#160#156#156#156#152#153#152#150#150#150#145#145#146#141#141#141
+  +#139#139#139#134#134#134#131#131#131#128'|||wwxtttqqpmmmiijfffbbb__^ZZ[XXX'
+  +'UVUQQQOOOKKKHHHEEEBBB@??;<<:::888555323100///---)*)(''''&&&%$%###!!! '#31' '
+  +#30#29#29#28#28#28#27#27#28#26#26#26#24#24#24#22#23#23#22#22#23#20#20#21#20
+  +#20#20#20#20#20#19#18#19#18#18#18#17#16#17#17#16#16#16#16#16#15#15#15#14#14
+  +#14#14#14#14#12#13#13#13#12#13#12#13#13#12#13#12#12#12#12#11#11#11#11#10#11
+  +#11#11#11#10#10#10#10#10#10#10#10#10#10#10#10#10#9#10#9#9#9#9#9#9#9#9#10#9#8
+  +#9#9#9#8#9#8#8#8#8#8#8#8#8#8#8#8#7#8#7#7#8#7#8#7#7#7#7#8#7#7#7#7#7#7#7#7#7#7
+  +#7#6#7#7#7#7#6#6#6#6#7#6#6#6#6#6#6#6#6#5#5#5#5#5#6#6#6#5#6#6#6#5#5#5#5#5#5#5
+  +#5#5#5#5#5#4#5#5#4#5#5#4#4#4#4#4#4#4#5#4#4#4#4#4#4#4#4#4#4#4#4#3#4#3#4#4#3#4
+  +#3#4#4#4#3#3#3#3#3#4#3#3#3#3#3#3#3#2#3#2#3#2#3#3#2#3#2#2#2#3#2#2#3#3#2#2#2#2
+  +#2#2#2#2#2#2#2#2#2#2#2#2#1#1#1#2#1#2#1#1#2#2#2#2#1#1#2#1#1#1#1#1#1#1#1#1#1#1
+  +#1#1#1#1#1#1#1#0#0#1#1#0#1#1#1#1#0#1#0#0#0#1#1#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'0'
+  +'00yyy000000000000000000000000000000000000000222555777999<<<656/////////////'
+  +'/0555777999::9::9::9::9:99:99:99:99:999999999999999999999999999999999999999'
+  +'989989989889889889889888888888888888888888888888888888888888888888878878778'
+  +'775443333333333333334447767667667667666666666666666666666666666666666666666'
+  +'666666656656556556556555556555556555445445544454454545445445445444444333434'
+  +'43544443433433433433433332322333322211...--.---,--....-.//./////0100566>>>D'
+  +'DDGGGIIIJKJKLKMLMMMNMMMOOOONONNNOOOPPPOOOQPPQQQRRRTTTTSTPQPMNNIIJKLLMMMOOPR'
+  +'RRTTTWVWYXY[[\]]^ccchggkjjmmmqpptsswwwyyy|||'#128''#130#131#130#134#134
+  +#134#137#137#137#140#140#140#141#141#141#145#145#144#148#148#148#151#151#151
+  +#155#155#155#158#158#158#161#161#161#165#165#166#168#168#168#171#172#172#176
+  +#176#176#139#139#139'222'#25#25#25#26#26#26#27#27#27#29#29#29#30#30#30#31#31
+  +#31'   !!!"""""""""""""""###""""""!!!!!!!!!!!!'#31#31#31#31#31#31#31#31#31#31
+  +#31#31#30#30#30#29#29#29#27#27#27#27#27#27#26#26#27#25#25#25#25#25#23#24#24
+  +#21#24#23#18#25#24#16#25#24#13#27#26#15'  '#25'''''$--,01444967;99>9:?:;?<<;'
+  +'>><@?9BA7CB7BB9A@;@@=??>>>=======;;;999777444111...)))%%%   '#27#27#27#22#22
+  +#22#16#16#16#10#10#10#6#6#6#5#5#5#4#4#4#3#3#3#3#3#3#3#3#3#3#3#3#2#2#2#1#1#1#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#30#30#30#129#129#129#169#169#169#165#165#165#161
+  +#161#161#158#158#158#154#153#153#150#150#150#147#147#147#142#142#142#138#139
+  +#139#135#135#135#131#131#131''#128'|||xxxtttqqqmmmjiifffbbb___[[[XXXUTTQQQ'
+  +'NNNKJJGGHEEEBCC???<<<:::787554223///...+,,***((''%%%######!!!'#31#30#31#29
+  +#29#29#29#28#28#26#26#26#25#25#25#24#24#24#22#23#23#22#22#22#21#20#20#20#20
+  +#20#20#20#20#19#19#19#18#18#17#17#17#17#16#17#16#15#16#16#15#15#15#14#14#14
+  +#13#13#14#13#13#12#12#12#12#12#13#12#12#12#12#11#11#11#10#11#11#11#11#11#11
+  +#10#10#11#10#11#10#10#10#10#10#10#10#10#9#9#9#9#10#10#10#10#9#9#9#9#9#9#9#9#8
+  +#9#8#8#9#8#8#8#8#8#8#8#8#7#8#7#7#8#8#8#8#7#7#7#7#7#8#7#7#7#7#7#7#7#7#7#7#6#7
+  +#6#7#6#6#6#6#6#6#6#6#6#6#6#6#6#5#6#6#5#5#5#5#5#6#5#6#5#5#5#5#5#5#5#5#5#5#4#5
+  +#5#5#4#4#4#4#4#4#5#4#5#4#5#4#5#4#4#4#5#4#5#4#4#4#4#4#3#4#3#3#3#4#3#3#3#3#4#4
+  +#3#3#3#3#3#3#3#3#3#3#3#2#3#3#3#3#2#2#3#3#3#2#3#3#3#3#2#3#2#3#2#3#3#2#2#2#2#2
+  +#2#2#2#2#2#2#2#2#1#1#2#1#2#1#2#2#1#2#1#2#1#2#1#2#1#2#1#1#2#1#1#1#1#1#1#1#0#1
+  +#1#1#1#1#0#1#1#1#1#1#0#1#0#1#0#1#0#1#1#0#1#0#0#0#0#0#1#1#0#0#1#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy00000'
+  +'0000000000000000000000000000000000333555777:::<<<222////////////222::::::::'
+  +'::::::9::9::9:99:99:99:99:99:9999999999999999999999999999999999999999899898'
+  +'898898898898888888888888888888888888888888888888888888888788788777733333333'
+  +'333333333355577677676676676676666666666666666666666666666666666666666666666'
+  +'566565565565565565565555454555554444544455454455454454454443454344454354444'
+  +'3443433433433432333323001.-/------------///////00101989BBAGGGIIIJJJLLLMLLOO'
+  +'ONONQQPQPQPQPQQQQQQRRRSSSSSRSRSSSSTTTTTTTTTWWWVWWYYYYYYVVWPPQQQRRSTVVVXWX[Z'
+  +'[]]^``adcdhhhmmmpootsswwwyyy|||'#128#128#128#131#131#131#134#134#134#138#138
+  +#138#141#140#140#144#144#144#148#148#148#149#148#149#152#152#152#156#155#155
+  +#159#159#158#163#163#163#165#165#165#169#169#169#173#173#173#174#174#174'iii'
+  +#29#29#29#26#26#26#28#28#28#29#29#29#30#30#30'   !!!"""###$$$$$$$$$$$$######'
+  +'############!!!!!!!!!!!!'#31#31#31#31#31#31#31#31#31#30#30#30#29#29#29#28#28
+  +#28#27#27#27#26#26#26#25#25#27#23#24#30#22#23'!'#19#23'5'#16#24'M'#14#24'b'
+  +#11#23's'#11#24#131#11#26#147#12#28#154#10#26#165#9#26#171#10#26#169#10#26
+  +#169#10#26#169#12#26#166#17#29#154#18#30#150#24'#'#140#30'&'#129'$+t-1g58W??'
+  +'ICCDGF=GF<ED?CCABBA@@@>>>:::888555000,,,''''''"""'#28#28#28#23#23#23#17#17
+  +#17#10#10#10#6#6#6#4#4#4#3#3#3#3#3#3#3#3#3#3#3#3#2#2#2#1#1#1#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#4#4#4'YYY'#166#166#166#166#166#166#163#163#163#158#158#158#155
+  +#155#155#151#151#151#147#147#147#143#143#143#140#140#140#136#136#136#132#132
+  +#132'}}}xxxtttqqpmmmiiigffbbb^]^[[[XXXTTTPPPNNMJIJFFGDDDBAA>>>;;;:::77644'
+  +'4111///---+++*))&&&%&%##$""! !!'#31#30#31#30#30#29#28#27#28#27#27#27#25#25
+  +#25#23#22#23#23#23#22#20#20#21#20#20#20#20#21#21#19#19#20#18#18#18#17#16#17
+  +#16#17#17#17#17#16#15#16#15#15#14#14#14#14#14#13#13#12#13#13#13#12#12#13#12
+  +#12#12#12#12#12#11#11#11#11#11#11#11#11#11#10#10#11#11#10#10#10#10#10#10#10
+  +#10#10#9#10#10#9#10#9#10#10#9#9#9#9#9#9#9#9#9#9#8#8#9#8#8#8#8#8#8#8#8#8#8#8#7
+  +#7#8#7#8#8#7#7#7#7#7#7#7#7#7#7#6#7#7#6#6#7#6#6#6#7#7#6#6#6#6#7#7#6#6#6#6#5#5
+  +#6#6#6#5#5#6#6#6#6#6#6#5#5#5#6#5#5#5#5#5#5#5#5#5#5#4#5#4#4#5#5#4#5#5#4#5#4#5
+  +#4#4#5#4#4#4#4#4#3#4#4#3#3#3#4#3#3#3#3#4#3#3#4#4#3#3#4#3#3#3#3#3#3#3#3#3#3#3
+  +#3#2#3#3#2#2#3#2#3#3#3#2#3#2#2#2#2#2#2#2#3#2#2#2#2#2#2#1#2#2#2#2#1#1#2#2#2#1
+  +#2#2#1#1#1#2#2#1#2#1#1#2#1#1#1#2#1#1#1#1#1#1#1#1#1#0#1#0#1#1#1#0#1#0#1#1#0#0
+  +#0#0#1#0#0#0#0#1#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy00000000000000000000000000000000000000044'
+  +'4666888:::===///////////////444::::::::::::::9::9::9::9:99:99:99:99:9999999'
+  +'999999999999999999999999999999999899899898898898898898888888888888888888888'
+  +'888888888888888888888788788765533333333333333333376677777677676676676676666'
+  +'666666666666666666666666666666666666666666566565565565565565554465564455554'
+  +'4545665554544545544543544543544544444434433533433433433333000,,---.------/.'
+  +'.//////000667CBCGGGIIIKKKNNNOOOQQQQQQRRRSSSTTTTTTUUUSSSUUUUUUUUUUUTUUUVUVUU'
+  +'VVVWWWWXXXYYYZYZ[[[^^]`__]\\WWWXXYZ[[\]^`aabbcffgiijlllrrrvvvzyy|||'#128#128
+  +#128#131#131#131#134#134#134#138#138#138#141#141#141#144#144#144#148#148#148
+  +#151#151#151#154#154#154#156#156#155#160#160#159#163#163#163#166#166#166#170
+  +#170#170#173#173#173#160#160#160'III'#26#26#26#27#27#27#29#29#29#31#31#31'  '
+  +' !!!###$$$%%%%%%%%%%%%%%%%%%%%%%%%$$$$$$$$$######!!!!!!!!!!!!'#31#31#31#31
+  +#31#31#31#31#31#29#29#29#28#28#28#27#27#27#25#25#24#24#25#29#11#25'w'#2#26
+  +#195#0#25#205#0#25#204#0#24#210#0#24#212#0#23#209#0#21#206#0#21#204#0#21#202
+  +#0#20#200#0#19#198#0#19#197#0#18#196#0#18#195#0#17#196#0#15#195#0#14#195#0#14
+  +#195#0#14#192#0#15#187#1#16#182#6#19#173#16#27#154#30'&'#134'+0p:<YDDIIIBJI@'
+  +'FFCDDCAAA???;;;777333...(((###'#29#29#29#23#23#23#16#16#16#10#10#10#5#5#5#3
+  +#3#3#3#3#3#3#3#3#3#3#3#2#2#2#1#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'333'
+  +#152#152#152#167#167#167#164#164#164#159#159#159#155#155#155#152#152#151#148
+  +#148#148#144#144#144#140#140#140#136#136#136#132#132#132#128''#128'}}}xxxtt'
+  +'tqqqmmmjiieeebbb]]][Z[WWWSSSPPPMMMJIIFFGDDDBAB>>>;;;989566343222///-,-+++()'
+  +'(&''''$%$###!!!   '#30#29#29#28#28#29#26#26#26#26#26#26#24#24#24#23#23#22#22
+  +#22#22#20#20#21#20#21#20#20#20#20#19#19#19#18#18#18#17#17#17#17#17#16#15#16
+  +#16#15#15#15#14#15#14#14#14#14#13#13#12#13#12#13#13#12#13#13#13#12#11#11#11
+  +#11#11#11#10#11#11#11#11#10#10#10#10#10#10#11#10#10#10#10#10#9#10#10#10#9#9#9
+  +#10#9#9#9#9#9#9#9#9#8#9#9#9#8#9#9#9#8#8#8#8#8#7#8#8#7#8#7#8#7#7#7#7#7#7#8#7#7
+  +#7#7#7#7#6#7#7#7#7#7#6#7#6#6#6#6#7#7#7#6#6#6#6#6#6#6#5#6#6#5#5#6#5#5#6#6#5#5
+  +#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#4#5#5#5#5#5#4#4#4#5#5#4#4#4#4#4#4#4#4#4#4#4
+  ,#3#4#4#4#4#4#3#3#4#4#4#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2
+  +#2#2#3#2#3#2#2#2#2#2#2#3#3#2#2#2#2#2#2#2#2#1#2#1#1#2#2#1#1#1#1#1#1#2#2#1#1#2
+  +#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#0#0#0#0#0#1#0#0#0#1#1#1#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0'000yyy000000000000000000000000000000000000111444666888;;;;;;...//////////'
+  +'//777::::::::::::::9::9::9::9:99:99:99:99:999999999999999999999999999999999'
+  +'999999999989989889889889889888888888888888888888888888888888888888888888878'
+  +'874443333333333333335447777777777767767667667667666666666666666666666666666'
+  +'666666666666666666656656556556556556555555556546555566565556545445455445545'
+  +'54543543544443443443433433433///-,,---............000333@@@GGGIIIKKKNNNPPPS'
+  +'SSSSSUUUWWWVVUVVWWWWUVVPQQOOOPPQPPPPPPSSSXXWWWWYYXXXXXXXYYYYZZ]]]]]^___bbad'
+  +'ddeeeaaa]]^```cccfefihikklooosssyxx}||'#128#128#128#131#131#131#134#134#134
+  +#138#138#138#141#141#141#145#144#145#148#148#148#152#152#152#155#155#155#158
+  +#158#159#161#161#161#164#164#163#167#167#167#170#171#171#174#175#174#145#145
+  +#145'222'#27#27#27#29#29#29#30#30#30'   """###$$$%%%&&&''''''''''''''''''&&&'
+  +'''''''&&&&&&&&&%%%$$$$$$$$$######!!!!!!!!!!!!   '#31#31#31#30#30#30#29#29#29
+  +#27#27#27#25#25#25#24#24#22#22#23'"'#13#24'd'#3#25#184#0#25#207#0#25#203#0#24
+  +#202#0#24#201#0#23#199#0#22#198#0#22#198#0#22#197#0#21#195#0#21#194#0#20#193
+  +#0#20#192#0#19#191#0#19#190#0#17#189#0#17#188#0#17#187#0#16#186#0#15#186#0#14
+  +#186#0#13#187#0#11#189#0#11#185#2#14#178#11#21#162#29'#'#136'04mBCRJJELKBHHD'
+  +'DDDAAA===999444///)))###'#28#28#28#23#23#23#16#16#16#8#8#8#4#4#4#3#3#3#3#3#3
+  +#3#3#3#2#2#2#1#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#28#28#27#135#135#135
+  +#168#168#168#163#164#164#160#160#160#156#156#156#153#153#152#148#148#148#144
+  +#144#144#141#141#141#136#136#136#132#132#132'}}}xxxtttqqpmmmiiieeebbb^]^Z'
+  +'ZZVVVSSSOOPMMMJJJFFFDCC@@@==>;;;999556333010///---***''''''&&''##$###!!!'#31
+  +#30#31#29#30#30#28#27#27#26#26#26#25#26#25#23#23#23#23#23#23#22#22#22#20#21
+  +#20#20#20#20#19#20#19#18#18#18#17#17#16#16#17#17#16#16#17#16#15#16#14#14#15
+  +#14#14#14#13#13#13#13#12#13#13#12#12#12#12#12#12#11#11#11#11#11#11#11#11#10
+  +#11#11#10#10#10#10#10#10#10#10#10#10#10#10#10#10#10#10#9#10#9#9#9#9#9#9#9#9#9
+  +#9#8#9#9#9#8#8#9#9#8#8#8#8#8#8#8#8#8#8#8#8#7#7#8#7#8#7#7#7#7#7#7#7#7#7#7#7#7
+  +#7#6#6#7#7#6#7#7#6#6#6#6#6#6#6#6#6#6#6#6#6#5#5#6#6#5#6#6#5#6#5#5#5#6#6#6#5#6
+  +#5#6#5#5#5#5#5#5#5#5#5#5#4#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#4#4#3
+  +#4#3#4#4#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#3#2#3#2#3#2#3#2#2#2#2#2#2
+  +#2#3#2#2#2#2#2#2#2#2#1#2#2#1#2#2#2#2#2#2#1#1#1#2#1#2#2#2#2#2#1#1#1#2#1#1#1#1
+  +#1#1#1#1#1#1#1#1#1#1#1#1#0#1#1#0#1#1#1#1#0#1#1#0#0#0#0#1#0#0#0#0#0#0#0#0#1#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy000000000'
+  +'000000000000000000000000000222444777999;;;999...////////////999::::::::::::'
+  +':::::9::9::9::9:99:99:99:99:99999999999999999999999999999999999999998998988'
+  +'988988988988988888888888888888888888888888888888888888887877333333333333333'
+  +'333666777777777777776776766766766766666666666666666666666666666666666666666'
+  +'666665665655655655655645655655655656555566655554554554554454543544544443434'
+  +'433544433///-------..--.///...001:;:DEDHHHKKKNNNQQQTTTVVVWWWWWWXXXOOOGGG???'
+  +'777898::9;;;<;;===?@?@@@ABBFFFKKKQQQYYX[[\\\\]\]___`aacccfeehhhjjjjjjddeeff'
+  +'ihjlkloooqrrvvvyyy'#128''#131#131#131#134#134#134#138#138#138#141#141#141
+  +#145#145#145#148#148#148#152#152#152#155#155#155#160#160#160#163#162#163#166
+  +#166#166#168#168#168#171#171#171#175#176#176'|||%%%'#28#28#28#30#30#30'   ""'
+  +'"###%%%&&&''''''(((((()))((((((((((((''''''''''''&&&&&&%%%$$$$$$$$$######!!'
+  +'!!!!!!!   '#31#31#31#30#30#30#29#29#29#27#27#27#25#26#26#24#24#24#22#22#19
+  +#22#21#7#16#22'8'#0#26#200#0#25#206#0#25#203#0#24#202#0#24#201#0#23#199#0#22
+  +#198#0#22#198#0#22#197#0#21#195#0#21#194#0#20#193#0#20#192#0#19#191#0#19#190
+  +#0#17#189#0#17#188#0#17#187#0#16#186#0#16#185#0#15#184#0#15#183#0#14#182#0#13
+  +#182#0#11#183#0#9#185#0#10#181#5#16#169#25' '#142'04nFFRNMEKKDFFECCC???99955'
+  +'5...(((!!!'#27#27#27#20#20#20#12#12#12#6#6#6#3#3#3#3#3#3#3#3#3#2#2#2#1#1#1#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#11#11#11'ooo'#169#169#169#165#165#165#161
+  +#161#161#156#156#156#152#153#153#149#149#149#144#144#144#141#141#141#136#136
+  +#136#132#132#132''#128'}}}xxxtttqpqllliijddd`aa^^^ZZZWVWRRSOOPLKKHIIEEECBC'
+  +'??@<<<:::887555232/0/...,,,)**&&&&%%##$"""!!!'#31#31#31#30#30#29#27#28#27#26
+  +#26#27#24#24#24#23#23#23#22#21#22#21#20#21#20#21#20#21#20#20#20#19#19#18#18
+  ,#18#17#17#17#17#17#17#16#15#15#15#16#15#15#14#14#14#14#14#13#13#13#13#12#13
+  +#12#13#13#12#13#12#12#11#12#11#11#11#11#11#11#10#11#10#10#10#11#10#10#11#10
+  +#10#10#10#10#10#9#10#10#10#9#10#10#9#9#9#9#9#9#9#9#9#9#9#8#9#9#9#8#9#8#8#8#8
+  +#8#8#8#8#8#7#8#8#7#8#8#7#8#7#8#8#7#7#7#7#7#7#7#7#7#7#6#6#7#6#7#7#6#6#6#6#6#6
+  +#6#6#6#6#6#6#6#6#6#5#6#5#6#5#5#5#5#6#6#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5
+  +#4#5#4#4#4#4#4#5#4#5#4#4#4#4#4#4#4#4#4#3#4#4#3#4#4#3#3#4#4#3#4#4#3#3#3#3#4#3
+  +#3#3#3#3#3#3#3#2#3#2#3#2#3#3#2#3#3#2#2#3#3#2#2#2#2#3#2#2#3#3#2#2#2#2#2#2#1#2
+  +#2#1#2#2#2#1#2#1#2#1#1#1#1#1#2#1#1#1#1#1#2#1#1#1#1#1#1#1#1#1#1#1#0#1#1#0#0#1
+  +#1#1#1#1#1#0#1#0#0#1#1#1#1#0#1#0#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy00000000000000000000000000000000000022255'
+  +'5777999;;;656////////////000::::::::::::::::::::9::9::9::9:99:99:99:99:9999'
+  +'999999999999999999999999999999999999899899898898898898898888888888888888888'
+  +'888888888888888888888888766633333333333333333377777777777777777777677676676'
+  +'676676666666666666666666666666666666666666666666666566565565565565465556566'
+  +'65665666655666555555556545545445435435445444334440//---.-----.../////0112??'
+  +'?GGFJJJNNNQQQSSSUUUYYYZZZRRRBBC766555666777888999:::<;<===?>>@@@AAACCCDEEFG'
+  +'GIHHJIJOOOXXX]]]```aabddcggfiiilllpooqqqmlmkkkonoqqruuuxxy{{|'#128#128#128
+  +#133#133#133#138#137#137#141#141#141#145#145#145#148#148#148#152#152#152#155
+  +#155#155#160#160#160#163#162#163#167#167#167#170#170#170#174#174#173#176#176
+  +#176'lll'#27#27#27#29#29#29#31#31#31'"""###%%%&&&''''''((())))))))))))***)))'
+  +'))))))''''''''''''''''''&&&&&&%%%$$$$$$$$$######!!!!!!!!!   '#30#30#30#29#29
+  +#29#27#27#27#26#26#26#23#23#23#22#22#22#21#20#12#15#21'@'#0#26#205#0#26#207#0
+  +#25#203#0#25#203#0#24#202#0#24#201#0#23#199#0#22#198#0#22#198#0#22#197#0#21
+  +#195#0#21#194#0#20#193#0#20#192#0#19#191#0#19#190#0#17#189#0#17#188#0#17#187
+  +#0#16#186#0#16#185#0#15#184#0#15#183#0#14#182#0#14#181#0#13#180#0#12#179#0#11
+  +#179#0#8#182#0#8#179#8#17#165'!&'#132'<>_LLINNEHHFCCC???999444---%%%'#31#31
+  +#31#25#25#25#17#17#17#9#9#9#4#4#4#3#3#3#2#2#2#2#2#2#1#1#1#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0'\\\'#169#169#169#165#165#165#161#161#161#157#157#157
+  +#152#152#152#149#149#149#144#144#144#141#141#140#136#136#136#132#132#132''
+  +'|||wwwtttppolllhiidccaaa\]]YYYUVURSROOOKKKHHHDDDABA>>>;;;:::767343111///-.-'
+  +'+++(()''&''$$%###!"!   '#30#29#30#29#29#28#26#26#27#26#25#25#24#24#24#23#23
+  +#23#21#22#22#21#20#20#20#21#20#20#20#19#18#18#18#17#17#17#17#17#17#17#17#16
+  +#16#16#16#14#14#15#14#14#14#13#13#13#13#13#13#13#13#13#13#13#12#11#12#11#11
+  +#11#11#11#11#11#11#11#11#11#11#11#10#11#11#10#11#10#10#10#10#10#10#10#10#10
+  +#10#9#9#9#9#9#10#9#9#9#9#9#9#9#9#9#8#9#8#8#8#8#8#8#8#8#8#8#8#8#8#8#8#8#8#8#7
+  +#7#7#7#7#7#7#7#7#7#7#7#6#6#7#7#6#7#7#7#7#6#6#6#6#6#6#7#6#6#6#6#6#6#6#6#5#6#6
+  +#6#6#6#6#6#5#6#5#6#5#5#6#5#5#5#5#5#5#4#4#5#5#4#5#4#4#4#4#4#5#5#5#5#4#5#4#4#4
+  +#4#5#4#3#4#4#4#4#4#4#4#4#4#3#4#4#3#3#4#3#3#3#3#3#4#3#3#3#3#3#3#3#2#3#3#3#3#3
+  +#3#3#2#3#3#2#2#3#2#3#2#3#3#3#2#2#2#2#2#2#2#2#2#2#2#2#1#2#2#1#1#1#1#2#1#2#1#2
+  +#2#1#2#1#1#1#2#1#1#1#1#1#1#1#1#1#1#1#0#1#1#1#1#1#1#1#0#1#0#0#0#1#0#0#0#0#1#0
+  +#1#0#0#0#0#0#0#1#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +'000yyy000000000000000000000000000000000000333555777:::<<<333////////////212'
+  +'::::::::::::::::::::9::9::9::9:99:99:99:99:99999999999999999999999999999999'
+  +'999999999998998988988988988988888888888888888888888888888888888888888888444'
+  +'333333333333333544777777777777777777777776776766766766766666666666666666666'
+  +'666666666666666666666666665665655655655645666665665556666556665555555555554'
+  +'554544444444444534121-.-.-.------////00221AAAFFFLLKOOOSSSVVVXYY[[[QQQ<<<444'
+  +'433444666777777999:::<;<<;<>=>@?@@@@CCBEEEFFFGGHIIHKKKMMNPQPSSS\\\cbcfffiii'
+  +'klknonpppsssvvvtttqqrtttxxx{{{'#130#130#131#135#135#135#141#141#141#145
+  +#145#145#148#148#148#152#152#152#155#155#155#160#160#160#162#162#163#167#167
+  +#167#170#170#170#174#174#174#177#177#177'aaa'#28#28#28#31#31#31'   """%%%&&&'
+  +'((()))***+++++++++******+++******))))))''''''''''''''''''&&&&&&%%%$$$$$$$$$'
+  +'######"""!!!   '#31#31#31#29#29#29#27#27#27#26#26#26#24#24#24#21#21#21#21#19
+  +#8#11#22'\'#0#27#214#0#26#207#0#26#205#0#25#203#0#25#203#0#24#202#0#24#201#0
+  +#23#199#0#22#198#0#22#198#0#22#197#0#21#195#0#21#194#0#20#193#0#20#192#0#19
+  +#191#0#19#190#0#17#189#0#17#188#0#17#187#0#16#186#0#16#185#0#15#184#0#15#183
+  +#0#14#182#0#14#181#0#13#180#0#12#178#0#12#177#0#11#177#0#9#177#0#7#181#1#10
+  +#173#22#28#147'57lMMMOOFHHFCCC???888222+++###'#28#28#28#21#21#21#13#13#13#5#5
+  ,#5#3#3#3#2#2#2#2#2#2#1#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'OOO'#169
+  +#169#169#165#165#165#161#161#161#157#157#157#152#152#152#149#149#149#144#144
+  +#144#141#141#141#136#136#136#132#132#132'|||wwwtstnnokkkgggccc```\[\XXXTT'
+  +'URQQNNNJJJGGGDDDBAB>?>;;;998666233011///---***(''''&%%#$$"""!!!'#31#31#31#30
+  +#30#30#28#28#28#26#26#26#26#25#25#23#23#23#22#22#22#20#21#20#21#21#20#20#21
+  +#21#19#19#19#18#18#18#17#17#17#17#17#17#16#16#16#15#16#15#15#14#14#13#13#13
+  +#13#13#13#13#13#13#13#13#13#11#12#11#11#12#12#11#11#11#11#11#11#11#11#11#11
+  +#10#10#11#11#10#10#10#10#10#10#10#10#10#10#10#10#9#9#9#10#9#9#10#9#9#9#9#9#9
+  +#9#8#8#8#8#8#8#8#8#8#8#8#8#8#7#8#7#8#7#7#8#7#7#8#8#7#7#7#7#7#7#7#7#7#7#7#7#7
+  +#6#7#7#6#7#7#6#7#7#6#6#6#6#6#7#6#6#6#6#6#6#6#5#6#5#6#5#6#5#6#6#5#5#6#5#6#5#5
+  +#5#5#5#5#5#5#5#4#5#4#5#4#5#5#5#5#4#5#4#4#5#5#4#4#4#4#4#4#4#4#4#4#4#3#4#4#4#4
+  +#4#4#4#3#3#3#3#4#4#4#4#3#3#3#3#3#3#3#3#3#3#3#3#2#3#3#3#2#2#2#2#2#3#2#2#3#3#3
+  +#2#3#2#2#2#2#2#2#2#2#1#2#2#1#2#1#1#2#2#2#1#2#2#1#1#1#2#1#2#1#1#2#1#1#1#1#1#1
+  +#1#2#0#1#1#0#1#1#1#1#1#1#1#1#1#1#1#1#0#0#0#0#0#0#1#0#1#0#1#1#1#0#0#0#0#1#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy000000000000000000000000000'
+  +'000000000333666888:::<<<111////////////544:::::::::::::::::::::::9::9::9::9'
+  +':99:99:99:99:99999999999999999999999999999999999999998998998988988988988988'
+  +'888888888888888888888888888888888888888333333333333333333655777777777777777'
+  +'777777777776776766766766766666666666666666666666666666666666666666666665665'
+  +'655655666666666666566665556666655555554554555544544543544322.---...--...///'
+  +'000444BCCHHGKKLPPQUUUYXXZ[ZVVV===333333344554565666877888999;;;<<<>>>???@@@'
+  +'CBCDDDFEEGGGIIILLLNNNPPOSRRUUUVVVZZZcccijjlllooprsrvuuyyy|||{{{wwx{{{~~~'
+  +#130#130#131#133#133#134#138#138#138#142#142#142#148#148#148#151#151#151#155
+  +#155#155#160#160#160#163#163#163#167#167#167#170#170#170#174#174#174#174#174
+  +#173'VUU'#29#29#29#31#31#31'!!!$$$&&&'''''')))***+++,,,,,,,,,,,,+++,,,++++++'
+  +'******))))))''''''''''''''''''&&&&&&%%%$$$$$$$$$######!!!   '#31#31#31#30#30
+  +#30#27#27#27#25#25#25#23#23#23#21#21#21#21#19#8#9#24'y'#0#28#221#0#26#206#0
+  +#26#206#0#26#205#0#25#203#0#25#203#0#24#202#0#24#201#0#23#199#0#22#198#0#22
+  +#198#0#22#197#0#21#195#0#21#194#0#20#193#0#20#192#0#19#191#0#19#190#0#17#189
+  +#0#17#188#0#17#187#0#16#186#0#16#185#0#15#184#0#15#183#0#14#182#0#14#181#0#13
+  +#180#0#12#178#0#12#178#0#12#176#0#11#175#0#10#176#0#7#178#0#7#176#19#24#151
+  +'58lMMMNNFHHGBBB<<<666...'''''''#31#31#31#25#25#25#16#16#16#8#8#8#3#3#3#2#2#2
+  +#2#2#2#1#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'AAA'#165#165#165#165
+  +#165#165#161#161#161#157#157#157#152#153#152#149#149#149#144#144#144#140#140
+  +#140#136#136#136#132#131#131#128''#128'{{{wwwrsroonjjjfffbbb^__Z[[XXXSTSOPO'
+  +'MMMJIJFFFDDDA@A===;:;888655223/0/...,,,*)*&''''$$%#$#"""   '#29#30#30#29#29
+  +#29#27#26#26#26#25#25#24#24#24#23#23#23#21#22#22#21#20#20#21#21#21#19#20#19
+  +#18#18#18#17#17#18#17#17#17#16#16#16#15#15#16#14#15#14#15#14#14#13#13#13#13
+  +#13#13#13#13#13#13#13#13#11#12#11#11#11#12#11#11#11#11#11#11#11#10#11#10#11
+  +#10#10#10#10#10#10#10#10#10#10#10#10#10#9#10#9#9#9#9#9#9#9#9#9#9#9#9#9#8#9#9
+  +#8#8#8#8#8#8#7#8#8#8#8#8#8#8#8#8#8#8#7#8#7#8#7#7#7#7#7#7#7#7#7#7#6#7#7#7#6#7
+  +#7#6#7#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#5#6#5#5#6#5#6#6#5#5#5#5#5#5#5#5
+  +#5#5#4#5#5#4#5#5#4#5#4#5#4#4#5#4#4#4#4#5#4#4#4#4#4#4#4#4#4#3#3#4#3#4#4#4#3#3
+  +#3#3#3#3#4#3#3#3#3#3#3#3#3#3#3#2#3#3#2#3#3#3#2#3#2#3#2#3#3#3#3#3#3#2#3#2#2#2
+  +#2#2#2#3#2#2#2#2#2#2#2#2#2#2#1#1#2#2#2#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#2#1#1#1
+  +#1#1#1#1#1#0#1#1#0#1#1#1#0#1#0#1#1#1#0#0#1#1#0#1#0#0#0#1#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy000000000000000000000000000000000000444'
+  +'666888:::===...////////////666:::::::::::::::::::::::9::9::9::9:99:99:99:99'
+  +':99999999999999999999999999999999999999998998998988988988988988888888888888'
+  +'888888888888888888888888766333333333333333333777777777777777777777777777777'
+  +'776776766766766766666666666666666666666666666666666666666666665665655666766'
+  +'666666656666666655665665655554554644544544444.....-.-.-.-...110444DDDIIIMLM'
+  +'QQPVWV[[Z\\\JJK555333333444555545666888788999:::<<<===>=>@@@BBBDDDEEEGGGJII'
+  +'JJJMMMOOORRQTSSWVWXXY[[\^^^dddmmmqrrutuxxwzzz'#129#129#129#129#129#129'}'
+  +'~~'#129#129#130#133#133#133#137#137#138#140#140#141#144#144#145#150#150#150
+  +#155#155#155#159#159#159#163#163#163#167#167#167#170#170#170#174#174#174#174
+  +#174#174'SSS'#31#31#31'   """$$$''''''(((***+++------...---------,,,,,,,,,++'
+  +'++++******))))))''''''''''''''''''&&&&&&%%%$$$$$$$$$###"""!!!'#31#31#31#30
+  ,#30#30#28#28#28#25#25#25#22#22#22#21#21#19#20#19#17#6#25#148#0#28#218#0#27
+  +#208#0#26#206#0#26#206#0#26#205#0#25#203#0#25#203#0#24#202#0#24#201#0#23#199
+  +#0#22#198#0#22#198#0#22#197#0#21#195#0#21#194#0#20#193#0#20#192#0#19#191#0#19
+  +#190#0#17#189#0#17#188#0#17#187#0#16#186#0#16#185#0#15#184#0#15#183#0#14#182
+  +#0#14#181#0#13#180#0#12#178#0#12#178#0#12#176#0#11#175#0#11#175#0#10#174#0#7
+  +#177#0#7#175#18#24#150'8:hOOJMMFFFF@@@:::222+++"""'#28#28#28#19#19#19#10#10
+  +#10#4#4#4#2#2#2#2#2#2#1#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'>>>'
+  +#166#166#166#165#165#165#161#161#161#157#157#157#152#152#152#148#148#148#144
+  +#144#144#140#140#140#135#135#135#130#131#131'~~zzzvvvrrqnnmijjfffbbb^^^ZZZW'
+  +'WWSRSPOOLLLIIIEEECBB???<<<:::767444211/0/--.+++)))''&''##$###""!'#31#31#31
+  +#30#30#30#28#27#28#26#27#26#25#25#25#23#23#24#23#23#23#21#21#21#21#20#21#21
+  +#21#21#20#19#19#19#18#18#17#17#17#17#17#17#16#16#16#15#14#15#14#14#14#13#13
+  +#14#13#14#13#13#13#13#13#13#12#12#12#12#11#12#11#11#11#11#11#11#11#11#11#11
+  +#11#11#10#11#10#10#10#10#10#10#10#10#10#10#10#10#10#9#9#9#9#9#9#9#9#9#9#9#9#8
+  +#8#9#9#8#9#9#8#8#8#8#8#9#8#8#8#8#8#8#7#8#7#8#7#8#7#7#7#7#8#7#7#7#7#7#6#7#7#7
+  +#7#6#6#7#7#7#6#7#6#7#6#6#7#6#6#6#7#6#6#6#6#6#6#6#6#5#6#5#6#5#6#6#6#6#5#5#5#5
+  +#5#5#5#5#5#5#5#5#5#5#5#5#5#4#5#5#4#4#4#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#4#4#3
+  +#4#4#3#3#3#3#4#4#4#4#3#3#3#3#3#3#4#3#3#3#3#3#3#3#3#3#3#3#2#2#2#3#2#3#3#3#3#2
+  +#3#3#2#2#3#2#2#2#2#2#2#2#2#2#2#2#2#1#1#1#1#2#1#2#1#1#1#2#1#1#1#1#1#2#1#1#1#1
+  +#1#1#1#1#1#1#1#1#1#1#0#1#0#1#1#0#1#1#0#1#1#1#1#1#1#0#0#0#0#0#1#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy000000000000000000000000000000000'
+  +'111444666999;;;;;;...////////////777::::::::::::::::::::::::::9::9::9:99:99'
+  +':99:99:99999999999999999999999999999999999999999998998988988988988988888888'
+  +'888888888888888888888888888888555333333333333333444777777777777777777777777'
+  +'777777777776776766766766766666666666666666666666666666666666666666666665666'
+  +'766766766666666655666556565555555555555554544544000.-...---....000323BBAJII'
+  +'MMMRRRWWWZZZ[[[>>?122323343334544555666888877888999<<<<<<?>>@@@AAABCCEEDGFG'
+  +'HIHIJILLLNNNQQQSRRVUUXXW[Z[]]^`a`cccgggqpqwvwyyy|||'#129#129#129#132#132#132
+  +#136#136#136#133#133#133#133#133#134#136#136#136#140#140#141#143#143#144#148
+  +#148#148#152#152#152#157#157#157#163#163#163#166#166#166#170#170#170#174#174
+  +#174#174#174#174'TTT'#31#31#31'!!!###&&&(((***,,,---.....................---'
+  +',,,,,,,,,++++++******))))))''''''''''''''''''&&&&&&%%%$$$$$$$$$###"""   '#30
+  +#30#30#27#27#27#26#26#26#23#23#23#21#20#18#19#20#23#3#26#174#0#28#216#0#28
+  +#209#0#27#208#0#26#206#0#26#206#0#26#205#0#25#203#0#25#203#0#24#202#0#24#201
+  +#0#23#199#0#22#198#0#22#198#0#22#197#0#21#195#0#21#194#0#20#193#0#20#192#0#19
+  +#191#0#19#190#0#17#189#0#17#188#0#17#187#0#16#186#0#16#185#0#15#184#0#15#183
+  +#0#14#182#0#14#181#0#13#180#0#12#178#0#12#178#0#12#176#0#11#175#0#11#175#0#10
+  +#173#0#9#173#0#6#175#0#7#172#25#30#141'BB^QQGJJGCCC===666---&&&'#30#30#30#21
+  +#21#21#13#13#13#5#5#5#2#2#2#2#2#2#1#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0'>>>'#165#165#165#165#165#165#161#161#161#156#156#156#152#152#153#147#147
+  +#147#143#143#143#139#139#139#134#134#134#130#131#130'~~~zzzuuurqqmmmjiieddaa'
+  +'a]\]YYYUVUQQQOOOKKKGGGDDDBBB>?>;;;999665322011///,,,*+*''((&%&$#$""#!!!'#30
+  +#30#30#29#29#29#27#27#27#26#27#26#24#24#24#23#23#23#22#22#22#21#21#21#20#20
+  +#20#20#19#19#18#18#18#18#17#17#17#17#17#16#16#16#16#15#16#15#15#15#13#14#14
+  +#13#13#13#13#13#13#13#13#13#11#11#12#11#12#12#11#11#11#11#11#11#11#11#11#11
+  +#10#11#11#10#11#10#10#10#11#10#10#10#10#10#10#10#10#9#10#9#9#10#9#9#9#9#9#9#9
+  +#9#9#9#9#9#9#9#9#8#9#8#9#8#8#8#8#8#8#8#8#8#7#8#7#8#7#8#7#7#8#7#8#7#7#7#7#7#7
+  +#7#7#7#7#6#6#7#7#6#7#7#6#6#6#6#6#6#6#6#7#6#6#6#6#6#6#6#5#5#6#5#6#6#5#5#6#6#5
+  +#5#5#5#5#5#6#5#5#5#5#5#4#5#5#5#4#5#5#5#5#5#4#4#5#5#5#5#4#5#4#4#4#3#4#4#4#4#4
+  +#4#4#4#4#4#4#3#3#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#3#3#3#3#2#3#2#2#2#2#2#3#2#3
+  +#2#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2#1#1#1#2#1#1#1#1#1#1#1#2
+  +#1#2#1#1#1#1#1#1#0#1#1#1#1#1#1#1#0#1#0#1#0#1#1#1#1#0#1#0#0#1#0#0#0#0#0#0#0#0
+  +#0#0#0#0#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy000000000000000000000000000000000'
+  +'111444777999;;;:::...////////////:::::::::::::::::::::::::::::9::9::9::9:99'
+  +':99:99:99:99999999999999999999999999999999999999998998998988988988988988888'
+  +'888888888888888888888888888888444333333333333333555777777777777777777777777'
+  +'777777777777776776766766766766666666666666666666666666666666666666666666766'
+  +'776766766766666666666555666665665655555654544322......-...///./122BBBHHIMMN'
+  ,'RRRVVV[[[\[\:::111222334434444444655777888877:::;;:<<<==>???@@@BBBDDDEEEHHH'
+  +'JIJKLKNNNPPPSSSUUUWWWZ[Z]]\___bbbeeeiiikkkuvu|{|~'#130#131#131#134#134#134
+  +#138#138#138#142#142#142#138#139#139#140#140#140#143#143#143#148#148#149#151
+  +#151#151#156#155#156#160#160#160#166#166#166#170#170#170#174#174#174#178#178
+  +#178'WWW'#31#31#31'!!!$$$'''''')))+++---.../////////////////////......---,,,'
+  +',,,,,,++++++******))))))''''''''''''''''''&&&&&&%%%$$$$$$###"""!!!'#30#30#30
+  +#27#27#27#25#25#25#24#24#24#22#21#17#18#20'#'#1#28#201#0#29#214#0#28#210#0#28
+  +#209#0#27#208#0#26#206#0#26#206#0#26#205#0#25#203#0#25#203#0#24#202#0#24#201
+  +#0#23#199#0#22#198#0#22#198#0#22#197#0#21#195#0#21#194#0#20#193#0#20#192#0#19
+  +#191#0#19#190#0#17#189#0#17#188#0#17#187#0#16#186#0#16#185#0#15#184#0#15#183
+  +#0#14#182#0#14#181#0#13#180#0#12#178#0#12#178#0#12#176#0#11#175#0#11#175#0#10
+  +#174#0#10#172#0#8#172#0#5#175#5#10#166'),{MMONNGEEE@@@999000''''''   '#23#23
+  +#23#14#14#14#7#7#7#2#2#2#2#2#2#1#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0'AAA'#169#169#169#165#165#165#161#161#161#156#156#156#152#152#151#147#147
+  +#147#142#142#142#139#139#139#133#133#133#129#130#130'}}}xxxtttppplllgggdcc``'
+  +'`[[[XXXTUTPQPMMMJJJGGFDDD@A@>>=:::888555323000.-.,,,)))''''''%%$###"!!'#31
+  +#31#31#30#30#30#28#28#28#27#27#27#25#25#26#23#24#23#22#22#22#21#21#21#21#21
+  +#21#21#21#21#19#19#18#17#17#18#17#18#18#17#17#17#16#16#16#14#14#15#15#15#14
+  +#14#13#13#13#13#13#13#13#13#13#13#13#11#12#12#12#11#12#11#11#11#11#11#11#11
+  +#11#11#11#11#11#10#10#11#11#10#10#10#10#10#10#10#10#10#9#10#10#10#9#9#9#9#9#9
+  +#9#9#9#9#8#9#8#9#8#9#9#8#8#8#8#8#8#8#8#8#8#8#8#7#8#8#8#8#8#8#8#7#7#7#7#7#7#7
+  +#7#7#7#7#7#6#7#7#6#7#7#6#6#6#7#6#7#6#7#7#7#6#6#6#6#6#6#6#6#5#5#6#6#5#6#6#6#6
+  +#5#5#5#5#5#5#5#5#6#5#5#5#5#5#5#4#5#5#4#5#4#4#5#5#5#4#4#4#4#4#5#4#4#4#4#4#4#4
+  +#4#4#3#4#4#3#4#3#4#3#4#4#4#4#3#3#3#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#3#3#3
+  +#3#3#2#3#2#2#3#2#2#2#2#3#2#2#3#2#2#2#2#2#2#2#1#2#2#2#2#1#2#2#2#2#2#2#2#1#1#1
+  +#1#2#2#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1#1#1#0#1#0#1#1#1#0#0#1#0#0#0#0
+  +#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy0000000000000000000000000000000'
+  +'00222555777999;;;777...///////////0:::::::::::::::::::::::::::::9::9::9::9:'
+  +'99:99:99:99:999999999999999999999999999999999999999989989989889889889889888'
+  +'888888888888888888888888888888883333333333333333336668777777777777777777777'
+  +'777777777777777777767767667667667666666666666666666666666666666666666666667'
+  +'77777776766766666666666666666666665665555555454./..........///000===HGGMMLR'
+  +'RRWVV\[[[[[:::1011223233333334445666668888889899:9<<<=<=>?>@@@AAACCDEEEFGGI'
+  +'IIJKJNMNNOOQQQSSSWWWXYY[\\___aabdddghgkkknnnrrrzzz'#129#130#129#133#132#132
+  +#137#137#137#140#140#141#144#144#144#148#148#148#144#144#145#147#147#148#150
+  +#151#151#155#155#156#159#158#159#163#163#163#168#168#168#173#173#173#178#178
+  +#178'ccc   """%%%(((***,,,...//////111111111000000000//////......---,,,,,,,,'
+  +',++++++******))))))''''''''''''''''''&&&&&&%%%$$$$$$###!!!'#31#31#31#28#28
+  +#28#25#25#25#23#23#23#22#21#15#15#22'<'#0#30#210#0#29#214#0#29#211#0#28#210#0
+  +#28#209#0#27#208#0#26#206#0#26#206#0#26#205#0#25#203#0#25#203#0#24#202#0#24
+  +#201#0#23#199#0#22#198#0#22#198#0#22#197#0#21#195#0#21#194#0#20#193#0#20#192
+  +#0#19#191#0#19#190#0#17#189#0#17#188#0#17#187#0#16#186#0#16#185#0#15#184#0#15
+  +#183#0#14#182#0#14#181#0#13#180#0#12#178#0#12#178#0#12#176#0#11#175#0#11#175
+  +#0#10#174#0#10#173#0#9#171#0#7#172#0#3#175#18#22#150'>@bQPGHHFBBB:::222***""'
+  +'"'#24#24#24#16#16#16#7#7#7#2#2#2#1#1#1#1#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0'NNN'#169#169#169#165#165#165#160#160#160#155#155#155#151#151#151
+  +#147#147#147#141#141#141#138#137#138#133#133#133#128#129#129'|||wwwtttonokkk'
+  +'fgfbbb^^^[[[WWWRSROOOLLMIIIEEECBC?>?<;;999777444010///---***(((&%&$$$###!!!'
+  +#30#30#30#29#29#29#27#26#27#27#26#27#24#24#24#24#23#23#22#23#22#21#21#21#21
+  +#21#20#20#20#20#18#19#19#17#18#17#17#17#17#16#16#16#15#15#15#15#15#15#14#13
+  +#13#13#13#13#13#13#13#13#13#13#12#12#12#12#12#11#11#11#12#11#11#11#11#11#11
+  +#11#11#11#10#11#11#10#10#10#10#10#10#10#10#10#10#10#9#10#10#10#9#9#10#9#9#9#9
+  +#9#9#9#9#8#9#9#9#8#9#9#9#8#9#8#8#9#8#8#8#8#8#8#8#8#8#7#8#8#8#8#8#7#7#7#7#7#8
+  +#7#7#7#7#7#7#7#7#7#7#7#6#7#7#7#7#7#6#6#6#7#6#6#7#6#6#6#6#6#6#6#5#6#5#5#6#6#6
+  +#6#5#5#5#6#6#5#5#5#5#5#5#5#5#5#5#5#5#5#4#5#5#5#5#5#5#5#4#4#5#4#4#4#4#4#4#4#4
+  +#4#4#3#4#3#4#3#4#3#3#4#3#4#4#3#3#3#3#3#3#4#3#3#3#3#3#3#3#3#3#3#3#3#3#2#3#2#3
+  +#3#2#3#2#2#2#3#2#3#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#1#1#1#2#1
+  +#1#1#2#1#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1#1#1#1#1#0#1#1#1#0#0#0#0#0
+  +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy00000000000000000000000000000000022'
+  +'2555777:::<<<656////////////222::::::::::::::::::::::::::::::::9::9::9:99:9'
+  +'9:99:99:99:9999999999999999999999999999999999999999899898898898898898888888'
+  +'888888888888888888888888877732233333333333333387787787777777777777777777777'
+  +'777777777777777777677676676676676666666666666666666666666666666666676677777'
+  +'7777776766666666666666655556655655654655112.../.....///000656HGGLLLQQQWWW[\'
+  +'\\[[999111111222322433444545655888888888:::;<<<<<>>=@?@A@ACDCEEEFFGHHHJJIMM'
+  +'MOOORRQSSSVVWYXX[[[^^^aa`ddcgffiiimnmppptttwww'#128#128#128#135#135#135#138
+  +#139#138#143#143#143#147#147#147#151#151#151#152#152#152#151#151#151#154#154
+  +#154#158#158#158#163#163#163#166#166#167#171#171#171#178#178#178'ppp   ###&&'
+  +'&(((+++---///000111222222222222222000000000//////......---,,,,,,,,,++++++**'
+  +'****))))))''''''''''''''''''&&&&&&%%%$$$###"""   '#29#29#29#26#26#26#23#23
+  +#23#23#21#11#13#24'X'#0#30#219#0#30#214#0#29#212#0#29#211#0#28#210#0#28#209#0
+  +#27#208#0#26#206#0#26#206#0#26#205#0#25#203#0#25#203#0#24#202#0#24#201#0#23
+  +#199#0#22#198#0#22#198#0#22#197#0#21#195#0#21#194#0#20#193#0#20#192#0#19#191
+  +#0#19#190#0#17#189#0#17#188#0#17#187#0#16#186#0#16#185#0#15#184#0#15#183#0#14
+  +#182#0#14#181#0#13#180#0#12#178#0#12#178#0#12#176#0#11#175#0#11#175#0#10#174
+  +#0#10#173#0#9#171#0#8#170#0#4#174#2#8#167'*-yOOKKKFCCC<<<444+++###'#25#25#25
+  +#17#17#17#8#8#8#2#2#2#1#1#1#1#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +']]]'#169#169#169#164#164#164#159#159#159#155#155#155#150#150#150#145#145#145
+  +#141#141#141#136#136#136#132#132#132#128''#128'{{{vvvrrrnnnjjjeefaaa]]]YYYV'
+  +'VVQRRNNNKLKGGGDDDBBB?>>;<;9996663230//...,-,***''''''$%%###"!!  !'#30#30#30
+  +#28#28#28#27#26#27#26#25#26#24#23#24#23#23#23#21#22#22#21#21#21#20#20#20#19
+  +#18#19#17#18#17#17#17#18#16#16#17#16#16#16#15#15#15#14#13#14#13#13#13#13#13
+  +#13#13#13#13#12#12#12#12#12#12#11#11#11#11#11#11#11#11#11#11#11#11#11#11#11
+  +#10#10#10#11#10#10#10#10#10#10#10#10#10#10#10#10#9#9#9#10#9#9#9#9#9#9#9#9#9#9
+  +#8#8#9#9#8#9#8#8#8#8#8#8#8#8#8#8#8#8#8#8#8#8#8#8#8#7#7#8#7#7#7#8#7#7#7#7#6#7
+  +#7#6#7#7#7#6#6#6#7#7#7#7#7#6#6#7#6#7#6#6#6#6#6#6#6#6#6#6#6#6#5#5#5#5#6#5#5#5
+  +#5#5#5#5#5#5#5#5#5#5#5#4#5#5#4#5#4#5#4#5#4#5#4#5#4#4#4#4#4#4#4#4#4#4#4#4#3#4
+  +#4#4#3#4#3#4#4#3#3#4#4#3#3#3#4#4#3#3#4#3#3#3#3#3#3#3#3#3#3#3#2#2#2#3#2#3#2#3
+  +#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#1#2#1#1#2#1#2#2#1#1#2#1#2#1#1#1#1#1
+  +#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1#1#1#0#0#0#0#0#0#1#0#0#0#0#0#0#0#1#0#1#0
+  +#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0'000yyy000000000000000000000000000000000333555777:::<<<333'
+  +'////////////222::::::::::::::::::::::::::::::::9::9::9::9:99:99:99:99:99999'
+  +'999999999999999999999999999999999998998998988988988988988888888888888888888'
+  +'888888888655322322333333333444877877877877777777777777777777777777777777777'
+  +'777776776766766766766666666666666666666666666666666777777777777777776666666'
+  +'666666656666566565665444//./././....///222CCCKKKPOPVVVZZ[]^^=<<111111222233'
+  +'444444454665766777899999:::<<<===???@@ABBACCDEEEHHHJJJLLLNNNPPPSRRTTTWXW[ZZ'
+  +']]^```ccbeffiijllmoporsrxxwzzz~~~'#134#134#134#141#141#141#145#145#145#149
+  +#149#149#154#153#153#157#157#157#157#157#157#158#158#158#161#161#161#166#165
+  +#166#170#171#171#175#174#175'"""###&&&))),,,...00011122244433333333333322'
+  +'2222000000000//////......---,,,,,,,,,++++++******))))))''''''''''''''''''&&'
+  +'&&&&%%%###"""   '#30#30#30#27#27#27#24#24#24#23#21#9#11#26'w'#0#31#228#0#30
+  +#214#0#30#213#0#29#212#0#29#211#0#28#210#0#28#209#0#27#208#0#26#206#0#26#206
+  +#0#26#205#0#25#203#0#25#203#0#24#202#0#24#201#0#23#199#0#22#198#0#22#198#0#22
+  +#197#0#21#195#0#21#194#0#20#193#0#20#192#0#19#191#0#19#190#0#17#189#0#17#188
+  +#0#17#187#0#16#186#0#16#185#0#15#184#0#15#183#0#14#182#0#14#181#0#13#180#0#12
+  +#178#0#12#178#0#12#176#0#11#175#0#11#175#0#10#174#0#10#173#0#9#171#0#9#170#0
+  +#6#171#0#3#173#25#29#141'FHUMMEEED===555,,,###'#27#27#27#18#18#18#9#9#9#2#2#2
+  +#1#1#1#1#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#1#1#1'ppp'#168#168#168#163
+  +#164#164#158#158#158#154#153#153#150#150#150#144#145#144#140#140#139#135#135
+  +#135#131#130#131'~~~zzztttpqplllhihddc```\\\XXXUTUPPQMMMJJJFFFCDD@@@==<:::77'
+  +'7555122000..-***()(&&%$$$"##"""'#30#30#30#29#29#29#27#27#27#26#26#26#25#25
+  +#24#24#23#23#22#22#22#21#21#21#21#21#21#20#20#20#19#19#19#17#17#18#17#18#17
+  +#16#16#16#15#15#15#15#15#15#14#13#14#13#13#13#13#13#13#12#12#12#12#12#12#12
+  +#12#12#11#11#11#11#11#11#11#11#11#11#11#11#11#11#11#10#11#10#10#10#10#10#10
+  +#10#9#10#10#10#10#10#10#10#9#9#9#9#9#9#9#9#9#9#9#9#9#9#8#8#8#8#9#9#8#8#8#8#8
+  +#8#8#8#7#8#8#8#8#8#7#8#7#8#8#7#8#7#7#8#7#7#7#7#7#6#7#6#7#7#6#6#6#6#7#6#7#7#7
+  +#7#6#6#7#6#6#6#6#6#6#5#6#6#5#6#6#5#5#5#6#5#5#6#5#6#5#5#6#6#5#5#5#5#5#5#5#4#5
+  +#5#4#5#4#4#5#4#5#5#4#4#5#4#4#4#4#4#4#4#4#4#4#4#4#3#4#4#4#4#4#4#3#3#3#4#4#3#3
+  ,#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#3#2#2#3#2#2#3#3#2#2#2#2#2#2#2#3#3#2#2#2#2#2
+  +#2#2#2#2#2#2#2#1#2#1#2#2#2#2#2#2#1#2#1#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1
+  +#1#1#1#0#1#1#1#0#1#1#0#1#1#1#0#1#0#0#0#0#0#1#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy00000'
+  +'0000000000000000000000000000333666888:::<<<222////////////545::::::::::::::'
+  +'::::::::::::::::::9::9::9::9:99:99:99:99:9999999999999999999999999999999999'
+  +'999999999899898898898898898888888888888888888888888888854432232232233333355'
+  +'587787787787787777777777777777777777777777777777777777677676676676676666666'
+  +'6666666666666666666666777777777777777766666666666666666566665565665211.....'
+  +'.././//000<<<IIIMNNTTTZZY^^^EEF011221121222334444444545666766989889::;=<<<<'
+  +'=>>>@@@AAADCDEEEGGFHHHJJKMMMOOORQRSTTVVWXYX\\\```bbbedehhglllonosrsuuvyyy||'
+  +'|'#128#128#128#134#134#133#142#143#143#148#147#148#152#152#152#156#156#156
+  +#161#161#160#164#164#164#161#161#161#165#166#166#170#169#170#173#174#174#147
+  +#147#147')))###''''''))),,,///000222333444444444444333333333222222000000000/'
+  +'/////......---,,,,,,,,,++++++******))))))''''''''''''''''''&&&%%%$$$"""   '
+  +#30#30#30#27#27#27#25#25#24#23#22#16#7#28#148#0' '#227#0#31#215#0#30#214#0#30
+  +#213#0#29#212#0#29#211#0#28#210#0#28#209#0#27#208#0#26#206#0#26#206#0#26#205
+  +#0#25#203#0#25#203#0#24#202#0#24#201#0#23#199#0#22#198#0#22#198#0#22#197#0#21
+  +#195#0#21#194#0#20#193#0#20#192#0#19#191#0#19#190#0#17#189#0#17#188#0#17#187
+  +#0#16#186#0#16#185#0#15#184#0#15#183#0#14#182#0#14#181#0#13#180#0#12#178#0#12
+  +#178#0#12#176#0#11#175#0#11#175#0#10#174#0#10#173#0#9#171#0#9#170#0#7#170#0#3
+  +#174#11#16#157'<=aONEEED>>>555---$$$'#27#27#27#18#18#18#9#9#9#2#2#2#1#1#1#1#1
+  +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#10#10#10#136#136#136#167#167#167#163
+  +#163#163#158#158#158#153#153#152#148#148#148#143#143#143#139#139#139#134#134
+  +#134#129#130#129'}}}xxxtttonnkkkgggcbb^^^[[[WVWRRSOOOLLMIIHDDDBBA???;<<99966'
+  +'6333//0...--,**+(''''%%%###!!"  !'#30#31#30#28#28#28#27#27#27#25#25#25#23#24
+  +#24#23#23#22#22#21#21#22#21#21#20#20#20#19#18#18#18#18#18#18#18#18#17#16#16
+  +#16#17#16#15#15#15#14#14#14#13#13#14#13#13#13#13#13#13#12#12#12#12#12#12#12
+  +#12#12#18#17#17#19#18#19#19#19#19#19#19#18#19#18#18#18#18#19#18#18#18#18#18
+  +#18#17#18#18#18#18#17#17#17#18#14#14#15#13#13#13#13#13#13#13#13#12#10#10#11#9
+  +#8#9#8#8#8#9#8#8#8#8#8#8#8#8#7#8#8#8#8#8#7#8#7#7#8#7#7#7#8#7#7#7#7#7#7#7#7#6
+  +#6#7#7#6#7#7#6#7#6#6#6#7#6#6#6#6#6#6#6#6#6#6#5#6#6#6#5#6#5#5#5#6#5#5#6#5#5#5
+  +#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#4#4#5#4#5#5#4#4#4#5#4#4#4#4#3#4#4#3#4#4#3#4#4
+  +#4#3#4#4#3#4#4#3#4#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#3#2#2#2#3#3#2#2#2#2
+  +#2#2#2#2#2#2#2#2#2#1#1#2#1#2#2#2#2#2#2#2#2#2#1#2#1#2#1#1#2#1#1#1#1#1#2#1#1#1
+  +#2#1#1#1#1#1#1#1#1#1#1#1#1#0#1#0#1#1#1#0#0#0#0#0#1#1#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'0'
+  +'00yyy000000000000000000000000000000000444666888:::<<<000////////////545::::'
+  +':::::::::::::::::::::::::::::::9::9::9::9:99:99:99:99:999999999999999999999'
+  +'999999999999999999989989889889889889889888888888888888888888888884443223223'
+  +'223223336668878778778778778777777777777777777777777777777777777777767767667'
+  +'667667666666666666666666666667777777777777777776666666666666666665666555655'
+  +'55./////../.../0/333EEELLLQQQWWW\]]SSR0100012212122234444444446665568878999'
+  +':9:::<=<===???AAABBBDDCFFFIHIJJJMMMNONQQQSSSVVVXXX[[\^^^aaadddgggjjjnnnqqpt'
+  +'tuxxx||}'#128''#132#132#132#135#135#135#141#141#141#150#150#150#153#154
+  +#153#158#158#158#163#163#163#167#167#167#169#169#169#168#168#168#173#173#173
+  +#163#163#164'777$$$'''''')))---...111333444555555555555555444333333333222222'
+  +'000000000//////......---,,,,,,,,,++++++******))))))''''''''''''''''''&&&%%%'
+  +'###!!!'#31#31#31#29#29#29#26#26#24#23#23#22#6#29#164#0' '#231#0#31#216#0#31
+  +#215#0#30#214#0#30#213#0#29#212#0#29#211#0#28#210#0#28#209#0#27#208#0#26#206
+  +#0#26#206#0#26#205#0#25#203#0#25#203#0#24#202#0#24#201#0#23#199#0#22#198#0#22
+  +#198#0#22#197#0#21#195#0#21#194#0#20#193#0#20#192#0#19#191#0#19#190#0#17#189
+  +#0#17#188#0#17#187#0#16#186#0#16#185#0#15#184#0#15#183#0#14#182#0#14#181#0#13
+  +#180#0#12#178#0#12#178#0#12#176#0#11#175#0#11#175#0#10#174#0#10#173#0#9#171#0
+  +#9#170#0#8#169#0#4#172#5#9#165'24lNNEFFD>>>555---$$$'#27#27#27#18#18#18#8#8#8
+  +#2#2#2#1#1#1#1#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#26#26#26#155#155#155
+  +#166#166#166#161#161#161#156#156#156#152#152#151#147#147#147#141#141#141#137
+  +#137#136#133#133#133#128#128'{{{wwwrrrnnniiieffaaa]]]XXXVVVQRQNNNKKJGGGDDDA'
+  +'A@>>>;;:8995552220/0...***()(&&&$$$##""""'#30#31#31#29#29#30#27#27#27#26#26
+  +#26#24#24#23#24#24#24#22#22#22#21#22#21#21#21#21#19#19#19#18#18#18#18#18#17
+  ,#16#16#16#17#16#16#15#15#15#14#14#14#14#14#14#13#14#13#14#13#13#12#12#12#12
+  +#12#12#15#15#15#25#26#25#25#25#26#26#26#26#26#26#26#26#26#26#27#27#26#26#26
+  +#26#27#26#26#26#25#26#26#26#26#26#25#25#26#26#25#25#26#25#25#25#25#25#25#25
+  +#25#24#24#25#25#25#24#25#25#22#21#21#20#20#20#19#19#19#17#17#17#13#12#13#12
+  +#11#12#8#7#7#7#7#8#7#8#7#7#7#7#7#7#7#7#6#7#7#6#6#6#7#6#7#6#7#6#6#6#6#6#7#6#6
+  +#6#6#5#6#6#5#6#6#5#5#5#5#5#6#6#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#4#4#4#4#4#4#4
+  +#5#4#4#5#4#4#4#4#4#4#4#3#4#4#4#4#3#4#3#3#3#3#4#3#3#3#4#3#3#3#3#3#3#4#3#3#3#3
+  +#3#3#3#3#2#3#3#2#2#2#3#3#3#3#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2#2#2#1#1
+  +#2#2#2#1#1#2#1#1#1#1#1#1#2#1#2#2#2#1#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0
+  +#1#0#0#1#0#1#1#1#0#0#0#0#0#0#0#1#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy00000000000000000000000000000000044'
+  +'4666888:::===...////////////877:::::::::::::::::::::::::::::::::::9::9::9::'
+  +'9:99:99:99:99:9999999999999999999999999999999999999999899899898898898898898'
+  +'888888888888888888888888822222232232232232277788788787787787787787777777777'
+  +'777777777777777777777777777777677676676676676666666666666666666677787777777'
+  +'7777777666666666666666666666666556223////..//./00000>>?IIIOPOUUU[[[^^]77710'
+  +'0212222322333444444565566767998999;:;;;<<<<>?>@@@AAACDDEEEGGFJIJKJKMMNPOPRR'
+  +'RTTTWWWZZZ]]]```ccceefiiilllooosrsvwvz{z~~'#129#130#129#134#134#134#138#138
+  +#138#141#142#141#150#150#150#157#156#157#161#161#160#165#165#165#170#170#170
+  +#175#174#174#172#172#172#173#173#173'MMM$$$&&&)))---000222444555666666666666'
+  +'666555555444333333333222222000000000//////......---,,,,,,,,,++++++******)))'
+  +')))''''''''''''''''''%%%$$$"""   '#30#30#30#27#27#27#25#24#20#19#23'3'#4#30
+  +#177#0' '#229#0#31#216#0#31#215#0#30#214#0#30#213#0#29#212#0#29#211#0#28#210
+  +#0#28#209#0#27#208#0#26#206#0#26#206#0#26#205#0#25#203#0#25#203#0#24#202#0#24
+  +#201#0#23#199#0#22#198#0#22#198#0#22#197#0#21#195#0#21#194#0#20#193#0#20#192
+  +#0#19#191#0#19#190#0#17#189#0#17#188#0#17#187#0#16#186#0#16#185#0#15#184#0#15
+  +#183#0#14#182#0#14#181#0#13#180#0#12#178#0#12#178#0#12#176#0#11#175#0#11#175
+  +#0#10#174#0#10#173#0#9#171#0#9#170#0#8#169#0#5#171#0#5#170'),vMLGFFC>>>555--'
+  +'-$$$'#27#27#27#17#17#17#8#8#8#2#2#2#1#1#1#1#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0'444'#166#166#166#165#165#165#160#160#160#155#155#155#150#150#150#145
+  +#145#145#141#141#141#136#136#136#130#130#130'~zzzuttqqqlllghhccc___\\[XXXT'
+  +'TTPPOMMMJIIEEEBBB???;<;999766433111...,,,+**''''''%&%###"""'#31'  '#30#31#30
+  +#28#28#28#27#27#27#25#25#25#24#24#23#22#22#23#22#21#22#22#21#21#20#20#21#19
+  +#19#19#18#18#17#18#17#17#16#16#16#15#15#15#15#15#15#14#14#14#13#14#13#14#14
+  +#13#12#13#12#12#12#12#20#20#20#25#25#25#25#26#26#26#26#26#26#26#26#27#27#27
+  +#27#27#27#27#27#28#27#27#27#27#27#27#27#27#27#26#27#27#26#26#27#26#27#26#26
+  +#26#26#26#26#26#26#26#26#25#25#26#26#26#25#25#25#26#26#25#25#25#25#25#25#25
+  +#25#25#25#25#25#25#24#25#24#25#22#22#22#20#21#20#16#16#16#12#12#12#9#9#9#7#7
+  +#6#7#7#7#6#6#7#6#7#6#6#7#6#7#6#7#6#6#6#6#5#6#6#6#6#5#5#6#5#5#5#5#5#5#5#5#5#5
+  +#5#5#5#5#5#5#5#5#5#5#5#4#4#5#4#4#5#5#5#5#4#5#4#4#4#5#4#4#4#4#4#4#4#4#4#4#3#3
+  +#3#3#4#3#3#4#4#3#3#3#3#3#3#3#3#3#3#3#3#3#2#3#2#2#3#3#3#2#3#3#3#2#2#2#2#2#3#2
+  +#2#2#3#2#2#2#2#2#2#2#2#2#2#1#2#2#2#2#2#2#1#1#2#1#1#1#1#2#1#2#1#1#1#1#1#1#1#1
+  +#2#1#1#1#1#1#1#1#1#1#1#1#1#0#1#0#1#1#1#1#0#1#1#0#0#1#1#0#0#1#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy00000'
+  +'0000000000000000000000000000444666999;;;===...////////////877::::::::::::::'
+  +':::::::::::::::::::::9::9::9::9:99:99:99:99:9999999999999999999999999999999'
+  +'999999999999899898898898898898888888888888888888888877722222222232232232288'
+  +'888888788787787787787787777777777777777777777777777777777777777677676676676'
+  +'6766666666666666766877877877777777777666666666666666666666656566/00//////..'
+  +'/00/323FFFLKLRRRXYX]]]HHG1111102222113333334444445556668879999::;;:=<====?@'
+  +'?AAACBCDDDFFFIIIJJJLMMOONQQQSSSVVVYYY\\\]]^aaaeeehhhjjkooorrrvvvyyy|}}'#128
+  +#129#129#133#134#133#137#137#137#141#141#141#145#145#145#150#150#150#159#159
+  +#159#164#164#163#168#168#168#172#173#172#177#177#177#180#180#180'mmm###'''''
+  +''')))---000333555666777777777777777666666555555444333333333222222000000000/'
+  +'/////......---,,,,,,,,,++++++******))))))(((''''''&&&%%%###!!!'#30#30#30#28
+  +#28#28#26#25#26#25#23#15#20#22#30#7#28#156#0' '#228#0#31#217#0#31#215#0#30
+  +#214#0#30#213#0#29#212#0#29#211#0#28#210#0#28#209#0#27#208#0#26#207#0#26#208
+  +#0#26#208#0#25#211#0#25#206#0#24#201#0#24#201#0#23#199#0#22#198#0#22#198#0#22
+  +#197#0#21#195#0#21#194#0#20#193#0#20#192#0#19#191#0#19#190#0#17#189#0#17#188
+  +#0#17#187#0#16#186#0#16#185#0#15#184#0#15#183#0#14#182#0#14#181#0#13#180#0#12
+  ,#178#0#12#178#0#12#176#0#11#175#0#11#175#0#10#174#0#10#173#0#9#171#0#9#170#0
+  +#8#169#0#6#170#0#4#172'"%~KKFFFC==>555,,,###'#26#26#26#16#16#16#7#7#7#2#2#2#2
+  +#2#2#1#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'YYY'#169#169#169#164#164#163
+  +#158#158#158#153#153#153#149#149#149#145#144#144#139#139#139#134#134#134#130
+  +#130#130'}}}yxxtttooojjjgggbbb___YYYVUVSRSNNNJKKGGGDDDAAA=>=;::988565222000.'
+  +'..++*))(&&''$$$###! !'#30#31#31#29#30#30#27#27#27#26#27#26#24#24#24#23#23#23
+  +#22#22#22#21#22#21#20#20#20#19#19#19#18#18#18#18#18#18#17#17#17#16#15#15#15
+  +#15#15#14#14#14#14#14#14#14#13#13#12#12#12#14#13#13#24#24#24#26#26#26#26#26
+  +#26#26#27#27#27#27#27#28#28#28#28#28#28#27#28#28#28#27#28#28#27#27#27#27#27
+  +#27#27#27#26#26#27#27#26#26#26#26#26#26#26#26#26#26#26#26#26#26#26#26#25#26
+  +#26#25#26#25#25#25#25#26#25#25#25#25#25#25#25#25#25#25#25#24#24#25#24#25#25
+  +#25#24#24#25#24#24#24#25#24#24#24#24#24#20#20#20#16#17#17#14#13#13#7#6#6#7#7
+  +#6#6#6#6#6#6#6#6#6#5#6#6#6#6#6#5#6#5#5#5#5#6#5#5#5#5#5#6#5#5#5#5#5#5#5#5#5#5
+  +#5#5#5#5#5#4#5#4#5#4#5#4#4#4#4#4#4#4#3#4#3#4#4#4#4#3#4#4#3#3#4#3#4#4#3#3#4#3
+  +#4#3#3#3#3#3#3#2#3#3#3#2#3#3#3#3#3#3#2#3#3#2#2#2#2#2#2#2#2#2#2#2#3#2#2#2#2#2
+  +#2#2#2#2#2#2#2#1#2#2#2#2#1#2#2#1#2#1#1#1#1#1#1#1#2#1#1#1#1#1#1#1#1#1#1#1#0#1
+  +#0#1#1#1#1#0#1#1#1#1#0#0#0#1#1#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy00000000000000000000000000000011144'
+  +'4777999;;;999...////////////999::::::::::::::::::::::::::::::::::::::9::9::'
+  +'9::9:99:99:99:99:9999999999999999999999999999999999999999899899898898898898'
+  +'898888888888888888888877622222222222232243388888888888788787787787787787777'
+  +'777777777777777777777777777777777777677676676676676666666666677788787787787'
+  +'7777766666666666666666666666666555/////./../00101;;<HHINNNVUU[ZZ\\[44411111'
+  +'0111212233555444454676777999999;;;;<<=<<?>?@@AABAEDEEEEGGGJJJKKKMNMOPPSSSUT'
+  +'UWWX[ZZ]]]```bccgggjjjmmmpqpsssxxx|||'#128#128#128#131#132#132#135#135#135
+  +#139#140#139#143#143#143#148#147#147#152#152#152#159#159#159#166#166#166#171
+  +#171#171#175#175#175#180#180#180#148#148#148'''''''&&&)))---0003335557778888'
+  +'88888888888888666666666555555444333333333222222000000000//////......---,,,,'
+  +',,,,,++++++******))))))''''''''''''%%%$$$"""   '#29#29#29#27#27#27#25#26#26
+  +#24#23#16#22#21#19#8#28#149#0' '#229#0#31#217#0#31#215#0#30#214#0#30#213#0#29
+  +#213#0#29#214#0#28#215#0#28#219#0#28#219#0#26#207#1#25#194#4#23#161#1#25#189
+  +#0#25#207#0#24#201#0#24#201#0#23#199#0#22#198#0#22#198#0#22#197#0#21#195#0#21
+  +#194#0#20#193#0#20#192#0#19#191#0#19#190#0#17#189#0#17#188#0#17#187#0#16#186
+  +#0#16#185#0#15#184#0#15#183#0#14#182#0#14#181#0#13#180#0#12#178#0#12#178#0#12
+  +#176#0#11#175#0#11#175#0#10#174#0#10#173#0#9#171#0#9#170#0#7#169#0#6#170#0#3
+  +#172'!%}KJEEDA<<=444+++"""'#25#25#25#15#15#15#6#6#6#2#2#2#2#2#2#1#1#1#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#5#5#5#130#130#130#168#167#167#162#161#162#157#157#157
+  +#153#153#153#147#147#147#143#142#142#137#137#137#132#132#132''#128'{{{vwwr'
+  +'rrmmmjijccd```]\\XXXUUUPPOMMMJJJEEFCCC???<<<999666333111...,,-**+''((%%&###'
+  +'"""   '#31#31#30#29#29#28#27#28#27#25#25#25#24#24#24#21#22#21#22#21#21#22#21
+  +#22#19#19#19#18#18#18#18#18#18#17#17#17#17#16#16#15#15#15#14#14#14#14#14#14
+  +#14#14#13#13#14#14#17#17#17#25#25#25#26#26#26#27#26#26#27#28#28#28#28#28#28
+  +#28#28#29#29#29#28#29#29#29#29#28#28#28#28#28#28#28#28#28#28#28#28#28#28#27
+  +#28#28#28#27#28#27#27#27#27#27#27#27#27#27#27#27#27#27#26#26#27#27#27#26#27
+  +#26#27#26#26#26#26#26#26#26#26#26#26#25#25#26#25#24#25#24#24#25#25#25#25#25
+  +#26#25#25#25#25#26#26#26#27#27#27'   '#10#11#11#7#6#6#7#7#6#6#6#6#6#6#6#6#6#6
+  +#5#6#5#5#6#5#5#5#5#6#6#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#4#5#5#5#4#4#4#4#4#4#4
+  +#5#4#4#4#4#4#4#4#4#4#4#4#3#4#4#3#3#4#4#4#3#3#3#4#4#4#3#4#3#3#3#3#3#3#3#3#3#3
+  +#3#2#2#2#3#3#2#3#2#2#2#3#2#2#2#3#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2#2#2#2#2
+  +#2#1#1#1#1#1#2#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#0#1#0#1#0#1#1#1#0#1#0#0
+  +#1#1#0#1#0#1#1#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0'000yyy000000000000000000000000000000111555777999;;;:::...//////////'
+  +'//;::;:::::::::::::::::::::::::::::::::::::9::9::9::9:99:99:99:99:999999999'
+  +'999999999999999999999999999999989989989889889889889888888888888888888886552'
+  +'222222222222224448888888888888878878778778778778777777777777777777777777777'
+  +'777777777777767767667667667666666667778888878778778776666666666666666666666'
+  +'66666333////./////0/010DCCKJKQQQWWW]]]JJJ1111112222213333445545456567668999'
+  +'99999;;;==<>>>??@AAABBCDEEFGFIIIJJJMMMOOORRRTTTWWWZYZ\\\`__bbbeeeghhlllooos'
+  +'sswvvzzz~~~'#130#130#130#134#133#134#138#139#138#143#142#143#148#148#147#152
+  +#151#151#155#155#155#160#160#160#168#168#168#174#174#173#178#178#178#174#174
+  ,#174':::&&&)))---000444555777888:::99999999988888888866666666655555544433333'
+  +'3333222222000000000//////......---,,,,,,,,,++++++******))))))''''''&&&%%%$$'
+  +'$"""'#31#31#31#29#29#29#27#27#27#25#25#25#24#23#18#22#21#21#8#28#149#0' '
+  +#228#0#31#221#0#31#224#0#31#227#0#30#218#1#29#206#3#27#182#6#25#145#9#22'i'
+  +#12#19'D'#15#17'"'#16#16#9#10#19'R'#0#26#209#0#25#204#0#24#201#0#24#201#0#23
+  +#199#0#22#198#0#22#198#0#22#197#0#21#195#0#21#194#0#20#193#0#20#192#0#19#191
+  +#0#19#190#0#17#189#0#17#188#0#17#187#0#16#186#0#16#185#0#15#184#0#15#183#0#14
+  +#182#0#14#181#0#13#180#0#12#178#0#12#178#0#12#176#0#11#175#0#11#175#0#10#174
+  +#0#10#173#0#9#171#0#9#170#0#7#169#0#6#170#0#3#172' $|JIDDCA<<<333***!!!'#23
+  +#23#23#13#13#13#4#4#4#2#2#2#2#2#2#1#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#27#27
+  +#27#160#160#160#166#165#165#161#161#161#155#155#155#150#150#150#145#145#145
+  +#141#141#141#136#136#136#131#131#131'~~~zzzttupppkkkggfccc^_^ZZZVVVSSSOOOLLL'
+  +'GGGDEEBBB>>>;;:899566223000...+++)()&&&$$$###!!!'#31#30#30#29#28#29#28#27#28
+  +#26#26#26#24#24#24#23#23#23#22#22#22#22#22#22#21#21#21#19#19#19#18#18#18#18
+  +#18#18#17#16#17#15#16#15#15#15#15#15#14#14#14#14#14#13#14#13#24#24#23#26#25
+  +#25#26#27#26#27#27#27#29#28#29#26#26#26#20#20#21#21#21#22#21#21#22#21#21#21
+  +#21#21#21#21#21#21#21#20#21#24#24#24#24#24#24#23#24#24#23#24#23#27#26#26#27
+  +#27#27#27#27#27#26#27#27#27#27#27#26#27#26#27#27#27#26#26#26#26#26#26#26#26
+  +#26#26#25#26#26#26#26#26#26#25#25#25#25#26#26#25#26#26#26#27#27#27'   &&&'#18
+  +#17#17#6#7#7#6#7#6#6#6#6#6#6#6#6#6#6#6#6#6#6#5#6#6#6#6#5#6#5#5#6#5#6#5#5#5#5
+  +#5#5#5#5#5#5#5#5#5#5#4#5#5#5#4#4#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4
+  +#3#4#4#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#3#3#3#3#3#3#3#3#2#3#3#3#2#2#2#2#2
+  +#2#2#2#2#2#3#2#1#2#2#2#2#2#2#2#2#1#1#1#1#1#2#2#2#2#2#2#2#1#1#1#1#1#1#1#1#1#1
+  +#2#1#1#1#1#1#1#1#1#0#0#1#0#0#1#0#0#0#1#1#0#0#0#1#1#0#0#1#0#0#1#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy0000000000000000000000000'
+  +'00000111555777999;;;:::...////////////;::;:::::::::::::::::::::::::::::::::'
+  +':::::::9::9::9:99:99:99:99:999999999999999999999999999999999999999999989989'
+  +'889889889889888888888888888888885552222222222222225558888888888888888878878'
+  +'778778778778777777777777777777777777777777777777777767767667667667666668888'
+  +'88888887877777666666666666666666666666666101/////////000455GGGMMMTSTZZZ^^^7'
+  +'7711211122222233344445445567676688899:::;<<<===??>@@@BAADCDFEEGHHJIIKKKNNNO'
+  +'OPRSRTUTXWXZZZ]]^```dddgggjjjnnnrrrtttxxy}}}'#128#128#128#133#133#133#137
+  +#137#137#141#140#141#144#144#145#150#149#150#153#153#153#158#159#158#162#162
+  +#162#169#169#169#176#176#176#181#180#181'ddd&&&))),,,000222666888999999:::::'
+  +':::::::888888888888666666666555555444333333333222222000000000//////......--'
+  +'-,,,,,,,,,++++++******)))(((''''''&&&%%%###!!!'#31#31#31#28#28#28#27#27#27
+  +#25#25#25#24#23#18#22#22#22#7#29#157#2#31#206#6#28#161#9#26'}'#13#23'U'#16#20
+  +'0'#18#19#25#19#18#14#19#17#5#18#16#9#16#16#12#16#16#13#16#15#9#5#22#142#0#26
+  +#214#0#25#202#0#24#202#0#24#201#0#23#199#0#22#198#0#22#198#0#22#197#0#21#195
+  +#0#21#194#0#20#193#0#20#192#0#19#191#0#19#190#0#17#189#0#17#188#0#17#187#0#16
+  +#186#0#16#185#0#15#184#0#15#183#0#14#182#0#14#181#0#13#180#0#12#178#0#12#178
+  +#0#12#176#0#11#175#0#11#175#0#10#174#0#10#173#0#9#171#0#9#170#0#7#169#0#6#170
+  +#0#3#172' $|IHBBB@99:111((('#31#31#31#21#21#21#11#11#11#4#4#4#2#2#2#2#2#2#1#1
+  +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'JJJ'#169#169#169#164#164#164#158#158#158#153
+  +#153#154#149#149#149#144#143#144#139#139#139#133#133#133#129#129#129'|||wwwr'
+  +'rronnjjjeeeaaa\]]XXYUUVQQQMMMIIIFFFCCC??@;<<999676434000...,,,)**(''''%$%##'
+  +'#""" '#31' '#30#29#30#28#28#27#27#26#26#24#24#24#24#24#24#22#22#22#22#22#21
+  +#20#20#20#19#20#19#18#18#18#18#18#18#17#17#17#16#16#15#16#15#15#15#14#14#14
+  +#14#14#16#16#16#26#25#25#26#26#26#28#27#28#28#28#28#29#29#28#15#15#16#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#12#13#12#13#13#13#13#12#12#12#12#12#12#12
+  +#12#12#11#12#11#11#11#11#11#12#11#11#11#11#11#15#15#15#14#15#15#18#18#19#19
+  +#19#19#23#24#23#24#24#24#26#26#26#26#26#26#26#26#26#25#25#26#25#26#25#26#27
+  +#27#27#27#28#31#31#31'$$$)))'#27#27#27#7#7#7#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6
+  +#6#5#6#6#5#5#5#6#6#5#6#6#5#5#5#5#5#5#5#5#5#5#5#5#4#5#5#5#5#5#5#5#5#4#4#4#4#4
+  +#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#4#4#3#3#3#3#3#4#3#3#3#3#3#3#3#3#3
+  +#3#2#3#3#3#3#3#2#2#3#3#3#2#3#2#2#3#2#2#2#2#2#2#2#2#2#2#2#1#2#2#2#1#2#1#2#1#1
+  +#1#2#2#2#1#2#2#2#1#2#1#2#1#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1#1#1#0#1#0
+  +#0#0#0#1#0#0#0#0#0#1#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +'000yyy000000000000000000000000000000222555777999;;;888...////////////;::;::'
+  +'::::::::::::::::::::::::::::::::::::::9::9::9::9:99:99:99:99:99999999999999'
+  ,'999999999999999999999999998998998988988988988988888888888888888444222222222'
+  +'222222655888888888888888888887887877877877877877777777777777777777777777777'
+  +'777777777776776766766766766888888888888887777666666666666666666666666666///'
+  +'/////////111=<<JJJOONUUU[[[RSS121122211222222333555444665767787:99::9;;;==='
+  +'===@@@AAACCCEDDGFFHIIKJKMMMPOPRRRTSTWWWZZZ\\\___ccbeeeiiilllooosssvww{|{~~'
+  +#131#130#130#135#136#135#139#139#139#143#143#143#148#147#148#153#153#153#156
+  +#156#156#161#162#161#166#167#166#171#171#171#179#179#179#145#145#145''''''')'
+  +')),,,000333666777:::;;;;;;;;;;;;;;;::::::8888888888886666666665555554443333'
+  +'33333222222000000000//////......---,,,,,,,,,++++++******)))(((&&&&&&$$$###!'
+  +'!!'#31#31#31#29#29#29#28#28#28#26#26#26#24#24#20#22#23#29#21#23'#'#22#21#20
+  +#23#21#10#22#20#11#21#20#15#21#20#18#21#20#19#19#19#19#18#18#18#17#17#17#17
+  +#17#17#17#16#9#14#17'*'#1#25#195#0#25#207#0#25#202#0#24#202#0#24#201#0#23#199
+  +#0#22#198#0#22#198#0#22#197#0#21#195#0#21#194#0#20#193#0#20#192#0#19#191#0#19
+  +#190#0#17#189#0#17#188#0#17#187#0#16#186#0#16#185#0#15#184#0#15#183#0#14#182
+  +#0#14#181#0#13#180#0#12#178#0#12#178#0#12#176#0#11#175#0#11#175#0#10#174#0#10
+  +#173#0#9#171#0#9#170#0#7#169#0#6#170#0#4#171'&)sHG@@@?888///&&&'#29#29#29#19
+  +#19#19#9#9#9#3#3#3#2#2#2#2#2#2#1#1#1#0#0#0#0#0#0#0#0#0#0#0#0#1#1#1''#167
+  +#167#167#162#162#162#157#157#157#151#152#151#147#147#147#142#141#141#136#136
+  +#136#132#132#131'zzzuuuppplllgggccc___Z[ZWWWSSSOOOKLLHHHEDDAAA>>>;;;89955'
+  +'6332///...+++)))&''''$$$"""!!!'#31#31#31#29#29#29#28#27#27#26#25#25#24#24#24
+  +#23#23#23#22#22#22#22#22#22#19#20#20#18#19#18#18#18#18#17#17#17#17#17#17#16
+  +#15#16#15#14#14#14#14#14#22#22#22#25#25#26#27#26#27#27#28#28#29#30#29#26#25
+  +#26#14#13#13#14#13#14#14#13#13#13#13#13#13#13#13#13#13#12#12#13#13#13#12#12
+  +#12#12#12#12#12#12#12#12#12#11#11#12#12#11#11#11#11#11#12#11#11#11#11#11#11
+  +#11#11#11#11#11#11#11#11#10#10#10#10#10#10#10#10#10#13#13#13#16#16#17#20#20
+  +#19#23#22#23#26#27#27#30#30#30'"##(''''---###'#7#7#6#6#7#7#7#7#7#7#6#7#6#6#6
+  +#6#6#7#6#6#6#5#6#6#5#6#6#5#6#6#5#6#6#5#6#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#4#4#5
+  +#5#5#4#5#4#4#4#4#4#4#5#4#5#4#4#4#3#3#4#4#4#4#3#3#4#4#4#3#4#3#4#3#3#4#4#3#3#3
+  +#3#3#3#3#3#3#3#3#3#2#3#3#3#2#3#2#3#2#2#2#3#2#2#3#3#3#2#2#2#2#2#2#2#2#2#2#2#2
+  +#2#1#2#1#2#2#1#1#2#1#2#2#2#2#1#1#1#2#1#1#1#1#2#1#1#1#1#1#1#0#1#1#1#1#1#1#1#1
+  +#0#1#1#1#0#1#0#0#0#1#1#0#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0'000yyy000000000000000000000000000000222555777999;;;656////////////2'
+  +'22;::;::;:::::::::::::::::::::::::::::::::::::9::9::9::9:99:99:99:99:999999'
+  +'999999999999999999999999999999999989989989889889889889888888888888888884442'
+  +'222222222222227778888888888888888888888878878778778778778777777777777777777'
+  +'777777777777777777777767767667667778888888888888887776666666666666666666666'
+  +'66444/////////000111AABKKKPPPWWW]]\ABB1112112222323344445554556657779989:::'
+  +'::;<;===>?>@@@BBBDDDEFFGFGJIIKKKNNNPPPSSSUUUXXX[[Z]^^aaadddghhkjknnnrrruuux'
+  +'yy}}}'#129#129#129#133#133#133#138#138#138#142#142#142#146#146#146#149#150
+  +#150#155#155#154#160#160#159#165#165#165#169#168#169#173#173#174#176#176#176
+  +'BBB))),,,///333666888:::;;;<<<<<<<<<;;;;;;;;;::::::888888888888666666666555'
+  +'555444333333333222222000000000//////......---,,,,,,,,,++++++******)))(((&&&'
+  +'&&&$$$###!!!'#31#31#31#29#29#29#28#28#28#27#27#27#26#25#23#25#25#21#24#23#22
+  +#24#23#23#24#24#24#23#23#23#22#22#22#22#22#22#21#21#21#21#21#21#19#19#19#18
+  +#18#18#17#17#17#17#15#4#8#21'p'#0#26#216#0#25#203#0#25#203#0#24#202#0#24#201
+  +#0#23#199#0#22#198#0#22#198#0#22#197#0#21#195#0#21#194#0#20#193#0#20#192#0#19
+  +#191#0#19#190#0#17#189#0#17#188#0#17#187#0#16#186#0#16#185#0#15#184#0#15#183
+  +#0#14#182#0#14#181#0#13#180#0#12#178#0#12#178#0#12#176#0#11#175#0#11#175#0#10
+  +#174#0#10#173#0#9#171#0#9#170#0#8#169#0#6#170#0#5#170'-/iGG====666,,,###'#26
+  +#26#26#16#16#16#6#6#6#3#3#3#2#2#2#2#2#2#1#1#1#0#0#0#0#0#0#0#0#0#0#0#0'!!!'
+  +#164#164#164#165#165#165#160#160#160#155#155#155#150#150#150#144#144#145#139
+  +#139#139#134#134#134#130#130#130'}}}xwwsssnoojjjeeeaaa]\\XXYVUVTSSMMMJJJFFFC'
+  +'CC@??<<=999667333100...,,,***''''($$$###"""'#31#31#31#30#30#29#27#28#28#26
+  +#26#26#25#24#25#23#24#23#22#22#22#21#22#22#21#21#20#19#19#20#18#18#18#18#18
+  +#18#17#17#17#16#16#16#14#15#15#15#15#16#27#27#27#26#26#26#27#28#28#28#29#29
+  +#29#29#30#19#19#19#14#13#14#14#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#12#13#13#12#12#12#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#11#11
+  +#12#11#12#11#11#11#11#11#11#11#11#11#11#11#10#11#11#10#10#11#10#10#10#10#10
+  +#10#11#10#9#10#10#10#10#10#15#15#16'!  %%%)))///---'#6#7#7#7#7#6#7#6#7#6#7#6
+  +#6#6#7#7#6#6#6#6#6#6#6#6#6#5#6#6#5#5#5#6#5#5#6#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5
+  +#5#5#4#5#5#5#4#5#4#4#4#4#4#4#5#4#4#4#4#4#3#3#4#4#4#4#4#4#3#3#4#3#3#3#3#3#4#3
+  +#4#4#3#4#4#3#3#3#3#3#3#3#3#2#2#3#2#3#3#3#3#3#3#2#2#3#2#3#2#3#2#2#2#2#2#2#2#2
+  ,#2#2#2#1#1#2#2#1#1#2#2#1#1#1#1#2#1#2#2#2#1#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1
+  +#1#1#1#0#0#1#0#1#0#0#0#0#1#0#1#1#0#1#0#1#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0'000yyy000000000000000000000000000000222555777:::<<<656///////'
+  +'/////222;::;::;::::::::::::::::::::::::::::::::::::::::9::9::9:99:99:99:99:'
+  +'99:999999999999999999999999999999999999999989989889889889889888888888888888'
+  +'883332222222222222227778888888888888888888888888878878778778778778777777777'
+  +'777777777777777777777777777777767767667778888888888888887666666666666666666'
+  +'66666666333/////////000222GGGLLKSSSXWX]]]7771122122232223334445555556677779'
+  +'89::9<;;<<<===???AABBBBEEEEFFIIIJJJLLMOOORQQTUTWWWZYZ\\\``_bbbeffiiimlmoops'
+  +'sswww|||'#128#128#131#130#130#135#135#136#140#140#140#145#145#145#148#148
+  +#148#153#153#153#157#157#157#162#162#162#166#166#166#171#171#172#176#176#176
+  +'rrr''''''+++///222555888;;;<<<===<<<======<<<;;;;;;;;;::::::888888888888666'
+  +'666666555555444333333333222222000000000//////......---,,,,,,,,,++++++******'
+  +')))(((&&&%%%$$$###"""   '#30#30#30#29#29#29#28#28#28#27#27#27#26#26#26#25#25
+  +#25#25#25#25#26#26#26#25#25#25#24#24#24#23#23#23#23#23#23#21#21#21#19#19#19
+  +#18#18#18#18#16#12#15#16#29#2#25#183#0#26#211#0#25#203#0#25#203#0#24#202#0#24
+  +#201#0#23#199#0#22#198#0#22#198#0#22#197#0#21#195#0#21#194#0#20#193#0#20#192
+  +#0#19#191#0#19#190#0#17#189#0#17#188#0#17#187#0#16#186#0#16#185#0#15#184#0#15
+  +#183#0#14#182#0#14#181#0#13#180#0#12#178#0#12#178#0#12#176#0#11#175#0#11#175
+  +#0#10#174#0#10#173#0#9#171#0#9#170#0#8#169#0#5#171#4#9#164'56[DD;;;;333***!!'
+  +'!'#23#23#23#14#14#14#4#4#4#3#3#3#3#3#3#2#2#2#1#1#1#0#0#0#0#0#0#0#0#0#0#0#0
+  +'[[['#169#169#169#164#164#164#158#158#158#153#153#152#147#147#147#141#142#141
+  +#137#137#137#132#132#132'zzzuuuqqqmllhhhbbc__^]]]^^^___WWWLLLHHHEDEBAB>>>'
+  +':::888455111///---+++(((%&%$$$#"#   '#31#31#31#28#28#28#27#27#26#25#24#24#24
+  +#24#25#22#22#23#22#22#22#21#21#21#19#20#20#19#18#18#19#19#19#18#17#17#16#16
+  +#16#14#14#15#20#20#20#27#27#27#28#28#28#28#28#28#29#28#29#29#29#29#14#13#14
+  +#14#13#14#14#13#14#14#13#13#14#13#13#13#13#13#13#13#13#13#13#13#12#13#12#12
+  +#12#13#12#12#13#12#12#12#12#12#12#12#12#12#11#12#12#12#11#11#11#12#12#11#11
+  +#11#11#11#11#11#10#10#11#11#11#10#10#11#11#10#10#11#10#11#10#10#10#10#10#10
+  +#11#11#11#12#12#13'   ''&&,,,000333'#10#10#10#7#7#7#6#7#6#7#7#7#6#6#6#6#6#6#7
+  +#7#7#6#6#6#6#6#6#6#6#6#6#6#5#5#5#5#6#6#6#5#6#6#5#5#5#5#5#5#5#5#5#4#5#4#5#5#5
+  +#5#5#4#4#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#4#4#4#3#3#4#4#3#3#4#3#4#3#3#4#3
+  +#3#3#3#3#3#3#3#3#3#3#2#3#3#3#3#3#2#3#2#3#2#2#2#3#3#3#2#2#2#2#2#2#2#2#2#2#1#2
+  +#2#2#1#2#2#2#1#1#2#2#2#2#2#1#1#2#2#1#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1#1#1#0
+  +#0#1#1#1#0#1#1#1#1#1#0#0#1#1#0#0#0#0#0#0#0#0#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +'000yyy000000000000000000000000000000222555777:::<<<656////////////222;::;::'
+  +';::;:::::::::::::::::::::::::::::::::::::9::9::9::9:99:99:99:99:99999999999'
+  +'999999999999999999999999999998998998988988988988988888888888888222222222222'
+  +'222222888888888888888888888888888888887887877877877877877777777777777777777'
+  +'777777777777777777776776877888888888888888666666666666666666666666666222///'
+  +'//////000666HHHMMMTTTZZZWWW2121121212322324345655656667768889:99:9<<<>>=>=='
+  +'@@AAAACCCEEEGGFJJIKLKNNNQQQSSSUVUWWW[[[^^^aaacdchhhkkknnnrrruuvyyy}}}'#129
+  +#129#129#133#133#133#138#138#138#142#142#142#147#147#147#151#151#151#156#156
+  +#156#160#160#160#165#165#164#169#170#170#175#175#174#160#160#161'222+++...22'
+  +'2555999:::<<<===>>>>>>>>>======<<<;;;;;;;;;::::::88888888888866666666655555'
+  +'5444333333222222222000000000//////......---,,,,,,,,,++++++******)))((('''''
+  +'''&&&$$$###"""!!!'#31#31#31#31#31#31#30#30#30#29#29#29#28#28#28#28#28#28#28
+  +#28#28#28#28#28#27#27#27#26#26#26#25#25#25#22#22#22#21#21#21#20#20#20#18#18
+  +#18#18#16#5#9#20'c'#0#27#216#0#26#205#0#25#203#0#25#203#0#24#202#0#24#201#0
+  +#23#199#0#22#198#0#22#198#0#22#197#0#21#195#0#21#194#0#20#193#0#20#192#0#19
+  +#191#0#19#190#0#17#189#0#17#188#0#17#187#0#16#186#0#16#185#0#15#184#0#15#183
+  +#0#14#182#0#14#181#0#13#180#0#12#178#0#12#178#0#12#176#0#11#175#0#11#175#0#10
+  +#174#0#10#173#0#9#171#0#9#170#0#8#169#0#4#173#9#14#154'==LA@<889000'''''''#30
+  +#30#30#21#21#21#11#11#11#3#3#3#3#3#3#3#3#3#2#2#2#1#1#1#0#0#0#0#0#0#0#0#0#12
+  +#12#12#148#148#148#167#167#166#161#161#161#155#155#155#150#150#150#145#146
+  +#146#140#140#140#135#135#135#130#130#130'}}}xxxsssooojjjhhhhhhfffccc```]]]WW'
+  +'WKKKFFFBBC??@<<<999767444111...+++)))''''''$%%""#"!!'#31#31#31#29#29#29#28
+  +#28#28#26#26#25#24#24#25#23#23#23#22#22#22#22#22#22#20#20#20#18#18#18#19#19
+  +#18#17#18#17#16#16#16#16#16#16#25#25#25#27#27#28#28#28#28#29#29#29#30#30#30
+  +#22#23#23#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#14#14#14#14#14#14
+  ,#14#14#14#14#13#13#13#13#12#12#12#12#12#12#12#13#12#12#12#12#12#12#12#12#12
+  +#12#12#11#12#11#12#12#11#11#11#12#12#11#11#11#11#11#11#11#11#11#11#10#11#11
+  +#11#10#10#10#10#10#10#10#10#12#12#12#29#29#30'''&''*+*///433'#19#19#19#7#7#7
+  +#7#7#6#7#7#6#7#6#6#7#7#6#6#6#6#6#6#6#6#6#6#6#6#6#5#6#5#6#6#6#5#5#6#6#5#5#5#5
+  +#6#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#4#5#5#5#5#5#4#4#4#4#4#5#4#4#5#3#4#4#4#4#4#4
+  +#3#3#4#4#4#3#3#3#3#4#3#3#3#4#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#3#2
+  +#3#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#1#2#2#2#1#1#1#2#2#1#1#2#1#2#2#1#1#1#1#1
+  +#2#1#1#1#1#1#1#1#1#1#0#1#0#1#1#1#1#1#1#1#1#1#0#1#0#0#1#1#0#0#0#0#1#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy000000000000000000000000000000222555777:::<'
+  +'<<656////////////222;::;::;::;:::::::::::::::::::::::::::::::::::::9::9::9:'
+  +':9:99:99:99:99:999999999999999999999999999999999999999999989989889889889889'
+  +'888888888888882222222222222222228888888888888888888888888888888888878878778'
+  +'778778778777777777777777777777777777777777777777768889888888888888886666666'
+  +'66666666666666666666101/////////000::;IIINNNUUUZZZOOO1222221113333224446566'
+  +'56666777999::::;;<;;==>>>>@@ABBBDDDFFFHHHJJJMMMOONRQRTSTWWWZZZ]\\___bbbffei'
+  +'iillmooosttwww|||'#131#131#131#136#136#136#140#140#141#144#145#145#149
+  +#149#148#154#153#154#158#158#158#162#162#162#167#167#167#172#172#172#176#177
+  +#177'^^^+++...111555888:::<<<>>>?????????>>>=========<<<;;;;;;;;;::::::88888'
+  +'8888888666666666555555444333333333222222000000000//////......---,,,,,,,,,++'
+  +'++++******)))(((&&&&&&%%%######"""      '#31#31#31#31#31#31#30#30#30#29#29
+  +#29#29#29#29#29#29#29#28#28#28#27#27#27#25#25#25#23#23#23#21#21#21#19#19#19
+  +#18#18#14#15#17#27#2#25#182#0#26#212#0#26#205#0#25#203#0#25#203#0#24#202#0#24
+  +#201#0#23#199#0#22#198#0#22#198#0#22#197#0#21#195#0#21#194#0#20#193#0#20#192
+  +#0#19#191#0#19#190#0#17#189#0#17#188#0#17#187#0#16#186#0#16#185#0#15#184#0#15
+  +#183#0#14#182#0#14#181#0#13#180#0#12#178#0#12#178#0#12#176#0#11#175#0#11#175
+  +#0#10#174#0#10#173#0#9#171#0#9#170#0#7#169#0#3#174#20#25#138'BB?==;556---$$$'
+  +#27#27#27#18#18#18#7#7#7#3#3#3#3#3#3#3#3#3#2#2#2#1#1#1#0#0#0#0#0#0#0#0#0'BBB'
+  +#169#169#169#164#164#164#158#158#158#153#153#153#148#148#148#143#142#142#137
+  +#137#137#132#132#133#128#128#128'zzztuusssrrrooolllgggeeebbb```\\\WWWIIIDDDA'
+  +'AA===::;888554221///---***((($%%######'#31' '#31#30#30#30#28#28#28#27#26#27
+  +#24#25#24#24#24#23#22#22#22#22#22#22#21#21#21#19#19#19#19#19#18#17#17#17#16
+  +#16#17#19#19#19#28#28#28#29#29#29#29#30#29#29#29#29#30#30#30#17#17#17#14#13
+  +#14#14#13#14#14#13#14#14#13#13#14#14#14#18#17#17#17#18#17#17#17#17#17#17#17
+  +#17#17#17#16#17#16#16#16#16#17#17#16#15#15#16#15#15#15#14#14#14#13#14#14#12
+  +#13#13#12#12#12#11#11#12#11#11#11#11#11#11#11#11#11#11#11#11#10#11#11#10#11
+  +#10#10#10#11#11#11#11#27#27#26'%%%))(///434'#30#31#31#7#7#7#7#7#7#7#7#7#7#7#7
+  +#7#7#6#7#6#7#7#7#6#6#6#6#6#6#6#6#5#6#6#5#6#6#5#6#6#6#5#5#6#6#6#5#6#5#5#6#5#5
+  +#5#5#4#4#4#5#5#5#5#4#5#4#5#4#5#4#4#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#4#3#3#4#4
+  +#3#4#3#3#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#3#3#3#2#3#3#3#2#3#3#2#2#2#2#2#2#2
+  +#2#2#2#2#2#2#1#2#2#2#2#2#2#2#2#1#1#1#1#1#1#2#2#2#2#2#2#1#2#2#2#1#1#1#1#2#1#1
+  +#1#1#1#1#1#1#1#1#1#0#0#0#0#0#0#1#1#0#1#0#1#1#1#0#0#1#0#1#0#0#1#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0'000yyy000000000000000000000000000000222666888:::<<<656/////////////'
+  +'//111666;::;::::::::::::::::::::::::::::::::::::::::9::9::9::9:99:99:99:99:'
+  +'999999999999999999999999999999999999999989989889889889889889888888888882222'
+  +'222222222222229888888888888888888888888888888888888878878778778778778777777'
+  +'777777777777777777777777777777778889889888888888886666666666666666666666666'
+  +'66101/////////000=<=JJJOOOUUUZZZGGG222222323332334454565565777777999:::<<<='
+  +'==>>>@??BAABBBEEEGGGIIIKKKNNNPOPSSRUVUXXW[[Z]]]a`adddgggkkknnnrrrvvvyzy}}}'
+  +#129#130#129#133#133#133#138#138#138#142#142#142#147#147#147#151#151#151#156
+  +#156#156#161#161#161#165#165#165#170#170#170#175#175#175#150#150#150'---...1'
+  +'11444777;;;===>>>??????@@@@@@???>>>=========<<<;;;;;;;;;:::9998888889998888'
+  +'88777777666666555444444333222222000000000//////......---,,,,,,,,,++++++****'
+  +'**)))(((''''''&&&%%%%%%$$$###!!!!!!!!!      '#31#31#31#31#31#31#30#30#30#28
+  +#28#28#26#26#26#24#24#24#22#22#22#20#20#20#19#19#19#19#17#7#8#22'p'#0#27#216
+  +#0#26#206#0#26#205#0#25#203#0#25#203#0#24#202#0#24#201#0#23#199#0#22#198#0#22
+  +#198#0#22#197#0#21#195#0#21#194#0#20#193#0#20#192#0#19#191#0#19#190#0#17#189
+  +#0#17#188#0#17#187#0#16#186#0#16#185#0#15#184#0#15#183#0#14#182#0#14#181#0#13
+  +#180#0#12#178#0#12#178#0#12#176#0#11#175#0#11#175#0#10#174#0#10#173#0#9#171#0
+  +#9#170#0#7#170#0#4#173'#&qBB9::9222)))   '#23#23#23#13#13#13#5#5#5#3#3#3#3#3
+  +#3#3#3#3#2#2#2#1#1#1#0#0#0#0#0#0#3#3#3#136#136#136#166#166#166#161#161#161
+  ,#155#155#156#151#151#151#146#145#146#140#140#140#135#135#135#130#130#130#128
+  +'}}}zzzvvvrrrnnnkkkgggdddaaa^^^\\\WWWFFECCB???;;;999666323//0...++,(((&&&$'
+  +'$$"##!  '#31#31#31#28#28#28#27#27#27#24#25#25#25#24#25#22#23#23#22#22#22#22
+  +#21#21#20#20#20#18#19#19#18#19#18#17#18#17#23#23#23#27#28#28#28#28#29#29#30
+  +#30#30#30#31#27#27#27#14#14#15#14#13#15#14#13#14#14#13#14#14#13#14#16#16#16
+  +#18#18#18#17#18#18#17#17#17#17#17#17#17#17#17#17#17#17#17#17#17#16#17#16#16
+  +#16#17#16#17#16#16#16#16#15#16#16#16#15#15#16#16#16#15#15#15#15#15#15#14#14
+  +#14#12#13#13#10#10#12#11#11#11#10#11#11#10#11#10#12#11#11#22#21#22'$$$)()-..'
+  +'322('''''#7#7#7#7#7#7#7#7#7#7#7#6#7#7#7#7#6#6#6#6#6#6#6#7#6#6#7#6#6#6#6#6#6
+  +#6#6#6#5#6#6#5#5#5#5#6#5#6#5#5#5#5#5#5#5#5#4#5#5#5#5#4#5#5#5#4#4#5#4#5#4#4#5
+  +#5#4#4#4#4#4#4#4#4#4#3#4#4#4#4#4#3#3#4#4#3#3#3#3#3#4#4#3#3#3#3#3#3#3#3#3#3#2
+  +#2#3#3#3#2#3#3#2#3#2#3#2#3#3#2#2#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2#2
+  +#1#2#1#1#2#2#1#1#1#1#1#1#1#2#1#1#1#1#2#1#1#1#1#1#1#0#1#0#1#1#1#1#1#1#0#1#1#1
+  +#0#1#0#0#0#1#0#0#1#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy000000000000000000000000000'
+  +'000222666888:::<<<656/////////////////////000545::9::::::::::::::::::::::::'
+  +':::::::::::9::9::9::9:99:99:99:99:99999999999999999999999999999999999999998'
+  +'998998988988988988988888888888222222222222222222988988888888888888888888888'
+  +'888888888888887887877877877877877777777777777777777777777777777777888998988'
+  +'988888888666666666666666666666666666////////////111???JJJOOOVVVZZZBBB222222'
+  +'333322343544565656778988::::::<<<>>>??>AAAABACCDFFFGGGJJJLLLNNNQQQSSSWWWYXX'
+  +'\[\`__aaaefeiiilllppprsswww{{{'#131#131#131#136#136#136#140#140#140#144
+  +#145#145#148#149#149#154#154#154#158#159#158#164#164#163#168#167#167#173#172
+  +#172#177#178#177'WWW---000444777:::===>>>@@@@@@@@@@@@@@@@@@???>>>=========<<'
+  +'<;;;;;;;;;;;;::::::999999999999999888888777666666555444444222111000000/////'
+  +'/......---,,,,,,,,,++++++******))))))''''''&&&&&&%%%%%%$$$#########"""!!!  '
+  +' '#31#31#31#30#30#30#28#28#28#25#25#25#23#23#23#21#21#21#19#20#20#19#18#13
+  +#16#18'#'#1#27#194#0#26#210#0#26#206#0#26#205#0#25#203#0#25#203#0#24#202#0#24
+  +#201#0#23#199#0#22#198#0#22#198#0#22#197#0#21#195#0#21#194#0#20#193#0#20#192
+  +#0#19#191#0#19#190#0#17#189#0#17#188#0#17#187#0#16#186#0#16#185#0#15#184#0#15
+  +#183#0#14#182#0#14#181#0#13#180#0#12#178#0#12#178#0#12#176#0#11#175#0#11#175
+  +#0#10#174#0#10#173#0#9#171#0#9#170#0#6#171#2#8#167'24U??8777///%%%'#29#29#29
+  +#20#20#20#10#10#10#3#3#3#3#3#3#3#3#3#3#3#3#2#2#2#1#1#1#0#0#0#0#0#0'888'#169
+  +#169#169#164#164#164#158#158#159#154#154#154#148#148#148#143#143#143#139#139
+  +#139#138#138#138#133#133#133#129#129#129'|||xxxuutpppllliiifffccc```]]][[[VV'
+  +'VFEFAA@=<=999777444111...-,,*)*''''''$%%###!"" '#31#31#29#29#29#28#28#28#26
+  +#26#26#25#24#25#23#23#23#22#22#22#21#21#21#20#20#20#19#19#19#19#19#18#18#19
+  +#19#29#29#29#28#28#28#30#30#30#31#31#30#30#30#30#20#20#20#14#14#15#14#13#15
+  +#14#13#15#14#13#14#14#13#14#18#18#18#18#18#18#17#18#18#17#18#18#17#17#17#17
+  +#17#17#17#17#17#17#17#17#17#16#17#16#17#17#16#16#16#16#16#16#16#16#16#15#15
+  +#16#15#16#16#16#16#16#16#15#15#15#16#15#15#15#15#12#12#12#10#11#11#10#10#10
+  +#10#10#11#11#12#11#18#18#18'###(((---011,-,'#7#7#7#8#7#7#7#7#7#7#7#7#7#7#7#6
+  +#6#6#7#6#7#7#6#6#7#6#6#7#6#6#6#6#6#6#6#6#6#6#5#6#5#6#6#6#6#5#6#5#6#5#6#6#5#5
+  +#5#5#5#4#4#5#4#5#4#5#5#5#4#5#4#4#4#5#4#4#5#4#4#4#4#4#4#4#3#4#4#4#4#4#4#4#4#3
+  +#3#3#3#3#4#3#3#3#3#4#4#3#3#3#3#3#3#3#3#2#3#3#2#3#3#3#3#3#2#2#3#2#2#3#3#2#2#3
+  +#2#2#3#2#2#2#2#2#2#2#2#2#2#2#1#2#1#1#2#2#2#2#1#1#1#2#2#1#2#1#1#1#1#1#1#1#1#2
+  +#1#1#1#1#1#1#1#1#1#1#0#1#1#1#1#1#0#1#0#1#1#0#1#0#1#1#0#0#0#0#0#1#1#0#0#0#0#0
+  +#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +'000yyy000000000000000000000000000000333666888:::<<<555/////////////////////'
+  +'////////0333999:::::::::::::::::::::::::::::9::9::9::9:99:99:99:99:99999999'
+  +'999999999999999999999999999999999998998988988988988988888888777222222222222'
+  +'222322988988988888888888888888888888888888888888887887877877877877877777777'
+  +'777777777777777777777777888998998988988888666666666666666666666666666//////'
+  +'//////111AAAJJJPPPVVVZZZ<<<222222333333344565556776787899:::;;;<<<>>>???@@A'
+  +'BBCEEFGFFJIIJJJMNMOOOQRRUUUWWW[[[\]]```dddgfgjjjmmmrrrtuuxyx}||'#128#128#129
+  +#133#133#134#137#137#137#142#142#142#147#146#146#151#151#151#156#156#156#160
+  +#160#160#165#165#165#170#170#170#175#175#175#150#150#150'...///333777:::===?'
+  +'??@@@AAAAAAAAAAAA@@@@@@@@@???>>>=========<<<;;;<<<<<<;;;;;;:::;;;;;;<<<<<<<'
+  +'<<===<<<;;;:::888777666444333222111000//////......---,,,,,,,,,++++++******)'
+  +')))))(((''''''&&&&&&&&&%%%$$$######"""!!!   '#30#30#30#29#29#29#26#26#26#24
+  +#24#24#22#22#22#21#20#20#20#18#7#14#21'C'#1#27#201#0#27#211#0#26#206#0#26#206
+  +#0#26#205#0#25#203#0#25#203#0#24#202#0#24#201#0#23#199#0#22#198#0#22#198#0#22
+  ,#197#0#21#195#0#21#194#0#20#193#0#20#192#0#19#191#0#19#190#0#17#189#0#17#188
+  +#0#17#187#0#16#186#0#16#185#0#15#184#0#15#183#0#14#182#0#14#181#0#13#180#0#12
+  +#178#0#12#178#0#12#176#0#11#175#0#11#175#0#10#174#0#10#173#0#9#171#0#9#170#0
+  +#5#175#13#18#146'<<>::7333+++"""'#25#25#25#16#16#16#6#6#6#3#3#3#3#3#3#3#3#3#3
+  +#3#3#2#2#2#1#1#1#1#1#1#2#2#2#135#135#135#167#167#166#161#161#161#155#156#155
+  +#151#151#151#150#150#150#146#145#146#141#140#140#135#135#135#132#132#132#128
+  +#128#128'{{{vvwsssooojjjgggeeeaaa```\\\ZZZWWWFFF?>>::;888555222000-.-+,+(((%'
+  +'%%######   '#30#31#30#28#29#28#26#26#26#25#25#25#24#24#24#22#22#22#22#22#22
+  +#20#20#20#19#19#19#19#18#19#22#23#23#29#29#29#29#29#29#30#30#30#31#31#30#30
+  +#30#30#14#14#16#14#14#15#14#14#14#14#14#15#14#13#15#15#15#15#18#18#18#18#18
+  +#18#18#18#17#17#17#18#17#17#17#17#17#18#17#17#17#17#17#17#17#17#16#16#17#16
+  +#16#16#16#17#16#16#16#16#16#16#16#16#16#15#16#16#16#16#16#15#15#16#16#15#16
+  +#16#15#13#13#13#11#11#11#11#10#10#11#10#11#12#11#12#13#14#13'""#'''''',,,011'
+  +'545'#8#8#7#8#8#7#7#7#7#7#7#7#7#7#7#6#7#7#7#7#7#7#7#7#7#6#6#6#6#6#6#6#6#6#6#6
+  +#5#6#6#6#6#6#5#6#6#6#6#6#5#5#5#5#6#5#5#5#5#5#5#5#5#5#5#5#5#4#5#4#4#5#5#4#4#5
+  +#5#4#5#4#4#4#4#5#4#4#4#4#4#4#4#4#4#4#3#3#3#4#3#3#3#4#4#3#3#3#4#3#3#3#3#3#3#3
+  +#3#3#3#3#3#3#3#3#3#3#2#2#3#2#3#2#3#2#3#3#3#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2
+  +#2#1#2#1#1#1#2#1#1#1#1#2#2#1#2#1#1#1#1#1#1#1#1#1#1#1#1#0#1#0#1#1#1#0#1#0#0#0
+  +#1#0#0#0#0#1#1#1#1#0#0#1#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy000000000000000000000000000000444'
+  +'777999;;;===999222/////////////////////////////////222777::::::::::::::::::'
+  +'::::::::9::9::9::9:99:99:99:99:99999999999999999999999999999999999999998998'
+  +'998988988988988988888777222222222222222444988988988988888888888888888888888'
+  +'888888888888887887877877877877877777777777777777777777777777999999998998988'
+  +'888666666666666666666666666666////////////111AAAJJJOOOUUUZZZ===222222333333'
+  +'4545566556678789:9:::;;;===>>>@@@BBBCCCEFFHGGJJJMLLOONQQQTSTVVVXXX[[[___abb'
+  +'edehhhkkkooorsrwwwzzz'#131#131#131#135#136#136#139#140#140#144#144#145
+  +#148#148#148#153#153#153#158#158#158#163#162#162#167#167#167#173#173#173#178
+  +#178#178'ZZZ///333666999===???AAAAAABBBAAABBBBBB@@@@@@@@@@@@???>>>=========='
+  +'=====<<<<<<=========>>>@@@@@@@@@BBBAAA@@@???>>>;;;:::888666333222111000000/'
+  +'//......---,,,,,,,,,++++++******))))))''''''''''''''''''&&&&&&%%%$$$######"'
+  +'""   '#30#30#30#28#28#28#27#27#27#25#25#25#22#22#22#22#20#8#14#22'E'#1#28
+  +#202#0#28#215#0#28#209#0#27#208#0#26#206#0#26#206#0#26#205#0#25#203#0#25#203
+  +#0#24#202#0#24#201#0#23#199#0#22#198#0#22#198#0#22#197#0#21#195#0#21#194#0#20
+  +#193#0#20#192#0#19#191#0#19#190#0#17#189#0#17#188#0#17#187#0#16#186#0#16#185
+  +#0#15#184#0#15#183#0#14#182#0#14#181#0#13#180#0#12#178#0#12#178#0#12#176#0#11
+  +#175#0#11#175#0#10#174#0#10#173#0#9#171#0#9#170#0#4#175#30'"r==4666///'''''''
+  +#30#30#30#21#21#21#11#11#11#5#5#5#3#3#3#3#3#3#3#3#3#2#2#2#1#1#1#1#1#1#1#1#1
+  +'999'#169#169#169#164#164#164#162#161#162#158#158#158#153#153#153#148#148#148
+  +#143#143#143#139#139#139#134#134#134#130#130#130'~~~yyysssjjibbc```eeecccaaa'
+  +'^^^[[[XXXTTTCDD=<<9::777444111...,++())&&''$$$"##!!!'#31#31#31#28#28#29#27
+  +#27#27#25#25#25#24#24#24#23#23#23#22#22#22#21#21#21#19#20#20#19#19#19#28#28
+  +#28#30#29#30#30#30#30#31#31#31#31#31' '#24#24#23#14#15#15#14#14#16#14#14#15
+  +#14#14#15#14#14#15#18#17#18#19#18#18#18#18#18#18#18#18#18#18#18#17#17#18#17
+  +#17#18#17#17#17#17#17#17#17#17#17#16#17#16#16#17#16#16#17#16#16#16#16#16#16
+  +#16#16#16#16#15#16#16#16#16#15#16#16#15#16#15#15#14#14#14#11#11#11#11#10#11
+  +#11#11#11#10#11#10#13#13#13#31#31#31'(''(+++000443'#20#19#19#7#8#8#8#7#8#7#7
+  +#7#7#7#7#7#7#7#7#7#7#7#7#6#6#6#7#6#6#7#6#6#7#6#7#6#6#6#6#6#6#6#6#6#6#6#6#5#5
+  +#5#6#5#5#5#6#5#5#5#5#6#5#5#5#5#5#5#4#5#5#4#5#5#4#5#4#4#5#4#4#5#4#4#4#4#4#4#4
+  +#4#3#4#4#3#4#4#3#4#3#3#4#4#3#3#3#3#4#3#3#3#4#3#3#3#3#3#3#3#3#2#3#3#3#3#3#3#2
+  +#2#2#3#3#3#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2#2#2#1#2#1#2#2#2#1#1#1#2#1#1#1
+  +#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1#0#1#1#1#0#0#0#1#0#0#1#1#1#0#0#1
+  +#0#0#0#0#0#0#0#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0'000yyy000000000000000000000000000000555888:::;;;===>>>@@@<<<444//'
+  +'///////////////////////////////111666::::::::::::::::::::9::9::9::9:99:99:9'
+  +'9:99:9999999999999999999999999999999999999999899899898898898898898888877722'
+  +'222222222222244499898898898898888888888888888888888888888888888888788787787'
+  +'787787787777777777777777777777777799999999999899888866666666666666666666666'
+  +'6666////////////111AAAJJJPPPTTTZZZ===222222333344555665566877898:::;;;<<=>>'
+  +'>>>>AAABBBDDDFFFHGGJJJLLLONORRQTTTWWWZZZ]]]``_bccggfijinmmqqquuuxxx|||'#129
+  +#129#129#133#133#133#137#137#137#141#141#141#146#146#146#151#151#151#155#155
+  +#155#161#160#160#165#165#165#170#170#170#175#175#175#152#152#152'11122255599'
+  ,'9<<<???AAACCCCCCBBBCCCBBBBBBBBB@@@@@@@@@@@@???>>>==================>>>???@@'
+  +'@BBBDDDEEEGGGGGGHHHGGGFFFDDDBBB???<<<:::777555333222111000///......---,,,,,'
+  +',,,,++++++******))))))''''''''''''''''''&&&&&&$$$$$$###"""   '#30#30#30#28
+  +#28#28#26#26#26#24#25#24#24#22#10#15#23'F'#1#29#205#0#29#219#0#29#211#0#28
+  +#210#0#28#209#0#27#208#0#26#206#0#26#206#0#26#205#0#25#203#0#25#203#0#24#202
+  +#0#24#201#0#23#199#0#22#198#0#22#198#0#22#197#0#21#195#0#21#194#0#20#193#0#20
+  +#192#0#19#191#0#19#190#0#17#189#0#17#188#0#17#187#0#16#186#0#16#185#0#15#184
+  +#0#15#183#0#14#182#0#14#181#0#13#180#0#12#178#0#12#178#0#12#176#0#11#175#0#11
+  +#175#0#10#174#0#10#173#0#9#171#0#7#172#2#10#165'12L:93333+++###'#26#26#26#17
+  +#17#17#7#7#7#4#4#4#4#4#4#3#3#3#2#2#2#1#1#1#1#1#1#1#1#1#3#3#3#137#137#137#171
+  +#171#171#165#165#166#161#161#161#156#156#156#151#151#151#146#146#146#141#142
+  +#142#136#136#136#132#133#132'}}}sssmmmiiheee```_`_dddbbb___[[[YYYVVVRRRBBA:9'
+  +'9787444111...,-,***''''''%%%###"""   '#30#29#30#28#28#28#26#27#26#25#25#25
+  +#23#23#23#22#22#22#21#21#21#20#20#20#22#22#22#30#30#30#31#31#31#31#31' '#31
+  +#31#31'   '#19#19#19#14#15#16#15#14#15#14#14#15#14#14#15#15#15#15#19#18#18#19
+  +#18#18#18#18#18#18#18#18#18#18#18#18#18#17#18#18#17#17#17#18#17#17#17#17#17
+  +#16#17#17#17#17#16#16#17#16#17#17#16#16#16#16#16#16#16#16#16#16#16#16#15#15
+  +#16#16#16#15#16#16#15#14#14#11#11#12#11#11#11#11#11#11#11#11#10#12#12#11#27
+  +#27#28'&%%***///444'#28#28#28#8#7#8#8#7#7#7#8#7#8#7#7#7#7#7#7#6#7#7#7#7#6#6#6
+  +#7#7#7#6#6#6#6#6#6#6#6#6#6#6#6#5#6#6#6#6#6#6#6#6#6#5#5#5#5#5#5#5#6#5#5#5#5#5
+  +#5#4#5#5#5#5#5#4#5#4#5#4#5#5#4#4#4#4#5#5#5#4#4#4#4#4#4#4#4#4#3#4#4#3#3#4#3#4
+  +#4#3#3#3#4#3#3#3#4#3#3#3#3#3#3#3#3#3#3#2#2#3#3#2#3#2#2#2#2#2#3#3#2#2#3#2#2#2
+  +#2#2#2#2#2#2#1#2#2#2#2#2#1#2#2#2#2#2#2#2#1#2#1#1#1#1#2#2#2#1#1#1#1#1#1#1#1#1
+  +#1#1#1#1#0#1#1#0#1#1#0#0#1#1#1#0#0#0#0#0#1#0#0#1#0#0#0#1#0#0#0#0#1#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy000000000000000'
+  +'000000000000000666999;;;<<<===???@@@@@@@@@>>>555000////////////////////////'
+  +'//////000444999::::::::::::::9::9::9:99:99:99:99:99999999999999999999999999'
+  +'999999999999999998998988988988988988888777222222222222222444998998988988988'
+  +'988888888888888888888888888888888888887887877877877877877777777777777777777'
+  +'777999999999999998888666666666666666666666666666////////////111AAAJJJOOOTTT'
+  +'XXX<<<222333333444555555556878899:::;;;<<=>>>??@AAACCCEEEGFGJJIJKJNNNOOOSSS'
+  +'UUUXXX[[[^^^aaadddhghlkknonrrsvvvzzz'#131#131#131#135#135#135#139#139#139
+  +#144#144#144#148#148#149#153#153#153#158#158#158#163#163#163#168#168#168#173
+  +#173#173#178#177#178'cbb111444888<<<???AAABBBCCCDDDDDDDDDBBBBBBBBBBBB@@@@@@@'
+  +'@@@@@???>>>===============>>>@@@CCCEEEGGGJJJMMMNNNOOONNNNNNKKKIIIFFFBBB???;'
+  +';;888666333111111000///......---,,,,,,,,,++++++******))))))'''''''''''''''''
+  +'''&&&%%%$$$"""!!!   '#30#30#30#28#28#28#26#26#26#25#24#12#17#25'H'#2#30#207
+  +#0#30#221#0#30#213#0#29#212#0#29#211#0#28#210#0#28#209#0#27#208#0#26#206#0#26
+  +#206#0#26#205#0#25#203#0#25#203#0#24#202#0#24#201#0#23#199#0#22#198#0#22#198
+  +#0#22#197#0#21#195#0#21#194#0#20#193#0#20#192#0#19#191#0#19#190#0#17#189#0#17
+  +#188#0#17#187#0#16#186#0#16#185#0#15#184#0#15#183#0#14#182#0#14#181#0#13#180
+  +#0#12#178#0#12#178#0#12#176#0#11#175#0#11#175#0#10#174#0#10#173#0#9#171#0#6
+  +#176#18#23#135'995554///'''''''#30#30#30#22#22#22#12#12#12#5#5#5#4#4#4#4#4#4
+  +#3#3#3#2#2#2#1#1#1#1#1#1#1#1#1'DDD'#174#174#173#169#169#169#163#163#164#159
+  +#159#159#154#154#154#149#149#150#145#145#145#137#137#136'~yyyuuupppkkkfffc'
+  +'bb^^_]]]bbb```]]]ZZZWWWUUUQQQCCB888555222000.-.*++)))&%%$##"""   '#29#29#29
+  +#28#29#29#26#26#27#25#25#25#23#23#23#22#22#22#21#22#21#20#20#20#27#26#26'   '
+  +'   '#31' '#31'   '#29#29#29#16#16#17#15#15#16#14#14#16#14#14#15#14#14#15#17
+  +#17#17#19#19#18#18#19#19#18#19#18#18#18#18#18#18#18#18#18#18#18#18#18#17#17
+  +#17#17#17#18#17#17#17#16#17#17#17#17#17#17#16#17#17#17#16#16#17#17#16#16#17
+  +#16#16#16#16#16#16#15#15#15#16#16#15#16#15#15#12#12#12#11#11#11#11#11#11#11
+  +#10#11#12#11#12#24#25#25'$$$)))//0333%%%'#8#7#7#8#8#7#7#7#7#7#7#7#8#7#7#7#7#7
+  +#7#7#7#6#7#7#6#6#6#7#7#7#7#7#7#6#6#7#6#6#6#6#6#6#6#5#6#6#6#6#5#6#5#5#6#6#5#5
+  +#5#5#6#5#5#5#5#4#5#5#5#5#5#5#5#5#5#5#4#5#4#5#5#5#5#4#5#4#4#4#4#4#4#4#4#4#4#4
+  +#4#3#4#4#4#4#4#3#3#4#4#3#3#4#3#3#3#3#3#4#3#3#3#2#2#3#2#3#3#2#3#3#2#3#2#3#2#2
+  +#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2#1#1#1#2#1#1#1#1#1#1#1#2
+  +#2#1#2#2#1#1#1#1#1#1#1#1#1#1#1#0#1#1#1#1#0#0#1#1#0#0#0#1#0#0#1#0#1#1#0#1#0#0
+  +#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy000'
+  +'000000000000000000000000000555;;;<<<===>>>???@@@@@@@@@@@@@@@???878111//////'
+  +'///////////////////////////333988::::::::9::9::9::9:99:99:99:99:99999999999'
+  +'999999999999999999999999999998998998988988988988988776222222222222222444999'
+  +'998998988988988988888888888888888888888888888888888887887877877877877877777'
+  ,'777777777777777999999999999999888666666666666666666666666666////////////000'
+  +'AAAIIINNNSSSWWW???2223333334446665666677889:9:::;<<>=>>>>@A@BBBCCCFFFHHHJJJ'
+  +'MMMOONRRRSTSVWWYZZ\\\```bbbeeeiiimmmqpptttwww{{{'#128#131#131#132#136#136
+  +#136#141#141#141#146#146#146#150#150#150#155#155#155#160#160#160#165#165#166
+  +#170#170#170#175#175#175#163#163#163'999444777;;;>>>@@@BBBDDDDDDEEEEEEDDDDDD'
+  +'BBBBBBBBBBBB@@@@@@@@@???>>>>>>============>>>@@@DDDGGGJJJNNNQQQSSSUUUVVVUUU'
+  +'TTTQQQNNNIIIDDD@@@<<<999666333111111000.........---,,,,,,,,,++++++******)))'
+  +')))(((''''''&&&%%%$$$"""!!!'#31#31#31#30#30#30#27#27#27#27#25#13#18#27'J'#1
+  +#31#209#0#31#223#0#31#215#0#30#214#0#30#213#0#29#212#0#29#211#0#28#210#0#28
+  +#209#0#27#208#0#26#206#0#26#206#0#26#205#0#25#203#0#25#203#0#24#202#0#24#201
+  +#0#23#199#0#22#198#0#22#198#0#22#197#0#21#195#0#21#194#0#20#193#0#20#192#0#19
+  +#191#0#19#190#0#17#189#0#17#188#0#17#187#0#16#186#0#16#185#0#15#184#0#15#183
+  +#0#14#182#0#14#181#0#13#180#0#12#178#0#12#178#0#12#176#0#11#175#0#11#175#0#10
+  +#174#0#10#173#0#8#172#0#7#173''')X880111***"""'#26#26#26#17#17#17#7#7#7#5#5#5
+  +#5#5#5#3#3#3#2#2#2#2#2#2#2#2#2#1#1#1#11#11#11#155#155#155#172#172#172#167#167
+  +#167#162#162#162#156#156#156#150#150#150#140#140#140#134#134#134#129#128#129
+  +'{||vvvqqqmmmhhgdcc_`_[[[ZZZ^^^]]][[[XXXUUURRRQPQAAA877444211...,,,())&&''$$'
+  +'$###!!!'#31#31#31#29#28#29#27#28#28#25#25#25#24#24#24#22#22#22#22#22#22#21
+  +#22#21' '#31#31'      !!!  !'#22#22#22#16#16#17#15#15#16#14#15#15#15#14#16#14
+  +#14#16#19#19#19#19#19#19#19#18#19#19#19#18#18#18#19#18#18#18#18#18#18#18#18
+  +#18#18#18#17#17#17#18#17#17#17#17#18#17#17#17#17#17#16#17#17#16#17#17#17#16
+  +#17#17#16#17#16#16#16#16#16#16#16#15#16#16#16#15#16#15#12#13#13#11#11#11#11
+  +#12#11#11#11#11#12#12#12#19#18#19'#$$(()--.222---'#8#8#8#7#7#8#7#7#8#7#7#7#7
+  +#8#7#7#7#7#7#7#7#7#6#7#7#7#7#6#7#7#7#7#6#7#6#7#6#6#6#6#6#6#6#6#6#6#6#6#5#6#5
+  +#5#6#5#5#6#5#5#6#6#5#5#5#5#5#5#5#5#5#5#5#5#5#5#4#4#5#4#4#4#5#4#4#4#4#4#4#4#4
+  +#5#4#4#4#7#7#7#4#4#4#3#4#3#4#3#4#4#3#3#4#4#4#3#3#3#3#3#3#3#3#3#3#3#2#2#3#2#2
+  +#3#2#2#3#3#2#3#2#2#3#2#2#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#1#2#2#1#2#2#2#2#2
+  +#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1#1#1#1#0#1#1#1#1#1#0#1#1#1#1#0#0#0#1#0
+  +#1#0#1#1#0#0#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +'000yyy000000000000000000000000000000000111777===??????@@@@@@@@@@@@@@@@@@@@@'
+  +'@@@:::222/////////////////////////////////212777::9::9::9::9:99:99:99:99:99'
+  +'999999999999999999999999999999999999998998998988988988988988776212222222222'
+  +'222222999999998998988988988988888888888888888888888888888888888887887877877'
+  +'877877877777777777777777999999999999999888666666666666666666666666666000///'
+  +'//////000<;<HHHNNNRRRVVVEEE222333333444666665777888::9:::====>>>>>AABBCBDDE'
+  +'FFFHHHJJJMMLOONRQRUUTWWW[Z[^]]```dddgggjijnnnqqquuuyyy}}}'#129#129#129#134
+  +#134#134#138#138#138#143#143#143#147#147#147#152#152#151#156#157#157#162#162
+  +#162#167#167#167#172#172#172#178#178#178'www333777:::===@@@BBBDDDEEEEEEEEEEE'
+  +'EEEEDDDDDDBBBBBBBBBBBB@@@??????>>>======<<<<<<<<<===???CCCHHGMLIQQMVTOZYU\['
+  +'X]]\\\\\\\YYYUUUQQQLLLGGGBBB===999666333111000000.........---,,,,,,,,,+++++'
+  +'+******))))))''''''&&&%%%$$$"""   '#30#30#30#28#28#28#28#26#14#18#28'K'#1' '
+  +#211#0'!'#225#0#31#217#0#31#216#0#31#215#0#30#214#0#30#213#0#29#212#0#29#211
+  +#0#28#210#0#28#209#0#27#208#0#26#206#0#26#206#0#26#205#0#25#203#0#25#203#0#24
+  +#202#0#24#201#0#23#199#0#22#198#0#22#198#0#22#197#0#21#195#0#21#194#0#20#193
+  +#0#20#192#0#19#191#0#19#190#0#17#189#0#17#188#0#17#187#0#16#186#0#16#185#0#15
+  +#184#0#15#183#0#14#182#0#14#181#0#13#180#0#12#178#0#12#178#0#12#176#0#11#175
+  +#0#11#175#0#10#174#0#10#172#0#7#176#11#19#145'555331---&&&'#30#30#30#22#22#22
+  +#12#12#12#5#5#5#5#5#5#4#4#4#2#2#2#2#2#2#2#2#2#2#2#2#1#1#1'___'#175#175#175
+  +#169#169#169#163#163#163#154#154#154#146#146#146#141#141#141#135#135#135#131
+  +#131#131'}}}xxysssnonjjjeee``a]]]YYYWVV\\\[[[YYYVVVRRRQQQNNN?>?444212.//,,,*'
+  +'**(((%%%###!!"   '#29#29#28#28#27#28#25#26#26#24#24#24#22#22#22#22#22#22#26
+  +#26#26'      !!"!!!   '#17#16#17#16#17#17#15#15#16#15#15#16#15#15#15#16#17#16
+  +#19#19#19#19#19#19#19#18#18#19#19#19#19#19#18#18#18#18#18#18#18#18#18#18#18
+  +#18#18#18#18#18#17#17#18#18#17#17#17#17#17#17#17#17#16#17#17#16#17#16#17#16
+  +#16#16#16#17#16#16#16#16#16#16#16#16#16#16#15#15#13#14#14#11#12#12#11#11#12
+  +#11#11#11#12#12#12#15#14#15'###''''''-,-111555'#8#8#8#8#8#8#8#8#8#8#8#7#8#8#7
+  +#8#7#7#7#8#7#7#7#7#7#7#7#7#7#7#6#6#7#6#6#7#6#7#6#6#6#6#6#6#6#6#6#6#6#5#5#6#6
+  +#6#6#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#4#5#5#5#4#5#4#4#4#5#5#5#4#4#8#8#8#19
+  +#19#19#22#22#22#13#13#13#4#4#4#3#4#4#4#4#4#3#3#3#3#3#3#3#3#4#3#3#3#3#3#3#3#3
+  +#3#3#3#3#3#3#2#2#3#2#2#2#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2#2#1#2
+  +#1#2#1#1#2#2#1#1#2#1#1#1#2#1#1#1#1#1#1#1#1#1#1#1#1#0#1#1#0#1#1#1#1#1#0#1#1#0
+  +#1#0#0#0#0#0#0#1#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0'000yyy000000000000000000000000000000000000000000666>>>@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@<<<444/////////////////////////////////000666::9::9:99:99:99:9'
+  +'9:99:9999999999999999999999999999999999999999899898898898898898888821221222'
+  +'222222222299999999999899898898898898888888888888888888888888888888888888788'
+  +'787787787787787777777777777799999999999999988866666666666666666666666666610'
+  +'1/////////000;:;GGGMMMQQQUUUIII222333333555666666888989:::;:;==<>>>???AABDC'
+  +'CEEEFFFIIIKKKNNNPOOSSSVUUXYY[[[_^_aaadddhhhlllooossswvv{{z'#131#131#131
+  +#136#136#136#140#140#140#145#145#145#149#149#149#153#153#153#159#159#159#164
+  +#164#164#169#169#169#175#174#174#176#176#176'JJJ666888===???BBBDDDEEEFFFFFFF'
+  +'FFEEEEEEEEEDDDDDDBBBBBBBBBAAA???>>>>>>===<<<;;;;;;;;;<<;>=:C@5GF@JKQLO\JRoT'
+  +'Xi[]ddc_heZed_aa`^^^YYYTTTMMMGGGBBB===999555333222111///.........---,,,,,,,'
+  +',,++++++******)))(((&&&%%%###!!!'#31#31#31#29#29#28#28#26#15#19#28'L'#1'!'
+  +#213#0'"'#227#0'!'#219#0'!'#218#0#31#217#0#31#216#0#31#215#0#30#214#0#30#213
+  +#0#29#212#0#29#211#0#28#210#0#28#209#0#27#208#0#26#206#0#26#206#0#26#205#0#25
+  +#203#0#25#203#0#24#202#0#24#201#0#23#199#0#22#198#0#22#198#0#22#197#0#21#195
+  +#0#21#194#0#20#193#0#20#192#0#19#191#0#19#190#0#17#189#0#17#188#0#17#187#0#16
+  +#186#0#16#185#0#15#184#0#15#183#0#14#182#0#14#181#0#13#180#0#12#178#0#12#178
+  +#0#12#176#0#11#175#0#11#175#0#10#174#0#9#173#0#8#176'$&[55,///)))!!!'#26#26
+  +#26#17#17#17#7#7#7#5#5#5#5#5#5#4#4#4#2#2#2#2#2#2#2#2#2#2#2#2#31#31#31#172#172
+  +#172#168#168#168#160#160#160#155#154#155#149#149#149#143#143#143#137#137#137
+  +#133#133#133'{z{uuuppplllgggccc]^^ZZ[WVVSSSYYYYYYWWWTTTQQQOOOMLM===323///'
+  +'---+++)))&&%$#$"""   '#30#30#30#29#29#29#26#27#26#25#25#26#23#23#23#22#22#22
+  +#31#31#31'      """"""'#26#26#25#17#17#17#16#17#17#15#15#16#14#14#16#15#14#16
+  +#18#19#19#19#19#19#19#19#19#19#19#19#19#19#19#19#18#18#19#18#18#18#18#19#18
+  +#18#18#18#18#18#17#18#17#17#17#17#17#18#17#17#17#17#17#17#17#17#17#17#17#17
+  +#16#16#16#16#16#17#16#16#16#17#16#16#16#16#16#16#16#15#16#15#15#14#11#12#12
+  +#11#12#11#11#11#11#11#11#11#13#13#13'   (''(,,+110445'#20#20#20#8#8#8#8#7#8#8
+  +#7#8#7#8#8#8#7#7#8#7#7#7#8#7#7#7#7#6#7#7#7#6#7#7#7#7#7#7#7#6#6#6#6#6#6#6#6#6
+  +#6#6#6#5#5#5#6#6#6#5#6#5#6#6#5#5#5#6#5#6#5#5#5#5#5#5#5#5#5#5#5#5#5#6#6#5#15
+  +#14#15#21#21#21#21#21#21#22#22#22#22#22#22#18#18#18#6#7#7#4#3#3#4#3#3#3#3#4#3
+  +#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#3#2#2#3#2#2#2#3#2#3#3#3#3#2#2#2#2#3#2#2#2#2
+  +#2#2#2#2#2#2#2#2#2#2#1#2#1#2#2#1#2#2#1#1#2#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1
+  +#1#1#1#1#0#1#1#0#0#0#0#0#0#0#1#1#0#0#1#0#0#1#1#1#0#0#1#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0'000yyy000000000000000000000000000000000000000000000'
+  +'000444<<<@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@>>>667000///////////////////////////'
+  +'/////0444999:99:99:99:99:99999999999999999999999999999999999999998998998988'
+  +'988988988988211212212222222222999999999999998998988988988988888888888888888'
+  +'888888888888888888887887877877877877877777777777999:99999999999999766666666'
+  +'666666666666666666111/////////000666GGGKKKOOOTTTPPP222333444555666666888999'
+  +':::;;;<==>??@@@BAACCDFGGHGGKKJMLLOOOQQQTTTWWWYXY[[\```bbbeeeiiimmmqqquuuwxw'
+  +'}}}'#129#129#129#133#132#133#137#136#137#142#142#141#146#146#146#151#151#151
+  +#156#156#156#161#161#161#166#165#165#170#170#170#176#176#176#144#144#144'666'
+  +'888;;;???AAADDDEEEFFFFFFGGGGGGFFFEEEEEEEEEDDDDDDBBBAAAAAA???>>>===;;;;;;:::'
+  +'::::97=:/9<G+='#132#30'?'#187#20'='#226#12'<'#245#10':'#249#10';'#246#17'='
+  +#235'#F'#204'>S'#164'^bvli_fea```[[[UUUMMMGGGBBB<<<888555222111000//////....'
+  +'..---,,,,,,,,,++++++***)))(((''''''%%%###!!!'#30#31#30#29#28#23#19#29'P'#1
+  +'"'#214#0'#'#229#0'"'#221#0'"'#220#0'!'#219#0'!'#218#0#31#217#0#31#216#0#31
+  +#215#0#30#214#0#30#213#0#29#212#0#29#211#0#28#210#0#28#209#0#27#208#0#26#206
+  +#0#26#206#0#26#205#0#25#203#0#25#203#0#24#202#0#24#201#0#23#199#0#22#198#0#22
+  +#198#0#22#197#0#21#195#0#21#194#0#20#193#0#20#192#0#19#191#0#19#190#0#17#189
+  +#0#17#188#0#17#187#0#16#186#0#16#185#0#15#184#0#15#183#0#14#182#0#14#181#0#13
+  +#180#0#12#178#0#12#178#0#12#176#0#11#175#0#11#175#0#10#173#0#7#178#11#18#145
+  +'33211/+++%%%'#29#29#29#21#21#21#11#11#11#5#5#5#5#5#5#4#4#4#3#3#3#2#2#2#2#2#2
+  +#2#2#2#2#2#2'|||'#168#168#168#162#162#162#156#156#156#151#151#151#145#145#145
+  +#140#140#140#134#135#134#129#129#129'||{xxxvvuooohhhddd`__[[[XWWSSSPPPXXXVVV'
+  +'SSSRRROOOMMMJKK@@A110...,,,)))%&&$$####   '#30#30#30#29#29#29#27#26#27#25#26
+  +#26#23#24#23#25#25#25'!!!!!!""!""""""'#20#20#21#16#17#17#17#16#17#15#15#16#15
+  +#15#16#15#16#16#20#20#19#20#19#19#19#19#19#19#19#19#19#18#19#19#18#19#18#18
+  +#18#18#18#18#18#18#19#18#18#18#18#18#18#18#17#18#17#18#17#18#17#17#17#18#17
+  +#17#17#17#17#17#17#17#17#16#17#17#17#16#16#16#16#17#16#16#16#17#16#16#16#16
+  +#14#15#12#11#12#12#12#12#12#11#11#11#11#12#13#13#13#29#29#29'''''''+*+///444'
+  +#25#25#25#8#8#8#8#8#8#8#8#7#7#8#8#7#7#7#7#7#7#7#7#7#7#8#7#7#7#7#6#7#6#7#7#7#6
+  +#7#6#7#6#7#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#5#5#5#5#6#6#5#5#6#5#5#5#5#5#5
+  ,#5#5#5#10#11#11#20#19#19#21#20#21#22#21#21#21#21#22#22#22#22#23#23#23#23#23
+  +#23#23#23#23#10#10#10#3#4#3#4#4#4#4#3#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#3#3#2
+  +#2#3#3#2#3#2#3#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2#1#2#1#2#2#1#2#1#1#2
+  +#2#2#1#2#1#1#1#1#1#1#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1#1#1#1#0#1#1#1#1#0#0#0
+  +#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy00000000000'
+  +'0000000000000000000000000000000000000000000222:::@@@@@@@@@@@@@@@@@@@@@@@@@@'
+  +'@@@@???999111/////////////////////////////////333888:99:99:9999999999999999'
+  +'999999999999999999999999999899898898898898898821121121221222222299999999999'
+  +'999999899898898898898888888888888888888888888888888888888788787787787787787'
+  +'7777777988:99:99999999999766666666666666666666666666222/////////000222EEEKK'
+  +'KNNNRRRVVV444333444555666666888999:::<<;>>>>??A@ABBBCCDGFGIHHJJJMMMOOORRRTT'
+  +'TWWW[[[^^^```dddgggkkknnnqqquuuyyy~~~'#130#129#130#134#134#134#139#139#139
+  +#143#143#143#148#148#148#153#153#153#158#158#158#162#162#162#168#168#168#173
+  +#173#173#178#178#178'eef777;;;>>>@@@CCCEEEFFFHHHHHHHHHGGGGGGFFFEEEEEEEEEDDDC'
+  +'CCAAA@@@???===;;;:::999888970789&;'#140#18'='#227#8'='#255#7'<'#255#7';'#255
+  +#8';'#255#7':'#255#6'9'#255#4'8'#255#1'6'#255#0'5'#255#12';'#242'5O'#181'cfo'
+  +'jg^`a`ZZZSSSLLLEEE@@@;;;777444222111000//////......---,,,,,,,,,++++++***)))'
+  +'''''''%%%###   '#30#30#27#26#28'!'#4'"'#198#0'$'#234#0'#'#223#0'#'#222#0'"'
+  +#221#0'"'#220#0'!'#219#0'!'#218#0#31#217#0#31#216#0#31#215#0#30#214#0#30#213
+  +#0#29#212#0#29#211#0#28#210#0#28#209#0#27#208#0#26#206#0#26#206#0#26#205#0#25
+  +#203#0#25#203#0#24#202#0#24#201#0#23#199#0#22#198#0#22#198#0#22#197#0#21#195
+  +#0#21#194#0#20#193#0#20#192#0#19#191#0#19#190#0#17#189#0#17#188#0#17#187#0#16
+  +#186#0#16#185#0#15#184#0#15#183#0#14#182#0#14#181#0#13#180#0#12#178#0#12#178
+  +#0#12#176#0#11#175#0#11#175#0#9#174#0#8#177'!$Y32*,,-''''''   '#24#24#24#16
+  +#16#16#7#7#7#5#5#5#5#5#5#4#4#4#4#4#4#2#2#2#2#2#2#2#2#2'CCC'#170#170#170#164
+  +#164#164#159#159#159#153#152#153#147#147#147#142#142#142#137#136#137#132#132
+  +#132#130#130#129'}||wwwrrrklkeeeaaa]]]XXYTUTQRQMMMSSSTTTRRROOOMMMKKKHHH>>>/.'
+  +'.,,,))*''''''%%$###!"!'#31#31' '#29#29#29#27#27#27#25#25#25#23#23#23#29#29
+  +#29'"""""""""##$'#31#30#31#18#18#19#17#17#18#17#16#17#15#16#17#15#15#16#18#18
+  +#18#20#19#20#20#20#19#19#20#20#19#19#19#19#19#19#18#19#19#19#18#19#19#19#18
+  +#18#18#18#18#19#18#18#18#18#18#18#17#18#18#17#17#18#17#18#17#17#17#17#18#17
+  +#17#17#16#17#17#16#16#16#16#17#17#17#16#16#16#16#16#16#16#16#16#16#16#12#12
+  +#12#12#12#12#12#12#11#11#11#11#13#12#12#25#25#25'%%%))*0//344"""'#8#8#9#8#8#8
+  +#8#8#8#8#8#8#7#8#8#8#8#7#7#7#8#7#8#7#7#7#7#7#7#7#7#6#7#7#7#7#7#6#6#7#6#6#6#6
+  +#7#6#6#7#6#6#6#5#6#6#6#6#5#6#5#6#6#6#5#6#6#5#5#5#5#8#7#7#16#16#16#21#21#21#21
+  +#21#21#21#22#22#21#21#22#22#22#22#22#22#22#23#23#23#23#23#23#24#24#24#24#24
+  +#24#15#15#15#5#5#5#3#3#3#3#3#3#4#3#4#3#3#3#3#4#3#3#3#3#3#3#3#3#3#3#2#2#3#2#3
+  +#3#3#3#2#3#3#2#3#2#2#2#2#2#3#2#2#2#2#2#2#2#2#2#1#2#1#1#2#1#2#1#2#1#1#2#1#1#2
+  +#1#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1#1#0#1#1#1#0#0#1#1#1#0#1#1#0#0
+  +#1#0#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy0000000000000000000000000'
+  +'00000000000000000000000000000000000111888???@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@:'
+  +'::333/////////////////////////////////112666:99:999999999999999999999999999'
+  +'999999999999989989889889889889881112112112122122229889999999999999999989989'
+  +'88988988988888888888888888888888888888888888887887877877877877877777988::9:'
+  +'99:99999999777666666666666666666666666444////////////111CCCHHHMMMQQQUUU>>>3'
+  +'33444555666777888::::::===>>>??>BBBBBBEEDFGFHHIKJJNMMOOOSSSUUUXXX[[[]^]bbad'
+  +'eehhhlllppossswwwzzz'#131#131#131#136#136#136#140#140#140#145#145#145#149
+  +#150#149#154#154#154#159#159#159#164#164#164#170#170#170#175#175#175#171#171
+  +#171'DDD:::===@@@CCCEEEGGGHHHIIIIIIHHHGGGGGGGGGFFFEEEEEEDDDCCCAAA@@@>>><<<::'
+  +':88866675,17K'#24'>'#201#11'@'#255#11'?'#255#11'>'#255#11'>'#255#10'='#255#9
+  +'<'#255#9';'#255#8';'#255#7':'#255#6'9'#255#6'8'#255#2'7'#255#0'4'#255#21'?'
+  +#228'T^'#132'if\___XXXQQQJJJCCC===999666333111111/////////......---,,,,,,,,,'
+  +'+++***)))''''''%%%###   '#29#29#28#27#27#23#8'!'#163#0'%'#236#0'$'#224#0'#'
+  +#223#0'#'#222#0'"'#221#0'"'#220#0'!'#219#0'!'#218#0#31#217#0#31#216#0#31#215
+  +#0#30#214#0#30#213#0#29#212#0#29#211#0#28#210#0#28#209#0#27#208#0#26#206#0#26
+  +#206#0#26#205#0#25#203#0#25#203#0#24#202#0#24#201#0#23#199#0#22#198#0#22#198
+  +#0#22#197#0#21#195#0#21#194#0#20#193#0#20#192#0#19#191#0#19#190#0#17#189#0#17
+  +#188#0#17#187#0#16#186#0#16#185#0#15#184#0#15#183#0#14#182#0#14#181#0#13#180
+  +#0#12#178#0#12#178#0#12#176#0#11#175#0#11#174#0#8#179#12#19#140'//,..,)))"""'
+  +#27#27#27#20#20#20#10#10#10#6#6#6#6#6#6#4#4#4#4#4#4#4#4#4#2#2#2#2#2#2#18#18
+  +#18#160#160#161#167#166#167#161#161#161#155#155#155#149#149#149#144#144#145
+  +#140#141#140#137#136#136#131#130#130'~~yxytttooojijccc^^^[Z[UVURRRNNNJJJOPP'
+  ,'RRRPPPMMMJJJHHHEEE<;<---***(((&&&###"""!  '#29#29#29#28#28#28#26#26#26#25#26
+  +#25'############$##'#25#25#25#18#19#19#17#17#18#17#16#18#16#16#16#15#15#16#20
+  +#20#20#21#20#20#20#20#20#19#20#20#19#19#19#19#19#19#19#19#19#19#18#19#19#18
+  +#19#18#18#19#18#18#18#18#18#18#18#18#18#17#17#18#18#17#17#17#17#17#17#18#17
+  +#17#17#17#17#17#17#17#16#17#16#17#16#17#16#17#17#16#16#16#17#16#16#16#17#13
+  +#13#13#12#11#12#12#12#12#12#12#12#12#12#12#20#20#20'%%%))).-.212+++'#8#9#9#8
+  +#8#8#8#8#8#7#8#7#8#8#8#8#7#7#7#8#8#8#7#7#7#7#7#7#7#7#7#7#7#7#7#6#7#6#7#6#7#7
+  +#6#6#6#7#7#7#6#6#6#6#6#6#6#6#6#6#6#6#5#5#6#5#5#5#14#14#13#21#21#21#21#21#21
+  +#21#21#21#21#22#22#22#22#22#22#22#23#22#22#23#23#23#23#23#23#23#24#24#24#24
+  +#24#24#24#24#24#25#25#25#21#21#21#7#7#8#3#3#4#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3
+  +#2#2#2#3#2#3#3#2#3#2#2#2#3#3#2#2#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#1#2#1#2
+  +#1#2#2#1#2#2#1#1#1#1#1#1#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1#1#1#1#0#1
+  +#0#0#1#1#0#1#0#0#0#0#1#0#1#0#0#1#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy00000000000'
+  +'0000000000000000000000000000000000000000000000000000000000666===@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@@@<<<555/////////////////////////////////00055599899999999'
+  +'999999999999999999999999999899899898898898898833311121121121221277799999999'
+  +'999999999999899898898898898888888888888888888888888888888888888788787787787'
+  +'7877877888::9::9:99:99999777766666666666666666666666655////////////000===HH'
+  +'HKKKOOOSSSIII333444666666777888:::;;;===>>>@??BABCDDEFFHGHJIIKLKNOOQRQSSSWW'
+  +'WYYY\\\___cbbfefjjimmmqqqtttxxx|||'#128#128#128#133#133#133#137#137#137#142
+  +#142#142#147#147#147#151#152#152#156#156#156#161#161#161#166#166#166#171#171
+  +#171#176#176#176#141#141#141':::<<<>>>BBBEEEFFFHHHIIIIIIJJJIIIHHHGGGGGGGGGFF'
+  +'FEEEDDDCCCAAA???===:::77766653)-5T'#20'@'#226#12'A'#255#14'@'#255#14'@'#255
+  +#13'?'#255#12'>'#255#11'>'#255#10'='#255#9'<'#255#9';'#255#8';'#255#7':'#255
+  +#6'9'#255#6'9'#255#4'8'#255#0'5'#255#9'9'#244'LY'#141'fcX[[[TTTMMMFFF@@@;;;7'
+  +'77444333111000000//////......---,,,,,,,,,+++)))(((%%%###   '#29#29#29#28#26
+  +#14#14#31'x'#0'%'#238#0'$'#225#0'$'#225#0'#'#223#0'#'#222#0'"'#221#0'"'#220#0
+  +'!'#219#0'!'#218#0#31#217#0#31#216#0#31#215#0#30#214#0#30#213#0#29#212#0#29
+  +#211#0#28#210#0#28#209#0#27#208#0#26#206#0#26#206#0#26#205#0#25#203#0#25#203
+  +#0#24#202#0#24#201#0#23#199#0#22#198#0#22#198#0#22#197#0#21#195#0#21#194#0#20
+  +#193#0#20#192#0#19#191#0#19#190#0#17#189#0#17#188#0#17#187#0#16#186#0#16#185
+  +#0#15#184#0#15#183#0#14#182#0#14#181#0#13#180#0#12#178#0#12#178#0#12#176#0#11
+  +#175#0#10#176#1#10#173'"%H..''))*$$$'#29#29#29#23#23#23#14#14#14#7#7#7#6#6#6
+  +#5#5#5#4#4#4#4#4#4#4#4#4#2#2#2#2#2#2'uvu'#168#168#168#163#163#163#157#156#157
+  +#153#153#153#149#148#148#144#143#143#138#138#138#133#132#133#128'{{{uuupqq'
+  +'lllfff```[[[WXWSSSOOOKKKIIINMNPPPMMMLLLHHHFFFBBB989,,-)))&&&$$$"##!! '#30#30
+  +#31#30#30#30#30#30#30'"""$$$%%%$$$$$$#""'#19#19#20#18#18#19#17#17#18#17#17#18
+  +#16#16#17#17#18#18#21#20#20#21#20#20#20#20#20#20#20#20#20#20#19#19#19#20#19
+  +#19#19#19#19#19#19#19#19#19#19#19#18#19#19#18#18#18#18#18#18#18#18#18#17#18
+  +#18#18#18#18#18#17#18#17#17#17#17#17#17#17#17#17#17#17#17#16#17#17#16#16#17
+  +#17#17#17#16#17#16#14#14#14#12#12#12#12#12#12#12#11#11#12#12#13#18#17#18'###'
+  +'(((-,-000334'#9#8#9#8#9#9#8#8#9#8#8#8#8#8#8#8#8#8#8#7#7#7#8#7#7#8#7#7#7#7#7
+  +#7#7#7#7#7#7#6#7#6#6#7#7#6#6#6#7#7#6#6#6#6#6#6#6#6#6#6#6#6#10#9#10#19#18#18
+  +#22#22#21#21#22#21#21#21#21#22#22#22#23#23#23#22#23#23#24#24#24#23#23#23#20
+  +#21#21#24#24#24#24#24#24#24#25#24#24#24#24#25#25#25#24#25#25#23#24#24#11#12
+  +#12#3#3#4#3#3#3#4#3#3#3#3#3#3#3#3#3#3#3#2#3#3#3#2#3#3#2#3#3#2#3#2#3#2#2#2#2#2
+  +#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2#1#1#2#1#1#1#1#2#1#1#2#2#1#1#1#1#1#1#1#1#2
+  +#1#1#1#1#1#1#0#1#1#0#1#0#0#0#0#0#1#1#0#1#0#1#1#0#0#0#0#0#0#0#1#1#0#0#1#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0'000yyy00000000000000000000000000000000000000000000000000000'
+  +'0000000000000000000000444;;;@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@>>>667000////////'
+  +'////////////////////////066699999999999999999999999999999999999899898898898'
+  +'898833311111121121121277799999999999999999999999899898898898898888888888888'
+  +'8888888888888888888888887887877877877877888:::::9::9:99:9988876666666666666'
+  +'6666666666666000/////////000888FFFJJJMMMRRRSSS333444666666777999:::;;;===>>'
+  +'>@@@BBADDCGFGGGHJKJMMMOOOSRRTTTWWWZZZ]]]```dddffgjiimmnrrquvuyyz}}}'#130#130
+  +#130#134#134#134#139#139#139#143#143#143#148#148#148#153#153#153#158#158#158
+  +#162#163#162#169#168#168#173#173#173#178#178#178'hhh<<<>>>AAADDDFFFHHHIIIIII'
+  +'JJJJJJJJJIIIHHHGGGGGGGGGFFFDDDCCCAAA>>>;;;77755542-/2?'#23'@'#219#15'C'#255
+  +#16'A'#255#15'@'#255#14'@'#255#14'@'#255#13'?'#255#12'>'#255#11'>'#255#10'='
+  +#255#9'<'#255#9';'#255#8';'#255#7':'#255#6'9'#255#6'9'#255#5'8'#255#0'5'#255
+  +#10':'#243'RZz_]VVVVPPPIIIBBB<<<888555444222111000000//////......---,,,,,,++'
+  +'+)))(((%%%###!!!'#30#30#30#28#26#17#17#28'T'#0'%'#229#0'$'#228#0'$'#226#0'$'
+  ,#225#0'#'#223#0'#'#222#0'"'#221#0'"'#220#0'!'#219#0'!'#218#0#31#217#0#31#216
+  +#0#31#215#0#30#214#0#30#213#0#29#212#0#29#211#0#28#210#0#28#209#0#27#208#0#26
+  +#206#0#26#206#0#26#205#0#25#203#0#25#203#0#24#202#0#24#201#0#23#199#0#22#198
+  +#0#22#198#0#22#197#0#21#195#0#21#194#0#20#193#0#20#192#0#19#191#0#19#190#0#17
+  +#189#0#17#188#0#17#187#0#16#186#0#16#185#0#15#184#0#15#183#0#14#182#0#14#181
+  +#0#13#180#0#12#178#0#12#178#0#12#176#0#11#175#0#8#182#17#23'x,,$)))&&&   '#25
+  +#25#25#17#17#17#9#9#9#7#7#7#6#6#6#4#4#4#4#4#4#4#4#4#3#3#3#3#3#3'BBB'#170#170
+  +#170#166#166#166#162#161#162#156#155#155#151#150#150#145#145#145#140#140#139
+  +#135#134#134#129#129#129'}}|wwwrrqnnniiiddd\\\XXXTTTPPPLMLIIIFFFIIIMMMLLLIII'
+  +'FFFBBB>>>:9:++*&&&''''(((()**)*)*)))))''''''''''''&&&%%%$$$'#29#29#29#20#20
+  +#20#18#19#19#17#18#18#17#17#18#17#17#18#20#20#20#22#20#20#21#20#20#21#20#20
+  +#20#20#19#20#20#20#19#19#20#19#19#19#19#19#19#19#19#19#19#19#19#19#18#19#18
+  +#19#18#18#18#18#18#18#18#18#18#18#17#18#18#18#17#18#17#17#17#17#18#17#17#17
+  +#18#17#17#17#17#17#17#17#17#16#17#16#16#16#16#17#15#15#14#12#13#12#12#12#12
+  +#12#11#12#12#11#11#15#14#14'"""''''''***../221'#17#16#17#9#9#9#8#8#8#8#8#8#8
+  +#8#8#8#8#7#7#8#7#8#8#8#8#8#8#7#7#7#7#7#8#7#7#7#7#7#7#7#7#7#7#6#7#7#7#6#6#7#7
+  +#7#6#7#7#7#8#15#15#15#21#21#21#21#22#22#21#21#22#23#23#22#22#23#22#23#24#23
+  +#24#24#23#24#24#24#18#18#18#8#8#8#7#8#8#19#18#18#24#24#25#24#24#24#25#26#26
+  +#25#25#25#24#25#25#25#25#25#26#26#26#16#15#16#3#3#4#4#3#3#3#4#4#3#3#3#3#3#3#2
+  +#3#3#3#2#3#2#3#3#2#3#2#3#3#3#2#2#2#2#3#2#2#2#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2
+  +#2#2#2#2#1#1#2#2#1#1#2#1#1#1#1#2#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1#1#0#0#1
+  +#1#1#0#1#0#0#1#0#0#1#1#0#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy00000000000000000'
+  +'0000000000000000000000000000000000000000000000000000000000000000222:::???@@'
+  +'@@@@@@@@@@@@@@@@@@@@@@@@@???999111///////////////////////////44499999999999'
+  +'999999999999999999999999899899898898898833311111111121121166699999999999999'
+  +'999999999999899898898898898888888888888888888888888888888888888788787787787'
+  +'7877::::::::9::9:99988766666666666666666666666666222/////////000222DDDHHHKK'
+  +'KOOOSSS???555666666888999:::;;;===???AAABBBDDCGGGIIIJKJNNMPPPRSRUTTWWW[[[^^'
+  +'^aaadddhhhlkkonnssrvwwzzz~~'#131#130#130#135#135#135#139#139#139#144#144
+  +#144#149#149#149#154#154#153#158#158#158#164#164#164#169#169#169#175#175#175
+  +#173#173#173'GGG===AAADDDFFFGGGIIIJJJKKKJJJJJJJJJJJJIIIHHHGGGGGGFFFDDDBBB???'
+  +'===9996662210/)'#28'='#180#16'E'#255#18'C'#255#16'B'#255#16'A'#255#15'@'#255
+  +#14'@'#255#14'@'#255#13'?'#255#12'>'#255#11'>'#255#10'='#255#9'<'#255#9';'
+  +#255#8';'#255#7':'#255#6'9'#255#6'9'#255#5'8'#255#0'5'#255#24'?'#219'YZ\WVTP'
+  +'PPJJJCCC>>>:::666444333222000000000//////......---,,,,,,***(((&&&###!!!'#30
+  +#30#30#27#26#22#21#26'2'#1'%'#221#0'%'#231#0'$'#226#0'$'#226#0'$'#225#0'#'
+  +#223#0'#'#222#0'"'#221#0'"'#220#0'!'#219#0'!'#218#0#31#217#0#31#216#0#31#215
+  +#0#30#214#0#30#213#0#29#212#0#29#211#0#28#210#0#28#209#0#27#208#0#26#206#0#26
+  +#206#0#26#205#0#25#203#0#25#203#0#24#202#0#24#201#0#23#199#0#22#198#0#22#198
+  +#0#22#197#0#21#195#0#21#194#0#20#193#0#20#192#0#19#191#0#19#190#0#17#189#0#17
+  +#188#0#17#187#0#16#186#0#16#185#0#15#184#0#15#183#0#14#182#0#14#181#0#13#180
+  +#0#12#178#0#12#178#0#12#176#0#10#179#3#13#162'$%1))%&&&"""'#27#27#27#20#20#20
+  +#11#11#11#8#8#8#7#7#7#5#5#5#4#4#4#4#4#4#3#3#3#3#3#3#22#22#22#166#166#166#169
+  +#169#168#163#163#162#158#158#157#151#151#151#146#146#146#141#141#141#135#135
+  +#135#130#130#130'~}}xxxtttooojkjfff```ZZZUTURQRMNMJJJFFFCCCEDEKKKHHHFFFCCC??'
+  +'?===667555343111///++,+,+))))))(''((''''&&&%%%'#23#23#24#20#20#20#19#18#19
+  +#17#18#18#17#17#18#18#18#18#21#21#21#21#20#20#21#20#21#21#20#20#20#20#20#20
+  +#19#20#19#19#20#19#19#19#19#19#19#19#19#19#19#19#18#18#18#19#19#19#19#19#18
+  +#18#18#18#18#18#18#18#18#18#18#18#18#18#18#17#17#18#17#17#17#17#18#17#17#17
+  +#17#17#17#17#17#17#16#17#16#16#17#16#15#15#16#12#12#12#12#12#12#12#12#12#12
+  +#11#12#14#13#13#30#29#30'%%&(((,,,/./'#23#23#22#8#8#9#8#8#9#8#9#8#8#8#8#8#8#8
+  +#8#8#8#8#8#7#8#8#8#8#7#7#7#7#7#7#7#8#7#7#7#7#7#7#7#7#6#6#7#7#7#7#6#11#11#11
+  +#20#20#20#22#22#22#22#22#22#22#22#22#23#23#23#24#24#24#24#24#23#24#24#24#22
+  +#21#21#12#11#12#7#7#7#7#6#7#7#7#7#7#6#7#14#14#14#24#24#23#25#25#25#26#25#25
+  +#25#25#25#25#25#25#26#25#26#27#26#26#21#21#21#5#5#6#3#4#3#3#4#3#3#3#3#3#3#3#3
+  +#3#3#3#3#3#3#3#2#3#3#2#3#3#2#2#2#2#3#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2
+  +#2#1#1#2#1#2#1#1#2#1#1#1#1#2#1#1#1#1#1#1#1#1#1#1#0#1#1#1#1#1#1#1#1#1#0#0#0#1
+  +#1#1#1#0#0#1#0#0#0#1#1#0#1#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy00000000000000000000000'
+  +'0000000000000000000000000000000000000000000000000000000000000000111888>>>@@'
+  +'@@@@@@@@@@@@@@@@@@@@@@@@@@@@;;;333/////////////////////22299999999999999999'
+  +'999999999999999999899899898898898855511111111111121155599999999999999999999'
+  +'9999999998998988988988988888888888888888888888888888888888887887877877877:9'
+  ,'9::::::::9::9999766766666666666666666666666444////////////111>>>FFFIIINNNQQ'
+  +'QOOO555666666888999:::<<<>>>???AAABBBEEEGGGIHIJKKNNMOOPSSSUUVXXX[[[___bbbee'
+  +'ehhhlllppptssxxx{{|'#133#133#133#137#137#137#141#141#141#146#146#145#151
+  +#151#151#156#156#156#161#161#161#166#166#166#171#171#171#176#177#176#149#149
+  +#149'===???CCCEEEHHHIIIJJJKKKLLLLLLJJJJJJJJJJJJIIIHHHGGGFFFEEEBBB???<<<88844'
+  +'41/&''4f'#19'E'#255#19'E'#255#18'D'#255#17'C'#255#16'B'#255#16'A'#255#15'@'
+  +#255#14'@'#255#14'@'#255#13'?'#255#12'>'#255#11'>'#255#10'='#255#9'<'#255#9
+  +';'#255#8';'#255#7':'#255#6'9'#255#6'9'#255#5'7'#255#0'5'#255'7K'#151'XUJNON'
+  +'JJJCCC???;;;777555333222222000000000//////......---,,,+++)))''''''%%%"""'#31
+  +#31#31#28#27#25#25#26'!'#3'$'#203#0'&'#234#0'%'#227#0'$'#226#0'$'#226#0'$'
+  +#225#0'#'#223#0'#'#222#0'"'#221#0'"'#220#0'!'#219#0'!'#218#0#31#217#0#31#216
+  +#0#31#215#0#30#214#0#30#213#0#29#212#0#29#211#0#28#210#0#28#209#0#27#208#0#26
+  +#206#0#26#206#0#26#205#0#25#203#0#25#203#0#24#202#0#24#201#0#23#199#0#22#198
+  +#0#22#198#0#22#197#0#21#195#0#21#194#0#20#193#0#20#192#0#19#191#0#19#190#0#17
+  +#189#0#17#188#0#17#187#0#16#186#0#16#185#0#15#184#0#15#183#0#14#182#0#14#181
+  +#0#13#180#0#12#178#0#12#178#0#11#177#0#10#181#23#27'W)('#31'&&&"""'#29#29#29
+  +#22#22#22#14#14#14#8#8#8#7#7#7#6#6#6#6#6#6#5#5#5#3#3#3#3#3#3#3#3#3#130#130
+  +#130#171#171#170#164#164#164#160#159#159#154#154#154#148#148#148#143#142#142
+  +#137#137#137#132#131#132#128''#128'zzztttppplmmgggcdc^^^VVVRRRONNJJJGGGCCC@'
+  +'@@CCCHHHEEECCC???===:::777444222000...,--+*****)))''(((''''   '#21#21#21#20
+  +#20#20#19#19#19#17#17#18#17#17#18#20#20#20#22#21#20#22#20#21#21#20#20#21#20
+  +#20#20#20#20#20#20#20#20#20#20#19#20#19#19#19#20#20#19#19#19#19#19#19#19#19
+  +#18#19#18#19#19#18#19#18#19#18#18#18#18#18#18#18#18#18#17#18#18#17#18#18#18
+  +#17#17#18#18#17#17#17#17#17#17#17#17#17#17#17#17#17#17#17#17#13#12#12#12#12
+  +#13#13#13#12#12#12#11#13#13#12#24#24#25'#"#&&''())***'#26#26#26#8#9#8#9#9#9#8
+  +#8#8#8#8#9#8#8#9#8#8#9#8#7#7#7#8#8#7#8#8#8#8#8#8#8#8#7#7#7#7#7#7#7#7#7#9#9#9
+  +#17#17#17#22#22#22#22#22#22#22#22#22#23#23#23#23#23#23#24#24#24#23#24#24#25
+  +#24#25#16#17#16#8#9#9#8#8#7#7#8#7#7#7#7#7#7#7#7#7#7#6#6#7#10#9#10#21#21#21#26
+  +#25#25#26#25#25#25#25#25#26#26#26#27#27#27#27#26#26#22#23#23#7#6#7#3#4#3#3#3
+  +#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#3#3#2#3#2#2#2#2#2#2#2#2#2#2#2#2
+  +#2#2#2#2#2#2#1#2#2#2#2#1#1#2#2#2#2#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1
+  +#1#1#1#1#1#1#1#0#1#0#0#0#0#0#0#1#1#0#0#0#0#1#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy0000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000666===@@@@@@@@@@@@@@@@@@????????????===555///////////////1119999999'
+  +'999999999999999999999999999999989989889889885551111111111111114449999999999'
+  +'999999999999999999999989989889889889888888888888888888888888888888888888878'
+  +'87877877999:::::::::::9::9777766666666666666666666666666000/////////111555E'
+  +'EEHHHLLLOOOQQQ@@@666666888::::::<<<>>>???BBBCCCEEEGGGJJJLLLONOPQQTSSVWVYZY\'
+  +'[\___cccfffjjjmmmqqquuuyyx}}}'#129#129#129#133#133#133#138#138#138#142#142
+  +#142#147#147#147#152#152#152#156#156#156#162#162#162#167#167#167#172#172#173
+  +#178#178#178'yyy>>>AAADDDGGGIIIKKKKKKLLLLLLLLLLLLJJJJJJJJJJJJIIIGGGFFFDDDBBB'
+  +'>>>:::777221/.('#28'>'#189#19'G'#255#20'E'#255#19'E'#255#18'D'#255#17'C'#255
+  +#16'B'#255#16'A'#255#15'@'#255#14'@'#255#14'@'#255#13'?'#255#12'>'#255#11'>'
+  +#255#10'='#255#9'<'#255#9';'#255#8';'#255#7':'#255#6'9'#255#6'9'#255#2'6'#255
+  +#18'<'#224'NORMLJHHHCCC???;;;888555444222222222000000000//////......,,,,,,**'
+  +'*(((&&&###   '#29#29#27#27#26#28#6'#'#184#0''''#239#0'&'#228#0'%'#227#0'$'
+  +#226#0'$'#226#0'$'#225#0'#'#223#0'#'#222#0'"'#221#0'"'#220#0'!'#219#0'!'#218
+  +#0#31#217#0#31#216#0#31#215#0#30#214#0#30#213#0#29#212#0#29#211#0#28#210#0#28
+  +#209#0#27#208#0#26#206#0#26#206#0#26#205#0#25#203#0#25#203#0#24#202#0#24#201
+  +#0#23#199#0#22#198#0#22#198#0#22#197#0#21#195#0#21#194#0#20#193#0#20#192#0#19
+  +#193#0#19#192#0#18#191#0#17#189#0#17#188#0#16#186#0#16#185#0#15#184#0#15#183
+  +#0#14#182#0#14#181#0#13#180#0#12#178#0#12#177#0#10#184#11#18#128'%%'#31'%%$#'
+  +'##'#30#30#30#24#24#24#17#17#17#9#9#9#8#8#8#7#7#7#6#6#6#6#6#6#4#4#4#3#3#3#3#3
+  +#3'XXX'#173#172#172#167#166#166#161#160#160#155#155#154#149#148#148#144#143
+  +#143#138#138#138#133#133#132#128#128#128'{{{vvvrrrmmmihhdde```[[[SSSPOPLLLHH'
+  +'GDDD@@@???A@AFFFCCCAAA===;;;888777333111000-.-,,-+++***))((('''#28#27#27#21
+  +#21#21#20#20#20#19#19#19#18#18#18#17#18#18#22#23#23#22#21#21#22#21#21#22#21
+  +#21#21#20#20#21#20#20#20#20#20#20#20#20#20#20#20#20#19#20#19#20#19#20#19#19
+  +#19#19#19#19#19#19#19#19#18#18#19#19#18#18#19#18#18#18#18#18#18#18#18#17#18
+  +#17#18#18#18#17#17#17#18#18#17#18#17#17#17#17#17#17#16#17#17#17#17#17#14#13
+  +#13#12#12#12#12#12#12#12#12#12#12#13#13#20#21#21'"!"$#$&&%&''&!!!'#11#10#10#8
+  +#8#9#9#9#9#9#8#9#8#8#8#8#8#8#8#8#8#8#7#7#8#7#7#8#8#7#8#8#8#8#7#8#7#7#7#14#14
+  +#14#20#20#20#22#22#22#22#22#22#23#23#23#23#23#23#24#24#24#24#24#24#25#25#25
+  ,#20#20#20#11#11#11#8#8#8#7#7#8#8#7#8#7#8#8#7#8#8#7#7#7#7#7#7#7#7#7#6#7#7#8#7
+  +#8#18#18#18#25#25#25#25#25#25#25#25#25#26#26#26#26#26#26#27#28#28#25#25#26#8
+  +#8#9#3#3#3#3#3#4#3#3#4#3#4#3#3#3#2#2#3#3#2#2#2#2#3#3#3#2#2#3#3#2#2#2#2#2#2#2
+  +#2#2#2#2#2#2#2#2#2#2#2#1#2#2#2#2#1#2#2#2#1#2#1#2#1#2#1#1#1#2#1#1#1#1#1#1#1#1
+  +#1#1#1#1#1#1#1#1#1#1#1#1#0#0#1#1#0#0#0#1#0#1#1#0#0#0#0#0#1#1#0#0#0#0#0#0#1#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy00000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0000000000000000000000444;;;@@@@@@????????????????????????878////////////00'
+  +'099999999999999999999999999999999999999899899898898877611111111111111133399'
+  +'999999999999999999999999999999999899898898898898888888888888888888888888888'
+  +'8888888887887877988::::::::::::::9888766666666666666666666666666222////////'
+  +'/111111@@@FFFIIIMMMPPPMMM666777888::::::===>>>???BBBDDDFFFHHHJKKMMMOOORRRUU'
+  +'TWWWYZY]]]`a`cccgggjjjnnnrrrvvvyzy~~~'#130#130#130#134#134#134#139#140#139
+  +#143#143#143#148#148#148#153#153#153#158#158#158#163#164#164#169#168#169#173
+  +#173#173#179#179#179'\\]AAADDDFFFHHHKKKLLLMMMLLLLLLLLLLLLLLLJJJJJJJJJJJJHHHG'
+  +'GGDDDAAA>>>99955510+*0G'#22'F'#246#20'G'#255#21'F'#255#20'F'#255#19'E'#255
+  +#18'D'#255#17'C'#255#16'B'#255#16'A'#255#15'@'#255#14'@'#255#14'@'#255#13'?'
+  +#255#12'>'#255#11'>'#255#10'='#255#9'<'#255#9';'#255#8';'#255#7':'#255#6'9'
+  +#255#5'8'#255#4'7'#255'7EyJH?EEEBBB>>>;;;888666555333222222222000000000/////'
+  +'/......,,,***)))&&&$$$!!!'#31#30#30#29#27#22#10'"'#152#0'('#247#0''''#238#0
+  +'&'#230#0'%'#227#0'$'#226#0'$'#226#0'$'#225#0'#'#223#0'#'#222#0'"'#221#0'"'
+  +#220#0'!'#219#0'!'#218#0#31#217#0#31#216#0#31#215#0#30#214#0#30#213#0#29#212
+  +#0#29#211#0#28#210#0#28#209#0#27#208#0#26#206#0#26#206#0#26#205#0#25#203#0#25
+  +#203#0#24#202#0#24#201#0#23#199#0#22#198#0#22#198#0#22#197#0#21#195#0#21#194
+  +#0#20#195#0#20#194#0#19#192#0#19#191#0#18#192#0#17#195#0#17#199#0#16#195#0#16
+  +#191#0#15#185#0#15#183#0#14#182#0#14#181#0#13#180#0#12#178#0#12#180#2#12#166
+  +#30#31'.$$!###'#31#31#31#25#25#25#19#19#19#12#12#12#8#8#8#7#7#7#7#7#7#6#6#6#5
+  +#5#5#3#3#3#3#3#3'...'#173#172#172#167#167#167#162#162#161#157#156#157#151#150
+  +#151#145#145#145#140#140#140#135#134#134#131#130#130'}|}xwxsssnnnjjjffeaaa\\'
+  +'\XXXPPPMMMIIIDDDAAA???;;;<<<CBBBBB>>><<<:::788444111222///(()$$%!!"'#29#28
+  +#29#24#23#24#23#23#23#21#22#21#20#21#20#19#19#19#18#17#18#20#20#19#23#23#22
+  +#22#21#21#22#21#21#22#21#20#21#21#21#21#21#20#21#20#20#20#20#20#19#20#20#20
+  +#19#20#20#19#19#19#19#19#19#19#19#19#19#19#19#18#19#19#19#18#19#18#18#19#18
+  +#19#18#19#18#18#18#18#18#18#18#18#18#17#18#18#18#17#17#18#18#17#17#17#17#17
+  +#17#17#17#17#17#17#14#15#14#13#12#13#13#12#12#13#12#13#13#13#13#16#17#16'  !'
+  +'!  !""#""""!   '#21#21#20#14#14#13#9#9#8#9#8#8#9#8#8#8#8#8#8#8#8#8#8#8#8#8#8
+  +#8#8#7#11#11#12#18#18#18#22#22#22#22#22#22#22#22#22#23#23#23#23#23#23#24#24
+  +#24#24#24#24#23#23#23#16#16#16#8#8#8#8#8#8#8#8#8#7#8#8#7#8#7#7#8#8#7#7#7#7#8
+  +#7#7#7#7#7#7#7#7#7#7#6#6#7#7#7#6#15#15#16#25#25#25#25#25#25#26#26#26#27#27#27
+  +#28#28#28#28#27#28#27#26#26#12#12#11#4#4#3#3#3#4#3#4#3#3#3#3#2#3#3#2#3#3#3#3
+  +#2#3#3#2#3#3#3#2#2#2#3#3#2#3#3#2#3#2#2#2#2#2#2#2#2#2#1#2#1#1#2#1#2#2#2#1#1#2
+  +#1#2#1#1#1#1#1#2#1#1#1#1#1#1#1#1#1#1#0#1#1#1#1#0#1#1#1#1#0#0#0#1#0#1#1#0#1#0
+  +#0#0#1#0#0#0#1#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0'000yyy0000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000000000000222999>>>>>>>>>>>>>>>>'
+  +'>>>>>???;;;///////////////9999999999999999999999999999999999999989989989889'
+  +'88887111111111111111111:999999999999999999999999999999999999989989889889889'
+  +'88888888888888888888888888888888888887887888:::::::::::::::9997667666666666'
+  +'66666666666666555/////////000111666EEEGGGKKKNNNPPPCCC777888:::;;;===>>>@@@B'
+  +'BBDDDGGGHHHKKKMMMPOPRSSUTUWWW[ZZ^_^aa`eddhhhkkkooorssvww{{{'#130#130#130
+  +#135#135#136#140#140#139#144#144#144#149#149#150#154#154#154#159#159#159#164
+  +#165#165#170#170#170#176#176#176#169#169#169'GGGCCCEEEGGGJJJKKKMMMNNNNNNNNNL'
+  +'LLLLLLLLLLLJJJJJJJJJIIIGGGDDD@@@===9993330-#$6w'#22'I'#255#22'G'#255#21'G'
+  +#255#21'F'#255#20'F'#255#19'E'#255#18'D'#255#17'C'#255#16'B'#255#16'A'#255#15
+  +'@'#255#14'@'#255#14'@'#255#13'?'#255#12'>'#255#11'>'#255#10'='#255#9'<'#255
+  +#9';'#255#8';'#255#7':'#255#6'9'#255#2'8'#255'#<'#160'EB6@@@>>>===:::8886665'
+  +'55444333333222222000000000//////...---,,,***(((%%%###!!!'#31#30#28#26#28'%'
+  +#16#31'f'#6'#'#185#0'&'#234#0''''#240#0'%'#230#0'$'#226#0'$'#226#0'$'#225#0
+  +'#'#223#0'#'#222#0'"'#221#0'"'#220#0'!'#219#0'!'#218#0#31#217#0#31#216#0#31
+  +#215#0#30#214#0#30#213#0#29#212#0#29#211#0#28#210#0#28#209#0#27#208#0#26#206
+  +#0#26#206#0#26#205#0#25#203#0#25#203#0#24#202#0#24#201#0#23#199#0#22#198#0#22
+  +#198#0#22#197#0#21#198#1#20#180#8#14'G'#9#14'<'#9#14'='#8#14'E'#7#14'Q'#5#14
+  +'e'#4#14'y'#2#15#147#0#16#181#0#15#185#0#15#183#0#14#182#0#14#181#0#13#180#0
+  +#12#179#0#11#183#19#23'T#"'#25'"""'#31#31#31#26#26#26#21#21#21#14#14#14#9#9#9
+  ,#8#8#8#7#7#7#7#7#7#5#5#5#4#4#4#3#3#3#14#13#13#159#159#159#170#170#170#164#163
+  +#164#158#158#158#152#151#151#146#146#146#141#141#141#136#135#135#131#130#130
+  +'~~}yyxtttoookkkfffabb^]]YYZUUUNNNJJJFEFBAB???<<<999888@AA???===:::6660/0***'
+  +'%%&   '#30#29#30#28#27#28#26#27#27#24#24#24#24#24#24#23#23#23#22#22#21#20#20
+  +#20#19#19#20#18#18#18#22#22#22#23#22#23#22#22#21#22#21#21#22#21#21#22#21#21
+  +#21#20#21#20#20#20#20#21#20#20#20#20#19#20#19#20#19#20#19#20#19#20#20#19#20
+  +#19#19#19#19#19#19#18#19#19#18#18#19#19#19#19#18#18#19#18#18#18#18#18#18#18
+  +#17#18#18#18#17#18#17#17#18#17#18#17#18#17#17#17#17#17#17#15#14#15#12#12#13
+  +#13#13#13#12#12#12#12#12#12#13#13#13#31#31#31#31'  ! !!  '#31' '#31#29#30#30
+  +#28#29#28#27#27#27#23#24#23#16#16#15#9#9#8#8#9#9#8#8#8#8#8#8#9#9#9#15#16#15
+  +#22#22#22#22#23#23#22#23#22#24#24#23#23#23#23#24#24#24#24#24#24#25#25#25#20
+  +#20#20#9#10#10#8#8#8#8#9#8#8#8#7#7#8#8#8#8#8#8#8#8#7#8#8#8#7#8#7#7#7#7#7#8#7
+  +#7#7#6#7#7#7#7#7#6#7#7#6#6#7#13#12#13#24#25#24#25#25#25#26#26#26#27#27#27#27
+  +#27#27#28#27#28#28#29#29#12#12#13#3#4#3#4#4#3#3#3#3#3#3#3#3#2#3#2#3#3#2#3#3#3
+  +#3#3#3#2#3#3#2#2#2#2#2#2#2#3#2#2#2#2#2#2#1#2#2#1#2#2#2#1#2#1#2#1#2#2#2#1#1#2
+  +#1#1#2#1#1#1#2#1#1#1#1#1#1#1#1#1#1#0#1#1#1#1#1#0#1#1#1#1#1#1#0#1#0#1#0#0#1#0
+  +#0#0#0#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0'000yyy00000000000000000000000000000000000000000000000000000000000000000'
+  +'0000000000000000000000000000000000000000000000000111666;;;<<<<<<======>>><<'
+  +'<///////////////87799999999999999999999999999999999999999899898898898811111'
+  +'1111111111111888:9999999999999999999999999999999999999899898898898898888888'
+  +'8888888888888888888888888888887887::::::::::::::::::77776666666666666666666'
+  +'6666666101//////000111222???GGGIIILLLOOOPPP<<<888:::;;;===>>>@@@BBBDDDGGGII'
+  +'IKKKMNNPPPRSSVUVXXX[[[_^_abafeeihhlllppptttxxx|||'#128#128''#133#132#133
+  +#137#137#137#141#142#142#146#146#146#151#151#151#156#156#156#160#160#160#166
+  +#166#166#171#171#171#177#177#177#149#149#149'AAADDDGGGJJJKKKMMMMMMNNNOOONNNN'
+  +'NNLLLLLLLLLLLLKKKJJJIIIGGGDDDAAA<<<7773330,!!<'#156#22'K'#255#23'H'#255#22
+  +'H'#255#21'G'#255#21'F'#255#20'F'#255#19'E'#255#18'D'#255#17'C'#255#16'B'#255
+  +#16'A'#255#15'@'#255#14'@'#255#14'@'#255#13'?'#255#12'>'#255#11'>'#255#10'='
+  +#255#9'<'#255#9';'#255#8';'#255#7':'#255#3'9'#255#23'8'#190';95;;:;;;:::9998'
+  +'88666666555333333333222222000000000//////...---+++)))''''''%%%"""   '#30#29
+  +#27#29#27#15#26#26#25#18#29'P'#8'"'#163#0'&'#226#0'&'#239#0'$'#230#0'$'#226#0
+  +'$'#224#0'#'#223#0'#'#222#0'"'#221#0'"'#220#0'!'#219#0'!'#218#0#31#217#0#31
+  +#216#0#31#215#0#30#214#0#30#213#0#29#212#0#29#211#0#28#210#0#28#209#0#27#208
+  +#0#26#206#0#26#206#0#26#205#0#25#203#0#25#203#0#24#202#0#24#201#0#23#199#0#22
+  +#198#0#22#197#0#22#207#5#18'x'#14#12#0#13#12#3#12#12#4#13#12#3#12#11#1#12#11
+  +#0#11#10#4#10#10#9#3#14#132#0#16#193#0#15#184#0#15#183#0#14#182#0#14#181#0#13
+  +#180#0#12#188#9#16'x'#30#30#23'  '#31#30#30#30#26#26#26#21#21#21#15#15#15#10
+  +#10#10#9#9#9#7#7#7#7#7#7#6#6#6#5#5#5#5#5#5#4#4#4#129#129#129#171#171#171#165
+  +#164#164#160#159#159#154#153#153#148#148#148#143#143#142#138#137#137#132#132
+  +#132'zzzuttpqplllgggccb___[ZZWWXRRRKKKGGFCCC@@@<<<999777666<==776../(((%&'
+  +'&#$$""#   '#31#31#31#28#27#27#26#27#26#24#24#25#24#24#24#23#23#23#22#21#22
+  +#21#21#21#19#19#19#20#20#20#24#23#23#24#23#23#22#21#21#22#21#21#22#21#21#22
+  +#20#21#21#21#21#21#21#20#20#20#20#20#20#21#20#20#20#20#20#20#20#19#20#19#19
+  +#19#19#20#19#19#19#19#19#19#19#19#19#19#19#18#18#18#19#18#18#18#18#18#18#18
+  +#18#18#18#18#18#18#18#18#17#18#18#18#17#17#18#17#17#17#17#17#17#16#16#16#13
+  +#12#13#13#13#13#12#13#12#12#12#13#13#13#14#26#26#26#30#30#30#30#29#30#29#30
+  +#29#30#30#29#28#28#28#28#28#28#27#27#27#27#27#27#27#27#26#25#24#25#17#17#17#9
+  +#9#9#13#13#13#22#22#22#23#23#23#23#23#22#23#23#23#23#23#23#24#24#24#24#24#24
+  +#25#25#25#23#23#23#13#13#14#8#9#9#9#9#9#8#8#8#8#8#8#8#8#9#8#8#8#8#8#8#7#8#8#7
+  +#8#8#10#9#10#8#8#8#7#7#7#7#7#7#7#7#7#7#7#7#6#6#7#6#7#6#7#6#7#11#10#11#22#22
+  +#23#25#26#25#26#26#26#28#28#28#28#28#28#29#29#29#29#28#28#13#13#13#3#3#4#3#4
+  +#3#3#3#3#3#3#3#3#3#3#3#2#3#3#3#2#3#3#2#2#2#3#3#2#3#2#3#3#2#2#2#2#2#2#2#2#2#2
+  +#2#2#1#2#2#1#1#2#2#2#2#1#1#2#1#2#1#1#1#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1
+  +#1#0#0#1#1#1#1#1#0#1#0#0#0#1#1#0#0#0#0#1#0#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy0000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000444;;;<<<======>>>///////////////7779999999999999999999999999999'
+  +'99999999998998998988988322111111111111111777:99:999999999999999999999999999'
+  +'99999999998998988988988988888888888888888888888888888888888887999::::::::::'
+  +':::::888766766666666666666666666666444//////000000222555FFFGGGKKKMMMPPPMMM;'
+  +';;:::;;;===???AAABBBDDDGGGIIIKKKNNNPPPSSSVVUYYY\\[___cbcfefiiilllppptttyyy|'
+  +'}}'#128#128#129#132#133#132#137#137#137#142#142#142#147#147#147#152#152#152
+  +#156#157#157#161#161#161#167#167#167#173#173#173#178#178#178#128#128#128'DDD'
+  ,'FFFIIIKKKMMMNNNOOONNNOOOOOONNNNNNLLLLLLLLLLLLJJJIIIHHHEEEAAA<<<777321.-& >'
+  +#173#23'K'#255#23'I'#255#23'H'#255#22'H'#255#21'G'#255#21'F'#255#20'F'#255#19
+  +'E'#255#18'D'#255#17'C'#255#16'B'#255#16'A'#255#15'@'#255#14'@'#255#14'@'#255
+  +#13'?'#255#12'>'#255#11'>'#255#10'='#255#9'<'#255#9';'#255#8';'#255#5':'#255
+  +#19'8'#200'766775777888777777777666555444333333333222222000000000//////---,,'
+  +',+++)))&&&$$$!!!   '#30#30#31#28#27#25#28#26#16#26#25#18#19#26'='#9#31#142#2
+  +'$'#214#0'%'#238#0'$'#232#0'$'#225#0'#'#223#0'#'#222#0'"'#221#0'"'#220#0'!'
+  +#219#0'!'#218#0#31#217#0#31#216#0#31#215#0#30#213#0#30#215#0#30#220#0#29#213
+  +#0#28#210#0#28#209#0#27#208#0#26#206#0#26#206#0#26#205#0#25#203#0#25#203#0#24
+  +#202#0#24#201#0#23#199#0#22#200#0#22#196#10#15'3'#14#13#6#13#13#13#13#13#13
+  +#12#12#12#12#12#12#12#11#11#11#11#10#11#10#0#5#13'f'#0#17#198#0#16#185#0#15
+  +#184#0#15#183#0#14#182#0#14#181#0#13#184#2#13#156#22#22#28#28#28#25#28#28#28
+  +#25#25#25#22#22#22#16#16#16#10#10#10#9#9#9#8#8#8#7#7#7#6#6#6#6#6#6#5#5#5#4#4
+  +#4'aaa'#173#173#172#167#166#167#161#160#160#155#154#154#149#149#149#144#144
+  +#144#138#138#138#133#133#133#128#128#128'zzzuvuqrrmmmihhddd___[\\WXWSSSPPPHH'
+  +'HDDD@@@===999777444111.--++,*))''''''$%%"##   '#31#31#31#29#29#29#26#27#26
+  +#25#25#25#25#24#24#23#23#23#22#22#22#22#22#22#21#20#20#22#22#22#24#23#22#23
+  +#23#23#23#22#21#23#21#21#22#21#22#22#21#21#21#21#21#21#21#21#20#20#20#20#20
+  +#20#21#20#21#19#20#20#20#20#20#20#20#20#19#20#19#19#19#19#19#19#20#19#19#19
+  +#19#18#18#18#18#19#19#19#18#19#19#18#18#18#18#18#18#18#18#18#18#18#18#18#18
+  +#17#18#18#17#18#17#17#18#17#17#17#13#13#13#12#12#13#12#13#13#13#13#12#12#12
+  +#13#18#18#18#28#28#28#30#29#30#29#29#28#29#29#29#28#29#28#28#28#28#27#27#27
+  +#27#27#27#27#26#27#25#26#26#26#25#26#24#25#24#24#24#25#25#24#25#24#24#24#24
+  +#23#24#23#24#24#24#25#24#24#24#25#25#25#25#18#18#18#10#10#10#9#9#9#8#8#8#9#8
+  +#9#8#8#8#8#8#9#8#8#9#8#8#8#8#8#8#9#9#8#10#10#10#10#10#10#9#9#9#9#9#9#7#7#8#7
+  +#7#7#7#7#7#7#6#7#7#6#7#7#6#7#6#7#7#8#9#9#21#21#21#25#26#25#27#27#27#28#28#28
+  +#28#29#29#29#28#29#30#30#30#13#14#13#3#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#3#2#3
+  +#2#3#3#2#3#2#3#2#2#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2#2#2#1#1#1#2#2#2#2#1#1#2
+  +#1#2#1#1#1#1#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#0#1#1#1#1#0#1#1#1#0#0#1#1#1
+  +#0#0#0#1#1#1#1#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000'
+  +'yyy000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000999:::;;;===>>>000///'
+  +'/////////444999999999999999999999999999999999999999998998988988444111111111'
+  +'111111555:99:99:99999999999999999999999999999999999998998988988988988888888'
+  +'888888888888888888888888888888;::::::::::::::999766766666666666666666666666'
+  +'666101///000000222222=<=FFFHHHKKKMMMOOOIII:::<<<===???AAABBBEEEGGGIIIKKKNNN'
+  +'QQQSSSWWWZZZ\\[_``cccggfjkkmmmqqquvuyyy}}}'#130#130#130#134#134#134#138#138
+  +#138#143#143#143#147#148#147#152#152#153#157#157#157#163#163#163#168#168#168
+  +#173#173#173#178#178#178'lllEEEHHHJJJMMMNNNOOOPPPPPPOOOOOOOOONNNNNNLLLLLLLLL'
+  +'KKKJJJHHHEEEAAA===888321.-& ?'#175#24'L'#255#24'I'#255#23'I'#255#23'H'#255
+  +#22'H'#255#21'G'#255#21'F'#255#20'F'#255#19'E'#255#18'D'#255#17'C'#255#16'B'
+  +#255#16'A'#255#15'@'#255#14'@'#255#14'@'#255#13'?'#255#12'>'#255#11'>'#255#10
+  +'='#255#9'<'#255#9';'#255#6':'#255#20'8'#199'6546646667777777777777776665554'
+  +'44333333333222222000000000///...---,,,***)))''''''$$$"""   '#30#30#30#28#28
+  +#29#27#27#26#26#25#18#25#23#13#20#24','#11#29'v'#3'"'#198#0'%'#232#0'$'#226#0
+  +'#'#223#0'#'#222#0'"'#221#0'"'#220#0'!'#219#0'!'#218#0#31#217#0#31#217#0#31
+  +#226#0#30#210#4#27#167#0#29#210#0#29#215#0#28#210#0#28#209#0#27#208#0#26#206
+  +#0#26#206#0#26#205#0#25#203#0#25#203#0#24#202#0#24#200#0#24#208#3#20#153#14
+  +#14#11#14#14#13#14#14#14#14#14#14#14#14#14#12#12#12#12#12#12#12#12#12#11#10#2
+  +#6#12'I'#0#17#192#0#16#186#0#16#185#0#15#184#0#15#183#0#14#182#0#14#183#0#13
+  +#177#13#15'/'#21#21#15#24#24#24#23#23#23#21#21#21#16#16#16#11#11#11#9#9#9#9#9
+  +#9#8#8#8#7#7#7#6#6#6#6#6#6#4#4#4'AAA'#173#173#172#168#167#167#161#161#161#156
+  +#156#156#150#150#150#145#144#144#139#139#139#134#134#134#129#128#128'}||xxwr'
+  +'rrmmmiijeee```\]]XXXTTUQQQMLLFFFAAA>>>;:;777444111--.,,-)))''''''%%%"""!"!'
+  +#31#31' '#29#29#29#27#28#28#25#25#25#24#24#24#23#23#23#22#22#22#22#22#22#22
+  +#22#22#24#24#25#24#23#23#24#23#23#23#22#21#23#22#21#22#22#22#22#22#21#22#21
+  +#21#21#21#21#21#20#21#21#21#20#20#20#20#20#20#20#20#20#20#20#19#20#20#19#19
+  +#19#20#20#20#19#19#19#19#19#19#19#19#19#19#18#18#19#18#18#18#18#19#18#18#18
+  +#18#18#18#18#18#18#17#18#17#18#17#17#17#17#17#17#17#17#17#18#14#14#14#13#13
+  +#13#12#12#13#13#13#13#13#12#13#12#13#12#12#12#12#16#15#15#22#22#22#28#27#28
+  +#28#28#29#28#29#28#28#28#28#27#27#27#27#27#27#27#27#27#26#26#25#26#25#25#26
+  +#25#25#25#25#25#25#25#25#25#25#25#25#25#25#25#26#26#22#21#22#12#13#13#10#9#9
+  +#9#9#9#9#9#9#9#9#9#9#9#8#9#9#8#9#8#8#8#9#8#9#8#9#10#10#10#10#10#10#10#10#10
+  +#10#10#10#10#9#9#10#9#10#9#9#9#8#7#9#7#7#7#7#7#7#7#7#7#6#6#7#7#6#6#6#6#7#8#9
+  ,#9#20#21#20#26#26#27#27#27#27#28#28#28#29#29#28#30#30#30#30#29#30#13#13#13#3
+  +#4#3#3#3#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#3#3#3#2#3#2#2#2#2#2#3#2#2#2#2#2#2
+  +#2#2#2#2#2#2#1#2#2#2#2#1#2#1#2#2#2#1#2#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1
+  +#1#1#1#1#1#1#1#0#1#1#1#0#0#1#1#0#0#1#1#0#1#1#1#0#0#0#0#0#0#0#0#1#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy00000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0000000000666999:::<<<===222////////////333:9999999999999999999999999999999'
+  +'9999999998998988988555111111111111111333:99:99:99:9999999999999999999999999'
+  +'9999999999998998988988988988888888888888888888888888888888888:::;::::::::::'
+  +'::::777766666666666666666666666666544///000000111222333BBBGGGIIIKKKNNNOOOHH'
+  +'H<<<>>>???BBBCCCEEEGGGJJJLLLOOOQQQTTTWWWYZZ]]]a`acccgggjkjnonqqqvvvzzz~~~'
+  +#130#130#130#135#135#135#139#140#140#144#144#144#149#148#149#154#154#154#159
+  +#159#159#164#164#164#169#169#169#174#174#174#178#178#178'ZZZGGGIIILLLMMMOOOP'
+  +'PPQQQQQQPPPOOOOOOOOONNNNNNLLLLLLLLLKKKHHHEEEBBB>>>888333/,#">'#163#24'M'#255
+  +#25'J'#255#24'I'#255#23'I'#255#23'H'#255#22'H'#255#21'G'#255#21'F'#255#20'F'
+  +#255#19'E'#255#18'D'#255#17'C'#255#16'B'#255#16'A'#255#15'@'#255#14'@'#255#14
+  +'@'#255#13'?'#255#12'>'#255#11'>'#255#10'='#255#9'<'#255#7'<'#255#21'8'#193
+  +'330543666666777777777666666555555444333333333222222000000000///...---,,,***'
+  +')))''''''%%%###!!!'#31#31#31#28#28#28#27#27#27#25#25#25#24#23#18#23#21#9#20
+  +#21#27#12#27'p'#1'$'#225#0'$'#226#0'#'#223#0'#'#222#0'"'#221#0'"'#220#0'!'
+  +#219#0'!'#226#0' '#223#6#28#157#14#21';'#18#18#12#11#22'['#0#29#212#0#29#216
+  +#0#28#210#0#28#209#0#27#208#0#26#206#0#26#206#0#26#205#0#25#203#0#25#203#0#24
+  +#202#0#24#209#10#17'U'#16#14#4#15#15#15#15#15#15#15#15#15#15#15#15#14#14#14
+  +#13#13#13#12#12#12#12#11#6#9#12'+'#0#17#185#0#17#189#0#16#186#0#16#185#0#15
+  +#184#0#15#183#0#14#182#0#13#188#8#13'S'#16#15#5#18#18#18#19#19#19#19#19#19#16
+  +#16#16#12#12#12#10#10#10#9#9#9#9#9#9#8#8#8#6#6#6#6#6#6#5#5#5'$$$'#172#171#171
+  +#168#168#168#163#162#162#157#157#157#152#151#151#147#146#146#140#140#140#135
+  +#134#135#131#130#130'}}}xxxsssnnokjjeeeaaa]]]YYYTUTRRRMMMJJJDDD?>?;::7775552'
+  +'22///,--++*(((%%%###""!'#31#31#31#29#29#29#30#29#30#29#28#29#27#27#28#27#27
+  +#28#27#27#27#28#28#27#27#27#26#25#25#25#24#24#23#24#23#23#23#22#22#23#22#22
+  +#23#22#21#22#21#21#22#21#21#21#21#21#21#21#21#20#20#20#20#20#20#20#20#20#20
+  +#20#20#20#20#20#20#20#20#20#20#19#19#20#20#19#19#19#19#19#20#19#19#19#19#19
+  +#19#19#18#19#18#18#19#18#18#18#18#19#18#18#18#18#18#18#17#18#18#17#17#18#17
+  +#18#17#18#14#14#15#13#13#13#12#13#13#13#13#13#13#12#13#12#12#12#12#13#13#12
+  +#12#13#12#12#12#11#12#12#17#18#18#25#25#25#28#29#28#28#28#28#27#27#27#27#27
+  +#27#27#27#27#26#27#27#25#26#26#26#26#25#26#26#26#26#26#26#25#25#25#18#17#18
+  +#10#9#9#9#9#9#10#10#10#9#9#9#9#9#9#9#9#9#9#9#9#9#9#8#8#8#8#9#9#9#11#11#10#10
+  +#10#10#10#10#10#10#10#10#10#10#10#10#9#10#10#10#10#10#9#10#9#9#9#9#8#8#7#7#7
+  +#7#7#7#6#7#7#7#7#6#6#7#6#6#6#7#7#7#8#18#18#18#26#26#27#27#27#27#28#28#28#29
+  +#28#29#29#30#29#29#30#29#13#14#13#3#3#3#3#3#4#3#3#3#3#3#3#3#3#3#3#3#3#3#2#2#2
+  +#3#3#3#3#2#2#2#2#2#2#2#3#2#2#2#2#2#2#2#2#2#1#1#2#2#1#1#1#2#1#2#2#1#1#2#1#1#1
+  +#1#2#1#1#2#1#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#0#1#1#1#1#1#0#0#1#0#0
+  +#1#0#0#0#0#1#1#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy0000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000444888999;;;===656////////////111:999'
+  +'99999999999999999999999999999999999998998998988776111111111111111111::9:99:'
+  +'99:99:999999999999999999999999999999999999989989889889889888888888888888888'
+  +'88888888888888999;::;:::::::::::9987667666666666666666666666666662220000001'
+  +'11111333555EEEHHHJJJLLLMMMNNNGGG>>>???BBBCCCFFFGGGJJJLLLOOORRRUUUWWW[[[^^^a'
+  +'aadddhhhkkkoopsrswvv{{|'#131#131#131#135#135#135#140#140#140#145#145#145
+  +#149#150#150#154#154#154#159#159#159#165#165#165#170#170#170#176#176#176#171
+  +#171#171'LLLIIIKKKMMMOOOPPPPPPRRRRRRQQQPPPOOOOOOOOONNNNNNMMMLLLKKKIIIFFFBBB>'
+  +'>>:::4441-"%9'#132#26'M'#255#25'K'#255#25'J'#255#24'I'#255#23'I'#255#23'H'
+  +#255#22'H'#255#21'G'#255#21'F'#255#20'F'#255#19'E'#255#18'D'#255#17'C'#255#16
+  +'B'#255#16'A'#255#15'@'#255#14'@'#255#14'@'#255#13'?'#255#12'>'#255#11'>'#255
+  +#10'='#255#7'='#255#26'7'#165'41&4335556667777777776666666665555554443333333'
+  +'33222222000000000///...---,,,+++)))(((%%%$$$"""'#31#31#31#28#28#28#27#27#27
+  +#24#24#24#23#23#22#22#20#11#18#22'.'#1'$'#220#0'$'#228#0'$'#225#0'#'#223#0'#'
+  +#222#0'"'#224#0'"'#231#4#31#183#13#23'P'#20#19#14#20#19#10#19#18#16#19#18#6
+  +#12#21'U'#1#29#211#0#29#217#0#28#210#0#28#209#0#27#208#0#26#206#0#26#206#0#26
+  +#205#0#25#203#0#25#207#2#23#183#15#16#28#16#16#12#16#16#16#17#17#17#17#17#17
+  +#17#17#17#16#16#16#14#14#14#13#13#13#12#12#10#11#12#19#1#17#168#0#17#192#0#17
+  +#187#0#16#186#0#16#185#0#15#184#0#15#183#0#14#192#5#14'r'#14#14#6#14#13#13#14
+  +#14#14#15#15#15#14#14#14#12#12#12#11#11#11#9#9#9#9#9#9#8#8#8#7#7#7#6#6#6#5#5
+  ,#5#13#13#13#160#159#159#170#170#170#164#164#164#158#158#158#152#151#151#147
+  +#146#146#141#141#141#136#136#136#131#131#131'}}}yyytttpppjkjfffbbc^^^ZZZUUVR'
+  +'RRONNKKKGGGAAA<<<889565222///---+**()(%%&%%%$$$%$%###"""   '#30#30#30#29#29
+  +#29#28#28#28#28#28#27#27#27#26#25#25#25#24#23#24#24#23#23#23#22#22#23#22#22
+  +#23#22#22#23#21#21#22#22#22#22#22#21#21#21#20#21#20#21#20#21#20#21#20#21#20
+  +#20#20#20#20#20#20#20#20#20#19#20#20#20#19#20#19#19#19#19#19#19#20#19#19#19
+  +#19#19#19#18#19#19#19#18#18#18#19#18#19#18#19#18#18#18#18#18#18#18#17#18#17
+  +#18#18#17#15#16#16#14#13#14#13#13#13#13#13#13#12#13#12#13#12#13#12#12#12#12
+  +#12#12#12#12#12#12#12#12#12#12#12#11#12#12#15#15#14#23#23#22#28#28#28#27#28
+  +#28#27#27#27#27#27#26#26#26#26#26#27#26#26#26#27#22#21#22#11#12#11#10#9#10#9
+  +#10#10#9#9#10#10#9#10#9#9#10#10#9#9#9#9#9#9#9#9#9#10#10#11#11#11#11#11#11#11
+  +#11#10#11#10#11#10#10#10#10#10#10#10#10#10#10#10#10#10#10#10#10#10#9#10#9#10
+  +#9#9#9#8#8#8#7#7#7#7#7#7#7#7#7#7#7#7#6#7#6#7#6#6#8#7#8#18#18#18#26#26#26#27
+  +#27#27#28#28#28#28#28#29#29#30#30#29#30#30#13#14#13#3#4#3#3#3#4#3#3#3#3#3#3#3
+  +#2#3#3#3#3#3#3#2#2#2#3#2#2#2#3#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#1#2#1#2#1#2
+  +#2#1#2#2#1#2#1#1#2#1#2#1#1#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1#1#1#0#0#0#1#1#1
+  +#1#1#0#1#1#1#0#0#0#0#0#1#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy0'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000000000333777999:::<<<888///////'
+  +'////////:999999999999999999999999999999999999999999989989889881111111111111'
+  +'11111887::9:99:99:99:999999999999999999999999999999999999989989889889889888'
+  +'88888888888888888888888888888;;:;::;:::::::::::7777666666666666666666666666'
+  +'66655111000111111222333999FFFIIIJJJLLLMMMNNNLLL@@@BBBDDDFFFHHHKKKMMMOOOSSSU'
+  +'UUWWW[[[___aaaeeehhhlllpopsttwxx{{|'#128#128#128#132#132#132#137#137#137#141
+  +#141#140#146#145#146#150#150#150#155#155#155#161#161#161#166#166#165#171#171
+  +#171#176#176#176#157#157#157'JJJJJJLLLNNNPPPQQQRRRRRRRRRRRRQQQPPPOOOOOOOOONN'
+  +'NNNNLLLKKKJJJGGGCCC???;;;55510**3V'#27'L'#253#26'L'#255#26'K'#255#25'J'#255
+  +#24'I'#255#23'I'#255#23'H'#255#22'H'#255#21'G'#255#21'F'#255#20'F'#255#19'E'
+  +#255#18'D'#255#17'C'#255#16'B'#255#16'A'#255#15'@'#255#14'@'#255#14'@'#255#13
+  +'?'#255#12'>'#255#11'='#255#9'='#255'"3s2/%333555666777777888888666666666555'
+  +'555444333333333222222000000000///...---,,,+++***(((&&&$$$"""'#31#31#31#29#29
+  +#29#26#26#26#24#24#24#22#21#14#15#24'D'#0'%'#226#0'$'#229#0'$'#226#0'#'#224#0
+  +'#'#228#0'"'#220#11#28'z'#21#22#28#22#20#10#21#21#19#20#20#20#20#20#20#19#19
+  +#19#19#18#7#13#21'E'#1#29#204#0#29#218#0#28#210#0#28#209#0#27#208#0#26#206#0
+  +#26#206#0#26#204#0#26#214#7#21'{'#18#16#7#18#17#17#18#18#18#18#18#18#18#18#18
+  +#18#18#18#17#17#17#16#16#16#15#15#15#13#13#11#12#12#11#3#16#140#0#18#197#0#17
+  +#188#0#17#187#0#16#186#0#16#185#0#15#184#0#15#189#3#14#144#14#14#16#14#14#12
+  +#14#14#14#13#13#13#13#13#13#13#13#13#12#12#12#10#10#10#9#9#9#9#9#9#8#8#8#6#6
+  +#6#5#5#5#7#7#7#136#136#136#170#170#170#165#165#165#159#159#159#154#153#153
+  +#148#147#147#142#142#142#137#137#137#132#131#132'yyyuuuoppkkkfffbbb___ZZZ'
+  +'WWWRRROPPKKKHHGDDD>>>999666344000....-.---+++)))''''''&&%#$#"""   '#31#31#31
+  +#30#30#29#28#28#28#28#28#28#27#27#26#25#25#25#24#24#23#25#23#24#23#22#22#23
+  +#22#22#23#22#22#23#21#21#22#22#22#22#21#21#21#21#21#21#21#21#21#21#21#20#21
+  +#21#20#20#20#21#20#20#20#20#20#19#20#20#20#20#20#19#19#19#20#19#20#19#20#19
+  +#20#19#19#19#19#19#19#18#19#19#19#18#19#18#18#18#18#18#19#18#18#18#18#18#17
+  +#18#18#18#17#18#17#17#17#13#13#15#13#13#13#13#13#14#12#13#13#13#13#13#13#12
+  +#13#12#12#12#13#12#12#12#13#12#12#12#12#12#11#12#11#11#11#12#11#11#14#14#13
+  +#22#23#23#28#28#28#28#28#28#28#28#28#25#26#26#15#15#14#10#10#10#10#10#11#10
+  +#10#10#10#10#10#10#10#10#10#9#9#9#9#9#9#10#10#9#9#9#11#11#12#12#12#12#12#12
+  +#12#12#11#11#11#11#11#11#10#11#11#10#11#10#10#10#10#10#10#10#10#10#10#10#10
+  +#10#9#9#9#10#9#9#9#9#9#9#10#8#8#8#8#7#7#7#6#7#7#6#7#7#7#7#7#7#6#6#6#7#8#8#7
+  +#18#18#19#26#26#27#27#27#27#28#28#28#29#29#29#29#29#30#31#30#31#15#15#15#4#3
+  +#3#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#2#2#2#2#3#2#2#3#3#3#3#2#2#2#2#2#2
+  +#2#2#2#2#2#2#1#1#2#2#2#1#2#2#2#2#1#1#2#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1
+  +#1#1#1#1#1#1#1#0#1#1#1#0#1#0#0#0#1#0#1#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0'000yyy0000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000000000000000000000000222777888:'
+  +'::<<<;;;...////////////777:999999999999999999999999999999999999999989989989'
+  +'88333111111111111111655::9::9:99:99:99:999999999999999999999999999999999999'
+  +'98998988988988988888888888888888888888888888::9;;:;::;::::::::9997666666666'
+  +'66666666666666666666555000111111222222555;;;GGGIIIKKKLLLNNNNNNMMMDDDDDDGGGH'
+  +'HHKKKMMMPPPSSSUUUXXX[[[^__bbbfffhhhmlmppptttxxx|||'#128#128#128#133#133#133
+  +#137#137#137#142#142#142#146#146#146#151#151#151#156#156#156#162#161#162#166
+  +#166#167#171#171#171#177#177#177#143#143#143'JJJLLLNNNOOOQQQRRRSSSRRRRRRRRRR'
+  ,'RRQQQPPPOOOOOOOOONNNNNNLLLKKKHHHEEE@@@;;;777220..0'#31'F'#212#27'N'#255#26
+  +'L'#255#26'K'#255#25'J'#255#24'I'#255#23'I'#255#23'H'#255#22'H'#255#21'G'#255
+  +#21'F'#255#20'F'#255#19'E'#255#18'D'#255#17'C'#255#16'B'#255#16'A'#255#15'@'
+  +#255#14'@'#255#14'@'#255#13'?'#255#11'?'#255#14'<'#235'+.;0/+222555777777888'
+  +'888888888666666666555555444333333333222222000000000///...---,,,,,,***((('''
+  +'''''$$$!!!'#30#30#30#28#28#28#25#25#25#24#22#13#15#27'T'#0'&'#231#0'%'#229#0
+  +'$'#226#0'$'#229#2'"'#205#17#26'I'#24#22#11#24#23#20#23#23#24#23#23#23#22#22
+  +#22#21#21#21#21#21#21#20#20#19#20#18#7#13#21'C'#2#28#199#0#29#219#0#28#210#0
+  +#28#210#0#27#210#0#26#211#0#26#217#0#26#211#14#19'7'#19#18#10#19#19#19#20#20
+  +#20#20#20#20#19#19#19#19#19#19#18#18#18#17#17#17#16#16#16#14#14#14#13#12#3#5
+  +#15'o'#0#19#202#0#17#189#0#17#188#0#17#187#0#16#186#0#16#185#0#15#187#1#15
+  +#171#13#13#25#14#14#10#14#14#14#14#14#14#13#13#13#13#13#13#12#12#12#11#11#11
+  +#10#10#10#9#9#9#8#8#8#7#7#7#6#6#6#5#5#5'rrr'#171#171#171#165#165#165#160#160
+  +#160#155#154#154#148#148#148#143#143#143#138#138#138#132#132#132#128#128#128
+  +'{zzuuuqqqlllhhhcdd___ZZZXXXSSSPPPKKLHHIDDDBBB=<=887766555444111-.-+++)))((('
+  +'&%&$%$#""   '#31#31#31#30#30#30#28#29#28#28#28#28#27#27#26#26#26#25#24#24#24
+  +#25#24#24#23#23#22#23#22#22#23#22#22#23#22#22#22#22#22#22#21#21#21#22#21#21
+  +#21#21#20#21#21#20#21#21#21#21#21#20#20#20#20#20#20#20#20#20#20#20#19#20#20
+  +#20#20#19#20#19#19#20#19#19#19#19#19#19#19#19#19#19#19#19#18#18#18#18#18#18
+  +#19#18#19#19#18#18#18#18#18#17#18#18#18#17#17#17#18#17#16#16#17#16#16#15#13
+  +#13#14#12#13#13#12#13#12#12#13#12#12#12#12#13#12#12#12#12#12#12#12#12#12#11
+  +#12#11#12#12#12#12#12#12#12#11#12#12#12#22#22#22#21#21#21#12#12#11#11#10#11
+  +#10#11#11#10#11#10#10#10#10#10#10#10#10#10#10#9#10#10#10#10#9#10#10#11#13#12
+  +#13#12#12#12#12#12#12#12#12#12#11#11#11#12#11#11#11#11#10#11#10#11#11#10#10
+  +#10#10#10#10#10#10#10#10#10#10#10#10#10#9#9#10#10#10#9#9#10#9#9#9#8#8#9#7#7#7
+  +#7#7#7#6#6#7#6#6#7#7#7#7#7#6#6#7#8#7#18#18#18#26#26#26#28#28#28#29#29#29#29
+  +#30#30#31#31#30' ! '#14#14#14#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#3#2
+  +#3#2#3#2#2#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2#2#2#2#1#1#1#1#2#2#1#1
+  +#2#1#1#2#1#1#1#1#1#1#1#1#1#1#1#0#1#0#0#1#0#1#1#1#1#1#1#0#0#1#0#1#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy00000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0000000000000000000666888:::;;;===...////////////555:9999999999999999999999'
+  +'9999999999999999998998998988555111111111111111333::9::9::9:99:99:99:9999999'
+  +'9999999999999999999999999999998998988988988988888888888888888888888888888;;'
+  +';;;:;::;::::::::777766666666666666666666666666777333111111222222444666===HH'
+  +'HJJJKKKMMMNNNOOOPPPKKKGGGIIIKKKNNNPPPSSSVVVXXX\\\___bbbeffiihlmmqpqtttyyy}}'
+  +'}'#129#129#129#133#133#133#137#137#137#143#142#142#147#148#147#152#152#152
+  +#156#157#157#162#161#162#167#167#167#173#173#173#179#179#179#132#132#132'KKK'
+  +'NNNOOOQQQRRRRRRSSSSSSSSSRRRRRRRRRQQQPPPOOOOOOOOONNNMMMKKKIIIFFFBBB===999555'
+  +'1.%'':}'#27'O'#255#27'M'#255#26'L'#255#26'K'#255#25'J'#255#24'I'#255#23'I'
+  +#255#23'H'#255#22'H'#255#21'G'#255#21'F'#255#20'F'#255#19'E'#255#18'D'#255#17
+  +'C'#255#16'B'#255#16'A'#255#15'@'#255#14'@'#255#13'@'#255#11'@'#255#26'5'#160
+  +'.,#0//222555777888999888888888888666666666555555444333333333222222000000000'
+  +'///...------+++***)))&&&###   '#30#30#30#26#26#26#26#23#12#14#29'g'#0''''
+  +#237#0'&'#229#0'%'#227#0'%'#233#4'"'#188#25#24#21#26#25#22#26#26#26#26#26#26
+  +#26#26#26#25#25#25#24#24#24#22#22#22#22#22#22#21#20#20#20#19#9#15#20'6'#2#28
+  +#191#0#30#226#0#29#220#0#28#206#2#26#186#5#24#153#10#22'l'#19#19#19#19#19#19
+  +#21#21#21#21#21#21#21#21#21#22#22#22#20#20#20#20#20#20#19#19#19#17#17#17#16
+  +#16#16#15#13#3#8#15'Q'#0#19#203#0#19#193#0#17#189#0#17#188#0#17#187#0#16#186
+  +#0#16#187#0#15#182#11#13'1'#14#14#8#14#14#14#14#14#14#14#14#14#13#13#13#13#13
+  +#13#12#12#12#11#11#11#10#10#10#8#8#8#8#8#8#7#7#7#6#6#6'```'#172#172#172#166
+  +#166#166#161#161#161#155#155#155#149#149#149#144#144#144#138#138#138#133#133
+  +#133#128#128#128'{{{vvvrrrmmmhhhded`__[[\XXXSSSPPPMMLIIHFEEBCB???===9::66644'
+  +'4111...---***(((&&&%%%""#!!!'#31#31#31#30#30#30#29#28#28#29#29#28#27#27#26
+  +#26#26#25#25#24#24#25#24#24#23#23#23#24#22#22#23#22#22#23#21#22#23#22#22#22
+  +#22#22#22#21#22#21#22#21#21#21#21#21#21#21#21#21#21#21#21#20#20#20#20#20#21
+  +#20#20#20#20#20#19#20#19#20#20#20#20#19#19#19#19#19#20#19#19#19#19#19#18#19
+  +#18#19#19#18#18#19#19#19#19#19#18#18#18#18#18#18#18#18#18#18#18#17#17#18#18
+  +#17#17#17#17#17#17#16#16#16#16#16#15#14#15#13#13#13#13#12#12#12#13#12#12#12
+  +#13#12#12#12#12#12#12#12#11#12#11#11#12#12#12#12#12#12#12#11#11#11#11#11#11
+  +#11#10#11#10#11#11#10#10#10#10#10#11#10#10#10#11#10#10#10#10#11#10#10#11#12
+  +#11#12#13#12#12#13#13#13#13#13#12#12#13#12#13#12#12#12#11#11#12#11#11#11#11
+  +#11#11#11#11#10#11#10#11#10#10#10#10#10#10#10#10#10#10#10#10#10#10#10#9#9#9#9
+  +#10#10#9#9#9#10#10#8#8#9#7#7#7#7#7#7#7#7#7#7#6#6#6#6#7#6#7#6#7#8#7#18#18#18
+  ,#26#26#26#28#28#28#29#29#29#30#30#30'"""##$'#10#10#9#3#3#3#3#3#3#3#3#3#3#3#3
+  +#3#3#3#2#3#3#2#2#3#3#3#3#2#3#2#2#3#2#2#3#3#2#2#2#2#2#2#2#2#2#1#2#2#2#2#2#2#1
+  +#2#2#2#1#1#1#1#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1#1#0#1#1#1#0#0
+  +#1#0#1#1#0#1#1#0#1#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0'000yyy00000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0000000000000000000000000000000000000555777999;;;===222////////////333:9999'
+  +'9999999999999999999999999999999999999998998988776111111111111111111999::9::'
+  +'9::9:99:99:99:9999999999999999999999999999999999999899898898898898888888888'
+  +'8888888888888888:::;;;;;:;::;:::::99976666666666666666666666666677777732311'
+  +'1222222444555777>>>JJJKKKMMMNNNOOOPPPRRRRRRMMMKKKNNNPPPSSSVVVYYY\\\___cccff'
+  +'fjjjlmmqqptuuyyy}}}'#129#130#129#133#133#133#137#138#138#143#142#142#148#147
+  +#148#152#152#152#156#157#157#163#163#163#169#169#169#175#175#175#180#180#180
+  +'{{{MMMOOOQQQRRRSSSTTTTTTTTTTTTRRRRRRRRRRRRQQQPPPOOOOOOOOOMMMLLLJJJGGGDDD@@@'
+  +';;;666320./2 G'#211#27'O'#255#27'L'#255#26'L'#255#26'K'#255#25'J'#255#24'I'
+  +#255#23'I'#255#23'H'#255#22'H'#255#21'G'#255#21'F'#255#20'F'#255#19'E'#255#18
+  +'D'#255#17'C'#255#16'B'#255#16'A'#255#15'@'#255#13'A'#255#16'='#233'(,=.,''0'
+  +'113335557779999999999998888888886666666665555554443333333332222221111111111'
+  +'11000///...,,,***(((%%%"""'#31#31#31#29#29#29#28#25#12#12#31'}'#0'('#244#0
+  +'&'#230#0'&'#229#0'%'#230#0'$'#221#22#28';'#29#28#22#29#29#29#29#29#29#29#29
+  +#29#28#28#28#27#27#27#25#25#25#25#25#25#23#23#23#21#21#22#21#20#10#15#21'8'#7
+  +#26#146#11#23'h'#15#20'7'#18#19#26#19#18#16#20#19#12#21#20#20#22#22#22#22#22
+  +#22#22#22#22#23#23#23#23#23#23#23#23#23#21#21#21#20#20#20#19#19#19#17#17#17
+  +#15#15#10#12#15')'#2#18#162#0#19#195#0#19#200#0#18#192#0#17#188#0#17#187#0#16
+  +#190#0#15#195#9#14'F'#14#14#5#14#14#14#14#14#14#14#14#14#14#14#14#13#13#13#12
+  +#12#12#12#12#12#10#10#10#9#9#9#8#8#8#7#7#7#7#7#7'OOO'#173#173#173#167#167#167
+  +#162#161#161#156#155#155#150#149#149#144#144#144#139#138#139#133#133#133#128
+  +#128#128'|{{wwwrrrmmmiiieee```\\]XXXTTTPPPMMMIJJEFFBBB???===:::666544121...-'
+  +'-,+*+)((&&&%%%###!"!'#31#31#31#30#29#30#28#29#28#28#29#28#27#27#27#26#26#25
+  +#25#24#24#25#24#24#23#23#22#24#23#22#23#22#22#23#22#22#23#22#22#22#22#22#22
+  +#21#21#21#22#22#21#21#21#21#21#21#21#20#21#21#21#21#20#20#20#20#20#20#20#20
+  +#20#20#20#20#20#20#20#19#19#20#19#19#19#20#20#20#19#19#19#19#19#19#19#19#19
+  +#19#19#18#19#19#18#18#18#18#19#18#18#18#18#18#18#18#18#18#18#18#18#17#18#18
+  +#17#17#18#17#17#17#17#16#17#16#16#17#16#15#15#14#15#14#13#13#13#12#13#13#12
+  +#12#12#12#12#12#12#11#12#12#12#11#12#12#12#12#11#11#11#12#11#12#11#11#11#11
+  +#11#11#11#11#11#11#11#10#10#11#10#11#11#10#10#11#11#12#13#13#13#13#13#13#13
+  +#12#13#13#13#13#12#13#12#12#12#12#12#12#12#12#12#12#11#11#11#12#11#11#11#11
+  +#11#10#11#11#10#10#10#10#11#10#11#10#11#10#10#11#10#9#10#10#10#9#10#10#9#10
+  +#10#9#10#9#9#9#9#9#9#9#9#7#7#7#7#7#7#7#7#6#6#6#7#7#6#7#7#6#7#7#8#7#19#18#18
+  +#27#27#27#29#29#29'   ##"&&&%&&'#10#11#10#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2
+  +#3#3#3#3#3#3#2#3#2#2#3#3#2#3#3#2#3#2#2#2#2#2#2#2#2#2#2#1#1#2#2#1#1#1#2#1#2#2
+  +#1#1#1#1#1#1#2#1#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1#0#1#1#1#1#0#0#0#1#0
+  +#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0'000yyy00000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0000000000000000000333777999:::===556////////////000:99:9999999999999999999'
+  +'9999999999999999999998998998988111111111111111111777:::::9::9::9:99:99:99:9'
+  +'999999999999999999999999999999999999899898898898898888888888888888888888899'
+  +'8;;;;;;;;:;::;:::::87766666666666666666666666677777787722222233344455566677'
+  +'7===JJJMMMMMMOOOPPPRRRTTTUUUVVVRRRQQQSSSVVVYYY\\\___cccfffjjjnmnqrrtutyyy}}'
+  +'~'#129#130#130#134#135#134#139#138#138#143#143#143#148#148#148#153#153#153
+  +#160#160#160#166#166#166#171#171#171#176#176#176#182#182#182'qqqNNNOOOQQQTTT'
+  +'TTTUUUUUUTTTTTTTTTRRRRRRRRRRRRQQQPPPOOOOOOOOOMMMKKKIIIEEEBBB>>>9994551/''+5'
+  +'X'#29'M'#243#28'N'#255#27'L'#255#26'L'#255#26'K'#255#25'J'#255#24'I'#255#23
+  +'I'#255#23'H'#255#22'H'#255#21'G'#255#21'F'#255#20'F'#255#19'E'#255#18'D'#255
+  +#17'C'#255#16'B'#255#16'B'#255#14'A'#255' 0o,)'#31'...111444777888999:::::::'
+  +'::888888888888666666666555555444333333222222222222222222333333222///,,,***'
+  +'''''''$$$!!!'#30#30#29#28#27#19#10'"'#149#0'('#244#0''''#230#0'&'#230#0'&'
+  +#229#0'%'#235#18' j '#30#19#31#31#31'   '#31#31#31#30#30#30#29#29#29#28#28#28
+  +#27#27#27#25#25#25#23#23#23#23#23#23#22#21#16#21#20#14#22#20#9#21#20#14#21#20
+  +#18#21#20#19#22#21#21#22#22#22#23#23#23#24#24#24#24#24#24#24#24#24#23#23#23
+  +#23#23#23#22#22#22#21#21#21#19#19#19#18#18#18#17#17#17#15#15#13#13#14#18#9#15
+  +'='#4#16''#0#18#183#0#18#199#0#17#197#1#17#183#7#15'g'#14#14#23#14#14#12#14
+  +#14#14#14#14#14#14#14#14#15#15#15#13#13#13#12#12#12#12#12#12#11#11#11#10#10
+  +#10#9#9#9#7#7#7#7#7#7'>>>'#174#173#174#168#167#167#163#162#162#157#156#156
+  +#151#150#150#145#145#145#140#140#139#134#134#134#129#129#129'}}}wwwrsrmmmiii'
+  ,'eeeaaa]\\XXXUUUQQQMMMJJJFEECCC?@@===:::667455111...---+++()(&''&%%%###""" '
+  +#31#31#30#30#30#29#29#29#28#29#28#27#27#27#26#26#25#25#25#24#25#24#24#24#23
+  +#23#24#23#23#23#22#22#23#22#22#23#22#22#22#22#22#22#21#22#21#21#22#22#21#22
+  +#21#21#21#21#21#21#21#21#21#21#21#21#20#20#21#21#21#20#20#20#20#20#20#20#20
+  +#20#20#19#20#20#19#20#20#19#19#20#19#19#19#19#19#19#19#19#18#19#19#18#19#19
+  +#18#18#18#19#19#18#18#18#18#18#18#17#18#17#18#18#18#17#17#18#17#17#17#16#16
+  +#17#16#16#17#16#16#16#16#16#16#15#16#15#15#15#13#14#13#12#12#13#12#12#12#12
+  +#12#12#12#12#12#12#11#12#11#12#11#11#12#11#11#11#11#12#11#11#11#11#11#11#11
+  +#11#11#12#11#13#13#14#13#14#13#14#13#13#13#13#13#13#13#13#12#13#13#13#12#12
+  +#12#12#12#13#12#12#13#12#12#12#11#11#12#11#11#11#11#10#11#10#10#10#11#11#10
+  +#10#10#10#10#10#10#11#11#10#10#10#10#10#10#10#10#10#10#9#9#9#10#9#9#9#10#10#9
+  +#9#9#9#9#7#7#7#6#7#6#6#6#7#7#7#7#7#6#7#7#6#6#7#7#7#20#20#20#29#29#29'!!!%%%('
+  +')),+++*+'#12#12#12#3#3#4#3#3#4#3#3#3#3#3#2#3#3#3#2#3#2#2#3#3#3#3#2#3#2#2#2#2
+  +#2#2#2#2#2#2#2#2#2#2#1#2#2#2#2#1#1#2#1#1#1#2#1#2#1#1#1#1#2#1#2#2#2#1#2#1#1#1
+  +#1#1#1#1#1#1#1#1#0#1#1#1#1#0#1#1#1#0#0#0#0#1#1#0#0#0#1#1#1#1#1#0#1#1#0#0#0#0
+  +#0#0#0'000yyy000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000222666888'
+  +':::<<<999///////////////888:99999999999999999999999999999999999999998998998'
+  +'988333111111111111111444::::::::9::9::9:99:99:99:99999999999999999999999999'
+  +'999999999998998988988988988888888888888888888888:::;;;;;;;;:;::;:::99766666'
+  +'666666666666666666777777888777333333444555666777999<<<IIIMMMOOOQQQRRRTTTUUU'
+  +'WWWYYY[[[ZZZ[[[[[[\\\___cccgggkkknnnrqrvvuyzz}}}'#131#130#131#135#135#135
+  +#140#140#140#146#146#146#151#152#151#157#157#157#162#162#162#167#167#167#172
+  +#172#172#177#177#177#183#183#183'iiiPPPQQQSSSTTTUUUUUUUUUUUUTTTTTTTTTRRRRRRR'
+  +'RRRRRQQQPPPOOOOOONNNMMMJJJGGGEEEAAA<<<7773331.%(8v'#29'N'#251#28'N'#255#27
+  +'L'#255#26'L'#255#26'K'#255#25'J'#255#24'I'#255#23'I'#255#23'H'#255#22'H'#255
+  +#21'G'#255#21'F'#255#20'F'#255#19'E'#255#18'D'#255#17'D'#255#16'C'#255#29'2'
+  +#136'+) -,,000222555888999999;;;;;;::::::88888888888866666666655555544433333'
+  +'3222222222222333555666555222---+++(((%%%"""'#31#31#29#28#28#28#7'%'#180#0'('
+  +#241#0''''#231#0''''#231#0'&'#229#0'&'#240#11'#'#156'! '#26'""!"""!!!!!!   '
+  +#31#31#31#29#29#29#28#28#28#26#26#26#26#26#26#24#24#24#23#23#22#22#22#22#23
+  +#23#23#23#23#23#23#23#23#24#24#24#23#23#23#24#24#24#25#25#25#25#25#25#25#25
+  +#25#25#25#25#24#24#24#24#24#24#22#22#22#21#21#21#19#19#19#18#18#18#16#16#16
+  +#15#15#13#15#14#5#13#13#6#11#14'&'#6#16'w'#3#17#144#11#14'.'#15#14#4#15#15#12
+  +#15#15#15#15#15#15#14#14#14#15#15#15#15#15#15#15#15#15#13#13#13#12#12#12#11
+  +#11#11#10#10#10#9#9#9#8#8#8#7#7#7'111'#174#174#174#168#168#167#163#163#162
+  +#158#157#158#152#151#151#146#145#145#141#140#140#135#135#135#130#130#130'}}}'
+  +'xxxsssonnjjjfeeaaa^^^YYYVUUQQQNMMJJJGGGCCC@?@===:::777454222/0/---*+*)))&&&'
+  +'%%%###""" '#31#31#30#30#30#29#29#29#29#29#29#28#28#27#27#26#26#25#25#24#25
+  +#24#24#24#23#23#24#23#22#24#23#23#23#22#22#23#22#22#23#22#22#22#22#22#22#22
+  +#22#22#21#21#21#21#21#21#21#21#21#21#21#21#21#21#21#21#20#21#21#21#21#20#21
+  +#20#20#20#20#20#20#20#20#20#20#20#19#19#20#19#19#20#19#20#19#20#19#19#19#19
+  +#19#18#19#19#19#19#18#19#18#18#19#18#18#18#19#18#18#18#18#18#17#18#18#18#17
+  +#17#18#16#17#17#17#17#17#16#16#17#16#16#16#16#16#16#16#16#16#16#16#16#16#16
+  +#14#13#14#12#12#12#12#12#12#11#12#12#12#12#12#12#11#11#12#11#12#11#11#11#11
+  +#11#11#13#13#13#14#13#14#13#13#14#13#14#13#13#13#13#13#13#14#13#13#13#13#13
+  +#13#13#13#12#13#13#13#12#13#13#12#12#12#13#12#11#12#11#11#11#11#11#11#11#11
+  +#10#11#11#10#10#11#11#11#11#10#10#10#10#10#10#10#10#10#10#10#10#10#10#10#9#10
+  +#10#10#10#9#9#9#10#9#10#9#9#8#9#7#7#7#7#6#7#7#7#7#6#6#6#7#6#6#7#7#7#10#9#10
+  +#26#26#26'"""''&'',,,000111'#23#24#24#3#4#3#4#3#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3
+  +#3#3#3#2#3#2#2#2#2#2#3#3#3#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#1#2#2#1#2#2#1
+  +#2#1#1#1#2#1#1#1#1#1#1#1#2#1#1#1#1#1#1#1#1#1#1#1#0#1#0#0#1#0#1#0#1#0#0#1#0#1
+  +#0#0#0#0#0#1#0#0#0#0#0#0'000yyy000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000111666888:::<<<===///////////////555:99:99999999999999999999999999'
+  +'999999999999998998988555111111111111111111:::::::::::9::9::9:99:99:99:99999'
+  +'999999999999999999999999999999998998988988988988888888888888888888988;;;;;;'
+  +';;;;;:;::;::888666666666666666666666777777888888888444444555666777999:::<<<'
+  +'FEFOOOQQQRRRTTTVVVWWWZZZ\\\^^^```cccdddfffgggjjjlllpppsssyyy}}|'#128#128#128
+  +#134#133#134#139#139#139#144#143#144#148#148#148#153#153#153#157#158#157#163
+  +#163#163#168#168#168#173#173#173#179#179#179#185#184#184'cccQQQSSSTTTUUUVVVV'
+  +'VVVVVVVVTTTTTTTTTTTTRRRRRRRRRRRRQQQPPPOOOOOONNNLLLIIIGGGCCC???;;;6773321.%('
+  +'8q'#30'L'#237#27'O'#255#27'L'#255#26'L'#255#26'K'#255#25'J'#255#24'I'#255#23
+  +'I'#255#23'H'#255#22'H'#255#21'G'#255#21'F'#255#20'F'#255#18'F'#255#18'C'#249
+  ,#30'3'#130'*('#31'-,*//0222555777999:::;;;;;;;;;;;;::::::8888888888886666666'
+  +'66555555444333333222222333333555666666333///,,,)))&&&### '#31#28#27#29'&'#3
+  +''''#213#0'('#239#0'('#233#0''''#231#0''''#231#0'&'#235#4'%'#202' !(#" $$$##'
+  +'####!!!!!!   '#30#30#30#29#29#29#28#28#28#27#27#27#26#26#26#25#25#25#25#25
+  +#25#26#26#26#26#26#26#26#26#26#26#26#26#25#25#25#26#26#26#26#26#26#26#26#26
+  +#25#25#25#25#25#25#24#24#24#23#23#23#22#22#22#21#21#21#19#19#19#18#18#18#16
+  +#16#16#16#16#16#15#15#14#14#14#8#14#14#9#14#14#14#15#14#8#14#14#14#15#15#15
+  +#16#16#16#15#15#15#16#16#16#15#15#15#15#15#15#15#15#15#14#14#14#12#12#12#12
+  +#12#12#11#11#11#10#10#10#9#9#9#8#8#8'&&&'#175#175#175#169#169#168#163#162#163
+  +#158#157#157#152#152#152#146#146#146#141#141#141#136#136#136#130#130#130'}}}'
+  +'xxxsssnnokkkefeaaa^^^YYYVVVQRQMNNJJJGGGCCCA@@===:::777555212/0/...+++)))''&'
+  +'''%%%###!""'#31'  '#31#31#30#29#29#29#29#29#29#28#27#27#27#27#26#26#25#24#25
+  +#24#24#24#23#23#24#23#23#24#22#23#23#23#23#23#22#22#23#22#22#22#22#22#22#22
+  +#22#22#22#22#22#22#22#21#21#21#21#21#21#21#21#21#21#20#20#20#20#21#21#20#20
+  +#20#20#20#20#20#20#20#20#20#20#20#20#19#20#19#19#19#20#19#20#19#20#19#20#19
+  +#19#19#19#19#19#18#19#18#18#18#19#18#18#19#19#18#18#18#18#18#18#18#18#18#17
+  +#17#17#17#17#17#17#16#17#16#16#17#16#16#16#16#16#16#15#16#15#15#16#16#15#15
+  +#15#16#15#15#15#16#14#13#15#12#12#12#12#12#12#12#12#11#11#11#11#12#12#12#14
+  +#14#14#14#14#14#14#14#14#13#14#13#14#14#14#14#14#14#13#14#13#14#13#13#13#13
+  +#13#13#13#13#12#13#13#13#13#12#12#12#12#13#12#12#12#11#12#12#11#11#11#11#11
+  +#11#11#11#11#11#10#10#11#10#10#10#11#10#10#10#10#10#10#10#10#10#10#10#10#10#9
+  +#9#10#10#10#9#10#9#9#9#9#10#9#9#9#8#9#7#7#7#7#7#7#7#7#7#6#7#6#7#8#8#10#9#9#22
+  +#22#22'$$$***000444777'#7#7#7#3#3#3#3#3#4#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2
+  +#3#3#2#3#3#2#3#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2#2#2#1#1#1#2#2#1#2#2#1
+  +#1#2#2#1#1#1#1#1#2#2#1#2#1#1#1#1#1#1#1#0#1#1#1#1#0#1#1#1#1#0#1#0#0#0#1#0#0#0
+  +#0#0#0#3#0#0#1#0'000yyy00000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0000666888:::<<<>>>111////////////333:99:9999999999999999999999999999999999'
+  +'9999998998998877111111111111111111777:::::::::::9::9::9:99:99:99:9999999999'
+  +'9999999999999999999999999998998988988988988888888888888888888:99;;;;;;;;;;;'
+  +':;::;::777666666666666666666777777888888999999555555666777999:::<<<>>>BBBLL'
+  +'LSSSTTTVVVXXXZZZ]]]___aaacccfffiiilllooorrrvvvxxx}}}'#128#128#128#132#132
+  +#132#136#136#136#140#140#140#145#145#145#149#150#149#155#154#154#159#159#159
+  +#164#164#164#169#169#169#175#175#175#180#180#180#186#185#186'^^^RRRSSSVVVVVV'
+  +'VVVWWWWWWVVVVVVTTTTTTTTTTTTRRRRRRRRRRRRQQQPPPOOOOOOMMMKKKIIIEEEBBB>>>:::666'
+  +'3321.$,3N!E'#193#28'M'#255#26'N'#255#26'M'#255#26'K'#255#25'K'#255#24'I'#255
+  +#23'I'#255#23'H'#255#21'H'#255#20'H'#255#20'G'#255#24'?'#205'#/\+('#31',,*//'
+  +'/222555777999:::;;;<<<<<<;;;;;;;;;::::::88888888888866666666655544433322222'
+  +'2222111222444666666333///,,,)))&&&""" '#31#23#23#31'F'#0')'#233#0')'#237#0
+  +'('#234#0'('#233#0''''#231#0''''#233#0'&'#227#27'#G$#'#29'$$$$$$$$$###""""""'
+  +'!!!'#31#31#31#29#29#29#28#28#28#29#29#29#28#28#28#27#27#27#27#27#27#27#27#27
+  +#28#28#28#27#27#27#27#27#27#27#27#27#27#27#27#27#27#27#27#27#27#26#26#26#25
+  +#25#25#24#24#24#23#23#23#22#22#22#20#20#20#20#20#20#18#18#18#17#17#17#17#17
+  +#17#16#16#16#16#15#15#16#15#14#16#16#16#16#16#16#16#16#16#16#16#16#17#17#17
+  +#16#16#16#16#16#16#16#16#16#15#15#15#14#14#14#14#14#14#12#12#12#11#11#11#10
+  +#10#10#9#9#9#8#8#8#29#29#29#176#176#176#170#170#169#164#164#163#158#158#158
+  +#152#152#152#147#147#147#142#142#142#136#136#136#131#131#131'}}}xxxtttpppkkk'
+  +'feebbc^^^ZZZVVVQQQNNNJJJGGGDDDAAA===:::777555222///...,,,)))''''&&%%###""" '
+  +#31' '#31#31#31#29#29#29#29#29#29#28#28#27#27#27#26#25#25#25#25#25#24#24#23
+  +#23#24#23#23#23#23#23#23#23#23#23#23#23#23#22#22#23#22#22#22#22#22#22#22#22
+  +#22#22#22#22#21#21#21#21#22#21#21#21#21#21#21#21#20#21#20#21#21#21#21#20#20
+  +#20#21#20#20#20#20#20#20#20#20#20#19#20#19#19#20#20#19#20#19#19#19#20#19#19
+  +#19#19#19#19#19#19#19#18#19#19#19#18#18#18#18#18#18#18#18#18#17#17#17#17#17
+  +#18#17#16#17#17#16#17#16#17#16#16#16#16#16#16#16#16#16#15#15#15#16#16#16#16
+  +#15#15#16#15#15#15#15#15#13#13#13#11#12#13#14#14#13#14#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#13#14#13#13#14#14#14#14#13#13#13#13#13#13#13#13#13
+  +#12#13#13#13#13#13#13#12#13#12#12#12#12#11#11#12#11#11#11#11#11#11#11#11#11
+  +#11#11#11#11#10#10#10#11#10#11#10#10#11#10#10#10#10#10#10#10#10#10#10#9#10#9
+  +#10#9#9#9#10#9#9#9#9#10#9#9#7#7#8#7#7#7#7#6#7#7#6#6#8#8#7#11#10#11#30#30#31
+  +'&''&...444999%&&'#3#3#3#4#3#3#4#3#4#4#4#4#3#4#3#3#4#3#3#3#3#3#3#3#3#2#2#3#3
+  +#3#3#3#2#2#2#2#3#2#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#1#2#2#2#1#1#2#1
+  +#2#1#1#1#1#1#1#1#1#1#2#1#1#1#1#1#0#1#0#1#1#0#1#0#0#1#1#0#1#0#1#0#0#0#1#0#0#0
+  +#3#3#0#1#0#0'000yyy000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000222'
+  ,'666888;;;===>>>555////////////000:99:99999999999999999999999999999999999999'
+  +'999998998988222111111111111111444::::::::::::::9::9::9:99:99:99:99999999999'
+  +'999999999999999999999999998998988988988988888888888888888888;;:;;;;;;;;;;;:'
+  +';::::9766666666666666666777777888888999::::::777666777::::::<<<>>>@@@BBBHHH'
+  +'QQQVVVXXX[[[]]]```bbbdddgggiiilllooosssvvvyyy}}}'#129#129#129#133#132#133
+  +#137#136#137#141#141#141#146#146#146#151#151#151#156#156#156#160#161#160#165
+  +#165#165#170#170#170#175#175#175#178#178#178#181#181#181'XXXSSSTTTVVVWWWXXXX'
+  +'XXWWWWWWVVVVVVTTTTTTTTTTTTRRRRRRRRRRRRQQQPPPOOONNNMMMKKKGGGEEEAAA>>>;;;7773'
+  +'3320*0/+)7d"A'#176#29'I'#234#26'L'#252#25'L'#255#24'L'#255#24'J'#255#23'H'
+  +#253#24'E'#239#27'>'#188'"3n))*,*!..-000222555888:::;;;<<<<<<======<<<;;;;;;'
+  +';;;::::::88888888888877766655544444422222211111111122222222210//.,-,)*)#(&'
+  +#28'%"'#21'"'#29#9#17'"o'#0'+'#245#0')'#237#0')'#234#0'('#234#0'('#233#0''''
+  +#232#0''''#240#20'$t&#'#23'%%%%%%%%%$$$######"""!!!   '#31#31#31#30#30#30#30
+  +#30#30#30#30#30#29#29#29#29#29#29#29#29#29#29#29#29#29#29#29#28#28#28#28#28
+  +#28#28#28#28#28#28#28#27#27#27#26#26#26#24#24#24#24#24#24#23#23#23#22#22#22
+  +#21#21#21#20#20#20#19#19#19#18#18#18#18#18#18#17#17#17#17#17#17#17#17#17#17
+  +#17#17#17#17#17#17#17#17#17#17#17#17#17#17#17#17#17#17#17#17#16#16#16#15#15
+  +#15#14#14#14#13#13#13#12#12#12#10#10#10#9#9#9#8#8#8#17#17#17#176#176#176#170
+  +#170#170#164#163#164#158#158#158#152#152#152#147#147#147#142#142#142#136#136
+  +#136#131#131#131'}~~xyxtttpppkkkgggbcb^^^ZZZVVVRRROONKKJHHIDDDAAA=>=:::77755'
+  +'53330/0...-,,)))&''&&&&###"""   '#31#30#31#30#30#30#29#30#29#28#28#28#27#27
+  +#26#26#26#25#25#25#25#24#23#23#24#24#23#24#23#23#24#23#22#23#22#22#23#22#22
+  +#23#22#23#22#22#22#22#21#22#21#22#22#21#21#22#21#21#21#21#22#22#21#21#21#21
+  +#21#21#21#20#21#20#20#21#20#21#20#20#20#20#20#20#20#20#20#20#20#20#20#20#20
+  +#20#19#19#20#20#19#20#20#19#20#19#19#19#18#19#18#19#18#18#18#19#18#18#19#18
+  +#18#18#18#18#18#18#18#17#17#18#17#17#17#17#17#17#16#17#17#17#17#16#16#16#16
+  +#16#16#16#16#16#16#16#16#15#16#16#15#16#15#15#16#15#15#15#15#15#15#15#15#15
+  +#14#15#15#15#14#15#15#14#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#14
+  +#13#14#14#14#13#14#13#13#13#13#13#13#12#13#12#13#12#12#13#12#12#12#11#12#12
+  +#11#12#12#11#11#12#11#11#10#11#11#11#11#11#11#11#11#11#11#10#10#10#11#10#10
+  +#10#10#10#10#10#10#10#10#10#10#10#10#10#10#10#9#10#9#9#9#8#8#7#7#8#7#7#7#7#7
+  +#7#8#8#7#9#9#9#21#21#21'$%$*+*111887;;;'#11#11#11#4#4#4#4#3#4#4#4#4#4#3#4#4#4
+  +#4#4#3#3#4#3#3#3#3#3#3#3#3#3#3#2#3#2#3#2#3#2#3#3#3#3#3#3#2#2#2#2#2#2#2#2#2#2
+  +#2#2#2#2#2#2#2#2#2#2#1#2#1#2#1#2#2#2#1#1#2#1#1#1#1#1#1#2#1#1#1#1#1#1#1#1#1#1
+  +#1#1#1#1#1#1#1#0#1#1#1#1#0#1#1#3#0#3#0#1#1'000yyy000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000222555777999;;;===???444///////////////877:99:99999'
+  +'999999999999999999999999999999999998998988555101111111111111111:99:::::::::'
+  +':::::9::9::9:99:99:99:99999999999999999999999999999999999998998988988988988'
+  +'888888888888888999;;;;;;;;;;;;;;:;::999666666666666666777777888888999:::;;;'
+  +';;;999777::::::<<<>>>@@@BBBDDDFFFJJJSSSZZZ^^^aaaccceeehhhkkkmmmqqqssswww{{{'
+  +''#130#130#130#134#134#134#139#139#139#142#142#142#147#147#146#152#152#152
+  +#157#157#156#161#161#161#164#164#164#167#167#167#169#169#169#175#175#175#181
+  +#181#181'YYYUUUUUUVVVWWWYYYXXXWWWWWWWWWVVVVVVTTTTTTTTTTTTRRRRRRRRRRRRQQQPPPO'
+  +'OONNNMMMJJJGGGEEEAAA???;;;8885552201/''/.''-0:)4[&7x%8'#128'%6y''2^)-<,+''.'
+  +'+!..,///111444666888:::<<<==================<<<;;;;;;;;;::::::8888888887776'
+  +'6655544433322211100000/10,20)20%30#0/)--/),7"*M'#25'''f'#18'&'#129#13'&'#150
+  +#4'('#210#0'+'#243#0'*'#237#0')'#236#0')'#234#0'('#234#0'('#233#0''''#242#11
+  +'%'#164'$#'#30'$$#%%%%%%%%%$$$######""""""!!!   '#31#31#31'   '#31#31#31#30
+  +#30#30#30#30#30#30#30#30#30#30#30#29#29#29#29#29#29#28#28#28#28#28#28#28#28
+  +#28#27#27#27#26#26#26#25#25#25#24#24#24#24#24#24#22#22#22#21#21#21#21#21#21
+  +#20#20#20#19#19#19#19#19#19#19#19#19#18#18#18#18#18#18#18#18#18#18#18#18#17
+  +#17#17#18#18#18#18#18#18#17#17#17#17#17#17#15#15#15#14#14#14#14#14#14#12#12
+  +#12#11#11#11#10#10#10#9#9#9#19#19#19#176#176#176#170#170#170#164#164#164#158
+  +#158#158#153#152#152#147#147#147#142#142#142#136#136#136#131#131#131'}~~yyyt'
+  +'ttpppkkkgggccc^^^ZZ[VVVSSSOOOJJKIIHDEDAAA>>>;::877555333/00...-,,)))''''''&'
+  +'&&$#$"#"   '#31#31#31#30#30#30#30#30#29#28#28#28#27#27#26#25#26#25#26#25#25
+  +#24#24#24#25#24#23#24#23#23#24#23#23#23#23#23#23#22#22#23#23#23#22#22#22#22
+  +#22#22#22#22#22#22#22#22#22#22#22#22#21#21#21#21#21#21#21#21#21#21#21#20#21
+  +#21#21#21#20#21#21#20#20#20#20#20#20#20#20#20#20#20#20#20#19#20#20#20#20#20
+  +#19#19#20#19#19#20#19#19#19#19#18#19#18#19#19#18#18#18#19#18#18#18#18#18#18
+  +#17#17#18#17#17#18#16#17#17#17#16#17#16#16#17#17#17#16#16#16#16#16#16#16#15
+  +#15#16#16#16#16#16#15#15#15#15#15#15#16#15#15#15#15#15#14#15#15#15#15#15#14
+  +#14#14#15#14#14#15#14#14#15#14#14#14#13#14#13#14#13#14#13#14#13#14#14#13#13
+  ,#14#13#13#14#13#13#13#13#13#13#13#13#12#12#13#12#12#12#11#12#12#12#12#11#11
+  +#11#12#11#11#11#11#11#10#11#11#11#11#11#10#11#11#10#11#11#10#10#11#10#10#10
+  +#10#10#10#9#10#10#9#10#9#10#10#10#9#8#8#8#7#7#7#8#8#7#7#7#8#7#8#11#11#11#30
+  +#30#30'&''&//.554::;'''''''#4#4#4#4#4#4#4#4#4#4#4#4#3#4#4#3#4#4#3#3#3#3#3#3#3
+  +#3#3#3#3#3#3#3#3#2#3#3#3#3#3#2#3#3#2#3#3#2#3#3#2#3#2#2#2#2#3#3#3#2#2#2#2#1#2
+  +#2#2#2#2#2#1#1#2#2#2#1#1#1#1#1#2#1#1#1#1#2#1#1#1#1#1#1#1#1#1#1#1#1#0#1#1#1#1
+  +#1#0#0#1#1#1#0#3#3#3#1#0#0'000yyy0000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000222444666888:::<<<>>>444//////////////////555:99:999999999999999999999'
+  +'99999999999999999998998998877101101111111111111776:::::::::::::::::9::9::9:'
+  +'99:99:99:999999999999999999999999999999999999989989889889889888888888888888'
+  +'88:::;;;;;;;;;;;;;;:;::888666666666666777777888888999:::;;;;;;===<<<::::::<'
+  +'<<>>>@@@BBBDDDFFFHHHKKKNNNSSS\\\aaafffhhhlllnnnrrrtttxxx{{{'#131#131#131
+  +#136#136#136#139#139#139#143#143#143#148#147#147#150#149#149#153#153#153#155
+  +#155#154#159#158#159#165#165#165#170#170#170#176#176#176#181#181#181'[[[VVVV'
+  +'VVWWWYYYYYYYYYXXXXXXWWWWWWVVVVVVTTTTTTTTTTTTRRRRRRRRRRRRQQQPPPNNNMMMMMMJJJH'
+  +'HHEEEBBB???===99966644443221.1/(0-$0-#0-#0.''/.*0/.111333444555888999;;;<<<'
+  +'===>>>>>>>>>>>>=========<<<;;;;;;;;;::::::888888777666444333222111000/../.,'
+  +'+.>$/]'#30'/y'#24'/'#148#16'/'#176#10'.'#201#3'.'#228#1'-'#240#0'-'#246#0'-'
+  +#254#0'-'#254#0','#245#0'*'#238#0'*'#238#0'*'#237#0')'#236#0')'#234#0'('#234
+  +#0'('#244#7'%'#187'###$$"%%%%%%%%%%%%%%%$$$$$$###""""""!!!      '#31#31#31#31
+  +#31#31#31#31#31#31#31#31#31#31#31#30#30#30#29#29#29#28#28#28#28#28#28#28#28
+  +#28#27#27#27#26#26#26#24#24#24#24#24#24#24#24#24#23#23#23#22#22#22#21#21#21
+  +#21#21#21#21#21#21#20#20#20#20#20#20#19#19#19#19#19#19#19#19#19#18#18#18#18
+  +#18#18#18#18#18#18#18#18#17#17#17#16#16#16#14#14#14#14#14#14#12#12#12#11#11
+  +#11#10#10#10#9#9#9#19#19#19#176#176#176#171#170#170#165#164#164#159#158#158
+  +#152#152#152#148#147#147#142#142#142#137#136#136#131#131#131'~~}yyyuuupppkkk'
+  +'gggccc^^^[Z[VVVSSSOOOKKKIIIDDEAAA>>><;<878555333000...--,))*''''''&&&$###""'
+  +'!  '#31#31#31#30#30#30#30#30#30#29#29#28#27#27#26#26#26#25#26#25#24#25#24#24
+  +#24#23#24#24#23#24#24#23#23#23#23#23#23#23#23#23#23#23#23#22#22#22#22#22#22
+  +#23#22#22#22#22#22#22#22#22#22#21#22#22#22#21#21#21#21#21#21#21#21#21#20#21
+  +#20#21#21#21#20#21#21#20#20#20#20#20#20#20#20#19#20#20#20#20#20#20#19#19#19
+  +#20#20#19#19#19#20#19#19#18#19#19#18#19#19#18#19#18#18#18#18#18#18#17#17#18
+  +#17#17#18#17#17#18#16#16#17#17#17#16#16#17#16#17#16#16#16#16#16#16#16#16#16
+  +#16#16#16#16#16#16#15#15#16#16#15#15#15#15#15#15#14#15#15#14#14#14#14#14#14
+  +#15#15#14#14#14#14#14#14#14#14#14#14#14#13#14#13#14#14#14#13#14#13#13#13#14
+  +#14#13#13#13#13#13#13#13#13#12#13#13#12#12#12#11#11#12#12#11#12#11#11#11#11
+  +#11#11#11#12#11#11#11#10#11#11#11#11#11#11#10#11#11#10#10#10#11#10#10#10#10
+  +#10#10#9#10#10#10#9#8#9#8#8#7#7#7#7#7#8#7#8#8#8#9#9#9#20#20#20'$$$)**221888<'
+  +'<<'#15#15#15#4#4#4#4#4#4#4#4#4#3#3#4#3#4#4#3#3#3#3#3#4#4#3#3#3#3#3#3#3#3#3#3
+  +#3#3#3#3#3#3#3#3#3#3#3#2#3#2#3#2#2#2#2#2#2#2#3#3#2#2#3#2#2#2#2#2#1#2#2#2#2#1
+  +#1#2#2#1#1#2#2#1#2#1#1#1#1#2#1#1#1#1#1#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1
+  +#0#3#0#0#1#1'000yyy000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000222444555777'
+  +':::<<<===444////////////////////0877:99:99999999999999999999999999999999999'
+  +'999999998998988322101101111111111333::::::::::::::::::::9::9::9:99:99:99:99'
+  +'999999999999999999999999999999999998998988988988988888888888888888;;;;;;;;;'
+  +';;;;;;;;:;::888666666666777777888888999:::;;;;;;===>>>???===<<<>>>@@@BBBDDD'
+  +'FFFHHHKKKNNNPPPSSSWWWYYY___dddihimlmssswwwzzz}}}'#128''#128#132#131#132#133
+  +#133#133#136#136#136#139#139#139#145#145#145#150#150#149#154#154#154#159#159
+  +#159#165#165#165#170#171#170#176#176#176#181#181#181'\\\WWWXXXYYYZZZYYYYYYZZ'
+  +'ZYYYWWWWWWWWWVVVVVVTTTTTTTTTTTTRRRRRRRRRRRRQQQPPPNNNMMMMMMJJJHHHEEECCCAAA>>'
+  +'><<<999888666555444333333333444444555777888:::;;;<<<>>>????????????@@@???>>'
+  +'>=========<<<;;;;;;;;;::::::888777666444222000///.../,#"-]'#3'1'#240#0'1'
+  +#251#0'1'#255#0'0'#255#0'/'#255#0'/'#254#0'/'#250#0'.'#248#0'.'#245#0'-'#243
+  +#0'-'#242#0','#241#0','#240#0'*'#239#0'*'#238#0'*'#237#0')'#235#0')'#242#3
+  +''''#215#26'"G#"'#29'$$$%%%%%%&&&&&&&&&%%%$$$$$$$$$###"""!!!!!!!!!   '#31#31
+  +#31#31#31#31#31#31#31#31#31#31#30#30#30#29#29#29#28#28#28#28#28#28#28#28#28
+  +#27#27#27#26#26#26#25#25#25#25#25#25#24#24#24#23#23#23#22#22#22#22#22#22#22
+  +#22#22#21#21#21#21#21#21#20#20#20#20#20#20#20#20#20#19#19#19#19#19#19#18#18
+  +#18#18#18#18#18#18#18#17#17#17#15#15#15#14#14#14#13#13#13#12#12#12#11#11#11
+  +#10#10#10#18#18#18#176#176#176#171#170#171#165#164#164#159#158#158#153#152
+  +#152#148#147#147#142#142#142#137#136#136#131#131#131'~~~zzzuuupqpkklgggccc^^'
+  +'^[[ZVVVTSSOOOKKKHHIDDDABA>>><<<888556343000...---*)*''''''&&&$#$#"" ! '#31
+  ,#31#31#30#30#30#30#30#30#29#28#28#28#28#27#26#26#25#26#26#25#25#24#24#25#24
+  +#24#24#24#23#24#24#23#24#23#24#23#23#23#23#23#22#23#23#23#22#22#22#22#22#22
+  +#22#22#23#22#22#22#21#22#22#22#21#22#21#21#21#22#21#21#21#21#21#21#21#21#21
+  +#20#21#21#20#20#20#20#21#20#21#20#20#20#20#20#20#20#20#20#20#19#20#19#20#19
+  +#20#19#20#20#19#19#20#19#19#19#19#19#19#19#19#18#18#18#18#19#18#18#18#17#17
+  +#18#17#17#17#17#17#17#17#17#17#17#17#16#17#17#17#17#16#16#17#16#16#16#16#15
+  +#15#16#16#15#16#16#15#15#15#15#15#15#15#15#15#15#15#15#15#15#15#15#15#14#15
+  +#15#14#15#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#13#13#13#14
+  +#13#13#13#13#13#14#13#13#13#12#12#12#13#12#12#12#11#12#12#11#12#11#11#11#11
+  +#11#11#11#11#11#11#11#11#11#11#11#10#11#11#10#10#11#10#11#10#10#10#11#10#10
+  +#10#10#10#10#9#9#9#8#8#8#8#8#7#7#7#7#8#9#9#12#11#11#28#28#28'&''''...555:::/'
+  +'/0'#5#5#4#4#4#4#4#4#5#4#4#4#4#4#4#3#4#4#4#4#4#3#3#3#3#3#3#4#3#4#3#4#3#3#3#3
+  +#3#3#3#3#3#3#3#3#3#2#2#3#2#3#3#2#2#2#2#2#2#2#2#2#2#3#3#2#2#2#2#2#2#1#2#2#1#2
+  +#1#2#2#2#2#1#2#2#1#2#2#1#2#2#2#2#1#2#1#1#1#1#1#1#1#1#1#1#1#1#1#1#0#1#1#1#1#3
+  +#0#3#1#1#1'000yyy00000000000000000000000000000000000000000000000000000000000'
+  +'0000000000000000000000000000000000000000000000000000000000222444555777999;;'
+  +';===444.../////////////////0877:99:99:99:9999999999999999999999999999999999'
+  +'9999998998998655000101101111111111999::::::::::::::::::::9::9::9:99:99:99:9'
+  +'9999999999999999999999999999999999998998988988988988888888888888998;;;;;;;;'
+  +';;;;;;;;;:;::777666666777777888888999:::;;;;;;===>>>@@@AAABBB@@@@@@BBBDDDFF'
+  +'FHHHKKKNNNPPPSSSWWWYYY\\\```cccgggjjjooorrrvvv{{{'#131#131#131#135#135
+  +#135#140#140#140#145#145#145#150#150#150#154#154#154#159#159#159#165#165#165
+  +#171#171#171#176#176#176#181#181#181'\\\WWWYYYZZZZZZ[[[ZZZZZZZZZXXXWWWWWWWWW'
+  +'VVVVVVTTTTTTTTTTTTRRRRRRRRRRRRQQQPPPNNNNNNMMMKKKIIIFFFEEECCC@@@>>><<<;;;999'
+  +'999888777888888999:::;;;<<<===>>>???@@@AAA@@@@@@@@@@@@@@@???>>>=========<<<'
+  +';;;;;;;;;:::999777666444222///...+++,)'#31#16'/'#173#0'3'#255#0'2'#255#0'1'
+  +#252#0'1'#250#0'0'#249#0'/'#248#0'/'#247#0'/'#255#0'/'#255#0'.'#251#0'-'#247
+  +#0'-'#244#0','#243#0','#241#0'*'#239#0'*'#238#0'*'#242#2')'#229#23'!Q" '#20
+  +'###$$$%%%&&&&&&&&&&&&&&&%%%$$$$$$$$$######!!!!!!!!!!!!'#31#31#31#31#31#31#31
+  +#31#31#31#31#31#30#30#30#29#29#29#28#28#28#28#28#28#28#28#28#27#27#27#27#27
+  +#27#26#26#26#25#25#25#25#25#25#24#24#24#23#23#23#22#22#22#23#23#23#22#22#22
+  +#21#21#21#21#21#21#20#20#20#20#20#20#20#20#20#19#19#19#18#18#18#18#18#18#17
+  +#17#17#16#16#16#14#14#14#13#13#13#12#12#12#11#11#11#10#10#10#18#18#18#176#176
+  +#176#171#170#170#165#165#164#159#158#158#153#152#152#147#147#147#142#142#142
+  +#137#136#136#131#131#131'~~}zzzuuuqqqlllhggdcc^^^[[[VVVSSSPPOKKKIIIEDEABB>>>'
+  +'<<<888566343001...,--*))(''''&&&$$#"""!! '#31#31#31#30#30#30#30#30#30#28#29
+  +#28#27#28#27#26#26#25#26#26#25#26#26#26#26#26#26#26#26#26#25#25#25#26#25#25
+  +#25#25#26#25#25#25#25#24#24#24#24#25#24#24#25#22#22#22#22#22#22#22#22#22#21
+  +#22#22#21#22#22#21#21#21#21#21#21#21#21#21#21#21#21#21#21#21#21#21#21#21#20
+  +#20#20#20#20#20#20#20#19#20#20#19#20#20#19#20#20#19#20#19#19#19#20#19#20#19
+  +#19#19#19#19#19#18#19#18#18#18#18#18#18#17#18#18#18#17#18#17#17#18#17#17#17
+  +#17#17#16#16#16#16#16#16#16#17#16#16#16#16#16#16#16#15#16#16#16#16#16#15#16
+  +#15#15#15#15#15#15#15#15#15#15#14#15#15#14#15#15#15#14#14#14#15#15#14#14#14
+  +#14#14#14#14#14#14#14#14#13#14#13#14#13#14#14#13#13#14#13#13#13#13#13#13#13
+  +#12#13#13#12#12#12#11#12#12#12#11#12#12#12#11#11#11#11#12#11#11#11#11#10#11
+  +#10#11#11#11#11#11#10#11#10#11#10#10#10#10#10#10#10#10#10#8#8#8#8#8#7#7#7#7#8
+  +#9#8#10#10#9#18#18#19'$$$***111898<=<'#18#18#19#5#4#5#4#4#4#5#4#4#4#4#4#4#4#4
+  +#4#4#4#4#4#3#3#3#4#3#3#3#3#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#2#3#2#3
+  +#3#3#3#3#2#3#3#2#2#3#2#3#2#2#2#2#1#2#2#2#2#2#1#2#2#2#2#2#2#1#2#1#2#2#2#2#1#1
+  +#2#2#1#2#1#1#1#1#1#1#1#1#1#1#0#1#1#1#1#0#0#3#3#1#0#0'000yyy00000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0000000000000000000000222444555777999;;;===444.../////////////////0887:99:9'
+  +'9:99:99:9999999999999999999999999999999999999999899899888811100010110111111'
+  +'1444:::::::::::::::::::::::9::9::9:99:99:99:9999999999999999999999999999999'
+  +'9999998998988988988988888888888888999;;;;;;;;;;;;;;;;;::::77766677777788888'
+  +'8999:::;;;;;;===>>>@@@AAABBBEEDEEECCCDDDFFFHHHKKKNNNPPPSSSWWWYYY\\\```cccgg'
+  +'gjjjooorrrvvvzzz'#131#131#131#135#135#135#140#140#140#145#145#145#149#150
+  +#150#154#154#154#159#159#159#165#165#165#170#170#170#176#176#176#181#181#181
+  +']]]XXXYYY[[[[[[\\\[[[ZZZZZZYYYXXXWWWWWWWWWVVVVVVTTTTTTTTTTTTRRRRRRRRRRRRQQQ'
+  +'PPPOOONNNMMMKKKJJJHHHFFFDDDCCCAAA???>>>===<<<=========>>>>>>??????AAAAAAAAA'
+  +'AAAAAABBBBBBAAA@@@@@@@@@???>>>=========<<<;;;;;;;;;999777555333111///+++*)"'
+  +'#)C'#2'2'#242#0'3'#255#0'2'#253#0'2'#253#0'1'#251#0'1'#250#0'0'#250#0'/'#251
+  +#10'+'#184#10'*'#182#5'+'#209#2','#230#1','#236#0','#242#0'-'#248#0'-'#254#0
+  +','#254#0'+'#245#19'"h!'#30#18'!!!###$$$%%%''''''&&&''''''''''''&&&&&&%%%$$$'
+  ,'$$$$$$######!!!!!!!!!!!!'#31#31#31#31#31#31#31#31#31#31#31#31#30#30#30#29#29
+  +#29#28#28#28#28#28#28#28#28#28#27#27#27#27#27#27#25#25#25#25#25#25#25#25#25
+  +#25#25#25#24#24#24#23#23#23#23#23#23#23#23#23#22#22#22#21#21#21#20#20#20#20
+  +#20#20#20#20#20#19#19#19#19#19#19#18#18#18#17#17#17#15#15#15#14#14#14#12#12
+  +#12#11#11#11#10#10#10#19#19#19#176#176#176#171#171#171#165#164#164#159#159
+  +#158#153#152#152#148#147#147#143#142#142#137#137#136#132#131#131'~~~zzyuuupp'
+  +'plllhhhcdc^_^[[[VVVTTTPOOKKKIIIEDEAAA??><<<888665433000...---***''((&&&$$$"'
+  +'##  !! '#31'  '#31'  '#31'  '#31#31#31#31#31#30#30#30#30#30#30#29#30#29#29
+  +#29#29#28#29#30#28#28#30#29#28#29#29#28#29#29#29#29#29#29#28#28#29#29#29#28
+  +#28#28#28#29#28#29#28#28#28#27#27#27#26#26#26#25#25#24#24#23#23#22#22#23#21
+  +#21#21#21#21#21#21#21#20#20#21#21#21#20#21#20#20#20#20#20#20#20#20#20#20#20
+  +#19#20#19#19#20#19#19#19#19#19#19#19#19#19#19#18#19#19#18#19#18#18#18#17#18
+  +#18#17#17#18#17#17#18#17#17#17#17#17#17#17#17#17#16#17#16#16#17#16#16#16#16
+  +#16#16#16#16#16#16#16#16#15#16#15#16#16#16#16#15#15#15#15#15#15#15#15#15#15
+  +#15#15#15#15#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14#14
+  +#14#14#13#13#14#13#13#13#13#13#13#13#13#12#12#13#12#12#12#12#12#11#11#11#12
+  +#11#12#11#11#12#11#12#11#11#11#11#11#10#11#10#11#11#10#11#10#10#10#11#11#11
+  +#10#9#9#10#8#8#8#8#8#8#8#8#8#9#8#9#12#11#12#27#28#27'''''''./.555:::000'#5#5
+  +#5#4#5#4#5#5#5#5#4#4#4#4#5#5#4#5#4#4#4#4#4#3#4#4#3#4#3#4#4#4#3#3#4#3#3#3#4#3
+  +#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#2#3#2#3#2#3#2#3#3#2#3#2#2#2#2#2#2#2#2#2#1#2
+  +#2#2#1#2#1#1#2#2#2#1#1#2#1#1#2#2#2#2#2#1#2#2#2#1#1#1#1#1#1#1#1#1#1#1#1#1#3#3
+  +#3#1#0#1'000yyy0000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000000000222444555777999;;;===444.'
+  +'../////////////////0888::9:99:99:99:99:999999999999999999999999999999999999'
+  +'99999998998988433000000101101111111::9:::::::::::::::::::::::9::9::9:99:99:'
+  +'99:99999999999999999999999999999999999998998988988988988888888888888:::;;;;'
+  +';;;;;;;;;;;;;::::777777777888888999:::;;;;;;===>>>@@@AAABBBEEDFFEHGGIIIHHHI'
+  +'IIJJJNNNPPPSSSWWWYYY\\\```cccgggjjjnnnrrrvvvzzz~~~'#131#131#131#135#135#135
+  +#140#140#140#145#145#145#150#150#149#154#154#154#159#159#159#165#165#165#170
+  +#170#170#177#177#177#183#183#183'___ZZZZZZ[[[]]]]]]\\\[[[ZZZYYYYYYXXXWWWWWWW'
+  +'WWVVVVVVTTTTTTTTTTTTRRRRRRRRRRRRQQQPPPOOONNNNNNLLLJJJIIIGGGFFFEEEDDDCCCBBBB'
+  +'BBAAAAAAAAAAAABBBBBBBBBCCCCCCCCCCCCBBBBBBBBBBBB@@@@@@@@@@@@???>>>=========<'
+  +'<<;;;;;;:::888555222000,,,))))&'#27#17'.'#160#0'5'#255#0'3'#255#0'2'#255#0
+  +'2'#254#0'2'#253#0'1'#251#0'2'#255#7'.'#207'""$! '#28#30#31'%'#28#30'+'#24#31
+  +'>'#20' U'#17'"l'#14'$'#131#11'&'#162#16'#| '#30#23'! '#31'"##$$$&&&'''''''''
+  +'''''''''''''''''''''''''''''&&&&&&%%%$$$$$$$$$######"""!!!""""""         '
+  +#31#31#31#30#30#30#29#29#29#29#29#29#28#28#28#28#28#28#27#27#27#26#26#26#25
+  +#25#25#25#25#25#25#25#25#25#25#25#23#23#23#23#23#23#23#23#23#23#23#23#22#22
+  +#22#21#21#21#20#20#20#20#20#20#20#20#20#19#19#19#18#18#18#17#17#17#16#16#16
+  +#15#15#15#13#13#13#12#12#12#10#10#10#20#20#20#176#176#176#170#170#170#164#164
+  +#164#159#158#159#153#152#152#148#147#147#143#142#142#137#136#137#132#131#131
+  +'~~~zzzuuuppplllhhhccc^^_\[[VVVTTTOPOKKLIIIEEEBBB>??;;;888555443000...---***'
+  +'(((''((''&&&&&$$$$"##""!! !!    '#31#31#31#30#30#31#29#30#30#29#29#29#29#28
+  +#29#29#29#29#29#28#29#29#29#29#30#29#28#29#29#29#29#29#29#28#28#29#28#29#28
+  +#28#28#28#29#28#28#28#28#28#28#27#28#29#28#28#29#28#28#28#28#27#27#27#28#26
+  +#26#26#24#23#24#22#22#21#21#20#20#20#20#20#21#20#20#20#20#20#20#19#19#20#20
+  +#20#19#19#19#19#20#20#19#20#19#19#19#19#19#19#18#19#18#18#18#18#18#19#18#17
+  +#19#18#17#18#17#17#17#17#17#17#16#16#17#17#17#17#17#16#16#17#17#17#16#17#16
+  +#16#16#16#16#16#16#16#16#16#16#16#15#15#15#15#16#16#15#15#15#15#15#15#15#15
+  +#15#14#15#15#15#15#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#13#14
+  +#14#13#14#14#13#14#14#13#13#13#12#12#13#12#12#12#12#12#12#12#11#11#12#11#11
+  +#12#12#12#12#12#11#11#12#11#11#11#11#11#10#11#11#11#11#11#11#11#10#10#9#8#8#8
+  +#8#8#9#8#8#9#8#9#9#10#10#17#17#18'$##++*122888==='#23#23#23#5#5#4#4#4#5#4#4#4
+  +#5#4#4#4#5#4#5#4#4#4#4#5#4#4#4#4#4#4#3#3#4#4#3#3#4#3#3#3#4#3#3#4#3#3#3#3#3#3
+  +#3#3#3#3#3#3#3#3#2#3#2#2#3#2#3#2#3#2#3#3#3#2#2#3#2#2#2#2#2#2#2#2#2#2#2#2#1#1
+  +#2#2#1#2#2#1#1#2#2#1#1#1#1#2#2#1#1#1#1#1#1#1#1#1#1#1#0#1#1#3#0#3#1#1#1'000yy'
+  +'y00000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0000000000000000000000000000000000222444555777999;;;===444...//////////////'
+  +'///0888::9::9::9:99:99:99:99:9999999999999999999999999999999999999999899899'
+  +'8877000000000101101111655::::::::::::::::::::::::::9::9::9:99:99:99:9999999'
+  +'9999999999999999999999999999998998988988988988888888888888:::;;;;;;;;;;;;;;'
+  +';;;:;::999777888888999:::;;;;;;===>>>@@@AAABBBEEDFFEHHGJIILKKNMMOOOPPPQQRSS'
+  +'SWWWYYY\\\___cccgggjjjnnnrrrvvvzzz~~~'#130#130#130#135#135#135#140#140#140
+  +#145#145#145#150#150#150#155#155#155#161#161#161#167#166#166#172#172#172#178
+  ,#178#178#183#183#183'___[[[\\\\\\]]]]]]]]]\\\[[[YYYYYYYYYXXXWWWWWWWWWVVVVVVT'
+  +'TTTTTTTTTTTRRRRRRRRRRRRQQQPPPOOONNNNNNLLLLLLJJJIIIIIIGGGFFFEEEEEEEEEDDDDDDD'
+  +'DDDDDEEEEEEDDDDDDDDDDDDDDDBBBBBBBBBBBB@@@@@@@@@@@@???>>>=========<<<;;;:::8'
+  +'88555222...+++)''!!''@'#4'4'#242#1'5'#255#1'4'#255#0'4'#255#0'2'#255#0'2'
+  +#254#0'2'#254#0'2'#255#23'''j%"'#22'#"!! '#30' '#31#28#31#30#24#31#29#21#31
+  +#29#18#31#28#15' '#30#22'!'#31#25'! '#31'"""$$$%%%&&&((((((((((((((('''''''''
+  +'''''&&&&&&%%%%%%%%%%%%$$$$$$############"""""""""!!!'#31#31#31#31#31#31#29
+  +#29#29#29#29#29#28#28#28#28#28#28#26#26#26#25#25#25#25#25#25#25#25#25#25#25
+  +#25#23#23#23#23#23#23#23#23#23#23#23#23#22#22#22#21#21#21#20#20#20#20#20#20
+  +#20#20#20#18#18#18#17#17#17#16#16#16#15#15#15#14#14#14#12#12#12#11#11#11#19
+  +#19#19#176#176#176#170#170#170#164#164#164#158#158#158#153#152#152#148#147
+  +#147#142#142#142#137#137#137#132#131#132'~~yyyuuuppplllhhhccc^__[\[VVVSSSPP'
+  +'PLKKIIIEEEBBB>??;;<888555434111/////.-,,*++*))''''(&&&$#$####!!!! !!   '#31
+  +#30#31#31#31#30#31#29#30#29#29#29#29#29#29#29#29#29#29#29#29#28#29#28#28#29
+  +#29#28#29#29#28#29#29#29#29#29#28#29#29#29#28#29#28#28#28#28#28#28#28#28#28
+  +#28#28#28#28#29#27#27#29#28#27#29#28#27#28#28#28#28#29#28#28#28#28#28#27#27
+  +#25#25#24#23#23#22#20#20#21#20#20#20#20#20#20#20#20#20#19#20#20#19#19#19#19
+  +#19#19#19#19#19#19#19#18#19#18#18#19#18#18#19#17#18#18#17#17#18#17#17#17#17
+  +#17#17#17#16#17#17#17#16#16#16#16#17#17#16#16#16#16#16#16#16#16#16#16#15#16
+  +#16#16#16#16#16#16#15#15#15#15#16#15#15#15#15#15#15#15#14#14#15#14#14#14#14
+  +#15#15#15#14#14#14#14#14#14#14#14#14#14#14#13#13#14#13#13#14#13#13#13#14#12
+  +#13#13#12#12#12#12#12#12#12#11#12#12#11#12#12#12#12#11#11#11#11#11#12#11#11
+  +#11#11#11#11#11#11#11#11#11#9#10#9#8#9#8#8#9#8#8#8#8#10#9#9#11#11#11#25#25#25
+  +'&''''---655;:;887'#5#5#5#5#5#4#5#4#4#4#5#5#5#4#5#4#4#5#4#4#5#4#4#4#5#4#4#4#3
+  +#4#4#4#4#4#4#4#3#3#3#3#4#3#3#3#3#4#3#3#3#4#3#3#4#3#3#3#3#3#3#2#2#3#3#3#3#2#2
+  +#2#2#2#2#2#3#2#2#2#2#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2#1#2#2#1#1#2#1#2#2#2
+  +#1#2#1#1#2#1#1#2#2#2#1#1#3#3#3#1#1#1'000yyy000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000222'
+  +'444555777999;;;===444.../////////////////0888::9::9::9::9:99:99:99:99:99999'
+  +'999999999999999999999999999999999998998998988222000000000101101111:::::::::'
+  +'::::::::::::::::::::9::9::9:99:99:99:99999999999999999999999999999999999998'
+  +'998988988988988888888888888;::;;;;;;;;;;;;;;;;;:<;;999888888999:::;;;;;;==='
+  +'>>>???AAABBBEEEFFEHHGJIILKKNMMQPPSRRVUUYXXZZZ\[\___``accdgggjjjnnnqqqvvv{{{'
+  +''#131#131#131#137#137#137#142#142#142#147#147#147#153#153#153#157#157#157
+  +#162#162#162#167#167#167#172#172#172#178#177#177#183#183#183'ggg\\\]]]]]]^^^'
+  +']]]]]]]]]\\\[[[YYYYYYYYYXXXWWWWWWWWWVVVVVVTTTTTTTTTTTTRRRRRRRRRRRRQQQPPPOOO'
+  +'OOONNNMMMLLLKKKJJJJJJIIIHHHHHHHHHGGGGGGFFFFFFFFFFFFFFFEEEEEEEEEDDDDDDBBBBBB'
+  +'BBBBBB@@@@@@@@@@@@???>>>=========;;;:::888555222...**)(&'#30#17'/'#165#1'7'
+  +#255#3'5'#255#2'5'#255#1'4'#255#0'4'#255#0'2'#255#0'3'#255#6'/'#215'#$)%$!$$'
+  +'$$$$""""""!!!!!!!!!""!##"###$$$%%%''''''((()))(((((())))))'''''''''''''''''
+  +'''&&&&&&&&&%%%%%%&&&%%%%%%%%%&&&&&&&&&%%%$$$$$$###!!!   '#30#30#30#29#29#29
+  +#29#29#29#27#27#27#27#27#27#25#25#25#25#25#25#25#25#25#25#25#25#23#23#23#23
+  +#23#23#23#23#23#23#23#23#22#22#22#21#21#21#20#20#20#20#20#20#19#19#19#18#18
+  +#18#17#17#17#15#15#15#14#14#14#13#13#13#11#11#11#31#31#31#177#176#176#170#170
+  +#170#164#164#164#158#158#158#153#153#153#148#147#147#143#142#142#137#137#137
+  +#132#131#132'~~yyyuuuppqlllgggccc^__[\\VVVSSSPPPLLLHHHEEEBBB=>>;;<898665543'
+  +'222201///--,++*))(''((&&&$$$###"""" !!!   '#31#31#31#30#31#30#31#30#30#29#30
+  +#29#30#30#29#29#29#29#29#29#29#29#29#28#29#29#28#28#29#29#28#29#29#28#29#29
+  +#29#29#29#29#28#29#29#28#29#28#29#28#28#29#28#28#28#28#28#28#28#27#28#28#28
+  +#29#28#28#29#28#28#28#28#28#28#28#28#28#28#27#27#28#28#27#27#28#27#27#28#25
+  +#26#25#23#23#22#20#20#20#19#20#19#19#19#19#20#19#19#19#19#19#19#19#19#18#18
+  +#18#19#18#18#18#18#17#18#18#18#18#17#17#17#17#17#17#17#17#17#16#17#17#16#16
+  +#17#16#17#16#16#16#16#16#16#16#16#16#16#16#16#16#16#16#16#16#16#15#16#16#15
+  +#16#15#15#15#16#15#15#15#15#15#15#14#15#14#14#15#14#14#14#15#14#15#14#14#14
+  +#14#14#14#14#14#14#14#14#14#14#14#13#13#13#13#14#13#12#12#13#12#12#12#12#12
+  +#12#11#12#12#11#12#11#11#11#11#12#11#11#11#11#11#11#11#11#11#11#11#11#11#9#8
+  +#9#9#8#8#9#8#9#10#9#9#9#9#9#15#15#15'###***111999==='#26#26#26#6#5#5#5#5#5#5
+  +#5#4#5#5#4#5#5#5#4#4#5#4#5#4#5#4#4#4#4#4#4#5#4#4#4#4#4#4#4#4#4#4#4#3#4#4#4#3
+  +#3#3#4#3#3#3#3#3#3#3#3#3#3#3#3#2#3#3#2#3#3#3#2#2#3#2#2#2#2#2#3#2#2#2#2#3#2#2
+  +#2#2#2#2#2#1#2#2#2#2#2#1#2#2#2#2#1#1#1#1#1#2#1#2#1#2#1#1#1#1#1#1#1#1#3#3#3#1
+  +#1#1'000yyy00000000000000000000000000000000000000000000000000000000000000000'
+  +'0000000000000000000000000000000000000222444555777999;;;===444...///////////'
+  +'//////0888::::::::9::9::9:99:99:99:99:99:9999999999999999999999999999999999'
+  +'9999998998988666000000000000101101777:::::::::::::::::::::::::::::9::9::9:9'
+  ,'9:99:99:99999999999999999999999999999999999998998988988988988888888888988;;'
+  +':;;;;;;;;;;;;;;;<<;<;;;;;888999:::;;;;;;===>>>???AAABBBDDDFFEHHGJIILKKNMMQP'
+  +'PSRRVUUXXX[[[_^^a``dddgggjjjnnnrrruuuzzz}}}'#129#129#129#134#134#134#138#138
+  +#138#142#142#142#147#147#147#152#152#152#157#157#157#162#162#162#167#167#167
+  +#171#171#171#177#177#177#182#182#182'mmm]]]^^^_________^^^]]]]]][[[ZZZYYYYYY'
+  +'YYYXXXWWWWWWWWWVVVVVVTTTTTTTTTTTTRRRRRRRRRRRRQQQPPPOOOOOOOOONNNMMMLLLLLLLLL'
+  +'KKKJJJIIIJJJIIIHHHHHHGGGGGGGGGFFFEEEEEEEEEDDDDDDBBBBBBBBBBBB@@@@@@@@@@@@???'
+  +'>>>=========;;;888666222...+)#!(I'#5'7'#252#3'7'#255#4'6'#255#3'5'#255#2'5'
+  +#255#1'4'#255#0'4'#255#0'3'#255#21'+'#130')%'#25'''''''''''''''''''''''''%%%'
+  +'%%%%%%%%%%%%&&&&&&''''''((())))))************))))))''''''''''''''''''&&&&&&'
+  +'&&&&&&''''''(((((()))***++++++******(((''''''%%%###!!!'#31#31#31#29#29#29#29
+  +#29#29#28#28#28#27#27#27#25#25#25#25#25#25#25#25#25#25#25#25#23#23#23#23#23
+  +#23#23#23#23#23#23#23#22#22#22#21#21#21#20#20#20#19#19#19#18#18#18#17#17#17
+  +#16#16#16#14#14#14#13#13#13#12#12#12')))'#175#175#175#169#169#169#163#163#163
+  +#158#158#158#153#152#152#147#146#146#142#141#141#137#136#136#131#131#130'~'
+  +'yyytttooolllgggbbb___Z[[VWWSSSOOOLKLHIIDEEBBB>>><<<;;:787555333110//.--,++*'
+  +'))((''(''&''$$%###"!"!!   '#31#30#30#29#28#27#27#28#27#27#25#25#25#25#25#24
+  +#25#24#24#24#24#25#25#24#24#24#24#24#24#23#24#23#24#24#24#24#23#23#24#23#25
+  +#25#25#25#25#25#26#25#26#26#26#27#28#29#29#28#29#28#28#28#28#28#27#28#28#28
+  +#27#28#28#27#28#28#28#28#28#28#28#28#28#28#28#28#28#28#28#28#27#27#27#27#27
+  +#27#27#27#27#27#27#24#24#24#21#21#21#20#20#19#20#19#19#19#19#18#19#18#18#19
+  +#18#18#19#17#18#18#17#17#18#17#17#18#17#17#17#17#17#17#16#17#17#17#17#17#16
+  +#17#17#17#16#17#16#16#16#16#16#16#16#16#16#16#16#16#16#15#16#15#15#15#15#15
+  +#15#15#15#15#15#15#15#15#15#15#15#15#14#14#14#14#15#15#15#15#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#13#13#14#13#14#14#12#12#13#12#12#12#13#12#12#12
+  +#12#12#12#12#11#11#12#12#12#12#12#11#11#11#11#11#11#11#11#10#10#10#9#9#9#8#9
+  +#9#9#8#9#10#10#9#11#11#12#25#25#25'''''''-..554;;;887'#5#6#6#5#5#5#5#5#6#5#5
+  +#5#5#5#5#4#4#5#5#5#5#5#4#5#4#4#5#4#5#4#4#4#4#4#4#4#4#4#4#4#4#3#4#4#4#3#3#3#3
+  +#4#4#3#3#4#3#4#4#3#3#4#3#3#3#3#3#3#2#3#3#3#3#3#2#3#2#3#3#2#2#3#3#2#2#3#2#2#2
+  +#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#2#1#1#1#2#2#1#2#1#1#1#1#1#2#3#3#5#1#1
+  +#1'000yyy0000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000222444555777999;;;===444...////////////////'
+  +'/0888:::::::::::9::9::9::9:99:99:99:99:999999999999999999999999999999999999'
+  +'99998998998988111000000000000101222::::::::::::::::::::::::::::::::9::9::9:'
+  +'99:99:99:99999999999999999999999999999999999998998988988988988888888888988;'
+  +'::;;;;;;;;;;;;<<<<<;=<<<<<::::::;;;;;;===>>>???AAABBBDDDFFFHHGJJILKKNMMQPPS'
+  +'RRUTTXXX[[[_^^a``cccgggjjjnnnqqquuuyyy}}}'#129#129#129#134#134#134#138#138
+  +#138#142#142#142#147#147#147#152#152#152#157#157#157#161#161#161#167#167#167
+  +#171#171#171#176#176#176#182#182#181'ttt^^^``````aaaaaa___]]]]]]\\\[[[ZZZYYY'
+  +'YYYYYYXXXWWWWWWWWWVVVVVVTTTTTTTTTTTTRRRRRRRRRRRRQQQPPPOOOOOOOOONNNNNNMMMLLL'
+  +'LLLLLLKKKJJJJJJJJJIIIHHHGGGGGGGGGFFFEEEEEEEEEDDDDDDBBBBBBBBBBBB@@@@@@@@@@@@'
+  +'???>>>======;;;999666222///*)&$&0'#11'4'#213#4'9'#255#4'7'#255#4'6'#255#3'5'
+  +#255#2'5'#255#0'4'#255#3'2'#241'$)>*)$***++++++******))))))((((((((()))*****'
+  +'*******+++************))))))''''''''''''''''''&&&''''''''''''(((***,,,...//'
+  +'/000111111000///---***(((%%%"""   '#30#30#30#29#29#29#28#28#28#27#27#27#25
+  +#25#25#25#25#25#25#25#25#25#25#25#23#23#23#23#23#23#23#23#23#23#23#23#22#22
+  +#22#21#21#21#19#19#19#19#19#19#17#17#17#16#16#16#14#14#14#13#13#13#12#12#12
+  +'544'#175#175#174#169#168#169#163#163#163#158#158#158#152#152#152#147#147#146
+  +#142#142#141#137#136#136#131#131#131'~~~yyytttppolllgggbbb___[[[WVWRRROOOLLL'
+  +'IIIEDEBBC@@@=<=:;:7875553330/0/./-,,++*)((((''&%%"!!'#31#31#31#29#29#29#28
+  +#28#28#28#27#27#26#26#25#25#24#24#24#24#24#23#23#22#22#23#23#22#23#23#22#22
+  +#23#22#22#22#22#22#22#22#21#22#22#21#21#21#21#21#21#21#21#21#22#21#21#21#21
+  +#21#21#21#20#21#21#21#20#21#21#21#21#23#22#22#24#24#24#26#26#26#28#27#28#28
+  +#28#27#29#28#27#28#28#28#28#28#28#28#27#28#27#28#27#27#27#28#27#27#27#28#27
+  +#27#28#27#27#28#27#27#26#25#24#21#21#21#19#19#18#19#19#18#19#18#18#19#18#18
+  +#19#18#18#18#17#17#18#17#17#17#18#18#17#17#17#17#17#17#17#17#17#16#17#17#16
+  +#17#17#16#16#16#16#17#16#16#16#16#16#16#16#16#16#16#15#16#15#15#15#15#15#15
+  +#15#15#15#15#15#15#15#15#15#15#14#14#15#15#15#15#14#15#15#15#15#15#14#14#14
+  +#13#14#14#13#14#14#13#13#14#13#13#13#13#12#12#12#13#12#12#12#12#11#12#12#12
+  +#11#11#12#12#11#11#11#12#11#11#11#11#11#12#10#9#9#9#9#9#9#9#9#8#8#8#10#9#9#14
+  +#15#14'###)))000999==<'#30#30#30#6#5#5#6#6#5#5#5#6#5#5#5#5#5#5#5#4#5#5#5#4#5
+  +#4#4#5#4#4#4#5#4#5#4#4#4#5#4#4#4#4#4#4#4#4#4#4#4#3#4#4#3#3#4#3#4#4#3#4#3#3#3
+  +#3#3#3#3#3#3#3#3#3#3#3#2#3#3#2#2#2#2#3#2#2#3#3#2#2#2#3#2#2#2#2#2#2#2#2#2#2#2
+  +#1#2#2#1#2#2#1#2#1#2#2#1#1#1#1#1#1#1#1#1#1#1#3#3#3#2#1#2'000yyy0000000000000'
+  ,'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000222444555777999;;;===444.../////////////////0888::::::::::::::9::9:'
+  +':9::9:99:99:99:99:999999999999999999999999999999999999999999989989886550000'
+  +'00000000000101655::::::::::::::::::::::::::::::::9::9::9:99:99:99:999999999'
+  +'99999999999999999999999999998998988988988988888888888888:::;;;;;;;;;<<<<<<='
+  +'=<=<<>===<<;;;;;;===>>>???AAABBBDDDFFFGGFJJILKKNMMQPPSRRUTTXXX[ZZ^]]a``cccg'
+  +'ggjjjmmmqqquuuxxx|||'#129#129#129#133#133#133#138#138#138#142#142#142#146
+  +#146#146#151#151#151#156#156#156#160#160#160#166#166#166#171#171#171#176#176
+  +#176#182#182#182'}}}```aaaaaabbbbbb```___]]]]]][[[[[[ZZZYYYYYYYYYXXXWWWWWWWW'
+  +'WVVVVVVTTTTTTTTTTTTRRRRRRRRRRRRQQQPPPOOOOOOOOONNNNNNLLLLLLLLLLLLJJJJJJJJJJJ'
+  +'JIIIHHHGGGGGGGGGFFFEEEEEEEEEDDDDDDBBBBBBBBBBBB@@@@@@@@@@@@???>>>===<<<99966'
+  +'6333///+++(%'#27#27')a'#5'9'#254#5'8'#255#4'7'#255#4'6'#255#3'5'#255#0'5'
+  +#255#15'0'#178',*"--,...//////......---,,,,,,+++++++++,,,,,,,,,+++++++++++++'
+  +'++******))))))(((''''''''''''&&&'''''')))+++---222444666888999999888555111.'
+  +'..***&&&###   '#31#31#31#29#29#29#28#28#28#26#26#26#25#25#25#25#25#25#25#25
+  +#25#25#25#25#23#23#23#23#23#23#23#23#23#23#23#23#22#22#22#20#20#20#19#19#19
+  +#18#18#18#16#16#16#15#15#15#13#13#13#12#12#12'BBB'#175#175#175#169#168#168
+  +#163#163#163#158#157#157#151#151#151#146#146#146#141#141#141#136#135#135#131
+  +#130#130'~~~yyytttoookkkgggbbb^^^ZZZWWWSRROOOKKKIIHFFFCCC@@?===:;;7885552220'
+  +'00//.,,+*)(&&&###"!"  '#31#30#30#31#29#29#29#29#28#28#28#27#26#26#26#25#25
+  +#24#24#25#24#25#23#23#23#23#23#23#23#23#23#23#23#23#23#23#22#22#22#22#22#22
+  +#22#22#22#22#22#22#22#21#22#22#22#22#21#21#21#21#21#21#21#21#21#21#20#20#21
+  +#20#20#21#20#20#21#20#19#20#20#19#20#19#19#19#20#21#20#24#23#24#26#26#26#28
+  +#28#28#28#28#28#28#28#28#27#28#28#27#27#28#27#27#27#27#27#27#28#27#27#28#26
+  +#27#28#27#27#26#26#25#21#22#21#19#19#18#19#18#18#18#17#18#19#18#18#18#18#17
+  +#17#18#17#17#17#17#17#17#17#17#17#17#17#16#17#16#16#17#16#16#16#17#17#16#16
+  +#17#16#16#16#16#16#16#16#15#15#16#16#16#15#15#16#16#16#15#15#15#15#15#14#15
+  +#15#15#15#14#15#15#15#15#14#14#15#15#15#14#14#14#14#15#14#14#14#14#14#13#13
+  +#13#13#14#13#12#12#13#13#13#13#12#12#12#12#12#12#12#12#11#11#12#12#12#12#12
+  +#12#12#11#10#11#9#9#9#9#9#9#9#9#9#10#10#9#12#12#12#25#24#24'&&&---444;;;;;;'
+  +#10#10#10#5#6#6#6#6#5#5#5#5#6#5#5#5#5#5#5#5#5#4#5#5#5#5#5#4#5#4#5#5#5#4#5#5#5
+  +#4#5#4#4#4#4#4#4#4#4#3#4#4#4#4#4#4#4#3#3#3#3#3#4#3#3#4#3#3#4#3#3#3#3#3#3#3#3
+  +#3#3#3#3#2#2#2#2#2#3#3#3#2#2#2#3#3#2#2#2#3#2#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2
+  +#1#2#2#1#1#1#1#1#1#2#3#3#3#1#1#1'000yyy0000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000000000000000222444555777999;;;='
+  +'==444.../////////////////0888::::::::::::::::::::9::9::9::9:99:99:99:99:999'
+  +'99999999999999999999999999999999999998998988988111000000000000000111:::::::'
+  +'::::::::::::::::::::::::::::9::9::9:99:99:99:999999999999999999999999999999'
+  +'99999998998988988988988888888888888::9;;;;;;<<<<<<=====<>==>==???<<<===>>>?'
+  +'??@@@BBBDDDFFFGGFJJILKKNMMQPPSRRUTTXWW[ZZ^]]a``cbbfffjjjmmmqqquuuxxx|||'#128
+  +#128#128#133#133#133#137#137#137#141#141#141#146#146#146#150#150#150#155#155
+  +#155#160#160#160#165#165#165#171#171#171#175#175#175#181#181#181#134#134#134
+  +'bbbbbbccccccbbbaaa```]]]]]]\\\\\\[[[ZZZYYYYYYYYYXXXWWWWWWWWWVVVVVVTTTTTTTTT'
+  +'TTTRRRRRRRRRRRRQQQPPPOOOOOOOOONNNNNNLLLLLLLLLLLLJJJJJJJJJJJJIIIHHHGGGGGGGGG'
+  +'FFFEEEEEEEEEDDDDDDBBBBBBBBBBBB@@@@@@@@@@@@???===<<<:::888333000+++''''&$#'
+  +#28#15'1'#181#4':'#255#5'8'#255#4'7'#255#3'6'#255#2'5'#255' .j1. 11133333344'
+  +'4444222000000...---......------------,,,,,,,,,++++++***))))))((('''''''''''
+  +'''&&&''''''(((,,,///333888<<<>>>@@@@@@@@@===999555000,,,''''''###   '#31#31
+  +#31#29#29#29#28#28#28#27#27#27#25#25#25#25#25#25#25#25#25#25#25#25#23#23#23
+  +#23#23#23#23#23#23#22#22#22#21#21#21#20#20#20#18#18#18#16#16#16#15#15#15#14
+  +#14#14#12#12#12'RRR'#174#174#173#168#168#167#163#163#162#157#156#156#151#150
+  +#150#146#145#145#141#139#140#135#134#134#130#129#129'}}}yyysssoookkkfffbbb^^'
+  +'^ZZZVVVRRQOOPLLLIIIEEECBCA@?==<;;;788556111...,++())&&&&%%###"""'#31' '#31
+  +#31#30#30#29#29#29#29#29#29#28#27#27#27#26#26#26#25#25#25#24#24#24#23#23#23
+  +#23#23#23#22#23#23#22#22#22#22#23#22#22#23#22#22#22#22#22#22#22#22#22#21#21
+  +#22#22#22#22#21#22#21#22#21#21#21#21#21#21#21#21#21#21#20#20#20#20#21#20#21
+  +#20#20#20#20#19#20#19#19#19#18#19#18#18#19#18#20#19#20#22#22#22#26#26#26#28
+  +#28#28#28#28#28#28#28#27#27#28#27#27#27#27#28#27#27#28#27#26#27#27#26#27#27
+  +#27#25#26#26#21#21#21#19#18#18#19#18#17#18#18#18#18#17#17#18#17#18#18#17#17
+  +#17#18#17#17#17#16#17#17#17#17#16#16#16#16#17#16#16#16#16#16#16#16#16#16#15
+  +#16#15#16#15#16#15#16#16#15#15#15#15#15#15#15#15#15#15#15#15#15#15#15#14#14
+  +#14#14#14#15#14#14#14#15#14#14#14#14#14#14#13#14#14#13#13#13#12#13#14#12#13
+  +#12#12#12#12#13#12#12#12#12#11#11#12#12#12#12#12#11#12#10#9#9#9#9#9#9#9#10#9
+  +#9#9#10#10#10#14#14#13'"!")))000888===###'#5#6#6#5#5#6#5#6#6#5#6#6#6#5#6#6#5
+  ,#5#5#5#5#5#5#5#5#5#5#5#5#5#4#4#4#4#5#5#4#4#4#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4
+  +#4#3#3#3#4#3#3#4#3#3#4#3#3#4#3#3#3#3#3#3#3#3#3#2#3#3#2#3#3#3#3#2#2#2#2#2#2#3
+  +#3#2#3#2#3#2#2#2#2#2#2#2#2#2#2#2#1#2#1#2#1#2#2#2#1#1#1#1#1#1#5#3#5#1#2#1'000'
+  +'yyy000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000222444555777999;;;===444.../////////////////0888:::::::::'
+  +'::::::::::::::9::9::9::9:99:99:99:99:99999999999999999999999999999999999999'
+  +'998998998988555000000000000000000655;::::::::::::::::::::::::::::::::::9::9'
+  +'::9:99:99:99:99999999999999999999999999999999999998998988988988988888888888'
+  +'888999;;;<<<<<<======>>=>==@?????@@@??????@@@BBBDDDFFFGGGJJILLKNMMQPPSRRUTT'
+  +'XWW[ZZ]\\a``cbbfffjjjmmmqqquuuxxx|||'#128#128#128#132#132#132#136#136#136
+  +#141#141#141#146#146#146#150#150#150#155#155#155#160#160#160#164#164#164#170
+  +#170#170#175#175#175#180#180#180#143#144#144'cccddddddccccccbbb```___]]]\\\\'
+  +'\\\\\[[[ZZZYYYYYYYYYXXXWWWWWWWWWVVVVVVTTTTTTTTTTTTRRRRRRRRRRRRQQQPPPOOOOOOO'
+  +'OONNNNNNLLLLLLLLLLLLJJJJJJJJJJJJIIIHHHGGGGGGGGGFFFEEEEEEEEEDDDCCCBBBBBBBBBB'
+  +'BB@@@@@@@@@???>>>===;;;888666111---)))&%'#29#31'&E'#8'8'#243#5'9'#255#5'8'
+  +#255#4'7'#255#2'6'#255#22'2'#159'22/65.:::???AAA???<<<999444222000000///....'
+  +'........---,,,,,,,,,+++***)))((((((''''''&&&&&&&&&&&&***///443;:8AA>EEBHHFH'
+  +'HHGGHEEEAAA<<<777222,,,''''''###   '#30#30#30#29#29#29#28#28#28#26#26#26#25
+  +#25#25#25#25#25#25#25#25#25#25#25#23#23#23#23#23#23#22#22#22#21#21#21#20#20
+  +#20#18#18#18#16#16#16#15#15#15#14#14#14#12#12#12'ddd'#173#173#173#167#167#167
+  +#162#162#161#156#155#155#151#151#150#146#145#145#141#140#140#135#135#134#130
+  +#129#129'}||xxxsssooojijfffbbb]^]ZZZVVUSRRPPOKLKIIIEEECBCA??>=<;::765233//.-'
+  +'--+++)()&&&%%&##$"""  '#31#31#31#31#29#30#30#30#29#29#28#28#28#27#26#26#26
+  +#25#25#26#25#25#24#24#23#24#24#23#23#23#23#23#23#23#23#22#22#23#22#22#22#22
+  +#22#22#22#23#22#22#22#22#22#22#21#22#22#21#22#21#22#21#21#21#21#21#21#21#21
+  +#21#20#21#21#21#21#21#21#21#20#20#20#20#19#20#20#19#20#19#19#19#18#18#19#18
+  +#18#19#18#18#18#19#18#18#19#19#19#23#24#24#27#27#26#27#28#27#27#27#28#28#27
+  +#27#28#27#27#27#27#27#28#27#26#27#27#27#27#27#27#26#25#26#20#19#19#18#18#18
+  +#18#17#18#17#18#18#17#17#17#17#17#17#17#17#17#17#17#17#17#16#16#17#17#16#17
+  +#16#17#16#16#16#16#16#16#16#16#16#16#16#16#16#15#15#16#16#15#15#16#16#15#15
+  +#15#15#15#15#15#15#15#15#15#14#14#15#14#15#15#14#14#14#15#14#14#14#14#14#14
+  +#14#13#14#14#13#13#13#12#13#13#13#12#12#12#13#12#12#12#12#12#12#12#12#12#11
+  +#11#11#10#10#9#10#10#9#9#9#9#10#10#10#12#12#12#25#25#25'&&&---444::::::'#10
+  +#10#10#6#6#6#6#6#6#6#6#6#6#6#5#5#5#6#6#5#6#5#6#5#5#5#5#5#5#5#5#4#5#4#5#4#4#5
+  +#4#5#4#5#5#4#4#4#4#4#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#4#4#3#3#3
+  +#3#3#3#3#3#3#3#3#3#3#3#3#2#2#3#3#2#3#3#3#3#2#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2
+  +#2#1#2#2#2#1#2#1#1#2#1#2#3#3#5#1#1#2'000yyy000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000222444555777999;;;==='
+  +'444.../////////////////0888::::::::::::::::::::::::::9::9::9::9:99:99:99:99'
+  +':99999999999999999999999999999999999999999998998988988111000000000000000000'
+  +'999;::::::::::::::::::::::::::::::::::9::9::9:99:99:99:99999999999999999999'
+  +'999999999999999998998988988988988888888888888998<<;<<<======>>>>>=@??@??@@@'
+  +'BBBBAAAAABBBCCCEEEGGGJJILLKMMMPOORQQUTTXWWZYY]\\`__cbbfffjjjlllppptttxxx|||'
+  +#128#128#128#131#131#131#136#136#136#141#141#141#145#145#145#149#149#149#154
+  +#154#154#159#159#159#164#164#164#169#169#169#174#174#174#179#179#179#154#154
+  +#154'dddeeeffffffeeebbbbbb```^^^]]]\\\\\\\\\[[[ZZZYYYYYYYYYXXXWWWWWWWWWVVVVV'
+  +'VTTTTTTTTTTTTRRRRRRRRRRRRQQQPPPOOOOOOOOONNNNNNLLLLLLLLLLLLJJJJJJJJJJJJIIIHH'
+  +'HGGGGGGGGGFFFEEEEEEEEEEEEDDDDDDCCCCCCBBBBBBAAA@@@@@@>>>;;;999777333///***'''
+  +'''''&$'#24#21'.'#149#5':'#255#6'8'#255#5'8'#255#4'7'#255#1'7'#255#18'4'#189
+  +'89DGD<JJJLLLJJJFFFAAA<<<888444111000000//////......---,,,,,,+++***))))))'''
+  +'''''''''''&&&%%%%%%%%%''&#.,!33.99>?@FFGLNMJSQFQPKMMLIIIDDD>>>777111+++&&&"'
+  +'""'#31#31#31#29#29#29#29#29#29#27#27#27#26#26#26#25#25#25#25#25#25#25#25#25
+  +#25#25#25#24#24#24#23#23#23#22#22#22#21#21#21#19#19#19#17#17#17#15#15#15#14
+  +#14#14#13#13#13'uuu'#172#172#172#166#166#166#161#161#161#156#155#156#150#150
+  +#149#145#144#144#140#139#139#135#134#134#130#129#130'}}|wwwsssnnojjjfffbbb]\'
+  +'][[[VVVSSSOOOKKLHHHEEECCC>?>;::666555112//.-,,***())&&&&&&#$#!!!   '#31#31
+  +#31#29#29#30#30#30#29#28#28#28#27#27#27#26#25#25#25#25#25#24#24#23#25#23#24
+  +#24#23#24#23#23#23#23#23#23#23#23#23#22#22#22#22#22#22#22#22#22#22#22#22#22
+  +#22#22#22#21#21#21#21#22#21#21#22#21#21#21#21#21#21#21#21#21#20#21#21#20#20
+  +#20#21#20#20#20#19#20#20#19#19#19#19#19#19#19#19#18#19#18#18#18#18#18#18#18
+  +#18#18#18#18#18#18#22#22#21#27#27#26#27#28#28#27#28#28#28#27#27#28#26#27#28
+  +#27#27#27#28#27#28#27#27#28#27#27#23#23#23#18#18#17#17#18#18#18#18#18#17#17
+  +#17#18#17#17#17#17#17#17#17#17#17#17#16#17#17#17#17#16#16#17#16#17#16#16#16
+  +#16#16#16#15#16#16#16#15#16#15#15#15#15#15#15#16#15#15#15#15#15#15#15#15#15
+  ,#15#14#14#14#14#15#14#15#14#15#14#14#14#14#14#13#14#14#13#13#14#12#13#13#13
+  +#12#12#13#13#12#12#13#12#12#13#12#12#12#10#10#10#10#9#10#9#10#9#9#9#9#11#11
+  +#10#14#15#14'!!!(((000777===***'#6#7#6#6#6#6#6#6#6#6#6#6#5#6#6#6#6#5#5#6#5#5
+  +#6#6#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#4#5#4#4#5#4#5#5#5#4#4#4#4#4#4#4#4#3
+  +#4#4#4#4#4#3#4#4#4#3#3#4#4#3#3#3#3#4#3#4#3#3#3#3#2#3#3#2#3#2#3#3#2#2#2#2#2#3
+  +#2#2#2#3#3#2#2#2#2#2#2#2#2#2#2#2#1#2#2#1#1#2#2#2#1#2#2#1#3#3#3#2#1#1'000yyy0'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000222444555777999;;;===444.../////////////////0888:::::::::::::::::::'
+  +':::::::::::::9::9::9::9:99:99:99:99:999999999999999999999999999999999999999'
+  +'98998998988666000000000000000000434;::;::::::::::::::::::::::::::::::::::9:'
+  +':9::9:99:99:99:999999999999999999999999999999999999989989889889889888888888'
+  +'88888999;;;======>>>>>>@@?@??A@@BBBBBBDDDEEEDDDEEEGGGJJIKKJMMMPOORQQTTTXWWZ'
+  +'YY\[[___cbbfeeiiilllpppssswww{{{'#131#131#131#135#135#135#140#140#140#144
+  +#144#144#149#149#149#153#153#153#158#158#158#164#164#164#168#168#168#174#174
+  +#174#178#178#178#165#165#165'fffgggggggggfffdddcccaaa___^^^\\\\\\\\\\\\[[[ZZ'
+  +'ZYYYYYYYYYXXXWWWWWWWWWVVVVVVTTTTTTTTTTTTRRRRRRRRRRRRQQQPPPOOOOOOOOONNNNNNLL'
+  +'LLLLLLLLLLJJJJJJJJJJJJIIIHHHGGGGGGGGGFFFFFFFFFFFFEEEEEEDDDDDDDDDCCCBBBBBBAA'
+  +'A???>>>;;;888555000---))*''&!#''2'#11'7'#225#5':'#255#6'9'#255#5'8'#255#4'7'
+  +#255#0'6'#255#15'7'#217'?F`SPDRQQPPPLLLGGGAAA;;;888444222000000//////......-'
+  +'--,,,+++***)))(((''''''&&&%%%%%%%%#''%'#27'#%0'#24'''r'#16'('#168#11'('#195
+  +#11'('#198#12')'#196#25'0'#177'-<'#144'JNbWUKPPMJJKDDD===666///***%%%!!!'#30
+  +#30#30#29#29#29#28#28#28#27#27#27#27#27#27#25#25#25#25#25#25#25#25#25#25#25
+  +#25#23#23#23#22#22#22#21#21#21#19#19#19#17#17#17#15#15#15#14#14#14#15#15#15
+  +#140#140#139#172#172#171#166#166#166#160#160#160#155#155#155#150#149#149#144
+  +#144#144#139#138#138#134#133#133#129#129#129'|||wwwrrrmmmiiieeebaa]]]ZZZUUUS'
+  +'SSONOKJJHHIFEEA@@<<<:9:666444222///---*+*(((&&&$%%$$$!!!   '#31#31#31#30#30
+  +#30#30#29#30#29#28#29#27#27#27#26#26#26#26#25#25#25#24#23#25#24#23#24#24#23
+  +#24#23#23#23#23#23#23#22#23#23#23#23#23#22#22#23#22#22#22#22#22#22#22#22#22
+  +#22#21#21#22#22#22#22#22#21#21#21#21#21#21#21#21#21#21#21#21#21#20#20#21#21
+  +#21#20#20#21#20#19#20#20#19#20#19#19#19#19#19#18#19#19#19#18#18#19#18#18#18
+  +#18#18#18#18#18#18#17#17#18#20#20#21#25#25#25#27#28#27#28#27#27#28#26#27#28
+  +#27#27#28#27#27#27#28#28#27#27#27#26#26#26#21#20#20#17#18#18#18#17#18#17#17
+  +#17#18#17#17#17#17#17#17#16#17#16#16#17#16#17#17#16#17#16#16#17#17#17#16#16
+  +#16#16#15#16#16#15#16#15#16#16#16#16#15#15#15#15#15#15#15#15#15#15#15#15#15
+  +#14#15#15#15#15#14#14#14#14#14#14#14#14#14#14#13#14#14#13#13#14#13#13#13#12
+  +#12#13#12#12#12#13#13#13#11#12#10#10#10#10#9#10#10#10#10#11#10#11#12#11#11#22
+  +#22#23'%&%+++333999>>>'#14#13#13#6#6#6#7#6#6#6#6#6#6#6#6#6#5#6#6#6#6#5#6#6#5
+  +#6#5#5#5#6#5#5#5#6#5#6#5#5#4#5#5#5#4#5#4#4#5#5#4#5#5#4#5#4#4#4#5#4#4#4#4#4#4
+  +#4#4#4#4#4#4#4#4#3#4#3#4#3#4#4#3#4#4#3#3#3#3#3#3#3#3#3#3#2#3#3#3#3#3#3#2#2#3
+  +#3#3#3#2#2#2#3#2#3#2#2#3#2#2#2#2#2#2#2#2#1#2#2#2#2#1#2#1#5#5#5#2#2#2'000yyy0'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000222444555777999;;;===444.../////////////////0888::::::::::::::::::::::'
+  +':::::::::::::9::9::9::9:99:99:99:99:999999999999999999999999999999999999999'
+  +'98998998988988222000000000000000000777;::;:::::::::::::::::::::::::::::::::'
+  +':9::9::9:99:99:99:999999999999999999999999999999999999989989889889889888888'
+  +'88888999999;;;===>>>>>>@@@@@?A@@CBBBBBDDDEEEGGGIIHIIIJIIKKJMMLONNQPPTTTWVVZ'
+  +'YY\[[___bbbfeehhhlllooosssvvvzzz'#131#131#131#135#135#135#138#138#138#143
+  +#143#143#148#148#148#153#153#153#157#157#157#162#162#162#168#168#168#173#173
+  +#173#178#178#178#176#176#176'kkkhhhhhhhhhgggeeecccaaa___^^^]]]\\\\\\\\\\\\[['
+  +'[ZZZYYYYYYYYYXXXWWWWWWWWWVVVVVVTTTTTTTTTTTTRRRRRRRRRRRRQQQPPPOOOOOOOOONNNNN'
+  +'NLLLLLLLLLLLLJJJJJJJJJJJJIIIHHHGGGGGGHHHGGGFFFFFFGGGGGGGGGGGGGGGGGGFFFDDDCC'
+  +'CAAA???===999666333///+++((((%'#25#27'-v'#6';'#255#6'9'#255#6'9'#255#5'8'
+  +#255#4'7'#255#0'5'#255#11'7'#232'<HyVSFQQPMMMHHHAAA<<<999555333222111000////'
+  +'//......,,,+++***)))(((&&&%%%#$$$#'#31'$#'#29#22'%n'#5'&'#205#0'%'#238#0'#'
+  +#236#0'#'#231#0'#'#229#0'"'#228#0' '#229#0#31#229#7'%'#212',;'#150'RSTPPJIII'
+  +'BBB:::222,,,''''''###   '#29#29#29#29#29#29#28#28#28#27#27#27#27#27#27#25#25
+  +#25#25#25#25#25#25#25#24#24#24#22#22#22#21#21#21#19#19#19#18#18#18#16#16#16
+  +#14#14#14#21#21#21#161#161#161#172#172#171#166#165#165#160#159#159#154#153
+  +#153#149#148#148#144#143#143#138#137#137#133#132#132#128'{{{wwwrrrmmmhhhff'
+  +'eaaa]]]YYXVUURRROOOJJJGGGCBB?@?;;<898555544111//.,-,***(((&&&%%%$$#"!"   '
+  +#31#31#31#30#30#30#30#29#30#29#29#29#27#27#28#26#26#27#26#26#26#25#24#24#25
+  +#24#23#24#24#24#25#23#23#24#23#23#23#23#23#23#23#23#23#23#23#22#22#23#23#22
+  +#22#22#22#22#22#22#22#22#22#22#22#22#22#22#21#22#22#21#21#21#21#21#21#21#21
+  +#21#21#21#20#20#20#20#20#21#21#20#20#20#20#20#20#19#20#19#19#19#19#19#18#18
+  ,#18#19#18#18#18#18#18#18#18#18#18#18#18#17#18#18#17#17#18#17#21#21#21#26#26
+  +#26#28#27#27#28#27#27#27#27#27#27#28#27#27#27#27#27#27#27#27#27#27#22#23#23
+  +#17#17#18#18#17#18#17#18#18#17#17#18#18#17#17#17#17#17#17#16#17#17#16#17#16
+  +#16#16#16#17#16#16#16#16#16#16#16#16#16#16#16#16#16#15#15#16#16#15#16#15#15
+  +#15#15#15#15#15#14#15#15#14#15#14#15#14#15#14#14#14#14#14#14#13#14#14#13#13
+  +#14#12#13#13#13#13#13#13#12#12#12#12#11#10#11#11#10#10#10#10#10#10#10#10#11
+  +#10#11#13#13#13#31#30#30'''''''...555;;;)))'#7#7#7#7#6#6#6#6#7#7#6#6#6#6#6#6
+  +#6#6#6#6#6#6#6#6#6#6#5#5#5#6#5#5#5#5#6#5#5#5#5#5#5#5#5#5#5#5#5#4#5#5#5#4#5#5
+  +#4#4#4#5#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#4#3#3#3#4#3#3#3#3#3#4#3#3#3#3#3#3#3
+  +#3#2#3#3#3#2#3#3#3#2#3#3#2#3#2#3#3#3#3#2#3#2#2#2#2#2#3#2#2#2#1#2#2#1#2#2#2#3
+  +#5#3#1#2#2'000yyy00000000000000000000000000000000000000000000000000000000000'
+  +'0000000000000000000222444555777999;;;===444.../////////////////0888;:::::::'
+  +':::::::::::::::::::::::::::::::::9::9::9:99:99:99:99:9999999999999999999999'
+  +'9999999999999999999998998988988766000000000000000000222:::;::;:::::::::::::'
+  +':::::::::::::::::::::9::9::9:99:99:99:9999999999999999999999999999999999999'
+  +'8998988988988988888888999999::::::=<<>>>@@@@@@AA@CBBCBBDDDEEEGGGIIIKKKLLLMM'
+  +'MNNNPPPQQQTSSVUUYXX\[[_^^baafeehggkkknnnrrruuuzzz~~~'#130#130#130#134#134
+  +#134#138#138#138#143#143#143#147#147#147#152#152#152#157#157#157#162#162#162
+  +#167#167#167#172#172#172#178#178#178#181#181#181'wwwiiiiiiiiihhhfffdddbbbaaa'
+  +'___^^^^^^\\\\\\\\\\\\[[[ZZZYYYYYYYYYXXXWWWWWWWWWVVVVVVTTTTTTTTTTTTRRRRRRRRR'
+  +'RRRQQQPPPOOOOOOOOONNNNNNLLLLLLLLLLLLJJJJJJJJJJJJIIIHHHGGGHHHHHHGGGHHHIIIJJJ'
+  +'JJJKKKKKKJJJJJJIIIGGGDDDBBB>>><<<999555111---***(''%''&%'#16'6'#203#6';'#255
+  +#6'9'#255#6'9'#255#5'8'#255#4'7'#255#0'6'#255#4'5'#247'1C'#144'PNDKKIGGGBBB<'
+  +'<<999666444333111000000//////...---,,,***)))''''''%%%##$#"'#31'""!'#14'%'
+  +#150#0''''#239#0'&'#236#0'&'#229#0'%'#227#0'$'#226#0'$'#226#0'$'#225#0'#'#223
+  +#0'"'#222#0'!'#224#0#30#229#25'0'#179'LNWMLGDDE<<<555...)))$$$!!!'#31#31#31
+  +#29#29#29#28#28#28#28#28#28#27#27#27#27#27#27#26#26#26#25#25#25#24#24#24#23
+  +#23#23#21#21#21#19#19#19#18#18#18#16#16#16#14#14#14'+++'#173#173#173#170#170
+  +#170#164#164#163#159#158#158#154#153#153#149#148#148#143#142#142#137#137#137
+  +#133#132#132#128#128'{zzvvvrrrmmmgggedd```]\\XXXVUURPPMMMIIIEDEBAA?>?<<<999'
+  +'655333111///---+++(()&&&$%%$$$"""!! '#31' '#31#30#30#30#30#30#29#29#29#29#27
+  +#28#27#26#27#26#26#26#26#25#25#25#25#24#24#25#24#24#24#24#24#24#23#23#24#23
+  +#23#23#23#23#23#23#22#23#23#22#22#22#22#22#22#22#23#22#22#22#22#22#22#22#22
+  +#22#22#22#22#21#22#21#22#21#21#21#21#21#21#21#20#21#21#21#21#21#21#20#20#20
+  +#20#20#21#19#20#19#19#20#19#19#19#19#18#18#18#19#18#18#19#19#18#18#18#18#18
+  +#18#17#18#18#18#18#18#18#17#18#17#17#17#22#21#21#27#26#27#28#27#27#28#27#26
+  +#28#27#27#28#27#27#27#27#27#27#27#27#25#25#25#20#19#19#18#17#17#17#18#17#18
+  +#18#17#17#17#17#17#17#17#17#17#16#17#16#16#17#16#16#16#16#16#16#16#16#16#16
+  +#16#16#16#16#16#16#15#16#16#15#15#15#15#15#15#15#15#15#15#15#15#15#14#15#14
+  +#15#14#14#14#14#15#14#13#14#14#13#14#14#13#13#13#13#13#13#12#12#12#12#13#10
+  +#10#11#10#10#11#10#10#10#10#9#10#10#10#11#20#20#20'#"#()(0/0666;;;'#14#14#14
+  +#7#7#6#6#7#6#7#7#7#6#7#7#6#7#6#6#6#6#6#6#6#6#5#6#6#5#5#6#5#5#5#5#5#6#6#5#6#5
+  +#5#5#5#5#5#5#5#5#5#4#5#4#5#4#5#4#4#4#5#4#5#4#5#4#4#4#4#4#4#4#4#4#4#3#4#3#4#3
+  +#3#3#3#4#3#3#3#3#4#3#3#3#4#3#3#3#4#3#2#3#3#3#2#3#2#3#3#3#2#3#2#3#3#3#3#2#2#2
+  +#2#2#2#2#2#2#2#2#2#2#2#2#2#2#1#5#5#5#1#2#2'000yyy000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000222444555777999;;;===444...'
+  +'///////////////0/0888;::;::::::::::::::::::::::::::::::::::::::::9::9::9::9'
+  +':99:99:99:99:99999999999999999999999999999999999999998998998988988333000000'
+  +'000000000000555;::;::;::::::::::::::::::::::::::::::::::9::9::9:99:99:99:99'
+  +'999999999999999999999999999999999998998988988988988888999999::::::;;;;;;>>>'
+  +'@@@AAACCBCBBEDDEEEFFFIIIJJJLLLNNNOOORRQTSSUUUXXXZYY\[[___a``eddhggjjjnnnqqq'
+  +'uuuyyy}}}'#129#129#129#134#134#134#138#138#138#143#142#142#147#147#147#152
+  +#152#152#157#157#157#162#161#161#167#167#167#171#171#171#177#177#177#182#182
+  +#182#134#134#134'kkkkkkkkkiiigggeeebbbaaa```___^^^^^^\\\\\\\\\\\\[[[ZZZYYYYY'
+  +'YYYYXXXWWWWWWWWWVVVUUUTTTTTTTTTTTTRRRRRRRRRQQQQQQPPPOOOOOOOOONNNNNNLLLLLLLL'
+  +'LLLLJJJJJJJJJJJJIIIHHHHHHHHHHHHJJJKKKLLLNNNOOOPPPPPPPPPOOOMMMJJJFFFBBB>>>;;'
+  +';777222...+++)()(%'#28' +X'#8':'#249#7':'#255#6'9'#255#6'9'#255#5'8'#255#4
+  +'7'#255#2'6'#255#0'4'#255'$='#164'EEFCCB???;;;888555444333222000000000///...'
+  +'---,,,***(((&&&$$$""!"!'#25#14'%'#143#0'('#246#0''''#233#0''''#230#0'&'#230
+  +#0'&'#229#0'%'#227#0'$'#226#0'$'#226#0'$'#225#0'#'#223#0'#'#222#0'"'#222#0#30
+  +#230#24'/'#175'JIIEDB>>>666///***&&&"""   '#30#30#30#28#28#28#28#28#28#28#28
+  +#28#27#27#27#27#27#27#25#25#25#24#24#24#23#23#23#22#22#22#20#20#20#18#18#18
+  +#16#16#16#14#14#14'HHH'#174#174#174#169#169#169#163#163#163#158#158#158#152
+  +#152#152#147#146#146#142#141#141#136#136#136#131#131#131'~{{zuuuqqqlllghhc'
+  ,'cc```\[[YXXUUUOOOLLKIIHDDDCBB>>><;;888555333000...---***))(''&''%%%$$$!""  '
+  +' '#30#31#30#30#31#30#30#30#30#29#29#29#27#27#28#27#26#26#26#26#27#25#25#25
+  +#25#25#25#25#24#24#25#24#24#24#24#24#24#23#23#24#23#24#23#22#23#23#22#23#23
+  +#23#22#23#22#23#22#23#22#22#22#23#22#22#22#22#22#22#22#21#22#21#21#21#21#21
+  +#21#21#21#21#21#21#21#20#21#20#21#21#20#20#20#20#20#20#20#20#19#20#20#19#20
+  +#19#18#19#19#19#19#18#19#18#19#18#19#18#18#18#18#18#18#18#18#17#18#17#17#17
+  +#18#17#17#17#17#18#17#18#24#23#23#27#27#26#28#27#27#27#28#27#27#28#27#27#27
+  +#28#27#27#27#26#26#26#21#21#21#17#18#18#17#17#18#17#17#17#17#17#17#16#17#17
+  +#17#17#17#17#16#17#16#17#17#16#16#17#16#16#16#16#16#16#15#16#16#16#16#16#16
+  +#15#15#15#16#16#15#15#15#15#15#15#15#15#15#15#15#15#14#14#14#14#14#14#14#14
+  +#14#14#13#13#14#13#13#13#13#13#11#11#12#10#10#10#11#10#11#10#11#10#10#10#10
+  +#11#11#11#29#29#29'#"#)((///565))*'#7#7#7#6#7#7#6#6#7#7#7#6#7#7#7#7#7#6#6#7#6
+  +#6#6#6#6#6#6#6#6#5#5#6#5#5#6#5#6#5#6#5#5#5#5#5#6#5#5#5#5#5#5#4#4#5#4#5#4#4#5
+  +#5#5#4#4#4#4#4#4#4#4#5#4#4#4#4#4#4#4#4#3#4#4#3#4#4#4#3#4#3#3#4#3#3#3#3#4#4#3
+  +#3#3#3#3#3#3#3#2#3#3#2#3#2#2#3#2#3#3#3#2#2#2#2#2#2#2#2#3#2#2#2#2#2#2#2#5#5#5
+  +#2#2#2'000yyy000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000222444555777999;;;===444...///////////////0/0888;::;::;::;::::::::'
+  +':::::::::::::::::::::::::::::9::9::9::9:99:99:99:99:99999999999999999999999'
+  +'999999999999999998998998988988888101000000000000000000888;::;::;:::::::::::'
+  +':::::::::::::::::::::::9::9::9:99:99:99:99999999999999999999999999999999999'
+  +'998998988988988988999999::::::;;;;;;<<<===@@@BBBCCBEDDFEEFFFIIIJJJLLLMMMOOO'
+  +'RRQTTSVUUYXX[[[]]]```cccfffiiilllpppssswwvzzz~~~'#130#130#130#134#134#134
+  +#138#138#138#143#143#143#147#147#147#152#152#151#156#156#156#161#161#161#166
+  +#165#165#171#171#171#176#176#176#182#182#182#149#149#149'lllllllllkkkiiifffc'
+  +'ccaaaaaa___^^^^^^^^^\\\\\\\\\\\\[[[ZZZYYYYYYYYYXXXWWWWWWWWWWWWVVVUUUUUUUUUT'
+  +'TTTTTSSSRRRRRRQQQPPPPPPOOOOOONNNNNNLLLLLLLLLLLLKKKJJJJJJIIIHHHHHHHHHIIIJJJL'
+  +'LLNNNQQQTTTUUUWWWVVVVVVTTTQQQMMMGGGAAA<<<999555000,,,)))''''&''$'#24#19'4'
+  +#178#6'<'#255#7':'#255#6'9'#255#6'9'#255#5'8'#255#4'7'#255#2'6'#255#2'4'#255
+  +'3;[?=8;;;999777555444444333111000000000...---+++***''''''%%%###" '#22#22'#\'
+  +#0')'#241#0'('#236#0'('#232#0''''#231#0''''#231#0'&'#230#0'&'#229#0'%'#227#0
+  +'$'#226#0'$'#226#0'$'#225#0'#'#223#0'#'#222#0'"'#222#0#31#229'''5'#135'EC9<<'
+  +'<666000***&&&###!!!'#31#31#31#29#29#29#28#28#28#28#28#28#28#28#28#27#27#27
+  +#26#26#26#25#25#25#23#23#23#22#22#22#20#20#20#17#17#17#16#16#16#14#14#14'ggg'
+  +#174#174#174#169#169#168#163#162#162#157#156#156#151#151#151#146#146#146#141
+  +#141#141#136#135#135#130#130#130'}}}xxxtttppplllgggcbc_``[[[VVVSRSOOOKKKIHGE'
+  +'EDBA@?==<;<988555333111.//---***(''(&&''&%&###"""!!!'#30#30#31#30#30#30#30
+  +#30#31#29#29#29#27#28#28#27#27#27#27#26#26#25#26#25#25#25#25#25#25#25#25#24
+  +#24#25#24#24#24#24#24#25#23#23#24#23#23#23#23#23#23#22#23#23#23#23#23#22#23
+  +#22#23#22#22#22#22#22#22#22#22#21#22#22#21#21#21#22#21#21#21#21#21#21#21#21
+  +#21#21#21#21#20#20#21#20#20#21#20#20#20#21#20#19#20#20#19#20#19#19#19#19#19
+  +#19#18#19#18#18#18#18#18#18#18#18#18#18#18#18#18#18#17#18#18#18#17#17#17#18
+  +#17#17#17#19#19#19#26#26#26#28#27#27#27#28#27#27#27#27#28#27#27#27#27#27#27
+  +#26#27#22#22#23#17#18#18#17#17#17#17#17#17#17#17#17#16#17#16#17#17#16#17#16
+  +#16#17#17#16#16#16#16#16#16#16#16#16#16#16#16#15#15#16#16#15#16#16#15#16#15
+  +#15#15#15#15#15#15#15#15#15#14#15#14#15#14#15#14#13#14#15#13#14#14#13#14#13
+  +#13#13#11#11#11#11#11#10#10#11#10#10#10#11#10#10#11#15#15#15#31#31#31'#"#)()'
+  +'...343'#19#19#19#8#7#7#7#7#7#7#7#7#7#6#7#7#6#7#6#6#6#6#7#6#7#6#7#6#6#6#5#6#6
+  +#6#6#6#5#6#5#6#6#6#6#5#5#5#5#5#5#5#6#5#5#5#5#5#5#5#5#5#4#5#4#5#4#4#5#5#5#4#4
+  +#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#4#4#3#4#4#3#3#4#4#3#4#3#3#3#3#3#3#3#3#3#3#3#2
+  +#3#3#3#3#3#3#3#3#3#2#3#2#3#2#2#2#3#3#2#3#2#2#2#2#2#2#5#5#5#2#2#2'000yyy00000'
+  +'000000000000000000000000000000000000000000000000000000000000000022244455577'
+  +'7999;;;===444...///////////////0/0888;;:;::;::;::;:::::::::::::::::::::::::'
+  +':::::::::::::::9::9::9:99:99:99:99:99:9999999999999999999999999999999999999'
+  +'9998998988988988555000000000000000000222:::;::;::;:::::::::::::::::::::::::'
+  +':::::::::9::9::9:99:99:99:9999999999999999999999999999999999999899898898898'
+  +'8:99999::::::;;;;;;<<<======???AAADDDFEEGFFHHHIIIKKKMMMOOORRRTTSVVUYXX[ZZ]]'
+  +']___cccfffiiilllpposssvvvzzz~~~'#129#129#129#133#133#133#138#138#138#142#142
+  +#142#146#146#146#151#151#151#156#156#155#160#160#160#165#164#164#170#170#170
+  +#175#175#175#180#180#180#164#164#164'mmmnnnmmmlllkkkhhheeecccaaa```______^^^'
+  +'^^^\\\\\\\\\\\\[[[ZZZYYYYYYYYYXXXXXXXXXXXXWWWWWWVVVVVVVVVUUUTTTSSSTTTSSSRRR'
+  +'QQQPPPPPPOOONNNNNNLLLLLLLLLKKKJJJIIIIIIHHHHHHGGGHHHJJJMMMQQQTTTXXX\\\^^^^^^'
+  +'^^^\\\YYYTTTNNNFFF???;;;666222---)))(&'#30'"(@'#14'9'#224#8'<'#255#8';'#255
+  +#7':'#255#6'9'#255#6'9'#255#5'8'#255#3'7'#255#7'6'#240'35B773777666555555444'
+  +'444333222222111000///---+++)))&&&$$$"!'#31#31#31#31#6''''#192#0'*'#245#0')'
+  ,#234#0'('#234#0'('#233#0''''#231#0''''#231#0'&'#230#0'&'#229#0'%'#227#0'$'
+  +#226#0'$'#226#0'$'#225#0'#'#223#0'#'#222#0'!'#226#6'$'#204'7:F884333///***&&'
+  +'&###!!!'#31#31#31#30#30#30#29#29#29#28#28#28#28#28#28#28#28#28#26#26#26#25
+  +#25#25#23#23#23#22#22#22#20#20#20#18#18#18#16#16#16#15#15#15#133#133#133#173
+  +#173#173#167#167#166#162#162#161#156#155#155#150#150#150#145#145#145#140#140
+  +#140#135#135#135#129#130#129'}}}xwxtstoookkkfffccc_^_ZZZUUVRRROONKJKIHHDDCAB'
+  +'A?>=<;;9886553330/0...,,,***(((''''''%%%###!!!!!!'#31#31#31#30#30#30#31#31
+  +#30#28#28#28#28#28#28#27#27#27#27#27#27#25#25#26#25#25#25#25#25#25#25#25#24
+  +#25#24#24#25#24#24#24#24#24#24#23#24#24#23#24#23#23#23#23#23#23#23#23#22#22
+  +#22#23#23#22#22#22#22#22#22#22#22#22#22#22#21#22#22#21#21#21#21#21#21#21#21
+  +#21#21#21#21#21#20#21#20#20#21#20#20#21#20#20#20#20#19#20#20#19#20#19#19#19
+  +#19#18#18#18#19#18#19#18#18#18#18#18#18#18#18#18#18#18#17#18#18#17#17#17#17
+  +#17#17#17#17#17#17#17#17#23#23#24#28#27#27#28#27#27#27#28#28#27#27#27#27#27
+  +#27#27#27#27#24#24#23#19#19#18#17#17#17#17#17#17#17#17#17#17#17#17#17#16#17
+  +#17#16#17#16#16#16#16#16#17#16#16#16#16#16#16#15#16#15#16#15#15#16#15#16#15
+  +#16#15#15#15#16#15#15#15#15#14#15#14#14#15#14#14#15#14#13#14#14#13#13#12#12
+  +#12#11#11#11#11#11#11#11#11#10#11#11#11#10#10#11#22#21#21#31' '#31'"""&'''','
+  +',,001'#22#21#21#8#7#7#8#7#7#7#7#7#6#7#7#6#7#6#6#7#6#6#7#7#6#6#6#7#6#6#6#6#6
+  +#6#6#6#6#6#5#6#6#5#6#5#5#6#6#5#5#5#5#5#5#6#5#5#5#5#5#5#5#5#5#5#5#4#4#5#4#5#4
+  +#4#4#5#4#4#4#4#4#4#5#4#4#4#4#4#4#3#3#3#4#3#4#4#4#3#3#3#4#3#3#3#3#3#3#3#3#3#3
+  +#3#3#3#3#3#3#2#3#3#2#2#3#2#2#2#2#2#2#2#3#3#2#2#3#2#2#5#5#5#2#2#2'000yyy00000'
+  +'000000000000000000000000000000000000000000000000000000000000022244455577799'
+  +'9;;;===444...///////////////0/0988;;;;;:;;:;::;::;::;::::::::::::::::::::::'
+  +':::::::::::::::9::9::9::9:99:99:99:99:9999999999999999999999999999999999999'
+  +'9998998998988988988222000000000000000000434;;:;::;::;::::::::::::::::::::::'
+  +'::::::::::::9::9::9:99:99:99:9999999999999999999999999999999999999899898898'
+  +'8:99:99999::::::;;;<<<======???@@@AAADDCFFEIHHIIIKKKMMMOOOQQQSSSVVUYYX[ZZ]\'
+  +'\___bbbfffhhhlllooorrqvvuzyy}}}'#129#129#129#132#132#132#136#136#136#141#141
+  +#141#145#145#145#149#149#149#154#154#154#159#159#158#163#163#163#169#168#168
+  +#174#174#174#179#179#179#177#177#177'sssooonnnnnnllliiifffdddbbbaaa_________'
+  +'^^^^^^\\\\\\\\\\\\[[[ZZZYYYYYYYYYYYYXXXXXXXXXXXXXXXXXXXXXXXXXXXVVVVVVUUUTTT'
+  +'RRRQQQPPPPPPOOONNNNNNMMMLLLKKKJJJIIIHHHHHHGGGFFFFFFHHHKKKQQQWVQ_\QbaZddcfff'
+  +'fffdddaaa\\\UUULLLBBB===888333...+)#%(/'#16'9'#208#9'>'#255#9';'#255#9';'
+  +#255#8';'#255#7':'#255#6'9'#255#6'9'#255#4'8'#255#12'6'#221'3395415555555555'
+  +'55444444333222222222000///---+++)))&&&###! '#24#23'!M'#0'*'#239#0'*'#239#0
+  +')'#236#0')'#234#0'('#234#0'('#233#0''''#231#0''''#231#0'&'#230#0'&'#229#0'%'
+  +#227#0'$'#226#0'$'#226#0'$'#225#0'#'#223#0'"'#223#0'!'#228' ,q42''...+++)))%'
+  +'%%###!!!   '#31#31#31#30#30#30#29#29#29#28#28#28#28#28#28#27#27#27#26#26#26
+  +#24#24#24#22#22#22#19#19#19#18#18#18#16#16#16#25#25#25#162#162#162#172#172
+  +#172#166#166#166#160#160#160#154#154#154#149#149#149#144#144#144#139#138#138
+  +#133#133#133#129#129#129'|||wwwsssnnnjjjfffaaa]]]YYYUUURRRMNNJJIGGHDDDAAA>>='
+  +'<;;977655433000...,,,***(((''''''%%%##$"!!   '#31#31#31#31#30#30#29#30#29#29
+  +#29#28#28#27#27#27#27#27#27#27#27#25#26#26#25#26#25#25#25#26#25#25#25#25#25
+  +#25#24#24#24#25#24#23#25#24#24#24#23#24#24#23#23#23#23#23#23#22#23#22#23#22
+  +#22#22#22#22#22#22#22#22#22#21#22#22#22#21#21#22#22#21#21#22#21#22#21#22#21
+  +#21#21#20#21#21#20#21#21#20#20#20#20#21#21#20#20#20#20#19#20#20#19#20#19#19
+  +#19#18#19#19#18#18#18#18#18#18#18#18#18#18#18#18#17#17#18#17#17#17#17#17#18
+  +#17#17#17#17#17#17#17#17#17#21#21#21#27#27#26#28#27#27#27#28#27#27#27#27#27
+  +#27#27#27#27#27#25#24#25#19#18#18#17#17#18#18#17#17#16#17#17#17#16#16#16#17
+  +#17#17#16#16#16#16#17#16#17#16#16#16#16#16#16#16#16#16#15#15#16#15#15#16#16
+  +#16#15#15#16#15#15#15#15#15#15#14#14#15#14#14#15#14#14#14#14#14#13#13#13#11
+  +#11#12#11#11#11#10#11#10#10#10#11#11#11#11#12#13#12#29#29#29'!!!%%%)().//..-'
+  +#10#10#11#7#7#7#7#7#7#7#7#7#7#7#7#7#7#7#7#6#7#6#6#7#7#6#7#6#7#7#6#6#6#6#6#6#5
+  +#6#6#5#6#5#6#6#6#6#5#5#5#5#6#5#6#5#5#5#5#5#5#5#5#4#5#4#5#4#5#5#5#4#4#5#5#4#5
+  +#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#4#4#4#3#3#4#4#3#4#3#3#3#3#3#3#3#3#3#2#3#3#3#2
+  +#3#3#2#3#2#3#3#3#3#3#2#3#3#2#3#3#3#3#2#5#5#5#2#2#2'000yyy0000000000000000000'
+  +'00000000000000000000000000000000000000000000222444555777999;;;===444...////'
+  +'///////////0/0988;;;;;;;;:;;:;::;::;::;::::::::::::::::::::::::::::::::::::'
+  +':9::9::9::9:99:99:99:99:999999999999999999999999999999999999999999989989889'
+  +'88988877101000000000000000000777;;:;::;::;:::::::::::::::::::::::::::::::::'
+  +':9::9::9:99:99:99:99999999999999999999999999999999999998998988:99:99:99::::'
+  +'::;;;<<<======???@@@AAABBBDDDEEEHHGJJJMMMOOOQQQSSSVVVXXWZZY]\\___aaaeeehhhj'
+  +'jjnnnqqquutyyx}||'#128#128#128#132#132#132#136#136#136#140#140#140#145#145
+  +#145#149#149#149#153#153#153#158#158#158#163#163#162#168#168#168#172#172#172
+  ,#177#177#177#182#182#182#129#129#129'ppppppooommmjjjhhhdddbbbbbbaaa_________'
+  +'^^^^^^\\\\\\\\\\\\[[[ZZZYYYYYYYYYYYYXXXZZZ[[[[[[[[[[[[\\\\\\[[[YYYXXXWWWUUU'
+  +'SSSQQQPPPPPPOOONNNMMMLLLKKKJJJIIIGGGEEEFFFEEEEEEFFFIHEQNCLSm9S'#177'P\'#136
+  +'jicomemmlkkkiiiddd]]]TTTHHH>>>9994450/+++*'#21'7'#183#10'?'#255#11'='#255#10
+  +'='#255#9'<'#255#9';'#255#8';'#255#7':'#255#6'9'#255#4'8'#255#16'5'#203'2133'
+  +'31444555555555555444333333333222111///...+++)))&&&"""!'#30#17#16'$'#128#0'+'
+  +#252#0'*'#238#0'*'#237#0')'#236#0')'#234#0'('#234#0'('#233#0''''#231#0''''
+  +#231#0'&'#230#0'&'#229#0'%'#227#0'$'#226#0'$'#226#0'$'#225#0'#'#223#0'!'#233
+  +#15'$'#152'*)!((&&&&%%%$$$###!!!   '#31#31#31#30#30#30#30#30#30#29#29#29#28
+  +#28#28#27#27#27#26#26#26#24#24#24#22#22#22#19#19#19#18#18#18#16#16#16'777'
+  +#174#174#174#170#169#170#164#164#164#159#159#159#153#153#153#148#148#148#143
+  +#143#143#138#137#138#133#133#133#128#128#128'{{{vvvrrrnnmiiiddd```\\\XXXUUUQ'
+  +'QQMMMIJIHHHCCCAAA>>=<<;888656433100..-,+,***''''''''''''%%%$$$!!!  !'#31#31
+  +#31#31#30#31#30#29#29#28#28#28#27#28#27#27#27#27#27#27#27#25#26#26#25#26#25
+  +#26#26#25#25#26#25#25#25#25#25#25#25#25#24#24#25#24#23#24#24#24#24#23#23#24
+  +#23#23#23#23#23#23#23#23#23#23#22#22#22#22#23#22#23#22#22#22#22#22#22#22#22
+  +#22#21#22#22#21#22#22#21#21#22#22#21#21#21#21#21#20#21#21#20#21#21#20#21#20
+  +#20#20#20#20#19#20#20#19#20#19#19#19#18#18#19#19#18#18#18#18#18#18#18#18#18
+  +#18#18#17#17#18#17#17#17#17#17#17#17#18#17#17#17#17#17#17#17#19#18#19#26#26
+  +#25#27#27#27#27#27#27#27#27#27#27#27#27#27#27#26#25#25#24#18#18#19#18#18#17
+  +#18#17#17#17#17#17#17#17#17#16#17#17#17#17#16#16#16#16#16#16#16#16#16#16#16
+  +#16#16#15#16#16#16#16#16#16#16#16#15#15#15#15#15#15#15#15#15#15#14#14#15#14
+  +#14#14#13#14#14#13#13#11#11#12#11#11#11#11#11#11#11#11#11#10#11#11#12#11#12
+  +#18#17#18#31#31#31'##$''&''+++...'#30#29#30#7#8#8#7#7#7#7#7#7#7#7#7#7#7#7#7#7
+  +#7#7#7#6#6#6#7#6#6#7#6#7#7#6#6#6#6#6#6#5#5#6#6#6#6#6#6#6#5#6#6#6#6#6#5#5#5#5
+  +#5#5#5#5#4#5#5#5#4#5#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#3#4#4#3#4#3#4
+  +#4#3#4#3#4#4#4#3#4#3#3#3#3#3#4#3#3#3#3#3#3#2#3#3#2#3#3#3#3#3#3#3#2#2#2#3#5#5
+  +#5#2#2#3'000yyy0000000000000000000000000000000000000000000000000000000000002'
+  +'22444555666888:::===444...///////////////0/0998;;;;;;;;;;;:;;:;::;::;::;:::'
+  +':::::::::::::::::::::::::::::::::::::9::9::9::9:99:99:99:99:999999999999999'
+  +'99999999999999999999999998998988988988988555000000000000000000111999;;:;::;'
+  +'::;::::::::::::::::::::::::::::::::::9::9::9:99:99:99:999999999999999999999'
+  +'99999999999999998998:99:99:99;:::::;;;<<<======>>>@@@AAABBBDDDEEEGGFIIHKJJL'
+  +'LLOONRRRUTTWWWYYY\\\_^^baacccgggjjjmmmqqqtttxxw||{~~'#132#131#131#135#135
+  +#135#139#139#139#143#143#143#147#147#147#152#151#151#156#156#156#161#160#160
+  +#166#166#166#170#170#170#176#176#176#181#181#181#148#148#148'rrrrrrqqqooolll'
+  +'iiifffcccbbbaaa```_________^^^^^^\\\\\\\\\\\\[[[ZZZYYYYYYZZZZZZ[[[\\\^^^___'
+  +'````````````^^^\\\ZZZXXXVVVSSSRRRPPPPPPOOONNNLLLKKKIIIHHHGGGDDDCCCCCCDC@GD9'
+  +'EFN5K'#156#31'L'#239#21'J'#255#25'J'#254'3T'#205'\f'#142'uskuskoonjjjbbbYYY'
+  +'MMMAAA;;;65220('#26'8'#169#12'A'#255#12'?'#255#12'>'#255#11'>'#255#10'='#255
+  +#9'<'#255#9';'#255#8';'#255#7':'#255#3':'#255#16'6'#201'0/-31044444455555555'
+  +'5555444333333333222000...+++(((%%%""! '#30#21#11'&'#155#0','#253#0'*'#239#0
+  +'*'#238#0'*'#237#0')'#236#0')'#234#0'('#234#0'('#233#0''''#231#0''''#231#0'&'
+  +#230#0'&'#229#0'%'#227#0'$'#226#0'$'#226#0'$'#225#0'#'#231#9'#'#173'####"!""'
+  +'"###""""""!!!!!!'#31#31#31#31#31#31#31#31#31#30#30#30#29#29#29#27#27#27#25
+  +#25#25#24#24#24#22#22#22#20#20#20#17#17#17#15#15#15'___'#175#175#175#169#169
+  +#169#163#163#163#158#158#158#152#152#151#147#146#146#142#141#141#136#136#136
+  +#132#131#131'~~~zzzvvvpppmmmghhccd```[[[XXXUTTOOOMMMIIIGFFCCC@@@===;;:887555'
+  +'322100/..,+,)))''(''''''''%%%###!!!! !'#31#31#31#31#31#31#30#30#30#28#29#29
+  +#27#28#28#28#28#27#27#27#27#26#26#26#26#26#26#25#25#26#25#25#25#25#25#25#25
+  +#26#25#25#25#25#24#24#24#25#24#24#25#24#23#24#23#23#24#23#23#23#23#22#23#23
+  +#22#23#23#23#23#23#22#23#22#22#22#22#22#22#21#22#22#21#22#22#22#22#21#22#21
+  +#21#21#21#21#21#21#21#21#21#21#21#21#20#20#21#20#21#20#20#20#20#20#19#20#20
+  +#19#20#19#19#19#18#19#18#19#18#19#19#18#18#18#18#18#18#18#18#18#18#18#17#18
+  +#17#17#18#17#17#17#17#17#17#17#17#17#17#17#17#17#26#25#25#27#27#27#27#27#27
+  +#27#27#27#27#27#26#26#27#27#25#25#24#18#18#18#17#17#17#17#17#17#17#16#17#16
+  +#17#16#17#17#17#17#16#17#16#17#16#16#16#16#16#16#16#16#16#16#15#15#16#15#16
+  +#16#15#15#16#15#15#15#15#15#15#15#14#15#14#14#15#14#14#14#14#13#13#14#14#14
+  +#11#11#12#11#11#11#10#11#11#11#11#10#11#11#10#11#12#12#26#27#27'!!!$$$(((***'
+  +',,,'#16#16#17#8#7#8#8#8#7#7#7#7#7#6#7#7#7#7#6#7#7#6#6#7#7#6#6#6#6#7#6#6#6#6
+  +#7#6#6#6#6#6#6#5#6#6#5#5#6#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#5#4#5#5#5#5#5#5#5#5
+  +#5#5#5#5#4#5#4#4#4#5#4#4#4#4#4#4#4#4#4#4#4#3#4#4#3#3#4#4#4#4#3#3#3#3#3#3#3#3
+  +#3#3#3#3#3#3#3#3#3#3#3#3#3#2#3#3#3#2#3#8#8#5#2#2#2'000yyy0000000000000000000'
+  +'00000000000000000000000000000000000000111555444666777:::<<<333...//////////'
+  ,'/////0/0999;;;;;;;;;;;;;;;;;:;;:;::;::;::;:::::::::::::::::::::::::::::::::'
+  +'::::9::9::9::9:99:99:99:99:999999999999999999999999999999999999999989989989'
+  +'88988988988333000000000000000000212:::;;:;::;::;:::::::::::::::::::::::::::'
+  +':::::::9::9::9:99:99:99:99999999999999999999999999999999999998::9:99:99;::;'
+  +'::;;;;;;======>>>@@@@@@BBBDDDEEEGGGHHGJJILKKNMMPOORQQUTTWWWZZZ]\\___cbbfffi'
+  +'iilllpoossswwwzzz~~~'#129#129#129#133#133#133#137#137#137#142#141#141#146
+  +#145#145#150#150#150#155#155#155#159#159#159#165#165#165#169#169#169#174#174
+  +#174#180#180#180#166#166#166'ssssssrrrqqqnnnjjjgggeeebbbbbbaaa```_________^^'
+  +'^^^^\\\\\\\\\[[[ZZZZZZYYYYYYZZZ[[[]]]___bbbdddeeeeeedddcccaaa^^^[[[YYYVVVTT'
+  +'TQQQPPPPPPNNNMMMKKKIIIFFFEEEBCC@@@A?7@AG5G'#138'$M'#221#26'M'#255#26'L'#255
+  +#26'L'#255#25'K'#255#20'I'#255#24'I'#254':Y'#201'dl'#140'vtkqohffe\\\QQQCCC='
+  +'<8860'#31':'#163#13'A'#255#14'@'#255#14'@'#255#13'?'#255#12'>'#255#11'>'#255
+  +#10'='#255#9'<'#255#8'<'#255#7';'#255#13'7'#214'!0i//+1104444445555556665555'
+  +'55444333333222000...+++)))%%%""! '#30#24#11'&'#161#0'-'#253#0','#240#0'*'
+  +#239#0'*'#238#0'*'#237#0')'#236#0')'#234#0'('#234#0'('#233#0''''#231#0''''
+  +#231#0'&'#230#0'&'#229#0'%'#227#0'$'#226#0'$'#226#0'$'#231#7'"'#182'!!$#" ""'
+  +'"""""""!!!!!!!!!   '#31#31#31#31#31#31#30#30#30#29#29#29#28#28#28#25#25#25
+  +#24#24#24#22#22#22#20#20#20#17#17#17#15#15#15#135#135#135#173#173#173#167#167
+  +#167#162#162#162#157#157#157#151#151#151#146#145#145#140#140#140#135#135#135
+  +#131#130#130'~}}xyxtttpppkkkgggcbc^^^[[[WWWSTTPOOLMLIIIFFFCCB@??<<<:::776555'
+  +'2210///..-,,***''''(''''&%%%###"!!!!!'#31#31#31#31#31#31#30#30#30#28#28#29
+  +#28#28#27#28#28#27#27#27#27#26#27#26#26#26#25#26#26#26#26#26#25#25#25#26#25
+  +#25#25#25#25#25#25#25#25#24#24#24#25#24#24#24#24#24#24#24#23#24#23#23#23#23
+  +#23#23#23#23#23#23#22#23#22#22#23#23#22#22#22#22#22#22#22#22#22#21#22#21#22
+  +#22#22#22#22#22#21#21#21#21#21#21#21#21#21#21#20#20#20#21#20#21#20#20#20#20
+  +#19#20#20#19#20#19#18#19#18#18#19#18#18#19#19#18#18#18#18#18#18#18#18#18#18
+  +#17#17#17#17#17#18#17#17#17#18#17#17#17#17#17#16#17#17#16#24#23#23#28#27#27
+  +#27#27#27#27#27#28#26#27#27#26#27#27#25#25#25#19#19#18#18#17#17#17#17#17#17
+  +#17#17#17#17#16#17#16#17#17#17#17#16#16#17#17#16#16#16#16#16#16#16#16#16#16
+  +#16#15#16#15#16#16#15#15#15#15#16#14#15#15#14#15#15#14#14#15#14#13#14#14#13
+  +#13#12#12#11#11#11#11#11#11#11#10#11#10#10#10#12#12#12#14#13#13#31#30#30'!!"'
+  +'%%%''''''((('#31'  '#8#8#8#7#8#7#7#7#7#7#7#7#7#7#7#7#7#6#6#7#7#6#7#6#6#7#6#6
+  +#6#6#6#6#6#6#6#6#5#5#6#6#6#5#6#5#6#5#5#6#6#5#6#5#6#5#5#5#5#5#5#5#5#5#5#5#5#5
+  +#5#5#5#5#5#4#4#4#5#4#5#4#4#4#4#4#4#4#4#4#4#4#4#3#4#4#4#4#3#3#4#3#3#4#4#3#4#3
+  +#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#3#3#3#2#2#3#3#5#5#5#2#3#2'000yyy0000000000000'
+  +'00000000000000000000000000000000000000000000000333555777888::::::...///////'
+  +'////////0/0999;;;;;;;;;;;;;;;;;;;;:;;:;::;::;::;:::::::::::::::::::::::::::'
+  +'::::::::::9::9::9::9:99:99:99:99:999999999999999999999999999999999999999999'
+  +'98998988988988988888001000000000000000000333;;:;;:;::;::;::::::::::::::::::'
+  +'::::::::::::::::9::9::9:99:99:99:99999999999999999999999999999999999::9::9:'
+  +'99;::;::<;;;;;======>>>@@@@@@BBBCCCDDDGGGHHHJJIKKJNMMPOORQQUTTWVVXXX[[[^^^a'
+  +'aadddgggjjjmmmqqqtttxxx|||'#128#128''#132#132#131#136#135#135#140#140#140
+  +#144#144#144#149#148#148#153#153#153#158#158#158#162#162#162#168#168#168#173
+  +#173#173#178#178#178#180#180#180'|||uuutttrrrooollliiifffdddcccbbbaaa```____'
+  +'_____^^^^^^]]][[[[[[ZZZYYYYYYXXXYYY[[[]]]aaadddgggiiijjjjjjiiigggddd___\\\Y'
+  +'YYVVVTTTQQQPPPNNNMMMKKKGGGEEECCC@@??>:3D'#132'#N'#224#29'P'#255#28'O'#255#28
+  +'N'#255#28'M'#255#27'L'#255#26'L'#255#26'K'#255#24'J'#255#19'G'#255#26'J'#251
+  +':X'#201'_h'#136'kiaa`XSSRFEA>=7">'#166#14'C'#255#15'A'#255#15'@'#255#14'@'
+  +#255#14'@'#255#13'?'#255#12'>'#255#11'>'#255#9'>'#255#12'9'#226#26'/~**..,#/'
+  +'//112333444666666666666555555444333333111...,,,)))&&&##"!'#30#19#12'&'#149#0
+  +'.'#255#0','#241#0','#240#0'*'#239#0'*'#238#0'*'#237#0')'#236#0')'#234#0'('
+  +#234#0'('#233#0''''#231#0''''#231#0'&'#230#0'&'#229#0'%'#227#0'$'#226#0'$'
+  +#234#9'"'#166'  '#29'!!'#31'""""""""""""!!!!!!!!!'#31#31#31#31#31#31#31#31#31
+  +#29#29#29#28#28#28#26#26#26#24#24#24#21#21#21#20#20#20#17#17#17'!!!'#169#168
+  +#169#171#171#171#166#166#166#161#161#161#155#155#154#150#149#149#144#144#144
+  +#138#138#138#133#133#133#129#129#129'|{|xwwsrronnjjjfffaab]^]ZZZVVVRSSOOOKKL'
+  +'HHHEEECCC?@@=<<:::777554332000/..,++)))((''''&&%%%###"""!!  '#31' '#31#31#31
+  +#30#30#30#29#29#29#28#28#27#28#28#28#27#28#28#26#27#26#26#26#26#26#26#26#26
+  +#26#26#26#26#25#26#26#25#25#25#25#25#25#25#25#25#25#25#24#24#24#24#23#24#24
+  +#24#24#23#24#24#23#23#23#23#23#23#23#22#23#22#22#23#22#22#22#22#23#22#22#22
+  +#22#22#22#22#21#22#21#21#22#21#22#22#21#21#21#21#21#21#21#21#21#21#20#20#20
+  +#20#21#20#20#21#20#20#20#20#19#20#20#19#20#19#19#19#19#19#19#19#19#19#18#19
+  +#18#18#18#18#18#18#18#18#18#18#18#18#17#17#17#18#17#17#17#17#17#17#17#17#17
+  +#16#17#16#23#23#23#27#27#27#27#27#27#28#27#27#27#27#27#27#27#27#24#24#25#18
+  ,#18#18#17#17#17#17#17#17#17#17#17#17#17#16#17#16#17#16#17#16#16#16#17#16#16
+  +#16#16#16#16#16#15#16#16#15#16#15#16#15#15#15#15#15#15#15#15#14#15#15#14#14
+  +#14#14#14#14#14#14#14#14#14#11#12#13#11#11#11#11#11#11#11#11#11#11#11#11#11
+  +#12#12#21#20#21#31#31' """%$$&&&%$$'#18#18#19#7#8#8#7#7#7#7#8#7#7#7#7#7#7#7#7
+  +#7#7#6#7#6#7#6#6#6#7#6#6#6#6#6#6#6#7#6#6#6#6#6#5#6#6#6#6#6#6#5#5#5#6#6#5#5#5
+  +#5#5#6#5#5#5#5#5#4#5#5#5#5#5#5#5#4#4#5#5#5#5#4#4#4#4#4#4#4#5#4#4#4#4#4#4#4#4
+  +#3#4#3#3#3#3#3#3#4#3#3#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#3#2#3#8#5#8#3#2#2'0'
+  +'00yyy0000000000000000000000000000000000000000000000000000000000002226667779'
+  +'99;;;===000///////////////999;;;;;;;;;;;;;;;;;;;;;;;:;;:;;:;::;::;:::::::::'
+  +':::::::::::::::::::::::::::::::9::9::9::9:99:99:99:99:999999999999999999999'
+  +'99999999999999999998998998988988988988666000000000000000000000444;;:;;:;::;'
+  +'::;::::::::::::::::::::::::::::::::::9::9::9:99:99:99:999999999999999999999'
+  +'99999999999:::::9::9;::;::<;;<;;<<<===>>>???@@@BBBCCCDDDFFFGGGIIIKKJNNMONNQ'
+  +'QQTSSVUUYXX[[[]]]```cccfffiiimmmppptttwww{{{'#130#130#130#135#135#134#140
+  +#139#139#144#143#143#148#148#148#153#152#152#157#157#157#162#162#162#166#166
+  +#166#172#172#172#177#177#177#181#181#181#143#143#143'vvvvvvtttrrrooojjjgggee'
+  +'eccccccaaaaaa```_________^^^]]]\\\ZZZYYYYYYXXXXXXWWWYYY\\[ba]feciigmmmooopp'
+  +'pnnnllliiieee```[[[XXXVVVSSSPPPNNNMMMJJJGGGDDDAAA>=;;<>%M'#222#29'R'#255#31
+  +'P'#255#31'O'#255#30'O'#255#29'N'#255#28'M'#255#27'L'#255#26'L'#255#26'K'#255
+  +#25'J'#255#23'H'#255#18'F'#255#25'I'#251'5T'#197'R[zWTIFFF#B'#181#16'D'#255
+  +#17'C'#255#16'B'#255#16'A'#255#15'@'#255#14'@'#255#13'@'#255#11'@'#255#13'='
+  +#241#24'2'#149'$(8)&'#27'++(...000222444555666777666666666555555444333111000'
+  +'---***&&&###!'#30#19#18'#p'#0'.'#252#0','#242#0','#241#0','#240#0'*'#239#0
+  +'*'#238#0'*'#237#0')'#236#0')'#234#0'('#234#0'('#233#0''''#231#0''''#231#0'&'
+  +#230#0'&'#229#0'%'#227#0'%'#239#14'"'#135'!'#31#20'  '#31'!!!""""""""""""!!!'
+  +'!!!!!!   '#31#31#31#30#30#30#28#28#28#26#26#26#24#24#24#21#21#21#20#20#20#17
+  +#17#17'MMM'#175#175#175#170#170#170#165#165#165#159#159#159#154#154#153#148
+  +#148#148#143#143#142#138#138#137#132#132#132#128#128#128'{{{vvvrrrnmmijieee`'
+  +'``\]]YYYUVURRROOOJKJHIHEEEBBB??><<<99977755522100/..-,++*))(((''''''%%$###"'
+  +'#"     '#31#31' '#31#30#31#30#29#29#29#28#27#28#28#28#28#27#27#28#26#26#26
+  +#27#26#27#26#26#27#26#26#26#26#26#26#26#26#26#25#25#26#25#25#25#25#25#25#25
+  +#25#25#25#24#24#25#24#23#24#24#23#24#23#24#24#23#23#23#23#22#23#23#22#22#23
+  +#23#22#22#22#22#22#22#22#22#22#22#22#22#22#21#21#22#22#21#22#21#21#21#21#21
+  +#21#21#21#21#20#21#21#20#20#20#21#21#21#20#20#20#20#20#20#19#20#20#19#19#19
+  +#19#19#19#19#19#19#18#19#19#18#18#18#18#18#18#18#18#18#18#18#17#18#17#17#17
+  +#17#17#17#17#17#17#17#17#17#17#16#16#17#23#22#23#27#28#27#28#27#28#27#27#27
+  +#27#27#27#27#27#26#25#24#25#19#18#18#17#17#17#17#17#17#17#17#16#17#16#17#16
+  +#17#17#16#16#16#16#17#17#16#16#16#16#15#16#15#16#16#15#15#15#15#16#15#16#15
+  +#16#16#14#15#15#14#15#15#14#14#14#14#14#14#14#14#14#13#14#11#12#11#11#11#11
+  +#11#11#11#11#11#11#11#12#12#11#12#11#28#28#29'   !!!""""""'#29#29#29#7#8#8#8
+  +#8#7#7#7#7#7#7#7#7#7#7#6#7#7#7#7#7#7#7#6#7#7#6#6#6#6#7#7#6#6#6#7#6#6#6#5#6#6
+  +#6#6#6#6#5#6#5#5#5#5#6#5#6#5#5#5#5#5#5#5#5#5#5#5#5#5#5#4#4#4#5#5#4#5#5#5#4#4
+  +#5#4#4#4#4#4#4#4#4#4#4#3#4#3#4#4#3#4#4#3#4#3#4#3#3#3#3#4#3#3#3#3#3#3#3#3#3#3
+  +#3#3#3#3#2#8#8#8#2#2#3'000yyy00000000000000000000000000000000000000000000000'
+  +'0000000000000000666888999;;;===888///////////////766;;;;;;;;;;;;;;;;;;;;;;;'
+  +';;;:;;:;::;::;::;:::::::::::::::::::::::::::::::::::::9::9::9::9:99:99:99:9'
+  +'9:9999999999999999999999999999999999999999899899898898898898898844400000000'
+  +'0000000000000777;;:;;:;::;::;::::::::::::::::::::::::::::::::::9::9::9:99:9'
+  +'9:99:99999999999999999999999999999999:::::9;;:;::<;;<;;=<<======???@@@AAACC'
+  +'CDDDFFFGGGIIIKKKMMLOONQPPSRRUUUXXX[ZZ]]]___bbbfffiiilllpppssswwwzzz~~~'#130
+  +#130#130#133#133#133#138#138#138#142#141#141#147#146#146#151#151#151#156#155
+  +#155#160#160#160#165#165#165#169#169#169#175#175#175#180#180#180#163#163#163
+  +'wwwwwwvvvtttpppmmmhhheeedddcccbbbaaaaaa``````___^^^]]]\\\YYYXXXXXXWWWVVVVVV'
+  +'WVUZZZY`ucdkjjiqogvshwukwumrrqmmmiiieee___[[[WWWTTTQQQNNNLLLIIIFFFCCC>>>;:7'
+  +'79A#O'#235' R'#255' Q'#255#31'P'#255#31'P'#255#30'O'#255#29'N'#255#28'M'#255
+  +#27'L'#255#26'L'#255#26'K'#255#25'J'#255#24'I'#255#22'H'#255#18'G'#255#24'H'
+  +#250'/K'#180'%G'#199#17'E'#255#18'E'#255#18'D'#255#17'C'#255#16'B'#255#16'A'
+  +#255#14'A'#255#15'?'#251#23'6'#171'#)C)&'#27'*(#+++---0003334445556666667777'
+  +'77777666666555555333222000...+++((($$$!!'#27#26' 9'#2'-'#234#0'-'#247#0'-'
+  +#241#0','#241#0','#240#0'*'#239#0'*'#238#0'*'#237#0')'#236#0')'#234#0'('#234
+  +#0'('#233#0''''#231#0''''#231#0'&'#229#0'&'#231#0'%'#231#23#31'O '#30#22'   '
+  +'!!!"""###""""""!!!!!!!!!   '#31#31#31#30#30#30#28#28#28#26#26#26#24#24#24#21
+  +#21#21#19#19#19#17#17#17'}}}'#173#173#173#168#168#168#163#162#162#157#157#157
+  +#152#152#152#146#146#146#141#141#141#136#136#136#131#130#131'~~zyyuuuppplll'
+  ,'hhhddd```[\\XYXUUUQQQMNNKJJGGHDDDAAA>>><;;:9:76655522200///.,,+*))(''''&%&%'
+  +'%%"###""     '#31' '#31' '#30#30#31#30#29#29#28#28#28#28#28#28#27#27#27#26
+  +#26#27#27#26#27#27#26#26#26#26#26#26#26#26#26#26#26#25#26#26#26#26#25#25#25
+  +#25#25#25#25#25#25#25#25#24#24#25#24#24#25#24#23#24#23#23#24#23#23#23#22#23
+  +#23#23#23#23#22#22#23#23#23#23#22#23#21#22#22#21#22#21#22#22#21#22#22#22#21
+  +#22#21#21#21#21#21#21#21#20#21#21#21#21#20#20#20#20#20#20#20#20#20#20#20#19
+  +#20#20#19#19#19#18#19#18#19#19#18#19#18#18#18#18#18#18#18#18#18#17#18#18#18
+  +#17#17#17#17#18#17#17#17#17#17#17#17#17#17#17#17#16#16#24#23#23#28#28#27#27
+  +#27#27#27#27#27#26#27#27#27#26#27#24#23#23#17#17#18#17#18#17#17#17#17#17#16
+  +#16#17#16#17#17#17#16#16#16#16#16#16#17#17#17#17#16#16#16#16#16#15#15#16#16
+  +#16#16#16#15#15#15#15#14#15#15#14#14#15#13#14#14#14#13#14#14#13#13#13#12#11
+  +#11#11#11#11#12#11#11#11#11#11#11#12#12#11#17#16#17' '#31'  '#31#31#31#31#31
+  +#31#31#31#28#28#29#17#18#17#13#12#13#12#12#13#12#11#11#7#7#8#7#7#7#6#7#7#6#6
+  +#6#6#7#6#6#7#6#7#6#6#6#6#6#6#6#6#6#6#6#6#6#5#6#6#6#5#6#6#5#5#6#5#6#5#5#5#5#5
+  +#5#5#5#5#5#5#4#5#4#5#5#5#4#4#5#5#5#5#5#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#4#4
+  +#4#4#4#4#3#3#3#3#4#3#3#3#3#3#3#3#3#3#3#3#3#3#2#3#5#8#5#2#2#3'000yyy000000000'
+  +'000000000000000000000000000000000000000000000000000000333888999;;;<<<===///'
+  +'////////////111;;;;;;;;;;;;;;;;;;;;;;;;;;:;;:;::;::;::;::::::::::::::::::::'
+  +'::::::::::::::::::::9::9::9:99:99:99:99:99999999999999999999999999999999999'
+  +'999999998998988988988988988888323000000000000000000000777;;:;;:;::;::;:::::'
+  +':::::::::::::::::::::::::::::9::9::9:99:99:99:99999999999999999999999999999'
+  +'::::::;;:;;:<;;<;;=<<>=====???@@@AAABBBDDDEEEGGGIIIKKKLLLNNNPPORQQUTTWVVZYY'
+  +'\[[___bbbdddhhhkkknnnrrruuuyyy}}}'#128#128#128#133#133#133#137#137#136#141
+  +#141#141#145#145#145#150#149#149#154#154#154#159#159#159#163#163#163#168#168
+  +#168#173#173#173#178#178#178#179#179#179'~~~yyyxxxvvvqqqoookkkgggdddccccccaa'
+  +'aaaaaaa```___^^^\\\[[[YYYWWWUUUTTTSTTTSRVTME]'#175'5d'#249':c'#235'Ce'#213
+  +'Kg'#194'Tj'#182'Zm'#173'ap'#160'vvurrrmmmiiiddd^^^YYYWWWRRROOOLLLIIIEEEAAA='
+  +'==98449J#R'#247'!R'#255'!R'#255' Q'#255#31'P'#255#31'P'#255#30'O'#255#29'N'
+  +#255#28'M'#255#27'L'#255#26'L'#255#26'K'#255#25'J'#255#24'I'#255#23'I'#255#22
+  +'H'#255#18'G'#255#19'G'#255#21'F'#255#20'F'#255#19'E'#255#18'D'#255#17'C'#255
+  +#16'C'#255#20'>'#224'%0[+* +*#,,,---///0002224446666667778888888887776666666'
+  +'66555555333111///,,,)))&&&""! '#30#22#11''''#161#0'.'#255#0'-'#243#0'-'#242
+  +#0','#241#0','#240#0'*'#239#0'*'#238#0'*'#237#0')'#236#0')'#234#0'('#234#0'('
+  +#233#0''''#231#0''''#230#0''''#240#7'$'#179#29#29#28#31#30#29'   """"""#####'
+  +'#######!!!!!!   '#31#31#31#30#30#30#28#28#28#26#26#26#24#24#24#21#21#21#19
+  +#19#19'   '#167#167#167#172#172#172#167#167#167#161#161#161#155#155#155#150
+  +#150#150#144#144#144#139#139#139#134#134#134#129#130#130'}}}yxyssspppkkkffgc'
+  +'cd___[[[XXXSTSPPPMMMIIIGGGCCC@@@===;;;899666454222///..-,-,))((''''''&%&%%#'
+  +'"""!"      '#31'  '#31#31#30#29#30#29#28#28#28#28#28#28#27#27#27#26#27#26#26
+  +#27#26#26#26#26#27#26#26#26#26#26#26#26#26#26#26#25#25#26#25#25#25#25#25#25
+  +#26#25#25#25#25#25#25#24#24#24#24#24#24#25#24#24#24#23#23#24#23#23#23#23#22
+  +#23#23#23#23#22#23#22#22#22#23#22#22#22#22#22#22#21#22#22#21#22#21#21#21#21
+  +#21#21#22#22#22#21#21#21#21#21#21#21#20#21#20#20#20#20#20#20#20#20#20#20#19
+  +#20#19#19#20#19#19#19#18#19#18#18#19#18#18#18#18#18#18#18#18#17#18#18#17#18
+  +#17#18#17#18#18#18#17#17#17#17#17#17#17#17#17#16#17#17#23#23#23#27#28#27#27
+  +#27#28#27#27#27#26#27#27#27#27#26#23#22#23#17#18#17#17#17#18#17#17#17#17#17
+  +#17#17#17#16#17#17#16#16#17#17#17#16#16#16#16#16#16#16#16#16#16#15#16#16#15
+  +#15#15#15#15#14#15#15#14#14#15#14#14#14#14#14#14#14#13#14#14#14#11#12#11#11
+  +#11#12#11#11#11#11#11#11#12#12#12#12#11#12#27#26#27#30#30#30#31#31#31#29#29
+  +#29#27#27#27#27#27#27#26#26#26#25#25#25#24#25#24#24#24#24#23#24#23#23#23#24
+  +#22#22#22#19#19#19#19#19#19#19#19#19#16#16#16#15#15#15#15#15#15#15#15#15#10
+  +#10#10#10#10#10#10#10#10#8#9#9#5#6#6#5#5#5#5#5#5#5#5#5#4#5#5#4#5#5#5#5#5#4#4
+  +#5#4#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#4#3#4#3#3#4#3#3#3#3#3#4#3
+  +#3#3#3#2#3#8#5#8#3#3#3'000yyy00000000000000000000000000000000000000000000000'
+  +'0000000000000000111777999:::<<<===444///////////////888;;;;;;;;;;;;;;;;;;;;'
+  +';;;;;;:;;:;::;::;::::::::::::::::::::::::::::::::::::::::9::9::9::9:99:99:9'
+  +'9:99:9999999999999999999999999999999999999999899899898898898898898888811100'
+  +'0000000000000000000877;;:;;:;::;::;::::::::::::::::::::::::::::::::::9::9::'
+  +'9:99:99:99:99999999999999999999999999::::::;;;;;:;;:<;;=<<>==>==>>>@@@@@@BB'
+  +'BDDDEEEGGGHHHJJJKKKNNNPPORRQUTTWVVYXX\[[_^^aaadddfffjjjmmmppptttwww{{{'
+  +#131#131#131#135#135#135#140#140#139#144#144#144#148#148#148#153#152#152#157
+  +#157#157#162#162#162#166#166#166#172#172#172#177#177#177#181#181#181#146#146
+  +#146'zzzyyywwwtttqqqmmmjjjgggddddddbbbaaaaaa```^^^]]][[[YYYWWWTTTRRRQQQPPORO'
+  +'GF['#159'5f'#255'5e'#255'4d'#255'2c'#255'0b'#255'.`'#255'/`'#255'/`'#255'er'
+  ,#156'yworrrmmmgggbbb]]]XXXUUUPPPMMMIIIDDD@@@;;;8711:[#S'#251'"S'#255'!R'#255
+  +'!R'#255' Q'#255#31'P'#255#31'P'#255#30'O'#255#29'N'#255#28'M'#255#27'L'#255
+  +#26'L'#255#26'K'#255#25'J'#255#24'I'#255#23'I'#255#23'H'#255#22'H'#255#21'G'
+  +#255#21'F'#255#20'F'#255#19'E'#255#18'D'#255#16'D'#255#24'>'#203'1/*0/,01111'
+  +'1222333555666777888999999999999888999888777666666555444222000---***((($$$" '
+  +#27#27' 4'#3'-'#224#0'.'#253#0'-'#243#0'-'#242#0','#241#0','#240#0'*'#239#0
+  +'*'#238#0'*'#237#0')'#236#0')'#234#0'('#234#0'('#232#0''''#237#1''''#228#21
+  +#30'E'#31#29#21#31#31#31'!!!""""""######$$$######"""      '#30#30#30#28#28#28
+  +#26#26#26#23#23#23#21#21#21#18#18#18'NNN'#175#175#175#170#170#170#165#165#165
+  +#159#159#159#153#153#153#148#148#148#143#143#143#138#138#138#133#133#133#128
+  +#128#128'|{{xvvsrrnnnjjifffaba_^^ZZZUVVSTTOOPLLLIIIFFFCCC@@A===;;;8886564331'
+  +'11///...+,+))))((''&&%##$##"!"!!    '#31#31#31#30#29#30#29#30#30#28#29#28#28
+  +#28#29#27#27#27#27#27#27#27#27#27#27#27#26#27#26#27#27#27#26#26#26#27#26#26
+  +#26#26#25#26#26#26#26#26#25#26#25#25#25#25#25#25#25#25#24#25#24#24#25#24#23
+  +#24#24#24#24#24#23#24#23#23#23#23#23#23#23#23#23#23#22#22#23#22#22#22#22#22
+  +#22#22#22#22#21#21#21#21#22#21#22#21#21#21#21#22#21#21#21#21#20#20#21#21#20
+  +#20#20#21#21#21#20#21#20#20#20#20#19#19#20#19#20#19#18#19#18#18#18#19#18#19
+  +#19#18#18#18#18#17#18#18#18#18#17#17#18#18#17#17#17#17#17#17#18#17#17#17#16
+  +#16#17#17#16#16#23#23#22#27#28#27#27#27#27#27#27#27#27#27#27#26#27#27#21#21
+  +#21#17#17#18#17#17#17#17#17#17#17#17#17#16#17#17#17#17#17#16#17#16#16#17#16
+  +#16#16#16#16#16#16#16#15#16#15#16#16#16#15#15#16#14#15#15#15#14#14#14#14#14
+  +#14#14#13#14#14#13#13#14#11#12#12#12#11#11#11#11#11#11#11#11#12#11#12#14#14
+  +#13#28#29#28#29#29#28#28#28#28#27#27#27#27#27#27#26#26#26#26#26#26#25#24#25
+  +#24#24#24#25#24#24#24#24#24#24#24#24#24#24#24#24#24#24#24#24#24#24#24#24#24
+  +#24#24#24#24#24#24#24#24#24#24#24#23#23#23#23#23#23#23#23#23#23#23#23#23#23
+  +#23#23#23#23#20#20#20#19#18#19#20#20#20#14#14#14#5#5#4#4#5#4#4#4#4#5#4#4#4#5
+  +#4#4#4#4#4#4#4#3#4#3#4#3#4#4#4#3#4#3#3#3#3#3#3#3#3#3#3#3#3#3#3#8#8#8#2#3#3'0'
+  +'00yyy0000000000000000000000000000000000000000000000000000000000000000005558'
+  +'88:::;;;===<<<...////////////222;;;;;;;;;;;;;;;;;;;;;;;;;;:;;:;::;::;::;:::'
+  +'::::::::::::::::::::::::::::::::::9::9::9::9:99:99:99:99:999999999999999999'
+  +'999999999999999999999989989989889889889889888887770000000000000000000001119'
+  +'99;;:;;:;::;::;::::::::::::::::::::::::::::::::::9::9::9:99:99:99:999999999'
+  +'99999999999999::::::;;;;;;;;:<<;=<<>==>==?>>@@@@@@BBBCCCDDDGGGGGGIIIKKKNNNO'
+  +'OOQQQTTSVUUXXX\[[^]]`__bbbfffiiilllpppssswww{{{~~~'#130#130#130#134#134#134
+  +#138#138#138#142#142#141#147#147#146#151#151#151#156#155#155#161#160#160#165
+  +#165#165#169#169#169#174#174#174#180#180#180#166#166#166'{{{{{{yyywwwrrrnnnk'
+  +'kkhhheeedddcccbbbaaa```^^^]]]ZZZWWWUUURRROOOMMMNKAFV'#140'7g'#253'6g'#255'6'
+  +'f'#255'6e'#255'5d'#255'4d'#255'3c'#255'2a'#255'._'#255'Dg'#219'zyvvutpppkkk'
+  +'fff```[[[VVVQQQMMMIIIDDD???:::64-/<m$U'#255'#T'#255'"S'#255'!R'#255'!R'#255
+  +' Q'#255#31'P'#255#31'P'#255#30'O'#255#29'N'#255#28'M'#255#27'L'#255#26'L'
+  +#255#26'K'#255#25'J'#255#24'I'#255#23'I'#255#23'H'#255#22'H'#255#21'G'#255#21
+  +'F'#255#20'F'#255#19'E'#255#17'D'#255#21'B'#236'46?762777777888888999:::;;;;'
+  +';;;;;<<<;;;;;;:::999999888777666666444333111///,,,)))&&&###!'#31#22#23'"T'#2
+  +'.'#236#0'.'#254#0'-'#243#0'-'#241#0','#241#0','#240#0'*'#239#0'*'#238#0'*'
+  +#237#0')'#236#0')'#234#0'('#240#0'('#241#16' m'#29#27#16#30#29#30'   !!!"""$'
+  +'$$$$$###$$$$$$###"""   '#31#31#31#30#30#30#28#28#28#25#25#25#23#23#23#20#20
+  +#20#18#18#18#132#133#132#174#174#174#168#168#168#163#163#163#157#157#157#152
+  +#152#151#147#146#147#142#141#142#136#136#136#131#131#131'~zzzwvvrpqnmmiiie'
+  +'eea`a\\\YYYVVVRRRNNNKKLIIIEEEBBB??@<<<:::888666332000///---+++)*)()(''''&%$'
+  +'$$"##!!!!    '#31#31' '#30#30#30#30#30#30#29#28#28#29#28#28#27#28#27#27#27
+  +#27#26#27#27#26#27#27#27#26#26#26#27#26#26#27#26#26#26#26#26#26#25#25#25#25
+  +#26#26#26#26#25#26#25#25#25#25#25#25#25#25#25#25#24#24#24#24#23#24#24#23#24
+  +#23#23#24#23#23#23#23#22#23#23#23#22#23#22#23#22#22#22#22#22#22#22#22#22#22
+  +#22#22#21#22#22#22#21#22#21#21#21#21#21#21#21#21#20#21#21#21#21#20#21#20#20
+  +#20#21#20#20#20#21#20#19#20#19#19#19#19#18#19#18#19#19#18#18#18#18#18#18#18
+  +#18#18#18#18#18#17#17#18#18#17#18#17#17#18#17#17#17#17#17#17#16#16#17#16#17
+  +#16#25#25#25#28#27#27#27#27#27#27#27#27#26#26#27#26#26#25#19#20#19#18#17#17
+  +#17#17#17#17#17#17#17#17#17#16#16#17#16#17#17#17#17#16#17#16#17#16#16#16#15
+  +#16#16#15#16#16#16#15#15#15#15#15#15#14#14#15#14#15#14#14#14#14#14#14#13#13
+  +#13#11#11#13#11#12#11#11#12#11#11#11#11#12#12#12#12#12#12#23#23#23#28#27#28
+  +#28#28#27#27#27#28#27#27#28#26#26#26#26#25#26#26#25#26#26#25#26#25#25#25#24
+  +#25#24#25#24#25#24#24#24#24#24#24#24#24#24#24#24#24#24#24#24#24#24#24#24#24
+  +#24#24#24#24#24#24#24#24#24#23#24#24#24#24#24#24#23#24#24#23#23#23#25#24#24
+  +#25#24#24#25#25#25#27#27#27#5#5#5#4#4#5#5#5#4#4#4#5#4#4#5#4#4#4#4#4#4#4#4#3#4
+  ,#3#3#4#3#4#4#3#4#3#4#4#3#3#4#4#3#3#3#3#3#8#8#8#3#3#3'000yyy00000000000000000'
+  +'0000000000000000000000000000000000000000000000000111888999:::<<<>>>333/////'
+  +'//////////888;;;;;;;;;;;;;;;;;;;;;;;:;;:;::;::;::;:::::::::::::::::::::::::'
+  +':::::::::::::::9::9::9:99:99:99:99:99:9999999999999999999999999999999999999'
+  +'9998998988988988988988988888777000000000000000000000111999;;:;;:;::;::;::::'
+  +'::::::::::::::::::::::::::::::9::9::9:99:99:99:99999999999999999999::::::::'
+  +':;;;;;;<<;<<;>==>==?>>A@@@@@BBBCCCDDDFFFGGGIIIKKKMMMNNNQQQSSRUUUXWW[ZZ]\\`_'
+  +'_bbbeeehhhkkknnnrrruuuyyy}}}'#129#129#129#133#133#133#137#137#137#141#141
+  +#141#145#145#145#150#150#149#154#153#153#158#158#158#164#163#163#168#168#168
+  +#173#173#173#178#178#178#182#182#182#135#135#135'|||{{{yyyuuupppllliiigggeee'
+  +'ccccccaaa___^^^\\\YYYUUUQQQNNNKKKJG?EQy9h'#250'8h'#255'8g'#255'7g'#255'6f'
+  +#255'6e'#255'5d'#255'4d'#255'3c'#255'2b'#255'0a'#254'fs'#157'{yqsttoooiiieee'
+  +'```YYYSSSNNNIIIEEE???:::74*-@'#130'$V'#255'$U'#255'#T'#255'"S'#255'!R'#255
+  +'!R'#255' Q'#255#31'P'#255#31'P'#255#30'O'#255#29'N'#255#28'M'#255#27'L'#255
+  +#26'L'#255#26'K'#255#25'J'#255#24'I'#255#23'I'#255#23'H'#255#22'H'#255#21'G'
+  +#255#21'F'#255#20'F'#255#18'E'#255#19'C'#252'4<^<;5<<<===>>>??????@@@BBBAAAB'
+  +'BBAAA@@@>>>===;;;:::999888666666555444333111...+++(((%%%""""'#31#19#23'"T'#4
+  +','#221#0'.'#255#0'-'#248#0'-'#243#0','#241#0','#240#0'*'#239#0'*'#239#0'*'
+  +#241#0'*'#249#2'('#223#17' h'#28#27#19#30#29#28#31#31#31'   """$$$$$$%%%%%%$'
+  +'$$$$$$$$"""!!!'#31#31#31#29#29#29#27#27#27#25#25#25#22#22#22#19#19#19'---'
+  +#173#173#173#172#172#172#166#166#166#161#160#160#155#155#155#149#149#149#144
+  +#144#144#140#139#139#134#135#134#131#130#130'~~}yyyuttqpplkkhgfdcd___[\[XXXT'
+  +'TTQQQNNNJKJHHHDDDBBB>?><<<999777666333111///---+++***)((''''''&%$$###""!   '
+  +'  '#31#31#31#30#30#30#29#29#29#28#29#29#29#29#28#28#27#27#28#27#27#27#28#27
+  +#26#26#26#27#26#25#26#25#25#26#25#26#25#25#26#25#25#25#25#24#25#26#25#24#25
+  +#25#25#25#25#26#25#25#25#25#25#25#25#25#25#24#24#24#25#24#23#25#24#23#24#23
+  +#23#24#23#23#23#23#23#23#22#23#23#22#22#23#22#22#22#22#22#22#22#22#22#22#22
+  +#22#21#22#21#22#21#21#21#21#21#21#22#21#21#21#21#20#21#20#21#20#21#20#21#21
+  +#20#21#20#20#20#20#19#19#19#19#20#19#19#19#18#18#18#18#18#18#18#19#19#18#18
+  +#18#18#18#18#17#18#17#17#17#17#17#17#17#17#17#18#17#17#17#17#17#17#17#17#17
+  +#25#25#26#27#27#27#27#27#27#27#27#27#27#27#27#25#25#24#18#17#18#17#18#17#17
+  +#17#17#17#17#17#17#17#17#17#17#17#17#17#17#17#17#16#16#17#16#16#16#16#16#16
+  +#16#16#15#15#15#15#15#16#14#15#15#15#14#14#14#14#14#14#14#14#14#14#13#14#14
+  +#12#12#11#11#11#11#11#12#12#11#12#11#10#11#11#13#13#13#27#28#27#28#27#27#27
+  +#27#27#27#27#27#26#26#27#26#26#26#26#26#26#26#25#26#25#26#26#25#26#25#25#25
+  +#25#25#25#25#25#25#25#25#25#25#25#25#25#25#25#25#25#25#25#25#25#25#24#24#24
+  +#24#24#24#24#24#24#24#23#24#24#23#24#24#24#24#24#25#24#25#25#24#26#25#26#29
+  +#29#29'###'#11#11#11#5#5#5#5#4#4#5#4#4#4#4#4#4#5#4#4#4#4#4#4#4#4#4#4#3#4#4#4
+  +#3#3#4#3#3#3#3#4#3#4#3#4#3#3#8#8#8#3#3#3'000yyy00000000000000000000000000000'
+  +'0000000000000000000000000000000000000000666999:::;;;===;;;///////////////33'
+  +'3;;;;;;;;;;;;;;;;;;;;;;;;;;:;;:;::;::;::;::::::::::::::::::::::::::::::::::'
+  +':::9::9::9::9:99:99:99:99:9999999999999999999999999999999999999999899899898'
+  +'8988988988988888888665000000000000000000000111999;;:;;:;::;::;:::::::::::::'
+  +':::::::::::::::::::::9::9::9:99:99:99:99999999999999999:::::::::;;;;;;<<<<<'
+  +';==<>==>==@??A@@AAABBBDDDEEEGGGIIIKKKLLLNNNPPPRRRUUTWWVYXX\[[_^^baaeddfffjj'
+  +'jmmmppptttwww{{{'#131#131#131#135#135#135#140#140#140#144#144#144#148#148
+  +#148#152#152#152#157#156#156#161#161#161#167#166#166#171#171#171#176#176#176
+  +#181#181#181#157#157#157'~~~}}}zzzwwwsssooolllhhhfffeeecccbbb```^^^[[[WWWSSS'
+  +'NNNKJKHE>CMh;h'#242':j'#255':h'#255'9h'#255'8g'#255'7g'#255'6f'#255'6e'#255
+  +'5d'#255'4d'#255'4c'#255'/`'#255'Dg'#221'yywwvurrrmmmiiiddd^^^VVVOOOKKKFFF@@'
+  +'@;;;74(-C'#146'$X'#255'$U'#255'$U'#255'#T'#255'"S'#255'!R'#255'!R'#255' Q'
+  +#255#31'P'#255#31'P'#255#30'O'#255#29'N'#255#28'M'#255#27'L'#255#26'L'#255#26
+  +'K'#255#25'J'#255#24'I'#255#23'I'#255#23'H'#255#22'H'#255#21'G'#255#21'F'#255
+  +#20'F'#255#17'E'#255'/A'#133'EA6DEEHHHKKKLLLLLLLLLLLLKKKIIIGGGEEEBBB@@@===;;'
+  +';999999888666666555444222000---+++(((%%%"""!'#31#22#28#31'0'#14''''#149#3','
+  +#226#0'-'#248#0'-'#255#0'-'#255#0'-'#254#0'+'#245#2')'#224#10'$'#157#23#29'9'
+  +#30#27#17#30#30#29#31'  !!!###$$$$$$%%%%%%&&&%%%%%%$$$###!!!'#31#31#31#29#29
+  +#29#27#27#27#24#24#24#22#22#22#19#19#19'hhh'#176#176#176#170#170#169#164#164
+  +#164#158#158#158#153#153#153#147#147#147#142#142#142#138#138#138#134#133#133
+  +#129#129#129'||{wxwsssooojjjgffcbb___[Z[WWVTTTPPPMMLIJJGFGCCCAAA=>><<;889666'
+  +'555333/00...---***)))((''''''&%$$$$#"!!!  !    '#31#31#31#30#29#29#29#29#29
+  +#29#29#28#28#26#27#27#27#27#26#26#26#27#26#26#26#26#26#26#26#26#25#25#26#26
+  +#25#26#25#25#25#25#25#24#24#23#24#24#24#24#24#23#24#24#24#23#24#24#24#24#24
+  +#24#23#24#24#23#24#24#24#25#24#24#25#24#24#24#23#23#24#23#23#23#23#23#23#23
+  ,#22#22#23#22#23#23#22#22#22#23#22#22#22#22#21#22#22#21#22#22#21#21#22#22#21
+  +#21#21#21#21#21#21#21#21#20#21#21#21#20#20#20#20#20#20#20#20#20#20#19#20#20
+  +#19#20#19#18#19#19#19#18#18#18#18#18#18#18#18#18#18#17#18#18#17#17#18#17#18
+  +#17#17#18#17#18#17#17#17#16#17#17#17#16#18#19#19#26#26#26#27#28#27#27#27#28
+  +#27#26#27#27#27#27#23#22#23#18#17#17#17#17#17#17#18#17#17#17#17#17#17#17#17
+  +#16#17#16#16#16#16#17#16#16#16#16#16#16#16#16#16#15#15#15#15#15#15#15#15#15
+  +#14#15#14#15#14#14#15#14#14#15#14#14#14#13#13#13#12#12#12#12#11#12#11#11#11
+  +#11#11#11#11#11#11#17#17#18#19#19#20#19#19#20#22#22#22#24#23#23#24#23#23#23
+  +#23#23#26#26#26#26#26#26#26#25#26#25#26#26#26#25#26#25#25#25#25#25#25#25#25
+  +#25#25#25#25#25#25#25#25#25#25#25#25#25#25#25#25#25#25#25#25#25#24#25#25#25
+  +#25#25#25#25#25#25#25#25#26#28#28#28'   ''&&'#26#26#26#5#4#5#5#5#4#4#5#4#4#5
+  +#4#4#4#4#4#4#4#4#5#4#4#4#4#4#4#4#4#4#4#4#3#4#4#4#4#3#3#3#3#3#4#8#8#10#3#3#3
+  +'000yyy000000000000000000000000000000000000000000000000000000000000000000000'
+  +'222888999;;;<<<>>>222///////////////:99;;;;;;;;;;;;;;;;;;;;;;;:;;:;::;::;::'
+  +';:::::::::::::::::::::::::::::::::::::9::9::9::9:99:99:99:99:99999999999999'
+  +'999999999999999999999999999998998988988988988988888888888555000000000000000'
+  +'000000000777;;:;;:;::;::;::::::::::::::::::::::::::::::::::9::9::9:99:99:99'
+  +':99999999999999:::::::::;;;;;;<<<<<<==<>>=>==@??A@@BAABBBDDDEEEGGGHHHJJJKKK'
+  +'NNNPPPRRRUUUWWVYYX\[[^]]a``dccgffiiilllpppssswwwzzz~~~'#130#130#130#133#133
+  +#133#137#137#137#142#142#142#147#147#147#151#151#151#155#155#155#160#159#159
+  +#164#164#164#170#169#169#175#174#174#179#179#179#177#177#177#130#130#130'~~~'
+  +'}}}zzzuuuqqqnnniiigggeeedddbbb___]]]YYYUUUPPPKKKGE>BI\=f'#232';l'#255';i'
+  +#255':i'#255':i'#255'9h'#255'8g'#255'7g'#255'6f'#255'6e'#255'5d'#255'4d'#255
+  +'3b'#255'0a'#255'br'#165'}zrvvvsssnnniiiccc[[[RRRMMMHHHBBB==<85,-H'#164'%Y'
+  +#255'%V'#255'$U'#255'$U'#255'#T'#255'"S'#255'!R'#255'!R'#255' Q'#255#31'P'
+  +#255#31'P'#255#30'O'#255#29'N'#255#28'M'#255#27'L'#255#26'L'#255#26'K'#255#25
+  +'J'#255#24'I'#255#23'I'#255#23'H'#255#22'H'#255#21'G'#255#21'F'#255#16'E'#255
+  +'+G'#175'OMBQQPTTTWWWXXXWWWVVVUUUSSSQQQMMMJJJFFFCCC@@@===:::9999998887775555'
+  +'55333111///,,,***''''''%%%$$$! '#27' '#30#21#27#31'.'#20'"_'#15'%'#131#14'$'
+  +#137#14'$'#132#18'!d'#25#29'2'#29#28#20#30#29#22#31#31#31'!!!"""###$$$%%%%%%'
+  +'&&&&&&&&&&&&%%%$$$###!!!'#31#31#31#29#29#29#26#26#26#24#24#24#21#21#21#28#28
+  +#28#158#158#158#173#173#173#168#168#168#162#161#162#156#156#156#151#151#150
+  +#146#146#146#142#142#142#136#136#136#131#132#131'~~{zzvvuqrqnmliiieeebaa^]]'
+  +'YYYWWWSSSOOOLLLIIIGFFCDCAAA>>>;<<899666444222000///--,+**)))(((&&&%%$$%$""!'
+  +'      '#31'  '#31#30#30#29#29#28#29#28#29#28#28#28#27#26#27#27#26#26#26#26
+  +#27#26#27#26#26#26#26#26#26#26#26#25#26#26#25#25#25#25#25#25#25#25#25#24#24
+  +#23#24#24#24#24#24#24#23#24#24#23#23#23#23#23#23#23#23#23#23#23#23#23#23#24
+  +#23#24#25#24#24#25#23#23#24#23#23#23#22#22#23#22#23#22#23#22#22#23#22#22#22
+  +#22#22#21#21#21#22#21#21#21#21#22#21#21#21#21#22#21#21#21#21#21#21#21#20#21
+  +#20#21#20#20#20#21#20#20#21#20#20#20#20#19#20#20#19#20#19#19#19#18#18#18#18
+  +#18#18#18#18#18#18#18#18#17#18#17#17#17#17#17#17#17#17#17#17#17#18#17#17#17
+  +#17#16#16#17#20#21#21#27#27#27#28#27#27#28#27#27#27#27#27#27#27#27#20#20#20
+  +#17#18#18#17#18#17#17#17#17#17#17#17#17#17#17#17#16#17#16#17#16#17#17#16#17
+  +#16#16#16#16#16#16#15#15#16#14#15#15#14#15#15#14#14#14#14#14#14#14#15#14#14
+  +#14#14#14#14#12#12#11#11#12#12#11#12#11#11#11#11#12#11#11#11#11#11#11#11#11
+  +#10#11#10#11#10#11#11#11#11#10#10#10#10#10#10#10#10#10#10#10#9#10#10#9#12#11
+  +#12#14#14#14#14#13#14#13#13#14#17#17#17#18#18#18#17#17#18#17#18#17#22#22#21
+  +#21#21#21#21#21#21#22#22#22#25#25#25#25#25#24#26#26#25#27#27#26#30#30#30'$$%'
+  +'()(((('#5#5#5#5#5#5#5#5#5#4#5#5#5#4#4#4#4#4#4#4#5#4#4#4#4#4#4#4#4#3#3#4#4#4
+  +#3#4#3#3#4#4#3#3#8#8#8#3#4#3'000yyy00000000000000000000000000000000000000000'
+  +'0000000000000000000000000000000666999:::<<<===;;;///////////////333;;;;;;;;'
+  +';;;;;;;;;;;;;;;:;;:;::;::;::;::::::::::::::::::::::::::::::::::::::::9::9::'
+  +'9::9:99:99:99:99:9999999999999999999999999999999999999999899899898898898898'
+  +'8988888888888555000000000000000000000000777;;:;;:;::;::;:::::::::::::::::::'
+  +':::::::::::::::9::9::9:99:99:99:99999999999:::::::::;;;;;;<<<<<<===>>=>>=?>'
+  +'>A@@A@@CBBCCCDDDFFFGGGIIIKKKMMMOOOQQQSSSUUUXXW[[Z]\\`__bbbfeeihhkkknnnrrruu'
+  +'uyyy|||'#128#128#128#133#133#133#137#137#137#140#140#140#144#144#144#149#149
+  +#149#154#154#153#158#158#158#163#162#162#168#167#167#172#172#172#177#177#177
+  +#181#181#181#150#150#150#128#128#128'}}}xxxtttooolllhhhfffeeebbb___\\\XXX'
+  +'SSSNNNHGACGR>e'#220'=n'#255'<k'#255';k'#255';j'#255':i'#255':i'#255'9h'#255
+  +'8g'#255'7g'#255'6f'#255'6e'#255'5d'#255'4d'#255'0a'#255'Bg'#227'{{{{zxwwwss'
+  +'snnnhhh```VVVNNNIIIDDD>>=993-L'#184'&Y'#255'&W'#255'%V'#255'$U'#255'$U'#255
+  +'#T'#255'"S'#255'!R'#255'!R'#255' Q'#255#31'P'#255#31'P'#255#30'O'#255#29'N'
+  +#255#28'M'#255#27'L'#255#26'L'#255#26'K'#255#25'J'#255#24'I'#255#23'I'#255#23
+  ,'H'#255#22'H'#255#21'G'#255#19'E'#255' H'#221'UUX[ZX]]]```aaa```___\\\ZZZVVV'
+  +'SSSOOOJJJGGGCCC@@@===:::999888777777555444333111///---***(((&&&$$$""!!!'#29
+  +'!'#31#21' '#29#16' '#29#15' '#29#15' '#30#19#31#31#26#31#31#30'   """"""$$$'
+  +'$$$%%%&&&''''''&&&''''''''''''&&&%%%$$$###!!!'#31#31#31#29#29#29#26#26#26#23
+  +#23#23#20#20#20'QQQ'#176#176#176#171#171#171#165#165#165#159#159#159#154#154
+  +#154#150#149#149#144#144#144#139#139#139#135#135#135#130#130#130'~~~zyytttop'
+  +'ommlhhhddd`__]\\YYYUTURQQNNNKKKHHHEDDBBB???===;;;888666343111/00...,+,***))'
+  +')(((&&&%%$"#"!!"         '#30#31#31#29#29#29#29#28#29#29#28#28#27#27#27#27
+  +#26#27#26#26#27#26#27#26#26#26#26#26#27#26#26#26#26#26#26#25#26#26#26#25#25
+  +#26#25#25#25#25#24#24#24#24#24#23#24#23#23#23#23#24#23#23#23#23#24#23#23#23
+  +#23#22#22#23#22#23#23#22#23#23#22#23#23#23#23#24#23#23#23#22#23#23#22#23#23
+  +#23#23#22#23#22#22#22#23#22#22#22#21#22#22#22#22#22#22#21#21#21#21#21#21#21
+  +#21#21#21#21#20#21#20#20#21#21#21#20#20#20#20#20#20#20#20#20#19#20#19#19#20
+  +#19#18#19#18#18#18#19#18#18#18#18#18#18#18#18#18#18#18#18#17#18#17#18#17#17
+  +#18#18#17#17#17#17#16#16#16#17#17#23#24#24#28#27#26#27#27#27#27#28#27#27#27
+  +#27#26#26#26#19#17#18#17#17#17#17#17#17#17#18#17#17#17#17#16#17#17#17#16#16
+  +#17#17#16#16#16#16#16#16#16#16#15#16#16#15#15#16#15#15#15#15#15#14#14#15#15
+  +#14#15#14#14#15#14#14#14#13#13#12#12#12#12#12#12#12#11#11#11#11#11#11#12#11
+  +#11#11#11#11#10#11#11#11#10#10#11#11#10#11#10#10#10#10#10#10#11#10#10#10#10#9
+  +#9#10#10#10#10#10#10#9#10#9#9#9#9#9#10#9#10#9#9#9#8#9#9#9#9#9#9#9#8#8#9#8#8#9
+  +#8#8#9#8#8#8#8#8#8#8#8#8#9#30#29#30'!"!&&''+*+//0'#13#13#13#5#5#5#5#4#5#5#4#5
+  +#4#4#5#5#4#4#5#5#4#4#5#4#4#4#4#4#4#4#4#4#4#3#4#4#3#4#4#4#3#3#8#10#10#3#4#3'0'
+  +'00yyy0000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00333888:::;;;===>>>222///////////////888;;;;;;;;;;;;;;;;;;;;;;;:;;:;::;::;'
+  +'::;:::::::::::::::::::::::::::::::::::::9::9::9::9:99:99:99:99:999999999999'
+  +'999999999999999999999999999989989989889889889889888888888888885550000000000'
+  +'00000000000000555;;:;;:;::;::;::::::::::::::::::::::::::::::::::9::9::9:99:'
+  +'99:99:99999999:::::::::;;;;;;;;;<<<===>>>>>=??>A@@A@@CBBDCCDDDFFFGGGIIIKKKL'
+  +'LLNNNPPPRRRUUUWWWYYX\\[_^^baaeddgffjiimmmppptttwww{{{~~~'#130#130#130#135
+  +#135#135#139#139#139#143#143#143#147#147#147#151#151#151#156#156#155#161#161
+  +#160#165#165#165#170#169#169#175#174#174#179#179#179#172#172#172#130#130#130
+  +#129#129#129'{{{wwwrrrnnnjjjhhheeebbb___[[[WWWQQQKKHEIT@c'#207'>p'#255'>m'
+  +#255'>l'#255'<l'#255';k'#255';j'#255':i'#255':i'#255'9h'#255'8g'#255'7g'#255
+  +'6f'#255'6e'#255'5d'#255'4c'#255'1b'#255'cr'#166'|tzzzvvvrrrkkkbbbYYYQQQJJJ'
+  +'EEE@@><;;-P'#203'''Y'#255'''X'#255'&W'#255'%V'#255'$U'#255'$U'#255'#T'#255
+  +'"S'#255'!R'#255'!R'#255' Q'#255#31'P'#255#31'P'#255#30'O'#255#29'N'#255#28
+  +'M'#255#27'L'#255#26'L'#255#26'K'#255#25'J'#255#24'I'#255#23'I'#255#23'H'#255
+  +#22'H'#255#20'G'#255#22'G'#251'QXsfbSge^igbihdhgdfecdca``^\[ZXXXSSSOOOJJJEEE'
+  +'BBB>>><<<:::999888888666555444333222///---+++)))''''''&&&$$$###""""""!!!!!!'
+  +'""""""###$$$%%%&&&''''''''''''(((((((((''''''''''''''''''&&&$$$###!!!'#31#31
+  +#31#28#28#28#25#25#25#22#22#22#22#22#22#144#144#144#173#173#173#168#168#168
+  +#162#162#162#157#157#157#152#152#152#147#146#147#142#142#141#137#138#137#133
+  +#133#133#129#129#129'|||wwwssspookkjhhgccb`__[ZZXWWUTTQPPNMMJJJGGGDDDBBB?>?<'
+  +'<<:::677666443000000..-+,+**+)))(((&%%$$###"""!   !     '#31#30#31#29#30#30
+  +#29#29#29#30#28#28#28#27#27#27#27#27#27#28#27#28#28#28#27#27#28#27#27#27#28
+  +#27#27#26#26#26#27#26#26#26#26#26#25#25#25#25#25#25#25#24#24#23#24#24#24#24
+  +#23#23#23#23#23#23#23#23#24#23#23#23#23#23#23#23#22#22#23#22#21#23#22#22#23
+  +#22#22#23#23#23#23#23#23#23#23#23#23#22#23#23#23#22#23#22#22#22#22#21#22#22
+  +#21#21#21#21#22#21#22#21#21#22#21#21#21#21#21#21#21#21#21#21#21#20#21#20#20
+  +#20#21#20#20#20#20#20#20#19#20#20#19#20#19#19#19#18#18#18#18#18#18#18#18#18
+  +#18#18#18#18#17#18#18#18#18#18#17#18#17#17#17#17#17#17#17#17#16#18#17#17#26
+  +#25#25#28#27#26#27#27#27#27#27#27#27#27#27#22#22#22#17#18#17#18#17#18#17#17
+  +#18#17#17#17#17#17#17#17#16#17#17#17#16#16#16#16#16#16#16#16#16#16#16#15#15
+  +#16#15#15#15#15#15#15#15#15#14#14#14#14#15#14#14#14#14#14#14#14#11#12#12#12
+  +#11#11#12#11#12#11#12#11#11#11#12#11#11#11#11#11#11#10#11#11#10#10#11#10#11
+  +#10#10#11#11#10#11#10#10#10#10#10#10#10#10#10#10#10#10#9#10#9#9#9#10#9#9#9#9
+  +#9#9#9#9#9#9#9#9#8#9#9#9#9#8#9#9#8#9#8#8#8#8#8#8#8#8#8#9#9#9#25#25#25'###'''
+  +'''''*+*/0/'#29#29#29#5#5#6#5#5#5#5#5#5#4#5#5#4#5#4#4#4#5#4#5#4#4#5#4#4#4#4#4
+  +#4#4#3#4#4#4#4#4#3#3#4#10#10#8#3#3#4'000yyy000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000777999:::<<<===;;;///////////////'
+  +'222;;;;;;;;;;;;;;;;;;;;;;;:;;:;::;::;::;:::::::::::::::::::::::::::::::::::'
+  +'::9::9::9::9:99:99:99:99:99999999999999999999999999999999999999999998998988'
+  +'988988988988888888888888888555000000000000000000000000444:::;;:;::;::;:::::'
+  +':::::::::::::::::::::::::::::9::9::9:99:99:99:99999999::::::;;;;;;;;;<<<<<<'
+  ,'>>>>>>??>@@?A@@BAACBBEDDEEEGGGHHHJJJKKKNNNPPPRRRUUUWWWYYY\\[^^]`__cbbfffiii'
+  +'mllooorrrvvvyyy~~~'#129#129#129#133#133#133#137#137#137#141#141#141#145#145
+  +#145#150#150#150#154#154#154#158#158#158#163#163#162#168#167#167#172#172#172
+  +#177#177#177#182#181#181#149#149#149#131#131#131#129#129#129'}}}zzzuuuqqqmmm'
+  +'iiifffccc```[[[VVVQQQJH@CS'#131'@r'#255'?o'#255'?n'#255'>m'#255'>l'#255'<l'
+  +#255';k'#255';j'#255':i'#255':i'#255'9h'#255'8g'#255'7g'#255'6f'#255'6e'#255
+  +'5d'#255'1b'#255'Ch'#226'z{z|{yxxxtttnnnfff\\\SRRNMLHGEDA8?>9,T'#222'(Y'#255
+  +'(X'#255'''X'#255'&W'#255'%V'#255'$U'#255'$U'#255'#T'#255'"S'#255'!R'#255'!R'
+  +#255' Q'#255#31'P'#255#31'P'#255#30'O'#255#29'N'#255#28'M'#255#27'L'#255#26
+  +'L'#255#26'K'#255#25'J'#255#24'I'#255#23'I'#255#23'H'#255#22'H'#255#19'F'#255
+  +'3P'#188'N['#137'S^'#136'Zb'#129'aewcfpdflcdibbb`_\[[ZVVVQQQLLLGGGBBB???===:'
+  +':::::888888888666555444333111///...---***)))(((&&&%%%%%%%%%%%%%%%&&&&&&&&&('
+  +'(((((((()))))))))))))))(((''''''&&&$$$###   '#30#30#30#28#28#28#25#25#25#22
+  +#22#22'III'#176#176#176#171#171#171#165#165#164#160#159#160#154#154#154#149
+  +#149#149#144#144#144#140#140#140#135#135#136#131#131#132'yzyuvvrrrmmmiiie'
+  +'edbba^^][YYWVVSSSOONMMLJIIGGGDCDBAB>?>=<<9996665552220100//---++*)**))(''&&'
+  +'%%%$$$###! !  !   '#31#31#31#31#31#31#30#30#29#30#30#30#29#30#30#29#29#29#30
+  +#30#29#30#29#29#30#29#29#29#28#29#29#28#28#29#29#28#29#28#28#29#28#28#28#28
+  +#27#28#27#28#27#28#28#28#27#27#26#26#26#25#25#25#25#25#24#24#23#23#23#24#23
+  +#23#23#23#23#23#23#23#23#22#23#23#22#22#21#22#21#21#22#22#21#22#22#22#22#22
+  +#23#23#23#23#22#22#22#22#22#22#23#22#22#22#22#22#22#22#21#21#22#22#21#22#22
+  +#21#21#21#22#21#21#21#20#21#21#21#20#21#20#21#20#21#20#20#20#20#20#20#20#20
+  +#20#19#20#20#19#20#19#18#19#19#18#18#18#19#19#18#18#18#17#18#17#18#18#18#18
+  +#17#17#18#18#18#17#18#18#17#17#17#17#17#17#19#19#19#28#27#27#27#27#26#27#27
+  +#27#27#27#27#27#27#27#19#18#19#17#17#17#18#17#18#17#17#18#17#17#17#17#17#17
+  +#17#17#17#16#17#17#16#17#16#17#16#16#16#15#15#16#15#15#15#15#15#15#15#14#14
+  +#15#15#15#15#14#14#14#14#14#14#14#13#13#13#11#12#12#12#12#12#12#11#11#11#11
+  +#12#11#11#11#12#11#11#11#11#11#11#11#11#10#11#10#10#10#10#10#11#11#11#10#10
+  +#10#10#11#10#10#10#9#10#10#9#9#10#10#10#9#9#10#10#9#10#10#10#9#9#9#9#9#8#9#8
+  +#9#9#9#8#9#9#8#9#8#8#9#9#9#8#8#9#9#9#19#19#19'!!!%&&***/..++,'#5#5#5#5#5#5#4
+  +#5#5#5#4#5#5#5#5#4#4#4#5#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#4#3#4#4#4#10#8#10#4#3
+  +#4'000yyy0000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000333999:::;;;===>>>222///////////////888;;;;;;;;;;;;;;;;;;;;:;;:;;:;'
+  +'::;::;::::::::::::::::::::::::::::::::::::::::9::9::9::9:99:99:99:99:999999'
+  +'999999999999999999999999999999999989989989889889889889888888888888888885550'
+  +'00000000000000000000000222999;;:;::;::;::::::::::::::::::::::::::::::::::9:'
+  +':9::9:99:99:99:99999:::::::::;;;;;;<<<<<<===>>>>>>@@?AA@A@@CBBEDDEDDGGGGGGI'
+  +'IIKKKNNNOOOQQQSSSUUUXXXZZZ]]\___bbbeddhgglkknmmqqqtttxxx{{{'#131#131#131
+  +#135#135#135#140#140#140#144#144#144#147#147#147#152#152#152#157#157#157#161
+  +#161#161#165#165#165#170#169#169#175#174#174#179#179#179#173#173#173#133#133
+  +#133#132#132#132#129#129#129'}}}xxxtttoookkkgggddd```\\\VVVQQQJIHCCD@b'#203
+  +'@r'#255'@n'#255'?n'#255'>m'#255'>l'#255'<l'#255';k'#255';j'#255':i'#255':i'
+  +#255'9h'#255'8g'#255'7g'#255'6f'#255'6e'#255'4d'#255'1b'#255'cs'#165'~{rzyxw'
+  +'vtqpmjida_VWTJPOLIJQ?Jn5N'#162'*Y'#247')Z'#255')X'#255'(X'#255'''X'#255'&W'
+  +#255'%V'#255'$U'#255'$U'#255'#T'#255'"S'#255'!R'#255'!R'#255' Q'#255#31'P'
+  +#255#31'P'#255#30'O'#255#29'N'#255#28'M'#255#27'L'#255#26'L'#255#26'K'#255#25
+  +'J'#255#24'I'#255#23'I'#255#23'H'#255#21'G'#255#20'G'#255#20'F'#255#21'F'#253
+  +#21'F'#250#22'E'#247#23'E'#245#29'H'#232#31'H'#227'$I'#214'1N'#185'ZZZVVTQQQ'
+  +'LLLGGGCCC@@@===<<<:::999888888777666555444333222111///...,,,******)))(((((('
+  +'((()))((())))))************)))******)))(((''''''&&&$$$"""   '#29#29#29#26#26
+  +#26#24#24#24#24#24#24#144#144#144#173#173#173#168#168#167#162#162#162#157#157
+  +#157#153#153#153#147#147#147#143#143#142#138#138#138#134#134#134#129#129#129
+  +'|||xxxsstppplllhhhddd``_]]]YYXUTTSRRONNLLLHHHFEEBBB@@@>>><<;:9:666444122101'
+  +'....--+++))))(((&&%$%$$$"""  !!   !!!    '#31'     '#31#31#30#29#30#30#30#30
+  +#30#29#30#30#29#30#29#29#30#29#29#29#28#28#29#29#28#29#28#28#29#28#28#29#28
+  +#27#28#28#28#28#27#27#27#28#28#27#27#27#27#27#27#26#26#27#27#26#26#25#25#26
+  +#24#23#24#23#23#23#23#23#22#23#23#23#23#22#23#22#22#22#21#22#22#21#21#21#22
+  +#21#22#22#23#23#23#22#22#23#22#22#22#22#22#22#22#22#22#22#22#22#21#22#22#22
+  +#21#22#21#22#21#21#21#21#21#21#20#21#21#21#21#21#20#21#20#21#21#20#20#20#20
+  +#20#20#20#20#19#20#20#19#20#19#19#19#19#18#18#18#18#18#18#18#18#18#18#18#17
+  +#17#18#17#18#18#18#17#17#18#17#17#17#17#17#17#17#17#24#23#23#28#26#26#28#27
+  +#26#27#27#27#27#27#28#25#25#24#18#18#18#18#18#17#17#17#17#17#18#17#17#17#17
+  +#17#17#17#17#17#17#17#17#17#16#16#16#16#16#16#16#15#15#16#15#15#15#15#14#14
+  +#15#15#14#14#15#14#14#14#14#14#15#14#14#14#13#13#12#13#12#13#12#12#12#11#12
+  ,#13#11#11#12#12#11#12#11#11#12#11#11#11#11#11#10#10#11#11#10#11#11#10#11#11
+  +#10#10#11#10#10#10#10#10#10#9#10#10#10#9#10#10#9#9#10#9#9#9#10#9#9#9#9#9#9#9
+  +#8#9#9#8#8#8#9#9#9#8#9#9#9#9#9#9#10#9#13#12#12'   %%%)((-.-010'#11#11#11#5#5
+  +#5#5#5#5#5#4#4#4#5#5#5#5#5#4#4#5#5#5#4#5#4#4#5#4#4#4#4#4#4#4#4#4#4#4#8#10#10
+  +#4#4#4'000yyy000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000777999:::<<<===;;;///////////////111;;;;;;;;;;;;;;;;;;;;;;;:'
+  +';;:;::;::;::;:::::::::::::::::::::::::::::::::::::9::9::9::9:99:99:99:99:99'
+  +'999999999999999999999999999999999999998998998988988988988988888888888888888'
+  +'888555000000000000000000000000111877;;:;::;::;:::::::::::::::::::::::::::::'
+  +':::::9::9::9:99:99:99:99:::::::::;;;;;;<<<<<<===>>>>>>???AA@AA@CBBDCCEDDGFF'
+  +'GGGIIIKKKLLLNNNPPPRRRUUUWWWYYY\\\__^aa`dccgffiiimmmpppssswwwzzz~~~'#130#130
+  +#130#133#133#133#137#137#137#142#142#142#146#146#146#151#151#151#154#154#154
+  +#159#159#159#164#164#163#168#168#168#172#172#172#177#177#177#182#181#181#150
+  +#150#150#133#133#133#131#131#131#128#128#128'{{{vvvrrrmmmiiieeeaaa]]]WWWQQQJ'
+  +'KKDB=>EZ@m'#242'@q'#255'@n'#255'?n'#255'>m'#255'>l'#255'<l'#255';k'#255';j'
+  +#255':i'#255':i'#255'9h'#255'8g'#255'7g'#255'6f'#255'6e'#255'2c'#255'Ch'#226
+  +'xxxxxustxloy_g'#133'P`'#150'B['#173'9Y'#198'1['#234',\'#254'*\'#255'*['#255
+  +'*Z'#255')Y'#255')X'#255'(X'#255'''X'#255'&W'#255'%V'#255'$U'#255'$U'#255'#T'
+  +#255'"S'#255'!R'#255'!R'#255' Q'#255#31'P'#255#31'P'#255#30'O'#255#29'N'#255
+  +#28'M'#255#27'L'#255#26'L'#255#26'K'#255#25'J'#255#24'I'#255#23'I'#255#23'H'
+  +#255#21'G'#255#20'G'#255#20'F'#255#19'E'#255#17'D'#255#16'C'#255#15'B'#255#13
+  +'A'#255#12'?'#255#12'?'#255'BP'#135'WTJOOOKKKHHHCCC@@@===<<<;;;:::8888888888'
+  +'88666555444444333111000///...---,,,+++++++++***++++++,,,,,,,,,++++++++++++*'
+  +'*****(((''''''&&&$$$"""'#31#31#31#29#29#29#26#26#26#23#23#23'HHH'#176#176
+  +#176#171#171#171#165#165#165#161#160#161#155#155#155#150#150#150#145#145#145
+  +#142#142#142#137#137#137#133#133#133#128#128'{{{wwwrrrnnnkkjggfccc___[ZZXXX'
+  +'UTTQPPNNNKJIHGGEDDBBB???===;;;878666444122000../,,,+++))))((&&%&$%$##""#"""'
+  +'"""#""!"!!  !    '#31#31#31#30#31#30#30#30#30#29#31#30#29#30#29#29#30#29#29
+  +#29#29#29#29#29#29#29#28#29#29#28#28#29#28#28#28#28#28#28#28#28#27#28#28#27
+  +#27#27#27#27#27#27#27#27#27#26#27#26#26#27#26#27#26#25#26#25#24#24#24#23#22
+  +#23#23#22#23#23#23#23#22#21#22#21#21#22#21#21#21#21#21#21#22#22#22#23#22#22
+  +#22#22#22#22#22#22#22#22#22#21#22#22#22#22#22#22#22#21#21#22#22#21#22#21#21
+  +#21#21#21#21#21#20#21#21#21#21#20#21#20#21#20#21#20#20#20#20#20#19#20#20#19
+  +#20#19#19#19#19#18#18#18#18#18#18#18#18#17#18#18#18#18#17#17#18#17#18#17#17
+  +#17#17#17#17#17#17#18#17#18#27#27#27#27#27#26#28#27#26#28#27#27#27#27#27#20
+  +#20#20#18#18#17#18#18#18#17#18#17#18#17#17#17#17#17#16#16#17#17#16#17#16#16
+  +#17#17#16#16#16#16#15#16#15#15#15#15#15#15#15#14#15#14#15#15#15#14#14#15#14
+  +#15#15#14#14#14#14#14#14#14#14#13#14#14#14#14#14#13#14#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#12#13#11#12#12#11#12#12#12#11#12#11#11#11#11#12#12#11#11
+  +#11#10#11#11#10#10#10#10#10#10#9#10#10#9#9#10#9#9#9#9#9#9#9#8#9#9#9#9#8#9#8#8
+  +#8#8#8#8#8#10#10#10#27#27#27'#"#(((,,-000'#24#24#24#5#5#5#5#6#5#5#5#5#5#5#5#5
+  +#5#5#5#5#5#4#5#4#4#5#4#5#4#4#4#5#4#4#4#4#3#4#4#10#10#10#3#4#4'000yyy00000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000033399'
+  +'9:::;;;===>>>222///////////////766;;;;;;;;;;;;;;;;;;;;:;;:;::;::;::;:::::::'
+  +':::::::::::::::::::::::::::::::::9::9::9:99:99:99:99:9999999999999999999999'
+  +'999999999999999999999899898898898898898888888888888888888888876600000000000'
+  +'0000000000000000555;;:;::;::;::::::::::::::::::::::::::::::::::9::9::9:99:9'
+  +'9:99;::::::::;;;;;;<<<<<<===>>>>>>???AAAAA@BBACBBEDDFEEHGGHHHJJJKKKNNNPPPQQ'
+  +'QTTTVVVXXX[[[^^^``_bbbfeeihhlkkonnsrruuuyyy|||'#128#128#128#132#132#132#136
+  +#136#136#140#140#140#144#144#144#148#148#148#153#153#153#157#157#157#161#161
+  +#161#166#166#166#170#170#169#175#174#174#179#179#179#173#173#173#135#135#135
+  +#134#134#134#131#131#131'yyyuuuqqqkkkgggbbb^^^YYYSSSLLLEEE?<3=O'#133'Aq'
+  +#255'@p'#255'@o'#255'?n'#255'>m'#255'>l'#255'<l'#255';k'#255';j'#255':i'#255
+  +':i'#255'9h'#255'8g'#255'7g'#255'6f'#255'6e'#255'4d'#255'Gi'#216'Gh'#215'=e'
+  +#231'6b'#246'2a'#252'.`'#255',`'#255'-_'#255'-^'#255'-]'#255'-\'#255'+['#255
+  +'*['#255'*Z'#255')Y'#255')X'#255'(X'#255'''X'#255'&W'#255'%V'#255'$U'#255'$U'
+  +#255'#T'#255'"S'#255'!R'#255'!R'#255' Q'#255#31'P'#255#31'P'#255#30'O'#255#29
+  +'N'#255#28'M'#255#27'L'#255#26'L'#255#26'K'#255#25'J'#255#24'I'#255#23'I'#255
+  +#23'H'#255#22'H'#255#21'G'#255#21'F'#255#20'F'#255#19'E'#255#18'D'#255#17'C'
+  +#255#16'B'#255#13'@'#255#28'D'#221'MMPLLHHHHEEECCC@@@===<<<<<<:::99988888888'
+  +'8888666666555444444222111111000......---------------------,,,,,,,,,,,,+++++'
+  +'+***)))''''''&&&$$$!!!'#30#30#30#28#28#28#25#25#25#25#25#25#146#145#146#173
+  +#174#173#168#168#168#162#162#162#158#158#158#153#153#153#147#148#147#144#144
+  +#144#139#139#140#135#135#135#129#129#130'~~}zyzuuuqqqmmmhhieeeaaa]]]ZYZVWVSS'
+  ,'SPPONMMJIIHGFECDBAA?>>===:9:7775653331110/0///,,++**))*)))&''&%%%$%$%$###$#'
+  +'#####!!! !!!  ! '#31#31#31#30#30#30#30#31#30#29#31#30#30#31#30#29#30#29#29
+  +#30#29#29#29#29#29#29#28#28#29#29#29#29#28#28#28#28#28#28#28#28#28#28#27#27
+  +#28#28#28#27#28#27#27#27#27#27#27#26#27#27#27#27#27#26#27#26#26#26#26#26#26
+  +#26#24#24#24#23#23#23#22#22#22#22#22#22#21#22#22#21#21#21#21#21#21#22#21#22
+  +#23#22#23#23#22#22#22#22#22#22#22#22#21#22#22#21#21#22#21#21#22#21#21#22#21
+  +#22#21#21#21#21#21#21#21#21#21#20#20#20#20#20#20#20#20#20#20#20#20#20#20#19
+  +#20#20#19#20#19#18#19#19#18#18#19#19#18#18#18#18#18#18#18#18#18#17#18#17#18
+  +#17#17#17#17#17#17#17#17#17#22#21#21#28#27#27#27#26#27#28#27#26#27#28#27#25
+  +#25#24#18#18#17#18#18#18#18#17#17#17#18#17#17#18#18#17#17#17#17#17#17#17#17
+  +#17#17#16#16#16#15#16#16#15#15#15#15#15#15#15#15#15#15#15#14#14#14#15#15#15
+  +#14#15#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#14#13#13#13#13#14#13
+  +#13#13#13#13#13#13#13#13#12#13#13#12#12#13#12#13#12#12#11#12#12#12#12#12#12
+  +#12#11#11#12#11#10#11#10#11#10#10#11#10#10#10#11#11#10#10#10#10#10#10#10#10#8
+  +#9#9#8#9#8#9#8#8#9#9#8#9#10#10#20#20#20'"""&''''*+*000%%$'#5#6#6#5#5#5#5#6#5
+  +#5#5#5#5#5#5#5#5#5#5#5#4#4#4#4#4#4#4#5#4#4#4#4#5#4#4#5#10#10#10#4#4#4'000yyy'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000888999:::<<<===<<<///////////////0/0:::;;;;;;;;;;;;;;;;;;;;:;;:;::;::'
+  +';::::::::::::::::::::::::::::::::::::::::9::9::9::9:99:99:99:99:99999999999'
+  +'999999999999999999999999999998998998988988988988988888888888888888888888766'
+  +'111000000000000000000000000222999;::;::;::::::::::::::::::::::::::::::::::9'
+  +'::9::9:99:99;::;:::::;;;;;;;;;<<<<<<>>>>>>>>>@@@AAABBACCBEDDEDDHGGHGGIIIKKK'
+  +'MMMOOOQQQSSSUUUXXXZZZ\\\___bbaeedgffjiinmmppptttwww{{{~~~'#130#130#130#133
+  +#133#133#137#137#137#142#142#142#147#147#147#151#151#151#154#154#154#159#159
+  +#159#164#164#164#168#168#167#172#172#172#177#177#177#182#181#181#154#154#154
+  +#135#135#135#134#134#134#130#130#130'}}}yyysssnnniiieee```[[[UUUOOOHHHBA@<:6'
+  +'?['#179'As'#255'@o'#255'@o'#255'?n'#255'>m'#255'>l'#255'<l'#255';k'#255';j'
+  +#255':i'#255':i'#255'9h'#255'8g'#255'7g'#255'6f'#255'5e'#255'2c'#255'1c'#255
+  +'1b'#255'1a'#255'1a'#255'1a'#255'0`'#255'/_'#255'/_'#255'.^'#255'-]'#255'-\'
+  +#255'+['#255'*['#255'*Z'#255')Y'#255')X'#255'(X'#255'''X'#255'&W'#255'%V'#255
+  +'$U'#255'$U'#255'#T'#255'"S'#255'!R'#255'!R'#255' Q'#255#31'P'#255#31'P'#255
+  +#30'O'#255#29'N'#255#28'M'#255#27'L'#255#26'L'#255#26'K'#255#25'J'#255#24'I'
+  +#255#23'I'#255#23'H'#255#22'H'#255#21'G'#255#21'F'#255#20'F'#255#19'E'#255#18
+  +'D'#255#17'C'#255#16'C'#255#13'A'#255'-C'#156'GE=CDCBBB@@@???===<<<<<<;;;:::'
+  +':::888888888888777666555444444333222111111000000/////////.........------,,,'
+  +',,,,,,+++***)))''''''&&&###   '#30#30#30#27#27#27#24#24#24'RRR'#176#176#176
+  +#171#171#171#165#165#165#160#160#160#155#155#155#150#150#150#145#145#145#142
+  +#142#142#138#138#138#133#133#133#128#128'{{{xwxrrroookkkgggccc``a\\\XXXVVVS'
+  +'RRPPOLLLIHHFFFDCCAA@>>==<=999777455222221///...++,*+*)))(((&&&''&&%&%$#$$#$'
+  +'###"""""!!! !!    '#31#31#30#31#30#30#31#30#30#30#30#30#30#30#29#30#29#30#30
+  +#29#29#29#29#29#29#28#28#29#29#28#29#28#28#29#28#28#28#28#28#27#28#28#28#28
+  +#27#28#27#27#27#28#27#27#27#27#27#27#27#26#27#26#27#26#27#27#26#27#26#26#26
+  +#26#26#26#25#25#25#22#22#23#23#22#22#23#21#22#22#21#22#21#21#21#21#21#21#21
+  +#21#20#23#22#22#22#22#22#22#23#22#22#22#22#22#21#21#22#21#22#22#22#22#21#21
+  +#21#21#21#21#21#21#21#20#21#21#21#21#21#20#20#20#20#20#20#20#20#20#19#20#20
+  +#20#19#20#20#19#20#19#18#19#18#19#18#19#18#18#18#18#18#18#18#18#18#18#18#17
+  +#17#18#17#17#17#17#17#17#17#17#17#26#26#26#28#27#27#27#27#27#27#27#26#27#27
+  +#27#21#21#21#18#18#18#17#18#18#18#18#17#17#17#17#17#17#17#17#17#17#17#17#17
+  +#17#16#16#17#16#16#16#15#15#16#16#15#15#16#15#15#15#15#15#15#15#15#14#14#14
+  +#14#14#15#14#14#14#14#15#14#14#14#14#14#14#14#14#14#13#14#13#13#13#13#14#13
+  +#13#13#13#13#13#13#13#13#13#12#13#13#13#13#12#13#13#12#12#12#11#12#12#11#12
+  +#12#11#12#11#11#11#11#11#11#11#11#10#10#10#10#10#11#11#10#11#10#10#10#10#9#9
+  +#10#8#9#9#9#9#8#9#9#9#9#10#9#16#15#15'!!!&&&+++//.222'#6#5#5#5#6#5#5#5#6#5#5
+  +#5#5#5#5#5#5#5#5#5#5#4#4#5#4#4#4#4#4#4#5#4#4#4#4#4#10#10#10#4#4#4'000yyy0000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00333999:::;;;===>>>444///////////////555;;;;;;;;;;;;;;;;;;;;:;;:;::;::;::;'
+  +':::::::::::::::::::::::::::::::::::::9::9::9::9:99:99:99:99:999999999999999'
+  +'999999999999999999999999999989989889889889889888888888888888888888888888772'
+  +'22000000000000000000000000111666;::;::;::::::::::::::::::::::::::::::::::9:'
+  +':9::9:99;::;::;::;;;;;;;;;<<<<<<===>>>>>>@@@AAAAAACCBDDCEDDGFFHGGJIIKKKLLLN'
+  +'NNPPPRRRUUUWWWYYY\\\^^^```ccbfffiiilkkpoosrrvuuyyy|||'#128#128#128#132#132
+  +#132#136#136#136#140#140#140#144#144#144#148#148#148#153#153#153#157#157#157
+  +#161#161#161#165#165#165#170#170#169#175#175#174#179#179#179#177#177#177#140
+  +#139#139#136#136#136#133#133#133#129#129#129'|||vvvqqqlllfffbbb]]]XXXRRRKKKE'
+  ,'EE?>;<>D@f'#216'Ar'#255'@o'#255'@o'#255'?n'#255'>m'#255'>l'#255'<l'#255';k'
+  +#255';j'#255':i'#255':i'#255'9h'#255'8g'#255'7g'#255'6f'#255'6e'#255'5d'#255
+  +'4d'#255'3c'#255'2b'#255'2a'#255'1a'#255'0`'#255'/_'#255'/_'#255'.^'#255'-]'
+  +#255'-\'#255'+['#255'*['#255'*Z'#255')Y'#255')X'#255'(X'#255'''X'#255'&W'#255
+  +'%V'#255'$U'#255'$U'#255'#T'#255'"S'#255'!R'#255'!R'#255' Q'#255#31'P'#255#31
+  +'P'#255#30'O'#255#29'N'#255#28'M'#255#27'L'#255#26'L'#255#26'K'#255#25'J'#255
+  +#24'I'#255#23'I'#255#23'H'#255#22'H'#255#21'G'#255#21'F'#255#20'F'#255#19'E'
+  +#255#18'D'#255#17'C'#255#15'B'#255#17'A'#247'8?Z@?:???===>>>======<<<;;;;;;:'
+  +'::999888888888777666666666555444444333333222222111000000000//////......---,'
+  +',,,,,+++***)))''''''%%%"""   '#29#29#29#26#26#26'###'#157#157#157#174#174
+  +#174#168#168#167#162#163#162#157#157#157#153#153#153#148#148#148#144#144#144
+  +#140#140#140#135#135#136#130#130#130'~~~zzzvvvqqqmmniiifffbbb^]][[\XXXTSTQPQ'
+  +'NNNKKKHHHFEECBB@@@===;::988776555222100///---+,,))*))*)()''''''''''''%%%$$$'
+  +'##$$##""""""!!! ! !  '#31#31#30#31#31#31#29#29#29#28#27#28#28#27#27#27#27#27
+  +#26#25#26#25#25#25#25#26#26#27#26#26#27#26#27#26#27#27#27#27#27#28#28#28#27
+  +#28#28#27#27#27#28#27#28#27#27#27#27#27#27#27#27#27#27#27#26#27#27#27#26#27
+  +#27#27#27#26#26#26#26#26#26#26#24#24#24#23#23#23#22#22#22#21#21#22#21#21#21
+  +#21#21#21#21#21#21#22#22#22#22#22#22#22#22#22#22#22#22#21#22#22#22#22#21#21
+  +#22#22#21#21#21#21#22#21#21#21#21#21#21#21#21#21#20#20#20#20#20#20#21#21#20
+  +#20#20#20#20#20#19#20#20#19#19#19#18#19#18#19#19#18#18#18#18#18#18#17#18#18
+  +#18#18#17#17#17#18#17#18#18#17#17#17#20#20#20#27#27#26#27#27#27#28#26#27#27
+  +#27#26#25#25#25#18#18#18#17#18#18#18#17#18#18#17#17#17#17#18#18#17#18#17#17
+  +#17#17#17#16#17#16#16#17#15#15#16#15#15#15#16#16#15#15#15#15#15#15#15#15#15
+  +#15#15#15#15#14#15#14#14#15#14#14#14#14#14#14#14#14#14#14#14#14#14#13#14#14
+  +#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#13#11#13#12#11
+  +#12#12#11#12#11#11#11#11#11#11#10#11#11#11#11#11#11#10#10#11#11#10#10#11#10
+  +#10#10#10#9#9#9#8#9#9#9#9#9#10#9#9#10#11#11#31#30#30'%%%)))...122'#16#17#16#6
+  +#6#5#6#6#5#5#6#5#5#5#5#5#5#5#5#5#5#5#5#4#4#5#5#5#5#5#4#4#5#4#5#4#10#10#10#4#4
+  +#4'000yyy0000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000777999:::<<<======//////////////////999;;;;;;;;;;;;;;;;;:;'
+  +';:;::;::;::;::::::::::::::::::::::::::::::::::::::::9::9::9:99:99:99:99:99:'
+  +'999986664441115559999999999999999999999989989889889889889889888888888888888'
+  +'88888888888888333000000000000000000000000000333998;::;:::::::::::::::::::::'
+  +':::::::::::::9::9::9;::;::;::;::;;;;;;<<<<<<===>>>>>>???AAAAAABBBCCBEEDFEEH'
+  +'GGIHHKJJKKKNNNOOOQQQSSSUUUXXXZZZ]]]___bbbeedhhgkjjnmmqpptttwww{{{~~~'#130
+  +#130#130#134#134#134#137#137#137#142#142#142#146#146#146#151#151#151#154#154
+  +#154#158#158#158#163#163#163#168#168#168#172#172#172#177#177#177#182#181#181
+  +#162#162#162#137#137#137#135#135#135#132#132#132#128#128#128'zzzuuuooojjjeee'
+  +'```[[[VVVOOOIIICDD><6<CZAl'#236'Ar'#255'@o'#255'@o'#255'?n'#255'>m'#255'>l'
+  +#255'<l'#255';k'#255';j'#255':i'#255':i'#255'9h'#255'8g'#255'7g'#255'6f'#255
+  +'6e'#255'5d'#255'4d'#255'3c'#255'2b'#255'2a'#255'1a'#255'0`'#255'/_'#255'/_'
+  +#255'.^'#255'-]'#255'-\'#255'+['#255'*['#255'*Z'#255')Y'#255')X'#255'(X'#255
+  +'''X'#255'&W'#255'%V'#255'$U'#255'$U'#255'#T'#255'"S'#255'!R'#255'!R'#255' Q'
+  +#255#31'P'#255#31'P'#255#30'O'#255#29'N'#255#28'M'#255#27'L'#255#26'L'#255#26
+  +'K'#255#25'J'#255#24'I'#255#23'I'#255#23'H'#255#22'H'#255#21'G'#255#21'F'#255
+  +#20'F'#255#19'E'#255#18'D'#255#16'C'#255#23'A'#225'9<G>=:==================<'
+  +'<<;;;;;;;;;:::999888999888666666666555555444333333333222222000000000//////.'
+  +'.....---,,,+++***(((''''''$$$"""'#31#31#31#28#28#28#26#26#26'iii'#177#176
+  +#176#171#171#171#165#165#165#160#160#160#155#155#155#150#150#150#145#145#145
+  +#142#142#142#137#137#137#133#133#133#128#128#128'}||xxxtttpopkkkgggddda``]]]'
+  +'YYYVWWSSSPPPMMMJIIHGGDDCAAA@??=<=<::878766444222101//0--,+++**)++*)))'''''''
+  +'&&&%%%$$#$$$$###""!!"!!!'#31#30#31#29#29#28#26#26#26#25#25#25#25#25#25#25#25
+  +#25#25#24#24#25#25#24#25#25#24#25#24#24#24#24#24#24#24#24#23#24#23#23#23#23
+  +#24#23#23#23#23#23#24#24#24#25#25#24#27#27#26#28#27#27#28#28#27#27#27#27#27
+  +#26#27#27#27#27#26#27#26#26#26#26#26#26#26#26#26#26#26#26#25#25#25#25#22#22
+  +#22#22#21#22#21#22#22#21#21#21#21#21#21#21#21#21#23#22#22#22#22#22#22#22#23
+  +#22#22#22#21#22#22#22#22#22#22#21#21#22#21#21#21#21#21#21#21#21#21#20#21#21
+  +#21#20#20#21#21#21#20#20#20#20#21#20#20#20#20#19#20#20#19#20#19#19#19#19#19
+  +#18#18#18#18#18#18#18#17#18#18#18#17#18#17#17#17#17#17#17#17#17#17#25#25#25
+  +#27#26#27#27#27#27#27#26#26#27#27#27#20#20#20#18#18#18#18#18#18#17#17#17#18
+  +#18#18#17#17#17#18#17#17#17#17#17#17#16#16#16#16#16#16#16#15#16#15#15#16#15
+  +#15#15#15#15#15#15#15#15#15#15#15#14#14#14#14#15#15#15#15#15#14#14#14#14#14
+  +#14#14#14#14#13#13#14#14#13#14#13#13#13#13#14#13#13#13#13#13#13#13#12#13#13
+  +#13#13#12#11#13#12#11#12#12#12#12#11#11#12#11#11#11#11#11#11#10#11#11#11#11
+  ,#11#11#11#11#10#10#11#11#11#10#9#9#9#9#9#9#9#9#9#9#8#9#9#10#10#24#24#25'###('
+  +'((---111'#29#29#29#6#5#5#5#5#6#5#6#5#5#5#5#5#5#5#5#5#5#4#5#4#5#5#5#4#5#5#5#4
+  +#4#4#5#5#10#10#10#4#4#4'000yyy0000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000222999:::;;;===>>>767///////////////2'
+  +'22;;;;;;;;;;;;;;;;;;;;:;;:;::;::;::;:::::::::::::::::::::::::::::::::::::9:'
+  +':9::9::9:99777555222000///////////////5559999999999999999999989989989889889'
+  +'88988988888888888888888888888888888888555001000000000000000000000000000655:'
+  +'::;::::::::::::::::::::::::::::::::::9::9::9;::;::;::<;;;;;<<<<<<===>>>>>>?'
+  +'??@@@AAABBBCCCEEDEEDHGGHGGJIILKKMMMNNNPPPRRRUUUWWWYYY\\\^^^aaacccfffiiimllp'
+  +'oosrrvuuzyy|||'#128#128#128#132#132#132#136#136#136#140#140#140#144#144#144
+  +#148#148#148#152#152#152#156#156#156#161#161#161#165#165#165#170#170#170#174
+  +#174#173#178#178#178#180#180#180#147#147#147#138#138#138#135#135#135#131#131
+  +#131'yyysssnnnhhhccc^^^YYYTTTNNNHHHBCC>;3>JqBp'#249'Aq'#255'@o'#255'@o'
+  +#255'?n'#255'>m'#255'>l'#255'<l'#255';k'#255';j'#255':i'#255':i'#255'9h'#255
+  +'8g'#255'7g'#255'6f'#255'6e'#255'5d'#255'4d'#255'3c'#255'2b'#255'2a'#255'1a'
+  +#255'0`'#255'/_'#255'/_'#255'.^'#255'-]'#255'-\'#255'+['#255'*['#255'*Z'#255
+  +')Y'#255')X'#255'(X'#255'''X'#255'&W'#255'%V'#255'$U'#255'$U'#255'#T'#255'"S'
+  +#255'!R'#255'!R'#255' Q'#255#31'P'#255#31'P'#255#30'O'#255#29'N'#255#28'M'
+  +#255#27'L'#255#26'L'#255#26'K'#255#25'J'#255#24'I'#255#23'I'#255#23'H'#255#22
+  +'H'#255#21'G'#255#21'F'#255#20'F'#255#19'E'#255#16'D'#255'(>'#143'=:/<<<===='
+  +'===========>>>======<<<<<<<<<;;;:::9999998887776666665555554443333333332222'
+  +'22000000000//////......,,,+++***(((&&&$$$!!!'#30#30#30#27#27#27'666'#173#173
+  +#172#174#173#173#167#167#167#163#162#162#158#157#157#152#153#152#147#147#147
+  +#144#143#143#140#140#140#136#136#136#130#131#131'~~~zzzvvvqqqnnmjijfffbbb___'
+  +'\\\XXXTUTRRRNNNLLLHIIFFFCCCAA@>===<<;::9777554333120/0//.--,,,++++***(()''('
+  +'''''&&%%%$$$$$$#$$"""'#31#30#31#27#27#27#27#26#26#26#25#26#25#25#26#26#25#25
+  +#26#25#25#25#25#25#25#25#25#24#25#25#24#25#25#25#24#24#24#24#24#24#24#24#24
+  +#24#24#24#24#24#24#23#24#23#24#24#24#23#23#23#23#23#23#23#23#23#23#24#26#24
+  +#25#27#27#28#27#27#27#27#27#27#27#27#27#26#26#27#27#26#27#26#26#26#26#26#26
+  +#26#26#26#26#25#26#23#22#23#22#21#22#21#21#22#21#21#21#21#21#20#21#20#21#22
+  +#22#22#22#23#22#22#22#22#22#22#22#21#22#22#21#22#22#22#21#21#21#21#22#21#21
+  +#21#21#21#21#21#21#20#21#20#20#21#20#21#21#20#20#20#20#20#20#20#20#20#19#20
+  +#20#19#19#19#19#19#18#18#18#18#18#18#17#18#18#18#18#18#17#18#18#17#17#17#17
+  +#17#18#20#19#20#27#27#27#27#27#27#28#27#27#27#27#27#25#24#24#18#18#19#18#18
+  +#18#17#18#18#17#18#18#18#18#17#17#17#17#17#17#17#17#16#16#17#16#16#16#16#16
+  +#16#16#16#15#15#16#15#15#15#15#15#15#15#15#15#14#15#15#15#14#14#14#14#15#14
+  +#14#14#14#15#14#14#14#14#14#14#14#14#13#14#13#13#14#13#13#13#14#13#13#13#13
+  +#13#13#13#13#13#13#13#13#12#13#13#11#12#12#12#12#12#11#12#11#11#12#11#11#11
+  +#10#11#11#11#10#11#11#11#11#11#10#11#10#10#11#9#9#9#9#9#9#9#9#9#8#8#9#10#9#9
+  +#19#19#20'###'''''',,,000((('#5#6#6#5#5#5#6#5#5#6#6#5#5#5#5#5#5#5#5#5#5#5#5#5
+  +#5#5#4#5#5#5#5#4#5#10#13#13#4#4#4'000yyy000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000666999:::<<<===>>>000///'
+  +'////////////777;;;;;;;;;;;;;;;;;:;;:;::;::;::;:::::::::::::::::::::::::::::'
+  +'::::::988666434112/////////////////////////////////766999999999999999999998'
+  +'998988988988988988888888888888888888888888888888888777111000000000000000000'
+  +'000000000222777;::::::::::::::::::::::::::::::::::9::9;;:;::;::<;;<;;;;;<<<'
+  +'<<<===>>>>>>@@@AAAAAACCCDDDEEDGGFHGGJIIKKKMLLNNNPPPQQQTTTVVVXXX[[[]]]___bbb'
+  +'eeehhgkkjnmmqpptttwww{{{~~~'#130#130#130#133#133#133#137#137#137#142#142#142
+  +#146#146#146#150#150#150#154#154#154#158#158#158#163#163#163#167#167#167#171
+  +#171#171#175#175#175#180#180#180#172#172#172#139#139#139#139#139#139#135#135
+  +#135#131#131#131'}}}wwwqqqlllfffbbb]]]XXXSSSLLLGGGBBA>;3?P'#134'Br'#255'Aq'
+  +#255'@o'#255'@o'#255'?n'#255'>m'#255'>l'#255'<l'#255';k'#255';j'#255':i'#255
+  +':i'#255'9h'#255'8g'#255'7g'#255'6f'#255'6e'#255'5d'#255'4d'#255'3c'#255'2b'
+  +#255'2a'#255'1a'#255'0`'#255'/_'#255'/_'#255'.^'#255'-]'#255'-\'#255'+['#255
+  +'*['#255'*Z'#255')Y'#255')X'#255'(X'#255'''X'#255'&W'#255'%V'#255'$U'#255'$U'
+  +#255'#T'#255'"S'#255'!R'#255'!R'#255' Q'#255#31'P'#255#31'P'#255#30'O'#255#29
+  +'N'#255#28'M'#255#27'L'#255#26'L'#255#26'K'#255#25'J'#255#24'I'#255#23'I'#255
+  +#23'H'#255#22'H'#255#21'G'#255#21'F'#255#18'F'#255#23'C'#230'69D:96;;;<<<==='
+  +'>>>>>>>>>??????????????????>>>===;;;:::999999777777666555555444333333333222'
+  +'222000000000//////...---+++***(((%%%###   '#29#29#29#28#28#28#138#137#137
+  +#176#175#176#171#171#170#164#164#164#159#159#159#155#155#155#150#150#150#145
+  +#145#145#142#142#141#137#137#137#133#133#133#128#128#128'{||xxxssspppkkkhhhe'
+  +'ddaaa]]]ZZZVWWTTSPQQMMMKKKHHHEFFCCB@@@?>=;;;:98777776432211100....-,,+,+++*'
+  +'**((''((''&%&$$$$$$$##!! '#28#29#29#27#26#27#27#27#27#27#26#27#26#25#26#26
+  ,#25#26#26#25#26#25#25#25#25#25#25#25#25#25#24#25#25#25#25#25#25#24#24#25#25
+  +#24#24#25#24#24#24#24#23#24#24#24#23#24#24#23#23#23#23#23#23#23#23#23#23#23
+  +#23#23#22#23#23#23#23#22#22#25#24#25#27#27#27#27#27#27#27#27#27#27#26#27#26
+  +#27#27#26#26#26#26#26#26#25#26#25#26#26#25#24#23#23#22#21#22#21#21#22#21#21
+  +#21#21#21#21#20#20#21#23#22#22#22#23#23#22#22#22#22#22#22#22#22#22#21#22#22
+  +#21#22#22#21#21#21#22#21#21#21#21#21#21#21#21#20#20#21#20#20#20#20#20#20#20
+  +#20#20#20#20#20#20#19#19#20#19#20#19#19#19#18#18#18#18#18#18#18#18#18#17#18
+  +#18#18#17#17#18#17#17#17#18#18#26#26#26#27#27#27#26#27#27#27#26#26#28#26#27
+  +#19#20#19#18#18#19#18#18#18#18#18#18#18#17#18#17#18#18#17#17#17#18#17#17#17
+  +#16#16#17#15#15#16#16#15#15#16#15#15#15#15#15#15#15#15#15#16#15#15#15#15#15
+  +#15#15#14#14#14#15#14#14#15#14#15#14#14#14#14#14#14#14#14#13#13#14#14#14#13
+  +#13#14#14#13#13#14#13#14#13#13#13#13#13#13#12#13#12#13#12#12#13#12#11#12#11
+  +#12#11#11#11#11#11#11#11#11#11#11#10#11#10#10#11#10#10#10#11#9#9#10#9#9#9#9#9
+  +#9#9#9#9#10#10#9#15#15#15'!!!&&&+++000333'#6#5#6#5#6#6#6#6#6#5#5#5#5#6#5#5#5
+  +#5#6#6#5#5#5#5#5#5#5#5#5#5#4#5#5#10#13#13#4#4#4'000yyy0000000000000000000000'
+  +'00000000000000000000000000000000000000000000000000000000000000000111999:::;'
+  +';;<<<>>>:::///////////////0/0:::;;;;;;;;;;;;;;:;;:;::;::;::;:::::::::::::::'
+  +':::::999777444212//0///////////////////////////////////////////////07779999'
+  +'999999999999989989989889889889889888888888888888888888888888888888888884440'
+  +'00000000000000000000000000000333888::::::::::::::::::::::::::::::::9;;:;;:;'
+  +'::<;;<;;<;;<<<<<<===>>>>>>???AAAAAABBBCCCEEEFFEHHGIHHJIILKKNMMNNNQQQRRRUUUW'
+  +'WWYYY\\\^^^aaadddfffiiimmlpoosrrvuuzyy}||'#128#128#128#132#132#132#135#135
+  +#135#140#140#140#144#144#144#147#147#147#151#151#151#156#156#156#160#160#160
+  +#164#164#164#168#168#168#172#172#172#177#177#177#182#182#181#159#159#159#140
+  +#140#140#139#139#139#134#134#134#129#129#129'|||vvvpppkkkeeeaaa\\\WWWRRRKKKF'
+  +'GGAA@=;5?S'#147'Br'#255'Aq'#255'@o'#255'@o'#255'?n'#255'>m'#255'>l'#255'<l'
+  +#255';k'#255';j'#255':i'#255':i'#255'9h'#255'8g'#255'7g'#255'6f'#255'6e'#255
+  +'5d'#255'4d'#255'3c'#255'2b'#255'2a'#255'1a'#255'0`'#255'/_'#255'/_'#255'.^'
+  +#255'-]'#255'-\'#255'+['#255'*['#255'*Z'#255')Y'#255')X'#255'(X'#255'''X'#255
+  +'&W'#255'%V'#255'$U'#255'$U'#255'#T'#255'"S'#255'!R'#255'!R'#255' Q'#255#31
+  +'P'#255#31'P'#255#30'O'#255#29'N'#255#28'M'#255#27'L'#255#26'L'#255#26'K'#255
+  +#25'J'#255#24'I'#255#23'I'#255#23'H'#255#22'H'#255#21'G'#255#18'G'#255'&>'
+  +#154':8-:::;;;<<<>>>>>>>>>@@@@@@AAABBBBBBCCCBBBAAA@@@>>>===;;;:::99988877755'
+  +'5555555444333333333222222000000000///...---+++)))''''''%%%"""'#31#31#31#29
+  +#29#29'\\\'#177#177#177#173#172#172#167#167#167#161#161#161#156#156#156#152
+  +#151#151#147#147#147#143#143#143#140#139#139#136#135#135#131#131#131'~~~zzzv'
+  +'vvqrqnnnjjjfffccc_`_\\\XXXVVVRRRONNLLLIIIGGGDDDAAA???===;;:9986765553331110'
+  +'//-..--,+,++++)*)(((''''''&&&$$$!!!'#30#30#31#28#28#29#28#28#29#27#27#27#27
+  +#26#28#27#26#27#26#25#27#26#25#26#25#25#26#26#25#26#25#25#25#26#26#26#26#26
+  +#26#25#26#26#25#26#25#25#26#26#24#24#24#24#24#24#24#24#24#24#24#24#23#24#23
+  +#23#23#23#24#23#23#23#23#23#23#23#23#23#23#23#22#22#22#23#22#23#23#22#22#25
+  +#25#25#27#27#27#26#27#26#27#26#26#26#26#26#27#26#27#26#26#26#26#26#26#26#25
+  +#26#24#23#23#22#21#22#21#21#22#21#21#21#21#21#21#20#21#21#22#22#23#22#22#23
+  +#22#22#22#22#22#22#21#21#22#22#22#22#22#21#22#21#21#21#21#21#21#21#21#21#20
+  +#21#21#21#21#20#20#21#21#21#20#20#20#20#20#20#20#20#20#19#20#19#19#20#19#18
+  +#19#19#18#18#19#18#18#18#17#18#17#18#18#18#17#17#18#18#17#21#21#21#27#28#27
+  +#27#27#27#26#27#27#28#27#27#23#23#23#18#18#19#18#18#19#18#18#18#18#18#17#18
+  +#18#18#18#17#18#18#17#17#17#16#17#17#16#16#16#16#16#16#16#16#16#15#16#15#16
+  +#16#15#15#15#15#15#16#15#15#15#15#14#15#14#15#15#15#15#15#14#14#15#14#14#14
+  +#14#14#14#14#14#13#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#12#13#13#12#13#12#12#12#12#11#12#11#11#11#11#11#11#11#11#11#11#11#11#11#11
+  +#10#11#11#10#10#11#10#9#9#9#9#9#9#9#9#9#10#10#10#10#10#11#31#31#30'&&&***///'
+  +'333'#14#15#15#5#6#5#6#6#6#5#5#6#6#6#5#6#5#5#5#6#5#5#5#6#5#5#5#5#5#5#4#5#5#10
+  +#10#10#5#5#5'000yyy000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000555999:::<<<===>>>333///////////////444;;;'
+  +';;;;;;;;;;;;;;:;;:;::;::;::;:::::877555333000//////////////////////////////'
+  +'///////////////////////////////////0777999999999999998998998988988988988988'
+  +'888888888888888888888888888888888888888666111000000000000000000000000000101'
+  +'333888:::::::::::::::::::::::::::;;:;;:;;:<;;<;;<;;=<<<<<===>>>>>>???@@@AAA'
+  +'BBBCCCDDDEEEGGFHHGJIIKKKMLLONNPPPRRRTTTVVVXXX[[[]]]```bbbeeehhhkkjnnmpppttt'
+  +'www{{{~~~'#130#130#130#133#133#133#137#137#137#141#141#141#145#145#145#149
+  +#149#149#154#154#154#157#157#157#161#161#161#165#165#165#170#170#170#175#175
+  +#175#178#178#178#180#180#180#148#148#148#141#141#141#137#137#137#133#133#133
+  +#129#129#129'{{{uuuoooiiiddd```[[[VVVQQQKKKEEFA@?=:4>S'#147'Br'#255'Aq'#255
+  ,'@o'#255'@o'#255'?n'#255'>m'#255'>l'#255'<l'#255';k'#255';j'#255':i'#255':i'
+  +#255'9h'#255'8g'#255'7g'#255'6f'#255'6e'#255'5d'#255'4d'#255'3c'#255'2b'#255
+  +'2a'#255'1a'#255'0`'#255'/_'#255'/_'#255'.^'#255'-]'#255'-\'#255'+['#255'*['
+  +#255'*Z'#255')Y'#255')X'#255'(X'#255'''X'#255'&W'#255'%V'#255'$U'#255'$U'#255
+  +'#T'#255'"S'#255'!R'#255'!R'#255' Q'#255#31'P'#255#31'P'#255#30'O'#255#29'N'
+  +#255#28'M'#255#27'L'#255#26'L'#255#26'K'#255#25'J'#255#24'I'#255#23'I'#255#23
+  +'H'#255#21'H'#255#24'E'#237'49J984;;;===>>>>>>???@@@BBBCCCDDDEEEGGGGGGFFFFFF'
+  +'EEEBBB@@@>>><<<:::888777777666555555444333333333222222111000///...---+++)))'
+  +'&&&$$$!!!'#31#31#31'333'#169#169#169#174#174#174#170#170#170#163#163#163#158
+  +#157#158#153#153#153#149#149#149#145#145#145#142#141#141#138#137#136#133#132
+  +#132#129#128#129'|||xxwtsspppkklhhhdddaaa]]^[ZZWWWTTTQRRNNNLKKHHHFFFCCCABB?>'
+  +'>=<<:::8887774552321110//...---,,,+*****(((''''''%$$   '#31#30#31#29#29#31
+  +#28#29#30#28#28#29#27#27#28#27#27#28#28#28#29#27#27#28#27#26#27#27#26#27#28
+  +#27#28#28#27#27#31#31#31'   """#"#'#31' '#31#30#29#30#29#29#30#25#25#25#25#25
+  +#25#24#23#24#24#24#23#24#24#23#23#23#23#23#23#23#23#23#23#22#23#23#23#23#23
+  +#23#23#22#22#22#22#23#23#23#26#26#26#27#27#27#26#27#27#27#27#27#26#27#26#26
+  +#26#26#26#26#26#26#26#26#23#24#23#22#21#23#21#22#22#21#21#21#21#20#20#21#21
+  +#21#22#23#23#22#23#22#22#22#22#22#22#22#21#22#22#22#22#21#21#22#21#21#21#21
+  +#21#21#21#21#21#21#20#20#21#20#21#20#20#20#21#21#20#20#20#20#20#20#20#20#20
+  +#19#19#19#19#19#19#18#19#18#19#19#18#18#18#18#18#18#17#17#18#18#17#18#17#18
+  +#17#27#26#26#27#27#27#27#27#27#27#27#27#27#26#27#19#18#19#18#18#18#18#18#18
+  +#18#18#18#18#18#18#17#18#17#18#17#17#17#17#16#17#16#16#16#16#16#16#16#16#16
+  +#16#15#15#16#16#15#15#16#15#16#15#15#15#15#15#15#15#15#15#15#15#14#14#15#14
+  +#14#14#14#15#14#15#14#14#14#14#14#14#14#14#14#14#13#14#13#14#13#13#13#14#13
+  +#13#13#13#13#12#13#12#12#13#13#12#13#12#11#12#11#11#12#11#11#12#11#11#11#11
+  +#11#11#11#11#11#11#11#11#10#10#11#9#10#10#10#9#9#9#9#9#9#9#9#11#11#10#27#26
+  +#27'$$$)))...333'#26#26#26#6#6#6#6#6#6#6#6#6#5#6#6#5#6#6#6#5#5#5#5#5#5#5#5#5
+  +#5#5#5#5#5#10#10#13#4#5#5'000yyy00000000000000000000000000000000000000000000'
+  +'0000000000000000000000000000000000000000000000111888:::;;;<<<======////////'
+  +'//////////888;;;;;;;;;;;;;;:;;:999666444222////////////////////////////////'
+  +'///////////////////////////////////////////////////077799999999999999899898'
+  +'898898898898888888888888888888888888888888888888888888877744400000000000000'
+  +'0000000000000101101333888:::::::::::::::::::::;;;;;:;;:;;:<;;<;;<;;=<<<<<=='
+  +'=>>>>>>???AAAAAACCCDDDEEEFFFHHGIIHKJJLKKONNPOOQQQSSSUUUWWWYYY\\\^^^aaacccff'
+  +'fiiillkpposrrvuuyxx|{{'#129#128#128#131#131#131#135#135#135#139#139#139#143
+  +#143#143#147#147#147#151#151#151#155#155#155#159#159#159#163#163#163#168#168
+  +#168#171#171#171#175#175#175#180#180#180#174#174#174#142#142#142#141#141#141
+  +#137#137#137#133#133#133'zzztttnnnhhhddd___ZZZVVVPPPJJJEEEAA?=:4>S'#147'B'
+  +'r'#255'Aq'#255'@o'#255'@o'#255'?n'#255'>m'#255'>l'#255'<l'#255';k'#255';j'
+  +#255':i'#255':i'#255'9h'#255'8g'#255'7g'#255'6f'#255'6e'#255'5d'#255'4d'#255
+  +'3c'#255'2b'#255'2a'#255'1a'#255'0`'#255'/_'#255'/_'#255'.^'#255'-]'#255'-\'
+  +#255'+['#255'*['#255'*Z'#255')Y'#255')X'#255'(X'#255'''X'#255'&W'#255'%V'#255
+  +'$U'#255'$U'#255'#T'#255'"S'#255'!R'#255'!R'#255' Q'#255#31'P'#255#31'P'#255
+  +#30'O'#255#29'N'#255#28'M'#255#27'L'#255#26'L'#255#26'K'#255#25'J'#255#24'I'
+  +#255#23'I'#255#21'I'#255'&A'#167'<:0<<<===?????????AAACCCEEEFFFGGGHHHJJJJJJJ'
+  +'JJIIIHHHFFFCCC@@@===;;;:::999777666666555555444333333333222111000///...,,,*'
+  +'**(((&&&###   !!!'#143#143#143#176#176#176#171#171#171#167#166#166#160#160
+  +#160#155#155#155#151#151#151#146#146#146#142#142#142#139#139#139#135#135#135
+  +#131#130#130'~~~zyyvvvqqqnnmjjkfffbcc__^\\\YYXVUURSROOOMMMIJJGHGDDDCCC@?@>>>'
+  +'<<<9::877666443222221//0./.,,,,,,***)((((($$$   '#30#31' '#30#29#30#29#29#30
+  +#29#28#29#27#28#28#28#28#29#28#28#28#28#28#28#29#28#29'###&&'',++0000001000/'
+  +'////...----,-,++''''''###'#30#29#29#23#24#24#24#23#24#24#23#23#23#23#23#23
+  +#23#23#23#23#23#23#22#22#22#22#23#22#22#23#22#22#22#25#25#25#27#27#27#27#26
+  +#27#26#26#26#27#26#26#26#26#26#26#26#25#26#25#26#23#23#24#22#21#22#21#21#22
+  +#21#21#21#21#21#21#21#22#21#23#23#23#22#23#22#22#22#22#22#22#22#22#21#22#21
+  +#21#22#21#21#22#21#21#21#21#21#21#20#20#21#21#21#21#21#21#21#20#20#21#20#21
+  +#20#20#20#20#20#20#20#20#19#20#19#19#20#19#19#19#18#18#18#18#18#18#17#18#18
+  +#18#18#17#18#18#17#24#23#24#27#27#27#27#27#27#27#27#27#27#26#26#21#22#22#19
+  +#19#19#18#18#18#18#18#18#18#18#18#18#18#18#18#17#17#17#17#17#18#17#16#17#16
+  +#16#16#16#16#16#16#16#16#16#16#16#16#15#15#15#15#15#16#16#15#15#15#15#15#15
+  +#15#15#15#15#15#15#15#15#14#14#15#15#14#14#14#14#14#14#14#14#14#13#13#14#13
+  +#13#13#14#13#14#13#13#13#13#13#13#13#12#13#13#12#13#12#12#12#11#11#12#11#11
+  +#12#11#11#11#11#11#11#11#11#11#11#10#11#10#11#10#10#10#10#10#10#9#9#9#9#10#9
+  +#9#10#10#10#23#23#23'###(((...222###'#6#6#6#6#6#6#6#6#6#5#6#6#6#6#6#6#6#5#5#5
+  ,#5#5#5#5#5#5#5#5#5#5#13#13#13#4#4#5'000yyy0000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000000000000000000333999:::;;;===>'
+  +'>>888///////////////000::::::8885552220/0//////////////////////////////////'
+  +'///////////000000000000000000444778<<<???:::////////////////////07779999999'
+  +'999989989989889889889889888888888888888888888888888888888888888888878876662'
+  +'22000000000000000000000000101101111322777::::::::::::::::::;;;;;:;;:<<;<;;<'
+  +';;=<<=<<===>>>>>>???@@@AAABBBCCCEEEEEEGGGHHGJJIKKKMLLONNQPPRRRTTTVVVXXX[[[]'
+  +']]___bbbeeegggjjjnnmpppssswwwzzz~~~'#129#129#129#133#133#133#137#137#137#140
+  +#140#140#144#144#144#148#148#148#152#152#152#156#156#156#161#161#161#164#164
+  +#164#168#168#168#172#172#172#177#177#177#182#182#181#164#164#164#142#142#142
+  +#141#141#141#137#137#137#132#132#132'~~~yyysssmmmhhhccc___ZZZUUUPPPJJJEEEAA?'
+  +'=:4?T'#147'Br'#255'Aq'#255'@o'#255'@o'#255'?n'#255'>m'#255'>l'#255'<l'#255
+  +';k'#255';j'#255':i'#255':i'#255'9h'#255'8g'#255'7g'#255'6f'#255'6e'#255'5d'
+  +#255'4d'#255'3c'#255'2b'#255'2a'#255'1a'#255'0`'#255'/_'#255'/_'#255'.^'#255
+  +'-]'#255'-\'#255'+['#255'*['#255'*Z'#255')Y'#255')X'#255'(X'#255'''X'#255'&W'
+  +#255'%V'#255'$U'#255'$U'#255'#T'#255'"S'#255'!R'#255'!R'#255' Q'#255#31'P'
+  +#255#31'P'#255#30'O'#255#29'N'#255#28'M'#255#27'L'#255#26'L'#255#26'K'#255#25
+  +'J'#255#24'I'#255#25'H'#243':?W@>9@@@AAABBBCCCCCCDDDEEEFFFGGGHHHJJJKKKLLLMMM'
+  +'KKKJJJGGGEEEBBB>>><<<:::999888666666666555555444333333222111000///...,,,***'
+  +'''''''%%%"""'#31#31#31'lll'#178#178#178#173#172#173#168#167#167#162#162#162
+  +#157#157#157#152#152#152#148#148#147#143#143#143#140#140#140#137#137#137#133
+  +#133#132#128#128#128'|{{xxwtttooolklghhdedaab]]]ZZYWWWUTUQQRNNNLKLIIIFGFCDDB'
+  +'BB???<==;:;889777556333221110/./...,,,+++*)*)((%$%  ! '#31' '#31#31' '#30#29
+  +#31#28#29#29#29#30#30#28#28#29#29#29#30'"""(((110322232333333333233233222000'
+  +'//0..--,,-,-++****)()""!'#26#26#25#24#23#23#23#23#23#23#22#23#23#23#23#22#22
+  +#22#22#23#22#22#22#22#22#22#22#25#25#25#26#27#27#26#26#26#26#26#26#26#26#26
+  +#26#26#26#25#26#26#25#25#25#23#22#22#22#22#23#21#21#22#21#21#21#21#21#20#23
+  +#22#23#23#22#22#22#22#23#23#23#22#22#22#22#22#22#22#22#22#21#21#21#21#21#21
+  +#21#22#21#21#20#20#21#21#21#20#21#21#21#20#21#20#20#21#20#20#20#20#19#20#20
+  +#20#19#19#19#19#19#19#19#19#18#18#19#18#18#18#18#18#18#18#18#18#18#18#19#28
+  +#28#27#27#27#27#27#27#28#27#27#27#25#25#24#18#19#19#19#19#18#19#18#18#18#18
+  +#18#18#18#18#18#18#18#17#17#17#17#16#17#17#16#17#17#16#16#16#16#16#15#16#15
+  +#16#16#15#15#16#16#15#16#16#15#16#15#15#15#15#15#15#15#14#15#15#15#15#15#14
+  +#15#14#15#15#14#14#14#14#14#14#14#14#14#13#14#14#14#13#14#13#14#13#14#13#13
+  +#13#13#12#13#13#12#13#12#12#12#12#12#12#11#12#12#11#11#11#11#11#11#11#11#11
+  +#11#11#11#11#11#11#10#10#10#9#9#10#9#9#10#9#9#10#10#10#10#17#17#18'###'''''''
+  +',,,111,,,'#6#7#6#6#6#7#6#6#6#6#6#5#6#5#6#5#6#6#5#6#5#5#5#5#5#5#5#5#5#5#13#13
+  +#13#5#5#5'000yyy000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000777:::;;;<<<===>>>111///////////////0/0'
+  +'/////////////////////////////////////////////000000000000111111444888<<<AAA'
+  +'CCCCCCCCCAAAAAAAAA:::////////////////////0777999999998998998988988988988988'
+  +'888888888888888888888888888888888888888888887887877555111000000000000000000'
+  +'000101101111111111655999:::::::::;;;;;;;;:<<;<<;<;;=<<=<<>==>>>>>>>>>@@@AAA'
+  +'AAACCCDDDEEEFFFHHHIIHKKJLKKONNPOORQQSSSUUUWWWYYY\\\^^^```cccfffiiillloonrrq'
+  +'uttxww|{{~~'#131#130#130#134#134#134#137#137#137#142#142#142#146#146#146
+  +#149#149#149#154#154#154#157#157#157#161#161#161#165#165#165#170#170#170#174
+  +#174#174#178#178#178#180#180#180#155#155#155#143#143#143#141#141#141#137#137
+  +#137#132#132#132'~~~xxxssslllhhhccc___ZZZUUUOOOJJJEEEA@?=;4>Q'#135'Bp'#250'A'
+  +'r'#255'@o'#255'@o'#255'?n'#255'>m'#255'>l'#255'<l'#255';k'#255';j'#255':i'
+  +#255':i'#255'9h'#255'8g'#255'7g'#255'6f'#255'6e'#255'5d'#255'4d'#255'3c'#255
+  +'2b'#255'2a'#255'1a'#255'0`'#255'/_'#255'/_'#255'.^'#255'-]'#255'-\'#255'+['
+  +#255'*['#255'*Z'#255')Y'#255')X'#255'(X'#255'''X'#255'&W'#255'%V'#255'$U'#255
+  +'$U'#255'#T'#255'"S'#255'!R'#255'!R'#255' Q'#255#31'P'#255#31'P'#255#30'O'
+  +#255#29'N'#255#28'M'#255#27'L'#255#26'L'#255#26'K'#255#23'K'#255')F'#180'EB7'
+  +'DDDFFFIIIJJJJJJJJJHHHGGGGGGGGGIIIJJGMKELLJMMMLLLJJJHHHFFFBBB???===:::999999'
+  +'888666666666555555444444333222000///---+++)))&&&$$$"""KKK'#175#175#175#174
+  +#174#173#169#169#169#166#165#165#158#158#158#153#153#153#149#149#149#145#145
+  +#145#140#141#141#139#138#138#134#134#134#129#129#129'~~}zyyuutrqrnmmjjjfffbb'
+  +'b__`\\\YYXVVVRRRPPOMMMJJJHHHEEECCC@@@>?>===9:9788666455232222000/./,-,,,,++'
+  +'+)))%%%!!" '#31'  '#31' '#31#31' '#31#31' '#30#30#31#31#30' ! ")))333444656'
+  +'67677798888888877756554522322200/--.---+++*+***)))())(!!!'#25#24#24#23#23#23
+  +#23#23#23#22#23#23#22#22#22#23#23#22#23#22#23#22#22#22#24#24#24#27#27#26#27
+  +#26#27#27#26#26#26#26#26#26#26#26#25#26#26#24#25#25#22#23#22#22#21#22#21#21
+  +#22#21#21#21#21#21#21#23#22#23#23#23#23#22#23#22#22#22#22#22#22#21#22#22#21
+  ,#22#22#21#21#21#22#22#21#21#21#21#21#21#20#21#21#20#21#21#20#21#21#20#20#20
+  +#20#20#20#20#20#20#20#20#19#19#19#20#19#20#19#18#19#18#18#18#18#18#18#18#18
+  +#18#18#18#18#26#25#26#27#28#28#27#27#27#27#27#27#27#27#27#19#18#19#19#18#18
+  +#18#19#19#18#19#19#18#18#18#18#18#18#17#17#17#18#17#17#17#16#17#17#16#16#17
+  +#16#16#16#16#16#16#16#16#16#16#16#15#16#16#16#15#16#15#16#15#15#15#15#15#15
+  +#15#15#14#15#15#15#15#14#14#15#14#14#14#14#14#15#14#14#14#14#13#14#14#14#14
+  +#13#14#14#14#13#13#13#12#13#13#12#13#13#12#13#12#11#12#12#11#11#11#12#12#11
+  +#11#11#12#11#11#11#12#11#11#11#11#11#10#11#9#9#9#9#9#9#10#9#10#11#11#10#14#15
+  +#14'!!!''''''+++000555'#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#6#5#5#5#5#6#5#5#5#5#5#6
+  +#5#5#5#13#13#13#5#5#5'000yyy000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000111888:::;;;<<<>>><<<//////'
+  +'/////////////////////////////////////////////000000000000111222777;:;@@@DDD'
+  +'EEEFFFGGGGGGFFFEEEDDDBBBAAA@@@@@@:::////////////////////0666999999998998988'
+  +'988988988988888888888888888888888888888888888888888888887887887877777444111'
+  +'000000000000000000101101111111111111333776:99;;;;;;;;;;;:<<;<<;<;;=<<=<<>=='
+  +'>>>>>>???AAAAAABBBCCCEEEEEEHHHHHHJJIKKKMLLONNQPPSRRTTTVVVXXX[[[]]]___bbbeee'
+  +'gggjjjmmmpppssrwvvzyy~}}'#129#128#128#132#132#132#135#135#135#140#140#140
+  +#143#143#143#147#147#147#151#151#151#154#154#154#158#158#158#163#163#163#167
+  +#167#166#170#170#170#173#173#173#178#178#178#178#178#178#150#150#150#143#143
+  +#143#140#140#140#136#136#136#131#131#131'}}}xxxqqqlllgggccc___ZZZUUUPPPJJJEF'
+  +'FAA@>;3>KtAl'#237'Ar'#255'@o'#255'@n'#255'?n'#255'>m'#255'>l'#255'<l'#255';'
+  +'k'#255';j'#255':i'#255':i'#255'9h'#255'8g'#255'7g'#255'6f'#255'6e'#255'5d'
+  +#255'4d'#255'3c'#255'2b'#255'2a'#255'1a'#255'0`'#255'/_'#255'/_'#255'.^'#255
+  +'-]'#255'-\'#255'+['#255'*['#255'*Z'#255')Y'#255')X'#255'(X'#255'''X'#255'&W'
+  +#255'%V'#255'$U'#255'$U'#255'#T'#255'"S'#255'!R'#255'!R'#255' Q'#255#31'P'
+  +#255#31'P'#255#30'O'#255#29'N'#255#28'M'#255#27'L'#255#26'L'#255#24'K'#255'#'
+  +'I'#214'HJSQOHRRSTTTTTTRRRNNNLLLIIIGGGEEDHF<EGO<GoJJIMKAKJHJJIGGGEEEBBB@@@=='
+  +'=;;;:::999888888666666666555555444222222000///---***(((%%%###555'#165#165
+  +#164#176#176#175#171#171#170#166#166#166#161#161#161#155#155#155#150#150#150
+  +#146#146#146#142#143#143#139#139#139#135#136#135#132#132#132'|||wwwtssooo'
+  +'lkkhggedeaaa^^]ZZZWXWTTTRRRONOLMLIIIGGGDDDBBC@?@===;;;999878666454222111///'
+  +'..-,,,,,,***&&&""#       '#31' '#31#31' '#31#31'    &%%233555888999;;;<<;=='
+  +'<<=<<=<<<<;:;999788556433222/00-,-,,,***))))))(()(()''('''#28#28#28#23#23#23
+  +#23#22#23#23#23#22#22#23#23#23#23#22#23#22#22#22#22#22#24#25#25#26#26#26#27
+  +#27#26#26#27#26#26#26#26#26#26#26#26#26#26#24#24#24#23#22#23#22#22#22#22#21
+  +#22#21#21#21#21#22#21#23#22#23#23#22#22#22#22#22#22#22#23#22#22#21#22#21#21
+  +#22#22#22#21#22#21#21#21#21#21#21#21#21#21#21#21#21#21#21#20#20#20#20#20#21
+  +#20#20#20#20#20#19#20#20#19#19#20#19#19#19#19#19#19#18#18#18#18#18#18#18#18
+  +#18#22#21#21#27#28#28#28#28#27#27#27#27#27#27#27#22#22#22#19#19#19#18#19#19
+  +#18#18#18#18#18#18#18#18#18#18#17#17#18#17#17#18#16#17#17#17#17#16#16#16#16
+  +#16#16#16#16#15#16#15#16#15#16#16#16#16#15#15#15#16#15#15#15#15#16#15#15#15
+  +#15#14#15#15#15#14#14#15#15#14#14#14#14#14#14#15#14#14#14#14#14#14#14#13#13
+  +#14#13#13#14#13#13#13#12#13#13#12#13#12#12#12#11#12#12#12#11#12#11#12#11#12
+  +#12#11#12#12#11#11#11#11#11#11#11#10#9#10#10#10#10#9#10#9#10#10#9#12#12#12#30
+  +#30#31'&&&+++000444'#16#15#16#6#6#6#6#6#6#6#6#6#6#6#6#6#6#5#5#6#6#6#6#6#5#5#6
+  +#5#6#5#13#15#13#5#5#5'000yyy000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000555::::::<<<===>>>767///'
+  +'//////////////////////////////00000000000011111166699:???CCCEEEFFFGGGGGGHHH'
+  +'JJJJJJJJJJJJIIIGGGEEECCCAAA@@@??????::://///////////////////555999998998998'
+  +'988988988988988888888888888888888888888888888888888888887887887877877877777'
+  +'333000000000000000000101101111111111111111111555887:::;;;<<;<<;<<;=<<=<<>=='
+  +'?>>>>>???@@@AAAAAACCCDDDEEEGGGHHHIIIKKJLLKONNPOORQQSRRUUUWWWYYY\\\^^^```bbb'
+  +'fffiiilllnnnqqpuutwww{{{~~~'#130#130#130#133#133#133#137#137#137#140#140#140
+  +#144#144#144#148#148#148#152#152#152#155#155#155#158#158#158#162#162#162#166
+  +#166#166#171#171#171#175#175#175#179#179#179#174#174#174#146#146#146#144#144
+  +#144#140#140#140#136#136#136#131#131#131'~~~wwwrrrkkkgggccc___ZZZUUUPPPKKKFF'
+  +'FBBA>;3=E\@f'#216'As'#255'@p'#255'@n'#255'?n'#255'>m'#255'>l'#255'<l'#255';'
+  +'k'#255';j'#255':i'#255':i'#255'9h'#255'8g'#255'7g'#255'6f'#255'6e'#255'5d'
+  +#255'4d'#255'3c'#255'2b'#255'2a'#255'1a'#255'0`'#255'/_'#255'/_'#255'.^'#255
+  +'-]'#255'-\'#255'+['#255'*['#255'*Z'#255')Y'#255')X'#255'(X'#255'''X'#255'&W'
+  +#255'%V'#255'$U'#255'$U'#255'#T'#255'"S'#255'!R'#255'!R'#255' Q'#255#31'P'
+  +#255#31'P'#255#30'O'#255#29'N'#255#28'M'#255#27'L'#255#26'K'#255#23'K'#255'('
+  +'M'#211'UXb_]U^]^[[[VVVQQQLLLGGGEC>CA75An'#26'B'#214#14'@'#252#29'B'#204'6D{'
+  +'FFGIF;FFDDDDBBB???===<<<;;;999888888888666666666555444333111000...,,,***'''
+  ,'''''%%%***'#149#148#149#176#177#176#172#172#172#168#168#168#163#163#163#157
+  +#157#157#152#152#152#148#148#148#143#143#143#139#139#139#137#136#137#133#134
+  +#134#128#128#128'|||yyyuutrqqmnmkjjfffcbb``_\\\XXXUUURRRPPPMMMKJJHHHEEECCCAA'
+  +'A?>?===<::8887775554442220010//---,,,,,,((("##!!"    '#31'     !!$#$---5559'
+  +'99:;;>>>>>>AAABBBBBBBBB@@@:::444///)))-../..///101/./,-,***)))*))))))))))))'
+  +'(("##'#24#24#24#23#23#23#22#23#23#22#22#23#22#22#22#22#22#22#22#22#22#25#25
+  +#24#26#27#27#26#26#26#26#26#27#27#26#26#26#26#26#26#25#26#23#23#23#23#22#22
+  +#23#21#22#22#21#22#21#21#21#23#23#23#23#23#23#23#22#22#22#22#22#22#22#22#22
+  +#21#22#22#22#22#21#22#22#21#21#22#21#22#21#21#21#21#21#21#21#20#20#21#20#21
+  +#21#21#20#20#21#21#20#20#20#20#20#20#20#19#19#20#19#19#19#19#18#19#18#18#18
+  +#18#18#18#20#19#19#28#27#28#27#28#28#27#27#27#27#27#27#25#24#24#18#19#19#19
+  +#18#18#19#18#19#18#19#18#18#18#18#18#18#18#18#17#17#18#17#16#18#17#16#17#16
+  +#16#17#16#16#16#17#16#16#16#16#16#15#15#15#16#16#15#15#16#15#15#15#15#16#15
+  +#15#15#15#15#15#14#15#15#15#15#15#15#14#15#15#14#14#15#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#13#14#13#12#13#13#12#13#12#12#13#12#12#12#11#12#11#12#11
+  +#11#11#11#11#12#11#11#11#11#11#11#11#11#10#10#10#10#9#10#10#10#9#10#10#10#12
+  +#11#12#28#28#28'&&&***000444'#22#22#21#6#6#7#7#6#6#6#7#6#6#6#6#6#6#5#6#6#6#6
+  +#6#6#5#5#6#5#5#6#13#13#13#5#6#5'000yyy00000000000000000000000000000000000000'
+  +'0000000000000000000000000000000000000000000000000000000000000000777:::;;;<<'
+  +'<===>>>111///////////////000000000000111111444888===BBBEEEFFFGGGGGGHHHIIIJJ'
+  +'JJJJKKKLLLMMMMMMNNNMMMLLLJJJGGGCCC@@@????????????::://///////////////////55'
+  +'599999899898898898898898888888888888888888888888888888888888888888888788787'
+  +'7877877877877766333111000000000000101101111111111111111111222222444888:::<<'
+  +';==<=<<>==?>>?>>>>>@@@AAAAAABBBCCCEEEEEEHHHHHHJJJKKKMMLONNQPPSRRUTTVVVXXXZZ'
+  +'Z\\\___bbbdddgggiiimmmpppssrvvuyxx|{{'#128''#131#130#130#135#134#134#137
+  +#137#137#141#141#141#143#143#143#147#147#147#151#151#151#155#155#155#159#159
+  +#159#163#163#163#167#167#167#171#171#171#175#175#175#179#179#179#170#170#170
+  +#145#145#145#144#144#144#140#140#140#136#136#136#132#132#132'}}}wwwqqqkkkggg'
+  +'ccc___ZZZVVVQQQKKKGGGBBC?=6=?F?]'#183'Ar'#255'@p'#255'@n'#255'?n'#255'>m'
+  +#255'>l'#255'<l'#255';k'#255';j'#255':i'#255':i'#255'9h'#255'8g'#255'7g'#255
+  +'6f'#255'6e'#255'5d'#255'4d'#255'3c'#255'2b'#255'2a'#255'1a'#255'0`'#255'/_'
+  +#255'/_'#255'.^'#255'-]'#255'-\'#255'+['#255'*['#255'*Z'#255')Y'#255')X'#255
+  +'(X'#255'''X'#255'&W'#255'%V'#255'$U'#255'$U'#255'#T'#255'"S'#255'!R'#255'!R'
+  +#255' Q'#255#31'P'#255#31'P'#255#30'O'#255#29'N'#255#28'M'#255#27'L'#255#26
+  +'L'#255#22'J'#255'''O'#224'X^sebX^^^XXXQQQIIHEC8=@N%A'#172#17'C'#253#14'B'
+  +#255#15'A'#255#12'@'#255#12'@'#255#24'A'#215'+@'#148'@ADBA@@@@>>>===<<<;;;::'
+  +':999888888888777666555444333111///---+++)))&&&%%%'#129#129#129#177#177#178
+  +#173#173#173#168#168#168#164#164#164#161#161#160#153#153#153#148#148#149#145
+  +#146#146#140#140#140#136#136#136#134#135#135#130#130#130'~~zzzwwwrrrooollki'
+  +'hheddaaa^]][[ZWWWTTTQRQNNNLLLHIIHHHDDDCCC@@@====;<:9:988666555222121//0....'
+  +'--,,,+++$##""#!!" !!  !!!"$$%322777:::>>>A@ABBCDEEFGFFFF455''''&'#29#28#28
+  +#26#25#25#25#25#25#25#25#25#25#24#25#24#25#24#24#25#24#24#25#24#26#26#26#31
+  +#31#31'%%$**+*)))))((((((''((('''')((%&%'#24#24#24#22#23#23#23#22#23#22#22#23
+  +#23#23#22#22#22#22#22#22#22#26#25#25#27#26#26#26#26#26#26#26#26#26#26#26#26
+  +#26#26#25#25#25#23#23#22#22#22#22#22#21#22#22#21#22#22#22#22#24#23#22#23#22
+  +#23#23#22#22#22#22#22#22#22#22#22#22#22#22#22#22#21#22#22#21#21#21#21#21#21
+  +#21#21#21#20#21#21#20#20#20#20#21#21#20#21#20#21#20#20#20#20#20#19#19#20#19
+  +#19#19#20#19#20#19#19#19#18#18#18#18#18#18#26#26#26#28#28#28#27#28#28#27#27
+  +#27#27#26#26#19#19#19#18#19#19#18#18#19#19#19#19#19#18#18#18#18#18#18#17#17
+  +#17#17#17#18#17#16#17#17#17#16#17#16#16#16#16#16#16#16#15#16#16#15#16#16#16
+  +#15#16#16#16#15#15#16#15#15#15#15#15#15#15#15#15#15#15#14#15#15#15#15#14#14
+  +#14#15#14#14#14#14#14#14#14#13#13#14#14#14#13#13#14#13#14#13#12#13#13#13#13
+  +#12#12#12#12#12#12#12#12#12#11#12#12#11#11#11#11#12#12#11#11#11#10#10#10#10
+  +#10#10#10#10#10#10#9#9#10#11#11#25#24#24'$$$)))///333'#30#31#31#7#6#6#7#6#7#6
+  +#6#7#6#7#6#6#6#6#6#6#6#5#6#6#6#5#6#5#6#6#13#13#13#5#5#5'000yyy00000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0000000000000222::::::;;;===>>><<<000///000000000111222777;:;@@@DDDEEEGGGGG'
+  +'GGGGIIIJJJJJJKKKLLLMMMMMMNNNOOOPPPPPPQQQQQQPPPNNNHHH@@@;;;@@@???>>>>>>>>>??'
+  +'?::://///////////////////32399899898898898898898898888888888888888888888888'
+  +'888888888888888888788788787787787787787777777744411100000000010110111111111'
+  +'1111111222222222222333444666999;::>==?>>?>>???@@@AAABBBCCCDDDEEEGGGHHHIIIKK'
+  +'KLLKOONPOORQQSRRUUUWWWYYY\\\^^^```bbbeeehhhjjjmmmpppsssvvvxxx|||~~~'#129#129
+  +#129#133#133#133#137#137#137#141#141#141#144#144#144#148#148#148#152#152#152
+  +#156#156#156#160#160#160#163#163#163#168#168#168#171#171#171#175#175#175#180
+  ,#180#180#166#166#166#146#146#146#144#144#144#140#140#140#136#136#136#132#132
+  +#132'}}}xxxqqqkkkgggddd___[[[VVVQQQMMMHHHCDD@?:=<7>P'#137'@m'#241'@r'#255'@o'
+  +#255'?n'#255'>m'#255'>l'#255'<l'#255';k'#255';j'#255':i'#255':i'#255'9h'#255
+  +'8g'#255'7g'#255'6f'#255'6e'#255'5d'#255'4d'#255'3c'#255'2b'#255'2a'#255'1a'
+  +#255'0`'#255'/_'#255'/_'#255'.^'#255'-]'#255'-\'#255'+['#255'*['#255'*Z'#255
+  +')Y'#255')X'#255'(X'#255'''X'#255'&W'#255'%V'#255'$U'#255'$U'#255'#T'#255'"S'
+  +#255'!R'#255'!R'#255' Q'#255#31'P'#255#31'P'#255#30'O'#255#29'N'#255#28'M'
+  +#255#27'L'#255#26'L'#255#22'J'#255'#M'#233'R\'#128'`]RVVTNLFED?1B'#25'D'#227
+  +#16'E'#255#17'D'#255#17'C'#255#16'B'#255#16'A'#255#14'@'#255#11'@'#255#11'?'
+  +#255'2=i?=6======<<<<<<<<<;;;:::888888888777666555444333111...,,,***(((%%%qq'
+  +'q'#178#178#178#173#173#173#169#169#169#166#166#165#161#161#160#156#156#156
+  +#151#151#150#145#146#145#142#142#142#138#138#138#135#135#135#132#132#132''
+  +#128#128'}}}wwxtttpppnnniiiffecdc`_`\\\YXXVVVSRSPPPMMMKKKHHHEFECCCABA???===<'
+  +'<<::9977655544222110000///,-,,,+%%%###!""! !  !!""$$%333:9:;;;A@@DDDHHGGHGF'
+  +'FF122'#29#29#29#26#26#26#26#26#26#26#26#25#25#25#25#25#25#26#26#25#25#25#25
+  +#25#25#25#25#24#25#25#24#25#24#24#25#24#24#24#24#24#24#23#24#25#24'   ''''(('
+  +'(((((((((((''''''''(''%&%'#24#24#24#22#23#22#23#23#23#22#23#22#22#22#23#22
+  +#22#22#23#23#23#27#26#26#27#27#27#27#26#26#26#26#27#26#26#26#26#26#26#24#24
+  +#24#23#22#22#22#23#22#22#21#22#21#21#22#23#23#23#24#23#23#23#22#22#23#22#23
+  +#22#22#22#22#22#22#22#22#22#22#22#21#21#22#22#21#22#21#22#21#21#21#21#21#20
+  +#21#21#21#20#21#20#21#21#20#20#20#21#20#20#20#20#20#19#19#20#20#19#20#19#19
+  +#19#19#18#19#18#18#18#23#23#23#28#28#27#28#28#28#28#27#28#27#27#27#20#20#20
+  +#19#19#19#19#19#19#19#19#19#19#18#18#18#18#18#18#18#18#18#17#17#18#17#17#17
+  +#16#17#17#17#17#16#16#17#16#16#16#16#17#16#16#16#16#15#16#15#16#16#16#15#15
+  +#16#15#15#15#16#15#15#15#15#15#15#15#15#14#15#15#15#15#14#14#14#14#14#14#14
+  +#14#14#14#14#14#14#14#14#14#13#13#14#13#13#13#13#12#13#12#12#13#12#12#12#12
+  +#12#12#11#12#11#11#11#11#12#12#11#12#12#11#10#11#10#10#10#10#10#10#9#9#9#10
+  +#11#10#11#23#22#22'#$#)((...333'''''''#6#6#7#6#7#6#6#6#6#6#6#6#6#6#6#6#6#6#5
+  +#6#5#5#6#6#5#5#6#15#15#13#5#5#5'000yyy00000000000000000000000000000000000000'
+  +'0000000000000000000000000000000000000000000000000000000000000000000555:::;;'
+  +';<<<===>>>99900055599:???CCCEEEFFFGGGGGGHHHJJJJJJJJJLLLLLLMMMNNNNNNPPPPPPPP'
+  +'PQQQRRRSSSQQQJJJBBB:::222000000000999>>>>>>>>>>>>>>>???999/////////////////'
+  +'////11188899898898898898898888888888888888888888888888888888888888888788788'
+  +'787787787787787777777777777754521200000010110111111111111122222222222233333'
+  +'3333444444555888:::;::>>>???AAACCCCCCEEEEEEHHHHHHJJJKKKMMLOONQPPRQQTSSVUUXX'
+  +'XYYY\\\^^^aaacccffegggjjjkkknnnrrrtttxxx{{{'#130#130#130#134#134#134#137
+  +#137#137#141#141#141#145#145#145#149#149#149#153#153#153#156#156#156#161#161
+  +#161#164#164#164#168#168#168#172#172#172#176#176#176#180#180#180#163#163#163
+  +#146#146#146#144#144#144#140#140#140#137#137#137#131#131#131'}}}xxxrrrmmmhhh'
+  +'ccc```[[[WWWSSSNNNIIIDEEA@?>;2=E]?b'#205'@q'#255'@p'#255'?n'#255'>m'#255'>l'
+  +#255'<l'#255';k'#255';j'#255':i'#255':i'#255'9h'#255'8g'#255'7g'#255'6f'#255
+  +'6e'#255'5d'#255'4d'#255'3c'#255'2b'#255'2a'#255'1a'#255'0`'#255'/_'#255'/_'
+  +#255'.^'#255'-]'#255'-\'#255'+['#255'*['#255'*Z'#255')Y'#255')X'#255'(X'#255
+  +'''X'#255'&W'#255'%V'#255'$U'#255'$U'#255'#T'#255'"S'#255'!R'#255'!R'#255' Q'
+  +#255#31'P'#255#31'P'#255#30'O'#255#29'N'#255#28'M'#255#27'L'#255#26'L'#255#23
+  +'J'#255#29'K'#244'@Q'#147'PNE@G^$E'#192#20'F'#255#19'F'#255#20'F'#255#19'E'
+  +#255#18'D'#255#17'C'#255#16'B'#255#16'A'#255#14'A'#255#10'@'#255'*='#133'>;0'
+  +'<<<<<<<<<<<<;;;;;;::::::999888777666555444222000...,,,)))&&&fff'#178#178#178
+  +#174#174#174#170#170#170#166#166#166#162#162#162#158#158#158#153#153#153#147
+  +#147#147#143#143#143#138#139#138#135#134#135#132#132#132#129#129#129'}}}zzzv'
+  +'uvrrronokkkgggdcd`a`^]][ZZWWWUTTQQQMNNLKKIIIGGGDDDBBBA@@>====<;;;9898877552'
+  +'22222000000.-----(((##$###"!""!"!!"%$%333:::???ABAGFFIIILLM<<<'#30#30#30#26
+  +#26#26#26#27#26#26#26#26#26#26#26#26#25#26#25#26#26#25#26#25#25#25#25#25#25
+  +#25#25#25#25#25#25#25#24#25#24#25#25#24#24#24#24#24#24#24#23#24#24#24#24#24
+  +#25#24#25'#$$(((''''''&''''((''''''(''(''$$$'#24#24#24#23#22#23#23#23#23#23
+  +#22#22#23#22#22#22#22#22#24#24#24#27#27#27#26#26#27#26#26#26#26#26#27#26#26
+  +#26#26#25#25#23#23#23#23#22#23#22#23#22#22#21#22#22#22#22#24#23#23#23#22#23
+  +#23#22#22#23#22#22#22#22#22#22#22#22#22#22#22#21#22#22#21#21#21#22#21#22#21
+  +#21#21#21#21#21#21#21#21#20#20#20#20#21#20#20#20#20#20#20#20#20#20#20#19#20
+  +#20#19#19#20#20#19#19#19#19#19#21#20#20#28#28#27#28#28#27#28#28#28#28#28#28
+  +#24#23#24#19#19#19#19#19#19#19#19#19#19#19#19#19#18#18#19#18#18#18#17#17#18
+  +#17#17#18#17#16#17#17#17#17#17#17#17#16#17#17#16#17#17#17#16#15#16#16#16#15
+  +#16#16#16#16#16#15#16#16#15#15#15#15#15#15#15#15#14#14#14#15#14#15#14#15#14
+  +#15#14#14#14#14#14#14#14#14#14#14#14#13#13#14#13#13#14#13#12#13#12#12#12#12
+  ,#12#12#12#12#12#12#12#12#11#12#11#12#12#12#11#12#11#11#10#12#11#11#11#10#10
+  +#10#10#10#10#10#11#11#18#17#18'#$$))(...223***'#7#7#7#7#6#7#6#6#6#6#6#6#6#6#7
+  +#6#6#6#6#6#6#6#6#5#6#6#5#13#15#15#6#5#5'000yyy000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000888:::<<<===>>>@@@CCCEEEFFFGGGHHHIIIJJJJJJKKKLLLMMMNNNNNNOOOPPPPPPQQQRRR'
+  +'SSSSSSLLLDDD===777000000000000000000000000000999=========>>>>>>???;;;000///'
+  +'///////////////111777988988988988988888888888888888888888888888888888888888'
+  +'888887887877877877877877777777777777777777666333111101101111111111222222222'
+  +'222333333333444444444555777777777988:99<;<>==?>>A@@BBBDDDEEEGGGIIIJJJLLLMMM'
+  +'PPPRRRTTTUUUWWWZYY[[[]]]```cccfeeihhlkkooorrrvvvyyy|||'#128#128#128#131#131
+  +#131#135#135#135#138#138#138#142#142#142#146#146#146#149#149#149#154#154#154
+  +#157#157#157#161#161#161#165#165#165#169#169#169#174#174#173#178#178#178#181
+  +#181#181#161#161#161#147#147#147#144#144#144#141#141#141#137#137#137#131#131
+  +#131'~~~xxxrrrmmmhhhdddaaa]]]XXXSSSOOOKKKFFFBBB?=7=<;>R'#142'@k'#236'@q'#255
+  +'?o'#255'>m'#255'>l'#255'<l'#255';k'#255';j'#255':i'#255':i'#255'9h'#255'8g'
+  +#255'7g'#255'6f'#255'6e'#255'5d'#255'4d'#255'3c'#255'2b'#255'2a'#255'1a'#255
+  +'0`'#255'/_'#255'/_'#255'.^'#255'-]'#255'-\'#255'+['#255'*['#255'*Z'#255')Y'
+  +#255')X'#255'(X'#255'''X'#255'&W'#255'%V'#255'$U'#255'$U'#255'#T'#255'"S'#255
+  +'!R'#255'!R'#255' Q'#255#31'P'#255#31'P'#255#30'O'#255#29'N'#255#28'M'#255#27
+  +'L'#255#26'L'#255#24'K'#255#24'J'#255'''H'#198#27'H'#237#20'H'#255#21'H'#255
+  +#21'G'#255#21'F'#255#20'F'#255#19'E'#255#18'D'#255#17'C'#255#15'C'#255#17'A'
+  +#244'$<'#152'8:A;;9;;;<<<<<<<<<;;;;;;;;;:::999888777666555333111000---+++((('
+  +'Z[Z'#179#179#178#175#175#175#171#171#171#167#167#167#163#163#162#158#159#158
+  +#155#155#154#149#149#149#143#143#143#140#140#140#136#136#135#131#131#131#130
+  +#130#131'~~~{{{wwwrsspppmlmiijeeebbb___[\[ZZYVUUSRRQPPMMMKJKHHHFFFCCCAAA>>>='
+  +'>><<<:::999676443323111000///-,-,++%%$$#####"""  !##$221:::???CCCHHHLKLIII.'
+  +'..'#27#27#27#27#27#27#27#26#27#26#27#26#26#26#26#26#26#26#26#26#26#26#25#26
+  +#26#26#25#25#25#25#26#25#25#25#25#26#25#25#25#25#25#24#24#25#24#25#24#24#24
+  +#24#24#24#24#24#24#24#24#23#24#24#24#23#24#30#29#30'&&&''''''''''&&''''('''''
+  +'''''''#""'#23#23#23#22#23#22#23#22#23#22#23#23#22#22#22#22#22#22#26#26#26#27
+  +#27#27#27#27#27#26#26#26#26#26#26#26#26#26#24#24#24#22#23#22#23#23#22#23#23
+  +#22#22#21#22#24#23#23#24#23#23#23#22#23#23#22#22#23#22#22#22#22#22#22#22#22
+  +#22#22#22#22#22#22#21#21#21#21#21#22#21#21#21#21#21#21#21#21#20#20#20#21#20
+  +#21#20#20#20#20#20#20#20#20#20#20#20#20#20#20#19#19#19#19#20#19#18#19#27#27
+  +#27#28#28#27#28#28#27#28#27#28#25#25#24#19#19#19#19#19#20#19#19#19#19#19#19
+  +#19#18#18#18#18#18#18#18#18#18#17#17#18#17#17#17#17#17#17#17#16#17#17#17#16
+  +#16#16#16#16#16#16#16#16#15#16#16#15#16#16#15#16#15#16#15#16#16#15#16#15#16
+  +#15#15#15#15#15#15#15#15#15#15#14#15#15#15#14#15#15#14#14#14#14#14#14#13#14
+  +#14#13#14#13#13#13#13#12#13#13#12#12#12#12#12#13#12#12#12#12#11#12#12#11#11
+  +#12#12#11#11#12#10#10#10#11#10#10#10#10#10#10#11#11#15#16#15'""#''((.--22333'
+  +'3'#7#7#7#7#7#7#6#7#7#7#6#7#7#6#6#6#6#6#6#7#6#6#6#6#6#6#6#15#15#15#5#5#6'000'
+  +'yyy000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000222:::<<<===???AAAEEEGGGJJJKKKLLLMMMMMM'
+  +'NNNOOOPPPPPPQQQRRRSSSSSSOOOHHH???999000000000000000000000000000000000000000'
+  +'000000555<<<=========>>>???<<<000////////////////////0655988988988988988888'
+  +'888888888888888888888888888888888888887887887877877877877877777777777777777'
+  +'777777776544323101111111111222222222222333333333444444555666777777888:99;::'
+  +'<;<<;<>>>???AAABBBDDDEEEGGGHHHJJJLLLNNNOOORRRTTTWWWYYY[[[^^^```dccgggjiimll'
+  +'pppsssvvvzzz}}}'#129#129#129#133#133#133#136#136#136#140#140#140#143#143#143
+  +#147#147#147#150#150#150#154#154#154#158#158#158#163#163#163#167#167#167#170
+  +#170#170#174#174#174#178#178#178#180#180#180#162#162#161#148#148#148#145#145
+  +#145#141#141#141#137#137#137#132#132#132'xxxsssnnniiieeeaaa]]]YYYUUUPPPLL'
+  +'LGGGCCC@@>=;2=BS>\'#181'@o'#255'?p'#255'>m'#255'>l'#255'<l'#255';k'#255';j'
+  +#255':i'#255':i'#255'9h'#255'8g'#255'7g'#255'6f'#255'6e'#255'5d'#255'4d'#255
+  +'3c'#255'2b'#255'2a'#255'1a'#255'0`'#255'/_'#255'/_'#255'.^'#255'-]'#255'-\'
+  +#255'+['#255'*['#255'*Z'#255')Y'#255')X'#255'(X'#255'''X'#255'&W'#255'%V'#255
+  +'$U'#255'$U'#255'#T'#255'"S'#255'!R'#255'!R'#255' Q'#255#31'P'#255#31'P'#255
+  +#30'O'#255#29'N'#255#28'M'#255#27'L'#255#26'L'#255#25'K'#255#23'J'#255#23'I'
+  +#255#23'I'#255#23'H'#255#22'H'#255#21'G'#255#21'F'#255#20'F'#255#17'F'#255#17
+  +'D'#255#28'>'#188'/7V:6+:96:;;;;;<<<<<<<<<<<<;;;;;;;;;999888777666444333000.'
+  +'..,,,***[Z['#175#176#176#175#175#175#171#171#171#167#167#167#164#164#164#160
+  +#160#160#155#156#156#152#152#151#144#144#144#141#140#140#136#136#136#133#133
+  +#133#129#129#129#128#128#128'|||xxxtttqqqnnmjiifgfccc```\]]ZZZWWWTTTRQQONNLL'
+  +'LIIIGGGEEDCCC@@@>>>>==;;;:9:889777233233010001//.---(((###$#$""#"""###-..98'
+  ,'9=>>DCCHHHMMLLKL''''&'#27#27#28#27#27#27#27#27#27#27#27#27#27#26#27#26#27#27
+  +#26#26#26#27#26#26#26#26#26#26#25#26#26#26#25#26#26#26#25#25#25#25#25#26#25
+  +#24#25#25#24#25#25#25#25#25#24#24#24#25#24#24#24#24#24#23#24#23#24#24#23#23
+  +#24#26#26#27'%%%&&&''&&''''''((''('''''#30#30#31#23#23#23#23#22#23#22#22#23
+  +#23#22#22#22#23#22#23#23#23#26#26#27#27#27#27#27#26#27#27#26#26#26#26#26#25
+  +#25#25#23#23#23#22#22#23#23#23#22#22#22#23#23#24#23#24#24#23#24#23#23#23#23
+  +#22#23#22#22#23#22#22#22#23#22#22#22#22#22#22#22#21#22#22#21#21#22#21#21#21
+  +#21#21#21#21#21#21#21#21#21#21#21#21#20#20#21#21#21#20#20#20#20#20#20#20#20
+  +#20#20#20#19#20#19#19#19#25#25#25#28#27#27#28#28#27#28#28#27#26#27#27#20#20
+  +#20#19#19#19#19#19#19#19#19#19#18#19#19#19#18#18#19#18#18#18#17#18#18#17#18
+  +#17#17#17#16#17#16#16#17#17#16#17#16#16#16#16#16#16#16#16#16#16#16#16#16#16
+  +#16#16#15#16#15#16#16#15#15#16#15#15#15#15#15#15#15#15#15#15#14#15#15#14#15
+  +#15#14#14#14#14#14#14#14#14#14#14#13#14#13#13#13#13#13#13#13#12#12#13#12#12
+  +#12#13#12#12#12#12#12#12#12#11#11#12#12#11#11#11#11#10#11#10#10#10#11#10#10
+  +#10#10#13#13#13'""!''(''---111666'#7#7#7#7#7#7#7#7#7#7#6#7#7#6#7#6#6#7#7#6#6
+  +#6#6#6#6#6#6#13#15#13#6#6#6'000yyy000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000555<<<'
+  +'===???CCCGGGJJJMMMNNNPPPPPPPPPQQQRRRSSSQQQJJJBBB;;;222000000000000000000000'
+  +'000000000000000000000000000000000000000555<<<<<<======>>>>>>===222/////////'
+  +'/////////111988988988988988888888888888888888888888888888888888888888887887'
+  +'877877877877877777777777777777777777777777777766544333111222222222222333333'
+  +'333444444555666777777777999:99<;;<;<=<=???@@@AAACCCDDDFFFGGGIIIKKKMMMOOOPPP'
+  +'SSSUUUWWWZZZ\\\___bbbeddhggjjjnmmqqqtttwww{{{}}}'#129#129#129#133#133#133
+  +#137#137#137#140#140#140#144#144#144#148#148#148#152#152#152#156#156#156#160
+  +#160#160#163#163#163#167#167#167#171#171#171#174#174#174#178#178#178#181#181
+  +#181#162#162#161#148#148#148#146#146#146#142#142#142#138#138#138#133#133#133
+  +'yyytttnnnjjjeeebbb^^^ZZZVVVQQQNNNIIIEEEBBB?>9=;4=Hk>a'#199'?o'#255'>o'
+  +#255'>m'#255'<k'#255';k'#255';j'#255':i'#255':i'#255'9h'#255'8g'#255'7g'#255
+  +'6f'#255'6e'#255'5d'#255'4d'#255'3c'#255'2b'#255'2a'#255'1a'#255'0`'#255'/_'
+  +#255'/_'#255'.^'#255'-]'#255'-\'#255'+['#255'*['#255'*Z'#255')Y'#255')X'#255
+  +'(X'#255'''X'#255'&W'#255'%V'#255'$U'#255'$U'#255'#T'#255'"S'#255'!R'#255'!R'
+  +#255' Q'#255#31'P'#255#31'P'#255#30'O'#255#29'N'#255#28'M'#255#27'L'#255#26
+  +'L'#255#26'K'#255#25'J'#255#24'I'#255#23'I'#255#23'H'#255#21'H'#255#20'H'#255
+  +#19'G'#255#26'@'#206'(6i32-54,766999:::;;;<<<<<<======<<<;;;;;;:::8887775553'
+  +'33222000---+++\\\'#176#176#176#175#175#175#171#171#171#168#168#168#164#164
+  +#164#160#160#160#156#156#156#152#152#152#148#148#148#140#141#141#137#137#137
+  +#133#133#133#130#129#129'~~}}yyywvwrrroookkkhgheeeaab^_^[[[XXXUVVSSRQPPNMM'
+  +'KJIHHHFFEDCDABB@@?>>>===:::999778555332222000//0---,,,%%%$$$#$#####$#&&&999'
+  +'=<<ABAHHHMMMMMM'''''''#28#29#29#27#28#28#27#27#28#27#27#28#27#27#27#26#27#27
+  +#27#27#27#27#26#26#27#26#26#26#26#26#26#26#26#26#26#26#25#25#26#26#25#25#25
+  +#25#25#25#25#25#25#25#25#24#25#25#25#25#25#24#24#24#25#24#24#24#24#25#24#24
+  +#24#24#24#23#24#24#23#26#26#26'%%%&&&&&&''''''''''(&&'''#25#25#25#23#23#23#23
+  +#23#23#22#22#23#23#23#22#22#23#23#26#25#26#27#27#27#26#27#26#27#26#27#26#27
+  +#26#26#26#25#24#24#24#23#23#23#23#23#22#23#23#23#22#22#22#24#24#23#24#24#23
+  +#24#23#23#24#23#23#23#22#23#23#22#22#22#23#23#21#22#22#21#21#22#21#22#22#21
+  +#22#22#22#21#21#21#21#21#21#21#21#20#21#21#21#21#21#21#20#21#20#20#20#20#20
+  +#20#19#20#20#19#20#19#20#19#20#23#23#23#28#28#27#28#27#27#28#28#27#28#28#27
+  +#20#20#21#19#19#20#19#19#19#19#19#19#19#19#19#19#18#18#18#18#18#18#17#17#18
+  +#17#18#18#17#17#17#17#17#17#17#17#17#17#17#16#17#16#17#17#16#16#16#17#16#16
+  +#16#16#16#16#15#16#16#16#15#16#16#16#15#15#15#16#15#15#15#15#15#15#15#15#14
+  +#15#15#15#15#15#14#14#14#14#14#14#15#14#13#14#13#13#14#13#13#13#13#13#13#13
+  +#12#12#12#12#12#12#13#12#12#12#12#12#12#12#11#10#11#10#10#11#10#11#11#11#10
+  +#10#10#10#11#13#13#13'   ''((-,-211666'#16#16#16#7#7#7#7#7#7#7#7#7#6#7#6#6#7
+  +#7#6#6#7#7#7#6#6#6#6#15#15#15#6#6#6'000yyy0000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000:::>>>@@@EEEJJJMMMPPPRRRSSSSSSLLLDDD===7770000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000000000444;;;;;;<<<===>>>>>>>>>4'
+  +'44///////////////4449889889889889888888888888888888888888888888888888888888'
+  +'888878878778778778778778777777777777777777777777777777777777777776664443332'
+  +'22333333333333444444555666777777888999;::<;;<;<>=>???@@@BBBDDDDDDFFFHHHJJJK'
+  +'KKMMMOOORRRSSSVVVXXX[[[]]]___cccfeehggkkknnnrrruuuxxx{{{'#131#131#131#135
+  +#135#135#138#138#138#142#142#142#146#146#146#149#149#149#153#153#153#156#156
+  +#156#160#160#160#164#164#164#167#167#167#171#171#171#174#174#174#178#178#178
+  +#180#180#179#163#163#162#149#149#149#146#146#146#142#142#142#138#138#138#133
+  ,#133#133#128#128#128'{{{uuupppkkkfffccc```\\\XXXTTTPPPLLLGGGDDEBBA?=6<<9=Jq>'
+  +'`'#199'>n'#255'>o'#255'<l'#255';k'#255';j'#255':i'#255':i'#255'9h'#255'8g'
+  +#255'7g'#255'6f'#255'6e'#255'5d'#255'4d'#255'3c'#255'2b'#255'2a'#255'1a'#255
+  +'0`'#255'/_'#255'/_'#255'.^'#255'-]'#255'-\'#255'+['#255'*['#255'*Z'#255')Y'
+  +#255')X'#255'(X'#255'''X'#255'&W'#255'%V'#255'$U'#255'$U'#255'#T'#255'"S'#255
+  +'!R'#255'!R'#255' Q'#255#31'P'#255#31'P'#255#30'O'#255#29'N'#255#28'M'#255#27
+  +'L'#255#26'L'#255#26'K'#255#25'J'#255#24'I'#255#22'J'#255#22'I'#255#27'B'#206
+  +'%6p//.2/&321555777888:::<<<===============;;;::::::999777555333111000---]]]'
+  +#176#176#176#175#175#175#171#171#171#168#168#168#164#164#164#161#161#161#156
+  +#156#156#152#152#152#149#149#149#145#144#144#138#138#138#133#133#134#131#130
+  +#130'~~~}}}zzzwwvtsspoollliiideebbb_``\\\YYYVVVTTTQRQNONLLLJIIHGGEDDCCC@@A>?'
+  +'>=<<<;;;:998967743333310100//..--.***$$$$$#"######$#334<<<A@AGGFLLKQQP---'
+  +#29#29#29#28#29#29#28#28#28#28#27#27#28#27#27#27#27#27#27#27#27#27#27#27#26
+  +#27#26#26#27#26#26#26#26#26#26#26#26#26#26#26#26#25#26#26#26#25#25#25#26#25
+  +#25#25#25#25#24#25#25#25#25#24#24#24#24#25#24#24#24#24#24#24#24#24#24#24#24
+  +#24#24#24#24#23#24#27#27#27'%%%&&&&&&''&''''''''##$'#23#23#23#23#23#23#23#23
+  +#22#22#23#23#22#23#22#24#24#24#27#27#27#27#27#26#27#26#27#27#27#26#26#26#26
+  +#25#25#25#23#23#23#22#23#23#23#22#23#22#23#22#23#23#23#24#24#24#24#24#23#24
+  +#23#23#24#23#23#23#23#22#23#22#22#23#22#22#22#22#22#22#22#22#21#21#22#22#21
+  +#21#22#21#22#21#21#22#21#21#21#21#21#21#21#21#21#20#20#20#20#20#20#20#20#20
+  +#20#20#20#20#20#19#22#22#21#27#27#28#28#28#27#28#27#27#28#28#27#22#21#21#20
+  +#20#19#20#19#20#19#19#19#19#19#19#19#18#18#18#18#18#18#17#17#18#18#17#18#17
+  +#17#17#17#17#17#17#17#16#17#17#17#17#16#16#16#17#16#16#16#16#17#17#16#16#16
+  +#16#16#15#15#15#16#16#15#16#15#16#16#15#16#15#15#15#15#15#15#15#15#14#15#15
+  +#15#15#15#14#15#15#14#14#14#13#14#14#13#14#13#13#13#13#12#13#13#13#12#13#13
+  +#13#12#12#12#11#11#11#11#11#11#11#11#11#11#11#11#11#11#10#11#11#11#11#11#12
+  +#13#13#13#31#31#31'(((.-.322888'#20#20#20#7#7#7#7#7#7#7#7#6#6#7#6#7#7#6#6#7#7
+  +#6#6#7#7#6#7#15#15#15#6#6#6'000yyy000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000111'
+  +'>>>BBBGGGLLLLLLGGG???999000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000333999:::;;;===>>>??????//////'
+  +'/////////555998988988988988988888888888888888888888888888888888888888887887'
+  +'887877877877877877777777777777777777777777777777777777777777888887777666666'
+  +'444333444444555666777777777888999<;;<;;=<=?>?@@@AAABBBDDDEEEGGGHHHKKKLLLNNN'
+  +'OOORRRTTTWWWYYY[[[^^^```cccfffjjjlllppptsswwwzzz}}}'#128#128#128#131#131#131
+  +#135#135#135#138#138#138#142#142#142#146#146#146#149#149#149#153#153#153#157
+  +#157#157#160#160#160#164#164#164#167#167#167#171#171#171#174#174#174#178#178
+  +#177#181#181#180#165#165#165#149#149#149#147#147#147#143#143#143#140#140#140
+  +#135#135#135#129#129#129'|||wwwrrrmmmhhhddd```^^^YYYVVVRRRNNNJJJFFGCCCA@?><5'
+  +'=<:=Ip=]'#192'=k'#251'<n'#255';l'#255';j'#255':i'#255':i'#255'9h'#255'8g'
+  +#255'7g'#255'6f'#255'6e'#255'5d'#255'4d'#255'3c'#255'2b'#255'2a'#255'1a'#255
+  +'0`'#255'/_'#255'/_'#255'.^'#255'-]'#255'-\'#255'+['#255'*['#255'*Z'#255')Y'
+  +#255')X'#255'(X'#255'''X'#255'&W'#255'%V'#255'$U'#255'$U'#255'#T'#255'"S'#255
+  +'!R'#255'!R'#255' Q'#255#31'P'#255#31'P'#255#30'O'#255#29'N'#255#28'M'#255#27
+  +'L'#255#26'M'#255#25'M'#255#25'J'#252#30'A'#193'&6m../0-#10.112444666888:::;'
+  +';;===>>>>>>======<<<<<<:::999888777555222000---kkk'#179#179#179#176#175#176
+  +#171#171#171#168#168#168#164#164#164#160#160#161#156#157#157#153#153#154#149
+  +#150#149#146#146#146#141#141#141#134#135#135#131#130#131'{{{{zzxxwuttqqqn'
+  +'mmjjjfffdddaaa\]]Z[ZWXXUUURRRPPOMMMKJJHHHFEEDCCCBB??>==>=<<;;::999786653343'
+  +'23112000.-.-,-%&&$%$$$%#####"))*;::???EEEIJJPOP787'#30#30#29#29#29#29#29#28
+  +#28#27#28#28#28#27#28#28#27#27#27#27#27#27#28#27#27#27#27#27#27#27#27#27#27
+  +#26#26#27#27#26#27#26#26#26#26#26#26#26#26#26#25#26#25#25#26#25#25#26#25#25
+  +#25#25#25#25#25#25#25#25#25#24#25#24#25#25#24#24#24#24#24#24#24#24#24#24#24
+  +#24#23#23#24'   &%%&&&%&&''''''((('#27#27#27#23#23#23#23#23#23#23#23#23#22#23
+  +#23#22#23#23#27#27#26#27#27#27#26#27#27#26#26#26#27#26#26#26#26#26#23#23#23
+  +#23#23#23#23#23#23#23#23#22#23#24#23#24#24#24#24#24#23#24#24#23#24#23#23#24
+  +#22#23#23#23#22#23#22#22#22#22#22#22#22#22#22#21#22#22#22#22#22#21#21#21#22
+  +#21#21#21#21#21#21#21#21#21#21#21#20#21#20#20#20#20#20#20#21#20#20#20#20#20
+  +#21#21#21#28#28#27#28#28#27#28#27#27#28#27#27#24#24#23#19#20#19#20#20#20#20
+  +#20#19#19#19#19#20#19#19#18#18#18#19#18#18#18#18#17#18#17#17#18#17#18#17#17
+  +#17#17#17#17#17#17#16#17#17#16#16#17#16#17#16#16#17#16#17#16#16#16#16#16#16
+  +#16#16#15#15#15#15#16#16#15#15#16#15#15#15#15#15#15#15#15#15#15#14#14#15#15
+  +#14#14#14#14#14#14#13#14#13#13#13#13#13#13#13#13#13#11#11#11#11#12#11#12#11
+  +#11#11#11#11#11#11#11#10#11#11#11#11#10#12#12#11#12#11#12#15#14#14'   ***000'
+  ,'445999'#27#26#26#7#7#7#7#7#8#7#7#7#7#7#6#6#6#7#7#6#6#6#6#6#6#6#7#15#15#15#6
+  +#6#6'000yyy00000000000000000000000000000000000000000000000000000000000000000'
+  +'0000000000000000000000000000000000000000000000000000555:::88844400000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0000000000000000000000000222888:::;;;===>>>===///////////////66699898898898'
+  +'898898888888888888888888888888888888888888888888888788787787787787787777777'
+  +'777777777777777777777777777777777777788888888788798898898899888877777787787'
+  +'7777888999:::<;;<;;>=>?>?@@@AAACCCDDDFFFGGGIIIKKKMMMOOOPPPSSSUUUWWWZZZ]\\__'
+  +'_cccfffiiilllnnnqqquuuxxxzzz~~~'#129#129#129#132#132#132#136#136#136#138#138
+  +#138#142#142#142#146#146#146#149#149#149#153#153#153#157#157#157#160#160#160
+  +#164#164#164#167#167#167#171#171#171#174#174#174#178#178#177#181#181#180#167
+  +#167#167#149#149#149#148#148#148#144#144#144#141#141#141#136#136#136#131#131
+  +#131'}}}xxxsssnnniiieeebbb___[[[XXXUUUQQQLLLIIIEEECCC@@??<5=<7<D^=V'#165'<f'
+  +#230'<l'#255';l'#255':j'#255':i'#255'9h'#255'8g'#255'7g'#255'6f'#255'6e'#255
+  +'5d'#255'4d'#255'3c'#255'2b'#255'2a'#255'1a'#255'0`'#255'/_'#255'/_'#255'.^'
+  +#255'-]'#255'-\'#255'+['#255'*['#255'*Z'#255')Y'#255')X'#255'(X'#255'''X'#255
+  +'&W'#255'%V'#255'$U'#255'$U'#255'#T'#255'"S'#255'!R'#255'!R'#255' Q'#255#31
+  +'P'#255#30'P'#255#30'P'#255#28'P'#255#28'N'#255#29'I'#233'#@'#166'+5Y/.*0-$0'
+  +'0.111333444666888:::<<<======>>>>>>>>>===<<<<<<:::999777555444222///utt'#179
+  +#179#179#176#176#175#172#171#172#168#168#169#164#164#164#161#161#161#157#156
+  +#157#154#154#153#150#149#150#146#146#146#142#142#142#137#137#137#131#131#131
+  +#128#128#128'{||xxxyyyuutrrronnlkkhgheeeaaa^^^\\\XXXUUUSRRPPPMNNLLLIIHGHGFEE'
+  +'CBBA@@?>>==<<<;:::998877544343121010///...+*+%$%$%$#$####$$$434==>CBBHHHMMM'
+  +'JKK'#30#30#30#29#30#29#29#30#29#28#28#29#28#28#28#28#27#28#27#28#27#28#28#27
+  +#27#27#28#27#27#27#27#26#27#27#27#27#26#27#27#27#26#26#27#26#26#26#26#26#26
+  +#25#26#26#26#26#25#26#26#25#26#25#26#25#25#25#25#25#25#25#25#25#25#24#25#25
+  +#25#24#24#24#24#24#24#24#24#24#24#24#24#24#24#24#24#25#25'###%%%&&&''''&'''''
+  +'''$$$'#23#23#23#23#23#23#23#23#23#22#23#23#22#22#22#26#25#26#27#27#27#27#27
+  +#27#27#26#27#26#27#26#27#26#26#24#24#24#23#23#24#23#23#23#23#23#23#24#23#24
+  +#24#25#25#24#24#24#24#24#23#24#24#23#24#23#23#24#22#23#23#23#22#23#22#22#22
+  +#22#22#22#22#22#21#22#22#21#21#21#21#21#22#21#21#22#21#21#21#20#21#20#21#20
+  +#21#21#20#21#21#21#20#20#20#20#20#21#21#20#20#20#27#28#28#28#28#27#28#28#27
+  +#28#27#27#25#24#24#20#20#20#20#20#20#20#20#19#19#19#19#20#19#19#19#18#18#19
+  +#18#18#19#17#18#18#18#17#18#17#18#17#17#17#17#17#17#17#17#16#16#17#17#16#17
+  +#17#16#17#16#16#16#16#16#16#16#16#16#16#16#16#16#16#15#16#16#15#16#16#16#16
+  +#15#15#15#15#15#16#15#15#15#15#15#15#14#14#15#14#14#14#14#14#14#13#13#14#12
+  +#13#12#12#12#12#12#12#12#12#11#12#11#12#12#11#11#11#11#11#12#12#12#12#12#12
+  +#12#13#13#14#17#16#16#29#29#28'(((...333888<<<""!'#8#7#7#7#7#8#7#8#7#7#7#7#7
+  +#7#7#6#7#7#6#7#6#7#7#6#15#18#15#6#6#6'000yyy00000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0000000000000000000000000000000000000000000000000000000000000333999:::<<<=='
+  +'=;;;///////////////99899898898898898898888888888888888888888888888888888888'
+  +'888888888788788787787787787787777777777777777777777777777777777777777788888'
+  +'8887887988988988988:99999:::;;;;;;;;;<;;<<<======>>>???AAAAAACCCDDDEEEGGGHH'
+  +'HJJJLLLMMMPPPRRRTTTWVVYXX[ZZ]\\___bbbdddfffjjjlllooorrruuuxxx{{{'#129#129
+  +#129#133#133#133#136#136#136#139#139#139#143#143#143#146#146#146#149#149#149
+  +#153#153#153#157#157#157#160#160#160#164#164#164#167#167#167#170#170#170#174
+  +#174#173#177#177#177#181#181#180#172#172#172#151#151#151#148#148#148#145#145
+  +#145#142#142#142#138#138#138#133#133#133'zzzuuuppplllgggcccaaa]]]ZZZVVVSS'
+  +'SOOOLLLHHHFFFCCDAA@?=8=;3<?F<K{;Y'#181';f'#237':j'#255'9k'#255'9i'#255'8h'
+  +#255'7g'#255'6f'#255'6e'#255'5d'#255'4d'#255'3c'#255'2b'#255'2a'#255'1a'#255
+  +'0`'#255'/_'#255'/_'#255'.^'#255'-]'#255'-\'#255'+['#255'*['#255'*Z'#255')Y'
+  +#255')X'#255'(X'#255'''X'#255'&W'#255'%V'#255'$U'#255'$U'#255'#T'#255'"S'#255
+  +'!R'#255'!S'#255#31'S'#255#31'Q'#255#31'M'#240'#D'#185'):y.2>0.%1/(110222333'
+  +'444666777999;;;======>>>>>>>>>??????>>><<<;;;:::999777444333:::'#134#134#134
+  +#179#179#179#175#175#175#171#172#172#168#168#168#164#164#164#161#161#161#157
+  +#157#157#154#154#154#149#150#150#146#146#146#142#142#142#139#139#139#133#132
+  +#132#128#128#128'}}}xxxwvwvvvrrrppolmliihfeecbb`__\\\ZZZWWVSSTRRQPOOMMMJJJHH'
+  +'HFFFDCCCBB@??>==<<<<;;:::999886555323221000./....(((%%%%%$$####$&&'';;;???E'
+  +'EFKLKPPQ111'#29#30#30#30#30#30#29#29#29#28#28#28#28#28#28#28#28#28#28#28#27
+  +#27#28#27#28#28#27#27#27#28#27#27#27#27#27#27#27#26#27#27#27#26#26#27#26#26
+  +#26#26#26#26#26#26#26#26#26#25#26#25#26#25#25#25#25#26#25#25#25#25#25#25#24
+  +#25#25#25#25#24#24#24#25#24#24#24#24#24#24#24#24#24#24#24#24#23#23#29#29#28
+  ,'$$$%%%&&&''''&''''('#25#25#25#24#23#23#23#23#23#23#23#23#23#23#22#24#23#23
+  +#28#28#27#27#27#27#27#27#27#27#27#26#26#27#26#26#25#25#23#23#23#23#24#24#23
+  +#23#23#22#23#23#24#24#25#24#25#24#25#24#24#24#24#24#24#24#23#23#23#23#24#23
+  +#22#23#22#23#23#22#22#22#22#22#22#22#22#22#22#22#22#22#21#22#21#21#21#21#21
+  +#21#21#21#21#21#21#21#21#21#21#21#20#20#20#21#20#20#20#20#20#20#26#26#25#28
+  +#28#28#28#28#28#27#27#27#27#25#25#20#20#20#20#20#20#19#20#20#20#20#20#20#19
+  +#19#19#18#19#19#18#18#19#18#18#19#17#18#18#17#17#17#18#18#17#17#17#17#17#17
+  +#17#17#17#17#16#17#17#16#17#16#17#17#16#16#16#16#16#16#16#16#16#16#16#16#15
+  +#15#16#15#15#15#16#16#16#15#15#15#15#15#15#15#15#15#15#14#14#14#14#14#13#12
+  +#14#12#13#12#12#12#12#12#12#12#12#12#12#11#12#11#12#12#11#12#13#13#12#12#12
+  +#13#14#13#16#16#16#26#26#25'$$$('''',,,111777:::<;<!"!'#8#8#7#7#7#7#8#7#7#7#7
+  +#7#7#7#7#7#7#7#6#7#6#7#7#6#18#15#15#6#6#6'000yyy0000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000000000000000000000000333888999;'
+  +';;===767//////////////09989989989889889889889888888888888888888888888888888'
+  +'888888888888878878878778778778778777777777777777777777777777777777777777777'
+  +'77888887887887988988988:99:99999:::;;;;;;;;;===>>>>>>???@@@AAABBBCCCEEEFFFG'
+  +'GGJJIJJILLKNMMPOOQPPSRRUTTXWWZYY[[[^]]___bbbeeegggjjjmmmooorrruuuxxx|||'
+  +#130#130#130#133#133#133#136#136#136#139#139#139#143#143#143#146#146#146#149
+  +#149#149#153#153#153#157#157#157#160#160#160#163#163#163#167#167#167#170#170
+  +#170#173#173#173#176#176#176#180#180#180#176#176#176#155#155#155#149#149#149
+  +#146#146#146#143#143#143#139#139#139#134#134#134#129#129#129'|||xxxsssnnnjjj'
+  +'eeebbb```\\\YYYVVVRRROOOKKKHHHFFFDDDBBB?><>;4<:5;?J;Jy:U'#173'9`'#222'9g'
+  +#249'8i'#255'6i'#255'6h'#255'5f'#255'5e'#255'4d'#255'3c'#255'2b'#255'2a'#255
+  +'1a'#255'0`'#255'/_'#255'/_'#255'.^'#255'-]'#255'-\'#255'+['#255'*['#255'*Z'
+  +#255')Y'#255')X'#255'(X'#255'&X'#255'&W'#255'%V'#255'$W'#255'#W'#255'#U'#255
+  +'"Q'#249'#L'#221'&C'#170'*:u.2B1/*20&21.332333555666777888:::;;;===>>>??????'
+  +'@@@@@@?????????>>><<<;;;999777666444FFF'#153#152#152#179#178#178#175#174#174
+  +#171#171#171#168#168#168#164#165#165#161#161#160#157#157#157#154#154#154#150
+  +#150#150#146#146#146#142#142#142#140#139#140#135#135#135#129#129#129'}}}yyyv'
+  +'vvssststqppmmmiiiggfccc```^]^[ZZWWWUTUSRSQPPNNMKKKHHIGFGEEEDDDA@@???>==;;::'
+  +';;9::887677433221111.////././%&%%%%$$$""#$$#0//===A@AGHHMMMKKK'#31#30#30#30
+  +#30#30#30#30#30#29#29#29#29#29#29#28#29#28#29#28#28#28#28#28#28#28#27#28#28
+  +#28#27#27#27#27#28#27#27#27#28#27#27#27#27#27#27#27#26#27#26#26#27#27#27#26
+  +#26#26#26#26#25#26#26#25#26#25#26#25#25#25#25#25#25#25#26#25#25#24#25#25#24
+  +#25#25#24#25#24#24#24#24#24#25#24#24#24#24#24#24#24#23#24#24'"""$$%%%%%&&&'''
+  +''''#29#30#30#23#24#24#24#24#23#23#23#23#23#23#23#23#23#23#27#27#27#28#28#27
+  +#27#28#27#27#27#27#27#27#26#26#26#25#23#24#24#24#24#24#23#23#23#23#23#23#25
+  +#24#25#24#25#25#24#24#25#24#24#24#24#24#23#24#24#23#24#23#23#24#22#23#23#22
+  +#23#23#23#22#22#22#22#22#22#22#22#22#22#21#21#21#22#21#21#21#22#21#21#21#21
+  +#21#21#20#21#21#20#21#20#20#20#20#21#21#20#20#25#25#25#28#28#28#28#28#28#28
+  +#28#28#28#27#27#20#20#20#20#20#20#20#20#20#19#20#20#19#19#19#19#19#19#19#18
+  +#18#19#18#18#19#18#18#18#18#18#18#17#18#17#17#18#18#17#17#17#17#17#17#17#17
+  +#17#17#16#16#17#16#17#16#16#17#16#17#16#17#16#16#16#16#16#16#16#16#15#16#16
+  +#15#16#16#16#16#15#16#15#15#14#15#14#14#14#13#13#13#13#12#12#13#12#12#12#13
+  +#12#13#12#12#12#12#12#13#13#13#13#13#13#14#13#14#16#15#15#25#25#25'"""&&&((('
+  +'---112766999<<<===('''''#8#7#8#7#8#7#7#8#7#8#7#7#7#7#7#7#7#7#7#7#7#6#7#7#18
+  +#18#15#7#6#7'000yyy000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000333777999;;;===444////////////111999998'
+  +'998988988988988988888888888888888888888888888888888888888888887887877877877'
+  +'877877777777777777777777777777777777777777777777888888887887988988988988:99'
+  +'999:::;;;;;;;;;<<<===>>>???@@@@@@BBBBBBDDDEEEFFFHHHJJIKKJMLLNMMQPPRQQTSSUTT'
+  +'XWWZYY\[[^^^```bbbeeegggjjjmmmpppsssuuuxxx|||'#130#130#130#133#133#133
+  +#136#136#136#139#139#139#143#143#143#146#146#146#149#149#149#153#153#153#156
+  +#156#156#160#160#160#163#163#163#166#166#166#169#169#169#172#172#172#176#176
+  +#176#179#179#179#178#178#178#160#160#160#149#149#149#147#147#147#144#144#144
+  +#140#140#140#136#136#136#131#131#131'yyyuuuqqqlllhhheeeaaa^^^[[[XXXUUURRR'
+  +'OOOLLLIIIGGGEEEBBB@@@?>;>;4=;4;<@:B[:L'#133'9T'#170'7['#207'7a'#235'5d'#249
+  +'5e'#255'4e'#255'3f'#255'2d'#255'2c'#255'1b'#255'/a'#255'/`'#255'.`'#255'._'
+  +#255'-^'#255',^'#255'+]'#255'*]'#255')\'#255'(\'#255'(Z'#255'(Y'#255'''W'#250
+  +'''T'#237'(M'#205')E'#165'+='#128'-6T/051.''2/%21-332444555666777999:::;;;<<'
+  ,'<===???@@@@@@AAAAAAAAAAAAAAA???>>>>>><<<;;;999777555ZZZ'#165#164#165#178#177
+  +#177#175#174#175#171#170#171#167#167#167#164#163#164#161#161#161#157#157#157
+  +#153#153#153#150#150#150#146#146#146#142#142#142#140#140#140#136#136#136#132
+  +#133#132'}}}yyyvvvsssqqppqqmmmjkjgggdddaa`^^]\\\ZXXWVVSSSQQQNNMKLLJIIHHHFFFD'
+  +'DCBBB?@@?>><=<;:::::999766556223222000/...//,+,%%%%%%$$$$##$%%566===DDDIIIO'
+  +'OO545'#30#30#31#30#30#30#30#30#30#29#29#29#29#29#29#29#28#28#29#28#29#28#28
+  +#28#28#28#28#28#28#28#28#28#27#27#28#27#27#27#28#27#27#27#27#27#27#27#27#27
+  +#27#26#27#26#27#27#26#26#26#26#26#27#26#26#26#26#25#26#25#25#25#25#25#26#25
+  +#26#25#25#25#25#24#25#25#25#25#25#25#25#24#25#24#25#24#24#24#24#24#24#24#24
+  +#24#29#29#29'$%$%%&&&&''''''%%%'#24#23#24#23#24#23#23#23#23#23#23#23#23#23#23
+  +#27#26#26#27#28#28#28#28#27#27#27#27#27#27#26#26#27#26#25#23#23#24#24#23#23
+  +#24#24#23#23#23#24#24#24#24#25#25#24#24#24#24#24#24#25#24#24#24#24#23#23#23
+  +#23#24#23#23#24#22#23#23#22#22#23#22#22#22#22#22#22#22#22#22#22#22#22#22#22
+  +#22#22#21#21#21#21#21#21#21#21#21#21#21#21#21#20#21#20#20#20#21#24#24#24#28
+  +#28#28#28#28#28#28#28#27#27#27#28#21#20#21#20#20#21#20#20#20#20#19#20#19#20
+  +#20#19#19#19#19#18#19#19#18#18#19#19#18#19#18#18#18#18#17#18#17#18#18#17#17
+  +#17#17#18#17#17#17#17#17#17#17#17#17#16#16#17#17#16#16#17#16#16#16#16#16#16
+  +#16#16#16#16#16#15#15#15#15#16#16#15#14#15#13#13#13#14#13#13#12#13#13#13#13
+  +#13#13#12#12#13#12#13#13#14#14#13#13#13#14#14#14#15#15#14#22#23#23'!!!%%%()('
+  +'++,000222777:99===555'#21#21#21#8#8#8#8#8#7#8#8#7#8#7#7#7#8#7#7#7#8#7#7#7#7
+  +#7#7#7#7#6#18#15#18#6#7#7'000yyy00000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0000000000000000000000000000000000000000000000000444666888:::===222////////'
+  +'////33399999899898898898898898898888888888888888888888888888888888888888888'
+  +'788788787787787787787777777777777777777777777777777777777777788888888788788'
+  +'7988988988:99999999:::;;;;;;;;;<<<>>>>>>???@@@AAABBBCCCEEEFFFGGGIIHJJILKKML'
+  +'LNMMQPPRQQTTTVUUXXXZYY\[[^^^```bbbeeehhhjjjmmmqqqsssuuuyyy|||'#130#130
+  +#130#133#133#133#136#136#136#139#139#139#143#143#143#146#146#146#149#149#149
+  +#153#153#153#156#156#156#159#159#159#162#162#162#165#165#165#169#169#169#171
+  +#171#171#175#175#175#178#178#178#180#180#180#167#167#167#150#150#150#148#148
+  +#148#146#146#146#142#142#142#138#138#138#134#134#134#129#129#129'|||xxxtttpp'
+  +'pkkkgggdddaaa^^^[[[YYYUUURRRPPPMMMJJJHHHFFFCCCBBBAA@??=><8=:1<:2<<=;=E:B[9G'
+  +'v7K'#140'7O'#160'5S'#177'4T'#193'4V'#201'3Y'#217'1Y'#221'0X'#221'0X'#221'/W'
+  +#221'.V'#219'/Q'#201'.O'#194'.L'#177'.H'#159'/D'#139'/>t1:Y14=22320''30&32,3'
+  +'20333555666777888999;;;<<<===>>>???@@@AAAAAACCCCCCCCCBBBBBBAAAAAA@@@>>>===<'
+  +'<<:::888999uuv'#173#173#174#175#175#175#174#173#174#170#169#169#167#167#167
+  +#163#163#163#160#160#160#157#157#157#153#153#153#150#150#150#147#146#146#143
+  +#142#142#140#140#140#136#136#136#133#133#133#129#129#129'yyyvwvtttpppooonnmk'
+  +'llhhheddbbb__^\\\ZYYWWVTSSRQQOOOMMMKKKIIIGGGDDDBBB@AA??>>>=<;;;::;::8877775'
+  +'55333111//////-..))*%&&$$$######&&&;<;??@DDDKKKPPP$%%'#31#31#30#31#30#31#30
+  +#30#30#29#29#29#29#28#29#28#28#29#29#29#28#29#28#28#28#28#28#28#28#28#28#28
+  +#28#28#28#28#28#27#27#28#27#28#27#27#28#27#27#27#27#26#27#26#26#26#26#26#27
+  +#27#27#26#26#26#26#26#26#26#26#26#26#25#25#26#25#25#25#26#26#25#25#25#25#25
+  +#25#25#24#25#24#24#24#24#24#24#24#24#24#24#24#24#24#25#26#26'$$$%$%%%%&&&''('
+  +'('#24#25#24#23#23#24#23#23#23#23#23#23#23#23#23#25#25#25#27#27#27#28#27#27
+  +#27#27#27#27#27#27#27#27#26#25#25#25#25#23#23#23#24#23#24#23#23#25#24#24#25
+  +#25#25#24#25#25#24#24#24#24#24#25#25#24#24#24#24#23#24#24#23#24#23#23#23#23
+  +#23#23#23#22#23#22#22#22#23#22#22#22#22#22#22#21#21#21#21#22#21#22#22#22#21
+  +#21#21#21#20#21#21#21#21#20#20#20#20#24#25#24#29#28#28#28#28#28#27#28#27#28
+  +#28#27#21#20#21#20#20#20#21#20#20#20#20#20#20#20#20#20#19#19#20#19#19#20#19
+  +#18#19#18#18#19#18#18#18#17#17#18#18#18#17#18#17#17#17#18#17#17#17#17#17#17
+  +#17#17#17#17#17#16#17#17#16#16#16#17#16#17#16#16#16#16#16#16#16#15#15#15#13
+  +#13#13#14#13#14#14#13#14#13#13#14#13#13#13#12#13#12#14#14#13#14#14#14#13#13
+  +#13#16#15#15#20#20#20#31#31#31'%&&))),,+/00322555888:::899'#28#28#29#9#8#8#8
+  +#8#8#8#8#8#8#7#8#8#8#7#8#8#8#8#7#7#7#8#8#8#7#7#7#7#7#7#7#7#18#18#18#6#6#7'00'
+  +'0yyy00000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0000000000000000000000444666888:::===///////////////54499999899899898898898'
+  +'898898888888888888888888888888888888888888888888788788787787787787787777777'
+  +'7777777777777777777777777777777777777888887887887988988988988:99999:::;;;;;'
+  +';;;;<<<===>>>??????@@@BBBBBBCCCEEEFFFGGGIIHJJILKKMMMONNQPPSRRTTTWVVXXX[ZZ\\'
+  +'\___aaacccfffhhhkkkmmmqqqsssvvvyyy|||'#130#130#130#133#133#133#136#136
+  ,#136#139#139#139#142#142#142#146#146#146#149#149#149#152#152#152#155#155#155
+  +#158#158#158#162#162#162#164#164#164#168#168#167#171#171#171#174#174#173#177
+  +#177#177#181#180#180#174#174#174#155#155#155#149#149#149#147#147#147#144#144
+  +#144#140#140#140#137#137#137#132#132#132'{{{wwwsssnnnjjjfffcccaaa^^^[[[XX'
+  +'XVVVSSSQQQNNNLLLIIIHHHFFFDDDBBBAAA@???>=>=;><7<:3<9/<9/;93::8:999:>9:?89>79'
+  +'=79=78<66665464/74)73)64,65/652654665777777777888999;;;<<<<<<>>>???@@@AAABB'
+  +'BCCCCCCDDDDDDDDDDDDEEEDDDBBBBBB@@@@@@>>><<<;;;:::MMM'#147#147#147#175#176
+  +#176#171#171#171#171#170#170#170#170#170#166#165#165#163#162#162#160#160#160
+  +#156#156#156#153#153#153#149#149#149#146#146#146#142#142#142#140#139#139#136
+  +#136#136#133#133#133#129#129#129'~~~vvwtttpppmmnllllllhhheffcbb```]]][[ZXXWV'
+  +'UTSRRPOONNNKKKIIIGGFDDDDCCABA???>>><<;::::::98887766654412201100////.-.(((&'
+  +'&%%$%####$$))*<<<BBBEFELLLHHH'#31#31#31#31#30#31#30#31#30#29#29#30#29#29#29
+  +#29#29#29#29#29#29#29#28#29#29#29#28#29#28#28#28#28#28#28#28#28#28#27#28#27
+  +#28#27#27#27#27#27#27#27#27#27#27#27#27#27#27#27#26#26#26#26#27#27#27#27#26
+  +#27#26#26#26#26#26#26#26#25#26#26#26#26#25#25#26#25#25#25#25#25#25#24#25#25
+  +#24#25#25#25#25#24#25#25#24#24#24#24#24#24#24'"!"%%%&%%&&&'''''''#28#28#28#24
+  +#23#24#24#24#24#24#23#23#23#23#24#24#24#24#28#28#28#28#27#27#28#28#27#28#27
+  +#27#27#27#26#25#25#25#25#25#25#24#24#23#24#24#24#24#24#24#25#25#25#25#25#25
+  +#25#25#25#24#25#25#24#25#24#25#24#24#24#24#23#24#24#23#24#23#23#24#22#23#23
+  +#23#22#23#23#22#22#22#22#22#22#22#22#22#22#21#22#21#22#22#21#21#21#22#21#21
+  +#21#21#21#20#21#21#21#23#23#22#29#29#28#29#28#28#28#28#28#28#28#28#22#23#22
+  +#21#20#21#20#20#20#20#20#20#20#20#20#19#19#19#19#19#19#20#18#18#19#19#18#19
+  +#18#18#18#18#18#18#18#18#18#18#18#18#18#18#18#17#17#17#17#17#18#18#17#17#17
+  +#17#16#17#17#17#17#17#17#17#17#16#16#17#15#14#14#14#13#14#14#13#14#13#13#14
+  +#14#13#14#13#13#13#13#13#13#15#14#14#14#13#14#16#15#15#19#18#19#30#31#30'&&&'
+  +')))+++./.2224548889::777"""'#12#12#12#8#8#9#9#8#8#9#8#9#8#8#8#8#8#8#8#8#8#8
+  +#8#8#7#8#8#7#7#8#7#8#8#7#7#7#7#7#7#18#18#18#7#7#7'000yyy00000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000011144'
+  +'4666888;;;<<<...////////////66699999999899898898898898898888888888888888888'
+  +'888888888888888888888888888788787787787787787777777777777777777777777777777'
+  +'7777777777777888888887887877988988988:99999999:::;;;;;;;;;<<<>>>>>>???@@@AA'
+  +'ABBBBBBDDDEEEFFFHHGJJIJIILKKNMMPOOQPPSRRUTTWVVYXXZZZ\\\___aaacccfffiiikkknn'
+  +'nqqqsssvvvyyy|||'#130#130#130#133#133#133#136#136#136#138#138#138#142#142
+  +#142#146#146#146#148#148#148#151#151#151#155#155#155#157#157#157#160#160#160
+  +#164#164#164#167#167#166#170#170#169#173#173#173#176#176#176#179#179#179#180
+  +#180#180#165#164#164#149#149#149#148#148#148#145#145#145#143#143#143#139#139
+  +#139#135#135#135#130#130#130'~~~zzzvvvrrrnnnjjjfffcccaaa^^^[[[YYYWWWTTTRRROO'
+  +'OMMMLLLJJJGGGFFFEEEDDDCCCBBB@@@@@@????>>>>===;<;9<;9<;9;:8;:8;:8::8::8::9::'
+  +'::::::::::;;;;;;;;;<<<======>>>???@@@AAAAAABBBCCCDDDEEEEEEEEEEEEFFFGGGFFFEE'
+  +'EEEEDDDCCCBBB@@@???>>><<<:::nnn'#168#168#169#173#173#174#170#171#171#167#167
+  +#167#167#166#166#165#165#165#163#163#162#159#159#159#155#155#155#153#153#153
+  +#148#148#148#145#145#145#143#143#142#140#140#140#136#135#135#133#133#133#130
+  +#129#129'~~zzztttqqqmmmjjjjjjiiifffcdd```]]^[[[XYXVVUSSSQQPNNNNLLJIIHHHFFFD'
+  +'EDBAB@?@???===;:;:::9::8877667664430110/00/0./.-.-((''%%%$$$####$$000=<=AAA'
+  +'GHGMMM>>>'#31#31#31#30#31#31#30#31#30#29#29#29#30#29#29#29#29#29#29#29#29#29
+  +#29#29#28#29#28#28#28#29#28#28#28#28#29#28#28#28#28#28#27#27#28#28#27#27#27
+  +#27#27#27#28#27#27#28#27#27#27#26#27#27#26#26#27#26#26#27#26#26#26#26#26#26
+  +#25#26#26#25#26#25#25#25#25#25#25#26#26#26#26#25#25#25#25#25#25#25#25#25#24
+  +#24#24#24#25#24#24#24#24#30#31#31'$$#%$%&&&''('''#31#31' '#24#24#24#24#24#24
+  +#24#24#24#23#23#23#24#24#25#28#28#28#28#28#28#28#28#27#27#27#27#27#27#26#26
+  +#26#26#25#25#25#24#25#25#25#24#23#25#24#25#26#25#25#25#25#25#25#25#25#24#25
+  +#25#25#25#25#25#25#25#24#24#24#24#24#23#24#24#23#23#23#23#23#22#23#23#22#23
+  +#23#22#22#22#22#22#22#22#22#22#22#22#21#21#22#21#21#21#21#21#21#21#21#21#21
+  +#21#21#23#23#23#28#29#28#29#28#29#28#28#28#28#28#28#23#22#22#20#21#21#21#21
+  +#20#20#20#20#20#20#20#20#20#20#20#19#19#20#19#19#20#18#18#19#19#18#19#18#19
+  +#18#18#18#18#18#18#18#17#18#18#18#18#18#18#17#17#18#17#17#17#17#17#17#17#16
+  +#17#17#15#14#15#14#14#15#14#13#14#14#13#14#14#13#14#14#13#14#14#13#14#14#14
+  +#14#14#14#15#16#15#15#18#19#18#28#29#29'%&&)(),++...111555888899:;:(()'#12#13
+  +#12#9#9#9#9#9#8#9#9#9#9#9#9#8#9#8#8#8#9#8#8#8#8#8#8#8#7#8#7#8#8#8#7#7#8#7#7#8
+  +#8#7#8#7#7#18#18#18#7#7#7'000yyy00000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  ,'0000000000000000000000000000000000000000000000111444777999;;;:::...////////'
+  +'////88799999999899899898898898898898888888888888888888888888888888888888888'
+  +'888788788787787787787787777777777777777777777777777777777777777777788888788'
+  +'7887988988988988999999::::::;;;;;;<<<===>>>>>>???@@@AAABBBCCCEEEFFFGGFHHGJI'
+  +'IKJJMLLNMMPOOQPPSRRUTTXWWYXX[[[]]]___bbbdddfffiiikkknnnqqqsssvvvyyy|||'
+  +#130#130#130#133#133#133#136#136#136#138#138#138#142#142#142#145#145#145#148
+  +#148#148#150#150#150#154#154#154#157#157#157#160#160#159#163#163#162#166#166
+  +#166#169#169#169#171#171#171#175#174#174#178#177#177#180#180#180#173#173#173
+  +#156#156#156#149#149#149#147#147#147#144#144#144#141#141#141#138#138#138#133
+  +#133#133#130#130#130'~~~zzzvvvrrrnnnkkkhhhdddaaa^^^\\\ZZZXXXVVVSSSQQQOOONNNM'
+  +'MMJJJIIIHHHGGGFFFEEEDDDCCCCCCCCCAAAAAA@@@@@@@@@?????????????????????@@@@@@@'
+  +'@@@@@@@@BBBCCCCCCDDDDDDEEEFFFFFFGGGGGGHHHHHHHHHHHHGGGHHHHHHFFFEEEDDDCCCBBBA'
+  +'AA???===UUU'#149#149#149#178#178#178#172#172#173#168#168#169#165#166#166#163
+  +#163#163#162#162#162#161#161#161#158#158#158#156#155#155#153#152#152#148#148
+  +#148#145#145#146#142#142#142#139#139#139#136#136#136#133#133#133#130#130#130
+  +'~~~{|{xxwqqqnnnjjjhghiiifffddda``__^\\\YZYWWWTTTRRQPPOMMLJIIIHHGFFEEECCCAA@'
+  +'@?@=>=<<<::::::999998776655433000000///../---&&&$$$#$$"""#$#///>>>BABGGHMMM'
+  +'988   '#31#31#31#29#30#30#29#30#30#30#29#29#29#30#30#29#29#29#29#29#29#29#29
+  +#29#29#29#29#28#28#28#29#28#29#28#29#28#28#28#28#28#28#28#27#28#27#27#27#27
+  +#27#27#28#27#28#28#27#27#27#27#26#27#26#27#26#27#26#27#26#26#26#26#26#26#26
+  +#26#26#25#26#26#25#26#25#25#25#26#26#26#25#25#25#25#24#25#25#25#25#25#24#24
+  +#25#24#25#24#30#30#30'$$$%%%&&&''(('#31#31' '#24#24#24#24#23#24#24#23#24#23
+  +#23#24#24#23#24#28#28#28#28#28#28#27#28#27#28#27#27#27#27#27#27#27#26#25#25
+  +#26#25#25#25#25#25#25#24#24#25#26#26#26#25#25#26#25#25#25#25#25#25#24#25#25
+  +#24#24#24#24#25#25#24#24#24#24#24#23#24#24#23#23#23#23#24#22#22#23#22#23#23
+  +#22#22#22#22#22#22#22#21#22#22#22#21#21#22#21#21#22#21#22#22#21#21#21#23#23
+  +#23#28#29#28#29#29#27#28#28#29#28#28#28#23#23#22#21#21#20#21#20#21#20#20#20
+  +#20#20#20#20#20#20#20#19#19#19#19#19#19#18#18#20#18#18#19#18#18#18#18#19#18
+  +#18#18#18#17#18#17#17#18#17#18#17#18#17#18#17#17#17#16#16#16#15#15#15#14#14
+  +#15#14#13#15#14#13#14#14#13#15#14#13#15#15#14#15#15#14#15#15#15#15#18#19#19
+  +#27#27#27'$$%(((+++.//011544787999;;;.//'#16#16#15#10#10#9#9#10#9#9#9#9#10#9
+  +#9#9#9#9#8#9#8#8#8#9#8#9#8#9#8#9#9#9#8#9#8#8#8#8#8#8#7#8#7#8#8#7#7#8#7#7#7#18
+  +#18#18#7#7#7'000yyy000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000222555777999;;;777...////////////999999999'
+  +'998998998988988988988988888888888888888888888888888888888888888888887887877'
+  +'877877877877777777777777777777777777777777777777777777888887887887877988988'
+  +'988:99999999:::;;;;;;;;;<<<===>>>??????@@@BBBBBBCCCEEEFFFGGFIIHJIILKKMLLNMM'
+  +'QPPRQQTSSUTTXWWYYY[[[]]]___bbbdddfffiiilllnnnqqqsssvvvyyy|||'#129#129#129
+  +#132#132#132#135#135#135#138#138#138#141#141#141#144#144#144#147#147#147#150
+  +#150#150#153#153#153#156#156#155#159#159#158#162#162#162#164#164#164#168#167
+  +#167#170#170#170#172#172#172#174#174#174#177#177#177#178#178#178#167#167#167
+  +#152#152#152#148#148#148#146#146#146#143#143#143#140#140#140#136#136#136#133
+  +#133#133#129#129#129'~~~zzzvvvsssooolllhhheeebbb```^^^\\\ZZZXXXUUUTTTSSSQQQO'
+  +'OOMMMMMMKKKJJJIIIHHHGGGGGGGGGFFFEEEEEEEEEDDDDDDDDDCCCDDDDDDDDDDDDEEEEEEFFFF'
+  +'FFFFFGGGHHHHHHIIIIIIIIIJJJJJJJJJJJJKKKKKKJJJJJJIIIHHHHHHFFFDDDDDDBBB@@@HHH~'
+  +'~~'#177#177#177#177#177#177#171#171#171#168#168#168#165#164#165#161#161#162
+  +#158#158#158#158#158#158#157#157#157#154#154#154#151#151#150#149#148#148#145
+  +#145#144#141#141#142#138#138#139#136#136#136#132#132#132#129#129#129'~~~{{{x'
+  +'xxuttnnnjjjhgheeefffdddaaa___\\\ZZZWWWTTUSSSPPPNNMKKKJJJHGHEEEDCCBBB@@?>??<'
+  +'<<;:::::888988887666655322000//////-...-.%%%$$$######$##554>>>BBBHHHMMM/./ '
+  +#31' '#31' '#31#30#30#30#30#30#30#30#30#30#29#29#30#30#29#30#29#29#29#28#29
+  +#29#29#28#29#29#29#28#29#28#28#28#28#28#29#28#28#28#28#28#27#28#28#28#27#28
+  +#28#28#28#27#27#28#27#27#27#26#27#27#26#26#27#27#26#26#26#26#27#26#26#26#26
+  +#26#26#26#26#25#26#25#25#26#25#26#25#25#25#25#25#25#25#25#25#25#25#25#25#24
+  +#24#25#24#25#28#27#28'#$#%%%&&&''''''$%$'#24#24#25#24#24#24#24#24#23#23#24#23
+  +#23#24#24#28#28#28#28#28#28#28#28#28#27#28#27#28#28#27#26#27#27#25#25#26#26
+  +#25#25#25#25#25#25#25#25#26#26#25#25#26#26#26#25#25#25#25#25#25#25#25#25#25
+  +#25#24#24#25#25#24#25#24#24#24#24#24#23#24#24#23#24#23#23#23#22#23#23#23#22
+  +#23#22#23#22#22#22#22#22#22#22#22#22#21#22#22#21#21#22#22#21#22#23#23#23#29
+  +#28#27#29#29#28#29#29#28#28#28#28#23#23#22#21#21#21#21#21#21#21#20#20#20#20
+  +#21#21#20#20#21#20#19#20#19#19#20#18#19#20#19#19#19#18#18#18#18#18#18#18#18
+  +#18#18#18#18#18#17#17#18#17#18#17#17#15#15#15#14#14#15#14#14#15#14#14#15#14
+  ,#14#15#14#13#14#15#14#15#15#14#16#16#16#16#18#17#18#24#25#24'###(''(***../11'
+  +'1344777899;<;223'#22#22#22#10#10#10#10#10#10#10#10#10#10#9#9#10#10#10#9#10#9
+  +#9#9#9#9#9#9#8#9#8#9#8#9#8#8#8#9#8#8#8#9#9#8#8#8#8#8#8#8#7#8#8#7#8#7#8#7#20
+  +#18#20#7#7#7'000yyy000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000222555777:::<<<656////////////111999999999'
+  +'999998998988988988988988888888888888888888888888888888888888888888887887877'
+  +'877877877877877777777777777777777777777777777777777777777888887887877988988'
+  +'988988999999999:::;;;;;;;;;<<<>>>>>>???@@@@@@BBBBBBDDDEEEFFEGGFIHHJIILKKMMM'
+  +'NMMQPPRQQTSSUTTWWWYYY[[[]]]___bbbdddfffiiilllnnnqqqsssuuuxxx|||'#129#129
+  +#129#131#131#131#135#135#135#138#138#138#141#141#141#143#143#143#146#146#146
+  +#149#149#149#153#153#152#155#155#154#157#157#157#160#160#160#162#162#162#164
+  +#164#164#167#167#167#170#170#170#172#172#172#175#175#175#179#179#179#176#176
+  +#176#162#162#162#149#149#149#147#147#147#145#145#145#142#142#142#139#139#139
+  +#136#136#136#132#132#132#129#129#129'}}}zzzwwwssspppmmmjjjgggdddaaa```]]]\\\'
+  +'ZZZXXXVVVVVVTTTRRRQQQPPPOOONNNMMMLLLKKKKKKJJJJJJIIIJJJIIIIIIIIIIIIIIIIIIIII'
+  +'JJJJJJKKKKKKKKKKKKLLLLLLLLLLLLLLLMMMMMMNNNNNNMMMMMMMMMLLLJJJHHHGGGFFFDDDBBB'
+  +'CCCnnn'#165#165#165#179#179#179#172#172#173#169#169#169#166#166#167#163#163
+  +#163#160#161#161#157#157#158#153#153#154#154#153#153#153#153#153#151#151#151
+  +#148#147#147#145#144#144#142#141#141#139#138#138#135#135#135#132#132#132#128
+  +#128#128'}~}||{xxxtutqppjjjhhheeecccdddbaa___\\\ZZZWWWVVVSSSPPQNNNLLLJJJIHGF'
+  +'EEEEDCCBA@@???===;<<:::99:777877677776444221000///..--..-,-$$$#########$$$5'
+  +'55>>>AAAGGGMMM,+, '#31#31#31#30#30#30#30#30#30#29#30#30#30#30#30#30#29#29#30
+  +#29#29#29#29#29#29#29#29#29#29#29#29#29#28#28#28#28#28#28#29#28#28#29#28#28
+  +#28#28#28#27#28#28#28#27#27#27#28#27#27#27#27#27#27#27#26#27#27#26#27#27#26
+  +#27#26#26#27#26#26#26#26#26#26#26#26#25#26#26#25#25#26#25#26#25#25#26#25#25
+  +#25#25#25#25#25#25#24#25#25#25#28#28#27'$$#%%%%&&&''&$$%'#24#24#24#25#24#24
+  +#24#24#24#24#24#24#23#24#24#29#29#29#28#28#28#28#28#28#28#28#27#27#28#27#27
+  +#26#27#25#25#25#26#25#26#25#25#25#25#25#25#26#25#25#26#25#25#25#26#26#26#25
+  +#25#25#25#25#25#25#25#25#25#25#24#24#25#24#24#24#24#24#24#24#24#23#24#24#23
+  +#24#23#23#24#22#22#23#23#22#23#22#22#22#22#22#22#22#22#22#21#22#21#21#22#21
+  +#21#21#23#24#23#29#28#27#29#27#28#28#28#28#28#29#28#23#22#22#21#21#21#21#21
+  +#21#21#21#21#20#21#20#21#20#20#20#20#20#21#19#19#20#18#19#19#19#19#19#19#19
+  +#19#19#18#19#19#18#19#18#18#18#18#18#18#18#17#17#17#17#14#14#16#14#14#16#14
+  +#14#15#14#14#15#14#14#15#15#15#15#15#14#15#17#16#17#23#23#22'"#"(((***-.-111'
+  +'445787999;;:666'#29#30#29#10#10#10#11#10#10#10#10#10#10#10#10#10#10#10#10#9
+  +#9#9#10#10#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#9#8#9#8#8#8#8#9#8#9#9#8#8#8#8#8#7
+  +#8#8#8#8#8#8#20#20#20#8#7#8'000yyy000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000333555888:::<<<222/////////'
+  +'///333999999999999998998998988988988988988888888888888888888888888888888888'
+  +'888888887887887877877877877877777777777777777777777777777777777777777777888'
+  +'887887887877988988988999999999:::;;;;;;;;;<<<===>>>>>>???@@@AAABBBBBBDDDEED'
+  +'FFEGGFJIIJIILKKMMMONNQPPSRRTTTVUUWWWYYY[[[^^^___bbbdddfffiiikkknnnqqqsssuuu'
+  +'xxx{{{~~~'#128#128#128#131#131#131#134#134#134#137#137#137#139#139#139#142
+  +#142#142#146#146#146#148#148#147#150#150#150#151#151#151#154#154#154#157#157
+  +#157#159#159#159#162#162#162#165#165#165#168#168#168#171#171#171#174#174#174
+  +#177#177#177#179#179#179#175#175#175#163#163#163#148#148#148#146#146#146#144
+  +#144#144#141#141#141#139#139#139#136#136#136#133#133#133#129#129#129'{{{x'
+  +'xxuuurrrooommmiiigggdddbbb```^^^\\\[[[ZZZXXXWWWVVVUUUSSSSSSRRRQQQPPPPPPPPPO'
+  +'OOOOOPPPNNNNNNNNNNNNOOOOOONNNOOOOOOOOOOOOOOOOOOPPPQQQPPPQQQQQQPPPQQQQQQPPPO'
+  +'OONNNLLLJJJHHHFFFFFFEEEjjj'#157#157#157#180#179#180#173#173#174#171#171#171
+  +#168#167#168#165#165#165#161#161#162#158#158#158#156#155#156#153#153#153#149
+  +#150#150#150#149#149#150#150#149#146#146#146#144#143#143#141#140#140#137#137
+  +#137#135#135#134#131#131#131#128#128#129'}}}{{{xxxuuuqrrnnmhhgeeebbb```aaa__'
+  +'_]\]ZZZXXXVVVSSSQPPOOOMMNKKKIIIGGFEEDCCBA@@@@@>==<<<;;;:::87777778777756644'
+  +'3321///0//...---,,,%$$#$$######$#$545>>>AAAFFFKJK+++   '#31#31#30#30#30#31
+  +#30#30#30#30#30#30#30#30#30#30#29#30#29#29#29#29#29#29#29#29#29#29#28#29#28
+  +#29#29#28#28#29#29#29#29#29#28#28#28#28#28#28#28#28#28#28#28#27#27#28#28#27
+  +#27#27#27#27#27#27#27#26#27#27#27#26#27#27#26#27#26#26#26#26#27#26#26#26#26
+  +#26#26#25#25#26#26#25#25#25#25#25#25#26#26#25#25#25#25#25#25#25#27#27#27'##$'
+  +'$%$&&&&&''%$%'#25#25#24#25#24#25#24#24#24#24#24#24#24#23#24#29#29#29#29#29
+  ,#28#28#29#28#29#28#28#28#28#27#27#27#27#26#26#26#25#26#25#25#25#25#26#25#25
+  +#26#26#26#26#26#25#25#26#25#25#26#25#25#25#25#25#25#25#25#25#24#24#25#25#24
+  +#25#25#24#25#24#25#24#24#24#24#23#24#23#23#23#23#23#23#23#22#23#23#22#23#22
+  +#22#22#22#22#22#22#22#22#22#21#21#21#21#24#24#24#28#28#29#29#28#28#29#28#28
+  +#29#28#28#24#22#23#21#22#21#21#21#22#20#21#21#21#20#21#21#20#20#20#20#20#20
+  +#20#19#20#19#20#20#19#19#20#19#19#19#19#19#18#18#18#19#19#18#18#18#19#18#18
+  +#18#16#16#17#14#15#15#14#14#15#15#14#15#14#14#15#15#15#16#15#15#15#20#19#20
+  +' '#31' ''&''***---0004448779:9;;;999$$$'#11#11#11#11#11#11#10#10#10#11#11#11
+  +#10#11#10#10#10#10#10#10#10#10#10#10#10#10#10#9#9#9#9#10#9#9#9#9#9#9#9#8#9#9
+  +#9#9#9#8#8#8#8#8#8#8#8#8#8#9#8#8#8#8#8#8#8#7#7#8#18#18#20#8#7#7'000yyy000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000444666888:::<<<000////////////444999999999999998998998988988988988'
+  +'988888888888888888888888888888888888888888888887887877877877877877777777777'
+  +'777777777777777777777777777777777777888887887877988988988988999999999:::;;;'
+  +';;;;;;<<<===>>>??????@@@AAABBBCCCEEEFFEGGFHGGJIIJIILKKNMMONNQPPSRRTTTUUUWWW'
+  +'YYY[[[^^^___bbbdddfffiiikkkmmmqqqsssuuuxxxzzz}}}'#128#128#128#131#131#131
+  +#134#134#134#136#136#136#138#138#138#141#141#141#141#141#141#144#144#144#147
+  +#147#147#150#150#150#152#152#152#155#155#155#158#158#158#161#161#161#164#164
+  +#164#167#167#167#170#170#170#173#173#173#180#180#180#185#185#185#188#188#188
+  +#182#182#182#162#162#162#148#148#148#145#145#145#143#143#143#141#141#141#139
+  +#139#139#136#136#136#133#133#133#131#131#131'}}}zzzwwwtttrrrooommmkkkhhhf'
+  +'ffdddbbb```^^^]]][[[[[[ZZZYYYWWWVVVUUUUUUUUUUUUTTTTTTSSSSSSSSSSSSSSSSSSSSSS'
+  +'SSSSSSSSTTTUUUTTTUUUUUUUUUUUUTTTSSSSSSSSSQQQOOONNNLLLJJJHHHGGGlll'#158#158
+  +#158#180#180#180#174#174#175#171#171#171#168#168#168#166#166#166#163#163#163
+  +#160#160#160#157#158#158#154#154#154#151#151#152#148#148#149#148#148#148#148
+  +#148#148#146#146#145#143#142#142#140#139#139#137#136#136#134#134#134#131#131
+  +#131#128#128#128'}}|{zzwwwtttrrrpopllleedbaa```]]]^__^\][Z[YYXVVVSSSQQQOOOMN'
+  +'MLKLIIIGGGFFFDDCBAA@@@?>?>>=<;;;;;999888766777666555344121///../...---,,,#$'
+  +'####$$####$$$232===AAAEEEJJJ111'#31#31#31#30#31#30#30#31#31#31#30#30#30#30
+  +#30#30#30#30#30#30#30#30#30#30#30#30#29#29#29#29#29#29#29#29#29#29#29#29#28
+  +#29#29#28#28#28#28#28#28#28#28#28#28#27#28#28#28#28#28#28#27#28#27#28#28#28
+  +#27#27#27#27#27#27#27#27#27#27#26#27#26#27#26#26#26#26#26#26#26#26#26#26#26
+  +#26#26#25#25#26#25#25#25#26#25#25#25#25#24#25#25#28#29#29'$#$%$$''&&''''''##'
+  +'#'#25#24#25#24#24#25#24#25#24#24#24#24#24#24#24#29#29#29#28#29#28#28#28#28
+  +#28#29#28#28#28#27#26#27#26#26#26#25#26#26#26#25#26#26#25#25#25#26#26#26#26
+  +#26#26#26#25#26#26#25#25#26#26#25#26#25#25#25#26#25#25#24#25#24#25#25#25#25
+  +#24#25#25#25#25#24#24#24#24#23#24#23#23#24#23#23#24#22#23#23#23#22#23#22#22
+  +#22#22#22#22#22#22#22#22#22#24#24#23#28#28#28#28#28#28#29#28#28#28#28#28#23
+  +#22#23#21#22#21#22#21#21#21#22#21#21#21#21#21#21#21#21#20#20#20#20#19#20#19
+  +#20#20#19#20#20#19#19#19#18#19#19#19#19#18#19#19#18#18#18#18#18#18#16#17#17
+  +#15#15#15#15#14#15#14#15#16#14#14#16#17#17#17#27#27#28'$$$''''''+*+/..222776'
+  +'899;<<<<=('''''#15#14#14#11#11#11#11#11#11#11#11#11#11#11#11#11#10#11#10#11
+  +#11#11#10#10#10#10#10#10#9#10#9#10#10#10#10#10#9#9#10#9#10#9#9#9#9#9#9#9#9#9
+  +#9#9#9#9#8#9#8#8#9#9#8#9#8#9#8#8#8#8#8#8#8#8#20#20#20#7#8#8'000yyy0000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000444666888:::===...////////////7669999999999999999989989889889889889888'
+  +'888888888888888888888888888888888888888888878878878778778778778777777777777'
+  +'77777777777777777777777777777777888887887877877988988988888999999999:::;;;;'
+  +';;;;;<<<===>>>???@@@@@@BBBBBBCCCEEDFFEGFFHGGJIIKJJLKKNMMONNQPPSRRTTTUUUWWWY'
+  +'YY[[[^^^___bbbdddfffiiikkkmmmppprrruuuxxxzzz|||'#130#130#130#132#132#132
+  +#135#135#135#136#136#136#137#137#137#140#140#140#142#142#142#145#145#145#148
+  +#148#148#151#151#151#154#154#154#157#157#157#160#160#160#164#164#164#171#171
+  +#171#177#177#177#180#180#180#182#182#182#186#186#186#189#189#189#191#191#191
+  +#183#183#183#165#165#165#149#149#149#145#145#145#142#142#142#140#140#140#138
+  +#138#138#136#136#136#133#133#133#131#131#131#129#129#129'|||zzzwwwtttsssp'
+  +'ppooollljjjiiifffeeecccbbb``````___^^^\\\\\\[[[[[[ZZZZZZZZZZZZYYYYYYYYYYYYY'
+  +'YYYYYZZZZZZZZZZZZZZZYYYXXXXXXXXXWWWVVVTTTSSSQQQOOOLLLJJJPPPsss'#159#159#158
+  +#181#180#181#176#176#176#171#171#171#168#168#168#166#166#166#163#163#163#161
+  +#161#161#158#158#158#156#156#156#153#152#153#150#150#150#149#149#149#148#148
+  +#148#148#148#148#144#144#144#142#142#141#139#139#139#136#135#136#134#133#134
+  ,#130#130#130#128'|||yzywwwttusrsooolllhhhbba`__]\\[[[\\\[[[YXYWWVTSSQQQOOO'
+  +'NNNLLLJIJHHGFFFDDDCCCAA@@@>>>=<;;<;;:99888777656777765444333111//....--.,,,'
+  +'+*+%%%$#$##$#$##$#///:::???DDDIII666'#31#31#31#31#31#31#31#31#30#30#30#31#30
+  +#30#30#30#30#30#29#30#30#30#30#30#29#29#30#29#29#30#29#29#29#29#29#29#29#29
+  +#29#29#29#28#29#29#28#28#28#29#28#28#28#28#28#28#28#27#28#27#28#27#27#28#27
+  +#27#28#28#27#27#27#27#27#27#27#27#27#26#27#27#26#26#27#26#26#26#26#26#26#26
+  +#26#26#26#26#25#26#26#26#26#25#26#26#25#26#25#25#25#30#30#29'$#$%%$''&&''''('
+  +'   '#24#25#25#25#25#25#25#24#24#24#24#25#25#25#26#29#29#29#29#28#28#29#28#29
+  +#29#29#28#29#28#27#27#27#27#26#26#26#26#26#25#26#25#25#25#25#26#26#26#26#26
+  +#26#26#26#26#26#26#25#25#25#26#25#25#26#26#25#25#25#25#25#25#25#24#25#25#25
+  +#25#25#25#24#24#24#24#24#24#24#24#24#23#24#24#23#24#23#23#24#22#22#23#22#22
+  +#23#22#22#22#22#22#22#22#22#24#24#24#28#29#28#28#28#28#29#28#28#29#28#28#24
+  +#23#23#22#22#22#22#21#22#22#21#21#21#21#21#21#21#21#20#20#20#21#20#20#21#20
+  +#19#20#19#19#20#19#19#19#18#19#19#19#18#18#19#18#19#19#18#18#18#18#17#17#18
+  +#15#15#16#15#15#16#15#14#16#15#15#15#21#20#21'###&&&***/00444889<<<>>>/./'#18
+  +#18#18#12#12#11#12#12#12#12#11#11#11#11#11#11#11#11#11#10#10#11#10#10#10#10
+  +#10#11#11#10#10#10#10#10#10#10#10#10#10#9#9#10#10#9#10#9#10#10#10#9#9#9#9#9#9
+  +#9#9#9#9#9#8#8#8#8#8#8#8#8#8#8#8#8#8#9#8#8#8#8#20#20#20#8#8#8'000yyy00000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0000111444666999;;;999...////////////77799999999999999999899899898898898898'
+  +'898888888888888888888888888888888888888888888788788787787787787787777777777'
+  +'7777777777777777777777777777777777777887887887877988988988988999999999:::;;'
+  +';;;;;;;<<<===>>>>>>???@@@@@@BBBBBBCCBEEDFFEGFFHGGJIIKJJLKKNMMPOOQPPSRRTTTUU'
+  +'UXXXYYY[[[^^^___bbbdddfffhhhjjjmmmooorrruuuwwwyyy|||'#129#129#129#131#131
+  +#131#132#132#132#133#133#133#136#136#136#138#138#138#142#142#142#144#144#144
+  +#147#147#147#151#151#151#154#154#154#162#162#162#168#168#168#171#171#171#174
+  +#174#174#177#177#177#180#180#180#184#184#184#186#186#186#188#188#188#190#190
+  +#190#188#188#188#179#179#179#166#166#166#152#152#152#144#144#144#142#142#142
+  +#140#140#140#138#138#138#136#136#136#134#134#134#132#132#132#130#130#130''
+  +'}}}{{{yyyxxxvvvtttrrrpppooommmllljjjiiihhhgggeeeeeedddcccccccccbbbaaaaaaaaa'
+  +'``````_______________^^^^^^]]]\\\[[[YYYYYYXXXVVVTTTRRRPPPNNN```'#133#133#133
+  +#170#170#170#182#182#182#176#176#176#171#171#171#169#169#168#166#166#166#163
+  +#164#163#161#161#161#158#158#158#156#156#156#153#154#154#151#151#151#149#149
+  +#150#150#150#150#150#150#149#146#147#147#144#144#144#141#141#140#138#138#138
+  +#135#134#134#133#131#132#130#129#129'}|}zzzwwwtttqqroookkkijifff___\\\[[Z'
+  +'XWXYYXZZYWWWTSTSSSPOONONLLLJJJHIIGFGDDECCCABA@@@?>><<<<<<::9988877666666655'
+  +'544644333222///.....--,,+++&&&$$$$#$"##$$#---999>>>BBBFFF;;;  '#31#31#31#31
+  +#31#31#31#30#31#30#30#30#30#30#30#31#30#30#30#30#30#30#30#30#29#30#30#30#29
+  +#30#29#30#29#30#29#29#29#29#29#28#29#29#29#29#28#29#28#28#29#28#28#29#28#28
+  +#28#28#28#28#27#28#28#28#27#28#27#27#27#27#27#28#27#27#27#27#27#27#26#27#27
+  +#27#26#27#26#26#26#26#26#26#26#26#26#26#26#26#26#26#26#25#26#25#25#25#25'   '
+  +'$$$%%%''''&((('#30#30#31#25#25#25#25#25#25#25#24#25#25#25#25#26#25#25#30#29
+  +#29#29#29#29#29#29#29#29#29#28#28#28#28#28#28#27#27#26#26#26#26#26#25#26#26
+  +#26#26#26#26#26#26#27#27#26#26#26#26#26#26#26#26#26#26#25#26#26#25#25#25#25
+  +#25#26#25#25#25#25#25#25#24#25#25#24#25#24#24#24#25#25#24#24#24#24#23#23#23
+  +#23#24#23#23#23#22#22#23#22#22#23#22#22#22#22#22#24#23#24#29#29#29#28#28#29
+  +#28#28#28#28#28#28#24#23#22#22#21#22#22#22#22#21#21#21#21#21#21#21#21#21#21
+  +#21#21#21#20#20#21#19#19#20#19#19#20#20#20#20#20#19#19#19#19#18#19#19#19#19
+  +#18#19#19#18#18#17#17#15#16#17#15#15#16#15#15#15#15#16#17#21#21#21'%%%)*)...'
+  +'444:::==>333'#25#26#25#12#12#12#12#12#12#11#11#12#11#11#12#11#11#11#11#11#11
+  +#11#11#11#11#11#11#11#11#10#11#11#11#11#11#11#11#10#10#10#10#10#10#10#10#9#10
+  +#10#9#9#10#10#9#10#10#9#10#9#9#9#9#9#9#9#9#9#9#9#9#8#8#9#9#9#9#8#8#8#9#9#8#8
+  +#8#9#20#20#20#8#8#8'000yyy00000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0000000000000000000000000000000000000222555777999;;;888...////////////99999'
+  +'999999999999999999899898898898898898888888888888888888888888888888888888888'
+  +'888888788787787787787787777777777777777777777777777777777777777777777788888'
+  +'7887877877988988988888999999999:::;;;;;;;;;<<<===>>>>>>???@@@AAABBBBBBDDCEE'
+  +'DFEEGFFIHHJIIKJJMLLNMMPOOQPPRRRTTTUUUWWWYYY[[[]]]___bbbcccfffhhhjjjmmmoooqq'
+  +'qtttvvvxxx{{{}}}'#128#128#128#128#128#128#129#129#129#132#132#132#135#135
+  +#135#137#137#137#140#140#140#146#146#146#152#152#152#158#158#158#162#162#162
+  ,#165#165#165#169#169#169#173#173#173#176#176#176#179#179#179#182#182#182#184
+  +#184#184#184#184#184#177#177#177#174#174#174#177#177#177#179#179#179#180#180
+  +#180#172#172#172#161#161#161#148#148#148#142#142#142#140#140#140#138#138#138
+  +#136#136#136#134#134#134#132#132#132#131#131#131#129#129#129'~~~}}}{{{yyyxxx'
+  +'vvvtttsssrrrpppooonnnllllllkkkjjjiiihhhhhhgggfffeeeeeeeeeddddddcccbbbbbbaaa'
+  +'```______]]]\\\[[[YYYXXXVVVTTT\\\xxx'#153#153#153#181#181#181#182#182#182
+  +#177#177#177#171#171#171#169#169#169#166#166#166#163#164#164#162#162#162#159
+  +#159#159#157#157#157#154#154#155#151#151#151#149#149#149#150#150#149#149#150
+  +#149#147#147#147#145#144#145#143#142#143#140#140#140#137#137#137#134#134#134
+  +#132#132#131#129#129#129'~~{{{yxxvvvsssqqqooolkljiigggddd\\\ZZYXXWVUUVVVWWW'
+  +'UUTRSQQPOONNMLMJJJIIIGGGFFFDDDBAAAAA???>>><<<<<;998888777766555544655443433'
+  +'211///...--,,++,++''''($$$$#$"##$$#())888===AAAEEEDDD'#31#31#31#31' '#31#31
+  +#31#31#30#31#31#31#31#31#30#30#30#30#30#30#30#30#30#30#30#30#30#30#29#29#30
+  +#30#29#30#29#30#29#30#29#29#29#29#29#29#28#29#28#28#28#29#28#28#29#29#28#28
+  +#28#28#28#28#28#27#28#27#28#27#27#28#27#28#27#27#27#27#27#27#27#27#26#27#27
+  +#26#27#26#26#26#26#26#26#26#26#26#26#26#26#25#26#26#26#26#26#25#26#26'##"$$$'
+  +'&&&&''&(()'#27#28#27#25#25#25#25#25#25#25#25#25#24#25#25#27#26#27#29#29#30
+  +#29#29#29#29#29#29#29#29#28#28#29#28#28#28#27#27#26#27#26#26#27#26#26#26#27
+  +#27#27#27#26#26#26#27#26#26#26#27#26#26#26#26#26#26#26#26#26#26#25#26#25#25
+  +#25#25#26#25#25#25#25#24#24#24#25#24#25#25#25#24#25#25#24#24#24#24#24#24#23
+  +#24#24#23#23#23#23#24#22#22#23#22#22#23#22#22#25#24#24#29#29#29#29#29#29#28
+  +#28#29#29#28#29#24#23#23#22#22#22#22#22#22#21#22#21#21#22#22#22#21#21#21#21
+  +#21#21#20#20#21#20#20#21#20#19#20#19#20#20#19#19#19#19#19#19#19#19#19#19#19
+  +#18#19#19#17#17#18#16#15#16#15#15#16#15#15#16#16#16#17#24#24#24'''''(+,,1218'
+  +'88;;; !!'#13#13#12#12#12#12#13#12#12#12#12#12#12#11#11#12#11#11#12#12#11#12
+  +#12#11#11#11#11#11#11#11#11#11#11#11#11#10#11#11#10#11#11#11#11#10#10#10#10
+  +#10#11#10#10#10#10#10#9#10#10#10#9#10#9#9#9#9#9#9#9#9#9#9#9#9#9#9#8#9#9#9#9#9
+  +#9#9#8#9#9#8#8#20#20#20#8#8#8'000yyy0000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000000222555777999<<<656//////////'
+  +'//1119999999999999999999999989989889889889889889888888888888888888888888888'
+  +'888888888888888878878878778778778778777777777777777777777777777777777777777'
+  +'77777777887887887877877988988888888999999999:::;;;;;;;;;<<<===>>>??????@@@A'
+  +'AABBBBBBDDCEDDFEEGFFIHHJIIKJJMLLNMMPOOQPPRRRTTTUUUWWWYYY[[[]]]___aaaccceeeg'
+  +'ggjjjlllnnnqqqsssuuuxxxzzz||||||}}}'#128#128#128#130#130#130#133#133#133#140
+  +#140#141#149#149#149#153#153#153#156#156#156#160#160#160#164#164#164#168#168
+  +#168#171#171#171#174#174#174#177#177#177#178#178#178#170#170#170#165#165#165
+  +#167#167#167#169#169#169#172#172#172#173#173#173#176#176#176#177#177#177#179
+  +#179#179#179#179#179#171#171#171#160#160#160#146#146#146#139#139#139#138#138
+  +#138#136#136#136#134#134#134#133#133#133#131#131#131#129#129#129'~~~|||{{'
+  +'{yyywwwvvvtttrrrrrrpppooonnnmmmlllkkkjjjjjjiiihhhhhhggggggfffeeedddccccccbb'
+  +'b```______]]][[[YYYbbb|||'#151#151#151#177#177#177#182#183#183#181#181#181
+  +#177#177#177#171#170#171#169#169#169#166#167#166#164#165#164#161#161#161#159
+  +#159#158#157#157#157#155#155#155#152#152#152#149#149#149#150#150#150#151#150
+  +#150#148#148#148#145#146#146#143#143#143#141#141#141#139#138#139#135#135#135
+  +#133#133#133#130#130#130''#128'}}}zzzxwxvuvssspppnnnkkkihifgfccdaaaZZZWWWV'
+  +'VVSRSTTTUUUSSRQQPOOOMLMKKKJIJGHGFFFDDDABBAAA@???>><<<<<;999:998778766655444'
+  +'44545443432222/..---,++,++,++)(($$$#####"######778:::???AAAEEE&'''' '#31' '
+  +#31#31#31#31#31#31#31#30#31#30#31#31#30#31#30#30#30#31#30#30#30#30#30#30#29
+  +#30#29#29#30#30#29#30#29#30#29#30#29#29#29#29#29#29#29#29#29#28#29#29#29#28
+  +#29#28#28#28#28#28#28#28#28#28#27#28#27#28#28#27#27#28#27#28#27#28#27#27#27
+  +#27#26#27#27#26#27#26#26#26#26#26#26#26#26#26#26#26#26#25#26#26#28#28#28'##$'
+  +'$%$&&&(''''''(('#25#25#25#26#25#25#25#25#25#25#25#25#25#25#25#28#27#28#30#29
+  +#29#29#30#29#29#29#29#29#29#29#29#28#28#28#28#27#27#26#26#26#26#27#26#26#26
+  +#27#27#27#27#27#27#27#27#26#26#26#27#26#27#26#26#27#26#26#26#26#26#25#26#26
+  +#25#25#25#25#25#26#25#25#25#25#25#25#25#24#25#24#24#24#24#25#25#24#24#25#24
+  +#24#24#24#23#24#24#23#24#23#23#23#22#23#23#23#22#26#26#25#29#28#29#29#29#28
+  +#28#28#29#28#28#28#23#22#22#22#22#23#22#22#22#22#22#21#22#22#21#21#21#21#22
+  +#21#21#21#20#20#21#20#20#21#20#19#20#19#19#20#19#19#20#19#19#19#19#19#19#19
+  +#19#19#19#19#17#18#18#16#16#17#15#15#16#15#15#16#16#16#17#23#24#24'))*../445'
+  +';;;333'#13#12#13#12#12#13#12#12#12#12#12#13#12#13#12#12#12#12#12#12#12#12#12
+  +#12#12#11#12#12#12#11#12#11#11#11#11#11#10#11#11#11#11#11#11#10#11#10#11#11
+  +#10#10#10#10#10#10#10#10#10#9#10#10#10#10#10#10#10#10#9#10#9#10#9#9#10#9#9#9
+  ,#9#9#8#9#9#9#9#8#8#8#8#8#8#9#22#20#22#8#9#8'000yyy00000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0000000000000000000000000000000000000000000000000000000000000333555777:::<<'
+  +'<333////////////22299999999999999999999999899899898898898898898888888888888'
+  +'888888888888888888888888888888788788787787787787787777777777777777777765522'
+  +'2444666777777777777777887887887877877988988988888999999999::::::;;;;;;;;;<<'
+  +'<===>>>??????@@@AAABBBBBBDDCEDDFEEGFFIHHJIIKJJMLLNMMPOOPPPRRRTTTUUUWWWYYY[['
+  +'[]]]___aaabbbeeegggjjjlllmmmppprrruuuwwwyyyxxxzzz}}}'#130#130#130#138#138
+  +#138#146#146#146#150#150#150#155#155#155#159#159#159#163#163#163#167#167#167
+  +#170#170#170#170#170#170#164#164#164#157#157#157#158#158#158#160#160#160#162
+  +#162#162#165#165#165#167#167#167#169#169#169#170#170#170#172#172#172#174#174
+  +#174#176#176#176#177#177#177#180#180#180#183#183#183#175#175#175#163#163#163
+  +#151#151#151#140#140#140#136#136#136#134#134#134#133#133#133#132#132#132#130
+  +#130#130#129#129#129'}}}|||yyyxxxvvvuuutttrrrqqqqqqpppnnnnnnmmmllllllkkkj'
+  +'jjiiiiiihhhgggeeedddcccaaa```dddttt'#138#138#138#159#159#159#179#179#179#182
+  +#182#182#181#181#181#180#180#180#176#176#176#170#170#170#167#167#167#167#167
+  +#166#164#165#164#161#161#162#160#159#159#156#156#156#155#155#155#152#152#152
+  +#150#149#150#149#150#150#151#151#151#149#149#149#147#147#147#144#144#144#142
+  +#142#142#139#139#139#137#137#137#134#135#135#132#132#132#129#130#129'~}}|z'
+  +'zzxwwvuurrrpoommmkkkiiifggcddabb___XXWUUUSSSQQQQRQSSSQQQOOONNMLLKKJJHGHFFFD'
+  +'EDBBBAAA@?@>?><<<=<<:;::::887776665554433333444444343211..----,,,+,,+,+***$'
+  +'$$######"!"###000:9:===@@@CCC666'#31'  '#31#31' '#31#31#31#31#31#30#30#31#31
+  +#30#31#30#31#31#31#30#31#30#30#30#30#30#30#30#30#30#30#29#29#30#30#29#30#30
+  +#29#30#29#29#29#28#29#29#29#28#28#28#29#28#28#29#28#28#28#28#28#28#28#28#28
+  +#28#28#27#28#27#27#27#28#27#28#27#27#28#27#27#27#27#26#27#27#27#26#27#27#26
+  +#26#27#26#26#27#26#26#26#26#31#31#31'$$#%&%(''(()(%%%'#26#25#25#26#25#26#25
+  +#25#25#25#25#25#25#25#25#29#29#29#30#30#30#29#30#29#29#29#30#29#29#29#29#28
+  +#28#28#27#27#28#26#27#27#26#27#27#26#26#28#27#27#26#27#27#27#27#27#27#27#27
+  +#27#27#26#26#26#27#26#26#26#26#26#26#26#26#25#26#26#26#25#25#25#25#25#25#25
+  +#24#25#25#24#25#25#25#25#24#24#24#24#24#24#24#24#24#24#24#23#24#24#23#24#23
+  +#23#23#23#23#26#26#25#30#30#29#29#29#29#28#29#29#29#29#28#23#22#22#22#22#22
+  +#22#22#22#22#22#22#22#21#22#22#21#21#21#21#21#21#21#21#21#20#20#21#19#20#21
+  +#20#19#20#20#20#20#20#20#19#19#19#19#19#19#18#18#19#16#17#17#16#16#16#16#15
+  +#16#15#15#16#16#16#18#27#28#28'+*+211666>?>...'#13#13#13#13#13#13#13#12#13#13
+  +#12#13#13#12#12#12#13#12#12#12#12#12#11#12#11#12#12#12#12#12#11#11#12#11#11
+  +#11#11#11#11#10#11#11#10#11#11#11#11#11#11#11#11#11#10#10#10#10#10#10#10#10
+  +#10#10#10#10#10#10#10#10#9#9#9#10#9#9#9#9#9#9#9#9#9#8#9#9#9#9#8#8#8#9#20#22
+  +#20#8#8#8'000yyy000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000444666888:::<<<111////////////444999999999999999'
+  +'999999999998998988988988988988888888888888888888888888888888888888888888887'
+  +'887877877877877877777777777777777776000////////////111333444555777887887877'
+  +'877877988988888888999999999:::;;;;;;;;;;;;===>>>>>>??????@@@AAABBBCCBDCCEDD'
+  +'FEEGFFIHHJIILKKMLLNMMOOOPPPRRRTTTUUUWWWYYY[[[\\\___```bbbeeefffiiikkkmmmooo'
+  +'qqqtttuuutttvvvyyy{{{~~~'#138#138#138#144#144#144#148#148#148#153#153#153
+  +#158#158#158#162#162#162#163#163#163#156#156#156#148#148#148#149#149#149#151
+  +#151#151#153#153#153#155#155#155#157#157#157#160#160#160#161#161#161#164#164
+  +#164#165#165#165#167#167#167#169#169#169#171#171#171#173#173#173#174#174#174
+  +#176#176#176#178#178#178#182#182#182#185#185#185#182#182#182#173#173#173#164
+  +#164#164#154#153#154#143#143#143#135#135#135#132#132#132#129#129#129#128#128
+  +#128'}}}|||zzzxxxwwwvvvtttssssssqqqpppoooooonnnmmmlllkkkiiiiiihhhkkkttt'
+  +#131#131#131#144#144#144#161#161#161#176#176#176#183#183#183#182#182#182#181
+  +#181#181#180#180#180#178#178#178#175#175#175#170#170#170#166#166#166#165#165
+  +#165#163#163#163#162#162#161#159#158#159#156#156#157#154#154#154#152#152#152
+  +#150#150#150#149#149#149#151#151#150#150#149#149#147#147#147#145#144#145#143
+  +#143#143#140#140#140#138#138#138#136#136#136#133#133#133#131#131#131#128#128
+  +#128'~~}|{{yyxvvvtssrrrooomlmkkjhihfffcccbbb___\]\WWWRRRQQQOONNNNRQRPPONNNKK'
+  +'JKKJIIHFFFFEECBBAAB@@@???===<<<;<;;::989888666664444443322444343434232/./--'
+  +',,,,+,,*+++++##$###"""!!"###++,8999:9===@@@@@@"!" '#31' '#31#31' '#31#31#31
+  +#31#31#31#30#30#31#31#30#31#30#31#30#30#30#30#30#30#31#30#30#30#29#30#30#30
+  +#30#30#29#29#30#29#29#30#29#29#29#29#28#29#28#29#29#28#28#29#29#28#28#28#28
+  +#28#28#28#28#28#28#28#28#27#28#27#28#27#27#27#27#28#28#27#27#27#27#27#27#27
+  ,#27#26#26#27#26#27#27#27#26#27#27#27'$$$$$$&&&''('')))'#31#31#31#26#25#26#26
+  +#25#26#25#25#26#25#25#25#25#25#25#30#30#30#30#30#30#29#30#30#29#30#29#29#30
+  +#29#28#28#28#28#28#28#28#27#27#28#26#27#27#27#27#27#27#27#28#27#28#27#27#27
+  +#26#27#27#27#27#26#26#27#27#26#27#26#26#26#26#26#26#26#26#25#25#25#25#26#25
+  +#25#25#26#25#25#25#25#25#25#25#25#24#25#25#25#24#24#24#24#24#24#24#24#24#24
+  +#23#23#24#23#24#23#23#28#28#27#29#29#29#29#29#29#29#29#29#28#27#28#23#23#23
+  +#22#22#23#22#22#22#22#23#22#21#22#22#21#21#21#21#21#21#21#21#21#21#20#20#21
+  +#20#20#21#20#20#20#20#20#20#20#20#19#20#20#19#19#19#19#19#19#17#17#17#16#16
+  +#17#16#15#17#15#16#17#16#17#17#29#29#29',,+211989???(()'#13#13#13#13#13#13#13
+  +#13#13#12#13#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12
+  +#11#11#12#11#11#11#11#11#11#11#11#11#11#11#11#10#10#10#10#10#10#10#10#10#11
+  +#10#10#10#10#10#10#10#10#10#9#10#10#9#9#10#9#10#10#9#9#9#9#10#9#9#9#9#8#9#9#9
+  +#9#9#22#20#20#9#8#8'000yyy00000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0000000000000000000000000000000000000444666888:::===...////////////55599999'
+  +'999999999999999999999899899898898898898898888888888888888888888888888888888'
+  +'8888888887887887877877877877877777777777777000/////////////////////////////'
+  +'/111222444444655655888888888888999999999:::;;;;;;;;;<<<===>>>>>>???@@@@@@BB'
+  +'ABBBCBBDCCEDDFEEGFFIHHJIIKJJMLLNMMOOOPPPRRRTTTTTTWWWXXXZZZ\\\^^^```bbbdddff'
+  +'fhhhjjjlllnnnqqqsssqqqsssuuuxxx{{{'#135#135#135#142#142#142#147#147#147#151
+  +#151#151#156#156#156#149#149#149#140#140#140#140#140#140#143#143#143#144#144
+  +#144#147#147#147#148#148#148#150#150#150#153#153#153#155#155#155#157#157#157
+  +#158#158#158#161#161#161#162#162#162#164#164#164#165#165#165#167#167#167#169
+  +#169#169#170#170#170#172#172#172#173#173#173#175#175#175#180#180#180#183#183
+  +#183#184#184#184#184#184#184#185#185#185#182#182#182#175#175#174#167#167#167
+  +#160#160#160#154#154#154#147#147#147#140#140#140#134#134#134#129#129#129'|||'
+  +'{{{zzzxxxwwwvvvvvvtttyyy}}}'#130#130#130#136#136#136#145#145#145#152#152#152
+  +#160#160#160#168#168#168#174#173#174#181#181#181#183#183#183#182#182#182#180
+  +#181#180#180#180#180#178#178#178#177#177#177#176#176#176#174#173#174#169#169
+  +#169#165#164#164#164#164#163#162#162#162#160#159#160#158#157#158#156#156#155
+  +#154#154#154#152#153#152#149#149#150#148#148#149#150#150#150#150#149#149#148
+  +#147#147#146#146#146#143#143#143#140#140#140#138#138#138#136#136#136#133#133
+  +#134#132#132#132#129#129#129'}}}zz{yxxvvuttsrqqonomlljjjgggeeecccaaa___]]'
+  +'][Z[TTTQQPONNMMMLLLPPONNOKKKKKKIIHGFFFEDCCBCABA@@@@@======<<<:;:99998888966'
+  +'6454554433422533444333221...-,--,-++++++++*''''&"""""""""###%%%544777;;;>>>'
+  +'@@@222  '#31#31#31'   '#31' '#31#31#31#31#31#31#30#31#30#30#31#30#30#30#30
+  +#30#31#30#30#30#30#30#30#30#30#30#29#29#29#30#30#29#29#29#30#29#29#29#29#29
+  +#29#29#29#29#29#28#28#28#29#29#28#28#28#28#28#28#28#28#28#28#27#27#27#28#28
+  +#27#27#27#27#27#27#27#27#27#27#27#27#27#26#27#27#27#26#31#31#31'$$%%%%&''''('
+  +'((((('#26#25#26#26#25#26#26#25#25#26#25#26#26#25#25#28#27#28#30#30#30#30#30
+  +#30#29#29#30#30#30#29#30#30#29#28#29#28#28#28#28#28#28#28#27#27#27#27#28#27
+  +#28#27#27#27#27#27#27#27#28#27#27#27#26#27#27#27#27#27#27#26#27#26#26#26#26
+  +#26#26#26#26#25#26#26#25#26#25#25#25#25#26#25#25#25#25#25#25#25#25#25#24#25
+  +#25#25#24#24#24#25#24#24#24#24#24#24#23#24#24#23#27#27#27#29#29#28#29#29#28
+  +#29#29#29#27#27#27#23#22#22#22#22#23#22#23#22#22#22#22#22#22#22#22#22#22#22
+  +#21#21#21#21#21#22#20#20#21#20#20#21#20#20#21#20#20#20#19#20#20#20#19#19#19
+  +#19#19#19#19#18#18#17#15#16#16#16#15#17#16#15#17#17#17#18#30#30#30',,,222989'
+  +'???(''('#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#13#12#12#12#12#12
+  +#12#12#12#12#12#12#12#12#11#12#12#12#12#12#11#12#12#11#11#11#11#11#11#11#11
+  +#11#11#11#11#10#10#10#10#11#11#10#10#10#10#10#10#10#10#10#10#10#10#10#10#10
+  +#10#10#9#10#9#9#9#9#10#9#9#9#9#9#9#9#9#8#22#22#20#8#9#9'000yyy00000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000011144'
+  +'4666999;;;:::...////////////77699999999999999999999999999899899898898898898'
+  +'898888888888888888888888888888888888888888888888788787787787787787777777777'
+  +'7111////////////////////////////////////00000000000000011111111122244444444'
+  +'4999:::;;;;;;;;;<<<===>>>>>>???@@@@@@BBABBBCBBEDDEDDFEEGFFIHHJIIKJJMLLMMMNN'
+  +'NPPPRRRSSSTTTWWWXXXZZZ[[[^^^___bbbccceeegggjjjkkkmmmnnnmmmpppqqqtttwww'#133
+  +#133#133#140#140#140#144#144#144#150#150#150#154#154#154#136#136#136#133#133
+  +#133#136#136#136#138#138#138#140#140#140#142#142#142#144#144#144#146#146#146
+  +#148#148#148#150#150#150#152#152#152#153#153#153#155#155#155#157#157#157#159
+  +#159#159#161#161#161#162#162#162#164#164#164#165#165#165#167#167#167#168#168
+  ,#168#169#169#169#171#171#171#173#173#173#177#177#177#180#180#180#181#181#181
+  +#182#182#182#182#182#182#183#183#183#184#184#184#184#184#184#186#185#186#185
+  +#185#186#186#185#185#183#183#183#181#181#181#181#181#181#181#181#181#180#181
+  +#181#181#181#181#181#181#181#182#182#182#187#187#187#189#189#190#191#191#190
+  +#191#191#191#192#192#192#192#192#192#191#191#191#183#184#184#176#176#176#176
+  +#176#176#177#177#177#177#177#178#177#177#177#175#175#175#175#174#174#173#173
+  +#173#172#172#172#168#167#168#163#162#163#162#162#162#160#160#160#158#158#158
+  +#157#157#157#155#155#155#153#153#153#150#151#151#149#149#148#148#148#148#149
+  +#148#149#149#150#149#147#147#147#146#145#145#144#143#143#141#141#141#138#138
+  +#138#136#136#136#135#134#135#132#132#132#131#131#131#128#128#128'~~~|||yyyww'
+  +'vuutsrrpponnnlkkjiigggfedcbc`a`___\\\[Z[WWXSSSNNOMMMJJJHHHOONKLKJJKIIJGHGGF'
+  +'EDDCBCABA@A??>===>=<<<;;;:::9999986675555554333432214333332221111/0--,-,-++'
+  +',+++++*())""""""""""""##",,-776888;;;===>>>&&% '#31' '#31#31#31' '#31#31#31
+  +#31#31#31#31#30#30#31#31#30#30#31#31#31#30#30#30#30#30#30#30#30#30#30#29#30
+  +#30#30#30#30#29#30#30#29#29#30#29#29#29#29#29#29#29#29#28#28#28#28#29#28#29
+  +#28#28#28#28#28#28#27#28#28#27#28#28#27#28#28#27#28#28#28#27#27#26#27#27#27
+  +#26#26#28#28#29'$$$%%%&&&(''()))!"!'#26#25#26#26#25#27#26#25#26#26#25#26#25
+  +#25#26#28#28#28#31#30#30#30#30#30#30#30#30#29#30#30#30#29#30#28#28#29#28#28
+  +#28#28#29#28#28#28#28#28#27#28#28#27#28#28#27#28#27#27#27#27#27#27#27#27#27
+  +#27#27#27#26#27#27#26#26#27#26#27#26#26#25#26#26#26#26#26#25#25#25#26#26#26
+  +#26#25#25#25#25#25#25#25#25#25#25#25#25#25#24#25#25#24#24#25#24#24#24#24#24
+  +#23#29#29#29#29#29#29#30#30#28#29#29#28#27#26#26#22#23#23#23#22#23#22#23#23
+  +#23#22#23#22#22#22#22#22#22#22#22#22#21#21#21#22#21#21#21#20#21#21#20#20#21
+  +#20#20#20#19#20#20#20#20#20#19#19#19#19#19#16#16#17#16#16#17#15#16#16#15#16
+  +#16#17#17#19'###--,222999?>?'#30#30#30#13#14#13#14#13#13#13#13#13#13#13#13#13
+  +#13#13#13#12#13#12#12#13#13#12#13#12#13#12#12#12#12#11#12#12#12#11#11#12#11
+  +#12#11#11#12#11#11#12#11#11#11#11#11#11#11#11#11#10#11#11#10#10#10#10#10#10
+  +#10#11#10#10#10#10#10#10#10#10#10#9#10#10#10#9#9#9#9#9#9#9#9#9#8#9#9#22#22#22
+  +#8#9#9'000yyy000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000222444777999;;;:::...////////////999999999999999999999'
+  +'999999999998998988988988988988888888888888888888888888888888888888888888887'
+  +'887877877877877877877777222//////////////////////////////////////////000000'
+  +'000000000111111111111222222666::::::;;;;;;;;;<<<===>>>>>>???@@@@@?BBABBBCBB'
+  +'EDDEDDFEEGFFIHHJIIKJJKKKMMMNNNPPPQQQSSSTTTVVVXXXYYY[[[]]]___```bbbeeefffiii'
+  +'jjjjjjjjjlllooopppsss'#132#132#132#136#136#136#142#142#142#148#148#148#153
+  +#153#153#128#128#128#130#130#130#132#132#132#133#133#133#136#136#136#138#138
+  +#138#140#140#140#141#141#141#143#143#143#145#145#145#148#148#148#148#148#148
+  +#150#150#150#153#153#153#154#154#154#156#156#156#157#157#157#159#159#159#160
+  +#160#160#162#162#162#163#163#163#165#165#165#165#165#165#167#167#167#168#168
+  +#168#169#169#169#173#173#173#177#177#177#178#178#178#178#178#178#178#178#178
+  +#179#179#179#180#180#180#180#180#180#181#181#181#181#181#181#181#181#181#177
+  +#177#178#176#176#176#176#176#176#177#177#176#178#178#178#182#183#183#185#185
+  +#185#187#186#186#188#188#187#188#189#188#190#190#190#189#189#189#180#180#180
+  +#171#171#171#171#171#171#170#170#170#170#171#171#171#172#171#171#171#171#170
+  +#170#170#169#169#169#168#168#168#161#161#161#160#160#160#157#158#158#157#157
+  +#157#155#155#155#153#153#154#152#152#152#151#150#150#148#148#148#146#146#146
+  +#148#148#148#148#148#148#147#147#146#145#145#144#144#143#142#141#141#141#139
+  +#139#138#137#136#136#135#135#135#133#133#133#131#131#130#128#128#129'~~|||y'
+  +'yyxxxuuutttrrrppomnmjjjihhgggecdcbb``_]^][[[ZZZXXXVVVQRRMLMKKJHHIGGGJJJKKKJ'
+  +'JIGGGFGGDDDCCBBBAAA@?==?=>=<=;;<:::9998898876656554444443322321123232221110'
+  +'11-.-,,+,,,++++++**)$$$#"##"#""#"""$$$4447779::;;<<<<777    '#31' '#31' '#31
+  +#31#31#31#31#31#31#31#31#31#31#30#31#30#31#30#30#30#30#31#30#31#30#30#30#30
+  +#30#30#30#30#29#30#29#30#30#29#30#29#29#29#29#29#29#29#29#29#28#28#29#28#28
+  +#29#28#28#28#28#28#28#28#28#28#28#28#28#28#28#28#28#28#28#27#27#28#27#27#27
+  +#28#28#28'!""%%$&&&''''''))))))'#26#26#27#26#26#27#26#25#26#26#25#26#26#25#26
+  +#25#26#25#31#30#31#31#30#31#31#30#30#30#30#30#30#29#30#29#30#29#29#28#29#28
+  +#28#28#28#28#28#28#28#28#28#28#28#28#28#28#28#28#28#27#27#28#27#27#27#27#27
+  +#27#27#26#27#27#26#27#26#27#26#26#26#26#26#26#26#26#26#26#26#26#25#25#26#26
+  +#25#26#26#25#26#25#25#25#25#25#25#25#25#25#25#25#25#24#25#24#24#24#25#24#24
+  +#24#24#29#29#29#30#28#29#29#28#28#29#30#28#26#26#26#23#23#23#23#23#23#23#23
+  +#23#22#23#22#23#22#22#22#22#22#22#22#22#22#21#21#22#21#21#21#20#21#22#20#20
+  +#21#21#20#20#20#20#20#19#20#19#20#20#19#20#19#16#17#17#16#16#17#16#16#17#16
+  ,#16#17#17#17#18'##$,,,222777<<<'#26#26#25#13#14#13#13#14#13#13#13#13#13#13#13
+  +#13#13#13#12#13#12#12#13#13#12#13#12#12#12#12#13#12#12#11#11#12#12#12#11#11
+  +#12#12#11#12#12#11#12#11#11#11#11#11#11#11#11#11#11#11#11#10#11#10#11#10#10
+  +#10#10#10#10#10#10#11#10#10#10#9#10#10#10#9#10#9#10#9#10#9#9#9#9#10#9#9#9#22
+  +#22#22#9#8#8'000yyy000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000222555777999<<<656////////////000999999999999999'
+  +'999999999999999998998998988988988988988888888888888888888888888888888888888'
+  +'888887887887877877877877877323/////////////////////////////////////////////'
+  +'000000000000000000111111111111222222988:::;;;;;;;;;;;;<<<===>>>>>>???@@?@@?'
+  +'BBABBBCBBEDDEDDFEEGFFIHHJIIKJJKKKMMMNNNPPPQQQRRRTTTVVVXXXYYY[[[\\\^^^```bbb'
+  +'dddfffggghhhhhhiiikkkmmmqqq'#130#130#130#134#134#134#140#140#140#145#145#145
+  +#149#149#149'|||~~~'#128#128#128#129#129#129#132#132#132#133#133#133#136#136
+  +#136#137#137#137#139#139#139#140#140#140#143#143#143#144#144#144#146#146#146
+  +#148#148#148#149#149#149#151#151#151#153#153#153#154#154#154#155#155#155#157
+  +#157#157#157#157#157#159#159#159#160#160#160#161#161#161#162#162#162#164#164
+  +#164#165#165#165#166#166#166#170#170#170#173#173#173#174#174#174#175#175#175
+  +#176#176#176#176#176#176#176#176#176#176#177#176#176#176#176#177#176#176#177
+  +#177#177#173#173#174#173#173#173#179#179#179#180#180#180#182#182#182#184#184
+  +#184#184#184#184#187#186#187#187#187#187#174#175#174#167#167#167#166#166#166
+  +#165#165#165#165#165#165#165#165#165#166#166#166#165#165#165#164#164#164#164
+  +#164#164#162#162#162#155#155#155#155#155#155#153#153#153#152#152#152#151#150
+  +#150#148#149#148#147#147#147#145#145#145#146#146#146#147#147#147#147#147#147
+  +#144#144#144#143#142#142#141#141#141#139#139#139#137#137#136#135#135#135#133
+  +#132#132#131#131#131#129#129#129'~|||{z{yyywvwuuurrrpppnnnlmljkjihgfffdccb'
+  +'bb`__^]^[[[YZYWWWVVVSTTRRQJKKHHHHHGEFEHHGJJIGGGFFGEDEDDCBBBAA@?>>??=>==<<;;'
+  +'::999999878656665554444333332221121232111111111.-.,,,,,,+++******''&''##"""'
+  +'"#"#!!!""",--545787889999:::000 '#31#31#31' '#31#31' '#31#31#31#31#31#31#31
+  +#30#31#31#31#31#30#30#30#30#31#30#31#30#30#30#30#30#30#30#30#30#30#29#30#30
+  +#30#30#29#29#29#29#29#29#29#29#29#29#28#29#29#29#29#29#29#29#29#28#29#28#28
+  +#29#28#27#28#27#28#28#27#28#28#27#27#28#27#27#27'!"!%$%&%%''''''(((***"""'#26
+  +#26#27#26#25#27#26#25#27#26#25#26#26#25#26#28#28#28#31#30#30#30#31#31#30#30
+  +#31#31#30#30#30#30#30#29#29#29#28#29#29#28#29#29#29#28#28#28#28#28#29#28#28
+  +#29#27#28#28#27#28#28#28#28#28#27#27#27#27#27#27#27#27#27#27#26#26#26#27#27
+  +#26#27#26#26#27#26#26#26#26#26#26#25#26#26#26#25#26#25#25#26#25#25#25#25#25
+  +#25#25#25#24#25#25#25#25#25#24#25#25#25#26#26#25#30#29#29#29#28#29#29#28#28
+  +#30#28#28#24#24#24#23#24#23#23#23#23#22#23#23#23#23#23#22#23#23#23#22#22#22
+  +#22#22#22#22#22#22#21#21#22#21#21#21#20#20#21#20#21#21#20#20#20#20#20#20#19
+  +#20#19#19#19#17#17#17#16#16#17#16#16#17#16#16#17#18#18#19'''(''+++000444999'
+  +#20#20#20#14#14#13#14#13#13#14#13#14#14#13#13#13#13#13#12#12#13#13#13#13#13
+  +#13#13#12#12#12#13#13#12#12#12#12#12#12#12#11#12#12#11#12#12#12#12#11#12#11
+  +#11#11#11#11#11#11#11#11#11#11#11#11#10#11#10#10#11#10#10#10#10#10#10#10#10
+  +#10#10#10#9#10#9#10#10#10#10#10#9#9#9#9#10#9#10#22#22#22#9#9#9'000yyy0000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00333555777:::<<<444////////////1119999999999999999999999999999999989989989'
+  +'889889889889888888888888888888888888888888888888888888888878878778778778774'
+  +'44////////////000000333===989555222000000000000//////0000000000000001111111'
+  +'11111111222655999:::;;;;;;;;;;;;<<<===>>>>>>???@@?@@?BAABBBCBBDCCEDDFEEGFFI'
+  +'HHJIIJJJKKKMMMMMMPPPPPPRRRTTTUUUWWWYYYZZZ[[[^^^___aaabbbeeeddddddfffhhhkkkq'
+  +'qq'#132#132#132#138#138#138#143#143#143#142#142#142'xxxzzz|||~~~'#128#128
+  +#128#129#129#129#131#131#131#133#133#133#135#135#135#136#136#136#138#138#138
+  +#140#140#140#141#141#141#143#143#143#144#144#144#146#146#146#148#148#148#149
+  +#149#149#150#150#150#152#152#152#153#153#153#154#154#154#155#155#155#157#157
+  +#157#157#157#157#158#158#158#160#160#160#160#160#160#161#161#161#164#164#164
+  +#167#167#167#170#170#170#170#170#170#171#171#171#171#171#171#171#171#171#171
+  +#171#171#172#172#172#173#173#173#173#173#173#174#174#174#176#176#176#178#178
+  +#178#179#179#179#181#181#181#182#182#182#184#184#184#170#170#171#162#162#162
+  +#161#161#161#161#161#161#160#160#160#159#159#159#160#160#159#160#161#160#160
+  +#160#160#160#160#160#159#160#160#158#159#159#150#150#150#150#150#150#148#148
+  +#148#147#147#147#146#146#146#144#144#144#144#143#144#146#146#146#145#145#145
+  +#144#144#144#142#142#142#140#140#140#139#139#139#137#137#137#135#134#134#133
+  ,#133#133#131#131#131#130#129#130'~}}{{zyyyxxxuuutssqqqooonnnkkkjjihhgeeec'
+  +'cca``___^\\\[[YYYWWWVVWSSSRRRPPPHHHGGFEEFCCCEEEGGGGGGEEECDCBBCBBA???>>>>><='
+  +'=<<;;:9::9989866666645544434333322321211021122111100100/,++,,,++,+*+******#'
+  +'"#"#"!"!!!""#""""011444777778888888... '#31' '#31'  '#31'  '#31#31#31#31#31
+  +#31#31#30#31#31#31#31#30#30#30#30#30#30#31#31#30#30#30#30#30#30#30#30#30#29
+  +#29#29#30#30#29#30#29#29#29#29#29#29#29#29#29#28#28#29#28#29#28#28#28#28#28
+  +#28#28#28#28#27#28#28#28#28#27#27'!!"%&%&''&''''''))(*))(()'#26#26#28#26#26
+  +#27#26#25#27#26#26#27#26#26#26#26#27#27#31#30#30#31#31#31#30#31#30#30#30#30
+  +#30#30#31#30#31#31#29#29#29#29#29#29#28#29#29#29#29#28#28#28#29#29#28#29#29
+  +#28#28#28#28#28#28#28#28#28#27#27#27#27#27#27#27#27#27#27#27#27#26#27#27#27
+  +#26#27#26#26#27#27#26#27#26#26#26#26#26#26#26#25#26#26#25#26#26#25#25#25#25
+  +#25#25#25#25#25#25#25#25#25#25#25#24#27#27#26#29#30#29#29#29#29#29#29#29#29
+  +#29#29#24#23#24#23#23#23#23#23#24#23#23#23#23#23#23#23#23#22#22#23#23#22#22
+  +#22#22#22#22#22#21#21#21#21#21#22#20#21#21#21#20#21#20#20#20#20#20#20#20#20
+  +#19#19#19#17#17#17#16#17#17#16#17#17#16#16#17#18#18#19'&&&++*--.222667'#14#14
+  +#14#13#14#14#14#14#14#14#13#14#13#13#13#13#13#13#13#13#13#13#12#13#13#12#13
+  +#12#13#12#13#12#13#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#11#11#12#11
+  +#12#12#11#11#11#11#11#11#11#11#11#11#11#11#11#11#10#10#11#10#11#10#10#10#10
+  +#10#10#10#10#10#9#10#10#10#10#10#10#10#10#10#10#25#22#22#9#9#9'000yyy0000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00333666888:::<<<222////////////4449999999999999999999999999999999999989989'
+  +'88988988988988888888888888888888888888888888888888888888887887887877877444/'
+  +'///////////000000444AAACCCCCCCCCCCCCCC>>>===:9:6664442221111110000000001111'
+  +'11111111111222988999:::;;;;;;;;;;;;<<<===>>>?????>@@?@??BAABBBCBBDCCEDDFEEG'
+  +'FFHGGJIIIIIKKKMMMMMMOOOPPPRRRTTTTTTWWWXXXYYY[[[]]]___```bbbbbbaaaccceeegggn'
+  +'nn}}}'#130#130#130#135#135#135#140#140#140#136#136#136'tttvvvxxxyyy|||}}}'
+  +''#128#128#128#131#131#131#132#132#132#133#133#133#136#136#136#137#137#137
+  +#138#138#138#140#140#140#141#141#141#143#143#143#144#144#144#145#145#145#147
+  +#147#147#148#148#148#149#149#149#150#150#150#152#152#152#153#153#153#153#153
+  +#153#155#155#155#154#154#154#155#154#155#156#156#156#156#156#156#158#158#158
+  +#162#162#162#165#165#165#166#166#166#166#166#166#166#166#166#166#166#166#166
+  +#167#166#169#169#169#171#171#171#173#173#173#175#175#175#177#177#177#179#179
+  +#179#178#178#178#162#163#163#157#157#157#156#156#156#156#156#156#156#156#156
+  +#155#155#155#154#154#154#154#154#154#156#156#155#155#155#155#155#155#156#154
+  +#154#155#154#154#155#145#146#145#145#145#145#143#143#143#142#142#142#141#141
+  +#141#143#143#143#144#144#145#143#142#143#142#142#141#140#140#140#137#137#137
+  +#137#137#137#135#135#135#132#133#132#130#131#130#129#129#129'}}|{{{zyyxxx'
+  +'uuusstqqrpqqnnnlmmjjjiiifffeedccbaaa_^_]\\[[[ZYYWWWVUVSTSRQRPPPOOOHGHDDDDDD'
+  +'CCBAAAGFFEEECCCCCCABA???>?>??>=><<<;::9:::988887667555444444344333222111000'
+  +'0/0221100000000.-.,,,+++**+**+*++''&''"""!"!!""!!!"""%%%444545566776777666,'
+  +',, '#31' '#31#31#31#31'  '#31#31#31#31#31#31#30#30#31#31#30#30#30#30#30#31
+  +#30#30#30#30#30#30#30#30#30#29#30#30#30#29#30#29#30#30#29#30#29#30#29#28#29
+  +#29#29#29#29#29#29#28#28#28#29#28#28#28#28#28#28#28#28#28'!""&%%'''''''''''''
+  +')))*)***)'#29#30#30#26#27#27#26#26#27#26#26#27#26#26#27#26#26#26#29#28#29#31
+  +'  '#31#31#31#31#31#31#31#31#31#30#31#30#30#30#30#29#29#30#29#29#29#29#29#29
+  +#29#29#29#29#28#29#30#29#28#29#28#28#29#28#28#29#27#27#28#27#28#28#27#27#27
+  +#27#28#27#27#27#27#27#27#27#27#27#26#26#27#26#27#26#27#26#26#26#26#26#26#26
+  +#26#26#26#26#26#26#26#26#26#26#25#26#25#26#25#25#25#24#25#24#25#24#28#29#28
+  +#30#29#29#29#29#29#29#29#29#28#28#28#24#23#24#24#23#23#24#24#24#23#23#23#23
+  +#23#23#23#23#23#22#23#22#22#22#22#23#22#22#22#21#22#22#21#21#21#21#21#22#21
+  +#21#21#20#21#21#20#20#20#20#20#19#19#19#17#17#17#17#17#17#16#16#17#17#16#17
+  +#23#22#22'%%%(((,,+//.222'#21#21#21#14#14#14#14#14#14#14#14#14#14#13#13#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#12#12#13#13#12#12#12#13#13#13#12#13#12#12
+  +#12#12#12#12#11#12#11#11#12#11#11#11#11#11#12#11#11#11#11#11#11#11#11#11#10
+  +#11#10#11#10#10#10#10#10#10#10#10#10#10#10#10#9#10#9#10#9#9#10#10#9#10#10#25
+  +#22#25#10#10#9'000yyy0000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000444666888:::===...////////////5559999999999999'
+  +'999999999999999999999989989989889889889889888888888888888888888888888888888'
+  +'88888888887887887877666////////////000111444CCCEEEFFFFFFFFFEEEEEEDDDDDDCCCC'
+  +'CCCCCBBBBBBAAA>>>======555111111111111222555999999:::;;;;;;;;;;;;<<<===>>>?'
+  ,'?>??>@@?@??BAABBBCBBDCCEDDFEEGFFHGGIIIIIIKKKLLLMMMOOOPPPQQQSSSTTTVVVXXXYYY['
+  +'[[\\\^^^___]]]^^^```bbbdddmmm{{{'#132#132#132#138#138#138#132#132#132'pp'
+  +'prrrtttvvvxxxyyy||||||~~~'#128#128#128#129#129#129#131#131#131#132#132#132
+  +#134#134#134#136#136#136#137#137#137#138#138#138#140#140#140#140#140#140#142
+  +#142#142#143#143#143#144#144#144#145#145#145#146#146#146#147#147#147#147#147
+  +#147#148#148#148#149#149#149#150#150#150#151#151#151#151#152#152#151#152#152
+  +#152#152#152#155#155#155#158#158#158#161#161#162#161#161#162#162#162#162#163
+  +#163#163#165#165#165#167#167#167#169#169#169#172#172#172#174#174#174#173#173
+  +#173#157#157#157#153#153#153#153#153#153#152#152#152#152#152#152#151#151#151
+  +#150#150#150#149#149#149#148#148#148#151#150#151#151#151#151#150#151#151#150
+  +#149#150#150#150#150#141#141#141#140#140#140#139#138#138#137#137#137#136#136
+  +#136#138#138#138#140#140#140#139#138#139#137#137#137#136#136#135#133#133#133
+  +#133#133#133#130#130#130#129#129#129#128#128'~}}|{{{yyxxxvvutttrrrqqpnnnmmm'
+  +'llkiijghgfffdddbba`____]][[[ZZYXXWWWUUUSSSQQROOOONNMLLIHHDCDAABAA@???EDDDDC'
+  +'CDCABB@@?>?>?>>===<<<:::::::98978767665445444444343333121010000000122200100'
+  +'000///+++++*+***+*******###"""!""!!!!"!""")()434545544445454333---"!!'#31#31
+  +#31#31#31#31#31'  '#31#31#31#31#31#30#30#31#31#31#30#31#30#30#30#30#30#30#30
+  +#30#30#29#30#29#30#30#30#29#30#29#30#30#29#29#29#29#29#29#29#29#29#28#29#28
+  +#28#28#28#29#29#30#29'$$$&&&&''&((()))***+++!!!'#26#27#27#26#27#28#27#27#27
+  +#26#26#27#26#26#26#26#27#26' '#30#31#31'  '#31' '#31#31#31' '#31#31#31#31#31
+  +#30#31#29#30#29#29#29#30#29#29#29#29#29#28#29#29#29#30#30#30#29#29#30#29#29
+  +#29#28#28#29#28#28#29#28#28#28#27#28#28#27#27#27#28#27#27#27#27#27#27#27#27
+  +#27#27#27#27#26#27#27#26#26#26#26#26#26#26#26#26#26#25#25#26#26#26#26#25#25
+  +#26#25#25#25#25#25#25#25#24#25#30#29#29#29#30#30#29#30#29#29#30#29#28#27#27
+  +#24#24#24#23#24#24#24#24#24#23#24#23#23#23#23#23#23#23#23#22#23#22#23#23#23
+  +#22#22#22#22#22#22#21#21#22#21#21#22#21#21#21#20#20#21#20#21#20#20#20#18#18
+  +#18#17#17#17#16#17#17#17#17#17#16#17#17#24#24#24'%%%&&&))(*+*,,,-.-'#25#25#25
+  +#14#14#14#14#14#14#13#13#14#14#13#14#13#13#14#13#13#13#13#13#13#13#13#13#13
+  +#12#13#13#12#13#12#12#12#12#12#13#12#12#12#12#12#11#11#11#11#11#11#12#12#12
+  +#11#11#12#11#11#11#12#11#11#11#11#11#11#10#11#11#11#10#11#11#10#10#10#10#10
+  +#10#10#10#10#10#10#10#10#10#10#9#10#22#25#22#10#9#9'000yyy000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000111444666888'
+  +';;;;;;...////////////777999999999999999999999999999999999999998998988988988'
+  +'988988888888888888888888888888888888888888888888887887666//0/////////000111'
+  +'333BBBGGGHHHJJJJJJJJJIIIGGGGGGEEEEEEDDDDDDCCCBBBBBBAAAAAAAAA@@@111111111111'
+  +'111222988999999:::;;;;;;;;;;;;<<<===>>>>>=??>@??@??BAABBBBBBDCCEDDFEEGFFGGG'
+  +'IIIIIIKKKLLLMMMNNNPPPQQQRRRTTTUUUWWWXXXZZZ[[[]]][[[[[[]]]___aaamlmxxx}}}'
+  +#130#130#130#135#135#135'{{{mmmoooppprrrtttuuuwwwyyyzzz|||}}}'#128#128#128
+  +#130#130#130#131#131#131#132#132#132#134#134#134#136#136#136#136#136#136#138
+  +#138#138#138#138#138#139#139#139#139#139#139#141#141#141#142#142#142#143#143
+  +#143#143#143#143#144#144#144#145#145#145#146#146#146#145#146#146#145#146#146
+  +#146#146#146#147#147#147#147#147#147#150#150#150#154#154#154#158#158#158#159
+  +#159#159#161#161#161#164#164#164#166#166#166#168#168#168#166#166#166#150#150
+  +#150#147#148#148#148#147#147#148#148#147#147#147#147#147#147#147#146#146#146
+  +#146#146#145#144#144#144#143#143#143#145#145#144#146#146#145#146#146#145#145
+  +#145#145#146#146#146#138#138#139#136#136#136#135#134#134#133#133#133#132#132
+  +#132#133#133#133#136#136#136#135#135#135#133#133#133#132#131#132#130#130#130
+  +#128#128#128'~~~~~~{{{zzyxxxwuvuttsrrqqqpoommmklljjjghgfgfdddcccaaa___^^\[\['
+  +'ZZYYWWWVVUTTSSSQQQOOOONNMLLKKKHHHAAAA@A???>?>ABADCCBBA@@@???>==>>>=<<:::;;:'
+  +':;9887887756545555454444323121010011000000000221200100///,,-++++++++*+****)'
+  +'''''''""""!"!!!"!"#""#""+++444434443333222111000''''&  '#31#31#31#31#31#31
+  +#31#30#31#31#31#30#30#31#31#30#31#30#31#30#30#30#31#30#30#30#30#30#30#29#29
+  +#29#30#29#30#30#29#29#30#29#29#29#29#29#29#29#29#29#28'"""%%&&&''''''''((())'
+  +')+**+,,#$#'#27#27#28#27#27#28#27#27#27#26#27#27#27#26#27#26#26#27#31#30#30
+  +#31#31'     '#31#31#31#31#31#31#31#31#31#31#31#31#29#30#30#29#30#29#29#29#29
+  +#30#29#30#29#29#30#30#29#30#30#29#29#30#29#29#29#29#29#29#28#29#28#28#29#28
+  +#28#28#27#28#28#27#27#27#28#27#27#28#27#27#27#27#27#26#27#26#27#27#26#26#26
+  +#26#27#26#26#26#26#26#26#26#26#26#25#26#26#25#25#25#25#25#25#26#26#26#26#30
+  +#30#30#30#30#30#29#29#30#30#29#29#26#26#26#24#24#24#24#24#24#24#23#24#23#23
+  +#23#24#23#24#23#23#23#23#23#23#23#23#23#23#22#22#23#22#22#22#21#21#22#21#22
+  +#22#21#21#22#21#21#21#21#20#20#21#20#17#17#17#17#18#17#17#17#17#17#17#17#16
+  +#16#17#23#23#22'$#$%%&&&&(((*******))'#29#29#29#14#14#14#14#14#14#13#14#13#13
+  ,#14#13#13#13#14#13#13#13#13#13#13#13#13#12#12#12#13#13#13#12#12#12#12#12#13
+  +#12#12#12#12#12#12#12#12#12#12#11#12#12#11#11#11#11#11#11#11#11#11#11#11#11
+  +#10#11#11#10#10#11#10#11#10#10#10#10#10#10#10#10#10#10#10#10#10#9#10#10#22#25
+  +#25#10#10#9'000yyy0000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000111444777999;;;:::...////////////9989999999999999999'
+  +'999999999999999999999989989889889889889889888888888888888888888888888888888'
+  +'88888888887766//0/////////000111333BBBHHHKKKMMMOOOOOONNNLLLJJJIIIGGGGGGFFFE'
+  +'EECCCBBBAAAAAA@@@@@@@@@989000111111111111555999999999:::;;;;;;;;;;;;<<<===>'
+  +'>=>>=?>>@??@??A@@BBBBBBDCCEDDFEEGFFFFFHHHIIIJJJKKKMMMMMMPPPPPPRRRSSSTTTVVVX'
+  +'XXYYY[[[WWWYYY[[[[[[___kkkuuu{{{'#128#128#128#133#133#133'xxxjjjkkkmmmooopp'
+  +'prrrttttttwwwxxxyyy{{{|||~~~'#128#128#128#129#129#129#131#131#131#131#131
+  +#131#132#132#132#133#133#133#135#135#135#135#135#135#136#136#136#137#137#137
+  +#137#137#137#138#138#138#138#138#138#139#139#139#140#140#140#141#141#141#141
+  +#141#141#141#141#141#141#141#141#141#141#141#143#143#143#143#143#143#146#146
+  +#145#151#151#152#157#156#157#159#159#159#161#161#161#156#156#156#144#144#144
+  +#144#144#143#142#143#143#143#142#143#142#142#142#141#141#141#142#142#142#141
+  +#141#141#140#140#140#140#140#139#139#139#140#140#141#140#141#141#141#141#141
+  +#141#142#141#142#141#141#142#136#136#136#131#131#131#130#130#130#128#128#128
+  +''#128#128#128#132#132#132#131#131#131#129#129#129#128#128'~~~}}|{{{yyyx'
+  +'xxwwvttttrsrqqpppnmmllljjjiiigffededddbbb`_`___]]][[ZZZYXWWVUVTSSSRRQPPPOON'
+  +'NNMLMKKJIIIGGG??@>>>>=><;<???CBAAA@@??>>>>>=;;;:;;:;;::;8888877766546456445'
+  +'553332221100010000100/////2111210//0////0,++++++**))*)))*))%%%""""!!!!""!"!'
+  +'!!"""+,,223333322211111000000---&&'' !!'#31#31#31#31#31#31#30#31#31#30#31#31
+  +#30#30#31#30#30#30#30#31#30#30#30#30#30#30#30#30#30#30#30#29#29#30#30#30'!!!'
+  +'&&&''''''(''((()*))***+*+,,,%$%'#27#28#29#27#28#28#27#27#28#27#26#28#27#27
+  +#28#26#26#28#30#30#29'         '#31#31' '#31#31' '#31#31#31#31#31#31#31#30#30
+  +#31#30#30#30#29#30#30#30#29#31#30#30#30#30#30#30#30#30#29#30#29#30#29#29#29
+  +#29#28#29#29#28#29#28#28#29#27#27#28#28#28#28#27#28#27#28#27#28#27#27#27#27
+  +#27#27#27#27#26#27#27#26#27#27#27#26#26#26#26#26#25#26#26#26#25#25#26#26#26
+  +#26#25#25#29#28#27#30#30#29#30#30#30#30#30#30#30#29#30#25#25#25#24#24#24#24
+  +#24#24#24#23#24#23#24#24#23#23#24#23#23#23#23#23#23#22#22#23#23#23#23#23#22
+  +#22#22#22#21#22#21#21#22#21#21#22#21#21#21#20#21#20#21#21#17#17#18#17#18#18
+  +#17#17#17#17#17#17#17#17#17#17#17#18#21#21#21'"""%&%%%%''''''&''&''''&''&&'
+  +#30#30#30#14#15#15#14#14#13#14#13#14#14#13#14#13#14#14#14#14#13#13#13#13#13
+  +#13#13#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#12#11
+  +#11#11#11#11#11#11#11#12#11#11#11#11#11#10#11#11#11#10#10#10#11#11#10#10#10
+  +#10#10#10#10#10#10#10#10#10#25#25#22#9#9#10'000yyy00000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0000000000000000000000000000000000000000000000000000000222555777999;;;777//'
+  +'////////////0:9999999999999999999999999999999999999999899899898898898898898'
+  +'8888888888888888888888888888888888888888777001/////////000000222@@@IIIMMMPP'
+  +'PSSSTTTQQQIIINNNMMMKKKJJJHHHGGGEEEDDDAAA@@@???@@@@@@@@@???11111111111111111'
+  +'1988999999999:::;;;;;;;;;;;;<<<===>>=>>=?>>@??@??A@@BBBBBBCBBEDDFEEEEEFFFHH'
+  +'HIIIIIIKKKLLLMMMOOOPPPQQQRRRTTTUUUWWWXXXTTTWWWWWWYYY\\\kkksssyyy~~~'#131#131
+  +#131'mmmggghhhjjjkkkmmmnnnpppqqqssstttuuuwwwxxxyyy{{{|||}}}~~~'#129#129
+  +#129#130#130#130#131#131#131#131#131#131#131#131#131#133#133#133#133#133#133
+  +#133#133#133#134#134#134#135#135#135#135#135#135#134#134#134#135#135#135#136
+  +#136#136#136#135#136#136#136#136#137#137#137#137#137#137#137#137#137#141#140
+  +#141#150#150#150#146#146#146#138#138#138#138#138#138#139#139#139#138#138#138
+  +#138#138#138#137#137#137#136#136#136#136#136#136#136#136#136#137#137#136#135
+  +#135#134#135#134#134#135#135#135#136#136#136#137#137#137#136#136#136#137#137
+  +#137#133#132#132'~}~}|||{{{zzz'#128#128#128'~~~}~~{{{zzzzyyxwxvwvtttssrrrq'
+  +'pononnmlmkjjiiigggfffdddbbbaaa___]]^\[\[[[XXXWWWVVUTSSSSSPOPPOONMMLLLJJKHHI'
+  +'GHHGGF@@@>==;;;;:;:::BAA@????>?>?<<<;;;;;;999888898777675665654644444322111'
+  +'1111111010//000/0/00022211000/0//---+++*****)*))*))))(###""""!""""!!!!"!"""'
+  +'(()333233212112000000000//////***&&&###!!!'#31#30#31#30#31#31#31#30#30'   !'
+  +'!!$$#%&&((((((((()()((()**++*+++,,,"""'#28#27#29#28#27#28#28#27#29#27#27#29
+  +#27#27#28#27#27#27#28#27#29'! ! !!       '#31'  '#31#31#31' '#31#31#31#31#31
+  +#31#30#31#30#30#31#30#30#30#30#30#31#30#31#31#30#30#30#30#30#29#29#30#29#29
+  +#30#30#30#29#29#29#29#29#28#28#29#28#28#29#28#28#28#27#27#28#28#28#28#27#27
+  +#27#27#27#27#27#27#27#27#27#27#26#27#27#27#26#26#26#27#26#26#26#26#26#26#25
+  ,#26#26#26#26#25#30#29#30#30#29#29#30#30#29#29#30#30#29#29#28#25#24#25#25#24
+  +#24#24#24#24#24#24#24#24#24#24#24#24#24#24#24#23#23#24#23#23#23#23#23#23#23
+  +#23#22#22#22#22#22#22#21#22#23#21#21#22#21#21#21#21#21#21#21#21#17#18#18#17
+  +#18#17#17#17#17#17#17#17#17#17#17#17#16#17#18#18#18#18#18#19'   $$$%%$$%%%$%'
+  +'$%%$$$  !'#17#17#17#14#13#14#13#14#13#13#14#13#13#13#14#13#13#13#13#13#13#13
+  +#12#13#13#12#12#12#12#13#13#12#12#12#12#12#12#12#12#12#12#12#12#12#11#11#12
+  +#12#11#12#11#11#11#11#12#11#11#11#11#11#11#11#11#10#11#11#11#10#10#11#11#11
+  +#10#10#10#10#10#10#25#22#22#10#10#10'000yyy000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000333555777:::<<<555/////////'
+  +'///112:99999999999999999999999999999999999999999998998988988988988988888888'
+  +'888888888888888888888888888888777001/////////000000222???IIIMMMRRRUUUXXXVVV'
+  +'777000000222777;;;===@@@@@@CCCAAA???>>>????????????878000111111111111444999'
+  +'999999::::::;;;;;;;;;;;;<<<==<>>=>==?>>?>>@??A@@BAABBBCBBEDDDDDEEEFFFGGGIII'
+  +'IIIKKKLLLMMMNNNPPPPPPRRRSSSTTTVUURRRTTTUUUWWWZZZhhhqqqvvv|||'#128#128#128'j'
+  +'jjccceeefffhhhiiikkklllmmmpppppprrrssstttvvvwwwxxxyyy{{{|||{{{}}}~~~~~~~~~~'
+  +'~~'#128#128#128''#128#128#128#128#128#128#128#128#128#128#128#128#129#129
+  +#129#130#130#130#130#130#130#131#130#131#131#131#131#130#130#131#131#131#131
+  +#132#132#131#132#131#132#131#131#131#132#132#132#132#132#133#133#133#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#132#132#132#131#132#132#132#131
+  +#132#131#131#131#130#131#130#130#130#130#131#131#131#132#132#132#132#132#132
+  +#132#132#132#133#133#132#130#131#130'zyzzyzxyxwwwvvv{{{{{{zzzwxxwwwuvvtuurrr'
+  +'qqqpponnmmmmkjjjjjhhhfffdedbcbaaa```^]^]]][[[ZZYXXXVWUUUUTSSQQQQPPOOONMMLKL'
+  +'KLKIIIHHGGGGFEFA@@;;;:;:99999:=>=????>=>==<;;;<;:::999888787666666665565544'
+  +'42232221111111100//0/0////0///1000111000/0///,--******)*))*)*)))()"""!""""!'
+  +'""!""""!!!!"%%%000121111011000000//////......------,+,,,,+++**+*******)*)**'
+  +'))*******+++++,,,-++*'#31#31#31#28#28#29#28#28#29#28#27#29#28#27#29#27#27#29
+  +#27#27#29#28#28#28' ! ! !!! !! !!    '#31'  '#31' '#31' '#31#31#31' '#31#31
+  +#31#30#31#30#30#31#31#30#31#30#31#30#30#30#30#30#30#30#30#30#30#30#30#29#30
+  +#29#29#29#29#30#29#29#29#28#28#29#28#28#29#28#27#28#28#28#28#28#28#27#27#27
+  +#27#27#27#27#27#27#27#26#26#26#26#27#26#26#26#26#27#26#26#26#26#26#26#26#26
+  +#26#25#30#29#29#30#29#29#30#29#29#30#30#29#28#28#28#25#25#25#24#25#25#24#24
+  +#24#24#24#24#24#24#24#24#24#24#23#23#24#23#23#23#23#23#23#23#23#23#23#22#22
+  +#23#22#22#23#22#22#22#22#21#22#21#21#22#21#21#21#21#21#21#20#21#18#19#19#17
+  +#17#18#17#18#17#17#17#17#17#17#17#17#17#17#17#18#18#17#18#18#28#28#28'#$#$$$'
+  +'$$$$$%$$$%$$###'#18#18#18#14#13#13#14#14#13#14#13#13#13#14#13#13#14#13#13#13
+  +#13#13#13#12#13#13#13#12#12#12#12#13#12#13#12#12#12#12#12#12#12#12#12#11#11
+  +#12#11#12#11#12#11#11#11#12#11#11#11#11#11#11#11#11#11#10#10#11#10#10#11#10
+  +#10#10#11#10#10#25#25#25#9#10#10'000yyy0000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000333555888:::<<<222////////////2'
+  +'22:99:999999999999999999999999999999999999999989989989889889889889888888888'
+  +'88888888888888888888888888222/////////000000222>>>HHHMMMRRRVVVYYYYYY8880000'
+  +'00000000000000000000000000000111999===>>>>>>??????0000001111111111118779999'
+  +'99999999:::;;;;;;;;;;;;<<;==<>==>==?>>?>>@??A@@BAABBBCBBDCCDDDEEEFFFGGGHHHI'
+  +'IIJJJKKKMMMMMMOOOPPPQQQRRRSRRPPPRRRSSSTTTWWWiiioootttzzzccc```bbbcccdddf'
+  +'ffggghhhjjjkkkmmmnnnpppppprrrssstttuuuvvvwwwxxxxxxyyyzzzyyyzzzzzz{{{{{{zzzz'
+  +'zz{{{|||{{{||||||}}}|}|~~~~~}~'#128''#128''#129#128#128#128
+  +#128#128''#128#128#128#128'~~~~~}}~'#128#128#128#128#129#128#129
+  +#129#129#129#129#129#128#128#128'wwwvvuuttsrrrrruvuwxwvvvuuusssrssqqqopommmm'
+  +'mlkkjiiiihhgffeeecbbbbb`a`___]^][[[Z[[YXYXXXVVWUTTSSRQQPPPPONNMLMLLKKJJHIHG'
+  +'GGFFFEEECDDCBB::::99888777::9??>====;<<;;;::9998997787676777666665544432312'
+  +'123222110100/00//0//00/...///11110111000/...*******)**********((("""""""""!'
+  +'!!!!"!!!!!!"""+++222212000010000/////////...---------++,,,,++++,++*++++,+++'
+  +',+--,------%&&'#29#30#31#28#29#29#28#28#29#28#28#29#27#28#28#28#28#29#27#28
+  +#28#28#28#28'   !!! ! !!!!!  !    '#31'    '#31#31'    '#31' '#31#31#31#31#31
+  +#31#31#31#30#31#31#31#31#30#30#31#30#30#30#30#30#30#30#30#30#30#30#30#29#30
+  +#30#29#30#29#29#29#28#28#29#28#28#29#28#27#28#28#28#28#28#27#28#27#28#28#27
+  +#27#27#27#27#26#27#27#27#26#27#26#27#27#26#26#26#26#26#26#28#27#28#30#29#30
+  +#30#30#30#30#30#29#30#29#29#27#26#26#25#25#25#25#25#24#24#25#24#25#25#24#24
+  +#24#25#24#24#24#23#24#24#23#23#23#23#24#23#24#23#23#23#23#23#23#22#22#23#22
+  +#21#22#22#21#22#21#21#22#21#21#21#21#21#21#21#21#21#21#21#19#19#18#18#18#18
+  ,#17#18#18#17#17#17#16#16#17#16#17#17#17#17#17#17#17#18#25#25#25'#########$$$'
+  +'$%%$$$$$$'#22#22#22#14#13#14#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#12#12#12#12#13#12#12#12#12#12#12#12#12#12#12#12#12#11#12#12#12#12
+  +#12#11#12#11#11#11#11#11#11#12#11#11#11#11#11#11#11#10#11#11#10#11#11#10#10
+  +#25#25#27#10#10#10'000yyy000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000444666888:::===//////////////////222888999999'
+  +'999999999999999999999999999999998998998988988988988988888888888888888888888'
+  +'888888888222/////////000000111:::HHHMMMRRRWWW[[[]]]AAA000000000000000000000'
+  +'000000000000000000222;;;;;;===>>>???878000000111111111444888999999999999:::'
+  +';;;;;;;;;;;;<<;==<>==>==?>>?>>@??@??BAABBBBBBCCCDDDEEEEEEFFFHHHIIIIIIKKKLLL'
+  +'MMMNNNPPPPPPQPPNNNOOOPPPSSSVVVhhhmmmrrrxxx}}}\\\]]]___```aaacccdddfffggghhh'
+  +'iiikkkkkkmmmnnnppppppqqqrrrsssrrrttttttuuutttuuuuuuuuuvvvuuuuuuuuuuuuvvvvvv'
+  +'vvvwwwwvwxxwyyxyyyzzyzzzyyyzzz{{{{zz{{{{{{||||{|{{z{{{z{{zzzyyy||||||}}}}}}'
+  +'}}}sssqrqqpqpponnnqqrttssssqqqpppooomnnmmmklkijihiggfffeedccbbaaaa___^_^[[['
+  +'[[[YYYXXWWWWUUTTTTRSRQQPPPOOONLLLLKKJJJIIIHHGFFFEEFDDDCCCBBA;;;898767676676'
+  +'==<=<;<<<;;::99:9:88876766766676755544433233122232210111000000000///../././'
+  +'10011111100///.,-,***********)*)*)))(''''"""""!!""""!!!!!!!!!!! !"#",,+2120'
+  +'01000000/////////.........-.---,,-,,,,--------,-.-.--'''''''#30#30#31#29#29
+  +#29#28#29#29#29#29#29#28#29#29#28#28#29#28#28#29#28#28#29#28#28#29'!! !!!!!!'
+  +'!!!!!!  !!!   !       '#31'   '#31#31#31' '#31' '#31#31#31#31#30#31#31#30#30
+  +#31#30#31#30#31#30#30#30#30#30#30#30#30#29#30#30#30#30#30#30#29#29#29#29#28
+  +#29#28#28#29#28#28#29#28#27#28#28#27#28#27#27#28#28#27#27#27#27#27#27#26#27
+  +#26#26#27#27#26#27#27#26#26#27#26#30#30#29#30#30#30#30#30#29#30#29#29#29#29
+  +#29#25#25#25#25#25#25#25#25#25#25#24#25#24#25#24#24#24#24#24#24#24#24#24#24
+  +#24#24#24#24#24#23#24#23#23#23#23#23#23#22#22#23#22#22#23#22#21#23#21#22#22
+  +#21#22#21#21#21#21#21#21#21#21#21#21#21#20#19#19#19#18#17#17#17#18#17#17#17
+  +#17#17#17#17#17#17#17#17#17#17#16#17#17#23#23#23'"""##"##"##$$$$$$$$$$'#26#26
+  +#26#14#14#14#13#14#14#14#13#13#13#13#14#13#13#13#13#12#13#13#13#12#13#13#13
+  +#12#13#13#12#12#12#12#13#12#12#12#12#11#12#12#12#11#12#11#11#11#11#12#11#12
+  +#11#11#11#11#11#11#11#11#10#11#11#11#11#10#10#10#11#27#27#25#10#10#10'000yyy'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000111555777999;;;===.../////////////////////444998999999999999999999999999'
+  +'999999999998998988988988988988888888888888888888888888888333/////////000000'
+  +'111:::GGGLLLQQQVVV[[[^^^AAA000000000000000000000000000000000000000000000666'
+  +':::;;;===>>>>>>000000000111111111877888999999999999:::;;;;;;;;;;;:<<;=<<>=='
+  +'>==?>>?>>@??@??A@@BBBBBBBBBDDDDDDEEEFFFGGGIIIIIIJJJKKKMMMMMMOOOMMMKKKMMMOOO'
+  +'PPPTTTffflllqqqvvv{{{YYY[[[\\\]]]______aaabbbcccdddfffggghhhiiikkkkkklllmmm'
+  +'nnnnnnooooooooopppooooooppppppppppppooopppppppppppppppqqqrrrrrrrrqtttuuttss'
+  +'tttuuvuvuuuuvvvwwwwwwxxxwwwvvvvvvuuvuuuvwvxxxyxxyyyyyzrrrmmmlmllkljkjkkkppp'
+  +'ooonnnmmmllliijiiihggfgffededccbbbaa`__^^^\\\[[[ZYYXXXWWXVVVTTTTTTRRRPPPOON'
+  +'NNNLLLLKKJIIIHHGFFGGGEDEDDDCDDAAAAAA<;;766676656444:::=<<;<:;::::9988877777'
+  +'777656556455434333332331211201100111000//////....//...111000/0//0/0./-+,+**'
+  +'***)******)*)*)(((###"""!""!"!!!"!!!!!!!!!  !#"#+**.//000000000////////////'
+  +'.//./////.././....,,,&'''''#31#31#31#30#29#30#29#29#29#29#29#29#29#29#29#29
+  +#29#29#28#29#29#28#28#29#28#29#29#29#29#30' !!!"!""!"!"!!!!!!!!!!! !!!!     '
+  +'        '#31#31#31#31#31#31#31#31#31#31#31#30#31#31#31#31#31#31#31#30#30#30
+  +#30#30#30#30#30#30#30#30#30#30#30#29#29#29#29#30#29#29#29#28#28#29#28#28#28
+  +#28#28#28#27#27#28#27#27#27#27#28#27#27#27#27#27#26#27#27#27#26#26#26#27#28
+  +#27#30#31#30#30#30#30#30#30#30#30#29#30#28#29#28#25#25#26#25#25#25#25#25#25
+  +#25#25#24#25#24#25#25#25#25#24#24#25#24#24#24#24#24#24#24#24#23#24#23#23#24
+  +#23#23#24#23#23#23#22#22#23#22#22#23#22#22#22#22#21#22#22#21#21#21#21#21#21
+  +#21#21#21#20#21#20#21#20#20#19#17#18#18#18#17#17#17#17#17#17#16#17#17#17#17
+  +#17#17#17#17#16#17#21#21#22'!!!###"#"$$$#$$$$$$$$'#29#29#29#15#15#15#14#14#14
+  +#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#13#12#12#12#12#12#12#13#13
+  +#12#12#12#12#12#12#11#12#11#11#12#11#11#11#11#11#11#11#11#11#11#11#11#11#10
+  +#10#10#11#11#11#11#10#27#27#25#10#10#10'000yyy000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000222666777999;;;;;;000//////'
+  +'////////////////////0555999999999999999999999999999999998998998988988988988'
+  ,'988888888888888888888888544////////////000111666GGGLLLPPPVVV[[[^^^HHH000000'
+  +'000000000000000000000000000000000000000000111888:::;;;===>>>878000000000111'
+  +'111444888888999999999999:::;;;;;;;;:;;:<<;=<<=<<>==>==?>>@??@??A@@BAABBBBBB'
+  +'CCCDDDEEEEEEFFFHHHIIIIIIKKKLLLMMMKKKJJJJJJLLLNNNUUUdddjjjpppuuupppWWWWWWYYY'
+  +'ZZZ[[[\\\^^^___```aaacccccceeefffgggggghhhjjjiiijjjjjjkkkkkkkkkjjjjjjjjjjjj'
+  +'jjjjjjjjjiiijjjjjjjjjkkkkkkllllllmmmmnnnnnnonpoppppppqrrrqrqppqqrqrrrrrrrqr'
+  +'qqqpppqqqrrrtttuutuuuvvvqqqjjjhiiiiiggffgfmmmlllklkiiiiiiffgfffdddcccbbaaa`'
+  +'`___^^]\\[[[ZYZYXYXWXWVVTTTTTTRRRQQQPPPOOOMMLLLKKKJJJIHHHHFGFFFDDDDDDCBCAAB'
+  +'@@@@@@>==566666454454555;;:;::9:9:98977887877666666445344433333343221220120'
+  +'2102100////0///////./.../..000/0000000/./.+++*+****)**)***))*)*)()$$$""""""'
+  +'!!!!!!"!!!!!!!!!!!      ###(((***,,+.-.000000000...+**())&%%  "'#30#30#30#30
+  +#29#30#30#29#30#29#29#29#30#30#30#29#29#29#29#29#29#29#28#29#28#29#29#28#29
+  +#29#31#31' """"""!"""""!!"!!!!!"!!!!!! !!!   !     '#31'  '#31'   '#31#31#31
+  +' '#31#31#31#31#31#31#31#31#31#31#30#31#31#31#31#31#30#30#30#30#30#30#30#30
+  +#30#29#29#29#29#30#30#30#29#30#29#28#29#28#28#29#28#28#28#28#27#28#28#27#28
+  +#27#27#27#27#28#27#27#27#27#27#27#27#27#27#30#28#29#31#30#31#30#30#30#30#30
+  +#30#30#29#30#27#26#26#25#26#26#25#25#25#25#25#25#25#25#25#25#25#25#24#24#24
+  +#24#25#24#24#25#24#24#24#24#24#24#23#24#24#23#23#23#23#23#23#23#23#22#23#23
+  +#22#22#23#22#22#22#22#21#22#21#21#22#21#22#21#21#21#21#22#21#21#21#21#20#21
+  +#21#20#20#20#18#18#18#17#17#17#18#18#17#17#17#17#17#16#17#16#16#17#16#16#17
+  +#18#18#20'   ######$###$#$%$$$$   '#15#15#15#14#14#14#13#13#14#14#13#14#13#13
+  +#13#13#13#13#13#13#13#12#13#13#12#13#13#13#12#12#12#12#12#12#12#12#12#12#11
+  +#12#11#12#11#11#11#12#11#12#11#11#11#11#11#11#11#11#11#11#11#11#25#27#27#10
+  +#11#11'000yyy000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000444777888:::<<<===>>>667///////////////////////////000555999'
+  +'999999999999999999999998998998988988988988988888888888888888888544/////////'
+  +'///000111666FFFKKKPPPUUUZZZ^^^MMM000000000000000000000000000000000000000000'
+  +'000000000000555999:::;;;>>>>>>111000000000111111877888888999999999999:::;;;'
+  +';;;;;:;;:;::<;;=<<>==>==?>>?>>@??@??AAABBBBBBBBBDDDDDDEEEFFFGGGHHHIIIJJJKKK'
+  +'HHHHHHIIIJJJKKKSSSccciiinnntttnnnTTTUUUWWWWWWYYYZZZ[[[\\\]]]______aaaaaaccc'
+  +'bbbdddeeeeeeeeeeeeeeegggfffeeefffeeeeeeeeeeeeeeedddeeedddeeeeeeeeeeeeffffff'
+  +'gggghgiihijjjjjkjkkjklkkmmlmmmmmlnmmnnnmmmnnnmmmlllmlmqqqpppppprrroooeeeeee'
+  +'ddddddcccihiiiighggggfffeeecbcbbba````___^^]]\[[[ZZZYYXXXWWVTUUTTTSSRQQQOOP'
+  +'OOOMMMMMMKKKKKIIIHHHHHFFFEEDDDDCCBBBAAA@@@??????>>>766554344323112;:9::9998'
+  +'9889888777677765554444434444342332222212212101/01//0/////.///....--..///001'
+  +'00000000/...++,**+***)****)****)))*)''''''"""!"!"!""!"!!"!!!!! !!  ! !! !  '
+  +'   '#31'   '#31' '#31#31#31#31'  '#31#31' '#31#31#31#31#31#31#31#30#31#31#30
+  +#31#30#31#31#30#31#30#30#30#30#29#29#30#30#30#30#29#29#29#29#29#30#29#29#29
+  +#29#29#29#30#30#30'! !#""#"""""""""""!!!"!!"!!"!!"!!! !!       !    '#31#31
+  +#31'  '#31'  '#31#31' '#31#31#31#31#31#31#31#31#31#31#31#30#30#30#30#31#30#30
+  +#30#30#30#30#30#30#29#30#30#30#30#29#30#29#29#29#29#28#29#28#28#29#28#28#28
+  +#27#28#28#27#27#28#27#27#27#27#27#27#27#27#28#27#27#31#30#29#31#30#30#31#31
+  +#30#30#30#30#30#30#29#25#26#25#25#25#26#26#25#26#26#25#25#25#25#25#25#25#25
+  +#24#24#25#25#24#25#25#24#25#24#24#24#24#24#24#24#24#23#24#23#23#24#23#23#23
+  +#22#22#23#22#22#23#22#22#22#22#22#22#22#21#21#22#21#21#21#21#21#21#22#21#21
+  +#21#21#21#21#21#20#21#21#20#21#18#19#18#18#17#17#17#17#17#17#17#17#17#16#17
+  +#17#17#17#17#17#17#17#17#18#28#28#28'#"##"####$##$$$$$$#"#'#18#18#18#14#13#13
+  +#13#13#14#13#13#14#13#13#13#13#12#13#12#12#12#12#13#13#13#12#12#12#12#12#12
+  +#12#12#11#12#12#11#12#12#11#12#11#11#11#12#12#12#11#11#11#12#11#11#11#11#11
+  +#11#27#27#27#10#11#11'000yyy000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000444888:::;;;<<<>>>???@@@===333///////////////'
+  +'////////////000555999999999999999999999998998988988988988988888888888888888'
+  +'766//0/////////000111333FFFJJJPPPUUUYYY\\\OOO000000000000000000000000000000'
+  +'000000000000000000000000000111888888:::;;;===999////////////000333888888888'
+  +'999999999999::::::;;:;;:;::;::<;;=<<>==>==?>>?>>?????????@@@AAAAAABBBCCCDDD'
+  +'DDDEEEFFFHHHHHHEEEEEEFFFGGGIIIVUVbbbggglllqqqdddQQQRRRRRRTTTUUUVVVWWWXXXYYY'
+  +'ZZZ[[[]]]^^^^^^```___aaaaaaaaaaaabbbbbbaaaaaaaaa```aaa```_________^^^^^^___'
+  +'___`````````aaabbbccccddeedeedffegfggghhggggggghhhhiiiiiiiiihhgihiiihllllll'
+  +'lmlmmnmmmaaaaaa`_`___^]^ccceeeedddcdaaaaaa_^_^^^]^]\\\Z[ZZZZYXXWWWWVVTTTSSS'
+  +'RRQPQQPOOPPOMMMLLLLLLJJJIHIGGGGGGEEDDDCDDCCBBAAA@@@??????>>?=>=<<<:::443223'
+  ,'22212144489888788777776554554543333332332312111223222222111001000/00/0/0///'
+  +'......--.---///000000/0/00////+++**+***)**))*))*)**)*))(($#%"!""!!!!!!!!!!!'
+  +'!!!!!!!!!  !         '#31#31#31#31' '#31' '#31#31#31#31#31' '#31#31#30#31#31
+  +#31#31#30#31#31#31#30#30#30#30#31#30#30#30#30#29#30#30#30#30#30#30#30#29#30
+  +#29#29' '#31' ######"##"#"###"""!""!!""""#!!""!"!!"!!! !    !      !  '#31#31
+  +'   '#31#31#31#31#31#31#31#31#31#31#31#31#31#31#30#31#30#30#30#31#31#31#30#30
+  +#30#30#30#30#30#30#30#29#30#30#30#30#29#29#29#29#28#29#28#28#28#28#28#29#28
+  +#28#28#28#28#28#28#27#27#27#27#29#29#29#31#31#31#31#31#31#31#30#31#31#30#31
+  +#28#28#28#26#26#26#26#26#26#26#26#26#26#25#25#26#25#25#25#26#25#25#25#25#25
+  +#24#25#24#25#25#25#24#25#24#24#24#24#24#23#24#24#23#24#23#23#23#23#23#24#22
+  +#22#23#23#22#23#22#22#22#22#22#22#21#22#22#22#21#21#22#21#21#22#22#21#21#21
+  +#21#21#21#21#21#21#20#21#21#18#18#18#17#18#17#17#17#17#16#17#17#17#17#17#16
+  +#16#17#17#16#17#17#17#18#26#26#27'#"###"$####$%$$$$$###'#22#22#22#14#14#14#14
+  +#13#13#13#14#13#13#13#13#12#13#13#13#12#12#13#13#12#13#13#13#13#12#13#12#12
+  +#12#12#12#12#12#12#12#12#12#11#12#12#11#11#11#11#11#11#11#11#11#11#27#27#27
+  +#11#11#11'000yyy000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000111777;;;<<<===>>>?????????@@@;;;111/////////////////////'
+  +'//////000555999999999999999998998998988988988988988888888888766//0/////////'
+  +'000111333CCCIIINNNSSSXXX\\\UUU222//////////////////////////////////////////'
+  +'//////////////////333888999:::<<<>>>000////////////000666777777777888888888'
+  +'888999999::9::9:99:99;::<;;<;;=<<=<<>==>==>>>???@@@AAAAAAAAACCCCCCDDDEEEEEE'
+  +'GGGCCCCCCEEEEEEGGGSRS^^^dddjjjnnn___NNNOOOPPPRRRRRRSSSTTTVVVVVVWWWYYYZZZZZZ'
+  +'[[[[[[]]]\\\]]]]]]]]]^^^]]]\\\\\\\\\[[[[[[ZZZZZZYYYYYYYYYYYYYYYZZZZZZZZZ[[['
+  +'[[[\\\]]]^^^^^^_^_```a`abbbccccbcdddddcddddddeeeeeddddcbbhhhhhhhhhhihjij___'
+  +'^^^]]][[[[[[\]\a`a`aa__`^^^^^^]]]\\\[Z[ZYYYYXXXWWVUUTUTSSRRRQQQPPPPPPMMLKKL'
+  +'KKKJJJKKJHHHHHHFGFEDCEDDDCBBAABAA????????>>>==<<;<<;;;:991111110000/0110777'
+  +'88888777666555443444443333322222221221211100000/00//0/0.///..-----,--------'
+  +',--0/./////////...-..+**)))))))))))))(((((((((((''&''$#$""!!!!!"!!!!!!!  !!'
+  +'!! !!           '#31' '#31'   '#31#31#31#31#31#31#31#31#31#31#30#31#31#31#30
+  +#31#31#30#30#30#30#30#30#30#30#30#30#30' '#31'!##"####$######"""##"#""""#"""'
+  +'"##""#""""""""!!"!!!!! !  !  !          '#31'  '#31' '#31#31#31' '#31#31#31
+  +#31#31#31#30#31#31#31#31#30#30#30#30#30#30#30#30#30#30#30#29#30#30#30#29#29
+  +#29#29#29#29#28#29#28#28#29#28#28#29#27#28#28#28#27#28#28#28#31#30#31#31#31
+  +#30#30#31#30#30#30#31#30#31#30#27#27#27#26#26#26#26#26#26#26#26#26#26#25#26
+  +#26#25#26#25#25#26#25#25#25#24#25#25#25#25#24#25#24#25#25#24#24#24#24#24#24
+  +#24#23#24#23#23#23#23#23#23#22#23#24#23#23#23#22#22#23#22#22#22#22#22#22#21
+  +#22#22#21#21#21#21#21#22#21#21#21#21#21#21#21#21#21#20#20#21#20#21#18#19#18
+  +#17#18#17#17#17#17#16#17#17#17#16#17#16#16#17#16#17#17#16#16#17#24#24#24'""!'
+  +'##"##"$#$$$$$$$$$$'#25#24#24#14#14#14#13#13#13#14#14#13#13#13#13#13#13#13#13
+  +#13#13#13#12#13#13#12#13#13#12#12#12#12#12#12#12#12#12#12#12#12#12#11#11#12
+  +#12#11#12#12#11#11#11#27#27#27#10#11#11'000yyy000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000444<<<===>>>?????????'
+  +'???@@@@@@878000///////////////////////////000555888999999999998998988988988'
+  +'988988888888888000/////////000111333AAAIIIMMMRRRXXX[[[UUU222///////////////'
+  +'////////////////////////////////////////////////000666888999;;;<<<999//////'
+  +'/////////223777777777777777888888888888998::9:99:99:99;::;::<;;=<<=<<>====='
+  +'>>>>>>>>>???@@@AAABBBCCCDDDDDDEEEAAAAAAAAABBBEEERRR]]]ccchhhlllYYYKKKLLLMMM'
+  +'NNNOOOPPPQQQQQQSSSTTTUUUUUUVVVXXXXXXXXXYYYYYYYYYYYYYYYXXXXXXWWWWWWWWWVVVUUU'
+  +'UUUUUUUUUUUUTTTTTTUUUUUUUUUVVVVVVVVVWWWXXXYYYZZZ[[[\\\]]]]^^]^]__^``_`a````'
+  +'````````____bbbddddeefeegfg```ZYYYYYXXXVWWVVV^__]]]\\]\[[ZZZZZZXXXWWWVVVVVU'
+  +'UTTSSRRQRRPPOOOOOOMMMLKKKKKIJIIIJGGGHGGGFFEEEDDCCCBCBBAA@AA@A??@??>>>===<;<'
+  +'<;;;;<:;;9::44400000//0////444667666555554554544434322322222222222122000000'
+  +'00000//0/00...-.--.-.-------,,,,,,-,//.///////...../--++,)))))))))()(((()(('
+  +'((((((((''''''''%$%""!  !    '#31#31' !  !  ! !      '#31' '#31#31#31' '#31
+  +#31#31#31#31#31#31#31#31#31#31#31#31#31#31#30#31#31#30#30' '#31' """$$$$$$$$'
+  +'$$##$$$#$#########""#"#""##$#######""#""""""!!!!!!!! !   !   !    '#31'    '
+  +#31' '#31#31#31' '#31#31#31#31#31#31#31#31#30#31#31#31#30#31#30#30#31#30#30
+  +#30#30#29#30#30#29#30#30#30#30#29#30#29#29#29#28#29#28#28#29#28#28#29#28#28
+  +#29#29#28' '#30#30#31#30#30#31#31#30#30#31#30#29#29#29#26#26#27#26#27#26#26
+  +#26#26#26#26#26#25#26#25#26#26#25#25#25#25#25#25#25#25#25#25#25#25#25#25#25
+  ,#25#25#24#24#25#24#24#24#24#23#24#24#23#24#23#23#24#22#23#24#23#23#23#23#22
+  +#23#22#23#22#22#22#22#22#22#21#21#21#21#22#21#22#22#21#22#21#21#21#21#21#21
+  +#21#21#20#21#21#21#21#20#19#19#20#17#17#17#17#17#17#17#17#17#16#16#17#17#16
+  +#17#16#16#17#16#17#17#21#21#21'"""######$##$$$$$$%%$'#30#30#29#15#15#15#13#14
+  +#14#14#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#12#12#12#12#12#12#12
+  +#12#12#12#12#12#12#12#11#11#12#12#12#12#12#11#27#27#30#11#11#11'000yyy000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000111888>>>???????????????@@@@@@???667////////////////////////////////0'
+  +'444887999998998988988988988988988888101/////////000000222???IIIMMMRRRWWWZZZ'
+  +'ZZZ555/////////............................................................'
+  +'222777888999;;;<<<///...............555666666666666666777777777776887877988'
+  +'988988988:99;::<;;<;;<;;<<<<<<======>>>@@@@@@@@@AAABBBCCC>>>???@@@@@@CCCRRR'
+  +'\\\```eeejjjPPPHHHHHHIIIKKKLLLMMMMMMNNNPPPPPPQQQRRRSSSTTTTTTTTTUUUUUUUUUUUU'
+  +'TTTSSSTTTTTTSSSRRRRRRRRRQQQPPPPPPPPPPPPPPPPPPPPPPPPPPPQQQRRRRRRSSSTTTUUUVVV'
+  +'WWWXXXYYYZZZ[[[Z[Z\[\\[[\[[[[\[[[[[[]]]`_`a`aa`abba^__VUVTTUTTTSSSRRRYYXZYZ'
+  +'YYYXYXVVVWVWUUUTTTSSRRRRRRQPOONNNNMMMLLKKKJJJIIIIHIGGFGGFEFFEDDCCCCDCCCCBBA'
+  +'AA@??>?>>@??==<;<<;;;;:;::9899899998666///...-....-...445555444443443432222'
+  +'211221211111101/000//0////0/////......-..-.-..-.---,,--,-----,-............'
+  +'....--,-,)))))))()(()(((())(((((((((''''''''''''''''&$$%#"#!!"    '#31#31' '
+  +' !       '#31#31'   '#31' '#31#31#31'    "!""##%$$%$%$%$%$$$$$#$###$##$##$#'
+  +'#####"##$#$$$$#######"###"#""#!!"!!"!!!!!!!! !               '#31#31' '#31
+  +#31#31#31#31#31#31#31#31#31#31#31#31#30#31#31#30#30#31#30#30#30#30#30#30#30
+  +#30#29#30#29#30#29#30#30#29#29#29#29#29#28#29#28#28#29#28#28#31#31#31#31#30
+  +#31#31#30#30' '#30#31#31#31#30#28#28#27#26#26#26#26#26#26#26#27#27#26#26#26
+  +#26#26#26#26#26#25#26#26#26#25#25#25#25#25#25#25#25#25#25#24#25#25#25#24#25
+  +#24#24#24#24#24#24#24#23#24#23#23#24#23#23#23#23#22#23#23#22#23#22#23#23#22
+  +#23#22#22#22#22#22#22#21#22#22#21#21#21#21#22#21#21#21#21#21#21#21#21#20#21
+  +#20#21#20#21#20#20#19#19#19#17#17#18#17#16#17#17#17#17#17#17#17#16#16#17#16
+  +#16#17#16#17#17#18#18#19'   "#""#"###$$$'''''')))%$%'#15#16#16#14#14#13#13#13
+  +#13#13#14#13#13#13#13#13#12#13#12#12#12#12#13#13#12#12#12#12#12#12#12#12#11
+  +#12#12#12#12#12#11#12#12#11#30#27#27#12#11#11'000yyy000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000333;;;'
+  +'??????????????????@@@@@@>>>555/////////////////////////////////323666998998'
+  +'988988988988988101/////////000000222>>>HHHLLLQQQVVVZZZYYY777...............'
+  +'.........................................................///444666777999:::'
+  +'666...............000444555555555555555666666666776776766877877877877988988'
+  +':99;:::::;;;;;;<<<<<<===>>>?????????@@@;;;<<<===>>>@@@QQQYYY]]]cccgggMMMFFF'
+  +'FFFGGGGGGHHHJJJKKKLLLMMMMMMNNNOOOOOOPPPQQQPPPQQQQQQQQQPPPQQQPPPOOOOOONNNNNN'
+  +'MMMMMMMMMMMMLLLLLLLLLKKKKKKLLLLLLMMMNNNNNNOOOPPPQQQQQQRRRSSSTTSTTTUUUVVVWWV'
+  +'WXWWWWWWWWWWVVWVVVWWW[[[[[[]]]^^]]^]QPQQRRPOOOOOOOOSSSVVVVUVUTUSSSTSSQQQQQQ'
+  +'PPPOONNNMMMMKKJLKKJJIHHHHHHFFFFFEEEEDCDBCBBAABBBAAAAAA??>??>?>=>==<;<<<;;<;'
+  +';;;:::999999778667666111...------,,,101333343333333332331222221321100/0/000'
+  +'000/0//0///0.....-..-.-,.---,,-,,,,,,,,,,++,+++,..-.....--..-.----,,,)))((('
+  +'(((''(''''''''(''''''''''''''''''''''&&&(''''(''''''''''''''&''''&''&%$$%$%'
+  +'$%%%%%%%$%''&&&%&&&%&%%%%%%%%$$$%%$$%%%$%$$$$#$##$$$#$##$##$$$$$##$#$$$##$#'
+  +'######""#"!"!!"!!"!!!!!! ! !! !!            '#31' '#31#31#31#31#31#31#31#31
+  +#31#31#31#31#30#30#31#30#30#30#30#30#30#30#30#30#30#30#30#29#30#30#30#30#30
+  +#29#29#29#29#29#29#28#30#29#29#31#31#31#31#31#30#31#31#31#31#30#30#30#30#30
+  +#27#27#27#27#27#27#27#27#27#27#26#26#26#26#26#26#26#26#26#26#26#26#26#26#26
+  +#26#26#25#25#25#26#26#25#25#25#25#25#25#25#25#24#24#24#24#24#24#24#23#24#24
+  +#23#24#23#23#24#23#23#24#22#23#23#23#23#23#22#22#22#22#22#22#22#22#21#22#22
+  +#22#21#22#21#22#21#21#21#21#21#21#21#21#20#21#21#21#21#20#21#20#21#21#21#20
+  +#19#20#18#17#18#17#17#17#17#17#17#17#17#17#17#16#17#16#16#17#16#16#17#18#18
+  +#19#28#28#28'#""#$$%%%(((+++...--.'#20#20#21#14#14#14#13#13#13#13#13#13#13#12
+  +#13#13#12#12#13#12#13#12#13#13#12#13#12#12#12#12#12#12#12#12#11#12#11#12#12
+  +#27#27#27#11#11#11'000yyy000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000666>>>???????????????@@@@@@'
+  +'@@@>>>555/////////////////////////////////111444888988988988222/////////000'
+  ,'000222;;;GGGLLLQQQUUUYYY[[[777..................---------------------------'
+  +'---------------------------------111555666777999:::------------------333444'
+  +'555555555555555666666665665655766877877877877877888988999999999:::;;;<<<<<<'
+  +'<<<===>>>=<<;;;;;;;;;<<<>>>RRRVVV[[[```eeeCCCCCCCCCCCCEEEFFFGGGGGGHHHJJJJJJ'
+  +'KKKLLLLLLLLLMMMMMMMMMMMMMMMLLLMMMLLLKKKJJJJJJJJJJJJIIIIIIHHHHHHIIIHHHHHHHHH'
+  +'HHHIIIIIIIIIJJJJJJKKKLLLMMMNNNNNNNOOPPPPPQRQQSSSRRRRRRSSSRSRSTSRRRRRRWWWWXX'
+  +'YYYYYYYZZQQQMNMMMMLKLJJJKKKRRRRRRQPQPPPPPPNNNMMMMLLLLKKKJJJIIIIHGGGGGFEEEEE'
+  +'DEDCCCBBB@@@@@@@@@AA@?@@>>>>>===<<<<<;;;;;;::::9889888887777655656665444,,,'
+  +',,,+*+*****+3223343432232212211112100//1/000/////.///.///.----------,,,,--,'
+  +',++,++,+++++++++++++++++,,,---------,-,-,,,++***((((''((((''(('''''''''''''
+  +'''''''''''''''&&&''&&&&''''&''''&''&&&&&&%%&&%''&&''&&''%&&%&&%%&%&%&%%%%%$'
+  +'%%$$$$$$$$$$$$$$$$#$##$$$$$$$$$$$$$$$$$$$###$###"#""#"!#!!"!!""!"!!!!!!!!  '
+  +'      !     '#31#31'  '#31#31#31'  '#31#31#31' '#31#31#31#31#31#31#30#31#30
+  +#30#30#31#30#31#30#30#30#30#30#30#30#29#29#30#30#29#30#30#30#29' '#31#31#31
+  +#31#31#31#31#31#31#31#31#31#30#30#28#29#28#27#28#27#27#27#27#27#27#27#27#26
+  +#27#26#27#26#27#27#26#26#26#26#26#26#26#26#25#25#26#25#26#26#25#25#25#25#25
+  +#25#25#25#25#24#24#25#24#24#25#24#23#24#24#24#24#23#23#24#23#23#24#23#23#23
+  +#22#22#23#22#23#22#22#22#22#22#22#22#22#22#22#21#21#22#22#22#21#21#21#21#22
+  +#22#21#21#22#21#21#21#21#20#21#20#21#20#20#21#20#20#20#20#18#18#18#17#17#17
+  +#17#17#17#17#16#17#16#16#17#16#16#17#16#16#17#17#17#17#26#26#26'%%$&&&++*...'
+  +'222455001'#14#13#13#13#13#14#14#13#13#13#13#13#13#13#13#13#13#13#12#13#13#13
+  +#12#13#12#12#13#12#12#12#12#11#11#12#11#12#30#30#30#12#12#12'000yyy000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000111888>>>????????????@@@@@@@@@@@@>>>555//////////////////'
+  +'//////////////////323655222/////////000000111999FFFKKKPPPUUUYYYZZZ???......'
+  +'---------------------------------------------,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,'
+  +'---333555555777888555+++,,,,,,,,,,,,...333333444444444444444444554554544544'
+  +'655655766766766766877877888888888999::::::;;;;;;;;;;;;888888:::;;;<<<OOOTTT'
+  +'YYY^^^bbb???@@@AAAAAABBBCCCDDDDDDFFFFFFFFFGGGHHHHHHIIIIIIIIIIIIJJJJJJIIIIII'
+  +'HHHHHHGGGGGGFFFFFFFFFEEEDDDEEEDDDEEEEEEEEEFFFFFFFFFFFFFFFGGGGGGHHHIIIJJJKKK'
+  +'LLLMMLLMMMMMNNNMMMNNNOOOOOOOOONNNOOOQQQTUUUUUVVVVVVRQQIJJHHHHHHGGGFFFOONNNN'
+  +'MLLLLLLLLLLKJJKKJJIIHIHGHHGGFFFEDDDDDDCCCBAABAAA@@@??????>>>======<=<;;;;:9'
+  +';;:999:89987888877676555555545545343334---+++))))))))),,,212211111111110110'
+  +'00.0/./../.././......--,,,,-,---------,--,--+,+,,++,++++++++++*******,++---'
+  +'-,-,,,,+++++++++++*)*''((''&&''&&&''&&&&&&&''''&&''&&''&&&&&&%''''&''&%&&%'
+  +'''&%&&%&%%''&&&&&&&&&%%&%%&&%%%%%%%%%%%$%$$$%%$%%%%$%%%$%$$$$%$$$#$$$#$$$$#'
+  +'$#$####"#""#"!""!""!""!"!!!!!!!! !!!           '#31#31' '#31' '#31#31#31' '
+  +#31#31#31#30#31#31#30#31#30#31#31#31#31#30#30#31#30#30#30#30#30#30#30#30#29
+  +#30#30#30#30#31#31#31#31' '#31#31#30#31#31#31#31#31#31#29#29#27#28#27#28#27
+  +#27#28#27#27#27#27#27#27#26#27#26#26#27#26#27#26#26#27#26#26#26#26#26#26#25
+  +#26#26#26#26#25#25#26#26#25#25#25#25#25#25#25#24#24#24#24#24#23#25#24#23#25
+  +#23#24#25#24#23#24#23#23#23#23#22#23#22#22#22#23#23#22#22#23#22#22#22#22#22
+  +#22#21#21#22#22#21#22#22#21#21#22#22#21#21#21#22#20#21#21#21#21#20#20#20#20
+  +#21#20#20#20#21#20#18#19#18#16#17#17#17#17#17#16#17#17#17#16#17#16#16#17#16
+  +#16#17#17#17#18#25#26#26'''&&,,-222666999)))'#14#14#13#13#14#13#14#14#14#13
+  +#14#13#13#13#13#13#13#13#13#13#13#12#13#13#13#12#12#12#12#12#12#12#12#12#12
+  +#12#30#30#30#11#12#11'000yyy000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000222999?????????'
+  +'???@@@@@@@@@@@@@@@???878000//////////////////////////////////////////000000'
+  +'111888FFFKKKOOOSSSWWWZZZ???------------,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,'
+  +',,,,,,,,,,,,,,,,,,+++++++++++++++++++++///333444555777888++++++++++++++++++'
+  +'111222222333333333333333333443443433433433544655655655655655666666777777777'
+  +'999999999:::777555666777777<<<MMMRRRWWW[[[]]]<<<<<<>>>>>>???@@@AAAAAABBBCCC'
+  +'CCCEEEEEEEEEEEEFFFFFFFFFFFFEEEEEEEEEEEEDDDDDDDDDCCCBBBBBBBBBBBBAAABBBAAAAAA'
+  +'BBBBBBBBBCCCCCCCCCDDDDDDEEEEEEFFFGGGHHHIIHIIHIJIJIIIJJKKJJJKJJJKKKKKKJJJLLL'
+  +'OOOPPOQQQQQQPPQEEEDEDEEDCCCCCCEEEGGGHGGGGGFFFFFFGGGGHGFFFEEDDDCDDCDCCBAAB@@'
+  +'@????@>>??>>===<<<<<<<<<;;:999:99887887988877767765544454444445444322333111'
+  +'///*)*))))*)())(((/.-001011000100//.//./.-/../--/-..--,,,,,,-,--,,-,,,,,,,,'
+  +',,+,,+,,+,*+,*+++*****)*****)**))*))++++++,+,,,+,**+*******)())''''''&%&&&&'
+  +'&&&&&&&&%%&%&&&&&%&&%&%%''&&''&&&&&&%%&%%''&&&&%&&%&&%%%&%%%%%%%%%&%%&&&&&&'
+  ,'&&&&%%&%%%%%$$$$$$%$$$$$$#$###$####"##"#""#""#"!"!""!!"!!!!!! !  !  !  !   '
+  +'   '#31' '#31' '#31' '#31#31#31#31#31#31#31#31#31#31#31#30#30#31#31#30#31#30
+  +#30#30#30#30#30#30#30#30#30'    '#31#31#31#31' '#31#31#31#31#31#31#29#28#28
+  +#28#27#28#28#27#28#27#27#27#27#27#27#27#27#27#26#26#27#27#27#26#27#26#27#27
+  +#26#26#26#26#26#26#26#26#26#26#26#25#25#26#25#25#25#26#25#25#25#24#24#25#24
+  +#24#25#24#24#24#24#23#24#23#23#24#23#23#24#23#23#23#23#22#23#22#22#23#23#23
+  +#22#22#23#22#22#22#22#22#22#21#22#22#21#22#21#21#21#21#22#21#22#21#21#21#21
+  +#21#21#21#21#21#21#21#21#20#20#20#20#20#20#19#19#19#17#17#17#16#17#17#16#17
+  +#17#17#16#17#16#16#17#17#17#18#20#20#21'***//0454999>>>'#29#29#29#14#14#14#13
+  +#14#13#13#13#14#13#13#13#13#13#13#13#13#13#13#13#13#12#12#13#13#13#12#12#12
+  +#12#12#12#13#12#12#12#27#30#30#11#12#11'000yyy000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000222:::?????????@@@@@@@@@@@@@@@@@@???:::111////////////////////////'
+  +'////////////000111555FFFKKKNNNSSSVVVZZZFFF------,,,,,,,,,++++++++++++++++++'
+  +'++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++111222333555666'
+  +'222******+++++++++,,,111111111111222222222222221221322322322322433433544544'
+  +'544544444555666666777777777777666444444444555<<<KKKPPPTTTXXXSSS999:::::::::'
+  +'<<<======>>>???@@@@@@AAABBBAAABBBBBBBBBBBBBBBBBBBBBBBBBBBAAAAAA@@@???@@@???'
+  +'???????????????>>>>>>>>>???@@@@@@@@@AAAAAABBBBBBCCCCCCCCCDDDEEEFFEFFFGGGHGH'
+  +'GFGFFFFFFFFGFFGFGFKKKLLLLLLNNMONOBCCAAABBA@A@?@?>?>>>>======<<;<<<:::9999::'
+  +'999:::::::::999:::898888989988888888999888888988887777776766655555544443333'
+  +'34323222211101100/0/0+,+((((('''''''''''''')()000//0..........---.--.---,--'
+  +',,++,++,,,,,,+,,+++++++,++++++*+*********))*)*))))))))((()(((((()))+*++++**'
+  +'***)***))))))))))((((''&&''%%%%%%&%%&&%&%$&&%''&%&%%''&&&%&&%&&%%&%%&&&&%&&'
+  +'%%&&%&&&''''''''''''''''&''''''&&&''&&&&&&%$%%%%%$%$%$%$$$$$$$##$###$####"#'
+  +'#"#""#"!#!!"!""!""!!!  !!!!!    !     '#31#31#31#31#31'  '#31#31' '#31' '#31
+  +#31#31#31#31#30#31#31#31#31#31#30#30#30#30#30#30#30#31#31#31'    '#31#31'   '
+  +' '#31#31#30#30#30#28#28#28#28#28#28#28#28#28#27#27#28#27#27#28#28#27#27#27
+  +#27#27#27#27#27#27#27#26#26#27#26#26#26#26#27#26#27#26#26#26#26#26#26#25#26
+  +#25#26#25#25#25#24#24#25#24#24#25#24#24#25#24#24#24#24#24#24#23#23#24#23#24
+  +#23#23#23#23#23#23#22#22#22#23#23#22#23#22#23#22#22#23#22#22#22#22#22#22#21
+  +#21#22#22#21#21#21#22#21#21#21#21#21#21#21#21#21#21#21#20#21#20#21#21#20#20
+  +#21#19#19#19#17#17#17#16#16#17#17#17#17#16#16#17#17#18#18#25#25#25',,,222989'
+  +'==>AAA'#17#17#17#14#14#14#14#14#14#13#14#13#13#13#14#14#13#14#13#13#13#13#12
+  +#13#13#13#13#12#12#13#12#12#13#12#12#13#12#12#12#30#30#30#12#12#12'000yyy000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000444;;;???@@@@@@@@@@@@@@@@@@@@@@@@'
+  +'@@@;;;444///////////////////////////000111555EEEJJJNNNRRRUUUYYYHHH---,,,,,,'
+  +'++++++++++++***************************************************************'
+  +'******))))))---111222333555555))))))))))))******///000000000000111111111110'
+  +'110110111111111111211222222322322222222222444444555555555333222333333222;;;'
+  +'JJJMMMQQQVVVPPP666666777888999999999;;;;;;;;;======>>>>>>>>>>>>????????????'
+  +'???>>>>>>>>>===============<<<<<<<<<<<<<<<<<<<<<===============>>>>>>>>>???'
+  +'???@@@@@@@@@AAABABBBACCBCCCCCCCDDBBBBBBCCDBBBGGGGGGHHHIIIJJICCD====>>=<<==<'
+  +';;;;;;:::999888887888777776667565444444444332122011010//////...//////.-.../'
+  +'///655564444433333333333332221010100//////////...--''&(&&&''&&&&&&&&***....'
+  +'-..--------,-,--,,,+++*+**,+*+***++++*++***++*+**+*****)*))*))*))))()(((((('
+  +'(((''((((''''('''''''''''')((**)*)))()))))((''((''((((()))(((''''''(''''''&'
+  +'%''&''''%%&%%''&&&&&&&&''&&&''&(''&(((((())(()()(((''''(''''&&''''&''''&''&'
+  +'&&&&''&&%%%%$%%%%%%$$$$%$$$$$$$$$#$$$$###"##""""#"""!""!!"!""!!!!!!!   !! !'
+  +'      '#31' '#31' '#31' '#31#31#31#31#31#31#31#31#31#30#31#31#31#31#31#30#31
+  +#31'  '#31'  '#31'      '#31'  '#31#31#31#28#28#28#28#28#28#28#28#28#27#28#28
+  +#28#27#27#27#28#27#27#27#28#27#27#27#27#27#27#27#27#26#27#27#27#26#27#27#26
+  +#26#26#26#26#26#26#26#25#26#26#25#26#25#25#25#25#25#25#24#24#25#24#24#24#24
+  +#24#25#23#23#25#24#24#24#23#24#24#23#23#23#23#23#23#22#23#23#23#22#23#22#22
+  +#22#22#22#22#23#22#22#22#22#22#22#22#21#21#21#22#21#22#21#21#22#21#21#21#21
+  +#21#21#21#20#21#21#20#21#20#20#20#20#20#19#17#17#17#17#17#17#17#16#17#18#18
+  +#18#18#18#19'!  ./.455:::A@A222'#14#14#14#14#14#14#14#14#14#14#13#14#14#13#13
+  +#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12#12#12#12#13#12#12#12#12#30
+  +#30#30#12#12#12'000yyy000000000000000000000000000000000000000000000000000000'
+  ,'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000444'
+  +'<<<@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@>>>878111///////////////000111222DDDIIINNN'
+  +'RRRUUUXXXNNN---,,,,,,++++++*********)))))))))))))))))))))))))))))))))))))))'
+  +'))))))))))))))))))))))))(((((((((((()))///000111333333000(((((((((((()))***'
+  +'////////////////////////////////////0//0//0//0//100100211111111111111111111'
+  +'000/////////000111111<<<FFFKKKOOOSSSDDD444444555555555666777888888888::::::'
+  +':::;;;<<<<<<<<<<<<<<<;;;<<<;;;;;;;;;;;;;;;:::999:::::::::::::::::::::::::::'
+  +':::;;;;;;;;;;;;<<<<<<<<<=========>>>>>>????????>???>??????>>>>>@@@@??BAADDD'
+  +'DDDFFFGGGEEE;;;:::::::99888877777777666554555545344333333333222111000000//.'
+  +'....--..-,,-,,,,,,++++++++*111222222222222222111111000///.///........-,,,,,'
+  +'***%$%%%%&%%$$$#$$+*+-,,,-,,--,-,,,,*+*++*++)************)**)*))*))*)***)))'
+  +'))())())''))(((''(''''(''(''''''&''&''''&''&&&''''''&&&&&%&&''''&((''((''('
+  +'''''''''''''''''(((''(''(((((''(''''(&''(((''('')()()()*)))()(()))(()(())))'
+  +'))))))))((('')''''(''''''''''&''&&''''&&&%%&%%%$%%%$%$$$%$%$%$$$$$$$#$#####'
+  +'$###"##""""#""#""#!!"!!!  !!!!!!! !!       '#31#31'   '#31' '#31#31#31#31#31
+  +#31#31#31#31#31#31#31#31#31#30'!  ! '#31'  '#31'     '#31#29#30#30#28#28#28
+  +#29#29#29#29#28#28#28#28#28#28#28#28#27#27#28#28#28#28#28#27#28#27#27#27#27
+  +#27#27#27#27#27#26#27#27#26#26#26#26#26#26#27#26#26#25#26#26#26#26#25#25#25
+  +#25#25#25#25#25#24#24#25#24#24#25#24#24#25#24#23#24#23#23#24#23#23#23#23#23
+  +#23#23#23#22#23#23#23#23#22#22#22#22#23#22#23#22#22#22#22#22#22#22#22#22#21
+  +#22#21#22#21#21#21#21#22#21#21#21#21#21#21#21#20#21#21#20#21#19#19#19#18#18
+  +#17#17#17#17#17#17#17#18#18#18#21#20#21')))111888>>=CCC###'#15#14#14#15#14#14
+  +#14#14#14#14#14#14#14#14#13#14#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13
+  +#13#13#13#13#13#13#12#12#30#30#30#12#12#12'000yyy000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000222:::@@@@@@@@@@@@@@@@@@AAAAAAAAAAAAAAA<<<555'
+  +'//////000111333BBBIIIMMMQQQVVVXXXQQQ///,,,++++++******)))))))))(((((((((((('
+  +'((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((+++///000'
+  +'111222333(((''''''''''''''''''''''''(((---................../////.//./../..'
+  +'/..///////////////0////////----,-,,,,,,,,,,,,------......000999DDDJJJNNNQQQ'
+  +'BBB111222222333333444444555555666777777777888999999888999999:::999999888888'
+  +'888888888888888888888888888|||'#147#147#147#147#147#147#140#140#140'nnn@@@8'
+  +'88999999999:::999999::::::;;;;;;;;;<<<<<<===<<<<==;<;;;<<<<;;;<<<AAAAAABBBC'
+  +'CCCCC989776788777666655544444333222222222222121000//////...-------,----,,,+'
+  +',+,,,*+****)))))))***++1001000001001000////...---.--..---..,,,+,,+,,++,''&&'
+  +'$$$#########%%%,++,+,+++,,+******))))))**)))))))**)*)))())()())())))((((((('
+  +'((''((&((&(&''''&&''&&&&&&%&%%&%%&%&%%%%%%%%%%%%%%%&''''%''&&&&&''''''''&'''
+  +'&&''(''''''''&(''''''''''((((((((((()))))(())))(()(((((*))))))()))(((''('''
+  +'''''''''''&&&&&&&&&%&%%%%%%%%%$%%%$$$$$$$%$$$$$$$#$$$####$#"##"#"!#""#!!""!'
+  +'"!!! !!! !! ! !     !   '#31#31#31' '#31#31' '#31'  '#31#31#31#31#31'  '#31
+  +' '#31'   '#31'! '#31'  '#31#31#31#31#29#28#28#28#28#29#29#28#29#28#28#28#28
+  +#28#28#27#28#28#27#27#28#28#28#28#28#27#27#28#27#27#27#27#27#27#27#27#27#26
+  +#27#26#26#26#26#26#26#27#26#26#26#26#26#26#26#26#25#25#25#25#25#25#26#25#24
+  +#25#25#24#25#24#24#25#24#24#24#24#24#24#23#24#24#23#23#23#23#23#23#23#23#23
+  +#23#23#23#23#23#22#22#22#22#22#22#22#22#22#22#21#21#22#22#22#21#22#21#21#22
+  +#22#21#21#21#21#21#21#21#21#21#20#21#21#18#17#19#17#17#18#18#17#17#17#17#17
+  +#18#18#18#25#25#26',--222:::???EEE'#18#18#18#14#15#14#14#15#14#14#15#15#14#14
+  +#14#13#14#14#14#14#14#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#13#12
+  +#12#13#13#30'  '#13#12#13'000yyy00000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'0000000000000000000222999???@@@@@@AAAAAAAAAAAAAAAAAAAAAAAA@@@;;;666222AAAII'
+  +'ILLLQQQVVVXXXQQQ///,,,++++++******))))))(((((((((((('''''''''''''''''''''''
+  +''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
+  +'''''''''''''''''''''''''''''''''''''''''''''''''''''''---...///000111...&&&'
+  +'&&&&&&&&&&&&(((---------------------------------------,,,,,,+++))*))))))***'
+  +'*********+++++++++++++++,,,,,,...:::CCCGGGKKKOOO===///000000222222222333333'
+  +'333444444444555666666666555666666666666666666666777666666555555555666666666'
+  +#179#179#179#179#179#179#179#179#179#179#179#179#179#179#179#155#155#155'>>>'
+  ,'66666677777777777788888888899999999999999998999999999999:999988<<<>>>???@@@'
+  +'AA@===;<;:9:888888666434222222222222111/0000000/...---------,,,,++**+***)**'
+  +'))*)()((((((((((((((''...//.000/..0...----------,,,-,,+++,++,+++++++++(()$#'
+  +'$$#$$##$#####&&%+++***)***))))))))))))))))())))(()(()(((((((''''(''(('''''''
+  +'''''''''''''''''''''''''&&&&&&&''&&&&&&&&%&%&&%%%%%%%%%%$%%$%%%%%$%$$%$%%%&'
+  +'%%&&%&&&&''&&&&''''&''&&(''''(((((((((((()))))()))*()())**)))))))(''(''('''
+  +'''&''&&&&&&&&&%%&%%&&%%%%%%%%%%%$%$$%%%%$$$$$$$$$$$$#$$#$####"##"#""""!""!"'
+  +'!!""!"!!!!!! !! !   !        '#31' '#31#31' '#31'         ! '#31' '#31'   '
+  +#31#29#30#29#29#29#29#29#29#29#28#28#29#29#29#28#28#28#29#28#28#28#27#28#28
+  +#28#28#28#28#28#27#28#28#27#28#28#27#27#27#27#27#27#27#27#27#27#26#27#26#27
+  +#26#27#26#26#26#26#26#26#26#25#25#26#25#25#26#24#25#25#24#24#25#25#24#25#24
+  +#24#25#24#24#24#23#24#24#24#24#23#24#23#23#23#23#23#22#23#22#22#23#22#22#22
+  +#22#22#22#22#22#22#23#22#22#21#22#22#22#22#21#21#21#21#21#21#21#22#22#21#21
+  +#21#22#20#20#20#18#18#18#18#17#18#18#17#17#18#18#18#20#20#20'"""///655==<CCB'
+  +'444'#15#15#15#15#15#15#14#15#14#14#14#14#15#14#14#14#14#14#14#14#13#14#13#13
+  +#14#13#14#13#13#14#13#13#14#14#13#13#13#13#13#12#12#12#30'  '#13#12#12'000yy'
+  +'y00000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000011177'
+  +'7???AAAAAAAAAAAAAAAAAAAAAAAAAAAAAACCCDDDHHHLLLQQQUUUXXXWWW555,,,++++++***))'
+  +'))))(((((((((''''''''''''''''''''''''''''''&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&'
+  +'&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&(((---...///000111''''''%%%%%%%%%%%%%%'
+  +'%***,,,,,,,,,,,,,,,,,,****))))))))(()''''''''''''''''''''''''(((((((((((((('
+  +'())))))******+++++++++++++++...<<<CCCHHHKKKNNN666............///00011111111'
+  +'1222222222333333333333444444444444444333444444444333333444444444444555555'
+  +#181#181#181#181#181#181#181#181#181#181#181#181#181#181#181#181#181#181#149
+  +#149#149'555555555555555555666666666666777777777777777666777565655566666898;'
+  +';;===>>>>>>>??@@@A@AA@@@@?@??>?>?>>>>>===::::::998667555545343001000../,,,*'
+  +'*))**(((((((((''''''''''''''''''''''''&&&)))//...---------,-,,,,,+++++++++*'
+  +'+*+********))))))''''''"!##"""""""""""&&&(()(()(()((())))))))())()(()(((('''
+  +')''''(''''''&''''''''''''''''''''''''''''''''''''''''''&''''&&&%&&&&%%&%%%%'
+  +'%%%$%%$$%%$$$$$$$$$$#$$$$$##$##$$$$##$#$$$$&%%&%&&&&''&&(''&(((((()((((())('
+  +'(((()((((''((((((''''''''''''''&''&''&''&&&&&&&&&&&&&&&%&&%&&%%%%%%%$%%$$$$'
+  +'$%$$$$$$$$$$#$$#######"##"#"!#"!#!"""!"!!"! !!!!      !   ! '#31#31#31' '#31
+  +'! '#31'   !      '#31#31'!  '#31#31#30#30#30#29#29#29#29#29#29#29#29#28#29
+  +#28#29#29#28#29#29#28#28#29#28#28#28#28#27#28#28#28#28#27#27#27#27#28#27#27
+  +#27#27#28#27#27#27#27#27#26#26#27#26#27#27#26#26#26#26#26#26#26#26#26#25#25
+  +#25#25#25#24#26#25#25#25#25#24#25#25#24#25#24#24#24#24#24#24#24#23#23#24#24
+  +#23#23#23#23#23#23#23#23#23#23#23#22#22#22#22#23#22#23#22#22#22#22#22#22#22
+  +#22#22#22#22#21#22#21#22#21#21#21#21#21#22#19#19#19#18#18#18#18#18#18#18#17
+  +#17#18#18#19#21#22#21'+++122898???DDD#$#'#15#15#15#15#15#15#14#15#14#14#14#14
+  +#15#15#15#14#14#14#14#14#14#14#14#14#14#14#14#13#13#13#14#13#13#13#13#13#13
+  +#13#13#13#12#13'   '#13#13#13'000yyy0000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000555<<<AAAAAAAAAAAAAAAAAABBBCCCEEEGGGK'
+  +'KKPPPTTTXXXVVV555,,,,,,+++******)))((((((''''''''''''''''''&&&&&&&&&&&&&&&&'
+  +'&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&%%%%%%%%%%%%%%%%%%%%%+++,,,-'
+  +'--///000...%%%%%%%%%%%%%%%&&&''''''''''''''&''''&''&&&&&&&&&&&&&&&&&&&&&&&&'
+  +'&&&&&&&&&&&&&&&''''''''''''''''''''''''''''''))))))***++++++///444:::@@@CCC'
+  +'GGGJJJLLL444,,,,,,---------------/////////000000111111111111111111222111222'
+  +'222222222222222111111222222333222222SSS222:::'#132#132#132#182#182#182#182
+  +#182#182#182#182#182'TTT3333333334444443333333334444444444445554434444444444'
+  +'34434434545:::;:;;;;<<====@@@@@@@?@?????>>>>>>>>=====<<<<<<<<<;;;;;;;;;9999'
+  +'89877877777777555555221000***&&&&&&&&&%%%%$%+**--+-,,-,,,,,,++++++++++*+**+'
+  +'++***)**)))))))))))(%$%""""!""!!!!!!!!''''''))())(()()()((((((((''(('''''''
+  +'''''''''(&''''''''''''''''&''''&''''''''''&&&''''&&&&&&&&%&&%%%%%%$&%$%$$$$'
+  +'$$##$$$$##$####################$#"####""$##$#$$$$$$$%%%$%%&&&''''&&&''((('''
+  +'''''(((''''''('''')(''(''''(''''''''''''''&''''''&&&&''''&&&&&&&&&&%&%%&%%&'
+  +'%%%%%%$%$%$%%$%%$$$$$$$$$$$$$$#$#$####"#""#"!"!!"!!""!"!!!!!! !   !  !     '
+  +'   !! ! !         '#29#29#29#29#29#29#29#30#29#29#29#30#29#29#29#29#29#29#29
+  +#28#28#29#28#28#28#29#29#29#28#28#28#28#28#28#27#28#27#28#27#27#27#28#28#27
+  ,#27#27#27#27#27#27#27#27#26#27#27#27#26#26#26#26#26#26#26#26#25#25#26#25#25
+  +#26#24#25#25#24#25#25#24#24#25#24#24#25#24#24#24#24#24#24#24#24#24#23#24#23
+  +#23#23#24#23#23#23#23#22#23#23#23#22#23#22#22#22#23#22#22#23#22#22#22#22#22
+  +#22#22#22#22#21#22#21#22#22#21#18#18#18#18#18#18#18#18#18#18#19#19#20#20#20
+  +#28#28#28'...444;:;A@ACBB'#18#19#19#15#15#15#15#15#15#15#15#15#14#15#14#14#15
+  +#14#15#15#15#14#14#15#14#14#14#14#14#13#14#14#14#14#14#14#14#13#13#14#13#13
+  +#13#13#13'   '#13#13#13'000yyy0000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000222999???AAABBBBBBCCCDDDFFFIIINNNSSSV'
+  +'VVXXX999---,,,+++******)))((((((''''''''''''&&&&&&&&&%%%%%%%%%%%%%%%%%%%%%%'
+  +'%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%'''''',,,---.../'
+  +'//000''''''$$$$$$$$$$$$$$$$$$$$$$$$%%%%%%%%%%%%%%%%%%%%%%%%%%%&&&&&&&&&&&&&'
+  +'&&&&&''''''((((((((((((+++//0555888::::::===@@@DDDFFFIIIKKK***++++++++++++,'
+  +',,---------------......////////////000000000///000000000///0000001110001111'
+  +'11111111111111111111111'#167#167#167#184#184#184#184#184#184'}}}11111111111'
+  +'1111111111222222222222222222222333222222111111101011788999:::;;;<<<????????'
+  +'????????>?>>=<=<<<<<=<<<<<<<;;;:;:::::::889889778666444333333333333/0/$$$$$'
+  +'$%$%$$$$$$$$%,++,,,,*+++*,**+**********)))))()((()()(()((((''(''''''###  ! '
+  +'   !       ''''&(((''((''''''''(''''''''''''''''''''''''''''''''''''''''&&'
+  +'''&''''&%&%&&&%%%&&%&&%%&%%$%%%%$%%$%%$$$$$$$$$$$$#$$$#$$###$########"####"'
+  +'"#"##"##"#""$##$##$$$$$#$$%%%%%$%&%&''&''&''&''''''''''''((((''(''''''((''('
+  +'''((''''''''''''&''&''&''&&&&&&&&&&&&&&&&%&&%%%%%%%%$%%%$$$%$$$$$$$$$$$$#$$'
+  +'#$$#####"##"#""#"!""!#!""!!" !!!!!  ! !   !!!!!!! !  !      '#30#30#30#29#30
+  +#29#30#30#29#30#29#29#29#30#29#29#29#29#29#29#29#29#29#29#29#29#28#28#28#28
+  +#29#28#28#28#28#28#27#28#28#28#28#28#28#27#27#28#28#28#27#27#27#27#27#27#26
+  +#27#27#26#27#27#27#26#26#26#26#26#26#26#25#26#25#25#26#24#25#26#25#25#26#24
+  +#24#25#24#25#25#24#24#24#24#24#24#24#23#24#24#24#23#23#23#23#24#23#23#23#23
+  +#23#23#23#23#23#23#23#22#22#22#23#23#22#22#22#22#22#22#22#22#22#21#22#22#21
+  +#21#21#18#19#18#18#18#19#18#18#18#19#19#19#21#21#20'$$%211777>>>BCC212'#15#15
+  +#15#16#15#15#15#15#16#15#15#15#15#15#15#14#15#14#14#15#14#15#14#14#14#14#14
+  +#14#14#14#14#14#13#13#14#14#13#13#13#13#13#14#13#13#13'   '#13#13#13'000yyy0'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000555;;;BBBCCCEEEGGGKKKNNNTTTWWW>>>---,,,++++++***)))(((((('
+  +'''''''''''''&&&&&&%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%'
+  +'%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%***+++,,,......---$$$$$$$$$$$$$$$$$$$$$$$$'
+  +'$$$$$$%%%%%%%%%%%%%%%%%%%%%%%%%%%&&&&&&&&&''''''''''''***--.222666888999999'
+  +':::<<<<<<???BBBDDDGGGHHHIII))))))******++++++++++++,,,,,,,,,,,,,,,,,,,,,---'
+  +'---...............//////.........//////////////////////////////000mmm'#186
+  +#186#186#186#186#186#151#151#151'000000000000000000000000000000000///0000000'
+  +'00000000////////////222888999;::===?????????>>>>>>=>>>>>=>><<=<<<;;;;<;;;;;'
+  +';;::9::999:899677566444343222222111111((($###$$#$#######&&&+********+******'
+  +'**))))))())(()())((((((((((((''''''%%%!!   !     ! ! !!!((''(''''''((((''('
+  +'''''''''''''''''''''&&''&&&&''&&''%&&%%&%%%%%%%%%%%%%%%%%%%%%%%$%$%$$%%$$$#'
+  +'$##$######"#""#"#""""""""""###"#""""##"##"#""###$#"$$#%%$$$$%%%&&&''&'''''''
+  +'''((''''''(((((((((((('')(((''''(''''''&''''''&''''&''&&&&&&&&&&&&%%%&%%&&&'
+  +'%%%%%%%%%$$%%%%$$%$$$$$$$$$$$########"##"#""#"""!!"!!"!!"!!!!!!! "!""!!!!!!'
+  +'!!! !  !'#31#31#30#30#30#31#30#30#30#30#29#30#29#30#30#29#29#29#29#29#29#29
+  +#29#29#28#29#29#29#28#28#28#28#29#28#28#29#28#28#28#28#28#28#28#27#28#27#27
+  +#27#28#28#27#27#27#27#27#27#27#27#27#27#27#26#27#27#27#27#27#26#26#26#26#26
+  +#26#25#25#26#25#25#26#25#25#26#25#25#25#24#25#25#24#24#25#24#24#24#24#24#24
+  +#23#24#23#24#23#24#24#23#24#23#23#23#23#23#23#23#23#23#23#22#22#22#23#22#22
+  +#22#22#22#23#22#22#22#22#22#22#19#18#19#19#18#18#18#19#18#18#18#18#19#19#19
+  +#24#25#26',,,4349::@@AFEF'#30#30#29#16#15#16#15#16#15#15#15#15#15#16#16#15#15
+  +#15#15#15#15#15#15#14#15#14#15#15#15#14#14#14#14#14#14#14#13#14#14#13#13#14
+  +#13#13#14#13#13#14'   '#13#13#13'000yyy0000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000000000000000000000000666>>>HHHL'
+  ,'LLOOOSSS???...---,,,+++******)))(((''''''''''''&&&&&&%%%%%%%%%%%%$$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$&&&+'
+  +'++,,,,,,...///&&&########################$$$$$$###%%%%%%%%%%%%%%%&&&&&&'''''
+  +'''***.-.222555555777777888::::::<<<======???@@@CCCDDDFFFGGGBBB)))))))))))))'
+  +')))))***************++++++,,,,,,,,,,,,,,,,,,,,,,,,,,,---------------------.'
+  +'..........................RRR'#188#188#188#188#188#188#170#170#170'////////'
+  +'//////////.....................//////.....-.....-...---..-///00033344555688'
+  +'8999999899>>>>>><==<=<<<<<<=;;<;;;;;;;;;::9:9:888788555322111000000//////..'
+  +'-###$$##""""""""##"))(+*)+*****)(((((((((((((((((''(((''(''''''&&''&&&&&&&&'
+  +'&#$$'#31'              !!!''''&''''''&''''''&&''&&&&&''''''''&&''''&''''%&&'
+  +'%&%%&%%&%%$%%$%$%$$%$%$$$$$$$$$$$$$$$$$#$##$##$###########""#""#"""""""""""'
+  +'""#""""##"#""###$##$##%$$&%%&&&%%&''''''(''''(''((((((((''())((('')(''('''''
+  +'(''''''''''''''''''&''''''''&''&&&&&&&&%&&&%%%%%%%%%$%$%%$%$%$%$%$$$$$$$$$#'
+  +'#$#$$#$###"##"""!#""""!"!!"!!"!!""!!""!!!!"!!!!! !'#31'  '#30#30#31#31#30#30
+  +#30#30#30#30#30#30#29#30#29#30#30#30#29#30#30#30#29#29#29#29#29#29#29#29#29
+  +#29#29#28#28#28#29#28#29#28#29#28#28#28#28#28#28#27#28#28#28#27#27#28#28#27
+  +#27#27#27#27#27#27#27#27#27#27#26#26#26#26#26#26#26#25#26#26#25#25#26#25#25
+  +#26#25#24#25#25#25#25#24#24#25#25#24#24#24#24#24#24#24#23#24#23#24#23#24#23
+  +#23#23#23#23#24#23#23#23#23#23#23#22#22#23#22#22#22#22#23#23#23#22#22#21#21
+  +#21#19#19#18#19#19#18#18#18#19#20#20#20#21#21#21' !!/./667===CDD???'#16#16#16
+  +#15#16#15#16#16#15#16#15#15#15#15#16#15#15#15#14#15#15#15#15#14#15#15#14#15
+  +#15#15#15#14#15#14#14#15#14#14#14#14#14#14#13#14#13#13#13#13' ##'#13#13#14'0'
+  +'00yyy0000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000222:::DDDBBB...------,,,+++***)))(((('
+  +'((''''''&&&&&&%%%%%%%%%$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$)))++++++---...,,,#########$$$$$$$$$$'
+  +'$$$$$$$$$$$%%%%%%&&&)))-,-///111444444555666666777888888999:::;;;<<<===>>>@'
+  +'@@@@@BBBCCC>>>444---''''''((((((((((((((((((((((((((())))))************++++'
+  +'++++++++++++++++++++++++++,,,,,,,,,,,,,,,,,,,,,------------------QQQ'#190
+  +#190#190#190#190#190#190#190#190'-------------------------------------------'
+  +'-----,,,,,,,,++++++++++++++++++++++**+******)))))))))))(((())),,-,,,+,+...1'
+  +'11101011444443323111323000............///(((""""""""""#""""$$$*))))()()))()'
+  +'()(()(((((((((''((''&''&''&''&&&&&&&&&&&&&%###'#31#31#31#31#31#31#31#31#31
+  +#31#31#31#31#31#31'!!!''''&''&''''&''&''''&&&&&&&&&&&%%&%%%%%%%%%%&%%&%%%%%$'
+  +'%%$%%%%$$$$$%$$$#$$####$###""#""#""""""""""""""""""""""!"!""""##""""##"##"$'
+  +'##%#$%$$%$$%%%&&&''''''&''&(''()((((((''())())(((''((''((''(''''''''''''''&'
+  +'&''&''&&&&&&&&&&%&&&%&&&%&&&%%$%%%$%%$$$%%$%$$$$$$$$$$#$$#$#####"##""""""""'
+  +'"!"!!""!"""""!""""!"!!!   '#31#31#31#31#31#30#31#30#30#30#30#30#30#30#30#30
+  +#30#29#30#29#30#29#30#29#30#29#29#30#30#30#30#29#29#29#29#29#29#29#28#28#29
+  +#28#28#28#28#28#28#28#28#28#28#27#28#28#28#27#28#28#27#28#27#27#27#27#27#27
+  +#27#27#27#27#27#27#27#26#26#27#25#26#26#25#25#26#25#25#26#25#25#26#25#25#26
+  +#25#25#25#24#24#24#25#24#24#24#24#23#24#24#24#24#24#24#24#23#23#23#23#23#23
+  +#24#23#23#23#23#23#23#22#23#23#22#23#22#23#22#22#20#21#20#19#19#19#18#19#19
+  +#19#18#19#19#20#19#22#22#23',,,333999@@@EEE+,+'#16#16#16#16#16#16#15#16#16#16
+  +#16#16#16#15#16#16#15#16#15#15#15#15#15#15#15#15#15#15#14#15#14#15#14#14#14
+  +#14#14#14#14#14#14#14#14#14#13#13#14#14'   '#13#13#14'000yyy0000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000/////////......---,,,++++++***)))(((''''''''''''&&&%%%%%%%'
+  +'%%$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$$$$$$&&&***+++,,,---...&&&$$$%%%%%%''''''''''''***,+,---0000'
+  +'00333333333444666666666777888888999999:::;;;<<<<<<===??????@@@???666000'''''
+  +'''&&&&&&&&&&&&''''''''''''''''''''''''''''''(((((((((((((((((((((((())))))*'
+  +'***********************++++++++++++++++++++++++++++++++++++,,,,,,,,,QQQ'#192
+  +#192#192#192#192#192#192#192#192',,,,,,,,,,,,,,,,,,,,,,,,,,,++++++++++++++++'
+  +'++++++++++++++**++++***************)))*))*))(((((('''''''''''''''''''''''''
+  +'''''''''''''''''''''''''&&&&''&%%%%%%%%%$$$%$%%$%%%$+++-.-------------"""""'
+  +'""""""""""!!!&&&)(()((((((((''(''''''(''''''''''''''''''''&''''''&&''''&'''
+  +'''''&&&&&&&&&&%"""'#31#31#31#31#31'  '#31#31#31#31' '#31#31#31'!!!''''&'''''
+  ,'&&''''&&&&&&&&&&%&%%%&&%&&%%%%%%%%%%%$%%%%%$%%%%$$$$%$$$$$$$#$#####$"#""#""'
+  +'#"""""""""""""""""""""!""!"""""""##"##"$##$$$$$#%%%&&%&&''''&''''''''(((((('
+  +'(((((())))))((((((((''(''''(''''''''''''''''''''''&&&&''&&&&%&&&&&%%%%&%%%%'
+  +'%%$%%%$$$$$%%$$$$$$$$$$$###$#$$$###""#"""!#"!"""#"!""!"""!"""""   '#31#31#31
+  +#31#31#31#31#30#31#30#31#31#30#31#31#30#30#30#30#30#30#30#29#30#29#30#30#29
+  +#29#30#29#29#29#29#29#29#29#29#29#29#29#29#29#29#28#29#29#29#28#28#29#29#28
+  +#28#28#28#28#27#28#28#27#27#28#28#28#28#27#27#27#28#27#27#27#27#27#27#26#26
+  +#27#26#26#26#26#25#26#26#25#26#25#25#26#25#25#26#25#25#25#24#25#25#24#25#24
+  +#24#24#24#24#24#24#24#24#24#23#24#24#24#23#23#23#23#23#23#24#23#23#23#23#23
+  +#23#23#23#23#22#22#21#19#19#19#20#19#19#19#19#19#20#20#20#21#20#21#31#30#31
+  +'//0555<<<CCBFFF'#19#20#19#16#16#16#16#16#16#16#16#16#15#16#16#16#15#16#15#15
+  +#15#16#15#15#15#15#15#15#15#15#15#15#15#15#14#14#14#15#15#14#15#14#14#15#15
+  +#14#14#14#14#13#13' ##'#13#13#14'000yyy0000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000000000000000000000000000000////'
+  +'/////......---,,,+++***)))((((((''''''&&&&&&%%%%%%$$$$$$$$$$$$$$$$$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$888LLLLLLLLLLLL...*'
+  +'**+++,,,---...///111222222333333333444555555555555555666777777888999999:::;'
+  +';;;;;<<<<<<===>>>>>>>>>999333***%%%%%%%%%%%%%%%&&&CCCWWWtttttttttXXX:::'''''
+  +'''''''''''''''''''''((((((((((((((((((((((((((()))))))))************GGGPPPP'
+  +'PPGGG*********++++++++++++++++++QQQ'#194#194#194#194#194#194#194#194#194'++'
+  +'++++++++++++++++++++++++++++QQQQQQPPPPPP===************)***********)))())))'
+  +')''''''(''(ONONNNNONNNN''''''''''''''''''''&&&&''&&&%%%%%&%%%888LLLLLL$$$$$'
+  +'$$$$#$$$$$>>>dddwwwwww\\\444!"!""!!"!!!!!!!"""(('')('')(((((''(('''''''''''
+  +''''''''''''''':::NNMuutttukkkCCC&&&&&%&&%!!!'#31#31#31#31#30' '#31#31#31#31
+  +#31#31#31#31#31'!!!&''&&''&&''&&&&&&&&&&&&&&&%%&%%%%&%%%%%%%%%%%$$$$$$$$$$$$'
+  +'$$$$$$$$#$##$$"$$"##"#""#"""""!!!""""""""""""!""!"""#""""$$"$$$$##$##&%%&%&'
+  +'''&&''''''''''''(''(''(()((((()))))))))(()(((((''(''((''''''''''''''&''&''&'
+  +'&&&&&&&&&&%%%&%%%%%%%%%%%%%$%$%$%%%$$$$$$$$$#$$#$$###$##$#"#""#"""""""!""!"'
+  +'"!"""!!! '#31' '#31#31#31#31' '#31#31#31#31#31#31#31#31#30#30#31#31#30#30#30
+  +#30#30#30#30#30#30#30#30#30#30#29#30#30#30#30#30#30#29#30#29#29#29#28#29#28
+  +#28#29#29#29#29#29#28#29#28#28#28#28#28#28#28#28#28#27#28#27#28#27#27#28#28
+  +#28#27#27#27#27#27#26#26#26#26#26#26#26#25#26#25#26#26#26#25#26#25#25#26#25
+  +#25#25#24#25#25#25#25#24#24#25#24#24#24#24#24#24#23#24#24#24#24#24#24#23#23
+  +#23#23#24#23#24#23#23#23#23#23#23#23#21#20#21#19#20#19#19#19#19#19#19#19#20
+  +#19#20#23#23#23'*)*333:9:?@?EEE223'#17#16#17#17#16#16#16#16#16#16#16#16#15#16
+  +#16#16#15#16#16#15#16#15#16#16#15#15#15#15#15#16#15#15#15#15#15#15#14#15#14
+  +#14#14#15#15#15#15#14#14#14#14#14#14'# #'#14#13#13'000yyy0000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000/////////......---,,,+++***)))((((((''''''&&&%%%%%%%%%$$$$$$$'
+  +'$$'#156#156#156#196#196#196#196#196#196#156#156#156'$$$$$$$$$$$$$$$$$$$$$$$'
+  +'$...'#176#176#176#196#196#196#196#196#196#196#196#196'```$$$$$$$$$$$$```'
+  +#166#166#166#196#196#196#196#196#196#196#196#196#196#196#196#196#196#196#196
+  +#196#196#166#166#166'xxx,,,---///000222'#196#196#196#196#196#196#196#196#196
+  +'YYY666666777777777~~~'#196#196#196#196#196#196#152#152#152'999:::;;;;;;<<<N'
+  +'NN'#196#196#196#196#196#196#196#196#196'666222+++$$$$$$$$$%%%%%%%%%%%%///uu'
+  +'u'#176#176#176#196#196#196#196#196#196#196#196#196#196#196#196#196#196#196
+  +#196#196#196#196#196#196#176#176#176'uuu111''''''''''''''''''''''''''''''((('
+  +'(((((((((((('#157#157#157#196#196#196#196#196#196'OOO(((mmm'#177#177#177#196
+  +#196#196#196#196#196#196#196#196#196#196#196#177#177#177'www444*************'
+  +'*****QQQ'#196#196#196#196#196#196#196#196#196'*********************GGG'#138
+  +#138#138#196#196#196#196#196#196#196#196#196#196#196#196#196#196#196#196#196
+  +#196#177#177#177#138#138#138'PPP))))))(((((''(((''(''(''(EEE'#137#137#137#196
+  +#196#196#196#196#196#196#196#196#196#196#196#196#196#196#196#196#196#147#147
+  +#146'&&&%%&&&%$$$$$%BBB'#156#156#156#196#196#196#196#196#196#196#196#196#196
+  +#196#196'$$$###VVV'#166#166#166#196#196#196#196#196#196#196#196#196#196#196
+  +#196#196#196#196#186#186#186'```!!!!!!!!!!!!!!!###((()''(('''''''''''''''''''
+  +'''''lll'#166#166#166#196#196#196#196#196#196#196#196#196#196#196#196#196#196
+  +#196#196#196#196#176#176#176'NNM&&%&%$!!!'#30#30#31#31#31#31#196#196#196#196
+  ,#196#196#196#196#196#196#196#196#196#196#196#196#196#196#196#196#196#176#176
+  +#176#137#137#137'XXX&%&&%%&%%%%$%%%%$$%$$%$$$$$ttt'#196#196#196#196#196#196
+  +#156#156#156'$$$$$$#$###"$$"$""-,,'#186#186#186#196#196#196#196#196#196#196
+  +#196#196'___""""""""!#""""#$##$$#$$#%$$&%%''&&''''&''''''''''''(((((())()())'
+  +'**))))())))))((((((''(''''(''''''&''''&''&''&&&&''&&&&&&%&&%&%%&%%%%%%%%%%$'
+  +'%%$$$$%$$$$$%$$$$##$##$$###"#""""""!""!"#""""!"!!      '#31' '#31#31' '#31
+  +#31#31#31#31#31#31#31#31#31#30#31#30#30#30#30#31#30#30#30#30#30#30#30#30#29
+  +#30#29#29#29#29#29#29#30#29#29#29#29#29#29#29#29#29#28#29#29#29#28#29#29#28
+  +#28#28#28#28#28#28#28#27#27#28#28#28#28#28#27#28#27#27#27#27#27#27#27#26#26
+  +#27#26#26#27#25#26#26#25#25#26#25#25#26#25#25#25#25#25#25#25#25#24#25#25#24
+  +#24#24#24#24#24#24#24#24#24#24#24#24#24#24#23#24#24#24#24#24#23#23#23#22#22
+  +#22#20#20#19#20#20#20#19#20#20#20#20#20#21#21#21#28#28#29'///555=<<BBBFFF'#27
+  +#27#27#17#16#17#16#17#17#17#16#17#16#16#16#16#16#17#16#16#16#16#15#16#15#16
+  +#16#15#15#15#16#16#16#16#15#15#15#15#15#14#14#15#15#15#15#15#14#14#14#14#14
+  +#14#14#14'###'#14#14#13'000yyy0000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000000000000000000000//////......-'
+  +'-----,,,+++***)))(((''''''''''''&&&%%%%%%$$$$$$$$$$$$'#158#158#158#199#199
+  +#199#199#199#199#158#158#158'$$$$$$$$$$$$$$$$$$$$$$$$'#138#138#138#199#199
+  +#199#199#199#199#199#199#199'$$$$$$$$$...'#158#158#158#199#199#199#199#199
+  +#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199
+  +#199#199#199#199#199#199',,,---///222555'#199#199#199#199#199#199#199#199#199
+  +'\\\888888999999999'#129#129#129#199#199#199#199#199#199#129#129#129';;;<<<='
+  +'==<<<777222'#199#199#199#199#199#199#199#199#199'$$$$$$$$$$$$$$$$$$$$$$$$%%'
+  +'%lll'#189#189#189#199#199#199#199#199#199#199#199#199#199#199#199#199#199
+  +#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199
+  +#189#189#189'YYY&&&&&&'''''''''''''''''''''''''''''''''''''''''''#159#159#159
+  +#199#199#199#199#199#199'PPP'#139#139#139#199#199#199#199#199#199#199#199#199
+  +#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199#179#179#179'FFF'
+  +')))))))))))))))QQQ'#199#199#199#199#199#199#199#199#199'))))))))))))))))))d'
+  +'dd'#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199
+  +#199#199#199#199#199#199#199#199#199#199#199#199'xxx((((((((((((((((((nnn'
+  +#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199
+  +#199#199#199#199#199#158#158#158'%%%%$%%%%%%%/..'#189#189#189#199#199#199#199
+  +#199#199#199#199#199#199#199#199#199#199#199'$#$$$$vvv'#199#199#199#199#199
+  +#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199
+  +'UVU!!!!!!!!!!!!!!!%$%(''''('''''''''''''''''''''''#159#159#159#199#199#199
+  +#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199
+  +#199#199#199#199#199'NNN&&%%%$!!!'#31#31#31#199#199#199#199#199#199#199#199
+  +#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199#199
+  +#199#199#199#179#179#179'NNN&&%&%%&%%&%%&$$%$$%$$vvv'#199#199#199#199#199#199
+  +#158#158#158'$$$$$$$#$$##$$####'#168#168#168#199#199#199#199#199#199#199#199
+  +#199'```""""""""""""######$$$$$$$%#%%$&%$&&&''''&''''''(''(((((''(())(((*)*)'
+  +'))))))))))((())((((''((''''''''''''''''''&''''&&&&&&&&&&&&%&%&%&&%%%%%%%%%%'
+  +'%%$%%$%$$$%$$$$$$#$#$$#""##""""""!""!!"!"!!!!        '#31#31' '#31#31#31#31
+  +' '#31#31#31#31#31#31#31#31#30#31#31#30#30#31#30#30#30#31#30#30#30#30#30#30
+  +#30#30#30#30#30#30#30#30#29#30#29#29#29#29#29#29#29#29#28#28#28#28#27#28#28
+  +#27#28#28#28#28#28#28#28#27#28#28#28#28#28#28#28#27#27#27#27#27#27#26#26#27
+  +#26#26#27#26#26#26#25#26#26#26#25#26#26#26#26#25#25#25#25#25#25#25#25#24#25
+  +#24#25#25#24#24#24#25#24#24#24#24#24#23#23#24#23#24#23#23#23#23#23#21#21#21
+  +#20#20#20#20#20#20#19#19#19#21#20#21#24#24#24'''''''222999@?@EDD:99'#17#17#17
+  +#17#17#17#16#17#17#17#17#17#16#16#16#17#16#16#16#16#16#16#16#16#15#16#16#15
+  +#16#16#16#16#16#15#16#16#15#15#16#15#15#15#14#14#15#14#15#15#14#14#14#14#14
+  +#14'###'#14#14#14'000yyy0000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000000000000000//////......------,'
+  +',,+++***)))(((''''''''''''&&&%%%%%%$$$$$$$$$$$$'#129#129#129#201#201#201#201
+  +#201#201'www$$$$$$$$$$$$$$$$$$$$$XXX'#201#201#201#201#201#201#201#201#201#149
+  +#149#149'$$$$$$$$$...'#170#170#170#201#201#201#201#201#201#201#201#201#180
+  +#180#180'wwwMMMMMMbbb'#129#129#129#191#191#191#201#201#201'---...///333666'
+  ,#201#201#201#201#201#201#201#201#201'::::::;;;;;;;;;;;;'#130#130#130#201#201
+  +#201#201#201#201'~~~000***''''''$$$$$$$$$'#201#201#201#201#201#201#201#201
+  +#201'$$$$$$$$$$$$$$$$$$$$$$$$'#139#139#139#201#201#201#201#201#201#201#201
+  +#201#201#201#201#191#191#191#139#139#139'wwwwwwwww'#150#150#150#191#191#191
+  +#201#201#201#201#201#201#201#201#201#201#201#201#140#140#140'&&&&&&&&&&&&&&&'
+  +'&&&'''''''''''''#160#160#160#201#201#201#201#201#201#171#171#171#201#201#201
+  +#201#201#201#191#191#191#130#130#130'yyyyyy'#181#181#181#201#201#201#201#201
+  +#201#201#201#201#191#191#191'<<<((((((((((((PPP'#201#201#201#201#201#201#201
+  +#201#201'(((((((((((((((eee'#201#201#201#201#201#201#201#201#201#191#191#191
+  +#140#140#140'eeePPP[[[yyy'#171#171#171#201#201#201'yyy'''''''''''''''''''''''
+  +'''''''''xxx'#201#201#201#201#201#201#201#201#201#201#201#201#150#150#150'wx'
+  +'xxxx'#139#139#140#191#191#191#160#160#160'%%%%%%%%%$$$'#129#129#129#201#201
+  +#201#201#201#201#201#201#201#160#160#160'www'#180#180#180'$$$$$$vvv'#201#201
+  +#201#139#138#138'CCD(((444'#141#141#141#201#201#201#201#201#201#181#181#181
+  +'!!!!!!   !     !!!''''''('''''''''''''''''''''''#160#160#160#201#201#201#160
+  +#160#160'ddd;;;;;:nnn'#191#191#191#201#201#201#201#201#201#181#181#180'&&%&%'
+  +'%%%%!!!'#201#201#201#201#201#201#201#201#201#169#169#169#158#158#158#158#158
+  +#158#191#191#191#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201
+  +'ccc&%%&&%&&%&%$%$$%$$www'#201#201#201#201#201#201#160#160#160'$$$$$$$$$$$$#'
+  +'$#'#139#139#138#201#201#201#201#201#201#201#201#201'vvv"""""""""###"""#####'
+  +'#$$$$$$$$$&&$&&%''&&(''&(''''((())()(()))))(*))**)*)*)*)))))()()))(''((''('
+  +'''''(''''''''&''''''&&&&&&&&&&&%&&&%&&%%%%%%%&%%%%%%%%$$$%$%$$$$$$##""#"##"'
+  +'"#""""""""""!!!   !            '#31#31#31#31#31#31'  '#31#31#31#31#31#31#31
+  +#31#30#31#31#31#31#30#31#30#30#30#30#30#30#30#29#30#30#29#30#30#29#29#30#29
+  +#29#29#29#28#28#28#24#24#24#25#25#25#25#24#24#25#24#24#24#24#25#25#24#25#25
+  +#25#24#25#26#26#25#26#26#27#26#27#26#27#26#26#26#26#27#25#25#26#26#26#26#26
+  +#25#26#25#25#25#25#25#25#25#24#25#24#25#25#25#24#24#24#24#24#24#25#24#24#23
+  +#24#23#24#24#23#24#23#22#23#20#21#20#20#20#20#20#20#20#21#21#21#22#22#22#28
+  +#29#30'//.555<<<BBAFGG#""'#17#17#17#17#17#17#17#17#17#17#17#17#17#17#16#17#16
+  +#17#16#16#16#16#16#16#16#16#16#16#16#16#16#15#16#15#16#15#15#15#15#15#15#15
+  +#15#15#15#14#15#15#15#15#14#14#14#14'##&'#14#14#14'000yyy0000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000//////......------,,,+++***)))(((''''''&&&&&&%%%%%%$$$$$$$$$$'
+  +'$$xxx'#203#203#203#203#203#203'xxx$$$$$$$$$$$$$$$$$$...'#193#193#193#203#203
+  +#203#203#203#203#182#182#182'...$$$$$$$$$xxx'#203#203#203#203#203#203#203#203
+  +#203'mmm$$$$$$$$$$$$$$$$$$$$$xxx,,,///222555888'#203#203#203#203#203#203#203
+  +#203#203'555444//////******xxx'#203#203#203#203#203#203'xxx$$$$$$$$$$$$$$$$$'
+  +'$'#203#203#203#203#203#203#203#203#203'$$$$$$$$$$$$$$$$$$$$$'#140#140#140
+  +#203#203#203#203#203#203#203#203#203#193#193#193'ccc$$$$$$%%%%%%%%%%%%%%%nnn'
+  +#193#193#193#203#203#203#203#203#203#203#203#203#141#141#141'%%%&&&&&&&&&&&&'
+  +'&&&&&&'#162#162#162#203#203#203#203#203#203#203#203#203#203#203#203#141#141
+  +#141'111''''''''''''''''''''''''ooo'#203#203#203#203#203#203#203#203#203#162
+  +#162#162'''''''''''''''''''''''''PPP'#203#203#203#203#203#203#203#203#203''''
+  +'''''''''''''''''''''''FFF'#203#203#203#203#203#203#203#203#203#162#162#162
+  +'111''''''''''''''''''''''''''''''''''''PPPeee''''''''''''''''''&&&OOO'#203
+  +#203#203#203#203#203#203#203#203#172#172#172'::;%&%&%%%%&%%%./.mmm$$$$$$$$$$'
+  +'$$'#182#182#182#203#203#203#203#203#203#130#130#130'$$$$$$#########wwwbbb""'
+  +'#"##'''''')*)454'#203#203#203#203#203#203#203#203#203'@AA! ! !!  !   !!!('''
+  +'''(''''('''''''''''''''''#152#152#152'ZZZ''''''''''''''''''''''''''''''dee'
+  +#203#203#203#203#203#203#203#203#203'EED&%%&%%&%%'#203#203#203#203#203#203
+  +#203#203#203'KIJ'#31#31#31#31#31#31#31#30#31'676'#141#141#141#203#203#203#203
+  +#203#203#203#203#203#203#203#203'ddd&%%%%%&%%%%$%%$xxx'#203#203#203#203#203
+  +#203#161#161#161'$$$$$$$$$$$$xwx'#203#203#203#203#203#203#203#203#203#140#139
+  +#140'#""#""""""""#""""#######$$$$$$%%$&&%&&%''''&(''''''''''(''())()((*)))()'
+  +'*)*)**))*))*)))))())())()(''((''(''((''''''''''''&''&''&''&''''&''&&&&&&%%&'
+  +'&&&%%%%%%%$%%%%$%$$$$###########"###"##""""""" !!!!!  !!       '#31'  '#31
+  +#31#31#31#31' '#31#31' '#31#31' '#31#31#31#31#31#31#31#31#30#31#30#31#30#30
+  +#30#30#30#30#30#30#30#30#30#30#29#30#30#29#29#30#25#25#26#25#25#25#25#25#25
+  +#24#25#25#24#24#24#24#24#25#24#24#24#24#23#24#23#24#24#24#23#23#23#23#24#23
+  +#23#24#23#23#23#23#23#23#23#24#24#24#24#24#24#24#24#24#24#24#25#24#25#25#25
+  +#25#25#25#24#24#25#24#25#25#24#24#24#25#24#24#24#24#24#24#22#21#22#20#21#21
+  ,#20#20#20#20#20#21#21#21#21#24#24#23'(((332999@@@EED@A@'#18#18#18#18#18#18#17
+  +#18#18#17#17#17#17#17#16#16#16#17#16#17#16#16#17#16#16#16#16#16#16#16#16#16
+  +#16#16#16#16#16#16#16#15#15#16#16#15#16#15#15#15#15#15#15#15#15#14#15#15#15
+  +'&&&'#14#14#14'000yyy0000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000000000000//////......------,,,+'
+  +'++***)))(((''''''&&&&&&%%%%%%$$$$$$$$$$$$yyy'#206#206#206#206#206#206'yyy$$'
+  +'$$$$$$$$$$$$$$$$'#163#163#163#206#206#206#206#206#206#206#206#206'DDD$$$$$$'
+  +'$$$///'#206#206#206#206#206#206#206#206#206'ooo$$$$$$$$$$$$$$$$$$$$$$$$$$$%'
+  +'%%''''''''''''''''''$$$'#206#206#206#206#206#206#206#206#206'$$$$$$$$$$$$$$'
+  +'$$$$yyy'#206#206#206#206#206#206'yyy$$$$$$$$$$$$$$$$$$'#206#206#206#206#206
+  +#206#206#206#206'$$$$$$$$$$$$$$$$$$'#131#131#131#206#206#206#206#206#206#206
+  +#206#206#163#163#163'///$$$$$$$$$$$$$$$$$$$$$$$$%%%000'#174#174#174#206#206
+  +#206#206#206#206#206#206#206'zzz%%%%%%%%%%%%%%%%%%'#164#164#164#206#206#206
+  +#206#206#206#206#206#206#143#143#143'&&&&&&&&&&&&&&&&&&&&&eee'#206#206#206
+  +#206#206#206#206#206#206'PPP''''''''''''''''''QQQ'#206#206#206#206#206#206
+  +#206#206#206''''''''''''''''''''''''''#154#154#154#206#206#206#206#206#206
+  +#175#175#175'''''''&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&'#164#164#164#206
+  +#206#206#206#206#206#174#174#174'0/0$%$%%%$$$$$$%$%$%$$%$$$$$$$$$$$$$'#206
+  +#206#206#206#206#206#206#206#206'988#$##$########$#888###"##""#'''''')))*)*'
+  +#175#175#175#206#206#206#206#206#206'LLL!!!    !  ! $$$(''((''''('''''''''''
+  +'''''''FFF''''''''''''''''''''''''''''''''''''&'''''#206#206#206#206#206#206
+  +#206#206#206'QQO''&%&%%%$$'#206#206#206#206#206#206#206#206#206'KKK'#31#30#31
+  +#31#31#31#31#31#31#31#31#31#31#31#31'DED'#195#195#195#206#206#206#206#206#206
+  +#195#195#195';;:%&%%&%&&$%%%zyy'#206#206#206#206#206#206#163#163#163'$$$$$$$'
+  +'$$ddd'#206#206#206#206#206#206#206#206#206#163#163#163'##"#""$"""""""""###"'
+  +'#$##$##$$$%%%%%%&&&&&&''''&(('')(()(''*)()))*))))))**)****)*))*))))))()))))'
+  +'()((''((((''''(''''''''''''&&&''&''&''&&&&%%&%&%&%&&%%%%%%%%%%$%$##$#######'
+  +'#####""####"#""!""!!!!!!!!!!     !   '#31'   '#31#31' '#31#31#31#31'  '#31
+  +#31#31#30#31#31#31#31#31#31#30#31#31#30#31#30#30#30#30#30#30#30#30#30#30#30
+  +#30#26#27#26#25#25#25#25#25#25#25#25#25#24#25#25#24#25#24#24#24#25#24#24#24
+  +#24#24#24#24#24#24#23#23#24#24#24#24#23#24#24#24#24#23#23#23#23#23#23#23#23
+  +#22#23#22#22#22#23#23#22#22#22#22#22#22#22#22#21#22#22#22#22#23#23#23#22#23
+  +#22#23#23#23#22#22#22#21#20#21#21#20#20#20#21#21#22#21#21#22#22#22#29#29#30
+  +'/./566<<<CBBGGG&&&'#17#17#18#18#17#18#17#17#17#17#17#18#17#17#17#17#17#17#17
+  +#17#16#17#16#16#16#17#17#16#16#16#16#16#16#16#16#16#16#16#15#16#16#15#15#15
+  +#16#15#15#15#15#15#15#15#15#15#14#15#15'#&#'#14#14#14'000yyy0000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000//////......------,,,+++***)))(((''''''&&&&&&%%%%%%$$$$$$$'
+  +'$$$$$zzz'#208#208#208#208#208#208'zzz$$$$$$$$$$$$$$$eee'#208#208#208#208#208
+  +#208#208#208#208'zzz$$$$$$$$$$$$ppp'#208#208#208#208#208#208#165#165#165'$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'#208#208#208#208#208#208#208#208
+  +#208'$$$$$$$$$$$$$$$$$$zzz'#208#208#208#208#208#208'zzz$$$$$$$$$$$$$$$$$$'
+  +#208#208#208#208#208#208#208#208#208'$$$$$$$$$$$$$$$OOO'#208#208#208#208#208
+  +#208#208#208#208#165#165#165'$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$///'#176#176
+  +#176#208#208#208#208#208#208#208#208#208'EEE%%%%%%%%%%%%%%%'#165#165#165#208
+  +#208#208#208#208#208#197#197#197'000%%%%%%%%%&&&&&&&&&&&&&&&'#165#165#165#208
+  +#208#208#208#208#208#155#155#155'&&&&&&&&&QQQ'#208#208#208#208#208#208#208
+  +#208#208'&&&&&&&&&111'#208#208#208#208#208#208#208#208#208';;;&&&&&&&&&&&&&&'
+  +'&&&&&&&&&&&&&&&&%%%%%%%%%EEE'#208#208#208#208#208#208#208#208#208':::%%%%%$'
+  +'$%%%$$%$%%%%$$$$$$$$$$$$$$$$$$'#208#208#208#208#208#208#208#208#208'#$#####'
+  +'#$###$##$########!""$$$&&''(''''STS'#208#208#208#208#208#208#208#208#208'77'
+  +'7!!!  ! ! !!!(''((''''(''''(''''('''''''''''''''''''''''''''''''''''''''''''
+  +'''''''''''<;<'#208#208#208#208#208#208#208#208#208'QQQ&&&''%&&%%'#208#208
+  +#208#208#208#208#208#208#208'KLK'#31#30#31#31#31' '#31#31#31#31#31#31#31#31
+  +#31#30#31#31'CDC'#208#208#208#208#208#208#208#208#208#144#144#144'&&&&&%&&%%'
+  +'%${{z'#208#208#208#208#208#208#165#165#165'$$$$$$DDD'#208#208#208#208#208
+  +#208#208#208#208#176#176#175'//.$#"$$##"##""#""#""""###$$##$$$%%%%%%&&&&'''''
+  +'''''''((''))()(()))*))****))******)**)*)**)))*))))))(()(()((''((''(''''('''
+  ,'''''&''''&&&&''&''&&&&%&&&&%&&%%%%%%%$$$$$#$##$$###########"#"##""""!""!!"!'
+  +'!!!!!!!!  !      '#31#31'      '#31' '#31#31' '#31#31#31#31#31#31#31#31#31
+  +#30#30#30#31#31#30#30#30#30#30#30#30#30#28#28#27#26#25#25#25#25#25#25#25#26
+  +#25#25#26#25#25#25#25#25#25#25#24#25#25#24#25#25#24#24#24#24#24#24#24#23#23
+  +#23#24#23#23#23#24#23#24#23#23#23#23#23#23#23#23#23#23#22#23#22#22#22#22#22
+  +#22#22#22#22#22#22#22#22#22#22#22#21#22#21#22#21#21#22#22#21#21#21#21#21#21
+  +#21#21#21#20#20#21#21#22#21#24#24#24'(((333:9:@@@EEEAAA'#18#18#18#17#17#18#18
+  +#18#18#17#18#17#17#18#17#18#17#17#17#17#17#17#17#17#17#16#17#17#17#17#16#17
+  +#16#17#16#16#16#16#16#16#16#16#16#15#15#15#16#15#15#15#16#15#15#15#15#15#15
+  +#14#15#15'&&#'#15#14#15'000yyy0000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000000000000000000000//////......-'
+  +'--,,,,,,+++***)))(((''''''&&&&&&%%%%%%$$$$$$$$$$$$|||'#211#211#211#211#211
+  +#211'|||$$$$$$$$$$$$///'#200#200#200#211#211#211#211#211#211#178#178#178'$$$'
+  +'$$$$$$$$$$$$'#156#156#156#211#211#211#211#211#211'fff$$$$$$$$$$$$$$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$$$'#211#211#211#211#211#211#211#211#211'$$$$$$$$$$$$$$'
+  +'$$$$|||'#211#211#211#211#211#211'|||$$$$$$$$$$$$$$$$$$'#211#211#211#211#211
+  +#211#211#211#211'$$$$$$$$$$$$$$$'#189#189#189#211#211#211#211#211#211#189#189
+  +#189'///$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$///'#200#200#200#211#211#211
+  +#211#211#211#167#167#167'$$$$$$$$$%%%%%%'#167#167#167#211#211#211#211#211#211
+  +#135#135#135'%%%%%%%%%%%%%%%%%%%%%%%%%%%\\\'#211#211#211#211#211#211#200#200
+  +#200'%%%%%%%%%QQQ'#211#211#211#211#211#211#211#211#211'%%%%%%%%%QQQ'#211#211
+  +#211#211#211#211#178#178#178'%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%|||'
+  +#211#211#211#211#211#211#156#156#156'%%%%%$%%%$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'
+  +#211#211#211#211#211#211#211#211#211'$$#$#$######"#""""""""""!""$$$&&''^]^'
+  +#200#200#200#211#211#211#211#211#211#189#189#189'!!!!!!!!!!!!$$$)(()''''('''
+  +'''((''('''''''''''''''''''''''''''''''''''''''''''''''''''''#157#157#157#211
+  +#211#211#211#211#211#211#211#211'QRQ&&&&%%&%&'#211#211#211#211#211#211#211
+  +#211#211'PPP!! '#31#30#31#31#30#31#31#31#31#31#31#31#31#31#31#31#31#31'zyz'
+  +#211#211#211#211#211#211#211#211#211'111&%&&&%%%%|}|'#211#211#211#211#211#211
+  +#167#167#167'%$$EEE'#200#200#200#211#211#211#211#211#211#200#200#200'//.$$#$'
+  +'$#$#"$#"##"###$"##"#$$$$##%%$%%%&&&&%&''''''''(''((()))))(*)))))**)**)+****'
+  +'********)*))*)))))))))))(()()((((''(''''(''''''''''''''''''''''&''&&&&&%&&%'
+  +'&&%&%$%$##$##$$#$$$$$$####$$##"#""#""""!"!!"!"!!!!!! !!!  !          '#31' '
+  +#31' '#31'   '#31#31#31#31#31#31#31#31#30#31#30#31#31#30#30#30#30#30#29#30#26
+  +#25#26#26#25#26#25#25#25#25#25#26#25#25#25#25#25#25#25#25#25#25#24#25#25#24
+  +#25#24#24#24#25#25#25#24#24#24#24#24#24#24#24#24#24#24#24#24#24#23#23#23#23
+  +#23#23#23#22#23#22#22#23#23#23#22#23#22#22#22#22#23#22#22#22#22#22#21#22#22
+  +#22#22#22#21#21#22#21#21#21#21#21#21#21#21#22#22#21#22#23#23#30#30#30'000666'
+  +'>>>BCCGGH''&&'#18#18#18#18#19#18#18#18#18#18#18#17#18#17#18#17#18#18#17#17
+  +#18#17#17#17#17#17#16#17#16#17#17#16#17#17#16#16#16#16#17#16#16#16#16#15#16
+  +#16#15#16#15#16#15#15#16#15#15#16#15#15#15#15'&#&'#15#15#15'000yyy0000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000//////......---,,,,,,+++***)))(((''''''&&&&&&%%%%%%$'
+  +'$$$$$$$$$$$}}}'#213#213#213#213#213#213'}}}$$$$$$$$$$$$'#157#157#157#213#213
+  +#213#213#213#213#202#202#202':::$$$$$$$$$$$$$$$'#169#169#169#213#213#213#213
+  +#213#213#213#213#213#180#180#180#169#169#169'}}}rrrPPP:::$$$$$$$$$$$$$$$$$$$'
+  +'$$$$$$$$'#213#213#213#213#213#213#213#213#213'$$$$$$$$$$$$$$$$$$}}}'#213#213
+  +#213#213#213#213'}}}$$$$$$$$$$$$$$$$$$'#213#213#213#213#213#213#213#213#213
+  +'$$$$$$$$$$$$\\\'#213#213#213#213#213#213#213#213#213'\\\$$$$$$$$$$$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$$$$$$ggg'#213#213#213#213#213#213#213#213#213'EEE$$$$$'
+  +'$$$$$$$'#169#169#169#213#213#213#213#213#213'PPP$$$$$$$$$$$$%%%%%%%%%%%%%%%'
+  +'%%%'#213#213#213#213#213#213#213#213#213'%%%%%%%%%QQQ'#213#213#213#213#213
+  +#213#213#213#213'%%%%%%%%%}}}'#213#213#213#213#213#213#213#213#213#191#191
+  +#191#169#169#169#136#136#136'}}}QQQFFF%%%%%%%%%%%%%%%$$$$$$$$$'#135#135#135
+  +#213#213#213#213#213#213'}}}$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'#213#213
+  +#213#213#213#213#213#213#213'"####"#"#""##""#""""""""$$$000'#137#136#137#213
+  +#213#213#213#213#213#213#213#213#213#213#213'YYY!!!!!!!!!!!!(''())((('')''()'
+  +'''''(''('''''''''''''''''''''''''''''''''''''''''''#147#147#147#213#213#213
+  ,#213#213#213#213#213#213#191#191#191'&''&&''%&&&''%%'#213#213#213#213#213#213
+  +#213#213#213'QQQ%%$"!"'#31#30'  '#30#31#31#31#31#31#31#31#31#30#31'666'#213
+  +#213#213#213#213#213#213#213#213'RRR&%&&%&%&%}}}'#213#213#213#213#213#213#169
+  +#169#169'0//'#180#180#180#213#213#213#213#213#213#202#202#202'EEE$$$$$$$$$$$'
+  +'#$$"#$#$##$$#$##$$#$$$%$%%%%&&&''''''''''''(((()(**)**)**)+**+*****+**+****'
+  +'*******)*))))))))))())(()((()(''((''(''''(''''''''&''&''''&''&&&&&&%%%$$##$'
+  +'#$##%$#$##$$#$$####$#"##"#""#!""!""!""!!!!!!!!!!!! !!!          '#31' '#31
+  +' '#31'  '#31#31#31#31#31#31#31#31#31#31#31#31#31#31#30#30#30#26#26#26#26#25
+  +#26#26#25#26#26#25#26#26#26#27#27#26#26#29#29#29'''(''##$###'#31' '#31#30#30
+  +#29#26#26#26#25#25#25#25#25#25#25#25#24#25#25#24#25#24#24#23#23#23#23#23#23
+  +#23#23#23#22#23#22#23#22#22#23#23#22#22#22#22#21#22#22#22#22#21#21#21#22#21
+  +#22#22#21#22#21#21#21#21#22#22#22#25#25#25'+,,444:::@@@FEFBAA'#19#18#19#19#19
+  +#18#18#18#18#18#18#18#18#18#18#18#18#18#18#17#17#17#17#18#17#17#17#17#17#17
+  +#17#17#17#17#17#16#16#17#17#16#16#16#16#16#16#16#16#16#16#16#16#15#16#15#15
+  +#16#15#15#15#15#15#16#15'&&&'#15#15#15'000yyy0000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00//////......---,,,,,,+++***)))(((''''''&&&&&&%%%%%%$$$$$$$$$$$$~~~'#216
+  +#216#216#216#216#216'~~~$$$$$$$$$QQQ'#216#216#216#216#216#216#216#216#216'ss'
+  +'s$$$$$$$$$$$$$$$$$$'#171#171#171#216#216#216#216#216#216#216#216#216#216#216
+  +#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216
+  +#182#182#182#171#171#171'~~~sss;;;$$$$$$$$$'#216#216#216#216#216#216#216#216
+  +#216'$$$$$$$$$$$$$$$$$$~~~'#216#216#216#216#216#216'~~~$$$$$$$$$$$$$$$$$$'
+  +#216#216#216#216#216#216#216#216#216'$$$$$$$$$$$$'#148#148#148#216#216#216
+  +#216#216#216#182#182#182'$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'
+  +#193#193#193#216#216#216#216#216#216#137#137#137'$$$$$$$$$$$$'#171#171#171
+  +#216#216#216#216#216#216'QQQ$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'#216#216#216#216
+  +#216#216#216#216#216'QQQ$$$$$$QQQ'#216#216#216#216#216#216#216#216#216'$$$$$'
+  +'$$$$~~~'#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216
+  +#216#216#216#216#216#216#216#216#216#216#216#216#216#205#205#205#171#171#171
+  +#148#148#148'~~~\\\$$$$$$'#171#171#171#216#216#216#216#216#216'hhh$$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$#$##$$##$##$##'#216#216#216#216#216#216#216#216#216'####"##"'
+  +'"###""#"##"#"##"FFG'#194#194#194#216#216#216#216#216#216#216#216#216#216#216
+  +#216'efe!!!!!!!!!!!!$$$))()('')(''(''(('''')(''('''''''''''''''''''''''''''''
+  +'HHH'#183#183#183#216#216#216#216#216#216#216#216#216#216#216#216'__^''''&&'
+  +'''&&&&&&%'#216#216#216#216#216#216#216#216#216'RRR$$%%$$##$ '#31'  '#30#31
+  +#31#31#31#31#31#31#31#30#31#193#193#193#216#216#216#216#216#216'}}}%%%&&&%&&'
+  +''#216#216#216#216#216#216#171#171#171#171#171#171#216#216#216#216#216#216
+  +#216#216#216'\\\$$$$$$$$$$$$#$##$###"$##$##$##%$$$$$$$%&&%&&&''(''(((((((((*'
+  +'))*****)++*+*)***++*+*++**+***))**)***))*)))))))))))(()))('')(''(''''('''''
+  +'''''''&&&%%&$%%$$$$$#$$#$$$$##%#$$##$$#$#######"#""#""""""!""!""!!!!!!!!! !'
+  +'!  !              '#31'  '#31' '#31#31'  '#31#31#31#31#31#31#27#27#26#26#25
+  +#27#26#25#26#26#25#26#27#26#27#26#26#27#29#29#28'+,+--..........-,---,,,-)))'
+  +'(''($#$"!"'#30#30#31#28#29#29#25#25#25#24#24#24#23#23#24#23#24#23#23#23#24
+  +#23#23#23#22#22#22#22#21#22#21#22#22#22#21#21#22#23#22#24#24#24'###111777>>>'
+  +'DDDHHH!! '#19#19#18#19#19#19#18#18#19#18#19#18#18#18#18#17#18#18#17#18#18#17
+  +#18#17#18#17#17#17#17#17#17#17#17#17#16#17#16#17#17#17#17#17#17#16#16#17#16
+  +#16#16#16#16#16#16#16#15#16#15#15#15#16#15#15#15'&&&'#15#15#15'000yyy0000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000//////......---,,,,,,+++***)))(((''''''&&&&&&%%%%'
+  +'%%$$$$$$$$$$$$'#128#128#128#219#219#219#219#219#219#128#128#128'$$$$$$$$$'
+  +#196#196#196#219#219#219#219#219#219#162#162#162'$$$$$$$$$$$$$$$$$$$$$'#173
+  +#173#173#219#219#219#219#219#219#139#139#139#139#139#139#173#173#173#185#185
+  +#185#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219
+  +#219#219#219#219#219#219#128#128#128'$$$$$$$$$'#219#219#219#219#219#219#219
+  +#219#219'$$$$$$$$$$$$$$$$$$'#128#128#128#219#219#219#219#219#219#128#128#128
+  +'$$$$$$$$$$$$$$$$$$'#219#219#219#219#219#219#219#219#219'$$$$$$$$$$$$'#208
+  +#208#208#219#219#219#219#219#219'ttt$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'
+  +'$$$$$$$$$$$'#139#139#139#219#219#219#219#219#219#196#196#196'$$$$$$$$$$$$'
+  ,#173#173#173#219#219#219#219#219#219'RRR$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'#219
+  +#219#219#219#219#219#219#219#219'///$$$$$$RRR'#219#219#219#219#219#219#219
+  +#219#219'$$$$$$$$$'#128#128#128#219#219#219#219#219#219#173#173#173#128#128
+  +#128#162#162#162#173#173#173#219#219#219#219#219#219#219#219#219#219#219#219
+  +#219#219#219#219#219#219#219#219#219#219#219#219#185#185#185'$$$$$$'#139#139
+  +#139#219#219#219#219#219#219#128#128#128'$$$$$$$$$$$$#$$$#$$$$$$#$$#####$##$'
+  +'#$$#'#219#219#219#219#219#219#219#219#219'###"####"#""##"#"##""FFF'#208#208
+  +#208#219#219#219#219#219#219#219#219#219#197#197#197'RRR!!!!!!!!!!!!!!!('''''
+  +'))())())(((''((((''(((''''''''''''''''''''vvv'#219#219#219#219#219#219#219
+  +#219#219#219#219#219#219#219#219#151#151#151'''''''''''&&''&&''%''%%'#219#219
+  +#219#219#219#219#219#219#219'SSS$%%$%%$$$$$$!!!'#31#30' '#31#31#31#31#31#31
+  +#172#172#172#219#219#219#219#219#219'}}} '#31#31'#""%%%'#128#129#129#219#219
+  +#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219'iii$$$$$$$$'
+  +'$$$$$$$$$$$$$#$#$$#$$#$$$%$$%%%%%%%%&''&&''''''((()))())**)+*+***,+*++*+**,'
+  +'+*,**+**+*******)****)*))))*))))())))))()(('')(''(''''&&&$%$$%$$%%$$$$$$$$$'
+  +'$#$##$$$#$$$#$#$$#$####"##"#""#"""""""!""!""!!!!!! !! !!! !     !      '#31
+  +'  '#31' '#31#31' '#31#31#27#27#27#26#26#26#26#26#27#26#26#26#27#26#27#27#26
+  +#28#29#28#29'**)0011222322222220100/////-----.+,,+,,,+++,+++++++(((&''''###!'
+  +'!!'#29#30#30#27#27#27#24#24#23#22#23#22#25#25#24#27#27#27'...444;;;AAAGGG<;'
+  +'<'#19#19#19#19#18#19#18#18#19#19#19#19#19#18#18#18#18#18#18#18#18#18#18#17
+  +#18#17#18#18#18#18#17#18#17#17#17#17#17#17#17#17#17#16#16#17#17#17#17#16#17
+  +#16#16#16#16#16#16#16#16#16#15#15#16#15#15#15#16#15'&&&'#15#15#15'000yyy0000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000//////......---,,,,,,+++***)))(((''''''&&&&&&%'
+  +'%%%%%$$$$$$$$$$$$'#129#129#129#221#221#221#221#221#221#151#151#151'RRRRRR'
+  +#129#129#129#221#221#221#221#221#221#209#209#209'000$$$$$$$$$$$$$$$$$$$$$'
+  +#163#163#163#221#221#221#221#221#221'RRR$$$$$$$$$$$$;;;RRRuuu'#129#129#129
+  +#209#209#209#221#221#221#221#221#221'jjj$$$$$$$$$'#221#221#221#221#221#221
+  +#221#221#221'000$$$$$$$$$$$$$$$'#129#129#129#221#221#221#221#221#221#129#129
+  +#129'$$$$$$$$$$$$$$$$$$'#221#221#221#221#221#221#221#221#221'$$$$$$$$$;;;'
+  +#221#221#221#221#221#221#221#221#221'GGG$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$RRR'#221#221#221#221#221#221#221#221#221'000$$$$$$$$$'#175
+  +#175#175#221#221#221#221#221#221#129#129#129'$$$$$$$$$$$$$$$$$$$$$$$$$$$^^^'
+  +#221#221#221#221#221#221#221#221#221'$$$$$$$$$RRR'#221#221#221#221#221#221
+  +#221#221#221'$$$$$$$$$^^^'#221#221#221#221#221#221#151#151#151'$$$$$$$$$$$$0'
+  +'00RRR^^^'#129#129#129#163#163#163#221#221#221#221#221#221#175#175#175'$$$$$'
+  +'$uuu'#221#221#221#221#221#221#163#163#163'$$$$$$$$$$$$$$$$#$##$##$$$$$#$#$$'
+  +'$$$#$#'#221#221#221#221#221#221#221#221#221'########"####"#######'#175#175
+  +#175#221#221#221#221#221#221#221#221#221#142#142#142'555!! !!!!!!!!!!!!$$$*)'
+  +')))())())()((((()(''('''''''''''''''''#152#152#152#221#221#221#221#221#221
+  +#221#221#221#221#221#221#210#210#210'lll''''''''''''''''&''''&''''&&&&'#221
+  +#221#221#221#221#221#221#221#221'TSS%%%%%%$%$$$$$%$##$ '#31' '#31#31#31#173
+  +#173#173#221#221#221#221#221#221'~~~'#31#30#30#31#30#30#30#30#30''#221#221
+  +#221#221#221#221#210#210#209#221#221#221#221#221#221#209#209#209'<;;%$$$$$$$'
+  +'$$$$$$$$$$$$$$$$#$#$$#$$$%$$%%%&%%&&&&&''''''''()())))))**)+**++*+,+++*++*,'
+  +'++,++,+++**+*****)****)*)**)*))))))))())(((''''&''%%%%%%%%%%%%%$%$$$%$$$$$#'
+  +'$$%$#$$$$$$$$#$$#$##$####"##"#"""""""""!!!!!!!!!!!!! !!!     !        '#31
+  +#31'     '#28#28#27#26#26#27#26#26#27#26#26#27#27#27#28#27#26#28#30#29#31'))'
+  +'*2224447677777775554441121120000///////.//.-...-.,,-,,,,,,+*++*+*********)*'
+  +'*((),+,333999???EEEHHH'#29#29#29#19#19#19#20#19#19#19#19#19#19#18#18#19#19
+  +#18#18#19#18#18#18#18#18#18#18#18#18#18#17#18#18#17#18#17#18#17#18#18#17#17
+  +#17#17#17#17#17#17#16#16#17#16#17#17#16#16#17#16#16#16#16#16#16#16#16#15#16
+  +#16#16'(&&'#15#16#15'000yyy0000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000000000000000000//////......---,'
+  +',,,,,+++***)))(((''''''&&&&&&%%%%%%$$$$$$$$$$$$'#130#130#130#224#224#224#224
+  +#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224
+  +#224#177#177#177'SSS$$$$$$$$$$$$$$$$$$$$$www'#224#224#224#224#224#224#141#141
+  +#141'$$$$$$$$$$$$$$$$$$$$$$$$'#200#200#200#224#224#224#224#224#224'GGG$$$$$$'
+  ,'$$$'#224#224#224#224#224#224#224#224#224'SSS$$$$$$$$$$$$$$$'#141#141#141#224
+  +#224#224#224#224#224#165#165#165'$$$$$$$$$$$$$$$<<<'#224#224#224#224#224#224
+  +#224#224#224'$$$$$$$$$SSS'#224#224#224#224#224#224#224#224#224'$$$$$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'#224#224#224#224#224#224#224
+  +#224#224'SSS$$$$$$$$$'#177#177#177#224#224#224#224#224#224#200#200#200'$$$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$$'#165#165#165#224#224#224#224#224#224#177#177#177'$$$'
+  +'$$$$$$SSS'#224#224#224#224#224#224#224#224#224'$$$$$$$$$000'#224#224#224#224
+  +#224#224#212#212#212'$$$$$$$$$$$$$$$$$$$$$$$$www'#224#224#224#224#224#224#141
+  +#141#141'$$$$$$GGG'#224#224#224#224#224#224#224#224#224'GGG$$$$$$$$$$$$$$$$$'
+  +'#$$#$$$#$$$$##$$$$#'#224#224#224#224#224#224#224#224#224'########"###"###"#'
+  +'<;<'#224#224#224#224#224#224#224#224#224'zzz,,,#$$!!!!!!!!!!!!!!!((()))))))'
+  +')())()(''(''''(((((((('''#132#132#132#224#224#224#224#224#224#224#224#224
+  +#224#224#224#166#166#166'>>>''''''''''''''''''''''&''''&''&&&&&'#224#224#224
+  +#224#224#224#224#224#224'UTT%%%%%%%%$%$%%%%$%%$$$"!!'#224#224#224#224#224#224
+  +#224#224#224'hhh'#31#31#31#30#30#31#30#30#30''#224#224#224#224#224#224#176
+  +#177#177#153#154#154#224#224#224#224#224#224#189#189#189'000%$$$$$$$$$$$$$$$'
+  +'$$$$$$$$%%$$%$%%%%%%&%%&&%''''''''((())))))))***+*+**+,,++++++*,,+,++,+++**'
+  +'+**+*********)))))))))))((''&%&&%%%%%%&%%%&%%%%$%%$$$%$%%%%$$%%%$%%%$$$%$$$'
+  +'$$$#$##$####"#""#"##"#""""!""!"!""!!"!"!!!! !! ! !!!         '#28#28#28#26
+  +#27#27#26#27#27#26#26#27#27#27#28#27#27#28#30#29#30'''''(333777:::<<<<=<<<<;'
+  +'::77866634321222211111111100/0////0.......-..-----,,,,-,---//.222666=<<CDCG'
+  +'GG555'#19#19#19#19#19#20#19#20#19#19#19#19#18#19#19#18#19#19#18#19#19#18#18
+  +#18#18#18#18#18#18#18#18#18#18#17#18#17#17#18#17#18#17#17#17#17#17#17#17#17
+  +#17#16#17#17#16#16#16#17#16#16#17#17#16#16#17#16#16#16#16#16#16'((&'#15#15#16
+  +'000yyy000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000//////......---,,,,,,+++***)))((('''
+  +'''''&&&&&&%%%%%%$$$$$$$$$$$$'#131#131#131#226#226#226#226#226#226#226#226
+  +#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226
+  +#226#226#226#143#143#143'$$$$$$$$$$$$$$$$$$<<<'#226#226#226#226#226#226#214
+  +#214#214'<<<$$$$$$$$$$$$$$$$$$TTT'#226#226#226#226#226#226#202#202#202'$$$$$'
+  +'$$$$$$$'#226#226#226#226#226#226#226#226#226#131#131#131'$$$$$$$$$$$$$$$'
+  +#190#190#190#226#226#226#226#226#226#214#214#214'000$$$$$$$$$$$$lll'#226#226
+  +#226#226#226#226#202#202#202'$$$$$$$$$TTT'#226#226#226#226#226#226#226#226
+  +#226'$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'#226#226#226
+  +#226#226#226#226#226#226'TTT$$$$$$$$$'#178#178#178#226#226#226#226#226#226
+  +#226#226#226#131#131#131'$$$$$$$$$$$$$$$$$$$$$lll'#226#226#226#226#226#226
+  +#226#226#226'lll$$$$$$$$$TTT'#226#226#226#226#226#226#226#226#226'$$$$$$$$$$'
+  +'$$'#166#166#166#226#226#226#226#226#226'www$$$$$$$$$$$$$$$$$$000'#202#202
+  +#202#226#226#226#226#226#226'HHH$$$$$$$$$'#178#178#178#226#226#226#226#226
+  +#226#190#190#190'000$$$$$$$$$$#$$$$$$$#$$$$$$$$##$#$#'#226#226#226#226#226
+  +#226#226#226#226'$#$$##########""#"TTT'#226#226#226#226#226#226#203#203#203
+  +'***+++!!!!!!!!!!!!!!!#$$*)*))))))*)(*)())()((((((''''444'#214#214#214#226
+  +#226#226#226#226#226#226#226#226'mmm'''''''''''''''''''''''''''''''''''''''''
+  +'''''''&''&&'#226#226#226#226#226#226#226#226#226'UUU%%%%%%%%%%$%%$%%%$%$%``'
+  +'`'#226#226#226#226#226#226#226#226#226'DCC'#30#30#31#31#31#30#30#31#31#128
+  +#128#128#226#226#226#226#226#226#177#177#177#31#30#30#190#190#190#226#226#226
+  +#226#226#226#167#166#166'$$$$$$$$$$$$$$$$$$$$%$#$$%$$$$%&%%%%&&%''&&(''''((('
+  +'())))))))***+++**++++++++++,,+,,+,++,+++**+*++*****)**(()''(''&&&%%%&%%&$%&'
+  +'%%%%%%%%&%%%%%%$$%%%%%%&%%%%%%%%%%%$%$%%$$$$$$#$##$##$""#"##""""""""""!""""'
+  +'""!!!!!!!!!!!! !!  !   '#28#28#28#27#27#28#27#27#28#26#26#27#27#27#28#27#27
+  +#28#29#29#30'&%&434989<<<A@@BBBBBB...444322888566544443433222222111001011110'
+  +'0000000000/0......0//110455:::???EDDEEE'#23#22#23#19#20#19#19#20#20#20#19#20
+  +#19#19#20#19#19#19#19#19#19#19#18#19#19#18#19#18#18#19#19#18#18#18#18#18#18
+  +#18#18#18#17#18#17#17#18#17#17#17#17#18#17#17#17#17#17#17#16#16#17#17#16#17
+  +#16#17#16#17#16#16#16#16#16#16'(&('#15#16#16'000yyy0000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000//////......---,,,,,,+++***)))(((''''''&&&&&&%%%%%%$$$$$$$$$$$$'#133
+  +#133#133#229#229#229#229#229#229#156#156#156'TTTTTTTTTyyy'#205#205#205#229
+  ,#229#229#229#229#229#229#229#229#144#144#144'$$$$$$$$$$$$$$$$$$'#144#144#144
+  +#229#229#229#229#229#229#193#193#193'000$$$$$$$$$$$$HHH'#217#217#217#229#229
+  +#229#229#229#229'mmm$$$$$$$$$$$$'#229#229#229#229#229#229#229#229#229#217#217
+  +#217'<<<$$$$$$$$$TTT'#229#229#229#229#229#229#229#229#229#229#229#229#133#133
+  +#133'$$$$$$$$$$$$'#193#193#193#229#229#229#229#229#229#156#156#156'$$$$$$$$$'
+  +'TTT'#229#229#229#229#229#229#229#229#229'$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$$$'#229#229#229#229#229#229#229#229#229'TTT$$$$$$$$$'
+  +#181#181#181#229#229#229#229#229#229#229#229#229#229#229#229#133#133#133'$$$'
+  +'$$$$$$$$$$$$mmm'#229#229#229#229#229#229#229#229#229#205#205#205'$$$$$$$$$$'
+  +'$$TTT'#229#229#229#229#229#229#229#229#229'$$$$$$$$$$$$TTT'#229#229#229#229
+  +#229#229#217#217#217'HHH$$$$$$$$$$$$$$$'#156#156#156#229#229#229#229#229#229
+  +#181#181#181'$$$$$$$$$$$$TTT'#229#229#229#229#229#229#229#229#229#193#193#193
+  +'<<<$$$$$$$$$$$$$$$a``#$$$$$##$$$#'#229#229#229#229#229#229#229#229#229'$$##'
+  +'$##$##########JJJ'#229#229#229#229#229#229#217#217#217'++,%%&!!!!!!!!!www!!'
+  +'!''''''*))***)*)))())())()(()''()(''XWW'#229#229#229#229#229#229#229#229#229
+  +#134#134#134'''''''''''''''''''''''''''''''''''''''''''''''&''''&''''&'#229
+  +#229#229#229#229#229#229#229#229'VUU&%%%%%%%%%$%%$%%$$%$$'#193#193#193#229
+  +#229#229#229#229#229#205#205#205'!!!'#31#31#31#30#31#31#31#31#31#130#130#130
+  +#229#229#229#229#229#229#179#179#179#30#30#30'***'#217#217#217#229#229#229
+  +#229#229#229#132#132#132'$$$%$$$$$$$$$%%$%$$$$%%%$%%&%%&%%&&%(''&('''')''())'
+  +'())))**+**++++++,,,,,+++,,,,,,,,,+,++,+++++))*''''''&&&%%&%%&&%%%%&%%%&%%&%'
+  +'$&%%%&%&%%%%%&&&&&&&%&&&&%&%%%%%%%%$%$$$%$#$$#$##$#######"##"""""""""""!""!'
+  +'""!"!!!!!!!!! !!!! '#28#28#29#27#27#28#27#27#28#26#27#28#26#27#28#28#27#29
+  +#30#29#30'%%%444989=>>CBBEFFGGH***'#25#24#25#24#25#24#24#24#25#24#24#24#24#24
+  +#24#31#31#31#30#30#31'&''&&''''-.-,--44434433222222211111000//0/112444767<;<'
+  +'@@ADDD-.-'#20#20#20#20#20#20#20#20#20#20#20#19#19#20#19#19#19#19#19#19#19#19
+  +#19#19#19#19#19#18#19#19#18#18#18#18#18#18#18#18#18#18#18#17#18#18#18#17#18
+  +#17#17#17#17#17#17#17#17#17#17#17#17#17#16#16#17#16#16#17#16#16#17#16#16#16
+  +'((('#16#15#16'000yyy0000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000000000000//////......---,,,,,,+'
+  +'++***)))(((''''''&&&&&&%%%%%%$$$$$$$$$$$$'#134#134#134#231#231#231#231#231
+  +#231#134#134#134'$$$$$$$$$$$$000'#158#158#158#231#231#231#231#231#231#231#231
+  +#231'UUU$$$$$$$$$$$$$$$000'#194#194#194#231#231#231#231#231#231#207#207#207
+  +'mmm000<<<'#134#134#134#219#219#219#231#231#231#231#231#231#182#182#182'$$$$'
+  +'$$$$$$$$$$$'#231#231#231#231#231#231#231#231#231#231#231#231#219#219#219'mm'
+  +'mUUU'#134#134#134#219#219#219#231#231#231#231#231#231#207#207#207#231#231
+  +#231#231#231#231#158#158#158'UUUaaa'#182#182#182#231#231#231#231#231#231#231
+  +#231#231'UUU$$$$$$$$$UUU'#231#231#231#231#231#231#231#231#231'$$$$$$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$000'#231#231#231#231#231#231#231#231
+  +#231'UUU$$$$$$$$$'#182#182#182#231#231#231#231#231#231#182#182#182#231#231
+  +#231#231#231#231#207#207#207#134#134#134'UUU'#134#134#134#194#194#194#231#231
+  +#231#231#231#231#231#231#231#231#231#231'III$$$$$$$$$$$$UUU'#231#231#231#231
+  +#231#231#231#231#231'$$$$$$$$$$$$$$$'#145#145#145#231#231#231#231#231#231#231
+  +#231#231#134#134#134'III000aaa'#194#194#194#231#231#231#231#231#231#219#219
+  +#219'III$$$$$$$$$$$$$$$'#145#145#145#231#231#231#231#231#231#231#231#231#231
+  +#231#231#158#158#158#134#134#134#134#134#134#145#145#145#207#207#207#182#182
+  +#182'$$$UUU'#133#134#134#134#134#134#231#231#231#231#231#231#231#231#231#133
+  +#133#134#133#134#133#133#133#133#133#133#133'TTT$$$&&&'#219#219#219#231#231
+  +#231#231#231#231#160#160#160'---!!!___'#194#194#194#181#181#181'$$#********)'
+  +')))))())())))(()((((''YWW'#231#231#231#231#231#231#231#231#231'343(''('''''
+  +'''''''''''''''''''''''''''''''''''''&''''&''''&'#231#231#231#231#231#231#231
+  +#231#231'WVV&&&%&%%%&%%%%%%%%%'#158#158#158#231#231#231#231#231#231#231#231
+  +#231'mmm$$$$$$!!!   '#131#131#131#231#231#231#231#231#231#181#181#181#30#30
+  +#30#30#30#30'DDD'#231#231#231#231#231#231#231#231#231'jjj'#30#30#30'!  !!!"#'
+  +'"$##$$$%%%%%%%%%%&%&&&''''''('''')(()))*))****+*+++++++,++,+,+,,,++**)))('''
+  +'(''''''''''''&''''&&&&&&&&&&&%&&&&%%%%%%%%&%%&&%%&&''&&&&&''&&&&&&&%%%&&%%%'
+  +'%%%%%%%%%%$$$$%$#%$#$#$###$###"##"""#"""""""!"!!!""!"!!!!!!!!!'#29#28#29#28
+  +#27#29#27#27#28#27#27#28#27#27#28#28#28#28#28#27#28'###443888===CCBFGGJJJ545'
+  +#25#25#26#25#25#25#25#25#24#24#25#25#24#24#24#25#24#24#24#24#24#24#24#24#23
+  +#24#23#23#23#23#23#24#24#23#23#23#23#23#23#22#23#23#29#30#30#29#29#30'&%%%%%'
+  +',,,,,,223343556::;===@@@>=='#20#20#20#21#20#20#20#20#20#20#20#20#19#19#19#20
+  ,#19#19#19#19#20#19#19#19#19#19#19#18#19#19#19#18#18#19#19#18#18#18#18#18#18
+  +#18#18#18#18#18#17#18#18#17#17#17#17#17#17#18#17#17#17#17#17#17#17#17#17#17
+  +#16#17#16#17#16#16#17#16#16'((('#15#16#16'000yyy0000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000//////......---,,,,,,+++***)))(((''''''&&&&&&%%%%%%$$$$$$$$$$$$'#135
+  +#135#135#233#233#233#233#233#233#135#135#135'$$$$$$$$$$$$$$$000'#208#208#208
+  +#233#233#233#233#233#233#159#159#159'$$$$$$$$$$$$$$$$$$III'#196#196#196#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#196#196#196'000$$$$$$$$$nnn'#233#233#233#233#233#233#233#233
+  +#233#233#233#233#146#146#146#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233'bbb'#135#135#135#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#171#171#171'$$$'
+  +'$$$$$$$$$==='#233#233#233#233#233#233#233#233#233'III$$$$$$$$$$$$$$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$$$$$$$$$UUU'#233#233#233#233#233#233#233#233#233'$$$$$'
+  +'$$$$$$$'#184#184#184#233#233#233#233#233#233'UUU'#159#159#159#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#221#221#221'nnn$$$$$$$$$$$$'#159#159#159#233#233#233#233#233#233#233
+  +#233#233#233#233#233'$$$$$$$$$$$$$$$$$$'#159#159#159#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#221
+  +#221#221'III$$$$$$$$$$$$$$$$$$$$$'#135#135#135#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#184#184
+  +#184'$$$'#135#135#135#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#135#135#135'&&&''&''}||'
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#183#183#183'''''''***)))*******)))*()))))()(()((YXX'#233#233#233#233
+  +#233#233#233#233#233'LLL''''((''(''''''''''''''''''XXX'''''''''''''''''''''''
+  +'&'#233#233#233#233#233#233#233#233#233'WWW''%%&&&%&%%&%111'#172#172#172#233
+  +#233#233#233#233#233#233#233#233#196#196#196'%%%$$$$$$$$$$$$'#134#134#134#233
+  +#233#233#233#233#233#182#182#182#30#30#30#30#30#30#30#30#30'jjj'#233#233#233
+  +#233#233#233#220#220#220'DDD'#30#30#30#30#30#30#30#31#31#31#30#30#30#31#31'!'
+  +'     "!!##"$#$##$&%%(''''(((((''(((''(''((((''''(((''&''''''''''''&''''&('''
+  +'''''''''''''''''''''&''''&''''''&&''&&&&&&&&&%&&%&&&&&&&''''''''''''&'''''''
+  +'&''&''&&&&&&&%&&&&&&&%%&%%%%%%$%%$%$$$$#$#$$##$""#""#######""""""""!"""!!"!'
+  +'"""!'#31#30#31#28#28#28#28#28#29#28#27#28#27#28#28#27#27#28#28#28#29'"""000'
+  +'665;;;AAAGGGKKK899'#26#26#25#25#26#25#25#25#25#25#25#25#24#25#25#25#25#25#25
+  +#24#24#24#24#25#24#24#24#24#24#24#24#24#24#23#24#24#23#24#24#23#23#23#23#23
+  +#23#23#23#23#22#23#23#23#22#23#23#22#22#22#22#22#22#22#22#21#22#21#22#21#22
+  +#29#29#30#30#30#30'(((***   '#21#21#20#21#20#20#20#20#20#20#20#20#20#20#19#19
+  +#20#20#19#20#19#19#19#19#19#19#19#19#19#19#19#18#18#18#19#19#18#18#19#18#18
+  +#18#18#18#18#18#18#18#18#18#18#17#17#18#18#18#17#17#18#17#17#18#18#17#17#17
+  +#16#17#17#17#17#17#16#16#17'(+('#16#16#16'000yyy0000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000//////......---,,,,,,+++***)))(((''''''&&&&&&%%%%%%$$$$$$$$$$$$'#136
+  +#136#136#236#236#236#236#236#236#136#136#136'$$$$$$$$$$$$$$$$$$|||'#236#236
+  +#236#236#236#236#223#223#223'$$$$$$$$$$$$$$$$$$$$$111'#148#148#148#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#223#223#223#136#136#136
+  +'$$$$$$$$$$$$$$$$$$'#211#211#211#236#236#236#236#236#236#236#236#236'$$$'#148
+  +#148#148#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#136#136
+  +#136'$$$$$$'#136#136#136#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#161#161#161'111$$$$$$$$$$$$$$$'#223#223#223#236#236#236#236#236#236
+  +'|||$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'#148#148#148#236#236
+  +#236#236#236#236#211#211#211'$$$$$$$$$$$$'#186#186#186#236#236#236#236#236
+  +#236'VVV$$$|||'#223#223#223#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#161#161#161'===$$$$$$$$$$$$$$$==='#236#236#236#236#236#236#236
+  +#236#236#236#236#236'$$$$$$$$$$$$$$$$$$$$$ccc'#211#211#211#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#161#161#161'===$$$$$$$$$$$$$$$$'
+  +'$$$$$$$$$$$VVV'#173#173#173#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#186#186#186'$$$'#136#136#136#236#236#236#236#236#236
+  ,#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#136#136#136'&&&'''''')))'#128#128#224#224#224#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#147#147#147'***************))))*)))'
+  +'())()())((544'#236#236#236#236#236#236#236#236#236#174#174#175'''((''''('''
+  +'''''333'#149#149#149#187#187#187'''''''''''''''''&'''''''#236#236#236#236
+  +#236#236#236#236#236'}}}XXXXXXqqp'#161#161#161#224#224#224#236#236#236#236
+  +#236#236#236#236#236#199#198#199'111$$%$$$$$$$$$$$$'#136#136#136#236#236#236
+  +#236#236#236#185#185#185' '#31#31#30#30#30#30#30#30#30#30#30#158#158#158#236
+  +#236#236#236#236#236#210#210#210'+++'#30#30#30#31#31#31#31#30#31#31#30#31#31
+  +#30#31#31#31#31#31#31#31'      !"!""#######$$$$%%%%$%&%%%&&&''&&&''''''&&'''
+  +'''&''(&&''''''''''''&''''''&''''''''&''''&&&&&&&&&''''''''''(''(((''''''('''
+  +'''''''''''&''''&&''''''''&&&''&&&%&&&&%%%%%&%&%%%%$%$$$$$$##$$#$######"###"'
+  +'###"#"""""""""!!""!!!  !'#28#28#29#28#28#29#28#28#28#27#27#28#28#27#28'"""/'
+  +'//444989?>>EFEKJJ==='#25#26#25#26#26#25#25#25#25#25#25#25#25#25#25#25#25#25
+  +#25#24#25#25#24#25#24#25#24#25#24#24#24#24#24#24#24#24#23#24#24#23#24#24#24
+  +#23#24#23#23#23#23#23#23#23#23#22#22#23#23#23#22#22#23#23#23#22#22#22#22#22
+  +#22#22#22#22#22#22#22#22#21#22#22#22#21#21#21#21#21#21#21#21#20#21#20#21#21
+  +#20#20#21#20#20#20#20#20#20#19#19#20#19#19#19#20#19#19#19#19#19#19#20#19#19
+  +#19#18#19#19#19#19#19#19#19#19#19#18#18#18#18#18#18#18#18#18#18#18#18#18#18
+  +#17#17#17#18#18#17#17#17#17#17#17#17#17#17#17#17#16#17#17'(+('#16#16#16'000y'
+  +'yy0000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000//////......---,,,,,,+++***)))(((''''''&'
+  +'&&&&&%%%%%%$$$$$$$$$$$$'#137#137#137#238#238#238#238#238#238#137#137#137'$$'
+  +'$$$$$$$$$$$$$$$$WWW'#238#238#238#238#238#238#238#238#238'$$$$$$$$$$$$$$$$$$'
+  +'$$$$$$$$$111WWW}}}pppWWW$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$===ccc'
+  +#137#137#137'WWW111$$$$$$$$$$$$111WWW'#137#137#137'ccc===$$$$$$$$$$$$$$$$$$$'
+  +'$$'#162#162#162#238#238#238#238#238#238#213#213#213'$$$$$$$$$$$$$$$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$$$$$$$$'#213#213#213#238#238#238#238#238#238#149#149
+  +#149'$$$$$$$$$$$$'#187#187#187#238#238#238#238#238#238'WWW$$$$$$$$$WWWppp}}}'
+  +'WWW111$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$JJJppp'
+  +#137#137#137'WWW111$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$111ccc'#238#238#238
+  +#238#238#238#238#238#238'}}}$$$$$$$$$$$$$#$'#238#238#238#238#238#238#238#238
+  +#238'$#$########$&&&''''''(((***,,,''''''TTT|||{||TTU!!"''''''***********))*'
+  +'**)))))**())()(())()(('#140#139#139#238#238#238#238#238#238#238#238#238#213
+  +#213#213#188#188#188#188#188#188#238#238#238#238#238#238#188#188#188''''''''
+  +''''''''''''''''''''#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#188#188#188'221$%%%$$%$%$%%$$$$$$'#137#137#137#238#238#238#238#238#238#187
+  +#187#187'$$###"!!! '#31' '#30#30#30#199#199#199#238#238#238#238#238#238#199
+  +#199#199#30#30#30#31#31#31#30#30#31#31#31#30#31#31#30' '#31#31#31#31#31'   !'
+  +'  "!!#""###$$#$$$%%%%%%&&&&%%&&''&&''''''''&''''''''''''''''''''&'''''''''''
+  +'''''''''''&''''''&''''((((((((''((''(''((''''(''''(''''('''''''''''''''''''
+  +'''''&&&&&&&&&&&%&&&%&%%%%%%%$%%$$$$%$#$$#$#$$######"#"####"""#""""""""!"!!"'
+  +'!"'#28#28#29#28#28#29#28#28#29#27#28#29#27#27#29'(''(100555::9A@AFGGBBC'#29
+  +#29#29#26#26#26#26#26#26#26#26#25#26#25#26#26#25#25#25#25#25#25#25#25#25#24
+  +#24#24#24#25#24#24#24#24#24#24#24#24#24#24#24#24#23#23#24#23#24#23#23#23#23
+  +#23#24#23#23#23#23#22#23#23#23#22#23#22#23#22#22#22#22#22#22#22#22#22#22#22
+  +#22#22#22#21#22#21#21#21#21#22#21#21#21#21#21#21#21#21#21#21#20#20#21#20#21
+  +#20#20#20#21#20#20#20#20#20#19#20#20#19#19#20#20#19#19#19#19#20#19#19#19#19
+  +#18#19#18#19#19#19#19#18#18#18#18#18#18#18#18#18#18#18#18#18#18#18#17#18#17
+  +#17#17#18#18#17#17#17#17#17#17#17#17#16#17'+(('#17#16#16'000yyy0000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000//////......---,,,,,,+++***)))(((''''''&&&&&&%%%%%%$$$$'
+  +'$$$$$$$$'#138#138#138#240#240#240#240#240#240#138#138#138'$$$$$$$$$$$$$$$$$'
+  +'$WWW'#240#240#240#240#240#240#240#240#240'$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$WWW'#240#240#240#240#240#240#240#240
+  +#240'qqq$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$~~~'#240#240#240#240#240
+  ,#240#240#240#240'JJJ$$$$$$$$$$$$'#189#189#189#240#240#240#240#240#240'WWW$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$qqq'#240
+  +#240#240#240#240#240#150#150#150'$$$$$$$$$$$$$$$$$$'#240#240#240#240#240#240
+  +#240#240#240'#$##$$###%%$&&&''''(*))+++,,,"""!""""""""""""""****************'
+  +'**)****)*))))())()(()(()(('#165#165#165#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#190#190#190''''''''''''''''
+  +''''''''''''#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#215#215#215'rqq%%%%%%$%%$%%$%%$'
+  +'$%$$$$$$'#138#138#138#240#240#240#240#240#240#189#189#189'$#$$$#$#######";;'
+  +';'#227#227#227#240#240#240#240#240#240#161#161#161#31#31#31#31#31#31#31#31
+  +#31#31#31#30#31'  '#31#31#31'      !! #""#####$$$$%%%%%%%&%%%&''&''&&&'''''''
+  +'''''''''&&&''&''''''''''(((()(())))))(())(()((((((((((((''''''''(''''('''''
+  +'''''''''''''''&''''''''''&&&&&&&&%%&%&&%&&%%%%%%$%$#%$$%$$%#$$#$########"##'
+  +'###"""""""""!"""!"!'#29#29#30#29#29#29#28#28#29#28#27#29#28#27#29'#$$121766'
+  +'<<<BBAEEE'#29#29#29#26#27#26#26#26#26#26#25#26#26#25#26#26#26#26#26#25#25#25
+  +#25#25#25#25#25#25#25#24#24#25#24#25#24#25#25#24#24#24#24#24#24#24#24#24#24
+  +#24#24#23#24#24#24#23#23#23#23#23#23#23#23#23#22#23#22#22#23#23#22#23#23#22
+  +#22#22#22#22#23#22#22#22#22#22#21#22#21#21#22#21#22#21#21#21#21#21#21#21#21
+  +#21#21#21#21#20#21#20#21#21#21#20#20#20#21#20#20#20#20#20#20#20#19#19#19#20
+  +#19#19#19#20#19#19#19#19#19#18#19#19#19#18#19#19#18#18#19#18#18#18#18#18#18
+  +#18#18#18#18#17#17#18#17#17#18#17#18#18#17#18#17#17#17#17#17#17'+(+'#17#17#17
+  +'000yyy000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000//////......---,,,,,,+++***)))((('''
+  +'''''&&&&&&%%%%%%$$$$$$$$$$$$'#139#139#139#242#242#242#242#242#242#139#139
+  +#139'$$$$$$$$$$$$$$$$$$eee'#242#242#242#242#242#242#242#242#242'$$$$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'#190#190#190
+  +#242#242#242#242#242#242#229#229#229'111$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'
+  +'$$$>>>'#229#229#229#242#242#242#242#242#242#190#190#190'$$$$$$$$$$$$$$$'#190
+  +#190#190#242#242#242#242#242#242'XXX$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'#139#139#139#242#242#242#242#242#242'XXX$$$$$'
+  +'$$$$$$$$$$$$$'#242#242#242#242#242#242#242#242#242'$$$$$$$##&&&''''''(()***'
+  +',,,((("""""""""""""""&&''**********+****)******))))))))))))((*(())()(([[['
+  +#166#166#166#191#191#191#242#242#242#191#191#191#178#179#178#128#128#128'MMM'
+  +''''''''''''''''''''''''''#141#141#141#141#141#140#141#140#141#141#140#141
+  +#141#140#140#141#140#140#140#140#140'sss??@&%%%&%%%%%%%%%%%$%%$$%%$%$$%$$XXX'
+  +#139#139#139#139#139#139'rrr$#$$$$$$###$######ddd'#139#139#138#139#139#138
+  +#138#138#138'<<;!!!    '#31'     '#31#31'      !!!#""######%$%%%%%%%&&&&%%'''
+  +'''''(((*((*)**))**))))***)**)))))))))((()))))(()((((((''(((''(((''''''''('''
+  +'''''''''&&''''''''&''''&&&&&&&&&%%&%&&%%&%&%$%$$%$$$##$#$$##$#$#####"#####"'
+  +'"##"""""""""!""'#31#31#31#29#28#29#29#28#29#28#28#29#28#28#29' '#31' 322776'
+  +'<<<ABBGGG'#30#29#29#27#26#27#26#26#26#27#26#26#26#25#26#26#26#26#25#25#25#25
+  +#25#26#25#25#25#25#25#25#25#25#25#25#24#25#25#25#25#24#24#24#24#24#24#24#24
+  +#24#24#24#24#24#23#24#24#23#24#23#23#23#23#23#23#23#23#23#23#23#22#22#23#22
+  +#23#22#23#23#22#22#22#22#22#22#22#22#21#22#22#22#22#22#21#22#21#21#21#22#21
+  +#21#21#21#21#21#21#20#21#20#21#20#20#20#21#20#20#20#19#20#20#19#20#19#20#20
+  +#19#20#20#19#19#20#19#19#19#19#19#19#19#19#18#19#19#19#18#18#19#19#19#19#18
+  +#18#18#18#18#18#18#18#18#17#18#17#18#17#17#17#18#17#17#17#17#17'+(+'#16#17#17
+  +'000yyy000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000//////......------,,,+++***)))((('''
+  +'''''&&&&&&%%%%%%$$$$$$$$$$$$'#140#140#140#244#244#244#244#244#244#140#140
+  +#140'$$$$$$$$$$$$$$$$$$'#192#192#192#244#244#244#244#244#244#205#205#205'$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$XXX'
+  +#244#244#244#244#244#244#244#244#244#205#205#205'111$$$$$$$$$$$$$$$$$$$$$$$$'
+  +'$$$$$$$$$111'#205#205#205#244#244#244#244#244#244#244#244#244'KKK$$$$$$$$$$'
+  ,'$$$$$'#192#192#192#244#244#244#244#244#244'XXX$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$$'#153#153#153#192#192#192'eee$$$$$$$$$$$$$$$$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'#140#140#140
+  +#244#244#244#244#244#244'XXX$$$$$$$$$$$$$$$>>>'#244#244#244#244#244#244#244
+  +#244#244'#$$$$#$$$&&&(''())*+++---###""""""""""""###*))****+**+**********)**'
+  +')*))*))*())()))))()(()((((((((((((''(''(((''''''((''(('''''''''''''''''''''
+  +'''''''''&''''&''''&''&&''''&''&&&&&%%&&%%&&%&&%%&%%%%%%%%%%%%%%%%%%%%%%%%%%'
+  +'%$%%$%$$%$$$#$$######$########"#"#"#""#""#######""$$#$$#%%$%%$%%$&&%''&&('''
+  +'&)(())))((*))*))+*)*)****+++*+*******)***))))*))))))))())))((())()((((((((('
+  +'(''((''''''(''''''''''&''''''''&''&''''''&&&&&&&&&%&&%&&%&%$%%$&$$%$#$$$$$$'
+  +'$##############""#"##"""""""""!! '#29#28#29#28#28#29#28#29#29#28#28#29#29#29
+  +#30'00/677;;;AAAGGG))('#27#26#27#27#26#26#27#27#26#26#26#26#26#26#26#26#26#26
+  +#26#25#25#26#26#25#25#25#25#25#25#25#25#25#25#25#24#25#24#25#25#24#25#24#24
+  +#24#24#24#23#24#24#24#24#23#23#24#23#23#23#24#24#23#23#23#23#22#23#22#23#23
+  +#23#22#22#23#22#23#23#22#22#22#22#22#22#22#22#22#22#22#22#22#22#21#21#21#22
+  +#21#21#21#21#21#21#21#21#21#21#20#20#20#21#20#20#20#20#21#20#20#20#20#20#20
+  +#20#19#20#19#20#19#20#19#19#19#19#19#19#19#19#19#19#18#19#18#19#19#19#18#18
+  +#19#18#18#18#18#19#18#17#18#18#18#17#18#18#17#17#17#18#17#17#17#18'-++'#17#17
+  +#17'000yyy000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000//////......------,,,+++***)))((('
+  +'''''''&&&&&&%%%%%%$$$$$$$$$$$$'#141#141#141#246#246#246#246#246#246#141#141
+  +#141'$$$$$$$$$$$$$$$sss'#246#246#246#246#246#246#246#246#246#141#141#141'$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%'
+  +'%%%%%%%%%%%%%%%%%%%%%$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'
+  +#141#141#141#246#246#246#246#246#246#246#246#246#206#206#206'111$$$$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$>>>'#206#206#206#246#246#246#246#246#246#246#246#246#128#128
+  +#128'$$$$$$$$$$$$$$$$$$'#193#193#193#246#246#246#246#246#246'YYY$$$$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$sss'#246#246#246#246#246#246#233#233#233
+  +'$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'
+  +'$$$$$$$$$'#141#141#141#246#246#246#246#246#246#128#128#128'$$$$$$$$$$$$$$$'
+  +#128#128#128#246#246#246#246#246#246#193#193#193'$$$$$$%&%''''''))(***--,)*)'
+  +'"""#######"##"#''''''+++++++++++++++++++++++++++*****)**)*))*))*)))(((((((('
+  +'((((''(''(''''''((((''''''''''''''''''''''''''''''''''&''''&''''''''&&''&'''
+  +'''&&''&&&&&&&&%&&&&%%&%%%%%%%%%%%%%%%%%%%%%%%%%%%$%%$%$$%#$%##$$$$$########'
+  +'################$######$$$#$$%$$%%%%%%&&%''''&('''')((*))))(*)**))+********'
+  +'+**++*****)**)****)***)*))*))))((())))((()((((((''''((''(''''(''(('''''''''
+  +'''''''''''''''''&''&''&&&&&&&%&&%%&%&%%&%$%%$%$$%$$$$$$$$#$#######""#""####'
+  +'###"##""""!"'#29#29#29#28#29#29#28#28#29#28#28#29#29#29#30'*++656:;;???EDE3'
+  +'44'#27#26#27#26#27#27#26#26#27#26#27#26#26#26#26#26#25#26#26#26#25#25#26#25
+  +#26#26#25#25#25#25#25#25#25#25#25#25#25#24#25#25#25#24#24#24#25#24#24#24#24
+  +#24#24#24#23#24#24#23#23#23#24#23#23#23#23#23#23#24#23#23#23#22#22#23#23#22
+  +#23#23#22#23#23#22#22#22#22#22#21#21#22#21#22#22#21#22#21#21#21#22#21#21#21
+  +#21#21#21#21#20#21#21#20#20#21#20#21#20#20#21#20#20#20#19#20#20#19#19#20#20
+  +#20#19#20#20#19#19#19#19#19#19#19#19#19#19#19#19#19#18#18#18#19#19#19#19#18
+  +#18#18#18#19#17#18#18#18#18#18#17#17#17#17#17#17'-+-'#17#17#17'000yyy0000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000//////......------,,,+++***)))(((''''''&&&&&&%%%%'
+  +'%%$$$$$$$$$$$$'#142#142#142#248#248#248#248#248#248#142#142#142'$$$$$$$$$11'
+  +'1'#142#142#142#248#248#248#248#248#248#248#248#248#235#235#235'111$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%'
+  +'%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'
+  +#168#168#168#248#248#248#248#248#248#248#248#248#235#235#235#142#142#142'111'
+  +'$$$$$$$$$$$$$$$111'#142#142#142#235#235#235#248#248#248#248#248#248#248#248
+  +#248#168#168#168'$$$$$$$$$$$$$$$$$$$$$'#195#195#195#248#248#248#248#248#248
+  +'YYY$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'#129#129#129#248#248#248
+  +#248#248#248#248#248#248'$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$%%%%%%%%%%%%%%%%%%'
+  +'%%%$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$LLL'#248#248#248#248#248#248#235#235#235'L'
+  +'LL$$$$$$$$$LLL'#235#235#235#248#248#248#248#248#248#129#129#129'$$$%%$'''''
+  ,'''''''''*)*+++---###############$#$+,+,,+,,,+++,,+++,,+++++++++++++*+**+*)+'
+  +'***)***)*))))))))))))))(((((((((((((((((((((((''((''((''(''&''&''''&&''&&'''
+  +'&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&%&&%&%%&%%%$%%$&$$%$$%$$$#$$$###$##########'
+  +'##$$#$######$#$$$#$$%%%%$%&&%&&%&&&''''&(('')(()()*((**)*))+********+++++++'
+  +'*+**+***)**))))*)**)))))))(()))(()((()()(((((''(''''(((''''(('''''''''''''''
+  +'''''&&&''''''&&&&&%&&%%%%&&%&%$&%$%%$%$$%##$$$$#$$##$#####"##"##"##""""""""'
+  +'"'#29#30#30#29#28#29#29#28#29#28#28#29#29#30#30'&&&545::9>==BBB>>>'#27#27#27
+  +#27#27#27#27#27#27#27#27#27#26#26#26#26#26#26#25#26#26#26#26#25#26#26#25#26
+  +#25#25#26#25#25#25#25#25#25#25#24#25#25#25#24#24#25#24#25#24#24#24#24#24#24
+  +#24#24#24#24#23#24#24#23#23#23#23#24#23#23#23#23#23#23#23#23#23#23#22#23#22
+  +#22#22#22#22#22#23#22#22#22#21#22#22#22#22#22#21#22#22#22#21#21#21#21#21#21
+  +#21#21#21#21#21#21#20#20#20#20#21#20#20#20#20#20#20#19#20#20#20#20#20#19#20
+  +#19#19#20#19#19#19#19#19#20#19#19#19#19#19#19#19#19#19#18#18#18#18#18#19#18
+  +#18#18#18#18#18#18#17#17#18#18#17#17'-++'#17#17#17'000yyy0000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000//////......------,,,+++***)))(((''''''''''''&&&%%%%%%$$$$$$$'
+  +'$$$$$'#156#156#156#250#250#250#250#250#250#223#223#223#196#196#196#196#196
+  +#196#210#210#210#250#250#250#250#250#250#250#250#250#250#250#250#237#237#237
+  +'ZZZ$$$$$$$$$$$$$$$$$$$$$$$$%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%&&&%%%%%%%%%'
+  +'%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$'#169#169#169#250#250#250#250#250#250#250#250#250#250#250#250
+  +#250#250#250#183#183#183#143#143#143#143#143#143#143#143#143#196#196#196#250
+  +#250#250#250#250#250#250#250#250#250#250#250#250#250#250#156#156#156'$$$$$$$'
+  +'$$$$$$$$$$$$$$$$$'#196#196#196#250#250#250#250#250#250'ZZZ$$$$$$$$$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$111'#196#196#196#250#250#250#143#143#143'$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%$$$$$$$$$$$$$$$'
+  +'$$$$$$$$$'#196#196#196#250#250#250#250#250#250#237#237#237#156#156#156'ZZZ'
+  +#156#156#156#237#237#237#250#250#250#250#250#250#237#237#237'111$$$&%&'''''''
+  +'(()*+*,,,***"""#########$$$''''''-,,,,,,,,,,,,,,,--,-,,,,,,,,,,++++++++*+**'
+  +'+***)*+***))))))))))))))())())((((())())(((((((''((''''(''''''''''''''('''''
+  +'''''''''''''''''''''''''&''&&''''''&&&&&&''&''&&&&&%&%&&%&%%%%%&%%%%%%%%%$$'
+  +'%$$$$$$$$$$$$$$$$%$$$#$$$$$#$$$$$$$$$$$%%%%&&%&%''&&''''&((''((()((*))+)**)'
+  +')++*++*+**++++++++++*****+***********)*)*)**)))))(()()(())()((()(((''((((('
+  +'''''(((''''''''''''''''&&''''''&&&''''&&&%&&%&&%%%%&%%%$$%$%%$$$$$$#$#$$###'
+  +'###"##"####""###"""""'#31#31#31#29#28#29#29#29#29#29#28#29#29#29#30'"!"4449'
+  +'89=>>ABAEED'#30#30#30#27#27#27#27#27#27#26#26#27#26#26#27#26#26#26#26#26#26
+  +#26#26#26#25#26#26#26#25#25#25#26#25#25#25#25#25#25#25#25#24#25#24#24#25#24
+  +#25#24#24#24#24#25#24#24#24#24#24#24#24#24#24#24#24#23#23#23#23#23#23#23#23
+  +#23#23#22#23#23#22#23#23#22#22#23#23#22#22#22#22#22#22#22#22#22#22#21#21#22
+  +#21#22#22#21#21#22#21#21#21#21#21#21#21#20#21#21#21#21#20#21#20#20#20#21#20
+  +#20#20#20#20#20#20#19#20#20#20#19#20#19#20#19#20#19#19#19#20#19#19#19#19#19
+  +#19#18#18#18#18#18#18#19#18#18#18#18#18#18#18#18#18#17#18'+--'#17#17#17'000y'
+  +'yy0000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000//////......------,,,+++***)))((('''''''
+  +'''''''&&&%%%%%%$$$$$$$$$$$$'#197#197#197#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#224
+  +#224#224'LLL$$$$$$$$$$$$$$$$$$$$$%%%%%%%%%%%%%%%%%%%%%&&&&&&&&&&&&&&&&&&&&&&'
+  +'&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&%%%%%%%%%%%%%%%%'
+  +'%%%%%%%%$$$$$$$$$$$$$$$$$$$$$ggg'#238#238#238#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#224#224#224'ggg$$$$$$$$$$$$$$$$$$$$$$$$$$$'#197
+  +#197#197#251#251#251#251#251#251'ZZZ$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%'
+  +'%%%%%%%%%%%%%%$$$$$$$$$$$$$$$$$$???'#224#224#224#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#238#238#238'ggg$$$%'
+  +'%%&''''(((*)*,,+---%%&$$$##$$$$$$$$$$,,,.--.----------------------,-,,,,,,+'
+  +'++,++++++*+++************)))))))))))))))))))))))))))))(()'')(()((''&''''''('
+  +'((''(''(''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''&&&&&&&'
+  ,'&&&&&&&%&%&&%%%%%&%$%%$$$$%%%$$$$%$$$$$$$$$%%$$$$$%%%&&&&&&&''&''&&(''''((('
+  +'))))))*)(+**+**+*++**+*+++++++++*+*+*+*****+**********))))*))))))))))))(((('
+  +')((((((((((((((''((((''''(''''''''&&''''''''&&&&&%&&%&&%&&%&%%&%$%%$%$$%$$$'
+  +'$##$###$$#$#########"###""""""!"'#29#29#29#29#29#29#28#29#29#28#29#29#30#30
+  +#31'222887;;<@@?CDD)(('#27#27#27#27#26#27#26#27#26#27#26#26#27#27#27#26#26#26
+  +#26#26#26#26#26#26#26#26#26#26#26#25#25#26#25#25#25#26#25#25#25#24#25#24#25
+  +#25#24#24#25#24#24#25#24#24#24#25#24#24#24#24#24#24#23#23#23#23#23#24#23#23
+  +#24#23#23#23#23#23#23#23#23#23#23#22#23#22#22#22#22#22#22#22#22#22#22#22#22
+  +#22#21#21#21#21#21#21#21#21#21#21#21#21#21#21#21#21#21#20#21#20#20#21#21#20
+  +#21#21#20#20#20#20#20#20#19#20#20#19#20#20#20#19#19#19#19#19#19#19#19#19#19
+  +#19#19#19#19#18#18#18#18#18#19#19#18#19#18#18#18#17#18#18'-+-'#17#17#17'000y'
+  +'yy0000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000/////////......---,,,+++***)))(((((('''''
+  +'''&&&%%%%%%%%%$$$$$$$$$'#199#199#199#253#253#253#253#253#253#253#253#253#253
+  +#253#253#253#253#253#253#253#253#212#212#212#171#171#171'hhh$$$$$$$$$$$$$$$$'
+  +'$$$$$%%%%%%%%%%%%%%%&&&&&&&&&&&&&&&&&&'''''''''''''''''''''''''''''''''''''
+  +''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
+  +'''''''''''''''''''''''''''''&&&&&&&&&&&&&&&&&&%%%%%%%%%%%%%%%$$$$$$$$$$$$$$'
+  +'$$$$$$$222'#131#131#131#212#212#212#253#253#253#253#253#253#253#253#253#253
+  +#253#253#253#253#253#253#253#253#253#253#253#212#212#212'vvv$$$$$$$$$$$$$$$$'
+  +'$$$$$$$$$$$222ZZZ'#212#212#212#253#253#253#253#253#253'ZZZ$$$$$$$$$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$%%%%%%%%%%%%%%%%%%&&'
+  +'&&&&&&&&&&&&&&&&&&&&&&&&&%%%%%%%%%%%%%%%%%%$$$$$$$$$$$$$$$222'#171#171#171
+  +#253#253#253#253#253#253#253#253#253#253#253#253#253#253#253#199#199#199'MMM'
+  +'$$$$$$&&&((()))+++-,-,,,###$$$$$%$$%%%$&''&..-.../.....-..-.-..-.-...-----.'
+  +'---------+,,,,++,++,*++*+++****+**********))*)**))*)***))))))*)(((($$$!!!"!'
+  +'"$%%)((()(((((((''(((((''''''''''''''''''''(''''''''''''''&&&''&&''&%&&&''&'
+  +'&&%%&%%&$%%%$%%%%%%%%%%%%%%%%%%$%%%%%&&&&&&''&&''''''''''''(('')(()(())(**)'
+  +'*))***+**,++++++*+,+++++++++*+**+++**+*********))***))*))))*)))())())())()('
+  +'()((((''((''''((''(''''(''''(''''''''''''&&&&&%''&%&&%&&%%%%&%%&$$%%$%$$$$$'
+  +'$#$####$#$$##########"""#""""#'#29#29#29#29#29#29#29#28#29#29#29#29#29#30#30
+  +'+++666;;;??>CBB333'#27#27#27#27#27#27#27#26#27#26#27#27#26#26#26#27#26#26#26
+  +#26#27#26#26#26#26#26#25#26#26#26#25#25#26#25#25#26#25#25#25#25#25#25#24#24
+  +#24#25#24#25#24#25#24#24#25#24#24#24#24#24#24#24#23#24#23#23#23#24#23#23#24
+  +#23#23#23#23#23#23#23#23#22#22#22#23#22#23#22#23#23#23#22#22#22#22#22#22#22
+  +#21#22#21#22#21#21#22#22#22#21#22#21#21#21#21#21#21#21#21#21#20#21#20#20#20
+  +#21#20#20#20#20#20#20#20#20#20#20#20#20#20#20#19#19#20#19#19#19#19#19#19#19
+  +#19#19#18#19#19#19#18#18#19#19#19#19#18#18#18#18#18#18'---'#18#18#18'000yyy0'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000/////////......---,,,+++***)))((((((''''''&'
+  +'&&&&&%%%%%%$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$%%%%%%%%%%'
+  +'%%%%%&&&&&&&&&&&&''''''''''''''''''''''''''''''(((((((((((((((((((((((((((('
+  +'(((((((((((((((((((('''''''''''''''''''''''''''''''''''''''''''''''''''''''
+  +'''''''&&&&&&&&&&&&%%%%%%%%%%%%%%%$$$$$$$$$$$$$$$$$$$$$$$$???[[['#132#132#132
+  +#145#145#145#132#132#132'[[[222$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$???'#254#254
+  +#254#254#254#254#254#254#254#254#254#254'[[[$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$%%%%%%%%%%%%%%%&&&&&&&&&&&&'''''''''''''''
+  +'''''''''''''''''''''''''''''&&&&&&&&&%%%%%%%%%%%%%%%$$$$$$$$$$$$$$$$$$222[['
+  +'[[[[[[[222$$$$$$$$$%%%((()))***,,,...''''''#$#%$$%$%%%%%%&%%%)))/..0///////'
+  +'///////../...../.........-----,-,,-,,,+,-,,,++++++++++++++++++++*+****++**+'
+  +'****''''''###"!"!""""!"""##"&&&()(()(((()(())((())(())((()((((((((''(''''('
+  +'''&(''&''&''''&&''&''''&&&&&&&&%&&%&&%%%&&&&&&&&%''''''&''''''''''''''''((('
+  +'((())(*)(*))+*)++*+*+,+*,++,**+**,+++,+++++++*+***++***+***********)))**))*'
+  +'))))))()))))(((((()((((((((''((''''''''(''''''''''''''''''&&&&''&%''&%&&%&%'
+  +'%&%$%%$%%$%$$%$$$$$##$$$$#$####$##########"#""'#30#30#31#30#30#29#29#29#29
+  +#29#29#29#29#30#30'&''''555999=>>BBB<<<'#27#28#27#27#27#27#27#27#28#26#27#27
+  +#26#27#27#27#26#26#27#26#27#26#26#26#26#26#26#26#26#25#26#26#26#25#26#26#25
+  +#25#25#25#25#25#25#25#25#25#25#24#25#24#25#24#25#24#25#24#24#24#24#24#24#24
+  ,#24#24#24#24#23#24#24#23#23#23#23#23#23#23#23#23#23#22#23#23#23#23#22#22#22
+  +#22#22#22#22#22#23#22#22#22#22#22#21#21#22#21#22#22#22#22#21#22#21#21#21#21
+  +#21#21#21#21#21#20#21#21#20#20#21#20#20#20#20#20#20#20#20#20#19#20#20#19#20
+  +#19#19#20#19#19#20#19#19#19#19#19#19#18#19#19#19#18#18#18#18#18#18#18#19#18
+  +'---'#18#18#18'000yyy0000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000000000000/////////......---,,,+'
+  +'+++++***)))(((''''''''''''&&&%%%%%%%%%$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'
+  +'$$$$$$$$$$$%%%%%%%%%%%%&&&&&&&&&''''''''''''''''''''''''((((((((((((((((((('
+  +'((((()))(((((((((((((((((((((((((((((((((((((((((((((((((((((((((((('''''''
+  +'''''''''''''''''''&&&&&&&&&%%%%%%%%%%%%%%%$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'#132#132#132#200#200#200#200#200
+  +#200#200#200#200'[[[$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$%%%%%%%%%%%'
+  +'%%%%%%%%%%%%%%%%%%%&&&&&&&&&''''''''''''''''''''''''''''''''''''(((((('''''
+  +'''''''''''''''''''''&&&&&&&&&%%%%%%%%%%%%$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'
+  +'$$$$$&&&******,,,---///000''''&%%%%&&%&%&&&&''&''&''***00010000000000000000'
+  +'0/0/00//0////.....-.--.-,----,,,,,,+,++,++,+,+++++*++++*+*+++**)%$&########'
+  +'####"######"#"#"$##''''''))))))))))))))))))()(()(((((((((((((''''''''''''('
+  +'''''''''''''''''''''''''&&''''&''&''&&&&''&''''''''&''''''''''(''''('')()(('
+  +'())())))))+**++*++*+**,++,+*+++-+,,+,+,++,,++++++++++++*++*********)*))**))'
+  +'))*))))())))))))))((()((((((((''''(''(''''''''''''''''''''''''''&&&&&&%''&&'
+  +'''&%&%%%%%%%%%%$%$$$$$$$$###$$$#$###$######"##"##'#31#31' '#29#29#29#29#29
+  +#29#28#29#29#30#29#30'"!"4549:9===AAAEEE'#30#30#31#27#27#28#27#27#27#27#27#27
+  +#27#27#27#26#27#26#27#27#27#27#27#27#26#26#27#26#26#26#25#25#26#25#26#26#26
+  +#25#26#26#26#25#25#25#25#25#25#25#24#25#25#25#24#24#24#24#25#24#24#24#24#24
+  +#24#24#23#24#24#23#23#23#24#24#23#23#23#23#23#23#23#23#23#22#23#22#23#22#23
+  +#22#22#22#22#22#22#23#22#22#22#22#22#21#22#22#22#22#22#21#21#21#21#22#21#21
+  +#21#21#21#21#21#21#21#21#21#21#20#21#21#20#20#20#21#20#20#20#20#20#19#19#20
+  +#20#20#19#19#20#19#20#19#19#19#19#19#19#19#19#19#19#19#18#19#18#18#19#19#19
+  +'---'#18#18#18'000yyy0000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000000000000000//////......------,'
+  +',,+++***)))((((((''''''&&&&&&%%%%%%%%%$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'
+  +'$$%%%%%%%%%%%%%%%&&&&&&''''''''''''''''''(((((((((((())))))))))))))))))****'
+  +'********)))))))))))))))))))))))))))))))))))))))))))))))))))(((((((((((('''''
+  +'''''''''''''''&&&&&&&&&%%%%%%%%%%%%%%%$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$%%%%%%%'
+  +'%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%&&&&&&&&&''''''''''''''''''((((((('
+  +'(((((((((((((((((((((((''''''''''''''''''&&&&&&&&&%%%%%%%%%%%%$$$$$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$$$$$$%%%)))+++,,,...///111122(((&&&&&&&&&''''''''''''''''''+'
+  +'++211111111111111110111101100000/0/0/.//./../..----------,,,-,,-,--,,,,,+,,'
+  +',,(((%%%#$$####$#############"###########$##''''''*))**)))**))*)*)*)*))))))'
+  +')()(()((((''(''''(''''((''''''''''''''(''((((''''(''''''((''((((((((()))())'
+  +'*))*))**)+**+**+++++*-++,+,,++,++,,,,,,,,,+++++++++++*+++************)**)**'
+  +')*))**)))))))))))(()(((((((((((((''''(''(''''''''''(''''(''''''&''''&''&&&&'
+  +'%&&%&%%&%%%%$%%$%%%$%$$%$$$$#$#$$$#####$$########"""'#30#29#29#29#29#29#29
+  +#29#29#29#29#29#31#31#31'322777<<=@@@DDD)))'#27#27#27#27#27#28#27#27#27#27#27
+  +#27#27#27#27#27#26#27#27#27#26#26#27#26#26#26#27#26#26#26#26#26#26#25#25#26
+  +#26#25#26#25#26#26#25#25#25#25#24#25#25#25#24#25#25#24#24#24#25#24#24#24#24
+  +#24#24#24#24#23#24#23#24#23#24#23#24#24#23#23#24#23#23#23#23#23#23#23#23#22
+  +#22#23#23#23#22#22#22#22#22#22#22#22#22#22#21#22#22#21#21#21#22#22#21#22#21
+  +#21#21#21#21#21#21#21#20#20#21#21#21#20#20#20#20#20#21#20#20#20#19#20#20#20
+  +#20#20#19#19#20#19#20#19#19#20#19#19#19#19#19#18#19#18#19#18#18#18#18'0--'#18
+  +#18#18'000yyy000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000//////.........---,,,+++***'
+  +'***)))(((''''''''''''&&&&&&%%%%%%%%%%%%$$$$$$$$$$$$$$$$$$$$$$$$%%%%%%%%%%%%'
+  +'%%%%%%&&&&&&&&&''''''''''''((((((((()))))))))******************++++++++++++'
+  ,'++++++*********************************************)))))))))((((((((('''''''
+  +'''''''''''''&&&&&&&&&%%%%%%%%%%%%%%%$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$'
+  +'$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$%%%%%%%%%%%%%%%%%%%%%%%%'
+  +'%%%%%%%%%%%%%%%%%%%%%&&&&&&&&&&&&&&&''''''''''''''''''((((((((())))))))))))'
+  +')))))))))))))))((((((''''''''''''''''''&&&&&&%%%%%%%%%%%%%%%%%%$$$$$$$$$$$$'
+  +'$$$$$$%%%%%%%%%%%%+++---///000111333323)**(((''''(((((()(((((),-,3222223333'
+  +'3321221211121111111100000/0//////../....-....-.---.-.---+++&&&%$%%%%%%$%$$%'
+  +'%%$$%$$$$$$$$$$$$$$####$$#$#####$##''&''(()++++++*+*++******))*))))*)(*)))('
+  +'()(()((((((((((()()))()())))))))))))))))*+++**++*++*,++,++,,+,++-,+,++-,,-,'
+  +',,,+,,,,+,++++++++++*+*++**++***+********))))))))))))))))))(())()((()))(((('
+  +'((((''''''(((''(''''''''''''&''&&''&%&&&&%%''%%&%%&%%%%$%$$$$$%$$$$$$#$$$$$'
+  +'#$########"#"#'#29#29#30#30#29#29#29#29#29#29#29#29#30#30#30',++766;;;???CC'
+  +'C333'#28#28#28#28#27#27#27#27#27#27#28#27#27#27#27#27#27#26#26#27#27#27#26
+  +#27#27#27#26#27#26#26#26#26#26#25#26#26#26#25#26#25#25#25#25#25#26#25#25#25
+  +#25#25#25#25#25#25#24#24#24#24#24#25#24#24#25#24#24#24#23#24#23#24#23#23#23
+  +#23#23#24#23#23#23#23#23#23#23#23#23#23#22#23#22#23#22#23#22#22#22#23#22#22
+  +#22#22#22#22#22#22#22#22#22#22#22#22#21#21#21#22#21#21#21#21#21#21#21#21#20
+  +#20#21#20#20#20#21#20#20#20#20#20#20#20#20#20#20#19#20#20#19#20#19#20#19#19
+  +#20#19#19#19#19#19#19#18#19#19#18'-0-'#18#19#18'000yyy0000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000/////////......---,,,++++++***)))((((((''''''''''''&&&&&&%%%%'
+  +'%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%&&&&&&&&&''''''''''''((((((((())))'
+  +'))*********++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++'
+  +'+++++++++++++++++*********)))))))))((((((''''''''''''''''''&&&&&&&&&%%%%%%%'
+  +'%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%$$$$$$$$$$$$$$$$$$$$$$$$$$$$'
+  +'$$$$$$$$%%%%%%%%%%%%%%%%%%%%%%%%&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&'''''''
+  +'''''''''''''''''''((((((((())))))************************)))))))))(((((('''
+  +'''''''''''&&&&&&&&&%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%&&&''''''---///11'
+  +'1222443444555())(()(()))))**)*))))---33344444433333322223232212111011010010'
+  +'00//0////././/./....-.*)*%%%%%%%%%%%%%%%&%&%&%%%%&&&%%%%%%%%%%%%%%%%%%%$$$$'
+  +'$$$$$$$$$$$$%)()***,,,+++,+*++*+**+**+)***)*))**))*)))))))****)*)))*))*****'
+  +'****+*+*+*+,+,++,,+,++,+*,,,-,+,+,-+,-,,-,,-,,,++,,+,,,++++++++++++++**+***'
+  +'**********)*)**)*)*)*))))))))))())))()(((((((((((''((''''''''''''''''&''&&'
+  +'''&&&&&&&%&&%&%%&%%%$%%$%$$$%$$%$%$$##$##$$$###$#######'#31#31#31#29#30#30
+  +#29#29#30#30#29#29#30#30#30'''''''5569::>>>CBB==='#28#28#27#27#28#27#27#28#28
+  +#27#27#28#27#27#27#27#27#27#27#27#26#27#27#26#26#26#26#26#26#27#27#26#26#26
+  +#26#26#25#26#26#26#25#26#26#26#25#26#26#25#25#25#25#25#25#25#25#25#25#24#24
+  +#24#24#25#24#24#25#24#24#24#24#24#24#24#23#24#24#23#23#23#23#24#24#23#23#23
+  +#23#23#23#23#23#23#23#23#23#23#22#22#22#23#23#22#22#22#22#22#22#22#22#21#22
+  +#21#22#22#22#21#21#21#21#21#21#21#21#21#21#21#20#21#21#21#21#20#20#21#21#20
+  +#20#20#20#20#20#19#20#19#20#20#19#20#19#20#19#19#19#19#19#19#19#19#19#19#19
+  +'000'#18#18#18'000yyy0000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000000000000000/////////......----'
+  +'--,,,+++******)))((((((''''''''''''&&&&&&&&&%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%&'
+  +'&&&&&&&&&&&''''''''''''''''''(((((())))))******++++++++++++,,,,,,,,,,,,,,,,'
+  +',,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,++++++++++++****'
+  +'**))))))(((((((((''''''''''''''''''&&&&&&&&&%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%'
+  +'%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%&&&&&&&&&&'
+  +'&&&&&&&&''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''('
+  +'((((((((((())))))*********+++++++++++++++++++++******))))))((((((((('''''''
+  +'''''''&&&&&&&&&%%%%%%%%%%%%%%%%%%%%%%%%%%%&&&&&&&&&''''''(((///111222444555'
+  +'666445+++*)*)*)++++***++*+*---544555555444443444343333222231321211111100000'
+  +'000/00---''''''&''''&''&&&&&&&&&&''''''''&''&''''**+545445---''''''&%&&&&&%'
+  +'&%&&%&%&%&%%%%%%%%%%%%$%%&&&***,,,,,+,,+,++,++,*++*+++*+********++++*++++*+'
+  +'*++++++++++++,,,+,,,-,-,+,++-,,-,+-,+,+,-,,.,,-,,-,,,,+,,,+,,+,,+++++++++++'
+  +'++******+**********)*)())&&''&&&))))))())((()()(((((((((((''''''''''('''''''
+  +'&''''&''&&''&&&&&&%%&%%&%%&%%%%%$$%%$%$%$$$$$$$$###$#$######## '#31' '#30#29
+  +#30#29#29#30#30#30#29#31#30#30'""#555:99=>>AAAEEF'#31#31#31#28#28#28#27#28#28
+  ,#28#28#27#27#27#27#27#27#27#27#27#27#27#26#27#27#27#27#27#26#27#27#26#26#26
+  +#27#26#26#26#25#25#26#25#25#26#26#25#25#26#25#26#26#26#25#25#25#25#25#25#25
+  +#25#25#24#25#24#24#25#24#24#24#24#24#24#23#24#24#23#24#23#24#24#23#24#24#23
+  +#23#24#23#23#23#23#23#22#22#22#22#22#22#22#23#22#23#22#22#22#22#22#21#21#21
+  +#21#22#22#22#21#22#21#21#21#21#22#21#21#21#21#21#21#20#21#20#20#20#20#20#21
+  +#20#20#20#20#19#20#20#19#20#20#20#20#19#19#19#19#19#20#19#19#19#19#19#19#19
+  +'000'#19#18#19'000yyy0000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000000000000000000//////.........-'
+  +'--,,,,,,+++******)))((((((''''''''''''&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&'
+  +'&&&&&''''''''''''''''''(((((())))))*********++++++,,,,,,,,,,,,-------------'
+  +'--------------------------------------------------------,,,,,,,,,,,,+++++++'
+  +'++******))))))(((((((((''''''''''''''''''&&&&&&&&&&&&&&&&&&%%%%%%%%%%%%%%%%'
+  +'%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%&&&&&&&&&&&&&&&'''''
+  +'''''''''''''''''''''''''''''''''''''''''''''''''''''''''(((((((((((((((((()'
+  +'))))))))******++++++++++++,,,,,,,,,,,,,,,+++++++++******))))))(((((('''''''
+  +'''''''''''''&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&''''''''''''''''''((()))111333'
+  +'444555777878777---++++++,+,,+++,+,,+--.544555555555544554454433332332322322'
+  +'211211000+*+((''''''''''(''''((''''''(((((())))**554999999999999555000(((&'
+  +'''''&''&&''&&''''&''&''&''''&&&&&&&&&%&)))-----,----,,-,,-,,,,,,++,++,+++++'
+  +'++++++,,,+,,+,++,+,,,,,,,,,---,-,-,+--,-,,-,,-,,.------,,.-,-,,-,,,+,,,+,+,'
+  +'++,,+,++,++*+**+++**+++*(((''&''$$%$$#$$####&%%)))))))))())(((((((((((''('''
+  +'((''''''''''''''&''&&&&&&&&''&&&%%&&%&%%%%%%%%$$%$%%%$$%$$$$$$$$$###$$$##""'
+  +'"'#29#30#30#29#30#29#30#29#29#30#29#29#31#31#31'333888===@A@DDE)))'#28#28#28
+  +#28#27#28#28#28#28#27#28#28#28#27#28#27#27#27#27#27#27#27#26#27#27#26#26#27
+  +#26#27#26#26#26#26#26#26#26#26#26#26#25#25#26#25#26#26#25#25#25#25#25#25#25
+  +#25#25#25#25#25#24#25#25#25#24#24#24#24#24#24#24#24#24#24#23#24#23#24#24#24
+  +#23#24#23#23#23#23#24#24#23#23#23#23#23#23#23#22#23#22#22#22#22#22#23#22#22
+  +#22#22#22#21#22#21#21#22#22#21#21#21#21#21#21#21#22#21#21#21#21#21#21#21#20
+  +#21#20#21#20#21#20#20#20#20#20#20#20#20#20#20#20#20#20#19#19#20#20#19#19#19
+  +#19#20#19'000'#19#19#18'000yyy0000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000000000000000000000000000///////'
+  +'//......------,,,++++++***))))))(((((((((''''''''''''''''''&&&&&&&&&&&&&&&&'
+  +'&&&&&''''''''''''''''''''''''(((((((((((())))))******++++++,,,,,,,,,-------'
+  +'-----............................................................----------'
+  +'--------,,,,,,+++++++++******))))))(((((((((''''''''''''''''''''''''&&&&&&&'
+  +'&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&%%%%%%%%%%%%%%%&&&&&&&&&&'
+  +'&&&&&''''''''''''''''''''''''(((((((((((((((((((((((((((((((((((())))))))))'
+  +'))******+++++++++,,,,,,,,,,,,------,,,,,,,,,,,,+++++++++***))))))((((((((('
+  +'''''''''''''''''''''''''&&&&&&&&&&&&&&&''''''''''''''''''''''''((((((((()))'
+  +'+++3335556667778879::988/./,,+++,,,-,,,-,,,,,-,.444666666665556555554554544'
+  +'433433322...*)*)))))))())()**))))***+++333;;;<<<=========;;;:::999777111)))'
+  +'''((''''(((''(''''''''''''''''''''''''&'')))/.../-.../.-.--.--.---,,-,-,,,,'
+  +',-,,,,,,----,,-,-,,,,,,.------,-..--.-.-,-,,-,,.--.--.,-.---,,--,-,,,,,,,,,'
+  +'+,,,,,+++++***)))(''''&&&$%$$$$$$$$$$##$###$$####%%%)))()))()(()((((((((((('
+  +'((''''''''''''''''''&&''&&&&&''&%''&%&%&&%%%%%%$%$%$%%$%$$$%$$$$$$$$$$#$###'
+  +'$###'#30#30#30#30#30#30#29#30#30#29#30#30#30#30#30',,,777<;<??@DDC433'#29#28
+  +#28#28#28#28#28#28#28#27#28#27#27#28#28#27#28#27#27#27#27#27#27#27#27#27#27
+  +#27#27#27#26#26#26#26#26#26#26#26#26#26#26#26#26#25#26#26#25#26#25#26#25#26
+  +#26#25#25#25#25#25#25#25#24#24#24#25#24#24#25#24#24#25#25#24#24#24#23#24#24
+  +#24#23#24#24#23#24#24#23#23#23#24#23#23#23#23#23#22#23#22#22#23#22#22#22#23
+  +#22#22#22#23#22#22#22#22#22#22#21#22#22#22#21#21#21#21#21#22#21#21#21#21#21
+  +#21#20#21#21#20#20#21#20#21#20#20#20#20#21#20#20#20#19#20#20#19#19#19#19#20
+  +#20#20#19#19'000'#19#18#19'000yyy0000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000000000000000000000000000000////'
+  +'////////......------,,,++++++******))))))((((((((('''''''''''''''''''''''''
+  ,'''''''''''''''''''''''''''''''(((((((((((()))))))))******++++++,,,,,,,,,---'
+  +'------.....................................................................'
+  +'...............---------,,,,,,+++++++++******))))))(((((((((((('''''''''''''
+  +''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
+  +'''''''''''''''''&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&''''''''''''''''''''''''((((('
+  +'((((((()))))))))))))))))))))))))))))))))************+++++++++,,,,,,,,,-----'
+  +'----------------------,,,,,,++++++******))))))(((((((((((('''''''''''''''''
+  +'''''''''''''''''''''''''''(((((((((((())))))******,,,55566688888899::;::;;/'
+  +'//---,-,-,--,-,,-,-,-,-333777777666655666555555544432,,-**********)**)*+*+*'
+  +'+*,++/..:;:@@@@@@BBBBBBAAA@@@>>><<<;;;999999999434.--(((''''''(''('''''''''
+  +'''''''''''&&''0000//0//0/./../../../.-...-..----.----------...---.--.......'
+  +'...-..--.--.-,..-.--.------,------,-,,++++++)))((''''&''%%&&%&%%&%$$$%%$$$$'
+  +'$$$$$$$$$$$$$#$$##$###$%%%)))())))))()((((((((((((''''''(''''''''&''&''''&&'
+  +'&&&''&%''%&&&%&%&%%%$%%%$$%$%$$%$$$$$$$$$#$$$#$### '#31' '#30#30#30#29#30#30
+  +#29#30#30#30#31#30'''((666:::>>>BBB==='#28#28#29#28#28#28#28#28#28#27#28#28
+  +#27#28#27#28#28#27#27#27#27#27#27#27#27#27#27#27#27#27#27#26#26#26#27#27#26
+  +#26#26#26#27#26#26#26#26#25#26#26#25#26#25#25#25#25#25#25#25#25#25#25#25#25
+  +#25#25#24#24#25#24#24#24#25#24#25#24#24#24#24#24#23#23#24#24#23#23#24#24#23
+  +#23#23#23#23#24#23#23#23#23#23#23#22#22#22#22#22#22#22#22#23#22#22#22#22#22
+  +#22#22#22#21#22#21#21#22#21#21#21#21#21#21#21#21#21#20#20#21#21#20#20#20#20
+  +#20#20#21#20#20#20#20#20#20#20#20#19#20#19#20#19#20#19#19'200'#19#20#19'000y'
+  +'yy0000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000/////////.........------,,,++++'
+  +'++******)))))))))((((((((((((((((((((((((((((((((())))))))))))******+++++++'
+  +'++,,,,,,------..................///////////////////////////////////////////'
+  +'/////////////////.....................---------,,,,,,+++++++++******)))))))'
+  +'))((((((((((((((((((((((((((((((((((((((((((((('''''''''''''''''''''''''''''
+  +'''''''''''''''''''''''''''''''''''''''''''''''''''''''''(((((((((((()))))))'
+  +'))*********************************+++++++++++++++,,,,,,---------..........'
+  +'..............------,,,,,,+++++++++******)))))))))((((((((((((((((((((((((('
+  +'(()))))))))*********++++++...666888999:::;;;=<=<<<110.....-.--..---...----2'
+  +'11777777777767676555100++++,,+++++++++++++++,+,.--878AAACDCEEEGGGGGGGGGEEEC'
+  +'CCAAA>>><<<::::::99989999:677111())()((((((((((...00/0/////0///////////////'
+  +'//./..././..........-.-...../...........----/...--/--/-..--.--.--+++&%&&%&&'
+  +'%&&%&&%&&%&&%%%%%&%&%%%%%%%%%%$%%$%$$$$$$$$$##$$$##$$#$#%%$((())))))()()((('
+  +'(((((((''''(''''''''''&&''&&''&&''&&''&&&&&&%&%%%%%%%$%$%%$%$%%%$$$$$$$$$$$'
+  +'$$$#   '#30#30#30#30#30#30#30#30#30#31#30#30'###565:::>>>BBBEFE'#31#31' '#28
+  +#29#28#28#28#28#28#28#28#27#28#28#28#27#28#27#27#28#27#27#27#27#27#27#27#27
+  +#27#27#27#27#26#27#27#26#26#26#26#27#26#26#26#26#26#26#26#26#26#26#26#25#26
+  +#25#26#25#25#26#25#24#25#25#25#25#25#25#24#25#24#24#24#24#25#24#25#24#24#24
+  +#24#24#24#23#24#23#23#24#23#24#24#24#23#23#23#23#24#23#23#23#23#23#23#22#23
+  +#22#23#22#23#22#22#22#22#22#22#21#22#22#22#21#22#21#22#22#21#21#21#21#21#21
+  +#21#21#21#20#21#21#21#21#21#21#20#21#20#20#20#20#20#20#20#20#20#20#20#20#19
+  +#20#20'002'#20#19#19'000yyy0000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'00000000000000000000000000000000000000000000000000000000000000000000///////'
+  +'/////.........------,,,,,,++++++*********))))))))))))))))))))))))))))))))))'
+  +'))*********+++++++++,,,,,,---------............////////////////////////////'
+  +'/////////////////////////////////////////////////////...............-------'
+  +'--,,,,,,+++++++++*********)))))))))))))))(((((((((((((((((((((((((((((((((('
+  +'((((((((((((((((((((((((((((((((((((((((()))))))))************+++++++++++++'
+  +'++++++++++++++++++++,,,,,,,,,,,,---------..................................'
+  +'..------,,,,,,+++++++++*********))))))))))))))))))))))))))))))*********++++'
+  +'++,,,,,,---///888999;;;;;;<<<===>>>434--..-.-.--.-...-..---000777776776332-'
+  +'--+,+++,,+++++,++,,,,,,---333>>>CCCFEFHIHKLKMMMMMMLLLHHH<<<BBB>>><<<;;;::::'
+  +'::::::9::99:;;))))))))))))(((---1111001001000//00/0//////./...////../...../'
+  +'//////////.//.......//..../.-.--/--.--.--.--.--)()&%&&&&&&&&%&&%&&%&&%&&%&%'
+  +'%&%%%%%%%%$$%$%$%$$$$$%$$$$$$$$$$$$###$##$%$((()()()))(())((((((''((''('''''
+  +'''&''''&''(&&''&&''&&&&%&&%&%%%%%%%%%%%%%$%%$$%$$$$$$$$$$$#$"""'#31#30#30#31
+  ,#30#30#30#30#30#30#29#30' '#31' 334999===AAAEEE***'#28#28#29#29#29#28#28#28
+  +#28#28#28#28#28#28#28#28#28#27#27#28#27#27#27#27#27#27#27#27#27#27#26#27#27
+  +#27#26#26#26#26#27#26#26#26#26#26#26#26#26#26#26#26#25#25#25#25#25#26#25#26
+  +#25#25#25#25#25#25#25#24#25#25#25#24#24#25#24#24#24#24#24#24#24#24#24#24#24
+  +#24#24#24#23#24#23#24#23#23#24#23#23#23#23#23#22#23#22#23#22#22#22#23#22#22
+  +#22#22#22#22#22#22#22#21#22#22#21#22#21#22#21#21#22#21#21#21#21#21#21#21#20
+  +#21#21#21#20#21#20#20#20#20#21#20#20#20#21#20#20#20#20#20#20'220'#20#19#19'0'
+  +'00yyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyy'
+  +'yyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyy'
+  +'yyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyy'
+  +'yyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyy'
+  +'yyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyxxxxxxwwwwwwvvvuuutttsssrrrq'
+  +'qqpppooonnnmmmlllkkkjjjjjjjjjiiiiiiiiiiiiiiijjjjjjjjjkkkllllllmmmnnnooopppp'
+  +'ppqqqrrrssstttuuuuuuvvvvvvwwwwwwwwwxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx'
+  +'xxxxxxxxxxxxxxxxxxxxxxxwwwwwwwwwwwwvvvvvvuuuttttttsssrrrqqqpppooonnnnnnmmml'
+  +'llkkkjjjjjjiiiiiiiiihhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhggggggfffffffffffff'
+  +'fffffffffffgggggghhhiiiiiijjjkkklllmmmmmmnnnnnnoooooooooooooooooopppppppppp'
+  +'pppppqqqqqqrrrsssttttttuuuuuuvvvvvvvvvvvvvvvvvvuuuuuutttsssrrrqqqppppppooon'
+  +'nnmmmlllkkkjjjjjjjjjiiiiiiiiiiiijjjjjjkkkllllllmmmnnnooopppqqqrrrsssyyy'#139
+  +#139#139#146#146#146#147#147#147#148#148#148#151#148#151#154#152#154#152#154
+  +#154#139#141#141'ruuuurrruururrrrruqqqttt'#133#130#130'yyyppppnppnpnpppppoor'
+  +'ooorruwww'#149#149#149#166#166#166#170#170#170#174#174#174#181#181#181#185
+  +#186#185#187#187#187#190#190#190#188#188#188#158#158#158'rrrknnvvv'#137#139
+  +#139#145#145#145#145#145#145#143#143#143#144#144#144#144#144#144#141#144#144
+  +#145#145#145#145#145#144'ssvgigiggfifffinnn|||||{||{{{{{xx{xx{xx{xxxvxxvvvxv'
+  +'xvvvvvywwwwwwwwwwwxuxxxxuxuuuuuuuvvsvssvssvqsssssqqsqqqqq``b``b``b`]```b`]`'
+  +'`]``]``]```bb``b````````bbbillyyybbb][[[[[[X[X[XX[[[[X[][ebegggggeeeegeeeee'
+  +'eebebbeb`e`beb`e``b``b```````]`]]]]]]]]]]]]]]]]]][[[][[[[[[[[X[KNKNKKKNKKKK'
+  +'NNNnnq'#141#141#141#149#151#149#158#158#158#167#167#167#128#131#131'FIFIIFF'
+  +'FFFIFFFFFFFCCCCCCFCCCCCCCCCCCCAAAAAAAAAAAA>A>A>A>AA>>>>>>>>=>==>=>========:'
+  +'====:==:=:==::::::8::8:888888888888858888855555555555555222222222222022222'
+  +#19#20#19'000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000000000000000000000000000////////////'
+  +'.........---------,,,,,,,,,+++++++++++++++++++++++++++++++++++++++,,,,,,,,,'
+  +',,,---------............//////////////////000000000000000000000000000000000'
+  +'000000000000000000000000000000000000000//////////////////............------'
+  +'---,,,,,,,,,+++++++++++++++++++++******************************************'
+  +'***)))))))))))))))***************+++++++++,,,,,,,,,,,,,,,------------------'
+  +'---------------..................//////////////////////////////............'
+  +'---------,,,,,,,,,++++++++++++++++++++++++++++++++++++,,,,,,,,,------......'
+  +'......000999<<<<<<<<<>>>??????;;;/0/./...../../....----.----------,,-..--..'
+  +'...///989BBBGFFIIIKKKOOOQQQSTSVUVMMM666,,,,,,,,,,,,,,,---222777888999999:9:'
+  +':9:000)*)*)**))))),++2122212212112112111011000/0000000//0///0///0///////0/0'
+  +'0/0/0//00/0/0/./../../.-/...--.-.***&&''&&''&&''&%&&%&''&''''&''''&''(''('''
+  +'''(+**-.-112555888767766556''''''%%$$$#$$$#$$$#$#$$$%%((())())(()()((((''(('
+  +'''''''&(&''''''''''&&''&&''&&&&&&&%%%&%%&&&%%%%$%%$$$$%%%$$%$$$$$$$$ '#31#31
+  +#31#31#30#30#31#30#30#30#30#31#31#31'(((888<;<@A@DDD???'#28#29#29#29#29#28#28
+  +#28#28#28#28#28#28#28#28#28#28#28#27#28#28#27#27#27#28#27#28#28#27#27#27#27
+  +#27#27#27#27#27#27#27#27#26#27#26#27#27#26#26#26#26#26#26#26#26#26#25#26#26
+  +#25#26#26#25#26#25#25#25#25#25#25#25#25#25#25#24#25#25#24#24#24#24#24#25#24
+  +#24#24#24#24#24#24#23#24#24#23#23#24#24#23#23#23#23#23#23#23#23#23#23#23#23
+  +#23#23#22#23#23#22#22#22#22#22#22#22#22#21#22#21#22#22#21#22#22#22#21#21#21
+  +#21#21#21#21#21#21#20#21#21#20#21#21#21#20#20#21#21#20#20#20#20#20#20#20#20
+  +#20#20#11'Transparent'#8#0#0#6'TLabel'#6'Label1'#4'Left'#2#8#6'Height'#2#27#3
+  +'Top'#3#8#1#5'Width'#3'9'#1#7'Caption'#6'?Copyright RemObjects Software, 200'
+  +'2-2008. All rights reserved.'#10#10'Font.Color'#7#7'clWhite'#11'Font.Height'
+  +#2#245#9'Font.Name'#6#6'Tahoma'#11'ParentColor'#8#7'OnClick'#7#12'OnCloseCli'
+  +'ck'#0#0#6'TLabel'#11'lbl_Version'#4'Left'#3#253#0#6'Height'#2#17#3'Top'#2'('
+  +#5'Width'#2#11#7'Caption'#6#2'[]'#10'Font.Color'#7#7'clWhite'#11'Font.Height'
+  +#2#243#9'Font.Name'#6#6'Tahoma'#11'ParentColor'#8#0#0#6'TLabel'#6'Label7'#4
+  +'Left'#2#8#6'Height'#2#14#3'Top'#3#24#1#5'Width'#2'\'#7'Caption'#6#20'Visit '
+  ,'our website at'#10'Font.Color'#7#7'clWhite'#11'Font.Height'#2#245#9'Font.Na'
+  +'me'#6#6'Tahoma'#11'ParentColor'#8#0#0#6'TLabel'#6'Label3'#6'Cursor'#7#11'cr'
+  +'HandPoint'#4'Left'#2'f'#6'Height'#2#14#3'Top'#3#24#1#5'Width'#3#151#0#7'Cap'
+  +'tion'#6#28'http://www.remobjects.com/ro'#10'Font.Color'#7#7'clWhite'#11'Fon'
+  +'t.Height'#2#245#9'Font.Name'#6#6'Tahoma'#10'Font.Style'#11#11'fsUnderline'#0
+  +#11'ParentColor'#8#7'OnClick'#7#11'Label3Click'#0#0#7'TButton'#10'btn_Cancel'
+  +#4'Left'#3#162#1#6'Height'#2#25#3'Top'#3#16#1#5'Width'#2'M'#6'Cancel'#9#7'Ca'
+  +'ption'#6#10'btn_Cancel'#7'Default'#9#10'Font.Color'#7#7'clWhite'#11'Font.He'
+  +'ight'#2#245#9'Font.Name'#6#6'Tahoma'#7'OnClick'#7#12'OnCloseClick'#8'TabOrd'
+  +'er'#2#0#0#0#0
+]);
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fROAbout.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fROAbout.pas
new file mode 100644
index 0000000..a6e09f5
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fROAbout.pas	
@@ -0,0 +1,133 @@
+unit fROAbout;
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+
+uses
+  {$IFDEF MSWINDOWS}Windows,{$ENDIF}
+  {$IFDEF FPC}LCLIntf, LResources,{$ELSE}Messages,{$ENDIF}
+  SysUtils, Classes, Graphics, Controls, Forms,
+  Dialogs, StdCtrls, ExtCtrls;
+
+type
+  TAboutForm = class(TForm)
+    Image1: TImage;
+    Label1: TLabel;
+    Label3: TLabel;
+    btn_Cancel: TButton;
+    lbl_Version: TLabel;
+    Label7: TLabel;
+    procedure OnCloseClick(Sender: TObject);
+    procedure Label3Click(Sender: TObject);
+    procedure FormCreate(Sender: TObject);
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+{$IFNDEF FPC}
+function VersionBuildNo(iInstance:THandle):integer;
+{$ENDIF FPC}
+
+var
+  AboutForm: TAboutForm;
+  sVersionName : string = '';
+
+implementation
+
+uses
+  {$IFDEF FPC}uEWTools{$ELSE}uROIDETools, ShellApi{$ENDIF};
+  
+{$IFNDEF FPC}
+{$R *.dfm}
+
+
+type TVersion = record
+       Major,Minor,Release,Build:word;
+     end;
+
+function GetFileVersion(iFileName:string):TVersion;
+var whocares:dword;
+    Size:dword;
+    Data:pointer;
+    FixedData:pVSFixedFileInfo;
+begin
+  Size := GetFileVersionInfoSize(pChar(iFileName), whocares);
+  if Size > 0 then begin
+    GetMem(Data,Size);
+    try
+      if GetFileVersionInfo(pChar(iFileName),0,Size,Data) then begin
+        Size := sizeof(TVSFixedFileInfo);
+        if VerQueryValue(Data,'\',pointer(FixedData),Size) then begin
+          result.Major := HiWord(FixedData^.dwFileVersionMS);
+          result.Minor := LoWord(FixedData^.dwFileVersionMS);
+          result.Release := HiWord(FixedData^.dwFileVersionLS);
+          result.Build := LoWord(FixedData^.dwFileVersionLS);
+        end;
+      end;
+    finally
+      FreeMem(Data);
+    end;
+  end;
+end;
+
+function GetModuleName(iInstance:THandle):string;
+var Buffer: array[0..MAX_PATH] of Char;
+begin
+  SetString(result, Buffer, GetModuleFileName(iInstance, Buffer, MAX_PATH));
+end;
+
+function VersionStringLong:string;
+var Version:TVersion;
+begin
+  Version := GetFileVersion(GetModuleName(hInstance));
+  result := IntToStr(Version.Major)+'.'+IntToStr(Version.Minor)+'.'+
+            IntToStr(Version.Release)+'.'+IntToStr(Version.Build){+'.'+
+            FormatDateTime('yymmdd', CompileTime);}
+end;
+
+function VersionBuildNo(iInstance:THandle):integer;
+var Version:TVersion;
+begin
+  Version := GetFileVersion(GetModuleName(iInstance));
+  result := Version.Build;
+end;
+{$ENDIF FPC}
+
+procedure TAboutForm.OnCloseClick(Sender: TObject);
+begin
+  Close();
+end;
+
+procedure TAboutForm.Label3Click(Sender: TObject);
+begin
+  {$IFDEF FPC}
+  RO_ShellExecute(Handle,'open','http://www.remobjects.com/ro',nil,nil,SW_SHOWNORMAL);
+  {$ELSE}
+  ShellExecute(Handle,'open','http://www.remobjects.com/ro',nil,nil,SW_SHOWNORMAL);
+  {$ENDIF}
+end;
+
+procedure TAboutForm.FormCreate(Sender: TObject);
+begin
+  {$IFDEF FPC}
+  lbl_Version.Caption := sVersionName;
+  {$ELSE}
+  lbl_Version.Caption := 'Version '+VersionStringLong();
+  if sVersionName <> '' then
+    lbl_Version.Caption := sVersionName+' - '+lbl_Version.Caption;
+  {$ENDIF}
+  btn_Cancel.Left := Width+10;
+end;
+
+{$IFDEF FPC}
+initialization
+  {$I fROAbout.lrs}
+{$ENDIF FPC}
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fROServerClassForm.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fROServerClassForm.dfm
new file mode 100644
index 0000000..2d4ad80
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fROServerClassForm.dfm	
@@ -0,0 +1,3244 @@
+object ROServerClassForm: TROServerClassForm
+  Left = 381
+  Top = 239
+  BorderIcons = []
+  BorderStyle = bsSingle
+  Caption = 'Select Ancestor Type for %s'
+  ClientHeight = 346
+  ClientWidth = 500
+  Color = clBtnFace
+  ParentFont = True
+  OldCreateOrder = False
+  Position = poScreenCenter
+  OnCreate = FormCreate
+  PixelsPerInch = 96
+  TextHeight = 13
+  object Image2: TImage
+    Left = 0
+    Top = 0
+    Width = 500
+    Height = 64
+    Align = alTop
+    AutoSize = True
+    Picture.Data = {
+      07544269746D617036770100424D36770100000000003600000028000000F401
+      000040000000010018000000000000770100C01E0000C01E0000000000000000
+      0000858585858585858585858585858585858585858585858585858585858585
+      8585858484848484848484848484848484848484848484848484848484848484
+      8484848483838383838383838383838383838383838383838383838383838383
+      8383838383838383838383828282828282828282828282828282828282828282
+      8282828282828282828282828181818181818181818181818181818181818181
+      8181818181818181818181818181818180808081818181818180808080808080
+      80808080808080808080808080808080808080808080807F7F7F7F7F7F7F7F7F
+      7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7E7E7E7E7E7E7E7E7E7E7E7E7F7F7F7F7F
+      7F7F7F7F7F7F7F7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E
+      7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7D7D7D7D7D7D7D7D7D7D7D7D
+      7C7C7C7C7C7C7B7B7B7A7A7A7979797979797878787878787777777676767575
+      757575757474747575757474747474747474746A7CC3677FDD677FDD6880DC69
+      80DD6981DD6A81DC6A81DC6B82DC6B82DC6C82DC6C83DC6E83D6808495878787
+      8B8B8B8D8D8D8F8F8F9090909191919292929292929292929292929191919191
+      919090909090909090908F8F8F8F8F8F8F8F8F8F8F8F8F8F8F90909091919191
+      9191929292929292929292949494949494959595969696969696979797979797
+      9898989A9A9A9A9A9A9A9A9A9B9B9B9C9C9C9D9D9D9D9D9D9E9E9E9F9F9FA0A0
+      A0A0A0A0A2A2A2A2A2A2A2A2A2A3A3A3A5A5A5A5A5A5A6A6A6A7A7A7A8A8A8A8
+      A8A8A9A9A9A9A9A9ABABABACACACACACACAEAEAEAFAFAFB0B0B0B2B2B2B3B3B3
+      B5B5B5B6B6B6B7B7B7B9B9B9BABABABBBBBBBCBCBCBDBDBDBEBEBEBFBFBFBFBF
+      BFC0C0C0C0C0C0C1C1C1C2C2C2C2C2C2C2C2C2C2C2C2C3C3C3C3C3C3C4C4C4C4
+      C4C4C5C5C5C5C5C5C6C6C6C6C6C6C7C7C7C7C7C7C8C8C8C8C8C8C9C9C9CACACA
+      CBCBCBCBCBCBCCCCCCCCCCCCCDCDCDCECECECECECECFCFCFD0D0D0D1D1D1D1D1
+      D1D2D2D2D2D2D2D2D2D2D3D3D3D3D3D3D4D4D4D4D4D4D4D4D4D4D4D4D4D4D4D4
+      D4D4D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D6D6D6D6D6D6D6D6D6D6D6D6D6D6D6
+      D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8D8D8D8D8D8D8D8D8D8D8D8
+      D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADA
+      DADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDCDCDCDCDCDC
+      DCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFE0
+      E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1
+      E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBECECECECECECECECECECECECECECECECECECEDEDEDECECECEDEDEDEDED
+      EDEDEDEDEDEDEDEEEEEEEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F5F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78686
+      8685858585858585858585858585858585858585858585858585858585858585
+      8585848484848484848484848484848484848484848484848484848484848484
+      8484848383838383838383838383838383838383838383838383838383838383
+      8383838383838383838382828282828283838382828282828282828282828282
+      8282828282828282828282818181818181818181818181818181818181818181
+      8181818181818181818181818181818181818181818080808080808080808080
+      808080808080808080808080808080808080808080807F7F7F7F7F7F7F7F7F80
+      80808080807F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F8080808080807F7F7F
+      7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7E7E7E7E7E7E7F7F7F7F7F7F7F7F7F7E7E
+      7E7E7E7E7F7F7F7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7D7D7D7D7D7D7D7D7D7C
+      7C7C7C7C7C7B7B7B7A7A7A7A7A7A797979797979787878777777767676767676
+      7575757676767676767575757575757377896880DD6880DD6981DD6981DD6A81
+      DD6A82DD6B82DD6A82DD6C83DD6D83DD6D83DC6E84DC7084D77F87A88C8C8C8E
+      8E8E919191919191939393939393949494949595959696969797959797969898
+      9698989596969495959394949293939191919191919191919292929292929393
+      939393939393939494949595959595959797979797979898989898989999999A
+      9A9A9B9B9B9C9C9C9D9D9D9D9D9D9E9E9E9E9E9E9F9F9FA0A0A0A0A0A0A1A1A1
+      A2A2A2A3A3A3A4A4A4A4A4A4A5A5A5A6A6A6A7A7A7A8A8A8A8A8A8A9A9A9AAAA
+      AAABABABACACACADADADADADADAEAEAEAFAFAFB1B1B1B1B2BAB0B3C1AFB3C7B0
+      B4C9B2B6CAB2B6CAB4B7CAB5B8CAB8BAC6BBBCC3BFBFC0C0C0C0C0C0C0C1C1C1
+      C1C1C1C3C3C3C3C3C3C3C3C3C4C4C4C4C4C4C4C4C4C4C4C4C6C6C6C5C5C5C6C6
+      C6C6C6C6C7C7C7C7C7C7C8C8C8C9C9C9C9C9C9C9C9C9CACACACCCCCCCCCCCCCC
+      CCCCCDCDCDCECECECECECECFCFCFCFCFCFD0D0D0D1D1D1D2D2D2D3D3D3D3D3D3
+      D3D3D3D3D3D3D4D4D4D4D4D4D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D6D6
+      D6D6D6D6D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8
+      D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D9D9D9D8D8D8
+      D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9DADADAD9D9D9DADADADADADADADADADADA
+      DADADADADBDBDBDBDBDBDBDBDBDBDBDBDCDCDCDBDBDBDCDCDCDCDCDCDCDCDCDD
+      DDDDDCDCDCDDDDDDDEDEDEDDDDDDDEDEDEDEDEDEDDDDDDDDDDDDDEDEDEDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFE0E0E0E0E0E0E0E0
+      E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E2
+      E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAE9E9E9EAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECEC
+      ECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F3
+      F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7868686868686
+      8686868686868686868585858585858686868686868686868585858585858585
+      8585858585858585858585858585858584848485858585858584848484848484
+      8484848484848484848484848484848484848484848484848484838383838383
+      8383838383838383838383838383838383838383838383838383838282828282
+      8282828282828282828282828282828282828282828282828282828281818181
+      8181818181818181818181818181818181818181818181818181818181818181
+      8181818181818181818181818080808080808080808080808080808080808080
+      808080807F7F7F8080808080808080807F7F7F8080808080808080807F7F7F7F
+      7F7F7F7F7F7F7F7F8080808080807F7F7F8080808080808080808080807F7F7F
+      8080808080807F7F7F7F7F7F7E7E7E7F7F7F7E7E7E7E7E7E7E7E7E7D7D7D7D7D
+      7D7C7C7C7B7B7B7B7B7B7A7A7A79797979797979797978787877777777777776
+      76767676767676767676767676766E7CB06981DE6980DD6A82DE6B82DD6B82DD
+      6B82DD6C83DD6C83DE6D84DC6E84DD6E85DD6F85DD6F85DC8089AF8F8F8F9191
+      919393939393939494949797979899999A9C9C9B9E9E9EA1A19FA3A39FA3A39E
+      A2A29C9F9F999B9B969898949595929393919191919191929292939393939393
+      9494949595959595959696969797979797979898989898989A9A9A9B9B9B9B9B
+      9B9C9C9C9C9C9C9D9D9D9E9E9E9F9F9F9F9F9FA0A0A0A0A0A0A1A1A1A3A3A3A3
+      A3A3A4A4A4A4A4A4A5A5A5A6A6A6A7A7A7A8A8A8A8A8A8A9A9A9A9A9A9ACACAC
+      ACACACADADADAEAEAEAEAFB3ABAFC3AAAFCDABB1D0ACB2CFAEB3CFAEB3CFB0B5
+      D0B1B6CFB2B6CFB2B7CFB3B8CFB4B8CFB6BAD0BABCCBBEBFC5C1C1C1C2C2C2C2
+      C2C2C3C3C3C3C3C3C4C4C4C4C4C4C4C4C4C5C5C5C6C6C6C6C6C6C6C6C6C6C6C6
+      C7C7C7C8C8C8C9C9C9C8C8C8CACACACACACACACACACCCCCCCCCCCCCCCCCCCDCD
+      CDCECECECECECECFCFCFD0D0D0D0D0D0D0D0D0D1D1D1D3D3D3D3D3D3D3D3D3D3
+      D3D3D4D4D4D4D4D4D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D6D6D6
+      D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8D8D8
+      D8D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADA
+      DADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDCDCDC
+      DCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDDDD
+      DDDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDF
+      DFDFDFDFDFE0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3
+      E3E3E3E3E2E2E2E3E3E3E4E4E4E3E3E3E4E4E4E3E3E3E3E3E3E5E5E5E4E4E4E4
+      E4E4E5E5E5E4E4E4E5E5E5E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECEC
+      ECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEEEEEE
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F2F2F2F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7
+      F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F787878787878787878786
+      8686868686868686868686868686868686868686868686858585858585858585
+      8585858585858585858585858585858585858585858585858484848484848484
+      8484848484848484848484848484848484848484848484848483838383838383
+      8383838383838383838383838383838383838383838383838383838383828282
+      8282828282828282828282828282828282828282828282828282828181818181
+      8181818182828282828281818181818181818181818181818181818181818181
+      8181818181818181828282808080808080808080808080808080808080808080
+      8080808080808080808080808080808080808080808080808080808080808181
+      8181818180808080808081818181818181818181818181818181818181818181
+      81818080808080808080807F7F7F7F7F7F7E7E7E7E7E7E7E7E7E7D7D7D7C7C7C
+      7C7C7C7B7B7B7B7B7B7A7A7A7979797979797878787777777878787777777777
+      7776767676767677777777787E6A80D76A81DD6B82DE6B83DD6B83DD6C83DD6D
+      84DE6E84DD6E84DD6E84DD6F85DD6F85DD7086DC7086DC7C8ABF919191939393
+      9494949697979899999C9E9EA0A4A4A5ABABA9B1B1ACB5B5ACB5B5ACB4B4A7AF
+      AFA3A9A99EA3A39A9D9D96989895969694949493939394949494949495959595
+      95959696969797979797979898989999999999999A9A9A9B9B9B9C9C9C9C9C9C
+      9D9D9D9F9F9F9F9F9F9F9F9FA0A0A0A0A0A0A1A1A1A2A2A2A3A3A3A4A4A4A4A4
+      A4A5A5A5A7A7A7A7A7A7A8A8A8A8A8A8A9A9A9AAAAAAAAAAAAACACACADADADAD
+      AEB2AAAFC4A9AFD0AAB0D0AAB0D0ACB2D0AEB3D0AEB3D0AFB4D0B0B5D0B2B7D0
+      B3B7D0B3B8D0B4B8D0B5B9D0B6BAD0B7BAD0B7BBD0BABDCEBFC0C5C2C2C2C3C3
+      C3C4C4C4C4C4C4C4C4C4C4C4C4C5C5C5C6C6C6C6C6C6C6C6C6C6C6C6C7C7C7C7
+      C7C7C9C9C9CACACACACACACACACACBCBCBCCCCCCCCCCCCCDCDCDCDCDCDCECECE
+      CFCFCFCFCFCFD0D0D0D0D0D0D1D1D1D2D2D2D3D3D3D3D3D3D3D3D3D4D4D4D4D4
+      D4D4D4D4D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D6D6D6D6D6D6D6
+      D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8D8D8D8D8D8D8
+      D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADADA
+      DADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDCDCDCDC
+      DCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDF
+      DFDFDFDFE0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECEC
+      ECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F2F2F2F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F5F5F5F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7
+      F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78787878787878787878787878686
+      8686868686868686868686868686868686868686868686868686868686868685
+      8585858585858585858585858585858585858585858585858585858585858585
+      8484848484848484848585858585858484848484848484848484848484848484
+      8484848484848484848483838384848483838383838383838383838383838383
+      8383838383838383828282838383838383828282828282828282828282828282
+      8282828383838282828282828282828282828181818181818181818282828181
+      8181818181818181818181818181818181818181818181818181818181818181
+      8181818181818181818181808080818181818181828282828282818181828282
+      8282828282828282828282828282828282828282828282828282828282828282
+      828181818181818080808080807F7F7F7F7F7F7E7E7E7E7E7E7E7E7E7D7D7D7C
+      7C7C7C7C7C7B7B7B7B7B7B7A7A7A7A7A7A797979787878787878777777777777
+      787878777777787878727CA56B82DE6B83DE6C83DE6C83DE6C84DE6E84DE6E84
+      DD6E85DE6F85DD6F85DD7086DD7086DD7086DC7287DC7889CE91929894949497
+      97979A9C9C9FA3A3A6ACACAFB8B8B5C0C0BAC7C7BCCACABBC9C9B7C3C3B0BBBB
+      A9B1B1A2A7A79B9E9E9698989494949393939494949595959595959595959696
+      969797979797979898989999999A9A9A9B9B9B9B9B9B9C9C9C9D9D9D9D9D9D9F
+      9F9F9F9F9F9F9F9FA0A0A0A1A1A1A1A1A1A2A2A2A3A3A3A4A4A4A4A4A4A5A5A5
+      A6A6A6A7A7A7A8A8A8A8A8A8A9A9A9AAAAAAABABABACACACAAADBDA8AECEA8AF
+      D0AAB0D0AAB0D0ABB1D0ADB3D0AEB3D0AEB4D0AFB4D0B1B6D1B2B7D0B3B7D0B3
+      B8D0B4B9D0B5B9D0B7BBD1B8BCD1B8BCD1BABDD0BBBED0BEC0CDC4C4C5C5C5C5
+      C5C5C5C5C5C5C6C6C6C6C6C6C6C6C6C7C7C7C8C8C8C8C8C8C8C8C8C8C8C8CACA
+      CACACACACBCBCBCBCBCBCBCBCBCDCDCDCDCDCDCDCDCDCECECECFCFCFD0D0D0D0
+      D0D0D1D1D1D1D1D1D2D2D2D3D3D3D4D4D4D4D4D4D4D4D4D5D5D5D5D5D5D5D5D5
+      D5D5D5D6D6D6D6D6D6D6D6D6D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D6D6D6D7D7
+      D7D8D8D8D8D8D8D7D7D7D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9
+      D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADADADADADADA
+      DADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDCDCDCDCDCDCDCDCDCDCDC
+      DCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDEDEDEDEDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFE0E0E0
+      E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E2E2
+      E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7
+      E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBECECECECECECECECECECECECEDEDEDECECECEDEDEDEDEDEDECECECEDEDEDED
+      EDEDEDEDEDECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7888888888888878787878787888888878787
+      8787878787878787878787878787878787878787878686868686868686868686
+      8686868686868686868686868686868686868686868685858585858585858585
+      8585858585858585858585858585858585858585858585848484848484848484
+      8484848484848484848484848484848484848484848484848383838383838383
+      8383838383838383838383838383838383838383838383838382828282828283
+      8383838383838383828282828282828282828282828282828282828282828282
+      8282828282828282828181818181818282828181818181818181818181818181
+      8181818181818182828281818182828282828283838382828282828282828283
+      8383838383848484848484838383838383838383848484838383838383838383
+      8383838282828181818181818080807F7F7F7E7E7E7E7E7E7D7D7D7D7D7D7C7C
+      7C7C7C7C7B7B7B7A7A7A7A7A7A79797979797979797978787878787878787878
+      78787878787979796D82D26C83DE6C84DE6C83DE6C84DE6D84DE6F85DE6F85DE
+      7086DD7086DD7187DD7187DD7287DD7287DC7388DD778AD38D91A19697979B9D
+      9DA3A7A7ACB4B44F446B41335E41335E41335E41335E5A52769095A6B7C4C4AC
+      B5B5A2A8A89B9E9E979898959595959595959595969696979797979797989898
+      9999999999999A9A9A9A9A9A9C9C9C9C9C9C9D9D9D9E9E9E9E9E9E9F9F9FA0A0
+      A0A0A0A0A1A1A1A2A2A2A2A2A2A3A3A3A4A4A4A5A5A5A5A5A5A6A6A6A6A6A6A8
+      A8A8A8A8A8A9A9A9AAAAAAABABABABABABA8ADC3A7AED2A7AED1A8AFD0AAB1D1
+      AAB1D0ABB1D0ADB3D0AEB4D1AFB5D1B0B5D1B1B6D1B3B8D1B3B8D1B5B9D1B5B9
+      D1B6BAD0B7BBD1B8BCD1B9BDD0BABDD0BBBED0BBBED0BEC0CFC4C4C7C6C6C6C5
+      C5C5C6C6C6C7C7C7C7C7C7C7C7C7C8C8C8C8C8C8C8C8C8C9C9C9CACACACACACA
+      CBCBCBCBCBCBCCCCCCCDCDCDCDCDCDCECECECECECECFCFCFCFCFCFD0D0D0D1D1
+      D1D1D1D1D2D2D2D2D2D2D4D4D4D4D4D4D4D4D4D5D5D5D5D5D5D5D5D5D6D6D6D6
+      D6D6D6D6D6D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8
+      D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9DADA
+      DADADADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDB
+      DBDBDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDD
+      DDDDDDDDDDDDDEDEDEDDDDDDDEDEDEDEDEDEDDDDDDDEDEDEDFDFDFDEDEDEDEDE
+      DEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFE0E0E0E0E0E0E0
+      E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E2E2E2
+      E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E4E4
+      E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECEC
+      ECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F1F1F1F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F788888888888888888888888888888888888888888888
+      8888888888878787878787878787878787878787878787878787878787868686
+      8686868787878787878787878686868686868686868686868686868686868686
+      8686868686868686868686868685858585858585858585858585858585858585
+      8585858585848484858585848484848484848484848484838383848484838383
+      8383838484848484848484848484848383838484848383838383838383838383
+      8383838383838383838383838382828282828283838382828283838382828282
+      8282828282828282818181828282828282818181818181828282828282828282
+      8181818282828383838282828383838383838383838484848484848484848484
+      8484848485858585858585858585858585858585858585858584848484848483
+      83838383838282828282828181818080807F7F7F7E7E7E7E7E7E7D7D7D7D7D7D
+      7C7C7C7B7B7B7B7B7B7A7A7A7A7A7A7A7A7A7979797979797979797878787979
+      797A7A7A777D936C84DF6D84DF6D85DE6E85DE6E85DE6F85DE7086DE7087DE71
+      87DE7187DD7187DD7388DD7388DE7489DD7489DD778AD88C93AD9C9E9EA4A9A9
+      AEB7B73F32603F32603F32603F32603F32603F32603F3260716F8DB9C6C6ABB3
+      B3A1A6A69A9C9C9797979696969696969797979898989898989898989999999A
+      9A9A9A9A9A9A9A9A9C9C9C9D9D9D9D9D9D9E9E9E9E9E9EA0A0A0A0A0A0A0A0A0
+      A1A1A1A2A2A2A2A2A2A3A3A3A4A4A4A4A4A4A5A5A5A6A6A6A6A6A6A8A8A8A9A9
+      A9A9A9A9AAAAAAAAAAADA6ACCAA6AED2A7AED2A9B0D2A9B0D1AAB1D1ABB1D1AC
+      B2D1AEB3D1AEB4D1AFB5D1B0B5D1B2B7D2B3B8D1B4B9D1B4B9D1B6BAD1B7BBD1
+      B7BBD1B9BDD2BABED1BBBED1BCBFD1BDC0D2BEC1D2BFC2D1C5C6C9C7C7C7C7C7
+      C7C8C8C8C8C8C8C8C8C8C9C9C9C9C9C9CACACAC9C9C9CBCBCBCBCBCBCCCCCCCC
+      CCCCCDCDCDCECECECECECECFCFCFD0D0D0D0D0D0D0D0D0D0D0D0D2D2D2D3D3D3
+      D3D3D3D4D4D4D5D5D5D5D5D5D4D4D4D5D5D5D5D5D5D6D6D6D6D6D6D6D6D6D6D6
+      D6D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8D8D8D8D8
+      D8D8D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADA
+      DADADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDCDC
+      DCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDE
+      DEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDF
+      DFDFDFE0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E2E2E2E3
+      E3E3E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4
+      E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E8E8E8E9E9E9
+      E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECEC
+      ECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F78989898989898989898989898888888989898888888888888888
+      8888888888888888888888888888888888888887878787878787878787878786
+      8686878787878787878787878787868686878787868686868686878787868686
+      8686868686868686868686868686868686868585858585858585858585858686
+      8685858585858585858585858585858584848484848484848484848484848484
+      8484848484848484848484848484838383848484838383838383838383838383
+      8383838383838383838383838383838383838383838383838383838383838282
+      8282828283838382828282828282828282828283838382828282828282828282
+      8282838383848484838383848484848484858585858585858585868686868686
+      8686868787878787878787878787878787878787878686868585858585858585
+      858383838383838282828181818080807F7F7F7F7F7F7F7F7F7E7E7E7D7D7D7C
+      7C7C7C7C7C7B7B7B7B7B7B7A7A7A7A7A7A7A7A7A7A7A7A7979797A7A7A7A7A7A
+      7A7A7A7181BF6D84DF6E85DF6F86DF6F85DE7086DF7087DF7187DE7188DE7288
+      DE7288DE7389DE7489DD7489DD748ADD758ADD788EDE8E9ABAA1A6A6ACB4B43E
+      30633E30633E30633E30633E30633E30633E30633E3063898DA3B5C0C0A7AEAE
+      9EA1A19899999696969696969797979898989999999999999A9A9A9A9A9A9B9B
+      9B9B9B9B9D9D9D9E9E9E9E9E9E9E9E9EA0A0A0A1A1A1A1A1A1A2A2A2A2A2A2A3
+      A3A3A3A3A3A4A4A4A5A5A5A6A6A6A6A6A6A6A6A6A7A7A7A9A9A9A9A9A9AAAAAA
+      ABABABA7ACC6A6ADD2A7AFD3A9B0D3AAB1D2AAB1D2ABB2D2ACB2D2ADB3D2AFB4
+      D2AFB5D2B0B6D2B2B7D2B3B8D2B3B8D2B5BAD2B5BAD1B7BBD2B7BBD1B8BCD2B9
+      BDD2BABED1BBBED1BCBFD1BDC1D2BEC1D2BFC2D2C0C3D1C6C6C8C7C7C7C7C7C7
+      C9C9C9C8C8C8C9C9C9C9C9C9CACACACACACACBCBCBCCCCCCCCCCCCCCCCCCCDCD
+      CDCECECECECECECFCFCFCFCFCFD0D0D0D1D1D1D1D1D1D2D2D2D3D3D3D3D3D3D5
+      D5D5D5D5D5D5D5D5D5D5D5D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7
+      D7D7D7D7D7D7D8D8D8D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9
+      D9D9D9D9D9D9D9DADADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDB
+      DBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDCDCDC
+      DCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFE0
+      E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1
+      E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3
+      E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECEC
+      ECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7898989898989898989898989898989898989898989898989888888898989
+      8989898888888888888888888888888888888888888888888888888787878787
+      8787878787878787878787878787878787878786868686868687878786868686
+      8686868686868686868686868686868686868686858585858585868686868686
+      8686868585858585858585858585858585858585858484848484848585858585
+      8585858584848484848484848484848484848484848484848484848484848484
+      8484848484838383838383848484838383838383838383838383838383838383
+      8383838383838383838383838383838282828383838383838383838383838484
+      8484848485858585858585858586868686868687878788888888888889898988
+      8888898989898989898989898989888888888888888888878787878787868686
+      8585858484848383838181818080807F7F7F7F7F7F7E7E7E7E7E7E7D7D7D7C7C
+      7C7C7C7C7B7B7B7B7B7B7A7A7A7A7A7A7A7A7A7979797A7A7A7A7A7A7A7A7A7A
+      7D886E85DF6E85DF6F86DF7086DE7086DF7087DF7188DE7288DE7288DE7389DE
+      7389DE758ADE758BDE768BDD768BDD7A8EDE8095E08F9FCAA6ADAD7D7D94B2BD
+      C1C5D5D5B3C1CB58517D3C2F653C2F653C2F65453A6DBECCCCAEB7B7A2A6A69B
+      9D9D9797979898989898989898989999999A9A9A9A9A9A9B9B9B9B9B9B9D9D9D
+      9D9D9D9E9E9E9F9F9F9F9F9FA1A1A1A0A0A0A2A2A2A2A2A2A3A3A3A2A2A2A4A4
+      A4A5A5A5A5A5A5A5A5A5A6A6A6A6A6A6A7A7A7A9A9A9A9A9A9AAAAAAA7ABC1A6
+      ADD3A6AED2A8AFD3A9B0D3AAB1D2AAB1D2ABB2D2ACB2D2AEB4D3AFB5D2B0B6D2
+      B1B6D2B2B7D2B3B9D3B4B9D2B5BAD2B6BAD2B7BBD2B8BCD2B9BDD3BABED3BBBF
+      D2BCBFD2BDC0D2BDC1D2BFC2D3C0C3D3C1C3D3C3C5D1C7C8C9C8C8C8CACACAC9
+      C9C9CACACACACACACBCBCBCBCBCBCCCCCCCCCCCCCDCDCDCDCDCDCECECECFCFCF
+      CFCFCFD0D0D0D1D1D1D1D1D1D1D1D1D1D1D1D2D2D2D3D3D3D3D3D3D4D4D4D5D5
+      D5D5D5D5D6D6D6D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7
+      D7D7D7D7D7D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9
+      D9D9D9DADADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDB
+      DBDBDBDBDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDD
+      DDDDDDDDDDDDDDDDDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDF
+      DFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFE0E0E0E0E0
+      E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E2E2E2E2
+      E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9
+      E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECEC
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F5F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78A8A
+      8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8989898989898A8A8A89898989898989
+      8989888888888888888888898989888888888888888888888888878787888888
+      8888888888888888888888888888888787878787878787878787878787878787
+      8787878787878787878787878787878787878786868686868687878786868686
+      8686868686868686868686858585858585858585858585858585858585858585
+      8585858585858585858585858484848585858585858484848484848484848484
+      8484848484848484848484848484848484848484848484848484848483838384
+      8484848484838383838383838383838383838383838383848484858585858585
+      8585858686868686868787878888888888888A8A8A8989898A8A8A8A8A8A8A8A
+      8A8B8B8B8B8B8B8B8B8B8B8B8B8A8A8A8A8A8A89898988888888888887878786
+      86868484848383838181818181818080807F7F7F7F7F7F7E7E7E7D7D7D7D7D7D
+      7C7C7C7C7C7C7C7C7C7B7B7B7B7B7B7B7B7B7A7A7A7B7B7B7B7B7B7B7B7B7681
+      AE6F86DF7086DF7187DF7188DF7288DF7288DF7289DF7389DF7489DE748ADE75
+      8BDE768BDE778CDE778CDE7A8EDF7E93E08499E199A3B8A7AEAEAEB7B7B8C4C4
+      C4D4D4C6D9DC4E45773B2E673B2E673B2E6799A1B2B4BFBFA6ACAC9EA0A09999
+      999898989898989999999999999A9A9A9B9B9B9B9B9B9C9C9C9D9D9D9E9E9E9E
+      9E9E9F9F9FA0A0A0A1A1A1A1A1A1A2A2A2A2A2A2A3A3A3A3A3A3A4A4A4A5A5A5
+      A5A5A5A6A6A6A7A7A7A8A8A8A8A8A8A9A9A9AAAAAAA9ABB5A5ADD4A6ADD3A7AF
+      D3A8AFD3AAB1D4AAB1D3ABB2D3ACB3D3ADB3D3AFB5D3AFB5D3B1B7D3B2B7D3B3
+      B8D3B4B9D3B5BAD3B6BBD3B7BBD3B8BCD3B8BDD3B9BDD3BABED3BCBFD3BDC0D3
+      BDC0D2BEC1D3BFC2D3C1C4D4C1C3D3C2C4D3C5C6CEC9C9C9C9C9C9C9C9C9CACA
+      CACACACACACACACCCCCCCCCCCCCDCDCDCDCDCDCDCDCDCECECECFCFCFD0D0D0D0
+      D0D0D1D1D1D1D1D1D1D1D1D3D3D3D3D3D3D4D4D4D5D5D5D6D6D6D6D6D6D6D6D6
+      D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D9D9
+      D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADADADAD9D9D9DA
+      DADADBDBDBDADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDB
+      DCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDD
+      DDDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDF
+      DFDFE0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E2E2
+      E2E3E3E3E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4
+      E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEBEBEBEBEBEBEAEAEAEBEBEBEAEAEAEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEFEFEFEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78B8B8B8B8B8B
+      8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A
+      8A89898989898989898989898989898989898989898989898988888888888888
+      8888888888888888888888888888898989888888888888888888888888888888
+      8888888888888888888787878787878787878787878787878787878787878787
+      8787878787878787878786868686868686868685858586868686868686868686
+      8686858585858585868686858585858585858585858585858585858585858585
+      8585858585858585858585858484848484848484848484848484848484848484
+      8484848483838384848483838383838384848484848485858586868685858587
+      87878787878787878989898A8A8A8B8B8B8B8B8B8B8B8B8C8C8C8D8D8D8C8C8C
+      8D8D8D8D8D8D8C8C8C8C8C8C8C8C8C8B8B8B8B8B8B8A8A8A8989898888888686
+      868585858383838282828181818181818080807F7F7F7E7E7E7E7E7E7D7D7D7C
+      7C7C7C7C7C7C7C7C7B7B7B7C7C7C7B7B7B7B7B7B7B7B7B7C7C7C7B7F897087E0
+      7087E07187DF7288DF7389E07389E07389DF748ADF7489DE758ADF768BDE768B
+      DE778CDF778CDE798EDE7C91DF7F94E0939AA79DA1A1A1A7A7AAB2B2B5C1C1C3
+      D4D4979FB6392D69392D69392D698184A2B9C5C5AAB1B19FA2A29A9B9B989898
+      9999999A9A9A9B9B9B9B9B9B9C9C9C9C9C9C9D9D9D9D9D9D9F9F9F9F9F9FA0A0
+      A0A1A1A1A2A2A2A2A2A2A2A2A2A3A3A3A3A3A3A4A4A4A5A5A5A6A6A6A6A6A6A7
+      A7A7A8A8A8A8A8A8A9A9A9A9A9A9AAAAAAA6ADD0A6AED4A6AED3A8B0D4A9B0D4
+      AAB1D4AAB2D4ABB2D3ACB3D3AEB4D3AFB5D3B0B6D3B1B7D3B2B7D3B3B8D3B3B9
+      D3B5BAD3B6BBD3B8BCD3B8BCD3B9BDD3BABED4BBBFD4BCBFD3BDC1D3BDC1D3BF
+      C2D3C0C3D4C1C4D4C2C4D4C2C5D4C3C6D4C8C8CBCACACACBCBCBCBCBCBCBCBCB
+      CBCBCBCCCCCCCDCDCDCECECECECECECECECED0D0D0D0D0D0D0D0D0D1D1D1D2D2
+      D2D1D1D1D1D1D1D3D3D3D3D3D3D4D4D4D5D5D5D6D6D6D6D6D6D6D6D6D7D7D7D7
+      D7D7D7D7D7D7D7D7D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9
+      D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADADADADADADADADADADBDBDBDBDB
+      DBDBDBDBDBDBDBDBDBDBDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDD
+      DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDDDDDDDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFE0E0
+      E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E4E4E4E5E5
+      E5E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78B8B8B8B8B8B8B8B8B8B
+      8B8B8B8B8B8A8A8A8B8B8B8B8B8B8B8B8B8A8A8A8B8B8B8A8A8A8A8A8A8A8A8A
+      8989898A8A8A8989898989898989898989898989898989898989898989898989
+      8989898989898989898989898989898989898989898989898988888888888888
+      8888888888888888888888888888888888888888888888888888888888888888
+      8787878888888888888888888787878787878787878787878686868686868686
+      8686868686868686868686868686868686868685858585858585858585858585
+      8585858585858585858585848484848484848484848484848484848484848484
+      8484848383838484848484848484848484848585858686868686868787878888
+      888989898A8A8A8A8A8A8C8C8C8D8D8D8D8D8D8E8E8E8E8E8E8F8F8F8F8F8F8F
+      8F8F8F8F8F8F8F8F8E8E8E8E8E8E8E8E8E8E8E8E8D8E8E8B8C8C8A8B8B888888
+      8686868383838282828282828181818080807F7F7F7E7E7E7E7E7E7D7D7D7D7D
+      7D7C7C7C7C7C7C7C7C7C7B7B7B7B7B7B7C7C7C7C7C7C7583BB7188E07187E072
+      88E07289E07389E0748AE0748AE0748AE0758ADF758ADF768CDF778CDF778CDF
+      788DDE798DDE7A8FDE7D91DF939494949696989A9A9FA4A4AAB2B2BAC7C7C2D2
+      D6382C6C382C6C382C6C5D5989BCCACAACB4B4A2A5A59C9D9D9999999A9A9A9A
+      9A9A9C9C9C9C9C9C9D9D9D9D9D9D9E9E9E9E9E9E9F9F9FA2A2A2A2A2A2A1A1A1
+      A2A2A2A3A3A3A3A3A3A4A4A4A4A4A4A4A4A4A5A5A5A6A6A6A6A6A6A7A7A7A8A8
+      A8A8A8A8A9A9A9AAAAAAA9ACBBA6AED5A6AED5A7AFD4A8B0D4A9B0D4AAB2D5AB
+      B2D4ADB4D4AEB4D4AFB5D4AFB5D4B1B7D4B2B8D4B3B8D4B3B9D4B5BAD5B7BCD4
+      B8BCD4B8BCD4B9BED4B9BED4BABED4BDC0D4BDC1D4BEC2D4BFC2D4C0C3D4C1C4
+      D4C2C5D5C4C7D5C3C6D5C4C7D5C6C9D3CACACACACACACBCBCBCBCBCBCBCBCBCC
+      CCCCCDCDCDCECECECECECECFCFCFCFCFCFD0D0D0D1D1D1D1D1D1D2D2D2D2D2D2
+      D2D2D2D4D4D4D5D5D5D5D5D5D6D6D6D6D6D6D7D7D7D7D7D7D8D8D8D8D8D8D8D8
+      D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADA
+      DADADADADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDB
+      DBDBDBDBDBDBDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDD
+      DDDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDF
+      DFDFDFDFDFDFDFDFDFDFDFDFDFDFE0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0
+      E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECEC
+      ECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3
+      F3F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78C8C8C8C8C8C8C8C8C8C8C8C8B8B
+      8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8A8A8A8A8A8A8B8B8B8B
+      8C8C8C8D8D8C8D8D8C8D8D8C8D8D8B8C8C8B8B8B8A8A8A8A8A8A8A8A8A8A8A8A
+      8A8A8A8A8A8A8989898B8B8B8B8C8C8B8B8B8C8D8D8D8E8E8C8D8D8C8D8D8C8D
+      8D8B8C8C8B8B8B8A8A8A8A8A8A8B8B8B8A8B8B8B8C8C8C8E8E8E8F8F8E8F8F8F
+      91918F91918E90908E8F8F8D8E8E8B8D8D898A8A888989888888878787878787
+      8686868888888989898889898889898889898888888788888787878686868686
+      8685858586868686878787888887888887888887888886878785858584848484
+      8484848484848484858585868686878888888989898A8A8A8A8A898A8A8B8B8B
+      8B8B8B8B8B8B8D8D8D8E8E8E8F8F8F9090909090909191919292929292929394
+      949495959495959496969596969698989598989496969295959092928D8F8F8A
+      8B8B8889898586868384848181818080808080807F7F7F7E7E7E7E7E7E7C7C7C
+      7C7C7C7C7C7C7C7C7C7C7D7D7C7D7D7983A9738BE1748BE1748BE1758BE1758D
+      E1768DE1778DE17990E17A90E17C92E17C92E17D93E27D93E17C91E07C90E07B
+      90E07C90DF7C8FDA909090929292939393999B9BA3A9A9B2BDBDC5D5D5362A6E
+      362A6E362A6E5C588BBECCCCAFB7B7A3A7A79C9D9D9B9B9B9B9B9B9A9A9A9B9B
+      9B9D9D9D9E9F9F9FA0A0A1A2A2A2A4A4A5A6A6A6A8A8A6A8A8A7A8A8A6A7A7A6
+      A7A7A6A7A7A5A6A6A6A6A6A5A5A5A6A6A6A6A6A6A7A7A7A8A8A8A8A8A8A9A9A9
+      AAAAAAABABABA7B0D2A8B2D7AAB2D7ACB4D7AEB6D9AEB7D9AFB8D9B1B8D7B1B8
+      D7B1B8D6B0B7D6B2B8D5B2B8D5B4B9D5B4B9D5B5BAD5B6BBD5B8BDD5BABED5BA
+      C0D6BBC1D6BCC1D6BEC2D7BFC2D5BEC2D5BFC3D5C0C3D5C2C6D6C4C8D7C5C9D8
+      C6CAD8C8CCD8C8CCD8C8CBD8CCCDCFCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCECE
+      CECFCFCFCFCFCFCFCFCFD0D0D0D1D1D1D2D2D2D2D2D2D3D3D3D3D3D3D3D3D3D5
+      D5D5D6D6D6D7D7D7D8D9D9D9DADAD9DADAD9DADADADBDBDADBDBDADADAD9DADA
+      DADADADADADAD9D9D9D9D9D9D9D9D9D9D9D9DADADADADBDBDBDBDBDBDBDBDBDB
+      DBDCDCDCDCDDDDDCDDDDDCDDDDDCDCDCDCDCDCDDDDDDDDDDDDDCDDDDDCDCDCDD
+      DDDDDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDEDE
+      DEDEDEDEDEDEDFDFDFDFDFDFDEDFDFDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDF
+      DFDFDFDFDFE0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E2E2E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3
+      E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECECECECEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F78C8C8C8D8D8D8C8C8C8C8C8C8C8C8C8C8C8C
+      8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8D8D8E8F8F9092929295
+      959396969396969194949092928D8E8E8C8D8D8B8B8B8A8A8A8A8A8A8A8A8A8A
+      8A8A8B8C8C8C8D8D8F91919294949497979498989498989395959093938E9090
+      8C8D8D8C8C8C8C8D8D8D8F8F909292939595969A9A989D9D9AA0A09BA1A19BA1
+      A19AA0A0999E9E969A9A9396969093938E8F8F8B8C8C8A8A8A898A8A8A8B8B8A
+      8C8C8D8F8F8E91918F92928F91918C8F8F8A8C8C888989878787878787878888
+      898A8A8B8D8D8C8E8E8D90908D90908C8F8F8A8C8C8889898586868585858585
+      858687878889898A8C8C8C8F8F8D90908F91918E90908D8F8F8C8D8D8C8C8C8D
+      8D8D8E8E8E909090919191929292939393949494969696979898999B9B9C9E9E
+      9EA1A1A0A4A4A1A6A6A2A7A7A2A8A8A2A8A8A0A6A69DA3A39AA0A0959A9A9094
+      948D9090898B8B8687878383838181818080807F7F7F7E7E7E7E7E7E7D7D7D7D
+      7D7D7C7D7D7E7E7E7E86A0778FE37B93E37C94E47C95E47C94E47C94E37D95E4
+      8097E48299E4859DE5889FE589A2E689A1E5899FE5879DE4849AE28297E17F95
+      E18393CC919191919191919191989999A1A6A6B0B9B9C2D1D15C588D35297035
+      29705C588DC0CECEB0B8B8A4A8A89D9E9E9A9A9A9B9B9B9C9C9C9E9F9FA1A2A2
+      A3A5A5A6A9A9A9ADADACB0B0AEB3B3AFB3B3B0B4B4B0B4B4AFB3B3ADB0B0ACAF
+      AFAAACACA9AAAAA8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A9A9A9AAAAAAACACACAE
+      B0B8ABB5DAAEB9DBB1BBDCB3BDDCB5C0DDB7C2DEB7C1DDB7C0DCB6BFDBB5BDD9
+      B3BBD8B3BAD7B4BAD6B4BAD5B5BAD5B6BCD6BABFD7BCC2D8BFC4DAC0C7DBC1C8
+      DBC2C8DBC3C9DBC3C7D9C2C7D8C2C7D8C4C8D8C6CAD9C9CEDBCBD0DDCCD2DECE
+      D4DFCFD4DFD0D4DED1D4DAD1D3D3CFD0D0CFD0D0CFD0D0CECECECECECECFCFCF
+      CFCFCFD0D0D0D0D0D0D1D1D1D2D2D2D3D3D3D3D3D3D3D4D4D5D5D5D6D6D6D8D9
+      D9D9DBDBDBDDDDDCDEDEDEDFDFDFE1E1DFE1E1DEE0E0DEE0E0DDDFDFDDDEDEDC
+      DDDDDBDCDCDBDBDBDADBDBDADBDBDCDCDCDCDDDDDDDEDEDEDFDFDEE0E0DEDFDF
+      DFE0E0DFE0E0DFE0E0DFE0E0DFE0E0DEDFDFDFDFDFDEDFDFDDDEDEDEDEDEDDDE
+      DEDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDEDFDFDFDFDFDFE0E0E0E1E1E0
+      E1E1E1E2E2E1E2E2E0E1E1E0E0E0DFE0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1
+      E2E2E2E2E3E3E3E3E3E3E4E4E2E3E3E2E3E3E2E3E3E2E2E2E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3
+      E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9EAEAEAE9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBECECECECECECECECECECECECECECECECECECECECECECECECECECECEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F1F1
+      F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F78D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8C
+      8C8C8D8D8D8D8D8D8C8C8C8C8C8C8D8D8D8F9191929595979A9A9A9F9F9CA2A2
+      9CA2A29A9F9F969A9A9194948E90908C8C8C8B8B8B8B8B8B8B8B8B8C8D8D8E90
+      90929595969A9A9CA1A19FA5A59FA6A69FA6A69DA2A2989C9C94969691939391
+      92929295959699999B9F9FA0A6A6A3ABABA7B1B1AAB4B4ABB6B6ABB7B7AAB5B5
+      A8B2B2A5AEAE9FA7A79AA0A09599998F92928C8E8E8B8D8D8D8E8E9092929498
+      98989D9D989E9E979D9D9498989093938C8E8E888989888989898A8A8D8F8F90
+      9494949999979D9D969C9C949A9A9094948C8E8E898A8A858686858686888A8A
+      8C8F8F919595959B9B969C9C969C9C9599999295959091918E8F8F8E8E8E8F8F
+      8F9090909292929393939596969899999C9D9D9FA2A2A3A8A8A7ADADABB2B2AF
+      B8B8B1BBBBB3BEBEB4BFBFB4C0C0B2BEBEAFBABAABB5B5A6B0B09FA7A7999F9F
+      9297978D9191898B8B8586868182828080807F7F7F7E7E7E7E7E7E7D7D7D7F7F
+      7F7F84947A91DE7F97E6859DE788A1E789A2E78AA3E789A3E78AA3E78EA7E892
+      ABE996B0EA99B4EB9CB6EB9CB5EB9AB3EA97AFE991A8E78DA3E5879DE48999CF
+      939494929393929292969898A0A4A4AEB7B7C0CECE5A57903328733328735A57
+      8FC0CECEB1B9B9A4A8A89FA0A09C9C9C9D9E9E9FA0A0A3A5A5A7ABABABB0B0B1
+      B7B7B5BCBCB8C0C0BBC4C4BCC5C5BCC5C5BDC5C5BAC2C2B7BEBEB4B9B9B1B5B5
+      AEB1B1AAACACA9A9A9A8A8A8A8A8A8A9A9A9ABABABACADADB0B2B2B1B8CCB3BE
+      DFB7C4E1BBC8E2BFCCE4C1CEE5C3D0E6C3CFE5C1CDE3BFC9E1BBC5DEB8C1DBB6
+      BED9B6BCD8B6BCD7B7BDD7BAC0D9BEC4DBC2C9DDC5CEE0C8D1E2CAD2E2CAD2E2
+      C9D1E0C8CEDEC6CCDCC7CDDCC9CEDDCBD1DFCFD5E1D1D8E3D4DBE5D6DDE6D6DD
+      E6D6DDE5D6DCE3D6DADAD4D7D7D2D4D4D0D1D1D0D0D0D0D0D0D0D0D0D0D0D0D1
+      D1D1D1D1D1D2D2D2D3D3D3D4D4D4D4D4D4D5D5D5D8D8D8D9DADADCDDDDDEE0E0
+      E0E3E3E2E5E5E3E6E6E3E7E7E4E8E8E3E7E7E3E6E6E1E4E4E1E3E3DFE0E0DDDE
+      DEDCDCDCDBDBDBDBDCDCDCDDDDDEDFDFE0E1E1E1E3E3E2E5E5E4E6E6E4E7E7E4
+      E7E7E4E7E7E4E6E6E3E6E6E4E6E6E3E5E5E2E3E3E1E2E2E0E0E0DFDFDFDFDFDF
+      DEDFDFDEDEDEDEDEDEDDDDDDDEDEDEDFDFDFE0E0E0E1E2E2E2E4E4E3E5E5E3E5
+      E5E3E5E5E2E3E3E1E1E1E0E0E0DFE0E0E0E0E0E1E1E1E1E2E2E3E3E3E4E5E5E5
+      E7E7E6E8E8E6E8E8E6E7E7E5E6E6E3E4E4E3E4E4E3E3E3E2E2E2E2E2E2E2E2E2
+      E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E2E2E2E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9
+      E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F6F6F6F6F6F6F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F78E8E8E8E8E8E8E8E8E8E8E8E8D8D8D8D8D8D8E8E8E8D8D8D8D8D
+      8D8D8D8D8D8D8D8D8D8D8F8F8F929494989C9C9FA5A5A6AEAEAAB4B4AAB4B4A6
+      AEAE9FA5A5979B9B9294948E8E8E8C8C8C8C8C8C8D8D8D8F9090939595999D9D
+      A1A8A8A8B1B1ADB8B8AEBABAACB7B7A6AFAF9FA6A6999E9E969A9A979A9A9BA0
+      A0A0A7A7A8B1B1AFBABAB4C2C2B9C8C8AAB6C09AA3B79AA3B798A2B6B8C8C8B4
+      C2C2AEBABAA6B0B09DA4A4969A9A9093938F9090919393969B9B9DA4A4A3ABAB
+      A5AFAFA4ADAD9EA6A6979D9D9194948B8C8C898A8A8C8E8E919595989E9E9FA7
+      A7A3ADADA4AEAE9FA8A8989E9E9195958B8D8D8788888788888B8E8E93979799
+      A0A0A0A9A9A4AEAEA2ABAB9DA5A5989D9D9395959091918F8F8F8E8F958D909C
+      9494949798989A9C9C9FA1A1A4A9A9AAB0B0B1B9B9B7C1C1BCC8C8C0CECEB1BC
+      C6A0A9BDA1AABE7B7FA69FA9BD9DA7BBACB9C3B9C8C8B2C0C0A9B5B5A1ABAB9A
+      A1A19297978C8F8F8789898484848181817F7F7F7F7F7F7F7F7F7E81877A8FD8
+      819AE689A3E892ADEB99B3EC9CB7ED9DB8ED9CB7EC9DB8EDA0BBEEA4C0EEAAC5
+      F0A6C0E990A3D3A0B7E2AEC9F0AAC5EFA4BDED9CB4EA94ABE792A2CB989A9A95
+      96969494949799999FA4A4AEB7B7BFCDCD5A56913227753227755A5691C1CECE
+      B2BABAA6AAAA9FA0A09E9F9FA0A1A1A5A8A8ABAFAFB2B8B8B8C0C0BEC8C8C3CF
+      CFC6D3D3ACB5C4A4ABBFA4ABBFB6C0CAC7D3D3C3CDCDBEC7C7B9BFBFB3B7B7AE
+      B0B0ABACACA9A9A9AAAAAAACACACAEAFAFB2B5B5B7BBBBB9C4DDBECCE6C4D2E8
+      C8D7EBCCDBECB0BBD7A8B1D0BBC6DECDDAEBC9D6E8C4D0E4BEC7E0BBC3DCB8BF
+      D9B8BED9B9C0D9BFC5DDC3CBDFCAD2E3CED9E7D2DDE9D4DFEAD3DDE9D0DAE6CE
+      D6E3CCD3E1CCD3E0CED4E1D2D9E5D6DEE8D9E2EAB1B6CFA8ABC89393B9B3B7CF
+      C8CEDDDDE3E4DBDFDFD7DADAD4D6D6D3D4D4D0D1D1D0D1D1D1D1D1D1D1D1D2D2
+      D2D2D2D2D3D3D3D4D4D4D4D5D5D5D6D6D8D9D9DBDDDDDFE2E2E2E6E6E5E9E9E7
+      ECECBABCD0BBBDD1BCBDD1BCBDD1C6C8D7E8ECECE5E9E9E3E6E6E1E3E3DFE0E0
+      DDDEDEDDDEDEDFE0E0E1E3E3E4E6E6E6E9E9E8ECECE9EDEDE9EEEEE9EEEEE9EE
+      EEE9EDEDE9EDEDE8ECECE7EBEBE6E9E9E4E7E7E3E5E5E2E3E3E0E1E1DFE0E0DF
+      DFDFDEDEDEDEDEDEDEDFDFE1E1E1E2E3E3E4E6E6E6E9E9E7EAEAE8EAEAE7E9E9
+      E5E6E6E3E4E4E1E2E2E1E1E1E1E1E1E2E2E2E3E4E4E5E7E7E7E9E9E8EBEBEAED
+      EDE9ECECE8EBEBE6E8E8E4E6E6E4E5E5E3E3E3E2E2E2E2E2E2E2E2E2E2E2E2E3
+      E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4
+      E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E4E4E4E5E5E5E5E5E5E5E5E5E5E5
+      E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9
+      E9E9E9E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F78F8F8F8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E
+      8E8E8E8E8E8E9192929598989EA3A3A9B2B2514C8A524E8B524E8B514C89A8B2
+      B29DA3A39497979091918D8D8D8D8D8D8F90909395959A9E9EA3ABABAEBABA8E
+      95AF54508D54508D534E8C514B89656290A1A7A79DA2A2A0A6A6A6AFAFAFBABA
+      B8C7C78990AF5F5D96302677302677302677302677302677302677423B836464
+      97898FA9979FA99CA2A2959898929595969A9A9EA5A59298A8504C89514D8A51
+      4C8A7D7F9E9FA7A79599998E8F8F8A8C8C8F9292969C9CA2ABAB5F5D90514C8A
+      514D8A504B88A2ACAC979D9D8E9191898A8A8A8B8B8F93939AA1A18F96A5504B
+      89514C8A504C897B7F9EA0A8A8979B9B919393848EAF7289DE7189E38091C796
+      9BA5A1A4A4A8ADADB1B8B8B8C3C3C0CDCDA2AABF6B6B9E443D85302677302677
+      302677302677302677302677302677433C8468699C9AA5BAB4C4C4A9B6B6A0A9
+      A9969C9C8E9292888A8A8485858181818080807E8085788BD27D95E688A1E890
+      A8E54D4C954F4F965150966A71AEB3D1F3B2D0F39BB1DD6368A639307F302677
+      3026773026773026775353978492C5AEC9F0A4BDECA0B0CC9FA4A4999C9C9698
+      98989A9AA1A5A5AEB6B6BFCDCD585592302677302677585692C1CFCFB2BABAA8
+      ACACA1A3A3A2A3A3A6A9A9ADB2B2B6BDBDBEC9C9BDC8CD7E80AA4E498B302677
+      3026773026773026773026773026775753907C7CA59CA1B5B8BEBEB2B5B5ADAE
+      AEABACACACACACAEB0B0B3B6B6B9BDBDC0C7C7C5D4EAB8C5DF8184B44F4A8E30
+      2677302677302677302677302677443D86575294C3CDE3BEC7DEBAC2DBBAC1DB
+      BDC5DCC4CCE1CCD6E6C9D3E4706EA53B317F3026773026773026776E6BA2D2DA
+      E6D2D9E5CAD1E08E8EB866629C3026773026773026773026773026773026775D
+      5795B4B7CCDCE1E1D8DBDBD5D7D7D2D3D3D2D2D2D1D1D1D2D2D2D2D2D2D4D4D4
+      D4D4D4D5D5D5D6D6D6D7D8D8DADCDCDFE2E2C1C2D2807CAA534B8E3026773026
+      77302677302677302677302677483F878D8BB4DCE0E6E5E8E8E1E3E3DFE1E1DF
+      E0E0E0E2E2E4E6E67570A35F58955F5996605997605997605997605997605997
+      6059967873A6A6A5C5D4D7E2EAEEEEE8EBEBE6E8E8E4E5E5E2E3E3E1E1E1E0E0
+      E0DFDFDFE0E0E0E1E2E2E4E5E5E7E9E95F57955F58955F58955F5795E7EAEAE4
+      E6E6E2E3E3E2E3E3E2E3E3E4E5E5E6E8E8E9ECECE0E2E8605896605996605896
+      5F58955E5794C5C4D4E5E6E6E4E4E4E3E3E3E2E2E2E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEB
+      EBECECECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F4F4F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78F8F
+      8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8E8E8E8E8E8E8E
+      8E8E929393999D9DA4ABABB2BEBE2F257A2F257A2F257A2F257AB1BDBDA2AAAA
+      979B9B9192928E8E8E8E8F8F929393999D9DA3AAAAB0BCBCABB8C33830802F25
+      7A2F257A2F257A382F7EA6AFB4A7AEAEA6ADADABB4B4B4C1C1A5B0C04B478C2F
+      257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A
+      6E6F99A1A8A8989D9D9599999A9F9FA4ADAD9199AE2F257A2F257A2F257A7274
+      9FA7B1B1999F9F9093938D8E8E9295959CA3A3AAB6B6514E8E2F257A2F257A2F
+      257AACB9B99DA5A59195958A8B8B8B8D8D949999A0A9A98F97AC2F257A2F257A
+      2F257A71749FA7B1B196A0AE8094D1738CE5728AE4738DE57892E6809AE896A9
+      D4B1BCC4BFCCCCA2ABC05754942F257A2F257A2F257A2F257A2F257A2F257A2F
+      257A2F257A2F257A2F257A2F257A2F257A2F257A54529398A4BAB1C0C0A4AFAF
+      99A1A1909595888A8A8485858282827588D17790E48099E78FA9EAA1BDEF2F25
+      7A2F257A2F257A54549AC3E3F87078B12F257A2F257A2F257A2F257A2F257A2F
+      257A2F257A2F257A2F257A403B8A95A6D5AFC3D8AAB2B2A1A7A79B9E9E9B9D9D
+      A1A5A5AEB6B6BFCDCD5755942F257A2F257A585595C2CFCFB3BBBBA8ADADA4A7
+      A7A6A9A9AEB3B3B8C0C0C2CDCD878AB03830812F257A2F257A2F257A2F257A2F
+      257A2F257A2F257A2F257A2F257A2F257A2F257ABCC3C3B4B8B8AFB1B1ADAEAE
+      AFB0B0B3B6B6BABFBFC2CACACBD6DA7F83B52F257A2F257A2F257A2F257A2F25
+      7A2F257A2F257A2F257A2F257A2F257AC7D1E5C0C9E0BDC5DEBEC5DEC2CBE0CB
+      D5E6B6BDD73930822F257A2F257A2F257A2F257A2F257A595597D5DEE9D6DDE8
+      AEB2CE2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F25
+      7A9F9FBFDDE2E2D8DBDBD5D7D7D3D4D4D3D3D3D3D3D3D3D3D3D5D5D5D5D5D5D6
+      D6D6D7D7D7DADADADCDEDEE1E4E45D56962F257A2F257A2F257A2F257A2F257A
+      2F257A2F257A2F257A2F257A2F257A524B91DDE1E7E5E8E8E2E4E4E1E3E3E4E6
+      E6E7EAEA5E58982F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F
+      257A2F257A2F257A6B66A1BDBED4EAEEEEE7EAEAE4E6E6E2E3E3E1E1E1E0E0E0
+      E1E2E2E3E4E4E6E8E8EAEDED2F257A2F257A2F257A2F257AEAEDEDE7E9E9E4E5
+      E5E3E4E4E4E5E5E6E8E8EAEDEDE1E4EA534B912F257A2F257A2F257A2F257AA4
+      A2C1E8E9E9E5E6E6E4E4E4E3E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4
+      E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      ECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1
+      F1F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7909090909090
+      9090908F8F8F8F8F8F8F8F8F9090908F8F8F8F8F8F8F8F8F8F8F8F8F8F8F9395
+      959CA0A0A8B1B1B8C7C72D237C2D237C2D237C2D237CB7C5C5A6AFAF9A9E9E92
+      93938F8F8F929393979A9AA0A7A7AEB9B9BDCDCD4B478F2D237C2D237C2D237C
+      372E82A0AABAB0BBBBACB5B5AFB9B9B8C5C58B91B32D237C2D237C2D237C2D23
+      7C2D237C2D237C413B895552945552942D237C2D237C2D237C2D237C6E6F9BA2
+      AAAA9A9E9E989D9D9DA3A3AAB4B497A0B62D237C2D237C2D237C7578A5ACB8B8
+      9CA3A39295958E8F8F949898A0A8A8B0BEBE5250922D237C2D237C2D237CB3C2
+      C2A1AAAA9398988A8C8C8B8D8D969C9CA5B1B1949FB52D237C2D237C2D237C74
+      79A7A2B9DA89A5EA7C96E7758EE5748DE57993E6819BE88CA8EB9BB7EFA1BEEC
+      6E74AE2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D23
+      7C2D237C2D237C2D237C2D237C2D237C2D237C2D237C6E72A4ADBDC2A8B4B49C
+      A4A4909595898B8B7B8AC1748CE47891E5849DE894AEECA9C6F22D237C2D237C
+      2D237C53539B666BAB2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D23
+      7C2D237C2D237C2D237C2D237C8893BDB7C3C3AAB2B2A0A5A59EA1A1A3A8A8AF
+      B8B8BFCDCD5653962D237C2D237C565396C2CFCFB4BCBCAAAEAEA7ABABACB1B1
+      B6BEBEC3CFCF6A69A12D237C2D237C2D237C2D237C2D237C2D237C5754965754
+      96423B892D237C2D237C2D237C2D237CBDC4C4B6BABAB1B3B3B0B2B2B3B5B5B9
+      BEBEC1C9C9C2CCD15754972D237C2D237C2D237C2D237C2D237C2D237C2D237C
+      2D237C2D237C2D237C2D237CC7D2E5C1CAE1C0C8DFC2CAE0C8D1E4D2DEEB4E48
+      922D237C2D237C2D237C2D237C2D237C2D237C585398D5DEE8D6DEE8AEB1CE2D
+      237C2D237C2D237C5B5699898AB88A8BB85C579A2D237C2D237C2D237C393083
+      D7DCE1DBDFDFD7D9D9D5D6D6D3D3D3D3D3D3D3D3D3D5D5D5D5D5D5D6D6D6D7D7
+      D7DADBDBDDDFDFE2E5E55B55982D237C2D237C2D237C5D589A827FB17672A945
+      3D8B2D237C2D237C2D237C2D237C5D579AE9EDEDE5E8E8E4E6E6E5E8E8E9EDED
+      5D579A2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D23
+      7C2D237C2D237C2D237C827FB1ECF0F0E8EBEBE5E7E7E3E4E4E1E2E2E2E2E2E4
+      E5E5E7E9E9EBEFEF2D237C2D237C2D237C453D8BECF0F0E8EAEAE5E7E7E6E7E7
+      E7E9E9EAEDEDEEF2F27772AA2D237C2D237C2D237C2D237CA5A4C5EAEDEDE7E9
+      E9E5E6E6E4E4E4E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4
+      E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F791919191919191919190
+      90909090909090909090909090909090909090909090908F8F8F9495959DA2A2
+      ABB5B5BDCDCD2C227E2C227E2C227E403A8BBBCBCBA9B2B29B9F9F9394949091
+      919699999EA3A3ABB4B4BAC9C97174A82C227E2C227E2C227E2C227E959EBAB8
+      C5C5B2BCBCB1BBBBB8C4C4A6B2C32C227E2C227E2C227E2C227E413A8B9098BB
+      BBCBD0C1D1D1BECDCDBDCDCDBECECEA2ADBE7275A33D36866B6B99A0A7A79A9E
+      9E989D9DA0A6A6AEB9B99AA5BC2C227E2C227E2C227E777BA9AFBCBC9FA6A692
+      95958F9090959A9AA3ABABB5C4C45351962C227E2C227E2C227EB7C8C8A4AEAE
+      949A9A8A8D8D8C8F8F989F9FA9B5B598A4BB2C227E2C227E2C227E727DB9A1BF
+      F08CA8EB7E98E77891E57992E7809AE98CA7EC9BB9EFA4C1ED4645952C227E2C
+      227E2C227E2C227E2C227E61609F9299BBB8C5D0C9D8D8C8D7D7C7D7D7B4C2CD
+      8F97B95F5F9E2C227E2C227E2C227E2C227E2C227E484590AFBFC4A9B6B69AA3
+      A38799C97B92E7768EE57B93E6869FE998B3EDAFCCF32C227E2C227E2C227E2C
+      227E2C227E2C227E2C227E646AAC98ACD8B8D6F5BAD6F4ABC3E6818EC2362E86
+      2C227E2C227E2C227E2C227E8A91B4B5C1C1A9B0B0A3A8A8A6ABABAFB8B8C0CE
+      CE5553982C227E2C227E565398C2CFCFB5BEBEADB2B2ADB2B2B4BBBBC0CBCB68
+      68A22C227E2C227E2C227E2C227E5754999EA6C2CEDCDCCBD8D8CBD7D7CCD8D8
+      CCD8D8999EBB66649E2C227EBBC1C1B6BABAB1B4B4B2B4B4B7BBBBC0C7C7CBD5
+      D5615F9E2C227E2C227E2C227E2C227E58559CA2ABCFCBD9EBD5E4F1D4E2F0A8
+      B0D26A68A82C227EC4CFE4C2CAE2C1C9E1C5CDE3CCD7E8A1A7CC2C227E2C227E
+      2C227E2C227E9396C0D3DDEBB8BED79FA2C6D3DBE6D4DBE7ACB0CE2C227E645F
+      A1C8CEE0DFE8EFE1EAF0E4EDF1E8F3F57371AB2C227E2C227E2C227E9494BCDE
+      E3E3D9DCDCD6D7D7D5D5D5D4D4D4D5D5D5D6D6D6D6D6D6D7D7D7D8D8D8DADBDB
+      DDDFDFE2E5E55B5499382F858B88B6DEE2E8EAEFEFEAEFEFECF1F1EEF5F5A6A6
+      C92C227E2C227E2C227E2C227EAFB0CDE7EBEBE5E8E8E6EAEAEBEFEF5D579C2C
+      227E2C227E2C227E8E8CBA8E8CBA8E8CBA8E8CBA7672AB453D8D2C227E2C227E
+      2C227E2C227E2C227E504A95E0E3E9E8EBEBE5E7E7E3E3E3E3E4E4E5E6E6E8EB
+      EBEDF2F22C227E2C227E2C227E5E579CEEF2F2EAECECE8EAEAE8EAEAEAEDEDEE
+      F2F27672AB2C227E2C227E2C227E2C227EA6A5C8ECEFEFE9EBEBE7E8E8E5E6E6
+      E5E5E5E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6
+      E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E7E7E7E8E8E8E7E7E7
+      E8E8E8E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F79292929191919191919191919191
+      919191919191919191919191919090909090909090909597979FA4A4AEB8B8C0
+      D0D02A21802A21802A2180535299BCCCCCAAB3B39CA1A19597979496969B9F9F
+      A6AFAFB5C2C29FABC32A21802A21802A21802A21807A80AFBFCDCDB5C0C0B2BB
+      BBB6C1C1C1D0D03F398C2A21802A21802A2180686BA6C0D0D6C1CFCFB9C5C5B3
+      BEBEB0BABAB0BABAB0BBBBB0BABAAEB8B8A3ABB18D92A49CA1A1989B9B9A9E9E
+      A1A8A8B0BCBC9CA7BF2A21802A21802A21808A92B6B1BEBE9FA6A69396969092
+      92969A9AA4AEAEB7C7C75251982A21802A21802A2180BACCCCA5B1B1959B9B8C
+      8E8E8C8F8F989F9FABB8B899A6C02A21802A21802A2180737EBBA4C3F18FAAEC
+      819AE87B94E77F99E88AA6EB9AB7EFA4C1EC4645972A21802A21802A21802A21
+      8050519EB1C5DDC7D5D8C2CECEBDC8C8BAC5C5B9C3C3B8C3C3BAC5C5BCC9C9C1
+      D1D1B4C3CF5D5E9F2A21802A21802A21802A2180484592AFBEC4A0B7D98DA7EB
+      819AE87A92E67D95E788A1EA9AB6EEB2D0F42A21802A21802A21802A21802A21
+      80342D889AAFD9B4D1F4ACC7F1A7C2EFA8C1EFACC7F0B4D0F3B6D0EF5B5EA52A
+      21802A21802A2180342D86B7C4CAB1BABAA9AFAFA9AFAFB2BBBBC0CECE545299
+      2A21802A2180545299C3D0D0B7BFBFB1B7B7B2B9B9BCC6C6A2AAC22A21802A21
+      802A21802A2180969DC1CFDDDDC7D3D3C2CCCCC0C8C8BFC7C7C0C8C8C1C9C9C1
+      C9C9BFC6C6A1A5B6B7BBBBB3B6B6B2B5B5B5B8B8BDC2C2C7D0D0898DB72A2180
+      2A21802A2180352E8798A0CAD3E3F1CEDCEECAD7EBC9D6EAC9D6EAC9D5E9C8D3
+      E8A8AFD2C1CAE2C0C8E0C2CAE1C7D0E4D0DBEA7879B22A21802A21802A218092
+      95C2E0ECF3D8E3EDD3DBE8D0D7E5CFD5E4D1D7E4A8ACCC6A68A7D7DEE8D8DFE9
+      D9E1E9DBE3EADFE7EEE6F0F3DDE6EF2A21802A21802A2180726FAAE1E6E6DBDE
+      DED7D8D8D5D5D5D5D5D5D5D5D5D7D7D7D8D8D8D8D8D8D9D9D9DADBDBDDDFDFE0
+      E2E2645FA0C2C3D5E6E9E9E6E9E9E7EAEAE7EAEAE8ECECECF1F1F0F6F67571AC
+      2A21802A21802A2180817EB3EAEEEEE8EBEBE8ECECECF0F05C579E2A21802A21
+      802A2180F1F7F7F0F6F6EDF2F2ECF0F0ECF0F0EEF3F3BEC1D84F49962A21802A
+      21802A21802A21807571ADECF0F0E8EBEBE5E6E6E4E5E5E5E7E7E9ECECEEF2F2
+      2A21802A21802A21805C579EEFF3F3EBEEEEEAEDEDEBEEEEEEF2F28E8BBB2A21
+      802A21802A21802A2180A6A6CAEEF2F2EBEDEDE8EAEAE6E7E7E5E5E5E4E4E4E4
+      E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBECECECEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEC
+      ECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7929292929292929292929292929292929292
+      929292929292929292929292919191919191969797A0A5A5AEB8B8C0D1D12820
+      8328208328208352519BBDCDCDABB4B49DA2A2979A9A989C9CA4AAAAB2BDBDB7
+      C7CD322B892820832820832820835C5DA1C1D0D0B5C0C0AFB8B8B1BABABBC7C7
+      8C94B92820832820832820835D5EA2D0E3E3C3D2D2B8C3C3B0B8B8AAB2B2A7AE
+      AEA6ACACA6ACACA5ABABA3AAAAA3A8A89DA2A2999C9C969898989C9CA1A8A8B1
+      BDBD9CA8C02820832820832820839DA9C2B1BEBEA0A7A79395958F9191979B9B
+      A5AEAEB8C8C851509B282083282083282083BACCCCA5B1B1959B9B8B8D8D8C8F
+      8F97A0A9A4BBDA94A8D8282083282083282083727EBDA6C3F190ACEC829DE980
+      9AE887A2EB97B4EFAAC8F34D4FA02820832820832820832820837D8CC4B1D0F5
+      A3C2F29BB6EDA3B4D4AEB5BAAEB3B3ACB1B1ABB1B1ABB1B1ADB5B5B2BCBCB7C4
+      C4C1D2D28E98BD282083282083282083282083454397ABC9F399B4EF8AA3EA7E
+      97E77F97E789A2EA9AB6EEB4D1F4282083282083282083282083282083A7BEE2
+      B2CEF3A4BEEF9AB3EC95ADEB95ADEB99B1EBA2BBEEB3C7DBC5D9DB4745952820
+      832820832820836566A4B9C5C5AEB7B7ACB4B4B3BDBDC1CFCF52519B28208328
+      208353519CC4D1D1B9C2C2B4BCBCB9C1C1C3CFCF53509B282083282083282083
+      959DC2D2E2E2C8D4D4C1C9C9BBC1C1B8BDBDB8BDBDB7BCBCB8BDBDB8BDBDB7BC
+      BCB6BABAB3B6B6B2B4B4B3B5B5B8BCBCC2C9C9C4CED5332C8928208328208328
+      2083A2ACD2D1E0F0C9D6EBC2CEE7BFCAE5BEC9E3BFC8E3C0CAE3BFC9E2BFC8E1
+      BDC5DEBDC5DEC2CAE1C9D2E6D3DEEC56539F282083282083282083D6E2EEDAE4
+      EED2DBE7CED4E3CCD1E1CBD0E0CCD1E0C3C9DBD1D6E3D2D7E4D3D9E4D5DAE5D8
+      DEE7DDE5EBE5EEF2DDE6EF28208328208328208358549FE2E7E7DCDFDFD7D9D9
+      D6D6D6D5D5D5D5D5D5D7D7D7D8D8D8D8D8D8D8D9D9DADBDBDCDDDDDFE0E0D5D7
+      DDE2E4E4E2E4E4E2E4E4E3E5E5E4E6E6E6E9E9EAEEEEEFF5F58C8BBD28208328
+      20832820835A55A0EBEFEFE8EBEBE9EDEDEDF1F15A56A0282083282083282083
+      F1F7F7EDF2F2EAEDEDE8EBEBE8EBEBEAEDEDECF1F1EFF4F47471AE2820832820
+      83282083282083A4A4C9EAEEEEE7E9E9E6E7E7E7E8E8EAEDEDEFF3F328208328
+      20832820835B56A0F1F5F5EEF1F1EDF1F1EFF2F2A5A5CB282083282083282083
+      2820838D8BBDEFF2F2EBEEEEE8EAEAE6E7E7E5E5E5E5E6E6E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8
+      E8E8E8E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEB
+      EBEBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F793939393939393939392929292929293939393939392
+      9292929292929292929292929292979898A1A6A6AEB8B8C1D1D1271F85271F85
+      271F8551509DBDCDCDABB4B49FA4A49B9F9FA0A5A5ADB6B6BCCBCB5B5BA2271F
+      85271F85271F853C3891BACAD0B6C1C1ADB5B5ABB2B2B2BBBBC0CDCD47439727
+      1F85271F85322B8BBDCDDACFE1E1C2D0D0B7C2C2B0B8B8ABB1B1A8ADADA6ABAB
+      A4A9A9A4A9A9A2A7A7A0A4A49CA0A0989B9B9799999A9D9DA3A9A9B2BEBE9CA7
+      C1271F85271F85271F859CA8C2B1BDBD9FA6A6939696909292979B9BA5AEAEB8
+      C8C850509C271F85271F85271F85BACCCCA5B1B1959B9B8B8D8D8893B18DA7EC
+      A0BDF093A9DA271F85271F85271F85727EBEA6C4F292AEED87A2EB86A0EA91AD
+      EDA5C2F2707BBE271F85271F85271F85271F858597CDADCCF49DBAF191ACEE87
+      A2EC809BEA8098E5909EC8A1A4A9A2A4A4A1A4A4A2A6A6A5AAAAAAB1B1B2BDBD
+      BCCCCC8B96BC271F85271F85271F85271F85707BBEA6C3F293AEED859EEA839B
+      E98AA4EB9CB6EEB4D1F5271F85271F85271F85271F857581BEB7D3F5A4BEF095
+      ADEC8CA3E8889FE7889EE790A0CB9CA5ADAAB4B4B9C8C8B6C7D4271F85271F85
+      271F85322A8BC0CECEB4BEBEB0B8B8B5BFBFC2D0D052509D271F85271F855251
+      9DC5D2D2BBC5C5B9C1C1BEC8C8ABB6C9271F85271F85271F855E5EA4D7E8E8D0
+      DFDFC6D1D1BFC7C7BAC0C0B7BCBCB6BBBBB6BABAB5B9B9B6BABAB6B9B9B5B8B8
+      B3B5B5B3B5B5B6B9B9BEC3C3C8D0D09398BF271F85271F85271F856A6CB0D2E3
+      F1C8D5EBBFCAE5B9C3E2B7C1E0B8C0DFB9C1DFB9C2DFB9C1DFBAC2DEBAC1DDBD
+      C4DFC2C9E2CAD3E7D5E1ED5653A1271F85271F853F3993DEEAF2D5DEEACDD4E3
+      C8CEDFC7CCDEC8CCDEC9CEDECCD0DFCDD2E1CFD4E1D1D6E3D4D9E5D9DFE8DFE7
+      EDE7F0F49495C4271F85271F85271F857C7BB4E2E6E6DCDFDFD8D9D9D6D6D6D6
+      D6D6D6D6D6D8D8D8D9D9D9D9D9D9D9D9D9DBDBDBDBDCDCDEDFDFDFE0E0E0E1E1
+      E0E1E1E0E1E1E1E2E2E2E4E4E5E8E8EAEEEEEFF5F5807DB7271F85271F85271F
+      855955A1EBEFEFE9ECECEAEDEDEDF2F25A55A2271F85271F85271F85EFF4F4EA
+      EEEEE7E9E9E5E6E6E4E5E5E6E8E8E8EBEBEBEFEFEFF4F47370B0271F85271F85
+      271F85342C8CEEF2F2E9ECECE7E9E9E7E9E9EAEDEDEFF3F3271F85271F85271F
+      855A55A2F2F7F7F0F5F5F0F5F5A6A5CC271F85271F85271F85271F857370B0EF
+      F3F3EBEEEEE9EBEBE6E7E7E5E5E5E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8
+      E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F79494949494949494949494949393939393939393939393939393
+      93939393939393939393979898A1A6A6AFB9B9C1D1D1251D87251D87251D874F
+      4F9EBECDCDACB6B6A3A9A9A0A5A5A8B0B0B7C4C4949FC0251D87251D87251D87
+      251D879FAAC4BAC6C6ADB5B5A7ADADA9B0B0B5BEBEBAC8CE251D87251D87251D
+      876769ABD3E6E6D1E3E3C7D5D5BDC9C9B7C1C1B4BCBCB1B9B9AEB6B6ACB4B4AA
+      B1B1A8AEAEA5AAAAA1A6A69EA1A19A9D9D9DA1A1A6ADADB3BFBF9CA8C2251D87
+      251D87251D879BA7C1B0BDBDA0A6A6949696909292979B9BA5AFAFB8C8C84F4E
+      9E251D87251D87251D87BACCCCA5B1B1959B9B8B8D8D8595C78DA8ECA1BEF193
+      A8DA251D87251D87251D87717DBFA7C5F394AFED8BA6EC8EA9ED9CB8F0A0BAE7
+      2F298E251D87251D87251D877C8BC7AFCDF59DB9F08EA8ED829DEA7C95E97791
+      E8758EE8748DE8768EE38995C39A9CA29B9C9C9D9F9F9FA3A3A5ABABAEB9B9BB
+      CCCC828BBA251D87251D87251D87251D87A1BAE79EB9F08EA7EB88A0EA8DA6EB
+      9DB7F0B4D1F5251D87251D87251D87251D87B8D3F0ABC5F198B1EC8BA2E98499
+      E78494CF8990A38E9090959898A0A6A6B0BBBBC2D3D36568AA251D87251D8725
+      1D879DA7C1B9C4C4B4BDBDB7C2C2C3D1D1504F9F251D87251D87514F9FC6D3D3
+      BDC7C7BCC5C5C2CECE858AB9251D87251D87251D87B5C2D6D7E9E9D2E1E1CAD6
+      D6C4CDCDC1C9C9BEC5C5BDC4C4BCC2C2BBC0C0BBC1C1BABFBFB9BDBDB7BABAB6
+      B9B9BABEBEC2C8C8CDD7D75E5DA5251D87251D87251D87C2D0E5CBDAEEC0CCE7
+      B8C3E2B4BCDFB3BBDEB5BCDEB5BDDEB6BDDEB7BFDEB8C0DDB9BFDDBDC3DFC2CA
+      E1CBD4E7D6E1EE5452A3251D87251D875552A3DBE6F0D2DAE8CBD1E1C8CDDEC7
+      CADDC7CBDDC9CDDDCBCEDECED2E0D0D4E2D4D9E4D8DEE8DDE5ECE4EDF1A0A2CD
+      251D87251D87251D87251D87A9ACCDE0E4E4DCDEDED9D9D9D6D7D7D7D7D7D8D8
+      D8D9D9D9DADADADADADADADADADBDCDCDCDCDCDDDDDDDEDFDFDEDFDFDFDFDFDF
+      E0E0E2E3E3E4E6E6E8EBEBECF0F0E4E9F0322B8E251D87251D87251D877E7CB7
+      EBEFEFE9ECECEAEDEDEDF2F25854A3251D87251D87251D87EEF3F3E9ECECE6E7
+      E7E3E4E4E2E3E3E3E4E4E6E7E7E9EBEBEDF0F0E4E8EF322B8E251D87251D8725
+      1D87A4A4CCEBEEEEE9EBEBE9EBEBEBEEEEEFF3F3251D87251D87251D875954A3
+      F3F8F8F3F8F8CCCFE3322B8E251D87251D87251D87726FB1EFF3F3ECEEEEE9EB
+      EBE7E8E8E6E7E7E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7959595959595949494949494949494949494949494949494949494949494
+      939393939393989999A1A6A6AFB9B9C1D2D2241C8A241C8A241C8A4F4EA0BFCF
+      CFB0BABAA8B0B0A9B1B1B2BEBEB8C8CE2F2890241C8A241C8A241C8A777DB3BD
+      CBCBAFB8B8A5AAAAA3A7A7AAAFAFB6C0C09FA8C4241C8A241C8A241C8A45429C
+      7C81B8868DBEA2ADC9B2BECCC3D0D0C1CDCDBECACABCC8C8B9C5C5B8C2C2B4BF
+      BFB1BABAACB3B3A5ACACA0A5A5A1A6A6A8B0B0B5C1C19CA7C3241C8A241C8A24
+      1C8A9BA7C2B1BDBDA0A7A7959797919393989C9CA5AFAFB8C8C84E4DA0241C8A
+      241C8A241C8ABACCCCA5B1B1959A9A8B8D8D8397D28EA8ECA1BEF193A8DB241C
+      8A241C8A241C8A717DC1A8C5F396B3EF90ABED96B1EFA7C5F35E65B3241C8A24
+      1C8A241C8A4C4EA5B4D2F6A0BCF28EAAEE819CEB7B94E9778FE9758DE8748DE8
+      748CE8748CE8738CE8768DE38794C197999E999A9A9CA0A0A3AAAAADBBBEB5D2
+      EF4C4EA5241C8A241C8A241C8A5E65B3A9C5F394AFEE8CA5EC90A8EC9EBAF0B4
+      D1F5241C8A241C8A241C8A4C4EA6B9D5F5A3BCF092A9EB879BDD898FA98B8B8B
+      8B8B8B8E8E8E9294949CA1A1AAB2B2BCCACA99A5C7241C8A241C8A241C8A767B
+      B2BCC8C8B7C0C0BAC4C4C4D2D2504EA1241C8A241C8A504EA1C7D4D4BEC9C9BE
+      C8C8C5D2D26667AC241C8A241C8A241C8A6869AE7E82B99FA8CBA5AECAC1CCD3
+      CAD5D5C8D3D3C8D2D2C7D0D0C6CFCFC5CDCDC3CBCBC1C8C8BEC4C4BDC2C2BFC5
+      C5C6CECED1DCDC3B3696241C8A241C8A47439CD5E4EDC6D4EBBCC8E5B6C0E1B2
+      BBDFB4BBDEB4BBDDB5BDDEB6BDDEB7BEDDB8BFDDBAC0DDBCC4E0C3CAE3CBD4E8
+      D7E2EE5351A5241C8A241C8A5451A5DAE5EFD2D9E8CBD1E1C8CDDFC6CADDC7CC
+      DDC9CEDECCD0DFCFD4E2D4D9E4D8DEE8DEE5EDCCD3E5625FAC241C8A241C8A24
+      1C8A241C8A49449DE4E9E9DEE2E2DBDCDCD9D9D9D7D7D7D8D8D8D9D9D9D9D9D9
+      DADADADADADADADADADBDBDBDDDDDDDDDEDEDFDFDFDFE0E0E0E1E1E2E4E4E5E7
+      E7E8EBEBECF0F0E3E8EF4B459F241C8A241C8A241C8A241C8AAFB0D2EAEDEDE8
+      EBEBEAEDEDEDF2F25753A5241C8A241C8A241C8AEFF3F3EAECECE6E7E7E3E4E4
+      E2E2E2E3E3E3E4E4E4E6E8E8EAECECEEF2F28B8AC0241C8A241C8A241C8A6561
+      ACEDF0F0EAECECEAECECEBEEEEF0F4F4241C8A241C8A241C8A5853A6F3F8F8CC
+      CFE3312A91241C8A241C8A241C8A4B459EF0F4F4EDEFEFEAEBEBE8E8E8E6E7E7
+      E6E7E7E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F0F0
+      F0F0F0F0F1F1F1F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F79595
+      9595959595959595959595959595959595959595959595959595959594949494
+      9494999A9AA2A7A7B0BABAC2D2D2221B8C221B8C221B8C4D4DA2C4D6D6B7C4C4
+      B1BCBCB4C0C0BFCECE5859A7221B8C221B8C221B8C4D4DA2C0D0D0B2BCBCA6AC
+      AC9FA2A2A1A5A5A9AFAFB7C2C2A0AAC6221B8C221B8C221B8C221B8C221B8C22
+      1B8C221B8C221B8C221B8C3733964C4BA06C6EAE7579B2939CC09BA5C1BFCECE
+      BAC6C6B2BCBCA9B1B1A6ADADAAB3B3B7C3C39CA8C4221B8C221B8C221B8C9BA7
+      C3B2BEBEA0A7A7949797919393999D9DA6AFAFB9C9C94C4DA1221B8C221B8C22
+      1B8CBACCCCA5B0B0959A9A8A8C8C8398D98FA9ECA2BFF193A8DC221B8C221B8C
+      221B8C707CC2A9C6F399B5F096B1EF9DBAF1A7C4EE221B8C221B8C221B8C221B
+      8C96ACDDA7C5F393AFEF849EEB7B95E9778FE8758DE8748DE8748DE8748DE974
+      8DE9758DE8748DE8748DE8778EE38693BF979898979FAE96AEE2A6C4F3A9C3EA
+      221B8C221B8C221B8C221B8CAAC5EE9CB8F092ABED93ACED9FBAF0B4D1F5221B
+      8C221B8C221B8C747FC2B4D1F59FB7EB94A0BA8F91918B8B8B8C8C8C8D8D8D8E
+      8E8E9393939A9D9DA8AFAFB9C6C6A1AFCB221B8C221B8C221B8C777CB5BFCCCC
+      B8C2C2BBC5C5C5D2D24E4EA2221B8C221B8C4F4EA3C8D5D5C0CBCBC0CACAC8D5
+      D54F4EA3221B8C221B8C221B8C221B8C221B8C221B8C221B8C221B8C221B8C4E
+      4DA14E4CA17A7DB68588BBA5ADCAB9C3D1CDD7D7C9D1D1C6CECEC6CDCDCAD3D3
+      D4E0E0221B8C221B8C221B8C514FA4D5E1E6C5D2EBBBC6E5B6BFE1B3BCDEB4BB
+      DEB4BCDEB6BDDFB7BEDEB8BFDEB9BFDEBAC1DEBDC4DFC3CBE3CCD6E8D7E2EF52
+      50A7221B8C221B8C5250A7DBE5EFD2D9E8CCD1E2C8CCDFC6CADDC8CCDECACFDF
+      CFD3E2D2D8E4D9E0E9DFE7EE8F91C62E2993221B8C221B8C221B8C221B8C2F29
+      92C1C5DAE1E5E5DDDFDFDADBDBD8D9D9D8D8D8D8D8D8DADADADBDBDBDBDBDBDB
+      DBDBDBDBDBDCDCDCDEDEDEDEDFDFE0E1E1E1E2E2E3E4E4E5E8E8E9ECECEDF1F1
+      BCBFDC3C3799221B8C221B8C221B8C221B8C4944A0ECF0F0E9EBEBE8EAEAE9EC
+      ECEEF2F25652A7221B8C221B8C221B8CEFF3F3EAECECE6E7E7E3E4E4E2E2E2E3
+      E3E3E4E4E4E6E6E6E9EAEAEDF0F0D8DBEA221B8C221B8C221B8C3C379AEEF2F2
+      EBEEEEEAEDEDECEFEFF0F4F4221B8C221B8C221B8C5652A7E6EAF13C379A221B
+      8C221B8C221B8C4945A0E3E7EEEDF0F0EAECECE8E9E9E7E8E8E7E7E7E6E6E6E6
+      E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5
+      F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7969696969696
+      969696969696959595969696969696959595959595959595959595949494999A
+      9AA2A7A7B1BABAC2D2D2211A8E211A8E211A8E4C4CA3CDE2E2C2D3D3BECECEC3
+      D3D396A3C7211A8E211A8E211A8E2C2793BCCCD3B6C2C2A8AFAF9BA4B4989DA6
+      9FA1A1A9AFAFB7C2C2A0AAC7211A8E211A8E211A8E211A8E211A8E211A8E211A
+      8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E49
+      479E989FB5AEB7B7AEB8B8B8C5C59DA8C5211A8E211A8E211A8E9CA8C5B3BFBF
+      A2A9A9959898929494999E9EA6B0B0B9C9C94C4CA3211A8E211A8E211A8EBBCD
+      CDA6B1B1959A9A8A8C8C829BEA8FAAEDA3C0F293A8DD211A8E211A8E211A8E70
+      7BC3AAC7F39CB8F09AB7F0A6C2F38090CF211A8E211A8E211A8E4A4CA9B2D1F6
+      9CB9F18AA5ED7F98EB7991EA758EE9758EE9758EE9758EE9758EE9758EE9758E
+      E9758EE9768EE9768EE9768EE97D92DF8198E68AA4EC9CB8F1B2D0F65459B021
+      1A8E211A8E211A8E8091CFA4C0F298B1EF96B0EEA0BBF1B5D1F5211A8E211A8E
+      211A8E737FC3B8CDE0A6B2B5999E9E9091918C8C8C8E8E8E8F8F8F9090909393
+      939C9F9FA8B0B0B9C6C6A1AECB211A8E211A8E211A8E777CB6C0CCCCB9C3C3BB
+      C6C6C5D3D34E4DA4211A8E211A8E4E4DA4C8D5D5C1CBCBC1CBCBC9D5D54E4DA4
+      211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A
+      8E211A8E211A8E211A8E211A8E211A8E3733984D4AA1CCD5D5CED8D8D6E2E221
+      1A8E211A8E211A8E504FA6D6E1E1C6D3EABDC7E6B7C0E2B3BDDFB4BCDFB5BDDF
+      B6BDDFB7BEDFB9C0DEBAC0DEBAC1DEBEC5E0C4CCE4CDD7E8D8E3EF5150A8211A
+      8E211A8E5250A8DBE5EFD2DAE8CCD2E3C8CDDFC7CBDEC9CEDFCDD2E1D1D7E4D8
+      DEE9DFE7EF6B6AB4211A8E211A8E211A8E211A8E211A8E4743A1CED3E1E3E7E7
+      DDE0E0DBDCDCDADADAD9D9D9D9D9D9DADADADBDBDBDCDCDCDCDCDCDCDCDCDDDD
+      DDDDDDDDDEDFDFDFDFDFE1E2E2E3E5E5E6E9E9EAEEEEE1E5ED6F6DB6211A8E21
+      1A8E211A8E211A8E211A8E2E2895C8CAE0E9ECECE7E9E9E8E9E9EAECECEEF2F2
+      5552A9211A8E211A8E211A8EEFF3F3EAEDEDE7E8E8E4E5E5E3E3E3E3E3E3E3E3
+      E3E5E5E5E8E9E9ECEFEFF1F5F5211A8E211A8E211A8E211A8EEFF3F3ECEFEFEB
+      EEEEEDF0F0F0F4F4211A8E211A8E211A8E4944A24944A2211A8E211A8E211A8E
+      4944A2E6E9F0EFF2F2ECEEEEE9EAEAE7E8E8E7E7E7E6E6E6E6E6E6E6E6E6E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECEC
+      ECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F797979797979797979797
+      9797979797969696979797969696969696969696959595959595999A9AA2A7A7
+      B1BABAC3D3D31F19911F19911F19914B4CA6CEE3E3CEE3E3CCE0E0C3D6DE3531
+      9B1F19911F19911F199197A4C9C0D0D0AFB9B999ABD28AA2E9859DE889A0E498
+      ACDCADC0DC99A7D01F19911F19911F19919CA6CCA8B4D29DA7CC787DB96163AD
+      4B4AA335329A1F19911F19911F19911F19911F19911F19911F19911F1991959C
+      BAB3BDBDB2BCBCBAC6C69CA8C61F19911F19911F19919EAAC8B5C2C2A3AAAA97
+      9A9A939595999E9EA7B1B1BACBCB4A4BA51F19911F19911F1991BCCFCFA7B2B2
+      969C9C8B8E8E849DEB91ACEEA4C0F294AADD1F19911F19911F19916E7BC4AAC8
+      F49FBBF19FBBF1ABC8F45C63B81F19911F19911F19918396D1A9C7F495B0EF85
+      9FEC7B94EA7790E9778FE9768FE9768EE9768EE9768EEA768EEA768FE9768EE9
+      768EE9778FEA778FE97790E97C95EA849EEC95B0EFAAC7F48495D11F19911F19
+      911F19915257B2ABC6F39CB6F099B3EFA1BDF1B5D2F51F19911F19911F199155
+      57ABBFD1D1ABB6B69DA2A29395958F90908F8F8F9090909292929798989FA3A3
+      ACB4B4BECCCC98A3C91F19911F19911F1991767BB7BFCBCBB8C2C2BCC6C6C6D3
+      D34C4CA61F19911F19914D4CA6C9D6D6C1CBCBC1CACAC8D4D45859AB1F19911F
+      1991423FA2C2CFDEABB5D3878DC17A7DB95757A94C4BA42A26951F19911F1991
+      1F19911F19911F19911F19911F19912A2695D0DBDBD1DCDCD7E3E32B26961F19
+      911F19914340A2D8E4E4CBD5E1C0CAE8B8C2E3B5BDE1B5BDE0B6BEE0B7BEE0B9
+      C0DFB9C0DFBAC1DFBBC2DFBEC5E1C5CDE5CED7E9D9E3F0504FAA1F19911F1991
+      504FAADBE5F0D2DAE8CCD3E3C9CDE0C8CDDFCCD1E1D0D4E4D6DBE8DEE5EE6A69
+      B61F19911F19911F19911F19912C27968585C1E5EBEBE1E6E6DEE1E1DCDDDDDA
+      DBDBDADADAD9D9D9DADADADADADADBDBDBDCDCDCDCDCDCDCDCDCDDDDDDDDDDDD
+      E0E0E0E2E3E3E4E5E5E7E9E9EBEEEEBBBDDB2C26971F19911F19911F19911F19
+      911F19912C2797C8CAE0EBEEEEE8EAEAE6E7E7E7E8E8EAECECEEF2F25451AB1F
+      19911F19911F1991EFF3F3EAEDEDE7E8E8E4E5E5E3E3E3E3E3E3E4E4E4E6E6E6
+      E8EAEAECEFEFF1F5F55451AB1F19911F19911F1991F0F4F4ECEFEFECEEEEEDF0
+      F0F0F4F41F19911F19911F19911F19911F19911F19911F19912C2797CCCFE5F2
+      F6F6EEF0F0EAECECE8E9E9E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEAEAEAEAEAEAEBEBEB
+      EBEBEBEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F79898989898989797979797979797
+      979898989797979797979797979696969696969696969A9B9BA3A8A8B1BABAC3
+      D3D31E17931E17931E179334319D767DBB767DBB767DBB5557AC1E17931E1793
+      1E1793767DBBCEE3E3BECDCDA8BAD493ACEC8AA2EA859EE989A1EA92ABECA2BD
+      F0A3BCE91E17931E17931E17937D8BCCCBE6F5C5DFF2BBD4EEBCCFE0C5D0D0C6
+      D2D2C8D6D6B8C4D4A7B3D2858CC24C4BA81E17931E17931E1793A2ABC2B6C0C0
+      B3BEBEBAC7C79DA9C81E17931E17931E1793757BB9B9C7C7A7AFAF9A9E9E9699
+      999CA1A1A9B3B3BDCECE494AA71E17931E17931E1793C0D3D3AAB6B6989F9F8C
+      94A287A0EC93AFEFA7C4F396ABDF1E17931E17931E17936D79C5ABC8F4A0BCF2
+      A2BFF3AFCDF53D3DA61E17931E17931E1793A7C2EBA4C0F390ABEF819BEC7993
+      EA7790EA778FEA778FEA768FEA778FEA778FEA768FEA778FEA768FEA768FEA78
+      90EA7890EA7890EA7A92EA839CEC90AAEFA3C0F3B1CDF11E17931E17931E1793
+      3331A0AECBF5A0BBF19CB6F0A4BFF1B6D3F61E17931E17931E1793292498C7DA
+      DAB3C0C0A3ABAB999D9D9495959192929293939696969B9E9EA5ABABB3BEBEC4
+      D4D46D71B71E17931E17931E1793949DC4BEC9C9B8C1C1BCC5C5C6D3D34C4BA8
+      1E17931E17934C4BA8C9D5D5C0CACABFC8C8C6D1D1787CBA1E17931E17931E17
+      93CDDCE4D9EAEAD3E0E0CDD8D8CAD5D5CBD5D5CDD8D8D1DDDDA9B2D0ACB6D57D
+      81BE2A24991E17931E17934D4BA8D2DDDDD1DBDBD5E0E05A5AAF1E17931E1793
+      1E1793C4CFDED1DBDCC4CFE8BCC7E5B7C0E2B6BFE1B9C0E1BAC1E0BAC2E0BBC2
+      E0BCC3E1BDC4E0C0C7E2C7CEE5CFD7EAD9E4F04F4DAC1E17931E1793504EACDC
+      E6F0D3DBE9CDD4E4CACEE0CACEE1CED2E2D3D8E6DAE1EBB2B6DA1E17931E1793
+      1E17931E1793514EABD0D6E6E5EBEBE2E5E5DEE0E0DCDEDEDBDCDCD9DADADADA
+      DADADADADBDBDBDBDBDBDCDCDCDDDDDDDDDDDDDDDDDDDEDEDEDFE0E0E1E1E1E3
+      E4E4E6E9E9EBEEEEA0A1CF1E17931E17931E17931E17931E17931E1793615DB2
+      E2E5EDECEFEFE9EBEBE6E8E8E6E7E7E7E8E8EAECECEEF2F2534FAC1E17931E17
+      931E1793F0F4F4EBEEEEE8E9E9E5E6E6E4E4E4E4E4E4E5E5E5E7E7E7E9EBEBED
+      F0F0F1F6F61E17931E17931E17931E1793F0F3F3EDF0F0ECEEEEEEF0F0F1F5F5
+      1E17931E17931E17933933A02B25991E17931E17932B2599E7EBF3F2F6F6EEF1
+      F1EBECECE9E9E9E8E8E8E7E7E7E8E8E8E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBECECECECECECECECECEBEBEBEBEBEBEBEBEBECECECECECECECECECECECEC
+      ECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7989898989898999999989898989898989898
+      9898989797979797979797979696969696969B9C9CA3A8A8B1BBBBC3D3D31C16
+      951C16951C16951C16951C16951C16951C16951C16951C16951C16951C169580
+      89C1C3D6DEBED3DFA7C2F198B2ED8DA6EB889FE989A0E990A9EB9EB8EFB1CDF4
+      3130A21C16951C1695474AAEC8E5F9BCD9F7B0CCF4A8C3F2B8C6D2C0C9C9C4CE
+      CECBD8D8D4E5E5D5E7E75658AF1C16951C169527239AC1CECEB7C1C1B4BEBEBB
+      C8C89EAAC91C16951C16951C1695757CBCC0D0D0AEB8B8A1A7A79CA1A1A2A9A9
+      B0BCBCC2D5D53D3CA31C16951C16951C1695BACED6AFBEBE9EA7A7939DAF8EA9
+      EE9BB6F1AECBF58FA2DA1C16951C16951C16957583CDA9C6F4A0BDF2A4C1F3B2
+      D0F61C16951C16951C16951C1695B7D5F79FBBF28DA8EE8099EC7992EB7891EB
+      7891EB7891EA7890EB7790EB7790EB7790EB7790EA7790EA7890EA7890EB7991
+      EB7891EB7A92EA809AEC8DA7EEA0BBF2B7D5F727239B1C16951C16951C1695B3
+      CFF6A3BEF29EB9F1A5C0F2B7D4F61C16951C16951C16951C16958A96C6BECECE
+      AFB9B9A3A9A99CA0A0999B9B9A9C9C9DA0A0A5AAAAB0B8B8BECBCBC2D2DA2723
+      9A1C16951C16951C1695B2BDCDBBC5C5B7BFBFBCC5C5C6D3D34A4AA91C16951C
+      16954B4AAAC9D5D5BFC8C8BDC5C5C3CDCDACB7CF1C16951C16951C1695929ACA
+      D7E7E7D0DCDCC9D2D2C6CECEC4CDCDC8D0D0CDD7D7D5E1E1DCEBEBD0DEE61C16
+      951C16951C16956F71B9D1DBDBCED7D7D2DCDC878BC21C16951C16951C169572
+      74BCD8E3E3CDD6DDC2CEE9BDC7E6BDC5E5BDC5E4BDC6E3BEC7E3BFC7E3C0C8E3
+      C1C7E3C3CAE4C9D1E7D1DAEBDAE6F14E4DAE1C16951C16954E4DAEDFE8F1D6DE
+      EBD0D6E6CED2E4CDD2E3D1D5E5D6DCE9DEE5EE6868B91C16951C16951C16956A
+      6ABAEAF3F5E5EBEBE2E6E6DFE2E2DEDFDFDCDDDDDBDCDCDADBDBDBDBDBDADADA
+      DBDBDBDCDCDCDCDCDCDEDEDEDEDEDEDEDEDEDFDFDFE1E1E1E2E3E3E6E7E7E9EC
+      ECB9BBDB1C16951C16951C16951C16951C16953732A1BCBEDDEEF2F2ECEEEEE9
+      EBEBE7E8E8E6E6E6E6E6E6E7E8E8EAEDEDEFF3F3524FAE1C16951C16951C1695
+      F0F4F4ECEEEEE8EAEAE6E7E7E5E5E5E5E5E5E6E6E6E7E8E8EAECECEEF1F1D8DB
+      EB1C16951C16951C16953732A2F0F3F3EDEFEFECEEEEEEF0F0F1F5F51C16951C
+      16951C1695524FAEB0B2DA1C16951C16951C16954541A8E6E9F1EFF2F2ECEEEE
+      EAEAEAE9E9E9E8E9E9E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBECECECECECECECECECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F799999999999999999999999999999999999998989898
+      98989797979797979797979696969B9C9CA4A9A9B1BBBBC3D3D31B15971B1597
+      1B15971B15971B15971B15971B15971B15971B15971B15971B15971B15972622
+      9C8EA0DAB2CDF4A2BCF095ADED8CA4EB89A2EB8EA7EC9AB4EFABC6F26C78C71B
+      15971B15971B15979DB2E1BDDAF7B0CCF4A6C1F2A8BEE5BDC5C5C2CCCCCAD7D7
+      D4E4E4BFCEDE1B15971B15971B15975F61B2C0CCCCB7C0C0B5BFBFBDCACAA0AC
+      CC1B15971B15971B15973D3CA5C8DBDBB8C5C5ACB5B5A8B0B0ADB8B8B9C8C8C0
+      D3DB1B15971B15971B15971B159792A1CAB9CACAA8B5B59EADC09CB6F1A7C3F3
+      B9D6F76670C21B15971B15971B159790A5DFA7C3F4A0BCF3A4C1F3B4D2F71B15
+      971B15971B15974549B0B4D3F79DB9F28BA6EF7F99EC7992EB7991EB7991EB78
+      91EB7891EB7891EB7891EB7890EB7891EB7890EB7991EB7992EB7991EB7991EB
+      7A92EB8099EC8CA6EF9EB9F2B4D2F74549B01B15971B15971B1597B5D1F6A4BF
+      F2A0BAF1A6C1F3B7D4F61B15971B15971B15971B159726229CBFD1DABCCACAB0
+      BABAA8AFAFA5ABABA6ACACA9B0B0B1BABABDC9C9CADBDB5457B01B15971B1597
+      1B15974948AAC2CECEB8C0C0B6BDBDBDC6C6C8D6D64A4AAB1B15971B15974A4A
+      ABC9D5D5BFC7C7BBC2C2BFC7C7CAD5D5332FA11B15971B15973330A1D8E8E8D0
+      DCDCC8D2D2C4CCCCC2CACAC6CECECCD5D5D4E0E0DCEBEB7C80C21B15971B1597
+      1B1597B3BBD4CED6D6CBD2D2CDD5D5CAD3DB27239C1B15971B15971B1597AEB6
+      D7D7E1E1CED8E7C7D2EBC5CFEAC4CEE9C4CEE8C5CEE8C6CFE8C6CFE7C6CEE7C8
+      D0E8CDD6E9D5DFEEDEEAF34E4CAF1B15971B15974E4CAFE2EDF4DAE4EFD5DCEA
+      D1D7E6D1D6E5D3D8E7D8DEEAE0E7F04E4CAF1B15971B15971B1597DEE6F1E9F1
+      F1E4EAEAE2E6E6E0E2E2DFE1E1DFE0E0DCDDDDDCDDDDDBDBDBDBDCDCDCDCDCDD
+      DDDDDEDEDEDEDEDEDFDFDFE0E0E0E0E0E0E2E2E2E4E5E5E7E9E9EBEFEF514DAF
+      1B15971B15971B15971B15976C6ABCE4E8F0EEF1F1EBEDEDE9EAEAE7E8E8E6E6
+      E6E5E5E5E5E6E6E7E8E8EBEDEDEFF3F3514EAF1B15971B15971B1597F0F4F4EC
+      EEEEE8EAEAE6E7E7E5E5E5E7E7E7E8E8E8EAEBEBEDEFEFF1F4F49595CE1B1597
+      1B15971B15975F5CB5EFF2F2EDEFEFECEEEEEEF0F0F2F5F51B15971B15971B15
+      97514EB0F4F9F9A2A3D41B15971B15971B15975F5DB6F1F5F5EEF1F1ECEDEDEA
+      EBEBE9E9E9E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F79B9B9B9A9A9A9A9A9A9A9A9A9A9A9A9999999999999999999898
+      989898989898989797979C9D9DA3A8A8B1BBBBC3D3D319149A19149A19149A30
+      2EA2747BBE747BBE747BBE747BBE5255B019149A19149A19149A19149A19149A
+      8090D4AEC9F39FB9F093ABED8CA5EC8DA6EC96AFEEA4BEF1ABC4EF24219F1914
+      9A19149A2F2EA6B8D3F3B7D3F6AECAF3A9C4F3BCCAD5C6D1D1CDDBDBCADAE23D
+      3CA919149A19149A19149AB3BFCFBBC6C6B4BDBDB5BEBEBFCDCDA2AED019149A
+      19149A19149A19149AA1B0D1C3D5D5BAC8C8B7C4C4BBCACAC6D9D97D88C21914
+      9A19149A19149A19149A3A3BA7C2D7D7B6C7C7ADC3D9ADC9F5B6D4F7BAD7F42F
+      2EA619149A19149A19149AA9C4F0A3BFF39DB9F2A3C0F3B4D2F719149A19149A
+      19149A4448B2B4D3F79DB9F28CA6EF809AED7A92EC7A92EC7992EC7992EC7992
+      EC7991EC7991EC7891EC7991EB7991EB7991EB7A92EC7A92EC7B92EB7B92EB81
+      99EC8CA6EE9DB9F2B5D2F74448B219149A19149A19149AB5D2F6A5C0F3A0BAF1
+      A7C2F3B8D4F719149A19149A19149A19149A19149A3B3BA8BECED7BFCECEB8C4
+      C4B6C1C1B7C1C1BAC6C6C2CFCFCBDCDC5F63B719149A19149A19149A19149A9D
+      A8C9BDC7C7B6BDBDB6BDBDBFC8C8CCD9D94949AE19149A19149A4949AECAD6D6
+      BFC6C6B9BFBFBBC1C1C4CDCD8B91C319149A19149A19149A6265B8D4E2E2CED9
+      D9C9D2D2C8D0D0CAD3D3CFDADAD7E4E4B8C3DD19149A19149A19149A4A49ADD1
+      DADAC9CFCFC5CBCBC8CECED0D8D8797DBF19149A19149A19149A25229FAEB6D8
+      DAE4E6D3DFEDCFDBEFCEDAEECFDAEECED9EDCFDAEDC3CCE7C2CAE6CFD8EBD3DD
+      EDDAE5F1E3EFF74C4BB219149A19149A4C4CB2E7F2F8E0EBF3DBE3EFD7DEEBD6
+      DCEAD7DDEADBE1ECE1E9F14D4CB119149A19149A19149AECF5F5EBF2F2E7ECEC
+      E4E8E8E2E6E6E2E5E5BBBCD5DFE1E1DEDFDFDEDEDEDDDDDDDDDDDDDEDEDEDFDF
+      DFDFDFDFDFDFDFE0E0E0E0E0E0E2E3E3E5E6E6E9EBEBD3D6E719149A19149A19
+      149A19149A7978C3F1F6F6EEF1F1EAEDEDE9EAEAE7E8E8E7E7E7E6E6E6E6E6E6
+      E6E7E7E8E9E9EBEDEDEFF3F3504DB219149A19149A19149AF1F5F5EDF0F0EAEB
+      EBE8E9E9E7E8E8E8E8E8E9EAEAECEEEEEFF2F2E5E9F12722A019149A19149A19
+      149AA0A1D3EEF1F1ECEEEEECEEEEEEF0F0F2F5F519149A19149A19149A504DB2
+      F5F9F9F5F9F96C6ABD19149A19149A19149A6B6ABDF1F4F4EFF1F1ECEEEEEBEB
+      EBEAEAEAE9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAE9E9E9EA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEAEAEAEBEBEBEAEAEA
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F79C9C9C9B9B9B9A9A9A9A9A9A9A9A9A9A9A9A9A9A9A999999999999999999
+      9898989797979C9D9DA4A9A9B1BBBBC3D3D318139C18139C18139C4647AECEE3
+      E3C9DCDCC1D2D2BFCFCFC1D3D3B4C5D65155B418139C18139C18139C18139C92
+      A5E0A8C3F299B3EF90A9EC8DA5EC91A9ED9CB5EFABC6F3879ADA18139C18139C
+      18139C2E2DA898ACE2BAD7F7B5D2F6BBD3EECEDBDBBBC9DA3C3AAA18139C1813
+      9C18139C676CB9C1CCCCB7BFBFB2B9B9B6BFBFC1CECEA3B0D218139C18139C18
+      139C18139C231FA1A0AED1C6D9D9C5D7D7C9DDDD9FAFD1231FA018139C18139C
+      18139C2320A018139C5B60B6B6CAD2BCD5E4BEDCF9BAD7F45A61BF18139C1813
+      9C18139C4246B3ABC7F59DB8F29AB4F2A1BDF3B4D1F718139C18139C18139C2E
+      2CA8B6D4F79FBBF38DA7F0829AED7A93EC7A93EC7A93EC7A92EC7A92EC7992EC
+      7A92ED7A92EC7A93EC7A92EC7A92EC7B93EC7B93EC7B93EC7B93EC829BED8EA8
+      F0A0BBF3B7D4F7393AAE18139C18139C18139CB5D2F6A5C0F3A1BBF2A7C2F3B9
+      D5F718139C18139C18139C18139C18139C18139C241FA18891C6BCCBD3C5D4D4
+      C6D5D5CADADA97A1CC3B3AAA18139C18139C18139C18139C686DB9C2CECEB8C0
+      C0B2B8B8B5BCBCC0C9C9CEDCDC4848AF18139C18139C4848AFC9D5D5BDC5C5B7
+      BCBCB7BCBCBEC4C4C9D3D34747AE18139C18139C18139C6163B9CAD6DFD2DDDD
+      D0DBDBD2DDDDD5E2E29199CD2420A118139C18139C18139CB1B9D2CBD2D2C4C9
+      C9C2C5C5C4C8C8CAD0D0D4DDDD3D3BAA18139C18139C18139C18139C6465BBB9
+      C2DDDBE9F3DBE9F5DAE7F4CDD9EE8F96D2302CA7A5ACDAD5DFEFD9E4F1E0ECF5
+      E5F2F84B4BB318139C18139C4C4BB3E7F3F8E6F1F7E1EAF3DDE5F0DBE2EDDBE1
+      EDDDE3EEE1E9F17374C418139C18139C18139CAAAED9EDF4F4EBF1F1E8EEEEE7
+      ECECB2B4D7251FA1E2E4E4E0E1E1DEDFDFDEDEDEDEDEDEDEDEDEDFDFDFE0E0E0
+      E0E0E0E1E1E1E1E1E1E3E4E4E6E7E7EAEDEDB9BCDE18139C18139C18139C2621
+      A2F3F8F8F0F4F4EDEFEFEAECECE8E9E9E7E8E8E7E8E8E8E8E8E6E7E7E7E7E7E8
+      E9E9EBEDEDF0F3F34F4DB318139C18139C18139CF2F6F6EFF1F1ECEEEEEAEBEB
+      EAEBEBEAECECEDEFEFEFF2F2F2F6F66B69BF18139C18139C18139C3430A8F1F4
+      F4EEF0F0ECEDEDECEEEEEEF1F1F2F5F518139C18139C18139C4F4DB3F5F9F9F4
+      F8F8F4F8F84F4DB318139C18139C18139CA1A1D5F1F4F4EEF0F0ECEDEDEBEBEB
+      EAEAEAE9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEAEA
+      EAEAEAEAEAEAEAEBEBEBEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECEB
+      EBEBECECECECECECECECECEBEBEBEBEBEBECECECECECECECECECECECECECECEC
+      ECECECEDEDEDECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEEEEEEEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEEEEEEEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F2F2F2F1F1F1F2F2F2F1F1F1F2F2F2F2F2F2F1F1F1F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F2F2F2F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F4F4F4F4F4F4F4F4F4F3F3F3F4F4F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F4F4F4F4F4F4F5F5F5F4F4F4F4F4F4F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F6F6F6F5F5F5F6F6F6F6F6F6F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F6F6F6F7F7F7F7F7F7
+      F7F7F7F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F79C9C
+      9C9C9C9C9C9C9C9B9B9B9B9B9B9B9B9B9B9B9B9A9A9A9A9A9A99999999999998
+      98989D9E9EA4A9A9B2BBBBC3D3D316129E16129E16129E4447B0CBDFDFBDCCCC
+      B3BEBEAEB8B8B2BDBDBAC9CCC3DEF65A62C116129E16129E16129E2C2BA9B3CE
+      F5A1BBF194ADEE8DA5ED8DA5ED95AEEEA1BBF1AFCAF4555DC016129E16129E16
+      129E16129E3739AF6D79CC6D79CC5254B616129E16129E16129E16129E3939AA
+      C5D1D1B9C2C2B2B8B8B1B6B6ACB3BC979FC37E86C416129E16129E16129E2D2C
+      A716129E16129E3939AB4446AF3939AB16129E16129E16129E16129E2D2CA670
+      79BF16129E16129E211EA24246B44246B5211EA416129E16129E16129E16129E
+      8DA3E1A2BDF396B1F195B0F19FBAF3B1CFF6211FA416129E16129E16129EBBD8
+      F9A4BFF491ABF1839DEF7D96ED7B94ED7B93ED7B93ED7A93ED7A93ED7A93ED7B
+      93ED7B93ED7B94ED7B93ED7C94ED7B93ED7C94ED7E97EC849DEE92ABF0A4BFF4
+      BBD8F816129E16129E16129E16129EB4D0F6A5BFF3A0BAF2A7C2F4B9D5F71612
+      9E16129E16129E4547B05C61B916129E16129E16129E16129E4546B04546B016
+      129E16129E16129E16129E16129E16129E3939ABC5D2D2BAC3C3B3B8B8B2B6B6
+      B6BCBCA1A7C2A0A9CD3B3AAC16129E16129E4647B0C7D2D2BDC3C3B5B9B9B4B8
+      B8B9BDBDC2CACAC2CCD43A3AAB16129E16129E16129E221FA36062BA777CC36C
+      70BF2F2CA816129E16129E16129E16129E8E93C8CED6D6C7CBCBC1C3C3BEC0C0
+      C0C2C2C5C9C9CDD4D4C9D2DB3C3BAC16129E16129E16129E16129E16129E1612
+      9E302DA916129E16129E16129E16129EA9B1DEDAE5F24848B416129E16129E16
+      129E16129E16129E16129E16129E16129E16129E16129E16129EACAFDBDDE4EE
+      E0E7F0B1B6DE16129E16129E16129E16129E7475C48283CA8182C93E3BAE1612
+      9E16129EE4E7E7E1E3E3E0E1E1DFDFDFDEDEDEDFDFDFE0E0E0E1E1E1E1E1E1E2
+      E2E2E2E2E2E4E5E5E7E8E8EAEDEDB9BBDE16129E16129E16129E4E4CB5F4F9F9
+      F1F5F5EEF0F0ECEDEDEAECECEAEBEBEAEBEBE9EAEAE8E9E9E8E9E9EAEBEBECEE
+      EEF1F4F44E4CB516129E16129E16129EF4F9F9F1F5F5EFF1F1EDEFEFEDEFEFEE
+      F1F1F1F4F4F3F7F76A68C016129E16129E16129E16129EA0A0D5EFF2F2ECEEEE
+      ECEDEDEDEEEEEFF1F1F2F6F616129E16129E16129E4E4CB5F4F8F8F2F6F6F2F5
+      F5E5E9F1403DAF16129E16129E16129EAEAFDBF1F4F4EFF1F1EDEEEEEBECECEB
+      EBEBEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECEBEBEBECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F79D9D9D9C9C9C
+      9C9C9C9C9C9C9B9B9B9B9B9B9B9B9B9B9B9B9A9A9A9A9A9A9999999999999C9D
+      9DA5AAAAB2BBBBC3D3D31510A11510A11510A14345B2C3D5D5B3BEBEA7AEAEA0
+      A6A6A2AAAEA8BFE7B5D0F5BBD5F3201DA61510A11510A11510A19CB2E7A8C2F3
+      98B1F08FA7EE8CA4ED8FA8EE98B1F0A3BDF2B0CBF57280D11510A11510A11510
+      A11510A11510A11510A11510A11510A11510A11510A15B5DB7BCC6CFBCC4C4B4
+      B9B9AEB2B2AEB3B3ACB2BB2B28A61510A11510A11510A11510A196A2CF3838AD
+      1510A11510A11510A11510A11510A11510A11510A11510A1A9BBD6CBE1E13737
+      AC1510A11510A11510A11510A11510A11510A11510A11510A1535BC1A9C5F599
+      B4F290AAF090ABF19BB6F3AECBF64145B71510A11510A11510A195ABE3A9C6F5
+      96B1F288A1EF7F97EE7C94ED7B94ED7B94ED7B94ED7B93ED7B94EE7B94ED7B94
+      ED7C94ED7C94ED7C94ED7C94ED7D95ED8098EE88A1EF97B0F2ABC6F5A0B7E815
+      10A11510A11510A14145B7B1CDF6A3BCF39FB8F2A7C1F4B9D5F71510A11510A1
+      1510A14445B2D2E5E55C60BA1510A11510A11510A11510A11510A11510A11510
+      A11510A11510A11510A1676BBCC6D2D2BDC5C5B5BABAB0B3B3B1B4B4B6BBBB6B
+      6CB41510A11510A11510A11510A12C2AA9C4CDCDBBC0C0B4B7B7B2B4B4B4B7B7
+      BCC1C1C4CCCCC1CCD44545B11510A11510A11510A11510A11510A11510A11510
+      A11510A11510A1211EA58D93C9CFD7D7C8CDCDC2C5C5BEC0C0BCBDBDBEBFBFC1
+      C3C3C8CCCCCED5D5CAD2DB6D6FC01510A11510A11510A11510A11510A11510A1
+      1510A11510A11510A11510A1AAB3DFDDE8F44847B61510A11510A11510A11510
+      A11510A11510A11510A11510A11510A11510A11510A1ACB0DCDCE3EEDEE5EFE2
+      E9EF7172C31510A11510A11510A11510A11510A11510A11510A11510A11510A1
+      E5E8E8E1E3E3E0E1E1E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E3E3E3E3E3
+      E3E4E5E5E7E8E8EBEDEDC7C8E31510A11510A11510A11510A1E6EAF3F2F6F6F0
+      F3F3EEF1F1EDF0F0EDF0F0EDEFEF9B9AD1EAECECEAEBEBEBECECEDEFEFF1F4F4
+      4D4AB71510A11510A11510A1F5F9F9F4F8F8F2F6F6F1F5F5F1F5F5F2F6F6BCBE
+      E23E3CB21510A11510A11510A11510A16967C1F1F4F4EEF0F0ECEDEDEBECECEC
+      EDEDEFF1F1F2F6F61510A11510A11510A14D4BB7F4F7F7F1F4F4F1F3F3F2F4F4
+      CACCE7231FA61510A11510A1221FA7CACCE7F2F4F4EFF1F1EDEEEEECECECEBEC
+      ECEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F79E9E9E9E9E9E9D9D9D9D
+      9D9D9D9D9D9C9C9C9C9C9C9B9B9B9B9B9B9A9A9A9999999999999D9E9EA5AAAA
+      B2BBBBC3D3D3130FA3130FA3130FA34244B3BECECEACB6B69EA4A4979A9A94A8
+      DE9DB5F0ACC5F3BDD9F7646EC9130FA3130FA3130FA36A76CDADC8F49CB5F090
+      A8EE8AA3ED8CA4ED91AAEE99B1F0A3BCF2ACC7F4A2BAEB535BC3130FA3130FA3
+      130FA3130FA3130FA3130FA34F50B69EA6CAC5CFCFBDC5C5B5BABAAFB2B2ACAF
+      AFADB1B1B3B9B99297BC130FA3130FA3130FA3130FA39EABD0BFCFD8585CB813
+      0FA3130FA3130FA3130FA3130FA32A29AAA1B0CBBDCECEB9CACAB0BFC8686EB8
+      1E1BA6130FA3130FA3130FA3130FA32929AE6F7DD2AAC6F69CB8F391AAF18BA4
+      F08DA6F097B2F2A9C6F66976CE130FA3130FA3130FA3626DCAB2CFF79DB8F48D
+      A7F1839CEF7E97EE7C95EE7C95EE7C94EE7C95EE7C94EE7C95EE7C95EE7D95EE
+      7D95EE7D95EE7D95EE8098EE849DEE8EA7F09DB8F3B2CEF7626DC9130FA3130F
+      A3130FA3606AC9ADC7F59FB9F39DB7F2A8C1F4B9D5F8130FA3130FA3130FA343
+      45B4D2E6E6D2E4E49FABD04243B2130FA3130FA3130FA3130FA3130FA3130FA3
+      4F51B69EA6CBC4CFCFBEC5C5B6BBBBB1B4B4AEB1B1B1B3B3B6BABABFC6C62A27
+      A9130FA3130FA3130FA3130FA3C0C7C7B9BDBDB3B5B5B1B2B2B1B3B3B6B9B9BD
+      C2C2C4CBCBCCD5D58A8FC73837AF130FA3130FA3130FA3130FA3130FA31F1DA7
+      5D5FBBBBC3D6CED5D5C8CECEC3C6C6BFC1C1BCBDBDBCBDBDBDBDBDBFC0C0C4C6
+      C6C9CDCDCED4D4D5DDDDAAAFD46163BF201DA8130FA3130FA3130FA3130FA313
+      0FA3130FA32D2BAEB5BEE4DBE6F34646B8130FA3130FA3130FA3130FA3130FA3
+      130FA3130FA3130FA3130FA3130FA3130FA3AAAEDBDBE0ECDCE1E6E0E4E4E4E8
+      E8A5A7D52E2BAD130FA3130FA3130FA3130FA3130FA3201DA84846B5E4E7E7E3
+      E5E5E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E2E2E2E2E2E2E3E3E3E3E3E3E5E5E5
+      E8E9E9EAECECEFF2F22F2CAE130FA3130FA3130FA35A58BEE6EAF4F3F7F7F2F5
+      F5F1F4F4C6C8E44A48B74A47B6ECEDEDEBECECEBECECEDEFEFF1F4F44C4AB913
+      0FA3130FA3130FA38484CE8484CE8484CE8384CE7676C92F2CAE130FA3130FA3
+      130FA3130FA3130FA34B49B8E3E7F0EFF1F1ECEEEEEBEBEBECECECEDEEEEEFF1
+      F1F3F6F6130FA3130FA3130FA34C4AB9F3F6F6F0F2F2EFF1F1F0F1F1F2F4F4BC
+      BDE2130FA3130FA3130FA3211EA8E5E8F1F0F2F2EEEFEFEDEDEDECECECEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEEEEEEEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F79F9F9F9F9F9F9E9E9E9E9E9E9D9D
+      9D9D9D9D9C9C9C9C9C9C9B9B9B9B9B9B9A9A9A9999999D9E9EA5AAAAB2BBBBC3
+      D3D3120EA5120EA5120EA54143B5BDCCCCA9B2B29CA0A091A0CC8EA7EE97B0F0
+      A5BEF3B8D3F791A3DF120EA5120EA5120EA56B77CFB1CBF59EB8F292AAEF8BA3
+      EE8AA2ED8DA4EE90A9EF97B0F09EB8F2A6C1F3ADC8F5B3CEF68DA1E28EA2E28E
+      A2E28DA0E2ADC3EBC6D0D0C1C9C9BBC2C2B5B9B9AFB2B2ABADADAAABABABAEAE
+      AFB3B3B5BCBCBBC3C3BEC8C8C0CBCBBFCBCBBDC9C9BCC8C8BBC8C8B2BFC9949E
+      C3949FC5949FC59CA7C4B6C4C4B1BDBDABB6B6A9B3B3AAB5B5ADB9B9B2C0C08A
+      9FE28CA1E28CA1E395ABE7ADC9F6A5C1F59BB5F392ABF18AA3F0879FEF89A3F0
+      93ADF2A4BFF59AB1E8120EA5120EA5120EA51C1BAAB0CCF4A7C3F695B0F388A2
+      F0829AF07E96EE7D96EF7C95EE7D95EF7D95EF7D95EE7D95EE7D96EE7D95EE7E
+      96EE7F98EE829AEF89A2F095AFF2A7C3F5BCD9F91C1BAA120EA5120EA5120EA5
+      9CB2E9A6C1F59CB5F39CB5F2A6C0F4B9D5F7120EA5120EA5120EA54244B5D2E4
+      E4C8D7D7C4D0D0C3CFCFBAC5CE9CA4C99DA5CB9DA6CC9DA6CCC9D5D5C6D0D0C1
+      C9C9BBC2C2B5B9B9B2B4B4AEB0B0AEAFAFB1B3B3B4B7B7BBC0C0C2CACAC7D0D0
+      C9D3D3C8D1D1C3CBCBBCC2C2B7BABAB2B4B4B0B1B1B0B1B1B3B5B5B8BBBBBCC1
+      C1C2C8C8C8D0D0CCD5D5B8C0D3A2A8CEA3A9CFA3AACFAEB5D1D0D9D9CED5D5CB
+      D1D1C6CBCBC2C5C5BFC1C1BEBEBEBCBCBCBBBBBBBDBDBDBEBEBEC1C2C2C4C6C6
+      C9CCCCCED3D3D4DBDBDBE4E4E3EEEEBCC5E24747B8120EA5120EA5120EA5888D
+      CFDEE8EDD8E1EED6E0F0DAE5F2E0ECF6E6F2F94747BA120EA5120EA54847BAE9
+      F3F9E9F2F8E4EDF5DFE7F1DDE3EDDBDFE6DADCDDDBDDDDDDDFDFDFE2E2E3E6E6
+      E6EAEAC0C3DFB3B6DBB4B7DCB4B7DCC1C3DFE7EBEBE6E9E9E3E5E5E2E3E3E1E2
+      E2E0E1E1E1E1E1E1E1E1E1E1E1E3E3E3E4E4E4E4E4E4E5E5E5E6E6E6E7E8E8EA
+      EBEBEDF0F0ABACDB120EA5120EA5120EA5120EA51F1DAA4A49BA4A49BA2D2BAF
+      120EA5120EA54A47B8EDEFEFECEDEDECEDEDEDEFEFF0F3F34B49BA120EA5120E
+      A5120EA5120EA5120EA5120EA5120EA5120EA5120EA5120EA5120EA5120EA512
+      0EA57575C9F2F5F5F0F2F2EEEFEFECEDEDEBEBEBEBEBEBEDEDEDEFF0F0F2F4F4
+      120EA5120EA5120EA52E2BAFF2F5F5F0F1F1EEF0F0EEF0F0F0F1F1F2F5F59FA0
+      D9120EA5120EA5120EA53C3AB4E4E6EFF0F1F1EDEEEEEDEDEDECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECECECECECECEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEFEFEFEFEFEFEFEFEFEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F79F9F9F9F9F9F9F9F9F9E9E9E9E9E9E9D9D9D
+      9D9D9D9C9C9C9B9B9B9B9B9B9A9A9A9999999D9E9EA5AAAAB2BBBBC2D2D2100D
+      A8100DA8100DA84043B7BDCCCCA9B2B29AAAD18FA8EE8FA7EE97AFF0A5BEF2B6
+      D1F69CB0E5100DA8100DA8100DA83E43BDB2CCF5A1B9F293ABEF8BA3ED89A1ED
+      8BA3EE8DA4EF90A8EF95ADF09AB3F19FB9F2A4BDF3A7C1F4A8C2F4A8C2F4A7C1
+      F3A4BDF3B1BED3B8BCBCB4B7B7AFB1B1ADAEAEAAABABAAAAAAAAACACACAFAFAF
+      B3B3B2B7B7B3BABAB3BABAB3BABAB0B7B7AFB6B6AFB7B7AFB8B8B1BABAB1BBBB
+      AFB9B9ACB5B5A6AFAFA2A9A99FA5A59CA2A29DA4A49FA7A7A3ABABA1BDF4A4BF
+      F5A4BFF5A1BCF49CB6F496B0F390A9F28AA3F1859EF0839DF0869FF08FA9F29E
+      B9F4B1CEF73235B7100DA8100DA8100DA86B79D1B3D0F8A1BCF591ABF287A1F1
+      829BF08098EF7E96EF7D96EF7E96EF7E96EF7E96EF7E96EF7E96EF8098EF849C
+      F088A0F091ABF1A0BBF4B3D0F86B79D1100DA8100DA8100DA82728B2B4D0F7A1
+      BAF399B1F29AB3F2A7C0F4BAD5F8100DA8100DA8100DA84144B8CDDCDCC1CCCC
+      BCC5C5BAC1C1BBC2C2BEC6C6C1C9C9C1C9C9C1C9C9BEC5C5BBC1C1B8BDBDB4B8
+      B8B2B4B4AFB0B0AEAEAEAFAFAFB0B2B2B5B7B7BABEBEBFC5C5C3CBCBC5CDCDC4
+      CCCCC1C7C7BBC0C0B6B9B9B3B4B4B0B1B1B1B1B1B2B2B2B4B5B5B8BABABBBFBF
+      BFC4C4C3C8C8C6CDCDC9D0D0C9D1D1CAD1D1C9CFCFC8CDCDC5CACAC3C6C6C0C2
+      C2BFC1C1BCBDBDBCBCBCBBBBBBBCBCBCBEBEBEBEBFBFBFC0C0C2C3C3C5C6C6C7
+      CACACDD2D2D5DCDCDEE7E7CAD4E7100DA8100DA8100DA87A7FCCE2EBEBDBE1E1
+      D6DADAD4D9DBD8DEE6DEE7EFE6F1F74647BC100DA8100DA84647BCE9F3F8E4EC
+      F3DFE6EBDDE1E4DBDEDEDADCDCD9DADAD9DADADADCDCDDDEDEDFE1E1E2E4E4E3
+      E6E6E4E7E7E5E8E8E6E9E9E6E9E9E5E7E7E4E6E6E2E3E3E2E3E3E2E2E2E1E1E1
+      E2E2E2E2E2E2E2E2E2E4E4E4E4E4E4E5E5E5E6E6E6E6E6E6E7E8E8E9EAEAECEE
+      EEEFF2F29D9ED8100DA8100DA8100DA8100DA8100DA8100DA8100DA8100DA810
+      0DA84847BBEEF0F0ECEEEEECEDEDEDEFEFEFF2F24947BC100DA8100DA8100DA8
+      100DA8100DA8100DA8100DA8100DA8100DA8100DA8100DA85857C0C8CAE7F1F4
+      F4EFF1F1EEEFEFECEDEDEBEBEBEAEBEBECECECEDEEEEEFF0F0F1F4F4100DA810
+      0DA8100DA8100DA8F1F3F3EFF0F0EDEEEEEEEFEFEFF0F0F1F2F2F3F5F55857C0
+      100DA8100DA8100DA84947BBF0F1F1EEEFEFEDEDEDECECECECECECECECECECEC
+      ECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEEEEEEEFEFEFEEEEEEEFEFEFEEEE
+      EEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F0F0F0F1F1F1F1F1F1F0F0F0F0F0F0F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7A0A0A0A0A0A09F9F9F9F9F9F9F9F9F9E9E9E9E9E9E9D
+      9D9D9C9C9C9B9B9B9B9B9B9A9A9A9D9E9EA5AAAAB2BBBBC3D3D30F0CAA0F0CAA
+      0F0CAA3F42B8BCCBCBA8B8CE99B2F191A9EF92A9EF9AB3F1A8C2F4BBD6F78495
+      DD0F0CAA0F0CAA0F0CAA6A77D2B2CCF69FB9F293ACF08CA5EE8AA1EE89A1EE8A
+      A2EE8CA4EF8EA6EF91A8EF94ACF096AFF198B2F19AB3F19AB3F199B1F196AFF1
+      97ADE9B1B3B3AFB0B0ADAEAEABABABAAAAAAAAAAAAAAABABABACACACAEAEACAE
+      AEACAFAFABAEAEA9ADADA7ABABA6A9A9A4A8A8A5A9A9A4A9A9A4A9A9A2A7A7A0
+      A4A49CA0A0989B9B959898949696949696959999959FB193ADF294AEF294AEF2
+      92ABF28FA9F18CA5F188A1F0859EF0839BEF829AEF859DF08CA5F197B2F3A9C4
+      F67B8CDB0F0CAA0F0CAA0F0CAA1A19AF9EB6EBAECAF79EB9F591AAF388A1F184
+      9CF18099F07F98F07E97EF7E97EF7F97EF8098EF8199EF839CF089A2F191ABF2
+      9EB8F4AFCAF7AAC3F01A19AF0F0CAA0F0CAA0F0CAA7D8DDBACC7F69BB3F394AD
+      F299B1F2A7C0F4BAD5F80F0CAA0F0CAA0F0CAA4043BBCAD7D7BEC6C6B6BCBCB3
+      B7B7B2B5B5B5BABAB8BCBCB8BCBCB8BCBCB7BABAB5B8B8B3B5B5B2B3B3B1B2B2
+      B0B0B0AEAFAFB0B0B0B1B2B2B4B6B6BABDBDBFC4C4C4CACAC5CCCCC5CCCCC2C8
+      C8BCC0C0B7BABAB3B5B5B1B1B1B0B0B0B1B2B2B3B4B4B5B6B6B7B8B8B9BBBBBC
+      BFBFBEC1C1C0C4C4C1C5C5C2C5C5C1C4C4C1C4C4BFC2C2BEC0C0BEBEBEBCBDBD
+      BCBCBCBCBCBCBEBEBEBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1C3C3C3C5C7C7CACC
+      CCD1D6D6DAE2E2A1A7D90F0CAA0F0CAA0F0CAAD9E3ECDEE6E6D7DCDCD2D5D5D2
+      D5D5D6D9D9DDE3E3E5EDED4646BC0F0CAA0F0CAA4646BCE7EEEEE1E6E6DCDFDF
+      DADCDCD9DADAD9D9D9D8D8D8D8D9D9D9DADADBDCDCDDDEDEDFE0E0E0E1E1E0E2
+      E2E1E3E3E2E4E4E2E4E4E3E4E4E2E3E3E1E1E1E2E2E2E1E1E1E3E3E3E3E3E3E3
+      E3E3E3E3E3E4E4E4E5E5E5E5E5E5E6E6E6E6E6E6E7E7E7EAEAEAEBECECEDEFEF
+      F0F2F2C7C9E76564C60F0CAA0F0CAA0F0CAA0F0CAA0F0CAA1D1BAF4846BC9B9B
+      D7EDEFEFECEDEDECECECECEDEDEFF0F06463C54847BC4947BD4947BD4948BD49
+      47BD4947BD4947BD4947BD6665C79E9FDAD6D9ECF2F5F5F1F3F3EFF1F1EEEFEF
+      EDEDEDECECECEBECECEBEBEBECECECECEDEDEEEFEFF0F2F24846BC4846BC4846
+      BC4846BCF0F2F2EFF0F0EEEEEEEDEEEEEEEEEEEFF0F0F1F2F2E4E5EF5755C148
+      47BC4847BC4846BC9B9BD7EFF0F0EEEEEEEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEE
+      EEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7A2A2A2A1A1A1A0A0A0A0A0A09F9F9F9F9F9F9E9E9E9D9D9D9D9D
+      9D9C9C9C9B9B9B9A9A9A9D9F9FA5AAAAB2BBBBC3D3D30D0AAC0D0AAC0D0AAC3D
+      40BABED3DEACC5F59EB7F298B1F19AB2F1A4BCF3B1CCF6C3DEF9555ECA0D0AAC
+      0D0AAC0D0AAC7381D7AFC9F69EB8F393ABF18DA4EF8AA2EF8AA2EF8AA2EF8AA2
+      EF8BA2EF8BA4EF8CA5F08EA6F08FA7F090A7F090A7F08EA7F08DA6F08CA4F0A1
+      AAC8AEAEAEADAEAEACACACABABABABABABAAABABAAAAAAAAAAAAA8A9A9A8A9A9
+      A6A7A7A5A6A6A3A4A4A1A2A29FA0A09D9F9F9C9E9E9C9E9E9A9C9C989A9A9697
+      979393939192929090908F90908F91918D95A989A2F189A2F189A2F189A1F188
+      A0F1859FF1849CF0839BF0829AF0829AF0839CF088A2F192ACF3A0BBF5B2CFF8
+      3B40C00D0AAC0D0AAC0D0AAC3033BBB3CEF5ADC9F79FBAF593AEF38CA6F287A1
+      F1859EF1839CF1839CF1849CF1869EF188A1F18DA6F294AFF39FBAF5AEC9F7B3
+      CEF53033BB0D0AAC0D0AAC0D0AAC3033BBB5D0F8A3BCF495ADF291A8F198B0F2
+      A6C0F5BBD6F80D0AAC0D0AAC0D0AAC3E41BECAD6D6BDC4C4B4B8B8AFB1B1AFB0
+      B0B0B2B2B2B3B3B2B4B4B3B4B4B2B3B3B1B2B2B2B2B2B1B1B1B0B1B1B0B0B0B0
+      B0B0B0B0B0B2B2B2B6B8B8BCBFBFC1C6C6C7CFCF9BA1C9A6ACCBC5CDCDBFC4C4
+      BABDBDB5B6B6B2B3B3B2B2B2B2B2B2B3B3B3B3B4B4B5B5B5B7B7B7B8B8B8B9BB
+      BBBABBBBBABBBBBCBDBDBCBDBDBCBDBDBCBDBDBBBCBCBCBCBCBCBCBCBDBDBDBD
+      BDBDBEBEBEBEBEBEC0C0C0C0C0C0C1C1C1C2C2C2C2C2C2C4C5C5C8CACACFD3D3
+      D7DEDE777ACB0D0AAC0D0AAC0D0AACE5EFEFDDE4E4D6DADAD1D4D4D2D4D4D6D9
+      D9DDE2E2E6EEEE4444BE0D0AAC0D0AAC4444BEE4EAEADEE2E2D9DBDBD7D8D8D7
+      D8D8D8D8D8D7D8D8D8D8D8D9DADADBDBDBDCDCDCDDDEDEDEDEDEDFE0E0DFE0E0
+      E0E0E0E1E1E1E1E2E2E1E1E1E1E1E1E1E1E1E3E3E3E3E3E3E4E4E4E4E4E4E5E5
+      E5E5E5E5E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E9E9E9EAEAEAECEDEDEDEFEFF0
+      F1F1F1F3F3F2F5F5C8C9E7BABBE3BABBE3D5D8ECF1F4F4F0F2F2EFF0F0EDEEEE
+      ECEDEDECECECECEDEDEDEEEEEFF0F0F0F2F2F1F3F3F2F5F5F3F5F5F3F5F5F3F5
+      F5F2F5F5F2F5F5F2F4F4F1F3F3F0F2F2EFF1F1EEEFEFEEEFEFEDEEEEEDEDEDEC
+      ECECECECECECECECECECECEDEDEDEEEEEEEFF0F0F0F2F2F1F2F2F1F2F2F0F2F2
+      EFF0F0EEEEEEEDEDEDEDEDEDEEEEEEEFEFEFF0F1F1F1F2F2F1F3F3F2F3F3F1F3
+      F3F1F2F2EFF0F0EEEFEFEEEEEEEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7A2A2A2A2A2A2A2A2A2A1A1A1A0A0A0A0A0A09F9F9F9E9E9E9E9E9E9D9D9D
+      9B9B9B9A9A9A9D9F9FA6ABABB2BBBBC3D3D30C09AE0C09AE0C09AE3D40BDC3DF
+      F9B3CDF6A8C1F4A3BCF3A6BFF4B0CAF6BED9F8A8BEED0C09AE0C09AE0C09AE0C
+      09AE9CB1EAABC4F59CB4F292AAF08CA4EF8BA3EF8BA3EF8BA2EF8BA3F08BA3F0
+      8BA2F08AA2EF8AA2F08BA3F08BA3F08BA2F08BA2F089A1F089A1F08DA2E7ADAD
+      ADADADADADADADADADADACACACABABABAAAAAAA9A9A9A8A8A8A7A7A7A5A5A5A3
+      A3A3A1A1A19F9F9F9C9C9C9A9A9A999999989898969696959595939393919191
+      9090908F8F8F8E8E8E8D8D8D8992B1859DF0859DF0859DF0849DF0839CF0839B
+      F0839BF0839BF0829BF0829BF0839BF0869EF18DA5F299B3F4A8C3F798AFEB18
+      17B30C09AE0C09AE0C09AE2E32BCB3CFF5B0CDF8A5C0F69BB5F594AEF490AAF3
+      8EA7F28DA7F28EA8F290A9F395AFF39CB6F5A5C0F6B1CDF8B4CFF52F33BC0C09
+      AE0C09AE0C09AE1817B39AB0EBAAC4F69BB4F491A8F28FA6F298AFF3A7C0F5BC
+      D6F80C09AE0C09AE0C09AE3D41C1CAD6D6BDC4C4B5B8B8AFB0B0ADADADAEAFAF
+      AFB0B0B0B1B1B1B2B2B1B1B1B2B2B2B2B2B2B2B2B2B2B2B2B3B3B3B3B3B3B3B3
+      B3B5B5B5B9BABABFC2C2C6CCCC3C3CB80C09AE0C09AE5F62BFC4CACABDC1C1B8
+      BABAB4B5B5B3B3B3B3B3B3B4B4B4B4B4B4B5B5B5B5B5B5B6B6B6B7B7B7B7B8B8
+      B8B9B9B8B9B9BABBBBBABABABBBBBBBBBBBBBCBCBCBDBDBDBEBEBEBEBEBEBFBF
+      BFBFBFBFC1C1C1C1C1C1C2C2C2C3C3C3C3C3C3C5C5C5C9CACACFD2D2D6DCDC90
+      95D30C09AE0C09AE0C09AED8E2ECDFE7E7D9DEDED5D8D8D5D8D8D9DDDDE0E6E6
+      E8F0F00C09AE0C09AE0C09AE4443BFE3E8E8DDE0E0D9DADAD7D7D7D7D7D7D8D8
+      D8D8D8D8D9D9D9DADADADBDBDBDCDCDCDDDDDDDDDDDDDEDEDEDEDEDEDFDFDFE0
+      E0E0E1E1E1E1E1E1E2E2E2E2E2E2E3E3E3E4E4E4E4E4E4E4E4E4E5E5E5E6E6E6
+      E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E9E9E9EAEAEAEBECECECEDEDEDEEEEEEEF
+      EFEFF1F1F0F1F1F0F2F2F0F2F2F0F1F1F0F1F1EFF0F0EEEFEFEDEDEDECECECEC
+      ECECECECECEDEDEDEEEEEEEEF0F0EFF0F0EFF1F1F0F1F1F0F1F1F0F1F1EFF1F1
+      EFF1F1EFF0F0EFF0F0EFF0F0EEEFEFEDEEEEEDEDEDECEDEDECECECECECECECEC
+      ECECECECECECECEDEDEDEDEDEDEFEFEFEFF0F0EFF0F0F0F1F1EFF0F0EFEFEFEE
+      EEEEEEEEEEEDEDEDEDEDEDEEEEEEEEEFEFEFF0F0EFF0F0F0F1F1F1F1F1EFF0F0
+      EFEFEFEFEFEFEFEFEFEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F3F3
+      F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7A3A3
+      A3A3A3A3A2A2A2A2A2A2A1A1A1A0A0A0A0A0A09F9F9F9E9E9E9D9D9D9C9C9C9A
+      9A9A9D9F9FA6ABABB2BCBCC3D3D30A08B10A08B10A08B13B40C3CDE9FBBFD9F9
+      B6D0F7B3CCF6B6D1F7C0DBF8A7BDED1616B60A08B10A08B10A08B13A3FC3B6D0
+      F7A6BFF498B1F291A9F18DA5F08CA3F08CA3F08CA4F08CA3F08BA3F08BA3F08B
+      A3F08BA3F08BA2F08BA2F08AA2F08AA2F08AA2F08AA2F08AA1F0A0A9C6AEAEAE
+      AEAEAEAEAEAEADADADACACACABABABAAAAAAAAAAAAA8A8A8A6A6A6A4A4A4A2A2
+      A2A0A0A09E9E9E9B9B9B99999998989897979795959594949493939391919190
+      90908F8F8F8E8E8E8995BF859DF1859DF1849DF1849CF1849CF1849CF1849CF1
+      839CF1839BF1839BF1839BF1859DF189A2F291AAF39DB8F5ACC8F77A8BDE0A08
+      B10A08B10A08B10A08B11616B695AAE8B8D4F9AECAF8A6C2F7A1BCF69EB9F59C
+      B7F59EB9F5A1BCF6A6C2F6AFCAF8B7D4F994AAE82224BA0A08B10A08B10A08B1
+      0A08B17B8CDEAEC9F7A0B8F494ACF28DA4F18EA5F197AFF3A8C1F5BCD7F90A08
+      B10A08B10A08B13A40C4C9D7DBBFC5C5B5B8B8B1B1B1AFAFAFB0B0B0B1B1B1B2
+      B2B2B2B2B2B3B3B3B3B3B3B4B4B4B4B4B4B4B4B4B5B5B5B5B5B5B5B5B5B7B8B8
+      BABDBDC1C5C5A5ABCB0A08B10A08B10A08B10A08B1C7CECEBFC3C3B9BBBBB6B6
+      B6B4B4B4B5B5B5B4B4B4B5B5B5B6B6B6B6B6B6B6B6B6B8B8B8B8B8B8B9B9B9BA
+      BABABABABABBBBBBBCBCBCBDBDBDBDBDBDBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1
+      C2C2C2C3C3C3C3C3C3C3C3C3C4C4C4C6C6C6C9CACACED0D0D6DBDBB7BDDD0A08
+      B10A08B10A08B1868BD5E4ECECDFE5E5DCE1E1DCE1E1E0E5E5E6EDED969BDA0A
+      08B10A08B10A08B16C6DCCE2E7E7DCDFDFD9DADAD8D8D8D8D8D8D9D9D9D9D9D9
+      DADADADADADADBDBDBDDDDDDDDDDDDDDDDDDDEDEDEDFDFDFE0E0E0E1E1E1E2E2
+      E2E2E2E2E3E3E3E3E3E3E4E4E4E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E7E7E7E7
+      E7E7E8E8E8E8E8E8E9E9E9EAEAEAEAEAEAEBECECECECECECEDEDEDEDEDEDEEEE
+      EEEFEFEEEFEFEEEFEFEEEFEFEDEEEEEDEDEDECEDEDECECECECECECEBECECECED
+      EDEDEDEDEDEEEEEEEEEEEEEEEEEEEFEFEEEFEFEEEFEFEEEFEFEEEFEFEEEFEFEE
+      EEEEEDEEEEEDEDEDEDEDEDECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEFEFEEEFEFEEEEEEEEEEEEEDEEEEEDED
+      EDEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFF0F0EFF0F0EFF0F0EFEFEFEFEFEFEF
+      EFEFEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7A5A5A5A4A4A4
+      A3A3A3A2A2A2A2A2A2A1A1A1A0A0A0A0A0A09E9E9E9D9D9D9C9C9C9B9B9B9D9F
+      9FA5AAAAB2BBBBC2D1D10907B30907B30907B33A40C5CEE9FBCBE5FBC4DFF9C2
+      DDF9AEC6F16A78D71415B80907B30907B30907B30907B39CB1ECAEC7F6A0B8F4
+      96AEF290A7F08DA5F18DA5F18DA4F18DA4F18CA4F18CA4F18CA4F18CA4F18CA3
+      F18BA3F18BA3F18BA3F18BA3F18BA2F18BA2F18AA2F18FA3E8AEAEAEAEAEAEAE
+      AEAEAEAEAEAEAEAEADADADACACACABABABA9A9A9A8A8A8A6A6A6A4A4A4A2A2A2
+      9F9F9F9D9D9D9B9B9B9999999898989696969595959393939292929191919090
+      908F8F8F8997C5859DF1859DF1859DF1859DF1859DF2859DF2859DF2849CF184
+      9DF2849CF2849CF2859DF2879FF28BA5F394AEF4A0BAF6AFCAF87A8BDF0907B3
+      0907B30907B30907B30907B3383FC593A9E9BAD7FAB5D1F9B1CEF8B0CDF8B1CD
+      F8B5D1F9B9D6F993A8E8505BCE0907B30907B30907B30907B30907B37B8CDFB1
+      CCF8A3BCF596AFF48FA6F28AA2F28FA6F299B1F4AAC4F6BED9F90907B30907B3
+      0907B33A3FC5C6D6E4BFC6C6B7BABAB3B3B3B0B0B0B2B2B2B3B3B3B4B4B4B4B4
+      B4B5B5B5B5B5B5B5B5B5B6B6B6B6B6B6B6B6B6B6B6B6B6B6B6B8B9B9BCBEBEC2
+      C7C7B2B8CD0907B30907B30907B31514B5C8CFCFC0C4C4BABCBCB7B7B7B5B5B5
+      B6B6B6B6B6B6B6B6B6B6B6B6B7B7B7B7B7B7B8B8B8B9B9B9BABABABABABABBBB
+      BBBDBDBDBDBDBDBEBEBEBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1C2C2C2C2C2C2C3
+      C3C3C4C4C4C4C4C4C5C5C5C7C7C7C9CACACED0D0D4D8D8DCE3E32424BA0907B3
+      0907B31616B7BFC6E6E5EDEDE3EAEAE4EAEAE7EEEEBFC6E71616B70907B30907
+      B30907B3BCC2E2E1E5E5DCDEDED9DADAD7D8D8D9D9D9DADADADADADADBDBDBDC
+      DCDCDCDCDCDEDEDEDEDEDEDEDEDEDFDFDFE0E0E0E1E1E1E1E1E1E2E2E2E2E2E2
+      E3E3E3E4E4E4E5E5E5E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E8E8E8E9E9E9E9E9
+      E9E9E9E9E9E9E9EAEAEAEAEAEAEBEBEBEBEBEBEBECECEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDECEDEDECECECECECECECECECECECECECECEC
+      ECEDEDECEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEDEEEEEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFF0F0EFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7A6A6A6A5A5A5A4A4A4A3
+      A3A3A2A2A2A2A2A2A1A1A1A0A0A09F9F9F9E9E9E9C9C9C9B9B9B9E9F9FA4A9A9
+      B0B8B8BFCECE0706B50706B50706B51313B9393EC7393EC7393EC72022BE0706
+      B50706B50706B50706B50706B50706B57B8BE0B3CDF7A6BEF59AB3F393ACF28F
+      A7F18EA5F18EA5F18EA5F18DA5F18DA5F18DA5F18DA4F18CA4F18CA4F18CA4F1
+      8CA4F18CA3F18CA4F18BA3F18BA3F18BA3F18BA3F2A1AAC8AEAEAEAFAFAFAFAF
+      AFAEAEAEAEAEAEADADADACACACABABABA9A9A9A7A7A7A6A6A6A3A3A3A0A0A09E
+      9E9E9C9C9C9A9A9A999999979797969696949494939393929292919191909090
+      899AD9869EF2869EF2869EF2869EF2869EF2869EF2859EF2859EF2859DF2859D
+      F2859DF2849DF2859FF288A0F38DA6F396AFF5A2BCF6AFCBF88497E41314B907
+      06B50706B50706B50706B50706B51313B9434BCB6573D86573D86573D8434BCB
+      1F21BE0706B50706B50706B50706B50706B51314B98597E4B1CCF8A3BEF698B1
+      F591A8F28CA3F28BA2F191A8F29CB4F4AEC7F7C2DDFA0706B50706B50706B539
+      3FC7C0D6EFC1C7C7B8BBBBB4B4B4B1B1B1B3B3B3B4B4B4B5B5B5B6B6B6B5B5B5
+      B6B6B6B7B7B7B7B7B7B7B7B7B7B7B7B7B7B7B7B7B7B9B9B9BCBEBEC1C5C5C8CD
+      CD6A6EC50706B51413B78386C8C6CCCCC0C3C3BBBDBDB8B9B9B6B6B6B6B6B6B7
+      B7B7B7B7B7B7B7B7B8B8B8B8B8B8B9B9B9BABABABABABABABABABBBBBBBDBDBD
+      BDBDBDBEBEBEBFBFBFC0C0C0C1C1C1C1C1C1C1C1C1C3C3C3C4C4C4C4C4C4C5C5
+      C5C5C5C5C6C6C6C7C7C7C9CACACDCECED2D5D5D9DEDE9CA2D90706B50706B507
+      06B50706B55C5FCCA3A8DFA3A8E05C5FCC0706B50706B50706B50706B54E4FC8
+      E3E8E8DFE1E1DBDDDDD9D9D9D9D9D9DADADADBDBDBDBDBDBDBDBDBDDDDDDDEDE
+      DEDFDFDFDFDFDFDFDFDFE0E0E0E1E1E1E2E2E2E3E3E3E3E3E3E3E3E3E4E4E4E4
+      E4E4E5E5E5E7E7E7E7E7E7E6E6E6E8E8E8E8E8E8E9E9E9EAEAEAEAEAEAEAEAEA
+      EAEAEAEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEDEDED
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F1F1F1F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7A6A6A6A6A6A6A5A5A5A4A4A4A3A3
+      A3A3A3A3A2A2A2A1A1A1A0A0A09F9F9F9D9D9D9C9C9C9FA0A0A4A7A7ADB4B4BA
+      C7C70605B80605B80605B80605B80605B80605B80605B80605B80605B80605B8
+      0605B80605B81F21C091A5E9B4CEF8A8C1F69DB6F496AFF392A9F290A7F28FA6
+      F28EA6F28EA6F28EA6F28EA5F28EA5F28DA5F28DA5F28DA5F28DA5F28DA4F28C
+      A4F28CA4F28CA4F28CA4F28CA4F28CA4F290A5EAB0B0B0AFAFAFB0B0B0AFAFAF
+      AFAFAFAEAEAEADADADABABABABABABA8A8A8A6A6A6A4A4A4A2A2A29F9F9F9D9D
+      9D9B9B9B9A9A9A989898979797969696949494939393929292919191899CD987
+      9FF2879FF2869EF2869EF2879FF3869EF2869EF3859EF2869EF3869EF3859EF3
+      859DF3859DF3879FF38AA2F48EA8F496B0F5A1BBF7ACC7F8A3BBF2414ACC0605
+      B80605B80605B80605B80605B80605B80605B80605B80605B80605B80605B806
+      05B80605B80605B80605B8363CC8A3BBF1AEC9F8A3BCF698B1F492AAF38DA4F3
+      8AA2F28CA2F294AAF39FB7F5B1CAF8C5DFFB0605B80605B80605B8383EC9BBD3
+      F9B3C3E1AAB6D7A4AFD3A2ACD2ABB0C3ACB1C4ADB2C4B1B4BDB7B7B7B7B7B7B7
+      B7B7B7B7B7B8B8B8B8B8B8B8B8B8B8B8B8B9BABABCBDBDBFC1C1C4C8C8C8CDCD
+      CAD0D0CAD0D0C7CCCCC3C6C6BEC0C0BABBBBB8B8B8B7B7B7B8B8B8B8B8B8B8B8
+      B8B8B8B8B8B8B8BABABABABABABABABABBBBBBBCBCBCBDBDBDBDBDBDBFBFBFBF
+      BFBFBFBFBFC1C1C1C1C1C1C2C2C2C3C3C3C4C4C4C4C4C4C5C5C5C6C6C6C6C6C6
+      C7C7C7C8C8C8C9C9C9CCCDCDD0D2D2D5D9D9DDE3E3595CCB0605B80605B80605
+      B80605B80605B80605B80605B80605B80605B80605B83131C2D8DDE8E1E4E4DE
+      E0E0DBDCDCD9D9D9DADADADADADADBDBDBDCDCDCDCDCDCDEDEDEDFDFDFE0E0E0
+      E0E0E0E1E1E1E1E1E1E2E2E2E3E3E3E4E4E4E4E4E4E4E4E4E5E5E5E6E6E6E7E7
+      E7E7E7E7E7E7E7E7E7E7E8E8E8E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEBEBEBEC
+      ECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F2F2F2F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7A8A8A8A7A7A7A6A6A6A5A5A5A4A4A4A4A4A4
+      A3A3A3A2A2A2A1A1A19F9F9F9E9E9E9D9D9D9E9F9FA3A5A5AAAFAFB4BEBE0403
+      BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA353BCA7B
+      8BE2BBD5F9B2CBF7A7C1F69FB7F498B1F394ABF391A8F28FA7F28FA7F28FA7F2
+      8FA6F28FA6F28FA6F28FA6F38EA6F28EA6F28EA6F38DA5F28DA5F28DA5F28DA5
+      F28DA4F28DA4F28DA5F38DA4F38DA4F3A2ABC9B0B0B0B0B0B0B0B0B0AFAFAFAF
+      AFAFAEAEAEADADADABABABAAAAAAA8A8A8A6A6A6A3A3A3A0A0A09E9E9E9C9C9C
+      9B9B9B9A9A9A98989897979796969694949494949491949E889FED88A0F388A0
+      F388A0F3879FF2879FF3879FF3879FF3879FF3869FF3869FF3869EF3869EF386
+      9EF3859EF387A0F38AA2F48EA7F495AEF59EB8F6A7C3F8B2CDF98EA3EA4049CE
+      0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403
+      BA4049CE8EA4EAB3CEF9A9C3F8A0B9F697B0F591A8F48DA4F48BA2F38BA1F28E
+      A5F395ACF4A2BAF5B2CCF8C6E0FB0403BA0403BA0403BA363CCAB8D1F8A8BFF6
+      9BB1F494A9F392A6F293A7F293A7F294A8F295A8F296A9F296A9F197AAF19DAD
+      E6A0AEE3A1AEE3A1AFE3AAB3D4ABB4D5ADB7D7B8BDC8C0C2C2C2C5C5C3C6C6C3
+      C7C7C1C4C4BEC1C1BCBDBDBABABAB8B9B9B9B9B9B8B8B8B9B9B9B9B9B9B9B9B9
+      BABABABABABABBBBBBBBBBBBBCBCBCBDBDBDBEBEBEBEBEBEBFBFBFBFBFBFC0C0
+      C0C2C2C2C3C3C3C3C3C3C3C3C3C4C4C4C5C5C5C7C7C7C7C7C7C8C8C8C8C8C8C9
+      C9C9CACACACCCCCCCFD0D0D3D6D6D9DDDDDEE4E48F93D81212BD0403BA0403BA
+      0403BA0403BA0403BA0403BA0403BA696BD1D7DCE7E2E5E5DEE0E0DCDEDEDBDB
+      DBDADBDBDBDBDBDCDCDCDCDCDCDDDDDDDDDDDDDEDEDEDFDFDFE0E0E0E0E0E0E1
+      E1E1E1E1E1E2E2E2E3E3E3E5E5E5E5E5E5E5E5E5E5E5E5E7E7E7E7E7E7E8E8E8
+      E8E8E8E9E9E9E9E9E9EAEAEAEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECEDED
+      EDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F1F1F1F1F1F1F2F2F2F2F2F2F1F1F1F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7A9A9A9A7A7A7A6A6A6A6A6A6A5A5A5A4A4A4A3A3A3A2
+      A2A2A1A1A1A0A0A09F9F9F9D9D9D9E9F9FA0A2A2A5A9A9ACB3B38890BE8E97C5
+      919ED193A7EA94A7EA93A6EA92A5EA91A5EA9CB1EEBDD7F9B8D2F9B3CCF8ACC5
+      F7A4BDF69EB6F598B0F495ACF491A9F390A8F390A8F390A7F390A7F390A7F38F
+      A7F38FA7F390A7F38FA6F38FA7F38FA7F38EA6F38EA6F38EA6F38EA5F38EA6F3
+      8EA5F38DA5F38DA5F38DA5F392A6EBB0B0B0B0B0B0B0B0B0B0B0B0AFAFAFAFAF
+      AFAEAEAEACACACABABABA9A9A9A6A6A6A4A4A4A2A2A29F9F9F9D9D9D9C9C9C9A
+      9A9A999999989898949AAE8F9CCA8B9FE189A1F489A1F488A0F388A1F488A0F3
+      88A0F4879FF388A0F488A0F487A0F4879FF4879FF4879FF4879FF4869FF4869E
+      F4869EF487A0F48AA2F48DA6F593ACF599B3F6A1BBF7A9C4F8B1CDF9ADC7F677
+      88E35663D8333ACC333ACC343ACC343ACC333ACC5663D87789E3ADC7F6B2CDF9
+      ABC6F8A4BDF79CB4F695ADF591A8F48CA4F48AA1F38AA1F38BA2F38EA6F497AE
+      F5A4BBF6191BC40302BC0302BC0302BC0302BC3439CCB3CCF8A5BCF59BB0F495
+      A9F393A7F394A7F294A8F295A9F295A9F296AAF297AAF297AAF298ABF299ABF2
+      9AACF29BADF29BADF29DAEF19EB0F1A8B5E4BCBDBDBDBFBFBEC0C0BEC0C0BDBE
+      BEBBBCBCBBBBBBBABABAB8B8B8B9B9B9B9B9B9B9B9B9BABABABABABABBBBBBBB
+      BBBBBCBCBCBDBDBDBDBDBDBEBEBEBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1C2C2C2
+      C3C3C3C3C3C3C4C4C4C5C5C5C7C7C7C7C7C7C7C7C7C9C9C9C9C9C9CACACACBCB
+      CBCDCDCDCECFCFD1D2D2D5D7D7D9DCDCDEE2E2D3D9E49094DA676AD23C3DC93D
+      3EC95A5CD08386D8C9CEE5E3E8E8E1E4E4DEE0E0DDDEDEDBDCDCDBDBDBDADADA
+      DCDCDCDDDDDDDEDEDEDEDEDEDEDEDEDFDFDFE0E0E0E1E1E1E2E2E2E2E2E2E3E3
+      E3E3E3E3E4E4E4E5E5E5E5E5E5E5E5E5E6E6E6E7E7E7E8E8E8E8E8E8E9E9E9E9
+      E9E9E9E9E9EBEBEBECECECECECECECECECECECECEDEDEDEDEDEDEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7AAAAAAA9A9A9A8A8A8A7A7A7A6A6A6A5A5A5A4A4A4A3A3A3A2A2
+      A2A1A1A19F9F9F9E9E9E9E9F9F9FA0A0A0A3A3A5A9A9AAB0B0ADB6B6B0BABAB2
+      C4DAB5CDF8B3CDF8B3CDF8B2CBF8B0C9F7ADC6F7AAC2F6A4BDF6A0B8F59CB4F5
+      98B0F595ADF493AAF492A9F491A9F491A9F491A9F491A8F490A8F391A8F490A7
+      F390A8F490A8F490A7F490A7F48FA7F48FA7F48FA7F48FA7F48FA6F48EA6F48E
+      A6F48EA6F48EA6F48EA5F4A3ACC9B0B0B0B0B0B0B0B0B0AFAFAFAFAFAFAEAEAE
+      ACACACABABABA9A9A9A7A7A7A5A5A5A3A3A3A0A0A09B9EA8979EB8939FC78EA0
+      DD8AA2F48AA2F48AA2F48AA2F48AA2F489A2F489A1F489A1F489A1F489A1F489
+      A1F488A0F488A0F488A0F488A0F488A0F487A0F487A0F4879FF4879FF4879FF4
+      869FF487A1F489A1F48CA4F590A8F594AEF69AB4F7A0BAF7A5C0F8AAC5F9AEC9
+      F9B1CCF9B2CEF9B3CFFAB3CFF9B1CDF9AFCAF9ACC7F9A8C1F8A1BBF79CB5F797
+      B0F691AAF58FA6F58CA3F48AA1F48AA1F48BA1F48CA3F48FA6F598AEF5A2B9F6
+      8496E90101BE0101BE0101BE0101BE3036CDAFC6F7A3B9F699AFF494A8F393A7
+      F394A8F294A8F295A9F396AAF397AAF398ABF398ABF399ACF39BADF29AADF29C
+      AEF29DAEF29DAFF29EB0F2A0B1F2B4B8C9BABBBBBABBBBBBBCBCBABBBBBABABA
+      B9BABAB9B9B9B9B9B9B9B9B9BABABABABABABBBBBBBBBBBBBCBCBCBCBCBCBDBD
+      BDBDBDBDBEBEBEBFBFBFBFBFBFC0C0C0C0C0C0C2C2C2C2C2C2C3C3C3C4C4C4C4
+      C4C4C6C6C6C6C6C6C7C7C7C7C7C7C8C8C8C9C9C9CACACACCCCCCCBCBCBCDCDCD
+      CFCFCFCFD0D0D3D4D4D6D8D8D8DBDBDCE0E0DFE3E3E1E5E5E2E7E7E3E8E8E3E7
+      E7E2E6E6E0E4E4DFE2E2DDDFDFDCDDDDDBDBDBDBDBDBDBDBDBDBDBDBDCDCDCDD
+      DDDDDEDEDEDEDEDEDEDEDEE1E1E1E1E1E1E2E2E2E3E3E3E3E3E3E4E4E4E5E5E5
+      E5E5E5E6E6E6E6E6E6E7E7E7E7E7E7E8E8E8E9E9E9E9E9E9E9E9E9EAEAEAEAEA
+      EAEBEBEBEBEBEBECECECECECECECECECEDEDEDEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F1F1F1F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7ABABABAAAAAAA9A9A9A8A8A8A7A7A7A6A6A6A5A5A5A4A4A4A3A3A3A2A2A2
+      A1A1A19F9F9F9E9E9E9E9F9F9E9F9F9FA1A1A1A5A5A2A7A7A3A8A8A3AAAAA6BB
+      E8A6BEF6A5BDF6A4BCF6A3BBF6A0B9F69EB6F59BB4F599B1F596AFF495ACF494
+      ABF493AAF492AAF492AAF492AAF492A9F492A9F491A9F491A9F491A9F491A8F4
+      91A8F491A8F490A8F490A8F490A8F490A7F48FA7F48FA7F48FA7F48FA7F48FA6
+      F48FA6F48EA6F493A7ECB0B0B0B0B0B0B0B0B0AFAFAFAFAFAFAEAEAEADADADAC
+      ACACA2A8BC9DA6C499A5CD92A4E08DA4EF8CA4F58BA3F48BA3F48BA3F48BA3F4
+      8BA3F58BA3F58BA3F58AA2F58AA2F58AA2F58AA2F58AA2F589A2F589A1F589A1
+      F589A1F589A1F589A1F588A1F588A0F588A0F588A0F588A0F587A0F5879FF587
+      9FF588A0F588A1F58AA3F58CA5F68FA8F693ACF697B0F79AB4F79DB7F89FB9F7
+      A1BBF8A2BCF8A2BCF8A0BAF89FB9F89BB5F798B2F796AEF691AAF68FA7F58CA5
+      F48CA3F48BA2F48BA1F48BA1F48BA2F48DA3F490A7F495ACF59DB5F6A8C0F764
+      72E05D69DD5E6ADD5C69DC6F7EE3A7BEF69FB5F699AEF496AAF394A8F395A9F3
+      95A9F397ABF397ABF398ABF398ABF399ACF39BADF39BAEF39CAEF39DAFF39DAF
+      F39EB0F39FB0F3A0B1F3A5B3E8BABABABABABABABABABABABAB9B9B9B9B9B9BA
+      BABABABABABBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBCBCBCBDBDBDBDBDBDBEBEBE
+      BFBFBFC0C0C0C0C0C0C1C1C1C2C2C2C3C3C3C3C3C3C4C4C4C5C5C5C6C6C6C7C7
+      C7C7C7C7C8C8C8C9C9C9C9C9C9CACACACACACACCCCCCCCCCCCCDCDCDCECECECF
+      CFCFD1D1D1D3D4D4D6D7D7D8DADAD9DCDCDBDEDEDDE0E0DEE1E1DEE0E0DEE0E0
+      DCDEDEDCDDDDDBDCDCDADBDBDBDBDBDBDBDBDCDCDCDDDDDDDDDDDDDEDEDEDFDF
+      DFE0E0E0E0E0E0E1E1E1E1E1E1E2E2E2E3E3E3E3E3E3E4E4E4E6E6E6E7E7E7E7
+      E7E7E7E7E7E8E8E8E8E8E8E9E9E9EAEAEAEAEAEAEAEAEAEBEBEBEBEBEBECECEC
+      ECECECEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F0F0F0F0F0F0F0F0
+      F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7ADAD
+      ADABABABAAAAAAA9A9A9A8A8A8A7A7A7A6A6A6A5A5A5A4A4A4A2A2A2A1A1A1A0
+      A0A09E9E9E9E9E9E9C9D9D9C9D9D9C9D9D9B9D9D9A9C9C9A9C9C999EA69CB2EF
+      9CB3F59AB3F599B2F598B1F597AFF496AEF595ACF495ACF594ABF594ABF593AB
+      F593ABF593AAF593AAF592AAF592AAF592AAF592A9F592A9F592A9F591A9F591
+      A9F591A9F591A8F591A8F590A8F590A8F590A8F590A8F590A7F58FA7F58FA7F5
+      8FA7F58FA7F5A0ABD2A3ACCA9FABD29FABD296A8E396A7E38EA5F58DA5F58DA5
+      F58DA5F58DA5F58CA4F58CA4F58CA4F58CA4F58CA4F58CA4F58BA3F58CA4F58C
+      A4F58BA3F58BA3F58BA3F58BA3F58AA3F58AA2F58AA2F58AA2F58AA2F58AA2F5
+      89A1F589A1F589A1F589A1F589A1F588A1F588A1F588A0F588A0F588A0F587A0
+      F587A0F588A0F588A1F58AA2F58CA4F68CA6F68EA7F690A9F692ABF693ACF694
+      ADF694ADF693ABF692ABF690A9F68FA7F68DA6F68CA4F58BA2F58CA3F58AA2F5
+      8BA2F58CA2F58BA2F58CA3F58CA3F58FA6F594AAF599B1F59FB7F6A7BFF7ACC4
+      F8AEC5F8ACC3F8A7BEF7A1B6F69BB1F598ACF595AAF494A9F496AAF496AAF497
+      ABF399ACF499ACF399ACF39BADF49BAEF49CAEF49DAFF49EB0F39EB0F39FB1F3
+      A0B1F3A0B2F3A2B3F3B0B6CFB9B9B9BABABABABABABABABABABABABABABABABA
+      BABBBBBBBBBBBBBBBBBBBCBCBCBDBDBDBDBDBDBDBDBDBEBEBEBEBEBEC0C0C0C0
+      C0C0C1C1C1C1C1C1C2C2C2C3C3C3C4C4C4C5C5C5C5C5C5C7C7C7C7C7C7C8C8C8
+      C9C9C9CACACACBCBCBCBCBCBCCCCCCCDCDCDCDCDCDCECECECFCFCFCFCFCFD1D2
+      D2D2D2D2D3D4D4D5D6D6D6D7D7D8D9D9D9DADAD9DADAD9DBDBDADBDBD9DADAD9
+      DADADBDBDBDADBDBDBDBDBDCDCDCDDDDDDDEDEDEDEDEDEDFDFDFE0E0E0E1E1E1
+      E1E1E1E2E2E2E2E2E2E4E4E4E4E4E4E4E4E4E5E5E5E6E6E6E7E7E7E7E7E7E7E7
+      E7E8E8E8E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEBEBEBEDEDEDEDEDEDEEEEEEEE
+      EEEEEEEEEEEEEEEEEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F2F2
+      F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F4F4F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7AEAEAEACACAC
+      ABABABAAAAAAA9A9A9A8A8A8A7A7A7A6A6A6A5A5A5A3A3A3A2A2A2A1A1A19F9F
+      9F9E9E9E9C9C9C9B9B9B999999989898969696969797949595959EB897AEF597
+      AEF596AEF595ADF595ADF595ACF595ACF595ACF594ACF594ACF594ABF594ABF5
+      94ABF593ABF593ABF593ABF593AAF593AAF592AAF592AAF592AAF592A9F592A9
+      F592A9F591A9F591A9F591A9F591A8F590A8F590A8F590A8F590A8F590A7F590
+      A7F58FA7F58FA7F58FA7F58FA7F58FA7F68EA6F58EA6F58EA6F58EA6F68EA6F6
+      8EA6F68DA5F58DA5F58DA5F58DA5F58DA5F68CA4F58CA4F58CA4F68CA4F68CA4
+      F68CA4F68CA4F68BA3F68BA3F68BA3F68BA3F68BA3F68AA3F68AA2F68AA2F68A
+      A2F68AA2F68AA2F689A2F689A1F689A1F689A1F689A1F688A1F688A0F688A0F6
+      88A0F688A0F687A0F688A1F688A1F689A1F689A2F68AA2F58BA4F58BA3F58BA4
+      F58BA3F58AA3F58BA3F58BA2F68BA2F68AA1F68BA2F68BA2F58BA2F58BA3F58C
+      A3F58DA4F58DA3F58DA4F58FA5F592A9F595ACF69AB1F69EB4F7A2B8F7A2B8F7
+      A1B7F79EB5F69BB1F698ADF596ABF496AAF496AAF497ABF497ABF498ACF499AC
+      F49AACF49AADF49BAEF49BAEF49CAFF49EB0F49EB0F39FB1F49FB1F3A1B2F3A1
+      B2F3A3B4F4A5B5F0B8B9BDB9B9B9B9B9B9BABABABABABABABABABBBBBBBBBBBB
+      BBBBBBBCBCBCBCBCBCBDBDBDBEBEBEBEBEBEBFBFBFBFBFBFC1C1C1C1C1C1C2C2
+      C2C2C2C2C3C3C3C3C3C3C4C4C4C6C6C6C6C6C6C7C7C7C8C8C8C8C8C8CACACACB
+      CBCBCCCCCCCCCCCCCDCDCDCECECECECECECFCFCFCFCFCFD1D1D1D2D2D2D2D2D2
+      D3D3D3D5D5D5D5D5D5D6D6D6D7D7D7D7D7D7D8D8D8D9D9D9D9DADAD9D9D9DADA
+      DADBDBDBDBDBDBDCDCDCDDDDDDDEDEDEDFDFDFDFDFDFE0E0E0E1E1E1E2E2E2E3
+      E3E3E4E4E4E5E5E5E5E5E5E5E5E5E6E6E6E7E7E7E8E8E8E8E8E8E8E8E8E9E9E9
+      EAEAEAEAEAEAEBEBEBEBEBEBECECECECECECEDEDEDEDEDEDEEEEEEEEEEEEEEEE
+      EEEEEEEEEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F2F2F2F1F1F1F1F1F1F2F2F2F1F1F1F2F2F2F1F1F1F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F4
+      F4F4F4F4F4F5F5F5F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7B0B0B0AEAEAEADADADAB
+      ABABAAAAAAA9A9A9A7A7A7A7A7A7A6A6A6A4A4A4A3A3A3A2A2A2A0A0A09F9F9F
+      9D9D9D9B9B9B9A9A9A98989896969696969694949493939395A3D096AEF696AE
+      F696ADF696ADF696ADF695ADF695ADF695ADF695ACF695ACF695ACF694ACF694
+      ACF694ABF694ABF693ABF693ABF693ABF693AAF693AAF693AAF692AAF692AAF6
+      92AAF692A9F692A9F691A9F691A9F691A9F691A9F691A8F690A8F690A8F690A8
+      F690A8F690A7F690A7F68FA7F68FA7F68FA7F68FA6F68FA6F68FA7F58EA6F68E
+      A6F68EA6F68EA6F68DA5F68DA5F68DA5F58DA5F68DA5F68DA5F68DA5F68DA5F6
+      8CA4F68CA4F68CA4F68CA4F68BA4F68BA3F68BA3F68BA3F68BA3F68BA3F68AA2
+      F68AA2F68AA2F68AA2F68AA2F689A2F689A2F689A1F689A1F689A1F688A1F688
+      A1F688A0F688A0F688A0F688A0F688A0F688A0F688A0F688A0F689A1F689A1F6
+      89A1F68AA1F68AA1F68AA2F68AA2F68BA2F68CA3F58CA3F58CA3F58DA4F68EA4
+      F68EA5F68FA5F68FA5F690A7F692A8F695ABF696ACF698AFF699AFF69AAEF698
+      ADF697ADF597ABF596ABF596AAF597ABF597ABF598ACF599ACF599ADF59AADF5
+      9BAEF49CAEF49CAFF49DAFF49EB0F49FB0F49FB1F4A1B2F4A1B2F4A2B3F4A3B4
+      F4A4B4F4ADB6D9B8B8B8B9B9B9B9B9B9BBBBBBBBBBBBBBBBBBBBBBBBBCBCBCBD
+      BDBDBDBDBDBEBEBEBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1C2C2C2C3C3C3C3C3C3
+      C4C4C4C4C4C4C5C5C5C6C6C6C7C7C7C8C8C8C8C8C8C9C9C9CACACACBCBCBCCCC
+      CCCCCCCCCDCDCDCECECECFCFCFD0D0D0D0D0D0D1D1D1D2D2D2D3D3D3D4D4D4D5
+      D5D5D5D5D5D7D7D7D7D7D7D8D8D8D8D8D8DADADADADADADADADADCDCDCDCDCDC
+      DDDDDDDEDEDEDEDEDEDFDFDFDFDFDFE0E0E0E1E1E1E2E2E2E2E2E2E3E3E3E4E4
+      E4E5E5E5E5E5E5E6E6E6E6E6E6E7E7E7E8E8E8E8E8E8E8E8E8EAEAEAEBEBEBEB
+      EBEBECECECECECECEDEDEDEDEDEDEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEF
+      F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F1
+      F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7B0B0B0AFAFAFAEAEAEACACACABAB
+      ABAAAAAAA9A9A9A8A8A8A7A7A7A6A6A6A5A5A5A3A3A3A2A2A2A0A0A09F9F9F9D
+      9D9D9C9C9C9A9A9A98989897979796969694949493949996A9E397AEF697AEF6
+      96AEF696AEF696AEF696ADF696ADF696ADF695ADF695ADF695ACF695ACF695AC
+      F694ACF694ACF694ACF694ABF694ABF693ABF693ABF693ABF693AAF693AAF693
+      AAF692AAF692AAF692AAF692A9F691A9F691A9F691A9F691A9F691A8F691A8F6
+      90A8F690A8F690A8F690A8F690A7F68FA7F68FA7F68FA7F68FA7F68FA6F68EA6
+      F68FA7F68EA6F68EA6F68EA6F68DA5F68EA6F78EA6F78DA5F78DA5F78DA5F78D
+      A5F78DA5F78CA4F78CA4F78CA4F78CA4F78CA4F78BA4F78BA3F78BA3F78BA3F7
+      8BA3F78BA3F78AA3F78AA2F78AA2F78AA2F78AA2F789A2F789A1F789A1F789A1
+      F789A1F788A1F788A1F789A1F688A1F689A1F689A1F68AA2F68AA1F68AA2F68B
+      A2F68AA2F68BA2F68CA3F68BA3F68CA3F68DA4F68CA3F68DA4F68EA5F68FA5F6
+      90A6F68FA5F690A6F691A7F692A8F693A9F695AAF696AAF696ABF695AAF696AA
+      F695AAF696AAF697ABF697ACF598ACF599ACF59AADF59AADF59BAEF59CAFF59D
+      AFF59EB0F59EB0F59EB1F59FB1F5A1B2F5A2B3F5A2B4F5A3B4F4A4B5F4A5B5F4
+      A5B6F4B3B7C7B8B8B8B9B9B9B9B9B9BABABABBBBBBBBBBBBBCBCBCBDBDBDBEBE
+      BEBFBFBFBFBFBFC0C0C0C0C0C0C1C1C1C2C2C2C3C3C3C3C3C3C5C5C5C5C5C5C6
+      C6C6C7C7C7C7C7C7C8C8C8C9C9C9C9C9C9CACACACBCBCBCCCCCCCDCDCDCDCDCD
+      CECECECFCFCFCFCFCFD1D1D1D1D1D1D2D2D2D3D3D3D3D3D3D4D4D4D5D5D5D6D6
+      D6D7D7D7D8D8D8D7D7D7D9D9D9DADADADADADADBDBDBDDDDDDDDDDDDDEDEDEDE
+      DEDEE0E0E0E0E0E0E1E1E1E1E1E1E2E2E2E3E3E3E3E3E3E4E4E4E5E5E5E6E6E6
+      E6E6E6E7E7E7E7E7E7E8E8E8E9E9E9E9E9E9EAEAEAEAEAEAEBEBEBECECECECEC
+      ECECECECEDEDEDEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7B2B2B2B1B1B1B0B0B0AFAFAFACACACABABAB
+      AAAAAAA9A9A9A8A8A8A7A7A7A5A5A5A5A5A5A3A3A3A2A2A2A0A0A09F9F9F9C9C
+      9C9B9B9B9999999898989797979696969595959599A697ADF197AFF797AFF797
+      AEF797AEF797AEF796AEF796AEF796AEF796ADF796ADF796ADF795ADF795ADF7
+      95ACF795ACF794ACF794ACF794ACF794ABF794ABF794ABF793ABF793ABF793AB
+      F793AAF793AAF792AAF792AAF792AAF792AAF792A9F791A9F791A9F791A9F791
+      A9F791A8F791A8F790A8F790A8F790A8F790A7F790A7F78FA7F78FA7F78FA7F7
+      8FA7F78EA6F78EA6F78EA6F78EA6F78EA6F78EA6F78EA6F78EA6F78EA6F78DA5
+      F78DA5F78DA5F78CA4F78CA4F78CA4F78CA4F78CA4F78BA3F78CA4F78BA3F78B
+      A3F78BA3F78BA3F78BA3F78AA3F78AA3F78AA2F78AA2F78AA2F789A2F789A2F7
+      89A1F789A1F789A2F789A1F78AA2F78AA1F78AA2F78BA3F78BA2F78BA3F78BA3
+      F78BA3F78CA4F78CA4F78DA4F78DA4F68DA4F68EA4F68FA5F68FA6F690A6F691
+      A7F691A7F691A7F691A7F693A8F794A9F694A9F694A9F696AAF695AAF696ABF6
+      97ABF697ABF698ACF698ACF59AADF69AADF59BAEF69DAFF69DB0F69DB0F69FB1
+      F69FB1F6A0B2F5A1B3F5A2B3F5A3B4F5A3B4F5A4B5F5A4B5F5A5B6F5A7B7F5AA
+      B8EDB7B8BCB9B9B9B9B9B9BABABABBBBBBBCBCBCBCBCBCBDBDBDBEBEBEBEBEBE
+      BFBFBFC0C0C0C0C0C0C2C2C2C2C2C2C3C3C3C3C3C3C4C4C4C5C5C5C7C7C7C7C7
+      C7C8C8C8C9C9C9C9C9C9CBCBCBCBCBCBCCCCCCCDCDCDCDCDCDCFCFCFCFCFCFD0
+      D0D0D1D1D1D1D1D1D2D2D2D3D3D3D4D4D4D4D4D4D6D6D6D6D6D6D7D7D7D8D8D8
+      D8D8D8D9D9D9DADADADBDBDBDBDBDBDCDCDCDDDDDDDDDDDDDEDEDEDFDFDFE0E0
+      E0E0E0E0E1E1E1E2E2E2E3E3E3E3E3E3E3E3E3E4E4E4E6E6E6E7E7E7E7E7E7E8
+      E8E8E7E7E7E9E9E9EAEAEAEAEAEAEBEBEBECECECECECECEDEDEDEDEDEDEDEDED
+      EEEEEEEEEEEEEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F6F6F6F5F5F5F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7B3B3B3B2B2B2B0B0B0AFAFAFAFAFAFACACACABABABAA
+      AAAAA9A9A9A8A8A8A6A6A6A5A5A5A4A4A4A2A2A2A1A1A1A0A0A09E9E9E9D9D9D
+      9A9A9A999999989898979797969696959595969FB998AFF798AFF798AFF797AF
+      F797AFF797AFF797AEF797AEF797AEF796AEF796AEF796ADF796ADF796ADF795
+      ADF795ADF795ADF795ACF795ACF794ACF794ACF794ACF794ABF794ABF794ABF7
+      93ABF793ABF793ABF793AAF792AAF792AAF792AAF792AAF792A9F792A9F791A9
+      F791A9F791A9F791A9F791A8F790A8F790A8F790A8F790A8F790A7F78FA7F78F
+      A7F78FA7F78FA7F78FA7F78FA7F88EA6F78EA6F78EA6F78EA6F78EA6F78DA5F7
+      8DA5F78DA5F88DA5F78DA5F88CA4F78DA5F88CA4F78CA4F78CA4F78BA3F78CA4
+      F88CA4F88BA4F88BA3F88BA3F88BA3F88BA3F88AA3F88AA2F88AA2F88AA2F88A
+      A2F88AA2F78AA2F78BA2F78AA2F78BA3F78BA3F78BA3F78CA3F78CA3F78CA4F7
+      8DA4F78EA5F78EA5F78EA5F78FA5F78FA5F78FA6F790A6F790A7F791A7F791A7
+      F792A7F792A8F793A9F794A9F695A9F695AAF696AAF697ABF698ACF797ABF697
+      ACF699ADF79AADF69BAEF69BAEF69CAFF69CB0F69EB0F69DB0F6A0B2F6A0B2F6
+      A1B3F6A2B4F6A2B4F6A3B5F6A4B5F6A5B6F6A5B6F6A7B7F6A8B8F6A9B8F6B2B8
+      CFB9B9B9BABABABBBBBBBBBBBBBCBCBCBDBDBDBDBDBDBEBEBEBFBFBFC0C0C0C1
+      C1C1C1C1C1C2C2C2C3C3C3C4C4C4C4C4C4C5C5C5C6C6C6C7C7C7C7C7C7C8C8C8
+      CACACACACACACBCBCBCBCBCBCCCCCCCDCDCDCECECECFCFCFD0D0D0D0D0D0D1D1
+      D1D2D2D2D2D2D2D3D3D3D5D5D5D6D6D6D7D7D7D7D7D7D8D8D8D9D9D9D9D9D9DA
+      DADADBDBDBDCDCDCDCDCDCDDDDDDDEDEDEDEDEDEDFDFDFE0E0E0E1E1E1E1E1E1
+      E2E2E2E3E3E3E4E4E4E4E4E4E5E5E5E5E5E5E6E6E6E7E7E7E7E7E7E8E8E8E8E8
+      E8EAEAEAEAEAEAEAEAEAEBEBEBECECECECECECEDEDEDEDEDEDEDEDEDEEEEEEEF
+      EFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4
+      F4F4F4F4F4F4F4F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F4F4F4F5F5F5F4F4F4F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7B5B5B5B3B3B3B2B2B2B1B1B1AFAFAFAEAEAEACACACABABABAAAA
+      AAA9A9A9A8A8A8A7A7A7A6A6A6A4A4A4A3A3A3A1A1A19F9F9F9E9E9E9C9C9C9B
+      9B9B9A9A9A98989897979796969695959596A4CB99B0F898AFF798B0F898AFF8
+      98AFF898AFF897AFF897AFF897AFF897AEF897AEF897AEF896AEF896AEF896AD
+      F896ADF895ADF895ADF895ADF895ACF895ADF795ACF894ACF894ACF894ACF894
+      ABF894ABF893ABF893ABF893ABF893ABF893AAF892AAF892AAF892AAF892AAF8
+      92A9F892A9F891A9F891A9F891A9F891A8F891A8F890A8F890A8F890A8F890A8
+      F88FA7F88FA7F88FA7F88FA7F88FA7F88FA7F88EA6F88EA6F88EA6F88EA6F88E
+      A6F88DA5F88DA5F88DA5F88DA5F88DA5F88CA5F88CA4F88CA4F88CA4F88CA4F8
+      8CA4F88BA4F88CA4F88BA4F88BA4F88BA3F88BA3F88BA3F88AA3F88AA3F88BA3
+      F88BA3F88BA3F88CA4F88CA4F88CA4F88CA4F88DA4F88DA4F88DA4F88EA5F88E
+      A5F88EA5F88FA6F88FA6F78FA6F790A7F791A7F791A7F792A8F793A8F793A8F7
+      93A9F794A9F794AAF795AAF796ABF796ABF797ACF798ACF798ACF799ADF79AAE
+      F79AADF79CAFF69BAFF69CAFF69DB0F69EB1F69FB1F6A0B2F6A0B3F6A1B3F6A2
+      B4F6A3B4F6A3B5F6A4B5F6A5B6F6A6B7F6A7B8F6A8B8F6AAB9F2B7B8BCB9B9B9
+      BABABABCBCBCBCBCBCBCBCBCBDBDBDBEBEBEC0C0C0C0C0C0C1C1C1C2C2C2C2C2
+      C2C3C3C3C4C4C4C5C5C5C6C6C6C6C6C6C7C7C7C8C8C8C9C9C9CACACACACACACB
+      CBCBCCCCCCCCCCCCCECECECECECECFCFCFD0D0D0D0D0D0D1D1D1D2D2D2D2D2D2
+      D3D3D3D4D4D4D5D5D5D6D6D6D7D7D7D7D7D7D8D8D8D9D9D9DADADADADADADBDB
+      DBDCDCDCDCDCDCDDDDDDDEDEDEDFDFDFDFDFDFE0E0E0E1E1E1E1E1E1E3E3E3E3
+      E3E3E5E5E5E4E4E4E6E6E6E6E6E6E8E8E8E7E7E7E8E8E8E8E8E8E9E9E9EBEBEB
+      EBEBEBEBEBEBECECECEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFF0F0F0F0F0
+      F0F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F3F3F3F4F4
+      F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7B6B6B6B5B5B5B4B4B4B2B2B2B0B0B0AFAFAFAEAEAEADADADABABABAAAAAA
+      A9A9A9A8A8A8A7A7A7A5A5A5A4A4A4A2A2A2A1A1A19F9F9F9E9E9E9C9C9C9B9B
+      9B9A9A9A98989898989897979796969698A8D999B0F899B0F899B0F898B0F898
+      B0F898B0F898AFF898AFF898AFF897AFF897AFF897AEF897AEF897AEF896AEF8
+      96AEF896AEF896ADF896ADF895ADF895ADF895ADF895ACF895ACF895ACF894AC
+      F894ACF894ACF894ABF893ABF893ABF893ABF893ABF893AAF893AAF892AAF892
+      AAF892AAF892AAF892A9F891A9F891A9F891A9F891A9F891A8F890A8F890A8F8
+      90A8F890A8F890A8F88FA7F88FA7F88FA7F88FA7F88FA7F88FA7F88EA6F88EA6
+      F88EA6F88EA6F88DA6F88DA5F88DA5F88DA5F88DA5F88DA5F88CA4F88CA4F88C
+      A4F88CA4F88CA4F88BA4F88BA4F88BA3F88BA3F88BA3F88BA3F88BA3F88BA3F8
+      8BA3F88BA3F88DA4F88CA4F88CA4F88DA5F88DA5F88EA5F88EA6F88FA6F890A6
+      F890A6F890A7F891A7F891A7F892A8F892A8F893A9F893A9F893A9F895AAF894
+      AAF895AAF896ABF897ABF897ACF798ADF799ADF799ADF79AAEF79BAEF79BAFF7
+      9CAFF79DB0F79DB1F79EB1F79FB2F7A0B2F7A1B3F7A1B3F7A2B4F7A3B4F7A4B6
+      F7A4B6F7A5B6F6A6B7F6A7B8F6A8B8F6A9B9F6B0B8D7B8B8B8B9B9B9BABABABB
+      BBBBBCBCBCBDBDBDBDBDBDBFBFBFC0C0C0C0C0C0C1C1C1C2C2C2C2C2C2C3C3C3
+      C5C5C5C5C5C5C6C6C6C6C6C6C7C7C7C9C9C9C9C9C9CACACACBCBCBCBCBCBCCCC
+      CCCCCCCCCFCFCFCFCFCFD0D0D0D1D1D1D1D1D1D2D2D2D3D3D3D3D3D3D5D5D5D6
+      D6D6D6D6D6D7D7D7D8D8D8D8D8D8D9D9D9DADADADADADADBDBDBDCDCDCDDDDDD
+      DDDDDDDEDEDEDFDFDFE0E0E0E0E0E0E2E2E2E2E2E2E3E3E3E3E3E3E4E4E4E5E5
+      E5E5E5E5E6E6E6E7E7E7E8E8E8E8E8E8E9E9E9E9E9E9EAEAEAEBEBEBEBEBEBEB
+      EBEBECECECEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEFEFEFF0F0F0F0F0F0F1F1F1
+      F1F1F1F1F1F1F3F3F3F2F2F2F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F6F6F6F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7B8B8
+      B8B6B6B6B5B5B5B4B4B4B2B2B2B0B0B0AFAFAFAFAFAFACACACABABABAAAAAAA9
+      A9A9A7A7A7A7A7A7A6A6A6A4A4A4A3A3A3A1A1A1A0A0A09E9E9E9C9C9C9B9B9B
+      9A9A9A98989897979797979796979C99ACE69AB1F999B0F899B1F999B0F998B0
+      F898B0F898AFF898B0F998AFF898AFF998AFF997AEF897AEF897AEF897AEF996
+      AEF896AEF996AEF996ADF896ADF996ADF995ADF895ACF895ADF995ADF995ACF9
+      95ACF994ACF994ACF994ACF994ACF994ABF993ABF993ABF993ABF993ABF993AA
+      F993AAF992AAF992AAF992AAF992A9F992A9F991A9F991A9F991A9F991A9F990
+      A8F990A8F990A8F990A8F990A8F990A8F98FA7F98FA7F98FA7F98FA7F98FA7F9
+      8EA6F98EA6F98EA6F98EA6F98EA6F98DA6F98DA5F98DA5F98DA5F98DA5F98DA5
+      F98CA5F98CA4F98CA4F98CA4F98CA4F98BA4F98CA4F88BA4F88CA4F88CA4F88D
+      A5F88DA5F88DA5F88EA5F88EA5F88EA5F88FA6F88FA6F88FA6F890A7F890A6F8
+      90A7F892A8F992A8F892A8F892A8F893A9F894A9F894AAF895AAF895AAF895AA
+      F896ABF897ACF898ADF899ADF899ADF799ADF79AAEF79BAEF79CB0F89CB0F79E
+      B1F89EB1F89FB2F8A0B2F8A0B3F7A1B4F7A2B4F7A3B5F7A3B5F7A4B6F7A6B7F7
+      A7B8F7A7B8F7A8B9F7A9B9F7A9BAF7B6B8C0B9B9B9BABABABBBBBBBCBCBCBDBD
+      BDBDBDBDBFBFBFC0C0C0C0C0C0C1C1C1C2C2C2C2C2C2C3C3C3C5C5C5C6C6C6C6
+      C6C6C7C7C7C7C7C7C8C8C8C9C9C9CACACACBCBCBCCCCCCCCCCCCCDCDCDCECECE
+      CFCFCFCFCFCFD0D0D0D1D1D1D1D1D1D3D3D3D4D4D4D4D4D4D5D5D5D6D6D6D6D6
+      D6D7D7D7D8D8D8D8D8D8D9D9D9DADADADBDBDBDBDBDBDEDEDEDDDDDDDEDEDEDE
+      DEDEE0E0E0E0E0E0E0E0E0E2E2E2E2E2E2E2E2E2E3E3E3E5E5E5E5E5E5E6E6E6
+      E7E7E7E8E8E8E8E8E8E9E9E9EAEAEAEAEAEAEBEBEBECECECECECECECECECEDED
+      EDEEEEEEEEEEEEEFEFEFEFEFEFF0F0F0F0F0F0F1F1F1F1F1F1F2F2F2F2F2F2F2
+      F2F2F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F6F6F6F6F6F6F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7B9B9B9B8B8B8
+      B6B6B6B5B5B5B4B4B4B2B2B2B1B1B1AFAFAFAEAEAEACACACABABABAAAAAAA9A9
+      A9A8A8A8A7A7A7A5A5A5A4A4A4A2A2A2A1A1A1A0A0A09E9E9E9C9C9C9B9B9B9A
+      9A9A999999989898979797979AA39AB0F39AB1F999B1F999B1F999B0F999B0F9
+      99B0F998B0F998B0F998B0F998AFF998AFF998AFF998AFF997AFF997AEF997AF
+      F997AFF997AEF996AEF996ADF996ADF996ADF996ADF995ADF996ADF995ADF895
+      ADF995ADF995ACF994ACF994ACF994ABF994ACF993ABF994ABF993ABF993AAF9
+      93ABF993ABF993AAF992AAF992AAF992AAF992AAF992A9F991A9F991A9F991A9
+      F991A9F991A9F990A8F990A8F990A8F990A8F990A8F990A8F98FA7F98FA7F98F
+      A7F98FA7F98EA7F98EA6F98EA6F98EA6F98EA6F98EA6F98DA5F98DA5F98DA5F9
+      8DA5F98DA5F98CA5F98CA5F98CA4F98CA5F98CA4F98DA5F98DA5F98EA5F98DA5
+      F98EA6F98FA6F98EA6F98FA6F98FA7F990A7F990A7F991A7F991A8F991A8F992
+      A8F993A9F893A9F893A9F894AAF894AAF895ABF895ABF895ABF897ACF897ACF8
+      98ACF898ADF899ADF89AAEF89AAEF89BAFF89CAFF89CB0F89DB0F89EB1F89EB1
+      F89FB2F8A1B3F7A1B3F7A1B4F7A2B4F7A4B5F7A4B6F7A5B7F7A6B7F7A7B8F7A8
+      B9F8A8B9F7AABBF8B0BADFB8B8B8B9B9B9BABABABBBBBBBCBCBCBDBDBDBEBEBE
+      C0C0C0C0C0C0C0C0C0C1C1C1C2C2C2C3C3C3C5C5C5C5C5C5C6C6C6C7C7C7C8C8
+      C8C8C8C8CACACACACACACBCBCBCCCCCCCDCDCDCECECECECECECFCFCFD0D0D0D0
+      D0D0D1D1D1D2D2D2D3D3D3D4D4D4D4D4D4D5D5D5D6D6D6D7D7D7D7D7D7D8D8D8
+      D9D9D9D9D9D9DBDBDBDBDBDBDCDCDCDDDDDDDEDEDEDEDEDEDFDFDFE0E0E0E0E0
+      E0E1E1E1E2E2E2E3E3E3E3E3E3E4E4E4E5E5E5E5E5E5E6E6E6E6E6E6E7E7E7E8
+      E8E8E8E8E8E9E9E9E9E9E9EAEAEAEBEBEBECECECECECECEDEDEDEDEDEDEEEEEE
+      EFEFEFEFEFEFEFEFEFF0F0F0F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F3F3
+      F3F3F3F3F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F4F4F4F4F4F4F5F5F5F5F5F5F4
+      F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F6F6F6F5F5F5F5F5F5F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7BBBBBBB9B9B9B8B8B8B6
+      B6B6B5B5B5B4B4B4B2B2B2B1B1B1AFAFAFAEAEAEACACACABABABAAAAAAA9A9A9
+      A8A8A8A7A7A7A5A5A5A4A4A4A2A2A2A1A1A1A0A0A09E9E9E9D9D9D9C9C9C9A9A
+      9A999999989898989898989CAA9AB0F39AB1F99AB1F99AB1F999B1F999B1F999
+      B1F999B0F999B0F999B0F998B0F998B0F998AFF998AFF998AFF997AFF997AFF9
+      97AFF997AEF997AEF996AEF996AEF996AEF996ADF996ADF996ADF995ADF995AD
+      F995ADF995ACF994ACF994ACF994ACF994ACF994ACF994ABF993ABF993ABF993
+      ABF993ABF993ABF992AAF992AAF992AAF992AAF992A9F991A9F991A9F991A9FA
+      91A9F991A9F990A8F990A8F991A9FA90A8FA90A8FA90A8FA8FA7F98FA7F98FA7
+      F98FA7F98FA7FA8EA6F98EA6F98EA6F98EA6F98EA6FA8DA5F98DA5F98DA5F98D
+      A5F98DA5F98CA5F98DA5F98DA5F98DA5F98DA5F98DA5F98EA6F98EA6F98EA6F9
+      8FA7F98FA6F990A7F990A7F991A8F991A8F992A8F992A9F992A9F992A9F993A9
+      F994AAF994AAF995ABF995ABF996ABF996ACF997ACF998ADF999ADF998ADF99A
+      AEF999AEF99BAFF89BAFF89CB0F89CB0F89DB1F89EB1F89FB2F89FB2F8A1B3F8
+      A1B3F8A1B4F8A3B5F8A4B6F8A4B6F8A5B7F8A6B7F8A7B8F8A8B8F8A8B9F8A9BA
+      F8AABBF8B5B7BFB9B9B9BABABABABABABBBBBBBDBDBDBEBEBEBEBEBEC0C0C0C0
+      C0C0C1C1C1C2C2C2C3C3C3C4C4C4C5C5C5C6C6C6C7C7C7C7C7C7C9C9C9C9C9C9
+      CACACACBCBCBCBCBCBCCCCCCCDCDCDCECECECFCFCFCFCFCFD0D0D0D1D1D1D2D2
+      D2D3D3D3D3D3D3D4D4D4D5D5D5D5D5D5D6D6D6D7D7D7D8D8D8DADADADADADADB
+      DBDBDBDBDBDCDCDCDDDDDDDDDDDDDEDEDEDFDFDFDFDFDFE0E0E0E1E1E1E1E1E1
+      E2E2E2E3E3E3E4E4E4E5E5E5E6E6E6E6E6E6E7E7E7E8E8E8E9E9E9E9E9E9E9E9
+      E9EAEAEAEBEBEBECECECECECECECECECEDEDEDEEEEEEEFEFEFEFEFEFF0F0F0F0
+      F0F0F0F0F0F1F1F1F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F6F6F6F6F6F6F6F6F6F5F5F5
+      F6F6F6F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F6F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7BCBCBCBBBBBBBABABAB8B8B8B6B6
+      B6B5B5B5B4B4B4B2B2B2B1B1B1B0B0B0AEAEAEADADADACACACABABABAAAAAAA8
+      A8A8A7A7A7A6A6A6A4A4A4A3A3A3A1A1A1A0A0A09F9F9F9D9D9D9C9C9C9B9B9B
+      9A9A9A99999998989899A0B69BB2FA9BB2FA9AB2FA9AB2FA9AB1FA9AB1FA9AB1
+      FA99B1FA99B1FA99B1FA99B0FA99B0FA99B0FA98B0FA98B0FA98AFFA98AFFA97
+      AFFA97AFFA97AFFA97AEFA97AEFA97AEFA96AEFA96AEFA96AEFA96ADFA96ADFA
+      95ADFA95ADFA95ADFA95ADFA95ACFA94ACFA94ACFA94ACFA94ACFA94ABFA94AB
+      FA93ABFA93ABFA93ABFA93AAFA93AAFA92AAFA92AAFA92AAFA92AAFA91A9FA91
+      A9FA91A9FA91A9FA91A9FA91A9FA90A8FA90A8FA90A8FA90A8FA90A8FA8FA7FA
+      8FA7FA8FA7FA8FA7FA8FA7FA8EA7FA8EA6FA8EA6FA8EA6FA8EA6FA8EA6FA8DA6
+      FA8DA5FA8DA6F98DA6F98DA5F98EA6F98EA5F98EA6F98FA7F98FA6F98FA7F98F
+      A7F990A7F990A8F991A8F991A8F992A8F992A9F992A9F993A9F993A9F994ABFA
+      95ABF994AAF997ACF996ACF996ACF998ADF998ADF999ADF999AEF99AAEF99AAE
+      F99AAFF99CB0F89DB1F99EB2F99EB1F89FB2F8A0B3F9A0B3F8A1B4F8A2B4F8A3
+      B5F9A4B6F9A5B6F9A5B7F9A6B8F9A7B8F8A7B9F8A9BAF8AABAF8ABBBF8B0BAE0
+      B8B8B8B9B9B9BABABABBBBBBBCBCBCBEBEBEBFBFBFC0C0C0C0C0C0C1C1C1C2C2
+      C2C3C3C3C4C4C4C5C5C5C6C6C6C6C6C6C7C7C7C9C9C9CACACACACACACBCBCBCC
+      CCCCCDCDCDCECECECFCFCFCFCFCFD0D0D0D1D1D1D1D1D1D2D2D2D3D3D3D4D4D4
+      D4D4D4D5D5D5D6D6D6D6D6D6D7D7D7D8D8D8D9D9D9DADADADADADADBDBDBDCDC
+      DCDCDCDCDDDDDDDEDEDEDEDEDEDFDFDFE0E0E0E1E1E1E1E1E1E2E2E2E3E3E3E4
+      E4E4E4E4E4E5E5E5E6E6E6E6E6E6E7E7E7E8E8E8E8E8E8E9E9E9E9E9E9EAEAEA
+      EBEBEBECECECEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEFEFEFF0F0F0F0F0F0F0F0
+      F0F1F1F1F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F5
+      F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7BDBDBDBCBCBCBABABAB9B9B9B8B8B8B6B6B6
+      B5B5B5B4B4B4B2B2B2B1B1B1AFAFAFAEAEAEADADADACACACABABABAAAAAAA8A8
+      A8A7A7A7A6A6A6A5A5A5A3A3A3A1A1A1A0A0A09F9F9F9D9D9D9C9C9C9B9B9B9A
+      9A9A9999999999999AA2BD9BB2FA9BB2FA9BB2FA9BB2FA9AB2FA9AB2FA9AB2FA
+      9AB1FA9AB1FA9AB1FA99B1FA99B1FA99B0FA99B0FA99B0FA98B0FA98B0FA98B0
+      FA98AFFA98AFFA97AEFA97AFFA97AFFA97AEFA97AEFA97AEFA96AEFA96AEFA96
+      AEFA96ADFA95ADFA95ADFA95ADFA95ADFA95ACFA95ACFA94ACFA94ACFA94ACFA
+      94ACFA94ABFA93ABFA93ABFA93ABFA93ABFA93AAFA92AAFA92AAFA92AAFA92AA
+      FA92AAFA91A9FA91A9FA91A9FA91A9FA91A9FA91A9FA90A8FA90A8FA90A8FA90
+      A8FA8FA8FA8FA7FA8FA7FA8FA7FA8FA7FA8FA7FA8EA6FA8EA6FA8EA6FA8EA6FA
+      8EA6FA8EA6FA8EA6FA8FA6FA8EA6FA8FA7FA8FA7FA8FA7FA90A7FA91A8FA91A8
+      FA91A8FA92A9FA92A8FA92A9FA93AAFA94AAFA93AAFA94AAFA94ABFA95ABF996
+      ACF997ACF997ACF997ADF998ADF999AEF999AEF99AAFF99BAFF99BAFF99CB0F9
+      9DB1F99DB1F99EB2F99FB2F9A0B3F9A0B3F9A1B4F9A2B4F9A2B5F9A3B5F9A4B6
+      F9A5B7F9A5B7F9A6B8F9A7B8F8A9B9F8A9BAF8AABBF8ABBBF8B4B8C7B8B8B8B9
+      B9B9BBBBBBBCBCBCBDBDBDBEBEBEBFBFBFC0C0C0C1C1C1C2C2C2C3C3C3C3C3C3
+      C4C4C4C5C5C5C6C6C6C8C8C8C8C8C8C9C9C9CACACACBCBCBCCCCCCCCCCCCCDCD
+      CDCECECECFCFCFD0D0D0D0D0D0D2D2D2D2D2D2D3D3D3D3D3D3D4D4D4D5D5D5D5
+      D5D5D7D7D7D7D7D7D8D8D8D8D8D8D9D9D9DADADADADADADBDBDBDCDCDCDCDCDC
+      DDDDDDDEDEDEDFDFDFDFDFDFE1E1E1E1E1E1E1E1E1E2E2E2E3E3E3E4E4E4E4E4
+      E4E5E5E5E6E6E6E7E7E7E8E8E8E9E9E9EAEAEAEAEAEAEAEAEAEBEBEBECECECED
+      EDEDEDEDEDEEEEEEEEEEEEEFEFEFF0F0F0F0F0F0F1F1F1F1F1F1F2F2F2F2F2F2
+      F3F3F3F2F2F2F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7BEBEBEBDBDBDBCBCBCBBBBBBB9B9B9B8B8B8B6B6B6B5
+      B5B5B4B4B4B2B2B2B1B1B1AFAFAFAEAEAEADADADACACACABABABAAAAAAA8A8A8
+      A7A7A7A6A6A6A4A4A4A3A3A3A1A1A1A0A0A09F9F9F9D9D9D9C9C9C9B9B9B9A9A
+      9A9999999898989AA2BD9BB3FA9BB2FA9BB2FA9BB2FA9AB2FA9AB2FA9AB2FA9A
+      B1FA9AB1FA9AB1FA99B1FA99B1FA99B0FA99B0FA99B0FA98B0FA98B0FA98B0FA
+      98AFFA98AFFA97AFFA97AFFA97AFFA97AEFA97AEFA97AEFA96AEFA96AEFA96AE
+      FA96ADFA95ADFA95ADFA95ADFA95ADFA95ACFA95ACFA94ACFA94ACFA94ACFA94
+      ACFA94ABFA93ABFA93ABFA94ABFB93ABFB93AAFA93ABFB92AAFA92AAFA92AAFB
+      92AAFA92AAFB92AAFB92AAFB91A9FB91A9FA91A9FB91A9FB90A8FA90A8FA90A8
+      FB90A8FB90A8FB8FA7FA8FA8FB8FA7FA8FA7FA8FA7FB8FA7FB8EA6FA8FA7FA8E
+      A6FA8FA7FA8FA7FA90A8FA8FA7FA90A7FA8FA7FA91A8FA91A8FA92A9FA91A9FA
+      92A9FA93A9FA93A9FA93AAFA94AAFA95AAFA95ABFA95ACFA95ABF996ACF998AD
+      FA97ACF998ADFA98ADF999AEFA9AAEF99AAFF99BAFF99CB0F99CB0F99EB1FA9D
+      B1F99FB2FAA0B3FAA0B3F9A1B4F9A2B5F9A2B5F9A3B6F9A4B6F9A5B7F9A6B7F9
+      A6B8F9A8B9F9A8BAF9A9BAF9AABBF9ABBBF9AFBBE8B8B8B8B9B9B9BBBBBBBCBC
+      BCBCBCBCBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1C3C3C3C4C4C4C4C4C4C5C5C5C7
+      C7C7C8C8C8C8C8C8C9C9C9CACACACBCBCBCCCCCCCDCDCDCDCDCDCFCFCFD0D0D0
+      D0D0D0D1D1D1D2D2D2D3D3D3D4D4D4D4D4D4D5D5D5D5D5D5D6D6D6D7D7D7D8D8
+      D8D8D8D8D9D9D9D9D9D9DADADADBDBDBDBDBDBDCDCDCDDDDDDDDDDDDDEDEDEDF
+      DFDFDFDFDFE0E0E0E2E2E2E2E2E2E2E2E2E4E4E4E5E5E5E5E5E5E5E5E5E6E6E6
+      E7E7E7E7E7E7E8E8E8E9E9E9EAEAEAEAEAEAEAEAEAECECECECECECEDEDEDEDED
+      EDEEEEEEEFEFEFEFEFEFF0F0F0F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F3F3F3F3
+      F3F3F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F7F7F7
+      F6F6F6F7F7F7F7F7F7F6F6F6F7F7F7F7F7F7F6F6F6F7F7F7F6F6F6F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7BFBFBFBEBEBEBEBEBEBCBCBCBBBBBBBABABAB9B9B9B7B7B7B5B5
+      B5B4B4B4B2B2B2B1B1B1B0B0B0AEAEAEADADADACACACABABABAAAAAAA8A8A8A7
+      A7A7A6A6A6A5A5A5A3A3A3A2A2A2A0A0A09F9F9F9E9E9E9C9C9C9C9C9C9A9A9A
+      9999999999999AA2BD9CB3FB9CB3FB9BB3FB9BB3FB9BB2FB9BB2FB9BB2FB9AB2
+      FB9AB2FB9AB2FB9AB1FB9AB1FB9AB1FB99B1FB99B1FB99B0FB99B0FB98B0FB98
+      B0FB98B0FB98AFFB98AFFB98AFFB97AFFB97AFFB97AFFB97AEFB97AEFB96AEFB
+      96AEFB96AEFB96AEFB96ADFB95ADFB95ADFB95ADFB95ADFB95ACFB95ACFB94AC
+      FB94ACFB94ACFB94ABFB94ABFB93ABFB93ABFB93ABFB93ABFB92AAFB92AAFB92
+      AAFB92AAFB92AAFB92AAFB91A9FB91A9FB91A9FB91A9FB91A9FB90A8FB90A8FB
+      90A8FB90A8FB90A8FB8FA8FB8FA7FB8FA7FB8FA7FB8FA7FB8FA7FA8FA7FA8FA7
+      FA8FA7FA90A8FA91A8FA90A8FA90A8FA91A8FA92A9FA92A9FA92A9FA93AAFA94
+      AAFA93AAFA94AAFA94ABFA95ABFA95ABFA95ACFA96ACFA97ACFA98ADFA98ADFA
+      98ADFA99AEFA9AAFFA9AAFFA9BB0FA9BB0FA9CB0FA9DB1FA9EB1FA9EB2FA9FB3
+      FAA0B3FAA1B4F9A1B4F9A2B5F9A3B5F9A3B6F9A4B6F9A5B7F9A6B8F9A7B9F9A8
+      B9F9A8B9F9A9BAF9AABBF9ABBBF9B4B8C8B8B8B8BABABABBBBBBBCBCBCBDBDBD
+      BEBEBEBFBFBFC0C0C0C1C1C1C2C2C2C3C3C3C4C4C4C4C4C4C5C5C5C6C6C6C8C8
+      C8C9C9C9CACACACACACACCCCCCCDCDCDCECECECECECECFCFCFD0D0D0D1D1D1D1
+      D1D1D3D3D3D3D3D3D4D4D4D4D4D4D5D5D5D6D6D6D6D6D6D7D7D7D8D8D8D8D8D8
+      D9D9D9DADADADADADADBDBDBDCDCDCDCDCDCDDDDDDDEDEDEDEDEDEE0E0E0E0E0
+      E0E1E1E1E2E2E2E2E2E2E3E3E3E4E4E4E5E5E5E5E5E5E6E6E6E7E7E7E7E7E7E7
+      E7E7E8E8E8E9E9E9EAEAEAEAEAEAEBEBEBEBEBEBEDEDEDEDEDEDEEEEEEEEEEEE
+      EFEFEFEFEFEFF0F0F0F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F3F3F3F4F4F4F4F4
+      F4F4F4F4F4F4F4F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7
+      F7F7F6F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F6F6F6F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7}
+  end
+  object Bevel2: TBevel
+    Left = 0
+    Top = 64
+    Width = 500
+    Height = 2
+    Align = alTop
+    Shape = bsTopLine
+  end
+  object Bevel3: TBevel
+    Left = 0
+    Top = 309
+    Width = 500
+    Height = 2
+    Align = alBottom
+    Shape = bsTopLine
+  end
+  object lbl_Caption: TLabel
+    Left = 5
+    Top = 72
+    Width = 161
+    Height = 13
+    Caption = 'Select Ancestor Type for %s'
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWindowText
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    Font.Style = [fsBold]
+    ParentFont = False
+  end
+  object Label2: TLabel
+    Left = 24
+    Top = 92
+    Width = 333
+    Height = 13
+    Caption = 
+      'Select the class to use as ancestor for your RemObjects SDK Serv' +
+      'ice:'
+  end
+  object rgClassType: TRadioGroup
+    Left = 24
+    Top = 112
+    Width = 471
+    Height = 132
+    Anchors = [akLeft, akTop, akRight, akBottom]
+    Caption = ' Available Types '
+    Items.Strings = (
+      '1'
+      '2'
+      '3'
+      '4'
+      '5'
+      '6')
+    TabOrder = 0
+    OnClick = rgClassTypeClick
+  end
+  object GroupBox1: TPanel
+    Left = 24
+    Top = 249
+    Width = 471
+    Height = 55
+    Anchors = [akLeft, akRight, akBottom]
+    BevelOuter = bvLowered
+    Color = clInfoBk
+    TabOrder = 1
+    DesignSize = (
+      471
+      55)
+    object lbDescription: TLabel
+      Left = 5
+      Top = 5
+      Width = 461
+      Height = 43
+      Anchors = [akLeft, akTop, akRight, akBottom]
+      AutoSize = False
+      Caption = 'Test description goes right here...'
+      WordWrap = True
+    end
+  end
+  object Panel1: TPanel
+    Left = 0
+    Top = 311
+    Width = 500
+    Height = 35
+    Align = alBottom
+    BevelOuter = bvNone
+    TabOrder = 2
+    DesignSize = (
+      500
+      35)
+    object btn_Ok: TBitBtn
+      Left = 341
+      Top = 5
+      Width = 75
+      Height = 25
+      Anchors = [akRight, akBottom]
+      Caption = 'OK'
+      Default = True
+      ModalResult = 1
+      TabOrder = 0
+      Glyph.Data = {
+        36060000424D3606000000000000360000002800000020000000100000000100
+        18000000000000060000C40E0000C40E00000000000000000000FF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FF006600006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565656565FF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FF0066001EB2311FB133006600FF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6565659A9A9A9A9A9A65
+        6565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FF00660031C24F22B7381AB02D21B437006600FF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565ABABAB9E9E9E9797979C
+        9C9C656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        00660047D36D3BCB5E25A83B0066001BA92E1DB132006600FF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FF656565BFBFBFB5B5B598989865656594
+        9494999999656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF006600
+        4FD67953DE7F31B54D006600FF00FF006600179D271EAE31006600FF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FF656565C4C4C4CACACAA5A5A5656565FF00FF65
+        65658C8C8C989898656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        00660041C563006600FF00FFFF00FFFF00FFFF00FF00660019AA2B006600FF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FF656565B5B5B5656565FF00FFFF00FFFF
+        00FFFF00FF656565939393656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FF006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF006600149D210066
+        00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565FF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FF6565658A8A8A656565FF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0066
+        00006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FF656565656565FF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FF006600006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565656565FF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
+      NumGlyphs = 2
+    end
+    object Button2: TBitBtn
+      Left = 420
+      Top = 5
+      Width = 75
+      Height = 25
+      Anchors = [akRight, akBottom]
+      Cancel = True
+      Caption = 'Cancel'
+      ModalResult = 2
+      TabOrder = 1
+      Glyph.Data = {
+        36060000424D3606000000000000360000002800000020000000100000000100
+        18000000000000060000C40E0000C40E00000000000000000000FF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A00009AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00009A0000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        00009A174AFD103BF400009AFF00FFFF00FFFF00FFFF00FF00009A002CF80030
+        FC00009AFF00FFFF00FFFF00FFFF00FF6B6B6BA8A8A8A0A0A06B6B6BFF00FFFF
+        00FFFF00FFFF00FF6B6B6B9A9A9A9C9C9C6B6B6BFF00FFFF00FFFF00FFFF00FF
+        00009A1A47F81A4CFF123BF100009AFF00FFFF00FF00009A012DF60132FF002A
+        F300009AFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7AAAAAA9F9F9F6B6B6BFF
+        00FFFF00FF6B6B6B9999999E9E9E9797976B6B6BFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A1C47F61B4DFF143EF400009A00009A002DF80134FF032BF20000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7ABABABA2A2A26B
+        6B6B6B6B6B9A9A9A9E9E9E9898986B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FF00009A1D48F61D50FF103DFB0431FE0132FF002CF600009AFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7ACACACA3
+        A3A39F9F9F9E9E9E9999996B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FF00009A1A48F91342FF0C3CFF0733F600009AFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7A7
+        A7A7A3A3A39C9C9C6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FF00009A214EFC1D4BFF1847FF1743F600009AFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BACACACAC
+        ACACA9A9A9A4A4A46B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FF00009A2E5BF92C5FFF224DF8204BF82355FF1B46F600009AFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BB1B1B1B3B3B3AB
+        ABABAAAAAAAFAFAFA6A6A66B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A3664FA386BFF2D59F400009A00009A224CF42558FF1D49F60000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BB6B6B6B9B9B9AEAEAE6B
+        6B6B6B6B6BA9A9A9B0B0B0A7A7A76B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        00009A4071FA4274FF325DF100009AFF00FFFF00FF00009A224DF1275AFF204C
+        F800009AFF00FFFF00FFFF00FFFF00FF6B6B6BBBBBBBBEBEBEAFAFAF6B6B6BFF
+        00FFFF00FF6B6B6BA7A7A7B1B1B1AAAAAA6B6B6BFF00FFFF00FFFF00FFFF00FF
+        00009A497AFC3B66F300009AFF00FFFF00FFFF00FFFF00FF00009A2550F42655
+        FA00009AFF00FFFF00FFFF00FFFF00FF6B6B6BC0C0C0B5B5B56B6B6BFF00FFFF
+        00FFFF00FFFF00FF6B6B6BAAAAAAAEAEAE6B6B6BFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A00009AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00009A0000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
+      NumGlyphs = 2
+    end
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fROServerClassForm.lfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fROServerClassForm.lfm
new file mode 100644
index 0000000..381d274
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fROServerClassForm.lfm	
@@ -0,0 +1,3253 @@
+object ROServerClassForm: TROServerClassForm
+  Left = 381
+  Height = 293
+  Top = 239
+  Width = 500
+  HorzScrollBar.Page = 499
+  VertScrollBar.Page = 292
+  ActiveControl = rgClassType
+  BorderIcons = []
+  BorderStyle = bsSingle
+  Caption = 'Select Ancestor Type for %s'
+  ClientHeight = 293
+  ClientWidth = 500
+  Font.Height = -11
+  Font.Name = 'Tahoma'
+  OnCreate = FormCreate
+  Position = poScreenCenter
+  object Image2: TImage
+    Height = 64
+    Width = 500
+    Align = alTop
+    AutoSize = True
+    Picture.Data = {
+      07544269746D617036770100424D36770100000000003600000028000000F401
+      000040000000010018000000000000770100C01E0000C01E0000000000000000
+      0000858585858585858585858585858585858585858585858585858585858585
+      8585858484848484848484848484848484848484848484848484848484848484
+      8484848483838383838383838383838383838383838383838383838383838383
+      8383838383838383838383828282828282828282828282828282828282828282
+      8282828282828282828282828181818181818181818181818181818181818181
+      8181818181818181818181818181818180808081818181818180808080808080
+      80808080808080808080808080808080808080808080807F7F7F7F7F7F7F7F7F
+      7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7E7E7E7E7E7E7E7E7E7E7E7E7F7F7F7F7F
+      7F7F7F7F7F7F7F7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E
+      7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7D7D7D7D7D7D7D7D7D7D7D7D
+      7C7C7C7C7C7C7B7B7B7A7A7A7979797979797878787878787777777676767575
+      757575757474747575757474747474747474746A7CC3677FDD677FDD6880DC69
+      80DD6981DD6A81DC6A81DC6B82DC6B82DC6C82DC6C83DC6E83D6808495878787
+      8B8B8B8D8D8D8F8F8F9090909191919292929292929292929292929191919191
+      919090909090909090908F8F8F8F8F8F8F8F8F8F8F8F8F8F8F90909091919191
+      9191929292929292929292949494949494959595969696969696979797979797
+      9898989A9A9A9A9A9A9A9A9A9B9B9B9C9C9C9D9D9D9D9D9D9E9E9E9F9F9FA0A0
+      A0A0A0A0A2A2A2A2A2A2A2A2A2A3A3A3A5A5A5A5A5A5A6A6A6A7A7A7A8A8A8A8
+      A8A8A9A9A9A9A9A9ABABABACACACACACACAEAEAEAFAFAFB0B0B0B2B2B2B3B3B3
+      B5B5B5B6B6B6B7B7B7B9B9B9BABABABBBBBBBCBCBCBDBDBDBEBEBEBFBFBFBFBF
+      BFC0C0C0C0C0C0C1C1C1C2C2C2C2C2C2C2C2C2C2C2C2C3C3C3C3C3C3C4C4C4C4
+      C4C4C5C5C5C5C5C5C6C6C6C6C6C6C7C7C7C7C7C7C8C8C8C8C8C8C9C9C9CACACA
+      CBCBCBCBCBCBCCCCCCCCCCCCCDCDCDCECECECECECECFCFCFD0D0D0D1D1D1D1D1
+      D1D2D2D2D2D2D2D2D2D2D3D3D3D3D3D3D4D4D4D4D4D4D4D4D4D4D4D4D4D4D4D4
+      D4D4D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D6D6D6D6D6D6D6D6D6D6D6D6D6D6D6
+      D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8D8D8D8D8D8D8D8D8D8D8D8
+      D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADA
+      DADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDCDCDCDCDCDC
+      DCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFE0
+      E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1
+      E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBECECECECECECECECECECECECECECECECECECEDEDEDECECECEDEDEDEDED
+      EDEDEDEDEDEDEDEEEEEEEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F5F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78686
+      8685858585858585858585858585858585858585858585858585858585858585
+      8585848484848484848484848484848484848484848484848484848484848484
+      8484848383838383838383838383838383838383838383838383838383838383
+      8383838383838383838382828282828283838382828282828282828282828282
+      8282828282828282828282818181818181818181818181818181818181818181
+      8181818181818181818181818181818181818181818080808080808080808080
+      808080808080808080808080808080808080808080807F7F7F7F7F7F7F7F7F80
+      80808080807F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F8080808080807F7F7F
+      7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7E7E7E7E7E7E7F7F7F7F7F7F7F7F7F7E7E
+      7E7E7E7E7F7F7F7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7D7D7D7D7D7D7D7D7D7C
+      7C7C7C7C7C7B7B7B7A7A7A7A7A7A797979797979787878777777767676767676
+      7575757676767676767575757575757377896880DD6880DD6981DD6981DD6A81
+      DD6A82DD6B82DD6A82DD6C83DD6D83DD6D83DC6E84DC7084D77F87A88C8C8C8E
+      8E8E919191919191939393939393949494949595959696969797959797969898
+      9698989596969495959394949293939191919191919191919292929292929393
+      939393939393939494949595959595959797979797979898989898989999999A
+      9A9A9B9B9B9C9C9C9D9D9D9D9D9D9E9E9E9E9E9E9F9F9FA0A0A0A0A0A0A1A1A1
+      A2A2A2A3A3A3A4A4A4A4A4A4A5A5A5A6A6A6A7A7A7A8A8A8A8A8A8A9A9A9AAAA
+      AAABABABACACACADADADADADADAEAEAEAFAFAFB1B1B1B1B2BAB0B3C1AFB3C7B0
+      B4C9B2B6CAB2B6CAB4B7CAB5B8CAB8BAC6BBBCC3BFBFC0C0C0C0C0C0C0C1C1C1
+      C1C1C1C3C3C3C3C3C3C3C3C3C4C4C4C4C4C4C4C4C4C4C4C4C6C6C6C5C5C5C6C6
+      C6C6C6C6C7C7C7C7C7C7C8C8C8C9C9C9C9C9C9C9C9C9CACACACCCCCCCCCCCCCC
+      CCCCCDCDCDCECECECECECECFCFCFCFCFCFD0D0D0D1D1D1D2D2D2D3D3D3D3D3D3
+      D3D3D3D3D3D3D4D4D4D4D4D4D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D6D6
+      D6D6D6D6D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8
+      D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D9D9D9D8D8D8
+      D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9DADADAD9D9D9DADADADADADADADADADADA
+      DADADADADBDBDBDBDBDBDBDBDBDBDBDBDCDCDCDBDBDBDCDCDCDCDCDCDCDCDCDD
+      DDDDDCDCDCDDDDDDDEDEDEDDDDDDDEDEDEDEDEDEDDDDDDDDDDDDDEDEDEDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFE0E0E0E0E0E0E0E0
+      E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E2
+      E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAE9E9E9EAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECEC
+      ECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F3
+      F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7868686868686
+      8686868686868686868585858585858686868686868686868585858585858585
+      8585858585858585858585858585858584848485858585858584848484848484
+      8484848484848484848484848484848484848484848484848484838383838383
+      8383838383838383838383838383838383838383838383838383838282828282
+      8282828282828282828282828282828282828282828282828282828281818181
+      8181818181818181818181818181818181818181818181818181818181818181
+      8181818181818181818181818080808080808080808080808080808080808080
+      808080807F7F7F8080808080808080807F7F7F8080808080808080807F7F7F7F
+      7F7F7F7F7F7F7F7F8080808080807F7F7F8080808080808080808080807F7F7F
+      8080808080807F7F7F7F7F7F7E7E7E7F7F7F7E7E7E7E7E7E7E7E7E7D7D7D7D7D
+      7D7C7C7C7B7B7B7B7B7B7A7A7A79797979797979797978787877777777777776
+      76767676767676767676767676766E7CB06981DE6980DD6A82DE6B82DD6B82DD
+      6B82DD6C83DD6C83DE6D84DC6E84DD6E85DD6F85DD6F85DC8089AF8F8F8F9191
+      919393939393939494949797979899999A9C9C9B9E9E9EA1A19FA3A39FA3A39E
+      A2A29C9F9F999B9B969898949595929393919191919191929292939393939393
+      9494949595959595959696969797979797979898989898989A9A9A9B9B9B9B9B
+      9B9C9C9C9C9C9C9D9D9D9E9E9E9F9F9F9F9F9FA0A0A0A0A0A0A1A1A1A3A3A3A3
+      A3A3A4A4A4A4A4A4A5A5A5A6A6A6A7A7A7A8A8A8A8A8A8A9A9A9A9A9A9ACACAC
+      ACACACADADADAEAEAEAEAFB3ABAFC3AAAFCDABB1D0ACB2CFAEB3CFAEB3CFB0B5
+      D0B1B6CFB2B6CFB2B7CFB3B8CFB4B8CFB6BAD0BABCCBBEBFC5C1C1C1C2C2C2C2
+      C2C2C3C3C3C3C3C3C4C4C4C4C4C4C4C4C4C5C5C5C6C6C6C6C6C6C6C6C6C6C6C6
+      C7C7C7C8C8C8C9C9C9C8C8C8CACACACACACACACACACCCCCCCCCCCCCCCCCCCDCD
+      CDCECECECECECECFCFCFD0D0D0D0D0D0D0D0D0D1D1D1D3D3D3D3D3D3D3D3D3D3
+      D3D3D4D4D4D4D4D4D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D6D6D6
+      D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8D8D8
+      D8D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADA
+      DADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDCDCDC
+      DCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDDDD
+      DDDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDF
+      DFDFDFDFDFE0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3
+      E3E3E3E3E2E2E2E3E3E3E4E4E4E3E3E3E4E4E4E3E3E3E3E3E3E5E5E5E4E4E4E4
+      E4E4E5E5E5E4E4E4E5E5E5E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECEC
+      ECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEEEEEE
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F2F2F2F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7
+      F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F787878787878787878786
+      8686868686868686868686868686868686868686868686858585858585858585
+      8585858585858585858585858585858585858585858585858484848484848484
+      8484848484848484848484848484848484848484848484848483838383838383
+      8383838383838383838383838383838383838383838383838383838383828282
+      8282828282828282828282828282828282828282828282828282828181818181
+      8181818182828282828281818181818181818181818181818181818181818181
+      8181818181818181828282808080808080808080808080808080808080808080
+      8080808080808080808080808080808080808080808080808080808080808181
+      8181818180808080808081818181818181818181818181818181818181818181
+      81818080808080808080807F7F7F7F7F7F7E7E7E7E7E7E7E7E7E7D7D7D7C7C7C
+      7C7C7C7B7B7B7B7B7B7A7A7A7979797979797878787777777878787777777777
+      7776767676767677777777787E6A80D76A81DD6B82DE6B83DD6B83DD6C83DD6D
+      84DE6E84DD6E84DD6E84DD6F85DD6F85DD7086DC7086DC7C8ABF919191939393
+      9494949697979899999C9E9EA0A4A4A5ABABA9B1B1ACB5B5ACB5B5ACB4B4A7AF
+      AFA3A9A99EA3A39A9D9D96989895969694949493939394949494949495959595
+      95959696969797979797979898989999999999999A9A9A9B9B9B9C9C9C9C9C9C
+      9D9D9D9F9F9F9F9F9F9F9F9FA0A0A0A0A0A0A1A1A1A2A2A2A3A3A3A4A4A4A4A4
+      A4A5A5A5A7A7A7A7A7A7A8A8A8A8A8A8A9A9A9AAAAAAAAAAAAACACACADADADAD
+      AEB2AAAFC4A9AFD0AAB0D0AAB0D0ACB2D0AEB3D0AEB3D0AFB4D0B0B5D0B2B7D0
+      B3B7D0B3B8D0B4B8D0B5B9D0B6BAD0B7BAD0B7BBD0BABDCEBFC0C5C2C2C2C3C3
+      C3C4C4C4C4C4C4C4C4C4C4C4C4C5C5C5C6C6C6C6C6C6C6C6C6C6C6C6C7C7C7C7
+      C7C7C9C9C9CACACACACACACACACACBCBCBCCCCCCCCCCCCCDCDCDCDCDCDCECECE
+      CFCFCFCFCFCFD0D0D0D0D0D0D1D1D1D2D2D2D3D3D3D3D3D3D3D3D3D4D4D4D4D4
+      D4D4D4D4D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D6D6D6D6D6D6D6
+      D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8D8D8D8D8D8D8
+      D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADADA
+      DADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDCDCDCDC
+      DCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDF
+      DFDFDFDFE0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECEC
+      ECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F2F2F2F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F5F5F5F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7
+      F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78787878787878787878787878686
+      8686868686868686868686868686868686868686868686868686868686868685
+      8585858585858585858585858585858585858585858585858585858585858585
+      8484848484848484848585858585858484848484848484848484848484848484
+      8484848484848484848483838384848483838383838383838383838383838383
+      8383838383838383828282838383838383828282828282828282828282828282
+      8282828383838282828282828282828282828181818181818181818282828181
+      8181818181818181818181818181818181818181818181818181818181818181
+      8181818181818181818181808080818181818181828282828282818181828282
+      8282828282828282828282828282828282828282828282828282828282828282
+      828181818181818080808080807F7F7F7F7F7F7E7E7E7E7E7E7E7E7E7D7D7D7C
+      7C7C7C7C7C7B7B7B7B7B7B7A7A7A7A7A7A797979787878787878777777777777
+      787878777777787878727CA56B82DE6B83DE6C83DE6C83DE6C84DE6E84DE6E84
+      DD6E85DE6F85DD6F85DD7086DD7086DD7086DC7287DC7889CE91929894949497
+      97979A9C9C9FA3A3A6ACACAFB8B8B5C0C0BAC7C7BCCACABBC9C9B7C3C3B0BBBB
+      A9B1B1A2A7A79B9E9E9698989494949393939494949595959595959595959696
+      969797979797979898989999999A9A9A9B9B9B9B9B9B9C9C9C9D9D9D9D9D9D9F
+      9F9F9F9F9F9F9F9FA0A0A0A1A1A1A1A1A1A2A2A2A3A3A3A4A4A4A4A4A4A5A5A5
+      A6A6A6A7A7A7A8A8A8A8A8A8A9A9A9AAAAAAABABABACACACAAADBDA8AECEA8AF
+      D0AAB0D0AAB0D0ABB1D0ADB3D0AEB3D0AEB4D0AFB4D0B1B6D1B2B7D0B3B7D0B3
+      B8D0B4B9D0B5B9D0B7BBD1B8BCD1B8BCD1BABDD0BBBED0BEC0CDC4C4C5C5C5C5
+      C5C5C5C5C5C5C6C6C6C6C6C6C6C6C6C7C7C7C8C8C8C8C8C8C8C8C8C8C8C8CACA
+      CACACACACBCBCBCBCBCBCBCBCBCDCDCDCDCDCDCDCDCDCECECECFCFCFD0D0D0D0
+      D0D0D1D1D1D1D1D1D2D2D2D3D3D3D4D4D4D4D4D4D4D4D4D5D5D5D5D5D5D5D5D5
+      D5D5D5D6D6D6D6D6D6D6D6D6D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D6D6D6D7D7
+      D7D8D8D8D8D8D8D7D7D7D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9
+      D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADADADADADADA
+      DADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDCDCDCDCDCDCDCDCDCDCDC
+      DCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDEDEDEDEDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFE0E0E0
+      E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E2E2
+      E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7
+      E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBECECECECECECECECECECECECEDEDEDECECECEDEDEDEDEDEDECECECEDEDEDED
+      EDEDEDEDEDECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7888888888888878787878787888888878787
+      8787878787878787878787878787878787878787878686868686868686868686
+      8686868686868686868686868686868686868686868685858585858585858585
+      8585858585858585858585858585858585858585858585848484848484848484
+      8484848484848484848484848484848484848484848484848383838383838383
+      8383838383838383838383838383838383838383838383838382828282828283
+      8383838383838383828282828282828282828282828282828282828282828282
+      8282828282828282828181818181818282828181818181818181818181818181
+      8181818181818182828281818182828282828283838382828282828282828283
+      8383838383848484848484838383838383838383848484838383838383838383
+      8383838282828181818181818080807F7F7F7E7E7E7E7E7E7D7D7D7D7D7D7C7C
+      7C7C7C7C7B7B7B7A7A7A7A7A7A79797979797979797978787878787878787878
+      78787878787979796D82D26C83DE6C84DE6C83DE6C84DE6D84DE6F85DE6F85DE
+      7086DD7086DD7187DD7187DD7287DD7287DC7388DD778AD38D91A19697979B9D
+      9DA3A7A7ACB4B44F446B41335E41335E41335E41335E5A52769095A6B7C4C4AC
+      B5B5A2A8A89B9E9E979898959595959595959595969696979797979797989898
+      9999999999999A9A9A9A9A9A9C9C9C9C9C9C9D9D9D9E9E9E9E9E9E9F9F9FA0A0
+      A0A0A0A0A1A1A1A2A2A2A2A2A2A3A3A3A4A4A4A5A5A5A5A5A5A6A6A6A6A6A6A8
+      A8A8A8A8A8A9A9A9AAAAAAABABABABABABA8ADC3A7AED2A7AED1A8AFD0AAB1D1
+      AAB1D0ABB1D0ADB3D0AEB4D1AFB5D1B0B5D1B1B6D1B3B8D1B3B8D1B5B9D1B5B9
+      D1B6BAD0B7BBD1B8BCD1B9BDD0BABDD0BBBED0BBBED0BEC0CFC4C4C7C6C6C6C5
+      C5C5C6C6C6C7C7C7C7C7C7C7C7C7C8C8C8C8C8C8C8C8C8C9C9C9CACACACACACA
+      CBCBCBCBCBCBCCCCCCCDCDCDCDCDCDCECECECECECECFCFCFCFCFCFD0D0D0D1D1
+      D1D1D1D1D2D2D2D2D2D2D4D4D4D4D4D4D4D4D4D5D5D5D5D5D5D5D5D5D6D6D6D6
+      D6D6D6D6D6D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8
+      D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9DADA
+      DADADADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDB
+      DBDBDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDD
+      DDDDDDDDDDDDDEDEDEDDDDDDDEDEDEDEDEDEDDDDDDDEDEDEDFDFDFDEDEDEDEDE
+      DEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFE0E0E0E0E0E0E0
+      E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E2E2E2
+      E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E4E4
+      E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECEC
+      ECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F1F1F1F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F788888888888888888888888888888888888888888888
+      8888888888878787878787878787878787878787878787878787878787868686
+      8686868787878787878787878686868686868686868686868686868686868686
+      8686868686868686868686868685858585858585858585858585858585858585
+      8585858585848484858585848484848484848484848484838383848484838383
+      8383838484848484848484848484848383838484848383838383838383838383
+      8383838383838383838383838382828282828283838382828283838382828282
+      8282828282828282818181828282828282818181818181828282828282828282
+      8181818282828383838282828383838383838383838484848484848484848484
+      8484848485858585858585858585858585858585858585858584848484848483
+      83838383838282828282828181818080807F7F7F7E7E7E7E7E7E7D7D7D7D7D7D
+      7C7C7C7B7B7B7B7B7B7A7A7A7A7A7A7A7A7A7979797979797979797878787979
+      797A7A7A777D936C84DF6D84DF6D85DE6E85DE6E85DE6F85DE7086DE7087DE71
+      87DE7187DD7187DD7388DD7388DE7489DD7489DD778AD88C93AD9C9E9EA4A9A9
+      AEB7B73F32603F32603F32603F32603F32603F32603F3260716F8DB9C6C6ABB3
+      B3A1A6A69A9C9C9797979696969696969797979898989898989898989999999A
+      9A9A9A9A9A9A9A9A9C9C9C9D9D9D9D9D9D9E9E9E9E9E9EA0A0A0A0A0A0A0A0A0
+      A1A1A1A2A2A2A2A2A2A3A3A3A4A4A4A4A4A4A5A5A5A6A6A6A6A6A6A8A8A8A9A9
+      A9A9A9A9AAAAAAAAAAADA6ACCAA6AED2A7AED2A9B0D2A9B0D1AAB1D1ABB1D1AC
+      B2D1AEB3D1AEB4D1AFB5D1B0B5D1B2B7D2B3B8D1B4B9D1B4B9D1B6BAD1B7BBD1
+      B7BBD1B9BDD2BABED1BBBED1BCBFD1BDC0D2BEC1D2BFC2D1C5C6C9C7C7C7C7C7
+      C7C8C8C8C8C8C8C8C8C8C9C9C9C9C9C9CACACAC9C9C9CBCBCBCBCBCBCCCCCCCC
+      CCCCCDCDCDCECECECECECECFCFCFD0D0D0D0D0D0D0D0D0D0D0D0D2D2D2D3D3D3
+      D3D3D3D4D4D4D5D5D5D5D5D5D4D4D4D5D5D5D5D5D5D6D6D6D6D6D6D6D6D6D6D6
+      D6D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8D8D8D8D8
+      D8D8D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADA
+      DADADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDCDC
+      DCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDE
+      DEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDF
+      DFDFDFE0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E2E2E2E3
+      E3E3E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4
+      E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E8E8E8E9E9E9
+      E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECEC
+      ECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F78989898989898989898989898888888989898888888888888888
+      8888888888888888888888888888888888888887878787878787878787878786
+      8686878787878787878787878787868686878787868686868686878787868686
+      8686868686868686868686868686868686868585858585858585858585858686
+      8685858585858585858585858585858584848484848484848484848484848484
+      8484848484848484848484848484838383848484838383838383838383838383
+      8383838383838383838383838383838383838383838383838383838383838282
+      8282828283838382828282828282828282828283838382828282828282828282
+      8282838383848484838383848484848484858585858585858585868686868686
+      8686868787878787878787878787878787878787878686868585858585858585
+      858383838383838282828181818080807F7F7F7F7F7F7F7F7F7E7E7E7D7D7D7C
+      7C7C7C7C7C7B7B7B7B7B7B7A7A7A7A7A7A7A7A7A7A7A7A7979797A7A7A7A7A7A
+      7A7A7A7181BF6D84DF6E85DF6F86DF6F85DE7086DF7087DF7187DE7188DE7288
+      DE7288DE7389DE7489DD7489DD748ADD758ADD788EDE8E9ABAA1A6A6ACB4B43E
+      30633E30633E30633E30633E30633E30633E30633E3063898DA3B5C0C0A7AEAE
+      9EA1A19899999696969696969797979898989999999999999A9A9A9A9A9A9B9B
+      9B9B9B9B9D9D9D9E9E9E9E9E9E9E9E9EA0A0A0A1A1A1A1A1A1A2A2A2A2A2A2A3
+      A3A3A3A3A3A4A4A4A5A5A5A6A6A6A6A6A6A6A6A6A7A7A7A9A9A9A9A9A9AAAAAA
+      ABABABA7ACC6A6ADD2A7AFD3A9B0D3AAB1D2AAB1D2ABB2D2ACB2D2ADB3D2AFB4
+      D2AFB5D2B0B6D2B2B7D2B3B8D2B3B8D2B5BAD2B5BAD1B7BBD2B7BBD1B8BCD2B9
+      BDD2BABED1BBBED1BCBFD1BDC1D2BEC1D2BFC2D2C0C3D1C6C6C8C7C7C7C7C7C7
+      C9C9C9C8C8C8C9C9C9C9C9C9CACACACACACACBCBCBCCCCCCCCCCCCCCCCCCCDCD
+      CDCECECECECECECFCFCFCFCFCFD0D0D0D1D1D1D1D1D1D2D2D2D3D3D3D3D3D3D5
+      D5D5D5D5D5D5D5D5D5D5D5D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7
+      D7D7D7D7D7D7D8D8D8D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9
+      D9D9D9D9D9D9D9DADADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDB
+      DBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDCDCDC
+      DCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFE0
+      E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1
+      E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3
+      E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECEC
+      ECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7898989898989898989898989898989898989898989898989888888898989
+      8989898888888888888888888888888888888888888888888888888787878787
+      8787878787878787878787878787878787878786868686868687878786868686
+      8686868686868686868686868686868686868686858585858585868686868686
+      8686868585858585858585858585858585858585858484848484848585858585
+      8585858584848484848484848484848484848484848484848484848484848484
+      8484848484838383838383848484838383838383838383838383838383838383
+      8383838383838383838383838383838282828383838383838383838383838484
+      8484848485858585858585858586868686868687878788888888888889898988
+      8888898989898989898989898989888888888888888888878787878787868686
+      8585858484848383838181818080807F7F7F7F7F7F7E7E7E7E7E7E7D7D7D7C7C
+      7C7C7C7C7B7B7B7B7B7B7A7A7A7A7A7A7A7A7A7979797A7A7A7A7A7A7A7A7A7A
+      7D886E85DF6E85DF6F86DF7086DE7086DF7087DF7188DE7288DE7288DE7389DE
+      7389DE758ADE758BDE768BDD768BDD7A8EDE8095E08F9FCAA6ADAD7D7D94B2BD
+      C1C5D5D5B3C1CB58517D3C2F653C2F653C2F65453A6DBECCCCAEB7B7A2A6A69B
+      9D9D9797979898989898989898989999999A9A9A9A9A9A9B9B9B9B9B9B9D9D9D
+      9D9D9D9E9E9E9F9F9F9F9F9FA1A1A1A0A0A0A2A2A2A2A2A2A3A3A3A2A2A2A4A4
+      A4A5A5A5A5A5A5A5A5A5A6A6A6A6A6A6A7A7A7A9A9A9A9A9A9AAAAAAA7ABC1A6
+      ADD3A6AED2A8AFD3A9B0D3AAB1D2AAB1D2ABB2D2ACB2D2AEB4D3AFB5D2B0B6D2
+      B1B6D2B2B7D2B3B9D3B4B9D2B5BAD2B6BAD2B7BBD2B8BCD2B9BDD3BABED3BBBF
+      D2BCBFD2BDC0D2BDC1D2BFC2D3C0C3D3C1C3D3C3C5D1C7C8C9C8C8C8CACACAC9
+      C9C9CACACACACACACBCBCBCBCBCBCCCCCCCCCCCCCDCDCDCDCDCDCECECECFCFCF
+      CFCFCFD0D0D0D1D1D1D1D1D1D1D1D1D1D1D1D2D2D2D3D3D3D3D3D3D4D4D4D5D5
+      D5D5D5D5D6D6D6D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7
+      D7D7D7D7D7D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9
+      D9D9D9DADADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDB
+      DBDBDBDBDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDD
+      DDDDDDDDDDDDDDDDDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDF
+      DFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFE0E0E0E0E0
+      E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E2E2E2E2
+      E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9
+      E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECEC
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F5F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78A8A
+      8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8989898989898A8A8A89898989898989
+      8989888888888888888888898989888888888888888888888888878787888888
+      8888888888888888888888888888888787878787878787878787878787878787
+      8787878787878787878787878787878787878786868686868687878786868686
+      8686868686868686868686858585858585858585858585858585858585858585
+      8585858585858585858585858484848585858585858484848484848484848484
+      8484848484848484848484848484848484848484848484848484848483838384
+      8484848484838383838383838383838383838383838383848484858585858585
+      8585858686868686868787878888888888888A8A8A8989898A8A8A8A8A8A8A8A
+      8A8B8B8B8B8B8B8B8B8B8B8B8B8A8A8A8A8A8A89898988888888888887878786
+      86868484848383838181818181818080807F7F7F7F7F7F7E7E7E7D7D7D7D7D7D
+      7C7C7C7C7C7C7C7C7C7B7B7B7B7B7B7B7B7B7A7A7A7B7B7B7B7B7B7B7B7B7681
+      AE6F86DF7086DF7187DF7188DF7288DF7288DF7289DF7389DF7489DE748ADE75
+      8BDE768BDE778CDE778CDE7A8EDF7E93E08499E199A3B8A7AEAEAEB7B7B8C4C4
+      C4D4D4C6D9DC4E45773B2E673B2E673B2E6799A1B2B4BFBFA6ACAC9EA0A09999
+      999898989898989999999999999A9A9A9B9B9B9B9B9B9C9C9C9D9D9D9E9E9E9E
+      9E9E9F9F9FA0A0A0A1A1A1A1A1A1A2A2A2A2A2A2A3A3A3A3A3A3A4A4A4A5A5A5
+      A5A5A5A6A6A6A7A7A7A8A8A8A8A8A8A9A9A9AAAAAAA9ABB5A5ADD4A6ADD3A7AF
+      D3A8AFD3AAB1D4AAB1D3ABB2D3ACB3D3ADB3D3AFB5D3AFB5D3B1B7D3B2B7D3B3
+      B8D3B4B9D3B5BAD3B6BBD3B7BBD3B8BCD3B8BDD3B9BDD3BABED3BCBFD3BDC0D3
+      BDC0D2BEC1D3BFC2D3C1C4D4C1C3D3C2C4D3C5C6CEC9C9C9C9C9C9C9C9C9CACA
+      CACACACACACACACCCCCCCCCCCCCDCDCDCDCDCDCDCDCDCECECECFCFCFD0D0D0D0
+      D0D0D1D1D1D1D1D1D1D1D1D3D3D3D3D3D3D4D4D4D5D5D5D6D6D6D6D6D6D6D6D6
+      D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D9D9
+      D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADADADAD9D9D9DA
+      DADADBDBDBDADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDB
+      DCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDD
+      DDDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDF
+      DFDFE0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E2E2
+      E2E3E3E3E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4
+      E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEBEBEBEBEBEBEAEAEAEBEBEBEAEAEAEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEFEFEFEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78B8B8B8B8B8B
+      8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A
+      8A89898989898989898989898989898989898989898989898988888888888888
+      8888888888888888888888888888898989888888888888888888888888888888
+      8888888888888888888787878787878787878787878787878787878787878787
+      8787878787878787878786868686868686868685858586868686868686868686
+      8686858585858585868686858585858585858585858585858585858585858585
+      8585858585858585858585858484848484848484848484848484848484848484
+      8484848483838384848483838383838384848484848485858586868685858587
+      87878787878787878989898A8A8A8B8B8B8B8B8B8B8B8B8C8C8C8D8D8D8C8C8C
+      8D8D8D8D8D8D8C8C8C8C8C8C8C8C8C8B8B8B8B8B8B8A8A8A8989898888888686
+      868585858383838282828181818181818080807F7F7F7E7E7E7E7E7E7D7D7D7C
+      7C7C7C7C7C7C7C7C7B7B7B7C7C7C7B7B7B7B7B7B7B7B7B7C7C7C7B7F897087E0
+      7087E07187DF7288DF7389E07389E07389DF748ADF7489DE758ADF768BDE768B
+      DE778CDF778CDE798EDE7C91DF7F94E0939AA79DA1A1A1A7A7AAB2B2B5C1C1C3
+      D4D4979FB6392D69392D69392D698184A2B9C5C5AAB1B19FA2A29A9B9B989898
+      9999999A9A9A9B9B9B9B9B9B9C9C9C9C9C9C9D9D9D9D9D9D9F9F9F9F9F9FA0A0
+      A0A1A1A1A2A2A2A2A2A2A2A2A2A3A3A3A3A3A3A4A4A4A5A5A5A6A6A6A6A6A6A7
+      A7A7A8A8A8A8A8A8A9A9A9A9A9A9AAAAAAA6ADD0A6AED4A6AED3A8B0D4A9B0D4
+      AAB1D4AAB2D4ABB2D3ACB3D3AEB4D3AFB5D3B0B6D3B1B7D3B2B7D3B3B8D3B3B9
+      D3B5BAD3B6BBD3B8BCD3B8BCD3B9BDD3BABED4BBBFD4BCBFD3BDC1D3BDC1D3BF
+      C2D3C0C3D4C1C4D4C2C4D4C2C5D4C3C6D4C8C8CBCACACACBCBCBCBCBCBCBCBCB
+      CBCBCBCCCCCCCDCDCDCECECECECECECECECED0D0D0D0D0D0D0D0D0D1D1D1D2D2
+      D2D1D1D1D1D1D1D3D3D3D3D3D3D4D4D4D5D5D5D6D6D6D6D6D6D6D6D6D7D7D7D7
+      D7D7D7D7D7D7D7D7D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9
+      D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADADADADADADADADADADBDBDBDBDB
+      DBDBDBDBDBDBDBDBDBDBDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDD
+      DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDDDDDDDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFE0E0
+      E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E4E4E4E5E5
+      E5E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78B8B8B8B8B8B8B8B8B8B
+      8B8B8B8B8B8A8A8A8B8B8B8B8B8B8B8B8B8A8A8A8B8B8B8A8A8A8A8A8A8A8A8A
+      8989898A8A8A8989898989898989898989898989898989898989898989898989
+      8989898989898989898989898989898989898989898989898988888888888888
+      8888888888888888888888888888888888888888888888888888888888888888
+      8787878888888888888888888787878787878787878787878686868686868686
+      8686868686868686868686868686868686868685858585858585858585858585
+      8585858585858585858585848484848484848484848484848484848484848484
+      8484848383838484848484848484848484848585858686868686868787878888
+      888989898A8A8A8A8A8A8C8C8C8D8D8D8D8D8D8E8E8E8E8E8E8F8F8F8F8F8F8F
+      8F8F8F8F8F8F8F8F8E8E8E8E8E8E8E8E8E8E8E8E8D8E8E8B8C8C8A8B8B888888
+      8686868383838282828282828181818080807F7F7F7E7E7E7E7E7E7D7D7D7D7D
+      7D7C7C7C7C7C7C7C7C7C7B7B7B7B7B7B7C7C7C7C7C7C7583BB7188E07187E072
+      88E07289E07389E0748AE0748AE0748AE0758ADF758ADF768CDF778CDF778CDF
+      788DDE798DDE7A8FDE7D91DF939494949696989A9A9FA4A4AAB2B2BAC7C7C2D2
+      D6382C6C382C6C382C6C5D5989BCCACAACB4B4A2A5A59C9D9D9999999A9A9A9A
+      9A9A9C9C9C9C9C9C9D9D9D9D9D9D9E9E9E9E9E9E9F9F9FA2A2A2A2A2A2A1A1A1
+      A2A2A2A3A3A3A3A3A3A4A4A4A4A4A4A4A4A4A5A5A5A6A6A6A6A6A6A7A7A7A8A8
+      A8A8A8A8A9A9A9AAAAAAA9ACBBA6AED5A6AED5A7AFD4A8B0D4A9B0D4AAB2D5AB
+      B2D4ADB4D4AEB4D4AFB5D4AFB5D4B1B7D4B2B8D4B3B8D4B3B9D4B5BAD5B7BCD4
+      B8BCD4B8BCD4B9BED4B9BED4BABED4BDC0D4BDC1D4BEC2D4BFC2D4C0C3D4C1C4
+      D4C2C5D5C4C7D5C3C6D5C4C7D5C6C9D3CACACACACACACBCBCBCBCBCBCBCBCBCC
+      CCCCCDCDCDCECECECECECECFCFCFCFCFCFD0D0D0D1D1D1D1D1D1D2D2D2D2D2D2
+      D2D2D2D4D4D4D5D5D5D5D5D5D6D6D6D6D6D6D7D7D7D7D7D7D8D8D8D8D8D8D8D8
+      D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADA
+      DADADADADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDB
+      DBDBDBDBDBDBDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDD
+      DDDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDF
+      DFDFDFDFDFDFDFDFDFDFDFDFDFDFE0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0
+      E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECEC
+      ECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3
+      F3F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78C8C8C8C8C8C8C8C8C8C8C8C8B8B
+      8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8A8A8A8A8A8A8B8B8B8B
+      8C8C8C8D8D8C8D8D8C8D8D8C8D8D8B8C8C8B8B8B8A8A8A8A8A8A8A8A8A8A8A8A
+      8A8A8A8A8A8A8989898B8B8B8B8C8C8B8B8B8C8D8D8D8E8E8C8D8D8C8D8D8C8D
+      8D8B8C8C8B8B8B8A8A8A8A8A8A8B8B8B8A8B8B8B8C8C8C8E8E8E8F8F8E8F8F8F
+      91918F91918E90908E8F8F8D8E8E8B8D8D898A8A888989888888878787878787
+      8686868888888989898889898889898889898888888788888787878686868686
+      8685858586868686878787888887888887888887888886878785858584848484
+      8484848484848484858585868686878888888989898A8A8A8A8A898A8A8B8B8B
+      8B8B8B8B8B8B8D8D8D8E8E8E8F8F8F9090909090909191919292929292929394
+      949495959495959496969596969698989598989496969295959092928D8F8F8A
+      8B8B8889898586868384848181818080808080807F7F7F7E7E7E7E7E7E7C7C7C
+      7C7C7C7C7C7C7C7C7C7C7D7D7C7D7D7983A9738BE1748BE1748BE1758BE1758D
+      E1768DE1778DE17990E17A90E17C92E17C92E17D93E27D93E17C91E07C90E07B
+      90E07C90DF7C8FDA909090929292939393999B9BA3A9A9B2BDBDC5D5D5362A6E
+      362A6E362A6E5C588BBECCCCAFB7B7A3A7A79C9D9D9B9B9B9B9B9B9A9A9A9B9B
+      9B9D9D9D9E9F9F9FA0A0A1A2A2A2A4A4A5A6A6A6A8A8A6A8A8A7A8A8A6A7A7A6
+      A7A7A6A7A7A5A6A6A6A6A6A5A5A5A6A6A6A6A6A6A7A7A7A8A8A8A8A8A8A9A9A9
+      AAAAAAABABABA7B0D2A8B2D7AAB2D7ACB4D7AEB6D9AEB7D9AFB8D9B1B8D7B1B8
+      D7B1B8D6B0B7D6B2B8D5B2B8D5B4B9D5B4B9D5B5BAD5B6BBD5B8BDD5BABED5BA
+      C0D6BBC1D6BCC1D6BEC2D7BFC2D5BEC2D5BFC3D5C0C3D5C2C6D6C4C8D7C5C9D8
+      C6CAD8C8CCD8C8CCD8C8CBD8CCCDCFCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCECE
+      CECFCFCFCFCFCFCFCFCFD0D0D0D1D1D1D2D2D2D2D2D2D3D3D3D3D3D3D3D3D3D5
+      D5D5D6D6D6D7D7D7D8D9D9D9DADAD9DADAD9DADADADBDBDADBDBDADADAD9DADA
+      DADADADADADAD9D9D9D9D9D9D9D9D9D9D9D9DADADADADBDBDBDBDBDBDBDBDBDB
+      DBDCDCDCDCDDDDDCDDDDDCDDDDDCDCDCDCDCDCDDDDDDDDDDDDDCDDDDDCDCDCDD
+      DDDDDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDEDE
+      DEDEDEDEDEDEDFDFDFDFDFDFDEDFDFDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDF
+      DFDFDFDFDFE0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E2E2E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3
+      E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECECECECEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F78C8C8C8D8D8D8C8C8C8C8C8C8C8C8C8C8C8C
+      8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8D8D8E8F8F9092929295
+      959396969396969194949092928D8E8E8C8D8D8B8B8B8A8A8A8A8A8A8A8A8A8A
+      8A8A8B8C8C8C8D8D8F91919294949497979498989498989395959093938E9090
+      8C8D8D8C8C8C8C8D8D8D8F8F909292939595969A9A989D9D9AA0A09BA1A19BA1
+      A19AA0A0999E9E969A9A9396969093938E8F8F8B8C8C8A8A8A898A8A8A8B8B8A
+      8C8C8D8F8F8E91918F92928F91918C8F8F8A8C8C888989878787878787878888
+      898A8A8B8D8D8C8E8E8D90908D90908C8F8F8A8C8C8889898586868585858585
+      858687878889898A8C8C8C8F8F8D90908F91918E90908D8F8F8C8D8D8C8C8C8D
+      8D8D8E8E8E909090919191929292939393949494969696979898999B9B9C9E9E
+      9EA1A1A0A4A4A1A6A6A2A7A7A2A8A8A2A8A8A0A6A69DA3A39AA0A0959A9A9094
+      948D9090898B8B8687878383838181818080807F7F7F7E7E7E7E7E7E7D7D7D7D
+      7D7D7C7D7D7E7E7E7E86A0778FE37B93E37C94E47C95E47C94E47C94E37D95E4
+      8097E48299E4859DE5889FE589A2E689A1E5899FE5879DE4849AE28297E17F95
+      E18393CC919191919191919191989999A1A6A6B0B9B9C2D1D15C588D35297035
+      29705C588DC0CECEB0B8B8A4A8A89D9E9E9A9A9A9B9B9B9C9C9C9E9F9FA1A2A2
+      A3A5A5A6A9A9A9ADADACB0B0AEB3B3AFB3B3B0B4B4B0B4B4AFB3B3ADB0B0ACAF
+      AFAAACACA9AAAAA8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A9A9A9AAAAAAACACACAE
+      B0B8ABB5DAAEB9DBB1BBDCB3BDDCB5C0DDB7C2DEB7C1DDB7C0DCB6BFDBB5BDD9
+      B3BBD8B3BAD7B4BAD6B4BAD5B5BAD5B6BCD6BABFD7BCC2D8BFC4DAC0C7DBC1C8
+      DBC2C8DBC3C9DBC3C7D9C2C7D8C2C7D8C4C8D8C6CAD9C9CEDBCBD0DDCCD2DECE
+      D4DFCFD4DFD0D4DED1D4DAD1D3D3CFD0D0CFD0D0CFD0D0CECECECECECECFCFCF
+      CFCFCFD0D0D0D0D0D0D1D1D1D2D2D2D3D3D3D3D3D3D3D4D4D5D5D5D6D6D6D8D9
+      D9D9DBDBDBDDDDDCDEDEDEDFDFDFE1E1DFE1E1DEE0E0DEE0E0DDDFDFDDDEDEDC
+      DDDDDBDCDCDBDBDBDADBDBDADBDBDCDCDCDCDDDDDDDEDEDEDFDFDEE0E0DEDFDF
+      DFE0E0DFE0E0DFE0E0DFE0E0DFE0E0DEDFDFDFDFDFDEDFDFDDDEDEDEDEDEDDDE
+      DEDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDEDFDFDFDFDFDFE0E0E0E1E1E0
+      E1E1E1E2E2E1E2E2E0E1E1E0E0E0DFE0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1
+      E2E2E2E2E3E3E3E3E3E3E4E4E2E3E3E2E3E3E2E3E3E2E2E2E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3
+      E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9EAEAEAE9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBECECECECECECECECECECECECECECECECECECECECECECECECECECECEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F1F1
+      F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F78D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8C
+      8C8C8D8D8D8D8D8D8C8C8C8C8C8C8D8D8D8F9191929595979A9A9A9F9F9CA2A2
+      9CA2A29A9F9F969A9A9194948E90908C8C8C8B8B8B8B8B8B8B8B8B8C8D8D8E90
+      90929595969A9A9CA1A19FA5A59FA6A69FA6A69DA2A2989C9C94969691939391
+      92929295959699999B9F9FA0A6A6A3ABABA7B1B1AAB4B4ABB6B6ABB7B7AAB5B5
+      A8B2B2A5AEAE9FA7A79AA0A09599998F92928C8E8E8B8D8D8D8E8E9092929498
+      98989D9D989E9E979D9D9498989093938C8E8E888989888989898A8A8D8F8F90
+      9494949999979D9D969C9C949A9A9094948C8E8E898A8A858686858686888A8A
+      8C8F8F919595959B9B969C9C969C9C9599999295959091918E8F8F8E8E8E8F8F
+      8F9090909292929393939596969899999C9D9D9FA2A2A3A8A8A7ADADABB2B2AF
+      B8B8B1BBBBB3BEBEB4BFBFB4C0C0B2BEBEAFBABAABB5B5A6B0B09FA7A7999F9F
+      9297978D9191898B8B8586868182828080807F7F7F7E7E7E7E7E7E7D7D7D7F7F
+      7F7F84947A91DE7F97E6859DE788A1E789A2E78AA3E789A3E78AA3E78EA7E892
+      ABE996B0EA99B4EB9CB6EB9CB5EB9AB3EA97AFE991A8E78DA3E5879DE48999CF
+      939494929393929292969898A0A4A4AEB7B7C0CECE5A57903328733328735A57
+      8FC0CECEB1B9B9A4A8A89FA0A09C9C9C9D9E9E9FA0A0A3A5A5A7ABABABB0B0B1
+      B7B7B5BCBCB8C0C0BBC4C4BCC5C5BCC5C5BDC5C5BAC2C2B7BEBEB4B9B9B1B5B5
+      AEB1B1AAACACA9A9A9A8A8A8A8A8A8A9A9A9ABABABACADADB0B2B2B1B8CCB3BE
+      DFB7C4E1BBC8E2BFCCE4C1CEE5C3D0E6C3CFE5C1CDE3BFC9E1BBC5DEB8C1DBB6
+      BED9B6BCD8B6BCD7B7BDD7BAC0D9BEC4DBC2C9DDC5CEE0C8D1E2CAD2E2CAD2E2
+      C9D1E0C8CEDEC6CCDCC7CDDCC9CEDDCBD1DFCFD5E1D1D8E3D4DBE5D6DDE6D6DD
+      E6D6DDE5D6DCE3D6DADAD4D7D7D2D4D4D0D1D1D0D0D0D0D0D0D0D0D0D0D0D0D1
+      D1D1D1D1D1D2D2D2D3D3D3D4D4D4D4D4D4D5D5D5D8D8D8D9DADADCDDDDDEE0E0
+      E0E3E3E2E5E5E3E6E6E3E7E7E4E8E8E3E7E7E3E6E6E1E4E4E1E3E3DFE0E0DDDE
+      DEDCDCDCDBDBDBDBDCDCDCDDDDDEDFDFE0E1E1E1E3E3E2E5E5E4E6E6E4E7E7E4
+      E7E7E4E7E7E4E6E6E3E6E6E4E6E6E3E5E5E2E3E3E1E2E2E0E0E0DFDFDFDFDFDF
+      DEDFDFDEDEDEDEDEDEDDDDDDDEDEDEDFDFDFE0E0E0E1E2E2E2E4E4E3E5E5E3E5
+      E5E3E5E5E2E3E3E1E1E1E0E0E0DFE0E0E0E0E0E1E1E1E1E2E2E3E3E3E4E5E5E5
+      E7E7E6E8E8E6E8E8E6E7E7E5E6E6E3E4E4E3E4E4E3E3E3E2E2E2E2E2E2E2E2E2
+      E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E2E2E2E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9
+      E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F6F6F6F6F6F6F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F78E8E8E8E8E8E8E8E8E8E8E8E8D8D8D8D8D8D8E8E8E8D8D8D8D8D
+      8D8D8D8D8D8D8D8D8D8D8F8F8F929494989C9C9FA5A5A6AEAEAAB4B4AAB4B4A6
+      AEAE9FA5A5979B9B9294948E8E8E8C8C8C8C8C8C8D8D8D8F9090939595999D9D
+      A1A8A8A8B1B1ADB8B8AEBABAACB7B7A6AFAF9FA6A6999E9E969A9A979A9A9BA0
+      A0A0A7A7A8B1B1AFBABAB4C2C2B9C8C8AAB6C09AA3B79AA3B798A2B6B8C8C8B4
+      C2C2AEBABAA6B0B09DA4A4969A9A9093938F9090919393969B9B9DA4A4A3ABAB
+      A5AFAFA4ADAD9EA6A6979D9D9194948B8C8C898A8A8C8E8E919595989E9E9FA7
+      A7A3ADADA4AEAE9FA8A8989E9E9195958B8D8D8788888788888B8E8E93979799
+      A0A0A0A9A9A4AEAEA2ABAB9DA5A5989D9D9395959091918F8F8F8E8F958D909C
+      9494949798989A9C9C9FA1A1A4A9A9AAB0B0B1B9B9B7C1C1BCC8C8C0CECEB1BC
+      C6A0A9BDA1AABE7B7FA69FA9BD9DA7BBACB9C3B9C8C8B2C0C0A9B5B5A1ABAB9A
+      A1A19297978C8F8F8789898484848181817F7F7F7F7F7F7F7F7F7E81877A8FD8
+      819AE689A3E892ADEB99B3EC9CB7ED9DB8ED9CB7EC9DB8EDA0BBEEA4C0EEAAC5
+      F0A6C0E990A3D3A0B7E2AEC9F0AAC5EFA4BDED9CB4EA94ABE792A2CB989A9A95
+      96969494949799999FA4A4AEB7B7BFCDCD5A56913227753227755A5691C1CECE
+      B2BABAA6AAAA9FA0A09E9F9FA0A1A1A5A8A8ABAFAFB2B8B8B8C0C0BEC8C8C3CF
+      CFC6D3D3ACB5C4A4ABBFA4ABBFB6C0CAC7D3D3C3CDCDBEC7C7B9BFBFB3B7B7AE
+      B0B0ABACACA9A9A9AAAAAAACACACAEAFAFB2B5B5B7BBBBB9C4DDBECCE6C4D2E8
+      C8D7EBCCDBECB0BBD7A8B1D0BBC6DECDDAEBC9D6E8C4D0E4BEC7E0BBC3DCB8BF
+      D9B8BED9B9C0D9BFC5DDC3CBDFCAD2E3CED9E7D2DDE9D4DFEAD3DDE9D0DAE6CE
+      D6E3CCD3E1CCD3E0CED4E1D2D9E5D6DEE8D9E2EAB1B6CFA8ABC89393B9B3B7CF
+      C8CEDDDDE3E4DBDFDFD7DADAD4D6D6D3D4D4D0D1D1D0D1D1D1D1D1D1D1D1D2D2
+      D2D2D2D2D3D3D3D4D4D4D4D5D5D5D6D6D8D9D9DBDDDDDFE2E2E2E6E6E5E9E9E7
+      ECECBABCD0BBBDD1BCBDD1BCBDD1C6C8D7E8ECECE5E9E9E3E6E6E1E3E3DFE0E0
+      DDDEDEDDDEDEDFE0E0E1E3E3E4E6E6E6E9E9E8ECECE9EDEDE9EEEEE9EEEEE9EE
+      EEE9EDEDE9EDEDE8ECECE7EBEBE6E9E9E4E7E7E3E5E5E2E3E3E0E1E1DFE0E0DF
+      DFDFDEDEDEDEDEDEDEDFDFE1E1E1E2E3E3E4E6E6E6E9E9E7EAEAE8EAEAE7E9E9
+      E5E6E6E3E4E4E1E2E2E1E1E1E1E1E1E2E2E2E3E4E4E5E7E7E7E9E9E8EBEBEAED
+      EDE9ECECE8EBEBE6E8E8E4E6E6E4E5E5E3E3E3E2E2E2E2E2E2E2E2E2E2E2E2E3
+      E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4
+      E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E4E4E4E5E5E5E5E5E5E5E5E5E5E5
+      E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9
+      E9E9E9E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F78F8F8F8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E
+      8E8E8E8E8E8E9192929598989EA3A3A9B2B2514C8A524E8B524E8B514C89A8B2
+      B29DA3A39497979091918D8D8D8D8D8D8F90909395959A9E9EA3ABABAEBABA8E
+      95AF54508D54508D534E8C514B89656290A1A7A79DA2A2A0A6A6A6AFAFAFBABA
+      B8C7C78990AF5F5D96302677302677302677302677302677302677423B836464
+      97898FA9979FA99CA2A2959898929595969A9A9EA5A59298A8504C89514D8A51
+      4C8A7D7F9E9FA7A79599998E8F8F8A8C8C8F9292969C9CA2ABAB5F5D90514C8A
+      514D8A504B88A2ACAC979D9D8E9191898A8A8A8B8B8F93939AA1A18F96A5504B
+      89514C8A504C897B7F9EA0A8A8979B9B919393848EAF7289DE7189E38091C796
+      9BA5A1A4A4A8ADADB1B8B8B8C3C3C0CDCDA2AABF6B6B9E443D85302677302677
+      302677302677302677302677302677433C8468699C9AA5BAB4C4C4A9B6B6A0A9
+      A9969C9C8E9292888A8A8485858181818080807E8085788BD27D95E688A1E890
+      A8E54D4C954F4F965150966A71AEB3D1F3B2D0F39BB1DD6368A639307F302677
+      3026773026773026775353978492C5AEC9F0A4BDECA0B0CC9FA4A4999C9C9698
+      98989A9AA1A5A5AEB6B6BFCDCD585592302677302677585692C1CFCFB2BABAA8
+      ACACA1A3A3A2A3A3A6A9A9ADB2B2B6BDBDBEC9C9BDC8CD7E80AA4E498B302677
+      3026773026773026773026773026775753907C7CA59CA1B5B8BEBEB2B5B5ADAE
+      AEABACACACACACAEB0B0B3B6B6B9BDBDC0C7C7C5D4EAB8C5DF8184B44F4A8E30
+      2677302677302677302677302677443D86575294C3CDE3BEC7DEBAC2DBBAC1DB
+      BDC5DCC4CCE1CCD6E6C9D3E4706EA53B317F3026773026773026776E6BA2D2DA
+      E6D2D9E5CAD1E08E8EB866629C3026773026773026773026773026773026775D
+      5795B4B7CCDCE1E1D8DBDBD5D7D7D2D3D3D2D2D2D1D1D1D2D2D2D2D2D2D4D4D4
+      D4D4D4D5D5D5D6D6D6D7D8D8DADCDCDFE2E2C1C2D2807CAA534B8E3026773026
+      77302677302677302677302677483F878D8BB4DCE0E6E5E8E8E1E3E3DFE1E1DF
+      E0E0E0E2E2E4E6E67570A35F58955F5996605997605997605997605997605997
+      6059967873A6A6A5C5D4D7E2EAEEEEE8EBEBE6E8E8E4E5E5E2E3E3E1E1E1E0E0
+      E0DFDFDFE0E0E0E1E2E2E4E5E5E7E9E95F57955F58955F58955F5795E7EAEAE4
+      E6E6E2E3E3E2E3E3E2E3E3E4E5E5E6E8E8E9ECECE0E2E8605896605996605896
+      5F58955E5794C5C4D4E5E6E6E4E4E4E3E3E3E2E2E2E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEB
+      EBECECECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F4F4F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78F8F
+      8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8E8E8E8E8E8E8E
+      8E8E929393999D9DA4ABABB2BEBE2F257A2F257A2F257A2F257AB1BDBDA2AAAA
+      979B9B9192928E8E8E8E8F8F929393999D9DA3AAAAB0BCBCABB8C33830802F25
+      7A2F257A2F257A382F7EA6AFB4A7AEAEA6ADADABB4B4B4C1C1A5B0C04B478C2F
+      257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A
+      6E6F99A1A8A8989D9D9599999A9F9FA4ADAD9199AE2F257A2F257A2F257A7274
+      9FA7B1B1999F9F9093938D8E8E9295959CA3A3AAB6B6514E8E2F257A2F257A2F
+      257AACB9B99DA5A59195958A8B8B8B8D8D949999A0A9A98F97AC2F257A2F257A
+      2F257A71749FA7B1B196A0AE8094D1738CE5728AE4738DE57892E6809AE896A9
+      D4B1BCC4BFCCCCA2ABC05754942F257A2F257A2F257A2F257A2F257A2F257A2F
+      257A2F257A2F257A2F257A2F257A2F257A2F257A54529398A4BAB1C0C0A4AFAF
+      99A1A1909595888A8A8485858282827588D17790E48099E78FA9EAA1BDEF2F25
+      7A2F257A2F257A54549AC3E3F87078B12F257A2F257A2F257A2F257A2F257A2F
+      257A2F257A2F257A2F257A403B8A95A6D5AFC3D8AAB2B2A1A7A79B9E9E9B9D9D
+      A1A5A5AEB6B6BFCDCD5755942F257A2F257A585595C2CFCFB3BBBBA8ADADA4A7
+      A7A6A9A9AEB3B3B8C0C0C2CDCD878AB03830812F257A2F257A2F257A2F257A2F
+      257A2F257A2F257A2F257A2F257A2F257A2F257ABCC3C3B4B8B8AFB1B1ADAEAE
+      AFB0B0B3B6B6BABFBFC2CACACBD6DA7F83B52F257A2F257A2F257A2F257A2F25
+      7A2F257A2F257A2F257A2F257A2F257AC7D1E5C0C9E0BDC5DEBEC5DEC2CBE0CB
+      D5E6B6BDD73930822F257A2F257A2F257A2F257A2F257A595597D5DEE9D6DDE8
+      AEB2CE2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F25
+      7A9F9FBFDDE2E2D8DBDBD5D7D7D3D4D4D3D3D3D3D3D3D3D3D3D5D5D5D5D5D5D6
+      D6D6D7D7D7DADADADCDEDEE1E4E45D56962F257A2F257A2F257A2F257A2F257A
+      2F257A2F257A2F257A2F257A2F257A524B91DDE1E7E5E8E8E2E4E4E1E3E3E4E6
+      E6E7EAEA5E58982F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F
+      257A2F257A2F257A6B66A1BDBED4EAEEEEE7EAEAE4E6E6E2E3E3E1E1E1E0E0E0
+      E1E2E2E3E4E4E6E8E8EAEDED2F257A2F257A2F257A2F257AEAEDEDE7E9E9E4E5
+      E5E3E4E4E4E5E5E6E8E8EAEDEDE1E4EA534B912F257A2F257A2F257A2F257AA4
+      A2C1E8E9E9E5E6E6E4E4E4E3E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4
+      E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      ECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1
+      F1F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7909090909090
+      9090908F8F8F8F8F8F8F8F8F9090908F8F8F8F8F8F8F8F8F8F8F8F8F8F8F9395
+      959CA0A0A8B1B1B8C7C72D237C2D237C2D237C2D237CB7C5C5A6AFAF9A9E9E92
+      93938F8F8F929393979A9AA0A7A7AEB9B9BDCDCD4B478F2D237C2D237C2D237C
+      372E82A0AABAB0BBBBACB5B5AFB9B9B8C5C58B91B32D237C2D237C2D237C2D23
+      7C2D237C2D237C413B895552945552942D237C2D237C2D237C2D237C6E6F9BA2
+      AAAA9A9E9E989D9D9DA3A3AAB4B497A0B62D237C2D237C2D237C7578A5ACB8B8
+      9CA3A39295958E8F8F949898A0A8A8B0BEBE5250922D237C2D237C2D237CB3C2
+      C2A1AAAA9398988A8C8C8B8D8D969C9CA5B1B1949FB52D237C2D237C2D237C74
+      79A7A2B9DA89A5EA7C96E7758EE5748DE57993E6819BE88CA8EB9BB7EFA1BEEC
+      6E74AE2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D23
+      7C2D237C2D237C2D237C2D237C2D237C2D237C2D237C6E72A4ADBDC2A8B4B49C
+      A4A4909595898B8B7B8AC1748CE47891E5849DE894AEECA9C6F22D237C2D237C
+      2D237C53539B666BAB2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D23
+      7C2D237C2D237C2D237C2D237C8893BDB7C3C3AAB2B2A0A5A59EA1A1A3A8A8AF
+      B8B8BFCDCD5653962D237C2D237C565396C2CFCFB4BCBCAAAEAEA7ABABACB1B1
+      B6BEBEC3CFCF6A69A12D237C2D237C2D237C2D237C2D237C2D237C5754965754
+      96423B892D237C2D237C2D237C2D237CBDC4C4B6BABAB1B3B3B0B2B2B3B5B5B9
+      BEBEC1C9C9C2CCD15754972D237C2D237C2D237C2D237C2D237C2D237C2D237C
+      2D237C2D237C2D237C2D237CC7D2E5C1CAE1C0C8DFC2CAE0C8D1E4D2DEEB4E48
+      922D237C2D237C2D237C2D237C2D237C2D237C585398D5DEE8D6DEE8AEB1CE2D
+      237C2D237C2D237C5B5699898AB88A8BB85C579A2D237C2D237C2D237C393083
+      D7DCE1DBDFDFD7D9D9D5D6D6D3D3D3D3D3D3D3D3D3D5D5D5D5D5D5D6D6D6D7D7
+      D7DADBDBDDDFDFE2E5E55B55982D237C2D237C2D237C5D589A827FB17672A945
+      3D8B2D237C2D237C2D237C2D237C5D579AE9EDEDE5E8E8E4E6E6E5E8E8E9EDED
+      5D579A2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D23
+      7C2D237C2D237C2D237C827FB1ECF0F0E8EBEBE5E7E7E3E4E4E1E2E2E2E2E2E4
+      E5E5E7E9E9EBEFEF2D237C2D237C2D237C453D8BECF0F0E8EAEAE5E7E7E6E7E7
+      E7E9E9EAEDEDEEF2F27772AA2D237C2D237C2D237C2D237CA5A4C5EAEDEDE7E9
+      E9E5E6E6E4E4E4E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4
+      E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F791919191919191919190
+      90909090909090909090909090909090909090909090908F8F8F9495959DA2A2
+      ABB5B5BDCDCD2C227E2C227E2C227E403A8BBBCBCBA9B2B29B9F9F9394949091
+      919699999EA3A3ABB4B4BAC9C97174A82C227E2C227E2C227E2C227E959EBAB8
+      C5C5B2BCBCB1BBBBB8C4C4A6B2C32C227E2C227E2C227E2C227E413A8B9098BB
+      BBCBD0C1D1D1BECDCDBDCDCDBECECEA2ADBE7275A33D36866B6B99A0A7A79A9E
+      9E989D9DA0A6A6AEB9B99AA5BC2C227E2C227E2C227E777BA9AFBCBC9FA6A692
+      95958F9090959A9AA3ABABB5C4C45351962C227E2C227E2C227EB7C8C8A4AEAE
+      949A9A8A8D8D8C8F8F989F9FA9B5B598A4BB2C227E2C227E2C227E727DB9A1BF
+      F08CA8EB7E98E77891E57992E7809AE98CA7EC9BB9EFA4C1ED4645952C227E2C
+      227E2C227E2C227E2C227E61609F9299BBB8C5D0C9D8D8C8D7D7C7D7D7B4C2CD
+      8F97B95F5F9E2C227E2C227E2C227E2C227E2C227E484590AFBFC4A9B6B69AA3
+      A38799C97B92E7768EE57B93E6869FE998B3EDAFCCF32C227E2C227E2C227E2C
+      227E2C227E2C227E2C227E646AAC98ACD8B8D6F5BAD6F4ABC3E6818EC2362E86
+      2C227E2C227E2C227E2C227E8A91B4B5C1C1A9B0B0A3A8A8A6ABABAFB8B8C0CE
+      CE5553982C227E2C227E565398C2CFCFB5BEBEADB2B2ADB2B2B4BBBBC0CBCB68
+      68A22C227E2C227E2C227E2C227E5754999EA6C2CEDCDCCBD8D8CBD7D7CCD8D8
+      CCD8D8999EBB66649E2C227EBBC1C1B6BABAB1B4B4B2B4B4B7BBBBC0C7C7CBD5
+      D5615F9E2C227E2C227E2C227E2C227E58559CA2ABCFCBD9EBD5E4F1D4E2F0A8
+      B0D26A68A82C227EC4CFE4C2CAE2C1C9E1C5CDE3CCD7E8A1A7CC2C227E2C227E
+      2C227E2C227E9396C0D3DDEBB8BED79FA2C6D3DBE6D4DBE7ACB0CE2C227E645F
+      A1C8CEE0DFE8EFE1EAF0E4EDF1E8F3F57371AB2C227E2C227E2C227E9494BCDE
+      E3E3D9DCDCD6D7D7D5D5D5D4D4D4D5D5D5D6D6D6D6D6D6D7D7D7D8D8D8DADBDB
+      DDDFDFE2E5E55B5499382F858B88B6DEE2E8EAEFEFEAEFEFECF1F1EEF5F5A6A6
+      C92C227E2C227E2C227E2C227EAFB0CDE7EBEBE5E8E8E6EAEAEBEFEF5D579C2C
+      227E2C227E2C227E8E8CBA8E8CBA8E8CBA8E8CBA7672AB453D8D2C227E2C227E
+      2C227E2C227E2C227E504A95E0E3E9E8EBEBE5E7E7E3E3E3E3E4E4E5E6E6E8EB
+      EBEDF2F22C227E2C227E2C227E5E579CEEF2F2EAECECE8EAEAE8EAEAEAEDEDEE
+      F2F27672AB2C227E2C227E2C227E2C227EA6A5C8ECEFEFE9EBEBE7E8E8E5E6E6
+      E5E5E5E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6
+      E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E7E7E7E8E8E8E7E7E7
+      E8E8E8E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F79292929191919191919191919191
+      919191919191919191919191919090909090909090909597979FA4A4AEB8B8C0
+      D0D02A21802A21802A2180535299BCCCCCAAB3B39CA1A19597979496969B9F9F
+      A6AFAFB5C2C29FABC32A21802A21802A21802A21807A80AFBFCDCDB5C0C0B2BB
+      BBB6C1C1C1D0D03F398C2A21802A21802A2180686BA6C0D0D6C1CFCFB9C5C5B3
+      BEBEB0BABAB0BABAB0BBBBB0BABAAEB8B8A3ABB18D92A49CA1A1989B9B9A9E9E
+      A1A8A8B0BCBC9CA7BF2A21802A21802A21808A92B6B1BEBE9FA6A69396969092
+      92969A9AA4AEAEB7C7C75251982A21802A21802A2180BACCCCA5B1B1959B9B8C
+      8E8E8C8F8F989F9FABB8B899A6C02A21802A21802A2180737EBBA4C3F18FAAEC
+      819AE87B94E77F99E88AA6EB9AB7EFA4C1EC4645972A21802A21802A21802A21
+      8050519EB1C5DDC7D5D8C2CECEBDC8C8BAC5C5B9C3C3B8C3C3BAC5C5BCC9C9C1
+      D1D1B4C3CF5D5E9F2A21802A21802A21802A2180484592AFBEC4A0B7D98DA7EB
+      819AE87A92E67D95E788A1EA9AB6EEB2D0F42A21802A21802A21802A21802A21
+      80342D889AAFD9B4D1F4ACC7F1A7C2EFA8C1EFACC7F0B4D0F3B6D0EF5B5EA52A
+      21802A21802A2180342D86B7C4CAB1BABAA9AFAFA9AFAFB2BBBBC0CECE545299
+      2A21802A2180545299C3D0D0B7BFBFB1B7B7B2B9B9BCC6C6A2AAC22A21802A21
+      802A21802A2180969DC1CFDDDDC7D3D3C2CCCCC0C8C8BFC7C7C0C8C8C1C9C9C1
+      C9C9BFC6C6A1A5B6B7BBBBB3B6B6B2B5B5B5B8B8BDC2C2C7D0D0898DB72A2180
+      2A21802A2180352E8798A0CAD3E3F1CEDCEECAD7EBC9D6EAC9D6EAC9D5E9C8D3
+      E8A8AFD2C1CAE2C0C8E0C2CAE1C7D0E4D0DBEA7879B22A21802A21802A218092
+      95C2E0ECF3D8E3EDD3DBE8D0D7E5CFD5E4D1D7E4A8ACCC6A68A7D7DEE8D8DFE9
+      D9E1E9DBE3EADFE7EEE6F0F3DDE6EF2A21802A21802A2180726FAAE1E6E6DBDE
+      DED7D8D8D5D5D5D5D5D5D5D5D5D7D7D7D8D8D8D8D8D8D9D9D9DADBDBDDDFDFE0
+      E2E2645FA0C2C3D5E6E9E9E6E9E9E7EAEAE7EAEAE8ECECECF1F1F0F6F67571AC
+      2A21802A21802A2180817EB3EAEEEEE8EBEBE8ECECECF0F05C579E2A21802A21
+      802A2180F1F7F7F0F6F6EDF2F2ECF0F0ECF0F0EEF3F3BEC1D84F49962A21802A
+      21802A21802A21807571ADECF0F0E8EBEBE5E6E6E4E5E5E5E7E7E9ECECEEF2F2
+      2A21802A21802A21805C579EEFF3F3EBEEEEEAEDEDEBEEEEEEF2F28E8BBB2A21
+      802A21802A21802A2180A6A6CAEEF2F2EBEDEDE8EAEAE6E7E7E5E5E5E4E4E4E4
+      E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBECECECEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEC
+      ECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7929292929292929292929292929292929292
+      929292929292929292929292919191919191969797A0A5A5AEB8B8C0D1D12820
+      8328208328208352519BBDCDCDABB4B49DA2A2979A9A989C9CA4AAAAB2BDBDB7
+      C7CD322B892820832820832820835C5DA1C1D0D0B5C0C0AFB8B8B1BABABBC7C7
+      8C94B92820832820832820835D5EA2D0E3E3C3D2D2B8C3C3B0B8B8AAB2B2A7AE
+      AEA6ACACA6ACACA5ABABA3AAAAA3A8A89DA2A2999C9C969898989C9CA1A8A8B1
+      BDBD9CA8C02820832820832820839DA9C2B1BEBEA0A7A79395958F9191979B9B
+      A5AEAEB8C8C851509B282083282083282083BACCCCA5B1B1959B9B8B8D8D8C8F
+      8F97A0A9A4BBDA94A8D8282083282083282083727EBDA6C3F190ACEC829DE980
+      9AE887A2EB97B4EFAAC8F34D4FA02820832820832820832820837D8CC4B1D0F5
+      A3C2F29BB6EDA3B4D4AEB5BAAEB3B3ACB1B1ABB1B1ABB1B1ADB5B5B2BCBCB7C4
+      C4C1D2D28E98BD282083282083282083282083454397ABC9F399B4EF8AA3EA7E
+      97E77F97E789A2EA9AB6EEB4D1F4282083282083282083282083282083A7BEE2
+      B2CEF3A4BEEF9AB3EC95ADEB95ADEB99B1EBA2BBEEB3C7DBC5D9DB4745952820
+      832820832820836566A4B9C5C5AEB7B7ACB4B4B3BDBDC1CFCF52519B28208328
+      208353519CC4D1D1B9C2C2B4BCBCB9C1C1C3CFCF53509B282083282083282083
+      959DC2D2E2E2C8D4D4C1C9C9BBC1C1B8BDBDB8BDBDB7BCBCB8BDBDB8BDBDB7BC
+      BCB6BABAB3B6B6B2B4B4B3B5B5B8BCBCC2C9C9C4CED5332C8928208328208328
+      2083A2ACD2D1E0F0C9D6EBC2CEE7BFCAE5BEC9E3BFC8E3C0CAE3BFC9E2BFC8E1
+      BDC5DEBDC5DEC2CAE1C9D2E6D3DEEC56539F282083282083282083D6E2EEDAE4
+      EED2DBE7CED4E3CCD1E1CBD0E0CCD1E0C3C9DBD1D6E3D2D7E4D3D9E4D5DAE5D8
+      DEE7DDE5EBE5EEF2DDE6EF28208328208328208358549FE2E7E7DCDFDFD7D9D9
+      D6D6D6D5D5D5D5D5D5D7D7D7D8D8D8D8D8D8D8D9D9DADBDBDCDDDDDFE0E0D5D7
+      DDE2E4E4E2E4E4E2E4E4E3E5E5E4E6E6E6E9E9EAEEEEEFF5F58C8BBD28208328
+      20832820835A55A0EBEFEFE8EBEBE9EDEDEDF1F15A56A0282083282083282083
+      F1F7F7EDF2F2EAEDEDE8EBEBE8EBEBEAEDEDECF1F1EFF4F47471AE2820832820
+      83282083282083A4A4C9EAEEEEE7E9E9E6E7E7E7E8E8EAEDEDEFF3F328208328
+      20832820835B56A0F1F5F5EEF1F1EDF1F1EFF2F2A5A5CB282083282083282083
+      2820838D8BBDEFF2F2EBEEEEE8EAEAE6E7E7E5E5E5E5E6E6E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8
+      E8E8E8E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEB
+      EBEBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F793939393939393939392929292929293939393939392
+      9292929292929292929292929292979898A1A6A6AEB8B8C1D1D1271F85271F85
+      271F8551509DBDCDCDABB4B49FA4A49B9F9FA0A5A5ADB6B6BCCBCB5B5BA2271F
+      85271F85271F853C3891BACAD0B6C1C1ADB5B5ABB2B2B2BBBBC0CDCD47439727
+      1F85271F85322B8BBDCDDACFE1E1C2D0D0B7C2C2B0B8B8ABB1B1A8ADADA6ABAB
+      A4A9A9A4A9A9A2A7A7A0A4A49CA0A0989B9B9799999A9D9DA3A9A9B2BEBE9CA7
+      C1271F85271F85271F859CA8C2B1BDBD9FA6A6939696909292979B9BA5AEAEB8
+      C8C850509C271F85271F85271F85BACCCCA5B1B1959B9B8B8D8D8893B18DA7EC
+      A0BDF093A9DA271F85271F85271F85727EBEA6C4F292AEED87A2EB86A0EA91AD
+      EDA5C2F2707BBE271F85271F85271F85271F858597CDADCCF49DBAF191ACEE87
+      A2EC809BEA8098E5909EC8A1A4A9A2A4A4A1A4A4A2A6A6A5AAAAAAB1B1B2BDBD
+      BCCCCC8B96BC271F85271F85271F85271F85707BBEA6C3F293AEED859EEA839B
+      E98AA4EB9CB6EEB4D1F5271F85271F85271F85271F857581BEB7D3F5A4BEF095
+      ADEC8CA3E8889FE7889EE790A0CB9CA5ADAAB4B4B9C8C8B6C7D4271F85271F85
+      271F85322A8BC0CECEB4BEBEB0B8B8B5BFBFC2D0D052509D271F85271F855251
+      9DC5D2D2BBC5C5B9C1C1BEC8C8ABB6C9271F85271F85271F855E5EA4D7E8E8D0
+      DFDFC6D1D1BFC7C7BAC0C0B7BCBCB6BBBBB6BABAB5B9B9B6BABAB6B9B9B5B8B8
+      B3B5B5B3B5B5B6B9B9BEC3C3C8D0D09398BF271F85271F85271F856A6CB0D2E3
+      F1C8D5EBBFCAE5B9C3E2B7C1E0B8C0DFB9C1DFB9C2DFB9C1DFBAC2DEBAC1DDBD
+      C4DFC2C9E2CAD3E7D5E1ED5653A1271F85271F853F3993DEEAF2D5DEEACDD4E3
+      C8CEDFC7CCDEC8CCDEC9CEDECCD0DFCDD2E1CFD4E1D1D6E3D4D9E5D9DFE8DFE7
+      EDE7F0F49495C4271F85271F85271F857C7BB4E2E6E6DCDFDFD8D9D9D6D6D6D6
+      D6D6D6D6D6D8D8D8D9D9D9D9D9D9D9D9D9DBDBDBDBDCDCDEDFDFDFE0E0E0E1E1
+      E0E1E1E0E1E1E1E2E2E2E4E4E5E8E8EAEEEEEFF5F5807DB7271F85271F85271F
+      855955A1EBEFEFE9ECECEAEDEDEDF2F25A55A2271F85271F85271F85EFF4F4EA
+      EEEEE7E9E9E5E6E6E4E5E5E6E8E8E8EBEBEBEFEFEFF4F47370B0271F85271F85
+      271F85342C8CEEF2F2E9ECECE7E9E9E7E9E9EAEDEDEFF3F3271F85271F85271F
+      855A55A2F2F7F7F0F5F5F0F5F5A6A5CC271F85271F85271F85271F857370B0EF
+      F3F3EBEEEEE9EBEBE6E7E7E5E5E5E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8
+      E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F79494949494949494949494949393939393939393939393939393
+      93939393939393939393979898A1A6A6AFB9B9C1D1D1251D87251D87251D874F
+      4F9EBECDCDACB6B6A3A9A9A0A5A5A8B0B0B7C4C4949FC0251D87251D87251D87
+      251D879FAAC4BAC6C6ADB5B5A7ADADA9B0B0B5BEBEBAC8CE251D87251D87251D
+      876769ABD3E6E6D1E3E3C7D5D5BDC9C9B7C1C1B4BCBCB1B9B9AEB6B6ACB4B4AA
+      B1B1A8AEAEA5AAAAA1A6A69EA1A19A9D9D9DA1A1A6ADADB3BFBF9CA8C2251D87
+      251D87251D879BA7C1B0BDBDA0A6A6949696909292979B9BA5AFAFB8C8C84F4E
+      9E251D87251D87251D87BACCCCA5B1B1959B9B8B8D8D8595C78DA8ECA1BEF193
+      A8DA251D87251D87251D87717DBFA7C5F394AFED8BA6EC8EA9ED9CB8F0A0BAE7
+      2F298E251D87251D87251D877C8BC7AFCDF59DB9F08EA8ED829DEA7C95E97791
+      E8758EE8748DE8768EE38995C39A9CA29B9C9C9D9F9F9FA3A3A5ABABAEB9B9BB
+      CCCC828BBA251D87251D87251D87251D87A1BAE79EB9F08EA7EB88A0EA8DA6EB
+      9DB7F0B4D1F5251D87251D87251D87251D87B8D3F0ABC5F198B1EC8BA2E98499
+      E78494CF8990A38E9090959898A0A6A6B0BBBBC2D3D36568AA251D87251D8725
+      1D879DA7C1B9C4C4B4BDBDB7C2C2C3D1D1504F9F251D87251D87514F9FC6D3D3
+      BDC7C7BCC5C5C2CECE858AB9251D87251D87251D87B5C2D6D7E9E9D2E1E1CAD6
+      D6C4CDCDC1C9C9BEC5C5BDC4C4BCC2C2BBC0C0BBC1C1BABFBFB9BDBDB7BABAB6
+      B9B9BABEBEC2C8C8CDD7D75E5DA5251D87251D87251D87C2D0E5CBDAEEC0CCE7
+      B8C3E2B4BCDFB3BBDEB5BCDEB5BDDEB6BDDEB7BFDEB8C0DDB9BFDDBDC3DFC2CA
+      E1CBD4E7D6E1EE5452A3251D87251D875552A3DBE6F0D2DAE8CBD1E1C8CDDEC7
+      CADDC7CBDDC9CDDDCBCEDECED2E0D0D4E2D4D9E4D8DEE8DDE5ECE4EDF1A0A2CD
+      251D87251D87251D87251D87A9ACCDE0E4E4DCDEDED9D9D9D6D7D7D7D7D7D8D8
+      D8D9D9D9DADADADADADADADADADBDCDCDCDCDCDDDDDDDEDFDFDEDFDFDFDFDFDF
+      E0E0E2E3E3E4E6E6E8EBEBECF0F0E4E9F0322B8E251D87251D87251D877E7CB7
+      EBEFEFE9ECECEAEDEDEDF2F25854A3251D87251D87251D87EEF3F3E9ECECE6E7
+      E7E3E4E4E2E3E3E3E4E4E6E7E7E9EBEBEDF0F0E4E8EF322B8E251D87251D8725
+      1D87A4A4CCEBEEEEE9EBEBE9EBEBEBEEEEEFF3F3251D87251D87251D875954A3
+      F3F8F8F3F8F8CCCFE3322B8E251D87251D87251D87726FB1EFF3F3ECEEEEE9EB
+      EBE7E8E8E6E7E7E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7959595959595949494949494949494949494949494949494949494949494
+      939393939393989999A1A6A6AFB9B9C1D2D2241C8A241C8A241C8A4F4EA0BFCF
+      CFB0BABAA8B0B0A9B1B1B2BEBEB8C8CE2F2890241C8A241C8A241C8A777DB3BD
+      CBCBAFB8B8A5AAAAA3A7A7AAAFAFB6C0C09FA8C4241C8A241C8A241C8A45429C
+      7C81B8868DBEA2ADC9B2BECCC3D0D0C1CDCDBECACABCC8C8B9C5C5B8C2C2B4BF
+      BFB1BABAACB3B3A5ACACA0A5A5A1A6A6A8B0B0B5C1C19CA7C3241C8A241C8A24
+      1C8A9BA7C2B1BDBDA0A7A7959797919393989C9CA5AFAFB8C8C84E4DA0241C8A
+      241C8A241C8ABACCCCA5B1B1959A9A8B8D8D8397D28EA8ECA1BEF193A8DB241C
+      8A241C8A241C8A717DC1A8C5F396B3EF90ABED96B1EFA7C5F35E65B3241C8A24
+      1C8A241C8A4C4EA5B4D2F6A0BCF28EAAEE819CEB7B94E9778FE9758DE8748DE8
+      748CE8748CE8738CE8768DE38794C197999E999A9A9CA0A0A3AAAAADBBBEB5D2
+      EF4C4EA5241C8A241C8A241C8A5E65B3A9C5F394AFEE8CA5EC90A8EC9EBAF0B4
+      D1F5241C8A241C8A241C8A4C4EA6B9D5F5A3BCF092A9EB879BDD898FA98B8B8B
+      8B8B8B8E8E8E9294949CA1A1AAB2B2BCCACA99A5C7241C8A241C8A241C8A767B
+      B2BCC8C8B7C0C0BAC4C4C4D2D2504EA1241C8A241C8A504EA1C7D4D4BEC9C9BE
+      C8C8C5D2D26667AC241C8A241C8A241C8A6869AE7E82B99FA8CBA5AECAC1CCD3
+      CAD5D5C8D3D3C8D2D2C7D0D0C6CFCFC5CDCDC3CBCBC1C8C8BEC4C4BDC2C2BFC5
+      C5C6CECED1DCDC3B3696241C8A241C8A47439CD5E4EDC6D4EBBCC8E5B6C0E1B2
+      BBDFB4BBDEB4BBDDB5BDDEB6BDDEB7BEDDB8BFDDBAC0DDBCC4E0C3CAE3CBD4E8
+      D7E2EE5351A5241C8A241C8A5451A5DAE5EFD2D9E8CBD1E1C8CDDFC6CADDC7CC
+      DDC9CEDECCD0DFCFD4E2D4D9E4D8DEE8DEE5EDCCD3E5625FAC241C8A241C8A24
+      1C8A241C8A49449DE4E9E9DEE2E2DBDCDCD9D9D9D7D7D7D8D8D8D9D9D9D9D9D9
+      DADADADADADADADADADBDBDBDDDDDDDDDEDEDFDFDFDFE0E0E0E1E1E2E4E4E5E7
+      E7E8EBEBECF0F0E3E8EF4B459F241C8A241C8A241C8A241C8AAFB0D2EAEDEDE8
+      EBEBEAEDEDEDF2F25753A5241C8A241C8A241C8AEFF3F3EAECECE6E7E7E3E4E4
+      E2E2E2E3E3E3E4E4E4E6E8E8EAECECEEF2F28B8AC0241C8A241C8A241C8A6561
+      ACEDF0F0EAECECEAECECEBEEEEF0F4F4241C8A241C8A241C8A5853A6F3F8F8CC
+      CFE3312A91241C8A241C8A241C8A4B459EF0F4F4EDEFEFEAEBEBE8E8E8E6E7E7
+      E6E7E7E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F0F0
+      F0F0F0F0F1F1F1F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F79595
+      9595959595959595959595959595959595959595959595959595959594949494
+      9494999A9AA2A7A7B0BABAC2D2D2221B8C221B8C221B8C4D4DA2C4D6D6B7C4C4
+      B1BCBCB4C0C0BFCECE5859A7221B8C221B8C221B8C4D4DA2C0D0D0B2BCBCA6AC
+      AC9FA2A2A1A5A5A9AFAFB7C2C2A0AAC6221B8C221B8C221B8C221B8C221B8C22
+      1B8C221B8C221B8C221B8C3733964C4BA06C6EAE7579B2939CC09BA5C1BFCECE
+      BAC6C6B2BCBCA9B1B1A6ADADAAB3B3B7C3C39CA8C4221B8C221B8C221B8C9BA7
+      C3B2BEBEA0A7A7949797919393999D9DA6AFAFB9C9C94C4DA1221B8C221B8C22
+      1B8CBACCCCA5B0B0959A9A8A8C8C8398D98FA9ECA2BFF193A8DC221B8C221B8C
+      221B8C707CC2A9C6F399B5F096B1EF9DBAF1A7C4EE221B8C221B8C221B8C221B
+      8C96ACDDA7C5F393AFEF849EEB7B95E9778FE8758DE8748DE8748DE8748DE974
+      8DE9758DE8748DE8748DE8778EE38693BF979898979FAE96AEE2A6C4F3A9C3EA
+      221B8C221B8C221B8C221B8CAAC5EE9CB8F092ABED93ACED9FBAF0B4D1F5221B
+      8C221B8C221B8C747FC2B4D1F59FB7EB94A0BA8F91918B8B8B8C8C8C8D8D8D8E
+      8E8E9393939A9D9DA8AFAFB9C6C6A1AFCB221B8C221B8C221B8C777CB5BFCCCC
+      B8C2C2BBC5C5C5D2D24E4EA2221B8C221B8C4F4EA3C8D5D5C0CBCBC0CACAC8D5
+      D54F4EA3221B8C221B8C221B8C221B8C221B8C221B8C221B8C221B8C221B8C4E
+      4DA14E4CA17A7DB68588BBA5ADCAB9C3D1CDD7D7C9D1D1C6CECEC6CDCDCAD3D3
+      D4E0E0221B8C221B8C221B8C514FA4D5E1E6C5D2EBBBC6E5B6BFE1B3BCDEB4BB
+      DEB4BCDEB6BDDFB7BEDEB8BFDEB9BFDEBAC1DEBDC4DFC3CBE3CCD6E8D7E2EF52
+      50A7221B8C221B8C5250A7DBE5EFD2D9E8CCD1E2C8CCDFC6CADDC8CCDECACFDF
+      CFD3E2D2D8E4D9E0E9DFE7EE8F91C62E2993221B8C221B8C221B8C221B8C2F29
+      92C1C5DAE1E5E5DDDFDFDADBDBD8D9D9D8D8D8D8D8D8DADADADBDBDBDBDBDBDB
+      DBDBDBDBDBDCDCDCDEDEDEDEDFDFE0E1E1E1E2E2E3E4E4E5E8E8E9ECECEDF1F1
+      BCBFDC3C3799221B8C221B8C221B8C221B8C4944A0ECF0F0E9EBEBE8EAEAE9EC
+      ECEEF2F25652A7221B8C221B8C221B8CEFF3F3EAECECE6E7E7E3E4E4E2E2E2E3
+      E3E3E4E4E4E6E6E6E9EAEAEDF0F0D8DBEA221B8C221B8C221B8C3C379AEEF2F2
+      EBEEEEEAEDEDECEFEFF0F4F4221B8C221B8C221B8C5652A7E6EAF13C379A221B
+      8C221B8C221B8C4945A0E3E7EEEDF0F0EAECECE8E9E9E7E8E8E7E7E7E6E6E6E6
+      E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5
+      F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7969696969696
+      969696969696959595969696969696959595959595959595959595949494999A
+      9AA2A7A7B1BABAC2D2D2211A8E211A8E211A8E4C4CA3CDE2E2C2D3D3BECECEC3
+      D3D396A3C7211A8E211A8E211A8E2C2793BCCCD3B6C2C2A8AFAF9BA4B4989DA6
+      9FA1A1A9AFAFB7C2C2A0AAC7211A8E211A8E211A8E211A8E211A8E211A8E211A
+      8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E49
+      479E989FB5AEB7B7AEB8B8B8C5C59DA8C5211A8E211A8E211A8E9CA8C5B3BFBF
+      A2A9A9959898929494999E9EA6B0B0B9C9C94C4CA3211A8E211A8E211A8EBBCD
+      CDA6B1B1959A9A8A8C8C829BEA8FAAEDA3C0F293A8DD211A8E211A8E211A8E70
+      7BC3AAC7F39CB8F09AB7F0A6C2F38090CF211A8E211A8E211A8E4A4CA9B2D1F6
+      9CB9F18AA5ED7F98EB7991EA758EE9758EE9758EE9758EE9758EE9758EE9758E
+      E9758EE9768EE9768EE9768EE97D92DF8198E68AA4EC9CB8F1B2D0F65459B021
+      1A8E211A8E211A8E8091CFA4C0F298B1EF96B0EEA0BBF1B5D1F5211A8E211A8E
+      211A8E737FC3B8CDE0A6B2B5999E9E9091918C8C8C8E8E8E8F8F8F9090909393
+      939C9F9FA8B0B0B9C6C6A1AECB211A8E211A8E211A8E777CB6C0CCCCB9C3C3BB
+      C6C6C5D3D34E4DA4211A8E211A8E4E4DA4C8D5D5C1CBCBC1CBCBC9D5D54E4DA4
+      211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A
+      8E211A8E211A8E211A8E211A8E211A8E3733984D4AA1CCD5D5CED8D8D6E2E221
+      1A8E211A8E211A8E504FA6D6E1E1C6D3EABDC7E6B7C0E2B3BDDFB4BCDFB5BDDF
+      B6BDDFB7BEDFB9C0DEBAC0DEBAC1DEBEC5E0C4CCE4CDD7E8D8E3EF5150A8211A
+      8E211A8E5250A8DBE5EFD2DAE8CCD2E3C8CDDFC7CBDEC9CEDFCDD2E1D1D7E4D8
+      DEE9DFE7EF6B6AB4211A8E211A8E211A8E211A8E211A8E4743A1CED3E1E3E7E7
+      DDE0E0DBDCDCDADADAD9D9D9D9D9D9DADADADBDBDBDCDCDCDCDCDCDCDCDCDDDD
+      DDDDDDDDDEDFDFDFDFDFE1E2E2E3E5E5E6E9E9EAEEEEE1E5ED6F6DB6211A8E21
+      1A8E211A8E211A8E211A8E2E2895C8CAE0E9ECECE7E9E9E8E9E9EAECECEEF2F2
+      5552A9211A8E211A8E211A8EEFF3F3EAEDEDE7E8E8E4E5E5E3E3E3E3E3E3E3E3
+      E3E5E5E5E8E9E9ECEFEFF1F5F5211A8E211A8E211A8E211A8EEFF3F3ECEFEFEB
+      EEEEEDF0F0F0F4F4211A8E211A8E211A8E4944A24944A2211A8E211A8E211A8E
+      4944A2E6E9F0EFF2F2ECEEEEE9EAEAE7E8E8E7E7E7E6E6E6E6E6E6E6E6E6E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECEC
+      ECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F797979797979797979797
+      9797979797969696979797969696969696969696959595959595999A9AA2A7A7
+      B1BABAC3D3D31F19911F19911F19914B4CA6CEE3E3CEE3E3CCE0E0C3D6DE3531
+      9B1F19911F19911F199197A4C9C0D0D0AFB9B999ABD28AA2E9859DE889A0E498
+      ACDCADC0DC99A7D01F19911F19911F19919CA6CCA8B4D29DA7CC787DB96163AD
+      4B4AA335329A1F19911F19911F19911F19911F19911F19911F19911F1991959C
+      BAB3BDBDB2BCBCBAC6C69CA8C61F19911F19911F19919EAAC8B5C2C2A3AAAA97
+      9A9A939595999E9EA7B1B1BACBCB4A4BA51F19911F19911F1991BCCFCFA7B2B2
+      969C9C8B8E8E849DEB91ACEEA4C0F294AADD1F19911F19911F19916E7BC4AAC8
+      F49FBBF19FBBF1ABC8F45C63B81F19911F19911F19918396D1A9C7F495B0EF85
+      9FEC7B94EA7790E9778FE9768FE9768EE9768EE9768EEA768EEA768FE9768EE9
+      768EE9778FEA778FE97790E97C95EA849EEC95B0EFAAC7F48495D11F19911F19
+      911F19915257B2ABC6F39CB6F099B3EFA1BDF1B5D2F51F19911F19911F199155
+      57ABBFD1D1ABB6B69DA2A29395958F90908F8F8F9090909292929798989FA3A3
+      ACB4B4BECCCC98A3C91F19911F19911F1991767BB7BFCBCBB8C2C2BCC6C6C6D3
+      D34C4CA61F19911F19914D4CA6C9D6D6C1CBCBC1CACAC8D4D45859AB1F19911F
+      1991423FA2C2CFDEABB5D3878DC17A7DB95757A94C4BA42A26951F19911F1991
+      1F19911F19911F19911F19911F19912A2695D0DBDBD1DCDCD7E3E32B26961F19
+      911F19914340A2D8E4E4CBD5E1C0CAE8B8C2E3B5BDE1B5BDE0B6BEE0B7BEE0B9
+      C0DFB9C0DFBAC1DFBBC2DFBEC5E1C5CDE5CED7E9D9E3F0504FAA1F19911F1991
+      504FAADBE5F0D2DAE8CCD3E3C9CDE0C8CDDFCCD1E1D0D4E4D6DBE8DEE5EE6A69
+      B61F19911F19911F19911F19912C27968585C1E5EBEBE1E6E6DEE1E1DCDDDDDA
+      DBDBDADADAD9D9D9DADADADADADADBDBDBDCDCDCDCDCDCDCDCDCDDDDDDDDDDDD
+      E0E0E0E2E3E3E4E5E5E7E9E9EBEEEEBBBDDB2C26971F19911F19911F19911F19
+      911F19912C2797C8CAE0EBEEEEE8EAEAE6E7E7E7E8E8EAECECEEF2F25451AB1F
+      19911F19911F1991EFF3F3EAEDEDE7E8E8E4E5E5E3E3E3E3E3E3E4E4E4E6E6E6
+      E8EAEAECEFEFF1F5F55451AB1F19911F19911F1991F0F4F4ECEFEFECEEEEEDF0
+      F0F0F4F41F19911F19911F19911F19911F19911F19911F19912C2797CCCFE5F2
+      F6F6EEF0F0EAECECE8E9E9E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEAEAEAEAEAEAEBEBEB
+      EBEBEBEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F79898989898989797979797979797
+      979898989797979797979797979696969696969696969A9B9BA3A8A8B1BABAC3
+      D3D31E17931E17931E179334319D767DBB767DBB767DBB5557AC1E17931E1793
+      1E1793767DBBCEE3E3BECDCDA8BAD493ACEC8AA2EA859EE989A1EA92ABECA2BD
+      F0A3BCE91E17931E17931E17937D8BCCCBE6F5C5DFF2BBD4EEBCCFE0C5D0D0C6
+      D2D2C8D6D6B8C4D4A7B3D2858CC24C4BA81E17931E17931E1793A2ABC2B6C0C0
+      B3BEBEBAC7C79DA9C81E17931E17931E1793757BB9B9C7C7A7AFAF9A9E9E9699
+      999CA1A1A9B3B3BDCECE494AA71E17931E17931E1793C0D3D3AAB6B6989F9F8C
+      94A287A0EC93AFEFA7C4F396ABDF1E17931E17931E17936D79C5ABC8F4A0BCF2
+      A2BFF3AFCDF53D3DA61E17931E17931E1793A7C2EBA4C0F390ABEF819BEC7993
+      EA7790EA778FEA778FEA768FEA778FEA778FEA768FEA778FEA768FEA768FEA78
+      90EA7890EA7890EA7A92EA839CEC90AAEFA3C0F3B1CDF11E17931E17931E1793
+      3331A0AECBF5A0BBF19CB6F0A4BFF1B6D3F61E17931E17931E1793292498C7DA
+      DAB3C0C0A3ABAB999D9D9495959192929293939696969B9E9EA5ABABB3BEBEC4
+      D4D46D71B71E17931E17931E1793949DC4BEC9C9B8C1C1BCC5C5C6D3D34C4BA8
+      1E17931E17934C4BA8C9D5D5C0CACABFC8C8C6D1D1787CBA1E17931E17931E17
+      93CDDCE4D9EAEAD3E0E0CDD8D8CAD5D5CBD5D5CDD8D8D1DDDDA9B2D0ACB6D57D
+      81BE2A24991E17931E17934D4BA8D2DDDDD1DBDBD5E0E05A5AAF1E17931E1793
+      1E1793C4CFDED1DBDCC4CFE8BCC7E5B7C0E2B6BFE1B9C0E1BAC1E0BAC2E0BBC2
+      E0BCC3E1BDC4E0C0C7E2C7CEE5CFD7EAD9E4F04F4DAC1E17931E1793504EACDC
+      E6F0D3DBE9CDD4E4CACEE0CACEE1CED2E2D3D8E6DAE1EBB2B6DA1E17931E1793
+      1E17931E1793514EABD0D6E6E5EBEBE2E5E5DEE0E0DCDEDEDBDCDCD9DADADADA
+      DADADADADBDBDBDBDBDBDCDCDCDDDDDDDDDDDDDDDDDDDEDEDEDFE0E0E1E1E1E3
+      E4E4E6E9E9EBEEEEA0A1CF1E17931E17931E17931E17931E17931E1793615DB2
+      E2E5EDECEFEFE9EBEBE6E8E8E6E7E7E7E8E8EAECECEEF2F2534FAC1E17931E17
+      931E1793F0F4F4EBEEEEE8E9E9E5E6E6E4E4E4E4E4E4E5E5E5E7E7E7E9EBEBED
+      F0F0F1F6F61E17931E17931E17931E1793F0F3F3EDF0F0ECEEEEEEF0F0F1F5F5
+      1E17931E17931E17933933A02B25991E17931E17932B2599E7EBF3F2F6F6EEF1
+      F1EBECECE9E9E9E8E8E8E7E7E7E8E8E8E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBECECECECECECECECECEBEBEBEBEBEBEBEBEBECECECECECECECECECECECEC
+      ECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7989898989898999999989898989898989898
+      9898989797979797979797979696969696969B9C9CA3A8A8B1BBBBC3D3D31C16
+      951C16951C16951C16951C16951C16951C16951C16951C16951C16951C169580
+      89C1C3D6DEBED3DFA7C2F198B2ED8DA6EB889FE989A0E990A9EB9EB8EFB1CDF4
+      3130A21C16951C1695474AAEC8E5F9BCD9F7B0CCF4A8C3F2B8C6D2C0C9C9C4CE
+      CECBD8D8D4E5E5D5E7E75658AF1C16951C169527239AC1CECEB7C1C1B4BEBEBB
+      C8C89EAAC91C16951C16951C1695757CBCC0D0D0AEB8B8A1A7A79CA1A1A2A9A9
+      B0BCBCC2D5D53D3CA31C16951C16951C1695BACED6AFBEBE9EA7A7939DAF8EA9
+      EE9BB6F1AECBF58FA2DA1C16951C16951C16957583CDA9C6F4A0BDF2A4C1F3B2
+      D0F61C16951C16951C16951C1695B7D5F79FBBF28DA8EE8099EC7992EB7891EB
+      7891EB7891EA7890EB7790EB7790EB7790EB7790EA7790EA7890EA7890EB7991
+      EB7891EB7A92EA809AEC8DA7EEA0BBF2B7D5F727239B1C16951C16951C1695B3
+      CFF6A3BEF29EB9F1A5C0F2B7D4F61C16951C16951C16951C16958A96C6BECECE
+      AFB9B9A3A9A99CA0A0999B9B9A9C9C9DA0A0A5AAAAB0B8B8BECBCBC2D2DA2723
+      9A1C16951C16951C1695B2BDCDBBC5C5B7BFBFBCC5C5C6D3D34A4AA91C16951C
+      16954B4AAAC9D5D5BFC8C8BDC5C5C3CDCDACB7CF1C16951C16951C1695929ACA
+      D7E7E7D0DCDCC9D2D2C6CECEC4CDCDC8D0D0CDD7D7D5E1E1DCEBEBD0DEE61C16
+      951C16951C16956F71B9D1DBDBCED7D7D2DCDC878BC21C16951C16951C169572
+      74BCD8E3E3CDD6DDC2CEE9BDC7E6BDC5E5BDC5E4BDC6E3BEC7E3BFC7E3C0C8E3
+      C1C7E3C3CAE4C9D1E7D1DAEBDAE6F14E4DAE1C16951C16954E4DAEDFE8F1D6DE
+      EBD0D6E6CED2E4CDD2E3D1D5E5D6DCE9DEE5EE6868B91C16951C16951C16956A
+      6ABAEAF3F5E5EBEBE2E6E6DFE2E2DEDFDFDCDDDDDBDCDCDADBDBDBDBDBDADADA
+      DBDBDBDCDCDCDCDCDCDEDEDEDEDEDEDEDEDEDFDFDFE1E1E1E2E3E3E6E7E7E9EC
+      ECB9BBDB1C16951C16951C16951C16951C16953732A1BCBEDDEEF2F2ECEEEEE9
+      EBEBE7E8E8E6E6E6E6E6E6E7E8E8EAEDEDEFF3F3524FAE1C16951C16951C1695
+      F0F4F4ECEEEEE8EAEAE6E7E7E5E5E5E5E5E5E6E6E6E7E8E8EAECECEEF1F1D8DB
+      EB1C16951C16951C16953732A2F0F3F3EDEFEFECEEEEEEF0F0F1F5F51C16951C
+      16951C1695524FAEB0B2DA1C16951C16951C16954541A8E6E9F1EFF2F2ECEEEE
+      EAEAEAE9E9E9E8E9E9E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBECECECECECECECECECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F799999999999999999999999999999999999998989898
+      98989797979797979797979696969B9C9CA4A9A9B1BBBBC3D3D31B15971B1597
+      1B15971B15971B15971B15971B15971B15971B15971B15971B15971B15972622
+      9C8EA0DAB2CDF4A2BCF095ADED8CA4EB89A2EB8EA7EC9AB4EFABC6F26C78C71B
+      15971B15971B15979DB2E1BDDAF7B0CCF4A6C1F2A8BEE5BDC5C5C2CCCCCAD7D7
+      D4E4E4BFCEDE1B15971B15971B15975F61B2C0CCCCB7C0C0B5BFBFBDCACAA0AC
+      CC1B15971B15971B15973D3CA5C8DBDBB8C5C5ACB5B5A8B0B0ADB8B8B9C8C8C0
+      D3DB1B15971B15971B15971B159792A1CAB9CACAA8B5B59EADC09CB6F1A7C3F3
+      B9D6F76670C21B15971B15971B159790A5DFA7C3F4A0BCF3A4C1F3B4D2F71B15
+      971B15971B15974549B0B4D3F79DB9F28BA6EF7F99EC7992EB7991EB7991EB78
+      91EB7891EB7891EB7891EB7890EB7891EB7890EB7991EB7992EB7991EB7991EB
+      7A92EB8099EC8CA6EF9EB9F2B4D2F74549B01B15971B15971B1597B5D1F6A4BF
+      F2A0BAF1A6C1F3B7D4F61B15971B15971B15971B159726229CBFD1DABCCACAB0
+      BABAA8AFAFA5ABABA6ACACA9B0B0B1BABABDC9C9CADBDB5457B01B15971B1597
+      1B15974948AAC2CECEB8C0C0B6BDBDBDC6C6C8D6D64A4AAB1B15971B15974A4A
+      ABC9D5D5BFC7C7BBC2C2BFC7C7CAD5D5332FA11B15971B15973330A1D8E8E8D0
+      DCDCC8D2D2C4CCCCC2CACAC6CECECCD5D5D4E0E0DCEBEB7C80C21B15971B1597
+      1B1597B3BBD4CED6D6CBD2D2CDD5D5CAD3DB27239C1B15971B15971B1597AEB6
+      D7D7E1E1CED8E7C7D2EBC5CFEAC4CEE9C4CEE8C5CEE8C6CFE8C6CFE7C6CEE7C8
+      D0E8CDD6E9D5DFEEDEEAF34E4CAF1B15971B15974E4CAFE2EDF4DAE4EFD5DCEA
+      D1D7E6D1D6E5D3D8E7D8DEEAE0E7F04E4CAF1B15971B15971B1597DEE6F1E9F1
+      F1E4EAEAE2E6E6E0E2E2DFE1E1DFE0E0DCDDDDDCDDDDDBDBDBDBDCDCDCDCDCDD
+      DDDDDEDEDEDEDEDEDFDFDFE0E0E0E0E0E0E2E2E2E4E5E5E7E9E9EBEFEF514DAF
+      1B15971B15971B15971B15976C6ABCE4E8F0EEF1F1EBEDEDE9EAEAE7E8E8E6E6
+      E6E5E5E5E5E6E6E7E8E8EBEDEDEFF3F3514EAF1B15971B15971B1597F0F4F4EC
+      EEEEE8EAEAE6E7E7E5E5E5E7E7E7E8E8E8EAEBEBEDEFEFF1F4F49595CE1B1597
+      1B15971B15975F5CB5EFF2F2EDEFEFECEEEEEEF0F0F2F5F51B15971B15971B15
+      97514EB0F4F9F9A2A3D41B15971B15971B15975F5DB6F1F5F5EEF1F1ECEDEDEA
+      EBEBE9E9E9E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F79B9B9B9A9A9A9A9A9A9A9A9A9A9A9A9999999999999999999898
+      989898989898989797979C9D9DA3A8A8B1BBBBC3D3D319149A19149A19149A30
+      2EA2747BBE747BBE747BBE747BBE5255B019149A19149A19149A19149A19149A
+      8090D4AEC9F39FB9F093ABED8CA5EC8DA6EC96AFEEA4BEF1ABC4EF24219F1914
+      9A19149A2F2EA6B8D3F3B7D3F6AECAF3A9C4F3BCCAD5C6D1D1CDDBDBCADAE23D
+      3CA919149A19149A19149AB3BFCFBBC6C6B4BDBDB5BEBEBFCDCDA2AED019149A
+      19149A19149A19149AA1B0D1C3D5D5BAC8C8B7C4C4BBCACAC6D9D97D88C21914
+      9A19149A19149A19149A3A3BA7C2D7D7B6C7C7ADC3D9ADC9F5B6D4F7BAD7F42F
+      2EA619149A19149A19149AA9C4F0A3BFF39DB9F2A3C0F3B4D2F719149A19149A
+      19149A4448B2B4D3F79DB9F28CA6EF809AED7A92EC7A92EC7992EC7992EC7992
+      EC7991EC7991EC7891EC7991EB7991EB7991EB7A92EC7A92EC7B92EB7B92EB81
+      99EC8CA6EE9DB9F2B5D2F74448B219149A19149A19149AB5D2F6A5C0F3A0BAF1
+      A7C2F3B8D4F719149A19149A19149A19149A19149A3B3BA8BECED7BFCECEB8C4
+      C4B6C1C1B7C1C1BAC6C6C2CFCFCBDCDC5F63B719149A19149A19149A19149A9D
+      A8C9BDC7C7B6BDBDB6BDBDBFC8C8CCD9D94949AE19149A19149A4949AECAD6D6
+      BFC6C6B9BFBFBBC1C1C4CDCD8B91C319149A19149A19149A6265B8D4E2E2CED9
+      D9C9D2D2C8D0D0CAD3D3CFDADAD7E4E4B8C3DD19149A19149A19149A4A49ADD1
+      DADAC9CFCFC5CBCBC8CECED0D8D8797DBF19149A19149A19149A25229FAEB6D8
+      DAE4E6D3DFEDCFDBEFCEDAEECFDAEECED9EDCFDAEDC3CCE7C2CAE6CFD8EBD3DD
+      EDDAE5F1E3EFF74C4BB219149A19149A4C4CB2E7F2F8E0EBF3DBE3EFD7DEEBD6
+      DCEAD7DDEADBE1ECE1E9F14D4CB119149A19149A19149AECF5F5EBF2F2E7ECEC
+      E4E8E8E2E6E6E2E5E5BBBCD5DFE1E1DEDFDFDEDEDEDDDDDDDDDDDDDEDEDEDFDF
+      DFDFDFDFDFDFDFE0E0E0E0E0E0E2E3E3E5E6E6E9EBEBD3D6E719149A19149A19
+      149A19149A7978C3F1F6F6EEF1F1EAEDEDE9EAEAE7E8E8E7E7E7E6E6E6E6E6E6
+      E6E7E7E8E9E9EBEDEDEFF3F3504DB219149A19149A19149AF1F5F5EDF0F0EAEB
+      EBE8E9E9E7E8E8E8E8E8E9EAEAECEEEEEFF2F2E5E9F12722A019149A19149A19
+      149AA0A1D3EEF1F1ECEEEEECEEEEEEF0F0F2F5F519149A19149A19149A504DB2
+      F5F9F9F5F9F96C6ABD19149A19149A19149A6B6ABDF1F4F4EFF1F1ECEEEEEBEB
+      EBEAEAEAE9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAE9E9E9EA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEAEAEAEBEBEBEAEAEA
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F79C9C9C9B9B9B9A9A9A9A9A9A9A9A9A9A9A9A9A9A9A999999999999999999
+      9898989797979C9D9DA4A9A9B1BBBBC3D3D318139C18139C18139C4647AECEE3
+      E3C9DCDCC1D2D2BFCFCFC1D3D3B4C5D65155B418139C18139C18139C18139C92
+      A5E0A8C3F299B3EF90A9EC8DA5EC91A9ED9CB5EFABC6F3879ADA18139C18139C
+      18139C2E2DA898ACE2BAD7F7B5D2F6BBD3EECEDBDBBBC9DA3C3AAA18139C1813
+      9C18139C676CB9C1CCCCB7BFBFB2B9B9B6BFBFC1CECEA3B0D218139C18139C18
+      139C18139C231FA1A0AED1C6D9D9C5D7D7C9DDDD9FAFD1231FA018139C18139C
+      18139C2320A018139C5B60B6B6CAD2BCD5E4BEDCF9BAD7F45A61BF18139C1813
+      9C18139C4246B3ABC7F59DB8F29AB4F2A1BDF3B4D1F718139C18139C18139C2E
+      2CA8B6D4F79FBBF38DA7F0829AED7A93EC7A93EC7A93EC7A92EC7A92EC7992EC
+      7A92ED7A92EC7A93EC7A92EC7A92EC7B93EC7B93EC7B93EC7B93EC829BED8EA8
+      F0A0BBF3B7D4F7393AAE18139C18139C18139CB5D2F6A5C0F3A1BBF2A7C2F3B9
+      D5F718139C18139C18139C18139C18139C18139C241FA18891C6BCCBD3C5D4D4
+      C6D5D5CADADA97A1CC3B3AAA18139C18139C18139C18139C686DB9C2CECEB8C0
+      C0B2B8B8B5BCBCC0C9C9CEDCDC4848AF18139C18139C4848AFC9D5D5BDC5C5B7
+      BCBCB7BCBCBEC4C4C9D3D34747AE18139C18139C18139C6163B9CAD6DFD2DDDD
+      D0DBDBD2DDDDD5E2E29199CD2420A118139C18139C18139CB1B9D2CBD2D2C4C9
+      C9C2C5C5C4C8C8CAD0D0D4DDDD3D3BAA18139C18139C18139C18139C6465BBB9
+      C2DDDBE9F3DBE9F5DAE7F4CDD9EE8F96D2302CA7A5ACDAD5DFEFD9E4F1E0ECF5
+      E5F2F84B4BB318139C18139C4C4BB3E7F3F8E6F1F7E1EAF3DDE5F0DBE2EDDBE1
+      EDDDE3EEE1E9F17374C418139C18139C18139CAAAED9EDF4F4EBF1F1E8EEEEE7
+      ECECB2B4D7251FA1E2E4E4E0E1E1DEDFDFDEDEDEDEDEDEDEDEDEDFDFDFE0E0E0
+      E0E0E0E1E1E1E1E1E1E3E4E4E6E7E7EAEDEDB9BCDE18139C18139C18139C2621
+      A2F3F8F8F0F4F4EDEFEFEAECECE8E9E9E7E8E8E7E8E8E8E8E8E6E7E7E7E7E7E8
+      E9E9EBEDEDF0F3F34F4DB318139C18139C18139CF2F6F6EFF1F1ECEEEEEAEBEB
+      EAEBEBEAECECEDEFEFEFF2F2F2F6F66B69BF18139C18139C18139C3430A8F1F4
+      F4EEF0F0ECEDEDECEEEEEEF1F1F2F5F518139C18139C18139C4F4DB3F5F9F9F4
+      F8F8F4F8F84F4DB318139C18139C18139CA1A1D5F1F4F4EEF0F0ECEDEDEBEBEB
+      EAEAEAE9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEAEA
+      EAEAEAEAEAEAEAEBEBEBEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECEB
+      EBEBECECECECECECECECECEBEBEBEBEBEBECECECECECECECECECECECECECECEC
+      ECECECEDEDEDECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEEEEEEEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEEEEEEEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F2F2F2F1F1F1F2F2F2F1F1F1F2F2F2F2F2F2F1F1F1F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F2F2F2F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F4F4F4F4F4F4F4F4F4F3F3F3F4F4F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F4F4F4F4F4F4F5F5F5F4F4F4F4F4F4F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F6F6F6F5F5F5F6F6F6F6F6F6F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F6F6F6F7F7F7F7F7F7
+      F7F7F7F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F79C9C
+      9C9C9C9C9C9C9C9B9B9B9B9B9B9B9B9B9B9B9B9A9A9A9A9A9A99999999999998
+      98989D9E9EA4A9A9B2BBBBC3D3D316129E16129E16129E4447B0CBDFDFBDCCCC
+      B3BEBEAEB8B8B2BDBDBAC9CCC3DEF65A62C116129E16129E16129E2C2BA9B3CE
+      F5A1BBF194ADEE8DA5ED8DA5ED95AEEEA1BBF1AFCAF4555DC016129E16129E16
+      129E16129E3739AF6D79CC6D79CC5254B616129E16129E16129E16129E3939AA
+      C5D1D1B9C2C2B2B8B8B1B6B6ACB3BC979FC37E86C416129E16129E16129E2D2C
+      A716129E16129E3939AB4446AF3939AB16129E16129E16129E16129E2D2CA670
+      79BF16129E16129E211EA24246B44246B5211EA416129E16129E16129E16129E
+      8DA3E1A2BDF396B1F195B0F19FBAF3B1CFF6211FA416129E16129E16129EBBD8
+      F9A4BFF491ABF1839DEF7D96ED7B94ED7B93ED7B93ED7A93ED7A93ED7A93ED7B
+      93ED7B93ED7B94ED7B93ED7C94ED7B93ED7C94ED7E97EC849DEE92ABF0A4BFF4
+      BBD8F816129E16129E16129E16129EB4D0F6A5BFF3A0BAF2A7C2F4B9D5F71612
+      9E16129E16129E4547B05C61B916129E16129E16129E16129E4546B04546B016
+      129E16129E16129E16129E16129E16129E3939ABC5D2D2BAC3C3B3B8B8B2B6B6
+      B6BCBCA1A7C2A0A9CD3B3AAC16129E16129E4647B0C7D2D2BDC3C3B5B9B9B4B8
+      B8B9BDBDC2CACAC2CCD43A3AAB16129E16129E16129E221FA36062BA777CC36C
+      70BF2F2CA816129E16129E16129E16129E8E93C8CED6D6C7CBCBC1C3C3BEC0C0
+      C0C2C2C5C9C9CDD4D4C9D2DB3C3BAC16129E16129E16129E16129E16129E1612
+      9E302DA916129E16129E16129E16129EA9B1DEDAE5F24848B416129E16129E16
+      129E16129E16129E16129E16129E16129E16129E16129E16129EACAFDBDDE4EE
+      E0E7F0B1B6DE16129E16129E16129E16129E7475C48283CA8182C93E3BAE1612
+      9E16129EE4E7E7E1E3E3E0E1E1DFDFDFDEDEDEDFDFDFE0E0E0E1E1E1E1E1E1E2
+      E2E2E2E2E2E4E5E5E7E8E8EAEDEDB9BBDE16129E16129E16129E4E4CB5F4F9F9
+      F1F5F5EEF0F0ECEDEDEAECECEAEBEBEAEBEBE9EAEAE8E9E9E8E9E9EAEBEBECEE
+      EEF1F4F44E4CB516129E16129E16129EF4F9F9F1F5F5EFF1F1EDEFEFEDEFEFEE
+      F1F1F1F4F4F3F7F76A68C016129E16129E16129E16129EA0A0D5EFF2F2ECEEEE
+      ECEDEDEDEEEEEFF1F1F2F6F616129E16129E16129E4E4CB5F4F8F8F2F6F6F2F5
+      F5E5E9F1403DAF16129E16129E16129EAEAFDBF1F4F4EFF1F1EDEEEEEBECECEB
+      EBEBEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECEBEBEBECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F79D9D9D9C9C9C
+      9C9C9C9C9C9C9B9B9B9B9B9B9B9B9B9B9B9B9A9A9A9A9A9A9999999999999C9D
+      9DA5AAAAB2BBBBC3D3D31510A11510A11510A14345B2C3D5D5B3BEBEA7AEAEA0
+      A6A6A2AAAEA8BFE7B5D0F5BBD5F3201DA61510A11510A11510A19CB2E7A8C2F3
+      98B1F08FA7EE8CA4ED8FA8EE98B1F0A3BDF2B0CBF57280D11510A11510A11510
+      A11510A11510A11510A11510A11510A11510A11510A15B5DB7BCC6CFBCC4C4B4
+      B9B9AEB2B2AEB3B3ACB2BB2B28A61510A11510A11510A11510A196A2CF3838AD
+      1510A11510A11510A11510A11510A11510A11510A11510A1A9BBD6CBE1E13737
+      AC1510A11510A11510A11510A11510A11510A11510A11510A1535BC1A9C5F599
+      B4F290AAF090ABF19BB6F3AECBF64145B71510A11510A11510A195ABE3A9C6F5
+      96B1F288A1EF7F97EE7C94ED7B94ED7B94ED7B94ED7B93ED7B94EE7B94ED7B94
+      ED7C94ED7C94ED7C94ED7C94ED7D95ED8098EE88A1EF97B0F2ABC6F5A0B7E815
+      10A11510A11510A14145B7B1CDF6A3BCF39FB8F2A7C1F4B9D5F71510A11510A1
+      1510A14445B2D2E5E55C60BA1510A11510A11510A11510A11510A11510A11510
+      A11510A11510A11510A1676BBCC6D2D2BDC5C5B5BABAB0B3B3B1B4B4B6BBBB6B
+      6CB41510A11510A11510A11510A12C2AA9C4CDCDBBC0C0B4B7B7B2B4B4B4B7B7
+      BCC1C1C4CCCCC1CCD44545B11510A11510A11510A11510A11510A11510A11510
+      A11510A11510A1211EA58D93C9CFD7D7C8CDCDC2C5C5BEC0C0BCBDBDBEBFBFC1
+      C3C3C8CCCCCED5D5CAD2DB6D6FC01510A11510A11510A11510A11510A11510A1
+      1510A11510A11510A11510A1AAB3DFDDE8F44847B61510A11510A11510A11510
+      A11510A11510A11510A11510A11510A11510A11510A1ACB0DCDCE3EEDEE5EFE2
+      E9EF7172C31510A11510A11510A11510A11510A11510A11510A11510A11510A1
+      E5E8E8E1E3E3E0E1E1E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E3E3E3E3E3
+      E3E4E5E5E7E8E8EBEDEDC7C8E31510A11510A11510A11510A1E6EAF3F2F6F6F0
+      F3F3EEF1F1EDF0F0EDF0F0EDEFEF9B9AD1EAECECEAEBEBEBECECEDEFEFF1F4F4
+      4D4AB71510A11510A11510A1F5F9F9F4F8F8F2F6F6F1F5F5F1F5F5F2F6F6BCBE
+      E23E3CB21510A11510A11510A11510A16967C1F1F4F4EEF0F0ECEDEDEBECECEC
+      EDEDEFF1F1F2F6F61510A11510A11510A14D4BB7F4F7F7F1F4F4F1F3F3F2F4F4
+      CACCE7231FA61510A11510A1221FA7CACCE7F2F4F4EFF1F1EDEEEEECECECEBEC
+      ECEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F79E9E9E9E9E9E9D9D9D9D
+      9D9D9D9D9D9C9C9C9C9C9C9B9B9B9B9B9B9A9A9A9999999999999D9E9EA5AAAA
+      B2BBBBC3D3D3130FA3130FA3130FA34244B3BECECEACB6B69EA4A4979A9A94A8
+      DE9DB5F0ACC5F3BDD9F7646EC9130FA3130FA3130FA36A76CDADC8F49CB5F090
+      A8EE8AA3ED8CA4ED91AAEE99B1F0A3BCF2ACC7F4A2BAEB535BC3130FA3130FA3
+      130FA3130FA3130FA3130FA34F50B69EA6CAC5CFCFBDC5C5B5BABAAFB2B2ACAF
+      AFADB1B1B3B9B99297BC130FA3130FA3130FA3130FA39EABD0BFCFD8585CB813
+      0FA3130FA3130FA3130FA3130FA32A29AAA1B0CBBDCECEB9CACAB0BFC8686EB8
+      1E1BA6130FA3130FA3130FA3130FA32929AE6F7DD2AAC6F69CB8F391AAF18BA4
+      F08DA6F097B2F2A9C6F66976CE130FA3130FA3130FA3626DCAB2CFF79DB8F48D
+      A7F1839CEF7E97EE7C95EE7C95EE7C94EE7C95EE7C94EE7C95EE7C95EE7D95EE
+      7D95EE7D95EE7D95EE8098EE849DEE8EA7F09DB8F3B2CEF7626DC9130FA3130F
+      A3130FA3606AC9ADC7F59FB9F39DB7F2A8C1F4B9D5F8130FA3130FA3130FA343
+      45B4D2E6E6D2E4E49FABD04243B2130FA3130FA3130FA3130FA3130FA3130FA3
+      4F51B69EA6CBC4CFCFBEC5C5B6BBBBB1B4B4AEB1B1B1B3B3B6BABABFC6C62A27
+      A9130FA3130FA3130FA3130FA3C0C7C7B9BDBDB3B5B5B1B2B2B1B3B3B6B9B9BD
+      C2C2C4CBCBCCD5D58A8FC73837AF130FA3130FA3130FA3130FA3130FA31F1DA7
+      5D5FBBBBC3D6CED5D5C8CECEC3C6C6BFC1C1BCBDBDBCBDBDBDBDBDBFC0C0C4C6
+      C6C9CDCDCED4D4D5DDDDAAAFD46163BF201DA8130FA3130FA3130FA3130FA313
+      0FA3130FA32D2BAEB5BEE4DBE6F34646B8130FA3130FA3130FA3130FA3130FA3
+      130FA3130FA3130FA3130FA3130FA3130FA3AAAEDBDBE0ECDCE1E6E0E4E4E4E8
+      E8A5A7D52E2BAD130FA3130FA3130FA3130FA3130FA3201DA84846B5E4E7E7E3
+      E5E5E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E2E2E2E2E2E2E3E3E3E3E3E3E5E5E5
+      E8E9E9EAECECEFF2F22F2CAE130FA3130FA3130FA35A58BEE6EAF4F3F7F7F2F5
+      F5F1F4F4C6C8E44A48B74A47B6ECEDEDEBECECEBECECEDEFEFF1F4F44C4AB913
+      0FA3130FA3130FA38484CE8484CE8484CE8384CE7676C92F2CAE130FA3130FA3
+      130FA3130FA3130FA34B49B8E3E7F0EFF1F1ECEEEEEBEBEBECECECEDEEEEEFF1
+      F1F3F6F6130FA3130FA3130FA34C4AB9F3F6F6F0F2F2EFF1F1F0F1F1F2F4F4BC
+      BDE2130FA3130FA3130FA3211EA8E5E8F1F0F2F2EEEFEFEDEDEDECECECEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEEEEEEEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F79F9F9F9F9F9F9E9E9E9E9E9E9D9D
+      9D9D9D9D9C9C9C9C9C9C9B9B9B9B9B9B9A9A9A9999999D9E9EA5AAAAB2BBBBC3
+      D3D3120EA5120EA5120EA54143B5BDCCCCA9B2B29CA0A091A0CC8EA7EE97B0F0
+      A5BEF3B8D3F791A3DF120EA5120EA5120EA56B77CFB1CBF59EB8F292AAEF8BA3
+      EE8AA2ED8DA4EE90A9EF97B0F09EB8F2A6C1F3ADC8F5B3CEF68DA1E28EA2E28E
+      A2E28DA0E2ADC3EBC6D0D0C1C9C9BBC2C2B5B9B9AFB2B2ABADADAAABABABAEAE
+      AFB3B3B5BCBCBBC3C3BEC8C8C0CBCBBFCBCBBDC9C9BCC8C8BBC8C8B2BFC9949E
+      C3949FC5949FC59CA7C4B6C4C4B1BDBDABB6B6A9B3B3AAB5B5ADB9B9B2C0C08A
+      9FE28CA1E28CA1E395ABE7ADC9F6A5C1F59BB5F392ABF18AA3F0879FEF89A3F0
+      93ADF2A4BFF59AB1E8120EA5120EA5120EA51C1BAAB0CCF4A7C3F695B0F388A2
+      F0829AF07E96EE7D96EF7C95EE7D95EF7D95EF7D95EE7D95EE7D96EE7D95EE7E
+      96EE7F98EE829AEF89A2F095AFF2A7C3F5BCD9F91C1BAA120EA5120EA5120EA5
+      9CB2E9A6C1F59CB5F39CB5F2A6C0F4B9D5F7120EA5120EA5120EA54244B5D2E4
+      E4C8D7D7C4D0D0C3CFCFBAC5CE9CA4C99DA5CB9DA6CC9DA6CCC9D5D5C6D0D0C1
+      C9C9BBC2C2B5B9B9B2B4B4AEB0B0AEAFAFB1B3B3B4B7B7BBC0C0C2CACAC7D0D0
+      C9D3D3C8D1D1C3CBCBBCC2C2B7BABAB2B4B4B0B1B1B0B1B1B3B5B5B8BBBBBCC1
+      C1C2C8C8C8D0D0CCD5D5B8C0D3A2A8CEA3A9CFA3AACFAEB5D1D0D9D9CED5D5CB
+      D1D1C6CBCBC2C5C5BFC1C1BEBEBEBCBCBCBBBBBBBDBDBDBEBEBEC1C2C2C4C6C6
+      C9CCCCCED3D3D4DBDBDBE4E4E3EEEEBCC5E24747B8120EA5120EA5120EA5888D
+      CFDEE8EDD8E1EED6E0F0DAE5F2E0ECF6E6F2F94747BA120EA5120EA54847BAE9
+      F3F9E9F2F8E4EDF5DFE7F1DDE3EDDBDFE6DADCDDDBDDDDDDDFDFDFE2E2E3E6E6
+      E6EAEAC0C3DFB3B6DBB4B7DCB4B7DCC1C3DFE7EBEBE6E9E9E3E5E5E2E3E3E1E2
+      E2E0E1E1E1E1E1E1E1E1E1E1E1E3E3E3E4E4E4E4E4E4E5E5E5E6E6E6E7E8E8EA
+      EBEBEDF0F0ABACDB120EA5120EA5120EA5120EA51F1DAA4A49BA4A49BA2D2BAF
+      120EA5120EA54A47B8EDEFEFECEDEDECEDEDEDEFEFF0F3F34B49BA120EA5120E
+      A5120EA5120EA5120EA5120EA5120EA5120EA5120EA5120EA5120EA5120EA512
+      0EA57575C9F2F5F5F0F2F2EEEFEFECEDEDEBEBEBEBEBEBEDEDEDEFF0F0F2F4F4
+      120EA5120EA5120EA52E2BAFF2F5F5F0F1F1EEF0F0EEF0F0F0F1F1F2F5F59FA0
+      D9120EA5120EA5120EA53C3AB4E4E6EFF0F1F1EDEEEEEDEDEDECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECECECECECECEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEFEFEFEFEFEFEFEFEFEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F79F9F9F9F9F9F9F9F9F9E9E9E9E9E9E9D9D9D
+      9D9D9D9C9C9C9B9B9B9B9B9B9A9A9A9999999D9E9EA5AAAAB2BBBBC2D2D2100D
+      A8100DA8100DA84043B7BDCCCCA9B2B29AAAD18FA8EE8FA7EE97AFF0A5BEF2B6
+      D1F69CB0E5100DA8100DA8100DA83E43BDB2CCF5A1B9F293ABEF8BA3ED89A1ED
+      8BA3EE8DA4EF90A8EF95ADF09AB3F19FB9F2A4BDF3A7C1F4A8C2F4A8C2F4A7C1
+      F3A4BDF3B1BED3B8BCBCB4B7B7AFB1B1ADAEAEAAABABAAAAAAAAACACACAFAFAF
+      B3B3B2B7B7B3BABAB3BABAB3BABAB0B7B7AFB6B6AFB7B7AFB8B8B1BABAB1BBBB
+      AFB9B9ACB5B5A6AFAFA2A9A99FA5A59CA2A29DA4A49FA7A7A3ABABA1BDF4A4BF
+      F5A4BFF5A1BCF49CB6F496B0F390A9F28AA3F1859EF0839DF0869FF08FA9F29E
+      B9F4B1CEF73235B7100DA8100DA8100DA86B79D1B3D0F8A1BCF591ABF287A1F1
+      829BF08098EF7E96EF7D96EF7E96EF7E96EF7E96EF7E96EF7E96EF8098EF849C
+      F088A0F091ABF1A0BBF4B3D0F86B79D1100DA8100DA8100DA82728B2B4D0F7A1
+      BAF399B1F29AB3F2A7C0F4BAD5F8100DA8100DA8100DA84144B8CDDCDCC1CCCC
+      BCC5C5BAC1C1BBC2C2BEC6C6C1C9C9C1C9C9C1C9C9BEC5C5BBC1C1B8BDBDB4B8
+      B8B2B4B4AFB0B0AEAEAEAFAFAFB0B2B2B5B7B7BABEBEBFC5C5C3CBCBC5CDCDC4
+      CCCCC1C7C7BBC0C0B6B9B9B3B4B4B0B1B1B1B1B1B2B2B2B4B5B5B8BABABBBFBF
+      BFC4C4C3C8C8C6CDCDC9D0D0C9D1D1CAD1D1C9CFCFC8CDCDC5CACAC3C6C6C0C2
+      C2BFC1C1BCBDBDBCBCBCBBBBBBBCBCBCBEBEBEBEBFBFBFC0C0C2C3C3C5C6C6C7
+      CACACDD2D2D5DCDCDEE7E7CAD4E7100DA8100DA8100DA87A7FCCE2EBEBDBE1E1
+      D6DADAD4D9DBD8DEE6DEE7EFE6F1F74647BC100DA8100DA84647BCE9F3F8E4EC
+      F3DFE6EBDDE1E4DBDEDEDADCDCD9DADAD9DADADADCDCDDDEDEDFE1E1E2E4E4E3
+      E6E6E4E7E7E5E8E8E6E9E9E6E9E9E5E7E7E4E6E6E2E3E3E2E3E3E2E2E2E1E1E1
+      E2E2E2E2E2E2E2E2E2E4E4E4E4E4E4E5E5E5E6E6E6E6E6E6E7E8E8E9EAEAECEE
+      EEEFF2F29D9ED8100DA8100DA8100DA8100DA8100DA8100DA8100DA8100DA810
+      0DA84847BBEEF0F0ECEEEEECEDEDEDEFEFEFF2F24947BC100DA8100DA8100DA8
+      100DA8100DA8100DA8100DA8100DA8100DA8100DA8100DA85857C0C8CAE7F1F4
+      F4EFF1F1EEEFEFECEDEDEBEBEBEAEBEBECECECEDEEEEEFF0F0F1F4F4100DA810
+      0DA8100DA8100DA8F1F3F3EFF0F0EDEEEEEEEFEFEFF0F0F1F2F2F3F5F55857C0
+      100DA8100DA8100DA84947BBF0F1F1EEEFEFEDEDEDECECECECECECECECECECEC
+      ECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEEEEEEEFEFEFEEEEEEEFEFEFEEEE
+      EEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F0F0F0F1F1F1F1F1F1F0F0F0F0F0F0F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7A0A0A0A0A0A09F9F9F9F9F9F9F9F9F9E9E9E9E9E9E9D
+      9D9D9C9C9C9B9B9B9B9B9B9A9A9A9D9E9EA5AAAAB2BBBBC3D3D30F0CAA0F0CAA
+      0F0CAA3F42B8BCCBCBA8B8CE99B2F191A9EF92A9EF9AB3F1A8C2F4BBD6F78495
+      DD0F0CAA0F0CAA0F0CAA6A77D2B2CCF69FB9F293ACF08CA5EE8AA1EE89A1EE8A
+      A2EE8CA4EF8EA6EF91A8EF94ACF096AFF198B2F19AB3F19AB3F199B1F196AFF1
+      97ADE9B1B3B3AFB0B0ADAEAEABABABAAAAAAAAAAAAAAABABABACACACAEAEACAE
+      AEACAFAFABAEAEA9ADADA7ABABA6A9A9A4A8A8A5A9A9A4A9A9A4A9A9A2A7A7A0
+      A4A49CA0A0989B9B959898949696949696959999959FB193ADF294AEF294AEF2
+      92ABF28FA9F18CA5F188A1F0859EF0839BEF829AEF859DF08CA5F197B2F3A9C4
+      F67B8CDB0F0CAA0F0CAA0F0CAA1A19AF9EB6EBAECAF79EB9F591AAF388A1F184
+      9CF18099F07F98F07E97EF7E97EF7F97EF8098EF8199EF839CF089A2F191ABF2
+      9EB8F4AFCAF7AAC3F01A19AF0F0CAA0F0CAA0F0CAA7D8DDBACC7F69BB3F394AD
+      F299B1F2A7C0F4BAD5F80F0CAA0F0CAA0F0CAA4043BBCAD7D7BEC6C6B6BCBCB3
+      B7B7B2B5B5B5BABAB8BCBCB8BCBCB8BCBCB7BABAB5B8B8B3B5B5B2B3B3B1B2B2
+      B0B0B0AEAFAFB0B0B0B1B2B2B4B6B6BABDBDBFC4C4C4CACAC5CCCCC5CCCCC2C8
+      C8BCC0C0B7BABAB3B5B5B1B1B1B0B0B0B1B2B2B3B4B4B5B6B6B7B8B8B9BBBBBC
+      BFBFBEC1C1C0C4C4C1C5C5C2C5C5C1C4C4C1C4C4BFC2C2BEC0C0BEBEBEBCBDBD
+      BCBCBCBCBCBCBEBEBEBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1C3C3C3C5C7C7CACC
+      CCD1D6D6DAE2E2A1A7D90F0CAA0F0CAA0F0CAAD9E3ECDEE6E6D7DCDCD2D5D5D2
+      D5D5D6D9D9DDE3E3E5EDED4646BC0F0CAA0F0CAA4646BCE7EEEEE1E6E6DCDFDF
+      DADCDCD9DADAD9D9D9D8D8D8D8D9D9D9DADADBDCDCDDDEDEDFE0E0E0E1E1E0E2
+      E2E1E3E3E2E4E4E2E4E4E3E4E4E2E3E3E1E1E1E2E2E2E1E1E1E3E3E3E3E3E3E3
+      E3E3E3E3E3E4E4E4E5E5E5E5E5E5E6E6E6E6E6E6E7E7E7EAEAEAEBECECEDEFEF
+      F0F2F2C7C9E76564C60F0CAA0F0CAA0F0CAA0F0CAA0F0CAA1D1BAF4846BC9B9B
+      D7EDEFEFECEDEDECECECECEDEDEFF0F06463C54847BC4947BD4947BD4948BD49
+      47BD4947BD4947BD4947BD6665C79E9FDAD6D9ECF2F5F5F1F3F3EFF1F1EEEFEF
+      EDEDEDECECECEBECECEBEBEBECECECECEDEDEEEFEFF0F2F24846BC4846BC4846
+      BC4846BCF0F2F2EFF0F0EEEEEEEDEEEEEEEEEEEFF0F0F1F2F2E4E5EF5755C148
+      47BC4847BC4846BC9B9BD7EFF0F0EEEEEEEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEE
+      EEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7A2A2A2A1A1A1A0A0A0A0A0A09F9F9F9F9F9F9E9E9E9D9D9D9D9D
+      9D9C9C9C9B9B9B9A9A9A9D9F9FA5AAAAB2BBBBC3D3D30D0AAC0D0AAC0D0AAC3D
+      40BABED3DEACC5F59EB7F298B1F19AB2F1A4BCF3B1CCF6C3DEF9555ECA0D0AAC
+      0D0AAC0D0AAC7381D7AFC9F69EB8F393ABF18DA4EF8AA2EF8AA2EF8AA2EF8AA2
+      EF8BA2EF8BA4EF8CA5F08EA6F08FA7F090A7F090A7F08EA7F08DA6F08CA4F0A1
+      AAC8AEAEAEADAEAEACACACABABABABABABAAABABAAAAAAAAAAAAA8A9A9A8A9A9
+      A6A7A7A5A6A6A3A4A4A1A2A29FA0A09D9F9F9C9E9E9C9E9E9A9C9C989A9A9697
+      979393939192929090908F90908F91918D95A989A2F189A2F189A2F189A1F188
+      A0F1859FF1849CF0839BF0829AF0829AF0839CF088A2F192ACF3A0BBF5B2CFF8
+      3B40C00D0AAC0D0AAC0D0AAC3033BBB3CEF5ADC9F79FBAF593AEF38CA6F287A1
+      F1859EF1839CF1839CF1849CF1869EF188A1F18DA6F294AFF39FBAF5AEC9F7B3
+      CEF53033BB0D0AAC0D0AAC0D0AAC3033BBB5D0F8A3BCF495ADF291A8F198B0F2
+      A6C0F5BBD6F80D0AAC0D0AAC0D0AAC3E41BECAD6D6BDC4C4B4B8B8AFB1B1AFB0
+      B0B0B2B2B2B3B3B2B4B4B3B4B4B2B3B3B1B2B2B2B2B2B1B1B1B0B1B1B0B0B0B0
+      B0B0B0B0B0B2B2B2B6B8B8BCBFBFC1C6C6C7CFCF9BA1C9A6ACCBC5CDCDBFC4C4
+      BABDBDB5B6B6B2B3B3B2B2B2B2B2B2B3B3B3B3B4B4B5B5B5B7B7B7B8B8B8B9BB
+      BBBABBBBBABBBBBCBDBDBCBDBDBCBDBDBCBDBDBBBCBCBCBCBCBCBCBCBDBDBDBD
+      BDBDBEBEBEBEBEBEC0C0C0C0C0C0C1C1C1C2C2C2C2C2C2C4C5C5C8CACACFD3D3
+      D7DEDE777ACB0D0AAC0D0AAC0D0AACE5EFEFDDE4E4D6DADAD1D4D4D2D4D4D6D9
+      D9DDE2E2E6EEEE4444BE0D0AAC0D0AAC4444BEE4EAEADEE2E2D9DBDBD7D8D8D7
+      D8D8D8D8D8D7D8D8D8D8D8D9DADADBDBDBDCDCDCDDDEDEDEDEDEDFE0E0DFE0E0
+      E0E0E0E1E1E1E1E2E2E1E1E1E1E1E1E1E1E1E3E3E3E3E3E3E4E4E4E4E4E4E5E5
+      E5E5E5E5E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E9E9E9EAEAEAECEDEDEDEFEFF0
+      F1F1F1F3F3F2F5F5C8C9E7BABBE3BABBE3D5D8ECF1F4F4F0F2F2EFF0F0EDEEEE
+      ECEDEDECECECECEDEDEDEEEEEFF0F0F0F2F2F1F3F3F2F5F5F3F5F5F3F5F5F3F5
+      F5F2F5F5F2F5F5F2F4F4F1F3F3F0F2F2EFF1F1EEEFEFEEEFEFEDEEEEEDEDEDEC
+      ECECECECECECECECECECECEDEDEDEEEEEEEFF0F0F0F2F2F1F2F2F1F2F2F0F2F2
+      EFF0F0EEEEEEEDEDEDEDEDEDEEEEEEEFEFEFF0F1F1F1F2F2F1F3F3F2F3F3F1F3
+      F3F1F2F2EFF0F0EEEFEFEEEEEEEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7A2A2A2A2A2A2A2A2A2A1A1A1A0A0A0A0A0A09F9F9F9E9E9E9E9E9E9D9D9D
+      9B9B9B9A9A9A9D9F9FA6ABABB2BBBBC3D3D30C09AE0C09AE0C09AE3D40BDC3DF
+      F9B3CDF6A8C1F4A3BCF3A6BFF4B0CAF6BED9F8A8BEED0C09AE0C09AE0C09AE0C
+      09AE9CB1EAABC4F59CB4F292AAF08CA4EF8BA3EF8BA3EF8BA2EF8BA3F08BA3F0
+      8BA2F08AA2EF8AA2F08BA3F08BA3F08BA2F08BA2F089A1F089A1F08DA2E7ADAD
+      ADADADADADADADADADADACACACABABABAAAAAAA9A9A9A8A8A8A7A7A7A5A5A5A3
+      A3A3A1A1A19F9F9F9C9C9C9A9A9A999999989898969696959595939393919191
+      9090908F8F8F8E8E8E8D8D8D8992B1859DF0859DF0859DF0849DF0839CF0839B
+      F0839BF0839BF0829BF0829BF0839BF0869EF18DA5F299B3F4A8C3F798AFEB18
+      17B30C09AE0C09AE0C09AE2E32BCB3CFF5B0CDF8A5C0F69BB5F594AEF490AAF3
+      8EA7F28DA7F28EA8F290A9F395AFF39CB6F5A5C0F6B1CDF8B4CFF52F33BC0C09
+      AE0C09AE0C09AE1817B39AB0EBAAC4F69BB4F491A8F28FA6F298AFF3A7C0F5BC
+      D6F80C09AE0C09AE0C09AE3D41C1CAD6D6BDC4C4B5B8B8AFB0B0ADADADAEAFAF
+      AFB0B0B0B1B1B1B2B2B1B1B1B2B2B2B2B2B2B2B2B2B2B2B2B3B3B3B3B3B3B3B3
+      B3B5B5B5B9BABABFC2C2C6CCCC3C3CB80C09AE0C09AE5F62BFC4CACABDC1C1B8
+      BABAB4B5B5B3B3B3B3B3B3B4B4B4B4B4B4B5B5B5B5B5B5B6B6B6B7B7B7B7B8B8
+      B8B9B9B8B9B9BABBBBBABABABBBBBBBBBBBBBCBCBCBDBDBDBEBEBEBEBEBEBFBF
+      BFBFBFBFC1C1C1C1C1C1C2C2C2C3C3C3C3C3C3C5C5C5C9CACACFD2D2D6DCDC90
+      95D30C09AE0C09AE0C09AED8E2ECDFE7E7D9DEDED5D8D8D5D8D8D9DDDDE0E6E6
+      E8F0F00C09AE0C09AE0C09AE4443BFE3E8E8DDE0E0D9DADAD7D7D7D7D7D7D8D8
+      D8D8D8D8D9D9D9DADADADBDBDBDCDCDCDDDDDDDDDDDDDEDEDEDEDEDEDFDFDFE0
+      E0E0E1E1E1E1E1E1E2E2E2E2E2E2E3E3E3E4E4E4E4E4E4E4E4E4E5E5E5E6E6E6
+      E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E9E9E9EAEAEAEBECECECEDEDEDEEEEEEEF
+      EFEFF1F1F0F1F1F0F2F2F0F2F2F0F1F1F0F1F1EFF0F0EEEFEFEDEDEDECECECEC
+      ECECECECECEDEDEDEEEEEEEEF0F0EFF0F0EFF1F1F0F1F1F0F1F1F0F1F1EFF1F1
+      EFF1F1EFF0F0EFF0F0EFF0F0EEEFEFEDEEEEEDEDEDECEDEDECECECECECECECEC
+      ECECECECECECECEDEDEDEDEDEDEFEFEFEFF0F0EFF0F0F0F1F1EFF0F0EFEFEFEE
+      EEEEEEEEEEEDEDEDEDEDEDEEEEEEEEEFEFEFF0F0EFF0F0F0F1F1F1F1F1EFF0F0
+      EFEFEFEFEFEFEFEFEFEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F3F3
+      F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7A3A3
+      A3A3A3A3A2A2A2A2A2A2A1A1A1A0A0A0A0A0A09F9F9F9E9E9E9D9D9D9C9C9C9A
+      9A9A9D9F9FA6ABABB2BCBCC3D3D30A08B10A08B10A08B13B40C3CDE9FBBFD9F9
+      B6D0F7B3CCF6B6D1F7C0DBF8A7BDED1616B60A08B10A08B10A08B13A3FC3B6D0
+      F7A6BFF498B1F291A9F18DA5F08CA3F08CA3F08CA4F08CA3F08BA3F08BA3F08B
+      A3F08BA3F08BA2F08BA2F08AA2F08AA2F08AA2F08AA2F08AA1F0A0A9C6AEAEAE
+      AEAEAEAEAEAEADADADACACACABABABAAAAAAAAAAAAA8A8A8A6A6A6A4A4A4A2A2
+      A2A0A0A09E9E9E9B9B9B99999998989897979795959594949493939391919190
+      90908F8F8F8E8E8E8995BF859DF1859DF1849DF1849CF1849CF1849CF1849CF1
+      839CF1839BF1839BF1839BF1859DF189A2F291AAF39DB8F5ACC8F77A8BDE0A08
+      B10A08B10A08B10A08B11616B695AAE8B8D4F9AECAF8A6C2F7A1BCF69EB9F59C
+      B7F59EB9F5A1BCF6A6C2F6AFCAF8B7D4F994AAE82224BA0A08B10A08B10A08B1
+      0A08B17B8CDEAEC9F7A0B8F494ACF28DA4F18EA5F197AFF3A8C1F5BCD7F90A08
+      B10A08B10A08B13A40C4C9D7DBBFC5C5B5B8B8B1B1B1AFAFAFB0B0B0B1B1B1B2
+      B2B2B2B2B2B3B3B3B3B3B3B4B4B4B4B4B4B4B4B4B5B5B5B5B5B5B5B5B5B7B8B8
+      BABDBDC1C5C5A5ABCB0A08B10A08B10A08B10A08B1C7CECEBFC3C3B9BBBBB6B6
+      B6B4B4B4B5B5B5B4B4B4B5B5B5B6B6B6B6B6B6B6B6B6B8B8B8B8B8B8B9B9B9BA
+      BABABABABABBBBBBBCBCBCBDBDBDBDBDBDBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1
+      C2C2C2C3C3C3C3C3C3C3C3C3C4C4C4C6C6C6C9CACACED0D0D6DBDBB7BDDD0A08
+      B10A08B10A08B1868BD5E4ECECDFE5E5DCE1E1DCE1E1E0E5E5E6EDED969BDA0A
+      08B10A08B10A08B16C6DCCE2E7E7DCDFDFD9DADAD8D8D8D8D8D8D9D9D9D9D9D9
+      DADADADADADADBDBDBDDDDDDDDDDDDDDDDDDDEDEDEDFDFDFE0E0E0E1E1E1E2E2
+      E2E2E2E2E3E3E3E3E3E3E4E4E4E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E7E7E7E7
+      E7E7E8E8E8E8E8E8E9E9E9EAEAEAEAEAEAEBECECECECECECEDEDEDEDEDEDEEEE
+      EEEFEFEEEFEFEEEFEFEEEFEFEDEEEEEDEDEDECEDEDECECECECECECEBECECECED
+      EDEDEDEDEDEEEEEEEEEEEEEEEEEEEFEFEEEFEFEEEFEFEEEFEFEEEFEFEEEFEFEE
+      EEEEEDEEEEEDEDEDEDEDEDECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEFEFEEEFEFEEEEEEEEEEEEEDEEEEEDED
+      EDEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFF0F0EFF0F0EFF0F0EFEFEFEFEFEFEF
+      EFEFEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7A5A5A5A4A4A4
+      A3A3A3A2A2A2A2A2A2A1A1A1A0A0A0A0A0A09E9E9E9D9D9D9C9C9C9B9B9B9D9F
+      9FA5AAAAB2BBBBC2D1D10907B30907B30907B33A40C5CEE9FBCBE5FBC4DFF9C2
+      DDF9AEC6F16A78D71415B80907B30907B30907B30907B39CB1ECAEC7F6A0B8F4
+      96AEF290A7F08DA5F18DA5F18DA4F18DA4F18CA4F18CA4F18CA4F18CA4F18CA3
+      F18BA3F18BA3F18BA3F18BA3F18BA2F18BA2F18AA2F18FA3E8AEAEAEAEAEAEAE
+      AEAEAEAEAEAEAEAEADADADACACACABABABA9A9A9A8A8A8A6A6A6A4A4A4A2A2A2
+      9F9F9F9D9D9D9B9B9B9999999898989696969595959393939292929191919090
+      908F8F8F8997C5859DF1859DF1859DF1859DF1859DF2859DF2859DF2849CF184
+      9DF2849CF2849CF2859DF2879FF28BA5F394AEF4A0BAF6AFCAF87A8BDF0907B3
+      0907B30907B30907B30907B3383FC593A9E9BAD7FAB5D1F9B1CEF8B0CDF8B1CD
+      F8B5D1F9B9D6F993A8E8505BCE0907B30907B30907B30907B30907B37B8CDFB1
+      CCF8A3BCF596AFF48FA6F28AA2F28FA6F299B1F4AAC4F6BED9F90907B30907B3
+      0907B33A3FC5C6D6E4BFC6C6B7BABAB3B3B3B0B0B0B2B2B2B3B3B3B4B4B4B4B4
+      B4B5B5B5B5B5B5B5B5B5B6B6B6B6B6B6B6B6B6B6B6B6B6B6B6B8B9B9BCBEBEC2
+      C7C7B2B8CD0907B30907B30907B31514B5C8CFCFC0C4C4BABCBCB7B7B7B5B5B5
+      B6B6B6B6B6B6B6B6B6B6B6B6B7B7B7B7B7B7B8B8B8B9B9B9BABABABABABABBBB
+      BBBDBDBDBDBDBDBEBEBEBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1C2C2C2C2C2C2C3
+      C3C3C4C4C4C4C4C4C5C5C5C7C7C7C9CACACED0D0D4D8D8DCE3E32424BA0907B3
+      0907B31616B7BFC6E6E5EDEDE3EAEAE4EAEAE7EEEEBFC6E71616B70907B30907
+      B30907B3BCC2E2E1E5E5DCDEDED9DADAD7D8D8D9D9D9DADADADADADADBDBDBDC
+      DCDCDCDCDCDEDEDEDEDEDEDEDEDEDFDFDFE0E0E0E1E1E1E1E1E1E2E2E2E2E2E2
+      E3E3E3E4E4E4E5E5E5E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E8E8E8E9E9E9E9E9
+      E9E9E9E9E9E9E9EAEAEAEAEAEAEBEBEBEBEBEBEBECECEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDECEDEDECECECECECECECECECECECECECECEC
+      ECEDEDECEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEDEEEEEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFF0F0EFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7A6A6A6A5A5A5A4A4A4A3
+      A3A3A2A2A2A2A2A2A1A1A1A0A0A09F9F9F9E9E9E9C9C9C9B9B9B9E9F9FA4A9A9
+      B0B8B8BFCECE0706B50706B50706B51313B9393EC7393EC7393EC72022BE0706
+      B50706B50706B50706B50706B50706B57B8BE0B3CDF7A6BEF59AB3F393ACF28F
+      A7F18EA5F18EA5F18EA5F18DA5F18DA5F18DA5F18DA4F18CA4F18CA4F18CA4F1
+      8CA4F18CA3F18CA4F18BA3F18BA3F18BA3F18BA3F2A1AAC8AEAEAEAFAFAFAFAF
+      AFAEAEAEAEAEAEADADADACACACABABABA9A9A9A7A7A7A6A6A6A3A3A3A0A0A09E
+      9E9E9C9C9C9A9A9A999999979797969696949494939393929292919191909090
+      899AD9869EF2869EF2869EF2869EF2869EF2869EF2859EF2859EF2859DF2859D
+      F2859DF2849DF2859FF288A0F38DA6F396AFF5A2BCF6AFCBF88497E41314B907
+      06B50706B50706B50706B50706B51313B9434BCB6573D86573D86573D8434BCB
+      1F21BE0706B50706B50706B50706B50706B51314B98597E4B1CCF8A3BEF698B1
+      F591A8F28CA3F28BA2F191A8F29CB4F4AEC7F7C2DDFA0706B50706B50706B539
+      3FC7C0D6EFC1C7C7B8BBBBB4B4B4B1B1B1B3B3B3B4B4B4B5B5B5B6B6B6B5B5B5
+      B6B6B6B7B7B7B7B7B7B7B7B7B7B7B7B7B7B7B7B7B7B9B9B9BCBEBEC1C5C5C8CD
+      CD6A6EC50706B51413B78386C8C6CCCCC0C3C3BBBDBDB8B9B9B6B6B6B6B6B6B7
+      B7B7B7B7B7B7B7B7B8B8B8B8B8B8B9B9B9BABABABABABABABABABBBBBBBDBDBD
+      BDBDBDBEBEBEBFBFBFC0C0C0C1C1C1C1C1C1C1C1C1C3C3C3C4C4C4C4C4C4C5C5
+      C5C5C5C5C6C6C6C7C7C7C9CACACDCECED2D5D5D9DEDE9CA2D90706B50706B507
+      06B50706B55C5FCCA3A8DFA3A8E05C5FCC0706B50706B50706B50706B54E4FC8
+      E3E8E8DFE1E1DBDDDDD9D9D9D9D9D9DADADADBDBDBDBDBDBDBDBDBDDDDDDDEDE
+      DEDFDFDFDFDFDFDFDFDFE0E0E0E1E1E1E2E2E2E3E3E3E3E3E3E3E3E3E4E4E4E4
+      E4E4E5E5E5E7E7E7E7E7E7E6E6E6E8E8E8E8E8E8E9E9E9EAEAEAEAEAEAEAEAEA
+      EAEAEAEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEDEDED
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F1F1F1F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7A6A6A6A6A6A6A5A5A5A4A4A4A3A3
+      A3A3A3A3A2A2A2A1A1A1A0A0A09F9F9F9D9D9D9C9C9C9FA0A0A4A7A7ADB4B4BA
+      C7C70605B80605B80605B80605B80605B80605B80605B80605B80605B80605B8
+      0605B80605B81F21C091A5E9B4CEF8A8C1F69DB6F496AFF392A9F290A7F28FA6
+      F28EA6F28EA6F28EA6F28EA5F28EA5F28DA5F28DA5F28DA5F28DA5F28DA4F28C
+      A4F28CA4F28CA4F28CA4F28CA4F28CA4F290A5EAB0B0B0AFAFAFB0B0B0AFAFAF
+      AFAFAFAEAEAEADADADABABABABABABA8A8A8A6A6A6A4A4A4A2A2A29F9F9F9D9D
+      9D9B9B9B9A9A9A989898979797969696949494939393929292919191899CD987
+      9FF2879FF2869EF2869EF2879FF3869EF2869EF3859EF2869EF3869EF3859EF3
+      859DF3859DF3879FF38AA2F48EA8F496B0F5A1BBF7ACC7F8A3BBF2414ACC0605
+      B80605B80605B80605B80605B80605B80605B80605B80605B80605B80605B806
+      05B80605B80605B80605B8363CC8A3BBF1AEC9F8A3BCF698B1F492AAF38DA4F3
+      8AA2F28CA2F294AAF39FB7F5B1CAF8C5DFFB0605B80605B80605B8383EC9BBD3
+      F9B3C3E1AAB6D7A4AFD3A2ACD2ABB0C3ACB1C4ADB2C4B1B4BDB7B7B7B7B7B7B7
+      B7B7B7B7B7B8B8B8B8B8B8B8B8B8B8B8B8B9BABABCBDBDBFC1C1C4C8C8C8CDCD
+      CAD0D0CAD0D0C7CCCCC3C6C6BEC0C0BABBBBB8B8B8B7B7B7B8B8B8B8B8B8B8B8
+      B8B8B8B8B8B8B8BABABABABABABABABABBBBBBBCBCBCBDBDBDBDBDBDBFBFBFBF
+      BFBFBFBFBFC1C1C1C1C1C1C2C2C2C3C3C3C4C4C4C4C4C4C5C5C5C6C6C6C6C6C6
+      C7C7C7C8C8C8C9C9C9CCCDCDD0D2D2D5D9D9DDE3E3595CCB0605B80605B80605
+      B80605B80605B80605B80605B80605B80605B80605B83131C2D8DDE8E1E4E4DE
+      E0E0DBDCDCD9D9D9DADADADADADADBDBDBDCDCDCDCDCDCDEDEDEDFDFDFE0E0E0
+      E0E0E0E1E1E1E1E1E1E2E2E2E3E3E3E4E4E4E4E4E4E4E4E4E5E5E5E6E6E6E7E7
+      E7E7E7E7E7E7E7E7E7E7E8E8E8E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEBEBEBEC
+      ECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F2F2F2F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7A8A8A8A7A7A7A6A6A6A5A5A5A4A4A4A4A4A4
+      A3A3A3A2A2A2A1A1A19F9F9F9E9E9E9D9D9D9E9F9FA3A5A5AAAFAFB4BEBE0403
+      BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA353BCA7B
+      8BE2BBD5F9B2CBF7A7C1F69FB7F498B1F394ABF391A8F28FA7F28FA7F28FA7F2
+      8FA6F28FA6F28FA6F28FA6F38EA6F28EA6F28EA6F38DA5F28DA5F28DA5F28DA5
+      F28DA4F28DA4F28DA5F38DA4F38DA4F3A2ABC9B0B0B0B0B0B0B0B0B0AFAFAFAF
+      AFAFAEAEAEADADADABABABAAAAAAA8A8A8A6A6A6A3A3A3A0A0A09E9E9E9C9C9C
+      9B9B9B9A9A9A98989897979796969694949494949491949E889FED88A0F388A0
+      F388A0F3879FF2879FF3879FF3879FF3879FF3869FF3869FF3869EF3869EF386
+      9EF3859EF387A0F38AA2F48EA7F495AEF59EB8F6A7C3F8B2CDF98EA3EA4049CE
+      0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403
+      BA4049CE8EA4EAB3CEF9A9C3F8A0B9F697B0F591A8F48DA4F48BA2F38BA1F28E
+      A5F395ACF4A2BAF5B2CCF8C6E0FB0403BA0403BA0403BA363CCAB8D1F8A8BFF6
+      9BB1F494A9F392A6F293A7F293A7F294A8F295A8F296A9F296A9F197AAF19DAD
+      E6A0AEE3A1AEE3A1AFE3AAB3D4ABB4D5ADB7D7B8BDC8C0C2C2C2C5C5C3C6C6C3
+      C7C7C1C4C4BEC1C1BCBDBDBABABAB8B9B9B9B9B9B8B8B8B9B9B9B9B9B9B9B9B9
+      BABABABABABABBBBBBBBBBBBBCBCBCBDBDBDBEBEBEBEBEBEBFBFBFBFBFBFC0C0
+      C0C2C2C2C3C3C3C3C3C3C3C3C3C4C4C4C5C5C5C7C7C7C7C7C7C8C8C8C8C8C8C9
+      C9C9CACACACCCCCCCFD0D0D3D6D6D9DDDDDEE4E48F93D81212BD0403BA0403BA
+      0403BA0403BA0403BA0403BA0403BA696BD1D7DCE7E2E5E5DEE0E0DCDEDEDBDB
+      DBDADBDBDBDBDBDCDCDCDCDCDCDDDDDDDDDDDDDEDEDEDFDFDFE0E0E0E0E0E0E1
+      E1E1E1E1E1E2E2E2E3E3E3E5E5E5E5E5E5E5E5E5E5E5E5E7E7E7E7E7E7E8E8E8
+      E8E8E8E9E9E9E9E9E9EAEAEAEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECEDED
+      EDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F1F1F1F1F1F1F2F2F2F2F2F2F1F1F1F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7A9A9A9A7A7A7A6A6A6A6A6A6A5A5A5A4A4A4A3A3A3A2
+      A2A2A1A1A1A0A0A09F9F9F9D9D9D9E9F9FA0A2A2A5A9A9ACB3B38890BE8E97C5
+      919ED193A7EA94A7EA93A6EA92A5EA91A5EA9CB1EEBDD7F9B8D2F9B3CCF8ACC5
+      F7A4BDF69EB6F598B0F495ACF491A9F390A8F390A8F390A7F390A7F390A7F38F
+      A7F38FA7F390A7F38FA6F38FA7F38FA7F38EA6F38EA6F38EA6F38EA5F38EA6F3
+      8EA5F38DA5F38DA5F38DA5F392A6EBB0B0B0B0B0B0B0B0B0B0B0B0AFAFAFAFAF
+      AFAEAEAEACACACABABABA9A9A9A6A6A6A4A4A4A2A2A29F9F9F9D9D9D9C9C9C9A
+      9A9A999999989898949AAE8F9CCA8B9FE189A1F489A1F488A0F388A1F488A0F3
+      88A0F4879FF388A0F488A0F487A0F4879FF4879FF4879FF4879FF4869FF4869E
+      F4869EF487A0F48AA2F48DA6F593ACF599B3F6A1BBF7A9C4F8B1CDF9ADC7F677
+      88E35663D8333ACC333ACC343ACC343ACC333ACC5663D87789E3ADC7F6B2CDF9
+      ABC6F8A4BDF79CB4F695ADF591A8F48CA4F48AA1F38AA1F38BA2F38EA6F497AE
+      F5A4BBF6191BC40302BC0302BC0302BC0302BC3439CCB3CCF8A5BCF59BB0F495
+      A9F393A7F394A7F294A8F295A9F295A9F296AAF297AAF297AAF298ABF299ABF2
+      9AACF29BADF29BADF29DAEF19EB0F1A8B5E4BCBDBDBDBFBFBEC0C0BEC0C0BDBE
+      BEBBBCBCBBBBBBBABABAB8B8B8B9B9B9B9B9B9B9B9B9BABABABABABABBBBBBBB
+      BBBBBCBCBCBDBDBDBDBDBDBEBEBEBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1C2C2C2
+      C3C3C3C3C3C3C4C4C4C5C5C5C7C7C7C7C7C7C7C7C7C9C9C9C9C9C9CACACACBCB
+      CBCDCDCDCECFCFD1D2D2D5D7D7D9DCDCDEE2E2D3D9E49094DA676AD23C3DC93D
+      3EC95A5CD08386D8C9CEE5E3E8E8E1E4E4DEE0E0DDDEDEDBDCDCDBDBDBDADADA
+      DCDCDCDDDDDDDEDEDEDEDEDEDEDEDEDFDFDFE0E0E0E1E1E1E2E2E2E2E2E2E3E3
+      E3E3E3E3E4E4E4E5E5E5E5E5E5E5E5E5E6E6E6E7E7E7E8E8E8E8E8E8E9E9E9E9
+      E9E9E9E9E9EBEBEBECECECECECECECECECECECECEDEDEDEDEDEDEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7AAAAAAA9A9A9A8A8A8A7A7A7A6A6A6A5A5A5A4A4A4A3A3A3A2A2
+      A2A1A1A19F9F9F9E9E9E9E9F9F9FA0A0A0A3A3A5A9A9AAB0B0ADB6B6B0BABAB2
+      C4DAB5CDF8B3CDF8B3CDF8B2CBF8B0C9F7ADC6F7AAC2F6A4BDF6A0B8F59CB4F5
+      98B0F595ADF493AAF492A9F491A9F491A9F491A9F491A8F490A8F391A8F490A7
+      F390A8F490A8F490A7F490A7F48FA7F48FA7F48FA7F48FA7F48FA6F48EA6F48E
+      A6F48EA6F48EA6F48EA5F4A3ACC9B0B0B0B0B0B0B0B0B0AFAFAFAFAFAFAEAEAE
+      ACACACABABABA9A9A9A7A7A7A5A5A5A3A3A3A0A0A09B9EA8979EB8939FC78EA0
+      DD8AA2F48AA2F48AA2F48AA2F48AA2F489A2F489A1F489A1F489A1F489A1F489
+      A1F488A0F488A0F488A0F488A0F488A0F487A0F487A0F4879FF4879FF4879FF4
+      869FF487A1F489A1F48CA4F590A8F594AEF69AB4F7A0BAF7A5C0F8AAC5F9AEC9
+      F9B1CCF9B2CEF9B3CFFAB3CFF9B1CDF9AFCAF9ACC7F9A8C1F8A1BBF79CB5F797
+      B0F691AAF58FA6F58CA3F48AA1F48AA1F48BA1F48CA3F48FA6F598AEF5A2B9F6
+      8496E90101BE0101BE0101BE0101BE3036CDAFC6F7A3B9F699AFF494A8F393A7
+      F394A8F294A8F295A9F396AAF397AAF398ABF398ABF399ACF39BADF29AADF29C
+      AEF29DAEF29DAFF29EB0F2A0B1F2B4B8C9BABBBBBABBBBBBBCBCBABBBBBABABA
+      B9BABAB9B9B9B9B9B9B9B9B9BABABABABABABBBBBBBBBBBBBCBCBCBCBCBCBDBD
+      BDBDBDBDBEBEBEBFBFBFBFBFBFC0C0C0C0C0C0C2C2C2C2C2C2C3C3C3C4C4C4C4
+      C4C4C6C6C6C6C6C6C7C7C7C7C7C7C8C8C8C9C9C9CACACACCCCCCCBCBCBCDCDCD
+      CFCFCFCFD0D0D3D4D4D6D8D8D8DBDBDCE0E0DFE3E3E1E5E5E2E7E7E3E8E8E3E7
+      E7E2E6E6E0E4E4DFE2E2DDDFDFDCDDDDDBDBDBDBDBDBDBDBDBDBDBDBDCDCDCDD
+      DDDDDEDEDEDEDEDEDEDEDEE1E1E1E1E1E1E2E2E2E3E3E3E3E3E3E4E4E4E5E5E5
+      E5E5E5E6E6E6E6E6E6E7E7E7E7E7E7E8E8E8E9E9E9E9E9E9E9E9E9EAEAEAEAEA
+      EAEBEBEBEBEBEBECECECECECECECECECEDEDEDEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F1F1F1F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7ABABABAAAAAAA9A9A9A8A8A8A7A7A7A6A6A6A5A5A5A4A4A4A3A3A3A2A2A2
+      A1A1A19F9F9F9E9E9E9E9F9F9E9F9F9FA1A1A1A5A5A2A7A7A3A8A8A3AAAAA6BB
+      E8A6BEF6A5BDF6A4BCF6A3BBF6A0B9F69EB6F59BB4F599B1F596AFF495ACF494
+      ABF493AAF492AAF492AAF492AAF492A9F492A9F491A9F491A9F491A9F491A8F4
+      91A8F491A8F490A8F490A8F490A8F490A7F48FA7F48FA7F48FA7F48FA7F48FA6
+      F48FA6F48EA6F493A7ECB0B0B0B0B0B0B0B0B0AFAFAFAFAFAFAEAEAEADADADAC
+      ACACA2A8BC9DA6C499A5CD92A4E08DA4EF8CA4F58BA3F48BA3F48BA3F48BA3F4
+      8BA3F58BA3F58BA3F58AA2F58AA2F58AA2F58AA2F58AA2F589A2F589A1F589A1
+      F589A1F589A1F589A1F588A1F588A0F588A0F588A0F588A0F587A0F5879FF587
+      9FF588A0F588A1F58AA3F58CA5F68FA8F693ACF697B0F79AB4F79DB7F89FB9F7
+      A1BBF8A2BCF8A2BCF8A0BAF89FB9F89BB5F798B2F796AEF691AAF68FA7F58CA5
+      F48CA3F48BA2F48BA1F48BA1F48BA2F48DA3F490A7F495ACF59DB5F6A8C0F764
+      72E05D69DD5E6ADD5C69DC6F7EE3A7BEF69FB5F699AEF496AAF394A8F395A9F3
+      95A9F397ABF397ABF398ABF398ABF399ACF39BADF39BAEF39CAEF39DAFF39DAF
+      F39EB0F39FB0F3A0B1F3A5B3E8BABABABABABABABABABABABAB9B9B9B9B9B9BA
+      BABABABABABBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBCBCBCBDBDBDBDBDBDBEBEBE
+      BFBFBFC0C0C0C0C0C0C1C1C1C2C2C2C3C3C3C3C3C3C4C4C4C5C5C5C6C6C6C7C7
+      C7C7C7C7C8C8C8C9C9C9C9C9C9CACACACACACACCCCCCCCCCCCCDCDCDCECECECF
+      CFCFD1D1D1D3D4D4D6D7D7D8DADAD9DCDCDBDEDEDDE0E0DEE1E1DEE0E0DEE0E0
+      DCDEDEDCDDDDDBDCDCDADBDBDBDBDBDBDBDBDCDCDCDDDDDDDDDDDDDEDEDEDFDF
+      DFE0E0E0E0E0E0E1E1E1E1E1E1E2E2E2E3E3E3E3E3E3E4E4E4E6E6E6E7E7E7E7
+      E7E7E7E7E7E8E8E8E8E8E8E9E9E9EAEAEAEAEAEAEAEAEAEBEBEBEBEBEBECECEC
+      ECECECEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F0F0F0F0F0F0F0F0
+      F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7ADAD
+      ADABABABAAAAAAA9A9A9A8A8A8A7A7A7A6A6A6A5A5A5A4A4A4A2A2A2A1A1A1A0
+      A0A09E9E9E9E9E9E9C9D9D9C9D9D9C9D9D9B9D9D9A9C9C9A9C9C999EA69CB2EF
+      9CB3F59AB3F599B2F598B1F597AFF496AEF595ACF495ACF594ABF594ABF593AB
+      F593ABF593AAF593AAF592AAF592AAF592AAF592A9F592A9F592A9F591A9F591
+      A9F591A9F591A8F591A8F590A8F590A8F590A8F590A8F590A7F58FA7F58FA7F5
+      8FA7F58FA7F5A0ABD2A3ACCA9FABD29FABD296A8E396A7E38EA5F58DA5F58DA5
+      F58DA5F58DA5F58CA4F58CA4F58CA4F58CA4F58CA4F58CA4F58BA3F58CA4F58C
+      A4F58BA3F58BA3F58BA3F58BA3F58AA3F58AA2F58AA2F58AA2F58AA2F58AA2F5
+      89A1F589A1F589A1F589A1F589A1F588A1F588A1F588A0F588A0F588A0F587A0
+      F587A0F588A0F588A1F58AA2F58CA4F68CA6F68EA7F690A9F692ABF693ACF694
+      ADF694ADF693ABF692ABF690A9F68FA7F68DA6F68CA4F58BA2F58CA3F58AA2F5
+      8BA2F58CA2F58BA2F58CA3F58CA3F58FA6F594AAF599B1F59FB7F6A7BFF7ACC4
+      F8AEC5F8ACC3F8A7BEF7A1B6F69BB1F598ACF595AAF494A9F496AAF496AAF497
+      ABF399ACF499ACF399ACF39BADF49BAEF49CAEF49DAFF49EB0F39EB0F39FB1F3
+      A0B1F3A0B2F3A2B3F3B0B6CFB9B9B9BABABABABABABABABABABABABABABABABA
+      BABBBBBBBBBBBBBBBBBBBCBCBCBDBDBDBDBDBDBDBDBDBEBEBEBEBEBEC0C0C0C0
+      C0C0C1C1C1C1C1C1C2C2C2C3C3C3C4C4C4C5C5C5C5C5C5C7C7C7C7C7C7C8C8C8
+      C9C9C9CACACACBCBCBCBCBCBCCCCCCCDCDCDCDCDCDCECECECFCFCFCFCFCFD1D2
+      D2D2D2D2D3D4D4D5D6D6D6D7D7D8D9D9D9DADAD9DADAD9DBDBDADBDBD9DADAD9
+      DADADBDBDBDADBDBDBDBDBDCDCDCDDDDDDDEDEDEDEDEDEDFDFDFE0E0E0E1E1E1
+      E1E1E1E2E2E2E2E2E2E4E4E4E4E4E4E4E4E4E5E5E5E6E6E6E7E7E7E7E7E7E7E7
+      E7E8E8E8E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEBEBEBEDEDEDEDEDEDEEEEEEEE
+      EEEEEEEEEEEEEEEEEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F2F2
+      F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F4F4F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7AEAEAEACACAC
+      ABABABAAAAAAA9A9A9A8A8A8A7A7A7A6A6A6A5A5A5A3A3A3A2A2A2A1A1A19F9F
+      9F9E9E9E9C9C9C9B9B9B999999989898969696969797949595959EB897AEF597
+      AEF596AEF595ADF595ADF595ACF595ACF595ACF594ACF594ACF594ABF594ABF5
+      94ABF593ABF593ABF593ABF593AAF593AAF592AAF592AAF592AAF592A9F592A9
+      F592A9F591A9F591A9F591A9F591A8F590A8F590A8F590A8F590A8F590A7F590
+      A7F58FA7F58FA7F58FA7F58FA7F58FA7F68EA6F58EA6F58EA6F58EA6F68EA6F6
+      8EA6F68DA5F58DA5F58DA5F58DA5F58DA5F68CA4F58CA4F58CA4F68CA4F68CA4
+      F68CA4F68CA4F68BA3F68BA3F68BA3F68BA3F68BA3F68AA3F68AA2F68AA2F68A
+      A2F68AA2F68AA2F689A2F689A1F689A1F689A1F689A1F688A1F688A0F688A0F6
+      88A0F688A0F687A0F688A1F688A1F689A1F689A2F68AA2F58BA4F58BA3F58BA4
+      F58BA3F58AA3F58BA3F58BA2F68BA2F68AA1F68BA2F68BA2F58BA2F58BA3F58C
+      A3F58DA4F58DA3F58DA4F58FA5F592A9F595ACF69AB1F69EB4F7A2B8F7A2B8F7
+      A1B7F79EB5F69BB1F698ADF596ABF496AAF496AAF497ABF497ABF498ACF499AC
+      F49AACF49AADF49BAEF49BAEF49CAFF49EB0F49EB0F39FB1F49FB1F3A1B2F3A1
+      B2F3A3B4F4A5B5F0B8B9BDB9B9B9B9B9B9BABABABABABABABABABBBBBBBBBBBB
+      BBBBBBBCBCBCBCBCBCBDBDBDBEBEBEBEBEBEBFBFBFBFBFBFC1C1C1C1C1C1C2C2
+      C2C2C2C2C3C3C3C3C3C3C4C4C4C6C6C6C6C6C6C7C7C7C8C8C8C8C8C8CACACACB
+      CBCBCCCCCCCCCCCCCDCDCDCECECECECECECFCFCFCFCFCFD1D1D1D2D2D2D2D2D2
+      D3D3D3D5D5D5D5D5D5D6D6D6D7D7D7D7D7D7D8D8D8D9D9D9D9DADAD9D9D9DADA
+      DADBDBDBDBDBDBDCDCDCDDDDDDDEDEDEDFDFDFDFDFDFE0E0E0E1E1E1E2E2E2E3
+      E3E3E4E4E4E5E5E5E5E5E5E5E5E5E6E6E6E7E7E7E8E8E8E8E8E8E8E8E8E9E9E9
+      EAEAEAEAEAEAEBEBEBEBEBEBECECECECECECEDEDEDEDEDEDEEEEEEEEEEEEEEEE
+      EEEEEEEEEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F2F2F2F1F1F1F1F1F1F2F2F2F1F1F1F2F2F2F1F1F1F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F4
+      F4F4F4F4F4F5F5F5F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7B0B0B0AEAEAEADADADAB
+      ABABAAAAAAA9A9A9A7A7A7A7A7A7A6A6A6A4A4A4A3A3A3A2A2A2A0A0A09F9F9F
+      9D9D9D9B9B9B9A9A9A98989896969696969694949493939395A3D096AEF696AE
+      F696ADF696ADF696ADF695ADF695ADF695ADF695ACF695ACF695ACF694ACF694
+      ACF694ABF694ABF693ABF693ABF693ABF693AAF693AAF693AAF692AAF692AAF6
+      92AAF692A9F692A9F691A9F691A9F691A9F691A9F691A8F690A8F690A8F690A8
+      F690A8F690A7F690A7F68FA7F68FA7F68FA7F68FA6F68FA6F68FA7F58EA6F68E
+      A6F68EA6F68EA6F68DA5F68DA5F68DA5F58DA5F68DA5F68DA5F68DA5F68DA5F6
+      8CA4F68CA4F68CA4F68CA4F68BA4F68BA3F68BA3F68BA3F68BA3F68BA3F68AA2
+      F68AA2F68AA2F68AA2F68AA2F689A2F689A2F689A1F689A1F689A1F688A1F688
+      A1F688A0F688A0F688A0F688A0F688A0F688A0F688A0F688A0F689A1F689A1F6
+      89A1F68AA1F68AA1F68AA2F68AA2F68BA2F68CA3F58CA3F58CA3F58DA4F68EA4
+      F68EA5F68FA5F68FA5F690A7F692A8F695ABF696ACF698AFF699AFF69AAEF698
+      ADF697ADF597ABF596ABF596AAF597ABF597ABF598ACF599ACF599ADF59AADF5
+      9BAEF49CAEF49CAFF49DAFF49EB0F49FB0F49FB1F4A1B2F4A1B2F4A2B3F4A3B4
+      F4A4B4F4ADB6D9B8B8B8B9B9B9B9B9B9BBBBBBBBBBBBBBBBBBBBBBBBBCBCBCBD
+      BDBDBDBDBDBEBEBEBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1C2C2C2C3C3C3C3C3C3
+      C4C4C4C4C4C4C5C5C5C6C6C6C7C7C7C8C8C8C8C8C8C9C9C9CACACACBCBCBCCCC
+      CCCCCCCCCDCDCDCECECECFCFCFD0D0D0D0D0D0D1D1D1D2D2D2D3D3D3D4D4D4D5
+      D5D5D5D5D5D7D7D7D7D7D7D8D8D8D8D8D8DADADADADADADADADADCDCDCDCDCDC
+      DDDDDDDEDEDEDEDEDEDFDFDFDFDFDFE0E0E0E1E1E1E2E2E2E2E2E2E3E3E3E4E4
+      E4E5E5E5E5E5E5E6E6E6E6E6E6E7E7E7E8E8E8E8E8E8E8E8E8EAEAEAEBEBEBEB
+      EBEBECECECECECECEDEDEDEDEDEDEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEF
+      F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F1
+      F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7B0B0B0AFAFAFAEAEAEACACACABAB
+      ABAAAAAAA9A9A9A8A8A8A7A7A7A6A6A6A5A5A5A3A3A3A2A2A2A0A0A09F9F9F9D
+      9D9D9C9C9C9A9A9A98989897979796969694949493949996A9E397AEF697AEF6
+      96AEF696AEF696AEF696ADF696ADF696ADF695ADF695ADF695ACF695ACF695AC
+      F694ACF694ACF694ACF694ABF694ABF693ABF693ABF693ABF693AAF693AAF693
+      AAF692AAF692AAF692AAF692A9F691A9F691A9F691A9F691A9F691A8F691A8F6
+      90A8F690A8F690A8F690A8F690A7F68FA7F68FA7F68FA7F68FA7F68FA6F68EA6
+      F68FA7F68EA6F68EA6F68EA6F68DA5F68EA6F78EA6F78DA5F78DA5F78DA5F78D
+      A5F78DA5F78CA4F78CA4F78CA4F78CA4F78CA4F78BA4F78BA3F78BA3F78BA3F7
+      8BA3F78BA3F78AA3F78AA2F78AA2F78AA2F78AA2F789A2F789A1F789A1F789A1
+      F789A1F788A1F788A1F789A1F688A1F689A1F689A1F68AA2F68AA1F68AA2F68B
+      A2F68AA2F68BA2F68CA3F68BA3F68CA3F68DA4F68CA3F68DA4F68EA5F68FA5F6
+      90A6F68FA5F690A6F691A7F692A8F693A9F695AAF696AAF696ABF695AAF696AA
+      F695AAF696AAF697ABF697ACF598ACF599ACF59AADF59AADF59BAEF59CAFF59D
+      AFF59EB0F59EB0F59EB1F59FB1F5A1B2F5A2B3F5A2B4F5A3B4F4A4B5F4A5B5F4
+      A5B6F4B3B7C7B8B8B8B9B9B9B9B9B9BABABABBBBBBBBBBBBBCBCBCBDBDBDBEBE
+      BEBFBFBFBFBFBFC0C0C0C0C0C0C1C1C1C2C2C2C3C3C3C3C3C3C5C5C5C5C5C5C6
+      C6C6C7C7C7C7C7C7C8C8C8C9C9C9C9C9C9CACACACBCBCBCCCCCCCDCDCDCDCDCD
+      CECECECFCFCFCFCFCFD1D1D1D1D1D1D2D2D2D3D3D3D3D3D3D4D4D4D5D5D5D6D6
+      D6D7D7D7D8D8D8D7D7D7D9D9D9DADADADADADADBDBDBDDDDDDDDDDDDDEDEDEDE
+      DEDEE0E0E0E0E0E0E1E1E1E1E1E1E2E2E2E3E3E3E3E3E3E4E4E4E5E5E5E6E6E6
+      E6E6E6E7E7E7E7E7E7E8E8E8E9E9E9E9E9E9EAEAEAEAEAEAEBEBEBECECECECEC
+      ECECECECEDEDEDEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7B2B2B2B1B1B1B0B0B0AFAFAFACACACABABAB
+      AAAAAAA9A9A9A8A8A8A7A7A7A5A5A5A5A5A5A3A3A3A2A2A2A0A0A09F9F9F9C9C
+      9C9B9B9B9999999898989797979696969595959599A697ADF197AFF797AFF797
+      AEF797AEF797AEF796AEF796AEF796AEF796ADF796ADF796ADF795ADF795ADF7
+      95ACF795ACF794ACF794ACF794ACF794ABF794ABF794ABF793ABF793ABF793AB
+      F793AAF793AAF792AAF792AAF792AAF792AAF792A9F791A9F791A9F791A9F791
+      A9F791A8F791A8F790A8F790A8F790A8F790A7F790A7F78FA7F78FA7F78FA7F7
+      8FA7F78EA6F78EA6F78EA6F78EA6F78EA6F78EA6F78EA6F78EA6F78EA6F78DA5
+      F78DA5F78DA5F78CA4F78CA4F78CA4F78CA4F78CA4F78BA3F78CA4F78BA3F78B
+      A3F78BA3F78BA3F78BA3F78AA3F78AA3F78AA2F78AA2F78AA2F789A2F789A2F7
+      89A1F789A1F789A2F789A1F78AA2F78AA1F78AA2F78BA3F78BA2F78BA3F78BA3
+      F78BA3F78CA4F78CA4F78DA4F78DA4F68DA4F68EA4F68FA5F68FA6F690A6F691
+      A7F691A7F691A7F691A7F693A8F794A9F694A9F694A9F696AAF695AAF696ABF6
+      97ABF697ABF698ACF698ACF59AADF69AADF59BAEF69DAFF69DB0F69DB0F69FB1
+      F69FB1F6A0B2F5A1B3F5A2B3F5A3B4F5A3B4F5A4B5F5A4B5F5A5B6F5A7B7F5AA
+      B8EDB7B8BCB9B9B9B9B9B9BABABABBBBBBBCBCBCBCBCBCBDBDBDBEBEBEBEBEBE
+      BFBFBFC0C0C0C0C0C0C2C2C2C2C2C2C3C3C3C3C3C3C4C4C4C5C5C5C7C7C7C7C7
+      C7C8C8C8C9C9C9C9C9C9CBCBCBCBCBCBCCCCCCCDCDCDCDCDCDCFCFCFCFCFCFD0
+      D0D0D1D1D1D1D1D1D2D2D2D3D3D3D4D4D4D4D4D4D6D6D6D6D6D6D7D7D7D8D8D8
+      D8D8D8D9D9D9DADADADBDBDBDBDBDBDCDCDCDDDDDDDDDDDDDEDEDEDFDFDFE0E0
+      E0E0E0E0E1E1E1E2E2E2E3E3E3E3E3E3E3E3E3E4E4E4E6E6E6E7E7E7E7E7E7E8
+      E8E8E7E7E7E9E9E9EAEAEAEAEAEAEBEBEBECECECECECECEDEDEDEDEDEDEDEDED
+      EEEEEEEEEEEEEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F6F6F6F5F5F5F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7B3B3B3B2B2B2B0B0B0AFAFAFAFAFAFACACACABABABAA
+      AAAAA9A9A9A8A8A8A6A6A6A5A5A5A4A4A4A2A2A2A1A1A1A0A0A09E9E9E9D9D9D
+      9A9A9A999999989898979797969696959595969FB998AFF798AFF798AFF797AF
+      F797AFF797AFF797AEF797AEF797AEF796AEF796AEF796ADF796ADF796ADF795
+      ADF795ADF795ADF795ACF795ACF794ACF794ACF794ACF794ABF794ABF794ABF7
+      93ABF793ABF793ABF793AAF792AAF792AAF792AAF792AAF792A9F792A9F791A9
+      F791A9F791A9F791A9F791A8F790A8F790A8F790A8F790A8F790A7F78FA7F78F
+      A7F78FA7F78FA7F78FA7F78FA7F88EA6F78EA6F78EA6F78EA6F78EA6F78DA5F7
+      8DA5F78DA5F88DA5F78DA5F88CA4F78DA5F88CA4F78CA4F78CA4F78BA3F78CA4
+      F88CA4F88BA4F88BA3F88BA3F88BA3F88BA3F88AA3F88AA2F88AA2F88AA2F88A
+      A2F88AA2F78AA2F78BA2F78AA2F78BA3F78BA3F78BA3F78CA3F78CA3F78CA4F7
+      8DA4F78EA5F78EA5F78EA5F78FA5F78FA5F78FA6F790A6F790A7F791A7F791A7
+      F792A7F792A8F793A9F794A9F695A9F695AAF696AAF697ABF698ACF797ABF697
+      ACF699ADF79AADF69BAEF69BAEF69CAFF69CB0F69EB0F69DB0F6A0B2F6A0B2F6
+      A1B3F6A2B4F6A2B4F6A3B5F6A4B5F6A5B6F6A5B6F6A7B7F6A8B8F6A9B8F6B2B8
+      CFB9B9B9BABABABBBBBBBBBBBBBCBCBCBDBDBDBDBDBDBEBEBEBFBFBFC0C0C0C1
+      C1C1C1C1C1C2C2C2C3C3C3C4C4C4C4C4C4C5C5C5C6C6C6C7C7C7C7C7C7C8C8C8
+      CACACACACACACBCBCBCBCBCBCCCCCCCDCDCDCECECECFCFCFD0D0D0D0D0D0D1D1
+      D1D2D2D2D2D2D2D3D3D3D5D5D5D6D6D6D7D7D7D7D7D7D8D8D8D9D9D9D9D9D9DA
+      DADADBDBDBDCDCDCDCDCDCDDDDDDDEDEDEDEDEDEDFDFDFE0E0E0E1E1E1E1E1E1
+      E2E2E2E3E3E3E4E4E4E4E4E4E5E5E5E5E5E5E6E6E6E7E7E7E7E7E7E8E8E8E8E8
+      E8EAEAEAEAEAEAEAEAEAEBEBEBECECECECECECEDEDEDEDEDEDEDEDEDEEEEEEEF
+      EFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4
+      F4F4F4F4F4F4F4F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F4F4F4F5F5F5F4F4F4F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7B5B5B5B3B3B3B2B2B2B1B1B1AFAFAFAEAEAEACACACABABABAAAA
+      AAA9A9A9A8A8A8A7A7A7A6A6A6A4A4A4A3A3A3A1A1A19F9F9F9E9E9E9C9C9C9B
+      9B9B9A9A9A98989897979796969695959596A4CB99B0F898AFF798B0F898AFF8
+      98AFF898AFF897AFF897AFF897AFF897AEF897AEF897AEF896AEF896AEF896AD
+      F896ADF895ADF895ADF895ADF895ACF895ADF795ACF894ACF894ACF894ACF894
+      ABF894ABF893ABF893ABF893ABF893ABF893AAF892AAF892AAF892AAF892AAF8
+      92A9F892A9F891A9F891A9F891A9F891A8F891A8F890A8F890A8F890A8F890A8
+      F88FA7F88FA7F88FA7F88FA7F88FA7F88FA7F88EA6F88EA6F88EA6F88EA6F88E
+      A6F88DA5F88DA5F88DA5F88DA5F88DA5F88CA5F88CA4F88CA4F88CA4F88CA4F8
+      8CA4F88BA4F88CA4F88BA4F88BA4F88BA3F88BA3F88BA3F88AA3F88AA3F88BA3
+      F88BA3F88BA3F88CA4F88CA4F88CA4F88CA4F88DA4F88DA4F88DA4F88EA5F88E
+      A5F88EA5F88FA6F88FA6F78FA6F790A7F791A7F791A7F792A8F793A8F793A8F7
+      93A9F794A9F794AAF795AAF796ABF796ABF797ACF798ACF798ACF799ADF79AAE
+      F79AADF79CAFF69BAFF69CAFF69DB0F69EB1F69FB1F6A0B2F6A0B3F6A1B3F6A2
+      B4F6A3B4F6A3B5F6A4B5F6A5B6F6A6B7F6A7B8F6A8B8F6AAB9F2B7B8BCB9B9B9
+      BABABABCBCBCBCBCBCBCBCBCBDBDBDBEBEBEC0C0C0C0C0C0C1C1C1C2C2C2C2C2
+      C2C3C3C3C4C4C4C5C5C5C6C6C6C6C6C6C7C7C7C8C8C8C9C9C9CACACACACACACB
+      CBCBCCCCCCCCCCCCCECECECECECECFCFCFD0D0D0D0D0D0D1D1D1D2D2D2D2D2D2
+      D3D3D3D4D4D4D5D5D5D6D6D6D7D7D7D7D7D7D8D8D8D9D9D9DADADADADADADBDB
+      DBDCDCDCDCDCDCDDDDDDDEDEDEDFDFDFDFDFDFE0E0E0E1E1E1E1E1E1E3E3E3E3
+      E3E3E5E5E5E4E4E4E6E6E6E6E6E6E8E8E8E7E7E7E8E8E8E8E8E8E9E9E9EBEBEB
+      EBEBEBEBEBEBECECECEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFF0F0F0F0F0
+      F0F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F3F3F3F4F4
+      F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7B6B6B6B5B5B5B4B4B4B2B2B2B0B0B0AFAFAFAEAEAEADADADABABABAAAAAA
+      A9A9A9A8A8A8A7A7A7A5A5A5A4A4A4A2A2A2A1A1A19F9F9F9E9E9E9C9C9C9B9B
+      9B9A9A9A98989898989897979796969698A8D999B0F899B0F899B0F898B0F898
+      B0F898B0F898AFF898AFF898AFF897AFF897AFF897AEF897AEF897AEF896AEF8
+      96AEF896AEF896ADF896ADF895ADF895ADF895ADF895ACF895ACF895ACF894AC
+      F894ACF894ACF894ABF893ABF893ABF893ABF893ABF893AAF893AAF892AAF892
+      AAF892AAF892AAF892A9F891A9F891A9F891A9F891A9F891A8F890A8F890A8F8
+      90A8F890A8F890A8F88FA7F88FA7F88FA7F88FA7F88FA7F88FA7F88EA6F88EA6
+      F88EA6F88EA6F88DA6F88DA5F88DA5F88DA5F88DA5F88DA5F88CA4F88CA4F88C
+      A4F88CA4F88CA4F88BA4F88BA4F88BA3F88BA3F88BA3F88BA3F88BA3F88BA3F8
+      8BA3F88BA3F88DA4F88CA4F88CA4F88DA5F88DA5F88EA5F88EA6F88FA6F890A6
+      F890A6F890A7F891A7F891A7F892A8F892A8F893A9F893A9F893A9F895AAF894
+      AAF895AAF896ABF897ABF897ACF798ADF799ADF799ADF79AAEF79BAEF79BAFF7
+      9CAFF79DB0F79DB1F79EB1F79FB2F7A0B2F7A1B3F7A1B3F7A2B4F7A3B4F7A4B6
+      F7A4B6F7A5B6F6A6B7F6A7B8F6A8B8F6A9B9F6B0B8D7B8B8B8B9B9B9BABABABB
+      BBBBBCBCBCBDBDBDBDBDBDBFBFBFC0C0C0C0C0C0C1C1C1C2C2C2C2C2C2C3C3C3
+      C5C5C5C5C5C5C6C6C6C6C6C6C7C7C7C9C9C9C9C9C9CACACACBCBCBCBCBCBCCCC
+      CCCCCCCCCFCFCFCFCFCFD0D0D0D1D1D1D1D1D1D2D2D2D3D3D3D3D3D3D5D5D5D6
+      D6D6D6D6D6D7D7D7D8D8D8D8D8D8D9D9D9DADADADADADADBDBDBDCDCDCDDDDDD
+      DDDDDDDEDEDEDFDFDFE0E0E0E0E0E0E2E2E2E2E2E2E3E3E3E3E3E3E4E4E4E5E5
+      E5E5E5E5E6E6E6E7E7E7E8E8E8E8E8E8E9E9E9E9E9E9EAEAEAEBEBEBEBEBEBEB
+      EBEBECECECEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEFEFEFF0F0F0F0F0F0F1F1F1
+      F1F1F1F1F1F1F3F3F3F2F2F2F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F6F6F6F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7B8B8
+      B8B6B6B6B5B5B5B4B4B4B2B2B2B0B0B0AFAFAFAFAFAFACACACABABABAAAAAAA9
+      A9A9A7A7A7A7A7A7A6A6A6A4A4A4A3A3A3A1A1A1A0A0A09E9E9E9C9C9C9B9B9B
+      9A9A9A98989897979797979796979C99ACE69AB1F999B0F899B1F999B0F998B0
+      F898B0F898AFF898B0F998AFF898AFF998AFF997AEF897AEF897AEF897AEF996
+      AEF896AEF996AEF996ADF896ADF996ADF995ADF895ACF895ADF995ADF995ACF9
+      95ACF994ACF994ACF994ACF994ACF994ABF993ABF993ABF993ABF993ABF993AA
+      F993AAF992AAF992AAF992AAF992A9F992A9F991A9F991A9F991A9F991A9F990
+      A8F990A8F990A8F990A8F990A8F990A8F98FA7F98FA7F98FA7F98FA7F98FA7F9
+      8EA6F98EA6F98EA6F98EA6F98EA6F98DA6F98DA5F98DA5F98DA5F98DA5F98DA5
+      F98CA5F98CA4F98CA4F98CA4F98CA4F98BA4F98CA4F88BA4F88CA4F88CA4F88D
+      A5F88DA5F88DA5F88EA5F88EA5F88EA5F88FA6F88FA6F88FA6F890A7F890A6F8
+      90A7F892A8F992A8F892A8F892A8F893A9F894A9F894AAF895AAF895AAF895AA
+      F896ABF897ACF898ADF899ADF899ADF799ADF79AAEF79BAEF79CB0F89CB0F79E
+      B1F89EB1F89FB2F8A0B2F8A0B3F7A1B4F7A2B4F7A3B5F7A3B5F7A4B6F7A6B7F7
+      A7B8F7A7B8F7A8B9F7A9B9F7A9BAF7B6B8C0B9B9B9BABABABBBBBBBCBCBCBDBD
+      BDBDBDBDBFBFBFC0C0C0C0C0C0C1C1C1C2C2C2C2C2C2C3C3C3C5C5C5C6C6C6C6
+      C6C6C7C7C7C7C7C7C8C8C8C9C9C9CACACACBCBCBCCCCCCCCCCCCCDCDCDCECECE
+      CFCFCFCFCFCFD0D0D0D1D1D1D1D1D1D3D3D3D4D4D4D4D4D4D5D5D5D6D6D6D6D6
+      D6D7D7D7D8D8D8D8D8D8D9D9D9DADADADBDBDBDBDBDBDEDEDEDDDDDDDEDEDEDE
+      DEDEE0E0E0E0E0E0E0E0E0E2E2E2E2E2E2E2E2E2E3E3E3E5E5E5E5E5E5E6E6E6
+      E7E7E7E8E8E8E8E8E8E9E9E9EAEAEAEAEAEAEBEBEBECECECECECECECECECEDED
+      EDEEEEEEEEEEEEEFEFEFEFEFEFF0F0F0F0F0F0F1F1F1F1F1F1F2F2F2F2F2F2F2
+      F2F2F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F6F6F6F6F6F6F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7B9B9B9B8B8B8
+      B6B6B6B5B5B5B4B4B4B2B2B2B1B1B1AFAFAFAEAEAEACACACABABABAAAAAAA9A9
+      A9A8A8A8A7A7A7A5A5A5A4A4A4A2A2A2A1A1A1A0A0A09E9E9E9C9C9C9B9B9B9A
+      9A9A999999989898979797979AA39AB0F39AB1F999B1F999B1F999B0F999B0F9
+      99B0F998B0F998B0F998B0F998AFF998AFF998AFF998AFF997AFF997AEF997AF
+      F997AFF997AEF996AEF996ADF996ADF996ADF996ADF995ADF996ADF995ADF895
+      ADF995ADF995ACF994ACF994ACF994ABF994ACF993ABF994ABF993ABF993AAF9
+      93ABF993ABF993AAF992AAF992AAF992AAF992AAF992A9F991A9F991A9F991A9
+      F991A9F991A9F990A8F990A8F990A8F990A8F990A8F990A8F98FA7F98FA7F98F
+      A7F98FA7F98EA7F98EA6F98EA6F98EA6F98EA6F98EA6F98DA5F98DA5F98DA5F9
+      8DA5F98DA5F98CA5F98CA5F98CA4F98CA5F98CA4F98DA5F98DA5F98EA5F98DA5
+      F98EA6F98FA6F98EA6F98FA6F98FA7F990A7F990A7F991A7F991A8F991A8F992
+      A8F993A9F893A9F893A9F894AAF894AAF895ABF895ABF895ABF897ACF897ACF8
+      98ACF898ADF899ADF89AAEF89AAEF89BAFF89CAFF89CB0F89DB0F89EB1F89EB1
+      F89FB2F8A1B3F7A1B3F7A1B4F7A2B4F7A4B5F7A4B6F7A5B7F7A6B7F7A7B8F7A8
+      B9F8A8B9F7AABBF8B0BADFB8B8B8B9B9B9BABABABBBBBBBCBCBCBDBDBDBEBEBE
+      C0C0C0C0C0C0C0C0C0C1C1C1C2C2C2C3C3C3C5C5C5C5C5C5C6C6C6C7C7C7C8C8
+      C8C8C8C8CACACACACACACBCBCBCCCCCCCDCDCDCECECECECECECFCFCFD0D0D0D0
+      D0D0D1D1D1D2D2D2D3D3D3D4D4D4D4D4D4D5D5D5D6D6D6D7D7D7D7D7D7D8D8D8
+      D9D9D9D9D9D9DBDBDBDBDBDBDCDCDCDDDDDDDEDEDEDEDEDEDFDFDFE0E0E0E0E0
+      E0E1E1E1E2E2E2E3E3E3E3E3E3E4E4E4E5E5E5E5E5E5E6E6E6E6E6E6E7E7E7E8
+      E8E8E8E8E8E9E9E9E9E9E9EAEAEAEBEBEBECECECECECECEDEDEDEDEDEDEEEEEE
+      EFEFEFEFEFEFEFEFEFF0F0F0F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F3F3
+      F3F3F3F3F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F4F4F4F4F4F4F5F5F5F5F5F5F4
+      F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F6F6F6F5F5F5F5F5F5F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7BBBBBBB9B9B9B8B8B8B6
+      B6B6B5B5B5B4B4B4B2B2B2B1B1B1AFAFAFAEAEAEACACACABABABAAAAAAA9A9A9
+      A8A8A8A7A7A7A5A5A5A4A4A4A2A2A2A1A1A1A0A0A09E9E9E9D9D9D9C9C9C9A9A
+      9A999999989898989898989CAA9AB0F39AB1F99AB1F99AB1F999B1F999B1F999
+      B1F999B0F999B0F999B0F998B0F998B0F998AFF998AFF998AFF997AFF997AFF9
+      97AFF997AEF997AEF996AEF996AEF996AEF996ADF996ADF996ADF995ADF995AD
+      F995ADF995ACF994ACF994ACF994ACF994ACF994ACF994ABF993ABF993ABF993
+      ABF993ABF993ABF992AAF992AAF992AAF992AAF992A9F991A9F991A9F991A9FA
+      91A9F991A9F990A8F990A8F991A9FA90A8FA90A8FA90A8FA8FA7F98FA7F98FA7
+      F98FA7F98FA7FA8EA6F98EA6F98EA6F98EA6F98EA6FA8DA5F98DA5F98DA5F98D
+      A5F98DA5F98CA5F98DA5F98DA5F98DA5F98DA5F98DA5F98EA6F98EA6F98EA6F9
+      8FA7F98FA6F990A7F990A7F991A8F991A8F992A8F992A9F992A9F992A9F993A9
+      F994AAF994AAF995ABF995ABF996ABF996ACF997ACF998ADF999ADF998ADF99A
+      AEF999AEF99BAFF89BAFF89CB0F89CB0F89DB1F89EB1F89FB2F89FB2F8A1B3F8
+      A1B3F8A1B4F8A3B5F8A4B6F8A4B6F8A5B7F8A6B7F8A7B8F8A8B8F8A8B9F8A9BA
+      F8AABBF8B5B7BFB9B9B9BABABABABABABBBBBBBDBDBDBEBEBEBEBEBEC0C0C0C0
+      C0C0C1C1C1C2C2C2C3C3C3C4C4C4C5C5C5C6C6C6C7C7C7C7C7C7C9C9C9C9C9C9
+      CACACACBCBCBCBCBCBCCCCCCCDCDCDCECECECFCFCFCFCFCFD0D0D0D1D1D1D2D2
+      D2D3D3D3D3D3D3D4D4D4D5D5D5D5D5D5D6D6D6D7D7D7D8D8D8DADADADADADADB
+      DBDBDBDBDBDCDCDCDDDDDDDDDDDDDEDEDEDFDFDFDFDFDFE0E0E0E1E1E1E1E1E1
+      E2E2E2E3E3E3E4E4E4E5E5E5E6E6E6E6E6E6E7E7E7E8E8E8E9E9E9E9E9E9E9E9
+      E9EAEAEAEBEBEBECECECECECECECECECEDEDEDEEEEEEEFEFEFEFEFEFF0F0F0F0
+      F0F0F0F0F0F1F1F1F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F6F6F6F6F6F6F6F6F6F5F5F5
+      F6F6F6F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F6F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7BCBCBCBBBBBBBABABAB8B8B8B6B6
+      B6B5B5B5B4B4B4B2B2B2B1B1B1B0B0B0AEAEAEADADADACACACABABABAAAAAAA8
+      A8A8A7A7A7A6A6A6A4A4A4A3A3A3A1A1A1A0A0A09F9F9F9D9D9D9C9C9C9B9B9B
+      9A9A9A99999998989899A0B69BB2FA9BB2FA9AB2FA9AB2FA9AB1FA9AB1FA9AB1
+      FA99B1FA99B1FA99B1FA99B0FA99B0FA99B0FA98B0FA98B0FA98AFFA98AFFA97
+      AFFA97AFFA97AFFA97AEFA97AEFA97AEFA96AEFA96AEFA96AEFA96ADFA96ADFA
+      95ADFA95ADFA95ADFA95ADFA95ACFA94ACFA94ACFA94ACFA94ACFA94ABFA94AB
+      FA93ABFA93ABFA93ABFA93AAFA93AAFA92AAFA92AAFA92AAFA92AAFA91A9FA91
+      A9FA91A9FA91A9FA91A9FA91A9FA90A8FA90A8FA90A8FA90A8FA90A8FA8FA7FA
+      8FA7FA8FA7FA8FA7FA8FA7FA8EA7FA8EA6FA8EA6FA8EA6FA8EA6FA8EA6FA8DA6
+      FA8DA5FA8DA6F98DA6F98DA5F98EA6F98EA5F98EA6F98FA7F98FA6F98FA7F98F
+      A7F990A7F990A8F991A8F991A8F992A8F992A9F992A9F993A9F993A9F994ABFA
+      95ABF994AAF997ACF996ACF996ACF998ADF998ADF999ADF999AEF99AAEF99AAE
+      F99AAFF99CB0F89DB1F99EB2F99EB1F89FB2F8A0B3F9A0B3F8A1B4F8A2B4F8A3
+      B5F9A4B6F9A5B6F9A5B7F9A6B8F9A7B8F8A7B9F8A9BAF8AABAF8ABBBF8B0BAE0
+      B8B8B8B9B9B9BABABABBBBBBBCBCBCBEBEBEBFBFBFC0C0C0C0C0C0C1C1C1C2C2
+      C2C3C3C3C4C4C4C5C5C5C6C6C6C6C6C6C7C7C7C9C9C9CACACACACACACBCBCBCC
+      CCCCCDCDCDCECECECFCFCFCFCFCFD0D0D0D1D1D1D1D1D1D2D2D2D3D3D3D4D4D4
+      D4D4D4D5D5D5D6D6D6D6D6D6D7D7D7D8D8D8D9D9D9DADADADADADADBDBDBDCDC
+      DCDCDCDCDDDDDDDEDEDEDEDEDEDFDFDFE0E0E0E1E1E1E1E1E1E2E2E2E3E3E3E4
+      E4E4E4E4E4E5E5E5E6E6E6E6E6E6E7E7E7E8E8E8E8E8E8E9E9E9E9E9E9EAEAEA
+      EBEBEBECECECEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEFEFEFF0F0F0F0F0F0F0F0
+      F0F1F1F1F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F5
+      F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7BDBDBDBCBCBCBABABAB9B9B9B8B8B8B6B6B6
+      B5B5B5B4B4B4B2B2B2B1B1B1AFAFAFAEAEAEADADADACACACABABABAAAAAAA8A8
+      A8A7A7A7A6A6A6A5A5A5A3A3A3A1A1A1A0A0A09F9F9F9D9D9D9C9C9C9B9B9B9A
+      9A9A9999999999999AA2BD9BB2FA9BB2FA9BB2FA9BB2FA9AB2FA9AB2FA9AB2FA
+      9AB1FA9AB1FA9AB1FA99B1FA99B1FA99B0FA99B0FA99B0FA98B0FA98B0FA98B0
+      FA98AFFA98AFFA97AEFA97AFFA97AFFA97AEFA97AEFA97AEFA96AEFA96AEFA96
+      AEFA96ADFA95ADFA95ADFA95ADFA95ADFA95ACFA95ACFA94ACFA94ACFA94ACFA
+      94ACFA94ABFA93ABFA93ABFA93ABFA93ABFA93AAFA92AAFA92AAFA92AAFA92AA
+      FA92AAFA91A9FA91A9FA91A9FA91A9FA91A9FA91A9FA90A8FA90A8FA90A8FA90
+      A8FA8FA8FA8FA7FA8FA7FA8FA7FA8FA7FA8FA7FA8EA6FA8EA6FA8EA6FA8EA6FA
+      8EA6FA8EA6FA8EA6FA8FA6FA8EA6FA8FA7FA8FA7FA8FA7FA90A7FA91A8FA91A8
+      FA91A8FA92A9FA92A8FA92A9FA93AAFA94AAFA93AAFA94AAFA94ABFA95ABF996
+      ACF997ACF997ACF997ADF998ADF999AEF999AEF99AAFF99BAFF99BAFF99CB0F9
+      9DB1F99DB1F99EB2F99FB2F9A0B3F9A0B3F9A1B4F9A2B4F9A2B5F9A3B5F9A4B6
+      F9A5B7F9A5B7F9A6B8F9A7B8F8A9B9F8A9BAF8AABBF8ABBBF8B4B8C7B8B8B8B9
+      B9B9BBBBBBBCBCBCBDBDBDBEBEBEBFBFBFC0C0C0C1C1C1C2C2C2C3C3C3C3C3C3
+      C4C4C4C5C5C5C6C6C6C8C8C8C8C8C8C9C9C9CACACACBCBCBCCCCCCCCCCCCCDCD
+      CDCECECECFCFCFD0D0D0D0D0D0D2D2D2D2D2D2D3D3D3D3D3D3D4D4D4D5D5D5D5
+      D5D5D7D7D7D7D7D7D8D8D8D8D8D8D9D9D9DADADADADADADBDBDBDCDCDCDCDCDC
+      DDDDDDDEDEDEDFDFDFDFDFDFE1E1E1E1E1E1E1E1E1E2E2E2E3E3E3E4E4E4E4E4
+      E4E5E5E5E6E6E6E7E7E7E8E8E8E9E9E9EAEAEAEAEAEAEAEAEAEBEBEBECECECED
+      EDEDEDEDEDEEEEEEEEEEEEEFEFEFF0F0F0F0F0F0F1F1F1F1F1F1F2F2F2F2F2F2
+      F3F3F3F2F2F2F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7BEBEBEBDBDBDBCBCBCBBBBBBB9B9B9B8B8B8B6B6B6B5
+      B5B5B4B4B4B2B2B2B1B1B1AFAFAFAEAEAEADADADACACACABABABAAAAAAA8A8A8
+      A7A7A7A6A6A6A4A4A4A3A3A3A1A1A1A0A0A09F9F9F9D9D9D9C9C9C9B9B9B9A9A
+      9A9999999898989AA2BD9BB3FA9BB2FA9BB2FA9BB2FA9AB2FA9AB2FA9AB2FA9A
+      B1FA9AB1FA9AB1FA99B1FA99B1FA99B0FA99B0FA99B0FA98B0FA98B0FA98B0FA
+      98AFFA98AFFA97AFFA97AFFA97AFFA97AEFA97AEFA97AEFA96AEFA96AEFA96AE
+      FA96ADFA95ADFA95ADFA95ADFA95ADFA95ACFA95ACFA94ACFA94ACFA94ACFA94
+      ACFA94ABFA93ABFA93ABFA94ABFB93ABFB93AAFA93ABFB92AAFA92AAFA92AAFB
+      92AAFA92AAFB92AAFB92AAFB91A9FB91A9FA91A9FB91A9FB90A8FA90A8FA90A8
+      FB90A8FB90A8FB8FA7FA8FA8FB8FA7FA8FA7FA8FA7FB8FA7FB8EA6FA8FA7FA8E
+      A6FA8FA7FA8FA7FA90A8FA8FA7FA90A7FA8FA7FA91A8FA91A8FA92A9FA91A9FA
+      92A9FA93A9FA93A9FA93AAFA94AAFA95AAFA95ABFA95ACFA95ABF996ACF998AD
+      FA97ACF998ADFA98ADF999AEFA9AAEF99AAFF99BAFF99CB0F99CB0F99EB1FA9D
+      B1F99FB2FAA0B3FAA0B3F9A1B4F9A2B5F9A2B5F9A3B6F9A4B6F9A5B7F9A6B7F9
+      A6B8F9A8B9F9A8BAF9A9BAF9AABBF9ABBBF9AFBBE8B8B8B8B9B9B9BBBBBBBCBC
+      BCBCBCBCBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1C3C3C3C4C4C4C4C4C4C5C5C5C7
+      C7C7C8C8C8C8C8C8C9C9C9CACACACBCBCBCCCCCCCDCDCDCDCDCDCFCFCFD0D0D0
+      D0D0D0D1D1D1D2D2D2D3D3D3D4D4D4D4D4D4D5D5D5D5D5D5D6D6D6D7D7D7D8D8
+      D8D8D8D8D9D9D9D9D9D9DADADADBDBDBDBDBDBDCDCDCDDDDDDDDDDDDDEDEDEDF
+      DFDFDFDFDFE0E0E0E2E2E2E2E2E2E2E2E2E4E4E4E5E5E5E5E5E5E5E5E5E6E6E6
+      E7E7E7E7E7E7E8E8E8E9E9E9EAEAEAEAEAEAEAEAEAECECECECECECEDEDEDEDED
+      EDEEEEEEEFEFEFEFEFEFF0F0F0F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F3F3F3F3
+      F3F3F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F7F7F7
+      F6F6F6F7F7F7F7F7F7F6F6F6F7F7F7F7F7F7F6F6F6F7F7F7F6F6F6F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7BFBFBFBEBEBEBEBEBEBCBCBCBBBBBBBABABAB9B9B9B7B7B7B5B5
+      B5B4B4B4B2B2B2B1B1B1B0B0B0AEAEAEADADADACACACABABABAAAAAAA8A8A8A7
+      A7A7A6A6A6A5A5A5A3A3A3A2A2A2A0A0A09F9F9F9E9E9E9C9C9C9C9C9C9A9A9A
+      9999999999999AA2BD9CB3FB9CB3FB9BB3FB9BB3FB9BB2FB9BB2FB9BB2FB9AB2
+      FB9AB2FB9AB2FB9AB1FB9AB1FB9AB1FB99B1FB99B1FB99B0FB99B0FB98B0FB98
+      B0FB98B0FB98AFFB98AFFB98AFFB97AFFB97AFFB97AFFB97AEFB97AEFB96AEFB
+      96AEFB96AEFB96AEFB96ADFB95ADFB95ADFB95ADFB95ADFB95ACFB95ACFB94AC
+      FB94ACFB94ACFB94ABFB94ABFB93ABFB93ABFB93ABFB93ABFB92AAFB92AAFB92
+      AAFB92AAFB92AAFB92AAFB91A9FB91A9FB91A9FB91A9FB91A9FB90A8FB90A8FB
+      90A8FB90A8FB90A8FB8FA8FB8FA7FB8FA7FB8FA7FB8FA7FB8FA7FA8FA7FA8FA7
+      FA8FA7FA90A8FA91A8FA90A8FA90A8FA91A8FA92A9FA92A9FA92A9FA93AAFA94
+      AAFA93AAFA94AAFA94ABFA95ABFA95ABFA95ACFA96ACFA97ACFA98ADFA98ADFA
+      98ADFA99AEFA9AAFFA9AAFFA9BB0FA9BB0FA9CB0FA9DB1FA9EB1FA9EB2FA9FB3
+      FAA0B3FAA1B4F9A1B4F9A2B5F9A3B5F9A3B6F9A4B6F9A5B7F9A6B8F9A7B9F9A8
+      B9F9A8B9F9A9BAF9AABBF9ABBBF9B4B8C8B8B8B8BABABABBBBBBBCBCBCBDBDBD
+      BEBEBEBFBFBFC0C0C0C1C1C1C2C2C2C3C3C3C4C4C4C4C4C4C5C5C5C6C6C6C8C8
+      C8C9C9C9CACACACACACACCCCCCCDCDCDCECECECECECECFCFCFD0D0D0D1D1D1D1
+      D1D1D3D3D3D3D3D3D4D4D4D4D4D4D5D5D5D6D6D6D6D6D6D7D7D7D8D8D8D8D8D8
+      D9D9D9DADADADADADADBDBDBDCDCDCDCDCDCDDDDDDDEDEDEDEDEDEE0E0E0E0E0
+      E0E1E1E1E2E2E2E2E2E2E3E3E3E4E4E4E5E5E5E5E5E5E6E6E6E7E7E7E7E7E7E7
+      E7E7E8E8E8E9E9E9EAEAEAEAEAEAEBEBEBEBEBEBEDEDEDEDEDEDEEEEEEEEEEEE
+      EFEFEFEFEFEFF0F0F0F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F3F3F3F4F4F4F4F4
+      F4F4F4F4F4F4F4F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7
+      F7F7F6F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F6F6F6F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7
+    }
+  end
+  object Bevel2: TBevel
+    Height = 2
+    Top = 64
+    Width = 500
+    Align = alTop
+    Shape = bsTopLine
+  end
+  object Bevel3: TBevel
+    Height = 2
+    Top = 256
+    Width = 500
+    Align = alBottom
+    Shape = bsTopLine
+  end
+  object lbl_Caption: TLabel
+    Left = 5
+    Height = 14
+    Top = 72
+    Width = 162
+    Caption = 'Select Ancestor Type for %s'
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    Font.Style = [fsBold]
+    ParentColor = False
+  end
+  object Label2: TLabel
+    Left = 24
+    Height = 16
+    Top = 92
+    Width = 356
+    Caption = 'Select the class to use as ancestor for your RemObjects SDK Service:'
+    ParentColor = False
+  end
+  object rgClassType: TRadioGroup
+    Left = 24
+    Height = 134
+    Top = 112
+    Width = 453
+    Anchors = [akTop, akLeft, akRight, akBottom]
+    AutoFill = True
+    Caption = ' Available Types '
+    ChildSizing.LeftRightSpacing = 6
+    ChildSizing.TopBottomSpacing = 6
+    ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
+    ChildSizing.EnlargeVertical = crsHomogenousChildResize
+    ChildSizing.ShrinkHorizontal = crsScaleChilds
+    ChildSizing.ShrinkVertical = crsScaleChilds
+    ChildSizing.Layout = cclLeftToRightThenTopToBottom
+    ChildSizing.ControlsPerLine = 1
+    ClientHeight = 116
+    ClientWidth = 449
+    Items.Strings = (
+      '1'
+      '2'
+      '3'
+      '4'
+      '5'
+      '6'
+    )
+    OnClick = rgClassTypeClick
+    TabOrder = 0
+  end
+  object GroupBox1: TPanel
+    Left = 24
+    Height = 55
+    Top = 302
+    Width = 651
+    Anchors = [akLeft, akRight, akBottom]
+    BevelOuter = bvLowered
+    ClientHeight = 55
+    ClientWidth = 651
+    Color = clInfoBk
+    ParentColor = False
+    TabOrder = 1
+    object lbDescription: TLabel
+      Left = 5
+      Height = 43
+      Top = 5
+      Width = 641
+      Anchors = [akTop, akLeft, akRight, akBottom]
+      AutoSize = False
+      Caption = 'Test description goes right here...'
+      ParentColor = False
+      WordWrap = True
+    end
+  end
+  object Panel1: TPanel
+    Height = 35
+    Top = 258
+    Width = 500
+    Align = alBottom
+    BevelOuter = bvNone
+    ClientHeight = 35
+    ClientWidth = 500
+    TabOrder = 2
+    object btn_Ok: TBitBtn
+      Left = 341
+      Height = 25
+      Top = 5
+      Width = 75
+      Anchors = [akRight, akBottom]
+      Caption = 'OK'
+      Default = True
+      Glyph.Data = {
+        36060000424D3606000000000000360000002800000020000000100000000100
+        18000000000000060000C40E0000C40E00000000000000000000FF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FF006600006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565656565FF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FF0066001EB2311FB133006600FF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6565659A9A9A9A9A9A65
+        6565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FF00660031C24F22B7381AB02D21B437006600FF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565ABABAB9E9E9E9797979C
+        9C9C656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        00660047D36D3BCB5E25A83B0066001BA92E1DB132006600FF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FF656565BFBFBFB5B5B598989865656594
+        9494999999656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF006600
+        4FD67953DE7F31B54D006600FF00FF006600179D271EAE31006600FF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FF656565C4C4C4CACACAA5A5A5656565FF00FF65
+        65658C8C8C989898656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        00660041C563006600FF00FFFF00FFFF00FFFF00FF00660019AA2B006600FF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FF656565B5B5B5656565FF00FFFF00FFFF
+        00FFFF00FF656565939393656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FF006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF006600149D210066
+        00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565FF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FF6565658A8A8A656565FF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0066
+        00006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FF656565656565FF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FF006600006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565656565FF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      }
+      ModalResult = 1
+      NumGlyphs = 2
+      TabOrder = 0
+    end
+    object Button2: TBitBtn
+      Left = 420
+      Height = 25
+      Top = 5
+      Width = 75
+      Anchors = [akRight, akBottom]
+      Cancel = True
+      Caption = 'Cancel'
+      Glyph.Data = {
+        36060000424D3606000000000000360000002800000020000000100000000100
+        18000000000000060000C40E0000C40E00000000000000000000FF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A00009AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00009A0000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        00009A174AFD103BF400009AFF00FFFF00FFFF00FFFF00FF00009A002CF80030
+        FC00009AFF00FFFF00FFFF00FFFF00FF6B6B6BA8A8A8A0A0A06B6B6BFF00FFFF
+        00FFFF00FFFF00FF6B6B6B9A9A9A9C9C9C6B6B6BFF00FFFF00FFFF00FFFF00FF
+        00009A1A47F81A4CFF123BF100009AFF00FFFF00FF00009A012DF60132FF002A
+        F300009AFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7AAAAAA9F9F9F6B6B6BFF
+        00FFFF00FF6B6B6B9999999E9E9E9797976B6B6BFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A1C47F61B4DFF143EF400009A00009A002DF80134FF032BF20000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7ABABABA2A2A26B
+        6B6B6B6B6B9A9A9A9E9E9E9898986B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FF00009A1D48F61D50FF103DFB0431FE0132FF002CF600009AFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7ACACACA3
+        A3A39F9F9F9E9E9E9999996B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FF00009A1A48F91342FF0C3CFF0733F600009AFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7A7
+        A7A7A3A3A39C9C9C6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FF00009A214EFC1D4BFF1847FF1743F600009AFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BACACACAC
+        ACACA9A9A9A4A4A46B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FF00009A2E5BF92C5FFF224DF8204BF82355FF1B46F600009AFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BB1B1B1B3B3B3AB
+        ABABAAAAAAAFAFAFA6A6A66B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A3664FA386BFF2D59F400009A00009A224CF42558FF1D49F60000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BB6B6B6B9B9B9AEAEAE6B
+        6B6B6B6B6BA9A9A9B0B0B0A7A7A76B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        00009A4071FA4274FF325DF100009AFF00FFFF00FF00009A224DF1275AFF204C
+        F800009AFF00FFFF00FFFF00FFFF00FF6B6B6BBBBBBBBEBEBEAFAFAF6B6B6BFF
+        00FFFF00FF6B6B6BA7A7A7B1B1B1AAAAAA6B6B6BFF00FFFF00FFFF00FFFF00FF
+        00009A497AFC3B66F300009AFF00FFFF00FFFF00FFFF00FF00009A2550F42655
+        FA00009AFF00FFFF00FFFF00FFFF00FF6B6B6BC0C0C0B5B5B56B6B6BFF00FFFF
+        00FFFF00FFFF00FF6B6B6BAAAAAAAEAEAE6B6B6BFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A00009AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00009A0000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      }
+      ModalResult = 2
+      NumGlyphs = 2
+      TabOrder = 1
+    end
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fROServerClassForm.lrs b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fROServerClassForm.lrs
new file mode 100644
index 0000000..83ad9bd
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fROServerClassForm.lrs	
@@ -0,0 +1,5064 @@
+{ This is an automatically generated lazarus resource file }
+
+LazarusResources.Add('TROServerClassForm','FORMDATA',[
+  'TPF0'#18'TROServerClassForm'#17'ROServerClassForm'#4'Left'#3'}'#1#6'Height'#3
+  +'%'#1#3'Top'#3#239#0#5'Width'#3#244#1#18'HorzScrollBar.Page'#3#243#1#18'Vert'
+  +'ScrollBar.Page'#3'$'#1#13'ActiveControl'#7#11'rgClassType'#11'BorderIcons'
+  +#11#0#11'BorderStyle'#7#8'bsSingle'#7'Caption'#6#27'Select Ancestor Type for'
+  +' %s'#12'ClientHeight'#3'%'#1#11'ClientWidth'#3#244#1#11'Font.Height'#2#245#9
+  +'Font.Name'#6#6'Tahoma'#8'OnCreate'#7#10'FormCreate'#8'Position'#7#14'poScre'
+  +'enCenter'#0#6'TImage'#6'Image2'#6'Height'#2'@'#5'Width'#3#244#1#5'Align'#7#5
+  +'alTop'#8'AutoSize'#9#12'Picture.Data'#10'Bw'#1#0#7'TBitmap6w'#1#0'BM6w'#1#0
+  +#0#0#0#0'6'#0#0#0'('#0#0#0#244#1#0#0'@'#0#0#0#1#0#24#0#0#0#0#0#0'w'#1#0#192
+  +#30#0#0#192#30#0#0#0#0#0#0#0#0#0#0#133#133#133#133#133#133#133#133#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133
+  +#133#133#133#133#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#131
+  +#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131
+  +#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131
+  +#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130
+  +#130#130#130#130#130#130#130#130#130#130#130#130#130#130#129#129#129#129#129
+  +#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129
+  +#129#129#129#129#129#129#129#129#129#129#129#129#128#128#128#129#129#129#129
+  +#129#129#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128#128#128#128#128#128#128#128#128#128''
+  +'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~}}}}}'
+  +'}}}}}}}||||||{{{zzzyyyyyyxxxxxxwwwvvvuuuuuutttuuutttttttttj|'#195'g'#221'g'
+  +''#221'h'#128#220'i'#128#221'i'#129#221'j'#129#220'j'#129#220'k'#130#220'k'
+  +#130#220'l'#130#220'l'#131#220'n'#131#214#128#132#149#135#135#135#139#139#139
+  +#141#141#141#143#143#143#144#144#144#145#145#145#146#146#146#146#146#146#146
+  +#146#146#146#146#146#145#145#145#145#145#145#144#144#144#144#144#144#144#144
+  +#144#143#143#143#143#143#143#143#143#143#143#143#143#143#143#143#144#144#144
+  +#145#145#145#145#145#145#146#146#146#146#146#146#146#146#146#148#148#148#148
+  +#148#148#149#149#149#150#150#150#150#150#150#151#151#151#151#151#151#152#152
+  +#152#154#154#154#154#154#154#154#154#154#155#155#155#156#156#156#157#157#157
+  +#157#157#157#158#158#158#159#159#159#160#160#160#160#160#160#162#162#162#162
+  +#162#162#162#162#162#163#163#163#165#165#165#165#165#165#166#166#166#167#167
+  +#167#168#168#168#168#168#168#169#169#169#169#169#169#171#171#171#172#172#172
+  +#172#172#172#174#174#174#175#175#175#176#176#176#178#178#178#179#179#179#181
+  +#181#181#182#182#182#183#183#183#185#185#185#186#186#186#187#187#187#188#188
+  +#188#189#189#189#190#190#190#191#191#191#191#191#191#192#192#192#192#192#192
+  +#193#193#193#194#194#194#194#194#194#194#194#194#194#194#194#195#195#195#195
+  +#195#195#196#196#196#196#196#196#197#197#197#197#197#197#198#198#198#198#198
+  +#198#199#199#199#199#199#199#200#200#200#200#200#200#201#201#201#202#202#202
+  +#203#203#203#203#203#203#204#204#204#204#204#204#205#205#205#206#206#206#206
+  +#206#206#207#207#207#208#208#208#209#209#209#209#209#209#210#210#210#210#210
+  +#210#210#210#210#211#211#211#211#211#211#212#212#212#212#212#212#212#212#212
+  +#212#212#212#212#212#212#212#212#212#213#213#213#213#213#213#213#213#213#213
+  +#213#213#213#213#213#214#214#214#214#214#214#214#214#214#214#214#214#214#214
+  +#214#214#214#214#215#215#215#215#215#215#215#215#215#215#215#215#215#215#215
+  +#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216#217
+  +#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217
+  +#217#218#218#218#218#218#218#218#218#218#218#218#218#219#219#219#219#219#219
+  +#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219#220#220#220#220
+  +#220#220#220#220#220#220#220#220#220#220#220#221#221#221#221#221#221#221#221
+  +#221#221#221#221#221#221#221#221#221#221#222#222#222#222#222#222#222#222#222
+  +#222#222#222#222#222#222#222#222#222#223#223#223#223#223#223#223#223#223#223
+  +#223#223#223#223#223#223#223#223#224#224#224#224#224#224#224#224#224#224#224
+  +#224#224#224#224#224#224#224#225#225#225#225#225#225#225#225#225#225#225#225
+  +#225#225#225#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226
+  +#226#226#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227
+  +#227#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#229#229#230#230#230#230#230#230#230#230#230#230#230#230#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  ,#234#234#234#234#234#234#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#237#237#237#236#236#236#237#237#237#237#237#237
+  +#237#237#237#237#237#237#238#238#238#237#237#237#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#245#245#245#244#244#244#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#134#134#134#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#132#132
+  +#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#132#132#132#131#131#131#131#131#131#131
+  +#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131
+  +#131#131#131#131#131#131#131#131#131#131#131#131#131#130#130#130#130#130#130
+  +#131#131#131#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130
+  +#130#130#130#130#130#130#130#130#129#129#129#129#129#129#129#129#129#129#129
+  +#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129
+  +#129#129#129#129#129#129#129#129#129#129#129#129#128#128#128#128#128#128#128
+  +#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128#128#128#128''#128#128#128#128#128#128''
+  +''#128#128#128#128#128#128'~~~~~~~~~~~~~'
+  +'~~~~~~~~~~~~~~}}}}}}}}}||||||{{{zzzzzzyyyyyyxxxwwwvvvvvvuuuvvvvvvuuuuuusw'
+  +#137'h'#128#221'h'#128#221'i'#129#221'i'#129#221'j'#129#221'j'#130#221'k'#130
+  +#221'j'#130#221'l'#131#221'm'#131#221'm'#131#220'n'#132#220'p'#132#215''#135
+  +#168#140#140#140#142#142#142#145#145#145#145#145#145#147#147#147#147#147#147
+  +#148#148#148#148#149#149#149#150#150#150#151#151#149#151#151#150#152#152#150
+  +#152#152#149#150#150#148#149#149#147#148#148#146#147#147#145#145#145#145#145
+  +#145#145#145#145#146#146#146#146#146#146#147#147#147#147#147#147#147#147#147
+  +#148#148#148#149#149#149#149#149#149#151#151#151#151#151#151#152#152#152#152
+  +#152#152#153#153#153#154#154#154#155#155#155#156#156#156#157#157#157#157#157
+  +#157#158#158#158#158#158#158#159#159#159#160#160#160#160#160#160#161#161#161
+  +#162#162#162#163#163#163#164#164#164#164#164#164#165#165#165#166#166#166#167
+  +#167#167#168#168#168#168#168#168#169#169#169#170#170#170#171#171#171#172#172
+  +#172#173#173#173#173#173#173#174#174#174#175#175#175#177#177#177#177#178#186
+  +#176#179#193#175#179#199#176#180#201#178#182#202#178#182#202#180#183#202#181
+  +#184#202#184#186#198#187#188#195#191#191#192#192#192#192#192#192#192#193#193
+  +#193#193#193#193#195#195#195#195#195#195#195#195#195#196#196#196#196#196#196
+  +#196#196#196#196#196#196#198#198#198#197#197#197#198#198#198#198#198#198#199
+  +#199#199#199#199#199#200#200#200#201#201#201#201#201#201#201#201#201#202#202
+  +#202#204#204#204#204#204#204#204#204#204#205#205#205#206#206#206#206#206#206
+  +#207#207#207#207#207#207#208#208#208#209#209#209#210#210#210#211#211#211#211
+  +#211#211#211#211#211#211#211#211#212#212#212#212#212#212#213#213#213#213#213
+  +#213#213#213#213#213#213#213#213#213#213#213#213#213#214#214#214#214#214#214
+  +#214#214#214#214#214#214#214#214#214#215#215#215#215#215#215#215#215#215#215
+  +#215#215#215#215#215#215#215#215#216#216#216#216#216#216#216#216#216#216#216
+  +#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216#217#217#217
+  +#216#216#216#216#216#216#217#217#217#217#217#217#217#217#217#217#217#217#218
+  +#218#218#217#217#217#218#218#218#218#218#218#218#218#218#218#218#218#218#218
+  +#218#219#219#219#219#219#219#219#219#219#219#219#219#220#220#220#219#219#219
+  +#220#220#220#220#220#220#220#220#220#221#221#221#220#220#220#221#221#221#222
+  +#222#222#221#221#221#222#222#222#222#222#222#221#221#221#221#221#221#222#222
+  +#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222#223#223#223
+  +#223#223#223#223#223#223#223#223#223#224#224#224#224#224#224#224#224#224#224
+  +#224#224#224#224#224#224#224#224#225#225#225#225#225#225#225#225#225#225#225
+  ,#225#225#225#225#225#225#225#225#225#225#226#226#226#226#226#226#226#226#226
+  +#226#226#226#226#226#226#227#227#227#227#227#227#227#227#227#227#227#227#227
+  +#227#227#227#227#227#228#228#228#228#228#228#228#228#228#228#228#228#228#228
+  +#228#228#228#228#228#228#228#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#229#229#229#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#234#234#234#233#233#233#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#244#244#244#243#243#243#243#243
+  +#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134
+  +#133#133#133#133#133#133#134#134#134#134#134#134#134#134#134#133#133#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133
+  +#133#132#132#132#133#133#133#133#133#133#132#132#132#132#132#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#132#132#132#131#131#131#131#131#131#131#131#131#131#131#131#131#131
+  +#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131
+  +#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130
+  +#130#130#130#130#130#130#130#130#130#130#130#130#130#130#129#129#129#129#129
+  +#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129
+  +#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129
+  +#129#129#129#129#129#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128#128#128#128#128#128#128''#128#128#128#128#128#128#128#128
+  +#128''#128#128#128#128#128#128#128#128#128''#128#128#128#128
+  +#128#128''#128#128#128#128#128#128#128#128#128#128#128#128''#128#128
+  +#128#128#128#128'~~~~~~~~~~~~}}}}}}|||{{{{{{zzzyyyyyyyyyxxxwwwwwwvv'
+  +'vvvvvvvvvvvvvn|'#176'i'#129#222'i'#128#221'j'#130#222'k'#130#221'k'#130#221
+  +'k'#130#221'l'#131#221'l'#131#222'm'#132#220'n'#132#221'n'#133#221'o'#133#221
+  +'o'#133#220#128#137#175#143#143#143#145#145#145#147#147#147#147#147#147#148
+  +#148#148#151#151#151#152#153#153#154#156#156#155#158#158#158#161#161#159#163
+  +#163#159#163#163#158#162#162#156#159#159#153#155#155#150#152#152#148#149#149
+  +#146#147#147#145#145#145#145#145#145#146#146#146#147#147#147#147#147#147#148
+  +#148#148#149#149#149#149#149#149#150#150#150#151#151#151#151#151#151#152#152
+  +#152#152#152#152#154#154#154#155#155#155#155#155#155#156#156#156#156#156#156
+  +#157#157#157#158#158#158#159#159#159#159#159#159#160#160#160#160#160#160#161
+  +#161#161#163#163#163#163#163#163#164#164#164#164#164#164#165#165#165#166#166
+  +#166#167#167#167#168#168#168#168#168#168#169#169#169#169#169#169#172#172#172
+  +#172#172#172#173#173#173#174#174#174#174#175#179#171#175#195#170#175#205#171
+  +#177#208#172#178#207#174#179#207#174#179#207#176#181#208#177#182#207#178#182
+  +#207#178#183#207#179#184#207#180#184#207#182#186#208#186#188#203#190#191#197
+  +#193#193#193#194#194#194#194#194#194#195#195#195#195#195#195#196#196#196#196
+  +#196#196#196#196#196#197#197#197#198#198#198#198#198#198#198#198#198#198#198
+  +#198#199#199#199#200#200#200#201#201#201#200#200#200#202#202#202#202#202#202
+  +#202#202#202#204#204#204#204#204#204#204#204#204#205#205#205#206#206#206#206
+  +#206#206#207#207#207#208#208#208#208#208#208#208#208#208#209#209#209#211#211
+  +#211#211#211#211#211#211#211#211#211#211#212#212#212#212#212#212#213#213#213
+  +#213#213#213#213#213#213#213#213#213#213#213#213#213#213#213#213#213#213#214
+  ,#214#214#214#214#214#214#214#214#215#215#215#215#215#215#215#215#215#215#215
+  +#215#215#215#215#215#215#215#215#215#215#216#216#216#216#216#216#216#216#216
+  +#216#216#216#216#216#216#217#217#217#217#217#217#217#217#217#217#217#217#217
+  +#217#217#217#217#217#218#218#218#218#218#218#218#218#218#218#218#218#218#218
+  +#218#218#218#218#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219
+  +#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220
+  +#220#220#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#222#222
+  +#222#222#222#222#222#222#222#222#222#222#222#222#222#223#223#223#223#223#223
+  +#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#224#224#224#224
+  +#224#224#224#224#224#224#224#224#224#224#224#224#224#224#225#225#225#225#225
+  +#225#225#225#225#225#225#225#225#225#225#225#225#225#226#226#226#226#226#226
+  +#226#226#226#226#226#226#226#226#226#226#226#226#227#227#227#227#227#227#227
+  +#227#227#226#226#226#227#227#227#228#228#228#227#227#227#228#228#228#227#227
+  +#227#227#227#227#229#229#229#228#228#228#228#228#228#229#229#229#228#228#228
+  +#229#229#229#228#228#228#229#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#229#229#229#229#229#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#239#239#239#238#238#238#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242
+  +#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#247#247#247#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#135#135#135#135#135#135#135#135#135#134#134#134#134
+  +#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134
+  +#134#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#132#131#131#131#131#131#131#131#131#131
+  +#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131
+  +#131#131#131#131#131#131#131#131#130#130#130#130#130#130#130#130#130#130#130
+  +#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130
+  +#129#129#129#129#129#129#129#129#129#130#130#130#130#130#130#129#129#129#129
+  +#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129
+  +#129#129#129#129#129#129#129#130#130#130#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128#129#129#129#129#129#129#128#128#128#128#128#128#129#129#129
+  +#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129
+  +#129#129#128#128#128#128#128#128#128#128#128'~~~~~~~~~}}}||||||{{{{{{z'
+  +'zzyyyyyyxxxwwwxxxwwwwwwvvvvvvwwwwx~j'#128#215'j'#129#221'k'#130#222'k'#131
+  +#221'k'#131#221'l'#131#221'm'#132#222'n'#132#221'n'#132#221'n'#132#221'o'#133
+  +#221'o'#133#221'p'#134#220'p'#134#220'|'#138#191#145#145#145#147#147#147#148
+  +#148#148#150#151#151#152#153#153#156#158#158#160#164#164#165#171#171#169#177
+  +#177#172#181#181#172#181#181#172#180#180#167#175#175#163#169#169#158#163#163
+  +#154#157#157#150#152#152#149#150#150#148#148#148#147#147#147#148#148#148#148
+  +#148#148#149#149#149#149#149#149#150#150#150#151#151#151#151#151#151#152#152
+  +#152#153#153#153#153#153#153#154#154#154#155#155#155#156#156#156#156#156#156
+  +#157#157#157#159#159#159#159#159#159#159#159#159#160#160#160#160#160#160#161
+  ,#161#161#162#162#162#163#163#163#164#164#164#164#164#164#165#165#165#167#167
+  +#167#167#167#167#168#168#168#168#168#168#169#169#169#170#170#170#170#170#170
+  +#172#172#172#173#173#173#173#174#178#170#175#196#169#175#208#170#176#208#170
+  +#176#208#172#178#208#174#179#208#174#179#208#175#180#208#176#181#208#178#183
+  +#208#179#183#208#179#184#208#180#184#208#181#185#208#182#186#208#183#186#208
+  +#183#187#208#186#189#206#191#192#197#194#194#194#195#195#195#196#196#196#196
+  +#196#196#196#196#196#196#196#196#197#197#197#198#198#198#198#198#198#198#198
+  +#198#198#198#198#199#199#199#199#199#199#201#201#201#202#202#202#202#202#202
+  +#202#202#202#203#203#203#204#204#204#204#204#204#205#205#205#205#205#205#206
+  +#206#206#207#207#207#207#207#207#208#208#208#208#208#208#209#209#209#210#210
+  +#210#211#211#211#211#211#211#211#211#211#212#212#212#212#212#212#212#212#212
+  +#213#213#213#213#213#213#213#213#213#213#213#213#213#213#213#213#213#213#213
+  +#213#213#214#214#214#214#214#214#214#214#214#214#214#214#214#214#214#215#215
+  +#215#215#215#215#215#215#215#215#215#215#215#215#215#216#216#216#216#216#216
+  +#216#216#216#216#216#216#217#217#217#217#217#217#217#217#217#217#217#217#217
+  +#217#217#217#217#217#217#217#217#218#218#218#218#218#218#218#218#218#218#218
+  +#218#218#218#218#218#218#218#218#218#218#219#219#219#219#219#219#219#219#219
+  +#219#219#219#219#219#219#220#220#220#220#220#220#220#220#220#220#220#220#220
+  +#220#220#220#220#220#221#221#221#221#221#221#221#221#221#221#221#221#222#222
+  +#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222
+  +#222#222#222#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223
+  +#223#223#224#224#224#224#224#224#224#224#224#224#224#224#225#225#225#225#225
+  +#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225#226#226#226
+  +#226#226#226#226#226#226#226#226#226#227#227#227#227#227#227#227#227#227#227
+  +#227#227#227#227#227#227#227#227#227#227#227#228#228#228#228#228#228#228#228
+  +#228#228#228#228#228#228#228#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#242#242#242#241#241#241#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#246#246#246#245#245#245#245#245#245#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#247#247#247#246#246#246#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#135#135#135#135#135#135#135#135#135#135
+  +#135#135#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134
+  +#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#133#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#132#132#132#132#132#132#132#132
+  +#132#133#133#133#133#133#133#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#131#131#131#132
+  +#132#132#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131
+  +#131#131#131#131#131#131#131#130#130#130#131#131#131#131#131#131#130#130#130
+  +#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#131#131#131#130
+  +#130#130#130#130#130#130#130#130#130#130#130#129#129#129#129#129#129#129#129
+  +#129#130#130#130#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129
+  +#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129
+  +#129#129#129#129#129#129#129#129#129#129#129#128#128#128#129#129#129#129#129
+  ,#129#130#130#130#130#130#130#129#129#129#130#130#130#130#130#130#130#130#130
+  +#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130
+  +#130#130#130#130#130#130#130#130#129#129#129#129#129#129#128#128#128#128#128
+  +#128'~~~~~~~~~}}}||||||{{{{{{zzzzzzyyyxxxxxxwwwwwwxxxwwwxxxr|'#165'k'
+  +#130#222'k'#131#222'l'#131#222'l'#131#222'l'#132#222'n'#132#222'n'#132#221'n'
+  +#133#222'o'#133#221'o'#133#221'p'#134#221'p'#134#221'p'#134#220'r'#135#220'x'
+  +#137#206#145#146#152#148#148#148#151#151#151#154#156#156#159#163#163#166#172
+  +#172#175#184#184#181#192#192#186#199#199#188#202#202#187#201#201#183#195#195
+  +#176#187#187#169#177#177#162#167#167#155#158#158#150#152#152#148#148#148#147
+  +#147#147#148#148#148#149#149#149#149#149#149#149#149#149#150#150#150#151#151
+  +#151#151#151#151#152#152#152#153#153#153#154#154#154#155#155#155#155#155#155
+  +#156#156#156#157#157#157#157#157#157#159#159#159#159#159#159#159#159#159#160
+  +#160#160#161#161#161#161#161#161#162#162#162#163#163#163#164#164#164#164#164
+  +#164#165#165#165#166#166#166#167#167#167#168#168#168#168#168#168#169#169#169
+  +#170#170#170#171#171#171#172#172#172#170#173#189#168#174#206#168#175#208#170
+  +#176#208#170#176#208#171#177#208#173#179#208#174#179#208#174#180#208#175#180
+  +#208#177#182#209#178#183#208#179#183#208#179#184#208#180#185#208#181#185#208
+  +#183#187#209#184#188#209#184#188#209#186#189#208#187#190#208#190#192#205#196
+  +#196#197#197#197#197#197#197#197#197#197#197#198#198#198#198#198#198#198#198
+  +#198#199#199#199#200#200#200#200#200#200#200#200#200#200#200#200#202#202#202
+  +#202#202#202#203#203#203#203#203#203#203#203#203#205#205#205#205#205#205#205
+  +#205#205#206#206#206#207#207#207#208#208#208#208#208#208#209#209#209#209#209
+  +#209#210#210#210#211#211#211#212#212#212#212#212#212#212#212#212#213#213#213
+  +#213#213#213#213#213#213#213#213#213#214#214#214#214#214#214#214#214#214#214
+  +#214#214#214#214#214#214#214#214#215#215#215#215#215#215#214#214#214#215#215
+  +#215#216#216#216#216#216#216#215#215#215#216#216#216#216#216#216#216#216#216
+  +#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217
+  +#217#217#217#217#217#217#217#217#217#217#217#217#217#217#218#218#218#218#218
+  +#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#219#219#219
+  +#219#219#219#219#219#219#219#219#219#220#220#220#220#220#220#220#220#220#220
+  +#220#220#220#220#220#220#220#220#220#220#220#221#221#221#221#221#221#221#221
+  +#221#221#221#221#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222
+  +#222#222#222#222#222#222#223#223#223#223#223#223#223#223#223#223#223#223#223
+  +#223#223#223#223#223#224#224#224#224#224#224#224#224#224#224#224#224#224#224
+  +#224#224#224#224#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225
+  +#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226
+  +#226#226#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#228#228
+  +#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#231#231#231#231#231#231#231#231#231#231#231#231#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#236#236#236#236#236#236#236#236#236#236#236#236#237#237
+  +#237#236#236#236#237#237#237#237#237#237#236#236#236#237#237#237#237#237#237
+  +#237#237#237#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#136#136#136#136
+  +#136#136#135#135#135#135#135#135#136#136#136#135#135#135#135#135#135#135#135
+  ,#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#134#134#134
+  +#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134
+  +#134#134#134#134#134#134#134#134#134#134#134#133#133#133#133#133#133#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133
+  +#133#133#133#133#133#133#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131
+  +#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#130#130#130#130
+  +#130#130#131#131#131#131#131#131#131#131#131#130#130#130#130#130#130#130#130
+  +#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130
+  +#130#130#130#130#130#130#129#129#129#129#129#129#130#130#130#129#129#129#129
+  +#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#130#130
+  +#130#129#129#129#130#130#130#130#130#130#131#131#131#130#130#130#130#130#130
+  +#130#130#130#131#131#131#131#131#131#132#132#132#132#132#132#131#131#131#131
+  +#131#131#131#131#131#132#132#132#131#131#131#131#131#131#131#131#131#131#131
+  +#131#130#130#130#129#129#129#129#129#129#128#128#128'~~~~~~}}}}}}||||||{{'
+  +'{zzzzzzyyyyyyyyyxxxxxxxxxxxxxxxyyym'#130#210'l'#131#222'l'#132#222'l'#131
+  +#222'l'#132#222'm'#132#222'o'#133#222'o'#133#222'p'#134#221'p'#134#221'q'#135
+  +#221'q'#135#221'r'#135#221'r'#135#220's'#136#221'w'#138#211#141#145#161#150
+  +#151#151#155#157#157#163#167#167#172#180#180'ODkA3^A3^A3^A3^ZRv'#144#149#166
+  +#183#196#196#172#181#181#162#168#168#155#158#158#151#152#152#149#149#149#149
+  +#149#149#149#149#149#150#150#150#151#151#151#151#151#151#152#152#152#153#153
+  +#153#153#153#153#154#154#154#154#154#154#156#156#156#156#156#156#157#157#157
+  +#158#158#158#158#158#158#159#159#159#160#160#160#160#160#160#161#161#161#162
+  +#162#162#162#162#162#163#163#163#164#164#164#165#165#165#165#165#165#166#166
+  +#166#166#166#166#168#168#168#168#168#168#169#169#169#170#170#170#171#171#171
+  +#171#171#171#168#173#195#167#174#210#167#174#209#168#175#208#170#177#209#170
+  +#177#208#171#177#208#173#179#208#174#180#209#175#181#209#176#181#209#177#182
+  +#209#179#184#209#179#184#209#181#185#209#181#185#209#182#186#208#183#187#209
+  +#184#188#209#185#189#208#186#189#208#187#190#208#187#190#208#190#192#207#196
+  +#196#199#198#198#198#197#197#197#198#198#198#199#199#199#199#199#199#199#199
+  +#199#200#200#200#200#200#200#200#200#200#201#201#201#202#202#202#202#202#202
+  +#203#203#203#203#203#203#204#204#204#205#205#205#205#205#205#206#206#206#206
+  +#206#206#207#207#207#207#207#207#208#208#208#209#209#209#209#209#209#210#210
+  +#210#210#210#210#212#212#212#212#212#212#212#212#212#213#213#213#213#213#213
+  +#213#213#213#214#214#214#214#214#214#214#214#214#214#214#214#214#214#214#214
+  +#214#214#215#215#215#215#215#215#215#215#215#215#215#215#215#215#215#216#216
+  +#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216
+  +#217#217#217#217#217#217#217#217#217#217#217#217#218#218#218#218#218#218#218
+  +#218#218#218#218#218#218#218#218#218#218#218#219#219#219#219#219#219#219#219
+  +#219#219#219#219#219#219#219#219#219#219#220#220#220#220#220#220#220#220#220
+  +#220#220#220#220#220#220#220#220#220#221#221#221#221#221#221#221#221#221#221
+  +#221#221#221#221#221#221#221#221#222#222#222#221#221#221#222#222#222#222#222
+  +#222#221#221#221#222#222#222#223#223#223#222#222#222#222#222#222#222#222#222
+  +#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223
+  +#223#223#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#225#225
+  +#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225
+  +#226#226#226#226#226#226#226#226#226#226#226#226#227#227#227#227#227#227#227
+  +#227#227#227#227#227#227#227#227#227#227#227#227#227#227#228#228#228#228#228
+  +#228#228#228#228#228#228#228#228#228#228#228#228#228#229#229#229#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241
+  ,#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#242#242#242#241#241#241#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#244#244#244#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#246#246#246#245#245#245#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#136#136#136#136#136#136#136
+  +#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136
+  +#136#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135
+  +#135#135#135#135#135#135#134#134#134#134#134#134#135#135#135#135#135#135#135
+  +#135#135#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134
+  +#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#133#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133
+  +#133#133#132#132#132#133#133#133#132#132#132#132#132#132#132#132#132#132#132
+  +#132#131#131#131#132#132#132#131#131#131#131#131#131#132#132#132#132#132#132
+  +#132#132#132#132#132#132#131#131#131#132#132#132#131#131#131#131#131#131#131
+  +#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#130#130
+  +#130#130#130#130#131#131#131#130#130#130#131#131#131#130#130#130#130#130#130
+  +#130#130#130#130#130#130#129#129#129#130#130#130#130#130#130#129#129#129#129
+  +#129#129#130#130#130#130#130#130#130#130#130#129#129#129#130#130#130#131#131
+  +#131#130#130#130#131#131#131#131#131#131#131#131#131#132#132#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#133#133#133#133#133#133#133#133#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#132#132#132#132#132#132#131#131
+  +#131#131#131#131#130#130#130#130#130#130#129#129#129#128#128#128'~~~~~~}}'
+  +'}}}}|||{{{{{{zzzzzzzzzyyyyyyyyyxxxyyyzzzw}'#147'l'#132#223'm'#132#223'm'#133
+  +#222'n'#133#222'n'#133#222'o'#133#222'p'#134#222'p'#135#222'q'#135#222'q'#135
+  +#221'q'#135#221's'#136#221's'#136#222't'#137#221't'#137#221'w'#138#216#140
+  +#147#173#156#158#158#164#169#169#174#183#183'?2`?2`?2`?2`?2`?2`?2`qo'#141#185
+  +#198#198#171#179#179#161#166#166#154#156#156#151#151#151#150#150#150#150#150
+  +#150#151#151#151#152#152#152#152#152#152#152#152#152#153#153#153#154#154#154
+  +#154#154#154#154#154#154#156#156#156#157#157#157#157#157#157#158#158#158#158
+  +#158#158#160#160#160#160#160#160#160#160#160#161#161#161#162#162#162#162#162
+  +#162#163#163#163#164#164#164#164#164#164#165#165#165#166#166#166#166#166#166
+  +#168#168#168#169#169#169#169#169#169#170#170#170#170#170#173#166#172#202#166
+  +#174#210#167#174#210#169#176#210#169#176#209#170#177#209#171#177#209#172#178
+  +#209#174#179#209#174#180#209#175#181#209#176#181#209#178#183#210#179#184#209
+  +#180#185#209#180#185#209#182#186#209#183#187#209#183#187#209#185#189#210#186
+  +#190#209#187#190#209#188#191#209#189#192#210#190#193#210#191#194#209#197#198
+  +#201#199#199#199#199#199#199#200#200#200#200#200#200#200#200#200#201#201#201
+  +#201#201#201#202#202#202#201#201#201#203#203#203#203#203#203#204#204#204#204
+  +#204#204#205#205#205#206#206#206#206#206#206#207#207#207#208#208#208#208#208
+  +#208#208#208#208#208#208#208#210#210#210#211#211#211#211#211#211#212#212#212
+  +#213#213#213#213#213#213#212#212#212#213#213#213#213#213#213#214#214#214#214
+  +#214#214#214#214#214#214#214#214#214#214#214#214#214#214#214#214#214#215#215
+  +#215#215#215#215#215#215#215#215#215#215#215#215#215#216#216#216#216#216#216
+  +#216#216#216#216#216#216#216#216#216#216#216#216#217#217#217#217#217#217#217
+  +#217#217#217#217#217#217#217#217#218#218#218#218#218#218#218#218#218#218#218
+  +#218#218#218#218#218#218#218#218#218#218#219#219#219#219#219#219#219#219#219
+  +#219#219#219#219#219#219#220#220#220#220#220#220#220#220#220#220#220#220#220
+  +#220#220#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221
+  +#221#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222
+  +#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#224
+  +#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#225#225
+  +#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225#226#226#226
+  +#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#227#227#227#226
+  +#226#226#227#227#227#226#226#226#227#227#227#227#227#227#227#227#227#227#227
+  +#227#227#227#227#227#227#227#227#227#227#228#228#228#228#228#228#228#228#228
+  +#228#228#228#228#228#228#228#228#228#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#230#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#231#231#231#231#231#231#231#231#231
+  ,#231#231#231#231#231#231#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#233#233#233#232#232#232#233#233#233#233#233
+  +#233#233#233#233#233#233#233#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#137#137#137#137#137#137#137#137#137#137#137
+  +#137#136#136#136#137#137#137#136#136#136#136#136#136#136#136#136#136#136#136
+  +#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#135#135#135#135
+  +#135#135#135#135#135#135#135#135#134#134#134#135#135#135#135#135#135#135#135
+  +#135#135#135#135#134#134#134#135#135#135#134#134#134#134#134#134#135#135#135
+  +#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134
+  +#134#134#133#133#133#133#133#133#133#133#133#133#133#133#134#134#134#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#133#133#132#132#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#132#132#132#131#131#131#132#132#132#131#131#131#131#131#131#131#131
+  +#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131
+  +#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#130#130#130#130
+  +#130#130#131#131#131#130#130#130#130#130#130#130#130#130#130#130#130#131#131
+  +#131#130#130#130#130#130#130#130#130#130#130#130#130#131#131#131#132#132#132
+  +#131#131#131#132#132#132#132#132#132#133#133#133#133#133#133#133#133#133#134
+  +#134#134#134#134#134#134#134#134#135#135#135#135#135#135#135#135#135#135#135
+  +#135#135#135#135#135#135#135#134#134#134#133#133#133#133#133#133#133#133#133
+  +#131#131#131#131#131#131#130#130#130#129#129#129#128#128#128'~~~}}}'
+  +'||||||{{{{{{zzzzzzzzzzzzyyyzzzzzzzzzq'#129#191'm'#132#223'n'#133#223'o'#134
+  +#223'o'#133#222'p'#134#223'p'#135#223'q'#135#222'q'#136#222'r'#136#222'r'#136
+  +#222's'#137#222't'#137#221't'#137#221't'#138#221'u'#138#221'x'#142#222#142
+  +#154#186#161#166#166#172#180#180'>0c>0c>0c>0c>0c>0c>0c>0c'#137#141#163#181
+  +#192#192#167#174#174#158#161#161#152#153#153#150#150#150#150#150#150#151#151
+  +#151#152#152#152#153#153#153#153#153#153#154#154#154#154#154#154#155#155#155
+  +#155#155#155#157#157#157#158#158#158#158#158#158#158#158#158#160#160#160#161
+  +#161#161#161#161#161#162#162#162#162#162#162#163#163#163#163#163#163#164#164
+  +#164#165#165#165#166#166#166#166#166#166#166#166#166#167#167#167#169#169#169
+  +#169#169#169#170#170#170#171#171#171#167#172#198#166#173#210#167#175#211#169
+  +#176#211#170#177#210#170#177#210#171#178#210#172#178#210#173#179#210#175#180
+  +#210#175#181#210#176#182#210#178#183#210#179#184#210#179#184#210#181#186#210
+  +#181#186#209#183#187#210#183#187#209#184#188#210#185#189#210#186#190#209#187
+  +#190#209#188#191#209#189#193#210#190#193#210#191#194#210#192#195#209#198#198
+  +#200#199#199#199#199#199#199#201#201#201#200#200#200#201#201#201#201#201#201
+  +#202#202#202#202#202#202#203#203#203#204#204#204#204#204#204#204#204#204#205
+  +#205#205#206#206#206#206#206#206#207#207#207#207#207#207#208#208#208#209#209
+  +#209#209#209#209#210#210#210#211#211#211#211#211#211#213#213#213#213#213#213
+  +#213#213#213#213#213#213#214#214#214#214#214#214#214#214#214#215#215#215#215
+  +#215#215#215#215#215#215#215#215#215#215#215#215#215#215#216#216#216#216#216
+  +#216#216#216#216#216#216#216#217#217#217#217#217#217#217#217#217#217#217#217
+  +#217#217#217#217#217#217#217#217#217#218#218#218#218#218#218#218#218#218#218
+  +#218#218#218#218#218#219#219#219#219#219#219#219#219#219#219#219#219#219#219
+  +#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219
+  ,#219#219#219#219#219#219#220#220#220#220#220#220#220#220#220#220#220#220#220
+  +#220#220#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#222#222
+  +#222#222#222#222#222#222#222#222#222#222#222#222#222#223#223#223#223#223#223
+  +#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#224#224#224#224
+  +#224#224#224#224#224#224#224#224#224#224#224#224#224#224#225#225#225#225#225
+  +#225#225#225#225#225#225#225#225#225#225#225#225#225#226#226#226#226#226#226
+  +#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#227#227#227#227
+  +#227#227#227#227#227#228#228#228#228#228#228#228#228#228#228#228#228#228#228
+  +#228#228#228#228#228#228#228#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#231#231#231#231#231#231#231#231#231
+  +#231#231#231#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#137#137#137#137#137#137#137#137#137#137#137#137#137#137
+  +#137#137#137#137#137#137#137#137#137#137#136#136#136#137#137#137#137#137#137
+  +#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136
+  +#136#136#136#136#136#135#135#135#135#135#135#135#135#135#135#135#135#135#135
+  +#135#135#135#135#135#135#135#135#135#135#134#134#134#134#134#134#135#135#135
+  +#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134
+  +#134#134#134#134#134#133#133#133#133#133#133#134#134#134#134#134#134#134#134
+  +#134#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133
+  +#132#132#132#132#132#132#133#133#133#133#133#133#133#133#133#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#132#131#131#131#131#131#131#132#132#132
+  +#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131
+  +#131#131#131#131#131#131#131#131#131#131#131#131#131#131#130#130#130#131#131
+  +#131#131#131#131#131#131#131#131#131#131#132#132#132#132#132#132#133#133#133
+  +#133#133#133#133#133#133#134#134#134#134#134#134#135#135#135#136#136#136#136
+  +#136#136#137#137#137#136#136#136#137#137#137#137#137#137#137#137#137#137#137
+  +#137#136#136#136#136#136#136#136#136#136#135#135#135#135#135#135#134#134#134
+  +#133#133#133#132#132#132#131#131#131#129#129#129#128#128#128'~~~~~~}}}'
+  +'||||||{{{{{{zzzzzzzzzyyyzzzzzzzzzz}'#136'n'#133#223'n'#133#223'o'#134#223'p'
+  +#134#222'p'#134#223'p'#135#223'q'#136#222'r'#136#222'r'#136#222's'#137#222's'
+  +#137#222'u'#138#222'u'#139#222'v'#139#221'v'#139#221'z'#142#222#128#149#224
+  +#143#159#202#166#173#173'}}'#148#178#189#193#197#213#213#179#193#203'XQ}</e<'
+  +'/e</eE:m'#190#204#204#174#183#183#162#166#166#155#157#157#151#151#151#152
+  +#152#152#152#152#152#152#152#152#153#153#153#154#154#154#154#154#154#155#155
+  +#155#155#155#155#157#157#157#157#157#157#158#158#158#159#159#159#159#159#159
+  +#161#161#161#160#160#160#162#162#162#162#162#162#163#163#163#162#162#162#164
+  +#164#164#165#165#165#165#165#165#165#165#165#166#166#166#166#166#166#167#167
+  +#167#169#169#169#169#169#169#170#170#170#167#171#193#166#173#211#166#174#210
+  +#168#175#211#169#176#211#170#177#210#170#177#210#171#178#210#172#178#210#174
+  +#180#211#175#181#210#176#182#210#177#182#210#178#183#210#179#185#211#180#185
+  ,#210#181#186#210#182#186#210#183#187#210#184#188#210#185#189#211#186#190#211
+  +#187#191#210#188#191#210#189#192#210#189#193#210#191#194#211#192#195#211#193
+  +#195#211#195#197#209#199#200#201#200#200#200#202#202#202#201#201#201#202#202
+  +#202#202#202#202#203#203#203#203#203#203#204#204#204#204#204#204#205#205#205
+  +#205#205#205#206#206#206#207#207#207#207#207#207#208#208#208#209#209#209#209
+  +#209#209#209#209#209#209#209#209#210#210#210#211#211#211#211#211#211#212#212
+  +#212#213#213#213#213#213#213#214#214#214#214#214#214#214#214#214#214#214#214
+  +#215#215#215#215#215#215#215#215#215#215#215#215#215#215#215#215#215#215#215
+  +#215#215#216#216#216#216#216#216#216#216#216#217#217#217#217#217#217#217#217
+  +#217#217#217#217#217#217#217#217#217#217#217#217#217#218#218#218#218#218#218
+  +#218#218#218#218#218#218#218#218#218#219#219#219#219#219#219#219#219#219#219
+  +#219#219#219#219#219#219#219#219#220#220#220#220#220#220#220#220#220#220#220
+  +#220#220#220#220#220#220#220#221#221#221#221#221#221#221#221#221#221#221#221
+  +#221#221#221#221#221#221#222#222#222#222#222#222#222#222#222#222#222#222#222
+  +#222#222#222#222#222#223#223#223#223#223#223#223#223#223#223#223#223#223#223
+  +#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223
+  +#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#225
+  +#225#225#225#225#225#225#225#225#225#225#225#225#225#225#226#226#226#226#226
+  +#226#226#226#226#226#226#226#226#226#226#226#226#226#227#227#227#227#227#227
+  +#227#227#227#227#227#227#227#227#227#227#227#227#228#228#228#228#228#228#228
+  +#228#228#228#228#228#228#228#228#228#228#228#229#229#229#229#229#229#229#229
+  +#229#229#229#229#229#229#229#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#232#232#232#232#232
+  +#232#232#232#232#232#232#232#233#233#233#233#233#233#232#232#232#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245#244#244
+  +#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#138#138#138#138#138#138#138#138#138#138
+  +#138#138#138#138#138#138#138#138#137#137#137#137#137#137#138#138#138#137#137
+  +#137#137#137#137#137#137#137#136#136#136#136#136#136#136#136#136#137#137#137
+  +#136#136#136#136#136#136#136#136#136#136#136#136#135#135#135#136#136#136#136
+  +#136#136#136#136#136#136#136#136#136#136#136#136#136#136#135#135#135#135#135
+  +#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135
+  +#135#135#135#135#135#135#135#135#135#135#135#135#134#134#134#134#134#134#135
+  +#135#135#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#133#132#132#132#133#133#133#133
+  +#133#133#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#132#131#131#131#132#132#132#132#132#132#131#131#131#131#131#131#131
+  +#131#131#131#131#131#131#131#131#131#131#131#132#132#132#133#133#133#133#133
+  +#133#133#133#133#134#134#134#134#134#134#135#135#135#136#136#136#136#136#136
+  +#138#138#138#137#137#137#138#138#138#138#138#138#138#138#138#139#139#139#139
+  +#139#139#139#139#139#139#139#139#138#138#138#138#138#138#137#137#137#136#136
+  +#136#136#136#136#135#135#135#134#134#134#132#132#132#131#131#131#129#129#129
+  ,#129#129#129#128#128#128'~~~}}}}}}|||||||||{{{{{{{{{zzz{{{{{{{{{v'#129
+  +#174'o'#134#223'p'#134#223'q'#135#223'q'#136#223'r'#136#223'r'#136#223'r'#137
+  +#223's'#137#223't'#137#222't'#138#222'u'#139#222'v'#139#222'w'#140#222'w'#140
+  +#222'z'#142#223'~'#147#224#132#153#225#153#163#184#167#174#174#174#183#183
+  +#184#196#196#196#212#212#198#217#220'NEw;.g;.g;.g'#153#161#178#180#191#191
+  +#166#172#172#158#160#160#153#153#153#152#152#152#152#152#152#153#153#153#153
+  +#153#153#154#154#154#155#155#155#155#155#155#156#156#156#157#157#157#158#158
+  +#158#158#158#158#159#159#159#160#160#160#161#161#161#161#161#161#162#162#162
+  +#162#162#162#163#163#163#163#163#163#164#164#164#165#165#165#165#165#165#166
+  +#166#166#167#167#167#168#168#168#168#168#168#169#169#169#170#170#170#169#171
+  +#181#165#173#212#166#173#211#167#175#211#168#175#211#170#177#212#170#177#211
+  +#171#178#211#172#179#211#173#179#211#175#181#211#175#181#211#177#183#211#178
+  +#183#211#179#184#211#180#185#211#181#186#211#182#187#211#183#187#211#184#188
+  +#211#184#189#211#185#189#211#186#190#211#188#191#211#189#192#211#189#192#210
+  +#190#193#211#191#194#211#193#196#212#193#195#211#194#196#211#197#198#206#201
+  +#201#201#201#201#201#201#201#201#202#202#202#202#202#202#202#202#202#204#204
+  +#204#204#204#204#205#205#205#205#205#205#205#205#205#206#206#206#207#207#207
+  +#208#208#208#208#208#208#209#209#209#209#209#209#209#209#209#211#211#211#211
+  +#211#211#212#212#212#213#213#213#214#214#214#214#214#214#214#214#214#215#215
+  +#215#215#215#215#215#215#215#215#215#215#216#216#216#216#216#216#216#216#216
+  +#216#216#216#216#216#216#216#216#216#217#217#217#217#217#217#217#217#217#217
+  +#217#217#217#217#217#217#217#217#217#217#217#218#218#218#218#218#218#218#218
+  +#218#217#217#217#218#218#218#219#219#219#218#218#218#218#218#218#219#219#219
+  +#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219#220
+  +#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220
+  +#220#221#221#221#221#221#221#221#221#221#221#221#221#222#222#222#222#222#222
+  +#222#222#222#222#222#222#222#222#222#222#222#222#223#223#223#223#223#223#223
+  +#223#223#223#223#223#223#223#223#224#224#224#224#224#224#224#224#224#224#224
+  +#224#224#224#224#224#224#224#224#224#224#225#225#225#225#225#225#225#225#225
+  +#225#225#225#225#225#225#225#225#225#226#226#226#226#226#226#226#226#226#226
+  +#226#226#226#226#226#226#226#226#227#227#227#226#226#226#227#227#227#226#226
+  +#226#226#226#226#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227
+  +#227#227#227#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228
+  +#228#228#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#230#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#235#235#235#235#235#235#234#234#234#235#235
+  +#235#234#234#234#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#239#239#239#238#238#238#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#139#139#139#139#139#139#138#138#138#138#138#138#138#138#138#138#138#138#138
+  +#138#138#138#138#138#138#138#138#138#138#138#138#138#138#138#138#138#138#138
+  +#138#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137
+  +#137#137#137#137#137#137#136#136#136#136#136#136#136#136#136#136#136#136#136
+  +#136#136#136#136#136#136#136#136#137#137#137#136#136#136#136#136#136#136#136
+  ,#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#135#135#135
+  +#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135
+  +#135#135#135#135#135#135#135#135#135#135#135#134#134#134#134#134#134#134#134
+  +#134#133#133#133#134#134#134#134#134#134#134#134#134#134#134#134#133#133#133
+  +#133#133#133#134#134#134#133#133#133#133#133#133#133#133#133#133#133#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133
+  +#133#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#132#132#132#132#131#131#131#132#132#132#131#131#131#131#131#131#132
+  +#132#132#132#132#132#133#133#133#134#134#134#133#133#133#135#135#135#135#135
+  +#135#135#135#135#137#137#137#138#138#138#139#139#139#139#139#139#139#139#139
+  +#140#140#140#141#141#141#140#140#140#141#141#141#141#141#141#140#140#140#140
+  +#140#140#140#140#140#139#139#139#139#139#139#138#138#138#137#137#137#136#136
+  +#136#134#134#134#133#133#133#131#131#131#130#130#130#129#129#129#129#129#129
+  +#128#128#128'~~~~~~}}}|||||||||{{{|||{{{{{{{{{|||{'#137'p'#135#224'p'#135
+  +#224'q'#135#223'r'#136#223's'#137#224's'#137#224's'#137#223't'#138#223't'#137
+  +#222'u'#138#223'v'#139#222'v'#139#222'w'#140#223'w'#140#222'y'#142#222'|'#145
+  +#223''#148#224#147#154#167#157#161#161#161#167#167#170#178#178#181#193#193
+  +#195#212#212#151#159#182'9-i9-i9-i'#129#132#162#185#197#197#170#177#177#159
+  +#162#162#154#155#155#152#152#152#153#153#153#154#154#154#155#155#155#155#155
+  +#155#156#156#156#156#156#156#157#157#157#157#157#157#159#159#159#159#159#159
+  +#160#160#160#161#161#161#162#162#162#162#162#162#162#162#162#163#163#163#163
+  +#163#163#164#164#164#165#165#165#166#166#166#166#166#166#167#167#167#168#168
+  +#168#168#168#168#169#169#169#169#169#169#170#170#170#166#173#208#166#174#212
+  +#166#174#211#168#176#212#169#176#212#170#177#212#170#178#212#171#178#211#172
+  +#179#211#174#180#211#175#181#211#176#182#211#177#183#211#178#183#211#179#184
+  +#211#179#185#211#181#186#211#182#187#211#184#188#211#184#188#211#185#189#211
+  +#186#190#212#187#191#212#188#191#211#189#193#211#189#193#211#191#194#211#192
+  +#195#212#193#196#212#194#196#212#194#197#212#195#198#212#200#200#203#202#202
+  +#202#203#203#203#203#203#203#203#203#203#203#203#203#204#204#204#205#205#205
+  +#206#206#206#206#206#206#206#206#206#208#208#208#208#208#208#208#208#208#209
+  +#209#209#210#210#210#209#209#209#209#209#209#211#211#211#211#211#211#212#212
+  +#212#213#213#213#214#214#214#214#214#214#214#214#214#215#215#215#215#215#215
+  +#215#215#215#215#215#215#216#216#216#216#216#216#216#216#216#216#216#216#216
+  +#216#216#216#216#216#217#217#217#217#217#217#217#217#217#217#217#217#217#217
+  +#217#217#217#217#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218
+  +#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219#220#220#220#220
+  +#220#220#220#220#220#220#220#220#220#220#220#220#220#220#221#221#221#221#221
+  +#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221
+  +#221#221#221#222#222#222#221#221#221#222#222#222#222#222#222#222#222#222#222
+  +#222#222#222#222#222#222#222#222#222#222#222#223#223#223#223#223#223#223#223
+  +#223#223#223#223#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224
+  +#224#224#224#224#224#224#225#225#225#225#225#225#225#225#225#225#225#225#225
+  +#225#225#225#225#225#225#225#225#226#226#226#226#226#226#226#226#226#226#226
+  +#226#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227
+  +#227#227#227#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#229
+  +#229#229#228#228#228#229#229#229#228#228#228#229#229#229#229#229#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  ,#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#139#139#139#139
+  +#139#139#139#139#139#139#139#139#139#139#139#138#138#138#139#139#139#139#139
+  +#139#139#139#139#138#138#138#139#139#139#138#138#138#138#138#138#138#138#138
+  +#137#137#137#138#138#138#137#137#137#137#137#137#137#137#137#137#137#137#137
+  +#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137
+  +#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137
+  +#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136
+  +#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136
+  +#136#135#135#135#136#136#136#136#136#136#136#136#136#135#135#135#135#135#135
+  +#135#135#135#135#135#135#134#134#134#134#134#134#134#134#134#134#134#134#134
+  +#134#134#134#134#134#134#134#134#134#134#134#134#134#134#133#133#133#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133
+  +#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#132#132#132#131#131#131#132#132#132#132#132#132#132#132#132#132#132
+  +#132#133#133#133#134#134#134#134#134#134#135#135#135#136#136#136#137#137#137
+  +#138#138#138#138#138#138#140#140#140#141#141#141#141#141#141#142#142#142#142
+  +#142#142#143#143#143#143#143#143#143#143#143#143#143#143#143#143#143#142#142
+  +#142#142#142#142#142#142#142#142#142#142#141#142#142#139#140#140#138#139#139
+  +#136#136#136#134#134#134#131#131#131#130#130#130#130#130#130#129#129#129#128
+  +#128#128'~~~~~~}}}}}}|||||||||{{{{{{||||||u'#131#187'q'#136#224'q'#135#224
+  +'r'#136#224'r'#137#224's'#137#224't'#138#224't'#138#224't'#138#224'u'#138#223
+  +'u'#138#223'v'#140#223'w'#140#223'w'#140#223'x'#141#222'y'#141#222'z'#143#222
+  +'}'#145#223#147#148#148#148#150#150#152#154#154#159#164#164#170#178#178#186
+  +#199#199#194#210#214'8,l8,l8,l]Y'#137#188#202#202#172#180#180#162#165#165#156
+  +#157#157#153#153#153#154#154#154#154#154#154#156#156#156#156#156#156#157#157
+  +#157#157#157#157#158#158#158#158#158#158#159#159#159#162#162#162#162#162#162
+  +#161#161#161#162#162#162#163#163#163#163#163#163#164#164#164#164#164#164#164
+  +#164#164#165#165#165#166#166#166#166#166#166#167#167#167#168#168#168#168#168
+  +#168#169#169#169#170#170#170#169#172#187#166#174#213#166#174#213#167#175#212
+  +#168#176#212#169#176#212#170#178#213#171#178#212#173#180#212#174#180#212#175
+  +#181#212#175#181#212#177#183#212#178#184#212#179#184#212#179#185#212#181#186
+  +#213#183#188#212#184#188#212#184#188#212#185#190#212#185#190#212#186#190#212
+  +#189#192#212#189#193#212#190#194#212#191#194#212#192#195#212#193#196#212#194
+  +#197#213#196#199#213#195#198#213#196#199#213#198#201#211#202#202#202#202#202
+  +#202#203#203#203#203#203#203#203#203#203#204#204#204#205#205#205#206#206#206
+  +#206#206#206#207#207#207#207#207#207#208#208#208#209#209#209#209#209#209#210
+  +#210#210#210#210#210#210#210#210#212#212#212#213#213#213#213#213#213#214#214
+  +#214#214#214#214#215#215#215#215#215#215#216#216#216#216#216#216#216#216#216
+  +#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217
+  +#217#217#217#217#217#218#218#218#218#218#218#218#218#218#218#218#218#218#218
+  +#218#218#218#218#218#218#218#218#218#218#219#219#219#219#219#219#219#219#219
+  +#219#219#219#219#219#219#219#219#219#219#219#219#220#220#220#220#220#220#220
+  +#220#220#220#220#220#220#220#220#220#220#220#221#221#221#221#221#221#221#221
+  +#221#221#221#221#221#221#221#221#221#221#221#221#221#222#222#222#222#222#222
+  +#222#222#222#222#222#222#223#223#223#223#223#223#223#223#223#223#223#223#223
+  +#223#223#223#223#223#223#223#223#224#224#224#224#224#224#224#224#224#224#224
+  +#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224
+  +#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225
+  +#225#225#225#225#225#226#226#226#226#226#226#226#226#226#226#226#226#226#226
+  +#226#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227
+  +#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#230#230
+  +#230#230#230#230#230#230#230#230#230#230#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#234#234#234#234
+  ,#234#234#234#234#234#234#234#234#234#234#234#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#238#238#238#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#243#243#243#242#242#242#242#242#242#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#140#140#140#140#140#140#140
+  +#140#140#140#140#140#139#139#139#139#139#139#139#139#139#139#139#139#139#139
+  +#139#139#139#139#139#139#139#139#139#139#138#138#138#138#138#138#139#139#139
+  +#139#140#140#140#141#141#140#141#141#140#141#141#140#141#141#139#140#140#139
+  +#139#139#138#138#138#138#138#138#138#138#138#138#138#138#138#138#138#138#138
+  +#138#137#137#137#139#139#139#139#140#140#139#139#139#140#141#141#141#142#142
+  +#140#141#141#140#141#141#140#141#141#139#140#140#139#139#139#138#138#138#138
+  +#138#138#139#139#139#138#139#139#139#140#140#140#142#142#142#143#143#142#143
+  +#143#143#145#145#143#145#145#142#144#144#142#143#143#141#142#142#139#141#141
+  +#137#138#138#136#137#137#136#136#136#135#135#135#135#135#135#134#134#134#136
+  +#136#136#137#137#137#136#137#137#136#137#137#136#137#137#136#136#136#135#136
+  +#136#135#135#135#134#134#134#134#134#134#133#133#133#134#134#134#134#135#135
+  +#135#136#136#135#136#136#135#136#136#135#136#136#134#135#135#133#133#133#132
+  +#132#132#132#132#132#132#132#132#132#132#132#133#133#133#134#134#134#135#136
+  +#136#136#137#137#137#138#138#138#138#138#137#138#138#139#139#139#139#139#139
+  +#139#139#139#141#141#141#142#142#142#143#143#143#144#144#144#144#144#144#145
+  +#145#145#146#146#146#146#146#146#147#148#148#148#149#149#148#149#149#148#150
+  +#150#149#150#150#150#152#152#149#152#152#148#150#150#146#149#149#144#146#146
+  +#141#143#143#138#139#139#136#137#137#133#134#134#131#132#132#129#129#129#128
+  +#128#128#128#128#128'~~~~~~|||||||||||||}}|}}y'#131#169's'#139#225't'#139
+  +#225't'#139#225'u'#139#225'u'#141#225'v'#141#225'w'#141#225'y'#144#225'z'#144
+  +#225'|'#146#225'|'#146#225'}'#147#226'}'#147#225'|'#145#224'|'#144#224'{'#144
+  +#224'|'#144#223'|'#143#218#144#144#144#146#146#146#147#147#147#153#155#155
+  +#163#169#169#178#189#189#197#213#213'6*n6*n6*n\X'#139#190#204#204#175#183#183
+  +#163#167#167#156#157#157#155#155#155#155#155#155#154#154#154#155#155#155#157
+  +#157#157#158#159#159#159#160#160#161#162#162#162#164#164#165#166#166#166#168
+  +#168#166#168#168#167#168#168#166#167#167#166#167#167#166#167#167#165#166#166
+  +#166#166#166#165#165#165#166#166#166#166#166#166#167#167#167#168#168#168#168
+  +#168#168#169#169#169#170#170#170#171#171#171#167#176#210#168#178#215#170#178
+  +#215#172#180#215#174#182#217#174#183#217#175#184#217#177#184#215#177#184#215
+  +#177#184#214#176#183#214#178#184#213#178#184#213#180#185#213#180#185#213#181
+  +#186#213#182#187#213#184#189#213#186#190#213#186#192#214#187#193#214#188#193
+  +#214#190#194#215#191#194#213#190#194#213#191#195#213#192#195#213#194#198#214
+  +#196#200#215#197#201#216#198#202#216#200#204#216#200#204#216#200#203#216#204
+  +#205#207#205#205#205#205#205#205#205#205#205#205#205#205#205#205#205#206#206
+  +#206#207#207#207#207#207#207#207#207#207#208#208#208#209#209#209#210#210#210
+  +#210#210#210#211#211#211#211#211#211#211#211#211#213#213#213#214#214#214#215
+  +#215#215#216#217#217#217#218#218#217#218#218#217#218#218#218#219#219#218#219
+  +#219#218#218#218#217#218#218#218#218#218#218#218#218#217#217#217#217#217#217
+  +#217#217#217#217#217#217#218#218#218#218#219#219#219#219#219#219#219#219#219
+  +#219#219#220#220#220#220#221#221#220#221#221#220#221#221#220#220#220#220#220
+  +#220#221#221#221#221#221#221#220#221#221#220#220#220#221#221#221#220#220#220
+  +#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221
+  +#221#221#221#221#221#221#222#222#222#222#222#222#222#222#223#223#223#223#223
+  ,#223#222#223#223#222#222#222#222#222#222#223#223#223#223#223#223#223#223#223
+  +#223#223#223#223#223#223#223#224#224#224#224#224#225#225#225#225#225#225#225
+  +#225#225#225#225#225#225#226#226#225#225#225#225#225#225#225#225#225#225#225
+  +#225#225#225#225#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226
+  +#226#226#226#226#226#226#227#227#227#227#227#227#227#227#227#227#227#227#227
+  +#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227
+  +#227#227#227#227#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#234#234#234#234#234#234#234#234#234#234#234#234#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#247#247#247#246#246#246#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#140#140#140
+  +#141#141#141#140#140#140#140#140#140#140#140#140#140#140#140#140#140#140#140
+  +#140#140#140#140#140#140#140#140#140#140#140#140#140#140#140#140#140#140#141
+  +#141#142#143#143#144#146#146#146#149#149#147#150#150#147#150#150#145#148#148
+  +#144#146#146#141#142#142#140#141#141#139#139#139#138#138#138#138#138#138#138
+  +#138#138#138#138#138#139#140#140#140#141#141#143#145#145#146#148#148#148#151
+  +#151#148#152#152#148#152#152#147#149#149#144#147#147#142#144#144#140#141#141
+  +#140#140#140#140#141#141#141#143#143#144#146#146#147#149#149#150#154#154#152
+  +#157#157#154#160#160#155#161#161#155#161#161#154#160#160#153#158#158#150#154
+  +#154#147#150#150#144#147#147#142#143#143#139#140#140#138#138#138#137#138#138
+  +#138#139#139#138#140#140#141#143#143#142#145#145#143#146#146#143#145#145#140
+  +#143#143#138#140#140#136#137#137#135#135#135#135#135#135#135#136#136#137#138
+  +#138#139#141#141#140#142#142#141#144#144#141#144#144#140#143#143#138#140#140
+  +#136#137#137#133#134#134#133#133#133#133#133#133#134#135#135#136#137#137#138
+  +#140#140#140#143#143#141#144#144#143#145#145#142#144#144#141#143#143#140#141
+  +#141#140#140#140#141#141#141#142#142#142#144#144#144#145#145#145#146#146#146
+  +#147#147#147#148#148#148#150#150#150#151#152#152#153#155#155#156#158#158#158
+  +#161#161#160#164#164#161#166#166#162#167#167#162#168#168#162#168#168#160#166
+  +#166#157#163#163#154#160#160#149#154#154#144#148#148#141#144#144#137#139#139
+  +#134#135#135#131#131#131#129#129#129#128#128#128'~~~~~~}}}}}}|}}~~~~'#134
+  +#160'w'#143#227'{'#147#227'|'#148#228'|'#149#228'|'#148#228'|'#148#227'}'#149
+  +#228#128#151#228#130#153#228#133#157#229#136#159#229#137#162#230#137#161#229
+  +#137#159#229#135#157#228#132#154#226#130#151#225''#149#225#131#147#204#145
+  +#145#145#145#145#145#145#145#145#152#153#153#161#166#166#176#185#185#194#209
+  +#209'\X'#141'5)p5)p\X'#141#192#206#206#176#184#184#164#168#168#157#158#158
+  +#154#154#154#155#155#155#156#156#156#158#159#159#161#162#162#163#165#165#166
+  +#169#169#169#173#173#172#176#176#174#179#179#175#179#179#176#180#180#176#180
+  +#180#175#179#179#173#176#176#172#175#175#170#172#172#169#170#170#168#168#168
+  +#168#168#168#168#168#168#168#168#168#168#168#168#169#169#169#170#170#170#172
+  +#172#172#174#176#184#171#181#218#174#185#219#177#187#220#179#189#220#181#192
+  +#221#183#194#222#183#193#221#183#192#220#182#191#219#181#189#217#179#187#216
+  ,#179#186#215#180#186#214#180#186#213#181#186#213#182#188#214#186#191#215#188
+  +#194#216#191#196#218#192#199#219#193#200#219#194#200#219#195#201#219#195#199
+  +#217#194#199#216#194#199#216#196#200#216#198#202#217#201#206#219#203#208#221
+  +#204#210#222#206#212#223#207#212#223#208#212#222#209#212#218#209#211#211#207
+  +#208#208#207#208#208#207#208#208#206#206#206#206#206#206#207#207#207#207#207
+  +#207#208#208#208#208#208#208#209#209#209#210#210#210#211#211#211#211#211#211
+  +#211#212#212#213#213#213#214#214#214#216#217#217#217#219#219#219#221#221#220
+  +#222#222#222#223#223#223#225#225#223#225#225#222#224#224#222#224#224#221#223
+  +#223#221#222#222#220#221#221#219#220#220#219#219#219#218#219#219#218#219#219
+  +#220#220#220#220#221#221#221#222#222#222#223#223#222#224#224#222#223#223#223
+  +#224#224#223#224#224#223#224#224#223#224#224#223#224#224#222#223#223#223#223
+  +#223#222#223#223#221#222#222#222#222#222#221#222#222#221#221#221#221#221#221
+  +#221#221#221#221#221#221#221#221#221#221#221#221#222#223#223#223#223#223#223
+  +#224#224#224#225#225#224#225#225#225#226#226#225#226#226#224#225#225#224#224
+  +#224#223#224#224#224#224#224#224#224#224#224#224#224#225#225#225#225#225#225
+  +#226#226#226#226#227#227#227#227#227#227#228#228#226#227#227#226#227#227#226
+  +#227#227#226#226#226#225#225#225#225#225#225#225#225#225#225#225#225#225#225
+  +#225#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226
+  +#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#228
+  +#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#234#234#234#233#233#233#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242#241#241#241#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#141#141#141#141#141#141#141#141#141
+  +#141#141#141#141#141#141#141#141#141#141#141#141#140#140#140#141#141#141#141
+  +#141#141#140#140#140#140#140#140#141#141#141#143#145#145#146#149#149#151#154
+  +#154#154#159#159#156#162#162#156#162#162#154#159#159#150#154#154#145#148#148
+  +#142#144#144#140#140#140#139#139#139#139#139#139#139#139#139#140#141#141#142
+  +#144#144#146#149#149#150#154#154#156#161#161#159#165#165#159#166#166#159#166
+  +#166#157#162#162#152#156#156#148#150#150#145#147#147#145#146#146#146#149#149
+  +#150#153#153#155#159#159#160#166#166#163#171#171#167#177#177#170#180#180#171
+  +#182#182#171#183#183#170#181#181#168#178#178#165#174#174#159#167#167#154#160
+  +#160#149#153#153#143#146#146#140#142#142#139#141#141#141#142#142#144#146#146
+  +#148#152#152#152#157#157#152#158#158#151#157#157#148#152#152#144#147#147#140
+  +#142#142#136#137#137#136#137#137#137#138#138#141#143#143#144#148#148#148#153
+  +#153#151#157#157#150#156#156#148#154#154#144#148#148#140#142#142#137#138#138
+  +#133#134#134#133#134#134#136#138#138#140#143#143#145#149#149#149#155#155#150
+  +#156#156#150#156#156#149#153#153#146#149#149#144#145#145#142#143#143#142#142
+  +#142#143#143#143#144#144#144#146#146#146#147#147#147#149#150#150#152#153#153
+  +#156#157#157#159#162#162#163#168#168#167#173#173#171#178#178#175#184#184#177
+  ,#187#187#179#190#190#180#191#191#180#192#192#178#190#190#175#186#186#171#181
+  +#181#166#176#176#159#167#167#153#159#159#146#151#151#141#145#145#137#139#139
+  +#133#134#134#129#130#130#128#128#128'~~~~~~}}}'#132#148'z'#145#222''
+  +#151#230#133#157#231#136#161#231#137#162#231#138#163#231#137#163#231#138#163
+  +#231#142#167#232#146#171#233#150#176#234#153#180#235#156#182#235#156#181#235
+  +#154#179#234#151#175#233#145#168#231#141#163#229#135#157#228#137#153#207#147
+  +#148#148#146#147#147#146#146#146#150#152#152#160#164#164#174#183#183#192#206
+  +#206'ZW'#144'3(s3(sZW'#143#192#206#206#177#185#185#164#168#168#159#160#160
+  +#156#156#156#157#158#158#159#160#160#163#165#165#167#171#171#171#176#176#177
+  +#183#183#181#188#188#184#192#192#187#196#196#188#197#197#188#197#197#189#197
+  +#197#186#194#194#183#190#190#180#185#185#177#181#181#174#177#177#170#172#172
+  +#169#169#169#168#168#168#168#168#168#169#169#169#171#171#171#172#173#173#176
+  +#178#178#177#184#204#179#190#223#183#196#225#187#200#226#191#204#228#193#206
+  +#229#195#208#230#195#207#229#193#205#227#191#201#225#187#197#222#184#193#219
+  +#182#190#217#182#188#216#182#188#215#183#189#215#186#192#217#190#196#219#194
+  +#201#221#197#206#224#200#209#226#202#210#226#202#210#226#201#209#224#200#206
+  +#222#198#204#220#199#205#220#201#206#221#203#209#223#207#213#225#209#216#227
+  +#212#219#229#214#221#230#214#221#230#214#221#229#214#220#227#214#218#218#212
+  +#215#215#210#212#212#208#209#209#208#208#208#208#208#208#208#208#208#208#208
+  +#208#209#209#209#209#209#209#210#210#210#211#211#211#212#212#212#212#212#212
+  +#213#213#213#216#216#216#217#218#218#220#221#221#222#224#224#224#227#227#226
+  +#229#229#227#230#230#227#231#231#228#232#232#227#231#231#227#230#230#225#228
+  +#228#225#227#227#223#224#224#221#222#222#220#220#220#219#219#219#219#220#220
+  +#220#221#221#222#223#223#224#225#225#225#227#227#226#229#229#228#230#230#228
+  +#231#231#228#231#231#228#231#231#228#230#230#227#230#230#228#230#230#227#229
+  +#229#226#227#227#225#226#226#224#224#224#223#223#223#223#223#223#222#223#223
+  +#222#222#222#222#222#222#221#221#221#222#222#222#223#223#223#224#224#224#225
+  +#226#226#226#228#228#227#229#229#227#229#229#227#229#229#226#227#227#225#225
+  +#225#224#224#224#223#224#224#224#224#224#225#225#225#225#226#226#227#227#227
+  +#228#229#229#229#231#231#230#232#232#230#232#232#230#231#231#229#230#230#227
+  +#228#228#227#228#228#227#227#227#226#226#226#226#226#226#226#226#226#226#226
+  +#226#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#226#226#226
+  +#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#228#228#228#228
+  +#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#233#233#233#233
+  +#233#233#233#233#233#233#233#233#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#246#246#246#246#246#246#245#245#245#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#247#247#247#246#246#246#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#142#142#142#142#142#142#142#142#142
+  +#142#142#142#141#141#141#141#141#141#142#142#142#141#141#141#141#141#141#141
+  +#141#141#141#141#141#141#141#141#143#143#143#146#148#148#152#156#156#159#165
+  ,#165#166#174#174#170#180#180#170#180#180#166#174#174#159#165#165#151#155#155
+  +#146#148#148#142#142#142#140#140#140#140#140#140#141#141#141#143#144#144#147
+  +#149#149#153#157#157#161#168#168#168#177#177#173#184#184#174#186#186#172#183
+  +#183#166#175#175#159#166#166#153#158#158#150#154#154#151#154#154#155#160#160
+  +#160#167#167#168#177#177#175#186#186#180#194#194#185#200#200#170#182#192#154
+  +#163#183#154#163#183#152#162#182#184#200#200#180#194#194#174#186#186#166#176
+  +#176#157#164#164#150#154#154#144#147#147#143#144#144#145#147#147#150#155#155
+  +#157#164#164#163#171#171#165#175#175#164#173#173#158#166#166#151#157#157#145
+  +#148#148#139#140#140#137#138#138#140#142#142#145#149#149#152#158#158#159#167
+  +#167#163#173#173#164#174#174#159#168#168#152#158#158#145#149#149#139#141#141
+  +#135#136#136#135#136#136#139#142#142#147#151#151#153#160#160#160#169#169#164
+  +#174#174#162#171#171#157#165#165#152#157#157#147#149#149#144#145#145#143#143
+  +#143#142#143#149#141#144#156#148#148#148#151#152#152#154#156#156#159#161#161
+  +#164#169#169#170#176#176#177#185#185#183#193#193#188#200#200#192#206#206#177
+  +#188#198#160#169#189#161#170#190'{'#166#159#169#189#157#167#187#172#185#195
+  +#185#200#200#178#192#192#169#181#181#161#171#171#154#161#161#146#151#151#140
+  +#143#143#135#137#137#132#132#132#129#129#129'~'#129#135'z'#143#216
+  +#129#154#230#137#163#232#146#173#235#153#179#236#156#183#237#157#184#237#156
+  +#183#236#157#184#237#160#187#238#164#192#238#170#197#240#166#192#233#144#163
+  +#211#160#183#226#174#201#240#170#197#239#164#189#237#156#180#234#148#171#231
+  +#146#162#203#152#154#154#149#150#150#148#148#148#151#153#153#159#164#164#174
+  +#183#183#191#205#205'ZV'#145'2''u2''uZV'#145#193#206#206#178#186#186#166#170
+  +#170#159#160#160#158#159#159#160#161#161#165#168#168#171#175#175#178#184#184
+  +#184#192#192#190#200#200#195#207#207#198#211#211#172#181#196#164#171#191#164
+  +#171#191#182#192#202#199#211#211#195#205#205#190#199#199#185#191#191#179#183
+  +#183#174#176#176#171#172#172#169#169#169#170#170#170#172#172#172#174#175#175
+  +#178#181#181#183#187#187#185#196#221#190#204#230#196#210#232#200#215#235#204
+  +#219#236#176#187#215#168#177#208#187#198#222#205#218#235#201#214#232#196#208
+  +#228#190#199#224#187#195#220#184#191#217#184#190#217#185#192#217#191#197#221
+  +#195#203#223#202#210#227#206#217#231#210#221#233#212#223#234#211#221#233#208
+  +#218#230#206#214#227#204#211#225#204#211#224#206#212#225#210#217#229#214#222
+  +#232#217#226#234#177#182#207#168#171#200#147#147#185#179#183#207#200#206#221
+  +#221#227#228#219#223#223#215#218#218#212#214#214#211#212#212#208#209#209#208
+  +#209#209#209#209#209#209#209#209#210#210#210#210#210#210#211#211#211#212#212
+  +#212#212#213#213#213#214#214#216#217#217#219#221#221#223#226#226#226#230#230
+  +#229#233#233#231#236#236#186#188#208#187#189#209#188#189#209#188#189#209#198
+  +#200#215#232#236#236#229#233#233#227#230#230#225#227#227#223#224#224#221#222
+  +#222#221#222#222#223#224#224#225#227#227#228#230#230#230#233#233#232#236#236
+  +#233#237#237#233#238#238#233#238#238#233#238#238#233#237#237#233#237#237#232
+  +#236#236#231#235#235#230#233#233#228#231#231#227#229#229#226#227#227#224#225
+  +#225#223#224#224#223#223#223#222#222#222#222#222#222#222#223#223#225#225#225
+  +#226#227#227#228#230#230#230#233#233#231#234#234#232#234#234#231#233#233#229
+  +#230#230#227#228#228#225#226#226#225#225#225#225#225#225#226#226#226#227#228
+  +#228#229#231#231#231#233#233#232#235#235#234#237#237#233#236#236#232#235#235
+  +#230#232#232#228#230#230#228#229#229#227#227#227#226#226#226#226#226#226#226
+  +#226#226#226#226#226#227#227#227#227#227#227#227#227#227#227#227#227#227#227
+  +#227#227#227#227#227#227#227#228#228#228#228#228#228#228#228#228#228#228#228
+  +#228#228#228#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#228
+  +#228#228#229#229#229#229#229#229#229#229#229#229#229#229#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#233#233
+  +#233#233#233#233#232#232#232#232#232#232#232#232#232#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#236#236#236#236#236#236#236#236
+  +#236#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  ,#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#143#143#143#142#142
+  +#142#142#142#142#142#142#142#142#142#142#142#142#142#142#142#142#142#142#142
+  +#142#142#142#142#142#142#142#142#142#142#142#142#145#146#146#149#152#152#158
+  +#163#163#169#178#178'QL'#138'RN'#139'RN'#139'QL'#137#168#178#178#157#163#163
+  +#148#151#151#144#145#145#141#141#141#141#141#141#143#144#144#147#149#149#154
+  +#158#158#163#171#171#174#186#186#142#149#175'TP'#141'TP'#141'SN'#140'QK'#137
+  +'eb'#144#161#167#167#157#162#162#160#166#166#166#175#175#175#186#186#184#199
+  +#199#137#144#175'_]'#150'0&w0&w0&w0&w0&w0&wB;'#131'dd'#151#137#143#169#151
+  +#159#169#156#162#162#149#152#152#146#149#149#150#154#154#158#165#165#146#152
+  +#168'PL'#137'QM'#138'QL'#138'}'#158#159#167#167#149#153#153#142#143#143#138
+  +#140#140#143#146#146#150#156#156#162#171#171'_]'#144'QL'#138'QM'#138'PK'#136
+  +#162#172#172#151#157#157#142#145#145#137#138#138#138#139#139#143#147#147#154
+  +#161#161#143#150#165'PK'#137'QL'#138'PL'#137'{'#158#160#168#168#151#155#155
+  +#145#147#147#132#142#175'r'#137#222'q'#137#227#128#145#199#150#155#165#161
+  +#164#164#168#173#173#177#184#184#184#195#195#192#205#205#162#170#191'kk'#158
+  +'D='#133'0&w0&w0&w0&w0&w0&w0&wC<'#132'hi'#156#154#165#186#180#196#196#169#182
+  +#182#160#169#169#150#156#156#142#146#146#136#138#138#132#133#133#129#129#129
+  +#128#128#128'~'#128#133'x'#139#210'}'#149#230#136#161#232#144#168#229'ML'#149
+  +'OO'#150'QP'#150'jq'#174#179#209#243#178#208#243#155#177#221'ch'#166'900&w0'
+  +'&w0&w0&wSS'#151#132#146#197#174#201#240#164#189#236#160#176#204#159#164#164
+  +#153#156#156#150#152#152#152#154#154#161#165#165#174#182#182#191#205#205'XU'
+  +#146'0&w0&wXV'#146#193#207#207#178#186#186#168#172#172#161#163#163#162#163
+  +#163#166#169#169#173#178#178#182#189#189#190#201#201#189#200#205'~'#128#170
+  +'NI'#139'0&w0&w0&w0&w0&w0&wWS'#144'||'#165#156#161#181#184#190#190#178#181
+  +#181#173#174#174#171#172#172#172#172#172#174#176#176#179#182#182#185#189#189
+  +#192#199#199#197#212#234#184#197#223#129#132#180'OJ'#142'0&w0&w0&w0&w0&wD='
+  +#134'WR'#148#195#205#227#190#199#222#186#194#219#186#193#219#189#197#220#196
+  +#204#225#204#214#230#201#211#228'pn'#165';10&w0&w0&wnk'#162#210#218#230#210
+  +#217#229#202#209#224#142#142#184'fb'#156'0&w0&w0&w0&w0&w0&w]W'#149#180#183
+  +#204#220#225#225#216#219#219#213#215#215#210#211#211#210#210#210#209#209#209
+  +#210#210#210#210#210#210#212#212#212#212#212#212#213#213#213#214#214#214#215
+  +#216#216#218#220#220#223#226#226#193#194#210#128'|'#170'SK'#142'0&w0&w0&w0&w'
+  +'0&w0&wH?'#135#141#139#180#220#224#230#229#232#232#225#227#227#223#225#225
+  +#223#224#224#224#226#226#228#230#230'up'#163'_X'#149'_Y'#150'`Y'#151'`Y'#151
+  +'`Y'#151'`Y'#151'`Y'#151'`Y'#150'xs'#166#166#165#197#212#215#226#234#238#238
+  +#232#235#235#230#232#232#228#229#229#226#227#227#225#225#225#224#224#224#223
+  +#223#223#224#224#224#225#226#226#228#229#229#231#233#233'_W'#149'_X'#149'_X'
+  +#149'_W'#149#231#234#234#228#230#230#226#227#227#226#227#227#226#227#227#228
+  +#229#229#230#232#232#233#236#236#224#226#232'`X'#150'`Y'#150'`X'#150'_X'#149
+  +'^W'#148#197#196#212#229#230#230#228#228#228#227#227#227#226#226#226#227#227
+  +#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227
+  +#227#227#227#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228
+  +#228#228#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#235#235#235#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  ,#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#244#244#244#243#243#243#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#143#143#143#143#143#143
+  +#143#143#143#143#143#143#143#143#143#143#143#143#143#143#143#143#143#143#143
+  +#143#143#142#142#142#142#142#142#142#142#142#146#147#147#153#157#157#164#171
+  +#171#178#190#190'/%z/%z/%z/%z'#177#189#189#162#170#170#151#155#155#145#146
+  +#146#142#142#142#142#143#143#146#147#147#153#157#157#163#170#170#176#188#188
+  +#171#184#195'80'#128'/%z/%z/%z8/~'#166#175#180#167#174#174#166#173#173#171
+  +#180#180#180#193#193#165#176#192'KG'#140'/%z/%z/%z/%z/%z/%z/%z/%z/%z/%z/%zno'
+  +#153#161#168#168#152#157#157#149#153#153#154#159#159#164#173#173#145#153#174
+  +'/%z/%z/%zrt'#159#167#177#177#153#159#159#144#147#147#141#142#142#146#149#149
+  +#156#163#163#170#182#182'QN'#142'/%z/%z/%z'#172#185#185#157#165#165#145#149
+  +#149#138#139#139#139#141#141#148#153#153#160#169#169#143#151#172'/%z/%z/%zqt'
+  +#159#167#177#177#150#160#174#128#148#209's'#140#229'r'#138#228's'#141#229'x'
+  +#146#230#128#154#232#150#169#212#177#188#196#191#204#204#162#171#192'WT'#148
+  +'/%z/%z/%z/%z/%z/%z/%z/%z/%z/%z/%z/%z/%zTR'#147#152#164#186#177#192#192#164
+  +#175#175#153#161#161#144#149#149#136#138#138#132#133#133#130#130#130'u'#136
+  +#209'w'#144#228#128#153#231#143#169#234#161#189#239'/%z/%z/%zTT'#154#195#227
+  +#248'px'#177'/%z/%z/%z/%z/%z/%z/%z/%z/%z@;'#138#149#166#213#175#195#216#170
+  +#178#178#161#167#167#155#158#158#155#157#157#161#165#165#174#182#182#191#205
+  +#205'WU'#148'/%z/%zXU'#149#194#207#207#179#187#187#168#173#173#164#167#167
+  +#166#169#169#174#179#179#184#192#192#194#205#205#135#138#176'80'#129'/%z/%z/'
+  +'%z/%z/%z/%z/%z/%z/%z/%z/%z'#188#195#195#180#184#184#175#177#177#173#174#174
+  +#175#176#176#179#182#182#186#191#191#194#202#202#203#214#218''#131#181'/%z/'
+  +'%z/%z/%z/%z/%z/%z/%z/%z/%z'#199#209#229#192#201#224#189#197#222#190#197#222
+  +#194#203#224#203#213#230#182#189#215'90'#130'/%z/%z/%z/%z/%zYU'#151#213#222
+  +#233#214#221#232#174#178#206'/%z/%z/%z/%z/%z/%z/%z/%z/%z/%z'#159#159#191#221
+  +#226#226#216#219#219#213#215#215#211#212#212#211#211#211#211#211#211#211#211
+  +#211#213#213#213#213#213#213#214#214#214#215#215#215#218#218#218#220#222#222
+  +#225#228#228']V'#150'/%z/%z/%z/%z/%z/%z/%z/%z/%z/%zRK'#145#221#225#231#229
+  +#232#232#226#228#228#225#227#227#228#230#230#231#234#234'^X'#152'/%z/%z/%z/%'
+  +'z/%z/%z/%z/%z/%z/%z/%zkf'#161#189#190#212#234#238#238#231#234#234#228#230
+  +#230#226#227#227#225#225#225#224#224#224#225#226#226#227#228#228#230#232#232
+  +#234#237#237'/%z/%z/%z/%z'#234#237#237#231#233#233#228#229#229#227#228#228
+  +#228#229#229#230#232#232#234#237#237#225#228#234'SK'#145'/%z/%z/%z/%z'#164
+  +#162#193#232#233#233#229#230#230#228#228#228#227#227#227#227#227#227#227#227
+  +#227#227#227#227#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228
+  +#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  ,#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#241#241#241#240#240#240#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#247#247#247#246#246#246#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#144#144#144#144#144#144
+  +#144#144#144#143#143#143#143#143#143#143#143#143#144#144#144#143#143#143#143
+  +#143#143#143#143#143#143#143#143#143#143#143#147#149#149#156#160#160#168#177
+  +#177#184#199#199'-#|-#|-#|-#|'#183#197#197#166#175#175#154#158#158#146#147
+  +#147#143#143#143#146#147#147#151#154#154#160#167#167#174#185#185#189#205#205
+  +'KG'#143'-#|-#|-#|7.'#130#160#170#186#176#187#187#172#181#181#175#185#185#184
+  +#197#197#139#145#179'-#|-#|-#|-#|-#|-#|A;'#137'UR'#148'UR'#148'-#|-#|-#|-#|n'
+  +'o'#155#162#170#170#154#158#158#152#157#157#157#163#163#170#180#180#151#160
+  +#182'-#|-#|-#|ux'#165#172#184#184#156#163#163#146#149#149#142#143#143#148#152
+  +#152#160#168#168#176#190#190'RP'#146'-#|-#|-#|'#179#194#194#161#170#170#147
+  +#152#152#138#140#140#139#141#141#150#156#156#165#177#177#148#159#181'-#|-#|-'
+  +'#|ty'#167#162#185#218#137#165#234'|'#150#231'u'#142#229't'#141#229'y'#147
+  +#230#129#155#232#140#168#235#155#183#239#161#190#236'nt'#174'-#|-#|-#|-#|-#|'
+  +'-#|-#|-#|-#|-#|-#|-#|-#|-#|-#|-#|-#|nr'#164#173#189#194#168#180#180#156#164
+  +#164#144#149#149#137#139#139'{'#138#193't'#140#228'x'#145#229#132#157#232#148
+  +#174#236#169#198#242'-#|-#|-#|SS'#155'fk'#171'-#|-#|-#|-#|-#|-#|-#|-#|-#|-#|'
+  +'-#|-#|'#136#147#189#183#195#195#170#178#178#160#165#165#158#161#161#163#168
+  +#168#175#184#184#191#205#205'VS'#150'-#|-#|VS'#150#194#207#207#180#188#188
+  +#170#174#174#167#171#171#172#177#177#182#190#190#195#207#207'ji'#161'-#|-#|-'
+  +'#|-#|-#|-#|WT'#150'WT'#150'B;'#137'-#|-#|-#|-#|'#189#196#196#182#186#186#177
+  +#179#179#176#178#178#179#181#181#185#190#190#193#201#201#194#204#209'WT'#151
+  +'-#|-#|-#|-#|-#|-#|-#|-#|-#|-#|-#|'#199#210#229#193#202#225#192#200#223#194
+  +#202#224#200#209#228#210#222#235'NH'#146'-#|-#|-#|-#|-#|-#|XS'#152#213#222
+  +#232#214#222#232#174#177#206'-#|-#|-#|[V'#153#137#138#184#138#139#184'\W'#154
+  +'-#|-#|-#|90'#131#215#220#225#219#223#223#215#217#217#213#214#214#211#211#211
+  +#211#211#211#211#211#211#213#213#213#213#213#213#214#214#214#215#215#215#218
+  +#219#219#221#223#223#226#229#229'[U'#152'-#|-#|-#|]X'#154#130''#177'vr'#169
+  +'E='#139'-#|-#|-#|-#|]W'#154#233#237#237#229#232#232#228#230#230#229#232#232
+  +#233#237#237']W'#154'-#|-#|-#|-#|-#|-#|-#|-#|-#|-#|-#|-#|-#|'#130''#177#236
+  +#240#240#232#235#235#229#231#231#227#228#228#225#226#226#226#226#226#228#229
+  +#229#231#233#233#235#239#239'-#|-#|-#|E='#139#236#240#240#232#234#234#229#231
+  +#231#230#231#231#231#233#233#234#237#237#238#242#242'wr'#170'-#|-#|-#|-#|'
+  +#165#164#197#234#237#237#231#233#233#229#230#230#228#228#228#227#227#227#227
+  +#227#227#227#227#227#228#228#228#228#228#228#228#228#228#228#228#228#228#228
+  +#228#228#228#228#228#228#228#228#228#228#229#229#229#229#229#229#229#229#229
+  +#229#229#229#229#229#229#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#232#232#232#232#232#232#232#232#232#232#232#232#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  ,#238#238#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#245#245
+  +#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#246
+  +#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#145#145
+  +#145#145#145#145#145#145#145#144#144#144#144#144#144#144#144#144#144#144#144
+  +#144#144#144#144#144#144#144#144#144#144#144#144#143#143#143#148#149#149#157
+  +#162#162#171#181#181#189#205#205',"~,"~,"~@:'#139#187#203#203#169#178#178#155
+  +#159#159#147#148#148#144#145#145#150#153#153#158#163#163#171#180#180#186#201
+  +#201'qt'#168',"~,"~,"~,"~'#149#158#186#184#197#197#178#188#188#177#187#187
+  +#184#196#196#166#178#195',"~,"~,"~,"~A:'#139#144#152#187#187#203#208#193#209
+  +#209#190#205#205#189#205#205#190#206#206#162#173#190'ru'#163'=6'#134'kk'#153
+  +#160#167#167#154#158#158#152#157#157#160#166#166#174#185#185#154#165#188',"~'
+  +',"~,"~w{'#169#175#188#188#159#166#166#146#149#149#143#144#144#149#154#154
+  +#163#171#171#181#196#196'SQ'#150',"~,"~,"~'#183#200#200#164#174#174#148#154
+  +#154#138#141#141#140#143#143#152#159#159#169#181#181#152#164#187',"~,"~,"~r}'
+  +#185#161#191#240#140#168#235'~'#152#231'x'#145#229'y'#146#231#128#154#233#140
+  +#167#236#155#185#239#164#193#237'FE'#149',"~,"~,"~,"~,"~a`'#159#146#153#187
+  +#184#197#208#201#216#216#200#215#215#199#215#215#180#194#205#143#151#185'__'
+  +#158',"~,"~,"~,"~,"~HE'#144#175#191#196#169#182#182#154#163#163#135#153#201
+  +'{'#146#231'v'#142#229'{'#147#230#134#159#233#152#179#237#175#204#243',"~,"~'
+  +',"~,"~,"~,"~,"~dj'#172#152#172#216#184#214#245#186#214#244#171#195#230#129
+  +#142#194'6.'#134',"~,"~,"~,"~'#138#145#180#181#193#193#169#176#176#163#168
+  +#168#166#171#171#175#184#184#192#206#206'US'#152',"~,"~VS'#152#194#207#207
+  +#181#190#190#173#178#178#173#178#178#180#187#187#192#203#203'hh'#162',"~,"~,'
+  +'"~,"~WT'#153#158#166#194#206#220#220#203#216#216#203#215#215#204#216#216#204
+  +#216#216#153#158#187'fd'#158',"~'#187#193#193#182#186#186#177#180#180#178#180
+  +#180#183#187#187#192#199#199#203#213#213'a_'#158',"~,"~,"~,"~XU'#156#162#171
+  +#207#203#217#235#213#228#241#212#226#240#168#176#210'jh'#168',"~'#196#207#228
+  +#194#202#226#193#201#225#197#205#227#204#215#232#161#167#204',"~,"~,"~,"~'
+  +#147#150#192#211#221#235#184#190#215#159#162#198#211#219#230#212#219#231#172
+  +#176#206',"~d_'#161#200#206#224#223#232#239#225#234#240#228#237#241#232#243
+  +#245'sq'#171',"~,"~,"~'#148#148#188#222#227#227#217#220#220#214#215#215#213
+  +#213#213#212#212#212#213#213#213#214#214#214#214#214#214#215#215#215#216#216
+  +#216#218#219#219#221#223#223#226#229#229'[T'#153'8/'#133#139#136#182#222#226
+  +#232#234#239#239#234#239#239#236#241#241#238#245#245#166#166#201',"~,"~,"~,"'
+  +'~'#175#176#205#231#235#235#229#232#232#230#234#234#235#239#239']W'#156',"~,'
+  +'"~,"~'#142#140#186#142#140#186#142#140#186#142#140#186'vr'#171'E='#141',"~,'
+  +'"~,"~,"~,"~PJ'#149#224#227#233#232#235#235#229#231#231#227#227#227#227#228
+  +#228#229#230#230#232#235#235#237#242#242',"~,"~,"~^W'#156#238#242#242#234#236
+  +#236#232#234#234#232#234#234#234#237#237#238#242#242'vr'#171',"~,"~,"~,"~'
+  +#166#165#200#236#239#239#233#235#235#231#232#232#229#230#230#229#229#229#228
+  +#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#229#229#229#229#229#229#230#230#230#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#232#232#232#231#231#231#232#232#232#231#231#231#232#232#232
+  +#231#231#231#231#231#231#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  ,#235#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#146#146#146#145#145#145#145#145#145#145#145#145#145#145#145#145#145#145
+  +#145#145#145#145#145#145#145#145#145#144#144#144#144#144#144#144#144#144#149
+  +#151#151#159#164#164#174#184#184#192#208#208'*!'#128'*!'#128'*!'#128'SR'#153
+  +#188#204#204#170#179#179#156#161#161#149#151#151#148#150#150#155#159#159#166
+  +#175#175#181#194#194#159#171#195'*!'#128'*!'#128'*!'#128'*!'#128'z'#128#175
+  +#191#205#205#181#192#192#178#187#187#182#193#193#193#208#208'?9'#140'*!'#128
+  +'*!'#128'*!'#128'hk'#166#192#208#214#193#207#207#185#197#197#179#190#190#176
+  +#186#186#176#186#186#176#187#187#176#186#186#174#184#184#163#171#177#141#146
+  +#164#156#161#161#152#155#155#154#158#158#161#168#168#176#188#188#156#167#191
+  +'*!'#128'*!'#128'*!'#128#138#146#182#177#190#190#159#166#166#147#150#150#144
+  +#146#146#150#154#154#164#174#174#183#199#199'RQ'#152'*!'#128'*!'#128'*!'#128
+  +#186#204#204#165#177#177#149#155#155#140#142#142#140#143#143#152#159#159#171
+  +#184#184#153#166#192'*!'#128'*!'#128'*!'#128's~'#187#164#195#241#143#170#236
+  +#129#154#232'{'#148#231''#153#232#138#166#235#154#183#239#164#193#236'FE'
+  +#151'*!'#128'*!'#128'*!'#128'*!'#128'PQ'#158#177#197#221#199#213#216#194#206
+  +#206#189#200#200#186#197#197#185#195#195#184#195#195#186#197#197#188#201#201
+  +#193#209#209#180#195#207']^'#159'*!'#128'*!'#128'*!'#128'*!'#128'HE'#146#175
+  +#190#196#160#183#217#141#167#235#129#154#232'z'#146#230'}'#149#231#136#161
+  +#234#154#182#238#178#208#244'*!'#128'*!'#128'*!'#128'*!'#128'*!'#128'4-'#136
+  +#154#175#217#180#209#244#172#199#241#167#194#239#168#193#239#172#199#240#180
+  +#208#243#182#208#239'[^'#165'*!'#128'*!'#128'*!'#128'4-'#134#183#196#202#177
+  +#186#186#169#175#175#169#175#175#178#187#187#192#206#206'TR'#153'*!'#128'*!'
+  +#128'TR'#153#195#208#208#183#191#191#177#183#183#178#185#185#188#198#198#162
+  +#170#194'*!'#128'*!'#128'*!'#128'*!'#128#150#157#193#207#221#221#199#211#211
+  +#194#204#204#192#200#200#191#199#199#192#200#200#193#201#201#193#201#201#191
+  +#198#198#161#165#182#183#187#187#179#182#182#178#181#181#181#184#184#189#194
+  +#194#199#208#208#137#141#183'*!'#128'*!'#128'*!'#128'5.'#135#152#160#202#211
+  +#227#241#206#220#238#202#215#235#201#214#234#201#214#234#201#213#233#200#211
+  +#232#168#175#210#193#202#226#192#200#224#194#202#225#199#208#228#208#219#234
+  +'xy'#178'*!'#128'*!'#128'*!'#128#146#149#194#224#236#243#216#227#237#211#219
+  +#232#208#215#229#207#213#228#209#215#228#168#172#204'jh'#167#215#222#232#216
+  +#223#233#217#225#233#219#227#234#223#231#238#230#240#243#221#230#239'*!'#128
+  +'*!'#128'*!'#128'ro'#170#225#230#230#219#222#222#215#216#216#213#213#213#213
+  +#213#213#213#213#213#215#215#215#216#216#216#216#216#216#217#217#217#218#219
+  +#219#221#223#223#224#226#226'd_'#160#194#195#213#230#233#233#230#233#233#231
+  +#234#234#231#234#234#232#236#236#236#241#241#240#246#246'uq'#172'*!'#128'*!'
+  +#128'*!'#128#129'~'#179#234#238#238#232#235#235#232#236#236#236#240#240'\W'
+  +#158'*!'#128'*!'#128'*!'#128#241#247#247#240#246#246#237#242#242#236#240#240
+  +#236#240#240#238#243#243#190#193#216'OI'#150'*!'#128'*!'#128'*!'#128'*!'#128
+  +'uq'#173#236#240#240#232#235#235#229#230#230#228#229#229#229#231#231#233#236
+  +#236#238#242#242'*!'#128'*!'#128'*!'#128'\W'#158#239#243#243#235#238#238#234
+  +#237#237#235#238#238#238#242#242#142#139#187'*!'#128'*!'#128'*!'#128'*!'#128
+  +#166#166#202#238#242#242#235#237#237#232#234#234#230#231#231#229#229#229#228
+  ,#228#228#228#228#228#228#228#228#228#228#228#228#228#228#229#229#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#236#236#236#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#146#146#146#146#146#146#146#146#146#146#146#146#146#146#146
+  +#146#146#146#146#146#146#146#146#146#146#146#146#146#146#146#145#145#145#145
+  +#145#145#150#151#151#160#165#165#174#184#184#192#209#209'( '#131'( '#131'( '
+  +#131'RQ'#155#189#205#205#171#180#180#157#162#162#151#154#154#152#156#156#164
+  +#170#170#178#189#189#183#199#205'2+'#137'( '#131'( '#131'( '#131'\]'#161#193
+  +#208#208#181#192#192#175#184#184#177#186#186#187#199#199#140#148#185'( '#131
+  +'( '#131'( '#131']^'#162#208#227#227#195#210#210#184#195#195#176#184#184#170
+  +#178#178#167#174#174#166#172#172#166#172#172#165#171#171#163#170#170#163#168
+  +#168#157#162#162#153#156#156#150#152#152#152#156#156#161#168#168#177#189#189
+  +#156#168#192'( '#131'( '#131'( '#131#157#169#194#177#190#190#160#167#167#147
+  +#149#149#143#145#145#151#155#155#165#174#174#184#200#200'QP'#155'( '#131'( '
+  +#131'( '#131#186#204#204#165#177#177#149#155#155#139#141#141#140#143#143#151
+  +#160#169#164#187#218#148#168#216'( '#131'( '#131'( '#131'r~'#189#166#195#241
+  +#144#172#236#130#157#233#128#154#232#135#162#235#151#180#239#170#200#243'MO'
+  +#160'( '#131'( '#131'( '#131'( '#131'}'#140#196#177#208#245#163#194#242#155
+  +#182#237#163#180#212#174#181#186#174#179#179#172#177#177#171#177#177#171#177
+  +#177#173#181#181#178#188#188#183#196#196#193#210#210#142#152#189'( '#131'( '
+  +#131'( '#131'( '#131'EC'#151#171#201#243#153#180#239#138#163#234'~'#151#231
+  +''#151#231#137#162#234#154#182#238#180#209#244'( '#131'( '#131'( '#131'( '
+  +#131'( '#131#167#190#226#178#206#243#164#190#239#154#179#236#149#173#235#149
+  +#173#235#153#177#235#162#187#238#179#199#219#197#217#219'GE'#149'( '#131'( '
+  +#131'( '#131'ef'#164#185#197#197#174#183#183#172#180#180#179#189#189#193#207
+  +#207'RQ'#155'( '#131'( '#131'SQ'#156#196#209#209#185#194#194#180#188#188#185
+  +#193#193#195#207#207'SP'#155'( '#131'( '#131'( '#131#149#157#194#210#226#226
+  +#200#212#212#193#201#201#187#193#193#184#189#189#184#189#189#183#188#188#184
+  +#189#189#184#189#189#183#188#188#182#186#186#179#182#182#178#180#180#179#181
+  +#181#184#188#188#194#201#201#196#206#213'3,'#137'( '#131'( '#131'( '#131#162
+  +#172#210#209#224#240#201#214#235#194#206#231#191#202#229#190#201#227#191#200
+  +#227#192#202#227#191#201#226#191#200#225#189#197#222#189#197#222#194#202#225
+  +#201#210#230#211#222#236'VS'#159'( '#131'( '#131'( '#131#214#226#238#218#228
+  +#238#210#219#231#206#212#227#204#209#225#203#208#224#204#209#224#195#201#219
+  +#209#214#227#210#215#228#211#217#228#213#218#229#216#222#231#221#229#235#229
+  +#238#242#221#230#239'( '#131'( '#131'( '#131'XT'#159#226#231#231#220#223#223
+  ,#215#217#217#214#214#214#213#213#213#213#213#213#215#215#215#216#216#216#216
+  +#216#216#216#217#217#218#219#219#220#221#221#223#224#224#213#215#221#226#228
+  +#228#226#228#228#226#228#228#227#229#229#228#230#230#230#233#233#234#238#238
+  +#239#245#245#140#139#189'( '#131'( '#131'( '#131'ZU'#160#235#239#239#232#235
+  +#235#233#237#237#237#241#241'ZV'#160'( '#131'( '#131'( '#131#241#247#247#237
+  +#242#242#234#237#237#232#235#235#232#235#235#234#237#237#236#241#241#239#244
+  +#244'tq'#174'( '#131'( '#131'( '#131'( '#131#164#164#201#234#238#238#231#233
+  +#233#230#231#231#231#232#232#234#237#237#239#243#243'( '#131'( '#131'( '#131
+  +'[V'#160#241#245#245#238#241#241#237#241#241#239#242#242#165#165#203'( '#131
+  +'( '#131'( '#131'( '#131#141#139#189#239#242#242#235#238#238#232#234#234#230
+  +#231#231#229#229#229#229#230#230#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#229#229#229#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#232#232#232#232#232#232#231#231#231#231#231#231#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#235
+  +#235#235#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#147#147#147#147#147#147
+  +#147#147#147#146#146#146#146#146#146#147#147#147#147#147#147#146#146#146#146
+  +#146#146#146#146#146#146#146#146#146#146#146#151#152#152#161#166#166#174#184
+  +#184#193#209#209''''#31#133''''#31#133''''#31#133'QP'#157#189#205#205#171#180
+  +#180#159#164#164#155#159#159#160#165#165#173#182#182#188#203#203'[['#162''''
+  +#31#133''''#31#133''''#31#133'<8'#145#186#202#208#182#193#193#173#181#181#171
+  +#178#178#178#187#187#192#205#205'GC'#151''''#31#133''''#31#133'2+'#139#189
+  +#205#218#207#225#225#194#208#208#183#194#194#176#184#184#171#177#177#168#173
+  +#173#166#171#171#164#169#169#164#169#169#162#167#167#160#164#164#156#160#160
+  +#152#155#155#151#153#153#154#157#157#163#169#169#178#190#190#156#167#193''''
+  +#31#133''''#31#133''''#31#133#156#168#194#177#189#189#159#166#166#147#150#150
+  +#144#146#146#151#155#155#165#174#174#184#200#200'PP'#156''''#31#133''''#31
+  +#133''''#31#133#186#204#204#165#177#177#149#155#155#139#141#141#136#147#177
+  +#141#167#236#160#189#240#147#169#218''''#31#133''''#31#133''''#31#133'r~'#190
+  +#166#196#242#146#174#237#135#162#235#134#160#234#145#173#237#165#194#242'p{'
+  +#190''''#31#133''''#31#133''''#31#133''''#31#133#133#151#205#173#204#244#157
+  +#186#241#145#172#238#135#162#236#128#155#234#128#152#229#144#158#200#161#164
+  +#169#162#164#164#161#164#164#162#166#166#165#170#170#170#177#177#178#189#189
+  +#188#204#204#139#150#188''''#31#133''''#31#133''''#31#133''''#31#133'p{'#190
+  +#166#195#242#147#174#237#133#158#234#131#155#233#138#164#235#156#182#238#180
+  +#209#245''''#31#133''''#31#133''''#31#133''''#31#133'u'#129#190#183#211#245
+  +#164#190#240#149#173#236#140#163#232#136#159#231#136#158#231#144#160#203#156
+  +#165#173#170#180#180#185#200#200#182#199#212''''#31#133''''#31#133''''#31#133
+  ,'2*'#139#192#206#206#180#190#190#176#184#184#181#191#191#194#208#208'RP'#157
+  +''''#31#133''''#31#133'RQ'#157#197#210#210#187#197#197#185#193#193#190#200
+  +#200#171#182#201''''#31#133''''#31#133''''#31#133'^^'#164#215#232#232#208#223
+  +#223#198#209#209#191#199#199#186#192#192#183#188#188#182#187#187#182#186#186
+  +#181#185#185#182#186#186#182#185#185#181#184#184#179#181#181#179#181#181#182
+  +#185#185#190#195#195#200#208#208#147#152#191''''#31#133''''#31#133''''#31#133
+  +'jl'#176#210#227#241#200#213#235#191#202#229#185#195#226#183#193#224#184#192
+  +#223#185#193#223#185#194#223#185#193#223#186#194#222#186#193#221#189#196#223
+  +#194#201#226#202#211#231#213#225#237'VS'#161''''#31#133''''#31#133'?9'#147
+  +#222#234#242#213#222#234#205#212#227#200#206#223#199#204#222#200#204#222#201
+  +#206#222#204#208#223#205#210#225#207#212#225#209#214#227#212#217#229#217#223
+  +#232#223#231#237#231#240#244#148#149#196''''#31#133''''#31#133''''#31#133'|{'
+  +#180#226#230#230#220#223#223#216#217#217#214#214#214#214#214#214#214#214#214
+  +#216#216#216#217#217#217#217#217#217#217#217#217#219#219#219#219#220#220#222
+  +#223#223#223#224#224#224#225#225#224#225#225#224#225#225#225#226#226#226#228
+  +#228#229#232#232#234#238#238#239#245#245#128'}'#183''''#31#133''''#31#133''''
+  +#31#133'YU'#161#235#239#239#233#236#236#234#237#237#237#242#242'ZU'#162''''
+  +#31#133''''#31#133''''#31#133#239#244#244#234#238#238#231#233#233#229#230#230
+  +#228#229#229#230#232#232#232#235#235#235#239#239#239#244#244'sp'#176''''#31
+  +#133''''#31#133''''#31#133'4,'#140#238#242#242#233#236#236#231#233#233#231
+  +#233#233#234#237#237#239#243#243''''#31#133''''#31#133''''#31#133'ZU'#162#242
+  +#247#247#240#245#245#240#245#245#166#165#204''''#31#133''''#31#133''''#31#133
+  +''''#31#133'sp'#176#239#243#243#235#238#238#233#235#235#230#231#231#229#229
+  +#229#228#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#230#230#230#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#232#232#232#232#232#232#232#232#232#232#232#232#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#247#247#247#247#247#247#246#246#246#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#148#148#148#148#148#148#148
+  +#148#148#148#148#148#147#147#147#147#147#147#147#147#147#147#147#147#147#147
+  +#147#147#147#147#147#147#147#147#147#147#151#152#152#161#166#166#175#185#185
+  +#193#209#209'%'#29#135'%'#29#135'%'#29#135'OO'#158#190#205#205#172#182#182
+  +#163#169#169#160#165#165#168#176#176#183#196#196#148#159#192'%'#29#135'%'#29
+  +#135'%'#29#135'%'#29#135#159#170#196#186#198#198#173#181#181#167#173#173#169
+  +#176#176#181#190#190#186#200#206'%'#29#135'%'#29#135'%'#29#135'gi'#171#211
+  +#230#230#209#227#227#199#213#213#189#201#201#183#193#193#180#188#188#177#185
+  +#185#174#182#182#172#180#180#170#177#177#168#174#174#165#170#170#161#166#166
+  +#158#161#161#154#157#157#157#161#161#166#173#173#179#191#191#156#168#194'%'
+  ,#29#135'%'#29#135'%'#29#135#155#167#193#176#189#189#160#166#166#148#150#150
+  +#144#146#146#151#155#155#165#175#175#184#200#200'ON'#158'%'#29#135'%'#29#135
+  +'%'#29#135#186#204#204#165#177#177#149#155#155#139#141#141#133#149#199#141
+  +#168#236#161#190#241#147#168#218'%'#29#135'%'#29#135'%'#29#135'q}'#191#167
+  +#197#243#148#175#237#139#166#236#142#169#237#156#184#240#160#186#231'/)'#142
+  +'%'#29#135'%'#29#135'%'#29#135'|'#139#199#175#205#245#157#185#240#142#168#237
+  +#130#157#234'|'#149#233'w'#145#232'u'#142#232't'#141#232'v'#142#227#137#149
+  +#195#154#156#162#155#156#156#157#159#159#159#163#163#165#171#171#174#185#185
+  +#187#204#204#130#139#186'%'#29#135'%'#29#135'%'#29#135'%'#29#135#161#186#231
+  +#158#185#240#142#167#235#136#160#234#141#166#235#157#183#240#180#209#245'%'
+  +#29#135'%'#29#135'%'#29#135'%'#29#135#184#211#240#171#197#241#152#177#236#139
+  +#162#233#132#153#231#132#148#207#137#144#163#142#144#144#149#152#152#160#166
+  +#166#176#187#187#194#211#211'eh'#170'%'#29#135'%'#29#135'%'#29#135#157#167
+  +#193#185#196#196#180#189#189#183#194#194#195#209#209'PO'#159'%'#29#135'%'#29
+  +#135'QO'#159#198#211#211#189#199#199#188#197#197#194#206#206#133#138#185'%'
+  +#29#135'%'#29#135'%'#29#135#181#194#214#215#233#233#210#225#225#202#214#214
+  +#196#205#205#193#201#201#190#197#197#189#196#196#188#194#194#187#192#192#187
+  +#193#193#186#191#191#185#189#189#183#186#186#182#185#185#186#190#190#194#200
+  +#200#205#215#215'^]'#165'%'#29#135'%'#29#135'%'#29#135#194#208#229#203#218
+  +#238#192#204#231#184#195#226#180#188#223#179#187#222#181#188#222#181#189#222
+  +#182#189#222#183#191#222#184#192#221#185#191#221#189#195#223#194#202#225#203
+  +#212#231#214#225#238'TR'#163'%'#29#135'%'#29#135'UR'#163#219#230#240#210#218
+  +#232#203#209#225#200#205#222#199#202#221#199#203#221#201#205#221#203#206#222
+  +#206#210#224#208#212#226#212#217#228#216#222#232#221#229#236#228#237#241#160
+  +#162#205'%'#29#135'%'#29#135'%'#29#135'%'#29#135#169#172#205#224#228#228#220
+  +#222#222#217#217#217#214#215#215#215#215#215#216#216#216#217#217#217#218#218
+  +#218#218#218#218#218#218#218#219#220#220#220#220#220#221#221#221#222#223#223
+  +#222#223#223#223#223#223#223#224#224#226#227#227#228#230#230#232#235#235#236
+  +#240#240#228#233#240'2+'#142'%'#29#135'%'#29#135'%'#29#135'~|'#183#235#239
+  +#239#233#236#236#234#237#237#237#242#242'XT'#163'%'#29#135'%'#29#135'%'#29
+  +#135#238#243#243#233#236#236#230#231#231#227#228#228#226#227#227#227#228#228
+  +#230#231#231#233#235#235#237#240#240#228#232#239'2+'#142'%'#29#135'%'#29#135
+  +'%'#29#135#164#164#204#235#238#238#233#235#235#233#235#235#235#238#238#239
+  +#243#243'%'#29#135'%'#29#135'%'#29#135'YT'#163#243#248#248#243#248#248#204
+  +#207#227'2+'#142'%'#29#135'%'#29#135'%'#29#135'ro'#177#239#243#243#236#238
+  +#238#233#235#235#231#232#232#230#231#231#229#230#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  ,#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#149#149#149#149#149#149#148#148#148#148#148#148#148#148
+  +#148#148#148#148#148#148#148#148#148#148#148#148#148#148#148#148#147#147#147
+  +#147#147#147#152#153#153#161#166#166#175#185#185#193#210#210'$'#28#138'$'#28
+  +#138'$'#28#138'ON'#160#191#207#207#176#186#186#168#176#176#169#177#177#178
+  +#190#190#184#200#206'/('#144'$'#28#138'$'#28#138'$'#28#138'w}'#179#189#203
+  +#203#175#184#184#165#170#170#163#167#167#170#175#175#182#192#192#159#168#196
+  +'$'#28#138'$'#28#138'$'#28#138'EB'#156'|'#129#184#134#141#190#162#173#201#178
+  +#190#204#195#208#208#193#205#205#190#202#202#188#200#200#185#197#197#184#194
+  +#194#180#191#191#177#186#186#172#179#179#165#172#172#160#165#165#161#166#166
+  +#168#176#176#181#193#193#156#167#195'$'#28#138'$'#28#138'$'#28#138#155#167
+  +#194#177#189#189#160#167#167#149#151#151#145#147#147#152#156#156#165#175#175
+  +#184#200#200'NM'#160'$'#28#138'$'#28#138'$'#28#138#186#204#204#165#177#177
+  +#149#154#154#139#141#141#131#151#210#142#168#236#161#190#241#147#168#219'$'
+  +#28#138'$'#28#138'$'#28#138'q}'#193#168#197#243#150#179#239#144#171#237#150
+  +#177#239#167#197#243'^e'#179'$'#28#138'$'#28#138'$'#28#138'LN'#165#180#210
+  +#246#160#188#242#142#170#238#129#156#235'{'#148#233'w'#143#233'u'#141#232't'
+  +#141#232't'#140#232't'#140#232's'#140#232'v'#141#227#135#148#193#151#153#158
+  +#153#154#154#156#160#160#163#170#170#173#187#190#181#210#239'LN'#165'$'#28
+  +#138'$'#28#138'$'#28#138'^e'#179#169#197#243#148#175#238#140#165#236#144#168
+  +#236#158#186#240#180#209#245'$'#28#138'$'#28#138'$'#28#138'LN'#166#185#213
+  +#245#163#188#240#146#169#235#135#155#221#137#143#169#139#139#139#139#139#139
+  +#142#142#142#146#148#148#156#161#161#170#178#178#188#202#202#153#165#199'$'
+  +#28#138'$'#28#138'$'#28#138'v{'#178#188#200#200#183#192#192#186#196#196#196
+  +#210#210'PN'#161'$'#28#138'$'#28#138'PN'#161#199#212#212#190#201#201#190#200
+  +#200#197#210#210'fg'#172'$'#28#138'$'#28#138'$'#28#138'hi'#174'~'#130#185#159
+  +#168#203#165#174#202#193#204#211#202#213#213#200#211#211#200#210#210#199#208
+  +#208#198#207#207#197#205#205#195#203#203#193#200#200#190#196#196#189#194#194
+  +#191#197#197#198#206#206#209#220#220';6'#150'$'#28#138'$'#28#138'GC'#156#213
+  +#228#237#198#212#235#188#200#229#182#192#225#178#187#223#180#187#222#180#187
+  +#221#181#189#222#182#189#222#183#190#221#184#191#221#186#192#221#188#196#224
+  +#195#202#227#203#212#232#215#226#238'SQ'#165'$'#28#138'$'#28#138'TQ'#165#218
+  +#229#239#210#217#232#203#209#225#200#205#223#198#202#221#199#204#221#201#206
+  +#222#204#208#223#207#212#226#212#217#228#216#222#232#222#229#237#204#211#229
+  +'b_'#172'$'#28#138'$'#28#138'$'#28#138'$'#28#138'ID'#157#228#233#233#222#226
+  +#226#219#220#220#217#217#217#215#215#215#216#216#216#217#217#217#217#217#217
+  +#218#218#218#218#218#218#218#218#218#219#219#219#221#221#221#221#222#222#223
+  +#223#223#223#224#224#224#225#225#226#228#228#229#231#231#232#235#235#236#240
+  +#240#227#232#239'KE'#159'$'#28#138'$'#28#138'$'#28#138'$'#28#138#175#176#210
+  +#234#237#237#232#235#235#234#237#237#237#242#242'WS'#165'$'#28#138'$'#28#138
+  +'$'#28#138#239#243#243#234#236#236#230#231#231#227#228#228#226#226#226#227
+  +#227#227#228#228#228#230#232#232#234#236#236#238#242#242#139#138#192'$'#28
+  +#138'$'#28#138'$'#28#138'ea'#172#237#240#240#234#236#236#234#236#236#235#238
+  +#238#240#244#244'$'#28#138'$'#28#138'$'#28#138'XS'#166#243#248#248#204#207
+  +#227'1*'#145'$'#28#138'$'#28#138'$'#28#138'KE'#158#240#244#244#237#239#239
+  +#234#235#235#232#232#232#230#231#231#230#231#231#229#229#229#229#229#229#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  ,#240#241#241#241#240#240#240#240#240#240#241#241#241#240#240#240#240#240#240
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#247#247#247#247#247#247#246#246#246#247#247#247#247#247
+  +#247#247#247#247#247#247#247#149#149#149#149#149#149#149#149#149#149#149#149
+  +#149#149#149#149#149#149#149#149#149#149#149#149#149#149#149#149#149#149#148
+  +#148#148#148#148#148#153#154#154#162#167#167#176#186#186#194#210#210'"'#27
+  +#140'"'#27#140'"'#27#140'MM'#162#196#214#214#183#196#196#177#188#188#180#192
+  +#192#191#206#206'XY'#167'"'#27#140'"'#27#140'"'#27#140'MM'#162#192#208#208
+  +#178#188#188#166#172#172#159#162#162#161#165#165#169#175#175#183#194#194#160
+  +#170#198'"'#27#140'"'#27#140'"'#27#140'"'#27#140'"'#27#140'"'#27#140'"'#27
+  +#140'"'#27#140'"'#27#140'73'#150'LK'#160'ln'#174'uy'#178#147#156#192#155#165
+  +#193#191#206#206#186#198#198#178#188#188#169#177#177#166#173#173#170#179#179
+  +#183#195#195#156#168#196'"'#27#140'"'#27#140'"'#27#140#155#167#195#178#190
+  +#190#160#167#167#148#151#151#145#147#147#153#157#157#166#175#175#185#201#201
+  +'LM'#161'"'#27#140'"'#27#140'"'#27#140#186#204#204#165#176#176#149#154#154
+  +#138#140#140#131#152#217#143#169#236#162#191#241#147#168#220'"'#27#140'"'#27
+  +#140'"'#27#140'p|'#194#169#198#243#153#181#240#150#177#239#157#186#241#167
+  +#196#238'"'#27#140'"'#27#140'"'#27#140'"'#27#140#150#172#221#167#197#243#147
+  +#175#239#132#158#235'{'#149#233'w'#143#232'u'#141#232't'#141#232't'#141#232
+  +'t'#141#233't'#141#233'u'#141#232't'#141#232't'#141#232'w'#142#227#134#147
+  +#191#151#152#152#151#159#174#150#174#226#166#196#243#169#195#234'"'#27#140'"'
+  +#27#140'"'#27#140'"'#27#140#170#197#238#156#184#240#146#171#237#147#172#237
+  +#159#186#240#180#209#245'"'#27#140'"'#27#140'"'#27#140't'#194#180#209#245
+  +#159#183#235#148#160#186#143#145#145#139#139#139#140#140#140#141#141#141#142
+  +#142#142#147#147#147#154#157#157#168#175#175#185#198#198#161#175#203'"'#27
+  +#140'"'#27#140'"'#27#140'w|'#181#191#204#204#184#194#194#187#197#197#197#210
+  +#210'NN'#162'"'#27#140'"'#27#140'ON'#163#200#213#213#192#203#203#192#202#202
+  +#200#213#213'ON'#163'"'#27#140'"'#27#140'"'#27#140'"'#27#140'"'#27#140'"'#27
+  +#140'"'#27#140'"'#27#140'"'#27#140'NM'#161'NL'#161'z}'#182#133#136#187#165
+  +#173#202#185#195#209#205#215#215#201#209#209#198#206#206#198#205#205#202#211
+  +#211#212#224#224'"'#27#140'"'#27#140'"'#27#140'QO'#164#213#225#230#197#210
+  +#235#187#198#229#182#191#225#179#188#222#180#187#222#180#188#222#182#189#223
+  +#183#190#222#184#191#222#185#191#222#186#193#222#189#196#223#195#203#227#204
+  +#214#232#215#226#239'RP'#167'"'#27#140'"'#27#140'RP'#167#219#229#239#210#217
+  +#232#204#209#226#200#204#223#198#202#221#200#204#222#202#207#223#207#211#226
+  +#210#216#228#217#224#233#223#231#238#143#145#198'.)'#147'"'#27#140'"'#27#140
+  +'"'#27#140'"'#27#140'/)'#146#193#197#218#225#229#229#221#223#223#218#219#219
+  +#216#217#217#216#216#216#216#216#216#218#218#218#219#219#219#219#219#219#219
+  +#219#219#219#219#219#220#220#220#222#222#222#222#223#223#224#225#225#225#226
+  +#226#227#228#228#229#232#232#233#236#236#237#241#241#188#191#220'<7'#153'"'
+  +#27#140'"'#27#140'"'#27#140'"'#27#140'ID'#160#236#240#240#233#235#235#232#234
+  +#234#233#236#236#238#242#242'VR'#167'"'#27#140'"'#27#140'"'#27#140#239#243
+  +#243#234#236#236#230#231#231#227#228#228#226#226#226#227#227#227#228#228#228
+  +#230#230#230#233#234#234#237#240#240#216#219#234'"'#27#140'"'#27#140'"'#27
+  +#140'<7'#154#238#242#242#235#238#238#234#237#237#236#239#239#240#244#244'"'
+  +#27#140'"'#27#140'"'#27#140'VR'#167#230#234#241'<7'#154'"'#27#140'"'#27#140
+  +'"'#27#140'IE'#160#227#231#238#237#240#240#234#236#236#232#233#233#231#232
+  +#232#231#231#231#230#230#230#230#230#230#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#233#233#233#233#233#233#233#233#233#233
+  ,#233#233#233#233#233#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245#244#244#244#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#150#150#150#150#150#150#150#150#150#150#150#150#149#149#149#150#150
+  +#150#150#150#150#149#149#149#149#149#149#149#149#149#149#149#149#148#148#148
+  +#153#154#154#162#167#167#177#186#186#194#210#210'!'#26#142'!'#26#142'!'#26
+  +#142'LL'#163#205#226#226#194#211#211#190#206#206#195#211#211#150#163#199'!'
+  +#26#142'!'#26#142'!'#26#142','''#147#188#204#211#182#194#194#168#175#175#155
+  +#164#180#152#157#166#159#161#161#169#175#175#183#194#194#160#170#199'!'#26
+  +#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'
+  +#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142
+  +'!'#26#142'IG'#158#152#159#181#174#183#183#174#184#184#184#197#197#157#168
+  +#197'!'#26#142'!'#26#142'!'#26#142#156#168#197#179#191#191#162#169#169#149
+  +#152#152#146#148#148#153#158#158#166#176#176#185#201#201'LL'#163'!'#26#142'!'
+  +#26#142'!'#26#142#187#205#205#166#177#177#149#154#154#138#140#140#130#155#234
+  +#143#170#237#163#192#242#147#168#221'!'#26#142'!'#26#142'!'#26#142'p{'#195
+  +#170#199#243#156#184#240#154#183#240#166#194#243#128#144#207'!'#26#142'!'#26
+  +#142'!'#26#142'JL'#169#178#209#246#156#185#241#138#165#237''#152#235'y'#145
+  +#234'u'#142#233'u'#142#233'u'#142#233'u'#142#233'u'#142#233'u'#142#233'u'#142
+  +#233'u'#142#233'v'#142#233'v'#142#233'v'#142#233'}'#146#223#129#152#230#138
+  +#164#236#156#184#241#178#208#246'TY'#176'!'#26#142'!'#26#142'!'#26#142#128
+  +#145#207#164#192#242#152#177#239#150#176#238#160#187#241#181#209#245'!'#26
+  +#142'!'#26#142'!'#26#142's'#195#184#205#224#166#178#181#153#158#158#144#145
+  +#145#140#140#140#142#142#142#143#143#143#144#144#144#147#147#147#156#159#159
+  +#168#176#176#185#198#198#161#174#203'!'#26#142'!'#26#142'!'#26#142'w|'#182
+  +#192#204#204#185#195#195#187#198#198#197#211#211'NM'#164'!'#26#142'!'#26#142
+  +'NM'#164#200#213#213#193#203#203#193#203#203#201#213#213'NM'#164'!'#26#142'!'
+  +#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142
+  +'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'73'
+  +#152'MJ'#161#204#213#213#206#216#216#214#226#226'!'#26#142'!'#26#142'!'#26
+  +#142'PO'#166#214#225#225#198#211#234#189#199#230#183#192#226#179#189#223#180
+  +#188#223#181#189#223#182#189#223#183#190#223#185#192#222#186#192#222#186#193
+  +#222#190#197#224#196#204#228#205#215#232#216#227#239'QP'#168'!'#26#142'!'#26
+  +#142'RP'#168#219#229#239#210#218#232#204#210#227#200#205#223#199#203#222#201
+  +#206#223#205#210#225#209#215#228#216#222#233#223#231#239'kj'#180'!'#26#142'!'
+  +#26#142'!'#26#142'!'#26#142'!'#26#142'GC'#161#206#211#225#227#231#231#221#224
+  +#224#219#220#220#218#218#218#217#217#217#217#217#217#218#218#218#219#219#219
+  +#220#220#220#220#220#220#220#220#220#221#221#221#221#221#221#222#223#223#223
+  +#223#223#225#226#226#227#229#229#230#233#233#234#238#238#225#229#237'om'#182
+  +'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'.('#149#200#202#224#233
+  ,#236#236#231#233#233#232#233#233#234#236#236#238#242#242'UR'#169'!'#26#142'!'
+  +#26#142'!'#26#142#239#243#243#234#237#237#231#232#232#228#229#229#227#227#227
+  +#227#227#227#227#227#227#229#229#229#232#233#233#236#239#239#241#245#245'!'
+  +#26#142'!'#26#142'!'#26#142'!'#26#142#239#243#243#236#239#239#235#238#238#237
+  +#240#240#240#244#244'!'#26#142'!'#26#142'!'#26#142'ID'#162'ID'#162'!'#26#142
+  +'!'#26#142'!'#26#142'ID'#162#230#233#240#239#242#242#236#238#238#233#234#234
+  +#231#232#232#231#231#231#230#230#230#230#230#230#230#230#230#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#151#151#151#151#151#151#151#151#151#151#151#151
+  +#151#151#151#150#150#150#151#151#151#150#150#150#150#150#150#150#150#150#149
+  +#149#149#149#149#149#153#154#154#162#167#167#177#186#186#195#211#211#31#25
+  +#145#31#25#145#31#25#145'KL'#166#206#227#227#206#227#227#204#224#224#195#214
+  +#222'51'#155#31#25#145#31#25#145#31#25#145#151#164#201#192#208#208#175#185
+  +#185#153#171#210#138#162#233#133#157#232#137#160#228#152#172#220#173#192#220
+  +#153#167#208#31#25#145#31#25#145#31#25#145#156#166#204#168#180#210#157#167
+  +#204'x}'#185'ac'#173'KJ'#163'52'#154#31#25#145#31#25#145#31#25#145#31#25#145
+  +#31#25#145#31#25#145#31#25#145#31#25#145#149#156#186#179#189#189#178#188#188
+  +#186#198#198#156#168#198#31#25#145#31#25#145#31#25#145#158#170#200#181#194
+  +#194#163#170#170#151#154#154#147#149#149#153#158#158#167#177#177#186#203#203
+  +'JK'#165#31#25#145#31#25#145#31#25#145#188#207#207#167#178#178#150#156#156
+  +#139#142#142#132#157#235#145#172#238#164#192#242#148#170#221#31#25#145#31#25
+  +#145#31#25#145'n{'#196#170#200#244#159#187#241#159#187#241#171#200#244'\c'
+  +#184#31#25#145#31#25#145#31#25#145#131#150#209#169#199#244#149#176#239#133
+  +#159#236'{'#148#234'w'#144#233'w'#143#233'v'#143#233'v'#142#233'v'#142#233'v'
+  +#142#234'v'#142#234'v'#143#233'v'#142#233'v'#142#233'w'#143#234'w'#143#233'w'
+  +#144#233'|'#149#234#132#158#236#149#176#239#170#199#244#132#149#209#31#25#145
+  +#31#25#145#31#25#145'RW'#178#171#198#243#156#182#240#153#179#239#161#189#241
+  +#181#210#245#31#25#145#31#25#145#31#25#145'UW'#171#191#209#209#171#182#182
+  +#157#162#162#147#149#149#143#144#144#143#143#143#144#144#144#146#146#146#151
+  +#152#152#159#163#163#172#180#180#190#204#204#152#163#201#31#25#145#31#25#145
+  +#31#25#145'v{'#183#191#203#203#184#194#194#188#198#198#198#211#211'LL'#166#31
+  +#25#145#31#25#145'ML'#166#201#214#214#193#203#203#193#202#202#200#212#212'XY'
+  +#171#31#25#145#31#25#145'B?'#162#194#207#222#171#181#211#135#141#193'z}'#185
+  +'WW'#169'LK'#164'*&'#149#31#25#145#31#25#145#31#25#145#31#25#145#31#25#145#31
+  ,#25#145#31#25#145'*&'#149#208#219#219#209#220#220#215#227#227'+&'#150#31#25
+  +#145#31#25#145'C@'#162#216#228#228#203#213#225#192#202#232#184#194#227#181
+  +#189#225#181#189#224#182#190#224#183#190#224#185#192#223#185#192#223#186#193
+  +#223#187#194#223#190#197#225#197#205#229#206#215#233#217#227#240'PO'#170#31
+  +#25#145#31#25#145'PO'#170#219#229#240#210#218#232#204#211#227#201#205#224#200
+  +#205#223#204#209#225#208#212#228#214#219#232#222#229#238'ji'#182#31#25#145#31
+  +#25#145#31#25#145#31#25#145','''#150#133#133#193#229#235#235#225#230#230#222
+  +#225#225#220#221#221#218#219#219#218#218#218#217#217#217#218#218#218#218#218
+  +#218#219#219#219#220#220#220#220#220#220#220#220#220#221#221#221#221#221#221
+  +#224#224#224#226#227#227#228#229#229#231#233#233#235#238#238#187#189#219',&'
+  +#151#31#25#145#31#25#145#31#25#145#31#25#145#31#25#145','''#151#200#202#224
+  +#235#238#238#232#234#234#230#231#231#231#232#232#234#236#236#238#242#242'TQ'
+  +#171#31#25#145#31#25#145#31#25#145#239#243#243#234#237#237#231#232#232#228
+  +#229#229#227#227#227#227#227#227#228#228#228#230#230#230#232#234#234#236#239
+  +#239#241#245#245'TQ'#171#31#25#145#31#25#145#31#25#145#240#244#244#236#239
+  +#239#236#238#238#237#240#240#240#244#244#31#25#145#31#25#145#31#25#145#31#25
+  +#145#31#25#145#31#25#145#31#25#145','''#151#204#207#229#242#246#246#238#240
+  +#240#234#236#236#232#233#233#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#235#235
+  +#235#234#234#234#234#234#234#235#235#235#235#235#235#234#234#234#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238
+  +#238#238#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#247#247#247#247#247#247#247#247#247#247#247#247#152#152#152#152#152
+  +#152#151#151#151#151#151#151#151#151#151#152#152#152#151#151#151#151#151#151
+  +#151#151#151#150#150#150#150#150#150#150#150#150#154#155#155#163#168#168#177
+  +#186#186#195#211#211#30#23#147#30#23#147#30#23#147'41'#157'v}'#187'v}'#187'v'
+  +'}'#187'UW'#172#30#23#147#30#23#147#30#23#147'v}'#187#206#227#227#190#205#205
+  +#168#186#212#147#172#236#138#162#234#133#158#233#137#161#234#146#171#236#162
+  +#189#240#163#188#233#30#23#147#30#23#147#30#23#147'}'#139#204#203#230#245#197
+  +#223#242#187#212#238#188#207#224#197#208#208#198#210#210#200#214#214#184#196
+  +#212#167#179#210#133#140#194'LK'#168#30#23#147#30#23#147#30#23#147#162#171
+  +#194#182#192#192#179#190#190#186#199#199#157#169#200#30#23#147#30#23#147#30
+  +#23#147'u{'#185#185#199#199#167#175#175#154#158#158#150#153#153#156#161#161
+  +#169#179#179#189#206#206'IJ'#167#30#23#147#30#23#147#30#23#147#192#211#211
+  +#170#182#182#152#159#159#140#148#162#135#160#236#147#175#239#167#196#243#150
+  +#171#223#30#23#147#30#23#147#30#23#147'my'#197#171#200#244#160#188#242#162
+  +#191#243#175#205#245'=='#166#30#23#147#30#23#147#30#23#147#167#194#235#164
+  ,#192#243#144#171#239#129#155#236'y'#147#234'w'#144#234'w'#143#234'w'#143#234
+  +'v'#143#234'w'#143#234'w'#143#234'v'#143#234'w'#143#234'v'#143#234'v'#143#234
+  +'x'#144#234'x'#144#234'x'#144#234'z'#146#234#131#156#236#144#170#239#163#192
+  +#243#177#205#241#30#23#147#30#23#147#30#23#147'31'#160#174#203#245#160#187
+  +#241#156#182#240#164#191#241#182#211#246#30#23#147#30#23#147#30#23#147')$'
+  +#152#199#218#218#179#192#192#163#171#171#153#157#157#148#149#149#145#146#146
+  +#146#147#147#150#150#150#155#158#158#165#171#171#179#190#190#196#212#212'mq'
+  +#183#30#23#147#30#23#147#30#23#147#148#157#196#190#201#201#184#193#193#188
+  +#197#197#198#211#211'LK'#168#30#23#147#30#23#147'LK'#168#201#213#213#192#202
+  +#202#191#200#200#198#209#209'x|'#186#30#23#147#30#23#147#30#23#147#205#220
+  +#228#217#234#234#211#224#224#205#216#216#202#213#213#203#213#213#205#216#216
+  +#209#221#221#169#178#208#172#182#213'}'#129#190'*$'#153#30#23#147#30#23#147
+  +'MK'#168#210#221#221#209#219#219#213#224#224'ZZ'#175#30#23#147#30#23#147#30
+  +#23#147#196#207#222#209#219#220#196#207#232#188#199#229#183#192#226#182#191
+  +#225#185#192#225#186#193#224#186#194#224#187#194#224#188#195#225#189#196#224
+  +#192#199#226#199#206#229#207#215#234#217#228#240'OM'#172#30#23#147#30#23#147
+  +'PN'#172#220#230#240#211#219#233#205#212#228#202#206#224#202#206#225#206#210
+  +#226#211#216#230#218#225#235#178#182#218#30#23#147#30#23#147#30#23#147#30#23
+  +#147'QN'#171#208#214#230#229#235#235#226#229#229#222#224#224#220#222#222#219
+  +#220#220#217#218#218#218#218#218#218#218#218#219#219#219#219#219#219#220#220
+  +#220#221#221#221#221#221#221#221#221#221#222#222#222#223#224#224#225#225#225
+  +#227#228#228#230#233#233#235#238#238#160#161#207#30#23#147#30#23#147#30#23
+  +#147#30#23#147#30#23#147#30#23#147'a]'#178#226#229#237#236#239#239#233#235
+  +#235#230#232#232#230#231#231#231#232#232#234#236#236#238#242#242'SO'#172#30
+  +#23#147#30#23#147#30#23#147#240#244#244#235#238#238#232#233#233#229#230#230
+  +#228#228#228#228#228#228#229#229#229#231#231#231#233#235#235#237#240#240#241
+  +#246#246#30#23#147#30#23#147#30#23#147#30#23#147#240#243#243#237#240#240#236
+  +#238#238#238#240#240#241#245#245#30#23#147#30#23#147#30#23#147'93'#160'+%'
+  +#153#30#23#147#30#23#147'+%'#153#231#235#243#242#246#246#238#241#241#235#236
+  +#236#233#233#233#232#232#232#231#231#231#232#232#232#231#231#231#231#231#231
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236
+  +#236#236#236#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#152#152#152#152#152#152#153#153
+  +#153#152#152#152#152#152#152#152#152#152#152#152#152#151#151#151#151#151#151
+  +#151#151#151#150#150#150#150#150#150#155#156#156#163#168#168#177#187#187#195
+  ,#211#211#28#22#149#28#22#149#28#22#149#28#22#149#28#22#149#28#22#149#28#22
+  +#149#28#22#149#28#22#149#28#22#149#28#22#149#128#137#193#195#214#222#190#211
+  +#223#167#194#241#152#178#237#141#166#235#136#159#233#137#160#233#144#169#235
+  +#158#184#239#177#205#244'10'#162#28#22#149#28#22#149'GJ'#174#200#229#249#188
+  +#217#247#176#204#244#168#195#242#184#198#210#192#201#201#196#206#206#203#216
+  +#216#212#229#229#213#231#231'VX'#175#28#22#149#28#22#149'''#'#154#193#206#206
+  +#183#193#193#180#190#190#187#200#200#158#170#201#28#22#149#28#22#149#28#22
+  +#149'u|'#188#192#208#208#174#184#184#161#167#167#156#161#161#162#169#169#176
+  +#188#188#194#213#213'=<'#163#28#22#149#28#22#149#28#22#149#186#206#214#175
+  +#190#190#158#167#167#147#157#175#142#169#238#155#182#241#174#203#245#143#162
+  +#218#28#22#149#28#22#149#28#22#149'u'#131#205#169#198#244#160#189#242#164#193
+  +#243#178#208#246#28#22#149#28#22#149#28#22#149#28#22#149#183#213#247#159#187
+  +#242#141#168#238#128#153#236'y'#146#235'x'#145#235'x'#145#235'x'#145#234'x'
+  +#144#235'w'#144#235'w'#144#235'w'#144#235'w'#144#234'w'#144#234'x'#144#234'x'
+  +#144#235'y'#145#235'x'#145#235'z'#146#234#128#154#236#141#167#238#160#187#242
+  +#183#213#247'''#'#155#28#22#149#28#22#149#28#22#149#179#207#246#163#190#242
+  +#158#185#241#165#192#242#183#212#246#28#22#149#28#22#149#28#22#149#28#22#149
+  +#138#150#198#190#206#206#175#185#185#163#169#169#156#160#160#153#155#155#154
+  +#156#156#157#160#160#165#170#170#176#184#184#190#203#203#194#210#218'''#'#154
+  +#28#22#149#28#22#149#28#22#149#178#189#205#187#197#197#183#191#191#188#197
+  +#197#198#211#211'JJ'#169#28#22#149#28#22#149'KJ'#170#201#213#213#191#200#200
+  +#189#197#197#195#205#205#172#183#207#28#22#149#28#22#149#28#22#149#146#154
+  +#202#215#231#231#208#220#220#201#210#210#198#206#206#196#205#205#200#208#208
+  +#205#215#215#213#225#225#220#235#235#208#222#230#28#22#149#28#22#149#28#22
+  +#149'oq'#185#209#219#219#206#215#215#210#220#220#135#139#194#28#22#149#28#22
+  +#149#28#22#149'rt'#188#216#227#227#205#214#221#194#206#233#189#199#230#189
+  +#197#229#189#197#228#189#198#227#190#199#227#191#199#227#192#200#227#193#199
+  +#227#195#202#228#201#209#231#209#218#235#218#230#241'NM'#174#28#22#149#28#22
+  +#149'NM'#174#223#232#241#214#222#235#208#214#230#206#210#228#205#210#227#209
+  +#213#229#214#220#233#222#229#238'hh'#185#28#22#149#28#22#149#28#22#149'jj'
+  +#186#234#243#245#229#235#235#226#230#230#223#226#226#222#223#223#220#221#221
+  +#219#220#220#218#219#219#219#219#219#218#218#218#219#219#219#220#220#220#220
+  +#220#220#222#222#222#222#222#222#222#222#222#223#223#223#225#225#225#226#227
+  +#227#230#231#231#233#236#236#185#187#219#28#22#149#28#22#149#28#22#149#28#22
+  +#149#28#22#149'72'#161#188#190#221#238#242#242#236#238#238#233#235#235#231
+  +#232#232#230#230#230#230#230#230#231#232#232#234#237#237#239#243#243'RO'#174
+  +#28#22#149#28#22#149#28#22#149#240#244#244#236#238#238#232#234#234#230#231
+  +#231#229#229#229#229#229#229#230#230#230#231#232#232#234#236#236#238#241#241
+  +#216#219#235#28#22#149#28#22#149#28#22#149'72'#162#240#243#243#237#239#239
+  +#236#238#238#238#240#240#241#245#245#28#22#149#28#22#149#28#22#149'RO'#174
+  +#176#178#218#28#22#149#28#22#149#28#22#149'EA'#168#230#233#241#239#242#242
+  +#236#238#238#234#234#234#233#233#233#232#233#233#232#232#232#232#232#232#232
+  +#232#232#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  ,#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#152#152#152#152#152#152#151
+  +#151#151#151#151#151#151#151#151#150#150#150#155#156#156#164#169#169#177#187
+  +#187#195#211#211#27#21#151#27#21#151#27#21#151#27#21#151#27#21#151#27#21#151
+  +#27#21#151#27#21#151#27#21#151#27#21#151#27#21#151#27#21#151'&"'#156#142#160
+  +#218#178#205#244#162#188#240#149#173#237#140#164#235#137#162#235#142#167#236
+  +#154#180#239#171#198#242'lx'#199#27#21#151#27#21#151#27#21#151#157#178#225
+  +#189#218#247#176#204#244#166#193#242#168#190#229#189#197#197#194#204#204#202
+  +#215#215#212#228#228#191#206#222#27#21#151#27#21#151#27#21#151'_a'#178#192
+  +#204#204#183#192#192#181#191#191#189#202#202#160#172#204#27#21#151#27#21#151
+  +#27#21#151'=<'#165#200#219#219#184#197#197#172#181#181#168#176#176#173#184
+  +#184#185#200#200#192#211#219#27#21#151#27#21#151#27#21#151#27#21#151#146#161
+  +#202#185#202#202#168#181#181#158#173#192#156#182#241#167#195#243#185#214#247
+  +'fp'#194#27#21#151#27#21#151#27#21#151#144#165#223#167#195#244#160#188#243
+  +#164#193#243#180#210#247#27#21#151#27#21#151#27#21#151'EI'#176#180#211#247
+  +#157#185#242#139#166#239''#153#236'y'#146#235'y'#145#235'y'#145#235'x'#145
+  +#235'x'#145#235'x'#145#235'x'#145#235'x'#144#235'x'#145#235'x'#144#235'y'#145
+  +#235'y'#146#235'y'#145#235'y'#145#235'z'#146#235#128#153#236#140#166#239#158
+  +#185#242#180#210#247'EI'#176#27#21#151#27#21#151#27#21#151#181#209#246#164
+  +#191#242#160#186#241#166#193#243#183#212#246#27#21#151#27#21#151#27#21#151#27
+  +#21#151'&"'#156#191#209#218#188#202#202#176#186#186#168#175#175#165#171#171
+  +#166#172#172#169#176#176#177#186#186#189#201#201#202#219#219'TW'#176#27#21
+  +#151#27#21#151#27#21#151'IH'#170#194#206#206#184#192#192#182#189#189#189#198
+  +#198#200#214#214'JJ'#171#27#21#151#27#21#151'JJ'#171#201#213#213#191#199#199
+  +#187#194#194#191#199#199#202#213#213'3/'#161#27#21#151#27#21#151'30'#161#216
+  +#232#232#208#220#220#200#210#210#196#204#204#194#202#202#198#206#206#204#213
+  +#213#212#224#224#220#235#235'|'#128#194#27#21#151#27#21#151#27#21#151#179#187
+  +#212#206#214#214#203#210#210#205#213#213#202#211#219'''#'#156#27#21#151#27#21
+  +#151#27#21#151#174#182#215#215#225#225#206#216#231#199#210#235#197#207#234
+  +#196#206#233#196#206#232#197#206#232#198#207#232#198#207#231#198#206#231#200
+  +#208#232#205#214#233#213#223#238#222#234#243'NL'#175#27#21#151#27#21#151'NL'
+  +#175#226#237#244#218#228#239#213#220#234#209#215#230#209#214#229#211#216#231
+  +#216#222#234#224#231#240'NL'#175#27#21#151#27#21#151#27#21#151#222#230#241
+  +#233#241#241#228#234#234#226#230#230#224#226#226#223#225#225#223#224#224#220
+  +#221#221#220#221#221#219#219#219#219#220#220#220#220#220#221#221#221#222#222
+  +#222#222#222#222#223#223#223#224#224#224#224#224#224#226#226#226#228#229#229
+  +#231#233#233#235#239#239'QM'#175#27#21#151#27#21#151#27#21#151#27#21#151'lj'
+  +#188#228#232#240#238#241#241#235#237#237#233#234#234#231#232#232#230#230#230
+  +#229#229#229#229#230#230#231#232#232#235#237#237#239#243#243'QN'#175#27#21
+  +#151#27#21#151#27#21#151#240#244#244#236#238#238#232#234#234#230#231#231#229
+  +#229#229#231#231#231#232#232#232#234#235#235#237#239#239#241#244#244#149#149
+  +#206#27#21#151#27#21#151#27#21#151'_\'#181#239#242#242#237#239#239#236#238
+  +#238#238#240#240#242#245#245#27#21#151#27#21#151#27#21#151'QN'#176#244#249
+  +#249#162#163#212#27#21#151#27#21#151#27#21#151'_]'#182#241#245#245#238#241
+  +#241#236#237#237#234#235#235#233#233#233#232#232#232#232#232#232#232#232#232
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  ,#238#238#238#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#155#155#155#154#154#154#154#154
+  +#154#154#154#154#154#154#154#153#153#153#153#153#153#153#153#153#152#152#152
+  +#152#152#152#152#152#152#151#151#151#156#157#157#163#168#168#177#187#187#195
+  +#211#211#25#20#154#25#20#154#25#20#154'0.'#162't{'#190't{'#190't{'#190't{'
+  +#190'RU'#176#25#20#154#25#20#154#25#20#154#25#20#154#25#20#154#128#144#212
+  +#174#201#243#159#185#240#147#171#237#140#165#236#141#166#236#150#175#238#164
+  +#190#241#171#196#239'$!'#159#25#20#154#25#20#154'/.'#166#184#211#243#183#211
+  +#246#174#202#243#169#196#243#188#202#213#198#209#209#205#219#219#202#218#226
+  +'=<'#169#25#20#154#25#20#154#25#20#154#179#191#207#187#198#198#180#189#189
+  +#181#190#190#191#205#205#162#174#208#25#20#154#25#20#154#25#20#154#25#20#154
+  +#161#176#209#195#213#213#186#200#200#183#196#196#187#202#202#198#217#217'}'
+  +#136#194#25#20#154#25#20#154#25#20#154#25#20#154':;'#167#194#215#215#182#199
+  +#199#173#195#217#173#201#245#182#212#247#186#215#244'/.'#166#25#20#154#25#20
+  +#154#25#20#154#169#196#240#163#191#243#157#185#242#163#192#243#180#210#247#25
+  +#20#154#25#20#154#25#20#154'DH'#178#180#211#247#157#185#242#140#166#239#128
+  +#154#237'z'#146#236'z'#146#236'y'#146#236'y'#146#236'y'#146#236'y'#145#236'y'
+  +#145#236'x'#145#236'y'#145#235'y'#145#235'y'#145#235'z'#146#236'z'#146#236'{'
+  +#146#235'{'#146#235#129#153#236#140#166#238#157#185#242#181#210#247'DH'#178
+  +#25#20#154#25#20#154#25#20#154#181#210#246#165#192#243#160#186#241#167#194
+  +#243#184#212#247#25#20#154#25#20#154#25#20#154#25#20#154#25#20#154';;'#168
+  +#190#206#215#191#206#206#184#196#196#182#193#193#183#193#193#186#198#198#194
+  +#207#207#203#220#220'_c'#183#25#20#154#25#20#154#25#20#154#25#20#154#157#168
+  +#201#189#199#199#182#189#189#182#189#189#191#200#200#204#217#217'II'#174#25
+  +#20#154#25#20#154'II'#174#202#214#214#191#198#198#185#191#191#187#193#193#196
+  +#205#205#139#145#195#25#20#154#25#20#154#25#20#154'be'#184#212#226#226#206
+  +#217#217#201#210#210#200#208#208#202#211#211#207#218#218#215#228#228#184#195
+  +#221#25#20#154#25#20#154#25#20#154'JI'#173#209#218#218#201#207#207#197#203
+  +#203#200#206#206#208#216#216'y}'#191#25#20#154#25#20#154#25#20#154'%"'#159
+  +#174#182#216#218#228#230#211#223#237#207#219#239#206#218#238#207#218#238#206
+  +#217#237#207#218#237#195#204#231#194#202#230#207#216#235#211#221#237#218#229
+  +#241#227#239#247'LK'#178#25#20#154#25#20#154'LL'#178#231#242#248#224#235#243
+  +#219#227#239#215#222#235#214#220#234#215#221#234#219#225#236#225#233#241'ML'
+  +#177#25#20#154#25#20#154#25#20#154#236#245#245#235#242#242#231#236#236#228
+  +#232#232#226#230#230#226#229#229#187#188#213#223#225#225#222#223#223#222#222
+  +#222#221#221#221#221#221#221#222#222#222#223#223#223#223#223#223#223#223#223
+  +#224#224#224#224#224#224#226#227#227#229#230#230#233#235#235#211#214#231#25
+  +#20#154#25#20#154#25#20#154#25#20#154'yx'#195#241#246#246#238#241#241#234#237
+  +#237#233#234#234#231#232#232#231#231#231#230#230#230#230#230#230#230#231#231
+  +#232#233#233#235#237#237#239#243#243'PM'#178#25#20#154#25#20#154#25#20#154
+  +#241#245#245#237#240#240#234#235#235#232#233#233#231#232#232#232#232#232#233
+  +#234#234#236#238#238#239#242#242#229#233#241'''"'#160#25#20#154#25#20#154#25
+  +#20#154#160#161#211#238#241#241#236#238#238#236#238#238#238#240#240#242#245
+  +#245#25#20#154#25#20#154#25#20#154'PM'#178#245#249#249#245#249#249'lj'#189#25
+  ,#20#154#25#20#154#25#20#154'kj'#189#241#244#244#239#241#241#236#238#238#235
+  +#235#235#234#234#234#233#233#233#233#233#233#233#233#233#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#233#233#233#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#235#235#235#234
+  +#234#234#235#235#235#234#234#234#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#156#156#156#155#155#155#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#153#153#153#153#153#153#153#153#153#152#152#152#151#151
+  +#151#156#157#157#164#169#169#177#187#187#195#211#211#24#19#156#24#19#156#24
+  +#19#156'FG'#174#206#227#227#201#220#220#193#210#210#191#207#207#193#211#211
+  +#180#197#214'QU'#180#24#19#156#24#19#156#24#19#156#24#19#156#146#165#224#168
+  +#195#242#153#179#239#144#169#236#141#165#236#145#169#237#156#181#239#171#198
+  +#243#135#154#218#24#19#156#24#19#156#24#19#156'.-'#168#152#172#226#186#215
+  +#247#181#210#246#187#211#238#206#219#219#187#201#218'<:'#170#24#19#156#24#19
+  +#156#24#19#156'gl'#185#193#204#204#183#191#191#178#185#185#182#191#191#193
+  +#206#206#163#176#210#24#19#156#24#19#156#24#19#156#24#19#156'#'#31#161#160
+  +#174#209#198#217#217#197#215#215#201#221#221#159#175#209'#'#31#160#24#19#156
+  +#24#19#156#24#19#156'# '#160#24#19#156'[`'#182#182#202#210#188#213#228#190
+  +#220#249#186#215#244'Za'#191#24#19#156#24#19#156#24#19#156'BF'#179#171#199
+  +#245#157#184#242#154#180#242#161#189#243#180#209#247#24#19#156#24#19#156#24
+  +#19#156'.,'#168#182#212#247#159#187#243#141#167#240#130#154#237'z'#147#236'z'
+  +#147#236'z'#147#236'z'#146#236'z'#146#236'y'#146#236'z'#146#237'z'#146#236'z'
+  +#147#236'z'#146#236'z'#146#236'{'#147#236'{'#147#236'{'#147#236'{'#147#236
+  +#130#155#237#142#168#240#160#187#243#183#212#247'9:'#174#24#19#156#24#19#156
+  +#24#19#156#181#210#246#165#192#243#161#187#242#167#194#243#185#213#247#24#19
+  +#156#24#19#156#24#19#156#24#19#156#24#19#156#24#19#156'$'#31#161#136#145#198
+  +#188#203#211#197#212#212#198#213#213#202#218#218#151#161#204';:'#170#24#19
+  +#156#24#19#156#24#19#156#24#19#156'hm'#185#194#206#206#184#192#192#178#184
+  +#184#181#188#188#192#201#201#206#220#220'HH'#175#24#19#156#24#19#156'HH'#175
+  +#201#213#213#189#197#197#183#188#188#183#188#188#190#196#196#201#211#211'GG'
+  +#174#24#19#156#24#19#156#24#19#156'ac'#185#202#214#223#210#221#221#208#219
+  +#219#210#221#221#213#226#226#145#153#205'$ '#161#24#19#156#24#19#156#24#19
+  +#156#177#185#210#203#210#210#196#201#201#194#197#197#196#200#200#202#208#208
+  +#212#221#221'=;'#170#24#19#156#24#19#156#24#19#156#24#19#156'de'#187#185#194
+  +#221#219#233#243#219#233#245#218#231#244#205#217#238#143#150#210'0,'#167#165
+  +#172#218#213#223#239#217#228#241#224#236#245#229#242#248'KK'#179#24#19#156#24
+  +#19#156'LK'#179#231#243#248#230#241#247#225#234#243#221#229#240#219#226#237
+  ,#219#225#237#221#227#238#225#233#241'st'#196#24#19#156#24#19#156#24#19#156
+  +#170#174#217#237#244#244#235#241#241#232#238#238#231#236#236#178#180#215'%'
+  +#31#161#226#228#228#224#225#225#222#223#223#222#222#222#222#222#222#222#222
+  +#222#223#223#223#224#224#224#224#224#224#225#225#225#225#225#225#227#228#228
+  +#230#231#231#234#237#237#185#188#222#24#19#156#24#19#156#24#19#156'&!'#162
+  +#243#248#248#240#244#244#237#239#239#234#236#236#232#233#233#231#232#232#231
+  +#232#232#232#232#232#230#231#231#231#231#231#232#233#233#235#237#237#240#243
+  +#243'OM'#179#24#19#156#24#19#156#24#19#156#242#246#246#239#241#241#236#238
+  +#238#234#235#235#234#235#235#234#236#236#237#239#239#239#242#242#242#246#246
+  +'ki'#191#24#19#156#24#19#156#24#19#156'40'#168#241#244#244#238#240#240#236
+  +#237#237#236#238#238#238#241#241#242#245#245#24#19#156#24#19#156#24#19#156'O'
+  +'M'#179#245#249#249#244#248#248#244#248#248'OM'#179#24#19#156#24#19#156#24#19
+  +#156#161#161#213#241#244#244#238#240#240#236#237#237#235#235#235#234#234#234
+  +#233#233#233#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#235#235#235#235#235#235#234#234#234#234#234#234#234#234#234#235#235
+  +#235#234#234#234#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#236#236#236#235#235#235#236#236#236#236#236#236#236#236#236#235#235#235#235
+  +#235#235#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#237#237#237#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238#238#238#237
+  +#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#239#239#239#239#239#239#239#239#239#238#238#238#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#240#240
+  +#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#242#242#242#241#241#241#242#242#242#241#241#241#242#242#242#242#242#242#241
+  +#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#243#243#243#242#242#242#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#242#242#242#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#244#244#244#244#244#244#244#244#244#243#243#243#244#244#244#243#243#243
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#245#245#245#244#244#244#244#244#244#245#245
+  +#245#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#246#246#246#245#245#245#246#246#246#246#246#246#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#246#246#246#247#247#247
+  +#247#247#247#247#247#247#246#246#246#246#246#246#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#156#156#156#156#156
+  +#156#156#156#156#155#155#155#155#155#155#155#155#155#155#155#155#154#154#154
+  +#154#154#154#153#153#153#153#153#153#152#152#152#157#158#158#164#169#169#178
+  +#187#187#195#211#211#22#18#158#22#18#158#22#18#158'DG'#176#203#223#223#189
+  +#204#204#179#190#190#174#184#184#178#189#189#186#201#204#195#222#246'Zb'#193
+  +#22#18#158#22#18#158#22#18#158',+'#169#179#206#245#161#187#241#148#173#238
+  +#141#165#237#141#165#237#149#174#238#161#187#241#175#202#244'U]'#192#22#18
+  +#158#22#18#158#22#18#158#22#18#158'79'#175'my'#204'my'#204'RT'#182#22#18#158
+  +#22#18#158#22#18#158#22#18#158'99'#170#197#209#209#185#194#194#178#184#184
+  +#177#182#182#172#179#188#151#159#195'~'#134#196#22#18#158#22#18#158#22#18#158
+  +'-,'#167#22#18#158#22#18#158'99'#171'DF'#175'99'#171#22#18#158#22#18#158#22
+  +#18#158#22#18#158'-,'#166'py'#191#22#18#158#22#18#158'!'#30#162'BF'#180'BF'
+  +#181'!'#30#164#22#18#158#22#18#158#22#18#158#22#18#158#141#163#225#162#189
+  +#243#150#177#241#149#176#241#159#186#243#177#207#246'!'#31#164#22#18#158#22
+  +#18#158#22#18#158#187#216#249#164#191#244#145#171#241#131#157#239'}'#150#237
+  +'{'#148#237'{'#147#237'{'#147#237'z'#147#237'z'#147#237'z'#147#237'{'#147#237
+  +'{'#147#237'{'#148#237'{'#147#237'|'#148#237'{'#147#237'|'#148#237'~'#151#236
+  +#132#157#238#146#171#240#164#191#244#187#216#248#22#18#158#22#18#158#22#18
+  +#158#22#18#158#180#208#246#165#191#243#160#186#242#167#194#244#185#213#247#22
+  +#18#158#22#18#158#22#18#158'EG'#176'\a'#185#22#18#158#22#18#158#22#18#158#22
+  ,#18#158'EF'#176'EF'#176#22#18#158#22#18#158#22#18#158#22#18#158#22#18#158#22
+  +#18#158'99'#171#197#210#210#186#195#195#179#184#184#178#182#182#182#188#188
+  +#161#167#194#160#169#205';:'#172#22#18#158#22#18#158'FG'#176#199#210#210#189
+  +#195#195#181#185#185#180#184#184#185#189#189#194#202#202#194#204#212'::'#171
+  +#22#18#158#22#18#158#22#18#158'"'#31#163'`b'#186'w|'#195'lp'#191'/,'#168#22
+  +#18#158#22#18#158#22#18#158#22#18#158#142#147#200#206#214#214#199#203#203#193
+  +#195#195#190#192#192#192#194#194#197#201#201#205#212#212#201#210#219'<;'#172
+  +#22#18#158#22#18#158#22#18#158#22#18#158#22#18#158#22#18#158'0-'#169#22#18
+  +#158#22#18#158#22#18#158#22#18#158#169#177#222#218#229#242'HH'#180#22#18#158
+  +#22#18#158#22#18#158#22#18#158#22#18#158#22#18#158#22#18#158#22#18#158#22#18
+  +#158#22#18#158#22#18#158#172#175#219#221#228#238#224#231#240#177#182#222#22
+  +#18#158#22#18#158#22#18#158#22#18#158'tu'#196#130#131#202#129#130#201'>;'#174
+  +#22#18#158#22#18#158#228#231#231#225#227#227#224#225#225#223#223#223#222#222
+  +#222#223#223#223#224#224#224#225#225#225#225#225#225#226#226#226#226#226#226
+  +#228#229#229#231#232#232#234#237#237#185#187#222#22#18#158#22#18#158#22#18
+  +#158'NL'#181#244#249#249#241#245#245#238#240#240#236#237#237#234#236#236#234
+  +#235#235#234#235#235#233#234#234#232#233#233#232#233#233#234#235#235#236#238
+  +#238#241#244#244'NL'#181#22#18#158#22#18#158#22#18#158#244#249#249#241#245
+  +#245#239#241#241#237#239#239#237#239#239#238#241#241#241#244#244#243#247#247
+  +'jh'#192#22#18#158#22#18#158#22#18#158#22#18#158#160#160#213#239#242#242#236
+  +#238#238#236#237#237#237#238#238#239#241#241#242#246#246#22#18#158#22#18#158
+  +#22#18#158'NL'#181#244#248#248#242#246#246#242#245#245#229#233#241'@='#175#22
+  +#18#158#22#18#158#22#18#158#174#175#219#241#244#244#239#241#241#237#238#238
+  +#235#236#236#235#235#235#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#236#236#236
+  +#235#235#235#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#245#245#245#244#244#244#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#157#157
+  +#157#156#156#156#156#156#156#156#156#156#155#155#155#155#155#155#155#155#155
+  +#155#155#155#154#154#154#154#154#154#153#153#153#153#153#153#156#157#157#165
+  +#170#170#178#187#187#195#211#211#21#16#161#21#16#161#21#16#161'CE'#178#195
+  +#213#213#179#190#190#167#174#174#160#166#166#162#170#174#168#191#231#181#208
+  +#245#187#213#243' '#29#166#21#16#161#21#16#161#21#16#161#156#178#231#168#194
+  +#243#152#177#240#143#167#238#140#164#237#143#168#238#152#177#240#163#189#242
+  +#176#203#245'r'#128#209#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21
+  +#16#161#21#16#161#21#16#161#21#16#161#21#16#161'[]'#183#188#198#207#188#196
+  +#196#180#185#185#174#178#178#174#179#179#172#178#187'+('#166#21#16#161#21#16
+  ,#161#21#16#161#21#16#161#150#162#207'88'#173#21#16#161#21#16#161#21#16#161#21
+  +#16#161#21#16#161#21#16#161#21#16#161#21#16#161#169#187#214#203#225#225'77'
+  +#172#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21
+  +#16#161'S['#193#169#197#245#153#180#242#144#170#240#144#171#241#155#182#243
+  +#174#203#246'AE'#183#21#16#161#21#16#161#21#16#161#149#171#227#169#198#245
+  +#150#177#242#136#161#239''#151#238'|'#148#237'{'#148#237'{'#148#237'{'#148
+  +#237'{'#147#237'{'#148#238'{'#148#237'{'#148#237'|'#148#237'|'#148#237'|'#148
+  +#237'|'#148#237'}'#149#237#128#152#238#136#161#239#151#176#242#171#198#245
+  +#160#183#232#21#16#161#21#16#161#21#16#161'AE'#183#177#205#246#163#188#243
+  +#159#184#242#167#193#244#185#213#247#21#16#161#21#16#161#21#16#161'DE'#178
+  +#210#229#229'\`'#186#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16
+  +#161#21#16#161#21#16#161#21#16#161#21#16#161'gk'#188#198#210#210#189#197#197
+  +#181#186#186#176#179#179#177#180#180#182#187#187'kl'#180#21#16#161#21#16#161
+  +#21#16#161#21#16#161',*'#169#196#205#205#187#192#192#180#183#183#178#180#180
+  +#180#183#183#188#193#193#196#204#204#193#204#212'EE'#177#21#16#161#21#16#161
+  +#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161'!'#30
+  +#165#141#147#201#207#215#215#200#205#205#194#197#197#190#192#192#188#189#189
+  +#190#191#191#193#195#195#200#204#204#206#213#213#202#210#219'mo'#192#21#16
+  +#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21
+  +#16#161#21#16#161#170#179#223#221#232#244'HG'#182#21#16#161#21#16#161#21#16
+  +#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21
+  +#16#161#172#176#220#220#227#238#222#229#239#226#233#239'qr'#195#21#16#161#21
+  +#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161
+  +#229#232#232#225#227#227#224#225#225#224#224#224#224#224#224#224#224#224#224
+  +#224#224#224#224#224#225#225#225#227#227#227#227#227#227#228#229#229#231#232
+  +#232#235#237#237#199#200#227#21#16#161#21#16#161#21#16#161#21#16#161#230#234
+  +#243#242#246#246#240#243#243#238#241#241#237#240#240#237#240#240#237#239#239
+  +#155#154#209#234#236#236#234#235#235#235#236#236#237#239#239#241#244#244'MJ'
+  +#183#21#16#161#21#16#161#21#16#161#245#249#249#244#248#248#242#246#246#241
+  +#245#245#241#245#245#242#246#246#188#190#226'><'#178#21#16#161#21#16#161#21
+  +#16#161#21#16#161'ig'#193#241#244#244#238#240#240#236#237#237#235#236#236#236
+  +#237#237#239#241#241#242#246#246#21#16#161#21#16#161#21#16#161'MK'#183#244
+  +#247#247#241#244#244#241#243#243#242#244#244#202#204#231'#'#31#166#21#16#161
+  +#21#16#161'"'#31#167#202#204#231#242#244#244#239#241#241#237#238#238#236#236
+  +#236#235#236#236#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  ,#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#158#158#158#158#158#158#157
+  +#157#157#157#157#157#157#157#157#156#156#156#156#156#156#155#155#155#155#155
+  +#155#154#154#154#153#153#153#153#153#153#157#158#158#165#170#170#178#187#187
+  +#195#211#211#19#15#163#19#15#163#19#15#163'BD'#179#190#206#206#172#182#182
+  +#158#164#164#151#154#154#148#168#222#157#181#240#172#197#243#189#217#247'dn'
+  +#201#19#15#163#19#15#163#19#15#163'jv'#205#173#200#244#156#181#240#144#168
+  +#238#138#163#237#140#164#237#145#170#238#153#177#240#163#188#242#172#199#244
+  +#162#186#235'S['#195#19#15#163#19#15#163#19#15#163#19#15#163#19#15#163#19#15
+  +#163'OP'#182#158#166#202#197#207#207#189#197#197#181#186#186#175#178#178#172
+  +#175#175#173#177#177#179#185#185#146#151#188#19#15#163#19#15#163#19#15#163#19
+  +#15#163#158#171#208#191#207#216'X\'#184#19#15#163#19#15#163#19#15#163#19#15
+  +#163#19#15#163'*)'#170#161#176#203#189#206#206#185#202#202#176#191#200'hn'
+  +#184#30#27#166#19#15#163#19#15#163#19#15#163#19#15#163'))'#174'o}'#210#170
+  +#198#246#156#184#243#145#170#241#139#164#240#141#166#240#151#178#242#169#198
+  +#246'iv'#206#19#15#163#19#15#163#19#15#163'bm'#202#178#207#247#157#184#244
+  +#141#167#241#131#156#239'~'#151#238'|'#149#238'|'#149#238'|'#148#238'|'#149
+  +#238'|'#148#238'|'#149#238'|'#149#238'}'#149#238'}'#149#238'}'#149#238'}'#149
+  +#238#128#152#238#132#157#238#142#167#240#157#184#243#178#206#247'bm'#201#19
+  +#15#163#19#15#163#19#15#163'`j'#201#173#199#245#159#185#243#157#183#242#168
+  +#193#244#185#213#248#19#15#163#19#15#163#19#15#163'CE'#180#210#230#230#210
+  +#228#228#159#171#208'BC'#178#19#15#163#19#15#163#19#15#163#19#15#163#19#15
+  +#163#19#15#163'OQ'#182#158#166#203#196#207#207#190#197#197#182#187#187#177
+  +#180#180#174#177#177#177#179#179#182#186#186#191#198#198'*'''#169#19#15#163
+  +#19#15#163#19#15#163#19#15#163#192#199#199#185#189#189#179#181#181#177#178
+  +#178#177#179#179#182#185#185#189#194#194#196#203#203#204#213#213#138#143#199
+  +'87'#175#19#15#163#19#15#163#19#15#163#19#15#163#19#15#163#31#29#167']_'#187
+  +#187#195#214#206#213#213#200#206#206#195#198#198#191#193#193#188#189#189#188
+  +#189#189#189#189#189#191#192#192#196#198#198#201#205#205#206#212#212#213#221
+  +#221#170#175#212'ac'#191' '#29#168#19#15#163#19#15#163#19#15#163#19#15#163#19
+  +#15#163#19#15#163'-+'#174#181#190#228#219#230#243'FF'#184#19#15#163#19#15#163
+  +#19#15#163#19#15#163#19#15#163#19#15#163#19#15#163#19#15#163#19#15#163#19#15
+  +#163#19#15#163#170#174#219#219#224#236#220#225#230#224#228#228#228#232#232
+  +#165#167#213'.+'#173#19#15#163#19#15#163#19#15#163#19#15#163#19#15#163' '#29
+  +#168'HF'#181#228#231#231#227#229#229#224#225#225#225#225#225#225#225#225#225
+  +#225#225#225#225#225#226#226#226#226#226#226#227#227#227#227#227#227#229#229
+  +#229#232#233#233#234#236#236#239#242#242'/,'#174#19#15#163#19#15#163#19#15
+  +#163'ZX'#190#230#234#244#243#247#247#242#245#245#241#244#244#198#200#228'JH'
+  +#183'JG'#182#236#237#237#235#236#236#235#236#236#237#239#239#241#244#244'LJ'
+  +#185#19#15#163#19#15#163#19#15#163#132#132#206#132#132#206#132#132#206#131
+  +#132#206'vv'#201'/,'#174#19#15#163#19#15#163#19#15#163#19#15#163#19#15#163'K'
+  +'I'#184#227#231#240#239#241#241#236#238#238#235#235#235#236#236#236#237#238
+  +#238#239#241#241#243#246#246#19#15#163#19#15#163#19#15#163'LJ'#185#243#246
+  +#246#240#242#242#239#241#241#240#241#241#242#244#244#188#189#226#19#15#163#19
+  +#15#163#19#15#163'!'#30#168#229#232#241#240#242#242#238#239#239#237#237#237
+  +#236#236#236#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#239#239#239#238#238#238#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  ,#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#159#159#159#159#159#159#158#158
+  +#158#158#158#158#157#157#157#157#157#157#156#156#156#156#156#156#155#155#155
+  +#155#155#155#154#154#154#153#153#153#157#158#158#165#170#170#178#187#187#195
+  +#211#211#18#14#165#18#14#165#18#14#165'AC'#181#189#204#204#169#178#178#156
+  +#160#160#145#160#204#142#167#238#151#176#240#165#190#243#184#211#247#145#163
+  +#223#18#14#165#18#14#165#18#14#165'kw'#207#177#203#245#158#184#242#146#170
+  +#239#139#163#238#138#162#237#141#164#238#144#169#239#151#176#240#158#184#242
+  +#166#193#243#173#200#245#179#206#246#141#161#226#142#162#226#142#162#226#141
+  +#160#226#173#195#235#198#208#208#193#201#201#187#194#194#181#185#185#175#178
+  +#178#171#173#173#170#171#171#171#174#174#175#179#179#181#188#188#187#195#195
+  +#190#200#200#192#203#203#191#203#203#189#201#201#188#200#200#187#200#200#178
+  +#191#201#148#158#195#148#159#197#148#159#197#156#167#196#182#196#196#177#189
+  +#189#171#182#182#169#179#179#170#181#181#173#185#185#178#192#192#138#159#226
+  +#140#161#226#140#161#227#149#171#231#173#201#246#165#193#245#155#181#243#146
+  +#171#241#138#163#240#135#159#239#137#163#240#147#173#242#164#191#245#154#177
+  +#232#18#14#165#18#14#165#18#14#165#28#27#170#176#204#244#167#195#246#149#176
+  +#243#136#162#240#130#154#240'~'#150#238'}'#150#239'|'#149#238'}'#149#239'}'
+  +#149#239'}'#149#238'}'#149#238'}'#150#238'}'#149#238'~'#150#238''#152#238
+  +#130#154#239#137#162#240#149#175#242#167#195#245#188#217#249#28#27#170#18#14
+  +#165#18#14#165#18#14#165#156#178#233#166#193#245#156#181#243#156#181#242#166
+  +#192#244#185#213#247#18#14#165#18#14#165#18#14#165'BD'#181#210#228#228#200
+  +#215#215#196#208#208#195#207#207#186#197#206#156#164#201#157#165#203#157#166
+  +#204#157#166#204#201#213#213#198#208#208#193#201#201#187#194#194#181#185#185
+  +#178#180#180#174#176#176#174#175#175#177#179#179#180#183#183#187#192#192#194
+  +#202#202#199#208#208#201#211#211#200#209#209#195#203#203#188#194#194#183#186
+  +#186#178#180#180#176#177#177#176#177#177#179#181#181#184#187#187#188#193#193
+  +#194#200#200#200#208#208#204#213#213#184#192#211#162#168#206#163#169#207#163
+  +#170#207#174#181#209#208#217#217#206#213#213#203#209#209#198#203#203#194#197
+  +#197#191#193#193#190#190#190#188#188#188#187#187#187#189#189#189#190#190#190
+  +#193#194#194#196#198#198#201#204#204#206#211#211#212#219#219#219#228#228#227
+  +#238#238#188#197#226'GG'#184#18#14#165#18#14#165#18#14#165#136#141#207#222
+  +#232#237#216#225#238#214#224#240#218#229#242#224#236#246#230#242#249'GG'#186
+  +#18#14#165#18#14#165'HG'#186#233#243#249#233#242#248#228#237#245#223#231#241
+  +#221#227#237#219#223#230#218#220#221#219#221#221#221#223#223#223#226#226#227
+  +#230#230#230#234#234#192#195#223#179#182#219#180#183#220#180#183#220#193#195
+  +#223#231#235#235#230#233#233#227#229#229#226#227#227#225#226#226#224#225#225
+  +#225#225#225#225#225#225#225#225#225#227#227#227#228#228#228#228#228#228#229
+  +#229#229#230#230#230#231#232#232#234#235#235#237#240#240#171#172#219#18#14
+  +#165#18#14#165#18#14#165#18#14#165#31#29#170'JI'#186'JI'#186'-+'#175#18#14
+  +#165#18#14#165'JG'#184#237#239#239#236#237#237#236#237#237#237#239#239#240
+  +#243#243'KI'#186#18#14#165#18#14#165#18#14#165#18#14#165#18#14#165#18#14#165
+  +#18#14#165#18#14#165#18#14#165#18#14#165#18#14#165#18#14#165#18#14#165'uu'
+  +#201#242#245#245#240#242#242#238#239#239#236#237#237#235#235#235#235#235#235
+  +#237#237#237#239#240#240#242#244#244#18#14#165#18#14#165#18#14#165'.+'#175
+  +#242#245#245#240#241#241#238#240#240#238#240#240#240#241#241#242#245#245#159
+  +#160#217#18#14#165#18#14#165#18#14#165'<:'#180#228#230#239#240#241#241#237
+  +#238#238#237#237#237#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239#239#239
+  ,#239#239#239#239#239#238#238#238#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#159#159#159#159#159#159
+  +#159#159#159#158#158#158#158#158#158#157#157#157#157#157#157#156#156#156#155
+  +#155#155#155#155#155#154#154#154#153#153#153#157#158#158#165#170#170#178#187
+  +#187#194#210#210#16#13#168#16#13#168#16#13#168'@C'#183#189#204#204#169#178
+  +#178#154#170#209#143#168#238#143#167#238#151#175#240#165#190#242#182#209#246
+  +#156#176#229#16#13#168#16#13#168#16#13#168'>C'#189#178#204#245#161#185#242
+  +#147#171#239#139#163#237#137#161#237#139#163#238#141#164#239#144#168#239#149
+  +#173#240#154#179#241#159#185#242#164#189#243#167#193#244#168#194#244#168#194
+  +#244#167#193#243#164#189#243#177#190#211#184#188#188#180#183#183#175#177#177
+  +#173#174#174#170#171#171#170#170#170#170#172#172#172#175#175#175#179#179#178
+  +#183#183#179#186#186#179#186#186#179#186#186#176#183#183#175#182#182#175#183
+  +#183#175#184#184#177#186#186#177#187#187#175#185#185#172#181#181#166#175#175
+  +#162#169#169#159#165#165#156#162#162#157#164#164#159#167#167#163#171#171#161
+  +#189#244#164#191#245#164#191#245#161#188#244#156#182#244#150#176#243#144#169
+  +#242#138#163#241#133#158#240#131#157#240#134#159#240#143#169#242#158#185#244
+  +#177#206#247'25'#183#16#13#168#16#13#168#16#13#168'ky'#209#179#208#248#161
+  +#188#245#145#171#242#135#161#241#130#155#240#128#152#239'~'#150#239'}'#150
+  +#239'~'#150#239'~'#150#239'~'#150#239'~'#150#239'~'#150#239#128#152#239#132
+  +#156#240#136#160#240#145#171#241#160#187#244#179#208#248'ky'#209#16#13#168#16
+  +#13#168#16#13#168'''('#178#180#208#247#161#186#243#153#177#242#154#179#242
+  +#167#192#244#186#213#248#16#13#168#16#13#168#16#13#168'AD'#184#205#220#220
+  +#193#204#204#188#197#197#186#193#193#187#194#194#190#198#198#193#201#201#193
+  +#201#201#193#201#201#190#197#197#187#193#193#184#189#189#180#184#184#178#180
+  +#180#175#176#176#174#174#174#175#175#175#176#178#178#181#183#183#186#190#190
+  +#191#197#197#195#203#203#197#205#205#196#204#204#193#199#199#187#192#192#182
+  +#185#185#179#180#180#176#177#177#177#177#177#178#178#178#180#181#181#184#186
+  +#186#187#191#191#191#196#196#195#200#200#198#205#205#201#208#208#201#209#209
+  +#202#209#209#201#207#207#200#205#205#197#202#202#195#198#198#192#194#194#191
+  +#193#193#188#189#189#188#188#188#187#187#187#188#188#188#190#190#190#190#191
+  +#191#191#192#192#194#195#195#197#198#198#199#202#202#205#210#210#213#220#220
+  +#222#231#231#202#212#231#16#13#168#16#13#168#16#13#168'z'#204#226#235#235
+  +#219#225#225#214#218#218#212#217#219#216#222#230#222#231#239#230#241#247'FG'
+  +#188#16#13#168#16#13#168'FG'#188#233#243#248#228#236#243#223#230#235#221#225
+  +#228#219#222#222#218#220#220#217#218#218#217#218#218#218#220#220#221#222#222
+  +#223#225#225#226#228#228#227#230#230#228#231#231#229#232#232#230#233#233#230
+  +#233#233#229#231#231#228#230#230#226#227#227#226#227#227#226#226#226#225#225
+  +#225#226#226#226#226#226#226#226#226#226#228#228#228#228#228#228#229#229#229
+  +#230#230#230#230#230#230#231#232#232#233#234#234#236#238#238#239#242#242#157
+  +#158#216#16#13#168#16#13#168#16#13#168#16#13#168#16#13#168#16#13#168#16#13
+  ,#168#16#13#168#16#13#168'HG'#187#238#240#240#236#238#238#236#237#237#237#239
+  +#239#239#242#242'IG'#188#16#13#168#16#13#168#16#13#168#16#13#168#16#13#168#16
+  +#13#168#16#13#168#16#13#168#16#13#168#16#13#168#16#13#168'XW'#192#200#202#231
+  +#241#244#244#239#241#241#238#239#239#236#237#237#235#235#235#234#235#235#236
+  +#236#236#237#238#238#239#240#240#241#244#244#16#13#168#16#13#168#16#13#168#16
+  +#13#168#241#243#243#239#240#240#237#238#238#238#239#239#239#240#240#241#242
+  +#242#243#245#245'XW'#192#16#13#168#16#13#168#16#13#168'IG'#187#240#241#241
+  +#238#239#239#237#237#237#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239
+  +#239#239#239#239#238#238#238#239#239#239#238#238#238#239#239#239#238#238#238
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241#241
+  +#241#241#240#240#240#241#241#241#241#241#241#240#240#240#240#240#240#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#160#160#160#160#160
+  +#160#159#159#159#159#159#159#159#159#159#158#158#158#158#158#158#157#157#157
+  +#156#156#156#155#155#155#155#155#155#154#154#154#157#158#158#165#170#170#178
+  +#187#187#195#211#211#15#12#170#15#12#170#15#12#170'?B'#184#188#203#203#168
+  +#184#206#153#178#241#145#169#239#146#169#239#154#179#241#168#194#244#187#214
+  +#247#132#149#221#15#12#170#15#12#170#15#12#170'jw'#210#178#204#246#159#185
+  +#242#147#172#240#140#165#238#138#161#238#137#161#238#138#162#238#140#164#239
+  +#142#166#239#145#168#239#148#172#240#150#175#241#152#178#241#154#179#241#154
+  +#179#241#153#177#241#150#175#241#151#173#233#177#179#179#175#176#176#173#174
+  +#174#171#171#171#170#170#170#170#170#170#170#171#171#171#172#172#172#174#174
+  +#172#174#174#172#175#175#171#174#174#169#173#173#167#171#171#166#169#169#164
+  +#168#168#165#169#169#164#169#169#164#169#169#162#167#167#160#164#164#156#160
+  +#160#152#155#155#149#152#152#148#150#150#148#150#150#149#153#153#149#159#177
+  +#147#173#242#148#174#242#148#174#242#146#171#242#143#169#241#140#165#241#136
+  +#161#240#133#158#240#131#155#239#130#154#239#133#157#240#140#165#241#151#178
+  +#243#169#196#246'{'#140#219#15#12#170#15#12#170#15#12#170#26#25#175#158#182
+  +#235#174#202#247#158#185#245#145#170#243#136#161#241#132#156#241#128#153#240
+  +''#152#240'~'#151#239'~'#151#239''#151#239#128#152#239#129#153#239#131#156
+  +#240#137#162#241#145#171#242#158#184#244#175#202#247#170#195#240#26#25#175#15
+  +#12#170#15#12#170#15#12#170'}'#141#219#172#199#246#155#179#243#148#173#242
+  +#153#177#242#167#192#244#186#213#248#15#12#170#15#12#170#15#12#170'@C'#187
+  +#202#215#215#190#198#198#182#188#188#179#183#183#178#181#181#181#186#186#184
+  +#188#188#184#188#188#184#188#188#183#186#186#181#184#184#179#181#181#178#179
+  +#179#177#178#178#176#176#176#174#175#175#176#176#176#177#178#178#180#182#182
+  +#186#189#189#191#196#196#196#202#202#197#204#204#197#204#204#194#200#200#188
+  +#192#192#183#186#186#179#181#181#177#177#177#176#176#176#177#178#178#179#180
+  ,#180#181#182#182#183#184#184#185#187#187#188#191#191#190#193#193#192#196#196
+  +#193#197#197#194#197#197#193#196#196#193#196#196#191#194#194#190#192#192#190
+  +#190#190#188#189#189#188#188#188#188#188#188#190#190#190#190#190#190#191#191
+  +#191#191#191#191#192#192#192#193#193#193#195#195#195#197#199#199#202#204#204
+  +#209#214#214#218#226#226#161#167#217#15#12#170#15#12#170#15#12#170#217#227
+  +#236#222#230#230#215#220#220#210#213#213#210#213#213#214#217#217#221#227#227
+  +#229#237#237'FF'#188#15#12#170#15#12#170'FF'#188#231#238#238#225#230#230#220
+  +#223#223#218#220#220#217#218#218#217#217#217#216#216#216#216#217#217#217#218
+  +#218#219#220#220#221#222#222#223#224#224#224#225#225#224#226#226#225#227#227
+  +#226#228#228#226#228#228#227#228#228#226#227#227#225#225#225#226#226#226#225
+  +#225#225#227#227#227#227#227#227#227#227#227#227#227#227#228#228#228#229#229
+  +#229#229#229#229#230#230#230#230#230#230#231#231#231#234#234#234#235#236#236
+  +#237#239#239#240#242#242#199#201#231'ed'#198#15#12#170#15#12#170#15#12#170#15
+  +#12#170#15#12#170#29#27#175'HF'#188#155#155#215#237#239#239#236#237#237#236
+  +#236#236#236#237#237#239#240#240'dc'#197'HG'#188'IG'#189'IG'#189'IH'#189'IG'
+  +#189'IG'#189'IG'#189'IG'#189'fe'#199#158#159#218#214#217#236#242#245#245#241
+  +#243#243#239#241#241#238#239#239#237#237#237#236#236#236#235#236#236#235#235
+  +#235#236#236#236#236#237#237#238#239#239#240#242#242'HF'#188'HF'#188'HF'#188
+  +'HF'#188#240#242#242#239#240#240#238#238#238#237#238#238#238#238#238#239#240
+  +#240#241#242#242#228#229#239'WU'#193'HG'#188'HG'#188'HF'#188#155#155#215#239
+  +#240#240#238#238#238#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#239#239#239#238#238#238#238#238#238#238#238#238#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#162#162#162#161#161#161
+  +#160#160#160#160#160#160#159#159#159#159#159#159#158#158#158#157#157#157#157
+  +#157#157#156#156#156#155#155#155#154#154#154#157#159#159#165#170#170#178#187
+  +#187#195#211#211#13#10#172#13#10#172#13#10#172'=@'#186#190#211#222#172#197
+  +#245#158#183#242#152#177#241#154#178#241#164#188#243#177#204#246#195#222#249
+  +'U^'#202#13#10#172#13#10#172#13#10#172's'#129#215#175#201#246#158#184#243#147
+  +#171#241#141#164#239#138#162#239#138#162#239#138#162#239#138#162#239#139#162
+  +#239#139#164#239#140#165#240#142#166#240#143#167#240#144#167#240#144#167#240
+  +#142#167#240#141#166#240#140#164#240#161#170#200#174#174#174#173#174#174#172
+  +#172#172#171#171#171#171#171#171#170#171#171#170#170#170#170#170#170#168#169
+  +#169#168#169#169#166#167#167#165#166#166#163#164#164#161#162#162#159#160#160
+  +#157#159#159#156#158#158#156#158#158#154#156#156#152#154#154#150#151#151#147
+  +#147#147#145#146#146#144#144#144#143#144#144#143#145#145#141#149#169#137#162
+  ,#241#137#162#241#137#162#241#137#161#241#136#160#241#133#159#241#132#156#240
+  +#131#155#240#130#154#240#130#154#240#131#156#240#136#162#241#146#172#243#160
+  +#187#245#178#207#248';@'#192#13#10#172#13#10#172#13#10#172'03'#187#179#206
+  +#245#173#201#247#159#186#245#147#174#243#140#166#242#135#161#241#133#158#241
+  +#131#156#241#131#156#241#132#156#241#134#158#241#136#161#241#141#166#242#148
+  +#175#243#159#186#245#174#201#247#179#206#245'03'#187#13#10#172#13#10#172#13
+  +#10#172'03'#187#181#208#248#163#188#244#149#173#242#145#168#241#152#176#242
+  +#166#192#245#187#214#248#13#10#172#13#10#172#13#10#172'>A'#190#202#214#214
+  +#189#196#196#180#184#184#175#177#177#175#176#176#176#178#178#178#179#179#178
+  +#180#180#179#180#180#178#179#179#177#178#178#178#178#178#177#177#177#176#177
+  +#177#176#176#176#176#176#176#176#176#176#178#178#178#182#184#184#188#191#191
+  +#193#198#198#199#207#207#155#161#201#166#172#203#197#205#205#191#196#196#186
+  +#189#189#181#182#182#178#179#179#178#178#178#178#178#178#179#179#179#179#180
+  +#180#181#181#181#183#183#183#184#184#184#185#187#187#186#187#187#186#187#187
+  +#188#189#189#188#189#189#188#189#189#188#189#189#187#188#188#188#188#188#188
+  +#188#188#189#189#189#189#189#189#190#190#190#190#190#190#192#192#192#192#192
+  +#192#193#193#193#194#194#194#194#194#194#196#197#197#200#202#202#207#211#211
+  +#215#222#222'wz'#203#13#10#172#13#10#172#13#10#172#229#239#239#221#228#228
+  +#214#218#218#209#212#212#210#212#212#214#217#217#221#226#226#230#238#238'DD'
+  +#190#13#10#172#13#10#172'DD'#190#228#234#234#222#226#226#217#219#219#215#216
+  +#216#215#216#216#216#216#216#215#216#216#216#216#216#217#218#218#219#219#219
+  +#220#220#220#221#222#222#222#222#222#223#224#224#223#224#224#224#224#224#225
+  +#225#225#225#226#226#225#225#225#225#225#225#225#225#225#227#227#227#227#227
+  +#227#228#228#228#228#228#228#229#229#229#229#229#229#230#230#230#230#230#230
+  +#231#231#231#231#231#231#231#231#231#233#233#233#234#234#234#236#237#237#237
+  +#239#239#240#241#241#241#243#243#242#245#245#200#201#231#186#187#227#186#187
+  +#227#213#216#236#241#244#244#240#242#242#239#240#240#237#238#238#236#237#237
+  +#236#236#236#236#237#237#237#238#238#239#240#240#240#242#242#241#243#243#242
+  +#245#245#243#245#245#243#245#245#243#245#245#242#245#245#242#245#245#242#244
+  +#244#241#243#243#240#242#242#239#241#241#238#239#239#238#239#239#237#238#238
+  +#237#237#237#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237#238
+  +#238#238#239#240#240#240#242#242#241#242#242#241#242#242#240#242#242#239#240
+  +#240#238#238#238#237#237#237#237#237#237#238#238#238#239#239#239#240#241#241
+  +#241#242#242#241#243#243#242#243#243#241#243#243#241#242#242#239#240#240#238
+  +#239#239#238#238#238#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  ,#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#162#162#162#162#162#162
+  +#162#162#162#161#161#161#160#160#160#160#160#160#159#159#159#158#158#158#158
+  +#158#158#157#157#157#155#155#155#154#154#154#157#159#159#166#171#171#178#187
+  +#187#195#211#211#12#9#174#12#9#174#12#9#174'=@'#189#195#223#249#179#205#246
+  +#168#193#244#163#188#243#166#191#244#176#202#246#190#217#248#168#190#237#12#9
+  +#174#12#9#174#12#9#174#12#9#174#156#177#234#171#196#245#156#180#242#146#170
+  +#240#140#164#239#139#163#239#139#163#239#139#162#239#139#163#240#139#163#240
+  +#139#162#240#138#162#239#138#162#240#139#163#240#139#163#240#139#162#240#139
+  +#162#240#137#161#240#137#161#240#141#162#231#173#173#173#173#173#173#173#173
+  +#173#173#173#173#172#172#172#171#171#171#170#170#170#169#169#169#168#168#168
+  +#167#167#167#165#165#165#163#163#163#161#161#161#159#159#159#156#156#156#154
+  +#154#154#153#153#153#152#152#152#150#150#150#149#149#149#147#147#147#145#145
+  +#145#144#144#144#143#143#143#142#142#142#141#141#141#137#146#177#133#157#240
+  +#133#157#240#133#157#240#132#157#240#131#156#240#131#155#240#131#155#240#131
+  +#155#240#130#155#240#130#155#240#131#155#240#134#158#241#141#165#242#153#179
+  +#244#168#195#247#152#175#235#24#23#179#12#9#174#12#9#174#12#9#174'.2'#188#179
+  +#207#245#176#205#248#165#192#246#155#181#245#148#174#244#144#170#243#142#167
+  +#242#141#167#242#142#168#242#144#169#243#149#175#243#156#182#245#165#192#246
+  +#177#205#248#180#207#245'/3'#188#12#9#174#12#9#174#12#9#174#24#23#179#154#176
+  +#235#170#196#246#155#180#244#145#168#242#143#166#242#152#175#243#167#192#245
+  +#188#214#248#12#9#174#12#9#174#12#9#174'=A'#193#202#214#214#189#196#196#181
+  +#184#184#175#176#176#173#173#173#174#175#175#175#176#176#176#177#177#177#178
+  +#178#177#177#177#178#178#178#178#178#178#178#178#178#178#178#178#179#179#179
+  +#179#179#179#179#179#179#181#181#181#185#186#186#191#194#194#198#204#204'<<'
+  +#184#12#9#174#12#9#174'_b'#191#196#202#202#189#193#193#184#186#186#180#181
+  +#181#179#179#179#179#179#179#180#180#180#180#180#180#181#181#181#181#181#181
+  +#182#182#182#183#183#183#183#184#184#184#185#185#184#185#185#186#187#187#186
+  +#186#186#187#187#187#187#187#187#188#188#188#189#189#189#190#190#190#190#190
+  +#190#191#191#191#191#191#191#193#193#193#193#193#193#194#194#194#195#195#195
+  +#195#195#195#197#197#197#201#202#202#207#210#210#214#220#220#144#149#211#12#9
+  +#174#12#9#174#12#9#174#216#226#236#223#231#231#217#222#222#213#216#216#213
+  +#216#216#217#221#221#224#230#230#232#240#240#12#9#174#12#9#174#12#9#174'DC'
+  +#191#227#232#232#221#224#224#217#218#218#215#215#215#215#215#215#216#216#216
+  +#216#216#216#217#217#217#218#218#218#219#219#219#220#220#220#221#221#221#221
+  +#221#221#222#222#222#222#222#222#223#223#223#224#224#224#225#225#225#225#225
+  +#225#226#226#226#226#226#226#227#227#227#228#228#228#228#228#228#228#228#228
+  +#229#229#229#230#230#230#231#231#231#231#231#231#232#232#232#232#232#232#232
+  +#232#232#233#233#233#234#234#234#235#236#236#236#237#237#237#238#238#238#239
+  +#239#239#241#241#240#241#241#240#242#242#240#242#242#240#241#241#240#241#241
+  +#239#240#240#238#239#239#237#237#237#236#236#236#236#236#236#236#236#236#237
+  +#237#237#238#238#238#238#240#240#239#240#240#239#241#241#240#241#241#240#241
+  +#241#240#241#241#239#241#241#239#241#241#239#240#240#239#240#240#239#240#240
+  +#238#239#239#237#238#238#237#237#237#236#237#237#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#237#237#237#237#237#237#239#239#239#239#240
+  +#240#239#240#240#240#241#241#239#240#240#239#239#239#238#238#238#238#238#238
+  +#237#237#237#237#237#237#238#238#238#238#239#239#239#240#240#239#240#240#240
+  +#241#241#241#241#241#239#240#240#239#239#239#239#239#239#239#239#239#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  ,#244#244#244#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#163#163#163#163#163#163#162#162#162#162#162#162#161
+  +#161#161#160#160#160#160#160#160#159#159#159#158#158#158#157#157#157#156#156
+  +#156#154#154#154#157#159#159#166#171#171#178#188#188#195#211#211#10#8#177#10
+  +#8#177#10#8#177';@'#195#205#233#251#191#217#249#182#208#247#179#204#246#182
+  +#209#247#192#219#248#167#189#237#22#22#182#10#8#177#10#8#177#10#8#177':?'#195
+  +#182#208#247#166#191#244#152#177#242#145#169#241#141#165#240#140#163#240#140
+  +#163#240#140#164#240#140#163#240#139#163#240#139#163#240#139#163#240#139#163
+  +#240#139#162#240#139#162#240#138#162#240#138#162#240#138#162#240#138#162#240
+  +#138#161#240#160#169#198#174#174#174#174#174#174#174#174#174#173#173#173#172
+  +#172#172#171#171#171#170#170#170#170#170#170#168#168#168#166#166#166#164#164
+  +#164#162#162#162#160#160#160#158#158#158#155#155#155#153#153#153#152#152#152
+  +#151#151#151#149#149#149#148#148#148#147#147#147#145#145#145#144#144#144#143
+  +#143#143#142#142#142#137#149#191#133#157#241#133#157#241#132#157#241#132#156
+  +#241#132#156#241#132#156#241#132#156#241#131#156#241#131#155#241#131#155#241
+  +#131#155#241#133#157#241#137#162#242#145#170#243#157#184#245#172#200#247'z'
+  +#139#222#10#8#177#10#8#177#10#8#177#10#8#177#22#22#182#149#170#232#184#212
+  +#249#174#202#248#166#194#247#161#188#246#158#185#245#156#183#245#158#185#245
+  +#161#188#246#166#194#246#175#202#248#183#212#249#148#170#232'"$'#186#10#8#177
+  +#10#8#177#10#8#177#10#8#177'{'#140#222#174#201#247#160#184#244#148#172#242
+  +#141#164#241#142#165#241#151#175#243#168#193#245#188#215#249#10#8#177#10#8
+  +#177#10#8#177':@'#196#201#215#219#191#197#197#181#184#184#177#177#177#175#175
+  +#175#176#176#176#177#177#177#178#178#178#178#178#178#179#179#179#179#179#179
+  +#180#180#180#180#180#180#180#180#180#181#181#181#181#181#181#181#181#181#183
+  +#184#184#186#189#189#193#197#197#165#171#203#10#8#177#10#8#177#10#8#177#10#8
+  +#177#199#206#206#191#195#195#185#187#187#182#182#182#180#180#180#181#181#181
+  +#180#180#180#181#181#181#182#182#182#182#182#182#182#182#182#184#184#184#184
+  +#184#184#185#185#185#186#186#186#186#186#186#187#187#187#188#188#188#189#189
+  +#189#189#189#189#190#190#190#191#191#191#191#191#191#192#192#192#193#193#193
+  +#194#194#194#195#195#195#195#195#195#195#195#195#196#196#196#198#198#198#201
+  +#202#202#206#208#208#214#219#219#183#189#221#10#8#177#10#8#177#10#8#177#134
+  +#139#213#228#236#236#223#229#229#220#225#225#220#225#225#224#229#229#230#237
+  +#237#150#155#218#10#8#177#10#8#177#10#8#177'lm'#204#226#231#231#220#223#223
+  +#217#218#218#216#216#216#216#216#216#217#217#217#217#217#217#218#218#218#218
+  +#218#218#219#219#219#221#221#221#221#221#221#221#221#221#222#222#222#223#223
+  +#223#224#224#224#225#225#225#226#226#226#226#226#226#227#227#227#227#227#227
+  +#228#228#228#229#229#229#229#229#229#229#229#229#230#230#230#230#230#230#231
+  +#231#231#231#231#231#232#232#232#232#232#232#233#233#233#234#234#234#234#234
+  +#234#235#236#236#236#236#236#236#237#237#237#237#237#237#238#238#238#239#239
+  +#238#239#239#238#239#239#238#239#239#237#238#238#237#237#237#236#237#237#236
+  +#236#236#236#236#236#235#236#236#236#237#237#237#237#237#237#238#238#238#238
+  +#238#238#238#238#238#239#239#238#239#239#238#239#239#238#239#239#238#239#239
+  +#238#239#239#238#238#238#237#238#238#237#237#237#237#237#237#236#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#238#238#238#238#238#238#238#238#238#239#239#238#239#239
+  +#238#238#238#238#238#238#237#238#238#237#237#237#238#238#238#238#238#238#238
+  +#238#238#239#239#239#239#239#239#239#240#240#239#240#240#239#240#240#239#239
+  +#239#239#239#239#239#239#239#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  ,#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#165
+  +#165#165#164#164#164#163#163#163#162#162#162#162#162#162#161#161#161#160#160
+  +#160#160#160#160#158#158#158#157#157#157#156#156#156#155#155#155#157#159#159
+  +#165#170#170#178#187#187#194#209#209#9#7#179#9#7#179#9#7#179':@'#197#206#233
+  +#251#203#229#251#196#223#249#194#221#249#174#198#241'jx'#215#20#21#184#9#7
+  +#179#9#7#179#9#7#179#9#7#179#156#177#236#174#199#246#160#184#244#150#174#242
+  +#144#167#240#141#165#241#141#165#241#141#164#241#141#164#241#140#164#241#140
+  +#164#241#140#164#241#140#164#241#140#163#241#139#163#241#139#163#241#139#163
+  +#241#139#163#241#139#162#241#139#162#241#138#162#241#143#163#232#174#174#174
+  +#174#174#174#174#174#174#174#174#174#174#174#174#173#173#173#172#172#172#171
+  +#171#171#169#169#169#168#168#168#166#166#166#164#164#164#162#162#162#159#159
+  +#159#157#157#157#155#155#155#153#153#153#152#152#152#150#150#150#149#149#149
+  +#147#147#147#146#146#146#145#145#145#144#144#144#143#143#143#137#151#197#133
+  +#157#241#133#157#241#133#157#241#133#157#241#133#157#242#133#157#242#133#157
+  +#242#132#156#241#132#157#242#132#156#242#132#156#242#133#157#242#135#159#242
+  +#139#165#243#148#174#244#160#186#246#175#202#248'z'#139#223#9#7#179#9#7#179#9
+  +#7#179#9#7#179#9#7#179'8?'#197#147#169#233#186#215#250#181#209#249#177#206
+  +#248#176#205#248#177#205#248#181#209#249#185#214#249#147#168#232'P['#206#9#7
+  +#179#9#7#179#9#7#179#9#7#179#9#7#179'{'#140#223#177#204#248#163#188#245#150
+  +#175#244#143#166#242#138#162#242#143#166#242#153#177#244#170#196#246#190#217
+  +#249#9#7#179#9#7#179#9#7#179':?'#197#198#214#228#191#198#198#183#186#186#179
+  +#179#179#176#176#176#178#178#178#179#179#179#180#180#180#180#180#180#181#181
+  +#181#181#181#181#181#181#181#182#182#182#182#182#182#182#182#182#182#182#182
+  +#182#182#182#184#185#185#188#190#190#194#199#199#178#184#205#9#7#179#9#7#179
+  +#9#7#179#21#20#181#200#207#207#192#196#196#186#188#188#183#183#183#181#181
+  +#181#182#182#182#182#182#182#182#182#182#182#182#182#183#183#183#183#183#183
+  +#184#184#184#185#185#185#186#186#186#186#186#186#187#187#187#189#189#189#189
+  +#189#189#190#190#190#190#190#190#191#191#191#191#191#191#192#192#192#193#193
+  +#193#194#194#194#194#194#194#195#195#195#196#196#196#196#196#196#197#197#197
+  +#199#199#199#201#202#202#206#208#208#212#216#216#220#227#227'$$'#186#9#7#179
+  +#9#7#179#22#22#183#191#198#230#229#237#237#227#234#234#228#234#234#231#238
+  +#238#191#198#231#22#22#183#9#7#179#9#7#179#9#7#179#188#194#226#225#229#229
+  +#220#222#222#217#218#218#215#216#216#217#217#217#218#218#218#218#218#218#219
+  +#219#219#220#220#220#220#220#220#222#222#222#222#222#222#222#222#222#223#223
+  +#223#224#224#224#225#225#225#225#225#225#226#226#226#226#226#226#227#227#227
+  +#228#228#228#229#229#229#230#230#230#230#230#230#230#230#230#231#231#231#231
+  ,#231#231#232#232#232#233#233#233#233#233#233#233#233#233#233#233#233#234#234
+  +#234#234#234#234#235#235#235#235#235#235#235#236#236#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#236
+  +#237#237#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237
+  +#237#236#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#237#238#238#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239#239#239#240
+  +#240#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#166#166#166#165#165#165#164#164#164#163#163#163#162#162#162#162#162
+  +#162#161#161#161#160#160#160#159#159#159#158#158#158#156#156#156#155#155#155
+  +#158#159#159#164#169#169#176#184#184#191#206#206#7#6#181#7#6#181#7#6#181#19
+  +#19#185'9>'#199'9>'#199'9>'#199' "'#190#7#6#181#7#6#181#7#6#181#7#6#181#7#6
+  +#181#7#6#181'{'#139#224#179#205#247#166#190#245#154#179#243#147#172#242#143
+  +#167#241#142#165#241#142#165#241#142#165#241#141#165#241#141#165#241#141#165
+  +#241#141#164#241#140#164#241#140#164#241#140#164#241#140#164#241#140#163#241
+  +#140#164#241#139#163#241#139#163#241#139#163#241#139#163#242#161#170#200#174
+  +#174#174#175#175#175#175#175#175#174#174#174#174#174#174#173#173#173#172#172
+  +#172#171#171#171#169#169#169#167#167#167#166#166#166#163#163#163#160#160#160
+  +#158#158#158#156#156#156#154#154#154#153#153#153#151#151#151#150#150#150#148
+  +#148#148#147#147#147#146#146#146#145#145#145#144#144#144#137#154#217#134#158
+  +#242#134#158#242#134#158#242#134#158#242#134#158#242#134#158#242#133#158#242
+  +#133#158#242#133#157#242#133#157#242#133#157#242#132#157#242#133#159#242#136
+  +#160#243#141#166#243#150#175#245#162#188#246#175#203#248#132#151#228#19#20
+  +#185#7#6#181#7#6#181#7#6#181#7#6#181#7#6#181#19#19#185'CK'#203'es'#216'es'
+  +#216'es'#216'CK'#203#31'!'#190#7#6#181#7#6#181#7#6#181#7#6#181#7#6#181#19#20
+  +#185#133#151#228#177#204#248#163#190#246#152#177#245#145#168#242#140#163#242
+  +#139#162#241#145#168#242#156#180#244#174#199#247#194#221#250#7#6#181#7#6#181
+  +#7#6#181'9?'#199#192#214#239#193#199#199#184#187#187#180#180#180#177#177#177
+  +#179#179#179#180#180#180#181#181#181#182#182#182#181#181#181#182#182#182#183
+  +#183#183#183#183#183#183#183#183#183#183#183#183#183#183#183#183#183#185#185
+  ,#185#188#190#190#193#197#197#200#205#205'jn'#197#7#6#181#20#19#183#131#134
+  +#200#198#204#204#192#195#195#187#189#189#184#185#185#182#182#182#182#182#182
+  +#183#183#183#183#183#183#183#183#183#184#184#184#184#184#184#185#185#185#186
+  +#186#186#186#186#186#186#186#186#187#187#187#189#189#189#189#189#189#190#190
+  +#190#191#191#191#192#192#192#193#193#193#193#193#193#193#193#193#195#195#195
+  +#196#196#196#196#196#196#197#197#197#197#197#197#198#198#198#199#199#199#201
+  +#202#202#205#206#206#210#213#213#217#222#222#156#162#217#7#6#181#7#6#181#7#6
+  +#181#7#6#181'\_'#204#163#168#223#163#168#224'\_'#204#7#6#181#7#6#181#7#6#181
+  +#7#6#181'NO'#200#227#232#232#223#225#225#219#221#221#217#217#217#217#217#217
+  +#218#218#218#219#219#219#219#219#219#219#219#219#221#221#221#222#222#222#223
+  +#223#223#223#223#223#223#223#223#224#224#224#225#225#225#226#226#226#227#227
+  +#227#227#227#227#227#227#227#228#228#228#228#228#228#229#229#229#231#231#231
+  +#231#231#231#230#230#230#232#232#232#232#232#232#233#233#233#234#234#234#234
+  +#234#234#234#234#234#234#234#234#235#235#235#235#235#235#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#238#238#238#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#241#241#241#240#240#240#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#166#166#166#166#166#166#165
+  +#165#165#164#164#164#163#163#163#163#163#163#162#162#162#161#161#161#160#160
+  +#160#159#159#159#157#157#157#156#156#156#159#160#160#164#167#167#173#180#180
+  +#186#199#199#6#5#184#6#5#184#6#5#184#6#5#184#6#5#184#6#5#184#6#5#184#6#5#184
+  +#6#5#184#6#5#184#6#5#184#6#5#184#31'!'#192#145#165#233#180#206#248#168#193
+  +#246#157#182#244#150#175#243#146#169#242#144#167#242#143#166#242#142#166#242
+  +#142#166#242#142#166#242#142#165#242#142#165#242#141#165#242#141#165#242#141
+  +#165#242#141#165#242#141#164#242#140#164#242#140#164#242#140#164#242#140#164
+  +#242#140#164#242#140#164#242#144#165#234#176#176#176#175#175#175#176#176#176
+  +#175#175#175#175#175#175#174#174#174#173#173#173#171#171#171#171#171#171#168
+  ,#168#168#166#166#166#164#164#164#162#162#162#159#159#159#157#157#157#155#155
+  +#155#154#154#154#152#152#152#151#151#151#150#150#150#148#148#148#147#147#147
+  +#146#146#146#145#145#145#137#156#217#135#159#242#135#159#242#134#158#242#134
+  +#158#242#135#159#243#134#158#242#134#158#243#133#158#242#134#158#243#134#158
+  +#243#133#158#243#133#157#243#133#157#243#135#159#243#138#162#244#142#168#244
+  +#150#176#245#161#187#247#172#199#248#163#187#242'AJ'#204#6#5#184#6#5#184#6#5
+  +#184#6#5#184#6#5#184#6#5#184#6#5#184#6#5#184#6#5#184#6#5#184#6#5#184#6#5#184
+  +#6#5#184#6#5#184#6#5#184'6<'#200#163#187#241#174#201#248#163#188#246#152#177
+  +#244#146#170#243#141#164#243#138#162#242#140#162#242#148#170#243#159#183#245
+  +#177#202#248#197#223#251#6#5#184#6#5#184#6#5#184'8>'#201#187#211#249#179#195
+  +#225#170#182#215#164#175#211#162#172#210#171#176#195#172#177#196#173#178#196
+  +#177#180#189#183#183#183#183#183#183#183#183#183#183#183#183#184#184#184#184
+  +#184#184#184#184#184#184#184#184#185#186#186#188#189#189#191#193#193#196#200
+  +#200#200#205#205#202#208#208#202#208#208#199#204#204#195#198#198#190#192#192
+  +#186#187#187#184#184#184#183#183#183#184#184#184#184#184#184#184#184#184#184
+  +#184#184#184#184#184#186#186#186#186#186#186#186#186#186#187#187#187#188#188
+  +#188#189#189#189#189#189#189#191#191#191#191#191#191#191#191#191#193#193#193
+  +#193#193#193#194#194#194#195#195#195#196#196#196#196#196#196#197#197#197#198
+  +#198#198#198#198#198#199#199#199#200#200#200#201#201#201#204#205#205#208#210
+  +#210#213#217#217#221#227#227'Y\'#203#6#5#184#6#5#184#6#5#184#6#5#184#6#5#184
+  +#6#5#184#6#5#184#6#5#184#6#5#184#6#5#184'11'#194#216#221#232#225#228#228#222
+  +#224#224#219#220#220#217#217#217#218#218#218#218#218#218#219#219#219#220#220
+  +#220#220#220#220#222#222#222#223#223#223#224#224#224#224#224#224#225#225#225
+  +#225#225#225#226#226#226#227#227#227#228#228#228#228#228#228#228#228#228#229
+  +#229#229#230#230#230#231#231#231#231#231#231#231#231#231#231#231#231#232#232
+  +#232#233#233#233#233#233#233#234#234#234#234#234#234#234#234#234#235#235#235
+  +#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243
+  +#243#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  ,#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#168#168#168#167#167#167#166#166#166#165#165#165#164#164#164
+  +#164#164#164#163#163#163#162#162#162#161#161#161#159#159#159#158#158#158#157
+  +#157#157#158#159#159#163#165#165#170#175#175#180#190#190#4#3#186#4#3#186#4#3
+  +#186#4#3#186#4#3#186#4#3#186#4#3#186#4#3#186#4#3#186#4#3#186'5;'#202'{'#139
+  +#226#187#213#249#178#203#247#167#193#246#159#183#244#152#177#243#148#171#243
+  +#145#168#242#143#167#242#143#167#242#143#167#242#143#166#242#143#166#242#143
+  +#166#242#143#166#243#142#166#242#142#166#242#142#166#243#141#165#242#141#165
+  +#242#141#165#242#141#165#242#141#164#242#141#164#242#141#165#243#141#164#243
+  +#141#164#243#162#171#201#176#176#176#176#176#176#176#176#176#175#175#175#175
+  +#175#175#174#174#174#173#173#173#171#171#171#170#170#170#168#168#168#166#166
+  +#166#163#163#163#160#160#160#158#158#158#156#156#156#155#155#155#154#154#154
+  +#152#152#152#151#151#151#150#150#150#148#148#148#148#148#148#145#148#158#136
+  +#159#237#136#160#243#136#160#243#136#160#243#135#159#242#135#159#243#135#159
+  +#243#135#159#243#135#159#243#134#159#243#134#159#243#134#158#243#134#158#243
+  +#134#158#243#133#158#243#135#160#243#138#162#244#142#167#244#149#174#245#158
+  +#184#246#167#195#248#178#205#249#142#163#234'@I'#206#4#3#186#4#3#186#4#3#186
+  +#4#3#186#4#3#186#4#3#186#4#3#186#4#3#186#4#3#186#4#3#186#4#3#186'@I'#206#142
+  +#164#234#179#206#249#169#195#248#160#185#246#151#176#245#145#168#244#141#164
+  +#244#139#162#243#139#161#242#142#165#243#149#172#244#162#186#245#178#204#248
+  +#198#224#251#4#3#186#4#3#186#4#3#186'6<'#202#184#209#248#168#191#246#155#177
+  +#244#148#169#243#146#166#242#147#167#242#147#167#242#148#168#242#149#168#242
+  +#150#169#242#150#169#241#151#170#241#157#173#230#160#174#227#161#174#227#161
+  +#175#227#170#179#212#171#180#213#173#183#215#184#189#200#192#194#194#194#197
+  +#197#195#198#198#195#199#199#193#196#196#190#193#193#188#189#189#186#186#186
+  +#184#185#185#185#185#185#184#184#184#185#185#185#185#185#185#185#185#185#186
+  +#186#186#186#186#186#187#187#187#187#187#187#188#188#188#189#189#189#190#190
+  +#190#190#190#190#191#191#191#191#191#191#192#192#192#194#194#194#195#195#195
+  +#195#195#195#195#195#195#196#196#196#197#197#197#199#199#199#199#199#199#200
+  +#200#200#200#200#200#201#201#201#202#202#202#204#204#204#207#208#208#211#214
+  +#214#217#221#221#222#228#228#143#147#216#18#18#189#4#3#186#4#3#186#4#3#186#4
+  +#3#186#4#3#186#4#3#186#4#3#186'ik'#209#215#220#231#226#229#229#222#224#224
+  +#220#222#222#219#219#219#218#219#219#219#219#219#220#220#220#220#220#220#221
+  +#221#221#221#221#221#222#222#222#223#223#223#224#224#224#224#224#224#225#225
+  +#225#225#225#225#226#226#226#227#227#227#229#229#229#229#229#229#229#229#229
+  +#229#229#229#231#231#231#231#231#231#232#232#232#232#232#232#233#233#233#233
+  +#233#233#234#234#234#235#235#235#235#235#235#235#235#235#235#235#235#236#236
+  +#236#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#241#241#241#240#240#240#240#240#240#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#242#242#242#242#242#242#241#241#241#241#241#241#242#242
+  +#242#242#242#242#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  ,#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247
+  +#247#247#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#169#169#169#167#167#167#166#166#166#166#166#166#165#165
+  +#165#164#164#164#163#163#163#162#162#162#161#161#161#160#160#160#159#159#159
+  +#157#157#157#158#159#159#160#162#162#165#169#169#172#179#179#136#144#190#142
+  +#151#197#145#158#209#147#167#234#148#167#234#147#166#234#146#165#234#145#165
+  +#234#156#177#238#189#215#249#184#210#249#179#204#248#172#197#247#164#189#246
+  +#158#182#245#152#176#244#149#172#244#145#169#243#144#168#243#144#168#243#144
+  +#167#243#144#167#243#144#167#243#143#167#243#143#167#243#144#167#243#143#166
+  +#243#143#167#243#143#167#243#142#166#243#142#166#243#142#166#243#142#165#243
+  +#142#166#243#142#165#243#141#165#243#141#165#243#141#165#243#146#166#235#176
+  +#176#176#176#176#176#176#176#176#176#176#176#175#175#175#175#175#175#174#174
+  +#174#172#172#172#171#171#171#169#169#169#166#166#166#164#164#164#162#162#162
+  +#159#159#159#157#157#157#156#156#156#154#154#154#153#153#153#152#152#152#148
+  +#154#174#143#156#202#139#159#225#137#161#244#137#161#244#136#160#243#136#161
+  +#244#136#160#243#136#160#244#135#159#243#136#160#244#136#160#244#135#160#244
+  +#135#159#244#135#159#244#135#159#244#135#159#244#134#159#244#134#158#244#134
+  +#158#244#135#160#244#138#162#244#141#166#245#147#172#245#153#179#246#161#187
+  +#247#169#196#248#177#205#249#173#199#246'w'#136#227'Vc'#216'3:'#204'3:'#204
+  +'4:'#204'4:'#204'3:'#204'Vc'#216'w'#137#227#173#199#246#178#205#249#171#198
+  +#248#164#189#247#156#180#246#149#173#245#145#168#244#140#164#244#138#161#243
+  +#138#161#243#139#162#243#142#166#244#151#174#245#164#187#246#25#27#196#3#2
+  +#188#3#2#188#3#2#188#3#2#188'49'#204#179#204#248#165#188#245#155#176#244#149
+  +#169#243#147#167#243#148#167#242#148#168#242#149#169#242#149#169#242#150#170
+  +#242#151#170#242#151#170#242#152#171#242#153#171#242#154#172#242#155#173#242
+  +#155#173#242#157#174#241#158#176#241#168#181#228#188#189#189#189#191#191#190
+  +#192#192#190#192#192#189#190#190#187#188#188#187#187#187#186#186#186#184#184
+  +#184#185#185#185#185#185#185#185#185#185#186#186#186#186#186#186#187#187#187
+  +#187#187#187#188#188#188#189#189#189#189#189#189#190#190#190#190#190#190#191
+  +#191#191#191#191#191#192#192#192#193#193#193#194#194#194#195#195#195#195#195
+  +#195#196#196#196#197#197#197#199#199#199#199#199#199#199#199#199#201#201#201
+  +#201#201#201#202#202#202#203#203#203#205#205#205#206#207#207#209#210#210#213
+  +#215#215#217#220#220#222#226#226#211#217#228#144#148#218'gj'#210'<='#201'=>'
+  +#201'Z\'#208#131#134#216#201#206#229#227#232#232#225#228#228#222#224#224#221
+  +#222#222#219#220#220#219#219#219#218#218#218#220#220#220#221#221#221#222#222
+  +#222#222#222#222#222#222#222#223#223#223#224#224#224#225#225#225#226#226#226
+  +#226#226#226#227#227#227#227#227#227#228#228#228#229#229#229#229#229#229#229
+  +#229#229#230#230#230#231#231#231#232#232#232#232#232#232#233#233#233#233#233
+  +#233#233#233#233#235#235#235#236#236#236#236#236#236#236#236#236#236#236#236
+  +#237#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  ,#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#170#170#170#169#169#169#168#168#168#167#167#167
+  +#166#166#166#165#165#165#164#164#164#163#163#163#162#162#162#161#161#161#159
+  +#159#159#158#158#158#158#159#159#159#160#160#160#163#163#165#169#169#170#176
+  +#176#173#182#182#176#186#186#178#196#218#181#205#248#179#205#248#179#205#248
+  +#178#203#248#176#201#247#173#198#247#170#194#246#164#189#246#160#184#245#156
+  +#180#245#152#176#245#149#173#244#147#170#244#146#169#244#145#169#244#145#169
+  +#244#145#169#244#145#168#244#144#168#243#145#168#244#144#167#243#144#168#244
+  +#144#168#244#144#167#244#144#167#244#143#167#244#143#167#244#143#167#244#143
+  +#167#244#143#166#244#142#166#244#142#166#244#142#166#244#142#166#244#142#165
+  +#244#163#172#201#176#176#176#176#176#176#176#176#176#175#175#175#175#175#175
+  +#174#174#174#172#172#172#171#171#171#169#169#169#167#167#167#165#165#165#163
+  +#163#163#160#160#160#155#158#168#151#158#184#147#159#199#142#160#221#138#162
+  +#244#138#162#244#138#162#244#138#162#244#138#162#244#137#162#244#137#161#244
+  +#137#161#244#137#161#244#137#161#244#137#161#244#136#160#244#136#160#244#136
+  +#160#244#136#160#244#136#160#244#135#160#244#135#160#244#135#159#244#135#159
+  +#244#135#159#244#134#159#244#135#161#244#137#161#244#140#164#245#144#168#245
+  +#148#174#246#154#180#247#160#186#247#165#192#248#170#197#249#174#201#249#177
+  +#204#249#178#206#249#179#207#250#179#207#249#177#205#249#175#202#249#172#199
+  +#249#168#193#248#161#187#247#156#181#247#151#176#246#145#170#245#143#166#245
+  +#140#163#244#138#161#244#138#161#244#139#161#244#140#163#244#143#166#245#152
+  +#174#245#162#185#246#132#150#233#1#1#190#1#1#190#1#1#190#1#1#190'06'#205#175
+  +#198#247#163#185#246#153#175#244#148#168#243#147#167#243#148#168#242#148#168
+  +#242#149#169#243#150#170#243#151#170#243#152#171#243#152#171#243#153#172#243
+  +#155#173#242#154#173#242#156#174#242#157#174#242#157#175#242#158#176#242#160
+  +#177#242#180#184#201#186#187#187#186#187#187#187#188#188#186#187#187#186#186
+  +#186#185#186#186#185#185#185#185#185#185#185#185#185#186#186#186#186#186#186
+  +#187#187#187#187#187#187#188#188#188#188#188#188#189#189#189#189#189#189#190
+  +#190#190#191#191#191#191#191#191#192#192#192#192#192#192#194#194#194#194#194
+  +#194#195#195#195#196#196#196#196#196#196#198#198#198#198#198#198#199#199#199
+  +#199#199#199#200#200#200#201#201#201#202#202#202#204#204#204#203#203#203#205
+  +#205#205#207#207#207#207#208#208#211#212#212#214#216#216#216#219#219#220#224
+  +#224#223#227#227#225#229#229#226#231#231#227#232#232#227#231#231#226#230#230
+  +#224#228#228#223#226#226#221#223#223#220#221#221#219#219#219#219#219#219#219
+  +#219#219#219#219#219#220#220#220#221#221#221#222#222#222#222#222#222#222#222
+  ,#222#225#225#225#225#225#225#226#226#226#227#227#227#227#227#227#228#228#228
+  +#229#229#229#229#229#229#230#230#230#230#230#230#231#231#231#231#231#231#232
+  +#232#232#233#233#233#233#233#233#233#233#233#234#234#234#234#234#234#235#235
+  +#235#235#235#235#236#236#236#236#236#236#236#236#236#237#237#237#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#242#242#242#241#241#241#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#246#246#246#245#245#245#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#171#171#171#170#170#170#169#169#169#168#168#168#167#167#167#166#166#166
+  +#165#165#165#164#164#164#163#163#163#162#162#162#161#161#161#159#159#159#158
+  +#158#158#158#159#159#158#159#159#159#161#161#161#165#165#162#167#167#163#168
+  +#168#163#170#170#166#187#232#166#190#246#165#189#246#164#188#246#163#187#246
+  +#160#185#246#158#182#245#155#180#245#153#177#245#150#175#244#149#172#244#148
+  +#171#244#147#170#244#146#170#244#146#170#244#146#170#244#146#169#244#146#169
+  +#244#145#169#244#145#169#244#145#169#244#145#168#244#145#168#244#145#168#244
+  +#144#168#244#144#168#244#144#168#244#144#167#244#143#167#244#143#167#244#143
+  +#167#244#143#167#244#143#166#244#143#166#244#142#166#244#147#167#236#176#176
+  +#176#176#176#176#176#176#176#175#175#175#175#175#175#174#174#174#173#173#173
+  +#172#172#172#162#168#188#157#166#196#153#165#205#146#164#224#141#164#239#140
+  +#164#245#139#163#244#139#163#244#139#163#244#139#163#244#139#163#245#139#163
+  +#245#139#163#245#138#162#245#138#162#245#138#162#245#138#162#245#138#162#245
+  +#137#162#245#137#161#245#137#161#245#137#161#245#137#161#245#137#161#245#136
+  +#161#245#136#160#245#136#160#245#136#160#245#136#160#245#135#160#245#135#159
+  +#245#135#159#245#136#160#245#136#161#245#138#163#245#140#165#246#143#168#246
+  +#147#172#246#151#176#247#154#180#247#157#183#248#159#185#247#161#187#248#162
+  +#188#248#162#188#248#160#186#248#159#185#248#155#181#247#152#178#247#150#174
+  +#246#145#170#246#143#167#245#140#165#244#140#163#244#139#162#244#139#161#244
+  ,#139#161#244#139#162#244#141#163#244#144#167#244#149#172#245#157#181#246#168
+  +#192#247'dr'#224']i'#221'^j'#221'\i'#220'o~'#227#167#190#246#159#181#246#153
+  +#174#244#150#170#243#148#168#243#149#169#243#149#169#243#151#171#243#151#171
+  +#243#152#171#243#152#171#243#153#172#243#155#173#243#155#174#243#156#174#243
+  +#157#175#243#157#175#243#158#176#243#159#176#243#160#177#243#165#179#232#186
+  +#186#186#186#186#186#186#186#186#186#186#186#185#185#185#185#185#185#186#186
+  +#186#186#186#186#187#187#187#187#187#187#187#187#187#187#187#187#187#187#187
+  +#188#188#188#189#189#189#189#189#189#190#190#190#191#191#191#192#192#192#192
+  +#192#192#193#193#193#194#194#194#195#195#195#195#195#195#196#196#196#197#197
+  +#197#198#198#198#199#199#199#199#199#199#200#200#200#201#201#201#201#201#201
+  +#202#202#202#202#202#202#204#204#204#204#204#204#205#205#205#206#206#206#207
+  +#207#207#209#209#209#211#212#212#214#215#215#216#218#218#217#220#220#219#222
+  +#222#221#224#224#222#225#225#222#224#224#222#224#224#220#222#222#220#221#221
+  +#219#220#220#218#219#219#219#219#219#219#219#219#220#220#220#221#221#221#221
+  +#221#221#222#222#222#223#223#223#224#224#224#224#224#224#225#225#225#225#225
+  +#225#226#226#226#227#227#227#227#227#227#228#228#228#230#230#230#231#231#231
+  +#231#231#231#231#231#231#232#232#232#232#232#232#233#233#233#234#234#234#234
+  +#234#234#234#234#234#235#235#235#235#235#235#236#236#236#236#236#236#237#237
+  +#237#237#237#237#237#237#237#238#238#238#238#238#238#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241
+  +#241#240#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#242#242#242#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#173#173#173#171#171
+  +#171#170#170#170#169#169#169#168#168#168#167#167#167#166#166#166#165#165#165
+  +#164#164#164#162#162#162#161#161#161#160#160#160#158#158#158#158#158#158#156
+  +#157#157#156#157#157#156#157#157#155#157#157#154#156#156#154#156#156#153#158
+  +#166#156#178#239#156#179#245#154#179#245#153#178#245#152#177#245#151#175#244
+  ,#150#174#245#149#172#244#149#172#245#148#171#245#148#171#245#147#171#245#147
+  +#171#245#147#170#245#147#170#245#146#170#245#146#170#245#146#170#245#146#169
+  +#245#146#169#245#146#169#245#145#169#245#145#169#245#145#169#245#145#168#245
+  +#145#168#245#144#168#245#144#168#245#144#168#245#144#168#245#144#167#245#143
+  +#167#245#143#167#245#143#167#245#143#167#245#160#171#210#163#172#202#159#171
+  +#210#159#171#210#150#168#227#150#167#227#142#165#245#141#165#245#141#165#245
+  +#141#165#245#141#165#245#140#164#245#140#164#245#140#164#245#140#164#245#140
+  +#164#245#140#164#245#139#163#245#140#164#245#140#164#245#139#163#245#139#163
+  +#245#139#163#245#139#163#245#138#163#245#138#162#245#138#162#245#138#162#245
+  +#138#162#245#138#162#245#137#161#245#137#161#245#137#161#245#137#161#245#137
+  +#161#245#136#161#245#136#161#245#136#160#245#136#160#245#136#160#245#135#160
+  +#245#135#160#245#136#160#245#136#161#245#138#162#245#140#164#246#140#166#246
+  +#142#167#246#144#169#246#146#171#246#147#172#246#148#173#246#148#173#246#147
+  +#171#246#146#171#246#144#169#246#143#167#246#141#166#246#140#164#245#139#162
+  +#245#140#163#245#138#162#245#139#162#245#140#162#245#139#162#245#140#163#245
+  +#140#163#245#143#166#245#148#170#245#153#177#245#159#183#246#167#191#247#172
+  +#196#248#174#197#248#172#195#248#167#190#247#161#182#246#155#177#245#152#172
+  +#245#149#170#244#148#169#244#150#170#244#150#170#244#151#171#243#153#172#244
+  +#153#172#243#153#172#243#155#173#244#155#174#244#156#174#244#157#175#244#158
+  +#176#243#158#176#243#159#177#243#160#177#243#160#178#243#162#179#243#176#182
+  +#207#185#185#185#186#186#186#186#186#186#186#186#186#186#186#186#186#186#186
+  +#186#186#186#187#187#187#187#187#187#187#187#187#188#188#188#189#189#189#189
+  +#189#189#189#189#189#190#190#190#190#190#190#192#192#192#192#192#192#193#193
+  +#193#193#193#193#194#194#194#195#195#195#196#196#196#197#197#197#197#197#197
+  +#199#199#199#199#199#199#200#200#200#201#201#201#202#202#202#203#203#203#203
+  +#203#203#204#204#204#205#205#205#205#205#205#206#206#206#207#207#207#207#207
+  +#207#209#210#210#210#210#210#211#212#212#213#214#214#214#215#215#216#217#217
+  +#217#218#218#217#218#218#217#219#219#218#219#219#217#218#218#217#218#218#219
+  +#219#219#218#219#219#219#219#219#220#220#220#221#221#221#222#222#222#222#222
+  +#222#223#223#223#224#224#224#225#225#225#225#225#225#226#226#226#226#226#226
+  +#228#228#228#228#228#228#228#228#228#229#229#229#230#230#230#231#231#231#231
+  +#231#231#231#231#231#232#232#232#233#233#233#233#233#233#234#234#234#234#234
+  +#234#234#234#234#235#235#235#237#237#237#237#237#237#238#238#238#238#238#238
+  +#238#238#238#238#238#238#239#239#239#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#243#243#243#242#242#242#242#242#242#242#242#242#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#244#244#244#243#243#243#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245
+  +#245#244#244#244#245#245#245#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  ,#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#174#174#174#172#172#172
+  +#171#171#171#170#170#170#169#169#169#168#168#168#167#167#167#166#166#166#165
+  +#165#165#163#163#163#162#162#162#161#161#161#159#159#159#158#158#158#156#156
+  +#156#155#155#155#153#153#153#152#152#152#150#150#150#150#151#151#148#149#149
+  +#149#158#184#151#174#245#151#174#245#150#174#245#149#173#245#149#173#245#149
+  +#172#245#149#172#245#149#172#245#148#172#245#148#172#245#148#171#245#148#171
+  +#245#148#171#245#147#171#245#147#171#245#147#171#245#147#170#245#147#170#245
+  +#146#170#245#146#170#245#146#170#245#146#169#245#146#169#245#146#169#245#145
+  +#169#245#145#169#245#145#169#245#145#168#245#144#168#245#144#168#245#144#168
+  +#245#144#168#245#144#167#245#144#167#245#143#167#245#143#167#245#143#167#245
+  +#143#167#245#143#167#246#142#166#245#142#166#245#142#166#245#142#166#246#142
+  +#166#246#142#166#246#141#165#245#141#165#245#141#165#245#141#165#245#141#165
+  +#246#140#164#245#140#164#245#140#164#246#140#164#246#140#164#246#140#164#246
+  +#140#164#246#139#163#246#139#163#246#139#163#246#139#163#246#139#163#246#138
+  +#163#246#138#162#246#138#162#246#138#162#246#138#162#246#138#162#246#137#162
+  +#246#137#161#246#137#161#246#137#161#246#137#161#246#136#161#246#136#160#246
+  +#136#160#246#136#160#246#136#160#246#135#160#246#136#161#246#136#161#246#137
+  +#161#246#137#162#246#138#162#245#139#164#245#139#163#245#139#164#245#139#163
+  +#245#138#163#245#139#163#245#139#162#246#139#162#246#138#161#246#139#162#246
+  +#139#162#245#139#162#245#139#163#245#140#163#245#141#164#245#141#163#245#141
+  +#164#245#143#165#245#146#169#245#149#172#246#154#177#246#158#180#247#162#184
+  +#247#162#184#247#161#183#247#158#181#246#155#177#246#152#173#245#150#171#244
+  +#150#170#244#150#170#244#151#171#244#151#171#244#152#172#244#153#172#244#154
+  +#172#244#154#173#244#155#174#244#155#174#244#156#175#244#158#176#244#158#176
+  +#243#159#177#244#159#177#243#161#178#243#161#178#243#163#180#244#165#181#240
+  +#184#185#189#185#185#185#185#185#185#186#186#186#186#186#186#186#186#186#187
+  +#187#187#187#187#187#187#187#187#188#188#188#188#188#188#189#189#189#190#190
+  +#190#190#190#190#191#191#191#191#191#191#193#193#193#193#193#193#194#194#194
+  +#194#194#194#195#195#195#195#195#195#196#196#196#198#198#198#198#198#198#199
+  +#199#199#200#200#200#200#200#200#202#202#202#203#203#203#204#204#204#204#204
+  +#204#205#205#205#206#206#206#206#206#206#207#207#207#207#207#207#209#209#209
+  +#210#210#210#210#210#210#211#211#211#213#213#213#213#213#213#214#214#214#215
+  +#215#215#215#215#215#216#216#216#217#217#217#217#218#218#217#217#217#218#218
+  +#218#219#219#219#219#219#219#220#220#220#221#221#221#222#222#222#223#223#223
+  +#223#223#223#224#224#224#225#225#225#226#226#226#227#227#227#228#228#228#229
+  +#229#229#229#229#229#229#229#229#230#230#230#231#231#231#232#232#232#232#232
+  +#232#232#232#232#233#233#233#234#234#234#234#234#234#235#235#235#235#235#235
+  +#236#236#236#236#236#236#237#237#237#237#237#237#238#238#238#238#238#238#238
+  +#238#238#238#238#238#239#239#239#239#239#239#240#240#240#240#240#240#240#240
+  +#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242#241#241#241#241
+  +#241#241#242#242#242#241#241#241#242#242#242#241#241#241#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#243#243#243#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  ,#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245#244#244
+  +#244#244#244#244#245#245#245#244#244#244#244#244#244#245#245#245#244#244#244
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#176#176#176#174#174#174#173
+  +#173#173#171#171#171#170#170#170#169#169#169#167#167#167#167#167#167#166#166
+  +#166#164#164#164#163#163#163#162#162#162#160#160#160#159#159#159#157#157#157
+  +#155#155#155#154#154#154#152#152#152#150#150#150#150#150#150#148#148#148#147
+  +#147#147#149#163#208#150#174#246#150#174#246#150#173#246#150#173#246#150#173
+  +#246#149#173#246#149#173#246#149#173#246#149#172#246#149#172#246#149#172#246
+  +#148#172#246#148#172#246#148#171#246#148#171#246#147#171#246#147#171#246#147
+  +#171#246#147#170#246#147#170#246#147#170#246#146#170#246#146#170#246#146#170
+  +#246#146#169#246#146#169#246#145#169#246#145#169#246#145#169#246#145#169#246
+  +#145#168#246#144#168#246#144#168#246#144#168#246#144#168#246#144#167#246#144
+  +#167#246#143#167#246#143#167#246#143#167#246#143#166#246#143#166#246#143#167
+  +#245#142#166#246#142#166#246#142#166#246#142#166#246#141#165#246#141#165#246
+  +#141#165#245#141#165#246#141#165#246#141#165#246#141#165#246#141#165#246#140
+  +#164#246#140#164#246#140#164#246#140#164#246#139#164#246#139#163#246#139#163
+  +#246#139#163#246#139#163#246#139#163#246#138#162#246#138#162#246#138#162#246
+  +#138#162#246#138#162#246#137#162#246#137#162#246#137#161#246#137#161#246#137
+  +#161#246#136#161#246#136#161#246#136#160#246#136#160#246#136#160#246#136#160
+  +#246#136#160#246#136#160#246#136#160#246#136#160#246#137#161#246#137#161#246
+  +#137#161#246#138#161#246#138#161#246#138#162#246#138#162#246#139#162#246#140
+  +#163#245#140#163#245#140#163#245#141#164#246#142#164#246#142#165#246#143#165
+  +#246#143#165#246#144#167#246#146#168#246#149#171#246#150#172#246#152#175#246
+  +#153#175#246#154#174#246#152#173#246#151#173#245#151#171#245#150#171#245#150
+  +#170#245#151#171#245#151#171#245#152#172#245#153#172#245#153#173#245#154#173
+  +#245#155#174#244#156#174#244#156#175#244#157#175#244#158#176#244#159#176#244
+  +#159#177#244#161#178#244#161#178#244#162#179#244#163#180#244#164#180#244#173
+  +#182#217#184#184#184#185#185#185#185#185#185#187#187#187#187#187#187#187#187
+  +#187#187#187#187#188#188#188#189#189#189#189#189#189#190#190#190#190#190#190
+  +#191#191#191#191#191#191#192#192#192#193#193#193#194#194#194#195#195#195#195
+  +#195#195#196#196#196#196#196#196#197#197#197#198#198#198#199#199#199#200#200
+  +#200#200#200#200#201#201#201#202#202#202#203#203#203#204#204#204#204#204#204
+  +#205#205#205#206#206#206#207#207#207#208#208#208#208#208#208#209#209#209#210
+  +#210#210#211#211#211#212#212#212#213#213#213#213#213#213#215#215#215#215#215
+  +#215#216#216#216#216#216#216#218#218#218#218#218#218#218#218#218#220#220#220
+  +#220#220#220#221#221#221#222#222#222#222#222#222#223#223#223#223#223#223#224
+  +#224#224#225#225#225#226#226#226#226#226#226#227#227#227#228#228#228#229#229
+  +#229#229#229#229#230#230#230#230#230#230#231#231#231#232#232#232#232#232#232
+  +#232#232#232#234#234#234#235#235#235#235#235#235#236#236#236#236#236#236#237
+  +#237#237#237#237#237#238#238#238#238#238#238#239#239#239#239#239#239#239#239
+  +#239#239#239#239#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241
+  ,#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#242#242#242#241#241#241#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#176#176#176#175#175#175#174#174
+  +#174#172#172#172#171#171#171#170#170#170#169#169#169#168#168#168#167#167#167
+  +#166#166#166#165#165#165#163#163#163#162#162#162#160#160#160#159#159#159#157
+  +#157#157#156#156#156#154#154#154#152#152#152#151#151#151#150#150#150#148#148
+  +#148#147#148#153#150#169#227#151#174#246#151#174#246#150#174#246#150#174#246
+  +#150#174#246#150#173#246#150#173#246#150#173#246#149#173#246#149#173#246#149
+  +#172#246#149#172#246#149#172#246#148#172#246#148#172#246#148#172#246#148#171
+  +#246#148#171#246#147#171#246#147#171#246#147#171#246#147#170#246#147#170#246
+  +#147#170#246#146#170#246#146#170#246#146#170#246#146#169#246#145#169#246#145
+  +#169#246#145#169#246#145#169#246#145#168#246#145#168#246#144#168#246#144#168
+  +#246#144#168#246#144#168#246#144#167#246#143#167#246#143#167#246#143#167#246
+  +#143#167#246#143#166#246#142#166#246#143#167#246#142#166#246#142#166#246#142
+  +#166#246#141#165#246#142#166#247#142#166#247#141#165#247#141#165#247#141#165
+  +#247#141#165#247#141#165#247#140#164#247#140#164#247#140#164#247#140#164#247
+  +#140#164#247#139#164#247#139#163#247#139#163#247#139#163#247#139#163#247#139
+  +#163#247#138#163#247#138#162#247#138#162#247#138#162#247#138#162#247#137#162
+  +#247#137#161#247#137#161#247#137#161#247#137#161#247#136#161#247#136#161#247
+  +#137#161#246#136#161#246#137#161#246#137#161#246#138#162#246#138#161#246#138
+  +#162#246#139#162#246#138#162#246#139#162#246#140#163#246#139#163#246#140#163
+  +#246#141#164#246#140#163#246#141#164#246#142#165#246#143#165#246#144#166#246
+  +#143#165#246#144#166#246#145#167#246#146#168#246#147#169#246#149#170#246#150
+  +#170#246#150#171#246#149#170#246#150#170#246#149#170#246#150#170#246#151#171
+  +#246#151#172#245#152#172#245#153#172#245#154#173#245#154#173#245#155#174#245
+  +#156#175#245#157#175#245#158#176#245#158#176#245#158#177#245#159#177#245#161
+  ,#178#245#162#179#245#162#180#245#163#180#244#164#181#244#165#181#244#165#182
+  +#244#179#183#199#184#184#184#185#185#185#185#185#185#186#186#186#187#187#187
+  +#187#187#187#188#188#188#189#189#189#190#190#190#191#191#191#191#191#191#192
+  +#192#192#192#192#192#193#193#193#194#194#194#195#195#195#195#195#195#197#197
+  +#197#197#197#197#198#198#198#199#199#199#199#199#199#200#200#200#201#201#201
+  +#201#201#201#202#202#202#203#203#203#204#204#204#205#205#205#205#205#205#206
+  +#206#206#207#207#207#207#207#207#209#209#209#209#209#209#210#210#210#211#211
+  +#211#211#211#211#212#212#212#213#213#213#214#214#214#215#215#215#216#216#216
+  +#215#215#215#217#217#217#218#218#218#218#218#218#219#219#219#221#221#221#221
+  +#221#221#222#222#222#222#222#222#224#224#224#224#224#224#225#225#225#225#225
+  +#225#226#226#226#227#227#227#227#227#227#228#228#228#229#229#229#230#230#230
+  +#230#230#230#231#231#231#231#231#231#232#232#232#233#233#233#233#233#233#234
+  +#234#234#234#234#234#235#235#235#236#236#236#236#236#236#236#236#236#237#237
+  +#237#238#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239#239
+  +#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#178#178#178#177#177#177#176#176#176
+  +#175#175#175#172#172#172#171#171#171#170#170#170#169#169#169#168#168#168#167
+  +#167#167#165#165#165#165#165#165#163#163#163#162#162#162#160#160#160#159#159
+  +#159#156#156#156#155#155#155#153#153#153#152#152#152#151#151#151#150#150#150
+  +#149#149#149#149#153#166#151#173#241#151#175#247#151#175#247#151#174#247#151
+  +#174#247#151#174#247#150#174#247#150#174#247#150#174#247#150#173#247#150#173
+  +#247#150#173#247#149#173#247#149#173#247#149#172#247#149#172#247#148#172#247
+  +#148#172#247#148#172#247#148#171#247#148#171#247#148#171#247#147#171#247#147
+  +#171#247#147#171#247#147#170#247#147#170#247#146#170#247#146#170#247#146#170
+  ,#247#146#170#247#146#169#247#145#169#247#145#169#247#145#169#247#145#169#247
+  +#145#168#247#145#168#247#144#168#247#144#168#247#144#168#247#144#167#247#144
+  +#167#247#143#167#247#143#167#247#143#167#247#143#167#247#142#166#247#142#166
+  +#247#142#166#247#142#166#247#142#166#247#142#166#247#142#166#247#142#166#247
+  +#142#166#247#141#165#247#141#165#247#141#165#247#140#164#247#140#164#247#140
+  +#164#247#140#164#247#140#164#247#139#163#247#140#164#247#139#163#247#139#163
+  +#247#139#163#247#139#163#247#139#163#247#138#163#247#138#163#247#138#162#247
+  +#138#162#247#138#162#247#137#162#247#137#162#247#137#161#247#137#161#247#137
+  +#162#247#137#161#247#138#162#247#138#161#247#138#162#247#139#163#247#139#162
+  +#247#139#163#247#139#163#247#139#163#247#140#164#247#140#164#247#141#164#247
+  +#141#164#246#141#164#246#142#164#246#143#165#246#143#166#246#144#166#246#145
+  +#167#246#145#167#246#145#167#246#145#167#246#147#168#247#148#169#246#148#169
+  +#246#148#169#246#150#170#246#149#170#246#150#171#246#151#171#246#151#171#246
+  +#152#172#246#152#172#245#154#173#246#154#173#245#155#174#246#157#175#246#157
+  +#176#246#157#176#246#159#177#246#159#177#246#160#178#245#161#179#245#162#179
+  +#245#163#180#245#163#180#245#164#181#245#164#181#245#165#182#245#167#183#245
+  +#170#184#237#183#184#188#185#185#185#185#185#185#186#186#186#187#187#187#188
+  +#188#188#188#188#188#189#189#189#190#190#190#190#190#190#191#191#191#192#192
+  +#192#192#192#192#194#194#194#194#194#194#195#195#195#195#195#195#196#196#196
+  +#197#197#197#199#199#199#199#199#199#200#200#200#201#201#201#201#201#201#203
+  +#203#203#203#203#203#204#204#204#205#205#205#205#205#205#207#207#207#207#207
+  +#207#208#208#208#209#209#209#209#209#209#210#210#210#211#211#211#212#212#212
+  +#212#212#212#214#214#214#214#214#214#215#215#215#216#216#216#216#216#216#217
+  +#217#217#218#218#218#219#219#219#219#219#219#220#220#220#221#221#221#221#221
+  +#221#222#222#222#223#223#223#224#224#224#224#224#224#225#225#225#226#226#226
+  +#227#227#227#227#227#227#227#227#227#228#228#228#230#230#230#231#231#231#231
+  +#231#231#232#232#232#231#231#231#233#233#233#234#234#234#234#234#234#235#235
+  +#235#236#236#236#236#236#236#237#237#237#237#237#237#237#237#237#238#238#238
+  +#238#238#238#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240#241
+  +#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#243#243#243
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#246#246#246#245#245#245#246#246#246#245#245#245#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  ,#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#179#179#179#178#178#178#176#176#176#175
+  +#175#175#175#175#175#172#172#172#171#171#171#170#170#170#169#169#169#168#168
+  +#168#166#166#166#165#165#165#164#164#164#162#162#162#161#161#161#160#160#160
+  +#158#158#158#157#157#157#154#154#154#153#153#153#152#152#152#151#151#151#150
+  +#150#150#149#149#149#150#159#185#152#175#247#152#175#247#152#175#247#151#175
+  +#247#151#175#247#151#175#247#151#174#247#151#174#247#151#174#247#150#174#247
+  +#150#174#247#150#173#247#150#173#247#150#173#247#149#173#247#149#173#247#149
+  +#173#247#149#172#247#149#172#247#148#172#247#148#172#247#148#172#247#148#171
+  +#247#148#171#247#148#171#247#147#171#247#147#171#247#147#171#247#147#170#247
+  +#146#170#247#146#170#247#146#170#247#146#170#247#146#169#247#146#169#247#145
+  +#169#247#145#169#247#145#169#247#145#169#247#145#168#247#144#168#247#144#168
+  +#247#144#168#247#144#168#247#144#167#247#143#167#247#143#167#247#143#167#247
+  +#143#167#247#143#167#247#143#167#248#142#166#247#142#166#247#142#166#247#142
+  +#166#247#142#166#247#141#165#247#141#165#247#141#165#248#141#165#247#141#165
+  +#248#140#164#247#141#165#248#140#164#247#140#164#247#140#164#247#139#163#247
+  +#140#164#248#140#164#248#139#164#248#139#163#248#139#163#248#139#163#248#139
+  +#163#248#138#163#248#138#162#248#138#162#248#138#162#248#138#162#248#138#162
+  +#247#138#162#247#139#162#247#138#162#247#139#163#247#139#163#247#139#163#247
+  +#140#163#247#140#163#247#140#164#247#141#164#247#142#165#247#142#165#247#142
+  +#165#247#143#165#247#143#165#247#143#166#247#144#166#247#144#167#247#145#167
+  +#247#145#167#247#146#167#247#146#168#247#147#169#247#148#169#246#149#169#246
+  +#149#170#246#150#170#246#151#171#246#152#172#247#151#171#246#151#172#246#153
+  +#173#247#154#173#246#155#174#246#155#174#246#156#175#246#156#176#246#158#176
+  +#246#157#176#246#160#178#246#160#178#246#161#179#246#162#180#246#162#180#246
+  +#163#181#246#164#181#246#165#182#246#165#182#246#167#183#246#168#184#246#169
+  +#184#246#178#184#207#185#185#185#186#186#186#187#187#187#187#187#187#188#188
+  +#188#189#189#189#189#189#189#190#190#190#191#191#191#192#192#192#193#193#193
+  +#193#193#193#194#194#194#195#195#195#196#196#196#196#196#196#197#197#197#198
+  +#198#198#199#199#199#199#199#199#200#200#200#202#202#202#202#202#202#203#203
+  +#203#203#203#203#204#204#204#205#205#205#206#206#206#207#207#207#208#208#208
+  +#208#208#208#209#209#209#210#210#210#210#210#210#211#211#211#213#213#213#214
+  +#214#214#215#215#215#215#215#215#216#216#216#217#217#217#217#217#217#218#218
+  +#218#219#219#219#220#220#220#220#220#220#221#221#221#222#222#222#222#222#222
+  +#223#223#223#224#224#224#225#225#225#225#225#225#226#226#226#227#227#227#228
+  +#228#228#228#228#228#229#229#229#229#229#229#230#230#230#231#231#231#231#231
+  +#231#232#232#232#232#232#232#234#234#234#234#234#234#234#234#234#235#235#235
+  +#236#236#236#236#236#236#237#237#237#237#237#237#237#237#237#238#238#238#239
+  +#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240#241#241
+  +#241#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244#243#243#243#243
+  +#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#245#245#245#244#244#244#245#245
+  +#245#244#244#244#245#245#245#244#244#244#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  ,#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#181#181#181#179#179#179#178#178#178#177#177
+  +#177#175#175#175#174#174#174#172#172#172#171#171#171#170#170#170#169#169#169
+  +#168#168#168#167#167#167#166#166#166#164#164#164#163#163#163#161#161#161#159
+  +#159#159#158#158#158#156#156#156#155#155#155#154#154#154#152#152#152#151#151
+  +#151#150#150#150#149#149#149#150#164#203#153#176#248#152#175#247#152#176#248
+  +#152#175#248#152#175#248#152#175#248#151#175#248#151#175#248#151#175#248#151
+  +#174#248#151#174#248#151#174#248#150#174#248#150#174#248#150#173#248#150#173
+  +#248#149#173#248#149#173#248#149#173#248#149#172#248#149#173#247#149#172#248
+  +#148#172#248#148#172#248#148#172#248#148#171#248#148#171#248#147#171#248#147
+  +#171#248#147#171#248#147#171#248#147#170#248#146#170#248#146#170#248#146#170
+  +#248#146#170#248#146#169#248#146#169#248#145#169#248#145#169#248#145#169#248
+  +#145#168#248#145#168#248#144#168#248#144#168#248#144#168#248#144#168#248#143
+  +#167#248#143#167#248#143#167#248#143#167#248#143#167#248#143#167#248#142#166
+  +#248#142#166#248#142#166#248#142#166#248#142#166#248#141#165#248#141#165#248
+  +#141#165#248#141#165#248#141#165#248#140#165#248#140#164#248#140#164#248#140
+  +#164#248#140#164#248#140#164#248#139#164#248#140#164#248#139#164#248#139#164
+  +#248#139#163#248#139#163#248#139#163#248#138#163#248#138#163#248#139#163#248
+  +#139#163#248#139#163#248#140#164#248#140#164#248#140#164#248#140#164#248#141
+  +#164#248#141#164#248#141#164#248#142#165#248#142#165#248#142#165#248#143#166
+  +#248#143#166#247#143#166#247#144#167#247#145#167#247#145#167#247#146#168#247
+  +#147#168#247#147#168#247#147#169#247#148#169#247#148#170#247#149#170#247#150
+  +#171#247#150#171#247#151#172#247#152#172#247#152#172#247#153#173#247#154#174
+  +#247#154#173#247#156#175#246#155#175#246#156#175#246#157#176#246#158#177#246
+  +#159#177#246#160#178#246#160#179#246#161#179#246#162#180#246#163#180#246#163
+  +#181#246#164#181#246#165#182#246#166#183#246#167#184#246#168#184#246#170#185
+  +#242#183#184#188#185#185#185#186#186#186#188#188#188#188#188#188#188#188#188
+  +#189#189#189#190#190#190#192#192#192#192#192#192#193#193#193#194#194#194#194
+  +#194#194#195#195#195#196#196#196#197#197#197#198#198#198#198#198#198#199#199
+  +#199#200#200#200#201#201#201#202#202#202#202#202#202#203#203#203#204#204#204
+  +#204#204#204#206#206#206#206#206#206#207#207#207#208#208#208#208#208#208#209
+  +#209#209#210#210#210#210#210#210#211#211#211#212#212#212#213#213#213#214#214
+  +#214#215#215#215#215#215#215#216#216#216#217#217#217#218#218#218#218#218#218
+  +#219#219#219#220#220#220#220#220#220#221#221#221#222#222#222#223#223#223#223
+  +#223#223#224#224#224#225#225#225#225#225#225#227#227#227#227#227#227#229#229
+  +#229#228#228#228#230#230#230#230#230#230#232#232#232#231#231#231#232#232#232
+  +#232#232#232#233#233#233#235#235#235#235#235#235#235#235#235#236#236#236#237
+  +#237#237#238#238#238#238#238#238#238#238#238#238#238#238#239#239#239#240#240
+  +#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#243
+  +#243#243#244#244#244#243#243#243#244#244#244#244#244#244#244#244#244#244#244
+  ,#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#244#244#244#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246#245
+  +#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#182#182#182#181#181#181#180#180#180#178#178#178
+  +#176#176#176#175#175#175#174#174#174#173#173#173#171#171#171#170#170#170#169
+  +#169#169#168#168#168#167#167#167#165#165#165#164#164#164#162#162#162#161#161
+  +#161#159#159#159#158#158#158#156#156#156#155#155#155#154#154#154#152#152#152
+  +#152#152#152#151#151#151#150#150#150#152#168#217#153#176#248#153#176#248#153
+  +#176#248#152#176#248#152#176#248#152#176#248#152#175#248#152#175#248#152#175
+  +#248#151#175#248#151#175#248#151#174#248#151#174#248#151#174#248#150#174#248
+  +#150#174#248#150#174#248#150#173#248#150#173#248#149#173#248#149#173#248#149
+  +#173#248#149#172#248#149#172#248#149#172#248#148#172#248#148#172#248#148#172
+  +#248#148#171#248#147#171#248#147#171#248#147#171#248#147#171#248#147#170#248
+  +#147#170#248#146#170#248#146#170#248#146#170#248#146#170#248#146#169#248#145
+  +#169#248#145#169#248#145#169#248#145#169#248#145#168#248#144#168#248#144#168
+  +#248#144#168#248#144#168#248#144#168#248#143#167#248#143#167#248#143#167#248
+  +#143#167#248#143#167#248#143#167#248#142#166#248#142#166#248#142#166#248#142
+  +#166#248#141#166#248#141#165#248#141#165#248#141#165#248#141#165#248#141#165
+  +#248#140#164#248#140#164#248#140#164#248#140#164#248#140#164#248#139#164#248
+  +#139#164#248#139#163#248#139#163#248#139#163#248#139#163#248#139#163#248#139
+  +#163#248#139#163#248#139#163#248#141#164#248#140#164#248#140#164#248#141#165
+  +#248#141#165#248#142#165#248#142#166#248#143#166#248#144#166#248#144#166#248
+  +#144#167#248#145#167#248#145#167#248#146#168#248#146#168#248#147#169#248#147
+  +#169#248#147#169#248#149#170#248#148#170#248#149#170#248#150#171#248#151#171
+  +#248#151#172#247#152#173#247#153#173#247#153#173#247#154#174#247#155#174#247
+  +#155#175#247#156#175#247#157#176#247#157#177#247#158#177#247#159#178#247#160
+  +#178#247#161#179#247#161#179#247#162#180#247#163#180#247#164#182#247#164#182
+  +#247#165#182#246#166#183#246#167#184#246#168#184#246#169#185#246#176#184#215
+  +#184#184#184#185#185#185#186#186#186#187#187#187#188#188#188#189#189#189#189
+  +#189#189#191#191#191#192#192#192#192#192#192#193#193#193#194#194#194#194#194
+  +#194#195#195#195#197#197#197#197#197#197#198#198#198#198#198#198#199#199#199
+  ,#201#201#201#201#201#201#202#202#202#203#203#203#203#203#203#204#204#204#204
+  +#204#204#207#207#207#207#207#207#208#208#208#209#209#209#209#209#209#210#210
+  +#210#211#211#211#211#211#211#213#213#213#214#214#214#214#214#214#215#215#215
+  +#216#216#216#216#216#216#217#217#217#218#218#218#218#218#218#219#219#219#220
+  +#220#220#221#221#221#221#221#221#222#222#222#223#223#223#224#224#224#224#224
+  +#224#226#226#226#226#226#226#227#227#227#227#227#227#228#228#228#229#229#229
+  +#229#229#229#230#230#230#231#231#231#232#232#232#232#232#232#233#233#233#233
+  +#233#233#234#234#234#235#235#235#235#235#235#235#235#235#236#236#236#237#237
+  +#237#237#237#237#238#238#238#238#238#238#238#238#238#239#239#239#240#240#240
+  +#240#240#240#241#241#241#241#241#241#241#241#241#243#243#243#242#242#242#243
+  +#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#245#245#245
+  +#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#184#184#184#182#182#182#181#181#181#180#180#180#178
+  +#178#178#176#176#176#175#175#175#175#175#175#172#172#172#171#171#171#170#170
+  +#170#169#169#169#167#167#167#167#167#167#166#166#166#164#164#164#163#163#163
+  +#161#161#161#160#160#160#158#158#158#156#156#156#155#155#155#154#154#154#152
+  +#152#152#151#151#151#151#151#151#150#151#156#153#172#230#154#177#249#153#176
+  +#248#153#177#249#153#176#249#152#176#248#152#176#248#152#175#248#152#176#249
+  +#152#175#248#152#175#249#152#175#249#151#174#248#151#174#248#151#174#248#151
+  +#174#249#150#174#248#150#174#249#150#174#249#150#173#248#150#173#249#150#173
+  +#249#149#173#248#149#172#248#149#173#249#149#173#249#149#172#249#149#172#249
+  +#148#172#249#148#172#249#148#172#249#148#172#249#148#171#249#147#171#249#147
+  +#171#249#147#171#249#147#171#249#147#170#249#147#170#249#146#170#249#146#170
+  +#249#146#170#249#146#169#249#146#169#249#145#169#249#145#169#249#145#169#249
+  +#145#169#249#144#168#249#144#168#249#144#168#249#144#168#249#144#168#249#144
+  ,#168#249#143#167#249#143#167#249#143#167#249#143#167#249#143#167#249#142#166
+  +#249#142#166#249#142#166#249#142#166#249#142#166#249#141#166#249#141#165#249
+  +#141#165#249#141#165#249#141#165#249#141#165#249#140#165#249#140#164#249#140
+  +#164#249#140#164#249#140#164#249#139#164#249#140#164#248#139#164#248#140#164
+  +#248#140#164#248#141#165#248#141#165#248#141#165#248#142#165#248#142#165#248
+  +#142#165#248#143#166#248#143#166#248#143#166#248#144#167#248#144#166#248#144
+  +#167#248#146#168#249#146#168#248#146#168#248#146#168#248#147#169#248#148#169
+  +#248#148#170#248#149#170#248#149#170#248#149#170#248#150#171#248#151#172#248
+  +#152#173#248#153#173#248#153#173#247#153#173#247#154#174#247#155#174#247#156
+  +#176#248#156#176#247#158#177#248#158#177#248#159#178#248#160#178#248#160#179
+  +#247#161#180#247#162#180#247#163#181#247#163#181#247#164#182#247#166#183#247
+  +#167#184#247#167#184#247#168#185#247#169#185#247#169#186#247#182#184#192#185
+  +#185#185#186#186#186#187#187#187#188#188#188#189#189#189#189#189#189#191#191
+  +#191#192#192#192#192#192#192#193#193#193#194#194#194#194#194#194#195#195#195
+  +#197#197#197#198#198#198#198#198#198#199#199#199#199#199#199#200#200#200#201
+  +#201#201#202#202#202#203#203#203#204#204#204#204#204#204#205#205#205#206#206
+  +#206#207#207#207#207#207#207#208#208#208#209#209#209#209#209#209#211#211#211
+  +#212#212#212#212#212#212#213#213#213#214#214#214#214#214#214#215#215#215#216
+  +#216#216#216#216#216#217#217#217#218#218#218#219#219#219#219#219#219#222#222
+  +#222#221#221#221#222#222#222#222#222#222#224#224#224#224#224#224#224#224#224
+  +#226#226#226#226#226#226#226#226#226#227#227#227#229#229#229#229#229#229#230
+  +#230#230#231#231#231#232#232#232#232#232#232#233#233#233#234#234#234#234#234
+  +#234#235#235#235#236#236#236#236#236#236#236#236#236#237#237#237#238#238#238
+  +#238#238#238#239#239#239#239#239#239#240#240#240#240#240#240#241#241#241#241
+  +#241#241#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#245#245#245#244#244#244#245#245#245#244#244#244#244#244
+  +#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#245
+  +#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  ,#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#185#185#185#184#184#184#182#182#182#181#181#181#180#180
+  +#180#178#178#178#177#177#177#175#175#175#174#174#174#172#172#172#171#171#171
+  +#170#170#170#169#169#169#168#168#168#167#167#167#165#165#165#164#164#164#162
+  +#162#162#161#161#161#160#160#160#158#158#158#156#156#156#155#155#155#154#154
+  +#154#153#153#153#152#152#152#151#151#151#151#154#163#154#176#243#154#177#249
+  +#153#177#249#153#177#249#153#176#249#153#176#249#153#176#249#152#176#249#152
+  +#176#249#152#176#249#152#175#249#152#175#249#152#175#249#152#175#249#151#175
+  +#249#151#174#249#151#175#249#151#175#249#151#174#249#150#174#249#150#173#249
+  +#150#173#249#150#173#249#150#173#249#149#173#249#150#173#249#149#173#248#149
+  +#173#249#149#173#249#149#172#249#148#172#249#148#172#249#148#171#249#148#172
+  +#249#147#171#249#148#171#249#147#171#249#147#170#249#147#171#249#147#171#249
+  +#147#170#249#146#170#249#146#170#249#146#170#249#146#170#249#146#169#249#145
+  +#169#249#145#169#249#145#169#249#145#169#249#145#169#249#144#168#249#144#168
+  +#249#144#168#249#144#168#249#144#168#249#144#168#249#143#167#249#143#167#249
+  +#143#167#249#143#167#249#142#167#249#142#166#249#142#166#249#142#166#249#142
+  +#166#249#142#166#249#141#165#249#141#165#249#141#165#249#141#165#249#141#165
+  +#249#140#165#249#140#165#249#140#164#249#140#165#249#140#164#249#141#165#249
+  +#141#165#249#142#165#249#141#165#249#142#166#249#143#166#249#142#166#249#143
+  +#166#249#143#167#249#144#167#249#144#167#249#145#167#249#145#168#249#145#168
+  +#249#146#168#249#147#169#248#147#169#248#147#169#248#148#170#248#148#170#248
+  +#149#171#248#149#171#248#149#171#248#151#172#248#151#172#248#152#172#248#152
+  +#173#248#153#173#248#154#174#248#154#174#248#155#175#248#156#175#248#156#176
+  +#248#157#176#248#158#177#248#158#177#248#159#178#248#161#179#247#161#179#247
+  +#161#180#247#162#180#247#164#181#247#164#182#247#165#183#247#166#183#247#167
+  +#184#247#168#185#248#168#185#247#170#187#248#176#186#223#184#184#184#185#185
+  +#185#186#186#186#187#187#187#188#188#188#189#189#189#190#190#190#192#192#192
+  +#192#192#192#192#192#192#193#193#193#194#194#194#195#195#195#197#197#197#197
+  +#197#197#198#198#198#199#199#199#200#200#200#200#200#200#202#202#202#202#202
+  +#202#203#203#203#204#204#204#205#205#205#206#206#206#206#206#206#207#207#207
+  +#208#208#208#208#208#208#209#209#209#210#210#210#211#211#211#212#212#212#212
+  +#212#212#213#213#213#214#214#214#215#215#215#215#215#215#216#216#216#217#217
+  +#217#217#217#217#219#219#219#219#219#219#220#220#220#221#221#221#222#222#222
+  +#222#222#222#223#223#223#224#224#224#224#224#224#225#225#225#226#226#226#227
+  +#227#227#227#227#227#228#228#228#229#229#229#229#229#229#230#230#230#230#230
+  +#230#231#231#231#232#232#232#232#232#232#233#233#233#233#233#233#234#234#234
+  +#235#235#235#236#236#236#236#236#236#237#237#237#237#237#237#238#238#238#239
+  +#239#239#239#239#239#239#239#239#240#240#240#241#241#241#241#241#241#242#242
+  +#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#244#244#244
+  +#244#244#244#245#245#245#244#244#244#245#245#245#244#244#244#244#244#244#245
+  +#245#245#245#245#245#244#244#244#244#244#244#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#246#246#246#245#245#245#246#246
+  +#246#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  ,#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#187#187#187#185#185#185#184#184#184#182#182#182#181#181#181
+  +#180#180#180#178#178#178#177#177#177#175#175#175#174#174#174#172#172#172#171
+  +#171#171#170#170#170#169#169#169#168#168#168#167#167#167#165#165#165#164#164
+  +#164#162#162#162#161#161#161#160#160#160#158#158#158#157#157#157#156#156#156
+  +#154#154#154#153#153#153#152#152#152#152#152#152#152#156#170#154#176#243#154
+  +#177#249#154#177#249#154#177#249#153#177#249#153#177#249#153#177#249#153#176
+  +#249#153#176#249#153#176#249#152#176#249#152#176#249#152#175#249#152#175#249
+  +#152#175#249#151#175#249#151#175#249#151#175#249#151#174#249#151#174#249#150
+  +#174#249#150#174#249#150#174#249#150#173#249#150#173#249#150#173#249#149#173
+  +#249#149#173#249#149#173#249#149#172#249#148#172#249#148#172#249#148#172#249
+  +#148#172#249#148#172#249#148#171#249#147#171#249#147#171#249#147#171#249#147
+  +#171#249#147#171#249#146#170#249#146#170#249#146#170#249#146#170#249#146#169
+  +#249#145#169#249#145#169#249#145#169#250#145#169#249#145#169#249#144#168#249
+  +#144#168#249#145#169#250#144#168#250#144#168#250#144#168#250#143#167#249#143
+  +#167#249#143#167#249#143#167#249#143#167#250#142#166#249#142#166#249#142#166
+  +#249#142#166#249#142#166#250#141#165#249#141#165#249#141#165#249#141#165#249
+  +#141#165#249#140#165#249#141#165#249#141#165#249#141#165#249#141#165#249#141
+  +#165#249#142#166#249#142#166#249#142#166#249#143#167#249#143#166#249#144#167
+  +#249#144#167#249#145#168#249#145#168#249#146#168#249#146#169#249#146#169#249
+  +#146#169#249#147#169#249#148#170#249#148#170#249#149#171#249#149#171#249#150
+  +#171#249#150#172#249#151#172#249#152#173#249#153#173#249#152#173#249#154#174
+  +#249#153#174#249#155#175#248#155#175#248#156#176#248#156#176#248#157#177#248
+  +#158#177#248#159#178#248#159#178#248#161#179#248#161#179#248#161#180#248#163
+  +#181#248#164#182#248#164#182#248#165#183#248#166#183#248#167#184#248#168#184
+  +#248#168#185#248#169#186#248#170#187#248#181#183#191#185#185#185#186#186#186
+  +#186#186#186#187#187#187#189#189#189#190#190#190#190#190#190#192#192#192#192
+  +#192#192#193#193#193#194#194#194#195#195#195#196#196#196#197#197#197#198#198
+  +#198#199#199#199#199#199#199#201#201#201#201#201#201#202#202#202#203#203#203
+  +#203#203#203#204#204#204#205#205#205#206#206#206#207#207#207#207#207#207#208
+  +#208#208#209#209#209#210#210#210#211#211#211#211#211#211#212#212#212#213#213
+  +#213#213#213#213#214#214#214#215#215#215#216#216#216#218#218#218#218#218#218
+  +#219#219#219#219#219#219#220#220#220#221#221#221#221#221#221#222#222#222#223
+  +#223#223#223#223#223#224#224#224#225#225#225#225#225#225#226#226#226#227#227
+  +#227#228#228#228#229#229#229#230#230#230#230#230#230#231#231#231#232#232#232
+  +#233#233#233#233#233#233#233#233#233#234#234#234#235#235#235#236#236#236#236
+  +#236#236#236#236#236#237#237#237#238#238#238#239#239#239#239#239#239#240#240
+  +#240#240#240#240#240#240#240#241#241#241#242#242#242#242#242#242#243#243#243
+  +#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246
+  ,#246#246#245#245#245#246#246#246#246#246#246#246#246#246#245#245#245#246#246
+  +#246#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#247#247#247#247#247#247#247#247#247#246#246#246#247#247#247#246#246
+  +#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#188#188#188#187#187#187#186#186#186#184#184#184#182#182#182#181
+  +#181#181#180#180#180#178#178#178#177#177#177#176#176#176#174#174#174#173#173
+  +#173#172#172#172#171#171#171#170#170#170#168#168#168#167#167#167#166#166#166
+  +#164#164#164#163#163#163#161#161#161#160#160#160#159#159#159#157#157#157#156
+  +#156#156#155#155#155#154#154#154#153#153#153#152#152#152#153#160#182#155#178
+  +#250#155#178#250#154#178#250#154#178#250#154#177#250#154#177#250#154#177#250
+  +#153#177#250#153#177#250#153#177#250#153#176#250#153#176#250#153#176#250#152
+  +#176#250#152#176#250#152#175#250#152#175#250#151#175#250#151#175#250#151#175
+  +#250#151#174#250#151#174#250#151#174#250#150#174#250#150#174#250#150#174#250
+  +#150#173#250#150#173#250#149#173#250#149#173#250#149#173#250#149#173#250#149
+  +#172#250#148#172#250#148#172#250#148#172#250#148#172#250#148#171#250#148#171
+  +#250#147#171#250#147#171#250#147#171#250#147#170#250#147#170#250#146#170#250
+  +#146#170#250#146#170#250#146#170#250#145#169#250#145#169#250#145#169#250#145
+  +#169#250#145#169#250#145#169#250#144#168#250#144#168#250#144#168#250#144#168
+  +#250#144#168#250#143#167#250#143#167#250#143#167#250#143#167#250#143#167#250
+  +#142#167#250#142#166#250#142#166#250#142#166#250#142#166#250#142#166#250#141
+  +#166#250#141#165#250#141#166#249#141#166#249#141#165#249#142#166#249#142#165
+  +#249#142#166#249#143#167#249#143#166#249#143#167#249#143#167#249#144#167#249
+  +#144#168#249#145#168#249#145#168#249#146#168#249#146#169#249#146#169#249#147
+  +#169#249#147#169#249#148#171#250#149#171#249#148#170#249#151#172#249#150#172
+  +#249#150#172#249#152#173#249#152#173#249#153#173#249#153#174#249#154#174#249
+  +#154#174#249#154#175#249#156#176#248#157#177#249#158#178#249#158#177#248#159
+  +#178#248#160#179#249#160#179#248#161#180#248#162#180#248#163#181#249#164#182
+  +#249#165#182#249#165#183#249#166#184#249#167#184#248#167#185#248#169#186#248
+  +#170#186#248#171#187#248#176#186#224#184#184#184#185#185#185#186#186#186#187
+  +#187#187#188#188#188#190#190#190#191#191#191#192#192#192#192#192#192#193#193
+  +#193#194#194#194#195#195#195#196#196#196#197#197#197#198#198#198#198#198#198
+  +#199#199#199#201#201#201#202#202#202#202#202#202#203#203#203#204#204#204#205
+  +#205#205#206#206#206#207#207#207#207#207#207#208#208#208#209#209#209#209#209
+  +#209#210#210#210#211#211#211#212#212#212#212#212#212#213#213#213#214#214#214
+  +#214#214#214#215#215#215#216#216#216#217#217#217#218#218#218#218#218#218#219
+  +#219#219#220#220#220#220#220#220#221#221#221#222#222#222#222#222#222#223#223
+  ,#223#224#224#224#225#225#225#225#225#225#226#226#226#227#227#227#228#228#228
+  +#228#228#228#229#229#229#230#230#230#230#230#230#231#231#231#232#232#232#232
+  +#232#232#233#233#233#233#233#233#234#234#234#235#235#235#236#236#236#237#237
+  +#237#237#237#237#237#237#237#238#238#238#238#238#238#239#239#239#240#240#240
+  +#240#240#240#240#240#240#241#241#241#242#242#242#242#242#242#243#243#243#243
+  +#243#243#243#243#243#244#244#244#244#244#244#244#244#244#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#245
+  +#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#189#189#189#188#188#188#186#186#186#185#185#185#184#184#184#182#182
+  +#182#181#181#181#180#180#180#178#178#178#177#177#177#175#175#175#174#174#174
+  +#173#173#173#172#172#172#171#171#171#170#170#170#168#168#168#167#167#167#166
+  +#166#166#165#165#165#163#163#163#161#161#161#160#160#160#159#159#159#157#157
+  +#157#156#156#156#155#155#155#154#154#154#153#153#153#153#153#153#154#162#189
+  +#155#178#250#155#178#250#155#178#250#155#178#250#154#178#250#154#178#250#154
+  +#178#250#154#177#250#154#177#250#154#177#250#153#177#250#153#177#250#153#176
+  +#250#153#176#250#153#176#250#152#176#250#152#176#250#152#176#250#152#175#250
+  +#152#175#250#151#174#250#151#175#250#151#175#250#151#174#250#151#174#250#151
+  +#174#250#150#174#250#150#174#250#150#174#250#150#173#250#149#173#250#149#173
+  +#250#149#173#250#149#173#250#149#172#250#149#172#250#148#172#250#148#172#250
+  +#148#172#250#148#172#250#148#171#250#147#171#250#147#171#250#147#171#250#147
+  +#171#250#147#170#250#146#170#250#146#170#250#146#170#250#146#170#250#146#170
+  +#250#145#169#250#145#169#250#145#169#250#145#169#250#145#169#250#145#169#250
+  +#144#168#250#144#168#250#144#168#250#144#168#250#143#168#250#143#167#250#143
+  +#167#250#143#167#250#143#167#250#143#167#250#142#166#250#142#166#250#142#166
+  +#250#142#166#250#142#166#250#142#166#250#142#166#250#143#166#250#142#166#250
+  ,#143#167#250#143#167#250#143#167#250#144#167#250#145#168#250#145#168#250#145
+  +#168#250#146#169#250#146#168#250#146#169#250#147#170#250#148#170#250#147#170
+  +#250#148#170#250#148#171#250#149#171#249#150#172#249#151#172#249#151#172#249
+  +#151#173#249#152#173#249#153#174#249#153#174#249#154#175#249#155#175#249#155
+  +#175#249#156#176#249#157#177#249#157#177#249#158#178#249#159#178#249#160#179
+  +#249#160#179#249#161#180#249#162#180#249#162#181#249#163#181#249#164#182#249
+  +#165#183#249#165#183#249#166#184#249#167#184#248#169#185#248#169#186#248#170
+  +#187#248#171#187#248#180#184#199#184#184#184#185#185#185#187#187#187#188#188
+  +#188#189#189#189#190#190#190#191#191#191#192#192#192#193#193#193#194#194#194
+  +#195#195#195#195#195#195#196#196#196#197#197#197#198#198#198#200#200#200#200
+  +#200#200#201#201#201#202#202#202#203#203#203#204#204#204#204#204#204#205#205
+  +#205#206#206#206#207#207#207#208#208#208#208#208#208#210#210#210#210#210#210
+  +#211#211#211#211#211#211#212#212#212#213#213#213#213#213#213#215#215#215#215
+  +#215#215#216#216#216#216#216#216#217#217#217#218#218#218#218#218#218#219#219
+  +#219#220#220#220#220#220#220#221#221#221#222#222#222#223#223#223#223#223#223
+  +#225#225#225#225#225#225#225#225#225#226#226#226#227#227#227#228#228#228#228
+  +#228#228#229#229#229#230#230#230#231#231#231#232#232#232#233#233#233#234#234
+  +#234#234#234#234#234#234#234#235#235#235#236#236#236#237#237#237#237#237#237
+  +#238#238#238#238#238#238#239#239#239#240#240#240#240#240#240#241#241#241#241
+  +#241#241#242#242#242#242#242#242#243#243#243#242#242#242#244#244#244#244#244
+  +#244#244#244#244#244#244#244#245#245#245#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#247#247#247#246#246#246#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#190#190#190#189#189#189#188#188#188#187#187#187#185#185#185#184#184#184
+  +#182#182#182#181#181#181#180#180#180#178#178#178#177#177#177#175#175#175#174
+  ,#174#174#173#173#173#172#172#172#171#171#171#170#170#170#168#168#168#167#167
+  +#167#166#166#166#164#164#164#163#163#163#161#161#161#160#160#160#159#159#159
+  +#157#157#157#156#156#156#155#155#155#154#154#154#153#153#153#152#152#152#154
+  +#162#189#155#179#250#155#178#250#155#178#250#155#178#250#154#178#250#154#178
+  +#250#154#178#250#154#177#250#154#177#250#154#177#250#153#177#250#153#177#250
+  +#153#176#250#153#176#250#153#176#250#152#176#250#152#176#250#152#176#250#152
+  +#175#250#152#175#250#151#175#250#151#175#250#151#175#250#151#174#250#151#174
+  +#250#151#174#250#150#174#250#150#174#250#150#174#250#150#173#250#149#173#250
+  +#149#173#250#149#173#250#149#173#250#149#172#250#149#172#250#148#172#250#148
+  +#172#250#148#172#250#148#172#250#148#171#250#147#171#250#147#171#250#148#171
+  +#251#147#171#251#147#170#250#147#171#251#146#170#250#146#170#250#146#170#251
+  +#146#170#250#146#170#251#146#170#251#146#170#251#145#169#251#145#169#250#145
+  +#169#251#145#169#251#144#168#250#144#168#250#144#168#251#144#168#251#144#168
+  +#251#143#167#250#143#168#251#143#167#250#143#167#250#143#167#251#143#167#251
+  +#142#166#250#143#167#250#142#166#250#143#167#250#143#167#250#144#168#250#143
+  +#167#250#144#167#250#143#167#250#145#168#250#145#168#250#146#169#250#145#169
+  +#250#146#169#250#147#169#250#147#169#250#147#170#250#148#170#250#149#170#250
+  +#149#171#250#149#172#250#149#171#249#150#172#249#152#173#250#151#172#249#152
+  +#173#250#152#173#249#153#174#250#154#174#249#154#175#249#155#175#249#156#176
+  +#249#156#176#249#158#177#250#157#177#249#159#178#250#160#179#250#160#179#249
+  +#161#180#249#162#181#249#162#181#249#163#182#249#164#182#249#165#183#249#166
+  +#183#249#166#184#249#168#185#249#168#186#249#169#186#249#170#187#249#171#187
+  +#249#175#187#232#184#184#184#185#185#185#187#187#187#188#188#188#188#188#188
+  +#190#190#190#191#191#191#191#191#191#192#192#192#193#193#193#195#195#195#196
+  +#196#196#196#196#196#197#197#197#199#199#199#200#200#200#200#200#200#201#201
+  +#201#202#202#202#203#203#203#204#204#204#205#205#205#205#205#205#207#207#207
+  +#208#208#208#208#208#208#209#209#209#210#210#210#211#211#211#212#212#212#212
+  +#212#212#213#213#213#213#213#213#214#214#214#215#215#215#216#216#216#216#216
+  +#216#217#217#217#217#217#217#218#218#218#219#219#219#219#219#219#220#220#220
+  +#221#221#221#221#221#221#222#222#222#223#223#223#223#223#223#224#224#224#226
+  +#226#226#226#226#226#226#226#226#228#228#228#229#229#229#229#229#229#229#229
+  +#229#230#230#230#231#231#231#231#231#231#232#232#232#233#233#233#234#234#234
+  +#234#234#234#234#234#234#236#236#236#236#236#236#237#237#237#237#237#237#238
+  +#238#238#239#239#239#239#239#239#240#240#240#241#241#241#241#241#241#241#241
+  +#241#242#242#242#242#242#242#243#243#243#243#243#243#244#244#244#244#244#244
+  +#244#244#244#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#247#247#247#246#246#246#246#246#246#246#246#246#247
+  +#247#247#246#246#246#247#247#247#246#246#246#247#247#247#247#247#247#246#246
+  +#246#247#247#247#247#247#247#246#246#246#247#247#247#246#246#246#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  ,#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#191#191#191#190#190#190#190#190#190#188#188#188#187#187#187#186#186#186#185
+  +#185#185#183#183#183#181#181#181#180#180#180#178#178#178#177#177#177#176#176
+  +#176#174#174#174#173#173#173#172#172#172#171#171#171#170#170#170#168#168#168
+  +#167#167#167#166#166#166#165#165#165#163#163#163#162#162#162#160#160#160#159
+  +#159#159#158#158#158#156#156#156#156#156#156#154#154#154#153#153#153#153#153
+  +#153#154#162#189#156#179#251#156#179#251#155#179#251#155#179#251#155#178#251
+  +#155#178#251#155#178#251#154#178#251#154#178#251#154#178#251#154#177#251#154
+  +#177#251#154#177#251#153#177#251#153#177#251#153#176#251#153#176#251#152#176
+  +#251#152#176#251#152#176#251#152#175#251#152#175#251#152#175#251#151#175#251
+  +#151#175#251#151#175#251#151#174#251#151#174#251#150#174#251#150#174#251#150
+  +#174#251#150#174#251#150#173#251#149#173#251#149#173#251#149#173#251#149#173
+  +#251#149#172#251#149#172#251#148#172#251#148#172#251#148#172#251#148#171#251
+  +#148#171#251#147#171#251#147#171#251#147#171#251#147#171#251#146#170#251#146
+  +#170#251#146#170#251#146#170#251#146#170#251#146#170#251#145#169#251#145#169
+  +#251#145#169#251#145#169#251#145#169#251#144#168#251#144#168#251#144#168#251
+  +#144#168#251#144#168#251#143#168#251#143#167#251#143#167#251#143#167#251#143
+  +#167#251#143#167#250#143#167#250#143#167#250#143#167#250#144#168#250#145#168
+  +#250#144#168#250#144#168#250#145#168#250#146#169#250#146#169#250#146#169#250
+  +#147#170#250#148#170#250#147#170#250#148#170#250#148#171#250#149#171#250#149
+  +#171#250#149#172#250#150#172#250#151#172#250#152#173#250#152#173#250#152#173
+  +#250#153#174#250#154#175#250#154#175#250#155#176#250#155#176#250#156#176#250
+  +#157#177#250#158#177#250#158#178#250#159#179#250#160#179#250#161#180#249#161
+  +#180#249#162#181#249#163#181#249#163#182#249#164#182#249#165#183#249#166#184
+  +#249#167#185#249#168#185#249#168#185#249#169#186#249#170#187#249#171#187#249
+  +#180#184#200#184#184#184#186#186#186#187#187#187#188#188#188#189#189#189#190
+  +#190#190#191#191#191#192#192#192#193#193#193#194#194#194#195#195#195#196#196
+  +#196#196#196#196#197#197#197#198#198#198#200#200#200#201#201#201#202#202#202
+  +#202#202#202#204#204#204#205#205#205#206#206#206#206#206#206#207#207#207#208
+  +#208#208#209#209#209#209#209#209#211#211#211#211#211#211#212#212#212#212#212
+  +#212#213#213#213#214#214#214#214#214#214#215#215#215#216#216#216#216#216#216
+  +#217#217#217#218#218#218#218#218#218#219#219#219#220#220#220#220#220#220#221
+  +#221#221#222#222#222#222#222#222#224#224#224#224#224#224#225#225#225#226#226
+  +#226#226#226#226#227#227#227#228#228#228#229#229#229#229#229#229#230#230#230
+  +#231#231#231#231#231#231#231#231#231#232#232#232#233#233#233#234#234#234#234
+  +#234#234#235#235#235#235#235#235#237#237#237#237#237#237#238#238#238#238#238
+  +#238#239#239#239#239#239#239#240#240#240#241#241#241#241#241#241#241#241#241
+  +#242#242#242#242#242#242#243#243#243#244#244#244#244#244#244#244#244#244#244
+  +#244#244#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247
+  +#247#247#247#247#247#247#247#247#247#247#247#246#246#246#247#247#247#246#246
+  +#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  ,#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#0#0
+  +#6'TBevel'#6'Bevel2'#6'Height'#2#2#3'Top'#2'@'#5'Width'#3#244#1#5'Align'#7#5
+  +'alTop'#5'Shape'#7#9'bsTopLine'#0#0#6'TBevel'#6'Bevel3'#6'Height'#2#2#3'Top'
+  +#3#0#1#5'Width'#3#244#1#5'Align'#7#8'alBottom'#5'Shape'#7#9'bsTopLine'#0#0#6
+  +'TLabel'#11'lbl_Caption'#4'Left'#2#5#6'Height'#2#14#3'Top'#2'H'#5'Width'#3
+  +#162#0#7'Caption'#6#27'Select Ancestor Type for %s'#11'Font.Height'#2#245#9
+  +'Font.Name'#6#6'Tahoma'#10'Font.Style'#11#6'fsBold'#0#11'ParentColor'#8#0#0#6
+  +'TLabel'#6'Label2'#4'Left'#2#24#6'Height'#2#16#3'Top'#2'\'#5'Width'#3'd'#1#7
+  +'Caption'#6'DSelect the class to use as ancestor for your RemObjects SDK Ser'
+  +'vice:'#11'ParentColor'#8#0#0#11'TRadioGroup'#11'rgClassType'#4'Left'#2#24#6
+  +'Height'#3#134#0#3'Top'#2'p'#5'Width'#3#197#1#7'Anchors'#11#5'akTop'#6'akLef'
+  +'t'#7'akRight'#8'akBottom'#0#8'AutoFill'#9#7'Caption'#6#17' Available Types '
+  +#28'ChildSizing.LeftRightSpacing'#2#6#28'ChildSizing.TopBottomSpacing'#2#6#29
+  +'ChildSizing.EnlargeHorizontal'#7#24'crsHomogenousChildResize'#27'ChildSizin'
+  +'g.EnlargeVertical'#7#24'crsHomogenousChildResize'#28'ChildSizing.ShrinkHori'
+  +'zontal'#7#14'crsScaleChilds'#26'ChildSizing.ShrinkVertical'#7#14'crsScaleCh'
+  +'ilds'#18'ChildSizing.Layout'#7#29'cclLeftToRightThenTopToBottom'#27'ChildSi'
+  +'zing.ControlsPerLine'#2#1#12'ClientHeight'#2't'#11'ClientWidth'#3#193#1#13
+  +'Items.Strings'#1#6#1'1'#6#1'2'#6#1'3'#6#1'4'#6#1'5'#6#1'6'#0#7'OnClick'#7#16
+  +'rgClassTypeClick'#8'TabOrder'#2#0#0#0#6'TPanel'#9'GroupBox1'#4'Left'#2#24#6
+  +'Height'#2'7'#3'Top'#3'.'#1#5'Width'#3#139#2#7'Anchors'#11#6'akLeft'#7'akRig'
+  +'ht'#8'akBottom'#0#10'BevelOuter'#7#9'bvLowered'#12'ClientHeight'#2'7'#11'Cl'
+  +'ientWidth'#3#139#2#5'Color'#7#8'clInfoBk'#11'ParentColor'#8#8'TabOrder'#2#1
+  +#0#6'TLabel'#13'lbDescription'#4'Left'#2#5#6'Height'#2'+'#3'Top'#2#5#5'Width'
+  +#3#129#2#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#8'AutoSiz'
+  +'e'#8#7'Caption'#6'#Test description goes right here...'#11'ParentColor'#8#8
+  +'WordWrap'#9#0#0#0#6'TPanel'#6'Panel1'#6'Height'#2'#'#3'Top'#3#2#1#5'Width'#3
+  +#244#1#5'Align'#7#8'alBottom'#10'BevelOuter'#7#6'bvNone'#12'ClientHeight'#2
+  +'#'#11'ClientWidth'#3#244#1#8'TabOrder'#2#2#0#7'TBitBtn'#6'btn_Ok'#4'Left'#3
+  +'U'#1#6'Height'#2#25#3'Top'#2#5#5'Width'#2'K'#7'Anchors'#11#7'akRight'#8'akB'
+  +'ottom'#0#7'Caption'#6#2'OK'#7'Default'#9#10'Glyph.Data'#10':'#6#0#0'6'#6#0#0
+  +'BM6'#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0' '#0#0#0#16#0#0#0#1#0#24#0#0#0#0#0#0#6
+  +#0#0#196#14#0#0#196#14#0#0#0#0#0#0#0#0#0#0#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  ,#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0'f'#0#0'f'#0#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'eeeeee'#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0'f'#0#30#178'1'#31#177'3'
+  +#0'f'#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'eee'#154#154#154#154#154
+  +#154'eee'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#0'f'#0'1'#194'O"'#183'8'#26#176
+  +'-!'#180'7'#0'f'#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255'eee'#171#171#171#158#158#158#151
+  +#151#151#156#156#156'eee'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#0'f'#0'G'#211'm;'#203'^%'#168';'#0
+  +'f'#0#27#169'.'#29#177'2'#0'f'#0#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255'eee'#191#191#191#181#181#181#152#152#152
+  +'eee'#148#148#148#153#153#153'eee'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#0'f'#0'O'#214'yS'#222'1'#181'M'#0'f'#0#255#0
+  +#255#0'f'#0#23#157''''#30#174'1'#0'f'#0#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255'eee'#196#196#196#202#202#202#165#165#165'eee'#255#0
+  +#255'eee'#140#140#140#152#152#152'eee'#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#0'f'#0'A'#197'c'#0'f'#0#255#0#255#255#0
+  +#255#255#0#255#255#0#255#0'f'#0#25#170'+'#0'f'#0#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255'eee'#181#181#181'eee'#255#0#255#255#0#255
+  +#255#0#255#255#0#255'eee'#147#147#147'eee'#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#0'f'#0#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#0'f'#0#20#157'!'#0'f'#0#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255'eee'#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255'eee'#138#138#138'eee'#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#0'f'#0#0'f'#0#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'eeeeee'#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0'f'#0#0'f'#0
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'eeeeee'#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#11'ModalResult'#2#1#9'NumGlyphs'#2#2#8'TabOrd'
+  +'er'#2#0#0#0#7'TBitBtn'#7'Button2'#4'Left'#3#164#1#6'Height'#2#25#3'Top'#2#5
+  +#5'Width'#2'K'#7'Anchors'#11#7'akRight'#8'akBottom'#0#6'Cancel'#9#7'Caption'
+  ,#6#6'Cancel'#10'Glyph.Data'#10':'#6#0#0'6'#6#0#0'BM6'#6#0#0#0#0#0#0'6'#0#0#0
+  +'('#0#0#0' '#0#0#0#16#0#0#0#1#0#24#0#0#0#0#0#0#6#0#0#196#14#0#0#196#14#0#0#0
+  +#0#0#0#0#0#0#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#0#0#154#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#0#0#154#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255'kkkkkk'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255'kkkkkk'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0#0#154#23'J'
+  +#253#16';'#244#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255#0#0#154#0','
+  +#248#0'0'#252#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255'kkk'#168#168
+  +#168#160#160#160'kkk'#255#0#255#255#0#255#255#0#255#255#0#255'kkk'#154#154
+  +#154#156#156#156'kkk'#255#0#255#255#0#255#255#0#255#255#0#255#0#0#154#26'G'
+  +#248#26'L'#255#18';'#241#0#0#154#255#0#255#255#0#255#0#0#154#1'-'#246#1'2'
+  +#255#0'*'#243#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255'kkk'#167#167
+  +#167#170#170#170#159#159#159'kkk'#255#0#255#255#0#255'kkk'#153#153#153#158
+  +#158#158#151#151#151'kkk'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0
+  +#0#154#28'G'#246#27'M'#255#20'>'#244#0#0#154#0#0#154#0'-'#248#1'4'#255#3'+'
+  +#242#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'kkk'
+  +#167#167#167#171#171#171#162#162#162'kkkkkk'#154#154#154#158#158#158#152#152
+  +#152'kkk'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#0#0#154#29'H'#246#29'P'#255#16'='#251#4'1'#254#1'2'#255#0','#246#0#0#154
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255'kkk'#167#167#167#172#172#172#163#163#163#159#159#159#158#158#158#153#153
+  +#153'kkk'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#0#0#154#26'H'#249#19'B'#255#12'<'#255#7'3'#246#0#0
+  +#154#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255'kkk'#167#167#167#167#167#167#163#163#163#156
+  +#156#156'kkk'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#0#0#154'!N'#252#29'K'#255#24'G'#255#23
+  +'C'#246#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255'kkk'#172#172#172#172#172#172#169#169
+  +#169#164#164#164'kkk'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#0#0#154'.['#249',_'#255'"M'#248' K'#248'#'
+  +'U'#255#27'F'#246#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255'kkk'#177#177#177#179#179#179#171#171#171#170
+  +#170#170#175#175#175#166#166#166'kkk'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#0#0#154'6d'#250'8k'#255'-Y'#244#0#0#154#0#0
+  +#154'"L'#244'%X'#255#29'I'#246#0#0#154#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255'kkk'#182#182#182#185#185#185#174#174#174'kkkkkk'#169
+  +#169#169#176#176#176#167#167#167'kkk'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#0#0#154'@q'#250'Bt'#255'2]'#241#0#0#154#255#0#255#255#0#255#0#0
+  +#154'"M'#241'''Z'#255' L'#248#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255
+  +'kkk'#187#187#187#190#190#190#175#175#175'kkk'#255#0#255#255#0#255'kkk'#167
+  +#167#167#177#177#177#170#170#170'kkk'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#0#0#154'Iz'#252';f'#243#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255#0#0
+  +#154'%P'#244'&U'#250#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255'kkk'#192
+  +#192#192#181#181#181'kkk'#255#0#255#255#0#255#255#0#255#255#0#255'kkk'#170
+  +#170#170#174#174#174'kkk'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0
+  +#0#154#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0
+  +#0#154#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'k'
+  +'kkkkk'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'kkkkkk'
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  ,#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#11'Mo'
+  +'dalResult'#2#2#9'NumGlyphs'#2#2#8'TabOrder'#2#1#0#0#0#0
+]);
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fROServerClassForm.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fROServerClassForm.pas
new file mode 100644
index 0000000..2776d1f
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fROServerClassForm.pas	
@@ -0,0 +1,118 @@
+unit fROServerClassForm;
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+
+uses
+  {$IFDEF FPC}LCLIntf, LResources,{$ENDIF}
+  {$IFDEF MSWINDOWS}Windows,{$ENDIF}
+  Messages, SysUtils, Classes, Graphics, Controls, Forms,
+  Dialogs, StdCtrls, ExtCtrls, Buttons;
+
+type
+  TROServerClassForm = class(TForm)
+    rgClassType: TRadioGroup;
+    GroupBox1: TPanel;
+    lbDescription: TLabel;
+    Image2: TImage;
+    Bevel2: TBevel;
+    Panel1: TPanel;
+    btn_Ok: TBitBtn;
+    Button2: TBitBtn;
+    Bevel3: TBevel;
+    lbl_Caption: TLabel;
+    Label2: TLabel;
+    procedure FormCreate(Sender: TObject);
+    procedure rgClassTypeClick(Sender: TObject);
+  private
+    function GetServerClassName : string;
+    function GetRequiredUnits: string;
+
+  public
+    property ServerClassName : string read GetServerClassName;
+    property RequiredUnits : string read GetRequiredUnits;
+  end;
+
+var
+  ROServerClassForm: TROServerClassForm;
+
+function SelectROServerClassType(const ServiceName : string; out aServerClassname : string; out someRequiredUnits : string) : boolean;
+
+implementation
+
+uses uRODLGenTools, uROServer, uRORemoteDataModule;
+
+{$IFNDEF FPC}
+{$R *.dfm}
+{$ENDIF FPC}
+
+
+function SelectROServerClassType(const ServiceName : string; out aServerClassname : string; out someRequiredUnits : string) : boolean;
+begin
+  with TROServerClassForm.Create(NIL) do try
+    Caption := Format(Caption, [ServiceName]);
+    lbl_Caption.Caption := Format(lbl_Caption.Caption, [ServiceName]);
+
+    result := (ShowModal=mrOK);
+    aServerClassname := ServerClassName;
+    someRequiredUnits := RequiredUnits;
+  finally
+    Free;
+  end;
+end;
+
+procedure TROServerClassForm.FormCreate(Sender: TObject);
+var i : integer;
+    s : string;
+begin
+  rgClassType.Items.Clear;
+
+  rgClassType.Items.Add('&Simple object');
+  for i := (GetRODataModuleClassCount-1) downto 0 do begin
+    s := GetRODataModuleClass(i).Alias;
+    //if (i=0) then s := s+' (Reccommended)';
+    if GetRODataModuleClass(i).ClassType = TRORemoteDataModule then
+      s := s+' (recommended)';
+    rgClassType.Items.Add(s);
+  end;
+
+  rgClassType.ItemIndex := 1; { we've added one additional item }
+
+  //Height := (225*(GetRODataModuleClassCount+1)) div 3
+
+  ClientHeight := 250 + (GetRODataModuleClassCount()*(Canvas.TextHeight('String') + 10));
+end;
+
+function TROServerClassForm.GetRequiredUnits: string;
+begin
+  if (rgClassType.ItemIndex=0)
+    then result := ''
+    else result := GetRODataModuleClass(GetRODataModuleClassCount-rgClassType.ItemIndex).RequiredUnits
+end;
+
+function TROServerClassForm.GetServerClassName : string;
+begin
+  if (rgClassType.ItemIndex=0)
+    then result := TRORemotable.ClassName
+    else result := GetRODataModuleClass(GetRODataModuleClassCount-rgClassType.ItemIndex).ClassType.ClassName
+end;
+
+procedure TROServerClassForm.rgClassTypeClick(Sender: TObject);
+begin
+  if (rgClassType.ItemIndex=0) then
+    lbDescription.Caption := 'Non-visual Delphi object. Recommended for services that do not require additional components '+
+                                  'and don''t need to provide the design time features of a data module.'
+  else
+    lbDescription.Caption := GetRODataModuleClass(GetRODataModuleClassCount-rgClassType.ItemIndex).Description;
+end;
+
+{$IFDEF FPC}
+initialization
+  {$I fROServerClassForm.lrs}
+{$ENDIF FPC}
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fServerProjectOptions.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fServerProjectOptions.dfm
new file mode 100644
index 0000000..0d55707
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fServerProjectOptions.dfm	
@@ -0,0 +1,3445 @@
+object ServerProjectOptions: TServerProjectOptions
+  Left = 338
+  Top = 184
+  ActiveControl = ePrjName
+  BorderIcons = [biSystemMenu]
+  BorderStyle = bsDialog
+  Caption = 'RemObjects SDK Server - Advanced Project Options'
+  ClientHeight = 317
+  ClientWidth = 500
+  Color = clBtnFace
+  Constraints.MinHeight = 238
+  Constraints.MinWidth = 300
+  ParentFont = True
+  OldCreateOrder = False
+  Position = poScreenCenter
+  OnCloseQuery = FormCloseQuery
+  OnCreate = FormCreate
+  PixelsPerInch = 96
+  TextHeight = 13
+  object Label1: TLabel
+    Left = 8
+    Top = 128
+    Width = 105
+    Height = 13
+    Caption = 'Service Library Name:'
+  end
+  object Label2: TLabel
+    Left = 8
+    Top = 154
+    Width = 69
+    Height = 13
+    Caption = 'Service Name:'
+  end
+  object Label3: TLabel
+    Left = 8
+    Top = 102
+    Width = 68
+    Height = 13
+    Caption = 'Project Name:'
+  end
+  object Label5: TLabel
+    Left = 8
+    Top = 244
+    Width = 71
+    Height = 13
+    Caption = 'Project Folder:'
+  end
+  object Bevel1: TBevel
+    Left = 4
+    Top = 277
+    Width = 494
+    Height = 2
+    Anchors = [akLeft, akRight, akBottom]
+  end
+  object Label4: TLabel
+    Left = 8
+    Top = 76
+    Width = 91
+    Height = 13
+    Caption = 'Template Location:'
+  end
+  object Label6: TLabel
+    Left = 8
+    Top = 213
+    Width = 74
+    Height = 13
+    Caption = 'Message Class:'
+  end
+  object Label7: TLabel
+    Left = 8
+    Top = 188
+    Width = 64
+    Height = 13
+    Caption = 'Server Class:'
+  end
+  object Label8: TLabel
+    Left = 119
+    Top = 188
+    Width = 196
+    Height = 13
+    Caption = 'Not available in this kind of server'
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWindowText
+    Font.Height = -11
+    Font.Name = 'MS Sans Serif'
+    Font.Style = [fsBold]
+    ParentFont = False
+  end
+  object Image2: TImage
+    Left = 0
+    Top = 0
+    Width = 500
+    Height = 64
+    Align = alTop
+    AutoSize = True
+    Picture.Data = {
+      07544269746D617036770100424D36770100000000003600000028000000F401
+      000040000000010018000000000000770100C01E0000C01E0000000000000000
+      0000858585858585858585858585858585858585858585858585858585858585
+      8585858484848484848484848484848484848484848484848484848484848484
+      8484848483838383838383838383838383838383838383838383838383838383
+      8383838383838383838383828282828282828282828282828282828282828282
+      8282828282828282828282828181818181818181818181818181818181818181
+      8181818181818181818181818181818180808081818181818180808080808080
+      80808080808080808080808080808080808080808080807F7F7F7F7F7F7F7F7F
+      7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7E7E7E7E7E7E7E7E7E7E7E7E7F7F7F7F7F
+      7F7F7F7F7F7F7F7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E
+      7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7D7D7D7D7D7D7D7D7D7D7D7D
+      7C7C7C7C7C7C7B7B7B7A7A7A7979797979797878787878787777777676767575
+      757575757474747575757474747474747474746A7CC3677FDD677FDD6880DC69
+      80DD6981DD6A81DC6A81DC6B82DC6B82DC6C82DC6C83DC6E83D6808495878787
+      8B8B8B8D8D8D8F8F8F9090909191919292929292929292929292929191919191
+      919090909090909090908F8F8F8F8F8F8F8F8F8F8F8F8F8F8F90909091919191
+      9191929292929292929292949494949494959595969696969696979797979797
+      9898989A9A9A9A9A9A9A9A9A9B9B9B9C9C9C9D9D9D9D9D9D9E9E9E9F9F9FA0A0
+      A0A0A0A0A2A2A2A2A2A2A2A2A2A3A3A3A5A5A5A5A5A5A6A6A6A7A7A7A8A8A8A8
+      A8A8A9A9A9A9A9A9ABABABACACACACACACAEAEAEAFAFAFB0B0B0B2B2B2B3B3B3
+      B5B5B5B6B6B6B7B7B7B9B9B9BABABABBBBBBBCBCBCBDBDBDBEBEBEBFBFBFBFBF
+      BFC0C0C0C0C0C0C1C1C1C2C2C2C2C2C2C2C2C2C2C2C2C3C3C3C3C3C3C4C4C4C4
+      C4C4C5C5C5C5C5C5C6C6C6C6C6C6C7C7C7C7C7C7C8C8C8C8C8C8C9C9C9CACACA
+      CBCBCBCBCBCBCCCCCCCCCCCCCDCDCDCECECECECECECFCFCFD0D0D0D1D1D1D1D1
+      D1D2D2D2D2D2D2D2D2D2D3D3D3D3D3D3D4D4D4D4D4D4D4D4D4D4D4D4D4D4D4D4
+      D4D4D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D6D6D6D6D6D6D6D6D6D6D6D6D6D6D6
+      D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8D8D8D8D8D8D8D8D8D8D8D8
+      D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADA
+      DADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDCDCDCDCDCDC
+      DCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFE0
+      E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1
+      E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBECECECECECECECECECECECECECECECECECECEDEDEDECECECEDEDEDEDED
+      EDEDEDEDEDEDEDEEEEEEEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F5F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78686
+      8685858585858585858585858585858585858585858585858585858585858585
+      8585848484848484848484848484848484848484848484848484848484848484
+      8484848383838383838383838383838383838383838383838383838383838383
+      8383838383838383838382828282828283838382828282828282828282828282
+      8282828282828282828282818181818181818181818181818181818181818181
+      8181818181818181818181818181818181818181818080808080808080808080
+      808080808080808080808080808080808080808080807F7F7F7F7F7F7F7F7F80
+      80808080807F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F8080808080807F7F7F
+      7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7E7E7E7E7E7E7F7F7F7F7F7F7F7F7F7E7E
+      7E7E7E7E7F7F7F7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7D7D7D7D7D7D7D7D7D7C
+      7C7C7C7C7C7B7B7B7A7A7A7A7A7A797979797979787878777777767676767676
+      7575757676767676767575757575757377896880DD6880DD6981DD6981DD6A81
+      DD6A82DD6B82DD6A82DD6C83DD6D83DD6D83DC6E84DC7084D77F87A88C8C8C8E
+      8E8E919191919191939393939393949494949595959696969797959797969898
+      9698989596969495959394949293939191919191919191919292929292929393
+      939393939393939494949595959595959797979797979898989898989999999A
+      9A9A9B9B9B9C9C9C9D9D9D9D9D9D9E9E9E9E9E9E9F9F9FA0A0A0A0A0A0A1A1A1
+      A2A2A2A3A3A3A4A4A4A4A4A4A5A5A5A6A6A6A7A7A7A8A8A8A8A8A8A9A9A9AAAA
+      AAABABABACACACADADADADADADAEAEAEAFAFAFB1B1B1B1B2BAB0B3C1AFB3C7B0
+      B4C9B2B6CAB2B6CAB4B7CAB5B8CAB8BAC6BBBCC3BFBFC0C0C0C0C0C0C0C1C1C1
+      C1C1C1C3C3C3C3C3C3C3C3C3C4C4C4C4C4C4C4C4C4C4C4C4C6C6C6C5C5C5C6C6
+      C6C6C6C6C7C7C7C7C7C7C8C8C8C9C9C9C9C9C9C9C9C9CACACACCCCCCCCCCCCCC
+      CCCCCDCDCDCECECECECECECFCFCFCFCFCFD0D0D0D1D1D1D2D2D2D3D3D3D3D3D3
+      D3D3D3D3D3D3D4D4D4D4D4D4D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D6D6
+      D6D6D6D6D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8
+      D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D9D9D9D8D8D8
+      D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9DADADAD9D9D9DADADADADADADADADADADA
+      DADADADADBDBDBDBDBDBDBDBDBDBDBDBDCDCDCDBDBDBDCDCDCDCDCDCDCDCDCDD
+      DDDDDCDCDCDDDDDDDEDEDEDDDDDDDEDEDEDEDEDEDDDDDDDDDDDDDEDEDEDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFE0E0E0E0E0E0E0E0
+      E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E2
+      E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAE9E9E9EAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECEC
+      ECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F3
+      F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7868686868686
+      8686868686868686868585858585858686868686868686868585858585858585
+      8585858585858585858585858585858584848485858585858584848484848484
+      8484848484848484848484848484848484848484848484848484838383838383
+      8383838383838383838383838383838383838383838383838383838282828282
+      8282828282828282828282828282828282828282828282828282828281818181
+      8181818181818181818181818181818181818181818181818181818181818181
+      8181818181818181818181818080808080808080808080808080808080808080
+      808080807F7F7F8080808080808080807F7F7F8080808080808080807F7F7F7F
+      7F7F7F7F7F7F7F7F8080808080807F7F7F8080808080808080808080807F7F7F
+      8080808080807F7F7F7F7F7F7E7E7E7F7F7F7E7E7E7E7E7E7E7E7E7D7D7D7D7D
+      7D7C7C7C7B7B7B7B7B7B7A7A7A79797979797979797978787877777777777776
+      76767676767676767676767676766E7CB06981DE6980DD6A82DE6B82DD6B82DD
+      6B82DD6C83DD6C83DE6D84DC6E84DD6E85DD6F85DD6F85DC8089AF8F8F8F9191
+      919393939393939494949797979899999A9C9C9B9E9E9EA1A19FA3A39FA3A39E
+      A2A29C9F9F999B9B969898949595929393919191919191929292939393939393
+      9494949595959595959696969797979797979898989898989A9A9A9B9B9B9B9B
+      9B9C9C9C9C9C9C9D9D9D9E9E9E9F9F9F9F9F9FA0A0A0A0A0A0A1A1A1A3A3A3A3
+      A3A3A4A4A4A4A4A4A5A5A5A6A6A6A7A7A7A8A8A8A8A8A8A9A9A9A9A9A9ACACAC
+      ACACACADADADAEAEAEAEAFB3ABAFC3AAAFCDABB1D0ACB2CFAEB3CFAEB3CFB0B5
+      D0B1B6CFB2B6CFB2B7CFB3B8CFB4B8CFB6BAD0BABCCBBEBFC5C1C1C1C2C2C2C2
+      C2C2C3C3C3C3C3C3C4C4C4C4C4C4C4C4C4C5C5C5C6C6C6C6C6C6C6C6C6C6C6C6
+      C7C7C7C8C8C8C9C9C9C8C8C8CACACACACACACACACACCCCCCCCCCCCCCCCCCCDCD
+      CDCECECECECECECFCFCFD0D0D0D0D0D0D0D0D0D1D1D1D3D3D3D3D3D3D3D3D3D3
+      D3D3D4D4D4D4D4D4D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D6D6D6
+      D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8D8D8
+      D8D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADA
+      DADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDCDCDC
+      DCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDDDD
+      DDDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDF
+      DFDFDFDFDFE0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3
+      E3E3E3E3E2E2E2E3E3E3E4E4E4E3E3E3E4E4E4E3E3E3E3E3E3E5E5E5E4E4E4E4
+      E4E4E5E5E5E4E4E4E5E5E5E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECEC
+      ECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEEEEEE
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F2F2F2F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7
+      F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F787878787878787878786
+      8686868686868686868686868686868686868686868686858585858585858585
+      8585858585858585858585858585858585858585858585858484848484848484
+      8484848484848484848484848484848484848484848484848483838383838383
+      8383838383838383838383838383838383838383838383838383838383828282
+      8282828282828282828282828282828282828282828282828282828181818181
+      8181818182828282828281818181818181818181818181818181818181818181
+      8181818181818181828282808080808080808080808080808080808080808080
+      8080808080808080808080808080808080808080808080808080808080808181
+      8181818180808080808081818181818181818181818181818181818181818181
+      81818080808080808080807F7F7F7F7F7F7E7E7E7E7E7E7E7E7E7D7D7D7C7C7C
+      7C7C7C7B7B7B7B7B7B7A7A7A7979797979797878787777777878787777777777
+      7776767676767677777777787E6A80D76A81DD6B82DE6B83DD6B83DD6C83DD6D
+      84DE6E84DD6E84DD6E84DD6F85DD6F85DD7086DC7086DC7C8ABF919191939393
+      9494949697979899999C9E9EA0A4A4A5ABABA9B1B1ACB5B5ACB5B5ACB4B4A7AF
+      AFA3A9A99EA3A39A9D9D96989895969694949493939394949494949495959595
+      95959696969797979797979898989999999999999A9A9A9B9B9B9C9C9C9C9C9C
+      9D9D9D9F9F9F9F9F9F9F9F9FA0A0A0A0A0A0A1A1A1A2A2A2A3A3A3A4A4A4A4A4
+      A4A5A5A5A7A7A7A7A7A7A8A8A8A8A8A8A9A9A9AAAAAAAAAAAAACACACADADADAD
+      AEB2AAAFC4A9AFD0AAB0D0AAB0D0ACB2D0AEB3D0AEB3D0AFB4D0B0B5D0B2B7D0
+      B3B7D0B3B8D0B4B8D0B5B9D0B6BAD0B7BAD0B7BBD0BABDCEBFC0C5C2C2C2C3C3
+      C3C4C4C4C4C4C4C4C4C4C4C4C4C5C5C5C6C6C6C6C6C6C6C6C6C6C6C6C7C7C7C7
+      C7C7C9C9C9CACACACACACACACACACBCBCBCCCCCCCCCCCCCDCDCDCDCDCDCECECE
+      CFCFCFCFCFCFD0D0D0D0D0D0D1D1D1D2D2D2D3D3D3D3D3D3D3D3D3D4D4D4D4D4
+      D4D4D4D4D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D6D6D6D6D6D6D6
+      D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8D8D8D8D8D8D8
+      D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADADA
+      DADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDCDCDCDC
+      DCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDF
+      DFDFDFDFE0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECEC
+      ECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F2F2F2F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F5F5F5F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7
+      F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78787878787878787878787878686
+      8686868686868686868686868686868686868686868686868686868686868685
+      8585858585858585858585858585858585858585858585858585858585858585
+      8484848484848484848585858585858484848484848484848484848484848484
+      8484848484848484848483838384848483838383838383838383838383838383
+      8383838383838383828282838383838383828282828282828282828282828282
+      8282828383838282828282828282828282828181818181818181818282828181
+      8181818181818181818181818181818181818181818181818181818181818181
+      8181818181818181818181808080818181818181828282828282818181828282
+      8282828282828282828282828282828282828282828282828282828282828282
+      828181818181818080808080807F7F7F7F7F7F7E7E7E7E7E7E7E7E7E7D7D7D7C
+      7C7C7C7C7C7B7B7B7B7B7B7A7A7A7A7A7A797979787878787878777777777777
+      787878777777787878727CA56B82DE6B83DE6C83DE6C83DE6C84DE6E84DE6E84
+      DD6E85DE6F85DD6F85DD7086DD7086DD7086DC7287DC7889CE91929894949497
+      97979A9C9C9FA3A3A6ACACAFB8B8B5C0C0BAC7C7BCCACABBC9C9B7C3C3B0BBBB
+      A9B1B1A2A7A79B9E9E9698989494949393939494949595959595959595959696
+      969797979797979898989999999A9A9A9B9B9B9B9B9B9C9C9C9D9D9D9D9D9D9F
+      9F9F9F9F9F9F9F9FA0A0A0A1A1A1A1A1A1A2A2A2A3A3A3A4A4A4A4A4A4A5A5A5
+      A6A6A6A7A7A7A8A8A8A8A8A8A9A9A9AAAAAAABABABACACACAAADBDA8AECEA8AF
+      D0AAB0D0AAB0D0ABB1D0ADB3D0AEB3D0AEB4D0AFB4D0B1B6D1B2B7D0B3B7D0B3
+      B8D0B4B9D0B5B9D0B7BBD1B8BCD1B8BCD1BABDD0BBBED0BEC0CDC4C4C5C5C5C5
+      C5C5C5C5C5C5C6C6C6C6C6C6C6C6C6C7C7C7C8C8C8C8C8C8C8C8C8C8C8C8CACA
+      CACACACACBCBCBCBCBCBCBCBCBCDCDCDCDCDCDCDCDCDCECECECFCFCFD0D0D0D0
+      D0D0D1D1D1D1D1D1D2D2D2D3D3D3D4D4D4D4D4D4D4D4D4D5D5D5D5D5D5D5D5D5
+      D5D5D5D6D6D6D6D6D6D6D6D6D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D6D6D6D7D7
+      D7D8D8D8D8D8D8D7D7D7D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9
+      D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADADADADADADA
+      DADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDCDCDCDCDCDCDCDCDCDCDC
+      DCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDEDEDEDEDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFE0E0E0
+      E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E2E2
+      E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7
+      E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBECECECECECECECECECECECECEDEDEDECECECEDEDEDEDEDEDECECECEDEDEDED
+      EDEDEDEDEDECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7888888888888878787878787888888878787
+      8787878787878787878787878787878787878787878686868686868686868686
+      8686868686868686868686868686868686868686868685858585858585858585
+      8585858585858585858585858585858585858585858585848484848484848484
+      8484848484848484848484848484848484848484848484848383838383838383
+      8383838383838383838383838383838383838383838383838382828282828283
+      8383838383838383828282828282828282828282828282828282828282828282
+      8282828282828282828181818181818282828181818181818181818181818181
+      8181818181818182828281818182828282828283838382828282828282828283
+      8383838383848484848484838383838383838383848484838383838383838383
+      8383838282828181818181818080807F7F7F7E7E7E7E7E7E7D7D7D7D7D7D7C7C
+      7C7C7C7C7B7B7B7A7A7A7A7A7A79797979797979797978787878787878787878
+      78787878787979796D82D26C83DE6C84DE6C83DE6C84DE6D84DE6F85DE6F85DE
+      7086DD7086DD7187DD7187DD7287DD7287DC7388DD778AD38D91A19697979B9D
+      9DA3A7A7ACB4B44F446B41335E41335E41335E41335E5A52769095A6B7C4C4AC
+      B5B5A2A8A89B9E9E979898959595959595959595969696979797979797989898
+      9999999999999A9A9A9A9A9A9C9C9C9C9C9C9D9D9D9E9E9E9E9E9E9F9F9FA0A0
+      A0A0A0A0A1A1A1A2A2A2A2A2A2A3A3A3A4A4A4A5A5A5A5A5A5A6A6A6A6A6A6A8
+      A8A8A8A8A8A9A9A9AAAAAAABABABABABABA8ADC3A7AED2A7AED1A8AFD0AAB1D1
+      AAB1D0ABB1D0ADB3D0AEB4D1AFB5D1B0B5D1B1B6D1B3B8D1B3B8D1B5B9D1B5B9
+      D1B6BAD0B7BBD1B8BCD1B9BDD0BABDD0BBBED0BBBED0BEC0CFC4C4C7C6C6C6C5
+      C5C5C6C6C6C7C7C7C7C7C7C7C7C7C8C8C8C8C8C8C8C8C8C9C9C9CACACACACACA
+      CBCBCBCBCBCBCCCCCCCDCDCDCDCDCDCECECECECECECFCFCFCFCFCFD0D0D0D1D1
+      D1D1D1D1D2D2D2D2D2D2D4D4D4D4D4D4D4D4D4D5D5D5D5D5D5D5D5D5D6D6D6D6
+      D6D6D6D6D6D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8
+      D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9DADA
+      DADADADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDB
+      DBDBDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDD
+      DDDDDDDDDDDDDEDEDEDDDDDDDEDEDEDEDEDEDDDDDDDEDEDEDFDFDFDEDEDEDEDE
+      DEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFE0E0E0E0E0E0E0
+      E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E2E2E2
+      E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E4E4
+      E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECEC
+      ECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F1F1F1F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F788888888888888888888888888888888888888888888
+      8888888888878787878787878787878787878787878787878787878787868686
+      8686868787878787878787878686868686868686868686868686868686868686
+      8686868686868686868686868685858585858585858585858585858585858585
+      8585858585848484858585848484848484848484848484838383848484838383
+      8383838484848484848484848484848383838484848383838383838383838383
+      8383838383838383838383838382828282828283838382828283838382828282
+      8282828282828282818181828282828282818181818181828282828282828282
+      8181818282828383838282828383838383838383838484848484848484848484
+      8484848485858585858585858585858585858585858585858584848484848483
+      83838383838282828282828181818080807F7F7F7E7E7E7E7E7E7D7D7D7D7D7D
+      7C7C7C7B7B7B7B7B7B7A7A7A7A7A7A7A7A7A7979797979797979797878787979
+      797A7A7A777D936C84DF6D84DF6D85DE6E85DE6E85DE6F85DE7086DE7087DE71
+      87DE7187DD7187DD7388DD7388DE7489DD7489DD778AD88C93AD9C9E9EA4A9A9
+      AEB7B73F32603F32603F32603F32603F32603F32603F3260716F8DB9C6C6ABB3
+      B3A1A6A69A9C9C9797979696969696969797979898989898989898989999999A
+      9A9A9A9A9A9A9A9A9C9C9C9D9D9D9D9D9D9E9E9E9E9E9EA0A0A0A0A0A0A0A0A0
+      A1A1A1A2A2A2A2A2A2A3A3A3A4A4A4A4A4A4A5A5A5A6A6A6A6A6A6A8A8A8A9A9
+      A9A9A9A9AAAAAAAAAAADA6ACCAA6AED2A7AED2A9B0D2A9B0D1AAB1D1ABB1D1AC
+      B2D1AEB3D1AEB4D1AFB5D1B0B5D1B2B7D2B3B8D1B4B9D1B4B9D1B6BAD1B7BBD1
+      B7BBD1B9BDD2BABED1BBBED1BCBFD1BDC0D2BEC1D2BFC2D1C5C6C9C7C7C7C7C7
+      C7C8C8C8C8C8C8C8C8C8C9C9C9C9C9C9CACACAC9C9C9CBCBCBCBCBCBCCCCCCCC
+      CCCCCDCDCDCECECECECECECFCFCFD0D0D0D0D0D0D0D0D0D0D0D0D2D2D2D3D3D3
+      D3D3D3D4D4D4D5D5D5D5D5D5D4D4D4D5D5D5D5D5D5D6D6D6D6D6D6D6D6D6D6D6
+      D6D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8D8D8D8D8
+      D8D8D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADA
+      DADADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDCDC
+      DCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDE
+      DEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDF
+      DFDFDFE0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E2E2E2E3
+      E3E3E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4
+      E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E8E8E8E9E9E9
+      E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECEC
+      ECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F78989898989898989898989898888888989898888888888888888
+      8888888888888888888888888888888888888887878787878787878787878786
+      8686878787878787878787878787868686878787868686868686878787868686
+      8686868686868686868686868686868686868585858585858585858585858686
+      8685858585858585858585858585858584848484848484848484848484848484
+      8484848484848484848484848484838383848484838383838383838383838383
+      8383838383838383838383838383838383838383838383838383838383838282
+      8282828283838382828282828282828282828283838382828282828282828282
+      8282838383848484838383848484848484858585858585858585868686868686
+      8686868787878787878787878787878787878787878686868585858585858585
+      858383838383838282828181818080807F7F7F7F7F7F7F7F7F7E7E7E7D7D7D7C
+      7C7C7C7C7C7B7B7B7B7B7B7A7A7A7A7A7A7A7A7A7A7A7A7979797A7A7A7A7A7A
+      7A7A7A7181BF6D84DF6E85DF6F86DF6F85DE7086DF7087DF7187DE7188DE7288
+      DE7288DE7389DE7489DD7489DD748ADD758ADD788EDE8E9ABAA1A6A6ACB4B43E
+      30633E30633E30633E30633E30633E30633E30633E3063898DA3B5C0C0A7AEAE
+      9EA1A19899999696969696969797979898989999999999999A9A9A9A9A9A9B9B
+      9B9B9B9B9D9D9D9E9E9E9E9E9E9E9E9EA0A0A0A1A1A1A1A1A1A2A2A2A2A2A2A3
+      A3A3A3A3A3A4A4A4A5A5A5A6A6A6A6A6A6A6A6A6A7A7A7A9A9A9A9A9A9AAAAAA
+      ABABABA7ACC6A6ADD2A7AFD3A9B0D3AAB1D2AAB1D2ABB2D2ACB2D2ADB3D2AFB4
+      D2AFB5D2B0B6D2B2B7D2B3B8D2B3B8D2B5BAD2B5BAD1B7BBD2B7BBD1B8BCD2B9
+      BDD2BABED1BBBED1BCBFD1BDC1D2BEC1D2BFC2D2C0C3D1C6C6C8C7C7C7C7C7C7
+      C9C9C9C8C8C8C9C9C9C9C9C9CACACACACACACBCBCBCCCCCCCCCCCCCCCCCCCDCD
+      CDCECECECECECECFCFCFCFCFCFD0D0D0D1D1D1D1D1D1D2D2D2D3D3D3D3D3D3D5
+      D5D5D5D5D5D5D5D5D5D5D5D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7
+      D7D7D7D7D7D7D8D8D8D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9
+      D9D9D9D9D9D9D9DADADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDB
+      DBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDCDCDC
+      DCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFE0
+      E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1
+      E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3
+      E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECEC
+      ECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7898989898989898989898989898989898989898989898989888888898989
+      8989898888888888888888888888888888888888888888888888888787878787
+      8787878787878787878787878787878787878786868686868687878786868686
+      8686868686868686868686868686868686868686858585858585868686868686
+      8686868585858585858585858585858585858585858484848484848585858585
+      8585858584848484848484848484848484848484848484848484848484848484
+      8484848484838383838383848484838383838383838383838383838383838383
+      8383838383838383838383838383838282828383838383838383838383838484
+      8484848485858585858585858586868686868687878788888888888889898988
+      8888898989898989898989898989888888888888888888878787878787868686
+      8585858484848383838181818080807F7F7F7F7F7F7E7E7E7E7E7E7D7D7D7C7C
+      7C7C7C7C7B7B7B7B7B7B7A7A7A7A7A7A7A7A7A7979797A7A7A7A7A7A7A7A7A7A
+      7D886E85DF6E85DF6F86DF7086DE7086DF7087DF7188DE7288DE7288DE7389DE
+      7389DE758ADE758BDE768BDD768BDD7A8EDE8095E08F9FCAA6ADAD7D7D94B2BD
+      C1C5D5D5B3C1CB58517D3C2F653C2F653C2F65453A6DBECCCCAEB7B7A2A6A69B
+      9D9D9797979898989898989898989999999A9A9A9A9A9A9B9B9B9B9B9B9D9D9D
+      9D9D9D9E9E9E9F9F9F9F9F9FA1A1A1A0A0A0A2A2A2A2A2A2A3A3A3A2A2A2A4A4
+      A4A5A5A5A5A5A5A5A5A5A6A6A6A6A6A6A7A7A7A9A9A9A9A9A9AAAAAAA7ABC1A6
+      ADD3A6AED2A8AFD3A9B0D3AAB1D2AAB1D2ABB2D2ACB2D2AEB4D3AFB5D2B0B6D2
+      B1B6D2B2B7D2B3B9D3B4B9D2B5BAD2B6BAD2B7BBD2B8BCD2B9BDD3BABED3BBBF
+      D2BCBFD2BDC0D2BDC1D2BFC2D3C0C3D3C1C3D3C3C5D1C7C8C9C8C8C8CACACAC9
+      C9C9CACACACACACACBCBCBCBCBCBCCCCCCCCCCCCCDCDCDCDCDCDCECECECFCFCF
+      CFCFCFD0D0D0D1D1D1D1D1D1D1D1D1D1D1D1D2D2D2D3D3D3D3D3D3D4D4D4D5D5
+      D5D5D5D5D6D6D6D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7
+      D7D7D7D7D7D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9
+      D9D9D9DADADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDB
+      DBDBDBDBDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDD
+      DDDDDDDDDDDDDDDDDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDF
+      DFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFE0E0E0E0E0
+      E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E2E2E2E2
+      E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9
+      E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECEC
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F5F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78A8A
+      8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8989898989898A8A8A89898989898989
+      8989888888888888888888898989888888888888888888888888878787888888
+      8888888888888888888888888888888787878787878787878787878787878787
+      8787878787878787878787878787878787878786868686868687878786868686
+      8686868686868686868686858585858585858585858585858585858585858585
+      8585858585858585858585858484848585858585858484848484848484848484
+      8484848484848484848484848484848484848484848484848484848483838384
+      8484848484838383838383838383838383838383838383848484858585858585
+      8585858686868686868787878888888888888A8A8A8989898A8A8A8A8A8A8A8A
+      8A8B8B8B8B8B8B8B8B8B8B8B8B8A8A8A8A8A8A89898988888888888887878786
+      86868484848383838181818181818080807F7F7F7F7F7F7E7E7E7D7D7D7D7D7D
+      7C7C7C7C7C7C7C7C7C7B7B7B7B7B7B7B7B7B7A7A7A7B7B7B7B7B7B7B7B7B7681
+      AE6F86DF7086DF7187DF7188DF7288DF7288DF7289DF7389DF7489DE748ADE75
+      8BDE768BDE778CDE778CDE7A8EDF7E93E08499E199A3B8A7AEAEAEB7B7B8C4C4
+      C4D4D4C6D9DC4E45773B2E673B2E673B2E6799A1B2B4BFBFA6ACAC9EA0A09999
+      999898989898989999999999999A9A9A9B9B9B9B9B9B9C9C9C9D9D9D9E9E9E9E
+      9E9E9F9F9FA0A0A0A1A1A1A1A1A1A2A2A2A2A2A2A3A3A3A3A3A3A4A4A4A5A5A5
+      A5A5A5A6A6A6A7A7A7A8A8A8A8A8A8A9A9A9AAAAAAA9ABB5A5ADD4A6ADD3A7AF
+      D3A8AFD3AAB1D4AAB1D3ABB2D3ACB3D3ADB3D3AFB5D3AFB5D3B1B7D3B2B7D3B3
+      B8D3B4B9D3B5BAD3B6BBD3B7BBD3B8BCD3B8BDD3B9BDD3BABED3BCBFD3BDC0D3
+      BDC0D2BEC1D3BFC2D3C1C4D4C1C3D3C2C4D3C5C6CEC9C9C9C9C9C9C9C9C9CACA
+      CACACACACACACACCCCCCCCCCCCCDCDCDCDCDCDCDCDCDCECECECFCFCFD0D0D0D0
+      D0D0D1D1D1D1D1D1D1D1D1D3D3D3D3D3D3D4D4D4D5D5D5D6D6D6D6D6D6D6D6D6
+      D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D9D9
+      D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADADADAD9D9D9DA
+      DADADBDBDBDADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDB
+      DCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDD
+      DDDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDF
+      DFDFE0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E2E2
+      E2E3E3E3E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4
+      E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEBEBEBEBEBEBEAEAEAEBEBEBEAEAEAEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEFEFEFEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78B8B8B8B8B8B
+      8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A
+      8A89898989898989898989898989898989898989898989898988888888888888
+      8888888888888888888888888888898989888888888888888888888888888888
+      8888888888888888888787878787878787878787878787878787878787878787
+      8787878787878787878786868686868686868685858586868686868686868686
+      8686858585858585868686858585858585858585858585858585858585858585
+      8585858585858585858585858484848484848484848484848484848484848484
+      8484848483838384848483838383838384848484848485858586868685858587
+      87878787878787878989898A8A8A8B8B8B8B8B8B8B8B8B8C8C8C8D8D8D8C8C8C
+      8D8D8D8D8D8D8C8C8C8C8C8C8C8C8C8B8B8B8B8B8B8A8A8A8989898888888686
+      868585858383838282828181818181818080807F7F7F7E7E7E7E7E7E7D7D7D7C
+      7C7C7C7C7C7C7C7C7B7B7B7C7C7C7B7B7B7B7B7B7B7B7B7C7C7C7B7F897087E0
+      7087E07187DF7288DF7389E07389E07389DF748ADF7489DE758ADF768BDE768B
+      DE778CDF778CDE798EDE7C91DF7F94E0939AA79DA1A1A1A7A7AAB2B2B5C1C1C3
+      D4D4979FB6392D69392D69392D698184A2B9C5C5AAB1B19FA2A29A9B9B989898
+      9999999A9A9A9B9B9B9B9B9B9C9C9C9C9C9C9D9D9D9D9D9D9F9F9F9F9F9FA0A0
+      A0A1A1A1A2A2A2A2A2A2A2A2A2A3A3A3A3A3A3A4A4A4A5A5A5A6A6A6A6A6A6A7
+      A7A7A8A8A8A8A8A8A9A9A9A9A9A9AAAAAAA6ADD0A6AED4A6AED3A8B0D4A9B0D4
+      AAB1D4AAB2D4ABB2D3ACB3D3AEB4D3AFB5D3B0B6D3B1B7D3B2B7D3B3B8D3B3B9
+      D3B5BAD3B6BBD3B8BCD3B8BCD3B9BDD3BABED4BBBFD4BCBFD3BDC1D3BDC1D3BF
+      C2D3C0C3D4C1C4D4C2C4D4C2C5D4C3C6D4C8C8CBCACACACBCBCBCBCBCBCBCBCB
+      CBCBCBCCCCCCCDCDCDCECECECECECECECECED0D0D0D0D0D0D0D0D0D1D1D1D2D2
+      D2D1D1D1D1D1D1D3D3D3D3D3D3D4D4D4D5D5D5D6D6D6D6D6D6D6D6D6D7D7D7D7
+      D7D7D7D7D7D7D7D7D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9
+      D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADADADADADADADADADADBDBDBDBDB
+      DBDBDBDBDBDBDBDBDBDBDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDD
+      DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDDDDDDDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFE0E0
+      E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E4E4E4E5E5
+      E5E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78B8B8B8B8B8B8B8B8B8B
+      8B8B8B8B8B8A8A8A8B8B8B8B8B8B8B8B8B8A8A8A8B8B8B8A8A8A8A8A8A8A8A8A
+      8989898A8A8A8989898989898989898989898989898989898989898989898989
+      8989898989898989898989898989898989898989898989898988888888888888
+      8888888888888888888888888888888888888888888888888888888888888888
+      8787878888888888888888888787878787878787878787878686868686868686
+      8686868686868686868686868686868686868685858585858585858585858585
+      8585858585858585858585848484848484848484848484848484848484848484
+      8484848383838484848484848484848484848585858686868686868787878888
+      888989898A8A8A8A8A8A8C8C8C8D8D8D8D8D8D8E8E8E8E8E8E8F8F8F8F8F8F8F
+      8F8F8F8F8F8F8F8F8E8E8E8E8E8E8E8E8E8E8E8E8D8E8E8B8C8C8A8B8B888888
+      8686868383838282828282828181818080807F7F7F7E7E7E7E7E7E7D7D7D7D7D
+      7D7C7C7C7C7C7C7C7C7C7B7B7B7B7B7B7C7C7C7C7C7C7583BB7188E07187E072
+      88E07289E07389E0748AE0748AE0748AE0758ADF758ADF768CDF778CDF778CDF
+      788DDE798DDE7A8FDE7D91DF939494949696989A9A9FA4A4AAB2B2BAC7C7C2D2
+      D6382C6C382C6C382C6C5D5989BCCACAACB4B4A2A5A59C9D9D9999999A9A9A9A
+      9A9A9C9C9C9C9C9C9D9D9D9D9D9D9E9E9E9E9E9E9F9F9FA2A2A2A2A2A2A1A1A1
+      A2A2A2A3A3A3A3A3A3A4A4A4A4A4A4A4A4A4A5A5A5A6A6A6A6A6A6A7A7A7A8A8
+      A8A8A8A8A9A9A9AAAAAAA9ACBBA6AED5A6AED5A7AFD4A8B0D4A9B0D4AAB2D5AB
+      B2D4ADB4D4AEB4D4AFB5D4AFB5D4B1B7D4B2B8D4B3B8D4B3B9D4B5BAD5B7BCD4
+      B8BCD4B8BCD4B9BED4B9BED4BABED4BDC0D4BDC1D4BEC2D4BFC2D4C0C3D4C1C4
+      D4C2C5D5C4C7D5C3C6D5C4C7D5C6C9D3CACACACACACACBCBCBCBCBCBCBCBCBCC
+      CCCCCDCDCDCECECECECECECFCFCFCFCFCFD0D0D0D1D1D1D1D1D1D2D2D2D2D2D2
+      D2D2D2D4D4D4D5D5D5D5D5D5D6D6D6D6D6D6D7D7D7D7D7D7D8D8D8D8D8D8D8D8
+      D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADA
+      DADADADADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDB
+      DBDBDBDBDBDBDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDD
+      DDDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDF
+      DFDFDFDFDFDFDFDFDFDFDFDFDFDFE0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0
+      E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECEC
+      ECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3
+      F3F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78C8C8C8C8C8C8C8C8C8C8C8C8B8B
+      8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8A8A8A8A8A8A8B8B8B8B
+      8C8C8C8D8D8C8D8D8C8D8D8C8D8D8B8C8C8B8B8B8A8A8A8A8A8A8A8A8A8A8A8A
+      8A8A8A8A8A8A8989898B8B8B8B8C8C8B8B8B8C8D8D8D8E8E8C8D8D8C8D8D8C8D
+      8D8B8C8C8B8B8B8A8A8A8A8A8A8B8B8B8A8B8B8B8C8C8C8E8E8E8F8F8E8F8F8F
+      91918F91918E90908E8F8F8D8E8E8B8D8D898A8A888989888888878787878787
+      8686868888888989898889898889898889898888888788888787878686868686
+      8685858586868686878787888887888887888887888886878785858584848484
+      8484848484848484858585868686878888888989898A8A8A8A8A898A8A8B8B8B
+      8B8B8B8B8B8B8D8D8D8E8E8E8F8F8F9090909090909191919292929292929394
+      949495959495959496969596969698989598989496969295959092928D8F8F8A
+      8B8B8889898586868384848181818080808080807F7F7F7E7E7E7E7E7E7C7C7C
+      7C7C7C7C7C7C7C7C7C7C7D7D7C7D7D7983A9738BE1748BE1748BE1758BE1758D
+      E1768DE1778DE17990E17A90E17C92E17C92E17D93E27D93E17C91E07C90E07B
+      90E07C90DF7C8FDA909090929292939393999B9BA3A9A9B2BDBDC5D5D5362A6E
+      362A6E362A6E5C588BBECCCCAFB7B7A3A7A79C9D9D9B9B9B9B9B9B9A9A9A9B9B
+      9B9D9D9D9E9F9F9FA0A0A1A2A2A2A4A4A5A6A6A6A8A8A6A8A8A7A8A8A6A7A7A6
+      A7A7A6A7A7A5A6A6A6A6A6A5A5A5A6A6A6A6A6A6A7A7A7A8A8A8A8A8A8A9A9A9
+      AAAAAAABABABA7B0D2A8B2D7AAB2D7ACB4D7AEB6D9AEB7D9AFB8D9B1B8D7B1B8
+      D7B1B8D6B0B7D6B2B8D5B2B8D5B4B9D5B4B9D5B5BAD5B6BBD5B8BDD5BABED5BA
+      C0D6BBC1D6BCC1D6BEC2D7BFC2D5BEC2D5BFC3D5C0C3D5C2C6D6C4C8D7C5C9D8
+      C6CAD8C8CCD8C8CCD8C8CBD8CCCDCFCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCECE
+      CECFCFCFCFCFCFCFCFCFD0D0D0D1D1D1D2D2D2D2D2D2D3D3D3D3D3D3D3D3D3D5
+      D5D5D6D6D6D7D7D7D8D9D9D9DADAD9DADAD9DADADADBDBDADBDBDADADAD9DADA
+      DADADADADADAD9D9D9D9D9D9D9D9D9D9D9D9DADADADADBDBDBDBDBDBDBDBDBDB
+      DBDCDCDCDCDDDDDCDDDDDCDDDDDCDCDCDCDCDCDDDDDDDDDDDDDCDDDDDCDCDCDD
+      DDDDDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDEDE
+      DEDEDEDEDEDEDFDFDFDFDFDFDEDFDFDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDF
+      DFDFDFDFDFE0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E2E2E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3
+      E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECECECECEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F78C8C8C8D8D8D8C8C8C8C8C8C8C8C8C8C8C8C
+      8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8D8D8E8F8F9092929295
+      959396969396969194949092928D8E8E8C8D8D8B8B8B8A8A8A8A8A8A8A8A8A8A
+      8A8A8B8C8C8C8D8D8F91919294949497979498989498989395959093938E9090
+      8C8D8D8C8C8C8C8D8D8D8F8F909292939595969A9A989D9D9AA0A09BA1A19BA1
+      A19AA0A0999E9E969A9A9396969093938E8F8F8B8C8C8A8A8A898A8A8A8B8B8A
+      8C8C8D8F8F8E91918F92928F91918C8F8F8A8C8C888989878787878787878888
+      898A8A8B8D8D8C8E8E8D90908D90908C8F8F8A8C8C8889898586868585858585
+      858687878889898A8C8C8C8F8F8D90908F91918E90908D8F8F8C8D8D8C8C8C8D
+      8D8D8E8E8E909090919191929292939393949494969696979898999B9B9C9E9E
+      9EA1A1A0A4A4A1A6A6A2A7A7A2A8A8A2A8A8A0A6A69DA3A39AA0A0959A9A9094
+      948D9090898B8B8687878383838181818080807F7F7F7E7E7E7E7E7E7D7D7D7D
+      7D7D7C7D7D7E7E7E7E86A0778FE37B93E37C94E47C95E47C94E47C94E37D95E4
+      8097E48299E4859DE5889FE589A2E689A1E5899FE5879DE4849AE28297E17F95
+      E18393CC919191919191919191989999A1A6A6B0B9B9C2D1D15C588D35297035
+      29705C588DC0CECEB0B8B8A4A8A89D9E9E9A9A9A9B9B9B9C9C9C9E9F9FA1A2A2
+      A3A5A5A6A9A9A9ADADACB0B0AEB3B3AFB3B3B0B4B4B0B4B4AFB3B3ADB0B0ACAF
+      AFAAACACA9AAAAA8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A9A9A9AAAAAAACACACAE
+      B0B8ABB5DAAEB9DBB1BBDCB3BDDCB5C0DDB7C2DEB7C1DDB7C0DCB6BFDBB5BDD9
+      B3BBD8B3BAD7B4BAD6B4BAD5B5BAD5B6BCD6BABFD7BCC2D8BFC4DAC0C7DBC1C8
+      DBC2C8DBC3C9DBC3C7D9C2C7D8C2C7D8C4C8D8C6CAD9C9CEDBCBD0DDCCD2DECE
+      D4DFCFD4DFD0D4DED1D4DAD1D3D3CFD0D0CFD0D0CFD0D0CECECECECECECFCFCF
+      CFCFCFD0D0D0D0D0D0D1D1D1D2D2D2D3D3D3D3D3D3D3D4D4D5D5D5D6D6D6D8D9
+      D9D9DBDBDBDDDDDCDEDEDEDFDFDFE1E1DFE1E1DEE0E0DEE0E0DDDFDFDDDEDEDC
+      DDDDDBDCDCDBDBDBDADBDBDADBDBDCDCDCDCDDDDDDDEDEDEDFDFDEE0E0DEDFDF
+      DFE0E0DFE0E0DFE0E0DFE0E0DFE0E0DEDFDFDFDFDFDEDFDFDDDEDEDEDEDEDDDE
+      DEDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDEDFDFDFDFDFDFE0E0E0E1E1E0
+      E1E1E1E2E2E1E2E2E0E1E1E0E0E0DFE0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1
+      E2E2E2E2E3E3E3E3E3E3E4E4E2E3E3E2E3E3E2E3E3E2E2E2E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3
+      E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9EAEAEAE9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBECECECECECECECECECECECECECECECECECECECECECECECECECECECEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F1F1
+      F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F78D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8C
+      8C8C8D8D8D8D8D8D8C8C8C8C8C8C8D8D8D8F9191929595979A9A9A9F9F9CA2A2
+      9CA2A29A9F9F969A9A9194948E90908C8C8C8B8B8B8B8B8B8B8B8B8C8D8D8E90
+      90929595969A9A9CA1A19FA5A59FA6A69FA6A69DA2A2989C9C94969691939391
+      92929295959699999B9F9FA0A6A6A3ABABA7B1B1AAB4B4ABB6B6ABB7B7AAB5B5
+      A8B2B2A5AEAE9FA7A79AA0A09599998F92928C8E8E8B8D8D8D8E8E9092929498
+      98989D9D989E9E979D9D9498989093938C8E8E888989888989898A8A8D8F8F90
+      9494949999979D9D969C9C949A9A9094948C8E8E898A8A858686858686888A8A
+      8C8F8F919595959B9B969C9C969C9C9599999295959091918E8F8F8E8E8E8F8F
+      8F9090909292929393939596969899999C9D9D9FA2A2A3A8A8A7ADADABB2B2AF
+      B8B8B1BBBBB3BEBEB4BFBFB4C0C0B2BEBEAFBABAABB5B5A6B0B09FA7A7999F9F
+      9297978D9191898B8B8586868182828080807F7F7F7E7E7E7E7E7E7D7D7D7F7F
+      7F7F84947A91DE7F97E6859DE788A1E789A2E78AA3E789A3E78AA3E78EA7E892
+      ABE996B0EA99B4EB9CB6EB9CB5EB9AB3EA97AFE991A8E78DA3E5879DE48999CF
+      939494929393929292969898A0A4A4AEB7B7C0CECE5A57903328733328735A57
+      8FC0CECEB1B9B9A4A8A89FA0A09C9C9C9D9E9E9FA0A0A3A5A5A7ABABABB0B0B1
+      B7B7B5BCBCB8C0C0BBC4C4BCC5C5BCC5C5BDC5C5BAC2C2B7BEBEB4B9B9B1B5B5
+      AEB1B1AAACACA9A9A9A8A8A8A8A8A8A9A9A9ABABABACADADB0B2B2B1B8CCB3BE
+      DFB7C4E1BBC8E2BFCCE4C1CEE5C3D0E6C3CFE5C1CDE3BFC9E1BBC5DEB8C1DBB6
+      BED9B6BCD8B6BCD7B7BDD7BAC0D9BEC4DBC2C9DDC5CEE0C8D1E2CAD2E2CAD2E2
+      C9D1E0C8CEDEC6CCDCC7CDDCC9CEDDCBD1DFCFD5E1D1D8E3D4DBE5D6DDE6D6DD
+      E6D6DDE5D6DCE3D6DADAD4D7D7D2D4D4D0D1D1D0D0D0D0D0D0D0D0D0D0D0D0D1
+      D1D1D1D1D1D2D2D2D3D3D3D4D4D4D4D4D4D5D5D5D8D8D8D9DADADCDDDDDEE0E0
+      E0E3E3E2E5E5E3E6E6E3E7E7E4E8E8E3E7E7E3E6E6E1E4E4E1E3E3DFE0E0DDDE
+      DEDCDCDCDBDBDBDBDCDCDCDDDDDEDFDFE0E1E1E1E3E3E2E5E5E4E6E6E4E7E7E4
+      E7E7E4E7E7E4E6E6E3E6E6E4E6E6E3E5E5E2E3E3E1E2E2E0E0E0DFDFDFDFDFDF
+      DEDFDFDEDEDEDEDEDEDDDDDDDEDEDEDFDFDFE0E0E0E1E2E2E2E4E4E3E5E5E3E5
+      E5E3E5E5E2E3E3E1E1E1E0E0E0DFE0E0E0E0E0E1E1E1E1E2E2E3E3E3E4E5E5E5
+      E7E7E6E8E8E6E8E8E6E7E7E5E6E6E3E4E4E3E4E4E3E3E3E2E2E2E2E2E2E2E2E2
+      E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E2E2E2E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9
+      E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F6F6F6F6F6F6F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F78E8E8E8E8E8E8E8E8E8E8E8E8D8D8D8D8D8D8E8E8E8D8D8D8D8D
+      8D8D8D8D8D8D8D8D8D8D8F8F8F929494989C9C9FA5A5A6AEAEAAB4B4AAB4B4A6
+      AEAE9FA5A5979B9B9294948E8E8E8C8C8C8C8C8C8D8D8D8F9090939595999D9D
+      A1A8A8A8B1B1ADB8B8AEBABAACB7B7A6AFAF9FA6A6999E9E969A9A979A9A9BA0
+      A0A0A7A7A8B1B1AFBABAB4C2C2B9C8C8AAB6C09AA3B79AA3B798A2B6B8C8C8B4
+      C2C2AEBABAA6B0B09DA4A4969A9A9093938F9090919393969B9B9DA4A4A3ABAB
+      A5AFAFA4ADAD9EA6A6979D9D9194948B8C8C898A8A8C8E8E919595989E9E9FA7
+      A7A3ADADA4AEAE9FA8A8989E9E9195958B8D8D8788888788888B8E8E93979799
+      A0A0A0A9A9A4AEAEA2ABAB9DA5A5989D9D9395959091918F8F8F8E8F958D909C
+      9494949798989A9C9C9FA1A1A4A9A9AAB0B0B1B9B9B7C1C1BCC8C8C0CECEB1BC
+      C6A0A9BDA1AABE7B7FA69FA9BD9DA7BBACB9C3B9C8C8B2C0C0A9B5B5A1ABAB9A
+      A1A19297978C8F8F8789898484848181817F7F7F7F7F7F7F7F7F7E81877A8FD8
+      819AE689A3E892ADEB99B3EC9CB7ED9DB8ED9CB7EC9DB8EDA0BBEEA4C0EEAAC5
+      F0A6C0E990A3D3A0B7E2AEC9F0AAC5EFA4BDED9CB4EA94ABE792A2CB989A9A95
+      96969494949799999FA4A4AEB7B7BFCDCD5A56913227753227755A5691C1CECE
+      B2BABAA6AAAA9FA0A09E9F9FA0A1A1A5A8A8ABAFAFB2B8B8B8C0C0BEC8C8C3CF
+      CFC6D3D3ACB5C4A4ABBFA4ABBFB6C0CAC7D3D3C3CDCDBEC7C7B9BFBFB3B7B7AE
+      B0B0ABACACA9A9A9AAAAAAACACACAEAFAFB2B5B5B7BBBBB9C4DDBECCE6C4D2E8
+      C8D7EBCCDBECB0BBD7A8B1D0BBC6DECDDAEBC9D6E8C4D0E4BEC7E0BBC3DCB8BF
+      D9B8BED9B9C0D9BFC5DDC3CBDFCAD2E3CED9E7D2DDE9D4DFEAD3DDE9D0DAE6CE
+      D6E3CCD3E1CCD3E0CED4E1D2D9E5D6DEE8D9E2EAB1B6CFA8ABC89393B9B3B7CF
+      C8CEDDDDE3E4DBDFDFD7DADAD4D6D6D3D4D4D0D1D1D0D1D1D1D1D1D1D1D1D2D2
+      D2D2D2D2D3D3D3D4D4D4D4D5D5D5D6D6D8D9D9DBDDDDDFE2E2E2E6E6E5E9E9E7
+      ECECBABCD0BBBDD1BCBDD1BCBDD1C6C8D7E8ECECE5E9E9E3E6E6E1E3E3DFE0E0
+      DDDEDEDDDEDEDFE0E0E1E3E3E4E6E6E6E9E9E8ECECE9EDEDE9EEEEE9EEEEE9EE
+      EEE9EDEDE9EDEDE8ECECE7EBEBE6E9E9E4E7E7E3E5E5E2E3E3E0E1E1DFE0E0DF
+      DFDFDEDEDEDEDEDEDEDFDFE1E1E1E2E3E3E4E6E6E6E9E9E7EAEAE8EAEAE7E9E9
+      E5E6E6E3E4E4E1E2E2E1E1E1E1E1E1E2E2E2E3E4E4E5E7E7E7E9E9E8EBEBEAED
+      EDE9ECECE8EBEBE6E8E8E4E6E6E4E5E5E3E3E3E2E2E2E2E2E2E2E2E2E2E2E2E3
+      E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4
+      E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E4E4E4E5E5E5E5E5E5E5E5E5E5E5
+      E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9
+      E9E9E9E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F78F8F8F8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E
+      8E8E8E8E8E8E9192929598989EA3A3A9B2B2514C8A524E8B524E8B514C89A8B2
+      B29DA3A39497979091918D8D8D8D8D8D8F90909395959A9E9EA3ABABAEBABA8E
+      95AF54508D54508D534E8C514B89656290A1A7A79DA2A2A0A6A6A6AFAFAFBABA
+      B8C7C78990AF5F5D96302677302677302677302677302677302677423B836464
+      97898FA9979FA99CA2A2959898929595969A9A9EA5A59298A8504C89514D8A51
+      4C8A7D7F9E9FA7A79599998E8F8F8A8C8C8F9292969C9CA2ABAB5F5D90514C8A
+      514D8A504B88A2ACAC979D9D8E9191898A8A8A8B8B8F93939AA1A18F96A5504B
+      89514C8A504C897B7F9EA0A8A8979B9B919393848EAF7289DE7189E38091C796
+      9BA5A1A4A4A8ADADB1B8B8B8C3C3C0CDCDA2AABF6B6B9E443D85302677302677
+      302677302677302677302677302677433C8468699C9AA5BAB4C4C4A9B6B6A0A9
+      A9969C9C8E9292888A8A8485858181818080807E8085788BD27D95E688A1E890
+      A8E54D4C954F4F965150966A71AEB3D1F3B2D0F39BB1DD6368A639307F302677
+      3026773026773026775353978492C5AEC9F0A4BDECA0B0CC9FA4A4999C9C9698
+      98989A9AA1A5A5AEB6B6BFCDCD585592302677302677585692C1CFCFB2BABAA8
+      ACACA1A3A3A2A3A3A6A9A9ADB2B2B6BDBDBEC9C9BDC8CD7E80AA4E498B302677
+      3026773026773026773026773026775753907C7CA59CA1B5B8BEBEB2B5B5ADAE
+      AEABACACACACACAEB0B0B3B6B6B9BDBDC0C7C7C5D4EAB8C5DF8184B44F4A8E30
+      2677302677302677302677302677443D86575294C3CDE3BEC7DEBAC2DBBAC1DB
+      BDC5DCC4CCE1CCD6E6C9D3E4706EA53B317F3026773026773026776E6BA2D2DA
+      E6D2D9E5CAD1E08E8EB866629C3026773026773026773026773026773026775D
+      5795B4B7CCDCE1E1D8DBDBD5D7D7D2D3D3D2D2D2D1D1D1D2D2D2D2D2D2D4D4D4
+      D4D4D4D5D5D5D6D6D6D7D8D8DADCDCDFE2E2C1C2D2807CAA534B8E3026773026
+      77302677302677302677302677483F878D8BB4DCE0E6E5E8E8E1E3E3DFE1E1DF
+      E0E0E0E2E2E4E6E67570A35F58955F5996605997605997605997605997605997
+      6059967873A6A6A5C5D4D7E2EAEEEEE8EBEBE6E8E8E4E5E5E2E3E3E1E1E1E0E0
+      E0DFDFDFE0E0E0E1E2E2E4E5E5E7E9E95F57955F58955F58955F5795E7EAEAE4
+      E6E6E2E3E3E2E3E3E2E3E3E4E5E5E6E8E8E9ECECE0E2E8605896605996605896
+      5F58955E5794C5C4D4E5E6E6E4E4E4E3E3E3E2E2E2E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEB
+      EBECECECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F4F4F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78F8F
+      8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8E8E8E8E8E8E8E
+      8E8E929393999D9DA4ABABB2BEBE2F257A2F257A2F257A2F257AB1BDBDA2AAAA
+      979B9B9192928E8E8E8E8F8F929393999D9DA3AAAAB0BCBCABB8C33830802F25
+      7A2F257A2F257A382F7EA6AFB4A7AEAEA6ADADABB4B4B4C1C1A5B0C04B478C2F
+      257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A
+      6E6F99A1A8A8989D9D9599999A9F9FA4ADAD9199AE2F257A2F257A2F257A7274
+      9FA7B1B1999F9F9093938D8E8E9295959CA3A3AAB6B6514E8E2F257A2F257A2F
+      257AACB9B99DA5A59195958A8B8B8B8D8D949999A0A9A98F97AC2F257A2F257A
+      2F257A71749FA7B1B196A0AE8094D1738CE5728AE4738DE57892E6809AE896A9
+      D4B1BCC4BFCCCCA2ABC05754942F257A2F257A2F257A2F257A2F257A2F257A2F
+      257A2F257A2F257A2F257A2F257A2F257A2F257A54529398A4BAB1C0C0A4AFAF
+      99A1A1909595888A8A8485858282827588D17790E48099E78FA9EAA1BDEF2F25
+      7A2F257A2F257A54549AC3E3F87078B12F257A2F257A2F257A2F257A2F257A2F
+      257A2F257A2F257A2F257A403B8A95A6D5AFC3D8AAB2B2A1A7A79B9E9E9B9D9D
+      A1A5A5AEB6B6BFCDCD5755942F257A2F257A585595C2CFCFB3BBBBA8ADADA4A7
+      A7A6A9A9AEB3B3B8C0C0C2CDCD878AB03830812F257A2F257A2F257A2F257A2F
+      257A2F257A2F257A2F257A2F257A2F257A2F257ABCC3C3B4B8B8AFB1B1ADAEAE
+      AFB0B0B3B6B6BABFBFC2CACACBD6DA7F83B52F257A2F257A2F257A2F257A2F25
+      7A2F257A2F257A2F257A2F257A2F257AC7D1E5C0C9E0BDC5DEBEC5DEC2CBE0CB
+      D5E6B6BDD73930822F257A2F257A2F257A2F257A2F257A595597D5DEE9D6DDE8
+      AEB2CE2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F25
+      7A9F9FBFDDE2E2D8DBDBD5D7D7D3D4D4D3D3D3D3D3D3D3D3D3D5D5D5D5D5D5D6
+      D6D6D7D7D7DADADADCDEDEE1E4E45D56962F257A2F257A2F257A2F257A2F257A
+      2F257A2F257A2F257A2F257A2F257A524B91DDE1E7E5E8E8E2E4E4E1E3E3E4E6
+      E6E7EAEA5E58982F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F
+      257A2F257A2F257A6B66A1BDBED4EAEEEEE7EAEAE4E6E6E2E3E3E1E1E1E0E0E0
+      E1E2E2E3E4E4E6E8E8EAEDED2F257A2F257A2F257A2F257AEAEDEDE7E9E9E4E5
+      E5E3E4E4E4E5E5E6E8E8EAEDEDE1E4EA534B912F257A2F257A2F257A2F257AA4
+      A2C1E8E9E9E5E6E6E4E4E4E3E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4
+      E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      ECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1
+      F1F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7909090909090
+      9090908F8F8F8F8F8F8F8F8F9090908F8F8F8F8F8F8F8F8F8F8F8F8F8F8F9395
+      959CA0A0A8B1B1B8C7C72D237C2D237C2D237C2D237CB7C5C5A6AFAF9A9E9E92
+      93938F8F8F929393979A9AA0A7A7AEB9B9BDCDCD4B478F2D237C2D237C2D237C
+      372E82A0AABAB0BBBBACB5B5AFB9B9B8C5C58B91B32D237C2D237C2D237C2D23
+      7C2D237C2D237C413B895552945552942D237C2D237C2D237C2D237C6E6F9BA2
+      AAAA9A9E9E989D9D9DA3A3AAB4B497A0B62D237C2D237C2D237C7578A5ACB8B8
+      9CA3A39295958E8F8F949898A0A8A8B0BEBE5250922D237C2D237C2D237CB3C2
+      C2A1AAAA9398988A8C8C8B8D8D969C9CA5B1B1949FB52D237C2D237C2D237C74
+      79A7A2B9DA89A5EA7C96E7758EE5748DE57993E6819BE88CA8EB9BB7EFA1BEEC
+      6E74AE2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D23
+      7C2D237C2D237C2D237C2D237C2D237C2D237C2D237C6E72A4ADBDC2A8B4B49C
+      A4A4909595898B8B7B8AC1748CE47891E5849DE894AEECA9C6F22D237C2D237C
+      2D237C53539B666BAB2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D23
+      7C2D237C2D237C2D237C2D237C8893BDB7C3C3AAB2B2A0A5A59EA1A1A3A8A8AF
+      B8B8BFCDCD5653962D237C2D237C565396C2CFCFB4BCBCAAAEAEA7ABABACB1B1
+      B6BEBEC3CFCF6A69A12D237C2D237C2D237C2D237C2D237C2D237C5754965754
+      96423B892D237C2D237C2D237C2D237CBDC4C4B6BABAB1B3B3B0B2B2B3B5B5B9
+      BEBEC1C9C9C2CCD15754972D237C2D237C2D237C2D237C2D237C2D237C2D237C
+      2D237C2D237C2D237C2D237CC7D2E5C1CAE1C0C8DFC2CAE0C8D1E4D2DEEB4E48
+      922D237C2D237C2D237C2D237C2D237C2D237C585398D5DEE8D6DEE8AEB1CE2D
+      237C2D237C2D237C5B5699898AB88A8BB85C579A2D237C2D237C2D237C393083
+      D7DCE1DBDFDFD7D9D9D5D6D6D3D3D3D3D3D3D3D3D3D5D5D5D5D5D5D6D6D6D7D7
+      D7DADBDBDDDFDFE2E5E55B55982D237C2D237C2D237C5D589A827FB17672A945
+      3D8B2D237C2D237C2D237C2D237C5D579AE9EDEDE5E8E8E4E6E6E5E8E8E9EDED
+      5D579A2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D23
+      7C2D237C2D237C2D237C827FB1ECF0F0E8EBEBE5E7E7E3E4E4E1E2E2E2E2E2E4
+      E5E5E7E9E9EBEFEF2D237C2D237C2D237C453D8BECF0F0E8EAEAE5E7E7E6E7E7
+      E7E9E9EAEDEDEEF2F27772AA2D237C2D237C2D237C2D237CA5A4C5EAEDEDE7E9
+      E9E5E6E6E4E4E4E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4
+      E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F791919191919191919190
+      90909090909090909090909090909090909090909090908F8F8F9495959DA2A2
+      ABB5B5BDCDCD2C227E2C227E2C227E403A8BBBCBCBA9B2B29B9F9F9394949091
+      919699999EA3A3ABB4B4BAC9C97174A82C227E2C227E2C227E2C227E959EBAB8
+      C5C5B2BCBCB1BBBBB8C4C4A6B2C32C227E2C227E2C227E2C227E413A8B9098BB
+      BBCBD0C1D1D1BECDCDBDCDCDBECECEA2ADBE7275A33D36866B6B99A0A7A79A9E
+      9E989D9DA0A6A6AEB9B99AA5BC2C227E2C227E2C227E777BA9AFBCBC9FA6A692
+      95958F9090959A9AA3ABABB5C4C45351962C227E2C227E2C227EB7C8C8A4AEAE
+      949A9A8A8D8D8C8F8F989F9FA9B5B598A4BB2C227E2C227E2C227E727DB9A1BF
+      F08CA8EB7E98E77891E57992E7809AE98CA7EC9BB9EFA4C1ED4645952C227E2C
+      227E2C227E2C227E2C227E61609F9299BBB8C5D0C9D8D8C8D7D7C7D7D7B4C2CD
+      8F97B95F5F9E2C227E2C227E2C227E2C227E2C227E484590AFBFC4A9B6B69AA3
+      A38799C97B92E7768EE57B93E6869FE998B3EDAFCCF32C227E2C227E2C227E2C
+      227E2C227E2C227E2C227E646AAC98ACD8B8D6F5BAD6F4ABC3E6818EC2362E86
+      2C227E2C227E2C227E2C227E8A91B4B5C1C1A9B0B0A3A8A8A6ABABAFB8B8C0CE
+      CE5553982C227E2C227E565398C2CFCFB5BEBEADB2B2ADB2B2B4BBBBC0CBCB68
+      68A22C227E2C227E2C227E2C227E5754999EA6C2CEDCDCCBD8D8CBD7D7CCD8D8
+      CCD8D8999EBB66649E2C227EBBC1C1B6BABAB1B4B4B2B4B4B7BBBBC0C7C7CBD5
+      D5615F9E2C227E2C227E2C227E2C227E58559CA2ABCFCBD9EBD5E4F1D4E2F0A8
+      B0D26A68A82C227EC4CFE4C2CAE2C1C9E1C5CDE3CCD7E8A1A7CC2C227E2C227E
+      2C227E2C227E9396C0D3DDEBB8BED79FA2C6D3DBE6D4DBE7ACB0CE2C227E645F
+      A1C8CEE0DFE8EFE1EAF0E4EDF1E8F3F57371AB2C227E2C227E2C227E9494BCDE
+      E3E3D9DCDCD6D7D7D5D5D5D4D4D4D5D5D5D6D6D6D6D6D6D7D7D7D8D8D8DADBDB
+      DDDFDFE2E5E55B5499382F858B88B6DEE2E8EAEFEFEAEFEFECF1F1EEF5F5A6A6
+      C92C227E2C227E2C227E2C227EAFB0CDE7EBEBE5E8E8E6EAEAEBEFEF5D579C2C
+      227E2C227E2C227E8E8CBA8E8CBA8E8CBA8E8CBA7672AB453D8D2C227E2C227E
+      2C227E2C227E2C227E504A95E0E3E9E8EBEBE5E7E7E3E3E3E3E4E4E5E6E6E8EB
+      EBEDF2F22C227E2C227E2C227E5E579CEEF2F2EAECECE8EAEAE8EAEAEAEDEDEE
+      F2F27672AB2C227E2C227E2C227E2C227EA6A5C8ECEFEFE9EBEBE7E8E8E5E6E6
+      E5E5E5E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6
+      E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E7E7E7E8E8E8E7E7E7
+      E8E8E8E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F79292929191919191919191919191
+      919191919191919191919191919090909090909090909597979FA4A4AEB8B8C0
+      D0D02A21802A21802A2180535299BCCCCCAAB3B39CA1A19597979496969B9F9F
+      A6AFAFB5C2C29FABC32A21802A21802A21802A21807A80AFBFCDCDB5C0C0B2BB
+      BBB6C1C1C1D0D03F398C2A21802A21802A2180686BA6C0D0D6C1CFCFB9C5C5B3
+      BEBEB0BABAB0BABAB0BBBBB0BABAAEB8B8A3ABB18D92A49CA1A1989B9B9A9E9E
+      A1A8A8B0BCBC9CA7BF2A21802A21802A21808A92B6B1BEBE9FA6A69396969092
+      92969A9AA4AEAEB7C7C75251982A21802A21802A2180BACCCCA5B1B1959B9B8C
+      8E8E8C8F8F989F9FABB8B899A6C02A21802A21802A2180737EBBA4C3F18FAAEC
+      819AE87B94E77F99E88AA6EB9AB7EFA4C1EC4645972A21802A21802A21802A21
+      8050519EB1C5DDC7D5D8C2CECEBDC8C8BAC5C5B9C3C3B8C3C3BAC5C5BCC9C9C1
+      D1D1B4C3CF5D5E9F2A21802A21802A21802A2180484592AFBEC4A0B7D98DA7EB
+      819AE87A92E67D95E788A1EA9AB6EEB2D0F42A21802A21802A21802A21802A21
+      80342D889AAFD9B4D1F4ACC7F1A7C2EFA8C1EFACC7F0B4D0F3B6D0EF5B5EA52A
+      21802A21802A2180342D86B7C4CAB1BABAA9AFAFA9AFAFB2BBBBC0CECE545299
+      2A21802A2180545299C3D0D0B7BFBFB1B7B7B2B9B9BCC6C6A2AAC22A21802A21
+      802A21802A2180969DC1CFDDDDC7D3D3C2CCCCC0C8C8BFC7C7C0C8C8C1C9C9C1
+      C9C9BFC6C6A1A5B6B7BBBBB3B6B6B2B5B5B5B8B8BDC2C2C7D0D0898DB72A2180
+      2A21802A2180352E8798A0CAD3E3F1CEDCEECAD7EBC9D6EAC9D6EAC9D5E9C8D3
+      E8A8AFD2C1CAE2C0C8E0C2CAE1C7D0E4D0DBEA7879B22A21802A21802A218092
+      95C2E0ECF3D8E3EDD3DBE8D0D7E5CFD5E4D1D7E4A8ACCC6A68A7D7DEE8D8DFE9
+      D9E1E9DBE3EADFE7EEE6F0F3DDE6EF2A21802A21802A2180726FAAE1E6E6DBDE
+      DED7D8D8D5D5D5D5D5D5D5D5D5D7D7D7D8D8D8D8D8D8D9D9D9DADBDBDDDFDFE0
+      E2E2645FA0C2C3D5E6E9E9E6E9E9E7EAEAE7EAEAE8ECECECF1F1F0F6F67571AC
+      2A21802A21802A2180817EB3EAEEEEE8EBEBE8ECECECF0F05C579E2A21802A21
+      802A2180F1F7F7F0F6F6EDF2F2ECF0F0ECF0F0EEF3F3BEC1D84F49962A21802A
+      21802A21802A21807571ADECF0F0E8EBEBE5E6E6E4E5E5E5E7E7E9ECECEEF2F2
+      2A21802A21802A21805C579EEFF3F3EBEEEEEAEDEDEBEEEEEEF2F28E8BBB2A21
+      802A21802A21802A2180A6A6CAEEF2F2EBEDEDE8EAEAE6E7E7E5E5E5E4E4E4E4
+      E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBECECECEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEC
+      ECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7929292929292929292929292929292929292
+      929292929292929292929292919191919191969797A0A5A5AEB8B8C0D1D12820
+      8328208328208352519BBDCDCDABB4B49DA2A2979A9A989C9CA4AAAAB2BDBDB7
+      C7CD322B892820832820832820835C5DA1C1D0D0B5C0C0AFB8B8B1BABABBC7C7
+      8C94B92820832820832820835D5EA2D0E3E3C3D2D2B8C3C3B0B8B8AAB2B2A7AE
+      AEA6ACACA6ACACA5ABABA3AAAAA3A8A89DA2A2999C9C969898989C9CA1A8A8B1
+      BDBD9CA8C02820832820832820839DA9C2B1BEBEA0A7A79395958F9191979B9B
+      A5AEAEB8C8C851509B282083282083282083BACCCCA5B1B1959B9B8B8D8D8C8F
+      8F97A0A9A4BBDA94A8D8282083282083282083727EBDA6C3F190ACEC829DE980
+      9AE887A2EB97B4EFAAC8F34D4FA02820832820832820832820837D8CC4B1D0F5
+      A3C2F29BB6EDA3B4D4AEB5BAAEB3B3ACB1B1ABB1B1ABB1B1ADB5B5B2BCBCB7C4
+      C4C1D2D28E98BD282083282083282083282083454397ABC9F399B4EF8AA3EA7E
+      97E77F97E789A2EA9AB6EEB4D1F4282083282083282083282083282083A7BEE2
+      B2CEF3A4BEEF9AB3EC95ADEB95ADEB99B1EBA2BBEEB3C7DBC5D9DB4745952820
+      832820832820836566A4B9C5C5AEB7B7ACB4B4B3BDBDC1CFCF52519B28208328
+      208353519CC4D1D1B9C2C2B4BCBCB9C1C1C3CFCF53509B282083282083282083
+      959DC2D2E2E2C8D4D4C1C9C9BBC1C1B8BDBDB8BDBDB7BCBCB8BDBDB8BDBDB7BC
+      BCB6BABAB3B6B6B2B4B4B3B5B5B8BCBCC2C9C9C4CED5332C8928208328208328
+      2083A2ACD2D1E0F0C9D6EBC2CEE7BFCAE5BEC9E3BFC8E3C0CAE3BFC9E2BFC8E1
+      BDC5DEBDC5DEC2CAE1C9D2E6D3DEEC56539F282083282083282083D6E2EEDAE4
+      EED2DBE7CED4E3CCD1E1CBD0E0CCD1E0C3C9DBD1D6E3D2D7E4D3D9E4D5DAE5D8
+      DEE7DDE5EBE5EEF2DDE6EF28208328208328208358549FE2E7E7DCDFDFD7D9D9
+      D6D6D6D5D5D5D5D5D5D7D7D7D8D8D8D8D8D8D8D9D9DADBDBDCDDDDDFE0E0D5D7
+      DDE2E4E4E2E4E4E2E4E4E3E5E5E4E6E6E6E9E9EAEEEEEFF5F58C8BBD28208328
+      20832820835A55A0EBEFEFE8EBEBE9EDEDEDF1F15A56A0282083282083282083
+      F1F7F7EDF2F2EAEDEDE8EBEBE8EBEBEAEDEDECF1F1EFF4F47471AE2820832820
+      83282083282083A4A4C9EAEEEEE7E9E9E6E7E7E7E8E8EAEDEDEFF3F328208328
+      20832820835B56A0F1F5F5EEF1F1EDF1F1EFF2F2A5A5CB282083282083282083
+      2820838D8BBDEFF2F2EBEEEEE8EAEAE6E7E7E5E5E5E5E6E6E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8
+      E8E8E8E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEB
+      EBEBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F793939393939393939392929292929293939393939392
+      9292929292929292929292929292979898A1A6A6AEB8B8C1D1D1271F85271F85
+      271F8551509DBDCDCDABB4B49FA4A49B9F9FA0A5A5ADB6B6BCCBCB5B5BA2271F
+      85271F85271F853C3891BACAD0B6C1C1ADB5B5ABB2B2B2BBBBC0CDCD47439727
+      1F85271F85322B8BBDCDDACFE1E1C2D0D0B7C2C2B0B8B8ABB1B1A8ADADA6ABAB
+      A4A9A9A4A9A9A2A7A7A0A4A49CA0A0989B9B9799999A9D9DA3A9A9B2BEBE9CA7
+      C1271F85271F85271F859CA8C2B1BDBD9FA6A6939696909292979B9BA5AEAEB8
+      C8C850509C271F85271F85271F85BACCCCA5B1B1959B9B8B8D8D8893B18DA7EC
+      A0BDF093A9DA271F85271F85271F85727EBEA6C4F292AEED87A2EB86A0EA91AD
+      EDA5C2F2707BBE271F85271F85271F85271F858597CDADCCF49DBAF191ACEE87
+      A2EC809BEA8098E5909EC8A1A4A9A2A4A4A1A4A4A2A6A6A5AAAAAAB1B1B2BDBD
+      BCCCCC8B96BC271F85271F85271F85271F85707BBEA6C3F293AEED859EEA839B
+      E98AA4EB9CB6EEB4D1F5271F85271F85271F85271F857581BEB7D3F5A4BEF095
+      ADEC8CA3E8889FE7889EE790A0CB9CA5ADAAB4B4B9C8C8B6C7D4271F85271F85
+      271F85322A8BC0CECEB4BEBEB0B8B8B5BFBFC2D0D052509D271F85271F855251
+      9DC5D2D2BBC5C5B9C1C1BEC8C8ABB6C9271F85271F85271F855E5EA4D7E8E8D0
+      DFDFC6D1D1BFC7C7BAC0C0B7BCBCB6BBBBB6BABAB5B9B9B6BABAB6B9B9B5B8B8
+      B3B5B5B3B5B5B6B9B9BEC3C3C8D0D09398BF271F85271F85271F856A6CB0D2E3
+      F1C8D5EBBFCAE5B9C3E2B7C1E0B8C0DFB9C1DFB9C2DFB9C1DFBAC2DEBAC1DDBD
+      C4DFC2C9E2CAD3E7D5E1ED5653A1271F85271F853F3993DEEAF2D5DEEACDD4E3
+      C8CEDFC7CCDEC8CCDEC9CEDECCD0DFCDD2E1CFD4E1D1D6E3D4D9E5D9DFE8DFE7
+      EDE7F0F49495C4271F85271F85271F857C7BB4E2E6E6DCDFDFD8D9D9D6D6D6D6
+      D6D6D6D6D6D8D8D8D9D9D9D9D9D9D9D9D9DBDBDBDBDCDCDEDFDFDFE0E0E0E1E1
+      E0E1E1E0E1E1E1E2E2E2E4E4E5E8E8EAEEEEEFF5F5807DB7271F85271F85271F
+      855955A1EBEFEFE9ECECEAEDEDEDF2F25A55A2271F85271F85271F85EFF4F4EA
+      EEEEE7E9E9E5E6E6E4E5E5E6E8E8E8EBEBEBEFEFEFF4F47370B0271F85271F85
+      271F85342C8CEEF2F2E9ECECE7E9E9E7E9E9EAEDEDEFF3F3271F85271F85271F
+      855A55A2F2F7F7F0F5F5F0F5F5A6A5CC271F85271F85271F85271F857370B0EF
+      F3F3EBEEEEE9EBEBE6E7E7E5E5E5E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8
+      E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F79494949494949494949494949393939393939393939393939393
+      93939393939393939393979898A1A6A6AFB9B9C1D1D1251D87251D87251D874F
+      4F9EBECDCDACB6B6A3A9A9A0A5A5A8B0B0B7C4C4949FC0251D87251D87251D87
+      251D879FAAC4BAC6C6ADB5B5A7ADADA9B0B0B5BEBEBAC8CE251D87251D87251D
+      876769ABD3E6E6D1E3E3C7D5D5BDC9C9B7C1C1B4BCBCB1B9B9AEB6B6ACB4B4AA
+      B1B1A8AEAEA5AAAAA1A6A69EA1A19A9D9D9DA1A1A6ADADB3BFBF9CA8C2251D87
+      251D87251D879BA7C1B0BDBDA0A6A6949696909292979B9BA5AFAFB8C8C84F4E
+      9E251D87251D87251D87BACCCCA5B1B1959B9B8B8D8D8595C78DA8ECA1BEF193
+      A8DA251D87251D87251D87717DBFA7C5F394AFED8BA6EC8EA9ED9CB8F0A0BAE7
+      2F298E251D87251D87251D877C8BC7AFCDF59DB9F08EA8ED829DEA7C95E97791
+      E8758EE8748DE8768EE38995C39A9CA29B9C9C9D9F9F9FA3A3A5ABABAEB9B9BB
+      CCCC828BBA251D87251D87251D87251D87A1BAE79EB9F08EA7EB88A0EA8DA6EB
+      9DB7F0B4D1F5251D87251D87251D87251D87B8D3F0ABC5F198B1EC8BA2E98499
+      E78494CF8990A38E9090959898A0A6A6B0BBBBC2D3D36568AA251D87251D8725
+      1D879DA7C1B9C4C4B4BDBDB7C2C2C3D1D1504F9F251D87251D87514F9FC6D3D3
+      BDC7C7BCC5C5C2CECE858AB9251D87251D87251D87B5C2D6D7E9E9D2E1E1CAD6
+      D6C4CDCDC1C9C9BEC5C5BDC4C4BCC2C2BBC0C0BBC1C1BABFBFB9BDBDB7BABAB6
+      B9B9BABEBEC2C8C8CDD7D75E5DA5251D87251D87251D87C2D0E5CBDAEEC0CCE7
+      B8C3E2B4BCDFB3BBDEB5BCDEB5BDDEB6BDDEB7BFDEB8C0DDB9BFDDBDC3DFC2CA
+      E1CBD4E7D6E1EE5452A3251D87251D875552A3DBE6F0D2DAE8CBD1E1C8CDDEC7
+      CADDC7CBDDC9CDDDCBCEDECED2E0D0D4E2D4D9E4D8DEE8DDE5ECE4EDF1A0A2CD
+      251D87251D87251D87251D87A9ACCDE0E4E4DCDEDED9D9D9D6D7D7D7D7D7D8D8
+      D8D9D9D9DADADADADADADADADADBDCDCDCDCDCDDDDDDDEDFDFDEDFDFDFDFDFDF
+      E0E0E2E3E3E4E6E6E8EBEBECF0F0E4E9F0322B8E251D87251D87251D877E7CB7
+      EBEFEFE9ECECEAEDEDEDF2F25854A3251D87251D87251D87EEF3F3E9ECECE6E7
+      E7E3E4E4E2E3E3E3E4E4E6E7E7E9EBEBEDF0F0E4E8EF322B8E251D87251D8725
+      1D87A4A4CCEBEEEEE9EBEBE9EBEBEBEEEEEFF3F3251D87251D87251D875954A3
+      F3F8F8F3F8F8CCCFE3322B8E251D87251D87251D87726FB1EFF3F3ECEEEEE9EB
+      EBE7E8E8E6E7E7E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7959595959595949494949494949494949494949494949494949494949494
+      939393939393989999A1A6A6AFB9B9C1D2D2241C8A241C8A241C8A4F4EA0BFCF
+      CFB0BABAA8B0B0A9B1B1B2BEBEB8C8CE2F2890241C8A241C8A241C8A777DB3BD
+      CBCBAFB8B8A5AAAAA3A7A7AAAFAFB6C0C09FA8C4241C8A241C8A241C8A45429C
+      7C81B8868DBEA2ADC9B2BECCC3D0D0C1CDCDBECACABCC8C8B9C5C5B8C2C2B4BF
+      BFB1BABAACB3B3A5ACACA0A5A5A1A6A6A8B0B0B5C1C19CA7C3241C8A241C8A24
+      1C8A9BA7C2B1BDBDA0A7A7959797919393989C9CA5AFAFB8C8C84E4DA0241C8A
+      241C8A241C8ABACCCCA5B1B1959A9A8B8D8D8397D28EA8ECA1BEF193A8DB241C
+      8A241C8A241C8A717DC1A8C5F396B3EF90ABED96B1EFA7C5F35E65B3241C8A24
+      1C8A241C8A4C4EA5B4D2F6A0BCF28EAAEE819CEB7B94E9778FE9758DE8748DE8
+      748CE8748CE8738CE8768DE38794C197999E999A9A9CA0A0A3AAAAADBBBEB5D2
+      EF4C4EA5241C8A241C8A241C8A5E65B3A9C5F394AFEE8CA5EC90A8EC9EBAF0B4
+      D1F5241C8A241C8A241C8A4C4EA6B9D5F5A3BCF092A9EB879BDD898FA98B8B8B
+      8B8B8B8E8E8E9294949CA1A1AAB2B2BCCACA99A5C7241C8A241C8A241C8A767B
+      B2BCC8C8B7C0C0BAC4C4C4D2D2504EA1241C8A241C8A504EA1C7D4D4BEC9C9BE
+      C8C8C5D2D26667AC241C8A241C8A241C8A6869AE7E82B99FA8CBA5AECAC1CCD3
+      CAD5D5C8D3D3C8D2D2C7D0D0C6CFCFC5CDCDC3CBCBC1C8C8BEC4C4BDC2C2BFC5
+      C5C6CECED1DCDC3B3696241C8A241C8A47439CD5E4EDC6D4EBBCC8E5B6C0E1B2
+      BBDFB4BBDEB4BBDDB5BDDEB6BDDEB7BEDDB8BFDDBAC0DDBCC4E0C3CAE3CBD4E8
+      D7E2EE5351A5241C8A241C8A5451A5DAE5EFD2D9E8CBD1E1C8CDDFC6CADDC7CC
+      DDC9CEDECCD0DFCFD4E2D4D9E4D8DEE8DEE5EDCCD3E5625FAC241C8A241C8A24
+      1C8A241C8A49449DE4E9E9DEE2E2DBDCDCD9D9D9D7D7D7D8D8D8D9D9D9D9D9D9
+      DADADADADADADADADADBDBDBDDDDDDDDDEDEDFDFDFDFE0E0E0E1E1E2E4E4E5E7
+      E7E8EBEBECF0F0E3E8EF4B459F241C8A241C8A241C8A241C8AAFB0D2EAEDEDE8
+      EBEBEAEDEDEDF2F25753A5241C8A241C8A241C8AEFF3F3EAECECE6E7E7E3E4E4
+      E2E2E2E3E3E3E4E4E4E6E8E8EAECECEEF2F28B8AC0241C8A241C8A241C8A6561
+      ACEDF0F0EAECECEAECECEBEEEEF0F4F4241C8A241C8A241C8A5853A6F3F8F8CC
+      CFE3312A91241C8A241C8A241C8A4B459EF0F4F4EDEFEFEAEBEBE8E8E8E6E7E7
+      E6E7E7E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F0F0
+      F0F0F0F0F1F1F1F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F79595
+      9595959595959595959595959595959595959595959595959595959594949494
+      9494999A9AA2A7A7B0BABAC2D2D2221B8C221B8C221B8C4D4DA2C4D6D6B7C4C4
+      B1BCBCB4C0C0BFCECE5859A7221B8C221B8C221B8C4D4DA2C0D0D0B2BCBCA6AC
+      AC9FA2A2A1A5A5A9AFAFB7C2C2A0AAC6221B8C221B8C221B8C221B8C221B8C22
+      1B8C221B8C221B8C221B8C3733964C4BA06C6EAE7579B2939CC09BA5C1BFCECE
+      BAC6C6B2BCBCA9B1B1A6ADADAAB3B3B7C3C39CA8C4221B8C221B8C221B8C9BA7
+      C3B2BEBEA0A7A7949797919393999D9DA6AFAFB9C9C94C4DA1221B8C221B8C22
+      1B8CBACCCCA5B0B0959A9A8A8C8C8398D98FA9ECA2BFF193A8DC221B8C221B8C
+      221B8C707CC2A9C6F399B5F096B1EF9DBAF1A7C4EE221B8C221B8C221B8C221B
+      8C96ACDDA7C5F393AFEF849EEB7B95E9778FE8758DE8748DE8748DE8748DE974
+      8DE9758DE8748DE8748DE8778EE38693BF979898979FAE96AEE2A6C4F3A9C3EA
+      221B8C221B8C221B8C221B8CAAC5EE9CB8F092ABED93ACED9FBAF0B4D1F5221B
+      8C221B8C221B8C747FC2B4D1F59FB7EB94A0BA8F91918B8B8B8C8C8C8D8D8D8E
+      8E8E9393939A9D9DA8AFAFB9C6C6A1AFCB221B8C221B8C221B8C777CB5BFCCCC
+      B8C2C2BBC5C5C5D2D24E4EA2221B8C221B8C4F4EA3C8D5D5C0CBCBC0CACAC8D5
+      D54F4EA3221B8C221B8C221B8C221B8C221B8C221B8C221B8C221B8C221B8C4E
+      4DA14E4CA17A7DB68588BBA5ADCAB9C3D1CDD7D7C9D1D1C6CECEC6CDCDCAD3D3
+      D4E0E0221B8C221B8C221B8C514FA4D5E1E6C5D2EBBBC6E5B6BFE1B3BCDEB4BB
+      DEB4BCDEB6BDDFB7BEDEB8BFDEB9BFDEBAC1DEBDC4DFC3CBE3CCD6E8D7E2EF52
+      50A7221B8C221B8C5250A7DBE5EFD2D9E8CCD1E2C8CCDFC6CADDC8CCDECACFDF
+      CFD3E2D2D8E4D9E0E9DFE7EE8F91C62E2993221B8C221B8C221B8C221B8C2F29
+      92C1C5DAE1E5E5DDDFDFDADBDBD8D9D9D8D8D8D8D8D8DADADADBDBDBDBDBDBDB
+      DBDBDBDBDBDCDCDCDEDEDEDEDFDFE0E1E1E1E2E2E3E4E4E5E8E8E9ECECEDF1F1
+      BCBFDC3C3799221B8C221B8C221B8C221B8C4944A0ECF0F0E9EBEBE8EAEAE9EC
+      ECEEF2F25652A7221B8C221B8C221B8CEFF3F3EAECECE6E7E7E3E4E4E2E2E2E3
+      E3E3E4E4E4E6E6E6E9EAEAEDF0F0D8DBEA221B8C221B8C221B8C3C379AEEF2F2
+      EBEEEEEAEDEDECEFEFF0F4F4221B8C221B8C221B8C5652A7E6EAF13C379A221B
+      8C221B8C221B8C4945A0E3E7EEEDF0F0EAECECE8E9E9E7E8E8E7E7E7E6E6E6E6
+      E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5
+      F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7969696969696
+      969696969696959595969696969696959595959595959595959595949494999A
+      9AA2A7A7B1BABAC2D2D2211A8E211A8E211A8E4C4CA3CDE2E2C2D3D3BECECEC3
+      D3D396A3C7211A8E211A8E211A8E2C2793BCCCD3B6C2C2A8AFAF9BA4B4989DA6
+      9FA1A1A9AFAFB7C2C2A0AAC7211A8E211A8E211A8E211A8E211A8E211A8E211A
+      8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E49
+      479E989FB5AEB7B7AEB8B8B8C5C59DA8C5211A8E211A8E211A8E9CA8C5B3BFBF
+      A2A9A9959898929494999E9EA6B0B0B9C9C94C4CA3211A8E211A8E211A8EBBCD
+      CDA6B1B1959A9A8A8C8C829BEA8FAAEDA3C0F293A8DD211A8E211A8E211A8E70
+      7BC3AAC7F39CB8F09AB7F0A6C2F38090CF211A8E211A8E211A8E4A4CA9B2D1F6
+      9CB9F18AA5ED7F98EB7991EA758EE9758EE9758EE9758EE9758EE9758EE9758E
+      E9758EE9768EE9768EE9768EE97D92DF8198E68AA4EC9CB8F1B2D0F65459B021
+      1A8E211A8E211A8E8091CFA4C0F298B1EF96B0EEA0BBF1B5D1F5211A8E211A8E
+      211A8E737FC3B8CDE0A6B2B5999E9E9091918C8C8C8E8E8E8F8F8F9090909393
+      939C9F9FA8B0B0B9C6C6A1AECB211A8E211A8E211A8E777CB6C0CCCCB9C3C3BB
+      C6C6C5D3D34E4DA4211A8E211A8E4E4DA4C8D5D5C1CBCBC1CBCBC9D5D54E4DA4
+      211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A
+      8E211A8E211A8E211A8E211A8E211A8E3733984D4AA1CCD5D5CED8D8D6E2E221
+      1A8E211A8E211A8E504FA6D6E1E1C6D3EABDC7E6B7C0E2B3BDDFB4BCDFB5BDDF
+      B6BDDFB7BEDFB9C0DEBAC0DEBAC1DEBEC5E0C4CCE4CDD7E8D8E3EF5150A8211A
+      8E211A8E5250A8DBE5EFD2DAE8CCD2E3C8CDDFC7CBDEC9CEDFCDD2E1D1D7E4D8
+      DEE9DFE7EF6B6AB4211A8E211A8E211A8E211A8E211A8E4743A1CED3E1E3E7E7
+      DDE0E0DBDCDCDADADAD9D9D9D9D9D9DADADADBDBDBDCDCDCDCDCDCDCDCDCDDDD
+      DDDDDDDDDEDFDFDFDFDFE1E2E2E3E5E5E6E9E9EAEEEEE1E5ED6F6DB6211A8E21
+      1A8E211A8E211A8E211A8E2E2895C8CAE0E9ECECE7E9E9E8E9E9EAECECEEF2F2
+      5552A9211A8E211A8E211A8EEFF3F3EAEDEDE7E8E8E4E5E5E3E3E3E3E3E3E3E3
+      E3E5E5E5E8E9E9ECEFEFF1F5F5211A8E211A8E211A8E211A8EEFF3F3ECEFEFEB
+      EEEEEDF0F0F0F4F4211A8E211A8E211A8E4944A24944A2211A8E211A8E211A8E
+      4944A2E6E9F0EFF2F2ECEEEEE9EAEAE7E8E8E7E7E7E6E6E6E6E6E6E6E6E6E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECEC
+      ECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F797979797979797979797
+      9797979797969696979797969696969696969696959595959595999A9AA2A7A7
+      B1BABAC3D3D31F19911F19911F19914B4CA6CEE3E3CEE3E3CCE0E0C3D6DE3531
+      9B1F19911F19911F199197A4C9C0D0D0AFB9B999ABD28AA2E9859DE889A0E498
+      ACDCADC0DC99A7D01F19911F19911F19919CA6CCA8B4D29DA7CC787DB96163AD
+      4B4AA335329A1F19911F19911F19911F19911F19911F19911F19911F1991959C
+      BAB3BDBDB2BCBCBAC6C69CA8C61F19911F19911F19919EAAC8B5C2C2A3AAAA97
+      9A9A939595999E9EA7B1B1BACBCB4A4BA51F19911F19911F1991BCCFCFA7B2B2
+      969C9C8B8E8E849DEB91ACEEA4C0F294AADD1F19911F19911F19916E7BC4AAC8
+      F49FBBF19FBBF1ABC8F45C63B81F19911F19911F19918396D1A9C7F495B0EF85
+      9FEC7B94EA7790E9778FE9768FE9768EE9768EE9768EEA768EEA768FE9768EE9
+      768EE9778FEA778FE97790E97C95EA849EEC95B0EFAAC7F48495D11F19911F19
+      911F19915257B2ABC6F39CB6F099B3EFA1BDF1B5D2F51F19911F19911F199155
+      57ABBFD1D1ABB6B69DA2A29395958F90908F8F8F9090909292929798989FA3A3
+      ACB4B4BECCCC98A3C91F19911F19911F1991767BB7BFCBCBB8C2C2BCC6C6C6D3
+      D34C4CA61F19911F19914D4CA6C9D6D6C1CBCBC1CACAC8D4D45859AB1F19911F
+      1991423FA2C2CFDEABB5D3878DC17A7DB95757A94C4BA42A26951F19911F1991
+      1F19911F19911F19911F19911F19912A2695D0DBDBD1DCDCD7E3E32B26961F19
+      911F19914340A2D8E4E4CBD5E1C0CAE8B8C2E3B5BDE1B5BDE0B6BEE0B7BEE0B9
+      C0DFB9C0DFBAC1DFBBC2DFBEC5E1C5CDE5CED7E9D9E3F0504FAA1F19911F1991
+      504FAADBE5F0D2DAE8CCD3E3C9CDE0C8CDDFCCD1E1D0D4E4D6DBE8DEE5EE6A69
+      B61F19911F19911F19911F19912C27968585C1E5EBEBE1E6E6DEE1E1DCDDDDDA
+      DBDBDADADAD9D9D9DADADADADADADBDBDBDCDCDCDCDCDCDCDCDCDDDDDDDDDDDD
+      E0E0E0E2E3E3E4E5E5E7E9E9EBEEEEBBBDDB2C26971F19911F19911F19911F19
+      911F19912C2797C8CAE0EBEEEEE8EAEAE6E7E7E7E8E8EAECECEEF2F25451AB1F
+      19911F19911F1991EFF3F3EAEDEDE7E8E8E4E5E5E3E3E3E3E3E3E4E4E4E6E6E6
+      E8EAEAECEFEFF1F5F55451AB1F19911F19911F1991F0F4F4ECEFEFECEEEEEDF0
+      F0F0F4F41F19911F19911F19911F19911F19911F19911F19912C2797CCCFE5F2
+      F6F6EEF0F0EAECECE8E9E9E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEAEAEAEAEAEAEBEBEB
+      EBEBEBEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F79898989898989797979797979797
+      979898989797979797979797979696969696969696969A9B9BA3A8A8B1BABAC3
+      D3D31E17931E17931E179334319D767DBB767DBB767DBB5557AC1E17931E1793
+      1E1793767DBBCEE3E3BECDCDA8BAD493ACEC8AA2EA859EE989A1EA92ABECA2BD
+      F0A3BCE91E17931E17931E17937D8BCCCBE6F5C5DFF2BBD4EEBCCFE0C5D0D0C6
+      D2D2C8D6D6B8C4D4A7B3D2858CC24C4BA81E17931E17931E1793A2ABC2B6C0C0
+      B3BEBEBAC7C79DA9C81E17931E17931E1793757BB9B9C7C7A7AFAF9A9E9E9699
+      999CA1A1A9B3B3BDCECE494AA71E17931E17931E1793C0D3D3AAB6B6989F9F8C
+      94A287A0EC93AFEFA7C4F396ABDF1E17931E17931E17936D79C5ABC8F4A0BCF2
+      A2BFF3AFCDF53D3DA61E17931E17931E1793A7C2EBA4C0F390ABEF819BEC7993
+      EA7790EA778FEA778FEA768FEA778FEA778FEA768FEA778FEA768FEA768FEA78
+      90EA7890EA7890EA7A92EA839CEC90AAEFA3C0F3B1CDF11E17931E17931E1793
+      3331A0AECBF5A0BBF19CB6F0A4BFF1B6D3F61E17931E17931E1793292498C7DA
+      DAB3C0C0A3ABAB999D9D9495959192929293939696969B9E9EA5ABABB3BEBEC4
+      D4D46D71B71E17931E17931E1793949DC4BEC9C9B8C1C1BCC5C5C6D3D34C4BA8
+      1E17931E17934C4BA8C9D5D5C0CACABFC8C8C6D1D1787CBA1E17931E17931E17
+      93CDDCE4D9EAEAD3E0E0CDD8D8CAD5D5CBD5D5CDD8D8D1DDDDA9B2D0ACB6D57D
+      81BE2A24991E17931E17934D4BA8D2DDDDD1DBDBD5E0E05A5AAF1E17931E1793
+      1E1793C4CFDED1DBDCC4CFE8BCC7E5B7C0E2B6BFE1B9C0E1BAC1E0BAC2E0BBC2
+      E0BCC3E1BDC4E0C0C7E2C7CEE5CFD7EAD9E4F04F4DAC1E17931E1793504EACDC
+      E6F0D3DBE9CDD4E4CACEE0CACEE1CED2E2D3D8E6DAE1EBB2B6DA1E17931E1793
+      1E17931E1793514EABD0D6E6E5EBEBE2E5E5DEE0E0DCDEDEDBDCDCD9DADADADA
+      DADADADADBDBDBDBDBDBDCDCDCDDDDDDDDDDDDDDDDDDDEDEDEDFE0E0E1E1E1E3
+      E4E4E6E9E9EBEEEEA0A1CF1E17931E17931E17931E17931E17931E1793615DB2
+      E2E5EDECEFEFE9EBEBE6E8E8E6E7E7E7E8E8EAECECEEF2F2534FAC1E17931E17
+      931E1793F0F4F4EBEEEEE8E9E9E5E6E6E4E4E4E4E4E4E5E5E5E7E7E7E9EBEBED
+      F0F0F1F6F61E17931E17931E17931E1793F0F3F3EDF0F0ECEEEEEEF0F0F1F5F5
+      1E17931E17931E17933933A02B25991E17931E17932B2599E7EBF3F2F6F6EEF1
+      F1EBECECE9E9E9E8E8E8E7E7E7E8E8E8E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBECECECECECECECECECEBEBEBEBEBEBEBEBEBECECECECECECECECECECECEC
+      ECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7989898989898999999989898989898989898
+      9898989797979797979797979696969696969B9C9CA3A8A8B1BBBBC3D3D31C16
+      951C16951C16951C16951C16951C16951C16951C16951C16951C16951C169580
+      89C1C3D6DEBED3DFA7C2F198B2ED8DA6EB889FE989A0E990A9EB9EB8EFB1CDF4
+      3130A21C16951C1695474AAEC8E5F9BCD9F7B0CCF4A8C3F2B8C6D2C0C9C9C4CE
+      CECBD8D8D4E5E5D5E7E75658AF1C16951C169527239AC1CECEB7C1C1B4BEBEBB
+      C8C89EAAC91C16951C16951C1695757CBCC0D0D0AEB8B8A1A7A79CA1A1A2A9A9
+      B0BCBCC2D5D53D3CA31C16951C16951C1695BACED6AFBEBE9EA7A7939DAF8EA9
+      EE9BB6F1AECBF58FA2DA1C16951C16951C16957583CDA9C6F4A0BDF2A4C1F3B2
+      D0F61C16951C16951C16951C1695B7D5F79FBBF28DA8EE8099EC7992EB7891EB
+      7891EB7891EA7890EB7790EB7790EB7790EB7790EA7790EA7890EA7890EB7991
+      EB7891EB7A92EA809AEC8DA7EEA0BBF2B7D5F727239B1C16951C16951C1695B3
+      CFF6A3BEF29EB9F1A5C0F2B7D4F61C16951C16951C16951C16958A96C6BECECE
+      AFB9B9A3A9A99CA0A0999B9B9A9C9C9DA0A0A5AAAAB0B8B8BECBCBC2D2DA2723
+      9A1C16951C16951C1695B2BDCDBBC5C5B7BFBFBCC5C5C6D3D34A4AA91C16951C
+      16954B4AAAC9D5D5BFC8C8BDC5C5C3CDCDACB7CF1C16951C16951C1695929ACA
+      D7E7E7D0DCDCC9D2D2C6CECEC4CDCDC8D0D0CDD7D7D5E1E1DCEBEBD0DEE61C16
+      951C16951C16956F71B9D1DBDBCED7D7D2DCDC878BC21C16951C16951C169572
+      74BCD8E3E3CDD6DDC2CEE9BDC7E6BDC5E5BDC5E4BDC6E3BEC7E3BFC7E3C0C8E3
+      C1C7E3C3CAE4C9D1E7D1DAEBDAE6F14E4DAE1C16951C16954E4DAEDFE8F1D6DE
+      EBD0D6E6CED2E4CDD2E3D1D5E5D6DCE9DEE5EE6868B91C16951C16951C16956A
+      6ABAEAF3F5E5EBEBE2E6E6DFE2E2DEDFDFDCDDDDDBDCDCDADBDBDBDBDBDADADA
+      DBDBDBDCDCDCDCDCDCDEDEDEDEDEDEDEDEDEDFDFDFE1E1E1E2E3E3E6E7E7E9EC
+      ECB9BBDB1C16951C16951C16951C16951C16953732A1BCBEDDEEF2F2ECEEEEE9
+      EBEBE7E8E8E6E6E6E6E6E6E7E8E8EAEDEDEFF3F3524FAE1C16951C16951C1695
+      F0F4F4ECEEEEE8EAEAE6E7E7E5E5E5E5E5E5E6E6E6E7E8E8EAECECEEF1F1D8DB
+      EB1C16951C16951C16953732A2F0F3F3EDEFEFECEEEEEEF0F0F1F5F51C16951C
+      16951C1695524FAEB0B2DA1C16951C16951C16954541A8E6E9F1EFF2F2ECEEEE
+      EAEAEAE9E9E9E8E9E9E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBECECECECECECECECECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F799999999999999999999999999999999999998989898
+      98989797979797979797979696969B9C9CA4A9A9B1BBBBC3D3D31B15971B1597
+      1B15971B15971B15971B15971B15971B15971B15971B15971B15971B15972622
+      9C8EA0DAB2CDF4A2BCF095ADED8CA4EB89A2EB8EA7EC9AB4EFABC6F26C78C71B
+      15971B15971B15979DB2E1BDDAF7B0CCF4A6C1F2A8BEE5BDC5C5C2CCCCCAD7D7
+      D4E4E4BFCEDE1B15971B15971B15975F61B2C0CCCCB7C0C0B5BFBFBDCACAA0AC
+      CC1B15971B15971B15973D3CA5C8DBDBB8C5C5ACB5B5A8B0B0ADB8B8B9C8C8C0
+      D3DB1B15971B15971B15971B159792A1CAB9CACAA8B5B59EADC09CB6F1A7C3F3
+      B9D6F76670C21B15971B15971B159790A5DFA7C3F4A0BCF3A4C1F3B4D2F71B15
+      971B15971B15974549B0B4D3F79DB9F28BA6EF7F99EC7992EB7991EB7991EB78
+      91EB7891EB7891EB7891EB7890EB7891EB7890EB7991EB7992EB7991EB7991EB
+      7A92EB8099EC8CA6EF9EB9F2B4D2F74549B01B15971B15971B1597B5D1F6A4BF
+      F2A0BAF1A6C1F3B7D4F61B15971B15971B15971B159726229CBFD1DABCCACAB0
+      BABAA8AFAFA5ABABA6ACACA9B0B0B1BABABDC9C9CADBDB5457B01B15971B1597
+      1B15974948AAC2CECEB8C0C0B6BDBDBDC6C6C8D6D64A4AAB1B15971B15974A4A
+      ABC9D5D5BFC7C7BBC2C2BFC7C7CAD5D5332FA11B15971B15973330A1D8E8E8D0
+      DCDCC8D2D2C4CCCCC2CACAC6CECECCD5D5D4E0E0DCEBEB7C80C21B15971B1597
+      1B1597B3BBD4CED6D6CBD2D2CDD5D5CAD3DB27239C1B15971B15971B1597AEB6
+      D7D7E1E1CED8E7C7D2EBC5CFEAC4CEE9C4CEE8C5CEE8C6CFE8C6CFE7C6CEE7C8
+      D0E8CDD6E9D5DFEEDEEAF34E4CAF1B15971B15974E4CAFE2EDF4DAE4EFD5DCEA
+      D1D7E6D1D6E5D3D8E7D8DEEAE0E7F04E4CAF1B15971B15971B1597DEE6F1E9F1
+      F1E4EAEAE2E6E6E0E2E2DFE1E1DFE0E0DCDDDDDCDDDDDBDBDBDBDCDCDCDCDCDD
+      DDDDDEDEDEDEDEDEDFDFDFE0E0E0E0E0E0E2E2E2E4E5E5E7E9E9EBEFEF514DAF
+      1B15971B15971B15971B15976C6ABCE4E8F0EEF1F1EBEDEDE9EAEAE7E8E8E6E6
+      E6E5E5E5E5E6E6E7E8E8EBEDEDEFF3F3514EAF1B15971B15971B1597F0F4F4EC
+      EEEEE8EAEAE6E7E7E5E5E5E7E7E7E8E8E8EAEBEBEDEFEFF1F4F49595CE1B1597
+      1B15971B15975F5CB5EFF2F2EDEFEFECEEEEEEF0F0F2F5F51B15971B15971B15
+      97514EB0F4F9F9A2A3D41B15971B15971B15975F5DB6F1F5F5EEF1F1ECEDEDEA
+      EBEBE9E9E9E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F79B9B9B9A9A9A9A9A9A9A9A9A9A9A9A9999999999999999999898
+      989898989898989797979C9D9DA3A8A8B1BBBBC3D3D319149A19149A19149A30
+      2EA2747BBE747BBE747BBE747BBE5255B019149A19149A19149A19149A19149A
+      8090D4AEC9F39FB9F093ABED8CA5EC8DA6EC96AFEEA4BEF1ABC4EF24219F1914
+      9A19149A2F2EA6B8D3F3B7D3F6AECAF3A9C4F3BCCAD5C6D1D1CDDBDBCADAE23D
+      3CA919149A19149A19149AB3BFCFBBC6C6B4BDBDB5BEBEBFCDCDA2AED019149A
+      19149A19149A19149AA1B0D1C3D5D5BAC8C8B7C4C4BBCACAC6D9D97D88C21914
+      9A19149A19149A19149A3A3BA7C2D7D7B6C7C7ADC3D9ADC9F5B6D4F7BAD7F42F
+      2EA619149A19149A19149AA9C4F0A3BFF39DB9F2A3C0F3B4D2F719149A19149A
+      19149A4448B2B4D3F79DB9F28CA6EF809AED7A92EC7A92EC7992EC7992EC7992
+      EC7991EC7991EC7891EC7991EB7991EB7991EB7A92EC7A92EC7B92EB7B92EB81
+      99EC8CA6EE9DB9F2B5D2F74448B219149A19149A19149AB5D2F6A5C0F3A0BAF1
+      A7C2F3B8D4F719149A19149A19149A19149A19149A3B3BA8BECED7BFCECEB8C4
+      C4B6C1C1B7C1C1BAC6C6C2CFCFCBDCDC5F63B719149A19149A19149A19149A9D
+      A8C9BDC7C7B6BDBDB6BDBDBFC8C8CCD9D94949AE19149A19149A4949AECAD6D6
+      BFC6C6B9BFBFBBC1C1C4CDCD8B91C319149A19149A19149A6265B8D4E2E2CED9
+      D9C9D2D2C8D0D0CAD3D3CFDADAD7E4E4B8C3DD19149A19149A19149A4A49ADD1
+      DADAC9CFCFC5CBCBC8CECED0D8D8797DBF19149A19149A19149A25229FAEB6D8
+      DAE4E6D3DFEDCFDBEFCEDAEECFDAEECED9EDCFDAEDC3CCE7C2CAE6CFD8EBD3DD
+      EDDAE5F1E3EFF74C4BB219149A19149A4C4CB2E7F2F8E0EBF3DBE3EFD7DEEBD6
+      DCEAD7DDEADBE1ECE1E9F14D4CB119149A19149A19149AECF5F5EBF2F2E7ECEC
+      E4E8E8E2E6E6E2E5E5BBBCD5DFE1E1DEDFDFDEDEDEDDDDDDDDDDDDDEDEDEDFDF
+      DFDFDFDFDFDFDFE0E0E0E0E0E0E2E3E3E5E6E6E9EBEBD3D6E719149A19149A19
+      149A19149A7978C3F1F6F6EEF1F1EAEDEDE9EAEAE7E8E8E7E7E7E6E6E6E6E6E6
+      E6E7E7E8E9E9EBEDEDEFF3F3504DB219149A19149A19149AF1F5F5EDF0F0EAEB
+      EBE8E9E9E7E8E8E8E8E8E9EAEAECEEEEEFF2F2E5E9F12722A019149A19149A19
+      149AA0A1D3EEF1F1ECEEEEECEEEEEEF0F0F2F5F519149A19149A19149A504DB2
+      F5F9F9F5F9F96C6ABD19149A19149A19149A6B6ABDF1F4F4EFF1F1ECEEEEEBEB
+      EBEAEAEAE9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAE9E9E9EA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEAEAEAEBEBEBEAEAEA
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F79C9C9C9B9B9B9A9A9A9A9A9A9A9A9A9A9A9A9A9A9A999999999999999999
+      9898989797979C9D9DA4A9A9B1BBBBC3D3D318139C18139C18139C4647AECEE3
+      E3C9DCDCC1D2D2BFCFCFC1D3D3B4C5D65155B418139C18139C18139C18139C92
+      A5E0A8C3F299B3EF90A9EC8DA5EC91A9ED9CB5EFABC6F3879ADA18139C18139C
+      18139C2E2DA898ACE2BAD7F7B5D2F6BBD3EECEDBDBBBC9DA3C3AAA18139C1813
+      9C18139C676CB9C1CCCCB7BFBFB2B9B9B6BFBFC1CECEA3B0D218139C18139C18
+      139C18139C231FA1A0AED1C6D9D9C5D7D7C9DDDD9FAFD1231FA018139C18139C
+      18139C2320A018139C5B60B6B6CAD2BCD5E4BEDCF9BAD7F45A61BF18139C1813
+      9C18139C4246B3ABC7F59DB8F29AB4F2A1BDF3B4D1F718139C18139C18139C2E
+      2CA8B6D4F79FBBF38DA7F0829AED7A93EC7A93EC7A93EC7A92EC7A92EC7992EC
+      7A92ED7A92EC7A93EC7A92EC7A92EC7B93EC7B93EC7B93EC7B93EC829BED8EA8
+      F0A0BBF3B7D4F7393AAE18139C18139C18139CB5D2F6A5C0F3A1BBF2A7C2F3B9
+      D5F718139C18139C18139C18139C18139C18139C241FA18891C6BCCBD3C5D4D4
+      C6D5D5CADADA97A1CC3B3AAA18139C18139C18139C18139C686DB9C2CECEB8C0
+      C0B2B8B8B5BCBCC0C9C9CEDCDC4848AF18139C18139C4848AFC9D5D5BDC5C5B7
+      BCBCB7BCBCBEC4C4C9D3D34747AE18139C18139C18139C6163B9CAD6DFD2DDDD
+      D0DBDBD2DDDDD5E2E29199CD2420A118139C18139C18139CB1B9D2CBD2D2C4C9
+      C9C2C5C5C4C8C8CAD0D0D4DDDD3D3BAA18139C18139C18139C18139C6465BBB9
+      C2DDDBE9F3DBE9F5DAE7F4CDD9EE8F96D2302CA7A5ACDAD5DFEFD9E4F1E0ECF5
+      E5F2F84B4BB318139C18139C4C4BB3E7F3F8E6F1F7E1EAF3DDE5F0DBE2EDDBE1
+      EDDDE3EEE1E9F17374C418139C18139C18139CAAAED9EDF4F4EBF1F1E8EEEEE7
+      ECECB2B4D7251FA1E2E4E4E0E1E1DEDFDFDEDEDEDEDEDEDEDEDEDFDFDFE0E0E0
+      E0E0E0E1E1E1E1E1E1E3E4E4E6E7E7EAEDEDB9BCDE18139C18139C18139C2621
+      A2F3F8F8F0F4F4EDEFEFEAECECE8E9E9E7E8E8E7E8E8E8E8E8E6E7E7E7E7E7E8
+      E9E9EBEDEDF0F3F34F4DB318139C18139C18139CF2F6F6EFF1F1ECEEEEEAEBEB
+      EAEBEBEAECECEDEFEFEFF2F2F2F6F66B69BF18139C18139C18139C3430A8F1F4
+      F4EEF0F0ECEDEDECEEEEEEF1F1F2F5F518139C18139C18139C4F4DB3F5F9F9F4
+      F8F8F4F8F84F4DB318139C18139C18139CA1A1D5F1F4F4EEF0F0ECEDEDEBEBEB
+      EAEAEAE9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEAEA
+      EAEAEAEAEAEAEAEBEBEBEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECEB
+      EBEBECECECECECECECECECEBEBEBEBEBEBECECECECECECECECECECECECECECEC
+      ECECECEDEDEDECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEEEEEEEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEEEEEEEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F2F2F2F1F1F1F2F2F2F1F1F1F2F2F2F2F2F2F1F1F1F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F2F2F2F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F4F4F4F4F4F4F4F4F4F3F3F3F4F4F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F4F4F4F4F4F4F5F5F5F4F4F4F4F4F4F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F6F6F6F5F5F5F6F6F6F6F6F6F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F6F6F6F7F7F7F7F7F7
+      F7F7F7F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F79C9C
+      9C9C9C9C9C9C9C9B9B9B9B9B9B9B9B9B9B9B9B9A9A9A9A9A9A99999999999998
+      98989D9E9EA4A9A9B2BBBBC3D3D316129E16129E16129E4447B0CBDFDFBDCCCC
+      B3BEBEAEB8B8B2BDBDBAC9CCC3DEF65A62C116129E16129E16129E2C2BA9B3CE
+      F5A1BBF194ADEE8DA5ED8DA5ED95AEEEA1BBF1AFCAF4555DC016129E16129E16
+      129E16129E3739AF6D79CC6D79CC5254B616129E16129E16129E16129E3939AA
+      C5D1D1B9C2C2B2B8B8B1B6B6ACB3BC979FC37E86C416129E16129E16129E2D2C
+      A716129E16129E3939AB4446AF3939AB16129E16129E16129E16129E2D2CA670
+      79BF16129E16129E211EA24246B44246B5211EA416129E16129E16129E16129E
+      8DA3E1A2BDF396B1F195B0F19FBAF3B1CFF6211FA416129E16129E16129EBBD8
+      F9A4BFF491ABF1839DEF7D96ED7B94ED7B93ED7B93ED7A93ED7A93ED7A93ED7B
+      93ED7B93ED7B94ED7B93ED7C94ED7B93ED7C94ED7E97EC849DEE92ABF0A4BFF4
+      BBD8F816129E16129E16129E16129EB4D0F6A5BFF3A0BAF2A7C2F4B9D5F71612
+      9E16129E16129E4547B05C61B916129E16129E16129E16129E4546B04546B016
+      129E16129E16129E16129E16129E16129E3939ABC5D2D2BAC3C3B3B8B8B2B6B6
+      B6BCBCA1A7C2A0A9CD3B3AAC16129E16129E4647B0C7D2D2BDC3C3B5B9B9B4B8
+      B8B9BDBDC2CACAC2CCD43A3AAB16129E16129E16129E221FA36062BA777CC36C
+      70BF2F2CA816129E16129E16129E16129E8E93C8CED6D6C7CBCBC1C3C3BEC0C0
+      C0C2C2C5C9C9CDD4D4C9D2DB3C3BAC16129E16129E16129E16129E16129E1612
+      9E302DA916129E16129E16129E16129EA9B1DEDAE5F24848B416129E16129E16
+      129E16129E16129E16129E16129E16129E16129E16129E16129EACAFDBDDE4EE
+      E0E7F0B1B6DE16129E16129E16129E16129E7475C48283CA8182C93E3BAE1612
+      9E16129EE4E7E7E1E3E3E0E1E1DFDFDFDEDEDEDFDFDFE0E0E0E1E1E1E1E1E1E2
+      E2E2E2E2E2E4E5E5E7E8E8EAEDEDB9BBDE16129E16129E16129E4E4CB5F4F9F9
+      F1F5F5EEF0F0ECEDEDEAECECEAEBEBEAEBEBE9EAEAE8E9E9E8E9E9EAEBEBECEE
+      EEF1F4F44E4CB516129E16129E16129EF4F9F9F1F5F5EFF1F1EDEFEFEDEFEFEE
+      F1F1F1F4F4F3F7F76A68C016129E16129E16129E16129EA0A0D5EFF2F2ECEEEE
+      ECEDEDEDEEEEEFF1F1F2F6F616129E16129E16129E4E4CB5F4F8F8F2F6F6F2F5
+      F5E5E9F1403DAF16129E16129E16129EAEAFDBF1F4F4EFF1F1EDEEEEEBECECEB
+      EBEBEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECEBEBEBECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F79D9D9D9C9C9C
+      9C9C9C9C9C9C9B9B9B9B9B9B9B9B9B9B9B9B9A9A9A9A9A9A9999999999999C9D
+      9DA5AAAAB2BBBBC3D3D31510A11510A11510A14345B2C3D5D5B3BEBEA7AEAEA0
+      A6A6A2AAAEA8BFE7B5D0F5BBD5F3201DA61510A11510A11510A19CB2E7A8C2F3
+      98B1F08FA7EE8CA4ED8FA8EE98B1F0A3BDF2B0CBF57280D11510A11510A11510
+      A11510A11510A11510A11510A11510A11510A11510A15B5DB7BCC6CFBCC4C4B4
+      B9B9AEB2B2AEB3B3ACB2BB2B28A61510A11510A11510A11510A196A2CF3838AD
+      1510A11510A11510A11510A11510A11510A11510A11510A1A9BBD6CBE1E13737
+      AC1510A11510A11510A11510A11510A11510A11510A11510A1535BC1A9C5F599
+      B4F290AAF090ABF19BB6F3AECBF64145B71510A11510A11510A195ABE3A9C6F5
+      96B1F288A1EF7F97EE7C94ED7B94ED7B94ED7B94ED7B93ED7B94EE7B94ED7B94
+      ED7C94ED7C94ED7C94ED7C94ED7D95ED8098EE88A1EF97B0F2ABC6F5A0B7E815
+      10A11510A11510A14145B7B1CDF6A3BCF39FB8F2A7C1F4B9D5F71510A11510A1
+      1510A14445B2D2E5E55C60BA1510A11510A11510A11510A11510A11510A11510
+      A11510A11510A11510A1676BBCC6D2D2BDC5C5B5BABAB0B3B3B1B4B4B6BBBB6B
+      6CB41510A11510A11510A11510A12C2AA9C4CDCDBBC0C0B4B7B7B2B4B4B4B7B7
+      BCC1C1C4CCCCC1CCD44545B11510A11510A11510A11510A11510A11510A11510
+      A11510A11510A1211EA58D93C9CFD7D7C8CDCDC2C5C5BEC0C0BCBDBDBEBFBFC1
+      C3C3C8CCCCCED5D5CAD2DB6D6FC01510A11510A11510A11510A11510A11510A1
+      1510A11510A11510A11510A1AAB3DFDDE8F44847B61510A11510A11510A11510
+      A11510A11510A11510A11510A11510A11510A11510A1ACB0DCDCE3EEDEE5EFE2
+      E9EF7172C31510A11510A11510A11510A11510A11510A11510A11510A11510A1
+      E5E8E8E1E3E3E0E1E1E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E3E3E3E3E3
+      E3E4E5E5E7E8E8EBEDEDC7C8E31510A11510A11510A11510A1E6EAF3F2F6F6F0
+      F3F3EEF1F1EDF0F0EDF0F0EDEFEF9B9AD1EAECECEAEBEBEBECECEDEFEFF1F4F4
+      4D4AB71510A11510A11510A1F5F9F9F4F8F8F2F6F6F1F5F5F1F5F5F2F6F6BCBE
+      E23E3CB21510A11510A11510A11510A16967C1F1F4F4EEF0F0ECEDEDEBECECEC
+      EDEDEFF1F1F2F6F61510A11510A11510A14D4BB7F4F7F7F1F4F4F1F3F3F2F4F4
+      CACCE7231FA61510A11510A1221FA7CACCE7F2F4F4EFF1F1EDEEEEECECECEBEC
+      ECEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F79E9E9E9E9E9E9D9D9D9D
+      9D9D9D9D9D9C9C9C9C9C9C9B9B9B9B9B9B9A9A9A9999999999999D9E9EA5AAAA
+      B2BBBBC3D3D3130FA3130FA3130FA34244B3BECECEACB6B69EA4A4979A9A94A8
+      DE9DB5F0ACC5F3BDD9F7646EC9130FA3130FA3130FA36A76CDADC8F49CB5F090
+      A8EE8AA3ED8CA4ED91AAEE99B1F0A3BCF2ACC7F4A2BAEB535BC3130FA3130FA3
+      130FA3130FA3130FA3130FA34F50B69EA6CAC5CFCFBDC5C5B5BABAAFB2B2ACAF
+      AFADB1B1B3B9B99297BC130FA3130FA3130FA3130FA39EABD0BFCFD8585CB813
+      0FA3130FA3130FA3130FA3130FA32A29AAA1B0CBBDCECEB9CACAB0BFC8686EB8
+      1E1BA6130FA3130FA3130FA3130FA32929AE6F7DD2AAC6F69CB8F391AAF18BA4
+      F08DA6F097B2F2A9C6F66976CE130FA3130FA3130FA3626DCAB2CFF79DB8F48D
+      A7F1839CEF7E97EE7C95EE7C95EE7C94EE7C95EE7C94EE7C95EE7C95EE7D95EE
+      7D95EE7D95EE7D95EE8098EE849DEE8EA7F09DB8F3B2CEF7626DC9130FA3130F
+      A3130FA3606AC9ADC7F59FB9F39DB7F2A8C1F4B9D5F8130FA3130FA3130FA343
+      45B4D2E6E6D2E4E49FABD04243B2130FA3130FA3130FA3130FA3130FA3130FA3
+      4F51B69EA6CBC4CFCFBEC5C5B6BBBBB1B4B4AEB1B1B1B3B3B6BABABFC6C62A27
+      A9130FA3130FA3130FA3130FA3C0C7C7B9BDBDB3B5B5B1B2B2B1B3B3B6B9B9BD
+      C2C2C4CBCBCCD5D58A8FC73837AF130FA3130FA3130FA3130FA3130FA31F1DA7
+      5D5FBBBBC3D6CED5D5C8CECEC3C6C6BFC1C1BCBDBDBCBDBDBDBDBDBFC0C0C4C6
+      C6C9CDCDCED4D4D5DDDDAAAFD46163BF201DA8130FA3130FA3130FA3130FA313
+      0FA3130FA32D2BAEB5BEE4DBE6F34646B8130FA3130FA3130FA3130FA3130FA3
+      130FA3130FA3130FA3130FA3130FA3130FA3AAAEDBDBE0ECDCE1E6E0E4E4E4E8
+      E8A5A7D52E2BAD130FA3130FA3130FA3130FA3130FA3201DA84846B5E4E7E7E3
+      E5E5E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E2E2E2E2E2E2E3E3E3E3E3E3E5E5E5
+      E8E9E9EAECECEFF2F22F2CAE130FA3130FA3130FA35A58BEE6EAF4F3F7F7F2F5
+      F5F1F4F4C6C8E44A48B74A47B6ECEDEDEBECECEBECECEDEFEFF1F4F44C4AB913
+      0FA3130FA3130FA38484CE8484CE8484CE8384CE7676C92F2CAE130FA3130FA3
+      130FA3130FA3130FA34B49B8E3E7F0EFF1F1ECEEEEEBEBEBECECECEDEEEEEFF1
+      F1F3F6F6130FA3130FA3130FA34C4AB9F3F6F6F0F2F2EFF1F1F0F1F1F2F4F4BC
+      BDE2130FA3130FA3130FA3211EA8E5E8F1F0F2F2EEEFEFEDEDEDECECECEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEEEEEEEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F79F9F9F9F9F9F9E9E9E9E9E9E9D9D
+      9D9D9D9D9C9C9C9C9C9C9B9B9B9B9B9B9A9A9A9999999D9E9EA5AAAAB2BBBBC3
+      D3D3120EA5120EA5120EA54143B5BDCCCCA9B2B29CA0A091A0CC8EA7EE97B0F0
+      A5BEF3B8D3F791A3DF120EA5120EA5120EA56B77CFB1CBF59EB8F292AAEF8BA3
+      EE8AA2ED8DA4EE90A9EF97B0F09EB8F2A6C1F3ADC8F5B3CEF68DA1E28EA2E28E
+      A2E28DA0E2ADC3EBC6D0D0C1C9C9BBC2C2B5B9B9AFB2B2ABADADAAABABABAEAE
+      AFB3B3B5BCBCBBC3C3BEC8C8C0CBCBBFCBCBBDC9C9BCC8C8BBC8C8B2BFC9949E
+      C3949FC5949FC59CA7C4B6C4C4B1BDBDABB6B6A9B3B3AAB5B5ADB9B9B2C0C08A
+      9FE28CA1E28CA1E395ABE7ADC9F6A5C1F59BB5F392ABF18AA3F0879FEF89A3F0
+      93ADF2A4BFF59AB1E8120EA5120EA5120EA51C1BAAB0CCF4A7C3F695B0F388A2
+      F0829AF07E96EE7D96EF7C95EE7D95EF7D95EF7D95EE7D95EE7D96EE7D95EE7E
+      96EE7F98EE829AEF89A2F095AFF2A7C3F5BCD9F91C1BAA120EA5120EA5120EA5
+      9CB2E9A6C1F59CB5F39CB5F2A6C0F4B9D5F7120EA5120EA5120EA54244B5D2E4
+      E4C8D7D7C4D0D0C3CFCFBAC5CE9CA4C99DA5CB9DA6CC9DA6CCC9D5D5C6D0D0C1
+      C9C9BBC2C2B5B9B9B2B4B4AEB0B0AEAFAFB1B3B3B4B7B7BBC0C0C2CACAC7D0D0
+      C9D3D3C8D1D1C3CBCBBCC2C2B7BABAB2B4B4B0B1B1B0B1B1B3B5B5B8BBBBBCC1
+      C1C2C8C8C8D0D0CCD5D5B8C0D3A2A8CEA3A9CFA3AACFAEB5D1D0D9D9CED5D5CB
+      D1D1C6CBCBC2C5C5BFC1C1BEBEBEBCBCBCBBBBBBBDBDBDBEBEBEC1C2C2C4C6C6
+      C9CCCCCED3D3D4DBDBDBE4E4E3EEEEBCC5E24747B8120EA5120EA5120EA5888D
+      CFDEE8EDD8E1EED6E0F0DAE5F2E0ECF6E6F2F94747BA120EA5120EA54847BAE9
+      F3F9E9F2F8E4EDF5DFE7F1DDE3EDDBDFE6DADCDDDBDDDDDDDFDFDFE2E2E3E6E6
+      E6EAEAC0C3DFB3B6DBB4B7DCB4B7DCC1C3DFE7EBEBE6E9E9E3E5E5E2E3E3E1E2
+      E2E0E1E1E1E1E1E1E1E1E1E1E1E3E3E3E4E4E4E4E4E4E5E5E5E6E6E6E7E8E8EA
+      EBEBEDF0F0ABACDB120EA5120EA5120EA5120EA51F1DAA4A49BA4A49BA2D2BAF
+      120EA5120EA54A47B8EDEFEFECEDEDECEDEDEDEFEFF0F3F34B49BA120EA5120E
+      A5120EA5120EA5120EA5120EA5120EA5120EA5120EA5120EA5120EA5120EA512
+      0EA57575C9F2F5F5F0F2F2EEEFEFECEDEDEBEBEBEBEBEBEDEDEDEFF0F0F2F4F4
+      120EA5120EA5120EA52E2BAFF2F5F5F0F1F1EEF0F0EEF0F0F0F1F1F2F5F59FA0
+      D9120EA5120EA5120EA53C3AB4E4E6EFF0F1F1EDEEEEEDEDEDECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECECECECECECEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEFEFEFEFEFEFEFEFEFEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F79F9F9F9F9F9F9F9F9F9E9E9E9E9E9E9D9D9D
+      9D9D9D9C9C9C9B9B9B9B9B9B9A9A9A9999999D9E9EA5AAAAB2BBBBC2D2D2100D
+      A8100DA8100DA84043B7BDCCCCA9B2B29AAAD18FA8EE8FA7EE97AFF0A5BEF2B6
+      D1F69CB0E5100DA8100DA8100DA83E43BDB2CCF5A1B9F293ABEF8BA3ED89A1ED
+      8BA3EE8DA4EF90A8EF95ADF09AB3F19FB9F2A4BDF3A7C1F4A8C2F4A8C2F4A7C1
+      F3A4BDF3B1BED3B8BCBCB4B7B7AFB1B1ADAEAEAAABABAAAAAAAAACACACAFAFAF
+      B3B3B2B7B7B3BABAB3BABAB3BABAB0B7B7AFB6B6AFB7B7AFB8B8B1BABAB1BBBB
+      AFB9B9ACB5B5A6AFAFA2A9A99FA5A59CA2A29DA4A49FA7A7A3ABABA1BDF4A4BF
+      F5A4BFF5A1BCF49CB6F496B0F390A9F28AA3F1859EF0839DF0869FF08FA9F29E
+      B9F4B1CEF73235B7100DA8100DA8100DA86B79D1B3D0F8A1BCF591ABF287A1F1
+      829BF08098EF7E96EF7D96EF7E96EF7E96EF7E96EF7E96EF7E96EF8098EF849C
+      F088A0F091ABF1A0BBF4B3D0F86B79D1100DA8100DA8100DA82728B2B4D0F7A1
+      BAF399B1F29AB3F2A7C0F4BAD5F8100DA8100DA8100DA84144B8CDDCDCC1CCCC
+      BCC5C5BAC1C1BBC2C2BEC6C6C1C9C9C1C9C9C1C9C9BEC5C5BBC1C1B8BDBDB4B8
+      B8B2B4B4AFB0B0AEAEAEAFAFAFB0B2B2B5B7B7BABEBEBFC5C5C3CBCBC5CDCDC4
+      CCCCC1C7C7BBC0C0B6B9B9B3B4B4B0B1B1B1B1B1B2B2B2B4B5B5B8BABABBBFBF
+      BFC4C4C3C8C8C6CDCDC9D0D0C9D1D1CAD1D1C9CFCFC8CDCDC5CACAC3C6C6C0C2
+      C2BFC1C1BCBDBDBCBCBCBBBBBBBCBCBCBEBEBEBEBFBFBFC0C0C2C3C3C5C6C6C7
+      CACACDD2D2D5DCDCDEE7E7CAD4E7100DA8100DA8100DA87A7FCCE2EBEBDBE1E1
+      D6DADAD4D9DBD8DEE6DEE7EFE6F1F74647BC100DA8100DA84647BCE9F3F8E4EC
+      F3DFE6EBDDE1E4DBDEDEDADCDCD9DADAD9DADADADCDCDDDEDEDFE1E1E2E4E4E3
+      E6E6E4E7E7E5E8E8E6E9E9E6E9E9E5E7E7E4E6E6E2E3E3E2E3E3E2E2E2E1E1E1
+      E2E2E2E2E2E2E2E2E2E4E4E4E4E4E4E5E5E5E6E6E6E6E6E6E7E8E8E9EAEAECEE
+      EEEFF2F29D9ED8100DA8100DA8100DA8100DA8100DA8100DA8100DA8100DA810
+      0DA84847BBEEF0F0ECEEEEECEDEDEDEFEFEFF2F24947BC100DA8100DA8100DA8
+      100DA8100DA8100DA8100DA8100DA8100DA8100DA8100DA85857C0C8CAE7F1F4
+      F4EFF1F1EEEFEFECEDEDEBEBEBEAEBEBECECECEDEEEEEFF0F0F1F4F4100DA810
+      0DA8100DA8100DA8F1F3F3EFF0F0EDEEEEEEEFEFEFF0F0F1F2F2F3F5F55857C0
+      100DA8100DA8100DA84947BBF0F1F1EEEFEFEDEDEDECECECECECECECECECECEC
+      ECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEEEEEEEFEFEFEEEEEEEFEFEFEEEE
+      EEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F0F0F0F1F1F1F1F1F1F0F0F0F0F0F0F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7A0A0A0A0A0A09F9F9F9F9F9F9F9F9F9E9E9E9E9E9E9D
+      9D9D9C9C9C9B9B9B9B9B9B9A9A9A9D9E9EA5AAAAB2BBBBC3D3D30F0CAA0F0CAA
+      0F0CAA3F42B8BCCBCBA8B8CE99B2F191A9EF92A9EF9AB3F1A8C2F4BBD6F78495
+      DD0F0CAA0F0CAA0F0CAA6A77D2B2CCF69FB9F293ACF08CA5EE8AA1EE89A1EE8A
+      A2EE8CA4EF8EA6EF91A8EF94ACF096AFF198B2F19AB3F19AB3F199B1F196AFF1
+      97ADE9B1B3B3AFB0B0ADAEAEABABABAAAAAAAAAAAAAAABABABACACACAEAEACAE
+      AEACAFAFABAEAEA9ADADA7ABABA6A9A9A4A8A8A5A9A9A4A9A9A4A9A9A2A7A7A0
+      A4A49CA0A0989B9B959898949696949696959999959FB193ADF294AEF294AEF2
+      92ABF28FA9F18CA5F188A1F0859EF0839BEF829AEF859DF08CA5F197B2F3A9C4
+      F67B8CDB0F0CAA0F0CAA0F0CAA1A19AF9EB6EBAECAF79EB9F591AAF388A1F184
+      9CF18099F07F98F07E97EF7E97EF7F97EF8098EF8199EF839CF089A2F191ABF2
+      9EB8F4AFCAF7AAC3F01A19AF0F0CAA0F0CAA0F0CAA7D8DDBACC7F69BB3F394AD
+      F299B1F2A7C0F4BAD5F80F0CAA0F0CAA0F0CAA4043BBCAD7D7BEC6C6B6BCBCB3
+      B7B7B2B5B5B5BABAB8BCBCB8BCBCB8BCBCB7BABAB5B8B8B3B5B5B2B3B3B1B2B2
+      B0B0B0AEAFAFB0B0B0B1B2B2B4B6B6BABDBDBFC4C4C4CACAC5CCCCC5CCCCC2C8
+      C8BCC0C0B7BABAB3B5B5B1B1B1B0B0B0B1B2B2B3B4B4B5B6B6B7B8B8B9BBBBBC
+      BFBFBEC1C1C0C4C4C1C5C5C2C5C5C1C4C4C1C4C4BFC2C2BEC0C0BEBEBEBCBDBD
+      BCBCBCBCBCBCBEBEBEBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1C3C3C3C5C7C7CACC
+      CCD1D6D6DAE2E2A1A7D90F0CAA0F0CAA0F0CAAD9E3ECDEE6E6D7DCDCD2D5D5D2
+      D5D5D6D9D9DDE3E3E5EDED4646BC0F0CAA0F0CAA4646BCE7EEEEE1E6E6DCDFDF
+      DADCDCD9DADAD9D9D9D8D8D8D8D9D9D9DADADBDCDCDDDEDEDFE0E0E0E1E1E0E2
+      E2E1E3E3E2E4E4E2E4E4E3E4E4E2E3E3E1E1E1E2E2E2E1E1E1E3E3E3E3E3E3E3
+      E3E3E3E3E3E4E4E4E5E5E5E5E5E5E6E6E6E6E6E6E7E7E7EAEAEAEBECECEDEFEF
+      F0F2F2C7C9E76564C60F0CAA0F0CAA0F0CAA0F0CAA0F0CAA1D1BAF4846BC9B9B
+      D7EDEFEFECEDEDECECECECEDEDEFF0F06463C54847BC4947BD4947BD4948BD49
+      47BD4947BD4947BD4947BD6665C79E9FDAD6D9ECF2F5F5F1F3F3EFF1F1EEEFEF
+      EDEDEDECECECEBECECEBEBEBECECECECEDEDEEEFEFF0F2F24846BC4846BC4846
+      BC4846BCF0F2F2EFF0F0EEEEEEEDEEEEEEEEEEEFF0F0F1F2F2E4E5EF5755C148
+      47BC4847BC4846BC9B9BD7EFF0F0EEEEEEEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEE
+      EEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7A2A2A2A1A1A1A0A0A0A0A0A09F9F9F9F9F9F9E9E9E9D9D9D9D9D
+      9D9C9C9C9B9B9B9A9A9A9D9F9FA5AAAAB2BBBBC3D3D30D0AAC0D0AAC0D0AAC3D
+      40BABED3DEACC5F59EB7F298B1F19AB2F1A4BCF3B1CCF6C3DEF9555ECA0D0AAC
+      0D0AAC0D0AAC7381D7AFC9F69EB8F393ABF18DA4EF8AA2EF8AA2EF8AA2EF8AA2
+      EF8BA2EF8BA4EF8CA5F08EA6F08FA7F090A7F090A7F08EA7F08DA6F08CA4F0A1
+      AAC8AEAEAEADAEAEACACACABABABABABABAAABABAAAAAAAAAAAAA8A9A9A8A9A9
+      A6A7A7A5A6A6A3A4A4A1A2A29FA0A09D9F9F9C9E9E9C9E9E9A9C9C989A9A9697
+      979393939192929090908F90908F91918D95A989A2F189A2F189A2F189A1F188
+      A0F1859FF1849CF0839BF0829AF0829AF0839CF088A2F192ACF3A0BBF5B2CFF8
+      3B40C00D0AAC0D0AAC0D0AAC3033BBB3CEF5ADC9F79FBAF593AEF38CA6F287A1
+      F1859EF1839CF1839CF1849CF1869EF188A1F18DA6F294AFF39FBAF5AEC9F7B3
+      CEF53033BB0D0AAC0D0AAC0D0AAC3033BBB5D0F8A3BCF495ADF291A8F198B0F2
+      A6C0F5BBD6F80D0AAC0D0AAC0D0AAC3E41BECAD6D6BDC4C4B4B8B8AFB1B1AFB0
+      B0B0B2B2B2B3B3B2B4B4B3B4B4B2B3B3B1B2B2B2B2B2B1B1B1B0B1B1B0B0B0B0
+      B0B0B0B0B0B2B2B2B6B8B8BCBFBFC1C6C6C7CFCF9BA1C9A6ACCBC5CDCDBFC4C4
+      BABDBDB5B6B6B2B3B3B2B2B2B2B2B2B3B3B3B3B4B4B5B5B5B7B7B7B8B8B8B9BB
+      BBBABBBBBABBBBBCBDBDBCBDBDBCBDBDBCBDBDBBBCBCBCBCBCBCBCBCBDBDBDBD
+      BDBDBEBEBEBEBEBEC0C0C0C0C0C0C1C1C1C2C2C2C2C2C2C4C5C5C8CACACFD3D3
+      D7DEDE777ACB0D0AAC0D0AAC0D0AACE5EFEFDDE4E4D6DADAD1D4D4D2D4D4D6D9
+      D9DDE2E2E6EEEE4444BE0D0AAC0D0AAC4444BEE4EAEADEE2E2D9DBDBD7D8D8D7
+      D8D8D8D8D8D7D8D8D8D8D8D9DADADBDBDBDCDCDCDDDEDEDEDEDEDFE0E0DFE0E0
+      E0E0E0E1E1E1E1E2E2E1E1E1E1E1E1E1E1E1E3E3E3E3E3E3E4E4E4E4E4E4E5E5
+      E5E5E5E5E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E9E9E9EAEAEAECEDEDEDEFEFF0
+      F1F1F1F3F3F2F5F5C8C9E7BABBE3BABBE3D5D8ECF1F4F4F0F2F2EFF0F0EDEEEE
+      ECEDEDECECECECEDEDEDEEEEEFF0F0F0F2F2F1F3F3F2F5F5F3F5F5F3F5F5F3F5
+      F5F2F5F5F2F5F5F2F4F4F1F3F3F0F2F2EFF1F1EEEFEFEEEFEFEDEEEEEDEDEDEC
+      ECECECECECECECECECECECEDEDEDEEEEEEEFF0F0F0F2F2F1F2F2F1F2F2F0F2F2
+      EFF0F0EEEEEEEDEDEDEDEDEDEEEEEEEFEFEFF0F1F1F1F2F2F1F3F3F2F3F3F1F3
+      F3F1F2F2EFF0F0EEEFEFEEEEEEEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7A2A2A2A2A2A2A2A2A2A1A1A1A0A0A0A0A0A09F9F9F9E9E9E9E9E9E9D9D9D
+      9B9B9B9A9A9A9D9F9FA6ABABB2BBBBC3D3D30C09AE0C09AE0C09AE3D40BDC3DF
+      F9B3CDF6A8C1F4A3BCF3A6BFF4B0CAF6BED9F8A8BEED0C09AE0C09AE0C09AE0C
+      09AE9CB1EAABC4F59CB4F292AAF08CA4EF8BA3EF8BA3EF8BA2EF8BA3F08BA3F0
+      8BA2F08AA2EF8AA2F08BA3F08BA3F08BA2F08BA2F089A1F089A1F08DA2E7ADAD
+      ADADADADADADADADADADACACACABABABAAAAAAA9A9A9A8A8A8A7A7A7A5A5A5A3
+      A3A3A1A1A19F9F9F9C9C9C9A9A9A999999989898969696959595939393919191
+      9090908F8F8F8E8E8E8D8D8D8992B1859DF0859DF0859DF0849DF0839CF0839B
+      F0839BF0839BF0829BF0829BF0839BF0869EF18DA5F299B3F4A8C3F798AFEB18
+      17B30C09AE0C09AE0C09AE2E32BCB3CFF5B0CDF8A5C0F69BB5F594AEF490AAF3
+      8EA7F28DA7F28EA8F290A9F395AFF39CB6F5A5C0F6B1CDF8B4CFF52F33BC0C09
+      AE0C09AE0C09AE1817B39AB0EBAAC4F69BB4F491A8F28FA6F298AFF3A7C0F5BC
+      D6F80C09AE0C09AE0C09AE3D41C1CAD6D6BDC4C4B5B8B8AFB0B0ADADADAEAFAF
+      AFB0B0B0B1B1B1B2B2B1B1B1B2B2B2B2B2B2B2B2B2B2B2B2B3B3B3B3B3B3B3B3
+      B3B5B5B5B9BABABFC2C2C6CCCC3C3CB80C09AE0C09AE5F62BFC4CACABDC1C1B8
+      BABAB4B5B5B3B3B3B3B3B3B4B4B4B4B4B4B5B5B5B5B5B5B6B6B6B7B7B7B7B8B8
+      B8B9B9B8B9B9BABBBBBABABABBBBBBBBBBBBBCBCBCBDBDBDBEBEBEBEBEBEBFBF
+      BFBFBFBFC1C1C1C1C1C1C2C2C2C3C3C3C3C3C3C5C5C5C9CACACFD2D2D6DCDC90
+      95D30C09AE0C09AE0C09AED8E2ECDFE7E7D9DEDED5D8D8D5D8D8D9DDDDE0E6E6
+      E8F0F00C09AE0C09AE0C09AE4443BFE3E8E8DDE0E0D9DADAD7D7D7D7D7D7D8D8
+      D8D8D8D8D9D9D9DADADADBDBDBDCDCDCDDDDDDDDDDDDDEDEDEDEDEDEDFDFDFE0
+      E0E0E1E1E1E1E1E1E2E2E2E2E2E2E3E3E3E4E4E4E4E4E4E4E4E4E5E5E5E6E6E6
+      E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E9E9E9EAEAEAEBECECECEDEDEDEEEEEEEF
+      EFEFF1F1F0F1F1F0F2F2F0F2F2F0F1F1F0F1F1EFF0F0EEEFEFEDEDEDECECECEC
+      ECECECECECEDEDEDEEEEEEEEF0F0EFF0F0EFF1F1F0F1F1F0F1F1F0F1F1EFF1F1
+      EFF1F1EFF0F0EFF0F0EFF0F0EEEFEFEDEEEEEDEDEDECEDEDECECECECECECECEC
+      ECECECECECECECEDEDEDEDEDEDEFEFEFEFF0F0EFF0F0F0F1F1EFF0F0EFEFEFEE
+      EEEEEEEEEEEDEDEDEDEDEDEEEEEEEEEFEFEFF0F0EFF0F0F0F1F1F1F1F1EFF0F0
+      EFEFEFEFEFEFEFEFEFEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F3F3
+      F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7A3A3
+      A3A3A3A3A2A2A2A2A2A2A1A1A1A0A0A0A0A0A09F9F9F9E9E9E9D9D9D9C9C9C9A
+      9A9A9D9F9FA6ABABB2BCBCC3D3D30A08B10A08B10A08B13B40C3CDE9FBBFD9F9
+      B6D0F7B3CCF6B6D1F7C0DBF8A7BDED1616B60A08B10A08B10A08B13A3FC3B6D0
+      F7A6BFF498B1F291A9F18DA5F08CA3F08CA3F08CA4F08CA3F08BA3F08BA3F08B
+      A3F08BA3F08BA2F08BA2F08AA2F08AA2F08AA2F08AA2F08AA1F0A0A9C6AEAEAE
+      AEAEAEAEAEAEADADADACACACABABABAAAAAAAAAAAAA8A8A8A6A6A6A4A4A4A2A2
+      A2A0A0A09E9E9E9B9B9B99999998989897979795959594949493939391919190
+      90908F8F8F8E8E8E8995BF859DF1859DF1849DF1849CF1849CF1849CF1849CF1
+      839CF1839BF1839BF1839BF1859DF189A2F291AAF39DB8F5ACC8F77A8BDE0A08
+      B10A08B10A08B10A08B11616B695AAE8B8D4F9AECAF8A6C2F7A1BCF69EB9F59C
+      B7F59EB9F5A1BCF6A6C2F6AFCAF8B7D4F994AAE82224BA0A08B10A08B10A08B1
+      0A08B17B8CDEAEC9F7A0B8F494ACF28DA4F18EA5F197AFF3A8C1F5BCD7F90A08
+      B10A08B10A08B13A40C4C9D7DBBFC5C5B5B8B8B1B1B1AFAFAFB0B0B0B1B1B1B2
+      B2B2B2B2B2B3B3B3B3B3B3B4B4B4B4B4B4B4B4B4B5B5B5B5B5B5B5B5B5B7B8B8
+      BABDBDC1C5C5A5ABCB0A08B10A08B10A08B10A08B1C7CECEBFC3C3B9BBBBB6B6
+      B6B4B4B4B5B5B5B4B4B4B5B5B5B6B6B6B6B6B6B6B6B6B8B8B8B8B8B8B9B9B9BA
+      BABABABABABBBBBBBCBCBCBDBDBDBDBDBDBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1
+      C2C2C2C3C3C3C3C3C3C3C3C3C4C4C4C6C6C6C9CACACED0D0D6DBDBB7BDDD0A08
+      B10A08B10A08B1868BD5E4ECECDFE5E5DCE1E1DCE1E1E0E5E5E6EDED969BDA0A
+      08B10A08B10A08B16C6DCCE2E7E7DCDFDFD9DADAD8D8D8D8D8D8D9D9D9D9D9D9
+      DADADADADADADBDBDBDDDDDDDDDDDDDDDDDDDEDEDEDFDFDFE0E0E0E1E1E1E2E2
+      E2E2E2E2E3E3E3E3E3E3E4E4E4E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E7E7E7E7
+      E7E7E8E8E8E8E8E8E9E9E9EAEAEAEAEAEAEBECECECECECECEDEDEDEDEDEDEEEE
+      EEEFEFEEEFEFEEEFEFEEEFEFEDEEEEEDEDEDECEDEDECECECECECECEBECECECED
+      EDEDEDEDEDEEEEEEEEEEEEEEEEEEEFEFEEEFEFEEEFEFEEEFEFEEEFEFEEEFEFEE
+      EEEEEDEEEEEDEDEDEDEDEDECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEFEFEEEFEFEEEEEEEEEEEEEDEEEEEDED
+      EDEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFF0F0EFF0F0EFF0F0EFEFEFEFEFEFEF
+      EFEFEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7A5A5A5A4A4A4
+      A3A3A3A2A2A2A2A2A2A1A1A1A0A0A0A0A0A09E9E9E9D9D9D9C9C9C9B9B9B9D9F
+      9FA5AAAAB2BBBBC2D1D10907B30907B30907B33A40C5CEE9FBCBE5FBC4DFF9C2
+      DDF9AEC6F16A78D71415B80907B30907B30907B30907B39CB1ECAEC7F6A0B8F4
+      96AEF290A7F08DA5F18DA5F18DA4F18DA4F18CA4F18CA4F18CA4F18CA4F18CA3
+      F18BA3F18BA3F18BA3F18BA3F18BA2F18BA2F18AA2F18FA3E8AEAEAEAEAEAEAE
+      AEAEAEAEAEAEAEAEADADADACACACABABABA9A9A9A8A8A8A6A6A6A4A4A4A2A2A2
+      9F9F9F9D9D9D9B9B9B9999999898989696969595959393939292929191919090
+      908F8F8F8997C5859DF1859DF1859DF1859DF1859DF2859DF2859DF2849CF184
+      9DF2849CF2849CF2859DF2879FF28BA5F394AEF4A0BAF6AFCAF87A8BDF0907B3
+      0907B30907B30907B30907B3383FC593A9E9BAD7FAB5D1F9B1CEF8B0CDF8B1CD
+      F8B5D1F9B9D6F993A8E8505BCE0907B30907B30907B30907B30907B37B8CDFB1
+      CCF8A3BCF596AFF48FA6F28AA2F28FA6F299B1F4AAC4F6BED9F90907B30907B3
+      0907B33A3FC5C6D6E4BFC6C6B7BABAB3B3B3B0B0B0B2B2B2B3B3B3B4B4B4B4B4
+      B4B5B5B5B5B5B5B5B5B5B6B6B6B6B6B6B6B6B6B6B6B6B6B6B6B8B9B9BCBEBEC2
+      C7C7B2B8CD0907B30907B30907B31514B5C8CFCFC0C4C4BABCBCB7B7B7B5B5B5
+      B6B6B6B6B6B6B6B6B6B6B6B6B7B7B7B7B7B7B8B8B8B9B9B9BABABABABABABBBB
+      BBBDBDBDBDBDBDBEBEBEBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1C2C2C2C2C2C2C3
+      C3C3C4C4C4C4C4C4C5C5C5C7C7C7C9CACACED0D0D4D8D8DCE3E32424BA0907B3
+      0907B31616B7BFC6E6E5EDEDE3EAEAE4EAEAE7EEEEBFC6E71616B70907B30907
+      B30907B3BCC2E2E1E5E5DCDEDED9DADAD7D8D8D9D9D9DADADADADADADBDBDBDC
+      DCDCDCDCDCDEDEDEDEDEDEDEDEDEDFDFDFE0E0E0E1E1E1E1E1E1E2E2E2E2E2E2
+      E3E3E3E4E4E4E5E5E5E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E8E8E8E9E9E9E9E9
+      E9E9E9E9E9E9E9EAEAEAEAEAEAEBEBEBEBEBEBEBECECEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDECEDEDECECECECECECECECECECECECECECEC
+      ECEDEDECEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEDEEEEEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFF0F0EFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7A6A6A6A5A5A5A4A4A4A3
+      A3A3A2A2A2A2A2A2A1A1A1A0A0A09F9F9F9E9E9E9C9C9C9B9B9B9E9F9FA4A9A9
+      B0B8B8BFCECE0706B50706B50706B51313B9393EC7393EC7393EC72022BE0706
+      B50706B50706B50706B50706B50706B57B8BE0B3CDF7A6BEF59AB3F393ACF28F
+      A7F18EA5F18EA5F18EA5F18DA5F18DA5F18DA5F18DA4F18CA4F18CA4F18CA4F1
+      8CA4F18CA3F18CA4F18BA3F18BA3F18BA3F18BA3F2A1AAC8AEAEAEAFAFAFAFAF
+      AFAEAEAEAEAEAEADADADACACACABABABA9A9A9A7A7A7A6A6A6A3A3A3A0A0A09E
+      9E9E9C9C9C9A9A9A999999979797969696949494939393929292919191909090
+      899AD9869EF2869EF2869EF2869EF2869EF2869EF2859EF2859EF2859DF2859D
+      F2859DF2849DF2859FF288A0F38DA6F396AFF5A2BCF6AFCBF88497E41314B907
+      06B50706B50706B50706B50706B51313B9434BCB6573D86573D86573D8434BCB
+      1F21BE0706B50706B50706B50706B50706B51314B98597E4B1CCF8A3BEF698B1
+      F591A8F28CA3F28BA2F191A8F29CB4F4AEC7F7C2DDFA0706B50706B50706B539
+      3FC7C0D6EFC1C7C7B8BBBBB4B4B4B1B1B1B3B3B3B4B4B4B5B5B5B6B6B6B5B5B5
+      B6B6B6B7B7B7B7B7B7B7B7B7B7B7B7B7B7B7B7B7B7B9B9B9BCBEBEC1C5C5C8CD
+      CD6A6EC50706B51413B78386C8C6CCCCC0C3C3BBBDBDB8B9B9B6B6B6B6B6B6B7
+      B7B7B7B7B7B7B7B7B8B8B8B8B8B8B9B9B9BABABABABABABABABABBBBBBBDBDBD
+      BDBDBDBEBEBEBFBFBFC0C0C0C1C1C1C1C1C1C1C1C1C3C3C3C4C4C4C4C4C4C5C5
+      C5C5C5C5C6C6C6C7C7C7C9CACACDCECED2D5D5D9DEDE9CA2D90706B50706B507
+      06B50706B55C5FCCA3A8DFA3A8E05C5FCC0706B50706B50706B50706B54E4FC8
+      E3E8E8DFE1E1DBDDDDD9D9D9D9D9D9DADADADBDBDBDBDBDBDBDBDBDDDDDDDEDE
+      DEDFDFDFDFDFDFDFDFDFE0E0E0E1E1E1E2E2E2E3E3E3E3E3E3E3E3E3E4E4E4E4
+      E4E4E5E5E5E7E7E7E7E7E7E6E6E6E8E8E8E8E8E8E9E9E9EAEAEAEAEAEAEAEAEA
+      EAEAEAEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEDEDED
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F1F1F1F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7A6A6A6A6A6A6A5A5A5A4A4A4A3A3
+      A3A3A3A3A2A2A2A1A1A1A0A0A09F9F9F9D9D9D9C9C9C9FA0A0A4A7A7ADB4B4BA
+      C7C70605B80605B80605B80605B80605B80605B80605B80605B80605B80605B8
+      0605B80605B81F21C091A5E9B4CEF8A8C1F69DB6F496AFF392A9F290A7F28FA6
+      F28EA6F28EA6F28EA6F28EA5F28EA5F28DA5F28DA5F28DA5F28DA5F28DA4F28C
+      A4F28CA4F28CA4F28CA4F28CA4F28CA4F290A5EAB0B0B0AFAFAFB0B0B0AFAFAF
+      AFAFAFAEAEAEADADADABABABABABABA8A8A8A6A6A6A4A4A4A2A2A29F9F9F9D9D
+      9D9B9B9B9A9A9A989898979797969696949494939393929292919191899CD987
+      9FF2879FF2869EF2869EF2879FF3869EF2869EF3859EF2869EF3869EF3859EF3
+      859DF3859DF3879FF38AA2F48EA8F496B0F5A1BBF7ACC7F8A3BBF2414ACC0605
+      B80605B80605B80605B80605B80605B80605B80605B80605B80605B80605B806
+      05B80605B80605B80605B8363CC8A3BBF1AEC9F8A3BCF698B1F492AAF38DA4F3
+      8AA2F28CA2F294AAF39FB7F5B1CAF8C5DFFB0605B80605B80605B8383EC9BBD3
+      F9B3C3E1AAB6D7A4AFD3A2ACD2ABB0C3ACB1C4ADB2C4B1B4BDB7B7B7B7B7B7B7
+      B7B7B7B7B7B8B8B8B8B8B8B8B8B8B8B8B8B9BABABCBDBDBFC1C1C4C8C8C8CDCD
+      CAD0D0CAD0D0C7CCCCC3C6C6BEC0C0BABBBBB8B8B8B7B7B7B8B8B8B8B8B8B8B8
+      B8B8B8B8B8B8B8BABABABABABABABABABBBBBBBCBCBCBDBDBDBDBDBDBFBFBFBF
+      BFBFBFBFBFC1C1C1C1C1C1C2C2C2C3C3C3C4C4C4C4C4C4C5C5C5C6C6C6C6C6C6
+      C7C7C7C8C8C8C9C9C9CCCDCDD0D2D2D5D9D9DDE3E3595CCB0605B80605B80605
+      B80605B80605B80605B80605B80605B80605B80605B83131C2D8DDE8E1E4E4DE
+      E0E0DBDCDCD9D9D9DADADADADADADBDBDBDCDCDCDCDCDCDEDEDEDFDFDFE0E0E0
+      E0E0E0E1E1E1E1E1E1E2E2E2E3E3E3E4E4E4E4E4E4E4E4E4E5E5E5E6E6E6E7E7
+      E7E7E7E7E7E7E7E7E7E7E8E8E8E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEBEBEBEC
+      ECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F2F2F2F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7A8A8A8A7A7A7A6A6A6A5A5A5A4A4A4A4A4A4
+      A3A3A3A2A2A2A1A1A19F9F9F9E9E9E9D9D9D9E9F9FA3A5A5AAAFAFB4BEBE0403
+      BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA353BCA7B
+      8BE2BBD5F9B2CBF7A7C1F69FB7F498B1F394ABF391A8F28FA7F28FA7F28FA7F2
+      8FA6F28FA6F28FA6F28FA6F38EA6F28EA6F28EA6F38DA5F28DA5F28DA5F28DA5
+      F28DA4F28DA4F28DA5F38DA4F38DA4F3A2ABC9B0B0B0B0B0B0B0B0B0AFAFAFAF
+      AFAFAEAEAEADADADABABABAAAAAAA8A8A8A6A6A6A3A3A3A0A0A09E9E9E9C9C9C
+      9B9B9B9A9A9A98989897979796969694949494949491949E889FED88A0F388A0
+      F388A0F3879FF2879FF3879FF3879FF3879FF3869FF3869FF3869EF3869EF386
+      9EF3859EF387A0F38AA2F48EA7F495AEF59EB8F6A7C3F8B2CDF98EA3EA4049CE
+      0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403
+      BA4049CE8EA4EAB3CEF9A9C3F8A0B9F697B0F591A8F48DA4F48BA2F38BA1F28E
+      A5F395ACF4A2BAF5B2CCF8C6E0FB0403BA0403BA0403BA363CCAB8D1F8A8BFF6
+      9BB1F494A9F392A6F293A7F293A7F294A8F295A8F296A9F296A9F197AAF19DAD
+      E6A0AEE3A1AEE3A1AFE3AAB3D4ABB4D5ADB7D7B8BDC8C0C2C2C2C5C5C3C6C6C3
+      C7C7C1C4C4BEC1C1BCBDBDBABABAB8B9B9B9B9B9B8B8B8B9B9B9B9B9B9B9B9B9
+      BABABABABABABBBBBBBBBBBBBCBCBCBDBDBDBEBEBEBEBEBEBFBFBFBFBFBFC0C0
+      C0C2C2C2C3C3C3C3C3C3C3C3C3C4C4C4C5C5C5C7C7C7C7C7C7C8C8C8C8C8C8C9
+      C9C9CACACACCCCCCCFD0D0D3D6D6D9DDDDDEE4E48F93D81212BD0403BA0403BA
+      0403BA0403BA0403BA0403BA0403BA696BD1D7DCE7E2E5E5DEE0E0DCDEDEDBDB
+      DBDADBDBDBDBDBDCDCDCDCDCDCDDDDDDDDDDDDDEDEDEDFDFDFE0E0E0E0E0E0E1
+      E1E1E1E1E1E2E2E2E3E3E3E5E5E5E5E5E5E5E5E5E5E5E5E7E7E7E7E7E7E8E8E8
+      E8E8E8E9E9E9E9E9E9EAEAEAEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECEDED
+      EDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F1F1F1F1F1F1F2F2F2F2F2F2F1F1F1F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7A9A9A9A7A7A7A6A6A6A6A6A6A5A5A5A4A4A4A3A3A3A2
+      A2A2A1A1A1A0A0A09F9F9F9D9D9D9E9F9FA0A2A2A5A9A9ACB3B38890BE8E97C5
+      919ED193A7EA94A7EA93A6EA92A5EA91A5EA9CB1EEBDD7F9B8D2F9B3CCF8ACC5
+      F7A4BDF69EB6F598B0F495ACF491A9F390A8F390A8F390A7F390A7F390A7F38F
+      A7F38FA7F390A7F38FA6F38FA7F38FA7F38EA6F38EA6F38EA6F38EA5F38EA6F3
+      8EA5F38DA5F38DA5F38DA5F392A6EBB0B0B0B0B0B0B0B0B0B0B0B0AFAFAFAFAF
+      AFAEAEAEACACACABABABA9A9A9A6A6A6A4A4A4A2A2A29F9F9F9D9D9D9C9C9C9A
+      9A9A999999989898949AAE8F9CCA8B9FE189A1F489A1F488A0F388A1F488A0F3
+      88A0F4879FF388A0F488A0F487A0F4879FF4879FF4879FF4879FF4869FF4869E
+      F4869EF487A0F48AA2F48DA6F593ACF599B3F6A1BBF7A9C4F8B1CDF9ADC7F677
+      88E35663D8333ACC333ACC343ACC343ACC333ACC5663D87789E3ADC7F6B2CDF9
+      ABC6F8A4BDF79CB4F695ADF591A8F48CA4F48AA1F38AA1F38BA2F38EA6F497AE
+      F5A4BBF6191BC40302BC0302BC0302BC0302BC3439CCB3CCF8A5BCF59BB0F495
+      A9F393A7F394A7F294A8F295A9F295A9F296AAF297AAF297AAF298ABF299ABF2
+      9AACF29BADF29BADF29DAEF19EB0F1A8B5E4BCBDBDBDBFBFBEC0C0BEC0C0BDBE
+      BEBBBCBCBBBBBBBABABAB8B8B8B9B9B9B9B9B9B9B9B9BABABABABABABBBBBBBB
+      BBBBBCBCBCBDBDBDBDBDBDBEBEBEBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1C2C2C2
+      C3C3C3C3C3C3C4C4C4C5C5C5C7C7C7C7C7C7C7C7C7C9C9C9C9C9C9CACACACBCB
+      CBCDCDCDCECFCFD1D2D2D5D7D7D9DCDCDEE2E2D3D9E49094DA676AD23C3DC93D
+      3EC95A5CD08386D8C9CEE5E3E8E8E1E4E4DEE0E0DDDEDEDBDCDCDBDBDBDADADA
+      DCDCDCDDDDDDDEDEDEDEDEDEDEDEDEDFDFDFE0E0E0E1E1E1E2E2E2E2E2E2E3E3
+      E3E3E3E3E4E4E4E5E5E5E5E5E5E5E5E5E6E6E6E7E7E7E8E8E8E8E8E8E9E9E9E9
+      E9E9E9E9E9EBEBEBECECECECECECECECECECECECEDEDEDEDEDEDEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7AAAAAAA9A9A9A8A8A8A7A7A7A6A6A6A5A5A5A4A4A4A3A3A3A2A2
+      A2A1A1A19F9F9F9E9E9E9E9F9F9FA0A0A0A3A3A5A9A9AAB0B0ADB6B6B0BABAB2
+      C4DAB5CDF8B3CDF8B3CDF8B2CBF8B0C9F7ADC6F7AAC2F6A4BDF6A0B8F59CB4F5
+      98B0F595ADF493AAF492A9F491A9F491A9F491A9F491A8F490A8F391A8F490A7
+      F390A8F490A8F490A7F490A7F48FA7F48FA7F48FA7F48FA7F48FA6F48EA6F48E
+      A6F48EA6F48EA6F48EA5F4A3ACC9B0B0B0B0B0B0B0B0B0AFAFAFAFAFAFAEAEAE
+      ACACACABABABA9A9A9A7A7A7A5A5A5A3A3A3A0A0A09B9EA8979EB8939FC78EA0
+      DD8AA2F48AA2F48AA2F48AA2F48AA2F489A2F489A1F489A1F489A1F489A1F489
+      A1F488A0F488A0F488A0F488A0F488A0F487A0F487A0F4879FF4879FF4879FF4
+      869FF487A1F489A1F48CA4F590A8F594AEF69AB4F7A0BAF7A5C0F8AAC5F9AEC9
+      F9B1CCF9B2CEF9B3CFFAB3CFF9B1CDF9AFCAF9ACC7F9A8C1F8A1BBF79CB5F797
+      B0F691AAF58FA6F58CA3F48AA1F48AA1F48BA1F48CA3F48FA6F598AEF5A2B9F6
+      8496E90101BE0101BE0101BE0101BE3036CDAFC6F7A3B9F699AFF494A8F393A7
+      F394A8F294A8F295A9F396AAF397AAF398ABF398ABF399ACF39BADF29AADF29C
+      AEF29DAEF29DAFF29EB0F2A0B1F2B4B8C9BABBBBBABBBBBBBCBCBABBBBBABABA
+      B9BABAB9B9B9B9B9B9B9B9B9BABABABABABABBBBBBBBBBBBBCBCBCBCBCBCBDBD
+      BDBDBDBDBEBEBEBFBFBFBFBFBFC0C0C0C0C0C0C2C2C2C2C2C2C3C3C3C4C4C4C4
+      C4C4C6C6C6C6C6C6C7C7C7C7C7C7C8C8C8C9C9C9CACACACCCCCCCBCBCBCDCDCD
+      CFCFCFCFD0D0D3D4D4D6D8D8D8DBDBDCE0E0DFE3E3E1E5E5E2E7E7E3E8E8E3E7
+      E7E2E6E6E0E4E4DFE2E2DDDFDFDCDDDDDBDBDBDBDBDBDBDBDBDBDBDBDCDCDCDD
+      DDDDDEDEDEDEDEDEDEDEDEE1E1E1E1E1E1E2E2E2E3E3E3E3E3E3E4E4E4E5E5E5
+      E5E5E5E6E6E6E6E6E6E7E7E7E7E7E7E8E8E8E9E9E9E9E9E9E9E9E9EAEAEAEAEA
+      EAEBEBEBEBEBEBECECECECECECECECECEDEDEDEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F1F1F1F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7ABABABAAAAAAA9A9A9A8A8A8A7A7A7A6A6A6A5A5A5A4A4A4A3A3A3A2A2A2
+      A1A1A19F9F9F9E9E9E9E9F9F9E9F9F9FA1A1A1A5A5A2A7A7A3A8A8A3AAAAA6BB
+      E8A6BEF6A5BDF6A4BCF6A3BBF6A0B9F69EB6F59BB4F599B1F596AFF495ACF494
+      ABF493AAF492AAF492AAF492AAF492A9F492A9F491A9F491A9F491A9F491A8F4
+      91A8F491A8F490A8F490A8F490A8F490A7F48FA7F48FA7F48FA7F48FA7F48FA6
+      F48FA6F48EA6F493A7ECB0B0B0B0B0B0B0B0B0AFAFAFAFAFAFAEAEAEADADADAC
+      ACACA2A8BC9DA6C499A5CD92A4E08DA4EF8CA4F58BA3F48BA3F48BA3F48BA3F4
+      8BA3F58BA3F58BA3F58AA2F58AA2F58AA2F58AA2F58AA2F589A2F589A1F589A1
+      F589A1F589A1F589A1F588A1F588A0F588A0F588A0F588A0F587A0F5879FF587
+      9FF588A0F588A1F58AA3F58CA5F68FA8F693ACF697B0F79AB4F79DB7F89FB9F7
+      A1BBF8A2BCF8A2BCF8A0BAF89FB9F89BB5F798B2F796AEF691AAF68FA7F58CA5
+      F48CA3F48BA2F48BA1F48BA1F48BA2F48DA3F490A7F495ACF59DB5F6A8C0F764
+      72E05D69DD5E6ADD5C69DC6F7EE3A7BEF69FB5F699AEF496AAF394A8F395A9F3
+      95A9F397ABF397ABF398ABF398ABF399ACF39BADF39BAEF39CAEF39DAFF39DAF
+      F39EB0F39FB0F3A0B1F3A5B3E8BABABABABABABABABABABABAB9B9B9B9B9B9BA
+      BABABABABABBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBCBCBCBDBDBDBDBDBDBEBEBE
+      BFBFBFC0C0C0C0C0C0C1C1C1C2C2C2C3C3C3C3C3C3C4C4C4C5C5C5C6C6C6C7C7
+      C7C7C7C7C8C8C8C9C9C9C9C9C9CACACACACACACCCCCCCCCCCCCDCDCDCECECECF
+      CFCFD1D1D1D3D4D4D6D7D7D8DADAD9DCDCDBDEDEDDE0E0DEE1E1DEE0E0DEE0E0
+      DCDEDEDCDDDDDBDCDCDADBDBDBDBDBDBDBDBDCDCDCDDDDDDDDDDDDDEDEDEDFDF
+      DFE0E0E0E0E0E0E1E1E1E1E1E1E2E2E2E3E3E3E3E3E3E4E4E4E6E6E6E7E7E7E7
+      E7E7E7E7E7E8E8E8E8E8E8E9E9E9EAEAEAEAEAEAEAEAEAEBEBEBEBEBEBECECEC
+      ECECECEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F0F0F0F0F0F0F0F0
+      F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7ADAD
+      ADABABABAAAAAAA9A9A9A8A8A8A7A7A7A6A6A6A5A5A5A4A4A4A2A2A2A1A1A1A0
+      A0A09E9E9E9E9E9E9C9D9D9C9D9D9C9D9D9B9D9D9A9C9C9A9C9C999EA69CB2EF
+      9CB3F59AB3F599B2F598B1F597AFF496AEF595ACF495ACF594ABF594ABF593AB
+      F593ABF593AAF593AAF592AAF592AAF592AAF592A9F592A9F592A9F591A9F591
+      A9F591A9F591A8F591A8F590A8F590A8F590A8F590A8F590A7F58FA7F58FA7F5
+      8FA7F58FA7F5A0ABD2A3ACCA9FABD29FABD296A8E396A7E38EA5F58DA5F58DA5
+      F58DA5F58DA5F58CA4F58CA4F58CA4F58CA4F58CA4F58CA4F58BA3F58CA4F58C
+      A4F58BA3F58BA3F58BA3F58BA3F58AA3F58AA2F58AA2F58AA2F58AA2F58AA2F5
+      89A1F589A1F589A1F589A1F589A1F588A1F588A1F588A0F588A0F588A0F587A0
+      F587A0F588A0F588A1F58AA2F58CA4F68CA6F68EA7F690A9F692ABF693ACF694
+      ADF694ADF693ABF692ABF690A9F68FA7F68DA6F68CA4F58BA2F58CA3F58AA2F5
+      8BA2F58CA2F58BA2F58CA3F58CA3F58FA6F594AAF599B1F59FB7F6A7BFF7ACC4
+      F8AEC5F8ACC3F8A7BEF7A1B6F69BB1F598ACF595AAF494A9F496AAF496AAF497
+      ABF399ACF499ACF399ACF39BADF49BAEF49CAEF49DAFF49EB0F39EB0F39FB1F3
+      A0B1F3A0B2F3A2B3F3B0B6CFB9B9B9BABABABABABABABABABABABABABABABABA
+      BABBBBBBBBBBBBBBBBBBBCBCBCBDBDBDBDBDBDBDBDBDBEBEBEBEBEBEC0C0C0C0
+      C0C0C1C1C1C1C1C1C2C2C2C3C3C3C4C4C4C5C5C5C5C5C5C7C7C7C7C7C7C8C8C8
+      C9C9C9CACACACBCBCBCBCBCBCCCCCCCDCDCDCDCDCDCECECECFCFCFCFCFCFD1D2
+      D2D2D2D2D3D4D4D5D6D6D6D7D7D8D9D9D9DADAD9DADAD9DBDBDADBDBD9DADAD9
+      DADADBDBDBDADBDBDBDBDBDCDCDCDDDDDDDEDEDEDEDEDEDFDFDFE0E0E0E1E1E1
+      E1E1E1E2E2E2E2E2E2E4E4E4E4E4E4E4E4E4E5E5E5E6E6E6E7E7E7E7E7E7E7E7
+      E7E8E8E8E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEBEBEBEDEDEDEDEDEDEEEEEEEE
+      EEEEEEEEEEEEEEEEEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F2F2
+      F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F4F4F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7AEAEAEACACAC
+      ABABABAAAAAAA9A9A9A8A8A8A7A7A7A6A6A6A5A5A5A3A3A3A2A2A2A1A1A19F9F
+      9F9E9E9E9C9C9C9B9B9B999999989898969696969797949595959EB897AEF597
+      AEF596AEF595ADF595ADF595ACF595ACF595ACF594ACF594ACF594ABF594ABF5
+      94ABF593ABF593ABF593ABF593AAF593AAF592AAF592AAF592AAF592A9F592A9
+      F592A9F591A9F591A9F591A9F591A8F590A8F590A8F590A8F590A8F590A7F590
+      A7F58FA7F58FA7F58FA7F58FA7F58FA7F68EA6F58EA6F58EA6F58EA6F68EA6F6
+      8EA6F68DA5F58DA5F58DA5F58DA5F58DA5F68CA4F58CA4F58CA4F68CA4F68CA4
+      F68CA4F68CA4F68BA3F68BA3F68BA3F68BA3F68BA3F68AA3F68AA2F68AA2F68A
+      A2F68AA2F68AA2F689A2F689A1F689A1F689A1F689A1F688A1F688A0F688A0F6
+      88A0F688A0F687A0F688A1F688A1F689A1F689A2F68AA2F58BA4F58BA3F58BA4
+      F58BA3F58AA3F58BA3F58BA2F68BA2F68AA1F68BA2F68BA2F58BA2F58BA3F58C
+      A3F58DA4F58DA3F58DA4F58FA5F592A9F595ACF69AB1F69EB4F7A2B8F7A2B8F7
+      A1B7F79EB5F69BB1F698ADF596ABF496AAF496AAF497ABF497ABF498ACF499AC
+      F49AACF49AADF49BAEF49BAEF49CAFF49EB0F49EB0F39FB1F49FB1F3A1B2F3A1
+      B2F3A3B4F4A5B5F0B8B9BDB9B9B9B9B9B9BABABABABABABABABABBBBBBBBBBBB
+      BBBBBBBCBCBCBCBCBCBDBDBDBEBEBEBEBEBEBFBFBFBFBFBFC1C1C1C1C1C1C2C2
+      C2C2C2C2C3C3C3C3C3C3C4C4C4C6C6C6C6C6C6C7C7C7C8C8C8C8C8C8CACACACB
+      CBCBCCCCCCCCCCCCCDCDCDCECECECECECECFCFCFCFCFCFD1D1D1D2D2D2D2D2D2
+      D3D3D3D5D5D5D5D5D5D6D6D6D7D7D7D7D7D7D8D8D8D9D9D9D9DADAD9D9D9DADA
+      DADBDBDBDBDBDBDCDCDCDDDDDDDEDEDEDFDFDFDFDFDFE0E0E0E1E1E1E2E2E2E3
+      E3E3E4E4E4E5E5E5E5E5E5E5E5E5E6E6E6E7E7E7E8E8E8E8E8E8E8E8E8E9E9E9
+      EAEAEAEAEAEAEBEBEBEBEBEBECECECECECECEDEDEDEDEDEDEEEEEEEEEEEEEEEE
+      EEEEEEEEEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F2F2F2F1F1F1F1F1F1F2F2F2F1F1F1F2F2F2F1F1F1F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F4
+      F4F4F4F4F4F5F5F5F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7B0B0B0AEAEAEADADADAB
+      ABABAAAAAAA9A9A9A7A7A7A7A7A7A6A6A6A4A4A4A3A3A3A2A2A2A0A0A09F9F9F
+      9D9D9D9B9B9B9A9A9A98989896969696969694949493939395A3D096AEF696AE
+      F696ADF696ADF696ADF695ADF695ADF695ADF695ACF695ACF695ACF694ACF694
+      ACF694ABF694ABF693ABF693ABF693ABF693AAF693AAF693AAF692AAF692AAF6
+      92AAF692A9F692A9F691A9F691A9F691A9F691A9F691A8F690A8F690A8F690A8
+      F690A8F690A7F690A7F68FA7F68FA7F68FA7F68FA6F68FA6F68FA7F58EA6F68E
+      A6F68EA6F68EA6F68DA5F68DA5F68DA5F58DA5F68DA5F68DA5F68DA5F68DA5F6
+      8CA4F68CA4F68CA4F68CA4F68BA4F68BA3F68BA3F68BA3F68BA3F68BA3F68AA2
+      F68AA2F68AA2F68AA2F68AA2F689A2F689A2F689A1F689A1F689A1F688A1F688
+      A1F688A0F688A0F688A0F688A0F688A0F688A0F688A0F688A0F689A1F689A1F6
+      89A1F68AA1F68AA1F68AA2F68AA2F68BA2F68CA3F58CA3F58CA3F58DA4F68EA4
+      F68EA5F68FA5F68FA5F690A7F692A8F695ABF696ACF698AFF699AFF69AAEF698
+      ADF697ADF597ABF596ABF596AAF597ABF597ABF598ACF599ACF599ADF59AADF5
+      9BAEF49CAEF49CAFF49DAFF49EB0F49FB0F49FB1F4A1B2F4A1B2F4A2B3F4A3B4
+      F4A4B4F4ADB6D9B8B8B8B9B9B9B9B9B9BBBBBBBBBBBBBBBBBBBBBBBBBCBCBCBD
+      BDBDBDBDBDBEBEBEBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1C2C2C2C3C3C3C3C3C3
+      C4C4C4C4C4C4C5C5C5C6C6C6C7C7C7C8C8C8C8C8C8C9C9C9CACACACBCBCBCCCC
+      CCCCCCCCCDCDCDCECECECFCFCFD0D0D0D0D0D0D1D1D1D2D2D2D3D3D3D4D4D4D5
+      D5D5D5D5D5D7D7D7D7D7D7D8D8D8D8D8D8DADADADADADADADADADCDCDCDCDCDC
+      DDDDDDDEDEDEDEDEDEDFDFDFDFDFDFE0E0E0E1E1E1E2E2E2E2E2E2E3E3E3E4E4
+      E4E5E5E5E5E5E5E6E6E6E6E6E6E7E7E7E8E8E8E8E8E8E8E8E8EAEAEAEBEBEBEB
+      EBEBECECECECECECEDEDEDEDEDEDEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEF
+      F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F1
+      F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7B0B0B0AFAFAFAEAEAEACACACABAB
+      ABAAAAAAA9A9A9A8A8A8A7A7A7A6A6A6A5A5A5A3A3A3A2A2A2A0A0A09F9F9F9D
+      9D9D9C9C9C9A9A9A98989897979796969694949493949996A9E397AEF697AEF6
+      96AEF696AEF696AEF696ADF696ADF696ADF695ADF695ADF695ACF695ACF695AC
+      F694ACF694ACF694ACF694ABF694ABF693ABF693ABF693ABF693AAF693AAF693
+      AAF692AAF692AAF692AAF692A9F691A9F691A9F691A9F691A9F691A8F691A8F6
+      90A8F690A8F690A8F690A8F690A7F68FA7F68FA7F68FA7F68FA7F68FA6F68EA6
+      F68FA7F68EA6F68EA6F68EA6F68DA5F68EA6F78EA6F78DA5F78DA5F78DA5F78D
+      A5F78DA5F78CA4F78CA4F78CA4F78CA4F78CA4F78BA4F78BA3F78BA3F78BA3F7
+      8BA3F78BA3F78AA3F78AA2F78AA2F78AA2F78AA2F789A2F789A1F789A1F789A1
+      F789A1F788A1F788A1F789A1F688A1F689A1F689A1F68AA2F68AA1F68AA2F68B
+      A2F68AA2F68BA2F68CA3F68BA3F68CA3F68DA4F68CA3F68DA4F68EA5F68FA5F6
+      90A6F68FA5F690A6F691A7F692A8F693A9F695AAF696AAF696ABF695AAF696AA
+      F695AAF696AAF697ABF697ACF598ACF599ACF59AADF59AADF59BAEF59CAFF59D
+      AFF59EB0F59EB0F59EB1F59FB1F5A1B2F5A2B3F5A2B4F5A3B4F4A4B5F4A5B5F4
+      A5B6F4B3B7C7B8B8B8B9B9B9B9B9B9BABABABBBBBBBBBBBBBCBCBCBDBDBDBEBE
+      BEBFBFBFBFBFBFC0C0C0C0C0C0C1C1C1C2C2C2C3C3C3C3C3C3C5C5C5C5C5C5C6
+      C6C6C7C7C7C7C7C7C8C8C8C9C9C9C9C9C9CACACACBCBCBCCCCCCCDCDCDCDCDCD
+      CECECECFCFCFCFCFCFD1D1D1D1D1D1D2D2D2D3D3D3D3D3D3D4D4D4D5D5D5D6D6
+      D6D7D7D7D8D8D8D7D7D7D9D9D9DADADADADADADBDBDBDDDDDDDDDDDDDEDEDEDE
+      DEDEE0E0E0E0E0E0E1E1E1E1E1E1E2E2E2E3E3E3E3E3E3E4E4E4E5E5E5E6E6E6
+      E6E6E6E7E7E7E7E7E7E8E8E8E9E9E9E9E9E9EAEAEAEAEAEAEBEBEBECECECECEC
+      ECECECECEDEDEDEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7B2B2B2B1B1B1B0B0B0AFAFAFACACACABABAB
+      AAAAAAA9A9A9A8A8A8A7A7A7A5A5A5A5A5A5A3A3A3A2A2A2A0A0A09F9F9F9C9C
+      9C9B9B9B9999999898989797979696969595959599A697ADF197AFF797AFF797
+      AEF797AEF797AEF796AEF796AEF796AEF796ADF796ADF796ADF795ADF795ADF7
+      95ACF795ACF794ACF794ACF794ACF794ABF794ABF794ABF793ABF793ABF793AB
+      F793AAF793AAF792AAF792AAF792AAF792AAF792A9F791A9F791A9F791A9F791
+      A9F791A8F791A8F790A8F790A8F790A8F790A7F790A7F78FA7F78FA7F78FA7F7
+      8FA7F78EA6F78EA6F78EA6F78EA6F78EA6F78EA6F78EA6F78EA6F78EA6F78DA5
+      F78DA5F78DA5F78CA4F78CA4F78CA4F78CA4F78CA4F78BA3F78CA4F78BA3F78B
+      A3F78BA3F78BA3F78BA3F78AA3F78AA3F78AA2F78AA2F78AA2F789A2F789A2F7
+      89A1F789A1F789A2F789A1F78AA2F78AA1F78AA2F78BA3F78BA2F78BA3F78BA3
+      F78BA3F78CA4F78CA4F78DA4F78DA4F68DA4F68EA4F68FA5F68FA6F690A6F691
+      A7F691A7F691A7F691A7F693A8F794A9F694A9F694A9F696AAF695AAF696ABF6
+      97ABF697ABF698ACF698ACF59AADF69AADF59BAEF69DAFF69DB0F69DB0F69FB1
+      F69FB1F6A0B2F5A1B3F5A2B3F5A3B4F5A3B4F5A4B5F5A4B5F5A5B6F5A7B7F5AA
+      B8EDB7B8BCB9B9B9B9B9B9BABABABBBBBBBCBCBCBCBCBCBDBDBDBEBEBEBEBEBE
+      BFBFBFC0C0C0C0C0C0C2C2C2C2C2C2C3C3C3C3C3C3C4C4C4C5C5C5C7C7C7C7C7
+      C7C8C8C8C9C9C9C9C9C9CBCBCBCBCBCBCCCCCCCDCDCDCDCDCDCFCFCFCFCFCFD0
+      D0D0D1D1D1D1D1D1D2D2D2D3D3D3D4D4D4D4D4D4D6D6D6D6D6D6D7D7D7D8D8D8
+      D8D8D8D9D9D9DADADADBDBDBDBDBDBDCDCDCDDDDDDDDDDDDDEDEDEDFDFDFE0E0
+      E0E0E0E0E1E1E1E2E2E2E3E3E3E3E3E3E3E3E3E4E4E4E6E6E6E7E7E7E7E7E7E8
+      E8E8E7E7E7E9E9E9EAEAEAEAEAEAEBEBEBECECECECECECEDEDEDEDEDEDEDEDED
+      EEEEEEEEEEEEEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F6F6F6F5F5F5F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7B3B3B3B2B2B2B0B0B0AFAFAFAFAFAFACACACABABABAA
+      AAAAA9A9A9A8A8A8A6A6A6A5A5A5A4A4A4A2A2A2A1A1A1A0A0A09E9E9E9D9D9D
+      9A9A9A999999989898979797969696959595969FB998AFF798AFF798AFF797AF
+      F797AFF797AFF797AEF797AEF797AEF796AEF796AEF796ADF796ADF796ADF795
+      ADF795ADF795ADF795ACF795ACF794ACF794ACF794ACF794ABF794ABF794ABF7
+      93ABF793ABF793ABF793AAF792AAF792AAF792AAF792AAF792A9F792A9F791A9
+      F791A9F791A9F791A9F791A8F790A8F790A8F790A8F790A8F790A7F78FA7F78F
+      A7F78FA7F78FA7F78FA7F78FA7F88EA6F78EA6F78EA6F78EA6F78EA6F78DA5F7
+      8DA5F78DA5F88DA5F78DA5F88CA4F78DA5F88CA4F78CA4F78CA4F78BA3F78CA4
+      F88CA4F88BA4F88BA3F88BA3F88BA3F88BA3F88AA3F88AA2F88AA2F88AA2F88A
+      A2F88AA2F78AA2F78BA2F78AA2F78BA3F78BA3F78BA3F78CA3F78CA3F78CA4F7
+      8DA4F78EA5F78EA5F78EA5F78FA5F78FA5F78FA6F790A6F790A7F791A7F791A7
+      F792A7F792A8F793A9F794A9F695A9F695AAF696AAF697ABF698ACF797ABF697
+      ACF699ADF79AADF69BAEF69BAEF69CAFF69CB0F69EB0F69DB0F6A0B2F6A0B2F6
+      A1B3F6A2B4F6A2B4F6A3B5F6A4B5F6A5B6F6A5B6F6A7B7F6A8B8F6A9B8F6B2B8
+      CFB9B9B9BABABABBBBBBBBBBBBBCBCBCBDBDBDBDBDBDBEBEBEBFBFBFC0C0C0C1
+      C1C1C1C1C1C2C2C2C3C3C3C4C4C4C4C4C4C5C5C5C6C6C6C7C7C7C7C7C7C8C8C8
+      CACACACACACACBCBCBCBCBCBCCCCCCCDCDCDCECECECFCFCFD0D0D0D0D0D0D1D1
+      D1D2D2D2D2D2D2D3D3D3D5D5D5D6D6D6D7D7D7D7D7D7D8D8D8D9D9D9D9D9D9DA
+      DADADBDBDBDCDCDCDCDCDCDDDDDDDEDEDEDEDEDEDFDFDFE0E0E0E1E1E1E1E1E1
+      E2E2E2E3E3E3E4E4E4E4E4E4E5E5E5E5E5E5E6E6E6E7E7E7E7E7E7E8E8E8E8E8
+      E8EAEAEAEAEAEAEAEAEAEBEBEBECECECECECECEDEDEDEDEDEDEDEDEDEEEEEEEF
+      EFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4
+      F4F4F4F4F4F4F4F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F4F4F4F5F5F5F4F4F4F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7B5B5B5B3B3B3B2B2B2B1B1B1AFAFAFAEAEAEACACACABABABAAAA
+      AAA9A9A9A8A8A8A7A7A7A6A6A6A4A4A4A3A3A3A1A1A19F9F9F9E9E9E9C9C9C9B
+      9B9B9A9A9A98989897979796969695959596A4CB99B0F898AFF798B0F898AFF8
+      98AFF898AFF897AFF897AFF897AFF897AEF897AEF897AEF896AEF896AEF896AD
+      F896ADF895ADF895ADF895ADF895ACF895ADF795ACF894ACF894ACF894ACF894
+      ABF894ABF893ABF893ABF893ABF893ABF893AAF892AAF892AAF892AAF892AAF8
+      92A9F892A9F891A9F891A9F891A9F891A8F891A8F890A8F890A8F890A8F890A8
+      F88FA7F88FA7F88FA7F88FA7F88FA7F88FA7F88EA6F88EA6F88EA6F88EA6F88E
+      A6F88DA5F88DA5F88DA5F88DA5F88DA5F88CA5F88CA4F88CA4F88CA4F88CA4F8
+      8CA4F88BA4F88CA4F88BA4F88BA4F88BA3F88BA3F88BA3F88AA3F88AA3F88BA3
+      F88BA3F88BA3F88CA4F88CA4F88CA4F88CA4F88DA4F88DA4F88DA4F88EA5F88E
+      A5F88EA5F88FA6F88FA6F78FA6F790A7F791A7F791A7F792A8F793A8F793A8F7
+      93A9F794A9F794AAF795AAF796ABF796ABF797ACF798ACF798ACF799ADF79AAE
+      F79AADF79CAFF69BAFF69CAFF69DB0F69EB1F69FB1F6A0B2F6A0B3F6A1B3F6A2
+      B4F6A3B4F6A3B5F6A4B5F6A5B6F6A6B7F6A7B8F6A8B8F6AAB9F2B7B8BCB9B9B9
+      BABABABCBCBCBCBCBCBCBCBCBDBDBDBEBEBEC0C0C0C0C0C0C1C1C1C2C2C2C2C2
+      C2C3C3C3C4C4C4C5C5C5C6C6C6C6C6C6C7C7C7C8C8C8C9C9C9CACACACACACACB
+      CBCBCCCCCCCCCCCCCECECECECECECFCFCFD0D0D0D0D0D0D1D1D1D2D2D2D2D2D2
+      D3D3D3D4D4D4D5D5D5D6D6D6D7D7D7D7D7D7D8D8D8D9D9D9DADADADADADADBDB
+      DBDCDCDCDCDCDCDDDDDDDEDEDEDFDFDFDFDFDFE0E0E0E1E1E1E1E1E1E3E3E3E3
+      E3E3E5E5E5E4E4E4E6E6E6E6E6E6E8E8E8E7E7E7E8E8E8E8E8E8E9E9E9EBEBEB
+      EBEBEBEBEBEBECECECEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFF0F0F0F0F0
+      F0F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F3F3F3F4F4
+      F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7B6B6B6B5B5B5B4B4B4B2B2B2B0B0B0AFAFAFAEAEAEADADADABABABAAAAAA
+      A9A9A9A8A8A8A7A7A7A5A5A5A4A4A4A2A2A2A1A1A19F9F9F9E9E9E9C9C9C9B9B
+      9B9A9A9A98989898989897979796969698A8D999B0F899B0F899B0F898B0F898
+      B0F898B0F898AFF898AFF898AFF897AFF897AFF897AEF897AEF897AEF896AEF8
+      96AEF896AEF896ADF896ADF895ADF895ADF895ADF895ACF895ACF895ACF894AC
+      F894ACF894ACF894ABF893ABF893ABF893ABF893ABF893AAF893AAF892AAF892
+      AAF892AAF892AAF892A9F891A9F891A9F891A9F891A9F891A8F890A8F890A8F8
+      90A8F890A8F890A8F88FA7F88FA7F88FA7F88FA7F88FA7F88FA7F88EA6F88EA6
+      F88EA6F88EA6F88DA6F88DA5F88DA5F88DA5F88DA5F88DA5F88CA4F88CA4F88C
+      A4F88CA4F88CA4F88BA4F88BA4F88BA3F88BA3F88BA3F88BA3F88BA3F88BA3F8
+      8BA3F88BA3F88DA4F88CA4F88CA4F88DA5F88DA5F88EA5F88EA6F88FA6F890A6
+      F890A6F890A7F891A7F891A7F892A8F892A8F893A9F893A9F893A9F895AAF894
+      AAF895AAF896ABF897ABF897ACF798ADF799ADF799ADF79AAEF79BAEF79BAFF7
+      9CAFF79DB0F79DB1F79EB1F79FB2F7A0B2F7A1B3F7A1B3F7A2B4F7A3B4F7A4B6
+      F7A4B6F7A5B6F6A6B7F6A7B8F6A8B8F6A9B9F6B0B8D7B8B8B8B9B9B9BABABABB
+      BBBBBCBCBCBDBDBDBDBDBDBFBFBFC0C0C0C0C0C0C1C1C1C2C2C2C2C2C2C3C3C3
+      C5C5C5C5C5C5C6C6C6C6C6C6C7C7C7C9C9C9C9C9C9CACACACBCBCBCBCBCBCCCC
+      CCCCCCCCCFCFCFCFCFCFD0D0D0D1D1D1D1D1D1D2D2D2D3D3D3D3D3D3D5D5D5D6
+      D6D6D6D6D6D7D7D7D8D8D8D8D8D8D9D9D9DADADADADADADBDBDBDCDCDCDDDDDD
+      DDDDDDDEDEDEDFDFDFE0E0E0E0E0E0E2E2E2E2E2E2E3E3E3E3E3E3E4E4E4E5E5
+      E5E5E5E5E6E6E6E7E7E7E8E8E8E8E8E8E9E9E9E9E9E9EAEAEAEBEBEBEBEBEBEB
+      EBEBECECECEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEFEFEFF0F0F0F0F0F0F1F1F1
+      F1F1F1F1F1F1F3F3F3F2F2F2F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F6F6F6F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7B8B8
+      B8B6B6B6B5B5B5B4B4B4B2B2B2B0B0B0AFAFAFAFAFAFACACACABABABAAAAAAA9
+      A9A9A7A7A7A7A7A7A6A6A6A4A4A4A3A3A3A1A1A1A0A0A09E9E9E9C9C9C9B9B9B
+      9A9A9A98989897979797979796979C99ACE69AB1F999B0F899B1F999B0F998B0
+      F898B0F898AFF898B0F998AFF898AFF998AFF997AEF897AEF897AEF897AEF996
+      AEF896AEF996AEF996ADF896ADF996ADF995ADF895ACF895ADF995ADF995ACF9
+      95ACF994ACF994ACF994ACF994ACF994ABF993ABF993ABF993ABF993ABF993AA
+      F993AAF992AAF992AAF992AAF992A9F992A9F991A9F991A9F991A9F991A9F990
+      A8F990A8F990A8F990A8F990A8F990A8F98FA7F98FA7F98FA7F98FA7F98FA7F9
+      8EA6F98EA6F98EA6F98EA6F98EA6F98DA6F98DA5F98DA5F98DA5F98DA5F98DA5
+      F98CA5F98CA4F98CA4F98CA4F98CA4F98BA4F98CA4F88BA4F88CA4F88CA4F88D
+      A5F88DA5F88DA5F88EA5F88EA5F88EA5F88FA6F88FA6F88FA6F890A7F890A6F8
+      90A7F892A8F992A8F892A8F892A8F893A9F894A9F894AAF895AAF895AAF895AA
+      F896ABF897ACF898ADF899ADF899ADF799ADF79AAEF79BAEF79CB0F89CB0F79E
+      B1F89EB1F89FB2F8A0B2F8A0B3F7A1B4F7A2B4F7A3B5F7A3B5F7A4B6F7A6B7F7
+      A7B8F7A7B8F7A8B9F7A9B9F7A9BAF7B6B8C0B9B9B9BABABABBBBBBBCBCBCBDBD
+      BDBDBDBDBFBFBFC0C0C0C0C0C0C1C1C1C2C2C2C2C2C2C3C3C3C5C5C5C6C6C6C6
+      C6C6C7C7C7C7C7C7C8C8C8C9C9C9CACACACBCBCBCCCCCCCCCCCCCDCDCDCECECE
+      CFCFCFCFCFCFD0D0D0D1D1D1D1D1D1D3D3D3D4D4D4D4D4D4D5D5D5D6D6D6D6D6
+      D6D7D7D7D8D8D8D8D8D8D9D9D9DADADADBDBDBDBDBDBDEDEDEDDDDDDDEDEDEDE
+      DEDEE0E0E0E0E0E0E0E0E0E2E2E2E2E2E2E2E2E2E3E3E3E5E5E5E5E5E5E6E6E6
+      E7E7E7E8E8E8E8E8E8E9E9E9EAEAEAEAEAEAEBEBEBECECECECECECECECECEDED
+      EDEEEEEEEEEEEEEFEFEFEFEFEFF0F0F0F0F0F0F1F1F1F1F1F1F2F2F2F2F2F2F2
+      F2F2F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F6F6F6F6F6F6F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7B9B9B9B8B8B8
+      B6B6B6B5B5B5B4B4B4B2B2B2B1B1B1AFAFAFAEAEAEACACACABABABAAAAAAA9A9
+      A9A8A8A8A7A7A7A5A5A5A4A4A4A2A2A2A1A1A1A0A0A09E9E9E9C9C9C9B9B9B9A
+      9A9A999999989898979797979AA39AB0F39AB1F999B1F999B1F999B0F999B0F9
+      99B0F998B0F998B0F998B0F998AFF998AFF998AFF998AFF997AFF997AEF997AF
+      F997AFF997AEF996AEF996ADF996ADF996ADF996ADF995ADF996ADF995ADF895
+      ADF995ADF995ACF994ACF994ACF994ABF994ACF993ABF994ABF993ABF993AAF9
+      93ABF993ABF993AAF992AAF992AAF992AAF992AAF992A9F991A9F991A9F991A9
+      F991A9F991A9F990A8F990A8F990A8F990A8F990A8F990A8F98FA7F98FA7F98F
+      A7F98FA7F98EA7F98EA6F98EA6F98EA6F98EA6F98EA6F98DA5F98DA5F98DA5F9
+      8DA5F98DA5F98CA5F98CA5F98CA4F98CA5F98CA4F98DA5F98DA5F98EA5F98DA5
+      F98EA6F98FA6F98EA6F98FA6F98FA7F990A7F990A7F991A7F991A8F991A8F992
+      A8F993A9F893A9F893A9F894AAF894AAF895ABF895ABF895ABF897ACF897ACF8
+      98ACF898ADF899ADF89AAEF89AAEF89BAFF89CAFF89CB0F89DB0F89EB1F89EB1
+      F89FB2F8A1B3F7A1B3F7A1B4F7A2B4F7A4B5F7A4B6F7A5B7F7A6B7F7A7B8F7A8
+      B9F8A8B9F7AABBF8B0BADFB8B8B8B9B9B9BABABABBBBBBBCBCBCBDBDBDBEBEBE
+      C0C0C0C0C0C0C0C0C0C1C1C1C2C2C2C3C3C3C5C5C5C5C5C5C6C6C6C7C7C7C8C8
+      C8C8C8C8CACACACACACACBCBCBCCCCCCCDCDCDCECECECECECECFCFCFD0D0D0D0
+      D0D0D1D1D1D2D2D2D3D3D3D4D4D4D4D4D4D5D5D5D6D6D6D7D7D7D7D7D7D8D8D8
+      D9D9D9D9D9D9DBDBDBDBDBDBDCDCDCDDDDDDDEDEDEDEDEDEDFDFDFE0E0E0E0E0
+      E0E1E1E1E2E2E2E3E3E3E3E3E3E4E4E4E5E5E5E5E5E5E6E6E6E6E6E6E7E7E7E8
+      E8E8E8E8E8E9E9E9E9E9E9EAEAEAEBEBEBECECECECECECEDEDEDEDEDEDEEEEEE
+      EFEFEFEFEFEFEFEFEFF0F0F0F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F3F3
+      F3F3F3F3F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F4F4F4F4F4F4F5F5F5F5F5F5F4
+      F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F6F6F6F5F5F5F5F5F5F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7BBBBBBB9B9B9B8B8B8B6
+      B6B6B5B5B5B4B4B4B2B2B2B1B1B1AFAFAFAEAEAEACACACABABABAAAAAAA9A9A9
+      A8A8A8A7A7A7A5A5A5A4A4A4A2A2A2A1A1A1A0A0A09E9E9E9D9D9D9C9C9C9A9A
+      9A999999989898989898989CAA9AB0F39AB1F99AB1F99AB1F999B1F999B1F999
+      B1F999B0F999B0F999B0F998B0F998B0F998AFF998AFF998AFF997AFF997AFF9
+      97AFF997AEF997AEF996AEF996AEF996AEF996ADF996ADF996ADF995ADF995AD
+      F995ADF995ACF994ACF994ACF994ACF994ACF994ACF994ABF993ABF993ABF993
+      ABF993ABF993ABF992AAF992AAF992AAF992AAF992A9F991A9F991A9F991A9FA
+      91A9F991A9F990A8F990A8F991A9FA90A8FA90A8FA90A8FA8FA7F98FA7F98FA7
+      F98FA7F98FA7FA8EA6F98EA6F98EA6F98EA6F98EA6FA8DA5F98DA5F98DA5F98D
+      A5F98DA5F98CA5F98DA5F98DA5F98DA5F98DA5F98DA5F98EA6F98EA6F98EA6F9
+      8FA7F98FA6F990A7F990A7F991A8F991A8F992A8F992A9F992A9F992A9F993A9
+      F994AAF994AAF995ABF995ABF996ABF996ACF997ACF998ADF999ADF998ADF99A
+      AEF999AEF99BAFF89BAFF89CB0F89CB0F89DB1F89EB1F89FB2F89FB2F8A1B3F8
+      A1B3F8A1B4F8A3B5F8A4B6F8A4B6F8A5B7F8A6B7F8A7B8F8A8B8F8A8B9F8A9BA
+      F8AABBF8B5B7BFB9B9B9BABABABABABABBBBBBBDBDBDBEBEBEBEBEBEC0C0C0C0
+      C0C0C1C1C1C2C2C2C3C3C3C4C4C4C5C5C5C6C6C6C7C7C7C7C7C7C9C9C9C9C9C9
+      CACACACBCBCBCBCBCBCCCCCCCDCDCDCECECECFCFCFCFCFCFD0D0D0D1D1D1D2D2
+      D2D3D3D3D3D3D3D4D4D4D5D5D5D5D5D5D6D6D6D7D7D7D8D8D8DADADADADADADB
+      DBDBDBDBDBDCDCDCDDDDDDDDDDDDDEDEDEDFDFDFDFDFDFE0E0E0E1E1E1E1E1E1
+      E2E2E2E3E3E3E4E4E4E5E5E5E6E6E6E6E6E6E7E7E7E8E8E8E9E9E9E9E9E9E9E9
+      E9EAEAEAEBEBEBECECECECECECECECECEDEDEDEEEEEEEFEFEFEFEFEFF0F0F0F0
+      F0F0F0F0F0F1F1F1F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F6F6F6F6F6F6F6F6F6F5F5F5
+      F6F6F6F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F6F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7BCBCBCBBBBBBBABABAB8B8B8B6B6
+      B6B5B5B5B4B4B4B2B2B2B1B1B1B0B0B0AEAEAEADADADACACACABABABAAAAAAA8
+      A8A8A7A7A7A6A6A6A4A4A4A3A3A3A1A1A1A0A0A09F9F9F9D9D9D9C9C9C9B9B9B
+      9A9A9A99999998989899A0B69BB2FA9BB2FA9AB2FA9AB2FA9AB1FA9AB1FA9AB1
+      FA99B1FA99B1FA99B1FA99B0FA99B0FA99B0FA98B0FA98B0FA98AFFA98AFFA97
+      AFFA97AFFA97AFFA97AEFA97AEFA97AEFA96AEFA96AEFA96AEFA96ADFA96ADFA
+      95ADFA95ADFA95ADFA95ADFA95ACFA94ACFA94ACFA94ACFA94ACFA94ABFA94AB
+      FA93ABFA93ABFA93ABFA93AAFA93AAFA92AAFA92AAFA92AAFA92AAFA91A9FA91
+      A9FA91A9FA91A9FA91A9FA91A9FA90A8FA90A8FA90A8FA90A8FA90A8FA8FA7FA
+      8FA7FA8FA7FA8FA7FA8FA7FA8EA7FA8EA6FA8EA6FA8EA6FA8EA6FA8EA6FA8DA6
+      FA8DA5FA8DA6F98DA6F98DA5F98EA6F98EA5F98EA6F98FA7F98FA6F98FA7F98F
+      A7F990A7F990A8F991A8F991A8F992A8F992A9F992A9F993A9F993A9F994ABFA
+      95ABF994AAF997ACF996ACF996ACF998ADF998ADF999ADF999AEF99AAEF99AAE
+      F99AAFF99CB0F89DB1F99EB2F99EB1F89FB2F8A0B3F9A0B3F8A1B4F8A2B4F8A3
+      B5F9A4B6F9A5B6F9A5B7F9A6B8F9A7B8F8A7B9F8A9BAF8AABAF8ABBBF8B0BAE0
+      B8B8B8B9B9B9BABABABBBBBBBCBCBCBEBEBEBFBFBFC0C0C0C0C0C0C1C1C1C2C2
+      C2C3C3C3C4C4C4C5C5C5C6C6C6C6C6C6C7C7C7C9C9C9CACACACACACACBCBCBCC
+      CCCCCDCDCDCECECECFCFCFCFCFCFD0D0D0D1D1D1D1D1D1D2D2D2D3D3D3D4D4D4
+      D4D4D4D5D5D5D6D6D6D6D6D6D7D7D7D8D8D8D9D9D9DADADADADADADBDBDBDCDC
+      DCDCDCDCDDDDDDDEDEDEDEDEDEDFDFDFE0E0E0E1E1E1E1E1E1E2E2E2E3E3E3E4
+      E4E4E4E4E4E5E5E5E6E6E6E6E6E6E7E7E7E8E8E8E8E8E8E9E9E9E9E9E9EAEAEA
+      EBEBEBECECECEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEFEFEFF0F0F0F0F0F0F0F0
+      F0F1F1F1F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F5
+      F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7BDBDBDBCBCBCBABABAB9B9B9B8B8B8B6B6B6
+      B5B5B5B4B4B4B2B2B2B1B1B1AFAFAFAEAEAEADADADACACACABABABAAAAAAA8A8
+      A8A7A7A7A6A6A6A5A5A5A3A3A3A1A1A1A0A0A09F9F9F9D9D9D9C9C9C9B9B9B9A
+      9A9A9999999999999AA2BD9BB2FA9BB2FA9BB2FA9BB2FA9AB2FA9AB2FA9AB2FA
+      9AB1FA9AB1FA9AB1FA99B1FA99B1FA99B0FA99B0FA99B0FA98B0FA98B0FA98B0
+      FA98AFFA98AFFA97AEFA97AFFA97AFFA97AEFA97AEFA97AEFA96AEFA96AEFA96
+      AEFA96ADFA95ADFA95ADFA95ADFA95ADFA95ACFA95ACFA94ACFA94ACFA94ACFA
+      94ACFA94ABFA93ABFA93ABFA93ABFA93ABFA93AAFA92AAFA92AAFA92AAFA92AA
+      FA92AAFA91A9FA91A9FA91A9FA91A9FA91A9FA91A9FA90A8FA90A8FA90A8FA90
+      A8FA8FA8FA8FA7FA8FA7FA8FA7FA8FA7FA8FA7FA8EA6FA8EA6FA8EA6FA8EA6FA
+      8EA6FA8EA6FA8EA6FA8FA6FA8EA6FA8FA7FA8FA7FA8FA7FA90A7FA91A8FA91A8
+      FA91A8FA92A9FA92A8FA92A9FA93AAFA94AAFA93AAFA94AAFA94ABFA95ABF996
+      ACF997ACF997ACF997ADF998ADF999AEF999AEF99AAFF99BAFF99BAFF99CB0F9
+      9DB1F99DB1F99EB2F99FB2F9A0B3F9A0B3F9A1B4F9A2B4F9A2B5F9A3B5F9A4B6
+      F9A5B7F9A5B7F9A6B8F9A7B8F8A9B9F8A9BAF8AABBF8ABBBF8B4B8C7B8B8B8B9
+      B9B9BBBBBBBCBCBCBDBDBDBEBEBEBFBFBFC0C0C0C1C1C1C2C2C2C3C3C3C3C3C3
+      C4C4C4C5C5C5C6C6C6C8C8C8C8C8C8C9C9C9CACACACBCBCBCCCCCCCCCCCCCDCD
+      CDCECECECFCFCFD0D0D0D0D0D0D2D2D2D2D2D2D3D3D3D3D3D3D4D4D4D5D5D5D5
+      D5D5D7D7D7D7D7D7D8D8D8D8D8D8D9D9D9DADADADADADADBDBDBDCDCDCDCDCDC
+      DDDDDDDEDEDEDFDFDFDFDFDFE1E1E1E1E1E1E1E1E1E2E2E2E3E3E3E4E4E4E4E4
+      E4E5E5E5E6E6E6E7E7E7E8E8E8E9E9E9EAEAEAEAEAEAEAEAEAEBEBEBECECECED
+      EDEDEDEDEDEEEEEEEEEEEEEFEFEFF0F0F0F0F0F0F1F1F1F1F1F1F2F2F2F2F2F2
+      F3F3F3F2F2F2F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7BEBEBEBDBDBDBCBCBCBBBBBBB9B9B9B8B8B8B6B6B6B5
+      B5B5B4B4B4B2B2B2B1B1B1AFAFAFAEAEAEADADADACACACABABABAAAAAAA8A8A8
+      A7A7A7A6A6A6A4A4A4A3A3A3A1A1A1A0A0A09F9F9F9D9D9D9C9C9C9B9B9B9A9A
+      9A9999999898989AA2BD9BB3FA9BB2FA9BB2FA9BB2FA9AB2FA9AB2FA9AB2FA9A
+      B1FA9AB1FA9AB1FA99B1FA99B1FA99B0FA99B0FA99B0FA98B0FA98B0FA98B0FA
+      98AFFA98AFFA97AFFA97AFFA97AFFA97AEFA97AEFA97AEFA96AEFA96AEFA96AE
+      FA96ADFA95ADFA95ADFA95ADFA95ADFA95ACFA95ACFA94ACFA94ACFA94ACFA94
+      ACFA94ABFA93ABFA93ABFA94ABFB93ABFB93AAFA93ABFB92AAFA92AAFA92AAFB
+      92AAFA92AAFB92AAFB92AAFB91A9FB91A9FA91A9FB91A9FB90A8FA90A8FA90A8
+      FB90A8FB90A8FB8FA7FA8FA8FB8FA7FA8FA7FA8FA7FB8FA7FB8EA6FA8FA7FA8E
+      A6FA8FA7FA8FA7FA90A8FA8FA7FA90A7FA8FA7FA91A8FA91A8FA92A9FA91A9FA
+      92A9FA93A9FA93A9FA93AAFA94AAFA95AAFA95ABFA95ACFA95ABF996ACF998AD
+      FA97ACF998ADFA98ADF999AEFA9AAEF99AAFF99BAFF99CB0F99CB0F99EB1FA9D
+      B1F99FB2FAA0B3FAA0B3F9A1B4F9A2B5F9A2B5F9A3B6F9A4B6F9A5B7F9A6B7F9
+      A6B8F9A8B9F9A8BAF9A9BAF9AABBF9ABBBF9AFBBE8B8B8B8B9B9B9BBBBBBBCBC
+      BCBCBCBCBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1C3C3C3C4C4C4C4C4C4C5C5C5C7
+      C7C7C8C8C8C8C8C8C9C9C9CACACACBCBCBCCCCCCCDCDCDCDCDCDCFCFCFD0D0D0
+      D0D0D0D1D1D1D2D2D2D3D3D3D4D4D4D4D4D4D5D5D5D5D5D5D6D6D6D7D7D7D8D8
+      D8D8D8D8D9D9D9D9D9D9DADADADBDBDBDBDBDBDCDCDCDDDDDDDDDDDDDEDEDEDF
+      DFDFDFDFDFE0E0E0E2E2E2E2E2E2E2E2E2E4E4E4E5E5E5E5E5E5E5E5E5E6E6E6
+      E7E7E7E7E7E7E8E8E8E9E9E9EAEAEAEAEAEAEAEAEAECECECECECECEDEDEDEDED
+      EDEEEEEEEFEFEFEFEFEFF0F0F0F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F3F3F3F3
+      F3F3F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F7F7F7
+      F6F6F6F7F7F7F7F7F7F6F6F6F7F7F7F7F7F7F6F6F6F7F7F7F6F6F6F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7BFBFBFBEBEBEBEBEBEBCBCBCBBBBBBBABABAB9B9B9B7B7B7B5B5
+      B5B4B4B4B2B2B2B1B1B1B0B0B0AEAEAEADADADACACACABABABAAAAAAA8A8A8A7
+      A7A7A6A6A6A5A5A5A3A3A3A2A2A2A0A0A09F9F9F9E9E9E9C9C9C9C9C9C9A9A9A
+      9999999999999AA2BD9CB3FB9CB3FB9BB3FB9BB3FB9BB2FB9BB2FB9BB2FB9AB2
+      FB9AB2FB9AB2FB9AB1FB9AB1FB9AB1FB99B1FB99B1FB99B0FB99B0FB98B0FB98
+      B0FB98B0FB98AFFB98AFFB98AFFB97AFFB97AFFB97AFFB97AEFB97AEFB96AEFB
+      96AEFB96AEFB96AEFB96ADFB95ADFB95ADFB95ADFB95ADFB95ACFB95ACFB94AC
+      FB94ACFB94ACFB94ABFB94ABFB93ABFB93ABFB93ABFB93ABFB92AAFB92AAFB92
+      AAFB92AAFB92AAFB92AAFB91A9FB91A9FB91A9FB91A9FB91A9FB90A8FB90A8FB
+      90A8FB90A8FB90A8FB8FA8FB8FA7FB8FA7FB8FA7FB8FA7FB8FA7FA8FA7FA8FA7
+      FA8FA7FA90A8FA91A8FA90A8FA90A8FA91A8FA92A9FA92A9FA92A9FA93AAFA94
+      AAFA93AAFA94AAFA94ABFA95ABFA95ABFA95ACFA96ACFA97ACFA98ADFA98ADFA
+      98ADFA99AEFA9AAFFA9AAFFA9BB0FA9BB0FA9CB0FA9DB1FA9EB1FA9EB2FA9FB3
+      FAA0B3FAA1B4F9A1B4F9A2B5F9A3B5F9A3B6F9A4B6F9A5B7F9A6B8F9A7B9F9A8
+      B9F9A8B9F9A9BAF9AABBF9ABBBF9B4B8C8B8B8B8BABABABBBBBBBCBCBCBDBDBD
+      BEBEBEBFBFBFC0C0C0C1C1C1C2C2C2C3C3C3C4C4C4C4C4C4C5C5C5C6C6C6C8C8
+      C8C9C9C9CACACACACACACCCCCCCDCDCDCECECECECECECFCFCFD0D0D0D1D1D1D1
+      D1D1D3D3D3D3D3D3D4D4D4D4D4D4D5D5D5D6D6D6D6D6D6D7D7D7D8D8D8D8D8D8
+      D9D9D9DADADADADADADBDBDBDCDCDCDCDCDCDDDDDDDEDEDEDEDEDEE0E0E0E0E0
+      E0E1E1E1E2E2E2E2E2E2E3E3E3E4E4E4E5E5E5E5E5E5E6E6E6E7E7E7E7E7E7E7
+      E7E7E8E8E8E9E9E9EAEAEAEAEAEAEBEBEBEBEBEBEDEDEDEDEDEDEEEEEEEEEEEE
+      EFEFEFEFEFEFF0F0F0F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F3F3F3F4F4F4F4F4
+      F4F4F4F4F4F4F4F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7
+      F7F7F6F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F6F6F6F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7}
+  end
+  object Bevel2: TBevel
+    Left = 0
+    Top = 64
+    Width = 500
+    Height = 2
+    Align = alTop
+    Shape = bsTopLine
+  end
+  object Bevel3: TBevel
+    Left = 0
+    Top = 274
+    Width = 500
+    Height = 2
+    Align = alBottom
+    Shape = bsTopLine
+  end
+  object eSvcLibName: TEdit
+    Left = 119
+    Top = 125
+    Width = 377
+    Height = 21
+    Anchors = [akLeft, akTop, akRight]
+    TabOrder = 2
+  end
+  object eSvcName: TEdit
+    Left = 119
+    Top = 151
+    Width = 377
+    Height = 21
+    Anchors = [akLeft, akTop, akRight]
+    TabOrder = 3
+  end
+  object ePrjName: TEdit
+    Left = 119
+    Top = 99
+    Width = 377
+    Height = 21
+    Anchors = [akLeft, akTop, akRight]
+    TabOrder = 1
+  end
+  object ePrjDir: TEdit
+    Left = 119
+    Top = 241
+    Width = 289
+    Height = 21
+    Anchors = [akLeft, akTop, akRight]
+    TabOrder = 6
+  end
+  object eTemplateName: TEdit
+    Left = 119
+    Top = 73
+    Width = 377
+    Height = 21
+    TabStop = False
+    Anchors = [akLeft, akTop, akRight]
+    Color = clBtnFace
+    ReadOnly = True
+    TabOrder = 0
+  end
+  object BitBtn1: TBitBtn
+    Left = 420
+    Top = 239
+    Width = 75
+    Height = 25
+    Anchors = [akTop, akRight]
+    Caption = '&Browse'
+    TabOrder = 7
+    TabStop = False
+    OnClick = sbBrowseForDirClick
+    Glyph.Data = {
+      36030000424D3603000000000000360000002800000010000000100000000100
+      18000000000000030000120B0000120B00000000000000000000FF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FF1C99CE2BA5D51C9DD10A8AC6FF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFBFA5A34D5A72FF00FFFF00FF249CCFA6EEF7
+      6CEBF85DD9F04AC7E739B8E020A0D40F91CA0F91C9FF00FFFF00FFBFA5A35766
+      831276E23C91DCFF00FF0C8CC799DDEF8BFFFF80FCFF82FBFF7FFAFF79F3FF65
+      E1F74ECEED3CBAE07591A05B66811170D833A1FF2A9AFEFF00FF1296CC59BADE
+      9FFEFF75F7FF78F6FF77F2FC89D9E087D7DE7BE2EA91BCC05168891370D531A0
+      FF319EFBFF00FFFF00FF26A5D448C1E69FEFF879F6FB87D8DCBACABCDABCA5D0
+      B59EAF9A8C817A734179AF32A3FF3DACFE1B9CD4FF00FFFF00FF27AFDE8B97A1
+      88CFE28BD1D3CBB4ADF7F0DDFFFFD8FFFFD9FAF8C5CFB08CC4A9A34DC1FC55D0
+      FB41C1E3FF00FFFF00FF25AFE1AD706B5DBCDDB5A69EF7F4EEFFFFFFFFFFE3FF
+      FFD4FFF7C1FFE6A5D8A0826FD4EB59D7FB68E2F80E90C9FF00FF26AFE1B5776D
+      A4CFD9CEB69EFFFFEAFFFFF3FFFFEAFFFFD7F7DCA9F6C986E1B89191C0C753D3
+      FB7EF3FF28AAD8FF00FF28B0E0BC7F6EFFF4EBD5BCA1FFFFDDFFFFDDFFFFE0FF
+      FACAEFBD81F4BD77E7C49A93C0C44FD3FB7DF4FF56D5EFFF00FF28AFE1C58870
+      FFFCF8CAAA99FEFFCEFFFFC9F8E1ADF0C78CF3CA96FFEBB5D5AF959AC9D37AE0
+      FE9DFBFF96F8FF23A1D328B0E1CE9173FFFAF7D8C4BDDCC59EFCE5A7FAC782FB
+      D08BFFF7E0E7DCCE8CA5AA6BC9E65FBCE060BBDE6CC4E329A1D12DB2E2D59975
+      FFF8F3FCFBFAE5D1C9E9CAA6E7C599E1C298CCB59FB18B8875E7F86DEDFE179D
+      D1FF00FFFF00FFFF00FF1FA1D9DDA077FFFBF6FFFFFFFFFFFFFFFFFEFBF4EBB4
+      8379BF7849B16F5350C0E550C4E71C9DD0FF00FFFF00FFFF00FFFF00FFE2A678
+      FFFFFFFFFFFFFFFFFFFFFFFFF8FAFCB6877AE29955FF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFE7AB79D1926DD1926DD1926DD1926DD1926DB4
+      7E6FFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
+  end
+  object cbMessageClass: TComboBox
+    Left = 119
+    Top = 209
+    Width = 377
+    Height = 21
+    Style = csDropDownList
+    Anchors = [akLeft, akTop, akRight]
+    ItemHeight = 0
+    TabOrder = 5
+  end
+  object cbServerClass: TComboBox
+    Left = 119
+    Top = 184
+    Width = 377
+    Height = 21
+    Style = csDropDownList
+    Anchors = [akLeft, akTop, akRight]
+    ItemHeight = 0
+    TabOrder = 4
+  end
+  object Panel1: TPanel
+    Left = 0
+    Top = 276
+    Width = 500
+    Height = 41
+    Align = alBottom
+    BevelOuter = bvNone
+    TabOrder = 8
+    DesignSize = (
+      500
+      41)
+    object Image1: TImage
+      Left = 5
+      Top = 4
+      Width = 32
+      Height = 32
+      Anchors = [akLeft, akBottom]
+      AutoSize = True
+      Picture.Data = {
+        07544269746D617072080000424D720800000000000036040000280000002000
+        00002000000001000800010000003C040000130B0000130B0000000000000000
+        00000C0C0C0012131300171818001C1C1C0017182200242424002B2B2B00312E
+        2E0031302F002D2E3000383635003B3B3B0045363600453C3B00171B45001417
+        4D000B0C5B001319520010155D00151B5C001D214100232B4A003D3C41003A3D
+        49002B3359003339520009117A00192D760029356800333C62003C4257003E44
+        5B003A4675003D497700434243004C45440045444B00494748004B4B4B00524B
+        4A005A4F4E005B524F0042455100494B55004E5059005353530052555F005A5A
+        5A00684F4D00685755006A5E5D007A6A5A00434C6D005C5E6500636363006966
+        66006A6A6A007E646200756C6B007D6D6A007E726B0061677800737372007B76
+        77007D7B7B00A77F4200816F600085756F008A7774008B7C7600817F7E00897B
+        7A00907D7800BA823500B5833C00DC800F00DC811100DC881800FE8F0900FF95
+        0500F7921300FE9A1300FE9E1B00FEA11C00DC902300DD972D00DE9E3700E793
+        2A00FEA32200FFAB2B00F8A53300FFAD3200FFAF3800FFB33300FEB43A00FFBC
+        3A00AC824200B1834100A1885500B89A570091837C0096907F009D957B00AF9D
+        6D00B89F6200A4997600DEA44100DEAB4C00C9A45800DEB25000E1AF4F00FFB7
+        4100FFBA4300FEB64F00E7A95100C9AC6400C4A37A00D3AA7600F4BB6800FFC2
+        4200FFC04E00FFC45300FFC65800FFCA5C00DEC67800FFCD6400FFD06200FFD8
+        6600FFD26A00FFD57300FFD97600FFD97800FFE17A0004088C00183089000005
+        A5000009AB00000CB100000FB8001B39AA001131BB00374A8D002C429500344A
+        99002D46A3003851A7003C54A8002F4DBC00485A950055669C0060688200566A
+        A700183BC300153ACA00062FDE00123EE7000332F0000D3CF2000134FD00073A
+        FF000C3EFF00224ADD00385FDF001442F3001847F3001244FF001C4DFF002853
+        E9002758FF003C65EA003C68F4003363FF003C6BFF004A67C200496EE1004C72
+        E1004572FA00837E8100FF00FF00818080008C8685008C8B8B00928A8400968D
+        8D009B8C8B009C938B00919092009B9293009F959A009E989A00A0969500A098
+        9200A49C9A00AC9C9800A9A29E00A7A7A700ABA6A300ADA6AA00B3A6A600B1AF
+        AB00BBAFAC00BAB6BB00BCBCBC00E2BB8800C9B4A400CEBAA500C2B7B400C4BC
+        BC00CABDBA00DAC09A00EDDA8C00FFDE8100FFE18500FEE48A00FFEB8B00FEE6
+        9100F0E59D00FEEC9900FFF09900F8EEA300FFF6AA00C5C4C500CAC4C400C4C5
+        C900D5C9C600D5D0CF00DED3C900CFCFD000D1D0D000DCD7D700E0DDDD00F6E2
+        C900E3E3E600EBE6E500EEECEC00F4F3F500FCF7F600FEFEFE00000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        00000CB200042D0501000200000B05080B262D2723222640B20003B2000009B2
+        012F03030501000C08B5CFDED0C6B8443B290AB202B2000007B2013803050403
+        0201000F16E0EAE9E1C0B6474445483B0BB2B21C000006B2010B020903050014
+        031288871046ECEBE63E3F403E2932446423B2B2000005B20208020904050013
+        0E89888522E6EDDD40E0C1C8C227433B07B2B200000004B2010B030802090106
+        02050011138A1A0F042246382231303944272707B22202B2000003B20125020B
+        0308010902060012051411223AB13F32292827230D0C050001B202B2000002B2
+        013F040B010A02080109020600130522C73CD1E7E2D0C6BCBCBBB43A160222B2
+        B212000002B201220216020B020A020802090013052DDD3B4C51585C7176CBCD
+        CECFC9BC2D22B2DD00000013B23F222522160B0B0A0A080809062DE3434B4E06
+        044E000951525A7275CCDEBA0B3100000018B226252522221D989C8C18080809
+        2DE6454C515152585852025200064E5150577435000001B20226022500122A9D
+        9F9F9E9A0A08082FE8644D525859595B025B0007595853514F492E3A00000020
+        402D26262520A5A09F9E9E1C0A082FEAB654595B5E6F70706F5E5E5958514A2C
+        00000136022D0226001B21A5A0A09F9E190A0A35EBB9555B7078797A7A797870
+        5E59534A2B08000000202D2F2D2D2626A1A6A0A098160B0A2FEDBF5677797B7D
+        7D807D7B79705E5961250000022F032D001B262C8F908E2216160B2FEDC06A79
+        7B8081828181807D79705D6124200000032F00042D2F2D260226022503160012
+        2FEDC26B7B8081D3D4D5D382807B795F601600000136032F032D022602250222
+        00130B2FEDC46B7E81D3D5D9D9D7D4817E79774116790000000338362F08022F
+        032D0326032200122FEDC66D7F82D5D9DCDCD9D583807A776016000001B50236
+        042F022D032600142A1F2FEDC76263737CD2D8DBDAD684807B776016000001B2
+        0336042F022D00162634A7A536EDE6DFC9C3BFB665666967686C6E6F60220000
+        0003B238367B0236000E35AAAB942D2D91A6A61EC3CAE4E602E6000BE5E4CFC5
+        BDB7643C334226D700000020B2B5373636AEACACA92F2692A8A68B861B15090B
+        25293840B4B7BEC0BEB83A08000002B2001E383736AFB0ACACA2A2ABA8A8A6A6
+        A5A5A0990B0808090505090508082DB2000002B201BA0237013D02B003AC01AB
+        03A802A602A5019B0216000A0B080B080907092FB2B2000003B2013F02370196
+        02B002AC02AB02A803A6000CA58E2217170B0A0A08080BB202B2000004B20019
+        3738373DAFB0ACACABABA8ABA8A6A6A48EA39D1D0B0A0A08B2A603B2000005B2
+        02380009373897B0ACACABABA80002A802A60004A5A38E0B020B010A05B20000
+        06B2013E02370236001095ADA9ACABA8A8A7938D2522221625B205B2000007B2
+        0004BA3837360236032F032D03260004252238B206B2000009B20003BA383696
+        0236042F022D0226013E09B200000CB20004B537362F032F01B30CB20001}
+      Transparent = True
+    end
+    object cbCreateClientAndGroup: TCheckBox
+      Left = 42
+      Top = 12
+      Width = 201
+      Height = 17
+      Anchors = [akLeft, akBottom]
+      Caption = 'Create Test Client and Project Group'
+      Checked = True
+      State = cbChecked
+      TabOrder = 0
+    end
+    object btn_Ok: TBitBtn
+      Left = 341
+      Top = 8
+      Width = 75
+      Height = 25
+      Anchors = [akRight, akBottom]
+      Caption = 'OK'
+      Default = True
+      ModalResult = 1
+      TabOrder = 1
+      Glyph.Data = {
+        36060000424D3606000000000000360000002800000020000000100000000100
+        18000000000000060000C40E0000C40E00000000000000000000FF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FF006600006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565656565FF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FF0066001EB2311FB133006600FF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6565659A9A9A9A9A9A65
+        6565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FF00660031C24F22B7381AB02D21B437006600FF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565ABABAB9E9E9E9797979C
+        9C9C656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        00660047D36D3BCB5E25A83B0066001BA92E1DB132006600FF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FF656565BFBFBFB5B5B598989865656594
+        9494999999656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF006600
+        4FD67953DE7F31B54D006600FF00FF006600179D271EAE31006600FF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FF656565C4C4C4CACACAA5A5A5656565FF00FF65
+        65658C8C8C989898656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        00660041C563006600FF00FFFF00FFFF00FFFF00FF00660019AA2B006600FF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FF656565B5B5B5656565FF00FFFF00FFFF
+        00FFFF00FF656565939393656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FF006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF006600149D210066
+        00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565FF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FF6565658A8A8A656565FF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0066
+        00006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FF656565656565FF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FF006600006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565656565FF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
+      NumGlyphs = 2
+    end
+    object Button2: TBitBtn
+      Left = 420
+      Top = 8
+      Width = 75
+      Height = 25
+      Anchors = [akRight, akBottom]
+      Cancel = True
+      Caption = 'Cancel'
+      ModalResult = 2
+      TabOrder = 2
+      Glyph.Data = {
+        36060000424D3606000000000000360000002800000020000000100000000100
+        18000000000000060000C40E0000C40E00000000000000000000FF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A00009AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00009A0000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        00009A174AFD103BF400009AFF00FFFF00FFFF00FFFF00FF00009A002CF80030
+        FC00009AFF00FFFF00FFFF00FFFF00FF6B6B6BA8A8A8A0A0A06B6B6BFF00FFFF
+        00FFFF00FFFF00FF6B6B6B9A9A9A9C9C9C6B6B6BFF00FFFF00FFFF00FFFF00FF
+        00009A1A47F81A4CFF123BF100009AFF00FFFF00FF00009A012DF60132FF002A
+        F300009AFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7AAAAAA9F9F9F6B6B6BFF
+        00FFFF00FF6B6B6B9999999E9E9E9797976B6B6BFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A1C47F61B4DFF143EF400009A00009A002DF80134FF032BF20000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7ABABABA2A2A26B
+        6B6B6B6B6B9A9A9A9E9E9E9898986B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FF00009A1D48F61D50FF103DFB0431FE0132FF002CF600009AFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7ACACACA3
+        A3A39F9F9F9E9E9E9999996B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FF00009A1A48F91342FF0C3CFF0733F600009AFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7A7
+        A7A7A3A3A39C9C9C6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FF00009A214EFC1D4BFF1847FF1743F600009AFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BACACACAC
+        ACACA9A9A9A4A4A46B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FF00009A2E5BF92C5FFF224DF8204BF82355FF1B46F600009AFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BB1B1B1B3B3B3AB
+        ABABAAAAAAAFAFAFA6A6A66B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A3664FA386BFF2D59F400009A00009A224CF42558FF1D49F60000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BB6B6B6B9B9B9AEAEAE6B
+        6B6B6B6B6BA9A9A9B0B0B0A7A7A76B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        00009A4071FA4274FF325DF100009AFF00FFFF00FF00009A224DF1275AFF204C
+        F800009AFF00FFFF00FFFF00FFFF00FF6B6B6BBBBBBBBEBEBEAFAFAF6B6B6BFF
+        00FFFF00FF6B6B6BA7A7A7B1B1B1AAAAAA6B6B6BFF00FFFF00FFFF00FFFF00FF
+        00009A497AFC3B66F300009AFF00FFFF00FFFF00FFFF00FF00009A2550F42655
+        FA00009AFF00FFFF00FFFF00FFFF00FF6B6B6BC0C0C0B5B5B56B6B6BFF00FFFF
+        00FFFF00FFFF00FF6B6B6BAAAAAAAEAEAE6B6B6BFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A00009AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00009A0000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
+      NumGlyphs = 2
+    end
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fServerProjectOptions.lfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fServerProjectOptions.lfm
new file mode 100644
index 0000000..3216094
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fServerProjectOptions.lfm	
@@ -0,0 +1,4088 @@
+object ServerProjectOptions: TServerProjectOptions
+  Left = 338
+  Height = 313
+  Top = 184
+  Width = 501
+  HorzScrollBar.Page = 500
+  VertScrollBar.Page = 312
+  ActiveControl = ePrjName
+  BorderIcons = [biSystemMenu]
+  BorderStyle = bsDialog
+  Caption = 'RemObjects SDK Server - Advanced Project Options'
+  ClientHeight = 313
+  ClientWidth = 501
+  Constraints.MinHeight = 238
+  Constraints.MinWidth = 300
+  Font.Height = -11
+  Font.Name = 'Tahoma'
+  OnCloseQuery = FormCloseQuery
+  OnCreate = FormCreate
+  Position = poScreenCenter
+  object Label1: TLabel
+    Left = 8
+    Height = 16
+    Top = 128
+    Width = 115
+    Caption = 'Service Library Name:'
+    ParentColor = False
+  end
+  object Label2: TLabel
+    Left = 8
+    Height = 16
+    Top = 154
+    Width = 76
+    Caption = 'Service Name:'
+    ParentColor = False
+  end
+  object Label3: TLabel
+    Left = 8
+    Height = 16
+    Top = 102
+    Width = 76
+    Caption = 'Project Name:'
+    ParentColor = False
+  end
+  object Label5: TLabel
+    Left = 8
+    Height = 16
+    Top = 244
+    Width = 77
+    Caption = 'Project Folder:'
+    ParentColor = False
+  end
+  object Bevel1: TBevel
+    Left = 4
+    Height = 2
+    Top = 350
+    Width = 675
+    Anchors = [akLeft, akRight, akBottom]
+  end
+  object Label4: TLabel
+    Left = 8
+    Height = 16
+    Top = 76
+    Width = 103
+    Caption = 'Template Location:'
+    ParentColor = False
+  end
+  object Label6: TLabel
+    Left = 8
+    Height = 16
+    Top = 213
+    Width = 80
+    Caption = 'Message Class:'
+    ParentColor = False
+  end
+  object Label7: TLabel
+    Left = 8
+    Height = 16
+    Top = 188
+    Width = 66
+    Caption = 'Server Class:'
+    ParentColor = False
+  end
+  object Label8: TLabel
+    Left = 119
+    Height = 14
+    Top = 188
+    Width = 197
+    Caption = 'Not available in this kind of server'
+    Font.Height = -11
+    Font.Name = 'MS Sans Serif'
+    Font.Style = [fsBold]
+    ParentColor = False
+  end
+  object Image2: TImage
+    Height = 64
+    Width = 501
+    Align = alTop
+    AutoSize = True
+    Picture.Data = {
+      07544269746D617036770100424D36770100000000003600000028000000F401
+      000040000000010018000000000000770100C01E0000C01E0000000000000000
+      0000858585858585858585858585858585858585858585858585858585858585
+      8585858484848484848484848484848484848484848484848484848484848484
+      8484848483838383838383838383838383838383838383838383838383838383
+      8383838383838383838383828282828282828282828282828282828282828282
+      8282828282828282828282828181818181818181818181818181818181818181
+      8181818181818181818181818181818180808081818181818180808080808080
+      80808080808080808080808080808080808080808080807F7F7F7F7F7F7F7F7F
+      7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7E7E7E7E7E7E7E7E7E7E7E7E7F7F7F7F7F
+      7F7F7F7F7F7F7F7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E
+      7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7D7D7D7D7D7D7D7D7D7D7D7D
+      7C7C7C7C7C7C7B7B7B7A7A7A7979797979797878787878787777777676767575
+      757575757474747575757474747474747474746A7CC3677FDD677FDD6880DC69
+      80DD6981DD6A81DC6A81DC6B82DC6B82DC6C82DC6C83DC6E83D6808495878787
+      8B8B8B8D8D8D8F8F8F9090909191919292929292929292929292929191919191
+      919090909090909090908F8F8F8F8F8F8F8F8F8F8F8F8F8F8F90909091919191
+      9191929292929292929292949494949494959595969696969696979797979797
+      9898989A9A9A9A9A9A9A9A9A9B9B9B9C9C9C9D9D9D9D9D9D9E9E9E9F9F9FA0A0
+      A0A0A0A0A2A2A2A2A2A2A2A2A2A3A3A3A5A5A5A5A5A5A6A6A6A7A7A7A8A8A8A8
+      A8A8A9A9A9A9A9A9ABABABACACACACACACAEAEAEAFAFAFB0B0B0B2B2B2B3B3B3
+      B5B5B5B6B6B6B7B7B7B9B9B9BABABABBBBBBBCBCBCBDBDBDBEBEBEBFBFBFBFBF
+      BFC0C0C0C0C0C0C1C1C1C2C2C2C2C2C2C2C2C2C2C2C2C3C3C3C3C3C3C4C4C4C4
+      C4C4C5C5C5C5C5C5C6C6C6C6C6C6C7C7C7C7C7C7C8C8C8C8C8C8C9C9C9CACACA
+      CBCBCBCBCBCBCCCCCCCCCCCCCDCDCDCECECECECECECFCFCFD0D0D0D1D1D1D1D1
+      D1D2D2D2D2D2D2D2D2D2D3D3D3D3D3D3D4D4D4D4D4D4D4D4D4D4D4D4D4D4D4D4
+      D4D4D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D6D6D6D6D6D6D6D6D6D6D6D6D6D6D6
+      D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8D8D8D8D8D8D8D8D8D8D8D8
+      D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADA
+      DADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDCDCDCDCDCDC
+      DCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFE0
+      E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1
+      E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBECECECECECECECECECECECECECECECECECECEDEDEDECECECEDEDEDEDED
+      EDEDEDEDEDEDEDEEEEEEEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F5F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78686
+      8685858585858585858585858585858585858585858585858585858585858585
+      8585848484848484848484848484848484848484848484848484848484848484
+      8484848383838383838383838383838383838383838383838383838383838383
+      8383838383838383838382828282828283838382828282828282828282828282
+      8282828282828282828282818181818181818181818181818181818181818181
+      8181818181818181818181818181818181818181818080808080808080808080
+      808080808080808080808080808080808080808080807F7F7F7F7F7F7F7F7F80
+      80808080807F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F8080808080807F7F7F
+      7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7E7E7E7E7E7E7F7F7F7F7F7F7F7F7F7E7E
+      7E7E7E7E7F7F7F7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7D7D7D7D7D7D7D7D7D7C
+      7C7C7C7C7C7B7B7B7A7A7A7A7A7A797979797979787878777777767676767676
+      7575757676767676767575757575757377896880DD6880DD6981DD6981DD6A81
+      DD6A82DD6B82DD6A82DD6C83DD6D83DD6D83DC6E84DC7084D77F87A88C8C8C8E
+      8E8E919191919191939393939393949494949595959696969797959797969898
+      9698989596969495959394949293939191919191919191919292929292929393
+      939393939393939494949595959595959797979797979898989898989999999A
+      9A9A9B9B9B9C9C9C9D9D9D9D9D9D9E9E9E9E9E9E9F9F9FA0A0A0A0A0A0A1A1A1
+      A2A2A2A3A3A3A4A4A4A4A4A4A5A5A5A6A6A6A7A7A7A8A8A8A8A8A8A9A9A9AAAA
+      AAABABABACACACADADADADADADAEAEAEAFAFAFB1B1B1B1B2BAB0B3C1AFB3C7B0
+      B4C9B2B6CAB2B6CAB4B7CAB5B8CAB8BAC6BBBCC3BFBFC0C0C0C0C0C0C0C1C1C1
+      C1C1C1C3C3C3C3C3C3C3C3C3C4C4C4C4C4C4C4C4C4C4C4C4C6C6C6C5C5C5C6C6
+      C6C6C6C6C7C7C7C7C7C7C8C8C8C9C9C9C9C9C9C9C9C9CACACACCCCCCCCCCCCCC
+      CCCCCDCDCDCECECECECECECFCFCFCFCFCFD0D0D0D1D1D1D2D2D2D3D3D3D3D3D3
+      D3D3D3D3D3D3D4D4D4D4D4D4D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D6D6
+      D6D6D6D6D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8
+      D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D9D9D9D8D8D8
+      D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9DADADAD9D9D9DADADADADADADADADADADA
+      DADADADADBDBDBDBDBDBDBDBDBDBDBDBDCDCDCDBDBDBDCDCDCDCDCDCDCDCDCDD
+      DDDDDCDCDCDDDDDDDEDEDEDDDDDDDEDEDEDEDEDEDDDDDDDDDDDDDEDEDEDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFE0E0E0E0E0E0E0E0
+      E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E2
+      E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAE9E9E9EAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECEC
+      ECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F3
+      F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7868686868686
+      8686868686868686868585858585858686868686868686868585858585858585
+      8585858585858585858585858585858584848485858585858584848484848484
+      8484848484848484848484848484848484848484848484848484838383838383
+      8383838383838383838383838383838383838383838383838383838282828282
+      8282828282828282828282828282828282828282828282828282828281818181
+      8181818181818181818181818181818181818181818181818181818181818181
+      8181818181818181818181818080808080808080808080808080808080808080
+      808080807F7F7F8080808080808080807F7F7F8080808080808080807F7F7F7F
+      7F7F7F7F7F7F7F7F8080808080807F7F7F8080808080808080808080807F7F7F
+      8080808080807F7F7F7F7F7F7E7E7E7F7F7F7E7E7E7E7E7E7E7E7E7D7D7D7D7D
+      7D7C7C7C7B7B7B7B7B7B7A7A7A79797979797979797978787877777777777776
+      76767676767676767676767676766E7CB06981DE6980DD6A82DE6B82DD6B82DD
+      6B82DD6C83DD6C83DE6D84DC6E84DD6E85DD6F85DD6F85DC8089AF8F8F8F9191
+      919393939393939494949797979899999A9C9C9B9E9E9EA1A19FA3A39FA3A39E
+      A2A29C9F9F999B9B969898949595929393919191919191929292939393939393
+      9494949595959595959696969797979797979898989898989A9A9A9B9B9B9B9B
+      9B9C9C9C9C9C9C9D9D9D9E9E9E9F9F9F9F9F9FA0A0A0A0A0A0A1A1A1A3A3A3A3
+      A3A3A4A4A4A4A4A4A5A5A5A6A6A6A7A7A7A8A8A8A8A8A8A9A9A9A9A9A9ACACAC
+      ACACACADADADAEAEAEAEAFB3ABAFC3AAAFCDABB1D0ACB2CFAEB3CFAEB3CFB0B5
+      D0B1B6CFB2B6CFB2B7CFB3B8CFB4B8CFB6BAD0BABCCBBEBFC5C1C1C1C2C2C2C2
+      C2C2C3C3C3C3C3C3C4C4C4C4C4C4C4C4C4C5C5C5C6C6C6C6C6C6C6C6C6C6C6C6
+      C7C7C7C8C8C8C9C9C9C8C8C8CACACACACACACACACACCCCCCCCCCCCCCCCCCCDCD
+      CDCECECECECECECFCFCFD0D0D0D0D0D0D0D0D0D1D1D1D3D3D3D3D3D3D3D3D3D3
+      D3D3D4D4D4D4D4D4D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D6D6D6
+      D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8D8D8
+      D8D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADA
+      DADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDCDCDC
+      DCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDDDD
+      DDDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDF
+      DFDFDFDFDFE0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3
+      E3E3E3E3E2E2E2E3E3E3E4E4E4E3E3E3E4E4E4E3E3E3E3E3E3E5E5E5E4E4E4E4
+      E4E4E5E5E5E4E4E4E5E5E5E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECEC
+      ECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEEEEEE
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F2F2F2F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7
+      F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F787878787878787878786
+      8686868686868686868686868686868686868686868686858585858585858585
+      8585858585858585858585858585858585858585858585858484848484848484
+      8484848484848484848484848484848484848484848484848483838383838383
+      8383838383838383838383838383838383838383838383838383838383828282
+      8282828282828282828282828282828282828282828282828282828181818181
+      8181818182828282828281818181818181818181818181818181818181818181
+      8181818181818181828282808080808080808080808080808080808080808080
+      8080808080808080808080808080808080808080808080808080808080808181
+      8181818180808080808081818181818181818181818181818181818181818181
+      81818080808080808080807F7F7F7F7F7F7E7E7E7E7E7E7E7E7E7D7D7D7C7C7C
+      7C7C7C7B7B7B7B7B7B7A7A7A7979797979797878787777777878787777777777
+      7776767676767677777777787E6A80D76A81DD6B82DE6B83DD6B83DD6C83DD6D
+      84DE6E84DD6E84DD6E84DD6F85DD6F85DD7086DC7086DC7C8ABF919191939393
+      9494949697979899999C9E9EA0A4A4A5ABABA9B1B1ACB5B5ACB5B5ACB4B4A7AF
+      AFA3A9A99EA3A39A9D9D96989895969694949493939394949494949495959595
+      95959696969797979797979898989999999999999A9A9A9B9B9B9C9C9C9C9C9C
+      9D9D9D9F9F9F9F9F9F9F9F9FA0A0A0A0A0A0A1A1A1A2A2A2A3A3A3A4A4A4A4A4
+      A4A5A5A5A7A7A7A7A7A7A8A8A8A8A8A8A9A9A9AAAAAAAAAAAAACACACADADADAD
+      AEB2AAAFC4A9AFD0AAB0D0AAB0D0ACB2D0AEB3D0AEB3D0AFB4D0B0B5D0B2B7D0
+      B3B7D0B3B8D0B4B8D0B5B9D0B6BAD0B7BAD0B7BBD0BABDCEBFC0C5C2C2C2C3C3
+      C3C4C4C4C4C4C4C4C4C4C4C4C4C5C5C5C6C6C6C6C6C6C6C6C6C6C6C6C7C7C7C7
+      C7C7C9C9C9CACACACACACACACACACBCBCBCCCCCCCCCCCCCDCDCDCDCDCDCECECE
+      CFCFCFCFCFCFD0D0D0D0D0D0D1D1D1D2D2D2D3D3D3D3D3D3D3D3D3D4D4D4D4D4
+      D4D4D4D4D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D5D6D6D6D6D6D6D6
+      D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8D8D8D8D8D8D8
+      D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADADA
+      DADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDCDCDCDC
+      DCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDF
+      DFDFDFDFE0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECEC
+      ECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F2F2F2F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F5F5F5F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7
+      F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78787878787878787878787878686
+      8686868686868686868686868686868686868686868686868686868686868685
+      8585858585858585858585858585858585858585858585858585858585858585
+      8484848484848484848585858585858484848484848484848484848484848484
+      8484848484848484848483838384848483838383838383838383838383838383
+      8383838383838383828282838383838383828282828282828282828282828282
+      8282828383838282828282828282828282828181818181818181818282828181
+      8181818181818181818181818181818181818181818181818181818181818181
+      8181818181818181818181808080818181818181828282828282818181828282
+      8282828282828282828282828282828282828282828282828282828282828282
+      828181818181818080808080807F7F7F7F7F7F7E7E7E7E7E7E7E7E7E7D7D7D7C
+      7C7C7C7C7C7B7B7B7B7B7B7A7A7A7A7A7A797979787878787878777777777777
+      787878777777787878727CA56B82DE6B83DE6C83DE6C83DE6C84DE6E84DE6E84
+      DD6E85DE6F85DD6F85DD7086DD7086DD7086DC7287DC7889CE91929894949497
+      97979A9C9C9FA3A3A6ACACAFB8B8B5C0C0BAC7C7BCCACABBC9C9B7C3C3B0BBBB
+      A9B1B1A2A7A79B9E9E9698989494949393939494949595959595959595959696
+      969797979797979898989999999A9A9A9B9B9B9B9B9B9C9C9C9D9D9D9D9D9D9F
+      9F9F9F9F9F9F9F9FA0A0A0A1A1A1A1A1A1A2A2A2A3A3A3A4A4A4A4A4A4A5A5A5
+      A6A6A6A7A7A7A8A8A8A8A8A8A9A9A9AAAAAAABABABACACACAAADBDA8AECEA8AF
+      D0AAB0D0AAB0D0ABB1D0ADB3D0AEB3D0AEB4D0AFB4D0B1B6D1B2B7D0B3B7D0B3
+      B8D0B4B9D0B5B9D0B7BBD1B8BCD1B8BCD1BABDD0BBBED0BEC0CDC4C4C5C5C5C5
+      C5C5C5C5C5C5C6C6C6C6C6C6C6C6C6C7C7C7C8C8C8C8C8C8C8C8C8C8C8C8CACA
+      CACACACACBCBCBCBCBCBCBCBCBCDCDCDCDCDCDCDCDCDCECECECFCFCFD0D0D0D0
+      D0D0D1D1D1D1D1D1D2D2D2D3D3D3D4D4D4D4D4D4D4D4D4D5D5D5D5D5D5D5D5D5
+      D5D5D5D6D6D6D6D6D6D6D6D6D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D6D6D6D7D7
+      D7D8D8D8D8D8D8D7D7D7D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9
+      D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADADADADADADA
+      DADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDCDCDCDCDCDCDCDCDCDCDC
+      DCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDEDEDEDEDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFE0E0E0
+      E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E2E2
+      E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7
+      E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBECECECECECECECECECECECECEDEDEDECECECEDEDEDEDEDEDECECECEDEDEDED
+      EDEDEDEDEDECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7888888888888878787878787888888878787
+      8787878787878787878787878787878787878787878686868686868686868686
+      8686868686868686868686868686868686868686868685858585858585858585
+      8585858585858585858585858585858585858585858585848484848484848484
+      8484848484848484848484848484848484848484848484848383838383838383
+      8383838383838383838383838383838383838383838383838382828282828283
+      8383838383838383828282828282828282828282828282828282828282828282
+      8282828282828282828181818181818282828181818181818181818181818181
+      8181818181818182828281818182828282828283838382828282828282828283
+      8383838383848484848484838383838383838383848484838383838383838383
+      8383838282828181818181818080807F7F7F7E7E7E7E7E7E7D7D7D7D7D7D7C7C
+      7C7C7C7C7B7B7B7A7A7A7A7A7A79797979797979797978787878787878787878
+      78787878787979796D82D26C83DE6C84DE6C83DE6C84DE6D84DE6F85DE6F85DE
+      7086DD7086DD7187DD7187DD7287DD7287DC7388DD778AD38D91A19697979B9D
+      9DA3A7A7ACB4B44F446B41335E41335E41335E41335E5A52769095A6B7C4C4AC
+      B5B5A2A8A89B9E9E979898959595959595959595969696979797979797989898
+      9999999999999A9A9A9A9A9A9C9C9C9C9C9C9D9D9D9E9E9E9E9E9E9F9F9FA0A0
+      A0A0A0A0A1A1A1A2A2A2A2A2A2A3A3A3A4A4A4A5A5A5A5A5A5A6A6A6A6A6A6A8
+      A8A8A8A8A8A9A9A9AAAAAAABABABABABABA8ADC3A7AED2A7AED1A8AFD0AAB1D1
+      AAB1D0ABB1D0ADB3D0AEB4D1AFB5D1B0B5D1B1B6D1B3B8D1B3B8D1B5B9D1B5B9
+      D1B6BAD0B7BBD1B8BCD1B9BDD0BABDD0BBBED0BBBED0BEC0CFC4C4C7C6C6C6C5
+      C5C5C6C6C6C7C7C7C7C7C7C7C7C7C8C8C8C8C8C8C8C8C8C9C9C9CACACACACACA
+      CBCBCBCBCBCBCCCCCCCDCDCDCDCDCDCECECECECECECFCFCFCFCFCFD0D0D0D1D1
+      D1D1D1D1D2D2D2D2D2D2D4D4D4D4D4D4D4D4D4D5D5D5D5D5D5D5D5D5D6D6D6D6
+      D6D6D6D6D6D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8
+      D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9DADA
+      DADADADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDB
+      DBDBDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDD
+      DDDDDDDDDDDDDEDEDEDDDDDDDEDEDEDEDEDEDDDDDDDEDEDEDFDFDFDEDEDEDEDE
+      DEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFE0E0E0E0E0E0E0
+      E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E2E2E2
+      E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E4E4
+      E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECEC
+      ECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F1F1F1F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F788888888888888888888888888888888888888888888
+      8888888888878787878787878787878787878787878787878787878787868686
+      8686868787878787878787878686868686868686868686868686868686868686
+      8686868686868686868686868685858585858585858585858585858585858585
+      8585858585848484858585848484848484848484848484838383848484838383
+      8383838484848484848484848484848383838484848383838383838383838383
+      8383838383838383838383838382828282828283838382828283838382828282
+      8282828282828282818181828282828282818181818181828282828282828282
+      8181818282828383838282828383838383838383838484848484848484848484
+      8484848485858585858585858585858585858585858585858584848484848483
+      83838383838282828282828181818080807F7F7F7E7E7E7E7E7E7D7D7D7D7D7D
+      7C7C7C7B7B7B7B7B7B7A7A7A7A7A7A7A7A7A7979797979797979797878787979
+      797A7A7A777D936C84DF6D84DF6D85DE6E85DE6E85DE6F85DE7086DE7087DE71
+      87DE7187DD7187DD7388DD7388DE7489DD7489DD778AD88C93AD9C9E9EA4A9A9
+      AEB7B73F32603F32603F32603F32603F32603F32603F3260716F8DB9C6C6ABB3
+      B3A1A6A69A9C9C9797979696969696969797979898989898989898989999999A
+      9A9A9A9A9A9A9A9A9C9C9C9D9D9D9D9D9D9E9E9E9E9E9EA0A0A0A0A0A0A0A0A0
+      A1A1A1A2A2A2A2A2A2A3A3A3A4A4A4A4A4A4A5A5A5A6A6A6A6A6A6A8A8A8A9A9
+      A9A9A9A9AAAAAAAAAAADA6ACCAA6AED2A7AED2A9B0D2A9B0D1AAB1D1ABB1D1AC
+      B2D1AEB3D1AEB4D1AFB5D1B0B5D1B2B7D2B3B8D1B4B9D1B4B9D1B6BAD1B7BBD1
+      B7BBD1B9BDD2BABED1BBBED1BCBFD1BDC0D2BEC1D2BFC2D1C5C6C9C7C7C7C7C7
+      C7C8C8C8C8C8C8C8C8C8C9C9C9C9C9C9CACACAC9C9C9CBCBCBCBCBCBCCCCCCCC
+      CCCCCDCDCDCECECECECECECFCFCFD0D0D0D0D0D0D0D0D0D0D0D0D2D2D2D3D3D3
+      D3D3D3D4D4D4D5D5D5D5D5D5D4D4D4D5D5D5D5D5D5D6D6D6D6D6D6D6D6D6D6D6
+      D6D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8D8D8D8D8
+      D8D8D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADA
+      DADADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDCDC
+      DCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDE
+      DEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDF
+      DFDFDFE0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E2E2E2E3
+      E3E3E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4
+      E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E8E8E8E9E9E9
+      E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECEC
+      ECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F78989898989898989898989898888888989898888888888888888
+      8888888888888888888888888888888888888887878787878787878787878786
+      8686878787878787878787878787868686878787868686868686878787868686
+      8686868686868686868686868686868686868585858585858585858585858686
+      8685858585858585858585858585858584848484848484848484848484848484
+      8484848484848484848484848484838383848484838383838383838383838383
+      8383838383838383838383838383838383838383838383838383838383838282
+      8282828283838382828282828282828282828283838382828282828282828282
+      8282838383848484838383848484848484858585858585858585868686868686
+      8686868787878787878787878787878787878787878686868585858585858585
+      858383838383838282828181818080807F7F7F7F7F7F7F7F7F7E7E7E7D7D7D7C
+      7C7C7C7C7C7B7B7B7B7B7B7A7A7A7A7A7A7A7A7A7A7A7A7979797A7A7A7A7A7A
+      7A7A7A7181BF6D84DF6E85DF6F86DF6F85DE7086DF7087DF7187DE7188DE7288
+      DE7288DE7389DE7489DD7489DD748ADD758ADD788EDE8E9ABAA1A6A6ACB4B43E
+      30633E30633E30633E30633E30633E30633E30633E3063898DA3B5C0C0A7AEAE
+      9EA1A19899999696969696969797979898989999999999999A9A9A9A9A9A9B9B
+      9B9B9B9B9D9D9D9E9E9E9E9E9E9E9E9EA0A0A0A1A1A1A1A1A1A2A2A2A2A2A2A3
+      A3A3A3A3A3A4A4A4A5A5A5A6A6A6A6A6A6A6A6A6A7A7A7A9A9A9A9A9A9AAAAAA
+      ABABABA7ACC6A6ADD2A7AFD3A9B0D3AAB1D2AAB1D2ABB2D2ACB2D2ADB3D2AFB4
+      D2AFB5D2B0B6D2B2B7D2B3B8D2B3B8D2B5BAD2B5BAD1B7BBD2B7BBD1B8BCD2B9
+      BDD2BABED1BBBED1BCBFD1BDC1D2BEC1D2BFC2D2C0C3D1C6C6C8C7C7C7C7C7C7
+      C9C9C9C8C8C8C9C9C9C9C9C9CACACACACACACBCBCBCCCCCCCCCCCCCCCCCCCDCD
+      CDCECECECECECECFCFCFCFCFCFD0D0D0D1D1D1D1D1D1D2D2D2D3D3D3D3D3D3D5
+      D5D5D5D5D5D5D5D5D5D5D5D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7
+      D7D7D7D7D7D7D8D8D8D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9
+      D9D9D9D9D9D9D9DADADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDB
+      DBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDCDCDC
+      DCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFE0
+      E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1
+      E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3
+      E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECEC
+      ECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7898989898989898989898989898989898989898989898989888888898989
+      8989898888888888888888888888888888888888888888888888888787878787
+      8787878787878787878787878787878787878786868686868687878786868686
+      8686868686868686868686868686868686868686858585858585868686868686
+      8686868585858585858585858585858585858585858484848484848585858585
+      8585858584848484848484848484848484848484848484848484848484848484
+      8484848484838383838383848484838383838383838383838383838383838383
+      8383838383838383838383838383838282828383838383838383838383838484
+      8484848485858585858585858586868686868687878788888888888889898988
+      8888898989898989898989898989888888888888888888878787878787868686
+      8585858484848383838181818080807F7F7F7F7F7F7E7E7E7E7E7E7D7D7D7C7C
+      7C7C7C7C7B7B7B7B7B7B7A7A7A7A7A7A7A7A7A7979797A7A7A7A7A7A7A7A7A7A
+      7D886E85DF6E85DF6F86DF7086DE7086DF7087DF7188DE7288DE7288DE7389DE
+      7389DE758ADE758BDE768BDD768BDD7A8EDE8095E08F9FCAA6ADAD7D7D94B2BD
+      C1C5D5D5B3C1CB58517D3C2F653C2F653C2F65453A6DBECCCCAEB7B7A2A6A69B
+      9D9D9797979898989898989898989999999A9A9A9A9A9A9B9B9B9B9B9B9D9D9D
+      9D9D9D9E9E9E9F9F9F9F9F9FA1A1A1A0A0A0A2A2A2A2A2A2A3A3A3A2A2A2A4A4
+      A4A5A5A5A5A5A5A5A5A5A6A6A6A6A6A6A7A7A7A9A9A9A9A9A9AAAAAAA7ABC1A6
+      ADD3A6AED2A8AFD3A9B0D3AAB1D2AAB1D2ABB2D2ACB2D2AEB4D3AFB5D2B0B6D2
+      B1B6D2B2B7D2B3B9D3B4B9D2B5BAD2B6BAD2B7BBD2B8BCD2B9BDD3BABED3BBBF
+      D2BCBFD2BDC0D2BDC1D2BFC2D3C0C3D3C1C3D3C3C5D1C7C8C9C8C8C8CACACAC9
+      C9C9CACACACACACACBCBCBCBCBCBCCCCCCCCCCCCCDCDCDCDCDCDCECECECFCFCF
+      CFCFCFD0D0D0D1D1D1D1D1D1D1D1D1D1D1D1D2D2D2D3D3D3D3D3D3D4D4D4D5D5
+      D5D5D5D5D6D6D6D6D6D6D6D6D6D6D6D6D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7D7
+      D7D7D7D7D7D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9
+      D9D9D9DADADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDB
+      DBDBDBDBDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDD
+      DDDDDDDDDDDDDDDDDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDF
+      DFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFDFE0E0E0E0E0
+      E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E2E2E2E2
+      E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9
+      E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECEC
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F5F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78A8A
+      8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8989898989898A8A8A89898989898989
+      8989888888888888888888898989888888888888888888888888878787888888
+      8888888888888888888888888888888787878787878787878787878787878787
+      8787878787878787878787878787878787878786868686868687878786868686
+      8686868686868686868686858585858585858585858585858585858585858585
+      8585858585858585858585858484848585858585858484848484848484848484
+      8484848484848484848484848484848484848484848484848484848483838384
+      8484848484838383838383838383838383838383838383848484858585858585
+      8585858686868686868787878888888888888A8A8A8989898A8A8A8A8A8A8A8A
+      8A8B8B8B8B8B8B8B8B8B8B8B8B8A8A8A8A8A8A89898988888888888887878786
+      86868484848383838181818181818080807F7F7F7F7F7F7E7E7E7D7D7D7D7D7D
+      7C7C7C7C7C7C7C7C7C7B7B7B7B7B7B7B7B7B7A7A7A7B7B7B7B7B7B7B7B7B7681
+      AE6F86DF7086DF7187DF7188DF7288DF7288DF7289DF7389DF7489DE748ADE75
+      8BDE768BDE778CDE778CDE7A8EDF7E93E08499E199A3B8A7AEAEAEB7B7B8C4C4
+      C4D4D4C6D9DC4E45773B2E673B2E673B2E6799A1B2B4BFBFA6ACAC9EA0A09999
+      999898989898989999999999999A9A9A9B9B9B9B9B9B9C9C9C9D9D9D9E9E9E9E
+      9E9E9F9F9FA0A0A0A1A1A1A1A1A1A2A2A2A2A2A2A3A3A3A3A3A3A4A4A4A5A5A5
+      A5A5A5A6A6A6A7A7A7A8A8A8A8A8A8A9A9A9AAAAAAA9ABB5A5ADD4A6ADD3A7AF
+      D3A8AFD3AAB1D4AAB1D3ABB2D3ACB3D3ADB3D3AFB5D3AFB5D3B1B7D3B2B7D3B3
+      B8D3B4B9D3B5BAD3B6BBD3B7BBD3B8BCD3B8BDD3B9BDD3BABED3BCBFD3BDC0D3
+      BDC0D2BEC1D3BFC2D3C1C4D4C1C3D3C2C4D3C5C6CEC9C9C9C9C9C9C9C9C9CACA
+      CACACACACACACACCCCCCCCCCCCCDCDCDCDCDCDCDCDCDCECECECFCFCFD0D0D0D0
+      D0D0D1D1D1D1D1D1D1D1D1D3D3D3D3D3D3D4D4D4D5D5D5D6D6D6D6D6D6D6D6D6
+      D7D7D7D7D7D7D7D7D7D7D7D7D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D9D9
+      D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADADADAD9D9D9DA
+      DADADBDBDBDADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDBDB
+      DCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDDDDDDDD
+      DDDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFDF
+      DFDFE0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E2E2
+      E2E3E3E3E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4
+      E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEBEBEBEBEBEBEAEAEAEBEBEBEAEAEAEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEFEFEFEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78B8B8B8B8B8B
+      8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A
+      8A89898989898989898989898989898989898989898989898988888888888888
+      8888888888888888888888888888898989888888888888888888888888888888
+      8888888888888888888787878787878787878787878787878787878787878787
+      8787878787878787878786868686868686868685858586868686868686868686
+      8686858585858585868686858585858585858585858585858585858585858585
+      8585858585858585858585858484848484848484848484848484848484848484
+      8484848483838384848483838383838384848484848485858586868685858587
+      87878787878787878989898A8A8A8B8B8B8B8B8B8B8B8B8C8C8C8D8D8D8C8C8C
+      8D8D8D8D8D8D8C8C8C8C8C8C8C8C8C8B8B8B8B8B8B8A8A8A8989898888888686
+      868585858383838282828181818181818080807F7F7F7E7E7E7E7E7E7D7D7D7C
+      7C7C7C7C7C7C7C7C7B7B7B7C7C7C7B7B7B7B7B7B7B7B7B7C7C7C7B7F897087E0
+      7087E07187DF7288DF7389E07389E07389DF748ADF7489DE758ADF768BDE768B
+      DE778CDF778CDE798EDE7C91DF7F94E0939AA79DA1A1A1A7A7AAB2B2B5C1C1C3
+      D4D4979FB6392D69392D69392D698184A2B9C5C5AAB1B19FA2A29A9B9B989898
+      9999999A9A9A9B9B9B9B9B9B9C9C9C9C9C9C9D9D9D9D9D9D9F9F9F9F9F9FA0A0
+      A0A1A1A1A2A2A2A2A2A2A2A2A2A3A3A3A3A3A3A4A4A4A5A5A5A6A6A6A6A6A6A7
+      A7A7A8A8A8A8A8A8A9A9A9A9A9A9AAAAAAA6ADD0A6AED4A6AED3A8B0D4A9B0D4
+      AAB1D4AAB2D4ABB2D3ACB3D3AEB4D3AFB5D3B0B6D3B1B7D3B2B7D3B3B8D3B3B9
+      D3B5BAD3B6BBD3B8BCD3B8BCD3B9BDD3BABED4BBBFD4BCBFD3BDC1D3BDC1D3BF
+      C2D3C0C3D4C1C4D4C2C4D4C2C5D4C3C6D4C8C8CBCACACACBCBCBCBCBCBCBCBCB
+      CBCBCBCCCCCCCDCDCDCECECECECECECECECED0D0D0D0D0D0D0D0D0D1D1D1D2D2
+      D2D1D1D1D1D1D1D3D3D3D3D3D3D4D4D4D5D5D5D6D6D6D6D6D6D6D6D6D7D7D7D7
+      D7D7D7D7D7D7D7D7D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D9D9D9D9D9D9
+      D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADADADADADADADADADADBDBDBDBDB
+      DBDBDBDBDBDBDBDBDBDBDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDD
+      DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDDDDDDDEDEDE
+      DEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDFDFE0E0
+      E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E4E4E4E5E5
+      E5E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78B8B8B8B8B8B8B8B8B8B
+      8B8B8B8B8B8A8A8A8B8B8B8B8B8B8B8B8B8A8A8A8B8B8B8A8A8A8A8A8A8A8A8A
+      8989898A8A8A8989898989898989898989898989898989898989898989898989
+      8989898989898989898989898989898989898989898989898988888888888888
+      8888888888888888888888888888888888888888888888888888888888888888
+      8787878888888888888888888787878787878787878787878686868686868686
+      8686868686868686868686868686868686868685858585858585858585858585
+      8585858585858585858585848484848484848484848484848484848484848484
+      8484848383838484848484848484848484848585858686868686868787878888
+      888989898A8A8A8A8A8A8C8C8C8D8D8D8D8D8D8E8E8E8E8E8E8F8F8F8F8F8F8F
+      8F8F8F8F8F8F8F8F8E8E8E8E8E8E8E8E8E8E8E8E8D8E8E8B8C8C8A8B8B888888
+      8686868383838282828282828181818080807F7F7F7E7E7E7E7E7E7D7D7D7D7D
+      7D7C7C7C7C7C7C7C7C7C7B7B7B7B7B7B7C7C7C7C7C7C7583BB7188E07187E072
+      88E07289E07389E0748AE0748AE0748AE0758ADF758ADF768CDF778CDF778CDF
+      788DDE798DDE7A8FDE7D91DF939494949696989A9A9FA4A4AAB2B2BAC7C7C2D2
+      D6382C6C382C6C382C6C5D5989BCCACAACB4B4A2A5A59C9D9D9999999A9A9A9A
+      9A9A9C9C9C9C9C9C9D9D9D9D9D9D9E9E9E9E9E9E9F9F9FA2A2A2A2A2A2A1A1A1
+      A2A2A2A3A3A3A3A3A3A4A4A4A4A4A4A4A4A4A5A5A5A6A6A6A6A6A6A7A7A7A8A8
+      A8A8A8A8A9A9A9AAAAAAA9ACBBA6AED5A6AED5A7AFD4A8B0D4A9B0D4AAB2D5AB
+      B2D4ADB4D4AEB4D4AFB5D4AFB5D4B1B7D4B2B8D4B3B8D4B3B9D4B5BAD5B7BCD4
+      B8BCD4B8BCD4B9BED4B9BED4BABED4BDC0D4BDC1D4BEC2D4BFC2D4C0C3D4C1C4
+      D4C2C5D5C4C7D5C3C6D5C4C7D5C6C9D3CACACACACACACBCBCBCBCBCBCBCBCBCC
+      CCCCCDCDCDCECECECECECECFCFCFCFCFCFD0D0D0D1D1D1D1D1D1D2D2D2D2D2D2
+      D2D2D2D4D4D4D5D5D5D5D5D5D6D6D6D6D6D6D7D7D7D7D7D7D8D8D8D8D8D8D8D8
+      D8D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9D9DADADADADADADA
+      DADADADADADADADADADADADADADADADADADBDBDBDBDBDBDBDBDBDBDBDBDBDBDB
+      DBDBDBDBDBDBDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDDDDDDDDDDDDDDDD
+      DDDDDDDDDDDDDDDDDDDDDDDDDDDEDEDEDEDEDEDEDEDEDEDEDEDFDFDFDFDFDFDF
+      DFDFDFDFDFDFDFDFDFDFDFDFDFDFE0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0
+      E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1E1
+      E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECEC
+      ECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3
+      F3F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78C8C8C8C8C8C8C8C8C8C8C8C8B8B
+      8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8B8A8A8A8A8A8A8B8B8B8B
+      8C8C8C8D8D8C8D8D8C8D8D8C8D8D8B8C8C8B8B8B8A8A8A8A8A8A8A8A8A8A8A8A
+      8A8A8A8A8A8A8989898B8B8B8B8C8C8B8B8B8C8D8D8D8E8E8C8D8D8C8D8D8C8D
+      8D8B8C8C8B8B8B8A8A8A8A8A8A8B8B8B8A8B8B8B8C8C8C8E8E8E8F8F8E8F8F8F
+      91918F91918E90908E8F8F8D8E8E8B8D8D898A8A888989888888878787878787
+      8686868888888989898889898889898889898888888788888787878686868686
+      8685858586868686878787888887888887888887888886878785858584848484
+      8484848484848484858585868686878888888989898A8A8A8A8A898A8A8B8B8B
+      8B8B8B8B8B8B8D8D8D8E8E8E8F8F8F9090909090909191919292929292929394
+      949495959495959496969596969698989598989496969295959092928D8F8F8A
+      8B8B8889898586868384848181818080808080807F7F7F7E7E7E7E7E7E7C7C7C
+      7C7C7C7C7C7C7C7C7C7C7D7D7C7D7D7983A9738BE1748BE1748BE1758BE1758D
+      E1768DE1778DE17990E17A90E17C92E17C92E17D93E27D93E17C91E07C90E07B
+      90E07C90DF7C8FDA909090929292939393999B9BA3A9A9B2BDBDC5D5D5362A6E
+      362A6E362A6E5C588BBECCCCAFB7B7A3A7A79C9D9D9B9B9B9B9B9B9A9A9A9B9B
+      9B9D9D9D9E9F9F9FA0A0A1A2A2A2A4A4A5A6A6A6A8A8A6A8A8A7A8A8A6A7A7A6
+      A7A7A6A7A7A5A6A6A6A6A6A5A5A5A6A6A6A6A6A6A7A7A7A8A8A8A8A8A8A9A9A9
+      AAAAAAABABABA7B0D2A8B2D7AAB2D7ACB4D7AEB6D9AEB7D9AFB8D9B1B8D7B1B8
+      D7B1B8D6B0B7D6B2B8D5B2B8D5B4B9D5B4B9D5B5BAD5B6BBD5B8BDD5BABED5BA
+      C0D6BBC1D6BCC1D6BEC2D7BFC2D5BEC2D5BFC3D5C0C3D5C2C6D6C4C8D7C5C9D8
+      C6CAD8C8CCD8C8CCD8C8CBD8CCCDCFCDCDCDCDCDCDCDCDCDCDCDCDCDCDCDCECE
+      CECFCFCFCFCFCFCFCFCFD0D0D0D1D1D1D2D2D2D2D2D2D3D3D3D3D3D3D3D3D3D5
+      D5D5D6D6D6D7D7D7D8D9D9D9DADAD9DADAD9DADADADBDBDADBDBDADADAD9DADA
+      DADADADADADAD9D9D9D9D9D9D9D9D9D9D9D9DADADADADBDBDBDBDBDBDBDBDBDB
+      DBDCDCDCDCDDDDDCDDDDDCDDDDDCDCDCDCDCDCDDDDDDDDDDDDDCDDDDDCDCDCDD
+      DDDDDCDCDCDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDEDE
+      DEDEDEDEDEDEDFDFDFDFDFDFDEDFDFDEDEDEDEDEDEDFDFDFDFDFDFDFDFDFDFDF
+      DFDFDFDFDFE0E0E0E0E0E1E1E1E1E1E1E1E1E1E1E1E1E1E2E2E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3
+      E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3
+      E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECECECECEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F78C8C8C8D8D8D8C8C8C8C8C8C8C8C8C8C8C8C
+      8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8C8D8D8E8F8F9092929295
+      959396969396969194949092928D8E8E8C8D8D8B8B8B8A8A8A8A8A8A8A8A8A8A
+      8A8A8B8C8C8C8D8D8F91919294949497979498989498989395959093938E9090
+      8C8D8D8C8C8C8C8D8D8D8F8F909292939595969A9A989D9D9AA0A09BA1A19BA1
+      A19AA0A0999E9E969A9A9396969093938E8F8F8B8C8C8A8A8A898A8A8A8B8B8A
+      8C8C8D8F8F8E91918F92928F91918C8F8F8A8C8C888989878787878787878888
+      898A8A8B8D8D8C8E8E8D90908D90908C8F8F8A8C8C8889898586868585858585
+      858687878889898A8C8C8C8F8F8D90908F91918E90908D8F8F8C8D8D8C8C8C8D
+      8D8D8E8E8E909090919191929292939393949494969696979898999B9B9C9E9E
+      9EA1A1A0A4A4A1A6A6A2A7A7A2A8A8A2A8A8A0A6A69DA3A39AA0A0959A9A9094
+      948D9090898B8B8687878383838181818080807F7F7F7E7E7E7E7E7E7D7D7D7D
+      7D7D7C7D7D7E7E7E7E86A0778FE37B93E37C94E47C95E47C94E47C94E37D95E4
+      8097E48299E4859DE5889FE589A2E689A1E5899FE5879DE4849AE28297E17F95
+      E18393CC919191919191919191989999A1A6A6B0B9B9C2D1D15C588D35297035
+      29705C588DC0CECEB0B8B8A4A8A89D9E9E9A9A9A9B9B9B9C9C9C9E9F9FA1A2A2
+      A3A5A5A6A9A9A9ADADACB0B0AEB3B3AFB3B3B0B4B4B0B4B4AFB3B3ADB0B0ACAF
+      AFAAACACA9AAAAA8A8A8A8A8A8A8A8A8A8A8A8A8A8A8A9A9A9AAAAAAACACACAE
+      B0B8ABB5DAAEB9DBB1BBDCB3BDDCB5C0DDB7C2DEB7C1DDB7C0DCB6BFDBB5BDD9
+      B3BBD8B3BAD7B4BAD6B4BAD5B5BAD5B6BCD6BABFD7BCC2D8BFC4DAC0C7DBC1C8
+      DBC2C8DBC3C9DBC3C7D9C2C7D8C2C7D8C4C8D8C6CAD9C9CEDBCBD0DDCCD2DECE
+      D4DFCFD4DFD0D4DED1D4DAD1D3D3CFD0D0CFD0D0CFD0D0CECECECECECECFCFCF
+      CFCFCFD0D0D0D0D0D0D1D1D1D2D2D2D3D3D3D3D3D3D3D4D4D5D5D5D6D6D6D8D9
+      D9D9DBDBDBDDDDDCDEDEDEDFDFDFE1E1DFE1E1DEE0E0DEE0E0DDDFDFDDDEDEDC
+      DDDDDBDCDCDBDBDBDADBDBDADBDBDCDCDCDCDDDDDDDEDEDEDFDFDEE0E0DEDFDF
+      DFE0E0DFE0E0DFE0E0DFE0E0DFE0E0DEDFDFDFDFDFDEDFDFDDDEDEDEDEDEDDDE
+      DEDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDEDFDFDFDFDFDFE0E0E0E1E1E0
+      E1E1E1E2E2E1E2E2E0E1E1E0E0E0DFE0E0E0E0E0E0E0E0E0E0E0E1E1E1E1E1E1
+      E2E2E2E2E3E3E3E3E3E3E4E4E2E3E3E2E3E3E2E3E3E2E2E2E1E1E1E1E1E1E1E1
+      E1E1E1E1E1E1E1E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E3E3E3E3E3E3E3
+      E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9EAEAEAE9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBECECECECECECECECECECECECECECECECECECECECECECECECECECECEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F1F1
+      F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F78D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8D8C
+      8C8C8D8D8D8D8D8D8C8C8C8C8C8C8D8D8D8F9191929595979A9A9A9F9F9CA2A2
+      9CA2A29A9F9F969A9A9194948E90908C8C8C8B8B8B8B8B8B8B8B8B8C8D8D8E90
+      90929595969A9A9CA1A19FA5A59FA6A69FA6A69DA2A2989C9C94969691939391
+      92929295959699999B9F9FA0A6A6A3ABABA7B1B1AAB4B4ABB6B6ABB7B7AAB5B5
+      A8B2B2A5AEAE9FA7A79AA0A09599998F92928C8E8E8B8D8D8D8E8E9092929498
+      98989D9D989E9E979D9D9498989093938C8E8E888989888989898A8A8D8F8F90
+      9494949999979D9D969C9C949A9A9094948C8E8E898A8A858686858686888A8A
+      8C8F8F919595959B9B969C9C969C9C9599999295959091918E8F8F8E8E8E8F8F
+      8F9090909292929393939596969899999C9D9D9FA2A2A3A8A8A7ADADABB2B2AF
+      B8B8B1BBBBB3BEBEB4BFBFB4C0C0B2BEBEAFBABAABB5B5A6B0B09FA7A7999F9F
+      9297978D9191898B8B8586868182828080807F7F7F7E7E7E7E7E7E7D7D7D7F7F
+      7F7F84947A91DE7F97E6859DE788A1E789A2E78AA3E789A3E78AA3E78EA7E892
+      ABE996B0EA99B4EB9CB6EB9CB5EB9AB3EA97AFE991A8E78DA3E5879DE48999CF
+      939494929393929292969898A0A4A4AEB7B7C0CECE5A57903328733328735A57
+      8FC0CECEB1B9B9A4A8A89FA0A09C9C9C9D9E9E9FA0A0A3A5A5A7ABABABB0B0B1
+      B7B7B5BCBCB8C0C0BBC4C4BCC5C5BCC5C5BDC5C5BAC2C2B7BEBEB4B9B9B1B5B5
+      AEB1B1AAACACA9A9A9A8A8A8A8A8A8A9A9A9ABABABACADADB0B2B2B1B8CCB3BE
+      DFB7C4E1BBC8E2BFCCE4C1CEE5C3D0E6C3CFE5C1CDE3BFC9E1BBC5DEB8C1DBB6
+      BED9B6BCD8B6BCD7B7BDD7BAC0D9BEC4DBC2C9DDC5CEE0C8D1E2CAD2E2CAD2E2
+      C9D1E0C8CEDEC6CCDCC7CDDCC9CEDDCBD1DFCFD5E1D1D8E3D4DBE5D6DDE6D6DD
+      E6D6DDE5D6DCE3D6DADAD4D7D7D2D4D4D0D1D1D0D0D0D0D0D0D0D0D0D0D0D0D1
+      D1D1D1D1D1D2D2D2D3D3D3D4D4D4D4D4D4D5D5D5D8D8D8D9DADADCDDDDDEE0E0
+      E0E3E3E2E5E5E3E6E6E3E7E7E4E8E8E3E7E7E3E6E6E1E4E4E1E3E3DFE0E0DDDE
+      DEDCDCDCDBDBDBDBDCDCDCDDDDDEDFDFE0E1E1E1E3E3E2E5E5E4E6E6E4E7E7E4
+      E7E7E4E7E7E4E6E6E3E6E6E4E6E6E3E5E5E2E3E3E1E2E2E0E0E0DFDFDFDFDFDF
+      DEDFDFDEDEDEDEDEDEDDDDDDDEDEDEDFDFDFE0E0E0E1E2E2E2E4E4E3E5E5E3E5
+      E5E3E5E5E2E3E3E1E1E1E0E0E0DFE0E0E0E0E0E1E1E1E1E2E2E3E3E3E4E5E5E5
+      E7E7E6E8E8E6E8E8E6E7E7E5E6E6E3E4E4E3E4E4E3E3E3E2E2E2E2E2E2E2E2E2
+      E2E2E2E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E2E2E2E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9
+      E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F6F6F6F6F6F6F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F78E8E8E8E8E8E8E8E8E8E8E8E8D8D8D8D8D8D8E8E8E8D8D8D8D8D
+      8D8D8D8D8D8D8D8D8D8D8F8F8F929494989C9C9FA5A5A6AEAEAAB4B4AAB4B4A6
+      AEAE9FA5A5979B9B9294948E8E8E8C8C8C8C8C8C8D8D8D8F9090939595999D9D
+      A1A8A8A8B1B1ADB8B8AEBABAACB7B7A6AFAF9FA6A6999E9E969A9A979A9A9BA0
+      A0A0A7A7A8B1B1AFBABAB4C2C2B9C8C8AAB6C09AA3B79AA3B798A2B6B8C8C8B4
+      C2C2AEBABAA6B0B09DA4A4969A9A9093938F9090919393969B9B9DA4A4A3ABAB
+      A5AFAFA4ADAD9EA6A6979D9D9194948B8C8C898A8A8C8E8E919595989E9E9FA7
+      A7A3ADADA4AEAE9FA8A8989E9E9195958B8D8D8788888788888B8E8E93979799
+      A0A0A0A9A9A4AEAEA2ABAB9DA5A5989D9D9395959091918F8F8F8E8F958D909C
+      9494949798989A9C9C9FA1A1A4A9A9AAB0B0B1B9B9B7C1C1BCC8C8C0CECEB1BC
+      C6A0A9BDA1AABE7B7FA69FA9BD9DA7BBACB9C3B9C8C8B2C0C0A9B5B5A1ABAB9A
+      A1A19297978C8F8F8789898484848181817F7F7F7F7F7F7F7F7F7E81877A8FD8
+      819AE689A3E892ADEB99B3EC9CB7ED9DB8ED9CB7EC9DB8EDA0BBEEA4C0EEAAC5
+      F0A6C0E990A3D3A0B7E2AEC9F0AAC5EFA4BDED9CB4EA94ABE792A2CB989A9A95
+      96969494949799999FA4A4AEB7B7BFCDCD5A56913227753227755A5691C1CECE
+      B2BABAA6AAAA9FA0A09E9F9FA0A1A1A5A8A8ABAFAFB2B8B8B8C0C0BEC8C8C3CF
+      CFC6D3D3ACB5C4A4ABBFA4ABBFB6C0CAC7D3D3C3CDCDBEC7C7B9BFBFB3B7B7AE
+      B0B0ABACACA9A9A9AAAAAAACACACAEAFAFB2B5B5B7BBBBB9C4DDBECCE6C4D2E8
+      C8D7EBCCDBECB0BBD7A8B1D0BBC6DECDDAEBC9D6E8C4D0E4BEC7E0BBC3DCB8BF
+      D9B8BED9B9C0D9BFC5DDC3CBDFCAD2E3CED9E7D2DDE9D4DFEAD3DDE9D0DAE6CE
+      D6E3CCD3E1CCD3E0CED4E1D2D9E5D6DEE8D9E2EAB1B6CFA8ABC89393B9B3B7CF
+      C8CEDDDDE3E4DBDFDFD7DADAD4D6D6D3D4D4D0D1D1D0D1D1D1D1D1D1D1D1D2D2
+      D2D2D2D2D3D3D3D4D4D4D4D5D5D5D6D6D8D9D9DBDDDDDFE2E2E2E6E6E5E9E9E7
+      ECECBABCD0BBBDD1BCBDD1BCBDD1C6C8D7E8ECECE5E9E9E3E6E6E1E3E3DFE0E0
+      DDDEDEDDDEDEDFE0E0E1E3E3E4E6E6E6E9E9E8ECECE9EDEDE9EEEEE9EEEEE9EE
+      EEE9EDEDE9EDEDE8ECECE7EBEBE6E9E9E4E7E7E3E5E5E2E3E3E0E1E1DFE0E0DF
+      DFDFDEDEDEDEDEDEDEDFDFE1E1E1E2E3E3E4E6E6E6E9E9E7EAEAE8EAEAE7E9E9
+      E5E6E6E3E4E4E1E2E2E1E1E1E1E1E1E2E2E2E3E4E4E5E7E7E7E9E9E8EBEBEAED
+      EDE9ECECE8EBEBE6E8E8E4E6E6E4E5E5E3E3E3E2E2E2E2E2E2E2E2E2E2E2E2E3
+      E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4
+      E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E4E4E4E5E5E5E5E5E5E5E5E5E5E5
+      E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9
+      E9E9E9E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F78F8F8F8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E
+      8E8E8E8E8E8E9192929598989EA3A3A9B2B2514C8A524E8B524E8B514C89A8B2
+      B29DA3A39497979091918D8D8D8D8D8D8F90909395959A9E9EA3ABABAEBABA8E
+      95AF54508D54508D534E8C514B89656290A1A7A79DA2A2A0A6A6A6AFAFAFBABA
+      B8C7C78990AF5F5D96302677302677302677302677302677302677423B836464
+      97898FA9979FA99CA2A2959898929595969A9A9EA5A59298A8504C89514D8A51
+      4C8A7D7F9E9FA7A79599998E8F8F8A8C8C8F9292969C9CA2ABAB5F5D90514C8A
+      514D8A504B88A2ACAC979D9D8E9191898A8A8A8B8B8F93939AA1A18F96A5504B
+      89514C8A504C897B7F9EA0A8A8979B9B919393848EAF7289DE7189E38091C796
+      9BA5A1A4A4A8ADADB1B8B8B8C3C3C0CDCDA2AABF6B6B9E443D85302677302677
+      302677302677302677302677302677433C8468699C9AA5BAB4C4C4A9B6B6A0A9
+      A9969C9C8E9292888A8A8485858181818080807E8085788BD27D95E688A1E890
+      A8E54D4C954F4F965150966A71AEB3D1F3B2D0F39BB1DD6368A639307F302677
+      3026773026773026775353978492C5AEC9F0A4BDECA0B0CC9FA4A4999C9C9698
+      98989A9AA1A5A5AEB6B6BFCDCD585592302677302677585692C1CFCFB2BABAA8
+      ACACA1A3A3A2A3A3A6A9A9ADB2B2B6BDBDBEC9C9BDC8CD7E80AA4E498B302677
+      3026773026773026773026773026775753907C7CA59CA1B5B8BEBEB2B5B5ADAE
+      AEABACACACACACAEB0B0B3B6B6B9BDBDC0C7C7C5D4EAB8C5DF8184B44F4A8E30
+      2677302677302677302677302677443D86575294C3CDE3BEC7DEBAC2DBBAC1DB
+      BDC5DCC4CCE1CCD6E6C9D3E4706EA53B317F3026773026773026776E6BA2D2DA
+      E6D2D9E5CAD1E08E8EB866629C3026773026773026773026773026773026775D
+      5795B4B7CCDCE1E1D8DBDBD5D7D7D2D3D3D2D2D2D1D1D1D2D2D2D2D2D2D4D4D4
+      D4D4D4D5D5D5D6D6D6D7D8D8DADCDCDFE2E2C1C2D2807CAA534B8E3026773026
+      77302677302677302677302677483F878D8BB4DCE0E6E5E8E8E1E3E3DFE1E1DF
+      E0E0E0E2E2E4E6E67570A35F58955F5996605997605997605997605997605997
+      6059967873A6A6A5C5D4D7E2EAEEEEE8EBEBE6E8E8E4E5E5E2E3E3E1E1E1E0E0
+      E0DFDFDFE0E0E0E1E2E2E4E5E5E7E9E95F57955F58955F58955F5795E7EAEAE4
+      E6E6E2E3E3E2E3E3E2E3E3E4E5E5E6E8E8E9ECECE0E2E8605896605996605896
+      5F58955E5794C5C4D4E5E6E6E4E4E4E3E3E3E2E2E2E3E3E3E3E3E3E3E3E3E3E3
+      E3E3E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEB
+      EBECECECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F4F4F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F78F8F
+      8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8E8E8E8E8E8E8E
+      8E8E929393999D9DA4ABABB2BEBE2F257A2F257A2F257A2F257AB1BDBDA2AAAA
+      979B9B9192928E8E8E8E8F8F929393999D9DA3AAAAB0BCBCABB8C33830802F25
+      7A2F257A2F257A382F7EA6AFB4A7AEAEA6ADADABB4B4B4C1C1A5B0C04B478C2F
+      257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A
+      6E6F99A1A8A8989D9D9599999A9F9FA4ADAD9199AE2F257A2F257A2F257A7274
+      9FA7B1B1999F9F9093938D8E8E9295959CA3A3AAB6B6514E8E2F257A2F257A2F
+      257AACB9B99DA5A59195958A8B8B8B8D8D949999A0A9A98F97AC2F257A2F257A
+      2F257A71749FA7B1B196A0AE8094D1738CE5728AE4738DE57892E6809AE896A9
+      D4B1BCC4BFCCCCA2ABC05754942F257A2F257A2F257A2F257A2F257A2F257A2F
+      257A2F257A2F257A2F257A2F257A2F257A2F257A54529398A4BAB1C0C0A4AFAF
+      99A1A1909595888A8A8485858282827588D17790E48099E78FA9EAA1BDEF2F25
+      7A2F257A2F257A54549AC3E3F87078B12F257A2F257A2F257A2F257A2F257A2F
+      257A2F257A2F257A2F257A403B8A95A6D5AFC3D8AAB2B2A1A7A79B9E9E9B9D9D
+      A1A5A5AEB6B6BFCDCD5755942F257A2F257A585595C2CFCFB3BBBBA8ADADA4A7
+      A7A6A9A9AEB3B3B8C0C0C2CDCD878AB03830812F257A2F257A2F257A2F257A2F
+      257A2F257A2F257A2F257A2F257A2F257A2F257ABCC3C3B4B8B8AFB1B1ADAEAE
+      AFB0B0B3B6B6BABFBFC2CACACBD6DA7F83B52F257A2F257A2F257A2F257A2F25
+      7A2F257A2F257A2F257A2F257A2F257AC7D1E5C0C9E0BDC5DEBEC5DEC2CBE0CB
+      D5E6B6BDD73930822F257A2F257A2F257A2F257A2F257A595597D5DEE9D6DDE8
+      AEB2CE2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F25
+      7A9F9FBFDDE2E2D8DBDBD5D7D7D3D4D4D3D3D3D3D3D3D3D3D3D5D5D5D5D5D5D6
+      D6D6D7D7D7DADADADCDEDEE1E4E45D56962F257A2F257A2F257A2F257A2F257A
+      2F257A2F257A2F257A2F257A2F257A524B91DDE1E7E5E8E8E2E4E4E1E3E3E4E6
+      E6E7EAEA5E58982F257A2F257A2F257A2F257A2F257A2F257A2F257A2F257A2F
+      257A2F257A2F257A6B66A1BDBED4EAEEEEE7EAEAE4E6E6E2E3E3E1E1E1E0E0E0
+      E1E2E2E3E4E4E6E8E8EAEDED2F257A2F257A2F257A2F257AEAEDEDE7E9E9E4E5
+      E5E3E4E4E4E5E5E6E8E8EAEDEDE1E4EA534B912F257A2F257A2F257A2F257AA4
+      A2C1E8E9E9E5E6E6E4E4E4E3E3E3E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4
+      E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      ECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1
+      F1F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7909090909090
+      9090908F8F8F8F8F8F8F8F8F9090908F8F8F8F8F8F8F8F8F8F8F8F8F8F8F9395
+      959CA0A0A8B1B1B8C7C72D237C2D237C2D237C2D237CB7C5C5A6AFAF9A9E9E92
+      93938F8F8F929393979A9AA0A7A7AEB9B9BDCDCD4B478F2D237C2D237C2D237C
+      372E82A0AABAB0BBBBACB5B5AFB9B9B8C5C58B91B32D237C2D237C2D237C2D23
+      7C2D237C2D237C413B895552945552942D237C2D237C2D237C2D237C6E6F9BA2
+      AAAA9A9E9E989D9D9DA3A3AAB4B497A0B62D237C2D237C2D237C7578A5ACB8B8
+      9CA3A39295958E8F8F949898A0A8A8B0BEBE5250922D237C2D237C2D237CB3C2
+      C2A1AAAA9398988A8C8C8B8D8D969C9CA5B1B1949FB52D237C2D237C2D237C74
+      79A7A2B9DA89A5EA7C96E7758EE5748DE57993E6819BE88CA8EB9BB7EFA1BEEC
+      6E74AE2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D23
+      7C2D237C2D237C2D237C2D237C2D237C2D237C2D237C6E72A4ADBDC2A8B4B49C
+      A4A4909595898B8B7B8AC1748CE47891E5849DE894AEECA9C6F22D237C2D237C
+      2D237C53539B666BAB2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D23
+      7C2D237C2D237C2D237C2D237C8893BDB7C3C3AAB2B2A0A5A59EA1A1A3A8A8AF
+      B8B8BFCDCD5653962D237C2D237C565396C2CFCFB4BCBCAAAEAEA7ABABACB1B1
+      B6BEBEC3CFCF6A69A12D237C2D237C2D237C2D237C2D237C2D237C5754965754
+      96423B892D237C2D237C2D237C2D237CBDC4C4B6BABAB1B3B3B0B2B2B3B5B5B9
+      BEBEC1C9C9C2CCD15754972D237C2D237C2D237C2D237C2D237C2D237C2D237C
+      2D237C2D237C2D237C2D237CC7D2E5C1CAE1C0C8DFC2CAE0C8D1E4D2DEEB4E48
+      922D237C2D237C2D237C2D237C2D237C2D237C585398D5DEE8D6DEE8AEB1CE2D
+      237C2D237C2D237C5B5699898AB88A8BB85C579A2D237C2D237C2D237C393083
+      D7DCE1DBDFDFD7D9D9D5D6D6D3D3D3D3D3D3D3D3D3D5D5D5D5D5D5D6D6D6D7D7
+      D7DADBDBDDDFDFE2E5E55B55982D237C2D237C2D237C5D589A827FB17672A945
+      3D8B2D237C2D237C2D237C2D237C5D579AE9EDEDE5E8E8E4E6E6E5E8E8E9EDED
+      5D579A2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D237C2D23
+      7C2D237C2D237C2D237C827FB1ECF0F0E8EBEBE5E7E7E3E4E4E1E2E2E2E2E2E4
+      E5E5E7E9E9EBEFEF2D237C2D237C2D237C453D8BECF0F0E8EAEAE5E7E7E6E7E7
+      E7E9E9EAEDEDEEF2F27772AA2D237C2D237C2D237C2D237CA5A4C5EAEDEDE7E9
+      E9E5E6E6E4E4E4E3E3E3E3E3E3E3E3E3E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4
+      E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F791919191919191919190
+      90909090909090909090909090909090909090909090908F8F8F9495959DA2A2
+      ABB5B5BDCDCD2C227E2C227E2C227E403A8BBBCBCBA9B2B29B9F9F9394949091
+      919699999EA3A3ABB4B4BAC9C97174A82C227E2C227E2C227E2C227E959EBAB8
+      C5C5B2BCBCB1BBBBB8C4C4A6B2C32C227E2C227E2C227E2C227E413A8B9098BB
+      BBCBD0C1D1D1BECDCDBDCDCDBECECEA2ADBE7275A33D36866B6B99A0A7A79A9E
+      9E989D9DA0A6A6AEB9B99AA5BC2C227E2C227E2C227E777BA9AFBCBC9FA6A692
+      95958F9090959A9AA3ABABB5C4C45351962C227E2C227E2C227EB7C8C8A4AEAE
+      949A9A8A8D8D8C8F8F989F9FA9B5B598A4BB2C227E2C227E2C227E727DB9A1BF
+      F08CA8EB7E98E77891E57992E7809AE98CA7EC9BB9EFA4C1ED4645952C227E2C
+      227E2C227E2C227E2C227E61609F9299BBB8C5D0C9D8D8C8D7D7C7D7D7B4C2CD
+      8F97B95F5F9E2C227E2C227E2C227E2C227E2C227E484590AFBFC4A9B6B69AA3
+      A38799C97B92E7768EE57B93E6869FE998B3EDAFCCF32C227E2C227E2C227E2C
+      227E2C227E2C227E2C227E646AAC98ACD8B8D6F5BAD6F4ABC3E6818EC2362E86
+      2C227E2C227E2C227E2C227E8A91B4B5C1C1A9B0B0A3A8A8A6ABABAFB8B8C0CE
+      CE5553982C227E2C227E565398C2CFCFB5BEBEADB2B2ADB2B2B4BBBBC0CBCB68
+      68A22C227E2C227E2C227E2C227E5754999EA6C2CEDCDCCBD8D8CBD7D7CCD8D8
+      CCD8D8999EBB66649E2C227EBBC1C1B6BABAB1B4B4B2B4B4B7BBBBC0C7C7CBD5
+      D5615F9E2C227E2C227E2C227E2C227E58559CA2ABCFCBD9EBD5E4F1D4E2F0A8
+      B0D26A68A82C227EC4CFE4C2CAE2C1C9E1C5CDE3CCD7E8A1A7CC2C227E2C227E
+      2C227E2C227E9396C0D3DDEBB8BED79FA2C6D3DBE6D4DBE7ACB0CE2C227E645F
+      A1C8CEE0DFE8EFE1EAF0E4EDF1E8F3F57371AB2C227E2C227E2C227E9494BCDE
+      E3E3D9DCDCD6D7D7D5D5D5D4D4D4D5D5D5D6D6D6D6D6D6D7D7D7D8D8D8DADBDB
+      DDDFDFE2E5E55B5499382F858B88B6DEE2E8EAEFEFEAEFEFECF1F1EEF5F5A6A6
+      C92C227E2C227E2C227E2C227EAFB0CDE7EBEBE5E8E8E6EAEAEBEFEF5D579C2C
+      227E2C227E2C227E8E8CBA8E8CBA8E8CBA8E8CBA7672AB453D8D2C227E2C227E
+      2C227E2C227E2C227E504A95E0E3E9E8EBEBE5E7E7E3E3E3E3E4E4E5E6E6E8EB
+      EBEDF2F22C227E2C227E2C227E5E579CEEF2F2EAECECE8EAEAE8EAEAEAEDEDEE
+      F2F27672AB2C227E2C227E2C227E2C227EA6A5C8ECEFEFE9EBEBE7E8E8E5E6E6
+      E5E5E5E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6
+      E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E7E7E7E8E8E8E7E7E7
+      E8E8E8E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F79292929191919191919191919191
+      919191919191919191919191919090909090909090909597979FA4A4AEB8B8C0
+      D0D02A21802A21802A2180535299BCCCCCAAB3B39CA1A19597979496969B9F9F
+      A6AFAFB5C2C29FABC32A21802A21802A21802A21807A80AFBFCDCDB5C0C0B2BB
+      BBB6C1C1C1D0D03F398C2A21802A21802A2180686BA6C0D0D6C1CFCFB9C5C5B3
+      BEBEB0BABAB0BABAB0BBBBB0BABAAEB8B8A3ABB18D92A49CA1A1989B9B9A9E9E
+      A1A8A8B0BCBC9CA7BF2A21802A21802A21808A92B6B1BEBE9FA6A69396969092
+      92969A9AA4AEAEB7C7C75251982A21802A21802A2180BACCCCA5B1B1959B9B8C
+      8E8E8C8F8F989F9FABB8B899A6C02A21802A21802A2180737EBBA4C3F18FAAEC
+      819AE87B94E77F99E88AA6EB9AB7EFA4C1EC4645972A21802A21802A21802A21
+      8050519EB1C5DDC7D5D8C2CECEBDC8C8BAC5C5B9C3C3B8C3C3BAC5C5BCC9C9C1
+      D1D1B4C3CF5D5E9F2A21802A21802A21802A2180484592AFBEC4A0B7D98DA7EB
+      819AE87A92E67D95E788A1EA9AB6EEB2D0F42A21802A21802A21802A21802A21
+      80342D889AAFD9B4D1F4ACC7F1A7C2EFA8C1EFACC7F0B4D0F3B6D0EF5B5EA52A
+      21802A21802A2180342D86B7C4CAB1BABAA9AFAFA9AFAFB2BBBBC0CECE545299
+      2A21802A2180545299C3D0D0B7BFBFB1B7B7B2B9B9BCC6C6A2AAC22A21802A21
+      802A21802A2180969DC1CFDDDDC7D3D3C2CCCCC0C8C8BFC7C7C0C8C8C1C9C9C1
+      C9C9BFC6C6A1A5B6B7BBBBB3B6B6B2B5B5B5B8B8BDC2C2C7D0D0898DB72A2180
+      2A21802A2180352E8798A0CAD3E3F1CEDCEECAD7EBC9D6EAC9D6EAC9D5E9C8D3
+      E8A8AFD2C1CAE2C0C8E0C2CAE1C7D0E4D0DBEA7879B22A21802A21802A218092
+      95C2E0ECF3D8E3EDD3DBE8D0D7E5CFD5E4D1D7E4A8ACCC6A68A7D7DEE8D8DFE9
+      D9E1E9DBE3EADFE7EEE6F0F3DDE6EF2A21802A21802A2180726FAAE1E6E6DBDE
+      DED7D8D8D5D5D5D5D5D5D5D5D5D7D7D7D8D8D8D8D8D8D9D9D9DADBDBDDDFDFE0
+      E2E2645FA0C2C3D5E6E9E9E6E9E9E7EAEAE7EAEAE8ECECECF1F1F0F6F67571AC
+      2A21802A21802A2180817EB3EAEEEEE8EBEBE8ECECECF0F05C579E2A21802A21
+      802A2180F1F7F7F0F6F6EDF2F2ECF0F0ECF0F0EEF3F3BEC1D84F49962A21802A
+      21802A21802A21807571ADECF0F0E8EBEBE5E6E6E4E5E5E5E7E7E9ECECEEF2F2
+      2A21802A21802A21805C579EEFF3F3EBEEEEEAEDEDEBEEEEEEF2F28E8BBB2A21
+      802A21802A21802A2180A6A6CAEEF2F2EBEDEDE8EAEAE6E7E7E5E5E5E4E4E4E4
+      E4E4E4E4E4E4E4E4E4E4E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBECECECEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEC
+      ECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7929292929292929292929292929292929292
+      929292929292929292929292919191919191969797A0A5A5AEB8B8C0D1D12820
+      8328208328208352519BBDCDCDABB4B49DA2A2979A9A989C9CA4AAAAB2BDBDB7
+      C7CD322B892820832820832820835C5DA1C1D0D0B5C0C0AFB8B8B1BABABBC7C7
+      8C94B92820832820832820835D5EA2D0E3E3C3D2D2B8C3C3B0B8B8AAB2B2A7AE
+      AEA6ACACA6ACACA5ABABA3AAAAA3A8A89DA2A2999C9C969898989C9CA1A8A8B1
+      BDBD9CA8C02820832820832820839DA9C2B1BEBEA0A7A79395958F9191979B9B
+      A5AEAEB8C8C851509B282083282083282083BACCCCA5B1B1959B9B8B8D8D8C8F
+      8F97A0A9A4BBDA94A8D8282083282083282083727EBDA6C3F190ACEC829DE980
+      9AE887A2EB97B4EFAAC8F34D4FA02820832820832820832820837D8CC4B1D0F5
+      A3C2F29BB6EDA3B4D4AEB5BAAEB3B3ACB1B1ABB1B1ABB1B1ADB5B5B2BCBCB7C4
+      C4C1D2D28E98BD282083282083282083282083454397ABC9F399B4EF8AA3EA7E
+      97E77F97E789A2EA9AB6EEB4D1F4282083282083282083282083282083A7BEE2
+      B2CEF3A4BEEF9AB3EC95ADEB95ADEB99B1EBA2BBEEB3C7DBC5D9DB4745952820
+      832820832820836566A4B9C5C5AEB7B7ACB4B4B3BDBDC1CFCF52519B28208328
+      208353519CC4D1D1B9C2C2B4BCBCB9C1C1C3CFCF53509B282083282083282083
+      959DC2D2E2E2C8D4D4C1C9C9BBC1C1B8BDBDB8BDBDB7BCBCB8BDBDB8BDBDB7BC
+      BCB6BABAB3B6B6B2B4B4B3B5B5B8BCBCC2C9C9C4CED5332C8928208328208328
+      2083A2ACD2D1E0F0C9D6EBC2CEE7BFCAE5BEC9E3BFC8E3C0CAE3BFC9E2BFC8E1
+      BDC5DEBDC5DEC2CAE1C9D2E6D3DEEC56539F282083282083282083D6E2EEDAE4
+      EED2DBE7CED4E3CCD1E1CBD0E0CCD1E0C3C9DBD1D6E3D2D7E4D3D9E4D5DAE5D8
+      DEE7DDE5EBE5EEF2DDE6EF28208328208328208358549FE2E7E7DCDFDFD7D9D9
+      D6D6D6D5D5D5D5D5D5D7D7D7D8D8D8D8D8D8D8D9D9DADBDBDCDDDDDFE0E0D5D7
+      DDE2E4E4E2E4E4E2E4E4E3E5E5E4E6E6E6E9E9EAEEEEEFF5F58C8BBD28208328
+      20832820835A55A0EBEFEFE8EBEBE9EDEDEDF1F15A56A0282083282083282083
+      F1F7F7EDF2F2EAEDEDE8EBEBE8EBEBEAEDEDECF1F1EFF4F47471AE2820832820
+      83282083282083A4A4C9EAEEEEE7E9E9E6E7E7E7E8E8EAEDEDEFF3F328208328
+      20832820835B56A0F1F5F5EEF1F1EDF1F1EFF2F2A5A5CB282083282083282083
+      2820838D8BBDEFF2F2EBEEEEE8EAEAE6E7E7E5E5E5E5E6E6E5E5E5E5E5E5E5E5
+      E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8
+      E8E8E8E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEB
+      EBEBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F793939393939393939392929292929293939393939392
+      9292929292929292929292929292979898A1A6A6AEB8B8C1D1D1271F85271F85
+      271F8551509DBDCDCDABB4B49FA4A49B9F9FA0A5A5ADB6B6BCCBCB5B5BA2271F
+      85271F85271F853C3891BACAD0B6C1C1ADB5B5ABB2B2B2BBBBC0CDCD47439727
+      1F85271F85322B8BBDCDDACFE1E1C2D0D0B7C2C2B0B8B8ABB1B1A8ADADA6ABAB
+      A4A9A9A4A9A9A2A7A7A0A4A49CA0A0989B9B9799999A9D9DA3A9A9B2BEBE9CA7
+      C1271F85271F85271F859CA8C2B1BDBD9FA6A6939696909292979B9BA5AEAEB8
+      C8C850509C271F85271F85271F85BACCCCA5B1B1959B9B8B8D8D8893B18DA7EC
+      A0BDF093A9DA271F85271F85271F85727EBEA6C4F292AEED87A2EB86A0EA91AD
+      EDA5C2F2707BBE271F85271F85271F85271F858597CDADCCF49DBAF191ACEE87
+      A2EC809BEA8098E5909EC8A1A4A9A2A4A4A1A4A4A2A6A6A5AAAAAAB1B1B2BDBD
+      BCCCCC8B96BC271F85271F85271F85271F85707BBEA6C3F293AEED859EEA839B
+      E98AA4EB9CB6EEB4D1F5271F85271F85271F85271F857581BEB7D3F5A4BEF095
+      ADEC8CA3E8889FE7889EE790A0CB9CA5ADAAB4B4B9C8C8B6C7D4271F85271F85
+      271F85322A8BC0CECEB4BEBEB0B8B8B5BFBFC2D0D052509D271F85271F855251
+      9DC5D2D2BBC5C5B9C1C1BEC8C8ABB6C9271F85271F85271F855E5EA4D7E8E8D0
+      DFDFC6D1D1BFC7C7BAC0C0B7BCBCB6BBBBB6BABAB5B9B9B6BABAB6B9B9B5B8B8
+      B3B5B5B3B5B5B6B9B9BEC3C3C8D0D09398BF271F85271F85271F856A6CB0D2E3
+      F1C8D5EBBFCAE5B9C3E2B7C1E0B8C0DFB9C1DFB9C2DFB9C1DFBAC2DEBAC1DDBD
+      C4DFC2C9E2CAD3E7D5E1ED5653A1271F85271F853F3993DEEAF2D5DEEACDD4E3
+      C8CEDFC7CCDEC8CCDEC9CEDECCD0DFCDD2E1CFD4E1D1D6E3D4D9E5D9DFE8DFE7
+      EDE7F0F49495C4271F85271F85271F857C7BB4E2E6E6DCDFDFD8D9D9D6D6D6D6
+      D6D6D6D6D6D8D8D8D9D9D9D9D9D9D9D9D9DBDBDBDBDCDCDEDFDFDFE0E0E0E1E1
+      E0E1E1E0E1E1E1E2E2E2E4E4E5E8E8EAEEEEEFF5F5807DB7271F85271F85271F
+      855955A1EBEFEFE9ECECEAEDEDEDF2F25A55A2271F85271F85271F85EFF4F4EA
+      EEEEE7E9E9E5E6E6E4E5E5E6E8E8E8EBEBEBEFEFEFF4F47370B0271F85271F85
+      271F85342C8CEEF2F2E9ECECE7E9E9E7E9E9EAEDEDEFF3F3271F85271F85271F
+      855A55A2F2F7F7F0F5F5F0F5F5A6A5CC271F85271F85271F85271F857370B0EF
+      F3F3EBEEEEE9EBEBE6E7E7E5E5E5E4E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5E5
+      E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8
+      E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F79494949494949494949494949393939393939393939393939393
+      93939393939393939393979898A1A6A6AFB9B9C1D1D1251D87251D87251D874F
+      4F9EBECDCDACB6B6A3A9A9A0A5A5A8B0B0B7C4C4949FC0251D87251D87251D87
+      251D879FAAC4BAC6C6ADB5B5A7ADADA9B0B0B5BEBEBAC8CE251D87251D87251D
+      876769ABD3E6E6D1E3E3C7D5D5BDC9C9B7C1C1B4BCBCB1B9B9AEB6B6ACB4B4AA
+      B1B1A8AEAEA5AAAAA1A6A69EA1A19A9D9D9DA1A1A6ADADB3BFBF9CA8C2251D87
+      251D87251D879BA7C1B0BDBDA0A6A6949696909292979B9BA5AFAFB8C8C84F4E
+      9E251D87251D87251D87BACCCCA5B1B1959B9B8B8D8D8595C78DA8ECA1BEF193
+      A8DA251D87251D87251D87717DBFA7C5F394AFED8BA6EC8EA9ED9CB8F0A0BAE7
+      2F298E251D87251D87251D877C8BC7AFCDF59DB9F08EA8ED829DEA7C95E97791
+      E8758EE8748DE8768EE38995C39A9CA29B9C9C9D9F9F9FA3A3A5ABABAEB9B9BB
+      CCCC828BBA251D87251D87251D87251D87A1BAE79EB9F08EA7EB88A0EA8DA6EB
+      9DB7F0B4D1F5251D87251D87251D87251D87B8D3F0ABC5F198B1EC8BA2E98499
+      E78494CF8990A38E9090959898A0A6A6B0BBBBC2D3D36568AA251D87251D8725
+      1D879DA7C1B9C4C4B4BDBDB7C2C2C3D1D1504F9F251D87251D87514F9FC6D3D3
+      BDC7C7BCC5C5C2CECE858AB9251D87251D87251D87B5C2D6D7E9E9D2E1E1CAD6
+      D6C4CDCDC1C9C9BEC5C5BDC4C4BCC2C2BBC0C0BBC1C1BABFBFB9BDBDB7BABAB6
+      B9B9BABEBEC2C8C8CDD7D75E5DA5251D87251D87251D87C2D0E5CBDAEEC0CCE7
+      B8C3E2B4BCDFB3BBDEB5BCDEB5BDDEB6BDDEB7BFDEB8C0DDB9BFDDBDC3DFC2CA
+      E1CBD4E7D6E1EE5452A3251D87251D875552A3DBE6F0D2DAE8CBD1E1C8CDDEC7
+      CADDC7CBDDC9CDDDCBCEDECED2E0D0D4E2D4D9E4D8DEE8DDE5ECE4EDF1A0A2CD
+      251D87251D87251D87251D87A9ACCDE0E4E4DCDEDED9D9D9D6D7D7D7D7D7D8D8
+      D8D9D9D9DADADADADADADADADADBDCDCDCDCDCDDDDDDDEDFDFDEDFDFDFDFDFDF
+      E0E0E2E3E3E4E6E6E8EBEBECF0F0E4E9F0322B8E251D87251D87251D877E7CB7
+      EBEFEFE9ECECEAEDEDEDF2F25854A3251D87251D87251D87EEF3F3E9ECECE6E7
+      E7E3E4E4E2E3E3E3E4E4E6E7E7E9EBEBEDF0F0E4E8EF322B8E251D87251D8725
+      1D87A4A4CCEBEEEEE9EBEBE9EBEBEBEEEEEFF3F3251D87251D87251D875954A3
+      F3F8F8F3F8F8CCCFE3322B8E251D87251D87251D87726FB1EFF3F3ECEEEEE9EB
+      EBE7E8E8E6E7E7E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6
+      E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7959595959595949494949494949494949494949494949494949494949494
+      939393939393989999A1A6A6AFB9B9C1D2D2241C8A241C8A241C8A4F4EA0BFCF
+      CFB0BABAA8B0B0A9B1B1B2BEBEB8C8CE2F2890241C8A241C8A241C8A777DB3BD
+      CBCBAFB8B8A5AAAAA3A7A7AAAFAFB6C0C09FA8C4241C8A241C8A241C8A45429C
+      7C81B8868DBEA2ADC9B2BECCC3D0D0C1CDCDBECACABCC8C8B9C5C5B8C2C2B4BF
+      BFB1BABAACB3B3A5ACACA0A5A5A1A6A6A8B0B0B5C1C19CA7C3241C8A241C8A24
+      1C8A9BA7C2B1BDBDA0A7A7959797919393989C9CA5AFAFB8C8C84E4DA0241C8A
+      241C8A241C8ABACCCCA5B1B1959A9A8B8D8D8397D28EA8ECA1BEF193A8DB241C
+      8A241C8A241C8A717DC1A8C5F396B3EF90ABED96B1EFA7C5F35E65B3241C8A24
+      1C8A241C8A4C4EA5B4D2F6A0BCF28EAAEE819CEB7B94E9778FE9758DE8748DE8
+      748CE8748CE8738CE8768DE38794C197999E999A9A9CA0A0A3AAAAADBBBEB5D2
+      EF4C4EA5241C8A241C8A241C8A5E65B3A9C5F394AFEE8CA5EC90A8EC9EBAF0B4
+      D1F5241C8A241C8A241C8A4C4EA6B9D5F5A3BCF092A9EB879BDD898FA98B8B8B
+      8B8B8B8E8E8E9294949CA1A1AAB2B2BCCACA99A5C7241C8A241C8A241C8A767B
+      B2BCC8C8B7C0C0BAC4C4C4D2D2504EA1241C8A241C8A504EA1C7D4D4BEC9C9BE
+      C8C8C5D2D26667AC241C8A241C8A241C8A6869AE7E82B99FA8CBA5AECAC1CCD3
+      CAD5D5C8D3D3C8D2D2C7D0D0C6CFCFC5CDCDC3CBCBC1C8C8BEC4C4BDC2C2BFC5
+      C5C6CECED1DCDC3B3696241C8A241C8A47439CD5E4EDC6D4EBBCC8E5B6C0E1B2
+      BBDFB4BBDEB4BBDDB5BDDEB6BDDEB7BEDDB8BFDDBAC0DDBCC4E0C3CAE3CBD4E8
+      D7E2EE5351A5241C8A241C8A5451A5DAE5EFD2D9E8CBD1E1C8CDDFC6CADDC7CC
+      DDC9CEDECCD0DFCFD4E2D4D9E4D8DEE8DEE5EDCCD3E5625FAC241C8A241C8A24
+      1C8A241C8A49449DE4E9E9DEE2E2DBDCDCD9D9D9D7D7D7D8D8D8D9D9D9D9D9D9
+      DADADADADADADADADADBDBDBDDDDDDDDDEDEDFDFDFDFE0E0E0E1E1E2E4E4E5E7
+      E7E8EBEBECF0F0E3E8EF4B459F241C8A241C8A241C8A241C8AAFB0D2EAEDEDE8
+      EBEBEAEDEDEDF2F25753A5241C8A241C8A241C8AEFF3F3EAECECE6E7E7E3E4E4
+      E2E2E2E3E3E3E4E4E4E6E8E8EAECECEEF2F28B8AC0241C8A241C8A241C8A6561
+      ACEDF0F0EAECECEAECECEBEEEEF0F4F4241C8A241C8A241C8A5853A6F3F8F8CC
+      CFE3312A91241C8A241C8A241C8A4B459EF0F4F4EDEFEFEAEBEBE8E8E8E6E7E7
+      E6E7E7E5E5E5E5E5E5E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E6E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F0F0
+      F0F0F0F0F1F1F1F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F79595
+      9595959595959595959595959595959595959595959595959595959594949494
+      9494999A9AA2A7A7B0BABAC2D2D2221B8C221B8C221B8C4D4DA2C4D6D6B7C4C4
+      B1BCBCB4C0C0BFCECE5859A7221B8C221B8C221B8C4D4DA2C0D0D0B2BCBCA6AC
+      AC9FA2A2A1A5A5A9AFAFB7C2C2A0AAC6221B8C221B8C221B8C221B8C221B8C22
+      1B8C221B8C221B8C221B8C3733964C4BA06C6EAE7579B2939CC09BA5C1BFCECE
+      BAC6C6B2BCBCA9B1B1A6ADADAAB3B3B7C3C39CA8C4221B8C221B8C221B8C9BA7
+      C3B2BEBEA0A7A7949797919393999D9DA6AFAFB9C9C94C4DA1221B8C221B8C22
+      1B8CBACCCCA5B0B0959A9A8A8C8C8398D98FA9ECA2BFF193A8DC221B8C221B8C
+      221B8C707CC2A9C6F399B5F096B1EF9DBAF1A7C4EE221B8C221B8C221B8C221B
+      8C96ACDDA7C5F393AFEF849EEB7B95E9778FE8758DE8748DE8748DE8748DE974
+      8DE9758DE8748DE8748DE8778EE38693BF979898979FAE96AEE2A6C4F3A9C3EA
+      221B8C221B8C221B8C221B8CAAC5EE9CB8F092ABED93ACED9FBAF0B4D1F5221B
+      8C221B8C221B8C747FC2B4D1F59FB7EB94A0BA8F91918B8B8B8C8C8C8D8D8D8E
+      8E8E9393939A9D9DA8AFAFB9C6C6A1AFCB221B8C221B8C221B8C777CB5BFCCCC
+      B8C2C2BBC5C5C5D2D24E4EA2221B8C221B8C4F4EA3C8D5D5C0CBCBC0CACAC8D5
+      D54F4EA3221B8C221B8C221B8C221B8C221B8C221B8C221B8C221B8C221B8C4E
+      4DA14E4CA17A7DB68588BBA5ADCAB9C3D1CDD7D7C9D1D1C6CECEC6CDCDCAD3D3
+      D4E0E0221B8C221B8C221B8C514FA4D5E1E6C5D2EBBBC6E5B6BFE1B3BCDEB4BB
+      DEB4BCDEB6BDDFB7BEDEB8BFDEB9BFDEBAC1DEBDC4DFC3CBE3CCD6E8D7E2EF52
+      50A7221B8C221B8C5250A7DBE5EFD2D9E8CCD1E2C8CCDFC6CADDC8CCDECACFDF
+      CFD3E2D2D8E4D9E0E9DFE7EE8F91C62E2993221B8C221B8C221B8C221B8C2F29
+      92C1C5DAE1E5E5DDDFDFDADBDBD8D9D9D8D8D8D8D8D8DADADADBDBDBDBDBDBDB
+      DBDBDBDBDBDCDCDCDEDEDEDEDFDFE0E1E1E1E2E2E3E4E4E5E8E8E9ECECEDF1F1
+      BCBFDC3C3799221B8C221B8C221B8C221B8C4944A0ECF0F0E9EBEBE8EAEAE9EC
+      ECEEF2F25652A7221B8C221B8C221B8CEFF3F3EAECECE6E7E7E3E4E4E2E2E2E3
+      E3E3E4E4E4E6E6E6E9EAEAEDF0F0D8DBEA221B8C221B8C221B8C3C379AEEF2F2
+      EBEEEEEAEDEDECEFEFF0F4F4221B8C221B8C221B8C5652A7E6EAF13C379A221B
+      8C221B8C221B8C4945A0E3E7EEEDF0F0EAECECE8E9E9E7E8E8E7E7E7E6E6E6E6
+      E6E6E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7
+      E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5
+      F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7969696969696
+      969696969696959595969696969696959595959595959595959595949494999A
+      9AA2A7A7B1BABAC2D2D2211A8E211A8E211A8E4C4CA3CDE2E2C2D3D3BECECEC3
+      D3D396A3C7211A8E211A8E211A8E2C2793BCCCD3B6C2C2A8AFAF9BA4B4989DA6
+      9FA1A1A9AFAFB7C2C2A0AAC7211A8E211A8E211A8E211A8E211A8E211A8E211A
+      8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E49
+      479E989FB5AEB7B7AEB8B8B8C5C59DA8C5211A8E211A8E211A8E9CA8C5B3BFBF
+      A2A9A9959898929494999E9EA6B0B0B9C9C94C4CA3211A8E211A8E211A8EBBCD
+      CDA6B1B1959A9A8A8C8C829BEA8FAAEDA3C0F293A8DD211A8E211A8E211A8E70
+      7BC3AAC7F39CB8F09AB7F0A6C2F38090CF211A8E211A8E211A8E4A4CA9B2D1F6
+      9CB9F18AA5ED7F98EB7991EA758EE9758EE9758EE9758EE9758EE9758EE9758E
+      E9758EE9768EE9768EE9768EE97D92DF8198E68AA4EC9CB8F1B2D0F65459B021
+      1A8E211A8E211A8E8091CFA4C0F298B1EF96B0EEA0BBF1B5D1F5211A8E211A8E
+      211A8E737FC3B8CDE0A6B2B5999E9E9091918C8C8C8E8E8E8F8F8F9090909393
+      939C9F9FA8B0B0B9C6C6A1AECB211A8E211A8E211A8E777CB6C0CCCCB9C3C3BB
+      C6C6C5D3D34E4DA4211A8E211A8E4E4DA4C8D5D5C1CBCBC1CBCBC9D5D54E4DA4
+      211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A8E211A
+      8E211A8E211A8E211A8E211A8E211A8E3733984D4AA1CCD5D5CED8D8D6E2E221
+      1A8E211A8E211A8E504FA6D6E1E1C6D3EABDC7E6B7C0E2B3BDDFB4BCDFB5BDDF
+      B6BDDFB7BEDFB9C0DEBAC0DEBAC1DEBEC5E0C4CCE4CDD7E8D8E3EF5150A8211A
+      8E211A8E5250A8DBE5EFD2DAE8CCD2E3C8CDDFC7CBDEC9CEDFCDD2E1D1D7E4D8
+      DEE9DFE7EF6B6AB4211A8E211A8E211A8E211A8E211A8E4743A1CED3E1E3E7E7
+      DDE0E0DBDCDCDADADAD9D9D9D9D9D9DADADADBDBDBDCDCDCDCDCDCDCDCDCDDDD
+      DDDDDDDDDEDFDFDFDFDFE1E2E2E3E5E5E6E9E9EAEEEEE1E5ED6F6DB6211A8E21
+      1A8E211A8E211A8E211A8E2E2895C8CAE0E9ECECE7E9E9E8E9E9EAECECEEF2F2
+      5552A9211A8E211A8E211A8EEFF3F3EAEDEDE7E8E8E4E5E5E3E3E3E3E3E3E3E3
+      E3E5E5E5E8E9E9ECEFEFF1F5F5211A8E211A8E211A8E211A8EEFF3F3ECEFEFEB
+      EEEEEDF0F0F0F4F4211A8E211A8E211A8E4944A24944A2211A8E211A8E211A8E
+      4944A2E6E9F0EFF2F2ECEEEEE9EAEAE7E8E8E7E7E7E6E6E6E6E6E6E6E6E6E7E7
+      E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECEC
+      ECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F797979797979797979797
+      9797979797969696979797969696969696969696959595959595999A9AA2A7A7
+      B1BABAC3D3D31F19911F19911F19914B4CA6CEE3E3CEE3E3CCE0E0C3D6DE3531
+      9B1F19911F19911F199197A4C9C0D0D0AFB9B999ABD28AA2E9859DE889A0E498
+      ACDCADC0DC99A7D01F19911F19911F19919CA6CCA8B4D29DA7CC787DB96163AD
+      4B4AA335329A1F19911F19911F19911F19911F19911F19911F19911F1991959C
+      BAB3BDBDB2BCBCBAC6C69CA8C61F19911F19911F19919EAAC8B5C2C2A3AAAA97
+      9A9A939595999E9EA7B1B1BACBCB4A4BA51F19911F19911F1991BCCFCFA7B2B2
+      969C9C8B8E8E849DEB91ACEEA4C0F294AADD1F19911F19911F19916E7BC4AAC8
+      F49FBBF19FBBF1ABC8F45C63B81F19911F19911F19918396D1A9C7F495B0EF85
+      9FEC7B94EA7790E9778FE9768FE9768EE9768EE9768EEA768EEA768FE9768EE9
+      768EE9778FEA778FE97790E97C95EA849EEC95B0EFAAC7F48495D11F19911F19
+      911F19915257B2ABC6F39CB6F099B3EFA1BDF1B5D2F51F19911F19911F199155
+      57ABBFD1D1ABB6B69DA2A29395958F90908F8F8F9090909292929798989FA3A3
+      ACB4B4BECCCC98A3C91F19911F19911F1991767BB7BFCBCBB8C2C2BCC6C6C6D3
+      D34C4CA61F19911F19914D4CA6C9D6D6C1CBCBC1CACAC8D4D45859AB1F19911F
+      1991423FA2C2CFDEABB5D3878DC17A7DB95757A94C4BA42A26951F19911F1991
+      1F19911F19911F19911F19911F19912A2695D0DBDBD1DCDCD7E3E32B26961F19
+      911F19914340A2D8E4E4CBD5E1C0CAE8B8C2E3B5BDE1B5BDE0B6BEE0B7BEE0B9
+      C0DFB9C0DFBAC1DFBBC2DFBEC5E1C5CDE5CED7E9D9E3F0504FAA1F19911F1991
+      504FAADBE5F0D2DAE8CCD3E3C9CDE0C8CDDFCCD1E1D0D4E4D6DBE8DEE5EE6A69
+      B61F19911F19911F19911F19912C27968585C1E5EBEBE1E6E6DEE1E1DCDDDDDA
+      DBDBDADADAD9D9D9DADADADADADADBDBDBDCDCDCDCDCDCDCDCDCDDDDDDDDDDDD
+      E0E0E0E2E3E3E4E5E5E7E9E9EBEEEEBBBDDB2C26971F19911F19911F19911F19
+      911F19912C2797C8CAE0EBEEEEE8EAEAE6E7E7E7E8E8EAECECEEF2F25451AB1F
+      19911F19911F1991EFF3F3EAEDEDE7E8E8E4E5E5E3E3E3E3E3E3E4E4E4E6E6E6
+      E8EAEAECEFEFF1F5F55451AB1F19911F19911F1991F0F4F4ECEFEFECEEEEEDF0
+      F0F0F4F41F19911F19911F19911F19911F19911F19911F19912C2797CCCFE5F2
+      F6F6EEF0F0EAECECE8E9E9E7E7E7E7E7E7E7E7E7E7E7E7E7E7E7E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEAEAEAEAEAEAEBEBEB
+      EBEBEBEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F79898989898989797979797979797
+      979898989797979797979797979696969696969696969A9B9BA3A8A8B1BABAC3
+      D3D31E17931E17931E179334319D767DBB767DBB767DBB5557AC1E17931E1793
+      1E1793767DBBCEE3E3BECDCDA8BAD493ACEC8AA2EA859EE989A1EA92ABECA2BD
+      F0A3BCE91E17931E17931E17937D8BCCCBE6F5C5DFF2BBD4EEBCCFE0C5D0D0C6
+      D2D2C8D6D6B8C4D4A7B3D2858CC24C4BA81E17931E17931E1793A2ABC2B6C0C0
+      B3BEBEBAC7C79DA9C81E17931E17931E1793757BB9B9C7C7A7AFAF9A9E9E9699
+      999CA1A1A9B3B3BDCECE494AA71E17931E17931E1793C0D3D3AAB6B6989F9F8C
+      94A287A0EC93AFEFA7C4F396ABDF1E17931E17931E17936D79C5ABC8F4A0BCF2
+      A2BFF3AFCDF53D3DA61E17931E17931E1793A7C2EBA4C0F390ABEF819BEC7993
+      EA7790EA778FEA778FEA768FEA778FEA778FEA768FEA778FEA768FEA768FEA78
+      90EA7890EA7890EA7A92EA839CEC90AAEFA3C0F3B1CDF11E17931E17931E1793
+      3331A0AECBF5A0BBF19CB6F0A4BFF1B6D3F61E17931E17931E1793292498C7DA
+      DAB3C0C0A3ABAB999D9D9495959192929293939696969B9E9EA5ABABB3BEBEC4
+      D4D46D71B71E17931E17931E1793949DC4BEC9C9B8C1C1BCC5C5C6D3D34C4BA8
+      1E17931E17934C4BA8C9D5D5C0CACABFC8C8C6D1D1787CBA1E17931E17931E17
+      93CDDCE4D9EAEAD3E0E0CDD8D8CAD5D5CBD5D5CDD8D8D1DDDDA9B2D0ACB6D57D
+      81BE2A24991E17931E17934D4BA8D2DDDDD1DBDBD5E0E05A5AAF1E17931E1793
+      1E1793C4CFDED1DBDCC4CFE8BCC7E5B7C0E2B6BFE1B9C0E1BAC1E0BAC2E0BBC2
+      E0BCC3E1BDC4E0C0C7E2C7CEE5CFD7EAD9E4F04F4DAC1E17931E1793504EACDC
+      E6F0D3DBE9CDD4E4CACEE0CACEE1CED2E2D3D8E6DAE1EBB2B6DA1E17931E1793
+      1E17931E1793514EABD0D6E6E5EBEBE2E5E5DEE0E0DCDEDEDBDCDCD9DADADADA
+      DADADADADBDBDBDBDBDBDCDCDCDDDDDDDDDDDDDDDDDDDEDEDEDFE0E0E1E1E1E3
+      E4E4E6E9E9EBEEEEA0A1CF1E17931E17931E17931E17931E17931E1793615DB2
+      E2E5EDECEFEFE9EBEBE6E8E8E6E7E7E7E8E8EAECECEEF2F2534FAC1E17931E17
+      931E1793F0F4F4EBEEEEE8E9E9E5E6E6E4E4E4E4E4E4E5E5E5E7E7E7E9EBEBED
+      F0F0F1F6F61E17931E17931E17931E1793F0F3F3EDF0F0ECEEEEEEF0F0F1F5F5
+      1E17931E17931E17933933A02B25991E17931E17932B2599E7EBF3F2F6F6EEF1
+      F1EBECECE9E9E9E8E8E8E7E7E7E8E8E8E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E8
+      E8E8E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBECECECECECECECECECEBEBEBEBEBEBEBEBEBECECECECECECECECECECECEC
+      ECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7989898989898999999989898989898989898
+      9898989797979797979797979696969696969B9C9CA3A8A8B1BBBBC3D3D31C16
+      951C16951C16951C16951C16951C16951C16951C16951C16951C16951C169580
+      89C1C3D6DEBED3DFA7C2F198B2ED8DA6EB889FE989A0E990A9EB9EB8EFB1CDF4
+      3130A21C16951C1695474AAEC8E5F9BCD9F7B0CCF4A8C3F2B8C6D2C0C9C9C4CE
+      CECBD8D8D4E5E5D5E7E75658AF1C16951C169527239AC1CECEB7C1C1B4BEBEBB
+      C8C89EAAC91C16951C16951C1695757CBCC0D0D0AEB8B8A1A7A79CA1A1A2A9A9
+      B0BCBCC2D5D53D3CA31C16951C16951C1695BACED6AFBEBE9EA7A7939DAF8EA9
+      EE9BB6F1AECBF58FA2DA1C16951C16951C16957583CDA9C6F4A0BDF2A4C1F3B2
+      D0F61C16951C16951C16951C1695B7D5F79FBBF28DA8EE8099EC7992EB7891EB
+      7891EB7891EA7890EB7790EB7790EB7790EB7790EA7790EA7890EA7890EB7991
+      EB7891EB7A92EA809AEC8DA7EEA0BBF2B7D5F727239B1C16951C16951C1695B3
+      CFF6A3BEF29EB9F1A5C0F2B7D4F61C16951C16951C16951C16958A96C6BECECE
+      AFB9B9A3A9A99CA0A0999B9B9A9C9C9DA0A0A5AAAAB0B8B8BECBCBC2D2DA2723
+      9A1C16951C16951C1695B2BDCDBBC5C5B7BFBFBCC5C5C6D3D34A4AA91C16951C
+      16954B4AAAC9D5D5BFC8C8BDC5C5C3CDCDACB7CF1C16951C16951C1695929ACA
+      D7E7E7D0DCDCC9D2D2C6CECEC4CDCDC8D0D0CDD7D7D5E1E1DCEBEBD0DEE61C16
+      951C16951C16956F71B9D1DBDBCED7D7D2DCDC878BC21C16951C16951C169572
+      74BCD8E3E3CDD6DDC2CEE9BDC7E6BDC5E5BDC5E4BDC6E3BEC7E3BFC7E3C0C8E3
+      C1C7E3C3CAE4C9D1E7D1DAEBDAE6F14E4DAE1C16951C16954E4DAEDFE8F1D6DE
+      EBD0D6E6CED2E4CDD2E3D1D5E5D6DCE9DEE5EE6868B91C16951C16951C16956A
+      6ABAEAF3F5E5EBEBE2E6E6DFE2E2DEDFDFDCDDDDDBDCDCDADBDBDBDBDBDADADA
+      DBDBDBDCDCDCDCDCDCDEDEDEDEDEDEDEDEDEDFDFDFE1E1E1E2E3E3E6E7E7E9EC
+      ECB9BBDB1C16951C16951C16951C16951C16953732A1BCBEDDEEF2F2ECEEEEE9
+      EBEBE7E8E8E6E6E6E6E6E6E7E8E8EAEDEDEFF3F3524FAE1C16951C16951C1695
+      F0F4F4ECEEEEE8EAEAE6E7E7E5E5E5E5E5E5E6E6E6E7E8E8EAECECEEF1F1D8DB
+      EB1C16951C16951C16953732A2F0F3F3EDEFEFECEEEEEEF0F0F1F5F51C16951C
+      16951C1695524FAEB0B2DA1C16951C16951C16954541A8E6E9F1EFF2F2ECEEEE
+      EAEAEAE9E9E9E8E9E9E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBECECECECECECECECECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F799999999999999999999999999999999999998989898
+      98989797979797979797979696969B9C9CA4A9A9B1BBBBC3D3D31B15971B1597
+      1B15971B15971B15971B15971B15971B15971B15971B15971B15971B15972622
+      9C8EA0DAB2CDF4A2BCF095ADED8CA4EB89A2EB8EA7EC9AB4EFABC6F26C78C71B
+      15971B15971B15979DB2E1BDDAF7B0CCF4A6C1F2A8BEE5BDC5C5C2CCCCCAD7D7
+      D4E4E4BFCEDE1B15971B15971B15975F61B2C0CCCCB7C0C0B5BFBFBDCACAA0AC
+      CC1B15971B15971B15973D3CA5C8DBDBB8C5C5ACB5B5A8B0B0ADB8B8B9C8C8C0
+      D3DB1B15971B15971B15971B159792A1CAB9CACAA8B5B59EADC09CB6F1A7C3F3
+      B9D6F76670C21B15971B15971B159790A5DFA7C3F4A0BCF3A4C1F3B4D2F71B15
+      971B15971B15974549B0B4D3F79DB9F28BA6EF7F99EC7992EB7991EB7991EB78
+      91EB7891EB7891EB7891EB7890EB7891EB7890EB7991EB7992EB7991EB7991EB
+      7A92EB8099EC8CA6EF9EB9F2B4D2F74549B01B15971B15971B1597B5D1F6A4BF
+      F2A0BAF1A6C1F3B7D4F61B15971B15971B15971B159726229CBFD1DABCCACAB0
+      BABAA8AFAFA5ABABA6ACACA9B0B0B1BABABDC9C9CADBDB5457B01B15971B1597
+      1B15974948AAC2CECEB8C0C0B6BDBDBDC6C6C8D6D64A4AAB1B15971B15974A4A
+      ABC9D5D5BFC7C7BBC2C2BFC7C7CAD5D5332FA11B15971B15973330A1D8E8E8D0
+      DCDCC8D2D2C4CCCCC2CACAC6CECECCD5D5D4E0E0DCEBEB7C80C21B15971B1597
+      1B1597B3BBD4CED6D6CBD2D2CDD5D5CAD3DB27239C1B15971B15971B1597AEB6
+      D7D7E1E1CED8E7C7D2EBC5CFEAC4CEE9C4CEE8C5CEE8C6CFE8C6CFE7C6CEE7C8
+      D0E8CDD6E9D5DFEEDEEAF34E4CAF1B15971B15974E4CAFE2EDF4DAE4EFD5DCEA
+      D1D7E6D1D6E5D3D8E7D8DEEAE0E7F04E4CAF1B15971B15971B1597DEE6F1E9F1
+      F1E4EAEAE2E6E6E0E2E2DFE1E1DFE0E0DCDDDDDCDDDDDBDBDBDBDCDCDCDCDCDD
+      DDDDDEDEDEDEDEDEDFDFDFE0E0E0E0E0E0E2E2E2E4E5E5E7E9E9EBEFEF514DAF
+      1B15971B15971B15971B15976C6ABCE4E8F0EEF1F1EBEDEDE9EAEAE7E8E8E6E6
+      E6E5E5E5E5E6E6E7E8E8EBEDEDEFF3F3514EAF1B15971B15971B1597F0F4F4EC
+      EEEEE8EAEAE6E7E7E5E5E5E7E7E7E8E8E8EAEBEBEDEFEFF1F4F49595CE1B1597
+      1B15971B15975F5CB5EFF2F2EDEFEFECEEEEEEF0F0F2F5F51B15971B15971B15
+      97514EB0F4F9F9A2A3D41B15971B15971B15975F5DB6F1F5F5EEF1F1ECEDEDEA
+      EBEBE9E9E9E8E8E8E8E8E8E8E8E8E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9E9
+      E9E9E9E9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEA
+      EAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F79B9B9B9A9A9A9A9A9A9A9A9A9A9A9A9999999999999999999898
+      989898989898989797979C9D9DA3A8A8B1BBBBC3D3D319149A19149A19149A30
+      2EA2747BBE747BBE747BBE747BBE5255B019149A19149A19149A19149A19149A
+      8090D4AEC9F39FB9F093ABED8CA5EC8DA6EC96AFEEA4BEF1ABC4EF24219F1914
+      9A19149A2F2EA6B8D3F3B7D3F6AECAF3A9C4F3BCCAD5C6D1D1CDDBDBCADAE23D
+      3CA919149A19149A19149AB3BFCFBBC6C6B4BDBDB5BEBEBFCDCDA2AED019149A
+      19149A19149A19149AA1B0D1C3D5D5BAC8C8B7C4C4BBCACAC6D9D97D88C21914
+      9A19149A19149A19149A3A3BA7C2D7D7B6C7C7ADC3D9ADC9F5B6D4F7BAD7F42F
+      2EA619149A19149A19149AA9C4F0A3BFF39DB9F2A3C0F3B4D2F719149A19149A
+      19149A4448B2B4D3F79DB9F28CA6EF809AED7A92EC7A92EC7992EC7992EC7992
+      EC7991EC7991EC7891EC7991EB7991EB7991EB7A92EC7A92EC7B92EB7B92EB81
+      99EC8CA6EE9DB9F2B5D2F74448B219149A19149A19149AB5D2F6A5C0F3A0BAF1
+      A7C2F3B8D4F719149A19149A19149A19149A19149A3B3BA8BECED7BFCECEB8C4
+      C4B6C1C1B7C1C1BAC6C6C2CFCFCBDCDC5F63B719149A19149A19149A19149A9D
+      A8C9BDC7C7B6BDBDB6BDBDBFC8C8CCD9D94949AE19149A19149A4949AECAD6D6
+      BFC6C6B9BFBFBBC1C1C4CDCD8B91C319149A19149A19149A6265B8D4E2E2CED9
+      D9C9D2D2C8D0D0CAD3D3CFDADAD7E4E4B8C3DD19149A19149A19149A4A49ADD1
+      DADAC9CFCFC5CBCBC8CECED0D8D8797DBF19149A19149A19149A25229FAEB6D8
+      DAE4E6D3DFEDCFDBEFCEDAEECFDAEECED9EDCFDAEDC3CCE7C2CAE6CFD8EBD3DD
+      EDDAE5F1E3EFF74C4BB219149A19149A4C4CB2E7F2F8E0EBF3DBE3EFD7DEEBD6
+      DCEAD7DDEADBE1ECE1E9F14D4CB119149A19149A19149AECF5F5EBF2F2E7ECEC
+      E4E8E8E2E6E6E2E5E5BBBCD5DFE1E1DEDFDFDEDEDEDDDDDDDDDDDDDEDEDEDFDF
+      DFDFDFDFDFDFDFE0E0E0E0E0E0E2E3E3E5E6E6E9EBEBD3D6E719149A19149A19
+      149A19149A7978C3F1F6F6EEF1F1EAEDEDE9EAEAE7E8E8E7E7E7E6E6E6E6E6E6
+      E6E7E7E8E9E9EBEDEDEFF3F3504DB219149A19149A19149AF1F5F5EDF0F0EAEB
+      EBE8E9E9E7E8E8E8E8E8E9EAEAECEEEEEFF2F2E5E9F12722A019149A19149A19
+      149AA0A1D3EEF1F1ECEEEEECEEEEEEF0F0F2F5F519149A19149A19149A504DB2
+      F5F9F9F5F9F96C6ABD19149A19149A19149A6B6ABDF1F4F4EFF1F1ECEEEEEBEB
+      EBEAEAEAE9E9E9E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAE9E9E9EA
+      EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEAEAEAEBEBEBEAEAEA
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F79C9C9C9B9B9B9A9A9A9A9A9A9A9A9A9A9A9A9A9A9A999999999999999999
+      9898989797979C9D9DA4A9A9B1BBBBC3D3D318139C18139C18139C4647AECEE3
+      E3C9DCDCC1D2D2BFCFCFC1D3D3B4C5D65155B418139C18139C18139C18139C92
+      A5E0A8C3F299B3EF90A9EC8DA5EC91A9ED9CB5EFABC6F3879ADA18139C18139C
+      18139C2E2DA898ACE2BAD7F7B5D2F6BBD3EECEDBDBBBC9DA3C3AAA18139C1813
+      9C18139C676CB9C1CCCCB7BFBFB2B9B9B6BFBFC1CECEA3B0D218139C18139C18
+      139C18139C231FA1A0AED1C6D9D9C5D7D7C9DDDD9FAFD1231FA018139C18139C
+      18139C2320A018139C5B60B6B6CAD2BCD5E4BEDCF9BAD7F45A61BF18139C1813
+      9C18139C4246B3ABC7F59DB8F29AB4F2A1BDF3B4D1F718139C18139C18139C2E
+      2CA8B6D4F79FBBF38DA7F0829AED7A93EC7A93EC7A93EC7A92EC7A92EC7992EC
+      7A92ED7A92EC7A93EC7A92EC7A92EC7B93EC7B93EC7B93EC7B93EC829BED8EA8
+      F0A0BBF3B7D4F7393AAE18139C18139C18139CB5D2F6A5C0F3A1BBF2A7C2F3B9
+      D5F718139C18139C18139C18139C18139C18139C241FA18891C6BCCBD3C5D4D4
+      C6D5D5CADADA97A1CC3B3AAA18139C18139C18139C18139C686DB9C2CECEB8C0
+      C0B2B8B8B5BCBCC0C9C9CEDCDC4848AF18139C18139C4848AFC9D5D5BDC5C5B7
+      BCBCB7BCBCBEC4C4C9D3D34747AE18139C18139C18139C6163B9CAD6DFD2DDDD
+      D0DBDBD2DDDDD5E2E29199CD2420A118139C18139C18139CB1B9D2CBD2D2C4C9
+      C9C2C5C5C4C8C8CAD0D0D4DDDD3D3BAA18139C18139C18139C18139C6465BBB9
+      C2DDDBE9F3DBE9F5DAE7F4CDD9EE8F96D2302CA7A5ACDAD5DFEFD9E4F1E0ECF5
+      E5F2F84B4BB318139C18139C4C4BB3E7F3F8E6F1F7E1EAF3DDE5F0DBE2EDDBE1
+      EDDDE3EEE1E9F17374C418139C18139C18139CAAAED9EDF4F4EBF1F1E8EEEEE7
+      ECECB2B4D7251FA1E2E4E4E0E1E1DEDFDFDEDEDEDEDEDEDEDEDEDFDFDFE0E0E0
+      E0E0E0E1E1E1E1E1E1E3E4E4E6E7E7EAEDEDB9BCDE18139C18139C18139C2621
+      A2F3F8F8F0F4F4EDEFEFEAECECE8E9E9E7E8E8E7E8E8E8E8E8E6E7E7E7E7E7E8
+      E9E9EBEDEDF0F3F34F4DB318139C18139C18139CF2F6F6EFF1F1ECEEEEEAEBEB
+      EAEBEBEAECECEDEFEFEFF2F2F2F6F66B69BF18139C18139C18139C3430A8F1F4
+      F4EEF0F0ECEDEDECEEEEEEF1F1F2F5F518139C18139C18139C4F4DB3F5F9F9F4
+      F8F8F4F8F84F4DB318139C18139C18139CA1A1D5F1F4F4EEF0F0ECEDEDEBEBEB
+      EAEAEAE9E9E9EAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEAEA
+      EAEAEAEAEAEAEAEBEBEBEAEAEAEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECEB
+      EBEBECECECECECECECECECEBEBEBEBEBEBECECECECECECECECECECECECECECEC
+      ECECECEDEDEDECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEEEEEEEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEEEEEEEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F2F2F2F1F1F1F2F2F2F1F1F1F2F2F2F2F2F2F1F1F1F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F2F2F2F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F4F4F4F4F4F4F4F4F4F3F3F3F4F4F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F4F4F4F4F4F4F5F5F5F4F4F4F4F4F4F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F6F6F6F5F5F5F6F6F6F6F6F6F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F6F6F6F7F7F7F7F7F7
+      F7F7F7F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F79C9C
+      9C9C9C9C9C9C9C9B9B9B9B9B9B9B9B9B9B9B9B9A9A9A9A9A9A99999999999998
+      98989D9E9EA4A9A9B2BBBBC3D3D316129E16129E16129E4447B0CBDFDFBDCCCC
+      B3BEBEAEB8B8B2BDBDBAC9CCC3DEF65A62C116129E16129E16129E2C2BA9B3CE
+      F5A1BBF194ADEE8DA5ED8DA5ED95AEEEA1BBF1AFCAF4555DC016129E16129E16
+      129E16129E3739AF6D79CC6D79CC5254B616129E16129E16129E16129E3939AA
+      C5D1D1B9C2C2B2B8B8B1B6B6ACB3BC979FC37E86C416129E16129E16129E2D2C
+      A716129E16129E3939AB4446AF3939AB16129E16129E16129E16129E2D2CA670
+      79BF16129E16129E211EA24246B44246B5211EA416129E16129E16129E16129E
+      8DA3E1A2BDF396B1F195B0F19FBAF3B1CFF6211FA416129E16129E16129EBBD8
+      F9A4BFF491ABF1839DEF7D96ED7B94ED7B93ED7B93ED7A93ED7A93ED7A93ED7B
+      93ED7B93ED7B94ED7B93ED7C94ED7B93ED7C94ED7E97EC849DEE92ABF0A4BFF4
+      BBD8F816129E16129E16129E16129EB4D0F6A5BFF3A0BAF2A7C2F4B9D5F71612
+      9E16129E16129E4547B05C61B916129E16129E16129E16129E4546B04546B016
+      129E16129E16129E16129E16129E16129E3939ABC5D2D2BAC3C3B3B8B8B2B6B6
+      B6BCBCA1A7C2A0A9CD3B3AAC16129E16129E4647B0C7D2D2BDC3C3B5B9B9B4B8
+      B8B9BDBDC2CACAC2CCD43A3AAB16129E16129E16129E221FA36062BA777CC36C
+      70BF2F2CA816129E16129E16129E16129E8E93C8CED6D6C7CBCBC1C3C3BEC0C0
+      C0C2C2C5C9C9CDD4D4C9D2DB3C3BAC16129E16129E16129E16129E16129E1612
+      9E302DA916129E16129E16129E16129EA9B1DEDAE5F24848B416129E16129E16
+      129E16129E16129E16129E16129E16129E16129E16129E16129EACAFDBDDE4EE
+      E0E7F0B1B6DE16129E16129E16129E16129E7475C48283CA8182C93E3BAE1612
+      9E16129EE4E7E7E1E3E3E0E1E1DFDFDFDEDEDEDFDFDFE0E0E0E1E1E1E1E1E1E2
+      E2E2E2E2E2E4E5E5E7E8E8EAEDEDB9BBDE16129E16129E16129E4E4CB5F4F9F9
+      F1F5F5EEF0F0ECEDEDEAECECEAEBEBEAEBEBE9EAEAE8E9E9E8E9E9EAEBEBECEE
+      EEF1F4F44E4CB516129E16129E16129EF4F9F9F1F5F5EFF1F1EDEFEFEDEFEFEE
+      F1F1F1F4F4F3F7F76A68C016129E16129E16129E16129EA0A0D5EFF2F2ECEEEE
+      ECEDEDEDEEEEEFF1F1F2F6F616129E16129E16129E4E4CB5F4F8F8F2F6F6F2F5
+      F5E5E9F1403DAF16129E16129E16129EAEAFDBF1F4F4EFF1F1EDEEEEEBECECEB
+      EBEBEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEAEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECEBEBEBECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F79D9D9D9C9C9C
+      9C9C9C9C9C9C9B9B9B9B9B9B9B9B9B9B9B9B9A9A9A9A9A9A9999999999999C9D
+      9DA5AAAAB2BBBBC3D3D31510A11510A11510A14345B2C3D5D5B3BEBEA7AEAEA0
+      A6A6A2AAAEA8BFE7B5D0F5BBD5F3201DA61510A11510A11510A19CB2E7A8C2F3
+      98B1F08FA7EE8CA4ED8FA8EE98B1F0A3BDF2B0CBF57280D11510A11510A11510
+      A11510A11510A11510A11510A11510A11510A11510A15B5DB7BCC6CFBCC4C4B4
+      B9B9AEB2B2AEB3B3ACB2BB2B28A61510A11510A11510A11510A196A2CF3838AD
+      1510A11510A11510A11510A11510A11510A11510A11510A1A9BBD6CBE1E13737
+      AC1510A11510A11510A11510A11510A11510A11510A11510A1535BC1A9C5F599
+      B4F290AAF090ABF19BB6F3AECBF64145B71510A11510A11510A195ABE3A9C6F5
+      96B1F288A1EF7F97EE7C94ED7B94ED7B94ED7B94ED7B93ED7B94EE7B94ED7B94
+      ED7C94ED7C94ED7C94ED7C94ED7D95ED8098EE88A1EF97B0F2ABC6F5A0B7E815
+      10A11510A11510A14145B7B1CDF6A3BCF39FB8F2A7C1F4B9D5F71510A11510A1
+      1510A14445B2D2E5E55C60BA1510A11510A11510A11510A11510A11510A11510
+      A11510A11510A11510A1676BBCC6D2D2BDC5C5B5BABAB0B3B3B1B4B4B6BBBB6B
+      6CB41510A11510A11510A11510A12C2AA9C4CDCDBBC0C0B4B7B7B2B4B4B4B7B7
+      BCC1C1C4CCCCC1CCD44545B11510A11510A11510A11510A11510A11510A11510
+      A11510A11510A1211EA58D93C9CFD7D7C8CDCDC2C5C5BEC0C0BCBDBDBEBFBFC1
+      C3C3C8CCCCCED5D5CAD2DB6D6FC01510A11510A11510A11510A11510A11510A1
+      1510A11510A11510A11510A1AAB3DFDDE8F44847B61510A11510A11510A11510
+      A11510A11510A11510A11510A11510A11510A11510A1ACB0DCDCE3EEDEE5EFE2
+      E9EF7172C31510A11510A11510A11510A11510A11510A11510A11510A11510A1
+      E5E8E8E1E3E3E0E1E1E0E0E0E0E0E0E0E0E0E0E0E0E0E0E0E1E1E1E3E3E3E3E3
+      E3E4E5E5E7E8E8EBEDEDC7C8E31510A11510A11510A11510A1E6EAF3F2F6F6F0
+      F3F3EEF1F1EDF0F0EDF0F0EDEFEF9B9AD1EAECECEAEBEBEBECECEDEFEFF1F4F4
+      4D4AB71510A11510A11510A1F5F9F9F4F8F8F2F6F6F1F5F5F1F5F5F2F6F6BCBE
+      E23E3CB21510A11510A11510A11510A16967C1F1F4F4EEF0F0ECEDEDEBECECEC
+      EDEDEFF1F1F2F6F61510A11510A11510A14D4BB7F4F7F7F1F4F4F1F3F3F2F4F4
+      CACCE7231FA61510A11510A1221FA7CACCE7F2F4F4EFF1F1EDEEEEECECECEBEC
+      ECEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEBEB
+      EBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F79E9E9E9E9E9E9D9D9D9D
+      9D9D9D9D9D9C9C9C9C9C9C9B9B9B9B9B9B9A9A9A9999999999999D9E9EA5AAAA
+      B2BBBBC3D3D3130FA3130FA3130FA34244B3BECECEACB6B69EA4A4979A9A94A8
+      DE9DB5F0ACC5F3BDD9F7646EC9130FA3130FA3130FA36A76CDADC8F49CB5F090
+      A8EE8AA3ED8CA4ED91AAEE99B1F0A3BCF2ACC7F4A2BAEB535BC3130FA3130FA3
+      130FA3130FA3130FA3130FA34F50B69EA6CAC5CFCFBDC5C5B5BABAAFB2B2ACAF
+      AFADB1B1B3B9B99297BC130FA3130FA3130FA3130FA39EABD0BFCFD8585CB813
+      0FA3130FA3130FA3130FA3130FA32A29AAA1B0CBBDCECEB9CACAB0BFC8686EB8
+      1E1BA6130FA3130FA3130FA3130FA32929AE6F7DD2AAC6F69CB8F391AAF18BA4
+      F08DA6F097B2F2A9C6F66976CE130FA3130FA3130FA3626DCAB2CFF79DB8F48D
+      A7F1839CEF7E97EE7C95EE7C95EE7C94EE7C95EE7C94EE7C95EE7C95EE7D95EE
+      7D95EE7D95EE7D95EE8098EE849DEE8EA7F09DB8F3B2CEF7626DC9130FA3130F
+      A3130FA3606AC9ADC7F59FB9F39DB7F2A8C1F4B9D5F8130FA3130FA3130FA343
+      45B4D2E6E6D2E4E49FABD04243B2130FA3130FA3130FA3130FA3130FA3130FA3
+      4F51B69EA6CBC4CFCFBEC5C5B6BBBBB1B4B4AEB1B1B1B3B3B6BABABFC6C62A27
+      A9130FA3130FA3130FA3130FA3C0C7C7B9BDBDB3B5B5B1B2B2B1B3B3B6B9B9BD
+      C2C2C4CBCBCCD5D58A8FC73837AF130FA3130FA3130FA3130FA3130FA31F1DA7
+      5D5FBBBBC3D6CED5D5C8CECEC3C6C6BFC1C1BCBDBDBCBDBDBDBDBDBFC0C0C4C6
+      C6C9CDCDCED4D4D5DDDDAAAFD46163BF201DA8130FA3130FA3130FA3130FA313
+      0FA3130FA32D2BAEB5BEE4DBE6F34646B8130FA3130FA3130FA3130FA3130FA3
+      130FA3130FA3130FA3130FA3130FA3130FA3AAAEDBDBE0ECDCE1E6E0E4E4E4E8
+      E8A5A7D52E2BAD130FA3130FA3130FA3130FA3130FA3201DA84846B5E4E7E7E3
+      E5E5E0E1E1E1E1E1E1E1E1E1E1E1E1E1E1E2E2E2E2E2E2E3E3E3E3E3E3E5E5E5
+      E8E9E9EAECECEFF2F22F2CAE130FA3130FA3130FA35A58BEE6EAF4F3F7F7F2F5
+      F5F1F4F4C6C8E44A48B74A47B6ECEDEDEBECECEBECECEDEFEFF1F4F44C4AB913
+      0FA3130FA3130FA38484CE8484CE8484CE8384CE7676C92F2CAE130FA3130FA3
+      130FA3130FA3130FA34B49B8E3E7F0EFF1F1ECEEEEEBEBEBECECECEDEEEEEFF1
+      F1F3F6F6130FA3130FA3130FA34C4AB9F3F6F6F0F2F2EFF1F1F0F1F1F2F4F4BC
+      BDE2130FA3130FA3130FA3211EA8E5E8F1F0F2F2EEEFEFEDEDEDECECECEBEBEB
+      EBEBEBEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECECECECECECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEEEEEEEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F79F9F9F9F9F9F9E9E9E9E9E9E9D9D
+      9D9D9D9D9C9C9C9C9C9C9B9B9B9B9B9B9A9A9A9999999D9E9EA5AAAAB2BBBBC3
+      D3D3120EA5120EA5120EA54143B5BDCCCCA9B2B29CA0A091A0CC8EA7EE97B0F0
+      A5BEF3B8D3F791A3DF120EA5120EA5120EA56B77CFB1CBF59EB8F292AAEF8BA3
+      EE8AA2ED8DA4EE90A9EF97B0F09EB8F2A6C1F3ADC8F5B3CEF68DA1E28EA2E28E
+      A2E28DA0E2ADC3EBC6D0D0C1C9C9BBC2C2B5B9B9AFB2B2ABADADAAABABABAEAE
+      AFB3B3B5BCBCBBC3C3BEC8C8C0CBCBBFCBCBBDC9C9BCC8C8BBC8C8B2BFC9949E
+      C3949FC5949FC59CA7C4B6C4C4B1BDBDABB6B6A9B3B3AAB5B5ADB9B9B2C0C08A
+      9FE28CA1E28CA1E395ABE7ADC9F6A5C1F59BB5F392ABF18AA3F0879FEF89A3F0
+      93ADF2A4BFF59AB1E8120EA5120EA5120EA51C1BAAB0CCF4A7C3F695B0F388A2
+      F0829AF07E96EE7D96EF7C95EE7D95EF7D95EF7D95EE7D95EE7D96EE7D95EE7E
+      96EE7F98EE829AEF89A2F095AFF2A7C3F5BCD9F91C1BAA120EA5120EA5120EA5
+      9CB2E9A6C1F59CB5F39CB5F2A6C0F4B9D5F7120EA5120EA5120EA54244B5D2E4
+      E4C8D7D7C4D0D0C3CFCFBAC5CE9CA4C99DA5CB9DA6CC9DA6CCC9D5D5C6D0D0C1
+      C9C9BBC2C2B5B9B9B2B4B4AEB0B0AEAFAFB1B3B3B4B7B7BBC0C0C2CACAC7D0D0
+      C9D3D3C8D1D1C3CBCBBCC2C2B7BABAB2B4B4B0B1B1B0B1B1B3B5B5B8BBBBBCC1
+      C1C2C8C8C8D0D0CCD5D5B8C0D3A2A8CEA3A9CFA3AACFAEB5D1D0D9D9CED5D5CB
+      D1D1C6CBCBC2C5C5BFC1C1BEBEBEBCBCBCBBBBBBBDBDBDBEBEBEC1C2C2C4C6C6
+      C9CCCCCED3D3D4DBDBDBE4E4E3EEEEBCC5E24747B8120EA5120EA5120EA5888D
+      CFDEE8EDD8E1EED6E0F0DAE5F2E0ECF6E6F2F94747BA120EA5120EA54847BAE9
+      F3F9E9F2F8E4EDF5DFE7F1DDE3EDDBDFE6DADCDDDBDDDDDDDFDFDFE2E2E3E6E6
+      E6EAEAC0C3DFB3B6DBB4B7DCB4B7DCC1C3DFE7EBEBE6E9E9E3E5E5E2E3E3E1E2
+      E2E0E1E1E1E1E1E1E1E1E1E1E1E3E3E3E4E4E4E4E4E4E5E5E5E6E6E6E7E8E8EA
+      EBEBEDF0F0ABACDB120EA5120EA5120EA5120EA51F1DAA4A49BA4A49BA2D2BAF
+      120EA5120EA54A47B8EDEFEFECEDEDECEDEDEDEFEFF0F3F34B49BA120EA5120E
+      A5120EA5120EA5120EA5120EA5120EA5120EA5120EA5120EA5120EA5120EA512
+      0EA57575C9F2F5F5F0F2F2EEEFEFECEDEDEBEBEBEBEBEBEDEDEDEFF0F0F2F4F4
+      120EA5120EA5120EA52E2BAFF2F5F5F0F1F1EEF0F0EEF0F0F0F1F1F2F5F59FA0
+      D9120EA5120EA5120EA53C3AB4E4E6EFF0F1F1EDEEEEEDEDEDECECECECECECEC
+      ECECECECECECECECECECECECECECECECECECECECECECECECECECECECECEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEFEFEFEFEFEFEFEFEFEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F79F9F9F9F9F9F9F9F9F9E9E9E9E9E9E9D9D9D
+      9D9D9D9C9C9C9B9B9B9B9B9B9A9A9A9999999D9E9EA5AAAAB2BBBBC2D2D2100D
+      A8100DA8100DA84043B7BDCCCCA9B2B29AAAD18FA8EE8FA7EE97AFF0A5BEF2B6
+      D1F69CB0E5100DA8100DA8100DA83E43BDB2CCF5A1B9F293ABEF8BA3ED89A1ED
+      8BA3EE8DA4EF90A8EF95ADF09AB3F19FB9F2A4BDF3A7C1F4A8C2F4A8C2F4A7C1
+      F3A4BDF3B1BED3B8BCBCB4B7B7AFB1B1ADAEAEAAABABAAAAAAAAACACACAFAFAF
+      B3B3B2B7B7B3BABAB3BABAB3BABAB0B7B7AFB6B6AFB7B7AFB8B8B1BABAB1BBBB
+      AFB9B9ACB5B5A6AFAFA2A9A99FA5A59CA2A29DA4A49FA7A7A3ABABA1BDF4A4BF
+      F5A4BFF5A1BCF49CB6F496B0F390A9F28AA3F1859EF0839DF0869FF08FA9F29E
+      B9F4B1CEF73235B7100DA8100DA8100DA86B79D1B3D0F8A1BCF591ABF287A1F1
+      829BF08098EF7E96EF7D96EF7E96EF7E96EF7E96EF7E96EF7E96EF8098EF849C
+      F088A0F091ABF1A0BBF4B3D0F86B79D1100DA8100DA8100DA82728B2B4D0F7A1
+      BAF399B1F29AB3F2A7C0F4BAD5F8100DA8100DA8100DA84144B8CDDCDCC1CCCC
+      BCC5C5BAC1C1BBC2C2BEC6C6C1C9C9C1C9C9C1C9C9BEC5C5BBC1C1B8BDBDB4B8
+      B8B2B4B4AFB0B0AEAEAEAFAFAFB0B2B2B5B7B7BABEBEBFC5C5C3CBCBC5CDCDC4
+      CCCCC1C7C7BBC0C0B6B9B9B3B4B4B0B1B1B1B1B1B2B2B2B4B5B5B8BABABBBFBF
+      BFC4C4C3C8C8C6CDCDC9D0D0C9D1D1CAD1D1C9CFCFC8CDCDC5CACAC3C6C6C0C2
+      C2BFC1C1BCBDBDBCBCBCBBBBBBBCBCBCBEBEBEBEBFBFBFC0C0C2C3C3C5C6C6C7
+      CACACDD2D2D5DCDCDEE7E7CAD4E7100DA8100DA8100DA87A7FCCE2EBEBDBE1E1
+      D6DADAD4D9DBD8DEE6DEE7EFE6F1F74647BC100DA8100DA84647BCE9F3F8E4EC
+      F3DFE6EBDDE1E4DBDEDEDADCDCD9DADAD9DADADADCDCDDDEDEDFE1E1E2E4E4E3
+      E6E6E4E7E7E5E8E8E6E9E9E6E9E9E5E7E7E4E6E6E2E3E3E2E3E3E2E2E2E1E1E1
+      E2E2E2E2E2E2E2E2E2E4E4E4E4E4E4E5E5E5E6E6E6E6E6E6E7E8E8E9EAEAECEE
+      EEEFF2F29D9ED8100DA8100DA8100DA8100DA8100DA8100DA8100DA8100DA810
+      0DA84847BBEEF0F0ECEEEEECEDEDEDEFEFEFF2F24947BC100DA8100DA8100DA8
+      100DA8100DA8100DA8100DA8100DA8100DA8100DA8100DA85857C0C8CAE7F1F4
+      F4EFF1F1EEEFEFECEDEDEBEBEBEAEBEBECECECEDEEEEEFF0F0F1F4F4100DA810
+      0DA8100DA8100DA8F1F3F3EFF0F0EDEEEEEEEFEFEFF0F0F1F2F2F3F5F55857C0
+      100DA8100DA8100DA84947BBF0F1F1EEEFEFEDEDEDECECECECECECECECECECEC
+      ECECECECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEEEEEEEFEFEFEEEEEEEFEFEFEEEE
+      EEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F0F0F0F1F1F1F1F1F1F0F0F0F0F0F0F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7A0A0A0A0A0A09F9F9F9F9F9F9F9F9F9E9E9E9E9E9E9D
+      9D9D9C9C9C9B9B9B9B9B9B9A9A9A9D9E9EA5AAAAB2BBBBC3D3D30F0CAA0F0CAA
+      0F0CAA3F42B8BCCBCBA8B8CE99B2F191A9EF92A9EF9AB3F1A8C2F4BBD6F78495
+      DD0F0CAA0F0CAA0F0CAA6A77D2B2CCF69FB9F293ACF08CA5EE8AA1EE89A1EE8A
+      A2EE8CA4EF8EA6EF91A8EF94ACF096AFF198B2F19AB3F19AB3F199B1F196AFF1
+      97ADE9B1B3B3AFB0B0ADAEAEABABABAAAAAAAAAAAAAAABABABACACACAEAEACAE
+      AEACAFAFABAEAEA9ADADA7ABABA6A9A9A4A8A8A5A9A9A4A9A9A4A9A9A2A7A7A0
+      A4A49CA0A0989B9B959898949696949696959999959FB193ADF294AEF294AEF2
+      92ABF28FA9F18CA5F188A1F0859EF0839BEF829AEF859DF08CA5F197B2F3A9C4
+      F67B8CDB0F0CAA0F0CAA0F0CAA1A19AF9EB6EBAECAF79EB9F591AAF388A1F184
+      9CF18099F07F98F07E97EF7E97EF7F97EF8098EF8199EF839CF089A2F191ABF2
+      9EB8F4AFCAF7AAC3F01A19AF0F0CAA0F0CAA0F0CAA7D8DDBACC7F69BB3F394AD
+      F299B1F2A7C0F4BAD5F80F0CAA0F0CAA0F0CAA4043BBCAD7D7BEC6C6B6BCBCB3
+      B7B7B2B5B5B5BABAB8BCBCB8BCBCB8BCBCB7BABAB5B8B8B3B5B5B2B3B3B1B2B2
+      B0B0B0AEAFAFB0B0B0B1B2B2B4B6B6BABDBDBFC4C4C4CACAC5CCCCC5CCCCC2C8
+      C8BCC0C0B7BABAB3B5B5B1B1B1B0B0B0B1B2B2B3B4B4B5B6B6B7B8B8B9BBBBBC
+      BFBFBEC1C1C0C4C4C1C5C5C2C5C5C1C4C4C1C4C4BFC2C2BEC0C0BEBEBEBCBDBD
+      BCBCBCBCBCBCBEBEBEBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1C3C3C3C5C7C7CACC
+      CCD1D6D6DAE2E2A1A7D90F0CAA0F0CAA0F0CAAD9E3ECDEE6E6D7DCDCD2D5D5D2
+      D5D5D6D9D9DDE3E3E5EDED4646BC0F0CAA0F0CAA4646BCE7EEEEE1E6E6DCDFDF
+      DADCDCD9DADAD9D9D9D8D8D8D8D9D9D9DADADBDCDCDDDEDEDFE0E0E0E1E1E0E2
+      E2E1E3E3E2E4E4E2E4E4E3E4E4E2E3E3E1E1E1E2E2E2E1E1E1E3E3E3E3E3E3E3
+      E3E3E3E3E3E4E4E4E5E5E5E5E5E5E6E6E6E6E6E6E7E7E7EAEAEAEBECECEDEFEF
+      F0F2F2C7C9E76564C60F0CAA0F0CAA0F0CAA0F0CAA0F0CAA1D1BAF4846BC9B9B
+      D7EDEFEFECEDEDECECECECEDEDEFF0F06463C54847BC4947BD4947BD4948BD49
+      47BD4947BD4947BD4947BD6665C79E9FDAD6D9ECF2F5F5F1F3F3EFF1F1EEEFEF
+      EDEDEDECECECEBECECEBEBEBECECECECEDEDEEEFEFF0F2F24846BC4846BC4846
+      BC4846BCF0F2F2EFF0F0EEEEEEEDEEEEEEEEEEEFF0F0F1F2F2E4E5EF5755C148
+      47BC4847BC4846BC9B9BD7EFF0F0EEEEEEEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEE
+      EEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7A2A2A2A1A1A1A0A0A0A0A0A09F9F9F9F9F9F9E9E9E9D9D9D9D9D
+      9D9C9C9C9B9B9B9A9A9A9D9F9FA5AAAAB2BBBBC3D3D30D0AAC0D0AAC0D0AAC3D
+      40BABED3DEACC5F59EB7F298B1F19AB2F1A4BCF3B1CCF6C3DEF9555ECA0D0AAC
+      0D0AAC0D0AAC7381D7AFC9F69EB8F393ABF18DA4EF8AA2EF8AA2EF8AA2EF8AA2
+      EF8BA2EF8BA4EF8CA5F08EA6F08FA7F090A7F090A7F08EA7F08DA6F08CA4F0A1
+      AAC8AEAEAEADAEAEACACACABABABABABABAAABABAAAAAAAAAAAAA8A9A9A8A9A9
+      A6A7A7A5A6A6A3A4A4A1A2A29FA0A09D9F9F9C9E9E9C9E9E9A9C9C989A9A9697
+      979393939192929090908F90908F91918D95A989A2F189A2F189A2F189A1F188
+      A0F1859FF1849CF0839BF0829AF0829AF0839CF088A2F192ACF3A0BBF5B2CFF8
+      3B40C00D0AAC0D0AAC0D0AAC3033BBB3CEF5ADC9F79FBAF593AEF38CA6F287A1
+      F1859EF1839CF1839CF1849CF1869EF188A1F18DA6F294AFF39FBAF5AEC9F7B3
+      CEF53033BB0D0AAC0D0AAC0D0AAC3033BBB5D0F8A3BCF495ADF291A8F198B0F2
+      A6C0F5BBD6F80D0AAC0D0AAC0D0AAC3E41BECAD6D6BDC4C4B4B8B8AFB1B1AFB0
+      B0B0B2B2B2B3B3B2B4B4B3B4B4B2B3B3B1B2B2B2B2B2B1B1B1B0B1B1B0B0B0B0
+      B0B0B0B0B0B2B2B2B6B8B8BCBFBFC1C6C6C7CFCF9BA1C9A6ACCBC5CDCDBFC4C4
+      BABDBDB5B6B6B2B3B3B2B2B2B2B2B2B3B3B3B3B4B4B5B5B5B7B7B7B8B8B8B9BB
+      BBBABBBBBABBBBBCBDBDBCBDBDBCBDBDBCBDBDBBBCBCBCBCBCBCBCBCBDBDBDBD
+      BDBDBEBEBEBEBEBEC0C0C0C0C0C0C1C1C1C2C2C2C2C2C2C4C5C5C8CACACFD3D3
+      D7DEDE777ACB0D0AAC0D0AAC0D0AACE5EFEFDDE4E4D6DADAD1D4D4D2D4D4D6D9
+      D9DDE2E2E6EEEE4444BE0D0AAC0D0AAC4444BEE4EAEADEE2E2D9DBDBD7D8D8D7
+      D8D8D8D8D8D7D8D8D8D8D8D9DADADBDBDBDCDCDCDDDEDEDEDEDEDFE0E0DFE0E0
+      E0E0E0E1E1E1E1E2E2E1E1E1E1E1E1E1E1E1E3E3E3E3E3E3E4E4E4E4E4E4E5E5
+      E5E5E5E5E6E6E6E6E6E6E7E7E7E7E7E7E7E7E7E9E9E9EAEAEAECEDEDEDEFEFF0
+      F1F1F1F3F3F2F5F5C8C9E7BABBE3BABBE3D5D8ECF1F4F4F0F2F2EFF0F0EDEEEE
+      ECEDEDECECECECEDEDEDEEEEEFF0F0F0F2F2F1F3F3F2F5F5F3F5F5F3F5F5F3F5
+      F5F2F5F5F2F5F5F2F4F4F1F3F3F0F2F2EFF1F1EEEFEFEEEFEFEDEEEEEDEDEDEC
+      ECECECECECECECECECECECEDEDEDEEEEEEEFF0F0F0F2F2F1F2F2F1F2F2F0F2F2
+      EFF0F0EEEEEEEDEDEDEDEDEDEEEEEEEFEFEFF0F1F1F1F2F2F1F3F3F2F3F3F1F3
+      F3F1F2F2EFF0F0EEEFEFEEEEEEEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7A2A2A2A2A2A2A2A2A2A1A1A1A0A0A0A0A0A09F9F9F9E9E9E9E9E9E9D9D9D
+      9B9B9B9A9A9A9D9F9FA6ABABB2BBBBC3D3D30C09AE0C09AE0C09AE3D40BDC3DF
+      F9B3CDF6A8C1F4A3BCF3A6BFF4B0CAF6BED9F8A8BEED0C09AE0C09AE0C09AE0C
+      09AE9CB1EAABC4F59CB4F292AAF08CA4EF8BA3EF8BA3EF8BA2EF8BA3F08BA3F0
+      8BA2F08AA2EF8AA2F08BA3F08BA3F08BA2F08BA2F089A1F089A1F08DA2E7ADAD
+      ADADADADADADADADADADACACACABABABAAAAAAA9A9A9A8A8A8A7A7A7A5A5A5A3
+      A3A3A1A1A19F9F9F9C9C9C9A9A9A999999989898969696959595939393919191
+      9090908F8F8F8E8E8E8D8D8D8992B1859DF0859DF0859DF0849DF0839CF0839B
+      F0839BF0839BF0829BF0829BF0839BF0869EF18DA5F299B3F4A8C3F798AFEB18
+      17B30C09AE0C09AE0C09AE2E32BCB3CFF5B0CDF8A5C0F69BB5F594AEF490AAF3
+      8EA7F28DA7F28EA8F290A9F395AFF39CB6F5A5C0F6B1CDF8B4CFF52F33BC0C09
+      AE0C09AE0C09AE1817B39AB0EBAAC4F69BB4F491A8F28FA6F298AFF3A7C0F5BC
+      D6F80C09AE0C09AE0C09AE3D41C1CAD6D6BDC4C4B5B8B8AFB0B0ADADADAEAFAF
+      AFB0B0B0B1B1B1B2B2B1B1B1B2B2B2B2B2B2B2B2B2B2B2B2B3B3B3B3B3B3B3B3
+      B3B5B5B5B9BABABFC2C2C6CCCC3C3CB80C09AE0C09AE5F62BFC4CACABDC1C1B8
+      BABAB4B5B5B3B3B3B3B3B3B4B4B4B4B4B4B5B5B5B5B5B5B6B6B6B7B7B7B7B8B8
+      B8B9B9B8B9B9BABBBBBABABABBBBBBBBBBBBBCBCBCBDBDBDBEBEBEBEBEBEBFBF
+      BFBFBFBFC1C1C1C1C1C1C2C2C2C3C3C3C3C3C3C5C5C5C9CACACFD2D2D6DCDC90
+      95D30C09AE0C09AE0C09AED8E2ECDFE7E7D9DEDED5D8D8D5D8D8D9DDDDE0E6E6
+      E8F0F00C09AE0C09AE0C09AE4443BFE3E8E8DDE0E0D9DADAD7D7D7D7D7D7D8D8
+      D8D8D8D8D9D9D9DADADADBDBDBDCDCDCDDDDDDDDDDDDDEDEDEDEDEDEDFDFDFE0
+      E0E0E1E1E1E1E1E1E2E2E2E2E2E2E3E3E3E4E4E4E4E4E4E4E4E4E5E5E5E6E6E6
+      E7E7E7E7E7E7E8E8E8E8E8E8E8E8E8E9E9E9EAEAEAEBECECECEDEDEDEEEEEEEF
+      EFEFF1F1F0F1F1F0F2F2F0F2F2F0F1F1F0F1F1EFF0F0EEEFEFEDEDEDECECECEC
+      ECECECECECEDEDEDEEEEEEEEF0F0EFF0F0EFF1F1F0F1F1F0F1F1F0F1F1EFF1F1
+      EFF1F1EFF0F0EFF0F0EFF0F0EEEFEFEDEEEEEDEDEDECEDEDECECECECECECECEC
+      ECECECECECECECEDEDEDEDEDEDEFEFEFEFF0F0EFF0F0F0F1F1EFF0F0EFEFEFEE
+      EEEEEEEEEEEDEDEDEDEDEDEEEEEEEEEFEFEFF0F0EFF0F0F0F1F1F1F1F1EFF0F0
+      EFEFEFEFEFEFEFEFEFEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F3F3
+      F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7A3A3
+      A3A3A3A3A2A2A2A2A2A2A1A1A1A0A0A0A0A0A09F9F9F9E9E9E9D9D9D9C9C9C9A
+      9A9A9D9F9FA6ABABB2BCBCC3D3D30A08B10A08B10A08B13B40C3CDE9FBBFD9F9
+      B6D0F7B3CCF6B6D1F7C0DBF8A7BDED1616B60A08B10A08B10A08B13A3FC3B6D0
+      F7A6BFF498B1F291A9F18DA5F08CA3F08CA3F08CA4F08CA3F08BA3F08BA3F08B
+      A3F08BA3F08BA2F08BA2F08AA2F08AA2F08AA2F08AA2F08AA1F0A0A9C6AEAEAE
+      AEAEAEAEAEAEADADADACACACABABABAAAAAAAAAAAAA8A8A8A6A6A6A4A4A4A2A2
+      A2A0A0A09E9E9E9B9B9B99999998989897979795959594949493939391919190
+      90908F8F8F8E8E8E8995BF859DF1859DF1849DF1849CF1849CF1849CF1849CF1
+      839CF1839BF1839BF1839BF1859DF189A2F291AAF39DB8F5ACC8F77A8BDE0A08
+      B10A08B10A08B10A08B11616B695AAE8B8D4F9AECAF8A6C2F7A1BCF69EB9F59C
+      B7F59EB9F5A1BCF6A6C2F6AFCAF8B7D4F994AAE82224BA0A08B10A08B10A08B1
+      0A08B17B8CDEAEC9F7A0B8F494ACF28DA4F18EA5F197AFF3A8C1F5BCD7F90A08
+      B10A08B10A08B13A40C4C9D7DBBFC5C5B5B8B8B1B1B1AFAFAFB0B0B0B1B1B1B2
+      B2B2B2B2B2B3B3B3B3B3B3B4B4B4B4B4B4B4B4B4B5B5B5B5B5B5B5B5B5B7B8B8
+      BABDBDC1C5C5A5ABCB0A08B10A08B10A08B10A08B1C7CECEBFC3C3B9BBBBB6B6
+      B6B4B4B4B5B5B5B4B4B4B5B5B5B6B6B6B6B6B6B6B6B6B8B8B8B8B8B8B9B9B9BA
+      BABABABABABBBBBBBCBCBCBDBDBDBDBDBDBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1
+      C2C2C2C3C3C3C3C3C3C3C3C3C4C4C4C6C6C6C9CACACED0D0D6DBDBB7BDDD0A08
+      B10A08B10A08B1868BD5E4ECECDFE5E5DCE1E1DCE1E1E0E5E5E6EDED969BDA0A
+      08B10A08B10A08B16C6DCCE2E7E7DCDFDFD9DADAD8D8D8D8D8D8D9D9D9D9D9D9
+      DADADADADADADBDBDBDDDDDDDDDDDDDDDDDDDEDEDEDFDFDFE0E0E0E1E1E1E2E2
+      E2E2E2E2E3E3E3E3E3E3E4E4E4E5E5E5E5E5E5E5E5E5E6E6E6E6E6E6E7E7E7E7
+      E7E7E8E8E8E8E8E8E9E9E9EAEAEAEAEAEAEBECECECECECECEDEDEDEDEDEDEEEE
+      EEEFEFEEEFEFEEEFEFEEEFEFEDEEEEEDEDEDECEDEDECECECECECECEBECECECED
+      EDEDEDEDEDEEEEEEEEEEEEEEEEEEEFEFEEEFEFEEEFEFEEEFEFEEEFEFEEEFEFEE
+      EEEEEDEEEEEDEDEDEDEDEDECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEFEFEEEFEFEEEEEEEEEEEEEDEEEEEDED
+      EDEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFF0F0EFF0F0EFF0F0EFEFEFEFEFEFEF
+      EFEFEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7A5A5A5A4A4A4
+      A3A3A3A2A2A2A2A2A2A1A1A1A0A0A0A0A0A09E9E9E9D9D9D9C9C9C9B9B9B9D9F
+      9FA5AAAAB2BBBBC2D1D10907B30907B30907B33A40C5CEE9FBCBE5FBC4DFF9C2
+      DDF9AEC6F16A78D71415B80907B30907B30907B30907B39CB1ECAEC7F6A0B8F4
+      96AEF290A7F08DA5F18DA5F18DA4F18DA4F18CA4F18CA4F18CA4F18CA4F18CA3
+      F18BA3F18BA3F18BA3F18BA3F18BA2F18BA2F18AA2F18FA3E8AEAEAEAEAEAEAE
+      AEAEAEAEAEAEAEAEADADADACACACABABABA9A9A9A8A8A8A6A6A6A4A4A4A2A2A2
+      9F9F9F9D9D9D9B9B9B9999999898989696969595959393939292929191919090
+      908F8F8F8997C5859DF1859DF1859DF1859DF1859DF2859DF2859DF2849CF184
+      9DF2849CF2849CF2859DF2879FF28BA5F394AEF4A0BAF6AFCAF87A8BDF0907B3
+      0907B30907B30907B30907B3383FC593A9E9BAD7FAB5D1F9B1CEF8B0CDF8B1CD
+      F8B5D1F9B9D6F993A8E8505BCE0907B30907B30907B30907B30907B37B8CDFB1
+      CCF8A3BCF596AFF48FA6F28AA2F28FA6F299B1F4AAC4F6BED9F90907B30907B3
+      0907B33A3FC5C6D6E4BFC6C6B7BABAB3B3B3B0B0B0B2B2B2B3B3B3B4B4B4B4B4
+      B4B5B5B5B5B5B5B5B5B5B6B6B6B6B6B6B6B6B6B6B6B6B6B6B6B8B9B9BCBEBEC2
+      C7C7B2B8CD0907B30907B30907B31514B5C8CFCFC0C4C4BABCBCB7B7B7B5B5B5
+      B6B6B6B6B6B6B6B6B6B6B6B6B7B7B7B7B7B7B8B8B8B9B9B9BABABABABABABBBB
+      BBBDBDBDBDBDBDBEBEBEBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1C2C2C2C2C2C2C3
+      C3C3C4C4C4C4C4C4C5C5C5C7C7C7C9CACACED0D0D4D8D8DCE3E32424BA0907B3
+      0907B31616B7BFC6E6E5EDEDE3EAEAE4EAEAE7EEEEBFC6E71616B70907B30907
+      B30907B3BCC2E2E1E5E5DCDEDED9DADAD7D8D8D9D9D9DADADADADADADBDBDBDC
+      DCDCDCDCDCDEDEDEDEDEDEDEDEDEDFDFDFE0E0E0E1E1E1E1E1E1E2E2E2E2E2E2
+      E3E3E3E4E4E4E5E5E5E6E6E6E6E6E6E6E6E6E7E7E7E7E7E7E8E8E8E9E9E9E9E9
+      E9E9E9E9E9E9E9EAEAEAEAEAEAEBEBEBEBEBEBEBECECEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDECEDEDECECECECECECECECECECECECECECEC
+      ECEDEDECEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEDEEEEEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFF0F0EFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7A6A6A6A5A5A5A4A4A4A3
+      A3A3A2A2A2A2A2A2A1A1A1A0A0A09F9F9F9E9E9E9C9C9C9B9B9B9E9F9FA4A9A9
+      B0B8B8BFCECE0706B50706B50706B51313B9393EC7393EC7393EC72022BE0706
+      B50706B50706B50706B50706B50706B57B8BE0B3CDF7A6BEF59AB3F393ACF28F
+      A7F18EA5F18EA5F18EA5F18DA5F18DA5F18DA5F18DA4F18CA4F18CA4F18CA4F1
+      8CA4F18CA3F18CA4F18BA3F18BA3F18BA3F18BA3F2A1AAC8AEAEAEAFAFAFAFAF
+      AFAEAEAEAEAEAEADADADACACACABABABA9A9A9A7A7A7A6A6A6A3A3A3A0A0A09E
+      9E9E9C9C9C9A9A9A999999979797969696949494939393929292919191909090
+      899AD9869EF2869EF2869EF2869EF2869EF2869EF2859EF2859EF2859DF2859D
+      F2859DF2849DF2859FF288A0F38DA6F396AFF5A2BCF6AFCBF88497E41314B907
+      06B50706B50706B50706B50706B51313B9434BCB6573D86573D86573D8434BCB
+      1F21BE0706B50706B50706B50706B50706B51314B98597E4B1CCF8A3BEF698B1
+      F591A8F28CA3F28BA2F191A8F29CB4F4AEC7F7C2DDFA0706B50706B50706B539
+      3FC7C0D6EFC1C7C7B8BBBBB4B4B4B1B1B1B3B3B3B4B4B4B5B5B5B6B6B6B5B5B5
+      B6B6B6B7B7B7B7B7B7B7B7B7B7B7B7B7B7B7B7B7B7B9B9B9BCBEBEC1C5C5C8CD
+      CD6A6EC50706B51413B78386C8C6CCCCC0C3C3BBBDBDB8B9B9B6B6B6B6B6B6B7
+      B7B7B7B7B7B7B7B7B8B8B8B8B8B8B9B9B9BABABABABABABABABABBBBBBBDBDBD
+      BDBDBDBEBEBEBFBFBFC0C0C0C1C1C1C1C1C1C1C1C1C3C3C3C4C4C4C4C4C4C5C5
+      C5C5C5C5C6C6C6C7C7C7C9CACACDCECED2D5D5D9DEDE9CA2D90706B50706B507
+      06B50706B55C5FCCA3A8DFA3A8E05C5FCC0706B50706B50706B50706B54E4FC8
+      E3E8E8DFE1E1DBDDDDD9D9D9D9D9D9DADADADBDBDBDBDBDBDBDBDBDDDDDDDEDE
+      DEDFDFDFDFDFDFDFDFDFE0E0E0E1E1E1E2E2E2E3E3E3E3E3E3E3E3E3E4E4E4E4
+      E4E4E5E5E5E7E7E7E7E7E7E6E6E6E8E8E8E8E8E8E9E9E9EAEAEAEAEAEAEAEAEA
+      EAEAEAEBEBEBEBEBEBECECECECECECECECECECECECECECECECECECECECECECEC
+      ECECECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEDEDED
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F1F1F1F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7A6A6A6A6A6A6A5A5A5A4A4A4A3A3
+      A3A3A3A3A2A2A2A1A1A1A0A0A09F9F9F9D9D9D9C9C9C9FA0A0A4A7A7ADB4B4BA
+      C7C70605B80605B80605B80605B80605B80605B80605B80605B80605B80605B8
+      0605B80605B81F21C091A5E9B4CEF8A8C1F69DB6F496AFF392A9F290A7F28FA6
+      F28EA6F28EA6F28EA6F28EA5F28EA5F28DA5F28DA5F28DA5F28DA5F28DA4F28C
+      A4F28CA4F28CA4F28CA4F28CA4F28CA4F290A5EAB0B0B0AFAFAFB0B0B0AFAFAF
+      AFAFAFAEAEAEADADADABABABABABABA8A8A8A6A6A6A4A4A4A2A2A29F9F9F9D9D
+      9D9B9B9B9A9A9A989898979797969696949494939393929292919191899CD987
+      9FF2879FF2869EF2869EF2879FF3869EF2869EF3859EF2869EF3869EF3859EF3
+      859DF3859DF3879FF38AA2F48EA8F496B0F5A1BBF7ACC7F8A3BBF2414ACC0605
+      B80605B80605B80605B80605B80605B80605B80605B80605B80605B80605B806
+      05B80605B80605B80605B8363CC8A3BBF1AEC9F8A3BCF698B1F492AAF38DA4F3
+      8AA2F28CA2F294AAF39FB7F5B1CAF8C5DFFB0605B80605B80605B8383EC9BBD3
+      F9B3C3E1AAB6D7A4AFD3A2ACD2ABB0C3ACB1C4ADB2C4B1B4BDB7B7B7B7B7B7B7
+      B7B7B7B7B7B8B8B8B8B8B8B8B8B8B8B8B8B9BABABCBDBDBFC1C1C4C8C8C8CDCD
+      CAD0D0CAD0D0C7CCCCC3C6C6BEC0C0BABBBBB8B8B8B7B7B7B8B8B8B8B8B8B8B8
+      B8B8B8B8B8B8B8BABABABABABABABABABBBBBBBCBCBCBDBDBDBDBDBDBFBFBFBF
+      BFBFBFBFBFC1C1C1C1C1C1C2C2C2C3C3C3C4C4C4C4C4C4C5C5C5C6C6C6C6C6C6
+      C7C7C7C8C8C8C9C9C9CCCDCDD0D2D2D5D9D9DDE3E3595CCB0605B80605B80605
+      B80605B80605B80605B80605B80605B80605B80605B83131C2D8DDE8E1E4E4DE
+      E0E0DBDCDCD9D9D9DADADADADADADBDBDBDCDCDCDCDCDCDEDEDEDFDFDFE0E0E0
+      E0E0E0E1E1E1E1E1E1E2E2E2E3E3E3E4E4E4E4E4E4E4E4E4E5E5E5E6E6E6E7E7
+      E7E7E7E7E7E7E7E7E7E7E8E8E8E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEBEBEBEC
+      ECECEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDED
+      EDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F2F2F2F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7A8A8A8A7A7A7A6A6A6A5A5A5A4A4A4A4A4A4
+      A3A3A3A2A2A2A1A1A19F9F9F9E9E9E9D9D9D9E9F9FA3A5A5AAAFAFB4BEBE0403
+      BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA353BCA7B
+      8BE2BBD5F9B2CBF7A7C1F69FB7F498B1F394ABF391A8F28FA7F28FA7F28FA7F2
+      8FA6F28FA6F28FA6F28FA6F38EA6F28EA6F28EA6F38DA5F28DA5F28DA5F28DA5
+      F28DA4F28DA4F28DA5F38DA4F38DA4F3A2ABC9B0B0B0B0B0B0B0B0B0AFAFAFAF
+      AFAFAEAEAEADADADABABABAAAAAAA8A8A8A6A6A6A3A3A3A0A0A09E9E9E9C9C9C
+      9B9B9B9A9A9A98989897979796969694949494949491949E889FED88A0F388A0
+      F388A0F3879FF2879FF3879FF3879FF3879FF3869FF3869FF3869EF3869EF386
+      9EF3859EF387A0F38AA2F48EA7F495AEF59EB8F6A7C3F8B2CDF98EA3EA4049CE
+      0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403BA0403
+      BA4049CE8EA4EAB3CEF9A9C3F8A0B9F697B0F591A8F48DA4F48BA2F38BA1F28E
+      A5F395ACF4A2BAF5B2CCF8C6E0FB0403BA0403BA0403BA363CCAB8D1F8A8BFF6
+      9BB1F494A9F392A6F293A7F293A7F294A8F295A8F296A9F296A9F197AAF19DAD
+      E6A0AEE3A1AEE3A1AFE3AAB3D4ABB4D5ADB7D7B8BDC8C0C2C2C2C5C5C3C6C6C3
+      C7C7C1C4C4BEC1C1BCBDBDBABABAB8B9B9B9B9B9B8B8B8B9B9B9B9B9B9B9B9B9
+      BABABABABABABBBBBBBBBBBBBCBCBCBDBDBDBEBEBEBEBEBEBFBFBFBFBFBFC0C0
+      C0C2C2C2C3C3C3C3C3C3C3C3C3C4C4C4C5C5C5C7C7C7C7C7C7C8C8C8C8C8C8C9
+      C9C9CACACACCCCCCCFD0D0D3D6D6D9DDDDDEE4E48F93D81212BD0403BA0403BA
+      0403BA0403BA0403BA0403BA0403BA696BD1D7DCE7E2E5E5DEE0E0DCDEDEDBDB
+      DBDADBDBDBDBDBDCDCDCDCDCDCDDDDDDDDDDDDDEDEDEDFDFDFE0E0E0E0E0E0E1
+      E1E1E1E1E1E2E2E2E3E3E3E5E5E5E5E5E5E5E5E5E5E5E5E7E7E7E7E7E7E8E8E8
+      E8E8E8E9E9E9E9E9E9EAEAEAEBEBEBEBEBEBEBEBEBEBEBEBECECECECECECEDED
+      EDEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F1F1F1F1F1F1F2F2F2F2F2F2F1F1F1F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7A9A9A9A7A7A7A6A6A6A6A6A6A5A5A5A4A4A4A3A3A3A2
+      A2A2A1A1A1A0A0A09F9F9F9D9D9D9E9F9FA0A2A2A5A9A9ACB3B38890BE8E97C5
+      919ED193A7EA94A7EA93A6EA92A5EA91A5EA9CB1EEBDD7F9B8D2F9B3CCF8ACC5
+      F7A4BDF69EB6F598B0F495ACF491A9F390A8F390A8F390A7F390A7F390A7F38F
+      A7F38FA7F390A7F38FA6F38FA7F38FA7F38EA6F38EA6F38EA6F38EA5F38EA6F3
+      8EA5F38DA5F38DA5F38DA5F392A6EBB0B0B0B0B0B0B0B0B0B0B0B0AFAFAFAFAF
+      AFAEAEAEACACACABABABA9A9A9A6A6A6A4A4A4A2A2A29F9F9F9D9D9D9C9C9C9A
+      9A9A999999989898949AAE8F9CCA8B9FE189A1F489A1F488A0F388A1F488A0F3
+      88A0F4879FF388A0F488A0F487A0F4879FF4879FF4879FF4879FF4869FF4869E
+      F4869EF487A0F48AA2F48DA6F593ACF599B3F6A1BBF7A9C4F8B1CDF9ADC7F677
+      88E35663D8333ACC333ACC343ACC343ACC333ACC5663D87789E3ADC7F6B2CDF9
+      ABC6F8A4BDF79CB4F695ADF591A8F48CA4F48AA1F38AA1F38BA2F38EA6F497AE
+      F5A4BBF6191BC40302BC0302BC0302BC0302BC3439CCB3CCF8A5BCF59BB0F495
+      A9F393A7F394A7F294A8F295A9F295A9F296AAF297AAF297AAF298ABF299ABF2
+      9AACF29BADF29BADF29DAEF19EB0F1A8B5E4BCBDBDBDBFBFBEC0C0BEC0C0BDBE
+      BEBBBCBCBBBBBBBABABAB8B8B8B9B9B9B9B9B9B9B9B9BABABABABABABBBBBBBB
+      BBBBBCBCBCBDBDBDBDBDBDBEBEBEBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1C2C2C2
+      C3C3C3C3C3C3C4C4C4C5C5C5C7C7C7C7C7C7C7C7C7C9C9C9C9C9C9CACACACBCB
+      CBCDCDCDCECFCFD1D2D2D5D7D7D9DCDCDEE2E2D3D9E49094DA676AD23C3DC93D
+      3EC95A5CD08386D8C9CEE5E3E8E8E1E4E4DEE0E0DDDEDEDBDCDCDBDBDBDADADA
+      DCDCDCDDDDDDDEDEDEDEDEDEDEDEDEDFDFDFE0E0E0E1E1E1E2E2E2E2E2E2E3E3
+      E3E3E3E3E4E4E4E5E5E5E5E5E5E5E5E5E6E6E6E7E7E7E8E8E8E8E8E8E9E9E9E9
+      E9E9E9E9E9EBEBEBECECECECECECECECECECECECEDEDEDEDEDEDEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEEE
+      EEEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7AAAAAAA9A9A9A8A8A8A7A7A7A6A6A6A5A5A5A4A4A4A3A3A3A2A2
+      A2A1A1A19F9F9F9E9E9E9E9F9F9FA0A0A0A3A3A5A9A9AAB0B0ADB6B6B0BABAB2
+      C4DAB5CDF8B3CDF8B3CDF8B2CBF8B0C9F7ADC6F7AAC2F6A4BDF6A0B8F59CB4F5
+      98B0F595ADF493AAF492A9F491A9F491A9F491A9F491A8F490A8F391A8F490A7
+      F390A8F490A8F490A7F490A7F48FA7F48FA7F48FA7F48FA7F48FA6F48EA6F48E
+      A6F48EA6F48EA6F48EA5F4A3ACC9B0B0B0B0B0B0B0B0B0AFAFAFAFAFAFAEAEAE
+      ACACACABABABA9A9A9A7A7A7A5A5A5A3A3A3A0A0A09B9EA8979EB8939FC78EA0
+      DD8AA2F48AA2F48AA2F48AA2F48AA2F489A2F489A1F489A1F489A1F489A1F489
+      A1F488A0F488A0F488A0F488A0F488A0F487A0F487A0F4879FF4879FF4879FF4
+      869FF487A1F489A1F48CA4F590A8F594AEF69AB4F7A0BAF7A5C0F8AAC5F9AEC9
+      F9B1CCF9B2CEF9B3CFFAB3CFF9B1CDF9AFCAF9ACC7F9A8C1F8A1BBF79CB5F797
+      B0F691AAF58FA6F58CA3F48AA1F48AA1F48BA1F48CA3F48FA6F598AEF5A2B9F6
+      8496E90101BE0101BE0101BE0101BE3036CDAFC6F7A3B9F699AFF494A8F393A7
+      F394A8F294A8F295A9F396AAF397AAF398ABF398ABF399ACF39BADF29AADF29C
+      AEF29DAEF29DAFF29EB0F2A0B1F2B4B8C9BABBBBBABBBBBBBCBCBABBBBBABABA
+      B9BABAB9B9B9B9B9B9B9B9B9BABABABABABABBBBBBBBBBBBBCBCBCBCBCBCBDBD
+      BDBDBDBDBEBEBEBFBFBFBFBFBFC0C0C0C0C0C0C2C2C2C2C2C2C3C3C3C4C4C4C4
+      C4C4C6C6C6C6C6C6C7C7C7C7C7C7C8C8C8C9C9C9CACACACCCCCCCBCBCBCDCDCD
+      CFCFCFCFD0D0D3D4D4D6D8D8D8DBDBDCE0E0DFE3E3E1E5E5E2E7E7E3E8E8E3E7
+      E7E2E6E6E0E4E4DFE2E2DDDFDFDCDDDDDBDBDBDBDBDBDBDBDBDBDBDBDCDCDCDD
+      DDDDDEDEDEDEDEDEDEDEDEE1E1E1E1E1E1E2E2E2E3E3E3E3E3E3E4E4E4E5E5E5
+      E5E5E5E6E6E6E6E6E6E7E7E7E7E7E7E8E8E8E9E9E9E9E9E9E9E9E9EAEAEAEAEA
+      EAEBEBEBEBEBEBECECECECECECECECECEDEDEDEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F1F1F1F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7ABABABAAAAAAA9A9A9A8A8A8A7A7A7A6A6A6A5A5A5A4A4A4A3A3A3A2A2A2
+      A1A1A19F9F9F9E9E9E9E9F9F9E9F9F9FA1A1A1A5A5A2A7A7A3A8A8A3AAAAA6BB
+      E8A6BEF6A5BDF6A4BCF6A3BBF6A0B9F69EB6F59BB4F599B1F596AFF495ACF494
+      ABF493AAF492AAF492AAF492AAF492A9F492A9F491A9F491A9F491A9F491A8F4
+      91A8F491A8F490A8F490A8F490A8F490A7F48FA7F48FA7F48FA7F48FA7F48FA6
+      F48FA6F48EA6F493A7ECB0B0B0B0B0B0B0B0B0AFAFAFAFAFAFAEAEAEADADADAC
+      ACACA2A8BC9DA6C499A5CD92A4E08DA4EF8CA4F58BA3F48BA3F48BA3F48BA3F4
+      8BA3F58BA3F58BA3F58AA2F58AA2F58AA2F58AA2F58AA2F589A2F589A1F589A1
+      F589A1F589A1F589A1F588A1F588A0F588A0F588A0F588A0F587A0F5879FF587
+      9FF588A0F588A1F58AA3F58CA5F68FA8F693ACF697B0F79AB4F79DB7F89FB9F7
+      A1BBF8A2BCF8A2BCF8A0BAF89FB9F89BB5F798B2F796AEF691AAF68FA7F58CA5
+      F48CA3F48BA2F48BA1F48BA1F48BA2F48DA3F490A7F495ACF59DB5F6A8C0F764
+      72E05D69DD5E6ADD5C69DC6F7EE3A7BEF69FB5F699AEF496AAF394A8F395A9F3
+      95A9F397ABF397ABF398ABF398ABF399ACF39BADF39BAEF39CAEF39DAFF39DAF
+      F39EB0F39FB0F3A0B1F3A5B3E8BABABABABABABABABABABABAB9B9B9B9B9B9BA
+      BABABABABABBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBCBCBCBDBDBDBDBDBDBEBEBE
+      BFBFBFC0C0C0C0C0C0C1C1C1C2C2C2C3C3C3C3C3C3C4C4C4C5C5C5C6C6C6C7C7
+      C7C7C7C7C8C8C8C9C9C9C9C9C9CACACACACACACCCCCCCCCCCCCDCDCDCECECECF
+      CFCFD1D1D1D3D4D4D6D7D7D8DADAD9DCDCDBDEDEDDE0E0DEE1E1DEE0E0DEE0E0
+      DCDEDEDCDDDDDBDCDCDADBDBDBDBDBDBDBDBDCDCDCDDDDDDDDDDDDDEDEDEDFDF
+      DFE0E0E0E0E0E0E1E1E1E1E1E1E2E2E2E3E3E3E3E3E3E4E4E4E6E6E6E7E7E7E7
+      E7E7E7E7E7E8E8E8E8E8E8E9E9E9EAEAEAEAEAEAEAEAEAEBEBEBEBEBEBECECEC
+      ECECECEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEFEFEF
+      EFEFEFEFEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F0F0F0F0F0F0F0F0
+      F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F2F2F2F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7ADAD
+      ADABABABAAAAAAA9A9A9A8A8A8A7A7A7A6A6A6A5A5A5A4A4A4A2A2A2A1A1A1A0
+      A0A09E9E9E9E9E9E9C9D9D9C9D9D9C9D9D9B9D9D9A9C9C9A9C9C999EA69CB2EF
+      9CB3F59AB3F599B2F598B1F597AFF496AEF595ACF495ACF594ABF594ABF593AB
+      F593ABF593AAF593AAF592AAF592AAF592AAF592A9F592A9F592A9F591A9F591
+      A9F591A9F591A8F591A8F590A8F590A8F590A8F590A8F590A7F58FA7F58FA7F5
+      8FA7F58FA7F5A0ABD2A3ACCA9FABD29FABD296A8E396A7E38EA5F58DA5F58DA5
+      F58DA5F58DA5F58CA4F58CA4F58CA4F58CA4F58CA4F58CA4F58BA3F58CA4F58C
+      A4F58BA3F58BA3F58BA3F58BA3F58AA3F58AA2F58AA2F58AA2F58AA2F58AA2F5
+      89A1F589A1F589A1F589A1F589A1F588A1F588A1F588A0F588A0F588A0F587A0
+      F587A0F588A0F588A1F58AA2F58CA4F68CA6F68EA7F690A9F692ABF693ACF694
+      ADF694ADF693ABF692ABF690A9F68FA7F68DA6F68CA4F58BA2F58CA3F58AA2F5
+      8BA2F58CA2F58BA2F58CA3F58CA3F58FA6F594AAF599B1F59FB7F6A7BFF7ACC4
+      F8AEC5F8ACC3F8A7BEF7A1B6F69BB1F598ACF595AAF494A9F496AAF496AAF497
+      ABF399ACF499ACF399ACF39BADF49BAEF49CAEF49DAFF49EB0F39EB0F39FB1F3
+      A0B1F3A0B2F3A2B3F3B0B6CFB9B9B9BABABABABABABABABABABABABABABABABA
+      BABBBBBBBBBBBBBBBBBBBCBCBCBDBDBDBDBDBDBDBDBDBEBEBEBEBEBEC0C0C0C0
+      C0C0C1C1C1C1C1C1C2C2C2C3C3C3C4C4C4C5C5C5C5C5C5C7C7C7C7C7C7C8C8C8
+      C9C9C9CACACACBCBCBCBCBCBCCCCCCCDCDCDCDCDCDCECECECFCFCFCFCFCFD1D2
+      D2D2D2D2D3D4D4D5D6D6D6D7D7D8D9D9D9DADAD9DADAD9DBDBDADBDBD9DADAD9
+      DADADBDBDBDADBDBDBDBDBDCDCDCDDDDDDDEDEDEDEDEDEDFDFDFE0E0E0E1E1E1
+      E1E1E1E2E2E2E2E2E2E4E4E4E4E4E4E4E4E4E5E5E5E6E6E6E7E7E7E7E7E7E7E7
+      E7E8E8E8E9E9E9E9E9E9EAEAEAEAEAEAEAEAEAEBEBEBEDEDEDEDEDEDEEEEEEEE
+      EEEEEEEEEEEEEEEEEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0F0
+      F0F0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F2F2
+      F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F4F4F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7AEAEAEACACAC
+      ABABABAAAAAAA9A9A9A8A8A8A7A7A7A6A6A6A5A5A5A3A3A3A2A2A2A1A1A19F9F
+      9F9E9E9E9C9C9C9B9B9B999999989898969696969797949595959EB897AEF597
+      AEF596AEF595ADF595ADF595ACF595ACF595ACF594ACF594ACF594ABF594ABF5
+      94ABF593ABF593ABF593ABF593AAF593AAF592AAF592AAF592AAF592A9F592A9
+      F592A9F591A9F591A9F591A9F591A8F590A8F590A8F590A8F590A8F590A7F590
+      A7F58FA7F58FA7F58FA7F58FA7F58FA7F68EA6F58EA6F58EA6F58EA6F68EA6F6
+      8EA6F68DA5F58DA5F58DA5F58DA5F58DA5F68CA4F58CA4F58CA4F68CA4F68CA4
+      F68CA4F68CA4F68BA3F68BA3F68BA3F68BA3F68BA3F68AA3F68AA2F68AA2F68A
+      A2F68AA2F68AA2F689A2F689A1F689A1F689A1F689A1F688A1F688A0F688A0F6
+      88A0F688A0F687A0F688A1F688A1F689A1F689A2F68AA2F58BA4F58BA3F58BA4
+      F58BA3F58AA3F58BA3F58BA2F68BA2F68AA1F68BA2F68BA2F58BA2F58BA3F58C
+      A3F58DA4F58DA3F58DA4F58FA5F592A9F595ACF69AB1F69EB4F7A2B8F7A2B8F7
+      A1B7F79EB5F69BB1F698ADF596ABF496AAF496AAF497ABF497ABF498ACF499AC
+      F49AACF49AADF49BAEF49BAEF49CAFF49EB0F49EB0F39FB1F49FB1F3A1B2F3A1
+      B2F3A3B4F4A5B5F0B8B9BDB9B9B9B9B9B9BABABABABABABABABABBBBBBBBBBBB
+      BBBBBBBCBCBCBCBCBCBDBDBDBEBEBEBEBEBEBFBFBFBFBFBFC1C1C1C1C1C1C2C2
+      C2C2C2C2C3C3C3C3C3C3C4C4C4C6C6C6C6C6C6C7C7C7C8C8C8C8C8C8CACACACB
+      CBCBCCCCCCCCCCCCCDCDCDCECECECECECECFCFCFCFCFCFD1D1D1D2D2D2D2D2D2
+      D3D3D3D5D5D5D5D5D5D6D6D6D7D7D7D7D7D7D8D8D8D9D9D9D9DADAD9D9D9DADA
+      DADBDBDBDBDBDBDCDCDCDDDDDDDEDEDEDFDFDFDFDFDFE0E0E0E1E1E1E2E2E2E3
+      E3E3E4E4E4E5E5E5E5E5E5E5E5E5E6E6E6E7E7E7E8E8E8E8E8E8E8E8E8E9E9E9
+      EAEAEAEAEAEAEBEBEBEBEBEBECECECECECECEDEDEDEDEDEDEEEEEEEEEEEEEEEE
+      EEEEEEEEEFEFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F2F2F2F1F1F1F1F1F1F2F2F2F1F1F1F2F2F2F1F1F1F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F4
+      F4F4F4F4F4F5F5F5F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7B0B0B0AEAEAEADADADAB
+      ABABAAAAAAA9A9A9A7A7A7A7A7A7A6A6A6A4A4A4A3A3A3A2A2A2A0A0A09F9F9F
+      9D9D9D9B9B9B9A9A9A98989896969696969694949493939395A3D096AEF696AE
+      F696ADF696ADF696ADF695ADF695ADF695ADF695ACF695ACF695ACF694ACF694
+      ACF694ABF694ABF693ABF693ABF693ABF693AAF693AAF693AAF692AAF692AAF6
+      92AAF692A9F692A9F691A9F691A9F691A9F691A9F691A8F690A8F690A8F690A8
+      F690A8F690A7F690A7F68FA7F68FA7F68FA7F68FA6F68FA6F68FA7F58EA6F68E
+      A6F68EA6F68EA6F68DA5F68DA5F68DA5F58DA5F68DA5F68DA5F68DA5F68DA5F6
+      8CA4F68CA4F68CA4F68CA4F68BA4F68BA3F68BA3F68BA3F68BA3F68BA3F68AA2
+      F68AA2F68AA2F68AA2F68AA2F689A2F689A2F689A1F689A1F689A1F688A1F688
+      A1F688A0F688A0F688A0F688A0F688A0F688A0F688A0F688A0F689A1F689A1F6
+      89A1F68AA1F68AA1F68AA2F68AA2F68BA2F68CA3F58CA3F58CA3F58DA4F68EA4
+      F68EA5F68FA5F68FA5F690A7F692A8F695ABF696ACF698AFF699AFF69AAEF698
+      ADF697ADF597ABF596ABF596AAF597ABF597ABF598ACF599ACF599ADF59AADF5
+      9BAEF49CAEF49CAFF49DAFF49EB0F49FB0F49FB1F4A1B2F4A1B2F4A2B3F4A3B4
+      F4A4B4F4ADB6D9B8B8B8B9B9B9B9B9B9BBBBBBBBBBBBBBBBBBBBBBBBBCBCBCBD
+      BDBDBDBDBDBEBEBEBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1C2C2C2C3C3C3C3C3C3
+      C4C4C4C4C4C4C5C5C5C6C6C6C7C7C7C8C8C8C8C8C8C9C9C9CACACACBCBCBCCCC
+      CCCCCCCCCDCDCDCECECECFCFCFD0D0D0D0D0D0D1D1D1D2D2D2D3D3D3D4D4D4D5
+      D5D5D5D5D5D7D7D7D7D7D7D8D8D8D8D8D8DADADADADADADADADADCDCDCDCDCDC
+      DDDDDDDEDEDEDEDEDEDFDFDFDFDFDFE0E0E0E1E1E1E2E2E2E2E2E2E3E3E3E4E4
+      E4E5E5E5E5E5E5E6E6E6E6E6E6E7E7E7E8E8E8E8E8E8E8E8E8EAEAEAEBEBEBEB
+      EBEBECECECECECECEDEDEDEDEDEDEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFEFEFEF
+      F0F0F0F0F0F0F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F1
+      F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7B0B0B0AFAFAFAEAEAEACACACABAB
+      ABAAAAAAA9A9A9A8A8A8A7A7A7A6A6A6A5A5A5A3A3A3A2A2A2A0A0A09F9F9F9D
+      9D9D9C9C9C9A9A9A98989897979796969694949493949996A9E397AEF697AEF6
+      96AEF696AEF696AEF696ADF696ADF696ADF695ADF695ADF695ACF695ACF695AC
+      F694ACF694ACF694ACF694ABF694ABF693ABF693ABF693ABF693AAF693AAF693
+      AAF692AAF692AAF692AAF692A9F691A9F691A9F691A9F691A9F691A8F691A8F6
+      90A8F690A8F690A8F690A8F690A7F68FA7F68FA7F68FA7F68FA7F68FA6F68EA6
+      F68FA7F68EA6F68EA6F68EA6F68DA5F68EA6F78EA6F78DA5F78DA5F78DA5F78D
+      A5F78DA5F78CA4F78CA4F78CA4F78CA4F78CA4F78BA4F78BA3F78BA3F78BA3F7
+      8BA3F78BA3F78AA3F78AA2F78AA2F78AA2F78AA2F789A2F789A1F789A1F789A1
+      F789A1F788A1F788A1F789A1F688A1F689A1F689A1F68AA2F68AA1F68AA2F68B
+      A2F68AA2F68BA2F68CA3F68BA3F68CA3F68DA4F68CA3F68DA4F68EA5F68FA5F6
+      90A6F68FA5F690A6F691A7F692A8F693A9F695AAF696AAF696ABF695AAF696AA
+      F695AAF696AAF697ABF697ACF598ACF599ACF59AADF59AADF59BAEF59CAFF59D
+      AFF59EB0F59EB0F59EB1F59FB1F5A1B2F5A2B3F5A2B4F5A3B4F4A4B5F4A5B5F4
+      A5B6F4B3B7C7B8B8B8B9B9B9B9B9B9BABABABBBBBBBBBBBBBCBCBCBDBDBDBEBE
+      BEBFBFBFBFBFBFC0C0C0C0C0C0C1C1C1C2C2C2C3C3C3C3C3C3C5C5C5C5C5C5C6
+      C6C6C7C7C7C7C7C7C8C8C8C9C9C9C9C9C9CACACACBCBCBCCCCCCCDCDCDCDCDCD
+      CECECECFCFCFCFCFCFD1D1D1D1D1D1D2D2D2D3D3D3D3D3D3D4D4D4D5D5D5D6D6
+      D6D7D7D7D8D8D8D7D7D7D9D9D9DADADADADADADBDBDBDDDDDDDDDDDDDEDEDEDE
+      DEDEE0E0E0E0E0E0E1E1E1E1E1E1E2E2E2E3E3E3E3E3E3E4E4E4E5E5E5E6E6E6
+      E6E6E6E7E7E7E7E7E7E8E8E8E9E9E9E9E9E9EAEAEAEAEAEAEBEBEBECECECECEC
+      ECECECECEDEDEDEEEEEEEEEEEEEEEEEEEFEFEFEFEFEFEFEFEFF0F0F0F0F0F0F1
+      F1F1F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7B2B2B2B1B1B1B0B0B0AFAFAFACACACABABAB
+      AAAAAAA9A9A9A8A8A8A7A7A7A5A5A5A5A5A5A3A3A3A2A2A2A0A0A09F9F9F9C9C
+      9C9B9B9B9999999898989797979696969595959599A697ADF197AFF797AFF797
+      AEF797AEF797AEF796AEF796AEF796AEF796ADF796ADF796ADF795ADF795ADF7
+      95ACF795ACF794ACF794ACF794ACF794ABF794ABF794ABF793ABF793ABF793AB
+      F793AAF793AAF792AAF792AAF792AAF792AAF792A9F791A9F791A9F791A9F791
+      A9F791A8F791A8F790A8F790A8F790A8F790A7F790A7F78FA7F78FA7F78FA7F7
+      8FA7F78EA6F78EA6F78EA6F78EA6F78EA6F78EA6F78EA6F78EA6F78EA6F78DA5
+      F78DA5F78DA5F78CA4F78CA4F78CA4F78CA4F78CA4F78BA3F78CA4F78BA3F78B
+      A3F78BA3F78BA3F78BA3F78AA3F78AA3F78AA2F78AA2F78AA2F789A2F789A2F7
+      89A1F789A1F789A2F789A1F78AA2F78AA1F78AA2F78BA3F78BA2F78BA3F78BA3
+      F78BA3F78CA4F78CA4F78DA4F78DA4F68DA4F68EA4F68FA5F68FA6F690A6F691
+      A7F691A7F691A7F691A7F693A8F794A9F694A9F694A9F696AAF695AAF696ABF6
+      97ABF697ABF698ACF698ACF59AADF69AADF59BAEF69DAFF69DB0F69DB0F69FB1
+      F69FB1F6A0B2F5A1B3F5A2B3F5A3B4F5A3B4F5A4B5F5A4B5F5A5B6F5A7B7F5AA
+      B8EDB7B8BCB9B9B9B9B9B9BABABABBBBBBBCBCBCBCBCBCBDBDBDBEBEBEBEBEBE
+      BFBFBFC0C0C0C0C0C0C2C2C2C2C2C2C3C3C3C3C3C3C4C4C4C5C5C5C7C7C7C7C7
+      C7C8C8C8C9C9C9C9C9C9CBCBCBCBCBCBCCCCCCCDCDCDCDCDCDCFCFCFCFCFCFD0
+      D0D0D1D1D1D1D1D1D2D2D2D3D3D3D4D4D4D4D4D4D6D6D6D6D6D6D7D7D7D8D8D8
+      D8D8D8D9D9D9DADADADBDBDBDBDBDBDCDCDCDDDDDDDDDDDDDEDEDEDFDFDFE0E0
+      E0E0E0E0E1E1E1E2E2E2E3E3E3E3E3E3E3E3E3E4E4E4E6E6E6E7E7E7E7E7E7E8
+      E8E8E7E7E7E9E9E9EAEAEAEAEAEAEBEBEBECECECECECECEDEDEDEDEDEDEDEDED
+      EEEEEEEEEEEEEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F1F1F1F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2F2
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F6F6F6F5F5F5F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7B3B3B3B2B2B2B0B0B0AFAFAFAFAFAFACACACABABABAA
+      AAAAA9A9A9A8A8A8A6A6A6A5A5A5A4A4A4A2A2A2A1A1A1A0A0A09E9E9E9D9D9D
+      9A9A9A999999989898979797969696959595969FB998AFF798AFF798AFF797AF
+      F797AFF797AFF797AEF797AEF797AEF796AEF796AEF796ADF796ADF796ADF795
+      ADF795ADF795ADF795ACF795ACF794ACF794ACF794ACF794ABF794ABF794ABF7
+      93ABF793ABF793ABF793AAF792AAF792AAF792AAF792AAF792A9F792A9F791A9
+      F791A9F791A9F791A9F791A8F790A8F790A8F790A8F790A8F790A7F78FA7F78F
+      A7F78FA7F78FA7F78FA7F78FA7F88EA6F78EA6F78EA6F78EA6F78EA6F78DA5F7
+      8DA5F78DA5F88DA5F78DA5F88CA4F78DA5F88CA4F78CA4F78CA4F78BA3F78CA4
+      F88CA4F88BA4F88BA3F88BA3F88BA3F88BA3F88AA3F88AA2F88AA2F88AA2F88A
+      A2F88AA2F78AA2F78BA2F78AA2F78BA3F78BA3F78BA3F78CA3F78CA3F78CA4F7
+      8DA4F78EA5F78EA5F78EA5F78FA5F78FA5F78FA6F790A6F790A7F791A7F791A7
+      F792A7F792A8F793A9F794A9F695A9F695AAF696AAF697ABF698ACF797ABF697
+      ACF699ADF79AADF69BAEF69BAEF69CAFF69CB0F69EB0F69DB0F6A0B2F6A0B2F6
+      A1B3F6A2B4F6A2B4F6A3B5F6A4B5F6A5B6F6A5B6F6A7B7F6A8B8F6A9B8F6B2B8
+      CFB9B9B9BABABABBBBBBBBBBBBBCBCBCBDBDBDBDBDBDBEBEBEBFBFBFC0C0C0C1
+      C1C1C1C1C1C2C2C2C3C3C3C4C4C4C4C4C4C5C5C5C6C6C6C7C7C7C7C7C7C8C8C8
+      CACACACACACACBCBCBCBCBCBCCCCCCCDCDCDCECECECFCFCFD0D0D0D0D0D0D1D1
+      D1D2D2D2D2D2D2D3D3D3D5D5D5D6D6D6D7D7D7D7D7D7D8D8D8D9D9D9D9D9D9DA
+      DADADBDBDBDCDCDCDCDCDCDDDDDDDEDEDEDEDEDEDFDFDFE0E0E0E1E1E1E1E1E1
+      E2E2E2E3E3E3E4E4E4E4E4E4E5E5E5E5E5E5E6E6E6E7E7E7E7E7E7E8E8E8E8E8
+      E8EAEAEAEAEAEAEAEAEAEBEBEBECECECECECECEDEDEDEDEDEDEDEDEDEEEEEEEF
+      EFEFEFEFEFF0F0F0F0F0F0F0F0F0F0F0F0F1F1F1F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4
+      F4F4F4F4F4F4F4F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F4F4F4F5F5F5F4F4F4F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7B5B5B5B3B3B3B2B2B2B1B1B1AFAFAFAEAEAEACACACABABABAAAA
+      AAA9A9A9A8A8A8A7A7A7A6A6A6A4A4A4A3A3A3A1A1A19F9F9F9E9E9E9C9C9C9B
+      9B9B9A9A9A98989897979796969695959596A4CB99B0F898AFF798B0F898AFF8
+      98AFF898AFF897AFF897AFF897AFF897AEF897AEF897AEF896AEF896AEF896AD
+      F896ADF895ADF895ADF895ADF895ACF895ADF795ACF894ACF894ACF894ACF894
+      ABF894ABF893ABF893ABF893ABF893ABF893AAF892AAF892AAF892AAF892AAF8
+      92A9F892A9F891A9F891A9F891A9F891A8F891A8F890A8F890A8F890A8F890A8
+      F88FA7F88FA7F88FA7F88FA7F88FA7F88FA7F88EA6F88EA6F88EA6F88EA6F88E
+      A6F88DA5F88DA5F88DA5F88DA5F88DA5F88CA5F88CA4F88CA4F88CA4F88CA4F8
+      8CA4F88BA4F88CA4F88BA4F88BA4F88BA3F88BA3F88BA3F88AA3F88AA3F88BA3
+      F88BA3F88BA3F88CA4F88CA4F88CA4F88CA4F88DA4F88DA4F88DA4F88EA5F88E
+      A5F88EA5F88FA6F88FA6F78FA6F790A7F791A7F791A7F792A8F793A8F793A8F7
+      93A9F794A9F794AAF795AAF796ABF796ABF797ACF798ACF798ACF799ADF79AAE
+      F79AADF79CAFF69BAFF69CAFF69DB0F69EB1F69FB1F6A0B2F6A0B3F6A1B3F6A2
+      B4F6A3B4F6A3B5F6A4B5F6A5B6F6A6B7F6A7B8F6A8B8F6AAB9F2B7B8BCB9B9B9
+      BABABABCBCBCBCBCBCBCBCBCBDBDBDBEBEBEC0C0C0C0C0C0C1C1C1C2C2C2C2C2
+      C2C3C3C3C4C4C4C5C5C5C6C6C6C6C6C6C7C7C7C8C8C8C9C9C9CACACACACACACB
+      CBCBCCCCCCCCCCCCCECECECECECECFCFCFD0D0D0D0D0D0D1D1D1D2D2D2D2D2D2
+      D3D3D3D4D4D4D5D5D5D6D6D6D7D7D7D7D7D7D8D8D8D9D9D9DADADADADADADBDB
+      DBDCDCDCDCDCDCDDDDDDDEDEDEDFDFDFDFDFDFE0E0E0E1E1E1E1E1E1E3E3E3E3
+      E3E3E5E5E5E4E4E4E6E6E6E6E6E6E8E8E8E7E7E7E8E8E8E8E8E8E9E9E9EBEBEB
+      EBEBEBEBEBEBECECECEDEDEDEEEEEEEEEEEEEEEEEEEEEEEEEFEFEFF0F0F0F0F0
+      F0F1F1F1F1F1F1F1F1F1F1F1F1F2F2F2F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3
+      F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F4F4F3F3F3F4F4
+      F4F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F4F4F4F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7B6B6B6B5B5B5B4B4B4B2B2B2B0B0B0AFAFAFAEAEAEADADADABABABAAAAAA
+      A9A9A9A8A8A8A7A7A7A5A5A5A4A4A4A2A2A2A1A1A19F9F9F9E9E9E9C9C9C9B9B
+      9B9A9A9A98989898989897979796969698A8D999B0F899B0F899B0F898B0F898
+      B0F898B0F898AFF898AFF898AFF897AFF897AFF897AEF897AEF897AEF896AEF8
+      96AEF896AEF896ADF896ADF895ADF895ADF895ADF895ACF895ACF895ACF894AC
+      F894ACF894ACF894ABF893ABF893ABF893ABF893ABF893AAF893AAF892AAF892
+      AAF892AAF892AAF892A9F891A9F891A9F891A9F891A9F891A8F890A8F890A8F8
+      90A8F890A8F890A8F88FA7F88FA7F88FA7F88FA7F88FA7F88FA7F88EA6F88EA6
+      F88EA6F88EA6F88DA6F88DA5F88DA5F88DA5F88DA5F88DA5F88CA4F88CA4F88C
+      A4F88CA4F88CA4F88BA4F88BA4F88BA3F88BA3F88BA3F88BA3F88BA3F88BA3F8
+      8BA3F88BA3F88DA4F88CA4F88CA4F88DA5F88DA5F88EA5F88EA6F88FA6F890A6
+      F890A6F890A7F891A7F891A7F892A8F892A8F893A9F893A9F893A9F895AAF894
+      AAF895AAF896ABF897ABF897ACF798ADF799ADF799ADF79AAEF79BAEF79BAFF7
+      9CAFF79DB0F79DB1F79EB1F79FB2F7A0B2F7A1B3F7A1B3F7A2B4F7A3B4F7A4B6
+      F7A4B6F7A5B6F6A6B7F6A7B8F6A8B8F6A9B9F6B0B8D7B8B8B8B9B9B9BABABABB
+      BBBBBCBCBCBDBDBDBDBDBDBFBFBFC0C0C0C0C0C0C1C1C1C2C2C2C2C2C2C3C3C3
+      C5C5C5C5C5C5C6C6C6C6C6C6C7C7C7C9C9C9C9C9C9CACACACBCBCBCBCBCBCCCC
+      CCCCCCCCCFCFCFCFCFCFD0D0D0D1D1D1D1D1D1D2D2D2D3D3D3D3D3D3D5D5D5D6
+      D6D6D6D6D6D7D7D7D8D8D8D8D8D8D9D9D9DADADADADADADBDBDBDCDCDCDDDDDD
+      DDDDDDDEDEDEDFDFDFE0E0E0E0E0E0E2E2E2E2E2E2E3E3E3E3E3E3E4E4E4E5E5
+      E5E5E5E5E6E6E6E7E7E7E8E8E8E8E8E8E9E9E9E9E9E9EAEAEAEBEBEBEBEBEBEB
+      EBEBECECECEDEDEDEDEDEDEEEEEEEEEEEEEEEEEEEFEFEFF0F0F0F0F0F0F1F1F1
+      F1F1F1F1F1F1F3F3F3F2F2F2F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F6F6F6F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7B8B8
+      B8B6B6B6B5B5B5B4B4B4B2B2B2B0B0B0AFAFAFAFAFAFACACACABABABAAAAAAA9
+      A9A9A7A7A7A7A7A7A6A6A6A4A4A4A3A3A3A1A1A1A0A0A09E9E9E9C9C9C9B9B9B
+      9A9A9A98989897979797979796979C99ACE69AB1F999B0F899B1F999B0F998B0
+      F898B0F898AFF898B0F998AFF898AFF998AFF997AEF897AEF897AEF897AEF996
+      AEF896AEF996AEF996ADF896ADF996ADF995ADF895ACF895ADF995ADF995ACF9
+      95ACF994ACF994ACF994ACF994ACF994ABF993ABF993ABF993ABF993ABF993AA
+      F993AAF992AAF992AAF992AAF992A9F992A9F991A9F991A9F991A9F991A9F990
+      A8F990A8F990A8F990A8F990A8F990A8F98FA7F98FA7F98FA7F98FA7F98FA7F9
+      8EA6F98EA6F98EA6F98EA6F98EA6F98DA6F98DA5F98DA5F98DA5F98DA5F98DA5
+      F98CA5F98CA4F98CA4F98CA4F98CA4F98BA4F98CA4F88BA4F88CA4F88CA4F88D
+      A5F88DA5F88DA5F88EA5F88EA5F88EA5F88FA6F88FA6F88FA6F890A7F890A6F8
+      90A7F892A8F992A8F892A8F892A8F893A9F894A9F894AAF895AAF895AAF895AA
+      F896ABF897ACF898ADF899ADF899ADF799ADF79AAEF79BAEF79CB0F89CB0F79E
+      B1F89EB1F89FB2F8A0B2F8A0B3F7A1B4F7A2B4F7A3B5F7A3B5F7A4B6F7A6B7F7
+      A7B8F7A7B8F7A8B9F7A9B9F7A9BAF7B6B8C0B9B9B9BABABABBBBBBBCBCBCBDBD
+      BDBDBDBDBFBFBFC0C0C0C0C0C0C1C1C1C2C2C2C2C2C2C3C3C3C5C5C5C6C6C6C6
+      C6C6C7C7C7C7C7C7C8C8C8C9C9C9CACACACBCBCBCCCCCCCCCCCCCDCDCDCECECE
+      CFCFCFCFCFCFD0D0D0D1D1D1D1D1D1D3D3D3D4D4D4D4D4D4D5D5D5D6D6D6D6D6
+      D6D7D7D7D8D8D8D8D8D8D9D9D9DADADADBDBDBDBDBDBDEDEDEDDDDDDDEDEDEDE
+      DEDEE0E0E0E0E0E0E0E0E0E2E2E2E2E2E2E2E2E2E3E3E3E5E5E5E5E5E5E6E6E6
+      E7E7E7E8E8E8E8E8E8E9E9E9EAEAEAEAEAEAEBEBEBECECECECECECECECECEDED
+      EDEEEEEEEEEEEEEFEFEFEFEFEFF0F0F0F0F0F0F1F1F1F1F1F1F2F2F2F2F2F2F2
+      F2F2F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4F4
+      F4F4F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F6F6F6F6F6F6F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7B9B9B9B8B8B8
+      B6B6B6B5B5B5B4B4B4B2B2B2B1B1B1AFAFAFAEAEAEACACACABABABAAAAAAA9A9
+      A9A8A8A8A7A7A7A5A5A5A4A4A4A2A2A2A1A1A1A0A0A09E9E9E9C9C9C9B9B9B9A
+      9A9A999999989898979797979AA39AB0F39AB1F999B1F999B1F999B0F999B0F9
+      99B0F998B0F998B0F998B0F998AFF998AFF998AFF998AFF997AFF997AEF997AF
+      F997AFF997AEF996AEF996ADF996ADF996ADF996ADF995ADF996ADF995ADF895
+      ADF995ADF995ACF994ACF994ACF994ABF994ACF993ABF994ABF993ABF993AAF9
+      93ABF993ABF993AAF992AAF992AAF992AAF992AAF992A9F991A9F991A9F991A9
+      F991A9F991A9F990A8F990A8F990A8F990A8F990A8F990A8F98FA7F98FA7F98F
+      A7F98FA7F98EA7F98EA6F98EA6F98EA6F98EA6F98EA6F98DA5F98DA5F98DA5F9
+      8DA5F98DA5F98CA5F98CA5F98CA4F98CA5F98CA4F98DA5F98DA5F98EA5F98DA5
+      F98EA6F98FA6F98EA6F98FA6F98FA7F990A7F990A7F991A7F991A8F991A8F992
+      A8F993A9F893A9F893A9F894AAF894AAF895ABF895ABF895ABF897ACF897ACF8
+      98ACF898ADF899ADF89AAEF89AAEF89BAFF89CAFF89CB0F89DB0F89EB1F89EB1
+      F89FB2F8A1B3F7A1B3F7A1B4F7A2B4F7A4B5F7A4B6F7A5B7F7A6B7F7A7B8F7A8
+      B9F8A8B9F7AABBF8B0BADFB8B8B8B9B9B9BABABABBBBBBBCBCBCBDBDBDBEBEBE
+      C0C0C0C0C0C0C0C0C0C1C1C1C2C2C2C3C3C3C5C5C5C5C5C5C6C6C6C7C7C7C8C8
+      C8C8C8C8CACACACACACACBCBCBCCCCCCCDCDCDCECECECECECECFCFCFD0D0D0D0
+      D0D0D1D1D1D2D2D2D3D3D3D4D4D4D4D4D4D5D5D5D6D6D6D7D7D7D7D7D7D8D8D8
+      D9D9D9D9D9D9DBDBDBDBDBDBDCDCDCDDDDDDDEDEDEDEDEDEDFDFDFE0E0E0E0E0
+      E0E1E1E1E2E2E2E3E3E3E3E3E3E4E4E4E5E5E5E5E5E5E6E6E6E6E6E6E7E7E7E8
+      E8E8E8E8E8E9E9E9E9E9E9EAEAEAEBEBEBECECECECECECEDEDEDEDEDEDEEEEEE
+      EFEFEFEFEFEFEFEFEFF0F0F0F1F1F1F1F1F1F2F2F2F2F2F2F2F2F2F2F2F2F3F3
+      F3F3F3F3F4F4F4F4F4F4F5F5F5F4F4F4F5F5F5F4F4F4F4F4F4F5F5F5F5F5F5F4
+      F4F4F4F4F4F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F6F6F6F5F5F5F5F5F5F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7BBBBBBB9B9B9B8B8B8B6
+      B6B6B5B5B5B4B4B4B2B2B2B1B1B1AFAFAFAEAEAEACACACABABABAAAAAAA9A9A9
+      A8A8A8A7A7A7A5A5A5A4A4A4A2A2A2A1A1A1A0A0A09E9E9E9D9D9D9C9C9C9A9A
+      9A999999989898989898989CAA9AB0F39AB1F99AB1F99AB1F999B1F999B1F999
+      B1F999B0F999B0F999B0F998B0F998B0F998AFF998AFF998AFF997AFF997AFF9
+      97AFF997AEF997AEF996AEF996AEF996AEF996ADF996ADF996ADF995ADF995AD
+      F995ADF995ACF994ACF994ACF994ACF994ACF994ACF994ABF993ABF993ABF993
+      ABF993ABF993ABF992AAF992AAF992AAF992AAF992A9F991A9F991A9F991A9FA
+      91A9F991A9F990A8F990A8F991A9FA90A8FA90A8FA90A8FA8FA7F98FA7F98FA7
+      F98FA7F98FA7FA8EA6F98EA6F98EA6F98EA6F98EA6FA8DA5F98DA5F98DA5F98D
+      A5F98DA5F98CA5F98DA5F98DA5F98DA5F98DA5F98DA5F98EA6F98EA6F98EA6F9
+      8FA7F98FA6F990A7F990A7F991A8F991A8F992A8F992A9F992A9F992A9F993A9
+      F994AAF994AAF995ABF995ABF996ABF996ACF997ACF998ADF999ADF998ADF99A
+      AEF999AEF99BAFF89BAFF89CB0F89CB0F89DB1F89EB1F89FB2F89FB2F8A1B3F8
+      A1B3F8A1B4F8A3B5F8A4B6F8A4B6F8A5B7F8A6B7F8A7B8F8A8B8F8A8B9F8A9BA
+      F8AABBF8B5B7BFB9B9B9BABABABABABABBBBBBBDBDBDBEBEBEBEBEBEC0C0C0C0
+      C0C0C1C1C1C2C2C2C3C3C3C4C4C4C5C5C5C6C6C6C7C7C7C7C7C7C9C9C9C9C9C9
+      CACACACBCBCBCBCBCBCCCCCCCDCDCDCECECECFCFCFCFCFCFD0D0D0D1D1D1D2D2
+      D2D3D3D3D3D3D3D4D4D4D5D5D5D5D5D5D6D6D6D7D7D7D8D8D8DADADADADADADB
+      DBDBDBDBDBDCDCDCDDDDDDDDDDDDDEDEDEDFDFDFDFDFDFE0E0E0E1E1E1E1E1E1
+      E2E2E2E3E3E3E4E4E4E5E5E5E6E6E6E6E6E6E7E7E7E8E8E8E9E9E9E9E9E9E9E9
+      E9EAEAEAEBEBEBECECECECECECECECECEDEDEDEEEEEEEFEFEFEFEFEFF0F0F0F0
+      F0F0F0F0F0F1F1F1F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F6F6F6F6F6F6F6F6F6F5F5F5
+      F6F6F6F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F6F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7BCBCBCBBBBBBBABABAB8B8B8B6B6
+      B6B5B5B5B4B4B4B2B2B2B1B1B1B0B0B0AEAEAEADADADACACACABABABAAAAAAA8
+      A8A8A7A7A7A6A6A6A4A4A4A3A3A3A1A1A1A0A0A09F9F9F9D9D9D9C9C9C9B9B9B
+      9A9A9A99999998989899A0B69BB2FA9BB2FA9AB2FA9AB2FA9AB1FA9AB1FA9AB1
+      FA99B1FA99B1FA99B1FA99B0FA99B0FA99B0FA98B0FA98B0FA98AFFA98AFFA97
+      AFFA97AFFA97AFFA97AEFA97AEFA97AEFA96AEFA96AEFA96AEFA96ADFA96ADFA
+      95ADFA95ADFA95ADFA95ADFA95ACFA94ACFA94ACFA94ACFA94ACFA94ABFA94AB
+      FA93ABFA93ABFA93ABFA93AAFA93AAFA92AAFA92AAFA92AAFA92AAFA91A9FA91
+      A9FA91A9FA91A9FA91A9FA91A9FA90A8FA90A8FA90A8FA90A8FA90A8FA8FA7FA
+      8FA7FA8FA7FA8FA7FA8FA7FA8EA7FA8EA6FA8EA6FA8EA6FA8EA6FA8EA6FA8DA6
+      FA8DA5FA8DA6F98DA6F98DA5F98EA6F98EA5F98EA6F98FA7F98FA6F98FA7F98F
+      A7F990A7F990A8F991A8F991A8F992A8F992A9F992A9F993A9F993A9F994ABFA
+      95ABF994AAF997ACF996ACF996ACF998ADF998ADF999ADF999AEF99AAEF99AAE
+      F99AAFF99CB0F89DB1F99EB2F99EB1F89FB2F8A0B3F9A0B3F8A1B4F8A2B4F8A3
+      B5F9A4B6F9A5B6F9A5B7F9A6B8F9A7B8F8A7B9F8A9BAF8AABAF8ABBBF8B0BAE0
+      B8B8B8B9B9B9BABABABBBBBBBCBCBCBEBEBEBFBFBFC0C0C0C0C0C0C1C1C1C2C2
+      C2C3C3C3C4C4C4C5C5C5C6C6C6C6C6C6C7C7C7C9C9C9CACACACACACACBCBCBCC
+      CCCCCDCDCDCECECECFCFCFCFCFCFD0D0D0D1D1D1D1D1D1D2D2D2D3D3D3D4D4D4
+      D4D4D4D5D5D5D6D6D6D6D6D6D7D7D7D8D8D8D9D9D9DADADADADADADBDBDBDCDC
+      DCDCDCDCDDDDDDDEDEDEDEDEDEDFDFDFE0E0E0E1E1E1E1E1E1E2E2E2E3E3E3E4
+      E4E4E4E4E4E5E5E5E6E6E6E6E6E6E7E7E7E8E8E8E8E8E8E9E9E9E9E9E9EAEAEA
+      EBEBEBECECECEDEDEDEDEDEDEDEDEDEEEEEEEEEEEEEFEFEFF0F0F0F0F0F0F0F0
+      F0F1F1F1F2F2F2F2F2F2F3F3F3F3F3F3F3F3F3F4F4F4F4F4F4F4F4F4F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F5F5F5F5F5F5F5F5
+      F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F5
+      F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7BDBDBDBCBCBCBABABAB9B9B9B8B8B8B6B6B6
+      B5B5B5B4B4B4B2B2B2B1B1B1AFAFAFAEAEAEADADADACACACABABABAAAAAAA8A8
+      A8A7A7A7A6A6A6A5A5A5A3A3A3A1A1A1A0A0A09F9F9F9D9D9D9C9C9C9B9B9B9A
+      9A9A9999999999999AA2BD9BB2FA9BB2FA9BB2FA9BB2FA9AB2FA9AB2FA9AB2FA
+      9AB1FA9AB1FA9AB1FA99B1FA99B1FA99B0FA99B0FA99B0FA98B0FA98B0FA98B0
+      FA98AFFA98AFFA97AEFA97AFFA97AFFA97AEFA97AEFA97AEFA96AEFA96AEFA96
+      AEFA96ADFA95ADFA95ADFA95ADFA95ADFA95ACFA95ACFA94ACFA94ACFA94ACFA
+      94ACFA94ABFA93ABFA93ABFA93ABFA93ABFA93AAFA92AAFA92AAFA92AAFA92AA
+      FA92AAFA91A9FA91A9FA91A9FA91A9FA91A9FA91A9FA90A8FA90A8FA90A8FA90
+      A8FA8FA8FA8FA7FA8FA7FA8FA7FA8FA7FA8FA7FA8EA6FA8EA6FA8EA6FA8EA6FA
+      8EA6FA8EA6FA8EA6FA8FA6FA8EA6FA8FA7FA8FA7FA8FA7FA90A7FA91A8FA91A8
+      FA91A8FA92A9FA92A8FA92A9FA93AAFA94AAFA93AAFA94AAFA94ABFA95ABF996
+      ACF997ACF997ACF997ADF998ADF999AEF999AEF99AAFF99BAFF99BAFF99CB0F9
+      9DB1F99DB1F99EB2F99FB2F9A0B3F9A0B3F9A1B4F9A2B4F9A2B5F9A3B5F9A4B6
+      F9A5B7F9A5B7F9A6B8F9A7B8F8A9B9F8A9BAF8AABBF8ABBBF8B4B8C7B8B8B8B9
+      B9B9BBBBBBBCBCBCBDBDBDBEBEBEBFBFBFC0C0C0C1C1C1C2C2C2C3C3C3C3C3C3
+      C4C4C4C5C5C5C6C6C6C8C8C8C8C8C8C9C9C9CACACACBCBCBCCCCCCCCCCCCCDCD
+      CDCECECECFCFCFD0D0D0D0D0D0D2D2D2D2D2D2D3D3D3D3D3D3D4D4D4D5D5D5D5
+      D5D5D7D7D7D7D7D7D8D8D8D8D8D8D9D9D9DADADADADADADBDBDBDCDCDCDCDCDC
+      DDDDDDDEDEDEDFDFDFDFDFDFE1E1E1E1E1E1E1E1E1E2E2E2E3E3E3E4E4E4E4E4
+      E4E5E5E5E6E6E6E7E7E7E8E8E8E9E9E9EAEAEAEAEAEAEAEAEAEBEBEBECECECED
+      EDEDEDEDEDEEEEEEEEEEEEEFEFEFF0F0F0F0F0F0F1F1F1F1F1F1F2F2F2F2F2F2
+      F3F3F3F2F2F2F4F4F4F4F4F4F4F4F4F4F4F4F5F5F5F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7BEBEBEBDBDBDBCBCBCBBBBBBB9B9B9B8B8B8B6B6B6B5
+      B5B5B4B4B4B2B2B2B1B1B1AFAFAFAEAEAEADADADACACACABABABAAAAAAA8A8A8
+      A7A7A7A6A6A6A4A4A4A3A3A3A1A1A1A0A0A09F9F9F9D9D9D9C9C9C9B9B9B9A9A
+      9A9999999898989AA2BD9BB3FA9BB2FA9BB2FA9BB2FA9AB2FA9AB2FA9AB2FA9A
+      B1FA9AB1FA9AB1FA99B1FA99B1FA99B0FA99B0FA99B0FA98B0FA98B0FA98B0FA
+      98AFFA98AFFA97AFFA97AFFA97AFFA97AEFA97AEFA97AEFA96AEFA96AEFA96AE
+      FA96ADFA95ADFA95ADFA95ADFA95ADFA95ACFA95ACFA94ACFA94ACFA94ACFA94
+      ACFA94ABFA93ABFA93ABFA94ABFB93ABFB93AAFA93ABFB92AAFA92AAFA92AAFB
+      92AAFA92AAFB92AAFB92AAFB91A9FB91A9FA91A9FB91A9FB90A8FA90A8FA90A8
+      FB90A8FB90A8FB8FA7FA8FA8FB8FA7FA8FA7FA8FA7FB8FA7FB8EA6FA8FA7FA8E
+      A6FA8FA7FA8FA7FA90A8FA8FA7FA90A7FA8FA7FA91A8FA91A8FA92A9FA91A9FA
+      92A9FA93A9FA93A9FA93AAFA94AAFA95AAFA95ABFA95ACFA95ABF996ACF998AD
+      FA97ACF998ADFA98ADF999AEFA9AAEF99AAFF99BAFF99CB0F99CB0F99EB1FA9D
+      B1F99FB2FAA0B3FAA0B3F9A1B4F9A2B5F9A2B5F9A3B6F9A4B6F9A5B7F9A6B7F9
+      A6B8F9A8B9F9A8BAF9A9BAF9AABBF9ABBBF9AFBBE8B8B8B8B9B9B9BBBBBBBCBC
+      BCBCBCBCBEBEBEBFBFBFBFBFBFC0C0C0C1C1C1C3C3C3C4C4C4C4C4C4C5C5C5C7
+      C7C7C8C8C8C8C8C8C9C9C9CACACACBCBCBCCCCCCCDCDCDCDCDCDCFCFCFD0D0D0
+      D0D0D0D1D1D1D2D2D2D3D3D3D4D4D4D4D4D4D5D5D5D5D5D5D6D6D6D7D7D7D8D8
+      D8D8D8D8D9D9D9D9D9D9DADADADBDBDBDBDBDBDCDCDCDDDDDDDDDDDDDEDEDEDF
+      DFDFDFDFDFE0E0E0E2E2E2E2E2E2E2E2E2E4E4E4E5E5E5E5E5E5E5E5E5E6E6E6
+      E7E7E7E7E7E7E8E8E8E9E9E9EAEAEAEAEAEAEAEAEAECECECECECECEDEDEDEDED
+      EDEEEEEEEFEFEFEFEFEFF0F0F0F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F3F3F3F3
+      F3F3F4F4F4F4F4F4F4F4F4F5F5F5F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F6F6F6F6F6F6F7F7F7F6F6F6F7F7F7
+      F6F6F6F7F7F7F7F7F7F6F6F6F7F7F7F7F7F7F6F6F6F7F7F7F6F6F6F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7BFBFBFBEBEBEBEBEBEBCBCBCBBBBBBBABABAB9B9B9B7B7B7B5B5
+      B5B4B4B4B2B2B2B1B1B1B0B0B0AEAEAEADADADACACACABABABAAAAAAA8A8A8A7
+      A7A7A6A6A6A5A5A5A3A3A3A2A2A2A0A0A09F9F9F9E9E9E9C9C9C9C9C9C9A9A9A
+      9999999999999AA2BD9CB3FB9CB3FB9BB3FB9BB3FB9BB2FB9BB2FB9BB2FB9AB2
+      FB9AB2FB9AB2FB9AB1FB9AB1FB9AB1FB99B1FB99B1FB99B0FB99B0FB98B0FB98
+      B0FB98B0FB98AFFB98AFFB98AFFB97AFFB97AFFB97AFFB97AEFB97AEFB96AEFB
+      96AEFB96AEFB96AEFB96ADFB95ADFB95ADFB95ADFB95ADFB95ACFB95ACFB94AC
+      FB94ACFB94ACFB94ABFB94ABFB93ABFB93ABFB93ABFB93ABFB92AAFB92AAFB92
+      AAFB92AAFB92AAFB92AAFB91A9FB91A9FB91A9FB91A9FB91A9FB90A8FB90A8FB
+      90A8FB90A8FB90A8FB8FA8FB8FA7FB8FA7FB8FA7FB8FA7FB8FA7FA8FA7FA8FA7
+      FA8FA7FA90A8FA91A8FA90A8FA90A8FA91A8FA92A9FA92A9FA92A9FA93AAFA94
+      AAFA93AAFA94AAFA94ABFA95ABFA95ABFA95ACFA96ACFA97ACFA98ADFA98ADFA
+      98ADFA99AEFA9AAFFA9AAFFA9BB0FA9BB0FA9CB0FA9DB1FA9EB1FA9EB2FA9FB3
+      FAA0B3FAA1B4F9A1B4F9A2B5F9A3B5F9A3B6F9A4B6F9A5B7F9A6B8F9A7B9F9A8
+      B9F9A8B9F9A9BAF9AABBF9ABBBF9B4B8C8B8B8B8BABABABBBBBBBCBCBCBDBDBD
+      BEBEBEBFBFBFC0C0C0C1C1C1C2C2C2C3C3C3C4C4C4C4C4C4C5C5C5C6C6C6C8C8
+      C8C9C9C9CACACACACACACCCCCCCDCDCDCECECECECECECFCFCFD0D0D0D1D1D1D1
+      D1D1D3D3D3D3D3D3D4D4D4D4D4D4D5D5D5D6D6D6D6D6D6D7D7D7D8D8D8D8D8D8
+      D9D9D9DADADADADADADBDBDBDCDCDCDCDCDCDDDDDDDEDEDEDEDEDEE0E0E0E0E0
+      E0E1E1E1E2E2E2E2E2E2E3E3E3E4E4E4E5E5E5E5E5E5E6E6E6E7E7E7E7E7E7E7
+      E7E7E8E8E8E9E9E9EAEAEAEAEAEAEBEBEBEBEBEBEDEDEDEDEDEDEEEEEEEEEEEE
+      EFEFEFEFEFEFF0F0F0F1F1F1F1F1F1F1F1F1F2F2F2F2F2F2F3F3F3F4F4F4F4F4
+      F4F4F4F4F4F4F4F5F5F5F5F5F5F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6
+      F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F6F7F7F7F7F7F7F7F7F7F7
+      F7F7F6F6F6F7F7F7F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F6F6F6F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F6F6F6F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7
+      F7F7
+    }
+  end
+  object Bevel2: TBevel
+    Height = 2
+    Top = 64
+    Width = 501
+    Align = alTop
+    Shape = bsTopLine
+  end
+  object Bevel3: TBevel
+    Height = 2
+    Top = 270
+    Width = 501
+    Align = alBottom
+    Shape = bsTopLine
+  end
+  object eSvcLibName: TEdit
+    Left = 119
+    Height = 21
+    Top = 125
+    Width = 373
+    Anchors = [akTop, akLeft, akRight]
+    TabOrder = 1
+  end
+  object eSvcName: TEdit
+    Left = 119
+    Height = 21
+    Top = 151
+    Width = 373
+    Anchors = [akTop, akLeft, akRight]
+    TabOrder = 2
+  end
+  object ePrjName: TEdit
+    Left = 119
+    Height = 21
+    Top = 99
+    Width = 373
+    Anchors = [akTop, akLeft, akRight]
+    TabOrder = 0
+  end
+  object ePrjDir: TEdit
+    Left = 119
+    Height = 21
+    Top = 241
+    Width = 292
+    Anchors = [akTop, akLeft, akRight]
+    TabOrder = 7
+  end
+  object eTemplateName: TEdit
+    Left = 119
+    Height = 21
+    Top = 73
+    Width = 373
+    Anchors = [akTop, akLeft, akRight]
+    Color = clBtnFace
+    ReadOnly = True
+    TabStop = False
+    TabOrder = 6
+  end
+  object BitBtn1: TBitBtn
+    Left = 417
+    Height = 25
+    Top = 239
+    Width = 75
+    Anchors = [akTop, akRight]
+    Caption = '&Browse'
+    Glyph.Data = {
+      36030000424D3603000000000000360000002800000010000000100000000100
+      18000000000000030000120B0000120B00000000000000000000FF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FF1C99CE2BA5D51C9DD10A8AC6FF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFBFA5A34D5A72FF00FFFF00FF249CCFA6EEF7
+      6CEBF85DD9F04AC7E739B8E020A0D40F91CA0F91C9FF00FFFF00FFBFA5A35766
+      831276E23C91DCFF00FF0C8CC799DDEF8BFFFF80FCFF82FBFF7FFAFF79F3FF65
+      E1F74ECEED3CBAE07591A05B66811170D833A1FF2A9AFEFF00FF1296CC59BADE
+      9FFEFF75F7FF78F6FF77F2FC89D9E087D7DE7BE2EA91BCC05168891370D531A0
+      FF319EFBFF00FFFF00FF26A5D448C1E69FEFF879F6FB87D8DCBACABCDABCA5D0
+      B59EAF9A8C817A734179AF32A3FF3DACFE1B9CD4FF00FFFF00FF27AFDE8B97A1
+      88CFE28BD1D3CBB4ADF7F0DDFFFFD8FFFFD9FAF8C5CFB08CC4A9A34DC1FC55D0
+      FB41C1E3FF00FFFF00FF25AFE1AD706B5DBCDDB5A69EF7F4EEFFFFFFFFFFE3FF
+      FFD4FFF7C1FFE6A5D8A0826FD4EB59D7FB68E2F80E90C9FF00FF26AFE1B5776D
+      A4CFD9CEB69EFFFFEAFFFFF3FFFFEAFFFFD7F7DCA9F6C986E1B89191C0C753D3
+      FB7EF3FF28AAD8FF00FF28B0E0BC7F6EFFF4EBD5BCA1FFFFDDFFFFDDFFFFE0FF
+      FACAEFBD81F4BD77E7C49A93C0C44FD3FB7DF4FF56D5EFFF00FF28AFE1C58870
+      FFFCF8CAAA99FEFFCEFFFFC9F8E1ADF0C78CF3CA96FFEBB5D5AF959AC9D37AE0
+      FE9DFBFF96F8FF23A1D328B0E1CE9173FFFAF7D8C4BDDCC59EFCE5A7FAC782FB
+      D08BFFF7E0E7DCCE8CA5AA6BC9E65FBCE060BBDE6CC4E329A1D12DB2E2D59975
+      FFF8F3FCFBFAE5D1C9E9CAA6E7C599E1C298CCB59FB18B8875E7F86DEDFE179D
+      D1FF00FFFF00FFFF00FF1FA1D9DDA077FFFBF6FFFFFFFFFFFFFFFFFEFBF4EBB4
+      8379BF7849B16F5350C0E550C4E71C9DD0FF00FFFF00FFFF00FFFF00FFE2A678
+      FFFFFFFFFFFFFFFFFFFFFFFFF8FAFCB6877AE29955FF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFE7AB79D1926DD1926DD1926DD1926DD1926DB4
+      7E6FFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+    }
+    NumGlyphs = 0
+    OnClick = sbBrowseForDirClick
+    TabOrder = 5
+    TabStop = False
+  end
+  object cbMessageClass: TComboBox
+    Left = 119
+    Height = 21
+    Top = 209
+    Width = 373
+    Anchors = [akTop, akLeft, akRight]
+    AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
+    ItemHeight = 13
+    Style = csDropDownList
+    TabOrder = 4
+  end
+  object cbServerClass: TComboBox
+    Left = 119
+    Height = 21
+    Top = 184
+    Width = 373
+    Anchors = [akTop, akLeft, akRight]
+    AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
+    ItemHeight = 13
+    Style = csDropDownList
+    TabOrder = 3
+  end
+  object Panel1: TPanel
+    Height = 41
+    Top = 272
+    Width = 501
+    Align = alBottom
+    BevelOuter = bvNone
+    ClientHeight = 41
+    ClientWidth = 501
+    TabOrder = 8
+    object Image1: TImage
+      Left = 5
+      Height = 32
+      Top = 4
+      Width = 32
+      Anchors = [akLeft, akBottom]
+      Picture.Data = {
+        055449636F6ED65700000000010006003030000001000800A80E000066000000
+        2020000001000800A80800000E0F0000101000000100080068050000B6170000
+        3030000001002000A82500001E1D00002020000001002000A8100000C6420000
+        1010000001002000680400006E53000028000000300000006000000001000800
+        000000000009000000000000000000000001000000010000000000000D0D0D00
+        131313001C1C1C001C1C260013163F001F202000242424002827270023242F00
+        27282A002A2A2A00322E2E003B2E2E00282932002F313D003333330039353500
+        3C38370031333F003B3A3B0043393900503B3A000C0C4800171C48000A0A5600
+        0A0C5B000D115800151959001C214100262A49003A3C4700363C55000D0D6D00
+        0E14660012186D001F2B6D001A297B00323C610022337E00333F7000403F4200
+        384265003A467400434343004A43420041444D004C4C4C0057444300534B4A00
+        464A5900535353005854540053555E005B5A5A00694D4C0069594A0066595500
+        6D5E52006C5E5C006E63570073665B0041496700565B690045517B00535C7800
+        5E616A005B627A00636363006A64630062656D006969690071676300766B6000
+        7A6E6400726E6D007B6C6A007E716A00747474007A7472007B7874007C7C7C00
+        87693F00DA7F0E00816B4D008769670082726D00817D6E008275730089767300
+        847A74008B7A7600827C7C008D7B780090787600917E7900EB870C00FE8D0700
+        FE920B00E58C1500EB931B00FE9A1600EA9B2700E9A12D00FEA62700EBA63400
+        FEAD3300FFB33800A58C5A00B79A5B008C817A0091897A00A49A7900B7A56F00
+        AFA17600D79C4E00D0AF5F00EEB74E00FCB94400E9BA5400F0B85100C59F7300
+        C3A96700D7BF7600EFB56400FFC04C00FFC65800FFCD6400FFD26A00FFD87600
+        FFE17E000E1E8400080C930001039B000A189A00172886002C3F8800213B9E00
+        0004A300040CA4000007A9000009AC000813A100000CB2000111B9001734AB00
+        0928BB001333B900223EAB002E4189002D4395002E4AAF00354EA5003E56A800
+        2645B9003251BC004A578400535F84005D678300445CAA00405DBF004860AC00
+        566AA7004E68B900536DBA00021DC800001ED7000624C6000E33CB00173CC800
+        0021DD000735EA00103DE700002FF8000739FE00103FF3001740DB002446C500
+        254BD5003054D3001642E7001547FE001F50FF002E58E9002858FF003867FE00
+        4766C600446AE0004B72E600436FF5004371FD00828281008B8682008A8A8A00
+        94888600979087009A928C00949393009C9194009E9A97009B9A9A00A2959300
+        A5989600A39D9E00AA9D9B00AFA19F00A69EA500A2A2A200ADA5A400ADA7A900
+        ADABAA00B4A9A600B4AFAD00B8ABA900B5AEB200B9B5B700CAB49D00E0B78200
+        C9B6A600C2B7B500C4B8B700C4BCBB00CABFBC00FBCF8E00E3D08400FFDD8000
+        EECB9500EBDE9300FEE38800FEEB9700FFF49C00C9C0BF00DCCBB700F2D3A700
+        F8EEA300FEF3A600FFE3B500FFFAB100C2BDC500C9C5C500D5CECD00CECAD000
+        D0CED000D6D4D600DCD4D300DDDADB00E7DED300E3DCDB00FAE7CA00E6E0DE00
+        E4E3E300E9E5E300EAE9E900F9F7F70000000000000000000000000000000000
+        00000000000000000000004B2F0202010101012C440000000000000000000000
+        0000000000000000000000000000000000000000000000BF1103030202020201
+        020101010101020B2F4E514E4E5151C100000000000000000000000000000000
+        00000000004B0306030303030203020201010101020306080B0C1010100B1029
+        334BC800000000000000000000000000000000BF060606060603030303020202
+        02020202030B4BC4D0D3CCC45D4D3B31101033C1000000000000000000000000
+        0000290B0B0B060B06060306051B1B1B1919170444DDF7F5F4F0DED5C95F5B5B
+        56310B36000000000000000000000000000B0B0B0B0B0B0606060604228D8D8D
+        8A852133F7FBFBFCEF5C4B45454D5959595F2D29C50000000000000000000051
+        10100B0B0B0B080B06080606058F8D8A8A851B50FDFCFDEF33BF5CBFBF362C56
+        595D3B2900000000000000000000BF10101010100B0B0B0B080606061C8F8F8D
+        8B842129F5FDFDD144FBC9CDDBDB452D5F591144000000000000000000002910
+        1010100C0C0B0B0B0B0B060823908F8B84231E0929C8DDBF2CC255555EC2482D
+        4D11290000000000000000000029102910101010100C0B0B0B0B08061C90908E
+        1C0C2914101129100C0D0D15163730080806020000000000000000002F291111
+        2910101010100C0B0B0B0B0B061C90182CC4C0D7D7CBC25856565645312D0C03
+        0B0B060B00000000000000C129292911112911101010100C0B0B0B0B0B08080A
+        D1C839E2ECF8F6EFD7CEC6C9CACAC94B2C0B0B062F0000000000002C29141414
+        14141114101010100C0B0B0B08060A06DDCB3A60626268767FDFE9E8DCD7D6DC
+        DDC72F0B0B44000000004E2C2C2C292C1414141111111010100C0B0B0B0B080A
+        DDD13D6062626261616262656B7CD9D8D6EEF1C81110BF0000002F2D2C2C2C2C
+        142C141414101010100E0C0C0B0B0B08EFD64960626262656565656565626265
+        667379D8D6104B0000C82F2F2C2C2C2C2C142691A893271010100C0C0C0A0B08
+        F2D74A60656568686868686868686862626262535D292C0000442F2F2F2D2C2C
+        2C95AEAEAEAEAE911010100E0C0C0A0AF3EE4D6465686868686B6A6B68686868
+        686562604A290B00002F2F2F2F2F2F2C2EAFAEAEAEAEADAD271010100C0B1008
+        F5EF576468686A6B7676767676766B68686865604A1406000033332F2F2F2C2F
+        2BB5B5AEAEAEADAE9214111010100B08FAF25A676A6B767D7D7D7D7D7D767676
+        6A68686348290651C133332F2F2F2F2C2BB5AEB5AEAEAEAEA811101010101007
+        FCF36E676B7D7D7E7E7F7F7F7E7E7D76766A68643D110A334E333333332F2F2F
+        3EB5B5B5AEAEAEAE9114141410101007FCF56E6B767D7E7F80808080807F7F7D
+        7D6B6B663C14082936333333332F2F2F2FB2B5B5B5AEAEAF201414101010100A
+        FCF56F757D7E8080818181818180807F7D7D6B663C100802363633333333332F
+        2F32B2B5B5B5AF281414141414141007FCFAC3757E7F808181E4E4E4E1818080
+        7E7D766738100A02363636333333332F2F2F2F3E2B2B2929292C14141410140A
+        FCFAC3757E808182E4E5E5E5E4E481807F7E766938100A033636363633333333
+        332F2F2F2E2C2C2C2C2C142C1414140AFCFAC3777F8082E4E5E5EAEAE5E4E180
+        807E7D69381008033644363636333333332F2F2F2F2F2F2C2C2C2C141414140A
+        FCFCC575808082E4E6EBEDEBE5E5E180807E7D69381008034436363636363333
+        3333332F2F2C2F2C2C2C2C2C1414140AFCFAC76C6D6D747BE0E3EAEBE6E48281
+        807E7D6938100B0351444436363636333333332F2F2F2F2F2F2C2C2C2C2C140A
+        FCFCF2D7D4D2C8C150576F7072717A74777576673A100B2CC544364436363636
+        33333333332F2F2F2C2F2C2C2C142C0AEFFDFCFDFDFDFCF5F0E7D4CBC7C1C158
+        453C54523D100B33004444443644363636333333332F2F2F2F2C2F2A2E2C140B
+        0E1E2E354EBFC5C7D2D7E7E7EEDEDBD5CCC7C05C560C08C10044444444363636
+        363633333333332F2F3EB1B5B5962C2AACABAB931E0B0B080B080E112E34454B
+        4F58C04D11080300005144444444364436419F9C3533332F2F98B6B5B5B5B4AF
+        AEAE891F10141410101024A5928683231D0608060606140000D1474444444436
+        41BDB9B9A0333333339BB6B6B5B5B5AEB5A92C1414141014101010A7AAAAAAA5
+        0E0608060606BF000000474744444442BDB9B9B9B93F333333B3B6B6B6B5B5B5
+        AEAE2C14141414141014100F2587250E0B0B0806080600000000C14B444444A2
+        BEBEBEB9B9A035359CB7B8B6B6B6B5B5B6B5B0948920141410141010110C0C0B
+        0B0B0808064700000000004747474442BCBEBEB9B9B9B9B8B8B8B8B8B8B6B6B5
+        B5B5AEB5AEA91414141410111010100C0B0B0B0808000000000000CF47474744
+        9EBDBEBEBEB9B9B9B9B8B8B8B8B6B6B6B5B5B5AEB5B41414141410141010100E
+        0C0C0B0B51000000000000004E474747449EBEBEBEBEB9B9B9B9B9B8B8B8B6B6
+        B6B5B5B5AE952C2C14141410141010100C0C0C140000000000000000004B4747
+        44479EBEBEBEBEB9B9B9B8B9B8B8B8B6B6B6B6B5B52C2C2C2E20141410141010
+        100E0B0000000000000000000000474B47444B9EBCBEBEBEB9B9B9B8B9B8B8B8
+        B6B6B6B5B59A2E95ACAE8914141014101010000000000000000000000000CF47
+        4B47444447A4BEBEBEB9B9B9B8B9B8B8B8B8B6B6B6B5B5AEB5AE891414141014
+        10BF00000000000000000000000000CF4747474747449EBABEBEB9B9B9B9B8B9
+        B8B8B6B6B6B5B5B5B12A2C142C141410BF000000000000000000000000000000
+        004B47474444444443A3BBBEB9B9B8B9B8B8B8B6B6B2973E2C2C2C2C14141400
+        0000000000000000000000000000000000004E47474744444444363F9DA1A19F
+        99999940322F2F2C2F2C2C2C2C2F000000000000000000000000000000000000
+        000000CF474747444444444436363635333333332F2F2F2F2C2F2C2CC1000000
+        000000000000000000000000000000000000000000C544474444443644363636
+        3633333333332F2F2F2C51000000000000000000000000000000000000000000
+        00000000000000D14E444444443636363636333333332F46C800000000000000
+        000000000000000000000000000000000000000000000000000000C551443636
+        36363651BF00000000000000000000000000000000000000FFFFE007FFFF0000
+        FFFE000000FF0000FFF80000001F0000FFE00000000F0000FFC00000000F0000
+        FF80000000070000FE000000000F0000FC000000000F0000FC000000001F0000
+        F8000000001F0000F0000000000F0000E000000000070000E000000000030000
+        C000000000010000C00000000001000080000000000100008000000000010000
+        8000000000010000800000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        8000000000000000800000000001000080000000000100008000000000010000
+        C000000000030000C000000000030000E000000000070000E000000000070000
+        F0000000000F0000F8000000001F0000FC000000003F0000FC000000003F0000
+        FE000000007F0000FF80000001FF0000FFC0000003FF0000FFE0000007FF0000
+        FFF800001FFF0000FFFE00007FFF0000FFFFE007FFFF00002800000020000000
+        4000000001000800000000000004000000000000000000000001000000010000
+        000000000C0C0C0012131300171818001C1C1C0017182200242424002B2B2B00
+        312E2E0031302F002D2E300033323200383635003B3B3B0045363600453C3B00
+        171B450014174D000B0C5B001319520010155D00151B5C001D214100232B4A00
+        3D3C41003A3D49002B3359003339520009117A00192D760029356800333C6200
+        3C4257003E445B003A4675003D497700434243004C45440045444B0049474800
+        4B4B4B00524B4A005A4F4E005B524F0042455100494B55004E50590053535300
+        5953530052555F005A5A5A00684F4D00685755006A5E5D007A6A5A00434C6D00
+        5C5E650063636300696666006A6A6A007E6462007D6E6700756C6B007D6D6A00
+        7E726B0061677800737372007B7677007B7877007D7B7B00A77F4200816F6000
+        85756F008A7774008B7C7600817F7E00897B7A00907D7800BA823500B5833C00
+        DC800F00DC811100DC881800FE8F0900FF950500FE930B00F7921300FE9A1300
+        FE9E1B00FEA11C00DC902300DD972D00DE9E3700E7932A00FEA32200FFAB2B00
+        F8A53300FFAD3200FFAF3800FFB33300FEB43A00FFBC3A00AC824200B1834100
+        A1885500B89A57008B807E0091837C0096907F009D957B00AF9D6D00B89F6200
+        A4997600DEA44100DEAB4C00C9A45800DEB25000E1AF4F00FFB74100FFBA4300
+        FEB64F00FFBF4C00E7A95100C9AC6400C4A37A00D3AA7600F4BB6800FFC24200
+        FFC04E00FFC45300FFC65800FFCA5C00DEC67800FFCD6400FFD06200FFD86600
+        FFD26A00FFD57300FFD97600FFD97800FFE17A0004088C00183089000005A500
+        0009AB00000CB100000FB8001B39AA001131BB00374A8D002C429500344A9900
+        2D46A3003851A7003C54A8002F4DBC00485A950055669C0060688200566AA700
+        1538C200183BC300153ACA00062FDE00123EE7000332F0000D3CF2000134FD00
+        073AFF000C3EFF00224ADD00385FDF003C62DF001442F3001847F3001244FF00
+        1C4DFF00204AE8002853E9002758FF003C65EA003C68F4003363FF003C6BFF00
+        4A67C200496EE1004C72E1004572FA00837E8100818080008C8685008C8B8B00
+        928A8400968D8D009B8C8B009C938B00919092009B9293009F959A009E989A00
+        A0969500A0989200A49C9A00AC9C9800A9A29E00A7A7A700ABA6A300AFABA400
+        ADA6AA00B3A6A600B1AFAB00BBAFAC00B1B0AF00BAB6BB00BCBCBC00E2BB8800
+        C9B4A400CEBAA500C2B7B400C4BCBC00CABDBA00DAC09A00EDDA8C00FFDE8100
+        FFE18500FEE48A00FFEB8B00FEE69100F0E59D00FEEC9900FFF09900F8EEA300
+        FFF6AA00C0BAC000C5C4C500CAC4C400CEC9C700C4C5C900D5C9C600D5D0CF00
+        DED3C900CFCFD000D5CFD000D1D0D000DCD7D700DCDBDB00E0DDDD00F6E2C900
+        E2DEE000E3E3E600EBE6E500EEECEC00F4F3F500FCF7F600FEFEFE0000000000
+        0000000000000000000000002F060201010106090D282F292524284500000000
+        00000000000000000032040404020202020209BFDBEBDCD1C2493F2B0C000000
+        000000000000003B06060604040404020218EEFBFAEFCAC04C494A4D3F0D0000
+        0000000000000D0A0A0606060414908F124BFDFCF6424345422B35496B250000
+        000000000009090A0A060606061091908D24F6FEEA45EECBD3CC29483F080000
+        000000000D0909090A0A07060615921C1105244B3B2434333C49292908000000
+        000000270D0D0909090A0707061613243EBC43352B2A29250F0E060102000000
+        0000430D0D0D0D0C09090A07070624D240DDF7F0DCD1C6C6C5BE3E1803240000
+        00002418180D0D0C0C09090A0A062FEA3F51575E62787ED7D9DADBD5C62F2400
+        0043242724180D0D0C0C09090A072FF1485053535353535758607A7DD8EBC40D
+        0028272724241FA1A5941A09090A2FF64A515757585E5E5858585357565D7C38
+        00282827272CA6A8A8A7A30C090932F96B52585E5F5F6161615F5E5957544E31
+        452F28282722AFA9A8A7A71E0C0932FBC05A5F61647677777664645F5E574F2E
+        392F2F282823AFA9A9A8A71B0C0C38FCC35B617780818282818077645F594F2D
+        2F322F2F2828AAB0A9A9A1180D0C32FEC95C7F818385858885838177645F6727
+        32322F2F2F282E9798962418180D32FECA71818388898A898988858177636726
+        3232322F322F282828272718181832FECC72838889DFE0E1DF8A888381656618
+        393232322F2F2F2828272724240D32FECE728689DFE1E5E5E3E08986817F4618
+        3B393232322F2F2F28282824242432FED174878AE1E5E8E8E5E18B88827F6618
+        BF3939323232322F2F2828282C2132FED268697B84DEE4E7E6E28C88837F6618
+        00393939323232322F2F2837B2AF39FEF6EDD5CDC9C06C6D706E6F7375766624
+        003B39393938B5B69C2F2F99B0B020CDD6F3F6F6F6F4F3DBD0C7C16B40364728
+        00BF3A3939B9B7B7B432289AB3B0938E1D170A0D272B3B45BEC1C8CAC8C23E09
+        00003B3A39BABBB7B7ABABB6B3B3B0B0AFAFA9A20D09090A06060A0609092F00
+        0000C43A3A41BBBBB7B7B7B6B3B3B3B0B0AFAFA418180D090D090A080A320000
+        000000433A3A9EBBBBB7B7B6B6B3B3B0B0B0AF962419190D0C0C09090D000000
+        000000003A3B3A41BABBB7B7B6B6B3B6B3B0B0AE96ADA61F0D0C0C0900000000
+        00000000003B3B3A3B9FBBB7B7B6B6B3B3B3B0B0AFAD960D0D0D0C0000000000
+        000000000000423A3A39399DB8B4B7B6B3B3B29B952724241827000000000000
+        00000000000000C43B3A3939393232322F2F2F28282827243B00000000000000
+        000000000000000000C43B393939323232322F2F282842000000000000000000
+        000000000000000000000000BF3A3932323232BD000000000000000000000000
+        FFF0000FFF800007FE000003FC000003F8000003F0000007E0000007C0000003
+        C000000180000000800000008000000000000000000000000000000000000000
+        00000000000000000000000000000000800000008000000080000000C0000001
+        C0000003E0000007F000000FF800001FFC00003FFE00007FFF8001FFFFF00FFF
+        2800000010000000200000000100080000000000000100000000000000000000
+        0001000000010000000000000D0D0D0012121200191A2A001D1F340021212100
+        2626260024252B002A2A2A002A2A2C002C2C2C0030303000353535003A373700
+        3939390039393C003D3D3D000A0B50000A0E5D00282E4A003E3E400031364A00
+        232C5A0028325F00363D5A003A3D5C00121A6E00434343004343440042434800
+        484848004D4D4D0045485600525252005757570050535F005C5C5C006A5D5B00
+        6B5E5D00474E66005C5D60005F636E0062626200656565006762680066676A00
+        6A6868006D6D6D007163610071666600706F6F0071717100747474007C7C7C00
+        987C58008374710080787200857B7900857C7B00F98F0C00F99B1B00FE9E1C00
+        CA852D00C78C3500C6913D00FE9D2000FEAA2C00FEAE3300F9B13A00FFB63E00
+        AA947200C5944200F8AB4400E1B95E00E2A96200FAC25500FFC45500FFC75A00
+        FFCA5E00FFCF6500FFD87600FED978000C0F81002B3C8200273C900020319A00
+        000BAF001935A5003E4F8B002E48A9003E56A9003D57B200495D9F0051619500
+        57689C00455DAB00536BB400183BC1001339D2000732E1000739FE001E42C900
+        1B42D5001A42D9001742E5001B4AF7001041FF00194AFF002253FF002B5BFF00
+        3564FF003F6CF9003E6DFF004260C1004E6FD000858484008D8D8D009B8D8B00
+        91919100959595009F9895009A989A009F9E9E00A2958800A1989600AEA79F00
+        B0A49200A6A7AB00AEAAA900B2ACAA00B3B1B300CCA98400C2BDBB00C5BFBE00
+        F1D78200FEE18600FEE68C00FBF0A300CAC7C400CDCCCA000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        000000000000000000000000002F0C02010A2B35350000000000003406060312
+        112F847C372532000000220C0A06045652797A753930730000350E0C0A0A071A
+        2C7B3930260C2400001B0E0E0C0A0A06783B41484A833874731E1B6163170C0A
+        803C4243423C3E2B2B1E206A64570C0A84444C4E4D443F0E24221E5965180E0C
+        8A4C5087514E40062422221E1E1B0E0C8B498689884E470A342422221E1E1D0E
+        7F82807D7E46360E762B245C2327696562150C1655190E34002B5E70715B6C69
+        68540E0C130A060000762F72706E6D6C6967140E0C0B34000000352C60706E6D
+        6C6967530E220000000000762E295D5F5A58201B350000000000000000743424
+        222B730000000000F8070000E0010000C0010000800100008000000000000000
+        00000000000000000000000000000000000000008001000080010000C0030000
+        E0070000F81F0000280000003000000060000000010020000000000080250000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        00000000000000000000000000000000000000001919192F1717176F1616169F
+        141414BF121212FF101010FF0F0F0FFF0D0D0DFF0B0B0BFF0A0A0AFF080808BF
+        080808A1090909751414144134343425343434333434343C3434344134343444
+        34343444343434423434343D3434343534343427343434183434340C34343405
+        3434340200000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        00000000000000002020201F1E1E1E8F1C1C1CDF1A1A1AFF191919FF171717FF
+        151515FF141414FF121212FF101010FF0F0F0FFF0D0D0DFF0B0B0BFF0B0B0BFF
+        0C0C0CFF0E0E0EFF131313FF1B1B1BED242424CD303030A9343434A7343434AC
+        343434AD343434A8343434A03434349134343477343434513434342F34343418
+        3434340934343403000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        2424242F232323AF212121FF1F1F1FFF1E1E1EFF1C1C1CFF1A1A1AFF191919FF
+        171717FF151515FF141414FF121212FF101010FF0F0F0FFF0E0E0EFF0F0F0FFF
+        131313FF1A1A1AFF222222FF272726FF2A2A2AFF2F2E2EFF343434FE343332FD
+        2F2E2EFC2C2B2BFA2B2B2BF62B2C2CEA303030D1343434B43434348234343441
+        3434341D34343409343434020000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000002A2A2A0F2828288F
+        262626FF242424FF232323FF212121FF1F1F1FFF1E1E1EFF1C1C1CFF1A1A1AFF
+        191919FF171717FF151515FF141414FF121212FF101010FF111111FF131313FF
+        1F1F1FFF2D2D2DFF6B6767FF979190FFADA5A4FFB2A9A6FFAB9F9DFF9E908EFF
+        8B7B79FF7D6C6AFF6C5E5CFF524948FF2D2A2AF42A2B2BF5303030D034343492
+        3434343F34343416343434040000000000000000000000000000000000000000
+        00000000000000000000000000000000000000002D2D2D3F2B2B2BEF292929FF
+        282828FF262626FF242424FF232323FF212121FF1F1F1FFF1E1E1EFF1A1B25FF
+        13163FFF0D1158FF0B0E5EFF0A0C5BFF090A58FF0A0A56FF0C0C48FF1E1E27FF
+        5F5D5CFFC2BDBCFFE6E0DEFFE1DAD9FFDCD4D3FFD7CECBFFCABFBCFFB8ABA9FF
+        A49591FF917F7BFF8C7875FF8F7A77FF84736FFF544B49FF2A2A2AFA303030C9
+        3434347434343424343434050000000000000000000000000000000000000000
+        000000000000000000000000000000003030306F2E2E2EFF2D2D2DFF2B2B2BFF
+        292929FF282828FF262626FF242424FF232323FF212121FF1F1F1FFF1C1D27FF
+        0E1466FF0009ADFF0007A9FF0005A5FF0003A1FF01029BFF0D0D6DFF525150FF
+        E5DEDDFFEAE6E3FFE9E5E3FFEDE9E9FFC9C5C4FF807D7BFF6F6C6BFF6A6665FF
+        6B6362FF796C69FF8A7773FF897674FF897774FF917D79FF4B4442FF2A2A2AE9
+        343434853434342A343434050000000000000000000000000000000000000000
+        0000000000000000000000003333339F323232FF303030FF2E2E2EFF2D2D2DFF
+        2B2B2BFF292929FF282828FF262626FF242424FF232323FF212121FF1F1F1FFF
+        161A43FF000BB1FF0009ADFF0007A9FF0106A3FF02059CFF10105EFF7A7877FF
+        F7F2F0FFEEEBEBFFFCFBFBFFC4C2C2FF555454FF878484FF827D7DFF878483FF
+        838180FF5D5B5BFF464140FF81706DFF887673FF8F7B78FF665957FF282828E8
+        3434346734343420343434050000000000000000000000000000000000000000
+        00000000000000003737379F353535FF333333FF323232FF303030FF2E2E2EFF
+        2D2D2DFF2B2B2BFF292929FF282828FF262626FF242424FF232323FF212121FF
+        141959FF000DB5FF000BB1FF010AAAFF040AA1FF080C93FF11136BFF3D3D43FF
+        DEDADAFFFFFFFFFFFFFFFFFFA5A5A5FF636262FFE7E1E0FFA69793FFAFA19FFF
+        BDB2B0FFC4B8B7FF6C6868FF4C4543FF917E79FF8A7875FF3C3736FF282828B6
+        3434343334343412343434030000000000000000000000000000000000000000
+        000000003A3A3A6F383838FF373737FF353535FF333333FF323232FF303030FF
+        2E2E2EFF2D2D2DFF2B2B2BFF292929FF282828FF262626FF242424FF232323FF
+        10196FFF0010B9FF010EB2FF040EA7FF0A1196FF14186FFF20224FFF23242FFF
+        393A3AFF969696FFBBBBBBFF808181FF484241FF9D8887FF836462FF8B6E6CFF
+        907876FF998682FF726765FF4B4443FF796A68FF393535FF222222DC2B2B2B3D
+        3434341A34343408343434010000000000000000000000000000000000000000
+        3D3D3D3F3B3B3BFF3A3A3AFF383838FF373737FF353535FF333333FF323232FF
+        303030FF2E2E2EFF2D2D2DFF2B2B2BFF292929FF282828FF262626FF242424FF
+        181E54FF0012BEFF0211B5FF0813A1FF191C57FF2D2D31FF403F42FF3D393DFF
+        3A3535FF3A3635FF3C3837FF383434FF322E2DFF342E2EFF3B2E2EFF433333FF
+        503B3AFF694D4CFF574443FF282727FF2A2A2AFF1F2020FF111111FF1B1B1B68
+        343434183434340934343403000000000000000000000000000000004141410F
+        3F3F3FEF3D3D3DFF3B3B3BFF3A3A3AFF383838FF373737FF353535FF333333FF
+        323232FF303030FF2E2E2EFF2D2D2DFF2B2B2BFF292929FF282828FF262626FF
+        242424FF161D5EFF0213B8FF191E4DFF434343FF908988FF918683FFBCB8BFFF
+        B8B1B6FFA69C9EFF968888FF877675FF7F6D6BFF81726EFF807472FF6A6462FF
+        544F4EFF443F3FFF2D2A2AFF1C1D1DFF2B2B2BFF282828FF212121FF181818ED
+        2C2C2C48343434203434340E343434050000000000000000000000004242429F
+        404040FF3F3F3FFF3D3D3DFF3B3B3BFF3A3A3AFF383838FF373737FF353535FF
+        333333FF323232FF303030FF2E2E2EFF2D2D2DFF2B2B2BFF292929FF282828FF
+        262626FF242424FF242424FF252525FFAFAFADFFA09796FF675953FFEECB95FF
+        FFE3B5FFFAE7CAFFE7DED3FFCFC7C6FFBAB5BBFFA69EA5FF9D9195FFA09292FF
+        A69896FFA99C99FFA49997FF746F6EFF434141FF2A2A2AFF292929FF252525FF
+        262626D2343434573434342A3434341100000000000000004545452F444444FF
+        424242FF404040FF3F3F3FFF3D3D3DFF3B3B3BFF3A3A3AFF383838FF373737FF
+        353535FF333333FF323232FF303030FF2E2E2EFF2D2D2DFF2B2B2BFF292929FF
+        282828FF262626FF252525FF262626FFB7B7B6FFA59F9FFF6E5E53FFEF880BFF
+        FF930CFFFF9611FFFF9F1FFFFFB543FFFFC66CFFFBCF8EFFF2D3A7FFDCCBB7FF
+        C2BAB8FFB7B1BAFFB5ADB4FFBFB6B7FFC4BABAFF9E9897FF4D4B4BFF29292AFF
+        292929FF313131BB34343462343434240000000000000000474747BF454545FF
+        444444FF424242FF404040FF3F3F3FFF3D3D3DFF3B3B3BFF3A3A3AFF383838FF
+        373737FF353535FF333333FF323232FF303030FF2E2E2EFF2D2D2DFF2B2B2BFF
+        292929FF282828FF272727FF262626FFBFBFBFFFADA7A9FF736459FFEE890DFF
+        FF910AFFFE900AFFFE8F09FFFE8E07FFFE8C05FFFF910AFFFF9610FFFF9C19FF
+        FCAB3BFFEFB564FFE0B782FFCAB49DFFBDB2B0FFC2BDC5FFCECAD0FF9D9A9DFF
+        363535FF2A2A2AF73434349E34343437000000004A4A4A1F494949FF474747FF
+        454545FF444444FF424242FF404040FF3F3F3FFF3D3D3DFF3B3B3BFF3A3A3AFF
+        383838FF373737FF353535FF333333FF323232FF303030FF2E2E2EFF2D2D2DFF
+        2B2B2BFF292929FF292929FF272727FFC7C7C6FFB6B1B2FF77685DFFEE8A0DFF
+        FF920CFFFE920EFFFE9611FFFE9915FFFE9A18FFFE9C18FFFE9C18FFFE9C17FF
+        FF9811FFFF960DFFFF9610FFFC9613FFEF9A29FFD79C4EFFC59F73FFC9B6A6FF
+        B4AFADFF323232FF313131B634343444000000004C4C4C8F4A4A4AFF494949FF
+        474747FF454545FF444444FF424242FF404040FF3F3F3FFF323C61FF1737B5FF
+        0E33CBFF1132BCFF22337EFF353535FF333333FF323232FF303030FF2E2E2EFF
+        2D2D2DFF2B2B2BFF2A2A2AFF272727FFCFCFCFFFBDB8BBFF7A6D62FFEE8B0FFF
+        FF9811FFFE9A18FFFE9F1DFFFEA321FFFEA424FFFEA526FFFEA627FFFEA627FF
+        FEA424FFFEA322FFFE9F1DFFFF9C17FFFF970FFFFF9109FFFF910AFFDA7F0EFF
+        887F77FF3D3D3EFF2A2A2ADB34343446000000004E4E4EDF4C4C4CFF4A4A4AFF
+        494949FF474747FF454545FF444444FF424242FF2C3F88FF0739FFFF0436FFFF
+        0134FEFF0031FCFF002FF8FF1431ADFF353535FF333333FF323232FF303030FF
+        2E2E2EFF2D2D2DFF2C2C2CFF272727FFD5D5D5FFC5C0C2FF7F7267FFEE9116FF
+        FF9F1BFFFEA322FFFEA628FFFFAA2DFFFFAD30FFFFAF33FFFFB034FFFFAF34FF
+        FFAD31FFFFAB2EFFFFA72AFFFEA424FFFE9F1EFFFE9A17FFFF970FFFE68107FF
+        7E7369FF3C3B3CFF262626F5343434465151512F4F4F4FFF4E4E4EFF4C4C4CFF
+        4A4A4AFF494949FF474747FF454545FF40444FFF103FF3FF0A3CFFFF0739FFFF
+        0436FFFF0134FEFF0031FCFF002FF8FF22337EFF353535FF333333FF323232FF
+        303030FF2E2E2EFF2D2D2DFF272727FFDCDCDCFFCBC6C9FF82766CFFEE981FFF
+        FFA724FFFFAB2DFFFFB034FFFFB43AFFFFB63EFFFFB741FFFFB841FFFFB741FF
+        FFB63FFFFFB43BFFFFB035FFFFAC2EFFFFA728FFFEA120FFFF9E18FFE5860DFF
+        7A6F66FF3B3A3BFF252525FF242424685252526F515151FF4F4F4FFF4E4E4EFF
+        4C4C4CFF4A4A4AFF494949FF474747FF394574FF1042FFFF0D3FFFFF0A3CFFFF
+        0739FFFF0436FFFF0134FEFF0031FCFF1132BCFF373737FF353535FF333333FF
+        323232FF303030FF2E2E2EFF272727FFE2E2E2FFD0CED0FF867B72FFEF9F28FF
+        FFAF2FFFFFB239FFFFB841FFFFBC48FFFFC04DFFFFC150FFFFC251FFFFC151FF
+        FFC04EFFFFBD4AFFFFBA43FFFFB43BFFFFB034FFFFA92AFFFFA520FFE58C15FF
+        766B60FF3A393AFF252525FF1B1B1B97545454AF535353FF515151FF4F4F4FFF
+        4E4E4EFF4C4C4CFF4A4A4AFF494949FF3B4775FF1345FFFF1042FFFF0D3FFFFF
+        0A3CFFFF0739FFFF0436FFFF0134FEFF0E33CBFF383838FF373737FF353535FF
+        333333FF323232FF303030FF272727FFE6E6E6FFD7D4D7FF8A8076FFEFA531FF
+        FFB63BFFFFBB45FFFFC14FFFFFC557FFFFC95BFFFFCA5EFFFFCB5FFFFFCA5FFF
+        FFC95CFFFFC658FFFFC251FFFFBC48FFFFB63EFFFFB034FFFFAC29FFE6921CFF
+        73675DFF393838FF262626FF181818B9565656CF545454FF535353FF515151FF
+        4F4F4FFF4E4E4EFF4C4C4CFF4A4A4AFF40496BFF1647FFFF1345FFFF1042FFFF
+        0D3FFFFF0A3CFFFF0739FFFF0436FFFF1A37A9FF3A3A3AFF383838FF373737FF
+        353535FF333333FF323232FF272727FFEAEAEAFFDCD9DAFF8E847AFFEFAB39FF
+        FFBD45FFFFC250FFFFC95BFFFFCC63FFFFD068FFFFD16BFFFFD36CFFFFD36CFF
+        FFD069FFFFCE64FFFFCA5DFFFFC454FFFFBD49FFFFB73FFFFFB132FFE69723FF
+        6D6359FF373637FF272727FF171717D1585858FF565656FF545454FF535353FF
+        515151FF4F4F4FFF4E4E4EFF4C4C4CFF4A4A4AFF254AD1FF1647FFFF1345FFFF
+        1042FFFF0D3FFFFF0A3CFFFF0A39F3FF363C55FF3B3B3BFF3A3A3AFF383838FF
+        373737FF353535FF333333FF272727FFEAEAEAFFDEDDDEFF91887FFFF0B041FF
+        FFC44FFFFFC95BFFFFCE65FFFFD36DFFFFD774FFFFD978FFFFDA79FFFFD979FF
+        FFD875FFFFD46FFFFFCF67FFFFCA5EFFFFC454FFFFBC47FFFFB63AFFE79C28FF
+        6C5E51FF363536FF272727FF161616FF595959FF585858FF565656FF545454FF
+        535353FF515151FF4F4F4FFF4E4E4EFF4C4C4CFF474A56FF254AD1FF1647FFFF
+        1345FFFF1042FFFF103FF3FF333F70FF3F3F3FFF3D3D3DFF3B3B3BFF3A3A3AFF
+        383838FF373737FF353535FF282828FFE9EAEAFFE1E0E1FF958C83FFF0B449FF
+        FFC958FFFFCE64FFFFD36DFFFFD977FFFFDD7FFFFFE184FFFFE288FFFFE187FF
+        FFDE81FFFFDA7AFFFFD56FFFFFCE65FFFFC95BFFFFC14FFFFFBB41FFEAA02DFF
+        6B5B4CFF353435FF282828FF161616FF5B5B5BFF595959FF585858FF565656FF
+        545454FF535353FF515151FF4F4F4FFF4E4E4EFF4C4C4CFF4A4A4AFF40496BFF
+        3B4775FF394574FF444444FF424242FF404040FF3F3F3FFF3D3D3DFF3B3B3BFF
+        3A3A3AFF383838FF373737FF282828FFE9E9E9FFE3E1E3FF979087FFF0B74EFF
+        FFCB5DFFFFD069FFFFD875FFFFDE80FFFFE38AFFFEE992FFFEEA96FFFEE993FF
+        FEE58CFFFFE083FFFFD978FFFFD16CFFFFCC62FFFFC555FFFFBD46FFEAA432FF
+        675748FF343434FF282828FF181818FF5D5D5DFF5B5B5BFF595959FF585858FF
+        565656FF545454FF535353FF515151FF4F4F4FFF4E4E4EFF4C4C4CFF4A4A4AFF
+        494949FF474747FF454545FF444444FF424242FF404040FF3F3F3FFF3D3D3DFF
+        3B3B3BFF3A3A3AFF383838FF282828FFE9E9E9FFE5E5E6FF99938BFFF0B851FF
+        FFCE60FFFFD36DFFFFDA7AFFFFE187FFFEE792FFFEEE9DFFFEF0A3FFFEEF9FFF
+        FEEA95FFFFE38AFFFFDC7DFFFFD470FFFFCE65FFFFC658FFFFC049FFEBA535FF
+        665546FF343234FF292929FF191919FF5E5E5EFF5D5D5DFF5B5B5BFF595959FF
+        585858FF565656FF545454FF535353FF515151FF4F4F4FFF4E4E4EFF4C4C4CFF
+        4A4A4AFF494949FF474747FF454545FF444444FF424242FF404040FF3F3F3FFF
+        3D3D3DFF3B3B3BFF3A3A3AFF27282BFFE9E9E9FFE6E6E7FF99938BFFEFBF50FF
+        FFD462FFFFD970FFFFE17EFFFFE98BFFFFEE98FFFFF4A6FFFFFAB1FFFFF4AAFF
+        FEED9AFFFEE58EFFFFDD80FFFFD572FFFFCF66FFFFC759FFFFC04BFFEAA635FF
+        685849FF343334FF292929FF1A1A1AFF606060FF5E5E5EFF5D5D5DFF5B5B5BFF
+        595959FF585858FF565656FF545454FF535353FF515151FF4F4F4FFF4E4E4EFF
+        4C4C4CFF4A4A4AFF494949FF474747FF454545FF444444FF424242FF404040FF
+        3F3F3FFF3D3D3DFF3B3B3BFF27282AFFE9E9E9FFE6E5E6FF9F9C97FFA58C5AFF
+        B4975AFFBA9E5DFFC6AB67FFD7BF76FFE3D084FFEBDE93FFF8EEA3FFFFF7A6FF
+        FFF49CFFFFED8FFFFFE381FFFFDA73FFFFD166FFFFC959FFFFC14AFFEAA535FF
+        6B5B4CFF353434FF2A2A2AFF1B1B1BFF626262CF606060FF5E5E5EFF5D5D5DFF
+        5B5B5BFF595959FF585858FF565656FF545454FF535353FF515151FF4F4F4FFF
+        4E4E4EFF4C4C4CFF4A4A4AFF494949FF474747FF454545FF444444FF424242FF
+        404040FF3F3F3FFF3D3D3DFF282828FFE9E9E9FFEFEEEDFFCCCACAFFB8B8BFFF
+        B0B0B4FFAFABABFF9E9A98FF898681FF7D7872FF817D6EFF928B75FFA49A79FF
+        AFA176FFB7A56FFFC0A767FFD0AF5FFFE3B659FFEEB74EFFFAB641FFE9A32EFF
+        6D5E4FFF363436FF2A2A2AFF1F1F1FD0636363AF626262FF606060FF5E5E5EFF
+        5D5D5DFF5B5B5BFF595959FF585858FF565656FF545454FF535353FF515151FF
+        4F4F4FFF4E4E4EFF4C4C4CFF4A4A4AFF494949FF474747FF454545FF444444FF
+        424242FF404040FF3F3F3FFF262626FFC9C9C9FFF2F2F2FFF3F2F2FFFAF8F7FF
+        FCFAFAFFF6F3F2FFE9E5E5FFDED9D9FFD4CFCFFFC6C0C1FFB5AFB0FFA39D9FFF
+        989195FF938C8EFF8E8684FF807773FF706762FF6F6355FF816B4DFF87693FFF
+        70655BFF363535FF292929FF1F1F1FC26565656F636363FF626262FF606060FF
+        5E5E5EFF5D5D5DFF5B5B5BFF595959FF585858FF565656FF545454FF535353FF
+        515151FF4F4F4FFF4E4E4EFF4C4C4CFF4A4A4AFF494949FF474747FF3C4568FF
+        41444FFF424242FF404040FF2B2B2BFF272930FF292F46FF3B3D48FF57575CFF
+        706F6FFF828282FF929191FFA19F9EFFAFABAAFFBBB6B5FFC6BFBDFFC9C1C0FF
+        C9C0BFFFC7BFBCFFC2B7B5FFB6AAA7FFAA9E9DFF9F9392FF908487FF867A7EFF
+        7F706EFF333232FF252525FF202020866666662F656565FF636363FF626262FF
+        606060FF5E5E5EFF5D5D5DFF5B5B5BFF595959FF585858FF565656FF545454FF
+        535353FF515151FF4F4F4FFF4E4E4EFF4C4C4CFF454B61FF284AC6FF1647FFFF
+        1645F3FF2D4395FF424242FF364063FF0B38EBFF0735EFFF0532E4FF0B2FBFFF
+        292F46FF2C2C2CFF292929FF282828FF282828FF282828FF272935FF31333FFF
+        44444AFF585454FF686463FF736C6BFF7A7472FF837977FF8C807EFF7A6F6DFF
+        373535FF242424FF1F1F1FFF2222224000000000676767DF656565FF636363FF
+        626262FF606060FF5E5E5EFF5D5D5DFF5B5B5BFF535C78FF465EABFF4D5980FF
+        52555FFF535353FF515151FF4F4F4FFF4E4E4EFF354EA5FF1C4DFFFF194AFFFF
+        1647FFFF1345FFFF1642E7FF103FF3FF0A3CFFFF0739FFFF203A9EFF383B48FF
+        3A3A3AFF383838FF373737FF353535FF333333FF323232FF1F2B6DFF0422CBFF
+        0721B7FF0B1F9EFF0E1E84FF131E6CFF1C2141FF232323FF252525FF222222FF
+        212222FF212121FF1E1E1EE134343406000000006868688F676767FF656565FF
+        636363FF626262FF606060FF5E5E5EFF57607BFF3D69F4FF3867FFFF3564FFFF
+        405DBFFF545454FF535353FF515151FF4F4F4FFF3251BCFF1F50FFFF1C4DFFFF
+        194AFFFF1647FFFF1345FFFF1042FFFF0D3FFFFF173DCFFF3F3F3FFF3D3D3DFF
+        3B3B3BFF3A3A3AFF383838FF373737FF353535FF333333FF323232FF0926C1FF
+        0022DFFF0020DBFF001ED7FF021DC8FF252732FF262626FF242424FF232323FF
+        212121FF1F1F1FFF1E1E1E8F00000000000000006969691F686868FF676767FF
+        656565FF636363FF626262FF5E616AFF436FF5FF3E6DFFFF3B6AFFFF3867FFFF
+        3564FFFF52586BFF545454FF535353FF515151FF3054D3FF2253FFFF1F50FFFF
+        1C4DFFFF194AFFFF1647FFFF1345FFFF1042FFFF0D3FFFFF404040FF3F3F3FFF
+        3D3D3DFF3B3B3BFF3A3A3AFF383838FF373737FF353535FF333333FF2F313DFF
+        1B2B7EFF172886FF192779FF282A36FF292929FF282828FF262626FF242424FF
+        232323FF212121FF2020201F0000000000000000000000006A6A6ABF686868FF
+        676767FF656565FF636363FF566AA7FF4473FFFF4170FFFF3E6DFFFF3B6AFFFF
+        3867FFFF4260C0FF565656FF52555FFF475688FF2E58E9FF2556FFFF2253FFFF
+        1F50FFFF1C4DFFFF194AFFFF1647FFFF1345FFFF1042FFFF1740DBFF223EABFF
+        233C9EFF363C55FF3B3B3BFF3A3A3AFF383838FF373737FF353535FF333333FF
+        323232FF303030FF2E2E2EFF2D2D2DFF2B2B2BFF292929FF282828FF262626FF
+        242424FF232323AF000000000000000000000000000000006B6B6B3F6A6A6AFF
+        686868FF676767FF656565FF62656DFF4C72E1FF4473FFFF4170FFFF3E6DFFFF
+        3B6AFFFF3867FFFF3564FFFF3261FFFF2F5FFFFF2C5CFFFF2959FFFF2556FFFF
+        2253FFFF1F50FFFF1C4DFFFF194AFFFF1647FFFF1345FFFF1042FFFF0D3FFFFF
+        0A3CFFFF183BC2FF3D3D3DFF3B3B3BFF3A3A3AFF383838FF373737FF353535FF
+        333333FF323232FF303030FF2E2E2EFF2D2D2DFF2B2B2BFF292929FF282828FF
+        262626FF2424242F00000000000000000000000000000000000000006B6B6B9F
+        6A6A6AFF686868FF676767FF656565FF5E6781FF4974F5FF4473FFFF4170FFFF
+        3E6DFFFF3B6AFFFF3867FFFF3564FFFF3261FFFF2F5FFFFF2C5CFFFF2959FFFF
+        2556FFFF2253FFFF1F50FFFF1C4DFFFF194AFFFF1647FFFF1345FFFF1042FFFF
+        0D3FFFFF103DE7FF3F3F3FFF3D3D3DFF3B3B3BFF3A3A3AFF383838FF373737FF
+        353535FF333333FF323232FF303030FF2E2E2EFF2D2D2DFF2B2B2BFF292929FF
+        2828289F0000000000000000000000000000000000000000000000006B6B6B0F
+        6B6B6BEF6A6A6AFF686868FF676767FF656565FF5E6781FF4776FFFF4473FFFF
+        4170FFFF3E6DFFFF3B6AFFFF3867FFFF3564FFFF3261FFFF2F5FFFFF2C5CFFFF
+        2959FFFF2556FFFF2253FFFF1F50FFFF1C4DFFFF194AFFFF1647FFFF1345FFFF
+        1042FFFF2E4189FF404040FF3F3F3FFF3D3D3DFF3B3B3BFF3A3A3AFF383838FF
+        373737FF353535FF333333FF323232FF303030FF2E2E2EFF2D2D2DFF2B2B2BEF
+        2A2A2A0F00000000000000000000000000000000000000000000000000000000
+        6B6B6B3F6B6B6BFF6A6A6AFF686868FF676767FF656565FF5D688AFF4974F5FF
+        4473FFFF4170FFFF3E6DFFFF3B6AFFFF3867FFFF3564FFFF3261FFFF2F5FFFFF
+        2C5CFFFF2959FFFF2556FFFF2253FFFF1F50FFFF1C4DFFFF194AFFFF1647FFFF
+        1645F3FF444444FF424242FF404040FF3B3E4BFF363C55FF3B3B3BFF3A3A3AFF
+        383838FF373737FF353535FF333333FF323232FF303030FF2E2E2EFF2D2D2D3F
+        0000000000000000000000000000000000000000000000000000000000000000
+        000000006B6B6B7F6B6B6BFF6A6A6AFF686868FF676767FF656565FF5E6781FF
+        4B73EBFF4473FFFF4170FFFF3E6DFFFF3B6AFFFF3867FFFF3564FFFF3261FFFF
+        2F5FFFFF2C5CFFFF2959FFFF2556FFFF2253FFFF1F50FFFF1C4DFFFF194AFFFF
+        1647FFFF2645B9FF41444FFF2E4189FF0D3CF3FF0739FFFF213A9DFF3B3B3BFF
+        3A3A3AFF383838FF373737FF353535FF333333FF323232FF3030306F00000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        00000000000000006B6B6B9F6B6B6BFF6A6A6AFF686868FF676767FF656565FF
+        62656DFF536DBAFF4473FFFF4170FFFF3E6DFFFF3B6AFFFF3867FFFF3564FFFF
+        3261FFFF2F5FFFFF2C5CFFFF2959FFFF2556FFFF2253FFFF1F50FFFF1C4DFFFF
+        194AFFFF1647FFFF1645F3FF1042FFFF0D3FFFFF0A3CFFFF233C9FFF3D3D3DFF
+        3B3B3BFF3A3A3AFF383838FF373737FF353535FF3333339F0000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000006B6B6B9F6B6B6BFF6A6A6AFF686868FF676767FF
+        656565FF636363FF5D657FFF4D6DCDFF4170FFFF3E6DFFFF3B6AFFFF3867FFFF
+        3564FFFF3261FFFF2F5FFFFF2C5CFFFF2959FFFF2556FFFF2253FFFF1F50FFFF
+        1C4DFFFF194AFFFF1647FFFF1345FFFF2042C4FF384165FF404040FF3F3F3FFF
+        3D3D3DFF3B3B3BFF3A3A3AFF383838FF3737379F000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        000000000000000000000000000000006B6B6B7F6B6B6BFF6A6A6AFF686868FF
+        676767FF656565FF636363FF626262FF5D6274FF4E68B9FF446AE0FF3B6AFFFF
+        3867FFFF3564FFFF3261FFFF2F5FFFFF2C5CFFFF2959FFFF2556FFFF2253FFFF
+        1F50FFFF254DDDFF2E4AAFFF41475EFF454545FF444444FF424242FF404040FF
+        3F3F3FFF3D3D3DFF3B3B3BFF3A3A3A6F00000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        00000000000000000000000000000000000000006B6B6B4F6B6B6BEF6A6A6AFF
+        686868FF676767FF656565FF636363FF626262FF606060FF5E5E5EFF5B5E67FF
+        535F84FF4860ACFF465EABFF445CABFF4159AAFF3F57A9FF3D55A8FF45517BFF
+        4B4E59FF4C4C4CFF4A4A4AFF494949FF474747FF454545FF444444FF424242FF
+        404040FF3F3F3FEF3D3D3D3F0000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000006B6B6B0F6B6B6B9F
+        6A6A6AFF686868FF676767FF656565FF636363FF626262FF606060FF5E5E5EFF
+        5D5D5DFF5B5B5BFF595959FF585858FF565656FF545454FF535353FF515151FF
+        4F4F4FFF4E4E4EFF4C4C4CFF4A4A4AFF494949FF474747FF454545FF444444FF
+        4242429F4141410F000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        6B6B6B3F6A6A6ABF686868FF676767FF656565FF636363FF626262FF606060FF
+        5E5E5EFF5D5D5DFF5B5B5BFF595959FF585858FF565656FF545454FF535353FF
+        515151FF4F4F4FFF4E4E4EFF4C4C4CFF4A4A4AFF494949FF474747BF4545453F
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        00000000000000006969691F6868688F676767EF656565FF636363FF626262FF
+        606060FF5E5E5EFF5D5D5DFF5B5B5BFF595959FF585858FF565656FF545454FF
+        535353FF515151FF4F4F4FFF4E4E4EDF4C4C4C8F4A4A4A1F0000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        00000000000000000000000000000000000000006666662F6565657F636363AF
+        626262CF606060FF5E5E5EFF5D5D5DFF5B5B5BFF595959FF585858FF565656CF
+        545454AF5252527F5151512F0000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        00000000000000000000000000000000FFFF800000070000FFFC000000030000
+        FFF0000000010000FFC0000000010000FF80000000010000FF00000000010000
+        FE00000000010000FC00000000010000F800000000010000F000000000010000
+        E000000000000000E000000000000000C000000000000000C000000000000000
+        8000000000000000800000000000000080000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000800000000000000080000000000100008000000000010000
+        C000000000030000C000000000030000E000000000070000E000000000070000
+        F0000000000F0000F8000000001F0000FC000000003F0000FE000000007F0000
+        FF00000000FF0000FF80000001FF0000FFC0000003FF0000FFF000000FFF0000
+        FFFC00003FFF0000FFFF8001FFFF000028000000200000004000000001002000
+        0000000080100000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        1C1C1C1F1A1A1A6F171717BF151515EF121212FF101010FF0D0D0DFF0B0B0BFF
+        0B0B0BE3141414DF282726E7424040EE514D4CF7504A4AFA443F3EF6363232EB
+        262424D21B1C1C911C1C1C180000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000002424243F212121BF
+        1F1F1FFF1C1C1CFF1A1A1AFF171717FF151515FF121212FF101010FF131313FF
+        363534FF8C8988FFC2BBBBFFCCC4C2FFC7BDBBFFB6A7A5FF9D8B88FF897774FF
+        7E6E6BFF5B524FFF2B2928EF1B1C1C5F00000000000000000000000000000000
+        000000000000000000000000000000002B2B2B0F292929AF262626FF242424FF
+        212121FF1F1F1FFF1C1C1CFF1A1A1AFF171717FF151515FF141414FF3F3E3EFF
+        CEC9C7FFEFEAE9FFEBE6E5FFD5D0CFFFA49E9DFF908886FF897B7AFF887774FF
+        8C7976FF907D78FF7B6C69FF2D2B2AEE1C1C1C1D000000000000000000000000
+        0000000000000000000000003030303F2E2E2EEF2B2B2BFF292929FF262626FF
+        242424FF212121FF1F1F1FFF10155DFF0009ABFF0005A5FF0B0C5BFF817F7EFF
+        FCF7F6FFF4F3F3FFDEDDDDFF6F6E6FFF797777FF7B7877FF747270FF585352FF
+        6C5E5CFF897774FF93807BFF4D4544FF1819195F000000000000000000000000
+        00000000000000003535355F333333FF303030FF2E2E2EFF2B2B2BFF292929FF
+        262626FF242424FF212121FF171B45FF000CB1FF0009ABFF04088CFF424143FF
+        E0DDDDFFFFFFFFFFC9C7C7FF7D7979FFD5C9C6FFAC9C98FFBBAFACFFA9A19FFF
+        504B4BFF86746FFF7F6E6BFF2E2C2BF91C1C1C21000000000000000000000000
+        000000003A3A3A3F383838FF353535FF333333FF303030FF2E2E2EFF2B2B2BFF
+        292929FF262626FF242424FF151B5CFF000FB8FF09117AFF14174DFF171822FF
+        414040FF818080FF6D6E6DFF454141FF685755FF684F4DFF7E6462FF8F7775FF
+        514948FF544C4AFF2D2A2AFA1B1B1C6500000000000000000000000000000000
+        3F3F3F1F3C3C3CEF3A3A3AFF383838FF353535FF333333FF303030FF2E2E2EFF
+        2B2B2BFF292929FF262626FF1D2141FF131952FF424241FF756D6CFF837E81FF
+        7E7677FF685E5EFF5D5251FF5A4F4EFF564C4BFF4E4646FF453C3BFF453636FF
+        262121FF101111FF020202F00000000F00000000000000000000000000000000
+        414141BF3F3F3FFF3C3C3CFF3A3A3AFF383838FF353535FF333333FF303030FF
+        2E2E2EFF2B2B2BFF292929FF262626FF404040FFB1B0AFFF7F726CFFDAC09AFF
+        F6E2C9FFDED3C9FFCABDBAFFB0A5A7FF9F939CFF9E9297FF9C9192FF8E8787FF
+        6E6969FF3F3D3CFF171818FF070707C20000000000000000000000004646463F
+        444444FF414141FF3F3F3FFF3C3C3CFF3A3A3AFF383838FF353535FF333333FF
+        303030FF2E2E2EFF2B2B2BFF292929FF515151FFC5C4C5FF7D6E67FFDD8212FF
+        FF9A12FFFFA121FFFFAF38FFFEB64FFFF4BB68FFE2BB88FFCEBAA5FFC2B7B4FF
+        C0BAC0FFBCB6BCFF9E989AFF575656FF1B1B1BD61A1A1A1F00000000494949BF
+        464646FF444444FF414141FF3F3F3FFF3C3C3CFF3A3A3AFF383838FF353535FF
+        333333FF303030FF2E2E2EFF2B2B2BFF525252FFCFCFD0FF84776FFFDC800FFF
+        FF9109FFFE8F09FFFE9009FFFF9109FFFF920AFFFF9812FFFF9E1BFFF8A533FF
+        E7A951FFD3AA76FFC9B4A4FFCAC2C5FF939196FF2D2D2CED4E4E4E1F4B4B4BFF
+        494949FF464646FF444444FF414141FF343E63FF1538C2FF0332F0FF1131BBFF
+        2B3359FF333333FF303030FF2E2E2EFF555555FFDAD9DAFF8B7F77FFDC8111FF
+        FF970FFFFE9A16FFFE9E1BFFFEA01FFFFEA120FFFEA11FFFFEA01DFFFF9C16FF
+        FF970FFFFF960FFFF79213FFE7932AFFC4A37AFF5D5E64FE5050506F4E4E4EFF
+        4B4B4BFF494949FF464646FF414450FF0F3EF3FF073AFFFF0336FEFF0032FCFF
+        062FDEFF353535FF333333FF303030FF585858FFE3E3E6FF90867EFFDC8818FF
+        FFA01AFFFEA524FFFFA92AFFFFAC2EFFFFAD32FFFFAD32FFFFAC2FFFFFAA2BFF
+        FEA525FFFEA01CFFFF9813FFFF9505FFBA8235FF52555FFE535353BF515151FF
+        4E4E4EFF4B4B4BFF494949FF3A4675FF1042FFFF0C3EFFFF073AFFFF0336FEFF
+        0032FCFF293568FF353535FF333333FF5A5A5AFFEDEEEFFF968C84FFDC9023FF
+        FFAA28FFFFAF33FFFFB43BFFFFB741FFFFBA43FFFFBA43FFFFB841FFFFB53CFF
+        FFB035FFFFAA2BFFFEA321FFFF9E11FFB7833BFF4E5059FF565656EF535353FF
+        515151FF4E4E4EFF4B4B4BFF3D4977FF1547FFFF1042FFFF0C3EFFFF073AFFFF
+        0336FEFF333952FF383838FF353535FF5C5C5CFFF4F4F7FF9C938BFFDD972DFF
+        FFB435FFFFB841FFFFBF4CFFFFC453FFFFC556FFFFC557FFFFC453FFFFC04DFF
+        FFBA43FFFFB439FFFFAB2DFFFFA71CFFB4833EFF4A4B54FF585858FF565656FF
+        535353FF515151FF4E4E4EFF4B4B4BFF224ADDFF1547FFFF1042FFFF0C3EFFFF
+        183BC3FF3C3C3CFF3A3A3AFF383838FF5D5D5DFFFBFBFEFFA09892FFDE9E37FF
+        FFBD43FFFFC251FFFFC95CFFFFCC63FFFFCF67FFFFCF67FFFFCE64FFFFCA5DFF
+        FFC453FFFFBC47FFFFB439FFFFAF28FFB18341FF47474EFF5B5B5BFF585858FF
+        565656FF535353FF515151FF4E4E4EFF484B57FF344A99FF2D46A3FF2D4396FF
+        414141FF3F3F3FFF3C3C3CFF3A3A3AFF5D5D5EFFFEFEFFFFA59E98FFDEA441FF
+        FFC550FFFFCA5EFFFFD069FFFFD572FFFFD876FFFFD876FFFFD573FFFFD16BFF
+        FFCB60FFFFC454FFFFBA44FFFFB631FFAF8241FF434249FF5D5D5DFF5B5B5BFF
+        585858FF565656FF535353FF515151FF4E4E4EFF4B4B4BFF494949FF464646FF
+        444444FF414141FF3F3F3FFF3C3C3CFF5D5D5DFFFFFFFFFFAAA49DFFDEAA49FF
+        FFCB5BFFFFD16AFFFFD876FFFFDE81FFFFE287FFFFE288FFFFDE82FFFFD978FF
+        FFD36CFFFFCA5EFFFFC14FFFFFBC3AFFAB8141FF3F3E43FF606060FF5D5D5DFF
+        5B5B5BFF585858FF565656FF535353FF515151FF4E4E4EFF4B4B4BFF494949FF
+        464646FF444444FF414141FF3F3F3FFF5D5D5DFFFFFFFFFFADA7A1FFDEAD4FFF
+        FFD062FFFFD572FFFFDE81FFFEE68FFFFEEB99FFFEED9AFFFEE691FFFFE083FF
+        FFD775FFFFCF66FFFFC555FFFFC141FFA77F42FF3B3940FF626262EF606060FF
+        5D5D5DFF5B5B5BFF585858FF565656FF535353FF515151FF4E4E4EFF4B4B4BFF
+        494949FF464646FF444444FF414141FF5D5D5DFFFFFFFFFFAFABA4FFDEB250FF
+        FFD866FFFFDD77FFFFE588FFFFED98FFFFF6A9FFFFF6ABFFFEED9AFFFEE389FF
+        FFD978FFFFD069FFFFC658FFFFC243FFAB8143FF3C393FFF646464BF626262FF
+        606060FF5D5D5DFF5B5B5BFF585858FF565656FF535353FF515151FF4E4E4EFF
+        4B4B4BFF494949FF434652FF3E445BFF5D5D5DFFFFFFFFFFB1AFABFFA18855FF
+        B89A57FFC9AC64FFDEC678FFEDDA8CFFF0E59DFFF8EEA3FFFFF099FFFFEB8BFF
+        FFE17AFFFFD76AFFFFCA59FFFFC443FFAF8644FF3F3D42FF6666666F656565FF
+        626262FF606060FF5D5D5DFF5B5B5BFF585858FF565656FF535353FF515151FF
+        4E4E4EFF434C6DFF204AE8FF1547FFFF5D5E5EFFFFFFFFFFE0DEDEFFC4C5C9FF
+        B8B7BAFFAAA6A5FF999591FF928C83FF96907FFF9D957BFFA49976FFAF9D6DFF
+        B89F62FFC9A458FFE1AF4FFFFEB63DFFAB8243FF424146FE6868681F676767FF
+        656565FF626262FF606060FF5B5E67FF3C68F4FF3565FFFF485A95FF535353FF
+        515151FF3851A7FF1E4FFFFF1A4BFFFF3C4257FFA7A7A7FFBCBCBCFFD1D0D0FF
+        E0DEDDFFE2DEE0FFE0DCDDFFDCD7D7FFD5CFD0FFC5BDBFFFADA6AAFF9F9799FF
+        968C8CFF8B807EFF7D726BFF7A6A5AFF816F60FF4D4747FD00000000696969BF
+        676767FF656565FF626262FF496EE1FF3F6EFFFF3A69FFFF3A63EAFF565656FF
+        535353FF3C54A8FF2354FFFF1E4FFFFF1B39AAFF183089FF192D76FF232B4AFF
+        2D2E30FF393838FF494748FF585656FF696666FF7D7978FF8B8684FF968F8EFF
+        A09796FFA59A99FFA19595FF9A8E8EFF766B6BFF312E2DFA000000006B6B6B3F
+        696969FF676767FF656565FF4C72E1FF4372FFFF3F6EFFFF3A69FFFF3C62DFFF
+        385FDFFF2C5CFFFF2758FFFF2354FFFF1E4FFFFF1A4BFFFF1547FFFF1042FFFF
+        0C3EFFFF153ACAFF3A3A3AFF353535FF2F2F2FFF2A2A2AFF282828FF262626FF
+        272727FF292928FF31302FFF363433FF232323C91B1C1C330000000000000000
+        6B6B6BBF696969FF676767FF616778FF4974F5FF4372FFFF3F6EFFFF3A69FFFF
+        3565FFFF3161FFFF2C5CFFFF2758FFFF2354FFFF1E4FFFFF1A4BFFFF1547FFFF
+        1042FFFF123EE7FF3F3F3FFF3C3C3CFF3A3A3AFF383838FF353535FF333333FF
+        303030FF2E2E2EFF2B2B2BFF292929BF00000000000000000000000000000000
+        6B6B6B1F6B6B6BEF696969FF676767FF606882FF4974F5FF4372FFFF3F6EFFFF
+        3A69FFFF3565FFFF3161FFFF2C5CFFFF2758FFFF2354FFFF1E4FFFFF1A4BFFFF
+        1547FFFF2E4395FF414141FF3C3F4BFF393C48FF3A3A3AFF383838FF353535FF
+        333333FF303030FF2E2E2EEF2B2B2B1F00000000000000000000000000000000
+        000000006B6B6B3F6B6B6BFF696969FF676767FF616778FF4C72E1FF4372FFFF
+        3F6EFFFF3A69FFFF3565FFFF3161FFFF2C5CFFFF2758FFFF2354FFFF1E4FFFFF
+        1A4BFFFF1847F3FF2E4395FF0F3EF3FF0A3AF2FF323B61FF3A3A3AFF383838FF
+        353535FF333333FF3030303F0000000000000000000000000000000000000000
+        00000000000000006B6B6B5F6B6B6BFF696969FF676767FF656565FF566AA7FF
+        4570F5FF3F6EFFFF3A69FFFF3565FFFF3161FFFF2C5CFFFF2758FFFF2354FFFF
+        1E4FFFFF1A4BFFFF1547FFFF1442F3FF2A4094FF3F3F3FFF3C3C3CFF3A3A3AFF
+        383838FF3535355F000000000000000000000000000000000000000000000000
+        0000000000000000000000006B6B6B3F6B6B6BEF696969FF676767FF656565FF
+        626262FF55669CFF4A67C2FF3E67EAFF3565FFFF3161FFFF2C5CFFFF2758FFFF
+        2853E9FF2F4DBCFF374A8DFF464646FF444444FF414141FF3F3F3FFF3C3C3CEF
+        3A3A3A3F00000000000000000000000000000000000000000000000000000000
+        000000000000000000000000000000006B6B6B1F6B6B6BBF696969FF676767FF
+        656565FF626262FF606060FF5D5D5DFF5B5B5BFF585858FF565656FF535353FF
+        515151FF4E4E4EFF4B4B4BFF494949FF464646FF444444FF414141BF3F3F3F1F
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000006B6B6B3F696969BF
+        676767FF656565FF626262FF606060FF5D5D5DFF5B5B5BFF585858FF565656FF
+        535353FF515151FF4E4E4EFF4B4B4BFF494949BF4646463F0000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        6868681F6666666F646464BF626262EF606060FF5D5D5DFF5B5B5BFF585858FF
+        565656EF535353BF5050506F4E4E4E1F00000000000000000000000000000000
+        000000000000000000000000000000000000000000000000FFC00007FF000003
+        FC000001F8000001F0000001E0000003C0000003C00000038000000080000000
+        0000000000000000000000000000000000000000000000000000000000000000
+        000000000000000000000000000000008000000080000000C0000003C0000003
+        E0000007F000000FF800001FFC00003FFF0000FFFFC003FF2800000010000000
+        2000000001002000000000004004000000000000000000000000000000000000
+        000000000000000000000000000000000F0F0F381616169F171717DD121212FF
+        0D0D0DFF0D0D0DDE232323B3333232A2313131A0323232783434342311111101
+        00000000000000000505050C262626A4262626FF212121FF191A2AFF0A0E5DFF
+        0A0B50FF6A6868FFC5BFBEFFA19896FF837471FF695C5AFC333232B22222220C
+        000000000606060C2F2F2FCD303030FF2B2B2BFF262626FF1D1F34FF000BAFFF
+        0C0F81FF9A989AFF9F9E9EFF9B8D8BFF857B79FF716361FF3432329922222207
+        00000000373737A6393939FF353535FF303030FF2B2B2BFF24252BFF121A6EFF
+        676268FFA29588FF857C7BFF716666FF6B5E5DFF313131FF222222B92E2E2E17
+        1F1F1F3A434343FF3E3E3EFF393939FF353535FF303030FF2B2B2BFF272727FF
+        9F9895FFF98F0CFFFE9D20FFF8AB44FFE2A962FFCCA984FF807872FF3232328E
+        3C3C3C9F484848FF434344FF183BC1FF0732E1FF28325FFF303030FF2A2A2AFF
+        B2ACAAFFF99B1BFFFEAA2CFFFEAE33FFFEAA2DFFFE9E1CFFCA852DFF303030C0
+        525252E04D4D4DFF454856FF1041FFFF0739FEFF1935A5FF353535FF2D2D2DFF
+        C2BDBBFFF9B13AFFFFC455FFFFCA5EFFFFC556FFFFB63EFFC78C35FF272727E6
+        575757FF525252FF4D4D4DFF2E48A9FF1E42CAFF363D5AFF393939FF313131FF
+        CAC7C4FFFAC255FFFFD876FFFEE186FFFED978FFFFC75AFFC6913DFF262626FF
+        5C5C5CFF575757FF525252FF4D4D4DFF484848FF434343FF3E3E3EFF343434FF
+        CDCCCAFFE1B95EFFF1D782FFFBF0A3FFFEE68CFFFFCF65FFC59442FF272727FF
+        616161E05C5C5CFF575757FF525252FF4D4D4DFF484848FF424348FF373737FF
+        A6A7ABFFB3B1B3FFAEAAA9FFAEA79FFFB0A492FFAA9472FF987C58FF292929E5
+        4F4F4F9F616161FF5C5D60FF495D9FFF50535FFF474E66FF1B4AF7FF1F42C8FF
+        1339D2FF31364AFF313131FF232C5AFF20319AFF3A3D5CFF3A3737FF1E1E1EA2
+        2E2E2E3C666666FF57689CFF3E6DFFFF4260C1FF3D57B2FF2253FFFF194AFFFF
+        1742E5FF273C90FF393939FF343436FF282E4AFF2A2A2CFF262626FF0F0F0F38
+        000000005E5E5EA666676AFF4E6FD0FF3E6DFFFF3564FFFF2B5BFFFF2253FFFF
+        194AFFFF1A42D9FF3E3E40FF39393CFF353535FF303030FF262626A600000000
+        000000000B0B0B0E5E5E5ECD66676AFF536BB4FF3F6CF9FF3564FFFF2B5BFFFF
+        2253FFFF1B4AF7FF1B42D5FF2B3C82FF393939FF2F2F2FCD0505050C00000000
+        00000000000000000B0B0B0E5E5E5EA8666666FF5F636EFF516195FF455DABFF
+        3E56A9FF3E4F8BFF454856FF434343FF373737A60606060C0000000000000000
+        000000000000000000000000000000002E2E2E3C4F4F4FA1616161E25C5C5CFF
+        575757FF525252E23C3C3C9F1F1F1F3C00000000000000000000000000000000
+        F0000000C0000000800000008000000000000000000000000000000000000000
+        000000000000000000000000000000008001000080010000C0030000F00F0000
+      }
+      Proportional = True
+      Stretch = True
+    end
+    object cbCreateClientAndGroup: TCheckBox
+      Left = 42
+      Height = 21
+      Top = 8
+      Width = 201
+      Anchors = [akLeft, akBottom]
+      Caption = 'Create Test Client and Project Group'
+      Checked = True
+      State = cbChecked
+      TabOrder = 0
+    end
+    object btn_Ok: TBitBtn
+      Left = 342
+      Height = 25
+      Top = 8
+      Width = 75
+      Anchors = [akRight, akBottom]
+      Caption = 'OK'
+      Default = True
+      Glyph.Data = {
+        36060000424D3606000000000000360000002800000020000000100000000100
+        18000000000000060000C40E0000C40E00000000000000000000FF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FF006600006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565656565FF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FF0066001EB2311FB133006600FF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6565659A9A9A9A9A9A65
+        6565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FF00660031C24F22B7381AB02D21B437006600FF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565ABABAB9E9E9E9797979C
+        9C9C656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        00660047D36D3BCB5E25A83B0066001BA92E1DB132006600FF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FF656565BFBFBFB5B5B598989865656594
+        9494999999656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF006600
+        4FD67953DE7F31B54D006600FF00FF006600179D271EAE31006600FF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FF656565C4C4C4CACACAA5A5A5656565FF00FF65
+        65658C8C8C989898656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        00660041C563006600FF00FFFF00FFFF00FFFF00FF00660019AA2B006600FF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FF656565B5B5B5656565FF00FFFF00FFFF
+        00FFFF00FF656565939393656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FF006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF006600149D210066
+        00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565FF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FF6565658A8A8A656565FF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0066
+        00006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FF656565656565FF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FF006600006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565656565FF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      }
+      ModalResult = 1
+      NumGlyphs = 2
+      TabOrder = 1
+    end
+    object Button2: TBitBtn
+      Left = 421
+      Height = 25
+      Top = 8
+      Width = 75
+      Anchors = [akRight, akBottom]
+      Cancel = True
+      Caption = 'Cancel'
+      Glyph.Data = {
+        36060000424D3606000000000000360000002800000020000000100000000100
+        18000000000000060000C40E0000C40E00000000000000000000FF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A00009AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00009A0000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        00009A174AFD103BF400009AFF00FFFF00FFFF00FFFF00FF00009A002CF80030
+        FC00009AFF00FFFF00FFFF00FFFF00FF6B6B6BA8A8A8A0A0A06B6B6BFF00FFFF
+        00FFFF00FFFF00FF6B6B6B9A9A9A9C9C9C6B6B6BFF00FFFF00FFFF00FFFF00FF
+        00009A1A47F81A4CFF123BF100009AFF00FFFF00FF00009A012DF60132FF002A
+        F300009AFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7AAAAAA9F9F9F6B6B6BFF
+        00FFFF00FF6B6B6B9999999E9E9E9797976B6B6BFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A1C47F61B4DFF143EF400009A00009A002DF80134FF032BF20000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7ABABABA2A2A26B
+        6B6B6B6B6B9A9A9A9E9E9E9898986B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FF00009A1D48F61D50FF103DFB0431FE0132FF002CF600009AFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7ACACACA3
+        A3A39F9F9F9E9E9E9999996B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FF00009A1A48F91342FF0C3CFF0733F600009AFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7A7
+        A7A7A3A3A39C9C9C6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FF00009A214EFC1D4BFF1847FF1743F600009AFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BACACACAC
+        ACACA9A9A9A4A4A46B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FF00009A2E5BF92C5FFF224DF8204BF82355FF1B46F600009AFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BB1B1B1B3B3B3AB
+        ABABAAAAAAAFAFAFA6A6A66B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A3664FA386BFF2D59F400009A00009A224CF42558FF1D49F60000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BB6B6B6B9B9B9AEAEAE6B
+        6B6B6B6B6BA9A9A9B0B0B0A7A7A76B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        00009A4071FA4274FF325DF100009AFF00FFFF00FF00009A224DF1275AFF204C
+        F800009AFF00FFFF00FFFF00FFFF00FF6B6B6BBBBBBBBEBEBEAFAFAF6B6B6BFF
+        00FFFF00FF6B6B6BA7A7A7B1B1B1AAAAAA6B6B6BFF00FFFF00FFFF00FFFF00FF
+        00009A497AFC3B66F300009AFF00FFFF00FFFF00FFFF00FF00009A2550F42655
+        FA00009AFF00FFFF00FFFF00FFFF00FF6B6B6BC0C0C0B5B5B56B6B6BFF00FFFF
+        00FFFF00FFFF00FF6B6B6BAAAAAAAEAEAE6B6B6BFF00FFFF00FFFF00FFFF00FF
+        FF00FF00009A00009AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00009A0000
+        9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+        FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+        00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      }
+      ModalResult = 2
+      NumGlyphs = 2
+      TabOrder = 2
+    end
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fServerProjectOptions.lrs b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fServerProjectOptions.lrs
new file mode 100644
index 0000000..befb5b3
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fServerProjectOptions.lrs	
@@ -0,0 +1,5903 @@
+{ This is an automatically generated lazarus resource file }
+
+LazarusResources.Add('TServerProjectOptions','FORMDATA',[
+  'TPF0'#21'TServerProjectOptions'#20'ServerProjectOptions'#4'Left'#3'R'#1#6'He'
+  +'ight'#3'9'#1#3'Top'#3#184#0#5'Width'#3#245#1#18'HorzScrollBar.Page'#3#244#1
+  +#18'VertScrollBar.Page'#3'8'#1#13'ActiveControl'#7#8'ePrjName'#11'BorderIcon'
+  +'s'#11#12'biSystemMenu'#0#11'BorderStyle'#7#8'bsDialog'#7'Caption'#6'0RemObj'
+  +'ects SDK Server - Advanced Project Options'#12'ClientHeight'#3'9'#1#11'Clie'
+  +'ntWidth'#3#245#1#21'Constraints.MinHeight'#3#238#0#20'Constraints.MinWidth'
+  +#3','#1#11'Font.Height'#2#245#9'Font.Name'#6#6'Tahoma'#12'OnCloseQuery'#7#14
+  +'FormCloseQuery'#8'OnCreate'#7#10'FormCreate'#8'Position'#7#14'poScreenCente'
+  +'r'#0#6'TLabel'#6'Label1'#4'Left'#2#8#6'Height'#2#16#3'Top'#3#128#0#5'Width'
+  +#2's'#7'Caption'#6#21'Service Library Name:'#11'ParentColor'#8#0#0#6'TLabel'
+  +#6'Label2'#4'Left'#2#8#6'Height'#2#16#3'Top'#3#154#0#5'Width'#2'L'#7'Caption'
+  +#6#13'Service Name:'#11'ParentColor'#8#0#0#6'TLabel'#6'Label3'#4'Left'#2#8#6
+  +'Height'#2#16#3'Top'#2'f'#5'Width'#2'L'#7'Caption'#6#13'Project Name:'#11'Pa'
+  +'rentColor'#8#0#0#6'TLabel'#6'Label5'#4'Left'#2#8#6'Height'#2#16#3'Top'#3#244
+  +#0#5'Width'#2'M'#7'Caption'#6#15'Project Folder:'#11'ParentColor'#8#0#0#6'TB'
+  +'evel'#6'Bevel1'#4'Left'#2#4#6'Height'#2#2#3'Top'#3'^'#1#5'Width'#3#163#2#7
+  +'Anchors'#11#6'akLeft'#7'akRight'#8'akBottom'#0#0#0#6'TLabel'#6'Label4'#4'Le'
+  +'ft'#2#8#6'Height'#2#16#3'Top'#2'L'#5'Width'#2'g'#7'Caption'#6#18'Template L'
+  +'ocation:'#11'ParentColor'#8#0#0#6'TLabel'#6'Label6'#4'Left'#2#8#6'Height'#2
+  +#16#3'Top'#3#213#0#5'Width'#2'P'#7'Caption'#6#14'Message Class:'#11'ParentCo'
+  +'lor'#8#0#0#6'TLabel'#6'Label7'#4'Left'#2#8#6'Height'#2#16#3'Top'#3#188#0#5
+  +'Width'#2'B'#7'Caption'#6#13'Server Class:'#11'ParentColor'#8#0#0#6'TLabel'#6
+  +'Label8'#4'Left'#2'w'#6'Height'#2#14#3'Top'#3#188#0#5'Width'#3#197#0#7'Capti'
+  +'on'#6'$Not available in this kind of server'#11'Font.Height'#2#245#9'Font.N'
+  +'ame'#6#13'MS Sans Serif'#10'Font.Style'#11#6'fsBold'#0#11'ParentColor'#8#0#0
+  +#6'TImage'#6'Image2'#6'Height'#2'@'#5'Width'#3#245#1#5'Align'#7#5'alTop'#8'A'
+  +'utoSize'#9#12'Picture.Data'#10'Bw'#1#0#7'TBitmap6w'#1#0'BM6w'#1#0#0#0#0#0'6'
+  +#0#0#0'('#0#0#0#244#1#0#0'@'#0#0#0#1#0#24#0#0#0#0#0#0'w'#1#0#192#30#0#0#192
+  +#30#0#0#0#0#0#0#0#0#0#0#133#133#133#133#133#133#133#133#133#133#133#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133
+  +#133#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#131#131#131#131
+  +#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131
+  +#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#130#130#130
+  +#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130
+  +#130#130#130#130#130#130#130#130#130#130#130#129#129#129#129#129#129#129#129
+  +#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129
+  +#129#129#129#129#129#129#129#129#129#128#128#128#129#129#129#129#129#129#128
+  +#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128#128#128#128#128#128#128'~~~~~~~~~~~'
+  +'~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~}}}}}}}}}}}}|||||'
+  +'|{{{zzzyyyyyyxxxxxxwwwvvvuuuuuutttuuutttttttttj|'#195'g'#221'g'#221'h'#128
+  +#220'i'#128#221'i'#129#221'j'#129#220'j'#129#220'k'#130#220'k'#130#220'l'#130
+  +#220'l'#131#220'n'#131#214#128#132#149#135#135#135#139#139#139#141#141#141
+  +#143#143#143#144#144#144#145#145#145#146#146#146#146#146#146#146#146#146#146
+  +#146#146#145#145#145#145#145#145#144#144#144#144#144#144#144#144#144#143#143
+  +#143#143#143#143#143#143#143#143#143#143#143#143#143#144#144#144#145#145#145
+  +#145#145#145#146#146#146#146#146#146#146#146#146#148#148#148#148#148#148#149
+  +#149#149#150#150#150#150#150#150#151#151#151#151#151#151#152#152#152#154#154
+  +#154#154#154#154#154#154#154#155#155#155#156#156#156#157#157#157#157#157#157
+  +#158#158#158#159#159#159#160#160#160#160#160#160#162#162#162#162#162#162#162
+  +#162#162#163#163#163#165#165#165#165#165#165#166#166#166#167#167#167#168#168
+  +#168#168#168#168#169#169#169#169#169#169#171#171#171#172#172#172#172#172#172
+  +#174#174#174#175#175#175#176#176#176#178#178#178#179#179#179#181#181#181#182
+  +#182#182#183#183#183#185#185#185#186#186#186#187#187#187#188#188#188#189#189
+  +#189#190#190#190#191#191#191#191#191#191#192#192#192#192#192#192#193#193#193
+  +#194#194#194#194#194#194#194#194#194#194#194#194#195#195#195#195#195#195#196
+  +#196#196#196#196#196#197#197#197#197#197#197#198#198#198#198#198#198#199#199
+  +#199#199#199#199#200#200#200#200#200#200#201#201#201#202#202#202#203#203#203
+  +#203#203#203#204#204#204#204#204#204#205#205#205#206#206#206#206#206#206#207
+  +#207#207#208#208#208#209#209#209#209#209#209#210#210#210#210#210#210#210#210
+  +#210#211#211#211#211#211#211#212#212#212#212#212#212#212#212#212#212#212#212
+  +#212#212#212#212#212#212#213#213#213#213#213#213#213#213#213#213#213#213#213
+  +#213#213#214#214#214#214#214#214#214#214#214#214#214#214#214#214#214#214#214
+  ,#214#215#215#215#215#215#215#215#215#215#215#215#215#215#215#215#216#216#216
+  +#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216#217#217#217#217
+  +#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#218#218
+  +#218#218#218#218#218#218#218#218#218#218#219#219#219#219#219#219#219#219#219
+  +#219#219#219#219#219#219#219#219#219#219#219#219#220#220#220#220#220#220#220
+  +#220#220#220#220#220#220#220#220#221#221#221#221#221#221#221#221#221#221#221
+  +#221#221#221#221#221#221#221#222#222#222#222#222#222#222#222#222#222#222#222
+  +#222#222#222#222#222#222#223#223#223#223#223#223#223#223#223#223#223#223#223
+  +#223#223#223#223#223#224#224#224#224#224#224#224#224#224#224#224#224#224#224
+  +#224#224#224#224#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225
+  +#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#227
+  +#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#228#228
+  +#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#230#230#230#230#230#230#230#230#230#230#230#230#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#237#237#237#236#236#236#237#237#237#237#237#237#237#237#237
+  +#237#237#237#238#238#238#237#237#237#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#245#245#245#244#244#244#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#134#134#134
+  +#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#133#133#133#132#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#131#131#131#131#131#131#131#131#131#131
+  +#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131
+  +#131#131#131#131#131#131#131#131#131#131#130#130#130#130#130#130#131#131#131
+  +#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130
+  +#130#130#130#130#130#129#129#129#129#129#129#129#129#129#129#129#129#129#129
+  +#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129
+  +#129#129#129#129#129#129#129#129#129#128#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128''#128#128#128#128#128#128''#128
+  +#128#128#128#128#128'~~~~~~~~~~~~~~~~~~~~~~~~~'
+  +'~~}}}}}}}}}||||||{{{zzzzzzyyyyyyxxxwwwvvvvvvuuuvvvvvvuuuuuusw'#137'h'#128
+  +#221'h'#128#221'i'#129#221'i'#129#221'j'#129#221'j'#130#221'k'#130#221'j'#130
+  +#221'l'#131#221'm'#131#221'm'#131#220'n'#132#220'p'#132#215''#135#168#140
+  +#140#140#142#142#142#145#145#145#145#145#145#147#147#147#147#147#147#148#148
+  +#148#148#149#149#149#150#150#150#151#151#149#151#151#150#152#152#150#152#152
+  +#149#150#150#148#149#149#147#148#148#146#147#147#145#145#145#145#145#145#145
+  +#145#145#146#146#146#146#146#146#147#147#147#147#147#147#147#147#147#148#148
+  +#148#149#149#149#149#149#149#151#151#151#151#151#151#152#152#152#152#152#152
+  +#153#153#153#154#154#154#155#155#155#156#156#156#157#157#157#157#157#157#158
+  +#158#158#158#158#158#159#159#159#160#160#160#160#160#160#161#161#161#162#162
+  +#162#163#163#163#164#164#164#164#164#164#165#165#165#166#166#166#167#167#167
+  +#168#168#168#168#168#168#169#169#169#170#170#170#171#171#171#172#172#172#173
+  +#173#173#173#173#173#174#174#174#175#175#175#177#177#177#177#178#186#176#179
+  +#193#175#179#199#176#180#201#178#182#202#178#182#202#180#183#202#181#184#202
+  ,#184#186#198#187#188#195#191#191#192#192#192#192#192#192#192#193#193#193#193
+  +#193#193#195#195#195#195#195#195#195#195#195#196#196#196#196#196#196#196#196
+  +#196#196#196#196#198#198#198#197#197#197#198#198#198#198#198#198#199#199#199
+  +#199#199#199#200#200#200#201#201#201#201#201#201#201#201#201#202#202#202#204
+  +#204#204#204#204#204#204#204#204#205#205#205#206#206#206#206#206#206#207#207
+  +#207#207#207#207#208#208#208#209#209#209#210#210#210#211#211#211#211#211#211
+  +#211#211#211#211#211#211#212#212#212#212#212#212#213#213#213#213#213#213#213
+  +#213#213#213#213#213#213#213#213#213#213#213#214#214#214#214#214#214#214#214
+  +#214#214#214#214#214#214#214#215#215#215#215#215#215#215#215#215#215#215#215
+  +#215#215#215#215#215#215#216#216#216#216#216#216#216#216#216#216#216#216#216
+  +#216#216#216#216#216#216#216#216#216#216#216#216#216#216#217#217#217#216#216
+  +#216#216#216#216#217#217#217#217#217#217#217#217#217#217#217#217#218#218#218
+  +#217#217#217#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#219
+  +#219#219#219#219#219#219#219#219#219#219#219#220#220#220#219#219#219#220#220
+  +#220#220#220#220#220#220#220#221#221#221#220#220#220#221#221#221#222#222#222
+  +#221#221#221#222#222#222#222#222#222#221#221#221#221#221#221#222#222#222#222
+  +#222#222#222#222#222#222#222#222#222#222#222#222#222#222#223#223#223#223#223
+  +#223#223#223#223#223#223#223#224#224#224#224#224#224#224#224#224#224#224#224
+  +#224#224#224#224#224#224#225#225#225#225#225#225#225#225#225#225#225#225#225
+  +#225#225#225#225#225#225#225#225#226#226#226#226#226#226#226#226#226#226#226
+  +#226#226#226#226#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227
+  +#227#227#227#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228
+  +#228#228#228#228#228#229#229#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#229#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#234#234#234#233#233#233#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#244#244#244#243#243#243#243#243#243#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#133#133
+  +#133#133#133#133#134#134#134#134#134#134#134#134#134#133#133#133#133#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#132
+  +#132#132#133#133#133#133#133#133#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#132#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131
+  +#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#130#130
+  +#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130
+  +#130#130#130#130#130#130#130#130#130#130#130#130#129#129#129#129#129#129#129
+  +#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129
+  +#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129
+  +#129#129#129#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128#128#128#128#128''#128#128#128#128#128#128#128#128#128''
+  +''#128#128#128#128#128#128#128#128#128''#128#128#128#128#128#128
+  +''#128#128#128#128#128#128#128#128#128#128#128#128''#128#128#128#128
+  +#128#128'~~~~~~~~~~~~}}}}}}|||{{{{{{zzzyyyyyyyyyxxxwwwwwwvvvvvvvvvv'
+  +'vvvvvn|'#176'i'#129#222'i'#128#221'j'#130#222'k'#130#221'k'#130#221'k'#130
+  +#221'l'#131#221'l'#131#222'm'#132#220'n'#132#221'n'#133#221'o'#133#221'o'#133
+  ,#220#128#137#175#143#143#143#145#145#145#147#147#147#147#147#147#148#148#148
+  +#151#151#151#152#153#153#154#156#156#155#158#158#158#161#161#159#163#163#159
+  +#163#163#158#162#162#156#159#159#153#155#155#150#152#152#148#149#149#146#147
+  +#147#145#145#145#145#145#145#146#146#146#147#147#147#147#147#147#148#148#148
+  +#149#149#149#149#149#149#150#150#150#151#151#151#151#151#151#152#152#152#152
+  +#152#152#154#154#154#155#155#155#155#155#155#156#156#156#156#156#156#157#157
+  +#157#158#158#158#159#159#159#159#159#159#160#160#160#160#160#160#161#161#161
+  +#163#163#163#163#163#163#164#164#164#164#164#164#165#165#165#166#166#166#167
+  +#167#167#168#168#168#168#168#168#169#169#169#169#169#169#172#172#172#172#172
+  +#172#173#173#173#174#174#174#174#175#179#171#175#195#170#175#205#171#177#208
+  +#172#178#207#174#179#207#174#179#207#176#181#208#177#182#207#178#182#207#178
+  +#183#207#179#184#207#180#184#207#182#186#208#186#188#203#190#191#197#193#193
+  +#193#194#194#194#194#194#194#195#195#195#195#195#195#196#196#196#196#196#196
+  +#196#196#196#197#197#197#198#198#198#198#198#198#198#198#198#198#198#198#199
+  +#199#199#200#200#200#201#201#201#200#200#200#202#202#202#202#202#202#202#202
+  +#202#204#204#204#204#204#204#204#204#204#205#205#205#206#206#206#206#206#206
+  +#207#207#207#208#208#208#208#208#208#208#208#208#209#209#209#211#211#211#211
+  +#211#211#211#211#211#211#211#211#212#212#212#212#212#212#213#213#213#213#213
+  +#213#213#213#213#213#213#213#213#213#213#213#213#213#213#213#213#214#214#214
+  +#214#214#214#214#214#214#215#215#215#215#215#215#215#215#215#215#215#215#215
+  +#215#215#215#215#215#215#215#215#216#216#216#216#216#216#216#216#216#216#216
+  +#216#216#216#216#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217
+  +#217#217#217#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218
+  +#218#218#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219#220#220
+  +#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220
+  +#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#222#222#222#222
+  +#222#222#222#222#222#222#222#222#222#222#222#223#223#223#223#223#223#223#223
+  +#223#223#223#223#223#223#223#223#223#223#223#223#223#224#224#224#224#224#224
+  +#224#224#224#224#224#224#224#224#224#224#224#224#225#225#225#225#225#225#225
+  +#225#225#225#225#225#225#225#225#225#225#225#226#226#226#226#226#226#226#226
+  +#226#226#226#226#226#226#226#226#226#226#227#227#227#227#227#227#227#227#227
+  +#226#226#226#227#227#227#228#228#228#227#227#227#228#228#228#227#227#227#227
+  +#227#227#229#229#229#228#228#228#228#228#228#229#229#229#228#228#228#229#229
+  +#229#228#228#228#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#229#229#229#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#230#230#230#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239
+  +#239#239#238#238#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242#241#241
+  +#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247
+  +#247#247#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#135#135#135#135#135#135#135#135#135#134#134#134#134#134#134
+  +#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#133
+  +#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#133#133#132#132#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#132#132#132#132#132#132#131#131#131#131#131#131#131#131#131#131#131
+  +#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131
+  ,#131#131#131#131#131#131#130#130#130#130#130#130#130#130#130#130#130#130#130
+  +#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#129#129
+  +#129#129#129#129#129#129#129#130#130#130#130#130#130#129#129#129#129#129#129
+  +#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129
+  +#129#129#129#129#129#130#130#130#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128#128
+  +#128#128#129#129#129#129#129#129#128#128#128#128#128#128#129#129#129#129#129
+  +#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129
+  +#128#128#128#128#128#128#128#128#128'~~~~~~~~~}}}||||||{{{{{{zzzyyyyyy'
+  +'xxxwwwxxxwwwwwwvvvvvvwwwwx~j'#128#215'j'#129#221'k'#130#222'k'#131#221'k'
+  +#131#221'l'#131#221'm'#132#222'n'#132#221'n'#132#221'n'#132#221'o'#133#221'o'
+  +#133#221'p'#134#220'p'#134#220'|'#138#191#145#145#145#147#147#147#148#148#148
+  +#150#151#151#152#153#153#156#158#158#160#164#164#165#171#171#169#177#177#172
+  +#181#181#172#181#181#172#180#180#167#175#175#163#169#169#158#163#163#154#157
+  +#157#150#152#152#149#150#150#148#148#148#147#147#147#148#148#148#148#148#148
+  +#149#149#149#149#149#149#150#150#150#151#151#151#151#151#151#152#152#152#153
+  +#153#153#153#153#153#154#154#154#155#155#155#156#156#156#156#156#156#157#157
+  +#157#159#159#159#159#159#159#159#159#159#160#160#160#160#160#160#161#161#161
+  +#162#162#162#163#163#163#164#164#164#164#164#164#165#165#165#167#167#167#167
+  +#167#167#168#168#168#168#168#168#169#169#169#170#170#170#170#170#170#172#172
+  +#172#173#173#173#173#174#178#170#175#196#169#175#208#170#176#208#170#176#208
+  +#172#178#208#174#179#208#174#179#208#175#180#208#176#181#208#178#183#208#179
+  +#183#208#179#184#208#180#184#208#181#185#208#182#186#208#183#186#208#183#187
+  +#208#186#189#206#191#192#197#194#194#194#195#195#195#196#196#196#196#196#196
+  +#196#196#196#196#196#196#197#197#197#198#198#198#198#198#198#198#198#198#198
+  +#198#198#199#199#199#199#199#199#201#201#201#202#202#202#202#202#202#202#202
+  +#202#203#203#203#204#204#204#204#204#204#205#205#205#205#205#205#206#206#206
+  +#207#207#207#207#207#207#208#208#208#208#208#208#209#209#209#210#210#210#211
+  +#211#211#211#211#211#211#211#211#212#212#212#212#212#212#212#212#212#213#213
+  +#213#213#213#213#213#213#213#213#213#213#213#213#213#213#213#213#213#213#213
+  +#214#214#214#214#214#214#214#214#214#214#214#214#214#214#214#215#215#215#215
+  +#215#215#215#215#215#215#215#215#215#215#215#216#216#216#216#216#216#216#216
+  +#216#216#216#216#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217
+  +#217#217#217#217#217#217#218#218#218#218#218#218#218#218#218#218#218#218#218
+  +#218#218#218#218#218#218#218#218#219#219#219#219#219#219#219#219#219#219#219
+  +#219#219#219#219#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220
+  +#220#220#220#221#221#221#221#221#221#221#221#221#221#221#221#222#222#222#222
+  +#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222
+  +#222#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223
+  +#224#224#224#224#224#224#224#224#224#224#224#224#225#225#225#225#225#225#225
+  +#225#225#225#225#225#225#225#225#225#225#225#225#225#225#226#226#226#226#226
+  +#226#226#226#226#226#226#226#227#227#227#227#227#227#227#227#227#227#227#227
+  +#227#227#227#227#227#227#227#227#227#228#228#228#228#228#228#228#228#228#228
+  +#228#228#228#228#228#229#229#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#230#230#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#242#242#242#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  ,#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#246#246#246#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#247#247#247#246#246#246#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#135#135#135#135#135#135#135#135#135#135#135#135
+  +#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134
+  +#134#134#134#134#134#134#134#134#134#134#134#134#134#134#133#133#133#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133
+  +#133#133#133#133#133#133#133#133#133#132#132#132#132#132#132#132#132#132#133
+  +#133#133#133#133#133#132#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#132#132#132#132#131#131#131#132#132#132
+  +#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131
+  +#131#131#131#131#131#130#130#130#131#131#131#131#131#131#130#130#130#130#130
+  +#130#130#130#130#130#130#130#130#130#130#130#130#130#131#131#131#130#130#130
+  +#130#130#130#130#130#130#130#130#130#129#129#129#129#129#129#129#129#129#130
+  +#130#130#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129
+  +#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129
+  +#129#129#129#129#129#129#129#129#129#128#128#128#129#129#129#129#129#129#130
+  +#130#130#130#130#130#129#129#129#130#130#130#130#130#130#130#130#130#130#130
+  +#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130
+  +#130#130#130#130#130#130#129#129#129#129#129#129#128#128#128#128#128#128''
+  +'~~~~~~~~~}}}||||||{{{{{{zzzzzzyyyxxxxxxwwwwwwxxxwwwxxxr|'#165'k'#130#222
+  +'k'#131#222'l'#131#222'l'#131#222'l'#132#222'n'#132#222'n'#132#221'n'#133#222
+  +'o'#133#221'o'#133#221'p'#134#221'p'#134#221'p'#134#220'r'#135#220'x'#137#206
+  +#145#146#152#148#148#148#151#151#151#154#156#156#159#163#163#166#172#172#175
+  +#184#184#181#192#192#186#199#199#188#202#202#187#201#201#183#195#195#176#187
+  +#187#169#177#177#162#167#167#155#158#158#150#152#152#148#148#148#147#147#147
+  +#148#148#148#149#149#149#149#149#149#149#149#149#150#150#150#151#151#151#151
+  +#151#151#152#152#152#153#153#153#154#154#154#155#155#155#155#155#155#156#156
+  +#156#157#157#157#157#157#157#159#159#159#159#159#159#159#159#159#160#160#160
+  +#161#161#161#161#161#161#162#162#162#163#163#163#164#164#164#164#164#164#165
+  +#165#165#166#166#166#167#167#167#168#168#168#168#168#168#169#169#169#170#170
+  +#170#171#171#171#172#172#172#170#173#189#168#174#206#168#175#208#170#176#208
+  +#170#176#208#171#177#208#173#179#208#174#179#208#174#180#208#175#180#208#177
+  +#182#209#178#183#208#179#183#208#179#184#208#180#185#208#181#185#208#183#187
+  +#209#184#188#209#184#188#209#186#189#208#187#190#208#190#192#205#196#196#197
+  +#197#197#197#197#197#197#197#197#197#198#198#198#198#198#198#198#198#198#199
+  +#199#199#200#200#200#200#200#200#200#200#200#200#200#200#202#202#202#202#202
+  +#202#203#203#203#203#203#203#203#203#203#205#205#205#205#205#205#205#205#205
+  +#206#206#206#207#207#207#208#208#208#208#208#208#209#209#209#209#209#209#210
+  +#210#210#211#211#211#212#212#212#212#212#212#212#212#212#213#213#213#213#213
+  +#213#213#213#213#213#213#213#214#214#214#214#214#214#214#214#214#214#214#214
+  +#214#214#214#214#214#214#215#215#215#215#215#215#214#214#214#215#215#215#216
+  +#216#216#216#216#216#215#215#215#216#216#216#216#216#216#216#216#216#217#217
+  +#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217
+  +#217#217#217#217#217#217#217#217#217#217#217#217#218#218#218#218#218#218#218
+  +#218#218#218#218#218#218#218#218#218#218#218#218#218#218#219#219#219#219#219
+  +#219#219#219#219#219#219#219#220#220#220#220#220#220#220#220#220#220#220#220
+  +#220#220#220#220#220#220#220#220#220#221#221#221#221#221#221#221#221#221#221
+  +#221#221#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222
+  +#222#222#222#222#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223
+  +#223#223#223#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224
+  +#224#224#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225#226#226
+  +#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226
+  +#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#228#228#228#228
+  +#228#228#228#228#228#228#228#228#228#228#228#228#228#228#229#229#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#231
+  +#231#231#231#231#231#231#231#231#231#231#231#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  ,#235#235#235#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237#236
+  +#236#236#237#237#237#237#237#237#236#236#236#237#237#237#237#237#237#237#237
+  +#237#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#136#136#136#136#136#136
+  +#135#135#135#135#135#135#136#136#136#135#135#135#135#135#135#135#135#135#135
+  +#135#135#135#135#135#135#135#135#135#135#135#135#135#135#134#134#134#134#134
+  +#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134
+  +#134#134#134#134#134#134#134#134#134#133#133#133#133#133#133#133#133#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133
+  +#133#133#133#133#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#131
+  +#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131
+  +#131#131#131#131#131#131#131#131#131#131#131#131#131#130#130#130#130#130#130
+  +#131#131#131#131#131#131#131#131#131#130#130#130#130#130#130#130#130#130#130
+  +#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130#130
+  +#130#130#130#130#129#129#129#129#129#129#130#130#130#129#129#129#129#129#129
+  +#129#129#129#129#129#129#129#129#129#129#129#129#129#129#129#130#130#130#129
+  +#129#129#130#130#130#130#130#130#131#131#131#130#130#130#130#130#130#130#130
+  +#130#131#131#131#131#131#131#132#132#132#132#132#132#131#131#131#131#131#131
+  +#131#131#131#132#132#132#131#131#131#131#131#131#131#131#131#131#131#131#130
+  +#130#130#129#129#129#129#129#129#128#128#128'~~~~~~}}}}}}||||||{{{zzzzzzy'
+  +'yyyyyyyyxxxxxxxxxxxxxxxyyym'#130#210'l'#131#222'l'#132#222'l'#131#222'l'#132
+  +#222'm'#132#222'o'#133#222'o'#133#222'p'#134#221'p'#134#221'q'#135#221'q'#135
+  +#221'r'#135#221'r'#135#220's'#136#221'w'#138#211#141#145#161#150#151#151#155
+  +#157#157#163#167#167#172#180#180'ODkA3^A3^A3^A3^ZRv'#144#149#166#183#196#196
+  +#172#181#181#162#168#168#155#158#158#151#152#152#149#149#149#149#149#149#149
+  +#149#149#150#150#150#151#151#151#151#151#151#152#152#152#153#153#153#153#153
+  +#153#154#154#154#154#154#154#156#156#156#156#156#156#157#157#157#158#158#158
+  +#158#158#158#159#159#159#160#160#160#160#160#160#161#161#161#162#162#162#162
+  +#162#162#163#163#163#164#164#164#165#165#165#165#165#165#166#166#166#166#166
+  +#166#168#168#168#168#168#168#169#169#169#170#170#170#171#171#171#171#171#171
+  +#168#173#195#167#174#210#167#174#209#168#175#208#170#177#209#170#177#208#171
+  +#177#208#173#179#208#174#180#209#175#181#209#176#181#209#177#182#209#179#184
+  +#209#179#184#209#181#185#209#181#185#209#182#186#208#183#187#209#184#188#209
+  +#185#189#208#186#189#208#187#190#208#187#190#208#190#192#207#196#196#199#198
+  +#198#198#197#197#197#198#198#198#199#199#199#199#199#199#199#199#199#200#200
+  +#200#200#200#200#200#200#200#201#201#201#202#202#202#202#202#202#203#203#203
+  +#203#203#203#204#204#204#205#205#205#205#205#205#206#206#206#206#206#206#207
+  +#207#207#207#207#207#208#208#208#209#209#209#209#209#209#210#210#210#210#210
+  +#210#212#212#212#212#212#212#212#212#212#213#213#213#213#213#213#213#213#213
+  +#214#214#214#214#214#214#214#214#214#214#214#214#214#214#214#214#214#214#215
+  +#215#215#215#215#215#215#215#215#215#215#215#215#215#215#216#216#216#216#216
+  +#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216#217#217#217
+  +#217#217#217#217#217#217#217#217#217#218#218#218#218#218#218#218#218#218#218
+  +#218#218#218#218#218#218#218#218#219#219#219#219#219#219#219#219#219#219#219
+  +#219#219#219#219#219#219#219#220#220#220#220#220#220#220#220#220#220#220#220
+  +#220#220#220#220#220#220#221#221#221#221#221#221#221#221#221#221#221#221#221
+  +#221#221#221#221#221#222#222#222#221#221#221#222#222#222#222#222#222#221#221
+  +#221#222#222#222#223#223#223#222#222#222#222#222#222#222#222#222#223#223#223
+  +#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#224
+  ,#224#224#224#224#224#224#224#224#224#224#224#224#224#224#225#225#225#225#225
+  +#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225#226#226#226
+  +#226#226#226#226#226#226#226#226#226#227#227#227#227#227#227#227#227#227#227
+  +#227#227#227#227#227#227#227#227#227#227#227#228#228#228#228#228#228#228#228
+  +#228#228#228#228#228#228#228#228#228#228#229#229#229#229#229#229#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#242#242#242#241#241#241#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244
+  +#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#246#246#246#245#245#245#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#136#136#136#136#136#136#136#136#136#136
+  +#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#135#135
+  +#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135
+  +#135#135#135#134#134#134#134#134#134#135#135#135#135#135#135#135#135#135#134
+  +#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134
+  +#134#134#134#134#134#134#134#134#134#134#134#134#134#133#133#133#133#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#132
+  +#132#132#133#133#133#132#132#132#132#132#132#132#132#132#132#132#132#131#131
+  +#131#132#132#132#131#131#131#131#131#131#132#132#132#132#132#132#132#132#132
+  +#132#132#132#131#131#131#132#132#132#131#131#131#131#131#131#131#131#131#131
+  +#131#131#131#131#131#131#131#131#131#131#131#131#131#131#130#130#130#130#130
+  +#130#131#131#131#130#130#130#131#131#131#130#130#130#130#130#130#130#130#130
+  +#130#130#130#129#129#129#130#130#130#130#130#130#129#129#129#129#129#129#130
+  +#130#130#130#130#130#130#130#130#129#129#129#130#130#130#131#131#131#130#130
+  +#130#131#131#131#131#131#131#131#131#131#132#132#132#132#132#132#132#132#132
+  +#132#132#132#132#132#132#133#133#133#133#133#133#133#133#133#133#133#133#133
+  +#133#133#133#133#133#133#133#133#132#132#132#132#132#132#131#131#131#131#131
+  +#131#130#130#130#130#130#130#129#129#129#128#128#128'~~~~~~}}}}}}|||{{{{{'
+  +'{zzzzzzzzzyyyyyyyyyxxxyyyzzzw}'#147'l'#132#223'm'#132#223'm'#133#222'n'#133
+  +#222'n'#133#222'o'#133#222'p'#134#222'p'#135#222'q'#135#222'q'#135#221'q'#135
+  +#221's'#136#221's'#136#222't'#137#221't'#137#221'w'#138#216#140#147#173#156
+  +#158#158#164#169#169#174#183#183'?2`?2`?2`?2`?2`?2`?2`qo'#141#185#198#198#171
+  +#179#179#161#166#166#154#156#156#151#151#151#150#150#150#150#150#150#151#151
+  +#151#152#152#152#152#152#152#152#152#152#153#153#153#154#154#154#154#154#154
+  +#154#154#154#156#156#156#157#157#157#157#157#157#158#158#158#158#158#158#160
+  +#160#160#160#160#160#160#160#160#161#161#161#162#162#162#162#162#162#163#163
+  +#163#164#164#164#164#164#164#165#165#165#166#166#166#166#166#166#168#168#168
+  +#169#169#169#169#169#169#170#170#170#170#170#173#166#172#202#166#174#210#167
+  +#174#210#169#176#210#169#176#209#170#177#209#171#177#209#172#178#209#174#179
+  +#209#174#180#209#175#181#209#176#181#209#178#183#210#179#184#209#180#185#209
+  +#180#185#209#182#186#209#183#187#209#183#187#209#185#189#210#186#190#209#187
+  +#190#209#188#191#209#189#192#210#190#193#210#191#194#209#197#198#201#199#199
+  +#199#199#199#199#200#200#200#200#200#200#200#200#200#201#201#201#201#201#201
+  +#202#202#202#201#201#201#203#203#203#203#203#203#204#204#204#204#204#204#205
+  +#205#205#206#206#206#206#206#206#207#207#207#208#208#208#208#208#208#208#208
+  ,#208#208#208#208#210#210#210#211#211#211#211#211#211#212#212#212#213#213#213
+  +#213#213#213#212#212#212#213#213#213#213#213#213#214#214#214#214#214#214#214
+  +#214#214#214#214#214#214#214#214#214#214#214#214#214#214#215#215#215#215#215
+  +#215#215#215#215#215#215#215#215#215#215#216#216#216#216#216#216#216#216#216
+  +#216#216#216#216#216#216#216#216#216#217#217#217#217#217#217#217#217#217#217
+  +#217#217#217#217#217#218#218#218#218#218#218#218#218#218#218#218#218#218#218
+  +#218#218#218#218#218#218#218#219#219#219#219#219#219#219#219#219#219#219#219
+  +#219#219#219#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220#221
+  +#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#222#222
+  +#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222#223#223#223
+  +#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#224#224#224#224
+  +#224#224#224#224#224#224#224#224#224#224#224#224#224#224#225#225#225#225#225
+  +#225#225#225#225#225#225#225#225#225#225#225#225#225#226#226#226#226#226#226
+  +#226#226#226#226#226#226#226#226#226#226#226#226#227#227#227#226#226#226#227
+  +#227#227#226#226#226#227#227#227#227#227#227#227#227#227#227#227#227#227#227
+  +#227#227#227#227#227#227#227#228#228#228#228#228#228#228#228#228#228#228#228
+  +#228#228#228#228#228#228#229#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#229#229#229#229#229#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#233#233#233#232#232#232#233#233#233#233#233#233#233#233
+  +#233#233#233#233#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#137#137#137#137#137#137#137#137#137#137#137#137#136#136
+  +#136#137#137#137#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136
+  +#136#136#136#136#136#136#136#136#136#136#136#136#135#135#135#135#135#135#135
+  +#135#135#135#135#135#134#134#134#135#135#135#135#135#135#135#135#135#135#135
+  +#135#134#134#134#135#135#135#134#134#134#134#134#134#135#135#135#134#134#134
+  +#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#133
+  +#133#133#133#133#133#133#133#133#133#133#133#134#134#134#133#133#133#133#133
+  +#133#133#133#133#133#133#133#133#133#133#132#132#132#132#132#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#131#131#131#132#132#132#131#131#131#131#131#131#131#131#131#131#131
+  +#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131
+  +#131#131#131#131#131#131#131#131#131#131#131#131#130#130#130#130#130#130#131
+  +#131#131#130#130#130#130#130#130#130#130#130#130#130#130#131#131#131#130#130
+  +#130#130#130#130#130#130#130#130#130#130#131#131#131#132#132#132#131#131#131
+  +#132#132#132#132#132#132#133#133#133#133#133#133#133#133#133#134#134#134#134
+  +#134#134#134#134#134#135#135#135#135#135#135#135#135#135#135#135#135#135#135
+  +#135#135#135#135#134#134#134#133#133#133#133#133#133#133#133#133#131#131#131
+  +#131#131#131#130#130#130#129#129#129#128#128#128'~~~}}}||||||{{{{{{'
+  +'zzzzzzzzzzzzyyyzzzzzzzzzq'#129#191'm'#132#223'n'#133#223'o'#134#223'o'#133
+  +#222'p'#134#223'p'#135#223'q'#135#222'q'#136#222'r'#136#222'r'#136#222's'#137
+  +#222't'#137#221't'#137#221't'#138#221'u'#138#221'x'#142#222#142#154#186#161
+  +#166#166#172#180#180'>0c>0c>0c>0c>0c>0c>0c>0c'#137#141#163#181#192#192#167
+  +#174#174#158#161#161#152#153#153#150#150#150#150#150#150#151#151#151#152#152
+  ,#152#153#153#153#153#153#153#154#154#154#154#154#154#155#155#155#155#155#155
+  +#157#157#157#158#158#158#158#158#158#158#158#158#160#160#160#161#161#161#161
+  +#161#161#162#162#162#162#162#162#163#163#163#163#163#163#164#164#164#165#165
+  +#165#166#166#166#166#166#166#166#166#166#167#167#167#169#169#169#169#169#169
+  +#170#170#170#171#171#171#167#172#198#166#173#210#167#175#211#169#176#211#170
+  +#177#210#170#177#210#171#178#210#172#178#210#173#179#210#175#180#210#175#181
+  +#210#176#182#210#178#183#210#179#184#210#179#184#210#181#186#210#181#186#209
+  +#183#187#210#183#187#209#184#188#210#185#189#210#186#190#209#187#190#209#188
+  +#191#209#189#193#210#190#193#210#191#194#210#192#195#209#198#198#200#199#199
+  +#199#199#199#199#201#201#201#200#200#200#201#201#201#201#201#201#202#202#202
+  +#202#202#202#203#203#203#204#204#204#204#204#204#204#204#204#205#205#205#206
+  +#206#206#206#206#206#207#207#207#207#207#207#208#208#208#209#209#209#209#209
+  +#209#210#210#210#211#211#211#211#211#211#213#213#213#213#213#213#213#213#213
+  +#213#213#213#214#214#214#214#214#214#214#214#214#215#215#215#215#215#215#215
+  +#215#215#215#215#215#215#215#215#215#215#215#216#216#216#216#216#216#216#216
+  +#216#216#216#216#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217
+  +#217#217#217#217#217#217#218#218#218#218#218#218#218#218#218#218#218#218#218
+  +#218#218#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219
+  +#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219#219
+  +#219#219#219#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220#221
+  +#221#221#221#221#221#221#221#221#221#221#221#221#221#221#222#222#222#222#222
+  +#222#222#222#222#222#222#222#222#222#222#223#223#223#223#223#223#223#223#223
+  +#223#223#223#223#223#223#223#223#223#223#223#223#224#224#224#224#224#224#224
+  +#224#224#224#224#224#224#224#224#224#224#224#225#225#225#225#225#225#225#225
+  +#225#225#225#225#225#225#225#225#225#225#226#226#226#226#226#226#226#226#226
+  +#226#226#226#226#226#226#226#226#226#226#226#226#227#227#227#227#227#227#227
+  +#227#227#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228
+  +#228#228#228#228#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#231#231#231#231#231#231#231#231#231#231#231#231
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137
+  +#137#137#137#137#137#137#137#136#136#136#137#137#137#137#137#137#136#136#136
+  +#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136
+  +#136#136#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135
+  +#135#135#135#135#135#135#135#134#134#134#134#134#134#135#135#135#134#134#134
+  +#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134
+  +#134#134#133#133#133#133#133#133#134#134#134#134#134#134#134#134#134#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#132#132#132
+  +#132#132#132#133#133#133#133#133#133#133#133#133#132#132#132#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#132#132#132#132#132#131#131#131#131#131#131#132#132#132#131#131#131
+  ,#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131#131
+  +#131#131#131#131#131#131#131#131#131#131#131#130#130#130#131#131#131#131#131
+  +#131#131#131#131#131#131#131#132#132#132#132#132#132#133#133#133#133#133#133
+  +#133#133#133#134#134#134#134#134#134#135#135#135#136#136#136#136#136#136#137
+  +#137#137#136#136#136#137#137#137#137#137#137#137#137#137#137#137#137#136#136
+  +#136#136#136#136#136#136#136#135#135#135#135#135#135#134#134#134#133#133#133
+  +#132#132#132#131#131#131#129#129#129#128#128#128'~~~~~~}}}||||||{{{{{{'
+  +'zzzzzzzzzyyyzzzzzzzzzz}'#136'n'#133#223'n'#133#223'o'#134#223'p'#134#222'p'
+  +#134#223'p'#135#223'q'#136#222'r'#136#222'r'#136#222's'#137#222's'#137#222'u'
+  +#138#222'u'#139#222'v'#139#221'v'#139#221'z'#142#222#128#149#224#143#159#202
+  +#166#173#173'}}'#148#178#189#193#197#213#213#179#193#203'XQ}</e</e</eE:m'#190
+  +#204#204#174#183#183#162#166#166#155#157#157#151#151#151#152#152#152#152#152
+  +#152#152#152#152#153#153#153#154#154#154#154#154#154#155#155#155#155#155#155
+  +#157#157#157#157#157#157#158#158#158#159#159#159#159#159#159#161#161#161#160
+  +#160#160#162#162#162#162#162#162#163#163#163#162#162#162#164#164#164#165#165
+  +#165#165#165#165#165#165#165#166#166#166#166#166#166#167#167#167#169#169#169
+  +#169#169#169#170#170#170#167#171#193#166#173#211#166#174#210#168#175#211#169
+  +#176#211#170#177#210#170#177#210#171#178#210#172#178#210#174#180#211#175#181
+  +#210#176#182#210#177#182#210#178#183#210#179#185#211#180#185#210#181#186#210
+  +#182#186#210#183#187#210#184#188#210#185#189#211#186#190#211#187#191#210#188
+  +#191#210#189#192#210#189#193#210#191#194#211#192#195#211#193#195#211#195#197
+  +#209#199#200#201#200#200#200#202#202#202#201#201#201#202#202#202#202#202#202
+  +#203#203#203#203#203#203#204#204#204#204#204#204#205#205#205#205#205#205#206
+  +#206#206#207#207#207#207#207#207#208#208#208#209#209#209#209#209#209#209#209
+  +#209#209#209#209#210#210#210#211#211#211#211#211#211#212#212#212#213#213#213
+  +#213#213#213#214#214#214#214#214#214#214#214#214#214#214#214#215#215#215#215
+  +#215#215#215#215#215#215#215#215#215#215#215#215#215#215#215#215#215#216#216
+  +#216#216#216#216#216#216#216#217#217#217#217#217#217#217#217#217#217#217#217
+  +#217#217#217#217#217#217#217#217#217#218#218#218#218#218#218#218#218#218#218
+  +#218#218#218#218#218#219#219#219#219#219#219#219#219#219#219#219#219#219#219
+  +#219#219#219#219#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220
+  +#220#220#220#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221
+  +#221#221#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222#222
+  +#222#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223
+  +#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#224#224#224#224
+  +#224#224#224#224#224#224#224#224#224#224#224#224#224#224#225#225#225#225#225
+  +#225#225#225#225#225#225#225#225#225#225#226#226#226#226#226#226#226#226#226
+  +#226#226#226#226#226#226#226#226#226#227#227#227#227#227#227#227#227#227#227
+  +#227#227#227#227#227#227#227#227#228#228#228#228#228#228#228#228#228#228#228
+  +#228#228#228#228#228#228#228#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#232#232#232#232#232#232#232#232#232
+  +#232#232#232#233#233#233#233#233#233#232#232#232#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#245#245#245#244#244#244#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  ,#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#138#138#138#138#138#138#138#138#138#138#138#138#138#138
+  +#138#138#138#138#137#137#137#137#137#137#138#138#138#137#137#137#137#137#137
+  +#137#137#137#136#136#136#136#136#136#136#136#136#137#137#137#136#136#136#136
+  +#136#136#136#136#136#136#136#136#135#135#135#136#136#136#136#136#136#136#136
+  +#136#136#136#136#136#136#136#136#136#136#135#135#135#135#135#135#135#135#135
+  +#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135
+  +#135#135#135#135#135#135#135#135#134#134#134#134#134#134#135#135#135#134#134
+  +#134#134#134#134#134#134#134#134#134#134#134#134#134#133#133#133#133#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133
+  +#133#133#133#133#133#133#133#133#132#132#132#133#133#133#133#133#133#132#132
+  +#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#131
+  +#131#131#132#132#132#132#132#132#131#131#131#131#131#131#131#131#131#131#131
+  +#131#131#131#131#131#131#131#132#132#132#133#133#133#133#133#133#133#133#133
+  +#134#134#134#134#134#134#135#135#135#136#136#136#136#136#136#138#138#138#137
+  +#137#137#138#138#138#138#138#138#138#138#138#139#139#139#139#139#139#139#139
+  +#139#139#139#139#138#138#138#138#138#138#137#137#137#136#136#136#136#136#136
+  +#135#135#135#134#134#134#132#132#132#131#131#131#129#129#129#129#129#129#128
+  +#128#128'~~~}}}}}}|||||||||{{{{{{{{{zzz{{{{{{{{{v'#129#174'o'#134#223
+  +'p'#134#223'q'#135#223'q'#136#223'r'#136#223'r'#136#223'r'#137#223's'#137#223
+  +'t'#137#222't'#138#222'u'#139#222'v'#139#222'w'#140#222'w'#140#222'z'#142#223
+  +'~'#147#224#132#153#225#153#163#184#167#174#174#174#183#183#184#196#196#196
+  +#212#212#198#217#220'NEw;.g;.g;.g'#153#161#178#180#191#191#166#172#172#158
+  +#160#160#153#153#153#152#152#152#152#152#152#153#153#153#153#153#153#154#154
+  +#154#155#155#155#155#155#155#156#156#156#157#157#157#158#158#158#158#158#158
+  +#159#159#159#160#160#160#161#161#161#161#161#161#162#162#162#162#162#162#163
+  +#163#163#163#163#163#164#164#164#165#165#165#165#165#165#166#166#166#167#167
+  +#167#168#168#168#168#168#168#169#169#169#170#170#170#169#171#181#165#173#212
+  +#166#173#211#167#175#211#168#175#211#170#177#212#170#177#211#171#178#211#172
+  +#179#211#173#179#211#175#181#211#175#181#211#177#183#211#178#183#211#179#184
+  +#211#180#185#211#181#186#211#182#187#211#183#187#211#184#188#211#184#189#211
+  +#185#189#211#186#190#211#188#191#211#189#192#211#189#192#210#190#193#211#191
+  +#194#211#193#196#212#193#195#211#194#196#211#197#198#206#201#201#201#201#201
+  +#201#201#201#201#202#202#202#202#202#202#202#202#202#204#204#204#204#204#204
+  +#205#205#205#205#205#205#205#205#205#206#206#206#207#207#207#208#208#208#208
+  +#208#208#209#209#209#209#209#209#209#209#209#211#211#211#211#211#211#212#212
+  +#212#213#213#213#214#214#214#214#214#214#214#214#214#215#215#215#215#215#215
+  +#215#215#215#215#215#215#216#216#216#216#216#216#216#216#216#216#216#216#216
+  +#216#216#216#216#216#217#217#217#217#217#217#217#217#217#217#217#217#217#217
+  +#217#217#217#217#217#217#217#218#218#218#218#218#218#218#218#218#217#217#217
+  +#218#218#218#219#219#219#218#218#218#218#218#218#219#219#219#219#219#219#219
+  +#219#219#219#219#219#219#219#219#219#219#219#219#219#219#220#220#220#220#220
+  +#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220#220#221#221#221
+  +#221#221#221#221#221#221#221#221#221#222#222#222#222#222#222#222#222#222#222
+  +#222#222#222#222#222#222#222#222#223#223#223#223#223#223#223#223#223#223#223
+  +#223#223#223#223#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224
+  +#224#224#224#224#224#224#225#225#225#225#225#225#225#225#225#225#225#225#225
+  +#225#225#225#225#225#226#226#226#226#226#226#226#226#226#226#226#226#226#226
+  +#226#226#226#226#227#227#227#226#226#226#227#227#227#226#226#226#226#226#226
+  +#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#228
+  +#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#235#235#235#235#235#235#234#234#234#235#235#235#234#234#234
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#239#239#239#238#238#238#239#239#239#239#239#239#239#239#239#239#239
+  ,#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#139#139#139#139
+  +#139#139#138#138#138#138#138#138#138#138#138#138#138#138#138#138#138#138#138
+  +#138#138#138#138#138#138#138#138#138#138#138#138#138#138#138#138#137#137#137
+  +#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137
+  +#137#137#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136
+  +#136#136#136#136#137#137#137#136#136#136#136#136#136#136#136#136#136#136#136
+  +#136#136#136#136#136#136#136#136#136#136#136#136#135#135#135#135#135#135#135
+  +#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135#135
+  +#135#135#135#135#135#135#135#134#134#134#134#134#134#134#134#134#133#133#133
+  +#134#134#134#134#134#134#134#134#134#134#134#134#133#133#133#133#133#133#134
+  +#134#134#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#132#132#132
+  +#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#132#131#131#131#132#132#132#131#131#131#131#131#131#132#132#132#132#132
+  +#132#133#133#133#134#134#134#133#133#133#135#135#135#135#135#135#135#135#135
+  +#137#137#137#138#138#138#139#139#139#139#139#139#139#139#139#140#140#140#141
+  +#141#141#140#140#140#141#141#141#141#141#141#140#140#140#140#140#140#140#140
+  +#140#139#139#139#139#139#139#138#138#138#137#137#137#136#136#136#134#134#134
+  +#133#133#133#131#131#131#130#130#130#129#129#129#129#129#129#128#128#128''
+  +'~~~~~~}}}|||||||||{{{|||{{{{{{{{{|||{'#137'p'#135#224'p'#135#224'q'#135#223
+  +'r'#136#223's'#137#224's'#137#224's'#137#223't'#138#223't'#137#222'u'#138#223
+  +'v'#139#222'v'#139#222'w'#140#223'w'#140#222'y'#142#222'|'#145#223''#148#224
+  +#147#154#167#157#161#161#161#167#167#170#178#178#181#193#193#195#212#212#151
+  +#159#182'9-i9-i9-i'#129#132#162#185#197#197#170#177#177#159#162#162#154#155
+  +#155#152#152#152#153#153#153#154#154#154#155#155#155#155#155#155#156#156#156
+  +#156#156#156#157#157#157#157#157#157#159#159#159#159#159#159#160#160#160#161
+  +#161#161#162#162#162#162#162#162#162#162#162#163#163#163#163#163#163#164#164
+  +#164#165#165#165#166#166#166#166#166#166#167#167#167#168#168#168#168#168#168
+  +#169#169#169#169#169#169#170#170#170#166#173#208#166#174#212#166#174#211#168
+  +#176#212#169#176#212#170#177#212#170#178#212#171#178#211#172#179#211#174#180
+  +#211#175#181#211#176#182#211#177#183#211#178#183#211#179#184#211#179#185#211
+  +#181#186#211#182#187#211#184#188#211#184#188#211#185#189#211#186#190#212#187
+  +#191#212#188#191#211#189#193#211#189#193#211#191#194#211#192#195#212#193#196
+  +#212#194#196#212#194#197#212#195#198#212#200#200#203#202#202#202#203#203#203
+  +#203#203#203#203#203#203#203#203#203#204#204#204#205#205#205#206#206#206#206
+  +#206#206#206#206#206#208#208#208#208#208#208#208#208#208#209#209#209#210#210
+  +#210#209#209#209#209#209#209#211#211#211#211#211#211#212#212#212#213#213#213
+  +#214#214#214#214#214#214#214#214#214#215#215#215#215#215#215#215#215#215#215
+  +#215#215#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216#216
+  +#216#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217
+  +#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#219#219#219#219
+  +#219#219#219#219#219#219#219#219#219#219#219#220#220#220#220#220#220#220#220
+  +#220#220#220#220#220#220#220#220#220#220#221#221#221#221#221#221#221#221#221
+  +#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#222
+  +#222#222#221#221#221#222#222#222#222#222#222#222#222#222#222#222#222#222#222
+  +#222#222#222#222#222#222#222#223#223#223#223#223#223#223#223#223#223#223#223
+  +#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224
+  +#224#224#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225
+  +#225#225#225#225#226#226#226#226#226#226#226#226#226#226#226#226#227#227#227
+  +#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#228
+  +#228#228#228#228#228#228#228#228#228#228#228#228#228#228#229#229#229#228#228
+  ,#228#229#229#229#228#228#228#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#139#139#139#139#139#139#139#139
+  +#139#139#139#139#139#139#139#138#138#138#139#139#139#139#139#139#139#139#139
+  +#138#138#138#139#139#139#138#138#138#138#138#138#138#138#138#137#137#137#138
+  +#138#138#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137
+  +#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137
+  +#137#137#137#137#137#137#137#137#137#137#137#137#137#137#137#136#136#136#136
+  +#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136
+  +#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#136#135#135#135
+  +#136#136#136#136#136#136#136#136#136#135#135#135#135#135#135#135#135#135#135
+  +#135#135#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134#134
+  +#134#134#134#134#134#134#134#134#134#134#133#133#133#133#133#133#133#133#133
+  +#133#133#133#133#133#133#133#133#133#133#133#133#133#133#133#132#132#132#132
+  +#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132#132
+  +#132#131#131#131#132#132#132#132#132#132#132#132#132#132#132#132#133#133#133
+  +#134#134#134#134#134#134#135#135#135#136#136#136#137#137#137#138#138#138#138
+  +#138#138#140#140#140#141#141#141#141#141#141#142#142#142#142#142#142#143#143
+  +#143#143#143#143#143#143#143#143#143#143#143#143#143#142#142#142#142#142#142
+  +#142#142#142#142#142#142#141#142#142#139#140#140#138#139#139#136#136#136#134
+  +#134#134#131#131#131#130#130#130#130#130#130#129#129#129#128#128#128'~~~~'
+  +'~~}}}}}}|||||||||{{{{{{||||||u'#131#187'q'#136#224'q'#135#224'r'#136#224'r'
+  +#137#224's'#137#224't'#138#224't'#138#224't'#138#224'u'#138#223'u'#138#223'v'
+  +#140#223'w'#140#223'w'#140#223'x'#141#222'y'#141#222'z'#143#222'}'#145#223
+  +#147#148#148#148#150#150#152#154#154#159#164#164#170#178#178#186#199#199#194
+  +#210#214'8,l8,l8,l]Y'#137#188#202#202#172#180#180#162#165#165#156#157#157#153
+  +#153#153#154#154#154#154#154#154#156#156#156#156#156#156#157#157#157#157#157
+  +#157#158#158#158#158#158#158#159#159#159#162#162#162#162#162#162#161#161#161
+  +#162#162#162#163#163#163#163#163#163#164#164#164#164#164#164#164#164#164#165
+  +#165#165#166#166#166#166#166#166#167#167#167#168#168#168#168#168#168#169#169
+  +#169#170#170#170#169#172#187#166#174#213#166#174#213#167#175#212#168#176#212
+  +#169#176#212#170#178#213#171#178#212#173#180#212#174#180#212#175#181#212#175
+  +#181#212#177#183#212#178#184#212#179#184#212#179#185#212#181#186#213#183#188
+  +#212#184#188#212#184#188#212#185#190#212#185#190#212#186#190#212#189#192#212
+  +#189#193#212#190#194#212#191#194#212#192#195#212#193#196#212#194#197#213#196
+  +#199#213#195#198#213#196#199#213#198#201#211#202#202#202#202#202#202#203#203
+  +#203#203#203#203#203#203#203#204#204#204#205#205#205#206#206#206#206#206#206
+  +#207#207#207#207#207#207#208#208#208#209#209#209#209#209#209#210#210#210#210
+  +#210#210#210#210#210#212#212#212#213#213#213#213#213#213#214#214#214#214#214
+  +#214#215#215#215#215#215#215#216#216#216#216#216#216#216#216#216#217#217#217
+  ,#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217#217
+  +#217#217#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218
+  +#218#218#218#218#218#218#218#219#219#219#219#219#219#219#219#219#219#219#219
+  +#219#219#219#219#219#219#219#219#219#220#220#220#220#220#220#220#220#220#220
+  +#220#220#220#220#220#220#220#220#221#221#221#221#221#221#221#221#221#221#221
+  +#221#221#221#221#221#221#221#221#221#221#222#222#222#222#222#222#222#222#222
+  +#222#222#222#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223#223
+  +#223#223#223#223#223#224#224#224#224#224#224#224#224#224#224#224#224#224#224
+  +#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#224#225#225#225
+  +#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225
+  +#225#225#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#227#227
+  +#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#228#228#228
+  +#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#229#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#229#230#230#230#230#230
+  +#230#230#230#230#230#230#230#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#238#238#238#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#243#243#243#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#140#140#140#140#140#140#140#140#140#140
+  +#140#140#139#139#139#139#139#139#139#139#139#139#139#139#139#139#139#139#139
+  +#139#139#139#139#139#139#139#138#138#138#138#138#138#139#139#139#139#140#140
+  +#140#141#141#140#141#141#140#141#141#140#141#141#139#140#140#139#139#139#138
+  +#138#138#138#138#138#138#138#138#138#138#138#138#138#138#138#138#138#137#137
+  +#137#139#139#139#139#140#140#139#139#139#140#141#141#141#142#142#140#141#141
+  +#140#141#141#140#141#141#139#140#140#139#139#139#138#138#138#138#138#138#139
+  +#139#139#138#139#139#139#140#140#140#142#142#142#143#143#142#143#143#143#145
+  +#145#143#145#145#142#144#144#142#143#143#141#142#142#139#141#141#137#138#138
+  +#136#137#137#136#136#136#135#135#135#135#135#135#134#134#134#136#136#136#137
+  +#137#137#136#137#137#136#137#137#136#137#137#136#136#136#135#136#136#135#135
+  +#135#134#134#134#134#134#134#133#133#133#134#134#134#134#135#135#135#136#136
+  +#135#136#136#135#136#136#135#136#136#134#135#135#133#133#133#132#132#132#132
+  +#132#132#132#132#132#132#132#132#133#133#133#134#134#134#135#136#136#136#137
+  +#137#137#138#138#138#138#138#137#138#138#139#139#139#139#139#139#139#139#139
+  +#141#141#141#142#142#142#143#143#143#144#144#144#144#144#144#145#145#145#146
+  +#146#146#146#146#146#147#148#148#148#149#149#148#149#149#148#150#150#149#150
+  +#150#150#152#152#149#152#152#148#150#150#146#149#149#144#146#146#141#143#143
+  +#138#139#139#136#137#137#133#134#134#131#132#132#129#129#129#128#128#128#128
+  +#128#128'~~~~~~|||||||||||||}}|}}y'#131#169's'#139#225't'#139#225't'#139
+  +#225'u'#139#225'u'#141#225'v'#141#225'w'#141#225'y'#144#225'z'#144#225'|'#146
+  +#225'|'#146#225'}'#147#226'}'#147#225'|'#145#224'|'#144#224'{'#144#224'|'#144
+  +#223'|'#143#218#144#144#144#146#146#146#147#147#147#153#155#155#163#169#169
+  +#178#189#189#197#213#213'6*n6*n6*n\X'#139#190#204#204#175#183#183#163#167#167
+  +#156#157#157#155#155#155#155#155#155#154#154#154#155#155#155#157#157#157#158
+  ,#159#159#159#160#160#161#162#162#162#164#164#165#166#166#166#168#168#166#168
+  +#168#167#168#168#166#167#167#166#167#167#166#167#167#165#166#166#166#166#166
+  +#165#165#165#166#166#166#166#166#166#167#167#167#168#168#168#168#168#168#169
+  +#169#169#170#170#170#171#171#171#167#176#210#168#178#215#170#178#215#172#180
+  +#215#174#182#217#174#183#217#175#184#217#177#184#215#177#184#215#177#184#214
+  +#176#183#214#178#184#213#178#184#213#180#185#213#180#185#213#181#186#213#182
+  +#187#213#184#189#213#186#190#213#186#192#214#187#193#214#188#193#214#190#194
+  +#215#191#194#213#190#194#213#191#195#213#192#195#213#194#198#214#196#200#215
+  +#197#201#216#198#202#216#200#204#216#200#204#216#200#203#216#204#205#207#205
+  +#205#205#205#205#205#205#205#205#205#205#205#205#205#205#206#206#206#207#207
+  +#207#207#207#207#207#207#207#208#208#208#209#209#209#210#210#210#210#210#210
+  +#211#211#211#211#211#211#211#211#211#213#213#213#214#214#214#215#215#215#216
+  +#217#217#217#218#218#217#218#218#217#218#218#218#219#219#218#219#219#218#218
+  +#218#217#218#218#218#218#218#218#218#218#217#217#217#217#217#217#217#217#217
+  +#217#217#217#218#218#218#218#219#219#219#219#219#219#219#219#219#219#219#220
+  +#220#220#220#221#221#220#221#221#220#221#221#220#220#220#220#220#220#221#221
+  +#221#221#221#221#220#221#221#220#220#220#221#221#221#220#220#220#221#221#221
+  +#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221#221
+  +#221#221#221#222#222#222#222#222#222#222#222#223#223#223#223#223#223#222#223
+  +#223#222#222#222#222#222#222#223#223#223#223#223#223#223#223#223#223#223#223
+  +#223#223#223#223#224#224#224#224#224#225#225#225#225#225#225#225#225#225#225
+  +#225#225#225#226#226#225#225#225#225#225#225#225#225#225#225#225#225#225#225
+  +#225#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226
+  +#226#226#226#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227
+  +#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227
+  +#227#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#234#234#234#234#234#234#234#234#234#234#234#234#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#247#247#247#246#246#246#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#140#140#140#141#141#141
+  +#140#140#140#140#140#140#140#140#140#140#140#140#140#140#140#140#140#140#140
+  +#140#140#140#140#140#140#140#140#140#140#140#140#140#140#140#141#141#142#143
+  +#143#144#146#146#146#149#149#147#150#150#147#150#150#145#148#148#144#146#146
+  +#141#142#142#140#141#141#139#139#139#138#138#138#138#138#138#138#138#138#138
+  +#138#138#139#140#140#140#141#141#143#145#145#146#148#148#148#151#151#148#152
+  +#152#148#152#152#147#149#149#144#147#147#142#144#144#140#141#141#140#140#140
+  +#140#141#141#141#143#143#144#146#146#147#149#149#150#154#154#152#157#157#154
+  +#160#160#155#161#161#155#161#161#154#160#160#153#158#158#150#154#154#147#150
+  +#150#144#147#147#142#143#143#139#140#140#138#138#138#137#138#138#138#139#139
+  +#138#140#140#141#143#143#142#145#145#143#146#146#143#145#145#140#143#143#138
+  +#140#140#136#137#137#135#135#135#135#135#135#135#136#136#137#138#138#139#141
+  ,#141#140#142#142#141#144#144#141#144#144#140#143#143#138#140#140#136#137#137
+  +#133#134#134#133#133#133#133#133#133#134#135#135#136#137#137#138#140#140#140
+  +#143#143#141#144#144#143#145#145#142#144#144#141#143#143#140#141#141#140#140
+  +#140#141#141#141#142#142#142#144#144#144#145#145#145#146#146#146#147#147#147
+  +#148#148#148#150#150#150#151#152#152#153#155#155#156#158#158#158#161#161#160
+  +#164#164#161#166#166#162#167#167#162#168#168#162#168#168#160#166#166#157#163
+  +#163#154#160#160#149#154#154#144#148#148#141#144#144#137#139#139#134#135#135
+  +#131#131#131#129#129#129#128#128#128'~~~~~~}}}}}}|}}~~~~'#134#160'w'#143
+  +#227'{'#147#227'|'#148#228'|'#149#228'|'#148#228'|'#148#227'}'#149#228#128
+  +#151#228#130#153#228#133#157#229#136#159#229#137#162#230#137#161#229#137#159
+  +#229#135#157#228#132#154#226#130#151#225''#149#225#131#147#204#145#145#145
+  +#145#145#145#145#145#145#152#153#153#161#166#166#176#185#185#194#209#209'\X'
+  +#141'5)p5)p\X'#141#192#206#206#176#184#184#164#168#168#157#158#158#154#154
+  +#154#155#155#155#156#156#156#158#159#159#161#162#162#163#165#165#166#169#169
+  +#169#173#173#172#176#176#174#179#179#175#179#179#176#180#180#176#180#180#175
+  +#179#179#173#176#176#172#175#175#170#172#172#169#170#170#168#168#168#168#168
+  +#168#168#168#168#168#168#168#168#168#168#169#169#169#170#170#170#172#172#172
+  +#174#176#184#171#181#218#174#185#219#177#187#220#179#189#220#181#192#221#183
+  +#194#222#183#193#221#183#192#220#182#191#219#181#189#217#179#187#216#179#186
+  +#215#180#186#214#180#186#213#181#186#213#182#188#214#186#191#215#188#194#216
+  +#191#196#218#192#199#219#193#200#219#194#200#219#195#201#219#195#199#217#194
+  +#199#216#194#199#216#196#200#216#198#202#217#201#206#219#203#208#221#204#210
+  +#222#206#212#223#207#212#223#208#212#222#209#212#218#209#211#211#207#208#208
+  +#207#208#208#207#208#208#206#206#206#206#206#206#207#207#207#207#207#207#208
+  +#208#208#208#208#208#209#209#209#210#210#210#211#211#211#211#211#211#211#212
+  +#212#213#213#213#214#214#214#216#217#217#217#219#219#219#221#221#220#222#222
+  +#222#223#223#223#225#225#223#225#225#222#224#224#222#224#224#221#223#223#221
+  +#222#222#220#221#221#219#220#220#219#219#219#218#219#219#218#219#219#220#220
+  +#220#220#221#221#221#222#222#222#223#223#222#224#224#222#223#223#223#224#224
+  +#223#224#224#223#224#224#223#224#224#223#224#224#222#223#223#223#223#223#222
+  +#223#223#221#222#222#222#222#222#221#222#222#221#221#221#221#221#221#221#221
+  +#221#221#221#221#221#221#221#221#221#221#222#223#223#223#223#223#223#224#224
+  +#224#225#225#224#225#225#225#226#226#225#226#226#224#225#225#224#224#224#223
+  +#224#224#224#224#224#224#224#224#224#224#224#225#225#225#225#225#225#226#226
+  +#226#226#227#227#227#227#227#227#228#228#226#227#227#226#227#227#226#227#227
+  +#226#226#226#225#225#225#225#225#225#225#225#225#225#225#225#225#225#225#226
+  +#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#226#227#227
+  +#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#228#228#228
+  +#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#229#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#234#234#234#233#233#233#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#242#242#242#241#241#241#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  ,#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#141#141#141#141#141#141#141#141#141#141#141
+  +#141#141#141#141#141#141#141#141#141#141#140#140#140#141#141#141#141#141#141
+  +#140#140#140#140#140#140#141#141#141#143#145#145#146#149#149#151#154#154#154
+  +#159#159#156#162#162#156#162#162#154#159#159#150#154#154#145#148#148#142#144
+  +#144#140#140#140#139#139#139#139#139#139#139#139#139#140#141#141#142#144#144
+  +#146#149#149#150#154#154#156#161#161#159#165#165#159#166#166#159#166#166#157
+  +#162#162#152#156#156#148#150#150#145#147#147#145#146#146#146#149#149#150#153
+  +#153#155#159#159#160#166#166#163#171#171#167#177#177#170#180#180#171#182#182
+  +#171#183#183#170#181#181#168#178#178#165#174#174#159#167#167#154#160#160#149
+  +#153#153#143#146#146#140#142#142#139#141#141#141#142#142#144#146#146#148#152
+  +#152#152#157#157#152#158#158#151#157#157#148#152#152#144#147#147#140#142#142
+  +#136#137#137#136#137#137#137#138#138#141#143#143#144#148#148#148#153#153#151
+  +#157#157#150#156#156#148#154#154#144#148#148#140#142#142#137#138#138#133#134
+  +#134#133#134#134#136#138#138#140#143#143#145#149#149#149#155#155#150#156#156
+  +#150#156#156#149#153#153#146#149#149#144#145#145#142#143#143#142#142#142#143
+  +#143#143#144#144#144#146#146#146#147#147#147#149#150#150#152#153#153#156#157
+  +#157#159#162#162#163#168#168#167#173#173#171#178#178#175#184#184#177#187#187
+  +#179#190#190#180#191#191#180#192#192#178#190#190#175#186#186#171#181#181#166
+  +#176#176#159#167#167#153#159#159#146#151#151#141#145#145#137#139#139#133#134
+  +#134#129#130#130#128#128#128'~~~~~~}}}'#132#148'z'#145#222''#151#230
+  +#133#157#231#136#161#231#137#162#231#138#163#231#137#163#231#138#163#231#142
+  +#167#232#146#171#233#150#176#234#153#180#235#156#182#235#156#181#235#154#179
+  +#234#151#175#233#145#168#231#141#163#229#135#157#228#137#153#207#147#148#148
+  +#146#147#147#146#146#146#150#152#152#160#164#164#174#183#183#192#206#206'ZW'
+  +#144'3(s3(sZW'#143#192#206#206#177#185#185#164#168#168#159#160#160#156#156
+  +#156#157#158#158#159#160#160#163#165#165#167#171#171#171#176#176#177#183#183
+  +#181#188#188#184#192#192#187#196#196#188#197#197#188#197#197#189#197#197#186
+  +#194#194#183#190#190#180#185#185#177#181#181#174#177#177#170#172#172#169#169
+  +#169#168#168#168#168#168#168#169#169#169#171#171#171#172#173#173#176#178#178
+  +#177#184#204#179#190#223#183#196#225#187#200#226#191#204#228#193#206#229#195
+  +#208#230#195#207#229#193#205#227#191#201#225#187#197#222#184#193#219#182#190
+  +#217#182#188#216#182#188#215#183#189#215#186#192#217#190#196#219#194#201#221
+  +#197#206#224#200#209#226#202#210#226#202#210#226#201#209#224#200#206#222#198
+  +#204#220#199#205#220#201#206#221#203#209#223#207#213#225#209#216#227#212#219
+  +#229#214#221#230#214#221#230#214#221#229#214#220#227#214#218#218#212#215#215
+  +#210#212#212#208#209#209#208#208#208#208#208#208#208#208#208#208#208#208#209
+  +#209#209#209#209#209#210#210#210#211#211#211#212#212#212#212#212#212#213#213
+  +#213#216#216#216#217#218#218#220#221#221#222#224#224#224#227#227#226#229#229
+  +#227#230#230#227#231#231#228#232#232#227#231#231#227#230#230#225#228#228#225
+  +#227#227#223#224#224#221#222#222#220#220#220#219#219#219#219#220#220#220#221
+  +#221#222#223#223#224#225#225#225#227#227#226#229#229#228#230#230#228#231#231
+  +#228#231#231#228#231#231#228#230#230#227#230#230#228#230#230#227#229#229#226
+  +#227#227#225#226#226#224#224#224#223#223#223#223#223#223#222#223#223#222#222
+  +#222#222#222#222#221#221#221#222#222#222#223#223#223#224#224#224#225#226#226
+  +#226#228#228#227#229#229#227#229#229#227#229#229#226#227#227#225#225#225#224
+  +#224#224#223#224#224#224#224#224#225#225#225#225#226#226#227#227#227#228#229
+  +#229#229#231#231#230#232#232#230#232#232#230#231#231#229#230#230#227#228#228
+  +#227#228#228#227#227#227#226#226#226#226#226#226#226#226#226#226#226#226#227
+  +#227#227#227#227#227#227#227#227#227#227#227#227#227#227#226#226#226#227#227
+  +#227#227#227#227#227#227#227#227#227#227#227#227#227#228#228#228#228#228#228
+  +#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#229#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#230#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#233#233#233#233#233#233
+  +#233#233#233#233#233#233#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238#238#238
+  ,#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#246#246#246#246#246#246#245#245#245#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#247#247#247#246#246#246#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#142#142#142#142#142#142#142#142#142#142#142
+  +#142#141#141#141#141#141#141#142#142#142#141#141#141#141#141#141#141#141#141
+  +#141#141#141#141#141#141#143#143#143#146#148#148#152#156#156#159#165#165#166
+  +#174#174#170#180#180#170#180#180#166#174#174#159#165#165#151#155#155#146#148
+  +#148#142#142#142#140#140#140#140#140#140#141#141#141#143#144#144#147#149#149
+  +#153#157#157#161#168#168#168#177#177#173#184#184#174#186#186#172#183#183#166
+  +#175#175#159#166#166#153#158#158#150#154#154#151#154#154#155#160#160#160#167
+  +#167#168#177#177#175#186#186#180#194#194#185#200#200#170#182#192#154#163#183
+  +#154#163#183#152#162#182#184#200#200#180#194#194#174#186#186#166#176#176#157
+  +#164#164#150#154#154#144#147#147#143#144#144#145#147#147#150#155#155#157#164
+  +#164#163#171#171#165#175#175#164#173#173#158#166#166#151#157#157#145#148#148
+  +#139#140#140#137#138#138#140#142#142#145#149#149#152#158#158#159#167#167#163
+  +#173#173#164#174#174#159#168#168#152#158#158#145#149#149#139#141#141#135#136
+  +#136#135#136#136#139#142#142#147#151#151#153#160#160#160#169#169#164#174#174
+  +#162#171#171#157#165#165#152#157#157#147#149#149#144#145#145#143#143#143#142
+  +#143#149#141#144#156#148#148#148#151#152#152#154#156#156#159#161#161#164#169
+  +#169#170#176#176#177#185#185#183#193#193#188#200#200#192#206#206#177#188#198
+  +#160#169#189#161#170#190'{'#166#159#169#189#157#167#187#172#185#195#185#200
+  +#200#178#192#192#169#181#181#161#171#171#154#161#161#146#151#151#140#143#143
+  +#135#137#137#132#132#132#129#129#129'~'#129#135'z'#143#216#129#154
+  +#230#137#163#232#146#173#235#153#179#236#156#183#237#157#184#237#156#183#236
+  +#157#184#237#160#187#238#164#192#238#170#197#240#166#192#233#144#163#211#160
+  +#183#226#174#201#240#170#197#239#164#189#237#156#180#234#148#171#231#146#162
+  +#203#152#154#154#149#150#150#148#148#148#151#153#153#159#164#164#174#183#183
+  +#191#205#205'ZV'#145'2''u2''uZV'#145#193#206#206#178#186#186#166#170#170#159
+  +#160#160#158#159#159#160#161#161#165#168#168#171#175#175#178#184#184#184#192
+  +#192#190#200#200#195#207#207#198#211#211#172#181#196#164#171#191#164#171#191
+  +#182#192#202#199#211#211#195#205#205#190#199#199#185#191#191#179#183#183#174
+  +#176#176#171#172#172#169#169#169#170#170#170#172#172#172#174#175#175#178#181
+  +#181#183#187#187#185#196#221#190#204#230#196#210#232#200#215#235#204#219#236
+  +#176#187#215#168#177#208#187#198#222#205#218#235#201#214#232#196#208#228#190
+  +#199#224#187#195#220#184#191#217#184#190#217#185#192#217#191#197#221#195#203
+  +#223#202#210#227#206#217#231#210#221#233#212#223#234#211#221#233#208#218#230
+  +#206#214#227#204#211#225#204#211#224#206#212#225#210#217#229#214#222#232#217
+  +#226#234#177#182#207#168#171#200#147#147#185#179#183#207#200#206#221#221#227
+  +#228#219#223#223#215#218#218#212#214#214#211#212#212#208#209#209#208#209#209
+  +#209#209#209#209#209#209#210#210#210#210#210#210#211#211#211#212#212#212#212
+  +#213#213#213#214#214#216#217#217#219#221#221#223#226#226#226#230#230#229#233
+  +#233#231#236#236#186#188#208#187#189#209#188#189#209#188#189#209#198#200#215
+  +#232#236#236#229#233#233#227#230#230#225#227#227#223#224#224#221#222#222#221
+  +#222#222#223#224#224#225#227#227#228#230#230#230#233#233#232#236#236#233#237
+  +#237#233#238#238#233#238#238#233#238#238#233#237#237#233#237#237#232#236#236
+  +#231#235#235#230#233#233#228#231#231#227#229#229#226#227#227#224#225#225#223
+  +#224#224#223#223#223#222#222#222#222#222#222#222#223#223#225#225#225#226#227
+  +#227#228#230#230#230#233#233#231#234#234#232#234#234#231#233#233#229#230#230
+  +#227#228#228#225#226#226#225#225#225#225#225#225#226#226#226#227#228#228#229
+  +#231#231#231#233#233#232#235#235#234#237#237#233#236#236#232#235#235#230#232
+  +#232#228#230#230#228#229#229#227#227#227#226#226#226#226#226#226#226#226#226
+  ,#226#226#226#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227
+  +#227#227#227#227#227#228#228#228#228#228#228#228#228#228#228#228#228#228#228
+  +#228#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#228#228#228
+  +#229#229#229#229#229#229#229#229#229#229#229#229#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#233#233#233#233
+  +#233#233#232#232#232#232#232#232#232#232#232#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#236#236#236#236#236#236#236#236#236#236
+  +#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#143#143#143#142#142#142#142
+  +#142#142#142#142#142#142#142#142#142#142#142#142#142#142#142#142#142#142#142
+  +#142#142#142#142#142#142#142#142#142#142#145#146#146#149#152#152#158#163#163
+  +#169#178#178'QL'#138'RN'#139'RN'#139'QL'#137#168#178#178#157#163#163#148#151
+  +#151#144#145#145#141#141#141#141#141#141#143#144#144#147#149#149#154#158#158
+  +#163#171#171#174#186#186#142#149#175'TP'#141'TP'#141'SN'#140'QK'#137'eb'#144
+  +#161#167#167#157#162#162#160#166#166#166#175#175#175#186#186#184#199#199#137
+  +#144#175'_]'#150'0&w0&w0&w0&w0&w0&wB;'#131'dd'#151#137#143#169#151#159#169
+  +#156#162#162#149#152#152#146#149#149#150#154#154#158#165#165#146#152#168'PL'
+  +#137'QM'#138'QL'#138'}'#158#159#167#167#149#153#153#142#143#143#138#140#140
+  +#143#146#146#150#156#156#162#171#171'_]'#144'QL'#138'QM'#138'PK'#136#162#172
+  +#172#151#157#157#142#145#145#137#138#138#138#139#139#143#147#147#154#161#161
+  +#143#150#165'PK'#137'QL'#138'PL'#137'{'#158#160#168#168#151#155#155#145#147
+  +#147#132#142#175'r'#137#222'q'#137#227#128#145#199#150#155#165#161#164#164
+  +#168#173#173#177#184#184#184#195#195#192#205#205#162#170#191'kk'#158'D='#133
+  +'0&w0&w0&w0&w0&w0&w0&wC<'#132'hi'#156#154#165#186#180#196#196#169#182#182#160
+  +#169#169#150#156#156#142#146#146#136#138#138#132#133#133#129#129#129#128#128
+  +#128'~'#128#133'x'#139#210'}'#149#230#136#161#232#144#168#229'ML'#149'OO'#150
+  +'QP'#150'jq'#174#179#209#243#178#208#243#155#177#221'ch'#166'900&w0&w0&w0&w'
+  +'SS'#151#132#146#197#174#201#240#164#189#236#160#176#204#159#164#164#153#156
+  +#156#150#152#152#152#154#154#161#165#165#174#182#182#191#205#205'XU'#146'0&w'
+  +'0&wXV'#146#193#207#207#178#186#186#168#172#172#161#163#163#162#163#163#166
+  +#169#169#173#178#178#182#189#189#190#201#201#189#200#205'~'#128#170'NI'#139
+  +'0&w0&w0&w0&w0&w0&wWS'#144'||'#165#156#161#181#184#190#190#178#181#181#173
+  +#174#174#171#172#172#172#172#172#174#176#176#179#182#182#185#189#189#192#199
+  +#199#197#212#234#184#197#223#129#132#180'OJ'#142'0&w0&w0&w0&w0&wD='#134'WR'
+  +#148#195#205#227#190#199#222#186#194#219#186#193#219#189#197#220#196#204#225
+  +#204#214#230#201#211#228'pn'#165';10&w0&w0&wnk'#162#210#218#230#210#217#229
+  +#202#209#224#142#142#184'fb'#156'0&w0&w0&w0&w0&w0&w]W'#149#180#183#204#220
+  +#225#225#216#219#219#213#215#215#210#211#211#210#210#210#209#209#209#210#210
+  +#210#210#210#210#212#212#212#212#212#212#213#213#213#214#214#214#215#216#216
+  +#218#220#220#223#226#226#193#194#210#128'|'#170'SK'#142'0&w0&w0&w0&w0&w0&wH?'
+  +#135#141#139#180#220#224#230#229#232#232#225#227#227#223#225#225#223#224#224
+  +#224#226#226#228#230#230'up'#163'_X'#149'_Y'#150'`Y'#151'`Y'#151'`Y'#151'`Y'
+  ,#151'`Y'#151'`Y'#150'xs'#166#166#165#197#212#215#226#234#238#238#232#235#235
+  +#230#232#232#228#229#229#226#227#227#225#225#225#224#224#224#223#223#223#224
+  +#224#224#225#226#226#228#229#229#231#233#233'_W'#149'_X'#149'_X'#149'_W'#149
+  +#231#234#234#228#230#230#226#227#227#226#227#227#226#227#227#228#229#229#230
+  +#232#232#233#236#236#224#226#232'`X'#150'`Y'#150'`X'#150'_X'#149'^W'#148#197
+  +#196#212#229#230#230#228#228#228#227#227#227#226#226#226#227#227#227#227#227
+  +#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227#227
+  +#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#229#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#235#235#235
+  +#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#244#244#244#243#243#243#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#143#143#143#143#143#143#143#143#143
+  +#143#143#143#143#143#143#143#143#143#143#143#143#143#143#143#143#143#143#142
+  +#142#142#142#142#142#142#142#142#146#147#147#153#157#157#164#171#171#178#190
+  +#190'/%z/%z/%z/%z'#177#189#189#162#170#170#151#155#155#145#146#146#142#142
+  +#142#142#143#143#146#147#147#153#157#157#163#170#170#176#188#188#171#184#195
+  +'80'#128'/%z/%z/%z8/~'#166#175#180#167#174#174#166#173#173#171#180#180#180
+  +#193#193#165#176#192'KG'#140'/%z/%z/%z/%z/%z/%z/%z/%z/%z/%z/%zno'#153#161#168
+  +#168#152#157#157#149#153#153#154#159#159#164#173#173#145#153#174'/%z/%z/%zrt'
+  +#159#167#177#177#153#159#159#144#147#147#141#142#142#146#149#149#156#163#163
+  +#170#182#182'QN'#142'/%z/%z/%z'#172#185#185#157#165#165#145#149#149#138#139
+  +#139#139#141#141#148#153#153#160#169#169#143#151#172'/%z/%z/%zqt'#159#167#177
+  +#177#150#160#174#128#148#209's'#140#229'r'#138#228's'#141#229'x'#146#230#128
+  +#154#232#150#169#212#177#188#196#191#204#204#162#171#192'WT'#148'/%z/%z/%z/%'
+  +'z/%z/%z/%z/%z/%z/%z/%z/%z/%zTR'#147#152#164#186#177#192#192#164#175#175#153
+  +#161#161#144#149#149#136#138#138#132#133#133#130#130#130'u'#136#209'w'#144
+  +#228#128#153#231#143#169#234#161#189#239'/%z/%z/%zTT'#154#195#227#248'px'#177
+  +'/%z/%z/%z/%z/%z/%z/%z/%z/%z@;'#138#149#166#213#175#195#216#170#178#178#161
+  +#167#167#155#158#158#155#157#157#161#165#165#174#182#182#191#205#205'WU'#148
+  +'/%z/%zXU'#149#194#207#207#179#187#187#168#173#173#164#167#167#166#169#169
+  +#174#179#179#184#192#192#194#205#205#135#138#176'80'#129'/%z/%z/%z/%z/%z/%z/'
+  +'%z/%z/%z/%z/%z'#188#195#195#180#184#184#175#177#177#173#174#174#175#176#176
+  +#179#182#182#186#191#191#194#202#202#203#214#218''#131#181'/%z/%z/%z/%z/%z/'
+  +'%z/%z/%z/%z/%z'#199#209#229#192#201#224#189#197#222#190#197#222#194#203#224
+  +#203#213#230#182#189#215'90'#130'/%z/%z/%z/%z/%zYU'#151#213#222#233#214#221
+  +#232#174#178#206'/%z/%z/%z/%z/%z/%z/%z/%z/%z/%z'#159#159#191#221#226#226#216
+  +#219#219#213#215#215#211#212#212#211#211#211#211#211#211#211#211#211#213#213
+  +#213#213#213#213#214#214#214#215#215#215#218#218#218#220#222#222#225#228#228
+  +']V'#150'/%z/%z/%z/%z/%z/%z/%z/%z/%z/%zRK'#145#221#225#231#229#232#232#226
+  ,#228#228#225#227#227#228#230#230#231#234#234'^X'#152'/%z/%z/%z/%z/%z/%z/%z/%'
+  +'z/%z/%z/%zkf'#161#189#190#212#234#238#238#231#234#234#228#230#230#226#227
+  +#227#225#225#225#224#224#224#225#226#226#227#228#228#230#232#232#234#237#237
+  +'/%z/%z/%z/%z'#234#237#237#231#233#233#228#229#229#227#228#228#228#229#229
+  +#230#232#232#234#237#237#225#228#234'SK'#145'/%z/%z/%z/%z'#164#162#193#232
+  +#233#233#229#230#230#228#228#228#227#227#227#227#227#227#227#227#227#227#227
+  +#227#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228
+  +#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#229#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#229#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#241#241#241#240#240#240#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#247#247#247#246#246#246#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#144#144#144#144#144#144#144#144#144
+  +#143#143#143#143#143#143#143#143#143#144#144#144#143#143#143#143#143#143#143
+  +#143#143#143#143#143#143#143#143#147#149#149#156#160#160#168#177#177#184#199
+  +#199'-#|-#|-#|-#|'#183#197#197#166#175#175#154#158#158#146#147#147#143#143
+  +#143#146#147#147#151#154#154#160#167#167#174#185#185#189#205#205'KG'#143'-#|'
+  +'-#|-#|7.'#130#160#170#186#176#187#187#172#181#181#175#185#185#184#197#197
+  +#139#145#179'-#|-#|-#|-#|-#|-#|A;'#137'UR'#148'UR'#148'-#|-#|-#|-#|no'#155
+  +#162#170#170#154#158#158#152#157#157#157#163#163#170#180#180#151#160#182'-#|'
+  +'-#|-#|ux'#165#172#184#184#156#163#163#146#149#149#142#143#143#148#152#152
+  +#160#168#168#176#190#190'RP'#146'-#|-#|-#|'#179#194#194#161#170#170#147#152
+  +#152#138#140#140#139#141#141#150#156#156#165#177#177#148#159#181'-#|-#|-#|ty'
+  +#167#162#185#218#137#165#234'|'#150#231'u'#142#229't'#141#229'y'#147#230#129
+  +#155#232#140#168#235#155#183#239#161#190#236'nt'#174'-#|-#|-#|-#|-#|-#|-#|-#'
+  +'|-#|-#|-#|-#|-#|-#|-#|-#|-#|nr'#164#173#189#194#168#180#180#156#164#164#144
+  +#149#149#137#139#139'{'#138#193't'#140#228'x'#145#229#132#157#232#148#174#236
+  +#169#198#242'-#|-#|-#|SS'#155'fk'#171'-#|-#|-#|-#|-#|-#|-#|-#|-#|-#|-#|-#|'
+  +#136#147#189#183#195#195#170#178#178#160#165#165#158#161#161#163#168#168#175
+  +#184#184#191#205#205'VS'#150'-#|-#|VS'#150#194#207#207#180#188#188#170#174
+  +#174#167#171#171#172#177#177#182#190#190#195#207#207'ji'#161'-#|-#|-#|-#|-#|'
+  +'-#|WT'#150'WT'#150'B;'#137'-#|-#|-#|-#|'#189#196#196#182#186#186#177#179#179
+  +#176#178#178#179#181#181#185#190#190#193#201#201#194#204#209'WT'#151'-#|-#|-'
+  +'#|-#|-#|-#|-#|-#|-#|-#|-#|'#199#210#229#193#202#225#192#200#223#194#202#224
+  +#200#209#228#210#222#235'NH'#146'-#|-#|-#|-#|-#|-#|XS'#152#213#222#232#214
+  +#222#232#174#177#206'-#|-#|-#|[V'#153#137#138#184#138#139#184'\W'#154'-#|-#|'
+  +'-#|90'#131#215#220#225#219#223#223#215#217#217#213#214#214#211#211#211#211
+  +#211#211#211#211#211#213#213#213#213#213#213#214#214#214#215#215#215#218#219
+  +#219#221#223#223#226#229#229'[U'#152'-#|-#|-#|]X'#154#130''#177'vr'#169'E='
+  +#139'-#|-#|-#|-#|]W'#154#233#237#237#229#232#232#228#230#230#229#232#232#233
+  ,#237#237']W'#154'-#|-#|-#|-#|-#|-#|-#|-#|-#|-#|-#|-#|-#|'#130''#177#236#240
+  +#240#232#235#235#229#231#231#227#228#228#225#226#226#226#226#226#228#229#229
+  +#231#233#233#235#239#239'-#|-#|-#|E='#139#236#240#240#232#234#234#229#231#231
+  +#230#231#231#231#233#233#234#237#237#238#242#242'wr'#170'-#|-#|-#|-#|'#165
+  +#164#197#234#237#237#231#233#233#229#230#230#228#228#228#227#227#227#227#227
+  +#227#227#227#227#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228
+  +#228#228#228#228#228#228#228#228#228#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#229#229#230#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#232#232#232#232#232#232#232#232#232#232#232#232#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#245#245#245
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#246#246
+  +#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#145#145#145
+  +#145#145#145#145#145#145#144#144#144#144#144#144#144#144#144#144#144#144#144
+  +#144#144#144#144#144#144#144#144#144#144#144#143#143#143#148#149#149#157#162
+  +#162#171#181#181#189#205#205',"~,"~,"~@:'#139#187#203#203#169#178#178#155#159
+  +#159#147#148#148#144#145#145#150#153#153#158#163#163#171#180#180#186#201#201
+  +'qt'#168',"~,"~,"~,"~'#149#158#186#184#197#197#178#188#188#177#187#187#184
+  +#196#196#166#178#195',"~,"~,"~,"~A:'#139#144#152#187#187#203#208#193#209#209
+  +#190#205#205#189#205#205#190#206#206#162#173#190'ru'#163'=6'#134'kk'#153#160
+  +#167#167#154#158#158#152#157#157#160#166#166#174#185#185#154#165#188',"~,"~,'
+  +'"~w{'#169#175#188#188#159#166#166#146#149#149#143#144#144#149#154#154#163
+  +#171#171#181#196#196'SQ'#150',"~,"~,"~'#183#200#200#164#174#174#148#154#154
+  +#138#141#141#140#143#143#152#159#159#169#181#181#152#164#187',"~,"~,"~r}'#185
+  +#161#191#240#140#168#235'~'#152#231'x'#145#229'y'#146#231#128#154#233#140#167
+  +#236#155#185#239#164#193#237'FE'#149',"~,"~,"~,"~,"~a`'#159#146#153#187#184
+  +#197#208#201#216#216#200#215#215#199#215#215#180#194#205#143#151#185'__'#158
+  +',"~,"~,"~,"~,"~HE'#144#175#191#196#169#182#182#154#163#163#135#153#201'{'
+  +#146#231'v'#142#229'{'#147#230#134#159#233#152#179#237#175#204#243',"~,"~,"~'
+  +',"~,"~,"~,"~dj'#172#152#172#216#184#214#245#186#214#244#171#195#230#129#142
+  +#194'6.'#134',"~,"~,"~,"~'#138#145#180#181#193#193#169#176#176#163#168#168
+  +#166#171#171#175#184#184#192#206#206'US'#152',"~,"~VS'#152#194#207#207#181
+  +#190#190#173#178#178#173#178#178#180#187#187#192#203#203'hh'#162',"~,"~,"~,"'
+  +'~WT'#153#158#166#194#206#220#220#203#216#216#203#215#215#204#216#216#204#216
+  +#216#153#158#187'fd'#158',"~'#187#193#193#182#186#186#177#180#180#178#180#180
+  +#183#187#187#192#199#199#203#213#213'a_'#158',"~,"~,"~,"~XU'#156#162#171#207
+  +#203#217#235#213#228#241#212#226#240#168#176#210'jh'#168',"~'#196#207#228#194
+  +#202#226#193#201#225#197#205#227#204#215#232#161#167#204',"~,"~,"~,"~'#147
+  +#150#192#211#221#235#184#190#215#159#162#198#211#219#230#212#219#231#172#176
+  +#206',"~d_'#161#200#206#224#223#232#239#225#234#240#228#237#241#232#243#245
+  +'sq'#171',"~,"~,"~'#148#148#188#222#227#227#217#220#220#214#215#215#213#213
+  ,#213#212#212#212#213#213#213#214#214#214#214#214#214#215#215#215#216#216#216
+  +#218#219#219#221#223#223#226#229#229'[T'#153'8/'#133#139#136#182#222#226#232
+  +#234#239#239#234#239#239#236#241#241#238#245#245#166#166#201',"~,"~,"~,"~'
+  +#175#176#205#231#235#235#229#232#232#230#234#234#235#239#239']W'#156',"~,"~,'
+  +'"~'#142#140#186#142#140#186#142#140#186#142#140#186'vr'#171'E='#141',"~,"~,'
+  +'"~,"~,"~PJ'#149#224#227#233#232#235#235#229#231#231#227#227#227#227#228#228
+  +#229#230#230#232#235#235#237#242#242',"~,"~,"~^W'#156#238#242#242#234#236#236
+  +#232#234#234#232#234#234#234#237#237#238#242#242'vr'#171',"~,"~,"~,"~'#166
+  +#165#200#236#239#239#233#235#235#231#232#232#229#230#230#229#229#229#228#228
+  +#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#228#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#229#229#229#229#229#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#232#232#232#231#231#231#232#232#232#231#231#231#232#232#232#231
+  +#231#231#231#231#231#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#146#146#146#145#145#145#145#145#145#145#145#145#145#145#145#145#145#145#145
+  +#145#145#145#145#145#145#145#145#144#144#144#144#144#144#144#144#144#149#151
+  +#151#159#164#164#174#184#184#192#208#208'*!'#128'*!'#128'*!'#128'SR'#153#188
+  +#204#204#170#179#179#156#161#161#149#151#151#148#150#150#155#159#159#166#175
+  +#175#181#194#194#159#171#195'*!'#128'*!'#128'*!'#128'*!'#128'z'#128#175#191
+  +#205#205#181#192#192#178#187#187#182#193#193#193#208#208'?9'#140'*!'#128'*!'
+  +#128'*!'#128'hk'#166#192#208#214#193#207#207#185#197#197#179#190#190#176#186
+  +#186#176#186#186#176#187#187#176#186#186#174#184#184#163#171#177#141#146#164
+  +#156#161#161#152#155#155#154#158#158#161#168#168#176#188#188#156#167#191'*!'
+  +#128'*!'#128'*!'#128#138#146#182#177#190#190#159#166#166#147#150#150#144#146
+  +#146#150#154#154#164#174#174#183#199#199'RQ'#152'*!'#128'*!'#128'*!'#128#186
+  +#204#204#165#177#177#149#155#155#140#142#142#140#143#143#152#159#159#171#184
+  +#184#153#166#192'*!'#128'*!'#128'*!'#128's~'#187#164#195#241#143#170#236#129
+  +#154#232'{'#148#231''#153#232#138#166#235#154#183#239#164#193#236'FE'#151'*'
+  +'!'#128'*!'#128'*!'#128'*!'#128'PQ'#158#177#197#221#199#213#216#194#206#206
+  +#189#200#200#186#197#197#185#195#195#184#195#195#186#197#197#188#201#201#193
+  +#209#209#180#195#207']^'#159'*!'#128'*!'#128'*!'#128'*!'#128'HE'#146#175#190
+  +#196#160#183#217#141#167#235#129#154#232'z'#146#230'}'#149#231#136#161#234
+  +#154#182#238#178#208#244'*!'#128'*!'#128'*!'#128'*!'#128'*!'#128'4-'#136#154
+  +#175#217#180#209#244#172#199#241#167#194#239#168#193#239#172#199#240#180#208
+  +#243#182#208#239'[^'#165'*!'#128'*!'#128'*!'#128'4-'#134#183#196#202#177#186
+  +#186#169#175#175#169#175#175#178#187#187#192#206#206'TR'#153'*!'#128'*!'#128
+  +'TR'#153#195#208#208#183#191#191#177#183#183#178#185#185#188#198#198#162#170
+  +#194'*!'#128'*!'#128'*!'#128'*!'#128#150#157#193#207#221#221#199#211#211#194
+  ,#204#204#192#200#200#191#199#199#192#200#200#193#201#201#193#201#201#191#198
+  +#198#161#165#182#183#187#187#179#182#182#178#181#181#181#184#184#189#194#194
+  +#199#208#208#137#141#183'*!'#128'*!'#128'*!'#128'5.'#135#152#160#202#211#227
+  +#241#206#220#238#202#215#235#201#214#234#201#214#234#201#213#233#200#211#232
+  +#168#175#210#193#202#226#192#200#224#194#202#225#199#208#228#208#219#234'xy'
+  +#178'*!'#128'*!'#128'*!'#128#146#149#194#224#236#243#216#227#237#211#219#232
+  +#208#215#229#207#213#228#209#215#228#168#172#204'jh'#167#215#222#232#216#223
+  +#233#217#225#233#219#227#234#223#231#238#230#240#243#221#230#239'*!'#128'*!'
+  +#128'*!'#128'ro'#170#225#230#230#219#222#222#215#216#216#213#213#213#213#213
+  +#213#213#213#213#215#215#215#216#216#216#216#216#216#217#217#217#218#219#219
+  +#221#223#223#224#226#226'd_'#160#194#195#213#230#233#233#230#233#233#231#234
+  +#234#231#234#234#232#236#236#236#241#241#240#246#246'uq'#172'*!'#128'*!'#128
+  +'*!'#128#129'~'#179#234#238#238#232#235#235#232#236#236#236#240#240'\W'#158
+  +'*!'#128'*!'#128'*!'#128#241#247#247#240#246#246#237#242#242#236#240#240#236
+  +#240#240#238#243#243#190#193#216'OI'#150'*!'#128'*!'#128'*!'#128'*!'#128'uq'
+  +#173#236#240#240#232#235#235#229#230#230#228#229#229#229#231#231#233#236#236
+  +#238#242#242'*!'#128'*!'#128'*!'#128'\W'#158#239#243#243#235#238#238#234#237
+  +#237#235#238#238#238#242#242#142#139#187'*!'#128'*!'#128'*!'#128'*!'#128#166
+  +#166#202#238#242#242#235#237#237#232#234#234#230#231#231#229#229#229#228#228
+  +#228#228#228#228#228#228#228#228#228#228#228#228#228#229#229#229#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#236#236#236#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#146#146#146#146#146#146#146#146#146#146#146#146#146#146#146#146
+  +#146#146#146#146#146#146#146#146#146#146#146#146#146#146#145#145#145#145#145
+  +#145#150#151#151#160#165#165#174#184#184#192#209#209'( '#131'( '#131'( '#131
+  +'RQ'#155#189#205#205#171#180#180#157#162#162#151#154#154#152#156#156#164#170
+  +#170#178#189#189#183#199#205'2+'#137'( '#131'( '#131'( '#131'\]'#161#193#208
+  +#208#181#192#192#175#184#184#177#186#186#187#199#199#140#148#185'( '#131'( '
+  +#131'( '#131']^'#162#208#227#227#195#210#210#184#195#195#176#184#184#170#178
+  +#178#167#174#174#166#172#172#166#172#172#165#171#171#163#170#170#163#168#168
+  +#157#162#162#153#156#156#150#152#152#152#156#156#161#168#168#177#189#189#156
+  +#168#192'( '#131'( '#131'( '#131#157#169#194#177#190#190#160#167#167#147#149
+  +#149#143#145#145#151#155#155#165#174#174#184#200#200'QP'#155'( '#131'( '#131
+  +'( '#131#186#204#204#165#177#177#149#155#155#139#141#141#140#143#143#151#160
+  +#169#164#187#218#148#168#216'( '#131'( '#131'( '#131'r~'#189#166#195#241#144
+  +#172#236#130#157#233#128#154#232#135#162#235#151#180#239#170#200#243'MO'#160
+  ,'( '#131'( '#131'( '#131'( '#131'}'#140#196#177#208#245#163#194#242#155#182
+  +#237#163#180#212#174#181#186#174#179#179#172#177#177#171#177#177#171#177#177
+  +#173#181#181#178#188#188#183#196#196#193#210#210#142#152#189'( '#131'( '#131
+  +'( '#131'( '#131'EC'#151#171#201#243#153#180#239#138#163#234'~'#151#231''
+  +#151#231#137#162#234#154#182#238#180#209#244'( '#131'( '#131'( '#131'( '#131
+  +'( '#131#167#190#226#178#206#243#164#190#239#154#179#236#149#173#235#149#173
+  +#235#153#177#235#162#187#238#179#199#219#197#217#219'GE'#149'( '#131'( '#131
+  +'( '#131'ef'#164#185#197#197#174#183#183#172#180#180#179#189#189#193#207#207
+  +'RQ'#155'( '#131'( '#131'SQ'#156#196#209#209#185#194#194#180#188#188#185#193
+  +#193#195#207#207'SP'#155'( '#131'( '#131'( '#131#149#157#194#210#226#226#200
+  +#212#212#193#201#201#187#193#193#184#189#189#184#189#189#183#188#188#184#189
+  +#189#184#189#189#183#188#188#182#186#186#179#182#182#178#180#180#179#181#181
+  +#184#188#188#194#201#201#196#206#213'3,'#137'( '#131'( '#131'( '#131#162#172
+  +#210#209#224#240#201#214#235#194#206#231#191#202#229#190#201#227#191#200#227
+  +#192#202#227#191#201#226#191#200#225#189#197#222#189#197#222#194#202#225#201
+  +#210#230#211#222#236'VS'#159'( '#131'( '#131'( '#131#214#226#238#218#228#238
+  +#210#219#231#206#212#227#204#209#225#203#208#224#204#209#224#195#201#219#209
+  +#214#227#210#215#228#211#217#228#213#218#229#216#222#231#221#229#235#229#238
+  +#242#221#230#239'( '#131'( '#131'( '#131'XT'#159#226#231#231#220#223#223#215
+  +#217#217#214#214#214#213#213#213#213#213#213#215#215#215#216#216#216#216#216
+  +#216#216#217#217#218#219#219#220#221#221#223#224#224#213#215#221#226#228#228
+  +#226#228#228#226#228#228#227#229#229#228#230#230#230#233#233#234#238#238#239
+  +#245#245#140#139#189'( '#131'( '#131'( '#131'ZU'#160#235#239#239#232#235#235
+  +#233#237#237#237#241#241'ZV'#160'( '#131'( '#131'( '#131#241#247#247#237#242
+  +#242#234#237#237#232#235#235#232#235#235#234#237#237#236#241#241#239#244#244
+  +'tq'#174'( '#131'( '#131'( '#131'( '#131#164#164#201#234#238#238#231#233#233
+  +#230#231#231#231#232#232#234#237#237#239#243#243'( '#131'( '#131'( '#131'[V'
+  +#160#241#245#245#238#241#241#237#241#241#239#242#242#165#165#203'( '#131'( '
+  +#131'( '#131'( '#131#141#139#189#239#242#242#235#238#238#232#234#234#230#231
+  +#231#229#229#229#229#230#230#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#229#229#230#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#232#232#232#232#232#232#231#231#231#231#231#231#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#235#235
+  +#235#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#147#147#147#147#147#147#147
+  +#147#147#146#146#146#146#146#146#147#147#147#147#147#147#146#146#146#146#146
+  +#146#146#146#146#146#146#146#146#146#146#151#152#152#161#166#166#174#184#184
+  +#193#209#209''''#31#133''''#31#133''''#31#133'QP'#157#189#205#205#171#180#180
+  ,#159#164#164#155#159#159#160#165#165#173#182#182#188#203#203'[['#162''''#31
+  +#133''''#31#133''''#31#133'<8'#145#186#202#208#182#193#193#173#181#181#171
+  +#178#178#178#187#187#192#205#205'GC'#151''''#31#133''''#31#133'2+'#139#189
+  +#205#218#207#225#225#194#208#208#183#194#194#176#184#184#171#177#177#168#173
+  +#173#166#171#171#164#169#169#164#169#169#162#167#167#160#164#164#156#160#160
+  +#152#155#155#151#153#153#154#157#157#163#169#169#178#190#190#156#167#193''''
+  +#31#133''''#31#133''''#31#133#156#168#194#177#189#189#159#166#166#147#150#150
+  +#144#146#146#151#155#155#165#174#174#184#200#200'PP'#156''''#31#133''''#31
+  +#133''''#31#133#186#204#204#165#177#177#149#155#155#139#141#141#136#147#177
+  +#141#167#236#160#189#240#147#169#218''''#31#133''''#31#133''''#31#133'r~'#190
+  +#166#196#242#146#174#237#135#162#235#134#160#234#145#173#237#165#194#242'p{'
+  +#190''''#31#133''''#31#133''''#31#133''''#31#133#133#151#205#173#204#244#157
+  +#186#241#145#172#238#135#162#236#128#155#234#128#152#229#144#158#200#161#164
+  +#169#162#164#164#161#164#164#162#166#166#165#170#170#170#177#177#178#189#189
+  +#188#204#204#139#150#188''''#31#133''''#31#133''''#31#133''''#31#133'p{'#190
+  +#166#195#242#147#174#237#133#158#234#131#155#233#138#164#235#156#182#238#180
+  +#209#245''''#31#133''''#31#133''''#31#133''''#31#133'u'#129#190#183#211#245
+  +#164#190#240#149#173#236#140#163#232#136#159#231#136#158#231#144#160#203#156
+  +#165#173#170#180#180#185#200#200#182#199#212''''#31#133''''#31#133''''#31#133
+  +'2*'#139#192#206#206#180#190#190#176#184#184#181#191#191#194#208#208'RP'#157
+  +''''#31#133''''#31#133'RQ'#157#197#210#210#187#197#197#185#193#193#190#200
+  +#200#171#182#201''''#31#133''''#31#133''''#31#133'^^'#164#215#232#232#208#223
+  +#223#198#209#209#191#199#199#186#192#192#183#188#188#182#187#187#182#186#186
+  +#181#185#185#182#186#186#182#185#185#181#184#184#179#181#181#179#181#181#182
+  +#185#185#190#195#195#200#208#208#147#152#191''''#31#133''''#31#133''''#31#133
+  +'jl'#176#210#227#241#200#213#235#191#202#229#185#195#226#183#193#224#184#192
+  +#223#185#193#223#185#194#223#185#193#223#186#194#222#186#193#221#189#196#223
+  +#194#201#226#202#211#231#213#225#237'VS'#161''''#31#133''''#31#133'?9'#147
+  +#222#234#242#213#222#234#205#212#227#200#206#223#199#204#222#200#204#222#201
+  +#206#222#204#208#223#205#210#225#207#212#225#209#214#227#212#217#229#217#223
+  +#232#223#231#237#231#240#244#148#149#196''''#31#133''''#31#133''''#31#133'|{'
+  +#180#226#230#230#220#223#223#216#217#217#214#214#214#214#214#214#214#214#214
+  +#216#216#216#217#217#217#217#217#217#217#217#217#219#219#219#219#220#220#222
+  +#223#223#223#224#224#224#225#225#224#225#225#224#225#225#225#226#226#226#228
+  +#228#229#232#232#234#238#238#239#245#245#128'}'#183''''#31#133''''#31#133''''
+  +#31#133'YU'#161#235#239#239#233#236#236#234#237#237#237#242#242'ZU'#162''''
+  +#31#133''''#31#133''''#31#133#239#244#244#234#238#238#231#233#233#229#230#230
+  +#228#229#229#230#232#232#232#235#235#235#239#239#239#244#244'sp'#176''''#31
+  +#133''''#31#133''''#31#133'4,'#140#238#242#242#233#236#236#231#233#233#231
+  +#233#233#234#237#237#239#243#243''''#31#133''''#31#133''''#31#133'ZU'#162#242
+  +#247#247#240#245#245#240#245#245#166#165#204''''#31#133''''#31#133''''#31#133
+  +''''#31#133'sp'#176#239#243#243#235#238#238#233#235#235#230#231#231#229#229
+  +#229#228#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229#229
+  +#229#229#229#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#230#230#230#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#232#232#232#232#232#232#232#232#232#232#232#232#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  ,#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#247#247#247#247#247#247#246#246#246#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#148#148#148#148#148#148#148
+  +#148#148#148#148#148#147#147#147#147#147#147#147#147#147#147#147#147#147#147
+  +#147#147#147#147#147#147#147#147#147#147#151#152#152#161#166#166#175#185#185
+  +#193#209#209'%'#29#135'%'#29#135'%'#29#135'OO'#158#190#205#205#172#182#182
+  +#163#169#169#160#165#165#168#176#176#183#196#196#148#159#192'%'#29#135'%'#29
+  +#135'%'#29#135'%'#29#135#159#170#196#186#198#198#173#181#181#167#173#173#169
+  +#176#176#181#190#190#186#200#206'%'#29#135'%'#29#135'%'#29#135'gi'#171#211
+  +#230#230#209#227#227#199#213#213#189#201#201#183#193#193#180#188#188#177#185
+  +#185#174#182#182#172#180#180#170#177#177#168#174#174#165#170#170#161#166#166
+  +#158#161#161#154#157#157#157#161#161#166#173#173#179#191#191#156#168#194'%'
+  +#29#135'%'#29#135'%'#29#135#155#167#193#176#189#189#160#166#166#148#150#150
+  +#144#146#146#151#155#155#165#175#175#184#200#200'ON'#158'%'#29#135'%'#29#135
+  +'%'#29#135#186#204#204#165#177#177#149#155#155#139#141#141#133#149#199#141
+  +#168#236#161#190#241#147#168#218'%'#29#135'%'#29#135'%'#29#135'q}'#191#167
+  +#197#243#148#175#237#139#166#236#142#169#237#156#184#240#160#186#231'/)'#142
+  +'%'#29#135'%'#29#135'%'#29#135'|'#139#199#175#205#245#157#185#240#142#168#237
+  +#130#157#234'|'#149#233'w'#145#232'u'#142#232't'#141#232'v'#142#227#137#149
+  +#195#154#156#162#155#156#156#157#159#159#159#163#163#165#171#171#174#185#185
+  +#187#204#204#130#139#186'%'#29#135'%'#29#135'%'#29#135'%'#29#135#161#186#231
+  +#158#185#240#142#167#235#136#160#234#141#166#235#157#183#240#180#209#245'%'
+  +#29#135'%'#29#135'%'#29#135'%'#29#135#184#211#240#171#197#241#152#177#236#139
+  +#162#233#132#153#231#132#148#207#137#144#163#142#144#144#149#152#152#160#166
+  +#166#176#187#187#194#211#211'eh'#170'%'#29#135'%'#29#135'%'#29#135#157#167
+  +#193#185#196#196#180#189#189#183#194#194#195#209#209'PO'#159'%'#29#135'%'#29
+  +#135'QO'#159#198#211#211#189#199#199#188#197#197#194#206#206#133#138#185'%'
+  +#29#135'%'#29#135'%'#29#135#181#194#214#215#233#233#210#225#225#202#214#214
+  +#196#205#205#193#201#201#190#197#197#189#196#196#188#194#194#187#192#192#187
+  +#193#193#186#191#191#185#189#189#183#186#186#182#185#185#186#190#190#194#200
+  +#200#205#215#215'^]'#165'%'#29#135'%'#29#135'%'#29#135#194#208#229#203#218
+  +#238#192#204#231#184#195#226#180#188#223#179#187#222#181#188#222#181#189#222
+  +#182#189#222#183#191#222#184#192#221#185#191#221#189#195#223#194#202#225#203
+  +#212#231#214#225#238'TR'#163'%'#29#135'%'#29#135'UR'#163#219#230#240#210#218
+  +#232#203#209#225#200#205#222#199#202#221#199#203#221#201#205#221#203#206#222
+  +#206#210#224#208#212#226#212#217#228#216#222#232#221#229#236#228#237#241#160
+  +#162#205'%'#29#135'%'#29#135'%'#29#135'%'#29#135#169#172#205#224#228#228#220
+  +#222#222#217#217#217#214#215#215#215#215#215#216#216#216#217#217#217#218#218
+  +#218#218#218#218#218#218#218#219#220#220#220#220#220#221#221#221#222#223#223
+  +#222#223#223#223#223#223#223#224#224#226#227#227#228#230#230#232#235#235#236
+  +#240#240#228#233#240'2+'#142'%'#29#135'%'#29#135'%'#29#135'~|'#183#235#239
+  +#239#233#236#236#234#237#237#237#242#242'XT'#163'%'#29#135'%'#29#135'%'#29
+  +#135#238#243#243#233#236#236#230#231#231#227#228#228#226#227#227#227#228#228
+  +#230#231#231#233#235#235#237#240#240#228#232#239'2+'#142'%'#29#135'%'#29#135
+  +'%'#29#135#164#164#204#235#238#238#233#235#235#233#235#235#235#238#238#239
+  +#243#243'%'#29#135'%'#29#135'%'#29#135'YT'#163#243#248#248#243#248#248#204
+  +#207#227'2+'#142'%'#29#135'%'#29#135'%'#29#135'ro'#177#239#243#243#236#238
+  +#238#233#235#235#231#232#232#230#231#231#229#230#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#236#236#236#236#236#236#236#236#236#236#236#236
+  ,#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#149#149#149#149#149#149#148#148#148#148#148#148#148#148
+  +#148#148#148#148#148#148#148#148#148#148#148#148#148#148#148#148#147#147#147
+  +#147#147#147#152#153#153#161#166#166#175#185#185#193#210#210'$'#28#138'$'#28
+  +#138'$'#28#138'ON'#160#191#207#207#176#186#186#168#176#176#169#177#177#178
+  +#190#190#184#200#206'/('#144'$'#28#138'$'#28#138'$'#28#138'w}'#179#189#203
+  +#203#175#184#184#165#170#170#163#167#167#170#175#175#182#192#192#159#168#196
+  +'$'#28#138'$'#28#138'$'#28#138'EB'#156'|'#129#184#134#141#190#162#173#201#178
+  +#190#204#195#208#208#193#205#205#190#202#202#188#200#200#185#197#197#184#194
+  +#194#180#191#191#177#186#186#172#179#179#165#172#172#160#165#165#161#166#166
+  +#168#176#176#181#193#193#156#167#195'$'#28#138'$'#28#138'$'#28#138#155#167
+  +#194#177#189#189#160#167#167#149#151#151#145#147#147#152#156#156#165#175#175
+  +#184#200#200'NM'#160'$'#28#138'$'#28#138'$'#28#138#186#204#204#165#177#177
+  +#149#154#154#139#141#141#131#151#210#142#168#236#161#190#241#147#168#219'$'
+  +#28#138'$'#28#138'$'#28#138'q}'#193#168#197#243#150#179#239#144#171#237#150
+  +#177#239#167#197#243'^e'#179'$'#28#138'$'#28#138'$'#28#138'LN'#165#180#210
+  +#246#160#188#242#142#170#238#129#156#235'{'#148#233'w'#143#233'u'#141#232't'
+  +#141#232't'#140#232't'#140#232's'#140#232'v'#141#227#135#148#193#151#153#158
+  +#153#154#154#156#160#160#163#170#170#173#187#190#181#210#239'LN'#165'$'#28
+  +#138'$'#28#138'$'#28#138'^e'#179#169#197#243#148#175#238#140#165#236#144#168
+  +#236#158#186#240#180#209#245'$'#28#138'$'#28#138'$'#28#138'LN'#166#185#213
+  +#245#163#188#240#146#169#235#135#155#221#137#143#169#139#139#139#139#139#139
+  +#142#142#142#146#148#148#156#161#161#170#178#178#188#202#202#153#165#199'$'
+  +#28#138'$'#28#138'$'#28#138'v{'#178#188#200#200#183#192#192#186#196#196#196
+  +#210#210'PN'#161'$'#28#138'$'#28#138'PN'#161#199#212#212#190#201#201#190#200
+  +#200#197#210#210'fg'#172'$'#28#138'$'#28#138'$'#28#138'hi'#174'~'#130#185#159
+  +#168#203#165#174#202#193#204#211#202#213#213#200#211#211#200#210#210#199#208
+  +#208#198#207#207#197#205#205#195#203#203#193#200#200#190#196#196#189#194#194
+  +#191#197#197#198#206#206#209#220#220';6'#150'$'#28#138'$'#28#138'GC'#156#213
+  +#228#237#198#212#235#188#200#229#182#192#225#178#187#223#180#187#222#180#187
+  +#221#181#189#222#182#189#222#183#190#221#184#191#221#186#192#221#188#196#224
+  +#195#202#227#203#212#232#215#226#238'SQ'#165'$'#28#138'$'#28#138'TQ'#165#218
+  +#229#239#210#217#232#203#209#225#200#205#223#198#202#221#199#204#221#201#206
+  +#222#204#208#223#207#212#226#212#217#228#216#222#232#222#229#237#204#211#229
+  +'b_'#172'$'#28#138'$'#28#138'$'#28#138'$'#28#138'ID'#157#228#233#233#222#226
+  +#226#219#220#220#217#217#217#215#215#215#216#216#216#217#217#217#217#217#217
+  +#218#218#218#218#218#218#218#218#218#219#219#219#221#221#221#221#222#222#223
+  +#223#223#223#224#224#224#225#225#226#228#228#229#231#231#232#235#235#236#240
+  +#240#227#232#239'KE'#159'$'#28#138'$'#28#138'$'#28#138'$'#28#138#175#176#210
+  +#234#237#237#232#235#235#234#237#237#237#242#242'WS'#165'$'#28#138'$'#28#138
+  +'$'#28#138#239#243#243#234#236#236#230#231#231#227#228#228#226#226#226#227
+  +#227#227#228#228#228#230#232#232#234#236#236#238#242#242#139#138#192'$'#28
+  +#138'$'#28#138'$'#28#138'ea'#172#237#240#240#234#236#236#234#236#236#235#238
+  ,#238#240#244#244'$'#28#138'$'#28#138'$'#28#138'XS'#166#243#248#248#204#207
+  +#227'1*'#145'$'#28#138'$'#28#138'$'#28#138'KE'#158#240#244#244#237#239#239
+  +#234#235#235#232#232#232#230#231#231#230#231#231#229#229#229#229#229#229#230
+  +#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#230#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#241#241#241#240#240#240#240#240#240#241#241#241#240#240#240#240#240#240
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#247#247#247#247#247#247#246#246#246#247#247#247#247#247
+  +#247#247#247#247#247#247#247#149#149#149#149#149#149#149#149#149#149#149#149
+  +#149#149#149#149#149#149#149#149#149#149#149#149#149#149#149#149#149#149#148
+  +#148#148#148#148#148#153#154#154#162#167#167#176#186#186#194#210#210'"'#27
+  +#140'"'#27#140'"'#27#140'MM'#162#196#214#214#183#196#196#177#188#188#180#192
+  +#192#191#206#206'XY'#167'"'#27#140'"'#27#140'"'#27#140'MM'#162#192#208#208
+  +#178#188#188#166#172#172#159#162#162#161#165#165#169#175#175#183#194#194#160
+  +#170#198'"'#27#140'"'#27#140'"'#27#140'"'#27#140'"'#27#140'"'#27#140'"'#27
+  +#140'"'#27#140'"'#27#140'73'#150'LK'#160'ln'#174'uy'#178#147#156#192#155#165
+  +#193#191#206#206#186#198#198#178#188#188#169#177#177#166#173#173#170#179#179
+  +#183#195#195#156#168#196'"'#27#140'"'#27#140'"'#27#140#155#167#195#178#190
+  +#190#160#167#167#148#151#151#145#147#147#153#157#157#166#175#175#185#201#201
+  +'LM'#161'"'#27#140'"'#27#140'"'#27#140#186#204#204#165#176#176#149#154#154
+  +#138#140#140#131#152#217#143#169#236#162#191#241#147#168#220'"'#27#140'"'#27
+  +#140'"'#27#140'p|'#194#169#198#243#153#181#240#150#177#239#157#186#241#167
+  +#196#238'"'#27#140'"'#27#140'"'#27#140'"'#27#140#150#172#221#167#197#243#147
+  +#175#239#132#158#235'{'#149#233'w'#143#232'u'#141#232't'#141#232't'#141#232
+  +'t'#141#233't'#141#233'u'#141#232't'#141#232't'#141#232'w'#142#227#134#147
+  +#191#151#152#152#151#159#174#150#174#226#166#196#243#169#195#234'"'#27#140'"'
+  +#27#140'"'#27#140'"'#27#140#170#197#238#156#184#240#146#171#237#147#172#237
+  +#159#186#240#180#209#245'"'#27#140'"'#27#140'"'#27#140't'#194#180#209#245
+  +#159#183#235#148#160#186#143#145#145#139#139#139#140#140#140#141#141#141#142
+  +#142#142#147#147#147#154#157#157#168#175#175#185#198#198#161#175#203'"'#27
+  +#140'"'#27#140'"'#27#140'w|'#181#191#204#204#184#194#194#187#197#197#197#210
+  +#210'NN'#162'"'#27#140'"'#27#140'ON'#163#200#213#213#192#203#203#192#202#202
+  +#200#213#213'ON'#163'"'#27#140'"'#27#140'"'#27#140'"'#27#140'"'#27#140'"'#27
+  +#140'"'#27#140'"'#27#140'"'#27#140'NM'#161'NL'#161'z}'#182#133#136#187#165
+  +#173#202#185#195#209#205#215#215#201#209#209#198#206#206#198#205#205#202#211
+  +#211#212#224#224'"'#27#140'"'#27#140'"'#27#140'QO'#164#213#225#230#197#210
+  +#235#187#198#229#182#191#225#179#188#222#180#187#222#180#188#222#182#189#223
+  +#183#190#222#184#191#222#185#191#222#186#193#222#189#196#223#195#203#227#204
+  ,#214#232#215#226#239'RP'#167'"'#27#140'"'#27#140'RP'#167#219#229#239#210#217
+  +#232#204#209#226#200#204#223#198#202#221#200#204#222#202#207#223#207#211#226
+  +#210#216#228#217#224#233#223#231#238#143#145#198'.)'#147'"'#27#140'"'#27#140
+  +'"'#27#140'"'#27#140'/)'#146#193#197#218#225#229#229#221#223#223#218#219#219
+  +#216#217#217#216#216#216#216#216#216#218#218#218#219#219#219#219#219#219#219
+  +#219#219#219#219#219#220#220#220#222#222#222#222#223#223#224#225#225#225#226
+  +#226#227#228#228#229#232#232#233#236#236#237#241#241#188#191#220'<7'#153'"'
+  +#27#140'"'#27#140'"'#27#140'"'#27#140'ID'#160#236#240#240#233#235#235#232#234
+  +#234#233#236#236#238#242#242'VR'#167'"'#27#140'"'#27#140'"'#27#140#239#243
+  +#243#234#236#236#230#231#231#227#228#228#226#226#226#227#227#227#228#228#228
+  +#230#230#230#233#234#234#237#240#240#216#219#234'"'#27#140'"'#27#140'"'#27
+  +#140'<7'#154#238#242#242#235#238#238#234#237#237#236#239#239#240#244#244'"'
+  +#27#140'"'#27#140'"'#27#140'VR'#167#230#234#241'<7'#154'"'#27#140'"'#27#140
+  +'"'#27#140'IE'#160#227#231#238#237#240#240#234#236#236#232#233#233#231#232
+  +#232#231#231#231#230#230#230#230#230#230#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245#244#244#244#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#150#150#150#150#150#150#150#150#150#150#150#150#149#149#149#150#150
+  +#150#150#150#150#149#149#149#149#149#149#149#149#149#149#149#149#148#148#148
+  +#153#154#154#162#167#167#177#186#186#194#210#210'!'#26#142'!'#26#142'!'#26
+  +#142'LL'#163#205#226#226#194#211#211#190#206#206#195#211#211#150#163#199'!'
+  +#26#142'!'#26#142'!'#26#142','''#147#188#204#211#182#194#194#168#175#175#155
+  +#164#180#152#157#166#159#161#161#169#175#175#183#194#194#160#170#199'!'#26
+  +#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'
+  +#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142
+  +'!'#26#142'IG'#158#152#159#181#174#183#183#174#184#184#184#197#197#157#168
+  +#197'!'#26#142'!'#26#142'!'#26#142#156#168#197#179#191#191#162#169#169#149
+  +#152#152#146#148#148#153#158#158#166#176#176#185#201#201'LL'#163'!'#26#142'!'
+  +#26#142'!'#26#142#187#205#205#166#177#177#149#154#154#138#140#140#130#155#234
+  +#143#170#237#163#192#242#147#168#221'!'#26#142'!'#26#142'!'#26#142'p{'#195
+  +#170#199#243#156#184#240#154#183#240#166#194#243#128#144#207'!'#26#142'!'#26
+  +#142'!'#26#142'JL'#169#178#209#246#156#185#241#138#165#237''#152#235'y'#145
+  +#234'u'#142#233'u'#142#233'u'#142#233'u'#142#233'u'#142#233'u'#142#233'u'#142
+  +#233'u'#142#233'v'#142#233'v'#142#233'v'#142#233'}'#146#223#129#152#230#138
+  +#164#236#156#184#241#178#208#246'TY'#176'!'#26#142'!'#26#142'!'#26#142#128
+  ,#145#207#164#192#242#152#177#239#150#176#238#160#187#241#181#209#245'!'#26
+  +#142'!'#26#142'!'#26#142's'#195#184#205#224#166#178#181#153#158#158#144#145
+  +#145#140#140#140#142#142#142#143#143#143#144#144#144#147#147#147#156#159#159
+  +#168#176#176#185#198#198#161#174#203'!'#26#142'!'#26#142'!'#26#142'w|'#182
+  +#192#204#204#185#195#195#187#198#198#197#211#211'NM'#164'!'#26#142'!'#26#142
+  +'NM'#164#200#213#213#193#203#203#193#203#203#201#213#213'NM'#164'!'#26#142'!'
+  +#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142
+  +'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'73'
+  +#152'MJ'#161#204#213#213#206#216#216#214#226#226'!'#26#142'!'#26#142'!'#26
+  +#142'PO'#166#214#225#225#198#211#234#189#199#230#183#192#226#179#189#223#180
+  +#188#223#181#189#223#182#189#223#183#190#223#185#192#222#186#192#222#186#193
+  +#222#190#197#224#196#204#228#205#215#232#216#227#239'QP'#168'!'#26#142'!'#26
+  +#142'RP'#168#219#229#239#210#218#232#204#210#227#200#205#223#199#203#222#201
+  +#206#223#205#210#225#209#215#228#216#222#233#223#231#239'kj'#180'!'#26#142'!'
+  +#26#142'!'#26#142'!'#26#142'!'#26#142'GC'#161#206#211#225#227#231#231#221#224
+  +#224#219#220#220#218#218#218#217#217#217#217#217#217#218#218#218#219#219#219
+  +#220#220#220#220#220#220#220#220#220#221#221#221#221#221#221#222#223#223#223
+  +#223#223#225#226#226#227#229#229#230#233#233#234#238#238#225#229#237'om'#182
+  +'!'#26#142'!'#26#142'!'#26#142'!'#26#142'!'#26#142'.('#149#200#202#224#233
+  +#236#236#231#233#233#232#233#233#234#236#236#238#242#242'UR'#169'!'#26#142'!'
+  +#26#142'!'#26#142#239#243#243#234#237#237#231#232#232#228#229#229#227#227#227
+  +#227#227#227#227#227#227#229#229#229#232#233#233#236#239#239#241#245#245'!'
+  +#26#142'!'#26#142'!'#26#142'!'#26#142#239#243#243#236#239#239#235#238#238#237
+  +#240#240#240#244#244'!'#26#142'!'#26#142'!'#26#142'ID'#162'ID'#162'!'#26#142
+  +'!'#26#142'!'#26#142'ID'#162#230#233#240#239#242#242#236#238#238#233#234#234
+  +#231#232#232#231#231#231#230#230#230#230#230#230#230#230#230#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#151#151#151#151#151#151#151#151#151#151#151#151
+  +#151#151#151#150#150#150#151#151#151#150#150#150#150#150#150#150#150#150#149
+  +#149#149#149#149#149#153#154#154#162#167#167#177#186#186#195#211#211#31#25
+  +#145#31#25#145#31#25#145'KL'#166#206#227#227#206#227#227#204#224#224#195#214
+  +#222'51'#155#31#25#145#31#25#145#31#25#145#151#164#201#192#208#208#175#185
+  +#185#153#171#210#138#162#233#133#157#232#137#160#228#152#172#220#173#192#220
+  +#153#167#208#31#25#145#31#25#145#31#25#145#156#166#204#168#180#210#157#167
+  ,#204'x}'#185'ac'#173'KJ'#163'52'#154#31#25#145#31#25#145#31#25#145#31#25#145
+  +#31#25#145#31#25#145#31#25#145#31#25#145#149#156#186#179#189#189#178#188#188
+  +#186#198#198#156#168#198#31#25#145#31#25#145#31#25#145#158#170#200#181#194
+  +#194#163#170#170#151#154#154#147#149#149#153#158#158#167#177#177#186#203#203
+  +'JK'#165#31#25#145#31#25#145#31#25#145#188#207#207#167#178#178#150#156#156
+  +#139#142#142#132#157#235#145#172#238#164#192#242#148#170#221#31#25#145#31#25
+  +#145#31#25#145'n{'#196#170#200#244#159#187#241#159#187#241#171#200#244'\c'
+  +#184#31#25#145#31#25#145#31#25#145#131#150#209#169#199#244#149#176#239#133
+  +#159#236'{'#148#234'w'#144#233'w'#143#233'v'#143#233'v'#142#233'v'#142#233'v'
+  +#142#234'v'#142#234'v'#143#233'v'#142#233'v'#142#233'w'#143#234'w'#143#233'w'
+  +#144#233'|'#149#234#132#158#236#149#176#239#170#199#244#132#149#209#31#25#145
+  +#31#25#145#31#25#145'RW'#178#171#198#243#156#182#240#153#179#239#161#189#241
+  +#181#210#245#31#25#145#31#25#145#31#25#145'UW'#171#191#209#209#171#182#182
+  +#157#162#162#147#149#149#143#144#144#143#143#143#144#144#144#146#146#146#151
+  +#152#152#159#163#163#172#180#180#190#204#204#152#163#201#31#25#145#31#25#145
+  +#31#25#145'v{'#183#191#203#203#184#194#194#188#198#198#198#211#211'LL'#166#31
+  +#25#145#31#25#145'ML'#166#201#214#214#193#203#203#193#202#202#200#212#212'XY'
+  +#171#31#25#145#31#25#145'B?'#162#194#207#222#171#181#211#135#141#193'z}'#185
+  +'WW'#169'LK'#164'*&'#149#31#25#145#31#25#145#31#25#145#31#25#145#31#25#145#31
+  +#25#145#31#25#145'*&'#149#208#219#219#209#220#220#215#227#227'+&'#150#31#25
+  +#145#31#25#145'C@'#162#216#228#228#203#213#225#192#202#232#184#194#227#181
+  +#189#225#181#189#224#182#190#224#183#190#224#185#192#223#185#192#223#186#193
+  +#223#187#194#223#190#197#225#197#205#229#206#215#233#217#227#240'PO'#170#31
+  +#25#145#31#25#145'PO'#170#219#229#240#210#218#232#204#211#227#201#205#224#200
+  +#205#223#204#209#225#208#212#228#214#219#232#222#229#238'ji'#182#31#25#145#31
+  +#25#145#31#25#145#31#25#145','''#150#133#133#193#229#235#235#225#230#230#222
+  +#225#225#220#221#221#218#219#219#218#218#218#217#217#217#218#218#218#218#218
+  +#218#219#219#219#220#220#220#220#220#220#220#220#220#221#221#221#221#221#221
+  +#224#224#224#226#227#227#228#229#229#231#233#233#235#238#238#187#189#219',&'
+  +#151#31#25#145#31#25#145#31#25#145#31#25#145#31#25#145','''#151#200#202#224
+  +#235#238#238#232#234#234#230#231#231#231#232#232#234#236#236#238#242#242'TQ'
+  +#171#31#25#145#31#25#145#31#25#145#239#243#243#234#237#237#231#232#232#228
+  +#229#229#227#227#227#227#227#227#228#228#228#230#230#230#232#234#234#236#239
+  +#239#241#245#245'TQ'#171#31#25#145#31#25#145#31#25#145#240#244#244#236#239
+  +#239#236#238#238#237#240#240#240#244#244#31#25#145#31#25#145#31#25#145#31#25
+  +#145#31#25#145#31#25#145#31#25#145','''#151#204#207#229#242#246#246#238#240
+  +#240#234#236#236#232#233#233#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#232#232#232#232#232#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#235#235
+  +#235#234#234#234#234#234#234#235#235#235#235#235#235#234#234#234#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238
+  +#238#238#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  ,#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#247#247#247#247#247#247#247#247#247#247#247#247#152#152#152#152#152
+  +#152#151#151#151#151#151#151#151#151#151#152#152#152#151#151#151#151#151#151
+  +#151#151#151#150#150#150#150#150#150#150#150#150#154#155#155#163#168#168#177
+  +#186#186#195#211#211#30#23#147#30#23#147#30#23#147'41'#157'v}'#187'v}'#187'v'
+  +'}'#187'UW'#172#30#23#147#30#23#147#30#23#147'v}'#187#206#227#227#190#205#205
+  +#168#186#212#147#172#236#138#162#234#133#158#233#137#161#234#146#171#236#162
+  +#189#240#163#188#233#30#23#147#30#23#147#30#23#147'}'#139#204#203#230#245#197
+  +#223#242#187#212#238#188#207#224#197#208#208#198#210#210#200#214#214#184#196
+  +#212#167#179#210#133#140#194'LK'#168#30#23#147#30#23#147#30#23#147#162#171
+  +#194#182#192#192#179#190#190#186#199#199#157#169#200#30#23#147#30#23#147#30
+  +#23#147'u{'#185#185#199#199#167#175#175#154#158#158#150#153#153#156#161#161
+  +#169#179#179#189#206#206'IJ'#167#30#23#147#30#23#147#30#23#147#192#211#211
+  +#170#182#182#152#159#159#140#148#162#135#160#236#147#175#239#167#196#243#150
+  +#171#223#30#23#147#30#23#147#30#23#147'my'#197#171#200#244#160#188#242#162
+  +#191#243#175#205#245'=='#166#30#23#147#30#23#147#30#23#147#167#194#235#164
+  +#192#243#144#171#239#129#155#236'y'#147#234'w'#144#234'w'#143#234'w'#143#234
+  +'v'#143#234'w'#143#234'w'#143#234'v'#143#234'w'#143#234'v'#143#234'v'#143#234
+  +'x'#144#234'x'#144#234'x'#144#234'z'#146#234#131#156#236#144#170#239#163#192
+  +#243#177#205#241#30#23#147#30#23#147#30#23#147'31'#160#174#203#245#160#187
+  +#241#156#182#240#164#191#241#182#211#246#30#23#147#30#23#147#30#23#147')$'
+  +#152#199#218#218#179#192#192#163#171#171#153#157#157#148#149#149#145#146#146
+  +#146#147#147#150#150#150#155#158#158#165#171#171#179#190#190#196#212#212'mq'
+  +#183#30#23#147#30#23#147#30#23#147#148#157#196#190#201#201#184#193#193#188
+  +#197#197#198#211#211'LK'#168#30#23#147#30#23#147'LK'#168#201#213#213#192#202
+  +#202#191#200#200#198#209#209'x|'#186#30#23#147#30#23#147#30#23#147#205#220
+  +#228#217#234#234#211#224#224#205#216#216#202#213#213#203#213#213#205#216#216
+  +#209#221#221#169#178#208#172#182#213'}'#129#190'*$'#153#30#23#147#30#23#147
+  +'MK'#168#210#221#221#209#219#219#213#224#224'ZZ'#175#30#23#147#30#23#147#30
+  +#23#147#196#207#222#209#219#220#196#207#232#188#199#229#183#192#226#182#191
+  +#225#185#192#225#186#193#224#186#194#224#187#194#224#188#195#225#189#196#224
+  +#192#199#226#199#206#229#207#215#234#217#228#240'OM'#172#30#23#147#30#23#147
+  +'PN'#172#220#230#240#211#219#233#205#212#228#202#206#224#202#206#225#206#210
+  +#226#211#216#230#218#225#235#178#182#218#30#23#147#30#23#147#30#23#147#30#23
+  +#147'QN'#171#208#214#230#229#235#235#226#229#229#222#224#224#220#222#222#219
+  +#220#220#217#218#218#218#218#218#218#218#218#219#219#219#219#219#219#220#220
+  +#220#221#221#221#221#221#221#221#221#221#222#222#222#223#224#224#225#225#225
+  +#227#228#228#230#233#233#235#238#238#160#161#207#30#23#147#30#23#147#30#23
+  +#147#30#23#147#30#23#147#30#23#147'a]'#178#226#229#237#236#239#239#233#235
+  +#235#230#232#232#230#231#231#231#232#232#234#236#236#238#242#242'SO'#172#30
+  +#23#147#30#23#147#30#23#147#240#244#244#235#238#238#232#233#233#229#230#230
+  +#228#228#228#228#228#228#229#229#229#231#231#231#233#235#235#237#240#240#241
+  +#246#246#30#23#147#30#23#147#30#23#147#30#23#147#240#243#243#237#240#240#236
+  +#238#238#238#240#240#241#245#245#30#23#147#30#23#147#30#23#147'93'#160'+%'
+  +#153#30#23#147#30#23#147'+%'#153#231#235#243#242#246#246#238#241#241#235#236
+  +#236#233#233#233#232#232#232#231#231#231#232#232#232#231#231#231#231#231#231
+  +#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232#232
+  +#232#232#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236
+  +#236#236#236#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241
+  ,#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#152#152#152#152#152#152#153#153
+  +#153#152#152#152#152#152#152#152#152#152#152#152#152#151#151#151#151#151#151
+  +#151#151#151#150#150#150#150#150#150#155#156#156#163#168#168#177#187#187#195
+  +#211#211#28#22#149#28#22#149#28#22#149#28#22#149#28#22#149#28#22#149#28#22
+  +#149#28#22#149#28#22#149#28#22#149#28#22#149#128#137#193#195#214#222#190#211
+  +#223#167#194#241#152#178#237#141#166#235#136#159#233#137#160#233#144#169#235
+  +#158#184#239#177#205#244'10'#162#28#22#149#28#22#149'GJ'#174#200#229#249#188
+  +#217#247#176#204#244#168#195#242#184#198#210#192#201#201#196#206#206#203#216
+  +#216#212#229#229#213#231#231'VX'#175#28#22#149#28#22#149'''#'#154#193#206#206
+  +#183#193#193#180#190#190#187#200#200#158#170#201#28#22#149#28#22#149#28#22
+  +#149'u|'#188#192#208#208#174#184#184#161#167#167#156#161#161#162#169#169#176
+  +#188#188#194#213#213'=<'#163#28#22#149#28#22#149#28#22#149#186#206#214#175
+  +#190#190#158#167#167#147#157#175#142#169#238#155#182#241#174#203#245#143#162
+  +#218#28#22#149#28#22#149#28#22#149'u'#131#205#169#198#244#160#189#242#164#193
+  +#243#178#208#246#28#22#149#28#22#149#28#22#149#28#22#149#183#213#247#159#187
+  +#242#141#168#238#128#153#236'y'#146#235'x'#145#235'x'#145#235'x'#145#234'x'
+  +#144#235'w'#144#235'w'#144#235'w'#144#235'w'#144#234'w'#144#234'x'#144#234'x'
+  +#144#235'y'#145#235'x'#145#235'z'#146#234#128#154#236#141#167#238#160#187#242
+  +#183#213#247'''#'#155#28#22#149#28#22#149#28#22#149#179#207#246#163#190#242
+  +#158#185#241#165#192#242#183#212#246#28#22#149#28#22#149#28#22#149#28#22#149
+  +#138#150#198#190#206#206#175#185#185#163#169#169#156#160#160#153#155#155#154
+  +#156#156#157#160#160#165#170#170#176#184#184#190#203#203#194#210#218'''#'#154
+  +#28#22#149#28#22#149#28#22#149#178#189#205#187#197#197#183#191#191#188#197
+  +#197#198#211#211'JJ'#169#28#22#149#28#22#149'KJ'#170#201#213#213#191#200#200
+  +#189#197#197#195#205#205#172#183#207#28#22#149#28#22#149#28#22#149#146#154
+  +#202#215#231#231#208#220#220#201#210#210#198#206#206#196#205#205#200#208#208
+  +#205#215#215#213#225#225#220#235#235#208#222#230#28#22#149#28#22#149#28#22
+  +#149'oq'#185#209#219#219#206#215#215#210#220#220#135#139#194#28#22#149#28#22
+  +#149#28#22#149'rt'#188#216#227#227#205#214#221#194#206#233#189#199#230#189
+  +#197#229#189#197#228#189#198#227#190#199#227#191#199#227#192#200#227#193#199
+  +#227#195#202#228#201#209#231#209#218#235#218#230#241'NM'#174#28#22#149#28#22
+  +#149'NM'#174#223#232#241#214#222#235#208#214#230#206#210#228#205#210#227#209
+  +#213#229#214#220#233#222#229#238'hh'#185#28#22#149#28#22#149#28#22#149'jj'
+  +#186#234#243#245#229#235#235#226#230#230#223#226#226#222#223#223#220#221#221
+  +#219#220#220#218#219#219#219#219#219#218#218#218#219#219#219#220#220#220#220
+  +#220#220#222#222#222#222#222#222#222#222#222#223#223#223#225#225#225#226#227
+  +#227#230#231#231#233#236#236#185#187#219#28#22#149#28#22#149#28#22#149#28#22
+  +#149#28#22#149'72'#161#188#190#221#238#242#242#236#238#238#233#235#235#231
+  +#232#232#230#230#230#230#230#230#231#232#232#234#237#237#239#243#243'RO'#174
+  +#28#22#149#28#22#149#28#22#149#240#244#244#236#238#238#232#234#234#230#231
+  +#231#229#229#229#229#229#229#230#230#230#231#232#232#234#236#236#238#241#241
+  +#216#219#235#28#22#149#28#22#149#28#22#149'72'#162#240#243#243#237#239#239
+  +#236#238#238#238#240#240#241#245#245#28#22#149#28#22#149#28#22#149'RO'#174
+  +#176#178#218#28#22#149#28#22#149#28#22#149'EA'#168#230#233#241#239#242#242
+  +#236#238#238#234#234#234#233#233#233#232#233#233#232#232#232#232#232#232#232
+  +#232#232#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  ,#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#153#153#153#153#153#153
+  +#153#153#153#153#153#153#153#153#153#153#153#153#152#152#152#152#152#152#151
+  +#151#151#151#151#151#151#151#151#150#150#150#155#156#156#164#169#169#177#187
+  +#187#195#211#211#27#21#151#27#21#151#27#21#151#27#21#151#27#21#151#27#21#151
+  +#27#21#151#27#21#151#27#21#151#27#21#151#27#21#151#27#21#151'&"'#156#142#160
+  +#218#178#205#244#162#188#240#149#173#237#140#164#235#137#162#235#142#167#236
+  +#154#180#239#171#198#242'lx'#199#27#21#151#27#21#151#27#21#151#157#178#225
+  +#189#218#247#176#204#244#166#193#242#168#190#229#189#197#197#194#204#204#202
+  +#215#215#212#228#228#191#206#222#27#21#151#27#21#151#27#21#151'_a'#178#192
+  +#204#204#183#192#192#181#191#191#189#202#202#160#172#204#27#21#151#27#21#151
+  +#27#21#151'=<'#165#200#219#219#184#197#197#172#181#181#168#176#176#173#184
+  +#184#185#200#200#192#211#219#27#21#151#27#21#151#27#21#151#27#21#151#146#161
+  +#202#185#202#202#168#181#181#158#173#192#156#182#241#167#195#243#185#214#247
+  +'fp'#194#27#21#151#27#21#151#27#21#151#144#165#223#167#195#244#160#188#243
+  +#164#193#243#180#210#247#27#21#151#27#21#151#27#21#151'EI'#176#180#211#247
+  +#157#185#242#139#166#239''#153#236'y'#146#235'y'#145#235'y'#145#235'x'#145
+  +#235'x'#145#235'x'#145#235'x'#145#235'x'#144#235'x'#145#235'x'#144#235'y'#145
+  +#235'y'#146#235'y'#145#235'y'#145#235'z'#146#235#128#153#236#140#166#239#158
+  +#185#242#180#210#247'EI'#176#27#21#151#27#21#151#27#21#151#181#209#246#164
+  +#191#242#160#186#241#166#193#243#183#212#246#27#21#151#27#21#151#27#21#151#27
+  +#21#151'&"'#156#191#209#218#188#202#202#176#186#186#168#175#175#165#171#171
+  +#166#172#172#169#176#176#177#186#186#189#201#201#202#219#219'TW'#176#27#21
+  +#151#27#21#151#27#21#151'IH'#170#194#206#206#184#192#192#182#189#189#189#198
+  +#198#200#214#214'JJ'#171#27#21#151#27#21#151'JJ'#171#201#213#213#191#199#199
+  +#187#194#194#191#199#199#202#213#213'3/'#161#27#21#151#27#21#151'30'#161#216
+  +#232#232#208#220#220#200#210#210#196#204#204#194#202#202#198#206#206#204#213
+  +#213#212#224#224#220#235#235'|'#128#194#27#21#151#27#21#151#27#21#151#179#187
+  +#212#206#214#214#203#210#210#205#213#213#202#211#219'''#'#156#27#21#151#27#21
+  +#151#27#21#151#174#182#215#215#225#225#206#216#231#199#210#235#197#207#234
+  +#196#206#233#196#206#232#197#206#232#198#207#232#198#207#231#198#206#231#200
+  +#208#232#205#214#233#213#223#238#222#234#243'NL'#175#27#21#151#27#21#151'NL'
+  +#175#226#237#244#218#228#239#213#220#234#209#215#230#209#214#229#211#216#231
+  +#216#222#234#224#231#240'NL'#175#27#21#151#27#21#151#27#21#151#222#230#241
+  +#233#241#241#228#234#234#226#230#230#224#226#226#223#225#225#223#224#224#220
+  +#221#221#220#221#221#219#219#219#219#220#220#220#220#220#221#221#221#222#222
+  +#222#222#222#222#223#223#223#224#224#224#224#224#224#226#226#226#228#229#229
+  ,#231#233#233#235#239#239'QM'#175#27#21#151#27#21#151#27#21#151#27#21#151'lj'
+  +#188#228#232#240#238#241#241#235#237#237#233#234#234#231#232#232#230#230#230
+  +#229#229#229#229#230#230#231#232#232#235#237#237#239#243#243'QN'#175#27#21
+  +#151#27#21#151#27#21#151#240#244#244#236#238#238#232#234#234#230#231#231#229
+  +#229#229#231#231#231#232#232#232#234#235#235#237#239#239#241#244#244#149#149
+  +#206#27#21#151#27#21#151#27#21#151'_\'#181#239#242#242#237#239#239#236#238
+  +#238#238#240#240#242#245#245#27#21#151#27#21#151#27#21#151'QN'#176#244#249
+  +#249#162#163#212#27#21#151#27#21#151#27#21#151'_]'#182#241#245#245#238#241
+  +#241#236#237#237#234#235#235#233#233#233#232#232#232#232#232#232#232#232#232
+  +#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233#233
+  +#233#233#233#233#233#233#233#233#233#233#233#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#155#155#155#154#154#154#154#154
+  +#154#154#154#154#154#154#154#153#153#153#153#153#153#153#153#153#152#152#152
+  +#152#152#152#152#152#152#151#151#151#156#157#157#163#168#168#177#187#187#195
+  +#211#211#25#20#154#25#20#154#25#20#154'0.'#162't{'#190't{'#190't{'#190't{'
+  +#190'RU'#176#25#20#154#25#20#154#25#20#154#25#20#154#25#20#154#128#144#212
+  +#174#201#243#159#185#240#147#171#237#140#165#236#141#166#236#150#175#238#164
+  +#190#241#171#196#239'$!'#159#25#20#154#25#20#154'/.'#166#184#211#243#183#211
+  +#246#174#202#243#169#196#243#188#202#213#198#209#209#205#219#219#202#218#226
+  +'=<'#169#25#20#154#25#20#154#25#20#154#179#191#207#187#198#198#180#189#189
+  +#181#190#190#191#205#205#162#174#208#25#20#154#25#20#154#25#20#154#25#20#154
+  +#161#176#209#195#213#213#186#200#200#183#196#196#187#202#202#198#217#217'}'
+  +#136#194#25#20#154#25#20#154#25#20#154#25#20#154':;'#167#194#215#215#182#199
+  +#199#173#195#217#173#201#245#182#212#247#186#215#244'/.'#166#25#20#154#25#20
+  +#154#25#20#154#169#196#240#163#191#243#157#185#242#163#192#243#180#210#247#25
+  +#20#154#25#20#154#25#20#154'DH'#178#180#211#247#157#185#242#140#166#239#128
+  +#154#237'z'#146#236'z'#146#236'y'#146#236'y'#146#236'y'#146#236'y'#145#236'y'
+  +#145#236'x'#145#236'y'#145#235'y'#145#235'y'#145#235'z'#146#236'z'#146#236'{'
+  +#146#235'{'#146#235#129#153#236#140#166#238#157#185#242#181#210#247'DH'#178
+  +#25#20#154#25#20#154#25#20#154#181#210#246#165#192#243#160#186#241#167#194
+  +#243#184#212#247#25#20#154#25#20#154#25#20#154#25#20#154#25#20#154';;'#168
+  +#190#206#215#191#206#206#184#196#196#182#193#193#183#193#193#186#198#198#194
+  +#207#207#203#220#220'_c'#183#25#20#154#25#20#154#25#20#154#25#20#154#157#168
+  +#201#189#199#199#182#189#189#182#189#189#191#200#200#204#217#217'II'#174#25
+  +#20#154#25#20#154'II'#174#202#214#214#191#198#198#185#191#191#187#193#193#196
+  ,#205#205#139#145#195#25#20#154#25#20#154#25#20#154'be'#184#212#226#226#206
+  +#217#217#201#210#210#200#208#208#202#211#211#207#218#218#215#228#228#184#195
+  +#221#25#20#154#25#20#154#25#20#154'JI'#173#209#218#218#201#207#207#197#203
+  +#203#200#206#206#208#216#216'y}'#191#25#20#154#25#20#154#25#20#154'%"'#159
+  +#174#182#216#218#228#230#211#223#237#207#219#239#206#218#238#207#218#238#206
+  +#217#237#207#218#237#195#204#231#194#202#230#207#216#235#211#221#237#218#229
+  +#241#227#239#247'LK'#178#25#20#154#25#20#154'LL'#178#231#242#248#224#235#243
+  +#219#227#239#215#222#235#214#220#234#215#221#234#219#225#236#225#233#241'ML'
+  +#177#25#20#154#25#20#154#25#20#154#236#245#245#235#242#242#231#236#236#228
+  +#232#232#226#230#230#226#229#229#187#188#213#223#225#225#222#223#223#222#222
+  +#222#221#221#221#221#221#221#222#222#222#223#223#223#223#223#223#223#223#223
+  +#224#224#224#224#224#224#226#227#227#229#230#230#233#235#235#211#214#231#25
+  +#20#154#25#20#154#25#20#154#25#20#154'yx'#195#241#246#246#238#241#241#234#237
+  +#237#233#234#234#231#232#232#231#231#231#230#230#230#230#230#230#230#231#231
+  +#232#233#233#235#237#237#239#243#243'PM'#178#25#20#154#25#20#154#25#20#154
+  +#241#245#245#237#240#240#234#235#235#232#233#233#231#232#232#232#232#232#233
+  +#234#234#236#238#238#239#242#242#229#233#241'''"'#160#25#20#154#25#20#154#25
+  +#20#154#160#161#211#238#241#241#236#238#238#236#238#238#238#240#240#242#245
+  +#245#25#20#154#25#20#154#25#20#154'PM'#178#245#249#249#245#249#249'lj'#189#25
+  +#20#154#25#20#154#25#20#154'kj'#189#241#244#244#239#241#241#236#238#238#235
+  +#235#235#234#234#234#233#233#233#233#233#233#233#233#233#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#233#233#233#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#235#235#235#234
+  +#234#234#235#235#235#234#234#234#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#156#156#156#155#155#155#154#154#154#154#154#154#154#154#154#154
+  +#154#154#154#154#154#153#153#153#153#153#153#153#153#153#152#152#152#151#151
+  +#151#156#157#157#164#169#169#177#187#187#195#211#211#24#19#156#24#19#156#24
+  +#19#156'FG'#174#206#227#227#201#220#220#193#210#210#191#207#207#193#211#211
+  +#180#197#214'QU'#180#24#19#156#24#19#156#24#19#156#24#19#156#146#165#224#168
+  +#195#242#153#179#239#144#169#236#141#165#236#145#169#237#156#181#239#171#198
+  +#243#135#154#218#24#19#156#24#19#156#24#19#156'.-'#168#152#172#226#186#215
+  +#247#181#210#246#187#211#238#206#219#219#187#201#218'<:'#170#24#19#156#24#19
+  +#156#24#19#156'gl'#185#193#204#204#183#191#191#178#185#185#182#191#191#193
+  +#206#206#163#176#210#24#19#156#24#19#156#24#19#156#24#19#156'#'#31#161#160
+  +#174#209#198#217#217#197#215#215#201#221#221#159#175#209'#'#31#160#24#19#156
+  +#24#19#156#24#19#156'# '#160#24#19#156'[`'#182#182#202#210#188#213#228#190
+  ,#220#249#186#215#244'Za'#191#24#19#156#24#19#156#24#19#156'BF'#179#171#199
+  +#245#157#184#242#154#180#242#161#189#243#180#209#247#24#19#156#24#19#156#24
+  +#19#156'.,'#168#182#212#247#159#187#243#141#167#240#130#154#237'z'#147#236'z'
+  +#147#236'z'#147#236'z'#146#236'z'#146#236'y'#146#236'z'#146#237'z'#146#236'z'
+  +#147#236'z'#146#236'z'#146#236'{'#147#236'{'#147#236'{'#147#236'{'#147#236
+  +#130#155#237#142#168#240#160#187#243#183#212#247'9:'#174#24#19#156#24#19#156
+  +#24#19#156#181#210#246#165#192#243#161#187#242#167#194#243#185#213#247#24#19
+  +#156#24#19#156#24#19#156#24#19#156#24#19#156#24#19#156'$'#31#161#136#145#198
+  +#188#203#211#197#212#212#198#213#213#202#218#218#151#161#204';:'#170#24#19
+  +#156#24#19#156#24#19#156#24#19#156'hm'#185#194#206#206#184#192#192#178#184
+  +#184#181#188#188#192#201#201#206#220#220'HH'#175#24#19#156#24#19#156'HH'#175
+  +#201#213#213#189#197#197#183#188#188#183#188#188#190#196#196#201#211#211'GG'
+  +#174#24#19#156#24#19#156#24#19#156'ac'#185#202#214#223#210#221#221#208#219
+  +#219#210#221#221#213#226#226#145#153#205'$ '#161#24#19#156#24#19#156#24#19
+  +#156#177#185#210#203#210#210#196#201#201#194#197#197#196#200#200#202#208#208
+  +#212#221#221'=;'#170#24#19#156#24#19#156#24#19#156#24#19#156'de'#187#185#194
+  +#221#219#233#243#219#233#245#218#231#244#205#217#238#143#150#210'0,'#167#165
+  +#172#218#213#223#239#217#228#241#224#236#245#229#242#248'KK'#179#24#19#156#24
+  +#19#156'LK'#179#231#243#248#230#241#247#225#234#243#221#229#240#219#226#237
+  +#219#225#237#221#227#238#225#233#241'st'#196#24#19#156#24#19#156#24#19#156
+  +#170#174#217#237#244#244#235#241#241#232#238#238#231#236#236#178#180#215'%'
+  +#31#161#226#228#228#224#225#225#222#223#223#222#222#222#222#222#222#222#222
+  +#222#223#223#223#224#224#224#224#224#224#225#225#225#225#225#225#227#228#228
+  +#230#231#231#234#237#237#185#188#222#24#19#156#24#19#156#24#19#156'&!'#162
+  +#243#248#248#240#244#244#237#239#239#234#236#236#232#233#233#231#232#232#231
+  +#232#232#232#232#232#230#231#231#231#231#231#232#233#233#235#237#237#240#243
+  +#243'OM'#179#24#19#156#24#19#156#24#19#156#242#246#246#239#241#241#236#238
+  +#238#234#235#235#234#235#235#234#236#236#237#239#239#239#242#242#242#246#246
+  +'ki'#191#24#19#156#24#19#156#24#19#156'40'#168#241#244#244#238#240#240#236
+  +#237#237#236#238#238#238#241#241#242#245#245#24#19#156#24#19#156#24#19#156'O'
+  +'M'#179#245#249#249#244#248#248#244#248#248'OM'#179#24#19#156#24#19#156#24#19
+  +#156#161#161#213#241#244#244#238#240#240#236#237#237#235#235#235#234#234#234
+  +#233#233#233#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#235#235#235#235#235#235#234#234#234#234#234#234#234#234#234#235#235
+  +#235#234#234#234#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#236#236#236#235#235#235#236#236#236#236#236#236#236#236#236#235#235#235#235
+  +#235#235#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#237#237#237#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238#238#238#237
+  +#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#239#239#239#239#239#239#239#239#239#238#238#238#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#240#240
+  +#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#242#242#242#241#241#241#242#242#242#241#241#241#242#242#242#242#242#242#241
+  +#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#243#243#243#242#242#242#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#242#242#242#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#244#244#244#244#244#244#244#244#244#243#243#243#244#244#244#243#243#243
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#245#245#245#244#244#244#244#244#244#245#245
+  +#245#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#246#246#246#245#245#245#246#246#246#246#246#246#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#246#246#246#247#247#247
+  +#247#247#247#247#247#247#246#246#246#246#246#246#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#156#156#156#156#156
+  ,#156#156#156#156#155#155#155#155#155#155#155#155#155#155#155#155#154#154#154
+  +#154#154#154#153#153#153#153#153#153#152#152#152#157#158#158#164#169#169#178
+  +#187#187#195#211#211#22#18#158#22#18#158#22#18#158'DG'#176#203#223#223#189
+  +#204#204#179#190#190#174#184#184#178#189#189#186#201#204#195#222#246'Zb'#193
+  +#22#18#158#22#18#158#22#18#158',+'#169#179#206#245#161#187#241#148#173#238
+  +#141#165#237#141#165#237#149#174#238#161#187#241#175#202#244'U]'#192#22#18
+  +#158#22#18#158#22#18#158#22#18#158'79'#175'my'#204'my'#204'RT'#182#22#18#158
+  +#22#18#158#22#18#158#22#18#158'99'#170#197#209#209#185#194#194#178#184#184
+  +#177#182#182#172#179#188#151#159#195'~'#134#196#22#18#158#22#18#158#22#18#158
+  +'-,'#167#22#18#158#22#18#158'99'#171'DF'#175'99'#171#22#18#158#22#18#158#22
+  +#18#158#22#18#158'-,'#166'py'#191#22#18#158#22#18#158'!'#30#162'BF'#180'BF'
+  +#181'!'#30#164#22#18#158#22#18#158#22#18#158#22#18#158#141#163#225#162#189
+  +#243#150#177#241#149#176#241#159#186#243#177#207#246'!'#31#164#22#18#158#22
+  +#18#158#22#18#158#187#216#249#164#191#244#145#171#241#131#157#239'}'#150#237
+  +'{'#148#237'{'#147#237'{'#147#237'z'#147#237'z'#147#237'z'#147#237'{'#147#237
+  +'{'#147#237'{'#148#237'{'#147#237'|'#148#237'{'#147#237'|'#148#237'~'#151#236
+  +#132#157#238#146#171#240#164#191#244#187#216#248#22#18#158#22#18#158#22#18
+  +#158#22#18#158#180#208#246#165#191#243#160#186#242#167#194#244#185#213#247#22
+  +#18#158#22#18#158#22#18#158'EG'#176'\a'#185#22#18#158#22#18#158#22#18#158#22
+  +#18#158'EF'#176'EF'#176#22#18#158#22#18#158#22#18#158#22#18#158#22#18#158#22
+  +#18#158'99'#171#197#210#210#186#195#195#179#184#184#178#182#182#182#188#188
+  +#161#167#194#160#169#205';:'#172#22#18#158#22#18#158'FG'#176#199#210#210#189
+  +#195#195#181#185#185#180#184#184#185#189#189#194#202#202#194#204#212'::'#171
+  +#22#18#158#22#18#158#22#18#158'"'#31#163'`b'#186'w|'#195'lp'#191'/,'#168#22
+  +#18#158#22#18#158#22#18#158#22#18#158#142#147#200#206#214#214#199#203#203#193
+  +#195#195#190#192#192#192#194#194#197#201#201#205#212#212#201#210#219'<;'#172
+  +#22#18#158#22#18#158#22#18#158#22#18#158#22#18#158#22#18#158'0-'#169#22#18
+  +#158#22#18#158#22#18#158#22#18#158#169#177#222#218#229#242'HH'#180#22#18#158
+  +#22#18#158#22#18#158#22#18#158#22#18#158#22#18#158#22#18#158#22#18#158#22#18
+  +#158#22#18#158#22#18#158#172#175#219#221#228#238#224#231#240#177#182#222#22
+  +#18#158#22#18#158#22#18#158#22#18#158'tu'#196#130#131#202#129#130#201'>;'#174
+  +#22#18#158#22#18#158#228#231#231#225#227#227#224#225#225#223#223#223#222#222
+  +#222#223#223#223#224#224#224#225#225#225#225#225#225#226#226#226#226#226#226
+  +#228#229#229#231#232#232#234#237#237#185#187#222#22#18#158#22#18#158#22#18
+  +#158'NL'#181#244#249#249#241#245#245#238#240#240#236#237#237#234#236#236#234
+  +#235#235#234#235#235#233#234#234#232#233#233#232#233#233#234#235#235#236#238
+  +#238#241#244#244'NL'#181#22#18#158#22#18#158#22#18#158#244#249#249#241#245
+  +#245#239#241#241#237#239#239#237#239#239#238#241#241#241#244#244#243#247#247
+  +'jh'#192#22#18#158#22#18#158#22#18#158#22#18#158#160#160#213#239#242#242#236
+  +#238#238#236#237#237#237#238#238#239#241#241#242#246#246#22#18#158#22#18#158
+  +#22#18#158'NL'#181#244#248#248#242#246#246#242#245#245#229#233#241'@='#175#22
+  +#18#158#22#18#158#22#18#158#174#175#219#241#244#244#239#241#241#237#238#238
+  +#235#236#236#235#235#235#234#234#234#234#234#234#234#234#234#234#234#234#234
+  +#234#234#234#234#234#234#234#234#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#236#236#236
+  +#235#235#235#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  ,#244#244#244#244#244#244#244#244#244#244#244#245#245#245#244#244#244#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#157#157
+  +#157#156#156#156#156#156#156#156#156#156#155#155#155#155#155#155#155#155#155
+  +#155#155#155#154#154#154#154#154#154#153#153#153#153#153#153#156#157#157#165
+  +#170#170#178#187#187#195#211#211#21#16#161#21#16#161#21#16#161'CE'#178#195
+  +#213#213#179#190#190#167#174#174#160#166#166#162#170#174#168#191#231#181#208
+  +#245#187#213#243' '#29#166#21#16#161#21#16#161#21#16#161#156#178#231#168#194
+  +#243#152#177#240#143#167#238#140#164#237#143#168#238#152#177#240#163#189#242
+  +#176#203#245'r'#128#209#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21
+  +#16#161#21#16#161#21#16#161#21#16#161#21#16#161'[]'#183#188#198#207#188#196
+  +#196#180#185#185#174#178#178#174#179#179#172#178#187'+('#166#21#16#161#21#16
+  +#161#21#16#161#21#16#161#150#162#207'88'#173#21#16#161#21#16#161#21#16#161#21
+  +#16#161#21#16#161#21#16#161#21#16#161#21#16#161#169#187#214#203#225#225'77'
+  +#172#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21
+  +#16#161'S['#193#169#197#245#153#180#242#144#170#240#144#171#241#155#182#243
+  +#174#203#246'AE'#183#21#16#161#21#16#161#21#16#161#149#171#227#169#198#245
+  +#150#177#242#136#161#239''#151#238'|'#148#237'{'#148#237'{'#148#237'{'#148
+  +#237'{'#147#237'{'#148#238'{'#148#237'{'#148#237'|'#148#237'|'#148#237'|'#148
+  +#237'|'#148#237'}'#149#237#128#152#238#136#161#239#151#176#242#171#198#245
+  +#160#183#232#21#16#161#21#16#161#21#16#161'AE'#183#177#205#246#163#188#243
+  +#159#184#242#167#193#244#185#213#247#21#16#161#21#16#161#21#16#161'DE'#178
+  +#210#229#229'\`'#186#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16
+  +#161#21#16#161#21#16#161#21#16#161#21#16#161'gk'#188#198#210#210#189#197#197
+  +#181#186#186#176#179#179#177#180#180#182#187#187'kl'#180#21#16#161#21#16#161
+  +#21#16#161#21#16#161',*'#169#196#205#205#187#192#192#180#183#183#178#180#180
+  +#180#183#183#188#193#193#196#204#204#193#204#212'EE'#177#21#16#161#21#16#161
+  +#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161'!'#30
+  +#165#141#147#201#207#215#215#200#205#205#194#197#197#190#192#192#188#189#189
+  +#190#191#191#193#195#195#200#204#204#206#213#213#202#210#219'mo'#192#21#16
+  +#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21
+  +#16#161#21#16#161#170#179#223#221#232#244'HG'#182#21#16#161#21#16#161#21#16
+  +#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21
+  +#16#161#172#176#220#220#227#238#222#229#239#226#233#239'qr'#195#21#16#161#21
+  +#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161#21#16#161
+  +#229#232#232#225#227#227#224#225#225#224#224#224#224#224#224#224#224#224#224
+  +#224#224#224#224#224#225#225#225#227#227#227#227#227#227#228#229#229#231#232
+  +#232#235#237#237#199#200#227#21#16#161#21#16#161#21#16#161#21#16#161#230#234
+  +#243#242#246#246#240#243#243#238#241#241#237#240#240#237#240#240#237#239#239
+  +#155#154#209#234#236#236#234#235#235#235#236#236#237#239#239#241#244#244'MJ'
+  +#183#21#16#161#21#16#161#21#16#161#245#249#249#244#248#248#242#246#246#241
+  +#245#245#241#245#245#242#246#246#188#190#226'><'#178#21#16#161#21#16#161#21
+  +#16#161#21#16#161'ig'#193#241#244#244#238#240#240#236#237#237#235#236#236#236
+  +#237#237#239#241#241#242#246#246#21#16#161#21#16#161#21#16#161'MK'#183#244
+  +#247#247#241#244#244#241#243#243#242#244#244#202#204#231'#'#31#166#21#16#161
+  +#21#16#161'"'#31#167#202#204#231#242#244#244#239#241#241#237#238#238#236#236
+  +#236#235#236#236#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  ,#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#158#158#158#158#158#158#157
+  +#157#157#157#157#157#157#157#157#156#156#156#156#156#156#155#155#155#155#155
+  +#155#154#154#154#153#153#153#153#153#153#157#158#158#165#170#170#178#187#187
+  +#195#211#211#19#15#163#19#15#163#19#15#163'BD'#179#190#206#206#172#182#182
+  +#158#164#164#151#154#154#148#168#222#157#181#240#172#197#243#189#217#247'dn'
+  +#201#19#15#163#19#15#163#19#15#163'jv'#205#173#200#244#156#181#240#144#168
+  +#238#138#163#237#140#164#237#145#170#238#153#177#240#163#188#242#172#199#244
+  +#162#186#235'S['#195#19#15#163#19#15#163#19#15#163#19#15#163#19#15#163#19#15
+  +#163'OP'#182#158#166#202#197#207#207#189#197#197#181#186#186#175#178#178#172
+  +#175#175#173#177#177#179#185#185#146#151#188#19#15#163#19#15#163#19#15#163#19
+  +#15#163#158#171#208#191#207#216'X\'#184#19#15#163#19#15#163#19#15#163#19#15
+  +#163#19#15#163'*)'#170#161#176#203#189#206#206#185#202#202#176#191#200'hn'
+  +#184#30#27#166#19#15#163#19#15#163#19#15#163#19#15#163'))'#174'o}'#210#170
+  +#198#246#156#184#243#145#170#241#139#164#240#141#166#240#151#178#242#169#198
+  +#246'iv'#206#19#15#163#19#15#163#19#15#163'bm'#202#178#207#247#157#184#244
+  +#141#167#241#131#156#239'~'#151#238'|'#149#238'|'#149#238'|'#148#238'|'#149
+  +#238'|'#148#238'|'#149#238'|'#149#238'}'#149#238'}'#149#238'}'#149#238'}'#149
+  +#238#128#152#238#132#157#238#142#167#240#157#184#243#178#206#247'bm'#201#19
+  +#15#163#19#15#163#19#15#163'`j'#201#173#199#245#159#185#243#157#183#242#168
+  +#193#244#185#213#248#19#15#163#19#15#163#19#15#163'CE'#180#210#230#230#210
+  +#228#228#159#171#208'BC'#178#19#15#163#19#15#163#19#15#163#19#15#163#19#15
+  +#163#19#15#163'OQ'#182#158#166#203#196#207#207#190#197#197#182#187#187#177
+  +#180#180#174#177#177#177#179#179#182#186#186#191#198#198'*'''#169#19#15#163
+  +#19#15#163#19#15#163#19#15#163#192#199#199#185#189#189#179#181#181#177#178
+  +#178#177#179#179#182#185#185#189#194#194#196#203#203#204#213#213#138#143#199
+  +'87'#175#19#15#163#19#15#163#19#15#163#19#15#163#19#15#163#31#29#167']_'#187
+  +#187#195#214#206#213#213#200#206#206#195#198#198#191#193#193#188#189#189#188
+  +#189#189#189#189#189#191#192#192#196#198#198#201#205#205#206#212#212#213#221
+  +#221#170#175#212'ac'#191' '#29#168#19#15#163#19#15#163#19#15#163#19#15#163#19
+  +#15#163#19#15#163'-+'#174#181#190#228#219#230#243'FF'#184#19#15#163#19#15#163
+  +#19#15#163#19#15#163#19#15#163#19#15#163#19#15#163#19#15#163#19#15#163#19#15
+  +#163#19#15#163#170#174#219#219#224#236#220#225#230#224#228#228#228#232#232
+  +#165#167#213'.+'#173#19#15#163#19#15#163#19#15#163#19#15#163#19#15#163' '#29
+  +#168'HF'#181#228#231#231#227#229#229#224#225#225#225#225#225#225#225#225#225
+  +#225#225#225#225#225#226#226#226#226#226#226#227#227#227#227#227#227#229#229
+  +#229#232#233#233#234#236#236#239#242#242'/,'#174#19#15#163#19#15#163#19#15
+  +#163'ZX'#190#230#234#244#243#247#247#242#245#245#241#244#244#198#200#228'JH'
+  +#183'JG'#182#236#237#237#235#236#236#235#236#236#237#239#239#241#244#244'LJ'
+  +#185#19#15#163#19#15#163#19#15#163#132#132#206#132#132#206#132#132#206#131
+  +#132#206'vv'#201'/,'#174#19#15#163#19#15#163#19#15#163#19#15#163#19#15#163'K'
+  +'I'#184#227#231#240#239#241#241#236#238#238#235#235#235#236#236#236#237#238
+  +#238#239#241#241#243#246#246#19#15#163#19#15#163#19#15#163'LJ'#185#243#246
+  +#246#240#242#242#239#241#241#240#241#241#242#244#244#188#189#226#19#15#163#19
+  +#15#163#19#15#163'!'#30#168#229#232#241#240#242#242#238#239#239#237#237#237
+  ,#236#236#236#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235#235
+  +#235#235#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#239#239#239#238#238#238#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#159#159#159#159#159#159#158#158
+  +#158#158#158#158#157#157#157#157#157#157#156#156#156#156#156#156#155#155#155
+  +#155#155#155#154#154#154#153#153#153#157#158#158#165#170#170#178#187#187#195
+  +#211#211#18#14#165#18#14#165#18#14#165'AC'#181#189#204#204#169#178#178#156
+  +#160#160#145#160#204#142#167#238#151#176#240#165#190#243#184#211#247#145#163
+  +#223#18#14#165#18#14#165#18#14#165'kw'#207#177#203#245#158#184#242#146#170
+  +#239#139#163#238#138#162#237#141#164#238#144#169#239#151#176#240#158#184#242
+  +#166#193#243#173#200#245#179#206#246#141#161#226#142#162#226#142#162#226#141
+  +#160#226#173#195#235#198#208#208#193#201#201#187#194#194#181#185#185#175#178
+  +#178#171#173#173#170#171#171#171#174#174#175#179#179#181#188#188#187#195#195
+  +#190#200#200#192#203#203#191#203#203#189#201#201#188#200#200#187#200#200#178
+  +#191#201#148#158#195#148#159#197#148#159#197#156#167#196#182#196#196#177#189
+  +#189#171#182#182#169#179#179#170#181#181#173#185#185#178#192#192#138#159#226
+  +#140#161#226#140#161#227#149#171#231#173#201#246#165#193#245#155#181#243#146
+  +#171#241#138#163#240#135#159#239#137#163#240#147#173#242#164#191#245#154#177
+  +#232#18#14#165#18#14#165#18#14#165#28#27#170#176#204#244#167#195#246#149#176
+  +#243#136#162#240#130#154#240'~'#150#238'}'#150#239'|'#149#238'}'#149#239'}'
+  +#149#239'}'#149#238'}'#149#238'}'#150#238'}'#149#238'~'#150#238''#152#238
+  +#130#154#239#137#162#240#149#175#242#167#195#245#188#217#249#28#27#170#18#14
+  +#165#18#14#165#18#14#165#156#178#233#166#193#245#156#181#243#156#181#242#166
+  +#192#244#185#213#247#18#14#165#18#14#165#18#14#165'BD'#181#210#228#228#200
+  +#215#215#196#208#208#195#207#207#186#197#206#156#164#201#157#165#203#157#166
+  +#204#157#166#204#201#213#213#198#208#208#193#201#201#187#194#194#181#185#185
+  +#178#180#180#174#176#176#174#175#175#177#179#179#180#183#183#187#192#192#194
+  +#202#202#199#208#208#201#211#211#200#209#209#195#203#203#188#194#194#183#186
+  +#186#178#180#180#176#177#177#176#177#177#179#181#181#184#187#187#188#193#193
+  +#194#200#200#200#208#208#204#213#213#184#192#211#162#168#206#163#169#207#163
+  +#170#207#174#181#209#208#217#217#206#213#213#203#209#209#198#203#203#194#197
+  +#197#191#193#193#190#190#190#188#188#188#187#187#187#189#189#189#190#190#190
+  +#193#194#194#196#198#198#201#204#204#206#211#211#212#219#219#219#228#228#227
+  +#238#238#188#197#226'GG'#184#18#14#165#18#14#165#18#14#165#136#141#207#222
+  +#232#237#216#225#238#214#224#240#218#229#242#224#236#246#230#242#249'GG'#186
+  +#18#14#165#18#14#165'HG'#186#233#243#249#233#242#248#228#237#245#223#231#241
+  ,#221#227#237#219#223#230#218#220#221#219#221#221#221#223#223#223#226#226#227
+  +#230#230#230#234#234#192#195#223#179#182#219#180#183#220#180#183#220#193#195
+  +#223#231#235#235#230#233#233#227#229#229#226#227#227#225#226#226#224#225#225
+  +#225#225#225#225#225#225#225#225#225#227#227#227#228#228#228#228#228#228#229
+  +#229#229#230#230#230#231#232#232#234#235#235#237#240#240#171#172#219#18#14
+  +#165#18#14#165#18#14#165#18#14#165#31#29#170'JI'#186'JI'#186'-+'#175#18#14
+  +#165#18#14#165'JG'#184#237#239#239#236#237#237#236#237#237#237#239#239#240
+  +#243#243'KI'#186#18#14#165#18#14#165#18#14#165#18#14#165#18#14#165#18#14#165
+  +#18#14#165#18#14#165#18#14#165#18#14#165#18#14#165#18#14#165#18#14#165'uu'
+  +#201#242#245#245#240#242#242#238#239#239#236#237#237#235#235#235#235#235#235
+  +#237#237#237#239#240#240#242#244#244#18#14#165#18#14#165#18#14#165'.+'#175
+  +#242#245#245#240#241#241#238#240#240#238#240#240#240#241#241#242#245#245#159
+  +#160#217#18#14#165#18#14#165#18#14#165'<:'#180#228#230#239#240#241#241#237
+  +#238#238#237#237#237#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239#239#239
+  +#239#239#239#239#239#238#238#238#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#159#159#159#159#159#159
+  +#159#159#159#158#158#158#158#158#158#157#157#157#157#157#157#156#156#156#155
+  +#155#155#155#155#155#154#154#154#153#153#153#157#158#158#165#170#170#178#187
+  +#187#194#210#210#16#13#168#16#13#168#16#13#168'@C'#183#189#204#204#169#178
+  +#178#154#170#209#143#168#238#143#167#238#151#175#240#165#190#242#182#209#246
+  +#156#176#229#16#13#168#16#13#168#16#13#168'>C'#189#178#204#245#161#185#242
+  +#147#171#239#139#163#237#137#161#237#139#163#238#141#164#239#144#168#239#149
+  +#173#240#154#179#241#159#185#242#164#189#243#167#193#244#168#194#244#168#194
+  +#244#167#193#243#164#189#243#177#190#211#184#188#188#180#183#183#175#177#177
+  +#173#174#174#170#171#171#170#170#170#170#172#172#172#175#175#175#179#179#178
+  +#183#183#179#186#186#179#186#186#179#186#186#176#183#183#175#182#182#175#183
+  +#183#175#184#184#177#186#186#177#187#187#175#185#185#172#181#181#166#175#175
+  +#162#169#169#159#165#165#156#162#162#157#164#164#159#167#167#163#171#171#161
+  +#189#244#164#191#245#164#191#245#161#188#244#156#182#244#150#176#243#144#169
+  +#242#138#163#241#133#158#240#131#157#240#134#159#240#143#169#242#158#185#244
+  +#177#206#247'25'#183#16#13#168#16#13#168#16#13#168'ky'#209#179#208#248#161
+  +#188#245#145#171#242#135#161#241#130#155#240#128#152#239'~'#150#239'}'#150
+  +#239'~'#150#239'~'#150#239'~'#150#239'~'#150#239'~'#150#239#128#152#239#132
+  +#156#240#136#160#240#145#171#241#160#187#244#179#208#248'ky'#209#16#13#168#16
+  +#13#168#16#13#168'''('#178#180#208#247#161#186#243#153#177#242#154#179#242
+  ,#167#192#244#186#213#248#16#13#168#16#13#168#16#13#168'AD'#184#205#220#220
+  +#193#204#204#188#197#197#186#193#193#187#194#194#190#198#198#193#201#201#193
+  +#201#201#193#201#201#190#197#197#187#193#193#184#189#189#180#184#184#178#180
+  +#180#175#176#176#174#174#174#175#175#175#176#178#178#181#183#183#186#190#190
+  +#191#197#197#195#203#203#197#205#205#196#204#204#193#199#199#187#192#192#182
+  +#185#185#179#180#180#176#177#177#177#177#177#178#178#178#180#181#181#184#186
+  +#186#187#191#191#191#196#196#195#200#200#198#205#205#201#208#208#201#209#209
+  +#202#209#209#201#207#207#200#205#205#197#202#202#195#198#198#192#194#194#191
+  +#193#193#188#189#189#188#188#188#187#187#187#188#188#188#190#190#190#190#191
+  +#191#191#192#192#194#195#195#197#198#198#199#202#202#205#210#210#213#220#220
+  +#222#231#231#202#212#231#16#13#168#16#13#168#16#13#168'z'#204#226#235#235
+  +#219#225#225#214#218#218#212#217#219#216#222#230#222#231#239#230#241#247'FG'
+  +#188#16#13#168#16#13#168'FG'#188#233#243#248#228#236#243#223#230#235#221#225
+  +#228#219#222#222#218#220#220#217#218#218#217#218#218#218#220#220#221#222#222
+  +#223#225#225#226#228#228#227#230#230#228#231#231#229#232#232#230#233#233#230
+  +#233#233#229#231#231#228#230#230#226#227#227#226#227#227#226#226#226#225#225
+  +#225#226#226#226#226#226#226#226#226#226#228#228#228#228#228#228#229#229#229
+  +#230#230#230#230#230#230#231#232#232#233#234#234#236#238#238#239#242#242#157
+  +#158#216#16#13#168#16#13#168#16#13#168#16#13#168#16#13#168#16#13#168#16#13
+  +#168#16#13#168#16#13#168'HG'#187#238#240#240#236#238#238#236#237#237#237#239
+  +#239#239#242#242'IG'#188#16#13#168#16#13#168#16#13#168#16#13#168#16#13#168#16
+  +#13#168#16#13#168#16#13#168#16#13#168#16#13#168#16#13#168'XW'#192#200#202#231
+  +#241#244#244#239#241#241#238#239#239#236#237#237#235#235#235#234#235#235#236
+  +#236#236#237#238#238#239#240#240#241#244#244#16#13#168#16#13#168#16#13#168#16
+  +#13#168#241#243#243#239#240#240#237#238#238#238#239#239#239#240#240#241#242
+  +#242#243#245#245'XW'#192#16#13#168#16#13#168#16#13#168'IG'#187#240#241#241
+  +#238#239#239#237#237#237#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239
+  +#239#239#239#239#238#238#238#239#239#239#238#238#238#239#239#239#238#238#238
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241#241
+  +#241#241#240#240#240#241#241#241#241#241#241#240#240#240#240#240#240#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#160#160#160#160#160
+  +#160#159#159#159#159#159#159#159#159#159#158#158#158#158#158#158#157#157#157
+  +#156#156#156#155#155#155#155#155#155#154#154#154#157#158#158#165#170#170#178
+  +#187#187#195#211#211#15#12#170#15#12#170#15#12#170'?B'#184#188#203#203#168
+  +#184#206#153#178#241#145#169#239#146#169#239#154#179#241#168#194#244#187#214
+  +#247#132#149#221#15#12#170#15#12#170#15#12#170'jw'#210#178#204#246#159#185
+  +#242#147#172#240#140#165#238#138#161#238#137#161#238#138#162#238#140#164#239
+  ,#142#166#239#145#168#239#148#172#240#150#175#241#152#178#241#154#179#241#154
+  +#179#241#153#177#241#150#175#241#151#173#233#177#179#179#175#176#176#173#174
+  +#174#171#171#171#170#170#170#170#170#170#170#171#171#171#172#172#172#174#174
+  +#172#174#174#172#175#175#171#174#174#169#173#173#167#171#171#166#169#169#164
+  +#168#168#165#169#169#164#169#169#164#169#169#162#167#167#160#164#164#156#160
+  +#160#152#155#155#149#152#152#148#150#150#148#150#150#149#153#153#149#159#177
+  +#147#173#242#148#174#242#148#174#242#146#171#242#143#169#241#140#165#241#136
+  +#161#240#133#158#240#131#155#239#130#154#239#133#157#240#140#165#241#151#178
+  +#243#169#196#246'{'#140#219#15#12#170#15#12#170#15#12#170#26#25#175#158#182
+  +#235#174#202#247#158#185#245#145#170#243#136#161#241#132#156#241#128#153#240
+  +''#152#240'~'#151#239'~'#151#239''#151#239#128#152#239#129#153#239#131#156
+  +#240#137#162#241#145#171#242#158#184#244#175#202#247#170#195#240#26#25#175#15
+  +#12#170#15#12#170#15#12#170'}'#141#219#172#199#246#155#179#243#148#173#242
+  +#153#177#242#167#192#244#186#213#248#15#12#170#15#12#170#15#12#170'@C'#187
+  +#202#215#215#190#198#198#182#188#188#179#183#183#178#181#181#181#186#186#184
+  +#188#188#184#188#188#184#188#188#183#186#186#181#184#184#179#181#181#178#179
+  +#179#177#178#178#176#176#176#174#175#175#176#176#176#177#178#178#180#182#182
+  +#186#189#189#191#196#196#196#202#202#197#204#204#197#204#204#194#200#200#188
+  +#192#192#183#186#186#179#181#181#177#177#177#176#176#176#177#178#178#179#180
+  +#180#181#182#182#183#184#184#185#187#187#188#191#191#190#193#193#192#196#196
+  +#193#197#197#194#197#197#193#196#196#193#196#196#191#194#194#190#192#192#190
+  +#190#190#188#189#189#188#188#188#188#188#188#190#190#190#190#190#190#191#191
+  +#191#191#191#191#192#192#192#193#193#193#195#195#195#197#199#199#202#204#204
+  +#209#214#214#218#226#226#161#167#217#15#12#170#15#12#170#15#12#170#217#227
+  +#236#222#230#230#215#220#220#210#213#213#210#213#213#214#217#217#221#227#227
+  +#229#237#237'FF'#188#15#12#170#15#12#170'FF'#188#231#238#238#225#230#230#220
+  +#223#223#218#220#220#217#218#218#217#217#217#216#216#216#216#217#217#217#218
+  +#218#219#220#220#221#222#222#223#224#224#224#225#225#224#226#226#225#227#227
+  +#226#228#228#226#228#228#227#228#228#226#227#227#225#225#225#226#226#226#225
+  +#225#225#227#227#227#227#227#227#227#227#227#227#227#227#228#228#228#229#229
+  +#229#229#229#229#230#230#230#230#230#230#231#231#231#234#234#234#235#236#236
+  +#237#239#239#240#242#242#199#201#231'ed'#198#15#12#170#15#12#170#15#12#170#15
+  +#12#170#15#12#170#29#27#175'HF'#188#155#155#215#237#239#239#236#237#237#236
+  +#236#236#236#237#237#239#240#240'dc'#197'HG'#188'IG'#189'IG'#189'IH'#189'IG'
+  +#189'IG'#189'IG'#189'IG'#189'fe'#199#158#159#218#214#217#236#242#245#245#241
+  +#243#243#239#241#241#238#239#239#237#237#237#236#236#236#235#236#236#235#235
+  +#235#236#236#236#236#237#237#238#239#239#240#242#242'HF'#188'HF'#188'HF'#188
+  +'HF'#188#240#242#242#239#240#240#238#238#238#237#238#238#238#238#238#239#240
+  +#240#241#242#242#228#229#239'WU'#193'HG'#188'HG'#188'HF'#188#155#155#215#239
+  +#240#240#238#238#238#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#239#239#239#238#238#238#238#238#238#238#238#238#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  ,#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#162#162#162#161#161#161
+  +#160#160#160#160#160#160#159#159#159#159#159#159#158#158#158#157#157#157#157
+  +#157#157#156#156#156#155#155#155#154#154#154#157#159#159#165#170#170#178#187
+  +#187#195#211#211#13#10#172#13#10#172#13#10#172'=@'#186#190#211#222#172#197
+  +#245#158#183#242#152#177#241#154#178#241#164#188#243#177#204#246#195#222#249
+  +'U^'#202#13#10#172#13#10#172#13#10#172's'#129#215#175#201#246#158#184#243#147
+  +#171#241#141#164#239#138#162#239#138#162#239#138#162#239#138#162#239#139#162
+  +#239#139#164#239#140#165#240#142#166#240#143#167#240#144#167#240#144#167#240
+  +#142#167#240#141#166#240#140#164#240#161#170#200#174#174#174#173#174#174#172
+  +#172#172#171#171#171#171#171#171#170#171#171#170#170#170#170#170#170#168#169
+  +#169#168#169#169#166#167#167#165#166#166#163#164#164#161#162#162#159#160#160
+  +#157#159#159#156#158#158#156#158#158#154#156#156#152#154#154#150#151#151#147
+  +#147#147#145#146#146#144#144#144#143#144#144#143#145#145#141#149#169#137#162
+  +#241#137#162#241#137#162#241#137#161#241#136#160#241#133#159#241#132#156#240
+  +#131#155#240#130#154#240#130#154#240#131#156#240#136#162#241#146#172#243#160
+  +#187#245#178#207#248';@'#192#13#10#172#13#10#172#13#10#172'03'#187#179#206
+  +#245#173#201#247#159#186#245#147#174#243#140#166#242#135#161#241#133#158#241
+  +#131#156#241#131#156#241#132#156#241#134#158#241#136#161#241#141#166#242#148
+  +#175#243#159#186#245#174#201#247#179#206#245'03'#187#13#10#172#13#10#172#13
+  +#10#172'03'#187#181#208#248#163#188#244#149#173#242#145#168#241#152#176#242
+  +#166#192#245#187#214#248#13#10#172#13#10#172#13#10#172'>A'#190#202#214#214
+  +#189#196#196#180#184#184#175#177#177#175#176#176#176#178#178#178#179#179#178
+  +#180#180#179#180#180#178#179#179#177#178#178#178#178#178#177#177#177#176#177
+  +#177#176#176#176#176#176#176#176#176#176#178#178#178#182#184#184#188#191#191
+  +#193#198#198#199#207#207#155#161#201#166#172#203#197#205#205#191#196#196#186
+  +#189#189#181#182#182#178#179#179#178#178#178#178#178#178#179#179#179#179#180
+  +#180#181#181#181#183#183#183#184#184#184#185#187#187#186#187#187#186#187#187
+  +#188#189#189#188#189#189#188#189#189#188#189#189#187#188#188#188#188#188#188
+  +#188#188#189#189#189#189#189#189#190#190#190#190#190#190#192#192#192#192#192
+  +#192#193#193#193#194#194#194#194#194#194#196#197#197#200#202#202#207#211#211
+  +#215#222#222'wz'#203#13#10#172#13#10#172#13#10#172#229#239#239#221#228#228
+  +#214#218#218#209#212#212#210#212#212#214#217#217#221#226#226#230#238#238'DD'
+  +#190#13#10#172#13#10#172'DD'#190#228#234#234#222#226#226#217#219#219#215#216
+  +#216#215#216#216#216#216#216#215#216#216#216#216#216#217#218#218#219#219#219
+  +#220#220#220#221#222#222#222#222#222#223#224#224#223#224#224#224#224#224#225
+  +#225#225#225#226#226#225#225#225#225#225#225#225#225#225#227#227#227#227#227
+  +#227#228#228#228#228#228#228#229#229#229#229#229#229#230#230#230#230#230#230
+  +#231#231#231#231#231#231#231#231#231#233#233#233#234#234#234#236#237#237#237
+  +#239#239#240#241#241#241#243#243#242#245#245#200#201#231#186#187#227#186#187
+  +#227#213#216#236#241#244#244#240#242#242#239#240#240#237#238#238#236#237#237
+  +#236#236#236#236#237#237#237#238#238#239#240#240#240#242#242#241#243#243#242
+  +#245#245#243#245#245#243#245#245#243#245#245#242#245#245#242#245#245#242#244
+  +#244#241#243#243#240#242#242#239#241#241#238#239#239#238#239#239#237#238#238
+  +#237#237#237#236#236#236#236#236#236#236#236#236#236#236#236#237#237#237#238
+  +#238#238#239#240#240#240#242#242#241#242#242#241#242#242#240#242#242#239#240
+  +#240#238#238#238#237#237#237#237#237#237#238#238#238#239#239#239#240#241#241
+  +#241#242#242#241#243#243#242#243#243#241#243#243#241#242#242#239#240#240#238
+  +#239#239#238#238#238#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  ,#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#162#162#162#162#162#162
+  +#162#162#162#161#161#161#160#160#160#160#160#160#159#159#159#158#158#158#158
+  +#158#158#157#157#157#155#155#155#154#154#154#157#159#159#166#171#171#178#187
+  +#187#195#211#211#12#9#174#12#9#174#12#9#174'=@'#189#195#223#249#179#205#246
+  +#168#193#244#163#188#243#166#191#244#176#202#246#190#217#248#168#190#237#12#9
+  +#174#12#9#174#12#9#174#12#9#174#156#177#234#171#196#245#156#180#242#146#170
+  +#240#140#164#239#139#163#239#139#163#239#139#162#239#139#163#240#139#163#240
+  +#139#162#240#138#162#239#138#162#240#139#163#240#139#163#240#139#162#240#139
+  +#162#240#137#161#240#137#161#240#141#162#231#173#173#173#173#173#173#173#173
+  +#173#173#173#173#172#172#172#171#171#171#170#170#170#169#169#169#168#168#168
+  +#167#167#167#165#165#165#163#163#163#161#161#161#159#159#159#156#156#156#154
+  +#154#154#153#153#153#152#152#152#150#150#150#149#149#149#147#147#147#145#145
+  +#145#144#144#144#143#143#143#142#142#142#141#141#141#137#146#177#133#157#240
+  +#133#157#240#133#157#240#132#157#240#131#156#240#131#155#240#131#155#240#131
+  +#155#240#130#155#240#130#155#240#131#155#240#134#158#241#141#165#242#153#179
+  +#244#168#195#247#152#175#235#24#23#179#12#9#174#12#9#174#12#9#174'.2'#188#179
+  +#207#245#176#205#248#165#192#246#155#181#245#148#174#244#144#170#243#142#167
+  +#242#141#167#242#142#168#242#144#169#243#149#175#243#156#182#245#165#192#246
+  +#177#205#248#180#207#245'/3'#188#12#9#174#12#9#174#12#9#174#24#23#179#154#176
+  +#235#170#196#246#155#180#244#145#168#242#143#166#242#152#175#243#167#192#245
+  +#188#214#248#12#9#174#12#9#174#12#9#174'=A'#193#202#214#214#189#196#196#181
+  +#184#184#175#176#176#173#173#173#174#175#175#175#176#176#176#177#177#177#178
+  +#178#177#177#177#178#178#178#178#178#178#178#178#178#178#178#178#179#179#179
+  +#179#179#179#179#179#179#181#181#181#185#186#186#191#194#194#198#204#204'<<'
+  +#184#12#9#174#12#9#174'_b'#191#196#202#202#189#193#193#184#186#186#180#181
+  +#181#179#179#179#179#179#179#180#180#180#180#180#180#181#181#181#181#181#181
+  +#182#182#182#183#183#183#183#184#184#184#185#185#184#185#185#186#187#187#186
+  +#186#186#187#187#187#187#187#187#188#188#188#189#189#189#190#190#190#190#190
+  +#190#191#191#191#191#191#191#193#193#193#193#193#193#194#194#194#195#195#195
+  +#195#195#195#197#197#197#201#202#202#207#210#210#214#220#220#144#149#211#12#9
+  +#174#12#9#174#12#9#174#216#226#236#223#231#231#217#222#222#213#216#216#213
+  +#216#216#217#221#221#224#230#230#232#240#240#12#9#174#12#9#174#12#9#174'DC'
+  +#191#227#232#232#221#224#224#217#218#218#215#215#215#215#215#215#216#216#216
+  +#216#216#216#217#217#217#218#218#218#219#219#219#220#220#220#221#221#221#221
+  +#221#221#222#222#222#222#222#222#223#223#223#224#224#224#225#225#225#225#225
+  +#225#226#226#226#226#226#226#227#227#227#228#228#228#228#228#228#228#228#228
+  +#229#229#229#230#230#230#231#231#231#231#231#231#232#232#232#232#232#232#232
+  +#232#232#233#233#233#234#234#234#235#236#236#236#237#237#237#238#238#238#239
+  +#239#239#241#241#240#241#241#240#242#242#240#242#242#240#241#241#240#241#241
+  +#239#240#240#238#239#239#237#237#237#236#236#236#236#236#236#236#236#236#237
+  +#237#237#238#238#238#238#240#240#239#240#240#239#241#241#240#241#241#240#241
+  +#241#240#241#241#239#241#241#239#241#241#239#240#240#239#240#240#239#240#240
+  +#238#239#239#237#238#238#237#237#237#236#237#237#236#236#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#237#237#237#237#237#237#239#239#239#239#240
+  ,#240#239#240#240#240#241#241#239#240#240#239#239#239#238#238#238#238#238#238
+  +#237#237#237#237#237#237#238#238#238#238#239#239#239#240#240#239#240#240#240
+  +#241#241#241#241#241#239#240#240#239#239#239#239#239#239#239#239#239#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#244#244#244#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#163#163#163#163#163#163#162#162#162#162#162#162#161
+  +#161#161#160#160#160#160#160#160#159#159#159#158#158#158#157#157#157#156#156
+  +#156#154#154#154#157#159#159#166#171#171#178#188#188#195#211#211#10#8#177#10
+  +#8#177#10#8#177';@'#195#205#233#251#191#217#249#182#208#247#179#204#246#182
+  +#209#247#192#219#248#167#189#237#22#22#182#10#8#177#10#8#177#10#8#177':?'#195
+  +#182#208#247#166#191#244#152#177#242#145#169#241#141#165#240#140#163#240#140
+  +#163#240#140#164#240#140#163#240#139#163#240#139#163#240#139#163#240#139#163
+  +#240#139#162#240#139#162#240#138#162#240#138#162#240#138#162#240#138#162#240
+  +#138#161#240#160#169#198#174#174#174#174#174#174#174#174#174#173#173#173#172
+  +#172#172#171#171#171#170#170#170#170#170#170#168#168#168#166#166#166#164#164
+  +#164#162#162#162#160#160#160#158#158#158#155#155#155#153#153#153#152#152#152
+  +#151#151#151#149#149#149#148#148#148#147#147#147#145#145#145#144#144#144#143
+  +#143#143#142#142#142#137#149#191#133#157#241#133#157#241#132#157#241#132#156
+  +#241#132#156#241#132#156#241#132#156#241#131#156#241#131#155#241#131#155#241
+  +#131#155#241#133#157#241#137#162#242#145#170#243#157#184#245#172#200#247'z'
+  +#139#222#10#8#177#10#8#177#10#8#177#10#8#177#22#22#182#149#170#232#184#212
+  +#249#174#202#248#166#194#247#161#188#246#158#185#245#156#183#245#158#185#245
+  +#161#188#246#166#194#246#175#202#248#183#212#249#148#170#232'"$'#186#10#8#177
+  +#10#8#177#10#8#177#10#8#177'{'#140#222#174#201#247#160#184#244#148#172#242
+  +#141#164#241#142#165#241#151#175#243#168#193#245#188#215#249#10#8#177#10#8
+  +#177#10#8#177':@'#196#201#215#219#191#197#197#181#184#184#177#177#177#175#175
+  +#175#176#176#176#177#177#177#178#178#178#178#178#178#179#179#179#179#179#179
+  +#180#180#180#180#180#180#180#180#180#181#181#181#181#181#181#181#181#181#183
+  +#184#184#186#189#189#193#197#197#165#171#203#10#8#177#10#8#177#10#8#177#10#8
+  +#177#199#206#206#191#195#195#185#187#187#182#182#182#180#180#180#181#181#181
+  +#180#180#180#181#181#181#182#182#182#182#182#182#182#182#182#184#184#184#184
+  +#184#184#185#185#185#186#186#186#186#186#186#187#187#187#188#188#188#189#189
+  +#189#189#189#189#190#190#190#191#191#191#191#191#191#192#192#192#193#193#193
+  +#194#194#194#195#195#195#195#195#195#195#195#195#196#196#196#198#198#198#201
+  +#202#202#206#208#208#214#219#219#183#189#221#10#8#177#10#8#177#10#8#177#134
+  ,#139#213#228#236#236#223#229#229#220#225#225#220#225#225#224#229#229#230#237
+  +#237#150#155#218#10#8#177#10#8#177#10#8#177'lm'#204#226#231#231#220#223#223
+  +#217#218#218#216#216#216#216#216#216#217#217#217#217#217#217#218#218#218#218
+  +#218#218#219#219#219#221#221#221#221#221#221#221#221#221#222#222#222#223#223
+  +#223#224#224#224#225#225#225#226#226#226#226#226#226#227#227#227#227#227#227
+  +#228#228#228#229#229#229#229#229#229#229#229#229#230#230#230#230#230#230#231
+  +#231#231#231#231#231#232#232#232#232#232#232#233#233#233#234#234#234#234#234
+  +#234#235#236#236#236#236#236#236#237#237#237#237#237#237#238#238#238#239#239
+  +#238#239#239#238#239#239#238#239#239#237#238#238#237#237#237#236#237#237#236
+  +#236#236#236#236#236#235#236#236#236#237#237#237#237#237#237#238#238#238#238
+  +#238#238#238#238#238#239#239#238#239#239#238#239#239#238#239#239#238#239#239
+  +#238#239#239#238#238#238#237#238#238#237#237#237#237#237#237#236#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#238#238#238#238#238#238#238#238#238#239#239#238#239#239
+  +#238#238#238#238#238#238#237#238#238#237#237#237#238#238#238#238#238#238#238
+  +#238#238#239#239#239#239#239#239#239#240#240#239#240#240#239#240#240#239#239
+  +#239#239#239#239#239#239#239#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#165
+  +#165#165#164#164#164#163#163#163#162#162#162#162#162#162#161#161#161#160#160
+  +#160#160#160#160#158#158#158#157#157#157#156#156#156#155#155#155#157#159#159
+  +#165#170#170#178#187#187#194#209#209#9#7#179#9#7#179#9#7#179':@'#197#206#233
+  +#251#203#229#251#196#223#249#194#221#249#174#198#241'jx'#215#20#21#184#9#7
+  +#179#9#7#179#9#7#179#9#7#179#156#177#236#174#199#246#160#184#244#150#174#242
+  +#144#167#240#141#165#241#141#165#241#141#164#241#141#164#241#140#164#241#140
+  +#164#241#140#164#241#140#164#241#140#163#241#139#163#241#139#163#241#139#163
+  +#241#139#163#241#139#162#241#139#162#241#138#162#241#143#163#232#174#174#174
+  +#174#174#174#174#174#174#174#174#174#174#174#174#173#173#173#172#172#172#171
+  +#171#171#169#169#169#168#168#168#166#166#166#164#164#164#162#162#162#159#159
+  +#159#157#157#157#155#155#155#153#153#153#152#152#152#150#150#150#149#149#149
+  +#147#147#147#146#146#146#145#145#145#144#144#144#143#143#143#137#151#197#133
+  +#157#241#133#157#241#133#157#241#133#157#241#133#157#242#133#157#242#133#157
+  +#242#132#156#241#132#157#242#132#156#242#132#156#242#133#157#242#135#159#242
+  +#139#165#243#148#174#244#160#186#246#175#202#248'z'#139#223#9#7#179#9#7#179#9
+  +#7#179#9#7#179#9#7#179'8?'#197#147#169#233#186#215#250#181#209#249#177#206
+  ,#248#176#205#248#177#205#248#181#209#249#185#214#249#147#168#232'P['#206#9#7
+  +#179#9#7#179#9#7#179#9#7#179#9#7#179'{'#140#223#177#204#248#163#188#245#150
+  +#175#244#143#166#242#138#162#242#143#166#242#153#177#244#170#196#246#190#217
+  +#249#9#7#179#9#7#179#9#7#179':?'#197#198#214#228#191#198#198#183#186#186#179
+  +#179#179#176#176#176#178#178#178#179#179#179#180#180#180#180#180#180#181#181
+  +#181#181#181#181#181#181#181#182#182#182#182#182#182#182#182#182#182#182#182
+  +#182#182#182#184#185#185#188#190#190#194#199#199#178#184#205#9#7#179#9#7#179
+  +#9#7#179#21#20#181#200#207#207#192#196#196#186#188#188#183#183#183#181#181
+  +#181#182#182#182#182#182#182#182#182#182#182#182#182#183#183#183#183#183#183
+  +#184#184#184#185#185#185#186#186#186#186#186#186#187#187#187#189#189#189#189
+  +#189#189#190#190#190#190#190#190#191#191#191#191#191#191#192#192#192#193#193
+  +#193#194#194#194#194#194#194#195#195#195#196#196#196#196#196#196#197#197#197
+  +#199#199#199#201#202#202#206#208#208#212#216#216#220#227#227'$$'#186#9#7#179
+  +#9#7#179#22#22#183#191#198#230#229#237#237#227#234#234#228#234#234#231#238
+  +#238#191#198#231#22#22#183#9#7#179#9#7#179#9#7#179#188#194#226#225#229#229
+  +#220#222#222#217#218#218#215#216#216#217#217#217#218#218#218#218#218#218#219
+  +#219#219#220#220#220#220#220#220#222#222#222#222#222#222#222#222#222#223#223
+  +#223#224#224#224#225#225#225#225#225#225#226#226#226#226#226#226#227#227#227
+  +#228#228#228#229#229#229#230#230#230#230#230#230#230#230#230#231#231#231#231
+  +#231#231#232#232#232#233#233#233#233#233#233#233#233#233#233#233#233#234#234
+  +#234#234#234#234#235#235#235#235#235#235#235#236#236#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#236
+  +#237#237#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#237
+  +#237#236#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#237#238#238#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239#239#239#240
+  +#240#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#166#166#166#165#165#165#164#164#164#163#163#163#162#162#162#162#162
+  +#162#161#161#161#160#160#160#159#159#159#158#158#158#156#156#156#155#155#155
+  +#158#159#159#164#169#169#176#184#184#191#206#206#7#6#181#7#6#181#7#6#181#19
+  ,#19#185'9>'#199'9>'#199'9>'#199' "'#190#7#6#181#7#6#181#7#6#181#7#6#181#7#6
+  +#181#7#6#181'{'#139#224#179#205#247#166#190#245#154#179#243#147#172#242#143
+  +#167#241#142#165#241#142#165#241#142#165#241#141#165#241#141#165#241#141#165
+  +#241#141#164#241#140#164#241#140#164#241#140#164#241#140#164#241#140#163#241
+  +#140#164#241#139#163#241#139#163#241#139#163#241#139#163#242#161#170#200#174
+  +#174#174#175#175#175#175#175#175#174#174#174#174#174#174#173#173#173#172#172
+  +#172#171#171#171#169#169#169#167#167#167#166#166#166#163#163#163#160#160#160
+  +#158#158#158#156#156#156#154#154#154#153#153#153#151#151#151#150#150#150#148
+  +#148#148#147#147#147#146#146#146#145#145#145#144#144#144#137#154#217#134#158
+  +#242#134#158#242#134#158#242#134#158#242#134#158#242#134#158#242#133#158#242
+  +#133#158#242#133#157#242#133#157#242#133#157#242#132#157#242#133#159#242#136
+  +#160#243#141#166#243#150#175#245#162#188#246#175#203#248#132#151#228#19#20
+  +#185#7#6#181#7#6#181#7#6#181#7#6#181#7#6#181#19#19#185'CK'#203'es'#216'es'
+  +#216'es'#216'CK'#203#31'!'#190#7#6#181#7#6#181#7#6#181#7#6#181#7#6#181#19#20
+  +#185#133#151#228#177#204#248#163#190#246#152#177#245#145#168#242#140#163#242
+  +#139#162#241#145#168#242#156#180#244#174#199#247#194#221#250#7#6#181#7#6#181
+  +#7#6#181'9?'#199#192#214#239#193#199#199#184#187#187#180#180#180#177#177#177
+  +#179#179#179#180#180#180#181#181#181#182#182#182#181#181#181#182#182#182#183
+  +#183#183#183#183#183#183#183#183#183#183#183#183#183#183#183#183#183#185#185
+  +#185#188#190#190#193#197#197#200#205#205'jn'#197#7#6#181#20#19#183#131#134
+  +#200#198#204#204#192#195#195#187#189#189#184#185#185#182#182#182#182#182#182
+  +#183#183#183#183#183#183#183#183#183#184#184#184#184#184#184#185#185#185#186
+  +#186#186#186#186#186#186#186#186#187#187#187#189#189#189#189#189#189#190#190
+  +#190#191#191#191#192#192#192#193#193#193#193#193#193#193#193#193#195#195#195
+  +#196#196#196#196#196#196#197#197#197#197#197#197#198#198#198#199#199#199#201
+  +#202#202#205#206#206#210#213#213#217#222#222#156#162#217#7#6#181#7#6#181#7#6
+  +#181#7#6#181'\_'#204#163#168#223#163#168#224'\_'#204#7#6#181#7#6#181#7#6#181
+  +#7#6#181'NO'#200#227#232#232#223#225#225#219#221#221#217#217#217#217#217#217
+  +#218#218#218#219#219#219#219#219#219#219#219#219#221#221#221#222#222#222#223
+  +#223#223#223#223#223#223#223#223#224#224#224#225#225#225#226#226#226#227#227
+  +#227#227#227#227#227#227#227#228#228#228#228#228#228#229#229#229#231#231#231
+  +#231#231#231#230#230#230#232#232#232#232#232#232#233#233#233#234#234#234#234
+  +#234#234#234#234#234#234#234#234#235#235#235#235#235#235#236#236#236#236#236
+  +#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236#236
+  +#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#238#238#238#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#241#241#241#240#240#240#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  ,#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#166#166#166#166#166#166#165
+  +#165#165#164#164#164#163#163#163#163#163#163#162#162#162#161#161#161#160#160
+  +#160#159#159#159#157#157#157#156#156#156#159#160#160#164#167#167#173#180#180
+  +#186#199#199#6#5#184#6#5#184#6#5#184#6#5#184#6#5#184#6#5#184#6#5#184#6#5#184
+  +#6#5#184#6#5#184#6#5#184#6#5#184#31'!'#192#145#165#233#180#206#248#168#193
+  +#246#157#182#244#150#175#243#146#169#242#144#167#242#143#166#242#142#166#242
+  +#142#166#242#142#166#242#142#165#242#142#165#242#141#165#242#141#165#242#141
+  +#165#242#141#165#242#141#164#242#140#164#242#140#164#242#140#164#242#140#164
+  +#242#140#164#242#140#164#242#144#165#234#176#176#176#175#175#175#176#176#176
+  +#175#175#175#175#175#175#174#174#174#173#173#173#171#171#171#171#171#171#168
+  +#168#168#166#166#166#164#164#164#162#162#162#159#159#159#157#157#157#155#155
+  +#155#154#154#154#152#152#152#151#151#151#150#150#150#148#148#148#147#147#147
+  +#146#146#146#145#145#145#137#156#217#135#159#242#135#159#242#134#158#242#134
+  +#158#242#135#159#243#134#158#242#134#158#243#133#158#242#134#158#243#134#158
+  +#243#133#158#243#133#157#243#133#157#243#135#159#243#138#162#244#142#168#244
+  +#150#176#245#161#187#247#172#199#248#163#187#242'AJ'#204#6#5#184#6#5#184#6#5
+  +#184#6#5#184#6#5#184#6#5#184#6#5#184#6#5#184#6#5#184#6#5#184#6#5#184#6#5#184
+  +#6#5#184#6#5#184#6#5#184'6<'#200#163#187#241#174#201#248#163#188#246#152#177
+  +#244#146#170#243#141#164#243#138#162#242#140#162#242#148#170#243#159#183#245
+  +#177#202#248#197#223#251#6#5#184#6#5#184#6#5#184'8>'#201#187#211#249#179#195
+  +#225#170#182#215#164#175#211#162#172#210#171#176#195#172#177#196#173#178#196
+  +#177#180#189#183#183#183#183#183#183#183#183#183#183#183#183#184#184#184#184
+  +#184#184#184#184#184#184#184#184#185#186#186#188#189#189#191#193#193#196#200
+  +#200#200#205#205#202#208#208#202#208#208#199#204#204#195#198#198#190#192#192
+  +#186#187#187#184#184#184#183#183#183#184#184#184#184#184#184#184#184#184#184
+  +#184#184#184#184#184#186#186#186#186#186#186#186#186#186#187#187#187#188#188
+  +#188#189#189#189#189#189#189#191#191#191#191#191#191#191#191#191#193#193#193
+  +#193#193#193#194#194#194#195#195#195#196#196#196#196#196#196#197#197#197#198
+  +#198#198#198#198#198#199#199#199#200#200#200#201#201#201#204#205#205#208#210
+  +#210#213#217#217#221#227#227'Y\'#203#6#5#184#6#5#184#6#5#184#6#5#184#6#5#184
+  +#6#5#184#6#5#184#6#5#184#6#5#184#6#5#184'11'#194#216#221#232#225#228#228#222
+  +#224#224#219#220#220#217#217#217#218#218#218#218#218#218#219#219#219#220#220
+  +#220#220#220#220#222#222#222#223#223#223#224#224#224#224#224#224#225#225#225
+  +#225#225#225#226#226#226#227#227#227#228#228#228#228#228#228#228#228#228#229
+  +#229#229#230#230#230#231#231#231#231#231#231#231#231#231#231#231#231#232#232
+  +#232#233#233#233#233#233#233#234#234#234#234#234#234#234#234#234#235#235#235
+  +#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237
+  +#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#237#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  ,#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243
+  +#243#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#168#168#168#167#167#167#166#166#166#165#165#165#164#164#164
+  +#164#164#164#163#163#163#162#162#162#161#161#161#159#159#159#158#158#158#157
+  +#157#157#158#159#159#163#165#165#170#175#175#180#190#190#4#3#186#4#3#186#4#3
+  +#186#4#3#186#4#3#186#4#3#186#4#3#186#4#3#186#4#3#186#4#3#186'5;'#202'{'#139
+  +#226#187#213#249#178#203#247#167#193#246#159#183#244#152#177#243#148#171#243
+  +#145#168#242#143#167#242#143#167#242#143#167#242#143#166#242#143#166#242#143
+  +#166#242#143#166#243#142#166#242#142#166#242#142#166#243#141#165#242#141#165
+  +#242#141#165#242#141#165#242#141#164#242#141#164#242#141#165#243#141#164#243
+  +#141#164#243#162#171#201#176#176#176#176#176#176#176#176#176#175#175#175#175
+  +#175#175#174#174#174#173#173#173#171#171#171#170#170#170#168#168#168#166#166
+  +#166#163#163#163#160#160#160#158#158#158#156#156#156#155#155#155#154#154#154
+  +#152#152#152#151#151#151#150#150#150#148#148#148#148#148#148#145#148#158#136
+  +#159#237#136#160#243#136#160#243#136#160#243#135#159#242#135#159#243#135#159
+  +#243#135#159#243#135#159#243#134#159#243#134#159#243#134#158#243#134#158#243
+  +#134#158#243#133#158#243#135#160#243#138#162#244#142#167#244#149#174#245#158
+  +#184#246#167#195#248#178#205#249#142#163#234'@I'#206#4#3#186#4#3#186#4#3#186
+  +#4#3#186#4#3#186#4#3#186#4#3#186#4#3#186#4#3#186#4#3#186#4#3#186'@I'#206#142
+  +#164#234#179#206#249#169#195#248#160#185#246#151#176#245#145#168#244#141#164
+  +#244#139#162#243#139#161#242#142#165#243#149#172#244#162#186#245#178#204#248
+  +#198#224#251#4#3#186#4#3#186#4#3#186'6<'#202#184#209#248#168#191#246#155#177
+  +#244#148#169#243#146#166#242#147#167#242#147#167#242#148#168#242#149#168#242
+  +#150#169#242#150#169#241#151#170#241#157#173#230#160#174#227#161#174#227#161
+  +#175#227#170#179#212#171#180#213#173#183#215#184#189#200#192#194#194#194#197
+  +#197#195#198#198#195#199#199#193#196#196#190#193#193#188#189#189#186#186#186
+  +#184#185#185#185#185#185#184#184#184#185#185#185#185#185#185#185#185#185#186
+  +#186#186#186#186#186#187#187#187#187#187#187#188#188#188#189#189#189#190#190
+  +#190#190#190#190#191#191#191#191#191#191#192#192#192#194#194#194#195#195#195
+  +#195#195#195#195#195#195#196#196#196#197#197#197#199#199#199#199#199#199#200
+  +#200#200#200#200#200#201#201#201#202#202#202#204#204#204#207#208#208#211#214
+  +#214#217#221#221#222#228#228#143#147#216#18#18#189#4#3#186#4#3#186#4#3#186#4
+  +#3#186#4#3#186#4#3#186#4#3#186'ik'#209#215#220#231#226#229#229#222#224#224
+  +#220#222#222#219#219#219#218#219#219#219#219#219#220#220#220#220#220#220#221
+  +#221#221#221#221#221#222#222#222#223#223#223#224#224#224#224#224#224#225#225
+  +#225#225#225#225#226#226#226#227#227#227#229#229#229#229#229#229#229#229#229
+  +#229#229#229#231#231#231#231#231#231#232#232#232#232#232#232#233#233#233#233
+  +#233#233#234#234#234#235#235#235#235#235#235#235#235#235#235#235#235#236#236
+  +#236#236#236#236#237#237#237#237#237#237#237#237#237#237#237#237#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  ,#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#241#241#241#240#240#240#240#240#240#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#242#242#242#242#242#242#241#241#241#241#241#241#242#242
+  +#242#242#242#242#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247
+  +#247#247#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#169#169#169#167#167#167#166#166#166#166#166#166#165#165
+  +#165#164#164#164#163#163#163#162#162#162#161#161#161#160#160#160#159#159#159
+  +#157#157#157#158#159#159#160#162#162#165#169#169#172#179#179#136#144#190#142
+  +#151#197#145#158#209#147#167#234#148#167#234#147#166#234#146#165#234#145#165
+  +#234#156#177#238#189#215#249#184#210#249#179#204#248#172#197#247#164#189#246
+  +#158#182#245#152#176#244#149#172#244#145#169#243#144#168#243#144#168#243#144
+  +#167#243#144#167#243#144#167#243#143#167#243#143#167#243#144#167#243#143#166
+  +#243#143#167#243#143#167#243#142#166#243#142#166#243#142#166#243#142#165#243
+  +#142#166#243#142#165#243#141#165#243#141#165#243#141#165#243#146#166#235#176
+  +#176#176#176#176#176#176#176#176#176#176#176#175#175#175#175#175#175#174#174
+  +#174#172#172#172#171#171#171#169#169#169#166#166#166#164#164#164#162#162#162
+  +#159#159#159#157#157#157#156#156#156#154#154#154#153#153#153#152#152#152#148
+  +#154#174#143#156#202#139#159#225#137#161#244#137#161#244#136#160#243#136#161
+  +#244#136#160#243#136#160#244#135#159#243#136#160#244#136#160#244#135#160#244
+  +#135#159#244#135#159#244#135#159#244#135#159#244#134#159#244#134#158#244#134
+  +#158#244#135#160#244#138#162#244#141#166#245#147#172#245#153#179#246#161#187
+  +#247#169#196#248#177#205#249#173#199#246'w'#136#227'Vc'#216'3:'#204'3:'#204
+  +'4:'#204'4:'#204'3:'#204'Vc'#216'w'#137#227#173#199#246#178#205#249#171#198
+  +#248#164#189#247#156#180#246#149#173#245#145#168#244#140#164#244#138#161#243
+  +#138#161#243#139#162#243#142#166#244#151#174#245#164#187#246#25#27#196#3#2
+  +#188#3#2#188#3#2#188#3#2#188'49'#204#179#204#248#165#188#245#155#176#244#149
+  +#169#243#147#167#243#148#167#242#148#168#242#149#169#242#149#169#242#150#170
+  +#242#151#170#242#151#170#242#152#171#242#153#171#242#154#172#242#155#173#242
+  +#155#173#242#157#174#241#158#176#241#168#181#228#188#189#189#189#191#191#190
+  +#192#192#190#192#192#189#190#190#187#188#188#187#187#187#186#186#186#184#184
+  +#184#185#185#185#185#185#185#185#185#185#186#186#186#186#186#186#187#187#187
+  +#187#187#187#188#188#188#189#189#189#189#189#189#190#190#190#190#190#190#191
+  +#191#191#191#191#191#192#192#192#193#193#193#194#194#194#195#195#195#195#195
+  +#195#196#196#196#197#197#197#199#199#199#199#199#199#199#199#199#201#201#201
+  ,#201#201#201#202#202#202#203#203#203#205#205#205#206#207#207#209#210#210#213
+  +#215#215#217#220#220#222#226#226#211#217#228#144#148#218'gj'#210'<='#201'=>'
+  +#201'Z\'#208#131#134#216#201#206#229#227#232#232#225#228#228#222#224#224#221
+  +#222#222#219#220#220#219#219#219#218#218#218#220#220#220#221#221#221#222#222
+  +#222#222#222#222#222#222#222#223#223#223#224#224#224#225#225#225#226#226#226
+  +#226#226#226#227#227#227#227#227#227#228#228#228#229#229#229#229#229#229#229
+  +#229#229#230#230#230#231#231#231#232#232#232#232#232#232#233#233#233#233#233
+  +#233#233#233#233#235#235#235#236#236#236#236#236#236#236#236#236#236#236#236
+  +#237#237#237#237#237#237#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238
+  +#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#238#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#170#170#170#169#169#169#168#168#168#167#167#167
+  +#166#166#166#165#165#165#164#164#164#163#163#163#162#162#162#161#161#161#159
+  +#159#159#158#158#158#158#159#159#159#160#160#160#163#163#165#169#169#170#176
+  +#176#173#182#182#176#186#186#178#196#218#181#205#248#179#205#248#179#205#248
+  +#178#203#248#176#201#247#173#198#247#170#194#246#164#189#246#160#184#245#156
+  +#180#245#152#176#245#149#173#244#147#170#244#146#169#244#145#169#244#145#169
+  +#244#145#169#244#145#168#244#144#168#243#145#168#244#144#167#243#144#168#244
+  +#144#168#244#144#167#244#144#167#244#143#167#244#143#167#244#143#167#244#143
+  +#167#244#143#166#244#142#166#244#142#166#244#142#166#244#142#166#244#142#165
+  +#244#163#172#201#176#176#176#176#176#176#176#176#176#175#175#175#175#175#175
+  +#174#174#174#172#172#172#171#171#171#169#169#169#167#167#167#165#165#165#163
+  +#163#163#160#160#160#155#158#168#151#158#184#147#159#199#142#160#221#138#162
+  +#244#138#162#244#138#162#244#138#162#244#138#162#244#137#162#244#137#161#244
+  +#137#161#244#137#161#244#137#161#244#137#161#244#136#160#244#136#160#244#136
+  +#160#244#136#160#244#136#160#244#135#160#244#135#160#244#135#159#244#135#159
+  ,#244#135#159#244#134#159#244#135#161#244#137#161#244#140#164#245#144#168#245
+  +#148#174#246#154#180#247#160#186#247#165#192#248#170#197#249#174#201#249#177
+  +#204#249#178#206#249#179#207#250#179#207#249#177#205#249#175#202#249#172#199
+  +#249#168#193#248#161#187#247#156#181#247#151#176#246#145#170#245#143#166#245
+  +#140#163#244#138#161#244#138#161#244#139#161#244#140#163#244#143#166#245#152
+  +#174#245#162#185#246#132#150#233#1#1#190#1#1#190#1#1#190#1#1#190'06'#205#175
+  +#198#247#163#185#246#153#175#244#148#168#243#147#167#243#148#168#242#148#168
+  +#242#149#169#243#150#170#243#151#170#243#152#171#243#152#171#243#153#172#243
+  +#155#173#242#154#173#242#156#174#242#157#174#242#157#175#242#158#176#242#160
+  +#177#242#180#184#201#186#187#187#186#187#187#187#188#188#186#187#187#186#186
+  +#186#185#186#186#185#185#185#185#185#185#185#185#185#186#186#186#186#186#186
+  +#187#187#187#187#187#187#188#188#188#188#188#188#189#189#189#189#189#189#190
+  +#190#190#191#191#191#191#191#191#192#192#192#192#192#192#194#194#194#194#194
+  +#194#195#195#195#196#196#196#196#196#196#198#198#198#198#198#198#199#199#199
+  +#199#199#199#200#200#200#201#201#201#202#202#202#204#204#204#203#203#203#205
+  +#205#205#207#207#207#207#208#208#211#212#212#214#216#216#216#219#219#220#224
+  +#224#223#227#227#225#229#229#226#231#231#227#232#232#227#231#231#226#230#230
+  +#224#228#228#223#226#226#221#223#223#220#221#221#219#219#219#219#219#219#219
+  +#219#219#219#219#219#220#220#220#221#221#221#222#222#222#222#222#222#222#222
+  +#222#225#225#225#225#225#225#226#226#226#227#227#227#227#227#227#228#228#228
+  +#229#229#229#229#229#229#230#230#230#230#230#230#231#231#231#231#231#231#232
+  +#232#232#233#233#233#233#233#233#233#233#233#234#234#234#234#234#234#235#235
+  +#235#235#235#235#236#236#236#236#236#236#236#236#236#237#237#237#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#242#242#242#241#241#241#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#246#246#246#245#245#245#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  ,#247#171#171#171#170#170#170#169#169#169#168#168#168#167#167#167#166#166#166
+  +#165#165#165#164#164#164#163#163#163#162#162#162#161#161#161#159#159#159#158
+  +#158#158#158#159#159#158#159#159#159#161#161#161#165#165#162#167#167#163#168
+  +#168#163#170#170#166#187#232#166#190#246#165#189#246#164#188#246#163#187#246
+  +#160#185#246#158#182#245#155#180#245#153#177#245#150#175#244#149#172#244#148
+  +#171#244#147#170#244#146#170#244#146#170#244#146#170#244#146#169#244#146#169
+  +#244#145#169#244#145#169#244#145#169#244#145#168#244#145#168#244#145#168#244
+  +#144#168#244#144#168#244#144#168#244#144#167#244#143#167#244#143#167#244#143
+  +#167#244#143#167#244#143#166#244#143#166#244#142#166#244#147#167#236#176#176
+  +#176#176#176#176#176#176#176#175#175#175#175#175#175#174#174#174#173#173#173
+  +#172#172#172#162#168#188#157#166#196#153#165#205#146#164#224#141#164#239#140
+  +#164#245#139#163#244#139#163#244#139#163#244#139#163#244#139#163#245#139#163
+  +#245#139#163#245#138#162#245#138#162#245#138#162#245#138#162#245#138#162#245
+  +#137#162#245#137#161#245#137#161#245#137#161#245#137#161#245#137#161#245#136
+  +#161#245#136#160#245#136#160#245#136#160#245#136#160#245#135#160#245#135#159
+  +#245#135#159#245#136#160#245#136#161#245#138#163#245#140#165#246#143#168#246
+  +#147#172#246#151#176#247#154#180#247#157#183#248#159#185#247#161#187#248#162
+  +#188#248#162#188#248#160#186#248#159#185#248#155#181#247#152#178#247#150#174
+  +#246#145#170#246#143#167#245#140#165#244#140#163#244#139#162#244#139#161#244
+  +#139#161#244#139#162#244#141#163#244#144#167#244#149#172#245#157#181#246#168
+  +#192#247'dr'#224']i'#221'^j'#221'\i'#220'o~'#227#167#190#246#159#181#246#153
+  +#174#244#150#170#243#148#168#243#149#169#243#149#169#243#151#171#243#151#171
+  +#243#152#171#243#152#171#243#153#172#243#155#173#243#155#174#243#156#174#243
+  +#157#175#243#157#175#243#158#176#243#159#176#243#160#177#243#165#179#232#186
+  +#186#186#186#186#186#186#186#186#186#186#186#185#185#185#185#185#185#186#186
+  +#186#186#186#186#187#187#187#187#187#187#187#187#187#187#187#187#187#187#187
+  +#188#188#188#189#189#189#189#189#189#190#190#190#191#191#191#192#192#192#192
+  +#192#192#193#193#193#194#194#194#195#195#195#195#195#195#196#196#196#197#197
+  +#197#198#198#198#199#199#199#199#199#199#200#200#200#201#201#201#201#201#201
+  +#202#202#202#202#202#202#204#204#204#204#204#204#205#205#205#206#206#206#207
+  +#207#207#209#209#209#211#212#212#214#215#215#216#218#218#217#220#220#219#222
+  +#222#221#224#224#222#225#225#222#224#224#222#224#224#220#222#222#220#221#221
+  +#219#220#220#218#219#219#219#219#219#219#219#219#220#220#220#221#221#221#221
+  +#221#221#222#222#222#223#223#223#224#224#224#224#224#224#225#225#225#225#225
+  +#225#226#226#226#227#227#227#227#227#227#228#228#228#230#230#230#231#231#231
+  +#231#231#231#231#231#231#232#232#232#232#232#232#233#233#233#234#234#234#234
+  +#234#234#234#234#234#235#235#235#235#235#235#236#236#236#236#236#236#237#237
+  +#237#237#237#237#237#237#237#238#238#238#238#238#238#239#239#239#239#239#239
+  +#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239#239
+  +#239#239#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241#241
+  +#241#240#240#240#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#242#242#242#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  ,#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#173#173#173#171#171
+  +#171#170#170#170#169#169#169#168#168#168#167#167#167#166#166#166#165#165#165
+  +#164#164#164#162#162#162#161#161#161#160#160#160#158#158#158#158#158#158#156
+  +#157#157#156#157#157#156#157#157#155#157#157#154#156#156#154#156#156#153#158
+  +#166#156#178#239#156#179#245#154#179#245#153#178#245#152#177#245#151#175#244
+  +#150#174#245#149#172#244#149#172#245#148#171#245#148#171#245#147#171#245#147
+  +#171#245#147#170#245#147#170#245#146#170#245#146#170#245#146#170#245#146#169
+  +#245#146#169#245#146#169#245#145#169#245#145#169#245#145#169#245#145#168#245
+  +#145#168#245#144#168#245#144#168#245#144#168#245#144#168#245#144#167#245#143
+  +#167#245#143#167#245#143#167#245#143#167#245#160#171#210#163#172#202#159#171
+  +#210#159#171#210#150#168#227#150#167#227#142#165#245#141#165#245#141#165#245
+  +#141#165#245#141#165#245#140#164#245#140#164#245#140#164#245#140#164#245#140
+  +#164#245#140#164#245#139#163#245#140#164#245#140#164#245#139#163#245#139#163
+  +#245#139#163#245#139#163#245#138#163#245#138#162#245#138#162#245#138#162#245
+  +#138#162#245#138#162#245#137#161#245#137#161#245#137#161#245#137#161#245#137
+  +#161#245#136#161#245#136#161#245#136#160#245#136#160#245#136#160#245#135#160
+  +#245#135#160#245#136#160#245#136#161#245#138#162#245#140#164#246#140#166#246
+  +#142#167#246#144#169#246#146#171#246#147#172#246#148#173#246#148#173#246#147
+  +#171#246#146#171#246#144#169#246#143#167#246#141#166#246#140#164#245#139#162
+  +#245#140#163#245#138#162#245#139#162#245#140#162#245#139#162#245#140#163#245
+  +#140#163#245#143#166#245#148#170#245#153#177#245#159#183#246#167#191#247#172
+  +#196#248#174#197#248#172#195#248#167#190#247#161#182#246#155#177#245#152#172
+  +#245#149#170#244#148#169#244#150#170#244#150#170#244#151#171#243#153#172#244
+  +#153#172#243#153#172#243#155#173#244#155#174#244#156#174#244#157#175#244#158
+  +#176#243#158#176#243#159#177#243#160#177#243#160#178#243#162#179#243#176#182
+  +#207#185#185#185#186#186#186#186#186#186#186#186#186#186#186#186#186#186#186
+  +#186#186#186#187#187#187#187#187#187#187#187#187#188#188#188#189#189#189#189
+  +#189#189#189#189#189#190#190#190#190#190#190#192#192#192#192#192#192#193#193
+  +#193#193#193#193#194#194#194#195#195#195#196#196#196#197#197#197#197#197#197
+  +#199#199#199#199#199#199#200#200#200#201#201#201#202#202#202#203#203#203#203
+  +#203#203#204#204#204#205#205#205#205#205#205#206#206#206#207#207#207#207#207
+  +#207#209#210#210#210#210#210#211#212#212#213#214#214#214#215#215#216#217#217
+  +#217#218#218#217#218#218#217#219#219#218#219#219#217#218#218#217#218#218#219
+  +#219#219#218#219#219#219#219#219#220#220#220#221#221#221#222#222#222#222#222
+  +#222#223#223#223#224#224#224#225#225#225#225#225#225#226#226#226#226#226#226
+  +#228#228#228#228#228#228#228#228#228#229#229#229#230#230#230#231#231#231#231
+  +#231#231#231#231#231#232#232#232#233#233#233#233#233#233#234#234#234#234#234
+  +#234#234#234#234#235#235#235#237#237#237#237#237#237#238#238#238#238#238#238
+  +#238#238#238#238#238#238#239#239#239#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240
+  +#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#240#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  ,#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#243#243#243#242#242#242#242#242#242#242#242#242#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#244#244#244#243#243#243#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245
+  +#245#244#244#244#245#245#245#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#174#174#174#172#172#172
+  +#171#171#171#170#170#170#169#169#169#168#168#168#167#167#167#166#166#166#165
+  +#165#165#163#163#163#162#162#162#161#161#161#159#159#159#158#158#158#156#156
+  +#156#155#155#155#153#153#153#152#152#152#150#150#150#150#151#151#148#149#149
+  +#149#158#184#151#174#245#151#174#245#150#174#245#149#173#245#149#173#245#149
+  +#172#245#149#172#245#149#172#245#148#172#245#148#172#245#148#171#245#148#171
+  +#245#148#171#245#147#171#245#147#171#245#147#171#245#147#170#245#147#170#245
+  +#146#170#245#146#170#245#146#170#245#146#169#245#146#169#245#146#169#245#145
+  +#169#245#145#169#245#145#169#245#145#168#245#144#168#245#144#168#245#144#168
+  +#245#144#168#245#144#167#245#144#167#245#143#167#245#143#167#245#143#167#245
+  +#143#167#245#143#167#246#142#166#245#142#166#245#142#166#245#142#166#246#142
+  +#166#246#142#166#246#141#165#245#141#165#245#141#165#245#141#165#245#141#165
+  +#246#140#164#245#140#164#245#140#164#246#140#164#246#140#164#246#140#164#246
+  +#140#164#246#139#163#246#139#163#246#139#163#246#139#163#246#139#163#246#138
+  +#163#246#138#162#246#138#162#246#138#162#246#138#162#246#138#162#246#137#162
+  +#246#137#161#246#137#161#246#137#161#246#137#161#246#136#161#246#136#160#246
+  +#136#160#246#136#160#246#136#160#246#135#160#246#136#161#246#136#161#246#137
+  +#161#246#137#162#246#138#162#245#139#164#245#139#163#245#139#164#245#139#163
+  +#245#138#163#245#139#163#245#139#162#246#139#162#246#138#161#246#139#162#246
+  +#139#162#245#139#162#245#139#163#245#140#163#245#141#164#245#141#163#245#141
+  +#164#245#143#165#245#146#169#245#149#172#246#154#177#246#158#180#247#162#184
+  +#247#162#184#247#161#183#247#158#181#246#155#177#246#152#173#245#150#171#244
+  +#150#170#244#150#170#244#151#171#244#151#171#244#152#172#244#153#172#244#154
+  +#172#244#154#173#244#155#174#244#155#174#244#156#175#244#158#176#244#158#176
+  +#243#159#177#244#159#177#243#161#178#243#161#178#243#163#180#244#165#181#240
+  +#184#185#189#185#185#185#185#185#185#186#186#186#186#186#186#186#186#186#187
+  +#187#187#187#187#187#187#187#187#188#188#188#188#188#188#189#189#189#190#190
+  +#190#190#190#190#191#191#191#191#191#191#193#193#193#193#193#193#194#194#194
+  +#194#194#194#195#195#195#195#195#195#196#196#196#198#198#198#198#198#198#199
+  +#199#199#200#200#200#200#200#200#202#202#202#203#203#203#204#204#204#204#204
+  +#204#205#205#205#206#206#206#206#206#206#207#207#207#207#207#207#209#209#209
+  +#210#210#210#210#210#210#211#211#211#213#213#213#213#213#213#214#214#214#215
+  +#215#215#215#215#215#216#216#216#217#217#217#217#218#218#217#217#217#218#218
+  +#218#219#219#219#219#219#219#220#220#220#221#221#221#222#222#222#223#223#223
+  +#223#223#223#224#224#224#225#225#225#226#226#226#227#227#227#228#228#228#229
+  ,#229#229#229#229#229#229#229#229#230#230#230#231#231#231#232#232#232#232#232
+  +#232#232#232#232#233#233#233#234#234#234#234#234#234#235#235#235#235#235#235
+  +#236#236#236#236#236#236#237#237#237#237#237#237#238#238#238#238#238#238#238
+  +#238#238#238#238#238#239#239#239#239#239#239#240#240#240#240#240#240#240#240
+  +#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242#241#241#241#241
+  +#241#241#242#242#242#241#241#241#242#242#242#241#241#241#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#243#243#243#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245#244#244
+  +#244#244#244#244#245#245#245#244#244#244#244#244#244#245#245#245#244#244#244
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#176#176#176#174#174#174#173
+  +#173#173#171#171#171#170#170#170#169#169#169#167#167#167#167#167#167#166#166
+  +#166#164#164#164#163#163#163#162#162#162#160#160#160#159#159#159#157#157#157
+  +#155#155#155#154#154#154#152#152#152#150#150#150#150#150#150#148#148#148#147
+  +#147#147#149#163#208#150#174#246#150#174#246#150#173#246#150#173#246#150#173
+  +#246#149#173#246#149#173#246#149#173#246#149#172#246#149#172#246#149#172#246
+  +#148#172#246#148#172#246#148#171#246#148#171#246#147#171#246#147#171#246#147
+  +#171#246#147#170#246#147#170#246#147#170#246#146#170#246#146#170#246#146#170
+  +#246#146#169#246#146#169#246#145#169#246#145#169#246#145#169#246#145#169#246
+  +#145#168#246#144#168#246#144#168#246#144#168#246#144#168#246#144#167#246#144
+  +#167#246#143#167#246#143#167#246#143#167#246#143#166#246#143#166#246#143#167
+  +#245#142#166#246#142#166#246#142#166#246#142#166#246#141#165#246#141#165#246
+  +#141#165#245#141#165#246#141#165#246#141#165#246#141#165#246#141#165#246#140
+  +#164#246#140#164#246#140#164#246#140#164#246#139#164#246#139#163#246#139#163
+  +#246#139#163#246#139#163#246#139#163#246#138#162#246#138#162#246#138#162#246
+  +#138#162#246#138#162#246#137#162#246#137#162#246#137#161#246#137#161#246#137
+  +#161#246#136#161#246#136#161#246#136#160#246#136#160#246#136#160#246#136#160
+  +#246#136#160#246#136#160#246#136#160#246#136#160#246#137#161#246#137#161#246
+  +#137#161#246#138#161#246#138#161#246#138#162#246#138#162#246#139#162#246#140
+  +#163#245#140#163#245#140#163#245#141#164#246#142#164#246#142#165#246#143#165
+  ,#246#143#165#246#144#167#246#146#168#246#149#171#246#150#172#246#152#175#246
+  +#153#175#246#154#174#246#152#173#246#151#173#245#151#171#245#150#171#245#150
+  +#170#245#151#171#245#151#171#245#152#172#245#153#172#245#153#173#245#154#173
+  +#245#155#174#244#156#174#244#156#175#244#157#175#244#158#176#244#159#176#244
+  +#159#177#244#161#178#244#161#178#244#162#179#244#163#180#244#164#180#244#173
+  +#182#217#184#184#184#185#185#185#185#185#185#187#187#187#187#187#187#187#187
+  +#187#187#187#187#188#188#188#189#189#189#189#189#189#190#190#190#190#190#190
+  +#191#191#191#191#191#191#192#192#192#193#193#193#194#194#194#195#195#195#195
+  +#195#195#196#196#196#196#196#196#197#197#197#198#198#198#199#199#199#200#200
+  +#200#200#200#200#201#201#201#202#202#202#203#203#203#204#204#204#204#204#204
+  +#205#205#205#206#206#206#207#207#207#208#208#208#208#208#208#209#209#209#210
+  +#210#210#211#211#211#212#212#212#213#213#213#213#213#213#215#215#215#215#215
+  +#215#216#216#216#216#216#216#218#218#218#218#218#218#218#218#218#220#220#220
+  +#220#220#220#221#221#221#222#222#222#222#222#222#223#223#223#223#223#223#224
+  +#224#224#225#225#225#226#226#226#226#226#226#227#227#227#228#228#228#229#229
+  +#229#229#229#229#230#230#230#230#230#230#231#231#231#232#232#232#232#232#232
+  +#232#232#232#234#234#234#235#235#235#235#235#235#236#236#236#236#236#236#237
+  +#237#237#237#237#237#238#238#238#238#238#238#239#239#239#239#239#239#239#239
+  +#239#239#239#239#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#241#241#241#241#241#242#242#242#241#241#241#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#176#176#176#175#175#175#174#174
+  +#174#172#172#172#171#171#171#170#170#170#169#169#169#168#168#168#167#167#167
+  +#166#166#166#165#165#165#163#163#163#162#162#162#160#160#160#159#159#159#157
+  +#157#157#156#156#156#154#154#154#152#152#152#151#151#151#150#150#150#148#148
+  +#148#147#148#153#150#169#227#151#174#246#151#174#246#150#174#246#150#174#246
+  ,#150#174#246#150#173#246#150#173#246#150#173#246#149#173#246#149#173#246#149
+  +#172#246#149#172#246#149#172#246#148#172#246#148#172#246#148#172#246#148#171
+  +#246#148#171#246#147#171#246#147#171#246#147#171#246#147#170#246#147#170#246
+  +#147#170#246#146#170#246#146#170#246#146#170#246#146#169#246#145#169#246#145
+  +#169#246#145#169#246#145#169#246#145#168#246#145#168#246#144#168#246#144#168
+  +#246#144#168#246#144#168#246#144#167#246#143#167#246#143#167#246#143#167#246
+  +#143#167#246#143#166#246#142#166#246#143#167#246#142#166#246#142#166#246#142
+  +#166#246#141#165#246#142#166#247#142#166#247#141#165#247#141#165#247#141#165
+  +#247#141#165#247#141#165#247#140#164#247#140#164#247#140#164#247#140#164#247
+  +#140#164#247#139#164#247#139#163#247#139#163#247#139#163#247#139#163#247#139
+  +#163#247#138#163#247#138#162#247#138#162#247#138#162#247#138#162#247#137#162
+  +#247#137#161#247#137#161#247#137#161#247#137#161#247#136#161#247#136#161#247
+  +#137#161#246#136#161#246#137#161#246#137#161#246#138#162#246#138#161#246#138
+  +#162#246#139#162#246#138#162#246#139#162#246#140#163#246#139#163#246#140#163
+  +#246#141#164#246#140#163#246#141#164#246#142#165#246#143#165#246#144#166#246
+  +#143#165#246#144#166#246#145#167#246#146#168#246#147#169#246#149#170#246#150
+  +#170#246#150#171#246#149#170#246#150#170#246#149#170#246#150#170#246#151#171
+  +#246#151#172#245#152#172#245#153#172#245#154#173#245#154#173#245#155#174#245
+  +#156#175#245#157#175#245#158#176#245#158#176#245#158#177#245#159#177#245#161
+  +#178#245#162#179#245#162#180#245#163#180#244#164#181#244#165#181#244#165#182
+  +#244#179#183#199#184#184#184#185#185#185#185#185#185#186#186#186#187#187#187
+  +#187#187#187#188#188#188#189#189#189#190#190#190#191#191#191#191#191#191#192
+  +#192#192#192#192#192#193#193#193#194#194#194#195#195#195#195#195#195#197#197
+  +#197#197#197#197#198#198#198#199#199#199#199#199#199#200#200#200#201#201#201
+  +#201#201#201#202#202#202#203#203#203#204#204#204#205#205#205#205#205#205#206
+  +#206#206#207#207#207#207#207#207#209#209#209#209#209#209#210#210#210#211#211
+  +#211#211#211#211#212#212#212#213#213#213#214#214#214#215#215#215#216#216#216
+  +#215#215#215#217#217#217#218#218#218#218#218#218#219#219#219#221#221#221#221
+  +#221#221#222#222#222#222#222#222#224#224#224#224#224#224#225#225#225#225#225
+  +#225#226#226#226#227#227#227#227#227#227#228#228#228#229#229#229#230#230#230
+  +#230#230#230#231#231#231#231#231#231#232#232#232#233#233#233#233#233#233#234
+  +#234#234#234#234#234#235#235#235#236#236#236#236#236#236#236#236#236#237#237
+  +#237#238#238#238#238#238#238#238#238#238#239#239#239#239#239#239#239#239#239
+  +#240#240#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#241
+  +#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  ,#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#178#178#178#177#177#177#176#176#176
+  +#175#175#175#172#172#172#171#171#171#170#170#170#169#169#169#168#168#168#167
+  +#167#167#165#165#165#165#165#165#163#163#163#162#162#162#160#160#160#159#159
+  +#159#156#156#156#155#155#155#153#153#153#152#152#152#151#151#151#150#150#150
+  +#149#149#149#149#153#166#151#173#241#151#175#247#151#175#247#151#174#247#151
+  +#174#247#151#174#247#150#174#247#150#174#247#150#174#247#150#173#247#150#173
+  +#247#150#173#247#149#173#247#149#173#247#149#172#247#149#172#247#148#172#247
+  +#148#172#247#148#172#247#148#171#247#148#171#247#148#171#247#147#171#247#147
+  +#171#247#147#171#247#147#170#247#147#170#247#146#170#247#146#170#247#146#170
+  +#247#146#170#247#146#169#247#145#169#247#145#169#247#145#169#247#145#169#247
+  +#145#168#247#145#168#247#144#168#247#144#168#247#144#168#247#144#167#247#144
+  +#167#247#143#167#247#143#167#247#143#167#247#143#167#247#142#166#247#142#166
+  +#247#142#166#247#142#166#247#142#166#247#142#166#247#142#166#247#142#166#247
+  +#142#166#247#141#165#247#141#165#247#141#165#247#140#164#247#140#164#247#140
+  +#164#247#140#164#247#140#164#247#139#163#247#140#164#247#139#163#247#139#163
+  +#247#139#163#247#139#163#247#139#163#247#138#163#247#138#163#247#138#162#247
+  +#138#162#247#138#162#247#137#162#247#137#162#247#137#161#247#137#161#247#137
+  +#162#247#137#161#247#138#162#247#138#161#247#138#162#247#139#163#247#139#162
+  +#247#139#163#247#139#163#247#139#163#247#140#164#247#140#164#247#141#164#247
+  +#141#164#246#141#164#246#142#164#246#143#165#246#143#166#246#144#166#246#145
+  +#167#246#145#167#246#145#167#246#145#167#246#147#168#247#148#169#246#148#169
+  +#246#148#169#246#150#170#246#149#170#246#150#171#246#151#171#246#151#171#246
+  +#152#172#246#152#172#245#154#173#246#154#173#245#155#174#246#157#175#246#157
+  +#176#246#157#176#246#159#177#246#159#177#246#160#178#245#161#179#245#162#179
+  +#245#163#180#245#163#180#245#164#181#245#164#181#245#165#182#245#167#183#245
+  +#170#184#237#183#184#188#185#185#185#185#185#185#186#186#186#187#187#187#188
+  +#188#188#188#188#188#189#189#189#190#190#190#190#190#190#191#191#191#192#192
+  +#192#192#192#192#194#194#194#194#194#194#195#195#195#195#195#195#196#196#196
+  +#197#197#197#199#199#199#199#199#199#200#200#200#201#201#201#201#201#201#203
+  +#203#203#203#203#203#204#204#204#205#205#205#205#205#205#207#207#207#207#207
+  +#207#208#208#208#209#209#209#209#209#209#210#210#210#211#211#211#212#212#212
+  +#212#212#212#214#214#214#214#214#214#215#215#215#216#216#216#216#216#216#217
+  +#217#217#218#218#218#219#219#219#219#219#219#220#220#220#221#221#221#221#221
+  +#221#222#222#222#223#223#223#224#224#224#224#224#224#225#225#225#226#226#226
+  +#227#227#227#227#227#227#227#227#227#228#228#228#230#230#230#231#231#231#231
+  +#231#231#232#232#232#231#231#231#233#233#233#234#234#234#234#234#234#235#235
+  +#235#236#236#236#236#236#236#237#237#237#237#237#237#237#237#237#238#238#238
+  +#238#238#238#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240#241
+  +#241#241#241#241#241#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242
+  +#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#242#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#243#243#243
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  ,#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#246#246#246#245#245#245#246#246#246#245#245#245#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#179#179#179#178#178#178#176#176#176#175
+  +#175#175#175#175#175#172#172#172#171#171#171#170#170#170#169#169#169#168#168
+  +#168#166#166#166#165#165#165#164#164#164#162#162#162#161#161#161#160#160#160
+  +#158#158#158#157#157#157#154#154#154#153#153#153#152#152#152#151#151#151#150
+  +#150#150#149#149#149#150#159#185#152#175#247#152#175#247#152#175#247#151#175
+  +#247#151#175#247#151#175#247#151#174#247#151#174#247#151#174#247#150#174#247
+  +#150#174#247#150#173#247#150#173#247#150#173#247#149#173#247#149#173#247#149
+  +#173#247#149#172#247#149#172#247#148#172#247#148#172#247#148#172#247#148#171
+  +#247#148#171#247#148#171#247#147#171#247#147#171#247#147#171#247#147#170#247
+  +#146#170#247#146#170#247#146#170#247#146#170#247#146#169#247#146#169#247#145
+  +#169#247#145#169#247#145#169#247#145#169#247#145#168#247#144#168#247#144#168
+  +#247#144#168#247#144#168#247#144#167#247#143#167#247#143#167#247#143#167#247
+  +#143#167#247#143#167#247#143#167#248#142#166#247#142#166#247#142#166#247#142
+  +#166#247#142#166#247#141#165#247#141#165#247#141#165#248#141#165#247#141#165
+  +#248#140#164#247#141#165#248#140#164#247#140#164#247#140#164#247#139#163#247
+  +#140#164#248#140#164#248#139#164#248#139#163#248#139#163#248#139#163#248#139
+  +#163#248#138#163#248#138#162#248#138#162#248#138#162#248#138#162#248#138#162
+  +#247#138#162#247#139#162#247#138#162#247#139#163#247#139#163#247#139#163#247
+  +#140#163#247#140#163#247#140#164#247#141#164#247#142#165#247#142#165#247#142
+  +#165#247#143#165#247#143#165#247#143#166#247#144#166#247#144#167#247#145#167
+  +#247#145#167#247#146#167#247#146#168#247#147#169#247#148#169#246#149#169#246
+  +#149#170#246#150#170#246#151#171#246#152#172#247#151#171#246#151#172#246#153
+  +#173#247#154#173#246#155#174#246#155#174#246#156#175#246#156#176#246#158#176
+  +#246#157#176#246#160#178#246#160#178#246#161#179#246#162#180#246#162#180#246
+  +#163#181#246#164#181#246#165#182#246#165#182#246#167#183#246#168#184#246#169
+  +#184#246#178#184#207#185#185#185#186#186#186#187#187#187#187#187#187#188#188
+  +#188#189#189#189#189#189#189#190#190#190#191#191#191#192#192#192#193#193#193
+  +#193#193#193#194#194#194#195#195#195#196#196#196#196#196#196#197#197#197#198
+  +#198#198#199#199#199#199#199#199#200#200#200#202#202#202#202#202#202#203#203
+  +#203#203#203#203#204#204#204#205#205#205#206#206#206#207#207#207#208#208#208
+  +#208#208#208#209#209#209#210#210#210#210#210#210#211#211#211#213#213#213#214
+  +#214#214#215#215#215#215#215#215#216#216#216#217#217#217#217#217#217#218#218
+  +#218#219#219#219#220#220#220#220#220#220#221#221#221#222#222#222#222#222#222
+  +#223#223#223#224#224#224#225#225#225#225#225#225#226#226#226#227#227#227#228
+  +#228#228#228#228#228#229#229#229#229#229#229#230#230#230#231#231#231#231#231
+  +#231#232#232#232#232#232#232#234#234#234#234#234#234#234#234#234#235#235#235
+  +#236#236#236#236#236#236#237#237#237#237#237#237#237#237#237#238#238#238#239
+  +#239#239#239#239#239#240#240#240#240#240#240#240#240#240#240#240#240#241#241
+  +#241#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  ,#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244#243#243#243#243
+  +#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#245#245#245#244#244#244#245#245
+  +#245#244#244#244#245#245#245#244#244#244#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#181#181#181#179#179#179#178#178#178#177#177
+  +#177#175#175#175#174#174#174#172#172#172#171#171#171#170#170#170#169#169#169
+  +#168#168#168#167#167#167#166#166#166#164#164#164#163#163#163#161#161#161#159
+  +#159#159#158#158#158#156#156#156#155#155#155#154#154#154#152#152#152#151#151
+  +#151#150#150#150#149#149#149#150#164#203#153#176#248#152#175#247#152#176#248
+  +#152#175#248#152#175#248#152#175#248#151#175#248#151#175#248#151#175#248#151
+  +#174#248#151#174#248#151#174#248#150#174#248#150#174#248#150#173#248#150#173
+  +#248#149#173#248#149#173#248#149#173#248#149#172#248#149#173#247#149#172#248
+  +#148#172#248#148#172#248#148#172#248#148#171#248#148#171#248#147#171#248#147
+  +#171#248#147#171#248#147#171#248#147#170#248#146#170#248#146#170#248#146#170
+  +#248#146#170#248#146#169#248#146#169#248#145#169#248#145#169#248#145#169#248
+  +#145#168#248#145#168#248#144#168#248#144#168#248#144#168#248#144#168#248#143
+  +#167#248#143#167#248#143#167#248#143#167#248#143#167#248#143#167#248#142#166
+  +#248#142#166#248#142#166#248#142#166#248#142#166#248#141#165#248#141#165#248
+  +#141#165#248#141#165#248#141#165#248#140#165#248#140#164#248#140#164#248#140
+  +#164#248#140#164#248#140#164#248#139#164#248#140#164#248#139#164#248#139#164
+  +#248#139#163#248#139#163#248#139#163#248#138#163#248#138#163#248#139#163#248
+  +#139#163#248#139#163#248#140#164#248#140#164#248#140#164#248#140#164#248#141
+  +#164#248#141#164#248#141#164#248#142#165#248#142#165#248#142#165#248#143#166
+  +#248#143#166#247#143#166#247#144#167#247#145#167#247#145#167#247#146#168#247
+  +#147#168#247#147#168#247#147#169#247#148#169#247#148#170#247#149#170#247#150
+  +#171#247#150#171#247#151#172#247#152#172#247#152#172#247#153#173#247#154#174
+  +#247#154#173#247#156#175#246#155#175#246#156#175#246#157#176#246#158#177#246
+  +#159#177#246#160#178#246#160#179#246#161#179#246#162#180#246#163#180#246#163
+  ,#181#246#164#181#246#165#182#246#166#183#246#167#184#246#168#184#246#170#185
+  +#242#183#184#188#185#185#185#186#186#186#188#188#188#188#188#188#188#188#188
+  +#189#189#189#190#190#190#192#192#192#192#192#192#193#193#193#194#194#194#194
+  +#194#194#195#195#195#196#196#196#197#197#197#198#198#198#198#198#198#199#199
+  +#199#200#200#200#201#201#201#202#202#202#202#202#202#203#203#203#204#204#204
+  +#204#204#204#206#206#206#206#206#206#207#207#207#208#208#208#208#208#208#209
+  +#209#209#210#210#210#210#210#210#211#211#211#212#212#212#213#213#213#214#214
+  +#214#215#215#215#215#215#215#216#216#216#217#217#217#218#218#218#218#218#218
+  +#219#219#219#220#220#220#220#220#220#221#221#221#222#222#222#223#223#223#223
+  +#223#223#224#224#224#225#225#225#225#225#225#227#227#227#227#227#227#229#229
+  +#229#228#228#228#230#230#230#230#230#230#232#232#232#231#231#231#232#232#232
+  +#232#232#232#233#233#233#235#235#235#235#235#235#235#235#235#236#236#236#237
+  +#237#237#238#238#238#238#238#238#238#238#238#238#238#238#239#239#239#240#240
+  +#240#240#240#240#241#241#241#241#241#241#241#241#241#241#241#241#242#242#242
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243
+  +#243#243#243#243#243#243#243#243#243#243#243#243#243#243#243#244#244#244#243
+  +#243#243#244#244#244#243#243#243#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#244#244#244#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246#245
+  +#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#182#182#182#181#181#181#180#180#180#178#178#178
+  +#176#176#176#175#175#175#174#174#174#173#173#173#171#171#171#170#170#170#169
+  +#169#169#168#168#168#167#167#167#165#165#165#164#164#164#162#162#162#161#161
+  +#161#159#159#159#158#158#158#156#156#156#155#155#155#154#154#154#152#152#152
+  +#152#152#152#151#151#151#150#150#150#152#168#217#153#176#248#153#176#248#153
+  +#176#248#152#176#248#152#176#248#152#176#248#152#175#248#152#175#248#152#175
+  +#248#151#175#248#151#175#248#151#174#248#151#174#248#151#174#248#150#174#248
+  +#150#174#248#150#174#248#150#173#248#150#173#248#149#173#248#149#173#248#149
+  +#173#248#149#172#248#149#172#248#149#172#248#148#172#248#148#172#248#148#172
+  ,#248#148#171#248#147#171#248#147#171#248#147#171#248#147#171#248#147#170#248
+  +#147#170#248#146#170#248#146#170#248#146#170#248#146#170#248#146#169#248#145
+  +#169#248#145#169#248#145#169#248#145#169#248#145#168#248#144#168#248#144#168
+  +#248#144#168#248#144#168#248#144#168#248#143#167#248#143#167#248#143#167#248
+  +#143#167#248#143#167#248#143#167#248#142#166#248#142#166#248#142#166#248#142
+  +#166#248#141#166#248#141#165#248#141#165#248#141#165#248#141#165#248#141#165
+  +#248#140#164#248#140#164#248#140#164#248#140#164#248#140#164#248#139#164#248
+  +#139#164#248#139#163#248#139#163#248#139#163#248#139#163#248#139#163#248#139
+  +#163#248#139#163#248#139#163#248#141#164#248#140#164#248#140#164#248#141#165
+  +#248#141#165#248#142#165#248#142#166#248#143#166#248#144#166#248#144#166#248
+  +#144#167#248#145#167#248#145#167#248#146#168#248#146#168#248#147#169#248#147
+  +#169#248#147#169#248#149#170#248#148#170#248#149#170#248#150#171#248#151#171
+  +#248#151#172#247#152#173#247#153#173#247#153#173#247#154#174#247#155#174#247
+  +#155#175#247#156#175#247#157#176#247#157#177#247#158#177#247#159#178#247#160
+  +#178#247#161#179#247#161#179#247#162#180#247#163#180#247#164#182#247#164#182
+  +#247#165#182#246#166#183#246#167#184#246#168#184#246#169#185#246#176#184#215
+  +#184#184#184#185#185#185#186#186#186#187#187#187#188#188#188#189#189#189#189
+  +#189#189#191#191#191#192#192#192#192#192#192#193#193#193#194#194#194#194#194
+  +#194#195#195#195#197#197#197#197#197#197#198#198#198#198#198#198#199#199#199
+  +#201#201#201#201#201#201#202#202#202#203#203#203#203#203#203#204#204#204#204
+  +#204#204#207#207#207#207#207#207#208#208#208#209#209#209#209#209#209#210#210
+  +#210#211#211#211#211#211#211#213#213#213#214#214#214#214#214#214#215#215#215
+  +#216#216#216#216#216#216#217#217#217#218#218#218#218#218#218#219#219#219#220
+  +#220#220#221#221#221#221#221#221#222#222#222#223#223#223#224#224#224#224#224
+  +#224#226#226#226#226#226#226#227#227#227#227#227#227#228#228#228#229#229#229
+  +#229#229#229#230#230#230#231#231#231#232#232#232#232#232#232#233#233#233#233
+  +#233#233#234#234#234#235#235#235#235#235#235#235#235#235#236#236#236#237#237
+  +#237#237#237#237#238#238#238#238#238#238#238#238#238#239#239#239#240#240#240
+  +#240#240#240#241#241#241#241#241#241#241#241#241#243#243#243#242#242#242#243
+  +#243#243#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#245#245#245
+  +#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  ,#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#184#184#184#182#182#182#181#181#181#180#180#180#178
+  +#178#178#176#176#176#175#175#175#175#175#175#172#172#172#171#171#171#170#170
+  +#170#169#169#169#167#167#167#167#167#167#166#166#166#164#164#164#163#163#163
+  +#161#161#161#160#160#160#158#158#158#156#156#156#155#155#155#154#154#154#152
+  +#152#152#151#151#151#151#151#151#150#151#156#153#172#230#154#177#249#153#176
+  +#248#153#177#249#153#176#249#152#176#248#152#176#248#152#175#248#152#176#249
+  +#152#175#248#152#175#249#152#175#249#151#174#248#151#174#248#151#174#248#151
+  +#174#249#150#174#248#150#174#249#150#174#249#150#173#248#150#173#249#150#173
+  +#249#149#173#248#149#172#248#149#173#249#149#173#249#149#172#249#149#172#249
+  +#148#172#249#148#172#249#148#172#249#148#172#249#148#171#249#147#171#249#147
+  +#171#249#147#171#249#147#171#249#147#170#249#147#170#249#146#170#249#146#170
+  +#249#146#170#249#146#169#249#146#169#249#145#169#249#145#169#249#145#169#249
+  +#145#169#249#144#168#249#144#168#249#144#168#249#144#168#249#144#168#249#144
+  +#168#249#143#167#249#143#167#249#143#167#249#143#167#249#143#167#249#142#166
+  +#249#142#166#249#142#166#249#142#166#249#142#166#249#141#166#249#141#165#249
+  +#141#165#249#141#165#249#141#165#249#141#165#249#140#165#249#140#164#249#140
+  +#164#249#140#164#249#140#164#249#139#164#249#140#164#248#139#164#248#140#164
+  +#248#140#164#248#141#165#248#141#165#248#141#165#248#142#165#248#142#165#248
+  +#142#165#248#143#166#248#143#166#248#143#166#248#144#167#248#144#166#248#144
+  +#167#248#146#168#249#146#168#248#146#168#248#146#168#248#147#169#248#148#169
+  +#248#148#170#248#149#170#248#149#170#248#149#170#248#150#171#248#151#172#248
+  +#152#173#248#153#173#248#153#173#247#153#173#247#154#174#247#155#174#247#156
+  +#176#248#156#176#247#158#177#248#158#177#248#159#178#248#160#178#248#160#179
+  +#247#161#180#247#162#180#247#163#181#247#163#181#247#164#182#247#166#183#247
+  +#167#184#247#167#184#247#168#185#247#169#185#247#169#186#247#182#184#192#185
+  +#185#185#186#186#186#187#187#187#188#188#188#189#189#189#189#189#189#191#191
+  +#191#192#192#192#192#192#192#193#193#193#194#194#194#194#194#194#195#195#195
+  +#197#197#197#198#198#198#198#198#198#199#199#199#199#199#199#200#200#200#201
+  +#201#201#202#202#202#203#203#203#204#204#204#204#204#204#205#205#205#206#206
+  +#206#207#207#207#207#207#207#208#208#208#209#209#209#209#209#209#211#211#211
+  +#212#212#212#212#212#212#213#213#213#214#214#214#214#214#214#215#215#215#216
+  +#216#216#216#216#216#217#217#217#218#218#218#219#219#219#219#219#219#222#222
+  +#222#221#221#221#222#222#222#222#222#222#224#224#224#224#224#224#224#224#224
+  +#226#226#226#226#226#226#226#226#226#227#227#227#229#229#229#229#229#229#230
+  +#230#230#231#231#231#232#232#232#232#232#232#233#233#233#234#234#234#234#234
+  +#234#235#235#235#236#236#236#236#236#236#236#236#236#237#237#237#238#238#238
+  +#238#238#238#239#239#239#239#239#239#240#240#240#240#240#240#241#241#241#241
+  +#241#241#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244#244
+  +#244#244#244#244#244#245#245#245#244#244#244#245#245#245#244#244#244#244#244
+  +#244#244#244#244#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#245
+  +#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  ,#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#185#185#185#184#184#184#182#182#182#181#181#181#180#180
+  +#180#178#178#178#177#177#177#175#175#175#174#174#174#172#172#172#171#171#171
+  +#170#170#170#169#169#169#168#168#168#167#167#167#165#165#165#164#164#164#162
+  +#162#162#161#161#161#160#160#160#158#158#158#156#156#156#155#155#155#154#154
+  +#154#153#153#153#152#152#152#151#151#151#151#154#163#154#176#243#154#177#249
+  +#153#177#249#153#177#249#153#176#249#153#176#249#153#176#249#152#176#249#152
+  +#176#249#152#176#249#152#175#249#152#175#249#152#175#249#152#175#249#151#175
+  +#249#151#174#249#151#175#249#151#175#249#151#174#249#150#174#249#150#173#249
+  +#150#173#249#150#173#249#150#173#249#149#173#249#150#173#249#149#173#248#149
+  +#173#249#149#173#249#149#172#249#148#172#249#148#172#249#148#171#249#148#172
+  +#249#147#171#249#148#171#249#147#171#249#147#170#249#147#171#249#147#171#249
+  +#147#170#249#146#170#249#146#170#249#146#170#249#146#170#249#146#169#249#145
+  +#169#249#145#169#249#145#169#249#145#169#249#145#169#249#144#168#249#144#168
+  +#249#144#168#249#144#168#249#144#168#249#144#168#249#143#167#249#143#167#249
+  +#143#167#249#143#167#249#142#167#249#142#166#249#142#166#249#142#166#249#142
+  +#166#249#142#166#249#141#165#249#141#165#249#141#165#249#141#165#249#141#165
+  +#249#140#165#249#140#165#249#140#164#249#140#165#249#140#164#249#141#165#249
+  +#141#165#249#142#165#249#141#165#249#142#166#249#143#166#249#142#166#249#143
+  +#166#249#143#167#249#144#167#249#144#167#249#145#167#249#145#168#249#145#168
+  +#249#146#168#249#147#169#248#147#169#248#147#169#248#148#170#248#148#170#248
+  +#149#171#248#149#171#248#149#171#248#151#172#248#151#172#248#152#172#248#152
+  +#173#248#153#173#248#154#174#248#154#174#248#155#175#248#156#175#248#156#176
+  +#248#157#176#248#158#177#248#158#177#248#159#178#248#161#179#247#161#179#247
+  +#161#180#247#162#180#247#164#181#247#164#182#247#165#183#247#166#183#247#167
+  +#184#247#168#185#248#168#185#247#170#187#248#176#186#223#184#184#184#185#185
+  +#185#186#186#186#187#187#187#188#188#188#189#189#189#190#190#190#192#192#192
+  +#192#192#192#192#192#192#193#193#193#194#194#194#195#195#195#197#197#197#197
+  +#197#197#198#198#198#199#199#199#200#200#200#200#200#200#202#202#202#202#202
+  +#202#203#203#203#204#204#204#205#205#205#206#206#206#206#206#206#207#207#207
+  +#208#208#208#208#208#208#209#209#209#210#210#210#211#211#211#212#212#212#212
+  +#212#212#213#213#213#214#214#214#215#215#215#215#215#215#216#216#216#217#217
+  +#217#217#217#217#219#219#219#219#219#219#220#220#220#221#221#221#222#222#222
+  +#222#222#222#223#223#223#224#224#224#224#224#224#225#225#225#226#226#226#227
+  +#227#227#227#227#227#228#228#228#229#229#229#229#229#229#230#230#230#230#230
+  +#230#231#231#231#232#232#232#232#232#232#233#233#233#233#233#233#234#234#234
+  +#235#235#235#236#236#236#236#236#236#237#237#237#237#237#237#238#238#238#239
+  +#239#239#239#239#239#239#239#239#240#240#240#241#241#241#241#241#241#242#242
+  +#242#242#242#242#242#242#242#242#242#242#243#243#243#243#243#243#244#244#244
+  +#244#244#244#245#245#245#244#244#244#245#245#245#244#244#244#244#244#244#245
+  +#245#245#245#245#245#244#244#244#244#244#244#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  ,#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#246#246#246#245#245#245#246#246
+  +#246#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#187#187#187#185#185#185#184#184#184#182#182#182#181#181#181
+  +#180#180#180#178#178#178#177#177#177#175#175#175#174#174#174#172#172#172#171
+  +#171#171#170#170#170#169#169#169#168#168#168#167#167#167#165#165#165#164#164
+  +#164#162#162#162#161#161#161#160#160#160#158#158#158#157#157#157#156#156#156
+  +#154#154#154#153#153#153#152#152#152#152#152#152#152#156#170#154#176#243#154
+  +#177#249#154#177#249#154#177#249#153#177#249#153#177#249#153#177#249#153#176
+  +#249#153#176#249#153#176#249#152#176#249#152#176#249#152#175#249#152#175#249
+  +#152#175#249#151#175#249#151#175#249#151#175#249#151#174#249#151#174#249#150
+  +#174#249#150#174#249#150#174#249#150#173#249#150#173#249#150#173#249#149#173
+  +#249#149#173#249#149#173#249#149#172#249#148#172#249#148#172#249#148#172#249
+  +#148#172#249#148#172#249#148#171#249#147#171#249#147#171#249#147#171#249#147
+  +#171#249#147#171#249#146#170#249#146#170#249#146#170#249#146#170#249#146#169
+  +#249#145#169#249#145#169#249#145#169#250#145#169#249#145#169#249#144#168#249
+  +#144#168#249#145#169#250#144#168#250#144#168#250#144#168#250#143#167#249#143
+  +#167#249#143#167#249#143#167#249#143#167#250#142#166#249#142#166#249#142#166
+  +#249#142#166#249#142#166#250#141#165#249#141#165#249#141#165#249#141#165#249
+  +#141#165#249#140#165#249#141#165#249#141#165#249#141#165#249#141#165#249#141
+  +#165#249#142#166#249#142#166#249#142#166#249#143#167#249#143#166#249#144#167
+  +#249#144#167#249#145#168#249#145#168#249#146#168#249#146#169#249#146#169#249
+  +#146#169#249#147#169#249#148#170#249#148#170#249#149#171#249#149#171#249#150
+  +#171#249#150#172#249#151#172#249#152#173#249#153#173#249#152#173#249#154#174
+  +#249#153#174#249#155#175#248#155#175#248#156#176#248#156#176#248#157#177#248
+  +#158#177#248#159#178#248#159#178#248#161#179#248#161#179#248#161#180#248#163
+  +#181#248#164#182#248#164#182#248#165#183#248#166#183#248#167#184#248#168#184
+  +#248#168#185#248#169#186#248#170#187#248#181#183#191#185#185#185#186#186#186
+  +#186#186#186#187#187#187#189#189#189#190#190#190#190#190#190#192#192#192#192
+  +#192#192#193#193#193#194#194#194#195#195#195#196#196#196#197#197#197#198#198
+  +#198#199#199#199#199#199#199#201#201#201#201#201#201#202#202#202#203#203#203
+  ,#203#203#203#204#204#204#205#205#205#206#206#206#207#207#207#207#207#207#208
+  +#208#208#209#209#209#210#210#210#211#211#211#211#211#211#212#212#212#213#213
+  +#213#213#213#213#214#214#214#215#215#215#216#216#216#218#218#218#218#218#218
+  +#219#219#219#219#219#219#220#220#220#221#221#221#221#221#221#222#222#222#223
+  +#223#223#223#223#223#224#224#224#225#225#225#225#225#225#226#226#226#227#227
+  +#227#228#228#228#229#229#229#230#230#230#230#230#230#231#231#231#232#232#232
+  +#233#233#233#233#233#233#233#233#233#234#234#234#235#235#235#236#236#236#236
+  +#236#236#236#236#236#237#237#237#238#238#238#239#239#239#239#239#239#240#240
+  +#240#240#240#240#240#240#240#241#241#241#242#242#242#242#242#242#243#243#243
+  +#243#243#243#243#243#243#244#244#244#244#244#244#244#244#244#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246
+  +#246#246#245#245#245#246#246#246#246#246#246#246#246#246#245#245#245#246#246
+  +#246#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#247#247#247#247#247#247#247#247#247#246#246#246#247#247#247#246#246
+  +#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#188#188#188#187#187#187#186#186#186#184#184#184#182#182#182#181
+  +#181#181#180#180#180#178#178#178#177#177#177#176#176#176#174#174#174#173#173
+  +#173#172#172#172#171#171#171#170#170#170#168#168#168#167#167#167#166#166#166
+  +#164#164#164#163#163#163#161#161#161#160#160#160#159#159#159#157#157#157#156
+  +#156#156#155#155#155#154#154#154#153#153#153#152#152#152#153#160#182#155#178
+  +#250#155#178#250#154#178#250#154#178#250#154#177#250#154#177#250#154#177#250
+  +#153#177#250#153#177#250#153#177#250#153#176#250#153#176#250#153#176#250#152
+  +#176#250#152#176#250#152#175#250#152#175#250#151#175#250#151#175#250#151#175
+  +#250#151#174#250#151#174#250#151#174#250#150#174#250#150#174#250#150#174#250
+  +#150#173#250#150#173#250#149#173#250#149#173#250#149#173#250#149#173#250#149
+  +#172#250#148#172#250#148#172#250#148#172#250#148#172#250#148#171#250#148#171
+  +#250#147#171#250#147#171#250#147#171#250#147#170#250#147#170#250#146#170#250
+  +#146#170#250#146#170#250#146#170#250#145#169#250#145#169#250#145#169#250#145
+  ,#169#250#145#169#250#145#169#250#144#168#250#144#168#250#144#168#250#144#168
+  +#250#144#168#250#143#167#250#143#167#250#143#167#250#143#167#250#143#167#250
+  +#142#167#250#142#166#250#142#166#250#142#166#250#142#166#250#142#166#250#141
+  +#166#250#141#165#250#141#166#249#141#166#249#141#165#249#142#166#249#142#165
+  +#249#142#166#249#143#167#249#143#166#249#143#167#249#143#167#249#144#167#249
+  +#144#168#249#145#168#249#145#168#249#146#168#249#146#169#249#146#169#249#147
+  +#169#249#147#169#249#148#171#250#149#171#249#148#170#249#151#172#249#150#172
+  +#249#150#172#249#152#173#249#152#173#249#153#173#249#153#174#249#154#174#249
+  +#154#174#249#154#175#249#156#176#248#157#177#249#158#178#249#158#177#248#159
+  +#178#248#160#179#249#160#179#248#161#180#248#162#180#248#163#181#249#164#182
+  +#249#165#182#249#165#183#249#166#184#249#167#184#248#167#185#248#169#186#248
+  +#170#186#248#171#187#248#176#186#224#184#184#184#185#185#185#186#186#186#187
+  +#187#187#188#188#188#190#190#190#191#191#191#192#192#192#192#192#192#193#193
+  +#193#194#194#194#195#195#195#196#196#196#197#197#197#198#198#198#198#198#198
+  +#199#199#199#201#201#201#202#202#202#202#202#202#203#203#203#204#204#204#205
+  +#205#205#206#206#206#207#207#207#207#207#207#208#208#208#209#209#209#209#209
+  +#209#210#210#210#211#211#211#212#212#212#212#212#212#213#213#213#214#214#214
+  +#214#214#214#215#215#215#216#216#216#217#217#217#218#218#218#218#218#218#219
+  +#219#219#220#220#220#220#220#220#221#221#221#222#222#222#222#222#222#223#223
+  +#223#224#224#224#225#225#225#225#225#225#226#226#226#227#227#227#228#228#228
+  +#228#228#228#229#229#229#230#230#230#230#230#230#231#231#231#232#232#232#232
+  +#232#232#233#233#233#233#233#233#234#234#234#235#235#235#236#236#236#237#237
+  +#237#237#237#237#237#237#237#238#238#238#238#238#238#239#239#239#240#240#240
+  +#240#240#240#240#240#240#241#241#241#242#242#242#242#242#242#243#243#243#243
+  +#243#243#243#243#243#244#244#244#244#244#244#244#244#244#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245#245
+  +#245#245#245#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#245
+  +#245#245#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  ,#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#189#189#189#188#188#188#186#186#186#185#185#185#184#184#184#182#182
+  +#182#181#181#181#180#180#180#178#178#178#177#177#177#175#175#175#174#174#174
+  +#173#173#173#172#172#172#171#171#171#170#170#170#168#168#168#167#167#167#166
+  +#166#166#165#165#165#163#163#163#161#161#161#160#160#160#159#159#159#157#157
+  +#157#156#156#156#155#155#155#154#154#154#153#153#153#153#153#153#154#162#189
+  +#155#178#250#155#178#250#155#178#250#155#178#250#154#178#250#154#178#250#154
+  +#178#250#154#177#250#154#177#250#154#177#250#153#177#250#153#177#250#153#176
+  +#250#153#176#250#153#176#250#152#176#250#152#176#250#152#176#250#152#175#250
+  +#152#175#250#151#174#250#151#175#250#151#175#250#151#174#250#151#174#250#151
+  +#174#250#150#174#250#150#174#250#150#174#250#150#173#250#149#173#250#149#173
+  +#250#149#173#250#149#173#250#149#172#250#149#172#250#148#172#250#148#172#250
+  +#148#172#250#148#172#250#148#171#250#147#171#250#147#171#250#147#171#250#147
+  +#171#250#147#170#250#146#170#250#146#170#250#146#170#250#146#170#250#146#170
+  +#250#145#169#250#145#169#250#145#169#250#145#169#250#145#169#250#145#169#250
+  +#144#168#250#144#168#250#144#168#250#144#168#250#143#168#250#143#167#250#143
+  +#167#250#143#167#250#143#167#250#143#167#250#142#166#250#142#166#250#142#166
+  +#250#142#166#250#142#166#250#142#166#250#142#166#250#143#166#250#142#166#250
+  +#143#167#250#143#167#250#143#167#250#144#167#250#145#168#250#145#168#250#145
+  +#168#250#146#169#250#146#168#250#146#169#250#147#170#250#148#170#250#147#170
+  +#250#148#170#250#148#171#250#149#171#249#150#172#249#151#172#249#151#172#249
+  +#151#173#249#152#173#249#153#174#249#153#174#249#154#175#249#155#175#249#155
+  +#175#249#156#176#249#157#177#249#157#177#249#158#178#249#159#178#249#160#179
+  +#249#160#179#249#161#180#249#162#180#249#162#181#249#163#181#249#164#182#249
+  +#165#183#249#165#183#249#166#184#249#167#184#248#169#185#248#169#186#248#170
+  +#187#248#171#187#248#180#184#199#184#184#184#185#185#185#187#187#187#188#188
+  +#188#189#189#189#190#190#190#191#191#191#192#192#192#193#193#193#194#194#194
+  +#195#195#195#195#195#195#196#196#196#197#197#197#198#198#198#200#200#200#200
+  +#200#200#201#201#201#202#202#202#203#203#203#204#204#204#204#204#204#205#205
+  +#205#206#206#206#207#207#207#208#208#208#208#208#208#210#210#210#210#210#210
+  +#211#211#211#211#211#211#212#212#212#213#213#213#213#213#213#215#215#215#215
+  +#215#215#216#216#216#216#216#216#217#217#217#218#218#218#218#218#218#219#219
+  +#219#220#220#220#220#220#220#221#221#221#222#222#222#223#223#223#223#223#223
+  +#225#225#225#225#225#225#225#225#225#226#226#226#227#227#227#228#228#228#228
+  +#228#228#229#229#229#230#230#230#231#231#231#232#232#232#233#233#233#234#234
+  +#234#234#234#234#234#234#234#235#235#235#236#236#236#237#237#237#237#237#237
+  +#238#238#238#238#238#238#239#239#239#240#240#240#240#240#240#241#241#241#241
+  +#241#241#242#242#242#242#242#242#243#243#243#242#242#242#244#244#244#244#244
+  +#244#244#244#244#244#244#244#245#245#245#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#247#247#247#246#246#246#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  ,#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#190#190#190#189#189#189#188#188#188#187#187#187#185#185#185#184#184#184
+  +#182#182#182#181#181#181#180#180#180#178#178#178#177#177#177#175#175#175#174
+  +#174#174#173#173#173#172#172#172#171#171#171#170#170#170#168#168#168#167#167
+  +#167#166#166#166#164#164#164#163#163#163#161#161#161#160#160#160#159#159#159
+  +#157#157#157#156#156#156#155#155#155#154#154#154#153#153#153#152#152#152#154
+  +#162#189#155#179#250#155#178#250#155#178#250#155#178#250#154#178#250#154#178
+  +#250#154#178#250#154#177#250#154#177#250#154#177#250#153#177#250#153#177#250
+  +#153#176#250#153#176#250#153#176#250#152#176#250#152#176#250#152#176#250#152
+  +#175#250#152#175#250#151#175#250#151#175#250#151#175#250#151#174#250#151#174
+  +#250#151#174#250#150#174#250#150#174#250#150#174#250#150#173#250#149#173#250
+  +#149#173#250#149#173#250#149#173#250#149#172#250#149#172#250#148#172#250#148
+  +#172#250#148#172#250#148#172#250#148#171#250#147#171#250#147#171#250#148#171
+  +#251#147#171#251#147#170#250#147#171#251#146#170#250#146#170#250#146#170#251
+  +#146#170#250#146#170#251#146#170#251#146#170#251#145#169#251#145#169#250#145
+  +#169#251#145#169#251#144#168#250#144#168#250#144#168#251#144#168#251#144#168
+  +#251#143#167#250#143#168#251#143#167#250#143#167#250#143#167#251#143#167#251
+  +#142#166#250#143#167#250#142#166#250#143#167#250#143#167#250#144#168#250#143
+  +#167#250#144#167#250#143#167#250#145#168#250#145#168#250#146#169#250#145#169
+  +#250#146#169#250#147#169#250#147#169#250#147#170#250#148#170#250#149#170#250
+  +#149#171#250#149#172#250#149#171#249#150#172#249#152#173#250#151#172#249#152
+  +#173#250#152#173#249#153#174#250#154#174#249#154#175#249#155#175#249#156#176
+  +#249#156#176#249#158#177#250#157#177#249#159#178#250#160#179#250#160#179#249
+  +#161#180#249#162#181#249#162#181#249#163#182#249#164#182#249#165#183#249#166
+  +#183#249#166#184#249#168#185#249#168#186#249#169#186#249#170#187#249#171#187
+  +#249#175#187#232#184#184#184#185#185#185#187#187#187#188#188#188#188#188#188
+  +#190#190#190#191#191#191#191#191#191#192#192#192#193#193#193#195#195#195#196
+  +#196#196#196#196#196#197#197#197#199#199#199#200#200#200#200#200#200#201#201
+  +#201#202#202#202#203#203#203#204#204#204#205#205#205#205#205#205#207#207#207
+  +#208#208#208#208#208#208#209#209#209#210#210#210#211#211#211#212#212#212#212
+  +#212#212#213#213#213#213#213#213#214#214#214#215#215#215#216#216#216#216#216
+  +#216#217#217#217#217#217#217#218#218#218#219#219#219#219#219#219#220#220#220
+  +#221#221#221#221#221#221#222#222#222#223#223#223#223#223#223#224#224#224#226
+  +#226#226#226#226#226#226#226#226#228#228#228#229#229#229#229#229#229#229#229
+  +#229#230#230#230#231#231#231#231#231#231#232#232#232#233#233#233#234#234#234
+  +#234#234#234#234#234#234#236#236#236#236#236#236#237#237#237#237#237#237#238
+  +#238#238#239#239#239#239#239#239#240#240#240#241#241#241#241#241#241#241#241
+  +#241#242#242#242#242#242#242#243#243#243#243#243#243#244#244#244#244#244#244
+  +#244#244#244#245#245#245#245#245#245#245#245#245#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  ,#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#247#247#247#246#246#246#246#246#246#246#246#246#247
+  +#247#247#246#246#246#247#247#247#246#246#246#247#247#247#247#247#247#246#246
+  +#246#247#247#247#247#247#247#246#246#246#247#247#247#246#246#246#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#191#191#191#190#190#190#190#190#190#188#188#188#187#187#187#186#186#186#185
+  +#185#185#183#183#183#181#181#181#180#180#180#178#178#178#177#177#177#176#176
+  +#176#174#174#174#173#173#173#172#172#172#171#171#171#170#170#170#168#168#168
+  +#167#167#167#166#166#166#165#165#165#163#163#163#162#162#162#160#160#160#159
+  +#159#159#158#158#158#156#156#156#156#156#156#154#154#154#153#153#153#153#153
+  +#153#154#162#189#156#179#251#156#179#251#155#179#251#155#179#251#155#178#251
+  +#155#178#251#155#178#251#154#178#251#154#178#251#154#178#251#154#177#251#154
+  +#177#251#154#177#251#153#177#251#153#177#251#153#176#251#153#176#251#152#176
+  +#251#152#176#251#152#176#251#152#175#251#152#175#251#152#175#251#151#175#251
+  +#151#175#251#151#175#251#151#174#251#151#174#251#150#174#251#150#174#251#150
+  +#174#251#150#174#251#150#173#251#149#173#251#149#173#251#149#173#251#149#173
+  +#251#149#172#251#149#172#251#148#172#251#148#172#251#148#172#251#148#171#251
+  +#148#171#251#147#171#251#147#171#251#147#171#251#147#171#251#146#170#251#146
+  +#170#251#146#170#251#146#170#251#146#170#251#146#170#251#145#169#251#145#169
+  +#251#145#169#251#145#169#251#145#169#251#144#168#251#144#168#251#144#168#251
+  +#144#168#251#144#168#251#143#168#251#143#167#251#143#167#251#143#167#251#143
+  +#167#251#143#167#250#143#167#250#143#167#250#143#167#250#144#168#250#145#168
+  +#250#144#168#250#144#168#250#145#168#250#146#169#250#146#169#250#146#169#250
+  +#147#170#250#148#170#250#147#170#250#148#170#250#148#171#250#149#171#250#149
+  +#171#250#149#172#250#150#172#250#151#172#250#152#173#250#152#173#250#152#173
+  +#250#153#174#250#154#175#250#154#175#250#155#176#250#155#176#250#156#176#250
+  +#157#177#250#158#177#250#158#178#250#159#179#250#160#179#250#161#180#249#161
+  +#180#249#162#181#249#163#181#249#163#182#249#164#182#249#165#183#249#166#184
+  +#249#167#185#249#168#185#249#168#185#249#169#186#249#170#187#249#171#187#249
+  +#180#184#200#184#184#184#186#186#186#187#187#187#188#188#188#189#189#189#190
+  +#190#190#191#191#191#192#192#192#193#193#193#194#194#194#195#195#195#196#196
+  +#196#196#196#196#197#197#197#198#198#198#200#200#200#201#201#201#202#202#202
+  +#202#202#202#204#204#204#205#205#205#206#206#206#206#206#206#207#207#207#208
+  +#208#208#209#209#209#209#209#209#211#211#211#211#211#211#212#212#212#212#212
+  +#212#213#213#213#214#214#214#214#214#214#215#215#215#216#216#216#216#216#216
+  +#217#217#217#218#218#218#218#218#218#219#219#219#220#220#220#220#220#220#221
+  +#221#221#222#222#222#222#222#222#224#224#224#224#224#224#225#225#225#226#226
+  ,#226#226#226#226#227#227#227#228#228#228#229#229#229#229#229#229#230#230#230
+  +#231#231#231#231#231#231#231#231#231#232#232#232#233#233#233#234#234#234#234
+  +#234#234#235#235#235#235#235#235#237#237#237#237#237#237#238#238#238#238#238
+  +#238#239#239#239#239#239#239#240#240#240#241#241#241#241#241#241#241#241#241
+  +#242#242#242#242#242#242#243#243#243#244#244#244#244#244#244#244#244#244#244
+  +#244#244#245#245#245#245#245#245#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246
+  +#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#246#247
+  +#247#247#247#247#247#247#247#247#247#247#247#246#246#246#247#247#247#246#246
+  +#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#246#246#246#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247
+  +#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#247#0#0
+  +#6'TBevel'#6'Bevel2'#6'Height'#2#2#3'Top'#2'@'#5'Width'#3#245#1#5'Align'#7#5
+  +'alTop'#5'Shape'#7#9'bsTopLine'#0#0#6'TBevel'#6'Bevel3'#6'Height'#2#2#3'Top'
+  +#3#14#1#5'Width'#3#245#1#5'Align'#7#8'alBottom'#5'Shape'#7#9'bsTopLine'#0#0#5
+  +'TEdit'#11'eSvcLibName'#4'Left'#2'w'#6'Height'#2#21#3'Top'#2'}'#5'Width'#3'u'
+  +#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#8'TabOrder'#2#1#0#0#5'TEdit'
+  +#8'eSvcName'#4'Left'#2'w'#6'Height'#2#21#3'Top'#3#151#0#5'Width'#3'u'#1#7'An'
+  +'chors'#11#5'akTop'#6'akLeft'#7'akRight'#0#8'TabOrder'#2#2#0#0#5'TEdit'#8'eP'
+  +'rjName'#4'Left'#2'w'#6'Height'#2#21#3'Top'#2'c'#5'Width'#3'u'#1#7'Anchors'
+  +#11#5'akTop'#6'akLeft'#7'akRight'#0#8'TabOrder'#2#0#0#0#5'TEdit'#7'ePrjDir'#4
+  +'Left'#2'w'#6'Height'#2#21#3'Top'#3#241#0#5'Width'#3'$'#1#7'Anchors'#11#5'ak'
+  +'Top'#6'akLeft'#7'akRight'#0#8'TabOrder'#2#7#0#0#5'TEdit'#13'eTemplateName'#4
+  +'Left'#2'w'#6'Height'#2#21#3'Top'#2'I'#5'Width'#3'u'#1#7'Anchors'#11#5'akTop'
+  +#6'akLeft'#7'akRight'#0#5'Color'#7#9'clBtnFace'#8'ReadOnly'#9#7'TabStop'#8#8
+  +'TabOrder'#2#6#0#0#7'TBitBtn'#7'BitBtn1'#4'Left'#3#161#1#6'Height'#2#25#3'To'
+  +'p'#3#239#0#5'Width'#2'K'#7'Anchors'#11#5'akTop'#7'akRight'#0#7'Caption'#6#7
+  +'&Browse'#10'Glyph.Data'#10':'#3#0#0'6'#3#0#0'BM6'#3#0#0#0#0#0#0'6'#0#0#0'('
+  +#0#0#0#16#0#0#0#16#0#0#0#1#0#24#0#0#0#0#0#0#3#0#0#18#11#0#0#18#11#0#0#0#0#0#0
+  ,#0#0#0#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#28#153#206'+'#165#213#28#157#209#10#138#198#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#191
+  +#165#163'MZr'#255#0#255#255#0#255'$'#156#207#166#238#247'l'#235#248']'#217
+  +#240'J'#199#231'9'#184#224' '#160#212#15#145#202#15#145#201#255#0#255#255#0
+  +#255#191#165#163'Wf'#131#18'v'#226'<'#145#220#255#0#255#12#140#199#153#221
+  +#239#139#255#255#128#252#255#130#251#255''#250#255'y'#243#255'e'#225#247'N'
+  +#206#237'<'#186#224'u'#145#160'[f'#129#17'p'#216'3'#161#255'*'#154#254#255#0
+  +#255#18#150#204'Y'#186#222#159#254#255'u'#247#255'x'#246#255'w'#242#252#137
+  +#217#224#135#215#222'{'#226#234#145#188#192'Qh'#137#19'p'#213'1'#160#255'1'
+  +#158#251#255#0#255#255#0#255'&'#165#212'H'#193#230#159#239#248'y'#246#251#135
+  +#216#220#186#202#188#218#188#165#208#181#158#175#154#140#129'zsAy'#175'2'#163
+  +#255'='#172#254#27#156#212#255#0#255#255#0#255''''#175#222#139#151#161#136
+  +#207#226#139#209#211#203#180#173#247#240#221#255#255#216#255#255#217#250#248
+  +#197#207#176#140#196#169#163'M'#193#252'U'#208#251'A'#193#227#255#0#255#255#0
+  +#255'%'#175#225#173'pk]'#188#221#181#166#158#247#244#238#255#255#255#255#255
+  +#227#255#255#212#255#247#193#255#230#165#216#160#130'o'#212#235'Y'#215#251'h'
+  +#226#248#14#144#201#255#0#255'&'#175#225#181'wm'#164#207#217#206#182#158#255
+  +#255#234#255#255#243#255#255#234#255#255#215#247#220#169#246#201#134#225#184
+  +#145#145#192#199'S'#211#251'~'#243#255'('#170#216#255#0#255'('#176#224#188''
+  +'n'#255#244#235#213#188#161#255#255#221#255#255#221#255#255#224#255#250#202
+  +#239#189#129#244#189'w'#231#196#154#147#192#196'O'#211#251'}'#244#255'V'#213
+  +#239#255#0#255'('#175#225#197#136'p'#255#252#248#202#170#153#254#255#206#255
+  +#255#201#248#225#173#240#199#140#243#202#150#255#235#181#213#175#149#154#201
+  +#211'z'#224#254#157#251#255#150#248#255'#'#161#211'('#176#225#206#145's'#255
+  +#250#247#216#196#189#220#197#158#252#229#167#250#199#130#251#208#139#255#247
+  +#224#231#220#206#140#165#170'k'#201#230'_'#188#224'`'#187#222'l'#196#227')'
+  +#161#209'-'#178#226#213#153'u'#255#248#243#252#251#250#229#209#201#233#202
+  +#166#231#197#153#225#194#152#204#181#159#177#139#136'u'#231#248'm'#237#254#23
+  +#157#209#255#0#255#255#0#255#255#0#255#31#161#217#221#160'w'#255#251#246#255
+  +#255#255#255#255#255#255#255#254#251#244#235#180#131'y'#191'xI'#177'oSP'#192
+  +#229'P'#196#231#28#157#208#255#0#255#255#0#255#255#0#255#255#0#255#226#166'x'
+  +#255#255#255#255#255#255#255#255#255#255#255#255#248#250#252#182#135'z'#226
+  +#153'U'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#231#171'y'#209#146'm'#209#146'm'#209#146'm'#209#146'm'#209#146'm'
+  +#180'~o'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#9'NumGlyphs'#2#0#7'OnClick'#7#19'sbBrowseForDirClick'#8'TabOr'
+  +'der'#2#5#7'TabStop'#8#0#0#9'TComboBox'#14'cbMessageClass'#4'Left'#2'w'#6'He'
+  +'ight'#2#21#3'Top'#3#209#0#5'Width'#3'u'#1#7'Anchors'#11#5'akTop'#6'akLeft'#7
+  +'akRight'#0#16'AutoCompleteText'#11#22'cbactEndOfLineComplete'#20'cbactSearc'
+  +'hAscending'#0#10'ItemHeight'#2#13#5'Style'#7#14'csDropDownList'#8'TabOrder'
+  +#2#4#0#0#9'TComboBox'#13'cbServerClass'#4'Left'#2'w'#6'Height'#2#21#3'Top'#3
+  +#184#0#5'Width'#3'u'#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#16'Auto'
+  +'CompleteText'#11#22'cbactEndOfLineComplete'#20'cbactSearchAscending'#0#10'I'
+  +'temHeight'#2#13#5'Style'#7#14'csDropDownList'#8'TabOrder'#2#3#0#0#6'TPanel'
+  +#6'Panel1'#6'Height'#2')'#3'Top'#3#16#1#5'Width'#3#245#1#5'Align'#7#8'alBott'
+  +'om'#10'BevelOuter'#7#6'bvNone'#12'ClientHeight'#2')'#11'ClientWidth'#3#245#1
+  +#8'TabOrder'#2#8#0#6'TImage'#6'Image1'#4'Left'#2#5#6'Height'#2' '#3'Top'#2#4
+  +#5'Width'#2' '#7'Anchors'#11#6'akLeft'#8'akBottom'#0#12'Picture.Data'#10#224
+  +'W'#0#0#5'TIcon'#214'W'#0#0#0#0#1#0#6#0'00'#0#0#1#0#8#0#168#14#0#0'f'#0#0#0
+  +'  '#0#0#1#0#8#0#168#8#0#0#14#15#0#0#16#16#0#0#1#0#8#0'h'#5#0#0#182#23#0#0'0'
+  +'0'#0#0#1#0' '#0#168'%'#0#0#30#29#0#0'  '#0#0#1#0' '#0#168#16#0#0#198'B'#0#0
+  +#16#16#0#0#1#0' '#0'h'#4#0#0'nS'#0#0'('#0#0#0'0'#0#0#0'`'#0#0#0#1#0#8#0#0#0#0
+  +#0#0#9#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#1#0#0#0#0#0#0#13#13#13#0#19#19#19#0#28
+  +#28#28#0#28#28'&'#0#19#22'?'#0#31'  '#0'$$$'#0'('''''#0'#$/'#0'''(*'#0'***'#0
+  +'2..'#0';..'#0'()2'#0'/1='#0'333'#0'955'#0'<87'#0'13?'#0';:;'#0'C99'#0'P;:'#0
+  +#12#12'H'#0#23#28'H'#0#10#10'V'#0#10#12'['#0#13#17'X'#0#21#25'Y'#0#28'!A'#0
+  +'&*I'#0':<G'#0'6<U'#0#13#13'm'#0#14#20'f'#0#18#24'm'#0#31'+m'#0#26'){'#0'2<a'
+  +#0'"3~'#0'3?p'#0'@?B'#0'8Be'#0':Ft'#0'CCC'#0'JCB'#0'ADM'#0'LLL'#0'WDC'#0'SKJ'
+  +#0'FJY'#0'SSS'#0'XTT'#0'SU^'#0'[ZZ'#0'iML'#0'iYJ'#0'fYU'#0'm^R'#0'l^\'#0'ncW'
+  +#0'sf['#0'AIg'#0'V[i'#0'EQ{'#0'S\x'#0'^aj'#0'[bz'#0'ccc'#0'jdc'#0'bem'#0'iii'
+  +#0'qgc'#0'vk`'#0'znd'#0'rnm'#0'{lj'#0'~qj'#0'ttt'#0'ztr'#0'{xt'#0'|||'#0#135
+  +'i?'#0#218''#14#0#129'kM'#0#135'ig'#0#130'rm'#0#129'}n'#0#130'us'#0#137'vs'
+  ,#0#132'zt'#0#139'zv'#0#130'||'#0#141'{x'#0#144'xv'#0#145'~y'#0#235#135#12#0
+  +#254#141#7#0#254#146#11#0#229#140#21#0#235#147#27#0#254#154#22#0#234#155''''
+  +#0#233#161'-'#0#254#166''''#0#235#166'4'#0#254#173'3'#0#255#179'8'#0#165#140
+  +'Z'#0#183#154'['#0#140#129'z'#0#145#137'z'#0#164#154'y'#0#183#165'o'#0#175
+  +#161'v'#0#215#156'N'#0#208#175'_'#0#238#183'N'#0#252#185'D'#0#233#186'T'#0
+  +#240#184'Q'#0#197#159's'#0#195#169'g'#0#215#191'v'#0#239#181'd'#0#255#192'L'
+  +#0#255#198'X'#0#255#205'd'#0#255#210'j'#0#255#216'v'#0#255#225'~'#0#14#30#132
+  +#0#8#12#147#0#1#3#155#0#10#24#154#0#23'('#134#0',?'#136#0'!;'#158#0#0#4#163#0
+  +#4#12#164#0#0#7#169#0#0#9#172#0#8#19#161#0#0#12#178#0#1#17#185#0#23'4'#171#0
+  +#9'('#187#0#19'3'#185#0'">'#171#0'.A'#137#0'-C'#149#0'.J'#175#0'5N'#165#0'>V'
+  +#168#0'&E'#185#0'2Q'#188#0'JW'#132#0'S_'#132#0']g'#131#0'D\'#170#0'@]'#191#0
+  +'H`'#172#0'Vj'#167#0'Nh'#185#0'Sm'#186#0#2#29#200#0#0#30#215#0#6'$'#198#0#14
+  +'3'#203#0#23'<'#200#0#0'!'#221#0#7'5'#234#0#16'='#231#0#0'/'#248#0#7'9'#254#0
+  +#16'?'#243#0#23'@'#219#0'$F'#197#0'%K'#213#0'0T'#211#0#22'B'#231#0#21'G'#254
+  +#0#31'P'#255#0'.X'#233#0'(X'#255#0'8g'#254#0'Gf'#198#0'Dj'#224#0'Kr'#230#0'C'
+  +'o'#245#0'Cq'#253#0#130#130#129#0#139#134#130#0#138#138#138#0#148#136#134#0
+  +#151#144#135#0#154#146#140#0#148#147#147#0#156#145#148#0#158#154#151#0#155
+  +#154#154#0#162#149#147#0#165#152#150#0#163#157#158#0#170#157#155#0#175#161
+  +#159#0#166#158#165#0#162#162#162#0#173#165#164#0#173#167#169#0#173#171#170#0
+  +#180#169#166#0#180#175#173#0#184#171#169#0#181#174#178#0#185#181#183#0#202
+  +#180#157#0#224#183#130#0#201#182#166#0#194#183#181#0#196#184#183#0#196#188
+  +#187#0#202#191#188#0#251#207#142#0#227#208#132#0#255#221#128#0#238#203#149#0
+  +#235#222#147#0#254#227#136#0#254#235#151#0#255#244#156#0#201#192#191#0#220
+  +#203#183#0#242#211#167#0#248#238#163#0#254#243#166#0#255#227#181#0#255#250
+  +#177#0#194#189#197#0#201#197#197#0#213#206#205#0#206#202#208#0#208#206#208#0
+  +#214#212#214#0#220#212#211#0#221#218#219#0#231#222#211#0#227#220#219#0#250
+  +#231#202#0#230#224#222#0#228#227#227#0#233#229#227#0#234#233#233#0#249#247
+  +#247#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'K/'#2#2#1#1#1#1
+  +',D'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#191
+  +#17#3#3#2#2#2#2#1#2#1#1#1#1#1#2#11'/NQNNQQ'#193#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0'K'#3#6#3#3#3#3#2#3#2#2#1#1#1#1#2#3#6#8#11#12#16#16#16#11#16')3K'
+  +#200#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#191#6#6#6#6#6#3#3#3#3#2#2#2#2#2#2#2#3#11
+  +'K'#196#208#211#204#196']M;1'#16#16'3'#193#0#0#0#0#0#0#0#0#0#0#0#0#0#0')'#11
+  +#11#11#6#11#6#6#3#6#5#27#27#27#25#25#23#4'D'#221#247#245#244#240#222#213#201
+  +'_[[V1'#11'6'#0#0#0#0#0#0#0#0#0#0#0#0#0#11#11#11#11#11#11#6#6#6#6#4'"'#141
+  +#141#141#138#133'!3'#247#251#251#252#239'\KEEMYYY_-)'#197#0#0#0#0#0#0#0#0#0#0
+  +'Q'#16#16#11#11#11#11#8#11#6#8#6#6#5#143#141#138#138#133#27'P'#253#252#253
+  +#239'3'#191'\'#191#191'6,VY];)'#0#0#0#0#0#0#0#0#0#0#191#16#16#16#16#16#11#11
+  +#11#11#8#6#6#6#28#143#143#141#139#132'!)'#245#253#253#209'D'#251#201#205#219
+  +#219'E-_Y'#17'D'#0#0#0#0#0#0#0#0#0#0')'#16#16#16#16#12#12#11#11#11#11#11#6#8
+  +'#'#144#143#139#132'#'#30#9')'#200#221#191','#194'UU^'#194'H-M'#17')'#0#0#0#0
+  +#0#0#0#0#0#0')'#16')'#16#16#16#16#16#12#11#11#11#11#8#6#28#144#144#142#28#12
+  +')'#20#16#17')'#16#12#13#13#21#22'70'#8#8#6#2#0#0#0#0#0#0#0#0#0'/)'#17#17')'
+  +#16#16#16#16#16#12#11#11#11#11#11#6#28#144#24','#196#192#215#215#203#194'XVV'
+  +'VE1-'#12#3#11#11#6#11#0#0#0#0#0#0#0#193')))'#17#17')'#17#16#16#16#16#12#11
+  +#11#11#11#11#8#8#10#209#200'9'#226#236#248#246#239#215#206#198#201#202#202
+  +#201'K,'#11#11#6'/'#0#0#0#0#0#0',)'#20#20#20#20#20#17#20#16#16#16#16#12#11#11
+  +#11#8#6#10#6#221#203':`bbhv'#223#233#232#220#215#214#220#221#199'/'#11#11'D'
+  +#0#0#0#0'N,,,),'#20#20#20#17#17#17#16#16#16#12#11#11#11#11#8#10#221#209'=`bb'
+  +'baabbek|'#217#216#214#238#241#200#17#16#191#0#0#0'/-,,,,'#20','#20#20#20#16
+  +#16#16#16#14#12#12#11#11#11#8#239#214'I`bbbeeeeeebbefsy'#216#214#16'K'#0#0
+  +#200'//,,,,,'#20'&'#145#168#147''''#16#16#16#12#12#12#10#11#8#242#215'J`eehh'
+  +'hhhhhhhbbbbS]),'#0#0'D///-,,,'#149#174#174#174#174#174#145#16#16#16#14#12#12
+  +#10#10#243#238'Mdehhhhkjkhhhhheb`J)'#11#0#0'//////,.'#175#174#174#174#174#173
+  +#173''''#16#16#16#12#11#16#8#245#239'Wdhhjkvvvvvvkhhhe`J'#20#6#0#0'33///,/+'
+  +#181#181#174#174#174#173#174#146#20#17#16#16#16#11#8#250#242'Zgjkv}}}}}}vvvj'
+  +'hhcH)'#6'Q'#193'33////,+'#181#174#181#174#174#174#174#168#17#16#16#16#16#16
+  +#7#252#243'ngk}}~~~~}vvjhd='#17#10'3N3333///>'#181#181#181#174#174#174#174
+  +#145#20#20#20#16#16#16#7#252#245'nkv}~'#128#128#128#128#128'}}kkf<'#20#8
+  +')63333////'#178#181#181#181#174#174#175' '#20#20#16#16#16#16#10#252#245'ou}'
+  +'~'#128#128#129#129#129#129#129#128#128'}}kf<'#16#8#2'6633333//2'#178#181
+  +#181#181#175'('#20#20#20#20#20#20#16#7#252#250#195'u~'#128#129#129#228#228
+  +#228#225#129#128#128'~}vg8'#16#10#2'6663333////>++))),'#20#20#20#16#20#10#252
+  +#250#195'u~'#128#129#130#228#229#229#229#228#228#129#128'~vi8'#16#10#3'6666'
+  ,'33333///.,,,,,'#20','#20#20#20#10#252#250#195'w'#128#130#228#229#229#234
+  +#234#229#228#225#128#128'~}i8'#16#8#3'6D6663333//////,,,,'#20#20#20#20#10#252
+  +#252#197'u'#128#128#130#228#230#235#237#235#229#229#225#128#128'~}i8'#16#8#3
+  +'D6666633333//,/,,,,,'#20#20#20#10#252#250#199'lmmt{'#224#227#234#235#230#228
+  +#130#129#128'~}i8'#16#11#3'QDD66663333//////,,,,,'#20#10#252#252#242#215#212
+  +#210#200#193'PWoprqztwuvg:'#16#11','#197'D6D666633333///,/,,,'#20','#10#239
+  +#253#252#253#253#253#252#245#240#231#212#203#199#193#193'XE<TR='#16#11'3'#0
+  +'DDD6D6663333////,/*.,'#20#11#14#30'.5N'#191#197#199#210#215#231#231#238#222
+  +#219#213#204#199#192'\V'#12#8#193#0'DDDD6666633333//>'#177#181#181#150',*'
+  +#172#171#171#147#30#11#11#8#11#8#14#17'.4EKOX'#192'M'#17#8#3#0#0'QDDDD6D6A'
+  +#159#156'533//'#152#182#181#181#181#180#175#174#174#137#31#16#20#20#16#16#16
+  +'$'#165#146#134#131'#'#29#6#8#6#6#6#20#0#0#209'GDDDD6A'#189#185#185#160'3333'
+  +#155#182#182#181#181#181#174#181#169','#20#20#20#16#20#16#16#16#167#170#170
+  +#170#165#14#6#8#6#6#6#191#0#0#0'GGDDDB'#189#185#185#185#185'?333'#179#182#182
+  +#182#181#181#181#174#174','#20#20#20#20#20#16#20#16#15'%'#135'%'#14#11#11#8#6
+  +#8#6#0#0#0#0#193'KDDD'#162#190#190#190#185#185#160'55'#156#183#184#182#182
+  +#182#181#181#182#181#176#148#137' '#20#20#16#20#16#16#17#12#12#11#11#11#8#8#6
+  +'G'#0#0#0#0#0'GGGDB'#188#190#190#185#185#185#185#184#184#184#184#184#184#182
+  +#182#181#181#181#174#181#174#169#20#20#20#20#16#17#16#16#16#12#11#11#11#8#8#0
+  +#0#0#0#0#0#207'GGGD'#158#189#190#190#190#185#185#185#185#184#184#184#184#182
+  +#182#182#181#181#181#174#181#180#20#20#20#20#16#20#16#16#16#14#12#12#11#11'Q'
+  +#0#0#0#0#0#0#0'NGGGD'#158#190#190#190#190#185#185#185#185#185#184#184#184#182
+  +#182#182#181#181#181#174#149',,'#20#20#20#16#20#16#16#16#12#12#12#20#0#0#0#0
+  +#0#0#0#0#0'KGGDG'#158#190#190#190#190#185#185#185#184#185#184#184#184#182#182
+  +#182#182#181#181',,,. '#20#20#16#20#16#16#16#14#11#0#0#0#0#0#0#0#0#0#0#0'GKG'
+  +'DK'#158#188#190#190#190#185#185#185#184#185#184#184#184#182#182#182#181#181
+  +#154'.'#149#172#174#137#20#20#16#20#16#16#16#0#0#0#0#0#0#0#0#0#0#0#0#207'GKG'
+  +'DDG'#164#190#190#190#185#185#185#184#185#184#184#184#184#182#182#182#181#181
+  +#174#181#174#137#20#20#20#16#20#16#191#0#0#0#0#0#0#0#0#0#0#0#0#0#207'GGGGGD'
+  +#158#186#190#190#185#185#185#185#184#185#184#184#182#182#182#181#181#181#177
+  +'*,'#20','#20#20#16#191#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'KGGDDDDC'#163#187#190
+  +#185#185#184#185#184#184#184#182#182#178#151'>,,,,'#20#20#20#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0'NGGGDDDD6?'#157#161#161#159#153#153#153'@2//,/,,,,/'#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#207'GGGDDDDD66653333////,/,,'#193#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#197'DGDDD6D666633333///,Q'#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#209'NDDDD666663333/F'
+  +#200#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#197
+  +'QD66666Q'#191#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#224#7#255#255#0
+  +#0#255#254#0#0#0#255#0#0#255#248#0#0#0#31#0#0#255#224#0#0#0#15#0#0#255#192#0
+  +#0#0#15#0#0#255#128#0#0#0#7#0#0#254#0#0#0#0#15#0#0#252#0#0#0#0#15#0#0#252#0#0
+  +#0#0#31#0#0#248#0#0#0#0#31#0#0#240#0#0#0#0#15#0#0#224#0#0#0#0#7#0#0#224#0#0#0
+  +#0#3#0#0#192#0#0#0#0#1#0#0#192#0#0#0#0#1#0#0#128#0#0#0#0#1#0#0#128#0#0#0#0#1
+  +#0#0#128#0#0#0#0#1#0#0#128#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#128#0#0#0#0#0#0#0#128#0#0#0
+  +#0#1#0#0#128#0#0#0#0#1#0#0#128#0#0#0#0#1#0#0#192#0#0#0#0#3#0#0#192#0#0#0#0#3
+  +#0#0#224#0#0#0#0#7#0#0#224#0#0#0#0#7#0#0#240#0#0#0#0#15#0#0#248#0#0#0#0#31#0
+  +#0#252#0#0#0#0'?'#0#0#252#0#0#0#0'?'#0#0#254#0#0#0#0''#0#0#255#128#0#0#1#255
+  +#0#0#255#192#0#0#3#255#0#0#255#224#0#0#7#255#0#0#255#248#0#0#31#255#0#0#255
+  +#254#0#0''#255#0#0#255#255#224#7#255#255#0#0'('#0#0#0' '#0#0#0'@'#0#0#0#1#0
+  +#8#0#0#0#0#0#0#4#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#1#0#0#0#0#0#0#12#12#12#0#18#19
+  +#19#0#23#24#24#0#28#28#28#0#23#24'"'#0'$$$'#0'+++'#0'1..'#0'10/'#0'-.0'#0'32'
+  +'2'#0'865'#0';;;'#0'E66'#0'E<;'#0#23#27'E'#0#20#23'M'#0#11#12'['#0#19#25'R'#0
+  +#16#21']'#0#21#27'\'#0#29'!A'#0'#+J'#0'=<A'#0':=I'#0'+3Y'#0'39R'#0#9#17'z'#0
+  +#25'-v'#0')5h'#0'3<b'#0'<BW'#0'>D['#0':Fu'#0'=Iw'#0'CBC'#0'LED'#0'EDK'#0'IGH'
+  +#0'KKK'#0'RKJ'#0'ZON'#0'[RO'#0'BEQ'#0'IKU'#0'NPY'#0'SSS'#0'YSS'#0'RU_'#0'ZZZ'
+  +#0'hOM'#0'hWU'#0'j^]'#0'zjZ'#0'CLm'#0'\^e'#0'ccc'#0'iff'#0'jjj'#0'~db'#0'}ng'
+  +#0'ulk'#0'}mj'#0'~rk'#0'agx'#0'ssr'#0'{vw'#0'{xw'#0'}{{'#0#167'B'#0#129'o`'
+  +#0#133'uo'#0#138'wt'#0#139'|v'#0#129'~'#0#137'{z'#0#144'}x'#0#186#130'5'#0
+  +#181#131'<'#0#220#128#15#0#220#129#17#0#220#136#24#0#254#143#9#0#255#149#5#0
+  +#254#147#11#0#247#146#19#0#254#154#19#0#254#158#27#0#254#161#28#0#220#144'#'
+  +#0#221#151'-'#0#222#158'7'#0#231#147'*'#0#254#163'"'#0#255#171'+'#0#248#165
+  +'3'#0#255#173'2'#0#255#175'8'#0#255#179'3'#0#254#180':'#0#255#188':'#0#172
+  +#130'B'#0#177#131'A'#0#161#136'U'#0#184#154'W'#0#139#128'~'#0#145#131'|'#0
+  ,#150#144''#0#157#149'{'#0#175#157'm'#0#184#159'b'#0#164#153'v'#0#222#164'A'
+  +#0#222#171'L'#0#201#164'X'#0#222#178'P'#0#225#175'O'#0#255#183'A'#0#255#186
+  +'C'#0#254#182'O'#0#255#191'L'#0#231#169'Q'#0#201#172'd'#0#196#163'z'#0#211
+  +#170'v'#0#244#187'h'#0#255#194'B'#0#255#192'N'#0#255#196'S'#0#255#198'X'#0
+  +#255#202'\'#0#222#198'x'#0#255#205'd'#0#255#208'b'#0#255#216'f'#0#255#210'j'
+  +#0#255#213's'#0#255#217'v'#0#255#217'x'#0#255#225'z'#0#4#8#140#0#24'0'#137#0
+  +#0#5#165#0#0#9#171#0#0#12#177#0#0#15#184#0#27'9'#170#0#17'1'#187#0'7J'#141#0
+  +',B'#149#0'4J'#153#0'-F'#163#0'8Q'#167#0'<T'#168#0'/M'#188#0'HZ'#149#0'Uf'
+  +#156#0'`h'#130#0'Vj'#167#0#21'8'#194#0#24';'#195#0#21':'#202#0#6'/'#222#0#18
+  +'>'#231#0#3'2'#240#0#13'<'#242#0#1'4'#253#0#7':'#255#0#12'>'#255#0'"J'#221#0
+  +'8_'#223#0'<b'#223#0#20'B'#243#0#24'G'#243#0#18'D'#255#0#28'M'#255#0' J'#232
+  +#0'(S'#233#0'''X'#255#0'<e'#234#0'<h'#244#0'3c'#255#0'<k'#255#0'Jg'#194#0'In'
+  +#225#0'Lr'#225#0'Er'#250#0#131'~'#129#0#129#128#128#0#140#134#133#0#140#139
+  +#139#0#146#138#132#0#150#141#141#0#155#140#139#0#156#147#139#0#145#144#146#0
+  +#155#146#147#0#159#149#154#0#158#152#154#0#160#150#149#0#160#152#146#0#164
+  +#156#154#0#172#156#152#0#169#162#158#0#167#167#167#0#171#166#163#0#175#171
+  +#164#0#173#166#170#0#179#166#166#0#177#175#171#0#187#175#172#0#177#176#175#0
+  +#186#182#187#0#188#188#188#0#226#187#136#0#201#180#164#0#206#186#165#0#194
+  +#183#180#0#196#188#188#0#202#189#186#0#218#192#154#0#237#218#140#0#255#222
+  +#129#0#255#225#133#0#254#228#138#0#255#235#139#0#254#230#145#0#240#229#157#0
+  +#254#236#153#0#255#240#153#0#248#238#163#0#255#246#170#0#192#186#192#0#197
+  +#196#197#0#202#196#196#0#206#201#199#0#196#197#201#0#213#201#198#0#213#208
+  +#207#0#222#211#201#0#207#207#208#0#213#207#208#0#209#208#208#0#220#215#215#0
+  +#220#219#219#0#224#221#221#0#246#226#201#0#226#222#224#0#227#227#230#0#235
+  +#230#229#0#238#236#236#0#244#243#245#0#252#247#246#0#254#254#254#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0'/'#6#2#1#1#1#6#9#13'(/)%$(E'#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +'2'#4#4#4#2#2#2#2#2#9#191#219#235#220#209#194'I?+'#12#0#0#0#0#0#0#0#0#0#0';'
+  +#6#6#6#4#4#4#4#2#2#24#238#251#250#239#202#192'LIJM?'#13#0#0#0#0#0#0#0#0#13#10
+  +#10#6#6#6#4#20#144#143#18'K'#253#252#246'BCEB+5Ik%'#0#0#0#0#0#0#0#9#9#10#10#6
+  +#6#6#6#16#145#144#141'$'#246#254#234'E'#238#203#211#204')H?'#8#0#0#0#0#0#0#13
+  +#9#9#9#10#10#7#6#6#21#146#28#17#5'$K;$43<I))'#8#0#0#0#0#0#0''''#13#13#9#9#9
+  +#10#7#7#6#22#19'$>'#188'C5+*)%'#15#14#6#1#2#0#0#0#0#0'C'#13#13#13#13#12#9#9
+  +#10#7#7#6'$'#210'@'#221#247#240#220#209#198#198#197#190'>'#24#3'$'#0#0#0#0'$'
+  +#24#24#13#13#12#12#9#9#10#10#6'/'#234'?QW^bx~'#215#217#218#219#213#198'/$'#0
+  +#0'C$''$'#24#13#13#12#12#9#9#10#7'/'#241'HPSSSSSWX`z}'#216#235#196#13#0'('''
+  +'''$$'#31#161#165#148#26#9#9#10'/'#246'JQWWX^^XXXSWV]|8'#0'(('''','#166#168
+  +#168#167#163#12#9#9'2'#249'kRX^__aaa_^YWTN1E/((''"'#175#169#168#167#167#30#12
+  +#9'2'#251#192'Z_advwwvdd_^WO.9//((#'#175#169#169#168#167#27#12#12'8'#252#195
+  +'[aw'#128#129#130#130#129#128'wd_YO-/2//(('#170#176#169#169#161#24#13#12'2'
+  +#254#201'\'#129#131#133#133#136#133#131#129'wd_g''22///(.'#151#152#150'$'#24
+  +#24#13'2'#254#202'q'#129#131#136#137#138#137#137#136#133#129'wcg&222/2/((('''
+  +''''#24#24#24'2'#254#204'r'#131#136#137#223#224#225#223#138#136#131#129'ef'
+  +#24'9222///((''''$$'#13'2'#254#206'r'#134#137#223#225#229#229#227#224#137#134
+  +#129'F'#24';9222///((($$$2'#254#209't'#135#138#225#229#232#232#229#225#139
+  +#136#130'f'#24#191'992222//(((,!2'#254#210'hi{'#132#222#228#231#230#226#140
+  +#136#131'f'#24#0'9992222//(7'#178#175'9'#254#246#237#213#205#201#192'lmpnos'
+  +'uvf$'#0';9998'#181#182#156'//'#153#176#176' '#205#214#243#246#246#246#244
+  +#243#219#208#199#193'k@6G('#0#191':99'#185#183#183#180'2('#154#179#176#147
+  +#142#29#23#10#13'''+;E'#190#193#200#202#200#194'>'#9#0#0';:9'#186#187#183#183
+  +#171#171#182#179#179#176#176#175#175#169#162#13#9#9#10#6#6#10#6#9#9'/'#0#0#0
+  +#196'::A'#187#187#183#183#183#182#179#179#179#176#176#175#175#164#24#24#13#9
+  +#13#9#10#8#10'2'#0#0#0#0#0'C::'#158#187#187#183#183#182#182#179#179#176#176
+  +#176#175#150'$'#25#25#13#12#12#9#9#13#0#0#0#0#0#0#0':;:A'#186#187#183#183#182
+  +#182#179#182#179#176#176#174#150#173#166#31#13#12#12#9#0#0#0#0#0#0#0#0#0';;:'
+  +';'#159#187#183#183#182#182#179#179#179#176#176#175#173#150#13#13#13#12#0#0#0
+  +#0#0#0#0#0#0#0#0'B::99'#157#184#180#183#182#179#179#178#155#149'''$$'#24''''
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#196';:999222///(((''$;'#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#196';9992222//((B'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#191':922'
+  +'22'#189#0#0#0#0#0#0#0#0#0#0#0#0#255#240#0#15#255#128#0#7#254#0#0#3#252#0#0#3
+  +#248#0#0#3#240#0#0#7#224#0#0#7#192#0#0#3#192#0#0#1#128#0#0#0#128#0#0#0#128#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#128#0#0
+  +#0#128#0#0#0#128#0#0#0#192#0#0#1#192#0#0#3#224#0#0#7#240#0#0#15#248#0#0#31
+  +#252#0#0'?'#254#0#0''#255#128#1#255#255#240#15#255'('#0#0#0#16#0#0#0' '#0#0
+  +#0#1#0#8#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#1#0#0#0#0#0#0#13#13#13#0
+  ,#18#18#18#0#25#26'*'#0#29#31'4'#0'!!!'#0'&&&'#0'$%+'#0'***'#0'**,'#0',,,'#0
+  +'000'#0'555'#0':77'#0'999'#0'99<'#0'==='#0#10#11'P'#0#10#14']'#0'(.J'#0'>>@'
+  +#0'16J'#0'#,Z'#0'(2_'#0'6=Z'#0':=\'#0#18#26'n'#0'CCC'#0'CCD'#0'BCH'#0'HHH'#0
+  +'MMM'#0'EHV'#0'RRR'#0'WWW'#0'PS_'#0'\\\'#0'j]['#0'k^]'#0'GNf'#0'\]`'#0'_cn'#0
+  +'bbb'#0'eee'#0'gbh'#0'fgj'#0'jhh'#0'mmm'#0'qca'#0'qff'#0'poo'#0'qqq'#0'ttt'#0
+  +'|||'#0#152'|X'#0#131'tq'#0#128'xr'#0#133'{y'#0#133'|{'#0#249#143#12#0#249
+  +#155#27#0#254#158#28#0#202#133'-'#0#199#140'5'#0#198#145'='#0#254#157' '#0
+  +#254#170','#0#254#174'3'#0#249#177':'#0#255#182'>'#0#170#148'r'#0#197#148'B'
+  +#0#248#171'D'#0#225#185'^'#0#226#169'b'#0#250#194'U'#0#255#196'U'#0#255#199
+  +'Z'#0#255#202'^'#0#255#207'e'#0#255#216'v'#0#254#217'x'#0#12#15#129#0'+<'#130
+  +#0'''<'#144#0' 1'#154#0#0#11#175#0#25'5'#165#0'>O'#139#0'.H'#169#0'>V'#169#0
+  +'=W'#178#0'I]'#159#0'Qa'#149#0'Wh'#156#0'E]'#171#0'Sk'#180#0#24';'#193#0#19
+  +'9'#210#0#7'2'#225#0#7'9'#254#0#30'B'#201#0#27'B'#213#0#26'B'#217#0#23'B'#229
+  +#0#27'J'#247#0#16'A'#255#0#25'J'#255#0'"S'#255#0'+['#255#0'5d'#255#0'?l'#249
+  +#0'>m'#255#0'B`'#193#0'No'#208#0#133#132#132#0#141#141#141#0#155#141#139#0
+  +#145#145#145#0#149#149#149#0#159#152#149#0#154#152#154#0#159#158#158#0#162
+  +#149#136#0#161#152#150#0#174#167#159#0#176#164#146#0#166#167#171#0#174#170
+  +#169#0#178#172#170#0#179#177#179#0#204#169#132#0#194#189#187#0#197#191#190#0
+  +#241#215#130#0#254#225#134#0#254#230#140#0#251#240#163#0#202#199#196#0#205
+  +#204#202#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'/'#12#2#1#10'+55'#0#0#0#0#0#0'4'#6#6#3
+  +#18#17'/'#132'|7%2'#0#0#0'"'#12#10#6#4'VRyzu90s'#0#0'5'#14#12#10#10#7#26',{9'
+  +'0&'#12'$'#0#0#27#14#14#12#10#10#6'x;AHJ'#131'8ts'#30#27'ac'#23#12#10#128'<B'
+  +'CB<>++'#30' jdW'#12#10#132'DLNMD?'#14'$"'#30'Ye'#24#14#12#138'LP'#135'QN@'#6
+  +'$""'#30#30#27#14#12#139'I'#134#137#136'NG'#10'4$""'#30#30#29#14''#130#128
+  +'}~F6'#14'v+$\#''ieb'#21#12#22'U'#25#14'4'#0'+^pq[lihT'#14#12#19#10#6#0#0'v/'
+  +'rpnmlig'#20#14#12#11'4'#0#0#0'5,`pnmligS'#14'"'#0#0#0#0#0'v.)]_ZX '#27'5'#0
+  +#0#0#0#0#0#0#0't4$"+s'#0#0#0#0#0#248#7#0#0#224#1#0#0#192#1#0#0#128#1#0#0#128
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#128#1#0#0#128#1#0#0
+  +#192#3#0#0#224#7#0#0#248#31#0#0'('#0#0#0'0'#0#0#0'`'#0#0#0#1#0' '#0#0#0#0#0
+  +#128'%'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#25#25#25'/'#23#23#23'o'#22#22#22#159#20#20#20#191
+  +#18#18#18#255#16#16#16#255#15#15#15#255#13#13#13#255#11#11#11#255#10#10#10
+  +#255#8#8#8#191#8#8#8#161#9#9#9'u'#20#20#20'A444%4443444<444A444D444D444B444='
+  +'4445444''444'#24'444'#12'444'#5'444'#2#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0'   '#31#30#30#30#143#28#28#28#223#26#26#26#255#25#25
+  +#25#255#23#23#23#255#21#21#21#255#20#20#20#255#18#18#18#255#16#16#16#255#15
+  +#15#15#255#13#13#13#255#11#11#11#255#11#11#11#255#12#12#12#255#14#14#14#255
+  +#19#19#19#255#27#27#27#237'$$$'#205'000'#169'444'#167'444'#172'444'#173'444'
+  +#168'444'#160'444'#145'444w444Q444/444'#24'444'#9'444'#3#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0'$$$/###'#175'!!!'#255#31#31#31#255#30#30#30#255#28#28#28#255
+  +#26#26#26#255#25#25#25#255#23#23#23#255#21#21#21#255#20#20#20#255#18#18#18
+  +#255#16#16#16#255#15#15#15#255#14#14#14#255#15#15#15#255#19#19#19#255#26#26
+  +#26#255'"""'#255'''''&'#255'***'#255'/..'#255'444'#254'432'#253'/..'#252',++'
+  +#250'+++'#246'+,,'#234'000'#209'444'#180'444'#130'444A444'#29'444'#9'444'#2#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0'***'#15'((('#143'&&&'#255'$$$'#255'###'#255'!!!'#255#31#31#31#255
+  +#30#30#30#255#28#28#28#255#26#26#26#255#25#25#25#255#23#23#23#255#21#21#21
+  +#255#20#20#20#255#18#18#18#255#16#16#16#255#17#17#17#255#19#19#19#255#31#31
+  +#31#255'---'#255'kgg'#255#151#145#144#255#173#165#164#255#178#169#166#255#171
+  ,#159#157#255#158#144#142#255#139'{y'#255'}lj'#255'l^\'#255'RIH'#255'-**'#244
+  +'*++'#245'000'#208'444'#146'444?444'#22'444'#4#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'---?+++'#239')))'#255'((('
+  +#255'&&&'#255'$$$'#255'###'#255'!!!'#255#31#31#31#255#30#30#30#255#26#27'%'
+  +#255#19#22'?'#255#13#17'X'#255#11#14'^'#255#10#12'['#255#9#10'X'#255#10#10'V'
+  +#255#12#12'H'#255#30#30''''#255'_]\'#255#194#189#188#255#230#224#222#255#225
+  +#218#217#255#220#212#211#255#215#206#203#255#202#191#188#255#184#171#169#255
+  +#164#149#145#255#145'{'#255#140'xu'#255#143'zw'#255#132'so'#255'TKI'#255'**'
+  +'*'#250'000'#201'444t444$444'#5#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0'000o...'#255'---'#255'+++'#255')))'#255'((('#255
+  +'&&&'#255'$$$'#255'###'#255'!!!'#255#31#31#31#255#28#29''''#255#14#20'f'#255
+  +#0#9#173#255#0#7#169#255#0#5#165#255#0#3#161#255#1#2#155#255#13#13'm'#255'RQ'
+  +'P'#255#229#222#221#255#234#230#227#255#233#229#227#255#237#233#233#255#201
+  +#197#196#255#128'}{'#255'olk'#255'jfe'#255'kcb'#255'yli'#255#138'ws'#255#137
+  +'vt'#255#137'wt'#255#145'}y'#255'KDB'#255'***'#233'444'#133'444*444'#5#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'333'#159'222'#255
+  +'000'#255'...'#255'---'#255'+++'#255')))'#255'((('#255'&&&'#255'$$$'#255'###'
+  +#255'!!!'#255#31#31#31#255#22#26'C'#255#0#11#177#255#0#9#173#255#0#7#169#255
+  +#1#6#163#255#2#5#156#255#16#16'^'#255'zxw'#255#247#242#240#255#238#235#235
+  +#255#252#251#251#255#196#194#194#255'UTT'#255#135#132#132#255#130'}}'#255#135
+  +#132#131#255#131#129#128#255'][['#255'FA@'#255#129'pm'#255#136'vs'#255#143'{'
+  +'x'#255'fYW'#255'((('#232'444g444 444'#5#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0'777'#159'555'#255'333'#255'222'#255'000'#255'...'#255'-'
+  +'--'#255'+++'#255')))'#255'((('#255'&&&'#255'$$$'#255'###'#255'!!!'#255#20#25
+  +'Y'#255#0#13#181#255#0#11#177#255#1#10#170#255#4#10#161#255#8#12#147#255#17
+  +#19'k'#255'==C'#255#222#218#218#255#255#255#255#255#255#255#255#255#165#165
+  +#165#255'cbb'#255#231#225#224#255#166#151#147#255#175#161#159#255#189#178#176
+  +#255#196#184#183#255'lhh'#255'LEC'#255#145'~y'#255#138'xu'#255'<76'#255'((('
+  +#182'4443444'#18'444'#3#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0':::o'
+  +'888'#255'777'#255'555'#255'333'#255'222'#255'000'#255'...'#255'---'#255'+++'
+  +#255')))'#255'((('#255'&&&'#255'$$$'#255'###'#255#16#25'o'#255#0#16#185#255#1
+  +#14#178#255#4#14#167#255#10#17#150#255#20#24'o'#255' "O'#255'#$/'#255'9::'
+  +#255#150#150#150#255#187#187#187#255#128#129#129#255'HBA'#255#157#136#135#255
+  +#131'db'#255#139'nl'#255#144'xv'#255#153#134#130#255'rge'#255'KDC'#255'yjh'
+  +#255'955'#255'"""'#220'+++=444'#26'444'#8'444'#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0'===?;;;'#255':::'#255'888'#255'777'#255'555'#255'333'#255'222'
+  +#255'000'#255'...'#255'---'#255'+++'#255')))'#255'((('#255'&&&'#255'$$$'#255
+  +#24#30'T'#255#0#18#190#255#2#17#181#255#8#19#161#255#25#28'W'#255'--1'#255'@'
+  +'?B'#255'=9='#255':55'#255':65'#255'<87'#255'844'#255'2.-'#255'4..'#255';..'
+  +#255'C33'#255'P;:'#255'iML'#255'WDC'#255'('''''#255'***'#255#31'  '#255#17#17
+  +#17#255#27#27#27'h444'#24'444'#9'444'#3#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'AAA'
+  +#15'???'#239'==='#255';;;'#255':::'#255'888'#255'777'#255'555'#255'333'#255
+  +'222'#255'000'#255'...'#255'---'#255'+++'#255')))'#255'((('#255'&&&'#255'$$$'
+  +#255#22#29'^'#255#2#19#184#255#25#30'M'#255'CCC'#255#144#137#136#255#145#134
+  +#131#255#188#184#191#255#184#177#182#255#166#156#158#255#150#136#136#255#135
+  +'vu'#255'mk'#255#129'rn'#255#128'tr'#255'jdb'#255'TON'#255'D??'#255'-**'#255
+  +#28#29#29#255'+++'#255'((('#255'!!!'#255#24#24#24#237',,,H444 444'#14'444'#5
+  +#0#0#0#0#0#0#0#0#0#0#0#0'BBB'#159'@@@'#255'???'#255'==='#255';;;'#255':::'
+  +#255'888'#255'777'#255'555'#255'333'#255'222'#255'000'#255'...'#255'---'#255
+  +'+++'#255')))'#255'((('#255'&&&'#255'$$$'#255'$$$'#255'%%%'#255#175#175#173
+  +#255#160#151#150#255'gYS'#255#238#203#149#255#255#227#181#255#250#231#202#255
+  +#231#222#211#255#207#199#198#255#186#181#187#255#166#158#165#255#157#145#149
+  +#255#160#146#146#255#166#152#150#255#169#156#153#255#164#153#151#255'ton'#255
+  +'CAA'#255'***'#255')))'#255'%%%'#255'&&&'#210'444W444*444'#17#0#0#0#0#0#0#0#0
+  +'EEE/DDD'#255'BBB'#255'@@@'#255'???'#255'==='#255';;;'#255':::'#255'888'#255
+  +'777'#255'555'#255'333'#255'222'#255'000'#255'...'#255'---'#255'+++'#255')))'
+  +#255'((('#255'&&&'#255'%%%'#255'&&&'#255#183#183#182#255#165#159#159#255'n^S'
+  +#255#239#136#11#255#255#147#12#255#255#150#17#255#255#159#31#255#255#181'C'
+  +#255#255#198'l'#255#251#207#142#255#242#211#167#255#220#203#183#255#194#186
+  +#184#255#183#177#186#255#181#173#180#255#191#182#183#255#196#186#186#255#158
+  +#152#151#255'MKK'#255'))*'#255')))'#255'111'#187'444b444$'#0#0#0#0#0#0#0#0'G'
+  +'GG'#191'EEE'#255'DDD'#255'BBB'#255'@@@'#255'???'#255'==='#255';;;'#255':::'
+  +#255'888'#255'777'#255'555'#255'333'#255'222'#255'000'#255'...'#255'---'#255
+  +'+++'#255')))'#255'((('#255''''''''#255'&&&'#255#191#191#191#255#173#167#169
+  ,#255'sdY'#255#238#137#13#255#255#145#10#255#254#144#10#255#254#143#9#255#254
+  +#142#7#255#254#140#5#255#255#145#10#255#255#150#16#255#255#156#25#255#252#171
+  +';'#255#239#181'd'#255#224#183#130#255#202#180#157#255#189#178#176#255#194
+  +#189#197#255#206#202#208#255#157#154#157#255'655'#255'***'#247'444'#158'4447'
+  +#0#0#0#0'JJJ'#31'III'#255'GGG'#255'EEE'#255'DDD'#255'BBB'#255'@@@'#255'???'
+  +#255'==='#255';;;'#255':::'#255'888'#255'777'#255'555'#255'333'#255'222'#255
+  +'000'#255'...'#255'---'#255'+++'#255')))'#255')))'#255''''''''#255#199#199
+  +#198#255#182#177#178#255'wh]'#255#238#138#13#255#255#146#12#255#254#146#14
+  +#255#254#150#17#255#254#153#21#255#254#154#24#255#254#156#24#255#254#156#24
+  +#255#254#156#23#255#255#152#17#255#255#150#13#255#255#150#16#255#252#150#19
+  +#255#239#154')'#255#215#156'N'#255#197#159's'#255#201#182#166#255#180#175#173
+  +#255'222'#255'111'#182'444D'#0#0#0#0'LLL'#143'JJJ'#255'III'#255'GGG'#255'EEE'
+  +#255'DDD'#255'BBB'#255'@@@'#255'???'#255'2<a'#255#23'7'#181#255#14'3'#203#255
+  +#17'2'#188#255'"3~'#255'555'#255'333'#255'222'#255'000'#255'...'#255'---'#255
+  +'+++'#255'***'#255''''''''#255#207#207#207#255#189#184#187#255'zmb'#255#238
+  +#139#15#255#255#152#17#255#254#154#24#255#254#159#29#255#254#163'!'#255#254
+  +#164'$'#255#254#165'&'#255#254#166''''#255#254#166''''#255#254#164'$'#255#254
+  +#163'"'#255#254#159#29#255#255#156#23#255#255#151#15#255#255#145#9#255#255
+  +#145#10#255#218''#14#255#136'w'#255'==>'#255'***'#219'444F'#0#0#0#0'NNN'
+  +#223'LLL'#255'JJJ'#255'III'#255'GGG'#255'EEE'#255'DDD'#255'BBB'#255',?'#136
+  +#255#7'9'#255#255#4'6'#255#255#1'4'#254#255#0'1'#252#255#0'/'#248#255#20'1'
+  +#173#255'555'#255'333'#255'222'#255'000'#255'...'#255'---'#255',,,'#255''''''
+  +''''#255#213#213#213#255#197#192#194#255'rg'#255#238#145#22#255#255#159#27
+  +#255#254#163'"'#255#254#166'('#255#255#170'-'#255#255#173'0'#255#255#175'3'
+  +#255#255#176'4'#255#255#175'4'#255#255#173'1'#255#255#171'.'#255#255#167'*'
+  +#255#254#164'$'#255#254#159#30#255#254#154#23#255#255#151#15#255#230#129#7
+  +#255'~si'#255'<;<'#255'&&&'#245'444FQQQ/OOO'#255'NNN'#255'LLL'#255'JJJ'#255
+  +'III'#255'GGG'#255'EEE'#255'@DO'#255#16'?'#243#255#10'<'#255#255#7'9'#255#255
+  +#4'6'#255#255#1'4'#254#255#0'1'#252#255#0'/'#248#255'"3~'#255'555'#255'333'
+  +#255'222'#255'000'#255'...'#255'---'#255''''''''#255#220#220#220#255#203#198
+  +#201#255#130'vl'#255#238#152#31#255#255#167'$'#255#255#171'-'#255#255#176'4'
+  +#255#255#180':'#255#255#182'>'#255#255#183'A'#255#255#184'A'#255#255#183'A'
+  +#255#255#182'?'#255#255#180';'#255#255#176'5'#255#255#172'.'#255#255#167'('
+  +#255#254#161' '#255#255#158#24#255#229#134#13#255'zof'#255';:;'#255'%%%'#255
+  +'$$$hRRRoQQQ'#255'OOO'#255'NNN'#255'LLL'#255'JJJ'#255'III'#255'GGG'#255'9Et'
+  +#255#16'B'#255#255#13'?'#255#255#10'<'#255#255#7'9'#255#255#4'6'#255#255#1'4'
+  +#254#255#0'1'#252#255#17'2'#188#255'777'#255'555'#255'333'#255'222'#255'000'
+  +#255'...'#255''''''''#255#226#226#226#255#208#206#208#255#134'{r'#255#239#159
+  +'('#255#255#175'/'#255#255#178'9'#255#255#184'A'#255#255#188'H'#255#255#192
+  +'M'#255#255#193'P'#255#255#194'Q'#255#255#193'Q'#255#255#192'N'#255#255#189
+  +'J'#255#255#186'C'#255#255#180';'#255#255#176'4'#255#255#169'*'#255#255#165
+  +' '#255#229#140#21#255'vk`'#255':9:'#255'%%%'#255#27#27#27#151'TTT'#175'SSS'
+  +#255'QQQ'#255'OOO'#255'NNN'#255'LLL'#255'JJJ'#255'III'#255';Gu'#255#19'E'#255
+  +#255#16'B'#255#255#13'?'#255#255#10'<'#255#255#7'9'#255#255#4'6'#255#255#1'4'
+  +#254#255#14'3'#203#255'888'#255'777'#255'555'#255'333'#255'222'#255'000'#255
+  +''''''''#255#230#230#230#255#215#212#215#255#138#128'v'#255#239#165'1'#255
+  +#255#182';'#255#255#187'E'#255#255#193'O'#255#255#197'W'#255#255#201'['#255
+  +#255#202'^'#255#255#203'_'#255#255#202'_'#255#255#201'\'#255#255#198'X'#255
+  +#255#194'Q'#255#255#188'H'#255#255#182'>'#255#255#176'4'#255#255#172')'#255
+  +#230#146#28#255'sg]'#255'988'#255'&&&'#255#24#24#24#185'VVV'#207'TTT'#255'SS'
+  +'S'#255'QQQ'#255'OOO'#255'NNN'#255'LLL'#255'JJJ'#255'@Ik'#255#22'G'#255#255
+  +#19'E'#255#255#16'B'#255#255#13'?'#255#255#10'<'#255#255#7'9'#255#255#4'6'
+  +#255#255#26'7'#169#255':::'#255'888'#255'777'#255'555'#255'333'#255'222'#255
+  +''''''''#255#234#234#234#255#220#217#218#255#142#132'z'#255#239#171'9'#255
+  +#255#189'E'#255#255#194'P'#255#255#201'['#255#255#204'c'#255#255#208'h'#255
+  +#255#209'k'#255#255#211'l'#255#255#211'l'#255#255#208'i'#255#255#206'd'#255
+  +#255#202']'#255#255#196'T'#255#255#189'I'#255#255#183'?'#255#255#177'2'#255
+  +#230#151'#'#255'mcY'#255'767'#255''''''''#255#23#23#23#209'XXX'#255'VVV'#255
+  +'TTT'#255'SSS'#255'QQQ'#255'OOO'#255'NNN'#255'LLL'#255'JJJ'#255'%J'#209#255
+  +#22'G'#255#255#19'E'#255#255#16'B'#255#255#13'?'#255#255#10'<'#255#255#10'9'
+  +#243#255'6<U'#255';;;'#255':::'#255'888'#255'777'#255'555'#255'333'#255''''''
+  +''''#255#234#234#234#255#222#221#222#255#145#136''#255#240#176'A'#255#255
+  +#196'O'#255#255#201'['#255#255#206'e'#255#255#211'm'#255#255#215't'#255#255
+  +#217'x'#255#255#218'y'#255#255#217'y'#255#255#216'u'#255#255#212'o'#255#255
+  ,#207'g'#255#255#202'^'#255#255#196'T'#255#255#188'G'#255#255#182':'#255#231
+  +#156'('#255'l^Q'#255'656'#255''''''''#255#22#22#22#255'YYY'#255'XXX'#255'VVV'
+  +#255'TTT'#255'SSS'#255'QQQ'#255'OOO'#255'NNN'#255'LLL'#255'GJV'#255'%J'#209
+  +#255#22'G'#255#255#19'E'#255#255#16'B'#255#255#16'?'#243#255'3?p'#255'???'
+  +#255'==='#255';;;'#255':::'#255'888'#255'777'#255'555'#255'((('#255#233#234
+  +#234#255#225#224#225#255#149#140#131#255#240#180'I'#255#255#201'X'#255#255
+  +#206'd'#255#255#211'm'#255#255#217'w'#255#255#221''#255#255#225#132#255#255
+  +#226#136#255#255#225#135#255#255#222#129#255#255#218'z'#255#255#213'o'#255
+  +#255#206'e'#255#255#201'['#255#255#193'O'#255#255#187'A'#255#234#160'-'#255
+  +'k[L'#255'545'#255'((('#255#22#22#22#255'[[['#255'YYY'#255'XXX'#255'VVV'#255
+  +'TTT'#255'SSS'#255'QQQ'#255'OOO'#255'NNN'#255'LLL'#255'JJJ'#255'@Ik'#255';Gu'
+  +#255'9Et'#255'DDD'#255'BBB'#255'@@@'#255'???'#255'==='#255';;;'#255':::'#255
+  +'888'#255'777'#255'((('#255#233#233#233#255#227#225#227#255#151#144#135#255
+  +#240#183'N'#255#255#203']'#255#255#208'i'#255#255#216'u'#255#255#222#128#255
+  +#255#227#138#255#254#233#146#255#254#234#150#255#254#233#147#255#254#229#140
+  +#255#255#224#131#255#255#217'x'#255#255#209'l'#255#255#204'b'#255#255#197'U'
+  +#255#255#189'F'#255#234#164'2'#255'gWH'#255'444'#255'((('#255#24#24#24#255']'
+  +']]'#255'[[['#255'YYY'#255'XXX'#255'VVV'#255'TTT'#255'SSS'#255'QQQ'#255'OOO'
+  +#255'NNN'#255'LLL'#255'JJJ'#255'III'#255'GGG'#255'EEE'#255'DDD'#255'BBB'#255
+  +'@@@'#255'???'#255'==='#255';;;'#255':::'#255'888'#255'((('#255#233#233#233
+  +#255#229#229#230#255#153#147#139#255#240#184'Q'#255#255#206'`'#255#255#211'm'
+  +#255#255#218'z'#255#255#225#135#255#254#231#146#255#254#238#157#255#254#240
+  +#163#255#254#239#159#255#254#234#149#255#255#227#138#255#255#220'}'#255#255
+  +#212'p'#255#255#206'e'#255#255#198'X'#255#255#192'I'#255#235#165'5'#255'fUF'
+  +#255'424'#255')))'#255#25#25#25#255'^^^'#255']]]'#255'[[['#255'YYY'#255'XXX'
+  +#255'VVV'#255'TTT'#255'SSS'#255'QQQ'#255'OOO'#255'NNN'#255'LLL'#255'JJJ'#255
+  +'III'#255'GGG'#255'EEE'#255'DDD'#255'BBB'#255'@@@'#255'???'#255'==='#255';;;'
+  +#255':::'#255'''(+'#255#233#233#233#255#230#230#231#255#153#147#139#255#239
+  +#191'P'#255#255#212'b'#255#255#217'p'#255#255#225'~'#255#255#233#139#255#255
+  +#238#152#255#255#244#166#255#255#250#177#255#255#244#170#255#254#237#154#255
+  +#254#229#142#255#255#221#128#255#255#213'r'#255#255#207'f'#255#255#199'Y'#255
+  +#255#192'K'#255#234#166'5'#255'hXI'#255'434'#255')))'#255#26#26#26#255'```'
+  +#255'^^^'#255']]]'#255'[[['#255'YYY'#255'XXX'#255'VVV'#255'TTT'#255'SSS'#255
+  +'QQQ'#255'OOO'#255'NNN'#255'LLL'#255'JJJ'#255'III'#255'GGG'#255'EEE'#255'DDD'
+  +#255'BBB'#255'@@@'#255'???'#255'==='#255';;;'#255'''(*'#255#233#233#233#255
+  +#230#229#230#255#159#156#151#255#165#140'Z'#255#180#151'Z'#255#186#158']'#255
+  +#198#171'g'#255#215#191'v'#255#227#208#132#255#235#222#147#255#248#238#163
+  +#255#255#247#166#255#255#244#156#255#255#237#143#255#255#227#129#255#255#218
+  +'s'#255#255#209'f'#255#255#201'Y'#255#255#193'J'#255#234#165'5'#255'k[L'#255
+  +'544'#255'***'#255#27#27#27#255'bbb'#207'```'#255'^^^'#255']]]'#255'[[['#255
+  +'YYY'#255'XXX'#255'VVV'#255'TTT'#255'SSS'#255'QQQ'#255'OOO'#255'NNN'#255'LLL'
+  +#255'JJJ'#255'III'#255'GGG'#255'EEE'#255'DDD'#255'BBB'#255'@@@'#255'???'#255
+  +'==='#255'((('#255#233#233#233#255#239#238#237#255#204#202#202#255#184#184
+  +#191#255#176#176#180#255#175#171#171#255#158#154#152#255#137#134#129#255'}xr'
+  +#255#129'}n'#255#146#139'u'#255#164#154'y'#255#175#161'v'#255#183#165'o'#255
+  +#192#167'g'#255#208#175'_'#255#227#182'Y'#255#238#183'N'#255#250#182'A'#255
+  +#233#163'.'#255'm^O'#255'646'#255'***'#255#31#31#31#208'ccc'#175'bbb'#255'``'
+  +'`'#255'^^^'#255']]]'#255'[[['#255'YYY'#255'XXX'#255'VVV'#255'TTT'#255'SSS'
+  +#255'QQQ'#255'OOO'#255'NNN'#255'LLL'#255'JJJ'#255'III'#255'GGG'#255'EEE'#255
+  +'DDD'#255'BBB'#255'@@@'#255'???'#255'&&&'#255#201#201#201#255#242#242#242#255
+  +#243#242#242#255#250#248#247#255#252#250#250#255#246#243#242#255#233#229#229
+  +#255#222#217#217#255#212#207#207#255#198#192#193#255#181#175#176#255#163#157
+  +#159#255#152#145#149#255#147#140#142#255#142#134#132#255#128'ws'#255'pgb'#255
+  +'ocU'#255#129'kM'#255#135'i?'#255'pe['#255'655'#255')))'#255#31#31#31#194'ee'
+  +'eoccc'#255'bbb'#255'```'#255'^^^'#255']]]'#255'[[['#255'YYY'#255'XXX'#255'V'
+  +'VV'#255'TTT'#255'SSS'#255'QQQ'#255'OOO'#255'NNN'#255'LLL'#255'JJJ'#255'III'
+  +#255'GGG'#255'<Eh'#255'ADO'#255'BBB'#255'@@@'#255'+++'#255''')0'#255')/F'#255
+  +';=H'#255'WW\'#255'poo'#255#130#130#130#255#146#145#145#255#161#159#158#255
+  +#175#171#170#255#187#182#181#255#198#191#189#255#201#193#192#255#201#192#191
+  +#255#199#191#188#255#194#183#181#255#182#170#167#255#170#158#157#255#159#147
+  +#146#255#144#132#135#255#134'z~'#255'pn'#255'322'#255'%%%'#255'   '#134'fff'
+  +'/eee'#255'ccc'#255'bbb'#255'```'#255'^^^'#255']]]'#255'[[['#255'YYY'#255'XX'
+  +'X'#255'VVV'#255'TTT'#255'SSS'#255'QQQ'#255'OOO'#255'NNN'#255'LLL'#255'EKa'
+  +#255'(J'#198#255#22'G'#255#255#22'E'#243#255'-C'#149#255'BBB'#255'6@c'#255#11
+  ,'8'#235#255#7'5'#239#255#5'2'#228#255#11'/'#191#255')/F'#255',,,'#255')))'
+  +#255'((('#255'((('#255'((('#255''')5'#255'13?'#255'DDJ'#255'XTT'#255'hdc'#255
+  +'slk'#255'ztr'#255#131'yw'#255#140#128'~'#255'zom'#255'755'#255'$$$'#255#31
+  +#31#31#255'"""@'#0#0#0#0'ggg'#223'eee'#255'ccc'#255'bbb'#255'```'#255'^^^'
+  +#255']]]'#255'[[['#255'S\x'#255'F^'#171#255'MY'#128#255'RU_'#255'SSS'#255'QQ'
+  +'Q'#255'OOO'#255'NNN'#255'5N'#165#255#28'M'#255#255#25'J'#255#255#22'G'#255
+  +#255#19'E'#255#255#22'B'#231#255#16'?'#243#255#10'<'#255#255#7'9'#255#255' :'
+  +#158#255'8;H'#255':::'#255'888'#255'777'#255'555'#255'333'#255'222'#255#31'+'
+  +'m'#255#4'"'#203#255#7'!'#183#255#11#31#158#255#14#30#132#255#19#30'l'#255#28
+  +'!A'#255'###'#255'%%%'#255'"""'#255'!""'#255'!!!'#255#30#30#30#225'444'#6#0#0
+  +#0#0'hhh'#143'ggg'#255'eee'#255'ccc'#255'bbb'#255'```'#255'^^^'#255'W`{'#255
+  +'=i'#244#255'8g'#255#255'5d'#255#255'@]'#191#255'TTT'#255'SSS'#255'QQQ'#255
+  +'OOO'#255'2Q'#188#255#31'P'#255#255#28'M'#255#255#25'J'#255#255#22'G'#255#255
+  +#19'E'#255#255#16'B'#255#255#13'?'#255#255#23'='#207#255'???'#255'==='#255';'
+  +';;'#255':::'#255'888'#255'777'#255'555'#255'333'#255'222'#255#9'&'#193#255#0
+  +'"'#223#255#0' '#219#255#0#30#215#255#2#29#200#255'%''2'#255'&&&'#255'$$$'
+  +#255'###'#255'!!!'#255#31#31#31#255#30#30#30#143#0#0#0#0#0#0#0#0'iii'#31'hhh'
+  +#255'ggg'#255'eee'#255'ccc'#255'bbb'#255'^aj'#255'Co'#245#255'>m'#255#255';j'
+  +#255#255'8g'#255#255'5d'#255#255'RXk'#255'TTT'#255'SSS'#255'QQQ'#255'0T'#211
+  +#255'"S'#255#255#31'P'#255#255#28'M'#255#255#25'J'#255#255#22'G'#255#255#19
+  +'E'#255#255#16'B'#255#255#13'?'#255#255'@@@'#255'???'#255'==='#255';;;'#255
+  +':::'#255'888'#255'777'#255'555'#255'333'#255'/1='#255#27'+~'#255#23'('#134
+  +#255#25'''y'#255'(*6'#255')))'#255'((('#255'&&&'#255'$$$'#255'###'#255'!!!'
+  +#255'   '#31#0#0#0#0#0#0#0#0#0#0#0#0'jjj'#191'hhh'#255'ggg'#255'eee'#255'ccc'
+  +#255'Vj'#167#255'Ds'#255#255'Ap'#255#255'>m'#255#255';j'#255#255'8g'#255#255
+  +'B`'#192#255'VVV'#255'RU_'#255'GV'#136#255'.X'#233#255'%V'#255#255'"S'#255
+  +#255#31'P'#255#255#28'M'#255#255#25'J'#255#255#22'G'#255#255#19'E'#255#255#16
+  +'B'#255#255#23'@'#219#255'">'#171#255'#<'#158#255'6<U'#255';;;'#255':::'#255
+  +'888'#255'777'#255'555'#255'333'#255'222'#255'000'#255'...'#255'---'#255'+++'
+  +#255')))'#255'((('#255'&&&'#255'$$$'#255'###'#175#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0'kkk?jjj'#255'hhh'#255'ggg'#255'eee'#255'bem'#255'Lr'#225#255'Ds'#255#255
+  +'Ap'#255#255'>m'#255#255';j'#255#255'8g'#255#255'5d'#255#255'2a'#255#255'/_'
+  +#255#255',\'#255#255')Y'#255#255'%V'#255#255'"S'#255#255#31'P'#255#255#28'M'
+  +#255#255#25'J'#255#255#22'G'#255#255#19'E'#255#255#16'B'#255#255#13'?'#255
+  +#255#10'<'#255#255#24';'#194#255'==='#255';;;'#255':::'#255'888'#255'777'#255
+  +'555'#255'333'#255'222'#255'000'#255'...'#255'---'#255'+++'#255')))'#255'((('
+  +#255'&&&'#255'$$$/'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'kkk'#159'jjj'#255
+  +'hhh'#255'ggg'#255'eee'#255'^g'#129#255'It'#245#255'Ds'#255#255'Ap'#255#255
+  +'>m'#255#255';j'#255#255'8g'#255#255'5d'#255#255'2a'#255#255'/_'#255#255',\'
+  +#255#255')Y'#255#255'%V'#255#255'"S'#255#255#31'P'#255#255#28'M'#255#255#25
+  +'J'#255#255#22'G'#255#255#19'E'#255#255#16'B'#255#255#13'?'#255#255#16'='#231
+  +#255'???'#255'==='#255';;;'#255':::'#255'888'#255'777'#255'555'#255'333'#255
+  +'222'#255'000'#255'...'#255'---'#255'+++'#255')))'#255'((('#159#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'kkk'#15'kkk'#239'jjj'#255'hhh'#255'ggg'
+  +#255'eee'#255'^g'#129#255'Gv'#255#255'Ds'#255#255'Ap'#255#255'>m'#255#255';j'
+  +#255#255'8g'#255#255'5d'#255#255'2a'#255#255'/_'#255#255',\'#255#255')Y'#255
+  +#255'%V'#255#255'"S'#255#255#31'P'#255#255#28'M'#255#255#25'J'#255#255#22'G'
+  +#255#255#19'E'#255#255#16'B'#255#255'.A'#137#255'@@@'#255'???'#255'==='#255
+  +';;;'#255':::'#255'888'#255'777'#255'555'#255'333'#255'222'#255'000'#255'...'
+  +#255'---'#255'+++'#239'***'#15#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0'kkk?kkk'#255'jjj'#255'hhh'#255'ggg'#255'eee'#255']h'#138#255'It'
+  +#245#255'Ds'#255#255'Ap'#255#255'>m'#255#255';j'#255#255'8g'#255#255'5d'#255
+  +#255'2a'#255#255'/_'#255#255',\'#255#255')Y'#255#255'%V'#255#255'"S'#255#255
+  +#31'P'#255#255#28'M'#255#255#25'J'#255#255#22'G'#255#255#22'E'#243#255'DDD'
+  +#255'BBB'#255'@@@'#255';>K'#255'6<U'#255';;;'#255':::'#255'888'#255'777'#255
+  +'555'#255'333'#255'222'#255'000'#255'...'#255'---?'#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'kkkkkk'#255'jjj'#255'hhh'#255
+  +'ggg'#255'eee'#255'^g'#129#255'Ks'#235#255'Ds'#255#255'Ap'#255#255'>m'#255
+  +#255';j'#255#255'8g'#255#255'5d'#255#255'2a'#255#255'/_'#255#255',\'#255#255
+  +')Y'#255#255'%V'#255#255'"S'#255#255#31'P'#255#255#28'M'#255#255#25'J'#255
+  +#255#22'G'#255#255'&E'#185#255'ADO'#255'.A'#137#255#13'<'#243#255#7'9'#255
+  +#255'!:'#157#255';;;'#255':::'#255'888'#255'777'#255'555'#255'333'#255'222'
+  +#255'000o'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0'kkk'#159'kkk'#255'jjj'#255'hhh'#255'ggg'#255'eee'#255
+  ,'bem'#255'Sm'#186#255'Ds'#255#255'Ap'#255#255'>m'#255#255';j'#255#255'8g'#255
+  +#255'5d'#255#255'2a'#255#255'/_'#255#255',\'#255#255')Y'#255#255'%V'#255#255
+  +'"S'#255#255#31'P'#255#255#28'M'#255#255#25'J'#255#255#22'G'#255#255#22'E'
+  +#243#255#16'B'#255#255#13'?'#255#255#10'<'#255#255'#<'#159#255'==='#255';;;'
+  +#255':::'#255'888'#255'777'#255'555'#255'333'#159#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +'kkk'#159'kkk'#255'jjj'#255'hhh'#255'ggg'#255'eee'#255'ccc'#255']e'#255'Mm'
+  +#205#255'Ap'#255#255'>m'#255#255';j'#255#255'8g'#255#255'5d'#255#255'2a'#255
+  +#255'/_'#255#255',\'#255#255')Y'#255#255'%V'#255#255'"S'#255#255#31'P'#255
+  +#255#28'M'#255#255#25'J'#255#255#22'G'#255#255#19'E'#255#255' B'#196#255'8Ae'
+  +#255'@@@'#255'???'#255'==='#255';;;'#255':::'#255'888'#255'777'#159#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'kkkkkk'#255'jjj'#255'hhh'#255'ggg'#255'e'
+  +'ee'#255'ccc'#255'bbb'#255']bt'#255'Nh'#185#255'Dj'#224#255';j'#255#255'8g'
+  +#255#255'5d'#255#255'2a'#255#255'/_'#255#255',\'#255#255')Y'#255#255'%V'#255
+  +#255'"S'#255#255#31'P'#255#255'%M'#221#255'.J'#175#255'AG^'#255'EEE'#255'DDD'
+  +#255'BBB'#255'@@@'#255'???'#255'==='#255';;;'#255':::o'#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'kkkOkkk'#239'jjj'#255'hhh'#255'ggg'
+  +#255'eee'#255'ccc'#255'bbb'#255'```'#255'^^^'#255'[^g'#255'S_'#132#255'H`'
+  +#172#255'F^'#171#255'D\'#171#255'AY'#170#255'?W'#169#255'=U'#168#255'EQ{'#255
+  +'KNY'#255'LLL'#255'JJJ'#255'III'#255'GGG'#255'EEE'#255'DDD'#255'BBB'#255'@@@'
+  +#255'???'#239'===?'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0'kkk'#15'kkk'#159'jjj'#255'hhh'#255'ggg'#255'eee'#255'ccc'
+  +#255'bbb'#255'```'#255'^^^'#255']]]'#255'[[['#255'YYY'#255'XXX'#255'VVV'#255
+  +'TTT'#255'SSS'#255'QQQ'#255'OOO'#255'NNN'#255'LLL'#255'JJJ'#255'III'#255'GGG'
+  +#255'EEE'#255'DDD'#255'BBB'#159'AAA'#15#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'kkk?jjj'#191
+  +'hhh'#255'ggg'#255'eee'#255'ccc'#255'bbb'#255'```'#255'^^^'#255']]]'#255'[[['
+  +#255'YYY'#255'XXX'#255'VVV'#255'TTT'#255'SSS'#255'QQQ'#255'OOO'#255'NNN'#255
+  +'LLL'#255'JJJ'#255'III'#255'GGG'#191'EEE?'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0'iii'#31'hhh'#143'ggg'#239'eee'#255'ccc'#255'bbb'#255
+  +'```'#255'^^^'#255']]]'#255'[[['#255'YYY'#255'XXX'#255'VVV'#255'TTT'#255'SSS'
+  +#255'QQQ'#255'OOO'#255'NNN'#223'LLL'#143'JJJ'#31#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'fff/eee'
+  +'ccc'#175'bbb'#207'```'#255'^^^'#255']]]'#255'[[['#255'YYY'#255'XXX'#255'VV'
+  +'V'#207'TTT'#175'RRRQQQ/'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#255#255#128#0#0#7#0#0#255#252#0#0#0#3#0#0#255#240#0#0#0#1#0#0#255
+  +#192#0#0#0#1#0#0#255#128#0#0#0#1#0#0#255#0#0#0#0#1#0#0#254#0#0#0#0#1#0#0#252
+  +#0#0#0#0#1#0#0#248#0#0#0#0#1#0#0#240#0#0#0#0#1#0#0#224#0#0#0#0#0#0#0#224#0#0
+  +#0#0#0#0#0#192#0#0#0#0#0#0#0#192#0#0#0#0#0#0#0#128#0#0#0#0#0#0#0#128#0#0#0#0
+  +#0#0#0#128#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#128#0#0#0#0#0#0#0#128#0#0#0#0#1#0#0#128#0#0#0#0#1#0#0
+  +#192#0#0#0#0#3#0#0#192#0#0#0#0#3#0#0#224#0#0#0#0#7#0#0#224#0#0#0#0#7#0#0#240
+  +#0#0#0#0#15#0#0#248#0#0#0#0#31#0#0#252#0#0#0#0'?'#0#0#254#0#0#0#0''#0#0#255
+  +#0#0#0#0#255#0#0#255#128#0#0#1#255#0#0#255#192#0#0#3#255#0#0#255#240#0#0#15
+  +#255#0#0#255#252#0#0'?'#255#0#0#255#255#128#1#255#255#0#0'('#0#0#0' '#0#0#0
+  +'@'#0#0#0#1#0' '#0#0#0#0#0#128#16#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#28
+  +#28#28#31#26#26#26'o'#23#23#23#191#21#21#21#239#18#18#18#255#16#16#16#255#13
+  +#13#13#255#11#11#11#255#11#11#11#227#20#20#20#223'(''&'#231'B@@'#238'QML'#247
+  +'PJJ'#250'D?>'#246'622'#235'&$$'#210#27#28#28#145#28#28#28#24#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'$$$'
+  +'?!!!'#191#31#31#31#255#28#28#28#255#26#26#26#255#23#23#23#255#21#21#21#255
+  +#18#18#18#255#16#16#16#255#19#19#19#255'654'#255#140#137#136#255#194#187#187
+  ,#255#204#196#194#255#199#189#187#255#182#167#165#255#157#139#136#255#137'wt'
+  +#255'~nk'#255'[RO'#255'+)('#239#27#28#28'_'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'+++'#15')))'#175'&&&'#255'$$$'#255'!!!'#255#31
+  +#31#31#255#28#28#28#255#26#26#26#255#23#23#23#255#21#21#21#255#20#20#20#255
+  +'?>>'#255#206#201#199#255#239#234#233#255#235#230#229#255#213#208#207#255#164
+  +#158#157#255#144#136#134#255#137'{z'#255#136'wt'#255#140'yv'#255#144'}x'#255
+  +'{li'#255'-+*'#238#28#28#28#29#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0'000?...'#239'+++'#255')))'#255'&&&'#255'$$$'#255'!!!'#255#31#31#31#255#16
+  +#21']'#255#0#9#171#255#0#5#165#255#11#12'['#255#129'~'#255#252#247#246#255
+  +#244#243#243#255#222#221#221#255'ono'#255'yww'#255'{xw'#255'trp'#255'XSR'#255
+  +'l^\'#255#137'wt'#255#147#128'{'#255'MED'#255#24#25#25'_'#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0'555_333'#255'000'#255'...'#255'+++'#255')))'#255'&&&'
+  +#255'$$$'#255'!!!'#255#23#27'E'#255#0#12#177#255#0#9#171#255#4#8#140#255'BAC'
+  +#255#224#221#221#255#255#255#255#255#201#199#199#255'}yy'#255#213#201#198#255
+  +#172#156#152#255#187#175#172#255#169#161#159#255'PKK'#255#134'to'#255'nk'
+  +#255'.,+'#249#28#28#28'!'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0':::?888'#255'555'
+  +#255'333'#255'000'#255'...'#255'+++'#255')))'#255'&&&'#255'$$$'#255#21#27'\'
+  +#255#0#15#184#255#9#17'z'#255#20#23'M'#255#23#24'"'#255'A@@'#255#129#128#128
+  +#255'mnm'#255'EAA'#255'hWU'#255'hOM'#255'~db'#255#143'wu'#255'QIH'#255'TLJ'
+  +#255'-**'#250#27#27#28'e'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'???'#31'<<<'#239':'
+  +'::'#255'888'#255'555'#255'333'#255'000'#255'...'#255'+++'#255')))'#255'&&&'
+  +#255#29'!A'#255#19#25'R'#255'BBA'#255'uml'#255#131'~'#129#255'~vw'#255'h^^'
+  +#255']RQ'#255'ZON'#255'VLK'#255'NFF'#255'E<;'#255'E66'#255'&!!'#255#16#17#17
+  +#255#2#2#2#240#0#0#0#15#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'AAA'#191'???'#255'<<'
+  +'<'#255':::'#255'888'#255'555'#255'333'#255'000'#255'...'#255'+++'#255')))'
+  +#255'&&&'#255'@@@'#255#177#176#175#255'rl'#255#218#192#154#255#246#226#201
+  +#255#222#211#201#255#202#189#186#255#176#165#167#255#159#147#156#255#158#146
+  +#151#255#156#145#146#255#142#135#135#255'nii'#255'?=<'#255#23#24#24#255#7#7#7
+  +#194#0#0#0#0#0#0#0#0#0#0#0#0'FFF?DDD'#255'AAA'#255'???'#255'<<<'#255':::'#255
+  +'888'#255'555'#255'333'#255'000'#255'...'#255'+++'#255')))'#255'QQQ'#255#197
+  +#196#197#255'}ng'#255#221#130#18#255#255#154#18#255#255#161'!'#255#255#175'8'
+  +#255#254#182'O'#255#244#187'h'#255#226#187#136#255#206#186#165#255#194#183
+  +#180#255#192#186#192#255#188#182#188#255#158#152#154#255'WVV'#255#27#27#27
+  +#214#26#26#26#31#0#0#0#0'III'#191'FFF'#255'DDD'#255'AAA'#255'???'#255'<<<'
+  +#255':::'#255'888'#255'555'#255'333'#255'000'#255'...'#255'+++'#255'RRR'#255
+  +#207#207#208#255#132'wo'#255#220#128#15#255#255#145#9#255#254#143#9#255#254
+  +#144#9#255#255#145#9#255#255#146#10#255#255#152#18#255#255#158#27#255#248#165
+  +'3'#255#231#169'Q'#255#211#170'v'#255#201#180#164#255#202#194#197#255#147#145
+  +#150#255'--,'#237'NNN'#31'KKK'#255'III'#255'FFF'#255'DDD'#255'AAA'#255'4>c'
+  +#255#21'8'#194#255#3'2'#240#255#17'1'#187#255'+3Y'#255'333'#255'000'#255'...'
+  +#255'UUU'#255#218#217#218#255#139'w'#255#220#129#17#255#255#151#15#255#254
+  +#154#22#255#254#158#27#255#254#160#31#255#254#161' '#255#254#161#31#255#254
+  +#160#29#255#255#156#22#255#255#151#15#255#255#150#15#255#247#146#19#255#231
+  +#147'*'#255#196#163'z'#255']^d'#254'PPPoNNN'#255'KKK'#255'III'#255'FFF'#255
+  +'ADP'#255#15'>'#243#255#7':'#255#255#3'6'#254#255#0'2'#252#255#6'/'#222#255
+  +'555'#255'333'#255'000'#255'XXX'#255#227#227#230#255#144#134'~'#255#220#136
+  +#24#255#255#160#26#255#254#165'$'#255#255#169'*'#255#255#172'.'#255#255#173
+  +'2'#255#255#173'2'#255#255#172'/'#255#255#170'+'#255#254#165'%'#255#254#160
+  +#28#255#255#152#19#255#255#149#5#255#186#130'5'#255'RU_'#254'SSS'#191'QQQ'
+  +#255'NNN'#255'KKK'#255'III'#255':Fu'#255#16'B'#255#255#12'>'#255#255#7':'#255
+  +#255#3'6'#254#255#0'2'#252#255')5h'#255'555'#255'333'#255'ZZZ'#255#237#238
+  +#239#255#150#140#132#255#220#144'#'#255#255#170'('#255#255#175'3'#255#255#180
+  +';'#255#255#183'A'#255#255#186'C'#255#255#186'C'#255#255#184'A'#255#255#181
+  +'<'#255#255#176'5'#255#255#170'+'#255#254#163'!'#255#255#158#17#255#183#131
+  +';'#255'NPY'#255'VVV'#239'SSS'#255'QQQ'#255'NNN'#255'KKK'#255'=Iw'#255#21'G'
+  +#255#255#16'B'#255#255#12'>'#255#255#7':'#255#255#3'6'#254#255'39R'#255'888'
+  +#255'555'#255'\\\'#255#244#244#247#255#156#147#139#255#221#151'-'#255#255#180
+  +'5'#255#255#184'A'#255#255#191'L'#255#255#196'S'#255#255#197'V'#255#255#197
+  +'W'#255#255#196'S'#255#255#192'M'#255#255#186'C'#255#255#180'9'#255#255#171
+  +'-'#255#255#167#28#255#180#131'>'#255'JKT'#255'XXX'#255'VVV'#255'SSS'#255'QQ'
+  +'Q'#255'NNN'#255'KKK'#255'"J'#221#255#21'G'#255#255#16'B'#255#255#12'>'#255
+  +#255#24';'#195#255'<<<'#255':::'#255'888'#255']]]'#255#251#251#254#255#160
+  +#152#146#255#222#158'7'#255#255#189'C'#255#255#194'Q'#255#255#201'\'#255#255
+  +#204'c'#255#255#207'g'#255#255#207'g'#255#255#206'd'#255#255#202']'#255#255
+  ,#196'S'#255#255#188'G'#255#255#180'9'#255#255#175'('#255#177#131'A'#255'GGN'
+  +#255'[[['#255'XXX'#255'VVV'#255'SSS'#255'QQQ'#255'NNN'#255'HKW'#255'4J'#153
+  +#255'-F'#163#255'-C'#150#255'AAA'#255'???'#255'<<<'#255':::'#255']]^'#255#254
+  +#254#255#255#165#158#152#255#222#164'A'#255#255#197'P'#255#255#202'^'#255#255
+  +#208'i'#255#255#213'r'#255#255#216'v'#255#255#216'v'#255#255#213's'#255#255
+  +#209'k'#255#255#203'`'#255#255#196'T'#255#255#186'D'#255#255#182'1'#255#175
+  +#130'A'#255'CBI'#255']]]'#255'[[['#255'XXX'#255'VVV'#255'SSS'#255'QQQ'#255'N'
+  +'NN'#255'KKK'#255'III'#255'FFF'#255'DDD'#255'AAA'#255'???'#255'<<<'#255']]]'
+  +#255#255#255#255#255#170#164#157#255#222#170'I'#255#255#203'['#255#255#209'j'
+  +#255#255#216'v'#255#255#222#129#255#255#226#135#255#255#226#136#255#255#222
+  +#130#255#255#217'x'#255#255#211'l'#255#255#202'^'#255#255#193'O'#255#255#188
+  +':'#255#171#129'A'#255'?>C'#255'```'#255']]]'#255'[[['#255'XXX'#255'VVV'#255
+  +'SSS'#255'QQQ'#255'NNN'#255'KKK'#255'III'#255'FFF'#255'DDD'#255'AAA'#255'???'
+  +#255']]]'#255#255#255#255#255#173#167#161#255#222#173'O'#255#255#208'b'#255
+  +#255#213'r'#255#255#222#129#255#254#230#143#255#254#235#153#255#254#237#154
+  +#255#254#230#145#255#255#224#131#255#255#215'u'#255#255#207'f'#255#255#197'U'
+  +#255#255#193'A'#255#167'B'#255';9@'#255'bbb'#239'```'#255']]]'#255'[[['#255
+  +'XXX'#255'VVV'#255'SSS'#255'QQQ'#255'NNN'#255'KKK'#255'III'#255'FFF'#255'DDD'
+  +#255'AAA'#255']]]'#255#255#255#255#255#175#171#164#255#222#178'P'#255#255#216
+  +'f'#255#255#221'w'#255#255#229#136#255#255#237#152#255#255#246#169#255#255
+  +#246#171#255#254#237#154#255#254#227#137#255#255#217'x'#255#255#208'i'#255
+  +#255#198'X'#255#255#194'C'#255#171#129'C'#255'<9?'#255'ddd'#191'bbb'#255'```'
+  +#255']]]'#255'[[['#255'XXX'#255'VVV'#255'SSS'#255'QQQ'#255'NNN'#255'KKK'#255
+  +'III'#255'CFR'#255'>D['#255']]]'#255#255#255#255#255#177#175#171#255#161#136
+  +'U'#255#184#154'W'#255#201#172'd'#255#222#198'x'#255#237#218#140#255#240#229
+  +#157#255#248#238#163#255#255#240#153#255#255#235#139#255#255#225'z'#255#255
+  +#215'j'#255#255#202'Y'#255#255#196'C'#255#175#134'D'#255'?=B'#255'fffoeee'
+  +#255'bbb'#255'```'#255']]]'#255'[[['#255'XXX'#255'VVV'#255'SSS'#255'QQQ'#255
+  +'NNN'#255'CLm'#255' J'#232#255#21'G'#255#255']^^'#255#255#255#255#255#224#222
+  +#222#255#196#197#201#255#184#183#186#255#170#166#165#255#153#149#145#255#146
+  +#140#131#255#150#144''#255#157#149'{'#255#164#153'v'#255#175#157'm'#255#184
+  +#159'b'#255#201#164'X'#255#225#175'O'#255#254#182'='#255#171#130'C'#255'BAF'
+  +#254'hhh'#31'ggg'#255'eee'#255'bbb'#255'```'#255'[^g'#255'<h'#244#255'5e'#255
+  +#255'HZ'#149#255'SSS'#255'QQQ'#255'8Q'#167#255#30'O'#255#255#26'K'#255#255'<'
+  +'BW'#255#167#167#167#255#188#188#188#255#209#208#208#255#224#222#221#255#226
+  +#222#224#255#224#220#221#255#220#215#215#255#213#207#208#255#197#189#191#255
+  +#173#166#170#255#159#151#153#255#150#140#140#255#139#128'~'#255'}rk'#255'zjZ'
+  +#255#129'o`'#255'MGG'#253#0#0#0#0'iii'#191'ggg'#255'eee'#255'bbb'#255'In'#225
+  +#255'?n'#255#255':i'#255#255':c'#234#255'VVV'#255'SSS'#255'<T'#168#255'#T'
+  +#255#255#30'O'#255#255#27'9'#170#255#24'0'#137#255#25'-v'#255'#+J'#255'-.0'
+  +#255'988'#255'IGH'#255'XVV'#255'iff'#255'}yx'#255#139#134#132#255#150#143#142
+  +#255#160#151#150#255#165#154#153#255#161#149#149#255#154#142#142#255'vkk'#255
+  +'1.-'#250#0#0#0#0'kkk?iii'#255'ggg'#255'eee'#255'Lr'#225#255'Cr'#255#255'?n'
+  +#255#255':i'#255#255'<b'#223#255'8_'#223#255',\'#255#255'''X'#255#255'#T'#255
+  +#255#30'O'#255#255#26'K'#255#255#21'G'#255#255#16'B'#255#255#12'>'#255#255#21
+  +':'#202#255':::'#255'555'#255'///'#255'***'#255'((('#255'&&&'#255''''''''#255
+  +'))('#255'10/'#255'643'#255'###'#201#27#28#28'3'#0#0#0#0#0#0#0#0'kkk'#191'ii'
+  +'i'#255'ggg'#255'agx'#255'It'#245#255'Cr'#255#255'?n'#255#255':i'#255#255'5e'
+  +#255#255'1a'#255#255',\'#255#255'''X'#255#255'#T'#255#255#30'O'#255#255#26'K'
+  +#255#255#21'G'#255#255#16'B'#255#255#18'>'#231#255'???'#255'<<<'#255':::'#255
+  +'888'#255'555'#255'333'#255'000'#255'...'#255'+++'#255')))'#191#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0'kkk'#31'kkk'#239'iii'#255'ggg'#255'`h'#130#255'It'#245#255
+  +'Cr'#255#255'?n'#255#255':i'#255#255'5e'#255#255'1a'#255#255',\'#255#255'''X'
+  +#255#255'#T'#255#255#30'O'#255#255#26'K'#255#255#21'G'#255#255'.C'#149#255'A'
+  +'AA'#255'<?K'#255'9<H'#255':::'#255'888'#255'555'#255'333'#255'000'#255'...'
+  +#239'+++'#31#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'kkk?kkk'#255'iii'#255'g'
+  +'gg'#255'agx'#255'Lr'#225#255'Cr'#255#255'?n'#255#255':i'#255#255'5e'#255#255
+  +'1a'#255#255',\'#255#255'''X'#255#255'#T'#255#255#30'O'#255#255#26'K'#255#255
+  +#24'G'#243#255'.C'#149#255#15'>'#243#255#10':'#242#255'2;a'#255':::'#255'888'
+  +#255'555'#255'333'#255'000?'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0'kkk_kkk'#255'iii'#255'ggg'#255'eee'#255'Vj'#167#255'Ep'#245#255'?n'
+  +#255#255':i'#255#255'5e'#255#255'1a'#255#255',\'#255#255'''X'#255#255'#T'#255
+  +#255#30'O'#255#255#26'K'#255#255#21'G'#255#255#20'B'#243#255'*@'#148#255'???'
+  +#255'<<<'#255':::'#255'888'#255'555_'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  ,#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'kkk?kkk'#239'iii'#255'ggg'#255'eee'#255'bbb'
+  +#255'Uf'#156#255'Jg'#194#255'>g'#234#255'5e'#255#255'1a'#255#255',\'#255#255
+  +'''X'#255#255'(S'#233#255'/M'#188#255'7J'#141#255'FFF'#255'DDD'#255'AAA'#255
+  +'???'#255'<<<'#239':::?'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'kkk'#31'kkk'#191'iii'#255'ggg'#255'eee'
+  +#255'bbb'#255'```'#255']]]'#255'[[['#255'XXX'#255'VVV'#255'SSS'#255'QQQ'#255
+  +'NNN'#255'KKK'#255'III'#255'FFF'#255'DDD'#255'AAA'#191'???'#31#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0'kkk?iii'#191'ggg'#255'eee'#255'bbb'#255'```'#255']]]'
+  +#255'[[['#255'XXX'#255'VVV'#255'SSS'#255'QQQ'#255'NNN'#255'KKK'#255'III'#191
+  +'FFF?'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'h'
+  +'hh'#31'fffoddd'#191'bbb'#239'```'#255']]]'#255'[[['#255'XXX'#255'VVV'#239'S'
+  +'SS'#191'PPPoNNN'#31#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#255#192#0#7#255#0#0#3#252#0#0#1#248#0#0#1#240#0#0#1
+  +#224#0#0#3#192#0#0#3#192#0#0#3#128#0#0#0#128#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#128#0
+  +#0#0#128#0#0#0#192#0#0#3#192#0#0#3#224#0#0#7#240#0#0#15#248#0#0#31#252#0#0'?'
+  +#255#0#0#255#255#192#3#255'('#0#0#0#16#0#0#0' '#0#0#0#1#0' '#0#0#0#0#0'@'#4#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#15#15#15
+  +'8'#22#22#22#159#23#23#23#221#18#18#18#255#13#13#13#255#13#13#13#222'###'#179
+  +'322'#162'111'#160'222x444#'#17#17#17#1#0#0#0#0#0#0#0#0#5#5#5#12'&&&'#164'&&'
+  +'&'#255'!!!'#255#25#26'*'#255#10#14']'#255#10#11'P'#255'jhh'#255#197#191#190
+  +#255#161#152#150#255#131'tq'#255'i\Z'#252'322'#178'"""'#12#0#0#0#0#6#6#6#12
+  +'///'#205'000'#255'+++'#255'&&&'#255#29#31'4'#255#0#11#175#255#12#15#129#255
+  +#154#152#154#255#159#158#158#255#155#141#139#255#133'{y'#255'qca'#255'422'
+  +#153'"""'#7#0#0#0#0'777'#166'999'#255'555'#255'000'#255'+++'#255'$%+'#255#18
+  +#26'n'#255'gbh'#255#162#149#136#255#133'|{'#255'qff'#255'k^]'#255'111'#255'"'
+  +'""'#185'...'#23#31#31#31':CCC'#255'>>>'#255'999'#255'555'#255'000'#255'+++'
+  +#255''''''''#255#159#152#149#255#249#143#12#255#254#157' '#255#248#171'D'#255
+  +#226#169'b'#255#204#169#132#255#128'xr'#255'222'#142'<<<'#159'HHH'#255'CCD'
+  +#255#24';'#193#255#7'2'#225#255'(2_'#255'000'#255'***'#255#178#172#170#255
+  +#249#155#27#255#254#170','#255#254#174'3'#255#254#170'-'#255#254#158#28#255
+  +#202#133'-'#255'000'#192'RRR'#224'MMM'#255'EHV'#255#16'A'#255#255#7'9'#254
+  +#255#25'5'#165#255'555'#255'---'#255#194#189#187#255#249#177':'#255#255#196
+  +'U'#255#255#202'^'#255#255#197'V'#255#255#182'>'#255#199#140'5'#255''''''''
+  +#230'WWW'#255'RRR'#255'MMM'#255'.H'#169#255#30'B'#202#255'6=Z'#255'999'#255
+  +'111'#255#202#199#196#255#250#194'U'#255#255#216'v'#255#254#225#134#255#254
+  +#217'x'#255#255#199'Z'#255#198#145'='#255'&&&'#255'\\\'#255'WWW'#255'RRR'#255
+  +'MMM'#255'HHH'#255'CCC'#255'>>>'#255'444'#255#205#204#202#255#225#185'^'#255
+  +#241#215#130#255#251#240#163#255#254#230#140#255#255#207'e'#255#197#148'B'
+  +#255''''''''#255'aaa'#224'\\\'#255'WWW'#255'RRR'#255'MMM'#255'HHH'#255'BCH'
+  +#255'777'#255#166#167#171#255#179#177#179#255#174#170#169#255#174#167#159#255
+  +#176#164#146#255#170#148'r'#255#152'|X'#255')))'#229'OOO'#159'aaa'#255'\]`'
+  +#255'I]'#159#255'PS_'#255'GNf'#255#27'J'#247#255#31'B'#200#255#19'9'#210#255
+  +'16J'#255'111'#255'#,Z'#255' 1'#154#255':=\'#255':77'#255#30#30#30#162'...<f'
+  +'ff'#255'Wh'#156#255'>m'#255#255'B`'#193#255'=W'#178#255'"S'#255#255#25'J'
+  +#255#255#23'B'#229#255'''<'#144#255'999'#255'446'#255'(.J'#255'**,'#255'&&&'
+  +#255#15#15#15'8'#0#0#0#0'^^^'#166'fgj'#255'No'#208#255'>m'#255#255'5d'#255
+  +#255'+['#255#255'"S'#255#255#25'J'#255#255#26'B'#217#255'>>@'#255'99<'#255'5'
+  +'55'#255'000'#255'&&&'#166#0#0#0#0#0#0#0#0#11#11#11#14'^^^'#205'fgj'#255'Sk'
+  +#180#255'?l'#249#255'5d'#255#255'+['#255#255'"S'#255#255#27'J'#247#255#27'B'
+  +#213#255'+<'#130#255'999'#255'///'#205#5#5#5#12#0#0#0#0#0#0#0#0#0#0#0#0#11#11
+  +#11#14'^^^'#168'fff'#255'_cn'#255'Qa'#149#255'E]'#171#255'>V'#169#255'>O'#139
+  +#255'EHV'#255'CCC'#255'777'#166#6#6#6#12#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0'...<OOO'#161'aaa'#226'\\\'#255'WWW'#255'RRR'#226'<<<'#159#31#31
+  +#31'<'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#240#0#0#0#192#0#0#0#128#0#0#0#128#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#128#1#0#0
+  +#128#1#0#0#192#3#0#0#240#15#0#0#12'Proportional'#9#7'Stretch'#9#0#0#9'TCheck'
+  +'Box'#22'cbCreateClientAndGroup'#4'Left'#2'*'#6'Height'#2#21#3'Top'#2#8#5'Wi'
+  +'dth'#3#201#0#7'Anchors'#11#6'akLeft'#8'akBottom'#0#7'Caption'#6'$Create Tes'
+  +'t Client and Project Group'#7'Checked'#9#5'State'#7#9'cbChecked'#8'TabOrder'
+  +#2#0#0#0#7'TBitBtn'#6'btn_Ok'#4'Left'#3'V'#1#6'Height'#2#25#3'Top'#2#8#5'Wid'
+  +'th'#2'K'#7'Anchors'#11#7'akRight'#8'akBottom'#0#7'Caption'#6#2'OK'#7'Defaul'
+  ,'t'#9#10'Glyph.Data'#10':'#6#0#0'6'#6#0#0'BM6'#6#0#0#0#0#0#0'6'#0#0#0'('#0#0
+  +#0' '#0#0#0#16#0#0#0#1#0#24#0#0#0#0#0#0#6#0#0#196#14#0#0#196#14#0#0#0#0#0#0#0
+  +#0#0#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#0'f'#0#0'f'#0#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255'eeeeee'#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#0'f'#0#30#178'1'#31#177'3'#0'f'#0#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255'eee'#154#154#154#154#154#154'eee'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#0'f'#0'1'#194'O"'#183'8'#26#176'-!'#180'7'#0'f'#0#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255'eee'#171#171#171#158#158#158#151#151#151#156#156#156'eee'#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#0'f'#0'G'#211'm;'#203'^%'#168';'#0'f'#0#27#169'.'#29#177'2'#0'f'#0
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255'eee'#191#191#191#181#181#181#152#152#152'eee'#148#148#148#153#153#153'e'
+  +'ee'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0
+  +'f'#0'O'#214'yS'#222'1'#181'M'#0'f'#0#255#0#255#0'f'#0#23#157''''#30#174'1'
+  +#0'f'#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'eee'#196
+  +#196#196#202#202#202#165#165#165'eee'#255#0#255'eee'#140#140#140#152#152#152
+  +'eee'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0
+  +'f'#0'A'#197'c'#0'f'#0#255#0#255#255#0#255#255#0#255#255#0#255#0'f'#0#25#170
+  +'+'#0'f'#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'eee'
+  +#181#181#181'eee'#255#0#255#255#0#255#255#0#255#255#0#255'eee'#147#147#147'e'
+  +'ee'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0
+  +'f'#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0'f'#0#20
+  +#157'!'#0'f'#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'e'
+  +'ee'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'eee'#138#138
+  +#138'eee'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#0'f'#0#0'f'#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255'eeeeee'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#0'f'#0#0'f'#0#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255'eeeeee'#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  ,#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#11'ModalRes'
+  +'ult'#2#1#9'NumGlyphs'#2#2#8'TabOrder'#2#1#0#0#7'TBitBtn'#7'Button2'#4'Left'
+  +#3#165#1#6'Height'#2#25#3'Top'#2#8#5'Width'#2'K'#7'Anchors'#11#7'akRight'#8
+  +'akBottom'#0#6'Cancel'#9#7'Caption'#6#6'Cancel'#10'Glyph.Data'#10':'#6#0#0'6'
+  +#6#0#0'BM6'#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0' '#0#0#0#16#0#0#0#1#0#24#0#0#0#0
+  +#0#0#6#0#0#196#14#0#0#196#14#0#0#0#0#0#0#0#0#0#0#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#0#0#154#0#0#154#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#0#0#154#0#0#154#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255'kkkkkk'#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255'kkkkkk'#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#0#0#154#23'J'#253#16';'#244#0#0#154#255#0#255#255#0#255
+  +#255#0#255#255#0#255#0#0#154#0','#248#0'0'#252#0#0#154#255#0#255#255#0#255
+  +#255#0#255#255#0#255'kkk'#168#168#168#160#160#160'kkk'#255#0#255#255#0#255
+  +#255#0#255#255#0#255'kkk'#154#154#154#156#156#156'kkk'#255#0#255#255#0#255
+  +#255#0#255#255#0#255#0#0#154#26'G'#248#26'L'#255#18';'#241#0#0#154#255#0#255
+  +#255#0#255#0#0#154#1'-'#246#1'2'#255#0'*'#243#0#0#154#255#0#255#255#0#255#255
+  +#0#255#255#0#255'kkk'#167#167#167#170#170#170#159#159#159'kkk'#255#0#255#255
+  +#0#255'kkk'#153#153#153#158#158#158#151#151#151'kkk'#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#0#0#154#28'G'#246#27'M'#255#20'>'#244#0#0#154#0#0
+  +#154#0'-'#248#1'4'#255#3'+'#242#0#0#154#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255'kkk'#167#167#167#171#171#171#162#162#162'kkkkkk'#154
+  +#154#154#158#158#158#152#152#152'kkk'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#0#0#154#29'H'#246#29'P'#255#16'='#251#4'1'#254
+  +#1'2'#255#0','#246#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255'kkk'#167#167#167#172#172#172#163#163#163#159
+  +#159#159#158#158#158#153#153#153'kkk'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0#0#154#26'H'#249#19'B'
+  +#255#12'<'#255#7'3'#246#0#0#154#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'kkk'#167#167#167#167
+  +#167#167#163#163#163#156#156#156'kkk'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0#0#154'!N'#252
+  +#29'K'#255#24'G'#255#23'C'#246#0#0#154#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'kkk'#172#172
+  +#172#172#172#172#169#169#169#164#164#164'kkk'#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0#0#154'.['#249
+  +',_'#255'"M'#248' K'#248'#U'#255#27'F'#246#0#0#154#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'kkk'#177#177#177#179
+  +#179#179#171#171#171#170#170#170#175#175#175#166#166#166'kkk'#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0#0#154'6d'#250'8k'
+  +#255'-Y'#244#0#0#154#0#0#154'"L'#244'%X'#255#29'I'#246#0#0#154#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255'kkk'#182#182#182#185#185#185
+  +#174#174#174'kkkkkk'#169#169#169#176#176#176#167#167#167'kkk'#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#0#0#154'@q'#250'Bt'#255'2]'#241#0#0#154
+  +#255#0#255#255#0#255#0#0#154'"M'#241'''Z'#255' L'#248#0#0#154#255#0#255#255#0
+  +#255#255#0#255#255#0#255'kkk'#187#187#187#190#190#190#175#175#175'kkk'#255#0
+  +#255#255#0#255'kkk'#167#167#167#177#177#177#170#170#170'kkk'#255#0#255#255#0
+  +#255#255#0#255#255#0#255#0#0#154'Iz'#252';f'#243#0#0#154#255#0#255#255#0#255
+  +#255#0#255#255#0#255#0#0#154'%P'#244'&U'#250#0#0#154#255#0#255#255#0#255#255
+  +#0#255#255#0#255'kkk'#192#192#192#181#181#181'kkk'#255#0#255#255#0#255#255#0
+  +#255#255#0#255'kkk'#170#170#170#174#174#174'kkk'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#0#0#154#0#0#154#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#0#0#154#0#0#154#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255'kkkkkk'#255#0#255#255#0#255#255#0#255#255#0#255#255
+  ,#0#255#255#0#255'kkkkkk'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#11'ModalResult'#2#2#9'NumGlyphs'#2#2#8'TabOrder'#2#2#0#0
+  +#0#0
+]);
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fServerProjectOptions.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fServerProjectOptions.pas
new file mode 100644
index 0000000..9bb06f3
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/fServerProjectOptions.pas	
@@ -0,0 +1,230 @@
+unit fServerProjectOptions;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Delphi IDE Integration                            }
+{                                                                            }
+{ compiler: Delphi 5 and up                                                  }
+{ platform: Win32                                                            }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+
+interface
+
+uses
+  {$IFDEF FPC}LCLIntf, LResources,{$ENDIF}
+  {$IFDEF MSWINDOWS}Windows,{$ENDIF}
+  Messages, SysUtils,{$IFDEF DELPHI6UP} Variants, {$ENDIF}
+  Classes, Graphics, Controls, Forms,
+  {$IFDEF FPC}uROIDEPrjWizard_laz,{$ELSE} uROIDEPrjWizard,{$ENDIF}
+  Dialogs, StdCtrls, Buttons, ComCtrls, ImgList, ExtCtrls;
+
+type
+  TServerProjectOptions = class(TForm)
+    Label1: TLabel;
+    eSvcLibName: TEdit;
+    eSvcName: TEdit;
+    Label2: TLabel;
+    Label3: TLabel;
+    ePrjName: TEdit;
+    Label5: TLabel;
+    ePrjDir: TEdit;
+    Bevel1: TBevel;
+    Label4: TLabel;
+    eTemplateName: TEdit;
+    BitBtn1: TBitBtn;
+    Label6: TLabel;
+    cbMessageClass: TComboBox;
+    Label7: TLabel;
+    cbServerClass: TComboBox;
+    Label8: TLabel;
+    Image2: TImage;
+    Bevel2: TBevel;
+    Panel1: TPanel;
+    Image1: TImage;
+    cbCreateClientAndGroup: TCheckBox;
+    btn_Ok: TBitBtn;
+    Button2: TBitBtn;
+    Bevel3: TBevel;
+    procedure sbBrowseForDirClick(Sender: TObject);
+    procedure FormCloseQuery(Sender: TObject; var CanClose: Boolean);
+    procedure FormCreate(Sender: TObject);
+  public
+    fTemplateDir,
+    fInvalidServers,
+    fDefaultServer,
+    fFixedServer,
+    fFixedChannel: string;
+    fWizardAvailable: boolean;
+    fProjectFolders: TStringList;
+
+    procedure LoadConfig;
+
+  public
+    constructor Create(const aTemplateDir : string); reintroduce;
+    destructor Destroy; override;
+  end;
+
+var
+  ServerProjectOptions: TServerProjectOptions;
+
+implementation
+{$IFDEF MSWINDOWS}
+{$WARN UNIT_PLATFORM OFF}
+{$ENDIF}
+
+uses
+  {$IFDEF FPC}uROIDETools_laz,{$ELSE}uROIDETools,{$ENDIF}
+  FileCtrl, INIFiles, uRODLGenTools, uROClient, uROServer, fNewProjectForm;
+
+{$IFNDEF FPC}
+{$R *.dfm}
+{$ENDIF FPC}
+
+{ TServerProjectOptions }
+constructor TServerProjectOptions.Create(const aTemplateDir: string);
+begin
+  inherited Create(NIL);
+  fTemplateDir := aTemplateDir;
+  fProjectFolders := TStringList.Create();
+  LoadConfig;
+end;
+
+destructor TServerProjectOptions.Destroy;
+begin
+  FreeAndNil(fProjectFolders);
+  inherited;
+end;
+
+procedure TServerProjectOptions.LoadConfig;
+var s   : TStringList;
+    tmpldir : string;
+begin
+  s := TStringList.Create;
+
+  with TIniFile.Create(GetTemplateConfigFileName) do try
+    ReadSection(sect_ClassFactories, s);
+
+    eTemplateName.Text := fTemplateDir;
+    eSvcLibName.Text := ReadString(sect_ProjectGeneration, id_SvcLibName, 'NewLibrary');
+    eSvcName.Text := ReadString(sect_ProjectGeneration, id_SvcName, 'NewService');
+    ePrjName.Text := ReadString(sect_ProjectGeneration, id_PrjName, 'NewProject');
+    cbCreateClientAndGroup.Checked := ReadBool(sect_ProjectGeneration, id_CreateClientAndGroup, TRUE);
+
+    tmpldir := GetTemplateDir;
+    Delete(tmpldir, Pos('Templates', tmpldir), 9);
+    Insert('Projects', tmpldir, Length(tmpldir));
+
+    ePrjDir.Text := ReadString(sect_ProjectGeneration, id_PrjDir, tmpldir);
+    ReadSection(sect_ProjectFolderHistory, fProjectFolders);
+  finally
+    Free;
+    s.Free;
+  end;
+
+  with TIniFile.Create(fTemplateDir+InfoName) do try
+    Caption := ReadString(sect_Information, id_Description, Caption);
+    fInvalidServers := ReadString(sect_Information, id_InvalidServers, '');
+    fInvalidServers := StringReplace(fInvalidServers,' ', '',[rfReplaceAll])+',';
+
+    fFixedServer := Trim(ReadString(sect_Information, id_FixedServer, ''));
+    fDefaultServer := Trim(ReadString(sect_Information, id_DefaultServer, fFixedServer));
+    fFixedChannel := Trim(ReadString(sect_Information, id_FixedChannel, ''));
+
+    fWizardAvailable := ReadString(sect_Information, id_WizardType, '') <> '';
+    
+    cbCreateClientAndGroup.Enabled := ReadBool(sect_Information, 'AllowClient', TRUE);
+    if not cbCreateClientAndGroup.Enabled then cbCreateClientAndGroup.Checked := false;
+  finally
+    Free;
+  end;
+end;
+
+procedure TServerProjectOptions.sbBrowseForDirClick(Sender: TObject);
+var dir : string;
+begin
+  dir := ePrjDir.Text;
+  if SelectDirectory('Select Project Directory','', Dir) then ePrjDir.Text := Dir;
+  //if SelectDirectory(Dir, [sdAllowCreate, sdPerformCreate, sdPrompt], 0{SELDIRHELP}) then ePrjDir.Text := Dir;
+end;
+
+procedure TServerProjectOptions.FormCloseQuery(Sender: TObject;
+  var CanClose: Boolean);
+var errmsg : string;
+begin
+  if (ModalResult=mrCancel) then begin
+    CanClose := TRUE;
+    Exit;
+  end
+  else CanClose := FALSE;
+
+  if (Trim(eSvcLibName.Text)='') then errmsg := 'Service Library Name cannot be blank'
+  else if (Trim(eSvcName.Text)='') then errmsg := 'Service Name cannot be blank'
+  else if (Trim(ePrjName.Text)='') then errmsg := 'Project name cannot be blank'
+  else if not DirectoryExists(ePrjDir.Text) and
+          not ForceDirectories(ePrjDir.Text) then errmsg := 'Specified directory does not exist or cannot be created'
+
+  else begin
+    CanClose := TRUE;
+    Exit;
+  end;
+
+  MessageDlg(errmsg, mtError, [mbOK], 0);
+end;
+
+procedure TServerProjectOptions.FormCreate(Sender: TObject);
+var i : integer;
+    svrclsname : string;
+begin
+  cbMessageClass.Items.Clear;
+  for i := 0 to (GetMessageClassCount-1) do
+    cbMessageClass.Items.Add(GetMessageClass(i).ClassName);
+
+  i := cbMessageClass.Items.IndexOf('TROBinMessage');
+  if i = -1 then i := 0;
+  cbMessageClass.ItemIndex := i;
+
+  cbServerClass.Items.Clear;
+
+  for i := 0 to (GetServerClassCount-1) do begin
+    svrclsname := GetServerClass(i).ClassName;
+
+    if (Pos(svrclsname+',', fInvalidServers)=0) then begin
+      cbServerClass.Items.Add(svrclsname);
+    end;
+  end;
+
+  cbServerClass.Enabled := (cbServerClass.Items.Count>1);
+  if (cbServerClass.Items.Count=0) then begin
+    cbServerClass.Visible := FALSE;
+    Exit;
+  end;
+
+  if (cbServerClass.Items.IndexOf(fDefaultServer)>0) then
+    cbServerClass.ItemIndex := cbServerClass.Items.IndexOf(fDefaultServer)
+  else
+    cbServerClass.ItemIndex := 0;
+
+  if fFixedServer <> '' then begin
+    cbServerClass.Enabled := false;
+    cbServerClass.Color := clBtnFace;
+    if cbServerClass.Text <> fFixedServer then
+      cbServerClass.ItemIndex := cbServerClass.Items.Add(fFixedServer);
+  end;
+end;
+
+{$IFDEF FPC}
+initialization
+  {$I fServerProjectOptions.lrs}
+{$ENDIF FPC}
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROExtraEditors.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROExtraEditors.pas
new file mode 100644
index 0000000..35e16f6
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROExtraEditors.pas	
@@ -0,0 +1,117 @@
+unit uROExtraEditors;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Delphi IDE Integration                            }
+{                                                                            }
+{ compiler: Delphi 5 and up                                                  }
+{ platform: Win32                                                            }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+
+uses
+  Classes, uRODL,
+  {$IFDEF FPC}
+  PropEdits,ComponentEditors,
+  {$ELSE}
+  {$IFDEF DELPHI5}DsgnIntf, DMDesigner,{$ELSE}DesignIntf, DesignEditors,{$ENDIF}
+  {$ENDIF}
+  uRODynamicRequest;
+
+type
+  { TRODynRequestServiceNameProperty }
+  TRODynRequestServiceNameProperty = class(TStringProperty)
+  public
+    function GetAttributes: TPropertyAttributes; override;
+    procedure GetValues(Proc: TGetStrProc); override;
+  end;
+
+  { TRODynRequestOperationNameProperty }
+  TRODynRequestOperationNameProperty = class(TStringProperty)
+  public
+    function GetAttributes: TPropertyAttributes; override;
+    procedure GetValues(Proc: TGetStrProc); override;
+  end;
+
+  { TRODynamicRequestEditor }
+  TRODynamicRequestEditor = class(TComponentEditor)
+  public
+    function GetVerbCount: Integer; override;
+    procedure ExecuteVerb(Index: Integer); override;
+    function GetVerb(Index: Integer): string; override;
+  end;
+
+implementation
+
+uses
+  SysUtils, Dialogs, uROClientIntf;
+
+{ TRODynRequestServiceNameProperty }
+
+function TRODynRequestServiceNameProperty.GetAttributes: TPropertyAttributes;
+begin
+  result := [paValueList]
+end;
+
+procedure TRODynRequestServiceNameProperty.GetValues(Proc: TGetStrProc);
+var dynreq : TRODynamicRequest;
+    i: Integer;
+begin
+  dynreq := TRODynamicRequest(GetComponent(0));
+  for i := 0 to (dynreq.RODLLibrary.ServiceCount-1) do
+    Proc(dynreq.RODLLibrary.Services[i].Info.Name);
+end;
+
+{ TRODynRequestOperationNameProperty }
+
+function TRODynRequestOperationNameProperty.GetAttributes: TPropertyAttributes;
+begin
+  result := [paValueList]
+end;
+
+procedure TRODynRequestOperationNameProperty.GetValues(Proc: TGetStrProc);
+var dynreq : TRODynamicRequest;
+    i: Integer;
+    svc : TRODLService;
+begin
+  dynreq := TRODynamicRequest(GetComponent(0));
+
+  svc := TRODLService(dynreq.RODLLibrary.ItemByName(dynreq.RemoteService.ServiceName));
+  if (svc=NIL) then Exit;
+
+  for i := 0 to (svc.Default.Count-1) do
+    Proc(svc.Default.Items[i].Info.Name);
+end;
+
+{ TRODynamicRequestEditor }
+
+procedure TRODynamicRequestEditor.ExecuteVerb(Index: Integer);
+begin
+  with TRODynamicRequest(GetComponent).Params do begin
+    Refresh;
+    MessageDlg(Format('%d parameters have been created. ', [Count]), mtInformation, [mbOK], 0); 
+  end;
+end;
+
+function TRODynamicRequestEditor.GetVerb(Index: Integer): string;
+begin
+  result := 'Retrieve parameter list';
+end;
+
+function TRODynamicRequestEditor.GetVerbCount: Integer;
+begin
+  result := 1
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROIDEData.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROIDEData.dfm
new file mode 100644
index 0000000..f64f23f
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROIDEData.dfm	
@@ -0,0 +1,413 @@
+object IdeData: TIdeData
+  OldCreateOrder = False
+  Left = 586
+  Top = 308
+  Height = 150
+  Width = 215
+  object iml_Actions: TImageList
+    Left = 32
+    Top = 8
+    Bitmap = {
+      494C010108000900040010001000FFFFFFFFFF00FFFFFFFFFFFFFFFF424D3600
+      0000000000003600000028000000400000003000000001002000000000000030
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      000000000000000000000000000000000000FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF00FF00FF00484A4B00484A4B00484A4B00484A4B00FF00FF00FF00
+      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF00FF00FF00D5AA9800BDA39800B4968B00C99E8E00FF00FF00FF00
+      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF000000820000008200000082000000820000008200000082000000
+      820000008200000082000000820000008200FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF00484A4B00484A4B006B6C6D006B6C6D006B6C6D00484A4B00484A
+      4B00484A4B00FF00FF00FF00FF00FF00FF00893615007D3213007D3213007D32
+      13007D3213007D3213007D3213007D3213007D3213007D3213007D3213007D32
+      13007D3213007D3213007D32130089361500FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF00D8AA9700CEBFBB00B7BBC0009E9CA0009F8C8600D8AA9700FF00
+      FF00FF00FF00FF00FF00FF00FF00FF00FF0095655F00A5696A00A5696A00A569
+      6A00A5696A0000008200FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF0000008200FF00FF00FF00FF00FF00FF00FF00
+      FF00484A4B00A39AA100484A4B00467B4A00727572004D4E7F007F7F7F008080
+      8000484A4B00FF00FF00FF00FF00FF00FF00692A1100FEF3E700FFEFE0006E6C
+      6A00FBE7CF00FBE7CF006E6C6A00FEDDBA00FEDDBA006E6C6A00FCD3A700FBCE
+      9C006E6C6A00FCCB9700FCCB97007D321300FF00FF00FF00FF00FF00FF00FF00
+      FF00D8AF9A00E1D1CE00DADDE100C2917E00B4837000A09A9D00A08E8800C79E
+      8C00FF00FF00FF00FF00FF00FF00FF00FF0098686000FBE5C000F4D5AD00F0CF
+      9F00EFCA960000008200FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF0000008200FF00FF00FF00FF00FF00FF00484A
+      4B00A39AA100A39AA100484A4B00039E0A00467B4A007B7B7B004C4C7E008080
+      8000484A4B00FF00FF00FF00FF00FF00FF0065281000EFE7DD006E6C6A006E6C
+      6A006E6C6A006E6C6A006E6C6A006E6C6A006E6C6A006E6C6A006E6C6A006E6C
+      6A006E6C6A006E6C6A006E6C6A00762F1200FF00FF00FF00FF00FF00FF00D8AA
+      9700EADED900F2FEFF00C67D5D00A7250300AA260300B1654800A39FA3009E8A
+      8700D8AA9700FF00FF00FF00FF00FF00FF009D6B6200FCE7C900F2D5B500F0D0
+      A900EECB9E0000008200FFFFFF00FFFFFF00FFFFFF000000820000008200FFFF
+      FF00FFFFFF00FFFFFF000000820000008200FF00FF00FF00FF00FF00FF00484A
+      4B00A39AA100A39AA100484A4B0078787A00747474007B7B7B007B7B7B008080
+      8000484A4B00FF00FF00FF00FF00FF00FF00652810006E6C6A006E6C6A003C5A
+      F7000B8A09006CB75C00FEE9D200FBE7CF00FEE2C400FEDDBA00FDDAB400FCD7
+      AD00FCD3A700E9CC9500FBCE9C00762F1200FF00FF00FF00FF00D8AA9700EFE1
+      D900FEFFFF00CE876A00B5411A00DD9F8200DD9E8100B8421A00B05E4000A19E
+      A3009E8B8700C69D8B00FF00FF00FF00FF00A36F6400FEEED400F4DDC000F2D7
+      B500F0D1AA0000008200FFFFFF000000820000008200FFFFFF00FFFFFF000000
+      8200FFFFFF0000008200FFFFFF0000008200FF00FF00FF00FF00FF00FF00484A
+      4B00A9A1A900A59DA500484A4B007B7A7D00737474007B7B7B007B7B7B008080
+      8000484A4B00FF00FF00FF00FF00FF00FF0065281000FEF3E7006E6C6A002243
+      FB00326E9F000B8A090073BA6000FBE7CF00FEE2C400FEE2C400FDDAB400FDDA
+      B40047A030000B8A0900168E0E0050420C00FF00FF00D8AA9700F2E2DD00FFFF
+      FF00D58F7200A72A0600AD361000F6E5DC00F4E1D700AD361000AC2D0800B162
+      4300A39EA1009E8A8700D8AA9700FF00FF00A7746600FFF4E100F6E1CA00F3DC
+      BF00F2D7B4000000820000008200FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF0000008200FFFFFF00FFFFFF0000008200FF00FF00FF00FF00FF00FF00484A
+      4B00B2ABB100ACA6AC00484A4B007E7F8100737473007B7B7B007B7B7B008080
+      8000484A4B00FF00FF00FF00FF00FF00FF0065280F006E6C6A006E6C6A00C6CC
+      F2000F31FC00FEF3E7002E9E2800FEE9D200FBE7CF00FEE2C400FEDDBA0081B6
+      5D000B8A0900FCD3A700FCD3A7005F3A0F00D8AA9600F2E1DA00FFFFFF00E1A6
+      8800B43B1000B0350F00AF360F00F2D8CC00F0D4C700AD330E00AC310D00AD2D
+      0800B05E4000A0989C0099888400C79E8B00AD786900FFFBEE00F7E7D500F4E1
+      CA00F3DCBF0000008200FFFFFF000000820000008200FFFFFF00FFFFFF000000
+      8200FFFFFF0000008200FFFFFF0000008200FF00FF00FF00FF00FF00FF00484A
+      4B00BDB7BC00B8B1B600484A4B0091919300848486007A7A7A007A7A7A008080
+      8000484A4B00FF00FF00FF00FF00FF00FF0065280F00FFF6EE006E6C6A00FEF9
+      F2004D69F7001652A600148F1400EEE5D300BFBBDA00D5C9CF00BCCC90000A89
+      070083AC72000525FB00485BDC00762F1200E0BAAA00FFFFFF00F3D9C500C65D
+      2700C0542200BB4A1C00B6411700F3DCCF00F0D5C900AD340F00AC320D00AD35
+      0F00AD2C0700B47F6A009F9EA100B1958B00B47E6B00FFFFFB00F8EDE100F7E6
+      D400F6E1C90000008200FFFFFF00FFFFFF00FFFFFF000000820000008200FFFF
+      FF00FFFFFF00FFFFFF000000820000008200FF00FF00FF00FF00FF00FF00484A
+      4B00CAC4C900C4BDC200484A4B00828384007676760091919100919192009090
+      8F00484A4B00FF00FF00FF00FF00FF00FF00652810006E6C6A006E6C6A00FEF9
+      F200FEF9F2002849FA0004653900056E2A000F31FC000C2DFA000C84110047A0
+      30001635F300546ACB001635F3005E2D2D00E0BAAA00FFFFFF00F6DECB00D376
+      3600CC692F00C65D2800C0542200F6E3D800F2DACE00AF371000AC320D00AC32
+      0D00AB2E0900C2978700B8BBC000C1A39800BA836D00FFFFFF00FCF4EE00FAED
+      E100F8E9D50000008200FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF0000008200FF00FF00FF00FF00FF00FF00484A
+      4B00D5D1D400D0CBCF00484A4B00939697008A8A8B00818181007E7E7E008888
+      8700484A4B00FF00FF00FF00FF00FF00FF0065280F00FFFCFA006E6C6A00FFFC
+      FA00FEF9F200FFF6EE00E1DDEA00148F1400FEEED900FEE9D20001760F000A3B
+      C100405ADE00FDDAB4009191C200642D2400D8AA9600F2E1D900FFFFFF00EFCB
+      A700D57D3B00CE6F3100D37B4600F2D4BF00E7BA9F00B8451900B0370F00AA2D
+      0900CA886D00DAE1E500CFBCB600D5A79300BF877000FFFFFF00FFFBFA00FEF4
+      ED00FAEEE00000008200FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF0000008200FF00FF00FF00FF00FF00FF00484A
+      4B00E0DDE000DAD8DA00484A4B007E7F81006D6E6E0096969500959595009999
+      9900484A4B00FF00FF00FF00FF00FF00FF00692A11006E6C6A006E6C6A00FFFC
+      FA00FEF9F200FEF9F200FFF6EE00DCE5C5001D9519000B8A090041955300465E
+      E900EED5C100FDDAB400FDDAB4007D321300FF00FF00D8AA9700EFDDD500FFFF
+      FF00F3D4B200DC8A4500D57E3E00D8895500D0794800C0542100BB471800D79A
+      7F00F0FEFF00E0CFC900D8AA9700FF00FF00C48C7200FFFFFF00FFFFFF00FFFC
+      FA00FCF4ED000000820000008200000082000000820000008200000082000000
+      820000008200000082000000820000008200FF00FF00FF00FF00FF00FF00484A
+      4B00E9E6E900E3E3E300484A4B00686A6A00585A5A0056585800636464007474
+      7400484A4B00FF00FF00FF00FF00FF00FF009E512300CB934600C68C4100C68C
+      4100C68C4100C68C4100C68C4100C68C4100C68C4100C68C4100CD995100CB93
+      4600CD995100C1914E00BB955C00A1522200FF00FF00FF00FF00D7A79300EEDD
+      D400FFFFFF00F6D7B600E0924A00FAEADA00F7E0D000C9642800E1A48200FEFF
+      FF00E9DCD700D7AA9700FF00FF00FF00FF00CA917400FFFFFF00FFFFFF00FFFF
+      FF00FFFCFA00FCF4ED00FAEDDE00F8E7D400FCEBD300E3D3BB00B7AD9C00A569
+      6A00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00484A
+      4B00EBEAEB00FAFAFB00A7A7AA0074747500767678007D7D7E00656667005556
+      5700484A4B00FF00FF00FF00FF00FF00FF0099411500CE641400CE641400CE64
+      1400CE641400CE641400CE641400CE641400CE641400D1681800F3A96600E070
+      1100F3A966009F6339003553C700A6420C00FF00FF00FF00FF00FF00FF00D8AA
+      9700EEDAD000FFFFFF00F6DCBB00F0C58F00EAB07900EBBC9300FFFFFF00F0E2
+      DA00D8AA9700FF00FF00FF00FF00FF00FF00CE957600FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FEFCFA00FCF6EB00FAEFE000A5696A00A5696A00A5696A00A569
+      6A00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00484A
+      4B00FFFFFF00F8F8FA00F7F6F800E6E5E700D0CED000BAB4B800A69FA4009991
+      9700484A4B00FF00FF00FF00FF00FF00FF00FF00FF0093401A0093401A009340
+      1A0093401A0093401A0093401A0093401A0093401A0093401A0099441C00953E
+      150099441C008C3C1A00843D2400FF00FF00FF00FF00FF00FF00FF00FF00FF00
+      FF00D7A69100EED9D000FFFFFF00FAEAD300F6E0C600FFFFFF00F4E5DE00D8AD
+      9900FF00FF00FF00FF00FF00FF00FF00FF00D3977800FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFC00F4EBE600A5696A00E2A35B00EF993800BB70
+      4F00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00484A
+      4B00484A4B00F8F8FA00F8F8FA00EAE9EB00D5D3D500BDBABD00484A4B00484A
+      4B00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF00D8AA9700EED9CF00FFFFFF00FFFFFF00F3E6E000D8AA9700FF00
+      FF00FF00FF00FF00FF00FF00FF00FF00FF00D59A7900FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00F8F8FE00A5696A00E5A55F00C2805C00FF00
+      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF00484A4B00484A4B00484A4B00484A4B00484A4B00FF00FF00FF00
+      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF00FF00FF00D8AA9600E0BAAA00E0BAAA00D8AA9600FF00FF00FF00
+      FF00FF00FF00FF00FF00FF00FF00FF00FF00D0906B00D0906B00D0906B00D090
+      6B00D0906B00D0906B00D0906B00D0906B00A5696A00BB7F6A00FF00FF00FF00
+      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF006262620018181800121212000E0E0E000E0E0E0053535300FF00
+      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF000000820000008200000082000000820000008200000082000000
+      820000008200000082000000820000008200FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF00FF00FF00FF00FF00A3666800A3666800A3666800A3666800A467
+      6900A4676900A4676900A4676900A46769000151CA00004BC100FF00FF00FF00
+      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF006262
+      62002727270027272700171A39000B0F60000809570007074A0007071A000000
+      000041414100FF00FF00FF00FF00FF00FF0095655F00A5696A00A5696A00A569
+      6A00A5696A0000008200FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF0000008200FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF00FF00FF00FF00FF009F646600F7E5C600F2D9B100EED1A100EECC
+      9300F0C78700EFC58000F7D08300A4676900004DC400095CD300055BD700FF00
+      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00414141003131
+      31002C2C2C00272727001A1E4900000CB3000006A70000009A0000009A000202
+      630003030D0012121200FF00FF00FF00FF0098686000FBE5C000F4D5AD00F0CF
+      9F00EFCA960000008200FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF0000008200FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF00FF00FF00FF00FF008E595B00D8CAB700D3C0A700D1B89A00DCBD
+      9700E6C29200E7BF8400F0C68100A4676900004BC0001C74E3002682F7000151
+      CA000455CA000454CB00004CC100004CC100FF00FF00FF00FF00FF00FF00FF00
+      FF0007E9E700FF00FF00FF00FF00FF00FF00FF00FF00626262003B3B3B003131
+      3100313131002C2C2C00252631000B178D0007108C000006A70000009A000000
+      9A0001017E0003030D0041414100FF00FF009D6B6200FCE7C900F2D5B500F0D0
+      A900EECB9E0000008200FFFFFF0000008200FFFFFF0000008200FFFFFF00FFFF
+      FF0000008200FFFFFF00FFFFFF0000008200FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF00FF00FF00FF00FF0076575100A19C93009E928400A0917F00C0A9
+      8C00DABC9500E6C19000F0C98700A4676900FF00FF00014FC4000C5FD3001167
+      DC002581F4001975EB00116CE6000559D000004EC400FF00FF00FF00FF0007EA
+      E100FF00FF00FF00FF00FF00FF00FF00FF00FF00FF0041414100414141003B3B
+      3B003B3B3B00313131002C2C2C00272727001A1E4900000CB3000006A7000000
+      9A0000009A000202630000000000FF00FF00A36F6400FEEED400F4DDC000F2D7
+      B500F0D1AA0000008200FFFFFF000000820000008200FFFFFF00FFFFFF000000
+      8200FFFFFF0000008200FFFFFF0000008200FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF00FF00FF00005CFF0056413B006B696800005CFF00736A5F009688
+      7600C0A98C00DDBD9600EECC9300A4676900FF00FF00FF00FF00014BC1002881
+      F0002883F600217FF400136EE600004CC1000966E5000254E100003A1900FF00
+      FF00FF00FF00FF00FF00FF00FF00FF00FF00858585004949490041445000123B
+      DB000133FC0024337100313131002C2C2C000A1CA2000013BF00000CB3000006
+      A70000009A0000009A0007071A0053535300A7746600FFF4E100F6E1CA00F3DC
+      BF00F2D7B40000008200FFFFFF0000008200FFFFFF0000008200FFFFFF000000
+      8200FFFFFF0000008200FFFFFF0000008200A5686A00A6696A00A4686900A066
+      67008F5B5B006D454500005CFF00005CFF00005CFF00005CFF005B5652007269
+      5F00A0927F00D1B69800F2D3A300A3666800FF00FF00FF00FF000250C600166E
+      E1002B88F8001A76ED00004CC1000D69E5000862F300004A780001510300015C
+      0D00FF00FF00FF00FF00FF00FF00FF00FF00535353004949490043507B001243
+      FF00083BFF001335C000313131003131310021285600071CAC000415AC00000C
+      B3000A0E68000404820007074A000E0E0E00AD786900FFFBEE00F7E7D500F4E1
+      CA00F3DCBF0000008200FFFFFF0000008200FFFFFF0000008200FFFFFF000000
+      8200FFFFFF0000008200FFFFFF0000008200A4676900FCE6C100EECFA600E7C5
+      9600005CFF00005CFF00005CFF00005CFF00005CFF00005CFF00005CFF00005C
+      FF009F928400DAC9AD00EAD8B200A3666800FF00FF00FF00FF00FF00FF000250
+      C6002580F300004CC1000F69E2000D69F700004A8900015506000A7813000154
+      030000450000FF00FF00FF00FF00FF00FF0059595900535353004F4F4F00294A
+      C7001E43D000353E63003B3B3B003B3B3B00242E5E000822B800172266001C1F
+      3F001B1C260012133A000E0E35000E0E0E00B47E6B00FFFFFB00F8EDE100F7E6
+      D400F6E1C90000008200FFFFFF000000820000008200FFFFFF00FFFFFF00FFFF
+      FF0000008200FFFFFF00FFFFFF0000008200A5686A00FEEED300F0D5B500EACB
+      A300CEAD8300005CFF00005CFF005541330077777700005CFF00005CFF006B69
+      6700A19990008C5B51009D665B00A3666800FF00FF00FF00FF00FF00FF000250
+      C600004CC100116BE1001672FA00004AA10001520A000D831A0004640C000045
+      0000014E0100FF00FF00FF00FF00FF00FF005959590059595900535353005353
+      530049494900414141004141410030395F00032CE5001F2C7300262A42002727
+      270027272700181818001818180012121200BA836D00FFFFFF00FCF4EE00FAED
+      E100F8E9D50000008200FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF0000008200A7756B00FFF7E300F3DDC400EAD1
+      B100D0B59100005CFF00005CFF005441320060606000005CFF00005CFF007676
+      7600A4A19F008C5B5100DA904400BD724700FF00FF00FF00FF00FF00FF00FF00
+      FF000758CF001C78FA00024FB000014F11000F891C000870130000450000066C
+      110001540300FF00FF00FF00FF00FF00FF006262620062626200595959005353
+      530053535300494949003E445B003B3B3B000433F00021327D00313131001E28
+      62000019CC00121B68001818180018181800BF877000FFFFFF00FFFBFA00FEF4
+      ED00FAEEE00000008200FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF0000008200A7756B00FFFEF700F7E7D400EFD9
+      C100005CFF00005CFF00005CFF00005CFF00005CFF00005CFF00005CFF00005C
+      FF00C0BABA0095605600C5846000FF00FF00FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF000148B40001511B00119120000C801F000045000009751600076D
+      1100035A0600FF00FF00FF00FF00FF00FF0085858500626262005C5F68004860
+      AB004F55690043507B001B4CFF001844E7000F3BE70030395F0031313100192B
+      8A00001FD8000E1E8E002727270062626200C48C7200FFFFFF00FFFFFF00FFFC
+      FA00FCF4ED000000820000008200000082000000820000008200000082000000
+      820000008200000082000000820000008200BC826800FFFFFF00FBEFE500F6E5
+      D300EED9C000DDC4A600005CFF00005CFF00005CFF00005CFF00D1926D00D192
+      6D00D1926D009D665B00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF00FF00FF00045E03000F8C2800004500000C811F000B7B1B00066C
+      1100035D070000480000FF00FF00FF00FF00FF00FF0068686800556CB100406E
+      FF003F63D4003C5ABE002454FF001B4CFF001543F300203DAA003B3B3B003B3B
+      3B00242E5E00292B370027272700FF00FF00CA917400FFFFFF00FFFFFF00FFFF
+      FF00FFFCFA00FCF4ED00FAEDDE00F8E7D400FCEBD300E3D3BB00B7AD9C00A569
+      6A00FF00FF00FF00FF00FF00FF00FF00FF00BC826800FFFFFF00FFFBF700FAF0
+      E500F6E5D100EFD9C000005CFF00CFB692008C585A00005CFF00FF00FF00FF00
+      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
+      FF0007F8F600FF00FF00FF00FF0000480000035B0700066B110005680E000464
+      0C0001560300066A0F0001530300FF00FF00FF00FF0085858500666971004D73
+      E200406EFF003666FF002D5DFF002454FF001B4CFF001843E7003C3F4B00373A
+      4700313131003131310053535300FF00FF00CE957600FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FEFCFA00FCF6EB00FAEFE000A5696A00A5696A00A5696A00A569
+      6A00FF00FF00FF00FF00FF00FF00FF00FF00D1926D00FFFFFF00FFFFFF00FEFB
+      F700FBEFE500F7E5D100A1695D00A0685C009E636500FF00FF00FF00FF00FF00
+      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF0007E9
+      E700FF00FF00FF00FF00FF00FF00FF00FF00004700000046000000490000004A
+      0000004600000E8A2500066B100000490000FF00FF00FF00FF00737373006669
+      71005070CF00406EFF003666FF002D5DFF002454FF001B4CFF001843E700203D
+      AA003B3B3B0041414100FF00FF00FF00FF00D3977800FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFC00F4EBE600A5696A00E2A35B00EF993800BB70
+      4F00FF00FF00FF00FF00FF00FF00FF00FF00DA9D7500FFFFFF00FFFFFF00FFFF
+      FF00FFFEFC00E5D3CC00A56B5F00CF834300AF6A5400FF00FF00FF00FF00FF00
+      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF000046000001540300004E0100FF00FF00FF00FF00FF00FF008585
+      8500686868005F6577005065A5004860AB004860AB003B519C00434A60004141
+      410062626200FF00FF00FF00FF00FF00FF00D59A7900FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00FFFFFF00FFFFFF00F8F8FE00A5696A00E5A55F00C2805C00FF00
+      FF00FF00FF00FF00FF00FF00FF00FF00FF00E7AB7900FFFFFF00FFFFFF00FFFF
+      FF00FFFFFF00E1D5D900A56B5F00D48E5A00FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF00FF00FF000046000000460000FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF00858585006262620059595900595959005353530085858500FF00
+      FF00FF00FF00FF00FF00FF00FF00FF00FF00D0906B00D0906B00D0906B00D090
+      6B00D0906B00D0906B00D0906B00D0906B00A5696A00BB7F6A00FF00FF00FF00
+      FF00FF00FF00FF00FF00FF00FF00FF00FF00E7AB7900D1926D00D1926D00D192
+      6D00D1926D00D1926D00A56B5F00FF00FF00FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
+      FF00FF00FF00FF00FF00FF00FF00FF00FF00424D3E000000000000003E000000
+      2800000040000000300000000100010000000000800100000000000000000000
+      000000000000000000000000FFFFFF0000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      0000000000000000000000000000000000000000000000000000000000000000
+      00000000000000000000000000000000}
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROIDEData.lfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROIDEData.lfm
new file mode 100644
index 0000000..8aec810
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROIDEData.lfm	
@@ -0,0 +1,272 @@
+object IdeData: TIdeData
+  left = 586
+  top = 308
+  Height = 150
+  HorizontalOffset = 53
+  VerticalOffset = 96
+  Width = 215
+  object iml_Actions: TImageList
+    BkColor = clForeground
+    left = 32
+    top = 8
+    Bitmap = {
+      4C69080000001000000010000000FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFF858585FF626262FF595959FF595959FF535353FF858585FFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF858585FF6868
+      68FF5F6577FF5065A5FF4860ABFF4860ABFF3B519CFF434A60FF414141FF6262
+      62FFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF737373FF666971FF5070
+      CFFF406EFFFF3666FFFF2D5DFFFF2454FFFF1B4CFFFF1843E7FF203DAAFF3B3B
+      3BFF414141FFFF00FFFFFF00FFFFFF00FFFF858585FF666971FF4D73E2FF406E
+      FFFF3666FFFF2D5DFFFF2454FFFF1B4CFFFF1843E7FF3C3F4BFF373A47FF3131
+      31FF313131FF535353FFFF00FFFFFF00FFFF686868FF556CB1FF406EFFFF3F63
+      D4FF3C5ABEFF2454FFFF1B4CFFFF1543F3FF203DAAFF3B3B3BFF3B3B3BFF242E
+      5EFF292B37FF272727FFFF00FFFF858585FF626262FF5C5F68FF4860ABFF4F55
+      69FF43507BFF1B4CFFFF1844E7FF0F3BE7FF30395FFF313131FF192B8AFF001F
+      D8FF0E1E8EFF272727FF626262FF626262FF626262FF595959FF535353FF5353
+      53FF494949FF3E445BFF3B3B3BFF0433F0FF21327DFF313131FF1E2862FF0019
+      CCFF121B68FF181818FF181818FF595959FF595959FF535353FF535353FF4949
+      49FF414141FF414141FF30395FFF032CE5FF1F2C73FF262A42FF272727FF2727
+      27FF181818FF181818FF121212FF595959FF535353FF4F4F4FFF294AC7FF1E43
+      D0FF353E63FF3B3B3BFF3B3B3BFF242E5EFF0822B8FF172266FF1C1F3FFF1B1C
+      26FF12133AFF0E0E35FF0E0E0EFF535353FF494949FF43507BFF1243FFFF083B
+      FFFF1335C0FF313131FF313131FF212856FF071CACFF0415ACFF000CB3FF0A0E
+      68FF040482FF07074AFF0E0E0EFF858585FF494949FF414450FF123BDBFF0133
+      FCFF243371FF313131FF2C2C2CFF0A1CA2FF0013BFFF000CB3FF0006A7FF0000
+      9AFF00009AFF07071AFF535353FFFF00FFFF414141FF414141FF3B3B3BFF3B3B
+      3BFF313131FF2C2C2CFF272727FF1A1E49FF000CB3FF0006A7FF00009AFF0000
+      9AFF020263FF000000FFFF00FFFFFF00FFFF626262FF3B3B3BFF313131FF3131
+      31FF2C2C2CFF252631FF0B178DFF07108CFF0006A7FF00009AFF00009AFF0101
+      7EFF03030DFF414141FFFF00FFFFFF00FFFFFF00FFFF414141FF313131FF2C2C
+      2CFF272727FF1A1E49FF000CB3FF0006A7FF00009AFF00009AFF020263FF0303
+      0DFF121212FFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF626262FF2727
+      27FF272727FF171A39FF0B0F60FF080957FF07074AFF07071AFF000000FF4141
+      41FFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFF626262FF181818FF121212FF0E0E0EFF0E0E0EFF535353FFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFD0906BFFD0906BFFD0906BFFD0906BFFD090
+      6BFFD0906BFFD0906BFFD0906BFFA5696AFFBB7F6AFFFF00FFFFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFD59A79FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+      FFFFFFFFFFFFFFFFFFFFF8F8FEFFA5696AFFE5A55FFFC2805CFFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFD39778FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+      FFFFFFFFFFFFFFFFFCFFF4EBE6FFA5696AFFE2A35BFFEF9938FFBB704FFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFCE9576FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+      FFFFFEFCFAFFFCF6EBFFFAEFE0FFA5696AFFA5696AFFA5696AFFA5696AFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFCA9174FFFFFFFFFFFFFFFFFFFFFFFFFFFFFC
+      FAFFFCF4EDFFFAEDDEFFF8E7D4FFFCEBD3FFE3D3BBFFB7AD9CFFA5696AFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFC48C72FFFFFFFFFFFFFFFFFFFFFCFAFFFCF4
+      EDFF000082FF000082FF000082FF000082FF000082FF000082FF000082FF0000
+      82FF000082FF000082FF000082FFBF8770FFFFFFFFFFFFFBFAFFFEF4EDFFFAEE
+      E0FF000082FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+      FFFFFFFFFFFFFFFFFFFF000082FFBA836DFFFFFFFFFFFCF4EEFFFAEDE1FFF8E9
+      D5FF000082FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+      FFFFFFFFFFFFFFFFFFFF000082FFB47E6BFFFFFFFBFFF8EDE1FFF7E6D4FFF6E1
+      C9FF000082FFFFFFFFFF000082FF000082FFFFFFFFFFFFFFFFFFFFFFFFFF0000
+      82FFFFFFFFFFFFFFFFFF000082FFAD7869FFFFFBEEFFF7E7D5FFF4E1CAFFF3DC
+      BFFF000082FFFFFFFFFF000082FFFFFFFFFF000082FFFFFFFFFF000082FFFFFF
+      FFFF000082FFFFFFFFFF000082FFA77466FFFFF4E1FFF6E1CAFFF3DCBFFFF2D7
+      B4FF000082FFFFFFFFFF000082FFFFFFFFFF000082FFFFFFFFFF000082FFFFFF
+      FFFF000082FFFFFFFFFF000082FFA36F64FFFEEED4FFF4DDC0FFF2D7B5FFF0D1
+      AAFF000082FFFFFFFFFF000082FF000082FFFFFFFFFFFFFFFFFF000082FFFFFF
+      FFFF000082FFFFFFFFFF000082FF9D6B62FFFCE7C9FFF2D5B5FFF0D0A9FFEECB
+      9EFF000082FFFFFFFFFF000082FFFFFFFFFF000082FFFFFFFFFFFFFFFFFF0000
+      82FFFFFFFFFFFFFFFFFF000082FF986860FFFBE5C0FFF4D5ADFFF0CF9FFFEFCA
+      96FF000082FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+      FFFFFFFFFFFFFFFFFFFF000082FF95655FFFA5696AFFA5696AFFA5696AFFA569
+      6AFF000082FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+      FFFFFFFFFFFFFFFFFFFF000082FFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFF000082FF000082FF000082FF000082FF000082FF000082FF000082FF0000
+      82FF000082FF000082FF000082FFE7AB79FFD1926DFFD1926DFFD1926DFFD192
+      6DFFD1926DFFA56B5FFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFE7AB79FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+      FFFFE1D5D9FFA56B5FFFD48E5AFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFDA9D75FFFFFFFFFFFFFFFFFFFFFFFFFFFFFE
+      FCFFE5D3CCFFA56B5FFFCF8343FFAF6A54FFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFD1926DFFFFFFFFFFFFFFFFFFFEFBF7FFFBEF
+      E5FFF7E5D1FFA1695DFFA0685CFF9E6365FFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFBC8268FFFFFFFFFFFFFBF7FFFAF0E5FFF6E5
+      D1FFEFD9C0FF005CFFFFCFB692FF8C585AFF005CFFFFFF00FFFFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFBC8268FFFFFFFFFFFBEFE5FFF6E5D3FFEED9
+      C0FFDDC4A6FF005CFFFF005CFFFF005CFFFF005CFFFFD1926DFFD1926DFFD192
+      6DFF9D665BFFFF00FFFFFF00FFFFA7756BFFFFFEF7FFF7E7D4FFEFD9C1FF005C
+      FFFF005CFFFF005CFFFF005CFFFF005CFFFF005CFFFF005CFFFF005CFFFFC0BA
+      BAFF956056FFC58460FFFF00FFFFA7756BFFFFF7E3FFF3DDC4FFEAD1B1FFD0B5
+      91FF005CFFFF005CFFFF544132FF606060FF005CFFFF005CFFFF767676FFA4A1
+      9FFF8C5B51FFDA9044FFBD7247FFA5686AFFFEEED3FFF0D5B5FFEACBA3FFCEAD
+      83FF005CFFFF005CFFFF554133FF777777FF005CFFFF005CFFFF6B6967FFA199
+      90FF8C5B51FF9D665BFFA36668FFA46769FFFCE6C1FFEECFA6FFE7C596FF005C
+      FFFF005CFFFF005CFFFF005CFFFF005CFFFF005CFFFF005CFFFF005CFFFF9F92
+      84FFDAC9ADFFEAD8B2FFA36668FFA5686AFFA6696AFFA46869FFA06667FF8F5B
+      5BFF6D4545FF005CFFFF005CFFFF005CFFFF005CFFFF5B5652FF72695FFFA092
+      7FFFD1B698FFF2D3A3FFA36668FFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFFFF00FFFF005CFFFF56413BFF6B6968FF005CFFFF736A5FFF968876FFC0A9
+      8CFFDDBD96FFEECC93FFA46769FFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFF765751FFA19C93FF9E9284FFA0917FFFC0A98CFFDABC
+      95FFE6C190FFF0C987FFA46769FFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFF8E595BFFD8CAB7FFD3C0A7FFD1B89AFFDCBD97FFE6C2
+      92FFE7BF84FFF0C681FFA46769FFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFF9F6466FFF7E5C6FFF2D9B1FFEED1A1FFEECC93FFF0C7
+      87FFEFC580FFF7D083FFA46769FFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFA36668FFA36668FFA36668FFA36668FFA46769FFA467
+      69FFA46769FFA46769FFA46769FFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFFFF00FFFF004600FF004600FFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFF004600FF015403FF004E01FFFF00FFFFFF00FFFFFF00FFFF07E9E7FFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFF004700FF004600FF004900FF004A00FF0046
+      00FF0E8A25FF066B10FF004900FFFF00FFFFFF00FFFFFF00FFFFFF00FFFF07F8
+      F6FFFF00FFFFFF00FFFF004800FF035B07FF066B11FF05680EFF04640CFF0156
+      03FF066A0FFF015303FFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFFFF00FFFF045E03FF0F8C28FF004500FF0C811FFF0B7B1BFF066C11FF035D
+      07FF004800FFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFF0148B4FF01511BFF119120FF0C801FFF004500FF097516FF076D11FF035A
+      06FFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF0758
+      CFFF1C78FAFF024FB0FF014F11FF0F891CFF087013FF004500FF066C11FF0154
+      03FFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF0250C6FF004C
+      C1FF116BE1FF1672FAFF004AA1FF01520AFF0D831AFF04640CFF004500FF014E
+      01FFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF0250C6FF2580
+      F3FF004CC1FF0F69E2FF0D69F7FF004A89FF015506FF0A7813FF015403FF0045
+      00FFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF0250C6FF166EE1FF2B88
+      F8FF1A76EDFF004CC1FF0D69E5FF0862F3FF004A78FF015103FF015C0DFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF014BC1FF2881F0FF2883
+      F6FF217FF4FF136EE6FF004CC1FF0966E5FF0254E1FF003A19FFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF014FC4FF0C5FD3FF1167DCFF2581
+      F4FF1975EBFF116CE6FF0559D0FF004EC4FFFF00FFFFFF00FFFF07EAE1FFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFF004BC0FF1C74E3FF2682F7FF0151CAFF0455
+      CAFF0454CBFF004CC1FF004CC1FFFF00FFFFFF00FFFFFF00FFFFFF00FFFF07E9
+      E7FFFF00FFFFFF00FFFFFF00FFFF004DC4FF095CD3FF055BD7FFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFF0151CAFF004BC1FFFF00FFFFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFF484A4BFF484A4BFF484A4BFF484A4BFF484A4BFFFF00FFFFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF484A4BFF484A
+      4BFFF8F8FAFFF8F8FAFFEAE9EBFFD5D3D5FFBDBABDFF484A4BFF484A4BFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF484A4BFFFFFF
+      FFFFF8F8FAFFF7F6F8FFE6E5E7FFD0CED0FFBAB4B8FFA69FA4FF999197FF484A
+      4BFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF484A4BFFEBEA
+      EBFFFAFAFBFFA7A7AAFF747475FF767678FF7D7D7EFF656667FF555657FF484A
+      4BFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF484A4BFFE9E6
+      E9FFE3E3E3FF484A4BFF686A6AFF585A5AFF565858FF636464FF747474FF484A
+      4BFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF484A4BFFE0DD
+      E0FFDAD8DAFF484A4BFF7E7F81FF6D6E6EFF969695FF959595FF999999FF484A
+      4BFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF484A4BFFD5D1
+      D4FFD0CBCFFF484A4BFF939697FF8A8A8BFF818181FF7E7E7EFF888887FF484A
+      4BFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF484A4BFFCAC4
+      C9FFC4BDC2FF484A4BFF828384FF767676FF919191FF919192FF90908FFF484A
+      4BFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF484A4BFFBDB7
+      BCFFB8B1B6FF484A4BFF919193FF848486FF7A7A7AFF7A7A7AFF808080FF484A
+      4BFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF484A4BFFB2AB
+      B1FFACA6ACFF484A4BFF7E7F81FF737473FF7B7B7BFF7B7B7BFF808080FF484A
+      4BFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF484A4BFFA9A1
+      A9FFA59DA5FF484A4BFF7B7A7DFF737474FF7B7B7BFF7B7B7BFF808080FF484A
+      4BFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF484A4BFFA39A
+      A1FFA39AA1FF484A4BFF78787AFF747474FF7B7B7BFF7B7B7BFF808080FF484A
+      4BFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF484A4BFFA39A
+      A1FFA39AA1FF484A4BFF039E0AFF467B4AFF7B7B7BFF4C4C7EFF808080FF484A
+      4BFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF484A
+      4BFFA39AA1FF484A4BFF467B4AFF727572FF4D4E7FFF7F7F7FFF808080FF484A
+      4BFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFF484A4BFF484A4BFF6B6C6DFF6B6C6DFF6B6C6DFF484A4BFF484A4BFF484A
+      4BFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFFFF00FFFF484A4BFF484A4BFF484A4BFF484A4BFFFF00FFFFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF93401AFF93401AFF93401AFF9340
+      1AFF93401AFF93401AFF93401AFF93401AFF93401AFF99441CFF953E15FF9944
+      1CFF8C3C1AFF843D24FFFF00FFFF994115FFCE6414FFCE6414FFCE6414FFCE64
+      14FFCE6414FFCE6414FFCE6414FFCE6414FFD16818FFF3A966FFE07011FFF3A9
+      66FF9F6339FF3553C7FFA6420CFF9E5123FFCB9346FFC68C41FFC68C41FFC68C
+      41FFC68C41FFC68C41FFC68C41FFC68C41FFC68C41FFCD9951FFCB9346FFCD99
+      51FFC1914EFFBB955CFFA15222FF692A11FF6E6C6AFF6E6C6AFFFFFCFAFFFEF9
+      F2FFFEF9F2FFFFF6EEFFDCE5C5FF1D9519FF0B8A09FF419553FF465EE9FFEED5
+      C1FFFDDAB4FFFDDAB4FF7D3213FF65280FFFFFFCFAFF6E6C6AFFFFFCFAFFFEF9
+      F2FFFFF6EEFFE1DDEAFF148F14FFFEEED9FFFEE9D2FF01760FFF0A3BC1FF405A
+      DEFFFDDAB4FF9191C2FF642D24FF652810FF6E6C6AFF6E6C6AFFFEF9F2FFFEF9
+      F2FF2849FAFF046539FF056E2AFF0F31FCFF0C2DFAFF0C8411FF47A030FF1635
+      F3FF546ACBFF1635F3FF5E2D2DFF65280FFFFFF6EEFF6E6C6AFFFEF9F2FF4D69
+      F7FF1652A6FF148F14FFEEE5D3FFBFBBDAFFD5C9CFFFBCCC90FF0A8907FF83AC
+      72FF0525FBFF485BDCFF762F12FF65280FFF6E6C6AFF6E6C6AFFC6CCF2FF0F31
+      FCFFFEF3E7FF2E9E28FFFEE9D2FFFBE7CFFFFEE2C4FFFEDDBAFF81B65DFF0B8A
+      09FFFCD3A7FFFCD3A7FF5F3A0FFF652810FFFEF3E7FF6E6C6AFF2243FBFF326E
+      9FFF0B8A09FF73BA60FFFBE7CFFFFEE2C4FFFEE2C4FFFDDAB4FFFDDAB4FF47A0
+      30FF0B8A09FF168E0EFF50420CFF652810FF6E6C6AFF6E6C6AFF3C5AF7FF0B8A
+      09FF6CB75CFFFEE9D2FFFBE7CFFFFEE2C4FFFEDDBAFFFDDAB4FFFCD7ADFFFCD3
+      A7FFE9CC95FFFBCE9CFF762F12FF652810FFEFE7DDFF6E6C6AFF6E6C6AFF6E6C
+      6AFF6E6C6AFF6E6C6AFF6E6C6AFF6E6C6AFF6E6C6AFF6E6C6AFF6E6C6AFF6E6C
+      6AFF6E6C6AFF6E6C6AFF762F12FF692A11FFFEF3E7FFFFEFE0FF6E6C6AFFFBE7
+      CFFFFBE7CFFF6E6C6AFFFEDDBAFFFEDDBAFF6E6C6AFFFCD3A7FFFBCE9CFF6E6C
+      6AFFFCCB97FFFCCB97FF7D3213FF893615FF7D3213FF7D3213FF7D3213FF7D32
+      13FF7D3213FF7D3213FF7D3213FF7D3213FF7D3213FF7D3213FF7D3213FF7D32
+      13FF7D3213FF7D3213FF893615FFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFFFF00FFFFD8AA96FFE0BAAAFFE0BAAAFFD8AA96FFFF00FFFFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFFD8AA97FFEED9CFFFFFFFFFFFFFFFFFFFF3E6E0FFD8AA97FFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFD7A6
+      91FFEED9D0FFFFFFFFFFFAEAD3FFF6E0C6FFFFFFFFFFF4E5DEFFD8AD99FFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFD8AA97FFEEDA
+      D0FFFFFFFFFFF6DCBBFFF0C58FFFEAB079FFEBBC93FFFFFFFFFFF0E2DAFFD8AA
+      97FFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFD7A793FFEEDDD4FFFFFF
+      FFFFF6D7B6FFE0924AFFFAEADAFFF7E0D0FFC96428FFE1A482FFFEFFFFFFE9DC
+      D7FFD7AA97FFFF00FFFFFF00FFFFFF00FFFFD8AA97FFEFDDD5FFFFFFFFFFF3D4
+      B2FFDC8A45FFD57E3EFFD88955FFD07948FFC05421FFBB4718FFD79A7FFFF0FE
+      FFFFE0CFC9FFD8AA97FFFF00FFFFD8AA96FFF2E1D9FFFFFFFFFFEFCBA7FFD57D
+      3BFFCE6F31FFD37B46FFF2D4BFFFE7BA9FFFB84519FFB0370FFFAA2D09FFCA88
+      6DFFDAE1E5FFCFBCB6FFD5A793FFE0BAAAFFFFFFFFFFF6DECBFFD37636FFCC69
+      2FFFC65D28FFC05422FFF6E3D8FFF2DACEFFAF3710FFAC320DFFAC320DFFAB2E
+      09FFC29787FFB8BBC0FFC1A398FFE0BAAAFFFFFFFFFFF3D9C5FFC65D27FFC054
+      22FFBB4A1CFFB64117FFF3DCCFFFF0D5C9FFAD340FFFAC320DFFAD350FFFAD2C
+      07FFB47F6AFF9F9EA1FFB1958BFFD8AA96FFF2E1DAFFFFFFFFFFE1A688FFB43B
+      10FFB0350FFFAF360FFFF2D8CCFFF0D4C7FFAD330EFFAC310DFFAD2D08FFB05E
+      40FFA0989CFF998884FFC79E8BFFFF00FFFFD8AA97FFF2E2DDFFFFFFFFFFD58F
+      72FFA72A06FFAD3610FFF6E5DCFFF4E1D7FFAD3610FFAC2D08FFB16243FFA39E
+      A1FF9E8A87FFD8AA97FFFF00FFFFFF00FFFFFF00FFFFD8AA97FFEFE1D9FFFEFF
+      FFFFCE876AFFB5411AFFDD9F82FFDD9E81FFB8421AFFB05E40FFA19EA3FF9E8B
+      87FFC69D8BFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFD8AA97FFEADE
+      D9FFF2FEFFFFC67D5DFFA72503FFAA2603FFB16548FFA39FA3FF9E8A87FFD8AA
+      97FFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFD8AF
+      9AFFE1D1CEFFDADDE1FFC2917EFFB48370FFA09A9DFFA08E88FFC79E8CFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFFD8AA97FFCEBFBBFFB7BBC0FF9E9CA0FF9F8C86FFD8AA97FFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFFFF00FFFFD5AA98FFBDA398FFB4968BFFC99E8EFFFF00FFFFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFD0906BFFD0906BFFD0906BFFD0906BFFD090
+      6BFFD0906BFFD0906BFFD0906BFFA5696AFFBB7F6AFFFF00FFFFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFD59A79FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+      FFFFFFFFFFFFFFFFFFFFF8F8FEFFA5696AFFE5A55FFFC2805CFFFF00FFFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFD39778FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+      FFFFFFFFFFFFFFFFFCFFF4EBE6FFA5696AFFE2A35BFFEF9938FFBB704FFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFCE9576FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+      FFFFFEFCFAFFFCF6EBFFFAEFE0FFA5696AFFA5696AFFA5696AFFA5696AFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFCA9174FFFFFFFFFFFFFFFFFFFFFFFFFFFFFC
+      FAFFFCF4EDFFFAEDDEFFF8E7D4FFFCEBD3FFE3D3BBFFB7AD9CFFA5696AFFFF00
+      FFFFFF00FFFFFF00FFFFFF00FFFFC48C72FFFFFFFFFFFFFFFFFFFFFCFAFFFCF4
+      EDFF000082FF000082FF000082FF000082FF000082FF000082FF000082FF0000
+      82FF000082FF000082FF000082FFBF8770FFFFFFFFFFFFFBFAFFFEF4EDFFFAEE
+      E0FF000082FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+      FFFFFFFFFFFFFFFFFFFF000082FFBA836DFFFFFFFFFFFCF4EEFFFAEDE1FFF8E9
+      D5FF000082FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+      FFFFFFFFFFFFFFFFFFFF000082FFB47E6BFFFFFFFBFFF8EDE1FFF7E6D4FFF6E1
+      C9FF000082FFFFFFFFFFFFFFFFFFFFFFFFFF000082FF000082FFFFFFFFFFFFFF
+      FFFFFFFFFFFF000082FF000082FFAD7869FFFFFBEEFFF7E7D5FFF4E1CAFFF3DC
+      BFFF000082FFFFFFFFFF000082FF000082FFFFFFFFFFFFFFFFFF000082FFFFFF
+      FFFF000082FFFFFFFFFF000082FFA77466FFFFF4E1FFF6E1CAFFF3DCBFFFF2D7
+      B4FF000082FF000082FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000
+      82FFFFFFFFFFFFFFFFFF000082FFA36F64FFFEEED4FFF4DDC0FFF2D7B5FFF0D1
+      AAFF000082FFFFFFFFFF000082FF000082FFFFFFFFFFFFFFFFFF000082FFFFFF
+      FFFF000082FFFFFFFFFF000082FF9D6B62FFFCE7C9FFF2D5B5FFF0D0A9FFEECB
+      9EFF000082FFFFFFFFFFFFFFFFFFFFFFFFFF000082FF000082FFFFFFFFFFFFFF
+      FFFFFFFFFFFF000082FF000082FF986860FFFBE5C0FFF4D5ADFFF0CF9FFFEFCA
+      96FF000082FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+      FFFFFFFFFFFFFFFFFFFF000082FF95655FFFA5696AFFA5696AFFA5696AFFA569
+      6AFF000082FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+      FFFFFFFFFFFFFFFFFFFF000082FFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00
+      FFFF000082FF000082FF000082FF000082FF000082FF000082FF000082FF0000
+      82FF000082FF000082FF000082FF
+    }
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROIDEData.lrs b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROIDEData.lrs
new file mode 100644
index 0000000..4db3ebf
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROIDEData.lrs	
@@ -0,0 +1,377 @@
+{ This is an automatically generated lazarus resource file }
+
+LazarusResources.Add('TIdeData','FORMDATA',[
+  'TPF0'#8'TIdeData'#7'IdeData'#4'left'#3'J'#2#3'top'#3'4'#1#6'Height'#3#150#0
+  +#16'HorizontalOffset'#2'5'#14'VerticalOffset'#2'`'#5'Width'#3#215#0#0#10'TIm'
+  +'ageList'#11'iml_Actions'#7'BkColor'#7#12'clForeground'#4'left'#2' '#3'top'#2
+  +#8#6'Bitmap'#10#14' '#0#0'Li'#8#0#0#0#16#0#0#0#16#0#0#0#255#0#255#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#133#133#133#255'bbb'#255
+  +'YYY'#255'YYY'#255'SSS'#255#133#133#133#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#133#133#133#255'hhh'#255'_ew'#255'Pe'#165#255'H`'#171#255'H`'#171#255';'
+  +'Q'#156#255'CJ`'#255'AAA'#255'bbb'#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0#255#255'sss'#255'fiq'#255'Pp'#207#255'@n'#255#255'6'
+  +'f'#255#255'-]'#255#255'$T'#255#255#27'L'#255#255#24'C'#231#255' ='#170#255
+  +';;;'#255'AAA'#255#255#0#255#255#255#0#255#255#255#0#255#255#133#133#133#255
+  +'fiq'#255'Ms'#226#255'@n'#255#255'6f'#255#255'-]'#255#255'$T'#255#255#27'L'
+  +#255#255#24'C'#231#255'<?K'#255'7:G'#255'111'#255'111'#255'SSS'#255#255#0#255
+  +#255#255#0#255#255'hhh'#255'Ul'#177#255'@n'#255#255'?c'#212#255'<Z'#190#255
+  +'$T'#255#255#27'L'#255#255#21'C'#243#255' ='#170#255';;;'#255';;;'#255'$.^'
+  +#255')+7'#255''''''''#255#255#0#255#255#133#133#133#255'bbb'#255'\_h'#255'H`'
+  +#171#255'OUi'#255'CP{'#255#27'L'#255#255#24'D'#231#255#15';'#231#255'09_'#255
+  +'111'#255#25'+'#138#255#0#31#216#255#14#30#142#255''''''''#255'bbb'#255'bbb'
+  +#255'bbb'#255'YYY'#255'SSS'#255'SSS'#255'III'#255'>D['#255';;;'#255#4'3'#240
+  +#255'!2}'#255'111'#255#30'(b'#255#0#25#204#255#18#27'h'#255#24#24#24#255#24
+  +#24#24#255'YYY'#255'YYY'#255'SSS'#255'SSS'#255'III'#255'AAA'#255'AAA'#255'09'
+  +'_'#255#3','#229#255#31',s'#255'&*B'#255''''''''#255''''''''#255#24#24#24#255
+  +#24#24#24#255#18#18#18#255'YYY'#255'SSS'#255'OOO'#255')J'#199#255#30'C'#208
+  +#255'5>c'#255';;;'#255';;;'#255'$.^'#255#8'"'#184#255#23'"f'#255#28#31'?'#255
+  +#27#28'&'#255#18#19':'#255#14#14'5'#255#14#14#14#255'SSS'#255'III'#255'CP{'
+  +#255#18'C'#255#255#8';'#255#255#19'5'#192#255'111'#255'111'#255'!(V'#255#7#28
+  +#172#255#4#21#172#255#0#12#179#255#10#14'h'#255#4#4#130#255#7#7'J'#255#14#14
+  +#14#255#133#133#133#255'III'#255'ADP'#255#18';'#219#255#1'3'#252#255'$3q'#255
+  +'111'#255',,,'#255#10#28#162#255#0#19#191#255#0#12#179#255#0#6#167#255#0#0
+  +#154#255#0#0#154#255#7#7#26#255'SSS'#255#255#0#255#255'AAA'#255'AAA'#255';;;'
+  +#255';;;'#255'111'#255',,,'#255''''''''#255#26#30'I'#255#0#12#179#255#0#6#167
+  +#255#0#0#154#255#0#0#154#255#2#2'c'#255#0#0#0#255#255#0#255#255#255#0#255#255
+  +'bbb'#255';;;'#255'111'#255'111'#255',,,'#255'%&1'#255#11#23#141#255#7#16#140
+  +#255#0#6#167#255#0#0#154#255#0#0#154#255#1#1'~'#255#3#3#13#255'AAA'#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255'AAA'#255'111'#255',,,'#255''''''''#255
+  +#26#30'I'#255#0#12#179#255#0#6#167#255#0#0#154#255#0#0#154#255#2#2'c'#255#3#3
+  +#13#255#18#18#18#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255'bbb'#255''''''''#255''''''''#255#23#26'9'#255#11#15'`'#255#8#9
+  +'W'#255#7#7'J'#255#7#7#26#255#0#0#0#255'AAA'#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255'bbb'#255#24#24#24#255#18#18#18#255#14#14#14#255#14#14#14#255'SSS'
+  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#208#144'k'#255#208#144'k'#255#208#144'k'#255#208#144'k'#255#208#144'k'#255
+  +#208#144'k'#255#208#144'k'#255#208#144'k'#255#165'ij'#255#187'j'#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#213#154'y'#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#248#248#254#255#165'ij'#255#229#165
+  +'_'#255#194#128'\'#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#211#151'x'#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#252#255#244#235#230#255#165'ij'
+  +#255#226#163'['#255#239#153'8'#255#187'pO'#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#206#149'v'#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#254#252#250#255#252#246#235#255#250#239#224
+  +#255#165'ij'#255#165'ij'#255#165'ij'#255#165'ij'#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0#255#255#202#145't'#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#252#250#255#252#244#237#255#250#237#222#255#248#231
+  +#212#255#252#235#211#255#227#211#187#255#183#173#156#255#165'ij'#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#196#140'r'#255#255#255#255
+  +#255#255#255#255#255#255#252#250#255#252#244#237#255#0#0#130#255#0#0#130#255
+  +#0#0#130#255#0#0#130#255#0#0#130#255#0#0#130#255#0#0#130#255#0#0#130#255#0#0
+  +#130#255#0#0#130#255#0#0#130#255#191#135'p'#255#255#255#255#255#255#251#250
+  +#255#254#244#237#255#250#238#224#255#0#0#130#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  ,#255#255#255#255#255#255#255#255#255#255#0#0#130#255#186#131'm'#255#255#255
+  +#255#255#252#244#238#255#250#237#225#255#248#233#213#255#0#0#130#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#0#0#130#255#180
+  +'~k'#255#255#255#251#255#248#237#225#255#247#230#212#255#246#225#201#255#0#0
+  +#130#255#255#255#255#255#0#0#130#255#0#0#130#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#0#0#130#255#255#255#255#255#255#255#255#255#0#0#130#255
+  +#173'xi'#255#255#251#238#255#247#231#213#255#244#225#202#255#243#220#191#255
+  +#0#0#130#255#255#255#255#255#0#0#130#255#255#255#255#255#0#0#130#255#255#255
+  +#255#255#0#0#130#255#255#255#255#255#0#0#130#255#255#255#255#255#0#0#130#255
+  +#167'tf'#255#255#244#225#255#246#225#202#255#243#220#191#255#242#215#180#255
+  +#0#0#130#255#255#255#255#255#0#0#130#255#255#255#255#255#0#0#130#255#255#255
+  +#255#255#0#0#130#255#255#255#255#255#0#0#130#255#255#255#255#255#0#0#130#255
+  +#163'od'#255#254#238#212#255#244#221#192#255#242#215#181#255#240#209#170#255
+  +#0#0#130#255#255#255#255#255#0#0#130#255#0#0#130#255#255#255#255#255#255#255
+  +#255#255#0#0#130#255#255#255#255#255#0#0#130#255#255#255#255#255#0#0#130#255
+  +#157'kb'#255#252#231#201#255#242#213#181#255#240#208#169#255#238#203#158#255
+  +#0#0#130#255#255#255#255#255#0#0#130#255#255#255#255#255#0#0#130#255#255#255
+  +#255#255#255#255#255#255#0#0#130#255#255#255#255#255#255#255#255#255#0#0#130
+  +#255#152'h`'#255#251#229#192#255#244#213#173#255#240#207#159#255#239#202#150
+  +#255#0#0#130#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#0#0#130#255#149'e_'#255#165'ij'#255#165'ij'#255#165'ij'#255#165'ij'
+  +#255#0#0#130#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#0#0#130#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#0#0#130#255#0#0#130#255#0#0#130#255#0#0#130#255#0#0#130#255#0
+  +#0#130#255#0#0#130#255#0#0#130#255#0#0#130#255#0#0#130#255#0#0#130#255#231
+  +#171'y'#255#209#146'm'#255#209#146'm'#255#209#146'm'#255#209#146'm'#255#209
+  +#146'm'#255#165'k_'#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#231#171'y'#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#225#213#217#255#165'k_'#255#212#142'Z'#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#218#157'u'#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#254#252#255#229#211#204#255#165'k_'#255#207#131'C'#255#175'jT'#255#255#0#255
+  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#209#146'm'#255#255#255#255#255#255#255#255#255#254#251#247#255
+  +#251#239#229#255#247#229#209#255#161'i]'#255#160'h\'#255#158'ce'#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#188#130'h'#255#255#255#255#255#255#251#247#255#250#240#229
+  +#255#246#229#209#255#239#217#192#255#0'\'#255#255#207#182#146#255#140'XZ'#255
+  +#0'\'#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255#188#130'h'#255#255#255#255#255#251#239#229#255#246#229
+  +#211#255#238#217#192#255#221#196#166#255#0'\'#255#255#0'\'#255#255#0'\'#255
+  +#255#0'\'#255#255#209#146'm'#255#209#146'm'#255#209#146'm'#255#157'f['#255
+  +#255#0#255#255#255#0#255#255#167'uk'#255#255#254#247#255#247#231#212#255#239
+  +#217#193#255#0'\'#255#255#0'\'#255#255#0'\'#255#255#0'\'#255#255#0'\'#255#255
+  +#0'\'#255#255#0'\'#255#255#0'\'#255#255#192#186#186#255#149'`V'#255#197#132
+  +'`'#255#255#0#255#255#167'uk'#255#255#247#227#255#243#221#196#255#234#209#177
+  +#255#208#181#145#255#0'\'#255#255#0'\'#255#255'TA2'#255'```'#255#0'\'#255#255
+  +#0'\'#255#255'vvv'#255#164#161#159#255#140'[Q'#255#218#144'D'#255#189'rG'#255
+  +#165'hj'#255#254#238#211#255#240#213#181#255#234#203#163#255#206#173#131#255
+  +#0'\'#255#255#0'\'#255#255'UA3'#255'www'#255#0'\'#255#255#0'\'#255#255'kig'
+  +#255#161#153#144#255#140'[Q'#255#157'f['#255#163'fh'#255#164'gi'#255#252#230
+  +#193#255#238#207#166#255#231#197#150#255#0'\'#255#255#0'\'#255#255#0'\'#255
+  +#255#0'\'#255#255#0'\'#255#255#0'\'#255#255#0'\'#255#255#0'\'#255#255#159#146
+  +#132#255#218#201#173#255#234#216#178#255#163'fh'#255#165'hj'#255#166'ij'#255
+  +#164'hi'#255#160'fg'#255#143'[['#255'mEE'#255#0'\'#255#255#0'\'#255#255#0'\'
+  +#255#255#0'\'#255#255'[VR'#255'ri_'#255#160#146''#255#209#182#152#255#242
+  +#211#163#255#163'fh'#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0#255#255#0'\'#255#255'VA;'#255'kih'#255#0'\'#255#255
+  +'sj_'#255#150#136'v'#255#192#169#140#255#221#189#150#255#238#204#147#255#164
+  +'gi'#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  ,#255#255#0#255#255#255#0#255#255'vWQ'#255#161#156#147#255#158#146#132#255#160
+  +#145''#255#192#169#140#255#218#188#149#255#230#193#144#255#240#201#135#255
+  +#164'gi'#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#142'Y['#255#216#202#183#255#211#192#167
+  +#255#209#184#154#255#220#189#151#255#230#194#146#255#231#191#132#255#240#198
+  +#129#255#164'gi'#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#255#255#159'df'#255#247#229#198#255#242
+  +#217#177#255#238#209#161#255#238#204#147#255#240#199#135#255#239#197#128#255
+  +#247#208#131#255#164'gi'#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#163'fh'#255#163'fh'#255
+  +#163'fh'#255#163'fh'#255#164'gi'#255#164'gi'#255#164'gi'#255#164'gi'#255#164
+  +'gi'#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#0'F'#0#255#0'F'#0
+  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#0'F'#0#255#1'T'#3#255#0'N'#1#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#7#233#231#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0#255#255#0'G'#0#255#0'F'#0#255#0'I'#0#255#0'J'#0#255
+  +#0'F'#0#255#14#138'%'#255#6'k'#16#255#0'I'#0#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#7#248#246#255#255#0#255#255#255#0#255#255#0'H'#0
+  +#255#3'['#7#255#6'k'#17#255#5'h'#14#255#4'd'#12#255#1'V'#3#255#6'j'#15#255#1
+  +'S'#3#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0#255#255#4'^'#3#255#15#140'('#255#0'E'#0#255#12#129
+  +#31#255#11'{'#27#255#6'l'#17#255#3']'#7#255#0'H'#0#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#1'H'#180#255#1'Q'#27#255#17#145' '#255#12#128#31#255#0'E'#0#255#9'u'#22
+  +#255#7'm'#17#255#3'Z'#6#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#7'X'#207#255#28'x'#250#255
+  +#2'O'#176#255#1'O'#17#255#15#137#28#255#8'p'#19#255#0'E'#0#255#6'l'#17#255#1
+  +'T'#3#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#2'P'#198#255#0'L'#193#255#17'k'#225#255#22'r'#250#255#0'J'
+  +#161#255#1'R'#10#255#13#131#26#255#4'd'#12#255#0'E'#0#255#1'N'#1#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#2'P'#198#255'%'#128#243#255#0'L'#193#255#15'i'#226#255#13'i'#247#255#0
+  +'J'#137#255#1'U'#6#255#10'x'#19#255#1'T'#3#255#0'E'#0#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#2'P'#198#255#22'n'#225#255
+  +'+'#136#248#255#26'v'#237#255#0'L'#193#255#13'i'#229#255#8'b'#243#255#0'Jx'
+  +#255#1'Q'#3#255#1'\'#13#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#1'K'#193#255'('#129#240#255'('#131#246
+  +#255'!'#244#255#19'n'#230#255#0'L'#193#255#9'f'#229#255#2'T'#225#255#0':'#25
+  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#1'O'#196#255#12'_'#211#255#17'g'#220#255'%'#129#244#255#25'u'
+  +#235#255#17'l'#230#255#5'Y'#208#255#0'N'#196#255#255#0#255#255#255#0#255#255
+  +#7#234#225#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#0'K'
+  +#192#255#28't'#227#255'&'#130#247#255#1'Q'#202#255#4'U'#202#255#4'T'#203#255
+  +#0'L'#193#255#0'L'#193#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#7#233#231#255#255#0#255#255#255#0#255#255#255#0#255#255#0'M'#196#255
+  +#9'\'#211#255#5'['#215#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#1'Q'#202#255#0
+  +'K'#193#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255'HJK'#255'HJK'#255'HJK'#255
+  +'HJK'#255'HJK'#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255'HJK'
+  +#255'HJK'#255#248#248#250#255#248#248#250#255#234#233#235#255#213#211#213#255
+  +#189#186#189#255'HJK'#255'HJK'#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255'HJK'#255#255#255#255
+  +#255#248#248#250#255#247#246#248#255#230#229#231#255#208#206#208#255#186#180
+  ,#184#255#166#159#164#255#153#145#151#255'HJK'#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255'HJK'#255#235#234#235
+  +#255#250#250#251#255#167#167#170#255'ttu'#255'vvx'#255'}}~'#255'efg'#255'UVW'
+  +#255'HJK'#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255'HJK'#255#233#230#233#255#227#227#227#255'HJK'#255'hjj'
+  +#255'XZZ'#255'VXX'#255'cdd'#255'ttt'#255'HJK'#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255'HJK'#255#224#221#224
+  +#255#218#216#218#255'HJK'#255'~'#129#255'mnn'#255#150#150#149#255#149#149
+  +#149#255#153#153#153#255'HJK'#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#255#255'HJK'#255#213#209#212#255#208#203
+  +#207#255'HJK'#255#147#150#151#255#138#138#139#255#129#129#129#255'~~~'#255
+  +#136#136#135#255'HJK'#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0#255#255'HJK'#255#202#196#201#255#196#189#194#255'HJ'
+  +'K'#255#130#131#132#255'vvv'#255#145#145#145#255#145#145#146#255#144#144#143
+  +#255'HJK'#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255'HJK'#255#189#183#188#255#184#177#182#255'HJK'#255#145
+  +#145#147#255#132#132#134#255'zzz'#255'zzz'#255#128#128#128#255'HJK'#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255'HJK'#255#178#171#177#255#172#166#172#255'HJK'#255'~'#129#255'sts'#255
+  +'{{{'#255'{{{'#255#128#128#128#255'HJK'#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255'HJK'#255#169#161#169#255
+  +#165#157#165#255'HJK'#255'{z}'#255'stt'#255'{{{'#255'{{{'#255#128#128#128#255
+  +'HJK'#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255'HJK'#255#163#154#161#255#163#154#161#255'HJK'#255'xxz'#255
+  +'ttt'#255'{{{'#255'{{{'#255#128#128#128#255'HJK'#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255'HJK'#255#163#154
+  +#161#255#163#154#161#255'HJK'#255#3#158#10#255'F{J'#255'{{{'#255'LL~'#255#128
+  +#128#128#255'HJK'#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#255#255'HJK'#255#163#154#161#255'HJK'#255
+  +'F{J'#255'rur'#255'MN'#255''#255#128#128#128#255'HJK'#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255'HJK'#255'HJK'#255'klm'#255'klm'#255'klm'#255'HJK'#255
+  +'HJK'#255'HJK'#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255'HJK'
+  +#255'HJK'#255'HJK'#255'HJK'#255#255#0#255#255#255#0#255#255#255#0#255#255#255
+  +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#147'@'#26#255#147'@'#26
+  +#255#147'@'#26#255#147'@'#26#255#147'@'#26#255#147'@'#26#255#147'@'#26#255
+  +#147'@'#26#255#147'@'#26#255#153'D'#28#255#149'>'#21#255#153'D'#28#255#140'<'
+  +#26#255#132'=$'#255#255#0#255#255#153'A'#21#255#206'd'#20#255#206'd'#20#255
+  +#206'd'#20#255#206'd'#20#255#206'd'#20#255#206'd'#20#255#206'd'#20#255#206'd'
+  +#20#255#209'h'#24#255#243#169'f'#255#224'p'#17#255#243#169'f'#255#159'c9'#255
+  +'5S'#199#255#166'B'#12#255#158'Q#'#255#203#147'F'#255#198#140'A'#255#198#140
+  +'A'#255#198#140'A'#255#198#140'A'#255#198#140'A'#255#198#140'A'#255#198#140
+  +'A'#255#198#140'A'#255#205#153'Q'#255#203#147'F'#255#205#153'Q'#255#193#145
+  +'N'#255#187#149'\'#255#161'R"'#255'i*'#17#255'nlj'#255'nlj'#255#255#252#250
+  +#255#254#249#242#255#254#249#242#255#255#246#238#255#220#229#197#255#29#149
+  +#25#255#11#138#9#255'A'#149'S'#255'F^'#233#255#238#213#193#255#253#218#180
+  +#255#253#218#180#255'}2'#19#255'e('#15#255#255#252#250#255'nlj'#255#255#252
+  +#250#255#254#249#242#255#255#246#238#255#225#221#234#255#20#143#20#255#254
+  +#238#217#255#254#233#210#255#1'v'#15#255#10';'#193#255'@Z'#222#255#253#218
+  +#180#255#145#145#194#255'd-$'#255'e('#16#255'nlj'#255'nlj'#255#254#249#242
+  +#255#254#249#242#255'(I'#250#255#4'e9'#255#5'n*'#255#15'1'#252#255#12'-'#250
+  +#255#12#132#17#255'G'#160'0'#255#22'5'#243#255'Tj'#203#255#22'5'#243#255'^--'
+  +#255'e('#15#255#255#246#238#255'nlj'#255#254#249#242#255'Mi'#247#255#22'R'
+  +#166#255#20#143#20#255#238#229#211#255#191#187#218#255#213#201#207#255#188
+  +#204#144#255#10#137#7#255#131#172'r'#255#5'%'#251#255'H['#220#255'v/'#18#255
+  +'e('#15#255'nlj'#255'nlj'#255#198#204#242#255#15'1'#252#255#254#243#231#255
+  +'.'#158'('#255#254#233#210#255#251#231#207#255#254#226#196#255#254#221#186
+  ,#255#129#182']'#255#11#138#9#255#252#211#167#255#252#211#167#255'_:'#15#255
+  +'e('#16#255#254#243#231#255'nlj'#255'"C'#251#255'2n'#159#255#11#138#9#255's'
+  +#186'`'#255#251#231#207#255#254#226#196#255#254#226#196#255#253#218#180#255
+  +#253#218#180#255'G'#160'0'#255#11#138#9#255#22#142#14#255'PB'#12#255'e('#16
+  +#255'nlj'#255'nlj'#255'<Z'#247#255#11#138#9#255'l'#183'\'#255#254#233#210#255
+  +#251#231#207#255#254#226#196#255#254#221#186#255#253#218#180#255#252#215#173
+  +#255#252#211#167#255#233#204#149#255#251#206#156#255'v/'#18#255'e('#16#255
+  +#239#231#221#255'nlj'#255'nlj'#255'nlj'#255'nlj'#255'nlj'#255'nlj'#255'nlj'
+  +#255'nlj'#255'nlj'#255'nlj'#255'nlj'#255'nlj'#255'nlj'#255'v/'#18#255'i*'#17
+  +#255#254#243#231#255#255#239#224#255'nlj'#255#251#231#207#255#251#231#207#255
+  +'nlj'#255#254#221#186#255#254#221#186#255'nlj'#255#252#211#167#255#251#206
+  +#156#255'nlj'#255#252#203#151#255#252#203#151#255'}2'#19#255#137'6'#21#255'}'
+  +'2'#19#255'}2'#19#255'}2'#19#255'}2'#19#255'}2'#19#255'}2'#19#255'}2'#19#255
+  +'}2'#19#255'}2'#19#255'}2'#19#255'}2'#19#255'}2'#19#255'}2'#19#255'}2'#19#255
+  +#137'6'#21#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255#216#170#150#255#224#186#170#255#224#186#170#255#216
+  +#170#150#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#216#170#151#255#238#217#207#255#255#255#255#255#255#255
+  +#255#255#243#230#224#255#216#170#151#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#215#166#145#255#238#217#208#255#255#255#255#255#250#234
+  +#211#255#246#224#198#255#255#255#255#255#244#229#222#255#216#173#153#255#255
+  +#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#216#170#151#255#238#218#208#255#255#255#255#255#246#220
+  +#187#255#240#197#143#255#234#176'y'#255#235#188#147#255#255#255#255#255#240
+  +#226#218#255#216#170#151#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255#215#167#147#255#238#221#212#255#255#255#255#255#246
+  +#215#182#255#224#146'J'#255#250#234#218#255#247#224#208#255#201'd('#255#225
+  +#164#130#255#254#255#255#255#233#220#215#255#215#170#151#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#216#170#151#255#239#221#213#255#255#255#255#255
+  +#243#212#178#255#220#138'E'#255#213'~>'#255#216#137'U'#255#208'yH'#255#192'T'
+  +'!'#255#187'G'#24#255#215#154''#255#240#254#255#255#224#207#201#255#216#170
+  +#151#255#255#0#255#255#216#170#150#255#242#225#217#255#255#255#255#255#239
+  +#203#167#255#213'};'#255#206'o1'#255#211'{F'#255#242#212#191#255#231#186#159
+  +#255#184'E'#25#255#176'7'#15#255#170'-'#9#255#202#136'm'#255#218#225#229#255
+  +#207#188#182#255#213#167#147#255#224#186#170#255#255#255#255#255#246#222#203
+  +#255#211'v6'#255#204'i/'#255#198']('#255#192'T"'#255#246#227#216#255#242#218
+  +#206#255#175'7'#16#255#172'2'#13#255#172'2'#13#255#171'.'#9#255#194#151#135
+  +#255#184#187#192#255#193#163#152#255#224#186#170#255#255#255#255#255#243#217
+  +#197#255#198']'''#255#192'T"'#255#187'J'#28#255#182'A'#23#255#243#220#207#255
+  +#240#213#201#255#173'4'#15#255#172'2'#13#255#173'5'#15#255#173','#7#255#180
+  +'j'#255#159#158#161#255#177#149#139#255#216#170#150#255#242#225#218#255#255
+  +#255#255#255#225#166#136#255#180';'#16#255#176'5'#15#255#175'6'#15#255#242
+  +#216#204#255#240#212#199#255#173'3'#14#255#172'1'#13#255#173'-'#8#255#176'^@'
+  +#255#160#152#156#255#153#136#132#255#199#158#139#255#255#0#255#255#216#170
+  +#151#255#242#226#221#255#255#255#255#255#213#143'r'#255#167'*'#6#255#173'6'
+  +#16#255#246#229#220#255#244#225#215#255#173'6'#16#255#172'-'#8#255#177'bC'
+  +#255#163#158#161#255#158#138#135#255#216#170#151#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#216#170#151#255#239#225#217#255#254#255#255#255#206#135'j'
+  +#255#181'A'#26#255#221#159#130#255#221#158#129#255#184'B'#26#255#176'^@'#255
+  +#161#158#163#255#158#139#135#255#198#157#139#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#255#255#216#170#151#255#234#222#217#255
+  +#242#254#255#255#198'}]'#255#167'%'#3#255#170'&'#3#255#177'eH'#255#163#159
+  +#163#255#158#138#135#255#216#170#151#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#216#175#154
+  +#255#225#209#206#255#218#221#225#255#194#145'~'#255#180#131'p'#255#160#154
+  +#157#255#160#142#136#255#199#158#140#255#255#0#255#255#255#0#255#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#216#170#151#255#206#191#187#255#183#187#192#255#158#156
+  +#160#255#159#140#134#255#216#170#151#255#255#0#255#255#255#0#255#255#255#0
+  ,#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0#255#255#255#0#255#255#213#170#152#255#189#163#152
+  +#255#180#150#139#255#201#158#142#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0#255#255#255#0#255#255#208#144'k'#255#208#144'k'#255
+  +#208#144'k'#255#208#144'k'#255#208#144'k'#255#208#144'k'#255#208#144'k'#255
+  +#208#144'k'#255#165'ij'#255#187'j'#255#255#0#255#255#255#0#255#255#255#0#255
+  +#255#255#0#255#255#255#0#255#255#255#0#255#255#213#154'y'#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#248#248#254#255#165'ij'#255#229#165'_'#255#194#128'\'#255#255#0#255#255
+  +#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#211#151'x'#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#252#255#244#235#230#255#165'ij'#255#226#163'['#255#239#153'8'#255
+  +#187'pO'#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#206#149
+  +'v'#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#254
+  +#252#250#255#252#246#235#255#250#239#224#255#165'ij'#255#165'ij'#255#165'ij'
+  +#255#165'ij'#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#202
+  +#145't'#255#255#255#255#255#255#255#255#255#255#255#255#255#255#252#250#255
+  +#252#244#237#255#250#237#222#255#248#231#212#255#252#235#211#255#227#211#187
+  +#255#183#173#156#255#165'ij'#255#255#0#255#255#255#0#255#255#255#0#255#255
+  +#255#0#255#255#196#140'r'#255#255#255#255#255#255#255#255#255#255#252#250#255
+  +#252#244#237#255#0#0#130#255#0#0#130#255#0#0#130#255#0#0#130#255#0#0#130#255
+  +#0#0#130#255#0#0#130#255#0#0#130#255#0#0#130#255#0#0#130#255#0#0#130#255#191
+  +#135'p'#255#255#255#255#255#255#251#250#255#254#244#237#255#250#238#224#255#0
+  +#0#130#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#0#0#130#255#186#131'm'#255#255#255#255#255#252#244#238#255#250#237#225
+  +#255#248#233#213#255#0#0#130#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#0#0#130#255#180'~k'#255#255#255#251#255#248#237#225
+  +#255#247#230#212#255#246#225#201#255#0#0#130#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#0#0#130#255#0#0#130#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#0#0#130#255#0#0#130#255#173'xi'#255#255#251#238#255#247#231
+  +#213#255#244#225#202#255#243#220#191#255#0#0#130#255#255#255#255#255#0#0#130
+  +#255#0#0#130#255#255#255#255#255#255#255#255#255#0#0#130#255#255#255#255#255
+  +#0#0#130#255#255#255#255#255#0#0#130#255#167'tf'#255#255#244#225#255#246#225
+  +#202#255#243#220#191#255#242#215#180#255#0#0#130#255#0#0#130#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#0#0#130
+  +#255#255#255#255#255#255#255#255#255#0#0#130#255#163'od'#255#254#238#212#255
+  +#244#221#192#255#242#215#181#255#240#209#170#255#0#0#130#255#255#255#255#255
+  +#0#0#130#255#0#0#130#255#255#255#255#255#255#255#255#255#0#0#130#255#255#255
+  +#255#255#0#0#130#255#255#255#255#255#0#0#130#255#157'kb'#255#252#231#201#255
+  +#242#213#181#255#240#208#169#255#238#203#158#255#0#0#130#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#0#0#130#255#0#0#130#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#0#0#130#255#0#0#130#255#152'h`'#255#251#229#192
+  +#255#244#213#173#255#240#207#159#255#239#202#150#255#0#0#130#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#0#0#130#255#149'e_'
+  +#255#165'ij'#255#165'ij'#255#165'ij'#255#165'ij'#255#0#0#130#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#0#0#130#255#255#0
+  +#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#0#0#130#255
+  +#0#0#130#255#0#0#130#255#0#0#130#255#0#0#130#255#0#0#130#255#0#0#130#255#0#0
+  +#130#255#0#0#130#255#0#0#130#255#0#0#130#255#0#0#0
+]);
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROIDEData.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROIDEData.pas
new file mode 100644
index 0000000..150098b
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROIDEData.pas	
@@ -0,0 +1,55 @@
+unit uROIDEData;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+
+uses
+  {$IFDEF FPC}LCLIntf, LResources,{$ENDIF}
+  {$IFDEF DELPHI5}Forms,{$ENDIF}
+  SysUtils, Classes, ImgList, Controls;
+
+type
+  TIdeData = class(TDataModule)
+    iml_Actions: TImageList;
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+const
+  ICON_REGENERATE = 1;
+  ICON_IMPORT     = 2;
+  ICON_MAKESERVER = 3;
+
+var
+  IdeData: TIdeData;
+
+implementation
+
+{$IFNDEF FPC}
+{$R *.dfm}
+{$ENDIF}
+
+{$IFDEF FPC}
+initialization
+  {$I uROIDEData.lrs}
+{$ENDIF FPC}
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROIDEEditors.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROIDEEditors.pas
new file mode 100644
index 0000000..250d487
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROIDEEditors.pas	
@@ -0,0 +1,213 @@
+unit uROIDEEditors;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - IDE Integration                                   }
+{                                                                            }
+{ compiler: Delphi 6 and up                                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+
+uses
+  {$IFDEF FPC}
+  PropEdits,ComponentEditors,
+  {$ELSE}
+  {$IFDEF VER140UP}DesignEditors, DesignIntf, {$ELSE} DsgnIntf,{$ENDIF}
+  {$ENDIF}
+  Forms,Classes;
+
+const prop_ServiceName = 'ServiceName';
+      prop_OperationName = 'OperationName';
+      prop_Dispatchers = 'Dispatchers';
+
+      capt_TestConnection = 'Test Connection...';
+
+type
+     {$IFDEF FPC}
+     IDesigner = TIDesigner;
+     {$ENDIF}
+
+     { TROServiceNameProperty }
+     TROServiceNameProperty = class(TStringProperty)
+     protected
+     public
+       function GetAttributes: TPropertyAttributes; override;
+       procedure GetValues(Proc: TGetStrProc); override;
+     end;
+
+     { TDispatchersProperty }
+     TDispatchersProperty = class(TClassProperty)
+     public
+       procedure Edit; override;
+       function GetAttributes: TPropertyAttributes; override;
+     end;
+
+     {$IFDEF VER140UP}
+     { TROServerEditor }
+     TROServerEditor = class(TComponentEditor)
+     public
+       procedure Edit; override;
+     end;
+
+     { TRORemoteServiceEditor }
+     TRORemoteServiceEditor = class(TComponentEditor)
+     protected
+     public
+       procedure ExecuteVerb(Index: Integer); override;
+       function GetVerb(Index: Integer): string; override;
+       function GetVerbCount: Integer; override;
+     end;
+     {$ENDIF VER140UP}
+
+
+implementation
+
+uses  Controls, Dialogs, uRORemoteService, uROServer, uROClasses,
+     {$IFDEF FPC}
+       fDispatchersEditorForm,
+     {$ELSE}
+       {$IFDEF MSWINDOWS}
+       fDispatchersEditorForm,
+       {$ELSE}
+       fDispatchersEditorFormKylix,
+       {$ENDIF}
+     {$ENDIF}
+     uROEventRepository;
+
+
+function FindDesigner(Container: TComponent): IDesigner;
+begin
+  Result := nil;
+  if Container <> nil then begin
+    if Container is TCustomForm then begin
+      Result := TCustomForm(Container).Designer as IDesigner;
+    end
+    else if (Container is TDataModule) and (Container.Owner <> nil) then begin
+      Result := (Container.Owner as TForm).Designer as IDesigner;
+    end
+    else if (Container is TWinControl) and (Container.Owner <> nil) then begin
+      Result := (Container.Owner as TForm).Designer as IDesigner;
+    end;
+  end;
+end;
+
+{ TROServiceNameProperty }
+
+function TROServiceNameProperty.GetAttributes: TPropertyAttributes;
+begin
+  result := [paValueList, paSortList]
+end;
+
+procedure TROServiceNameProperty.GetValues(Proc: TGetStrProc);
+var
+    i : integer;
+    ss : IROStrings;
+begin
+  if GetComponent(0) is TRORemoteService then begin
+    ss := TRORemoteService(GetComponent(0)).GetServiceNames;
+  end
+  else if GetComponent(0) is TROEventReceiver then begin
+    TROEventReceiver(GetComponent(0)).CheckProperties(False);
+    with TRORemoteService.Create(nil) do try
+      Message:=TROEventReceiver(GetComponent(0)).Message;
+      Channel:=TROEventReceiver(GetComponent(0)).Channel;      
+      ss := GetServiceNames;
+    finally
+      free;
+    end;
+  end;
+
+
+  if assigned(ss) then
+    for i := 0 to (ss.Count-1) do
+      Proc(ss[i]);
+end;
+
+{ TDispatchersProperty }
+
+procedure TDispatchersProperty.Edit;
+begin
+  with TDispatchersEditorForm.Create(TROServer(GetComponent(0))) do try
+    ShowModal;
+    Modified();
+  finally
+    Free;
+  end;
+end;
+
+function TDispatchersProperty.GetAttributes: TPropertyAttributes;
+begin
+  result := [paDialog]
+end;
+
+{ TROServerEditor }
+
+{$IFDEF VER140UP}
+procedure TROServerEditor.Edit;
+var
+  lDesigner:IDesigner;
+begin
+  with TDispatchersEditorForm.Create(TROServer(GetComponent())) do try
+    ShowModal;
+    lDesigner := FindDesigner(GetComponent().Owner);
+    if Assigned(lDesigner) then lDesigner.Modified()
+    //else ShowMessage('No designer');
+  finally
+    Free;
+  end;
+end;
+{$ENDIF VER140UP}
+
+{ TRORemoteServiceEditor }
+
+{$IFDEF VER140UP}
+procedure TRORemoteServiceEditor.ExecuteVerb(Index: Integer);
+var conn : TRORemoteService;
+    i : integer;
+    s : string;
+    ss : IROStrings;
+begin
+  conn := TRORemoteService(GetComponent);
+
+  case Index of
+    0 : begin
+      ss := conn.GetServiceNames;
+      if assigned(ss) then begin
+        s := 'The server exposes the following service(s):'+#13#13;
+        for i := 0 to (ss.Count-1) do
+          s := s+ss[i]+#13;
+        MessageDlg(s, mtInformation, [mbOK], 0);
+      end
+      else begin
+        MessageDlg('The server exposes no services.', mtInformation, [mbOK], 0);
+      end;
+    end;
+  end;
+end;
+
+function TRORemoteServiceEditor.GetVerb(Index: Integer): string;
+begin
+  case Index of
+    0 : result := capt_TestConnection;
+  end;
+end;
+
+function TRORemoteServiceEditor.GetVerbCount: Integer;
+begin
+  result := 1;
+end;
+{$ENDIF VER140UP}
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROIDEMenu.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROIDEMenu.pas
new file mode 100644
index 0000000..b09a254
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROIDEMenu.pas	
@@ -0,0 +1,552 @@
+unit uROIDEMenu;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Delphi IDE Integration
+{
+{ compiler: Delphi 5 and up
+{ platform: Win32
+{
+{ (c)opyright RemObjects Software. all rights reserved.
+{
+{ Using this code requires a valid license of the RemObjects SDK
+{ which can be obtained at http://www.remobjects.com.
+{----------------------------------------------------------------------------}
+
+{$I ..\RemObjects.inc}
+
+interface
+
+{ Service Builder command line parameters:
+
+    /rodlfile:filename         : File to load
+    /projectname:dpr-file-name : Just for display; implies /autosave
+    /autosave                  : Auto-save change when SB loses focus or is closed
+    /register                  : Quite, register filetypes (.rodl to lauch with SB)
+    /import-wsdl:file-or-url   : Auto-import the WSDL into the specified (or empty) RODL file
+    /import                    : Show a selection box to determine what type of file to import.
+
+}
+
+uses
+  Forms, Classes, Windows, SysUtils,
+  {$IFDEF DELPHI6UP}DesignEditors, DesignIntf, {$ELSE} DsgnIntf,{$ENDIF}
+  ToolsApi, Menus, Contnrs, ComObj, Graphics,
+  uEWMenuManager;
+
+type
+  { TMenuItemInfo }
+  TMenuItemInfo = record
+    Caption,
+    ShortCut : string;
+    Menu:TEWMenuItem;
+    ImageIndex:integer;
+    Personalities:TEWPersonalitySet;
+  end;
+
+resourcestring sMakeServerCaption = 'T&urn %s into a RemObjects SDK Server';
+
+const MAX_MENU_ITEM = 14;
+
+var
+  MenuItems : array[0..MAX_MENU_ITEM] of TMenuItemInfo = (
+    (Caption: '&Service Builder';                  ShortCut: 'CTRL+ALT+U';  Menu:nil; ImageIndex:  0; Personalities: [pDelphiWin32, pCppBuilderWin32, pNone]),
+    (Caption: '&Import RemObjects SDK Service...'; ShortCut: 'CTRL+ALT+I';  Menu:nil; ImageIndex:  1; Personalities: [pDelphiWin32, pCppBuilderWin32]),
+    (Caption: 'Import SOAP &Web Service...';       ShortCut: '';            Menu:nil; ImageIndex:  7; Personalities: [pDelphiWin32, pCppBuilderWin32]),
+    (Caption: '-';                                 ShortCut: '';            Menu:nil; ImageIndex: -1; Personalities: [pDelphiWin32, pCppBuilderWin32, pNone]),
+    (Caption: 'Service &Tester';                   ShortCut: '';            Menu:nil; ImageIndex:  5; Personalities: [pDelphiWin32, pCppBuilderWin32, pNone]),
+    (Caption: '-';                                 ShortCut: '';            Menu:nil; ImageIndex: -1; Personalities: [pDelphiWin32]),
+    (Caption: '&Hide Preprocessor Window';         ShortCut: '';            Menu:nil; ImageIndex: -1; Personalities: [pDelphiWin32]),
+    (Caption: '-';                                 ShortCut: '';            Menu:nil; ImageIndex: -1; Personalities: [pDelphiWin32]),
+    (Caption: '&Regenerate Units from RODL';       ShortCut: 'CTRL+ALT+E';  Menu:nil; ImageIndex:  2; Personalities: [pDelphiWin32, pCppBuilderWin32]),
+    (Caption: 'Regenerate &Async Unit from RODL';  ShortCut: 'CTRL+ALT+A';  Menu:nil; ImageIndex:  2; Personalities: [pDelphiWin32, pCppBuilderWin32]),
+    (Caption: sMakeServerCaption;                  ShortCut: '';            Menu:nil; ImageIndex:  3; Personalities: [pDelphiWin32, pCppBuilderWin32]),
+    (Caption: '-';                                 ShortCut: '';            Menu:nil; ImageIndex: -1; Personalities: [pDelphiWin32, pCppBuilderWin32]),
+    (Caption: 'Launc&h Server Executable';         ShortCut: 'CTRL+ALT+F9'; Menu:nil; ImageIndex:  4; Personalities: [pDelphiWin32, pCppBuilderWin32]),
+    (Caption: '-';                                 ShortCut: '';            Menu:nil; ImageIndex: -1; Personalities: [pDelphiWin32, pNone]),
+    //(Caption: 'Check for New &Versions';           ShortCut: '';            Menu:nil; ImageIndex: -1; Personalities: [pDelphiWin32, pCppBuilderWin32, pNone]),
+    (Caption: 'A&bout RemObjects SDK';             ShortCut: '';            Menu:nil; ImageIndex:  6; Personalities: [pDelphiWin32, pCppBuilderWin32, pNone])
+    //(Caption: '&Import Services'; ShortCut: 'CTRL+ALT+S')
+  );
+
+const
+  mi_RODLEditor               = 0;
+  mi_ImportServicesRODL       = 1;
+  mi_ImportServicesWSDL       = 2;
+  mi_ServiceTester            = 4;
+  mi_HidePreprocessor         = 6;
+  mi_Regenerate               = 8;
+  mi_RegenerateAsync          = 9;
+  mi_ConvertToServer          = 10;
+  mi_ConvertToServerSeparator = 11;
+  mi_LaunchExe                = 12;
+  mi_LaunchExeSeparator       = 13;
+  //mi_CheckVersion             = 14;
+  mi_About                    = 14;
+
+type
+  { TROMenuWizard }
+  TROMenuWizard = class(TInterfacedObject, IOTAWizard, IOTANotifier)
+  private
+    fROMenu: TEWMenu;
+    fHidePreprocessorItem: TEWMenuItem;
+    fVersionService:string;
+
+    procedure OnHidePreprocessorClick(Sender: TObject);
+    procedure ImportService(const aType:string);
+
+  protected
+    { Misc }
+    procedure CreateMenuItems;
+    procedure ShowServiceBuilder(Sender : TObject);
+    procedure ImportServicesRODL(Sender: TObject);
+    procedure ImportServicesWSDL(Sender: TObject);
+    procedure LaunchServiceTester(Sender: TObject);
+    procedure OnRegenerateUnits(Sender: TObject);
+    procedure OnRegenerateAsyncUnit(Sender: TObject);
+    procedure OnMenuPopup(Sender: TObject);
+    procedure OnConvertToServer(Sender: TObject);
+    procedure OnAbout(Sender: TObject);
+    procedure OnLaunchEXE(Sender: TObject);
+    procedure OnCheckForNewVersion(Sender: TObject);
+
+    { IOTANotifier}
+    procedure AfterSave;
+    procedure BeforeSave;
+    procedure Destroyed;
+    procedure Execute;
+    procedure Modified;
+
+    { IOTAWizard }
+    function GetState: TWizardState;
+    function GetIDString: string;
+    function GetName: string;
+
+  public
+
+    constructor Create;
+    destructor Destroy; override;
+  end;
+
+procedure Register;
+
+var
+  gRemObjectsMenu:TMenuItem;
+
+implementation
+
+uses
+  ShellAPI, Controls, Registry, Dialogs,
+  uRODL, uROIDETools, uRODLToXML, uRODLToPascalIntf, uRODLGenTools,
+  uRORODLNotifier, uROPleaseWaitForm, uROIDEData, fROAbout,
+  fCustomIDEMessagesForm, uROProductVersionInfo, uROClasses, uRODLConvertersUtils;
+
+{$R Resources.BDS.res}
+
+procedure RegisterAboutInfo;
+const
+  lProductName = 'RemObjects SDK ''Vinci'' for Delphi';
+begin
+  {$IFDEF BDS}
+  {$IFDEF BDS3}
+  SplashScreenServices.AddPluginBitmap(lProductName, LoadBitmap(HInstance, 'SPLASH2005'));
+  {$ELSE}
+    {$IFDEF BDS4}
+      SplashScreenServices.AddPluginBitmap(lProductName, LoadBitmap(HInstance, 'SPLASH2006'));
+    {$ELSE}
+      SplashScreenServices.AddPluginBitmap(lProductName, LoadBitmap(HInstance, 'SPLASH2007'));
+    {$ENDIF}
+  {$ENDIF}
+  (BorlandIDEServices as IOTAAboutBoxServices).AddPluginInfo(lProductName, lProductName+#13#10'Copyright RemObjects Software 2002-2008.'#13#10'All rights reserved.'#13#10'http://www.remobjects.com/ro.', LoadBitmap(HInstance, 'ABOUT'));
+  {$ENDIF BDS}
+end;
+
+procedure Register;
+begin
+  RegisterAboutInfo;
+  RegisterPackageWizard(TROMenuWizard.Create);
+end;
+
+{ TROMenuWizard }
+
+constructor TROMenuWizard.Create;
+begin
+  inherited Create;
+
+  CreateMenuItems;
+end;
+
+destructor TROMenuWizard.Destroy;
+begin
+  if Assigned(fROMenu) then begin
+    MenuManager.DestroyMenu(fROMenu);
+  end;
+  gRemObjectsMenu := nil;
+  inherited;
+end;
+
+function TROMenuWizard.GetIDString: string;
+begin
+  Result := '{137E9A72-CBF8-485F-9421-212866E99084}';
+end;
+
+function TROMenuWizard.GetName: string;
+begin
+  Result := 'ROMenuWizard';
+end;
+
+// The following are stubs that Delphi never calls.
+procedure TROMenuWizard.AfterSave;
+begin
+end;
+
+procedure TROMenuWizard.BeforeSave;
+begin
+end;
+
+procedure TROMenuWizard.Destroyed;
+begin
+end;
+
+procedure TROMenuWizard.Execute;
+begin
+end;
+
+function TROMenuWizard.GetState: TWizardState;
+begin
+  Result := [];
+end;
+
+procedure TROMenuWizard.Modified;
+begin
+end;
+
+procedure TROMenuWizard.CreateMenuItems;
+var
+  lItem     : TEWMenuItem;
+  i        : Integer;
+  lCaption: string;
+begin
+
+  lCaption := 'Rem&Objects SDK';
+  with TRegistry.Create(KEY_READ) do try
+    RootKey := HKEY_CURRENT_USER;
+    if OpenKey('\Software\RemObjects\RemObjects SDK for Delphi\IDE Integration', False) then
+      if ValueExists('Menu Caption') then
+        lCaption := ReadString('Menu Caption');
+      if ValueExists('VersionService URL') then
+        fVersionService := ReadString('VersionService URL');
+  finally
+    Free;
+  end;
+
+  fROMenu := MenuManager.CreateMenu(lCaption);
+  fROMenu.OnPopup := OnMenuPopup;
+  gRemObjectsMenu := fROMenu.Menu;
+
+  with TIdeData.Create(nil) do try
+
+    for i := 0 to High(MenuItems) do begin
+
+      lItem := fROMenu.CreateMenuItem(MenuItems[i].Caption, -1, MenuItems[i].Personalities);
+
+      lItem.MenuItem.ShortCut := TextToShortCut(MenuItems[i].ShortCut);
+      lItem.MenuItem.Tag := i;
+
+      if MenuItems[i].ImageIndex > -1 then
+        lItem.SetGlyph(iml_Actions, MenuItems[i].ImageIndex);
+
+      MenuItems[i].Menu := lItem;
+
+      case i of
+        mi_RODLEditor         : lItem.MenuItem.OnClick := ShowServiceBuilder;
+        mi_ImportServicesRODL : lItem.MenuItem.OnClick := ImportServicesRODL;
+        mi_ImportServicesWSDL : lItem.MenuItem.OnClick := ImportServicesWSDL;
+        mi_ServiceTester      : lItem.MenuItem.OnClick := LaunchServiceTester;
+        mi_Regenerate         : lItem.MenuItem.OnClick := OnRegenerateUnits;
+        mi_RegenerateAsync    : lItem.MenuItem.OnClick := OnRegenerateAsyncUnit;
+        mi_ConvertToServer    : lItem.MenuItem.OnClick := OnConvertToServer;
+        //mi_CheckVersion       : lItem.MenuItem.OnClick := OnCheckForNewVersion;
+        mi_About              : lItem.MenuItem.OnClick := OnAbout;
+        mi_LaunchExe          : lItem.MenuItem.OnClick := OnLaunchEXE;
+        mi_HidePreprocessor   : begin
+            lItem.MenuItem.OnClick := OnHidePreprocessorClick;
+            fHidePreprocessorItem := lItem;
+          end;
+        else lItem.MenuItem.OnClick := nil;
+      end;
+    end;
+
+    {$IFDEF DELPHI7UP}
+    MenuItems[mi_HidePreprocessor].Menu.Visible := False;
+    MenuItems[mi_HidePreprocessor+1].Menu.Visible := False; // separator;
+    {$ENDIF}
+
+  finally
+    Free();
+  end;
+
+end;
+
+procedure TROMenuWizard.OnMenuPopup(Sender: TObject);
+var lCurrentProjectIsRodlProject :boolean;
+    lRodlProject: IOTAProject;
+    lProject: IOTAProject;
+begin
+  lCurrentProjectIsRodlProject := ProjectIsRodlProject(CurrentProject());
+  lRodlProject := FindFirstRodlProject;
+
+  MenuItems[mi_Regenerate].Menu.Visible := lCurrentProjectIsRodlProject;
+  MenuItems[mi_RegenerateAsync].Menu.Visible := lCurrentProjectIsRodlProject;
+
+  MenuItems[mi_LaunchExe].Menu.Visible := assigned(lRodlProject) or lCurrentProjectIsRodlProject;
+  //MenuItems[mi_LaunchExeSeparator].Menu.Visible := assigned(lRodlProject) or lCurrentProjectIsRodlProject;
+  { D7 menu cannot hide separators itself }
+
+  if lCurrentProjectIsRodlProject then begin
+    MenuItems[mi_RODLEditor].Menu.MenuItem.Caption := 'Edit &Service Library';
+  end
+  else begin
+    MenuItems[mi_RODLEditor].Menu.MenuItem.Caption := '&Service Builder';
+  end;
+
+  if DisplayIDEMessageForm and fHidePreprocessorItem.MenuItem.Checked
+    then fHidePreprocessorItem.MenuItem.Checked := FALSE;
+
+  lProject := CurrentProject;
+  if Assigned(lProject) then begin
+    MenuItems[mi_ConvertToServer].Menu.Visible := not lCurrentProjectIsRodlProject;
+    MenuItems[mi_ConvertToServer].Menu.MenuItem.Caption := Format(sMakeServerCaption,[ChangeFileExt(ExtractFileName(lProject.GetFileName),'')]);
+  end
+  else begin
+    MenuItems[mi_ConvertToServer].Menu.Visible := false;
+  end;
+  MenuItems[mi_ConvertToServerSeparator].Menu.Visible := (MenuItems[mi_ConvertToServer].Menu.Visible or MenuItems[mi_Regenerate].Menu.Visible);
+end;
+
+
+resourcestring
+  sConvertedLaunchSB = 'Your Project was converted into a RemObjects server.'#13#13+
+                       'Would you like to launch ServiceBuilder to define your Service, now?';
+
+procedure TROMenuWizard.OnConvertToServer(Sender: TObject);
+begin
+  if ConvertProjectToRoServer(CurrentProject()) then begin
+    if MessageDlg(sConvertedLaunchSB,mtConfirmation,[mbYes,mbNo],0) = idYes then begin
+      LaunchServiceBuilderForCurrentProject('');
+    end;
+  end;
+end;
+
+procedure TROMenuWizard.OnRegenerateUnits(Sender: TObject);
+begin
+  with TRORODLNotifier.Create do try
+    GenerateUnits(CurrentProject, [utIntf, utInvk, utImpl]);
+  finally
+    Free();
+  end;
+end;
+
+procedure TROMenuWizard.OnRegenerateAsyncUnit(Sender: TObject);
+begin
+  with TRORODLNotifier.Create do try
+    GenerateUnits(CurrentProject, [utAsync]);
+  finally
+    Free();
+  end;
+end;
+
+procedure TROMenuWizard.ShowServiceBuilder(Sender: TObject);
+begin
+  LaunchServiceBuilderForCurrentProject('');
+end;
+
+procedure TROMenuWizard.LaunchServiceTester(Sender: TObject);
+begin
+  uROIDETools.LaunchServiceTester();
+end;
+
+procedure TROMenuWizard.ImportServicesRODL(Sender: TObject);
+begin
+  ImportService('Import.Rodl');
+end;
+
+procedure TROMenuWizard.ImportServicesWSDL(Sender: TObject);
+begin
+  ImportService('Import.Soap.Wsdl');
+end;
+
+procedure TROMenuWizard.ImportService(const aType:string);
+var params, lUnitName, lRodlName : string;
+    tempdir : array[0..1000] of char;
+
+    lModule : IOTAModule;
+    lProject: IOTAProject;
+    lLibrary: TRODLLibrary;
+begin
+  //if not GetImportInputs(loc) then Exit;
+
+  Windows.GetTempPath(Length(tempdir), tempdir);
+  lRodlName := IncludeTrailingPathDelimiter(tempdir)+GUIDToString(NewGUID)+'.rodl';
+  DeleteFile(lRodlName);
+
+  lProject := CurrentProject;
+  {$IFDEF SB2}
+  if assigned(lProject) then begin
+    params := Format('/import /rodlfile:"%s" /autosave /projectname:"(Import Service for %s)"', [lRodlName,ExtractFileName(lProject.FileName)]);
+  end
+  else begin
+    params := Format('/import /rodlfile:"%s" /autosave', [lRodlName]);
+  end;
+  {$ELSE}
+  if assigned(lProject) then begin
+    params := Format('"%s" /ns /import:%s /autosave /projectname:"(Importing Service for %s)"', [lRodlName,aType,ExtractFileName(lProject.FileName)]);
+  end
+  else begin
+    params := Format('"%s" /ns /import:%s /autosave', [lRodlName,aType]);
+  end;
+  {$ENDIF SB2}
+
+  //params := Format('/import-wsdl:%s /rodlfile:%s /autosave', [loc, fname]);
+  //params := Format('/import /rodlfile:%s /autosave', [fname]);
+  //ShowMessage(params);
+
+  with TPleaseWaitForm.Create(Application,'Importing via the ServiceBuilder...') do try
+    Show();
+    LaunchServiceBuilder(lProject.FileName,Params,true);
+    Hide();
+  finally
+    Free();
+  end;
+
+  if FileExists(lRodlName) then try
+
+    lLibrary := LoadLibraryFromXml(lRodlName);
+    try
+
+      lUnitname := ExtractFilePath(lProject.FileName)+GetTargetFileName(lLibrary, nil, cgtIntf, CodeGenLanuageFromProjectPersonality(lProject));
+
+      // Checks if the module is already in the project
+      try
+        lModule := FindModuleByUnitName(lProject, lUnitname);
+      except
+        on E:EFOpenError do lModule := nil;
+        else raise;
+      end;
+      if assigned(lModule) then begin
+        case MessageDlg(Format('A unit named "%s" already exists in the project.'#13+
+                               'Do you want to overwrite the file?', [ExtractFileName(lUnitname)]),
+                        mtWarning, [mbYes, mbCancel], 0) of
+          mrCancel: Abort;
+          mrYes: { no-op};
+        end
+      end
+      else if FileExists(lUnitName) then begin
+        case MessageDlg(Format('A unit named "%s" already exists, but is not part of the project.'#13+
+                               'Do you want to overwrite the file?', [ExtractFileName(lUnitname)]),
+                        mtWarning, [mbYes, mbCancel], 0) of
+          mrCancel: Abort;
+          mrYes: { no-op};
+        end
+      end;
+
+      //ToDo: handle read-only files
+
+      {$IFNDEF REMOBJECTS_CODEGEN2}
+      if CodeGenLanuageFromProjectPersonality(lProject) = cglCppBuilder then begin
+      {$ENDIF}
+
+        GenerateUnitToFile(lRodlName, nil, cgtIntf, CodeGenLanuageFromProjectPersonality(lProject), '', lUnitName);
+        lProject.AddFile(lUnitName, true);
+        //ToDo: properly load from stream into lModule
+
+      {$IFNDEF REMOBJECTS_CODEGEN2}
+      end
+      else begin
+
+        with TRODLToIntf.Create(lRodlName,ChangeFileExt(ExtractFileName(lUnitName), '')) do try
+          Buffer.SaveToFile(lUnitName);
+          lProject.AddFile(lUnitName, true);
+        finally
+          Free;
+        end;
+
+      end;
+      {$ENDIF not REMOBJECTS_CODEGEN2}
+
+    finally
+      FreeAndNil(lLibrary);
+    end;
+
+  finally
+    DeleteFile(lRodlName);
+  end;
+
+end;
+
+procedure TROMenuWizard.OnAbout(Sender: TObject);
+begin
+  with TAboutForm.Create(Application) do try
+    Position := poScreenCenter;
+    ShowModal();
+  finally
+    Free();
+  end
+end;
+
+procedure TROMenuWizard.OnCheckForNewVersion(Sender: TObject);
+begin
+  GetVersionInfos(fVersionService);
+end;
+
+procedure TROMenuWizard.OnHidePreprocessorClick(Sender : TObject);
+var
+  lMenuItem: TMenuItem;
+begin
+  lMenuItem := MenuItems[mi_HidePreprocessor].Menu.MenuItem;
+  lMenuItem.Checked := not lMenuItem.Checked;
+  DisplayIDEMessageForm := not lMenuItem.Checked;
+  if not DisplayIDEMessageForm and IDEMessageForm.Visible then IDEMessageForm.Close;
+end;
+
+{$IFDEF DELPHI5}
+const
+  PathDelim  = '\';
+
+function IncludeTrailingPathDelimiter(const S: string): string;
+begin
+  Result := S;
+  if not IsPathDelimiter(Result, Length(Result)) then
+    Result := Result + PathDelim;
+end;
+{$ENDIF}
+
+procedure TROMenuWizard.OnLaunchEXE(Sender: TObject);
+var
+  dirname, exename: string;
+  lProject: IOTAProject;
+begin
+  if ProjectIsRodlProject(CurrentProject()) then
+    lProject := CurrentProject()
+  else
+    lProject := FindFirstRodlProject();
+
+  if not assigned(lProject) then exit; // shouldn't happen if menu was active
+
+  exename := GetProjectExe(lProject);
+
+  if not FileExists(exename) then begin
+    case MessageDlg(Format('The file %s does not exist. Would you like to compile the project now?', [exename]), mtWarning, [mbYes, mbCancel], 0) of
+        idYes:begin
+            if lProject.ProjectBuilder.BuildProject(cmOTAMake, true, true) then
+              ShellExecute(0, 'open', PChar(exename), NIL, PChar(dirname), SW_NORMAL);
+          end;
+        idCancel:;
+    end;
+  end
+  else begin
+    ShellExecute(0, 'open', PChar(exename), NIL, PChar(dirname), SW_NORMAL);
+  end;
+
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROIDEMenu_laz.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROIDEMenu_laz.pas
new file mode 100644
index 0000000..6c111fd
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROIDEMenu_laz.pas	
@@ -0,0 +1,548 @@
+unit uROIDEMenu_laz;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Delphi IDE Integration                            }
+{                                                                            }
+{ compiler: Delphi 5 and up                                                  }
+{ platform: Win32                                                            }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+
+{ Service Builder command line parameters:
+
+    /rodlfile:filename         : File to load
+    /projectname:dpr-file-name : Just for display; implies /autosave
+    /autosave                  : Auto-save change when SB loses focus or is closed
+    /register                  : Quite, register filetypes (.rodl to lauch with SB)
+    /import-wsdl:file-or-url   : Auto-import the WSDL into the specified (or empty) RODL file
+    /import                    : Show a selection box to determine what type of file to import.
+}
+
+uses
+  {$IFDEF MSWINDOWS}Windows,ComObj, {$ENDIF}
+  Forms, Classes,SysUtils,IDECommands,
+  LazIDEIntf, ProjectIntf, uEWMenuManager_laz, uEWOTAHelpers_laz,PropEdits,MenuIntf,
+  Menus, Contnrs, Graphics;
+
+type
+  { TMenuItemInfo }
+  TMenuItemInfo = record
+    Caption,
+    ShortCut : string;
+    Menu:TEWMenuItem;
+    ImageIndex:integer;
+    Personalities:TEWPersonalitySet;
+  end;
+
+resourcestring sMakeServerCaption = 'T&urn %s into a RemObjects SDK Server';
+
+const MAX_MENU_ITEM = 15;
+
+var
+  MenuItems : array[0..MAX_MENU_ITEM] of TMenuItemInfo = (
+    (Caption: '&Service Builder';                  ShortCut: 'CTRL+ALT+U';  Menu:nil; ImageIndex:  0; Personalities: [pDelphiWin32, pCppBuilderWin32, pNone, pLazarusWin]),
+    (Caption: '&Import RemObjects SDK Service...'; ShortCut: 'CTRL+ALT+I';  Menu:nil; ImageIndex:  1; Personalities: [pDelphiWin32, pCppBuilderWin32, pLazarusWin]),
+    (Caption: 'Import SOAP &Web Service...';       ShortCut: '';            Menu:nil; ImageIndex:  7; Personalities: [pDelphiWin32, pCppBuilderWin32, pLazarusWin]),
+    (Caption: '-';                                 ShortCut: '';            Menu:nil; ImageIndex: -1; Personalities: [pDelphiWin32, pCppBuilderWin32, pNone, pLazarusWin]),
+    (Caption: 'Service &Tester';                   ShortCut: '';            Menu:nil; ImageIndex:  5; Personalities: [pDelphiWin32, pCppBuilderWin32, pNone, pLazarusWin]),
+    (Caption: '-';                                 ShortCut: '';            Menu:nil; ImageIndex: -1; Personalities: [pDelphiWin32, pLazarusWin]),
+    (Caption: '&Hide Preprocessor Window';         ShortCut: '';            Menu:nil; ImageIndex: -1; Personalities: [pDelphiWin32, pLazarusWin,pLazarusUnix]),
+    (Caption: '-';                                 ShortCut: '';            Menu:nil; ImageIndex: -1; Personalities: [pDelphiWin32, pLazarusWin,pLazarusUnix]),
+    (Caption: '&Regenerate Units from RODL';       ShortCut: 'CTRL+ALT+E';  Menu:nil; ImageIndex:  2; Personalities: [pDelphiWin32, pCppBuilderWin32, pLazarusWin,pLazarusUnix]),
+    (Caption: 'Regenerate &Async Unit from RODL';  ShortCut: 'CTRL+ALT+A';  Menu:nil; ImageIndex:  2; Personalities: [pDelphiWin32, pCppBuilderWin32, pLazarusWin,pLazarusUnix]),
+    (Caption: 'Regenerate &RODLFILE.lrs from RODL';ShortCut: '';            Menu:nil; ImageIndex:  2; Personalities: [pDelphiWin32, pCppBuilderWin32, pLazarusWin,pLazarusUnix]),
+    (Caption: sMakeServerCaption;                  ShortCut: '';            Menu:nil; ImageIndex:  3; Personalities: [pDelphiWin32, pCppBuilderWin32, pLazarusWin,pLazarusUnix]),
+    (Caption: '-';                                 ShortCut: '';            Menu:nil; ImageIndex: -1; Personalities: [pDelphiWin32, pCppBuilderWin32, pLazarusWin,pLazarusUnix]),
+    (Caption: 'Launc&h Server Executable';         ShortCut: 'CTRL+ALT+F9'; Menu:nil; ImageIndex:  4; Personalities: [pDelphiWin32, pCppBuilderWin32, pLazarusWin,pLazarusUnix]),
+    (Caption: '-';                                 ShortCut: '';            Menu:nil; ImageIndex: -1; Personalities: [pDelphiWin32, pNone,pLazarusWin,pLazarusUnix]),
+    //(Caption: 'Check for New &Versions';           ShortCut: '';            Menu:nil; ImageIndex: -1; Personalities: [pDelphiWin32, pCppBuilderWin32, pNone]),
+    (Caption: 'A&bout RemObjects SDK';             ShortCut: '';            Menu:nil; ImageIndex:  6; Personalities: [pDelphiWin32, pCppBuilderWin32, pNone, pLazarusWin,pLazarusUnix])
+    //(Caption: '&Import Services'; ShortCut: 'CTRL+ALT+S')
+  );
+
+const
+  mi_RODLEditor               = 0;
+  mi_ImportServicesRODL       = 1;
+  mi_ImportServicesWSDL       = 2;
+  mi_ServiceTester            = 4;
+  mi_HidePreprocessor         = 6;
+  mi_Regenerate               = 8;
+  mi_RegenerateAsync          = 9;
+  mi_RegenerateLRS            = 10;
+  mi_ConvertToServer          = 11;
+  mi_ConvertToServerSeparator = 12;
+  mi_LaunchExe                = 13;
+  mi_LaunchExeSeparator       = 14;
+  //mi_CheckVersion             = 14;
+  mi_About                    = 15;
+
+type
+  { TROMenuWizard }
+  TROMenuWizard = class
+  private
+    fROMenu: TEWMenu;
+    fHidePreprocessorItem: TEWMenuItem;
+    fVersionService:string;
+
+    procedure OnHidePreprocessorClick(Sender: TObject);
+    procedure ImportService(const aType:string);
+
+  protected
+    { Misc }
+    procedure CreateMenuItems;
+    procedure ShowServiceBuilder(Sender : TObject);
+    procedure ImportServicesRODL(Sender: TObject);
+    procedure ImportServicesWSDL(Sender: TObject);
+    procedure LaunchServiceTester(Sender: TObject);
+    procedure OnRegenerateUnits(Sender: TObject);
+    procedure OnRegenerateAsyncUnit(Sender: TObject);
+    procedure OnRegenerateLRS(Sender: TObject);
+    procedure OnMenuPopup(Sender: TObject);
+    procedure OnConvertToServer(Sender: TObject);
+    procedure OnAbout(Sender: TObject);
+    procedure OnLaunchEXE(Sender: TObject);
+    procedure OnCheckForNewVersion(Sender: TObject);
+
+    { IOTANotifier}
+    procedure AfterSave;
+    procedure BeforeSave;
+    procedure Destroyed;
+    procedure Execute;
+    procedure Modified;
+  public
+
+    constructor Create;
+    destructor Destroy; override;
+  end;
+
+procedure Register;
+
+var
+  gRemObjectsMenu: TEWMenu;
+
+function TextToIDEShortCut(const ShortCutText: string):TIDEShortCut;
+implementation
+
+uses
+  uROIDETools_laz,lclproc,
+  Controls, Registry, Dialogs,{$IFNDEF FPC}uROProductVersionInfo,{$ENDIF}
+  uRODL, uRODLToXML, uRODLToPascalIntf, uRODLGenTools,uEWTools,
+  uROPleaseWaitForm, uROIDEData, fROAbout, uRORODLNotifier,
+  fCustomIDEMessagesForm, uROClasses, uRODLConvertersUtils;
+
+var
+  wiz: TROMenuWizard;
+
+function TextToIDEShortCut(const ShortCutText: string):TIDEShortCut;
+var
+  lKey: Word;
+  lShift: TShiftState;
+begin
+  if ShortCutText <> '' then begin
+    lKey := 0;
+    lShift := [];
+    ShortCutToKey(TextToShortCut(ShortCutText),lKey,lShift);
+    Result := IDEShortCut(lKey,lShift);
+  end
+  else
+    Result := CleanIDEShortCut;
+end;
+
+procedure Register;
+begin
+  wiz:= TROMenuWizard.Create;
+  {$IFNDEF FPC}
+  RegisterPackageWizard(TROMenuWizard.Create);
+  {$ENDIF}
+end;
+
+{ TROMenuWizard }
+
+constructor TROMenuWizard.Create;
+begin
+  inherited Create;
+  CreateMenuItems;
+end;
+
+destructor TROMenuWizard.Destroy;
+begin
+  if Assigned(fROMenu) then begin
+    MenuManager.DestroyMenu(fROMenu);
+  end;
+  gRemObjectsMenu := nil;
+  inherited;
+end;
+
+// The following are stubs that Delphi never calls.
+procedure TROMenuWizard.AfterSave;
+begin
+end;
+
+procedure TROMenuWizard.BeforeSave;
+begin
+end;
+
+procedure TROMenuWizard.Destroyed;
+begin
+end;
+
+procedure TROMenuWizard.Execute;
+begin
+end;
+
+procedure TROMenuWizard.Modified;
+begin
+end;
+
+procedure TROMenuWizard.CreateMenuItems;
+var
+  lItem     : TEWMenuItem;
+  i        : Integer;
+  lCaption: string;
+begin
+  lCaption := 'Rem&Objects SDK';
+ {$IFDEF MSWINDOWS}
+  with TRegistry.Create(KEY_READ) do try
+    RootKey := HKEY_CURRENT_USER;
+    if OpenKey('\Software\RemObjects\RemObjects SDK for Delphi\IDE Integration', False) then
+      if ValueExists('Menu Caption') then
+        lCaption := ReadString('Menu Caption');
+      if ValueExists('VersionService URL') then
+        fVersionService := ReadString('VersionService URL');
+  finally
+    Free;
+  end;
+  {$ENDIF}
+  fROMenu := MenuManager.CreateMenu(lCaption);
+  fROMenu.OnPopup := OnMenuPopup;
+  gRemObjectsMenu := fROMenu;
+  with TIdeData.Create(nil) do try
+    for i := 0 to High(MenuItems) do begin
+      lItem := fROMenu.CreateMenuItem(MenuItems[i].Caption, -1, MenuItems[i].Personalities);
+      if MenuItems[i].ShortCut <> '' then
+         lItem.Command := RegisterIDECommand(fRoMenu.CommandCategory, lItem.Caption,lItem.Caption,TextToIDEShortCut(MenuItems[i].ShortCut));
+      lItem.MenuItem.Tag := i;
+
+      if MenuItems[i].ImageIndex > -1 then
+        lItem.SetGlyph(iml_Actions, MenuItems[i].ImageIndex);
+
+      MenuItems[i].Menu := lItem;
+
+      case i of
+        mi_RODLEditor         : lItem.MenuItem.OnClick := ShowServiceBuilder;
+        mi_ImportServicesRODL : lItem.MenuItem.OnClick := ImportServicesRODL;
+        mi_ImportServicesWSDL : lItem.MenuItem.OnClick := ImportServicesWSDL;
+        mi_ServiceTester      : lItem.MenuItem.OnClick := LaunchServiceTester;
+        mi_Regenerate         : lItem.MenuItem.OnClick := OnRegenerateUnits;
+        mi_RegenerateAsync    : lItem.MenuItem.OnClick := OnRegenerateAsyncUnit;
+        mi_RegenerateLRS      : lItem.MenuItem.OnClick := OnRegenerateLRS;
+        mi_ConvertToServer    : lItem.MenuItem.OnClick := OnConvertToServer;
+        //mi_CheckVersion       : lItem.MenuItem.OnClick := OnCheckForNewVersion;
+        mi_About              : lItem.MenuItem.OnClick := OnAbout;
+        mi_LaunchExe          : lItem.MenuItem.OnClick := OnLaunchEXE;
+        mi_HidePreprocessor   : begin
+            lItem.MenuItem.OnClick := OnHidePreprocessorClick;
+            fHidePreprocessorItem := lItem;
+          end;
+        else lItem.MenuItem.OnClick := nil;
+      end;
+    end;
+
+    MenuItems[mi_HidePreprocessor].Menu.Visible := False;
+    MenuItems[mi_HidePreprocessor+1].Menu.Visible := False; // separator;
+  finally
+    Free;
+  end;
+end;
+
+procedure TROMenuWizard.OnMenuPopup(Sender: TObject);
+var lCurrentProjectIsRodlProject :boolean;
+    lRodlProject: {$IFDEF FPC}TLazProject{$ELSE} IOTAProject{$ENDIF};
+    lProject: {$IFDEF FPC}TLazProject{$ELSE} IOTAProject{$ENDIF};
+begin
+  lCurrentProjectIsRodlProject := ProjectIsRodlProject(CurrentProject());
+  lRodlProject := FindFirstRodlProject;
+
+  MenuItems[mi_Regenerate].Menu.Visible := lCurrentProjectIsRodlProject;
+  MenuItems[mi_RegenerateAsync].Menu.Visible := lCurrentProjectIsRodlProject;
+
+  MenuItems[mi_LaunchExe].Menu.Visible := assigned(lRodlProject) or lCurrentProjectIsRodlProject;
+  MenuItems[mi_LaunchExeSeparator].Menu.Visible := MenuItems[mi_LaunchExe].Menu.Visible;
+  { D7 menu cannot hide separators itself }
+
+  if lCurrentProjectIsRodlProject then begin
+    MenuItems[mi_RODLEditor].Menu.MenuItem.Caption := 'Edit &Service Library';
+  end
+  else begin
+    MenuItems[mi_RODLEditor].Menu.MenuItem.Caption := '&Service Builder';
+  end;
+  if DisplayIDEMessageForm and fHidePreprocessorItem.MenuItem.Checked then fHidePreprocessorItem.MenuItem.Checked := FALSE;
+
+  lProject := CurrentProject;
+  if Assigned(lProject) then begin
+    MenuItems[mi_ConvertToServer].Menu.Visible := not lCurrentProjectIsRodlProject;
+    MenuItems[mi_ConvertToServer].Menu.MenuItem.Caption := Format(sMakeServerCaption,[ChangeFileExt(ExtractFileName(lProject.MainFile.Filename),'')]);
+  end
+  else begin
+    MenuItems[mi_ConvertToServer].Menu.Visible := false;
+  end;
+  MenuItems[mi_ConvertToServerSeparator].Menu.Visible := (MenuItems[mi_ConvertToServer].Menu.Visible or MenuItems[mi_Regenerate].Menu.Visible);
+end;
+
+
+resourcestring
+  sConvertedLaunchSB = 'Your Project was converted into a RemObjects server.'#13#13+
+                       'Would you like to launch ServiceBuilder to define your Service, now?';
+
+procedure TROMenuWizard.OnConvertToServer(Sender: TObject);
+begin
+  if ConvertProjectToRoServer(CurrentProject()) then begin
+    if MessageDlg(sConvertedLaunchSB,mtConfirmation,[mbYes,mbNo],0) = mrYes then begin
+      LaunchServiceBuilderForCurrentProject('');
+    end;
+  end;
+end;
+
+procedure TROMenuWizard.OnRegenerateUnits(Sender: TObject);
+begin
+  with TRORODLNotifier.Create do try
+    GenerateUnits(CurrentProject, [utIntf, utInvk, utImpl]);
+  finally
+    Free();
+  end;
+end;
+
+procedure TROMenuWizard.OnRegenerateAsyncUnit(Sender: TObject);
+begin
+  with TRORODLNotifier.Create do try
+    GenerateUnits(CurrentProject, [utAsync]);
+  finally
+    Free();
+  end;
+end;
+
+procedure TROMenuWizard.OnRegenerateLRS(Sender: TObject);
+var prj : TLazProject;
+    fname,
+    src: string;
+begin
+  prj := CurrentProject;
+
+  if Assigned(prj) then begin
+    src := ReadModuleSource(prj.MainFile);
+    fname := ModuleDir(prj)+ExtractRODLFileName(src);
+    GenerateRESFromRODL(fName,nil);
+  end;
+end;
+
+procedure TROMenuWizard.ShowServiceBuilder(Sender: TObject);
+begin
+  LaunchServiceBuilderForCurrentProject('');
+end;
+
+procedure TROMenuWizard.LaunchServiceTester(Sender: TObject);
+begin
+  uROIDETools_laz.LaunchServiceTester();
+end;
+
+procedure TROMenuWizard.ImportServicesRODL(Sender: TObject);
+begin
+  ImportService('Import.Rodl');
+end;
+
+procedure TROMenuWizard.ImportServicesWSDL(Sender: TObject);
+begin
+  ImportService('Import.Soap.Wsdl');
+end;
+
+
+procedure TROMenuWizard.ImportService(const aType:string);
+{$IFDEF FPC}
+begin
+  ShowMessage('Isn''t implemented yet');
+end;
+{$ELSE}
+var params, lUnitName, lRodlName : string;
+    tempdir : array[0..1000] of char;
+
+    lModule : IOTAModule;
+    lProject: IOTAProject;
+    lLibrary: TRODLLibrary;
+begin
+  //if not GetImportInputs(loc) then Exit;
+
+  Windows.GetTempPath(SizeOf(tempdir), tempdir);
+  lRodlName := IncludeTrailingPathDelimiter(tempdir)+GUIDToString(NewGUID)+'.rodl';
+  DeleteFile(lRodlName);
+
+  lProject := CurrentProject;
+  {$IFDEF SB2}
+  if assigned(lProject) then begin
+    params := Format('/import /rodlfile:"%s" /autosave /projectname:"(Import Service for %s)"', [lRodlName,ExtractFileName(lProject.FileName)]);
+  end
+  else begin
+    params := Format('/import /rodlfile:"%s" /autosave', [lRodlName]);
+  end;
+  {$ELSE}
+  if assigned(lProject) then begin
+    params := Format('"%s" /ns /import:%s /autosave /projectname:"(Importing Service for %s)"', [lRodlName,aType,ExtractFileName(lProject.FileName)]);
+  end
+  else begin
+    params := Format('"%s" /ns /import:%s /autosave', [lRodlName,aType]);
+  end;
+  {$ENDIF SB2}
+
+  //params := Format('/import-wsdl:%s /rodlfile:%s /autosave', [loc, fname]);
+  //params := Format('/import /rodlfile:%s /autosave', [fname]);
+  //ShowMessage(params);
+
+  with TPleaseWaitForm.Create(Application,'Importing via the ServiceBuilder...') do try
+    Show();
+    LaunchServiceBuilder(lProject.FileName,Params,true);
+    Hide();
+  finally
+    Free();
+  end;
+
+  if FileExists(lRodlName) then try
+
+    lLibrary := LoadLibraryFromXml(lRodlName);
+    try
+
+      lUnitname := ExtractFilePath(lProject.FileName)+GetTargetFileName(lLibrary, nil, cgtIntf, CodeGenLanuageFromProjectPersonality(lProject));
+
+      // Checks if the module is already in the project
+      try
+        lModule := FindModuleByUnitName(lProject, lUnitname);
+      except
+        on E:EFOpenError do lModule := nil;
+        else raise;
+      end;
+      if assigned(lModule) then begin
+        case MessageDlg(Format('A unit named "%s" already exists in the project.'#13+
+                               'Do you want to overwrite the file?', [ExtractFileName(lUnitname)]),
+                        mtWarning, [mbYes, mbCancel], 0) of
+          mrCancel: Abort;
+          mrYes: { no-op};
+        end
+      end
+      else if FileExists(lUnitName) then begin
+        case MessageDlg(Format('A unit named "%s" already exists, but is not part of the project.'#13+
+                               'Do you want to overwrite the file?', [ExtractFileName(lUnitname)]),
+                        mtWarning, [mbYes, mbCancel], 0) of
+          mrCancel: Abort;
+          mrYes: { no-op};
+        end
+      end;
+
+      //ToDo: handle read-only files
+
+      {$IFNDEF REMOBJECTS_CODEGEN2}
+      if CodeGenLanuageFromProjectPersonality(lProject) = cglCppWin32 then begin
+      {$ENDIF}
+
+        GenerateUnitToFile(lRodlName, nil, cgtIntf, CodeGenLanuageFromProjectPersonality(lProject), '', lUnitName);
+        lProject.AddFile(lUnitName, true);
+        //ToDo: properly load from stream into lModule
+
+      {$IFNDEF REMOBJECTS_CODEGEN2}
+      end
+      else begin
+
+        with TRODLToIntf.Create(lRodlName,ChangeFileExt(ExtractFileName(lUnitName), '')) do try
+          Buffer.SaveToFile(lUnitName);
+          lProject.AddFile(lUnitName, true);
+        finally
+          Free;
+        end;
+
+      end;
+      {$ENDIF not REMOBJECTS_CODEGEN2}
+
+    finally
+      FreeAndNil(lLibrary);
+    end;
+
+  finally
+    DeleteFile(lRodlName);
+  end;
+
+end;
+{$ENDIF}
+
+procedure TROMenuWizard.OnAbout(Sender: TObject);
+begin
+  with TAboutForm.Create(Application) do try
+    Position := poScreenCenter;
+    ShowModal();
+  finally
+    Free();
+  end
+end;
+
+procedure TROMenuWizard.OnCheckForNewVersion(Sender: TObject);
+begin
+{$IFDEF FPC}
+  ShowMessage('Isn''t implemented yet');
+{$ELSE}
+  GetVersionInfos(fVersionService);
+{$ENDIF}
+end;
+
+procedure TROMenuWizard.OnHidePreprocessorClick(Sender : TObject);
+var
+  lMenuItem: TEWMenuItem;
+begin
+  lMenuItem := MenuItems[mi_HidePreprocessor].Menu;
+  lMenuItem.Checked := not lMenuItem.Checked;
+  DisplayIDEMessageForm := not lMenuItem.Checked;
+  if not DisplayIDEMessageForm and IDEMessageForm.Visible then IDEMessageForm.Close;
+end;
+
+procedure TROMenuWizard.OnLaunchEXE(Sender: TObject);
+var
+  dirname, exename: string;
+  lProject: TLazProject;
+begin
+  {$IFDEF FPC}
+  dirname := '';
+  {$ENDIF}
+  if ProjectIsRodlProject(CurrentProject()) then
+    lProject := CurrentProject()
+  else
+    lProject := FindFirstRodlProject();
+
+  if not assigned(lProject) then exit; // shouldn't happen if menu was active
+
+  exename := GetProjectExe(lProject);
+
+  if not FileExists(exename) then begin
+    case MessageDlg(Format('The file %s does not exist. Would you like to compile the project now?', [exename]), mtWarning, [mbYes, mbCancel], 0) of
+        mrYes:begin
+           if LazarusIDE.DoBuildProject(crRun,[]) = mrOk then
+              RO_ShellExecute(0, 'open', PChar(exename), NIL, PChar(dirname), SW_NORMAL);
+          end;
+        MrCancel:;
+    end;
+  end
+  else begin
+    RO_ShellExecute(0, 'open', PChar(exename), NIL, PChar(dirname), SW_NORMAL);
+  end;
+
+end;
+
+finalization
+  if wiz <> nil then wiz.Free;
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROIDEPrjWizard.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROIDEPrjWizard.pas
new file mode 100644
index 0000000..96ff09f
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROIDEPrjWizard.pas	
@@ -0,0 +1,648 @@
+unit uROIDEPrjWizard;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Delphi IDE Integration
+{
+{ compiler: Delphi 5 and up
+{ platform: Win32
+{
+{ (c)opyright RemObjects Software. all rights reserved.
+{
+{ Using this code requires a valid license of the RemObjects SDK
+{ which can be obtained at http://www.remobjects.com.
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+
+uses Windows, SysUtils,
+  {$IFDEF KYLIX1UP}DesignEditors, DesignIntf, {$ELSE}
+  {$IFDEF DELPHI6UP}DesignEditors, DesignIntf, {$ELSE}DsgnIntf, {$ENDIF}{$ENDIF}
+  ToolsApi, Graphics;
+
+const
+  IconName = 'Icon.ico';
+  InfoName = 'Info.ini';
+
+  sect_Information = 'Information';
+  sect_ClassFactories = 'Class Factories';
+  sect_ProjectGeneration = 'Project Generation';
+  sect_ProjectFolderHistory = 'Project Folder History';
+
+  id_Name = 'Name';
+  id_Description = 'Description';
+  {$IFDEF LINUX}
+  id_MinVersion = 'KylixMinimumVersion';
+  {$ELSE}
+  id_MinVersion = 'MinimumVersion';
+  {$ENDIF}
+  id_MaxVersion = 'MaximumVersion';
+  id_InvalidServers = 'InvalidServers';
+  id_DefaultServer = 'DefaultServer';
+  id_FixedChannel = 'FixedChannel';
+  id_FixedServer = 'FixedServer';
+
+  id_SvcLibName = 'SvcLibName';
+  id_SvcName = 'SvcName';
+  id_PrjName = 'PrjName';
+  id_PrjDir = 'PrjDir';
+  id_cbSvcInstantMode = 'cbSvcInstantMode';
+  id_CreateClientAndGroup = 'CreateClientAndGroup';
+
+  id_WizardType = 'Wizard';
+
+  DelphiModules: array[0..8] of string =
+    ('.dpr', '.pas', '.rodl', '.xml', '.dfm', '.xfm', '.bpg', '.bdsproj', '.bdsgroup');
+
+type { TROIDEProjectOptions }
+  TROIDEProjectOptions = record
+    TemplateDir,
+      ServiceLibraryName,
+      ServiceName,
+      ProjectDir,
+      ProjectName,
+      ServerClassName,
+      ServerUnitName,
+      ChannelClassName,
+      ChannelUnitName,
+      MessageClassName,
+      MessageUnitName: string;
+      CreateClientAndGroup: boolean;
+      WizardEnabled: boolean;
+  end;
+
+  TROIDENewProjectInfo = record
+    Wizard: string;
+    ServerProject,ClientProject: IOTAProject;
+    ProjectOptions: TROIDEProjectOptions;
+    TemplateFolder: string;
+    TemplateName: string;
+  end;
+  TNewProjectEvent = procedure(aNewProjectInfo: TROIDENewProjectInfo);
+
+  { TROProjectWizard }
+  TROProjectWizard = class(TNotifierObject,
+      IOTAWizard,
+      IOTARepositoryWizard,
+      {$IFDEF BDS}
+      IOTARepositoryWizard80,
+      {$ENDIF}
+      IOTAProjectWizard)
+  private
+    fTemplateDir,
+    fComment,
+    fName,
+    fPage: string;
+    {$IFDEF BDS}
+    fCategory: IOTAGalleryCategory;
+    {$ENDIF}
+    procedure CreateProject(const someProjectOptions: TROIDEProjectOptions;
+      const ScanExtensions: array of string);
+    function ReplaceCtrlStrings(const someText: string;
+      const someProjectOptions: TROIDEProjectOptions): string;
+
+  protected
+    { support for IOTAWizard }
+    function GetIDString: string;
+    function GetName: string;
+    function GetState: TWizardState;
+    procedure Execute;
+    { support for IOTARepositoryWizard }
+    function GetAuthor: string;
+    function GetComment: string;
+    function GetPage: string;
+    {$IFDEF KYLIX1UP}
+    function GetGlyph: Cardinal;
+    {$ELSE}
+    {$IFDEF DELPHI6UP}
+    function GetGlyph: Cardinal;
+    {$ELSE}
+    function GetGlyph: HIcon;
+    {$ENDIF}
+    {$ENDIF}
+
+    {$IFDEF BDS}
+    function GetDesigner: string;
+    function GetGalleryCategory: IOTAGalleryCategory;
+    function GetPersonality: string;
+    {$ENDIF}
+
+  public
+    {$IFDEF xBDS}
+    constructor Create(const aTemplateDir, aName, aComment: string; aCategory: IOTAGalleryCategory);
+    {$ELSE}
+    constructor Create(const aTemplateDir, aName, aComment: string; aCategory: string);
+    {$ENDIF}
+    destructor Destroy; override;
+  end;
+
+procedure Register;
+procedure RunGuideWizard(aNewProjectInfo: TROIDENewProjectInfo);
+procedure RegisterGuideWizard(aOnNewProject: TNewProjectEvent);
+procedure UnregisterGuideWizard(aOnNewProject: TNewProjectEvent);
+
+implementation
+{$IFDEF MSWINDOWS}
+{$WARN SYMBOL_PLATFORM OFF}
+{$ENDIF}
+uses ComObj, Classes, Dialogs, Forms, Controls, uRORes, uRODL, uRODLGenTools, INIFiles, {$IFDEF LINUX}fNewProjectForm{$ELSE}fNewProjectForm{$ENDIF},
+  Menus, uROIDETools, uROClasses, Registry {$IFDEF DELPHI5}, FileCtrl{$ENDIF},
+    Contnrs;
+
+procedure Register;
+var
+  dirinfo: TSearchRec;
+  templdirname,
+  templname,
+  templcomment: string;
+  ini: TIniFile;
+  tmpcnt: integer;
+  thisver, minver, maxver: integer;
+  lTemplateDir: string;
+  {$IFDEF xBDS}
+  lGalleryManager: IOTAGalleryCategoryManager;
+  lRODelphiCategory: IOTAGalleryCategory;
+  lDADelphiCategory: IOTAGalleryCategory;
+  lWizardService: IOTAWizardServices;
+  {$ENDIF}
+
+  procedure ProcessTemplates(aTemplateFolder: string; aCategory: {$IFDEF xBDS}IOTAGalleryCategory{$ELSE}string{$ENDIF});
+  begin
+    if (FindFirst(IncludeTrailingPathDelimiter(aTemplateFolder) + {$IFDEF LINUX} '*'{$ELSE} '*.*'{$ENDIF}, faDirectory, dirinfo) = 0) then try
+      repeat
+        ini := nil;
+
+        try
+          if (dirinfo.Attr and faDirectory = 0) or
+            (Pos('.', dirinfo.Name) = 1) or
+            (Pos('_', dirinfo.Name) = 1) then Continue;
+
+          templdirname := IncludeTrailingPathDelimiter(IncludeTrailingPathDelimiter(aTemplateFolder) + dirinfo.Name);
+          if not FileExists(templdirname + InfoName) then Continue;
+
+          ini := TIniFile.Create(templdirname + InfoName);
+          minver := ini.ReadInteger(sect_Information, id_MinVersion, {$IFDEF LINUX}10{$ELSE}5{$ENDIF});
+          maxver := ini.ReadInteger(sect_Information, id_MaxVersion, 1000);
+          templname := ini.ReadString(sect_Information, id_Name, '???');
+          templcomment := ini.ReadString(sect_Information, id_Description, '???');
+
+          if thisver < minver then Continue;
+          if thisver > maxver then Continue;
+
+          {$IFDEF xBDS}
+          lWizardService.AddWizard(TROProjectWizard.Create(templdirname, templname, templcomment, aCategory) as IOTAProjectWizard);
+          {$ELSE}
+          RegisterPackageWizard(TROProjectWizard.Create(templdirname, templname, templcomment, aCategory) as IOTAProjectWizard);
+          {$ENDIF}
+          Inc(tmpcnt);
+
+        finally
+          ini.Free;
+        end;
+
+      until (FindNext(dirinfo) <> 0);
+    finally
+      FindClose(dirinfo);
+    end;
+  end;
+
+begin
+  {$IFDEF DELPHI5}
+  thisver := 5;
+  {$ENDIF}
+  {$IFDEF DELPHI6}
+  thisver := 6;
+  {$ENDIF}
+  {$IFDEF DELPHI7}
+  thisver := 7;
+  {$ENDIF}
+  {$IFDEF DELPHI9}
+  thisver := 9;
+  {$ENDIF}
+  {$IFDEF DELPHI10}
+  thisver := 10;
+  {$ENDIF}
+  {$IFDEF DELPHI12}
+  thisver := 12;
+  {$ENDIF}
+
+  lTemplateDir := IncludeTrailingPathDelimiter(GetTemplateDir);
+
+  tmpcnt := 0;
+
+  {$IFDEF xBDS}
+  {lWizardService := Services as IOTAWizardServices;
+  lGalleryManager := Services as IOTAGalleryCategoryManager;
+
+  if DirectoryExists(lTemplateDir+'RO') then begin
+    lRODelphiCategory := lGalleryManager.AddCategory(nil, 'RemObjectsSdkDelphi', 'RemObjects SDK for Delphi', 0);
+    ProcessTemplates(lTemplateDir+'RO', lRODelphiCategory);
+  end;
+  if DirectoryExists(lTemplateDir+'DA') then begin
+    lDADelphiCategory := lGalleryManager.AddCategory(nil, 'RemObjectsDataAbstractDelphi', 'RemObjects Data Abstract for Delphi', 0);
+    ProcessTemplates(lTemplateDir+'DA', lDADelphiCategory);
+  end;}
+  {$ELSE}
+  if DirectoryExists(lTemplateDir+'RO') then begin
+    ProcessTemplates(lTemplateDir+'RO','RemObjects SDK');
+  end;
+  if DirectoryExists(lTemplateDir+'DA') then begin
+    ProcessTemplates(lTemplateDir+'DA', 'RemObjects Data Abstract');
+  end;
+  {$ENDIF}
+
+  // Status message just in case
+  if (tmpcnt = 0) then
+    MessageDlg('No RemObject server templates were found under ' + GetTemplateDir, mtWarning, [mbOK], 0)
+end;
+
+{ TROProjectWizard }
+
+{$IFDEF xBDS}
+constructor TROProjectWizard.Create(const aTemplateDir, aName, aComment: string; aCategory: IOTAGalleryCategory);
+begin
+  inherited Create;
+
+  fName := aName;
+  fTemplateDir := aTemplateDir;
+  fComment := aComment;
+  fCategory := aCategory;
+end;
+{$ELSE}
+constructor TROProjectWizard.Create(const aTemplateDir, aName, aComment: string; aCategory: string);
+begin
+  inherited Create;
+
+  fName := aName;
+  fTemplateDir := aTemplateDir;
+  fComment := aComment;
+  fPage := aCategory;
+end;
+{$ENDIF}
+
+destructor TROProjectWizard.Destroy;
+begin
+  inherited;
+end;
+
+procedure TROProjectWizard.Execute;
+var
+  prjopt: TROIDEProjectOptions;
+  lNewProjectInfo: TROIDENewProjectInfo;
+  i:integer;
+  lServices: IOTAModuleServices;
+  lProject: IOTAProject;
+begin
+  if PromptProjectOptions(fTemplateDir, prjopt) then begin
+    CreateProject(prjopt, DelphiModules);
+
+    with prjopt do begin
+      {$IFDEF BDS}
+      if FileExists(ProjectDir + ProjectName + 'Group.bdsgroup') and prjopt.CreateClientAndGroup then
+        (BorlandIDEServices as IOTAActionServices).OpenProject(ProjectDir + ProjectName + 'Group.bdsgroup', FALSE)
+      {$ELSE}
+      if FileExists(ProjectDir + ProjectName + 'Group.bpg') and prjopt.CreateClientAndGroup then
+        (BorlandIDEServices as IOTAActionServices).OpenProject(ProjectDir + ProjectName + 'Group.bpg', FALSE)
+      {$ENDIF}
+
+      {$IFDEF BDS}
+      else if FileExists(ProjectDir + ProjectName + '.bdsproj') then
+        (BorlandIDEServices as IOTAActionServices).OpenProject(ProjectDir + ProjectName + '.bdsproj', FALSE)
+      {$ELSE}
+      else if FileExists(ProjectDir + ProjectName + '.dpr') then
+        (BorlandIDEServices as IOTAActionServices).OpenProject(ProjectDir + ProjectName + '.dpr', FALSE)
+      {$ENDIF}
+      else
+        raise Exception.Create('Cannot find RemObjects project');
+
+      // find projects
+      lServices := ModuleServices;
+      if not assigned(lServices) then exit;
+      for i := 0 to (lServices.ModuleCount - 1) do begin
+        if lServices.Modules[i].QueryInterface(IOTAProject, lProject) = S_OK then begin
+          if ChangeFileExt(ExtractFileName(lProject.FileName),'') = prjopt.ProjectName then begin
+            lNewProjectInfo.ServerProject := lProject;
+          end
+          else if ChangeFileExt(ExtractFileName(lProject.FileName),'') = prjopt.ProjectName+'Client' then begin
+            lNewProjectInfo.ClientProject := lProject;
+          end;
+        end;
+      end;
+      if not assigned(lNewProjectInfo.ServerProject) then exit;
+
+      if WizardEnabled then begin
+        with TMemIniFile.Create(IncludeTrailingPathDelimiter(prjopt.TemplateDir)+'Info.ini') do try
+          lNewProjectInfo.Wizard := ReadString('Information', 'Wizard', '');
+          if lNewProjectInfo.Wizard <> '' then begin
+            lNewProjectInfo.TemplateFolder := fTemplateDir;
+            lNewProjectInfo.TemplateName := ExtractFileName(ExcludeTrailingPathDelimiter(fTemplateDir));
+            lNewProjectInfo.ProjectOptions := prjopt;
+            RunGuideWizard(lNewProjectInfo);
+          end;
+        finally
+          Free();
+        end;
+      end;
+
+      {if (MessageDlg(
+        'Your server project needs to be compiled in order to generate the additional units' + #13 +
+        'required for remote invocation. Do you want to do that now?', mtInformation, [mbYes, mbNo], 0) = mrYes) then begin
+        CompileProject;
+      end;}
+    end;
+  end;
+end;
+
+procedure TROProjectWizard.CreateProject(const someProjectOptions: TROIDEProjectOptions; const ScanExtensions: array of string);
+var
+  lIgnoreAll: boolean;
+
+  function CanWriteFile(const aFilename: string): boolean;
+  begin
+    result := (not FileExists(aFileName)) or lIgnoreAll;
+    if not result then begin
+      case MessageDlg(Format('File %s already exists. Overwrite?', [aFileName]), mtWarning, [mbYes, mbYesToAll, mbNo, mbCancel], 0) of
+        mrYes: result := true;
+        mrYesToAll: begin
+            result := true;
+            lIgnoreAll := true;
+          end;
+        mrCancel: Abort();
+      end;
+    end;
+  end;
+
+  function CopyTemplateFiles(const SourceDir: string):boolean;
+  var
+    s, d, templatedir: string;
+    dirinfo: TSearchRec;
+    sl: TStringList;
+    i: integer;
+    docopy: boolean;
+  begin
+    result := true;
+    sl := TStringList.Create;
+    templatedir := IncludeTrailingPathDelimiter(SourceDir);
+    try
+
+      if (FindFirst(templatedir + '*.*', faArchive, dirinfo) = 0) then try
+        ForceDirectories(someProjectOptions.ProjectDir);
+        repeat
+          if (CompareText(dirinfo.Name, IconName) = 0) or
+            (CompareText(dirinfo.Name, InfoName) = 0) then Continue;
+
+          s := templatedir + dirinfo.Name;
+          d := someProjectOptions.ProjectDir + ReplaceCtrlStrings(dirinfo.Name, someProjectOptions);
+
+          docopy := TRUE;
+          for i := 0 to High(ScanExtensions) do
+            if (CompareText(ExtractFileExt(dirinfo.Name), ScanExtensions[i]) = 0) then begin
+
+              if not CanWriteFile(d) then Continue;
+
+              sl.LoadFromFile(s);
+              sl.Text := ReplaceCtrlStrings(sl.Text, someProjectOptions);
+              sl.SaveToFile(d);
+
+              if SameText(ExtractFileExt(s),'.rodl') then result := false;
+
+              docopy := FALSE;
+              Break;
+            end;
+
+          if docopy then begin
+            if CanWriteFile(d) then begin
+              CopyFile(PChar(s), PChar(d), FALSE);
+            { Make sure copied files are not readonly, which they might be
+              if TEMPLATES folder is. }
+              SetFileAttributes(PChar(d), FILE_ATTRIBUTE_ARCHIVE);
+            end;
+          end;
+
+        until (FindNext(dirinfo) <> 0);
+      finally
+        FindClose(dirinfo);
+      end;
+    finally
+      sl.Free;
+    end;
+  end;
+
+var
+  lNeedsRodl: boolean;
+  lClientFolder: string;
+begin
+  lNeedsRodl := CopyTemplateFiles(someProjectOptions.TemplateDir);
+  if lNeedsRodl then CopyTemplateFiles(GetTemplateDir);
+  {$IFDEF BDS}
+  CopyTemplateFiles(IncludeTrailingPathDelimiter(GetTemplateDir)+'_BDS\Server');
+  {$ENDIF}
+
+  if someProjectOptions.CreateClientAndGroup then begin
+    lClientFolder := IncludeTrailingPathDelimiter(someProjectOptions.TemplateDir)+'_CLIENT';
+    if not DirectoryExists(lClientFolder) then
+      lClientFolder := IncludeTrailingPathDelimiter(GetTemplateDir)+'_CLIENT';
+    CopyTemplateFiles(lClientFolder);
+    {$IFDEF BDS}
+    CopyTemplateFiles(IncludeTrailingPathDelimiter(GetTemplateDir)+'_BDS\Client');
+    {$ENDIF}
+  end;
+
+end;
+
+function GuidReplace(const S, OldPattern: string; Flags: TReplaceFlags): string;
+var
+  SearchStr, Patt, NewStr: string;
+  Offset: Integer;
+begin
+  if rfIgnoreCase in Flags then begin
+    SearchStr := UpperCase(S);
+    Patt := UpperCase(OldPattern);
+  end
+  else begin
+    SearchStr := S;
+    Patt := OldPattern;
+  end;
+  NewStr := S;
+  Result := '';
+  while SearchStr <> '' do begin
+    Offset := AnsiPos(Patt, SearchStr);
+    if Offset = 0 then begin
+      Result := Result + NewStr;
+      Break;
+    end;
+    Result := Result + Copy(NewStr, 1, Offset - 1) + NewGuidAsString();
+    NewStr := Copy(NewStr, Offset + Length(OldPattern), MaxInt);
+    if not (rfReplaceAll in Flags) then begin
+      Result := Result + NewStr;
+      Break;
+    end;
+    SearchStr := Copy(SearchStr, Offset + Length(Patt), MaxInt);
+  end;
+end;
+
+function TROProjectWizard.ReplaceCtrlStrings(const someText: string; const someProjectOptions: TROIDEProjectOptions): string;
+var
+  cs: string;
+  lRoFolder, lDaFolder:string;
+begin
+  cs := UpperCase(someText);
+  with TRegistry.Create do try
+    RootKey := HKEY_CURRENT_USER;
+    OpenKey('\Software\RemObjects\RemObjects SDK for Delphi',false);
+    lRoFolder := ReadString('InstallDir');
+    OpenKey('\Software\RemObjects\Data Abstract',false);
+    lDaFolder := ReadString('InstallDir');
+  finally
+    Free();
+  end;
+  if lRoFolder = '' then lRoFolder := ExpandFileName(IncludeTrailingPathDelimiter(GetBinDir)+'..\');
+  if lDaFolder = '' then lDaFolder := ExpandFileName(IncludeTrailingPathDelimiter(GetBinDir)+'..\..\Data Abstract\');
+  lRoFolder := IncludeTrailingPathDelimiter(lRoFolder);
+  lDaFolder := IncludeTrailingPathDelimiter(lDaFolder);
+
+  result := StringReplace(someText, '$ROFOLDER', lRoFolder , [rfReplaceAll, rfIgnoreCase]);
+  result := StringReplace(someText, '$DAFOLDER', lDaFolder , [rfReplaceAll, rfIgnoreCase]);
+  result := StringReplace(result, '$PRJNAME', someProjectOptions.ProjectName, [rfReplaceAll, rfIgnoreCase]);
+  result := StringReplace(result, '$SVCNAME', someProjectOptions.ServiceName, [rfReplaceAll, rfIgnoreCase]);
+  result := StringReplace(result, '$SERVICENAME', someProjectOptions.ServiceName, [rfReplaceAll, rfIgnoreCase]);
+  result := StringReplace(result, '$SVCLIBNAME', someProjectOptions.ServiceLibraryName, [rfReplaceAll, rfIgnoreCase]);
+  result := StringReplace(result, '$LIBRARYNAME', someProjectOptions.ServiceLibraryName, [rfReplaceAll, rfIgnoreCase]);
+  result := GuidReplace(result, '$NEWID', [rfReplaceAll, rfIgnoreCase]);
+  result := StringReplace(result, '$MSGCLSNAME', someProjectOptions.MessageClassName, [rfReplaceAll, rfIgnoreCase]);
+  result := StringReplace(result, '$MSGCLSNAME', someProjectOptions.MessageClassName, [rfReplaceAll, rfIgnoreCase]);
+  result := StringReplace(result, '$SRVCLSNAME', someProjectOptions.ServerClassName, [rfReplaceAll, rfIgnoreCase]);
+  result := StringReplace(result, '$CHNCLSNAME', someProjectOptions.ChannelClassName, [rfReplaceAll, rfIgnoreCase]);
+
+  result := StringReplace(result, '$CHANNELUNIT', someProjectOptions.ChannelUnitName, [rfReplaceAll, rfIgnoreCase]);
+  result := StringReplace(result, '$SERVERUNIT', someProjectOptions.ServerUnitName, [rfReplaceAll, rfIgnoreCase]);
+  result := StringReplace(result, '$MESSAGEUNIT', someProjectOptions.MessageUnitName, [rfReplaceAll, rfIgnoreCase]);
+end;
+
+function TROProjectWizard.GetAuthor: string;
+begin
+  Result := str_Author;
+end;
+
+function TROProjectWizard.GetComment: string;
+begin
+  Result := fComment
+end;
+
+{$IFDEF KYLIX1UP}
+
+function TROProjectWizard.GetGlyph: Cardinal;
+var
+  icon: Graphics.TIcon;
+begin
+  if FileExists(fTemplateDir + IconName) then begin
+    icon := Graphics.TIcon.Create;
+    icon.LoadFromFile(fTemplateDir + IconName);
+    result := icon.Handle;
+  end
+  else
+    result := 0;
+end;
+{$ELSE}
+{$IFDEF DELPHI6UP}
+
+function TROProjectWizard.GetGlyph: Cardinal;
+var
+  icon: TIcon;
+begin
+  if FileExists(fTemplateDir + IconName) then begin
+    icon := TIcon.Create;
+    icon.LoadFromFile(fTemplateDir + IconName);
+    result := icon.Handle;
+  end
+  else
+    result := 0;
+end;
+{$ELSE}
+
+function TROProjectWizard.GetGlyph: HICON;
+var
+  icon: TIcon;
+begin
+  if FileExists(fTemplateDir + IconName) then begin
+    icon := TIcon.Create;
+    icon.LoadFromFile(fTemplateDir + IconName);
+    result := icon.Handle;
+  end
+  else
+    result := 0;
+end;
+{$ENDIF}
+{$ENDIF}
+
+{$IFDEF BDS}
+function TROProjectWizard.GetDesigner: string;
+begin
+  result := '';
+end;
+
+function TROProjectWizard.GetGalleryCategory: IOTAGalleryCategory;
+begin
+  result := fCategory;
+end;
+
+function TROProjectWizard.GetPersonality: string;
+begin
+  result := sDelphiPersonality;
+end;
+{$ENDIF}
+
+
+function TROProjectWizard.GetIDString: string;
+begin
+  Result := GUIDToString(NewGUID)
+end;
+
+function TROProjectWizard.GetName: string;
+begin
+  Result := fName
+end;
+
+function TROProjectWizard.GetPage: string;
+begin
+  Result := fPage;
+end;
+
+function TROProjectWizard.GetState: TWizardState;
+begin
+  Result := [];
+end;
+
+var
+  fGuideWizardList: TList;
+
+procedure RunGuideWizard(aNewProjectInfo: TROIDENewProjectInfo);
+var
+  i: integer;
+begin
+  for i := 0 to fGuideWizardList.Count-1 do
+    TNewProjectEvent(fGuideWizardList[i])(aNewProjectInfo);
+end;
+
+procedure RegisterGuideWizard(aOnNewProject: TNewProjectEvent);
+begin
+  fGuideWizardList.Add(@aOnNewProject);
+end;
+
+procedure UnregisterGuideWizard(aOnNewProject: TNewProjectEvent);
+begin
+  if assigned(fGuideWizardList) then
+    fGuideWizardList.Remove(@aOnNewProject);
+end;
+
+initialization
+  fGuideWizardList := TList.Create();
+finalization
+  FreeAndNil(fGuideWizardList);
+end.
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROIDETools.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROIDETools.pas
new file mode 100644
index 0000000..f0992d6
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROIDETools.pas	
@@ -0,0 +1,737 @@
+unit uROIDETools;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Delphi IDE Integration
+{
+{ compiler: Delphi 5 and up
+{ platform: Win32, Linux
+{
+{ (c)opyright RemObjects Software. all rights reserved.
+{
+{ Using this code requires a valid license of the RemObjects SDK
+{ which can be obtained at http://www.remobjects.com.
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+
+uses Classes, ToolsAPI, Contnrs, Windows, uRODLConvertersUtils;
+
+const
+  MaxSourceSize = 10000;
+
+  kw_RODLGenerationDelphi = '{#ROGEN';
+  kw_RODLGenerationCpp    = '//#ROGEN';
+
+type { TIDEMessage }
+  TIDEMessageType = (mInfo, mError, mWarning);
+
+  TIDEMessage = class
+  private
+    fMessageType: TIDEMessageType;
+    fFileName,
+      fMessageStr,
+      fPrefixStr: string;
+
+  public
+    constructor Create(aMessageType: TIDEMessageType;
+      const aMessageStr: string;
+      const aFileName: string = '';
+      const aPrefixStr: string = '');
+
+    property MessageType: TIDEMessageType read fMessageType;
+    property FileName: string read fFileName;
+    property MessageStr: string read fMessageStr;
+    property PrefixStr: string read fPrefixStr;
+  end;
+
+  { TIDEMessageList }
+  TIDEMessageList = class(TObjectList)
+  private
+    fPrefixStr: string;
+
+    function GetItems(Index: integer): TIDEMessage;
+
+  public
+    constructor Create(const aPrefixStr: string);
+    destructor Destroy; override;
+
+    procedure ClearMessages;
+    procedure Add(aMessageType: TIDEMessageType;
+      const aMessageStr: string;
+      const aFileName: string = '';
+      const aPrefixStr: string = '');
+
+    procedure FlushMessages;
+
+    property Items[Index: integer]: TIDEMessage read GetItems; default;
+  end;
+
+// Service access helpers
+function ModuleServices: IOTAModuleServices;
+function CurrentProject: IOTAProject;
+procedure SetActiveProject(aProject: IOTAProject);
+function MessageServices: IOTAMessageServices;
+function Services: IOTAServices;
+function ActionServices: IOTAActionServices;
+
+//  Module helpers
+function ModuleFileName(const aModule: IOTAModule): string;
+function ModuleDir(const aModule: IOTAModule): string;
+function ModuleSourceSize(const aModule: IOTAModule): integer;
+
+// Project helpers
+
+function CodeGenLanuageFromProjectPersonality(aProject: IOTAProject): TROCodeGenLanguage;
+
+function FindModule(const aProject: IOTAProject; const aModuleName: string): IOTAModule;
+function FindModuleByUnitName(const aProject: IOTAProject; const aModuleName: string): IOTAModule;
+function GenerateRESFromRODL(const RODLFileName: string; aMessageList: TIDEMessageList): boolean;
+function ExtractRODLFileName(const Source: string): string; // Only returns the file name specified in the dpr file
+
+function FindFirstRodlProject: IOTAProject;
+function ProjectIsRodlProject(aProject: IOTAProject):boolean;
+function ConvertProjectToRoServer(aProject: IOTAProject):boolean;
+
+function ExecuteAndWait(const aApp, aCmdLine:string; aWait:boolean=true):dword;
+
+function GetServiceBuilderPath: string;
+procedure LaunchServiceBuilder(const aProjectName, aParams: string; aWait:boolean=false);
+procedure LaunchServiceBuilderForCurrentProject(const aAdditionalParameters:string; aOnlyLaunchForROServer:boolean=false; aWait:boolean=false);
+
+procedure LaunchServiceTester;
+
+function GetTemplateDir: string;
+function GetBinDir: string;
+function GetTemplateConfigFileName : string;
+function GetTemplateOptionsFileName : string;
+
+procedure CompileProject;
+function GetProjectExe(aProject: IOTAProject): string;
+
+implementation
+{$IFDEF MSWINDOWS}
+{$WARN SYMBOL_PLATFORM OFF}
+{$ENDIF}
+
+uses SysUtils, Dialogs, ShellAPI, Controls, uRORes, {$IFNDEF MSWINDOWS}
+  fCustomIDEMessagesFormKylix, {$ELSE}
+  fCustomIDEMessagesForm, {$ENDIF}uROResWriter, Forms, uROClasses, Registry,
+  uEWMenuManager, uEWOTAHelpers;
+
+function GetProjectExe(aProject: IOTAProject): string;
+{$IFNDEF BDS}
+var
+  dirname: string;
+{$ENDIF}
+begin
+  ChDir(ExtractFilePath(aProject.FileName));
+
+  {$IFDEF BDS}
+  result := ExpandFileName(aProject.ProjectOptions.TargetName);
+  {$ELSE}
+  dirname := Trim(aProject.ProjectOptions.Values['OutputDir']);
+  if (dirname='') then begin
+    dirname := ExtractFilePath(aProject.FileName)
+  end
+  else begin
+    // Checks for relative paths
+    if (dirname[1]='.') then dirname := ExtractFilePath(aProject.FileName)+dirname;
+  end;
+
+  result := IncludeTrailingPathDelimiter(dirname)+ChangeFileExt(ExtractFileName(aProject.FileName), '.exe');
+  {$ENDIF}
+end;
+
+// Service access helpers
+
+function CodeGenLanuageFromProjectPersonality(aProject: IOTAProject): TROCodeGenLanguage;
+begin
+  {$IFDEF DELPHI9UP}
+  if aProject.Personality = sPersonalityDelphiWin32 then
+    result := cglDelphiWin32
+  else if aProject.Personality = sPersonalityCppBuilderWin32 then
+    result := cglCppBuilder
+  else
+    raise Exception.Create('Unsupported project type '+aProject.Personality);
+  {$ELSE}
+  result := cglDelphiWin32
+  {$ENDIF}
+end;
+
+
+function ModuleServices: IOTAModuleServices;
+begin
+  result := uEWOTAHelpers.ModuleServices;
+end;
+
+function CurrentProject: IOTAProject;
+begin
+  result := uEWOTAHelpers.CurrentProject;
+end;
+
+procedure SetActiveProject(aProject: IOTAProject);
+var
+  services: IOTAModuleServices;
+  module: IOTAModule;
+  i: Integer;
+  projectgroup: IOTAProjectGroup;
+begin
+  services := ModuleServices;
+  if (services = nil) then Exit;
+
+  for I := 0 to (services.ModuleCount - 1) do begin
+    module := services.Modules[I];
+    if (module.QueryInterface(IOTAProjectGroup, ProjectGroup) = S_OK) then begin
+      if ProjectGroup.ActiveProject <> aProject then ProjectGroup.ActiveProject := aProject;
+      break;
+    end;
+  end;  
+end;
+
+function MessageServices: IOTAMessageServices;
+begin
+  result := (BorlandIDEServices as IOTAMessageServices);
+end;
+
+function Services: IOTAServices;
+begin
+  result := (BorlandIDEServices as IOTAServices);
+end;
+
+function ActionServices: IOTAActionServices;
+begin
+  result := (BorlandIDEServices as IOTAActionServices)
+end;
+
+//  Module helpers
+
+function ModuleFileName(const aModule: IOTAModule): string;
+begin
+  result := aModule.FileName;
+  { AleF: removed for Delphi5
+  result := '';
+
+  with aModule do
+    for i := 0 to ModuleFileCount-1 do
+      if Supports(ModuleFileEditors[i], IOTASourceEditor, editor) then begin
+        result := editor.FileName;
+        Exit;
+      end;}
+end;
+
+function ModuleDir(const aModule: IOTAModule): string;
+begin
+  result := IncludeTrailingPathDelimiter(ExtractFilePath(ModuleFileName(aModule)))
+end;
+
+function ModuleSourceSize(const aModule: IOTAModule): integer;
+begin
+  result := Length(ReadModuleSource(aModule));
+end;
+
+{ TIDEMessageList }
+
+{$IFDEF DELPHI7UP}
+
+procedure TIDEMessageList.Add(aMessageType: TIDEMessageType;
+  const aMessageStr: string;
+  const aFileName: string = '';
+  const aPrefixStr: string = '');
+var
+  lGroup: IOTAMessageGroup;
+  lDummyLineRef: pointer;
+  lPrefix: string;
+begin
+  with BorlandIDEServices as IOTAMessageServices60 do begin
+    lGroup := GetGroup(str_ProductName);
+    if not Assigned(lGroup) then lGroup := AddMessageGroup(str_ProductName);
+
+    lPrefix := aPrefixStr;
+    if lPrefix = '' then lPrefix := 'Note';
+    AddToolMessage(aFilename, aMessageStr, lPrefix, -1, -1, nil, lDummyLineRef, lGroup);
+  end; { with }
+end;
+{$ELSE}
+
+procedure TIDEMessageList.Add(aMessageType: TIDEMessageType;
+  const aMessageStr: string;
+  const aFileName: string = '';
+  const aPrefixStr: string = '');
+var
+  msg: TIDEMessage;
+begin
+  msg := TIDEMessage.Create(aMessageType, aMessageStr, aFileName, aPrefixStr);
+  inherited Add(msg);
+end;
+{$ENDIF}
+
+procedure TIDEMessageList.ClearMessages;
+{$IFDEF DELPHI7UP}
+var
+  lGroup: IOTAMessageGroup;
+begin
+  with BorlandIDEServices as IOTAMessageServices60 do begin
+    lGroup := GetGroup(str_ProductName);
+    if not Assigned(lGroup) then lGroup := AddMessageGroup(str_ProductName);
+    RemoveMessageGroup(lGroup);
+  end;
+end;
+{$ELSE}
+begin
+end;
+{$ENDIF}
+
+constructor TIDEMessageList.Create(const aPrefixStr: string);
+begin
+  inherited Create;
+  fPrefixStr := aPrefixStr;
+end;
+
+destructor TIDEMessageList.Destroy;
+begin
+  inherited;
+end;
+
+procedure TIDEMessageList.FlushMessages;
+begin
+  {$IFNDEF DELPHI7UP}
+  IDEMessageForm.FillList(Self);
+  Clear;
+  {$ENDIF DELPHI7UP}
+end;
+
+// Project helpers
+
+function FindModule(const aProject: IOTAProject; const aModuleName: string): IOTAModule;
+var
+  i: integer;
+begin
+  result := nil;
+  for i := 0 to aProject.GetModuleCount - 1 do
+    if (CompareText(aModuleName, aProject.GetModule(i).FileName) = 0) then begin
+      result := aProject.GetModule(i).OpenModule;
+      Exit;
+    end;
+end;
+
+function FindModuleByUnitName(const aProject: IOTAProject; const aModuleName: string): IOTAModule;
+begin
+  Result := uEWOTAHelpers.FindModuleByUnitName(aProject, aModuleName);
+end;
+
+function TIDEMessageList.GetItems(Index: integer): TIDEMessage;
+begin
+  result := TIDEMessage(inherited Items[Index]);
+end;
+
+{ TIDEMessage }
+
+constructor TIDEMessage.Create(aMessageType: TIDEMessageType;
+  const aMessageStr, aFileName, aPrefixStr: string);
+begin
+  fMessageType := aMessageType;
+  fMessageStr := aMessageStr;
+  fFileName := aFileName;
+  fPrefixStr := aPrefixStr;
+end;
+
+// File names helpers
+
+function ExtractRODLFileName(const Source: string): string;
+var
+  src: string;
+  i, lNameStartIndex, idx: integer;
+begin
+  result := '';
+  
+  src := UpperCase(Source);
+  idx := Pos(kw_RODLGenerationDelphi, src);
+  if idx = 0 then idx := Pos(kw_RODLGenerationCpp, src); // allow C++-style comment in Delphi, too
+  if idx = 0 then exit;
+
+  lNameStartIndex := 0;
+
+  for i := idx to Length(src) do begin
+    case src[i] of
+      ':': if (lNameStartIndex = 0) then lNameStartIndex := i + 1;
+      '}',#13, #10, '|': begin
+          if lNameStartIndex = 0 then
+            raise Exception.Create('Invalid #ROGEN directive, RODL filename not spcified.');
+          result := Trim(Copy(Source, lNameStartIndex, i-lNameStartIndex));
+          break;
+        end;
+
+    end;
+  end;
+end;
+
+function FindFirstRodlProject: IOTAProject;
+var
+  i: integer;
+  lServices: IOTAModuleServices;
+  lProject: IOTAProject;
+begin
+  result := nil;
+
+  lServices := ModuleServices;
+
+  if (lServices = nil) then Exit;
+
+  for i := 0 to (lServices.ModuleCount - 1) do begin
+    if lServices.Modules[i].QueryInterface(IOTAProject, lProject) = S_OK then begin
+      if ProjectIsRodlProject(lProject) then begin
+        result := lProject;
+        exit;
+      end;
+    end;
+  end;
+end;
+
+function ProjectIsRodlProject(aProject: IOTAProject):boolean;
+var
+  lSource:string;
+begin
+  result := false;
+  if Assigned(aProject) then begin
+    if Assigned(aProject.ProjectOptions) then begin
+      if (aProject.ProjectOptions.Values['GenPackage']) or (aProject.ProjectOptions.Values['GenDll']) then
+        Exit; // Skipping packages and dynamic libraries
+    end;
+    lSource := ReadModuleSource(aProject);
+    result := ExtractRODLFileName(lSource) <> '';
+  end;
+end;
+
+function ConvertProjectToRoServer(aProject: IOTAProject):boolean;
+var
+  lSource, lUsesClause: string;
+  lUsesStarts, lUsesEnds: Integer;
+begin
+  result := false;
+  if Assigned(aProject) and not ProjectIsRodlProject(aProject) then begin
+
+    lSource := ReadModuleSource(aProject);
+
+    case CodeGenLanuageFromProjectPersonality(aProject) of
+      cglDelphiWin32: begin
+          lSource := StringReplace(lSource, 'uses',
+            'uses'#13#10+
+            '  uROCOMInit,',
+          [rfIgnoreCase]);
+
+          lUsesStarts := Pos('uses', lSource);
+          lUsesEnds := Pos(';', Copy(lSource, lUsesStarts, Length(lSource) - lUsesStarts));
+          lUsesClause := Copy(lSource, lUsesStarts, lUsesEnds);
+
+          lSource := StringReplace(lSource, lUsesClause, lUsesClause + #13#10#13#10 +
+            '{#ROGEN:' + ExtractFileName(ChangeFileExt(aProject.FileName,'.rodl'))+'} // RemObjects: Careful, do not remove!'#13#10+
+            '{$R RODLFile.res}',
+          [rfIgnoreCase]);
+        end;
+
+      cglCppBuilder: begin
+          Insert('#include <uROCOMInit.hpp>'#13#10, lSource, Pos('#include', lSource));
+
+          lSource := StringReplace(lSource,'#pragma hdrstop',
+            '#pragma hdrstop'#13#10+
+            '//#ROGEN:'+ExtractFileName(ChangeFileExt(aProject.FileName,'.rodl'))+' | RemObjects: Careful, do not remove!'#13#10+
+            '#pragma resource "RODLFile.res"',
+          [rfIgnoreCase]);
+        end;
+
+    end;
+    result := true;
+    WriteModuleSource(aProject,lSource, '');
+  end;
+end;
+
+function ReadRegistryValue(aBaseKey:HKEY; aPath:string; aName:string; aDefault:string=''):string;
+begin
+  with TRegistry.Create(KEY_READ) do try
+    RootKey := aBaseKey;
+    if OpenKey(aPath, False) then
+      if ValueExists(aName) then
+        result := ReadString(aName)
+      else
+        result := aDefault;
+  finally
+    Free;
+  end;
+end;
+
+function GetServiceBuilderPath: string;
+var reg: TRegIniFile;
+begin
+  reg := TRegIniFile.Create('Software\RemObjects\RemObjects SDK');
+  try
+    result := reg.ReadString('ServiceBuilder', 'FullPath', GetBinDir+'ROServiceBuilder3.exe');
+  finally
+    reg.Free;
+  end;
+end;
+
+function GetServiceTesterPath: string;
+begin
+  {result := ReadRegistryValue(HKEY_CURRENT_USER,'Software\RemObjects\RemObjects SDK for Delphi','InstallDir','');
+  if result = '' then
+    raise Exception.Create('Cannot find RemObjects SDK for Delphi location in Registry.'#13#13'Please make sure RemObjects SDK is installed properly.');
+  result := IncludeTrailingPathDelimiter(result)+'Bin\ROServiceTester.exe';
+  if not FileExists(result) then
+    raise Exception.CreateFmt('Cannot find ServiceTester at "%s".'#13#13'Please make sure RemObjects SDK is installed properly.', [result]);}
+  result := IncludeTrailingPathDelimiter(ExtractFilePath(GetServiceBuilderPath()))+'ROServiceTester.exe';
+  if not FileExists(result) then
+    raise Exception.CreateFmt('Cannot find ServiceTester at "%s".'#13#13'Please make sure RemObjects SDK is installed properly.', [result]);
+end;
+
+{----------------------------------------------------------------------------}
+// Taken from eFiles.pas from the eLibrary 6.0
+function ExecuteAndWait(const aApp, aCmdLine:string; aWait:boolean=true):dword;
+var StartupInfo:TStartupInfo;
+    ProcessInfo:TProcessInformation;
+    lApp:string;
+    s:array[0..MAX_PATH] of char;
+begin
+  GetStartupInfo(Startupinfo);
+
+  ExpandEnvironmentStrings(pChar(aApp),@s,MAX_PATH);
+  lApp := string(pChar(@s));
+
+  if CreateProcess(pChar(lApp),
+                   pChar('"'+lApp+'" '+aCmdLine),
+                   nil,nil,false,0,nil,
+                   pChar(GetCurrentDir),
+                   StartupInfo,
+                   ProcessInfo) then begin
+    CloseHandle(ProcessInfo.hThread);
+
+    if aWait then begin
+    { Wait till app terminates, but don't block main thread. }
+    while WaitForSingleObject(ProcessInfo.hProcess,100) = WAIT_TIMEOUT do
+      Application.ProcessMessages();
+    GetExitCodeProcess(ProcessInfo.hProcess,result);
+    end;
+    CloseHandle(ProcessInfo.hProcess);
+  end
+  else raise Exception.CreateFmt('could not create process %s %s: %d',[lApp,CmdLine,GetLastError]);
+end;
+
+procedure LaunchServiceBuilder(const aProjectName, aParams: string; aWait:boolean=false);
+var
+  lExeName: string;
+begin
+  lExeName := GetServiceBuilderPath();
+
+  if aWait then begin
+    ExecuteAndWait(lExename, aParams);
+  end
+  else begin
+    ShellExecute(0, 'open', PChar(lExeName), PChar(aParams), PChar(ExtractFilePath(aProjectName)), SW_NORMAL);
+  end;
+end;
+
+procedure LaunchServiceTester;
+var
+  lExeName: string;
+begin
+  lExeName := GetServiceTesterPath();
+  ShellExecute(0, 'open', PChar(lExeName), nil, nil, SW_NORMAL);
+end;
+
+procedure LaunchServiceBuilderForCurrentProject(const aAdditionalParameters:string; aOnlyLaunchForROServer:boolean=false; aWait:boolean=false);
+var prj : IOTAProject;
+    fname,
+    lParams,
+    src: string;
+begin
+  // TODO: Clean up these hardcoded things
+  prj := CurrentProject;
+
+  if Assigned(prj) then begin
+    src := ReadModuleSource(prj);
+    fname := ModuleDir(prj)+ExtractRODLFileName(src);
+
+    if (ExtractFileName(fname)<>'') then begin
+      {$IFDEF SB2}
+      lParams := Format('/rodlfile:"%s" /projectname:"%s" /autosave '+aAdditionalParameters, [fname, ExtractFileName(prj.FileName)])
+      {$ELSE}
+      lParams := Format('"%s" /ns /projectname:"%s" /autosave '+aAdditionalParameters, [fname, ExtractFileName(prj.FileName)])
+      {$ENDIF}
+    end
+    else begin
+      if aOnlyLaunchForROServer then
+        RaiseError('The current project is not a RemObjects Server');
+      lParams := '/ns '+aAdditionalParameters;
+    end;
+    LaunchServiceBuilder(prj.FileName, lParams, aWait);
+
+  end
+  else begin
+    if aOnlyLaunchForROServer then
+      RaiseError('The current project is not a RemObjects Server');
+    LaunchServiceBuilder('', '/ns')
+  end;
+end;
+
+function GenerateRESFromRODL(const RODLFileName: string; aMessageList: TIDEMessageList): boolean;
+var {outname, }
+  lAttributes: Integer;
+  resname {, pars}: string;
+    //res : integer;
+  resdata, rodldata: TFileStream;
+begin
+  rodldata := nil;
+  resdata := nil;
+
+  result := false;
+  try
+    try
+      resname := IncludeTrailingPathDelimiter(ExtractFilePath(RODLFileName)) + res_RODLFile + '.res';
+
+      {$IFDEF MSWINDOWS}
+      if FileExists(resname) then begin
+        lAttributes := FileGetAttr(resname);
+        if (lAttributes and faReadOnly) = faReadOnly then begin
+          case MessageDlg(Format('%s is readonly, overwrite anyway?',[ExtractFileName(resname)]),
+                        mtConfirmation, [mbYes, mbCancel, mbIgnore], 0) of
+            mrCancel: Abort();
+            mrIgnore: begin
+                result := true;
+                exit;
+              end;
+            mrYes: FileSetAttr(resname, lAttributes xor faReadOnly);
+          end;
+        end;
+      end;
+      {$ENDIF}
+
+      resdata := TFileStream.Create(resname, fmCreate);
+      rodldata := TFileStream.Create(RODLFileName, fmOpenRead + fmShareDenyNone);
+      rodldata.Position := 0;
+
+      WriteRES(rodldata, resdata, res_RODLFile);
+
+      result := FileExists(resname);
+    except
+      on E: EAbort do raise;
+      on E: Exception do begin
+        MessageDlg('The following error occourred while trying to generate the resource file.'#13 +
+          E.Message, mtError, [mbOK], 0);
+        result := FALSE;
+      end;
+    end;
+  finally
+    rodldata.Free;
+    resdata.Free;
+  end;
+{  try
+    // Creates an rc file called RODLFile.rc and saves it where the RODL file is located
+    outname := IncludeTrailingPathDelimiter(ExtractFilePath(RODLFileName))+res_RODLFile+'.rc';
+
+    with TStringList.Create do try
+      Add(Format('%s RCDATA "%s"', [res_RODLFile, RODLFileName]));
+      SaveToFile(outname);
+    finally
+      Free;
+    end;
+
+    resname := ChangeFileExt(outname, '.RES');
+    DeleteFile(resname);
+
+    if FileExists(resname) then begin
+      aMessageList.Add(mError,'The file '+resname+' could not be deleted');
+    end;
+
+    pars := '"'+outname+'" "'+resname+'"';
+    res := ShellExecute(0, 'open', 'BRCC32', PChar(pars), NIL, SW_HIDE);
+    aMessageList.Add(mInfo, 'BRCC32 '+pars);
+
+    if (res<=32) then begin
+      aMessageList.Add(mError,Format('ShellExecute returned %s', [res]));
+      result := FALSE;
+    end
+    else result := TRUE;
+  except
+    on E:Exception do begin
+      MessageDlg('The following error occourred while trying to generate the resource file.'#13+
+                 E.Message, mtError, [mbOK], 0);
+      result := FALSE;
+    end;
+  end;}
+end;
+
+procedure CompileProject;
+var
+  Actions: IOTAEditActions;
+  ModuleServices: IOTAModuleServices;
+  Module: IOTAModule;
+  SourceEdit: IOTASourceEditor;
+  FileCount: Integer;
+  cnt: Integer;
+begin
+  ModuleServices := BorlandIDEServices as IOTAModuleServices;
+
+  Module := ModuleServices.CurrentModule;
+
+  FileCount := Module.GetModuleFileCount;
+  if not FileCount>0 then Exit;
+
+  for cnt := 0 to FileCount - 1 do
+    if Module.GetModuleFileEditor(cnt).QueryInterface(IOTASourceEditor, SourceEdit) = S_OK then begin
+      if SourceEdit.EditViews[0].QueryInterface(IOTAEditActions, Actions) = S_OK then
+        Actions.CompileProject;
+      exit;
+    end;
+end;
+
+
+function GetDllPath: String;
+var TheFileName : array[0..MAX_PATH] of char;
+begin
+  FillChar(TheFileName, SizeOf(TheFileName), #0);
+  {$IFDEF KYLIX}System.{$ENDIF}GetModuleFileName(hInstance, TheFileName, sizeof(TheFileName));
+  Result := ExtractFilePath(TheFileName);
+end;
+
+function GetTemplateDir: string;
+begin
+  result := ReadRegistryValue(HKEY_CURRENT_USER,'Software\RemObjects\RemObjects SDK for Delphi','InstallDir','');
+  Result := IncludeTrailingPathDelimiter(IncludeTrailingPathDelimiter(Result) + 'Templates');
+(*
+  //ToDo: use a more reliable way to find templates; possibly using the same technique as GetServiceBuilderPath()
+  // This function strips the "DCU\Dx" part of the path where the BPL is
+  result := ExtractFilePath(GetDllPath);
+  {$IFDEF DELPHI10UP}
+  result := IncludeTrailingPathDelimiter(Copy(result,1,Length(result)-8))+{$IFDEF KYLIX}'Templates/'{$ELSE}'Templates\'{$ENDIF};
+  {$ELSE}
+  result := IncludeTrailingPathDelimiter(Copy(result,1,Length(result)-7))+{$IFDEF KYLIX}'Templates/'{$ELSE}'Templates\'{$ENDIF};
+  {$ENDIF}
+*)
+end;
+
+function GetBinDir: string;
+begin
+  // TODO: Fix this adding a registry key.
+
+  // This function strips the "DCU\Dx" part of the path where the BPL is
+  result := ExtractFilePath(GetDllPath);
+  result := IncludeTrailingPathDelimiter(Copy(result,1,Length(result)-7))+'Bin\';
+end;
+
+function GetTemplateConfigFileName : string;
+begin
+  result := GetTemplateDir+'Config.ini';
+end;
+
+function GetTemplateOptionsFileName : string;
+begin
+  result := GetTemplateDir+'TemplateOptions.ini';
+end;
+
+end.
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROIDETools_laz.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROIDETools_laz.pas
new file mode 100644
index 0000000..bbeb23c
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROIDETools_laz.pas	
@@ -0,0 +1,658 @@
+unit uROIDETools_laz;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Delphi IDE Integration                            }
+{                                                                            }
+{ compiler: Delphi 5 and up                                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+
+uses {$IFDEF MSWINDOWS}Windows, {$ENDIF}
+     lResources,
+     LazIDEIntf, ProjectIntf,uEWOTAHelpers_laz,
+     Classes, Contnrs, uRODLConvertersUtils;
+
+
+const
+  MaxSourceSize = 10000;
+
+  kw_RODLGenerationDelphi = '{#ROGEN';
+  kw_RODLGenerationCpp    = '//#ROGEN';
+
+type { TIDEMessage }
+  TIDEMessageType = (mInfo, mError, mWarning);
+
+  TIDEMessage = class
+  private
+    fMessageType: TIDEMessageType;
+    fFileName,
+      fMessageStr,
+      fPrefixStr: string;
+
+  public
+    constructor Create(aMessageType: TIDEMessageType;
+      const aMessageStr: string;
+      const aFileName: string = '';
+      const aPrefixStr: string = '');
+
+    property MessageType: TIDEMessageType read fMessageType;
+    property FileName: string read fFileName;
+    property MessageStr: string read fMessageStr;
+    property PrefixStr: string read fPrefixStr;
+  end;
+
+  { TIDEMessageList }
+  TIDEMessageList = class(TObjectList)
+  private
+    fPrefixStr: string;
+
+    function GetItems(Index: integer): TIDEMessage;
+
+  public
+    constructor Create(const aPrefixStr: string);
+    destructor Destroy; override;
+
+    procedure ClearMessages;
+    procedure Add(aMessageType: TIDEMessageType;
+      const aMessageStr: string;
+      const aFileName: string = '';
+      const aPrefixStr: string = '');
+
+    procedure FlushMessages;
+
+    property Items[Index: integer]: TIDEMessage read GetItems; default;
+  end;
+
+
+//  Module helpers
+{}function ModuleFileName(const aModule: TLazProjectFile): string;
+{}function ModuleDir(const aModule: TLazProject): string;
+{}function ModuleSourceSize(const aModule: TLazProjectFile): integer;
+
+// Project helpers
+
+{}function CodeGenLanuageFromProjectPersonality(aProject: TLazProject): TROCodeGenLanguage;
+
+{}function FindModule(const aProject: TLazProject; const aModuleName: string): TLazProjectFile;
+{}function GenerateRESFromRODL(const RODLFileName: string; aMessageList: TIDEMessageList): boolean;
+{}function ExtractRODLFileName(const Source: string): string; // Only returns the file name specified in the dpr file
+
+{}function FindFirstRodlProject: TLazProject;
+{}function ProjectIsRodlProject(aProject: TLazProject):boolean;
+{}function ConvertProjectToRoServer(aProject: TLazProject):boolean;
+
+{}function ExecuteAndWait(const aApp, aCmdLine:string; aWait:boolean=true):dword;
+
+{}function GetServiceBuilderPath: string;
+{}procedure LaunchServiceBuilder(const aProjectName, aParams: string; aWait:boolean=false);
+{}procedure LaunchServiceBuilderForCurrentProject(const aAdditionalParameters:string; aOnlyLaunchForROServer:boolean=false; aWait:boolean=false);
+
+{}procedure LaunchServiceTester;
+
+function GetTemplateDir: string;
+function GetBinDir: string;
+function GetTemplateConfigFileName : string;
+function GetTemplateOptionsFileName : string;
+
+procedure CompileProject;
+{}function GetProjectExe(aProject: TLazProject): string;
+
+
+implementation
+
+uses SysUtils, Dialogs, Controls, uRORes,
+  uEWTools, Process,FileUtil,
+  fCustomIDEMessagesForm,
+  uROResWriter, Forms, uROClasses, Registry,
+  uEWMenuManager_laz;
+
+
+function GetProjectExe(aProject: TLazProject): string;
+const
+  {$IFDEF MSWINDOWS}
+  exe_DefaultExt = '.exe';
+  {$ELSE}
+  exe_DefaultExt = '.';
+  {$ENDIF}
+var
+  dirname: string;
+begin
+  ChDir(ExtractFilePath(aProject.MainFile.Filename));
+
+  //dirname := Trim(aProject.ProjectOptions.Values['OutputDir']);
+  dirname := '';
+  if (dirname='') then begin
+    dirname := ExtractFilePath(aProject.MainFile.Filename)
+  end
+  else begin
+    // Checks for relative paths
+    if (dirname[1]='.') then dirname := ExtractFilePath(aProject.MainFile.Filename)+dirname;
+  end;
+  result := IncludeTrailingPathDelimiter(dirname)+ChangeFileExt(ExtractFileName(aProject.MainFile.Filename), exe_DefaultExt);
+end;
+
+// Service access helpers
+
+function CodeGenLanuageFromProjectPersonality(aProject: TLazProject): TROCodeGenLanguage;
+begin
+  result := cglDelphiWin32
+end;
+
+
+//  Module helpers
+
+function ModuleFileName(const aModule: TLazProjectFile): string;
+begin
+  result := aModule.Filename;
+end;
+
+function ModuleDir(const aModule: TLazProject): string;
+begin
+  result := IncludeTrailingPathDelimiter(ExtractFilePath(ModuleFileName(aModule.MainFile)))
+end;
+
+function ModuleSourceSize(const aModule: TLazProjectFile): integer;
+begin
+  result := Length(aModule.GetSourceText);
+end;
+
+{ TIDEMessageList }
+
+{$IFDEF DELPHI7UP}
+
+procedure TIDEMessageList.Add(aMessageType: TIDEMessageType;
+  const aMessageStr: string;
+  const aFileName: string = '';
+  const aPrefixStr: string = '');
+var
+  lGroup: IOTAMessageGroup;
+  lDummyLineRef: pointer;
+  lPrefix: string;
+begin
+  with BorlandIDEServices as IOTAMessageServices60 do begin
+    lGroup := GetGroup(str_ProductName);
+    if not Assigned(lGroup) then lGroup := AddMessageGroup(str_ProductName);
+
+    lPrefix := aPrefixStr;
+    if lPrefix = '' then lPrefix := 'Note';
+    AddToolMessage(aFilename, aMessageStr, lPrefix, -1, -1, nil, lDummyLineRef, lGroup);
+  end; { with }
+end;
+{$ELSE}
+
+procedure TIDEMessageList.Add(aMessageType: TIDEMessageType;
+  const aMessageStr: string;
+  const aFileName: string = '';
+  const aPrefixStr: string = '');
+var
+  msg: TIDEMessage;
+begin
+  msg := TIDEMessage.Create(aMessageType, aMessageStr, aFileName, aPrefixStr);
+  inherited Add(msg);
+end;
+{$ENDIF}
+
+procedure TIDEMessageList.ClearMessages;
+{$IFDEF DELPHI7UP}
+var
+  lGroup: IOTAMessageGroup;
+begin
+  with BorlandIDEServices as IOTAMessageServices60 do begin
+    lGroup := GetGroup(str_ProductName);
+    if not Assigned(lGroup) then lGroup := AddMessageGroup(str_ProductName);
+    RemoveMessageGroup(lGroup);
+  end;
+end;
+{$ELSE}
+begin
+end;
+{$ENDIF}
+
+constructor TIDEMessageList.Create(const aPrefixStr: string);
+begin
+  inherited Create;
+  fPrefixStr := aPrefixStr;
+end;
+
+destructor TIDEMessageList.Destroy;
+begin
+  inherited;
+end;
+
+procedure TIDEMessageList.FlushMessages;
+begin
+  {$IFNDEF DELPHI7UP}
+  IDEMessageForm.FillList(Self);
+  Clear;
+  {$ENDIF DELPHI7UP}
+end;
+
+// Project helpers
+
+function FindModule(const aProject: TLazProject; const aModuleName: string): TLazProjectFile;
+begin
+  result := FindModuleByUnitName(aProject,aModuleName);
+end;
+
+function TIDEMessageList.GetItems(Index: integer): TIDEMessage;
+begin
+  result := TIDEMessage(inherited Items[Index]);
+end;
+
+{ TIDEMessage }
+
+constructor TIDEMessage.Create(aMessageType: TIDEMessageType;
+  const aMessageStr, aFileName, aPrefixStr: string);
+begin
+  fMessageType := aMessageType;
+  fMessageStr := aMessageStr;
+  fFileName := aFileName;
+  fPrefixStr := aPrefixStr;
+end;
+
+// File names helpers
+
+function ExtractRODLFileName(const Source: string): string;
+var
+  src: string;
+  i, lNameStartIndex, idx: integer;
+begin
+  result := '';
+  
+  src := UpperCase(Source);
+  idx := Pos(kw_RODLGenerationDelphi, src);
+  if idx = 0 then idx := Pos(kw_RODLGenerationCpp, src); // allow C++-style comment in Delphi, too
+  if idx = 0 then exit;
+
+  lNameStartIndex := 0;
+
+  for i := idx to Length(src) do begin
+    case src[i] of
+      ':': if (lNameStartIndex = 0) then lNameStartIndex := i + 1;
+      '}',#13, #10, '|': begin
+          if lNameStartIndex = 0 then
+            raise Exception.Create('Invalid #ROGEN directive, RODL filename not spcified.');
+          result := Trim(Copy(Source, lNameStartIndex, i-lNameStartIndex));
+          break;
+        end;
+
+    end;
+  end;
+end;
+
+function FindFirstRodlProject: TLazProject;
+begin
+  if ProjectIsRodlProject(CurrentProject) then
+    result := CurrentProject
+  else
+    result := nil;
+end;
+
+function ProjectIsRodlProject(aProject: TLazProject):boolean;
+var
+  lSource:string;
+begin
+  result := false;
+  if Assigned(aProject) then begin
+    if aProject.LazCompilerOptions.ExecutableType = cetLibrary then exit;
+    lSource := ReadModuleSource(aProject.MainFile);
+    result := ExtractRODLFileName(lSource) <> '';
+  end;
+end;
+
+function ConvertProjectToRoServer(aProject: TLazProject):boolean;
+var
+  lSource, lUsesClause: string;
+  lUsesStarts, lUsesEnds: Integer;
+begin
+  result := false;
+  if Assigned(aProject) and not ProjectIsRodlProject(aProject) then begin
+
+    lSource := ReadModuleSource(aProject.MainFile);
+
+    lSource := StringReplace(lSource, 'uses',
+      'uses'#13#10+
+      '  uROCOMInit,'#13#10+
+      '  {$IFDEF FPC}LResources,{$ENDIF}',
+    [rfIgnoreCase]);
+
+    lUsesStarts := Pos('uses', lSource);
+    lUsesEnds := Pos(';', Copy(lSource, lUsesStarts, Length(lSource) - lUsesStarts));
+    lUsesClause := Copy(lSource, lUsesStarts, lUsesEnds);
+
+    lSource := StringReplace(lSource, lUsesClause, lUsesClause + #13#10#13#10 +
+      '{#ROGEN:' + ExtractFileName(ChangeFileExt(aProject.MainFile.Filename,'.rodl'))+'} // RemObjects: Careful, do not remove!'#13#10+
+      '{$IFNDEF FPC}'+#13#10 +
+      '{$R RODLFile.res}'+#13#10 +
+      '{$ENDIF}',
+    [rfIgnoreCase]);
+
+    lSource := StringReplace(lSource, 'begin'+#13#10, 'begin'+#13#10+
+      '  {$IFDEF FPC}'+#13#10+
+      '  {$I '+res_RODLFile+'.lrs}'+#13#10+
+      '  {$ENDIF}'+#13#10,
+      [rfIgnoreCase]);
+    result := true;
+    WriteModuleSource(aProject.MainFile,lSource, '');
+  end;
+end;
+
+function ReadRegistryValue(aBaseKey:HKEY; aPath:string; aName:string; aDefault:string=''):string;
+begin
+  with TRegistry.Create(KEY_READ) do try
+    RootKey := aBaseKey;
+    if OpenKey(aPath, False) then
+      if ValueExists(aName) then
+        result := ReadString(aName)
+      else
+        result := aDefault;
+  finally
+    Free;
+  end;
+end;
+
+function GetServiceBuilderPath: string;
+var reg: TRegIniFile;
+begin
+  reg := TRegIniFile.Create('Software\RemObjects\RemObjects SDK');
+  try
+    result := reg.ReadString('ServiceBuilder', 'FullPath', GetBinDir+'ROServiceBuilder3.exe');
+  finally
+    reg.Free;
+  end;
+end;
+
+function GetServiceTesterPath: string;
+begin
+  {result := ReadRegistryValue(HKEY_CURRENT_USER,'Software\RemObjects\RemObjects SDK for Delphi','InstallDir','');
+  if result = '' then
+    raise Exception.Create('Cannot find RemObjects SDK for Delphi location in Registry.'#13#13'Please make sure RemObjects SDK is installed properly.');
+  result := IncludeTrailingPathDelimiter(result)+'Bin\ROServiceTester.exe';
+  if not FileExists(result) then
+    raise Exception.CreateFmt('Cannot find ServiceTester at "%s".'#13#13'Please make sure RemObjects SDK is installed properly.', [result]);}
+  result := IncludeTrailingPathDelimiter(ExtractFilePath(GetServiceBuilderPath()))+'ROServiceTester.exe';
+  if not FileExists(result) then
+    raise Exception.CreateFmt('Cannot find ServiceTester at "%s".'#13#13'Please make sure RemObjects SDK is installed properly.', [result]);
+end;
+
+
+function ExecuteAndWait(const aApp, aCmdLine:string; aWait:boolean=true):dword;
+var
+  lProcess: TProcess;
+  lApp: string;
+begin
+  lProcess:= TProcess.Create(nil);
+  try
+    lApp := aApp;
+    {$IFDEF MSWINDOWS}
+    if ExtractFileExt(aApp) = '' then lApp := ChangeFileExt(lApp,'.exe');
+    {$ENDIF}
+    lApp := FindDefaultExecutablePath(lApp);
+    if (pos(' ', lApp)>0) and (Length(lApp)>0) and (lApp[1] <> '"') then
+      lApp := '"'+lApp+'"';
+    lProcess.CommandLine:=  aApp + ' '+aCmdLine;
+    if aWait then
+      lProcess.Options := lProcess.Options + [poWaitOnExit]
+    else
+      lProcess.Options := lProcess.Options - [poWaitOnExit];
+    lProcess.Execute;
+  finally
+    lProcess.Free;
+  end;
+end;
+(*
+{----------------------------------------------------------------------------}
+// Taken from eFiles.pas from the eLibrary 6.0
+function ExecuteAndWait(const aApp, aCmdLine:string; aWait:boolean=true):dword;
+var StartupInfo:TStartupInfo;
+    ProcessInfo:TProcessInformation;
+    lApp:string;
+    s:array[0..MAX_PATH] of char;
+begin
+  FillChar(Startupinfo, sizeOf(Startupinfo),0);
+  GetStartupInfo(Startupinfo);
+
+  ExpandEnvironmentStrings(pChar(aApp),@s,MAX_PATH);
+  lApp := string(pChar(@s));
+
+  if CreateProcess(pChar(lApp),
+                   pChar('"'+lApp+'" '+aCmdLine),
+                   nil,nil,false,0,nil,
+                   pChar(GetCurrentDir),
+                   StartupInfo,
+                   ProcessInfo) then begin
+    CloseHandle(ProcessInfo.hThread);
+
+    if aWait then begin
+    { Wait till app terminates, but don't block main thread. }
+    while WaitForSingleObject(ProcessInfo.hProcess,100) = WAIT_TIMEOUT do
+      Application.ProcessMessages();
+    GetExitCodeProcess(ProcessInfo.hProcess,result);
+    end;
+    CloseHandle(ProcessInfo.hProcess);
+  end
+  else raise Exception.CreateFmt('could not create process %s %s: %d',[lApp,CmdLine,GetLastError]);
+end;
+*)
+procedure LaunchServiceBuilder(const aProjectName, aParams: string; aWait:boolean=false);
+var
+  lExeName: string;
+begin
+  lExeName := GetServiceBuilderPath();
+
+  if aWait then begin
+    ExecuteAndWait(lExename, aParams);
+  end
+  else begin
+    RO_ShellExecute(0, 'open', PChar(lExeName), PChar(aParams), PChar(ExtractFilePath(aProjectName)), SW_NORMAL);
+  end;
+end;
+
+procedure LaunchServiceTester;
+var
+  lExeName: string;
+begin
+  lExeName := GetServiceTesterPath();
+  RO_ShellExecute(0, 'open', PChar(lExeName), nil, nil, SW_NORMAL);
+end;
+
+procedure LaunchServiceBuilderForCurrentProject(const aAdditionalParameters:string; aOnlyLaunchForROServer:boolean=false; aWait:boolean=false);
+var prj : TLazProject;
+    fname,
+    lParams,
+    src: string;
+begin
+  // TODO: Clean up these hardcoded things
+  prj := CurrentProject;
+
+  if Assigned(prj) then begin
+    src := ReadModuleSource(prj.MainFile);
+    fname := ModuleDir(prj)+ExtractRODLFileName(src);
+
+    if (ExtractFileName(fname)<>'') then begin
+      {$IFDEF SB2}
+      lParams := Format('/rodlfile:"%s" /projectname:"%s" /autosave '+aAdditionalParameters, [fname, ExtractFileName(prj.FileName)])
+      {$ELSE}
+      lParams := Format('"%s" /ns /projectname:"%s" /autosave '+aAdditionalParameters, [fname, ExtractFileName(prj.MainFile.Filename)])
+      {$ENDIF}
+    end
+    else begin
+      if aOnlyLaunchForROServer then
+        RaiseError('The current project is not a RemObjects Server');
+      lParams := '/ns '+aAdditionalParameters;
+    end;
+    LaunchServiceBuilder(prj.MainFile.Filename, lParams, aWait);
+    GenerateRESFromRODL(fname,nil)
+  end
+  else begin
+    if aOnlyLaunchForROServer then
+      RaiseError('The current project is not a RemObjects Server');
+    LaunchServiceBuilder('', '/ns')
+  end;
+end;
+
+function GenerateRESFromRODL(const RODLFileName: string; aMessageList: TIDEMessageList): boolean;
+var {outname, }
+  lAttributes: Integer;
+  resname {, pars}: string;
+    //res : integer;
+  resdata, rodldata: TFileStream;
+  lrsdata: TFileStream;
+begin
+  rodldata := nil;
+  resdata := nil;
+
+  result := false;
+  try
+    try
+      resname := IncludeTrailingPathDelimiter(ExtractFilePath(RODLFileName)) + res_RODLFile + '.res';
+
+      {$IFDEF MSWINDOWS}
+      if FileExists(resname) then begin
+        lAttributes := FileGetAttr(resname);
+        if (lAttributes and faReadOnly) = faReadOnly then begin
+          case MessageDlg(Format('%s is readonly, overwrite anyway?',[ExtractFileName(resname)]),
+                        mtConfirmation, [mbYes, mbCancel, mbIgnore], 0) of
+            mrCancel: Abort();
+            mrIgnore: begin
+                result := true;
+                exit;
+              end;
+            mrYes: FileSetAttr(resname, lAttributes xor faReadOnly);
+          end;
+        end;
+      end;
+      {$ENDIF}
+
+      resdata := TFileStream.Create(resname, fmCreate);
+      lrsdata := TFileStream.Create(IncludeTrailingPathDelimiter(ExtractFilePath(RODLFileName)) + res_RODLFile + '.lrs', fmCreate);
+      rodldata := TFileStream.Create(RODLFileName, fmOpenRead + fmShareDenyNone);
+
+      rodldata.Position := 0;
+      BinaryToLazarusResourceCode(rodldata,lrsdata,res_RODLFile,'RODL');
+
+      rodldata.Position := 0;
+      WriteRES(rodldata, resdata, res_RODLFile);
+
+      result := FileExists(resname);
+    except
+      on E: EAbort do raise;
+      on E: Exception do begin
+        MessageDlg('The following error occourred while trying to generate the resource file.'#13 +
+          E.Message, mtError, [mbOK], 0);
+        result := FALSE;
+      end;
+    end;
+  finally
+    rodldata.Free;
+    resdata.Free;
+    lrsdata.Free;
+  end;
+{  try
+    // Creates an rc file called RODLFile.rc and saves it where the RODL file is located
+    outname := IncludeTrailingPathDelimiter(ExtractFilePath(RODLFileName))+res_RODLFile+'.rc';
+
+    with TStringList.Create do try
+      Add(Format('%s RCDATA "%s"', [res_RODLFile, RODLFileName]));
+      SaveToFile(outname);
+    finally
+      Free;
+    end;
+
+    resname := ChangeFileExt(outname, '.RES');
+    DeleteFile(resname);
+
+    if FileExists(resname) then begin
+      aMessageList.Add(mError,'The file '+resname+' could not be deleted');
+    end;
+
+    pars := '"'+outname+'" "'+resname+'"';
+    res := RO_ShellExecute(0, 'open', 'BRCC32', PChar(pars), NIL, SW_HIDE);
+    aMessageList.Add(mInfo, 'BRCC32 '+pars);
+
+    if (res<=32) then begin
+      aMessageList.Add(mError,Format('ShellExecute returned %s', [res]));
+      result := FALSE;
+    end
+    else result := TRUE;
+  except
+    on E:Exception do begin
+      MessageDlg('The following error occourred while trying to generate the resource file.'#13+
+                 E.Message, mtError, [mbOK], 0);
+      result := FALSE;
+    end;
+  end;}
+end;
+
+procedure CompileProject;
+begin
+  LazarusIDE.DoSaveProject([sfProjectSaving]);
+  LazarusIDE.DoBuildProject(crCompile,[]);
+end;
+
+
+function GetDllPath: String;
+{$IFDEF MSWINDOWS}
+var
+  TheFileName : array[0..MAX_PATH] of char;
+{$ENDIF}
+begin
+{$IFDEF MSWINDOWS}
+  FillChar(TheFileName, SizeOf(TheFileName), #0);
+  GetModuleFileName(hInstance, TheFileName, sizeof(TheFileName));
+  Result := ExtractFilePath(TheFileName);
+{$ELSE}
+  Result := '';
+{$ENDIF}
+end;
+
+function GetTemplateDir: string;
+begin
+  result := ReadRegistryValue(HKEY_CURRENT_USER,'Software\RemObjects\RemObjects SDK for Delphi','InstallDir','');
+  Result := IncludeTrailingPathDelimiter(IncludeTrailingPathDelimiter(Result) + 'Templates');
+(*
+  //ToDo: use a more reliable way to find templates; possibly using the same technique as GetServiceBuilderPath()
+  // This function strips the "DCU\Dx" part of the path where the BPL is
+  result := ExtractFilePath(GetDllPath);
+  {$IFDEF DELPHI10UP}
+  result := IncludeTrailingPathDelimiter(Copy(result,1,Length(result)-8))+{$IFDEF KYLIX}'Templates/'{$ELSE}'Templates\'{$ENDIF};
+  {$ELSE}
+  result := IncludeTrailingPathDelimiter(Copy(result,1,Length(result)-7))+{$IFDEF KYLIX}'Templates/'{$ELSE}'Templates\'{$ENDIF};
+  {$ENDIF}
+*)
+end;
+
+function GetBinDir: string;
+begin
+  // TODO: Fix this adding a registry key.
+
+  // This function strips the "DCU\Dx" part of the path where the BPL is
+  result := ExtractFilePath(GetDllPath);
+  result := IncludeTrailingPathDelimiter(Copy(result,1,Length(result)-7))+'Bin\';
+end;
+
+function GetTemplateConfigFileName : string;
+begin
+  result := GetTemplateDir+'Config.ini';
+end;
+
+function GetTemplateOptionsFileName : string;
+begin
+  result := GetTemplateDir+'TemplateOptions.ini';
+end;
+
+end.
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROLoginNeededForm.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROLoginNeededForm.dfm
new file mode 100644
index 0000000..2a5363d
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROLoginNeededForm.dfm	
@@ -0,0 +1,900 @@
+object ROLoginNeededForm: TROLoginNeededForm
+  Left = 307
+  Top = 304
+  AutoScroll = False
+  Caption = 'RemObjects SDK Session Required'
+  ClientHeight = 266
+  ClientWidth = 417
+  Color = clBtnFace
+  Constraints.MinHeight = 300
+  Constraints.MinWidth = 425
+  ParentFont = True
+  Icon.Data = {
+    0000010006003030000001000800A80E0000660000002020000001000800A808
+    00000E0F0000101000000100080068050000B61700003030000001002000A825
+    00001E1D00002020000001002000A8100000C642000010100000010020006804
+    00006E5300002800000030000000600000000100080000000000000900000000
+    0000000000000001000000010000000000000505050006060F00090909000E0E
+    0E000C0C160007071A0008081B001111110015151500191919001D1D1D000505
+    2200111125001A1B25001C1D270014152900181A2E000B0B31000B0B3B001316
+    3F00191C3C001F202B002121210024242400292929002D2D2D0025273200282A
+    360021243A002F313D003131310035353500393939003D3D3D00060649000909
+    4C00161A430014194D00050552000C0D52000909560003035A00090A58000A0C
+    5B000B0E5E000D115800181E540014195900161D5E001C2040002E344D00393C
+    49002E375C00343A5400363C55000303630005056F000E14660012186200131C
+    690010196F0005057A0001017E0005077E000C157F000F1A7C00121D75001923
+    660015206E001B266B001C286E00172373001E2B730014217A00192779001B2B
+    7E002934660023306D002C386A00323C61002432700022337E00333F70003640
+    6400384165003C4568003A467400404040004545450040444F00494949004D4D
+    4D00474A560041475E004B4E5900515151005454540052555F00595959005D5D
+    5D00454B610040496B005B5E670052586B0045517B00535C78005E616A005D62
+    740057607B005D657F00616161006565650062656D00696969006D6D6D007070
+    700074747400797979007F7F7F00060E8800091285000E1D8D00101E82000000
+    90000102940000009A0000019C0006139C0009199D001728860012228800152C
+    980020348C002C3F8800203A9D00233C9E000003A1000005A500010AA300010C
+    A7000007A900010EAB000009AD000412A6000618A700000BB100000DB5000213
+    B400071EB200041AB5000010B9000216B9000012BE00041CB9000B21AB001431
+    AD001A37A9000B27B6000C27B600102CB2001737B5001132BC001234BF00223E
+    AB002E4189002D4395002E4AAF00354EA5003E56A8002645B9003251BC004D59
+    800047568800535F84005E6781005D688A004159AA00455DAB00405DBF004860
+    AC00566AA7004E68B900536DBA000014C2000016C600021BC3000018CA00021D
+    C800001ACE00001CD200001ED7000926C1000624C8000E33CB00183BC200173D
+    CF000223D4000A2FD0000020DB000022DF00062CD8000027E7000029EB00032D
+    E800002BEF000332EF00103DE700002DF400002FF8000A39F3000D3CF3000031
+    FC000134FE000436FF000739FF000A3CFF000D3FFF00103FF3001740DB002042
+    C400284AC600254AD100254DDD003054D3001642E7001645F3001042FF001345
+    FF001647FF00194AFF001C4DFF001F50FF002E58E9002354FF002C5CFF003D69
+    F4003362FF003867FF003C6BFF004260C0004D6DCD00446AE0004C72E1004B73
+    EB00436FF5004974F5004271FF008181810086868600898989008F8F8F009393
+    93009A9A9A00A2A2A200AAAAAA00000000000000000000000000000000000000
+    00735C080804040404596F000000000000000000000000000000000000000000
+    0000000000000000000000000077210A0A080A08080804040400040000187400
+    000000000000000000000000000000000000000000000000000000730A180A0A
+    0A0A0A080808080404040404000400006F000000000000000000000000000000
+    0000000000000000007719181818180A180A0A0A0A0808080404000404000000
+    000074000000000000000000000000000000000000000000211919181818180A
+    0A0F142E2D2D2D29241205040004040000000018000000000000000000000000
+    00000000000000191919191918181818180F3A8F8D8A89897D897D3F24060004
+    0000000000000000000000000000000000000000007720202019191919181818
+    0A1825928F8D8A89897D89897D8938060400000000006F000000000000000000
+    0000000077202019201920191919181818183092928F8A8A89897D7D897D897D
+    2A0204000000006F000000000000000000000000212020202020191919191918
+    18183D9792928F8D8A8989897D897D89893F0601000000000000000000000000
+    0000002121212020201920201919191918182F999992928F8A8A897D897D897D
+    7D897C0C01000000000000000000000000005C21212121202020201920191919
+    191818319990793A8B8D8A8A7D897D897D7D897C0C0400000018000000000000
+    00FA59215921212120202020192019191919181818180A183A8F8D8A8A7D897D
+    897D7D897C060000000074000000000000595959212121212121202020201920
+    191919181818180A0F8B8F8D8A8A7D897D897D7D893F02040000000000000000
+    745959215959212121212020201920192019191918181818158F928F8D8A8A7D
+    897D897D897D2A000400006F000000005C595959592159592121212020202019
+    1920191919181815949992928F8D8A8A7D897D897D897D0600000000000000FD
+    5C595C595959212154A1C2A2522020202019191919191D98B8999992928F8D8A
+    8A7D897D7D897D38040104007400006F5C5C5959595959A5D7D6D6D6D19C2020
+    2019201919191BBDB9B8999992928F8D8A8A7D897D897D890603000418000060
+    5C5C5C595C595ADAD8D7D6D6D1D152202020192019191998BDB999999992928F
+    8D8A8A897D7D897D27040000000000605C5C5C5C595957E3D8D8D6D6D6D1A220
+    20202019201F1948B9B9B9B8999992928F8D8A3F2939897D3F0404040000FA60
+    60605C5C5C5957E3E3D9D8D6D6D6C2212020202019201919194695B8B8998092
+    928F8A100808897D89020404046F74606060605C5C5C66E6E3E3D9D8D7D69D21
+    21202020201920191A194ABD913218419292780A0A093E897D12040004596363
+    606060605C5C5CDEE5E3E3D9D8D237212121202020201920191982BD7A181818
+    3B260F0A0A09297C891202080404636363606060605C5C5DDEE5E3E3DA532159
+    212121202020201A20199BBE98191818170F0A0F0A0A09090D08080804036363
+    6363606060605C5C5C665757595959212121212120204E849EC5C7BEBE1B1818
+    1817170B0A0B09090909080804046363636363606060605C5C5C5B5959595959
+    592121212120C9CBCA9FC1C74619191818181717170A17090909090808046F63
+    63636363606060605C5C5C5B59595921592159212185D1CBA020192019191919
+    1818181717170917090A090808086F6F6363636363606060605C5C5B5C595959
+    595921212153D1D14E20201920191919191818181717170B0A0B09090808776F
+    6F6F63636363606060605C5C5B5B5959592159592121A2D6C633202019201919
+    191B45433C170A170B0A0A0A0960FC6F6F636F63636363606060605C5C5C5B59
+    59595921592137D1D1CA332020192019199EBDBBB8991617170A0A0A096F006F
+    6F6F636F63636363606060605C5C5B5C59565A59592154D6D6D14D2020201A20
+    46BFBEBDBDB9421717170A170900006F6F6F6F6F6363636363606060605C5C5E
+    DDE3E2A65954D2D6D6CB35202020201982C7BFBEBDBD81171717170917000077
+    6F736F6F6F63636DB2AE626060605CA8E6E6E6E3E1DAD8D68734212120202020
+    49CABFBEBEBD7B1818171717200000FF736F6F6F6F6F6DECEEEEB360606060AB
+    E8E6E6E6E3E3D8C4215921212120202020C0C7C7BEBD1B181817171777000000
+    6F736F6F6F6BF5EFEFEEEE68606060E0E8E8E8E6E5E3E3D95921582121212020
+    201E4C824C1F1B191818181700000000FC6F736F6FB5F7F7EFEFEEF06362ADE9
+    EBE8E8E6E6E6E3E3DBA488372121212020202019191919191918187000000000
+    007373736F71F3F7F7EFEFEEEEEEEBEBEBE8E8E8E8E6E5E3E3D9D8C358212121
+    2020202020191F19191918000000000000FE736F736FAFF6F7F7EFEFEEEEEBEB
+    EBEBEBE8E8E6E6E6E3E3D9CF5821212121202020201F191F1919770000000000
+    00007473737070AFF6F7F7EFEFEEEEEEEBEBEBE8E8E8E8E6E5E3E3A559585921
+    2121202020201A1F1921000000000000000000737370736FB0F6F7F7EFEFEEEE
+    EBEBEBEBEBE8E8E6E6E6DA5958213437212121202020201A1F00000000000000
+    0000000073736F7370AFF4F7F7EFEFEEEEEEEBEBEBE8E8E8E8E6E6AA5AA5DAD7
+    8821212120202020000000000000000000000000FE737370726F72B7F7F7EFEF
+    EEEEEBEBEBEBEBE8E8E6E6E3E2E3D9D888212121212020770000000000000000
+    0000000000FE73737072716F6DF1F7EFEFEEEEEEEBEBEBE8E8E8E8E6E6E3DC56
+    595921212121770000000000000000000000000000000073736F736F706F6CB6
+    F2EFEEEEEBEBEBEBEBE8E8DFA75E595921595921210000000000000000000000
+    0000000000000000747370736F6F6F6F6367AEB2B4B2B2A9A9695F5C5C5C5959
+    59592160000000000000000000000000000000000000000000FE736F73706F6F
+    6F6F6363636260606060605C5C5B5C595959FA00000000000000000000000000
+    0000000000000000000000FC70736F706F6F6F63636363636060605C5C5C5B5C
+    7400000000000000000000000000000000000000000000000000000000FF7470
+    6F6F6F6F6463636363606060606FFD0000000000000000000000000000000000
+    0000000000000000000000000000000000FC776F6F6F63636376FA0000000000
+    0000000000000000000000000000FFFFE007FFFF0000FFFE00007FFF0000FFF8
+    00001FFF0000FFE0000007FF0000FFC0000003FF0000FF80000001FF0000FE00
+    0000007F0000FC000000003F0000FC000000003F0000F8000000001F0000F000
+    0000000F0000E000000000070000E000000000070000C000000000030000C000
+    0000000300008000000000010000800000000001000080000000000100008000
+    0000000100000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000080000000000100008000
+    00000001000080000000000100008000000000010000C000000000030000C000
+    000000030000E000000000070000E000000000070000F0000000000F0000F800
+    0000001F0000FC000000003F0000FC000000003F0000FE000000007F0000FF80
+    000001FF0000FFC0000003FF0000FFE0000007FF0000FFF800001FFF0000FFFE
+    00007FFF0000FFFFE007FFFF0000280000002000000040000000010008000000
+    0000000400000000000000000000000100000001000000000000060606000505
+    0F00090909000D0D0D0010101000161616001A1A1A001D1D1D00040421001616
+    20001D1E2800181A2F000707370005053E00101037001B1D32001F202B002121
+    2100252525002A2A2A002E2E2E0026283300282A350031313100353535003939
+    39003D3D3D000D0E4800171B4500151A4E00181D490010155D00151B5B00151B
+    5C001D2141001C245D00262940002126480023294B0031374F00393C48003C3F
+    4B002B335900333952000404650005066F0008096A000E14660001017500090F
+    750004047800121F790015206E001E2C73001A287A00232F6C0029356800323B
+    6100343E630024327000283776002E3D7B003E445B003A4675003D4977004040
+    400044444400494949004E4E4E0042455100484B570051515100555555005959
+    59005D5D5D00434C6D005B5E67006060600066666600696969006C6C6C006167
+    780070707000757575007E7E7E0001018700010188000C188300000090000000
+    9A0000029F000B1D970008199C00172A8A00182A89000F2091001D369B001F39
+    9E000005A5000009AB000411A4000618A6000A1FA700000CB100000FB8000213
+    B400071EB1000216BA000012BE00132FAA000B24B1000C27B6001131BB00233F
+    AB00374A8D002A4094002D439500344A99002D46A3003851A7003C54A8002443
+    B8002F4DBC00485A950055669C0060688200566AA7000015C4000018CA00001B
+    D000001ED7000520C1000E33CB001538C200183BC300153BCE000022DD00062F
+    DE000028E900032FEA00123EE700002BF000002EF6000332F0000A3AF2000F3E
+    F3000032FC000336FE00073AFF000C3EFF00224ADD00385FDF003C62DF001442
+    F3001847F3001042FF001547FF001A4BFF001E4FFF00204AE8002853E9002354
+    FF002758FF002C5CFF003A63EA003E67EA003C68F4003161FF003565FF003A69
+    FF003F6EFF004A67C200496EE1004C72E1004570F5004974F5004372FF008A8A
+    8A008E8E8E009090900000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    000048130505040413480000000000000000000000000000000000000000004A
+    0808080505050504040400004300000000000000000000000000000000511313
+    130808080805050504040400000048000000000000000000000000001B141413
+    1313082064645B5A572D0D040400000500000000000000000000001818141414
+    1313131D64645B5B5A5A5A560E000000000000000000000000001B1818181814
+    14131321696864635B5A5A5A5A330200000000000000000000431B1B18181814
+    141413236A6968645B5B5A5A5A5A59090000050000000000531B1B1B1B181818
+    1814141323211030645B5B5A5A5A5A59020000480000000043431B1B1B1B1818
+    181414141313130B68685B5B5A5A5A5A33040000000000534443431B1B181B18
+    1818181414131358696868635B5A5A5A5A0E0000430000444443431B3B879071
+    3A18181414143580696968645B5B5A5A5A570400000000444444444692959494
+    8A181818181424818080696868635B5A5A5A0D0404005548484444409C969594
+    94391A18181417608180696968645B1C335A2D0400434E48484844419C9C9695
+    942C1A1818181814168166216568320A0F5A560404084A4848484844979D9C96
+    871B1B1B1818181425823413111E10080A2F2E0504044A4A4A48484847767775
+    431B1B1A1B183C5E70836713131308080805050505044A4A4A4A484844444443
+    43421B1B1B288E8B5E70261413130B080808080505054E4E4A4A484848484444
+    4343431B1B3D8E6E1815151414131212080808080505514E4A4A4A4A48484844
+    444343421B1B858B3D18181414265C5D230B06080613B24E4E4E4A4A4A484848
+    4444463F431B62948B18181818848181691108080848004E4E4E4E4A4A484848
+    484CA09C7A759594621B181A1589838281231308080000514E4E4E4DA7AA7C48
+    48789F9E9C9C963E1B1B1A18187089836B131312080000B251514EAEABAAA649
+    4878A2A29E9C9C722A1B1B1B18183637171413134A000000514E51ADB1AAAA99
+    99A4A3A29F9E9D9C96881B1A1B1818181714141300000000B4514E52B0B1ABAA
+    A9A9A4A2A29F9E9C9C8D1B1B1B1B18181818144A00000000005351517EB0B1AA
+    AAA9A9A4A3A29F9E9D75422A291B1B1818181B00000000000000514E5152AEB1
+    ABAAA9A9A4A2A29F9E9B7592913A1A1B181800000000000000000051514E4E7F
+    B0AAAAA9A9A4A3A29E9E9D9A741B1B1B1B00000000000000000000005351514E
+    4E7DACA6A9A9A4A3A17B734343431B4300000000000000000000000000B45151
+    4E4E4E4A4A4A48484844444443435300000000000000000000000000000000B2
+    51514E4E4E4A4A4A484848445500000000000000000000000000000000000000
+    0000B2514E4A4A4A4E55000000000000000000000000FFF00FFFFF8001FFFE00
+    007FFC00003FF800001FF000000FE0000007C0000003C0000003800000018000
+    0001800000010000000000000000000000000000000000000000000000000000
+    000000000000800000018000000180000001C0000003C0000003E0000007F000
+    000FF800001FFC00003FFE00007FFF8001FFFFF00FFF28000000100000002000
+    0000010008000000000000010000000000000000000000010000000100000000
+    00000404040003030D00090909000E0E0E0007071A0012121200181818001D1D
+    1D001B1C26000E0E350012133A00171A39001C1F3F0022222200272727002C2C
+    2C0025263100292B370031313100363636003B3B3B003F3F3F0007074A001A1E
+    490008095700262A4200373A47003C3F4B0021285600242E5E0030395F000202
+    63000B0F60000A0E6800121B680001017E00172266001E2862001F2C7300353E
+    63002433710021327D003E445B003D4A77004141410044444400494949004F4F
+    4F00414450005353530054545400595959005E5E5E00434A60004F5569005C5F
+    680043507B005F65770062626200686868006669710073737300040482000710
+    8C000B178D000E1E8E0000009A0000019C00192B8A000006A7000A1CA2000415
+    AC00071CAC00000CB3000013BF000822B800203DAA003B519C003C5ABE004058
+    AA00475FAC004860AB005065A500556CB1000019CC00001FD8001335C000123B
+    DB00032CE5000F3BE7000433F0000133FC00083BFF001E43D000294AC7003F63
+    D4001843E7001844E7001543F3001243FF001B4CFF002454FF002D5DFF003666
+    FF005070CF004D73E200406EFF00858585009696960000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000003B070604043200000000000000003B0F0F0C21191705002D0000000000
+    2D13100F184A4643432002060000003B1513131011414046434324022D00002D
+    2D151513100F184A4643432000006C2F31585C291310474B4A4643430532322F
+    39645D5713131D49484A223F17043432305F5E2815151E4C250D090B0A043434
+    32322F2D2D1F59271A0F0F0707063B3B3432322F2B155B2A1326552307076D3B
+    3852373965625A1F134556420F3B003C546B604F6665634D15151E120F00006C
+    3D6A6B68676665611C1B1313320000003E3D696B68676665614D152D00000000
+    006C3C3A5352524E362D3B00000000000000006D3B3434326C0000000000F81F
+    0000E0070000C003000080010000800100000000000000000000000000000000
+    000000000000000000008001000080010000C0030000E0070000F81F00002800
+    0000300000006000000001002000000000008025000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    000000000000000000001919192F1717176F1616169F141414BF121212FF1010
+    10FF0F0F0FFF0D0D0DFF0B0B0BFF0A0A0AFF080808BF0707079F0505056F0404
+    042F000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000002020
+    201F1E1E1E8F1C1C1CDF1A1A1AFF191919FF171717FF151515FF141414FF1212
+    12FF101010FF0F0F0FFF0D0D0DFF0B0B0BFF0A0A0AFF080808FF060606FF0505
+    05FF030303DF0202028F0101011F000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    000000000000000000000000000000000000000000002424242F232323AF2121
+    21FF1F1F1FFF1E1E1EFF1C1C1CFF1A1A1AFF191919FF171717FF151515FF1414
+    14FF121212FF101010FF0F0F0FFF0D0D0DFF0B0B0BFF0A0A0AFF080808FF0606
+    06FF050505FF030303FF010101FF0000009F0000001F00000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    00000000000000000000000000002A2A2A0F2828288F262626FF242424FF2323
+    23FF212121FF1F1F1FFF1E1E1EFF1C1C1CFF1A1A1AFF191919FF171717FF1515
+    15FF141414FF121212FF101010FF0F0F0FFF0D0D0DFF0B0B0BFF0A0A0AFF0808
+    08FF060606FF050505FF030303FF010101FF000000FF0000008F0000000F0000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    000000000000000000002D2D2D3F2B2B2BEF292929FF282828FF262626FF2424
+    24FF232323FF212121FF1F1F1FFF1E1E1EFF1A1B25FF13163FFF0D1158FF0B0E
+    5EFF0A0C5BFF090A58FF090956FF09094CFF0B0B31FF0C0C16FF0B0B0BFF0A0A
+    0AFF080808FF060606FF050505FF030303FF010101FF000000FF000000DF0000
+    003F000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000003030306F2E2E2EFF2D2D2DFF2B2B2BFF292929FF282828FF2626
+    26FF242424FF232323FF212121FF1F1F1FFF1C1D27FF0E1466FF0009ADFF0007
+    A9FF0005A5FF0003A1FF00019CFF00009AFF00009AFF00009AFF02027FFF0606
+    49FF08081BFF080808FF060606FF050505FF030303FF010101FF000000FF0000
+    00FF0000005F0000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    00003333339F323232FF303030FF2E2E2EFF2D2D2DFF2B2B2BFF292929FF2828
+    28FF262626FF242424FF232323FF212121FF1F1F1FFF161A43FF000BB1FF0009
+    ADFF0007A9FF0005A5FF0003A1FF00019CFF00009AFF00009AFF00009AFF0000
+    9AFF00009AFF030363FF07071AFF060606FF050505FF030303FF010101FF0000
+    00FF000000FF0000009F00000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000003737
+    379F353535FF333333FF323232FF303030FF2E2E2EFF2D2D2DFF2B2B2BFF2929
+    29FF282828FF262626FF242424FF232323FF212121FF141959FF000DB5FF000B
+    B1FF0009ADFF0007A9FF0005A5FF0003A1FF00019CFF00009AFF00009AFF0000
+    9AFF00009AFF00009AFF00009AFF03035AFF06060FFF050505FF030303FF0101
+    01FF000000FF000000FF0000009F000000000000000000000000000000000000
+    00000000000000000000000000000000000000000000000000003A3A3A6F3838
+    38FF373737FF353535FF333333FF323232FF303030FF2E2E2EFF2D2D2DFF2B2B
+    2BFF292929FF282828FF262626FF242424FF232323FF10196FFF0010B9FF000D
+    B5FF000BB1FF0009ADFF0007A9FF0005A5FF0003A1FF00019CFF00009AFF0000
+    9AFF00009AFF00009AFF00009AFF00009AFF01017EFF050522FF050505FF0303
+    03FF010101FF000000FF000000FF0000005F0000000000000000000000000000
+    000000000000000000000000000000000000000000003D3D3D3F3B3B3BFF3A3A
+    3AFF383838FF373737FF353535FF333333FF323232FF303030FF2E2E2EFF2D2D
+    2DFF2B2B2BFF292929FF282828FF262626FF242424FF181E54FF0012BEFF0010
+    B9FF000DB5FF000BB1FF0009ADFF0007A9FF0005A5FF0003A1FF00019CFF0000
+    9AFF00009AFF00009AFF00009AFF00009AFF00009AFF000090FF050522FF0505
+    05FF030303FF010101FF000000FF000000FF0000003F00000000000000000000
+    0000000000000000000000000000000000004141410F3F3F3FEF3D3D3DFF3B3B
+    3BFF3A3A3AFF383838FF373737FF353535FF333333FF323232FF303030FF2E2E
+    2EFF2D2D2DFF2B2B2BFF292929FF282828FF262626FF242424FF161D5EFF0012
+    BEFF0412A6FF091285FF0E1466FF010AA3FF0007A9FF0005A5FF0003A1FF0001
+    9CFF00009AFF00009AFF00009AFF00009AFF00009AFF00009AFF000090FF0505
+    22FF050505FF030303FF010101FF000000FF000000DF0000000F000000000000
+    0000000000000000000000000000000000004242429F404040FF3F3F3FFF3D3D
+    3DFF3B3B3BFF3A3A3AFF383838FF373737FF353535FF333333FF323232FF3030
+    30FF2E2E2EFF2D2D2DFF2B2B2BFF292929FF282828FF262626FF242424FF2323
+    23FF212121FF1F1F1FFF1E1E1EFF0E1466FF0009ADFF0007A9FF0005A5FF0003
+    A1FF00019CFF00009AFF00009AFF00009AFF00009AFF00009AFF00009AFF0000
+    90FF050522FF050505FF030303FF010101FF000000FF0000008F000000000000
+    00000000000000000000000000004545452F444444FF424242FF404040FF3F3F
+    3FFF3D3D3DFF3B3B3BFF3A3A3AFF383838FF373737FF353535FF333333FF3232
+    32FF303030FF2E2E2EFF2D2D2DFF2B2B2BFF292929FF282828FF262626FF2424
+    24FF232323FF212121FF1F1F1FFF1C1D27FF010CA7FF0009ADFF0007A9FF0005
+    A5FF0003A1FF00019CFF00009AFF00009AFF00009AFF00009AFF00009AFF0000
+    9AFF01017EFF06060FFF050505FF030303FF010101FF000000FF0000001F0000
+    0000000000000000000000000000474747BF454545FF444444FF424242FF4040
+    40FF3F3F3FFF3D3D3DFF3B3B3BFF3A3A3AFF383838FF373737FF353535FF3333
+    33FF323232FF303030FF2E2E2EFF2D2D2DFF2B2B2BFF292929FF282828FF2626
+    26FF242424FF232323FF212121FF191C3CFF010EABFF000BB1FF0009ADFF0007
+    A9FF0005A5FF0003A1FF00019CFF00009AFF00009AFF00009AFF00009AFF0000
+    9AFF00009AFF03035AFF060606FF050505FF030303FF010101FF0000009F0000
+    000000000000000000004A4A4A1F494949FF474747FF454545FF444444FF4242
+    42FF404040FF3F3F3FFF3D3D3DFF3B3B3BFF3A3A3AFF383838FF373737FF3535
+    35FF333333FF323232FF303030FF2E2E2EFF2D2D2DFF2B2B2BFF292929FF2828
+    28FF262626FF242424FF1C2040FF0213B4FF0010B9FF000DB5FF000BB1FF0009
+    ADFF0007A9FF0005A5FF0003A1FF00019CFF00009AFF00009AFF00009AFF0000
+    9AFF00009AFF00009AFF07071AFF060606FF050505FF030303FF010101FF0101
+    011F00000000000000004C4C4C8F4A4A4AFF494949FF474747FF454545FF4444
+    44FF424242FF404040FF3F3F3FFF323C61FF1737B5FF0E33CBFF1132BCFF2233
+    7EFF353535FF333333FF323232FF303030FF2E2E2EFF2D2D2DFF2B2B2BFF2929
+    29FF282828FF21243AFF0217BBFF0014C2FF0012BEFF0010B9FF000DB5FF000B
+    B1FF0009ADFF0007A9FF0005A5FF0003A1FF00019CFF00009AFF00009AFF0000
+    9AFF00009AFF00009AFF030363FF080808FF060606FF050505FF030303FF0202
+    028F00000000000000004E4E4EDF4C4C4CFF4A4A4AFF494949FF474747FF4545
+    45FF444444FF424242FF2C3F88FF0739FFFF0436FFFF0134FEFF0031FCFF002F
+    F8FF1431ADFF353535FF333333FF323232FF303030FF2E2E2EFF2D2D2DFF2B2B
+    2BFF292929FF252732FF0018CAFF0016C6FF0014C2FF0012BEFF0010B9FF000D
+    B5FF000BB1FF0009ADFF0007A9FF0005A5FF0003A1FF00019CFF00009AFF0000
+    9AFF00009AFF00009AFF00009AFF08081BFF080808FF060606FF050505FF0303
+    03DF000000005151512F4F4F4FFF4E4E4EFF4C4C4CFF4A4A4AFF494949FF4747
+    47FF454545FF40444FFF103FF3FF0A3CFFFF0739FFFF0436FFFF0134FEFF0031
+    FCFF002FF8FF22337EFF353535FF333333FF323232FF303030FF2E2E2EFF2D2D
+    2DFF2B2B2BFF292929FF051CB9FF0018CAFF0016C6FF0014C2FF0012BEFF0010
+    B9FF000DB5FF000BB1FF0009ADFF0007A9FF0005A5FF0003A1FF00019CFF0000
+    9AFF00009AFF00009AFF00009AFF050552FF0A0A0AFF080808FF060606FF0505
+    05FF0404042F5252526F515151FF4F4F4FFF4E4E4EFF4C4C4CFF4A4A4AFF4949
+    49FF474747FF394574FF1042FFFF0D3FFFFF0A3CFFFF0739FFFF0436FFFF0134
+    FEFF0031FCFF1132BCFF373737FF353535FF333333FF323232FF303030FF2E2E
+    2EFF2D2D2DFF2B2B2BFF172373FF021BC3FF0018CAFF0016C6FF0014C2FF0012
+    BEFF0010B9FF000DB5FF000BB1FF0009ADFF0007A9FF0005A5FF05077EFF0A0A
+    58FF05056FFF00009AFF00009AFF02027FFF0B0B0BFF0A0A0AFF080808FF0606
+    06FF0505056F545454AF535353FF515151FF4F4F4FFF4E4E4EFF4C4C4CFF4A4A
+    4AFF494949FF3B4775FF1345FFFF1042FFFF0D3FFFFF0A3CFFFF0739FFFF0436
+    FFFF0134FEFF0E33CBFF383838FF373737FF353535FF333333FF323232FF3030
+    30FF2E2E2EFF2D2D2DFF2B2B2BFF292929FF192366FF041AB5FF0016C6FF0014
+    C2FF0012BEFF06139CFF000DB5FF000BB1FF0009ADFF0007A9FF141529FF1515
+    15FF141414FF00009AFF00009AFF00009AFF0C0C16FF0B0B0BFF0A0A0AFF0808
+    08FF0707079F565656CF545454FF535353FF515151FF4F4F4FFF4E4E4EFF4C4C
+    4CFF4A4A4AFF40496BFF1647FFFF1345FFFF1042FFFF0D3FFFFF0A3CFFFF0739
+    FFFF0436FFFF1A37A9FF3A3A3AFF383838FF373737FF353535FF333333FF3232
+    32FF303030FF2E2E2EFF2D2D2DFF2B2B2BFF292929FF14217AFF0018CAFF0618
+    A7FF1C2040FF212121FF0C157FFF000DB5FF000BB1FF060E88FF191919FF1717
+    17FF151515FF05057AFF00009AFF00009AFF0B0B31FF0D0D0DFF0B0B0BFF0A0A
+    0AFF080808BF585858FF565656FF545454FF535353FF515151FF4F4F4FFF4E4E
+    4EFF4C4C4CFF4A4A4AFF254AD1FF1647FFFF1345FFFF1042FFFF0D3FFFFF0A3C
+    FFFF0A39F3FF363C55FF3B3B3BFF3A3A3AFF383838FF373737FF353535FF3333
+    33FF323232FF303030FF2E2E2EFF2D2D2DFF2B2B2BFF122288FF001ACEFF0E1D
+    8DFF242424FF232323FF212121FF121862FF14194DFF181A2EFF1A1A1AFF1919
+    19FF171717FF0C0D52FF010294FF00009AFF0B0B3BFF0F0F0FFF0D0D0DFF0B0B
+    0BFF0A0A0AFF595959FF585858FF565656FF545454FF535353FF515151FF4F4F
+    4FFF4E4E4EFF4C4C4CFF474A56FF254AD1FF1647FFFF1345FFFF1042FFFF103F
+    F3FF333F70FF3F3F3FFF3D3D3DFF3B3B3BFF3A3A3AFF383838FF373737FF3535
+    35FF333333FF323232FF303030FF2E2E2EFF2D2D2DFF0B21ABFF001CD2FF041C
+    B9FF262626FF242424FF232323FF212121FF1F1F1FFF1E1E1EFF1C1C1CFF1A1A
+    1AFF191919FF171717FF151515FF111125FF121212FF101010FF0F0F0FFF0D0D
+    0DFF0B0B0BFF5B5B5BFF595959FF585858FF565656FF545454FF535353FF5151
+    51FF4F4F4FFF4E4E4EFF4C4C4CFF4A4A4AFF40496BFF3B4775FF394574FF4444
+    44FF424242FF404040FF3F3F3FFF3D3D3DFF3B3B3BFF3A3A3AFF383838FF3737
+    37FF353535FF23306DFF152C98FF0B27B6FF0223D4FF0020DBFF001ED7FF001C
+    D2FF252732FF262626FF242424FF232323FF212121FF1F1F1FFF1E1E1EFF1C1C
+    1CFF1A1A1AFF191919FF171717FF151515FF141414FF121212FF101010FF0F0F
+    0FFF0D0D0DFF5D5D5DFF5B5B5BFF595959FF585858FF565656FF545454FF5353
+    53FF515151FF4F4F4FFF4E4E4EFF4C4C4CFF4A4A4AFF494949FF474747FF4545
+    45FF444444FF424242FF404040FF3F3F3FFF3D3D3DFF3B3B3BFF3A3A3AFF3838
+    38FF373737FF062CD8FF0029EBFF0027E7FF0C27B6FF0624C8FF0020DBFF1B26
+    6BFF292929FF282828FF262626FF242424FF232323FF212121FF1F1F1FFF1E1E
+    1EFF1C1C1CFF1A1A1AFF191919FF171717FF151515FF141414FF121212FF1010
+    10FF0F0F0FFF5E5E5EFF5D5D5DFF5B5B5BFF595959FF585858FF565656FF5454
+    54FF535353FF515151FF4F4F4FFF4E4E4EFF4C4C4CFF4A4A4AFF494949FF4747
+    47FF454545FF444444FF424242FF404040FF3F3F3FFF3D3D3DFF3B3B3BFF3A3A
+    3AFF20348CFF002DF4FF002BEFFF102CB2FF323232FF303030FF2E2E2EFF2D2D
+    2DFF2B2B2BFF292929FF282828FF262626FF242424FF232323FF212121FF1F1F
+    1FFF1E1E1EFF1C1C1CFF1A1A1AFF191919FF171717FF151515FF141414FF1212
+    12FF101010FF606060FF5E5E5EFF5D5D5DFF5B5B5BFF595959FF585858FF5656
+    56FF545454FF535353FF515151FF4F4F4FFF4E4E4EFF4C4C4CFF4A4A4AFF4949
+    49FF474747FF454545FF444444FF424242FF404040FF3F3F3FFF3D3D3DFF3B3B
+    3BFF2C386AFF002FF8FF002DF4FF243270FF333333FF323232FF303030FF2E2E
+    2EFF2D2D2DFF2B2B2BFF292929FF282828FF262626FF242424FF232323FF2121
+    21FF1F1F1FFF1E1E1EFF1C1C1CFF1A1A1AFF191919FF171717FF151515FF1414
+    14FF121212FF626262CF606060FF5E5E5EFF5D5D5DFF5B5B5BFF595959FF5858
+    58FF565656FF545454FF535353FF515151FF4F4F4FFF4E4E4EFF4C4C4CFF4A4A
+    4AFF494949FF474747FF454545FF444444FF424242FF404040FF3F3F3FFF3D3D
+    3DFF3B3B3BFF1234BFFF002FF8FF0A2FD0FF2E344DFF333333FF323232FF3030
+    30FF2E2E2EFF2D2D2DFF2B2B2BFF292929FF252732FF15206EFF121D75FF131C
+    69FF1F202BFF1F1F1FFF1E1E1EFF1C1C1CFF1A1A1AFF191919FF171717FF1515
+    15FF141414BF636363AF626262FF606060FF5E5E5EFF5D5D5DFF5B5B5BFF5959
+    59FF585858FF565656FF545454FF535353FF515151FF4F4F4FFF4E4E4EFF4C4C
+    4CFF4A4A4AFF494949FF474747FF454545FF444444FF424242FF404040FF3F3F
+    3FFF3D3D3DFF343A54FF0031FCFF002FF8FF032DE8FF2E344DFF333333FF3232
+    32FF303030FF2E2E2EFF2D2D2DFF2B2B2BFF071EB2FF001ACEFF0018CAFF0016
+    C6FF0215B8FF1F202BFF1F1F1FFF1E1E1EFF1C1C1CFF1A1A1AFF191919FF1717
+    17FF161616AF6565656F636363FF626262FF606060FF5E5E5EFF5D5D5DFF5B5B
+    5BFF595959FF585858FF565656FF545454FF535353FF515151FF4F4F4FFF4E4E
+    4EFF4C4C4CFF4A4A4AFF494949FF474747FF3C4568FF41444FFF424242FF4040
+    40FF3F3F3FFF323C61FF0134FEFF0031FCFF002FF8FF293466FF353535FF3333
+    33FF323232FF303030FF2E2E2EFF1C286EFF001ED7FF001CD2FF001ACEFF0018
+    CAFF0016C6FF0F1A7CFF212121FF1F1F1FFF1E1E1EFF1C1C1CFF1A1A1AFF1919
+    19FF1717176F6666662F656565FF636363FF626262FF606060FF5E5E5EFF5D5D
+    5DFF5B5B5BFF595959FF585858FF565656FF545454FF535353FF515151FF4F4F
+    4FFF4E4E4EFF4C4C4CFF454B61FF284AC6FF1647FFFF1645F3FF2D4395FF4242
+    42FF364064FF0A39F3FF0436FFFF0134FEFF0332EFFF2E375CFF373737FF3535
+    35FF333333FF323232FF303030FF172886FF0020DBFF001ED7FF001CD2FF001A
+    CEFF0018CAFF09199DFF232323FF212121FF1F1F1FFF1E1E1EFF1C1C1CFF1A1A
+    1AFF1919192F00000000676767DF656565FF636363FF626262FF606060FF5E5E
+    5EFF5D5D5DFF5B5B5BFF535C78FF465EABFF4D5980FF52555FFF535353FF5151
+    51FF4F4F4FFF4E4E4EFF354EA5FF1C4DFFFF194AFFFF1647FFFF1345FFFF1642
+    E7FF103FF3FF0A3CFFFF0739FFFF203A9EFF383B48FF3A3A3AFF383838FF3737
+    37FF353535FF333333FF323232FF1E2B73FF0022DFFF0020DBFF001ED7FF001C
+    D2FF001ACEFF101E82FF242424FF232323FF212121FF1F1F1FFF1E1E1EFF1C1C
+    1CDF00000000000000006868688F676767FF656565FF636363FF626262FF6060
+    60FF5E5E5EFF57607BFF3D69F4FF3867FFFF3564FFFF405DBFFF545454FF5353
+    53FF515151FF4F4F4FFF3251BCFF1F50FFFF1C4DFFFF194AFFFF1647FFFF1345
+    FFFF1042FFFF0D3FFFFF173DCFFF3F3F3FFF3D3D3DFF3B3B3BFF3A3A3AFF3838
+    38FF373737FF353535FF333333FF323232FF0926C1FF0022DFFF0020DBFF001E
+    D7FF021DC8FF252732FF262626FF242424FF232323FF212121FF1F1F1FFF1E1E
+    1E8F00000000000000006969691F686868FF676767FF656565FF636363FF6262
+    62FF5E616AFF436FF5FF3E6DFFFF3B6AFFFF3867FFFF3564FFFF52586BFF5454
+    54FF535353FF515151FF3054D3FF2253FFFF1F50FFFF1C4DFFFF194AFFFF1647
+    FFFF1345FFFF1042FFFF0D3FFFFF404040FF3F3F3FFF3D3D3DFF3B3B3BFF3A3A
+    3AFF383838FF373737FF353535FF333333FF2F313DFF1B2B7EFF172886FF1927
+    79FF282A36FF292929FF282828FF262626FF242424FF232323FF212121FF2020
+    201F0000000000000000000000006A6A6ABF686868FF676767FF656565FF6363
+    63FF566AA7FF4473FFFF4170FFFF3E6DFFFF3B6AFFFF3867FFFF4260C0FF5656
+    56FF52555FFF475688FF2E58E9FF2556FFFF2253FFFF1F50FFFF1C4DFFFF194A
+    FFFF1647FFFF1345FFFF1042FFFF1740DBFF223EABFF233C9EFF363C55FF3B3B
+    3BFF3A3A3AFF383838FF373737FF353535FF333333FF323232FF303030FF2E2E
+    2EFF2D2D2DFF2B2B2BFF292929FF282828FF262626FF242424FF232323AF0000
+    00000000000000000000000000006B6B6B3F6A6A6AFF686868FF676767FF6565
+    65FF62656DFF4C72E1FF4473FFFF4170FFFF3E6DFFFF3B6AFFFF3867FFFF3564
+    FFFF3261FFFF2F5FFFFF2C5CFFFF2959FFFF2556FFFF2253FFFF1F50FFFF1C4D
+    FFFF194AFFFF1647FFFF1345FFFF1042FFFF0D3FFFFF0A3CFFFF183BC2FF3D3D
+    3DFF3B3B3BFF3A3A3AFF383838FF373737FF353535FF333333FF323232FF3030
+    30FF2E2E2EFF2D2D2DFF2B2B2BFF292929FF282828FF262626FF2424242F0000
+    0000000000000000000000000000000000006B6B6B9F6A6A6AFF686868FF6767
+    67FF656565FF5E6781FF4974F5FF4473FFFF4170FFFF3E6DFFFF3B6AFFFF3867
+    FFFF3564FFFF3261FFFF2F5FFFFF2C5CFFFF2959FFFF2556FFFF2253FFFF1F50
+    FFFF1C4DFFFF194AFFFF1647FFFF1345FFFF1042FFFF0D3FFFFF103DE7FF3F3F
+    3FFF3D3D3DFF3B3B3BFF3A3A3AFF383838FF373737FF353535FF333333FF3232
+    32FF303030FF2E2E2EFF2D2D2DFF2B2B2BFF292929FF2828289F000000000000
+    0000000000000000000000000000000000006B6B6B0F6B6B6BEF6A6A6AFF6868
+    68FF676767FF656565FF5E6781FF4776FFFF4473FFFF4170FFFF3E6DFFFF3B6A
+    FFFF3867FFFF3564FFFF3261FFFF2F5FFFFF2C5CFFFF2959FFFF2556FFFF2253
+    FFFF1F50FFFF1C4DFFFF194AFFFF1647FFFF1345FFFF1042FFFF2E4189FF4040
+    40FF3F3F3FFF3D3D3DFF3B3B3BFF3A3A3AFF383838FF373737FF353535FF3333
+    33FF323232FF303030FF2E2E2EFF2D2D2DFF2B2B2BEF2A2A2A0F000000000000
+    000000000000000000000000000000000000000000006B6B6B3F6B6B6BFF6A6A
+    6AFF686868FF676767FF656565FF5D688AFF4974F5FF4473FFFF4170FFFF3E6D
+    FFFF3B6AFFFF3867FFFF3564FFFF3261FFFF2F5FFFFF2C5CFFFF2959FFFF2556
+    FFFF2253FFFF1F50FFFF1C4DFFFF194AFFFF1647FFFF1645F3FF444444FF4242
+    42FF404040FF3B3E4BFF363C55FF3B3B3BFF3A3A3AFF383838FF373737FF3535
+    35FF333333FF323232FF303030FF2E2E2EFF2D2D2D3F00000000000000000000
+    00000000000000000000000000000000000000000000000000006B6B6B7F6B6B
+    6BFF6A6A6AFF686868FF676767FF656565FF5E6781FF4B73EBFF4473FFFF4170
+    FFFF3E6DFFFF3B6AFFFF3867FFFF3564FFFF3261FFFF2F5FFFFF2C5CFFFF2959
+    FFFF2556FFFF2253FFFF1F50FFFF1C4DFFFF194AFFFF1647FFFF2645B9FF4144
+    4FFF2E4189FF0D3CF3FF0739FFFF213A9DFF3B3B3BFF3A3A3AFF383838FF3737
+    37FF353535FF333333FF323232FF3030306F0000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000006B6B
+    6B9F6B6B6BFF6A6A6AFF686868FF676767FF656565FF62656DFF536DBAFF4473
+    FFFF4170FFFF3E6DFFFF3B6AFFFF3867FFFF3564FFFF3261FFFF2F5FFFFF2C5C
+    FFFF2959FFFF2556FFFF2253FFFF1F50FFFF1C4DFFFF194AFFFF1647FFFF1645
+    F3FF1042FFFF0D3FFFFF0A3CFFFF233C9FFF3D3D3DFF3B3B3BFF3A3A3AFF3838
+    38FF373737FF353535FF3333339F000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    00006B6B6B9F6B6B6BFF6A6A6AFF686868FF676767FF656565FF636363FF5D65
+    7FFF4D6DCDFF4170FFFF3E6DFFFF3B6AFFFF3867FFFF3564FFFF3261FFFF2F5F
+    FFFF2C5CFFFF2959FFFF2556FFFF2253FFFF1F50FFFF1C4DFFFF194AFFFF1647
+    FFFF1345FFFF2042C4FF384165FF404040FF3F3F3FFF3D3D3DFF3B3B3BFF3A3A
+    3AFF383838FF3737379F00000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000006B6B6B7F6B6B6BFF6A6A6AFF686868FF676767FF656565FF6363
+    63FF626262FF5D6274FF4E68B9FF446AE0FF3B6AFFFF3867FFFF3564FFFF3261
+    FFFF2F5FFFFF2C5CFFFF2959FFFF2556FFFF2253FFFF1F50FFFF254DDDFF2E4A
+    AFFF41475EFF454545FF444444FF424242FF404040FF3F3F3FFF3D3D3DFF3B3B
+    3BFF3A3A3A6F0000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    000000000000000000006B6B6B4F6B6B6BEF6A6A6AFF686868FF676767FF6565
+    65FF636363FF626262FF606060FF5E5E5EFF5B5E67FF535F84FF4860ACFF465E
+    ABFF445CABFF4159AAFF3F57A9FF3D55A8FF45517BFF4B4E59FF4C4C4CFF4A4A
+    4AFF494949FF474747FF454545FF444444FF424242FF404040FF3F3F3FEF3D3D
+    3D3F000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    00000000000000000000000000006B6B6B0F6B6B6B9F6A6A6AFF686868FF6767
+    67FF656565FF636363FF626262FF606060FF5E5E5EFF5D5D5DFF5B5B5BFF5959
+    59FF585858FF565656FF545454FF535353FF515151FF4F4F4FFF4E4E4EFF4C4C
+    4CFF4A4A4AFF494949FF474747FF454545FF444444FF4242429F4141410F0000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    000000000000000000000000000000000000000000006B6B6B3F6A6A6ABF6868
+    68FF676767FF656565FF636363FF626262FF606060FF5E5E5EFF5D5D5DFF5B5B
+    5BFF595959FF585858FF565656FF545454FF535353FF515151FF4F4F4FFF4E4E
+    4EFF4C4C4CFF4A4A4AFF494949FF474747BF4545453F00000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000006969
+    691F6868688F676767EF656565FF636363FF626262FF606060FF5E5E5EFF5D5D
+    5DFF5B5B5BFF595959FF585858FF565656FF545454FF535353FF515151FF4F4F
+    4FFF4E4E4EDF4C4C4C8F4A4A4A1F000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    000000000000000000006666662F6565657F636363AF626262CF606060FF5E5E
+    5EFF5D5D5DFF5B5B5BFF595959FF585858FF565656CF545454AF5252527F5151
+    512F000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    000000000000FFFF8001FFFF0000FFFC00003FFF0000FFF000000FFF0000FFC0
+    000003FF0000FF80000001FF0000FF00000000FF0000FE000000007F0000FC00
+    0000003F0000F8000000001F0000F0000000000F0000E000000000070000E000
+    000000070000C000000000030000C00000000003000080000000000100008000
+    0000000100008000000000010000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000008000
+    00000001000080000000000100008000000000010000C000000000030000C000
+    000000030000E000000000070000E000000000070000F0000000000F0000F800
+    0000001F0000FC000000003F0000FE000000007F0000FF00000000FF0000FF80
+    000001FF0000FFC0000003FF0000FFF000000FFF0000FFFC00003FFF0000FFFF
+    8001FFFF00002800000020000000400000000100200000000000801000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    000000000000000000000000000000000000000000001C1C1C1F1A1A1A6F1717
+    17BF151515EF121212FF101010FF0D0D0DFF0B0B0BFF080808DF060606AF0404
+    046F0303031F0000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    00000000000000000000000000002424243F212121BF1F1F1FFF1C1C1CFF1A1A
+    1AFF171717FF151515FF121212FF101010FF0D0D0DFF0B0B0BFF080808FF0606
+    06FF030303FF010101BF0000003F000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000002B2B2B0F292929AF262626FF242424FF212121FF1F1F1FFF1C1C
+    1CFF1A1A1AFF171717FF151515FF121212FF101010FF0D0D0DFF0B0B0BFF0808
+    08FF060606FF030303FF010101FF000000AF0000000F00000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    00003030303F2E2E2EEF2B2B2BFF292929FF262626FF242424FF212121FF1F1F
+    1FFF10155DFF0009ABFF0005A5FF00029FFF00009AFF010188FF040465FF0707
+    37FF080808FF060606FF030303FF010101FF000000EF0000002F000000000000
+    0000000000000000000000000000000000000000000000000000000000003535
+    355F333333FF303030FF2E2E2EFF2B2B2BFF292929FF262626FF242424FF2121
+    21FF171B45FF000CB1FF0009ABFF0005A5FF00029FFF00009AFF00009AFF0000
+    9AFF010187FF05053EFF060606FF030303FF010101FF000000FF0000005F0000
+    00000000000000000000000000000000000000000000000000003A3A3A3F3838
+    38FF353535FF333333FF303030FF2E2E2EFF2B2B2BFF292929FF262626FF2424
+    24FF151B5CFF000FB8FF000CB1FF0009ABFF0005A5FF00029FFF00009AFF0000
+    9AFF00009AFF00009AFF010175FF05050FFF030303FF010101FF000000FF0000
+    002F00000000000000000000000000000000000000003F3F3F1F3C3C3CEF3A3A
+    3AFF383838FF353535FF333333FF303030FF2E2E2EFF2B2B2BFF292929FF2626
+    26FF1D2141FF0213B4FF000FB8FF000CB1FF0009ABFF0005A5FF00029FFF0000
+    9AFF00009AFF00009AFF00009AFF000090FF040421FF030303FF010101FF0000
+    00EF0000000F00000000000000000000000000000000414141BF3F3F3FFF3C3C
+    3CFF3A3A3AFF383838FF353535FF333333FF303030FF2E2E2EFF2B2B2BFF2929
+    29FF262626FF1D2141FF151B5CFF1B1D32FF0E1466FF0009ABFF0005A5FF0002
+    9FFF00009AFF00009AFF00009AFF00009AFF000090FF05050FFF030303FF0101
+    01FF000000AF0000000000000000000000004646463F444444FF414141FF3F3F
+    3FFF3C3C3CFF3A3A3AFF383838FF353535FF333333FF303030FF2E2E2EFF2B2B
+    2BFF292929FF262626FF242424FF212121FF1D1E28FF000CB1FF0009ABFF0005
+    A5FF00029FFF00009AFF00009AFF00009AFF00009AFF010175FF060606FF0303
+    03FF010101FF0000003F0000000000000000494949BF464646FF444444FF4141
+    41FF3F3F3FFF3C3C3CFF3A3A3AFF383838FF353535FF333333FF303030FF2E2E
+    2EFF2B2B2BFF292929FF262626FF242424FF0C1883FF000FB8FF000CB1FF0009
+    ABFF0005A5FF00029FFF00009AFF00009AFF00009AFF00009AFF05053EFF0606
+    06FF030303FF010101BF000000004E4E4E1F4B4B4BFF494949FF464646FF4444
+    44FF414141FF343E63FF1538C2FF0332F0FF1131BBFF2B3359FF333333FF3030
+    30FF2E2E2EFF2B2B2BFF292929FF15206EFF0015C4FF0012BEFF000FB8FF000C
+    B1FF0009ABFF0005A5FF00029FFF00009AFF00009AFF00009AFF010187FF0808
+    08FF060606FF030303FF0303031F5050506F4E4E4EFF4B4B4BFF494949FF4646
+    46FF414450FF0F3EF3FF073AFFFF0336FEFF0032FCFF062FDEFF353535FF3333
+    33FF303030FF2E2E2EFF2B2B2BFF1C245DFF0018CAFF0015C4FF0012BEFF000F
+    B8FF000CB1FF0009ABFF0005A5FF00029FFF00009AFF00009AFF00009AFF0707
+    37FF080808FF060606FF0404046F535353BF515151FF4E4E4EFF4B4B4BFF4949
+    49FF3A4675FF1042FFFF0C3EFFFF073AFFFF0336FEFF0032FCFF293568FF3535
+    35FF333333FF303030FF2E2E2EFF282A35FF0F2091FF0018CAFF0015C4FF0012
+    BEFF000FB8FF000CB1FF0009ABFF0005A5FF0D0E48FF040478FF00009AFF0404
+    65FF0B0B0BFF080808FF060606BF565656EF535353FF515151FF4E4E4EFF4B4B
+    4BFF3D4977FF1547FFFF1042FFFF0C3EFFFF073AFFFF0336FEFF333952FF3838
+    38FF353535FF333333FF303030FF2E2E2EFF2B2B2BFF262833FF0018CAFF0618
+    A6FF151B5BFF0411A4FF000CB1FF090F75FF171717FF101037FF00009AFF0101
+    88FF0D0D0DFF0B0B0BFF080808EF585858FF565656FF535353FF515151FF4E4E
+    4EFF4B4B4BFF224ADDFF1547FFFF1042FFFF0C3EFFFF183BC3FF3C3C3CFF3A3A
+    3AFF383838FF353535FF333333FF303030FF2E2E2EFF262940FF001BD0FF121F
+    79FF242424FF1F202BFF151A4EFF181A2FFF1A1A1AFF161620FF08096AFF0506
+    6FFF101010FF0D0D0DFF0B0B0BFF5B5B5BFF585858FF565656FF535353FF5151
+    51FF4E4E4EFF484B57FF344A99FF2D46A3FF2D4396FF414141FF3F3F3FFF3C3C
+    3CFF3A3A3AFF383838FF353535FF232F6CFF172A8AFF0B25B1FF001ED7FF0A1F
+    A7FF262626FF242424FF212121FF1F1F1FFF1C1C1CFF1A1A1AFF171717FF1515
+    15FF121212FF101010FF0D0D0DFF5D5D5DFF5B5B5BFF585858FF565656FF5353
+    53FF515151FF4E4E4EFF4B4B4BFF494949FF464646FF444444FF414141FF3F3F
+    3FFF3C3C3CFF3A3A3AFF31374FFF002BF0FF0028E9FF182A89FF0B24B1FF2329
+    4BFF292929FF262626FF242424FF212121FF1F1F1FFF1C1C1CFF1A1A1AFF1717
+    17FF151515FF121212FF101010FF606060FF5D5D5DFF5B5B5BFF585858FF5656
+    56FF535353FF515151FF4E4E4EFF4B4B4BFF494949FF464646FF444444FF4141
+    41FF3F3F3FFF3C3C3CFF283776FF002EF6FF132FAAFF333333FF303030FF2E2E
+    2EFF2B2B2BFF292929FF262626FF242424FF212121FF1F1F1FFF1C1C1CFF1A1A
+    1AFF171717FF151515FF121212FF626262EF606060FF5D5D5DFF5B5B5BFF5858
+    58FF565656FF535353FF515151FF4E4E4EFF4B4B4BFF494949FF464646FF4444
+    44FF414141FF3F3F3FFF3C3C3CFF0E33CBFF032FEAFF243270FF333333FF3030
+    30FF2E2E2EFF2B2B2BFF212648FF0B1D97FF08199CFF181D49FF1F1F1FFF1C1C
+    1CFF1A1A1AFF171717FF151515EF646464BF626262FF606060FF5D5D5DFF5B5B
+    5BFF585858FF565656FF535353FF515151FF4E4E4EFF4B4B4BFF494949FF4346
+    52FF3E445BFF414141FF3F3F3FFF1F399EFF0032FCFF032FEAFF353535FF3333
+    33FF303030FF2E2E2EFF0520C1FF001BD0FF0018CAFF0216BAFF1F202BFF1F1F
+    1FFF1C1C1CFF1A1A1AFF171717BF6666666F656565FF626262FF606060FF5D5D
+    5DFF5B5B5BFF585858FF565656FF535353FF515151FF4E4E4EFF434C6DFF204A
+    E8FF1547FFFF2443B8FF2A4094FF073AFFFF0336FEFF1D369BFF383838FF3535
+    35FF333333FF303030FF0022DDFF001ED7FF001BD0FF0018CAFF1D2142FF2121
+    21FF1F1F1FFF1C1C1CFF1A1A1A6F6868681F676767FF656565FF626262FF6060
+    60FF5B5E67FF3C68F4FF3565FFFF485A95FF535353FF515151FF3851A7FF1E4F
+    FFFF1A4BFFFF1547FFFF1042FFFF0C3EFFFF2E3D7BFF3C3C3CFF3A3A3AFF3838
+    38FF353535FF333333FF0C27B6FF0022DDFF001ED7FF071EB1FF262626FF2424
+    24FF212121FF1F1F1FFF1C1C1C1F00000000696969BF676767FF656565FF6262
+    62FF496EE1FF3F6EFFFF3A69FFFF3A63EAFF565656FF535353FF3C54A8FF2354
+    FFFF1E4FFFFF1A4BFFFF1547FFFF1042FFFF233FABFF3C3F4BFF3C3C3CFF3A3A
+    3AFF383838FF353535FF333333FF1E2C73FF1A287AFF282A36FF292929FF2626
+    26FF242424FF212121BF00000000000000006B6B6B3F696969FF676767FF6565
+    65FF4C72E1FF4372FFFF3F6EFFFF3A69FFFF3C62DFFF385FDFFF2C5CFFFF2758
+    FFFF2354FFFF1E4FFFFF1A4BFFFF1547FFFF1042FFFF0C3EFFFF153BCEFF3C3C
+    3CFF3A3A3AFF383838FF353535FF333333FF303030FF2E2E2EFF2B2B2BFF2929
+    29FF262626FF2424243F0000000000000000000000006B6B6BBF696969FF6767
+    67FF616778FF4974F5FF4372FFFF3F6EFFFF3A69FFFF3565FFFF3161FFFF2C5C
+    FFFF2758FFFF2354FFFF1E4FFFFF1A4BFFFF1547FFFF1042FFFF123EE7FF3F3F
+    3FFF3C3C3CFF3A3A3AFF383838FF353535FF333333FF303030FF2E2E2EFF2B2B
+    2BFF292929BF000000000000000000000000000000006B6B6B1F6B6B6BEF6969
+    69FF676767FF606882FF4974F5FF4372FFFF3F6EFFFF3A69FFFF3565FFFF3161
+    FFFF2C5CFFFF2758FFFF2354FFFF1E4FFFFF1A4BFFFF1547FFFF2E4395FF4141
+    41FF3C3F4BFF393C48FF3A3A3AFF383838FF353535FF333333FF303030FF2E2E
+    2EEF2B2B2B1F00000000000000000000000000000000000000006B6B6B3F6B6B
+    6BFF696969FF676767FF616778FF4C72E1FF4372FFFF3F6EFFFF3A69FFFF3565
+    FFFF3161FFFF2C5CFFFF2758FFFF2354FFFF1E4FFFFF1A4BFFFF1847F3FF2E43
+    95FF0F3EF3FF0A3AF2FF323B61FF3A3A3AFF383838FF353535FF333333FF3030
+    303F000000000000000000000000000000000000000000000000000000006B6B
+    6B5F6B6B6BFF696969FF676767FF656565FF566AA7FF4570F5FF3F6EFFFF3A69
+    FFFF3565FFFF3161FFFF2C5CFFFF2758FFFF2354FFFF1E4FFFFF1A4BFFFF1547
+    FFFF1442F3FF2A4094FF3F3F3FFF3C3C3CFF3A3A3AFF383838FF3535355F0000
+    0000000000000000000000000000000000000000000000000000000000000000
+    00006B6B6B3F6B6B6BEF696969FF676767FF656565FF626262FF55669CFF4A67
+    C2FF3E67EAFF3565FFFF3161FFFF2C5CFFFF2758FFFF2853E9FF2F4DBCFF374A
+    8DFF464646FF444444FF414141FF3F3F3FFF3C3C3CEF3A3A3A3F000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000006B6B6B1F6B6B6BBF696969FF676767FF656565FF626262FF6060
+    60FF5D5D5DFF5B5B5BFF585858FF565656FF535353FF515151FF4E4E4EFF4B4B
+    4BFF494949FF464646FF444444FF414141BF3F3F3F1F00000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    00000000000000000000000000006B6B6B3F696969BF676767FF656565FF6262
+    62FF606060FF5D5D5DFF5B5B5BFF585858FF565656FF535353FF515151FF4E4E
+    4EFF4B4B4BFF494949BF4646463F000000000000000000000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    000000000000000000000000000000000000000000006868681F6666666F6464
+    64BF626262EF606060FF5D5D5DFF5B5B5BFF585858FF565656EF535353BF5050
+    506F4E4E4E1F0000000000000000000000000000000000000000000000000000
+    0000000000000000000000000000FFC003FFFF0000FFFC00003FF800001FF000
+    000FE0000007C0000003C0000003800000018000000100000000000000000000
+    0000000000000000000000000000000000000000000000000000000000000000
+    0000000000008000000180000001C0000003C0000003E0000007F000000FF800
+    001FFC00003FFF0000FFFFC003FF280000001000000020000000010020000000
+    0000400400000000000000000000000000000000000000000000000000000000
+    0000000000002323235F1D1D1DAF181818FF131313FF0E0E0EFF090909FF0505
+    05AF0101015F0000000000000000000000000000000000000000000000003232
+    321F2C2C2CBF272727FF222222FF171A39FF0B0F60FF080957FF07074AFF0707
+    1AFF040404FF000000BF0000000F0000000000000000000000003A3A3A1F3636
+    36EF313131FF2C2C2CFF272727FF1A1E49FF000CB3FF0006A7FF00019CFF0000
+    9AFF020263FF03030DFF000000EF0000000F00000000000000003F3F3FCF3B3B
+    3BFF363636FF313131FF2C2C2CFF252631FF0B178DFF07108CFF0006A7FF0001
+    9CFF00009AFF01017EFF03030DFF000000BF000000004848485F444444FF3F3F
+    3FFF3B3B3BFF363636FF313131FF2C2C2CFF272727FF1A1E49FF000CB3FF0006
+    A7FF00019CFF00009AFF020263FF040404FF0101015F4E4E4EAF494949FF4144
+    50FF123BDBFF0133FCFF243371FF313131FF2C2C2CFF0A1CA2FF0013BFFF000C
+    B3FF0006A7FF00019CFF00009AFF07071AFF050505AF545454FF4F4F4FFF3D4A
+    77FF1243FFFF083BFFFF1335C0FF363636FF313131FF212856FF071CACFF0415
+    ACFF000CB3FF0A0E68FF040482FF07074AFF090909FF595959FF545454FF4F4F
+    4FFF294AC7FF1E43D0FF353E63FF3B3B3BFF363636FF242E5FFF0822B8FF1722
+    66FF1C1F3FFF1B1C26FF12133AFF0E0E35FF0E0E0EFF5E5E5EFF595959FF5454
+    54FF4F4F4FFF494949FF444444FF3F3F3FFF30395FFF032CE5FF1F2C73FF262A
+    42FF272727FF222222FF1D1D1DFF181818FF131313FF636363FF5E5E5EFF5959
+    59FF545454FF4F4F4FFF494949FF3E445BFF3F3F3FFF0433F0FF21327DFF3131
+    31FF1E2862FF0019CCFF121B68FF1D1D1DFF181818FF676767AF636363FF5C5F
+    68FF4860ABFF4F5569FF43507BFF1B4CFFFF1844E7FF0F3BE7FF30395FFF3636
+    36FF192B8AFF001FD8FF0E1E8EFF222222FF1D1D1DAF6A6A6A5F686868FF556C
+    B1FF406EFFFF3F63D4FF3C5ABEFF2454FFFF1B4CFFFF1543F3FF213DAAFF3B3B
+    3BFF363636FF252E5DFF292B37FF272727FF2323235F000000006A6A6ACF6669
+    71FF4D73E2FF406EFFFF3666FFFF2D5DFFFF2454FFFF1B4CFFFF1843E7FF3C3F
+    4BFF373A47FF363636FF313131FF2C2C2CCF00000000000000006B6B6B1F6A6A
+    6AEF666971FF5070CFFF406EFFFF3666FFFF2D5DFFFF2454FFFF1B4CFFFF1843
+    E7FF203DABFF3B3B3BFF363636EF3232321F0000000000000000000000006B6B
+    6B1F6A6A6ACF686868FF5F6577FF5065A5FF475FACFF4058AAFF3B519CFF434A
+    60FF444444FF3F3F3FCF3A3A3A1F000000000000000000000000000000000000
+    0000000000006A6A6A5F676767AF636363FF5E5E5EFF595959FF545454FF4E4E
+    4EAF4848485F00000000000000000000000000000000F00F0000C00300008001
+    0000800100000000000000000000000000000000000000000000000000000000
+    0000000000008001000080010000C0030000F00F0000}
+  OldCreateOrder = False
+  Position = poScreenCenter
+  PixelsPerInch = 96
+  TextHeight = 13
+  object Label1: TLabel
+    Left = 8
+    Top = 8
+    Width = 373
+    Height = 13
+    Caption = 
+      'A session is required on the server to execute the selected acti' +
+      'on.'
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clWindowText
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    Font.Style = [fsBold]
+    ParentFont = False
+  end
+  object Label2: TLabel
+    Left = 24
+    Top = 32
+    Width = 341
+    Height = 26
+    Caption = 
+      'Please select your Login service and Login method from the drop ' +
+      'down boxes below and execute the login, to create an appropriate' +
+      ' session.'
+    WordWrap = True
+  end
+  object Label3: TLabel
+    Left = 24
+    Top = 75
+    Width = 39
+    Height = 13
+    Caption = 'Service:'
+  end
+  object Label4: TLabel
+    Left = 24
+    Top = 99
+    Width = 40
+    Height = 13
+    Caption = 'Method:'
+  end
+  object Label5: TLabel
+    Left = 24
+    Top = 124
+    Width = 59
+    Height = 13
+    Caption = 'Parameters:'
+  end
+  object cb_ServiceName: TComboBox
+    Left = 88
+    Top = 72
+    Width = 323
+    Height = 21
+    Anchors = [akLeft, akTop, akRight]
+    ItemHeight = 13
+    TabOrder = 0
+    OnChange = cb_ServiceNameChange
+  end
+  object cb_MethodName: TComboBox
+    Left = 88
+    Top = 96
+    Width = 323
+    Height = 21
+    Anchors = [akLeft, akTop, akRight]
+    ItemHeight = 13
+    TabOrder = 1
+    OnChange = cb_MethodNameChange
+  end
+  object grd_Params: TValueListEditor
+    Left = 88
+    Top = 120
+    Width = 324
+    Height = 85
+    Anchors = [akLeft, akTop, akRight, akBottom]
+    DisplayOptions = [doColumnTitles, doAutoColResize]
+    TabOrder = 2
+    TitleCaptions.Strings = (
+      'Parameter'
+      'Value')
+    ColWidths = (
+      150
+      168)
+  end
+  object cb_MoreCallsNeeded: TCheckBox
+    Left = 88
+    Top = 206
+    Width = 241
+    Height = 17
+    Anchors = [akLeft, akBottom]
+    Caption = 'Additional calls are required to complete login'
+    TabOrder = 3
+  end
+  object btn_Ok: TBitBtn
+    Left = 257
+    Top = 236
+    Width = 75
+    Height = 25
+    Anchors = [akRight, akBottom]
+    Caption = 'OK'
+    Default = True
+    ModalResult = 1
+    TabOrder = 4
+    OnClick = btn_OkClick
+    Glyph.Data = {
+      D6020000424DD602000000000000D60000002800000020000000100000000100
+      08000000000000020000C30E0000C30E0000280000002800000000000000FFFF
+      FF00FF00FF0000660000149D210019AA2B00179D27001AB02D001BA92E001DB1
+      32001EB231001FB133001EAE310022B7380021B4370025A83B0031C24F0031B5
+      4D003BCB5E0041C5630047D36D004FD6790053DE7F00CACACA00C4C4C400BFBF
+      BF00B5B5B500ABABAB00A5A5A5009E9E9E009C9C9C009A9A9A00999999009898
+      98009797970094949400939393008C8C8C008A8A8A0065656500020202020202
+      0202020202020202020202020202020202020202020202020202020202020202
+      0202020202020202020202020202020202020202020202020202020202020203
+      030202020202020202020202020202272702020202020202020202020202030A
+      0B03020202020202020202020202271F1F27020202020202020202020203100D
+      070E0302020202020202020202271B1D221E270202020202020202020314120F
+      03080903020202020202020227191A2127232027020202020202020315161103
+      0203060C030202020202022718171C2702272521270202020202020203130302
+      020202030503020202020202271A270202020227242702020202020202030202
+      0202020203040302020202020227020202020202272627020202020202020202
+      0202020202020303020202020202020202020202020227270202020202020202
+      0202020202020203030202020202020202020202020202272702020202020202
+      0202020202020202020202020202020202020202020202020202020202020202
+      0202020202020202020202020202020202020202020202020202020202020202
+      0202020202020202020202020202020202020202020202020202020202020202
+      0202020202020202020202020202020202020202020202020202020202020202
+      0202020202020202020202020202020202020202020202020202}
+    NumGlyphs = 2
+  end
+  object btn_Cancel: TBitBtn
+    Left = 337
+    Top = 236
+    Width = 75
+    Height = 25
+    Anchors = [akRight, akBottom]
+    Cancel = True
+    Caption = 'Cancel'
+    ModalResult = 2
+    TabOrder = 5
+    Glyph.Data = {
+      8A030000424D8A030000000000008A0100002800000020000000100000000100
+      08000000000000020000C30E0000C30E0000550000005500000000000000FFFF
+      FF00FF00FF004071FA004274FF00497AFC00275AFF002C5FFF003664FA00386B
+      FF00174AFD001A4CFF001B4DFF001D50FF002355FF002558FF002655FA002E5B
+      F9002D59F400325DF1003B66F3000030FC000132FF000134FF000C3CFF00103D
+      FB00103BF4001342FF001743F6001847FF001A48F9001A47F8001B46F6001D4B
+      FF001C47F6001D48F6001D49F600214EFC00204BF800204CF800224DF800224C
+      F400224DF1002550F400002CF800002DF800002CF600002AF300012DF600032B
+      F2000431FE000733F600123BF100143EF40000009A00C0C0C000BEBEBE00BBBB
+      BB00B9B9B900B6B6B600B5B5B500B3B3B300B1B1B100B0B0B000AFAFAF00AEAE
+      AE00ACACAC00ABABAB00AAAAAA00A9A9A900A8A8A800A7A7A700A6A6A600A4A4
+      A400A3A3A300A2A2A200A0A0A0009F9F9F009E9E9E009C9C9C009A9A9A009999
+      990098989800979797006B6B6B00020202020202020202020202020202020202
+      0202020202020202020202020202020202020202020202020202020202020202
+      0202020202020202020202020202020202363602020202020236360202020202
+      02545402020202020254540202020202360A1A3602020202362C153602020202
+      54464C540202020254504F5402020202361F0B343602023630162F3602020202
+      5447444D54020254514E5354020202020236220C3536362D1731360202020202
+      025447434B5454504E52540202020202020236230D1932162E36020202020202
+      02025447424A4D4E5154020202020202020202361E1B18333602020202020202
+      0202025447474A4F54020202020202020202023625211D1C3602020202020202
+      02020254424245495402020202020202020236110728260E2036020202020202
+      0202543E3D434440485402020202020202360809123636290F24360202020202
+      02543B3A415454453F4754020202020236030413360202362A06273602020202
+      5439384054020254473E4454020202023605143602020202362B103602020202
+      54373C5402020202544441540202020202363602020202020236360202020202
+      0254540202020202025454020202020202020202020202020202020202020202
+      0202020202020202020202020202020202020202020202020202020202020202
+      0202020202020202020202020202}
+    NumGlyphs = 2
+  end
+  object fDynamicRequest: TRODynamicRequest
+    RemoteService = fRemoteService
+    Params = <>
+    Left = 16
+    Top = 224
+  end
+  object fRemoteService: TRORemoteService
+    Left = 48
+    Top = 224
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROLoginNeededForm.lfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROLoginNeededForm.lfm
new file mode 100644
index 0000000..1c8beef
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROLoginNeededForm.lfm	
@@ -0,0 +1,515 @@
+object ROLoginNeededForm: TROLoginNeededForm
+  Left = 329
+  Height = 300
+  Top = 199
+  Width = 425
+  HorzScrollBar.Page = 424
+  VertScrollBar.Page = 299
+  Caption = 'RemObjects SDK Session Required'
+  ClientHeight = 300
+  ClientWidth = 425
+  Constraints.MinHeight = 300
+  Constraints.MinWidth = 425
+  Font.Height = -11
+  Font.Name = 'Tahoma'
+  Icon.Data = {
+    F12500002F2A2058504D202A2F0A7374617469632063686172202A6772617068
+    69635B5D203D207B0A223438203438203330342032222C0A222E2E2063204E6F
+    6E65222C0A222E2C20632023363336333633222C0A222E2D2063202336323632
+    3632222C0A222E2A20632023363036303630222C0A222E612063202335453545
+    3545222C0A222E6220632023354435443544222C0A222E632063202335423542
+    3542222C0A222E6420632023353935393539222C0A222E652063202335383538
+    3538222C0A222E6620632023353635363536222C0A222E672063202335343534
+    3534222C0A222E6820632023363836383638222C0A222E692063202336373637
+    3637222C0A222E6A20632023363536353635222C0A222E6B2063202335333533
+    3533222C0A222E6C20632023353135313531222C0A222E6D2063202334463446
+    3446222C0A222E6E20632023344534453445222C0A222E6F2063202334433443
+    3443222C0A222E7020632023364136413641222C0A222E712063202334413441
+    3441222C0A222E7220632023343934393439222C0A222E732063202334373437
+    3437222C0A222E7420632023364236423642222C0A222E752063202334353435
+    3435222C0A222E7620632023343434343434222C0A222E772063202334323432
+    3432222C0A222E7820632023363735453542222C0A222E792063202338343546
+    3533222C0A222E7A20632023414336303438222C0A222E412063202341423545
+    3436222C0A222E4220632023414235433434222C0A222E432063202341413539
+    3431222C0A222E4420632023413935373346222C0A222E452063202341383535
+    3344222C0A222E4620632023374235313435222C0A222E472063202335393445
+    3442222C0A222E4820632023343034303430222C0A222E492063202333463346
+    3346222C0A222E4A20632023373436323544222C0A222E4B2063202342393638
+    3445222C0A222E4C20632023453036413434222C0A222E4D2063202346463641
+    3342222C0A222E4E20632023464636373338222C0A222E4F2063202346463634
+    3335222C0A222E5020632023464636313332222C0A222E512063202346463546
+    3246222C0A222E5220632023464635433243222C0A222E532063202346463539
+    3239222C0A222E5420632023464635363235222C0A222E552063202346463533
+    3232222C0A222E5620632023464635303146222C0A222E572063202344443444
+    3235222C0A222E5820632023414634413245222C0A222E592063202335453437
+    3431222C0A222E5A20632023334433443344222C0A222E302063202333423342
+    3342222C0A222E3120632023374636353544222C0A222E322063202343443644
+    3444222C0A222E3320632023464637303431222C0A222E342063202346463644
+    3345222C0A222E3520632023464634443143222C0A222E362063202346463441
+    3139222C0A222E3720632023464634373136222C0A222E382063202346463435
+    3133222C0A222E3920632023433434323230222C0A222E402063202336353431
+    3338222C0A222E2320632023334133413341222C0A222E3B2063202333383338
+    3338222C0A222E3A20632023333733373337222C0A222E3D2063202336443635
+    3632222C0A222E2B20632023424136443533222C0A222E252063202346463733
+    3434222C0A222E2420632023463334353136222C0A222E282063202346463432
+    3130222C0A222E2920632023464633463044222C0A222E5B2063202346463343
+    3041222C0A222E5D20632023394633433233222C0A222C2E2063202333353335
+    3335222C0A222C2C20632023333333333333222C0A222C2D2063202338313637
+    3545222C0A222C2A20632023454237333442222C0A222C612063202342393435
+    3236222C0A222C6220632023344634343431222C0A222C632063202338393431
+    3245222C0A222C6420632023463333433044222C0A222C652063202346463339
+    3037222C0A222C6620632023394433413231222C0A222C672063202333323332
+    3332222C0A222C6820632023384136383544222C0A222C692063202346353734
+    3439222C0A222C6A20632023344233453342222C0A222C6B2063202335353343
+    3336222C0A222C6C20632023333033303330222C0A222C6D2063202332453245
+    3245222C0A222C6E20632023464637363437222C0A222C6F2063202332443244
+    3244222C0A222C7020632023324232423242222C0A222C712063202345373344
+    3130222C0A222C7220632023323932393239222C0A222C732063202332383238
+    3238222C0A222C7420632023453137323443222C0A222C752063202343323342
+    3138222C0A222C7620632023323632363236222C0A222C772063202341373641
+    3536222C0A222C7820632023433036303432222C0A222C792063202335463535
+    3532222C0A222C7A20632023383835363437222C0A222C412063202345393538
+    3245222C0A222C4220632023444234303137222C0A222C432063202341423345
+    3232222C0A222C4420632023394533433233222C0A222C452063202332343234
+    3234222C0A222C4620632023323332333233222C0A222C472063202336413631
+    3545222C0A222C4820632023463536463433222C0A222C492063202336423538
+    3532222C0A222C4A20632023443335343330222C0A222C4B2063202333443331
+    3246222C0A222C4C20632023374532423142222C0A222C4D2063202338363238
+    3137222C0A222C4E20632023373932373139222C0A222C4F2063202333363241
+    3238222C0A222C5020632023323132313231222C0A222C512063202337423630
+    3537222C0A222C5220632023463436393344222C0A222C532063202342463544
+    3430222C0A222C5420632023424335313332222C0A222C552063202343463344
+    3137222C0A222C5620632023433132363039222C0A222C572063202344463232
+    3030222C0A222C5820632023444232303030222C0A222C592063202344373145
+    3030222C0A222C5A20632023433831443032222C0A222C302063202333323237
+    3235222C0A222C3120632023314631463146222C0A222C322063202331453145
+    3145222C0A222C3320632023373835433533222C0A222C342063202338303539
+    3444222C0A222C3520632023413534453335222C0A222C362063202345373432
+    3136222C0A222C3720632023463333463130222C0A222C382063202339453341
+    3230222C0A222C3920632023343833423338222C0A222C402063202337333242
+    3145222C0A222C2320632023443231433030222C0A222C3B2063202343453141
+    3030222C0A222C3A20632023383231453130222C0A222C3D2063202331433143
+    3143222C0A222C2B20632023363134423435222C0A222C252063202343363441
+    3238222C0A222C2420632023393534333244222C0A222C282063202336343430
+    3336222C0A222C2920632023463333393041222C0A222C5B2063202346463336
+    3034222C0A222C5D20632023464533343031222C0A222D2E2063202345463332
+    3033222C0A222D2C20632023354333373245222C0A222D2D2063202343413138
+    3030222C0A222D2A20632023394431393039222C0A222D612063202331413141
+    3141222C0A222D6220632023363834353343222C0A222D632063202336313343
+    3332222C0A222D6420632023464333313030222C0A222D652063202346383246
+    3030222C0A222D6620632023363633343239222C0A222D672063202336453238
+    3143222C0A222D6820632023433631363030222C0A222D692063202337433141
+    3046222C0A222D6A20632023313931393139222C0A222D6B2063202335343341
+    3334222C0A222D6C20632023453832443033222C0A222D6D2063202334443334
+    3245222C0A222D6E20632023423231453037222C0A222D6F2063202342383135
+    3032222C0A222D7020632023324232303146222C0A222D712063202331373137
+    3137222C0A222D7220632023313631363136222C0A222D732063202342463334
+    3132222C0A222D7420632023443032463041222C0A222D752063202336453230
+    3135222C0A222D7620632023373531443132222C0A222D772063202336393143
+    3133222C0A222D7820632023313531353135222C0A222D792063202331343134
+    3134222C0A222D7A20632023364133383243222C0A222D412063202346343244
+    3030222C0A222D4220632023373033323234222C0A222D432063202331323132
+    3132222C0A222D4420632023384333343230222C0A222D452063202345463242
+    3030222C0A222D4620632023423232433130222C0A222D472063202331303130
+    3130222C0A222D4820632023443832433036222C0A222D492063202345423239
+    3030222C0A222D4A20632023453732373030222C0A222D4B2063202342363237
+    3043222C0A222D4C20632023433832343036222C0A222D4D2063202336423236
+    3142222C0A222D4E20632023304630463046222C0A222D4F2063202336423439
+    3430222C0A222D5020632023373534373342222C0A222D512063202337343435
+    3339222C0A222D5220632023364433303233222C0A222D532063202339383243
+    3135222C0A222D5420632023423632373042222C0A222D552063202344343233
+    3032222C0A222D5620632023304430443044222C0A222D572063202335363441
+    3437222C0A222D5820632023443134413235222C0A222D592063202337303346
+    3333222C0A222D5A20632023414232313042222C0A222D302063202342393143
+    3034222C0A222D3120632023323531313131222C0A222D322063202330423042
+    3042222C0A222D3320632023383832323132222C0A222D342063202338443144
+    3045222C0A222D3520632023363231383132222C0A222D362063202334443139
+    3134222C0A222D3720632023324531413138222C0A222D382063202335323044
+    3043222C0A222D3920632023393430323031222C0A222D402063202339413030
+    3030222C0A222D2320632023334230423042222C0A222D3B2063202330413041
+    3041222C0A222D3A20632023413933373141222C0A222D3D2063202337413231
+    3134222C0A222D2B20632023413731383036222C0A222D252063202334303230
+    3143222C0A222D2420632023374631353043222C0A222D282063202342353044
+    3030222C0A222D2920632023423130423030222C0A222D5B2063202338383045
+    3036222C0A222D5D20632023374130353035222C0A222A2E2063202333313042
+    3042222C0A222A2C20632023303830383038222C0A222A2D2063202343423333
+    3045222C0A222A2A20632023363632333139222C0A222A612063202342353141
+    3034222C0A222A6220632023433231343030222C0A222A632063202342453132
+    3030222C0A222A6420632023394331333036222C0A222A652063202341443039
+    3030222C0A222A6620632023413930373030222C0A222A672063202332393135
+    3134222C0A222A6820632023313630433043222C0A222A692063202330373037
+    3037222C0A222A6A20632023424333323131222C0A222A6B2063202337333233
+    3137222C0A222A6C20632023433331423032222C0A222A6D2063202342393130
+    3030222C0A222A6E20632023413530353030222C0A222A6F2063202337453037
+    3035222C0A222A7020632023353830413041222C0A222A712063202336463035
+    3035222C0A222A7220632023374630323032222C0A222A732063202330363036
+    3036222C0A222A7420632023344634343430222C0A222A752063202337453333
+    3232222C0A222A7620632023423931433035222C0A222A772063202341313033
+    3030222C0A222A7820632023394330313030222C0A222A792063202335323035
+    3035222C0A222A7A20632023303530353035222C0A222A412063202338383346
+    3243222C0A222A4220632023414433313134222C0A222A432063202331423038
+    3038222C0A222A4420632023303330333033222C0A222A452063202342353337
+    3137222C0A222A4620632023334132343231222C0A222A472063202342423137
+    3032222C0A222A4820632023363330333033222C0A222A492063202330323032
+    3032222C0A222A4A20632023423431333032222C0A222A4B2063202331413037
+    3037222C0A222A4C20632023303130313031222C0A222A4D2063202333433143
+    3139222C0A222A4E20632023414230453031222C0A222A4F2063202335413033
+    3033222C0A222A5020632023303030303030222C0A222A512063202332373144
+    3143222C0A222A5220632023413730433031222C0A222A532063202337453031
+    3031222C0A222A5420632023304630363036222C0A222A552063202336363134
+    3045222C0A222A5620632023393030303030222C0A222A572063202332323035
+    3035222C0A222A5820632023354531443136222C0A222A592063202341363132
+    3034222C0A222A5A20632023383531323039222C0A222A302063202341333041
+    3031222C0A222A3120632023353431453138222C0A222A322063202336463139
+    3130222C0A222A3320632023353931393134222C0A222A342063202334333141
+    3136222C0A222A3520632023343930363036222C0A222A362063202332353142
+    3141222C0A222A3720632023334631363133222C0A222A382063202335383131
+    3044222C0A222A3920632023354530453042222C0A222A402063202335423043
+    3041222C0A222A2320632023353830413039222C0A222A3B2063202335363039
+    3039222C0A222A3A20632023344330393039222C0A222E2E2E2E2E2E2E2E2E2E
+    2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2C2E2D
+    2E2A2E612E622E632E642E652E662E672E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+    2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E222C0A222E2E2E2E2E2E
+    2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E682E692E6A2E2C
+    2E2D2E2A2E612E622E632E642E652E662E672E6B2E6C2E6D2E6E2E6F2E2E2E2E
+    2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E222C0A222E2E
+    2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E702E682E692E6A
+    2E2C2E2D2E2A2E612E622E632E642E652E662E672E6B2E6C2E6D2E6E2E6F2E71
+    2E722E732E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E222C
+    0A222E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E742E702E682E69
+    2E6A2E2C2E2D2E2A2E612E622E632E642E652E662E672E6B2E6C2E6D2E6E2E6F
+    2E712E722E732E752E762E772E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+    2E2E222C0A222E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E742E702E68
+    2E692E6A2E2C2E2D2E2A2E612E782E792E7A2E412E422E432E442E452E462E47
+    2E6F2E712E722E732E752E762E772E482E492E2E2E2E2E2E2E2E2E2E2E2E2E2E
+    2E2E2E2E2E2E222C0A222E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E742E70
+    2E682E692E6A2E2C2E2D2E4A2E4B2E4C2E4D2E4E2E4F2E502E512E522E532E54
+    2E552E562E572E582E592E752E762E772E482E492E5A2E302E2E2E2E2E2E2E2E
+    2E2E2E2E2E2E2E2E2E2E222C0A222E2E2E2E2E2E2E2E2E2E2E2E2E2E2E742E74
+    2E702E682E692E6A2E2C2E312E322E332E342E4D2E4E2E4F2E502E512E522E53
+    2E542E552E562E352E362E372E382E392E402E482E492E5A2E302E232E3B2E3A
+    2E2E2E2E2E2E2E2E2E2E2E2E2E2E222C0A222E2E2E2E2E2E2E2E2E2E2E2E2E74
+    2E742E702E682E692E6A2E3D2E2B2E252E332E342E4D2E4E2E4F2E502E512E52
+    2E532E542E552E562E352E362E372E242E282E292E5B2E5D2E5A2E302E232E3B
+    2E3A2C2E2C2C2E2E2E2E2E2E2E2E2E2E2E2E222C0A222E2E2E2E2E2E2E2E2E2E
+    2E2E2E742E702E682E692E6A2C2D2C2A2E252E332E342E4D2E4E2E4F2E502E51
+    2E522E532E542E552E562E352E362E372C612C622C632C642C652C662E302E23
+    2E3B2E3A2C2E2C2C2C672E2E2E2E2E2E2E2E2E2E2E2E222C0A222E2E2E2E2E2E
+    2E2E2E2E2E742E702E682E692E6A2C682C692E252E332E342E4D2E4E2E4F2E50
+    2E512E522E532E542E552E562E352E362E372E242E762E772E482C6A2C6B2E30
+    2E232E3B2E3A2C2E2C2C2C672C6C2C6D2E2E2E2E2E2E2E2E2E2E222C0A222E2E
+    2E2E2E2E2E2E2E742E702E682E692E6A2C2D2C6E2E252E332E342E4D2E4E2E4F
+    2E502E512E522E532E542E552E562E352E362E372E382E282C632E482E492E5A
+    2E302E232E3B2E3A2C2E2C2C2C672C6C2C6D2C6F2C702E2E2E2E2E2E2E2E222C
+    0A222E2E2E2E2E2E2E742E702E682E692E6A2C2D2C692E252E332E342E4D2E4E
+    2E4F2E502E512E522E532E542E552E562E352E362E372E382E282E292C712E49
+    2E5A2E302E232E3B2E3A2C2E2C2C2C672C6C2C6D2C6F2C702C722C732E2E2E2E
+    2E2E222C0A222E2E2E2E2E2E2E702E682E692E6A2E3D2C742E252E332E342E4D
+    2E4E2E4F2E502E512E522E532E542E552E562E352E362E372E382E282E292E5B
+    2C752E5A2E302E232E3B2E3A2C2E2C2C2C672C6C2C6D2C6F2C702C722C732C76
+    2E2E2E2E2E2E222C0A222E2E2E2E2E702E682E692E6A2E2C2C772E252E332E34
+    2E4D2E4E2C782E662C792C7A2C412E542E552E562E352E362E372E382E282C42
+    2C432C442C6B2E302E232E3B2E3A2C2E2C2C2C672C6C2C6D2C6F2C702C722C73
+    2C762C452C462E2E2E2E222C0A222E2E2E2E2E682E692E6A2E2C2E2D2C472C48
+    2E342E4D2E4E2E4F2C492E672E6B2E6C2C4A2E552E562E352E362E372E382E28
+    2E292E482E492E5A2E302E232E3B2E3A2C2E2C2C2C4B2C4C2C4D2C4E2C4F2C72
+    2C732C762C452C462C502E2E2E2E222C0A222E2E2E682E692E6A2E2C2E2D2E2A
+    2E612C512C522E4E2E4F2C532E672E6B2E6C2E6D2C542E562E352E362E372E38
+    2E282E292C552E492E5A2E302E232E3B2E3A2C2E2C2C2C672C562C572C582C59
+    2C5A2C302C762C452C462C502C312C322E2E222C0A222E2E2E692E6A2E2C2E2D
+    2E2A2E612E622E632C332E412C342C792E6B2E6C2E6D2E6E2C352E352E362E37
+    2E382C362C372E5B2C652C382C392E232E3B2E3A2C2E2C2C2C672C402C572C58
+    2C592C232C3B2C3A2C452C462C502C312C322C3D2E2E222C0A222E2E2E6A2E2C
+    2E2D2E2A2E612E622E632E642E652E662E672E6B2E6C2E6D2E6E2E6F2C2B2C25
+    2E372E242C242E772C282C292C5B2C5D2D2E2D2C2E3A2C2E2C2C2C672C6C2C4D
+    2C582C592C232C3B2D2D2D2A2C462C502C312C322C3D2D612E2E222C0A222E2E
+    2E2C2E2D2E2A2E612E622E632E642E652E662E672E6B2E6C2E6D2E6E2E6F2E71
+    2E722E732D622C622E772E482E492D632C5D2D642D652D662C2E2C2C2C672C6C
+    2C6D2D672C592C232C3B2D2D2D682D692C502C312C322C3D2D612D6A2E2E222C
+    0A222E2C2E2D2E2A2E612E622E632E642E652E662E672E6B2E6C2E6D2E6E2E6F
+    2E712E722E732E752E762E772E482E492E5A2D6B2D642D652D6C2D6D2C2C2C67
+    2C6C2C6D2C6F2C702D6E2C3B2D2D2D682D6F2D702C312C322C3D2D612D6A2D71
+    2D72222C0A222E2D2E2A2E612E622E632E642E652E662E672E6B2E6C2E6D2E6E
+    2E6F2E712E722E732E752E762E772E482E492E5A2E302D732D652D742D6D2C2C
+    2C672C6C2C6D2C6F2C702C722C302D752D762D772D702C312C322C3D2D612D6A
+    2D712D782D79222C0A222E2A2E612E622E632E642E652E662E672E6B2E6C2E6D
+    2E6E2E6F2E712E722E732E752E762E772E482E492E5A2E302D7A2D652D412D42
+    2C2C2C672C6C2C6D2C6F2C702C722C732C762C452C462C502C312C322C3D2D61
+    2D6A2D712D782D792D43222C0A222E612E622E632E642E652E662E672E6B2E6C
+    2E6D2E6E2E6F2E712E722E732E752E762E772E482E492E5A2E302E232D442D41
+    2D452D462C672C6C2C6D2C6F2C702C722C732C762C452C462C502C312C322C3D
+    2D612D6A2D712D782D792D432D47222C0A222E622E632E642E652E662E672E6B
+    2E6C2E6D2E6E2E6F2E712E722E732E752E762E772E482E492E5A2E302E232E3B
+    2E3A2D482D492D4A2D4B2D4C2C582D4D2C722C732C762C452C462C502C312C32
+    2C3D2D612D6A2D712D782D792D432D472D4E222C0A222E632E642E652E662E67
+    2E6B2E6C2E6D2E6E2E6F2E712D4F2D502D512E762E772E482E492E5A2E302E23
+    2E3B2E3A2C2E2D522D532D542D552C582C592C232C302C762C452C462C502C31
+    2C322C3D2D612D6A2D712D782D792D432D472D4E2D56222C0A222E642E652E66
+    2E672E6B2E6C2E6D2E6E2E6F2D572D582E372E382E282C372D592E492E5A2E30
+    2E232E3B2E3A2C2E2C2C2C672C6C2C6D2C6F2D5A2C232D302C762C452C462C50
+    2C312C322C3D2D612D6A2D712D782D312D432D472D4E2D562D32222C0A222E65
+    2E662E672E6B2E6C2E6D2E6E2E6F2E712D582E372E382E282E292E5B2C292C6B
+    2E302E232E3B2E3A2C2E2C2C2C672C6C2C6D2C6F2C702D332C3B2D342C452C46
+    2C502D352D362D372D612D6A2D712D382D392D402D232D4E2D562D322D3B222C
+    0A222E662E672E6B2E6C2E6D2E6E2E6F2E712D4F2E372E382E282E292E5B2C65
+    2C5B2D3A2E232E3B2E3A2C2E2C2C2C672C6C2C6D2C6F2C702C722D3D2D2D2D2B
+    2D252C502D242D282D292D5B2D6A2D712D782D5D2D402D402A2E2D562D322D3B
+    2A2C222C0A222E672E6B2E6C2E6D2E6E2E6F2E712E722D502E382E282E292E5B
+    2C652C5B2C5D2A2D2E3B2E3A2C2E2C2C2C672C6C2C6D2C6F2C702C722A2A2A61
+    2D682A622A632A642D282D292A652A662A672D782D792D402D402D402A682D32
+    2D3B2A2C2A69222C0A222E2E2E6C2E6D2E6E2E6F2E712E722E732D512E282E29
+    2E5B2C652C5B2C5D2D642A6A2E3A2C2E2C2C2C672C6C2C6D2C6F2C702A6B2A6C
+    2D2D2D682A622A632A6D2D282D292A652A662A6E2A6F2A702A712D402D402A72
+    2D322D3B2A2C2A732E2E222C0A222E2E2E6D2E6E2E6F2E712E722E732E752A74
+    2C372E5B2C652C5B2C5D2D642D652A752C2E2C2C2C672C6C2C6D2C6F2C702C72
+    2A762D2D2D682A622A632A6D2D282D292A652A662A6E2A772A782D402D402D40
+    2D402A792D3B2A2C2A732A7A2E2E222C0A222E2E2E6E2E6F2E712E722E732E75
+    2E762E772A412C652C5B2C5D2D642D652A422C2E2C2C2C672C6C2C6D2C6F2C70
+    2C722C302D2D2D682A622A632A6D2D282D292A652A662A6E2A772A782D402D40
+    2D402D402D402A432A2C2A732A7A2A442E2E222C0A222E2E2E6F2E712E722E73
+    2E752E762E772E482E492D632A452A2D2A6A2A752C2E2C2C2C672C6C2C6D2C6F
+    2C702C722C732A462A472A622A632A6D2D282D292A652A662A6E2A772A782D40
+    2D402D402D402D402A482A2C2A732A7A2A442A492E2E222C0A222E2E2E2E2E72
+    2E732E752E762E772E482E492E5A2E302E232E3B2E3A2C2E2C2C2C672C6C2C6D
+    2C6F2C702C722C732C762C452D252A4A2A6D2D282D292A652A662A6E2A772A78
+    2D402D402D402D402D402D402A4B2A732A7A2A442A4C2E2E2E2E222C0A222E2E
+    2E2E2E732E752E762E772E482E492E5A2E302E232E3B2E3A2C2E2C2C2C672C6C
+    2C6D2C6F2C702C722C732C762C452C462C502A4D2A4E2D292A652A662A6E2A77
+    2A782D402D402D402D402D402D402A4F2A732A7A2A442A4C2A502E2E2E2E222C
+    0A222E2E2E2E2E2E2E762E772E482E492E5A2E302E232E3B2E3A2C2E2C2C2C67
+    2C6C2C6D2C6F2C702C722C732C762C452C462C502C312A512A522A652A662A6E
+    2A772A782D402D402D402D402D402D402A532A542A7A2A442A4C2A502E2E2E2E
+    2E2E222C0A222E2E2E2E2E2E2E772E482E492E5A2E302E232E3B2E3A2C2E2C2C
+    2C672C6C2C6D2C6F2C702C722C732C762C452C462C502C312C322A552A652A66
+    2A6E2A772A782D402D402D402D402D402D402A562A572A7A2A442A4C2A502A50
+    2E2E2E2E2E2E222C0A222E2E2E2E2E2E2E2E2E492E5A2E302E232E3B2E3A2C2E
+    2C2C2C672C6C2C6D2C6F2C702C722C732C762C452A582A632A592A5A2A552A30
+    2A662A6E2A772A782D402D402D402D402D402D402A562A572A7A2A442A4C2A50
+    2A502E2E2E2E2E2E2E2E222C0A222E2E2E2E2E2E2E2E2E2E2E302E232E3B2E3A
+    2C2E2C2C2C672C6C2C6D2C6F2C702C722C732C762C452A312A632A6D2D282D29
+    2A652A662A6E2A772A782D402D402D402D402D402D402A562A572A7A2A442A4C
+    2A502A502E2E2E2E2E2E2E2E2E2E222C0A222E2E2E2E2E2E2E2E2E2E2E2E2E3B
+    2E3A2C2E2C2C2C672C6C2C6D2C6F2C702C722C732C762C452C462A322A6D2D28
+    2D292A652A662A6E2A772A782D402D402D402D402D402D402A532A572A7A2A44
+    2A4C2A502A502E2E2E2E2E2E2E2E2E2E2E2E222C0A222E2E2E2E2E2E2E2E2E2E
+    2E2E2E3A2C2E2C2C2C672C6C2C6D2C6F2C702C722C732C762C452C462C502A33
+    2D282D292A652A662A6E2A772A782D402D402D402D402D402D402A4F2A542A7A
+    2A442A4C2A502A502A502E2E2E2E2E2E2E2E2E2E2E2E222C0A222E2E2E2E2E2E
+    2E2E2E2E2E2E2E2E2C2C2C672C6C2C6D2C6F2C702C722C732C762C452C462C50
+    2C312A342D292A652A662A6E2A772A782D402D402D402D402D402A482A4B2A73
+    2A7A2A442A4C2A502A502A502E2E2E2E2E2E2E2E2E2E2E2E2E2E222C0A222E2E
+    2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2C6D2C6F2C702C722C732C762C452C46
+    2C502C312A512A552A652A662A6E2A772A782D402D402D402A722A352A432A2C
+    2A732A7A2A442A4C2A502A502E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E222C
+    0A222E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2C702C722C732C762C45
+    2C462C502C312C322A362A372A382A392A402A232A3B2A3A2A2E2A682D322D3B
+    2A2C2A732A7A2A442A4C2A502A502E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+    2E2E222C0A222E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2C732C76
+    2C452C462C502C312C322C3D2D612D6A2D712D782D792D432D472D4E2D562D32
+    2D3B2A2C2A732A7A2A442A4C2A502A502E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+    2E2E2E2E2E2E222C0A222E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+    2E2E2E2E2C462C502C312C322C3D2D612D6A2D712D782D792D432D472D4E2D56
+    2D322D3B2A2C2A732A7A2A442A4C2A502E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+    2E2E2E2E2E2E2E2E2E2E222C0A222E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+    2E2E2E2E2E2E2E2E2E2E2E2E2C322C3D2D612D6A2D712D782D792D432D472D4E
+    2D562D322D3B2A2C2A732A7A2A442A492E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+    2E2E2E2E2E2E2E2E2E2E2E2E2E2E222C0A222E2E2E2E2E2E2E2E2E2E2E2E2E2E
+    2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2D722D792D432D47
+    2D4E2D562D322D3B2A2C2A692E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E
+    2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E2E227D0A
+  }
+  Position = poScreenCenter
+  LCLVersion = '0.9.25'
+  object Label1: TLabel
+    Left = 9
+    Height = 17
+    Top = 8
+    Width = 476
+    Caption = 'A session is required on the server to execute the selected action.'
+    Font.Height = -11
+    Font.Name = 'Tahoma'
+    Font.Style = [fsBold]
+    ParentColor = False
+  end
+  object Label2: TLabel
+    Left = 9
+    Height = 46
+    Top = 32
+    Width = 405
+    AutoSize = False
+    Caption = 'Please select your Login service and Login method from the drop down boxes below and execute the login, to create an appropriate session.'
+    ParentColor = False
+    WordWrap = True
+  end
+  object Label3: TLabel
+    Left = 9
+    Height = 17
+    Top = 75
+    Width = 58
+    Caption = 'Service:'
+    ParentColor = False
+  end
+  object Label4: TLabel
+    Left = 9
+    Height = 17
+    Top = 99
+    Width = 59
+    Caption = 'Method:'
+    ParentColor = False
+  end
+  object Label5: TLabel
+    Left = 9
+    Height = 17
+    Top = 124
+    Width = 89
+    Caption = 'Parameters:'
+    ParentColor = False
+  end
+  object cb_ServiceName: TComboBox
+    Left = 75
+    Height = 21
+    Top = 72
+    Width = 340
+    Anchors = [akTop, akLeft, akRight]
+    AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
+    MaxLength = 65535
+    OnChange = cb_ServiceNameChange
+    TabOrder = 0
+  end
+  object cb_MethodName: TComboBox
+    Left = 75
+    Height = 21
+    Top = 96
+    Width = 340
+    Anchors = [akTop, akLeft, akRight]
+    AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
+    MaxLength = 65535
+    OnChange = cb_MethodNameChange
+    TabOrder = 1
+  end
+  object cb_MoreCallsNeeded: TCheckBox
+    Left = 75
+    Height = 24
+    Top = 233
+    Width = 349
+    Anchors = [akLeft, akBottom]
+    Caption = 'Additional calls are required to complete login'
+    TabOrder = 2
+  end
+  object btn_Ok: TBitBtn
+    Left = 265
+    Height = 25
+    Top = 270
+    Width = 75
+    Anchors = [akRight, akBottom]
+    Caption = 'OK'
+    Default = True
+    Glyph.Data = {
+      D6020000424DD602000000000000D60000002800000020000000100000000100
+      08000000000000020000C30E0000C30E0000280000002800000000000000FFFF
+      FF00FF00FF0000660000149D210019AA2B00179D27001AB02D001BA92E001DB1
+      32001EB231001FB133001EAE310022B7380021B4370025A83B0031C24F0031B5
+      4D003BCB5E0041C5630047D36D004FD6790053DE7F00CACACA00C4C4C400BFBF
+      BF00B5B5B500ABABAB00A5A5A5009E9E9E009C9C9C009A9A9A00999999009898
+      98009797970094949400939393008C8C8C008A8A8A0065656500020202020202
+      0202020202020202020202020202020202020202020202020202020202020202
+      0202020202020202020202020202020202020202020202020202020202020203
+      030202020202020202020202020202272702020202020202020202020202030A
+      0B03020202020202020202020202271F1F27020202020202020202020203100D
+      070E0302020202020202020202271B1D221E270202020202020202020314120F
+      03080903020202020202020227191A2127232027020202020202020315161103
+      0203060C030202020202022718171C2702272521270202020202020203130302
+      020202030503020202020202271A270202020227242702020202020202030202
+      0202020203040302020202020227020202020202272627020202020202020202
+      0202020202020303020202020202020202020202020227270202020202020202
+      0202020202020203030202020202020202020202020202272702020202020202
+      0202020202020202020202020202020202020202020202020202020202020202
+      0202020202020202020202020202020202020202020202020202020202020202
+      0202020202020202020202020202020202020202020202020202020202020202
+      0202020202020202020202020202020202020202020202020202020202020202
+      0202020202020202020202020202020202020202020202020202
+    }
+    ModalResult = 1
+    NumGlyphs = 2
+    OnClick = btn_OkClick
+    TabOrder = 4
+  end
+  object btn_Cancel: TBitBtn
+    Left = 345
+    Height = 25
+    Top = 270
+    Width = 75
+    Anchors = [akRight, akBottom]
+    Cancel = True
+    Caption = 'Cancel'
+    Glyph.Data = {
+      8A030000424D8A030000000000008A0100002800000020000000100000000100
+      08000000000000020000C30E0000C30E0000550000005500000000000000FFFF
+      FF00FF00FF004071FA004274FF00497AFC00275AFF002C5FFF003664FA00386B
+      FF00174AFD001A4CFF001B4DFF001D50FF002355FF002558FF002655FA002E5B
+      F9002D59F400325DF1003B66F3000030FC000132FF000134FF000C3CFF00103D
+      FB00103BF4001342FF001743F6001847FF001A48F9001A47F8001B46F6001D4B
+      FF001C47F6001D48F6001D49F600214EFC00204BF800204CF800224DF800224C
+      F400224DF1002550F400002CF800002DF800002CF600002AF300012DF600032B
+      F2000431FE000733F600123BF100143EF40000009A00C0C0C000BEBEBE00BBBB
+      BB00B9B9B900B6B6B600B5B5B500B3B3B300B1B1B100B0B0B000AFAFAF00AEAE
+      AE00ACACAC00ABABAB00AAAAAA00A9A9A900A8A8A800A7A7A700A6A6A600A4A4
+      A400A3A3A300A2A2A200A0A0A0009F9F9F009E9E9E009C9C9C009A9A9A009999
+      990098989800979797006B6B6B00020202020202020202020202020202020202
+      0202020202020202020202020202020202020202020202020202020202020202
+      0202020202020202020202020202020202363602020202020236360202020202
+      02545402020202020254540202020202360A1A3602020202362C153602020202
+      54464C540202020254504F5402020202361F0B343602023630162F3602020202
+      5447444D54020254514E5354020202020236220C3536362D1731360202020202
+      025447434B5454504E52540202020202020236230D1932162E36020202020202
+      02025447424A4D4E5154020202020202020202361E1B18333602020202020202
+      0202025447474A4F54020202020202020202023625211D1C3602020202020202
+      02020254424245495402020202020202020236110728260E2036020202020202
+      0202543E3D434440485402020202020202360809123636290F24360202020202
+      02543B3A415454453F4754020202020236030413360202362A06273602020202
+      5439384054020254473E4454020202023605143602020202362B103602020202
+      54373C5402020202544441540202020202363602020202020236360202020202
+      0254540202020202025454020202020202020202020202020202020202020202
+      0202020202020202020202020202020202020202020202020202020202020202
+      0202020202020202020202020202
+    }
+    ModalResult = 2
+    NumGlyphs = 2
+    TabOrder = 3
+  end
+  object grd_Params: TStringGrid
+    Left = 75
+    Height = 112
+    Top = 121
+    Width = 340
+    ColCount = 2
+    FixedColor = clBtnFace
+    Flat = True
+    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goSmoothScroll]
+    RowCount = 1
+    TabOrder = 5
+    ColWidths = (
+      140
+      198
+    )
+    Cells = (
+      2
+      0
+      0
+      'Parameters'
+      1
+      0
+      'Value'
+    )
+  end
+  object fDynamicRequest: TRODynamicRequest
+    RemoteService = fRemoteService
+    Params = <>
+    left = 16
+    top = 224
+  end
+  object fRemoteService: TRORemoteService
+    left = 48
+    top = 224
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROLoginNeededForm.lrs b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROLoginNeededForm.lrs
new file mode 100644
index 0000000..bd61275
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROLoginNeededForm.lrs	
@@ -0,0 +1,247 @@
+{ This is an automatically generated lazarus resource file }
+
+LazarusResources.Add('TROLoginNeededForm','FORMDATA',[
+  'TPF0'#18'TROLoginNeededForm'#17'ROLoginNeededForm'#4'Left'#3'I'#1#6'Height'#3
+  +','#1#3'Top'#3#199#0#5'Width'#3#169#1#18'HorzScrollBar.Page'#3#168#1#18'Vert'
+  +'ScrollBar.Page'#3'+'#1#7'Caption'#6#31'RemObjects SDK Session Required'#12
+  +'ClientHeight'#3','#1#11'ClientWidth'#3#169#1#21'Constraints.MinHeight'#3','
+  +#1#20'Constraints.MinWidth'#3#169#1#11'Font.Height'#2#245#9'Font.Name'#6#6'T'
+  +'ahoma'#9'Icon.Data'#10#245'%'#0#0#241'%'#0#0'/* XPM */'#10'static char *gra'
+  +'phic[] = {'#10'"48 48 304 2",'#10'".. c None",'#10'"., c #636363",'#10'".- '
+  +'c #626262",'#10'".* c #606060",'#10'".a c #5E5E5E",'#10'".b c #5D5D5D",'#10
+  +'".c c #5B5B5B",'#10'".d c #595959",'#10'".e c #585858",'#10'".f c #565656",'
+  +#10'".g c #545454",'#10'".h c #686868",'#10'".i c #676767",'#10'".j c #65656'
+  +'5",'#10'".k c #535353",'#10'".l c #515151",'#10'".m c #4F4F4F",'#10'".n c #'
+  +'4E4E4E",'#10'".o c #4C4C4C",'#10'".p c #6A6A6A",'#10'".q c #4A4A4A",'#10'".'
+  +'r c #494949",'#10'".s c #474747",'#10'".t c #6B6B6B",'#10'".u c #454545",'
+  +#10'".v c #444444",'#10'".w c #424242",'#10'".x c #675E5B",'#10'".y c #845F5'
+  +'3",'#10'".z c #AC6048",'#10'".A c #AB5E46",'#10'".B c #AB5C44",'#10'".C c #'
+  +'AA5941",'#10'".D c #A9573F",'#10'".E c #A8553D",'#10'".F c #7B5145",'#10'".'
+  +'G c #594E4B",'#10'".H c #404040",'#10'".I c #3F3F3F",'#10'".J c #74625D",'
+  +#10'".K c #B9684E",'#10'".L c #E06A44",'#10'".M c #FF6A3B",'#10'".N c #FF673'
+  +'8",'#10'".O c #FF6435",'#10'".P c #FF6132",'#10'".Q c #FF5F2F",'#10'".R c #'
+  +'FF5C2C",'#10'".S c #FF5929",'#10'".T c #FF5625",'#10'".U c #FF5322",'#10'".'
+  +'V c #FF501F",'#10'".W c #DD4D25",'#10'".X c #AF4A2E",'#10'".Y c #5E4741",'
+  +#10'".Z c #3D3D3D",'#10'".0 c #3B3B3B",'#10'".1 c #7F655D",'#10'".2 c #CD6D4'
+  +'D",'#10'".3 c #FF7041",'#10'".4 c #FF6D3E",'#10'".5 c #FF4D1C",'#10'".6 c #'
+  +'FF4A19",'#10'".7 c #FF4716",'#10'".8 c #FF4513",'#10'".9 c #C44220",'#10'".'
+  +'@ c #654138",'#10'".# c #3A3A3A",'#10'".; c #383838",'#10'".: c #373737",'
+  +#10'".= c #6D6562",'#10'".+ c #BA6D53",'#10'".% c #FF7344",'#10'".$ c #F3451'
+  +'6",'#10'".( c #FF4210",'#10'".) c #FF3F0D",'#10'".[ c #FF3C0A",'#10'".] c #'
+  +'9F3C23",'#10'",. c #353535",'#10'",, c #333333",'#10'",- c #81675E",'#10'",'
+  +'* c #EB734B",'#10'",a c #B94526",'#10'",b c #4F4441",'#10'",c c #89412E",'
+  +#10'",d c #F33C0D",'#10'",e c #FF3907",'#10'",f c #9D3A21",'#10'",g c #32323'
+  +'2",'#10'",h c #8A685D",'#10'",i c #F57449",'#10'",j c #4B3E3B",'#10'",k c #'
+  +'553C36",'#10'",l c #303030",'#10'",m c #2E2E2E",'#10'",n c #FF7647",'#10'",'
+  +'o c #2D2D2D",'#10'",p c #2B2B2B",'#10'",q c #E73D10",'#10'",r c #292929",'
+  +#10'",s c #282828",'#10'",t c #E1724C",'#10'",u c #C23B18",'#10'",v c #26262'
+  +'6",'#10'",w c #A76A56",'#10'",x c #C06042",'#10'",y c #5F5552",'#10'",z c #'
+  +'885647",'#10'",A c #E9582E",'#10'",B c #DB4017",'#10'",C c #AB3E22",'#10'",'
+  +'D c #9E3C23",'#10'",E c #242424",'#10'",F c #232323",'#10'",G c #6A615E",'
+  +#10'",H c #F56F43",'#10'",I c #6B5852",'#10'",J c #D35430",'#10'",K c #3D312'
+  +'F",'#10'",L c #7E2B1B",'#10'",M c #862817",'#10'",N c #792719",'#10'",O c #'
+  +'362A28",'#10'",P c #212121",'#10'",Q c #7B6057",'#10'",R c #F4693D",'#10'",'
+  +'S c #BF5D40",'#10'",T c #BC5132",'#10'",U c #CF3D17",'#10'",V c #C12609",'
+  +#10'",W c #DF2200",'#10'",X c #DB2000",'#10'",Y c #D71E00",'#10'",Z c #C81D0'
+  +'2",'#10'",0 c #322725",'#10'",1 c #1F1F1F",'#10'",2 c #1E1E1E",'#10'",3 c #'
+  +'785C53",'#10'",4 c #80594D",'#10'",5 c #A54E35",'#10'",6 c #E74216",'#10'",'
+  +'7 c #F33F10",'#10'",8 c #9E3A20",'#10'",9 c #483B38",'#10'",@ c #732B1E",'
+  +#10'",# c #D21C00",'#10'",; c #CE1A00",'#10'",: c #821E10",'#10'",= c #1C1C1'
+  +'C",'#10'",+ c #614B45",'#10'",% c #C64A28",'#10'",$ c #95432D",'#10'",( c #'
+  +'644036",'#10'",) c #F3390A",'#10'",[ c #FF3604",'#10'",] c #FE3401",'#10'"-'
+  +'. c #EF3203",'#10'"-, c #5C372E",'#10'"-- c #CA1800",'#10'"-* c #9D1909",'
+  +#10'"-a c #1A1A1A",'#10'"-b c #68453C",'#10'"-c c #613C32",'#10'"-d c #FC310'
+  +'0",'#10'"-e c #F82F00",'#10'"-f c #663429",'#10'"-g c #6E281C",'#10'"-h c #'
+  +'C61600",'#10'"-i c #7C1A0F",'#10'"-j c #191919",'#10'"-k c #543A34",'#10'"-'
+  +'l c #E82D03",'#10'"-m c #4D342E",'#10'"-n c #B21E07",'#10'"-o c #B81502",'
+  +#10'"-p c #2B201F",'#10'"-q c #171717",'#10'"-r c #161616",'#10'"-s c #BF341'
+  +'2",'#10'"-t c #D02F0A",'#10'"-u c #6E2015",'#10'"-v c #751D12",'#10'"-w c #'
+  +'691C13",'#10'"-x c #151515",'#10'"-y c #141414",'#10'"-z c #6A382C",'#10'"-'
+  +'A c #F42D00",'#10'"-B c #703224",'#10'"-C c #121212",'#10'"-D c #8C3420",'
+  +#10'"-E c #EF2B00",'#10'"-F c #B22C10",'#10'"-G c #101010",'#10'"-H c #D82C0'
+  +'6",'#10'"-I c #EB2900",'#10'"-J c #E72700",'#10'"-K c #B6270C",'#10'"-L c #'
+  +'C82406",'#10'"-M c #6B261B",'#10'"-N c #0F0F0F",'#10'"-O c #6B4940",'#10'"-'
+  +'P c #75473B",'#10'"-Q c #744539",'#10'"-R c #6D3023",'#10'"-S c #982C15",'
+  +#10'"-T c #B6270B",'#10'"-U c #D42302",'#10'"-V c #0D0D0D",'#10'"-W c #564A4'
+  +'7",'#10'"-X c #D14A25",'#10'"-Y c #703F33",'#10'"-Z c #AB210B",'#10'"-0 c #'
+  +'B91C04",'#10'"-1 c #251111",'#10'"-2 c #0B0B0B",'#10'"-3 c #882212",'#10'"-'
+  ,'4 c #8D1D0E",'#10'"-5 c #621812",'#10'"-6 c #4D1914",'#10'"-7 c #2E1A18",'
+  +#10'"-8 c #520D0C",'#10'"-9 c #940201",'#10'"-@ c #9A0000",'#10'"-# c #3B0B0'
+  +'B",'#10'"-; c #0A0A0A",'#10'"-: c #A9371A",'#10'"-= c #7A2114",'#10'"-+ c #'
+  +'A71806",'#10'"-% c #40201C",'#10'"-$ c #7F150C",'#10'"-( c #B50D00",'#10'"-'
+  +') c #B10B00",'#10'"-[ c #880E06",'#10'"-] c #7A0505",'#10'"*. c #310B0B",'
+  +#10'"*, c #080808",'#10'"*- c #CB330E",'#10'"** c #662319",'#10'"*a c #B51A0'
+  +'4",'#10'"*b c #C21400",'#10'"*c c #BE1200",'#10'"*d c #9C1306",'#10'"*e c #'
+  +'AD0900",'#10'"*f c #A90700",'#10'"*g c #291514",'#10'"*h c #160C0C",'#10'"*'
+  +'i c #070707",'#10'"*j c #BC3211",'#10'"*k c #732317",'#10'"*l c #C31B02",'
+  +#10'"*m c #B91000",'#10'"*n c #A50500",'#10'"*o c #7E0705",'#10'"*p c #580A0'
+  +'A",'#10'"*q c #6F0505",'#10'"*r c #7F0202",'#10'"*s c #060606",'#10'"*t c #'
+  +'4F4440",'#10'"*u c #7E3322",'#10'"*v c #B91C05",'#10'"*w c #A10300",'#10'"*'
+  +'x c #9C0100",'#10'"*y c #520505",'#10'"*z c #050505",'#10'"*A c #883F2C",'
+  +#10'"*B c #AD3114",'#10'"*C c #1B0808",'#10'"*D c #030303",'#10'"*E c #B5371'
+  +'7",'#10'"*F c #3A2421",'#10'"*G c #BB1702",'#10'"*H c #630303",'#10'"*I c #'
+  +'020202",'#10'"*J c #B41302",'#10'"*K c #1A0707",'#10'"*L c #010101",'#10'"*'
+  +'M c #3C1C19",'#10'"*N c #AB0E01",'#10'"*O c #5A0303",'#10'"*P c #000000",'
+  +#10'"*Q c #271D1C",'#10'"*R c #A70C01",'#10'"*S c #7E0101",'#10'"*T c #0F060'
+  +'6",'#10'"*U c #66140E",'#10'"*V c #900000",'#10'"*W c #220505",'#10'"*X c #'
+  +'5E1D16",'#10'"*Y c #A61204",'#10'"*Z c #851209",'#10'"*0 c #A30A01",'#10'"*'
+  +'1 c #541E18",'#10'"*2 c #6F1910",'#10'"*3 c #591914",'#10'"*4 c #431A16",'
+  +#10'"*5 c #490606",'#10'"*6 c #251B1A",'#10'"*7 c #3F1613",'#10'"*8 c #58110'
+  +'D",'#10'"*9 c #5E0E0B",'#10'"*@ c #5B0C0A",'#10'"*# c #580A09",'#10'"*; c #'
+  +'560909",'#10'"*: c #4C0909",'#10'".......................................,.'
+  +'-.*.a.b.c.d.e.f.g......................................",'#10'"............'
+  +'...................h.i.j.,.-.*.a.b.c.d.e.f.g.k.l.m.n.o.....................'
+  +'.........",'#10'"...........................p.h.i.j.,.-.*.a.b.c.d.e.f.g.k.l'
+  +'.m.n.o.q.r.s..........................",'#10'".......................t.p.h.'
+  +'i.j.,.-.*.a.b.c.d.e.f.g.k.l.m.n.o.q.r.s.u.v.w......................",'#10'"'
+  +'.....................t.p.h.i.j.,.-.*.a.x.y.z.A.B.C.D.E.F.G.o.q.r.s.u.v.w.H.'
+  +'I....................",'#10'"...................t.p.h.i.j.,.-.J.K.L.M.N.O.P'
+  +'.Q.R.S.T.U.V.W.X.Y.u.v.w.H.I.Z.0..................",'#10'"...............t.'
+  +'t.p.h.i.j.,.1.2.3.4.M.N.O.P.Q.R.S.T.U.V.5.6.7.8.9.@.H.I.Z.0.#.;.:..........'
+  +'....",'#10'".............t.t.p.h.i.j.=.+.%.3.4.M.N.O.P.Q.R.S.T.U.V.5.6.7.$.'
+  +'(.).[.].Z.0.#.;.:,.,,............",'#10'".............t.p.h.i.j,-,*.%.3.4.M'
+  +'.N.O.P.Q.R.S.T.U.V.5.6.7,a,b,c,d,e,f.0.#.;.:,.,,,g............",'#10'".....'
+  +'......t.p.h.i.j,h,i.%.3.4.M.N.O.P.Q.R.S.T.U.V.5.6.7.$.v.w.H,j,k.0.#.;.:,.,,'
+  +',g,l,m..........",'#10'".........t.p.h.i.j,-,n.%.3.4.M.N.O.P.Q.R.S.T.U.V.5.'
+  +'6.7.8.(,c.H.I.Z.0.#.;.:,.,,,g,l,m,o,p........",'#10'".......t.p.h.i.j,-,i.%'
+  +'.3.4.M.N.O.P.Q.R.S.T.U.V.5.6.7.8.(.),q.I.Z.0.#.;.:,.,,,g,l,m,o,p,r,s......"'
+  +','#10'".......p.h.i.j.=,t.%.3.4.M.N.O.P.Q.R.S.T.U.V.5.6.7.8.(.).[,u.Z.0.#.;'
+  +'.:,.,,,g,l,m,o,p,r,s,v......",'#10'".....p.h.i.j.,,w.%.3.4.M.N,x.f,y,z,A.T.'
+  +'U.V.5.6.7.8.(,B,C,D,k.0.#.;.:,.,,,g,l,m,o,p,r,s,v,E,F....",'#10'".....h.i.j'
+  +'.,.-,G,H.4.M.N.O,I.g.k.l,J.U.V.5.6.7.8.(.).H.I.Z.0.#.;.:,.,,,K,L,M,N,O,r,s,'
+  +'v,E,F,P....",'#10'"...h.i.j.,.-.*.a,Q,R.N.O,S.g.k.l.m,T.V.5.6.7.8.(.),U.I.Z'
+  +'.0.#.;.:,.,,,g,V,W,X,Y,Z,0,v,E,F,P,1,2..",'#10'"...i.j.,.-.*.a.b.c,3.A,4,y.'
+  +'k.l.m.n,5.5.6.7.8,6,7.[,e,8,9.#.;.:,.,,,g,@,W,X,Y,#,;,:,E,F,P,1,2,=..",'#10
+  +'"...j.,.-.*.a.b.c.d.e.f.g.k.l.m.n.o,+,%.7.$,$.w,(,),[,]-.-,.:,.,,,g,l,M,X,Y'
+  +',#,;---*,F,P,1,2,=-a..",'#10'"...,.-.*.a.b.c.d.e.f.g.k.l.m.n.o.q.r.s-b,b.w.'
+  +'H.I-c,]-d-e-f,.,,,g,l,m-g,Y,#,;---h-i,P,1,2,=-a-j..",'#10'".,.-.*.a.b.c.d.e'
+  +'.f.g.k.l.m.n.o.q.r.s.u.v.w.H.I.Z-k-d-e-l-m,,,g,l,m,o,p-n,;---h-o-p,1,2,=-a-'
+  +'j-q-r",'#10'".-.*.a.b.c.d.e.f.g.k.l.m.n.o.q.r.s.u.v.w.H.I.Z.0-s-e-t-m,,,g,l'
+  +',m,o,p,r,0-u-v-w-p,1,2,=-a-j-q-x-y",'#10'".*.a.b.c.d.e.f.g.k.l.m.n.o.q.r.s.'
+  +'u.v.w.H.I.Z.0-z-e-A-B,,,g,l,m,o,p,r,s,v,E,F,P,1,2,=-a-j-q-x-y-C",'#10'".a.b'
+  +'.c.d.e.f.g.k.l.m.n.o.q.r.s.u.v.w.H.I.Z.0.#-D-A-E-F,g,l,m,o,p,r,s,v,E,F,P,1,'
+  +'2,=-a-j-q-x-y-C-G",'#10'".b.c.d.e.f.g.k.l.m.n.o.q.r.s.u.v.w.H.I.Z.0.#.;.:-H'
+  +'-I-J-K-L,X-M,r,s,v,E,F,P,1,2,=-a-j-q-x-y-C-G-N",'#10'".c.d.e.f.g.k.l.m.n.o.'
+  +'q-O-P-Q.v.w.H.I.Z.0.#.;.:,.-R-S-T-U,X,Y,#,0,v,E,F,P,1,2,=-a-j-q-x-y-C-G-N-V'
+  +'",'#10'".d.e.f.g.k.l.m.n.o-W-X.7.8.(,7-Y.I.Z.0.#.;.:,.,,,g,l,m,o-Z,#-0,v,E,'
+  +'F,P,1,2,=-a-j-q-x-1-C-G-N-V-2",'#10'".e.f.g.k.l.m.n.o.q-X.7.8.(.).[,),k.0.#'
+  +'.;.:,.,,,g,l,m,o,p-3,;-4,E,F,P-5-6-7-a-j-q-8-9-@-#-N-V-2-;",'#10'".f.g.k.l.'
+  +'m.n.o.q-O.7.8.(.).[,e,[-:.#.;.:,.,,,g,l,m,o,p,r-=---+-%,P-$-(-)-[-j-q-x-]-@'
+  +'-@*.-V-2-;*,",'#10'".g.k.l.m.n.o.q.r-P.8.(.).[,e,[,]*-.;.:,.,,,g,l,m,o,p,r*'
+  +'**a-h*b*c*d-(-)*e*f*g-x-y-@-@-@*h-2-;*,*i",'#10'"...l.m.n.o.q.r.s-Q.(.).[,e'
+  ,',[,]-d*j.:,.,,,g,l,m,o,p*k*l---h*b*c*m-(-)*e*f*n*o*p*q-@-@*r-2-;*,*s..",'#10
+  +'"...m.n.o.q.r.s.u*t,7.[,e,[,]-d-e*u,.,,,g,l,m,o,p,r*v---h*b*c*m-(-)*e*f*n*w'
+  +'*x-@-@-@-@*y-;*,*s*z..",'#10'"...n.o.q.r.s.u.v.w*A,e,[,]-d-e*B,.,,,g,l,m,o,'
+  +'p,r,0---h*b*c*m-(-)*e*f*n*w*x-@-@-@-@-@*C*,*s*z*D..",'#10'"...o.q.r.s.u.v.w'
+  +'.H.I-c*E*-*j*u,.,,,g,l,m,o,p,r,s*F*G*b*c*m-(-)*e*f*n*w*x-@-@-@-@-@*H*,*s*z*'
+  +'D*I..",'#10'".....r.s.u.v.w.H.I.Z.0.#.;.:,.,,,g,l,m,o,p,r,s,v,E-%*J*m-(-)*e'
+  +'*f*n*w*x-@-@-@-@-@-@*K*s*z*D*L....",'#10'".....s.u.v.w.H.I.Z.0.#.;.:,.,,,g,'
+  +'l,m,o,p,r,s,v,E,F,P*M*N-)*e*f*n*w*x-@-@-@-@-@-@*O*s*z*D*L*P....",'#10'"....'
+  +'...v.w.H.I.Z.0.#.;.:,.,,,g,l,m,o,p,r,s,v,E,F,P,1*Q*R*e*f*n*w*x-@-@-@-@-@-@*'
+  +'S*T*z*D*L*P......",'#10'".......w.H.I.Z.0.#.;.:,.,,,g,l,m,o,p,r,s,v,E,F,P,1'
+  +',2*U*e*f*n*w*x-@-@-@-@-@-@*V*W*z*D*L*P*P......",'#10'".........I.Z.0.#.;.:,'
+  +'.,,,g,l,m,o,p,r,s,v,E*X*c*Y*Z*U*0*f*n*w*x-@-@-@-@-@-@*V*W*z*D*L*P*P........'
+  +'",'#10'"...........0.#.;.:,.,,,g,l,m,o,p,r,s,v,E*1*c*m-(-)*e*f*n*w*x-@-@-@-'
+  +'@-@-@*V*W*z*D*L*P*P..........",'#10'".............;.:,.,,,g,l,m,o,p,r,s,v,E'
+  +',F*2*m-(-)*e*f*n*w*x-@-@-@-@-@-@*S*W*z*D*L*P*P............",'#10'".........'
+  +'....:,.,,,g,l,m,o,p,r,s,v,E,F,P*3-(-)*e*f*n*w*x-@-@-@-@-@-@*O*T*z*D*L*P*P*P'
+  +'............",'#10'"..............,,,g,l,m,o,p,r,s,v,E,F,P,1*4-)*e*f*n*w*x-'
+  +'@-@-@-@-@*H*K*s*z*D*L*P*P*P..............",'#10'"..................,m,o,p,r'
+  +',s,v,E,F,P,1*Q*U*e*f*n*w*x-@-@-@*r*5*C*,*s*z*D*L*P*P..................",'#10
+  +'"....................,p,r,s,v,E,F,P,1,2*6*7*8*9*@*#*;*:*.*h-2-;*,*s*z*D*L*P'
+  +'*P....................",'#10'"......................,s,v,E,F,P,1,2,=-a-j-q-'
+  +'x-y-C-G-N-V-2-;*,*s*z*D*L*P*P......................",'#10'"................'
+  +'..........,F,P,1,2,=-a-j-q-x-y-C-G-N-V-2-;*,*s*z*D*L*P.....................'
+  +'.....",'#10'"..............................,2,=-a-j-q-x-y-C-G-N-V-2-;*,*s*z'
+  +'*D*I..............................",'#10'".................................'
+  +'.....-r-y-C-G-N-V-2-;*,*i......................................"}'#10#8'Pos'
+  +'ition'#7#14'poScreenCenter'#10'LCLVersion'#6#6'0.9.25'#0#6'TLabel'#6'Label1'
+  +#4'Left'#2#9#6'Height'#2#17#3'Top'#2#8#5'Width'#3#220#1#7'Caption'#6'CA sess'
+  +'ion is required on the server to execute the selected action.'#11'Font.Heig'
+  +'ht'#2#245#9'Font.Name'#6#6'Tahoma'#10'Font.Style'#11#6'fsBold'#0#11'ParentC'
+  +'olor'#8#0#0#6'TLabel'#6'Label2'#4'Left'#2#9#6'Height'#2'.'#3'Top'#2' '#5'Wi'
+  +'dth'#3#149#1#8'AutoSize'#8#7'Caption'#6#137'Please select your Login servic'
+  +'e and Login method from the drop down boxes below and execute the login, to'
+  +' create an appropriate session.'#11'ParentColor'#8#8'WordWrap'#9#0#0#6'TLab'
+  +'el'#6'Label3'#4'Left'#2#9#6'Height'#2#17#3'Top'#2'K'#5'Width'#2':'#7'Captio'
+  +'n'#6#8'Service:'#11'ParentColor'#8#0#0#6'TLabel'#6'Label4'#4'Left'#2#9#6'He'
+  +'ight'#2#17#3'Top'#2'c'#5'Width'#2';'#7'Caption'#6#7'Method:'#11'ParentColor'
+  +#8#0#0#6'TLabel'#6'Label5'#4'Left'#2#9#6'Height'#2#17#3'Top'#2'|'#5'Width'#2
+  +'Y'#7'Caption'#6#11'Parameters:'#11'ParentColor'#8#0#0#9'TComboBox'#14'cb_Se'
+  +'rviceName'#4'Left'#2'K'#6'Height'#2#21#3'Top'#2'H'#5'Width'#3'T'#1#7'Anchor'
+  +'s'#11#5'akTop'#6'akLeft'#7'akRight'#0#16'AutoCompleteText'#11#22'cbactEndOf'
+  +'LineComplete'#20'cbactSearchAscending'#0#9'MaxLength'#4#255#255#0#0#8'OnCha'
+  +'nge'#7#20'cb_ServiceNameChange'#8'TabOrder'#2#0#0#0#9'TComboBox'#13'cb_Meth'
+  +'odName'#4'Left'#2'K'#6'Height'#2#21#3'Top'#2'`'#5'Width'#3'T'#1#7'Anchors'
+  +#11#5'akTop'#6'akLeft'#7'akRight'#0#16'AutoCompleteText'#11#22'cbactEndOfLin'
+  +'eComplete'#20'cbactSearchAscending'#0#9'MaxLength'#4#255#255#0#0#8'OnChange'
+  +#7#19'cb_MethodNameChange'#8'TabOrder'#2#1#0#0#9'TCheckBox'#18'cb_MoreCallsN'
+  +'eeded'#4'Left'#2'K'#6'Height'#2#24#3'Top'#3#233#0#5'Width'#3']'#1#7'Anchors'
+  +#11#6'akLeft'#8'akBottom'#0#7'Caption'#6'/Additional calls are required to c'
+  +'omplete login'#8'TabOrder'#2#2#0#0#7'TBitBtn'#6'btn_Ok'#4'Left'#3#9#1#6'Hei'
+  +'ght'#2#25#3'Top'#3#14#1#5'Width'#2'K'#7'Anchors'#11#7'akRight'#8'akBottom'#0
+  +#7'Caption'#6#2'OK'#7'Default'#9#10'Glyph.Data'#10#218#2#0#0#214#2#0#0'BM'
+  +#214#2#0#0#0#0#0#0#214#0#0#0'('#0#0#0' '#0#0#0#16#0#0#0#1#0#8#0#0#0#0#0#0#2#0
+  +#0#195#14#0#0#195#14#0#0'('#0#0#0'('#0#0#0#0#0#0#0#255#255#255#0#255#0#255#0
+  +#0'f'#0#0#20#157'!'#0#25#170'+'#0#23#157''''#0#26#176'-'#0#27#169'.'#0#29#177
+  +'2'#0#30#178'1'#0#31#177'3'#0#30#174'1'#0'"'#183'8'#0'!'#180'7'#0'%'#168';'#0
+  +'1'#194'O'#0'1'#181'M'#0';'#203'^'#0'A'#197'c'#0'G'#211'm'#0'O'#214'y'#0'S'
+  +#222''#0#202#202#202#0#196#196#196#0#191#191#191#0#181#181#181#0#171#171#171
+  +#0#165#165#165#0#158#158#158#0#156#156#156#0#154#154#154#0#153#153#153#0#152
+  +#152#152#0#151#151#151#0#148#148#148#0#147#147#147#0#140#140#140#0#138#138
+  +#138#0'eee'#0#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2
+  +#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#3
+  +#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2''''''#2#2#2#2#2#2#2#2#2#2#2#2#2#3#10#11#3#2#2
+  +#2#2#2#2#2#2#2#2#2#2''''#31#31''''#2#2#2#2#2#2#2#2#2#2#2#3#16#13#7#14#3#2#2#2
+  ,#2#2#2#2#2#2#2''''#27#29'"'#30''''#2#2#2#2#2#2#2#2#2#3#20#18#15#3#8#9#3#2#2#2
+  +#2#2#2#2#2''''#25#26'!''# '''#2#2#2#2#2#2#2#3#21#22#17#3#2#3#6#12#3#2#2#2#2#2
+  +#2''''#24#23#28''''#2'''%!'''#2#2#2#2#2#2#2#3#19#3#2#2#2#2#3#5#3#2#2#2#2#2#2
+  +''''#26''''#2#2#2#2'''$'''#2#2#2#2#2#2#2#3#2#2#2#2#2#2#3#4#3#2#2#2#2#2#2''''
+  +#2#2#2#2#2#2'''&'''#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#3#3#2#2#2#2#2#2#2#2#2#2#2#2
+  +#2#2''''''#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#3#3#2#2#2#2#2#2#2#2#2#2#2#2#2#2''''
+  +''''#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2
+  +#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2
+  +#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2
+  +#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2
+  +#2#2#2#2#2#2#2#2#2#2#2#11'ModalResult'#2#1#9'NumGlyphs'#2#2#7'OnClick'#7#11
+  +'btn_OkClick'#8'TabOrder'#2#4#0#0#7'TBitBtn'#10'btn_Cancel'#4'Left'#3'Y'#1#6
+  +'Height'#2#25#3'Top'#3#14#1#5'Width'#2'K'#7'Anchors'#11#7'akRight'#8'akBotto'
+  +'m'#0#6'Cancel'#9#7'Caption'#6#6'Cancel'#10'Glyph.Data'#10#142#3#0#0#138#3#0
+  +#0'BM'#138#3#0#0#0#0#0#0#138#1#0#0'('#0#0#0' '#0#0#0#16#0#0#0#1#0#8#0#0#0#0#0
+  +#0#2#0#0#195#14#0#0#195#14#0#0'U'#0#0#0'U'#0#0#0#0#0#0#0#255#255#255#0#255#0
+  +#255#0'@q'#250#0'Bt'#255#0'Iz'#252#0'''Z'#255#0',_'#255#0'6d'#250#0'8k'#255#0
+  +#23'J'#253#0#26'L'#255#0#27'M'#255#0#29'P'#255#0'#U'#255#0'%X'#255#0'&U'#250
+  +#0'.['#249#0'-Y'#244#0'2]'#241#0';f'#243#0#0'0'#252#0#1'2'#255#0#1'4'#255#0
+  +#12'<'#255#0#16'='#251#0#16';'#244#0#19'B'#255#0#23'C'#246#0#24'G'#255#0#26
+  +'H'#249#0#26'G'#248#0#27'F'#246#0#29'K'#255#0#28'G'#246#0#29'H'#246#0#29'I'
+  +#246#0'!N'#252#0' K'#248#0' L'#248#0'"M'#248#0'"L'#244#0'"M'#241#0'%P'#244#0
+  +#0','#248#0#0'-'#248#0#0','#246#0#0'*'#243#0#1'-'#246#0#3'+'#242#0#4'1'#254#0
+  +#7'3'#246#0#18';'#241#0#20'>'#244#0#0#0#154#0#192#192#192#0#190#190#190#0#187
+  +#187#187#0#185#185#185#0#182#182#182#0#181#181#181#0#179#179#179#0#177#177
+  +#177#0#176#176#176#0#175#175#175#0#174#174#174#0#172#172#172#0#171#171#171#0
+  +#170#170#170#0#169#169#169#0#168#168#168#0#167#167#167#0#166#166#166#0#164
+  +#164#164#0#163#163#163#0#162#162#162#0#160#160#160#0#159#159#159#0#158#158
+  +#158#0#156#156#156#0#154#154#154#0#153#153#153#0#152#152#152#0#151#151#151#0
+  +'kkk'#0#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2
+  +#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2'66'#2#2#2#2
+  +#2#2'66'#2#2#2#2#2#2'TT'#2#2#2#2#2#2'TT'#2#2#2#2#2'6'#10#26'6'#2#2#2#2'6,'#21
+  +'6'#2#2#2#2'TFLT'#2#2#2#2'TPOT'#2#2#2#2'6'#31#11'46'#2#2'60'#22'/6'#2#2#2#2
+  +'TGDMT'#2#2'TQNST'#2#2#2#2#2'6"'#12'566-'#23'16'#2#2#2#2#2#2'TGCKTTPNRT'#2#2
+  +#2#2#2#2#2'6#'#13#25'2'#22'.6'#2#2#2#2#2#2#2#2'TGBJMNQT'#2#2#2#2#2#2#2#2#2'6'
+  +#30#27#24'36'#2#2#2#2#2#2#2#2#2#2'TGGJOT'#2#2#2#2#2#2#2#2#2#2'6%!'#29#28'6'#2
+  +#2#2#2#2#2#2#2#2#2'TBBEIT'#2#2#2#2#2#2#2#2#2'6'#17#7'(&'#14' 6'#2#2#2#2#2#2#2
+  +#2'T>=CD@HT'#2#2#2#2#2#2#2'6'#8#9#18'66)'#15'$6'#2#2#2#2#2#2'T;:ATTE?GT'#2#2
+  +#2#2#2'6'#3#4#19'6'#2#2'6*'#6'''6'#2#2#2#2'T98@T'#2#2'TG>DT'#2#2#2#2'6'#5#20
+  +'6'#2#2#2#2'6+'#16'6'#2#2#2#2'T7<T'#2#2#2#2'TDAT'#2#2#2#2#2'66'#2#2#2#2#2#2
+  +'66'#2#2#2#2#2#2'TT'#2#2#2#2#2#2'TT'#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2
+  +#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2#2
+  +#2#2#2#2#2#2#2#2#2#11'ModalResult'#2#2#9'NumGlyphs'#2#2#8'TabOrder'#2#3#0#0
+  +#11'TStringGrid'#10'grd_Params'#4'Left'#2'K'#6'Height'#2'p'#3'Top'#2'y'#5'Wi'
+  +'dth'#3'T'#1#8'ColCount'#2#2#10'FixedColor'#7#9'clBtnFace'#4'Flat'#9#7'Optio'
+  +'ns'#11#15'goFixedVertLine'#15'goFixedHorzLine'#10'goVertLine'#10'goHorzLine'
+  +#13'goRangeSelect'#14'goSmoothScroll'#0#8'RowCount'#2#1#8'TabOrder'#2#5#9'Co'
+  +'lWidths'#1#3#140#0#3#198#0#0#5'Cells'#1#2#2#2#0#2#0#6#10'Parameters'#2#1#2#0
+  +#6#5'Value'#0#0#0#17'TRODynamicRequest'#15'fDynamicRequest'#13'RemoteService'
+  +#7#14'fRemoteService'#6'Params'#14#0#4'left'#2#16#3'top'#3#224#0#0#0#16'TROR'
+  +'emoteService'#14'fRemoteService'#4'left'#2'0'#3'top'#3#224#0#0#0#0
+]);
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROLoginNeededForm.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROLoginNeededForm.pas
new file mode 100644
index 0000000..481778f
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROLoginNeededForm.pas	
@@ -0,0 +1,229 @@
+unit uROLoginNeededForm;
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+
+uses
+  {$IFDEF FPC}LResources,{$ELSE}ValEdit,{$ENDIF}
+  {$IFDEF MSWINDOWS}Windows, {$ENDIF}Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
+  Dialogs, StdCtrls, Buttons, Grids,  uRORemoteService,
+  uROClient, uRODynamicRequest, uRODL;
+
+type
+
+  { TROLoginNeededForm }
+
+  {$IFDEF FPC}
+  TValueListEditor = TStringGrid;
+  {$ENDIF}
+
+  TROLoginNeededForm = class(TForm)
+    Label1: TLabel;
+    Label2: TLabel;
+    Label3: TLabel;
+    Label4: TLabel;
+    Label5: TLabel;
+    cb_ServiceName: TComboBox;
+    cb_MethodName: TComboBox;
+    grd_Params: TValueListEditor;
+    cb_MoreCallsNeeded: TCheckBox;
+    btn_Ok: TBitBtn;
+    btn_Cancel: TBitBtn;
+    fDynamicRequest: TRODynamicRequest;
+    fRemoteService: TRORemoteService;
+    procedure cb_ServiceNameChange(Sender: TObject);
+    procedure cb_MethodNameChange(Sender: TObject);
+    procedure btn_OkClick(Sender: TObject);
+  private
+    fRodl: TRODLLibrary;
+    procedure ValidateInput;
+  public
+    constructor Create(aRemoteService: TRORemoteService); reintroduce;
+    class function Execute(aRemoteService: TRORemoteService): boolean;
+  end;
+
+var
+  ROLoginNeededForm: TROLoginNeededForm;
+
+implementation
+
+uses
+  uROClasses;
+{$IFNDEF FPC}
+{$R *.dfm}
+{$ENDIF}
+
+{ TROLoginNeededForm }
+
+class function TROLoginNeededForm.Execute(aRemoteService: TRORemoteService): boolean;
+var
+  lContinue: boolean;
+begin
+  repeat
+    with self.Create(aRemoteService) do try
+      result := (ShowModal() = MrOk);
+      lContinue := result and cb_MoreCallsNeeded.Checked;
+    finally
+      Free();
+    end;
+  until not lContinue;
+end;
+
+constructor TROLoginNeededForm.Create(aRemoteService: TRORemoteService);
+var
+  i: integer;
+  s: TRODLService;
+begin
+  inherited Create(Application);
+  fDynamicRequest.RemoteService.Channel := aRemoteService.Channel;
+  fDynamicRequest.RemoteService.Message := aRemoteService.Message;
+  fRodl := fDynamicRequest.RemoteService.GetRODLLibrary; //ToDo: show PleaseWaitForm?
+
+  cb_ServiceName.Items.Clear();
+  for i := 0 to fRodl.ServiceCount-1 do begin
+    s := fRodl.Services[i];
+    if not s.Abstract then begin
+      cb_ServiceName.Items.Add(s.Name);
+      if Pos('Login',s.Name) = 1 then
+        cb_ServiceName.ItemIndex := cb_ServiceName.Items.Count-1
+      else if Pos('DALogin',s.Name) = 1 then
+        cb_ServiceName.ItemIndex := cb_ServiceName.Items.Count-1;
+    end;
+  end;
+  cb_ServiceNameChange(nil);
+  ValidateInput();
+end;
+
+procedure TROLoginNeededForm.cb_ServiceNameChange(Sender: TObject);
+var
+  lService: TRODLService;
+  m: TRODLOperation;
+  i: integer;
+begin
+  cb_MethodName.Items.Clear();
+  cb_MethodName.Text := '';
+  cb_MethodNameChange(Sender);
+
+  lService := fRodl.FindService(cb_ServiceName.Text);
+  while assigned(lService) do begin
+    for i := 0 to lService.Default.Count-1 do begin
+      m := lService.Default.Items[i];
+      cb_MethodName.Items.Add(m.Name);
+      if Pos('Login',m.Name) = 1 then
+        cb_MethodName.ItemIndex := cb_MethodName.Items.Count-1;
+    end;
+    lService := fRodl.FindService(lService.Ancestor);
+  end;
+  cb_MethodNameChange(Sender);
+  ValidateInput();
+end;
+
+procedure TROLoginNeededForm.cb_MethodNameChange(Sender: TObject);
+var
+  lService: TRODLService;
+  lMethod: TRODLOperation;
+  i: integer;
+  p: TRORequestParam;
+begin
+  {$IFDEF FPC}
+  grd_Params.RowCount:=1;
+  {$ELSE}
+  grd_Params.Strings.Clear();
+  {$ENDIF}
+  fDynamicRequest.MethodName := '';
+  fDynamicRequest.RemoteService.ServiceName := '';
+  fDynamicRequest.Params.Clear();
+  ValidateInput();
+
+  lService := fRodl.FindService(cb_ServiceName.Text);
+  lMethod := nil;
+  while assigned(lService) and not assigned(lMethod) do begin
+    for i := 0 to lService.Default.Count-1 do begin
+      if LowerCase(lService.Default[i].Name) = LowerCase(cb_MethodName.Text) then begin
+        lMethod := lService.Default[i];
+        break;
+      end;
+    end;
+    lService := fRodl.FindService(lService.Ancestor);
+  end;
+  if not assigned(lMethod) then exit;
+
+  fDynamicRequest.MethodName := lMethod.Name;
+  fDynamicRequest.RemoteService.ServiceName := cb_ServiceName.Text;
+  fDynamicRequest.RefreshParams(lMethod, true);
+
+  for i := 0 to fDynamicRequest.Params.Count-1 do begin
+    p := fDynamicRequest.Params[i];
+    if p.Flag in [fIn, fInOut] then begin
+      {$IFDEF FPC}
+        grd_Params.RowCount:=grd_Params.RowCount+1;
+        grd_Params.Cells[0,grd_Params.RowCount-1]:=p.Name+'='{+string(p.Value)};
+      {$ELSE}
+       grd_Params.Strings.Add(p.Name+'='{+string(p.Value)});
+      {$ENDIF}
+    end;
+  end;
+
+  ValidateInput();
+end;
+
+procedure TROLoginNeededForm.btn_OkClick(Sender: TObject);
+
+  procedure SetParamValue(lName , lValue: string);
+  var
+    lParam: TRORequestParam;
+  begin
+    lParam := fDynamicRequest.ParamByName(lName);
+    if assigned(lParam) then begin
+      case lParam.DataType of
+        rtString:  lParam.Value := lValue;
+        rtUTF8String:  lParam.Value := lValue;
+        rtWideString:  lParam.Value := lValue;
+        rtInteger: lParam.Value := StrToInt(lValue);
+        rtInt64:   lParam.Value := StrToInt64(lValue);
+        rtBoolean: lParam.Value := LowerCase(lValue) = 'true';
+      end;
+    end;
+  end;
+
+var
+  i: integer;
+{$IFNDEF FPC}
+  lValue: string;
+{$ENDIF}
+begin
+  if fDynamicRequest.MethodName = '' then exit;
+{$IFDEF FPC}
+  for i := 1 to grd_Params.RowCount-1 do
+    SetParamValue(grd_Params.Cells[0,i],grd_Params.Cells[1,i]);
+{$ELSE}
+  for i := 0 to grd_Params.Strings.Count-1 do begin
+{$IFDEF DELPHI7UP}
+    lValue := grd_Params.Strings.ValueFromIndex[i];
+{$ELSE}
+    lValue := grd_Params.Strings[i];
+    Delete(lValue, 1, pos('=', lValue));
+{$ENDIF}
+    SetParamValue(grd_Params.Strings.Names[i],lValue);
+  end;
+{$ENDIF}
+
+  //using f := new PleaseWaitForm() do
+    fDynamicRequest.Execute();
+end;
+
+procedure TROLoginNeededForm.ValidateInput;
+begin
+  btn_Ok.Enabled := (fDynamicRequest.RemoteService.ServiceName <> '') and (fDynamicRequest.MethodName <> '');
+end;
+
+{$IFDEF FPC}
+initialization
+  {$I uROLoginNeededForm.lrs}
+{$ENDIF FPC}
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROProductVersionInfo.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROProductVersionInfo.pas
new file mode 100644
index 0000000..df2b6c0
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROProductVersionInfo.pas	
@@ -0,0 +1,159 @@
+unit uROProductVersionInfo;
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+{$DEFINE Use_WinInet}
+{$DEFINE Use_Indy}
+{$DEFINE Use_Synapse}
+
+interface
+
+procedure GetVersionInfos(const iTargetUrl:string='');
+procedure RegisterProduct(const iProductID:string; iBuildNo:integer=-1);
+procedure UnregisterProduct(const iProductID:string);
+
+implementation
+
+{$IFNDEF FPC}
+  {$IFDEF MSWINDOWS}
+    // delphi + CBuilder - use always WinInet
+    {$DEFINE Use_WinInet}
+  {$ELSE}
+    // linux
+    {$UNDEF Use_WinInet}
+  {$ENDIF}
+{$ENDIF}
+
+{$IFDEF FPC}
+  {$IFDEF FPC_no_WinINet}
+    {$UNDEF Use_WinInet}
+  {$ENDIF}
+{$ENDIF}
+
+
+{$IFDEF Use_WinInet}
+  {$UNDEF Use_Indy}
+  {$UNDEF Use_Synapse}
+{$ELSE}
+  {$IFDEF Use_Synapse}
+    {$UNDEF Use_Indy}
+  {$ELSE}
+    {$DEFINE Use_Indy}
+  {$ENDIF}
+{$ENDIF}
+
+
+uses
+  uROPleaseWaitForm, uROProductVersionInfo_Intf, uROBinMessage,
+  {$IFDEF Use_WinInet}uROWinInetHttpChannel,{$ENDIF}
+  {$IFDEF Use_Synapse}uROSynapseHTTPChannel,{$ENDIF}
+  {$IFDEF Use_Indy}uROIndyHTTPChannel,{$ENDIF}
+  Classes, SysUtils, Forms, uRoProductVersionInfoForm,
+  Dialogs;
+
+var
+  gProducts:TStringList;
+  
+type
+
+{$IFDEF Use_WinInet}
+  TMyChannel = TROWinInetHTTPChannel;
+{$ENDIF}
+
+{$IFDEF Use_Synapse}
+  TMyChannel = TROSynapseHTTPChannel;
+{$ENDIF}
+
+{$IFDEF Use_Indy}
+  TMyChannel = TROIndyHTTPChannel;
+{$ENDIF}
+
+procedure GetVersionInfos(const iTargetUrl:string='');
+var
+  lProducts:TProductInfoRequestArray;
+  lInfo:TProductInfoArray;
+  i:integer;
+  lMessage:TROBINMessage;
+  lChannel:TMyChannel;
+begin
+  lProducts := TProductInfoRequestArray.Create();
+  try
+    for i := 0 to gProducts.Count-1 do begin
+      with lProducts.Add do begin
+        ProductID := gProducts[i];
+        CurrentBuild := integer(gProducts.Objects[i]);
+      end;
+    end;
+
+    lMessage := TROBinMessage.Create(nil);
+    lChannel := TMyChannel.Create(nil);
+    lChannel.TargetURL := iTargetUrl;
+    if lChannel.TargetURL = '' then
+      lChannel.TargetURL := 'http://www.remobjects.com/isapi/roversioninfo.dll/bin';
+      //lChannel.TargetURL := 'http://localhost:8099/bin';
+
+    try
+
+      with TPleaseWaitForm.Create(Application,'Checking for new product versions...','RemObjects Software') do try
+        Show();
+
+        with CoIProductVersionInfo.Create(lMessage,lChannel) do begin
+          lInfo := GetProductVersions(lProducts);
+        end;
+        try
+
+          Hide();
+          if Assigned(lInfo) and (lInfo.Count > 0) then begin
+            with TProductVersionInfoForm.Create(Application) do try
+              LoadFromInfo(lInfo);
+              ShowModal();
+            finally
+              Free();
+            end;
+          end
+          else begin
+            ShowMessage('You are running the latest versions of all installed products.');
+          end;
+
+        finally
+          FreeAndNil(lInfo);
+        end;
+
+      finally
+        Free();
+      end;
+
+    finally
+      FreeAndNil(lMessage);
+      FreeAndNil(lChannel);
+    end;
+
+  finally
+    lProducts.Free();
+  end;
+end;
+
+procedure RegisterProduct(const iProductID:string; iBuildNo:integer=-1);
+begin
+  gProducts.AddObject(iProductID,pointer(iBuildNo));
+end;
+
+procedure UnregisterProduct(const iProductID:string);
+var
+  lIndex:integer;
+begin
+  lIndex := gProducts.IndexOf(iProductID);
+  if lIndex <> -1 then gProducts.Delete(lIndex);
+end;
+
+initialization
+  gProducts := TStringList.Create();
+  gProducts.Sorted := true;
+  gProducts.Duplicates := dupIgnore;
+finalization
+  FreeAndNil(gProducts);
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROProductVersionInfoForm.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROProductVersionInfoForm.dfm
new file mode 100644
index 0000000..bbe139c
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROProductVersionInfoForm.dfm	
@@ -0,0 +1,154 @@
+object ProductVersionInfoForm: TProductVersionInfoForm
+  Left = 349
+  Top = 212
+  AutoScroll = False
+  Caption = 'RemObjects Software - New Product Versions'
+  ClientHeight = 225
+  ClientWidth = 393
+  Color = clBtnFace
+  Constraints.MinHeight = 250
+  Constraints.MinWidth = 280
+  ParentFont = True
+  OldCreateOrder = False
+  Position = poScreenCenter
+  PixelsPerInch = 96
+  TextHeight = 13
+  object Label1: TLabel
+    Left = 8
+    Top = 8
+    Width = 345
+    Height = 26
+    Caption = 
+      'New versions of the following RemObjects Software products you h' +
+      'ave installed are available:'
+    WordWrap = True
+  end
+  object lv_Info: TListView
+    Left = 8
+    Top = 40
+    Width = 377
+    Height = 146
+    Anchors = [akLeft, akTop, akRight, akBottom]
+    Columns = <
+      item
+        Caption = 'Product'
+        Width = 150
+      end
+      item
+        Caption = 'Version'
+        Width = 100
+      end
+      item
+        Caption = 'Date'
+        Width = -2
+        WidthType = (
+          -2)
+      end>
+    HotTrack = True
+    ReadOnly = True
+    RowSelect = True
+    TabOrder = 0
+    ViewStyle = vsReport
+    OnDblClick = btn_ShowDetailsClick
+  end
+  object BitBtn1: TBitBtn
+    Left = 310
+    Top = 192
+    Width = 75
+    Height = 25
+    Anchors = [akRight, akBottom]
+    Caption = 'OK'
+    Default = True
+    ModalResult = 1
+    TabOrder = 1
+    Glyph.Data = {
+      36060000424D3606000000000000360000002800000020000000100000000100
+      18000000000000060000C40E0000C40E00000000000000000000FF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FF006600006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565656565FF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FF0066001EB2311FB133006600FF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6565659A9A9A9A9A9A65
+      6565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FF00660031C24F22B7381AB02D21B437006600FF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565ABABAB9E9E9E9797979C
+      9C9C656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      00660047D36D3BCB5E25A83B0066001BA92E1DB132006600FF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FF656565BFBFBFB5B5B598989865656594
+      9494999999656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF006600
+      4FD67953DE7F31B54D006600FF00FF006600179D271EAE31006600FF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FF656565C4C4C4CACACAA5A5A5656565FF00FF65
+      65658C8C8C989898656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      00660041C563006600FF00FFFF00FFFF00FFFF00FF00660019AA2B006600FF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FF656565B5B5B5656565FF00FFFF00FFFF
+      00FFFF00FF656565939393656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FF006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF006600149D210066
+      00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565FF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FF6565658A8A8A656565FF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0066
+      00006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FF656565656565FF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FF006600006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565656565FF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
+    NumGlyphs = 2
+  end
+  object btn_ShowDetails: TBitBtn
+    Left = 8
+    Top = 192
+    Width = 97
+    Height = 25
+    Anchors = [akLeft, akBottom]
+    Caption = 'Show Details'
+    TabOrder = 2
+    OnClick = btn_ShowDetailsClick
+    Glyph.Data = {
+      36030000424D3603000000000000360000002800000010000000100000000100
+      18000000000000030000120B0000120B00000000000000000000FF00FFFF00FF
+      015603FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FF015603015503FF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF025904
+      035D06FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FF046208096F11FF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF06690D
+      18932D015603FF00FFFF00FFFF00FFFF00FFFF00FF015403FF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FF06680D2CB84F096B10FF00FFFF00FFFF00FFFF
+      00FFFF00FF015403015403FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF035A06
+      2BB44C25AB43015202FF00FFFF00FFFF00FFFF00FF01540307840F015403FF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FF168A2842E2761C9C3301540301540301
+      5302015202015403099813047D0B015403FF00FFFF00FFFF00FFFF00FFFF00FF
+      02560429B1493FE06F28B74816982A139825169C280E911C099313058F0D0582
+      0D015403FF00FFFF00FFFF00FFFF00FFFF00FF03580524A94136D3622ECC5424
+      BD421BAF3213A3250C9818068F0F06920E078110015403FF00FFFF00FFFF00FF
+      FF00FFFF00FF0156030D77181FA53923B43F1EB13718AA2D0F9D1F0A98150A7F
+      14015403FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF02570403
+      5B06035D0701540315AB29097811015403FF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF015403097611015403FF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FF015403015403FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF015403FF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROProductVersionInfoForm.lfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROProductVersionInfoForm.lfm
new file mode 100644
index 0000000..75517e4
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROProductVersionInfoForm.lfm	
@@ -0,0 +1,154 @@
+object ProductVersionInfoForm: TProductVersionInfoForm
+  Left = 444
+  Height = 225
+  Top = 248
+  Width = 393
+  HorzScrollBar.Page = 392
+  VertScrollBar.Page = 224
+  ActiveControl = lv_Info
+  Caption = 'RemObjects Software - New Product Versions'
+  ClientHeight = 225
+  ClientWidth = 393
+  Constraints.MinHeight = 225
+  Constraints.MinWidth = 280
+  Font.Height = -11
+  Font.Name = 'Tahoma'
+  Position = poScreenCenter
+  object Label1: TLabel
+    Left = 8
+    Height = 31
+    Top = 8
+    Width = 378
+    Caption = 'New versions of the following RemObjects Software products you have installed are available:'
+    ParentColor = False
+    WordWrap = True
+  end
+  object lv_Info: TListView
+    Left = 8
+    Height = 146
+    Top = 40
+    Width = 377
+    Anchors = [akTop, akLeft, akRight, akBottom]
+    Columns = <    
+      item
+        Caption = 'Product'
+        Width = 150
+      end    
+      item
+        Caption = 'Version'
+        Width = 100
+      end    
+      item
+        Caption = 'Date'
+        Width = 123
+      end>
+    ReadOnly = True
+    RowSelect = True
+    TabOrder = 0
+    ViewStyle = vsReport
+    OnDblClick = btn_ShowDetailsClick
+  end
+  object BitBtn1: TBitBtn
+    Left = 304
+    Height = 25
+    Top = 193
+    Width = 81
+    Anchors = [akRight, akBottom]
+    Caption = 'OK'
+    Default = True
+    Glyph.Data = {
+      36060000424D3606000000000000360000002800000020000000100000000100
+      18000000000000060000C40E0000C40E00000000000000000000FF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FF006600006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565656565FF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FF0066001EB2311FB133006600FF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6565659A9A9A9A9A9A65
+      6565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FF00660031C24F22B7381AB02D21B437006600FF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565ABABAB9E9E9E9797979C
+      9C9C656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      00660047D36D3BCB5E25A83B0066001BA92E1DB132006600FF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FF656565BFBFBFB5B5B598989865656594
+      9494999999656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF006600
+      4FD67953DE7F31B54D006600FF00FF006600179D271EAE31006600FF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FF656565C4C4C4CACACAA5A5A5656565FF00FF65
+      65658C8C8C989898656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      00660041C563006600FF00FFFF00FFFF00FFFF00FF00660019AA2B006600FF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FF656565B5B5B5656565FF00FFFF00FFFF
+      00FFFF00FF656565939393656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FF006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF006600149D210066
+      00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565FF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FF6565658A8A8A656565FF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0066
+      00006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FF656565656565FF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FF006600006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565656565FF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+    }
+    ModalResult = 1
+    NumGlyphs = 2
+    TabOrder = 1
+  end
+  object btn_ShowDetails: TBitBtn
+    Left = 8
+    Height = 25
+    Top = 193
+    Width = 100
+    Anchors = [akLeft, akBottom]
+    Caption = 'Show Details'
+    Glyph.Data = {
+      36030000424D3603000000000000360000002800000010000000100000000100
+      18000000000000030000120B0000120B00000000000000000000FF00FFFF00FF
+      015603FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FF015603015503FF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF025904
+      035D06FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FF046208096F11FF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF06690D
+      18932D015603FF00FFFF00FFFF00FFFF00FFFF00FF015403FF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FF06680D2CB84F096B10FF00FFFF00FFFF00FFFF
+      00FFFF00FF015403015403FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF035A06
+      2BB44C25AB43015202FF00FFFF00FFFF00FFFF00FF01540307840F015403FF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FF168A2842E2761C9C3301540301540301
+      5302015202015403099813047D0B015403FF00FFFF00FFFF00FFFF00FFFF00FF
+      02560429B1493FE06F28B74816982A139825169C280E911C099313058F0D0582
+      0D015403FF00FFFF00FFFF00FFFF00FFFF00FF03580524A94136D3622ECC5424
+      BD421BAF3213A3250C9818068F0F06920E078110015403FF00FFFF00FFFF00FF
+      FF00FFFF00FF0156030D77181FA53923B43F1EB13718AA2D0F9D1F0A98150A7F
+      14015403FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF02570403
+      5B06035D0701540315AB29097811015403FF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF015403097611015403FF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FF015403015403FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF015403FF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+    }
+    NumGlyphs = 0
+    OnClick = btn_ShowDetailsClick
+    TabOrder = 2
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROProductVersionInfoForm.lrs b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROProductVersionInfoForm.lrs
new file mode 100644
index 0000000..feecc4a
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROProductVersionInfoForm.lrs	
@@ -0,0 +1,126 @@
+{ This is an automatically generated lazarus resource file }
+
+LazarusResources.Add('TProductVersionInfoForm','FORMDATA',[
+  'TPF0'#23'TProductVersionInfoForm'#22'ProductVersionInfoForm'#4'Left'#3#188#1
+  +#6'Height'#3#225#0#3'Top'#3#248#0#5'Width'#3#137#1#18'HorzScrollBar.Page'#3
+  +#136#1#18'VertScrollBar.Page'#3#224#0#13'ActiveControl'#7#7'lv_Info'#7'Capti'
+  +'on'#6'*RemObjects Software - New Product Versions'#12'ClientHeight'#3#225#0
+  +#11'ClientWidth'#3#137#1#21'Constraints.MinHeight'#3#225#0#20'Constraints.Mi'
+  +'nWidth'#3#24#1#11'Font.Height'#2#245#9'Font.Name'#6#6'Tahoma'#8'Position'#7
+  +#14'poScreenCenter'#0#6'TLabel'#6'Label1'#4'Left'#2#8#6'Height'#2#31#3'Top'#2
+  +#8#5'Width'#3'z'#1#7'Caption'#6'\New versions of the following RemObjects So'
+  +'ftware products you have installed are available:'#11'ParentColor'#8#8'Word'
+  +'Wrap'#9#0#0#9'TListView'#7'lv_Info'#4'Left'#2#8#6'Height'#3#146#0#3'Top'#2
+  +'('#5'Width'#3'y'#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0
+  +#7'Columns'#14#1#7'Caption'#6#7'Product'#5'Width'#3#150#0#0#1#7'Caption'#6#7
+  +'Version'#5'Width'#2'd'#0#1#7'Caption'#6#4'Date'#5'Width'#2'{'#0#0#8'ReadOnl'
+  +'y'#9#9'RowSelect'#9#8'TabOrder'#2#0#9'ViewStyle'#7#8'vsReport'#10'OnDblClic'
+  +'k'#7#20'btn_ShowDetailsClick'#0#0#7'TBitBtn'#7'BitBtn1'#4'Left'#3'0'#1#6'He'
+  +'ight'#2#25#3'Top'#3#193#0#5'Width'#2'Q'#7'Anchors'#11#7'akRight'#8'akBottom'
+  +#0#7'Caption'#6#2'OK'#7'Default'#9#10'Glyph.Data'#10':'#6#0#0'6'#6#0#0'BM6'#6
+  +#0#0#0#0#0#0'6'#0#0#0'('#0#0#0' '#0#0#0#16#0#0#0#1#0#24#0#0#0#0#0#0#6#0#0#196
+  +#14#0#0#196#14#0#0#0#0#0#0#0#0#0#0#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0'f'#0#0'f'#0#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'eeeeee'#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#0'f'#0#30#178'1'#31#177'3'#0'f'#0
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255'eee'#154#154#154#154#154#154'ee'
+  +'e'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#0'f'#0'1'#194'O"'#183'8'#26#176'-!'#180
+  +'7'#0'f'#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255'eee'#171#171#171#158#158#158#151#151#151
+  +#156#156#156'eee'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#0'f'#0'G'#211'm;'#203'^%'#168';'#0'f'#0#27#169
+  +'.'#29#177'2'#0'f'#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255'eee'#191#191#191#181#181#181#152#152#152'eee'#148
+  +#148#148#153#153#153'eee'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#0'f'#0'O'#214'yS'#222'1'#181'M'#0'f'#0#255#0#255#0'f'#0
+  +#23#157''''#30#174'1'#0'f'#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255'eee'#196#196#196#202#202#202#165#165#165'eee'#255#0#255'eee'
+  +#140#140#140#152#152#152'eee'#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#0'f'#0'A'#197'c'#0'f'#0#255#0#255#255#0#255#255#0
+  +#255#255#0#255#0'f'#0#25#170'+'#0'f'#0#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255'eee'#181#181#181'eee'#255#0#255#255#0#255#255#0#255
+  +#255#0#255'eee'#147#147#147'eee'#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#0'f'#0#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#0'f'#0#20#157'!'#0'f'#0#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255'eee'#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255'eee'#138#138#138'eee'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#0'f'#0#0'f'#0#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255'eeeeee'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0'f'#0#0'f'#0#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'eeeeee'#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  ,#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#11'ModalResult'#2#1#9'NumGlyphs'#2#2#8'TabOrder'#2#1#0#0
+  +#7'TBitBtn'#15'btn_ShowDetails'#4'Left'#2#8#6'Height'#2#25#3'Top'#3#193#0#5
+  +'Width'#2'd'#7'Anchors'#11#6'akLeft'#8'akBottom'#0#7'Caption'#6#12'Show Deta'
+  +'ils'#10'Glyph.Data'#10':'#3#0#0'6'#3#0#0'BM6'#3#0#0#0#0#0#0'6'#0#0#0'('#0#0
+  +#0#16#0#0#0#16#0#0#0#1#0#24#0#0#0#0#0#0#3#0#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0
+  +#0#0#255#0#255#255#0#255#1'V'#3#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#1'V'#3#1'U'#3#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#2'Y'#4#3']'#6#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#4'b'#8#9'o'#17#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#6'i'#13#24#147'-'#1'V'#3#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#1'T'#3#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#6'h'#13','#184'O'#9'k'#16#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#1'T'#3#1'T'#3#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#3'Z'#6'+'#180'L%'#171'C'#1'R'#2#255#0#255
+  +#255#0#255#255#0#255#255#0#255#1'T'#3#7#132#15#1'T'#3#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#22#138'(B'#226'v'#28#156'3'#1'T'#3#1'T'
+  +#3#1'S'#2#1'R'#2#1'T'#3#9#152#19#4'}'#11#1'T'#3#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#2'V'#4')'#177'I?'#224'o('#183'H'#22#152'*'#19#152'%'#22
+  +#156'('#14#145#28#9#147#19#5#143#13#5#130#13#1'T'#3#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#3'X'#5'$'#169'A6'#211'b.'#204'T$'#189'B'#27#175'2'
+  +#19#163'%'#12#152#24#6#143#15#6#146#14#7#129#16#1'T'#3#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#1'V'#3#13'w'#24#31#165'9#'#180'?'#30#177'7'#24
+  +#170'-'#15#157#31#10#152#21#10''#20#1'T'#3#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#2'W'#4#3'['#6#3']'#7#1'T'#3#21
+  +#171')'#9'x'#17#1'T'#3#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#1'T'#3#9
+  +'v'#17#1'T'#3#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#1'T'#3#1
+  +'T'#3#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#1'T'#3
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#9'Num'
+  +'Glyphs'#2#0#7'OnClick'#7#20'btn_ShowDetailsClick'#8'TabOrder'#2#2#0#0#0
+]);
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROProductVersionInfoForm.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROProductVersionInfoForm.pas
new file mode 100644
index 0000000..2da1ae7
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROProductVersionInfoForm.pas	
@@ -0,0 +1,87 @@
+unit uROProductVersionInfoForm;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+
+uses
+  {$IFDEF FPC}LCLIntf, LResources,{$ENDIF}
+  {$IFDEF MSWINDOWS}Windows,{$ENDIF}
+  Messages, SysUtils, Classes, Graphics, Controls, Forms,
+  Dialogs, StdCtrls, Buttons, ComCtrls, uROProductVersionInfo_Intf;
+
+type
+  TProductVersionInfoForm = class(TForm)
+    Label1: TLabel;
+    lv_Info: TListView;
+    BitBtn1: TBitBtn;
+    btn_ShowDetails: TBitBtn;
+    procedure btn_ShowDetailsClick(Sender: TObject);
+  private
+    { Private declarations }
+  public
+    procedure LoadFromInfo(iInfo:TProductInfoArray);
+  end;
+
+var
+  ProductVersionInfoForm: TProductVersionInfoForm;
+
+implementation
+
+uses
+  {$IFDEF VER140UO}DateUtils,{$ENDIF}
+  {$IFDEF FPC}uROIDETools_laz{$ELSE}ShellAPI{$ENDIF};
+
+{$IFNDEF FPC}
+{$R *.dfm}
+{$ENDIF}
+
+
+{ TProductVersionInfoForm }
+
+procedure TProductVersionInfoForm.LoadFromInfo(iInfo: TProductInfoArray);
+var
+  i:integer;
+begin
+  for i := 0 to iInfo.Count-1 do begin
+    with lv_Info.Items.Add do begin
+      Caption := iInfo[i].Name;
+      SubItems.Add(iInfo[i].Version);
+      SubItems.Add(DateToStr(iInfo[i].Date));
+      SubItems.Add(iInfo[i].Url);
+    end;
+    if (lv_Info.Items.Count > 0) then lv_Info.Selected := lv_Info.Items[0];
+  end;
+end;
+
+procedure TProductVersionInfoForm.btn_ShowDetailsClick(Sender: TObject);
+begin
+  if Assigned(lv_Info.Selected) then
+    {$IFDEF FPC}
+    RO_ShellExecute
+    {$ELSE}
+    ShellExecute
+    {$ENDIF}(Handle,'open',pChar(lv_Info.Selected.SubItems[2]),nil,nil,SW_SHOWNORMAL);
+end;
+
+{$IFDEF FPC}
+initialization
+  {$I uROProductVersionInfoForm.lrs}
+{$ENDIF FPC}
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROProductVersionInfo_Intf.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROProductVersionInfo_Intf.pas
new file mode 100644
index 0000000..8d450a8
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROProductVersionInfo_Intf.pas	
@@ -0,0 +1,787 @@
+unit uROProductVersionInfo_Intf;
+
+{----------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project .                               }
+{                                                                            }
+{ Do not modify this unit manually, or your changes will be lost when this   }
+{ unit is regenerated the next time you compile the project.                 }
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+
+uses
+  {vcl:} Classes, TypInfo,
+  {RemObjects:} uROClient, uROTypes, uROClientIntf;
+
+const
+  LibraryUID = '{5CC581CD-7668-485C-A064-8005B23FDE09}';
+
+  IProductVersionInfo_IID : TGUID = '{E733F99C-DEC6-45F9-ACBD-B93A9D35E924}';
+
+type
+  { Forward declarations }
+  IProductVersionInfo = interface;
+  TProductInfoRequestArray = class;
+  TProductInfoArray = class;
+  TProductArray = class;
+  TProductInfo = class;
+  TProductInfoRequest = class;
+  TProduct = class;
+
+  { TProductInfo }
+  TProductInfo = class(TROComplexType)
+  private
+    fProductVersionID:String;
+    fName:String;
+    fVersion:String;
+    fInfo:String;
+    fUrl:String;
+    fBeta:Boolean;
+    fTrial:Boolean;
+    fFinal:Boolean;
+    fPaid:Boolean;
+    fDate:DateTime;
+  public
+    procedure Assign(iSource:TPersistent); override;
+  published
+    property ProductVersionID:String read fProductVersionID write fProductVersionID;
+    property Name:String read fName write fName;
+    property Version:String read fVersion write fVersion;
+    property Info:String read fInfo write fInfo;
+    property Url:String read fUrl write fUrl;
+    property Beta:Boolean read fBeta write fBeta;
+    property Trial:Boolean read fTrial write fTrial;
+    property Final:Boolean read fFinal write fFinal;
+    property Paid:Boolean read fPaid write fPaid;
+    property Date:DateTime read fDate write fDate;
+  end;
+
+  { TProductInfoCollection }
+  TProductInfoCollection = class(TCollection)
+  protected
+    constructor Create(aItemClass: TCollectionItemClass); overload;
+    function GetItems(Index: integer): TProductInfo;
+    procedure SetItems(Index: integer; const Value: TProductInfo);
+  public
+    constructor Create; overload;
+    function Add: TProductInfo; reintroduce;
+    procedure SaveToArray(anArray : TProductInfoArray);
+    procedure LoadFromArray(anArray : TProductInfoArray);
+    property Items[Index : integer] : TProductInfo read GetItems write SetItems; default;
+  end;
+
+  { TProductInfoRequest }
+  TProductInfoRequest = class(TROComplexType)
+  private
+    fProductID:String;
+    fCurrentBuild:Integer;
+    fTrialOnly:Boolean;
+    fBetasToo:Boolean;
+  public
+    procedure Assign(iSource:TPersistent); override;
+  published
+    property ProductID:String read fProductID write fProductID;
+    property CurrentBuild:Integer read fCurrentBuild write fCurrentBuild;
+    property TrialOnly:Boolean read fTrialOnly write fTrialOnly;
+    property BetasToo:Boolean read fBetasToo write fBetasToo;
+  end;
+
+  { TProductInfoRequestCollection }
+  TProductInfoRequestCollection = class(TCollection)
+  protected
+    constructor Create(aItemClass: TCollectionItemClass); overload;
+    function GetItems(Index: integer): TProductInfoRequest;
+    procedure SetItems(Index: integer; const Value: TProductInfoRequest);
+  public
+    constructor Create; overload;
+    function Add: TProductInfoRequest; reintroduce;
+    procedure SaveToArray(anArray : TProductInfoRequestArray);
+    procedure LoadFromArray(anArray : TProductInfoRequestArray);
+    property Items[Index : integer] : TProductInfoRequest read GetItems write SetItems; default;
+  end;
+
+  { TProduct }
+  TProduct = class(TROComplexType)
+  private
+    fProductID:String;
+    fName:String;
+  public
+    procedure Assign(iSource:TPersistent); override;
+  published
+    property ProductID:String read fProductID write fProductID;
+    property Name:String read fName write fName;
+  end;
+
+  { TProductCollection }
+  TProductCollection = class(TCollection)
+  protected
+    constructor Create(aItemClass: TCollectionItemClass); overload;
+    function GetItems(Index: integer): TProduct;
+    procedure SetItems(Index: integer; const Value: TProduct);
+  public
+    constructor Create; overload;
+    function Add: TProduct; reintroduce;
+    procedure SaveToArray(anArray : TProductArray);
+    procedure LoadFromArray(anArray : TProductArray);
+    property Items[Index : integer] : TProduct read GetItems write SetItems; default;
+  end;
+
+  { TProductInfoRequestArray }
+  TProductInfoRequestArray = class(TROArray)
+  private
+    fItems : array of TProductInfoRequest;
+  protected
+    function GetItems(Index : integer) : TProductInfoRequest;
+    procedure SetItems(Index : integer; const Value : TProductInfoRequest);
+    function GetCount : integer; override;
+  public
+    class function GetItemType : PTypeInfo; override;
+    class function GetItemClass : TClass; override;
+    class function GetItemSize : integer; override;
+    function GetItemRef(Index : integer) : pointer; override;
+    procedure SetItemRef(Index: integer; Ref : pointer); override;
+    procedure Clear; override;
+    procedure Delete(Index : integer); override;
+    procedure Resize(ElementCount : integer); override;
+
+    procedure Assign(iSource:TPersistent); override;
+    function Add:TProductInfoRequest; overload;
+    function Add(const Value:TProductInfoRequest):integer; overload;
+
+    property Count : integer read GetCount;
+    property Items[Index : integer] : TProductInfoRequest read GetItems write SetItems; default;
+  end;
+
+  { TProductInfoArray }
+  TProductInfoArray = class(TROArray)
+  private
+    fItems : array of TProductInfo;
+  protected
+    function GetItems(Index : integer) : TProductInfo;
+    procedure SetItems(Index : integer; const Value : TProductInfo);
+    function GetCount : integer; override;
+  public
+    class function GetItemType : PTypeInfo; override;
+    class function GetItemClass : TClass; override;
+    class function GetItemSize : integer; override;
+    function GetItemRef(Index : integer) : pointer; override;
+    procedure SetItemRef(Index: integer; Ref : pointer); override;
+    procedure Clear; override;
+    procedure Delete(Index : integer); override;
+    procedure Resize(ElementCount : integer); override;
+
+    procedure Assign(iSource:TPersistent); override;
+    function Add:TProductInfo; overload;
+    function Add(const Value:TProductInfo):integer; overload;
+
+    property Count : integer read GetCount;
+    property Items[Index : integer] : TProductInfo read GetItems write SetItems; default;
+  end;
+
+  { TProductArray }
+  TProductArray = class(TROArray)
+  private
+    fItems : array of TProduct;
+  protected
+    function GetItems(Index : integer) : TProduct;
+    procedure SetItems(Index : integer; const Value : TProduct);
+    function GetCount : integer; override;
+  public
+    class function GetItemType : PTypeInfo; override;
+    class function GetItemClass : TClass; override;
+    class function GetItemSize : integer; override;
+    function GetItemRef(Index : integer) : pointer; override;
+    procedure SetItemRef(Index: integer; Ref : pointer); override;
+    procedure Clear; override;
+    procedure Delete(Index : integer); override;
+    procedure Resize(ElementCount : integer); override;
+
+    procedure Assign(iSource:TPersistent); override;
+    function Add:TProduct; overload;
+    function Add(const Value:TProduct):integer; overload;
+
+    property Count : integer read GetCount;
+    property Items[Index : integer] : TProduct read GetItems write SetItems; default;
+  end;
+
+  { IProductVersionInfo }
+  IProductVersionInfo = interface
+    ['{E733F99C-DEC6-45F9-ACBD-B93A9D35E924}']
+    function GetProducts: TProductArray;
+    function GetProductVersions(const iProducts: TProductInfoRequestArray): TProductInfoArray;
+  end;
+
+  { CoIProductVersionInfo }
+  CoIProductVersionInfo = class
+    class function Create(const aMessage : IROMessage; aTransportChannel : IROTransportChannel) : IProductVersionInfo;
+  end;
+
+  TIProductVersionInfo_Proxy = class(TROProxy, IProductVersionInfo)
+  protected
+    function __GetInterfaceName:string; override;
+
+    function GetProducts: TProductArray;
+    function GetProductVersions(const iProducts: TProductInfoRequestArray): TProductInfoArray;
+  end;
+
+implementation
+
+uses
+  {vcl:} SysUtils,
+  {RemObjects:} uROClasses, uRORes;
+
+{ TProductInfoRequestArray }
+
+procedure TProductInfoRequestArray.Assign(iSource:TPersistent); 
+var lSource:TProductInfoRequestArray;
+    i:integer;
+begin
+  if (iSource is TProductInfoRequestArray) then begin
+    lSource := TProductInfoRequestArray(iSource);
+    Clear();
+    Resize(lSource.Count);
+    for i := 0 to Count-1 do begin
+      if Assigned(lSource.Items[i]) then begin
+        Items[i] := lSource.Items[i].Clone() as TProductInfoRequest;
+      end;
+    end;
+  end
+  else begin
+    inherited Assign(iSource);
+  end;
+end;
+
+class function TProductInfoRequestArray.GetItemType : PTypeInfo;
+begin
+  result := TypeInfo(TProductInfoRequest);
+end;
+
+class function TProductInfoRequestArray.GetItemClass : TClass;
+begin
+  result := TProductInfoRequest;
+end;
+
+class function TProductInfoRequestArray.GetItemSize : integer;
+begin
+  result := SizeOf(TProductInfoRequest);
+end;
+
+function TProductInfoRequestArray.GetItems(Index : integer) : TProductInfoRequest;
+begin
+  if (Index < 0) or (Index >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[Index]);
+  result := fItems[Index];
+end;
+
+function TProductInfoRequestArray.GetItemRef(Index : integer) : pointer;
+begin
+  result := fItems[Index];
+end;
+
+procedure TProductInfoRequestArray.SetItemRef(Index: integer; Ref : pointer);
+begin
+  fItems[Index] := ref
+end;
+
+procedure TProductInfoRequestArray.Clear;
+var i : integer;
+begin
+  for i := 0 to (Count-1) do fItems[i].Free;
+  SetLength(fItems, 0);
+end;
+
+procedure TProductInfoRequestArray.Delete(Index : integer);
+var i : integer;
+begin
+  if (Index>=Count) then RaiseError(err_InvalidIndex, [Index]);
+
+  fItems[Index].Free;
+
+  if (Index<Count-1) then
+    for i := Index to Count-1 do fItems[i] := fItems[i+1];
+
+  SetLength(fItems, Count-1)
+end;
+
+procedure TProductInfoRequestArray.SetItems(Index : integer; const Value : TProductInfoRequest);
+begin
+  fItems[Index] := Value;
+end;
+
+procedure TProductInfoRequestArray.Resize(ElementCount : integer);
+begin
+  SetLength(fItems, ElementCount);
+end;
+
+function TProductInfoRequestArray.GetCount: integer;
+begin
+  result := Length(fItems);
+end;
+
+function TProductInfoRequestArray.Add:TProductInfoRequest;
+begin
+  result := TProductInfoRequest.Create;
+  SetLength(fItems, Length(fItems)+1);
+  fItems[Length(fItems)-1] := result;
+end;
+
+function TProductInfoRequestArray.Add(const Value:TProductInfoRequest):integer;
+begin
+  SetLength(fItems, Length(fItems)+1);
+  result := Length(fItems)-1;
+  fItems[result] := Value;
+end;
+
+{ TProductInfoArray }
+
+procedure TProductInfoArray.Assign(iSource:TPersistent); 
+var lSource:TProductInfoArray;
+    i:integer;
+begin
+  if (iSource is TProductInfoArray) then begin
+    lSource := TProductInfoArray(iSource);
+    Clear();
+    Resize(lSource.Count);
+    for i := 0 to Count-1 do begin
+      if Assigned(lSource.Items[i]) then begin
+        Items[i] := lSource.Items[i].Clone() as TProductInfo;
+      end;
+    end;
+  end
+  else begin
+    inherited Assign(iSource);
+  end;
+end;
+
+class function TProductInfoArray.GetItemType : PTypeInfo;
+begin
+  result := TypeInfo(TProductInfo);
+end;
+
+class function TProductInfoArray.GetItemClass : TClass;
+begin
+  result := TProductInfo;
+end;
+
+class function TProductInfoArray.GetItemSize : integer;
+begin
+  result := SizeOf(TProductInfo);
+end;
+
+function TProductInfoArray.GetItems(Index : integer) : TProductInfo;
+begin
+  if (Index < 0) or (Index >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[Index]);
+  result := fItems[Index];
+end;
+
+function TProductInfoArray.GetItemRef(Index : integer) : pointer;
+begin
+  result := fItems[Index];
+end;
+
+procedure TProductInfoArray.SetItemRef(Index: integer; Ref : pointer);
+begin
+  fItems[Index] := ref
+end;
+
+procedure TProductInfoArray.Clear;
+var i : integer;
+begin
+  for i := 0 to (Count-1) do fItems[i].Free;
+  SetLength(fItems, 0);
+end;
+
+procedure TProductInfoArray.Delete(Index : integer);
+var i : integer;
+begin
+  if (Index>=Count) then RaiseError(err_InvalidIndex, [Index]);
+
+  fItems[Index].Free;
+
+  if (Index<Count-1) then
+    for i := Index to Count-1 do fItems[i] := fItems[i+1];
+
+  SetLength(fItems, Count-1)
+end;
+
+procedure TProductInfoArray.SetItems(Index : integer; const Value : TProductInfo);
+begin
+  fItems[Index] := Value;
+end;
+
+procedure TProductInfoArray.Resize(ElementCount : integer);
+begin
+  SetLength(fItems, ElementCount);
+end;
+
+function TProductInfoArray.GetCount: integer;
+begin
+  result := Length(fItems);
+end;
+
+function TProductInfoArray.Add:TProductInfo;
+begin
+  result := TProductInfo.Create;
+  SetLength(fItems, Length(fItems)+1);
+  fItems[Length(fItems)-1] := result;
+end;
+
+function TProductInfoArray.Add(const Value:TProductInfo):integer;
+begin
+  SetLength(fItems, Length(fItems)+1);
+  result := Length(fItems)-1;
+  fItems[result] := Value;
+end;
+
+{ TProductArray }
+
+procedure TProductArray.Assign(iSource:TPersistent); 
+var lSource:TProductArray;
+    i:integer;
+begin
+  if (iSource is TProductArray) then begin
+    lSource := TProductArray(iSource);
+    Clear();
+    Resize(lSource.Count);
+    for i := 0 to Count-1 do begin
+      if Assigned(lSource.Items[i]) then begin
+        Items[i] := lSource.Items[i].Clone() as TProduct;
+      end;
+    end;
+  end
+  else begin
+    inherited Assign(iSource);
+  end;
+end;
+
+class function TProductArray.GetItemType : PTypeInfo;
+begin
+  result := TypeInfo(TProduct);
+end;
+
+class function TProductArray.GetItemClass : TClass;
+begin
+  result := TProduct;
+end;
+
+class function TProductArray.GetItemSize : integer;
+begin
+  result := SizeOf(TProduct);
+end;
+
+function TProductArray.GetItems(Index : integer) : TProduct;
+begin
+  if (Index < 0) or (Index >= Count) then RaiseError(err_ArrayIndexOutOfBounds,[Index]);
+  result := fItems[Index];
+end;
+
+function TProductArray.GetItemRef(Index : integer) : pointer;
+begin
+  result := fItems[Index];
+end;
+
+procedure TProductArray.SetItemRef(Index: integer; Ref : pointer);
+begin
+  fItems[Index] := ref
+end;
+
+procedure TProductArray.Clear;
+var i : integer;
+begin
+  for i := 0 to (Count-1) do fItems[i].Free;
+  SetLength(fItems, 0);
+end;
+
+procedure TProductArray.Delete(Index : integer);
+var i : integer;
+begin
+  if (Index>=Count) then RaiseError(err_InvalidIndex, [Index]);
+
+  fItems[Index].Free;
+
+  if (Index<Count-1) then
+    for i := Index to Count-1 do fItems[i] := fItems[i+1];
+
+  SetLength(fItems, Count-1)
+end;
+
+procedure TProductArray.SetItems(Index : integer; const Value : TProduct);
+begin
+  fItems[Index] := Value;
+end;
+
+procedure TProductArray.Resize(ElementCount : integer);
+begin
+  SetLength(fItems, ElementCount);
+end;
+
+function TProductArray.GetCount: integer;
+begin
+  result := Length(fItems);
+end;
+
+function TProductArray.Add:TProduct;
+begin
+  result := TProduct.Create;
+  SetLength(fItems, Length(fItems)+1);
+  fItems[Length(fItems)-1] := result;
+end;
+
+function TProductArray.Add(const Value:TProduct):integer;
+begin
+  SetLength(fItems, Length(fItems)+1);
+  result := Length(fItems)-1;
+  fItems[result] := Value;
+end;
+
+{ TProductInfo }
+
+procedure TProductInfo.Assign(iSource:TPersistent); 
+var lSource:TProductInfo;
+begin
+  inherited Assign(iSource);
+  if (iSource is TProductInfo) then begin
+    lSource := iSource as TProductInfo;
+    ProductVersionID := lSource.ProductVersionID;
+    Name := lSource.Name;
+    Version := lSource.Version;
+    Info := lSource.Info;
+    Url := lSource.Url;
+    Beta := lSource.Beta;
+    Trial := lSource.Trial;
+    Final := lSource.Final;
+    Paid := lSource.Paid;
+    Date := lSource.Date;
+  end;
+end;
+
+{ TProductInfoCollection }
+constructor TProductInfoCollection.Create;
+begin
+  inherited Create(TProductInfo);
+end;
+
+constructor TProductInfoCollection.Create(aItemClass:TCollectionItemClass);
+begin
+  inherited Create(aItemClass);
+end;
+
+function TProductInfoCollection.Add: TProductInfo;
+begin
+  result := TProductInfo(inherited Add);
+end;
+
+function TProductInfoCollection.GetItems(Index: integer): TProductInfo;
+begin
+  result := TProductInfo(inherited Items[Index]);
+end;
+
+procedure TProductInfoCollection.LoadFromArray(anArray: TProductInfoArray);
+var i : integer;
+begin
+  Clear;
+  for i := 0 to (anArray.Count-1) do
+    Add.Assign(anArray[i]);
+end;
+
+procedure TProductInfoCollection.SaveToArray(anArray: TProductInfoArray);
+var i : integer;
+begin
+  anArray.Clear;
+  anArray.Resize(Count);
+  for i := 0 to (Count-1) do begin
+    anArray[i] := TProductInfo.Create;
+    anArray[i].Assign(Items[i]);
+  end;
+end;
+
+procedure TProductInfoCollection.SetItems(Index: integer; const Value: TProductInfo);
+begin
+  TProductInfo(inherited Items[Index]).Assign(Value);
+end;
+
+{ TProductInfoRequest }
+
+procedure TProductInfoRequest.Assign(iSource:TPersistent); 
+var lSource:TProductInfoRequest;
+begin
+  inherited Assign(iSource);
+  if (iSource is TProductInfoRequest) then begin
+    lSource := iSource as TProductInfoRequest;
+    ProductID := lSource.ProductID;
+    CurrentBuild := lSource.CurrentBuild;
+    TrialOnly := lSource.TrialOnly;
+    BetasToo := lSource.BetasToo;
+  end;
+end;
+
+{ TProductInfoRequestCollection }
+constructor TProductInfoRequestCollection.Create;
+begin
+  inherited Create(TProductInfoRequest);
+end;
+
+constructor TProductInfoRequestCollection.Create(aItemClass:TCollectionItemClass);
+begin
+  inherited Create(aItemClass);
+end;
+
+function TProductInfoRequestCollection.Add: TProductInfoRequest;
+begin
+  result := TProductInfoRequest(inherited Add);
+end;
+
+function TProductInfoRequestCollection.GetItems(Index: integer): TProductInfoRequest;
+begin
+  result := TProductInfoRequest(inherited Items[Index]);
+end;
+
+procedure TProductInfoRequestCollection.LoadFromArray(anArray: TProductInfoRequestArray);
+var i : integer;
+begin
+  Clear;
+  for i := 0 to (anArray.Count-1) do
+    Add.Assign(anArray[i]);
+end;
+
+procedure TProductInfoRequestCollection.SaveToArray(anArray: TProductInfoRequestArray);
+var i : integer;
+begin
+  anArray.Clear;
+  anArray.Resize(Count);
+  for i := 0 to (Count-1) do begin
+    anArray[i] := TProductInfoRequest.Create;
+    anArray[i].Assign(Items[i]);
+  end;
+end;
+
+procedure TProductInfoRequestCollection.SetItems(Index: integer; const Value: TProductInfoRequest);
+begin
+  TProductInfoRequest(inherited Items[Index]).Assign(Value);
+end;
+
+{ TProduct }
+
+procedure TProduct.Assign(iSource:TPersistent); 
+var lSource:TProduct;
+begin
+  inherited Assign(iSource);
+  if (iSource is TProduct) then begin
+    lSource := iSource as TProduct;
+    ProductID := lSource.ProductID;
+    Name := lSource.Name;
+  end;
+end;
+
+{ TProductCollection }
+constructor TProductCollection.Create;
+begin
+  inherited Create(TProduct);
+end;
+
+constructor TProductCollection.Create(aItemClass:TCollectionItemClass);
+begin
+  inherited Create(aItemClass);
+end;
+
+function TProductCollection.Add: TProduct;
+begin
+  result := TProduct(inherited Add);
+end;
+
+function TProductCollection.GetItems(Index: integer): TProduct;
+begin
+  result := TProduct(inherited Items[Index]);
+end;
+
+procedure TProductCollection.LoadFromArray(anArray: TProductArray);
+var i : integer;
+begin
+  Clear;
+  for i := 0 to (anArray.Count-1) do
+    Add.Assign(anArray[i]);
+end;
+
+procedure TProductCollection.SaveToArray(anArray: TProductArray);
+var i : integer;
+begin
+  anArray.Clear;
+  anArray.Resize(Count);
+  for i := 0 to (Count-1) do begin
+    anArray[i] := TProduct.Create;
+    anArray[i].Assign(Items[i]);
+  end;
+end;
+
+procedure TProductCollection.SetItems(Index: integer; const Value: TProduct);
+begin
+  TProduct(inherited Items[Index]).Assign(Value);
+end;
+
+{ CoIProductVersionInfo }
+
+class function CoIProductVersionInfo.Create(const aMessage : IROMessage; aTransportChannel : IROTransportChannel) : IProductVersionInfo;
+begin
+  result := TIProductVersionInfo_Proxy.Create(aMessage, aTransportChannel);
+end;
+
+{ TIProductVersionInfo_Proxy }
+
+function TIProductVersionInfo_Proxy.__GetInterfaceName:string;
+begin
+  result := 'IProductVersionInfo';
+end;
+
+function TIProductVersionInfo_Proxy.GetProducts: TProductArray;
+begin
+  try
+     __Message.InitializeRequestMessage(__TransportChannel, 'uROProductVersionInfo', __InterfaceName, 'GetProducts');
+     __Message.Finalize;
+
+     __TransportChannel.Dispatch(__Message);
+
+     __Message.Read('Result', TypeInfo(uROProductVersionInfo_Intf.TProductArray), result, []);
+  finally
+    __Message.FreeStream;
+  end
+end;
+
+function TIProductVersionInfo_Proxy.GetProductVersions(const iProducts: TProductInfoRequestArray): TProductInfoArray;
+begin
+  try
+     __Message.InitializeRequestMessage(__TransportChannel, 'uROProductVersionInfo', __InterfaceName, 'GetProductVersions');
+     __Message.Write('iProducts', TypeInfo(uROProductVersionInfo_Intf.TProductInfoRequestArray), iProducts, []);
+     __Message.Finalize;
+
+     __TransportChannel.Dispatch(__Message);
+
+     __Message.Read('Result', TypeInfo(uROProductVersionInfo_Intf.TProductInfoArray), result, []);
+  finally
+    __Message.FreeStream;
+  end
+end;
+
+initialization
+  RegisterROClass(TProductInfo);
+  RegisterROClass(TProductInfoRequest);
+  RegisterROClass(TProduct);
+  RegisterROClass(TProductInfoRequestArray);
+  RegisterROClass(TProductInfoArray);
+  RegisterROClass(TProductArray);
+  RegisterProxyClass(IProductVersionInfo_IID, TIProductVersionInfo_Proxy);
+
+finalization
+  UnregisterROClass(TProductInfo);
+  UnregisterROClass(TProductInfoRequest);
+  UnregisterROClass(TProduct);
+  UnregisterROClass(TProductInfoRequestArray);
+  UnregisterROClass(TProductInfoArray);
+  UnregisterROClass(TProductArray);
+  UnregisterProxyClass(IProductVersionInfo_IID);
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uRORODLNotifier.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uRORODLNotifier.pas
new file mode 100644
index 0000000..66c292f
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uRORODLNotifier.pas	
@@ -0,0 +1,613 @@
+unit uRORODLNotifier;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Delphi IDE Integration                            }
+{                                                                            }
+{ compiler: Delphi 5 and up                                                  }
+{ platform: Win32                                                            }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+
+uses
+  {$IFDEF FPC}
+  LazIDEIntf, ProjectIntf, uROIDETools_laz,
+  {$ELSE}
+  ToolsApi, uROIDETools,
+  {$ENDIF}
+  Classes;
+
+type
+  TROUnitType = (utIntf, utInvk, utImpl, utAsync, utRes);
+  TROUnitTypes = set of TROUnitType;
+
+
+  { TRORODLNotifier }
+  {$IFDEF FPC}
+  IOTAProject = TLazProject;
+  IOTAModule = TLazProjectFile;
+  
+  TRORODLNotifier = class
+  {$ELSE}
+  TRORODLNotifier = class(TNotifierObject, IOTAIDENotifier, IOTAIDENotifier50)
+  {$ENDIF}
+  private
+    fMessages : TIDEMessageList;
+
+  protected
+  {$IFNDEF FPC}
+    procedure FileNotification(NotifyCode: TOTAFileNotification;
+      const FileName: string; var Cancel: Boolean);
+
+    procedure AfterCompile(Succeeded: Boolean); overload;
+    procedure BeforeCompile(const Project: IOTAProject; var Cancel: Boolean); overload;
+    procedure AfterCompile(Succeeded: Boolean; IsCodeInsight: Boolean); overload;
+  {$ENDIF}
+
+  public
+    procedure BeforeCompile(const Project: IOTAProject; IsCodeInsight: Boolean; var Cancel: Boolean); overload;
+    procedure GenerateUnits(const aProject: IOTAProject; aTypes: TROUnitTypes);
+    constructor Create;
+    destructor Destroy; override;
+
+  end;
+
+function ProcessProject(const Project: IOTAProject; aMessageList : TIDEMessageList; aTypes: TROUnitTypes = [utIntf, utInvk, utImpl, utRes]) : boolean;
+
+procedure Register;
+
+implementation
+{$IFDEF MSWINDOWS}
+{$WARN SYMBOL_PLATFORM OFF}
+{$ENDIF}
+
+uses
+  Controls, SysUtils, Dialogs,
+  uRODLGenTools, uRORes, uROServer, uROClasses,uRODLToXML, uRODL,
+  uRODLConvertersUtils,
+  {.$IFNDEF REMOBJECTS_CODEGEN2}
+  uRODLToPascalInvk, uRODLToPascalIntf, uRODLToPascalImpl, uRODLToPascalAsync,
+  {.$ENDIF}
+  {$IFDEF FPC}
+  uEWMenuManager_laz, uEWOTAHelpers_laz,
+  {$ELSE}
+  uEWMenuManager, uEWOTAHelpers,
+  {$ENDIF}
+  fCustomIDEMessagesForm, fROServerClassForm;
+
+{$IFNDEF FPC}
+var
+  notifieridx : integer = -1;
+{$ENDIF}
+
+procedure Register;
+begin
+  {$IFNDEF FPC}
+  notifieridx := Services.AddNotifier(TRORODLNotifier.Create);
+  {$ENDIF}
+end;
+
+procedure RemoveNotifier;
+begin
+  {$IFNDEF FPC}
+  if (notifieridx<>-1)
+    then Services.RemoveNotifier(notifieridx);
+  {$ENDIF FPC}
+end;
+
+{ RODL file processing }
+
+function ProcessProject(const Project: IOTAProject; aMessageList : TIDEMessageList; aTypes: TROUnitTypes = [utIntf, utInvk, utImpl, utRes]) : boolean;
+
+    {$IFNDEF REMOBJECTS_CODEGEN2}
+    function GenUnit(aConverterClass : TRODLConverterClass; aLibrary : TRODLLibrary; aShortRodlFilename: string; aService : TRODLService = nil; SkipIfPresent : boolean = FALSE) : boolean; overload;
+    var
+      conv : TRODLConverter;
+      lAttributes: Integer;
+      lServiceName: string;
+      unitname : string;
+      module : IOTAModule;
+      {$IFDEF FPC}
+      lunit : TLazProjectFile;
+      {$ENDIF}
+      clsnme, requnits : string;
+      passaveaborted : boolean;
+    begin
+      result := FALSE;
+
+      conv := NIL;
+      try
+        conv := aConverterClass.Create(NIL);
+
+        if Assigned(aService) then lServiceName := aService.Info.Name else lServiceName := '';
+        {$IFDEF FPC}
+        unitname := ExtractFilePath(Project.MainFile.Filename)+conv.GetTargetFileName(aLibrary, lServiceName);
+        {$ELSE}
+        unitname := ExtractFilePath(Project.FileName)+conv.GetTargetFileName(aLibrary, lServiceName);
+        {$ENDIF}
+
+        // Checks the module is already in the project
+        try
+          module := FindModuleByUnitName(Project, unitname);
+        except
+          on E:EFOpenError do module := nil;
+          else raise;
+        end;
+        // If it is and the file is not supposed to be regenerated just exists
+        if (module<>NIL) and SkipIfPresent then begin
+          aMessageList.Add(mWarning, aShortRodlFilename+': Skipping regeneration of unit '+ExtractFileName(unitname));
+          result := TRUE;
+          Exit;
+        end
+        else if (conv is TRODLToImpl) and (aService.Ancestor='') then begin
+          if not SelectROServerClassType(lServiceName, clsnme, requnits) then Abort;
+          TRODLToImpl(conv).ServerClassName := clsnme;
+          TRODLToImpl(conv).RequiredUnits := requnits;
+        end;
+
+        if FileExists(unitname) then begin
+          lAttributes := FileGetAttr(unitname);
+          if (lAttributes and faReadOnly) = faReadOnly then begin
+            //case MessageDlg(Format('%s is readonly, overwrite anyway?',[ExtractFileName(unitname)]),
+            case MessageDlg(Format('%s is readonly and cannot be regenerated.',[ExtractFileName(unitname)]),
+                          mtConfirmation, [{mbYes, mbYesToAll} mbCancel, mbIgnore], 0) of
+              mrCancel: Abort();
+              mrIgnore: begin
+                  result := true;
+                  exit;
+                end;
+              mrYes: begin
+                  FileSetAttr(unitname, lAttributes xor faReadOnly);
+                  //ToDo: need to turn buffer non-readonly, too.
+                  exit;
+                end;
+              mrYesToAll: //ToDo.
+            end;
+          end;
+        end;
+
+        // Converts the RODL file
+        conv.Convert(aLibrary, lServiceName);
+
+        if (module=NIL) then begin
+          // If not present adds it double checking for file existance if SkipIfPresent. It's for implementation
+          // units that might be there and have code already in but not be part of the DPR (for any weird reason)
+          passaveaborted := FALSE;
+          if SkipIfPresent and FileExists(unitname) then begin
+            case MessageDlg(
+              Format('Unit "%s" has been prepared but a file with the same name already exist in "%s".'#13+
+                     'Do you want to overwrite file %s?',
+                     [ExtractFileName(unitname), ExtractFilePath(unitname), ExtractFileName(unitname)]),
+                     mtWarning, [mbYes, mbNo, mbCancel], 0) of
+
+              mrCancel : Exit;
+              mrNo : passaveaborted := TRUE;
+              mrYes: { no-op};
+            end
+          end;
+
+          if not passaveaborted then begin
+            if conv is TRODLToImpl then
+                if TRODLToImpl(conv).WriteDataModule then
+                  TRODLToImpl(conv).WriteDFM(aLibrary, lServiceName, ChangeFileExt(unitname, '.dfm'));
+
+            conv.Buffer.SaveToFile(unitname);
+          end;
+
+
+          {$IFDEF FPC}
+          lunit:= Project.CreateProjectFile(unitname);
+          Project.AddFile(lUnit, False);
+          if (aConverterClass=TRODLToImpl) and TRODLToImpl(conv).WriteDataModule then
+            lUnit.IsPartOfProject := True;
+          {$ELSE}
+          Project.AddFile(unitname, (aConverterClass=TRODLToImpl) and TRODLToImpl(conv).WriteDataModule);
+          {$ENDIF}
+
+
+          if (aConverterClass <> TRODLToInvk) then begin
+          {$IFDEF FPC}
+             LazarusIDE.DoOpenEditorFile(unitname,-1,[ofOnlyIfExists]);
+          {$ELSE}
+             ActionServices.OpenFile(unitname);
+          {$ENDIF}
+          end;
+
+        end
+        else begin
+          // Otherwise updates the source
+          WriteModuleSource(module, Trim(conv.Buffer.Text), '');
+        end;
+
+        if SkipIfPresent then
+          aMessageList.Add(mInfo, Format(aShortRodlFilename+': Implementation unit for service %s generated',
+                                         [lServiceName]));
+
+
+        result := TRUE;
+      finally
+        conv.Free;
+      end;
+    end;
+    {$ENDIF}
+
+    function GenUnit(aType: TROCodeGenType; aLibrary : TRODLLibrary; aShortRodlFilename: string; aService : TRODLService = nil; SkipIfPresent : boolean = FALSE) : boolean; overload;
+    var
+      lAttributes: Integer;
+      lServiceName: string;
+      lLanguage: TROCodeGenLanguage;
+      lUnitname: string;
+      lModule : IOTAModule;
+      {$IFDEF FPC}
+      lunit : TLazProjectFile;
+      {$ENDIF}
+      lClassname, lRequiredUnits: string;
+      lCodeStream, lHeaderStream: TStringStream;
+
+    begin
+      result := FALSE;
+
+      lLanguage := CodeGenLanuageFromProjectPersonality(Project);
+
+      if Assigned(aService) then lServiceName := aService.Info.Name else lServiceName := '';
+      
+      {$IFDEF FPC}
+      lUnitname := ExtractFilePath(Project.MainFile.FileName)+GetTargetFileName(aLibrary, aService, aType, lLanguage);
+      {$ELSE}
+      lUnitname := ExtractFilePath(Project.FileName)+GetTargetFileName(aLibrary, aService, aType, lLanguage);
+      {$ENDIF}
+
+      
+
+
+      // Checks the module is already in the project
+      try
+        lModule := FindModuleByUnitName(Project, lUnitname);
+      except
+        on E:EFOpenError do lModule := nil;
+        else raise;
+      end;
+
+      // If it is and the file is not supposed to be regenerated just exists
+      if SkipIfPresent and assigned(lModule) then begin
+        aMessageList.Add(mWarning, aShortRodlFilename+': Skipping regeneration of unit '+ExtractFileName(lUnitname));
+        result := TRUE;
+        Exit;
+      end;
+      if SkipIfPresent and FileExists(lUnitname) then begin
+        case MessageDlg(Format('A unit named "%s" already exist, but is not part of the project.'#13+
+                                'Do you want to overwrite the file?', [ExtractFileName(lUnitname)]),
+                        mtWarning, [mbYes, mbNo, mbCancel], 0) of
+          mrCancel: Abort;
+          mrNo: begin
+              result := true;
+              Exit;
+            end;
+          mrYes: { no-op};
+        end
+      end;
+
+      lRequiredUnits := '';
+      lClassname := '';
+      if (aType = cgtImpl) and (aService.Ancestor='') then begin
+        if not SelectROServerClassType(lServiceName, lClassname, lRequiredUnits) then Abort;
+      end;
+
+      if FileExists(lUnitname) then begin
+        lAttributes := FileGetAttr(lUnitname);
+        if (lAttributes and faReadOnly) = faReadOnly then begin
+          //case MessageDlg(Format('%s is readonly, overwrite anyway?',[ExtractFileName(unitname)]),
+          case MessageDlg(Format('%s is readonly and cannot be regenerated.',[ExtractFileName(lUnitname)]),
+                        mtConfirmation, [{mbYes, mbYesToAll} mbCancel, mbIgnore], 0) of
+            mrCancel: Abort();
+            mrIgnore: begin
+                result := true;
+                exit;
+              end;
+            mrYes: begin
+                FileSetAttr(lUnitname, lAttributes xor faReadOnly);
+                //ToDo: need to turn buffer non-readonly, too.
+                exit;
+              end;
+            mrYesToAll: //ToDo.
+          end;
+        end;
+      end;
+
+      // Converts the RODL file
+      
+      if (not assigned(lModule)) or (lLanguage = cglCppBuilder) then begin // going via the Module doesn't work for .H files :(
+        GenerateUnitToFile(aLibrary, aService, aType, lLanguage, lClassname, ExtractFilePath(lUnitname) + GetTargetFileName(aLibrary, aService, aType, lLanguage), lRequiredUnits);
+
+        {$IFDEF FPC}
+        lunit:= Project.CreateProjectFile(lUnitName);
+        Project.AddFile(lUnit, False);
+        lUnit.IsPartOfProject := True;
+        {$ELSE}
+        Project.AddFile(lUnitname, true);
+        {$ENDIF}
+
+        if (aType <> cgtInvk) then
+        {$IFDEF FPC}
+          LazarusIDE.DoOpenEditorFile(lUnitName,-1,[ofOnlyIfExists]);
+        LazarusIDE.DoRevertEditorFile(lUnitName);
+        {$ELSE}
+          ActionServices.OpenFile(lUnitName);
+        ActionServices.ReloadFile(lUnitname);
+        {$ENDIF}
+      end
+      else begin
+        lCodeStream := TStringStream.Create('');
+        lHeaderStream := TStringStream.Create(''); // C++ only
+        GenerateUnitToStream(aLibrary, aService, aType, lLanguage, lCodeStream, lHeaderStream, lClassname, '', lRequiredUnits);
+        WriteModuleSource(lModule, Trim(lCodeStream.DataString), Trim(lHeaderStream.DataString));
+      end;
+
+      {if SkipIfPresent then
+        aMessageList.Add(mInfo, Format(aShortRodlFilename+': Implementation unit for service %s generated',
+                                       [lServiceName]));}
+
+      result := TRUE;
+    end;
+
+    procedure ProcessRodl(aFilename: string; aNested: boolean);
+    var
+      lShortRodlFilename: string;
+      lib : TRODLLibrary;
+      i : integer;
+    begin
+      if (aFileName = '') then exit;
+      if not FileExists(aFilename) then begin
+        aMessageList.Add(mError,Format('RODL file %s does not exist.',[aFilename]));
+        exit;
+      end;
+
+      lShortRodlFilename := ExtractFileName(aFilename);
+
+      // Processes RODL
+      lib := ReadRODLFromFile(TXMLToRODL, aFilename);
+      try
+        //aMessageList.Add(mInfo, rodlname+' has been loaded');
+
+        {$IFNDEF REMOBJECTS_CODEGEN2}
+        if CodeGenLanuageFromProjectPersonality(Project) = cglCppBuilder then begin
+        {$ENDIF}
+
+          if utIntf in aTypes then begin
+            if not GenUnit(cgtIntf, lib, lShortRodlFilename) then begin
+              result := FALSE;
+              Exit;
+            end
+            else aMessageList.Add(mInfo, lShortRodlFilename+': Interface unit generated');
+          end;
+
+          if utAsync in aTypes then begin
+            if not GenUnit(cgtAsync, lib, lShortRodlFilename) then begin
+              result := FALSE;
+              Exit;
+            end
+            else aMessageList.Add(mInfo, lShortRodlFilename+': Async Interface unit generated');
+          end;
+
+          if utInvk in aTypes then begin
+            if not GenUnit(cgtInvk, lib, lShortRodlFilename) then begin
+              result := FALSE;
+              Exit;
+            end
+            else aMessageList.Add(mInfo, lShortRodlFilename+': Invoker unit generated');
+          end;
+
+          if utImpl in aTypes then begin
+            for i := 0 to (lib.ServiceCount-1) do if (not lib.Services[i].IsFromUsedRodl) then begin
+
+              if not GenUnit(cgtImpl, lib, lShortRodlFilename, lib.Services[i], true) then begin
+                result := FALSE;
+                Exit;
+              end
+            end;
+          end;
+
+        {$IFNDEF REMOBJECTS_CODEGEN2}
+        end
+        else begin
+
+          // Generates the units
+          if utIntf in aTypes then begin
+            if not GenUnit(TRODLToIntf, lib, lShortRodlFilename) then begin
+              result := FALSE;
+              Exit;
+            end
+            else aMessageList.Add(mInfo, lShortRodlFilename+': Interface unit generated');
+          end;
+
+          if utAsync in aTypes then begin
+            if not GenUnit(TRODLToPascalAsync, lib, lShortRodlFilename) then begin
+              result := FALSE;
+              Exit;
+            end
+            else aMessageList.Add(mInfo, lShortRodlFilename+': Async Interface unit generated');
+          end;
+
+          if utInvk in aTypes then begin
+            if not GenUnit(TRODLToInvk, lib, lShortRodlFilename) then begin
+              result := FALSE;
+              Exit;
+            end
+            else aMessageList.Add(mInfo, lShortRodlFilename+': Invoker unit generated');
+          end;
+
+          if utImpl in aTypes then begin
+            for i := 0 to (lib.ServiceCount-1) do if (not lib.Services[i].IsFromUsedRodl) then begin
+
+              if not GenUnit(TRODLToImpl, lib, lShortRodlFilename, lib.Services[i], true) then begin
+                result := FALSE;
+                Exit;
+              end
+            end;
+          end;
+
+        end;
+        {$ENDIF not REMOBJECTS_CODEGEN2}
+
+        for i := 0 to lib.UseCount-1 do begin
+          if (lib.Use[i].GenerateCode) then begin
+            if FileExists(ExpandVariables(lib.Use[i].RodlFile)) then
+              ProcessRodl(lib.Use[i].RodlFile, true)
+            else
+              ProcessRodl(lib.Use[i].AbsoluteRodlFile, true);
+          end;
+        end;
+
+        if (utRes in aTypes) and (not aNested) then begin
+
+          // flatten RODL if needed
+          if lib.UseCount > 0 then begin
+            aFilename := ExtractFilePath(aFilename)+'temp_'+NewStrippedGuidAsString()+'.rodl';
+
+            with TRODLToXML.Create(lib,true) do try
+              Buffer.SaveToFile(aFilename);
+              aMessageList.Add(mInfo,Format(lShortRodlFilename+': Flattening RODL to %s',[ExtractFileName(aFilename)]));
+            finally
+              Free;
+            end;
+          end;
+
+          // generate RES
+          if GenerateRESFromRODL(aFilename, aMessageList) then begin
+            aMessageList.Add(mInfo, lShortRodlFilename+': RODL resource generated.')
+          end
+          else begin
+            aMessageList.Add(mError, lShortRodlFilename+': RODL resource could not be generated.');
+            result := FALSE
+          end;
+
+          // delete temp file
+          if lib.UseCount > 0 then begin
+            DeleteFile(aFilename);
+          end;
+
+        end;
+
+      finally
+        FreeAndNil(lib);
+      end;
+    end;
+
+
+var prjname,
+    source,
+    rodlname : string;
+begin
+  {$IFDEF FPC}
+  aMessageList.FlushMessages;
+  {$ENDIF}
+  result := TRUE;
+
+  // Only processes DPRs
+  {$IFDEF FPC}
+    prjname := Project.MainFile.FileName;
+    if (CompareText(ExtractFileExt(prjname), '.lpr')<>0) then Exit;
+  {$ELSE}
+    prjname := Project.FileName;
+    {$IFDEF BDS}
+    if (CompareText(ExtractFileExt(prjname), '.bdsproj')<>0) and (CompareText(ExtractFileExt(prjname), '.dproj')<>0) and (CompareText(ExtractFileExt(prjname), '.cbproj')<>0) then Exit;
+    {$ELSE}
+    if (CompareText(ExtractFileExt(prjname), '.dpr')<>0) then Exit;
+    {$ENDIF}
+  {$ENDIF}
+
+  // Extract useful data and exists if the file does not reference a RODL file
+  source := ReadModuleSource({$IFDEF FPC}Project.MainFile{$ELSE}Project{$ENDIF});
+  rodlname := ExtractRODLFileName(source);
+
+  if (rodlname='') then exit
+  else if (ExtractFilePath(rodlname)='') then
+    rodlname := ExtractFilePath(prjname)+rodlname; // If there's no path specified assumes the file is in the DPR folder
+
+  ProcessRodl(rodlname, false);
+
+end;
+
+{ TRORODLNotifier }
+{$IFNDEF FPC}
+procedure TRORODLNotifier.AfterCompile(Succeeded, IsCodeInsight: Boolean);
+begin
+end;
+
+procedure TRORODLNotifier.AfterCompile(Succeeded: Boolean);
+begin
+
+end;
+
+procedure TRORODLNotifier.BeforeCompile(const Project: IOTAProject;
+  var Cancel: Boolean);
+begin
+
+end;
+{$ENDIF FPC}
+
+procedure TRORODLNotifier.BeforeCompile(const Project: IOTAProject;
+  IsCodeInsight: Boolean; var Cancel: Boolean);
+begin
+  if IsCodeInsight then Exit;
+
+  fMessages.ClearMessages();
+
+  try
+    Cancel := not ProcessProject(Project, fMessages);
+  except
+    on E:Exception do begin
+      { mh: for some reason, this message doesn't get displayed. So let's add a message box too, for now. }
+      fMessages.Add(mInfo, E.Message);
+      Cancel := TRUE;
+      raise;
+    end;
+  end;
+
+  if Cancel then begin
+    DisplayIDEMessageForm := TRUE;
+  end;
+  if (fMessages.Count>0)
+    then fMessages.FlushMessages;
+end;
+
+procedure TRORODLNotifier.GenerateUnits(const aProject: IOTAProject; aTypes: TROUnitTypes);
+begin
+  ProcessProject(aProject, fMessages, aTypes);
+end;
+
+constructor TRORODLNotifier.Create;
+begin
+  fMessages := TIDEMessageList.Create(str_ProductName);
+end;
+
+destructor TRORODLNotifier.Destroy;
+begin
+  fMessages.Free;
+  inherited;
+end;
+{$IFNDEF FPC}
+procedure TRORODLNotifier.FileNotification(
+  NotifyCode: TOTAFileNotification; const FileName: string;
+  var Cancel: Boolean);
+begin
+
+end;
+{$ENDIF FPC}
+initialization
+
+finalization
+  RemoveNotifier;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROResWriter.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROResWriter.pas
new file mode 100644
index 0000000..f9e85d3
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/IDE/uROResWriter.pas	
@@ -0,0 +1,60 @@
+unit uROResWriter;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Delphi IDE Integration                            }
+{                                                                            }
+{ compiler: Delphi 5 and up                                                  }
+{ platform: Win32                                                            }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$IFNDEF MSWINDOWS}
+{$I ../RemObjects.inc}
+{$ELSE}
+{$I ..\RemObjects.inc}
+{$ENDIF}
+
+interface
+uses
+  SysUtils, Classes;
+
+
+procedure WriteRES(InData, OutStream: TStream; const Name: WideString);
+
+implementation
+
+const
+  FirstEmptyResource: array[0..31] of Ansichar =
+  (#$00,#$00,#$00,#$00,#$20,#$00,#$00,#$00,#$FF,#$FF,#$00,#$00,#$FF,#$FF,#$00,
+  #$00,#$00,#$00,#$00,#$00,#$00,#$00,#$00,#$00,#$00,#$00,#$00,#$00,#$00,#$00,
+  #$00,#$00);
+procedure WriteRES(InData, OutStream: TStream; const Name: WideString);
+  procedure WriteStr(const s: ansistring);
+  begin
+    OutStream.Write(s[1], length(s));
+  end;
+  procedure WriteLong(l: Cardinal);
+  begin
+    OutStream.Write(l, 4);
+  end;
+begin
+  Outstream.Write(FirstEmptyResource, 32);
+  WriteLong(Indata.Size - Indata.Position); // Resource Size
+  WriteLong(32 + Length(Name) * 2); // Header Size
+  WriteLong($000AFFFF); // RT_RCDATA
+  OutStream.Write(Name[1], Length(Name) * 2);
+  WriteStr(#$00#$00); // Null terminater
+  if (Length(Name) * 2 + 2) mod 4 <> 0 then
+    WriteStr(#$00#$00); // extra 0 for dword alignment
+  WriteLong(0); // Data Version
+  WriteLong(0); // Flags + Language
+  WriteLong(0); // Resource Version
+  WriteLong(0); // Characteristics
+  OutStream.CopyFrom(Indata, Indata.Size - Indata.Position);
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROCipher.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROCipher.pas
new file mode 100644
index 0000000..1389649
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROCipher.pas	
@@ -0,0 +1,4126 @@
+{Copyright:      Hagen Reddmann  mailto:HaReddmann@AOL.COM
+ Author:         Hagen Reddmann
+ Remarks:        freeware, but this Copyright must be included
+ known Problems: none
+ Version:        3.0,  Part I from Delphi Encryption Compendium  ( DEC Part I)
+                 Delphi 2-4, designed and testet under D3 & D4
+ Description:    Include a Selection of various RO_Cipher's (Encryption Algo)
+                 impl. Algo:
+                   Gost, Blowfish, IDEA, SAFER in 6 Types,
+                   SAFER-K40  (konvetional), SAFER-SK40 (with Keyscheduling),
+                   SAFER-K64, SAFER-SK64, SAFER-K128, SAFER-SK128,
+                   TEA, TEAN (TEA extended), SCOP, Q128, 3Way,
+                   Twofish, Shark, Square
+
+ * THIS SOFTWARE IS PROVIDED BY THE AUTHORS ''AS IS'' AND ANY EXPRESS
+ * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+ * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHORS OR CONTRIBUTORS BE
+ * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
+ * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
+ * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
+ * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
+ * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE
+ * OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,
+ * EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+}
+
+unit uROCipher;
+
+interface
+
+{$I uROVer.inc}
+
+uses SysUtils, Classes, uRODECUtil, uROHash;
+
+const                                   {ErrorCode's for EROCipherException}
+  errGeneric        = 0;                {generic Error}
+  errInvalidKey     = 1;                {Decode Key is not correct}
+  errInvalidKeySize = 2;                {Size of the Key is too large}
+  errNotInitialized = 3;                {Methods Init() or InitKey() were not called}
+  errInvalidMACMode = 4;                {CalcMAC can't use cmECB, cmOFB}
+  errCantCalc       = 5;
+
+type
+  EROCipherException = class(Exception)
+  public
+    Errorcode: Integer;
+  end;
+
+  {all RO_Cipher Classes in this Unit, a good Selection}
+  TROCipher_Gost = class;
+  TROCipher_Blowfish = class;
+  TROCipher_IDEA = class;
+  TROCipher_SAFER = class;
+  TROCipher_SAFER_K40 = class;
+  TROCipher_SAFER_SK40 = class;
+  TROCipher_SAFER_K64 = class;
+  TROCipher_SAFER_SK64 = class;
+  TROCipher_SAFER_K128 = class;
+  TROCipher_SAFER_SK128 = class;
+  TROCipher_TEA = class;
+  TROCipher_TEAN = class;
+  TROCipher_SCOP = class;                 {Streamcipher}
+  TROCipher_Q128 = class;
+  TROCipher_3Way = class;
+  TROCipher_Twofish = class;
+  TROCipher_Shark = class;
+  TROCipher_Square = class;
+
+  TCipherMode = (cmCTS, cmCBC, cmCFB, cmOFB, cmECB, cmCTSMAC, cmCBCMAC, cmCFBMAC);
+  { the RO_Cipher Modes:
+    cmCTS     RO_Cipher Text Stealing, a Variant from cmCBC, but relaxes
+              the restriction that the DataSize must be a mulitply from BufSize,
+              this is the Defaultmode, fast and Bytewise
+    cmCBC     RO_Cipher Block Chaining
+    cmCFB     K-bit RO_Cipher Feedback, here is K = 8 -> 1 Byte
+    cmOFB     K-bit Output Feedback, here is K = 8 -> 1 Byte
+    cmECB *   Electronic Codebook, DataSize must be a multiply from BufSize
+
+    cmCTSMAC  Build a Message Authentication Code in cmCTS Mode
+    cmCBCMAC  Build a CBC-MAC
+    cmCFBMAC  Build a CFB-MAC
+  }
+
+  TROCipherClass = class of TROCipher;
+
+  TROCipher = class(TROProtection)
+  private
+    FMode: TCipherMode;
+    FHash: TROHash;
+    FHashClass: TROHashClass;
+    FKeySize: Integer;
+    FBufSize: Integer;
+    FUserSize: Integer;
+    FBuffer: Pointer;
+    FVector: Pointer;
+    FFeedback: Pointer;
+    FUser: Pointer;
+    FFlags: Integer;
+    function GetHash: TROHash;
+    procedure SetHashClass(Value: TROHashClass);
+    procedure InternalCodeStream(Source, Dest: TStream; DataSize: Integer; Encode: Boolean);
+    procedure InternalCodeFile(const Source, Dest: string; Encode: Boolean);
+  protected
+    function GetFlag(Index: Integer): Boolean;
+    procedure SetFlag(Index: Integer; Value: Boolean); virtual;
+    {used in method Init()}
+    procedure InitBegin(var Size: Integer);
+    procedure InitEnd(IVector: Pointer); virtual;
+    {must override}
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); virtual;
+    class function TestVector: Pointer; virtual;
+    {override TROProtection Methods}
+    procedure CodeInit(Action: TPAction); override;
+    procedure CodeDone(Action: TPAction); override;
+    procedure CodeBuf(var Buffer; const BufferSize: Integer; Action: TPAction); override;
+    {the encode function, must override}
+    procedure Encode(Data: Pointer); virtual;
+    {the decode function, must override}
+    procedure Decode(Data: Pointer); virtual;
+    {the individual Userdata and Buffer}
+    property User: Pointer read FUser;
+    property Buffer: Pointer read FBuffer;
+    property UserSize: Integer read FUserSize;
+  public
+    constructor Create(const Password: string; AProtection: TROProtection);
+    destructor Destroy; override;
+    class function MaxKeySize: Integer;
+    {performs a Test of correct work}
+    class function SelfTest: Boolean;
+    {initialization form the RO_Cipher}
+    procedure Init(const Key; Size: Integer; IVector: Pointer); virtual;
+    procedure InitKey(const Key: string; IVector: Pointer);
+    {reset the Feedbackregister with the actual IVector}
+    procedure Done; virtual;
+    {protect the security Data's, Feedback, Buffer, Vector etc.}
+    procedure Protect; virtual;
+
+    procedure EncodeBuffer(const Source; var Dest; DataSize: Integer);
+    procedure DecodeBuffer(const Source; var Dest; DataSize: Integer);
+    function EncodeString(const Source: string): string;
+    function DecodeString(const Source: string): string;
+    procedure EncodeFile(const Source, Dest: string);
+    procedure DecodeFile(const Source, Dest: string);
+    procedure EncodeStream(const Source, Dest: TStream; DataSize: Integer);
+    procedure DecodeStream(const Source, Dest: TStream; DataSize: Integer);
+
+    {calculate a MAC, Message Authentication Code, can be use in
+     cmCBCMAC, cmCTSMAC, cmCFBMAC Modes -> Dest is not modified, or
+     cmCBC, cmCTS, cmCFB Modes -> normal En/Decoding of Dest.}
+    function CalcMAC(Format: Integer): Ansistring;
+
+    {the RO_Cipher Mode = cmXXX}
+    property Mode: TCipherMode read FMode write FMode;
+    {the Current RO_Hash-Object, to build a Digest from InitKey()}
+    property RO_Hash: TROHash read GetHash;
+    {the Class of the RO_Hash-Object}
+    property HashClass: TROHashClass read FHashClass write SetHashClass;
+    {the maximal KeySize and BufSize (Size of Feedback, Buffer and Vector}
+    property KeySize: Integer read FKeySize;
+    property BufSize: Integer read FBufSize;
+
+    {Init() was called}
+    property Initialized: Boolean index 1 read GetFlag write SetFlag;
+    {the actual IVector, BufSize Bytes long}
+    property Vector: Pointer read FVector;
+    {the Feedback register, BufSize Bytes long}
+    property Feedback: Pointer read FFeedback;
+    {the Key is set from InitKey() and the RO_Hash.DigestKey^ include the encrypted RO_Hash-Key}
+    property HasHashKey: Boolean index 0 read GetFlag;
+  end;
+
+  // now the RO_Cipher's
+
+  TROCipher_Gost = class(TROCipher)         {russian RO_Cipher}
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+    procedure Encode(Data: Pointer); override;
+    procedure Decode(Data: Pointer); override;
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+  end;
+
+  TROCipher_Blowfish = class(TROCipher)
+  private
+    {$IFDEF UseASM}
+    {$IFNDEF 486GE}                     // no Support for <= CPU 386
+    procedure Encode386(Data: Pointer);
+    procedure Decode386(Data: Pointer);
+    {$ENDIF}
+    {$ENDIF}
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+    procedure Encode(Data: Pointer); override;
+    procedure Decode(Data: Pointer); override;
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+  end;
+
+  TROCipher_IDEA = class(TROCipher)         {International Data Encryption Algorithm }
+  private
+    procedure RO_Cipher(Data, Key: PWordArray);
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+    procedure Encode(Data: Pointer); override;
+    procedure Decode(Data: Pointer); override;
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+  end;
+
+  TSAFERMode = (smDefault, smK40, smK64, smK128, smStrong, smSK40, smSK64, smSK128);
+  {smDefault                 Mode is build from KeyLength "Size"
+                             if Size <=  5 then is smK40 used
+                             if Size <=  8 then is smK64 used
+                             if Size <= 16 then is smK128 used
+   smK40       SAFER K-40    Keysize is 40bit  ->  5 Byte
+   smK64       SAFER K-64    Keysize is 64bit  ->  8 Byte
+   smK128      SAFER K-128   KeySize is 128bit -> 16 Byte
+   smStrong                  Mode is build from KeyLength "Size" and stronger as smDefault,
+                             if Size <=  5 then is smSK40 used
+                             if Size <=  8 then is smSK64 used
+                             if Size <= 16 then is smSK128 used
+                             this is the Defaultmode for TROCipher_SAFER
+   smSK40      SAFER SK-40   stronger Version from K-40 with better Keyscheduling
+   smSK64      SAFER SK-64   stronger Version from K-64 with better Keyscheduling
+   smSK128     SAFER SK-128  stronger Version from K-128 with better Keyscheduling}
+
+  TROCipher_SAFER = class(TROCipher)        {SAFER = Secure And Fast Encryption Routine}
+  private
+    FRounds: Integer;
+    FSAFERMode: TSAFERMode;
+    procedure SetRounds(Value: Integer);
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+    procedure Encode(Data: Pointer); override;
+    procedure Decode(Data: Pointer); override;
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+    procedure InitNew(const Key; Size: Integer; IVector: Pointer; SAFERMode: TSAFERMode);
+    property Rounds: Integer read FRounds write SetRounds;
+  end;
+
+  TROCipher_SAFER_K40 = class(TROCipher_SAFER)
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+  end;
+
+  TROCipher_SAFER_SK40 = class(TROCipher_SAFER_K40)
+  protected
+    class function TestVector: Pointer; override;
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+  end;
+
+  TROCipher_SAFER_K64 = class(TROCipher_SAFER)
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+  end;
+
+  TROCipher_SAFER_SK64 = class(TROCipher_SAFER_K64)
+  protected
+    class function TestVector: Pointer; override;
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+  end;
+
+  TROCipher_SAFER_K128 = class(TROCipher_SAFER)
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+  end;
+
+  TROCipher_SAFER_SK128 = class(TROCipher_SAFER_K128)
+  protected
+    class function TestVector: Pointer; override;
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+  end;
+
+  TROCipher_TEA = class(TROCipher)          {Tiny Encryption Algorithm}
+  private
+    FRounds: Integer;                   {16 - 32, default 16 is sufficient, 32 is ample}
+    procedure SetRounds(Value: Integer);
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+    procedure Encode(Data: Pointer); override;
+    procedure Decode(Data: Pointer); override;
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+    property Rounds: Integer read FRounds write SetRounds;
+  end;
+
+  TROCipher_TEAN = class(TROCipher_TEA)     {Tiny Encryption Algorithm, extended Version}
+  protected
+    class function TestVector: Pointer; override;
+    procedure Encode(Data: Pointer); override;
+    procedure Decode(Data: Pointer); override;
+  end;
+
+  TROCipher_SCOP = class(TROCipher)         {Stream RO_Cipher in Blockmode}
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+    procedure Encode(Data: Pointer); override;
+    procedure Decode(Data: Pointer); override;
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+    procedure Done; override;
+  end;
+
+  TROCipher_Q128 = class(TROCipher)
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+    procedure Encode(Data: Pointer); override;
+    procedure Decode(Data: Pointer); override;
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+  end;
+
+  TROCipher_3Way = class(TROCipher)
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+    procedure Encode(Data: Pointer); override;
+    procedure Decode(Data: Pointer); override;
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+  end;
+
+  TROCipher_Twofish = class(TROCipher)
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+    procedure Encode(Data: Pointer); override;
+    procedure Decode(Data: Pointer); override;
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+  end;
+
+  TROCipher_Shark = class(TROCipher)
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+    procedure Encode(Data: Pointer); override;
+    procedure Decode(Data: Pointer); override;
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+  end;
+
+  TROCipher_Square = class(TROCipher)
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+    procedure Encode(Data: Pointer); override;
+    procedure Decode(Data: Pointer); override;
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+  end;
+
+function DefaultCipherClass: TROCipherClass;
+procedure SetDefaultCipherClass(CipherClass: TROCipherClass);
+procedure RaiseCipherException(const Errorcode: Integer; const Msg: string);
+function RegisterCipher(const ACipher: TROCipherClass; const aName, ADescription: string): Boolean;
+function UnregisterCipher(const ACipher: TROCipherClass): Boolean;
+function CipherList: TStrings;
+procedure CipherNames(List: TStrings);
+function GetCipherClass(const Name: string): TROCipherClass;
+function GetCipherName(CipherClass: TROCipherClass): string;
+
+const
+  CheckCipherKeySize: Boolean = False;
+  {set to True raises Exception when Size of the Key is too large, (Method Init())
+   otherwise will truncate the Key, default mode is False}
+
+implementation
+
+uses uRODECConst, Windows;
+
+{$I *.inc}
+{$I uROSquare.inc}
+
+const
+  FDefaultCipherClass: TROCipherClass = TROCipher_Blowfish;
+  FCipherList       : TStringList = nil;
+
+function DefaultCipherClass: TROCipherClass;
+begin
+  Result := FDefaultCipherClass;
+end;
+
+procedure SetDefaultCipherClass(CipherClass: TROCipherClass);
+begin
+  if CipherClass = nil then
+    FDefaultCipherClass := TROCipher_Blowfish
+  else
+    FDefaultCipherClass := CipherClass;
+end;
+
+procedure RaiseCipherException(const Errorcode: Integer; const Msg: string);
+var
+  e                 : EROCipherException;
+begin
+  e := EROCipherException.Create(Msg);
+  e.Errorcode := Errorcode;
+  raise e;
+end;
+
+function RegisterCipher(const ACipher: TROCipherClass; const aName, ADescription: string): Boolean;
+var
+  i                 : Integer;
+  S                 : string;
+begin
+  Result := False;
+  if ACipher = nil then
+    Exit;
+  S := Trim(aName);
+  if S = '' then
+  begin
+    S := ACipher.ClassName;
+    if S[1] = 'T' then
+      Delete(S, 1, 1);
+    i := Pos('_', S);
+    if i > 0 then
+      Delete(S, 1, i);
+  end;
+  S := S + '=' + ADescription;
+  i := CipherList.IndexOfObject(Pointer(ACipher));
+  if i < 0 then
+    CipherList.AddObject(S, Pointer(ACipher))
+  else
+    CipherList[i] := S;
+  Result := True;
+end;
+
+function UnregisterCipher(const ACipher: TROCipherClass): Boolean;
+var
+  i                 : Integer;
+begin
+  Result := False;
+  repeat
+    i := CipherList.IndexOfObject(Pointer(ACipher));
+    if i < 0 then
+      Break;
+    Result := True;
+    CipherList.Delete(i);
+  until False;
+end;
+
+function CipherList: TStrings;
+begin
+  if not IsObject(FCipherList, TStringList) then
+    FCipherList := TStringList.Create;
+  Result := FCipherList;
+end;
+
+procedure CipherNames(List: TStrings);
+var
+  i                 : Integer;
+begin
+  if not IsObject(List, TStrings) then
+    Exit;
+  for i := 0 to CipherList.Count - 1 do
+    List.AddObject(FCipherList.Names[i], FCipherList.Objects[i]);
+end;
+
+function GetCipherClass(const Name: string): TROCipherClass;
+var
+  i                 : Integer;
+  N                 : string;
+begin
+  Result := nil;
+  N := Name;
+  i := Pos('_', N);
+  if i > 0 then
+    Delete(N, 1, i);
+  for i := 0 to CipherList.Count - 1 do
+    if AnsiCompareText(N, GetShortClassName(TClass(FCipherList.Objects[i]))) = 0 then
+    begin
+      Result := TROCipherClass(FCipherList.Objects[i]);
+      Exit;
+    end;
+  i := FCipherList.IndexOfName(N);
+  if i >= 0 then
+    Result := TROCipherClass(FCipherList.Objects[i]);
+end;
+
+function GetCipherName(CipherClass: TROCipherClass): string;
+var
+  i                 : Integer;
+begin
+  i := CipherList.IndexOfObject(Pointer(CipherClass));
+  if i >= 0 then
+    Result := FCipherList.Names[i]
+  else
+    Result := GetShortClassName(CipherClass);
+end;
+
+function TROCipher.GetFlag(Index: Integer): Boolean;
+begin
+  Result := FFlags and (1 shl Index) <> 0;
+end;
+
+procedure TROCipher.SetFlag(Index: Integer; Value: Boolean);
+begin
+  Index := 1 shl Index;
+  if Value then
+    FFlags := FFlags or Index
+  else
+    FFlags := FFlags and not Index;
+end;
+
+procedure TROCipher.InitBegin(var Size: Integer);
+begin
+  Initialized := False;
+  Protect;
+  if Size < 0 then
+    Size := 0;
+  if Size > KeySize then
+    if not CheckCipherKeySize then
+      Size := KeySize
+    else
+      RaiseCipherException(errInvalidKeySize, Format(sInvalidKeySize, [ClassName, 0, KeySize]));
+end;
+
+procedure TROCipher.InitEnd(IVector: Pointer);
+begin
+  if IVector = nil then
+    Encode(Vector)
+  else
+    Move(IVector^, Vector^, BufSize);
+  Move(Vector^, Feedback^, BufSize);
+  Initialized := True;
+end;
+
+class procedure TROCipher.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  ABufSize := 0;
+  AKeySize := 0;
+  AUserSize := 0;
+end;
+
+class function TROCipher.TestVector: Pointer;
+begin
+  Result := GetTestVector;
+end;
+
+procedure TROCipher.Encode(Data: Pointer);
+begin
+end;
+
+procedure TROCipher.Decode(Data: Pointer);
+begin
+end;
+
+constructor TROCipher.Create(const Password: string; AProtection: TROProtection);
+begin
+  inherited Create(AProtection);
+  FHashClass := DefaultHashClass;
+  GetContext(FBufSize, FKeySize, FUserSize);
+  GetMem(FVector, FBufSize);
+  GetMem(FFeedback, FBufSize);
+  GetMem(FBuffer, FBufSize);
+  GetMem(FUser, FUserSize);
+  Protect;
+  if Password <> '' then
+    InitKey(Password, nil);
+end;
+
+destructor TROCipher.Destroy;
+begin
+  Protect;
+  ReallocMem(FVector, 0);
+  ReallocMem(FFeedback, 0);
+  ReallocMem(FBuffer, 0);
+  ReallocMem(FUser, 0);
+  FHash.release;
+  FHash := nil;
+  inherited Destroy;
+end;
+
+class function TROCipher.MaxKeySize: Integer;
+var
+  Dummy             : Integer;
+begin
+  GetContext(Dummy, Result, Dummy);
+end;
+
+class function TROCipher.SelfTest: Boolean;
+var
+  Data              : array[0..63] of Char;
+  Key               : string;
+  SaveKeyCheck      : Boolean;
+begin
+  Result := InitTestIsOk;               {have anonyme modified the testvectors ?}
+  {we will use the ClassName as Key :-)}
+  Key := ClassName;
+  SaveKeyCheck := CheckCipherKeySize;
+  with Self.Create('', nil) do
+  try
+    CheckCipherKeySize := False;
+    Mode := cmCTS;
+    Init(PChar(Key)^, Length(Key), nil);
+    EncodeBuffer(GetTestVector^, Data, 32);
+    Result := Result and (MemCompare(TestVector, @Data, 32) = 0);
+    Done;
+    DecodeBuffer(Data, Data, 32);
+    Result := Result and (MemCompare(GetTestVector, @Data, 32) = 0);
+  finally
+    CheckCipherKeySize := SaveKeyCheck;
+    Free;
+  end;
+  FillChar(Data, SizeOf(Data), 0);
+end;
+
+procedure TROCipher.Init(const Key; Size: Integer; IVector: Pointer);
+begin
+end;
+
+procedure TROCipher.InitKey(const Key: string; IVector: Pointer);
+var
+  i                 : Integer;
+begin
+  RO_Hash.Init;
+  RO_Hash.Calc(PChar(Key)^, Length(Key));
+  RO_Hash.Done;
+  i := RO_Hash.DigestKeySize;
+  if i > FKeySize then
+    i := FKeySize;                      {generaly will truncate to large Keys}
+
+  Init(RO_Hash.DigestKey^, i, IVector);
+  EncodeBuffer(RO_Hash.DigestKey^, RO_Hash.DigestKey^, RO_Hash.DigestKeySize);
+  Done;
+  SetFlag(0, True);
+end;
+
+procedure TROCipher.Done;
+begin
+  if MemCompare(FVector, FFeedback, FBufSize) = 0 then
+    Exit;
+  Move(FFeedback^, FBuffer^, FBufSize);
+  Move(FVector^, FFeedback^, FBufSize);
+end;
+
+procedure TROCipher.Protect;
+begin
+  SetFlag(0, False);
+  Initialized := False;
+  // a Crypto Fanatican say: this is better !!
+  FillChar(FVector^, FBufSize, $AA);
+  FillChar(FFeedback^, FBufSize, $AA);
+  FillChar(FBuffer^, FBufSize, $AA);
+  FillChar(FUser^, FUserSize, $AA);
+
+  FillChar(FVector^, FBufSize, $55);
+  FillChar(FFeedback^, FBufSize, $55);
+  FillChar(FBuffer^, FBufSize, $55);
+  FillChar(FUser^, FUserSize, $55);
+
+  FillChar(FVector^, FBufSize, $FF);
+  FillChar(FFeedback^, FBufSize, $FF);
+  FillChar(FBuffer^, FBufSize, 0);
+  FillChar(FUser^, FUserSize, 0);
+end;
+
+function TROCipher.GetHash: TROHash;
+begin
+  if not IsObject(FHash, TROHash) then
+  begin
+    if FHashClass = nil then
+      FHashClass := DefaultHashClass;
+    FHash := FHashClass.Create(nil);
+    FHash.AddRef;
+  end;
+  Result := FHash;
+end;
+
+procedure TROCipher.SetHashClass(Value: TROHashClass);
+begin
+  if Value <> FHashClass then
+  begin
+    FHash.release;
+    FHash := nil;
+    FHashClass := Value;
+    if FHashClass = nil then
+      FHashClass := DefaultHashClass;
+  end;
+end;
+
+procedure TROCipher.InternalCodeStream(Source, Dest: TStream; DataSize: Integer; Encode: Boolean);
+const
+  maxBufSize        = 1024 * 4;
+var
+  Buf               : PChar;
+  SPos              : Integer;
+  dPos              : Integer;
+  Len               : Integer;
+  Proc              : procedure(const Source; var Dest; DataSize: Integer) of object;
+  Size              : Integer;
+begin
+  if Source = nil then
+    Exit;
+  if Encode or (Mode in [cmCBCMAC, cmCTSMAC, cmCFBMAC]) then
+    Proc := EncodeBuffer
+  else
+    Proc := DecodeBuffer;
+  if Dest = nil then
+    Dest := Source;
+  if DataSize < 0 then
+  begin
+    DataSize := Source.Size;
+    Source.Position := 0;
+  end;
+  Buf := nil;
+  Size := DataSize;
+  DoProgress(Self, 0, Size);
+  try
+    Buf := AllocMem(maxBufSize);
+    dPos := Dest.Position;
+    SPos := Source.Position;
+    if Mode in [cmCTSMAC, cmCBCMAC, cmCFBMAC] then
+    begin
+      while DataSize > 0 do
+      begin
+        Len := DataSize;
+        if Len > maxBufSize then
+          Len := maxBufSize;
+        Len := Source.read(Buf^, Len);
+        if Len <= 0 then
+          Break;
+        Proc(Buf^, Buf^, Len);
+        Dec(DataSize, Len);
+        DoProgress(Self, Size - DataSize, Size);
+      end;
+    end
+    else
+      while DataSize > 0 do
+      begin
+        Source.Position := SPos;
+        Len := DataSize;
+        if Len > maxBufSize then
+          Len := maxBufSize;
+        Len := Source.read(Buf^, Len);
+        SPos := Source.Position;
+        if Len <= 0 then
+          Break;
+        Proc(Buf^, Buf^, Len);
+        Dest.Position := dPos;
+        Dest.Write(Buf^, Len);
+        dPos := Dest.Position;
+        Dec(DataSize, Len);
+        DoProgress(Self, Size - DataSize, Size);
+      end;
+  finally
+    DoProgress(Self, 0, 0);
+    ReallocMem(Buf, 0);
+  end;
+end;
+
+procedure TROCipher.InternalCodeFile(const Source, Dest: string; Encode: Boolean);
+var
+  S, d              : tfilestream;
+begin
+  S := nil;
+  d := nil;
+  try
+    if Mode in [cmCBCMAC, cmCTSMAC, cmCFBMAC] then
+    begin
+      S := tfilestream.Create(Source, fmOpenRead or fmShareDenyNone);
+      d := S;
+    end
+    else
+      if (AnsiCompareText(Source, Dest) <> 0) and (Trim(Dest) <> '') then
+      begin
+        S := tfilestream.Create(Source, fmOpenRead or fmShareDenyNone);
+        d := tfilestream.Create(Dest, fmCreate);
+      end
+      else
+      begin
+        S := tfilestream.Create(Source, fmOpenReadWrite);
+        d := S;
+      end;
+    InternalCodeStream(S, d, -1, Encode);
+  finally
+    S.Free;
+    if S <> d then
+    begin
+      {$IFDEF VER_D3H}
+      d.Size := d.Position;
+      {$ENDIF}
+      d.Free;
+    end;
+  end;
+end;
+
+procedure TROCipher.EncodeStream(const Source, Dest: TStream; DataSize: Integer);
+begin
+  InternalCodeStream(Source, Dest, DataSize, True);
+end;
+
+procedure TROCipher.DecodeStream(const Source, Dest: TStream; DataSize: Integer);
+begin
+  InternalCodeStream(Source, Dest, DataSize, False);
+end;
+
+procedure TROCipher.EncodeFile(const Source, Dest: string);
+begin
+  InternalCodeFile(Source, Dest, True);
+end;
+
+procedure TROCipher.DecodeFile(const Source, Dest: string);
+begin
+  InternalCodeFile(Source, Dest, False);
+end;
+
+function TROCipher.EncodeString(const Source: string): string;
+begin
+  SetLength(Result, Length(Source));
+  EncodeBuffer(PChar(Source)^, PChar(Result)^, Length(Source));
+  if Mode in [cmCBCMAC, cmCTSMAC, cmCFBMAC] then
+    Result := '';
+end;
+
+function TROCipher.DecodeString(const Source: string): string;
+begin
+  SetLength(Result, Length(Source));
+  DecodeBuffer(PChar(Source)^, PChar(Result)^, Length(Source));
+  if Mode in [cmCBCMAC, cmCTSMAC, cmCFBMAC] then
+    Result := '';
+end;
+
+procedure TROCipher.EncodeBuffer(const Source; var Dest; DataSize: Integer);
+var
+  S, d, f           : PByte;
+begin
+  if not Initialized then
+    RaiseCipherException(errNotInitialized, Format(sNotInitialized, [ClassName]));
+  S := @Source;
+  d := @Dest;
+  case FMode of
+    cmECB:
+      begin
+        if S <> d then
+          Move(S^, d^, DataSize);
+        while DataSize >= FBufSize do
+        begin
+          Encode(d);
+          Inc(d, FBufSize);
+          Dec(DataSize, FBufSize);
+        end;
+        if DataSize > 0 then
+        begin
+          Move(d^, FBuffer^, DataSize);
+          Encode(FBuffer);
+          Move(FBuffer^, d^, DataSize);
+        end;
+      end;
+    cmCTS:
+      begin
+        while DataSize >= FBufSize do
+        begin
+          XORBuffers(S, FFeedback, FBufSize, d);
+          Encode(d);
+          XORBuffers(d, FFeedback, FBufSize, FFeedback);
+          Inc(S, FBufSize);
+          Inc(d, FBufSize);
+          Dec(DataSize, FBufSize);
+        end;
+        if DataSize > 0 then
+        begin
+          Move(FFeedback^, FBuffer^, FBufSize);
+          Encode(FBuffer);
+          XORBuffers(S, FBuffer, DataSize, d);
+          XORBuffers(FBuffer, FFeedback, FBufSize, FFeedback);
+        end;
+      end;
+    cmCBC:
+      begin
+        f := FFeedback;
+        while DataSize >= FBufSize do
+        begin
+          XORBuffers(S, f, FBufSize, d);
+          Encode(d);
+          f := d;
+          Inc(S, FBufSize);
+          Inc(d, FBufSize);
+          Dec(DataSize, FBufSize);
+        end;
+        Move(f^, FFeedback^, FBufSize);
+        if DataSize > 0 then
+        begin
+          Move(FFeedback^, FBuffer^, FBufSize);
+          Encode(FBuffer);
+          XORBuffers(S, FBuffer, DataSize, d);
+          XORBuffers(FBuffer, FFeedback, FBufSize, FFeedback);
+        end;
+      end;
+    cmCFB:
+      while DataSize > 0 do
+      begin
+        Move(FFeedback^, FBuffer^, FBufSize);
+        Encode(FBuffer);
+        d^ := S^ xor PByte(FBuffer)^;
+        Move(PByteArray(FFeedback)[1], FFeedback^, FBufSize - 1);
+        PByteArray(FFeedback)[FBufSize - 1] := d^;
+        Inc(d);
+        Inc(S);
+        Dec(DataSize);
+      end;
+    cmOFB:
+      while DataSize > 0 do
+      begin
+        Move(FFeedback^, FBuffer^, FBufSize);
+        Encode(FBuffer);
+        d^ := S^ xor PByte(FBuffer)^;
+        Move(PByteArray(FFeedback)[1], FFeedback^, FBufSize - 1);
+        PByteArray(FFeedback)[FBufSize - 1] := PByte(FBuffer)^;
+        Inc(d);
+        Inc(S);
+        Dec(DataSize);
+      end;
+    cmCTSMAC:
+      begin
+        while DataSize >= FBufSize do
+        begin
+          XORBuffers(S, FFeedback, FBufSize, FBuffer);
+          Encode(FBuffer);
+          XORBuffers(FBuffer, FFeedback, FBufSize, FFeedback);
+          Inc(S, FBufSize);
+          Dec(DataSize, FBufSize);
+        end;
+        if DataSize > 0 then
+        begin
+          Move(FFeedback^, FBuffer^, FBufSize);
+          Encode(FBuffer);
+          XORBuffers(FBuffer, FFeedback, FBufSize, FFeedback);
+        end;
+      end;
+    cmCBCMAC:
+      begin
+        while DataSize >= FBufSize do
+        begin
+          XORBuffers(S, FFeedback, FBufSize, FBuffer);
+          Encode(FBuffer);
+          Move(FBuffer^, FFeedback^, FBufSize);
+          Inc(S, FBufSize);
+          Dec(DataSize, FBufSize);
+        end;
+        if DataSize > 0 then
+        begin
+          Move(FFeedback^, FBuffer^, FBufSize);
+          Encode(FBuffer);
+          XORBuffers(FBuffer, FFeedback, FBufSize, FFeedback);
+        end;
+      end;
+    cmCFBMAC:
+      while DataSize > 0 do
+      begin
+        Move(FFeedback^, FBuffer^, FBufSize);
+        Encode(FBuffer);
+        Move(PByteArray(FFeedback)[1], FFeedback^, FBufSize - 1);
+        PByteArray(FFeedback)[FBufSize - 1] := S^ xor PByte(FBuffer)^;
+        Inc(S);
+        Dec(DataSize);
+      end;
+  end;
+end;
+
+procedure TROCipher.DecodeBuffer(const Source; var Dest; DataSize: Integer);
+var
+  S, d, f, b        : PByte;
+begin
+  if not Initialized then
+    RaiseCipherException(errNotInitialized, Format(sNotInitialized, [ClassName]));
+  S := @Source;
+  d := @Dest;
+  case FMode of
+    cmECB:
+      begin
+        if S <> d then
+          Move(S^, d^, DataSize);
+        while DataSize >= FBufSize do
+        begin
+          Decode(d);
+          Inc(d, FBufSize);
+          Dec(DataSize, FBufSize);
+        end;
+        if DataSize > 0 then
+        begin
+          Move(d^, FBuffer^, DataSize);
+          Encode(FBuffer);
+          Move(FBuffer^, d^, DataSize);
+        end;
+      end;
+    cmCTS:
+      begin
+        if S <> d then
+          Move(S^, d^, DataSize);
+        f := FFeedback;
+        b := FBuffer;
+        while DataSize >= FBufSize do
+        begin
+          XORBuffers(d, f, FBufSize, b);
+          Decode(d);
+          XORBuffers(d, f, FBufSize, d);
+          S := b;
+          b := f;
+          f := S;
+          Inc(d, FBufSize);
+          Dec(DataSize, FBufSize);
+        end;
+        if f <> FFeedback then
+          Move(f^, FFeedback^, FBufSize);
+        if DataSize > 0 then
+        begin
+          Move(FFeedback^, FBuffer^, FBufSize);
+          Encode(FBuffer);
+          XORBuffers(FBuffer, d, DataSize, d);
+          XORBuffers(FBuffer, FFeedback, FBufSize, FFeedback);
+        end;
+      end;
+    cmCBC:
+      begin
+        if S <> d then
+          Move(S^, d^, DataSize);
+        f := FFeedback;
+        b := FBuffer;
+        while DataSize >= FBufSize do
+        begin
+          Move(d^, b^, FBufSize);
+          Decode(d);
+          XORBuffers(f, d, FBufSize, d);
+          S := b;
+          b := f;
+          f := S;
+          Inc(d, FBufSize);
+          Dec(DataSize, FBufSize);
+        end;
+        if f <> FFeedback then
+          Move(f^, FFeedback^, FBufSize);
+        if DataSize > 0 then
+        begin
+          Move(FFeedback^, FBuffer^, FBufSize);
+          Encode(FBuffer);
+          XORBuffers(d, FBuffer, DataSize, d);
+          XORBuffers(FBuffer, FFeedback, FBufSize, FFeedback);
+        end;
+      end;
+    cmCFB:
+      while DataSize > 0 do
+      begin
+        Move(FFeedback^, FBuffer^, FBufSize);
+        Encode(FBuffer);
+        Move(PByteArray(FFeedback)[1], FFeedback^, FBufSize - 1);
+        PByteArray(FFeedback)[FBufSize - 1] := S^;
+        d^ := S^ xor PByte(FBuffer)^;
+        Inc(d);
+        Inc(S);
+        Dec(DataSize);
+      end;
+    cmOFB:
+      while DataSize > 0 do
+      begin
+        Move(FFeedback^, FBuffer^, FBufSize);
+        Encode(FBuffer);
+        d^ := S^ xor PByte(FBuffer)^;
+        Move(PByteArray(FFeedback)[1], FFeedback^, FBufSize - 1);
+        PByteArray(FFeedback)[FBufSize - 1] := PByte(FBuffer)^;
+        Inc(d);
+        Inc(S);
+        Dec(DataSize);
+      end;
+    cmCTSMAC, cmCBCMAC, cmCFBMAC:
+      begin
+        EncodeBuffer(Source, Dest, DataSize);
+        Exit;
+      end;
+  end;
+end;
+
+procedure TROCipher.CodeInit(Action: TPAction);
+begin
+  if not Initialized then
+    RaiseCipherException(errNotInitialized, Format(sNotInitialized, [ClassName]));
+  {  if (Mode in [cmCBCMAC, cmCTSMAC, cmCFBMAC]) <> (Action = paCalc) then
+      RaiseCipherException(errCantCalc, Format(sCantCalc, [ClassName]));}
+  if Action <> paCalc then
+    if Action <> paWipe then
+      Done
+    else
+      RndXORBuffer(RndTimeSeed, FFeedback^, FBufSize);
+  inherited CodeInit(Action);
+end;
+
+procedure TROCipher.CodeDone(Action: TPAction);
+begin
+  inherited CodeDone(Action);
+  if Action <> paCalc then
+    if Action <> paWipe then
+      Done
+    else
+      RndXORBuffer(RndTimeSeed, FFeedback^, FBufSize);
+end;
+
+procedure TROCipher.CodeBuf(var Buffer; const BufferSize: Integer; Action: TPAction);
+begin
+  if Action = paDecode then
+  begin
+    if Action in Actions then
+      DecodeBuffer(Buffer, Buffer, BufferSize);
+    inherited CodeBuf(Buffer, BufferSize, Action);
+  end
+  else
+  begin
+    inherited CodeBuf(Buffer, BufferSize, Action);
+    if Action in Actions then
+      EncodeBuffer(Buffer, Buffer, BufferSize);
+  end;
+end;
+
+function TROCipher.CalcMAC(Format: Integer): Ansistring;
+var
+  b                 : PByteArray;
+begin
+  if Mode in [cmECB, cmOFB] then
+    RaiseCipherException(errInvalidMACMode, sInvalidMACMode);
+  Done;
+  b := AllocMem(FBufSize);
+  try
+    Move(FBuffer^, b^, FBufSize);
+    EncodeBuffer(b^, b^, FBufSize);
+    SetLength(Result, FBufSize);
+    Move(FFeedback^, PAnsiChar(Result)^, FBufSize);
+    if Protection <> nil then
+      Result := Protection.CodeString(Result, paScramble, Format)
+    else
+      Result := StrToFormat(PAnsiChar(Result), Length(Result), Format);
+  finally
+    ReallocMem(b, 0);
+    Done;
+  end;
+end;
+
+class procedure TROCipher_Gost.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  ABufSize := 8;
+  AKeySize := 32;
+  AUserSize := 32;
+end;
+
+class function TROCipher_Gost.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    0B3h,003h,0A0h,03Fh,0B5h,07Bh,091h,04Dh
+         DB    097h,051h,024h,040h,0BDh,0CFh,025h,015h
+         DB    034h,005h,09Ch,0F8h,0ABh,010h,086h,09Fh
+         DB    0F2h,080h,047h,084h,047h,09Bh,01Ah,0D1h
+end;
+
+type
+  PCipherRec = ^TCipherRec;
+  TCipherRec = packed record
+    case Integer of
+      0: (x: array[0..7] of Byte);
+      1: (A, b: LongWord);
+  end;
+
+procedure TROCipher_Gost.Encode(Data: Pointer);
+var
+  i, A, b, t        : LongWord;
+  k                 : pintarray;
+begin
+  k := User;
+  A := PCipherRec(Data).A;
+  b := PCipherRec(Data).b;
+  for i := 0 to 11 do
+  begin
+    if i and 3 = 0 then
+      k := User;
+    t := A + k[0];
+    b := b xor Gost_Data[0, t and $FF] xor
+      Gost_Data[1, t shr 8 and $FF] xor
+      Gost_Data[2, t shr 16 and $FF] xor
+      Gost_Data[3, t shr 24];
+    t := b + k[1];
+    A := A xor Gost_Data[0, t and $FF] xor
+      Gost_Data[1, t shr 8 and $FF] xor
+      Gost_Data[2, t shr 16 and $FF] xor
+      Gost_Data[3, t shr 24];
+    Inc(PInteger(k), 2);
+  end;
+  k := @pintarray(User)[6];
+  for i := 0 to 3 do
+  begin
+    t := A + k[1];
+    b := b xor Gost_Data[0, t and $FF] xor
+      Gost_Data[1, t shr 8 and $FF] xor
+      Gost_Data[2, t shr 16 and $FF] xor
+      Gost_Data[3, t shr 24];
+    t := b + k[0];
+    A := A xor Gost_Data[0, t and $FF] xor
+      Gost_Data[1, t shr 8 and $FF] xor
+      Gost_Data[2, t shr 16 and $FF] xor
+      Gost_Data[3, t shr 24];
+    Dec(PInteger(k), 2);
+  end;
+  PCipherRec(Data).A := b;
+  PCipherRec(Data).b := A;
+end;
+
+procedure TROCipher_Gost.Decode(Data: Pointer);
+var
+  i, A, b, t        : LongWord;
+  k                 : pintarray;
+begin
+  A := PCipherRec(Data).A;
+  b := PCipherRec(Data).b;
+  k := User;
+  for i := 0 to 3 do
+  begin
+    t := A + k[0];
+    b := b xor Gost_Data[0, t and $FF] xor
+      Gost_Data[1, t shr 8 and $FF] xor
+      Gost_Data[2, t shr 16 and $FF] xor
+      Gost_Data[3, t shr 24];
+    t := b + k[1];
+    A := A xor Gost_Data[0, t and $FF] xor
+      Gost_Data[1, t shr 8 and $FF] xor
+      Gost_Data[2, t shr 16 and $FF] xor
+      Gost_Data[3, t shr 24];
+    Inc(PInteger(k), 2);
+  end;
+  for i := 0 to 11 do
+  begin
+    if i and 3 = 0 then
+      k := @pintarray(User)[6];
+    t := A + k[1];
+    b := b xor Gost_Data[0, t and $FF] xor
+      Gost_Data[1, t shr 8 and $FF] xor
+      Gost_Data[2, t shr 16 and $FF] xor
+      Gost_Data[3, t shr 24];
+    t := b + k[0];
+    A := A xor Gost_Data[0, t and $FF] xor
+      Gost_Data[1, t shr 8 and $FF] xor
+      Gost_Data[2, t shr 16 and $FF] xor
+      Gost_Data[3, t shr 24];
+    Dec(PInteger(k), 2);
+  end;
+  PCipherRec(Data).A := b;
+  PCipherRec(Data).b := A;
+end;
+
+procedure TROCipher_Gost.Init(const Key; Size: Integer; IVector: Pointer);
+begin
+  InitBegin(Size);
+  Move(Key, User^, Size);
+  InitEnd(IVector);
+end;
+
+class procedure TROCipher_Blowfish.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  ABufSize := 8;
+  AKeySize := 56;
+  AUserSize := SizeOf(Blowfish_Data) + SizeOf(Blowfish_Key);
+end;
+
+class function TROCipher_Blowfish.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    019h,071h,0CAh,0CDh,02Bh,09Ch,085h,029h
+         DB    0DAh,081h,047h,0B7h,0EBh,0CEh,016h,0C6h
+         DB    091h,00Eh,01Dh,0C8h,040h,012h,03Eh,035h
+         DB    070h,0EDh,0BCh,096h,04Ch,013h,0D0h,0B8h
+end;
+
+type
+  PBlowfish = ^TBlowfish;
+  TBlowfish = array[0..3, 0..255] of LongWord;
+
+  {$IFDEF UseASM}
+  {$IFNDEF 486GE}                       // no Support for <= CPU 386
+
+procedure TROCipher_Blowfish.Encode386(Data: Pointer);
+asm  // specaly for CPU < 486
+        PUSH   EDI
+        PUSH   ESI
+        PUSH   EBX
+        PUSH   EBP
+        PUSH   EDX
+
+        MOV    ESI,[EAX].TROCipher_Blowfish.FUser
+
+        MOV    EBX,[EDX]         // A
+        MOV    EDX,[EDX + 4]     // B
+
+        XCHG   BL,BH       // here BSWAP EBX,EDX
+        XCHG   DL,DH
+        ROL    EBX,16
+        ROL    EDX,16
+        XCHG   BL,BH
+        XCHG   DL,DH
+
+        XOR    EBX,[ESI + 4 * 256 * 4]
+        XOR    EDI,EDI
+
+@@1:    MOV    EAX,EBX
+        SHR    EBX,16
+
+        MOVZX  ECX,BH
+        MOV    EBP,[ESI + ECX * 4 + 1024 * 0]
+        MOVZX  ECX,BL
+        ADD    EBP,[ESI + ECX * 4 + 1024 * 1]
+
+        MOVZX  ECX,AH
+        XOR    EBP,[ESI + ECX * 4 + 1024 * 2]
+        MOVZX  ECX,AL
+        ADD    EBP,[ESI + ECX * 4 + 1024 * 3]
+        XOR    EDX,[ESI + 4 * 256 * 4 + 4 + EDI * 4]
+
+        XOR    EBP,EDX
+        MOV    EDX,EAX
+        MOV    EBX,EBP
+        INC    EDI
+        TEST   EDI,010h
+        JZ     @@1
+
+        POP    EAX
+        XOR    EDX,[ESI + 4 * 256 * 4 + 17 * 4]
+
+        XCHG   BL,BH        // here BSWAP EBX,EDX
+        XCHG   DL,DH
+        ROL    EBX,16
+        ROL    EDX,16
+        XCHG   BL,BH
+        XCHG   DL,DH
+
+        MOV    [EAX],EDX
+        MOV    [EAX + 4],EBX
+
+        POP    EBP
+        POP    EBX
+        POP    ESI
+        POP    EDI
+end;
+
+procedure TROCipher_Blowfish.Decode386(Data: Pointer);
+asm // specaly for CPU < 486
+        PUSH   EDI
+        PUSH   ESI
+        PUSH   EBX
+        PUSH   EBP
+        PUSH   EDX
+
+        MOV    ESI,[EAX].TROCipher_Blowfish.FUser
+
+        MOV    EBX,[EDX]         // A
+        MOV    EDX,[EDX + 4]     // B
+
+        XCHG   BL,BH
+        XCHG   DL,DH
+        ROL    EBX,16
+        ROL    EDX,16
+        XCHG   BL,BH
+        XCHG   DL,DH
+
+        XOR    EBX,[ESI + 4 * 256 * 4 + 17 * 4]
+
+        MOV    EDI,16
+
+@@1:    MOV    EAX,EBX
+        SHR    EBX,16
+
+        MOVZX  ECX,BH
+        MOV    EBP,[ESI + ECX * 4 + 1024 * 0]
+        MOVZX  ECX,BL
+        ADD    EBP,[ESI + ECX * 4 + 1024 * 1]
+
+        MOVZX  ECX,AH
+        XOR    EBP,[ESI + ECX * 4 + 1024 * 2]
+        MOVZX  ECX,AL
+        ADD    EBP,[ESI + ECX * 4 + 1024 * 3]
+        XOR    EDX,[ESI + 4 * 256 * 4 + EDI * 4]
+
+        XOR    EBP,EDX
+        MOV    EDX,EAX
+        MOV    EBX,EBP
+
+        DEC    EDI
+        JNZ    @@1
+
+        POP    EAX
+        XOR    EDX,[ESI + 4 * 256 * 4]
+
+        XCHG   BL,BH        // BSWAP
+        XCHG   DL,DH
+        ROL    EBX,16
+        ROL    EDX,16
+        XCHG   BL,BH
+        XCHG   DL,DH
+
+        MOV    [EAX],EDX
+        MOV    [EAX + 4],EBX
+
+        POP    EBP
+        POP    EBX
+        POP    ESI
+        POP    EDI
+end;
+{$ENDIF}                                //486GE
+{$ENDIF}
+
+procedure TROCipher_Blowfish.Encode(Data: Pointer);
+{$IFDEF UseASM}                         // specialy for CPU >= 486
+asm
+        PUSH   EDI
+        PUSH   ESI
+        PUSH   EBX
+        PUSH   EBP
+        PUSH   EDX
+
+        MOV    ESI,[EAX].TROCipher_Blowfish.FUser
+        MOV    EBX,[EDX]         // A
+        MOV    EBP,[EDX + 4]     // B
+
+        BSWAP  EBX               // CPU >= 486
+        BSWAP  EBP
+
+        XOR    EDI,EDI
+        XOR    EBX,[ESI + 4 * 256 * 4]
+//      XOR    ECX,ECX
+@@1:
+
+        MOV    EAX,EBX
+        SHR    EBX,16
+        MOVZX  ECX,BH     // it's faster with AMD Chips,
+//        MOV    CL,BH    // it's faster with PII's
+        MOV    EDX,[ESI + ECX * 4 + 1024 * 0]
+        MOVZX  ECX,BL
+//        MOV    CL,BL
+        ADD    EDX,[ESI + ECX * 4 + 1024 * 1]
+
+        MOVZX  ECX,AH
+//        MOV    CL,AH
+        XOR    EDX,[ESI + ECX * 4 + 1024 * 2]
+        MOVZX  ECX,AL
+//        MOV    CL,AL
+        ADD    EDX,[ESI + ECX * 4 + 1024 * 3]
+        XOR    EBP,[ESI + 4 * 256 * 4 + 4 + EDI * 4]
+
+        INC    EDI
+        XOR    EDX,EBP
+        TEST   EDI,010h
+        MOV    EBP,EAX
+        MOV    EBX,EDX
+        JZ     @@1
+
+        POP    EAX
+        XOR    EBP,[ESI + 4 * 256 * 4 + 17 * 4]
+
+        BSWAP  EBX
+        BSWAP  EBP
+
+        MOV    [EAX],EBP
+        MOV    [EAX + 4],EBX
+
+        POP    EBP
+        POP    EBX
+        POP    ESI
+        POP    EDI
+end;
+{$ELSE}
+var
+  i, A, b           : LongWord;
+  p                 : pintarray;
+  d                 : PBlowfish;
+begin
+  d := User;
+  p := Pointer(PChar(User) + SizeOf(Blowfish_Data));
+  A := SwapInteger(PCipherRec(Data).A) xor p[0];
+  Inc(PInteger(p));
+  b := SwapInteger(PCipherRec(Data).b);
+  for i := 0 to 7 do
+  begin
+    b := b xor p[0] xor (d[0, A shr 24] +
+      d[1, A shr 16 and $FF] xor
+      d[2, A shr 8 and $FF] +
+      d[3, A and $FF]);
+
+    A := A xor p[1] xor (d[0, b shr 24] +
+      d[1, b shr 16 and $FF] xor
+      d[2, b shr 8 and $FF] +
+      d[3, b and $FF]);
+    Inc(PInteger(p), 2);
+  end;
+  PCipherRec(Data).A := SwapInteger(b xor p[0]);
+  PCipherRec(Data).b := SwapInteger(A);
+end;
+{$ENDIF}
+
+procedure TROCipher_Blowfish.Decode(Data: Pointer);
+{$IFDEF UseASM}
+asm
+        PUSH   EDI
+        PUSH   ESI
+        PUSH   EBX
+        PUSH   EBP
+        PUSH   EDX
+
+        MOV    ESI,[EAX].TROCipher_Blowfish.FUser
+        MOV    EBX,[EDX]         // A
+        MOV    EBP,[EDX + 4]     // B
+
+        BSWAP  EBX
+        BSWAP  EBP
+
+        XOR    EBX,[ESI + 4 * 256 * 4 + 17 * 4]
+        MOV    EDI,16
+//        XOR    ECX,ECX
+
+@@1:    MOV    EAX,EBX
+        SHR    EBX,16
+
+        MOVZX  ECX,BH
+//        MOV    CL,BH
+        MOV    EDX,[ESI + ECX * 4 + 1024 * 0]
+        MOVZX  ECX,BL
+//        MOV    CL,BL
+        ADD    EDX,[ESI + ECX * 4 + 1024 * 1]
+
+        MOVZX  ECX,AH
+//        MOV    CL,AH
+        XOR    EDX,[ESI + ECX * 4 + 1024 * 2]
+        MOVZX  ECX,AL
+//        MOV    CL,AL
+        ADD    EDX,[ESI + ECX * 4 + 1024 * 3]
+        XOR    EBP,[ESI + 4 * 256 * 4 + EDI * 4]
+
+        XOR    EDX,EBP
+        DEC    EDI
+        MOV    EBP,EAX
+        MOV    EBX,EDX
+        JNZ    @@1
+
+        POP    EAX
+        XOR    EBP,[ESI + 4 * 256 * 4]
+
+        BSWAP  EBX
+        BSWAP  EBP
+
+        MOV    [EAX],EBP
+        MOV    [EAX + 4],EBX
+
+        POP    EBP
+        POP    EBX
+        POP    ESI
+        POP    EDI
+end;
+{$ELSE}
+var
+  i, A, b           : LongWord;
+  p                 : pintarray;
+  d                 : PBlowfish;
+begin
+  d := User;
+  p := Pointer(PChar(User) + SizeOf(Blowfish_Data) + SizeOf(Blowfish_Key) - SizeOf(Integer));
+  A := SwapInteger(PCipherRec(Data).A) xor p[0];
+  b := SwapInteger(PCipherRec(Data).b);
+  for i := 0 to 7 do
+  begin
+    Dec(PInteger(p), 2);
+    b := b xor p[1] xor (d[0, A shr 24] +
+      d[1, A shr 16 and $FF] xor
+      d[2, A shr 8 and $FF] +
+      d[3, A and $FF]);
+    A := A xor p[0] xor (d[0, b shr 24] +
+      d[1, b shr 16 and $FF] xor
+      d[2, b shr 8 and $FF] +
+      d[3, b and $FF]);
+  end;
+  Dec(PInteger(p));
+  PCipherRec(Data).A := SwapInteger(b xor p[0]);
+  PCipherRec(Data).b := SwapInteger(A);
+end;
+{$ENDIF}
+
+procedure TROCipher_Blowfish.Init(const Key; Size: Integer; IVector: Pointer);
+var
+  i, j              : Integer;
+  b                 : array[0..7] of Byte;
+  k                 : PByteArray;
+  p                 : pintarray;
+  S                 : PBlowfish;
+begin
+  InitBegin(Size);
+  k := @Key;
+  S := User;
+  p := Pointer(PChar(User) + SizeOf(Blowfish_Data));
+  Move(Blowfish_Data, S^, SizeOf(Blowfish_Data));
+  Move(Blowfish_Key, p^, SizeOf(Blowfish_Key));
+  j := 0;
+  for i := 0 to 17 do
+  begin
+    p[i] := p[i] xor (k[(j + 0) mod Size] shl 24 +
+      k[(j + 1) mod Size] shl 16 +
+      k[(j + 2) mod Size] shl 8 +
+      k[(j + 3) mod Size]);
+    j := (j + 4) mod Size;
+  end;
+  FillChar(b, SizeOf(b), 0);
+  for i := 0 to 8 do
+  begin
+    Encode(@b);
+    p[i * 2] := SwapInteger(PCipherRec(@b).A);
+    p[i * 2 + 1] := SwapInteger(PCipherRec(@b).b);
+  end;
+  for i := 0 to 3 do
+    for j := 0 to 127 do
+    begin
+      Encode(@b);
+      S[i, j * 2] := SwapInteger(PCipherRec(@b).A);
+      S[i, j * 2 + 1] := SwapInteger(PCipherRec(@b).b);
+    end;
+
+  FillChar(b, SizeOf(b), 0);
+  InitEnd(IVector);
+end;
+
+class procedure TROCipher_IDEA.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  ABufSize := 8;
+  AKeySize := 16;
+  AUserSize := 208;
+end;
+
+class function TROCipher_IDEA.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    08Ch,065h,0CAh,0D8h,043h,0E7h,099h,093h
+         DB    0EDh,041h,0EAh,048h,0FDh,066h,050h,094h
+         DB    0A2h,025h,06Dh,0D7h,0B1h,0D0h,09Ah,023h
+         DB    03Dh,0D2h,0E8h,0ECh,0C9h,045h,07Fh,07Eh
+end;
+
+function IDEAMul(x, y: LongWord): LongWord; assembler; register;
+asm
+     AND    EAX,0FFFFh
+     JZ     @@1
+     AND    EDX,0FFFFh
+     JZ     @@1
+     MUL    EDX
+     MOV    ECX,EAX
+     MOV    EDX,EAX
+     SHR    EDX,16
+     SUB    EAX,EDX
+     CMP    AX,CX
+     JNA    @@2
+     INC    EAX
+@@2: RET
+@@1: MOV    ECX,1
+     SUB    ECX,EAX
+     SUB    ECX,EDX
+     MOV    EAX,ECX
+end;
+
+procedure TROCipher_IDEA.RO_Cipher(Data, Key: PWordArray);
+var
+  i                 : LongWord;
+  x, y, A, b, c, d  : LongWord;
+begin
+  i := SwapInteger(pintarray(Data)[0]);
+  A := LongRec(i).Hi;
+  b := LongRec(i).Lo;
+  i := SwapInteger(pintarray(Data)[1]);
+  c := LongRec(i).Hi;
+  d := LongRec(i).Lo;
+  for i := 0 to 7 do
+  begin
+    A := IDEAMul(A, Key[0]);
+    Inc(b, Key[1]);
+    Inc(c, Key[2]);
+    d := IDEAMul(d, Key[3]);
+    y := c xor A;
+    y := IDEAMul(y, Key[4]);
+    x := b xor d + y;
+    x := IDEAMul(x, Key[5]);
+    Inc(y, x);
+    A := A xor x;
+    d := d xor y;
+    y := b xor y;
+    b := c xor x;
+    c := y;
+    Inc(PWord(Key), 6);
+  end;
+  LongRec(i).Hi := IDEAMul(A, Key[0]);
+  LongRec(i).Lo := c + Key[1];
+  pintarray(Data)[0] := SwapInteger(i);
+  LongRec(i).Hi := b + Key[2];
+  LongRec(i).Lo := IDEAMul(d, Key[3]);
+  pintarray(Data)[1] := SwapInteger(i);
+end;
+
+procedure TROCipher_IDEA.Encode(Data: Pointer);
+begin
+  RO_Cipher(Data, User);
+end;
+
+procedure TROCipher_IDEA.Decode(Data: Pointer);
+begin
+  RO_Cipher(Data, @pintarray(User)[26]);
+end;
+
+procedure TROCipher_IDEA.Init(const Key; Size: Integer; IVector: Pointer);
+
+  function IDEAInv(x: word): word;
+  var
+    A, b, c, d      : word;
+  begin
+    if x <= 1 then
+    begin
+      Result := x;
+      Exit;
+    end;
+    A := 1;
+    b := $10001 div x;
+    c := $10001 mod x;
+    while c <> 1 do
+    begin
+      d := x div c;
+      x := x mod c;
+      Inc(A, b * d);
+      if x = 1 then
+      begin
+        Result := A;
+        Exit;
+      end;
+      d := c div x;
+      c := c mod x;
+      Inc(b, A * d);
+    end;
+    Result := 1 - b;
+  end;
+
+var
+  i                 : Integer;
+  e                 : PWordArray;
+  A, b, c           : word;
+  k, d              : PWordArray;
+begin
+  InitBegin(Size);
+  e := User;
+  Move(Key, e^, Size);
+  for i := 0 to 7 do
+    e[i] := swap(e[i]);
+  for i := 0 to 39 do
+    e[i + 8] := e[i and not 7 + (i + 1) and 7] shl 9 or
+      e[i and not 7 + (i + 2) and 7] shr 7;
+  for i := 41 to 44 do
+    e[i + 7] := e[i] shl 9 or e[i + 1] shr 7;
+  k := e;
+  d := @e[100];
+  A := IDEAInv(k[0]);
+  b := 0 - k[1];
+  c := 0 - k[2];
+  d[3] := IDEAInv(k[3]);
+  d[2] := c;
+  d[1] := b;
+  d[0] := A;
+  Inc(PWord(k), 4);
+  for i := 1 to 8 do
+  begin
+    Dec(PWord(d), 6);
+    A := k[0];
+    d[5] := k[1];
+    d[4] := A;
+    A := IDEAInv(k[2]);
+    b := 0 - k[3];
+    c := 0 - k[4];
+    d[3] := IDEAInv(k[5]);
+    d[2] := b;
+    d[1] := c;
+    d[0] := A;
+    Inc(PWord(k), 6);
+  end;
+  A := d[2];
+  d[2] := d[1];
+  d[1] := A;
+  InitEnd(IVector);
+end;
+
+type
+  PSAFERRec = ^TSAFERRec;
+  TSAFERRec = packed record
+    case Integer of
+      0: (A, b, c, d, e, f, G, H: Byte);
+      1: (x, y: Integer);
+  end;
+
+procedure TROCipher_SAFER.SetRounds(Value: Integer);
+begin
+  if (Value < 4) or (Value > 13) then
+    case FSAFERMode of                  {Default Rounds}
+      smK40, smSK40: Value := 5;
+      smK64, smSK64: Value := 6;
+      smK128, smSK128: Value := 10;
+    else
+      Value := 8;
+    end;
+  FRounds := Value;
+end;
+
+class procedure TROCipher_SAFER.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  ABufSize := 8;
+  AKeySize := 16;
+  AUserSize := 768;
+end;
+
+class function TROCipher_SAFER.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    000h,03Dh,049h,020h,073h,063h,085h,0AAh
+         DB    0D9h,0C2h,00Ah,0DEh,07Eh,09Eh,0E9h,0ABh
+         DB    024h,0D0h,074h,034h,047h,07Eh,021h,01Dh
+         DB    055h,0F9h,035h,028h,098h,084h,0A8h,075h
+end;
+
+procedure TROCipher_SAFER.Encode(Data: Pointer);
+var
+  EXP, Log, Key     : PByteArray;
+  i                 : Integer;
+  t                 : Byte;
+begin
+  EXP := User;
+  Log := Pointer(PChar(User) + 256);
+  Key := Pointer(PChar(User) + 512);
+  with PSAFERRec(Data)^ do
+  begin
+    for i := 1 to FRounds do
+    begin
+      A := A xor Key[0];
+      b := b + Key[1];
+      c := c + Key[2];
+      d := d xor Key[3];
+      e := e xor Key[4];
+      f := f + Key[5];
+      G := G + Key[6];
+      H := H xor Key[7];
+
+      A := EXP[A] + Key[8];
+      b := Log[b] xor Key[9];
+      c := Log[c] xor Key[10];
+      d := EXP[d] + Key[11];
+      e := EXP[e] + Key[12];
+      f := Log[f] xor Key[13];
+      G := Log[G] xor Key[14];
+      H := EXP[H] + Key[15];
+
+      Inc(b, A);
+      Inc(A, b);
+      Inc(d, c);
+      Inc(c, d);
+      Inc(f, e);
+      Inc(e, f);
+      Inc(H, G);
+      Inc(G, H);
+
+      Inc(c, A);
+      Inc(A, c);
+      Inc(G, e);
+      Inc(e, G);
+      Inc(d, b);
+      Inc(b, d);
+      Inc(H, f);
+      Inc(f, H);
+
+      Inc(e, A);
+      Inc(A, e);
+      Inc(f, b);
+      Inc(b, f);
+      Inc(G, c);
+      Inc(c, G);
+      Inc(H, d);
+      Inc(d, H);
+
+      t := b;
+      b := e;
+      e := c;
+      c := t;
+      t := d;
+      d := f;
+      f := G;
+      G := t;
+
+      Inc(PByte(Key), 16);
+    end;
+    A := A xor Key[0];
+    b := b + Key[1];
+    c := c + Key[2];
+    d := d xor Key[3];
+    e := e xor Key[4];
+    f := f + Key[5];
+    G := G + Key[6];
+    H := H xor Key[7];
+  end;
+end;
+
+procedure TROCipher_SAFER.Decode(Data: Pointer);
+var
+  EXP, Log, Key     : PByteArray;
+  i                 : Integer;
+  t                 : Byte;
+begin
+  EXP := User;
+  Log := Pointer(PChar(User) + 256);
+  Key := Pointer(PChar(User) + 504 + 8 * (FRounds * 2 + 1));
+  with PSAFERRec(Data)^ do
+  begin
+    H := H xor Key[7];
+    G := G - Key[6];
+    f := f - Key[5];
+    e := e xor Key[4];
+    d := d xor Key[3];
+    c := c - Key[2];
+    b := b - Key[1];
+    A := A xor Key[0];
+
+    for i := 1 to FRounds do
+    begin
+      Dec(PByte(Key), 16);
+      t := e;
+      e := b;
+      b := c;
+      c := t;
+      t := f;
+      f := d;
+      d := G;
+      G := t;
+
+      Dec(A, e);
+      Dec(e, A);
+      Dec(b, f);
+      Dec(f, b);
+      Dec(c, G);
+      Dec(G, c);
+      Dec(d, H);
+      Dec(H, d);
+
+      Dec(A, c);
+      Dec(c, A);
+      Dec(e, G);
+      Dec(G, e);
+      Dec(b, d);
+      Dec(d, b);
+      Dec(f, H);
+      Dec(H, f);
+
+      Dec(A, b);
+      Dec(b, A);
+      Dec(c, d);
+      Dec(d, c);
+      Dec(e, f);
+      Dec(f, e);
+      Dec(G, H);
+      Dec(H, G);
+
+      H := H - Key[15];
+      G := G xor Key[14];
+      f := f xor Key[13];
+      e := e - Key[12];
+      d := d - Key[11];
+      c := c xor Key[10];
+      b := b xor Key[9];
+      A := A - Key[8];
+
+      H := Log[H] xor Key[7];
+      G := EXP[G] - Key[6];
+      f := EXP[f] - Key[5];
+      e := Log[e] xor Key[4];
+      d := Log[d] xor Key[3];
+      c := EXP[c] - Key[2];
+      b := EXP[b] - Key[1];
+      A := Log[A] xor Key[0];
+    end;
+  end;
+end;
+
+procedure TROCipher_SAFER.Init(const Key; Size: Integer; IVector: Pointer);
+begin
+  InitNew(Key, Size, IVector, smStrong);
+end;
+
+procedure TROCipher_SAFER.InitNew(const Key; Size: Integer; IVector: Pointer; SAFERMode: TSAFERMode);
+
+  procedure InitTab;
+  var
+    i, e            : Integer;
+    EXP             : PByte;
+    Log             : PByteArray;
+  begin
+    EXP := User;
+    Log := Pointer(PChar(User) + 256);
+    e := 1;
+    for i := 0 to 255 do
+    begin
+      EXP^ := e and $FF;
+      Log[e and $FF] := i;
+      e := (e * 45) mod 257;
+      Inc(EXP);
+    end;
+  end;
+
+  procedure InitKey;
+
+    function ROR3(Value: Byte): Byte; assembler;
+    asm
+      ROR AL,3
+    end;
+
+    function ROL6(Value: Byte): Byte; assembler;
+    asm
+      ROL AL,6
+    end;
+
+  var
+    d               : PByte;
+    EXP             : PByteArray;
+    Strong          : Boolean;
+    k               : array[Boolean, 0..8] of Byte;
+    i, j            : Integer;
+  begin
+    Strong := FSAFERMode in [smStrong, smSK40, smSK64, smSK128];
+    EXP := User;
+    d := User;
+    Inc(d, 512);
+    FillChar(k, SizeOf(k), 0);
+    {Setup Key A}
+    i := Size;
+    if i > 8 then
+      i := 8;
+    Move(Key, k[False], i);
+    {Setup the Key for K-40, SK-40}
+    if FSAFERMode in [smK40, smSK40] then
+    begin
+      k[False, 5] := k[False, 0] xor k[False, 2] xor 129;
+      k[False, 6] := k[False, 0] xor k[False, 3] xor k[False, 4] xor 66;
+      k[False, 7] := k[False, 1] xor k[False, 2] xor k[False, 4] xor 36;
+      k[False, 8] := k[False, 1] xor k[False, 3] xor 24;
+      Move(k[False], k[True], SizeOf(k[False]));
+    end
+    else
+    begin
+      if Size > 8 then
+      begin
+        i := Size - 8;
+        if i > 8 then
+          i := 8;
+        Move(TByteArray(Key)[8], k[True], i);
+      end
+      else
+        Move(k[False], k[True], 9);
+      for i := 0 to 7 do
+      begin
+        k[False, 8] := k[False, 8] xor k[False, i];
+        k[True, 8] := k[True, 8] xor k[True, i];
+      end;
+    end;
+    {Setup the KeyData}
+    Move(k[True], d^, 8);
+    Inc(d, 8);
+
+    for i := 0 to 8 do
+      k[False, i] := ROR3(k[False, i]);
+
+    for i := 1 to FRounds do
+    begin
+      for j := 0 to 8 do
+      begin
+        k[False, j] := ROL6(k[False, j]);
+        k[True, j] := ROL6(k[True, j]);
+      end;
+      for j := 0 to 7 do
+      begin
+        if Strong then
+          d^ := k[False, (j + i * 2 - 1) mod 9] + EXP[EXP[18 * i + j + 1]]
+        else
+          d^ := k[False, j] + EXP[EXP[18 * i + j + 1]];
+        Inc(d);
+      end;
+      for j := 0 to 7 do
+      begin
+        if Strong then
+          d^ := k[True, (j + i * 2) mod 9] + EXP[EXP[18 * i + j + 10]]
+        else
+          d^ := k[True, j] + EXP[EXP[18 * i + j + 10]];
+        Inc(d);
+      end;
+    end;
+    FillChar(k, SizeOf(k), 0);
+  end;
+
+begin
+  InitBegin(Size);
+  FSAFERMode := SAFERMode;
+  if SAFERMode = smDefault then
+    if Size <= 5 then
+      FSAFERMode := smK40
+    else
+      if Size <= 8 then
+        FSAFERMode := smK64
+      else
+        FSAFERMode := smK128
+    else
+      if SAFERMode = smStrong then
+        if Size <= 5 then
+          FSAFERMode := smSK40
+        else
+          if Size <= 8 then
+            FSAFERMode := smSK64
+          else
+            FSAFERMode := smSK128;
+      SetRounds(FRounds);
+      InitTab;
+      InitKey;
+      InitEnd(IVector);
+end;
+
+class procedure TROCipher_SAFER_K40.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  inherited GetContext(ABufSize, AKeySize, AUserSize);
+  AKeySize := 5;
+end;
+
+class function TROCipher_SAFER_K40.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    005h,0B4h,019h,057h,026h,05Ch,013h,060h
+         DB    0A0h,082h,094h,045h,0D6h,0A5h,046h,0D8h
+         DB    073h,050h,096h,080h,04Fh,06Dh,0F7h,0E5h
+         DB    0C8h,01Ah,0EFh,044h,04Ch,0B4h,059h,013h
+end;
+
+procedure TROCipher_SAFER_K40.Init(const Key; Size: Integer; IVector: Pointer);
+begin
+  InitNew(Key, Size, IVector, smK40);
+end;
+
+class function TROCipher_SAFER_SK40.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    0D9h,003h,003h,06Dh,018h,038h,0D1h,0C1h
+         DB    089h,0E8h,038h,012h,07Fh,028h,0FCh,0C7h
+         DB    0C5h,00Bh,0B7h,0C4h,0DBh,021h,0A4h,031h
+         DB    020h,008h,08Ah,077h,0F7h,0DFh,026h,0FFh
+end;
+
+procedure TROCipher_SAFER_SK40.Init(const Key; Size: Integer; IVector: Pointer);
+begin
+  InitNew(Key, Size, IVector, smSK40);
+end;
+
+class procedure TROCipher_SAFER_K64.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  inherited GetContext(ABufSize, AKeySize, AUserSize);
+  AKeySize := 8;
+end;
+
+class function TROCipher_SAFER_K64.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    08Ch,0B2h,032h,0F0h,00Eh,0C2h,0DAh,0CBh
+         DB    039h,008h,02Dh,05Ch,093h,0FFh,0CEh,0F3h
+         DB    08Fh,01Fh,0B7h,02Ch,0C5h,0C7h,0A7h,0E9h
+         DB    089h,0BEh,061h,08Bh,000h,0E6h,09Fh,00Eh
+end;
+
+procedure TROCipher_SAFER_K64.Init(const Key; Size: Integer; IVector: Pointer);
+begin
+  InitNew(Key, Size, IVector, smK64);
+end;
+
+class function TROCipher_SAFER_SK64.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    0DDh,09Ch,01Ah,0D6h,029h,00Ch,0EEh,04Fh
+         DB    0E5h,04Bh,0C0h,055h,0BFh,022h,00Eh,0BCh
+         DB    019h,041h,078h,0CFh,094h,0DBh,02Fh,039h
+         DB    06Bh,01Eh,0A7h,0CAh,04Bh,05Fh,077h,0E0h
+end;
+
+procedure TROCipher_SAFER_SK64.Init(const Key; Size: Integer; IVector: Pointer);
+begin
+  InitNew(Key, Size, IVector, smSK64);
+end;
+
+class procedure TROCipher_SAFER_K128.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  inherited GetContext(ABufSize, AKeySize, AUserSize);
+  AKeySize := 16;
+end;
+
+class function TROCipher_SAFER_K128.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    00Ch,0A9h,070h,0B9h,0F3h,014h,087h,0D9h
+         DB    09Eh,05Eh,078h,031h,074h,0DFh,0A8h,0BBh
+         DB    03Dh,040h,0A5h,0D9h,08Ch,07Ch,004h,0B7h
+         DB    09Ch,001h,0DAh,063h,0ABh,026h,035h,0BCh
+end;
+
+procedure TROCipher_SAFER_K128.Init(const Key; Size: Integer; IVector: Pointer);
+begin
+  InitNew(Key, Size, IVector, smK128);
+end;
+
+class function TROCipher_SAFER_SK128.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    0C8h,0A6h,070h,033h,029h,038h,038h,02Bh
+         DB    069h,0ACh,061h,072h,08Fh,0DCh,09Fh,0A4h
+         DB    09Eh,06Fh,0C4h,053h,0D8h,089h,0FFh,042h
+         DB    072h,009h,07Dh,0CDh,0D0h,0EAh,07Eh,028h
+end;
+
+procedure TROCipher_SAFER_SK128.Init(const Key; Size: Integer; IVector: Pointer);
+begin
+  InitNew(Key, Size, IVector, smSK128);
+end;
+
+type
+  PTEARec = ^TTEARec;
+  TTEARec = packed record
+    A, b, c, d: LongWord;
+  end;
+
+const
+  TEA_Delta         = $9E3779B9;
+
+procedure TROCipher_TEA.SetRounds(Value: Integer);
+begin
+  FRounds := Value;
+  if FRounds < 16 then
+    FRounds := 16
+  else
+    if FRounds > 32 then
+      FRounds := 32;
+end;
+
+class procedure TROCipher_TEA.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  ABufSize := 8;
+  AKeySize := 16;
+  AUserSize := 32;
+end;
+
+class function TROCipher_TEA.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    0B7h,0B8h,0AAh,0BBh,026h,04Bh,006h,0F9h
+         DB    070h,086h,0B0h,0E4h,056h,004h,029h,0CCh
+         DB    0BFh,055h,0EAh,04Eh,0EFh,059h,026h,018h
+         DB    019h,0B0h,003h,07Ch,029h,08Ch,0E2h,077h
+end;
+
+procedure TROCipher_TEA.Encode(Data: Pointer);
+{$IFDEF UseASM}
+asm
+         PUSH  EDI
+         PUSH  ESI
+         PUSH  EBX
+         PUSH  EBP
+         PUSH  EDX
+
+         MOV   EBX,[EDX]       // X
+         MOV   EDX,[EDX + 4]   // Y
+         XOR   EDI,EDI         // Sum
+
+         MOV   ESI,[EAX].TROCipher_TEA.FUser  // User
+         MOV   ECX,[EAX].TROCipher_TEA.FRounds  // Rounds
+
+@@1:     ADD   EDI,TEA_Delta
+
+         MOV   EAX,EDX
+         MOV   EBP,EDX
+         SHL   EAX,4
+         SHR   EBP,5
+         ADD   EAX,[ESI]
+         ADD   EBP,[ESI +  4]
+         XOR   EAX,EDX
+         ADD   EAX,EDI
+
+         XOR   EAX,EBP
+         ADD   EAX,EBX
+         MOV   EBX,EAX
+         SHL   EAX,4
+         MOV   EBP,EBX
+         SHR   EBP,5
+         ADD   EAX,[ESI +  8]
+         XOR   EAX,EBX
+         ADD   EBP,[ESI + 12]
+         ADD   EAX,EDI
+
+         XOR   EAX,EBP
+         ADD   EDX,EAX
+
+         DEC   ECX
+         JNZ   @@1
+
+         POP   EAX
+         MOV   [EAX],EBX
+         MOV   [EAX + 4],EDX
+
+         POP   EBP
+         POP   EBX
+         POP   ESI
+         POP   EDI
+end;
+{$ELSE}
+var
+  i, sum, x, y      : LongWord;
+begin
+  sum := 0;
+  x := PTEARec(Data).A;
+  y := PTEARec(Data).b;
+  with PTEARec(User)^ do
+    for i := 1 to FRounds do
+    begin
+      Inc(sum, TEA_Delta);
+      Inc(x, (y shl 4 + A) xor y + sum xor (y shr 5 + b));
+      Inc(y, (x shl 4 + c) xor x + sum xor (x shr 5 + d));
+    end;
+  PTEARec(Data).A := x;
+  PTEARec(Data).b := y;
+end;
+{$ENDIF}
+
+procedure TROCipher_TEA.Decode(Data: Pointer);
+{$IFDEF UseASM}
+asm
+         PUSH  EDI
+         PUSH  ESI
+         PUSH  EBX
+         PUSH  EBP
+         PUSH  EDX
+
+         MOV   EBX,[EDX]       // X
+         MOV   EDX,[EDX + 4]   // Y
+
+         MOV   ESI,[EAX].TROCipher_TEA.FUser  // User
+         MOV   EDI,TEA_Delta
+         MOV   ECX,[EAX].TROCipher_TEA.FRounds  // Rounds
+         IMUL  EDI,ECX
+
+@@1:     MOV   EAX,EBX
+         MOV   EBP,EBX
+         SHL   EAX,4
+         SHR   EBP,5
+         ADD   EAX,[ESI +  8]
+         ADD   EBP,[ESI + 12]
+         XOR   EAX,EBX
+         ADD   EAX,EDI
+         XOR   EAX,EBP
+         SUB   EDX,EAX
+         MOV   EAX,EDX
+         SHL   EAX,4
+         MOV   EBP,EDX
+         SHR   EBP,5
+         ADD   EAX,[ESI]
+         XOR   EAX,EDX
+         ADD   EBP,[ESI + 4]
+         ADD   EAX,EDI
+
+         XOR   EAX,EBP
+         SUB   EDI,TEA_Delta
+         SUB   EBX,EAX
+
+         DEC   ECX
+         JNZ   @@1
+
+         POP   EAX
+         MOV   [EAX],EBX
+         MOV   [EAX + 4],EDX
+
+         POP   EBP
+         POP   EBX
+         POP   ESI
+         POP   EDI
+end;
+{$ELSE}
+var
+  i, sum, x, y      : LongWord;
+begin
+  sum := TEA_Delta * LongWord(FRounds);
+  x := PTEARec(Data).A;
+  y := PTEARec(Data).b;
+  with PTEARec(User)^ do
+    for i := 1 to FRounds do
+    begin
+      Dec(y, (x shl 4 + c) xor x + sum xor (x shr 5 + d));
+      Dec(x, (y shl 4 + A) xor y + sum xor (y shr 5 + b));
+      Dec(sum, TEA_Delta);
+    end;
+  PTEARec(Data).A := x;
+  PTEARec(Data).b := y;
+end;
+{$ENDIF}
+
+procedure TROCipher_TEA.Init(const Key; Size: Integer; IVector: Pointer);
+begin
+  InitBegin(Size);
+  Move(Key, User^, Size);
+  SetRounds(FRounds);
+  InitEnd(IVector);
+end;
+
+class function TROCipher_TEAN.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    0CDh,07Eh,0BBh,0A2h,092h,01Ah,04Bh,03Bh
+         DB    0E2h,09Eh,062h,0CFh,0F7h,01Dh,0A5h,0DFh
+         DB    063h,033h,094h,029h,0E2h,036h,07Ch,066h
+         DB    03Fh,0F8h,01Ah,0F9h,002h,078h,0BFh,0A1h
+end;
+
+procedure TROCipher_TEAN.Encode(Data: Pointer);
+var
+  i, sum, x, y      : LongWord;
+  k                 : pintarray;
+begin
+  sum := 0;
+  x := PTEARec(Data).A;
+  y := PTEARec(Data).b;
+  k := User;
+  for i := 1 to FRounds do
+  begin
+    Inc(x, (y shl 4 xor y shr 5) + (y xor sum) + k[sum and 3]);
+    Inc(sum, TEA_Delta);
+    Inc(y, (x shl 4 xor x shr 5) + (x xor sum) + k[sum shr 11 and 3]);
+  end;
+  PTEARec(Data).A := x;
+  PTEARec(Data).b := y;
+end;
+
+procedure TROCipher_TEAN.Decode(Data: Pointer);
+var
+  i, sum, x, y      : LongWord;
+  k                 : pintarray;
+begin
+  sum := TEA_Delta * LongWord(FRounds);
+  x := PTEARec(Data).A;
+  y := PTEARec(Data).b;
+  k := User;
+  with PTEARec(User)^ do
+    for i := 1 to FRounds do
+    begin
+      Dec(y, (x shl 4 xor x shr 5) + (x xor sum) + k[sum shr 11 and 3]);
+      Dec(sum, TEA_Delta);
+      Dec(x, (y shl 4 xor y shr 5) + (y xor sum) + k[sum and 3]);
+    end;
+  PTEARec(Data).A := x;
+  PTEARec(Data).b := y;
+end;
+
+const
+  SCOP_SIZE         = 32;               {is the Maximum}
+
+class procedure TROCipher_SCOP.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  ABufSize := SCOP_SIZE * SizeOf(Integer);
+  AKeySize := 48;
+  AUserSize := (384 * 4 + 4 * SizeOf(Integer)) * 2;
+end;
+
+class function TROCipher_SCOP.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    014h,0C0h,009h,0E8h,073h,0B6h,053h,092h
+         DB    08Bh,013h,069h,0A9h,0F2h,099h,0FEh,05Eh
+         DB    0EEh,03Bh,0FDh,0C1h,050h,059h,00Eh,094h
+         DB    062h,017h,008h,01Eh,0A4h,01Ah,04Dh,08Fh
+end;
+
+procedure TROCipher_SCOP.Encode(Data: Pointer);
+var
+  i, j, w           : Byte;
+  t, t1, T2, T3     : Integer;
+  p                 : pintarray;
+  b                 : PInteger;
+begin
+  p := User;
+  i := p[0];
+  j := p[1];
+  T3 := p[3];
+  p := @p[4 + 128];
+  b := Data;
+  for w := 1 to SCOP_SIZE do
+  begin
+    t1 := p[j];
+    Inc(j, T3);
+    t := p[i - 128];
+    T2 := p[j];
+    Inc(i);
+    T3 := T2 + t;
+    p[j] := T3;
+    Inc(j, T2);
+    Inc(b^, t1 + T2);
+    Inc(b);
+  end;
+end;
+
+procedure TROCipher_SCOP.Decode(Data: Pointer);
+var
+  i, j, w           : Byte;
+  t, t1, T2, T3     : Integer;
+  p                 : pintarray;
+  b                 : PInteger;
+begin
+  p := User;
+  i := p[0];
+  j := p[1];
+  T3 := p[3];
+  p := @p[4 + 128];
+  b := Data;
+  for w := 1 to SCOP_SIZE do
+  begin
+    t1 := p[j];
+    Inc(j, T3);
+    t := p[i - 128];
+    T2 := p[j];
+    Inc(i);
+    T3 := T2 + t;
+    p[j] := T3;
+    Inc(j, T2);
+    Dec(b^, t1 + T2);
+    Inc(b);
+  end;
+end;
+
+procedure TROCipher_SCOP.Init(const Key; Size: Integer; IVector: Pointer);
+var
+  Init_State        : packed record
+    Coef: array[0..7, 0..3] of Byte;
+    x: array[0..3] of LongWord;
+  end;
+
+  procedure ExpandKey;
+  var
+    p               : PByteArray;
+    i, c            : Integer;
+  begin
+    c := 1;
+    p := @Init_State;
+    Move(Key, p^, Size);
+    for i := Size to 47 do
+      p[i] := p[i - Size] + p[i - Size + 1];
+    for i := 0 to 31 do
+      if p[i] = 0 then
+      begin
+        p[i] := c;
+        Inc(c);
+      end;
+  end;
+
+  procedure GP8(Data: pintarray);
+  var
+    i, i2           : Integer;
+    NewX            : array[0..3] of LongWord;
+    x1, x2, X3, X4  : LongWord;
+    y1, y2          : LongWord;
+  begin
+    i := 0;
+    while i < 8 do
+    begin
+      i2 := i shr 1;
+      x1 := Init_State.x[i2] shr 16;
+      x2 := x1 * x1;
+      X3 := x2 * x1;
+      X4 := X3 * x1;
+      y1 := Init_State.Coef[i][0] * X4 +
+        Init_State.Coef[i][1] * X3 +
+        Init_State.Coef[i][2] * x2 +
+        Init_State.Coef[i][3] * x1 + 1;
+      x1 := Init_State.x[i2] and $FFFF;
+      x2 := x1 * x1;
+      X3 := x2 * x1;
+      X4 := X3 * x1;
+      y2 := Init_State.Coef[i + 1][0] * X4 +
+        Init_State.Coef[i + 2][1] * X3 +
+        Init_State.Coef[i + 3][2] * x2 +
+        Init_State.Coef[i + 4][3] * x1 + 1;
+      Data[i2] := y1 shl 16 or y2 and $FFFF;
+      NewX[i2] := y1 and $FFFF0000 or y2 shr 16;
+      Inc(i, 2);
+    end;
+    Init_State.x[0] := NewX[0] shr 16 or NewX[3] shl 16;
+    Init_State.x[1] := NewX[0] shl 16 or NewX[1] shr 16;
+    Init_State.x[2] := NewX[1] shl 16 or NewX[2] shr 16;
+    Init_State.x[3] := NewX[2] shl 16 or NewX[3] shr 16;
+  end;
+
+var
+  i, j              : Integer;
+  t                 : array[0..3] of Integer;
+  p                 : pintarray;
+begin
+  InitBegin(Size);
+  FillChar(Init_State, SizeOf(Init_State), 0);
+  FillChar(t, SizeOf(t), 0);
+  p := Pointer(PChar(User) + 12);
+  ExpandKey;
+  for i := 0 to 7 do
+    GP8(@t);
+  for i := 0 to 11 do
+  begin
+    for j := 0 to 7 do
+      GP8(@p[i * 32 + j * 4]);
+    GP8(@t);
+  end;
+  GP8(@t);
+  i := t[3] and $7F;
+  p[i] := p[i] or 1;
+  p := User;
+  p[0] := t[3] shr 24;
+  p[1] := t[3] shr 16;
+  p[2] := t[3] shr 8;
+  FillChar(Init_State, SizeOf(Init_State), 0);
+  InitEnd(IVector);
+  p := Pointer(PChar(User) + FUserSize shr 1);
+  Move(User^, p^, FUserSize shr 1);
+end;
+
+procedure TROCipher_SCOP.Done;
+begin
+  inherited Done;
+  Move(PByteArray(User)[FUserSize shr 1], User^, FUserSize shr 1);
+end;
+
+class procedure TROCipher_Q128.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  ABufSize := 16;
+  AKeySize := 16;
+  AUserSize := 256;
+end;
+
+class function TROCipher_Q128.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    099h,0AAh,0D0h,03Dh,0CAh,014h,04Eh,02Ah
+         DB    0F8h,01Eh,001h,0A0h,0EAh,0ABh,09Fh,048h
+         DB    023h,02Dh,059h,054h,054h,07Eh,02Bh,012h
+         DB    086h,080h,0E8h,033h,0EBh,0E1h,05Eh,0AEh
+end;
+
+procedure TROCipher_Q128.Encode(Data: Pointer);
+{$IFDEF UseASM}
+asm
+       PUSH   ESI
+       PUSH   EDI
+       PUSH   EBX
+       PUSH   EBP
+       PUSH   EDX
+
+       MOV    EDI,[EAX].TROCipher_Q128.FUser
+
+       MOV    EAX,[EDX]       // B0
+       MOV    EBX,[EDX +  4]  // B1
+       MOV    ECX,[EDX +  8]  // B2
+       MOV    EDX,[EDX + 12]  // B3
+
+       MOV    EBP,16
+
+@@1:   MOV    ESI,EAX
+       AND    EAX,03FFh
+       MOV    EAX,[EAX * 4 + OFFSET Q128_DATA]
+       ROL    ESI,10
+       ADD    EAX,[EDI]
+       XOR    EAX,EBX
+
+       MOV    EBX,EAX
+       AND    EAX,03FFh
+       MOV    EAX,[EAX * 4 + OFFSET Q128_DATA]
+       ROL    EBX,10
+       ADD    EAX,[EDI + 4]
+       XOR    EAX,ECX
+
+       MOV    ECX,EAX
+       AND    EAX,03FFh
+       MOV    EAX,[EAX * 4 + OFFSET Q128_DATA]
+       ROL    ECX,10
+       ADD    EAX,[EDI + 8]
+       XOR    EAX,EDX
+
+       MOV    EDX,EAX
+       AND    EAX,03FFh
+       MOV    EAX,[EAX * 4 + OFFSET Q128_DATA]
+       ROL    EDX,10
+       ADD    EAX,[EDI + 12]
+       XOR    EAX,ESI
+
+       ADD    EDI,16
+
+       DEC    EBP
+       JNZ    @@1
+
+       POP    ESI
+
+       MOV    [ESI],EAX       // B0
+       MOV    [ESI +  4],EBX  // B1
+       MOV    [ESI +  8],ECX  // B2
+       MOV    [ESI + 12],EDX  // B3
+
+
+       POP    EBP
+       POP    EBX
+       POP    EDI
+       POP    ESI
+end;
+{$ELSE}
+var
+  d                 : PInteger;
+  B0, B1, B2, B3, i : LongWord;
+begin
+  d := User;
+  B0 := pintarray(Data)[0];
+  B1 := pintarray(Data)[1];
+  B2 := pintarray(Data)[2];
+  B3 := pintarray(Data)[3];
+  for i := 1 to 16 do
+  begin
+    B1 := B1 xor (Q128_Data[B0 and $03FF] + d^);
+    Inc(d);
+    B0 := B0 shl 10 or B0 shr 22;
+    B2 := B2 xor (Q128_Data[B1 and $03FF] + d^);
+    Inc(d);
+    B1 := B1 shl 10 or B1 shr 22;
+    B3 := B3 xor (Q128_Data[B2 and $03FF] + d^);
+    Inc(d);
+    B2 := B2 shl 10 or B2 shr 22;
+    B0 := B0 xor (Q128_Data[B3 and $03FF] + d^);
+    Inc(d);
+    B3 := B3 shl 10 or B3 shr 22;
+  end;
+  pintarray(Data)[0] := B0;
+  pintarray(Data)[1] := B1;
+  pintarray(Data)[2] := B2;
+  pintarray(Data)[3] := B3;
+end;
+{$ENDIF}
+
+procedure TROCipher_Q128.Decode(Data: Pointer);
+{$IFDEF UseASM}
+asm
+       PUSH   ESI
+       PUSH   EDI
+       PUSH   EBX
+       PUSH   EBP
+       PUSH   EDX
+
+       MOV    EDI,[EAX].TROCipher_Q128.FUser
+       LEA    EDI,[EDI + 64 * 4]
+
+       MOV    ESI,[EDX]       // B0
+       MOV    EBX,[EDX +  4]  // B1
+       MOV    ECX,[EDX +  8]  // B2
+       MOV    EDX,[EDX + 12]  // B3
+
+       MOV    EBP,16
+
+@@1:   SUB    EDI,16
+
+       ROR    EDX,10
+       MOV    EAX,EDX
+       AND    EAX,03FFh
+       MOV    EAX,[EAX * 4 + OFFSET Q128_DATA]
+       ADD    EAX,[EDI + 12]
+       XOR    ESI,EAX
+
+       ROR    ECX,10
+       MOV    EAX,ECX
+       AND    EAX,03FFh
+       MOV    EAX,[EAX * 4 + OFFSET Q128_DATA]
+       ADD    EAX,[EDI +  8]
+       XOR    EDX,EAX
+
+       ROR    EBX,10
+       MOV    EAX,EBX
+       AND    EAX,03FFh
+       MOV    EAX,[EAX * 4 + OFFSET Q128_DATA]
+       ADD    EAX,[EDI +  4]
+       XOR    ECX,EAX
+
+       ROR    ESI,10
+       MOV    EAX,ESI
+       AND    EAX,03FFh
+       MOV    EAX,[EAX * 4 + OFFSET Q128_DATA]
+       ADD    EAX,[EDI]
+       XOR    EBX,EAX
+
+       DEC    EBP
+       JNZ    @@1
+
+       POP    EAX
+
+       MOV    [EAX],ESI       // B0
+       MOV    [EAX +  4],EBX  // B1
+       MOV    [EAX +  8],ECX  // B2
+       MOV    [EAX + 12],EDX  // B3
+
+
+       POP    EBP
+       POP    EBX
+       POP    EDI
+       POP    ESI
+end;
+{$ELSE}
+var
+  d                 : PInteger;
+  B0, B1, B2, B3, i : LongWord;
+begin
+  d := @pintarray(User)[63];
+  B0 := pintarray(Data)[0];
+  B1 := pintarray(Data)[1];
+  B2 := pintarray(Data)[2];
+  B3 := pintarray(Data)[3];
+  for i := 1 to 16 do
+  begin
+    B3 := B3 shr 10 or B3 shl 22;
+    B0 := B0 xor (Q128_Data[B3 and $03FF] + d^);
+    Dec(d);
+    B2 := B2 shr 10 or B2 shl 22;
+    B3 := B3 xor (Q128_Data[B2 and $03FF] + d^);
+    Dec(d);
+    B1 := B1 shr 10 or B1 shl 22;
+    B2 := B2 xor (Q128_Data[B1 and $03FF] + d^);
+    Dec(d);
+    B0 := B0 shr 10 or B0 shl 22;
+    B1 := B1 xor (Q128_Data[B0 and $03FF] + d^);
+    Dec(d);
+  end;
+  pintarray(Data)[0] := B0;
+  pintarray(Data)[1] := B1;
+  pintarray(Data)[2] := B2;
+  pintarray(Data)[3] := B3;
+end;
+{$ENDIF}
+
+procedure TROCipher_Q128.Init(const Key; Size: Integer; IVector: Pointer);
+var
+  k                 : array[0..3] of LongWord;
+  i                 : Integer;
+  d                 : PInteger;
+begin
+  InitBegin(Size);
+  FillChar(k, SizeOf(k), 0);
+  Move(Key, k, Size);
+  d := User;
+  for i := 19 downto 1 do
+  begin
+    k[1] := k[1] xor Q128_Data[k[0] and $03FF];
+    k[0] := k[0] shr 10 or k[0] shl 22;
+    k[2] := k[2] xor Q128_Data[k[1] and $03FF];
+    k[1] := k[1] shr 10 or k[1] shl 22;
+    k[3] := k[3] xor Q128_Data[k[2] and $03FF];
+    k[2] := k[2] shr 10 or k[2] shl 22;
+    k[0] := k[0] xor Q128_Data[k[3] and $03FF];
+    k[3] := k[3] shr 10 or k[3] shl 22;
+    if i <= 16 then
+    begin
+      d^ := k[0];
+      Inc(d);
+      d^ := k[1];
+      Inc(d);
+      d^ := k[2];
+      Inc(d);
+      d^ := k[3];
+      Inc(d);
+    end;
+  end;
+  FillChar(k, SizeOf(k), 0);
+  InitEnd(IVector);
+end;
+
+type
+  P3Way_Key = ^T3Way_Key;
+  T3Way_Key = packed record
+    E_Key: array[0..2] of Integer;
+    E_Data: array[0..11] of Integer;
+    D_Key: array[0..2] of Integer;
+    D_Data: array[0..11] of Integer;
+  end;
+
+class procedure TROCipher_3Way.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  ABufSize := 12;
+  AKeySize := 12;
+  AUserSize := SizeOf(T3Way_Key);
+end;
+
+class function TROCipher_3Way.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    077h,0FCh,077h,094h,07Ch,08Fh,0DEh,021h
+         DB    0E9h,081h,0DFh,02Ah,0B1h,0BCh,07Eh,0F8h
+         DB    0A3h,0B6h,044h,04Bh,0B6h,0FCh,079h,0C4h
+         DB    09Bh,068h,04Fh,009h,0C7h,0BFh,00Eh,005h
+end;
+
+procedure TROCipher_3Way.Encode(Data: Pointer);
+var
+  i                 : Integer;
+  A0, A1, A2        : LongWord;
+  B0, B1, B2        : LongWord;
+  K0, k1, K2        : LongWord;
+  e                 : PLongWord;
+begin
+  with P3Way_Key(User)^ do
+  begin
+    K0 := E_Key[0];
+    k1 := E_Key[1];
+    K2 := E_Key[2];
+    e := @E_Data;
+  end;
+  A0 := pintarray(Data)[0];
+  A1 := pintarray(Data)[1];
+  A2 := pintarray(Data)[2];
+  for i := 0 to 10 do
+  begin
+    A0 := A0 xor K0 xor e^ shl 16;
+    A1 := A1 xor k1;
+    A2 := A2 xor K2 xor e^;
+    Inc(e);
+
+    B0 := A0 xor A0 shr 16 xor A1 shl 16 xor A1 shr 16 xor A2 shl 16 xor
+      A1 shr 24 xor A2 shl 8 xor A2 shr 8 xor A0 shl 24 xor
+      A2 shr 16 xor A0 shl 16 xor A2 shr 24 xor A0 shl 8;
+    B1 := A1 xor A1 shr 16 xor A2 shl 16 xor A2 shr 16 xor A0 shl 16 xor
+      A2 shr 24 xor A0 shl 8 xor A0 shr 8 xor A1 shl 24 xor
+      A0 shr 16 xor A1 shl 16 xor A0 shr 24 xor A1 shl 8;
+    B2 := A2 xor A2 shr 16 xor A0 shl 16 xor A0 shr 16 xor A1 shl 16 xor
+      A0 shr 24 xor A1 shl 8 xor A1 shr 8 xor A2 shl 24 xor
+      A1 shr 16 xor A2 shl 16 xor A1 shr 24 xor A2 shl 8;
+    asm
+      ROR  B0,10
+      ROL  B2,1
+    end;
+    A0 := B0 xor (B1 or not B2);
+    A1 := B1 xor (B2 or not B0);
+    A2 := B2 xor (B0 or not B1);
+    asm
+      ROL A0,1
+      ROR A2,10
+    end;
+  end;
+  A0 := A0 xor K0 xor e^ shl 16;
+  A1 := A1 xor k1;
+  A2 := A2 xor K2 xor e^;
+  pintarray(Data)[0] := A0 xor A0 shr 16 xor A1 shl 16 xor A1 shr 16 xor A2 shl 16 xor
+    A1 shr 24 xor A2 shl 8 xor A2 shr 8 xor A0 shl 24 xor
+    A2 shr 16 xor A0 shl 16 xor A2 shr 24 xor A0 shl 8;
+  pintarray(Data)[1] := A1 xor A1 shr 16 xor A2 shl 16 xor A2 shr 16 xor A0 shl 16 xor
+    A2 shr 24 xor A0 shl 8 xor A0 shr 8 xor A1 shl 24 xor
+    A0 shr 16 xor A1 shl 16 xor A0 shr 24 xor A1 shl 8;
+  pintarray(Data)[2] := A2 xor A2 shr 16 xor A0 shl 16 xor A0 shr 16 xor A1 shl 16 xor
+    A0 shr 24 xor A1 shl 8 xor A1 shr 8 xor A2 shl 24 xor
+    A1 shr 16 xor A2 shl 16 xor A1 shr 24 xor A2 shl 8;
+end;
+
+procedure TROCipher_3Way.Decode(Data: Pointer);
+var
+  i                 : Integer;
+  A0, A1, A2        : LongWord;
+  B0, B1, B2        : LongWord;
+  K0, k1, K2        : LongWord;
+  e                 : PLongWord;
+begin
+  with P3Way_Key(User)^ do
+  begin
+    K0 := D_Key[0];
+    k1 := D_Key[1];
+    K2 := D_Key[2];
+    e := @D_Data;
+  end;
+  A0 := SwapBits(pintarray(Data)[2]);
+  A1 := SwapBits(pintarray(Data)[1]);
+  A2 := SwapBits(pintarray(Data)[0]);
+  for i := 0 to 10 do
+  begin
+    A0 := A0 xor K0 xor e^ shl 16;
+    A1 := A1 xor k1;
+    A2 := A2 xor K2 xor e^;
+    Inc(e);
+
+    B0 := A0 xor A0 shr 16 xor A1 shl 16 xor A1 shr 16 xor A2 shl 16 xor
+      A1 shr 24 xor A2 shl 8 xor A2 shr 8 xor A0 shl 24 xor
+      A2 shr 16 xor A0 shl 16 xor A2 shr 24 xor A0 shl 8;
+    B1 := A1 xor A1 shr 16 xor A2 shl 16 xor A2 shr 16 xor A0 shl 16 xor
+      A2 shr 24 xor A0 shl 8 xor A0 shr 8 xor A1 shl 24 xor
+      A0 shr 16 xor A1 shl 16 xor A0 shr 24 xor A1 shl 8;
+    B2 := A2 xor A2 shr 16 xor A0 shl 16 xor A0 shr 16 xor A1 shl 16 xor
+      A0 shr 24 xor A1 shl 8 xor A1 shr 8 xor A2 shl 24 xor
+      A1 shr 16 xor A2 shl 16 xor A1 shr 24 xor A2 shl 8;
+    asm
+      ROR B0,10
+      ROL B2,1
+    end;
+    A0 := B0 xor (B1 or not B2);
+    A1 := B1 xor (B2 or not B0);
+    A2 := B2 xor (B0 or not B1);
+    asm
+      ROL A0,1
+      ROR A2,10
+    end;
+  end;
+  A0 := A0 xor K0 xor e^ shl 16;
+  A1 := A1 xor k1;
+  A2 := A2 xor K2 xor e^;
+  B0 := A0 xor A0 shr 16 xor A1 shl 16 xor A1 shr 16 xor A2 shl 16 xor
+    A1 shr 24 xor A2 shl 8 xor A2 shr 8 xor A0 shl 24 xor
+    A2 shr 16 xor A0 shl 16 xor A2 shr 24 xor A0 shl 8;
+  B1 := A1 xor A1 shr 16 xor A2 shl 16 xor A2 shr 16 xor A0 shl 16 xor
+    A2 shr 24 xor A0 shl 8 xor A0 shr 8 xor A1 shl 24 xor
+    A0 shr 16 xor A1 shl 16 xor A0 shr 24 xor A1 shl 8;
+  B2 := A2 xor A2 shr 16 xor A0 shl 16 xor A0 shr 16 xor A1 shl 16 xor
+    A0 shr 24 xor A1 shl 8 xor A1 shr 8 xor A2 shl 24 xor
+    A1 shr 16 xor A2 shl 16 xor A1 shr 24 xor A2 shl 8;
+
+  pintarray(Data)[2] := SwapBits(B0);
+  pintarray(Data)[1] := SwapBits(B1);
+  pintarray(Data)[0] := SwapBits(B2);
+end;
+
+procedure TROCipher_3Way.Init(const Key; Size: Integer; IVector: Pointer);
+
+  procedure RANDGenerate(start: Integer; var p: array of Integer);
+  var
+    i               : Integer;
+  begin
+    for i := 0 to 11 do
+    begin
+      p[i] := start;
+      start := start shl 1;
+      if start and $10000 <> 0 then
+        start := start xor $11011;
+    end;
+  end;
+
+var
+  A0, A1, A2        : Integer;
+  B0, B1, B2        : Integer;
+begin
+  InitBegin(Size);
+  with P3Way_Key(User)^ do
+  begin
+    Move(Key, E_Key, Size);
+    Move(Key, D_Key, Size);
+    RANDGenerate($0B0B, E_Data);
+    RANDGenerate($B1B1, D_Data);
+
+    A0 := D_Key[0];
+    A1 := D_Key[1];
+    A2 := D_Key[2];
+    B0 := A0 xor A0 shr 16 xor A1 shl 16 xor A1 shr 16 xor A2 shl 16 xor
+      A1 shr 24 xor A2 shl 8 xor A2 shr 8 xor A0 shl 24 xor
+      A2 shr 16 xor A0 shl 16 xor A2 shr 24 xor A0 shl 8;
+    B1 := A1 xor A1 shr 16 xor A2 shl 16 xor A2 shr 16 xor A0 shl 16 xor
+      A2 shr 24 xor A0 shl 8 xor A0 shr 8 xor A1 shl 24 xor
+      A0 shr 16 xor A1 shl 16 xor A0 shr 24 xor A1 shl 8;
+    B2 := A2 xor A2 shr 16 xor A0 shl 16 xor A0 shr 16 xor A1 shl 16 xor
+      A0 shr 24 xor A1 shl 8 xor A1 shr 8 xor A2 shl 24 xor
+      A1 shr 16 xor A2 shl 16 xor A1 shr 24 xor A2 shl 8;
+    D_Key[2] := SwapBits(B0);
+    D_Key[1] := SwapBits(B1);
+    D_Key[0] := SwapBits(B2);
+  end;
+  InitEnd(IVector);
+end;
+
+class procedure TROCipher_Twofish.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  ABufSize := 16;
+  AKeySize := 32;
+  AUserSize := 4256;
+end;
+
+class function TROCipher_Twofish.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    0A5h,053h,057h,003h,0EFh,033h,048h,079h
+         DB    09Fh,022h,0B4h,054h,097h,005h,084h,019h
+         DB    087h,0BDh,083h,01Ch,04Dh,0AEh,012h,013h
+         DB    060h,07Ch,07Ch,0D1h,098h,045h,002h,019h
+end;
+
+type
+  PTwofishBox = ^TTwofishBox;
+  TTwofishBox = array[0..3, 0..255] of LongWord;
+
+  TLongRec = record
+    case Integer of
+      0: (L: LongWord);
+      1: (A, b, c, d: Byte);
+  end;
+
+procedure TROCipher_Twofish.Encode(Data: Pointer);
+var
+  S                 : pintarray;
+  Box               : PTwofishBox;
+  i, x, y           : LongWord;
+  A, b, c, d        : TLongRec;
+begin
+  S := User;
+  A.L := pintarray(Data)[0] xor S[0];
+  b.L := pintarray(Data)[1] xor S[1];
+  c.L := pintarray(Data)[2] xor S[2];
+  d.L := pintarray(Data)[3] xor S[3];
+
+  S := @pintarray(User)[8];
+  Box := @pintarray(User)[40];
+  for i := 0 to 7 do
+  begin
+    x := Box[0, A.A] xor Box[1, A.b] xor Box[2, A.c] xor Box[3, A.d];
+    y := Box[1, b.A] xor Box[2, b.b] xor Box[3, b.c] xor Box[0, b.d];
+    asm ROL  D.L,1
+    end;
+    c.L := c.L xor (x + y + S[0]);
+    d.L := d.L xor (x + y shl 1 + S[1]);
+    asm ROR  C.L,1
+    end;
+
+    x := Box[0, c.A] xor Box[1, c.b] xor Box[2, c.c] xor Box[3, c.d];
+    y := Box[1, d.A] xor Box[2, d.b] xor Box[3, d.c] xor Box[0, d.d];
+    asm ROL  B.L,1
+    end;
+    A.L := A.L xor (x + y + S[2]);
+    b.L := b.L xor (x + y shl 1 + S[3]);
+    asm ROR  A.L,1
+    end;
+    Inc(PInteger(S), 4);
+  end;
+  S := User;
+  pintarray(Data)[0] := c.L xor S[4];
+  pintarray(Data)[1] := d.L xor S[5];
+  pintarray(Data)[2] := A.L xor S[6];
+  pintarray(Data)[3] := b.L xor S[7];
+end;
+
+procedure TROCipher_Twofish.Decode(Data: Pointer);
+var
+  S                 : pintarray;
+  Box               : PTwofishBox;
+  i, x, y           : LongWord;
+  A, b, c, d        : TLongRec;
+begin
+  S := User;
+  Box := @pintarray(User)[40];
+  c.L := pintarray(Data)[0] xor S[4];
+  d.L := pintarray(Data)[1] xor S[5];
+  A.L := pintarray(Data)[2] xor S[6];
+  b.L := pintarray(Data)[3] xor S[7];
+  S := @pintarray(User)[36];
+  for i := 0 to 7 do
+  begin
+    x := Box[0, c.A] xor Box[1, c.b] xor Box[2, c.c] xor Box[3, c.d];
+    y := Box[0, d.d] xor Box[1, d.A] xor Box[2, d.b] xor Box[3, d.c];
+    asm ROL  A.L,1
+    end;
+    b.L := b.L xor (x + y shl 1 + S[3]);
+    A.L := A.L xor (x + y + S[2]);
+    asm ROR  B.L,1
+    end;
+
+    x := Box[0, A.A] xor Box[1, A.b] xor Box[2, A.c] xor Box[3, A.d];
+    y := Box[0, b.d] xor Box[1, b.A] xor Box[2, b.b] xor Box[3, b.c];
+    asm ROL  C.L,1
+    end;
+    d.L := d.L xor (x + y shl 1 + S[1]);
+    c.L := c.L xor (x + y + S[0]);
+    asm ROR  D.L,1
+    end;
+    Dec(PByte(S), 16);
+  end;
+  S := User;
+  pintarray(Data)[0] := A.L xor S[0];
+  pintarray(Data)[1] := b.L xor S[1];
+  pintarray(Data)[2] := c.L xor S[2];
+  pintarray(Data)[3] := d.L xor S[3];
+end;
+
+procedure TROCipher_Twofish.Init(const Key; Size: Integer; IVector: Pointer);
+var
+  BoxKey            : array[0..3] of TLongRec;
+  SubKey            : pintarray;
+  Box               : PTwofishBox;
+
+  procedure SetupKey;
+
+    function Encode(K0, k1: Integer): Integer;
+    var
+      R, i, j, G2, G3: Integer;
+      b             : Byte;
+    begin
+      R := 0;
+      for i := 0 to 1 do
+      begin
+        if i <> 0 then
+          R := R xor K0
+        else
+          R := R xor k1;
+        for j := 0 to 3 do
+        begin
+          b := R shr 24;
+          if b and $80 <> 0 then
+            G2 := (b shl 1 xor $014D) and $FF
+          else
+            G2 := b shl 1 and $FF;
+          if b and 1 <> 0 then
+            G3 := (b shr 1 and $7F) xor $014D shr 1 xor G2
+          else
+            G3 := (b shr 1 and $7F) xor G2;
+          R := R shl 8 xor G3 shl 24 xor G2 shl 16 xor G3 shl 8 xor b;
+        end;
+      end;
+      Result := R;
+    end;
+
+    function F32(x: Integer; k: array of Integer): Integer;
+    var
+      A, b, c, d    : Integer;
+    begin
+      A := x and $FF;
+      b := x shr 8 and $FF;
+      c := x shr 16 and $FF;
+      d := x shr 24;
+      if Size = 32 then
+      begin
+        A := Twofish_8x8[1, A] xor k[3] and $FF;
+        b := Twofish_8x8[0, b] xor k[3] shr 8 and $FF;
+        c := Twofish_8x8[0, c] xor k[3] shr 16 and $FF;
+        d := Twofish_8x8[1, d] xor k[3] shr 24;
+      end;
+      if Size >= 24 then
+      begin
+        A := Twofish_8x8[1, A] xor k[2] and $FF;
+        b := Twofish_8x8[1, b] xor k[2] shr 8 and $FF;
+        c := Twofish_8x8[0, c] xor k[2] shr 16 and $FF;
+        d := Twofish_8x8[0, d] xor k[2] shr 24;
+      end;
+      A := Twofish_8x8[0, A] xor k[1] and $FF;
+      b := Twofish_8x8[1, b] xor k[1] shr 8 and $FF;
+      c := Twofish_8x8[0, c] xor k[1] shr 16 and $FF;
+      d := Twofish_8x8[1, d] xor k[1] shr 24;
+
+      A := Twofish_8x8[0, A] xor k[0] and $FF;
+      b := Twofish_8x8[0, b] xor k[0] shr 8 and $FF;
+      c := Twofish_8x8[1, c] xor k[0] shr 16 and $FF;
+      d := Twofish_8x8[1, d] xor k[0] shr 24;
+
+      Result := Twofish_Data[0, A] xor Twofish_Data[1, b] xor
+        Twofish_Data[2, c] xor Twofish_Data[3, d];
+    end;
+
+  var
+    i, j, A, b      : Integer;
+    e, o            : array[0..3] of Integer;
+    k               : array[0..7] of Integer;
+  begin
+    FillChar(k, SizeOf(k), 0);
+    Move(Key, k, Size);
+    if Size <= 16 then
+      Size := 16
+    else
+      if Size <= 24 then
+        Size := 24
+      else
+        Size := 32;
+    j := Size shr 3 - 1;
+    for i := 0 to j do
+    begin
+      e[i] := k[i shl 1];
+      o[i] := k[i shl 1 + 1];
+      BoxKey[j].L := Encode(e[i], o[i]);
+      Dec(j);
+    end;
+    j := 0;
+    for i := 0 to 19 do
+    begin
+      A := F32(j, e);
+      b := ROL(F32(j + $01010101, o), 8);
+      SubKey[i shl 1] := A + b;
+      b := A + b shr 1;
+      SubKey[i shl 1 + 1] := ROL(b, 9);
+      Inc(j, $02020202);
+    end;
+  end;
+
+  procedure DoXOR(d, S: pintarray; Value: LongWord);
+  var
+    i               : LongWord;
+  begin
+    Value := (Value and $FF) * $01010101;
+    for i := 0 to 63 do
+      d[i] := S[i] xor Value;
+  end;
+
+  procedure SetupBox128;
+  var
+    L               : array[0..255] of Byte;
+    A, i            : Integer;
+  begin
+    DoXOR(@L, @Twofish_8x8[0], BoxKey[1].L);
+    A := BoxKey[0].A;
+    for i := 0 to 255 do
+      Box[0, i] := Twofish_Data[0, Twofish_8x8[0, L[i]] xor A];
+    DoXOR(@L, @Twofish_8x8[1], BoxKey[1].L shr 8);
+    A := BoxKey[0].b;
+    for i := 0 to 255 do
+      Box[1, i] := Twofish_Data[1, Twofish_8x8[0, L[i]] xor A];
+    DoXOR(@L, @Twofish_8x8[0], BoxKey[1].L shr 16);
+    A := BoxKey[0].c;
+    for i := 0 to 255 do
+      Box[2, i] := Twofish_Data[2, Twofish_8x8[1, L[i]] xor A];
+    DoXOR(@L, @Twofish_8x8[1], BoxKey[1].L shr 24);
+    A := BoxKey[0].d;
+    for i := 0 to 255 do
+      Box[3, i] := Twofish_Data[3, Twofish_8x8[1, L[i]] xor A];
+  end;
+
+  procedure SetupBox192;
+  var
+    L               : array[0..255] of Byte;
+    A, b, i         : Integer;
+  begin
+    DoXOR(@L, @Twofish_8x8[1], BoxKey[2].L);
+    A := BoxKey[0].A;
+    b := BoxKey[1].A;
+    for i := 0 to 255 do
+      Box[0, i] := Twofish_Data[0, Twofish_8x8[0, Twofish_8x8[0, L[i]] xor b] xor A];
+    DoXOR(@L, @Twofish_8x8[1], BoxKey[2].L shr 8);
+    A := BoxKey[0].b;
+    b := BoxKey[1].b;
+    for i := 0 to 255 do
+      Box[1, i] := Twofish_Data[1, Twofish_8x8[0, Twofish_8x8[1, L[i]] xor b] xor A];
+    DoXOR(@L, @Twofish_8x8[0], BoxKey[2].L shr 16);
+    A := BoxKey[0].c;
+    b := BoxKey[1].c;
+    for i := 0 to 255 do
+      Box[2, i] := Twofish_Data[2, Twofish_8x8[1, Twofish_8x8[0, L[i]] xor b] xor A];
+    DoXOR(@L, @Twofish_8x8[0], BoxKey[2].L shr 24);
+    A := BoxKey[0].d;
+    b := BoxKey[1].d;
+    for i := 0 to 255 do
+      Box[3, i] := Twofish_Data[3, Twofish_8x8[1, Twofish_8x8[1, L[i]] xor b] xor A];
+  end;
+
+  procedure SetupBox256;
+  var
+    L               : array[0..255] of Byte;
+    k               : array[0..255] of Byte;
+    A, b, i         : Integer;
+  begin
+    DoXOR(@k, @Twofish_8x8[1], BoxKey[3].L);
+    for i := 0 to 255 do
+      L[i] := Twofish_8x8[1, k[i]];
+    DoXOR(@L, @L, BoxKey[2].L);
+    A := BoxKey[0].A;
+    b := BoxKey[1].A;
+    for i := 0 to 255 do
+      Box[0, i] := Twofish_Data[0, Twofish_8x8[0, Twofish_8x8[0, L[i]] xor b] xor A];
+    DoXOR(@k, @Twofish_8x8[0], BoxKey[3].L shr 8);
+    for i := 0 to 255 do
+      L[i] := Twofish_8x8[1, k[i]];
+    DoXOR(@L, @L, BoxKey[2].L shr 8);
+    A := BoxKey[0].b;
+    b := BoxKey[1].b;
+    for i := 0 to 255 do
+      Box[1, i] := Twofish_Data[1, Twofish_8x8[0, Twofish_8x8[1, L[i]] xor b] xor A];
+    DoXOR(@k, @Twofish_8x8[0], BoxKey[3].L shr 16);
+    for i := 0 to 255 do
+      L[i] := Twofish_8x8[0, k[i]];
+    DoXOR(@L, @L, BoxKey[2].L shr 16);
+    A := BoxKey[0].c;
+    b := BoxKey[1].c;
+    for i := 0 to 255 do
+      Box[2, i] := Twofish_Data[2, Twofish_8x8[1, Twofish_8x8[0, L[i]] xor b] xor A];
+    DoXOR(@k, @Twofish_8x8[1], BoxKey[3].L shr 24);
+    for i := 0 to 255 do
+      L[i] := Twofish_8x8[0, k[i]];
+    DoXOR(@L, @L, BoxKey[2].L shr 24);
+    A := BoxKey[0].d;
+    b := BoxKey[1].d;
+    for i := 0 to 255 do
+      Box[3, i] := Twofish_Data[3, Twofish_8x8[1, Twofish_8x8[1, L[i]] xor b] xor A];
+  end;
+
+begin
+  InitBegin(Size);
+  SubKey := User;
+  Box := @SubKey[40];
+  SetupKey;
+  if Size = 16 then
+    SetupBox128
+  else
+    if Size = 24 then
+      SetupBox192
+    else
+      SetupBox256;
+  InitEnd(IVector);
+end;
+
+class procedure TROCipher_Shark.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  ABufSize := 8;
+  AKeySize := 16;
+  AUserSize := 112;
+end;
+
+class function TROCipher_Shark.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    0D9h,065h,021h,0AAh,0C0h,0C3h,084h,060h
+         DB    09Dh,0CEh,01Fh,08Bh,0FBh,0ABh,018h,03Fh
+         DB    0A1h,021h,0ACh,0F8h,053h,049h,0C0h,06Fh
+         DB    027h,03Ah,089h,015h,0D3h,07Ah,0E9h,00Bh
+end;
+
+{$IFDEF VER_D4H}                        // >= D4
+{.$DEFINE Shark64}//use this with D4 64bit Operation, but the 32 bit Code is 174 % faster
+{$ENDIF}
+
+type
+  PInt64 = ^TInt64;
+  {$IFDEF Shark64}
+  TInt64 = Int64;
+  {$ELSE}
+  TInt64 = packed record
+    L, R: Integer;
+  end;
+  {$ENDIF}
+
+  PInt64Array = ^TInt64Array;
+  TInt64Array = array[0..1023] of TInt64;
+
+  {$IFDEF Shark64}
+  TShark_Data = array[0..7, 0..255] of Int64;
+  {$ENDIF}
+
+procedure TROCipher_Shark.Encode(Data: Pointer);
+var
+  i, t              : Integer;
+  {$IFDEF Shark64}
+  d                 : TInt64;
+  k                 : PInt64;
+  {$ELSE}
+  L, R              : LongWord;
+  k                 : pintarray;
+  {$ENDIF}
+begin
+  k := User;
+  {$IFDEF Shark64}
+  d := PInt64(Data)^;
+  for i := 0 to 4 do
+  begin
+    d := d xor k^;
+    Inc(k);
+    d := TShark_Data(Shark_CE)[0, d shr 56 and $FF] xor
+      TShark_Data(Shark_CE)[1, d shr 48 and $FF] xor
+      TShark_Data(Shark_CE)[2, d shr 40 and $FF] xor
+      TShark_Data(Shark_CE)[3, d shr 32 and $FF] xor
+      TShark_Data(Shark_CE)[4, d shr 24 and $FF] xor
+      TShark_Data(Shark_CE)[5, d shr 16 and $FF] xor
+      TShark_Data(Shark_CE)[6, d shr 8 and $FF] xor
+      TShark_Data(Shark_CE)[7, d and $FF];
+  end;
+  d := d xor k^;
+  Inc(k);
+  d := (Int64(Shark_SE[d shr 56 and $FF]) shl 56) xor
+    (Int64(Shark_SE[d shr 48 and $FF]) shl 48) xor
+    (Int64(Shark_SE[d shr 40 and $FF]) shl 40) xor
+    (Int64(Shark_SE[d shr 32 and $FF]) shl 32) xor
+    (Int64(Shark_SE[d shr 24 and $FF]) shl 24) xor
+    (Int64(Shark_SE[d shr 16 and $FF]) shl 16) xor
+    (Int64(Shark_SE[d shr 8 and $FF]) shl 8) xor
+    (Int64(Shark_SE[d and $FF]));
+  PInt64(Data)^ := d xor k^;
+  {$ELSE}
+  L := PInt64(Data).L;
+  R := PInt64(Data).R;
+  for i := 0 to 4 do
+  begin
+    L := L xor k[0];
+    R := R xor k[1];
+    Inc(PInteger(k), 2);
+    t := Shark_CE[0, R shr 23 and $1FE] xor
+      Shark_CE[1, R shr 15 and $1FE] xor
+      Shark_CE[2, R shr 7 and $1FE] xor
+      Shark_CE[3, R shl 1 and $1FE] xor
+      Shark_CE[4, L shr 23 and $1FE] xor
+      Shark_CE[5, L shr 15 and $1FE] xor
+      Shark_CE[6, L shr 7 and $1FE] xor
+      Shark_CE[7, L shl 1 and $1FE];
+    R := Shark_CE[0, R shr 23 and $1FE or 1] xor
+      Shark_CE[1, R shr 15 and $1FE or 1] xor
+      Shark_CE[2, R shr 7 and $1FE or 1] xor
+      Shark_CE[3, R shl 1 and $1FE or 1] xor
+      Shark_CE[4, L shr 23 and $1FE or 1] xor
+      Shark_CE[5, L shr 15 and $1FE or 1] xor
+      Shark_CE[6, L shr 7 and $1FE or 1] xor
+      Shark_CE[7, L shl 1 and $1FE or 1];
+    L := t;
+  end;
+  L := L xor k[0];
+  R := R xor k[1];
+  Inc(PInteger(k), 2);
+  L := LongWord(Shark_SE[L shr 24]) shl 24 xor
+    LongWord(Shark_SE[L shr 16 and $FF]) shl 16 xor
+    LongWord(Shark_SE[L shr 8 and $FF]) shl 8 xor
+    LongWord(Shark_SE[L and $FF]);
+  R := LongWord(Shark_SE[R shr 24]) shl 24 xor
+    LongWord(Shark_SE[R shr 16 and $FF]) shl 16 xor
+    LongWord(Shark_SE[R shr 8 and $FF]) shl 8 xor
+    LongWord(Shark_SE[R and $FF]);
+  PInt64(Data).L := L xor k[0];
+  PInt64(Data).R := R xor k[1];
+  {$ENDIF}
+end;
+
+procedure TROCipher_Shark.Decode(Data: Pointer);
+var
+  i, t              : Integer;
+  {$IFDEF Shark64}
+  d                 : TInt64;
+  k                 : PInt64;
+  {$ELSE}
+  R, L              : LongWord;
+  k                 : pintarray;
+  {$ENDIF}
+begin
+  k := User;
+  {$IFDEF Shark64}
+  Inc(k, 7);
+  d := PInt64(Data)^;
+  for i := 0 to 4 do
+  begin
+    d := d xor k^;
+    Inc(k);
+    d := TShark_Data(Shark_CD)[0, d shr 56 and $FF] xor
+      TShark_Data(Shark_CD)[1, d shr 48 and $FF] xor
+      TShark_Data(Shark_CD)[2, d shr 40 and $FF] xor
+      TShark_Data(Shark_CD)[3, d shr 32 and $FF] xor
+
+    TShark_Data(Shark_CD)[4, d shr 24 and $FF] xor
+      TShark_Data(Shark_CD)[5, d shr 16 and $FF] xor
+      TShark_Data(Shark_CD)[6, d shr 8 and $FF] xor
+      TShark_Data(Shark_CD)[7, d and $FF];
+  end;
+  d := d xor k^;
+  Inc(k);
+  d := (Int64(Shark_SD[d shr 56 and $FF]) shl 56) xor
+    (Int64(Shark_SD[d shr 48 and $FF]) shl 48) xor
+    (Int64(Shark_SD[d shr 40 and $FF]) shl 40) xor
+    (Int64(Shark_SD[d shr 32 and $FF]) shl 32) xor
+    (Int64(Shark_SD[d shr 24 and $FF]) shl 24) xor
+    (Int64(Shark_SD[d shr 16 and $FF]) shl 16) xor
+    (Int64(Shark_SD[d shr 8 and $FF]) shl 8) xor
+    (Int64(Shark_SD[d and $FF]));
+  PInt64(Data)^ := d xor k^;
+  {$ELSE}
+  Inc(PInteger(k), 14);
+  L := PInt64(Data).L;
+  R := PInt64(Data).R;
+  for i := 0 to 4 do
+  begin
+    L := L xor k[0];
+    R := R xor k[1];
+    Inc(PInteger(k), 2);
+    t := Shark_CD[0, R shr 23 and $1FE] xor
+      Shark_CD[1, R shr 15 and $1FE] xor
+      Shark_CD[2, R shr 7 and $1FE] xor
+      Shark_CD[3, R shl 1 and $1FE] xor
+      Shark_CD[4, L shr 23 and $1FE] xor
+      Shark_CD[5, L shr 15 and $1FE] xor
+      Shark_CD[6, L shr 7 and $1FE] xor
+      Shark_CD[7, L shl 1 and $1FE];
+    R := Shark_CD[0, R shr 23 and $1FE or 1] xor
+      Shark_CD[1, R shr 15 and $1FE or 1] xor
+      Shark_CD[2, R shr 7 and $1FE or 1] xor
+      Shark_CD[3, R shl 1 and $1FE or 1] xor
+      Shark_CD[4, L shr 23 and $1FE or 1] xor
+      Shark_CD[5, L shr 15 and $1FE or 1] xor
+      Shark_CD[6, L shr 7 and $1FE or 1] xor
+      Shark_CD[7, L shl 1 and $1FE or 1];
+    L := t;
+  end;
+  L := L xor k[0];
+  R := R xor k[1];
+  Inc(PInteger(k), 2);
+  L := Integer(Shark_SD[L shr 24]) shl 24 xor
+    Integer(Shark_SD[L shr 16 and $FF]) shl 16 xor
+    Integer(Shark_SD[L shr 8 and $FF]) shl 8 xor
+    Integer(Shark_SD[L and $FF]);
+  R := Integer(Shark_SD[R shr 24]) shl 24 xor
+    Integer(Shark_SD[R shr 16 and $FF]) shl 16 xor
+    Integer(Shark_SD[R shr 8 and $FF]) shl 8 xor
+    Integer(Shark_SD[R and $FF]);
+  PInt64(Data).L := L xor k[0];
+  PInt64(Data).R := R xor k[1];
+  {$ENDIF}
+end;
+
+procedure TROCipher_Shark.Init(const Key; Size: Integer; IVector: Pointer);
+var
+  Log, ALog         : array[0..255] of Byte;
+
+  procedure InitLog;
+  var
+    i, j            : word;
+  begin
+    ALog[0] := 1;
+    for i := 1 to 255 do
+    begin
+      j := ALog[i - 1] shl 1;
+      if j and $100 <> 0 then
+        j := j xor $01F5;
+      ALog[i] := j;
+    end;
+    for i := 1 to 254 do
+      Log[ALog[i]] := i;
+  end;
+
+  function Transform(A: TInt64): TInt64;
+  type
+    TInt64Rec = packed record
+      Lo, Hi: Integer;
+    end;
+
+    function Mul(A, b: Integer): Byte;
+    begin
+      Result := ALog[(Log[A] + Log[b]) mod 255];
+    end;
+
+  var
+    i, j            : Byte;
+    k, t            : array[0..7] of Byte;
+  begin
+    {$IFDEF Shark64}
+    Move(TInt64Rec(A).Hi, k[0], 4);
+    Move(TInt64Rec(A).Lo, k[4], 4);
+    SwapIntegerBuffer(@k, @k, 2);
+    {$ELSE}
+    Move(A.R, k[0], 4);
+    Move(A.L, k[4], 4);
+    SwapIntegerBuffer(@k, @k, 2);
+    {$ENDIF}
+    for i := 0 to 7 do
+    begin
+      t[i] := Mul(Shark_I[i, 0], k[0]);
+      for j := 1 to 7 do
+        t[i] := t[i] xor Mul(Shark_I[i, j], k[j]);
+    end;
+    {$IFDEF Shark64}
+    Result := t[0];
+    for i := 1 to 7 do
+      Result := Result shl 8 xor t[i];
+    {$ELSE}
+    Result.L := t[0];
+    Result.R := 0;
+    for i := 1 to 7 do
+    begin
+      Result.R := Result.R shl 8 or Result.L shr 24;
+      Result.L := Result.L shl 8 xor t[i];
+    end;
+    {$ENDIF}
+  end;
+
+  function Shark(d: TInt64; k: PInt64): TInt64;
+  var
+    R, t            : Integer;
+  begin
+    {$IFDEF Shark64}
+    for R := 0 to 4 do
+    begin
+      d := d xor k^;
+      Inc(k);
+      d := TShark_Data(Shark_CE)[0, d shr 56 and $FF] xor
+        TShark_Data(Shark_CE)[1, d shr 48 and $FF] xor
+        TShark_Data(Shark_CE)[2, d shr 40 and $FF] xor
+        TShark_Data(Shark_CE)[3, d shr 32 and $FF] xor
+        TShark_Data(Shark_CE)[4, d shr 24 and $FF] xor
+        TShark_Data(Shark_CE)[5, d shr 16 and $FF] xor
+        TShark_Data(Shark_CE)[6, d shr 8 and $FF] xor
+        TShark_Data(Shark_CE)[7, d and $FF];
+    end;
+    d := d xor k^;
+    Inc(k);
+    d := (Int64(Shark_SE[d shr 56 and $FF]) shl 56) xor
+      (Int64(Shark_SE[d shr 48 and $FF]) shl 48) xor
+      (Int64(Shark_SE[d shr 40 and $FF]) shl 40) xor
+      (Int64(Shark_SE[d shr 32 and $FF]) shl 32) xor
+      (Int64(Shark_SE[d shr 24 and $FF]) shl 24) xor
+      (Int64(Shark_SE[d shr 16 and $FF]) shl 16) xor
+      (Int64(Shark_SE[d shr 8 and $FF]) shl 8) xor
+      (Int64(Shark_SE[d and $FF]));
+    Result := d xor k^;
+    {$ELSE}
+    for R := 0 to 4 do
+    begin
+      d.L := d.L xor k.L;
+      d.R := d.R xor k.R;
+      Inc(k);
+      t := Shark_CE[0, d.R shr 23 and $1FE] xor
+        Shark_CE[1, d.R shr 15 and $1FE] xor
+        Shark_CE[2, d.R shr 7 and $1FE] xor
+        Shark_CE[3, d.R shl 1 and $1FE] xor
+        Shark_CE[4, d.L shr 23 and $1FE] xor
+        Shark_CE[5, d.L shr 15 and $1FE] xor
+        Shark_CE[6, d.L shr 7 and $1FE] xor
+        Shark_CE[7, d.L shl 1 and $1FE];
+
+      d.R := Shark_CE[0, d.R shr 23 and $1FE or 1] xor
+        Shark_CE[1, d.R shr 15 and $1FE or 1] xor
+        Shark_CE[2, d.R shr 7 and $1FE or 1] xor
+        Shark_CE[3, d.R shl 1 and $1FE or 1] xor
+        Shark_CE[4, d.L shr 23 and $1FE or 1] xor
+        Shark_CE[5, d.L shr 15 and $1FE or 1] xor
+        Shark_CE[6, d.L shr 7 and $1FE or 1] xor
+        Shark_CE[7, d.L shl 1 and $1FE or 1];
+      d.L := t;
+    end;
+    d.L := d.L xor k.L;
+    d.R := d.R xor k.R;
+    Inc(k);
+    d.L := Integer(Shark_SE[d.L shr 24 and $FF]) shl 24 xor
+      Integer(Shark_SE[d.L shr 16 and $FF]) shl 16 xor
+      Integer(Shark_SE[d.L shr 8 and $FF]) shl 8 xor
+      Integer(Shark_SE[d.L and $FF]);
+    d.R := Integer(Shark_SE[d.R shr 24 and $FF]) shl 24 xor
+      Integer(Shark_SE[d.R shr 16 and $FF]) shl 16 xor
+      Integer(Shark_SE[d.R shr 8 and $FF]) shl 8 xor
+      Integer(Shark_SE[d.R and $FF]);
+    Result.L := d.L xor k.L;
+    Result.R := d.R xor k.R;
+    {$ENDIF}
+  end;
+
+var
+  t                 : array[0..6] of TInt64;
+  A                 : array[0..6] of TInt64;
+  k                 : array[0..15] of Byte;
+  i, j, R           : Byte;
+  e, d              : PInt64Array;
+  L                 : TInt64;
+begin
+  InitBegin(Size);
+  FillChar(k, SizeOf(k), 0);
+  Move(Key, k, Size);
+  InitLog;
+  e := User;
+  d := @e[7];
+  Move(Shark_CE[0], t, SizeOf(t));
+  t[6] := Transform(t[6]);
+  i := 0;
+  {$IFDEF Shark64}
+  for R := 0 to 6 do
+  begin
+    Inc(i);
+    A[R] := k[i and $F];
+    for j := 1 to 7 do
+    begin
+      Inc(i);
+      A[R] := A[R] shl 8 or k[i and $F];
+    end;
+  end;
+  e[0] := A[0] xor Shark(0, @t);
+  for R := 1 to 6 do
+    e[R] := A[R] xor Shark(e[R - 1], @t);
+  {$ELSE}
+  for R := 0 to 6 do
+  begin
+    Inc(i);
+    A[R].L := k[i and $F];
+    A[R].R := 0;
+    for j := 1 to 7 do
+    begin
+      Inc(i);
+      A[R].R := A[R].R shl 8 or A[R].L shr 24;
+      A[R].L := A[R].L shl 8 or k[i and $F];
+    end;
+  end;
+  L.L := 0;
+  L.R := 0;
+  L := Shark(L, @t);
+  e[0].L := A[0].L xor L.L;
+  e[0].R := A[0].R xor L.R;
+  for R := 1 to 6 do
+  begin
+    L := Shark(e[R - 1], @t);
+    e[R].L := A[R].L xor L.L;
+    e[R].R := A[R].R xor L.R;
+  end;
+  {$ENDIF}
+
+  e[6] := Transform(e[6]);
+  d[0] := e[6];
+  d[6] := e[0];
+  for R := 1 to 5 do
+    d[R] := Transform(e[6 - R]);
+
+  FillChar(Log, SizeOf(Log), 0);
+  FillChar(ALog, SizeOf(ALog), 0);
+  FillChar(t, SizeOf(t), 0);
+  FillChar(A, SizeOf(A), 0);
+  FillChar(k, SizeOf(k), 0);
+  InitEnd(IVector);
+end;
+
+class procedure TROCipher_Square.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  ABufSize := 16;
+  AKeySize := 16;
+  AUserSize := 9 * 4 * 2 * SizeOf(LongWord);
+end;
+
+class function TROCipher_Square.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    043h,09Ch,0A6h,0C4h,067h,0E8h,02Eh,047h
+         DB    022h,095h,066h,085h,006h,039h,06Ah,0C9h
+         DB    018h,021h,020h,0F7h,044h,036h,0F1h,061h
+         DB    07Dh,014h,090h,0B1h,0A9h,068h,056h,0C7h
+end;
+
+procedure TROCipher_Square.Encode(Data: Pointer);
+var
+  Key               : pintarray;
+  A, b, c, d        : LongWord;
+  AA, BB, CC        : LongWord;
+  i                 : Integer;
+begin
+  Key := User;
+  A := pintarray(Data)[0] xor Key[0];
+  b := pintarray(Data)[1] xor Key[1];
+  c := pintarray(Data)[2] xor Key[2];
+  d := pintarray(Data)[3] xor Key[3];
+  Inc(PInteger(Key), 4);
+  for i := 0 to 6 do
+  begin
+    AA := Square_TE[0, A and $FF] xor
+      Square_TE[1, b and $FF] xor
+      Square_TE[2, c and $FF] xor
+      Square_TE[3, d and $FF] xor Key[0];
+    BB := Square_TE[0, A shr 8 and $FF] xor
+      Square_TE[1, b shr 8 and $FF] xor
+      Square_TE[2, c shr 8 and $FF] xor
+      Square_TE[3, d shr 8 and $FF] xor Key[1];
+    CC := Square_TE[0, A shr 16 and $FF] xor
+      Square_TE[1, b shr 16 and $FF] xor
+      Square_TE[2, c shr 16 and $FF] xor
+      Square_TE[3, d shr 16 and $FF] xor Key[2];
+    d := Square_TE[0, A shr 24] xor
+      Square_TE[1, b shr 24] xor
+      Square_TE[2, c shr 24] xor
+      Square_TE[3, d shr 24] xor Key[3];
+
+    Inc(PInteger(Key), 4);
+
+    A := AA;
+    b := BB;
+    c := CC;
+  end;
+
+  pintarray(Data)[0] := LongWord(Square_SE[A and $FF]) xor
+    LongWord(Square_SE[b and $FF]) shl 8 xor
+    LongWord(Square_SE[c and $FF]) shl 16 xor
+    LongWord(Square_SE[d and $FF]) shl 24 xor Key[0];
+  pintarray(Data)[1] := LongWord(Square_SE[A shr 8 and $FF]) xor
+    LongWord(Square_SE[b shr 8 and $FF]) shl 8 xor
+    LongWord(Square_SE[c shr 8 and $FF]) shl 16 xor
+    LongWord(Square_SE[d shr 8 and $FF]) shl 24 xor Key[1];
+  pintarray(Data)[2] := LongWord(Square_SE[A shr 16 and $FF]) xor
+    LongWord(Square_SE[b shr 16 and $FF]) shl 8 xor
+    LongWord(Square_SE[c shr 16 and $FF]) shl 16 xor
+    LongWord(Square_SE[d shr 16 and $FF]) shl 24 xor Key[2];
+  pintarray(Data)[3] := LongWord(Square_SE[A shr 24]) xor
+    LongWord(Square_SE[b shr 24]) shl 8 xor
+    LongWord(Square_SE[c shr 24]) shl 16 xor
+    LongWord(Square_SE[d shr 24]) shl 24 xor Key[3];
+end;
+
+procedure TROCipher_Square.Decode(Data: Pointer);
+var
+  Key               : pintarray;
+  A, b, c, d        : LongWord;
+  AA, BB, CC        : LongWord;
+  i                 : Integer;
+begin
+  Key := @pintarray(User)[9 * 4];
+  A := pintarray(Data)[0] xor Key[0];
+  b := pintarray(Data)[1] xor Key[1];
+  c := pintarray(Data)[2] xor Key[2];
+  d := pintarray(Data)[3] xor Key[3];
+  Inc(PInteger(Key), 4);
+
+  for i := 0 to 6 do
+  begin
+    AA := Square_TD[0, A and $FF] xor
+      Square_TD[1, b and $FF] xor
+      Square_TD[2, c and $FF] xor
+      Square_TD[3, d and $FF] xor Key[0];
+    BB := Square_TD[0, A shr 8 and $FF] xor
+      Square_TD[1, b shr 8 and $FF] xor
+      Square_TD[2, c shr 8 and $FF] xor
+      Square_TD[3, d shr 8 and $FF] xor Key[1];
+    CC := Square_TD[0, A shr 16 and $FF] xor
+      Square_TD[1, b shr 16 and $FF] xor
+      Square_TD[2, c shr 16 and $FF] xor
+      Square_TD[3, d shr 16 and $FF] xor Key[2];
+    d := Square_TD[0, A shr 24] xor
+      Square_TD[1, b shr 24] xor
+      Square_TD[2, c shr 24] xor
+      Square_TD[3, d shr 24] xor Key[3];
+
+    Inc(PInteger(Key), 4);
+    A := AA;
+    b := BB;
+    c := CC;
+  end;
+
+  pintarray(Data)[0] := LongWord(Square_SD[A and $FF]) xor
+    LongWord(Square_SD[b and $FF]) shl 8 xor
+    LongWord(Square_SD[c and $FF]) shl 16 xor
+    LongWord(Square_SD[d and $FF]) shl 24 xor Key[0];
+  pintarray(Data)[1] := LongWord(Square_SD[A shr 8 and $FF]) xor
+    LongWord(Square_SD[b shr 8 and $FF]) shl 8 xor
+    LongWord(Square_SD[c shr 8 and $FF]) shl 16 xor
+    LongWord(Square_SD[d shr 8 and $FF]) shl 24 xor Key[1];
+  pintarray(Data)[2] := LongWord(Square_SD[A shr 16 and $FF]) xor
+    LongWord(Square_SD[b shr 16 and $FF]) shl 8 xor
+    LongWord(Square_SD[c shr 16 and $FF]) shl 16 xor
+    LongWord(Square_SD[d shr 16 and $FF]) shl 24 xor Key[2];
+  pintarray(Data)[3] := LongWord(Square_SD[A shr 24]) xor
+    LongWord(Square_SD[b shr 24]) shl 8 xor
+    LongWord(Square_SD[c shr 24]) shl 16 xor
+    LongWord(Square_SD[d shr 24]) shl 24 xor Key[3];
+end;
+
+procedure TROCipher_Square.Init(const Key; Size: Integer; IVector: Pointer);
+type
+  PSquare_Key = ^TSquare_Key;
+  TSquare_Key = array[0..8, 0..3] of LongWord;
+var
+  e, d              : PSquare_Key;
+  t, i              : Integer;
+begin
+  InitBegin(Size);
+  e := User;
+  d := User;
+  Inc(d);
+  Move(Key, e^, Size);
+  for t := 1 to 8 do
+  begin
+    e[t, 0] := e[t - 1, 0] xor ROR(e[t - 1, 3], 8) xor 1 shl (t - 1);
+    d[8 - t, 0] := e[t, 0];
+    e[t, 1] := e[t - 1, 1] xor e[t, 0];
+    d[8 - t, 1] := e[t, 1];
+    e[t, 2] := e[t - 1, 2] xor e[t, 1];
+    d[8 - t, 2] := e[t, 2];
+    e[t, 3] := e[t - 1, 3] xor e[t, 2];
+    d[8 - t, 3] := e[t, 3];
+    for i := 0 to 3 do
+      e[t - 1, i] := Square_PHI[e[t - 1, i] and $FF] xor
+        ROL(Square_PHI[e[t - 1, i] shr 8 and $FF], 8) xor
+        ROL(Square_PHI[e[t - 1, i] shr 16 and $FF], 16) xor
+        ROL(Square_PHI[e[t - 1, i] shr 24], 24);
+  end;
+  d[8] := e[0];
+  InitEnd(IVector);
+end;
+
+{$IFDEF UseASM}
+{$IFNDEF 486GE}                         // no Support for <= CPU 386
+
+{ Ok, follow a BAD BAD dirty Trick, BUT realy realistic and correct
+
+  The Problem:
+    I will use for CPU's >= 486 the BSWAP Mnemonic to speedup Blowfish more.
+    ( BSWAP swaps the Byteorder from a 32bit Word A,B,C,D to D,C,B,A and back
+      and is the fastes Solution, but only for >= 486 CPU)
+    I must wrote two assembler optimated function, one for >= 486
+    and one for <= 386. -> En/Decode() and En/Decode386().
+
+  The normal Solution:
+    See in RO_Hash.pas the SwapInteger proc. We can define a private
+    procedural Field in TROCipher_Blowfish that contains a pointer to the CPU
+    depended code procedure.
+    i.E. an implementation:
+     TROCipher_Blowfish.Encode()
+     begin
+       FProc(Data);
+     end;
+   The Program must make a call to the virtual Method Encode() and
+   a second call to FProc(Data), and in the Init() or Constructor must
+   we initialize these FProc Field.
+
+ The Dirty Solution:
+   A virtual Method, and ONLY a virtual Method, is identicaly to a
+   private Field in the Object Class.
+   This Class Definition is stored in the Code Segment.
+   Now, we modifying, when CPU <= 386, these Field, from the Classdefinition
+   in the Code Segment !!!, and save a new Methodaddress, the Address from
+   TROCipher_Blowfish.Encode386 etc.
+   This changes have Effect to all TROCipher_Blowfish Instances,
+   but not descending Classes from TROCipher_Blowfish :-)
+   This Trick work's theoretical with BP5? upto D4.
+
+ Ok, You say many expense for a little speed more !?
+   YES, but have You this here known ? NO ?, but now.
+}
+
+procedure FindVirtualMethodAndChange(aClass: TClass; MethodAddr, NewAddress: Pointer);
+// MethodAddr must explicit exists
+type
+  PPointer = ^Pointer;
+const
+  PageSize          = SizeOf(Pointer);
+var
+  Table             : PPointer;
+  SaveFlag          : DWord;
+begin
+  Table := PPointer(aClass);
+  while Table^ <> MethodAddr do
+    Inc(Table);
+  if VirtualProtect(Table, PageSize, PAGE_EXECUTE_READWRITE, @SaveFlag) then
+  try
+    Table^ := NewAddress;
+  finally
+    VirtualProtect(Table, PageSize, SaveFlag, @SaveFlag);
+  end;
+end;
+{$ENDIF}
+{$ENDIF}
+
+{$IFDEF VER_D3H}
+
+procedure ModuleUnload(Module: Longword);
+var
+  i                 : Integer;
+begin
+  if IsObject(FCipherList, TStringList) then
+    for i := FCipherList.Count - 1 downto 0 do
+      if FindClassHInstance(TClass(FCipherList.Objects[i])) = Module then
+        FCipherList.Delete(i);
+end;
+{$ENDIF}
+
+initialization
+  {$IFDEF UseASM}
+  {$IFNDEF 486GE}                       // no Support for <= CPU 386
+  if CPUType <= 3 then                  // CPU <= 386
+  begin
+    FindVirtualMethodAndChange(TROCipher_Blowfish, @TROCipher_Blowfish.Encode,
+      @TROCipher_Blowfish.Encode386);
+    FindVirtualMethodAndChange(TROCipher_Blowfish, @TROCipher_Blowfish.Decode,
+      @TROCipher_Blowfish.Decode386);
+  end;
+  {$ENDIF}
+  {$ENDIF}
+  {$IFDEF VER_D3H}
+  AddModuleUnloadProc(ModuleUnload);
+  {$ENDIF}
+  {$IFNDEF ManualRegisterClasses}
+  RegisterCipher(TROCipher_3Way, '', '');
+  RegisterCipher(TROCipher_Blowfish, '', '');
+  RegisterCipher(TROCipher_Gost, '', '');
+  RegisterCipher(TROCipher_IDEA, '', 'free for non-commercial');
+  RegisterCipher(TROCipher_Q128, '', '');
+  RegisterCipher(TROCipher_SAFER_K40, 'SAFER-K40', '');
+  RegisterCipher(TROCipher_SAFER_SK40, 'SAFER-SK40', 'Keyscheduling');
+  RegisterCipher(TROCipher_SAFER_K64, 'SAFER-K64', '');
+  RegisterCipher(TROCipher_SAFER_SK64, 'SAFER-SK64', 'Keyscheduling');
+  RegisterCipher(TROCipher_SAFER_K128, 'SAFER-K128', '');
+  RegisterCipher(TROCipher_SAFER_SK128, 'SAFER-SK128', 'Keyscheduling');
+  RegisterCipher(TROCipher_SCOP, '', '');
+  RegisterCipher(TROCipher_Shark, '', '');
+  RegisterCipher(TROCipher_Square, '', '');
+  RegisterCipher(TROCipher_TEA, 'TEA', '');
+  RegisterCipher(TROCipher_TEAN, 'TEA extended', '');
+  RegisterCipher(TROCipher_Twofish, '', '');
+  {$ENDIF}
+finalization
+  {$IFDEF VER_D3H}
+  RemoveModuleUnloadProc(ModuleUnload);
+  {$ENDIF}
+  FCipherList.Free;
+  FCipherList := nil;
+end.
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROCipher1.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROCipher1.pas
new file mode 100644
index 0000000..f9aa6b6
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROCipher1.pas	
@@ -0,0 +1,3493 @@
+{Copyright:      Hagen Reddmann  mailto:HaReddmann@AOL.COM
+ Author:         Hagen Reddmann
+ Remarks:        freeware, but this Copyright must be included
+ known Problems: none
+ Version:        3.0,  Part I from Delphi Encryption Compendium  ( DEC Part I)
+                 Delphi 2-4, designed and testet under D3 & D4
+ Description:    Include a Selection of various RO_Cipher's (Encryption Algo)
+                 impl. Algo:
+                   Cast128, Cast256, Mars, Misty 1, RC2, RC4, RC5, RC6,
+                   FROG, Rijndael, Skipjack, Single DES, Double DES,
+                   Triple DES, Double DES 16byte Plain, Triple DES 16,
+                   Triple DES 24, DESX, NewDES, Diamond II,
+                   Diamond II Lite, Sapphire II
+
+ * THIS SOFTWARE IS PROVIDED BY THE AUTHORS ''AS IS'' AND ANY EXPRESS
+ * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+ * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHORS OR CONTRIBUTORS BE
+ * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
+ * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
+ * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
+ * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
+ * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE
+ * OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,
+ * EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+}
+unit uROCipher1;
+
+interface
+
+{$I uROVer.inc}
+
+uses SysUtils, uRODECUtil, uROCipher, uROHash;
+
+type
+  TROCipher_Cast128      = class;
+  TROCipher_Cast256      = class;
+  TROCipher_Mars         = class;
+  TROCipher_Misty        = class;
+  TROCipher_RC2          = class;
+  TROCipher_RC4          = class;  {Streamcipher}
+  TROCipher_RC5          = class;
+  TROCipher_RC6          = class;
+  TROCipher_FROG         = class;
+  TROCipher_Rijndael     = class;
+{$IFDEF VER_D3H}
+  TROCipher_Skipjack     = class;
+{$ENDIF}
+  TROCipher_1DES         = class;  {Single DES  8 byte Blocksize,  8 byte Keysize  56 bits relevant}
+  TROCipher_2DES         = class;  {Double DES  8 byte Blocksize, 16 byte Keysize 112 bits relevant}
+  TROCipher_3DES         = class;  {Triple DES  8 byte Blocksize, 24 byte Keysize 168 bits relevant}
+  TROCipher_2DDES        = class;  {Double DES 16 byte Blocksize, 16 byte Keysize 112 bits relevant}
+  TROCipher_3DDES        = class;  {Triple DES 16 byte Blocksize, 24 byte Keysize 168 bits relevant}
+  TROCipher_3TDES        = class;  {Triple DES 24 byte Blocksize, 24 byte Keysize 168 bits relevant}
+  TROCipher_DESX         = class;  {Single DES  8 byte Blocksize, by RSA added XOR Keying}
+  TROCipher_NewDES       = class;
+  TROCipher_Diamond2     = class;  {very slow, but demonstrate a RO_Cipher without}
+  TROCipher_Diamond2Lite = class;  {static- and keydepends S-Boxes}
+  TROCipher_Sapphire     = class;  {Stream RO_Cipher, eq. Design from german ENIGMA Machine}
+
+  TROCipher_Cast128 = class(TROCipher) {Carlisle Adams and Stafford Tavares }
+  private
+    FRounds: Byte;
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+    procedure Encode(Data: Pointer); override;
+    procedure Decode(Data: Pointer); override;
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+  end;
+
+  TROCipher_Cast256 = class(TROCipher)
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+    procedure Encode(Data: Pointer); override;
+    procedure Decode(Data: Pointer); override;
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+  end;
+
+  TROCipher_Mars = class(TROCipher)
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+    procedure Encode(Data: Pointer); override;
+    procedure Decode(Data: Pointer); override;
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+  end;
+
+  TROCipher_Misty = class(TROCipher)
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+    procedure Encode(Data: Pointer); override;
+    procedure Decode(Data: Pointer); override;
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+  end;
+
+  TROCipher_RC2 = class(TROCipher)
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+    procedure Encode(Data: Pointer); override;
+    procedure Decode(Data: Pointer); override;
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+  end;
+
+  TROCipher_RC4 = class(TROCipher)
+  private
+    FI: Byte;
+    FJ: Byte;
+    FSI: Byte;
+    FSJ: Byte;
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+    procedure Encode(Data: Pointer); override;
+    procedure Decode(Data: Pointer); override;
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+    procedure Done; override;
+  end;
+
+  TROCipher_RC5 = class(TROCipher)
+  private
+    FRounds: Integer; {8-16, default 12}
+    procedure SetRounds(Value: Integer);
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+    procedure Encode(Data: Pointer); override;
+    procedure Decode(Data: Pointer); override;
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+    property Rounds: Integer read FRounds write SetRounds;
+  end;
+
+  TROCipher_RC6 = class(TROCipher)
+  private
+    FRounds: Integer; {16-24, default 20}
+    procedure SetRounds(Value: Integer);
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+    procedure Encode(Data: Pointer); override;
+    procedure Decode(Data: Pointer); override;
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+    property Rounds: Integer read FRounds write SetRounds;
+  end;
+
+  TROCipher_FROG = class(TROCipher)
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+    procedure Encode(Data: Pointer); override;
+    procedure Decode(Data: Pointer); override;
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+  end;
+
+  TROCipher_Rijndael = class(TROCipher)
+  private
+    FRounds: Integer;
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+    procedure Encode(Data: Pointer); override;
+    procedure Decode(Data: Pointer); override;
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+  end;
+{$IFDEF VER_D3H}
+  TROCipher_Skipjack = class(TROCipher)
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+    procedure Encode(Data: Pointer); override;
+    procedure Decode(Data: Pointer); override;
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+  end;
+{$ENDIF}
+  TROCipher_1DES = class(TROCipher)
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+    procedure Encode(Data: Pointer); override;
+    procedure Decode(Data: Pointer); override;
+    procedure MakeKey(const Data: array of Byte; Key: PInteger; Reverse: Boolean);
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+  end;
+
+  TROCipher_2DES = class(TROCipher_1DES)
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+    procedure Encode(Data: Pointer); override;
+    procedure Decode(Data: Pointer); override;
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+  end;
+
+  TROCipher_3DES = class(TROCipher_1DES)
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+    procedure Encode(Data: Pointer); override;
+    procedure Decode(Data: Pointer); override;
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+  end;
+
+  TROCipher_2DDES = class(TROCipher_2DES)
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+    procedure Encode(Data: Pointer); override;
+    procedure Decode(Data: Pointer); override;
+  end;
+
+  TROCipher_3DDES = class(TROCipher_3DES)
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+    procedure Encode(Data: Pointer); override;
+    procedure Decode(Data: Pointer); override;
+  end;
+
+  TROCipher_3TDES = class(TROCipher_3DES)
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+    procedure Encode(Data: Pointer); override;
+    procedure Decode(Data: Pointer); override;
+  end;
+
+  TROCipher_DESX = class(TROCipher_1DES)
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+    procedure Encode(Data: Pointer); override;
+    procedure Decode(Data: Pointer); override;
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+    procedure InitNew(const Key, Whitening; Size: Integer; IVector: Pointer);
+  end;
+
+{ This algorithm resembles the Data Encryption Standard (DES), but is easier
+  to implement in software and is supposed to be more secure.
+  It is not to be confused with another algorithm--known by the
+  same name--which is simply DES without the initial and final
+  permutations.  The NewDES here is a completely different algorithm.}
+
+  TROCipher_NewDES = class(TROCipher)
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+    procedure Encode(Data: Pointer); override;
+    procedure Decode(Data: Pointer); override;
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+  end;
+
+  TROCipher_Diamond2 = class(TROCipher)
+  private
+    FRounds: Integer;
+    FBoxE: PByteArray; {dynamicly allociated Boxes}
+    FBoxD: PByteArray;
+    procedure SetRounds(Value: Integer); virtual; {5-15, default is 10}
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+    procedure Encode(Data: Pointer); override;
+    procedure Decode(Data: Pointer); override;
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+    procedure Protect; override;
+    property Rounds: Integer read FRounds write SetRounds;
+  end;
+
+  TROCipher_Diamond2Lite = class(TROCipher_Diamond2)
+  private
+    procedure SetRounds(Value: Integer); override; {4-30, default is 10}
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+  end;
+
+  TROCipher_Sapphire = class(TROCipher)
+  protected
+    class procedure GetContext(var ABufSize, AKeySize, AUserSize: Integer); override;
+    class function TestVector: Pointer; override;
+    procedure Encode(Data: Pointer); override;
+    procedure Decode(Data: Pointer); override;
+  public
+    procedure Init(const Key; Size: Integer; IVector: Pointer); override;
+    procedure Done; override;
+  end;
+
+implementation
+
+{$I *.inc}
+
+type
+  PCipherRec = ^TCipherRec;
+  TCipherRec = packed record
+                  case Integer of
+                    0: (X: array[0..7] of Byte);
+                    1: (A, B: LongWord);
+                end;
+
+class procedure TROCipher_Cast128.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  ABufSize := 8;
+  AKeySize := 16;
+  AUserSize := 128;
+end;
+
+class function TROCipher_Cast128.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    06Ch,027h,0D1h,04Ch,0F6h,0BAh,076h,0E7h
+         DB    0A4h,078h,01Ch,020h,018h,08Ch,030h,0BCh
+         DB    0D2h,09Ah,0F6h,02Ah,063h,01Fh,0FDh,004h
+         DB    089h,03Fh,0C7h,00Eh,007h,0A9h,094h,09Bh
+end;
+
+procedure TROCipher_Cast128.Encode(Data: Pointer);
+var
+  T,I,A,B: LongWord;
+  K: PInteger;
+begin
+  K := User;
+  A := SwapInteger(PCipherRec(Data).A);
+  B := SwapInteger(PCipherRec(Data).B);
+  for I := 0 to 2 do
+  begin
+    T := ROL(K^ + B, PIntArray(K)[16]);
+    A := A xor (Cast128_Data[0, T shr 24] xor
+                Cast128_Data[1, T shr 16 and $FF] -
+                Cast128_Data[2, T shr  8 and $FF] +
+                Cast128_Data[3, T and $FF]);
+    Inc(K);
+    T := ROL(K^ xor A, PIntArray(K)[16]);
+    B := B xor (Cast128_Data[0, T shr 24] -
+                Cast128_Data[1, T shr 16 and $FF] +
+                Cast128_Data[2, T shr  8 and $FF] xor
+                Cast128_Data[3, T and $FF]);
+    Inc(K);
+    T := ROL(K^ - B, PIntArray(K)[16]);
+    A := A xor (Cast128_Data[0, T shr 24] +
+                Cast128_Data[1, T shr 16 and $FF] xor
+                Cast128_Data[2, T shr  8 and $FF] -
+                Cast128_Data[3, T and $FF]);
+    Inc(K);
+    T := ROL(K^ + A, PIntArray(K)[16]);
+    B := B xor (Cast128_Data[0, T shr 24] xor
+                Cast128_Data[1, T shr 16 and $FF] -
+                Cast128_Data[2, T shr  8 and $FF] +
+                Cast128_Data[3, T and $FF]);
+    if I = 2 then Break;
+    Inc(K);
+    T := ROL(K^ xor B, PIntArray(K)[16]);
+    A := A xor (Cast128_Data[0, T shr 24] -
+                Cast128_Data[1, T shr 16 and $FF] +
+                Cast128_Data[2, T shr  8 and $FF] xor
+                Cast128_Data[3, T and $FF]);
+    Inc(K);
+    T := ROL(K^ - A, PIntArray(K)[16]);
+    B := B xor (Cast128_Data[0, T shr 24] +
+                Cast128_Data[1, T shr 16 and $FF] xor
+                Cast128_Data[2, T shr  8 and $FF] -
+                Cast128_Data[3, T and $FF]);
+    Inc(K);
+    if (I = 1) and (FRounds <= 12) then Break;
+  end;
+  PCipherRec(Data).B := SwapInteger(A);
+  PCipherRec(Data).A := SwapInteger(B);
+end;
+
+procedure TROCipher_Cast128.Decode(Data: Pointer);
+var
+  T,I,A,B: LongWord;
+  K: PInteger;
+label
+  Start;
+begin
+  K := @PIntArray(User)[15];
+  B := SwapInteger(PCipherRec(Data).A);
+  A := SwapInteger(PCipherRec(Data).B);
+  I := 2;
+  if FRounds <= 12 then Dec(K, 4) else goto Start;
+  while I > 0 do
+  begin
+    Dec(I);
+    T := ROL(K^ - A, PIntArray(K)[16]);
+    B := B xor (Cast128_Data[0, T shr 24] +
+                Cast128_Data[1, T shr 16 and $FF] xor
+                Cast128_Data[2, T shr  8 and $FF] -
+                Cast128_Data[3, T and $FF]);
+    Dec(K);
+    T := ROL(K^ xor B, PIntArray(K)[16]);
+    A := A xor (Cast128_Data[0, T shr 24] -
+                Cast128_Data[1, T shr 16 and $FF] +
+                Cast128_Data[2, T shr  8 and $FF] xor
+                Cast128_Data[3, T and $FF]);
+    Dec(K);
+Start:
+    T := ROL(K^ + A, PIntArray(K)[16]);
+    B := B xor (Cast128_Data[0, T shr 24] xor
+                Cast128_Data[1, T shr 16 and $FF] -
+                Cast128_Data[2, T shr  8 and $FF] +
+                Cast128_Data[3, T and $FF]);
+    Dec(K);
+    T := ROL(K^ - B, PIntArray(K)[16]);
+    A := A xor (Cast128_Data[0, T shr 24] +
+                Cast128_Data[1, T shr 16 and $FF] xor
+                Cast128_Data[2, T shr  8 and $FF] -
+                Cast128_Data[3, T and $FF]);
+    Dec(K);
+    T := ROL(K^ xor A, PIntArray(K)[16]);
+    B := B xor (Cast128_Data[0, T shr 24] -
+                Cast128_Data[1, T shr 16 and $FF] +
+                Cast128_Data[2, T shr  8 and $FF] xor
+                Cast128_Data[3, T and $FF]);
+    Dec(K);
+    T := ROL(K^ + B, PIntArray(K)[16]);
+    A := A xor (Cast128_Data[0, T shr 24] xor
+                Cast128_Data[1, T shr 16 and $FF] -
+                Cast128_Data[2, T shr  8 and $FF] +
+                Cast128_Data[3, T and $FF]);
+    Dec(K);
+  end;
+  PCipherRec(Data).A := SwapInteger(A);
+  PCipherRec(Data).B := SwapInteger(B);
+end;
+
+procedure TROCipher_Cast128.Init(const Key; Size: Integer; IVector: Pointer);
+var
+  Z,X,T: array[0..3] of LongWord;
+  K: PIntArray;
+  I: LongWord;
+begin
+  InitBegin(Size);
+  if Size <= 10 then FRounds := 12 else FRounds := 16;
+  K := User;
+  FillChar(X, SizeOf(X), 0);
+  Move(Key, X, Size);
+  SwapIntegerBuffer(@X, @X, 4);
+//  for I := 0 to 3 do X[I] := SwapInteger(X[I]);
+  I := 0;
+  while I < 32 do
+  begin
+    if I and 4 = 0 then
+    begin
+      Z[0] := X[0] xor Cast128_Key[0, X[3] shr 16 and $FF] xor
+                       Cast128_Key[1, X[3] and $FF] xor
+                       Cast128_Key[2, X[3] shr 24] xor
+                       Cast128_Key[3, X[3] shr  8 and $FF] xor
+                       Cast128_Key[2, X[2] shr 24];
+      T[0] := Z[0];
+      Z[1] := X[2] xor Cast128_Key[0, Z[0] shr 24] xor
+                       Cast128_Key[1, Z[0] shr  8 and $FF] xor
+                       Cast128_Key[2, Z[0] shr 16 and $FF] xor
+                       Cast128_Key[3, Z[0] and $FF] xor
+                       Cast128_Key[3, X[2] shr  8 and $FF];
+      T[1] := Z[1];
+      Z[2] := X[3] xor Cast128_Key[0, Z[1] and $FF] xor
+                       Cast128_Key[1, Z[1] shr  8 and $FF] xor
+                       Cast128_Key[2, Z[1] shr 16 and $FF] xor
+                       Cast128_Key[3, Z[1] shr 24] xor
+                       Cast128_Key[0, X[2] shr 16 and $FF];
+      T[2] := Z[2];
+      Z[3] := X[1] xor Cast128_Key[0, Z[2] shr  8 and $FF] xor
+                       Cast128_Key[1, Z[2] shr 16 and $FF] xor
+                       Cast128_Key[2, Z[2] and $FF] xor
+                       Cast128_Key[3, Z[2] shr 24] xor
+                       Cast128_Key[1, X[2] and $FF];
+      T[3] := Z[3];
+    end else
+    begin
+      X[0] := Z[2] xor Cast128_Key[0, Z[1] shr 16 and $FF] xor
+                       Cast128_Key[1, Z[1] and $FF] xor
+                       Cast128_Key[2, Z[1] shr 24] xor
+                       Cast128_Key[3, Z[1] shr  8 and $FF] xor
+                       Cast128_Key[2, Z[0] shr 24];
+      T[0] := X[0];
+      X[1] := Z[0] xor Cast128_Key[0, X[0] shr 24] xor
+                       Cast128_Key[1, X[0] shr  8 and $FF] xor
+                       Cast128_Key[2, X[0] shr 16 and $FF] xor
+                       Cast128_Key[3, X[0] and $FF] xor
+                       Cast128_Key[3, Z[0] shr  8 and $FF];
+      T[1] := X[1];
+      X[2] := Z[1] xor Cast128_Key[0, X[1] and $FF] xor
+                       Cast128_Key[1, X[1] shr  8 and $FF] xor
+                       Cast128_Key[2, X[1] shr 16 and $FF] xor
+                       Cast128_Key[3, X[1] shr 24] xor
+                       Cast128_Key[0, Z[0] shr 16 and $FF];
+      T[2] := X[2];
+      X[3] := Z[3] xor Cast128_Key[0, X[2] shr  8 and $FF] xor
+                       Cast128_Key[1, X[2] shr 16 and $FF] xor
+                       Cast128_Key[2, X[2] and $FF] xor
+                       Cast128_Key[3, X[2] shr 24] xor
+                       Cast128_Key[1, Z[0] and $FF];
+      T[3] := X[3];
+    end;
+    case I and 12 of
+      0,12:
+        begin
+          K[I +0] := Cast128_Key[0, T[2] shr 24] xor
+                     Cast128_Key[1, T[2] shr 16 and $FF] xor
+                     Cast128_Key[2, T[1] and $FF] xor
+                     Cast128_Key[3, T[1] shr  8 and $FF];
+          K[I +1] := Cast128_Key[0, T[2] shr  8 and $FF] xor
+                     Cast128_Key[1, T[2] and $FF] xor
+                     Cast128_Key[2, T[1] shr 16 and $FF] xor
+                     Cast128_Key[3, T[1] shr 24];
+          K[I +2] := Cast128_Key[0, T[3] shr 24] xor
+                     Cast128_Key[1, T[3] shr 16 and $FF] xor
+                     Cast128_Key[2, T[0] and $FF] xor
+                     Cast128_Key[3, T[0] shr  8 and $FF];
+          K[I +3] := Cast128_Key[0, T[3] shr  8 and $FF] xor
+                     Cast128_Key[1, T[3] and $FF] xor
+                     Cast128_Key[2, T[0] shr 16 and $FF] xor
+                     Cast128_Key[3, T[0] shr 24];
+        end;
+      4,8:
+        begin
+          K[I +0] := Cast128_Key[0, T[0] and $FF] xor
+                     Cast128_Key[1, T[0] shr  8 and $FF] xor
+                     Cast128_Key[2, T[3] shr 24] xor
+                     Cast128_Key[3, T[3] shr 16 and $FF];
+          K[I +1] := Cast128_Key[0, T[0] shr 16 and $FF] xor
+                     Cast128_Key[1, T[0] shr 24] xor
+                     Cast128_Key[2, T[3] shr  8 and $FF] xor
+                     Cast128_Key[3, T[3] and $FF];
+          K[I +2] := Cast128_Key[0, T[1] and $FF] xor
+                     Cast128_Key[1, T[1] shr  8 and $FF] xor
+                     Cast128_Key[2, T[2] shr 24] xor
+                     Cast128_Key[3, T[2] shr 16 and $FF];
+          K[I +3] := Cast128_Key[0, T[1] shr 16 and $FF] xor
+                     Cast128_Key[1, T[1] shr 24] xor
+                     Cast128_Key[2, T[2] shr  8 and $FF] xor
+                     Cast128_Key[3, T[2] and $FF];
+        end;
+    end;
+    case I and 12 of
+      0: begin
+           K[I +0] := K[I +0] xor Cast128_Key[0, Z[0] shr  8 and $FF];
+           K[I +1] := K[I +1] xor Cast128_Key[1, Z[1] shr  8 and $FF];
+           K[I +2] := K[I +2] xor Cast128_Key[2, Z[2] shr 16 and $FF];
+           K[I +3] := K[I +3] xor Cast128_Key[3, Z[3] shr 24];
+         end;
+      4: begin
+           K[I +0] := K[I +0] xor Cast128_Key[0, X[2] shr 24];
+           K[I +1] := K[I +1] xor Cast128_Key[1, X[3] shr 16 and $FF];
+           K[I +2] := K[I +2] xor Cast128_Key[2, X[0] and $FF];
+           K[I +3] := K[I +3] xor Cast128_Key[3, X[1] and $FF];
+         end;
+      8: begin
+           K[I +0] := K[I +0] xor Cast128_Key[0, Z[2] shr 16 and $FF];
+           K[I +1] := K[I +1] xor Cast128_Key[1, Z[3] shr 24];
+           K[I +2] := K[I +2] xor Cast128_Key[2, Z[0] shr  8 and $FF];
+           K[I +3] := K[I +3] xor Cast128_Key[3, Z[1] shr  8 and $FF];
+         end;
+     12: begin
+          K[I +0] := K[I +0] xor Cast128_Key[0, X[0] and $FF];
+          K[I +1] := K[I +1] xor Cast128_Key[1, X[1] and $FF];
+          K[I +2] := K[I +2] xor Cast128_Key[2, X[2] shr 24];
+          K[I +3] := K[I +3] xor Cast128_Key[3, X[3] shr 16 and $FF];
+        end;
+    end;
+    if I >= 16 then
+    begin
+      K[I +0] := K[I +0] and $1F;
+      K[I +1] := K[I +1] and $1F;
+      K[I +2] := K[I +2] and $1F;
+      K[I +3] := K[I +3] and $1F;
+    end;
+    Inc(I, 4);
+  end;
+  FillChar(X, SizeOf(X), 0);
+  FillChar(Z, SizeOf(Z), 0);
+  FillChar(T, SizeOf(T), 0);
+  InitEnd(IVector);
+end;
+
+class procedure TROCipher_Cast256.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  ABufSize := 16;
+  AKeySize := 32;
+  AUserSize := 384;
+end;
+
+class function TROCipher_Cast256.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    0C5h,0F1h,095h,087h,08Ah,031h,01Eh,042h
+         DB    01Ch,045h,010h,007h,049h,0DFh,0F2h,02Dh
+         DB    075h,012h,005h,0B7h,0A9h,0A3h,030h,0DAh
+         DB    09Eh,0F1h,03Bh,010h,0FEh,062h,04Fh,079h
+end;
+
+type
+  PCast256Rec = ^TCast256Rec;
+  TCast256Rec = packed record
+                  case Integer of
+                    0: (A,B,C,D: Integer);
+                    1: (Z: array[0..3] of Integer);
+                end;
+
+procedure TROCipher_Cast256.Encode(Data: Pointer);
+var
+  I,T,A,B,C,D: LongWord;
+  K: PInteger;
+begin
+  K := User;
+  SwapIntegerBuffer(Data, Data, 4);
+  A := PCast256Rec(Data).A;
+  B := PCast256Rec(Data).B;
+  C := PCast256Rec(Data).C;
+  D := PCast256Rec(Data).D;
+  for I := 0 to 5 do
+  begin
+    T := ROL(K^ + D, PIntArray(K)[48]);
+    C := C xor (Cast256_Data[0, T shr 24] xor
+                Cast256_Data[1, T shr 16 and $FF] -
+                Cast256_Data[2, T shr  8 and $FF] +
+                Cast256_Data[3, T and $FF]);
+    Inc(K);
+    T := ROL(K^ xor C, PIntArray(K)[48]);
+    B := B xor (Cast256_Data[0, T shr 24] -
+                Cast256_Data[1, T shr 16 and $FF] +
+                Cast256_Data[2, T shr  8 and $FF] xor
+                Cast256_Data[3, T and $FF]);
+    Inc(K);
+    T := ROL(K^ - B, PIntArray(K)[48]);
+    A := A xor (Cast256_Data[0, T shr 24] +
+                Cast256_Data[1, T shr 16 and $FF] xor
+                Cast256_Data[2, T shr  8 and $FF] -
+                Cast256_Data[3, T and $FF]);
+    Inc(K);
+    T := ROL(K^ + A, PIntArray(K)[48]);
+    D := D xor (Cast256_Data[0, T shr 24] xor
+                Cast256_Data[1, T shr 16 and $FF] -
+                Cast256_Data[2, T shr  8 and $FF] +
+                Cast256_Data[3, T and $FF]);
+    Inc(K);
+  end;
+  for I := 0 to 5 do
+  begin
+    T := ROL(K^ + A, PIntArray(K)[48]);
+    D := D xor (Cast256_Data[0, T shr 24] xor
+                Cast256_Data[1, T shr 16 and $FF] -
+                Cast256_Data[2, T shr  8 and $FF] +
+                Cast256_Data[3, T and $FF]);
+    Inc(K);
+    T := ROL(K^ - B, PIntArray(K)[48]);
+    A := A xor (Cast256_Data[0, T shr 24] +
+                Cast256_Data[1, T shr 16 and $FF] xor
+                Cast256_Data[2, T shr  8 and $FF] -
+                Cast256_Data[3, T and $FF]);
+    Inc(K);
+    T := ROL(K^ xor C, PIntArray(K)[48]);
+    B := B xor (Cast256_Data[0, T shr 24] -
+                Cast256_Data[1, T shr 16 and $FF] +
+                Cast256_Data[2, T shr  8 and $FF] xor
+                Cast256_Data[3, T and $FF]);
+    Inc(K);
+    T := ROL(K^ + D, PIntArray(K)[48]);
+    C := C xor (Cast256_Data[0, T shr 24] xor
+                Cast256_Data[1, T shr 16 and $FF] -
+                Cast256_Data[2, T shr  8 and $FF] +
+                Cast256_Data[3, T and $FF]);
+    Inc(K);
+  end;
+  PCast256Rec(Data).A := A;
+  PCast256Rec(Data).B := B;
+  PCast256Rec(Data).C := C;
+  PCast256Rec(Data).D := D;
+  SwapIntegerBuffer(Data, Data, 4);
+end;
+
+procedure TROCipher_Cast256.Decode(Data: Pointer);
+var
+  I,T,A,B,C,D: LongWord;
+  K: PInteger;
+begin
+  K := @PIntArray(User)[47];
+  SwapIntegerBuffer(Data, Data, 4);
+  A := PCast256Rec(Data).A;
+  B := PCast256Rec(Data).B;
+  C := PCast256Rec(Data).C;
+  D := PCast256Rec(Data).D;
+  for I := 0 to 5 do
+  begin
+    T := ROL(K^ + D, PIntArray(K)[48]);
+    C := C xor (Cast256_Data[0, T shr 24] xor
+                Cast256_Data[1, T shr 16 and $FF] -
+                Cast256_Data[2, T shr  8 and $FF] +
+                Cast256_Data[3, T and $FF]);
+    Dec(K);
+    T := ROL(K^ xor C, PIntArray(K)[48]);
+    B := B xor (Cast256_Data[0, T shr 24] -
+                Cast256_Data[1, T shr 16 and $FF] +
+                Cast256_Data[2, T shr  8 and $FF] xor
+                Cast256_Data[3, T and $FF]);
+    Dec(K);
+    T := ROL(K^ - B, PIntArray(K)[48]);
+    A := A xor (Cast256_Data[0, T shr 24] +
+                Cast256_Data[1, T shr 16 and $FF] xor
+                Cast256_Data[2, T shr  8 and $FF] -
+                Cast256_Data[3, T and $FF]);
+    Dec(K);
+    T := ROL(K^ + A, PIntArray(K)[48]);
+    D := D xor (Cast256_Data[0, T shr 24] xor
+                Cast256_Data[1, T shr 16 and $FF] -
+                Cast256_Data[2, T shr  8 and $FF] +
+                Cast256_Data[3, T and $FF]);
+    Dec(K);
+  end;
+  for I := 0 to 5 do
+  begin
+    T := ROL(K^ + A, PIntArray(K)[48]);
+    D := D xor (Cast256_Data[0, T shr 24] xor
+                Cast256_Data[1, T shr 16 and $FF] -
+                Cast256_Data[2, T shr  8 and $FF] +
+                Cast256_Data[3, T and $FF]);
+    Dec(K);
+    T := ROL(K^ - B, PIntArray(K)[48]);
+    A := A xor (Cast256_Data[0, T shr 24] +
+                Cast256_Data[1, T shr 16 and $FF] xor
+                Cast256_Data[2, T shr  8 and $FF] -
+                Cast256_Data[3, T and $FF]);
+    Dec(K);
+    T := ROL(K^ xor C, PIntArray(K)[48]);
+    B := B xor (Cast256_Data[0, T shr 24] -
+                Cast256_Data[1, T shr 16 and $FF] +
+                Cast256_Data[2, T shr  8 and $FF] xor
+                Cast256_Data[3, T and $FF]);
+    Dec(K);
+    T := ROL(K^ + D, PIntArray(K)[48]);
+    C := C xor (Cast256_Data[0, T shr 24] xor
+                Cast256_Data[1, T shr 16 and $FF] -
+                Cast256_Data[2, T shr  8 and $FF] +
+                Cast256_Data[3, T and $FF]);
+    Dec(K);
+  end;
+  PCast256Rec(Data).A := A;
+  PCast256Rec(Data).B := B;
+  PCast256Rec(Data).C := C;
+  PCast256Rec(Data).D := D;
+  SwapIntegerBuffer(Data, Data, 4);
+end;
+
+procedure TROCipher_Cast256.Init(const Key; Size: Integer; IVector: Pointer);
+var
+  X: array[0..7] of LongWord;
+  M, R, I, J, T: LongWord;
+  K: PInteger;
+begin
+  InitBegin(Size);
+  FillChar(X, SizeOf(X), 0);
+  Move(Key, X, Size);
+//  SwapIntegerBuffer(@X, @X, 8);
+  for I := 0 to 7 do X[I] := SwapInteger(X[I]);
+  K := User;
+  M := $5A827999;
+  R := 19;
+  for I := 0 to 11 do
+  begin
+    for J := 0 to 1 do
+    begin
+      T    := ROL(M + X[7], R);
+      X[6] := X[6] xor (Cast256_Data[0, T shr 24] xor
+                        Cast256_Data[1, T shr 16 and $FF] -
+                        Cast256_Data[2, T shr  8 and $FF] +
+                        Cast256_Data[3, T and $FF]);
+      Inc(M, $6ED9EBA1);
+      Inc(R, 17);
+      T    := ROL(M xor X[6], R);
+      X[5] := X[5] xor (Cast256_Data[0, T shr 24] -
+                        Cast256_Data[1, T shr 16 and $FF] +
+                        Cast256_Data[2, T shr  8 and $FF] xor
+                        Cast256_Data[3, T and $FF]);
+      Inc(M, $6ED9EBA1);
+      Inc(R, 17);
+      T    := ROL(M - X[5], R);
+      X[4] := X[4] xor (Cast256_Data[0, T shr 24] +
+                        Cast256_Data[1, T shr 16 and $FF] xor
+                        Cast256_Data[2, T shr  8 and $FF] -
+                        Cast256_Data[3, T and $FF]);
+      Inc(M, $6ED9EBA1);
+      Inc(R, 17);
+      T    := ROL(M + X[4], R);
+      X[3] := X[3] xor (Cast256_Data[0, T shr 24] xor
+                        Cast256_Data[1, T shr 16 and $FF] -
+                        Cast256_Data[2, T shr  8 and $FF] +
+                        Cast256_Data[3, T and $FF]);
+      Inc(M, $6ED9EBA1);
+      Inc(R, 17);
+      T    := ROL(M xor X[3], R);
+      X[2] := X[2] xor (Cast256_Data[0, T shr 24] -
+                        Cast256_Data[1, T shr 16 and $FF] +
+                        Cast256_Data[2, T shr  8 and $FF] xor
+                        Cast256_Data[3, T and $FF]);
+      Inc(M, $6ED9EBA1);
+      Inc(R, 17);
+      T    := ROL(M - X[2], R);
+      X[1] := X[1] xor (Cast256_Data[0, T shr 24] +
+                        Cast256_Data[1, T shr 16 and $FF] xor
+                        Cast256_Data[2, T shr  8 and $FF] -
+                        Cast256_Data[3, T and $FF]);
+      Inc(M, $6ED9EBA1);
+      Inc(R, 17);
+      T    := ROL(M + X[1], R);
+      X[0] := X[0] xor (Cast256_Data[0, T shr 24] xor
+                        Cast256_Data[1, T shr 16 and $FF] -
+                        Cast256_Data[2, T shr  8 and $FF] +
+                        Cast256_Data[3, T and $FF]);
+      Inc(M, $6ED9EBA1);
+      Inc(R, 17);
+      T    := ROL(M xor X[0], R);
+      X[7] := X[7] xor (Cast256_Data[0, T shr 24] -
+                        Cast256_Data[1, T shr 16 and $FF] +
+                        Cast256_Data[2, T shr  8 and $FF] xor
+                        Cast256_Data[3, T and $FF]);
+      Inc(M, $6ED9EBA1);
+      Inc(R, 17);
+    end;
+    if I < 6 then
+    begin
+      PIntArray(K)[48] := X[0] and $1F;
+      PIntArray(K)[49] := X[2] and $1F;
+      PIntArray(K)[50] := X[4] and $1F;
+      PIntArray(K)[51] := X[6] and $1F;
+      PIntArray(K)[0] := X[7];
+      PIntArray(K)[1] := X[5];
+      PIntArray(K)[2] := X[3];
+      PIntArray(K)[3] := X[1];
+    end else
+    begin
+      PIntArray(K)[48] := X[6] and $1F;
+      PIntArray(K)[49] := X[4] and $1F;
+      PIntArray(K)[50] := X[2] and $1F;
+      PIntArray(K)[51] := X[0] and $1F;
+      PIntArray(K)[0] := X[1];
+      PIntArray(K)[1] := X[3];
+      PIntArray(K)[2] := X[5];
+      PIntArray(K)[3] := X[7];
+    end;
+    Inc(K, 4);
+  end;
+  FillChar(X, SizeOf(X), 0);
+  InitEnd(IVector);
+end;
+
+class procedure TROCipher_Mars.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  ABufSize := 16;
+  AKeySize := 156;
+  AUserSize := 160;
+end;
+
+class function TROCipher_Mars.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    0D8h,06Ah,0DFh,00Ch,0B5h,066h,024h,00Dh
+         DB    0C5h,000h,0E0h,0A5h,0D8h,0C1h,0C2h,013h
+         DB    045h,0EDh,0F1h,04Fh,0AFh,05Ch,075h,002h
+         DB    01Dh,00Ah,08Dh,010h,06Dh,031h,05Ch,0D5h
+end;
+
+type
+  PMarsRec = ^TMarsRec;
+  TMarsRec = packed record
+               case Integer of
+                 0: (X: array[0..3] of LongWord);
+                 1: (A,B,C,D: LongWord);
+             end;
+
+procedure TROCipher_Mars.Encode(Data: Pointer);
+var
+  K: PInteger;
+  I,L,R,A,B,C,D: LongWord;
+begin
+  K := User;
+  A := PMarsRec(Data).A + K^; Inc(K);
+  B := PMarsRec(Data).B + K^; Inc(K);
+  C := PMarsRec(Data).C + K^; Inc(K);
+  D := PMarsRec(Data).D + K^; Inc(K);
+  for I := 0 to 1 do
+  begin
+    B := B xor Mars_Data[A and $FF] + Mars_Data[A shr 8 and $FF + 256];
+    Inc(C, Mars_Data[A shr 16 and $FF]);
+    D := D xor Mars_Data[A shr 24 + 256];
+    A := (A shr 24 or A shl 8) + D;
+    C := C xor Mars_Data[B and $FF] + Mars_Data[B shr 8 and $FF + 256];
+    Inc(D, Mars_Data[B shr 16 and $FF]);
+    A := A xor Mars_Data[B shr 24 + 256];
+    B := (B shr 24 or B shl 8) + C;
+    D := D xor Mars_Data[C and $FF] + Mars_Data[C shr 8 and $FF + 256];
+    Inc(A, Mars_Data[C shr 16 and $FF]);
+    B := B xor Mars_Data[C shr 24 + 256];
+    C := C shr 24 or C shl 8;
+    A := A xor Mars_Data[D and $FF] + Mars_Data[D shr 8 and $FF + 256];
+    Inc(B, Mars_Data[D shr 16 and $FF]);
+    C := C xor Mars_Data[D shr 24 + 256];
+    D := D shr 24 or D shl 8;
+  end;
+  for I := 0 to 3 do
+  begin
+    L := A + K^;                    Inc(K);
+    A := A shl 13 or A shr 19;
+    R := A * K^;                    Inc(K);
+    R := R shl 5 or R shr 27;
+    Inc(C, L shl R or L shr (32 - R));
+    L := Mars_Data[L and $1FF] xor R;
+    R := R shl 5 or R shr 27;
+    L := L xor R;
+    L := L shl R or L shr (32 - R);
+    if I <= 1 then
+    begin
+      Inc(B, L);
+      D := D xor R;
+    end else
+    begin
+      Inc(D, L);
+      B := B xor R;
+    end;
+    L := B + K^;                    Inc(K);
+    B := B shl 13 or B shr 19;
+    R := B * K^;                    Inc(K);
+    R := R shl 5 or R shr 27;
+    Inc(D, L shl R or L shr (32 - R));
+    L := Mars_Data[L and $1FF] xor R;
+    R := R shl 5 or R shr 27;
+    L := L xor R;
+    L := L shl R or L shr (32 - R);
+    if I <= 1 then
+    begin
+      Inc(C, L);
+      A := A xor R;
+    end else
+    begin
+      Inc(A, L);
+      C := C xor R;
+    end;
+    L := C + K^;                    Inc(K);
+    C := C shl 13 or C shr 19;
+    R := C * K^;                    Inc(K);
+    R := R shl 5 or R shr 27;
+    Inc(A, L shl R or L shr (32 - R));
+    L := Mars_Data[L and $1FF] xor R;
+    R := R shl 5 or R shr 27;
+    L := L xor R;
+    L := L shl R or L shr (32 - R);
+    if I <= 1 then
+    begin
+      Inc(D, L);
+      B := B xor R;
+    end else
+    begin
+      Inc(B, L);
+      D := D xor R;
+    end;
+    L := D + K^;                    Inc(K);
+    D := D shl 13 or D shr 19;
+    R := D * K^;                    Inc(K);
+    R := R shl 5 or R shr 27;
+    Inc(B, L shl R or L shr (32 - R));
+    L := Mars_Data[L and $1FF] xor R;
+    R := R shl 5 or R shr 27;
+    L := L xor R;
+    L := L shl R or L shr (32 - R);
+    if I <= 1 then
+    begin
+      Inc(A, L);
+      C := C xor R;
+    end else
+    begin
+      Inc(C, L);
+      A := A xor R;
+    end;
+  end;
+  for I := 0 to 1 do
+  begin
+    B := B xor Mars_Data[A and $FF + 256];
+    Dec(C, Mars_Data[A shr 24]);
+    D := D - Mars_Data[A shr 16 and $FF + 256] xor Mars_Data[A shr 8 and $FF];
+    A := A shl 24 or A shr 8;
+    C := C xor Mars_Data[B and $FF + 256];
+    Dec(D, Mars_Data[B shr 24]);
+    A := A - Mars_Data[B shr 16 and $FF + 256] xor Mars_Data[B shr 8 and $FF];
+    B := B shl 24 or B shr 8;
+    Dec(C, B);
+    D := D xor Mars_Data[C and $FF + 256];
+    Dec(A, Mars_Data[C shr 24]);
+    B := B - Mars_Data[C shr 16 and $FF + 256] xor Mars_Data[C shr 8 and $FF];
+    C := C shl 24 or C shr 8;
+    Dec(D, A);
+    A := A xor Mars_Data[D and $FF + 256];
+    Dec(B, Mars_Data[D shr 24]);
+    C := C - Mars_Data[D shr 16 and $FF + 256] xor Mars_Data[D shr 8 and $FF];
+    D := D shl 24 or D shr 8;
+  end;
+  PMarsRec(Data).A := A - K^; Inc(K);
+  PMarsRec(Data).B := B - K^; Inc(K);
+  PMarsRec(Data).C := C - K^; Inc(K);
+  PMarsRec(Data).D := D - K^;
+end;
+
+procedure TROCipher_Mars.Decode(Data: Pointer);
+var
+  K: PInteger;
+  I,L,R,A,B,C,D: LongWord;
+begin
+  K := @PIntArray(User)[39];
+  D := PMarsRec(Data).D + K^; Dec(K);
+  C := PMarsRec(Data).C + K^; Dec(K);
+  B := PMarsRec(Data).B + K^; Dec(K);
+  A := PMarsRec(Data).A + K^; Dec(K);
+  for I := 0 to 1 do
+  begin
+    D := D shr 24 or D shl 8;
+    C := C xor Mars_Data[D shr 8 and $FF] + Mars_Data[D shr 16 and $FF + 256];
+    Inc(B, Mars_Data[D shr 24]);
+    A := A xor Mars_Data[D and $FF + 256];
+    Inc(D, A);
+    C := C shr 24 or C shl 8;
+    B := B xor Mars_Data[C shr 8 and $FF] + Mars_Data[C shr 16 and $FF + 256];
+    Inc(A, Mars_Data[C shr 24]);
+    D := D xor Mars_Data[C and $FF + 256];
+    Inc(C, B);
+    B := B shr 24 or B shl 8;
+    A := A xor Mars_Data[B shr 8 and $FF] + Mars_Data[B shr 16 and $FF + 256];
+    Inc(D, Mars_Data[B shr 24]);
+    C := C xor Mars_Data[B and $FF + 256];
+    A := A shr 24 or A shl 8;
+    D := D xor Mars_Data[A shr 8 and $FF] + Mars_Data[A shr 16 and $FF + 256];
+    Inc(C, Mars_Data[A shr 24]);
+    B := B xor Mars_Data[A and $FF + 256];
+  end;
+  for I := 0 to 3 do
+  begin
+    R := D * K^;                      Dec(K);
+    R := R shl 5 or R shr 27;
+    D := D shr 13 or D shl 19;
+    L := D + K^;                      Dec(K);
+    Dec(B, L shl R or L shr (32 - R));
+    L := Mars_Data[L and $1FF] xor R;
+    R := R shl 5 or R shr 27;
+    L := L xor R;
+    L := L shl R or L shr (32 - R);
+    if I <= 1 then
+    begin
+      Dec(C, L);
+      A := A xor R;
+    end else
+    begin
+      Dec(A, L);
+      C := C xor R;
+    end;
+    R := C * K^;                      Dec(K);
+    R := R shl 5 or R shr 27;
+    C := C shr 13 or C shl 19;
+    L := C + K^;                      Dec(K);
+    Dec(A, L shl R or L shr (32 - R));
+    L := Mars_Data[L and $1FF] xor R;
+    R := R shl 5 or R shr 27;
+    L := L xor R;
+    L := L shl R or L shr (32 - R);
+    if I <= 1 then
+    begin
+      Dec(B, L);
+      D := D xor R;
+    end else
+    begin
+      Dec(D, L);
+      B := B xor R;
+    end;
+    R := B * K^;                      Dec(K);
+    R := R shl 5 or R shr 27;
+    B := B shr 13 or B shl 19;
+    L := B + K^;                      Dec(K);
+    Dec(D, L shl R or L shr (32 - R));
+    L := Mars_Data[L and $1FF] xor R;
+    R := R shl 5 or R shr 27;
+    L := L xor R;
+    L := L shl R or L shr (32 - R);
+    if I <= 1 then
+    begin
+      Dec(A, L);
+      C := C xor R;
+    end else
+    begin
+      Dec(C, L);
+      A := A xor R;
+    end;
+    R := A * K^;                      Dec(K);
+    R := R shl 5 or R shr 27;
+    A := A shr 13 or A shl 19;
+    L := A + K^;                      Dec(K);
+    Dec(C, L shl R or L shr (32 - R));
+    L := Mars_Data[L and $1FF] xor R;
+    R := R shl 5 or R shr 27;
+    L := L xor R;
+    L := L shl R or L shr (32 - R);
+    if I <= 1 then
+    begin
+      Dec(D, L);
+      B := B xor R;
+    end else
+    begin
+      Dec(B, L);
+      D := D xor R;
+    end;
+  end;
+  for I := 0 to 1 do
+  begin
+    D := D shl 24 or D shr 8;
+    C := C xor Mars_Data[D shr 24 + 256];
+    Dec(B, Mars_Data[D shr 16 and $FF]);
+    A := A - Mars_Data[D shr 8 and $FF + 256] xor Mars_Data[D and $FF];
+    C := C shl 24 or C shr 8;
+    B := B xor Mars_Data[C shr 24 + 256];
+    Dec(A, Mars_Data[C shr 16 and $FF]);
+    D := D - Mars_Data[C shr 8 and $FF + 256] xor Mars_Data[C and $FF];
+    Dec(B, C);
+    B := B shl 24 or B shr 8;
+    A := A xor Mars_Data[B shr 24 + 256];
+    Dec(D, Mars_Data[B shr 16 and $FF]);
+    C := C - Mars_Data[B shr 8 and $FF + 256] xor Mars_Data[B and $FF];
+    Dec(A, D);
+    A := A shl 24 or A shr 8;
+    D := D xor Mars_Data[A shr 24 + 256];
+    Dec(C, Mars_Data[A shr 16 and $FF]);
+    B := B - Mars_Data[A shr 8 and $FF + 256] xor Mars_Data[A and $FF];
+  end;
+  PMarsRec(Data).D := D - K^; Dec(K);
+  PMarsRec(Data).C := C - K^; Dec(K);
+  PMarsRec(Data).B := B - K^; Dec(K);
+  PMarsRec(Data).A := A - K^;
+end;
+
+procedure TROCipher_Mars.Init(const Key; Size: Integer; IVector: Pointer);
+
+  procedure Mask(var X, M: LongWord);
+  var
+    U: LongWord;
+  begin
+    U := X and (X shr 1);
+    U := U and (U shr 2);
+    U := U and (U shr 4);
+    U := U and (U shr 1) and (U shr 2);
+    M := U;
+    U := (X xor $FFFFFFFF) and ((X xor $FFFFFFFF) shr 1);
+    U := U and (U shr 2);
+    U := U and (U shr 4);
+    U := U and (U shr 1) and (U shr 2);
+    U := U or M;
+    M := (U shl 1) or (U shl 2) or (U shl 3) or (U shl 4) or
+         (U shl 5) or (U shl 6) or (U shl 7) or (U shl 8);
+    M := (M or U or (U shl 9)) and ((X xor $FFFFFFFF) xor (X shl 1)) and ((X xor $FFFFFFFF) xor (X shr 1));
+    M := M and $FFFFFFFC;
+  end;
+
+var
+  T: array[-7..39] of LongWord;
+  I,J: Integer;
+  M,U,W: LongWord;
+  K,B: PIntArray;
+begin
+  InitBegin(Size);
+  K := User;
+  B := @Mars_Data;
+  Move(Key, K^, Size);
+  Move(Mars_Key, T, SizeOf(Mars_Key));
+  Size := Size div 4;
+  for I := 0 to 38 do
+  begin
+    U    := T[I - 7] xor T[I - 2];
+    T[I] := ROL(U, 3) xor K[I mod Size] xor LongWord(I);
+  end;
+  T[39] := Size;
+  for J := 0 to 6 do
+  begin
+    for I := 1 to 39 do
+    begin
+      U := T[I] + B[T[I - 1] and $1FF];
+      T[I] := ROL(U, 9);
+    end;
+    U := T[0] + B[T[39] and $1FF];
+    T[0] := ROL(U, 9);
+  end;
+  for I := 0 to 39 do K[(I * 7) mod 40] := T[I];
+  I := 5;
+  repeat
+    U := B[256 + (K[I] and $3)];
+    J := K[I + 3] and $1F;
+    W := K[I] or $3;
+    Mask(W, M);
+    K[I] := W xor (ROL(U, J) and M);
+    Inc(I, 2);
+  until I >= 37;
+  InitEnd(IVector);
+end;
+
+class procedure TROCipher_Misty.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  ABufSize := 8;
+  AKeySize := 16;
+  AUserSize := 128;
+end;
+
+class function TROCipher_Misty.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    064h,07Bh,0C5h,0C6h,049h,045h,0AAh,095h
+         DB    05Dh,064h,0CDh,056h,07Ch,06Ch,0B6h,047h
+         DB    081h,057h,0FEh,08Ch,0F4h,084h,019h,0BCh
+         DB    027h,060h,00Ch,0A6h,079h,085h,00Fh,0C9h
+end;
+
+function Misty_I(Value, Key: LongWord): LongWord;
+begin
+  Result := Misty_Data9[Value shr 7 and $1FF] xor (Value and $7F);
+  Value := (Misty_Data7[Value and $7F] xor Result and $7F) xor (Key shr 9 and $7F);
+  Result := Misty_Data9[Result xor (Key and $1FF)] xor Value or Value shl 9;
+end;
+
+function Misty_O(Value, K: LongWord; Key: PIntArray): LongWord;
+begin
+  Result := Misty_I((Value shr 16) xor Key[K], Key[(K + 5) and 7 + 8]) xor (Value and $FFFF);
+  Value  := Misty_I((Value and $FFFF) xor Key[(K + 2) and 7], Key[(K + 1) and 7 + 8]) xor Result;
+  Result := Misty_I(Result xor Key[(K + 7) and 7], Key[(K + 3) and 7 + 8]) xor Value;
+  Result := Result or (Value xor Key[(k+4) and 7]) shl 16;
+end;
+
+function Misty_E(Value, K: LongWord; Key: PIntArray): LongWord;
+begin
+  Result := Value shr 16;
+  Value  := Value and $FFFF;
+  if K and 1 <> 0 then
+  begin
+    K      := K shr 1;
+    Value  := Value  xor (Result and Key[(K + 2) and 7 + 8]);
+    Result := Result xor (Value  or  Key[(K + 4) and 7]);
+  end else
+  begin
+    K      := K shr 1;
+    Value  := Value  xor (Result and Key[K]);
+    Result := Result xor (Value  or  Key[(K + 6) and 7 + 8]);
+  end;
+  Result:= (Result shl 16) or Value;
+end;
+
+function Misty_D(Value, K: LongWord; Key: PIntArray): LongWord;
+begin
+  Result := Value shr 16;
+  Value  := Value and $FFFF;
+  if K and 1 <> 0 then
+  begin
+    K      := K shr 1;
+    Result := Result xor (Value  or  Key[(K + 4) and 7]);
+    Value  := Value  xor (Result and Key[(K + 2) and 7 + 8]);
+  end else
+  begin
+    K      := K shr 1;
+    Result := Result xor (Value  or  Key[(K +6) and 7 + 8]);
+    Value  := Value  xor (Result and Key[K]);
+  end;
+  Result:= (Result shl 16) or Value;
+end;
+
+procedure TROCipher_Misty.Encode(Data: Pointer);
+var
+  A,B: LongWord;
+  Key: PIntArray;
+begin
+  Key := User;
+  A := PCipherRec(Data).A;
+  B := PCipherRec(Data).B;
+  A := Misty_E(A, 0, Key);
+  B := Misty_E(B, 1, Key) xor Misty_O(A, 0, Key);
+  A := A xor Misty_O(B, 1, Key);
+  A := Misty_E(A, 2, Key);
+  B := Misty_E(B, 3, Key) xor Misty_O(A, 2, Key);
+  A := A xor Misty_O(B, 3, Key);
+  A := Misty_E(A, 4, Key);
+  B := Misty_E(B, 5, Key) xor Misty_O(A, 4, Key);
+  A := A xor Misty_O(B, 5, Key);
+  A := Misty_E(A, 6, Key);
+  B := Misty_E(B, 7, Key) xor Misty_O(A, 6, Key);
+  A := A xor Misty_O(B, 7, Key);
+  PCipherRec(Data).B := Misty_E(A, 8, Key);
+  PCipherRec(Data).A := Misty_E(B, 9, Key);
+end;
+
+procedure TROCipher_Misty.Decode(Data: Pointer);
+var
+  A,B: LongWord;
+  Key: PIntArray;
+begin
+  Key := User;
+  B := Misty_D(PCipherRec(Data).A, 9, Key);
+  A := Misty_D(PCipherRec(Data).B, 8, Key);
+  A := A xor Misty_O(B, 7, Key);
+  B := Misty_D(B xor Misty_O(A, 6, Key), 7, Key);
+  A := Misty_D(A, 6, Key);
+  A := A xor Misty_O(B, 5, Key);
+  B := Misty_D(B xor Misty_O(A, 4, Key), 5, Key);
+  A := Misty_D(A, 4, Key);
+  A := A xor Misty_O(B, 3, Key);
+  B := Misty_D(B xor Misty_O(A, 2, Key), 3, Key);
+  A := Misty_D(A, 2, Key);
+  A := A xor Misty_O(B, 1, Key);
+  PCipherRec(Data).B := Misty_D(B xor Misty_O(A, 0, Key), 1, Key);
+  PCipherRec(Data).A := Misty_D(A, 0, Key);
+end;
+
+procedure TROCipher_Misty.Init(const Key; Size: Integer; IVector: Pointer);
+var
+  K: array[0..15] of Byte;
+  D: PIntArray;
+  I: Integer;
+begin
+  InitBegin(Size);
+  FillChar(K, SizeOf(K), 0);
+  Move(Key, K, Size);
+  D := User;
+  for I := 0 to 7 do D[I] := K[I * 2] * 256 + K[I * 2 +1];
+  for I := 0 to 7 do
+  begin
+    D[I +  8] := Misty_I(D[I], D[(I + 1) and 7]);
+    D[I + 16] := D[I + 8] and $1FF;
+    D[I + 24] := D[I + 8] shr 9;
+  end;
+  FillChar(K, SizeOf(K), 0);
+  InitEnd(IVector);
+end;
+
+class procedure TROCipher_RC2.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  ABufSize := 8;
+  AKeySize := 128;
+  AUserSize := 128;
+end;
+
+class function TROCipher_RC2.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    00Eh,0C8h,0E5h,04Fh,0CCh,032h,0EAh,0BEh
+         DB    029h,064h,0EFh,0BEh,053h,014h,0EDh,0DCh
+         DB    0D7h,0ADh,0CFh,010h,047h,067h,0EEh,061h
+         DB    0D9h,073h,0F2h,013h,0FCh,031h,008h,0EAh
+end;
+
+type
+  PRC2Rec = ^TRC2Rec;
+  TRC2Rec = packed record
+              case Integer of
+               0: (X: array[0..3] of Word);
+               1: (A,B,C,D: Word);
+            end;
+
+procedure TROCipher_RC2.Encode(Data: Pointer);
+
+  function ROLADD16(Value, Add, Shift: Integer): Word; assembler;
+  asm
+      ADD  EAX,EDX
+      ROL  AX,CL
+  end;
+
+var
+  I: Integer;
+  K: PWord;
+  L: PWordArray;
+begin
+  K := User;
+  L := User;
+  with PRC2Rec(Data)^ do
+  begin
+    for I := 0 to 4 do
+    begin
+      A := ROLADD16(A, (B and not D) + (C and D) + K^, 1); Inc(K);
+      B := ROLADD16(B, (C and not A) + (D and A) + K^, 2); Inc(K);
+      C := ROLADD16(C, (D and not B) + (A and B) + K^, 3); Inc(K);
+      D := ROLADD16(D, (A and not C) + (B and C) + K^, 5); Inc(K);
+    end;
+    Inc(A, L[D and $3F]);
+    Inc(B, L[A and $3F]);
+    Inc(C, L[B and $3F]);
+    Inc(D, L[C and $3F]);
+    for I := 0 to 5 do
+    begin
+      A := ROLADD16(A, (B and not D) + (C and D) + K^, 1); Inc(K);
+      B := ROLADD16(B, (C and not A) + (D and A) + K^, 2); Inc(K);
+      C := ROLADD16(C, (D and not B) + (A and B) + K^, 3); Inc(K);
+      D := ROLADD16(D, (A and not C) + (B and C) + K^, 5); Inc(K);
+    end;
+    Inc(A, L[D and $3F]);
+    Inc(B, L[A and $3F]);
+    Inc(C, L[B and $3F]);
+    Inc(D, L[C and $3F]);
+    for I := 0 to 4 do
+    begin
+      A := ROLADD16(A, (B and not D) + (C and D) + K^, 1); Inc(K);
+      B := ROLADD16(B, (C and not A) + (D and A) + K^, 2); Inc(K);
+      C := ROLADD16(C, (D and not B) + (A and B) + K^, 3); Inc(K);
+      D := ROLADD16(D, (A and not C) + (B and C) + K^, 5); Inc(K);
+    end;
+  end;
+end;
+
+procedure TROCipher_RC2.Decode(Data: Pointer);
+
+  function RORSUB16(Value, Sub, Shift: Integer): Word; assembler;
+  asm
+      ROR  AX,CL
+      SUB  EAX,EDX
+  end;
+
+var
+  I: Integer;
+  K: PWord;
+  L: PWordArray;
+begin
+  L := User;
+  K := @L[63];
+  with PRC2Rec(Data)^ do
+  begin
+    for I := 0 to 4 do
+    begin
+      D := RORSUB16(D, (A and not C) + (B and C) + K^, 5); Dec(K);
+      C := RORSUB16(C, (D and not B) + (A and B) + K^, 3); Dec(K);
+      B := RORSUB16(B, (C and not A) + (D and A) + K^, 2); Dec(K);
+      A := RORSUB16(A, (B and not D) + (C and D) + K^, 1); Dec(K);
+    end;
+    Dec(D, L[C and $3F]);
+    Dec(C, L[B and $3F]);
+    Dec(B, L[A and $3F]);
+    Dec(A, L[D and $3F]);
+    for I := 0 to 5 do
+    begin
+      D := RORSUB16(D, (A and not C) + (B and C) + K^, 5); Dec(K);
+      C := RORSUB16(C, (D and not B) + (A and B) + K^, 3); Dec(K);
+      B := RORSUB16(B, (C and not A) + (D and A) + K^, 2); Dec(K);
+      A := RORSUB16(A, (B and not D) + (C and D) + K^, 1); Dec(K);
+    end;
+    Dec(D, L[C and $3F]);
+    Dec(C, L[B and $3F]);
+    Dec(B, L[A and $3F]);
+    Dec(A, L[D and $3F]);
+    for I := 0 to 4 do
+    begin
+      D := RORSUB16(D, (A and not C) + (B and C) + K^, 5); Dec(K);
+      C := RORSUB16(C, (D and not B) + (A and B) + K^, 3); Dec(K);
+      B := RORSUB16(B, (C and not A) + (D and A) + K^, 2); Dec(K);
+      A := RORSUB16(A, (B and not D) + (C and D) + K^, 1); Dec(K);
+    end;
+  end;
+end;
+
+procedure TROCipher_RC2.Init(const Key; Size: Integer; IVector: Pointer);
+var
+  I: Integer;
+  K: PByteArray;
+begin
+  InitBegin(Size);
+  K := User;
+  Move(Key, K^, Size);
+  for I := Size to 127 do
+    K[I] := RC2_Data[(K[I - Size] + K[I - 1]) and $FF];
+  K[0] := RC2_Data[K[0]];
+  InitEnd(IVector);
+end;
+
+const
+  RC4_BufSize = 16;
+
+class procedure TROCipher_RC4.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  ABufSize := RC4_BufSize;
+  AKeySize := 256;
+  AUserSize := 256 * 2;
+end;
+
+class function TROCipher_RC4.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    02Dh,08Fh,0EEh,042h,087h,07Bh,0AEh,072h
+         DB    0F8h,02Bh,08Ch,0A5h,012h,014h,0A8h,07Eh
+         DB    07Eh,08Ch,0DBh,05Eh,096h,049h,06Ch,09Ch
+         DB    0EEh,05Eh,020h,06Ch,07Ah,067h,002h,05Dh
+end;
+
+procedure TROCipher_RC4.Encode(Data: Pointer);
+var
+  D: PByteArray;
+  B: PByte;
+  X,S: Byte;
+begin
+  D := User;
+  B := Data;
+  for X := 0 to RC4_BufSize -1 do
+  begin
+    Inc(FI);
+    S := D[FI];
+    Inc(FJ, S);
+    D[FI] := D[FJ];
+    D[FJ] := S;
+    B^    := B^ xor D[(D[FI] + S) and $FF];
+    Inc(B);
+  end;
+end;
+
+procedure TROCipher_RC4.Decode(Data: Pointer);
+begin
+  Encode(Data);
+end;
+
+procedure TROCipher_RC4.Init(const Key; Size: Integer; IVector: Pointer);
+var
+  K: array[0..255] of Byte;
+  D: PByteArray;
+  I,J,S: Integer;
+begin
+  InitBegin(Size);
+  FI := 0;
+  FJ := 0;
+  J := 0;
+  D := User;
+  for I := 0 to 255 do
+  begin
+    D[I] := I;
+    K[I] := PByteArray(@Key)[I mod Size];
+  end;
+  for I := 0 to 255 do
+  begin
+    J := (J + D[I] + K[I]) and $FF;
+    S := D[I];
+    D[I] := D[J];
+    D[J] := S;
+  end;
+  InitEnd(IVector);
+{Save the Key}
+  Move(D[0], D[256], 256);
+  FSI := FI;
+  FSJ := FJ;
+  FillChar(K, SizeOf(K), 0);
+end;
+
+procedure TROCipher_RC4.Done;
+begin
+  inherited Done;
+  FI := FSI;
+  FJ := FSJ;
+  Move(PByteArray(User)[256], User^, 256);
+end;
+
+procedure TROCipher_RC5.SetRounds(Value: Integer);
+begin
+  if Value < 8 then Value := 8 else
+    if Value > 16 then Value := 16;
+  FRounds := Value;
+end;
+
+class procedure TROCipher_RC5.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  ABufSize := 8;
+  AKeySize := 256;
+  AUserSize := 136;
+end;
+
+class function TROCipher_RC5.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    010h,039h,02Ch,0E0h,00Bh,05Fh,009h,07Fh
+         DB    0D6h,0B1h,06Ch,00Eh,0B9h,075h,0D5h,0CCh
+         DB    0FCh,0BEh,0B5h,08Dh,041h,0ACh,054h,07Ch
+         DB    083h,030h,026h,09Dh,0ACh,0CBh,00Ah,069h
+end;
+
+procedure TROCipher_RC5.Encode(Data: Pointer);
+
+  function XORROLADD(Value, Add, Shift: Integer): Integer; assembler;
+  asm
+      XOR  EAX,ECX
+      ROL  EAX,CL
+      ADD  EAX,EDX
+  end;
+
+var
+  K: PInteger;
+  I,A,B: LongWord;
+begin
+  K := User;
+  A := PCipherRec(Data).A + K^; Inc(K);
+  B := PCipherRec(Data).B + K^; Inc(K);
+  for I := 1 to FRounds do
+  begin
+    A := XORROLADD(A, K^, B); Inc(K);
+    B := XORROLADD(B, K^, A); Inc(K); 
+  end;
+  PCipherRec(Data).A := A;
+  PCipherRec(Data).B := B;
+end;
+
+procedure TROCipher_RC5.Decode(Data: Pointer);
+
+  function RORSUBXOR(Value, Sub, Shift: Integer): Integer; assembler;
+  asm
+     SUB  EAX,EDX
+     ROR  EAX,CL
+     XOR  EAX,ECX
+  end;
+
+var
+  I,A,B: LongWord;
+  K: PInteger;
+begin
+  K := @PIntArray(User)[FRounds shl 1 +1];
+  A := PCipherRec(Data).A;
+  B := PCipherRec(Data).B;
+  for I := 1 to FRounds do
+  begin
+    B := RORSUBXOR(B, K^, A); Dec(K);
+    A := RORSUBXOR(A, K^, B); Dec(K);
+  end;
+  PCipherRec(Data).B := B - K^; Dec(K);
+  PCipherRec(Data).A := A - K^;
+end;
+
+procedure TROCipher_RC5.Init(const Key; Size: Integer; IVector: Pointer);
+var
+  K: array[0..63] of LongWord;
+  D: PIntArray;
+  I,J,L,A,B,Z: LongWord;
+begin
+  InitBegin(Size);
+  if (FRounds < 8) or (FRounds > 16) then FRounds := 12;
+  D := User;
+  FillChar(K, SizeOf(K), 0);
+  Move(Key, K, Size);
+  L := Size shr 2;
+  if Size and 3 <> 0 then Inc(L);
+  J := $B7E15163;
+  for I := 0 to (FRounds + 1) * 2 do
+  begin
+    D[I] := J;
+    Inc(J, $9E3779B9);
+  end;
+  if L > LongWord(FRounds + 1) * 2 then Z := L * 3 else Z := (FRounds + 1) * 6;
+  I := 0;
+  J := 0;
+  A := 0;
+  B := 0;
+  for Z := Z downto 1 do
+  begin
+    A := ROL(D[I] + A + B, 3);
+    D[I] := A;
+    B := ROL(K[J] + A + B, A + B);
+    K[J] := B;
+    I := (I + 1) mod (LongWord(FRounds + 1) * 2);
+    J := (J + 1) mod L;
+  end;
+  FillChar(K, SizeOf(K), 0);
+  InitEnd(IVector);
+end;
+
+procedure TROCipher_RC6.SetRounds(Value: Integer);
+begin
+  if Value < 16 then Value := 16 else
+    if Value > 24 then Value := 24;
+  FRounds := Value;
+end;
+
+class procedure TROCipher_RC6.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  ABufSize := 16;
+  AKeySize := 256;
+  AUserSize := 272;
+end;
+
+class function TROCipher_RC6.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    098h,071h,065h,0A1h,010h,0FEh,0BDh,0F9h
+         DB    007h,085h,03Eh,0FCh,021h,0DBh,0FCh,0A1h
+         DB    08Fh,05Fh,08Bh,0F7h,045h,028h,081h,00Dh
+         DB    0EFh,09Ah,022h,07Ah,0F0h,062h,02Ch,0C6h
+end;
+
+type
+  PRC6Rec = ^TRC6Rec;
+  TRC6Rec = packed record
+              case Integer of
+                0: (X: array[0..3] of LongWord);
+                1: (A,B,C,D: LongWord);
+            end;
+
+function MULROL(Value: Integer): Integer; assembler;
+asm
+      MOV  EDX,EAX
+      SHL  EDX,1
+      INC  EDX
+      IMUL EAX,EDX
+      ROL  EAX,5
+end;
+
+procedure TROCipher_RC6.Encode(Data: Pointer);
+var
+  K: PInteger;
+  I,T,U: LongWord;
+begin
+  K := User;
+  with PRC6Rec(Data)^ do
+  begin
+    Inc(B, K^); Inc(K);
+    Inc(D, K^); Inc(K);
+    for I := 1 to FRounds do
+    begin
+      T := MULROL(B);
+      U := MULROL(D);
+      A := ROLADD(A xor T, K^, U); Inc(K);
+      C := ROLADD(C xor U, K^, T); Inc(K);
+
+      T := A; A := B; B := C; C := D; D := T;
+    end;
+    Inc(A, K^); Inc(K);
+    Inc(C, K^);
+  end;
+end;
+
+procedure TROCipher_RC6.Decode(Data: Pointer);
+var
+  I,U,T: LongWord;
+  K: PInteger;
+begin
+  K := @PIntArray(User)[FRounds * 2 +3];
+  with PRC6Rec(Data)^ do
+  begin
+    Dec(C, K^); Dec(K);
+    Dec(A, K^); Dec(K);
+    for I := 1 to FRounds do
+    begin
+      T := A; A := D; D := C; C := B; B := T;
+
+      U := MULROL(D);
+      T := MULROL(B);
+      C := ROR(C - K^, T) xor U;      Dec(K);
+      A := ROR(A - K^, U) xor T;      Dec(K);
+    end;
+    Dec(D, K^); Dec(K);
+    Dec(B, K^);
+  end;
+end;
+
+procedure TROCipher_RC6.Init(const Key; Size: Integer; IVector: Pointer);
+var
+  K: array[0..63] of LongWord;
+  D: PIntArray;
+  I,J,L,A,B,Z: LongWord;
+begin
+  InitBegin(Size);
+  if (FRounds < 16) or (FRounds > 24) then FRounds := 20;
+  D := User;
+  FillChar(K, SizeOf(K), 0);
+  Move(Key, K, Size);
+  L := Size shr 2;
+  if Size and 3 <> 0 then Inc(L);
+  J := $B7E15163;
+  for I := 0 to (FRounds + 2) * 2 do
+  begin
+    D[I] := J;
+    Inc(J, $9E3779B9);
+  end;
+  if L > LongWord(FRounds + 2) * 2 then Z := L * 3 else Z := (FRounds + 2) * 6;
+  I := 0;
+  J := 0;
+  A := 0;
+  B := 0;
+  for Z := Z downto 1 do
+  begin
+    A := ROL(D[I] + A + B, 3);
+    D[I] := A;
+    B := ROL(K[J] + A + B, A + B);
+    K[J] := B;
+    I := (I + 1) mod (LongWord(FRounds + 2) * 2);
+    J := (J + 1) mod L;
+  end;
+  FillChar(K, SizeOf(K), 0);
+  InitEnd(IVector);
+end;
+
+const
+  FROG_BufSize =  32;  {change this to 8,16,32,64,128}
+  FROG_Rounds  =   8;
+
+class procedure TROCipher_FROG.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  ABufSize := FROG_BufSize;
+  AKeySize := 125;
+  AUserSize := (FROG_BufSize * 2 + 256) * FROG_Rounds * 2;
+end;
+
+class function TROCipher_FROG.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    022h,02Dh,006h,067h,016h,031h,09Ch,0C8h
+         DB    0A5h,056h,04Bh,04Ch,0F7h,069h,0B0h,07Ah
+         DB    0D5h,01Fh,09Fh,0B8h,0D0h,00Eh,0EDh,0D1h
+         DB    070h,050h,09Bh,0C8h,00Bh,035h,028h,04Ah
+end;
+
+procedure TROCipher_FROG.Encode(Data: Pointer);
+var
+  D,U: PByteArray;
+  I,J,A: Integer;
+  X,Y: PByte;
+begin
+  D := Data;
+  U := User;
+  for I := 1 to FROG_Rounds do
+  begin
+    X := Pointer(U);
+    Inc(PChar(U), BufSize);
+    Y := Pointer(PChar(U) + 256);
+    for J := 0 to BufSize-2 do
+    begin
+      A        := D[J];          {holds in A, Compiler make faster Code}
+      A        := U[A xor X^];
+      Inc(X);
+      D[J + 1] := D[J + 1] xor A;
+      D[Y^]    := D[Y^] xor A;
+      Inc(Y);
+      D[J]     := A;
+    end;
+    J     := BufSize-1;
+    A     := D[J];
+    A     := U[A xor X^];
+    D[0]  := D[0] xor A;
+    D[Y^] := D[Y^] xor A;
+    D[J]  := A;
+    Inc(PChar(U), BufSize + 256);
+  end;
+end;
+
+procedure TROCipher_FROG.Decode(Data: Pointer);
+var
+  D,U: PByteArray;
+  I,J,A: Integer;
+  X,Y: PByte;
+begin
+  D := Data;
+  U := User;
+  Inc(PChar(U), UserSize);
+  for I := 1 to FROG_Rounds do
+  begin
+    Y := Pointer(U);
+    Dec(PChar(U), BufSize + 256);
+    X := Pointer(U);
+    J := BufSize -1;
+    Dec(Y);
+    A     := D[J];          {holds in A, Compiler make faster Code}
+    D[Y^] := D[Y^] xor A;
+    D[0]  := D[0] xor A;
+    Dec(X);
+    D[J]  := U[A] xor X^;
+    repeat
+      Dec(J);
+      Dec(Y);
+      A       := D[J];
+      D[Y^]   := D[Y^] xor A;
+      D[J +1] := D[J +1] xor A;
+      Dec(X);
+      D[J]    := U[A] xor X^;
+    until J = 0;
+    Dec(PChar(U), BufSize);
+  end;
+end;
+
+procedure TROCipher_FROG.Init(const Key; Size: Integer; IVector: Pointer);
+
+  procedure MakeKey(D: PByteArray; Invert: Boolean);
+
+    procedure InvertPermutation(D: PByteArray);
+    var
+      Inv: array[0..255] of Byte;
+      I: Integer;
+    begin
+      for I := 0 to 255 do Inv[D[I]] := I;
+      Move(Inv, D^, 256);
+    end;
+
+    procedure MakePermutation(D: PByteArray; Size: Integer);
+    var
+      Use: array[0..255] of Byte;
+      I,J,Last: Integer;
+    begin
+      for I := 0 to 255 do Use[I] := I;
+      Last := Size-1;
+      J := 0;
+      for I := 0 to Size-2 do
+      begin
+        J := (J + D[I]) mod (Last + 1);
+        D[I] := Use[J];
+        if J < Last then Move(Use[J + 1], Use[J], Last - J);
+        Dec(Last);
+        if J > Last then J := 0;
+      end;
+      D[Size-1] := Use[0];
+    end;
+
+  var
+    Used: array[0..127] of Boolean;
+    X,J,I,K,L: Integer;
+    P: PByteArray;
+  begin
+    P := D;
+    for X := 1 to FROG_Rounds do
+    begin
+      Inc(PChar(P), BufSize);
+      MakePermutation(P, 256);
+      if Invert then InvertPermutation(P);
+      Inc(PChar(P), 256);
+      MakePermutation(P, BufSize);
+      FillChar(Used, BufSize, False);
+      J := 0;
+      for I := 0 to BufSize -2 do
+      begin
+        if P[J] = 0 then
+        begin
+          K := J;
+          repeat
+            K := (K + 1) mod BufSize;
+          until not Used[K];
+          P[J] := K;
+          L := K;
+          while P[L] <> K do L := P[L];
+          P[L] := 0;
+        end;
+        Used[J] := True;
+        J := P[J];
+      end;
+      for I := 0 to BufSize - 1 do
+        if P[I] = (I + 1) mod BufSize then
+          P[I] := (I + 2) mod BufSize;
+      Inc(PChar(P), BufSize);
+    end;
+  end;
+
+  procedure HashKey(D: PByteArray);
+  var
+    I,J,K: Integer;
+    P: PByte;
+  begin
+    J := 0;
+    K := 0;
+    P := User;
+    for I := 0 to UserSize div 2 -1 do
+    begin
+      P^ := FROG_Data[J] xor TByteArray(Key)[K];
+      Inc(P);
+      if J < 250 then Inc(J) else J := 0;
+      if K < Size-1 then Inc(K) else K := 0;
+    end;
+    MakeKey(PByteArray(User), False);
+    I := Size;
+    if I > BufSize then I := BufSize;
+    XORBuffers(Buffer, @Key, I, Buffer);
+    PByte(Buffer)^ := PByte(Buffer)^ xor Size;
+    I := UserSize div 2;
+    P := Pointer(D);
+    while I > 0 do
+    begin
+      Encode(Buffer);
+      J := I;
+      if J > BufSize then J := BufSize;
+      Move(Buffer^, P^, J);
+      Inc(P, J);
+      Dec(I, J);
+    end;
+  end;
+
+var
+  UKey: PByteArray;
+begin
+  InitBegin(Size);
+  UKey := AllocMem(UserSize shr 1);
+  try
+    HashKey(UKey);
+    Protect;
+    Move(UKey^, User^, UserSize shr 1);
+    MakeKey(User, False);    {encyption Key}
+    MakeKey(UKey, True);     {decryption Key}
+    Move(UKey^, PByteArray(User)[UserSize shr 1], UserSize shr 1);
+    InitEnd(IVector);
+  finally
+    ReallocMem(UKey, 0);
+  end;
+end;
+
+const
+{don't change this}
+  Rijndael_Blocks =  4;
+  Rijndael_Rounds = 14;
+
+class procedure TROCipher_Rijndael.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  ABufSize := Rijndael_Blocks * 4;
+  AKeySize := 32;
+  AUserSize := (Rijndael_Rounds + 1) * Rijndael_Blocks * SizeOf(Integer) * 2;
+end;
+
+class function TROCipher_Rijndael.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    094h,06Dh,02Bh,05Eh,0E0h,0ADh,01Bh,05Ch
+         DB    0A5h,023h,0A5h,013h,095h,08Bh,03Dh,02Dh
+         DB    093h,087h,0F3h,037h,045h,051h,0F6h,058h
+         DB    09Bh,0E7h,090h,01Bh,036h,087h,0F9h,0A9h
+end;
+
+procedure TROCipher_Rijndael.Encode(Data: Pointer);
+var
+  P,K: PInteger;
+  I,A,B,C,D: Integer;
+begin
+  P := User;
+  K := Data;
+  for I := 2 to FRounds do
+  begin
+    A := K^ xor P^;                             Inc(P); Inc(K);
+    B := K^ xor P^;                             Inc(P); Inc(K);
+    C := K^ xor P^;                             Inc(P); Inc(K);
+    D := K^ xor P^;                             Inc(P);
+
+    K^ := Rijndael_T[0, D and $FF]        xor
+          Rijndael_T[1, A shr  8 and $FF] xor
+          Rijndael_T[2, B shr 16 and $FF] xor
+          Rijndael_T[3, C shr 24];                      Dec(K);
+    K^ := Rijndael_T[0, C and $FF]        xor
+          Rijndael_T[1, D shr  8 and $FF] xor
+          Rijndael_T[2, A shr 16 and $FF] xor
+          Rijndael_T[3, B shr 24];                      Dec(K);
+    K^ := Rijndael_T[0, B and $FF]        xor
+          Rijndael_T[1, C shr  8 and $FF] xor
+          Rijndael_T[2, D shr 16 and $FF] xor
+          Rijndael_T[3, A shr 24];                      Dec(K);
+    K^ := Rijndael_T[0, A and $FF]        xor
+          Rijndael_T[1, B shr  8 and $FF] xor
+          Rijndael_T[2, C shr 16 and $FF] xor
+          Rijndael_T[3, D shr 24];
+  end;
+
+  A := K^ xor P^;                                       Inc(P); Inc(K);
+  B := K^ xor P^;                                       Inc(P); Inc(K);
+  C := K^ xor P^;                                       Inc(P); Inc(K);
+  D := K^ xor P^;                                       Inc(P);
+
+  K^ := Rijndael_S[0, D and $FF]               or
+        Rijndael_S[0, A shr  8 and $FF] shl  8 or
+        Rijndael_S[0, B shr 16 and $FF] shl 16 or
+        Rijndael_S[0, C shr 24]         shl 24;                 Dec(K);
+  K^ := Rijndael_S[0, C and $FF]               or
+        Rijndael_S[0, D shr  8 and $FF] shl  8 or
+        Rijndael_S[0, A shr 16 and $FF] shl 16 or
+        Rijndael_S[0, B shr 24]         shl 24;                 Dec(K);
+  K^ := Rijndael_S[0, B and $FF]               or
+        Rijndael_S[0, C shr  8 and $FF] shl  8 or
+        Rijndael_S[0, D shr 16 and $FF] shl 16 or
+        Rijndael_S[0, A shr 24]         shl 24;                 Dec(K);
+  K^ := Rijndael_S[0, A and $FF]               or
+        Rijndael_S[0, B shr  8 and $FF] shl  8 or
+        Rijndael_S[0, C shr 16 and $FF] shl 16 or
+        Rijndael_S[0, D shr 24]         shl 24;
+
+  for I := 1 to Rijndael_Blocks do
+  begin
+    K^ := K^ xor P^;
+    Inc(P);
+    Inc(K);
+  end;
+end;
+
+procedure TROCipher_Rijndael.Decode(Data: Pointer);
+var
+  P,K: PInteger;
+  I,A,B,C,D: Integer;
+begin
+  P := Pointer(PChar(User) + UserSize shr 1);
+  Inc(P, FRounds * 4 +3);
+  K := Pointer(PChar(Data) + 12);
+  for I := 2 to FRounds do
+  begin
+    D := K^ xor P^;                             Dec(P); Dec(K);
+    C := K^ xor P^;                             Dec(P); Dec(K);
+    B := K^ xor P^;                             Dec(P); Dec(K);
+    A := K^ xor P^;                             Dec(P);
+
+    K^ := Rijndael_T[4, A and $FF]        xor
+          Rijndael_T[5, D shr  8 and $FF] xor
+          Rijndael_T[6, C shr 16 and $FF] xor
+          Rijndael_T[7, B shr 24];                      Inc(K);
+    K^ := Rijndael_T[4, B and $FF]        xor
+          Rijndael_T[5, A shr  8 and $FF] xor
+          Rijndael_T[6, D shr 16 and $FF] xor
+          Rijndael_T[7, C shr 24];                      Inc(K);
+    K^ := Rijndael_T[4, C and $FF]        xor
+          Rijndael_T[5, B shr  8 and $FF] xor
+          Rijndael_T[6, A shr 16 and $FF] xor
+          Rijndael_T[7, D shr 24];                      Inc(K);
+    K^ := Rijndael_T[4, D and $FF]        xor
+          Rijndael_T[5, C shr  8 and $FF] xor
+          Rijndael_T[6, B shr 16 and $FF] xor
+          Rijndael_T[7, A shr 24];
+  end;
+
+  D := K^ xor P^;                                       Dec(P); Dec(K);
+  C := K^ xor P^;                                       Dec(P); Dec(K);
+  B := K^ xor P^;                                       Dec(P); Dec(K);
+  A := K^ xor P^;                                       Dec(P);
+
+  K^ := Rijndael_S[1, A and $FF]               or
+        Rijndael_S[1, D shr  8 and $FF] shl  8 or
+        Rijndael_S[1, C shr 16 and $FF] shl 16 or
+        Rijndael_S[1, B shr 24]         shl 24;                 Inc(K);
+  K^ := Rijndael_S[1, B and $FF]               or
+        Rijndael_S[1, A shr  8 and $FF] shl  8 or
+        Rijndael_S[1, D shr 16 and $FF] shl 16 or
+        Rijndael_S[1, C shr 24]         shl 24;                 Inc(K);
+  K^ := Rijndael_S[1, C and $FF]               or
+        Rijndael_S[1, B shr  8 and $FF] shl  8 or
+        Rijndael_S[1, A shr 16 and $FF] shl 16 or
+        Rijndael_S[1, D shr 24]         shl 24;                 Inc(K);
+  K^ := Rijndael_S[1, D and $FF]               or
+        Rijndael_S[1, C shr  8 and $FF] shl  8 or
+        Rijndael_S[1, B shr 16 and $FF] shl 16 or
+        Rijndael_S[1, A shr 24]         shl 24;
+
+  for I := 0 to 3 do
+  begin
+    K^ := K^ xor P^;
+    Dec(P);
+    Dec(K);
+  end;
+end;
+
+procedure TROCipher_Rijndael.Init(const Key; Size: Integer; IVector: Pointer);
+var
+  K: array[0..7] of Integer;
+
+  procedure BuildEncodeKey;
+  const
+    RND_Data: array[0..29] of Byte = (
+      $01,$02,$04,$08,$10,$20,$40,$80,$1B,$36,$6C,$D8,$AB,$4D,$9A,
+      $2F,$5E,$BC,$63,$C6,$97,$35,$6A,$D4,$B3,$7D,$FA,$EF,$C5,$91);
+  var
+    T,R: Integer;
+
+    procedure NextRounds;
+    var
+      J: Integer;
+    begin
+      J := 0;
+      while (J < FRounds-6) and (R <= FRounds) do
+      begin
+        while (J < FRounds-6) and (T < Rijndael_Blocks) do
+        begin
+          PIntArray(User)[R * Rijndael_Blocks + T] := K[J];
+          Inc(J);
+          Inc(T);
+        end;
+        if T = Rijndael_Blocks then
+        begin
+          T := 0;
+          Inc(R);
+        end;
+      end;
+    end;
+
+  var
+    RND: PByte;
+    B: PByte;
+    I: Integer;
+  begin
+    R := 0;
+    T := 0;
+    RND := @RND_Data;
+    NextRounds;
+    while R <= FRounds do
+    begin
+      B  := @K;
+      B^ := B^ xor Rijndael_S[0, K[FRounds -7] shr  8 and $FF] xor RND^; Inc(B);
+      B^ := B^ xor Rijndael_S[0, K[FRounds -7] shr 16 and $FF];          Inc(B);
+      B^ := B^ xor Rijndael_S[0, K[FRounds -7] shr 24];                  Inc(B);
+      B^ := B^ xor Rijndael_S[0, K[FRounds -7] and $FF];
+      Inc(RND);
+      if FRounds = 14 then
+      begin
+        for I := 1 to 7 do K[I] := K[I] xor K[I -1];
+        B  := @K[4];
+        B^ := B^ xor Rijndael_S[0, K[3] and $FF];         Inc(B);
+        B^ := B^ xor Rijndael_S[0, K[3] shr  8 and $FF];  Inc(B);
+        B^ := B^ xor Rijndael_S[0, K[3] shr 16 and $FF];  Inc(B);
+        B^ := B^ xor Rijndael_S[0, K[3] shr 24];
+        for I := 5 to 7 do K[I] := K[I] xor K[I -1];
+      end else
+        for I := 1 to FRounds -7 do K[I] := K[I] xor K[I -1];
+      NextRounds;
+    end;
+  end;
+
+  procedure BuildDecodeKey;
+  var
+    I: Integer;
+    D: PInteger;
+  begin
+    D := Pointer(PChar(User) + UserSize shr 1);
+    Move(User^, D^, UserSize shr 1);
+    Inc(D, 4);
+    for I := 0 to FRounds * 4 - 5 do
+    begin
+      D^ :=     Rijndael_Key[D^ and $FF] xor
+            ROL(Rijndael_Key[D^ shr  8 and $FF],  8) xor
+            ROL(Rijndael_Key[D^ shr 16 and $FF], 16) xor
+            ROL(Rijndael_Key[D^ shr 24],         24);
+      Inc(D);
+    end;
+  end;
+
+begin
+  InitBegin(Size);
+  if Size <= 16 then FRounds := 10 else
+    if Size <= 24 then FRounds := 12 else FRounds := 14;
+  FillChar(K, SizeOf(K), 0);
+  Move(Key, K, Size);
+  BuildEncodeKey;
+  BuildDecodeKey;
+  FillChar(K, SizeOf(K), 0);
+  InitEnd(IVector);
+end;
+{$IFDEF VER_D3H}
+type
+  PSkipjackTab = ^TSkipjackTab;
+  TSkipjackTab = array[0..255] of Byte;
+
+class procedure TROCipher_Skipjack.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  ABufSize := 8;
+  AKeySize := 10;
+  AUserSize := $A00;
+end;
+
+class function TROCipher_Skipjack.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    0D5h,013h,0A6h,092h,0ECh,024h,035h,0E8h
+         DB    017h,04Eh,02Bh,055h,05Eh,08Dh,027h,0DAh
+         DB    0C9h,09Ah,0A9h,0B9h,021h,03Dh,0A0h,001h
+         DB    018h,002h,0B3h,00Eh,0B7h,0B5h,051h,0EAh
+end;
+
+procedure TROCipher_Skipjack.Encode(Data: Pointer);
+var
+  Tab,Min: PSkipjackTab;
+  Max: PChar;
+  K,T,A,B,C,D: Integer;
+begin
+  Min := User;
+  Max := PChar(Min) + 9 * 256;
+  Tab := Min;
+  A   := Swap(PWordArray(Data)[0]); {holds as Integer, Compiler make faster Code}
+  B   := Swap(PWordArray(Data)[1]);
+  C   := Swap(PWordArray(Data)[2]);
+  D   := Swap(PWordArray(Data)[3]);
+  K   := 0;
+  repeat
+    Inc(K);
+    T := A;
+    T := T xor Tab[T and $FF] shl 8;   Inc(Tab); if Tab > Max then Tab := Min;
+    T := T xor Tab[T shr 8];           Inc(Tab); if Tab > Max then Tab := Min;
+    T := T xor Tab[T and $FF] shl 8;   Inc(Tab); if Tab > Max then Tab := Min;
+    T := T xor Tab[T shr 8];           Inc(Tab); if Tab > Max then Tab := Min;
+    A := T xor D xor K;
+    D := C;
+    C := B;
+    B := T;
+  until K = 8;
+  repeat
+    Inc(K);
+    T := A;
+    A := D;
+    D := C;
+    C := T xor B xor K;
+    T := T xor Tab[T and $FF] shl 8;   Inc(Tab); if Tab > Max then Tab := Min;
+    T := T xor Tab[T shr 8];           Inc(Tab); if Tab > Max then Tab := Min;
+    T := T xor Tab[T and $FF] shl 8;   Inc(Tab); if Tab > Max then Tab := Min;
+    T := T xor Tab[T shr 8];           Inc(Tab); if Tab > Max then Tab := Min;
+    B := T;
+  until K = 16;
+  repeat
+    Inc(K);
+    T := A;
+    T := T xor Tab[T and $FF] shl 8;   Inc(Tab); if Tab > Max then Tab := Min;
+    T := T xor Tab[T shr 8];           Inc(Tab); if Tab > Max then Tab := Min;
+    T := T xor Tab[T and $FF] shl 8;   Inc(Tab); if Tab > Max then Tab := Min;
+    T := T xor Tab[T shr 8];           Inc(Tab); if Tab > Max then Tab := Min;
+    A := T xor D xor K;
+    D := C;
+    C := B;
+    B := T;
+  until K = 24;
+  repeat
+    Inc(K);
+    T := A;
+    A := D;
+    D := C;
+    C := T xor B xor K;
+    T := T xor Tab[T and $FF] shl 8;   Inc(Tab); if Tab > Max then Tab := Min;
+    T := T xor Tab[T shr 8];           Inc(Tab); if Tab > Max then Tab := Min;
+    T := T xor Tab[T and $FF] shl 8;   Inc(Tab); if Tab > Max then Tab := Min;
+    T := T xor Tab[T shr 8];           Inc(Tab); if Tab > Max then Tab := Min;
+    B := T;
+  until K = 32;
+  PWordArray(Data)[0] := Swap(A);
+  PWordArray(Data)[1] := Swap(B);
+  PWordArray(Data)[2] := Swap(C);
+  PWordArray(Data)[3] := Swap(D);
+end;
+
+procedure TROCipher_Skipjack.Decode(Data: Pointer);
+var
+  Tab,Max: PSkipjackTab;
+  Min: PChar;
+  K,T,A,B,C,D: Integer;
+begin
+  Min := User;
+  Max := Pointer(Min + 9 * 256);
+  Tab := Pointer(Min + 7 * 256);
+  A   := Swap(PWordArray(Data)[0]); {holds as Integer, Compiler make faster Code}
+  B   := Swap(PWordArray(Data)[1]);
+  C   := Swap(PWordArray(Data)[2]);
+  D   := Swap(PWordArray(Data)[3]);
+  K   := 32;
+  repeat
+    T := B;
+    T := T xor Tab[T shr 8];           Dec(Tab); if Tab < Min then Tab := Max;
+    T := T xor Tab[T and $FF] shl 8;   Dec(Tab); if Tab < Min then Tab := Max;
+    T := T xor Tab[T shr 8];           Dec(Tab); if Tab < Min then Tab := Max;
+    T := T xor Tab[T and $FF] shl 8;   Dec(Tab); if Tab < Min then Tab := Max;
+    B := T xor C xor K;
+    C := D;
+    D := A;
+    A := T;
+    Dec(K);
+  until K = 24;
+  repeat
+    T := B;
+    B := C;
+    C := D;
+    D := T xor A xor K;
+    T := T xor Tab[T shr 8];           Dec(Tab); if Tab < Min then Tab := Max;
+    T := T xor Tab[T and $FF] shl 8;   Dec(Tab); if Tab < Min then Tab := Max;
+    T := T xor Tab[T shr 8];           Dec(Tab); if Tab < Min then Tab := Max;
+    T := T xor Tab[T and $FF] shl 8;   Dec(Tab); if Tab < Min then Tab := Max;
+    A := T;
+    Dec(K);
+  until K = 16;
+  repeat
+    T := B;
+    T := T xor Tab[T shr 8];           Dec(Tab); if Tab < Min then Tab := Max;
+    T := T xor Tab[T and $FF] shl 8;   Dec(Tab); if Tab < Min then Tab := Max;
+    T := T xor Tab[T shr 8];           Dec(Tab); if Tab < Min then Tab := Max;
+    T := T xor Tab[T and $FF] shl 8;   Dec(Tab); if Tab < Min then Tab := Max;
+    B := C xor T xor K;
+    C := D;
+    D := A;
+    A := T;
+    Dec(K);
+  until K = 8;
+  repeat
+    T := B;
+    B := C;
+    C := D;
+    D := T xor A xor K;
+    T := T xor Tab[T shr 8];           Dec(Tab); if Tab < Min then Tab := Max;
+    T := T xor Tab[T and $FF] shl 8;   Dec(Tab); if Tab < Min then Tab := Max;
+    T := T xor Tab[T shr 8];           Dec(Tab); if Tab < Min then Tab := Max;
+    T := T xor Tab[T and $FF] shl 8;   Dec(Tab); if Tab < Min then Tab := Max;
+    A := T;
+    Dec(K);
+  until K = 0;
+  PWordArray(Data)[0] := Swap(A);
+  PWordArray(Data)[1] := Swap(B);
+  PWordArray(Data)[2] := Swap(C);
+  PWordArray(Data)[3] := Swap(D);
+end;
+
+procedure TROCipher_Skipjack.Init(const Key; Size: Integer; IVector: Pointer);
+var
+  K: array[0..9] of Byte;
+  D: PByte;
+  I,J: Integer;
+begin
+  InitBegin(Size);
+  FillChar(K, SizeOf(K), 0);
+  Move(Key, K, Size);
+  D := User;
+  for I := 0 to 9 do
+    for J := 0 to 255 do
+    begin
+      D^ := Skipjack_Data[J xor K[I]];
+      Inc(D);
+    end;
+  InitEnd(IVector);
+end;
+{$ENDIF}
+{DES}
+procedure DES_Func(Data: PIntArray; Key: PInteger); register;
+var
+  L,R,X,Y,I: LongWord;
+begin
+  L := SwapInteger(Data[0]);
+  R := SwapInteger(Data[1]);
+
+  X := (L shr  4 xor R) and $0F0F0F0F; R := R xor X; L := L xor X shl  4;
+  X := (L shr 16 xor R) and $0000FFFF; R := R xor X; L := L xor X shl 16;
+  X := (R shr  2 xor L) and $33333333; L := L xor X; R := R xor X shl  2;
+  X := (R shr  8 xor L) and $00FF00FF; L := L xor X; R := R xor X shl  8;
+
+  R := R shl 1 or R shr 31;
+  X := (L xor R) and $AAAAAAAA;
+  R := R xor X;
+  L := L xor X;
+  L := L shl 1 or L shr 31;
+
+  for I := 0 to 7 do
+  begin
+    X := (R shl 28 or R shr 4) xor Key^; Inc(Key);
+    Y := R xor Key^;                     Inc(Key);
+    L := L xor (DES_Data[0, X        and $3F] or DES_Data[1, X shr  8 and $3F] or
+                DES_Data[2, X shr 16 and $3F] or DES_Data[3, X shr 24 and $3F] or
+                DES_Data[4, Y        and $3F] or DES_Data[5, Y shr  8 and $3F] or
+                DES_Data[6, Y shr 16 and $3F] or DES_Data[7, Y shr 24 and $3F]);
+
+    X := (L shl 28 or L shr 4) xor Key^; Inc(Key);
+    Y := L xor Key^;                     Inc(Key);
+    R := R xor (DES_Data[0, X        and $3F] or DES_Data[1, X shr  8 and $3F] or
+                DES_Data[2, X shr 16 and $3F] or DES_Data[3, X shr 24 and $3F] or
+                DES_Data[4, Y        and $3F] or DES_Data[5, Y shr  8 and $3F] or
+                DES_Data[6, Y shr 16 and $3F] or DES_Data[7, Y shr 24 and $3F]);
+  end;
+
+  R := R shl 31 or R shr 1;
+  X := (L xor R) and $AAAAAAAA;
+  R := R xor X;
+  L := L xor X;
+  L := L shl 31 or L shr 1;
+
+  X := (L shr  8 xor R) and $00FF00FF; R := R xor X; L := L xor X shl  8;
+  X := (L shr  2 xor R) and $33333333; R := R xor X; L := L xor X shl  2;
+  X := (R shr 16 xor L) and $0000FFFF; L := L xor X; R := R xor X shl 16;
+  X := (R shr  4 xor L) and $0F0F0F0F; L := L xor X; R := R xor X shl  4;
+
+  Data[0] := SwapInteger(R);
+  Data[1] := SwapInteger(L);
+end;
+
+class procedure TROCipher_1DES.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  ABufSize := 8;
+  AKeySize := 8;
+  AUserSize := 32 * 4 * 2;
+end;
+
+class function TROCipher_1DES.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    0ADh,069h,042h,0BBh,0F6h,068h,020h,04Dh
+         DB    053h,0CDh,0C7h,062h,013h,093h,098h,0C0h
+         DB    030h,00Dh,085h,00Bh,0E2h,0AAh,072h,009h
+         DB    06Fh,0DBh,05Fh,08Eh,0D3h,0E4h,0CFh,08Ah
+end;
+
+procedure TROCipher_1DES.Encode(Data: Pointer);
+begin
+  DES_Func(Data, User);
+end;
+
+procedure TROCipher_1DES.Decode(Data: Pointer);
+begin
+  DES_Func(Data, @PIntArray(User)[32]);
+end;
+
+procedure TROCipher_1DES.MakeKey(const Data: array of Byte; Key: PInteger; Reverse: Boolean);
+const
+  ROT: array[0..15] of Byte = (1,2,4,6,8,10,12,14,15,17,19,21,23,25,27,28);
+var
+  I,J,L,M,N: LongWord;
+  PC_M, PC_R: array[0..55] of Byte;
+  K: array[0..31] of LongWord;
+begin
+  FillChar(K, SizeOf(K), 0);
+  for I := 0 to 55 do
+    if Data[DES_PC1[I] shr 3] and ($80 shr (DES_PC1[I] and $07)) <> 0 then PC_M[I] := 1
+      else PC_M[I] := 0;
+  for I := 0 to 15 do
+  begin
+    if Reverse then M := (15 - I) shl 1 else M := I shl 1;
+    N := M + 1;
+    for J := 0 to 27 do
+    begin
+      L := J + ROT[I];
+      if L < 28 then PC_R[J] := PC_M[L] else PC_R[J] := PC_M[L - 28];
+    end;
+    for J := 28 to 55 do
+    begin
+      L := J + ROT[I];
+      if L < 56 then PC_R[J] := PC_M[L] else PC_R[J] := PC_M[L - 28];
+    end;
+    L := $1000000;
+    for J := 0 to 23 do
+    begin
+      L := L shr 1;
+      if PC_R[DES_PC2[J     ]] <> 0 then K[M] := K[M] or L;
+      if PC_R[DES_PC2[J + 24]] <> 0 then K[N] := K[N] or L;
+    end;
+  end;
+  for I := 0 to 15 do
+  begin
+    M := I shl 1; N := M + 1;
+    Key^ := K[M] and $00FC0000 shl  6 or
+            K[M] and $00000FC0 shl 10 or
+            K[N] and $00FC0000 shr 10 or
+            K[N] and $00000FC0 shr  6;
+    Inc(Key);
+    Key^ := K[M] and $0003F000 shl 12 or
+            K[M] and $0000003F shl 16 or
+            K[N] and $0003F000 shr  4 or
+            K[N] and $0000003F;
+    Inc(Key);
+  end;
+end;
+
+procedure TROCipher_1DES.Init(const Key; Size: Integer; IVector: Pointer);
+var
+  K: array[0..7] of Byte;
+begin
+  InitBegin(Size);
+  FillChar(K, SizeOf(K), 0);
+  Move(Key, K, Size);
+  MakeKey(K, User, False);
+  MakeKey(K, @PIntArray(User)[32], True);
+  FillChar(K, SizeOf(K), 0);
+  InitEnd(IVector);
+end;
+
+class procedure TROCipher_2DES.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  ABufSize := 8;
+  AKeySize := 16;
+  AUserSize := 32 * 4 * 2 * 2;
+end;
+
+class function TROCipher_2DES.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    066h,05Ch,079h,027h,0E9h,01Ch,08Bh,0A0h
+         DB    0A9h,0E4h,099h,05Ah,015h,08Ch,0BDh,046h
+         DB    05Ch,09Ch,075h,091h,03Ch,038h,006h,09Dh
+         DB    075h,0B4h,07Eh,068h,0E9h,047h,0FDh,0ABh
+end;
+
+procedure TROCipher_2DES.Encode(Data: Pointer);
+begin
+  DES_Func(Data, User);
+  DES_Func(Data, @PIntArray(User)[32]);
+  DES_Func(Data, User);
+end;
+
+procedure TROCipher_2DES.Decode(Data: Pointer);
+begin
+  DES_Func(Data, @PIntArray(User)[64]);
+  DES_Func(Data, @PIntArray(User)[96]);
+  DES_Func(Data, @PIntArray(User)[64]);
+end;
+
+procedure TROCipher_2DES.Init(const Key; Size: Integer; IVector: Pointer);
+var
+  K: array[0..15] of Byte;
+  P: PInteger;
+begin
+  InitBegin(Size);
+  FillChar(K, SizeOf(K), 0);
+  Move(Key, K, Size);
+  P := User;
+  MakeKey(K[0], P, False); Inc(P, 32);
+  MakeKey(K[8], P, True);  Inc(P, 32);
+  MakeKey(K[0], P, True);  Inc(P, 32);
+  MakeKey(K[8], P, False);
+  FillChar(K, SizeOf(K), 0);
+  InitEnd(IVector);
+end;
+
+class procedure TROCipher_3DES.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  ABufSize := 8;
+  AKeySize := 24;
+  AUserSize := 32 * 4 * 2 * 3;
+end;
+
+class function TROCipher_3DES.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    007h,04Ch,014h,0F3h,0E2h,02Eh,008h,0D9h
+         DB    064h,0BFh,06Fh,082h,0B5h,0DFh,0F0h,0A2h
+         DB    02Fh,02Dh,03Bh,0DBh,017h,0DBh,025h,0B6h
+         DB    0B5h,01Eh,0FAh,071h,037h,02Fh,0D1h,072h
+end;
+
+procedure TROCipher_3DES.Encode(Data: Pointer);
+begin
+  DES_Func(Data, User);
+  DES_Func(Data, @PIntArray(User)[32]);
+  DES_Func(Data, @PIntArray(User)[64]);
+end;
+
+procedure TROCipher_3DES.Decode(Data: Pointer);
+begin
+  DES_Func(Data, @PIntArray(User)[96]);
+  DES_Func(Data, @PIntArray(User)[128]);
+  DES_Func(Data, @PIntArray(User)[160]);
+end;
+
+procedure TROCipher_3DES.Init(const Key; Size: Integer; IVector: Pointer);
+var
+  K: array[0..23] of Byte;
+  P: PInteger;
+begin
+  InitBegin(Size);
+  FillChar(K, SizeOf(K), 0);
+  Move(Key, K, Size);
+  P := User;
+  MakeKey(K[ 0], P, False); Inc(P, 32);
+  MakeKey(K[ 8], P, True);  Inc(P, 32);
+  MakeKey(K[16], P, False); Inc(P, 32);
+  MakeKey(K[16], P, True);  Inc(P, 32);
+  MakeKey(K[ 8], P, False); Inc(P, 32);
+  MakeKey(K[ 0], P, True);
+  FillChar(K, SizeOf(K), 0);
+  InitEnd(IVector);
+end;
+
+class procedure TROCipher_2DDES.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  inherited GetContext(ABufSize, AKeySize, AUserSize);
+  ABufSize := 16;
+end;
+
+class function TROCipher_2DDES.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    093h,06Ch,0F6h,043h,0C6h,0A7h,07Fh,0EDh
+         DB    04Dh,0B4h,070h,04Ah,0E2h,0A6h,006h,08Bh
+         DB    075h,013h,019h,0AFh,0E1h,082h,0EDh,035h
+         DB    04Eh,013h,0F6h,088h,0A4h,06Bh,033h,026h
+end;
+
+procedure TROCipher_2DDES.Encode(Data: Pointer);
+var
+  T: Integer;
+begin
+  DES_Func(Data, User);
+  DES_Func(@PIntArray(Data)[2], User);
+  T := PIntArray(Data)[1]; PIntArray(Data)[1] := PIntArray(Data)[2]; PIntArray(Data)[2] := T;
+  DES_Func(Data, @PIntArray(User)[32]);
+  DES_Func(@PIntArray(Data)[2], @PIntArray(User)[32]);
+  T := PIntArray(Data)[1]; PIntArray(Data)[1] := PIntArray(Data)[2]; PIntArray(Data)[2] := T;
+  DES_Func(Data, User);
+  DES_Func(@PIntArray(Data)[2], User);
+end;
+
+procedure TROCipher_2DDES.Decode(Data: Pointer);
+var
+  T: Integer;
+begin
+  DES_Func(Data, @PIntArray(User)[64]);
+  DES_Func(@PIntArray(Data)[2], @PIntArray(User)[64]);
+  T := PIntArray(Data)[1]; PIntArray(Data)[1] := PIntArray(Data)[2]; PIntArray(Data)[2] := T;
+  DES_Func(Data, @PIntArray(User)[96]);
+  DES_Func(@PIntArray(Data)[2], @PIntArray(User)[96]);
+  T := PIntArray(Data)[1]; PIntArray(Data)[1] := PIntArray(Data)[2]; PIntArray(Data)[2] := T;
+  DES_Func(Data,  @PIntArray(User)[64]);
+  DES_Func(@PIntArray(Data)[2], @PIntArray(User)[64]);
+end;
+
+class procedure TROCipher_3DDES.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  inherited GetContext(ABufSize, AKeySize, AUserSize);
+  ABufSize := 16;
+end;
+
+class function TROCipher_3DDES.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    02Fh,05Ah,05Eh,0D4h,05Eh,08Ah,0AAh,04Eh
+         DB    0D2h,066h,059h,048h,01Dh,0E1h,095h,094h
+         DB    02Ah,09Fh,0CCh,01Fh,04Dh,0E6h,014h,0F0h
+         DB    050h,004h,003h,064h,066h,09Ah,077h,08Eh
+end;
+
+procedure TROCipher_3DDES.Encode(Data: Pointer);
+var
+  T: Integer;
+begin
+  DES_Func(Data, User);
+  DES_Func(@PIntArray(Data)[2], User);
+  T := PIntArray(Data)[1]; PIntArray(Data)[1] := PIntArray(Data)[2]; PIntArray(Data)[2] := T;
+  DES_Func(Data, @PIntArray(User)[32]);
+  DES_Func(@PIntArray(Data)[2], @PIntArray(User)[32]);
+  T := PIntArray(Data)[1]; PIntArray(Data)[1] := PIntArray(Data)[2]; PIntArray(Data)[2] := T;
+  DES_Func(Data,  @PIntArray(User)[64]);
+  DES_Func(@PIntArray(Data)[2], @PIntArray(User)[64]);
+end;
+
+procedure TROCipher_3DDES.Decode(Data: Pointer);
+var
+  T: Integer;
+begin
+  DES_Func(Data, @PIntArray(User)[96]);
+  DES_Func(@PIntArray(Data)[2], @PIntArray(User)[96]);
+  T := PIntArray(Data)[1]; PIntArray(Data)[1] := PIntArray(Data)[2]; PIntArray(Data)[2] := T;
+  DES_Func(Data, @PIntArray(User)[128]);
+  DES_Func(@PIntArray(Data)[2], @PIntArray(User)[128]);
+  T := PIntArray(Data)[1]; PIntArray(Data)[1] := PIntArray(Data)[2]; PIntArray(Data)[2] := T;
+  DES_Func(Data,  @PIntArray(User)[160]);
+  DES_Func(@PIntArray(Data)[2], @PIntArray(User)[160]);
+end;
+
+class procedure TROCipher_3TDES.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  inherited GetContext(ABufSize, AKeySize, AUserSize);
+  ABufSize := 24;
+end;
+
+class function TROCipher_3TDES.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    00Bh,012h,0E4h,08Bh,0D9h,0CDh,008h,0BFh
+         DB    0CAh,0AEh,03Eh,05Fh,0F6h,0FEh,013h,0CDh
+         DB    03Fh,070h,06Eh,0CDh,053h,056h,03Fh,05Ah
+         DB    080h,00Fh,01Bh,01Eh,0FBh,09Ah,057h,096h
+end;
+
+procedure TROCipher_3TDES.Encode(Data: Pointer);
+var
+  T: Integer;
+begin
+  DES_Func(@PIntArray(Data)[0], User);
+  DES_Func(@PIntArray(Data)[2], User);
+  DES_Func(@PIntArray(Data)[4], User);
+  T := PIntArray(Data)[1]; PIntArray(Data)[1] := PIntArray(Data)[2]; PIntArray(Data)[2] := T;
+  T := PIntArray(Data)[3]; PIntArray(Data)[3] := PIntArray(Data)[4]; PIntArray(Data)[3] := T;
+  DES_Func(@PIntArray(Data)[0], @PIntArray(User)[32]);
+  DES_Func(@PIntArray(Data)[2], @PIntArray(User)[32]);
+  DES_Func(@PIntArray(Data)[4], @PIntArray(User)[32]);
+  T := PIntArray(Data)[1]; PIntArray(Data)[1] := PIntArray(Data)[2]; PIntArray(Data)[2] := T;
+  T := PIntArray(Data)[3]; PIntArray(Data)[3] := PIntArray(Data)[4]; PIntArray(Data)[3] := T;
+  DES_Func(@PIntArray(Data)[0], @PIntArray(User)[64]);
+  DES_Func(@PIntArray(Data)[2], @PIntArray(User)[64]);
+  DES_Func(@PIntArray(Data)[4], @PIntArray(User)[64]);
+end;
+
+procedure TROCipher_3TDES.Decode(Data: Pointer);
+var
+  T: Integer;
+begin
+  DES_Func(@PIntArray(Data)[0], @PIntArray(User)[96]);
+  DES_Func(@PIntArray(Data)[2], @PIntArray(User)[96]);
+  DES_Func(@PIntArray(Data)[4], @PIntArray(User)[96]);
+  T := PIntArray(Data)[1]; PIntArray(Data)[1] := PIntArray(Data)[2]; PIntArray(Data)[2] := T;
+  T := PIntArray(Data)[3]; PIntArray(Data)[3] := PIntArray(Data)[4]; PIntArray(Data)[3] := T;
+  DES_Func(@PIntArray(Data)[0], @PIntArray(User)[128]);
+  DES_Func(@PIntArray(Data)[2], @PIntArray(User)[128]);
+  DES_Func(@PIntArray(Data)[4], @PIntArray(User)[128]);
+  T := PIntArray(Data)[1]; PIntArray(Data)[1] := PIntArray(Data)[2]; PIntArray(Data)[2] := T;
+  T := PIntArray(Data)[3]; PIntArray(Data)[3] := PIntArray(Data)[4]; PIntArray(Data)[3] := T;
+  DES_Func(@PIntArray(Data)[0], @PIntArray(User)[160]);
+  DES_Func(@PIntArray(Data)[2], @PIntArray(User)[160]);
+  DES_Func(@PIntArray(Data)[4], @PIntArray(User)[160]);
+end;
+
+class procedure TROCipher_DESX.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  ABufSize := 8;
+  AKeySize := 8 * 2; {Key 8 bytes and Whitening 8 bytes}
+  AUserSize := 32 * 4 * 2 + 2 * 4 * 2;
+end;
+
+class function TROCipher_DESX.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    039h,049h,0ECh,05Bh,065h,01Bh,01Eh,01Fh
+         DB    08Eh,085h,0FDh,0D9h,06Fh,0D1h,0D5h,0FBh
+         DB    015h,003h,009h,027h,0B0h,069h,067h,0F9h
+         DB    0A6h,0C8h,01Ch,02Ah,09Fh,08Eh,04Fh,06Eh
+end;
+
+procedure TROCipher_DESX.Encode(Data: Pointer);
+begin
+  PIntArray(Data)[0] := PIntArray(Data)[0] xor PIntArray(User)[64];
+  PIntArray(Data)[1] := PIntArray(Data)[1] xor PIntArray(User)[65];
+  DES_Func(Data, User);
+  PIntArray(Data)[0] := PIntArray(Data)[0] xor PIntArray(User)[66];
+  PIntArray(Data)[1] := PIntArray(Data)[1] xor PIntArray(User)[67];
+end;
+
+procedure TROCipher_DESX.Decode(Data: Pointer);
+begin
+  PIntArray(Data)[0] := PIntArray(Data)[0] xor PIntArray(User)[66];
+  PIntArray(Data)[1] := PIntArray(Data)[1] xor PIntArray(User)[67];
+  DES_Func(Data, @PIntArray(User)[32]);
+  PIntArray(Data)[0] := PIntArray(Data)[0] xor PIntArray(User)[64];
+  PIntArray(Data)[1] := PIntArray(Data)[1] xor PIntArray(User)[65];
+end;
+
+procedure TROCipher_DESX.Init(const Key; Size: Integer; IVector: Pointer);
+var
+  K: array[0..15] of Byte;
+begin
+  FillChar(K, SizeOf(K), 0);
+  if Size > SizeOf(K) then Size := SizeOf(K);
+  Move(Key, K, Size);
+  InitNew(K, K[8], 8, IVector);
+  FillChar(K, SizeOf(K), 0);
+end;
+
+procedure TROCipher_DESX.InitNew(const Key, Whitening; Size: Integer; IVector: Pointer);
+const
+  Clorox: array[0..255] of Byte = (
+   189, 86,234,242,162,241,172, 42,176,147,209,156, 27, 51,253,208,
+    48,  4,182,220,125,223, 50, 75,247,203, 69,155, 49,187, 33, 90,
+    65,159,225,217, 74, 77,158,218,160,104, 44,195, 39, 95,128, 54,
+    62,238,251,149, 26,254,206,168, 52,169, 19,240,166, 63,216, 12,
+   120, 36,175, 35, 82,193,103, 23,245,102,144,231,232,  7,184, 96,
+    72,230, 30, 83,243,146,164,114,140,  8, 21,110,134,  0,132,250,
+   244,127,138, 66, 25,246,219,205, 20,141, 80, 18,186, 60,  6, 78,
+   236,179, 53, 17,161,136,142, 43,148,153,183,113,116,211,228,191,
+    58,222,150, 14,188, 10,237,119,252, 55,107,  3,121,137, 98,198,
+   215,192,210,124,106,139, 34,163, 91,  5, 93,  2,117,213, 97,227,
+    24,143, 85, 81,173, 31, 11, 94,133,229,194, 87, 99,202, 61,108,
+   180,197,204,112,178,145, 89, 13, 71, 32,200, 79, 88,224,  1,226,
+    22, 56,196,111, 59, 15,101, 70,190,126, 45,123,130,249, 64,181,
+    29,115,248,235, 38,199,135,151, 37, 84,177, 40,170,152,157,165,
+   100,109,122,212, 16,129, 68,239, 73,214,174, 46,221,118, 92, 47,
+   167, 28,201,  9,105,154,131,207, 41, 57,185,233, 76,255, 67,171);
+
+var
+  K,H,W: array[0..7] of Byte;
+  I: Integer;
+  T: Byte;
+begin
+  Size := Size * 2;
+  InitBegin(Size);
+  Size := Size shr 1;
+  FillChar(K, SizeOf(K), 0); Move(Key, K, Size);
+  FillChar(H, SizeOf(H), 0); Move(Whitening, H, Size);
+  MakeKey(K, @PIntArray(User)[0], False);
+  MakeKey(K, @PIntArray(User)[32], True);
+
+  Move(H, PIntArray(User)[64], 8);
+  FillChar(W, SizeOf(W), 0);
+  for I := 0 to 7 do
+  begin
+    T := W[0] xor W[1];
+    Move(W[1], W[0], 7);
+    W[7] := Clorox[T] xor K[I];
+  end;
+  for I := 0 to 7 do
+  begin
+    T := W[0] xor W[1];
+    Move(W[1], W[0], 7);
+    W[7] := Clorox[T] xor H[I];
+  end;
+  Move(W, PIntArray(User)[66], 8);
+  InitEnd(IVector);
+end;
+
+class procedure TROCipher_NewDES.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  ABufSize := 8;
+  AKeySize := 15;
+  AUserSize := 60 * 2;
+end;
+
+class function TROCipher_NewDES.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    0D5h,091h,04Fh,09Ch,074h,035h,046h,0FBh
+         DB    0D5h,0ADh,091h,031h,075h,014h,064h,0FEh
+         DB    0A7h,079h,021h,06Ah,029h,099h,047h,089h
+         DB    0D2h,00Dh,076h,00Ch,073h,09Ch,0CDh,017h
+end;
+
+
+procedure NewDES_Func(Data: Pointer; Key: PByte);
+type
+  PNewDESRec = ^TNewDESRec;
+  TNewDESRec = packed record
+                 A,B,C,D,E,F,G,H: Byte;
+               end;
+var
+  I: Integer;
+begin
+  with PNewDESRec(Data)^ do
+  begin
+    for I := 0 to 7 do
+    begin
+      E := E xor NewDES_Data[A xor Key^]; Inc(Key);
+      F := F xor NewDES_Data[B xor Key^]; Inc(Key);
+      G := G xor NewDES_Data[C xor Key^]; Inc(Key);
+      H := H xor NewDES_Data[D xor Key^]; Inc(Key);
+
+      B := B xor NewDES_Data[E xor Key^]; Inc(Key);
+      C := C xor NewDES_Data[F xor E];
+      D := D xor NewDES_Data[G xor Key^]; Inc(Key);
+      A := A xor NewDES_Data[H xor Key^]; Inc(Key);
+    end;
+    E := E xor NewDES_Data[A xor Key^]; Inc(Key);
+    F := F xor NewDES_Data[B xor Key^]; Inc(Key);
+    G := G xor NewDES_Data[C xor Key^]; Inc(Key);
+    H := H xor NewDES_Data[D xor Key^];
+  end;
+end;
+
+procedure TROCipher_NewDES.Encode(Data: Pointer);
+begin
+  NewDES_Func(Data, User);
+end;
+
+procedure TROCipher_NewDES.Decode(Data: Pointer);
+begin
+  NewDES_Func(Data, @PByteArray(User)[60]);
+end;
+
+procedure TROCipher_NewDES.Init(const Key; Size: Integer; IVector: Pointer);
+var
+  K: array[0..14] of Byte;
+  E: PByte;
+  I: Integer;
+begin
+  InitBegin(Size);
+  FillChar(K, SizeOf(K), 0);
+  Move(Key, K, Size);
+  E := User;
+  Move(K, E^, 15); Inc(E, 15);
+  Move(K, E^, 15); Inc(E, 15);
+  Move(K, E^, 15); Inc(E, 15);
+  Move(K, E^, 15); Inc(E, 15);
+  I := 11;
+  repeat
+    E^ := K[I]; Inc(E); Inc(I);
+    if I = 15 then I := 0;
+    E^ := K[I]; Inc(E); Inc(I);
+    if I = 15 then I := 0;
+    E^ := K[I]; Inc(E); Inc(I);
+    if I = 15 then I := 0;
+    E^ := K[I]; Inc(E);
+    I := (I + 9) mod 15;
+    if I = 12 then Break;
+    E^ := K[I]; Inc(E); Inc(I);
+    E^ := K[I]; Inc(E); Inc(I);
+    E^ := K[I]; Inc(E);
+    I := (I + 9) mod 15;
+  until False;
+  FillChar(K, SizeOf(K), 0);
+  InitEnd(IVector);
+end;
+
+procedure TROCipher_Diamond2.SetRounds(Value: Integer);
+begin
+  if (Value < 5) or (Value > 15) then Value := 10;
+  if Value = FRounds then Exit;
+  FRounds := Value;
+end;
+
+class procedure TROCipher_Diamond2.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  ABufSize := 16;
+  AKeySize := 256;
+  AUserSize := 0;
+end;
+
+class function TROCipher_Diamond2.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    020h,0B3h,058h,0B4h,0CEh,022h,0FBh,076h
+         DB    02Dh,03Bh,093h,069h,005h,09Fh,006h,0C7h
+         DB    0E4h,0F7h,0C6h,09Ch,0E1h,0DBh,055h,023h
+         DB    052h,070h,0A1h,0DFh,0B1h,05Eh,0EDh,08Dh
+end;
+
+procedure TROCipher_Diamond2.Encode(Data: Pointer);
+var
+  I,J: Integer;
+  Key: PByteArray;
+  D: PByteArray;
+  Z: array[0..15] of Byte;
+begin
+  Key := FBoxE;
+  D   := Data;
+  for J := 0 to BufSize-1 do
+  begin
+    D[J] := Key[D[J]];
+    Inc(PByte(Key), 256);
+  end;
+  for I := 0 to FRounds-2 do
+  begin
+    if BufSize = 8 then
+    begin
+      Z[ 0] := D[ 0] and   1 or D[ 1] and   2 or D[ 2] and   4 or D[ 3] and   8 or
+               D[ 4] and  16 or D[ 5] and  32 or D[ 6] and  64 or D[ 7] and 128;
+      Z[ 1] := D[ 1] and   1 or D[ 2] and   2 or D[ 3] and   4 or D[ 4] and   8 or
+               D[ 5] and  16 or D[ 6] and  32 or D[ 7] and  64 or D[ 0] and 128;
+      Z[ 2] := D[ 2] and   1 or D[ 3] and   2 or D[ 4] and   4 or D[ 5] and   8 or
+               D[ 6] and  16 or D[ 7] and  32 or D[ 0] and  64 or D[ 1] and 128;
+      Z[ 3] := D[ 3] and   1 or D[ 4] and   2 or D[ 5] and   4 or D[ 6] and   8 or
+               D[ 7] and  16 or D[ 0] and  32 or D[ 1] and  64 or D[ 2] and 128;
+      Z[ 4] := D[ 4] and   1 or D[ 5] and   2 or D[ 6] and   4 or D[ 7] and   8 or
+               D[ 0] and  16 or D[ 1] and  32 or D[ 2] and  64 or D[ 3] and 128;
+      Z[ 5] := D[ 5] and   1 or D[ 6] and   2 or D[ 7] and   4 or D[ 0] and   8 or
+               D[ 1] and  16 or D[ 2] and  32 or D[ 3] and  64 or D[ 4] and 128;
+      Z[ 6] := D[ 6] and   1 or D[ 7] and   2 or D[ 0] and   4 or D[ 1] and   8 or
+               D[ 2] and  16 or D[ 3] and  32 or D[ 4] and  64 or D[ 5] and 128;
+      Z[ 7] := D[ 7] and   1 or D[ 0] and   2 or D[ 1] and   4 or D[ 2] and   8 or
+               D[ 3] and  16 or D[ 4] and  32 or D[ 5] and  64 or D[ 6] and 128;
+    end else
+    begin
+      Z[ 0] := D[ 0] and   1 or D[ 1] and   2 or D[ 2] and   4 or D[ 3] and   8 or
+               D[ 4] and  16 or D[ 5] and  32 or D[ 6] and  64 or D[ 7] and 128;
+      Z[ 1] := D[ 1] and   1 or D[ 2] and   2 or D[ 3] and   4 or D[ 4] and   8 or
+               D[ 5] and  16 or D[ 6] and  32 or D[ 7] and  64 or D[ 8] and 128;
+      Z[ 2] := D[ 2] and   1 or D[ 3] and   2 or D[ 4] and   4 or D[ 5] and   8 or
+               D[ 6] and  16 or D[ 7] and  32 or D[ 8] and  64 or D[ 9] and 128;
+      Z[ 3] := D[ 3] and   1 or D[ 4] and   2 or D[ 5] and   4 or D[ 6] and   8 or
+               D[ 7] and  16 or D[ 8] and  32 or D[ 9] and  64 or D[10] and 128;
+      Z[ 4] := D[ 4] and   1 or D[ 5] and   2 or D[ 6] and   4 or D[ 7] and   8 or
+               D[ 8] and  16 or D[ 9] and  32 or D[10] and  64 or D[11] and 128;
+      Z[ 5] := D[ 5] and   1 or D[ 6] and   2 or D[ 7] and   4 or D[ 8] and   8 or
+               D[ 9] and  16 or D[10] and  32 or D[11] and  64 or D[12] and 128;
+      Z[ 6] := D[ 6] and   1 or D[ 7] and   2 or D[ 8] and   4 or D[ 9] and   8 or
+               D[10] and  16 or D[11] and  32 or D[12] and  64 or D[13] and 128;
+      Z[ 7] := D[ 7] and   1 or D[ 8] and   2 or D[ 9] and   4 or D[10] and   8 or
+               D[11] and  16 or D[12] and  32 or D[13] and  64 or D[14] and 128;
+      Z[ 8] := D[ 8] and   1 or D[ 9] and   2 or D[10] and   4 or D[11] and   8 or
+               D[12] and  16 or D[13] and  32 or D[14] and  64 or D[15] and 128;
+      Z[ 9] := D[ 9] and   1 or D[10] and   2 or D[11] and   4 or D[12] and   8 or
+               D[13] and  16 or D[14] and  32 or D[15] and  64 or D[ 0] and 128;
+      Z[10] := D[10] and   1 or D[11] and   2 or D[12] and   4 or D[13] and   8 or
+               D[14] and  16 or D[15] and  32 or D[ 0] and  64 or D[ 1] and 128;
+      Z[11] := D[11] and   1 or D[12] and   2 or D[13] and   4 or D[14] and   8 or
+               D[15] and  16 or D[ 0] and  32 or D[ 1] and  64 or D[ 2] and 128;
+      Z[12] := D[12] and   1 or D[13] and   2 or D[14] and   4 or D[15] and   8 or
+               D[ 0] and  16 or D[ 1] and  32 or D[ 2] and  64 or D[ 3] and 128;
+      Z[13] := D[13] and   1 or D[14] and   2 or D[15] and   4 or D[ 0] and   8 or
+               D[ 1] and  16 or D[ 2] and  32 or D[ 3] and  64 or D[ 4] and 128;
+      Z[14] := D[14] and   1 or D[15] and   2 or D[ 0] and   4 or D[ 1] and   8 or
+               D[ 2] and  16 or D[ 3] and  32 or D[ 4] and  64 or D[ 5] and 128;
+      Z[15] := D[15] and   1 or D[ 0] and   2 or D[ 1] and   4 or D[ 2] and   8 or
+               D[ 3] and  16 or D[ 4] and  32 or D[ 5] and  64 or D[ 6] and 128;
+    end;           
+    for J := 0 to BufSize-1 do
+    begin
+      D[J] := Key[Z[J]];
+      Inc(PByte(Key), 256);
+    end;
+  end;
+end;
+
+procedure TROCipher_Diamond2.Decode(Data: Pointer);
+var
+  I,J: Integer;
+  Key: PByteArray;
+  D: PByteArray;
+  Z: array[0..15] of Byte;
+begin
+  D   := Data;
+  Key := FBoxD;
+  for J := 0 to BufSize-1 do
+  begin
+    D[J] := Key[D[J]];
+    Inc(PByte(Key), 256);
+  end;
+  for I := 0 to FRounds-2 do
+  begin
+    if BufSize = 8 then
+    begin
+      Z[ 0] := D[ 0] and   1 or D[ 7] and   2 or D[ 6] and   4 or D[ 5] and   8 or
+               D[ 4] and  16 or D[ 3] and  32 or D[ 2] and  64 or D[ 1] and 128;
+      Z[ 1] := D[ 1] and   1 or D[ 0] and   2 or D[ 7] and   4 or D[ 6] and   8 or
+               D[ 5] and  16 or D[ 4] and  32 or D[ 3] and  64 or D[ 2] and 128;
+      Z[ 2] := D[ 2] and   1 or D[ 1] and   2 or D[ 0] and   4 or D[ 7] and   8 or
+               D[ 6] and  16 or D[ 5] and  32 or D[ 4] and  64 or D[ 3] and 128;
+      Z[ 3] := D[ 3] and   1 or D[ 2] and   2 or D[ 1] and   4 or D[ 0] and   8 or
+               D[ 7] and  16 or D[ 6] and  32 or D[ 5] and  64 or D[ 4] and 128;
+      Z[ 4] := D[ 4] and   1 or D[ 3] and   2 or D[ 2] and   4 or D[ 1] and   8 or
+               D[ 0] and  16 or D[ 7] and  32 or D[ 6] and  64 or D[ 5] and 128;
+      Z[ 5] := D[ 5] and   1 or D[ 4] and   2 or D[ 3] and   4 or D[ 2] and   8 or
+               D[ 1] and  16 or D[ 0] and  32 or D[ 7] and  64 or D[ 6] and 128;
+      Z[ 6] := D[ 6] and   1 or D[ 5] and   2 or D[ 4] and   4 or D[ 3] and   8 or
+               D[ 2] and  16 or D[ 1] and  32 or D[ 0] and  64 or D[ 7] and 128;
+      Z[ 7] := D[ 7] and   1 or D[ 6] and   2 or D[ 5] and   4 or D[ 4] and   8 or
+               D[ 3] and  16 or D[ 2] and  32 or D[ 1] and  64 or D[ 0] and 128;
+    end else
+    begin
+      Z[ 0] := D[ 0] and   1 or D[15] and   2 or D[14] and   4 or D[13] and   8 or
+               D[12] and  16 or D[11] and  32 or D[10] and  64 or D[ 9] and 128;
+      Z[ 1] := D[ 1] and   1 or D[ 0] and   2 or D[15] and   4 or D[14] and   8 or
+               D[13] and  16 or D[12] and  32 or D[11] and  64 or D[10] and 128;
+      Z[ 2] := D[ 2] and   1 or D[ 1] and   2 or D[ 0] and   4 or D[15] and   8 or
+               D[14] and  16 or D[13] and  32 or D[12] and  64 or D[11] and 128;
+      Z[ 3] := D[ 3] and   1 or D[ 2] and   2 or D[ 1] and   4 or D[ 0] and   8 or
+               D[15] and  16 or D[14] and  32 or D[13] and  64 or D[12] and 128;
+      Z[ 4] := D[ 4] and   1 or D[ 3] and   2 or D[ 2] and   4 or D[ 1] and   8 or
+               D[ 0] and  16 or D[15] and  32 or D[14] and  64 or D[13] and 128;
+      Z[ 5] := D[ 5] and   1 or D[ 4] and   2 or D[ 3] and   4 or D[ 2] and   8 or
+               D[ 1] and  16 or D[ 0] and  32 or D[15] and  64 or D[14] and 128;
+      Z[ 6] := D[ 6] and   1 or D[ 5] and   2 or D[ 4] and   4 or D[ 3] and   8 or
+               D[ 2] and  16 or D[ 1] and  32 or D[ 0] and  64 or D[15] and 128;
+      Z[ 7] := D[ 7] and   1 or D[ 6] and   2 or D[ 5] and   4 or D[ 4] and   8 or
+               D[ 3] and  16 or D[ 2] and  32 or D[ 1] and  64 or D[ 0] and 128;
+      Z[ 8] := D[ 8] and   1 or D[ 7] and   2 or D[ 6] and   4 or D[ 5] and   8 or
+               D[ 4] and  16 or D[ 3] and  32 or D[ 2] and  64 or D[ 1] and 128;
+      Z[ 9] := D[ 9] and   1 or D[ 8] and   2 or D[ 7] and   4 or D[ 6] and   8 or
+               D[ 5] and  16 or D[ 4] and  32 or D[ 3] and  64 or D[ 2] and 128;
+      Z[10] := D[10] and   1 or D[ 9] and   2 or D[ 8] and   4 or D[ 7] and   8 or
+               D[ 6] and  16 or D[ 5] and  32 or D[ 4] and  64 or D[ 3] and 128;
+      Z[11] := D[11] and   1 or D[10] and   2 or D[ 9] and   4 or D[ 8] and   8 or
+               D[ 7] and  16 or D[ 6] and  32 or D[ 5] and  64 or D[ 4] and 128;
+      Z[12] := D[12] and   1 or D[11] and   2 or D[10] and   4 or D[ 9] and   8 or
+               D[ 8] and  16 or D[ 7] and  32 or D[ 6] and  64 or D[ 5] and 128;
+      Z[13] := D[13] and   1 or D[12] and   2 or D[11] and   4 or D[10] and   8 or
+               D[ 9] and  16 or D[ 8] and  32 or D[ 7] and  64 or D[ 6] and 128;
+      Z[14] := D[14] and   1 or D[13] and   2 or D[12] and   4 or D[11] and   8 or
+               D[10] and  16 or D[ 9] and  32 or D[ 8] and  64 or D[ 7] and 128;
+      Z[15] := D[15] and   1 or D[14] and   2 or D[13] and   4 or D[12] and   8 or
+               D[11] and  16 or D[10] and  32 or D[ 9] and  64 or D[ 8] and 128;
+    end;
+    for J := 0 to BufSize-1 do
+    begin
+      D[J] := Key[Z[J]];
+      Inc(PByte(Key), 256);
+    end;
+  end;
+end;
+
+procedure TROCipher_Diamond2.Init(const Key; Size: Integer; IVector: Pointer);
+var
+  KI,Accum: Integer;
+  Prev: PByteArray;
+
+  function KeyRand(const Max: Byte): Byte;
+  var
+    I, M: Integer;
+    B: Byte;
+  begin
+    Result := 0;
+    if Max = 0 then Exit;
+    M := 0;
+    I := Max;
+    while I > 0 do
+    begin
+      M := M shl 1 or 1;
+      I := I shr 1;
+    end;
+    I := 0;
+    repeat
+      if Prev <> nil then B := Prev[TByteArray(Key)[KI]]
+        else B := TByteArray(Key)[KI];
+      Accum := CRC32(Accum, @B, 1);
+      Inc(KI);
+      if KI >= Size then
+      begin
+        KI := 0;
+        B := Size       and $FF; Accum := CRC32(Accum, @B, 1);
+        B := Size shr 8 and $FF; Accum := CRC32(Accum, @B, 1);
+      end;
+      Result := Accum and M;
+      Inc(I);
+      if (I > 97) and (Result > Max) then Dec(Result, Max);
+    until Result <= Max;
+  end;
+
+var
+  I,J: Integer;
+  P,M,N: Byte;
+  D,E: PByteArray;
+  F: array[0..255] of Boolean;
+begin
+  SetRounds(FRounds);
+  InitBegin(Size);
+  ReallocMem(FBoxE, FRounds * BufSize * 256);
+  ReallocMem(FBoxD, FRounds * BufSize * 256);
+  Accum := Integer($FFFFFFFF);
+  Prev  := nil;
+  KI := 0;
+  E  := FBoxE;
+  for I := 0 to FRounds-1 do
+  begin
+    for J := 0 to BufSize-1 do
+    begin
+      FillChar(F, SizeOf(F), False);
+      for N := 255 downto 0 do
+      begin
+        M := KeyRand(N);
+        P := 0;
+        while F[P] do Inc(P);
+        while M > 0 do
+        begin
+          Dec(M);
+          Inc(P);
+          while F[P] do Inc(P);
+        end;
+        E[P] := N;
+        F[P] := True;
+      end;
+      Prev := E;
+      Inc(PByte(E), 256);
+    end;
+  end;
+  E := FBoxE;
+  D := FBoxD;
+  Inc(PByte(D), FRounds * BufSize * 256);
+  for I := 0 to FRounds -1 do
+  begin
+    Dec(PByte(D), BufSize * 256);
+    for J := 0 to BufSize -1 do
+    begin
+      for N := 0 to 255 do
+      begin
+        D[PByte(E)^] := N;
+        Inc(PByte(E));
+      end;
+      Inc(PByte(D), 256);
+    end;
+    Dec(PByte(D), BufSize * 256);
+  end;
+  InitEnd(IVector);
+end;
+
+procedure TROCipher_Diamond2.Protect;
+begin
+  inherited Protect;
+  ReallocMem(FBoxE, 0);
+  ReallocMem(FBoxD, 0);
+end;
+
+procedure TROCipher_Diamond2Lite.SetRounds(Value: Integer);
+begin
+  if (Value < 4) or (Value > 30) then Value := 10;
+  if Value = FRounds then Exit;
+  FRounds := Value;
+end;
+
+class procedure TROCipher_Diamond2Lite.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  ABufSize := 8;
+  AKeySize := 256;
+  AUserSize := 0;
+end;
+
+class function TROCipher_Diamond2Lite.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    06Bh,02Dh,03Dh,0D1h,0F2h,0B1h,029h,0FFh
+         DB    055h,0C8h,081h,0A9h,0A5h,04Ch,027h,07Fh
+         DB    08Eh,0ABh,089h,071h,034h,0DCh,0D1h,0D7h
+         DB    09Bh,02Dh,01Fh,0CEh,09Bh,043h,0C1h,045h
+end;
+
+type
+  PSapphireKey = ^TSapphireKey;
+  TSapphireKey = packed record
+                   Rotor: Byte;
+                   Ratchet: Byte;
+                   Avalanche: Byte;
+                   Plain: Byte;
+                   RO_Cipher: Byte;
+                   Cards: array[0..255] of Byte;
+                 end;
+
+class procedure TROCipher_Sapphire.GetContext(var ABufSize, AKeySize, AUserSize: Integer);
+begin
+  ABufSize := 32;
+  AKeySize := 1024;
+  AUserSize := SizeOf(TSapphireKey) * 2;
+end;
+
+class function TROCipher_Sapphire.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    07Ch,082h,028h,0B7h,039h,045h,043h,09Dh
+         DB    044h,0E0h,09Ch,019h,083h,0D0h,039h,0ACh
+         DB    0B9h,0B7h,075h,018h,02Bh,05Dh,0F3h,06Ah
+         DB    0B2h,02Dh,024h,007h,05Fh,041h,0CDh,073h
+end;
+
+procedure TROCipher_Sapphire.Encode(Data: Pointer);
+var
+  I,C: Integer;
+  T: Byte;
+begin
+  with PSapphireKey(User)^ do
+  begin
+    C := RO_Cipher;
+    for I := 0 to 31 do
+    begin
+      Inc(Ratchet, Cards[Rotor]);
+      Inc(Rotor);
+      T := Cards[C];
+      Cards[C] := Cards[Ratchet];
+      Cards[Ratchet] := Cards[Plain];
+      Cards[Plain] := Cards[Rotor];
+      Cards[Rotor] := T;
+      Inc(Avalanche, Cards[T]);
+      T := Cards[Plain] + Cards[C] + Cards[Avalanche];
+      Plain := PByte(Data)^;
+      C := PByte(Data)^ xor Cards[Cards[T]] xor
+                            Cards[(Cards[Ratchet] + Cards[Rotor]) and $FF];
+      PByte(Data)^ := C;
+      Inc(PByte(Data));
+    end;
+    RO_Cipher := C;
+  end;
+end;
+
+procedure TROCipher_Sapphire.Decode(Data: Pointer);
+var
+  I,C: Integer;
+  T: Byte;
+begin
+  with PSapphireKey(User)^ do
+  begin
+    C := RO_Cipher;
+    for I := 0 to 31 do
+    begin
+      Inc(Ratchet, Cards[Rotor]);
+      Inc(Rotor);
+      T := Cards[C];
+      Cards[C] := Cards[Ratchet];
+      Cards[Ratchet] := Cards[Plain];
+      Cards[Plain] := Cards[Rotor];
+      Cards[Rotor] := T;
+      Inc(Avalanche, Cards[T]);
+      T := Cards[Plain] + Cards[C] + Cards[Avalanche];
+      C := PByte(Data)^;
+      Plain := C xor Cards[Cards[T]] xor Cards[(Cards[Ratchet] + Cards[Rotor]) and $FF];
+      PByte(Data)^ := Plain;
+      Inc(PByte(Data));
+    end;
+    RO_Cipher := C;
+  end;
+end;
+
+procedure TROCipher_Sapphire.Init(const Key; Size: Integer; IVector: Pointer);
+var
+  Sum: Byte;
+  P: Integer;
+
+  function KeyRand(const Max: Integer): Byte;
+  var
+    I, M: Integer;
+  begin
+    Result := 0;
+    if Max = 0 then Exit;
+    I := 0;
+    M := 1;
+    while M < Max do M := M shl 1 or 1;
+    repeat
+      Inc(Sum, TByteArray(Key)[P]);
+      Inc(P);
+      if P >= Size then
+      begin
+        P := 0;
+        Inc(Sum, Size);
+      end;
+      Result := M and Sum;
+      Inc(I);
+      if I > 11 then Result := Result mod Max;
+    until Result <= Max;
+  end;
+
+var
+  I,S,T: Integer;
+begin
+  InitBegin(Size);
+  with PSapphireKey(User)^ do
+    if Size <= 0 then
+    begin
+      Rotor := 1;
+      Ratchet := 3;
+      Avalanche := 5;
+      Plain := 7;
+      RO_Cipher := 11;
+      for I := 0 to 255 do Cards[I] := 255 - I;
+    end else
+    begin
+      for I := 0 to 255 do Cards[I] := I;
+      P   := 0;
+      Sum := 0;
+      for I := 255 downto 1 do
+      begin
+        S := KeyRand(I);
+        T := Cards[I];
+        Cards[I] := Cards[S];
+        Cards[S] := T;
+      end;
+      Rotor := Cards[1];
+      Ratchet := Cards[3];
+      Avalanche := Cards[5];
+      Plain := Cards[7];
+      RO_Cipher := Cards[Sum];
+    end;
+  InitEnd(IVector);
+  Move(User^, Pointer(PChar(User) + SizeOf(TSapphireKey))^, SizeOf(TSapphireKey));
+end;
+
+procedure TROCipher_Sapphire.Done;
+begin
+  inherited Done;
+  Move(Pointer(PChar(User) + SizeOf(TSapphireKey))^, User^, SizeOf(TSapphireKey));
+end;
+
+initialization
+{$IFNDEF ManualRegisterClasses}
+  RegisterCipher(TROCipher_Cast128, 'Cast 128', '');
+  RegisterCipher(TROCipher_Cast256, 'Cast 256', 'Patented');
+  RegisterCipher(TROCipher_1DES, 'DES Single 8byte', '');
+  RegisterCipher(TROCipher_2DES, 'DES Double 8byte', '');
+  RegisterCipher(TROCipher_2DDES, 'DES Double 16byte', '');
+  RegisterCipher(TROCipher_3DES, 'DES Triple 8byte', '');
+  RegisterCipher(TROCipher_3DDES, 'DES Triple 16byte', '');
+  RegisterCipher(TROCipher_3TDES, 'DES Triple 24byte', '');
+  RegisterCipher(TROCipher_DESX, 'DESX', 'Copyright by RSA');
+  RegisterCipher(TROCipher_Diamond2, 'Diamond II', '');
+  RegisterCipher(TROCipher_Diamond2Lite, 'Diamond II Lite', '');
+  RegisterCipher(TROCipher_FROG, '', '');
+  RegisterCipher(TROCipher_Mars, '', 'Patented');
+  RegisterCipher(TROCipher_Misty, 'Misty 1', 'free for non-commercial');
+  RegisterCipher(TROCipher_NewDES, '', '');
+  RegisterCipher(TROCipher_RC2, '', '');
+  RegisterCipher(TROCipher_RC4, '', 'Patented by RSA');
+  RegisterCipher(TROCipher_RC5, '', 'Patented by RSA');
+  RegisterCipher(TROCipher_RC6, '', 'Patented by RSA');
+  RegisterCipher(TROCipher_Rijndael, '', '');
+  RegisterCipher(TROCipher_Sapphire, 'Sapphire II', '');
+  {$IFDEF VER_D3H}
+  RegisterCipher(TROCipher_Skipjack, '', '');
+  {$ENDIF}
+{$ENDIF}
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROCiphers.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROCiphers.pas
new file mode 100644
index 0000000..f873208
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROCiphers.pas	
@@ -0,0 +1,67 @@
+unit uROCiphers;
+
+interface
+
+uses
+  Windows, SysUtils, Classes, uroCipher, uroCipher1, uroHash, uroDECUtil;
+
+type
+  TROBaseCipher = class(TObject)
+  public
+    procedure EncryptStream(const Plaintext, Ciphertext: TStream); virtual; abstract;
+    procedure DecryptStream(const Ciphertext, Plaintext: TStream); virtual; abstract;
+  end;
+
+  TRODECCipher = class(TROBaseCipher)
+  protected
+    fCipher: TROCipher;
+  public
+    constructor Create(aCipherClass: TROCipherClass; aKey: Ansistring);
+    destructor Destroy; override;
+    procedure EncryptStream(const Plaintext, Ciphertext: TStream); override;
+    procedure DecryptStream(const Ciphertext, Plaintext: TStream); override;
+  end;
+
+implementation
+
+{ TRODECCipher }
+
+constructor TRODECCipher.Create(aCipherClass: TROCipherClass; aKey: Ansistring);
+var
+  i                 : Integer;
+  keyval            : Ansistring;
+begin
+  fCipher := aCipherClass.Create('', nil);
+  fCipher.Mode := cmCTS;
+  fCipher.HashClass := TROHash_RipeMD256;
+
+  i := Length(aKey) div 2;
+  if i > fCipher.KeySize then
+    i := fCipher.KeySize;
+
+  //convert key to binary
+  keyval := formattostr(PAnsiChar(aKey), Length(aKey), fmthex);
+
+  fCipher.Init(keyval[1], i, nil);
+end;
+
+procedure TRODECCipher.DecryptStream(const Ciphertext, Plaintext: TStream);
+begin
+  fCipher.CodeStream(Ciphertext, Plaintext, Ciphertext.Size - Ciphertext.Position, paDecode);
+end;
+
+destructor TRODECCipher.Destroy;
+begin
+  fCipher.Free;
+
+  inherited;
+end;
+
+procedure TRODECCipher.EncryptStream(const Plaintext, Ciphertext: TStream);
+begin
+  //Plaintext.seek(0, soFromBeginning);
+  fCipher.CodeStream(Plaintext, Ciphertext, Plaintext.Size, paEncode);
+end;
+
+end.
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uRODECConst.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uRODECConst.pas
new file mode 100644
index 0000000..1b5507f
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uRODECConst.pas	
@@ -0,0 +1,88 @@
+unit uRODECConst;
+
+interface
+
+{$I uROVer.inc}
+
+{$IFDEF VER_D3H}
+resourcestring
+{$ELSE}
+const
+{$ENDIF}
+// DECUTils.pas (all parts)
+  sProtectionCircular  = 'Circular Protection detected, Protection Object is invalid.';
+  sStringFormatExists  = 'String Format "%d" does not exist.';
+  sInvalidStringFormat = 'Input is not a valid %s Format.';
+  sInvalidFormatString = 'Input cannot be converted to %s Format.';
+  sFMT_COPY            = 'copy Input to Output';
+  sFMT_HEX             = 'Hexadecimal';
+  sFMT_HEXL            = 'Hexadecimal lowercase';
+  sFMT_MIME64          = 'MIME Base 64';
+  sFMT_UU              = 'UU Coding';
+  sFMT_XX              = 'XX Coding';
+  
+// RO_Cipher.pas (Part I)
+  sInvalidKey          = 'Encryptionkey is invalid';
+  sInvalidCRC          = 'Encrypted Data is corrupt, invalid Checksum';
+  sInvalidKeySize      = 'Length from Encryptionkey is invalid.'#13#10+
+                         'Keysize for %s must be within %d-%d bytes';
+  sNotInitialized      = '%s is not initialized, call Init() or InitKey() first.';
+  sInvalidMACMode      = 'Invalid Ciphermode selected to produce MAC.'#13#10 +
+                         'Please use Modes cmCBC, cmCTS, cmCFB, cmCBCMAC, cmCFBMAC or cmCTSMAC for CalcMAC.';
+  sCantCalc            = 'Invalid Ciphermode selected.';
+// RO_Rng.pas    (Part I)
+  sInvalidRandomStream = 'Invalid Random Data detected.';
+  sRandomDataProtected = 'Random Data is protected.';
+// BNG.pas    (Part II)
+  sBBSnotSeekable      = 'BBS Generator is not seekable.';
+  sBigNumDestroy       = 'Bignums used in a BBS Generator cannot be destroyed.';
+  sIndexOutOfRange     = 'BBS Error: Index out of Range.';
+// BigNum.pas (Part II)
+  sBigNumAborted       = 'BigNum aborted by User.';
+  sErrGeneric          = 'Bignum Generic Error.';
+  sErrAsInteger        = 'BigNum overflow in AsInteger.';
+  sErrAsComp           = 'BigNum overflow in AsComp.';
+  sErrAsFloat          = 'BigNum overflow in AsFloat.';
+  sNumberFormat        = 'BigNum invalid Numberformat for Base %d.'#13#10'Value: %s';
+  sDivByZero           = 'BigNum division by Zero.';
+  sStackIndex          = 'BigNum Stackindex out of range.';
+  sLoadFail            = 'BigNum invalid data format.';
+  sParams              = 'BigNum parameter error.'#13#10'%s.';
+  sJacobi              = 'BigNum Jacobi(A, B), B must be >= 3, Odd and B < A';
+  sSPPrime             = 'BigNum IsSPPrime(A, Base), |Base| must be > 1, |A| > |Base| and |A| >= 3';
+  sSetPrime            = 'BigNum SetPrime(Base, Residue, Modulus), Invalid Parameter.'#13#10'%s.';
+  sSetPrimeSize        = 'Value must be greater than 32767';
+  sSetPrimeParam       = 'GCD(Residue, Modulus) must be 1 and Residue < Modulus';
+  sSqrt                = 'BigNum Sqrt(A) A must be positive';
+  sExpMod              = 'BigNum ExpMod(E, M) M must be positive';
+  sCalcName            = 'Calculation No %d';
+// OTPass.pas   (Part III)
+  sInvalidState        = 'Invalid Protector State detected.';
+  sIDOutOfRange        = 'Protector Error: ID is out of Range.';
+// RO_Compress.pas (Part I)
+  sInvalidZIPData      = 'Invalid compressed Data detected.';
+// RO_RFC2289.pas  (Part I)
+  sInvalidChallenge    = 'Challenge is not in RO_RFC2289 Format.';
+  sInvalidPassword     = 'Invalid Passphraselength, must be more than 9 Chars.';
+  sInvalidSeed         = 'Invalid Seed Value in OTPCalc.';
+  sInvalidCalc         = 'Invalid Parameters in OTPCalc.';
+  sInvalidDictionary   = 'Used Dictionary in %s is invalid.';
+{$IFNDEF UNICODE}
+  sOTPWord             = 'word:';                     // RFC2444
+  sOTPHex              = 'hex:';                      // RFC2444
+  sOTPExt              = 'ext';                       // RFC2444
+  sOTPIdent            = 'otp-';                      // RO_RFC2289 Ident
+  sSKeyIdent           = 's/key';                     // RFC1760 Ident
+{$ELSE}
+const
+  sOTPWord             : AnsiString = 'word:';                     // RFC2444
+  sOTPHex              : AnsiString = 'hex:';                      // RFC2444
+  sOTPExt              : AnsiString = 'ext';                       // RFC2444
+  sOTPIdent            : AnsiString = 'otp-';                      // RO_RFC2289 Ident
+  sSKeyIdent           : AnsiString = 's/key';                     // RFC1760 Ident
+{$ENDIF}
+
+
+implementation
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uRODECReg.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uRODECReg.pas
new file mode 100644
index 0000000..a134522
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uRODECReg.pas	
@@ -0,0 +1,175 @@
+{Copyright:      Hagen Reddmann  mailto:HaReddmann@AOL.COM
+ Author:         Hagen Reddmann
+ Remarks:        freeware, but this Copyright must be included
+ known Problems: none
+ Version:        3.0,  Delphi Encryption Compendium
+                 Delphi 2-4, designed and testet under D3 & D4
+ Remarks:        remove RO_Cipher1 from the Uses Clausel to
+                 use only a Selection from Ciphers (RO_Cipher.pas)
+}
+unit uRODECReg;
+
+{$INCLUDE ..\RemObjects.inc}
+
+{$DEFINE Part_II}
+{$DEFINE Part_III}
+
+interface
+
+uses
+  uRODECConst, uRODECUtil, uROHash, uROCipher, uROHCMngr, SysUtils, Classes,
+  {$IFDEF DELPHI5} DsgnIntf, {$ELSE}  DesignIntf, DesignEditors, {$ENDIF}
+  uROCipher1, uRORFC2289
+{$IFDEF Part_II}
+{$ENDIF}
+{$IFDEF Part_III}
+{$ENDIF};
+
+
+type
+// List all registered RO_Hash Names
+  TROAlgorithmHashProperty = class(TStringProperty)
+    function GetAttributes: TPropertyAttributes; override;
+    procedure GetValues(Proc: TGetStrProc); override;
+  end;
+// List only Checksums
+  TROAlgorithmChecksumProperty = class(TROAlgorithmHashProperty)
+    procedure GetValues(Proc: TGetStrProc); override;
+  end;
+// List only Secure Hashs (excludes Checksum)
+  TROAlgorithmSecureHashProperty = class(TROAlgorithmHashProperty)
+    procedure GetValues(Proc: TGetStrProc); override;
+  end;
+// List all registered Ciphers
+  TROAlgorithmCipherProperty = class(TROAlgorithmHashProperty)
+    procedure GetValues(Proc: TGetStrProc); override;
+  end;
+// List all valid Idents ("otp-", "s/key")
+  TROOTPIdentProperty = class(TStringProperty)
+    function GetAttributes: TPropertyAttributes; override;
+    procedure GetValues(Proc: TGetStrProc); override;
+  end;
+// List all registered Stringformats
+  TROStringFormatProperty = class(TIntegerProperty)
+    function GetAttributes: TPropertyAttributes; override;
+    procedure GetValues(Proc: TGetStrProc); override;
+    function GetValue: String; override;
+    procedure SetValue(const Value: String); override;
+  end;
+
+procedure Register;
+
+implementation
+
+{$R *.RES}
+
+function TROAlgorithmHashProperty.GetAttributes: TPropertyAttributes;
+begin
+  Result := [paReadOnly, paValueList, paMultiSelect];
+end;
+
+procedure TROAlgorithmHashProperty.GetValues(Proc: TGetStrProc);
+var
+  I: Integer;
+begin
+  with HashList do
+    for I := 0 to Count-1 do Proc(Names[I]);
+end;
+
+procedure TROAlgorithmChecksumProperty.GetValues(Proc: TGetStrProc);
+var
+  I: Integer;
+begin
+  with HashList do
+    for I := 0 to Count-1 do
+      if TROHashClass(Objects[I]).InheritsFrom(TROChecksum) then Proc(Names[I]);
+end;
+
+procedure TROAlgorithmSecureHashProperty.GetValues(Proc: TGetStrProc);
+var
+  I: Integer;
+begin
+  with HashList do
+    for I := 0 to Count-1 do
+      if not TROHashClass(Objects[I]).InheritsFrom(TROChecksum) then Proc(Names[I]);
+end;
+
+procedure TROAlgorithmCipherProperty.GetValues(Proc: TGetStrProc);
+var
+  I: Integer;
+begin
+  with CipherList do
+    for I := 0 to Count-1 do Proc(Names[I]);
+end;
+
+function TROOTPIdentProperty.GetAttributes: TPropertyAttributes;
+begin
+  Result := [paValueList, paMultiSelect];
+end;
+
+procedure TROOTPIdentProperty.GetValues(Proc: TGetStrProc);
+begin
+  Proc(sOTPIdent);
+  Proc(sSKeyIdent);
+end;
+
+function TROStringFormatProperty.GetAttributes: TPropertyAttributes;
+begin
+  Result := [paValueList, paMultiSelect];
+end;
+
+procedure TROStringFormatProperty.GetValues(Proc: TGetStrProc);
+var
+  I: Integer;
+  S: TStringList;
+begin
+  S := TStringList.Create;
+  try
+    GetStringFormats(S);
+    for I := 0 to S.Count-1 do Proc(S[I]);
+  finally
+    S.Free;
+  end;
+end;
+
+function TROStringFormatProperty.GetValue: String;
+var
+  Fmt: TROStringFormatClass;
+begin
+  Fmt := StringFormat(GetOrdValue);   
+  if Fmt <> nil then Result := Fmt.Name else Result := '(unknown)';
+end;
+
+procedure TROStringFormatProperty.SetValue(const Value: String);
+var
+  I: Integer;
+  S: TStringList;
+begin
+  S := TStringList.Create;
+  try
+    GetStringFormats(S);
+    I := S.IndexOf(Value);
+    if I < 0 then SetOrdValue(StrToIntDef(Value, DefaultStringFormat))
+      else SetOrdValue(TROStringFormatClass(S.Objects[I]).Format);
+  finally
+    S.Free;
+  end;
+end;
+
+procedure Register;
+begin
+  {$IFDEF REGISTER_RODEC}
+  RegisterComponents('RemObjects DEC', [TROHashManager, TROCipherManager, TROOneTimePassword]);
+  RegisterPropertyEditor(TypeInfo(String), TROOneTimePassword, 'Algorithm', TROAlgorithmSecureHashProperty);
+  RegisterPropertyEditor(TypeInfo(String), TROOneTimePassword, 'Ident', TROOTPIdentProperty);
+  RegisterPropertyEditor(TypeInfo(Integer), TROOneTimePassword, 'Format', TROStringFormatProperty);
+  RegisterPropertyEditor(TypeInfo(String), TROHashManager, 'Algorithm', TROAlgorithmHashProperty);
+  RegisterPropertyEditor(TypeInfo(String), TROCipherManager, 'Algorithm', TROAlgorithmCipherProperty);
+  {$ENDIF REGISTER_RODEC}
+{$IFDEF Part_II}
+{$ENDIF}
+{$IFDEF Part_III}
+{$ENDIF}
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uRODECReg.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uRODECReg.res
new file mode 100644
index 0000000..915f25d
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uRODECReg.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uRODECUtil.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uRODECUtil.pas
new file mode 100644
index 0000000..1143103
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uRODECUtil.pas	
@@ -0,0 +1,1718 @@
+{Copyright:      Hagen Reddmann  mailto:HaReddmann@AOL.COM
+ Author:         Hagen Reddmann
+ Remarks:        freeware, but this Copyright must be included
+ known Problems: none
+ Version:        3.0, Delphi Encryption Compendium
+                 Delphi 2-4, BCB 3-4, designed and testet under D3 and D4
+ Description:    Utilitys for the DEC Packages
+
+ * THIS SOFTWARE IS PROVIDED BY THE AUTHORS ''AS IS'' AND ANY EXPRESS
+ * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+ * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHORS OR CONTRIBUTORS BE
+ * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
+ * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
+ * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
+ * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
+ * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE
+ * OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,
+ * EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+}
+unit uRODECUtil;
+
+interface
+
+uses SysUtils, Classes;
+
+{$I uROVer.inc}
+{$I RemObjects.inc}
+
+const
+// String Formats
+  fmtDEFAULT     =    -1;     // use DefaultStringFormat
+  fmtNONE        =     0;     // allways an Empty String, nothing Action
+  fmtCOPY        =     1;     // One to One binary (input = output)
+  fmtHEX         =    16;     // Hexadecimal
+  fmtHEXL        =  1016;     // Hexadecimal lowercase
+  fmtMIME64      = $1064;     // MIME Base 64
+  fmtUU          = $5555;     // UU Coding  $5555 = 'UU'
+  fmtXX          = $5858;     // XX Coding  $5858 = 'XX'
+
+// 2 - 64 reserved for Formats to the Base 2 - 64
+// over 1000 all other Formats
+
+type
+{$IFNDEF VER_D4H}
+  LongWord       = LongInt;
+  PLongWord      = ^LongWord;
+{$ENDIF}
+  PByte          = ^Byte;
+  PInteger       = ^LongWord;
+  PWord          = ^Word;
+  PIntArray      = ^TIntArray;
+  TIntArray      = array[0..1023] of LongWord;
+
+  EROProtection    = class(Exception);
+  EROStringFormat  = class(Exception);
+
+// basic Class for all Protection Classes, TROCipher, TROHash, TRORandom
+// TProtect can build a chain with varios Encryption Algos.
+// i.E. CodeBuffer() can en/decode the Buffer with more as one RO_Cipher when
+// property Protection is set to a other RO_Cipher :-)
+  TPAction  = (paEncode, paDecode, paScramble, paCalc, paWipe);
+  TPActions = set of TPAction;
+
+{$IFDEF VER_D3H}
+  TROProtection = class(TInterfacedObject)
+  private
+{$ELSE}
+  TROProtection = class(TObject)
+  private
+    FRefCount: Integer;
+{$ENDIF}
+    FProtection: TROProtection;
+    FActions: TPActions;
+    function GetProtection: TROProtection;
+    procedure SetProtection(Value: TROProtection);
+  protected
+    procedure CodeInit(Action: TPAction); virtual;
+    procedure CodeDone(Action: TPAction); virtual;
+    procedure CodeBuf(var Buffer; const BufferSize: Integer; Action: TPAction); virtual;
+  public
+    constructor Create(AProtection: TROProtection);
+    destructor Destroy; override;
+
+    class function Identity: Word;
+
+    function Release: Integer;
+    function AddRef: Integer;
+
+    procedure CodeStream(Source, Dest: TStream; DataSize: Integer; Action: TPAction); virtual;
+    procedure CodeFile(const Source, Dest: String; Action: TPAction); virtual;
+    function  CodeString(const Source: AnsiString; Action: TPAction; Format: Integer): AnsiString; virtual;
+    function  CodeBuffer(var Buffer; BufferSize: Integer; Action: TPAction): Integer; virtual;
+// Protection Object, to cascade more Protection
+    property Protection: TROProtection read GetProtection write SetProtection;
+    property Actions: TPActions read FActions write FActions default [paEncode..paWipe];
+{$IFNDEF VER_D3H}
+    property RefCount: Integer read FRefCount;
+{$ENDIF}
+  end;
+
+// String converting
+  
+  TROStringFormatClass = class of TROStringFormat;
+
+  TROStringFormat = class(TObject) // for binary one to one convert = fmtCOPY
+  public
+    class function ToStr(Value: PAnsiChar; Len: Integer): AnsiString; virtual;
+    class function StrTo(Value: PAnsiChar; Len: Integer): AnsiString; virtual;
+    class function Name: String; virtual;
+    class function Format: Integer; virtual;
+    class function IsValid(Value: PAnsiChar; Len: Integer; ToStr: Boolean): Boolean; virtual;
+  end;
+
+  TROStringFormat_HEX = class(TROStringFormat) // Hexadecimal = fmtHEX
+  public
+    class function ToStr(Value: PAnsiChar; Len: Integer): AnsiString; override;
+    class function StrTo(Value: PAnsiChar; Len: Integer): AnsiString; override;
+    class function Name: String; override;
+    class function Format: Integer; override;
+    class function IsValid(Value: PAnsiChar; Len: Integer; ToStr: Boolean): Boolean; override;
+    class function CharTable: PAnsiChar; virtual;
+  end;
+
+  TROStringFormat_HEXL = class(TROStringFormat_HEX) // Hexadecimal lowercase = fmtHEXL
+  public
+    class function Name: String; override;
+    class function Format: Integer; override;
+    class function CharTable: PAnsiChar; override;
+  end;
+
+  TROStringFormat_MIME64 = class(TROStringFormat_HEX)  // MIME Base 64 = fmtMIME64
+  public
+    class function ToStr(Value: PAnsiChar; Len: Integer): AnsiString; override;
+    class function StrTo(Value: PAnsiChar; Len: Integer): AnsiString; override;
+    class function Name: String; override;
+    class function Format: Integer; override;
+    class function CharTable: PAnsiChar; override;
+  end;
+
+  TROStringFormat_UU = class(TROStringFormat) // UU Encode = fmtUU
+  public
+    class function ToStr(Value: PAnsiChar; Len: Integer): AnsiString; override;
+    class function StrTo(Value: PAnsiChar; Len: Integer): AnsiString; override;
+    class function Name: String; override;
+    class function Format: Integer; override;
+    class function IsValid(Value: PAnsiChar; Len: Integer; ToStr: Boolean): Boolean; override;
+    class function CharTable: PAnsiChar; virtual;
+  end;
+
+  TROStringFormat_XX = class(TROStringFormat_UU) // XX Encode = fmtXX
+  public
+    class function Name: String; override;
+    class function Format: Integer; override;
+    class function CharTable: PAnsiChar; override;
+  end;
+
+{Progress (gauge) for RO_Hash and RO_Cipher}
+  TProgressEvent = procedure(Sender: TObject; Current, Maximal: Integer) of Object;
+
+//calculate CRCR16/CRC32 Checksum, CRC is default $FFFFFFFF,
+//after calc you must inverse Result with NOT
+function CRC16(CRC: Word; Data: Pointer; DataSize: LongWord): Word;
+function CRC32(CRC: LongWord; Data: Pointer; DataSize: LongWord): LongWord;
+// the basicly used TestVector for all RO_Hash/RO_Cipher classes
+// used for SelfTest, random Data, don't modify
+function GetTestVector: PAnsiChar; register;
+
+// String/Format routines
+// convert any String to Format
+function StrToFormat(Value: PAnsiChar; Len, Format: Integer): AnsiString;
+// convert any Format to String
+function FormatToStr(Value: PAnsiChar; Len, Format: Integer): AnsiString;
+// convert any Format to Format
+function ConvertFormat(Value: PAnsiChar; Len, FromFormat, ToFormat: Integer): AnsiString;
+// Check is String convertable to Format
+function IsValidString(Value: PAnsiChar; Len, Format: Integer): Boolean;
+// Check is Format an valid Format
+function IsValidFormat(Value: PAnsiChar; Len, Format: Integer): Boolean;
+// register a new Format
+procedure RegisterStringFormats(const StringFormats: array of TROStringFormatClass);
+// give all registered Formats in Strings
+procedure GetStringFormats(Strings: TStrings);
+// the Default, = fmtMIME64
+function DefaultStringFormat: Integer;
+// set the Default
+procedure SetDefaultStringFormat(Format: Integer);
+// give StringFormatClass from Format
+function StringFormat(Format: Integer): TROStringFormatClass;
+// insert #13#10 Chars in Blocks from BlockSize
+function InsertCR(const Value: AnsiString; BlockSize: Integer): AnsiString;
+// delete all #13 and #10 Chars
+function DeleteCR(const Value: AnsiString): AnsiString;
+// format any String to a Block
+function InsertBlocks(const Value, BlockStart, BlockEnd: String; BlockSize: Integer): String;
+// remove any Block format
+function RemoveBlocks(const Value, BlockStart, BlockEnd: String): String;
+// give back a shorter Name, i.E. TROHash_MD4 -> "MD4" or TROCipher_Blowfish -> "Blowfish"
+function GetShortClassName(Value: TClass): String;
+
+// Result := Value shl Shift or Value shr (32 - Shift)
+function ROL(Value: LongWord; Shift: Integer): LongWord;
+// Result := ROL(Value, Shift) + Add
+function ROLADD(Value, Add: LongWord; Shift: Integer): LongWord;
+// Result := ROL(Value, Shift) - Sub
+function ROLSUB(Value, Sub: LongWord; Shift: Integer): LongWord;
+// Result := Value shr Shift or Value shl (32 - Shift)
+function ROR(Value: LongWord; Shift: Integer): LongWord;
+// Result := ROR(Value, Shift) + Add
+function RORADD(Value, Add: LongWord; Shift: Integer): LongWord;
+// Result := ROR(Value, Shift) - Sub
+function RORSUB(Value, Sub: LongWord; Shift: Integer): LongWord;
+// Reverse the Bitorder from Value
+function SwapBits(Value: LongWord): LongWord;
+// Index of Least Significant Bit from Value
+function LSBit(Value: Integer): Integer;
+// Index of Most Significant Bit from Value
+function MSBit(Value: Integer): Integer;
+// Check iff only One Bit is set and give back the Index
+function OneBit(Value: Integer): Integer;
+// Compare Memory, D2 have no CompareMem, Result can be -1, 0, 1
+function MemCompare(P1, P2: Pointer; Size: Integer): Integer;
+// XOR's Buffers I1 and I2 Size Bytes to Dest
+procedure XORBuffers(I1, I2: Pointer; Size: Integer; Dest: Pointer);
+// Processor Type
+function CPUType: Integer; {3 = 386, 4 = 486, 5 = Pentium, 6 > Pentium i.E. PII}
+// call a installed Progress Event
+procedure DoProgress(Sender: TObject; Current, Maximal: Integer);
+// saver Test
+function IsObject(AObject: Pointer; AClass: TClass): Boolean;
+// Time Seed produced from GetSystemTime and QueryPerformanceCounter
+function RndTimeSeed: Integer;
+// XOR Buffer Size Bytes with Seed Randoms,
+// the initial State from Buffer have effect on the Output
+function RndXORBuffer(Seed: Integer; var Buffer; Size: Integer): Integer;
+// encapsulate QueryPerformanceCounter/Frequency
+
+{$IFNDEF DELPHI10UP}
+function PerfCounter: Comp;
+function PerfFreq: Comp;
+{$ENDIF}
+
+const
+  InitTestIsOk        : Boolean  = False;
+  IdentityBase        : Word     = $1234;
+
+{this is set to SwapInt for <= 386 and BSwapInt >= 486 CPU, don't modify}
+  SwapInteger       : function(Value: LongWord): LongWord; register  = nil;
+{Count of Integers Buffer}
+  SwapIntegerBuffer : procedure(Source, Dest: Pointer; Count: Integer); register = nil;
+{Progress callback function, set this to your Progresscallback}
+  Progress: TProgressEvent = nil;
+function AnsiStringToWideString(AValue: AnsiString): WideString;
+function WideStringToAnsiString(AValue: WideString): AnsiString;
+
+implementation
+
+uses Windows, uRODECConst;
+
+function AnsiStringToWideString(AValue: AnsiString): WideString;
+begin
+  {$IFDEF UNICODE} //AnsiStringToWideString
+  Result := StringOf(BytesOf(AValue));
+  {$ELSE}
+  Result := AValue;
+  {$ENDIF}
+end;
+
+function WideStringToAnsiString(AValue: WideString): AnsiString;
+{$IFDEF UNICODE} //WideStringToAnsiString
+var
+  b: TBytes;
+begin
+  b := BytesOf(AValue);
+  SetLength(Result, Length(b));
+  Move(b[0], pointer(Result)^,Length(b));
+end;
+{$ELSE}
+begin
+  Result := AValue;
+end;
+{$ENDIF}
+
+const
+  FCPUType : Integer = 0;
+  FStrFMTs : TList = nil;         // registered Stringformats
+  FStrFMT  : Integer = fmtMIME64; // Default Stringformat
+
+function PerfCounter: Comp;
+{$IFDEF DELPHI2009UP}
+var
+  i: int64;
+{$ENDIF}
+begin
+{$IFDEF DELPHI2009UP}
+  if QueryPerformanceCounter(i) then
+    TULargeInteger(Result).QuadPart := i
+  else
+{$ELSE}
+  {$IFDEF VER_D4H}
+    if not QueryPerformanceCounter(TULargeInteger(Result).QuadPart) then
+  {$ELSE}
+    if not QueryPerformanceCounter(TLargeInteger(Result)) then
+  {$ENDIF}
+{$ENDIF}
+    Result := GetTickCount;
+end;
+
+function PerfFreq: Comp;
+{$IFDEF DELPHI2009UP}
+var
+  i: int64;
+{$ENDIF}
+begin
+{$IFDEF DELPHI2009UP}
+  if QueryPerformanceFrequency(i) then
+    TULargeInteger(Result).QuadPart := i
+  else
+{$ELSE}
+  {$IFDEF VER_D4H}
+    if not QueryPerformanceFrequency(TULargeInteger(Result).QuadPart) then
+  {$ELSE}
+    if not QueryPerformanceFrequency(TLargeInteger(Result)) then
+  {$ENDIF}
+{$ENDIF}  
+    Result := 1000;
+end;
+
+function DefaultStringFormat: Integer;
+begin
+  Result := FStrFMT;
+end;
+
+procedure SetDefaultStringFormat(Format: Integer);
+begin
+  if (Format = fmtDEFAULT) or (StringFormat(Format) = nil) then FStrFMT := fmtMIME64
+    else FStrFMT := Format;
+end;
+
+// TROProtection Class
+function TROProtection.GetProtection: TROProtection;
+begin
+  if (FProtection <> nil) and not IsObject(FProtection, TROProtection) then FProtection := nil;
+  Result := FProtection;
+end;
+
+procedure TROProtection.SetProtection(Value: TROProtection);
+
+  function CheckProtection(P: TROProtection): Boolean;
+  begin
+    Result := True;
+    if IsObject(P, TROProtection) then
+      if P = Self then Result := False
+        else Result := CheckProtection(P.FProtection)
+  end;
+
+begin
+  if Value <> FProtection then
+    if CheckProtection(Value) then
+    begin
+      FProtection.Release;
+      FProtection := Value;
+      FProtection.AddRef;
+    end else raise EROProtection.Create(sProtectionCircular)
+end;
+
+procedure TROProtection.CodeInit(Action: TPAction);
+begin
+  if Protection <> nil then Protection.CodeInit(Action);
+end;
+
+procedure TROProtection.CodeDone(Action: TPAction);
+begin
+  if Protection <> nil then Protection.CodeDone(Action);
+end;
+
+procedure TROProtection.CodeBuf(var Buffer; const BufferSize: Integer; Action: TPAction);
+begin
+  if Protection <> nil then Protection.CodeBuf(Buffer, BufferSize, Action);
+end;
+
+function TROProtection.Release: Integer;
+begin
+  if IsObject(Self, TROProtection) then
+  begin
+{$IFDEF VER_D3H}
+    Result := IUnknown(Self)._Release;
+{$ELSE}
+    Dec(FRefCount);
+    Result := FRefCount;
+    if FRefCount = 0 then Destroy;
+{$ENDIF}
+  end else Result := 0;
+end;
+
+function TROProtection.AddRef: Integer;
+begin
+  if IsObject(Self, TROProtection) then
+  begin
+{$IFDEF VER_D3H}
+    Result := IUnknown(Self)._AddRef;
+{$ELSE}
+    Inc(FRefCount);
+    Result := FRefCount;
+{$ENDIF}
+  end else Result := 0;
+end;
+
+procedure TROProtection.CodeStream(Source, Dest: TStream; DataSize: Integer; Action: TPAction);
+const
+  maxBufSize = 1024 * 4;
+var
+  Buf: PChar;
+  SPos: Integer;
+  DPos: Integer;
+  Len: Integer;
+  Size: Integer;
+begin
+  if Source = nil then Exit;
+  if Dest = nil then Dest := Source;
+  if DataSize < 0 then
+  begin
+    DataSize := Source.Size;
+    Source.Position := 0;
+  end;
+  CodeInit(Action);
+  Buf := nil;
+  Size := DataSize;
+  DoProgress(Self, 0, Size);
+  try
+    Buf    := AllocMem(maxBufSize);
+    DPos   := Dest.Position;
+    SPos   := Source.Position;
+    if Action = paCalc then
+    begin
+      while DataSize > 0 do
+      begin
+        Len := DataSize;
+        if Len > maxBufSize then Len := maxBufSize;
+        Len := Source.Read(Buf^, Len);
+        if Len <= 0 then Break;
+        CodeBuf(Buf^, Len, paCalc);
+        Dec(DataSize, Len);
+        DoProgress(Self, Size - DataSize, Size);
+      end;
+    end else
+    begin
+      while DataSize > 0 do
+      begin
+        Source.Position := SPos;
+        Len := DataSize;
+        if Len > maxBufSize then Len := maxBufSize;
+        Len := Source.Read(Buf^, Len);
+        SPos := Source.Position;
+        if Len <= 0 then Break;
+        CodeBuf(Buf^, Len, Action);
+        Dest.Position := DPos;
+        Dest.Write(Buf^, Len);
+        DPos := Dest.Position;
+        Dec(DataSize, Len);
+        DoProgress(Self, Size - DataSize, Size);
+      end;
+    end;
+  finally
+    DoProgress(Self, 0, 0);
+    ReallocMem(Buf, 0);
+    CodeDone(Action);
+  end;
+end;
+
+procedure TROProtection.CodeFile(const Source, Dest: String; Action: TPAction);
+var
+  S,D: TFileStream;
+begin
+  S := nil;
+  D := nil;
+  try
+    if (AnsiCompareText(Source, Dest) <> 0) and ((Trim(Dest) <> '') or (Action = paCalc)) then
+    begin
+      S := TFileStream.Create(Source, fmOpenRead or fmShareDenyNone);
+      if Action = paCalc then D := S
+        else D := TFileStream.Create(Dest, fmCreate);
+    end else
+    begin
+      S := TFileStream.Create(Source, fmOpenReadWrite);
+      D := S;
+    end;
+    CodeStream(S, D, S.Size, Action);
+  finally
+    S.Free;
+    if S <> D then
+    begin
+{$IFDEF VER_D3H}
+      D.Size := D.Position;
+{$ENDIF}
+      D.Free;
+    end;
+  end;
+end;
+
+function TROProtection.CodeBuffer(var Buffer; BufferSize: Integer; Action: TPAction): Integer;
+begin
+  Result := BufferSize;
+  CodeInit(Action);
+  try
+    CodeBuf(Buffer, BufferSize, Action);
+  finally
+    CodeDone(Action);
+  end;
+end;
+
+function TROProtection.CodeString(const Source: AnsiString; Action: TPAction; Format: Integer): AnsiString;
+var
+  M: TMemoryStream;
+begin
+  Result := '';
+  if Length(Source) <= 0 then Exit;
+  M := TMemoryStream.Create;
+  try
+    if Action <> paDecode then Result := Source
+      else Result := FormatToStr(PAnsiChar(Source), Length(Source), Format);
+    M.Write(PAnsiChar(Result)^, Length(Result));
+    M.Position := 0;
+    CodeStream(M, M, M.Size, Action);
+    if Action = paDecode then
+    begin
+      SetLength(Result, M.Size);
+      Move(M.Memory^, PAnsiChar(Result)^, M.Size);
+    end else
+      Result := StrToFormat(M.Memory, M.Size, Format);
+  finally
+    M.Free;
+  end;
+end;
+
+constructor TROProtection.Create(AProtection: TROProtection);
+begin
+  inherited Create;
+  Protection := AProtection;
+  FActions := [paEncode..paWipe];
+end;
+
+destructor TROProtection.Destroy;
+begin
+  Protection := nil;
+  inherited Destroy;
+end;
+
+class function TROProtection.Identity: Word;
+var
+  S: String;
+begin
+  S := ClassName;
+  Result := not CRC16(IdentityBase, PChar(S), Length(S));
+end;
+
+class function TROStringFormat.ToStr(Value: PAnsiChar; Len: Integer): AnsiString;
+begin
+  SetLength(Result, Len);
+  Move(Value^, PAnsiChar(Result)^, Len);
+end;
+
+class function TROStringFormat.StrTo(Value: PAnsiChar; Len: Integer): AnsiString;
+begin
+  SetLength(Result, Len);
+  Move(Value^, PAnsiChar(Result)^, Len);
+end;
+
+class function TROStringFormat.Name: String;
+begin
+  if Self = TROStringFormat then Result := sFMT_COPY
+    else Result := GetShortClassName(Self);
+end;
+
+class function TROStringFormat.Format: Integer;
+begin
+  Result := fmtCOPY;
+end;
+
+class function TROStringFormat.IsValid(Value: PAnsiChar; Len: Integer; ToStr: Boolean): Boolean;
+begin
+  Result := True;
+end;
+
+function TableFind(Value: AnsiChar; Table: PAnsiChar; Len: Integer): Integer; assembler;
+asm // Utility for TStringFormat_XXXXX
+      PUSH  EDI
+      MOV   EDI,EDX
+      REPNE SCASB
+      MOV   EAX,0
+      JNE   @@1
+      MOV   EAX,EDI
+      SUB   EAX,EDX
+@@1:  DEC   EAX
+      POP   EDI
+end;
+
+class function TROStringFormat_HEX.ToStr(Value: PAnsiChar; Len: Integer): AnsiString;
+var
+  D: PByte;
+  T: PAnsiChar;
+  I,P: Integer;
+  HasIdent: Boolean;
+begin
+  Result := '';
+  if Value = nil then Exit;
+  if Len < 0 then Len := StrLen(Value);
+  if Len = 0 then Exit;
+  SetLength(Result, Len div 2 +1);
+  T := CharTable;
+  D := PByte(Result);
+  I := 0;
+  HasIdent := False;
+  while Len > 0 do
+  begin
+    P := TableFind(UpCase(Value^), T, 18);
+    Inc(Value);
+    if P >= 0 then
+      if P > 16 then
+      begin
+        if not HasIdent then
+        begin
+          HasIdent := True;
+          I := 0;
+          D := PByte(Result);
+        end;
+      end else
+      begin
+        if Odd(I) then
+        begin
+          D^ := D^ or P;
+          Inc(D);
+        end else D^ := P shl 4;
+        Inc(I);
+      end;
+    Dec(Len);
+  end;
+  SetLength(Result, PAnsiChar(D) - PAnsiChar(Result));
+end;
+
+class function TROStringFormat_HEX.StrTo(Value: PAnsiChar; Len: Integer): AnsiString;
+var
+  D,T: PAnsiChar;
+begin
+  Result := '';
+  if Value = nil then Exit;
+  if Len < 0 then Len := StrLen(Value);
+  if Len = 0 then Exit;
+  SetLength(Result, Len * 2);
+  T := CharTable;
+  D := PAnsiChar(Result);
+  while Len > 0 do
+  begin
+    D[0] := T[Byte(Value^) shr  4];
+    D[1] := T[Byte(Value^) and $F];
+    Inc(D, 2);
+    Inc(Value);
+    Dec(Len);
+  end;
+end;
+
+class function TROStringFormat_HEX.IsValid(Value: PAnsiChar; Len: Integer; ToStr: Boolean): Boolean;
+var
+  T: PAnsiChar;
+  L: Integer;
+begin
+  Result := not ToStr;
+  if not Result then
+  begin
+    T := CharTable;
+    L := StrLen(T);
+    while Len > 0 do
+      if TableFind(Value^, T, L) >= 0 then
+      begin
+        Dec(Len);
+        Inc(Value);
+      end else Exit;
+  end;
+  Result := True;
+end;
+
+class function TROStringFormat_HEX.Name: String;
+begin
+  Result := sFMT_HEX;
+end;
+
+class function TROStringFormat_HEX.Format: Integer;
+begin
+  Result := fmtHEX;
+end;
+
+class function TROStringFormat_HEX.CharTable: PAnsiChar; assembler;
+asm
+      MOV  EAX,OFFSET @@1
+      RET
+@@1:  DB   '0123456789ABCDEF'     // Table must be >= 18 Chars
+      DB   'X$ abcdefhHx()[]{},;:-_/\*+"''',9,10,13,0
+end;
+
+class function TROStringFormat_HEXL.Name: String;
+begin
+  Result := sFMT_HEXL;
+end;
+
+class function TROStringFormat_HEXL.Format: Integer;
+begin
+  Result := fmtHEXL;
+end;
+
+class function TROStringFormat_HEXL.CharTable: PAnsiChar;
+asm
+      MOV  EAX,OFFSET @@1
+      RET
+@@1:  DB   '0123456789abcdef'     // Table must be >= 18 Chars
+      DB   'X$ ABCDEFhHx()[]{},;:-_/\*+"''',9,10,13,0
+end;
+
+class function TROStringFormat_MIME64.ToStr(Value: PAnsiChar; Len: Integer): AnsiString;
+var
+  B: Cardinal;
+  J,I: Integer;
+  S,D,L,T: PAnsiChar;
+begin
+  Result := '';
+  if Value = nil then Exit;
+  if Len < 0 then Len := Length(Value);
+  if Len = 0 then Exit;
+  SetLength(Result, Len);
+  Move(PAnsiChar(Value)^, PAnsiChar(Result)^, Len);
+  T := CharTable;
+  while Len mod 4 <> 0 do
+  begin
+    Result := Result + T[64];
+    Inc(Len);
+  end;
+  D := PAnsiChar(Result);
+  S := D;
+  L := S + Len;
+  Len := Len * 3 div 4;
+  while Len > 0 do
+  begin
+    B := 0;
+    J := 4;
+    while (J > 0) and (S <= L) do
+    begin
+      I := TableFind(S^, T, 65);
+      if I >= 0 then
+      begin
+        B := B shl 6;
+        if I >= 64 then Dec(Len) else B := B or Byte(I);
+        Dec(J);
+      end;
+      Inc(S);
+    end;
+    J := 2;
+    repeat
+      D[J] := AnsiChar(B);
+      B := B shr 8;
+      Dec(J);
+    until J < 0;
+    if Len > 3 then Inc(D, 3) else Inc(D, Len);
+    Dec(Len, 3);
+  end;
+  SetLength(Result, D - PAnsiChar(Result));
+end;
+
+class function TROStringFormat_MIME64.StrTo(Value: PAnsiChar; Len: Integer): AnsiString;
+var
+  B: Cardinal;
+  I: Integer;
+  D,T: PAnsiChar;
+begin
+  Result := '';
+  if Value = nil then Exit;
+  if Len < 0 then Len := StrLen(Value);
+  if Len = 0 then Exit;
+  SetLength(Result, Len * 4 div 3 + 4);
+  D := PAnsiChar(Result);
+  T := CharTable;
+  while Len > 0 do
+  begin
+    B := 0;
+    for I := 0 to 2 do
+    begin
+      B := B shl 8;
+      if Len > 0 then
+      begin
+        B := B or Byte(Value^);
+        Inc(Value);
+      end;
+      Dec(Len);
+    end;
+    for I := 3 downto 0 do
+    begin
+      if Len < 0 then
+      begin
+        D[I] := T[64];
+        Inc(Len);
+      end else D[I] := T[B and $3F];
+      B := B shr 6;
+    end;
+    Inc(D, 4);
+  end;
+  SetLength(Result, D - PAnsiChar(Result));
+end;
+
+class function TROStringFormat_MIME64.Name: String;
+begin
+  Result := sFMT_MIME64;
+end;
+
+class function TROStringFormat_MIME64.Format: Integer;
+begin
+  Result := fmtMIME64;
+end;
+
+class function TROStringFormat_MIME64.CharTable: PAnsiChar; assembler;
+asm
+      MOV  EAX,OFFSET @@1
+      RET  // must be >= 65 Chars
+@@1:  DB  'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/='
+      DB  ' $()[]{},;:-_\*"''',9,10,13,0
+end;
+
+class function TROStringFormat_UU.ToStr(Value: PAnsiChar; Len: Integer): AnsiString;
+var
+  T,D,L: PAnsiChar;
+  I,E: Integer;
+  B: Cardinal;
+begin
+  Result := '';
+  if Value = nil then Exit;
+  if Len < 0 then Len := StrLen(Value);
+  if Len = 0 then Exit;
+  SetLength(Result, Len);
+  L := Value + Len;
+  D := PAnsiChar(Result);
+  T := CharTable;
+  repeat
+    Len := TableFind(Value^, T, 64);
+    if (Len < 0) or (Len > 45) then
+      raise EROStringFormat.CreateFMT(sInvalidStringFormat, [Name]);
+    Inc(Value);
+    while Len > 0 do
+    begin
+      B := 0;
+      I := 4;
+      while (I > 0) and (Value <= L) do
+      begin
+        E := TableFind(Value^, T, 64);
+        if E >= 0 then
+        begin
+          B := B shl 6 or Byte(E);
+          Dec(I);
+        end;
+        Inc(Value);
+      end;
+      I := 2;
+      repeat
+        D[I] := AnsiChar(B);
+        B    := B shr 8;
+        Dec(I);
+      until I < 0;
+      if Len > 3 then Inc(D, 3) else Inc(D, Len);
+      Dec(Len, 3);
+    end;
+  until Value >= L;
+  SetLength(Result, D - PAnsiChar(Result));
+end;
+
+class function TROStringFormat_UU.StrTo(Value: PAnsiChar; Len: Integer): AnsiString;
+var
+  T,D: PAnsiChar;
+  L,I: Integer;
+  B: Cardinal;
+begin
+  Result := '';
+  if Value = nil then Exit;
+  if Len < 0 then Len := StrLen(Value);
+  if Len = 0 then Exit;
+  SetLength(Result, Len * 4 div 3 + Len div 45 + 10);
+  D := PAnsiChar(Result);
+  T := CharTable;
+  while Len > 0 do
+  begin
+    L := Len;
+    if L > 45 then L := 45;
+    Dec(Len, L);
+    D^ := T[L];
+    while L > 0 do
+    begin
+      B := 0;
+      for I := 0 to 2 do
+      begin
+        B := B shl 8;
+        if L > 0 then
+        begin
+          B := B or Byte(Value^);
+          Inc(Value);
+        end;
+        Dec(L);
+      end;
+      for I := 4 downto 1 do
+      begin
+        D[I] := T[B and $3F];
+        B := B shr 6;
+      end;
+      Inc(D, 4);
+    end;
+    Inc(D);
+  end;
+  SetLength(Result, D - PAnsiChar(Result));
+end;
+
+class function TROStringFormat_UU.Name: String;
+begin
+  Result := sFMT_UU;
+end;
+
+class function TROStringFormat_UU.Format: Integer;
+begin
+  Result := fmtUU;
+end;
+
+class function TROStringFormat_UU.IsValid(Value: PAnsiChar; Len: Integer; ToStr: Boolean): Boolean;
+var
+  T: PAnsiChar;
+  L,I,P: Integer;
+begin
+  Result := not ToStr;
+  if not Result then
+  begin
+    T := CharTable;
+    L := StrLen(T);
+    P := 0;
+    while Len > 0 do
+    begin
+      I := TableFind(Value^, T, L);
+      if I >= 0 then
+      begin
+        Dec(Len);
+        Inc(Value);
+        if P = 0 then
+        begin
+          if I > 45 then Exit;
+          P := (I * 4 + 2) div 3;
+        end else
+          if I < 64 then Dec(P);
+      end else Exit;
+    end;
+    if P <> 0 then Exit;
+  end;
+  Result := True;
+end;
+
+class function TROStringFormat_UU.CharTable: PAnsiChar;
+asm
+      MOV  EAX,OFFSET @@1
+      RET  // must be >= 64 Chars
+@@1:  DB   '`!"#$%&''()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_'
+      DB   ' ',9,10,13,0
+end;
+
+class function TROStringFormat_XX.Name: String;
+begin
+  Result := sFMT_XX;
+end;
+
+class function TROStringFormat_XX.Format: Integer;
+begin
+  Result := fmtXX;
+end;
+
+class function TROStringFormat_XX.CharTable: PAnsiChar;
+asm
+      MOV  EAX,OFFSET @@1
+      RET
+@@1:  DB   '+-0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz'
+      DB   ' "()[]''',9,10,13,0
+end;
+
+function CPUType: Integer;
+begin
+  Result := FCPUType;
+end;
+
+function IsObject(AObject: Pointer; AClass: TClass): Boolean;
+var
+  E: Pointer;
+begin
+  Result := False;
+  if AObject = nil then Exit;
+  E := ExceptionClass;
+  ExceptionClass := nil;
+  try
+    if TObject(AObject) is AClass then Result := True;
+  except
+  end;
+  ExceptionClass := E;
+end;
+
+function ROL(Value: LongWord; Shift: Integer): LongWord; assembler;
+asm
+       MOV   ECX,EDX
+       ROL   EAX,CL
+end;
+
+function ROLADD(Value, Add: LongWord; Shift: Integer): LongWord; assembler;
+asm
+       ROL   EAX,CL
+       ADD   EAX,EDX
+end;
+
+function ROLSUB(Value, Sub: LongWord; Shift: Integer): LongWord; assembler;
+asm
+       ROL   EAX,CL
+       SUB   EAX,EDX
+end;
+
+function ROR(Value: LongWord; Shift: Integer): LongWord; assembler;
+asm
+       MOV   ECX,EDX
+       ROR   EAX,CL
+end;
+
+function RORADD(Value, Add: LongWord; Shift: Integer): LongWord; assembler;
+asm
+       ROR  EAX,CL
+       ADD  EAX,EDX
+end;
+
+function RORSUB(Value, Sub: LongWord; Shift: Integer): LongWord; assembler;
+asm
+       ROR  EAX,CL
+       SUB  EAX,EDX
+end;
+{swap 4 Bytes Intel, Little/Big Endian Conversion}
+function SwapInt(Value: LongWord): LongWord; assembler; register;
+asm
+       XCHG  AH,AL
+       ROL   EAX,16
+       XCHG  AH,AL
+end;
+
+function BSwapInt(Value: LongWord): LongWord; assembler; register;
+asm
+       BSWAP  EAX
+end;
+
+procedure SwapIntBuf(Source,Dest: Pointer; Count: Integer); assembler; register;
+asm
+       TEST   ECX,ECX
+       JLE    @Exit
+       PUSH   EBX
+       SUB    EAX,4
+       SUB    EDX,4
+@@1:   MOV    EBX,[EAX + ECX * 4]
+       XCHG   BL,BH
+       ROL    EBX,16
+       XCHG   BL,BH
+       MOV    [EDX + ECX * 4],EBX
+       DEC    ECX
+       JNZ    @@1
+       POP    EBX
+@Exit:
+end;
+
+procedure BSwapIntBuf(Source, Dest: Pointer; Count: Integer); assembler; register;
+asm
+       TEST   ECX,ECX
+       JLE    @Exit
+       PUSH   EBX
+       SUB    EAX,4
+       SUB    EDX,4
+@@1:   MOV    EBX,[EAX + ECX * 4]
+       BSWAP  EBX
+       MOV    [EDX + ECX * 4],EBX
+       DEC    ECX
+       JNZ    @@1
+       POP    EBX
+@Exit:
+end;
+{reverse the bit order from a integer}
+function SwapBits(Value: LongWord): LongWord;
+asm
+       CMP    FCPUType,3
+       JLE    @@1
+       BSWAP  EAX
+       JMP    @@2
+@@1:   XCHG   AH,AL
+       ROL    EAX,16
+       XCHG   AH,AL
+@@2:   MOV    EDX,EAX
+       AND    EAX,0AAAAAAAAh
+       SHR    EAX,1
+       AND    EDX,055555555h
+       SHL    EDX,1
+       OR     EAX,EDX
+       MOV    EDX,EAX
+       AND    EAX,0CCCCCCCCh
+       SHR    EAX,2
+       AND    EDX,033333333h
+       SHL    EDX,2
+       OR     EAX,EDX
+       MOV    EDX,EAX
+       AND    EAX,0F0F0F0F0h
+       SHR    EAX,4
+       AND    EDX,00F0F0F0Fh
+       SHL    EDX,4
+       OR     EAX,EDX
+end;
+
+function LSBit(Value: Integer): Integer; assembler;
+asm
+       BSF   EAX,EAX
+end;
+
+function MSBit(Value: Integer): Integer; assembler;
+asm
+       BSR   EAX,EAX
+end;
+
+function OneBit(Value: Integer): Integer; assembler;
+asm
+       MOV   ECX,EAX
+       MOV   EDX,EAX
+       BSF   EDX,EDX
+       JZ    @@1
+       BSR   ECX,ECX
+       CMP   ECX,EDX
+       JNE   @@1
+       MOV   EAX,EDX
+       RET
+@@1:   XOR   EAX,EAX
+end;
+
+function MemCompare(P1, P2: Pointer; Size: Integer): Integer; assembler; register;
+asm
+       PUSH    ESI
+       PUSH    EDI
+       MOV     ESI,P1
+       MOV     EDI,P2
+       XOR     EAX,EAX
+       REPE    CMPSB
+       JE      @@1
+       MOVZX   EAX,BYTE PTR [ESI-1]
+       MOVZX   EDX,BYTE PTR [EDI-1]
+       SUB     EAX,EDX
+@@1:   POP     EDI
+       POP     ESI
+end;
+
+procedure XORBuffers(I1, I2: Pointer; Size: Integer; Dest: Pointer); assembler;
+asm
+       AND   ECX,ECX
+       JZ    @@5
+       PUSH  ESI
+       PUSH  EDI
+       MOV   ESI,EAX
+       MOV   EDI,Dest
+@@1:   TEST  ECX,3
+       JNZ   @@3
+@@2:   SUB   ECX,4
+       JL    @@4
+       MOV   EAX,[ESI + ECX]
+       XOR   EAX,[EDX + ECX]
+       MOV   [EDI + ECX],EAX
+       JMP   @@2
+@@3:   DEC   ECX
+       MOV   AL,[ESI + ECX]
+       XOR   AL,[EDX + ECX]
+       MOV   [EDI + ECX],AL
+       JMP   @@1
+@@4:   POP   EDI
+       POP   ESI
+@@5:
+end;
+
+procedure DoProgress(Sender: TObject; Current, Maximal: Integer);
+begin
+{saver access}
+  if (TMethod(Progress).Code <> nil) and
+     ((TMethod(Progress).Data = nil) or
+       IsObject(TMethod(Progress).Data, TObject)) then
+    Progress(Sender, Current, Maximal);
+end;
+
+function StringFormat(Format: Integer): TROStringFormatClass;
+var
+  I: Integer;
+begin
+  if Format = fmtDefault then Format := DefaultStringFormat;
+  Result := nil;
+  if FStrFmts <> nil then
+    for I := 0 to FStrFMTs.Count-1 do
+      if TROStringFormatClass(FStrFmts[I]).Format = Format then
+      begin
+        Result := FStrFMTS[I];
+        Exit;
+      end;
+end;
+
+function StrToFormat(Value: PAnsiChar; Len, Format: Integer): AnsiString;
+var
+  Fmt: TROStringFormatClass;
+begin
+  Result := '';
+  if (Value = nil) or (Format = fmtNONE) then Exit;
+  if Len <  0 then Len := StrLen(Value);
+  if Len <= 0 then Exit;
+  Fmt := StringFormat(Format);
+  if Fmt <> nil then
+    if Fmt.IsValid(Value, Len, False) then Result := Fmt.StrTo(Value, Len)
+      else raise EROStringFormat.CreateFMT(sInvalidFormatString, [FMT.Name])
+    else raise EROStringFormat.CreateFMT(sStringFormatExists, [Format]);
+end;
+
+function FormatToStr(Value: PAnsiChar; Len, Format: Integer): AnsiString;
+var
+  Fmt: TROStringFormatClass;
+begin
+  Result := '';
+  if (Value = nil) or (Format = fmtNONE) then Exit;
+  if Len < 0 then Len := StrLen(Value);
+  if Len = 0 then Exit;
+  Fmt := StringFormat(Format);
+  if Fmt <> nil then
+    if Fmt.IsValid(Value, Len, True) then Result := Fmt.ToStr(Value, Len)
+      else raise EROStringFormat.CreateFMT(sInvalidStringFormat, [FMT.Name])
+    else raise EROStringFormat.CreateFMT(sStringFormatExists, [Format]);
+end;
+
+function ConvertFormat(Value: PAnsiChar; Len, FromFormat, ToFormat: Integer): AnsiString;
+begin
+  Result := '';
+  if (FromFormat = fmtNONE) or (ToFormat = fmtNONE) then Exit;
+  if FromFormat <> ToFormat then
+  begin
+    Result := FormatToStr(Value, Len, FromFormat);
+    Result := StrToFormat(PAnsiChar(Result), Length(Result), ToFormat);
+  end else
+  begin
+    if Value = nil then Exit;
+    if Len < 0 then Len := StrLen(Value);
+    if Len = 0 then Exit;
+    SetLength(Result, Len);
+    Move(Value^, PAnsiChar(Result)^, Len);
+  end;
+end;
+
+function IsValidFormat(Value: PAnsiChar; Len, Format: Integer): Boolean;
+var
+  Fmt: TROStringFormatClass;
+begin
+  Result := True;
+  if Value = nil then Exit;
+  if Len < 0 then Len := StrLen(Value);
+  if Len = 0 then Exit;
+  Fmt := StringFormat(Format);
+  if Fmt = nil then Result := False
+    else Result := Fmt.IsValid(Value, Len, True);
+end;
+
+function IsValidString(Value: PAnsiChar; Len, Format: Integer): Boolean;
+var
+  Fmt: TROStringFormatClass;
+begin
+  Result := True;
+  if Value = nil then Exit;
+  if Len < 0 then Len := StrLen(Value);
+  if Len = 0 then Exit;
+  Fmt := StringFormat(Format);
+  if Fmt = nil then Result := False
+    else Result := Fmt.IsValid(Value, Len, False);
+end;
+
+procedure RegisterStringFormats(const StringFormats: array of TROStringFormatClass);
+var
+  I,J: Integer;
+  FMT: TROStringFormatClass;
+begin
+  if FStrFMTs = nil then FStrFMTs := TList.Create;
+  for I := Low(StringFormats) to High(StringFormats) do
+    if (StringFormats[I] <> nil) and
+       (StringFormats[I].Format <> fmtDEFAULT) then
+    begin
+      FMT := StringFormat(StringFormats[I].Format);
+      if FMT <> nil then
+      begin
+        J := FStrFMTs.IndexOf(FMT);
+        FStrFMTs[J] := StringFormats[I];
+      end else FStrFMTs.Add(StringFormats[I]);
+    end;
+end;
+
+procedure GetStringFormats(Strings: TStrings);
+var
+  I: Integer;
+begin
+  if IsObject(Strings, TStrings) and (FStrFMTs <> nil) then
+    for I := 0 to FStrFMTs.Count-1 do
+      Strings.AddObject(TROStringFormatClass(FStrFMTs[I]).Name, FStrFMTs[I]);
+end;
+
+function InsertCR(const Value: AnsiString; BlockSize: Integer): AnsiString;
+var
+  I: Integer;
+  S,D: PAnsiChar;
+begin
+  if (BlockSize <= 0) or (Length(Value) <= BlockSize) then
+  begin
+    Result := Value;
+    Exit;
+  end;
+  I := Length(Value);
+  SetLength(Result, I + I * 2 div BlockSize + 2);
+  S := PAnsiChar(Value);
+  D := PAnsiChar(Result);
+  repeat
+    Move(S^, D^, BlockSize);
+    Inc(S, BlockSize);
+    Inc(D, BlockSize);
+    D^ := #13; Inc(D);
+    D^ := #10; Inc(D);
+    Dec(I, BlockSize);
+  until I < BlockSize;
+  Move(S^, D^, I);
+  Inc(D, I);
+  SetLength(Result, D - PAnsiChar(Result));
+end;
+
+function DeleteCR(const Value: AnsiString): AnsiString;
+var
+  S,D: PAnsiChar;
+  I: Integer;
+begin
+  I := Length(Value);
+  SetLength(Result, I);
+  D := PAnsiChar(Result);
+  S := PAnsiChar(Value);
+  while I > 0 do
+  begin
+    if (S^ <> AnsiChar(#10)) and (S^ <> AnsiChar(#13)) then
+    begin
+      D^ := S^;
+      Inc(D);
+    end;
+    Inc(S);
+    Dec(I);
+  end;
+  SetLength(Result, D - PAnsiChar(Result));
+end;
+
+function InsertBlocks(const Value, BlockStart, BlockEnd: String; BlockSize: Integer): String;
+var
+  I,LS,LE: Integer;
+  D,S: PChar;
+begin
+  if (BlockSize <= 0) or (Length(Value) <= BlockSize) then
+  begin
+    Result := Value;
+    Exit;
+  end;
+  I := Length(Value);
+  LS := Length(BlockStart);
+  LE := Length(BlockEnd);
+  SetLength(Result, I + (I div BlockSize + 1) * (LS + LE));
+  S := PChar(Value);
+  D := PChar(Result);
+  repeat
+    Move(PChar(BlockStart)^, D^, LS); Inc(D, LS);
+    Move(S^, D^, BlockSize);          Inc(D, BlockSize);
+    Move(PChar(BlockEnd)^, D^, LE);   Inc(D, LE);
+    Dec(I, BlockSize);
+    Inc(S, BlockSize);
+  until I < BlockSize;
+  if I > 0 then
+  begin
+    Move(PChar(BlockStart)^, D^, LS); Inc(D, LS);
+    Move(S^, D^, I);                  Inc(D, I);
+    Move(PChar(BlockEnd)^, D^, LE);   Inc(D, LE);
+  end;
+  SetLength(Result, D - PChar(Result));
+end;
+
+function RemoveBlocks(const Value, BlockStart, BlockEnd: String): String;
+var
+  LS,LE: Integer;
+  S,D,L,K: PChar;
+begin
+  SetLength(Result, Length(Value));
+  LS := Length(BlockStart);
+  LE := Length(BlockEnd);
+  D := PChar(Result);
+  S := PChar(Value);
+  L := S + Length(Value);
+
+  repeat
+    if S > L then Break;
+    if LS > 0 then
+    begin
+      S := StrPos(S, PChar(BlockStart));
+      if S = nil then Break;
+      Inc(S, LS);
+      if S > L then Break;
+    end;
+    K := StrPos(S, PChar(BlockEnd));
+    if K = nil then K := L;
+    Move(S^, D^, K - S);
+    Inc(D, K - S);
+    S := K + LE;
+  until S >= L;
+  SetLength(Result, D - PChar(Result));
+end;
+
+function GetShortClassName(Value: TClass): String;
+var
+  I: Integer;
+begin
+  Result := '';
+  if Value = nil then Exit;
+  Result := Value.ClassName;
+  I := Pos('_', Result);
+  if I > 0 then Delete(Result, 1, I);
+end;
+
+function RndXORBuffer(Seed: Integer; var Buffer; Size: Integer): Integer; assembler;
+asm
+      AND     EDX,EDX
+      JZ      @@2
+      AND     ECX,ECX
+      JLE     @@2
+      PUSH    EBX
+@@1:  XOR     AL,[EDX]
+      IMUL    EAX,EAX,134775813
+      INC     EAX
+      MOV     EBX,EAX
+      SHR     EBX,24
+      MOV     [EDX],BL
+      INC     EDX
+      DEC     ECX
+      JNZ     @@1
+      POP     EBX
+@@2:
+end;
+
+// use Systemtime and XOR's with Performancecounter
+function RndTimeSeed: Integer; assembler;
+var
+  SysTime: record
+             Year: Word;
+             Month: Word;
+             DayOfWeek: Word;
+             Day: Word;
+             Hour: Word;
+             Minute: Word;
+             Second: Word;
+             MilliSeconds: Word;
+             Reserved: array [0..7] of Byte;
+           end;
+  Counter: record
+             Lo,Hi: Integer;
+           end;
+asm
+      LEA     EAX,SysTime
+      PUSH    EAX
+      CALL    GetSystemTime
+      MOVZX   EAX,Word Ptr SysTime.Hour
+      IMUL    EAX,60
+      ADD     AX,SysTime.Minute
+      IMUL    EAX,60
+      MOVZX   EDX,Word Ptr SysTime.Second
+      ADD     EAX,EDX
+      IMUL    EAX,1000
+      MOV     DX,SysTime.MilliSeconds
+      ADD     EAX,EDX
+      PUSH    EAX
+      LEA     EAX,Counter
+      PUSH    EAX
+      CALL    QueryPerformanceCounter
+      POP     EAX
+      XOR     EAX,Counter.Lo
+      XOR     EAX,Counter.Hi
+end;
+
+function CRC16(CRC: Word; Data: Pointer; DataSize: LongWord): Word; assembler;
+asm
+         AND    EDX,EDX
+         JZ     @Exit
+         AND    ECX,ECX
+         JLE    @Exit
+         PUSH   EBX
+         PUSH   EDI
+         XOR    EBX,EBX
+         LEA    EDI,CS:[OFFSET @CRC16]
+@Start:  MOV    BL,[EDX]
+         XOR    BL,AL
+         SHR    AX,8
+         XOR    AX,[EDI + EBX * 2]
+         INC    EDX
+         DEC    ECX
+         JNZ    @Start
+         POP    EDI
+         POP    EBX
+@Exit:   RET
+         NOP
+@CRC16:  DW     00000h, 0C0C1h, 0C181h, 00140h, 0C301h, 003C0h, 00280h, 0C241h
+         DW     0C601h, 006C0h, 00780h, 0C741h, 00500h, 0C5C1h, 0C481h, 00440h
+         DW     0CC01h, 00CC0h, 00D80h, 0CD41h, 00F00h, 0CFC1h, 0CE81h, 00E40h
+         DW     00A00h, 0CAC1h, 0CB81h, 00B40h, 0C901h, 009C0h, 00880h, 0C841h
+         DW     0D801h, 018C0h, 01980h, 0D941h, 01B00h, 0DBC1h, 0DA81h, 01A40h
+         DW     01E00h, 0DEC1h, 0DF81h, 01F40h, 0DD01h, 01DC0h, 01C80h, 0DC41h
+         DW     01400h, 0D4C1h, 0D581h, 01540h, 0D701h, 017C0h, 01680h, 0D641h
+         DW     0D201h, 012C0h, 01380h, 0D341h, 01100h, 0D1C1h, 0D081h, 01040h
+         DW     0F001h, 030C0h, 03180h, 0F141h, 03300h, 0F3C1h, 0F281h, 03240h
+         DW     03600h, 0F6C1h, 0F781h, 03740h, 0F501h, 035C0h, 03480h, 0F441h
+         DW     03C00h, 0FCC1h, 0FD81h, 03D40h, 0FF01h, 03FC0h, 03E80h, 0FE41h
+         DW     0FA01h, 03AC0h, 03B80h, 0FB41h, 03900h, 0F9C1h, 0F881h, 03840h
+         DW     02800h, 0E8C1h, 0E981h, 02940h, 0EB01h, 02BC0h, 02A80h, 0EA41h
+         DW     0EE01h, 02EC0h, 02F80h, 0EF41h, 02D00h, 0EDC1h, 0EC81h, 02C40h
+         DW     0E401h, 024C0h, 02580h, 0E541h, 02700h, 0E7C1h, 0E681h, 02640h
+         DW     02200h, 0E2C1h, 0E381h, 02340h, 0E101h, 021C0h, 02080h, 0E041h
+         DW     0A001h, 060C0h, 06180h, 0A141h, 06300h, 0A3C1h, 0A281h, 06240h
+         DW     06600h, 0A6C1h, 0A781h, 06740h, 0A501h, 065C0h, 06480h, 0A441h
+         DW     06C00h, 0ACC1h, 0AD81h, 06D40h, 0AF01h, 06FC0h, 06E80h, 0AE41h
+         DW     0AA01h, 06AC0h, 06B80h, 0AB41h, 06900h, 0A9C1h, 0A881h, 06840h
+         DW     07800h, 0B8C1h, 0B981h, 07940h, 0BB01h, 07BC0h, 07A80h, 0BA41h
+         DW     0BE01h, 07EC0h, 07F80h, 0BF41h, 07D00h, 0BDC1h, 0BC81h, 07C40h
+         DW     0B401h, 074C0h, 07580h, 0B541h, 07700h, 0B7C1h, 0B681h, 07640h
+         DW     07200h, 0B2C1h, 0B381h, 07340h, 0B101h, 071C0h, 07080h, 0B041h
+         DW     05000h, 090C1h, 09181h, 05140h, 09301h, 053C0h, 05280h, 09241h
+         DW     09601h, 056C0h, 05780h, 09741h, 05500h, 095C1h, 09481h, 05440h
+         DW     09C01h, 05CC0h, 05D80h, 09D41h, 05F00h, 09FC1h, 09E81h, 05E40h
+         DW     05A00h, 09AC1h, 09B81h, 05B40h, 09901h, 059C0h, 05880h, 09841h
+         DW     08801h, 048C0h, 04980h, 08941h, 04B00h, 08BC1h, 08A81h, 04A40h
+         DW     04E00h, 08EC1h, 08F81h, 04F40h, 08D01h, 04DC0h, 04C80h, 08C41h
+         DW     04400h, 084C1h, 08581h, 04540h, 08701h, 047C0h, 04680h, 08641h
+         DW     08201h, 042C0h, 04380h, 08341h, 04100h, 081C1h, 08081h, 04040h
+end;
+
+function CRC32(CRC: LongWord; Data: Pointer; DataSize: LongWord): LongWord; assembler;
+asm
+         AND    EDX,EDX
+         JZ     @Exit
+         AND    ECX,ECX
+         JLE    @Exit
+         PUSH   EBX
+         PUSH   EDI
+         XOR    EBX,EBX
+         LEA    EDI,CS:[OFFSET @CRC32]
+@Start:  MOV    BL,AL
+         SHR    EAX,8
+         XOR    BL,[EDX]
+         XOR    EAX,[EDI + EBX * 4]
+         INC    EDX
+         DEC    ECX
+         JNZ    @Start
+         POP    EDI
+         POP    EBX
+@Exit:   RET
+         DB 0, 0, 0, 0, 0 // Align Table
+@CRC32:  DD 000000000h, 077073096h, 0EE0E612Ch, 0990951BAh
+         DD 0076DC419h, 0706AF48Fh, 0E963A535h, 09E6495A3h
+         DD 00EDB8832h, 079DCB8A4h, 0E0D5E91Eh, 097D2D988h
+         DD 009B64C2Bh, 07EB17CBDh, 0E7B82D07h, 090BF1D91h
+         DD 01DB71064h, 06AB020F2h, 0F3B97148h, 084BE41DEh
+         DD 01ADAD47Dh, 06DDDE4EBh, 0F4D4B551h, 083D385C7h
+         DD 0136C9856h, 0646BA8C0h, 0FD62F97Ah, 08A65C9ECh
+         DD 014015C4Fh, 063066CD9h, 0FA0F3D63h, 08D080DF5h
+         DD 03B6E20C8h, 04C69105Eh, 0D56041E4h, 0A2677172h
+         DD 03C03E4D1h, 04B04D447h, 0D20D85FDh, 0A50AB56Bh
+         DD 035B5A8FAh, 042B2986Ch, 0DBBBC9D6h, 0ACBCF940h
+         DD 032D86CE3h, 045DF5C75h, 0DCD60DCFh, 0ABD13D59h
+         DD 026D930ACh, 051DE003Ah, 0C8D75180h, 0BFD06116h
+         DD 021B4F4B5h, 056B3C423h, 0CFBA9599h, 0B8BDA50Fh
+         DD 02802B89Eh, 05F058808h, 0C60CD9B2h, 0B10BE924h
+         DD 02F6F7C87h, 058684C11h, 0C1611DABh, 0B6662D3Dh
+         DD 076DC4190h, 001DB7106h, 098D220BCh, 0EFD5102Ah
+         DD 071B18589h, 006B6B51Fh, 09FBFE4A5h, 0E8B8D433h
+         DD 07807C9A2h, 00F00F934h, 09609A88Eh, 0E10E9818h
+         DD 07F6A0DBBh, 0086D3D2Dh, 091646C97h, 0E6635C01h
+         DD 06B6B51F4h, 01C6C6162h, 0856530D8h, 0F262004Eh
+         DD 06C0695EDh, 01B01A57Bh, 08208F4C1h, 0F50FC457h
+         DD 065B0D9C6h, 012B7E950h, 08BBEB8EAh, 0FCB9887Ch
+         DD 062DD1DDFh, 015DA2D49h, 08CD37CF3h, 0FBD44C65h
+         DD 04DB26158h, 03AB551CEh, 0A3BC0074h, 0D4BB30E2h
+         DD 04ADFA541h, 03DD895D7h, 0A4D1C46Dh, 0D3D6F4FBh
+         DD 04369E96Ah, 0346ED9FCh, 0AD678846h, 0DA60B8D0h
+         DD 044042D73h, 033031DE5h, 0AA0A4C5Fh, 0DD0D7CC9h
+         DD 05005713Ch, 0270241AAh, 0BE0B1010h, 0C90C2086h
+         DD 05768B525h, 0206F85B3h, 0B966D409h, 0CE61E49Fh
+         DD 05EDEF90Eh, 029D9C998h, 0B0D09822h, 0C7D7A8B4h
+         DD 059B33D17h, 02EB40D81h, 0B7BD5C3Bh, 0C0BA6CADh
+         DD 0EDB88320h, 09ABFB3B6h, 003B6E20Ch, 074B1D29Ah
+         DD 0EAD54739h, 09DD277AFh, 004DB2615h, 073DC1683h
+         DD 0E3630B12h, 094643B84h, 00D6D6A3Eh, 07A6A5AA8h
+         DD 0E40ECF0Bh, 09309FF9Dh, 00A00AE27h, 07D079EB1h
+         DD 0F00F9344h, 08708A3D2h, 01E01F268h, 06906C2FEh
+         DD 0F762575Dh, 0806567CBh, 0196C3671h, 06E6B06E7h
+         DD 0FED41B76h, 089D32BE0h, 010DA7A5Ah, 067DD4ACCh
+         DD 0F9B9DF6Fh, 08EBEEFF9h, 017B7BE43h, 060B08ED5h
+         DD 0D6D6A3E8h, 0A1D1937Eh, 038D8C2C4h, 04FDFF252h
+         DD 0D1BB67F1h, 0A6BC5767h, 03FB506DDh, 048B2364Bh
+         DD 0D80D2BDAh, 0AF0A1B4Ch, 036034AF6h, 041047A60h
+         DD 0DF60EFC3h, 0A867DF55h, 0316E8EEFh, 04669BE79h
+         DD 0CB61B38Ch, 0BC66831Ah, 0256FD2A0h, 05268E236h
+         DD 0CC0C7795h, 0BB0B4703h, 0220216B9h, 05505262Fh
+         DD 0C5BA3BBEh, 0B2BD0B28h, 02BB45A92h, 05CB36A04h
+         DD 0C2D7FFA7h, 0B5D0CF31h, 02CD99E8Bh, 05BDEAE1Dh
+         DD 09B64C2B0h, 0EC63F226h, 0756AA39Ch, 0026D930Ah
+         DD 09C0906A9h, 0EB0E363Fh, 072076785h, 005005713h
+         DD 095BF4A82h, 0E2B87A14h, 07BB12BAEh, 00CB61B38h
+         DD 092D28E9Bh, 0E5D5BE0Dh, 07CDCEFB7h, 00BDBDF21h
+         DD 086D3D2D4h, 0F1D4E242h, 068DDB3F8h, 01FDA836Eh
+         DD 081BE16CDh, 0F6B9265Bh, 06FB077E1h, 018B74777h
+         DD 088085AE6h, 0FF0F6A70h, 066063BCAh, 011010B5Ch
+         DD 08F659EFFh, 0F862AE69h, 0616BFFD3h, 0166CCF45h
+         DD 0A00AE278h, 0D70DD2EEh, 04E048354h, 03903B3C2h
+         DD 0A7672661h, 0D06016F7h, 04969474Dh, 03E6E77DBh
+         DD 0AED16A4Ah, 0D9D65ADCh, 040DF0B66h, 037D83BF0h
+         DD 0A9BCAE53h, 0DEBB9EC5h, 047B2CF7Fh, 030B5FFE9h
+         DD 0BDBDF21Ch, 0CABAC28Ah, 053B39330h, 024B4A3A6h
+         DD 0BAD03605h, 0CDD70693h, 054DE5729h, 023D967BFh
+         DD 0B3667A2Eh, 0C4614AB8h, 05D681B02h, 02A6F2B94h
+         DD 0B40BBE37h, 0C30C8EA1h, 05A05DF1Bh, 02D02EF8Dh
+         DD 074726F50h, 0736E6F69h, 0706F4320h, 067697279h
+         DD 028207468h, 031202963h, 020393939h, 048207962h
+         DD 06E656761h, 064655220h, 06E616D64h, 06FBBA36Eh
+end;
+
+{a Random generated Testvector 256bit - 32 Bytes, it's used for Self Test}
+function GetTestVector: PAnsiChar; assembler; register;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    030h,044h,0EDh,06Eh,045h,0A4h,096h,0F5h
+         DB    0F6h,035h,0A2h,0EBh,03Dh,01Ah,05Dh,0D6h
+         DB    0CBh,01Dh,009h,082h,02Dh,0BDh,0F5h,060h
+         DB    0C2h,0B8h,058h,0A1h,091h,0F9h,081h,0B1h
+         DB    000h,000h,000h,000h,000h,000h,000h,000h
+end;
+
+{get the CPU Type from your system}
+function GetCPUType: Integer; assembler;
+asm
+         PUSH   EBX
+         PUSH   ECX
+         PUSH   EDX
+         MOV    EBX,ESP
+         AND    ESP,0FFFFFFFCh
+         PUSHFD
+         PUSHFD
+         POP    EAX
+         MOV    ECX,EAX
+         XOR    EAX,40000h
+         PUSH   EAX
+         POPFD
+         PUSHFD
+         POP    EAX
+         XOR    EAX,ECX
+         MOV    EAX,3
+         JE     @Exit
+         PUSHFD
+         POP    EAX
+         MOV    ECX,EAX
+         XOR    EAX,200000h
+         PUSH   EAX
+         POPFD
+         PUSHFD
+         POP    EAX
+         XOR    EAX,ECX
+         MOV    EAX,4
+         JE     @Exit
+         PUSH   EBX
+         MOV    EAX,1
+         DB     0Fh,0A2h      //CPUID
+         MOV    AL,AH
+         AND    EAX,0Fh
+         POP    EBX
+@Exit:   POPFD
+         MOV    ESP,EBX
+         POP    EDX
+         POP    ECX
+         POP    EBX
+end;
+
+procedure ModuleUnload(Instance: Longword);
+var // automaticaly deregistration
+  I: Integer;
+begin
+  if FStrFMTs <> nil then
+    for I := FStrFMTs.Count-1 downto 0 do
+      if FindClassHInstance(TClass(FStrFMTs[I])) = Instance then
+        FStrFMTs.Delete(I);
+end;
+
+initialization
+  AddModuleUnloadProc(ModuleUnload);
+  FCPUType := GetCPUType;
+  if FCPUType > 3 then
+  begin
+    SwapInteger := BSwapInt;
+    SwapIntegerBuffer := BSwapIntBuf;
+  end else
+  begin
+    SwapInteger := SwapInt;
+    SwapIntegerBuffer := SwapIntBuf;
+  end;
+  RegisterStringFormats([TROStringFormat, TROStringFormat_HEX, TROStringFormat_HEXL,
+      TROStringFormat_MIME64, TROStringFormat_UU, TROStringFormat_XX]);
+{this calculate a Checksum (CRC32) over the function CRC32 and the TestVector,
+ if InitTestIsOk = False any modification from Testvector or CRC32() detected, :-) }
+  InitTestIsOk  := CRC32(CRC32($29524828, PChar(@CRC32) + 41, 1076), GetTestVector, 32) = $848B5964;
+finalization
+  RemoveModuleUnloadProc(ModuleUnload);
+  FStrFMTs.Free;
+  FStrFMTs := nil;
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROEncKeyPropEditor.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROEncKeyPropEditor.dfm
new file mode 100644
index 0000000..0fad347
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROEncKeyPropEditor.dfm	
@@ -0,0 +1,206 @@
+object CryptoKeyGenForm: TCryptoKeyGenForm
+  Left = 325
+  Top = 258
+  BorderStyle = bsDialog
+  Caption = 'Generate Encryption Key'
+  ClientHeight = 115
+  ClientWidth = 500
+  Color = clBtnFace
+  ParentFont = True
+  OldCreateOrder = False
+  OnCloseQuery = FormCloseQuery
+  OnCreate = FormCreate
+  PixelsPerInch = 96
+  TextHeight = 13
+  object LHAlgorithm: TLabel
+    Left = 4
+    Top = 8
+    Width = 43
+    Height = 13
+    Caption = 'Algorithm'
+  end
+  object LCKey: TLabel
+    Left = 4
+    Top = 40
+    Width = 71
+    Height = 13
+    Caption = 'Encryption Key'
+  end
+  object LHashKey: TLabel
+    Left = 4
+    Top = 64
+    Width = 70
+    Height = 13
+    Caption = 'Converted Key'
+  end
+  object LHashInfo: TLabel
+    Left = 248
+    Top = 6
+    Width = 248
+    Height = 16
+    AutoSize = False
+    Font.Charset = DEFAULT_CHARSET
+    Font.Color = clNavy
+    Font.Height = -11
+    Font.Name = 'MS Sans Serif'
+    Font.Style = []
+    ParentFont = False
+  end
+  object eHashKey: TEdit
+    Left = 84
+    Top = 60
+    Width = 412
+    Height = 21
+    TabOrder = 0
+    Text = 'eHashKey'
+  end
+  object BitBtn1: TBitBtn
+    Left = 344
+    Top = 86
+    Width = 76
+    Height = 25
+    Caption = 'OK'
+    Default = True
+    ModalResult = 1
+    TabOrder = 1
+    Glyph.Data = {
+      36060000424D3606000000000000360000002800000020000000100000000100
+      18000000000000060000C40E0000C40E00000000000000000000FF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FF006600006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565656565FF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FF0066001EB2311FB133006600FF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6565659A9A9A9A9A9A65
+      6565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FF00660031C24F22B7381AB02D21B437006600FF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565ABABAB9E9E9E9797979C
+      9C9C656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      00660047D36D3BCB5E25A83B0066001BA92E1DB132006600FF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FF656565BFBFBFB5B5B598989865656594
+      9494999999656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF006600
+      4FD67953DE7F31B54D006600FF00FF006600179D271EAE31006600FF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FF656565C4C4C4CACACAA5A5A5656565FF00FF65
+      65658C8C8C989898656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      00660041C563006600FF00FFFF00FFFF00FFFF00FF00660019AA2B006600FF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FF656565B5B5B5656565FF00FFFF00FFFF
+      00FFFF00FF656565939393656565FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FF006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF006600149D210066
+      00FF00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565FF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FF6565658A8A8A656565FF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF0066
+      00006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FF656565656565FF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FF006600006600FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FF656565656565FF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
+    NumGlyphs = 2
+  end
+  object BitBtn2: TBitBtn
+    Left = 420
+    Top = 86
+    Width = 75
+    Height = 25
+    Cancel = True
+    Caption = 'Cancel'
+    ModalResult = 2
+    TabOrder = 2
+    Glyph.Data = {
+      36060000424D3606000000000000360000002800000020000000100000000100
+      18000000000000060000C40E0000C40E00000000000000000000FF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FF00009A00009AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00009A0000
+      9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+      00009A174AFD103BF400009AFF00FFFF00FFFF00FFFF00FF00009A002CF80030
+      FC00009AFF00FFFF00FFFF00FFFF00FF6B6B6BA8A8A8A0A0A06B6B6BFF00FFFF
+      00FFFF00FFFF00FF6B6B6B9A9A9A9C9C9C6B6B6BFF00FFFF00FFFF00FFFF00FF
+      00009A1A47F81A4CFF123BF100009AFF00FFFF00FF00009A012DF60132FF002A
+      F300009AFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7AAAAAA9F9F9F6B6B6BFF
+      00FFFF00FF6B6B6B9999999E9E9E9797976B6B6BFF00FFFF00FFFF00FFFF00FF
+      FF00FF00009A1C47F61B4DFF143EF400009A00009A002DF80134FF032BF20000
+      9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7ABABABA2A2A26B
+      6B6B6B6B6B9A9A9A9E9E9E9898986B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FF00009A1D48F61D50FF103DFB0431FE0132FF002CF600009AFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7ACACACA3
+      A3A39F9F9F9E9E9E9999996B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FF00009A1A48F91342FF0C3CFF0733F600009AFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BA7A7A7A7
+      A7A7A3A3A39C9C9C6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FF00009A214EFC1D4BFF1847FF1743F600009AFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BACACACAC
+      ACACA9A9A9A4A4A46B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FF00009A2E5BF92C5FFF224DF8204BF82355FF1B46F600009AFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BB1B1B1B3B3B3AB
+      ABABAAAAAAAFAFAFA6A6A66B6B6BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FF00009A3664FA386BFF2D59F400009A00009A224CF42558FF1D49F60000
+      9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6BB6B6B6B9B9B9AEAEAE6B
+      6B6B6B6B6BA9A9A9B0B0B0A7A7A76B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+      00009A4071FA4274FF325DF100009AFF00FFFF00FF00009A224DF1275AFF204C
+      F800009AFF00FFFF00FFFF00FFFF00FF6B6B6BBBBBBBBEBEBEAFAFAF6B6B6BFF
+      00FFFF00FF6B6B6BA7A7A7B1B1B1AAAAAA6B6B6BFF00FFFF00FFFF00FFFF00FF
+      00009A497AFC3B66F300009AFF00FFFF00FFFF00FFFF00FF00009A2550F42655
+      FA00009AFF00FFFF00FFFF00FFFF00FF6B6B6BC0C0C0B5B5B56B6B6BFF00FFFF
+      00FFFF00FFFF00FF6B6B6BAAAAAAAEAEAE6B6B6BFF00FFFF00FFFF00FFFF00FF
+      FF00FF00009A00009AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF00009A0000
+      9AFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FF6B6B6B6B6B6BFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF
+      FF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00
+      FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF
+      00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
+    NumGlyphs = 2
+  end
+  object CBHash: TComboBox
+    Left = 84
+    Top = 4
+    Width = 161
+    Height = 21
+    Style = csDropDownList
+    DropDownCount = 24
+    ItemHeight = 13
+    TabOrder = 3
+    OnClick = CBHashClick
+  end
+  object EKey: TEdit
+    Left = 84
+    Top = 35
+    Width = 412
+    Height = 21
+    TabOrder = 4
+    Text = 'All work and no play makes Jack a dull boy.'
+    OnChange = EKeyChange
+  end
+  object HashManager: TROHashManager
+    Left = 300
+    Top = 20
+    Hash = 'TROHash_RipeMD256'
+  end
+end
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROEncKeyPropEditor.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROEncKeyPropEditor.pas
new file mode 100644
index 0000000..4d65be2
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROEncKeyPropEditor.pas	
@@ -0,0 +1,146 @@
+unit uROEncKeyPropEditor;
+
+{$I ..\RemObjects.inc}
+
+interface
+
+uses
+  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
+  {$IFDEF DELPHI5} DsgnIntf, {$ELSE}  DesignIntf, DesignEditors, {$ENDIF}
+  StdCtrls, Buttons, uROHCMngr;
+
+{.$DEFINE TestComp}
+
+type
+  TROCryptoKeyProperty = class(TStringProperty)
+    function GetAttributes: TPropertyAttributes; override;
+    procedure Edit; override;
+  end;
+
+  {$IFDEF TestComp}
+  TBrazilCryptoTest = class(TComponent)
+  private
+    fkey: TBrazilCryptoKey;
+    procedure SetKey(const Value: TBrazilCryptoKey);
+  published
+    property Key: TBrazilCryptoKey read fkey write SetKey;
+  end;
+  {$ENDIF}
+
+  TCryptoKeyGenForm = class(TForm)
+    eHashKey: TEdit;
+    BitBtn1: TBitBtn;
+    BitBtn2: TBitBtn;
+    LHAlgorithm: TLabel;
+    CBHash: TComboBox;
+    LCKey: TLabel;
+    EKey: TEdit;
+    LHashKey: TLabel;
+    HashManager: TROHashManager;
+    LHashInfo: TLabel;
+    procedure FormCloseQuery(Sender: TObject; var CanClose: Boolean);
+    procedure EKeyChange(Sender: TObject);
+    procedure FormCreate(Sender: TObject);
+    procedure CBHashClick(Sender: TObject);
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+var
+  CryptoKeyGenForm  : TCryptoKeyGenForm;
+
+procedure Register;
+
+implementation
+
+{$R *.dfm}
+
+uses
+  uROEncryption, uroHash, urodecutil;
+
+procedure Register;
+begin
+  RegisterPropertyEditor(TypeInfo(TROCryptoKey), nil, '',
+    TROCryptoKeyProperty);
+
+  {$IFDEF TestComp}
+  RegisterComponents('Brazil', [TBrazilCryptoTest]);
+  {$ENDIF}
+end;
+
+{ TROCryptoKeyProperty }
+
+procedure TROCryptoKeyProperty.Edit;
+begin
+  inherited;
+
+  with TCryptoKeyGenForm.Create(nil) do
+  try
+    // Initialize form...
+    ehashkey.Text := GetStrValue;
+    // Show form...
+    if ShowModal = mrOK then            // Transfer form properties back
+    begin
+      SetStrValue(ehashkey.Text);
+    end;                                // if
+  finally                               // wrap up
+    Free;
+  end;                                  // try/finally
+end;
+
+function TROCryptoKeyProperty.GetAttributes: TPropertyAttributes;
+begin
+  Result := [paDialog];
+end;
+
+procedure TCryptoKeyGenForm.FormCloseQuery(Sender: TObject;
+  var CanClose: Boolean);
+var
+  S                 : string;
+begin
+  try
+    S := formattostr(PChar(ehashkey.Text), Length(ehashkey.Text), fmtHex);
+  except
+    on e: Exception do
+    begin
+      ShowMessage('Invalid key!');
+      CanClose := False;
+    end;
+  end;                                  // try/except
+end;
+
+{$IFDEF TestComp}
+{ TBrazilCryptoTest }
+
+procedure TBrazilCryptoTest.SetKey(const Value: TBrazilCryptoKey);
+begin
+  fkey := Value;
+end;
+{$ENDIF}
+
+procedure TCryptoKeyGenForm.EKeyChange(Sender: TObject);
+begin
+  EHashKey.Text := HashManager.HashClass.CalcString(EKey.Text, nil, fmtHEX);
+end;
+
+procedure TCryptoKeyGenForm.FormCreate(Sender: TObject);
+begin
+  HashNames(CBHash.Items);
+end;
+
+procedure TCryptoKeyGenForm.CBHashClick(Sender: TObject);
+begin
+  CBHash.ItemIndex := CBHash.ItemIndex;
+
+{1. Variant to select the Hash}
+  HashManager.Algorithm := CBHash.Text;
+  LHashInfo.Caption := HashManager.Description (*+ ', ' +
+                       HashManager.HashClass.ClassName*);
+
+  EKeyChange(nil);
+end;
+
+end.
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROHCMngr.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROHCMngr.pas
new file mode 100644
index 0000000..428b28d
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROHCMngr.pas	
@@ -0,0 +1,428 @@
+{Copyright:      Hagen Reddmann  mailto:HaReddmann@AOL.COM
+ Author:         Hagen Reddmann
+ Remarks:        freeware, but this Copyright must be included
+ known Problems: none
+ Version:        3.0,  Part I from Delphi Encryption Compendium
+                 Delphi 2-4, designed and testet under D3
+ Description:    included the Designtime Components
+                 TROHashManager for the TROHash-Administration
+                 TROCipherManager for the TROCipher-Administration
+                 for Programmers with "Drop and Design any Component Fealing"
+                 the normaly way is without any Manager's
+
+ Version 3.0
+     Versionsmanagement, no chnages on TManager Classes
+
+ Version 2.2
+                 added Progress Event to fill a gauge
+
+      bug fixes: TROHashManager memory leak, .Destroy frees now FDigest
+
+ Version 2.1
+                 TROCipherManager: Methods added
+                   EncodeBuffer(), DecodeBuffer()
+                   EncodeString(), DecodeString()
+
+}
+unit uROHCMngr;
+
+interface
+
+{$I uROVer.inc}
+
+uses Classes, uRODECUtil, uROHash, uROCipher;
+
+type
+  TProgressEvent = procedure(Sender: TObject; Current, Maximal: Integer) of Object;
+
+  TROHashManager = class(TComponent)
+  private
+    FHashClass: TROHashClass;
+    FHash: TROHash;
+    FDigest: AnsiString;
+    FOnProgress: TProgressEvent;
+    function GetInfo(Index: Integer): String;
+    procedure SetInfo(Index: Integer; Value: String);
+    function GetClass: TROHashClass;
+    procedure SetClass(Value: TROHashClass);
+    function GetHash: TROHash;
+    function GetAlgorithm: String;
+    procedure SetAlgorithm(Value: String);
+    function GetDigestStr(Index: Integer): AnsiString;
+    function GetDigestSize: Integer;
+    procedure ReadHash(Reader: TReader);
+    procedure WriteHash(Writer: TWriter);
+  protected
+    procedure DefineProperties(Filer: TFiler); override;
+  public
+    destructor Destroy; override;
+    procedure CalcBuffer(const Buffer; BufferSize: Integer);
+    procedure CalcStream(const Stream: TStream; StreamSize: Integer);
+    procedure CalcString(const Data: AnsiString);
+    procedure CalcFile(const FileName: String);
+
+    property Digest: AnsiString read FDigest;
+    property DigestSize: Integer read GetDigestSize;
+    property DigestString[Format: Integer]: AnsiString read GetDigestStr;
+    property HashClass: TROHashClass read GetClass write SetClass;
+    property Hash: TROHash read GetHash;
+  published
+    property Algorithm: String read GetAlgorithm write SetAlgorithm stored False;
+    property Description: String index 0 read GetInfo write SetInfo stored False;
+    property OnProgress: TProgressEvent read FOnProgress write FOnProgress;
+  end;
+
+  TROCipherManager = class(TComponent)
+  private
+    FHashManager: TROHashManager;
+    FCipherClass: TROCipherClass;
+    FCipher: TROCipher;
+    FMode: TCipherMode;
+    FOnProgress: TProgressEvent;
+    procedure SetHashManager(Value: TROHashManager);
+    procedure SetMode(Value: TCipherMode);
+    function GetCipher: TROCipher;
+    function GetClass: TROCipherClass;
+    procedure SetClass(Value: TROCipherClass);
+    function GetAlgorithm: String;
+    procedure SetAlgorithm(Value: String);
+    function GetInfo(Index: Integer): String;
+    procedure SetInfo(Index: Integer; Value: String);
+    procedure ReadCipher(Reader: TReader);
+    procedure WriteCipher(Writer: TWriter);
+  protected
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+    procedure DefineProperties(Filer: TFiler); override;
+  public
+    destructor Destroy; override;
+    procedure InitKey(const Key: String; IVector: Pointer);
+
+    procedure EncodeFile(const Source, Dest: String);
+    procedure DecodeFile(const Source, Dest: String);
+    procedure EncodeStream(Source, Dest: TStream; DataSize: Integer);
+    procedure DecodeStream(Source, Dest: TStream; DataSize: Integer);
+    procedure EncodeBuffer(const Source; var Dest; DataSize: Integer);
+    procedure DecodeBuffer(const Source; var Dest; DataSize: Integer);
+    function EncodeString(const Source: AnsiString): AnsiString;
+    function DecodeString(const Source: AnsiString): AnsiString;
+
+    property Cipher: TROCipher read GetCipher;
+    property CipherClass: TROCipherClass read GetClass write SetClass;
+  published
+    property Algorithm: String read GetAlgorithm write SetAlgorithm stored False;
+    property Description: String index 0 read GetInfo write SetInfo stored False;
+    property Mode: TCipherMode read FMode write SetMode default cmCBC;
+    property HashManager: TROHashManager read FHashManager write SetHashManager;
+    property OnProgress: TProgressEvent read FOnProgress write FOnProgress;
+  end;
+
+implementation
+
+uses SysUtils, Windows;
+
+procedure TROHashManager.ReadHash(Reader: TReader);
+var
+  CN: String;
+  I: Integer;
+begin
+  CN := Reader.ReadString;
+  for I := 0 to HashList.Count-1 do
+    if CN = TROHashClass(HashList.Objects[I]).ClassName then
+    begin
+      SetClass(TROHashClass(HashList.Objects[I]));
+      Exit;
+    end;
+end;
+
+procedure TROHashManager.WriteHash(Writer: TWriter);
+begin
+  Writer.WriteString(HashClass.ClassName);
+end;
+
+procedure TROHashManager.DefineProperties(Filer: TFiler);
+begin
+  inherited DefineProperties(Filer);
+  Filer.DefineProperty('Hash', ReadHash, WriteHash, FHashClass <> nil);
+end;
+
+function TROHashManager.GetInfo(Index: Integer): String;
+begin
+  Result := '';
+  case Index of
+    0: begin
+         Index := HashList.IndexOfObject(Pointer(HashClass));
+         if Index >= 0 then
+         begin
+           Result := Trim(HashList[Index]);
+           Delete(Result, 1, Pos('=', Result));
+         end;
+         if Length(Result) > 0 then Result := Result + ', ';
+         Result := Result + IntToStr(DigestSize * 8) + 'bit Digestsize';
+       end;
+  end;
+end;
+
+procedure TROHashManager.SetInfo(Index: Integer; Value: String);
+begin
+end;
+
+function TROHashManager.GetDigestStr(Index: Integer): AnsiString;
+begin
+  Result := StrToFormat(PAnsiChar(FDigest), Length(FDigest), Index);
+end;
+
+function TROHashManager.GetDigestSize: Integer;
+begin
+  Result := HashClass.DigestKeySize;
+end;
+
+function TROHashManager.GetClass: TROHashClass;
+begin
+  if FHashClass = nil then SetClass(DefaultHashClass);
+  Result := FHashClass;
+end;
+
+function TROHashManager.GetHash: TROHash;
+begin
+  if FHash = nil then FHash := HashClass.Create(nil);
+  Result := FHash;
+end;
+
+procedure TROHashManager.SetClass(Value: TROHashClass);
+begin
+  if Value <> FHashClass then
+  begin
+    if Value = nil then Value := DefaultHashClass;
+    FHashClass := Value;
+    FHash.Free;
+    FHash := nil;
+    FDigest := '';
+  end;
+end;
+
+function TROHashManager.GetAlgorithm: String;
+begin
+  Result := GetHashName(HashClass);
+end;
+
+procedure TROHashManager.SetAlgorithm(Value: String);
+begin
+  SetClass(GetHashClass(Value));
+end;
+
+destructor TROHashManager.Destroy;
+begin
+  FHash.Free;
+  FHash := nil;
+  inherited Destroy;
+end;
+
+procedure TROHashManager.CalcBuffer(const Buffer; BufferSize: Integer);
+begin
+  FDigest := HashClass.CalcBuffer(Buffer, BufferSize, nil, fmtCOPY);
+end;
+
+procedure TROHashManager.CalcStream(const Stream: TStream; StreamSize: Integer);
+begin
+  Progress := FOnProgress;
+  try
+    FDigest := HashClass.CalcStream(Stream, StreamSize, nil, fmtCOPY);
+  finally
+    Progress := nil;
+  end;
+end;
+
+procedure TROHashManager.CalcString(const Data: AnsiString);
+begin
+  FDigest := HashClass.CalcString(Data, nil, fmtCOPY);
+end;
+
+procedure TROHashManager.CalcFile(const FileName: String);
+begin
+  Progress := FOnProgress;
+  try
+    FDigest := HashClass.CalcFile(FileName, nil, fmtCOPY);
+  finally
+    Progress := nil;
+  end;
+end;
+
+procedure TROCipherManager.SetHashManager(Value: TROHashManager);
+begin
+  if Value <> FHashManager then
+  begin
+    FHashManager := Value;
+    if FHashManager <> nil then FHashManager.FreeNotification(Self);
+  end;
+end;
+
+procedure TROCipherManager.SetMode(Value: TCipherMode);
+begin
+  FMode := Value;
+  if FCipher <> nil then FCipher.Mode := FMode;
+end;
+
+function TROCipherManager.GetCipher: TROCipher;
+begin
+  if FCipher = nil then
+  begin
+    FCipher := CipherClass.Create('', nil);
+    FCipher.Mode := FMode;
+  end;  
+  Result := FCipher;
+end;
+
+function TROCipherManager.GetClass: TROCipherClass;
+begin
+  if FCipherClass = nil then FCipherClass := DefaultCipherClass;
+  Result := FCipherClass;
+end;
+
+procedure TROCipherManager.SetClass(Value: TROCipherClass);
+begin
+  if Value <> CipherClass then
+  begin
+    FCipher.Free;
+    FCipher := nil;
+    FCipherClass := Value;
+  end;
+end;
+
+function TROCipherManager.GetAlgorithm: String;
+begin
+  Result := GetCipherName(CipherClass);
+end;
+
+procedure TROCipherManager.SetAlgorithm(Value: String);
+begin
+  SetClass(GetCipherClass(Value));
+end;
+
+function TROCipherManager.GetInfo(Index: Integer): String;
+begin
+  Result := '';
+  case Index of
+    0: begin
+         Index := CipherList.IndexOfObject(Pointer(CipherClass));
+         if Index >= 0 then
+         begin
+           Result := Trim(CipherList[Index]);
+           Delete(Result, 1, Pos('=', Result));
+         end;
+         if Length(Result) > 0 then Result := Result + ', ';
+         Result := Result + IntToStr(CipherClass.MaxKeySize * 8) + 'bit Key';
+       end;
+  end;
+end;
+
+procedure TROCipherManager.SetInfo(Index: Integer; Value: String);
+begin
+end;
+
+procedure TROCipherManager.ReadCipher(Reader: TReader);
+var
+  CN: String;
+  I: Integer;
+begin
+  CN := Reader.ReadString;
+  for I := 0 to CipherList.Count-1 do
+    if CN = TROCipherClass(CipherList.Objects[I]).ClassName then
+    begin
+      SetClass(TROCipherClass(CipherList.Objects[I]));
+      Exit;
+    end;
+end;
+
+procedure TROCipherManager.WriteCipher(Writer: TWriter);
+begin
+  Writer.WriteString(CipherClass.ClassName);
+end;
+
+procedure TROCipherManager.Notification(AComponent: TComponent; Operation: TOperation);
+begin
+  inherited Notification(AComponent, Operation);
+  if (Operation = opRemove) and (AComponent = FHashManager) then
+    HashManager := nil;
+end;
+
+procedure TROCipherManager.DefineProperties(Filer: TFiler);
+begin
+  inherited DefineProperties(Filer);
+  Filer.DefineProperty('Cipher', ReadCipher, WriteCipher, FCipherClass <> nil);
+end;
+
+destructor TROCipherManager.Destroy;
+begin
+  FCipher.Free;
+  FCipher := nil;
+  inherited Destroy;
+end;
+
+procedure TROCipherManager.InitKey(const Key: String; IVector: Pointer);
+begin
+  if FHashManager <> nil then Cipher.HashClass := FHashManager.HashClass;
+  Cipher.InitKey(Key, IVector);
+end;
+
+procedure TROCipherManager.EncodeFile(const Source, Dest: String);
+begin
+  Progress := FOnProgress;
+  try
+    Cipher.CodeFile(Source, Dest, paEncode);
+  finally
+    Progress := nil;
+  end;
+end;
+
+procedure TROCipherManager.DecodeFile(const Source, Dest: String);
+begin
+  Progress := FOnProgress;
+  try
+    Cipher.CodeFile(Source, Dest, paDecode);
+  finally
+    Progress := nil;
+  end;
+end;
+
+procedure TROCipherManager.EncodeStream(Source, Dest: TStream; DataSize: Integer);
+begin
+  Progress := FOnProgress;
+  try
+    Cipher.CodeStream(Source, Dest, DataSize, paEncode);
+  finally
+    Progress := nil;
+  end;
+end;
+
+procedure TROCipherManager.DecodeStream(Source, Dest: TStream; DataSize: Integer);
+begin
+  Progress := FOnProgress;
+  try
+    Cipher.CodeStream(Source, Dest, DataSize, paDecode);
+  finally
+    Progress := nil;
+  end;
+end;
+
+procedure TROCipherManager.EncodeBuffer(const Source; var Dest; DataSize: Integer);
+begin
+  Cipher.EncodeBuffer(Source, Dest, DataSize);
+end;
+
+procedure TROCipherManager.DecodeBuffer(const Source; var Dest; DataSize: Integer);
+begin
+  Cipher.DecodeBuffer(Source, Dest, DataSize);
+end;
+
+function TROCipherManager.EncodeString(const Source: AnsiString): AnsiString;
+begin
+  Result := Cipher.CodeString(Source, paEncode, fmtDEFAULT);
+end;
+
+function TROCipherManager.DecodeString(const Source: AnsiString): AnsiString;
+begin
+  Result := Cipher.CodeString(Source, paDecode, fmtDEFAULT);
+end;
+
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROHash.inc b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROHash.inc
new file mode 100644
index 0000000..ef75bd7
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROHash.inc	
@@ -0,0 +1,802 @@
+const
+  Haval_Data: array[0..127] of LongWord =
+   ($452821E6,$38D01377,$BE5466CF,$34E90C6C,$C0AC29B7,$C97C50DD,$3F84D5B5,$B5470917,
+    $9216D5D9,$8979FB1B,$D1310BA6,$98DFB5AC,$2FFD72DB,$D01ADFB7,$B8E1AFED,$6A267E96,
+    $BA7C9045,$F12C7F99,$24A19947,$B3916CF7,$0801F2E2,$858EFC16,$636920D8,$71574E69,
+    $A458FEA3,$F4933D7E,$0D95748F,$728EB658,$718BCD58,$82154AEE,$7B54A41D,$C25A59B5,
+    $9C30D539,$2AF26013,$C5D1B023,$286085F0,$CA417918,$B8DB38EF,$8E79DCB0,$603A180E,
+    $6C9E0E8B,$B01E8A3E,$D71577C1,$BD314B27,$78AF2FDA,$55605C60,$E65525F3,$AA55AB94,
+    $57489862,$63E81440,$55CA396A,$2AAB10B6,$B4CC5C34,$1141E8CE,$A15486AF,$7C72E993,
+    $B3EE1411,$636FBC2A,$2BA9C55D,$741831F6,$CE5C3E16,$9B87931E,$AFD6BA33,$6C24CF5C,
+    $7A325381,$28958677,$3B8F4898,$6B4BB9AF,$C4BFE81B,$66282193,$61D809CC,$FB21A991,
+    $487CAC60,$5DEC8032,$EF845D5D,$E98575B1,$DC262302,$EB651B88,$23893E81,$D396ACC5,
+    $0F6D6FF3,$83F44239,$2E0B4482,$A4842004,$69C8F04A,$9E1F9B5E,$21C66842,$F6E96C9A,
+    $670C9C61,$ABD388F0,$6A51A0D2,$D8542F68,$960FA728,$AB5133A3,$6EEF0B6C,$137A3BE4,
+    $BA3BF050,$7EFB2A98,$A1F1651D,$39AF0176,$66CA593E,$82430E88,$8CEE8619,$456F9FB4,
+    $7D84A5C3,$3B8B5EBE,$E06F75D8,$85C12073,$401A449F,$56C16AA6,$4ED3AA62,$363F7706,
+    $1BFEDF72,$429B023D,$37D0D724,$D00A1248,$DB0FEAD3,$49F1C09B,$075372C9,$80991B7B,
+    $25D479D8,$F6E8DEF7,$E3FE501A,$B6794C3B,$976CE0BD,$04C006BA,$C1A94FB6,$409F60C4);
+
+  Haval_Offset: array[0..127] of Byte =
+   (  5, 14, 26, 18, 11, 28,  7, 16,  0, 23, 20, 22,  1, 10,  4,  8,
+     30,  3, 21,  9, 17, 24, 29,  6, 19, 12, 15, 13,  2, 25, 31, 27,
+     19,  9,  4, 20, 28, 17,  8, 22, 29, 14, 25, 12, 24, 30, 16, 26,
+     31, 15,  7,  3,  1,  0, 18, 27, 13,  6, 21, 10, 23, 11,  5,  2,
+     24,  4,  0, 14,  2,  7, 28, 23, 26,  6, 30, 20, 18, 25, 19,  3,
+     22, 11, 31, 21,  8, 27, 12,  9,  1, 29,  5, 15, 17, 10, 16, 13,
+     27,  3, 21, 26, 17, 11, 20, 29, 19,  0, 12,  7, 13,  8, 31, 10,
+      5,  9, 14, 30, 18,  6, 28, 24,  2, 23, 16, 22,  4,  1, 25, 15);
+
+  Snefru_Data: array[0..15, 0..255] of LongWord = (
+   ($64F9001B,$FEDDCDF6,$7C8FF1E2,$11D71514,$8B8C18D3,$DDDF881E,$6EAB5056,$88CED8E1,
+    $49148959,$69C56FD5,$B7994F03,$0FBCEE3E,$3C264940,$21557E58,$E14B3FC2,$2E5CF591,
+    $DCEFF8CE,$092A1648,$BE812936,$FF7B0C6A,$D5251037,$AFA448F1,$7DAFC95A,$1EA69C3F,
+    $A417ABE7,$5890E423,$B0CB70C0,$C85025F7,$244D97E3,$1FF3595F,$C4EC6396,$59181E17,
+    $E635B477,$354E7DBF,$796F7753,$66EB52CC,$77C3F995,$32E3A927,$80CCAED6,$4E2BE89D,
+    $375BBD28,$AD1A3D05,$2B1B42B3,$16C44C71,$4D54BFA8,$E57DDC7A,$EC6D8144,$5A71046B,
+    $D8229650,$87FC8F24,$CBC60E09,$B6390366,$D9F76092,$D393A70B,$1D31A08A,$9CD971C9,
+    $5C1EF445,$86FAB694,$FDB44165,$8EAAFCBE,$4BCAC6EB,$FB7A94E5,$5789D04E,$FA13CF35,
+    $236B8DA9,$4133F000,$6224261C,$F412F23B,$E75E56A4,$30022116,$BAF17F1F,$D09872F9,
+    $C1A3699C,$F1E802AA,$0DD145DC,$4FDCE093,$8D8412F0,$6CD0F376,$3DE6B73D,$84BA737F,
+    $B43A30F2,$44569F69,$00E4EACA,$B58DE3B0,$959113C8,$D62EFEE9,$90861F83,$CED69874,
+    $2F793CEE,$E8571C30,$483665D1,$AB07B031,$914C844F,$15BF3BE8,$2C3F2A9A,$9EB95FD4,
+    $92E7472D,$2297CC5B,$EE5F2782,$5377B562,$DB8EBBCF,$F961DEDD,$C59B5C60,$1BD3910D,
+    $26D206AD,$B28514D8,$5ECF6B52,$7FEA78BB,$504879AC,$ED34A884,$36E51D3C,$1753741D,
+    $8C47CAED,$9D0A40EF,$3145E221,$DA27EB70,$DF730BA3,$183C8789,$739AC0A6,$9A58DFC6,
+    $54B134C1,$AC3E242E,$CC493902,$7B2DDA99,$8F15BC01,$29FD38C7,$27D5318F,$604AAFF5,
+    $F29C6818,$C38AA2EC,$1019D4C3,$A8FB936E,$20ED7B39,$0B686119,$89A0906F,$1CC7829E,
+    $9952EF4B,$850E9E8C,$CD063A90,$67002F8E,$CFAC8CB7,$EAA24B11,$988B4E6C,$46F066DF,
+    $CA7EEC08,$C7BBA664,$831D17BD,$63F575E6,$9764350E,$47870D42,$026CA4A2,$8167D587,
+    $61B6ADAB,$AA6564D2,$70DA237B,$25E1C74A,$A1C901A0,$0EB0A5DA,$7670F741,$51C05AEA,
+    $933DFA32,$0759FF1A,$56010AB8,$5FDECB78,$3F32EDF8,$AEBEDBB9,$39F8326D,$D20858C5,
+    $9B638BE4,$A572C80A,$28E0A19F,$432099FC,$3A37C3CD,$BF95C585,$B392C12A,$6AA707D7,
+    $52F66A61,$12D483B1,$96435B5E,$3E75802B,$3BA52B33,$A99F51A5,$BDA1E157,$78C2E70C,
+    $FCAE7CE0,$D1602267,$2AFFAC4D,$4A510947,$0AB2B83A,$7A04E579,$340DFD80,$B916E922,
+    $E29D5E9B,$F5624AF4,$4CA9D9AF,$6BBD2CFE,$E3B7F620,$C2746E07,$5B42B9B6,$A06919BC,
+    $F0F2C40F,$72217AB5,$14C19DF3,$F3802DAE,$E094BEB4,$A2101AFF,$0529575D,$55CDB27C,
+    $A33BDDB2,$6528B37D,$740C05DB,$E96A62C4,$40782846,$6D30D706,$BBF48E2C,$BCE2D3DE,
+    $049E37FA,$01B5E634,$2D886D8D,$7E5A2E7E,$D7412013,$06E90F97,$E45D3EBA,$B8AD3386,
+    $13051B25,$0C035354,$71C89B75,$C638FBD0,$197F11A1,$EF0F08FB,$F8448651,$38409563,
+    $452F4443,$5D464D55,$03D8764C,$B1B8D638,$A70BBA2F,$94B3D210,$EB6692A7,$D409C2D9,
+    $68838526,$A6DB8A15,$751F6C98,$DE769A88,$C9EE4668,$1A82A373,$0896AA49,$42233681,
+    $F62C55CB,$9F1C5404,$F74FB15C,$C06E4312,$6FFE5D72,$8AA8678B,$337CD129,$8211CEFD),
+   ($074A1D09,$52A10E5A,$9275A3F8,$4B82506C,$37DF7E1B,$4C78B3C5,$CEFAB1DA,$F472267E,
+    $B63045F6,$D66A1FC0,$400298E3,$27E60C94,$87D2F1B8,$DF9E56CC,$45CD1803,$1D35E098,
+    $CCE7C736,$03483BF1,$1F7307D7,$C6E8F948,$E613C111,$3955C6FF,$1170ED7C,$8E95DA41,
+    $99C31BF4,$A4DA8021,$7B5F94FB,$DD0DA51F,$6562AA77,$556BCB23,$DB1BACC6,$798040B9,
+    $BFE5378F,$731D55E6,$DAA5BFEE,$389BBC60,$1B33FBA4,$9C567204,$36C26C68,$77EE9D69,
+    $8AEB3E88,$2D50B5CE,$9579E790,$42B13CFC,$33FBD32B,$EE0503A7,$B5862824,$15E41EAD,
+    $C8412EF7,$9D441275,$2FCEC582,$5FF483B7,$8F3931DF,$2E5D2A7B,$49467BF9,$0653DEA9,
+    $2684CE35,$7E655E5C,$F12771D8,$BB15CC67,$AB097CA1,$983DCF52,$10DDF026,$21267F57,
+    $2C58F6B4,$31043265,$0BAB8C01,$D5492099,$ACAAE619,$944CE54A,$F2D13D39,$ADD3FC32,
+    $CDA08A40,$E2B0D451,$9EFE08AE,$B9D50FD2,$EA5CD7FD,$C9A749DD,$13EA2253,$832DEBAA,
+    $24BE640F,$E03E926A,$29E01CDE,$8BF59F18,$0F9D00B6,$E1238B46,$1E7D8E34,$93619ADB,
+    $76B32F9F,$BD972CEC,$E31FA976,$A68FBB10,$FB3BA49D,$8587C41D,$A5ADD1D0,$F3CF84BF,
+    $D4E11150,$D9FFA6BC,$C3F6018C,$AEF10572,$74A64B2F,$E7DC9559,$2AAE35D5,$5B6F587F,
+    $A9E353FE,$CA4FB674,$04BA24A8,$E5C6875F,$DCBC6266,$6BC5C03F,$661EEF02,$ED740BAB,
+    $058E34E4,$B7E946CF,$88698125,$72EC48ED,$B11073A3,$A13485EB,$A2A2429C,$FA407547,
+    $50B76713,$5418C37D,$96192DA5,$170BB04B,$518A021E,$B0AC13D1,$0963FA2A,$4A6E10E1,
+    $58472BDC,$F7F8D962,$979139EA,$8D856538,$C0997042,$48324D7A,$447623CB,$8CBBE364,
+    $6E0C6B0E,$D36D63B0,$3F244C84,$3542C971,$2B228DC1,$CB0325BB,$F8C0D6E9,$DE11066B,
+    $A8649327,$FC31F83E,$7DD80406,$F916DD61,$D89F79D3,$615144C2,$EBB45D31,$28002958,
+    $56890A37,$F05B3808,$123AE844,$86839E16,$914B0D83,$C506B43C,$CF3CBA5E,$7C60F5C9,
+    $22DEB2A0,$5D9C2715,$C77BA0EF,$4F45360B,$C1017D8B,$E45ADC29,$A759909B,$412CD293,
+    $D7D796B1,$00C8FF30,$23A34A80,$4EC15C91,$714E78B5,$47B9E42E,$78F3EA4D,$7F078F5B,
+    $346C593A,$A3A87A1A,$9BCBFE12,$3D439963,$B2EF6D8E,$B8D46028,$6C2FD5CA,$62675256,
+    $01F2A2F3,$BC96AE0A,$709A8920,$B4146E87,$6308B9E2,$64BDA7BA,$AFED6892,$6037F2A2,
+    $F52969E0,$0ADB43A6,$82811400,$90D0BDF0,$19C9549E,$203F6A73,$1ACCAF4F,$89714E6D,
+    $164D4705,$67665F07,$EC206170,$0C2182B2,$A02B9C81,$53289722,$F6A97686,$140E4179,
+    $9F778849,$9A88E15D,$25CADB54,$D157F36F,$32A421C3,$B368E98A,$5A92CD0D,$757AA8D4,
+    $C20AC278,$08B551C7,$849491E8,$4DC75AD6,$697C33BE,$BAF0CA33,$46125B4E,$59D677B3,
+    $30D9C8F2,$D0AF860C,$1C7FD0FA,$FE0FF72C,$5C8D6F43,$57FDEC3B,$6AB6AD97,$D22ADF89,
+    $18171785,$02BFE22D,$6DB80917,$80B216AF,$E85E4F9A,$7A1C306E,$6FC49BF5,$3AF7A11C,
+    $81E215E7,$68363FCD,$3E9357C8,$EF52FD55,$3B8BAB4C,$3C8CF495,$BEFCEEBD,$FD25B714,
+    $C498D83D,$0D2E1A8D,$E9F966AC,$0E387445,$435419E5,$5E7EBEC4,$AA90B8D9,$FF1A3A96),
+   ($4A8FE4E3,$F27D99CD,$D04A40CA,$CB5FF194,$3668275A,$FF4816BE,$A78B394C,$4C6BE9DB,
+    $4EEC38D2,$4296EC80,$CDCE96F8,$888C2F38,$E75508F5,$7B916414,$060AA14A,$A214F327,
+    $BE608DAF,$1EBBDEC2,$61F98CE9,$E92156FE,$4F22D7A3,$3F76A8D9,$559A4B33,$38AD2959,
+    $F3F17E9E,$85E1BA91,$E5EBA6FB,$73DCD48C,$F5C3FF78,$481B6058,$8A3297F7,$8F1F3BF4,
+    $93785AB2,$477A4A5B,$6334EB5D,$6D251B2E,$74A9102D,$07E38FFA,$915C9C62,$CCC275EA,
+    $6BE273EC,$3EBDDD70,$D895796C,$DC54A91B,$C9AFDF81,$23633F73,$275119B4,$B19F6B67,
+    $50756E22,$2BB152E2,$76EA46A2,$A353E232,$2F596AD6,$0B1EDB0B,$02D3D9A4,$78B47843,
+    $64893E90,$40F0CAAD,$F68D3AD7,$46FD1707,$1C9C67EF,$B5E086DE,$96EE6CA6,$9AA34774,
+    $1BA4F48A,$8D01ABFD,$183EE1F6,$5FF8AA7A,$17E4FAAE,$303983B0,$6C08668B,$D4AC4382,
+    $E6C5849F,$92FEFB53,$C1CAC4CE,$43501388,$441118CF,$EC4FB308,$53A08E86,$9E0FE0C5,
+    $F91C1525,$AC45BE05,$D7987CB5,$49BA1487,$57938940,$D5877648,$A958727F,$58DFE3C3,
+    $F436CF77,$399E4D11,$F0A5BFA9,$EF61A33B,$A64CAC60,$04A8D0BA,$030DD572,$B83D320F,
+    $CAB23045,$E366F2F0,$815D008D,$C897A43A,$1D352DF3,$B9CC571D,$8BF38744,$72209092,
+    $EBA124EB,$FB99CE5E,$3BB94293,$28DA549C,$AAB8A228,$A4197785,$33C70296,$25F6259B,
+    $5C85DA21,$DF15BDEE,$15B7C7E8,$E2ABEF75,$FCC19BC1,$417FF868,$14884434,$62825179,
+    $C6D5C11C,$0E4705DC,$22700DE0,$D3D2AF18,$9BE822A0,$35B669F1,$C42BB55C,$0A801252,
+    $115BF0FC,$3CD7D856,$B43F5F9D,$C2306516,$A1231C47,$F149207E,$5209A795,$34B3CCD8,
+    $67AEFE54,$2C83924E,$6662CBAC,$5EEDD161,$84E681AA,$5D57D26B,$FA465CC4,$7E3AC3A8,
+    $BF7C0CC6,$E18A9AA1,$C32F0A6F,$B22CC00D,$3D280369,$994E554F,$68F480D3,$ADCFF5E6,
+    $3A8EB265,$83269831,$BD568A09,$4BC8AE6A,$69F56D2B,$0F17EAC8,$772EB6C7,$9F41343C,
+    $AB1D0742,$826A6F50,$FEA2097C,$1912C283,$CE185899,$E4444839,$2D8635D5,$65D0B1FF,
+    $865A7F17,$326D9FB1,$59E52820,$0090ADE1,$753C7149,$9DDD8B98,$A5A691DA,$0D0382BB,
+    $8904C930,$086CB000,$6E69D3BD,$24D4E7A7,$05244FD0,$101A5E0C,$6A947DCB,$E840F77B,
+    $7D0C5003,$7C370F1F,$805245ED,$E05E3D3F,$7906880E,$BABFCD35,$1A7EC697,$8C052324,
+    $0C6EC8DF,$D129A589,$C7A75B02,$12D81DE7,$D9BE2A66,$1F4263AB,$DE73FDB6,$2A00680A,
+    $56649E36,$3133ED55,$90FA0BF2,$2910A02A,$949D9D46,$A0D1DCDD,$CFC9B7D4,$D2677BE5,
+    $95CB36B3,$13CD9410,$DBF73313,$B7C6E8C0,$F781414B,$510B016D,$B0DE1157,$D6B0F62C,
+    $BB074ECC,$7F1395B7,$EE792CF9,$EA6FD63E,$5BD6938E,$AF02FC64,$DAB57AB8,$8EDB3784,
+    $8716318F,$164D1A01,$26F26141,$B372E6B9,$F8FC2B06,$7AC00E04,$3727B89A,$97E9BCA5,
+    $9C2A742F,$BC3B1F7D,$7165B471,$609B4C29,$20925351,$5AE72112,$454BE5D1,$C0FFB95F,
+    $DD0EF919,$6F2D70C9,$0974C5BF,$98AA6263,$01D91E4D,$2184BB6E,$70C43C1E,$4D435915,
+    $AE7B8523,$B6FB06BC,$5431EE76,$FDBC5D26,$ED77493D,$C5712EE4,$A8380437,$2EEF261A),
+   ($5A79392B,$B8AF32C2,$41F7720A,$833A61EC,$13DFEDAC,$C4990BC4,$DC0F54BC,$FEDD5E88,
+    $80DA1881,$4DEA1AFD,$FD402CC6,$AE67CC7A,$C5238525,$8EA01254,$B56B9BD5,$862FBD6D,
+    $AC8575D3,$6FBA3714,$DA7EBF46,$59CD5238,$8AC9DBFE,$353729FC,$E497D7F2,$C3AB84E0,
+    $F05A114B,$7B887A75,$EDC603DD,$5E6FE680,$2C84B399,$884EB1DA,$1CB8C8BF,$AA51098A,
+    $C862231C,$8BAC2221,$21B387E5,$208A430D,$2A3F0F8B,$A5FF9CD2,$6012A2EA,$147A9EE7,
+    $F62A501D,$B4B2E51A,$3EF3484C,$C0253C59,$2B82B536,$0AA9696B,$BE0C109B,$C70B7929,
+    $CE3E8A19,$2F66950E,$459F1C2C,$E68FB93D,$A3C3FF3E,$62B45C62,$300991CB,$01914C57,
+    $7F7BC06A,$182831F5,$E7B74BCA,$FA50F6D0,$523CAA61,$E3A7CF05,$E9E41311,$280A21D1,
+    $6A4297E1,$F24DC67E,$FC3189E6,$B72BF34F,$4B1E67AF,$543402CE,$79A59867,$0648E02A,
+    $00A3AC17,$C6208D35,$6E7F5F76,$A45BB4BE,$F168FA63,$3F4125F3,$F311406F,$02706565,
+    $BFE58022,$0CFCFDD9,$0735A7F7,$8F049092,$D98EDC27,$F5C5D55C,$E0F201DB,$0DCAFC9A,
+    $7727FB79,$AF43ABF4,$26E938C1,$401B26A6,$900720FA,$2752D97B,$CFF1D1B3,$A9D9E424,
+    $42DB99AB,$6CF8BE5F,$E82CEBE3,$3AFB733B,$6B734EB6,$1036414A,$975F667C,$049D6377,
+    $BA587C60,$B1D10483,$DE1AEFCC,$1129D055,$72051E91,$6946D623,$F9E86EA7,$48768C00,
+    $B0166C93,$9956BBF0,$1F1F6D84,$FB15E18E,$033B495D,$56E3362E,$4F44C53C,$747CBA51,
+    $89D37872,$5D9C331B,$D2EF9FA8,$254917F8,$1B106F47,$37D75553,$B3F053B0,$7DCCD8EF,
+    $D30EB802,$5889F42D,$610206D7,$1A7D34A1,$92D87DD8,$E5F4A315,$D1CF0E71,$B22DFE45,
+    $B901E8EB,$0FC0CE5E,$2EFA60C9,$2DE74290,$36D0C906,$381C70E4,$4C6DA5B5,$3D81A682,
+    $7E381F34,$396C4F52,$95AD5901,$1DB50C5A,$29982E9E,$1557689F,$3471EE42,$D7E2F7C0,
+    $8795A1E2,$BC324D8D,$E224C3C8,$12837E39,$CDEE3D74,$7AD2143F,$0E13D40C,$78BD4A68,
+    $A2EB194D,$DB9451F9,$859B71DC,$5C4F5B89,$CA14A8A4,$EF92F003,$16741D98,$33AA4444,
+    $9E967FBB,$092E3020,$D86A35B8,$8CC17B10,$E1BF08AE,$55693FC5,$7680AD13,$1E6546E8,
+    $23B6E7B9,$EE77A4B2,$08ED0533,$44FD2895,$B6393B69,$05D6CACF,$9819B209,$ECBBB72F,
+    $9A75779C,$EAEC0749,$94A65AEE,$BDF52DC3,$D6A25D04,$82008E4E,$A6DE160F,$9B036AFB,
+    $228B3A66,$5FB10A70,$CC338B58,$5378A9DF,$C908BCA9,$4959E25B,$46909A97,$66AE8F6E,
+    $DD0683E9,$65F994B4,$6426CDA5,$C24B8840,$32539DA0,$63175650,$D0C815FF,$50CBC41E,
+    $F7C774A3,$31B0C231,$8D0D8116,$24BEF16C,$D555D256,$DF47EA8C,$6D21ECCD,$A887A012,
+    $84542AED,$A7B9C1BD,$914C1BB1,$A0D5B67D,$438CE937,$7030F873,$71F6B0C7,$574576BA,
+    $F8BC4541,$9C61D348,$1960579D,$17C4DAAD,$96A4CB0B,$C193F2F6,$756EAFA2,$7C1D2F94,
+    $F4FE2B43,$CB86E33A,$EBD4C728,$9D18AE64,$9FE13E30,$3CE0F5DE,$ABA1F985,$ADDC2718,
+    $68CE6278,$D45E241F,$A15C82B7,$3B2293D4,$739EDD32,$674A6BF1,$5B5D587F,$4772DEAA,
+    $4A63968F,$0BE68686,$513D6426,$939A4787,$BBA89296,$4EC20007,$818D0D08,$FF64DFD6),
+   ($CB2297CB,$DB48A144,$A16CBE4B,$BBEA1D6C,$5AF6B6B7,$8A8110B6,$F9236EF9,$C98F83E6,
+    $0F9C65B8,$252D4A89,$A497F068,$A5D7ED2D,$94C22845,$9DA1C8C4,$E27C2E2E,$6E8BA2B4,
+    $C3DD17FB,$498CD482,$0DFE6A9F,$B0705829,$9A1E6DC1,$F829717C,$07BB8E3A,$DA3C0B02,
+    $1AF82FC7,$73B70955,$7A04379C,$5EE20A28,$83712AE5,$F4C47C6D,$DF72BA56,$D794858D,
+    $8C0CF709,$18F0F390,$B6C69B35,$BF2F01DB,$2FA74DCA,$D0CD9127,$BDE66CEC,$3DEEBD46,
+    $57C88FC3,$CEE1406F,$0066385A,$F3C3444F,$3A79D5D5,$75751EB9,$3E7F8185,$521C2605,
+    $E1AAAB6E,$38EBB80F,$BEE7E904,$61CB9647,$EA54904E,$05AE00E4,$2D7AC65F,$087751A1,
+    $DCD82915,$0921EE16,$DD86D33B,$D6BD491A,$40FBADF0,$4232CBD2,$33808D10,$39098C42,
+    $193F3199,$0BC1E47A,$4A82B149,$02B65A8A,$104CDC8E,$24A8F52C,$685C6077,$C79F95C9,
+    $1D11FE50,$C08DAFCD,$7B1A9A03,$1C1F11D8,$84250E7F,$979DB248,$EBDC0501,$B9553395,
+    $E3C05EA8,$B1E51C4C,$13B0E681,$3B407766,$36DB3087,$EE17C9FC,$6C53ECF2,$ADCCC58F,
+    $C427660B,$EFD5867D,$9B6D54A5,$6FF1AEFF,$8E787952,$9E2BFFE0,$8761D034,$E00BDBAD,
+    $AE99A8D3,$CC03F6E2,$FD0ED807,$0E508AE3,$B74182AB,$4349245D,$D120A465,$B246A641,
+    $AF3B7AB0,$2A6488BB,$4B3A0D1F,$E7C7E58C,$3FAFF2EB,$90445FFD,$CF38C393,$995D07E7,
+    $F24F1B36,$356F6891,$6D6EBCBE,$8DA9E262,$50FD520E,$5BCA9E1E,$37472CF3,$69075057,
+    $7EC5FDED,$0CAB892A,$FB2412BA,$1728DEBF,$A000A988,$D843CE79,$042E20DD,$4FE8F853,
+    $56659C3C,$2739D119,$A78A6120,$80960375,$70420611,$85E09F78,$ABD17E96,$1B513EAF,
+    $1E01EB63,$26AD2133,$A890C094,$7613CF60,$817E781B,$A39113D7,$E957FA58,$4131B99E,
+    $28B1EFDA,$66ACFBA7,$FF68944A,$77A44FD1,$7F331522,$59FFB3FA,$A6DF935B,$FA12D9DF,
+    $C6BF6F3F,$89520CF6,$659EDD6A,$544DA739,$8B052538,$7C30EA21,$C2345525,$15927FB2,
+    $144A436B,$BA107B8B,$1219AC97,$06730432,$31831AB3,$C55A5C24,$AA0FCD3E,$E5606BE8,
+    $5C88F19B,$4C0841EE,$1FE37267,$11F9C4F4,$9F1B9DAE,$864E76D0,$E637C731,$D97D23A6,
+    $32F53D5C,$B8161980,$93FA0F84,$CAEF0870,$8874487E,$98F2CC73,$645FB5C6,$CD853659,
+    $2062470D,$16EDE8E9,$6B06DAB5,$78B43900,$FC95B786,$5D8E7DE1,$465B5954,$FE7BA014,
+    $F7D23F7B,$92BC8B18,$03593592,$55CEF4F7,$74B27317,$79DE1FC2,$C8A0BFBD,$229398CC,
+    $62A602CE,$BCB94661,$5336D206,$D2A375FE,$6A6AB483,$4702A5A4,$A2E9D73D,$23A2E0F1,
+    $9189140A,$581D18DC,$B39A922B,$82356212,$D5F432A9,$D356C2A3,$5F765B4D,$450AFCC8,
+    $4415E137,$E8ECDFBC,$ED0DE3EA,$60D42B13,$F13DF971,$71FC5DA2,$C1455340,$F087742F,
+    $F55E5751,$67B3C1F8,$AC6B8774,$7DCFAAAC,$95983BC0,$489BB0B1,$2C184223,$964B6726,
+    $2BD3271C,$72266472,$DED64530,$0A2AA343,$D4F716A0,$B4DAD6D9,$2184345E,$512C990C,
+    $29D92D08,$2EBE709A,$01144C69,$34584B9D,$E4634ED6,$ECC963CF,$3C6984AA,$4ED056EF,
+    $9CA56976,$8F3E80D4,$B5BAE7C5,$30B5CAF5,$63F33A64,$A9E4BBDE,$F6B82298,$4D673C1D),
+   ($4B4F1121,$BA183081,$C784F41F,$D17D0BAC,$083D2267,$37B1361E,$3581AD05,$FDA2F6BC,
+    $1E892CDD,$B56D3C3A,$32140E46,$138D8AAB,$E14773D4,$5B0E71DF,$5D1FE055,$3FB991D3,
+    $F1F46C71,$A325988C,$10F66E80,$B1006348,$726A9F60,$3B67F8BA,$4E114EF4,$05C52115,
+    $4C5CA11C,$99E1EFD8,$471B83B3,$CBF7E524,$43AD82F5,$690CA93B,$FAA61BB2,$12A832B5,
+    $B734F943,$BD22AEA7,$88FEC626,$5E80C3E7,$BE3EAF5E,$44617652,$A5724475,$BB3B9695,
+    $7F3FEE8F,$964E7DEB,$518C052D,$2A0BBC2B,$C2175F5C,$9A7B3889,$A70D8D0C,$EACCDD29,
+    $CCCD6658,$34BB25E6,$B8391090,$F651356F,$52987C9E,$0C16C1CD,$8E372D3C,$2FC6EBBD,
+    $6E5DA3E3,$B0E27239,$5F685738,$45411786,$067F65F8,$61778B40,$81AB2E65,$14C8F0F9,
+    $A6B7B4CE,$4036EAEC,$BF62B00A,$ECFD5E02,$045449A6,$B20AFD28,$2166D273,$0D13A863,
+    $89508756,$D51A7530,$2D653F7A,$3CDBDBC3,$80C9DF4F,$3D5812D9,$53FBB1F3,$C0F185C0,
+    $7A3C3D7E,$68646410,$857607A0,$1D12622E,$97F33466,$DB4C9917,$6469607C,$566E043D,
+    $79EF1EDB,$2C05898D,$C9578E25,$CD380101,$46E04377,$7D1CC7A9,$6552B837,$20192608,
+    $B97500C5,$ED296B44,$368648B4,$62995CD5,$82731400,$F9AEBD8B,$3844C0C7,$7C2DE794,
+    $33A1A770,$8AE528C2,$5A2BE812,$1F8F4A07,$2B5ED7CA,$937EB564,$6FDA7E11,$E49B5D6C,
+    $B4B3244E,$18AA53A4,$3A061334,$4D6067A3,$83BA5868,$9BDF4DFE,$7449F261,$709F8450,
+    $CAD133CB,$DE941C3F,$F52AE484,$781D77ED,$7E4395F0,$AE103B59,$922331BB,$42CE50C8,
+    $E6F08153,$E7D941D0,$5028ED6B,$B3D2C49B,$AD4D9C3E,$D201FB6E,$A45BD5BE,$FFCB7F4B,
+    $579D7806,$F821BB5B,$59D592AD,$D0BE0C31,$D4E3B676,$0107165A,$0FE939D2,$49BCAAFD,
+    $55FFCFE5,$2EC1F783,$F39A09A5,$3EB42772,$19B55A5D,$024A0679,$8C83B3F7,$8642BA1D,
+    $ACACD9EA,$87D352C4,$60931F45,$A05F97D7,$1CECD42C,$E2FCC87B,$B60F94E2,$67A34B0B,
+    $FCDD40C9,$0B150A27,$D3EE9E04,$582E29E9,$4AC22B41,$6AC4E1B8,$BCCAA51A,$237AF30E,
+    $EBC3B709,$C4A59D19,$284BC98A,$E9D41A93,$6BFA2018,$73B2D651,$11F9A2FA,$CE09BFF1,
+    $41A470AA,$25888F22,$77E754E8,$F7330D8E,$158EAB16,$C5D68842,$C685A6F6,$E5B82FDE,
+    $09EA3A96,$6DDE1536,$4FA919DA,$26C0BE9F,$9EED6F69,$F05555F2,$E06FC285,$9CD76D23,
+    $AF452A92,$EFC74CB7,$9D6B4732,$8BE408EE,$22401D0D,$EE6C459D,$7587CB82,$E8746862,
+    $5CBDDE87,$98794278,$31AFB94D,$C11E0F2F,$30E8FC2A,$CF3261EF,$1A3023E1,$AA2F86CF,
+    $F202E24A,$8D08DCFF,$764837C6,$A26374CC,$9F7C3E88,$949CC57D,$DD26A07F,$C39EFAB0,
+    $C8F879A1,$DCE67BB9,$F4B0A435,$912C9AE0,$D85603E4,$953A9BBF,$FB8290D6,$0AEBCD5F,
+    $16206A9A,$6C787A14,$D9A0F16A,$29BF4F74,$8F8BCE91,$0E5A9354,$AB038CB1,$1B8AD11B,
+    $E327FF49,$0053DA20,$90CF51DC,$DA92FE6D,$0390CA47,$A8958097,$A9DC5BAF,$3931E3C1,
+    $840446B6,$63D069FB,$D7460299,$7124ECD1,$0791E613,$485918FC,$D635D04C,$DF96AC33,
+    $66F2D303,$247056AE,$A1A7B2A8,$27D8CC9C,$17B6E998,$7BF5590F,$FE97F557,$5471D8A2),
+   ($83A327A1,$9F379F51,$40A7D007,$11307423,$224587C1,$AC27D63B,$3B7E64EA,$2E1CBFA6,
+    $09996000,$03BC0E2C,$D4C4478A,$4542E0AB,$FEDA26D4,$C1D10FCB,$8252F596,$4494EB5C,
+    $A362F314,$F5BA81FD,$75C3A376,$4CA214CA,$E164DEDD,$5088FA97,$4B0930E0,$2FCFB7E8,
+    $33A6F4B2,$C7E94211,$2D66C774,$43BE8BAE,$C663D445,$908EB130,$F4E3BE15,$63B9D566,
+    $529396B5,$1E1BE743,$4D5FF63F,$985E4A83,$71AB9DF7,$C516C6F5,$85C19AB4,$1F4DAEE4,
+    $F2973431,$B713DC5E,$3F2E159A,$C824DA16,$06BF376A,$B2FE23EC,$E39B1C22,$F1EECB5F,
+    $08E82D52,$565686C2,$AB0AEA93,$FD47219F,$EBDBABD7,$2404A185,$8C7312B9,$A8F2D828,
+    $0C8902DA,$65B42B63,$C0BBEF62,$4E3E4CEF,$788F8018,$EE1EBAB7,$93928F9D,$683D2903,
+    $D3B60689,$AFCB0DDC,$88A4C47A,$F6DD9C3D,$7EA5FCA0,$8A6D7244,$BE11F120,$04FF91B8,
+    $8D2DC8C0,$27F97FDB,$7F9E1F47,$1734F0C7,$26F3ED8E,$0DF8F2BF,$B0833D9E,$E420A4E5,
+    $A423CAE6,$95616772,$9AE6C049,$075941F2,$D8E12812,$000F6F4F,$3C0D6B05,$6CEF921C,
+    $B82BC264,$396CB008,$5D608A6F,$6D7782C8,$186550AA,$6B6FEC09,$28E70B13,$57CE5688,
+    $ECD3AF84,$23335A95,$91F40CD2,$7B6A3B26,$BD32B3B6,$3754A6FB,$8ED088F0,$F867E87C,
+    $20851746,$6410F9C6,$35380442,$C2CA10A7,$1ADEA27F,$76BDDD79,$92742CF4,$0E98F7EE,
+    $164E931D,$B9C835B3,$69060A99,$B44C531E,$FA7B66FE,$C98A5B53,$7D95AAE9,$302F467B,
+    $74B811DE,$F3866ABD,$B5B3D32D,$FC3157A4,$D251FE19,$0B5D8EAC,$DA71FFD5,$47EA05A3,
+    $05C6A9E1,$CA0EE958,$9939034D,$25DC5EDF,$79083CB1,$86768450,$CF757D6D,$5972B6BC,
+    $A78D59C9,$C4AD8D41,$2A362AD3,$D1179991,$601407FF,$DCF50917,$587069D0,$E0821ED6,
+    $DBB59427,$73911A4B,$7C904FC3,$844AFB92,$6F8C955D,$E8C0C5BB,$B67AB987,$A529D96C,
+    $F91F7181,$618B1B06,$E718BB0C,$8BD7615B,$D5A93A59,$54AEF81B,$772136E3,$CE44FD9C,
+    $10CDA57E,$87D66E0B,$3D798967,$1B2C1804,$3EDFBD68,$15F6E62B,$EF68B854,$3896DB35,
+    $12B7B5E2,$CB489029,$9E4F98A5,$62EB77A8,$217C24A2,$964152F6,$49B2080A,$53D23EE7,
+    $48FB6D69,$1903D190,$9449E494,$BF6E7886,$FB356CFA,$3A261365,$424BC1EB,$A1192570,
+    $019CA782,$9D3F7E0E,$9C127575,$EDF02039,$AD57BCCE,$5C153277,$81A84540,$BCAA7356,
+    $CCD59B60,$A62A629B,$A25CCD10,$2B5B65CF,$1C535832,$55FD4E3A,$31D9790D,$F06BC37D,
+    $4AFC1D71,$AEED5533,$BA461634,$BB694B78,$5F3A5C73,$6A3C764A,$8FB0CCA9,$F725684C,
+    $4FE5382F,$1D0163AF,$5AA07A8F,$E205A8ED,$C30BAD38,$FF22CF1F,$72432E2E,$32C2518B,
+    $3487CE4E,$7AE0AC02,$709FA098,$0A3B395A,$5B4043F8,$A9E48C36,$149A8521,$D07DEE6B,
+    $46ACD2F3,$8958DFFC,$B3A1223C,$B11D31C4,$CD7F4D3E,$0F28E3AD,$E5B100BE,$AAC54824,
+    $E9C9D7BA,$9BD47001,$80F149B0,$66022F0F,$020C4048,$6EFA192A,$67073F8D,$13EC7BF9,
+    $3655011A,$E6AFE157,$D9845F6E,$DECC4425,$511AE2CC,$DF81B4D8,$D7809E55,$D6D883D9,
+    $2CC7978C,$5E787CC5,$DD0033D1,$A050C937,$97F75DCD,$299DE580,$41E2B261,$EA5A54F1),
+   ($7E672590,$BEA513BB,$2C906FE6,$86029C2B,$55DC4F74,$0553398E,$63E09647,$CAFD0BAB,
+    $264C37DF,$8272210F,$67AFA669,$12D98A5F,$8CAB23C4,$75C68BD1,$C3370470,$33F37F4E,
+    $283992FF,$E73A3A67,$1032F283,$F5AD9FC2,$963F0C5D,$664FBC45,$202BA41C,$C7C02D80,
+    $54731E84,$8A1085F5,$601D80FB,$2F968E55,$35E96812,$E45A8F78,$BD7DE662,$3B6E6EAD,
+    $8097C5EF,$070B6781,$B1E508F3,$24E4FAE3,$B81A7805,$EC0FC918,$43C8774B,$9B2512A9,
+    $2B05AD04,$32C2536F,$EDF236E0,$8BC4B0CF,$BACEB837,$4535B289,$0D0E94C3,$A5A371D0,
+    $AD695A58,$39E3437D,$9186BFFC,$21038C3B,$0AA9DFF9,$5D1F06CE,$62DEF8A4,$F740A2B4,
+    $A2575868,$682683C1,$DBB30FAC,$61FE1928,$468A6511,$C61CD5F4,$E54D9800,$6B98D7F7,
+    $8418B6A5,$5F09A5D2,$90B4E80B,$49B2C852,$69F11C77,$17412B7E,$7F6FC0ED,$56838DCC,
+    $6E9546A2,$D0758619,$087B9B9A,$D231A01D,$AF46D415,$097060FD,$D920F657,$882D3F9F,
+    $3AE7C3C9,$E8A00D9B,$4FE67EBE,$2EF80EB2,$C1916B0C,$F4DFFEA0,$B97EB3EB,$FDFF84DD,
+    $FF8B14F1,$E96B0572,$F64B508C,$AE220A6E,$4423AE5A,$C2BECE5E,$DE27567C,$FC935C63,
+    $47075573,$E65B27F0,$E121FD22,$F2668753,$2DEBF5D7,$8347E08D,$AC5EDA03,$2A7CEBE9,
+    $3FE8D92E,$23542FE4,$1FA7BD50,$CF9B4102,$9D0DBA39,$9CB8902A,$A7249D8B,$0F6D667A,
+    $5EBFA9EC,$6A594DF2,$79600938,$023B7591,$EA2C79C8,$C99D07EA,$64CB5EE1,$1A9CAB3D,
+    $76DB9527,$C08E012F,$3DFB481A,$872F22E7,$2948D15C,$A4782C79,$6F50D232,$78F0728A,
+    $5A87AAB1,$C4E2C19C,$EE767387,$1B2A1864,$7B8D10D3,$D1713161,$0EEAC456,$D8799E06,
+    $B645B548,$4043CB65,$A874FB29,$4B12D030,$7D687413,$18EF9A1F,$D7631D4C,$5829C7DA,
+    $CDFA30FA,$C5084BB0,$92CD20E2,$D4C16940,$03283EC0,$A917813F,$9A587D01,$70041F8F,
+    $DC6AB1DC,$DDAEE3D5,$31829742,$198C022D,$1C9EAFCB,$5BBC6C49,$D3D3293A,$16D50007,
+    $04BB8820,$3C5C2A41,$37EE7AF8,$8EB04025,$9313ECBA,$BFFC4799,$8955A744,$EF85D633,
+    $504499A7,$A6CA6A86,$BB3D3297,$B34A8236,$6DCCBE4F,$06143394,$CE19FC7B,$CCC3C6C6,
+    $E36254AE,$77B7EDA1,$A133DD9E,$EBF9356A,$513CCF88,$E2A1B417,$972EE5BD,$853824CD,
+    $5752F4EE,$6C1142E8,$3EA4F309,$B2B5934A,$DFD628AA,$59ACEA3E,$A01EB92C,$389964BC,
+    $DA305DD4,$019A59B7,$11D2CA93,$FAA6D3B9,$4E772ECA,$72651776,$FB4E5B0E,$A38F91A8,
+    $1D0663B5,$30F4F192,$B50051B6,$B716CCB3,$4ABD1B59,$146C5F26,$F134E2DE,$00F67C6C,
+    $B0E1B795,$98AA4EC7,$0CC73B34,$654276A3,$8D1BA871,$740A5216,$E0D01A23,$9ED161D6,
+    $9F36A324,$993EBB7F,$FEB9491B,$365DDCDB,$810CFFC5,$71EC0382,$2249E7BF,$48817046,
+    $F3A24A5B,$4288E4D9,$0BF5C243,$257FE151,$95B64C0D,$4164F066,$AAF7DB08,$73B1119D,
+    $8F9F7BB8,$D6844596,$F07A34A6,$53943D0A,$F9DD166D,$7A8957AF,$F8BA3CE5,$27C9621E,
+    $5CDAE910,$C8518998,$941538FE,$136115D8,$ABA8443C,$4D01F931,$34EDF760,$B45F266B,
+    $D5D4DE14,$52D8AC35,$15CFD885,$CBC5CD21,$4CD76D4D,$7C80EF54,$BC92EE75,$1E56A1F6),
+   ($BAA20B6C,$9FFBAD26,$E1F7D738,$794AEC8D,$C9E9CF3C,$8A9A7846,$C57C4685,$B9A92FED,
+    $29CB141F,$52F9DDB7,$F68BA6BC,$19CCC020,$4F584AAA,$3BF6A596,$003B7CF7,$54F0CE9A,
+    $A7EC4303,$46CF0077,$78D33AA1,$215247D9,$74BCDF91,$08381D30,$DAC43E40,$64872531,
+    $0BEFFE5F,$B317F457,$AEBB12DA,$D5D0D67B,$7D75C6B4,$42A6D241,$1502D0A9,$3FD97FFF,
+    $C6C3ED28,$81868D0A,$92628BC5,$86679544,$FD1867AF,$5CA3EA61,$568D5578,$4A2D71F4,
+    $43C9D549,$8D95DE2B,$6E5C74A0,$9120FFC7,$0D05D14A,$A93049D3,$BFA80E17,$F4096810,
+    $043F5EF5,$A673B4F1,$6D780298,$A4847783,$5EE726FB,$9934C281,$220A588C,$384E240F,
+    $933D5C69,$39E5EF47,$26E8B8F3,$4C1C6212,$8040F75D,$074B7093,$6625A8D7,$36298945,
+    $76285088,$651D37C3,$24F5274D,$DBCA3DAB,$186B7EE1,$D80F8182,$14210C89,$943A3075,
+    $4E6E11C4,$4D7E6BAD,$F05064C8,$025DCD97,$4BC10302,$7CEDE572,$8F90A970,$AB88EEBA,
+    $B5998029,$5124D839,$B0EEB6A3,$89DDABDC,$E8074D76,$A1465223,$32518CF2,$9D39D4EB,
+    $C0D84524,$E35E6EA8,$7ABF3804,$113E2348,$9AE6069D,$B4DFDABB,$A8C5313F,$23EA3F79,
+    $530E36A2,$A5FD228B,$95D1D350,$2B14CC09,$40042956,$879D05CC,$2064B9CA,$ACACA40E,
+    $B29C846E,$9676C9E3,$752B7B8A,$7BE2BCC2,$6BD58F5E,$D48F4C32,$606835E4,$9CD7C364,
+    $2C269B7A,$3A0D079C,$73B683FE,$45374F1E,$10AFA242,$577F8666,$DDAA10F6,$F34F561C,
+    $3D355D6B,$E47048AE,$AA13C492,$050344FD,$2AAB5151,$F5B26AE5,$ED919A59,$5AC67900,
+    $F1CDE380,$0C79A11B,$351533FC,$CD4D8E36,$1F856005,$690B9FDD,$E736DCCF,$1D47BF6A,
+    $7F66C72A,$85F21B7F,$983CBDB6,$01EBBEBF,$035F3B99,$EB111F34,$28CEFDC6,$5BFC9ECD,
+    $F22EACB0,$9E41CBB2,$E0F8327C,$82E3E26F,$FC43FC86,$D0BA66DF,$489EF2A7,$D9E0C81D,
+    $68690D52,$CC451367,$C2232E16,$E95A7335,$0FDAE19B,$FF5B962C,$97596527,$C46DB333,
+    $3ED4C562,$C14C9D9E,$5D6FAA21,$638E940D,$F9316D58,$47B3B0EA,$30FFCAD2,$CE1BBA7D,
+    $1E6108E6,$2E1EA33D,$507BF05B,$FAFEF94B,$D17DE8E2,$5598B214,$1663F813,$17D25A2D,
+    $EEFA5FF9,$582F4E37,$12128773,$FEF17AB8,$06005322,$BB32BBC9,$8C898508,$592C15F0,
+    $D38A4054,$4957B7D6,$D2B891DB,$37BD2D3E,$34AD20CB,$622288E9,$2DC7345A,$AFB416C0,
+    $1CF459B1,$DC7739FA,$0A711A25,$13E18A0C,$5F72AF4C,$6AC8DB11,$BE53C18E,$1AA569B9,
+    $EF551EA4,$A02A429F,$BD16E790,$7EB9171A,$77D693D8,$8E06993A,$9BDE7560,$E5801987,
+    $C37A09BE,$B8DB76AC,$E2087294,$6C81616D,$B7F30FE7,$BC9B82BD,$FBA4E4D4,$C7B1012F,
+    $A20C043B,$DE9FEBD0,$2F9297CE,$E610AEF8,$70B06F19,$C86AE00B,$0E01988F,$41192AE0,
+    $448C1CB5,$ADBE92EE,$7293A007,$1B54B5B3,$D61F63D1,$EAE40A74,$61A72B55,$EC83A7D5,
+    $88942806,$90A07DA5,$D7424B95,$67745B4E,$A31A1853,$CA6021EF,$DFB56C4F,$CBC2D915,
+    $3C48E918,$8BAE3C63,$6F659C71,$F8B754C1,$2782F3DE,$F796F168,$71492C84,$33C0F5A6,
+    $3144F6EC,$25DC412E,$B16C5743,$83A1FA7E,$0997B101,$B627E6E8,$CF33905C,$8456FB65),
+   ($B29BEA74,$C35DA605,$305C1CA3,$D2E9F5BC,$6FD5BFF4,$FF347703,$FC45B163,$F498E068,
+    $B71229FC,$81ACC3FB,$78538A8B,$984ECF81,$A5DA47A4,$8F259EEF,$6475DC65,$081865B9,
+    $49E14A3C,$19E66079,$D382E91B,$5B109794,$3F9F81E1,$4470A388,$41601ABE,$AAF9F407,
+    $8E175EF6,$ED842297,$893A4271,$1790839A,$D566A99E,$6B417DEE,$75C90D23,$715EDB31,
+    $723553F7,$9AFB50C9,$FBC5F600,$CD3B6A4E,$97ED0FBA,$29689AEC,$63135C8E,$F0E26C7E,
+    $0692AE7F,$DBB208FF,$2EDE3E9B,$6A65BEBD,$D40867E9,$C954AFC5,$73B08201,$7FFDF809,
+    $1195C24F,$1CA5ADCA,$74BD6D1F,$B393C455,$CADFD3FA,$99F13011,$0EBCA813,$60E791B8,
+    $6597AC7A,$18A7E46B,$09CB49D3,$0B27DF6D,$CFE52F87,$CEF66837,$E6328035,$FA87C592,
+    $37BAFF93,$D71FCC99,$DCAB205C,$4D7A5638,$48012510,$62797558,$B6CF1FE5,$BC311834,
+    $9C2373AC,$14EC6175,$A439CBDF,$54AFB0EA,$D686960B,$FDD0D47B,$7B063902,$8B78BAC3,
+    $26C6A4D5,$5C0055B6,$2376102E,$0411783E,$2AA3F1CD,$51FC6EA8,$701CE243,$9B2A0ABB,
+    $0AD93733,$6E80D03D,$AF6295D1,$F629896F,$A30B0648,$463D8DD4,$963F84CB,$01FF94F8,
+    $8D7FEFDC,$553611C0,$A97C1719,$B96AF759,$E0E3C95E,$0528335B,$21FE5925,$821A5245,
+    $807238B1,$67F23DB5,$EA6B4EAB,$0DA6F985,$AB1BC85A,$EF8C90E4,$4526230E,$38EB8B1C,
+    $1B91CD91,$9FCE5F0C,$F72CC72B,$C64F2617,$DAF7857D,$7D373CF1,$28EAEDD7,$203887D0,
+    $C49A155F,$A251B3B0,$F2D47AE3,$3D9EF267,$4A94AB2F,$7755A222,$0205E329,$C28FA7A7,
+    $AEC1FE51,$270F164C,$8C6D01BF,$53B5BC98,$C09D3FEB,$834986CC,$4309A12C,$578B2A96,
+    $3BB74B86,$69561B4A,$037E32F3,$DE335B08,$C5156BE0,$E7EF09AD,$93B834C7,$A7719352,
+    $59302821,$E3529D26,$F961DA76,$CB142C44,$A0F3B98D,$76502457,$945A414B,$078EEB12,
+    $DFF8DE69,$EB6C8C2D,$BDA90C4D,$E9C44D16,$168DFD66,$AD64763B,$A65FD764,$95A29C06,
+    $32D7713F,$40F0B277,$224AF08F,$004CB5E8,$92574814,$8877D827,$3E5B2D04,$68C2D5F2,
+    $86966273,$1D433ADA,$8774988A,$3C0E0BFE,$DDAD581D,$2FD654ED,$0F4769FD,$C181EE9D,
+    $5FD88F61,$341DBB3A,$528543F9,$D92235CF,$1EA82EB4,$B5CD790F,$91D24F1E,$A869E6C2,
+    $61F474D2,$CC205ADD,$0C7BFBA9,$BF2B0489,$B02D72D8,$2B46ECE6,$E4DCD90A,$B8A11440,
+    $EE8A63B7,$854DD1A1,$D1E00583,$42B40E24,$9E8964DE,$B4B35D78,$BEC76F6E,$24B9C620,
+    $D8D399A6,$5ADB2190,$2DB12730,$3A5866AF,$58C8FADB,$5D8844E7,$8A4BF380,$15A01D70,
+    $79F5C028,$66BE3B8C,$F3E42B53,$56990039,$2C0C3182,$5E16407C,$ECC04515,$6C440284,
+    $4CB6701A,$13BFC142,$9D039F6A,$4F6E92C8,$A1407C62,$8483A095,$C70AE1C4,$E20213A2,
+    $BACAFC41,$4ECC12B3,$4BEE3646,$1FE807AE,$25217F9C,$35DDE5F5,$7A7DD6CE,$F89CCE50,
+    $AC07B718,$7E73D2C6,$E563E76C,$123CA536,$3948CA56,$9019DD49,$10AA88D9,$C82451E2,
+    $473EB6D6,$506FE854,$E8BB03A5,$332F4C32,$FE1E1E72,$B1AE572A,$7C0D7BC1,$E1C37EB2,
+    $F542AA60,$F1A48EA0,$D067B89F,$BBFA195D,$1A049B0D,$315946AA,$36D1B447,$6D2EBDF0),
+   ($0D188A6D,$12CEA0DB,$7E63740E,$6A444821,$253D234F,$6FFC6597,$94A6BDEF,$33EE1B2F,
+    $0A6C00C0,$3AA336B1,$5AF55D17,$265FB3DC,$0E89CF4D,$0786B008,$C80055B8,$6B17C3CE,
+    $72B05A74,$D21A8D78,$A6B70840,$FE8EAE77,$ED69565C,$55E1BCF4,$585C2F60,$E06F1A62,
+    $AD67C0CD,$7712AF88,$9CC26ACA,$1888053D,$37EB853E,$9215ABD7,$DE30ADFC,$1F1038E6,
+    $70C51C8A,$8D586C26,$F72BDD90,$4DC3CE15,$68EAEEFA,$D0E9C8B9,$200F9C44,$DDD141BA,
+    $024BF1D3,$0F64C9D4,$C421E9E9,$9D11C14C,$9A0DD9E4,$5F92EC19,$1B980DF0,$1DCC4542,
+    $B8FE8C56,$0C9C9167,$4E81EB49,$CA368F27,$E3603B37,$EA08ACCC,$AC516992,$C34F513B,
+    $804D100D,$6EDCA4C4,$FC912939,$29D219B0,$278AAA3C,$4868DA7D,$54E890B7,$B46D735A,
+    $514589AA,$D6C630AF,$4980DFE8,$BE3CCC55,$59D41202,$650C078B,$AF3A9E7B,$3ED9827A,
+    $9E79FC6E,$AADBFBAE,$C5F7D803,$3DAF7F50,$67B4F465,$73406E11,$39313F8C,$8A6E6686,
+    $D8075F1F,$D3CBFED1,$69C7E49C,$930581E0,$E4B1A5A8,$BBC45472,$09DDBF58,$C91D687E,
+    $BDBFFDA5,$88C08735,$E9E36BF9,$DB5EA9B6,$95559404,$08F432FB,$E24EA281,$64663579,
+    $000B8010,$7914E7D5,$32FD0473,$D1A7F0A4,$445AB98E,$EC72993F,$A29A4D32,$B77306D8,
+    $C7C97CF6,$7B6AB645,$F5EF7ADF,$FB2E15F7,$E747F757,$5E944354,$234A2669,$47E46359,
+    $9B9D11A9,$40762CED,$56F1DE98,$11334668,$890A9A70,$1A296113,$B3BD4AF5,$163B7548,
+    $D51B4F84,$B99B2ABC,$3CC1DC30,$A9F0B56C,$812272B2,$0B233A5F,$B650DBF2,$F1A0771B,
+    $36562B76,$DC037B0F,$104C97FF,$C2EC98D2,$90596F22,$28B6620B,$DF42B212,$FDBC4243,
+    $F3FB175E,$4A2D8B00,$E8F3869B,$30D69BC3,$853714C8,$A7751D2E,$31E56DEA,$D4840B0C,
+    $9685D783,$068C9333,$8FBA032C,$76D7BB47,$6D0EE22B,$B546794B,$D971B894,$8B09D253,
+    $A0AD5761,$EE77BA06,$46359F31,$577CC7EC,$52825EFD,$A4BEED95,$9825C52A,$EB48029A,
+    $BAAE59F8,$CF490EE1,$BC990164,$8CA49DFE,$4F38A6E7,$2BA98389,$8228F538,$199F64AC,
+    $01A1CAC5,$A8B51641,$5CE72D01,$8E5DF26B,$60F28E1E,$CD5BE125,$E5B376BF,$1C8D3116,
+    $7132CBB3,$CB7AE320,$C0FA5366,$D7653E34,$971C88C2,$C62C7DD0,$34D0A3DA,$868F6709,
+    $7AE6FA8F,$22BBD523,$66CD3D5B,$1EF9288D,$F9CF58C1,$5B784E80,$7439A191,$AE134C36,
+    $9116C463,$2E9E1396,$F8611F3A,$2D2F3307,$247F37DD,$C1E2FF9D,$43C821E5,$05ED5CAB,
+    $EF74E80A,$4CCA6028,$F0AC3CBD,$5D874B29,$6C62F6A6,$4B2A2EF3,$B1AA2087,$62A5D0A3,
+    $0327221C,$B096B4C6,$417EC693,$ABA840D6,$789725EB,$F4B9E02D,$E6E00975,$CC04961A,
+    $63F624BB,$7FA21ECB,$2C01EA7F,$B2415005,$2A8BBEB5,$83B2B14E,$A383D1A7,$5352F96A,
+    $043ECDAD,$CE1918A1,$FA6BE6C9,$50DEF36F,$F6B80CE2,$4543EF7C,$9953D651,$F257955D,
+    $87244914,$DA1E0A24,$FFDA4785,$14D327A2,$3B93C29F,$840684B4,$61AB71A0,$9F7B784A,
+    $2FD570CF,$15955BDE,$38F8D471,$3534A718,$133FB71D,$3FD80F52,$4290A8BE,$75FF44C7,
+    $A554E546,$E1023499,$BF2652E3,$7D20399E,$A1DF7E82,$177092EE,$217DD3F1,$7C1FF8D9),
+   ($12113F2E,$BFBD0785,$F11793FB,$A5BFF566,$83C7B0E5,$72FB316B,$75526A9A,$41E0E612,
+    $7156BA09,$53CE7DEE,$0AA26881,$A43E0D7D,$3DA73CA3,$182761ED,$BD5077FF,$56DB4AA0,
+    $E792711C,$F0A4EB1D,$7F878237,$EC65C4E8,$08DC8D43,$0F8CE142,$8258ABDA,$F4154E16,
+    $49DEC2FD,$CD8D5705,$6C2C3A0F,$5C12BB88,$EFF3CDB6,$2C89ED8C,$7BEBA967,$2A142157,
+    $C6D0836F,$B4F97E96,$6931E969,$514E6C7C,$A7792600,$0BBBF780,$59671BBD,$0707B676,
+    $37482D93,$80AF1479,$3805A60D,$E1F4CAC1,$580B3074,$30B8D6CE,$05A304BE,$D176626D,
+    $EBCA97F3,$BB201F11,$6A1AFE23,$FFAA86E4,$62B4DA49,$1B6629F5,$F5D9E092,$F37F3DD1,
+    $619BD45B,$A6EC8E4F,$29C80939,$0C7C0C34,$9CFE6E48,$E65FD3AC,$73613B65,$B3C669F9,
+    $BE2E8A9E,$286F9678,$5797FD13,$99805D75,$CFB641C5,$A91074BA,$6343AF47,$6403CB46,
+    $8894C8DB,$2663034C,$3C40DC5E,$00995231,$96789AA2,$2EFDE4B9,$7DC195E1,$547DADD5,
+    $06A8EA04,$F2347A63,$5E0DC6F7,$8462DFC2,$1E6B2C3C,$9BD275B3,$91D419E2,$BCEFD17E,
+    $B9003924,$D07E7320,$DEF0495C,$C36AD00E,$1785B1AB,$92E20BCF,$B139F0E9,$675BB9A1,
+    $AECFA4AF,$132376CB,$E84589D3,$79A05456,$A2F860BC,$1AE4F8B5,$20DF4DB4,$A1E1428B,
+    $3BF60A1A,$27FF7BF1,$CB44C0E7,$F7F587C4,$1F3B9B21,$94368F01,$856E23A4,$6F93DE3F,
+    $773F5BBF,$8B22056E,$DF41F654,$B8246FF4,$8D57BFF2,$D57167EA,$C5699F22,$40734BA7,
+    $5D5C2772,$033020A8,$E30A7C4D,$ADC40FD6,$76353441,$5AA5229B,$81516590,$DA49F14E,
+    $4FA672A5,$4D9FAC5F,$154BE230,$8A7A5CC0,$CE3D2F84,$CCA15514,$5221360C,$AF0FB81E,
+    $5BDD5873,$F6825F8F,$1113D228,$70AD996C,$93320051,$60471C53,$E9BA567B,$3A462AE3,
+    $5F55E72D,$1D3C5AD7,$DCFC45EC,$34D812EF,$FA96EE1B,$369D1EF8,$C9B1A189,$7C1D3555,
+    $50845EDC,$4BB31877,$8764A060,$8C9A9415,$230E1A3A,$B05E9133,$242B9E03,$A3B99DB7,
+    $C2D7FB0A,$3333849D,$D27278D4,$B5D3EFA6,$78AC28AD,$C7B2C135,$0926ECF0,$C1374C91,
+    $74F16D98,$2274084A,$3F6D9CFA,$7AC0A383,$B73AFF1F,$3909A23D,$9F1653AE,$4E2F3E71,
+    $CA5AB22A,$E01E3858,$90C5A7EB,$3E4A17DF,$AA987FB0,$488BBD62,$B625062B,$2D776BB8,
+    $43B5FC08,$1490D532,$D6D12495,$44E89845,$2FE60118,$9D9EF950,$AC38133E,$D3864329,
+    $017B255A,$FDC2DD26,$256851E6,$318E7086,$2BFA4861,$89EAC706,$EE5940C6,$68C3BC2F,
+    $E260334B,$98DA90BB,$F818F270,$4706D897,$212D3799,$4CF7E5D0,$D9C9649F,$A85DB5CD,
+    $35E90E82,$6B881152,$AB1C02C7,$46752B02,$664F598E,$45AB2E64,$C4CDB4B2,$BA42107F,
+    $EA2A808A,$971BF3DE,$4A54A836,$4253AECC,$1029BE68,$6DCC9225,$E4BCA56A,$C0AE50B1,
+    $7E011D94,$E59C162C,$D8E5C340,$D470FA0B,$B2BE79DD,$D783889C,$1CEDE8F6,$8F4C817A,
+    $DDB785C9,$860232D8,$198AAAD9,$A0814738,$3219CFFC,$169546D2,$FC0CB759,$55911510,
+    $04D5CEC3,$ED08CC3B,$0D6CF427,$C8E38CCA,$0EEEE3FE,$9EE7D7C8,$F9F24FA9,$DB04B35D,
+    $9AB0C9E0,$651F4417,$028F8B07,$6E28D9AA,$FBA96319,$8ED66687,$FECBC58D,$954DDB44),
+   ($7B0BDFFE,$865D16B1,$49A058C0,$97ABAA3F,$CAACC75D,$ABA6C17D,$F8746F92,$6F48AEED,
+    $8841D4B5,$F36A146A,$73C390AB,$E6FB558F,$87B1019E,$26970252,$246377B2,$CBF676AE,
+    $F923DB06,$F7389116,$14C81A90,$83114EB4,$8B137559,$95A86A7A,$D5B8DA8C,$C4DF780E,
+    $5A9CB3E2,$E44D4062,$E8DC8EF6,$9D180845,$817AD18B,$C286C85B,$251F20DE,$EE6D5933,
+    $F6EDEF81,$D4D16C1E,$C94A0C32,$8437FD22,$3271EE43,$42572AEE,$5F91962A,$1C522D98,
+    $59B23F0C,$D86B8804,$08C63531,$2C0D7A40,$B97C4729,$04964DF9,$13C74A17,$5878362F,
+    $4C808CD6,$092CB1E0,$6DF02885,$A0C2105E,$8ABA9E68,$64E03057,$E5D61325,$0E43A628,
+    $16DBD62B,$2733D90B,$3AE57283,$C0C1052C,$4B6FB620,$37513953,$FC898BB3,$471B179F,
+    $DF6E66B8,$D32142F5,$9B30FAFC,$4ED92549,$105C6D99,$4ACD69FF,$2B1A27D3,$6BFCC067,
+    $6301A278,$AD36E6F2,$EF3FF64E,$56B3CADB,$0184BB61,$17BEB9FD,$FAEC6109,$A2E1FFA1,
+    $2FD224F8,$238F5BE6,$8F8570CF,$AEB5F25A,$4F1D3E64,$4377EB24,$1FA45346,$B2056386,
+    $52095E76,$BB7B5ADC,$3514E472,$DDE81E6E,$7ACEA9C4,$AC15CC48,$71C97D93,$767F941C,
+    $911052A2,$FFEA09BF,$FE3DDCF0,$15EBF3AA,$9235B8BC,$75408615,$9A723437,$E1A1BD38,
+    $33541B7E,$1BDD6856,$B307E13E,$90814BB0,$51D7217B,$0BB92219,$689F4500,$C568B01F,
+    $5DF3D2D7,$3C0ECD0D,$2A0244C8,$852574E8,$E72F23A9,$8E26ED02,$2D92CBDD,$DABC0458,
+    $CDF5FEB6,$9E4E8DCC,$F4F1E344,$0D8C436D,$4427603B,$BDD37FDA,$80505F26,$8C7D2B8E,
+    $B73273C5,$397362EA,$618A3811,$608BFB88,$06F7D714,$212E4677,$28EFCEAD,$076C0371,
+    $36A3A4D9,$5487B455,$3429A365,$65D467AC,$78EE7EEB,$99BF12B7,$4D129896,$772A5601,
+    $CCE284C7,$2ED85C21,$D099E8A4,$A179158A,$6AC0AB1A,$299A4807,$BE67A58D,$DC19544A,
+    $B8949B54,$8D315779,$B6F849C1,$53C5AC34,$66DE92A5,$F195DD13,$318D3A73,$301EC542,
+    $0CC40DA6,$F253ADE4,$467EE566,$EA5585EC,$3BAF19BB,$7DE9F480,$79006E7C,$A9B7A197,
+    $A44BD8F1,$FB2BA739,$EC342FD4,$ED4FD32D,$3D1789BA,$400F5D7F,$C798F594,$4506A847,
+    $034C0A95,$E2162C9D,$55A9CFD0,$692D832E,$CF9DB2CA,$5E2287E9,$D2610EF3,$1AE7ECC2,
+    $48399CA0,$A7E4269B,$6EE3A0AF,$7065BFE1,$A6FFE708,$2256804C,$7476E21B,$41B0796C,
+    $7C243B05,$000A950F,$1858416B,$F5A53C89,$E9FEF823,$3F443275,$E0CBF091,$0AF27B84,
+    $3EBB0F27,$1DE6F7F4,$C31C29F7,$B166DE3D,$12932EC3,$9C0C0674,$5CDA81B9,$D1BD9D12,
+    $AFFD7C82,$8962BCA7,$A342C4A8,$62457151,$82089F03,$EB49C670,$5B5F6530,$7E28BAD2,
+    $20880BA3,$F0FAAFCD,$CE82B56F,$0275335C,$C18E8AFB,$DE601D69,$BA9B820A,$C8A2BE4F,
+    $D7CAC335,$D9A73741,$115E974D,$7F5AC21D,$383BF9C6,$BCAEB75F,$FD0350CE,$B5D06B87,
+    $9820E03C,$72D5F163,$E3644FC9,$A5464C4B,$57048FCB,$9690C9DF,$DBF9EAFA,$BFF4649A,
+    $053C00E3,$B4B61136,$67593DD1,$503EE960,$9FB4993A,$19831810,$C670D518,$B05B51D8,
+    $0F3A1CE5,$6CAA1F9C,$AACC31BE,$949ED050,$1EAD07E7,$A8479ABD,$D6CFFCD5,$936993EF),
+   ($472E91CB,$5444B5B6,$62BE5861,$1BE102C7,$63E4B31E,$E81F71B7,$9E2317C9,$39A408AE,
+    $518024F4,$1731C66F,$68CBC918,$71FB0C9E,$D03B7FDD,$7D6222EB,$9057EDA3,$1A34A407,
+    $8CC2253D,$B6F6979D,$835675DC,$F319BE9F,$BE1CD743,$4D32FEE4,$77E7D887,$37E9EBFD,
+    $15F851E8,$23DC3706,$19D78385,$BD506933,$A13AD4A6,$913F1A0E,$DDE560B9,$9A5F0996,
+    $A65A0435,$48D34C4D,$E90839A7,$8ABBA54E,$6FD13CE1,$C7EEBD3C,$0E297602,$58B9BBB4,
+    $EF7901E6,$64A28A62,$A509875A,$F8834442,$2702C709,$07353F31,$3B39F665,$F5B18B49,
+    $4010AE37,$784DE00B,$7A1121E9,$DE918ED3,$C8529DCD,$816A5D05,$02ED8298,$04E3DD84,
+    $FD2BC3E2,$AF167089,$96AF367E,$A4DA6232,$18FF7325,$05F9A9F1,$4FEFB9F9,$CD94EAA5,
+    $BFAA5069,$A0B8C077,$60D86F57,$FE71C813,$29EBD2C8,$4CA86538,$6BF1A030,$A237B88A,
+    $AA8AF41D,$E1F7B6EC,$E214D953,$33057879,$49CAA736,$FA45CFF3,$C063B411,$BA7E27D0,
+    $31533819,$2A004AC1,$210EFC3F,$2646885E,$66727DCF,$9D7FBF54,$A8DD0EA8,$3447CACE,
+    $3F0C14DB,$B8382AAC,$4ACE3539,$0A518D51,$95178981,$35AEE2CA,$73F0F7E3,$94281140,
+    $59D0E523,$D292CB88,$565D1B27,$7EC8FBAF,$069AF08D,$C127FD24,$0BC77B10,$5F03E7EF,
+    $453E99BA,$EED9FF7F,$87B55215,$7915AB4C,$D389A358,$5E75CE6D,$28D655C0,$DAD26C73,
+    $2E2510FF,$9FA7EECC,$1D0629C3,$DC9C9C46,$2D67ECD7,$E75E94BD,$3D649E2A,$6C413A2B,
+    $706F0D7C,$DFB0127B,$4E366B55,$2C825650,$24205720,$B5C998F7,$3E95462C,$756E5C72,
+    $3259488F,$11E8771A,$A7C0A617,$577663E5,$089B6401,$8EAB1941,$AE55EF8C,$3AAC5460,
+    $D4E6262F,$5D979A47,$B19823B0,$7F8D6A0C,$FFA08683,$0170CD0F,$858CD5D8,$53961C90,
+    $C4C61556,$41F2F226,$CFCD062D,$F24C03B8,$EA81DF5B,$7BE2FA52,$B361F98B,$C2901316,
+    $55BA4BBC,$93B234A9,$0FBC6603,$80A96822,$6D60491F,$22BD00F8,$BCAD5AAD,$52F3F13B,
+    $42FD2B28,$B41DD01C,$C52C93BF,$FC663094,$8F58D100,$43FECC08,$C6331E5D,$E6480F66,
+    $CA847204,$4BDF1DA0,$30CC2EFB,$13E02DEA,$FB49AC45,$F9D4434F,$F47C5B9C,$148879C2,
+    $039FC234,$A3DB9BFC,$D1A1DC5C,$763D7CD4,$ED6D2F93,$AB13AF6E,$1E8E054A,$D68F4F9A,
+    $C30484B3,$D7D50AFA,$6930855F,$CC07DB95,$CE746DB1,$744E967D,$F16CF575,$8643E8B5,
+    $F0EAE38E,$E52DE1D1,$6587DAE0,$0C4B8121,$1C7AC567,$AC0DB20A,$36C3A812,$5B1A4514,
+    $A9A3F868,$B9263BAA,$CB3CE9D2,$E44FB1A4,$9221BC82,$B29390FE,$6AB41863,$974A3E2E,
+    $89F531C5,$255CA13E,$8B65D348,$EC248F78,$D8FC16F0,$50ECDEEE,$09010792,$3C7D1FB2,
+    $EBA5426B,$847B417A,$468B40D9,$8DC4E680,$7CC1F391,$2F1EB086,$6E5BAA6A,$E0B395DA,
+    $E31B2CF6,$D9690B0D,$729EC464,$38403DDE,$610B80A2,$5CF433AB,$B0785FC4,$D512E4C6,
+    $BBB7D699,$5A86591B,$10CF5376,$12BF9F4B,$980FBAA1,$992A4E70,$20FA7AE7,$F7996EBB,
+    $C918A2BE,$82DE74F2,$AD54209B,$F66B4D74,$1FC5B771,$169D9229,$887761DF,$00B667D5,
+    $DB425E59,$B72F2844,$9B0AC1F5,$9C737E3A,$2B85476C,$6722ADD6,$44A63297,$0D688CED),
+   ($ABC59484,$4107778A,$8AD94C6F,$FE83DF90,$0F64053F,$D1292E9D,$C5744356,$8DD1ABB4,
+    $4C4E7667,$FB4A7FC1,$74F402CB,$70F06AFD,$A82286F2,$918DD076,$7A97C5CE,$48F7BDE3,
+    $6A04D11D,$AC243EF7,$33AC10CA,$2F7A341E,$5F75157A,$F4773381,$591C870E,$78DF8CC8,
+    $22F3ADB0,$251A5993,$09FBEF66,$796942A8,$97541D2E,$2373DAA9,$1BD2F142,$B57E8EB2,
+    $E1A5BFDB,$7D0EFA92,$B3442C94,$D2CB6447,$386AC97E,$66D61805,$BDADA15E,$11BC1AA7,
+    $14E9F6EA,$E533A0C0,$F935EE0A,$8FEE8A04,$810D6D85,$7C68B6D6,$4EDC9AA2,$956E897D,
+    $ED87581A,$264BE9D7,$FF4DDB29,$823857C2,$E005A9A0,$F1CC2450,$6F9951E1,$AADE2310,
+    $E70C75F5,$83E1A31F,$4F7DDE8E,$F723B563,$368E0928,$86362B71,$21E8982D,$DFB3F92B,
+    $44676352,$99EFBA31,$2EAB4E1C,$FC6CA5E7,$0EBE5D4E,$A0717D0C,$B64F8199,$946B31A1,
+    $5656CBC6,$CFFEC3EF,$622766C9,$FA211E35,$52F98B89,$6D01674B,$4978A802,$F651F701,
+    $15B0D43D,$D6FF4683,$3463855F,$672BA29C,$BC128312,$4626A70D,$C8927A5A,$B8481CF9,
+    $1C962262,$A21196BA,$BABA5EE9,$5BB162D0,$69943BD1,$0C47E35C,$8CC9619A,$E284D948,
+    $271BF264,$C27FB398,$4BC70897,$60CF202C,$7F42D6AA,$A5A13506,$5D3E8860,$CEA63D3C,
+    $63BF0A8F,$F02E9EFA,$B17B0674,$B072B1D3,$06E5723B,$3737E436,$24AA49C7,$0DED0D18,
+    $DB256B14,$58B27877,$ECB49F54,$6C40256A,$6EA92FFB,$3906AA4C,$C9866FD5,$4549323E,
+    $A7B85FAB,$1918CC27,$7308D7B5,$1E16C7AD,$71850B37,$3095FD78,$A63B70E6,$D880E2AE,
+    $3E282769,$A39BA6BC,$98700FA3,$F34C53E8,$288AF426,$B99D930F,$F5B99DF1,$E9D0C8CF,
+    $5AC8405D,$50E7217B,$511FBBBE,$2CA2E639,$C020301B,$356DBC00,$8E43DDB9,$4D327B4A,
+    $F20FF3ED,$1DBB29BD,$43D44779,$A1B68F70,$6114455B,$E63D280B,$6BF6FF65,$10FC39E5,
+    $3DAE126E,$C1D7CF11,$CB60B795,$1789D5B3,$9BCA36B7,$08306075,$84615608,$8B3A0186,
+    $E88FBECD,$7BA47C4D,$2DE44DAC,$653FE58D,$CCA0B968,$D7FA0E72,$93901780,$1F2C26CC,
+    $AE595B6B,$A9ECEA9B,$E3DBF8C4,$319CC130,$12981196,$01A3A4DE,$32C454B6,$755BD817,
+    $3CD871E4,$A48BB8DA,$02FDEC09,$FD2DC2E2,$9E578088,$9A9F916D,$4065FE6C,$1853999E,
+    $C7793F23,$DC1016BB,$969355FF,$7EF292F6,$CDCE4ADC,$05E24416,$85C16C46,$D441D37F,
+    $57BD6855,$8746F54F,$9CA773DF,$770BAE22,$54828413,$B75E4B19,$04C35C03,$BF7CCA07,
+    $2955C4DD,$721DB041,$B2394F33,$03F51387,$89B73C9F,$0B1737F3,$07E69024,$9231D245,
+    $76193861,$88159C15,$DEB552D9,$D9767E40,$20C6C0C3,$4281977C,$F8AFE1E0,$D32A0751,
+    $3FC27432,$DDF1DCC5,$68581F34,$3BCD5025,$0091B2EE,$4AEB6944,$1602E743,$EA09EB58,
+    $EF0A2A8B,$641E03A5,$EB50E021,$5C8CCEF8,$802FF0B8,$D5E3EDFE,$C4DD1B49,$5334CD2A,
+    $13F82D2F,$47450C20,$55DAFBD2,$BEC0C6F4,$B45D7959,$3AD36E8C,$0AA8AC57,$1A3C8D73,
+    $E45AAFB1,$9F664838,$C6880053,$D0039BBF,$EE5F19EB,$CA0041D8,$BBEA3AAF,$DA628291,
+    $9D5C95D4,$ADD504A6,$C39AB482,$5E9E14A4,$2BE065F0,$2A13FC3A,$9052E8EC,$AF6F5AFC),
+   ($519AA8B5,$BB303DA9,$E00E2B10,$DFA6C1DB,$2E6B952E,$EE10DC23,$37936D09,$1FC42E92,
+    $39B25A9F,$13FF89F4,$C8F53FEA,$18500BC7,$95A0379D,$98F751C2,$2289C42F,$A21E4098,
+    $6F391F41,$F27E7E58,$0D0DF887,$4B79D540,$8E8409AA,$71FE46F8,$688A9B29,$3F08B548,
+    $84ABE03A,$5E91B6C1,$FDE4C2AE,$251D0E72,$92D4FEE5,$F9371967,$9175108F,$E6E81835,
+    $8C8CB8EE,$B55A67B3,$CEF138CC,$8B256268,$00D815F5,$E8810812,$77826189,$EA73267D,
+    $19B90F8D,$45C33BB4,$82477056,$E1770075,$09467AA6,$A7C6F54A,$79768742,$61B86BCA,
+    $D6644A44,$E33F0171,$C229FBCD,$41B08FEB,$D1903E30,$65EC9080,$563D6FBD,$F56DA488,
+    $EBF64CD8,$4934426B,$7C8592FC,$6ACA8CF2,$1CEA111B,$3A57EE7A,$ACE11C0D,$9942D85E,
+    $C4613407,$FA8E643B,$327FC701,$4CA9BE82,$3352526D,$2C047F63,$F3A8F7DD,$1A4A98A8,
+    $762ED4D1,$27C75008,$BDF497C0,$7A7B84DF,$315C28AB,$801F93E3,$F19B0CA1,$8F14E46A,
+    $E48BA333,$9605E625,$F03ECB60,$60385F2D,$902845BA,$7F96D66F,$24BFF05C,$2820730B,
+    $947133CB,$D444828A,$B343F6F1,$0BEF4705,$8DA574F9,$01E25D6C,$1732793E,$4F0F7B27,
+    $364B7117,$B2D1DA77,$A6C5F1E9,$574CA5B1,$386A3076,$AD6894D6,$1156D7FA,$A48D1D9A,
+    $4794C0AF,$150C0AA0,$26D348AC,$29FDEABE,$A5DEDE53,$81671E8E,$594EE3BF,$A96C56E6,
+    $3426A726,$C5976579,$BC22E5E4,$C1006319,$DAAFDD2A,$A1A1AA83,$3BADD0E7,$C3B14981,
+    $D770B155,$CCD7C693,$42E944C5,$03E0064F,$CA95B4EF,$3DEE81C3,$FBBCD98C,$1E07E15B,
+    $667CE949,$E7D6773F,$21B6124B,$6B2A6EF7,$D3278A9C,$9A988304,$75D2AE9B,$FE49E2FF,
+    $9BC24F46,$74CC2CF6,$A3139F36,$6C9EF35A,$9FC1DFFE,$9E5FACDC,$AADC8BBB,$5ABDBC5F,
+    $44B3B390,$F754EFA7,$5FE3BDB7,$4E59C886,$06A4C984,$A0338878,$CD513CD7,$63EBD27E,
+    $8ABA80AD,$50DA144E,$5D9F4E97,$025B751C,$2D580200,$B6C05837,$580AA15D,$54022A6E,
+    $B41A5415,$4863FAB6,$B0B79957,$46D0D159,$DC2B8650,$20A7BB0C,$4A032974,$EC8636A2,
+    $8548F24C,$F6A2BF16,$1088F4B0,$0C2F3A94,$525DC396,$14065785,$2B4DCA52,$08AEED39,
+    $ABEDFC99,$B1DBCF18,$87F85BBC,$AE3AFF61,$433CCD70,$5B23CC64,$7B453213,$5355C545,
+    $9318EC0A,$78692D31,$0A21693D,$D5666814,$05FB59D9,$C71985B2,$2ABB8E0E,$CF6E6C91,
+    $D9CFE7C6,$EFE7132C,$9711AB28,$3CE52732,$12D516D2,$7209A0D0,$D278D306,$70FA4B7B,
+    $1D407DD3,$DB0BEBA4,$BFD97621,$A8BE21E1,$1B6F1B66,$30650DDA,$BA7DDBB9,$7DF953FB,
+    $9D1C3902,$EDF0E8D5,$B8741AE0,$0F240565,$62CD438B,$C616A924,$AF7A96A3,$35365538,
+    $E583AF4D,$73415EB8,$23176A47,$FC9CCEE8,$7EFC9DE2,$695E03CF,$F8CE66D4,$88B4781D,
+    $67DD9C03,$3E8F9E73,$C0C95C51,$BE314D22,$55AA0795,$CB1BB011,$E980FDC8,$9C62B7CE,
+    $DE2D239E,$042CADF3,$FFDF04DE,$5CE6A60F,$D8C831ED,$B7B5B9EC,$B9CBF962,$E253B254,
+    $0735BA1F,$16AC917F,$DD607C2B,$64A335C4,$40159A7C,$869222F0,$6EF21769,$839D20A5,
+    $D03B24C9,$F412601E,$6D72A243,$0E018DFD,$89F3721A,$C94F4134,$2F992F20,$4D87253C));
+
+  Tiger_Data: array[0..3, 0..511] of LongWord = (
+   ($F7E90C5E,$02AAB17C,$E243A8EC,$AC424B03,$0DD5FCD3,$72CD5BE3,$F6F97F3A,$6D019B93,
+    $D21F9193,$CD9978FF,$708029E2,$7573A1C9,$922A83C3,$B164326B,$04915870,$46883EEE,
+    $7103ECE6,$EAACE305,$08A3535C,$C54169B8,$8DDEC47C,$4CE75491,$DC0DF40C,$0AA2F4DF,
+    $A74DBEFA,$10B76F18,$5AD1AB6A,$C6CCB623,$572FE2FF,$13726121,$199D921E,$1A488C6F,
+    $DA0007CA,$4BC9F9F4,$E85241C7,$26F5E6F6,$EA5947B6,$859079DB,$C99E8C92,$4F1885C5,
+    $A96F864B,$D78E761E,$52B5C17D,$8E36428C,$373063C1,$69CF6827,$9BB4C56E,$B607C93D,
+    $0E76B5EA,$7D820E76,$F07FDC42,$645C9CC6,$243342E0,$BF38A078,$9D2E7D04,$5F6B343C,
+    $600B0EC6,$F2C28AEB,$7254BCAC,$6C0ED85F,$A4DB4FE5,$71592281,$CE0FED9F,$1967FA69,
+    $B96545DB,$FD5293F8,$F2A7600B,$C879E9D7,$0193194E,$86024892,$2D9CC0B3,$A4F9533B,
+    $15957613,$9053836C,$FC357BF1,$DB6DCF8A,$7A370F57,$18BEEA7A,$50B99066,$037117CA,
+    $74424A35,$6AB30A97,$E325249B,$F4E92F02,$061CCAE1,$7739DB07,$ECA42A05,$D8F3B49C,
+    $51382F73,$BD56BE3F,$43B0BB28,$45FAED58,$11BF1F83,$1C813D5C,$D75FA169,$8AF0E4B6,
+    $87AD9999,$33EE18A4,$B1C94410,$3C26E8EA,$C0A822F9,$B510102B,$0CE6123B,$141EEF31,
+    $59DDB154,$FC65B900,$C5E0E607,$E0158640,$26C3A3CF,$884E0798,$23C535FD,$930D0D95,
+    $4E9A2B00,$35638D75,$40469DD5,$4085FCCF,$8BE23A4C,$C4B17AD2,$6A3E6A2E,$CAB2F0FC,
+    $6B943FCD,$2860971A,$12E30446,$3DDE6EE2,$E01765AE,$6222F32A,$478308FE,$5D550BB5,
+    $A0EDA22A,$A9EFA98D,$86C40DA7,$C351A716,$9C867C84,$1105586D,$FDA22853,$DCFFEE85,
+    $2C5EEF76,$CCFBD026,$8990D201,$BAF294CB,$2AFAD975,$E69464F5,$DF133E14,$94B013AF,
+    $2823C958,$06A7D1A3,$30F61119,$6F95FE51,$462C06C0,$D92AB34E,$887C71D2,$ED7BDE33,
+    $6518393E,$79746D6E,$5D713329,$5BA41938,$48A97564,$7C1BA6B9,$7BFDAC67,$31987C19,
+    $4B053D02,$DE6C23C4,$D002D64D,$581C49FE,$38261571,$DD474D63,$E473D062,$AA4546C3,
+    $9455F860,$928FCE34,$CAAB94D9,$48161BBA,$770E6F68,$63912430,$02C6641C,$6EC8A5E6,
+    $337DDD2B,$87282515,$034B701B,$2CDA6B42,$81CB096D,$B03D37C1,$66C71C6F,$E1084382,
+    $EB51B255,$2B3180C7,$96C08BBC,$DF92B82F,$A632F3BA,$5C68C8C0,$1C3D0556,$5504CC86,
+    $5FB26B8F,$ABBFA4E5,$B3BACEB4,$41848B0A,$AA445D32,$B334A273,$A85AD881,$BCA696F0,
+    $B528D56C,$24F6EC65,$90F4524A,$0CE1512E,$5506D35A,$4E9DD79D,$C6CE9779,$258905FA,
+    $3E109B33,$2019295B,$73A054CC,$F8A9478B,$34417EB0,$2924F2F9,$536D1BC4,$3993357D,
+    $1DB6FF8B,$38A81AC2,$7D6016BF,$47C4FBF1,$7667E3F5,$1E0FAADD,$938BEB96,$7ABCFF62,
+    $8FC179C9,$A78DAD94,$2911E50D,$8F1F98B7,$27121A91,$61E48EAE,$31859808,$4D62F7AD,
+    $EF5CEAEB,$ECEBA345,$BC9684CE,$F5CEB25E,$B7F76221,$F633E20C,$AB8293E4,$A32CDF06,
+    $A5EE2CA4,$985A202C,$CC8A8FB1,$CF0B8447,$979859A3,$9F765244,$A1240017,$A8D516B1,
+    $BB5DC726,$0BD7BA3E,$B86ADB39,$E54BCA55,$6C478063,$1D7A3AFD,$E7669EDD,$519EC608,
+    $D149AA23,$0E5715A2,$848FF194,$177D4571,$41014C22,$EEB55F32,$3A6E2EC2,$0F5E5CA1,
+    $75F5C361,$8029927B,$C3D6E436,$AD139FAB,$4CCF402F,$0D5DF1A9,$BEA5DFC8,$3E8BD948,
+    $BD3FF77E,$A5A0D357,$1F74F645,$A2D12E25,$5E81A082,$66FD9E52,$7F687A49,$2E0C90CE,
+    $BA973BC5,$C2E8BCBE,$E509745F,$000001BC,$E6DAB3D6,$423777BB,$AEF06EB5,$D1661C7E,
+    $4DAACFD8,$A1781F35,$2B16AFFC,$2D11284A,$FA891D1F,$F1FC4F67,$CB920ADA,$73ECC25D,
+    $C2A12651,$AE610C22,$D356B78A,$96E0A810,$2FE7870F,$5A9A381F,$E94E5530,$D5AD62ED,
+    $368D1427,$D225E5E8,$C7AF4631,$65977B70,$DE39D74F,$99F889B2,$54E1D143,$233F30BF,
+    $D9A63C97,$9A9675D3,$F334F9A8,$5470554F,$4A4F5688,$166ACB74,$B2E4AEAD,$70C74CAA,
+    $6F294D12,$F0D09164,$684031D1,$57B82A89,$61BE0B6B,$EFD95A5A,$69F2F29A,$2FBD12E9,
+    $FEFF9FE8,$9BD37013,$D6085A06,$3F9B0404,$166CFE15,$4940C1F3,$CDF3DEFB,$09542C4D,
+    $85CD5CE3,$B4C52183,$4462A641,$C935B7DC,$8ED3B63F,$3417F8A6,$5B215B40,$B8095929,
+    $3B8C8572,$F99CDAEF,$F8FCB95D,$018C0614,$1A3ACDF3,$1B14ACCD,$00BB732D,$84D471F2,
+    $95E8DA16,$C1A3110E,$BF1A82B8,$430A7220,$39DF210E,$B77E090D,$3CD05E9D,$5EF4BD9F,
+    $7E57A444,$9D4FF6DA,$83D4A5F8,$DA1D60E1,$17998E47,$B287C384,$1BB31886,$FE3EDC12,
+    $980CCBEF,$C7FE3CCC,$189BFD03,$E46FB590,$9A4C57DC,$3732FD46,$7CF1AD65,$7EF700A0,
+    $A31D8859,$59C64468,$D45B61F6,$762FB0B4,$99047718,$155BAED0,$3D50BAA6,$68755E4C,
+    $22D8B4DF,$E9214E7F,$2EAC95F4,$2ADDBF53,$B4BD0109,$32AE3909,$B08E3450,$834DF537,
+    $4220728D,$FA209DA8,$9EFE23F7,$9E691D9B,$C4AE8D7F,$0446D288,$E169785B,$7B4CC524,
+    $35CA1385,$21D87F01,$137B8AA5,$CEBB400F,$580796BE,$272E2B66,$25C2B0DE,$36122641,
+    $AD1EFBB2,$057702BD,$ACF84BE9,$D4BABB8E,$641BC67B,$91583139,$8036E024,$8BDC2DE0,
+    $F49F68ED,$603C8156,$DBEF5111,$F7D236F7,$8AD21E80,$9727C459,$670A5FD7,$A08A0896,
+    $09EBA9CB,$CB4A8F43,$0F7036A1,$81AF564B,$78199ABD,$C0B99AA7,$3FC8E952,$959F1EC8,
+    $794A81B9,$8C505077,$056338F0,$3ACAAF8F,$627A6778,$07B43F50,$F5ECCC77,$4A44AB49,
+    $B679EE98,$3BC3D6E4,$CF14108C,$9CC0D4D1,$206BC8A0,$4406C00B,$C8D72D89,$82A18854,
+    $5C3C432C,$67E366B3,$102B37F2,$B923DD61,$D884271D,$56AB2779,$FF1525AF,$BE83E1B0,
+    $217E49A9,$FB7C65D4,$6D48E7D4,$6BDBE0E7,$45D9179E,$08DF8287,$DD53BD34,$22EA6A9A,
+    $5622200A,$E36E141C,$8CB750EE,$7F805D1B,$9F58E837,$AFE5C7A5,$4FB1C23C,$E27F996A,
+    $0775F0D0,$D3867DFB,$6E88891A,$D0E673DE,$AFB86C25,$123AEB9E,$C145B895,$30F1D5D5,
+    $EE7269E7,$BB434A2D,$F931FA38,$78CB67EC,$323BBF9C,$F33B0372,$FB279C74,$52D66336,
+    $0AFB4EAA,$505F33AC,$A2CCE187,$E8A5CD99,$1E2D30BB,$53497480,$D5876D90,$8D2D5711,
+    $91BC038E,$1F1A4128,$82E56648,$D6E2E71D,$497732B7,$74036C3A,$6361F5AB,$89B67ED9,
+    $F1EA02A2,$FFED95D8,$1464D43D,$E72B3BD6,$0BDC4820,$A6300F17,$ED78A77A,$EBC18760),
+   ($05A12138,$E6A6BE5A,$B4F87C98,$B5A122A5,$140B6990,$563C6089,$391F5DD5,$4C46CB2E,
+    $C9B79434,$D932ADDB,$2015AFF5,$08EA70E4,$3E478CF1,$D765A667,$AB278D99,$C4FB757E,
+    $2D6E0692,$DF11C686,$0D7F3B16,$DDEB84F1,$A665EA04,$6F2EF604,$F0E0DFB3,$4A8E0F0F,
+    $3DBCBA51,$A5EDEEF8,$0EA4371E,$FC4F0A2A,$5CB38429,$E83E1DA8,$BA1B1CE2,$DC8FF882,
+    $8353E80D,$CD45505E,$D4DB0717,$18D19A00,$A5F38101,$34A0CFED,$8887CAF2,$0BE77E51,
+    $B3C45136,$1E341438,$9089CCF9,$E05797F4,$F2591D14,$FFD23F9D,$8595C5CD,$543DDA22,
+    $99052A33,$661F81FD,$DB0F7B76,$8736E641,$418E5307,$15227725,$162EB2FA,$E25F7F46,
+    $6C13D9FE,$48A8B212,$92E76EEA,$AFDC5417,$C6D1898F,$03D912BF,$1B83F51B,$31B1AAFA,
+    $E42AB7D9,$F1AC2796,$FCD2EBAC,$40A3A7D7,$0AFBBCC5,$1056136D,$9A6D0C85,$7889E1DD,
+    $2A7974AA,$D3352578,$078AC09B,$A7E25D09,$EAC6EDD0,$BD4138B3,$71EB9E70,$920ABFBE,
+    $4FC2625C,$A2A5D0F5,$0B1290A3,$C054E36B,$62FE932B,$F6DD59FF,$11A8AC7D,$35373545,
+    $72FADCD4,$CA845E91,$329D20DC,$84F82B60,$CD672F18,$79C62CE1,$D124642C,$8B09A2AD,
+    $19D9E726,$D0C1E96A,$4BA9500C,$5A786A9B,$634C43F3,$0E020336,$EB66D822,$C17B474A,
+    $EC9BAAC2,$6A731AE3,$E0840258,$8226667A,$91CAECA5,$67D45676,$4875ADB5,$1D94155C,
+    $5B813FDF,$6D00FD98,$B774CD06,$51286EFC,$1FA744AF,$5E883447,$E761AE2E,$F72CA0AE,
+    $AEE8E09A,$BE40E4CD,$5118F665,$E9970BBB,$33DF1964,$726E4BEB,$29199762,$703B0007,
+    $F5EF30A7,$4631D816,$1504A6BE,$B880B5B5,$7ED84B6C,$641793C3,$F6E97D96,$7B21ED77,
+    $2EF96B73,$77630631,$E86FF3F4,$AE528948,$86A3F8F8,$53DBD7F2,$4CFC1063,$16CADCE7,
+    $FA52C6DD,$005C19BD,$64D46AD3,$68868F5D,$CF1E186A,$3A9D512C,$385660AE,$367E62C2,
+    $77DCB1D7,$E359E7EA,$749ABE6E,$526C0773,$D09F734B,$735AE5F9,$8A558BA8,$493FC7CC,
+    $3041AB45,$B0B9C153,$470A59BD,$321958BA,$5F46C393,$852DB00B,$D336B0E5,$91209B2B,
+    $659EF19F,$6E604F7D,$782CCB24,$B99A8AE2,$C814C4C7,$CCF52AB6,$BE11727B,$4727D9AF,
+    $0121B34D,$7E950D0C,$70AD471F,$756F4356,$615A6849,$F5ADD442,$80B9957A,$4E87E099,
+    $50AEE355,$2ACFA1DF,$FD2FD556,$D898263A,$D80C8FD6,$C8F4924D,$754A173A,$CF99CA3D,
+    $AF91BF3C,$FE477BAC,$D690C12D,$ED5371F6,$5E687094,$831A5C28,$3708A0A4,$C5D3C90A,
+    $17D06580,$0F7F9037,$B8FDF27F,$19F9BB13,$4D502843,$B1BD6F1B,$8FFF4012,$1C761BA3,
+    $E2E21F3B,$0D1530C4,$A7372C8A,$8943CE69,$FEB5CE66,$E5184E11,$BD736621,$618BDB80,
+    $8B574D0B,$7D29BAD6,$25E6FE5B,$81BB613E,$BC07913F,$071C9C10,$09AC2D97,$C7BEEB79,
+    $3BC5D757,$C3E58D35,$F38F61E8,$EB017892,$9B1CC21A,$D4EFFB9C,$F494F7AB,$99727D26,
+    $956B3E03,$A3E063A2,$4AA09C30,$9D4A8B9A,$00090FB4,$3F6AB7D5,$57268AC0,$9CC0F2A0,
+    $EDBF42D1,$3DEE9D2D,$7960A972,$330F49C8,$87421B41,$C6B27202,$7C00369C,$0AC59EC0,
+    $CB353425,$EF4EAC49,$EF0129D8,$F450244E,$CAF4DEB6,$8ACC46E5,$989263F7,$2FFEAB63,
+    $5D7A4578,$8F7CB9FE,$4E634635,$5BD8F764,$BF2DC900,$427A7315,$2125261C,$17D0C4AA,
+    $93518E50,$3992486C,$A2D7D4C3,$B4CBFEE0,$2C5DDD8D,$7C75D620,$E35B6C61,$DBC295D8,
+    $02032B19,$60B369D3,$DCE44132,$CE42685F,$DDF65610,$06F3DDB9,$B5E148F0,$8EA4D21D,
+    $2FCD496F,$20B0FCE6,$58B0EE31,$2C1B9123,$18F5A308,$B28317B8,$9CA6D2CF,$A89C1E18,
+    $6AAADBC8,$0C6B1857,$1299FAE3,$B65DEAA9,$7F1027E7,$FB2B794B,$443B5BEB,$04E4317F,
+    $5939D0A6,$4B852D32,$FB207FFC,$D5AE6BEE,$81C7D374,$309682B2,$94C3B475,$BAE309A1,
+    $13B49F05,$8CC3F97B,$F8293967,$98A9422F,$1076FF7C,$244B16B0,$663D67EE,$F8BF571C,
+    $EEE30DA1,$1F0D6758,$7ADEB9B7,$C9B611D9,$7B6C57A2,$B7AFD588,$6B984FE1,$6290AE84,
+    $ACC1A5FD,$94DF4CDE,$C5483AFF,$058A5BD1,$42BA3C37,$63166CC1,$B2F76F40,$8DB8526E,
+    $6F0D6D4E,$E1088003,$971D311D,$9E0523C9,$CC7CD691,$45EC2824,$E62382C9,$575B8359,
+    $C4889995,$FA9E400D,$45721568,$D1823ECB,$8206082F,$DAFD983B,$2386A8CB,$AA7D2908,
+    $03B87588,$269FCD44,$28BDD1E0,$1B91F5F7,$040201F6,$E4669F39,$8CF04ADE,$7A1D7C21,
+    $D79CE5CE,$65623C29,$96C00BB1,$23684490,$9DA503BA,$AB9BF187,$A458058E,$BC23ECB1,
+    $BB401ECC,$9A58DF01,$A85F143D,$A070E868,$7DF2239E,$4FF18830,$1A641183,$14D565B4,
+    $52701602,$EE133374,$3F285E09,$950E3DCF,$B9C80953,$59930254,$8930DA6D,$3BF29940,
+    $53691387,$A955943F,$A9CB8784,$A15EDECA,$352BE9A0,$29142127,$FF4E7AFB,$76F0371F,
+    $274F2228,$0239F450,$1D5E868B,$BB073AF0,$C10E96C1,$BFC80571,$68222E23,$D2670885,
+    $8E80B5B0,$9671A3D4,$E193BB81,$55B5D38A,$A18B04B8,$693AE2D0,$ADD5335F,$5C48B4EC,
+    $4916A1CA,$FD743B19,$34BE98C4,$25770181,$3C54A4AD,$E77987E8,$DA33E1B9,$28E11014,
+    $226AA213,$270CC59E,$6D1A5F60,$71495F75,$60AFEF77,$9BE853FB,$F7443DBF,$ADC786A7,
+    $73B29A82,$09044561,$C232BD5E,$58BC7A66,$673AC8B2,$F306558C,$B6C9772A,$41F639C6,
+    $9FDA35DA,$216DEFE9,$1C7BE615,$11640CC7,$565C5527,$93C43694,$46777839,$EA038E62,
+    $5A3E2469,$F9ABF3CE,$0FD312D2,$741E768D,$CED652C6,$0144B883,$A33F8552,$C20B5A5B,
+    $C3435A9D,$1AE69633,$088CFDEC,$97A28CA4,$1E96F420,$8824A43C,$6EEEA746,$37612FA6,
+    $F9CF0E5A,$6B4CB165,$A0ABFB4A,$43AA1C06,$F162796B,$7F4DC26F,$54ED9B0F,$6CBACC8E,
+    $D2BB253E,$A6B7FFEF,$B0A29D4F,$2E25BC95,$DEF1388C,$86D6A58B,$76B6F054,$DED74AC5,
+    $2B45805D,$8030BDBC,$E94D9289,$3C81AF70,$9E3100DB,$3EFF6DDA,$DFCC8847,$B38DC39F,
+    $8D17B87E,$12388552,$40B1B642,$F2DA0ED2,$D54BF9A9,$44CEFADC,$433C7EE6,$1312200E,
+    $3A78C748,$9FFCC84F,$248576BB,$F0CD1F72,$3638CFE4,$EC697405,$0CEC4E4C,$2BA7B67C,
+    $E5CE32ED,$AC2F4DF3,$26EA4C11,$CB33D143,$C77E58BC,$A4E9044C,$D934FCEF,$5F513293,
+    $06E55444,$5DC96455,$317DE40A,$50DE418F,$69DDE259,$388CB31A,$55820A86,$2DB4A834,
+    $84711AE9,$9010A91E,$B1498371,$4DF7F0B7,$C0977179,$D62A2EAB,$AA8D5C0E,$22FAC097),
+   ($F1DAF39B,$F49FCC2F,$6FF29281,$487FD5C6,$FCDCA83F,$E8A30667,$D2FCCE63,$2C9B4BE3,
+    $93FBBBC2,$DA3FF74B,$FE70BA66,$2FA165D2,$970E93D4,$A103E279,$B0E45E71,$BECDEC77,
+    $3985E497,$CFB41E72,$5EF75017,$B70AAA02,$3840B8E0,$D42309F0,$35898579,$8EFC1AD0,
+    $E2B2ABC5,$96C6920B,$375A9172,$66AF4163,$CA7127FB,$2174ABDC,$4A72FF41,$B33CCEA6,
+    $083066A5,$F04A4933,$D7289AF5,$8D970ACD,$31C8C25E,$8F96E8E0,$76875D47,$F3FEC022,
+    $056190DD,$EC7BF310,$BB0F1491,$F5ADB0AE,$0FD58892,$9B50F885,$58B74DE8,$49754883,
+    $91531C61,$A3354FF6,$81D2C6EE,$0702BBE4,$7DEDED98,$89FB2405,$8596E902,$AC307513,
+    $172772ED,$1D2D3580,$8E6BC30D,$EB738FC2,$63044326,$5854EF8F,$5ADD3BBE,$9E5C5232,
+    $325C4623,$90AA53CF,$349DD067,$C1D24D51,$A69EA624,$2051CFEE,$862E7E4F,$13220F0A,
+    $04E04864,$CE393994,$7086FCB7,$D9C42CA4,$8A03E7CC,$685AD223,$AB2FF1DB,$066484B2,
+    $EFBF79EC,$FE9D5D70,$9C481854,$5B13B9DD,$ED1509AD,$15F0D475,$0EC79851,$0BEBCD06,
+    $183AB7F8,$D58C6791,$52F3EEE4,$D1187C50,$E54E82FF,$C95D1192,$B9AC6CA2,$86EEA14C,
+    $53677D5D,$3485BEB1,$1F8C492A,$DD191D78,$A784EBF9,$F60866BA,$A2D08C74,$518F643B,
+    $E1087C22,$8852E956,$C410AE8D,$A768CB8D,$BFEC8E1A,$38047726,$CD3B45AA,$A67738B4,
+    $EC0DDE19,$AD16691C,$80462E07,$C6D43193,$0BA61938,$C5A5876D,$A58FD840,$16B9FA1F,
+    $3CA74F18,$188AB117,$C99C021F,$ABDA2F98,$134AE816,$3E0580AB,$73645ABB,$5F3B05B7,
+    $5575F2F6,$2501A2BE,$4E7E8BA9,$1B2F7400,$71E8D953,$1CD75803,$62764E30,$7F6ED895,
+    $596F003D,$B15926FF,$A8C5D6B9,$9F65293D,$D690F84C,$6ECEF04D,$FF33AF88,$4782275F,
+    $3F820801,$E4143308,$9A1AF9B5,$FD0DFE40,$2CDB396B,$4325A334,$B301B252,$8AE77E62,
+    $6655615A,$C36F9E9F,$92D32C09,$85455A2D,$49477485,$F2C7DEA9,$33A39EBA,$63CFB4C1,
+    $6EBC5462,$83B040CC,$FDB326B0,$3B9454C8,$87FFD78C,$56F56A9E,$99F42BC6,$2DC2940D,
+    $6B096E2D,$98F7DF09,$3AD852BF,$19A6E01E,$DBD4B40B,$42A99CCB,$45E9C559,$A59998AF,
+    $07D93186,$366295E8,$FAA1F773,$6B48181B,$157A0A1D,$1FEC57E2,$F6201AD5,$4667446A,
+    $CFB0F075,$E615EBCA,$68290778,$B8F31F4F,$CE22D11E,$22713ED6,$2EC3C93B,$3057C1A7,
+    $7C3F1F2F,$CB46ACC3,$02AAF50E,$DBB893FD,$600B9FCF,$331FD92E,$48EA3AD6,$A498F961,
+    $8B6A83EA,$A8D8426E,$B7735CDC,$A089B274,$1E524A11,$87F6B373,$CBC96749,$118808E5,
+    $B19BD394,$9906E4C7,$9B24A20C,$AFED7F7E,$EB3644A7,$6509EADE,$E8EF0EDE,$6C1EF1D3,
+    $E9798FB4,$B9C97D43,$740C28A3,$A2F2D784,$6197566F,$7B849647,$B65F069D,$7A5BE3E6,
+    $78BE6F10,$F96330ED,$7A076A15,$EEE60DE7,$A08B9BD0,$2B4BEE4A,$C7B8894E,$6A56A63E,
+    $BA34FEF4,$02121359,$283703FC,$4CBF99F8,$0CAF30C8,$39807135,$F017687A,$D0A77A89,
+    $9E423569,$F1C1A9EB,$2DEE8199,$8C797628,$DD1F7ABD,$5D1737A5,$09A9FA80,$4F53433C,
+    $DF7CA1D9,$FA8B0C53,$886CCB77,$3FD9DCBC,$A91B4720,$C040917C,$F9D1DCDF,$7DD00142,
+    $4F387B58,$8476FC1D,$F3316503,$23F8E7C5,$E7E37339,$032A2244,$50F5A74B,$5C87A5D7,
+    $3698992E,$082B4CC4,$B858F63C,$DF917BEC,$5BF86DDA,$3270B8FC,$29B5DD76,$10AE72BB,
+    $7700362B,$576AC94E,$C61EFB8F,$1AD112DA,$C5FAA427,$691BC30E,$CC327143,$FF246311,
+    $30E53206,$3142368E,$E02CA396,$71380E31,$0AAD76F1,$958D5C96,$C16DA536,$F8D6F430,
+    $1BE7E1D2,$C8FFD13F,$004DDBE1,$7578AE66,$067BE646,$05833F01,$3BFE586D,$BB34B5AD,
+    $A12B97F0,$095F34C9,$25D60CA8,$247AB645,$017477D1,$DCDBC6F3,$DECAD24D,$4A2E14D4,
+    $BE0A1EEB,$BDB5E6D9,$794301AB,$2A7E70F7,$270540FD,$DEF42D8A,$A34C22C1,$01078EC0,
+    $F4C16387,$E5DE511A,$BD9A330A,$7EBB3A52,$AA7D6435,$77697857,$03AE4C32,$004E8316,
+    $AD78E312,$E7A21020,$6AB420F2,$9D41A70C,$EA1141E6,$28E06C18,$984F6B28,$D2B28CBD,
+    $446E9D83,$26B75F6C,$4D418D7F,$BA47568C,$E6183D8E,$D80BADBF,$5F166044,$0E206D7F,
+    $11CBCA3E,$E258A439,$B21DC0BC,$723A1746,$F5D7CDD3,$C7CAA854,$3D261D9C,$7CAC3288,
+    $23BA942C,$7690C264,$478042B8,$17E55524,$56A2389F,$E0BE4776,$67AB2DA0,$4D289B5E,
+    $8FBBFD31,$44862B9C,$9D141365,$B47CC804,$2B91C793,$822C1B36,$FB13DFD8,$4EB14655,
+    $14E2A97B,$1ECBBA07,$5CDE5F14,$6143459D,$D5F0AC89,$53A8FBF1,$1C5E5B00,$97EA04D8,
+    $D4FDB3F3,$622181A8,$572A1208,$E9BCD341,$43CCE58A,$14112586,$A4C6E0A4,$9144C5FE,
+    $65CF620F,$0D33D065,$9F219CA1,$54A48D48,$6D63C821,$C43E5EAC,$72770DAF,$A9728B3A,
+    $20DF87EF,$D7934E7B,$1A3E86E5,$E35503B6,$C819D504,$CAE321FB,$AC60BFA6,$129A50B3,
+    $7E9FB6C3,$CD5E68EA,$9483B1C7,$B01C9019,$C295376C,$3DE93CD5,$2AB9AD13,$AED52EDF,
+    $C0A07884,$2E60F512,$E36210C9,$BC3D86A3,$163951CE,$35269D9B,$D0CDB5FA,$0C7D6E2A,
+    $D87F5733,$59E86297,$898DB0E7,$298EF221,$D1A5AA7E,$55000029,$B5061B45,$8BC08AE1,
+    $6C92703A,$C2C31C2B,$AF25EF42,$94CC596B,$22540456,$0A1D73DB,$D9C4179A,$04B6A0F9,
+    $AE3D3C60,$EFFDAFA2,$B49496C4,$F7C8075B,$1D1CD4E3,$9CC5C714,$218E5534,$78BD1638,
+    $F850246A,$B2F11568,$9502BC29,$EDFABCFA,$DA23051B,$796CE5F2,$DC93537C,$AAE128B0,
+    $EE4B29AE,$3A493DA0,$416895D7,$B5DF6B2C,$122D7F37,$FCABBD25,$105DC4B1,$70810B58,
+    $F7882A90,$E10FDD37,$518A3F5C,$524DCAB5,$8451255B,$3C9E8587,$19BD34E2,$40298281,
+    $5D3CECCB,$74A05B6F,$42E13ECA,$B6100215,$2F59E2AC,$0FF979D1,$E4F9CC50,$6037DA27,
+    $0DF1847D,$5E92975A,$D3E623FE,$D66DE190,$7B568048,$5032D6B8,$8235216E,$9A36B7CE,
+    $24F64B4A,$80272A7A,$8C6916F7,$93EFED8B,$4CCE1555,$37DDBFF4,$4B99BD25,$4B95DB5D,
+    $69812FC0,$92D3FDA1,$90660BB6,$FB1A4A9A,$46A4B9B2,$730C1969,$7F49DA68,$81E289AA,
+    $83B1A05F,$64669A0F,$9644F48B,$27B3FF7D,$8DB675B3,$CC6B615C,$BCEBBE95,$674F20B9,
+    $75655982,$6F312382,$3E45CF05,$5AE48871,$54C21157,$BF619F99,$40A8EAE9,$EABAC460,
+    $F2C0C1CD,$454C6FE9,$6412691C,$419CF649,$265B0F70,$D3DC3BEF,$C3578A9E,$6D0E60F5),
+   ($26323C55,$5B0E6085,$FA1B59F5,$1A46C1A9,$7C4C8FFA,$A9E245A1,$DB2955D7,$65CA5159,
+    $CE35AFC2,$05DB0A76,$A9113D45,$81EAC77E,$B6AC0A0D,$528EF88A,$597BE3FF,$A09EA253,
+    $AC48CD56,$430DDFB3,$F45CE46F,$C4B3A67A,$FBE2D05E,$4ECECFD8,$B39935F0,$3EF56F10,
+    $9CD619C6,$0B22D682,$74DF2069,$17FD460A,$8510ED40,$6CF8CC8E,$3A6ECAA7,$D6C824BF,
+    $1A817049,$61243D58,$BBC163A2,$048BACB6,$7D44CC32,$D9A38AC2,$AAF410AB,$7FDDFF5B,
+    $A804824B,$AD6D495A,$2D8C9F94,$E1A6A74F,$35DEE8E3,$D4F78512,$6540D893,$FD4B7F88,
+    $2AA4BFDA,$247C2004,$17D1327C,$096EA1C5,$361A6685,$D56966B4,$1221057D,$277DA5C3,
+    $A43ACFF7,$94D59893,$CDC02281,$64F0C51C,$FF6189DB,$3D33BCC4,$4CE66AF1,$E005CB18,
+    $1DB99BEA,$FF5CCD1D,$FE42980F,$B0B854A7,$718D4B9F,$7BD46A6A,$22A5FD8C,$D10FA8CC,
+    $2BE4BD31,$D3148495,$CB243847,$C7FA975F,$5846C407,$4886ED1E,$1EB70B04,$28CDDB79,
+    $F573417F,$C2B00BE2,$2180F877,$5C959045,$F370EB00,$7A6BDDFF,$D6D9D6A4,$CE509E38,
+    $647FA702,$EBEB0F00,$76606F06,$1DCC06CF,$A286FF0A,$E4D9F28B,$C918C262,$D85A305D,
+    $32225F54,$475B1D87,$68CCB5FE,$2D4FB516,$D72BBA20,$A679B9D9,$912D43A5,$53841C0D,
+    $BF12A4E8,$3B7EAA48,$F22F1DDF,$781E0E47,$0AB50973,$EFF20CE6,$9DFFB742,$20D261D1,
+    $062A2E39,$16A12B03,$39650495,$1960EB22,$D50EB8B8,$251C16FE,$F826016E,$9AC0C330,
+    $953E7671,$ED152665,$A6369570,$02D63194,$94B1C987,$5074F083,$90B25CE1,$70BA598C,
+    $0B9742F6,$794A1581,$FCAF8C6C,$0D5925E9,$D868744E,$3067716C,$E8D7731B,$910AB077,
+    $5AC42F61,$6A61BBDB,$F0851567,$93513EFB,$9E83E9D5,$F494724B,$5C09648D,$E887E198,
+    $75370CFD,$34B1D3C6,$BC0D255D,$DC35E433,$34131BE0,$D0AAB842,$B48B7EAF,$08042A50,
+    $44A3AB35,$9997C4EE,$201799D0,$829A7B49,$B7C54441,$263B8307,$FD6A6CA6,$752F95F4,
+    $2C08C6E5,$92721740,$A795D9EE,$2A8AB754,$2F72943D,$A442F755,$19781208,$2C31334E,
+    $EAEE6291,$4FA98D7C,$665DB309,$55C3862F,$5D53B1F3,$BD061017,$40413F27,$46FE6CB8,
+    $DF0CFA59,$3FE03792,$2EB85E8F,$CFE70037,$ADBCE118,$A7BE29E7,$DE8431DD,$E544EE5C,
+    $41F1873E,$8A781B1B,$A0D2F0E7,$A5C94C78,$77B60728,$39412E28,$AFC9A62C,$A1265EF3,
+    $6A2506C5,$BCC2770C,$DCE1CE12,$3AB66DD5,$4A675B37,$E65499D0,$81BFD216,$7D8F5234,
+    $EC15F389,$0F6F64FC,$8B5B13C8,$74EFBE61,$14273E1D,$ACDC82B7,$03199D17,$DD40BFE0,
+    $E7E061F8,$37E99257,$04775AAA,$FA526269,$463D56F9,$8BBBF63A,$43A26E64,$F0013F15,
+    $879EC898,$A8307E9F,$150177CC,$CC4C27A4,$CA1D3348,$1B432F2C,$9F6FA013,$DE1D1F8F,
+    $47A7DDD6,$606602A0,$CC1CB2C7,$D237AB64,$25FCD1D3,$9B938E72,$8E0FF476,$EC4E0370,
+    $3D03C12D,$FEB2FBDA,$EE43889A,$AE0BCED2,$EBFB4F43,$22CB8923,$3CF7396D,$69360D01,
+    $D2D4E022,$855E3602,$D01F784C,$073805BA,$3852F546,$33E17A13,$8AC7B638,$DF487405,
+    $678AA14A,$BA92B29C,$6CFAADCD,$0CE89FC7,$08339E34,$5F9D4E09,$1F5923B9,$F1AFE929,
+    $0F4A265F,$6E3480F6,$B29B841C,$EEBF3A2A,$8F91B4AD,$E21938A8,$45C6D3C3,$57DFEFF8,
+    $F62CAAF2,$2F006B0B,$6F75EE78,$62F479EF,$1C8916A9,$11A55AD4,$84FED453,$F229D290,
+    $16B000E6,$42F1C27B,$9823C074,$2B1F7674,$C2745360,$4B76ECA3,$B91691BD,$8C98F463,
+    $F1ADE66A,$14BCC93C,$6D458397,$8885213E,$274D4711,$8E177DF0,$503F2951,$B49B73B5,
+    $C3F96B6B,$10168168,$63CAB0AE,$0E3D963B,$55A1DB14,$8DFC4B56,$6E14DE5C,$F789F135,
+    $4E51DAC1,$683E68AF,$8D4B0FD9,$C9A84F9D,$52A0F9D1,$3691E03F,$E1878E80,$5ED86E46,
+    $99D07150,$3C711A0E,$0C4E9310,$5A0865B2,$E4F0682E,$56FBFC1F,$105EDF9B,$EA8D5DE3,
+    $2379187A,$71ABFDB1,$BEE77B9C,$2EB99DE1,$33CF4523,$21ECC0EA,$1805C7A1,$59A4D752,
+    $56AE7C72,$3896F5EB,$B18F75DC,$AA638F3D,$ABE9808E,$9F39358D,$C00B72AC,$B7DEFA91,
+    $62492D92,$6B5541FD,$F92E4D5B,$6DC6DEE8,$C4BEEA7E,$353F57AB,$DA5690CE,$735769D6,
+    $42391484,$0A234AA6,$28F80D9D,$F6F95080,$7AB3F215,$B8E319A2,$51341A4D,$31AD9C11,
+    $7BEF5805,$773C22A5,$07968633,$45C7561A,$249DBE36,$F913DA9E,$78A64C68,$DA652D9B,
+    $3BC334EF,$4C27A97F,$E66B17F4,$76621220,$9ACD7D0B,$96774389,$E0ED6782,$F3EE5BCA,
+    $00C879FC,$409F7536,$B5926DB6,$06D09A39,$317AC588,$6F83AEB0,$86381F21,$01E6CA4A,
+    $D19F3025,$66FF3462,$DDFD3BFB,$72207C24,$E2ECE2EB,$4AF6B6D3,$C7EA08DE,$9C994DBE,
+    $B09A8BC4,$49ACE597,$CF0797BA,$B38C4766,$C57C2A75,$131B9373,$61931E58,$B1822CCE,
+    $09BA1C0C,$9D7555B9,$937D11D2,$127FAFDD,$C66D92E4,$29DA3BAD,$54C2ECBC,$A2C1D571,
+    $82F6FE24,$58C5134D,$5B62274F,$1C3AE351,$01CB8126,$E907C82E,$13E37FCB,$F8ED0919,
+    $C80046C9,$3249D8F9,$E388FB63,$80CF9BED,$116CF19E,$1881539A,$6BD52457,$5103F3F7,
+    $AE47F7A8,$15B7E6F5,$D47E9CCF,$DBD7C6DE,$0228BB1A,$44E55C41,$5EDB4E99,$B647D425,
+    $B8AAFC30,$5D11882B,$29D3212A,$F5098BBB,$E90296B3,$8FB5EA14,$57DD025A,$677B9421,
+    $A390ACB5,$FB58E7C0,$83BD4A01,$89D3674C,$4BF3B93B,$9E2DA4DF,$8CAB4829,$FCC41E32,
+    $BA582C52,$03F38C96,$7FD85DB2,$CAD1BDBD,$6082AE83,$BBB442C1,$A5DA9AB0,$B95FE86B,
+    $3771A93F,$B22E0467,$493152D8,$845358C9,$97B4541E,$BE2A4886,$D38E6966,$95A2DC2D,
+    $923C852B,$C02C11AC,$0DF2A87B,$2388B199,$1B4F37BE,$7C8008FA,$4D54E503,$1F70D0C8,
+    $7ECE57D4,$5490ADEC,$D9063A3A,$002B3C27,$8030A2BF,$7EAEA384,$ED2003C0,$C602326D,
+    $69A94086,$83A7287D,$30F57A8A,$C57A5FCB,$79EBE779,$B56844E4,$05DCBCE9,$A373B40F,
+    $88570EE2,$D71A786E,$BDE8F6A0,$879CBACD,$C164A32F,$976AD1BC,$9666D78B,$AB21E25E,
+    $E5E5C33C,$901063AA,$48698D90,$9818B344,$3E1E8ABB,$E36487AE,$893BDCB4,$AFBDF931,
+    $5FBBD519,$6345A0DC,$9B9465CA,$8628FE26,$3F9C51EC,$1E5D0160,$A15049B7,$4DE44006,
+    $F776CBB1,$BF6C70E5,$EF552BED,$411218F2,$705A36A3,$CB0C0708,$4F986044,$E74D1475,
+    $0EA8280E,$CD56D943,$535F5065,$C12591D7,$720AEF96,$C83223F1,$7363A51F,$C3A0396F));
+
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROHash.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROHash.pas
new file mode 100644
index 0000000..f034faf
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROHash.pas	
@@ -0,0 +1,4038 @@
+{Copyright:      Hagen Reddmann  mailto:HaReddmann@AOL.COM
+ Author:         Hagen Reddmann
+ Remarks:        freeware, but this Copyright must be included
+ known Problems: none
+ Version:        3.0,  Part I from Delphi Encryption Compendium (DEC Part I)
+                 Delphi 2-4, BCB 3-4, designed and testet under D3 and D4
+ Description:    Include Objects for calculating various RO_Hash's (fingerprints)
+                 used RO_Hash-Algorithm:
+                   MD4, MD5, SHA, SHA1, RipeMD (128 - 320),
+                   Haval (128 - 256), Snefru, Square, Tiger,
+                   Sapphire II (128 - 320)
+                 used Checksum-Algo:
+                   CRC32, XOR32bit, XOR16bit, CRC16-CCITT, CRC16-Standard
+
+ Comments:       for Designer's, the Buffer from Method Transform must be readonly
+
+ * THIS SOFTWARE IS PROVIDED BY THE AUTHORS ''AS IS'' AND ANY EXPRESS
+ * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+ * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHORS OR CONTRIBUTORS BE
+ * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
+ * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
+ * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
+ * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
+ * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE
+ * OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,
+ * EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+
+Digest size, Result from DigestKeySize and Datasize for Digest
+   MD4         16 byte   128 bit   4x Integer
+   MD5         16 byte   128 bit   4x Integer
+   SHA         20 byte   160 bit   5x Integer
+   SHA1        20 byte   160 bit   5x Integer
+   RMD128      16 byte   128 bit   4x Integer
+   RMD160      20 byte   160 bit   5x Integer
+   RMD256      32 byte   256 bit   8x Integer
+   RMD320      40 byte   320 bit  10x Integer
+   Haval256    32 byte   256 bit   8x Integer
+   Haval224    28 byte   224 bit   7x Integer
+   Haval192    24 byte   192 bit   6x Integer
+   Haval160    20 byte   160 bit   5x Integer
+   Haval128    16 byte   128 bit   4x Integer
+   Sapphire320 40 byte   320 bit  10x Integer
+   Sapphire288 36 byte   288 bit   9x Integer
+   Sapphire256 32 byte   256 bit   8x Integer
+   Sapphire224 28 byte   224 bit   7x Integer
+   Sapphire192 24 byte   192 bit   6x Integer
+   Sapphire160 20 byte   160 bit   5x Integer
+   Sapphire128 16 byte   128 bit   4x Integer
+   Snefru      32 byte   256 bit   8x Integer
+   Square      16 byte   128 bit   4x Integer
+   Tiger       24 byte   192 bit   6x Integer   in D4 used 64bit Arithmetic
+
+   XOR16     2 byte    16 bit   1x Word
+   XOR32     4 byte    32 bit   1x Integer
+   CRC32     4 byte    32 bit   1x Integer
+   CRC16     2 byte    16 bit   1x Word
+}
+
+unit uROHash;
+
+interface
+
+uses SysUtils, Classes, Windows, uRODECUtil;
+
+{$I uROVer.inc}
+
+type
+{all RO_Hash Classes}
+  TROHash_MD4             = class;
+  TROHash_MD5             = class;
+  TROHash_RipeMD128       = class;
+  TROHash_RipeMD160       = class;
+  TROHash_RipeMD256       = class;
+  TROHash_RipeMD320       = class;
+  TROHash_SHA             = class;
+  TROHash_SHA1            = class;
+  TROHash_Haval256        = class;
+  TROHash_Haval224        = class;
+  TROHash_Haval192        = class;
+  TROHash_Haval160        = class;
+  TROHash_Haval128        = class;
+  TROHash_Snefru          = class;
+  TROHash_Tiger           = class;
+  TROHash_Sapphire320     = class; {demonstrate the using from a RO_Cipher to hashing}
+  TROHash_Sapphire288     = class;
+  TROHash_Sapphire256     = class;
+  TROHash_Sapphire224     = class;
+  TROHash_Sapphire192     = class;
+  TROHash_Sapphire160     = class;
+  TROHash_Sapphire128     = class;
+  TROHash_Square          = class; {demonstrate the using from a RO_Cipher to hashing}
+{all Checksum Classes}
+  TROHash_XOR16           = class;
+  TROHash_XOR32           = class;
+  TROHash_CRC16_CCITT     = class;
+  TROhash_CRC16_Standard  = class;
+  TROHash_CRC32           = class;
+
+
+ {the Base-Class of all Hashs}
+
+  TROHashClass = class of TROHash;
+
+  TROHash = class(TROProtection)
+  protected
+    class function TestVector: Pointer; virtual; {must override}
+    procedure CodeInit(Action: TPAction); override; {TROProtection Methods, You can use a RO_Hash to En/Decode}
+    procedure CodeDone(Action: TPAction); override; {TROProtection Methods}
+    procedure CodeBuf(var Buffer; const BufferSize: Integer; Action: TPAction); override; {TROProtection Methods}
+    procedure Protect(IsInit: Boolean); {calls any installed Protection}
+  public
+    destructor Destroy; override;
+    procedure Init; virtual;
+    procedure Calc(const Data; DataSize: Integer); virtual; {must override}
+    procedure Done; virtual;
+    function DigestKey: Pointer; virtual; {must override}
+    function DigestStr(Format: Integer): AnsiString;
+
+    class function DigestKeySize: Integer; virtual; {must override}
+{$IFDEF VER_D4H} // new features from D4
+    class function CalcBuffer(const Buffer; BufferSize: Integer; Protection: TROProtection = nil; Format: Integer = fmtDEFAULT): AnsiString; overload;
+    class function CalcStream(const Stream: TStream; StreamSize: Integer; Protection: TROProtection = nil; Format: Integer = fmtDEFAULT): AnsiString; overload;
+    class function CalcString(const Data: AnsiString; Protection: TROProtection = nil; Format: Integer = fmtDEFAULT): AnsiString; overload;
+    class function CalcFile(const FileName: String; Protection: TROProtection = nil; Format: Integer = fmtDEFAULT): AnsiString; overload;
+{$ELSE}
+    class function CalcBuffer(const Buffer; BufferSize: Integer; Protection: TROProtection; Format: Integer): AnsiString;
+    class function CalcStream(const Stream: TStream; StreamSize: Integer; Protection: TROProtection; Format: Integer): AnsiString;
+    class function CalcString(const Data: AnsiString; Protection: TROProtection; Format: Integer): AnsiString;
+    class function CalcFile(const FileName: String; Protection: TROProtection; Format: Integer): AnsiString;
+{$ENDIF}
+{test the correct working}
+    class function SelfTest: Boolean;
+  end;
+
+// HMAC's - RO_Hash Message Authentication Code's
+  TROMAC = class(TROProtection) // generic MAC, encrypt Password with any AProtection and XOR's with
+  protected                 // the Initstate from the RO_Hash (DigestKey)
+    FPassword: AnsiString;      // final Digest is encrypted with AProtecion
+    procedure Init(RO_Hash: TROHash); virtual;    // Only used in all TROHash Descends
+    procedure Done(RO_Hash: TROHash); virtual;    // Only used in all TROHash Descends
+  public
+    constructor Create(const Password: AnsiString; AProtection: TROProtection);
+    destructor Destroy; override;
+  end;
+
+  TROMAC_RFC2104 = class(TROMAC) // RFC2104 HMAC Protection, these make from any THash_XXX an HMAC-XXXX
+  private                    // full compatible with RFC2104 Standard, see Docus\RFC2104 & RFC2202
+    function CalcPad(RO_Hash: TROHash; XORCode: Byte): AnsiString;
+  protected
+    procedure Init(RO_Hash: TROHash); override;
+    procedure Done(RO_Hash: TROHash); override;
+  end;
+
+  TROHash_MD4 = class(TROHash)
+  private
+    FCount: LongWord;
+    FBuffer: array[0..63] of Byte;
+    FDigest: array[0..9] of LongWord;
+  protected
+    class function TestVector: Pointer; override;
+    procedure Transform(Buffer: PIntArray); virtual;
+  public
+    class function DigestKeySize: Integer; override;
+    procedure Init; override;
+    procedure Done; override;
+    procedure Calc(const Data; DataSize: Integer); override;
+    function DigestKey: Pointer; override;
+  end;
+
+  TROHash_MD5 = class(TROHash_MD4)
+  protected
+    class function TestVector: Pointer; override;
+    procedure Transform(Buffer: PIntArray); override;
+  end;
+
+  TROHash_RipeMD128 = class(TROHash_MD4) {RACE Integrity Primitives Evaluation Message Digest}
+  protected
+    class function TestVector: Pointer; override;
+    procedure Transform(Buffer: PIntArray); override;
+  end;
+
+  TROHash_RipeMD160 = class(TROHash_MD4)
+  protected
+    class function TestVector: Pointer; override;
+    procedure Transform(Buffer: PIntArray); override;
+  public
+{DigestKey-Size 160 bit}
+    class function DigestKeySize: Integer; override;
+  end;
+
+  TROHash_RipeMD256 = class(TROHash_MD4)
+  protected
+    class function TestVector: Pointer; override;
+    procedure Transform(Buffer: PIntArray); override;
+  public
+{DigestKey-Size 256 bit}
+    class function DigestKeySize: Integer; override;
+    procedure Init; override;
+  end;
+
+  TROHash_RipeMD320 = class(TROHash_MD4)
+  protected
+    class function TestVector: Pointer; override;
+    procedure Transform(Buffer: PIntArray); override;
+  public
+{DigestKey-Size 320 bit}
+    class function DigestKeySize: Integer; override;
+  end;
+
+  TROHash_SHA = class(TROHash_RipeMD160)
+  private
+    FRotate: Boolean;
+  protected
+    class function TestVector: Pointer; override;
+    procedure Transform(Buffer: PIntArray); override;
+  public
+    procedure Done; override;
+  end;
+
+  TROHash_SHA1 = class(TROHash_SHA)
+  protected
+    class function TestVector: Pointer; override;
+  public
+    procedure Init; override;
+  end;
+
+  TROHash_Haval256 = class(TROHash)  {default Rounds = 5}
+  private
+    FCount: Integer;
+    FBuffer: array[0..127] of Byte;
+    FDigest: array[0..7] of LongWord;
+    FRounds: Integer; {3 - 5}
+    FTransform: procedure(Buffer: PIntArray) of Object;
+    procedure SetRounds(Value: Integer);
+  protected
+    class function TestVector: Pointer; override;
+    procedure Transform3(Buffer: PIntArray);
+    procedure Transform4(Buffer: PIntArray);
+    procedure Transform5(Buffer: PIntArray);
+  public
+    class function DigestKeySize: Integer; override;
+    procedure Init; override;
+    procedure Done; override;
+    procedure Calc(const Data; DataSize: Integer); override;
+    function DigestKey: Pointer; override;
+    property Rounds: Integer read FRounds write SetRounds;
+  end;
+
+  TROHash_Haval224 = class(TROHash_Haval256) {default Rounds = 4}
+  protected
+    class function TestVector: Pointer; override;
+  public
+    class function DigestKeySize: Integer; override;
+  end;
+
+  TROHash_Haval192 = class(TROHash_Haval256)  {default Rounds = 4}
+  protected
+    class function TestVector: Pointer; override;
+  public
+    class function DigestKeySize: Integer; override;
+  end;
+
+  TROHash_Haval160 = class(TROHash_Haval256) {default Rounds = 3}
+  protected
+    class function TestVector: Pointer; override;
+  public
+    class function DigestKeySize: Integer; override;
+  end;
+
+  TROHash_Haval128 = class(TROHash_Haval256)  {default Rounds = 3}
+  protected
+    class function TestVector: Pointer; override;
+  public
+    class function DigestKeySize: Integer; override;
+  end;
+
+  TROHash_Snefru = class(TROHash)  {"derived from the Xerox Secure RO_Hash Function"}
+  private
+    FSecurity_Level: Integer;
+    FCount: Integer;
+    FDigest: array[0..15] of LongWord; {first 8 Integer is the Digest}
+    FBuffer: array[0..31] of Byte;
+    procedure SetSecurity_Level(Value: Integer);
+  protected
+    class function TestVector: Pointer; override;
+    procedure Transform(Buffer: PIntArray);
+  public
+    class function DigestKeySize: Integer; override;
+    procedure Init; override;
+    procedure Done; override;
+    procedure Calc(const Data; DataSize: Integer); override;
+    function DigestKey: Pointer; override;
+{can set from 2 to 8, default is 8}
+    property Security_Level: Integer read FSecurity_Level write SetSecurity_Level;
+  end;
+
+  TROHash_Tiger = class(TROHash_MD4)  {Tiger use 64bit Operation's}
+  private
+    FRounds: Integer; { 3 - 32 , default is 3 , >3 slower but higher Security}
+    procedure SetRounds(Value: Integer);
+  protected
+    class function TestVector: Pointer; override;
+    procedure Transform(Buffer: PIntArray); override;
+  public
+    class function DigestKeySize: Integer; override;
+    procedure Init; override;
+    procedure Done; override;
+    property Rounds: Integer read FRounds write SetRounds;
+  end;
+
+  TROHash_Sapphire320 = class(TROHash)
+  private
+    FCount: LongWord;
+    FRotor: Byte;
+    FRatchet: Byte;
+    FAvalanche: Byte;
+    FPlain: Byte;
+    FCipher: Byte;
+    FCards: array[0..255] of Byte;
+    FDigest: array[0..9] of LongWord;
+  protected
+    class function TestVector: Pointer; override;
+  public
+    class function DigestKeySize: Integer; override;
+    procedure Init; override;
+    procedure Calc(const Data; DataSize: Integer); override;
+    procedure Done; override;
+    function DigestKey: Pointer; override;
+  end;
+
+  TROHash_Sapphire288 = class(TROHash_Sapphire320)
+  protected
+    class function TestVector: Pointer; override;
+  public
+    class function DigestKeySize: Integer; override;
+  end;
+
+  TROHash_Sapphire256 = class(TROHash_Sapphire320)
+  protected
+    class function TestVector: Pointer; override;
+  public
+    class function DigestKeySize: Integer; override;
+  end;
+
+  TROHash_Sapphire224 = class(TROHash_Sapphire320)
+  protected
+    class function TestVector: Pointer; override;
+  public
+    class function DigestKeySize: Integer; override;
+  end;
+
+  TROHash_Sapphire192 = class(TROHash_Sapphire320)
+  protected
+    class function TestVector: Pointer; override;
+  public
+    class function DigestKeySize: Integer; override;
+  end;
+
+  TROHash_Sapphire160 = class(TROHash_Sapphire320)
+  protected
+    class function TestVector: Pointer; override;
+  public
+    class function DigestKeySize: Integer; override;
+  end;
+
+  TROHash_Sapphire128 = class(TROHash_Sapphire320)
+  protected
+    class function TestVector: Pointer; override;
+  public
+    class function DigestKeySize: Integer; override;
+  end;
+
+  TROHash_Square = class(TROHash)
+  private
+    FCount: Integer;
+    FBuffer: array[0..15] of Byte;
+    FDigest: array[0..3] of LongWord;
+  protected
+    class function TestVector: Pointer; override;
+    procedure Transform(Buffer: PIntArray);
+  public
+    class function DigestKeySize: Integer; override;
+    procedure Init; override;
+    procedure Done; override;
+    procedure Calc(const Data; DataSize: Integer); override;
+    function DigestKey: Pointer; override;
+  end;
+
+  TROChecksum = class(TROHash);
+  
+  TROHash_XOR16 = class(TROChecksum)
+  private
+    FCRC: Word;
+  protected
+    class function TestVector: Pointer; override;
+  public
+    class function DigestKeySize: Integer; override;
+    procedure Init; override;
+    procedure Calc(const Data; DataSize: Integer); override;
+    function DigestKey: Pointer; override;
+  end;
+
+  TROHash_XOR32 = class(TROChecksum)
+  private
+    FCRC: LongWord;
+  protected
+    class function TestVector: Pointer; override;
+  public
+    class function DigestKeySize: Integer; override;
+    procedure Init; override;
+    procedure Calc(const Data; DataSize: Integer); override;
+    function DigestKey: Pointer; override;
+  end;
+
+  TROHash_CRC32 = class(TROHash_XOR32)
+  private
+  protected
+    class function TestVector: Pointer; override;
+  public
+    procedure Init; override;
+    procedure Calc(const Data; DataSize: Integer); override;
+    procedure Done; override;
+  end;
+
+  TROHash_CRC16_CCITT = class(TROHash_XOR16)
+  private
+  protected
+    class function TestVector: Pointer; override;
+  public
+    procedure Init; override;
+    procedure Calc(const Data; DataSize: Integer); override;
+  end;
+
+  TROhash_CRC16_Standard = class(TROHash_XOR16)
+  private
+  protected
+    class function TestVector: Pointer; override;
+  public
+    procedure Calc(const Data; DataSize: Integer); override;
+  end;
+
+function DefaultHashClass: TROHashClass;
+procedure SetDefaultHashClass(HashClass: TROHashClass);
+function RegisterHash(const AHash: TROHashClass; const AName, ADescription: String): Boolean;
+function UnregisterHash(const AHash: TROHashClass): Boolean;
+function HashList: TStrings;
+procedure HashNames(List: TStrings);
+function GetHashClass(const Name: String): TROHashClass;
+function GetHashName(HashClass: TROHashClass): String;
+
+implementation
+
+{$I *.inc}
+{$I uROSquare.inc}
+
+const
+// used as default for TROCipher in .InitKey(),
+// the hashed Password is used as real Key,
+// RipeMD256 produce a 256 bit Key (32 Bytes)
+// a Key Attack have 2^256 Variants to test, when the
+// RO_Cipher all Bit's use, i.E. Blowfish, Gost, SCOP, Twofish
+  FDefaultHashClass: TROHashClass = TROHash_RipeMD256;
+  FHashList: TStringList = nil;
+
+// RFC2104 HMAC Algorithm Parameters
+  RFC2104_Size = 64;  // Size of Padding in Bytes
+  RFC2104_IPad = $36; // XOR Value from Inner Pad
+  RFC2104_OPad = $5C; // XOR Value from outer Pad
+
+function DefaultHashClass: TROHashClass;
+begin
+  Result := FDefaultHashClass;
+end;
+
+procedure SetDefaultHashClass(HashClass: TROHashClass);
+begin
+  if HashClass = nil then FDefaultHashClass := TROHash_RipeMD256
+    else FDefaultHashClass := HashClass;
+end;
+
+function RegisterHash(const AHash: TROHashClass; const AName, ADescription: String): Boolean;
+var
+  I: Integer;
+  S: String;
+begin
+  Result := False;
+  if AHash = nil then Exit;
+  S := Trim(AName);
+  if S = '' then
+  begin
+    S := AHash.ClassName;
+    if S[1] = 'T' then Delete(S, 1, 1);
+    I := Pos('_', S);
+    if I > 0 then Delete(S, 1, I);
+  end;
+  S := S + '=' + ADescription;
+  I := HashList.IndexOfObject(Pointer(AHash));
+  if I < 0 then HashList.AddObject(S, Pointer(AHash))
+    else HashList[I] := S;
+  Result := True;
+end;
+
+function UnregisterHash(const AHash: TROHashClass): Boolean;
+var
+  I: Integer;
+begin
+  Result := False;
+  repeat
+    I := HashList.IndexOfObject(Pointer(AHash));
+    if I < 0 then Break;
+    Result := True;
+    HashList.Delete(I);
+  until False;
+end;
+
+function HashList: TStrings;
+begin
+  if not IsObject(FHashList, TStringList) then FHashList := TStringList.Create;
+  Result := FHashList;
+end;
+
+procedure HashNames(List: TStrings);
+var
+  I: Integer;
+begin
+  if not IsObject(List, TStrings) then Exit;
+  for I := 0 to HashList.Count-1 do
+    List.AddObject(FHashList.Names[I], FHashList.Objects[I]);
+end;
+
+function GetHashClass(const Name: String): TROHashClass;
+var
+  I: Integer;
+  N: String;
+begin
+  Result := nil;
+  N := Name;
+  I := Pos('_', N);
+  if I > 0 then Delete(N, 1, I);
+  for I := 0 to HashList.Count-1 do
+    if AnsiCompareText(N, GetShortClassName(TClass(FHashList.Objects[I]))) = 0 then
+    begin
+      Result := TROHashClass(FHashList.Objects[I]);
+      Exit;
+    end;
+  I := FHashList.IndexOfName(N);
+  if I >= 0 then Result := TROHashClass(FHashList.Objects[I]);
+end;
+
+function GetHashName(HashClass: TROHashClass): String;
+var
+  I: Integer;
+begin
+  I := HashList.IndexOfObject(Pointer(HashClass));
+  if I >= 0 then Result := FHashList.Names[I]
+    else Result := GetShortClassName(HashClass);
+end;
+
+destructor TROHash.Destroy;
+begin
+  FillChar(DigestKey^, DigestKeySize, 0);
+  inherited Destroy;
+end;
+
+procedure TROHash.Init;
+begin
+  Protect(True);
+end;
+
+procedure TROHash.Calc(const Data; DataSize: Integer);
+begin
+end;
+
+procedure TROHash.Protect(IsInit: Boolean);
+begin
+  if Protection <> nil then
+    if IsObject(Protection, TROMAC) then
+    begin
+      with TROMAC(Protection) do
+        if IsInit then Init(Self) else Done(Self);
+    end else
+      if not IsInit then
+        Protection.CodeBuffer(DigestKey^, DigestKeySize, paScramble);
+end;
+
+procedure TROHash.Done;
+begin
+  Protect(False);
+end;
+
+function TROHash.DigestKey: Pointer;
+begin
+  Result := GetTestVector;
+end;
+
+class function TROHash.DigestKeySize: Integer;
+begin
+  Result := 0;
+end;
+
+function TROHash.DigestStr(Format: Integer): AnsiString;
+begin
+  Result := StrToFormat(DigestKey, DigestKeySize, Format);
+end;
+
+class function TROHash.TestVector: Pointer;
+begin
+  Result := GetTestVector;
+end;
+
+class function TROHash.CalcStream(const Stream: TStream; StreamSize: Integer; Protection: TROProtection; Format: Integer): AnsiString;
+const
+  maxBufSize = 1024 * 4;  {Buffersize for File, Stream-Access}
+var
+  Buf: Pointer;
+  BufSize: Integer;
+  Size: Integer;
+  RO_Hash: TROHash;
+begin
+  RO_Hash := Create(Protection);
+  with RO_Hash do
+  try
+    Buf := AllocMem(maxBufSize);
+    Init;
+    if StreamSize < 0 then
+ {if Size < 0 then reset the Position, otherwise, calc with the specific
+  Size and from the aktual Position in the Stream}
+    begin
+      Stream.Position := 0;
+      StreamSize := Stream.Size;
+    end;
+    Size := StreamSize;
+    DoProgress(RO_Hash, 0, Size);
+    repeat
+      BufSize := StreamSize;
+      if BufSize > maxBufSize then BufSize := maxBufSize;
+      BufSize := Stream.Read(Buf^, BufSize);
+      if BufSize <= 0 then Break;
+      Calc(Buf^, BufSize);
+      Dec(StreamSize, BufSize);
+      DoProgress(RO_Hash, Size - StreamSize, Size);
+    until BufSize <= 0;
+    Done;
+    Result := StrToFormat(DigestKey, DigestKeySize, Format);
+  finally
+    DoProgress(RO_Hash, 0, 0);
+    Free;
+    ReallocMem(Buf, 0);
+  end;
+end;
+
+class function TROHash.CalcString(const Data: AnsiString; Protection: TROProtection; Format: Integer): AnsiString;
+begin
+  with Create(Protection) do
+  try
+    Init;
+    Calc(PAnsiChar(Data)^, Length(Data));
+    Done;
+    Result := StrToFormat(DigestKey, DigestKeySize, Format);
+  finally
+    Free;
+  end;
+end;
+
+class function TROHash.CalcFile(const FileName: String; Protection: TROProtection; Format: Integer): AnsiString;
+var
+  S: TFileStream;
+begin
+  S := TFileStream.Create(FileName, fmOpenRead or fmShareDenyNone);
+  try
+    Result := CalcStream(S, S.Size, Protection, Format);
+  finally
+    S.Free;
+  end;
+end;
+
+class function TROHash.CalcBuffer(const Buffer; BufferSize: Integer; Protection: TROProtection; Format: Integer): AnsiString;
+begin
+  with Create(Protection) do {create an Object from my Classtype}
+  try
+    Init;
+    Calc(Buffer, BufferSize);
+    Done;
+    Result := StrToFormat(DigestKey, DigestKeySize, Format);
+  finally
+    Free; {destroy it}
+  end;
+end;
+
+class function TROHash.SelfTest: Boolean;
+var
+  Test: AnsiString;
+begin
+  Test := CalcBuffer(GetTestVector^, 32, nil, fmtCOPY);
+  Result := InitTestIsOk and (MemCompare(PAnsiChar(Test), TestVector, Length(Test)) = 0);
+end;
+
+procedure TROHash.CodeInit(Action: TPAction);
+begin
+  Init;
+  if Action = paWipe then RndXORBuffer(RndTimeSeed, DigestKey^, DigestKeySize);
+  inherited CodeInit(Action);
+end;
+
+procedure TROHash.CodeDone(Action: TPAction);
+begin
+  inherited CodeDone(Action);
+  if (Action <> paCalc) then Init else Done;
+end;
+
+procedure TROHash.CodeBuf(var Buffer; const BufferSize: Integer; Action: TPAction);
+var
+  BPtr: PByte;
+  CSize,DSize,BSize: Integer;
+begin
+  if Action <> paDecode then inherited CodeBuf(Buffer, BufferSize, Action);
+  if Action in Actions then
+  begin
+    BPtr := @Buffer;
+    if BPtr = nil then Exit;
+    DSize := DigestKeySize;
+    CSize := BufferSize;
+    if Action = paCalc then
+    begin
+      Calc(Buffer, BufferSize);
+    end else
+    begin
+      if Action in [paScramble, paWipe] then
+      begin
+        while CSize > 0 do
+        begin
+          BSize := CSize;
+          if BSize > DSize then BSize := DSize;
+          Calc(BPtr^, BSize);
+          Done;
+          Move(DigestKey^, BPtr^, BSize);
+          Dec(CSize, BSize);
+          Inc(BPtr, BSize);
+        end;
+      end else
+        while CSize > 0 do
+        begin
+          BSize := DSize;
+          if BSize > CSize then BSize := CSize;
+          Calc(DigestKey^, DSize);
+          Done;
+          XORBuffers(DigestKey, BPtr, BSize, BPtr);
+          Dec(CSize, BSize);
+          Inc(BPtr, BSize);
+        end;
+    end;
+  end;
+  if Action = paDecode then
+    inherited CodeBuf(Buffer, BufferSize, Action);
+end;
+
+procedure TROMAC.Init(RO_Hash: TROHash);
+var
+  Key: AnsiString;
+begin
+  if Length(FPassword) > 0 then
+  begin
+    Key := RO_Hash.CalcString(FPassword, Protection, fmtCOPY);
+    XORBuffers(RO_Hash.DigestKey, PAnsiChar(Key), Length(Key), RO_Hash.DigestKey);
+    FillChar(PAnsiChar(Key)^, Length(Key), $AA);
+    FillChar(PAnsiChar(Key)^, Length(Key), $55);
+    FillChar(PAnsiChar(Key)^, Length(Key), 0);
+  end;
+end;
+
+procedure TROMAC.Done(RO_Hash: TROHash);
+begin
+  if Protection <> nil then
+    Protection.CodeBuffer(RO_Hash.DigestKey^, RO_Hash.DigestKeySize, paScramble);
+end;
+
+constructor TROMAC.Create(const Password: AnsiString; AProtection: TROProtection);
+begin
+  inherited Create(AProtection);
+  SetLength(FPassword, Length(Password));
+  Move(PAnsiChar(Password)^, PAnsiChar(FPassword)^, Length(Password));
+end;
+
+destructor TROMAC.Destroy;
+var
+  I: Integer;
+begin
+  I := Length(FPassword);
+  if I > 0 then
+  begin
+    FillChar(PAnsiChar(FPassword)^, I, $AA);
+    FillChar(PAnsiChar(FPassword)^, I, $55);
+    FillChar(PAnsiChar(FPassword)^, I, 0);
+  end;
+  FPassword := '';
+  inherited Destroy;
+end;
+
+function TROMAC_RFC2104.CalcPad(RO_Hash: TROHash; XORCode: Byte): AnsiString;
+var
+  I: Integer;
+begin
+  I := Length(FPassword);
+  if I > RFC2104_Size then Result := RO_Hash.CalcString(FPassword, nil, fmtCOPY)
+    else Result := FPassword;
+  UniqueString(Result);
+  for I := 1 to Length(Result) do
+    Byte(Result[I]) := Byte(Result[I]) xor XORCode;
+  I := Length(Result);
+  SetLength(Result, RFC2104_Size);
+  FillChar(Result[I +1], RFC2104_Size - I, XORCode);
+end;
+
+procedure TROMAC_RFC2104.Init(RO_Hash: TROHash);
+var
+  IPad: AnsiString;
+begin
+  if Length(FPassword) > 0 then
+  begin
+    IPad := CalcPad(RO_Hash, RFC2104_IPad);
+    RO_Hash.Calc(PAnsiChar(IPad)^, Length(IPad));
+  end;
+end;
+
+procedure TROMAC_RFC2104.Done(RO_Hash: TROHash);
+var
+  OPad: AnsiString;
+begin
+  if Length(FPassword) > 0 then
+  begin
+    OPad := CalcPad(RO_Hash, RFC2104_OPad);
+    with TROHashClass(RO_Hash.ClassType).Create(nil) do
+    try
+      Init;
+      Calc(PAnsiChar(OPad)^, Length(OPad));
+      Calc(RO_Hash.DigestKey^, DigestKeySize);
+      Done;
+      Move(DigestKey^, RO_Hash.DigestKey^, DigestKeySize);
+    finally
+      Free;
+    end;
+  end;
+  if Protection <> nil then
+    Protection.CodeBuffer(RO_Hash.DigestKey^, RO_Hash.DigestKeySize, paScramble);
+end;
+
+class function TROHash_MD4.TestVector: Pointer; assembler;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    025h,0EAh,0BFh,0CCh,08Ch,0C9h,06Fh,0D9h
+         DB    02Dh,0CFh,07Eh,0BDh,07Fh,087h,07Ch,07Ch
+end;
+
+procedure TROHash_MD4.Transform(Buffer: PIntArray);
+{calculate the Digest, fast}
+var
+  A, B, C, D: LongWord;
+begin
+  A := FDigest[0];
+  B := FDigest[1];
+  C := FDigest[2];
+  D := FDigest[3];
+
+  Inc(A, Buffer[ 0] + (B and C or not B and D)); A := A shl  3 or A shr 29;
+  Inc(D, Buffer[ 1] + (A and B or not A and C)); D := D shl  7 or D shr 25;
+  Inc(C, Buffer[ 2] + (D and A or not D and B)); C := C shl 11 or C shr 21;
+  Inc(B, Buffer[ 3] + (C and D or not C and A)); B := B shl 19 or B shr 13;
+  Inc(A, Buffer[ 4] + (B and C or not B and D)); A := A shl  3 or A shr 29;
+  Inc(D, Buffer[ 5] + (A and B or not A and C)); D := D shl  7 or D shr 25;
+  Inc(C, Buffer[ 6] + (D and A or not D and B)); C := C shl 11 or C shr 21;
+  Inc(B, Buffer[ 7] + (C and D or not C and A)); B := B shl 19 or B shr 13;
+  Inc(A, Buffer[ 8] + (B and C or not B and D)); A := A shl  3 or A shr 29;
+  Inc(D, Buffer[ 9] + (A and B or not A and C)); D := D shl  7 or D shr 25;
+  Inc(C, Buffer[10] + (D and A or not D and B)); C := C shl 11 or C shr 21;
+  Inc(B, Buffer[11] + (C and D or not C and A)); B := B shl 19 or B shr 13;
+  Inc(A, Buffer[12] + (B and C or not B and D)); A := A shl  3 or A shr 29;
+  Inc(D, Buffer[13] + (A and B or not A and C)); D := D shl  7 or D shr 25;
+  Inc(C, Buffer[14] + (D and A or not D and B)); C := C shl 11 or C shr 21;
+  Inc(B, Buffer[15] + (C and D or not C and A)); B := B shl 19 or B shr 13;
+
+  Inc(A, Buffer[ 0] + $5A827999 + (B and C or B and D or C and D)); A := A shl  3 or A shr 29;
+  Inc(D, Buffer[ 4] + $5A827999 + (A and B or A and C or B and C)); D := D shl  5 or D shr 27;
+  Inc(C, Buffer[ 8] + $5A827999 + (D and A or D and B or A and B)); C := C shl  9 or C shr 23;
+  Inc(B, Buffer[12] + $5A827999 + (C and D or C and A or D and A)); B := B shl 13 or B shr 19;
+  Inc(A, Buffer[ 1] + $5A827999 + (B and C or B and D or C and D)); A := A shl  3 or A shr 29;
+  Inc(D, Buffer[ 5] + $5A827999 + (A and B or A and C or B and C)); D := D shl  5 or D shr 27;
+  Inc(C, Buffer[ 9] + $5A827999 + (D and A or D and B or A and B)); C := C shl  9 or C shr 23;
+  Inc(B, Buffer[13] + $5A827999 + (C and D or C and A or D and A)); B := B shl 13 or B shr 19;
+  Inc(A, Buffer[ 2] + $5A827999 + (B and C or B and D or C and D)); A := A shl  3 or A shr 29;
+  Inc(D, Buffer[ 6] + $5A827999 + (A and B or A and C or B and C)); D := D shl  5 or D shr 27;
+  Inc(C, Buffer[10] + $5A827999 + (D and A or D and B or A and B)); C := C shl  9 or C shr 23;
+  Inc(B, Buffer[14] + $5A827999 + (C and D or C and A or D and A)); B := B shl 13 or B shr 19;
+  Inc(A, Buffer[ 3] + $5A827999 + (B and C or B and D or C and D)); A := A shl  3 or A shr 29;
+  Inc(D, Buffer[ 7] + $5A827999 + (A and B or A and C or B and C)); D := D shl  5 or D shr 27;
+  Inc(C, Buffer[11] + $5A827999 + (D and A or D and B or A and B)); C := C shl  9 or C shr 23;
+  Inc(B, Buffer[15] + $5A827999 + (C and D or C and A or D and A)); B := B shl 13 or B shr 19;
+
+  Inc(A, Buffer[ 0] + $6ED9EBA1 + (B xor C xor D)); A := A shl  3 or A shr 29;
+  Inc(D, Buffer[ 8] + $6ED9EBA1 + (A xor B xor C)); D := D shl  9 or D shr 23;
+  Inc(C, Buffer[ 4] + $6ED9EBA1 + (D xor A xor B)); C := C shl 11 or C shr 21;
+  Inc(B, Buffer[12] + $6ED9EBA1 + (C xor D xor A)); B := B shl 15 or B shr 17;
+  Inc(A, Buffer[ 2] + $6ED9EBA1 + (B xor C xor D)); A := A shl  3 or A shr 29;
+  Inc(D, Buffer[10] + $6ED9EBA1 + (A xor B xor C)); D := D shl  9 or D shr 23;
+  Inc(C, Buffer[ 6] + $6ED9EBA1 + (D xor A xor B)); C := C shl 11 or C shr 21;
+  Inc(B, Buffer[14] + $6ED9EBA1 + (C xor D xor A)); B := B shl 15 or B shr 17;
+  Inc(A, Buffer[ 1] + $6ED9EBA1 + (B xor C xor D)); A := A shl  3 or A shr 29;
+  Inc(D, Buffer[ 9] + $6ED9EBA1 + (A xor B xor C)); D := D shl  9 or D shr 23;
+  Inc(C, Buffer[ 5] + $6ED9EBA1 + (D xor A xor B)); C := C shl 11 or C shr 21;
+  Inc(B, Buffer[13] + $6ED9EBA1 + (C xor D xor A)); B := B shl 15 or B shr 17;
+  Inc(A, Buffer[ 3] + $6ED9EBA1 + (B xor C xor D)); A := A shl  3 or A shr 29;
+  Inc(D, Buffer[11] + $6ED9EBA1 + (A xor B xor C)); D := D shl  9 or D shr 23;
+  Inc(C, Buffer[ 7] + $6ED9EBA1 + (D xor A xor B)); C := C shl 11 or C shr 21;
+  Inc(B, Buffer[15] + $6ED9EBA1 + (C xor D xor A)); B := B shl 15 or B shr 17;
+
+  Inc(FDigest[0], A);
+  Inc(FDigest[1], B);
+  Inc(FDigest[2], C);
+  Inc(FDigest[3], D);
+end;
+
+class function TROHash_MD4.DigestKeySize: Integer;
+begin
+  Result := 16;
+end;
+
+function TROHash_MD4.DigestKey: Pointer;
+begin
+  Result := @FDigest;
+end;
+
+procedure TROHash_MD4.Init;
+begin
+  FillChar(FBuffer, SizeOf(FBuffer), 0);
+{all Descend from MD4 (MD4, SHA1, RipeMD128, RipeMD160, RipeMD256) use this Init-Key}
+  FDigest[0] := $67452301;
+  FDigest[1] := $EFCDAB89;
+  FDigest[2] := $98BADCFE;
+  FDigest[3] := $10325476;
+  FDigest[4] := $C3D2E1F0;
+{for RMD320}
+  FDigest[5] := $76543210;
+  FDigest[6] := $FEDCBA98;
+  FDigest[7] := $89ABCDEF;
+  FDigest[8] := $01234567;
+  FDigest[9] := $3C2D1E0F;
+  FCount := 0;
+  Protect(True);
+end;
+
+procedure TROHash_MD4.Done;
+var
+  I: Integer;
+  S: Comp;
+begin
+  I := FCount and $3F;
+  FBuffer[I] := $80;
+  Inc(I);
+  if I > 64 - 8 then
+  begin
+    FillChar(FBuffer[I], 64 - I, 0);
+    Transform(@FBuffer);
+    I := 0;
+  end;
+  FillChar(FBuffer[I], 64 - I, 0);
+  S := FCount * 8;
+  Move(S, FBuffer[64 - 8], SizeOf(S));
+  Transform(@FBuffer);
+  FillChar(FBuffer, SizeOf(FBuffer), 0);
+  Protect(False);
+end;
+
+procedure TROHash_MD4.Calc(const Data; DataSize: Integer);
+var
+  Index: Integer;
+  P: PChar;
+begin
+  if DataSize <= 0 then Exit;
+  Index := FCount and $3F;
+  Inc(FCount, DataSize);
+  if Index > 0 then
+  begin
+    if DataSize < 64 - Index then
+    begin
+      Move(Data, FBuffer[Index], DataSize);
+      Exit;
+    end;
+    Move(Data, FBuffer[Index], 64 - Index);
+    Transform(@FBuffer);
+    Index := 64 - Index;
+    Dec(DataSize, Index);
+  end;
+  P := @TByteArray(Data)[Index];
+  Inc(Index, DataSize and not $3F);
+  while DataSize >= 64 do
+  begin
+    Transform(Pointer(P));
+    Inc(P, 64);
+    Dec(DataSize, 64);
+  end;
+  Move(TByteArray(Data)[Index], FBuffer, DataSize);
+end;
+
+class function TROHash_MD5.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    03Eh,0D8h,034h,08Ch,0D2h,0A4h,045h,0D6h
+         DB    075h,05Dh,04Bh,0C9h,0FEh,0DCh,0C2h,0C6h
+end;
+
+procedure TROHash_MD5.Transform(Buffer: PIntArray);
+var
+  A, B, C, D: LongWord;
+begin
+  A := FDigest[0];
+  B := FDigest[1];
+  C := FDigest[2];
+  D := FDigest[3];
+
+  Inc(A, Buffer[ 0] + $D76AA478 + (D xor (B and (C xor D)))); A := A shl  7 or A shr 25 + B;
+  Inc(D, Buffer[ 1] + $E8C7B756 + (C xor (A and (B xor C)))); D := D shl 12 or D shr 20 + A;
+  Inc(C, Buffer[ 2] + $242070DB + (B xor (D and (A xor B)))); C := C shl 17 or C shr 15 + D;
+  Inc(B, Buffer[ 3] + $C1BDCEEE + (A xor (C and (D xor A)))); B := B shl 22 or B shr 10 + C;
+  Inc(A, Buffer[ 4] + $F57C0FAF + (D xor (B and (C xor D)))); A := A shl  7 or A shr 25 + B;
+  Inc(D, Buffer[ 5] + $4787C62A + (C xor (A and (B xor C)))); D := D shl 12 or D shr 20 + A;
+  Inc(C, Buffer[ 6] + $A8304613 + (B xor (D and (A xor B)))); C := C shl 17 or C shr 15 + D;
+  Inc(B, Buffer[ 7] + $FD469501 + (A xor (C and (D xor A)))); B := B shl 22 or B shr 10 + C;
+  Inc(A, Buffer[ 8] + $698098D8 + (D xor (B and (C xor D)))); A := A shl  7 or A shr 25 + B;
+  Inc(D, Buffer[ 9] + $8B44F7AF + (C xor (A and (B xor C)))); D := D shl 12 or D shr 20 + A;
+  Inc(C, Buffer[10] + $FFFF5BB1 + (B xor (D and (A xor B)))); C := C shl 17 or C shr 15 + D;
+  Inc(B, Buffer[11] + $895CD7BE + (A xor (C and (D xor A)))); B := B shl 22 or B shr 10 + C;
+  Inc(A, Buffer[12] + $6B901122 + (D xor (B and (C xor D)))); A := A shl  7 or A shr 25 + B;
+  Inc(D, Buffer[13] + $FD987193 + (C xor (A and (B xor C)))); D := D shl 12 or D shr 20 + A;
+  Inc(C, Buffer[14] + $A679438E + (B xor (D and (A xor B)))); C := C shl 17 or C shr 15 + D;
+  Inc(B, Buffer[15] + $49B40821 + (A xor (C and (D xor A)))); B := B shl 22 or B shr 10 + C;
+
+  Inc(A, Buffer[ 1] + $F61E2562 + (C xor (D and (B xor C)))); A := A shl  5 or A shr 27 + B;
+  Inc(D, Buffer[ 6] + $C040B340 + (B xor (C and (A xor B)))); D := D shl  9 or D shr 23 + A;
+  Inc(C, Buffer[11] + $265E5A51 + (A xor (B and (D xor A)))); C := C shl 14 or C shr 18 + D;
+  Inc(B, Buffer[ 0] + $E9B6C7AA + (D xor (A and (C xor D)))); B := B shl 20 or B shr 12 + C;
+  Inc(A, Buffer[ 5] + $D62F105D + (C xor (D and (B xor C)))); A := A shl  5 or A shr 27 + B;
+  Inc(D, Buffer[10] + $02441453 + (B xor (C and (A xor B)))); D := D shl  9 or D shr 23 + A;
+  Inc(C, Buffer[15] + $D8A1E681 + (A xor (B and (D xor A)))); C := C shl 14 or C shr 18 + D;
+  Inc(B, Buffer[ 4] + $E7D3FBC8 + (D xor (A and (C xor D)))); B := B shl 20 or B shr 12 + C;
+  Inc(A, Buffer[ 9] + $21E1CDE6 + (C xor (D and (B xor C)))); A := A shl  5 or A shr 27 + B;
+  Inc(D, Buffer[14] + $C33707D6 + (B xor (C and (A xor B)))); D := D shl  9 or D shr 23 + A;
+  Inc(C, Buffer[ 3] + $F4D50D87 + (A xor (B and (D xor A)))); C := C shl 14 or C shr 18 + D;
+  Inc(B, Buffer[ 8] + $455A14ED + (D xor (A and (C xor D)))); B := B shl 20 or B shr 12 + C;
+  Inc(A, Buffer[13] + $A9E3E905 + (C xor (D and (B xor C)))); A := A shl  5 or A shr 27 + B;
+  Inc(D, Buffer[ 2] + $FCEFA3F8 + (B xor (C and (A xor B)))); D := D shl  9 or D shr 23 + A;
+  Inc(C, Buffer[ 7] + $676F02D9 + (A xor (B and (D xor A)))); C := C shl 14 or C shr 18 + D;
+  Inc(B, Buffer[12] + $8D2A4C8A + (D xor (A and (C xor D)))); B := B shl 20 or B shr 12 + C;
+
+  Inc(A, Buffer[ 5] + $FFFA3942 + (B xor C xor D)); A := A shl  4 or A shr 28 + B;
+  Inc(D, Buffer[ 8] + $8771F681 + (A xor B xor C)); D := D shl 11 or D shr 21 + A;
+  Inc(C, Buffer[11] + $6D9D6122 + (D xor A xor B)); C := C shl 16 or C shr 16 + D;
+  Inc(B, Buffer[14] + $FDE5380C + (C xor D xor A)); B := B shl 23 or B shr  9 + C;
+  Inc(A, Buffer[ 1] + $A4BEEA44 + (B xor C xor D)); A := A shl  4 or A shr 28 + B;
+  Inc(D, Buffer[ 4] + $4BDECFA9 + (A xor B xor C)); D := D shl 11 or D shr 21 + A;
+  Inc(C, Buffer[ 7] + $F6BB4B60 + (D xor A xor B)); C := C shl 16 or C shr 16 + D;
+  Inc(B, Buffer[10] + $BEBFBC70 + (C xor D xor A)); B := B shl 23 or B shr  9 + C;
+  Inc(A, Buffer[13] + $289B7EC6 + (B xor C xor D)); A := A shl  4 or A shr 28 + B;
+  Inc(D, Buffer[ 0] + $EAA127FA + (A xor B xor C)); D := D shl 11 or D shr 21 + A;
+  Inc(C, Buffer[ 3] + $D4EF3085 + (D xor A xor B)); C := C shl 16 or C shr 16 + D;
+  Inc(B, Buffer[ 6] + $04881D05 + (C xor D xor A)); B := B shl 23 or B shr  9 + C;
+  Inc(A, Buffer[ 9] + $D9D4D039 + (B xor C xor D)); A := A shl  4 or A shr 28 + B;
+  Inc(D, Buffer[12] + $E6DB99E5 + (A xor B xor C)); D := D shl 11 or D shr 21 + A;
+  Inc(C, Buffer[15] + $1FA27CF8 + (D xor A xor B)); C := C shl 16 or C shr 16 + D;
+  Inc(B, Buffer[ 2] + $C4AC5665 + (C xor D xor A)); B := B shl 23 or B shr  9 + C;
+
+  Inc(A, Buffer[ 0] + $F4292244 + (C xor (B or not D))); A := A shl  6 or A shr 26 + B;
+  Inc(D, Buffer[ 7] + $432AFF97 + (B xor (A or not C))); D := D shl 10 or D shr 22 + A;
+  Inc(C, Buffer[14] + $AB9423A7 + (A xor (D or not B))); C := C shl 15 or C shr 17 + D;
+  Inc(B, Buffer[ 5] + $FC93A039 + (D xor (C or not A))); B := B shl 21 or B shr 11 + C;
+  Inc(A, Buffer[12] + $655B59C3 + (C xor (B or not D))); A := A shl  6 or A shr 26 + B;
+  Inc(D, Buffer[ 3] + $8F0CCC92 + (B xor (A or not C))); D := D shl 10 or D shr 22 + A;
+  Inc(C, Buffer[10] + $FFEFF47D + (A xor (D or not B))); C := C shl 15 or C shr 17 + D;
+  Inc(B, Buffer[ 1] + $85845DD1 + (D xor (C or not A))); B := B shl 21 or B shr 11 + C;
+  Inc(A, Buffer[ 8] + $6FA87E4F + (C xor (B or not D))); A := A shl  6 or A shr 26 + B;
+  Inc(D, Buffer[15] + $FE2CE6E0 + (B xor (A or not C))); D := D shl 10 or D shr 22 + A;
+  Inc(C, Buffer[ 6] + $A3014314 + (A xor (D or not B))); C := C shl 15 or C shr 17 + D;
+  Inc(B, Buffer[13] + $4E0811A1 + (D xor (C or not A))); B := B shl 21 or B shr 11 + C;
+  Inc(A, Buffer[ 4] + $F7537E82 + (C xor (B or not D))); A := A shl  6 or A shr 26 + B;
+  Inc(D, Buffer[11] + $BD3AF235 + (B xor (A or not C))); D := D shl 10 or D shr 22 + A;
+  Inc(C, Buffer[ 2] + $2AD7D2BB + (A xor (D or not B))); C := C shl 15 or C shr 17 + D;
+  Inc(B, Buffer[ 9] + $EB86D391 + (D xor (C or not A))); B := B shl 21 or B shr 11 + C;
+
+  Inc(FDigest[0], A);
+  Inc(FDigest[1], B);
+  Inc(FDigest[2], C);
+  Inc(FDigest[3], D);
+end;
+
+class function TROHash_RipeMD128.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    0CFh,0A0h,032h,0CFh,0D0h,08Fh,087h,03Ah
+         DB    078h,0DFh,013h,0E7h,0EBh,0CDh,098h,00Fh
+end;
+
+procedure TROHash_RipeMD128.Transform(Buffer: PIntArray);
+var
+  A1, B1, C1, D1: LongWord;
+  A2, B2, C2, D2: LongWord;
+begin
+  A1 := FDigest[0];
+  B1 := FDigest[1];
+  C1 := FDigest[2];
+  D1 := FDigest[3];
+  A2 := A1;
+  B2 := B1;
+  C2 := C1;
+  D2 := D1;
+
+  Inc(A1, B1 xor C1 xor D1 + Buffer[ 0]); A1 := A1 shl 11 or A1 shr 21;
+  Inc(D1, A1 xor B1 xor C1 + Buffer[ 1]); D1 := D1 shl 14 or D1 shr 18;
+  Inc(C1, D1 xor A1 xor B1 + Buffer[ 2]); C1 := C1 shl 15 or C1 shr 17;
+  Inc(B1, C1 xor D1 xor A1 + Buffer[ 3]); B1 := B1 shl 12 or B1 shr 20;
+  Inc(A1, B1 xor C1 xor D1 + Buffer[ 4]); A1 := A1 shl  5 or A1 shr 27;
+  Inc(D1, A1 xor B1 xor C1 + Buffer[ 5]); D1 := D1 shl  8 or D1 shr 24;
+  Inc(C1, D1 xor A1 xor B1 + Buffer[ 6]); C1 := C1 shl  7 or C1 shr 25;
+  Inc(B1, C1 xor D1 xor A1 + Buffer[ 7]); B1 := B1 shl  9 or B1 shr 23;
+  Inc(A1, B1 xor C1 xor D1 + Buffer[ 8]); A1 := A1 shl 11 or A1 shr 21;
+  Inc(D1, A1 xor B1 xor C1 + Buffer[ 9]); D1 := D1 shl 13 or D1 shr 19;
+  Inc(C1, D1 xor A1 xor B1 + Buffer[10]); C1 := C1 shl 14 or C1 shr 18;
+  Inc(B1, C1 xor D1 xor A1 + Buffer[11]); B1 := B1 shl 15 or B1 shr 17;
+  Inc(A1, B1 xor C1 xor D1 + Buffer[12]); A1 := A1 shl  6 or A1 shr 26;
+  Inc(D1, A1 xor B1 xor C1 + Buffer[13]); D1 := D1 shl  7 or D1 shr 25;
+  Inc(C1, D1 xor A1 xor B1 + Buffer[14]); C1 := C1 shl  9 or C1 shr 23;
+  Inc(B1, C1 xor D1 xor A1 + Buffer[15]); B1 := B1 shl  8 or B1 shr 24;
+
+  Inc(A1, B1 and C1 or not B1 and D1 + Buffer[ 7] + $5A827999); A1 := A1 shl  7 or A1 shr 25;
+  Inc(D1, A1 and B1 or not A1 and C1 + Buffer[ 4] + $5A827999); D1 := D1 shl  6 or D1 shr 26;
+  Inc(C1, D1 and A1 or not D1 and B1 + Buffer[13] + $5A827999); C1 := C1 shl  8 or C1 shr 24;
+  Inc(B1, C1 and D1 or not C1 and A1 + Buffer[ 1] + $5A827999); B1 := B1 shl 13 or B1 shr 19;
+  Inc(A1, B1 and C1 or not B1 and D1 + Buffer[10] + $5A827999); A1 := A1 shl 11 or A1 shr 21;
+  Inc(D1, A1 and B1 or not A1 and C1 + Buffer[ 6] + $5A827999); D1 := D1 shl  9 or D1 shr 23;
+  Inc(C1, D1 and A1 or not D1 and B1 + Buffer[15] + $5A827999); C1 := C1 shl  7 or C1 shr 25;
+  Inc(B1, C1 and D1 or not C1 and A1 + Buffer[ 3] + $5A827999); B1 := B1 shl 15 or B1 shr 17;
+  Inc(A1, B1 and C1 or not B1 and D1 + Buffer[12] + $5A827999); A1 := A1 shl  7 or A1 shr 25;
+  Inc(D1, A1 and B1 or not A1 and C1 + Buffer[ 0] + $5A827999); D1 := D1 shl 12 or D1 shr 20;
+  Inc(C1, D1 and A1 or not D1 and B1 + Buffer[ 9] + $5A827999); C1 := C1 shl 15 or C1 shr 17;
+  Inc(B1, C1 and D1 or not C1 and A1 + Buffer[ 5] + $5A827999); B1 := B1 shl  9 or B1 shr 23;
+  Inc(A1, B1 and C1 or not B1 and D1 + Buffer[ 2] + $5A827999); A1 := A1 shl 11 or A1 shr 21;
+  Inc(D1, A1 and B1 or not A1 and C1 + Buffer[14] + $5A827999); D1 := D1 shl  7 or D1 shr 25;
+  Inc(C1, D1 and A1 or not D1 and B1 + Buffer[11] + $5A827999); C1 := C1 shl 13 or C1 shr 19;
+  Inc(B1, C1 and D1 or not C1 and A1 + Buffer[ 8] + $5A827999); B1 := B1 shl 12 or B1 shr 20;
+
+  Inc(A1, (B1 or not C1) xor D1 + Buffer[ 3] + $6ED9EBA1); A1 := A1 shl 11 or A1 shr 21;
+  Inc(D1, (A1 or not B1) xor C1 + Buffer[10] + $6ED9EBA1); D1 := D1 shl 13 or D1 shr 19;
+  Inc(C1, (D1 or not A1) xor B1 + Buffer[14] + $6ED9EBA1); C1 := C1 shl  6 or C1 shr 26;
+  Inc(B1, (C1 or not D1) xor A1 + Buffer[ 4] + $6ED9EBA1); B1 := B1 shl  7 or B1 shr 25;
+  Inc(A1, (B1 or not C1) xor D1 + Buffer[ 9] + $6ED9EBA1); A1 := A1 shl 14 or A1 shr 18;
+  Inc(D1, (A1 or not B1) xor C1 + Buffer[15] + $6ED9EBA1); D1 := D1 shl  9 or D1 shr 23;
+  Inc(C1, (D1 or not A1) xor B1 + Buffer[ 8] + $6ED9EBA1); C1 := C1 shl 13 or C1 shr 19;
+  Inc(B1, (C1 or not D1) xor A1 + Buffer[ 1] + $6ED9EBA1); B1 := B1 shl 15 or B1 shr 17;
+  Inc(A1, (B1 or not C1) xor D1 + Buffer[ 2] + $6ED9EBA1); A1 := A1 shl 14 or A1 shr 18;
+  Inc(D1, (A1 or not B1) xor C1 + Buffer[ 7] + $6ED9EBA1); D1 := D1 shl  8 or D1 shr 24;
+  Inc(C1, (D1 or not A1) xor B1 + Buffer[ 0] + $6ED9EBA1); C1 := C1 shl 13 or C1 shr 19;
+  Inc(B1, (C1 or not D1) xor A1 + Buffer[ 6] + $6ED9EBA1); B1 := B1 shl  6 or B1 shr 26;
+  Inc(A1, (B1 or not C1) xor D1 + Buffer[13] + $6ED9EBA1); A1 := A1 shl  5 or A1 shr 27;
+  Inc(D1, (A1 or not B1) xor C1 + Buffer[11] + $6ED9EBA1); D1 := D1 shl 12 or D1 shr 20;
+  Inc(C1, (D1 or not A1) xor B1 + Buffer[ 5] + $6ED9EBA1); C1 := C1 shl  7 or C1 shr 25;
+  Inc(B1, (C1 or not D1) xor A1 + Buffer[12] + $6ED9EBA1); B1 := B1 shl  5 or B1 shr 27;
+
+  Inc(A1, B1 and D1 or C1 and not D1 + Buffer[ 1] + $8F1BBCDC); A1 := A1 shl 11 or A1 shr 21;
+  Inc(D1, A1 and C1 or B1 and not C1 + Buffer[ 9] + $8F1BBCDC); D1 := D1 shl 12 or D1 shr 20;
+  Inc(C1, D1 and B1 or A1 and not B1 + Buffer[11] + $8F1BBCDC); C1 := C1 shl 14 or C1 shr 18;
+  Inc(B1, C1 and A1 or D1 and not A1 + Buffer[10] + $8F1BBCDC); B1 := B1 shl 15 or B1 shr 17;
+  Inc(A1, B1 and D1 or C1 and not D1 + Buffer[ 0] + $8F1BBCDC); A1 := A1 shl 14 or A1 shr 18;
+  Inc(D1, A1 and C1 or B1 and not C1 + Buffer[ 8] + $8F1BBCDC); D1 := D1 shl 15 or D1 shr 17;
+  Inc(C1, D1 and B1 or A1 and not B1 + Buffer[12] + $8F1BBCDC); C1 := C1 shl  9 or C1 shr 23;
+  Inc(B1, C1 and A1 or D1 and not A1 + Buffer[ 4] + $8F1BBCDC); B1 := B1 shl  8 or B1 shr 24;
+  Inc(A1, B1 and D1 or C1 and not D1 + Buffer[13] + $8F1BBCDC); A1 := A1 shl  9 or A1 shr 23;
+  Inc(D1, A1 and C1 or B1 and not C1 + Buffer[ 3] + $8F1BBCDC); D1 := D1 shl 14 or D1 shr 18;
+  Inc(C1, D1 and B1 or A1 and not B1 + Buffer[ 7] + $8F1BBCDC); C1 := C1 shl  5 or C1 shr 27;
+  Inc(B1, C1 and A1 or D1 and not A1 + Buffer[15] + $8F1BBCDC); B1 := B1 shl  6 or B1 shr 26;
+  Inc(A1, B1 and D1 or C1 and not D1 + Buffer[14] + $8F1BBCDC); A1 := A1 shl  8 or A1 shr 24;
+  Inc(D1, A1 and C1 or B1 and not C1 + Buffer[ 5] + $8F1BBCDC); D1 := D1 shl  6 or D1 shr 26;
+  Inc(C1, D1 and B1 or A1 and not B1 + Buffer[ 6] + $8F1BBCDC); C1 := C1 shl  5 or C1 shr 27;
+  Inc(B1, C1 and A1 or D1 and not A1 + Buffer[ 2] + $8F1BBCDC); B1 := B1 shl 12 or B1 shr 20;
+
+  Inc(A2, B2 and D2 or C2 and not D2 + Buffer[ 5] + $50A28BE6); A2 := A2 shl  8 or A2 shr 24;
+  Inc(D2, A2 and C2 or B2 and not C2 + Buffer[14] + $50A28BE6); D2 := D2 shl  9 or D2 shr 23;
+  Inc(C2, D2 and B2 or A2 and not B2 + Buffer[ 7] + $50A28BE6); C2 := C2 shl  9 or C2 shr 23;
+  Inc(B2, C2 and A2 or D2 and not A2 + Buffer[ 0] + $50A28BE6); B2 := B2 shl 11 or B2 shr 21;
+  Inc(A2, B2 and D2 or C2 and not D2 + Buffer[ 9] + $50A28BE6); A2 := A2 shl 13 or A2 shr 19;
+  Inc(D2, A2 and C2 or B2 and not C2 + Buffer[ 2] + $50A28BE6); D2 := D2 shl 15 or D2 shr 17;
+  Inc(C2, D2 and B2 or A2 and not B2 + Buffer[11] + $50A28BE6); C2 := C2 shl 15 or C2 shr 17;
+  Inc(B2, C2 and A2 or D2 and not A2 + Buffer[ 4] + $50A28BE6); B2 := B2 shl  5 or B2 shr 27;
+  Inc(A2, B2 and D2 or C2 and not D2 + Buffer[13] + $50A28BE6); A2 := A2 shl  7 or A2 shr 25;
+  Inc(D2, A2 and C2 or B2 and not C2 + Buffer[ 6] + $50A28BE6); D2 := D2 shl  7 or D2 shr 25;
+  Inc(C2, D2 and B2 or A2 and not B2 + Buffer[15] + $50A28BE6); C2 := C2 shl  8 or C2 shr 24;
+  Inc(B2, C2 and A2 or D2 and not A2 + Buffer[ 8] + $50A28BE6); B2 := B2 shl 11 or B2 shr 21;
+  Inc(A2, B2 and D2 or C2 and not D2 + Buffer[ 1] + $50A28BE6); A2 := A2 shl 14 or A2 shr 18;
+  Inc(D2, A2 and C2 or B2 and not C2 + Buffer[10] + $50A28BE6); D2 := D2 shl 14 or D2 shr 18;
+  Inc(C2, D2 and B2 or A2 and not B2 + Buffer[ 3] + $50A28BE6); C2 := C2 shl 12 or C2 shr 20;
+  Inc(B2, C2 and A2 or D2 and not A2 + Buffer[12] + $50A28BE6); B2 := B2 shl  6 or B2 shr 26;
+
+  Inc(A2, (B2 or not C2) xor D2 + Buffer[ 6] + $5C4DD124); A2 := A2 shl  9 or A2 shr 23;
+  Inc(D2, (A2 or not B2) xor C2 + Buffer[11] + $5C4DD124); D2 := D2 shl 13 or D2 shr 19;
+  Inc(C2, (D2 or not A2) xor B2 + Buffer[ 3] + $5C4DD124); C2 := C2 shl 15 or C2 shr 17;
+  Inc(B2, (C2 or not D2) xor A2 + Buffer[ 7] + $5C4DD124); B2 := B2 shl  7 or B2 shr 25;
+  Inc(A2, (B2 or not C2) xor D2 + Buffer[ 0] + $5C4DD124); A2 := A2 shl 12 or A2 shr 20;
+  Inc(D2, (A2 or not B2) xor C2 + Buffer[13] + $5C4DD124); D2 := D2 shl  8 or D2 shr 24;
+  Inc(C2, (D2 or not A2) xor B2 + Buffer[ 5] + $5C4DD124); C2 := C2 shl  9 or C2 shr 23;
+  Inc(B2, (C2 or not D2) xor A2 + Buffer[10] + $5C4DD124); B2 := B2 shl 11 or B2 shr 21;
+  Inc(A2, (B2 or not C2) xor D2 + Buffer[14] + $5C4DD124); A2 := A2 shl  7 or A2 shr 25;
+  Inc(D2, (A2 or not B2) xor C2 + Buffer[15] + $5C4DD124); D2 := D2 shl  7 or D2 shr 25;
+  Inc(C2, (D2 or not A2) xor B2 + Buffer[ 8] + $5C4DD124); C2 := C2 shl 12 or C2 shr 20;
+  Inc(B2, (C2 or not D2) xor A2 + Buffer[12] + $5C4DD124); B2 := B2 shl  7 or B2 shr 25;
+  Inc(A2, (B2 or not C2) xor D2 + Buffer[ 4] + $5C4DD124); A2 := A2 shl  6 or A2 shr 26;
+  Inc(D2, (A2 or not B2) xor C2 + Buffer[ 9] + $5C4DD124); D2 := D2 shl 15 or D2 shr 17;
+  Inc(C2, (D2 or not A2) xor B2 + Buffer[ 1] + $5C4DD124); C2 := C2 shl 13 or C2 shr 19;
+  Inc(B2, (C2 or not D2) xor A2 + Buffer[ 2] + $5C4DD124); B2 := B2 shl 11 or B2 shr 21;
+
+  Inc(A2, B2 and C2 or not B2 and D2 + Buffer[15] + $6D703EF3); A2 := A2 shl  9 or A2 shr 23;
+  Inc(D2, A2 and B2 or not A2 and C2 + Buffer[ 5] + $6D703EF3); D2 := D2 shl  7 or D2 shr 25;
+  Inc(C2, D2 and A2 or not D2 and B2 + Buffer[ 1] + $6D703EF3); C2 := C2 shl 15 or C2 shr 17;
+  Inc(B2, C2 and D2 or not C2 and A2 + Buffer[ 3] + $6D703EF3); B2 := B2 shl 11 or B2 shr 21;
+  Inc(A2, B2 and C2 or not B2 and D2 + Buffer[ 7] + $6D703EF3); A2 := A2 shl  8 or A2 shr 24;
+  Inc(D2, A2 and B2 or not A2 and C2 + Buffer[14] + $6D703EF3); D2 := D2 shl  6 or D2 shr 26;
+  Inc(C2, D2 and A2 or not D2 and B2 + Buffer[ 6] + $6D703EF3); C2 := C2 shl  6 or C2 shr 26;
+  Inc(B2, C2 and D2 or not C2 and A2 + Buffer[ 9] + $6D703EF3); B2 := B2 shl 14 or B2 shr 18;
+  Inc(A2, B2 and C2 or not B2 and D2 + Buffer[11] + $6D703EF3); A2 := A2 shl 12 or A2 shr 20;
+  Inc(D2, A2 and B2 or not A2 and C2 + Buffer[ 8] + $6D703EF3); D2 := D2 shl 13 or D2 shr 19;
+  Inc(C2, D2 and A2 or not D2 and B2 + Buffer[12] + $6D703EF3); C2 := C2 shl  5 or C2 shr 27;
+  Inc(B2, C2 and D2 or not C2 and A2 + Buffer[ 2] + $6D703EF3); B2 := B2 shl 14 or B2 shr 18;
+  Inc(A2, B2 and C2 or not B2 and D2 + Buffer[10] + $6D703EF3); A2 := A2 shl 13 or A2 shr 19;
+  Inc(D2, A2 and B2 or not A2 and C2 + Buffer[ 0] + $6D703EF3); D2 := D2 shl 13 or D2 shr 19;
+  Inc(C2, D2 and A2 or not D2 and B2 + Buffer[ 4] + $6D703EF3); C2 := C2 shl  7 or C2 shr 25;
+  Inc(B2, C2 and D2 or not C2 and A2 + Buffer[13] + $6D703EF3); B2 := B2 shl  5 or B2 shr 27;
+
+  Inc(A2, B2 xor C2 xor D2 + Buffer[ 8]); A2 := A2 shl 15 or A2 shr 17;
+  Inc(D2, A2 xor B2 xor C2 + Buffer[ 6]); D2 := D2 shl  5 or D2 shr 27;
+  Inc(C2, D2 xor A2 xor B2 + Buffer[ 4]); C2 := C2 shl  8 or C2 shr 24;
+  Inc(B2, C2 xor D2 xor A2 + Buffer[ 1]); B2 := B2 shl 11 or B2 shr 21;
+  Inc(A2, B2 xor C2 xor D2 + Buffer[ 3]); A2 := A2 shl 14 or A2 shr 18;
+  Inc(D2, A2 xor B2 xor C2 + Buffer[11]); D2 := D2 shl 14 or D2 shr 18;
+  Inc(C2, D2 xor A2 xor B2 + Buffer[15]); C2 := C2 shl  6 or C2 shr 26;
+  Inc(B2, C2 xor D2 xor A2 + Buffer[ 0]); B2 := B2 shl 14 or B2 shr 18;
+  Inc(A2, B2 xor C2 xor D2 + Buffer[ 5]); A2 := A2 shl  6 or A2 shr 26;
+  Inc(D2, A2 xor B2 xor C2 + Buffer[12]); D2 := D2 shl  9 or D2 shr 23;
+  Inc(C2, D2 xor A2 xor B2 + Buffer[ 2]); C2 := C2 shl 12 or C2 shr 20;
+  Inc(B2, C2 xor D2 xor A2 + Buffer[13]); B2 := B2 shl  9 or B2 shr 23;
+  Inc(A2, B2 xor C2 xor D2 + Buffer[ 9]); A2 := A2 shl 12 or A2 shr 20;
+  Inc(D2, A2 xor B2 xor C2 + Buffer[ 7]); D2 := D2 shl  5 or D2 shr 27;
+  Inc(C2, D2 xor A2 xor B2 + Buffer[10]); C2 := C2 shl 15 or C2 shr 17;
+  Inc(B2, C2 xor D2 xor A2 + Buffer[14]); B2 := B2 shl  8 or B2 shr 24;
+
+  Inc(D2, C1 + FDigest[1]);
+  FDigest[1] := FDigest[2] + D1 + A2;
+  FDigest[2] := FDigest[3] + A1 + B2;
+  FDigest[3] := FDIgest[0] + B1 + C2;
+  FDigest[0] := D2;
+end;
+
+class function TROHash_RipeMD160.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    019h,054h,0DEh,0BCh,01Bh,055h,035h,030h
+         DB    008h,01Dh,09Bh,080h,070h,0A0h,0F2h,04Ah
+         DB    09Dh,0F7h,034h,004h
+end;
+
+procedure TROHash_RipeMD160.Transform(Buffer: PIntArray);
+var
+  A1, B1, C1, D1, E1: LongWord;
+  A, B, C, D, E: LongWord;
+begin
+  A := FDigest[0];
+  B := FDigest[1];
+  C := FDigest[2];
+  D := FDigest[3];
+  E := FDigest[4];
+
+  Inc(A, Buffer[ 0] + (B xor C xor D)); A := A shl 11 or A shr 21 + E; C := C shl 10 or C shr 22;
+  Inc(E, Buffer[ 1] + (A xor B xor C)); E := E shl 14 or E shr 18 + D; B := B shl 10 or B shr 22;
+  Inc(D, Buffer[ 2] + (E xor A xor B)); D := D shl 15 or D shr 17 + C; A := A shl 10 or A shr 22;
+  Inc(C, Buffer[ 3] + (D xor E xor A)); C := C shl 12 or C shr 20 + B; E := E shl 10 or E shr 22;
+  Inc(B, Buffer[ 4] + (C xor D xor E)); B := B shl  5 or B shr 27 + A; D := D shl 10 or D shr 22;
+  Inc(A, Buffer[ 5] + (B xor C xor D)); A := A shl  8 or A shr 24 + E; C := C shl 10 or C shr 22;
+  Inc(E, Buffer[ 6] + (A xor B xor C)); E := E shl  7 or E shr 25 + D; B := B shl 10 or B shr 22;
+  Inc(D, Buffer[ 7] + (E xor A xor B)); D := D shl  9 or D shr 23 + C; A := A shl 10 or A shr 22;
+  Inc(C, Buffer[ 8] + (D xor E xor A)); C := C shl 11 or C shr 21 + B; E := E shl 10 or E shr 22;
+  Inc(B, Buffer[ 9] + (C xor D xor E)); B := B shl 13 or B shr 19 + A; D := D shl 10 or D shr 22;
+  Inc(A, Buffer[10] + (B xor C xor D)); A := A shl 14 or A shr 18 + E; C := C shl 10 or C shr 22;
+  Inc(E, Buffer[11] + (A xor B xor C)); E := E shl 15 or E shr 17 + D; B := B shl 10 or B shr 22;
+  Inc(D, Buffer[12] + (E xor A xor B)); D := D shl  6 or D shr 26 + C; A := A shl 10 or A shr 22;
+  Inc(C, Buffer[13] + (D xor E xor A)); C := C shl  7 or C shr 25 + B; E := E shl 10 or E shr 22;
+  Inc(B, Buffer[14] + (C xor D xor E)); B := B shl  9 or B shr 23 + A; D := D shl 10 or D shr 22;
+  Inc(A, Buffer[15] + (B xor C xor D)); A := A shl  8 or A shr 24 + E; C := C shl 10 or C shr 22;
+
+  Inc(E, Buffer[ 7] + $5A827999 + ((A and B) or (not A and C))); E := E shl  7 or E shr 25 + D; B := B shl 10 or B shr 22;
+  Inc(D, Buffer[ 4] + $5A827999 + ((E and A) or (not E and B))); D := D shl  6 or D shr 26 + C; A := A shl 10 or A shr 22;
+  Inc(C, Buffer[13] + $5A827999 + ((D and E) or (not D and A))); C := C shl  8 or C shr 24 + B; E := E shl 10 or E shr 22;
+  Inc(B, Buffer[ 1] + $5A827999 + ((C and D) or (not C and E))); B := B shl 13 or B shr 19 + A; D := D shl 10 or D shr 22;
+  Inc(A, Buffer[10] + $5A827999 + ((B and C) or (not B and D))); A := A shl 11 or A shr 21 + E; C := C shl 10 or C shr 22;
+  Inc(E, Buffer[ 6] + $5A827999 + ((A and B) or (not A and C))); E := E shl  9 or E shr 23 + D; B := B shl 10 or B shr 22;
+  Inc(D, Buffer[15] + $5A827999 + ((E and A) or (not E and B))); D := D shl  7 or D shr 25 + C; A := A shl 10 or A shr 22;
+  Inc(C, Buffer[ 3] + $5A827999 + ((D and E) or (not D and A))); C := C shl 15 or C shr 17 + B; E := E shl 10 or E shr 22;
+  Inc(B, Buffer[12] + $5A827999 + ((C and D) or (not C and E))); B := B shl  7 or B shr 25 + A; D := D shl 10 or D shr 22;
+  Inc(A, Buffer[ 0] + $5A827999 + ((B and C) or (not B and D))); A := A shl 12 or A shr 20 + E; C := C shl 10 or C shr 22;
+  Inc(E, Buffer[ 9] + $5A827999 + ((A and B) or (not A and C))); E := E shl 15 or E shr 17 + D; B := B shl 10 or B shr 22;
+  Inc(D, Buffer[ 5] + $5A827999 + ((E and A) or (not E and B))); D := D shl  9 or D shr 23 + C; A := A shl 10 or A shr 22;
+  Inc(C, Buffer[ 2] + $5A827999 + ((D and E) or (not D and A))); C := C shl 11 or C shr 21 + B; E := E shl 10 or E shr 22;
+  Inc(B, Buffer[14] + $5A827999 + ((C and D) or (not C and E))); B := B shl  7 or B shr 25 + A; D := D shl 10 or D shr 22;
+  Inc(A, Buffer[11] + $5A827999 + ((B and C) or (not B and D))); A := A shl 13 or A shr 19 + E; C := C shl 10 or C shr 22;
+  Inc(E, Buffer[ 8] + $5A827999 + ((A and B) or (not A and C))); E := E shl 12 or E shr 20 + D; B := B shl 10 or B shr 22;
+
+  Inc(D, Buffer[ 3] + $6ED9EBA1 + ((E or not A) xor B)); D := D shl 11 or D shr 21 + C; A := A shl 10 or A shr 22;
+  Inc(C, Buffer[10] + $6ED9EBA1 + ((D or not E) xor A)); C := C shl 13 or C shr 19 + B; E := E shl 10 or E shr 22;
+  Inc(B, Buffer[14] + $6ED9EBA1 + ((C or not D) xor E)); B := B shl  6 or B shr 26 + A; D := D shl 10 or D shr 22;
+  Inc(A, Buffer[ 4] + $6ED9EBA1 + ((B or not C) xor D)); A := A shl  7 or A shr 25 + E; C := C shl 10 or C shr 22;
+  Inc(E, Buffer[ 9] + $6ED9EBA1 + ((A or not B) xor C)); E := E shl 14 or E shr 18 + D; B := B shl 10 or B shr 22;
+  Inc(D, Buffer[15] + $6ED9EBA1 + ((E or not A) xor B)); D := D shl  9 or D shr 23 + C; A := A shl 10 or A shr 22;
+  Inc(C, Buffer[ 8] + $6ED9EBA1 + ((D or not E) xor A)); C := C shl 13 or C shr 19 + B; E := E shl 10 or E shr 22;
+  Inc(B, Buffer[ 1] + $6ED9EBA1 + ((C or not D) xor E)); B := B shl 15 or B shr 17 + A; D := D shl 10 or D shr 22;
+  Inc(A, Buffer[ 2] + $6ED9EBA1 + ((B or not C) xor D)); A := A shl 14 or A shr 18 + E; C := C shl 10 or C shr 22;
+  Inc(E, Buffer[ 7] + $6ED9EBA1 + ((A or not B) xor C)); E := E shl  8 or E shr 24 + D; B := B shl 10 or B shr 22;
+  Inc(D, Buffer[ 0] + $6ED9EBA1 + ((E or not A) xor B)); D := D shl 13 or D shr 19 + C; A := A shl 10 or A shr 22;
+  Inc(C, Buffer[ 6] + $6ED9EBA1 + ((D or not E) xor A)); C := C shl  6 or C shr 26 + B; E := E shl 10 or E shr 22;
+  Inc(B, Buffer[13] + $6ED9EBA1 + ((C or not D) xor E)); B := B shl  5 or B shr 27 + A; D := D shl 10 or D shr 22;
+  Inc(A, Buffer[11] + $6ED9EBA1 + ((B or not C) xor D)); A := A shl 12 or A shr 20 + E; C := C shl 10 or C shr 22;
+  Inc(E, Buffer[ 5] + $6ED9EBA1 + ((A or not B) xor C)); E := E shl  7 or E shr 25 + D; B := B shl 10 or B shr 22;
+  Inc(D, Buffer[12] + $6ED9EBA1 + ((E or not A) xor B)); D := D shl  5 or D shr 27 + C; A := A shl 10 or A shr 22;
+
+  Inc(C, Buffer[ 1] + $8F1BBCDC + ((D and A) or (E and not A))); C := C shl 11 or C shr 21 + B; E := E shl 10 or E shr 22;
+  Inc(B, Buffer[ 9] + $8F1BBCDC + ((C and E) or (D and not E))); B := B shl 12 or B shr 20 + A; D := D shl 10 or D shr 22;
+  Inc(A, Buffer[11] + $8F1BBCDC + ((B and D) or (C and not D))); A := A shl 14 or A shr 18 + E; C := C shl 10 or C shr 22;
+  Inc(E, Buffer[10] + $8F1BBCDC + ((A and C) or (B and not C))); E := E shl 15 or E shr 17 + D; B := B shl 10 or B shr 22;
+  Inc(D, Buffer[ 0] + $8F1BBCDC + ((E and B) or (A and not B))); D := D shl 14 or D shr 18 + C; A := A shl 10 or A shr 22;
+  Inc(C, Buffer[ 8] + $8F1BBCDC + ((D and A) or (E and not A))); C := C shl 15 or C shr 17 + B; E := E shl 10 or E shr 22;
+  Inc(B, Buffer[12] + $8F1BBCDC + ((C and E) or (D and not E))); B := B shl  9 or B shr 23 + A; D := D shl 10 or D shr 22;
+  Inc(A, Buffer[ 4] + $8F1BBCDC + ((B and D) or (C and not D))); A := A shl  8 or A shr 24 + E; C := C shl 10 or C shr 22;
+  Inc(E, Buffer[13] + $8F1BBCDC + ((A and C) or (B and not C))); E := E shl  9 or E shr 23 + D; B := B shl 10 or B shr 22;
+  Inc(D, Buffer[ 3] + $8F1BBCDC + ((E and B) or (A and not B))); D := D shl 14 or D shr 18 + C; A := A shl 10 or A shr 22;
+  Inc(C, Buffer[ 7] + $8F1BBCDC + ((D and A) or (E and not A))); C := C shl  5 or C shr 27 + B; E := E shl 10 or E shr 22;
+  Inc(B, Buffer[15] + $8F1BBCDC + ((C and E) or (D and not E))); B := B shl  6 or B shr 26 + A; D := D shl 10 or D shr 22;
+  Inc(A, Buffer[14] + $8F1BBCDC + ((B and D) or (C and not D))); A := A shl  8 or A shr 24 + E; C := C shl 10 or C shr 22;
+  Inc(E, Buffer[ 5] + $8F1BBCDC + ((A and C) or (B and not C))); E := E shl  6 or E shr 26 + D; B := B shl 10 or B shr 22;
+  Inc(D, Buffer[ 6] + $8F1BBCDC + ((E and B) or (A and not B))); D := D shl  5 or D shr 27 + C; A := A shl 10 or A shr 22;
+  Inc(C, Buffer[ 2] + $8F1BBCDC + ((D and A) or (E and not A))); C := C shl 12 or C shr 20 + B; E := E shl 10 or E shr 22;
+
+  Inc(B, Buffer[ 4] + $A953FD4E + (C xor (D or not E))); B := B shl  9 or B shr 23 + A; D := D shl 10 or D shr 22;
+  Inc(A, Buffer[ 0] + $A953FD4E + (B xor (C or not D))); A := A shl 15 or A shr 17 + E; C := C shl 10 or C shr 22;
+  Inc(E, Buffer[ 5] + $A953FD4E + (A xor (B or not C))); E := E shl  5 or E shr 27 + D; B := B shl 10 or B shr 22;
+  Inc(D, Buffer[ 9] + $A953FD4E + (E xor (A or not B))); D := D shl 11 or D shr 21 + C; A := A shl 10 or A shr 22;
+  Inc(C, Buffer[ 7] + $A953FD4E + (D xor (E or not A))); C := C shl  6 or C shr 26 + B; E := E shl 10 or E shr 22;
+  Inc(B, Buffer[12] + $A953FD4E + (C xor (D or not E))); B := B shl  8 or B shr 24 + A; D := D shl 10 or D shr 22;
+  Inc(A, Buffer[ 2] + $A953FD4E + (B xor (C or not D))); A := A shl 13 or A shr 19 + E; C := C shl 10 or C shr 22;
+  Inc(E, Buffer[10] + $A953FD4E + (A xor (B or not C))); E := E shl 12 or E shr 20 + D; B := B shl 10 or B shr 22;
+  Inc(D, Buffer[14] + $A953FD4E + (E xor (A or not B))); D := D shl  5 or D shr 27 + C; A := A shl 10 or A shr 22;
+  Inc(C, Buffer[ 1] + $A953FD4E + (D xor (E or not A))); C := C shl 12 or C shr 20 + B; E := E shl 10 or E shr 22;
+  Inc(B, Buffer[ 3] + $A953FD4E + (C xor (D or not E))); B := B shl 13 or B shr 19 + A; D := D shl 10 or D shr 22;
+  Inc(A, Buffer[ 8] + $A953FD4E + (B xor (C or not D))); A := A shl 14 or A shr 18 + E; C := C shl 10 or C shr 22;
+  Inc(E, Buffer[11] + $A953FD4E + (A xor (B or not C))); E := E shl 11 or E shr 21 + D; B := B shl 10 or B shr 22;
+  Inc(D, Buffer[ 6] + $A953FD4E + (E xor (A or not B))); D := D shl  8 or D shr 24 + C; A := A shl 10 or A shr 22;
+  Inc(C, Buffer[15] + $A953FD4E + (D xor (E or not A))); C := C shl  5 or C shr 27 + B; E := E shl 10 or E shr 22;
+  Inc(B, Buffer[13] + $A953FD4E + (C xor (D or not E))); B := B shl  6 or B shr 26 + A; D := D shl 10 or D shr 22;
+
+  A1 := A;
+  B1 := B;
+  C1 := C;
+  D1 := D;
+  E1 := E;
+
+  A := FDigest[0];
+  B := FDigest[1];
+  C := FDigest[2];
+  D := FDigest[3];
+  E := FDigest[4];
+
+  Inc(A, Buffer[ 5] + $50A28BE6 + (B xor (C or not D))); A := A shl  8 or A shr 24 + E; C := C shl 10 or C shr 22;
+  Inc(E, Buffer[14] + $50A28BE6 + (A xor (B or not C))); E := E shl  9 or E shr 23 + D; B := B shl 10 or B shr 22;
+  Inc(D, Buffer[ 7] + $50A28BE6 + (E xor (A or not B))); D := D shl  9 or D shr 23 + C; A := A shl 10 or A shr 22;
+  Inc(C, Buffer[ 0] + $50A28BE6 + (D xor (E or not A))); C := C shl 11 or C shr 21 + B; E := E shl 10 or E shr 22;
+  Inc(B, Buffer[ 9] + $50A28BE6 + (C xor (D or not E))); B := B shl 13 or B shr 19 + A; D := D shl 10 or D shr 22;
+  Inc(A, Buffer[ 2] + $50A28BE6 + (B xor (C or not D))); A := A shl 15 or A shr 17 + E; C := C shl 10 or C shr 22;
+  Inc(E, Buffer[11] + $50A28BE6 + (A xor (B or not C))); E := E shl 15 or E shr 17 + D; B := B shl 10 or B shr 22;
+  Inc(D, Buffer[ 4] + $50A28BE6 + (E xor (A or not B))); D := D shl  5 or D shr 27 + C; A := A shl 10 or A shr 22;
+  Inc(C, Buffer[13] + $50A28BE6 + (D xor (E or not A))); C := C shl  7 or C shr 25 + B; E := E shl 10 or E shr 22;
+  Inc(B, Buffer[ 6] + $50A28BE6 + (C xor (D or not E))); B := B shl  7 or B shr 25 + A; D := D shl 10 or D shr 22;
+  Inc(A, Buffer[15] + $50A28BE6 + (B xor (C or not D))); A := A shl  8 or A shr 24 + E; C := C shl 10 or C shr 22;
+  Inc(E, Buffer[ 8] + $50A28BE6 + (A xor (B or not C))); E := E shl 11 or E shr 21 + D; B := B shl 10 or B shr 22;
+  Inc(D, Buffer[ 1] + $50A28BE6 + (E xor (A or not B))); D := D shl 14 or D shr 18 + C; A := A shl 10 or A shr 22;
+  Inc(C, Buffer[10] + $50A28BE6 + (D xor (E or not A))); C := C shl 14 or C shr 18 + B; E := E shl 10 or E shr 22;
+  Inc(B, Buffer[ 3] + $50A28BE6 + (C xor (D or not E))); B := B shl 12 or B shr 20 + A; D := D shl 10 or D shr 22;
+  Inc(A, Buffer[12] + $50A28BE6 + (B xor (C or not D))); A := A shl  6 or A shr 26 + E; C := C shl 10 or C shr 22;
+
+  Inc(E, Buffer[ 6] + $5C4DD124 + ((A and C) or (B and not C))); E := E shl  9 or E shr 23 + D; B := B shl 10 or B shr 22;
+  Inc(D, Buffer[11] + $5C4DD124 + ((E and B) or (A and not B))); D := D shl 13 or D shr 19 + C; A := A shl 10 or A shr 22;
+  Inc(C, Buffer[ 3] + $5C4DD124 + ((D and A) or (E and not A))); C := C shl 15 or C shr 17 + B; E := E shl 10 or E shr 22;
+  Inc(B, Buffer[ 7] + $5C4DD124 + ((C and E) or (D and not E))); B := B shl  7 or B shr 25 + A; D := D shl 10 or D shr 22;
+  Inc(A, Buffer[ 0] + $5C4DD124 + ((B and D) or (C and not D))); A := A shl 12 or A shr 20 + E; C := C shl 10 or C shr 22;
+  Inc(E, Buffer[13] + $5C4DD124 + ((A and C) or (B and not C))); E := E shl  8 or E shr 24 + D; B := B shl 10 or B shr 22;
+  Inc(D, Buffer[ 5] + $5C4DD124 + ((E and B) or (A and not B))); D := D shl  9 or D shr 23 + C; A := A shl 10 or A shr 22;
+  Inc(C, Buffer[10] + $5C4DD124 + ((D and A) or (E and not A))); C := C shl 11 or C shr 21 + B; E := E shl 10 or E shr 22;
+  Inc(B, Buffer[14] + $5C4DD124 + ((C and E) or (D and not E))); B := B shl  7 or B shr 25 + A; D := D shl 10 or D shr 22;
+  Inc(A, Buffer[15] + $5C4DD124 + ((B and D) or (C and not D))); A := A shl  7 or A shr 25 + E; C := C shl 10 or C shr 22;
+  Inc(E, Buffer[ 8] + $5C4DD124 + ((A and C) or (B and not C))); E := E shl 12 or E shr 20 + D; B := B shl 10 or B shr 22;
+  Inc(D, Buffer[12] + $5C4DD124 + ((E and B) or (A and not B))); D := D shl  7 or D shr 25 + C; A := A shl 10 or A shr 22;
+  Inc(C, Buffer[ 4] + $5C4DD124 + ((D and A) or (E and not A))); C := C shl  6 or C shr 26 + B; E := E shl 10 or E shr 22;
+  Inc(B, Buffer[ 9] + $5C4DD124 + ((C and E) or (D and not E))); B := B shl 15 or B shr 17 + A; D := D shl 10 or D shr 22;
+  Inc(A, Buffer[ 1] + $5C4DD124 + ((B and D) or (C and not D))); A := A shl 13 or A shr 19 + E; C := C shl 10 or C shr 22;
+  Inc(E, Buffer[ 2] + $5C4DD124 + ((A and C) or (B and not C))); E := E shl 11 or E shr 21 + D; B := B shl 10 or B shr 22;
+
+  Inc(D, Buffer[15] + $6D703EF3 + ((E or not A) xor B)); D := D shl  9 or D shr 23 + C; A := A shl 10 or A shr 22;
+  Inc(C, Buffer[ 5] + $6D703EF3 + ((D or not E) xor A)); C := C shl  7 or C shr 25 + B; E := E shl 10 or E shr 22;
+  Inc(B, Buffer[ 1] + $6D703EF3 + ((C or not D) xor E)); B := B shl 15 or B shr 17 + A; D := D shl 10 or D shr 22;
+  Inc(A, Buffer[ 3] + $6D703EF3 + ((B or not C) xor D)); A := A shl 11 or A shr 21 + E; C := C shl 10 or C shr 22;
+  Inc(E, Buffer[ 7] + $6D703EF3 + ((A or not B) xor C)); E := E shl  8 or E shr 24 + D; B := B shl 10 or B shr 22;
+  Inc(D, Buffer[14] + $6D703EF3 + ((E or not A) xor B)); D := D shl  6 or D shr 26 + C; A := A shl 10 or A shr 22;
+  Inc(C, Buffer[ 6] + $6D703EF3 + ((D or not E) xor A)); C := C shl  6 or C shr 26 + B; E := E shl 10 or E shr 22;
+  Inc(B, Buffer[ 9] + $6D703EF3 + ((C or not D) xor E)); B := B shl 14 or B shr 18 + A; D := D shl 10 or D shr 22;
+  Inc(A, Buffer[11] + $6D703EF3 + ((B or not C) xor D)); A := A shl 12 or A shr 20 + E; C := C shl 10 or C shr 22;
+  Inc(E, Buffer[ 8] + $6D703EF3 + ((A or not B) xor C)); E := E shl 13 or E shr 19 + D; B := B shl 10 or B shr 22;
+  Inc(D, Buffer[12] + $6D703EF3 + ((E or not A) xor B)); D := D shl  5 or D shr 27 + C; A := A shl 10 or A shr 22;
+  Inc(C, Buffer[ 2] + $6D703EF3 + ((D or not E) xor A)); C := C shl 14 or C shr 18 + B; E := E shl 10 or E shr 22;
+  Inc(B, Buffer[10] + $6D703EF3 + ((C or not D) xor E)); B := B shl 13 or B shr 19 + A; D := D shl 10 or D shr 22;
+  Inc(A, Buffer[ 0] + $6D703EF3 + ((B or not C) xor D)); A := A shl 13 or A shr 19 + E; C := C shl 10 or C shr 22;
+  Inc(E, Buffer[ 4] + $6D703EF3 + ((A or not B) xor C)); E := E shl  7 or E shr 25 + D; B := B shl 10 or B shr 22;
+  Inc(D, Buffer[13] + $6D703EF3 + ((E or not A) xor B)); D := D shl  5 or D shr 27 + C; A := A shl 10 or A shr 22;
+
+  Inc(C, Buffer[ 8] + $7A6D76E9 + ((D and E) or (not D and A))); C := C shl 15 or C shr 17 + B; E := E shl 10 or E shr 22;
+  Inc(B, Buffer[ 6] + $7A6D76E9 + ((C and D) or (not C and E))); B := B shl  5 or B shr 27 + A; D := D shl 10 or D shr 22;
+  Inc(A, Buffer[ 4] + $7A6D76E9 + ((B and C) or (not B and D))); A := A shl  8 or A shr 24 + E; C := C shl 10 or C shr 22;
+  Inc(E, Buffer[ 1] + $7A6D76E9 + ((A and B) or (not A and C))); E := E shl 11 or E shr 21 + D; B := B shl 10 or B shr 22;
+  Inc(D, Buffer[ 3] + $7A6D76E9 + ((E and A) or (not E and B))); D := D shl 14 or D shr 18 + C; A := A shl 10 or A shr 22;
+  Inc(C, Buffer[11] + $7A6D76E9 + ((D and E) or (not D and A))); C := C shl 14 or C shr 18 + B; E := E shl 10 or E shr 22;
+  Inc(B, Buffer[15] + $7A6D76E9 + ((C and D) or (not C and E))); B := B shl  6 or B shr 26 + A; D := D shl 10 or D shr 22;
+  Inc(A, Buffer[ 0] + $7A6D76E9 + ((B and C) or (not B and D))); A := A shl 14 or A shr 18 + E; C := C shl 10 or C shr 22;
+  Inc(E, Buffer[ 5] + $7A6D76E9 + ((A and B) or (not A and C))); E := E shl  6 or E shr 26 + D; B := B shl 10 or B shr 22;
+  Inc(D, Buffer[12] + $7A6D76E9 + ((E and A) or (not E and B))); D := D shl  9 or D shr 23 + C; A := A shl 10 or A shr 22;
+  Inc(C, Buffer[ 2] + $7A6D76E9 + ((D and E) or (not D and A))); C := C shl 12 or C shr 20 + B; E := E shl 10 or E shr 22;
+  Inc(B, Buffer[13] + $7A6D76E9 + ((C and D) or (not C and E))); B := B shl  9 or B shr 23 + A; D := D shl 10 or D shr 22;
+  Inc(A, Buffer[ 9] + $7A6D76E9 + ((B and C) or (not B and D))); A := A shl 12 or A shr 20 + E; C := C shl 10 or C shr 22;
+  Inc(E, Buffer[ 7] + $7A6D76E9 + ((A and B) or (not A and C))); E := E shl  5 or E shr 27 + D; B := B shl 10 or B shr 22;
+  Inc(D, Buffer[10] + $7A6D76E9 + ((E and A) or (not E and B))); D := D shl 15 or D shr 17 + C; A := A shl 10 or A shr 22;
+  Inc(C, Buffer[14] + $7A6D76E9 + ((D and E) or (not D and A))); C := C shl  8 or C shr 24 + B; E := E shl 10 or E shr 22;
+
+  Inc(B, Buffer[12] + (C xor D xor E)); B := B shl  8 or B shr 24 + A; D := D shl 10 or D shr 22;
+  Inc(A, Buffer[15] + (B xor C xor D)); A := A shl  5 or A shr 27 + E; C := C shl 10 or C shr 22;
+  Inc(E, Buffer[10] + (A xor B xor C)); E := E shl 12 or E shr 20 + D; B := B shl 10 or B shr 22;
+  Inc(D, Buffer[ 4] + (E xor A xor B)); D := D shl  9 or D shr 23 + C; A := A shl 10 or A shr 22;
+  Inc(C, Buffer[ 1] + (D xor E xor A)); C := C shl 12 or C shr 20 + B; E := E shl 10 or E shr 22;
+  Inc(B, Buffer[ 5] + (C xor D xor E)); B := B shl  5 or B shr 27 + A; D := D shl 10 or D shr 22;
+  Inc(A, Buffer[ 8] + (B xor C xor D)); A := A shl 14 or A shr 18 + E; C := C shl 10 or C shr 22;
+  Inc(E, Buffer[ 7] + (A xor B xor C)); E := E shl  6 or E shr 26 + D; B := B shl 10 or B shr 22;
+  Inc(D, Buffer[ 6] + (E xor A xor B)); D := D shl  8 or D shr 24 + C; A := A shl 10 or A shr 22;
+  Inc(C, Buffer[ 2] + (D xor E xor A)); C := C shl 13 or C shr 19 + B; E := E shl 10 or E shr 22;
+  Inc(B, Buffer[13] + (C xor D xor E)); B := B shl  6 or B shr 26 + A; D := D shl 10 or D shr 22;
+  Inc(A, Buffer[14] + (B xor C xor D)); A := A shl  5 or A shr 27 + E; C := C shl 10 or C shr 22;
+  Inc(E, Buffer[ 0] + (A xor B xor C)); E := E shl 15 or E shr 17 + D; B := B shl 10 or B shr 22;
+  Inc(D, Buffer[ 3] + (E xor A xor B)); D := D shl 13 or D shr 19 + C; A := A shl 10 or A shr 22;
+  Inc(C, Buffer[ 9] + (D xor E xor A)); C := C shl 11 or C shr 21 + B; E := E shl 10 or E shr 22;
+  Inc(B, Buffer[11] + (C xor D xor E)); B := B shl 11 or B shr 21 + A; D := D shl 10 or D shr 22;
+
+  Inc(D, C1 + FDigest[1]);
+  FDigest[1] := FDigest[2] + D1 + E;
+  FDigest[2] := FDigest[3] + E1 + A;
+  FDigest[3] := FDigest[4] + A1 + B;
+  FDigest[4] := FDigest[0] + B1 + C;
+  FDigest[0] := D;
+end;
+
+class function TROHash_RipeMD160.DigestKeySize: Integer;
+begin
+  Result := 20;
+end;
+
+class function TROHash_RipeMD256.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    0C3h,0B1h,0D7h,0ACh,0A8h,09Ah,047h,07Ah
+         DB    038h,0D3h,06Dh,039h,0EFh,000h,0FBh,045h
+         DB    0FCh,04Eh,0C3h,01Ah,071h,021h,0DBh,09Eh
+         DB    01Ch,076h,0C5h,0DEh,099h,088h,018h,0C2h
+end;
+
+procedure TROHash_RipeMD256.Transform(Buffer: PIntArray);
+var
+  A1, B1, C1, D1: LongWord;
+  A2, B2, C2, D2: LongWord;
+  T: LongWord;
+begin
+  A1 := FDigest[0];
+  B1 := FDigest[1];
+  C1 := FDigest[2];
+  D1 := FDigest[3];
+  A2 := FDigest[4];
+  B2 := FDigest[5];
+  C2 := FDigest[6];
+  D2 := FDigest[7];
+
+  Inc(A1, B1 xor C1 xor D1 + Buffer[ 0]); A1 := A1 shl 11 or A1 shr 21;
+  Inc(D1, A1 xor B1 xor C1 + Buffer[ 1]); D1 := D1 shl 14 or D1 shr 18;
+  Inc(C1, D1 xor A1 xor B1 + Buffer[ 2]); C1 := C1 shl 15 or C1 shr 17;
+  Inc(B1, C1 xor D1 xor A1 + Buffer[ 3]); B1 := B1 shl 12 or B1 shr 20;
+  Inc(A1, B1 xor C1 xor D1 + Buffer[ 4]); A1 := A1 shl  5 or A1 shr 27;
+  Inc(D1, A1 xor B1 xor C1 + Buffer[ 5]); D1 := D1 shl  8 or D1 shr 24;
+  Inc(C1, D1 xor A1 xor B1 + Buffer[ 6]); C1 := C1 shl  7 or C1 shr 25;
+  Inc(B1, C1 xor D1 xor A1 + Buffer[ 7]); B1 := B1 shl  9 or B1 shr 23;
+  Inc(A1, B1 xor C1 xor D1 + Buffer[ 8]); A1 := A1 shl 11 or A1 shr 21;
+  Inc(D1, A1 xor B1 xor C1 + Buffer[ 9]); D1 := D1 shl 13 or D1 shr 19;
+  Inc(C1, D1 xor A1 xor B1 + Buffer[10]); C1 := C1 shl 14 or C1 shr 18;
+  Inc(B1, C1 xor D1 xor A1 + Buffer[11]); B1 := B1 shl 15 or B1 shr 17;
+  Inc(A1, B1 xor C1 xor D1 + Buffer[12]); A1 := A1 shl  6 or A1 shr 26;
+  Inc(D1, A1 xor B1 xor C1 + Buffer[13]); D1 := D1 shl  7 or D1 shr 25;
+  Inc(C1, D1 xor A1 xor B1 + Buffer[14]); C1 := C1 shl  9 or C1 shr 23;
+  Inc(B1, C1 xor D1 xor A1 + Buffer[15]); B1 := B1 shl  8 or B1 shr 24;
+
+  Inc(A2, B2 and D2 or C2 and not D2 + Buffer[ 5] + $50A28BE6); A2 := A2 shl  8 or A2 shr 24;
+  Inc(D2, A2 and C2 or B2 and not C2 + Buffer[14] + $50A28BE6); D2 := D2 shl  9 or D2 shr 23;
+  Inc(C2, D2 and B2 or A2 and not B2 + Buffer[ 7] + $50A28BE6); C2 := C2 shl  9 or C2 shr 23;
+  Inc(B2, C2 and A2 or D2 and not A2 + Buffer[ 0] + $50A28BE6); B2 := B2 shl 11 or B2 shr 21;
+  Inc(A2, B2 and D2 or C2 and not D2 + Buffer[ 9] + $50A28BE6); A2 := A2 shl 13 or A2 shr 19;
+  Inc(D2, A2 and C2 or B2 and not C2 + Buffer[ 2] + $50A28BE6); D2 := D2 shl 15 or D2 shr 17;
+  Inc(C2, D2 and B2 or A2 and not B2 + Buffer[11] + $50A28BE6); C2 := C2 shl 15 or C2 shr 17;
+  Inc(B2, C2 and A2 or D2 and not A2 + Buffer[ 4] + $50A28BE6); B2 := B2 shl  5 or B2 shr 27;
+  Inc(A2, B2 and D2 or C2 and not D2 + Buffer[13] + $50A28BE6); A2 := A2 shl  7 or A2 shr 25;
+  Inc(D2, A2 and C2 or B2 and not C2 + Buffer[ 6] + $50A28BE6); D2 := D2 shl  7 or D2 shr 25;
+  Inc(C2, D2 and B2 or A2 and not B2 + Buffer[15] + $50A28BE6); C2 := C2 shl  8 or C2 shr 24;
+  Inc(B2, C2 and A2 or D2 and not A2 + Buffer[ 8] + $50A28BE6); B2 := B2 shl 11 or B2 shr 21;
+  Inc(A2, B2 and D2 or C2 and not D2 + Buffer[ 1] + $50A28BE6); A2 := A2 shl 14 or A2 shr 18;
+  Inc(D2, A2 and C2 or B2 and not C2 + Buffer[10] + $50A28BE6); D2 := D2 shl 14 or D2 shr 18;
+  Inc(C2, D2 and B2 or A2 and not B2 + Buffer[ 3] + $50A28BE6); C2 := C2 shl 12 or C2 shr 20;
+  Inc(B2, C2 and A2 or D2 and not A2 + Buffer[12] + $50A28BE6); B2 := B2 shl  6 or B2 shr 26;
+
+  T := A1; A1 := A2; A2 := T;
+
+  Inc(A1, B1 and C1 or not B1 and D1 + Buffer[ 7] + $5A827999); A1 := A1 shl  7 or A1 shr 25;
+  Inc(D1, A1 and B1 or not A1 and C1 + Buffer[ 4] + $5A827999); D1 := D1 shl  6 or D1 shr 26;
+  Inc(C1, D1 and A1 or not D1 and B1 + Buffer[13] + $5A827999); C1 := C1 shl  8 or C1 shr 24;
+  Inc(B1, C1 and D1 or not C1 and A1 + Buffer[ 1] + $5A827999); B1 := B1 shl 13 or B1 shr 19;
+  Inc(A1, B1 and C1 or not B1 and D1 + Buffer[10] + $5A827999); A1 := A1 shl 11 or A1 shr 21;
+  Inc(D1, A1 and B1 or not A1 and C1 + Buffer[ 6] + $5A827999); D1 := D1 shl  9 or D1 shr 23;
+  Inc(C1, D1 and A1 or not D1 and B1 + Buffer[15] + $5A827999); C1 := C1 shl  7 or C1 shr 25;
+  Inc(B1, C1 and D1 or not C1 and A1 + Buffer[ 3] + $5A827999); B1 := B1 shl 15 or B1 shr 17;
+  Inc(A1, B1 and C1 or not B1 and D1 + Buffer[12] + $5A827999); A1 := A1 shl  7 or A1 shr 25;
+  Inc(D1, A1 and B1 or not A1 and C1 + Buffer[ 0] + $5A827999); D1 := D1 shl 12 or D1 shr 20;
+  Inc(C1, D1 and A1 or not D1 and B1 + Buffer[ 9] + $5A827999); C1 := C1 shl 15 or C1 shr 17;
+  Inc(B1, C1 and D1 or not C1 and A1 + Buffer[ 5] + $5A827999); B1 := B1 shl  9 or B1 shr 23;
+  Inc(A1, B1 and C1 or not B1 and D1 + Buffer[ 2] + $5A827999); A1 := A1 shl 11 or A1 shr 21;
+  Inc(D1, A1 and B1 or not A1 and C1 + Buffer[14] + $5A827999); D1 := D1 shl  7 or D1 shr 25;
+  Inc(C1, D1 and A1 or not D1 and B1 + Buffer[11] + $5A827999); C1 := C1 shl 13 or C1 shr 19;
+  Inc(B1, C1 and D1 or not C1 and A1 + Buffer[ 8] + $5A827999); B1 := B1 shl 12 or B1 shr 20;
+
+  Inc(A2, (B2 or not C2) xor D2 + Buffer[ 6] + $5C4DD124); A2 := A2 shl  9 or A2 shr 23;
+  Inc(D2, (A2 or not B2) xor C2 + Buffer[11] + $5C4DD124); D2 := D2 shl 13 or D2 shr 19;
+  Inc(C2, (D2 or not A2) xor B2 + Buffer[ 3] + $5C4DD124); C2 := C2 shl 15 or C2 shr 17;
+  Inc(B2, (C2 or not D2) xor A2 + Buffer[ 7] + $5C4DD124); B2 := B2 shl  7 or B2 shr 25;
+  Inc(A2, (B2 or not C2) xor D2 + Buffer[ 0] + $5C4DD124); A2 := A2 shl 12 or A2 shr 20;
+  Inc(D2, (A2 or not B2) xor C2 + Buffer[13] + $5C4DD124); D2 := D2 shl  8 or D2 shr 24;
+  Inc(C2, (D2 or not A2) xor B2 + Buffer[ 5] + $5C4DD124); C2 := C2 shl  9 or C2 shr 23;
+  Inc(B2, (C2 or not D2) xor A2 + Buffer[10] + $5C4DD124); B2 := B2 shl 11 or B2 shr 21;
+  Inc(A2, (B2 or not C2) xor D2 + Buffer[14] + $5C4DD124); A2 := A2 shl  7 or A2 shr 25;
+  Inc(D2, (A2 or not B2) xor C2 + Buffer[15] + $5C4DD124); D2 := D2 shl  7 or D2 shr 25;
+  Inc(C2, (D2 or not A2) xor B2 + Buffer[ 8] + $5C4DD124); C2 := C2 shl 12 or C2 shr 20;
+  Inc(B2, (C2 or not D2) xor A2 + Buffer[12] + $5C4DD124); B2 := B2 shl  7 or B2 shr 25;
+  Inc(A2, (B2 or not C2) xor D2 + Buffer[ 4] + $5C4DD124); A2 := A2 shl  6 or A2 shr 26;
+  Inc(D2, (A2 or not B2) xor C2 + Buffer[ 9] + $5C4DD124); D2 := D2 shl 15 or D2 shr 17;
+  Inc(C2, (D2 or not A2) xor B2 + Buffer[ 1] + $5C4DD124); C2 := C2 shl 13 or C2 shr 19;
+  Inc(B2, (C2 or not D2) xor A2 + Buffer[ 2] + $5C4DD124); B2 := B2 shl 11 or B2 shr 21;
+
+  T := B1; B1 := B2; B2 := T;
+
+  Inc(A1, (B1 or not C1) xor D1 + Buffer[ 3] + $6ED9EBA1); A1 := A1 shl 11 or A1 shr 21;
+  Inc(D1, (A1 or not B1) xor C1 + Buffer[10] + $6ED9EBA1); D1 := D1 shl 13 or D1 shr 19;
+  Inc(C1, (D1 or not A1) xor B1 + Buffer[14] + $6ED9EBA1); C1 := C1 shl  6 or C1 shr 26;
+  Inc(B1, (C1 or not D1) xor A1 + Buffer[ 4] + $6ED9EBA1); B1 := B1 shl  7 or B1 shr 25;
+  Inc(A1, (B1 or not C1) xor D1 + Buffer[ 9] + $6ED9EBA1); A1 := A1 shl 14 or A1 shr 18;
+  Inc(D1, (A1 or not B1) xor C1 + Buffer[15] + $6ED9EBA1); D1 := D1 shl  9 or D1 shr 23;
+  Inc(C1, (D1 or not A1) xor B1 + Buffer[ 8] + $6ED9EBA1); C1 := C1 shl 13 or C1 shr 19;
+  Inc(B1, (C1 or not D1) xor A1 + Buffer[ 1] + $6ED9EBA1); B1 := B1 shl 15 or B1 shr 17;
+  Inc(A1, (B1 or not C1) xor D1 + Buffer[ 2] + $6ED9EBA1); A1 := A1 shl 14 or A1 shr 18;
+  Inc(D1, (A1 or not B1) xor C1 + Buffer[ 7] + $6ED9EBA1); D1 := D1 shl  8 or D1 shr 24;
+  Inc(C1, (D1 or not A1) xor B1 + Buffer[ 0] + $6ED9EBA1); C1 := C1 shl 13 or C1 shr 19;
+  Inc(B1, (C1 or not D1) xor A1 + Buffer[ 6] + $6ED9EBA1); B1 := B1 shl  6 or B1 shr 26;
+  Inc(A1, (B1 or not C1) xor D1 + Buffer[13] + $6ED9EBA1); A1 := A1 shl  5 or A1 shr 27;
+  Inc(D1, (A1 or not B1) xor C1 + Buffer[11] + $6ED9EBA1); D1 := D1 shl 12 or D1 shr 20;
+  Inc(C1, (D1 or not A1) xor B1 + Buffer[ 5] + $6ED9EBA1); C1 := C1 shl  7 or C1 shr 25;
+  Inc(B1, (C1 or not D1) xor A1 + Buffer[12] + $6ED9EBA1); B1 := B1 shl  5 or B1 shr 27;
+
+  Inc(A2, B2 and C2 or not B2 and D2 + Buffer[15] + $6D703EF3); A2 := A2 shl  9 or A2 shr 23;
+  Inc(D2, A2 and B2 or not A2 and C2 + Buffer[ 5] + $6D703EF3); D2 := D2 shl  7 or D2 shr 25;
+  Inc(C2, D2 and A2 or not D2 and B2 + Buffer[ 1] + $6D703EF3); C2 := C2 shl 15 or C2 shr 17;
+  Inc(B2, C2 and D2 or not C2 and A2 + Buffer[ 3] + $6D703EF3); B2 := B2 shl 11 or B2 shr 21;
+  Inc(A2, B2 and C2 or not B2 and D2 + Buffer[ 7] + $6D703EF3); A2 := A2 shl  8 or A2 shr 24;
+  Inc(D2, A2 and B2 or not A2 and C2 + Buffer[14] + $6D703EF3); D2 := D2 shl  6 or D2 shr 26;
+  Inc(C2, D2 and A2 or not D2 and B2 + Buffer[ 6] + $6D703EF3); C2 := C2 shl  6 or C2 shr 26;
+  Inc(B2, C2 and D2 or not C2 and A2 + Buffer[ 9] + $6D703EF3); B2 := B2 shl 14 or B2 shr 18;
+  Inc(A2, B2 and C2 or not B2 and D2 + Buffer[11] + $6D703EF3); A2 := A2 shl 12 or A2 shr 20;
+  Inc(D2, A2 and B2 or not A2 and C2 + Buffer[ 8] + $6D703EF3); D2 := D2 shl 13 or D2 shr 19;
+  Inc(C2, D2 and A2 or not D2 and B2 + Buffer[12] + $6D703EF3); C2 := C2 shl  5 or C2 shr 27;
+  Inc(B2, C2 and D2 or not C2 and A2 + Buffer[ 2] + $6D703EF3); B2 := B2 shl 14 or B2 shr 18;
+  Inc(A2, B2 and C2 or not B2 and D2 + Buffer[10] + $6D703EF3); A2 := A2 shl 13 or A2 shr 19;
+  Inc(D2, A2 and B2 or not A2 and C2 + Buffer[ 0] + $6D703EF3); D2 := D2 shl 13 or D2 shr 19;
+  Inc(C2, D2 and A2 or not D2 and B2 + Buffer[ 4] + $6D703EF3); C2 := C2 shl  7 or C2 shr 25;
+  Inc(B2, C2 and D2 or not C2 and A2 + Buffer[13] + $6D703EF3); B2 := B2 shl  5 or B2 shr 27;
+
+  T := C1; C1 := C2; C2 := T;
+
+  Inc(A1, B1 and D1 or C1 and not D1 + Buffer[ 1] + $8F1BBCDC); A1 := A1 shl 11 or A1 shr 21;
+  Inc(D1, A1 and C1 or B1 and not C1 + Buffer[ 9] + $8F1BBCDC); D1 := D1 shl 12 or D1 shr 20;
+  Inc(C1, D1 and B1 or A1 and not B1 + Buffer[11] + $8F1BBCDC); C1 := C1 shl 14 or C1 shr 18;
+  Inc(B1, C1 and A1 or D1 and not A1 + Buffer[10] + $8F1BBCDC); B1 := B1 shl 15 or B1 shr 17;
+  Inc(A1, B1 and D1 or C1 and not D1 + Buffer[ 0] + $8F1BBCDC); A1 := A1 shl 14 or A1 shr 18;
+  Inc(D1, A1 and C1 or B1 and not C1 + Buffer[ 8] + $8F1BBCDC); D1 := D1 shl 15 or D1 shr 17;
+  Inc(C1, D1 and B1 or A1 and not B1 + Buffer[12] + $8F1BBCDC); C1 := C1 shl  9 or C1 shr 23;
+  Inc(B1, C1 and A1 or D1 and not A1 + Buffer[ 4] + $8F1BBCDC); B1 := B1 shl  8 or B1 shr 24;
+  Inc(A1, B1 and D1 or C1 and not D1 + Buffer[13] + $8F1BBCDC); A1 := A1 shl  9 or A1 shr 23;
+  Inc(D1, A1 and C1 or B1 and not C1 + Buffer[ 3] + $8F1BBCDC); D1 := D1 shl 14 or D1 shr 18;
+  Inc(C1, D1 and B1 or A1 and not B1 + Buffer[ 7] + $8F1BBCDC); C1 := C1 shl  5 or C1 shr 27;
+  Inc(B1, C1 and A1 or D1 and not A1 + Buffer[15] + $8F1BBCDC); B1 := B1 shl  6 or B1 shr 26;
+  Inc(A1, B1 and D1 or C1 and not D1 + Buffer[14] + $8F1BBCDC); A1 := A1 shl  8 or A1 shr 24;
+  Inc(D1, A1 and C1 or B1 and not C1 + Buffer[ 5] + $8F1BBCDC); D1 := D1 shl  6 or D1 shr 26;
+  Inc(C1, D1 and B1 or A1 and not B1 + Buffer[ 6] + $8F1BBCDC); C1 := C1 shl  5 or C1 shr 27;
+  Inc(B1, C1 and A1 or D1 and not A1 + Buffer[ 2] + $8F1BBCDC); B1 := B1 shl 12 or B1 shr 20;
+
+  Inc(A2, B2 xor C2 xor D2 + Buffer[ 8]); A2 := A2 shl 15 or A2 shr 17;
+  Inc(D2, A2 xor B2 xor C2 + Buffer[ 6]); D2 := D2 shl  5 or D2 shr 27;
+  Inc(C2, D2 xor A2 xor B2 + Buffer[ 4]); C2 := C2 shl  8 or C2 shr 24;
+  Inc(B2, C2 xor D2 xor A2 + Buffer[ 1]); B2 := B2 shl 11 or B2 shr 21;
+  Inc(A2, B2 xor C2 xor D2 + Buffer[ 3]); A2 := A2 shl 14 or A2 shr 18;
+  Inc(D2, A2 xor B2 xor C2 + Buffer[11]); D2 := D2 shl 14 or D2 shr 18;
+  Inc(C2, D2 xor A2 xor B2 + Buffer[15]); C2 := C2 shl  6 or C2 shr 26;
+  Inc(B2, C2 xor D2 xor A2 + Buffer[ 0]); B2 := B2 shl 14 or B2 shr 18;
+  Inc(A2, B2 xor C2 xor D2 + Buffer[ 5]); A2 := A2 shl  6 or A2 shr 26;
+  Inc(D2, A2 xor B2 xor C2 + Buffer[12]); D2 := D2 shl  9 or D2 shr 23;
+  Inc(C2, D2 xor A2 xor B2 + Buffer[ 2]); C2 := C2 shl 12 or C2 shr 20;
+  Inc(B2, C2 xor D2 xor A2 + Buffer[13]); B2 := B2 shl  9 or B2 shr 23;
+  Inc(A2, B2 xor C2 xor D2 + Buffer[ 9]); A2 := A2 shl 12 or A2 shr 20;
+  Inc(D2, A2 xor B2 xor C2 + Buffer[ 7]); D2 := D2 shl  5 or D2 shr 27;
+  Inc(C2, D2 xor A2 xor B2 + Buffer[10]); C2 := C2 shl 15 or C2 shr 17;
+  Inc(B2, C2 xor D2 xor A2 + Buffer[14]); B2 := B2 shl  8 or B2 shr 24;
+
+  T := D1; D1 := D2; D2 := T;
+
+  Inc(FDigest[0], A1);
+  Inc(FDigest[1], B1);
+  Inc(FDigest[2], C1);
+  Inc(FDigest[3], D1);
+  Inc(FDigest[4], A2);
+  Inc(FDigest[5], B2);
+  Inc(FDigest[6], C2);
+  Inc(FDigest[7], D2);
+end;
+
+class function TROHash_RipeMD256.DigestKeySize: Integer;
+begin
+  Result := 32;
+end;
+
+procedure TROHash_RipeMD256.Init;
+begin
+  FillChar(FBuffer, SizeOf(FBuffer), 0);
+  FDigest[0] := $67452301;
+  FDigest[1] := $EFCDAB89;
+  FDigest[2] := $98BADCFE;
+  FDigest[3] := $10325476;
+  FDigest[4] := $76543210;
+  FDigest[5] := $FEDCBA98;
+  FDigest[6] := $89ABCDEF;
+  FDigest[7] := $01234567;
+  FDigest[8] := $01234567;
+  FDigest[9] := $3C2D1E0F;
+  FCount := 0;
+  Protect(True);
+end;
+
+class function TROHash_RipeMD320.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    0B7h,0BDh,02Ch,075h,0B7h,013h,050h,091h
+         DB    0E4h,067h,009h,046h,0F1h,041h,05Ah,048h
+         DB    045h,0DFh,08Eh,007h,0BAh,067h,04Eh,0A9h
+         DB    0FDh,066h,0EDh,001h,0D9h,06Fh,023h,020h
+         DB    0B5h,011h,012h,0C5h,0A7h,041h,0A6h,05Ch
+end;
+
+procedure TROHash_RipeMD320.Transform(Buffer: PIntArray);
+var
+  A1, B1, C1, D1, E1: LongWord;
+  A2, B2, C2, D2, E2: LongWord;
+  T: LongWord;
+begin
+  A1 := FDigest[0];
+  B1 := FDigest[1];
+  C1 := FDigest[2];
+  D1 := FDigest[3];
+  E1 := FDigest[4];
+  A2 := FDigest[5];
+  B2 := FDigest[6];
+  C2 := FDigest[7];
+  D2 := FDigest[8];
+  E2 := FDigest[9];
+
+  Inc(A1, Buffer[ 0] + (B1 xor C1 xor D1)); A1 := A1 shl 11 or A1 shr 21 + E1; C1 := C1 shl 10 or C1 shr 22;
+  Inc(E1, Buffer[ 1] + (A1 xor B1 xor C1)); E1 := E1 shl 14 or E1 shr 18 + D1; B1 := B1 shl 10 or B1 shr 22;
+  Inc(D1, Buffer[ 2] + (E1 xor A1 xor B1)); D1 := D1 shl 15 or D1 shr 17 + C1; A1 := A1 shl 10 or A1 shr 22;
+  Inc(C1, Buffer[ 3] + (D1 xor E1 xor A1)); C1 := C1 shl 12 or C1 shr 20 + B1; E1 := E1 shl 10 or E1 shr 22;
+  Inc(B1, Buffer[ 4] + (C1 xor D1 xor E1)); B1 := B1 shl  5 or B1 shr 27 + A1; D1 := D1 shl 10 or D1 shr 22;
+  Inc(A1, Buffer[ 5] + (B1 xor C1 xor D1)); A1 := A1 shl  8 or A1 shr 24 + E1; C1 := C1 shl 10 or C1 shr 22;
+  Inc(E1, Buffer[ 6] + (A1 xor B1 xor C1)); E1 := E1 shl  7 or E1 shr 25 + D1; B1 := B1 shl 10 or B1 shr 22;
+  Inc(D1, Buffer[ 7] + (E1 xor A1 xor B1)); D1 := D1 shl  9 or D1 shr 23 + C1; A1 := A1 shl 10 or A1 shr 22;
+  Inc(C1, Buffer[ 8] + (D1 xor E1 xor A1)); C1 := C1 shl 11 or C1 shr 21 + B1; E1 := E1 shl 10 or E1 shr 22;
+  Inc(B1, Buffer[ 9] + (C1 xor D1 xor E1)); B1 := B1 shl 13 or B1 shr 19 + A1; D1 := D1 shl 10 or D1 shr 22;
+  Inc(A1, Buffer[10] + (B1 xor C1 xor D1)); A1 := A1 shl 14 or A1 shr 18 + E1; C1 := C1 shl 10 or C1 shr 22;
+  Inc(E1, Buffer[11] + (A1 xor B1 xor C1)); E1 := E1 shl 15 or E1 shr 17 + D1; B1 := B1 shl 10 or B1 shr 22;
+  Inc(D1, Buffer[12] + (E1 xor A1 xor B1)); D1 := D1 shl  6 or D1 shr 26 + C1; A1 := A1 shl 10 or A1 shr 22;
+  Inc(C1, Buffer[13] + (D1 xor E1 xor A1)); C1 := C1 shl  7 or C1 shr 25 + B1; E1 := E1 shl 10 or E1 shr 22;
+  Inc(B1, Buffer[14] + (C1 xor D1 xor E1)); B1 := B1 shl  9 or B1 shr 23 + A1; D1 := D1 shl 10 or D1 shr 22;
+  Inc(A1, Buffer[15] + (B1 xor C1 xor D1)); A1 := A1 shl  8 or A1 shr 24 + E1; C1 := C1 shl 10 or C1 shr 22;
+
+  Inc(A2, Buffer[ 5] + $50A28BE6 + (B2 xor (C2 or not D2))); A2 := A2 shl  8 or A2 shr 24 + E2; C2 := C2 shl 10 or C2 shr 22;
+  Inc(E2, Buffer[14] + $50A28BE6 + (A2 xor (B2 or not C2))); E2 := E2 shl  9 or E2 shr 23 + D2; B2 := B2 shl 10 or B2 shr 22;
+  Inc(D2, Buffer[ 7] + $50A28BE6 + (E2 xor (A2 or not B2))); D2 := D2 shl  9 or D2 shr 23 + C2; A2 := A2 shl 10 or A2 shr 22;
+  Inc(C2, Buffer[ 0] + $50A28BE6 + (D2 xor (E2 or not A2))); C2 := C2 shl 11 or C2 shr 21 + B2; E2 := E2 shl 10 or E2 shr 22;
+  Inc(B2, Buffer[ 9] + $50A28BE6 + (C2 xor (D2 or not E2))); B2 := B2 shl 13 or B2 shr 19 + A2; D2 := D2 shl 10 or D2 shr 22;
+  Inc(A2, Buffer[ 2] + $50A28BE6 + (B2 xor (C2 or not D2))); A2 := A2 shl 15 or A2 shr 17 + E2; C2 := C2 shl 10 or C2 shr 22;
+  Inc(E2, Buffer[11] + $50A28BE6 + (A2 xor (B2 or not C2))); E2 := E2 shl 15 or E2 shr 17 + D2; B2 := B2 shl 10 or B2 shr 22;
+  Inc(D2, Buffer[ 4] + $50A28BE6 + (E2 xor (A2 or not B2))); D2 := D2 shl  5 or D2 shr 27 + C2; A2 := A2 shl 10 or A2 shr 22;
+  Inc(C2, Buffer[13] + $50A28BE6 + (D2 xor (E2 or not A2))); C2 := C2 shl  7 or C2 shr 25 + B2; E2 := E2 shl 10 or E2 shr 22;
+  Inc(B2, Buffer[ 6] + $50A28BE6 + (C2 xor (D2 or not E2))); B2 := B2 shl  7 or B2 shr 25 + A2; D2 := D2 shl 10 or D2 shr 22;
+  Inc(A2, Buffer[15] + $50A28BE6 + (B2 xor (C2 or not D2))); A2 := A2 shl  8 or A2 shr 24 + E2; C2 := C2 shl 10 or C2 shr 22;
+  Inc(E2, Buffer[ 8] + $50A28BE6 + (A2 xor (B2 or not C2))); E2 := E2 shl 11 or E2 shr 21 + D2; B2 := B2 shl 10 or B2 shr 22;
+  Inc(D2, Buffer[ 1] + $50A28BE6 + (E2 xor (A2 or not B2))); D2 := D2 shl 14 or D2 shr 18 + C2; A2 := A2 shl 10 or A2 shr 22;
+  Inc(C2, Buffer[10] + $50A28BE6 + (D2 xor (E2 or not A2))); C2 := C2 shl 14 or C2 shr 18 + B2; E2 := E2 shl 10 or E2 shr 22;
+  Inc(B2, Buffer[ 3] + $50A28BE6 + (C2 xor (D2 or not E2))); B2 := B2 shl 12 or B2 shr 20 + A2; D2 := D2 shl 10 or D2 shr 22;
+  Inc(A2, Buffer[12] + $50A28BE6 + (B2 xor (C2 or not D2))); A2 := A2 shl  6 or A2 shr 26 + E2; C2 := C2 shl 10 or C2 shr 22;
+
+  T := A1; A1 := A2; A2 := T;
+
+  Inc(E1, Buffer[ 7] + $5A827999 + ((A1 and B1) or (not A1 and C1))); E1 := E1 shl  7 or E1 shr 25 + D1; B1 := B1 shl 10 or B1 shr 22;
+  Inc(D1, Buffer[ 4] + $5A827999 + ((E1 and A1) or (not E1 and B1))); D1 := D1 shl  6 or D1 shr 26 + C1; A1 := A1 shl 10 or A1 shr 22;
+  Inc(C1, Buffer[13] + $5A827999 + ((D1 and E1) or (not D1 and A1))); C1 := C1 shl  8 or C1 shr 24 + B1; E1 := E1 shl 10 or E1 shr 22;
+  Inc(B1, Buffer[ 1] + $5A827999 + ((C1 and D1) or (not C1 and E1))); B1 := B1 shl 13 or B1 shr 19 + A1; D1 := D1 shl 10 or D1 shr 22;
+  Inc(A1, Buffer[10] + $5A827999 + ((B1 and C1) or (not B1 and D1))); A1 := A1 shl 11 or A1 shr 21 + E1; C1 := C1 shl 10 or C1 shr 22;
+  Inc(E1, Buffer[ 6] + $5A827999 + ((A1 and B1) or (not A1 and C1))); E1 := E1 shl  9 or E1 shr 23 + D1; B1 := B1 shl 10 or B1 shr 22;
+  Inc(D1, Buffer[15] + $5A827999 + ((E1 and A1) or (not E1 and B1))); D1 := D1 shl  7 or D1 shr 25 + C1; A1 := A1 shl 10 or A1 shr 22;
+  Inc(C1, Buffer[ 3] + $5A827999 + ((D1 and E1) or (not D1 and A1))); C1 := C1 shl 15 or C1 shr 17 + B1; E1 := E1 shl 10 or E1 shr 22;
+  Inc(B1, Buffer[12] + $5A827999 + ((C1 and D1) or (not C1 and E1))); B1 := B1 shl  7 or B1 shr 25 + A1; D1 := D1 shl 10 or D1 shr 22;
+  Inc(A1, Buffer[ 0] + $5A827999 + ((B1 and C1) or (not B1 and D1))); A1 := A1 shl 12 or A1 shr 20 + E1; C1 := C1 shl 10 or C1 shr 22;
+  Inc(E1, Buffer[ 9] + $5A827999 + ((A1 and B1) or (not A1 and C1))); E1 := E1 shl 15 or E1 shr 17 + D1; B1 := B1 shl 10 or B1 shr 22;
+  Inc(D1, Buffer[ 5] + $5A827999 + ((E1 and A1) or (not E1 and B1))); D1 := D1 shl  9 or D1 shr 23 + C1; A1 := A1 shl 10 or A1 shr 22;
+  Inc(C1, Buffer[ 2] + $5A827999 + ((D1 and E1) or (not D1 and A1))); C1 := C1 shl 11 or C1 shr 21 + B1; E1 := E1 shl 10 or E1 shr 22;
+  Inc(B1, Buffer[14] + $5A827999 + ((C1 and D1) or (not C1 and E1))); B1 := B1 shl  7 or B1 shr 25 + A1; D1 := D1 shl 10 or D1 shr 22;
+  Inc(A1, Buffer[11] + $5A827999 + ((B1 and C1) or (not B1 and D1))); A1 := A1 shl 13 or A1 shr 19 + E1; C1 := C1 shl 10 or C1 shr 22;
+  Inc(E1, Buffer[ 8] + $5A827999 + ((A1 and B1) or (not A1 and C1))); E1 := E1 shl 12 or E1 shr 20 + D1; B1 := B1 shl 10 or B1 shr 22;
+
+  Inc(E2, Buffer[ 6] + $5C4DD124 + ((A2 and C2) or (B2 and not C2))); E2 := E2 shl  9 or E2 shr 23 + D2; B2 := B2 shl 10 or B2 shr 22;
+  Inc(D2, Buffer[11] + $5C4DD124 + ((E2 and B2) or (A2 and not B2))); D2 := D2 shl 13 or D2 shr 19 + C2; A2 := A2 shl 10 or A2 shr 22;
+  Inc(C2, Buffer[ 3] + $5C4DD124 + ((D2 and A2) or (E2 and not A2))); C2 := C2 shl 15 or C2 shr 17 + B2; E2 := E2 shl 10 or E2 shr 22;
+  Inc(B2, Buffer[ 7] + $5C4DD124 + ((C2 and E2) or (D2 and not E2))); B2 := B2 shl  7 or B2 shr 25 + A2; D2 := D2 shl 10 or D2 shr 22;
+  Inc(A2, Buffer[ 0] + $5C4DD124 + ((B2 and D2) or (C2 and not D2))); A2 := A2 shl 12 or A2 shr 20 + E2; C2 := C2 shl 10 or C2 shr 22;
+  Inc(E2, Buffer[13] + $5C4DD124 + ((A2 and C2) or (B2 and not C2))); E2 := E2 shl  8 or E2 shr 24 + D2; B2 := B2 shl 10 or B2 shr 22;
+  Inc(D2, Buffer[ 5] + $5C4DD124 + ((E2 and B2) or (A2 and not B2))); D2 := D2 shl  9 or D2 shr 23 + C2; A2 := A2 shl 10 or A2 shr 22;
+  Inc(C2, Buffer[10] + $5C4DD124 + ((D2 and A2) or (E2 and not A2))); C2 := C2 shl 11 or C2 shr 21 + B2; E2 := E2 shl 10 or E2 shr 22;
+  Inc(B2, Buffer[14] + $5C4DD124 + ((C2 and E2) or (D2 and not E2))); B2 := B2 shl  7 or B2 shr 25 + A2; D2 := D2 shl 10 or D2 shr 22;
+  Inc(A2, Buffer[15] + $5C4DD124 + ((B2 and D2) or (C2 and not D2))); A2 := A2 shl  7 or A2 shr 25 + E2; C2 := C2 shl 10 or C2 shr 22;
+  Inc(E2, Buffer[ 8] + $5C4DD124 + ((A2 and C2) or (B2 and not C2))); E2 := E2 shl 12 or E2 shr 20 + D2; B2 := B2 shl 10 or B2 shr 22;
+  Inc(D2, Buffer[12] + $5C4DD124 + ((E2 and B2) or (A2 and not B2))); D2 := D2 shl  7 or D2 shr 25 + C2; A2 := A2 shl 10 or A2 shr 22;
+  Inc(C2, Buffer[ 4] + $5C4DD124 + ((D2 and A2) or (E2 and not A2))); C2 := C2 shl  6 or C2 shr 26 + B2; E2 := E2 shl 10 or E2 shr 22;
+  Inc(B2, Buffer[ 9] + $5C4DD124 + ((C2 and E2) or (D2 and not E2))); B2 := B2 shl 15 or B2 shr 17 + A2; D2 := D2 shl 10 or D2 shr 22;
+  Inc(A2, Buffer[ 1] + $5C4DD124 + ((B2 and D2) or (C2 and not D2))); A2 := A2 shl 13 or A2 shr 19 + E2; C2 := C2 shl 10 or C2 shr 22;
+  Inc(E2, Buffer[ 2] + $5C4DD124 + ((A2 and C2) or (B2 and not C2))); E2 := E2 shl 11 or E2 shr 21 + D2; B2 := B2 shl 10 or B2 shr 22;
+
+  T := B1; B1 := B2; B2 := T;
+
+  Inc(D1, Buffer[ 3] + $6ED9EBA1 + ((E1 or not A1) xor B1)); D1 := D1 shl 11 or D1 shr 21 + C1; A1 := A1 shl 10 or A1 shr 22;
+  Inc(C1, Buffer[10] + $6ED9EBA1 + ((D1 or not E1) xor A1)); C1 := C1 shl 13 or C1 shr 19 + B1; E1 := E1 shl 10 or E1 shr 22;
+  Inc(B1, Buffer[14] + $6ED9EBA1 + ((C1 or not D1) xor E1)); B1 := B1 shl  6 or B1 shr 26 + A1; D1 := D1 shl 10 or D1 shr 22;
+  Inc(A1, Buffer[ 4] + $6ED9EBA1 + ((B1 or not C1) xor D1)); A1 := A1 shl  7 or A1 shr 25 + E1; C1 := C1 shl 10 or C1 shr 22;
+  Inc(E1, Buffer[ 9] + $6ED9EBA1 + ((A1 or not B1) xor C1)); E1 := E1 shl 14 or E1 shr 18 + D1; B1 := B1 shl 10 or B1 shr 22;
+  Inc(D1, Buffer[15] + $6ED9EBA1 + ((E1 or not A1) xor B1)); D1 := D1 shl  9 or D1 shr 23 + C1; A1 := A1 shl 10 or A1 shr 22;
+  Inc(C1, Buffer[ 8] + $6ED9EBA1 + ((D1 or not E1) xor A1)); C1 := C1 shl 13 or C1 shr 19 + B1; E1 := E1 shl 10 or E1 shr 22;
+  Inc(B1, Buffer[ 1] + $6ED9EBA1 + ((C1 or not D1) xor E1)); B1 := B1 shl 15 or B1 shr 17 + A1; D1 := D1 shl 10 or D1 shr 22;
+  Inc(A1, Buffer[ 2] + $6ED9EBA1 + ((B1 or not C1) xor D1)); A1 := A1 shl 14 or A1 shr 18 + E1; C1 := C1 shl 10 or C1 shr 22;
+  Inc(E1, Buffer[ 7] + $6ED9EBA1 + ((A1 or not B1) xor C1)); E1 := E1 shl  8 or E1 shr 24 + D1; B1 := B1 shl 10 or B1 shr 22;
+  Inc(D1, Buffer[ 0] + $6ED9EBA1 + ((E1 or not A1) xor B1)); D1 := D1 shl 13 or D1 shr 19 + C1; A1 := A1 shl 10 or A1 shr 22;
+  Inc(C1, Buffer[ 6] + $6ED9EBA1 + ((D1 or not E1) xor A1)); C1 := C1 shl  6 or C1 shr 26 + B1; E1 := E1 shl 10 or E1 shr 22;
+  Inc(B1, Buffer[13] + $6ED9EBA1 + ((C1 or not D1) xor E1)); B1 := B1 shl  5 or B1 shr 27 + A1; D1 := D1 shl 10 or D1 shr 22;
+  Inc(A1, Buffer[11] + $6ED9EBA1 + ((B1 or not C1) xor D1)); A1 := A1 shl 12 or A1 shr 20 + E1; C1 := C1 shl 10 or C1 shr 22;
+  Inc(E1, Buffer[ 5] + $6ED9EBA1 + ((A1 or not B1) xor C1)); E1 := E1 shl  7 or E1 shr 25 + D1; B1 := B1 shl 10 or B1 shr 22;
+  Inc(D1, Buffer[12] + $6ED9EBA1 + ((E1 or not A1) xor B1)); D1 := D1 shl  5 or D1 shr 27 + C1; A1 := A1 shl 10 or A1 shr 22;
+
+  Inc(D2, Buffer[15] + $6D703EF3 + ((E2 or not A2) xor B2)); D2 := D2 shl  9 or D2 shr 23 + C2; A2 := A2 shl 10 or A2 shr 22;
+  Inc(C2, Buffer[ 5] + $6D703EF3 + ((D2 or not E2) xor A2)); C2 := C2 shl  7 or C2 shr 25 + B2; E2 := E2 shl 10 or E2 shr 22;
+  Inc(B2, Buffer[ 1] + $6D703EF3 + ((C2 or not D2) xor E2)); B2 := B2 shl 15 or B2 shr 17 + A2; D2 := D2 shl 10 or D2 shr 22;
+  Inc(A2, Buffer[ 3] + $6D703EF3 + ((B2 or not C2) xor D2)); A2 := A2 shl 11 or A2 shr 21 + E2; C2 := C2 shl 10 or C2 shr 22;
+  Inc(E2, Buffer[ 7] + $6D703EF3 + ((A2 or not B2) xor C2)); E2 := E2 shl  8 or E2 shr 24 + D2; B2 := B2 shl 10 or B2 shr 22;
+  Inc(D2, Buffer[14] + $6D703EF3 + ((E2 or not A2) xor B2)); D2 := D2 shl  6 or D2 shr 26 + C2; A2 := A2 shl 10 or A2 shr 22;
+  Inc(C2, Buffer[ 6] + $6D703EF3 + ((D2 or not E2) xor A2)); C2 := C2 shl  6 or C2 shr 26 + B2; E2 := E2 shl 10 or E2 shr 22;
+  Inc(B2, Buffer[ 9] + $6D703EF3 + ((C2 or not D2) xor E2)); B2 := B2 shl 14 or B2 shr 18 + A2; D2 := D2 shl 10 or D2 shr 22;
+  Inc(A2, Buffer[11] + $6D703EF3 + ((B2 or not C2) xor D2)); A2 := A2 shl 12 or A2 shr 20 + E2; C2 := C2 shl 10 or C2 shr 22;
+  Inc(E2, Buffer[ 8] + $6D703EF3 + ((A2 or not B2) xor C2)); E2 := E2 shl 13 or E2 shr 19 + D2; B2 := B2 shl 10 or B2 shr 22;
+  Inc(D2, Buffer[12] + $6D703EF3 + ((E2 or not A2) xor B2)); D2 := D2 shl  5 or D2 shr 27 + C2; A2 := A2 shl 10 or A2 shr 22;
+  Inc(C2, Buffer[ 2] + $6D703EF3 + ((D2 or not E2) xor A2)); C2 := C2 shl 14 or C2 shr 18 + B2; E2 := E2 shl 10 or E2 shr 22;
+  Inc(B2, Buffer[10] + $6D703EF3 + ((C2 or not D2) xor E2)); B2 := B2 shl 13 or B2 shr 19 + A2; D2 := D2 shl 10 or D2 shr 22;
+  Inc(A2, Buffer[ 0] + $6D703EF3 + ((B2 or not C2) xor D2)); A2 := A2 shl 13 or A2 shr 19 + E2; C2 := C2 shl 10 or C2 shr 22;
+  Inc(E2, Buffer[ 4] + $6D703EF3 + ((A2 or not B2) xor C2)); E2 := E2 shl  7 or E2 shr 25 + D2; B2 := B2 shl 10 or B2 shr 22;
+  Inc(D2, Buffer[13] + $6D703EF3 + ((E2 or not A2) xor B2)); D2 := D2 shl  5 or D2 shr 27 + C2; A2 := A2 shl 10 or A2 shr 22;
+
+  T := C1; C1 := C2; C2 := T;
+
+  Inc(C1, Buffer[ 1] + $8F1BBCDC + ((D1 and A1) or (E1 and not A1))); C1 := C1 shl 11 or C1 shr 21 + B1; E1 := E1 shl 10 or E1 shr 22;
+  Inc(B1, Buffer[ 9] + $8F1BBCDC + ((C1 and E1) or (D1 and not E1))); B1 := B1 shl 12 or B1 shr 20 + A1; D1 := D1 shl 10 or D1 shr 22;
+  Inc(A1, Buffer[11] + $8F1BBCDC + ((B1 and D1) or (C1 and not D1))); A1 := A1 shl 14 or A1 shr 18 + E1; C1 := C1 shl 10 or C1 shr 22;
+  Inc(E1, Buffer[10] + $8F1BBCDC + ((A1 and C1) or (B1 and not C1))); E1 := E1 shl 15 or E1 shr 17 + D1; B1 := B1 shl 10 or B1 shr 22;
+  Inc(D1, Buffer[ 0] + $8F1BBCDC + ((E1 and B1) or (A1 and not B1))); D1 := D1 shl 14 or D1 shr 18 + C1; A1 := A1 shl 10 or A1 shr 22;
+  Inc(C1, Buffer[ 8] + $8F1BBCDC + ((D1 and A1) or (E1 and not A1))); C1 := C1 shl 15 or C1 shr 17 + B1; E1 := E1 shl 10 or E1 shr 22;
+  Inc(B1, Buffer[12] + $8F1BBCDC + ((C1 and E1) or (D1 and not E1))); B1 := B1 shl  9 or B1 shr 23 + A1; D1 := D1 shl 10 or D1 shr 22;
+  Inc(A1, Buffer[ 4] + $8F1BBCDC + ((B1 and D1) or (C1 and not D1))); A1 := A1 shl  8 or A1 shr 24 + E1; C1 := C1 shl 10 or C1 shr 22;
+  Inc(E1, Buffer[13] + $8F1BBCDC + ((A1 and C1) or (B1 and not C1))); E1 := E1 shl  9 or E1 shr 23 + D1; B1 := B1 shl 10 or B1 shr 22;
+  Inc(D1, Buffer[ 3] + $8F1BBCDC + ((E1 and B1) or (A1 and not B1))); D1 := D1 shl 14 or D1 shr 18 + C1; A1 := A1 shl 10 or A1 shr 22;
+  Inc(C1, Buffer[ 7] + $8F1BBCDC + ((D1 and A1) or (E1 and not A1))); C1 := C1 shl  5 or C1 shr 27 + B1; E1 := E1 shl 10 or E1 shr 22;
+  Inc(B1, Buffer[15] + $8F1BBCDC + ((C1 and E1) or (D1 and not E1))); B1 := B1 shl  6 or B1 shr 26 + A1; D1 := D1 shl 10 or D1 shr 22;
+  Inc(A1, Buffer[14] + $8F1BBCDC + ((B1 and D1) or (C1 and not D1))); A1 := A1 shl  8 or A1 shr 24 + E1; C1 := C1 shl 10 or C1 shr 22;
+  Inc(E1, Buffer[ 5] + $8F1BBCDC + ((A1 and C1) or (B1 and not C1))); E1 := E1 shl  6 or E1 shr 26 + D1; B1 := B1 shl 10 or B1 shr 22;
+  Inc(D1, Buffer[ 6] + $8F1BBCDC + ((E1 and B1) or (A1 and not B1))); D1 := D1 shl  5 or D1 shr 27 + C1; A1 := A1 shl 10 or A1 shr 22;
+  Inc(C1, Buffer[ 2] + $8F1BBCDC + ((D1 and A1) or (E1 and not A1))); C1 := C1 shl 12 or C1 shr 20 + B1; E1 := E1 shl 10 or E1 shr 22;
+
+  Inc(C2, Buffer[ 8] + $7A6D76E9 + ((D2 and E2) or (not D2 and A2))); C2 := C2 shl 15 or C2 shr 17 + B2; E2 := E2 shl 10 or E2 shr 22;
+  Inc(B2, Buffer[ 6] + $7A6D76E9 + ((C2 and D2) or (not C2 and E2))); B2 := B2 shl  5 or B2 shr 27 + A2; D2 := D2 shl 10 or D2 shr 22;
+  Inc(A2, Buffer[ 4] + $7A6D76E9 + ((B2 and C2) or (not B2 and D2))); A2 := A2 shl  8 or A2 shr 24 + E2; C2 := C2 shl 10 or C2 shr 22;
+  Inc(E2, Buffer[ 1] + $7A6D76E9 + ((A2 and B2) or (not A2 and C2))); E2 := E2 shl 11 or E2 shr 21 + D2; B2 := B2 shl 10 or B2 shr 22;
+  Inc(D2, Buffer[ 3] + $7A6D76E9 + ((E2 and A2) or (not E2 and B2))); D2 := D2 shl 14 or D2 shr 18 + C2; A2 := A2 shl 10 or A2 shr 22;
+  Inc(C2, Buffer[11] + $7A6D76E9 + ((D2 and E2) or (not D2 and A2))); C2 := C2 shl 14 or C2 shr 18 + B2; E2 := E2 shl 10 or E2 shr 22;
+  Inc(B2, Buffer[15] + $7A6D76E9 + ((C2 and D2) or (not C2 and E2))); B2 := B2 shl  6 or B2 shr 26 + A2; D2 := D2 shl 10 or D2 shr 22;
+  Inc(A2, Buffer[ 0] + $7A6D76E9 + ((B2 and C2) or (not B2 and D2))); A2 := A2 shl 14 or A2 shr 18 + E2; C2 := C2 shl 10 or C2 shr 22;
+  Inc(E2, Buffer[ 5] + $7A6D76E9 + ((A2 and B2) or (not A2 and C2))); E2 := E2 shl  6 or E2 shr 26 + D2; B2 := B2 shl 10 or B2 shr 22;
+  Inc(D2, Buffer[12] + $7A6D76E9 + ((E2 and A2) or (not E2 and B2))); D2 := D2 shl  9 or D2 shr 23 + C2; A2 := A2 shl 10 or A2 shr 22;
+  Inc(C2, Buffer[ 2] + $7A6D76E9 + ((D2 and E2) or (not D2 and A2))); C2 := C2 shl 12 or C2 shr 20 + B2; E2 := E2 shl 10 or E2 shr 22;
+  Inc(B2, Buffer[13] + $7A6D76E9 + ((C2 and D2) or (not C2 and E2))); B2 := B2 shl  9 or B2 shr 23 + A2; D2 := D2 shl 10 or D2 shr 22;
+  Inc(A2, Buffer[ 9] + $7A6D76E9 + ((B2 and C2) or (not B2 and D2))); A2 := A2 shl 12 or A2 shr 20 + E2; C2 := C2 shl 10 or C2 shr 22;
+  Inc(E2, Buffer[ 7] + $7A6D76E9 + ((A2 and B2) or (not A2 and C2))); E2 := E2 shl  5 or E2 shr 27 + D2; B2 := B2 shl 10 or B2 shr 22;
+  Inc(D2, Buffer[10] + $7A6D76E9 + ((E2 and A2) or (not E2 and B2))); D2 := D2 shl 15 or D2 shr 17 + C2; A2 := A2 shl 10 or A2 shr 22;
+  Inc(C2, Buffer[14] + $7A6D76E9 + ((D2 and E2) or (not D2 and A2))); C2 := C2 shl  8 or C2 shr 24 + B2; E2 := E2 shl 10 or E2 shr 22;
+
+  T := D1; D1 := D2; D2 := T;
+
+  Inc(B1, Buffer[ 4] + $A953FD4E + (C1 xor (D1 or not E1))); B1 := B1 shl  9 or B1 shr 23 + A1; D1 := D1 shl 10 or D1 shr 22;
+  Inc(A1, Buffer[ 0] + $A953FD4E + (B1 xor (C1 or not D1))); A1 := A1 shl 15 or A1 shr 17 + E1; C1 := C1 shl 10 or C1 shr 22;
+  Inc(E1, Buffer[ 5] + $A953FD4E + (A1 xor (B1 or not C1))); E1 := E1 shl  5 or E1 shr 27 + D1; B1 := B1 shl 10 or B1 shr 22;
+  Inc(D1, Buffer[ 9] + $A953FD4E + (E1 xor (A1 or not B1))); D1 := D1 shl 11 or D1 shr 21 + C1; A1 := A1 shl 10 or A1 shr 22;
+  Inc(C1, Buffer[ 7] + $A953FD4E + (D1 xor (E1 or not A1))); C1 := C1 shl  6 or C1 shr 26 + B1; E1 := E1 shl 10 or E1 shr 22;
+  Inc(B1, Buffer[12] + $A953FD4E + (C1 xor (D1 or not E1))); B1 := B1 shl  8 or B1 shr 24 + A1; D1 := D1 shl 10 or D1 shr 22;
+  Inc(A1, Buffer[ 2] + $A953FD4E + (B1 xor (C1 or not D1))); A1 := A1 shl 13 or A1 shr 19 + E1; C1 := C1 shl 10 or C1 shr 22;
+  Inc(E1, Buffer[10] + $A953FD4E + (A1 xor (B1 or not C1))); E1 := E1 shl 12 or E1 shr 20 + D1; B1 := B1 shl 10 or B1 shr 22;
+  Inc(D1, Buffer[14] + $A953FD4E + (E1 xor (A1 or not B1))); D1 := D1 shl  5 or D1 shr 27 + C1; A1 := A1 shl 10 or A1 shr 22;
+  Inc(C1, Buffer[ 1] + $A953FD4E + (D1 xor (E1 or not A1))); C1 := C1 shl 12 or C1 shr 20 + B1; E1 := E1 shl 10 or E1 shr 22;
+  Inc(B1, Buffer[ 3] + $A953FD4E + (C1 xor (D1 or not E1))); B1 := B1 shl 13 or B1 shr 19 + A1; D1 := D1 shl 10 or D1 shr 22;
+  Inc(A1, Buffer[ 8] + $A953FD4E + (B1 xor (C1 or not D1))); A1 := A1 shl 14 or A1 shr 18 + E1; C1 := C1 shl 10 or C1 shr 22;
+  Inc(E1, Buffer[11] + $A953FD4E + (A1 xor (B1 or not C1))); E1 := E1 shl 11 or E1 shr 21 + D1; B1 := B1 shl 10 or B1 shr 22;
+  Inc(D1, Buffer[ 6] + $A953FD4E + (E1 xor (A1 or not B1))); D1 := D1 shl  8 or D1 shr 24 + C1; A1 := A1 shl 10 or A1 shr 22;
+  Inc(C1, Buffer[15] + $A953FD4E + (D1 xor (E1 or not A1))); C1 := C1 shl  5 or C1 shr 27 + B1; E1 := E1 shl 10 or E1 shr 22;
+  Inc(B1, Buffer[13] + $A953FD4E + (C1 xor (D1 or not E1))); B1 := B1 shl  6 or B1 shr 26 + A1; D1 := D1 shl 10 or D1 shr 22;
+
+  Inc(B2, Buffer[12] + (C2 xor D2 xor E2)); B2 := B2 shl  8 or B2 shr 24 + A2; D2 := D2 shl 10 or D2 shr 22;
+  Inc(A2, Buffer[15] + (B2 xor C2 xor D2)); A2 := A2 shl  5 or A2 shr 27 + E2; C2 := C2 shl 10 or C2 shr 22;
+  Inc(E2, Buffer[10] + (A2 xor B2 xor C2)); E2 := E2 shl 12 or E2 shr 20 + D2; B2 := B2 shl 10 or B2 shr 22;
+  Inc(D2, Buffer[ 4] + (E2 xor A2 xor B2)); D2 := D2 shl  9 or D2 shr 23 + C2; A2 := A2 shl 10 or A2 shr 22;
+  Inc(C2, Buffer[ 1] + (D2 xor E2 xor A2)); C2 := C2 shl 12 or C2 shr 20 + B2; E2 := E2 shl 10 or E2 shr 22;
+  Inc(B2, Buffer[ 5] + (C2 xor D2 xor E2)); B2 := B2 shl  5 or B2 shr 27 + A2; D2 := D2 shl 10 or D2 shr 22;
+  Inc(A2, Buffer[ 8] + (B2 xor C2 xor D2)); A2 := A2 shl 14 or A2 shr 18 + E2; C2 := C2 shl 10 or C2 shr 22;
+  Inc(E2, Buffer[ 7] + (A2 xor B2 xor C2)); E2 := E2 shl  6 or E2 shr 26 + D2; B2 := B2 shl 10 or B2 shr 22;
+  Inc(D2, Buffer[ 6] + (E2 xor A2 xor B2)); D2 := D2 shl  8 or D2 shr 24 + C2; A2 := A2 shl 10 or A2 shr 22;
+  Inc(C2, Buffer[ 2] + (D2 xor E2 xor A2)); C2 := C2 shl 13 or C2 shr 19 + B2; E2 := E2 shl 10 or E2 shr 22;
+  Inc(B2, Buffer[13] + (C2 xor D2 xor E2)); B2 := B2 shl  6 or B2 shr 26 + A2; D2 := D2 shl 10 or D2 shr 22;
+  Inc(A2, Buffer[14] + (B2 xor C2 xor D2)); A2 := A2 shl  5 or A2 shr 27 + E2; C2 := C2 shl 10 or C2 shr 22;
+  Inc(E2, Buffer[ 0] + (A2 xor B2 xor C2)); E2 := E2 shl 15 or E2 shr 17 + D2; B2 := B2 shl 10 or B2 shr 22;
+  Inc(D2, Buffer[ 3] + (E2 xor A2 xor B2)); D2 := D2 shl 13 or D2 shr 19 + C2; A2 := A2 shl 10 or A2 shr 22;
+  Inc(C2, Buffer[ 9] + (D2 xor E2 xor A2)); C2 := C2 shl 11 or C2 shr 21 + B2; E2 := E2 shl 10 or E2 shr 22;
+  Inc(B2, Buffer[11] + (C2 xor D2 xor E2)); B2 := B2 shl 11 or B2 shr 21 + A2; D2 := D2 shl 10 or D2 shr 22;
+
+  T := E1; E1 := E2; E2 := T;
+
+  Inc(FDigest[0], A1);
+  Inc(FDigest[1], B1);
+  Inc(FDigest[2], C1);
+  Inc(FDigest[3], D1);
+  Inc(FDigest[4], E1);
+  Inc(FDigest[5], A2);
+  Inc(FDigest[6], B2);
+  Inc(FDigest[7], C2);
+  Inc(FDigest[8], D2);
+  Inc(FDigest[9], E2);
+end;
+
+class function TROHash_RipeMD320.DigestKeySize: Integer;
+begin
+  Result := 40;
+end;
+
+class function TROHash_SHA.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    0DCh,01Fh,07Dh,07Ch,096h,0DDh,0C7h,0FCh
+         DB    04Dh,00Ah,0F2h,0CCh,012h,0E7h,0F7h,066h
+         DB    05Bh,0B1h,085h,0ACh
+end;
+
+procedure SHABuffer386(S, D: Pointer; Rotate: Boolean); assembler;
+asm
+     PUSH  EBX
+     PUSH  ECX
+     MOV   EBX,EAX
+     XOR   ECX,ECX
+@@1: MOV   EAX,[EDX + ECX * 4]
+     XCHG  AL,AH
+     ROL   EAX,16
+     XCHG  AL,AH
+     MOV   [EBX],EAX
+     ADD   EBX,4
+     INC   ECX
+     CMP   ECX,16
+     JNZ   @@1
+     MOV   ECX,64
+     POP   EDX
+     CMP   DL,0
+     JZ    @@3
+@@2: MOV   EAX,[EBX -  3 * 4]
+     XOR   EAX,[EBX -  8 * 4]
+     XOR   EAX,[EBX - 14 * 4]
+     XOR   EAX,[EBX - 16 * 4]
+     ROL   EAX,1
+     MOV   [EBX],EAX
+     ADD   EBX,4
+     DEC   ECX
+     JNZ   @@2
+     JMP   @@4
+
+@@3: MOV   EAX,[EBX -  3 * 4]
+     XOR   EAX,[EBX -  8 * 4]
+     XOR   EAX,[EBX - 14 * 4]
+     XOR   EAX,[EBX - 16 * 4]
+     MOV   [EBX],EAX
+     ADD   EBX,4
+     DEC   ECX
+     JNZ   @@3
+
+@@4: POP   EBX
+end;
+
+procedure SHABuffer486(S, D: Pointer; Rotate: Boolean); assembler;
+asm
+     PUSH  EBX
+     PUSH  ECX
+     MOV   EBX,EAX
+     XOR   ECX,ECX
+@@1: MOV   EAX,[EDX + ECX * 4]
+     BSWAP EAX
+     MOV   [EBX],EAX
+     ADD   EBX,4
+     INC   ECX
+     CMP   ECX,16
+     JNZ   @@1
+     MOV   ECX,64
+     POP   EDX
+     CMP   DL,0
+     JZ    @@3
+@@2: MOV   EAX,[EBX -  3 * 4]
+     XOR   EAX,[EBX -  8 * 4]
+     XOR   EAX,[EBX - 14 * 4]
+     XOR   EAX,[EBX - 16 * 4]
+     ROL   EAX,1
+     MOV   [EBX],EAX
+     ADD   EBX,4
+     DEC   ECX
+     JNZ   @@2
+     JMP   @@4
+
+@@3: MOV   EAX,[EBX -  3 * 4]
+     XOR   EAX,[EBX -  8 * 4]
+     XOR   EAX,[EBX - 14 * 4]
+     XOR   EAX,[EBX - 16 * 4]
+     MOV   [EBX],EAX
+     ADD   EBX,4
+     DEC   ECX
+     JNZ   @@3
+
+@@4: POP   EBX
+end;
+
+const
+  SHABuffer: procedure(S, D: Pointer; Rotate: Boolean) = SHABuffer486;
+
+procedure TROHash_SHA.Transform(Buffer: PIntArray);
+var
+  A, B, C, D, E: LongWord;
+  W: array[0..79] of LongWord;
+begin
+  SHABuffer(@W, Buffer, FRotate);
+
+  A := FDigest[0];
+  B := FDigest[1];
+  C := FDigest[2];
+  D := FDigest[3];
+  E := FDigest[4];
+
+  Inc(E, (A shl 5 or A shr 27) + (D xor (B and (C xor D))) + W[ 0] + $5A827999); B := B shr 2 or B shl 30;
+  Inc(D, (E shl 5 or E shr 27) + (C xor (A and (B xor C))) + W[ 1] + $5A827999); A := A shr 2 or A shl 30;
+  Inc(C, (D shl 5 or D shr 27) + (B xor (E and (A xor B))) + W[ 2] + $5A827999); E := E shr 2 or E shl 30;
+  Inc(B, (C shl 5 or C shr 27) + (A xor (D and (E xor A))) + W[ 3] + $5A827999); D := D shr 2 or D shl 30;
+  Inc(A, (B shl 5 or B shr 27) + (E xor (C and (D xor E))) + W[ 4] + $5A827999); C := C shr 2 or C shl 30;
+  Inc(E, (A shl 5 or A shr 27) + (D xor (B and (C xor D))) + W[ 5] + $5A827999); B := B shr 2 or B shl 30;
+  Inc(D, (E shl 5 or E shr 27) + (C xor (A and (B xor C))) + W[ 6] + $5A827999); A := A shr 2 or A shl 30;
+  Inc(C, (D shl 5 or D shr 27) + (B xor (E and (A xor B))) + W[ 7] + $5A827999); E := E shr 2 or E shl 30;
+  Inc(B, (C shl 5 or C shr 27) + (A xor (D and (E xor A))) + W[ 8] + $5A827999); D := D shr 2 or D shl 30;
+  Inc(A, (B shl 5 or B shr 27) + (E xor (C and (D xor E))) + W[ 9] + $5A827999); C := C shr 2 or C shl 30;
+  Inc(E, (A shl 5 or A shr 27) + (D xor (B and (C xor D))) + W[10] + $5A827999); B := B shr 2 or B shl 30;
+  Inc(D, (E shl 5 or E shr 27) + (C xor (A and (B xor C))) + W[11] + $5A827999); A := A shr 2 or A shl 30;
+  Inc(C, (D shl 5 or D shr 27) + (B xor (E and (A xor B))) + W[12] + $5A827999); E := E shr 2 or E shl 30;
+  Inc(B, (C shl 5 or C shr 27) + (A xor (D and (E xor A))) + W[13] + $5A827999); D := D shr 2 or D shl 30;
+  Inc(A, (B shl 5 or B shr 27) + (E xor (C and (D xor E))) + W[14] + $5A827999); C := C shr 2 or C shl 30;
+  Inc(E, (A shl 5 or A shr 27) + (D xor (B and (C xor D))) + W[15] + $5A827999); B := B shr 2 or B shl 30;
+  Inc(D, (E shl 5 or E shr 27) + (C xor (A and (B xor C))) + W[16] + $5A827999); A := A shr 2 or A shl 30;
+  Inc(C, (D shl 5 or D shr 27) + (B xor (E and (A xor B))) + W[17] + $5A827999); E := E shr 2 or E shl 30;
+  Inc(B, (C shl 5 or C shr 27) + (A xor (D and (E xor A))) + W[18] + $5A827999); D := D shr 2 or D shl 30;
+  Inc(A, (B shl 5 or B shr 27) + (E xor (C and (D xor E))) + W[19] + $5A827999); C := C shr 2 or C shl 30;
+
+  Inc(E, (A shl 5 or A shr 27) + (D xor B xor C) + W[20] + $6ED9EBA1); B := B shr 2 or B shl 30;
+  Inc(D, (E shl 5 or E shr 27) + (C xor A xor B) + W[21] + $6ED9EBA1); A := A shr 2 or A shl 30;
+  Inc(C, (D shl 5 or D shr 27) + (B xor E xor A) + W[22] + $6ED9EBA1); E := E shr 2 or E shl 30;
+  Inc(B, (C shl 5 or C shr 27) + (A xor D xor E) + W[23] + $6ED9EBA1); D := D shr 2 or D shl 30;
+  Inc(A, (B shl 5 or B shr 27) + (E xor C xor D) + W[24] + $6ED9EBA1); C := C shr 2 or C shl 30;
+  Inc(E, (A shl 5 or A shr 27) + (D xor B xor C) + W[25] + $6ED9EBA1); B := B shr 2 or B shl 30;
+  Inc(D, (E shl 5 or E shr 27) + (C xor A xor B) + W[26] + $6ED9EBA1); A := A shr 2 or A shl 30;
+  Inc(C, (D shl 5 or D shr 27) + (B xor E xor A) + W[27] + $6ED9EBA1); E := E shr 2 or E shl 30;
+  Inc(B, (C shl 5 or C shr 27) + (A xor D xor E) + W[28] + $6ED9EBA1); D := D shr 2 or D shl 30;
+  Inc(A, (B shl 5 or B shr 27) + (E xor C xor D) + W[29] + $6ED9EBA1); C := C shr 2 or C shl 30;
+  Inc(E, (A shl 5 or A shr 27) + (D xor B xor C) + W[30] + $6ED9EBA1); B := B shr 2 or B shl 30;
+  Inc(D, (E shl 5 or E shr 27) + (C xor A xor B) + W[31] + $6ED9EBA1); A := A shr 2 or A shl 30;
+  Inc(C, (D shl 5 or D shr 27) + (B xor E xor A) + W[32] + $6ED9EBA1); E := E shr 2 or E shl 30;
+  Inc(B, (C shl 5 or C shr 27) + (A xor D xor E) + W[33] + $6ED9EBA1); D := D shr 2 or D shl 30;
+  Inc(A, (B shl 5 or B shr 27) + (E xor C xor D) + W[34] + $6ED9EBA1); C := C shr 2 or C shl 30;
+  Inc(E, (A shl 5 or A shr 27) + (D xor B xor C) + W[35] + $6ED9EBA1); B := B shr 2 or B shl 30;
+  Inc(D, (E shl 5 or E shr 27) + (C xor A xor B) + W[36] + $6ED9EBA1); A := A shr 2 or A shl 30;
+  Inc(C, (D shl 5 or D shr 27) + (B xor E xor A) + W[37] + $6ED9EBA1); E := E shr 2 or E shl 30;
+  Inc(B, (C shl 5 or C shr 27) + (A xor D xor E) + W[38] + $6ED9EBA1); D := D shr 2 or D shl 30;
+  Inc(A, (B shl 5 or B shr 27) + (E xor C xor D) + W[39] + $6ED9EBA1); C := C shr 2 or C shl 30;
+
+  Inc(E, (A shl 5 or A shr 27) + ((B and C) or (D and (B or C))) + W[40] + $8F1BBCDC); B := B shr 2 or B shl 30;
+  Inc(D, (E shl 5 or E shr 27) + ((A and B) or (C and (A or B))) + W[41] + $8F1BBCDC); A := A shr 2 or A shl 30;
+  Inc(C, (D shl 5 or D shr 27) + ((E and A) or (B and (E or A))) + W[42] + $8F1BBCDC); E := E shr 2 or E shl 30;
+  Inc(B, (C shl 5 or C shr 27) + ((D and E) or (A and (D or E))) + W[43] + $8F1BBCDC); D := D shr 2 or D shl 30;
+  Inc(A, (B shl 5 or B shr 27) + ((C and D) or (E and (C or D))) + W[44] + $8F1BBCDC); C := C shr 2 or C shl 30;
+  Inc(E, (A shl 5 or A shr 27) + ((B and C) or (D and (B or C))) + W[45] + $8F1BBCDC); B := B shr 2 or B shl 30;
+  Inc(D, (E shl 5 or E shr 27) + ((A and B) or (C and (A or B))) + W[46] + $8F1BBCDC); A := A shr 2 or A shl 30;
+  Inc(C, (D shl 5 or D shr 27) + ((E and A) or (B and (E or A))) + W[47] + $8F1BBCDC); E := E shr 2 or E shl 30;
+  Inc(B, (C shl 5 or C shr 27) + ((D and E) or (A and (D or E))) + W[48] + $8F1BBCDC); D := D shr 2 or D shl 30;
+  Inc(A, (B shl 5 or B shr 27) + ((C and D) or (E and (C or D))) + W[49] + $8F1BBCDC); C := C shr 2 or C shl 30;
+  Inc(E, (A shl 5 or A shr 27) + ((B and C) or (D and (B or C))) + W[50] + $8F1BBCDC); B := B shr 2 or B shl 30;
+  Inc(D, (E shl 5 or E shr 27) + ((A and B) or (C and (A or B))) + W[51] + $8F1BBCDC); A := A shr 2 or A shl 30;
+  Inc(C, (D shl 5 or D shr 27) + ((E and A) or (B and (E or A))) + W[52] + $8F1BBCDC); E := E shr 2 or E shl 30;
+  Inc(B, (C shl 5 or C shr 27) + ((D and E) or (A and (D or E))) + W[53] + $8F1BBCDC); D := D shr 2 or D shl 30;
+  Inc(A, (B shl 5 or B shr 27) + ((C and D) or (E and (C or D))) + W[54] + $8F1BBCDC); C := C shr 2 or C shl 30;
+  Inc(E, (A shl 5 or A shr 27) + ((B and C) or (D and (B or C))) + W[55] + $8F1BBCDC); B := B shr 2 or B shl 30;
+  Inc(D, (E shl 5 or E shr 27) + ((A and B) or (C and (A or B))) + W[56] + $8F1BBCDC); A := A shr 2 or A shl 30;
+  Inc(C, (D shl 5 or D shr 27) + ((E and A) or (B and (E or A))) + W[57] + $8F1BBCDC); E := E shr 2 or E shl 30;
+  Inc(B, (C shl 5 or C shr 27) + ((D and E) or (A and (D or E))) + W[58] + $8F1BBCDC); D := D shr 2 or D shl 30;
+  Inc(A, (B shl 5 or B shr 27) + ((C and D) or (E and (C or D))) + W[59] + $8F1BBCDC); C := C shr 2 or C shl 30;
+
+  Inc(E, (A shl 5 or A shr 27) + (D xor B xor C) + W[60] + $CA62C1D6); B := B shr 2 or B shl 30;
+  Inc(D, (E shl 5 or E shr 27) + (C xor A xor B) + W[61] + $CA62C1D6); A := A shr 2 or A shl 30;
+  Inc(C, (D shl 5 or D shr 27) + (B xor E xor A) + W[62] + $CA62C1D6); E := E shr 2 or E shl 30;
+  Inc(B, (C shl 5 or C shr 27) + (A xor D xor E) + W[63] + $CA62C1D6); D := D shr 2 or D shl 30;
+  Inc(A, (B shl 5 or B shr 27) + (E xor C xor D) + W[64] + $CA62C1D6); C := C shr 2 or C shl 30;
+  Inc(E, (A shl 5 or A shr 27) + (D xor B xor C) + W[65] + $CA62C1D6); B := B shr 2 or B shl 30;
+  Inc(D, (E shl 5 or E shr 27) + (C xor A xor B) + W[66] + $CA62C1D6); A := A shr 2 or A shl 30;
+  Inc(C, (D shl 5 or D shr 27) + (B xor E xor A) + W[67] + $CA62C1D6); E := E shr 2 or E shl 30;
+  Inc(B, (C shl 5 or C shr 27) + (A xor D xor E) + W[68] + $CA62C1D6); D := D shr 2 or D shl 30;
+  Inc(A, (B shl 5 or B shr 27) + (E xor C xor D) + W[69] + $CA62C1D6); C := C shr 2 or C shl 30;
+  Inc(E, (A shl 5 or A shr 27) + (D xor B xor C) + W[70] + $CA62C1D6); B := B shr 2 or B shl 30;
+  Inc(D, (E shl 5 or E shr 27) + (C xor A xor B) + W[71] + $CA62C1D6); A := A shr 2 or A shl 30;
+  Inc(C, (D shl 5 or D shr 27) + (B xor E xor A) + W[72] + $CA62C1D6); E := E shr 2 or E shl 30;
+  Inc(B, (C shl 5 or C shr 27) + (A xor D xor E) + W[73] + $CA62C1D6); D := D shr 2 or D shl 30;
+  Inc(A, (B shl 5 or B shr 27) + (E xor C xor D) + W[74] + $CA62C1D6); C := C shr 2 or C shl 30;
+  Inc(E, (A shl 5 or A shr 27) + (D xor B xor C) + W[75] + $CA62C1D6); B := B shr 2 or B shl 30;
+  Inc(D, (E shl 5 or E shr 27) + (C xor A xor B) + W[76] + $CA62C1D6); A := A shr 2 or A shl 30;
+  Inc(C, (D shl 5 or D shr 27) + (B xor E xor A) + W[77] + $CA62C1D6); E := E shr 2 or E shl 30;
+  Inc(B, (C shl 5 or C shr 27) + (A xor D xor E) + W[78] + $CA62C1D6); D := D shr 2 or D shl 30;
+  Inc(A, (B shl 5 or B shr 27) + (E xor C xor D) + W[79] + $CA62C1D6); C := C shr 2 or C shl 30;
+
+  Inc(FDigest[0], A);
+  Inc(FDigest[1], B);
+  Inc(FDigest[2], C);
+  Inc(FDigest[3], D);
+  Inc(FDigest[4], E);
+end;
+
+procedure TROHash_SHA.Done;
+var
+  I: Integer;
+  S: Comp;
+begin
+  I := FCount mod 64;
+  FBuffer[I] := $80;
+  Inc(I);
+  if I > 64 - 8 then
+  begin
+    FillChar(FBuffer[I], 64 - I, 0);
+    Transform(@FBuffer);
+    I := 0;
+  end;
+  FillChar(FBuffer[I], 64 - I, 0);
+  S := FCount * 8;
+  for I := 0 to 7 do FBuffer[63 - I] := PByteArray(@S)^[I];
+  Transform(@FBuffer);
+  FillChar(FBuffer, SizeOf(FBuffer), 0);
+{and here the Endian conversion}
+  SwapIntegerBuffer(@FDigest, @FDigest, 5);
+  Protect(False);
+end;
+
+class function TROHash_SHA1.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    09Ah,001h,02Eh,063h,096h,02Ah,092h,0EBh
+         DB    0D8h,02Eh,0F0h,0BCh,01Ch,0A4h,051h,06Ah
+         DB    008h,069h,02Eh,068h
+end;
+
+procedure TROHash_SHA1.Init;
+begin
+  FRotate := True;
+  inherited Init;
+end;
+
+class function TROHash_Haval256.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    0E9h,092h,0C1h,0FBh,079h,0E9h,0BAh,0A8h
+         DB    028h,05Ch,07Ah,073h,00Bh,0EBh,00Ch,07Ch
+         DB    0ADh,0F3h,0F7h,0ADh,026h,0D7h,0EFh,0E2h
+         DB    01Fh,0F4h,0BFh,067h,057h,069h,0D5h,09Ah
+end;
+
+procedure TROHash_Haval256.SetRounds(Value: Integer);
+begin
+  if (Value < 3) or (Value > 5) then
+    if DigestKeySize <= 20 then Value := 3 else
+      if DigestKeySize <= 28 then Value := 4
+        else Value := 5;
+  FRounds := Value;
+  case FRounds of
+    3: FTransform := Transform3;
+    4: FTransform := Transform4;
+    5: FTransform := Transform5;
+  end;
+end;
+{3 Rounds}
+procedure TROHash_Haval256.Transform3(Buffer: PIntArray);
+var
+  A,B,C,D,E,F,G,H,I,T: LongWord;
+  Data: PInteger;
+  Offset: PByte;
+begin
+  Offset := @Haval_Offset;
+  Data   := @Haval_Data;
+
+  A := FDigest[0];
+  B := FDigest[1];
+  C := FDigest[2];
+  D := FDigest[3];
+  E := FDigest[4];
+  F := FDigest[5];
+  G := FDigest[6];
+  H := FDigest[7];
+
+  for I := 0 to 31 do
+  begin
+    T := C and (E xor D) xor G and A xor F and B xor E;
+    T := (T shr 7 or T shl 25) + (H shr 11 or H shl 21) + Buffer[I];
+    H := G; G := F; F := E; E := D; D := C; C := B; B := A; A := T;
+  end;
+  for I := 0 to 31 do
+  begin
+    T := F and (D and not A xor B and C xor E xor G) xor B and (D xor C) xor A and C xor G;
+    T := (T shr 7 or T shl 25) + (H shr 11 or H shl 21) + Buffer[Offset^] + Data^;
+    Inc(Offset); Inc(Data);
+    H := G; G := F; F := E; E := D; D := C; C := B; B := A; A := T;
+  end;
+  for I := 0 to 31 do
+  begin
+    T := D and (F and E xor G xor A) xor F and C xor E and B xor A;
+    T := (T shr 7 or T shl 25) + (H shr 11 or H shl 21) + Buffer[Offset^] + Data^;
+    Inc(Offset); Inc(Data);
+    H := G; G := F; F := E; E := D; D := C; C := B; B := A; A := T;
+  end;
+
+  Inc(FDigest[0], A);
+  Inc(FDigest[1], B);
+  Inc(FDigest[2], C);
+  Inc(FDigest[3], D);
+  Inc(FDigest[4], E);
+  Inc(FDigest[5], F);
+  Inc(FDigest[6], G);
+  Inc(FDigest[7], H);
+end;
+{4 Rounds}
+procedure TROHash_Haval256.Transform4(Buffer: PIntArray);
+var
+  A,B,C,D,E,F,G,H,I,T: LongWord;
+  Data: PInteger;
+  Offset: PByte;
+begin
+  Offset := @Haval_Offset;
+  Data   := @Haval_Data;
+
+  A := FDigest[0];
+  B := FDigest[1];
+  C := FDigest[2];
+  D := FDigest[3];
+  E := FDigest[4];
+  F := FDigest[5];
+  G := FDigest[6];
+  H := FDigest[7];
+
+  for I := 0 to 31 do
+  begin
+    T := D and (A xor B) xor F and G xor E and C xor A;
+    T := (T shr 7 or T shl 25) + (H shr 11 or H shl 21) + Buffer[I];
+    H := G; G := F; F := E; E := D; D := C; C := B; B := A; A := T;
+  end;
+  for I := 0 to 31 do
+  begin
+    T := B and (G and not A xor C and F xor D xor E) xor C and (G xor F) xor A and F xor E;
+    T := (T shr 7 or T shl 25) + (H shr 11 or H shl 21) + Buffer[Offset^] + Data^;
+    Inc(Offset); Inc(Data);
+    H := G; G := F; F := E; E := D; D := C; C := B; B := A; A := T;
+  end;
+  for I := 0 to 31 do
+  begin
+    T := G and (C and A xor B xor F) xor C and D xor A and E xor F;
+    T := (T shr 7 or T shl 25) + (H shr 11 or H shl 21) + Buffer[Offset^] + Data^;
+    Inc(Offset); Inc(Data);
+    H := G; G := F; F := E; E := D; D := C; C := B; B := A; A := T;
+  end;
+  for I := 0 to 31 do
+  begin
+    T := A and (E and not C xor F and not G xor B xor G xor D) xor F and
+        (B and C xor E xor G) xor C and G xor D;
+    T := (T shr 7 or T shl 25) + (H shr 11 or H shl 21) + Buffer[Offset^] + Data^;
+    Inc(Offset); Inc(Data);
+    H := G; G := F; F := E; E := D; D := C; C := B; B := A; A := T;
+  end;
+
+  Inc(FDigest[0], A);
+  Inc(FDigest[1], B);
+  Inc(FDigest[2], C);
+  Inc(FDigest[3], D);
+  Inc(FDigest[4], E);
+  Inc(FDigest[5], F);
+  Inc(FDigest[6], G);
+  Inc(FDigest[7], H);
+end;
+
+{5 Rounds}
+procedure TROHash_Haval256.Transform5(Buffer: PIntArray);
+var
+  A,B,C,D,E,F,G,H,I,T: LongWord;
+  Data: PInteger;
+  Offset: PByte;
+begin
+  Offset := @Haval_Offset;
+  Data   := @Haval_Data;
+
+  A := FDigest[0];
+  B := FDigest[1];
+  C := FDigest[2];
+  D := FDigest[3];
+  E := FDigest[4];
+  F := FDigest[5];
+  G := FDigest[6];
+  H := FDigest[7];
+
+  for I := 0 to 31 do
+  begin
+    T := C and (G xor B) xor F and E xor A and D xor G;
+    T := (T shr 7 or T shl 25) + (H shr 11 or H shl 21) + Buffer[I];
+    H := G; G := F; F := E; E := D; D := C; C := B; B := A; A := T;
+  end;
+  for I := 0 to 31 do
+  begin
+    T := D and (E and not A xor B and C xor G xor F) xor B and (E xor C) xor A and C xor F;
+    T := (T shr 7 or T shl 25) + (H shr 11 or H shl 21) + Buffer[Offset^] + Data^;
+    Inc(Offset); Inc(Data);
+    H := G; G := F; F := E; E := D; D := C; C := B; B := A; A := T;
+  end;
+  for I := 0 to 31 do
+  begin
+    T := E and (B and D xor C xor F) xor B and A xor D and G xor F;
+    T := (T shr 7 or T shl 25) + (H shr 11 or H shl 21) + Buffer[Offset^] + Data^;
+    Inc(Offset); Inc(Data);
+    H := G; G := F; F := E; E := D; D := C; C := B; B := A; A := T;
+  end;
+  for I := 0 to 31 do
+  begin
+    T := D and (F and not A xor C and not B xor E xor B xor G) xor C and
+        (E and A xor F xor B) xor A and B xor G;
+    T := (T shr 7 or T shl 25) + (H shr 11 or H shl 21) + Buffer[Offset^] + Data^;
+    Inc(Offset); Inc(Data);
+    H := G; G := F; F := E; E := D; D := C; C := B; B := A; A := T;
+  end;
+  for I := 0 to 31 do
+  begin
+    T := B and (D and E and G xor not F) xor D and A xor E and F xor G and C;
+    T := (T shr 7 or T shl 25) + (H shr 11 or H shl 21) + Buffer[Offset^] + Data^;
+    Inc(Offset); Inc(Data);
+    H := G; G := F; F := E; E := D; D := C; C := B; B := A; A := T;
+  end;
+
+  Inc(FDigest[0], A);
+  Inc(FDigest[1], B);
+  Inc(FDigest[2], C);
+  Inc(FDigest[3], D);
+  Inc(FDigest[4], E);
+  Inc(FDigest[5], F);
+  Inc(FDigest[6], G);
+  Inc(FDigest[7], H);
+end;
+
+class function TROHash_Haval256.DigestKeySize: Integer;
+begin
+  Result := 32;
+end;
+
+procedure TROHash_Haval256.Init;
+begin
+  FillChar(FBuffer, SizeOf(FBuffer), 0);
+  SetRounds(FRounds);
+  FCount := 0;
+  FDigest[0] := $243F6A88;
+  FDigest[1] := $85A308D3;
+  FDigest[2] := $13198A2E;
+  FDigest[3] := $03707344;
+  FDigest[4] := $A4093822;
+  FDigest[5] := $299F31D0;
+  FDigest[6] := $082EFA98;
+  FDigest[7] := $EC4E6C89;
+  Protect(True);
+end;
+
+procedure TROHash_Haval256.Done;
+var
+  I: Integer;
+  S: Comp;
+begin
+  I := FCount mod 128;
+  FBuffer[I] := $01;
+{ops, $80 in the C Reference Implementation, but $01 in the Documentation ???}
+  Inc(I);
+  if I > 118 then
+  begin
+    FillChar(FBuffer[I], 118 - I, 0);
+    FTransform(@FBuffer);
+    I := 0;
+  end;
+  FillChar(FBuffer[I], 118 - I, 0);
+  I := DigestKeySize * 8; {in bits}
+  FBuffer[118] := I and 3 shl 6 or FRounds shl 3 or 1;
+  FBuffer[119] := I shr 2 and $FF;
+  S := FCount * 8;
+  Move(S, FBuffer[120], SizeOf(S));
+  FTransform(@FBuffer);
+  FillChar(FBuffer, SizeOf(FBuffer), 0);
+  case I of
+    128: begin
+           Inc(FDigest[0], ROR(FDigest[7] and $000000FF or
+                               FDigest[6] and $FF000000 or
+                               FDigest[5] and $00FF0000 or
+                               FDigest[4] and $0000FF00, 8));
+           Inc(FDigest[1], ROR(FDigest[7] and $0000FF00 or
+                               FDigest[6] and $000000FF or
+                               FDigest[5] and $FF000000 or
+                               FDigest[4] and $00FF0000, 16));
+           Inc(FDigest[2], ROR(FDigest[7] and $00FF0000 or
+                               FDigest[6] and $0000FF00 or
+                               FDigest[5] and $000000FF or
+                               FDigest[4] and $FF000000, 24));
+           Inc(FDigest[3], FDigest[7] and $FF000000 or
+                           FDigest[6] and $00FF0000 or
+                           FDigest[5] and $0000FF00 or
+                           FDigest[4] and $000000FF);
+         end;
+    160: begin
+           Inc(FDigest[0], ROR(FDigest[7] and ($3F) or
+                               FDigest[6] and ($7F shl 25) or
+                               FDigest[5] and ($3F shl 19), 19));
+           Inc(FDigest[1], ROR(FDigest[7] and ($3F shl 6) or
+                               FDigest[6] and ($3F) or
+                               FDigest[5] and ($7F shl 25), 25));
+           Inc(FDigest[2], FDigest[7] and ($7F shl 12) or
+                           FDigest[6] and ($3F shl  6) or
+                           FDigest[5] and ($3F));
+           Inc(FDigest[3], (FDigest[7] and ($3F shl 19) or
+                            FDigest[6] and ($7F shl 12) or
+                            FDigest[5] and ($3F shl  6)) shr 6);
+           Inc(FDigest[4], (FDigest[7] and ($37 shl 25) or
+                            FDigest[6] and ($3F shl 19) or
+                            FDigest[5] and ($7F shl 12)) shr 12);
+         end;
+    192: begin
+           Inc(FDigest[0], ROR(FDigest[7] and ($3F) or
+                               FDigest[6] and ($3F shl 26), 26));
+           Inc(FDigest[1], FDigest[7] and ($1F shl 5) or
+                           FDigest[6] and ($1F));
+           Inc(FDigest[2], (FDigest[7] and ($3F shl 10) or
+                            FDigest[6] and ($1F shl  5)) shr 5);
+           Inc(FDigest[3], (FDigest[7] and ($1F shl 16) or
+                            FDigest[6] and ($3F shl 10)) shr 10);
+           Inc(FDigest[4], (FDigest[7] and ($1F shl 21) or
+                            FDigest[6] and ($1F shl 16)) shr 16);
+           Inc(FDigest[5], (FDigest[7] and ($3F shl 26) or
+                            FDigest[6] and ($1F shl 21)) shr 21);
+         end;
+    224: begin
+           Inc(FDigest[0], FDigest[7] shr 27 and $1F);
+           Inc(FDigest[1], FDigest[7] shr 22 and $1F);
+           Inc(FDigest[2], FDigest[7] shr 18 and $0F);
+           Inc(FDigest[3], FDigest[7] shr 13 and $1F);
+           Inc(FDigest[4], FDigest[7] shr  9 and $0F);
+           Inc(FDigest[5], FDigest[7] shr  4 and $1F);
+           Inc(FDigest[6], FDigest[7]        and $0F);
+         end;
+  end;
+  Protect(False);
+end;
+
+procedure TROHash_Haval256.Calc(const Data; DataSize: Integer);
+var
+  Index: Integer;
+  P: PChar;
+begin
+  if DataSize <= 0 then Exit;
+  Index := FCount and $3F;
+  Inc(FCount, DataSize);
+  if Index > 0 then
+  begin
+    if DataSize < 128 - Index then
+    begin
+      Move(Data, FBuffer[Index], DataSize);
+      Exit;
+    end;
+    Move(Data, FBuffer[Index], 128 - Index);
+    FTransform(@FBuffer);
+    Index := 128 - Index;
+    Dec(DataSize, Index);
+  end;
+  P := @TByteArray(Data)[Index];
+  Inc(Index, DataSize and not $7F);
+  while DataSize >= 128 do
+  begin
+    FTransform(Pointer(P));
+    Inc(P, 128);
+    Dec(DataSize, 128);
+  end;
+  Move(TByteArray(Data)[Index], FBuffer, DataSize);
+end;
+
+function TROHash_Haval256.DigestKey: Pointer;
+begin
+  Result := @FDigest;
+end;
+
+class function TROHash_Haval224.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    032h,03Ah,0DCh,0B3h,075h,0B5h,08Fh,05Ah
+         DB    06Ah,0F1h,066h,089h,099h,05Ah,07Ah,098h
+         DB    071h,06Eh,022h,077h,0BCh,002h,029h,038h
+         DB    067h,0A5h,0CCh,0E1h
+end;
+
+class function TROHash_Haval224.DigestKeySize: Integer;
+begin
+  Result := 28;
+end;
+
+class function TROHash_Haval192.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    030h,0AEh,0ECh,03Fh,0C1h,08Eh,061h,018h
+         DB    0A4h,0F2h,0A3h,0E8h,006h,06Ch,03Bh,064h
+         DB    0A6h,0A9h,02Eh,07Dh,0E2h,052h,0A0h,0B5h
+end;
+
+class function TROHash_Haval192.DigestKeySize: Integer;
+begin
+  Result := 24;
+end;
+
+class function TROHash_Haval160.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    013h,0DDh,0BDh,032h,033h,0BCh,004h,08Dh
+         DB    06Dh,0F6h,063h,056h,037h,0E2h,0A0h,0D0h
+         DB    053h,01Bh,090h,003h
+end;
+
+class function TROHash_Haval160.DigestKeySize: Integer;
+begin
+  Result := 20;
+end;
+
+class function TROHash_Haval128.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    0D8h,0CBh,0CDh,0ECh,07Ah,0FDh,0C8h,0A5h
+         DB    0F2h,07Bh,0D2h,012h,0B9h,033h,09Ah,0BDh
+end;
+
+class function TROHash_Haval128.DigestKeySize: Integer;
+begin
+  Result := 16;
+end;
+
+procedure TROHash_Snefru.SetSecurity_Level(Value: Integer);
+begin
+  if (Value < 2) or (Value > 8) then Value := 8;
+  FSecurity_Level := Value;
+end;
+
+class function TROHash_Snefru.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    0D6h,090h,0EEh,067h,028h,0D9h,0BAh,002h
+         DB    0A3h,0C7h,090h,0EEh,050h,073h,019h,074h
+         DB    01Fh,0BFh,06Bh,083h,0EBh,09Ah,06Bh,0DFh
+         DB    0F5h,07Ah,0D8h,0C3h,007h,08Dh,0A4h,034h
+end;
+
+class function TROHash_Snefru.DigestKeySize: Integer;
+begin
+  Result := 32;
+end;
+
+procedure TROHash_Snefru.Init;
+begin
+  FillChar(FDigest, SizeOf(FDigest), 0);
+  FillChar(FBuffer, SizeOf(FBuffer), 0);
+  FSecurity_Level := 8;
+  FCount := 0;
+  Protect(True);
+end;
+
+procedure TROHash_Snefru.Transform(Buffer: PIntArray);
+const
+  ShiftTable: array[0..3] of Integer = (16, 8, 16, 24);
+var
+  I,Index,ByteInWord, T, S: LongWord;
+  D,Box: PIntArray;
+begin
+  D := @FDigest;
+  Move(Buffer^, D[8], 32);
+  for Index := 0 to FSecurity_Level-1 do
+  begin
+    for ByteInWord := 0 to 3 do
+    begin
+      I := 0;
+      while I < 16 do
+      begin
+        Box := @Snefru_Data[(Index shl 1) + ((I shr 1) and 1)];
+        S := Box[D[I] and $FF];
+        T := (I +  1) and 15; D[T] := D[T] xor S;
+        T := (I + 15) and 15; D[T] := D[T] xor S;
+        Inc(I);
+        S := Box[D[I] and $FF];
+        T := (I +  1) and 15; D[T] := D[T] xor S;
+        T := (I + 15) and 15; D[T] := D[T] xor S;
+        Inc(I);
+      end;
+      T := ShiftTable[ByteInWord];
+      S := 32 - T;
+      for I := 0 to 15 do D[I] := D[I] shr T or D[I] shl S;
+    end;
+  end;
+  for I := 0 to 7 do D[I] := D[I] xor D[15 - I];
+end;
+
+procedure TROHash_Snefru.Done;
+var
+  I: Integer;
+  S: Comp;
+begin
+  I := FCount and $1F;
+  Inc(I);
+  if I > 32 - 8 then
+  begin
+    FillChar(FBuffer[I], 32 - I, 0);
+    Transform(@FBuffer);
+    I := 0;
+  end;
+  FillChar(FBuffer[I], 32 - I, 0);
+  S := FCount * 8;
+  Move(S, FBuffer[32 - 8], SizeOf(S));
+  Transform(@FBuffer);
+  FillChar(FBuffer, SizeOf(FBuffer), 0);
+  Protect(False);
+end;
+
+procedure TROHash_Snefru.Calc(const Data; DataSize: Integer);
+var
+  Index: Integer;
+  P: PChar;
+begin
+  if DataSize <= 0 then Exit;
+  Index := FCount and $1F;
+  Inc(FCount, DataSize);
+  if Index > 0 then
+  begin
+    if DataSize < 32 - Index then
+    begin
+      Move(Data, FBuffer[Index], DataSize);
+      Exit;
+    end;
+    Move(Data, FBuffer[Index], 32 - Index);
+    Transform(@FBuffer);
+    Index := 32 - Index;
+    Dec(DataSize, Index);
+  end;
+  P := @TByteArray(Data)[Index];
+  Inc(Index, DataSize and not $1F);
+  while DataSize >= 32 do
+  begin
+    Transform(Pointer(P));
+    Inc(P, 32);
+    Dec(DataSize, 32);
+  end;
+  Move(TByteArray(Data)[Index], FBuffer, DataSize);
+end;
+
+function TROHash_Snefru.DigestKey: Pointer;
+begin
+  Result := @FDigest;
+end;
+
+procedure TROHash_Tiger.SetRounds(Value: Integer);
+begin
+  if (Value < 3) or (Value > 32) then Value := 3;
+  FRounds := Value;
+end;
+
+class function TROHash_Tiger.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    076h,010h,0D2h,0CDh,0A5h,017h,0A4h,0D6h
+         DB    0FFh,035h,073h,04Fh,0CEh,05Ch,077h,095h
+         DB    0F3h,0A1h,051h,06Eh,01Eh,002h,04Dh,087h
+end;
+
+{$IFDEF _VER_D4H}
+// the Code for D4, but courios, the code is slower of a PII
+// and faster with AMD K6 ????
+(*
+procedure TROHash_Tiger.Transform(Buffer: PIntArray);
+type
+  PTiger_Data = ^TTiger_Data;
+  TTiger_Data = array[0..3, 0..255] of Int64;
+
+  PInt64Array = ^TInt64Array;
+  TInt64Array = array[0..7] of Int64;
+
+var
+  A,B,C,T: Int64;
+  x0,x1,x2,x3,x4,x5,x6,x7: Int64;
+  I: Integer;
+begin
+  A  := PInt64Array(@FDigest)[0];
+  B  := PInt64Array(@FDigest)[1];
+  C  := PInt64Array(@FDigest)[2];
+  x0 := PInt64Array(Buffer)[0];
+  x1 := PInt64Array(Buffer)[1];
+  x2 := PInt64Array(Buffer)[2];
+  x3 := PInt64Array(Buffer)[3];
+  x4 := PInt64Array(Buffer)[4];
+  x5 := PInt64Array(Buffer)[5];
+  x6 := PInt64Array(Buffer)[6];
+  x7 := PInt64Array(Buffer)[7];
+
+  for I := 1 to FRounds do {a Loop is faster for PC's with small Cache}
+  begin
+    if I > 1 then {key schedule}
+    begin
+      Dec(x0, x7 xor $A5A5A5A5A5A5A5A5);
+      x1 := x1 xor x0;
+      Inc(x2, x1);
+      Dec(x3, x2 xor (not x1 shl 19));
+      x4 := x4 xor x3;
+      Inc(x5, x4);
+      Dec(x6, x5 xor (not x4 shr 23));
+      x7 := x7 xor x6;
+      Inc(x0, x7);
+      Dec(x1, x0 xor (not x7 shl 19));
+      x2 := x2 xor x1;
+      Inc(x3, x2);
+      Dec(x4, x3 xor (not x2 shr 23));
+      x5 := x5 xor x4;
+      Inc(x6, x5);
+      Dec(x7, x6 xor $0123456789ABCDEF);
+    end;
+
+    C := C xor x0;
+    Dec(A, TTiger_Data(Tiger_Data)[0, LongWord(C)        and $FF] xor
+           TTiger_Data(Tiger_Data)[1, LongWord(C) shr 16 and $FF] xor
+           TTiger_Data(Tiger_Data)[2,          C  shr 32 and $FF] xor
+           TTiger_Data(Tiger_Data)[3, LongWord(C shr 32) shr 16 and $FF]);
+    Inc(B, TTiger_Data(Tiger_Data)[3, LongWord(C) shr  8 and $FF] xor
+           TTiger_Data(Tiger_Data)[2, LongWord(C) shr 24] xor
+           TTiger_Data(Tiger_Data)[1, LongWord(C shr 32) shr 8 and $FF] xor
+           TTiger_Data(Tiger_Data)[0, LongWord(C shr 32) shr 24]);
+    if I = 1 then B := B shl 2 + B else
+      if I = 2 then B := B shl 3 - B
+        else B := B shl 3 + B;
+
+    A := A xor x1;
+    Dec(B, TTiger_Data(Tiger_Data)[0, LongWord(A)        and $FF] xor
+           TTiger_Data(Tiger_Data)[1, LongWord(A) shr 16 and $FF] xor
+           TTiger_Data(Tiger_Data)[2,         A  shr 32 and $FF] xor
+           TTiger_Data(Tiger_Data)[3, LongWord(A shr 32) shr 16 and $FF]);
+    Inc(C, TTiger_Data(Tiger_Data)[3, LongWord(A) shr  8 and $FF] xor
+           TTiger_Data(Tiger_Data)[2, LongWord(A) shr 24] xor
+           TTiger_Data(Tiger_Data)[1, LongWord(A shr 32) shr 8 and $FF] xor
+           TTiger_Data(Tiger_Data)[0, LongWord(A shr 32) shr 24]);
+    if I = 1 then C := C shl 2 + C else
+      if I = 2 then C := C shl 3 - C
+        else C := C shl 3 + C;
+
+    B := B xor x2;
+    Dec(C, TTiger_Data(Tiger_Data)[0, LongWord(B)        and $FF] xor
+           TTiger_Data(Tiger_Data)[1, LongWord(B) shr 16 and $FF] xor
+           TTiger_Data(Tiger_Data)[2,         B  shr 32 and $FF] xor
+           TTiger_Data(Tiger_Data)[3, LongWord(B shr 32) shr 16 and $FF]);
+    Inc(A, TTiger_Data(Tiger_Data)[3, LongWord(B) shr  8 and $FF] xor
+           TTiger_Data(Tiger_Data)[2, LongWord(B) shr 24] xor
+           TTiger_Data(Tiger_Data)[1, LongWord(B shr 32) shr 8 and $FF] xor
+           TTiger_Data(Tiger_Data)[0, LongWord(B shr 32) shr 24]);
+    if I = 1 then A := A shl 2 + A else
+      if I = 2 then A := A shl 3 - A
+        else A := A shl 3 + A;
+
+    C := C xor x3;
+    Dec(A, TTiger_Data(Tiger_Data)[0, LongWord(C)        and $FF] xor
+           TTiger_Data(Tiger_Data)[1, LongWord(C) shr 16 and $FF] xor
+           TTiger_Data(Tiger_Data)[2,         C  shr 32 and $FF] xor
+           TTiger_Data(Tiger_Data)[3, LongWord(C shr 32) shr 16 and $FF]);
+    Inc(B, TTiger_Data(Tiger_Data)[3, LongWord(C) shr  8 and $FF] xor
+           TTiger_Data(Tiger_Data)[2, LongWord(C) shr 24] xor
+           TTiger_Data(Tiger_Data)[1, LongWord(C shr 32) shr 8 and $FF] xor
+           TTiger_Data(Tiger_Data)[0, LongWord(C shr 32) shr 24]);
+    if I = 1 then B := B shl 2 + B else
+      if I = 2 then B := B shl 3 - B
+        else B := B shl 3 + B;
+
+    A := A xor x4;
+    Dec(B, TTiger_Data(Tiger_Data)[0, LongWord(A)        and $FF] xor
+           TTiger_Data(Tiger_Data)[1, LongWord(A) shr 16 and $FF] xor
+           TTiger_Data(Tiger_Data)[2,         A  shr 32 and $FF] xor
+           TTiger_Data(Tiger_Data)[3, LongWord(A shr 32) shr 16 and $FF]);
+    Inc(C, TTiger_Data(Tiger_Data)[3, LongWord(A) shr  8 and $FF] xor
+           TTiger_Data(Tiger_Data)[2, LongWord(A) shr 24] xor
+           TTiger_Data(Tiger_Data)[1, LongWord(A shr 32) shr 8 and $FF] xor
+           TTiger_Data(Tiger_Data)[0, LongWord(A shr 32) shr 24]);
+    if I = 1 then C := C shl 2 + C else
+      if I = 2 then C := C shl 3 - C
+        else C := C shl 3 + C;
+
+    B := B xor x5;
+    Dec(C, TTiger_Data(Tiger_Data)[0, LongWord(B)        and $FF] xor
+           TTiger_Data(Tiger_Data)[1, LongWord(B) shr 16 and $FF] xor
+           TTiger_Data(Tiger_Data)[2,         B  shr 32 and $FF] xor
+           TTiger_Data(Tiger_Data)[3, LongWord(B shr 32) shr 16 and $FF]);
+    Inc(A, TTiger_Data(Tiger_Data)[3, LongWord(B) shr  8 and $FF] xor
+           TTiger_Data(Tiger_Data)[2, LongWord(B) shr 24] xor
+           TTiger_Data(Tiger_Data)[1, LongWord(B shr 32) shr 8 and $FF] xor
+           TTiger_Data(Tiger_Data)[0, LongWord(B shr 32) shr 24]);
+    if I = 1 then A := A shl 2 + A else
+      if I = 2 then A := A shl 3 - A
+        else A := A shl 3 + A;
+
+    C := C xor x6;
+    Dec(A, TTiger_Data(Tiger_Data)[0, LongWord(C)        and $FF] xor
+           TTiger_Data(Tiger_Data)[1, LongWord(C) shr 16 and $FF] xor
+           TTiger_Data(Tiger_Data)[2,          C  shr 32 and $FF] xor
+           TTiger_Data(Tiger_Data)[3, LongWord(C  shr 32) shr 16 and $FF]);
+    Inc(B, TTiger_Data(Tiger_Data)[3, LongWord(C) shr  8 and $FF] xor
+           TTiger_Data(Tiger_Data)[2, LongWord(C) shr 24] xor
+           TTiger_Data(Tiger_Data)[1, LongWord(C  shr 32) shr 8 and $FF] xor
+           TTiger_Data(Tiger_Data)[0, LongWord(C  shr 32) shr 24]);
+    if I = 1 then B := B shl 2 + B else
+      if I = 2 then B := B shl 3 - B
+        else B := B shl 3 + B;
+
+    A := A xor x7;
+    Dec(B, TTiger_Data(Tiger_Data)[0, LongWord(A)        and $FF] xor
+           TTiger_Data(Tiger_Data)[1, LongWord(A) shr 16 and $FF] xor
+           TTiger_Data(Tiger_Data)[2,          A  shr 32 and $FF] xor
+           TTiger_Data(Tiger_Data)[3, LongWord(A  shr 32) shr 16 and $FF]);
+    Inc(C, TTiger_Data(Tiger_Data)[3, LongWord(A) shr  8 and $FF] xor
+           TTiger_Data(Tiger_Data)[2, LongWord(A) shr 24] xor
+           TTiger_Data(Tiger_Data)[1, LongWord(A  shr 32) shr 8 and $FF] xor
+           TTiger_Data(Tiger_Data)[0, LongWord(A  shr 32) shr 24]);
+    if I = 1 then C := C shl 2 + C else
+      if I = 2 then C := C shl 3 - C
+        else C := C shl 3 + C;
+
+    T := A; A := C; C := B; B := T;
+  end;
+
+  PInt64Array(@FDigest)[0] := A xor PInt64Array(@FDigest)[0];
+  PInt64Array(@FDigest)[1] := B  -  PInt64Array(@FDigest)[1];
+  PInt64Array(@FDigest)[2] := C  +  PInt64Array(@FDigest)[2];
+end;   *)
+
+{$ELSE}
+//here the code for D2-D3 and D4, is faster as the D4-Compiler-Code of
+//  a PII and slower with AMD K6, smaller cache ???? i mean we used this
+procedure TROHash_Tiger.Transform(Buffer: PIntArray);
+type
+  TInt64 = packed record
+             Lo,Hi: LongWord;
+           end;
+
+  PTiger_Data = ^TTiger_Data;
+  TTiger_Data = array[0..3, 0..255] of TInt64;
+
+  PInt64Array = ^TInt64Array;
+  TInt64Array = packed record
+                  case Integer of
+                    0: (x0,x1,x2,x3,x4,x5,x6,x7: TInt64);
+                    1: (D: array[0..7] of TInt64);
+                end;
+
+var
+  A,B,C,T: TInt64;
+  Buf: TInt64Array;
+  I: Integer;
+begin
+  Move(Buffer^, Buf, SizeOf(Buf));
+  with PInt64Array(@FDigest)^ do
+  begin
+    A := x0;
+    B := x1;
+    C := x2;
+  end;
+  with Buf do
+    for I := 1 to FRounds do
+    begin
+      if I > 1 then
+      asm
+         MOV    EAX,Buf.x7.Lo
+         MOV    EDX,Buf.x7.Hi
+         XOR    EAX,$A5A5A5A5
+         XOR    EDX,$A5A5A5A5
+         SUB    Buf.x0.Lo,EAX
+         SBB    Buf.x0.Hi,EDX
+         MOV    EAX,Buf.x1.Lo
+         MOV    EDX,Buf.x1.Hi
+         XOR    EAX,Buf.x0.Lo
+         XOR    EDX,Buf.x0.Hi
+         MOV    Buf.x1.Lo,EAX
+         MOV    Buf.x1.Hi,EDX
+         ADD    Buf.x2.Lo,EAX
+         ADC    Buf.x2.Hi,EDX
+         NOT    EAX
+         NOT    EDX
+         SHLD   EDX,EAX,19
+         SHL    EAX,19
+         XOR    EAX,Buf.x2.Lo
+         XOR    EDX,Buf.x2.Hi
+         SUB    Buf.x3.Lo,EAX
+         SBB    Buf.x3.Hi,EDX
+         MOV    EAX,Buf.x4.Lo
+         MOV    EDX,Buf.x4.Hi
+         XOR    EAX,Buf.x3.Lo
+         XOR    EDX,Buf.x3.Hi
+         MOV    Buf.x4.Lo,EAX
+         MOV    Buf.x4.Hi,EDX
+         ADD    Buf.x5.Lo,EAX
+         ADC    Buf.x5.Hi,EDX
+         NOT    EAX
+         NOT    EDX
+         SHRD   EAX,EDX,23
+         SAR    EDX,23
+         XOR    EAX,Buf.x5.Lo
+         XOR    EDX,Buf.x5.Hi
+         SUB    Buf.x6.Lo,EAX
+         SBB    Buf.x6.Hi,EDX
+         MOV    EAX,Buf.x7.Lo
+         MOV    EDX,Buf.x7.Hi
+         XOR    EAX,Buf.x6.Lo
+         XOR    EDX,Buf.x6.Hi
+         MOV    Buf.x7.Lo,EAX
+         MOV    Buf.x7.Hi,EDX
+         ADD    Buf.x0.Lo,EAX
+         ADC    Buf.x0.Hi,EDX
+         NOT    EAX
+         NOT    EDX
+         SHLD   EDX,EAX,19
+         SHL    EAX,19
+         XOR    EAX,Buf.x0.Lo
+         XOR    EDX,Buf.x0.Hi
+         SUB    Buf.x1.Lo,EAX
+         SBB    Buf.x1.Hi,EDX
+         MOV    EAX,Buf.x2.Lo
+         MOV    EDX,Buf.x2.Hi
+         XOR    EAX,Buf.x1.Lo
+         XOR    EDX,Buf.x1.Hi
+         MOV    Buf.x2.Lo,EAX
+         MOV    Buf.x2.Hi,EDX
+         ADD    Buf.x3.Lo,EAX
+         ADC    Buf.x3.Hi,EDX
+         NOT    EAX
+         NOT    EDX
+         SHRD   EAX,EDX,23
+         SAR    EDX,23
+         XOR    EAX,Buf.x3.Lo
+         XOR    EDX,Buf.x3.Hi
+         SUB    Buf.x4.Lo,EAX
+         SBB    Buf.x4.Hi,EDX
+         MOV    EAX,Buf.x5.Lo
+         MOV    EDX,Buf.x5.Hi
+         XOR    EAX,Buf.x4.Lo
+         XOR    EDX,Buf.x4.Hi
+         MOV    Buf.x5.Lo,EAX
+         MOV    Buf.x5.Hi,EDX
+         ADD    Buf.x6.Lo,EAX
+         ADC    Buf.x6.Hi,EDX
+         MOV    EAX,Buf.x6.Lo
+         MOV    EDX,Buf.x6.Hi
+         XOR    EAX,$89ABCDEF
+         XOR    EDX,$01234567
+         SUB    Buf.x7.Lo,EAX
+         SBB    Buf.x7.Hi,EDX
+      end;
+      C.Lo := C.Lo xor x0.Lo;
+      C.Hi := C.Hi xor x0.Hi;
+      T.Lo := Tiger_Data[0, C.Lo shl  1 and $1FE] xor
+              Tiger_Data[1, C.Lo shr 15 and $1FE] xor
+              Tiger_Data[2, C.Hi shl  1 and $1FE] xor
+              Tiger_Data[3, C.Hi shr 15 and $1FE];
+      T.Hi := Tiger_Data[0, C.Lo shl  1 and $1FE or 1] xor
+              Tiger_Data[1, C.Lo shr 15 and $1FE or 1] xor
+              Tiger_Data[2, C.Hi shl  1 and $1FE or 1] xor
+              Tiger_Data[3, C.Hi shr 15 and $1FE or 1];
+      asm
+        MOV   EAX,T.Lo
+        MOV   EDX,T.Hi
+        SUB   A.Lo,EAX
+        SBB   A.Hi,EDX
+      end;
+      T.Lo := Tiger_Data[3, C.Lo shr  7 and $1FE] xor
+              Tiger_Data[2, C.Lo shr 23 and $1FE] xor
+              Tiger_Data[1, C.Hi shr  7 and $1FE] xor
+              Tiger_Data[0, C.Hi shr 23 and $1FE];
+      T.Hi := Tiger_Data[3, C.Lo shr  7 and $1FE or 1] xor
+              Tiger_Data[2, C.Lo shr 23 and $1FE or 1] xor
+              Tiger_Data[1, C.Hi shr  7 and $1FE or 1] xor
+              Tiger_Data[0, C.Hi shr 23 and $1FE or 1];
+      asm
+        MOV  EAX,B.Lo
+        MOV  EDX,B.Hi
+        ADD  EAX,T.Lo
+        ADC  EDX,T.Hi
+        MOV  B.Lo,EAX
+        MOV  B.Hi,EDX
+        CMP  I,1
+        JNE  @@1
+        SHLD EDX,EAX,2
+        SHL  EAX,2
+        ADD  EAX,B.Lo
+        ADC  EDX,B.Hi
+        JMP  @@3
+ @@1:   CMP  I,2
+        JNE  @@2
+        SHLD EDX,EAX,3
+        SHL  EAX,3
+        SUB  EAX,B.Lo
+        SBB  EDX,B.Hi
+        JMP  @@3
+ @@2:   SHLD EDX,EAX,3
+        SHL  EAX,3
+        ADD  EAX,B.Lo
+        ADC  EDX,B.Hi
+ @@3:   MOV  B.Lo,EAX
+        MOV  B.Hi,EDX
+      end;
+
+      A.Lo := A.Lo xor x1.Lo;
+      A.Hi := A.Hi xor x1.Hi;
+      T.Lo := Tiger_Data[0, A.Lo shl  1 and $1FE] xor
+              Tiger_Data[1, A.Lo shr 15 and $1FE] xor
+              Tiger_Data[2, A.Hi shl  1 and $1FE] xor
+              Tiger_Data[3, A.Hi shr 15 and $1FE];
+      T.Hi := Tiger_Data[0, A.Lo shl  1 and $1FE or 1] xor
+              Tiger_Data[1, A.Lo shr 15 and $1FE or 1] xor
+              Tiger_Data[2, A.Hi shl  1 and $1FE or 1] xor
+              Tiger_Data[3, A.Hi shr 15 and $1FE or 1];
+      asm
+        MOV   EAX,T.Lo
+        MOV   EDX,T.Hi
+        SUB   B.Lo,EAX
+        SBB   B.Hi,EDX
+      end;
+      T.Lo := Tiger_Data[3, A.Lo shr  7 and $1FE] xor
+              Tiger_Data[2, A.Lo shr 23 and $1FE] xor
+              Tiger_Data[1, A.Hi shr  7 and $1FE] xor
+              Tiger_Data[0, A.Hi shr 23 and $1FE];
+      T.Hi := Tiger_Data[3, A.Lo shr  7 and $1FE or 1] xor
+              Tiger_Data[2, A.Lo shr 23 and $1FE or 1] xor
+              Tiger_Data[1, A.Hi shr  7 and $1FE or 1] xor
+              Tiger_Data[0, A.Hi shr 23 and $1FE or 1];
+      asm
+        MOV  EAX,C.Lo
+        MOV  EDX,C.Hi
+        ADD  EAX,T.Lo
+        ADC  EDX,T.Hi
+        MOV  C.Lo,EAX
+        MOV  C.Hi,EDX
+        CMP  I,1
+        JNE  @@1
+        SHLD EDX,EAX,2
+        SHL  EAX,2
+        ADD  EAX,C.Lo
+        ADC  EDX,C.Hi
+        JMP  @@3
+ @@1:   CMP  I,2
+        JNE  @@2
+        SHLD EDX,EAX,3
+        SHL  EAX,3
+        SUB  EAX,C.Lo
+        SBB  EDX,C.Hi
+        JMP  @@3
+ @@2:   SHLD EDX,EAX,3
+        SHL  EAX,3
+        ADD  EAX,C.Lo
+        ADC  EDX,C.Hi
+ @@3:   MOV  C.Lo,EAX
+        MOV  C.Hi,EDX
+      end;
+
+      B.Lo := B.Lo xor x2.Lo;
+      B.Hi := B.Hi xor x2.Hi;
+      T.Lo := Tiger_Data[0, B.Lo shl  1 and $1FE] xor
+              Tiger_Data[1, B.Lo shr 15 and $1FE] xor
+              Tiger_Data[2, B.Hi shl  1 and $1FE] xor
+              Tiger_Data[3, B.Hi shr 15 and $1FE];
+      T.Hi := Tiger_Data[0, B.Lo shl  1 and $1FE or 1] xor
+              Tiger_Data[1, B.Lo shr 15 and $1FE or 1] xor
+              Tiger_Data[2, B.Hi shl  1 and $1FE or 1] xor
+              Tiger_Data[3, B.Hi shr 15 and $1FE or 1];
+      asm
+        MOV   EAX,T.Lo
+        MOV   EDX,T.Hi
+        SUB   C.Lo,EAX
+        SBB   C.Hi,EDX
+      end;
+      T.Lo := Tiger_Data[3, B.Lo shr  7 and $1FE] xor
+              Tiger_Data[2, B.Lo shr 23 and $1FE] xor
+              Tiger_Data[1, B.Hi shr  7 and $1FE] xor
+              Tiger_Data[0, B.Hi shr 23 and $1FE];
+      T.Hi := Tiger_Data[3, B.Lo shr  7 and $1FE or 1] xor
+              Tiger_Data[2, B.Lo shr 23 and $1FE or 1] xor
+              Tiger_Data[1, B.Hi shr  7 and $1FE or 1] xor
+              Tiger_Data[0, B.Hi shr 23 and $1FE or 1];
+      asm
+        MOV  EAX,A.Lo
+        MOV  EDX,A.Hi
+        ADD  EAX,T.Lo
+        ADC  EDX,T.Hi
+        MOV  A.Lo,EAX
+        MOV  A.Hi,EDX
+        CMP  I,1
+        JNE  @@1
+        SHLD EDX,EAX,2
+        SHL  EAX,2
+        ADD  EAX,A.Lo
+        ADC  EDX,A.Hi
+        JMP  @@3
+ @@1:   CMP  I,2
+        JNE  @@2
+        SHLD EDX,EAX,3
+        SHL  EAX,3
+        SUB  EAX,A.Lo
+        SBB  EDX,A.Hi
+        JMP  @@3
+ @@2:   SHLD EDX,EAX,3
+        SHL  EAX,3
+        ADD  EAX,A.Lo
+        ADC  EDX,A.Hi
+ @@3:   MOV  A.Lo,EAX
+        MOV  A.Hi,EDX
+      end;
+      C.Lo := C.Lo xor x3.Lo;
+      C.Hi := C.Hi xor x3.Hi;
+      T.Lo := Tiger_Data[0, C.Lo shl  1 and $1FE] xor
+              Tiger_Data[1, C.Lo shr 15 and $1FE] xor
+              Tiger_Data[2, C.Hi shl  1 and $1FE] xor
+              Tiger_Data[3, C.Hi shr 15 and $1FE];
+      T.Hi := Tiger_Data[0, C.Lo shl  1 and $1FE or 1] xor
+              Tiger_Data[1, C.Lo shr 15 and $1FE or 1] xor
+              Tiger_Data[2, C.Hi shl  1 and $1FE or 1] xor
+              Tiger_Data[3, C.Hi shr 15 and $1FE or 1];
+      asm
+        MOV   EAX,T.Lo
+        MOV   EDX,T.Hi
+        SUB   A.Lo,EAX
+        SBB   A.Hi,EDX
+      end;
+      T.Lo := Tiger_Data[3, C.Lo shr  7 and $1FE] xor
+              Tiger_Data[2, C.Lo shr 23 and $1FE] xor
+              Tiger_Data[1, C.Hi shr  7 and $1FE] xor
+              Tiger_Data[0, C.Hi shr 23 and $1FE];
+      T.Hi := Tiger_Data[3, C.Lo shr  7 and $1FE or 1] xor
+              Tiger_Data[2, C.Lo shr 23 and $1FE or 1] xor
+              Tiger_Data[1, C.Hi shr  7 and $1FE or 1] xor
+              Tiger_Data[0, C.Hi shr 23 and $1FE or 1];
+      asm
+        MOV  EAX,B.Lo
+        MOV  EDX,B.Hi
+        ADD  EAX,T.Lo
+        ADC  EDX,T.Hi
+        MOV  B.Lo,EAX
+        MOV  B.Hi,EDX
+        CMP  I,1
+        JNE  @@1
+        SHLD EDX,EAX,2
+        SHL  EAX,2
+        ADD  EAX,B.Lo
+        ADC  EDX,B.Hi
+        JMP  @@3
+ @@1:   CMP  I,2
+        JNE  @@2
+        SHLD EDX,EAX,3
+        SHL  EAX,3
+        SUB  EAX,B.Lo
+        SBB  EDX,B.Hi
+        JMP  @@3
+ @@2:   SHLD EDX,EAX,3
+        SHL  EAX,3
+        ADD  EAX,B.Lo
+        ADC  EDX,B.Hi
+ @@3:   MOV  B.Lo,EAX
+        MOV  B.Hi,EDX
+      end;
+
+      A.Lo := A.Lo xor x4.Lo;
+      A.Hi := A.Hi xor x4.Hi;
+      T.Lo := Tiger_Data[0, A.Lo shl  1 and $1FE] xor
+              Tiger_Data[1, A.Lo shr 15 and $1FE] xor
+              Tiger_Data[2, A.Hi shl  1 and $1FE] xor
+              Tiger_Data[3, A.Hi shr 15 and $1FE];
+      T.Hi := Tiger_Data[0, A.Lo shl  1 and $1FE or 1] xor
+              Tiger_Data[1, A.Lo shr 15 and $1FE or 1] xor
+              Tiger_Data[2, A.Hi shl  1 and $1FE or 1] xor
+              Tiger_Data[3, A.Hi shr 15 and $1FE or 1];
+      asm
+        MOV   EAX,T.Lo
+        MOV   EDX,T.Hi
+        SUB   B.Lo,EAX
+        SBB   B.Hi,EDX
+      end;
+      T.Lo := Tiger_Data[3, A.Lo shr  7 and $1FE] xor
+              Tiger_Data[2, A.Lo shr 23 and $1FE] xor
+              Tiger_Data[1, A.Hi shr  7 and $1FE] xor
+              Tiger_Data[0, A.Hi shr 23 and $1FE];
+      T.Hi := Tiger_Data[3, A.Lo shr  7 and $1FE or 1] xor
+              Tiger_Data[2, A.Lo shr 23 and $1FE or 1] xor
+              Tiger_Data[1, A.Hi shr  7 and $1FE or 1] xor
+              Tiger_Data[0, A.Hi shr 23 and $1FE or 1];
+      asm
+        MOV  EAX,C.Lo
+        MOV  EDX,C.Hi
+        ADD  EAX,T.Lo
+        ADC  EDX,T.Hi
+        MOV  C.Lo,EAX
+        MOV  C.Hi,EDX
+        CMP  I,1
+        JNE  @@1
+        SHLD EDX,EAX,2
+        SHL  EAX,2
+        ADD  EAX,C.Lo
+        ADC  EDX,C.Hi
+        JMP  @@3
+ @@1:   CMP  I,2
+        JNE  @@2
+        SHLD EDX,EAX,3
+        SHL  EAX,3
+        SUB  EAX,C.Lo
+        SBB  EDX,C.Hi
+        JMP  @@3
+ @@2:   SHLD EDX,EAX,3
+        SHL  EAX,3
+        ADD  EAX,C.Lo
+        ADC  EDX,C.Hi
+ @@3:   MOV  C.Lo,EAX
+        MOV  C.Hi,EDX
+      end;
+
+      B.Lo := B.Lo xor x5.Lo;
+      B.Hi := B.Hi xor x5.Hi;
+      T.Lo := Tiger_Data[0, B.Lo shl  1 and $1FE] xor
+              Tiger_Data[1, B.Lo shr 15 and $1FE] xor
+              Tiger_Data[2, B.Hi shl  1 and $1FE] xor
+              Tiger_Data[3, B.Hi shr 15 and $1FE];
+      T.Hi := Tiger_Data[0, B.Lo shl  1 and $1FE or 1] xor
+              Tiger_Data[1, B.Lo shr 15 and $1FE or 1] xor
+              Tiger_Data[2, B.Hi shl  1 and $1FE or 1] xor
+              Tiger_Data[3, B.Hi shr 15 and $1FE or 1];
+      asm
+        MOV   EAX,T.Lo
+        MOV   EDX,T.Hi
+        SUB   C.Lo,EAX
+        SBB   C.Hi,EDX
+      end;
+      T.Lo := Tiger_Data[3, B.Lo shr  7 and $1FE] xor
+              Tiger_Data[2, B.Lo shr 23 and $1FE] xor
+              Tiger_Data[1, B.Hi shr  7 and $1FE] xor
+              Tiger_Data[0, B.Hi shr 23 and $1FE];
+      T.Hi := Tiger_Data[3, B.Lo shr  7 and $1FE or 1] xor
+              Tiger_Data[2, B.Lo shr 23 and $1FE or 1] xor
+              Tiger_Data[1, B.Hi shr  7 and $1FE or 1] xor
+              Tiger_Data[0, B.Hi shr 23 and $1FE or 1];
+      asm
+        MOV  EAX,A.Lo
+        MOV  EDX,A.Hi
+        ADD  EAX,T.Lo
+        ADC  EDX,T.Hi
+        MOV  A.Lo,EAX
+        MOV  A.Hi,EDX
+        CMP  I,1
+        JNE  @@1
+        SHLD EDX,EAX,2
+        SHL  EAX,2
+        ADD  EAX,A.Lo
+        ADC  EDX,A.Hi
+        JMP  @@3
+ @@1:   CMP  I,2
+        JNE  @@2
+        SHLD EDX,EAX,3
+        SHL  EAX,3
+        SUB  EAX,A.Lo
+        SBB  EDX,A.Hi
+        JMP  @@3
+ @@2:   SHLD EDX,EAX,3
+        SHL  EAX,3
+        ADD  EAX,A.Lo
+        ADC  EDX,A.Hi
+ @@3:   MOV  A.Lo,EAX
+        MOV  A.Hi,EDX
+      end;
+      C.Lo := C.Lo xor x6.Lo;
+      C.Hi := C.Hi xor x6.Hi;
+      T.Lo := Tiger_Data[0, C.Lo shl  1 and $1FE] xor
+              Tiger_Data[1, C.Lo shr 15 and $1FE] xor
+              Tiger_Data[2, C.Hi shl  1 and $1FE] xor
+              Tiger_Data[3, C.Hi shr 15 and $1FE];
+      T.Hi := Tiger_Data[0, C.Lo shl  1 and $1FE or 1] xor
+              Tiger_Data[1, C.Lo shr 15 and $1FE or 1] xor
+              Tiger_Data[2, C.Hi shl  1 and $1FE or 1] xor
+              Tiger_Data[3, C.Hi shr 15 and $1FE or 1];
+      asm
+        MOV   EAX,T.Lo
+        MOV   EDX,T.Hi
+        SUB   A.Lo,EAX
+        SBB   A.Hi,EDX
+      end;
+      T.Lo := Tiger_Data[3, C.Lo shr  7 and $1FE] xor
+              Tiger_Data[2, C.Lo shr 23 and $1FE] xor
+              Tiger_Data[1, C.Hi shr  7 and $1FE] xor
+              Tiger_Data[0, C.Hi shr 23 and $1FE];
+      T.Hi := Tiger_Data[3, C.Lo shr  7 and $1FE or 1] xor
+              Tiger_Data[2, C.Lo shr 23 and $1FE or 1] xor
+              Tiger_Data[1, C.Hi shr  7 and $1FE or 1] xor
+              Tiger_Data[0, C.Hi shr 23 and $1FE or 1];
+      asm
+        MOV  EAX,B.Lo
+        MOV  EDX,B.Hi
+        ADD  EAX,T.Lo
+        ADC  EDX,T.Hi
+        MOV  B.Lo,EAX
+        MOV  B.Hi,EDX
+        CMP  I,1
+        JNE  @@1
+        SHLD EDX,EAX,2
+        SHL  EAX,2
+        ADD  EAX,B.Lo
+        ADC  EDX,B.Hi
+        JMP  @@3
+ @@1:   CMP  I,2
+        JNE  @@2
+        SHLD EDX,EAX,3
+        SHL  EAX,3
+        SUB  EAX,B.Lo
+        SBB  EDX,B.Hi
+        JMP  @@3
+ @@2:   SHLD EDX,EAX,3
+        SHL  EAX,3
+        ADD  EAX,B.Lo
+        ADC  EDX,B.Hi
+ @@3:   MOV  B.Lo,EAX
+        MOV  B.Hi,EDX
+      end;
+
+      A.Lo := A.Lo xor x7.Lo;
+      A.Hi := A.Hi xor x7.Hi;
+      T.Lo := Tiger_Data[0, A.Lo shl  1 and $1FE] xor
+              Tiger_Data[1, A.Lo shr 15 and $1FE] xor
+              Tiger_Data[2, A.Hi shl  1 and $1FE] xor
+              Tiger_Data[3, A.Hi shr 15 and $1FE];
+      T.Hi := Tiger_Data[0, A.Lo shl  1 and $1FE or 1] xor
+              Tiger_Data[1, A.Lo shr 15 and $1FE or 1] xor
+              Tiger_Data[2, A.Hi shl  1 and $1FE or 1] xor
+              Tiger_Data[3, A.Hi shr 15 and $1FE or 1];
+      asm
+        MOV   EAX,T.Lo
+        MOV   EDX,T.Hi
+        SUB   B.Lo,EAX
+        SBB   B.Hi,EDX
+      end;
+      T.Lo := Tiger_Data[3, A.Lo shr  7 and $1FE] xor
+              Tiger_Data[2, A.Lo shr 23 and $1FE] xor
+              Tiger_Data[1, A.Hi shr  7 and $1FE] xor
+              Tiger_Data[0, A.Hi shr 23 and $1FE];
+      T.Hi := Tiger_Data[3, A.Lo shr  7 and $1FE or 1] xor
+              Tiger_Data[2, A.Lo shr 23 and $1FE or 1] xor
+              Tiger_Data[1, A.Hi shr  7 and $1FE or 1] xor
+              Tiger_Data[0, A.Hi shr 23 and $1FE or 1];
+      asm
+        MOV  EAX,C.Lo
+        MOV  EDX,C.Hi
+        ADD  EAX,T.Lo
+        ADC  EDX,T.Hi
+        MOV  C.Lo,EAX
+        MOV  C.Hi,EDX
+        CMP  I,1
+        JNE  @@1
+        SHLD EDX,EAX,2
+        SHL  EAX,2
+        ADD  EAX,C.Lo
+        ADC  EDX,C.Hi
+        JMP  @@3
+ @@1:   CMP  I,2
+        JNE  @@2
+        SHLD EDX,EAX,3
+        SHL  EAX,3
+        SUB  EAX,C.Lo
+        SBB  EDX,C.Hi
+        JMP  @@3
+ @@2:   SHLD EDX,EAX,3
+        SHL  EAX,3
+        ADD  EAX,C.Lo
+        ADC  EDX,C.Hi
+ @@3:   MOV  C.Lo,EAX
+        MOV  C.Hi,EDX
+      end;
+      T := A; A := C; C := B; B := T;
+    end;
+
+  with PInt64Array(@FDigest)^ do
+  begin
+    x0.Lo := A.Lo xor x0.Lo;
+    x0.Hi := A.Hi xor x0.Hi;
+    T := x1;
+    asm
+      MOV  EAX,T.Lo
+      MOV  EDX,T.Hi
+      SUB  B.Lo,EAX
+      SBB  B.Hi,EDX
+    end;
+    x1 := B;
+    T  := x2;
+    asm
+      MOV  EAX,T.Lo
+      MOV  EDX,T.Hi
+      ADD  C.Lo,EAX
+      ADC  C.Hi,EDX
+    end;
+    x2 := C;
+  end;
+{$ENDIF}
+end;
+
+class function TROHash_Tiger.DigestKeySize: Integer;
+begin
+  Result := 24;
+end;
+
+procedure TROHash_Tiger.Init;
+begin
+  FillChar(FBuffer, SizeOf(FBuffer), 0);
+  SetRounds(FRounds);
+  FCount := 0;
+  FDigest[0] := $89ABCDEF;
+  FDigest[1] := $01234567;
+  FDigest[2] := $76543210;
+  FDigest[3] := $FEDCBA98;
+  FDigest[4] := $C3B2E187;
+  FDigest[5] := $F096A5B4;
+  Protect(True);
+end;
+
+procedure TROHash_Tiger.Done;
+var
+  I: Integer;
+  S: Comp;
+begin
+  I := FCount and $3F;
+  FBuffer[I] := $01;
+  Inc(I);
+  if I > 64 - 8 then
+  begin
+    FillChar(FBuffer[I], 64 - I, 0);
+    Transform(@FBuffer);
+    I := 0;
+  end;
+  FillChar(FBuffer[I], 64 - I, 0);
+  S := FCount * 8;
+  Move(S, FBuffer[64 - 8], SizeOf(S));
+  Transform(@FBuffer);
+  FillChar(FBuffer, SizeOf(FBuffer), 0);
+  Protect(False);
+end;
+
+class function TROHash_Sapphire320.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    0D8h,0EDh,0A5h,074h,099h,048h,0ACh,00Bh
+         DB    000h,090h,0CDh,087h,061h,0F2h,018h,0DBh
+         DB    0A4h,01Dh,0CBh,073h,0E4h,033h,099h,0DDh
+         DB    037h,012h,006h,093h,097h,033h,095h,000h
+         DB    04Ah,0CFh,086h,0DBh,023h,06Dh,0E7h,06Bh
+end;
+
+procedure TROHash_Sapphire320.Calc(const Data; DataSize: Integer);
+var
+  C: Integer;
+  T: Byte;
+  D: PByte;
+begin
+  Inc(FCount, DataSize);
+  D := @Data;
+  C := FCipher;
+  while DataSize > 0 do
+  begin
+    Dec(DataSize);
+    Inc(FRatchet, FCards[FRotor]);
+    Inc(FRotor);
+    T := FCards[C];
+    FCards[C] := FCards[FRatchet];
+    FCards[FRatchet] := FCards[FPlain];
+    FCards[FPlain] := FCards[FRotor];
+    FCards[FRotor] := T;
+    Inc(FAvalanche, FCards[T]);
+    T := FCards[FPlain] + FCards[C] + FCards[FAvalanche];
+    FPlain := D^; Inc(D);
+    C := FPlain xor FCards[FCards[T]] xor
+                    FCards[(FCards[FRatchet] + FCards[FRotor]) and $FF];
+  end;
+  FCipher := C;
+end;
+
+class function TROHash_Sapphire320.DigestKeySize: Integer;
+begin
+  Result := 40;
+end;
+
+procedure TROHash_Sapphire320.Init;
+var
+  I: Integer;
+begin
+  FillChar(FDigest, SizeOf(FDigest), 0);
+  FCount := 0;
+  FRotor := 1;
+  FRatchet := 3;
+  FAvalanche := 5;
+  FPlain := 7;
+  FCipher := 11;
+  for I := 0 to 255 do FCards[I] := 255 - I;
+  Protect(True);
+end;
+
+procedure TROHash_Sapphire320.Done;
+{final sequence, I have here changed the original Code by adding the
+ Trailor, Version, Digestsize, Init-values and Size in Bits,
+ I mean this changes make a uniquer Fingerprint, other RO_Hash's use identicaly Methods}
+var
+  I,J: Byte;
+  B: array[0..39] of Byte;
+  S: Comp;
+begin
+  J := DigestKeySize;
+  for I := 255 downto 0 do
+  begin
+    J := J xor I;
+    Calc(J, 1);
+  end;
+  FillChar(B, SizeOf(B), 0);
+  B[0] := $80;     {Trailorbyte}
+  B[1] := $02;     {Version}
+  PInteger(@B[2])^ := DigestKeySize shl 8;  {Digestsize in bits}
+  B[4] :=   1;     {Init from FRotor}
+  B[5] :=   3;     {Init from FRatchet}
+  B[6] :=   5;     {Init from FAvalanche}
+  B[7] :=   7;     {Init from FPlain}
+  B[8] :=  11;     {Init from FCipher};
+  S := FCount * 8; {Size in Bits}
+  Move(S, B[9], SizeOf(S));
+  for I := 0 to DigestKeySize-1 do
+  begin
+    Calc(B[I], 1);
+    PByteArray(@FDigest)[I] := PByteArray(@FDigest)[I] xor FCipher;
+  end;
+  Protect(False);
+end;
+
+function TROHash_Sapphire320.DigestKey: Pointer;
+begin
+  Result := @FDigest;
+end;
+
+class function TROHash_Sapphire288.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    040h,0F6h,05Ah,037h,0D8h,0CBh,011h,065h
+         DB    0DCh,0FBh,0DEh,063h,02Bh,02Ch,0BEh,09Ch
+         DB    02Bh,0B7h,0F3h,0EDh,022h,0D1h,0EBh,0EFh
+         DB    00Fh,0A1h,088h,0EDh,023h,0F0h,07Fh,09Ch
+         DB    07Eh,061h,037h,040h
+end;
+
+class function TROHash_Sapphire288.DigestKeySize: Integer;
+begin
+  Result := 36;
+end;
+
+class function TROHash_Sapphire256.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    0E7h,0C8h,02Bh,06Dh,025h,08Ah,0FDh,0E0h
+         DB    034h,042h,093h,0A3h,0E2h,0E5h,028h,096h
+         DB    0A5h,046h,050h,06Bh,013h,093h,086h,01Bh
+         DB    040h,0C6h,093h,04Bh,051h,0FAh,066h,0DDh
+end;
+
+class function TROHash_Sapphire256.DigestKeySize: Integer;
+begin
+  Result := 32;
+end;
+
+class function TROHash_Sapphire224.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    08Fh,03Eh,0C5h,057h,092h,031h,06Ch,0DFh
+         DB    0CAh,040h,018h,03Ah,086h,008h,008h,099h
+         DB    034h,0FDh,0EBh,021h,0ABh,0A4h,052h,00Fh
+         DB    040h,017h,0D3h,0D0h
+end;
+
+class function TROHash_Sapphire224.DigestKeySize: Integer;
+begin
+  Result := 28;
+end;
+
+class function TROHash_Sapphire192.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    095h,041h,03Fh,0E0h,02Bh,052h,07Eh,050h
+         DB    0B5h,0FFh,057h,0EBh,076h,03Dh,032h,051h
+         DB    029h,0EBh,079h,06Fh,04Ah,064h,0FBh,017h
+end;
+
+class function TROHash_Sapphire192.DigestKeySize: Integer;
+begin
+  Result := 24;
+end;
+
+class function TROHash_Sapphire160.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    073h,0D9h,01Ah,0CEh,0B1h,075h,0FDh,004h
+         DB    090h,07Ah,097h,041h,03Ch,020h,00Fh,053h
+         DB    02Ch,022h,0B3h,08Ch
+end;
+
+class function TROHash_Sapphire160.DigestKeySize: Integer;
+begin
+  Result := 20;
+end;
+
+class function TROHash_Sapphire128.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    047h,0AEh,016h,013h,0C9h,03Ah,094h,02Dh
+         DB    026h,074h,08Dh,062h,043h,026h,088h,0D8h
+end;
+
+class function TROHash_Sapphire128.DigestKeySize: Integer;
+begin
+  Result := 16;
+end;
+
+class function TROHash_Square.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    080h,08Fh,035h,0EAh,000h,0A7h,077h,033h
+         DB    037h,0CEh,055h,098h,026h,0DDh,0B3h,024h
+end;
+
+procedure TROHash_Square.Transform(Buffer: PIntArray);
+var
+  E: array[0..8, 0..3] of LongWord;
+  A,B,C,D: LongWord;
+  AA,BB,CC,DD: LongWord;
+  I,J: Integer;
+  Key: PInteger;
+begin
+{Build and expand the Key, Digest include the Key}
+  Move(FDigest, E, 16);
+  for I := 1 to 8 do
+  begin
+    E[I, 0] := E[I -1, 0] xor ROR(E[I -1, 3], 8) xor 1 shl (I - 1);
+    E[I, 1] := E[I -1, 1] xor E[I, 0];
+    E[I, 2] := E[I -1, 2] xor E[I, 1];
+    E[I, 3] := E[I -1, 3] xor E[I, 2];
+    for J := 0 to 3 do
+      E[I -1, J] :=     Square_PHI[E[I -1, J]        and $FF]      xor
+                    ROL(Square_PHI[E[I -1, J] shr  8 and $FF],  8) xor
+                    ROL(Square_PHI[E[I -1, J] shr 16 and $FF], 16) xor
+                    ROL(Square_PHI[E[I -1, J] shr 24        ], 24);
+  end;
+{Encrypt begin here, same TROCipher_Square.Encode}
+  Key := @E;
+  A := Buffer[0] xor Key^; Inc(Key);
+  B := Buffer[1] xor Key^; Inc(Key);
+  C := Buffer[2] xor Key^; Inc(Key);
+  D := Buffer[3] xor Key^; Inc(Key);
+  for I := 0 to 6 do
+  begin
+    AA := Square_TE[0, A        and $FF] xor
+          Square_TE[1, B        and $FF] xor
+          Square_TE[2, C        and $FF] xor
+          Square_TE[3, D        and $FF] xor Key^; Inc(Key);
+    BB := Square_TE[0, A shr  8 and $FF] xor
+          Square_TE[1, B shr  8 and $FF] xor
+          Square_TE[2, C shr  8 and $FF] xor
+          Square_TE[3, D shr  8 and $FF] xor Key^; Inc(Key);
+    CC := Square_TE[0, A shr 16 and $FF] xor
+          Square_TE[1, B shr 16 and $FF] xor
+          Square_TE[2, C shr 16 and $FF] xor
+          Square_TE[3, D shr 16 and $FF] xor Key^; Inc(Key);
+    DD := Square_TE[0, A shr 24        ] xor
+          Square_TE[1, B shr 24        ] xor
+          Square_TE[2, C shr 24        ] xor
+          Square_TE[3, D shr 24        ] xor Key^; Inc(Key);
+
+    A := AA; B := BB; C := CC; D := DD;
+  end;
+
+  FDigest[0] := FBuffer[0] xor
+                LongWord(Square_SE[A        and $FF])        xor
+                LongWord(Square_SE[B        and $FF]) shl  8 xor
+                LongWord(Square_SE[C        and $FF]) shl 16 xor
+                LongWord(Square_SE[D        and $FF]) shl 24 xor Key^; Inc(Key);
+  FDigest[1] := FBuffer[1] xor
+                LongWord(Square_SE[A shr  8 and $FF])        xor
+                LongWord(Square_SE[B shr  8 and $FF]) shl  8 xor
+                LongWord(Square_SE[C shr  8 and $FF]) shl 16 xor
+                LongWord(Square_SE[D shr  8 and $FF]) shl 24 xor Key^; Inc(Key);
+  FDigest[2] := FBuffer[2] xor
+                LongWord(Square_SE[A shr 16 and $FF])        xor
+                LongWord(Square_SE[B shr 16 and $FF]) shl  8 xor
+                LongWord(Square_SE[C shr 16 and $FF]) shl 16 xor
+                LongWord(Square_SE[D shr 16 and $FF]) shl 24 xor Key^; Inc(Key);
+  FDigest[3] := FBuffer[3] xor
+                LongWord(Square_SE[A shr 24        ])        xor
+                LongWord(Square_SE[B shr 24        ]) shl  8 xor
+                LongWord(Square_SE[C shr 24        ]) shl 16 xor
+                LongWord(Square_SE[D shr 24        ]) shl 24 xor Key^;
+end;
+
+class function TROHash_Square.DigestKeySize: Integer;
+begin
+  Result := 16;
+end;
+
+function TROHash_Square.DigestKey: Pointer;
+begin
+  Result := @FDigest;
+end;
+
+procedure TROHash_Square.Init;
+begin
+  FillChar(FBuffer, SizeOf(FBuffer), 0);
+{here using the same Magic codes from MD4, in the original was this set to zero,
+ this is the Square Encryption Key,
+ you can change this with Move(My4xIntKey, Hash_Square.DigestKey^, 4 * SizeOf(Integer))
+ to produce private Results}
+  FDigest[0] := $67452301;
+  FDigest[1] := $EFCDAB89;
+  FDigest[2] := $98BADCFE;
+  FDigest[3] := $10325476;
+  FCount := 0;
+  Protect(True);
+end;
+
+procedure TROHash_Square.Done;
+var
+  I: Integer;
+  S: Comp;
+begin
+  I := FCount and $0F;
+  FBuffer[I] := $80;
+  Inc(I);
+  if I > 16 - 8 then
+  begin
+    FillChar(FBuffer[I], 16 - I, 0);
+    Transform(@FBuffer);
+    I := 0;
+  end;
+  FillChar(FBuffer[I], 16 - I, 0);
+  S := FCount * 8; {in Bits}
+  Move(S, FBuffer[16 - 8], SizeOf(S));
+  Transform(@FBuffer);
+  FillChar(FBuffer, SizeOf(FBuffer), 0);
+  Protect(False);
+end;
+
+procedure TROHash_Square.Calc(const Data; DataSize: Integer);
+var
+  Index: Integer;
+  P: PChar;
+begin
+  if DataSize <= 0 then Exit;
+  Index := FCount and $0F;
+  Inc(FCount, DataSize);
+  if Index > 0 then
+  begin
+    if DataSize < 16 - Index then
+    begin
+      Move(Data, FBuffer[Index], DataSize);
+      Exit;
+    end;
+    Move(Data, FBuffer[Index], 16 - Index);
+    Transform(@FBuffer);
+    Index := 16 - Index;
+    Dec(DataSize, Index);
+  end;
+  P := @TByteArray(Data)[Index];
+  Inc(Index, DataSize and not $0F);
+  while DataSize >= 16 do
+  begin
+    Transform(Pointer(P));
+    Inc(P, 16);
+    Dec(DataSize, 16);
+  end;
+  Move(TByteArray(Data)[Index], FBuffer, DataSize);
+end;
+
+class function TROHash_XOR16.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    079h,0E8h
+end;
+
+class function TROHash_XOR16.DigestKeySize: Integer;
+begin
+  Result := 2;
+end;
+
+procedure TROHash_XOR16.Init;
+begin
+  FCRC := 0;
+  Protect(True);
+end;
+
+procedure TROHash_XOR16.Calc(const Data; DataSize: Integer); assembler; register;
+asm
+         TEST    ECX,ECX
+         JLE     @Exit
+         PUSH    EAX
+         MOV     AX,[EAX].TROHash_XOR16.FCRC
+@@1:     ROL     AX,5
+         XOR     AL,[EDX]
+         INC     EDX
+         DEC     ECX
+         JNZ     @@1
+         POP     EDX
+         MOV     [EDX].TROHash_XOR16.FCRC,AX
+@Exit:
+end;
+
+function TROHash_XOR16.DigestKey: Pointer;
+begin
+  Result := @FCRC;
+end;
+
+class function TROHash_XOR32.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    08Dh,0ADh,089h,07Fh
+end;
+
+class function TROHash_XOR32.DigestKeySize: Integer;
+begin
+  Result := 4;
+end;
+
+procedure TROHash_XOR32.Init;
+begin
+  FCRC := 0;
+  Protect(True);
+end;
+
+procedure TROHash_XOR32.Calc(const Data; DataSize: Integer); assembler; register;
+asm
+         TEST    ECX,ECX
+         JLE     @Exit
+         PUSH    EAX
+         MOV     EAX,[EAX].TROHash_XOR32.FCRC
+         TEST    ECX,1
+         JE      @@1
+         XOR     AX,[EDX]
+         INC     EDX
+@@1:     SHR     ECX,1
+         JECXZ   @@3
+@@2:     ROL     EAX,5
+         XOR     AX,[EDX]
+         ADD     EDX,2
+         DEC     ECX
+         JNZ     @@2
+@@3:     POP     EDX
+         MOV     [EDX].TROHash_XOR32.FCRC,EAX
+@Exit:
+end;
+
+function TROHash_XOR32.DigestKey: Pointer;
+begin
+  Result := @FCRC;
+end;
+
+class function TROHash_CRC32.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    058h,0EEh,01Fh,031h
+end;
+
+procedure TROHash_CRC32.Init;
+begin
+  FCRC := $FFFFFFFF;
+  Protect(True);
+end;
+
+procedure TROHash_CRC32.Calc(const Data; DataSize: Integer); assembler; register;
+asm
+         PUSH   EAX
+         MOV    EAX,[EAX].TROHash_CRC32.FCRC
+         CALL   CRC32
+         POP    EDX
+         MOV    [EDX].TROHash_CRC32.FCRC,EAX
+end;
+
+procedure TROHash_CRC32.Done;
+begin
+  FCRC := not FCRC;
+  Protect(False);
+end;
+
+class function TROHash_CRC16_CCITT.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    0B0h,0D1h
+end;
+
+procedure TROHash_CRC16_CCITT.Init;
+begin
+  FCRC := $FFFF;
+  Protect(True);
+end;
+
+procedure TROHash_CRC16_CCITT.Calc(const Data; DataSize: Integer);
+asm
+         AND    EDX,EDX
+         JZ     @Exit
+         AND    ECX,ECX
+         JLE    @Exit
+         PUSH   EAX
+         MOV    AX,[EAX].TROHash_CRC16_CCITT.FCRC
+         PUSH   EBX
+         PUSH   EDI
+         XOR    EBX,EBX
+         LEA    EDI,CS:[OFFSET @CRC16]
+@Start:  MOV    BL,AH
+         SHL    AX,8
+         MOV    AL,[EDX]
+         XOR    AX,[EDI + EBX * 2]
+         INC    EDX
+         DEC    ECX
+         JNZ    @Start
+         POP    EDI
+         POP    EBX
+         POP    EDX
+         MOV    [EDX].TROHash_CRC16_CCITT.FCRC,AX
+@Exit:   RET
+
+@CRC16:  DW     00000h, 01021h, 02042h, 03063h, 04084h, 050A5h, 060C6h, 070E7h
+         DW     08108h, 09129h, 0A14Ah, 0B16Bh, 0C18Ch, 0D1ADh, 0E1CEh, 0F1EFh
+         DW     01231h, 00210h, 03273h, 02252h, 052B5h, 04294h, 072F7h, 062D6h
+         DW     09339h, 08318h, 0B37Bh, 0A35Ah, 0D3BDh, 0C39Ch, 0F3FFh, 0E3DEh
+         DW     02462h, 03443h, 00420h, 01401h, 064E6h, 074C7h, 044A4h, 05485h
+         DW     0A56Ah, 0B54Bh, 08528h, 09509h, 0E5EEh, 0F5CFh, 0C5ACh, 0D58Dh
+         DW     03653h, 02672h, 01611h, 00630h, 076D7h, 066F6h, 05695h, 046B4h
+         DW     0B75Bh, 0A77Ah, 09719h, 08738h, 0F7DFh, 0E7FEh, 0D79Dh, 0C7BCh
+         DW     048C4h, 058E5h, 06886h, 078A7h, 00840h, 01861h, 02802h, 03823h
+         DW     0C9CCh, 0D9EDh, 0E98Eh, 0F9AFh, 08948h, 09969h, 0A90Ah, 0B92Bh
+         DW     05AF5h, 04AD4h, 07AB7h, 06A96h, 01A71h, 00A50h, 03A33h, 02A12h
+         DW     0DBFDh, 0CBDCh, 0FBBFh, 0EB9Eh, 09B79h, 08B58h, 0BB3Bh, 0AB1Ah
+         DW     06CA6h, 07C87h, 04CE4h, 05CC5h, 02C22h, 03C03h, 00C60h, 01C41h
+         DW     0EDAEh, 0FD8Fh, 0CDECh, 0DDCDh, 0AD2Ah, 0BD0Bh, 08D68h, 09D49h
+         DW     07E97h, 06EB6h, 05ED5h, 04EF4h, 03E13h, 02E32h, 01E51h, 00E70h
+         DW     0FF9Fh, 0EFBEh, 0DFDDh, 0CFFCh, 0BF1Bh, 0AF3Ah, 09F59h, 08F78h
+         DW     09188h, 081A9h, 0B1CAh, 0A1EBh, 0D10Ch, 0C12Dh, 0F14Eh, 0E16Fh
+         DW     01080h, 000A1h, 030C2h, 020E3h, 05004h, 04025h, 07046h, 06067h
+         DW     083B9h, 09398h, 0A3FBh, 0B3DAh, 0C33Dh, 0D31Ch, 0E37Fh, 0F35Eh
+         DW     002B1h, 01290h, 022F3h, 032D2h, 04235h, 05214h, 06277h, 07256h
+         DW     0B5EAh, 0A5CBh, 095A8h, 08589h, 0F56Eh, 0E54Fh, 0D52Ch, 0C50Dh
+         DW     034E2h, 024C3h, 014A0h, 00481h, 07466h, 06447h, 05424h, 04405h
+         DW     0A7DBh, 0B7FAh, 08799h, 097B8h, 0E75Fh, 0F77Eh, 0C71Dh, 0D73Ch
+         DW     026D3h, 036F2h, 00691h, 016B0h, 06657h, 07676h, 04615h, 05634h
+         DW     0D94Ch, 0C96Dh, 0F90Eh, 0E92Fh, 099C8h, 089E9h, 0B98Ah, 0A9ABh
+         DW     05844h, 04865h, 07806h, 06827h, 018C0h, 008E1h, 03882h, 028A3h
+         DW     0CB7Dh, 0DB5Ch, 0EB3Fh, 0FB1Eh, 08BF9h, 09BD8h, 0ABBBh, 0BB9Ah
+         DW     04A75h, 05A54h, 06A37h, 07A16h, 00AF1h, 01AD0h, 02AB3h, 03A92h
+         DW     0FD2Eh, 0ED0Fh, 0DD6Ch, 0CD4Dh, 0BDAAh, 0AD8Bh, 09DE8h, 08DC9h
+         DW     07C26h, 06C07h, 05C64h, 04C45h, 03CA2h, 02C83h, 01CE0h, 00CC1h
+         DW     0EF1Fh, 0FF3Eh, 0CF5Dh, 0DF7Ch, 0AF9Bh, 0BFBAh, 08FD9h, 09FF8h
+         DW     06E17h, 07E36h, 04E55h, 05E74h, 02E93h, 03EB2h, 00ED1h, 01EF0h
+end;
+
+class function TROhash_CRC16_Standard.TestVector: Pointer;
+asm
+         MOV   EAX,OFFSET @Vector
+         RET
+@Vector: DB    0EDh,075h
+end;
+
+procedure TROhash_CRC16_Standard.Calc(const Data; DataSize: Integer);
+asm
+         PUSH   EAX
+         MOV    AX,[EAX].TROhash_CRC16_Standard.FCRC
+         CALL   CRC16
+         POP    EDX
+         MOV    [EDX].TROhash_CRC16_Standard.FCRC,AX
+end;
+{$IFDEF VER_D3H}
+procedure ModuleUnload(Module: Longword);
+var
+  I: Integer;
+begin
+  if IsObject(FHashList, TStringList) then
+    for I := HashList.Count-1 downto 0 do
+      if FindClassHInstance(TClass(FHashList.Objects[I])) = Module then
+        FHashList.Delete(I);
+end;
+{$ENDIF}
+
+initialization
+  if CPUType <= 3 then SHABuffer := SHABuffer386 else SHABuffer := SHABuffer486;
+{$IFDEF VER_D3H}
+  AddModuleUnloadProc(ModuleUnload);
+{$ENDIF}
+{$IFNDEF ManualRegisterClasses}
+  RegisterHash(TROHash_MD4, 'Message Digest 4', 'RO_Hash');
+  RegisterHash(TROHash_MD5, 'Message Digest 5', 'RO_Hash');
+  RegisterHash(TROHash_SHA, 'Secure RO_Hash Algorithm', 'RO_Hash');
+  RegisterHash(TROHash_SHA1, 'Secure RO_Hash Algorithm 1', 'RO_Hash');
+  RegisterHash(TROHash_RipeMD128, 'Ripe Message Digest 128', 'RO_Hash');
+  RegisterHash(TROHash_RipeMD160, 'Ripe Message Digest 160', 'RO_Hash');
+  RegisterHash(TROHash_RipeMD256, 'Ripe Message Digest 256', 'RO_Hash');
+  RegisterHash(TROHash_RipeMD320, 'Ripe Message Digest 320', 'RO_Hash');
+  RegisterHash(TROHash_Haval128, 'Haval-128', 'RO_Hash');
+  RegisterHash(TROHash_Haval160, 'Haval-160', 'RO_Hash');
+  RegisterHash(TROHash_Haval192, 'Haval-192', 'RO_Hash');
+  RegisterHash(TROHash_Haval224, 'Haval-224', 'RO_Hash');
+  RegisterHash(TROHash_Haval256, 'Haval-256', 'RO_Hash');
+  RegisterHash(TROHash_Sapphire128, 'Sapphire II-128', 'RO_Hash');
+  RegisterHash(TROHash_Sapphire160, 'Sapphire II-160', 'RO_Hash');
+  RegisterHash(TROHash_Sapphire192, 'Sapphire II-192', 'RO_Hash');
+  RegisterHash(TROHash_Sapphire224, 'Sapphire II-224', 'RO_Hash');
+  RegisterHash(TROHash_Sapphire256, 'Sapphire II-256', 'RO_Hash');
+  RegisterHash(TROHash_Sapphire288, 'Sapphire II-288', 'RO_Hash');
+  RegisterHash(TROHash_Sapphire320, 'Sapphire II-320', 'RO_Hash');
+  RegisterHash(TROHash_Snefru, 'Snefru-256', 'RO_Hash');
+  RegisterHash(TROHash_Square, 'Square', 'RO_Hash');
+  RegisterHash(TROHash_Tiger, 'Tiger', 'RO_Hash');
+  RegisterHash(TROHash_XOR16, 'XOR-16', 'Checksum');
+  RegisterHash(TROHash_XOR32, 'XOR-32', 'Checksum');
+  RegisterHash(TROHash_CRC16_CCITT, 'CRC-16 CCITT', 'Checksum');
+  RegisterHash(TROhash_CRC16_Standard, 'CRC-16 Standard', 'Checksum');
+  RegisterHash(TROHash_CRC32, 'CRC-32', 'Checksum');
+{$ENDIF}  
+finalization
+{$IFDEF VER_D3H}
+  RemoveModuleUnloadProc(ModuleUnload);
+{$ENDIF}
+  FHashList.Free;
+  FHashList := nil;
+end.
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uRORFC1760.RES b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uRORFC1760.RES
new file mode 100644
index 0000000..b5f037b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uRORFC1760.RES differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uRORFC1760.inc b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uRORFC1760.inc
new file mode 100644
index 0000000..5d0736b
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uRORFC1760.inc	
@@ -0,0 +1,258 @@
+const
+  RFC1760Entries : array[0..2047] of array[0..3] of Char =
+   ('A',    'ABE',  'ACE',  'ACT',  'AD',   'ADA',  'ADD',  'AGO',
+    'AID',  'AIM',  'AIR',  'ALL',  'ALP',  'AM',   'AMY',  'AN',
+    'ANA',  'AND',  'ANN',  'ANT',  'ANY',  'APE',  'APS',  'APT',
+    'ARC',  'ARE',  'ARK',  'ARM',  'ART',  'AS',   'ASH',  'ASK',
+    'AT',   'ATE',  'AUG',  'AUK',  'AVE',  'AWE',  'AWK',  'AWL',
+    'AWN',  'AX',   'AYE',  'BAD',  'BAG',  'BAH',  'BAM',  'BAN',
+    'BAR',  'BAT',  'BAY',  'BE',   'BED',  'BEE',  'BEG',  'BEN',
+    'BET',  'BEY',  'BIB',  'BID',  'BIG',  'BIN',  'BIT',  'BOB',
+    'BOG',  'BON',  'BOO',  'BOP',  'BOW',  'BOY',  'BUB',  'BUD',
+    'BUG',  'BUM',  'BUN',  'BUS',  'BUT',  'BUY',  'BY',   'BYE',
+    'CAB',  'CAL',  'CAM',  'CAN',  'CAP',  'CAR',  'CAT',  'CAW',
+    'COD',  'COG',  'COL',  'CON',  'COO',  'COP',  'COT',  'COW',
+    'COY',  'CRY',  'CUB',  'CUE',  'CUP',  'CUR',  'CUT',  'DAB',
+    'DAD',  'DAM',  'DAN',  'DAR',  'DAY',  'DEE',  'DEL',  'DEN',
+    'DES',  'DEW',  'DID',  'DIE',  'DIG',  'DIN',  'DIP',  'DO',
+    'DOE',  'DOG',  'DON',  'DOT',  'DOW',  'DRY',  'DUB',  'DUD',
+    'DUE',  'DUG',  'DUN',  'EAR',  'EAT',  'ED',   'EEL',  'EGG',
+    'EGO',  'ELI',  'ELK',  'ELM',  'ELY',  'EM',   'END',  'EST',
+    'ETC',  'EVA',  'EVE',  'EWE',  'EYE',  'FAD',  'FAN',  'FAR',
+    'FAT',  'FAY',  'FED',  'FEE',  'FEW',  'FIB',  'FIG',  'FIN',
+    'FIR',  'FIT',  'FLO',  'FLY',  'FOE',  'FOG',  'FOR',  'FRY',
+    'FUM',  'FUN',  'FUR',  'GAB',  'GAD',  'GAG',  'GAL',  'GAM',
+    'GAP',  'GAS',  'GAY',  'GEE',  'GEL',  'GEM',  'GET',  'GIG',
+    'GIL',  'GIN',  'GO',   'GOT',  'GUM',  'GUN',  'GUS',  'GUT',
+    'GUY',  'GYM',  'GYP',  'HA',   'HAD',  'HAL',  'HAM',  'HAN',
+    'HAP',  'HAS',  'HAT',  'HAW',  'HAY',  'HE',   'HEM',  'HEN',
+    'HER',  'HEW',  'HEY',  'HI',   'HID',  'HIM',  'HIP',  'HIS',
+    'HIT',  'HO',   'HOB',  'HOC',  'HOE',  'HOG',  'HOP',  'HOT',
+    'HOW',  'HUB',  'HUE',  'HUG',  'HUH',  'HUM',  'HUT',  'I',
+    'ICY',  'IDA',  'IF',   'IKE',  'ILL',  'INK',  'INN',  'IO',
+    'ION',  'IQ',   'IRA',  'IRE',  'IRK',  'IS',   'IT',   'ITS',
+    'IVY',  'JAB',  'JAG',  'JAM',  'JAN',  'JAR',  'JAW',  'JAY',
+    'JET',  'JIG',  'JIM',  'JO',   'JOB',  'JOE',  'JOG',  'JOT',
+    'JOY',  'JUG',  'JUT',  'KAY',  'KEG',  'KEN',  'KEY',  'KID',
+    'KIM',  'KIN',  'KIT',  'LA',   'LAB',  'LAC',  'LAD',  'LAG',
+    'LAM',  'LAP',  'LAW',  'LAY',  'LEA',  'LED',  'LEE',  'LEG',
+    'LEN',  'LEO',  'LET',  'LEW',  'LID',  'LIE',  'LIN',  'LIP',
+    'LIT',  'LO',   'LOB',  'LOG',  'LOP',  'LOS',  'LOT',  'LOU',
+    'LOW',  'LOY',  'LUG',  'LYE',  'MA',   'MAC',  'MAD',  'MAE',
+    'MAN',  'MAO',  'MAP',  'MAT',  'MAW',  'MAY',  'ME',   'MEG',
+    'MEL',  'MEN',  'MET',  'MEW',  'MID',  'MIN',  'MIT',  'MOB',
+    'MOD',  'MOE',  'MOO',  'MOP',  'MOS',  'MOT',  'MOW',  'MUD',
+    'MUG',  'MUM',  'MY',   'NAB',  'NAG',  'NAN',  'NAP',  'NAT',
+    'NAY',  'NE',   'NED',  'NEE',  'NET',  'NEW',  'NIB',  'NIL',
+    'NIP',  'NIT',  'NO',   'NOB',  'NOD',  'NON',  'NOR',  'NOT',
+    'NOV',  'NOW',  'NU',   'NUN',  'NUT',  'O',    'OAF',  'OAK',
+    'OAR',  'OAT',  'ODD',  'ODE',  'OF',   'OFF',  'OFT',  'OH',
+    'OIL',  'OK',   'OLD',  'ON',   'ONE',  'OR',   'ORB',  'ORE',
+    'ORR',  'OS',   'OTT',  'OUR',  'OUT',  'OVA',  'OW',   'OWE',
+    'OWL',  'OWN',  'OX',   'PA',   'PAD',  'PAL',  'PAM',  'PAN',
+    'PAP',  'PAR',  'PAT',  'PAW',  'PAY',  'PEA',  'PEG',  'PEN',
+    'PEP',  'PER',  'PET',  'PEW',  'PHI',  'PI',   'PIE',  'PIN',
+    'PIT',  'PLY',  'PO',   'POD',  'POE',  'POP',  'POT',  'POW',
+    'PRO',  'PRY',  'PUB',  'PUG',  'PUN',  'PUP',  'PUT',  'QUO',
+    'RAG',  'RAM',  'RAN',  'RAP',  'RAT',  'RAW',  'RAY',  'REB',
+    'RED',  'REP',  'RET',  'RIB',  'RID',  'RIG',  'RIM',  'RIO',
+    'RIP',  'ROB',  'ROD',  'ROE',  'RON',  'ROT',  'ROW',  'ROY',
+    'RUB',  'RUE',  'RUG',  'RUM',  'RUN',  'RYE',  'SAC',  'SAD',
+    'SAG',  'SAL',  'SAM',  'SAN',  'SAP',  'SAT',  'SAW',  'SAY',
+    'SEA',  'SEC',  'SEE',  'SEN',  'SET',  'SEW',  'SHE',  'SHY',
+    'SIN',  'SIP',  'SIR',  'SIS',  'SIT',  'SKI',  'SKY',  'SLY',
+    'SO',   'SOB',  'SOD',  'SON',  'SOP',  'SOW',  'SOY',  'SPA',
+    'SPY',  'SUB',  'SUD',  'SUE',  'SUM',  'SUN',  'SUP',  'TAB',
+    'TAD',  'TAG',  'TAN',  'TAP',  'TAR',  'TEA',  'TED',  'TEE',
+    'TEN',  'THE',  'THY',  'TIC',  'TIE',  'TIM',  'TIN',  'TIP',
+    'TO',   'TOE',  'TOG',  'TOM',  'TON',  'TOO',  'TOP',  'TOW',
+    'TOY',  'TRY',  'TUB',  'TUG',  'TUM',  'TUN',  'TWO',  'UN',
+    'UP',   'US',   'USE',  'VAN',  'VAT',  'VET',  'VIE',  'WAD',
+    'WAG',  'WAR',  'WAS',  'WAY',  'WE',   'WEB',  'WED',  'WEE',
+    'WET',  'WHO',  'WHY',  'WIN',  'WIT',  'WOK',  'WON',  'WOO',
+    'WOW',  'WRY',  'WU',   'YAM',  'YAP',  'YAW',  'YE',   'YEA',
+    'YES',  'YET',  'YOU',  'ABED', 'ABEL', 'ABET', 'ABLE', 'ABUT',
+    'ACHE', 'ACID', 'ACME', 'ACRE', 'ACTA', 'ACTS', 'ADAM', 'ADDS',
+    'ADEN', 'AFAR', 'AFRO', 'AGEE', 'AHEM', 'AHOY', 'AIDA', 'AIDE',
+    'AIDS', 'AIRY', 'AJAR', 'AKIN', 'ALAN', 'ALEC', 'ALGA', 'ALIA',
+    'ALLY', 'ALMA', 'ALOE', 'ALSO', 'ALTO', 'ALUM', 'ALVA', 'AMEN',
+    'AMES', 'AMID', 'AMMO', 'AMOK', 'AMOS', 'AMRA', 'ANDY', 'ANEW',
+    'ANNA', 'ANNE', 'ANTE', 'ANTI', 'AQUA', 'ARAB', 'ARCH', 'AREA',
+    'ARGO', 'ARID', 'ARMY', 'ARTS', 'ARTY', 'ASIA', 'ASKS', 'ATOM',
+    'AUNT', 'AURA', 'AUTO', 'AVER', 'AVID', 'AVIS', 'AVON', 'AVOW',
+    'AWAY', 'AWRY', 'BABE', 'BABY', 'BACH', 'BACK', 'BADE', 'BAIL',
+    'BAIT', 'BAKE', 'BALD', 'BALE', 'BALI', 'BALK', 'BALL', 'BALM',
+    'BAND', 'BANE', 'BANG', 'BANK', 'BARB', 'BARD', 'BARE', 'BARK',
+    'BARN', 'BARR', 'BASE', 'BASH', 'BASK', 'BASS', 'BATE', 'BATH',
+    'BAWD', 'BAWL', 'BEAD', 'BEAK', 'BEAM', 'BEAN', 'BEAR', 'BEAT',
+    'BEAU', 'BECK', 'BEEF', 'BEEN', 'BEER', 'BEET', 'BELA', 'BELL',
+    'BELT', 'BEND', 'BENT', 'BERG', 'BERN', 'BERT', 'BESS', 'BEST',
+    'BETA', 'BETH', 'BHOY', 'BIAS', 'BIDE', 'BIEN', 'BILE', 'BILK',
+    'BILL', 'BIND', 'BING', 'BIRD', 'BITE', 'BITS', 'BLAB', 'BLAT',
+    'BLED', 'BLEW', 'BLOB', 'BLOC', 'BLOT', 'BLOW', 'BLUE', 'BLUM',
+    'BLUR', 'BOAR', 'BOAT', 'BOCA', 'BOCK', 'BODE', 'BODY', 'BOGY',
+    'BOHR', 'BOIL', 'BOLD', 'BOLO', 'BOLT', 'BOMB', 'BONA', 'BOND',
+    'BONE', 'BONG', 'BONN', 'BONY', 'BOOK', 'BOOM', 'BOON', 'BOOT',
+    'BORE', 'BORG', 'BORN', 'BOSE', 'BOSS', 'BOTH', 'BOUT', 'BOWL',
+    'BOYD', 'BRAD', 'BRAE', 'BRAG', 'BRAN', 'BRAY', 'BRED', 'BREW',
+    'BRIG', 'BRIM', 'BROW', 'BUCK', 'BUDD', 'BUFF', 'BULB', 'BULK',
+    'BULL', 'BUNK', 'BUNT', 'BUOY', 'BURG', 'BURL', 'BURN', 'BURR',
+    'BURT', 'BURY', 'BUSH', 'BUSS', 'BUST', 'BUSY', 'BYTE', 'CADY',
+    'CAFE', 'CAGE', 'CAIN', 'CAKE', 'CALF', 'CALL', 'CALM', 'CAME',
+    'CANE', 'CANT', 'CARD', 'CARE', 'CARL', 'CARR', 'CART', 'CASE',
+    'CASH', 'CASK', 'CAST', 'CAVE', 'CEIL', 'CELL', 'CENT', 'CERN',
+    'CHAD', 'CHAR', 'CHAT', 'CHAW', 'CHEF', 'CHEN', 'CHEW', 'CHIC',
+    'CHIN', 'CHOU', 'CHOW', 'CHUB', 'CHUG', 'CHUM', 'CITE', 'CITY',
+    'CLAD', 'CLAM', 'CLAN', 'CLAW', 'CLAY', 'CLOD', 'CLOG', 'CLOT',
+    'CLUB', 'CLUE', 'COAL', 'COAT', 'COCA', 'COCK', 'COCO', 'CODA',
+    'CODE', 'CODY', 'COED', 'COIL', 'COIN', 'COKE', 'COLA', 'COLD',
+    'COLT', 'COMA', 'COMB', 'COME', 'COOK', 'COOL', 'COON', 'COOT',
+    'CORD', 'CORE', 'CORK', 'CORN', 'COST', 'COVE', 'COWL', 'CRAB',
+    'CRAG', 'CRAM', 'CRAY', 'CREW', 'CRIB', 'CROW', 'CRUD', 'CUBA',
+    'CUBE', 'CUFF', 'CULL', 'CULT', 'CUNY', 'CURB', 'CURD', 'CURE',
+    'CURL', 'CURT', 'CUTS', 'DADE', 'DALE', 'DAME', 'DANA', 'DANE',
+    'DANG', 'DANK', 'DARE', 'DARK', 'DARN', 'DART', 'DASH', 'DATA',
+    'DATE', 'DAVE', 'DAVY', 'DAWN', 'DAYS', 'DEAD', 'DEAF', 'DEAL',
+    'DEAN', 'DEAR', 'DEBT', 'DECK', 'DEED', 'DEEM', 'DEER', 'DEFT',
+    'DEFY', 'DELL', 'DENT', 'DENY', 'DESK', 'DIAL', 'DICE', 'DIED',
+    'DIET', 'DIME', 'DINE', 'DING', 'DINT', 'DIRE', 'DIRT', 'DISC',
+    'DISH', 'DISK', 'DIVE', 'DOCK', 'DOES', 'DOLE', 'DOLL', 'DOLT',
+    'DOME', 'DONE', 'DOOM', 'DOOR', 'DORA', 'DOSE', 'DOTE', 'DOUG',
+    'DOUR', 'DOVE', 'DOWN', 'DRAB', 'DRAG', 'DRAM', 'DRAW', 'DREW',
+    'DRUB', 'DRUG', 'DRUM', 'DUAL', 'DUCK', 'DUCT', 'DUEL', 'DUET',
+    'DUKE', 'DULL', 'DUMB', 'DUNE', 'DUNK', 'DUSK', 'DUST', 'DUTY',
+    'EACH', 'EARL', 'EARN', 'EASE', 'EAST', 'EASY', 'EBEN', 'ECHO',
+    'EDDY', 'EDEN', 'EDGE', 'EDGY', 'EDIT', 'EDNA', 'EGAN', 'ELAN',
+    'ELBA', 'ELLA', 'ELSE', 'EMIL', 'EMIT', 'EMMA', 'ENDS', 'ERIC',
+    'EROS', 'EVEN', 'EVER', 'EVIL', 'EYED', 'FACE', 'FACT', 'FADE',
+    'FAIL', 'FAIN', 'FAIR', 'FAKE', 'FALL', 'FAME', 'FANG', 'FARM',
+    'FAST', 'FATE', 'FAWN', 'FEAR', 'FEAT', 'FEED', 'FEEL', 'FEET',
+    'FELL', 'FELT', 'FEND', 'FERN', 'FEST', 'FEUD', 'FIEF', 'FIGS',
+    'FILE', 'FILL', 'FILM', 'FIND', 'FINE', 'FINK', 'FIRE', 'FIRM',
+    'FISH', 'FISK', 'FIST', 'FITS', 'FIVE', 'FLAG', 'FLAK', 'FLAM',
+    'FLAT', 'FLAW', 'FLEA', 'FLED', 'FLEW', 'FLIT', 'FLOC', 'FLOG',
+    'FLOW', 'FLUB', 'FLUE', 'FOAL', 'FOAM', 'FOGY', 'FOIL', 'FOLD',
+    'FOLK', 'FOND', 'FONT', 'FOOD', 'FOOL', 'FOOT', 'FORD', 'FORE',
+    'FORK', 'FORM', 'FORT', 'FOSS', 'FOUL', 'FOUR', 'FOWL', 'FRAU',
+    'FRAY', 'FRED', 'FREE', 'FRET', 'FREY', 'FROG', 'FROM', 'FUEL',
+    'FULL', 'FUME', 'FUND', 'FUNK', 'FURY', 'FUSE', 'FUSS', 'GAFF',
+    'GAGE', 'GAIL', 'GAIN', 'GAIT', 'GALA', 'GALE', 'GALL', 'GALT',
+    'GAME', 'GANG', 'GARB', 'GARY', 'GASH', 'GATE', 'GAUL', 'GAUR',
+    'GAVE', 'GAWK', 'GEAR', 'GELD', 'GENE', 'GENT', 'GERM', 'GETS',
+    'GIBE', 'GIFT', 'GILD', 'GILL', 'GILT', 'GINA', 'GIRD', 'GIRL',
+    'GIST', 'GIVE', 'GLAD', 'GLEE', 'GLEN', 'GLIB', 'GLOB', 'GLOM',
+    'GLOW', 'GLUE', 'GLUM', 'GLUT', 'GOAD', 'GOAL', 'GOAT', 'GOER',
+    'GOES', 'GOLD', 'GOLF', 'GONE', 'GONG', 'GOOD', 'GOOF', 'GORE',
+    'GORY', 'GOSH', 'GOUT', 'GOWN', 'GRAB', 'GRAD', 'GRAY', 'GREG',
+    'GREW', 'GREY', 'GRID', 'GRIM', 'GRIN', 'GRIT', 'GROW', 'GRUB',
+    'GULF', 'GULL', 'GUNK', 'GURU', 'GUSH', 'GUST', 'GWEN', 'GWYN',
+    'HAAG', 'HAAS', 'HACK', 'HAIL', 'HAIR', 'HALE', 'HALF', 'HALL',
+    'HALO', 'HALT', 'HAND', 'HANG', 'HANK', 'HANS', 'HARD', 'HARK',
+    'HARM', 'HART', 'HASH', 'HAST', 'HATE', 'HATH', 'HAUL', 'HAVE',
+    'HAWK', 'HAYS', 'HEAD', 'HEAL', 'HEAR', 'HEAT', 'HEBE', 'HECK',
+    'HEED', 'HEEL', 'HEFT', 'HELD', 'HELL', 'HELM', 'HERB', 'HERD',
+    'HERE', 'HERO', 'HERS', 'HESS', 'HEWN', 'HICK', 'HIDE', 'HIGH',
+    'HIKE', 'HILL', 'HILT', 'HIND', 'HINT', 'HIRE', 'HISS', 'HIVE',
+    'HOBO', 'HOCK', 'HOFF', 'HOLD', 'HOLE', 'HOLM', 'HOLT', 'HOME',
+    'HONE', 'HONK', 'HOOD', 'HOOF', 'HOOK', 'HOOT', 'HORN', 'HOSE',
+    'HOST', 'HOUR', 'HOVE', 'HOWE', 'HOWL', 'HOYT', 'HUCK', 'HUED',
+    'HUFF', 'HUGE', 'HUGH', 'HUGO', 'HULK', 'HULL', 'HUNK', 'HUNT',
+    'HURD', 'HURL', 'HURT', 'HUSH', 'HYDE', 'HYMN', 'IBIS', 'ICON',
+    'IDEA', 'IDLE', 'IFFY', 'INCA', 'INCH', 'INTO', 'IONS', 'IOTA',
+    'IOWA', 'IRIS', 'IRMA', 'IRON', 'ISLE', 'ITCH', 'ITEM', 'IVAN',
+    'JACK', 'JADE', 'JAIL', 'JAKE', 'JANE', 'JAVA', 'JEAN', 'JEFF',
+    'JERK', 'JESS', 'JEST', 'JIBE', 'JILL', 'JILT', 'JIVE', 'JOAN',
+    'JOBS', 'JOCK', 'JOEL', 'JOEY', 'JOHN', 'JOIN', 'JOKE', 'JOLT',
+    'JOVE', 'JUDD', 'JUDE', 'JUDO', 'JUDY', 'JUJU', 'JUKE', 'JULY',
+    'JUNE', 'JUNK', 'JUNO', 'JURY', 'JUST', 'JUTE', 'KAHN', 'KALE',
+    'KANE', 'KANT', 'KARL', 'KATE', 'KEEL', 'KEEN', 'KENO', 'KENT',
+    'KERN', 'KERR', 'KEYS', 'KICK', 'KILL', 'KIND', 'KING', 'KIRK',
+    'KISS', 'KITE', 'KLAN', 'KNEE', 'KNEW', 'KNIT', 'KNOB', 'KNOT',
+    'KNOW', 'KOCH', 'KONG', 'KUDO', 'KURD', 'KURT', 'KYLE', 'LACE',
+    'LACK', 'LACY', 'LADY', 'LAID', 'LAIN', 'LAIR', 'LAKE', 'LAMB',
+    'LAME', 'LAND', 'LANE', 'LANG', 'LARD', 'LARK', 'LASS', 'LAST',
+    'LATE', 'LAUD', 'LAVA', 'LAWN', 'LAWS', 'LAYS', 'LEAD', 'LEAF',
+    'LEAK', 'LEAN', 'LEAR', 'LEEK', 'LEER', 'LEFT', 'LEND', 'LENS',
+    'LENT', 'LEON', 'LESK', 'LESS', 'LEST', 'LETS', 'LIAR', 'LICE',
+    'LICK', 'LIED', 'LIEN', 'LIES', 'LIEU', 'LIFE', 'LIFT', 'LIKE',
+    'LILA', 'LILT', 'LILY', 'LIMA', 'LIMB', 'LIME', 'LIND', 'LINE',
+    'LINK', 'LINT', 'LION', 'LISA', 'LIST', 'LIVE', 'LOAD', 'LOAF',
+    'LOAM', 'LOAN', 'LOCK', 'LOFT', 'LOGE', 'LOIS', 'LOLA', 'LONE',
+    'LONG', 'LOOK', 'LOON', 'LOOT', 'LORD', 'LORE', 'LOSE', 'LOSS',
+    'LOST', 'LOUD', 'LOVE', 'LOWE', 'LUCK', 'LUCY', 'LUGE', 'LUKE',
+    'LULU', 'LUND', 'LUNG', 'LURA', 'LURE', 'LURK', 'LUSH', 'LUST',
+    'LYLE', 'LYNN', 'LYON', 'LYRA', 'MACE', 'MADE', 'MAGI', 'MAID',
+    'MAIL', 'MAIN', 'MAKE', 'MALE', 'MALI', 'MALL', 'MALT', 'MANA',
+    'MANN', 'MANY', 'MARC', 'MARE', 'MARK', 'MARS', 'MART', 'MARY',
+    'MASH', 'MASK', 'MASS', 'MAST', 'MATE', 'MATH', 'MAUL', 'MAYO',
+    'MEAD', 'MEAL', 'MEAN', 'MEAT', 'MEEK', 'MEET', 'MELD', 'MELT',
+    'MEMO', 'MEND', 'MENU', 'MERT', 'MESH', 'MESS', 'MICE', 'MIKE',
+    'MILD', 'MILE', 'MILK', 'MILL', 'MILT', 'MIMI', 'MIND', 'MINE',
+    'MINI', 'MINK', 'MINT', 'MIRE', 'MISS', 'MIST', 'MITE', 'MITT',
+    'MOAN', 'MOAT', 'MOCK', 'MODE', 'MOLD', 'MOLE', 'MOLL', 'MOLT',
+    'MONA', 'MONK', 'MONT', 'MOOD', 'MOON', 'MOOR', 'MOOT', 'MORE',
+    'MORN', 'MORT', 'MOSS', 'MOST', 'MOTH', 'MOVE', 'MUCH', 'MUCK',
+    'MUDD', 'MUFF', 'MULE', 'MULL', 'MURK', 'MUSH', 'MUST', 'MUTE',
+    'MUTT', 'MYRA', 'MYTH', 'NAGY', 'NAIL', 'NAIR', 'NAME', 'NARY',
+    'NASH', 'NAVE', 'NAVY', 'NEAL', 'NEAR', 'NEAT', 'NECK', 'NEED',
+    'NEIL', 'NELL', 'NEON', 'NERO', 'NESS', 'NEST', 'NEWS', 'NEWT',
+    'NIBS', 'NICE', 'NICK', 'NILE', 'NINA', 'NINE', 'NOAH', 'NODE',
+    'NOEL', 'NOLL', 'NONE', 'NOOK', 'NOON', 'NORM', 'NOSE', 'NOTE',
+    'NOUN', 'NOVA', 'NUDE', 'NULL', 'NUMB', 'OATH', 'OBEY', 'OBOE',
+    'ODIN', 'OHIO', 'OILY', 'OINT', 'OKAY', 'OLAF', 'OLDY', 'OLGA',
+    'OLIN', 'OMAN', 'OMEN', 'OMIT', 'ONCE', 'ONES', 'ONLY', 'ONTO',
+    'ONUS', 'ORAL', 'ORGY', 'OSLO', 'OTIS', 'OTTO', 'OUCH', 'OUST',
+    'OUTS', 'OVAL', 'OVEN', 'OVER', 'OWLY', 'OWNS', 'QUAD', 'QUIT',
+    'QUOD', 'RACE', 'RACK', 'RACY', 'RAFT', 'RAGE', 'RAID', 'RAIL',
+    'RAIN', 'RAKE', 'RANK', 'RANT', 'RARE', 'RASH', 'RATE', 'RAVE',
+    'RAYS', 'READ', 'REAL', 'REAM', 'REAR', 'RECK', 'REED', 'REEF',
+    'REEK', 'REEL', 'REID', 'REIN', 'RENA', 'REND', 'RENT', 'REST',
+    'RICE', 'RICH', 'RICK', 'RIDE', 'RIFT', 'RILL', 'RIME', 'RING',
+    'RINK', 'RISE', 'RISK', 'RITE', 'ROAD', 'ROAM', 'ROAR', 'ROBE',
+    'ROCK', 'RODE', 'ROIL', 'ROLL', 'ROME', 'ROOD', 'ROOF', 'ROOK',
+    'ROOM', 'ROOT', 'ROSA', 'ROSE', 'ROSS', 'ROSY', 'ROTH', 'ROUT',
+    'ROVE', 'ROWE', 'ROWS', 'RUBE', 'RUBY', 'RUDE', 'RUDY', 'RUIN',
+    'RULE', 'RUNG', 'RUNS', 'RUNT', 'RUSE', 'RUSH', 'RUSK', 'RUSS',
+    'RUST', 'RUTH', 'SACK', 'SAFE', 'SAGE', 'SAID', 'SAIL', 'SALE',
+    'SALK', 'SALT', 'SAME', 'SAND', 'SANE', 'SANG', 'SANK', 'SARA',
+    'SAUL', 'SAVE', 'SAYS', 'SCAN', 'SCAR', 'SCAT', 'SCOT', 'SEAL',
+    'SEAM', 'SEAR', 'SEAT', 'SEED', 'SEEK', 'SEEM', 'SEEN', 'SEES',
+    'SELF', 'SELL', 'SEND', 'SENT', 'SETS', 'SEWN', 'SHAG', 'SHAM',
+    'SHAW', 'SHAY', 'SHED', 'SHIM', 'SHIN', 'SHOD', 'SHOE', 'SHOT',
+    'SHOW', 'SHUN', 'SHUT', 'SICK', 'SIDE', 'SIFT', 'SIGH', 'SIGN',
+    'SILK', 'SILL', 'SILO', 'SILT', 'SINE', 'SING', 'SINK', 'SIRE',
+    'SITE', 'SITS', 'SITU', 'SKAT', 'SKEW', 'SKID', 'SKIM', 'SKIN',
+    'SKIT', 'SLAB', 'SLAM', 'SLAT', 'SLAY', 'SLED', 'SLEW', 'SLID',
+    'SLIM', 'SLIT', 'SLOB', 'SLOG', 'SLOT', 'SLOW', 'SLUG', 'SLUM',
+    'SLUR', 'SMOG', 'SMUG', 'SNAG', 'SNOB', 'SNOW', 'SNUB', 'SNUG',
+    'SOAK', 'SOAR', 'SOCK', 'SODA', 'SOFA', 'SOFT', 'SOIL', 'SOLD',
+    'SOME', 'SONG', 'SOON', 'SOOT', 'SORE', 'SORT', 'SOUL', 'SOUR',
+    'SOWN', 'STAB', 'STAG', 'STAN', 'STAR', 'STAY', 'STEM', 'STEW',
+    'STIR', 'STOW', 'STUB', 'STUN', 'SUCH', 'SUDS', 'SUIT', 'SULK',
+    'SUMS', 'SUNG', 'SUNK', 'SURE', 'SURF', 'SWAB', 'SWAG', 'SWAM',
+    'SWAN', 'SWAT', 'SWAY', 'SWIM', 'SWUM', 'TACK', 'TACT', 'TAIL',
+    'TAKE', 'TALE', 'TALK', 'TALL', 'TANK', 'TASK', 'TATE', 'TAUT',
+    'TEAL', 'TEAM', 'TEAR', 'TECH', 'TEEM', 'TEEN', 'TEET', 'TELL',
+    'TEND', 'TENT', 'TERM', 'TERN', 'TESS', 'TEST', 'THAN', 'THAT',
+    'THEE', 'THEM', 'THEN', 'THEY', 'THIN', 'THIS', 'THUD', 'THUG',
+    'TICK', 'TIDE', 'TIDY', 'TIED', 'TIER', 'TILE', 'TILL', 'TILT',
+    'TIME', 'TINA', 'TINE', 'TINT', 'TINY', 'TIRE', 'TOAD', 'TOGO',
+    'TOIL', 'TOLD', 'TOLL', 'TONE', 'TONG', 'TONY', 'TOOK', 'TOOL',
+    'TOOT', 'TORE', 'TORN', 'TOTE', 'TOUR', 'TOUT', 'TOWN', 'TRAG',
+    'TRAM', 'TRAY', 'TREE', 'TREK', 'TRIG', 'TRIM', 'TRIO', 'TROD',
+    'TROT', 'TROY', 'TRUE', 'TUBA', 'TUBE', 'TUCK', 'TUFT', 'TUNA',
+    'TUNE', 'TUNG', 'TURF', 'TURN', 'TUSK', 'TWIG', 'TWIN', 'TWIT',
+    'ULAN', 'UNIT', 'URGE', 'USED', 'USER', 'USES', 'UTAH', 'VAIL',
+    'VAIN', 'VALE', 'VARY', 'VASE', 'VAST', 'VEAL', 'VEDA', 'VEIL',
+    'VEIN', 'VEND', 'VENT', 'VERB', 'VERY', 'VETO', 'VICE', 'VIEW',
+    'VINE', 'VISE', 'VOID', 'VOLT', 'VOTE', 'WACK', 'WADE', 'WAGE',
+    'WAIL', 'WAIT', 'WAKE', 'WALE', 'WALK', 'WALL', 'WALT', 'WAND',
+    'WANE', 'WANG', 'WANT', 'WARD', 'WARM', 'WARN', 'WART', 'WASH',
+    'WAST', 'WATS', 'WATT', 'WAVE', 'WAVY', 'WAYS', 'WEAK', 'WEAL',
+    'WEAN', 'WEAR', 'WEED', 'WEEK', 'WEIR', 'WELD', 'WELL', 'WELT',
+    'WENT', 'WERE', 'WERT', 'WEST', 'WHAM', 'WHAT', 'WHEE', 'WHEN',
+    'WHET', 'WHOA', 'WHOM', 'WICK', 'WIFE', 'WILD', 'WILL', 'WIND',
+    'WINE', 'WING', 'WINK', 'WINO', 'WIRE', 'WISE', 'WISH', 'WITH',
+    'WOLF', 'WONT', 'WOOD', 'WOOL', 'WORD', 'WORE', 'WORK', 'WORM',
+    'WORN', 'WOVE', 'WRIT', 'WYNN', 'YALE', 'YANG', 'YANK', 'YARD',
+    'YARN', 'YAWL', 'YAWN', 'YEAH', 'YEAR', 'YELL', 'YOGA', 'YOKE');
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uRORFC2289.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uRORFC2289.pas
new file mode 100644
index 0000000..50bea42
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uRORFC2289.pas	
@@ -0,0 +1,624 @@
+{Copyright:      Hagen Reddmann  mailto:HaReddmann@AOL.COM
+ Author:         Hagen Reddmann
+ Remarks:        freeware, but this Copyright must be included
+ known Problems: none
+ Version:        3.0, Delphi Encryption Compendium
+                 Delphi 2-4, BCB 3-4, designed and testet under D3 and D4
+ Description:    RFC1938 Standard One Time Password Routines  "otp-"
+                 RO_RFC2289 Standard One Time Password Routines  "otp-"
+                 RFC2444 Standard One Time Password Routines  "otp-" "ext"
+                 RFC1760 S/Key One Time Password Routines     "s/key"
+                 RFC1760 Six Word String Converting
+
+ Remarks:        The RFC1760 Six Word Converting in these Library is an
+                 extended (modified) Version. Normaly works the Standard
+                 RFC1760 ONLY with 64 Bit (8 Bytes) Inputs, Six Words Output (66 Bit)
+                 and a Dictionary with 2048 Entries.
+                 The here implemented Version is absolutly compatible with
+                 Standard RFC1760 but works with any Sizes and other
+                 userdefined Dictionary's with variable Entrycount.
+
+ * THIS SOFTWARE IS PROVIDED BY THE AUTHORS ''AS IS'' AND ANY EXPRESS
+ * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+ * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHORS OR CONTRIBUTORS BE
+ * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
+ * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
+ * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
+ * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
+ * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE
+ * OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,
+ * EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+}
+unit uRORFC2289;
+
+interface
+
+uses Windows, SysUtils, Classes, uROHash, uRODECUtil;
+
+{$I uROVer.inc}
+
+const
+  fmtRFC1760   = 1760;   // New StringFormat
+
+type
+  EROOTPException  = class(Exception);
+
+  TROOneTimePassword = class(TComponent)
+  private
+    FSeed: AnsiString;
+    FIdent: AnsiString;
+    FHash: TROHashClass;
+    FCount: Cardinal;
+    FExtended: Boolean;
+    FFormat: Integer;
+    FLastOTP: AnsiString;
+    function GetChallenge: AnsiString;
+    procedure SetChallenge(Value: AnsiString);
+    function GetAlgorithm: String;
+    procedure SetAlgorithm(Value: String);
+    procedure SetIdent(Value: AnsiString);
+    procedure SetHash(Value: TROHashClass);
+    procedure SetSeed(Value: AnsiString);
+  protected
+    function Calc(const Value: AnsiString; ACount: Integer): AnsiString;
+  public
+    constructor Create(AOwner: TComponent); override;
+
+    function  Execute(const Password: AnsiString): AnsiString;
+    function  Check(const OTP: AnsiString): Boolean;
+    procedure Next(const OTP: AnsiString);
+
+    function  NextPhrase(const OTP: AnsiString; ACount: Integer): AnsiString;
+    function  FirstPhrase(const Password: AnsiString): AnsiString;
+
+    property LastOTP: AnsiString read FLastOTP write FLastOTP;
+    property RO_Hash: TROHashClass read FHash write SetHash stored False;
+  published
+    property Algorithm: String read GetAlgorithm write SetAlgorithm stored False;
+    property Ident: AnsiString read FIdent write SetIdent stored False;
+    property Count: Cardinal read FCount write FCount stored False;
+    property Seed: AnsiString read FSeed write SetSeed stored False;
+    property Extended: Boolean read FExtended write FExtended stored False;
+    property Format: Integer read FFormat write FFormat default fmtRFC1760;
+
+    property Challenge: AnsiString read GetChallenge write SetChallenge;
+  end;
+
+  PDictionary = ^TDictionary;
+  TDictionary = packed record
+                  EntryCRC: LongWord;  // computed CRC
+                  EntryCount: Integer; // count of Words in Entries
+                  EntrySize: Integer;  // size of one Word in Entries
+                  Entries: array[0..0] of AnsiChar; // the Dictionary
+                end;
+
+//  TStringFormat_RFC1760Class = class of TROStringFormat_RFC1760;
+
+  TROStringFormat_RFC1760 = class(TROStringFormat)
+  private
+    class function GetDict: PDictionary;
+  protected
+    class function Dictionary: PDictionary; virtual;
+  public
+    class function ToStr(Value: PAnsiChar; Len: Integer): AnsiString; override;
+    class function StrTo(Value: PAnsiChar; Len: Integer): AnsiString; override;
+    class function Format: Integer; override;
+    class function IsValid(Value: PAnsiChar; Len: Integer; ToStr: Boolean): Boolean; override;
+  end;
+
+
+// convert any OTP- HEX or WORD Format to ToFormat
+function OTPFormat(const Value: AnsiString; ToFormat: Integer): AnsiString;
+
+implementation
+
+uses
+  {$IFDEF DELPHI2009UP}AnsiStrings,{$ENDIF}
+  uRODECConst;
+
+{$R uRORFC1760.RES}
+
+const
+  SepChars    = [#0,#9,#10,#13,#32,',',';',':','$','(',')','[',']'] +
+                ['{','}','-','"','''','\','/','+','*'];
+  RFC1760Dict : PDictionary = nil; // Standard RFC1760 Dictionary Resource
+
+function OTPFormat(const Value: AnsiString; ToFormat: Integer): AnsiString;
+var
+  I: Integer;
+begin
+  Result := Value;
+  if Result = '' then Exit;
+  I := Pos(sOTPWord, LowerCase(Result));
+  if I > 0 then
+  begin
+    Delete(Result, 1, I + Length(sOTPWord) -1);
+    I := fmtRFC1760;
+  end else
+  begin
+    I := Pos(sOTPHex, LowerCase(Result));
+    if I > 0 then
+    begin
+      Delete(Result, 1, I + Length(sOTPHex) -1);
+      I := fmtHEX;
+    end else I := fmtRFC1760;
+  end;
+  try
+    Result := FormatToStr(PAnsiChar(Result), -1, I);
+  except
+    if I <> fmtRFC1760 then raise
+      else Result := FormatToStr(PAnsiChar(Result), -1, fmtHEX)
+  end;
+  Result := StrToFormat(PAnsiChar(Result), Length(Result), ToFormat);
+end;
+
+function TROOneTimePassword.GetChallenge: AnsiString;
+begin
+  if FHash = nil then FHash := TROHash_MD4;
+  if Trim(FSeed) = '' then
+  begin
+    SetLength(FSeed, 2);
+    RndXORBuffer(RndTimeSeed, PAnsiChar(FSeed)^, 2);
+    FSeed := StrToFormat(PAnsiChar(FSeed), 2, fmtHEX);
+  end;
+  Result := FIdent;
+  if CompareText(FIdent, sSKeyIdent) <> 0 then
+    Result := Result + {$IFDEF UNICODE}UTF8Encode{$ENDIF}(GetShortClassName(FHash));
+  Result := Result + ' ' + {$IFDEF UNICODE}WideStringToAnsiString{$ENDIF}(IntToStr(FCount)) + ' ' + FSeed;
+  if FExtended then Result := Result + ' ' + sOTPExt;
+end;
+
+procedure TROOneTimePassword.SetChallenge(Value: AnsiString);
+type
+  TCharSet = set of AnsiChar;
+
+  function CheckAlpha(const Value: AnsiString; Chars: TCharSet): Boolean;
+  var
+    I: Integer;
+  begin
+    Result := False;
+    for I := 1 to Length(Value) do
+      if not (Value[I] in Chars) then Exit;
+    Result := True;
+  end;
+
+var
+  I: Integer;
+  P,T,L: PAnsiChar;
+  S: AnsiString;
+  H: TROHashClass;
+  C: Integer;
+  E: Boolean;
+begin
+  if Trim(Value) = '' then
+  begin
+    FHash := TROHash_MD4;
+    FIdent := sOTPIdent;
+    FExtended := False;
+    FSeed := '';
+    FCount := 0;
+    Exit;
+  end;
+  H  := nil;
+  C  := -1;
+  E  := False;
+  try
+    P := PAnsiChar(Value);
+    L := StrEnd(P);
+    I := Pos(sOTPIdent, LowerCase(Value)); // check of "otp-"
+    if I > 0 then                                 // it's a RO_RFC2289 Challenge
+    begin
+      Inc(P, I + Length(sOTPIdent) - 1);
+      T := P;
+      if T >= L then Exit;
+      while not (T^ in SepChars) do Inc(T);       // find End
+      if T >= L then Exit;
+      S := P;
+      SetLength(S, T - P);                        // Algo Ident currect used "md4", "md5", "sha1"
+      H := GetHashClass({$IFDEF UNICODE}UTF8ToString{$ENDIF}(S));
+    end else
+    begin
+      I := Pos(sSKeyIdent, LowerCase(Value));  // check of "s/key"
+      if I = 0 then Exit;                         // isn't a RFC1760 Challenge
+      Inc(P, I + Length(sSKeyIdent) - 1);
+      T := P;
+      if T >= L then Exit;
+      H := TROHash_MD4;
+    end;
+    while T^ in SepChars do Inc(T);        // find next Begin
+    if T >= L then Exit;
+    P := T;
+    while not (T^ in SepChars) do Inc(T);  // find End
+    if T >= L then Exit;
+    S := P;
+    SetLength(S, T - P);                   // extract Count Value
+    C := StrToIntDef({$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(S), -1);           // convert to Integer
+    while T^ in SepChars do Inc(T);        // find next Begin
+    if T > L then Exit;
+    P := T;
+    while not (T^ in SepChars) do Inc(T);  // find End
+    if T > L then Exit;
+    S := P;
+    SetLength(S, T - P);                    // extract Seed Value
+    while T^ in SepChars do Inc(T);         // find next Begin
+    if T > L then Exit;
+    E := StrLIComp(T, PAnsiChar(sOTPExt), Length(sOTPExt)) = 0;
+  finally
+    if (H = nil) or (C < 0) then
+      raise EROOTPException.Create(sInvalidChallenge);
+    if (S = '') or not CheckAlpha(S, ['a'..'z', 'A'..'Z', '0'..'9']) then
+      raise EROOTPException.Create(sInvalidSeed);
+    FHash  := H;
+    FSeed  := S;
+    FCount := C;
+    FExtended := E;
+  end;
+end;
+
+function TROOneTimePassword.GetAlgorithm: String;
+begin
+  Result := GetHashName(FHash);
+end;
+
+procedure TROOneTimePassword.SetAlgorithm(Value: String);
+begin
+  SetHash(GetHashClass(Value));
+end;
+
+procedure TROOneTimePassword.SetIdent(Value: AnsiString);
+begin
+  FIdent := Value;
+  if CompareText(FIdent, sSKeyIdent) = 0 then FHash := TROHash_MD4;
+end;
+
+procedure TROOneTimePassword.SetHash(Value: TROHashClass);
+begin
+  FHash := Value;
+  if (FHash = nil) or
+    (FHash.DigestKeySize < 16) or
+     FHash.InheritsFrom(TROChecksum) then FHash := TROHash_MD4 else
+  if (CompareText(FIdent, sSKeyIdent) = 0) and (FHash <> TROHash_MD4) then
+    FIdent := sOTPIdent;
+end;
+
+procedure TROOneTimePassword.SetSeed(Value: AnsiString);
+var
+  I: Integer;
+begin
+  FSeed := Value;
+  for I := Length(FSeed) downto 1 do
+    if not (FSeed[I] in [AnsiChar('a')..AnsiChar('z'), AnsiChar('A')..AnsiChar('Z'), AnsiChar('0')..AnsiChar('9')]) then Delete(FSeed, I, 1);
+end;
+
+constructor TROOneTimePassword.Create(AOwner: TComponent);
+begin
+  inherited Create(AOwner);
+  SetChallenge('');
+  FFormat := fmtRFC1760;
+end;
+
+function TROOneTimePassword.Calc(const Value: AnsiString; ACount: Integer): AnsiString;
+var
+  I: Integer;
+begin
+  if (FHash = nil) or (ACount < 0) then
+    raise EROOTPException.Create(sInvalidCalc);
+  Result := Value;
+  repeat
+    Result := FHash.CalcBuffer(PAnsiChar(Result)^, Length(Result), nil, fmtCOPY);
+// Fold the Digest to 8 Bytes
+    I := 8;
+    repeat
+      XORBuffers(PAnsiChar(Result), @PAnsiChar(Result)[I], 8, PAnsiChar(Result));
+      Inc(I, 8);
+    until I >= FHash.DigestKeySize;
+// convert Endianes
+    if FHash.InheritsFrom(TROHash_SHA) then
+      SwapIntegerBuffer(PAnsiChar(Result), PAnsiChar(Result), 2);
+// truncate the Result
+    SetLength(Result, 8);
+    Dec(ACount);
+  until ACount < 0;
+end;
+
+function TROOneTimePassword.Execute(const Password: AnsiString): AnsiString;
+begin
+  Result := Calc(LowerCase(FSeed) + Password, Count);
+  Result := StrToFormat(PAnsiChar(Result), 8, Format);
+  if FExtended then
+    with StringFormat(Format) do
+      if InheritsFrom(TROStringFormat_RFC1760) then Result := sOTPWord + Result else
+        if InheritsFrom(TROStringFormat_HEX) then Result := sOTPHex + Result;
+end;
+
+procedure TROOneTimePassword.Next(const OTP: AnsiString);
+begin
+  FLastOTP := OTP;
+  Dec(FCount);
+end;
+
+function TROOneTimePassword.Check(const OTP: AnsiString): Boolean;
+begin
+  Result := Calc(OTPFormat(OTP, fmtCOPY), 0) = OTPFormat(FLastOTP, fmtCOPY);
+end;
+
+function TROOneTimePassword.FirstPhrase(const Password: AnsiString): AnsiString;
+begin
+  Result := Calc(LowerCase(FSeed) + Password, 0);
+  Result := StrToFormat(PAnsiChar(Result), 8, Format);
+end;
+
+function TROOneTimePassword.NextPhrase(const OTP: AnsiString; ACount: Integer): AnsiString;
+begin
+  Result := Calc(OTPFormat(OTP, fmtCOPY), ACount);
+  Result := StrToFormat(PAnsiChar(Result), 8, Format);
+end;
+
+// RFC1760 Six Word String Format
+class function TROStringFormat_RFC1760.GetDict: PDictionary;
+begin
+  Result := Dictionary;
+  if (Result = nil) or
+     (Result.EntryCount <= 0) or
+     (Result.EntrySize <= 0) then
+    raise EROStringFormat.CreateFMT(sInvalidDictionary, [GetShortClassName(Self)]);
+end;
+
+class function TROStringFormat_RFC1760.Dictionary: PDictionary;
+{ Standard RFC1760 Dictionary Format
+
+  TDictionary = packed record
+                  EntryCount = 2048;
+                  EntrySize  = 4;
+                  EntryCRC   = $94CE8163; a standard CRC32 Checksum
+                  Entries    = array[0..2047] of array[0..3] of Char; see RFC1760.INC
+                end;
+}
+begin
+  if RFC1760Dict = nil then // Load Dictionary from resource
+  begin
+    RFC1760Dict := LockResource(LoadResource(HInstance, FindResource(HInstance,
+                                  PChar(GetShortClassName(Self)), RT_RCDATA)));
+    if RFC1760Dict <> nil then
+      with RFC1760Dict^ do
+        if EntryCRC <> not CRC32($FFFFFFFF, @Entries, EntryCount * EntrySize) then
+        begin // Resource is modified, any Hacker present ?! :-)
+          FreeResource(Integer(RFC1760Dict));
+          RFC1760Dict := nil;
+        end;
+  end;
+  Result := RFC1760Dict;
+end;
+
+function ExtractBits(Value: PAnsiChar; BitOffset, Bits, MaxLen: Integer): Integer;
+var // Extract from BitOffset count Bits
+  I: Integer;
+begin
+  Result := 0;
+  for I := BitOffset div 8 -1 to BitOffset div 8 + 2 do
+  begin
+    Result := Result shl 8;
+    if (I >= 0) and (I * 8 <= MaxLen) then
+      Result := Result or PByteArray(Value)[I];
+  end;
+  Result := (Result shr (24 - Bits - BitOffset mod 8)) and (1 shl Bits -1);
+  if BitOffset + Bits > MaxLen then
+    Result := Result and not (1 shl (BitOffset + Bits - MaxLen) - 1);
+end;
+
+class function TROStringFormat_RFC1760.ToStr(Value: PAnsiChar; Len: Integer): AnsiString;
+
+  function FindEntry(Dictionay: PDictionary; Entry: PAnsiChar): Integer; register;
+  asm
+        PUSH    EDI
+        PUSH    ESI
+        PUSH    EBX
+        PUSH    EBP
+
+        MOV     ESI,EDX
+        MOV     DL,[ESI]
+        MOV     EBX,[EAX].TDictionary.EntrySize
+        MOV     EBP,EBX
+        MOV     ECX,[EAX].TDictionary.EntryCount
+        LEA     EDI,[EAX].TDictionary.Entries
+        XOR     EAX,EAX
+        JMP     @@2
+
+@@1:    ADD     EDI,EBP
+@@2:    CMP     DL,[EDI]
+        JZ      @@4
+@@3:    INC     EAX
+        DEC     ECX
+        JNZ     @@1
+        MOV     EAX,-1
+        JMP     @@6
+@@4:    MOV     EBX,EBP
+@@5:    DEC     EBX
+        JZ      @@6
+        MOV     DH,[ESI + EBX]
+        CMP     DH,[EDI + EBX]
+        JNZ     @@3
+        JMP     @@5
+
+@@6:    POP     EBP
+        POP     EBX
+        POP     ESI
+        POP     EDI
+  end;
+
+var
+  Last,T,R: PAnsiChar;
+  Entry: ansiString;
+  Dict: PDictionary;
+  Index: Integer;
+  Bits: Integer;
+  Offs: Integer;
+  Parity: Integer;
+begin
+  Result := '';
+  Dict := Dictionary;
+  if Dict = nil then Exit;
+  Bits := MSBit(Dict.EntryCount);
+  Last := Value + Len;
+  SetLength(Entry, Dict.EntrySize);
+  SetLength(Result, Len * Dict.EntrySize);  // allocate enough Space
+  FillChar(PAnsiChar(Result)^, Len * Dict.EntrySize, 0);
+  R := PAnsiChar(Result);
+  Offs := 0;
+  repeat
+// Extract one Word
+    while Value^ in SepChars do Inc(Value);
+    if Value >= Last then
+      raise EROStringFormat.CreateFmt(sInvalidStringFormat, [GetShortClassName(Self)]);
+    T := Value;
+    while not (Value^ in SepChars) do Inc(Value);
+    if Value - T > Dict.EntrySize then
+      raise EROStringFormat.CreateFmt(sInvalidStringFormat, [GetShortClassName(Self)]);
+// Move and Uppercase Word to Entrybuffer
+    FillChar(PAnsiChar(Entry)^, Dict.EntrySize, 0);
+    Move(T^, PAnsiChar(Entry)^, Value - T);
+    CharUpperBuffA(PAnsiChar(Entry), Dict.EntrySize);
+// Lookup Entry in Dictionary
+    Index := FindEntry(Dict, PAnsiChar(Entry));
+    if Index < 0 then
+      raise EROStringFormat.CreateFmt(sInvalidStringFormat, [GetShortClassName(Self)]);
+// put the Result
+    asm
+         MOV   EAX,R           // R
+         MOV   EDX,Offs        // Offs
+         SHR   EDX,3           // Offs div 8
+         ADD   EAX,EDX         // @R[Offs div 8]
+         MOV   ECX,32          // 32
+         SUB   ECX,Bits        // 32 - Bits
+         MOV   EDX,Offs        // Offs
+         AND   EDX,07h         // Offs mod 8
+         SUB   ECX,EDX         // 32 - Bits - Offs mod 8
+         MOV   EDX,Index       // Index
+         SHL   EDX,CL          // Index shl (32 - Bits - Offs mod 8)
+         OR    [EAX + 3],DL
+         OR    [EAX + 2],DH
+         SHR   EDX,16
+         OR    [EAX + 1],DL
+         OR    [EAX + 0],DH
+    end;
+    Inc(Offs, Bits);
+  until Value >= Last;
+  Entry := '';
+
+// calculate Parity
+  Index := (Offs div 8) and not 1;
+  Bits  := Offs - Index * 8;
+  if Bits = 0 then Bits := MSBit(Dict.EntryCount);
+  Dec(Offs, Bits);
+  Len   := ExtractBits(R, Offs, Bits, Offs + Bits);
+  Index := 0;
+  Parity := 0;
+  while Index < Offs do
+  begin
+    Inc(Parity, ExtractBits(R, Index, Bits, Offs));
+    Inc(Index, Bits);
+  end;
+  SetLength(Result, Offs div 8);
+  Index := Length(Result);
+  if (Result[Index] = #0) and (Index <> 8) then
+    SetLength(Result, Index-1);
+  Parity := Parity and (1 shl Bits -1);
+  if Len <> Parity then
+    raise EROStringFormat.CreateFmt(sInvalidStringFormat, [GetShortClassName(Self)]);
+end;
+
+class function TROStringFormat_RFC1760.StrTo(Value: PAnsiChar; Len: Integer): AnsiString;
+var
+  Dict: PDictionary;
+  Bits: Integer;
+  BitLen: Integer;
+  Parity: Integer;
+  Offset: Integer;
+  Entry: Integer;
+  Text: AnsiString;
+  Temp: AnsiString;
+begin
+  Result := '';
+  Dict   := GetDict;
+  SetLength(Text, Dict.EntrySize);
+  SetLength(Temp, Len +2);
+  FillChar(PAnsiChar(Temp)^, Len +2, 0);
+  Move(Value^, PAnsiChar(Temp)^, Len);
+  Value := PAnsiChar(Temp);
+// calculate the Parity (Checksum )
+  BitLen := ((Len +1) and not 1) * 8;   // Input Length in Bits
+  Offset := 0;
+  Parity := 0;
+  Bits   := MSBit(Dict.EntryCount);     // Standard = 2048 -> 11 Bits
+  Bits   := Bits - BitLen mod Bits;     // Standard = 8 Byte Input -> 64 Bits -> 2 Bits Parity -> effective 6 * 11 Bits Output
+  while Offset < BitLen do
+  begin
+    Inc(Parity, ExtractBits(Value, Offset, Bits, BitLen));
+    Inc(Offset, Bits);
+  end;
+// calculate the Result
+  Offset := 0;
+  Parity := Parity and (1 shl Bits -1);  // Standard = 2 Bits used
+  Bits   := MSBit(Dict.EntryCount);      // Standard = 11 Bits
+  while Offset <= BitLen do
+  begin
+    Entry := ExtractBits(Value, Offset, Bits, BitLen);
+    Inc(Offset, Bits);
+    if Offset > BitLen then Entry := Entry or Parity;
+    Move(Dict.Entries[Entry * Dict.EntrySize], PAnsiChar(Text)^, Dict.EntrySize);
+    Result := Result + PAnsiChar(Text) + ' ';
+  end;
+  SetLength(Result, Length(Result) -1);
+end;
+
+class function TROStringFormat_RFC1760.Format: Integer;
+begin
+  Result := fmtRFC1760;
+end;
+
+class function TROStringFormat_RFC1760.IsValid(Value: PAnsiChar; Len: Integer; ToStr: Boolean): Boolean;
+begin
+  Result := False;
+  try
+    if Dictionary = nil then Exit;
+    if ToStr then Self.ToStr(Value, Len);
+    Result := True;
+  except
+  end;
+end;
+{
+procedure SaveDictionary(Format: TStringFormat_RFC1760Class);
+//save a Dictionary as Resource File
+var
+  Dict: PDictionary;
+  HeaderSize: Integer;
+  Origin, ImageSize: Longint;
+  Header: array[0..79] of Char;
+begin
+  Dict := Format.GetDict;
+  with TFileStream.Create(GetShortClassName(Format) + '.RES', fmCreate) do
+  try
+    Byte((@Header[0])^) := $FF;
+    Word((@Header[1])^) := 10;
+    HeaderSize := StrLen(StrUpper(StrPLCopy(@Header[3], GetShortClassName(Format), 63))) + 10;
+    Word((@Header[HeaderSize - 6])^) := $1030;
+    Longint((@Header[HeaderSize - 4])^) := 0;
+    WriteBuffer(Header, HeaderSize);
+    Origin := Position;
+    Dict.EntryCRC := not CRC32(-1, @Dict.Entries, Dict.EntryCount * Dict.EntrySize);
+    WriteBuffer(Dict^, SizeOf(TDictionary) + Dict.EntryCount * Dict.EntrySize);
+    ImageSize := Position - Origin;
+    Position := Origin - 4;
+    WriteBuffer(ImageSize, SizeOf(Longint));
+  finally
+    Free;
+  end;
+end;
+}
+initialization
+//  SaveDictionary(TROStringFormat_RFC1760);
+  RegisterStringFormats([TROStringFormat_RFC1760]);
+finalization
+  if RFC1760Dict <> nil then FreeResource(Integer(RFC1760Dict));
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uRORng.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uRORng.pas
new file mode 100644
index 0000000..e653b30
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uRORng.pas	
@@ -0,0 +1,703 @@
+{Copyright:      Hagen Reddmann  mailto:HaReddmann@AOL.COM
+ Author:         Hagen Reddmann
+ Remarks:        freeware, but this Copyright must be included
+ known Problems: none
+ Version:        3.0
+                 Delphi 2-4, designed and testet under D3 and D4
+ Description:    Linear Feedback Shift Register (LFSR)
+                 Random Number Generator with variable Period
+                 from 2^32 -1 to 2^2032 -1, Standard is 2^128 -1
+                 with .Seed('', -1) absolutly random
+                 The Period have theoretical no effect on the Speed.
+
+ Speed:          ca. 40 Mb/sec of a PII MMX 266 MHz 64Mb RAM
+
+ * THIS SOFTWARE IS PROVIDED BY THE AUTHORS ''AS IS'' AND ANY EXPRESS
+ * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+ * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHORS OR CONTRIBUTORS BE
+ * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
+ * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
+ * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
+ * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
+ * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE
+ * OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,
+ * EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+
+
+  Speed: all times for PII MMX 266Mhz 64Mb
+         theoretical have the Period (Size of LFSR) no effect on the Speed,
+         but a greater Period will run faster. (Cache, little Branches on Pentium, etc.)
+         except the Period 2^128-1, this use a specially optimized method.
+
+              >   14.5 Mb/sec
+              >   40.5 Mb/sec with 128bit LFSR
+Version 3.0
+
+  TRORandom is now a descend from TProtect, see Unit uRODECUtil.pas
+
+ }
+unit uRORng;
+
+interface
+
+{$I uROVer.inc}
+
+uses SysUtils, Classes, uRODECUtil;
+
+type
+  ERORandom = class(Exception);
+
+  TRORandom = class(TROProtection)    // Basicly RO_Rng, equal to Borland's Random()
+  private
+    FRegister: Integer;
+    FPassword: String;
+  protected
+    FCount: Integer;          // not as private Fields, easier access for descends
+    FSize: Integer;
+    FBasicSeed: Integer;
+    procedure SetSize(Value: Integer); virtual;
+    function GetState: AnsiString; virtual;
+    procedure SetState(Value: AnsiString); virtual;
+// override TProtect Methods
+    procedure CodeInit(Action: TPAction); override;
+    procedure CodeDone(Action: TPAction); override;
+    procedure CodeBuf(var Buffer; const BufferSize: Integer; Action: TPAction); override;
+  public
+    constructor Create(const APassword: String; ASize: Integer; ARandomize: Boolean; AProtection: TROProtection); virtual;
+    destructor Destroy; override;
+// set the Seed register
+//  Size =  0 -> Seed to initial Value
+//  Size <  0 -> Seed to randomness Value, equal to Randomize
+//  Size >  0 -> Seed is set to Buffer
+    procedure Seed(const ABuffer; ASize: Integer); virtual;
+// fill out ABuffer ASize Bytes randomly
+    procedure Buffer(var ABuffer; ASize: Integer); virtual;
+// gives Random Integer in ARange
+    function Int(ARange: Integer): Integer; virtual;
+// Stream loading/saving
+    procedure SaveToStream(Stream: TStream); virtual;
+    procedure LoadFromStream(Stream: TStream); virtual;
+// File loading/saving
+    procedure SaveToFile(const FileName: String);
+    procedure LoadFromFile(const FileName: String);
+// Count of Bytes that Int() or Buffer() has generated
+    property Count: Integer read FCount write FCount;
+// the Size in Bits
+    property Size: Integer read FSize write SetSize;
+// basicly Seed Value for use in .Seed(), Standard is DefaultSeed
+    property BasicSeed: Integer read FBasicSeed write FBasicSeed;
+// the internal State as MIMIE Base64 String
+    property State: AnsiString read GetState write SetState;
+  end;
+
+  TRORandom_LFSR = class(TRORandom)       // Linear Feedback Shift Register
+  private
+    FPtr: Integer;                    // Current Position in FRegister
+    FLast: Integer;                   // Highest Position in FRegister
+    FTable: array[0..255] of Word;    // Lookup Table for FRegister
+    FRegister: array[0..255] of Byte; // Linear Feedback Shift Register
+    FFunc: procedure(Self: Pointer; var Buffer; Size: Integer);
+  protected
+    procedure SetSize(Value: Integer); override;
+    function GetState: AnsiString; override;
+    procedure SetState(Value: AnsiString); override;
+  public
+    procedure Seed(const ABuffer; ASize: Integer); override;
+    procedure Buffer(var ABuffer; ASize: Integer); override;
+  end;
+
+{   Follow the used polynomial's for TRORandom_LFSR
+     size in bytes of register, XORCode, Polynomial, Period
+
+   4, $F5, x^32   + x^7 + x^5 + x^3 + x^2 + x + 1,   2^32   -1
+   5, $9C, x^40   + x^5 + x^4 + x^3 + 1,             2^40   -1
+   6, $ED, x^48   + x^7 + x^5 + x^4 + x^2 + x + 1,   2^48   -1
+   7, $A9, x^56   + x^7 + x^4 + x^2 + 1,             2^56   -1
+   8, $D8, x^64   + x^4 + x^3 + x + 1,               2^64   -1
+   9, $FA, x^72   + x^6 + x^4 + x^3 + x^2 + x + 1,   2^72   -1
+  10, $F5, x^80   + x^7 + x^5 + x^3 + x^2 + x + 1,   2^80   -1
+  12, $BB, x^96   + x^7 + x^6 + x^4 + x^3 + x^2 + 1, 2^96   -1
+  15, $E7, x^120  + x^7 + x^6 + x^5 + x^2 + x + 1,   2^120  -1
+  16, $E1, x^128  + x^7 + x^2 + x + 1,               2^128  -1
+  18, $A9, x^144  + x^7 + x^4 + x^2 + 1,             2^144  -1
+  19, $B2, x^152  + x^6 + x^3 + x^2 + 1,             2^152  -1
+  20, $B4, x^160  + x^5 + x^3 + x^2 + 1,             2^160  -1
+  22, $BD, x^176  + x^7 + x^5 + x^4 + x^3 + x^2 + 1, 2^176  -1
+  25, $B4, x^200  + x^5 + x^3 + x^2 + 1,             2^200  -1
+  27, $D1, x^216  + x^7 + x^3 + x + 1,               2^216  -1
+  38, $FC, x^304  + x^5 + x^4 + x^3 + x^2 + x + 1,   2^304  -1
+  40, $D8, x^320  + x^4 + x^3 + x + 1,               2^320  -1
+  42, $C9, x^336  + x^7 + x^4 + x + 1,               2^336  -1
+  44, $BD, x^352  + x^7 + x^5 + x^4 + x^3 + x^2 + 1, 2^352  -1
+  50, $B4, x^400  + x^5 + x^3 + x^2 + 1,             2^400  -1
+  51, $FA, x^408  + x^6 + x^4 + x^3 + x^2 + x + 1,   2^408  -1
+  55, $D8, x^440  + x^4 + x^3 + x + 1,               2^440  -1
+  60, $BB, x^480  + x^7 + x^6 + x^4 + x^3 + x^2 + 1, 2^480  -1
+  61, $D8, x^488  + x^4 + x^3 + x + 1,               2^488  -1
+  63, $FA, x^504  + x^6 + x^4 + x^3 + x^2 + x + 1,   2^504  -1
+  67, $95, x^536  + x^7 + x^5 + x^3 + 1,             2^536  -1
+  84, $F6, x^672  + x^6 + x^5 + x^3 + x^2 + x + 1,   2^672  -1
+  89, $9C, x^712  + x^5 + x^4 + x^3 + 1,             2^712  -1
+  91, $B8, x^728  + x^4 + x^3 + x^2 + 1,             2^728  -1
+ 103, $FC, x^824  + x^5 + x^4 + x^3 + x^2 + x + 1,   2^824  -1
+ 141, $D1, x^1128 + x^7 + x^3 + x + 1,               2^1128 -1
+ 154, $F3, x^1232 + x^7 + x^6 + x^3 + x^2 + x + 1,   2^1232 -1
+ 254, $A3, x^2032 + x^7 + x^6 + x^2 + 1,             2^2032 -1
+
+  follow various Periods
+--------------------------------------------------------------------------------
+  2^32-1   = 4294967295
+  2^64-1   = 18446744073709551615
+  2^128-1  = 340282366920938463463374607431768211455
+  2^2032-1 = it's one Number
+   49311837877366649323600580884811328064642490645928167773636391338386009428204
+   17921935608125537553934278674005267623599165972833122328326583112816221076703
+   35702985799671951234310153163915857728680359766210694390385082889078409114931
+   66867209378778336289339669574030006474132653643098550122997363890264786354861
+   31947843882498538312526670313197249581325688984118966381501107686008635362008
+   71492771279798342546336760614070411100118371556871830774626226863061725361438
+   46476937385117828689155818331492509954024778049592066494651864619855274961300
+   9880449926596639031121858756000207590413184793166384097191709192063287295
+--------------------------------------------------------------------------------
+}
+
+// Your actual Random Class, per default TRORandom_LFSR.Create(128, False)
+function RND: TRORandom;
+
+// internal used for the random initialization of the Seed Initial Value
+// change this to produce Application dependent Randomness
+const
+  DefaultSeed: Integer = 693258280;
+
+implementation
+
+uses uRODECConst;
+
+const
+  FRND: TRORandom = nil;
+
+// avaible Periods for the LFSR
+  LFSRPeriod: array[0..33, 0..1] of Word =
+   ((   32, $F5), (   40, $9C), (   48, $ED), (   56, $A9),
+    (   64, $D8), (   72, $FA), (   80, $F5), (   96, $BB),
+    (  120, $E7), (  128, $E1), (  144, $A9), (  152, $B2),
+    (  160, $B4), (  176, $BD), (  200, $B4), (  216, $D1),
+    (  304, $FC), (  320, $D8), (  336, $C9), (  352, $BD),
+    (  400, $B4), (  408, $FA), (  440, $D8), (  480, $BB),
+    (  488, $D8), (  504, $FA), (  536, $95), (  672, $F6),
+    (  712, $9C), (  728, $B8), (  824, $FC), ( 1128, $D1),
+    ( 1232, $F3), ( 2032, $A3));
+
+function RND: TRORandom;
+begin
+  if FRND = nil then
+  begin
+    FRND := TRORandom_LFSR.Create('', 0, False, nil);
+    FRND.AddRef;
+  end;
+  Result := FRND;
+end;
+
+procedure TRORandom.SetSize(Value: Integer);
+begin
+  FSize := 32; // allways 32
+end;
+
+function TRORandom.GetState: AnsiString;
+var
+  CRC: Word;
+  M: TMemoryStream;
+begin
+  M := TMemoryStream.Create;
+  try
+// write a Randomized Word to begin,
+// any Encryption produce allways other outputs
+    RndXORBuffer(RndTimeSeed, CRC, SizeOf(CRC));
+    M.Write(CRC, SizeOf(CRC));
+    M.Write(FSize, SizeOf(FSize));
+    M.Write(FBasicSeed, SizeOf(FBasicSeed));
+    M.Write(FCount, SizeOf(FCount));
+    M.Write(FRegister, SizeOf(FRegister));
+    CRC := not CRC16($FFFF, M.Memory, M.Size);
+    M.Write(CRC, SizeOf(CRC));
+    CRC := $0100; // Version 1 without Protection
+    if Protection <> nil then
+    begin
+      CRC := CRC or 1; // with Protection
+      M.Position := 0;
+      Protection.CodeStream(M, M, M.Size, paEncode);
+      M.Position := M.Size;
+    end;
+    M.Write(CRC, SizeOf(CRC));
+    Result := StrToFormat(M.Memory, M.Size, fmtMIME64);
+  finally
+    M.Free;
+  end;
+end;
+
+procedure TRORandom.SetState(Value: AnsiString);
+var
+  CRC: Word;
+  I: Integer;
+  M: TMemoryStream;
+begin
+  M := TMemoryStream.Create;
+  try
+    Value := FormatToStr(PAnsiChar(Value), Length(Value), fmtMIME64);
+    M.Write(PAnsiChar(Value)^, Length(Value));
+    M.Position := M.Size - SizeOf(CRC);
+    M.Read(CRC, SizeOf(CRC));
+    if CRC and $FF00 <> $0100 then // it's Version $0100 ?
+      raise ERORandom.Create(sInvalidRandomStream);
+    if CRC and 1 <> 0 then
+      if Protection <> nil then
+      begin
+        M.Position := 0;
+        Protection.CodeStream(M, M, M.Size - SizeOf(CRC), paDecode);
+      end else raise ERORandom.Create(sRandomDataProtected);
+    M.Position := M.Size - SizeOf(CRC) * 2;
+    M.Read(CRC, SizeOf(CRC));
+    if CRC <> not CRC16($FFFF, M.Memory, M.Size - SizeOf(CRC) * 2) then
+      raise ERORandom.Create(sInvalidRandomStream);
+    M.Position := SizeOf(CRC); // skip Dummy Random Word
+    M.Read(I, SizeOf(FSize));
+    SetSize(I);
+    M.Read(FCount, SizeOf(FCount));
+    M.Read(FBasicSeed, SizeOf(FBasicSeed));
+    M.Read(FRegister, SizeOf(FRegister));
+  finally
+    M.Free;
+  end;
+end;
+
+constructor TRORandom.Create(const APassword: String; ASize: Integer; ARandomize: Boolean; AProtection: TROProtection);
+begin
+  inherited Create(AProtection);
+  FBasicSeed := DefaultSeed;
+  FSize := -1;
+  FPassword := APassword;
+  SetSize(ASize);
+  if ASize > 0 then
+    if not ARandomize then Seed(PChar(FPassword)^, Length(FPassword))
+      else Seed('', -1);
+end;
+
+destructor TRORandom.Destroy;
+begin
+  Seed('', 0);
+  if Self = FRND then FRND := nil;
+  inherited Destroy;
+end;
+
+procedure TRORandom.Seed(const ABuffer; ASize: Integer);
+var
+  I: Integer;
+  R: PByteArray;
+begin
+  if (ASize > 0) and (@ABuffer <> nil) then
+  begin
+    FRegister := FBasicSeed;
+    FillChar(FRegister, SizeOf(FRegister), 0);
+    R := @FRegister;
+    for I := 0 to ASize -1 do
+      R[I and 3] := R[I and 3] + TByteArray(ABuffer)[I];
+  end else
+    if ASize < 0 then FRegister := RndTimeSeed + (FCount +1)
+      else FRegister := FBasicSeed;
+  if Protection <> nil then
+    Protection.CodeBuffer(FRegister, SizeOf(FRegister), paScramble);
+end;
+
+function TRORandom.Int(ARange: Integer): Integer;
+begin
+  Buffer(Result, SizeOf(Result));
+  if (ARange = 0) or (Result = 0) then Exit;
+  if (ARange >= 0) and (Result < 0) then Result := -Result else
+    if ARange < 0 then ARange := -ARange;
+  Result := Result mod (ARange +1);
+  Inc(FCount, SizeOf(Result));
+end;
+
+procedure TRORandom.Buffer(var ABuffer; ASize: Integer);
+begin
+  if ASize <= 0 then Exit;
+  FillChar(ABuffer, ASize, 0);
+  FRegister := RndXORBuffer(FRegister, ABuffer, ASize);
+  Inc(FCount, ASize);
+  if Protection <> nil then
+    Protection.CodeBuffer(ABuffer, ASize, paScramble);
+end;
+
+procedure TRORandom.SaveToStream(Stream: TStream);
+var
+  I: Integer;
+  S,C: AnsiString;
+begin
+  C := {$IFDEF UNICODE}UTF8Encode{$ENDIF}(ClassName);
+  if C[1] = 'T' then Delete(C, 1, 1);
+  I := Pos(AnsiChar('_'), C);
+  if I > 0 then Delete(C, 1, I);
+  S := InsertCR(State, 64);
+  C := C + {$IFDEF UNICODE}UTF8Encode{$ENDIF}(IntToHex(Length(S), 4)) + #13#10 + S;
+  Stream.Write(PAnsiChar(C)^, Length(C));
+end;
+
+procedure TRORandom.LoadFromStream(Stream: TStream);
+var
+  C,S: AnsiString;
+  I: Integer;
+begin
+// write the Name from ClassName (i.E. TRORandom_LFSR -> "LFSR"),
+// the Size as a 4 Char HEX String and State.
+// i.E. LFSR0FCB <CR> State
+  C := {$IFDEF UNICODE}UTF8Encode{$ENDIF}(ClassName);
+  if C[1] = 'T' then Delete(C, 1, 1);
+  I  := Pos(AnsiChar('_'), C);
+  if I > 0 then Delete(C, 1, I);
+  SetLength(S, Length(C));
+  Stream.Read(PAnsiChar(S)^, Length(C));
+  if S <> C then Abort;
+  SetLength(S, 6);
+  Stream.Read(PAnsiChar(S)^, 6);
+  SetLength(S, 4);
+  I := StrToInt('$' + {$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(S));
+  SetLength(S, I);
+  Stream.Read(PAnsiChar(S)^, I);
+  State := DeleteCR(S);
+end;
+
+procedure TRORandom.SaveToFile(const FileName: String);
+var
+  S: TStream;
+begin
+  S := TFileStream.Create(FileName, fmCreate);
+  try
+    SaveToStream(S);
+  finally
+    S.Free;
+  end;
+end;
+
+procedure TRORandom.LoadFromFile(const FileName: String);
+var
+  S: TStream;
+begin
+  S := TFileStream.Create(FileName, fmOpenRead or fmShareDenyNone);
+  try
+    LoadFromStream(S);
+  finally
+    S.Free;
+  end;
+end;
+
+procedure TRORandom.CodeInit(Action: TPAction);
+begin
+  if Action = paWipe then Seed('', -1)
+    else Seed(PChar(FPassword)^, Length(FPassword));
+  inherited CodeInit(Action);
+end;
+
+procedure TRORandom.CodeDone(Action: TPAction);
+begin
+  inherited CodeDone(Action);
+  if Action = paWipe then Seed('', -1)
+    else Seed(PChar(FPassword)^, Length(FPassword));
+end;
+
+procedure TRORandom.CodeBuf(var Buffer; const BufferSize: Integer; Action: TPAction);
+const
+  maxBufSize = 1024 * 4;
+var
+  Buf: Pointer;
+  BPtr: PByte;
+  BSize,CSize: Integer;
+begin
+  if Action <> paDecode then inherited CodeBuf(Buffer, BufferSize, Action);
+  if Action in Actions then
+  begin
+    BPtr := @Buffer;
+    if BPtr = nil then Exit;
+    BSize := maxBufSize;
+    if BSize > BufferSize then BSize := BufferSize;
+    Buf := AllocMem(BSize);
+    CSize := BufferSize;
+    try
+      if Action = paCalc then
+      begin
+        while CSize > 0 do
+        begin
+          BSize := CSize;
+          if BSize > maxBufSize then BSize := maxBufSize;
+          Self.Buffer(Buf^, BSize);
+          XORBuffers(Buf, BPtr, BSize, Buf);
+          Inc(BPtr, BSize);
+          Dec(CSize, BSize);
+        end
+      end else
+      begin
+        while CSize > 0 do
+        begin
+          BSize := CSize;
+          if BSize > maxBufSize then BSize := maxBufSize;
+          Self.Buffer(Buf^, BSize);
+          XORBuffers(Buf, BPtr, BSize, BPtr);
+          Inc(BPtr, BSize);
+          Dec(CSize, BSize);
+        end;
+      end;
+    finally
+      ReallocMem(Buf, 0);
+    end;
+  end;
+  if Action = paDecode then
+    inherited CodeBuf(Buffer, BufferSize, Action);
+end;
+
+// internal for TRORandom_LFSR
+procedure LFSRBuf(Self: Pointer; var Buffer; Size: Integer); assembler;
+asm
+      AND     EDX,EDX    // Buffer = nil ?
+      JZ      @@9
+      AND     ECX,ECX    // BufferSize <= 0 ?
+      JLE     @@9
+
+      PUSH    EDI
+      PUSH    ESI
+      PUSH    EBX
+      PUSH    EBP
+      PUSH    EAX
+
+      MOV     EDI,[EAX].TRORandom_LFSR.FPtr
+      MOV     EBP,[EAX].TRORandom_LFSR.FLast
+      LEA     ESI,[EAX].TRORandom_LFSR.FRegister
+      LEA     EBX,[EAX].TRORandom_LFSR.FTable
+      DEC     EDX
+
+@@1:  MOVZX   EAX,Byte Ptr [ESI + EDI]
+      MOV     [EDX + ECX],AL
+      MOV     AX,[EBX + EAX * 2]
+      MOV     [ESI + EDI],AL
+      DEC     EDI
+      JS      @@2
+      XOR     [ESI + EDI],AH
+      ADD     EDI,2
+      CMP     EDI,EBP
+      JLE     @@3
+      XOR     EDI,EDI
+      JMP     @@3
+@@2:  MOV     EDI,EBP
+      XOR     [ESI + EDI],AH
+      MOV     EDI,1
+@@3:  DEC     ECX
+      JNZ     @@1
+
+      POP     EAX
+      MOV     [EAX].TRORandom_LFSR.FPtr,EDI
+
+      POP     EBP
+      POP     EBX
+      POP     ESI
+      POP     EDI
+
+@@9:
+end;
+
+procedure LFSRBuf128(Self: Pointer; var Buffer; Size: Integer); assembler;
+asm
+      AND     EDX,EDX    // Buffer = nil ?
+      JZ      @@9
+      AND     ECX,ECX    // BufferSize <= 0 ?
+      JLE     @@9
+
+      PUSH    EDI
+      PUSH    ESI
+      PUSH    EBX
+      PUSH    EBP
+      PUSH    EAX
+
+      MOV     EDI,[EAX].TRORandom_LFSR.FPtr
+      LEA     EBP,[EAX].TRORandom_LFSR.FTable
+      LEA     ESI,[EAX].TRORandom_LFSR.FRegister
+      DEC     EDX
+      XOR     EAX,EAX
+
+@@1:  MOV     AL,[ESI + EDI]
+      MOV     BX,[EBP + EAX * 2]
+      MOV     [EDX + ECX],AL
+      MOV     [ESI + EDI],BL
+      DEC     EDI
+      AND     EDI,0Fh
+      XOR     [ESI + EDI],BH
+      ADD     EDI,2
+      AND     EDI,0Fh
+      DEC     ECX
+      JNZ     @@1
+
+      POP     EAX
+      MOV     [EAX].TRORandom_LFSR.FPtr,EDI
+
+      POP     EBP
+      POP     EBX
+      POP     ESI
+      POP     EDI
+
+@@9:
+end;
+
+procedure TRORandom_LFSR.SetSize(Value: Integer);
+
+  procedure CalcLFSRTable(XORCode: Byte);
+  var
+    I,J,Z: Integer;
+  begin
+    asm // Reverse the bitorder
+      XOR   AX,AX
+      MOV   AL,XORCode
+      MOV   CL,8
+@@1:  RCR   AL,1
+      RCL   AH,1
+      DEC   CL
+      JNZ   @@1
+      MOV   XORCode,AH
+    end;
+    FillChar(FTable, SizeOf(FTable), 0);
+    for I := 0 to 255 do
+    begin
+      Z := I;
+      for J := 0 to 7 do
+      begin
+        FTable[I] := FTable[I] shl 1;
+        if Z and $80 <> 0 then FTable[I] := FTable[I] xor XORCode;
+        Z := Z shl 1;
+      end;
+    end;
+  end;
+
+  procedure DoSet(Index: Integer);
+  begin
+    FSize := LFSRPeriod[Index, 0];
+    FLast := LFSRPeriod[Index, 0] div 8 -1;
+    if FSize = 128 then FFunc := LFSRBuf128 else FFunc := LFSRBuf;
+    CalcLFSRTable(LFSRPeriod[Index, 1]);
+    Seed('', 0);
+  end;
+
+var
+  I: Integer;
+begin
+  if Value <= 0 then Value := 128;
+  if Value <> FSize then
+  begin
+    for I := 33 downto 0 do
+      if Value >= LFSRPeriod[I, 0] then
+      begin
+        DoSet(I);
+        Exit;
+      end;
+    DoSet(9);  // The Standard fast 2^128-1 Period
+  end;
+end;
+
+function TRORandom_LFSR.GetState: AnsiString;
+var
+  CRC: Word;
+  M: TMemoryStream;
+begin
+  M := TMemoryStream.Create;
+  try
+// write randomized Dummy Word
+    RndXORBuffer(RndTimeSeed, CRC, SizeOf(CRC));
+    M.Write(CRC, SizeOf(CRC));
+    M.Write(FSize, SizeOf(FSize));
+    M.Write(FRegister, SizeOf(FRegister));
+    M.Write(FBasicSeed, SizeOf(FBasicSeed));
+    M.Write(FCount, SizeOf(FCount));
+    M.Write(FPtr, SizeOf(FPtr));
+    M.Write(FLast, SizeOf(FLast));
+    CRC := not CRC16($FFFF, M.Memory, M.Size);
+    M.Write(CRC, SizeOf(CRC));
+    CRC := $0100; // Version 1 without Protection
+    if Protection <> nil then
+    begin
+      CRC := CRC or 1; // with Protection
+      M.Position := 0;
+      Protection.CodeStream(M, M, M.Size, paEncode);
+      M.Position := M.Size;
+    end;
+    M.Write(CRC, SizeOf(CRC));
+    Result := StrToFormat(M.Memory, M.Size, fmtMIME64);
+  finally
+    M.Free;
+  end;
+end;
+
+procedure TRORandom_LFSR.SetState(Value: AnsiString);
+var
+  P: Integer;
+  CRC: Word;
+  M: TMemoryStream;
+begin
+  M := TMemoryStream.Create;
+  try
+    Value := FormatToStr(PAnsiChar(Value), Length(Value), fmtMIME64);
+    M.Write(PAnsiChar(Value)^, Length(Value));
+    M.Position := M.Size - SizeOf(CRC);
+    M.Read(CRC, SizeOf(CRC));
+    if CRC and $FF00 <> $0100 then // it's Version $0100 ?
+      raise ERORandom.Create(sInvalidRandomStream);
+    if CRC and 1 <> 0 then
+      if Protection <> nil then
+      begin
+        M.Position := 0;
+        Protection.CodeStream(M, M, M.Size - SizeOf(CRC), paDecode);
+      end else raise ERORandom.Create(sRandomDataProtected);
+    M.Position := M.Size - SizeOf(CRC) * 2;
+    M.Read(CRC, SizeOf(CRC));
+    if CRC <> not CRC16($FFFF, M.Memory, M.Size - SizeOf(CRC) * 2) then
+      raise ERORandom.Create(sInvalidRandomStream);
+    M.Position := SizeOf(CRC); // skip Dummy word
+    M.Read(P, SizeOf(FSize));
+    SetSize(P);
+    M.Read(FRegister, SizeOf(FRegister));
+    M.Read(FBasicSeed, SizeOf(FBasicSeed));
+    M.Read(FCount, SizeOf(FCount));
+    M.Read(FPtr, SizeOf(FPtr));
+    M.Read(FLast, SizeOf(FLast));
+  finally
+    M.Free;
+  end;
+end;
+
+procedure TRORandom_LFSR.Seed(const ABuffer; ASize: Integer);
+var
+  I,S: Integer;
+begin
+  FPtr := 0;
+  if (ASize > 0) and (@ABuffer <> nil) then
+  begin
+    FillChar(FRegister, SizeOf(FRegister), 0);
+    S := FSize div 8;
+    for I := 0 to ASize -1 do
+      FRegister[I mod S] := FRegister[I mod S] + TByteArray(ABuffer)[I];
+  end else
+    if ASize < 0 then RndXORBuffer(RndTimeSeed + (FCount +1), FRegister, SizeOf(FRegister))
+      else FillChar(FRegister, SizeOf(FRegister), 0);
+  RndXORBuffer(FBasicSeed, FRegister, SizeOf(FRegister));
+  if Protection <> nil then
+    Protection.CodeBuffer(FRegister, SizeOf(FRegister), paScramble);
+end;
+
+procedure TRORandom_LFSR.Buffer(var ABuffer; ASize: Integer);
+begin
+  if ASize <= 0 then Exit;
+  FFunc(Self, ABuffer, ASize);
+  if Protection <> nil then
+    Protection.CodeBuffer(ABuffer, ASize, paScramble);
+  Inc(FCount, ASize);
+end;
+
+initialization
+finalization
+  FRND.Release;
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROSquare.inc b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROSquare.inc
new file mode 100644
index 0000000..1d4d4af
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROSquare.inc	
@@ -0,0 +1,330 @@
+const
+  Square_SE: array[0..255] of Byte = (
+    177, 206, 195, 149,  90, 173, 231,   2,  77,  68, 251, 145,  12, 135, 161,  80,
+    203, 103,  84, 221,  70, 143, 225,  78, 240, 253, 252, 235, 249, 196,  26, 110,
+     94, 245, 204, 141,  28,  86,  67, 254,   7,  97, 248, 117,  89, 255,   3,  34,
+    138, 209,  19, 238, 136,   0,  14,  52,  21, 128, 148, 227, 237, 181,  83,  35,
+     75,  71,  23, 167, 144,  53, 171, 216, 184, 223,  79,  87, 154, 146, 219,  27,
+     60, 200, 153,   4, 142, 224, 215, 125, 133, 187,  64,  44,  58,  69, 241,  66,
+    101,  32,  65,  24, 114,  37, 147, 112,  54,   5, 242,  11, 163, 121, 236,   8,
+     39,  49,  50, 182, 124, 176,  10, 115,  91, 123, 183, 129, 210,  13, 106,  38,
+    158,  88, 156, 131, 116, 179, 172,  48, 122, 105, 119,  15, 174,  33, 222, 208,
+     46, 151,  16, 164, 152, 168, 212, 104,  45,  98,  41, 109,  22,  73, 118, 199,
+    232, 193, 150,  55, 229, 202, 244, 233,  99,  18, 194, 166,  20, 188, 211,  40,
+    175,  47, 230,  36,  82, 198, 160,   9, 189, 140, 207,  93,  17,  95,   1, 197,
+    159,  61, 162, 155, 201,  59, 190,  81,  25,  31,  63,  92, 178, 239,  74, 205,
+    191, 186, 111, 100, 217, 243,  62, 180, 170, 220, 213,   6, 192, 126, 246, 102,
+    108, 132, 113,  56, 185,  29, 127, 157,  72, 139,  42, 218, 165,  51, 130,  57,
+    214, 120, 134, 250, 228,  43, 169,  30, 137,  96, 107, 234,  85,  76, 247, 226);
+
+  Square_SD: array[0..255] of Byte = (
+     53, 190,   7,  46,  83, 105, 219,  40, 111, 183, 118, 107,  12, 125,  54, 139,
+    146, 188, 169,  50, 172,  56, 156,  66,  99, 200,  30,  79,  36, 229, 247, 201,
+     97, 141,  47,  63, 179, 101, 127, 112, 175, 154, 234, 245,  91, 152, 144, 177,
+    135, 113, 114, 237,  55,  69, 104, 163, 227, 239,  92, 197,  80, 193, 214, 202,
+     90,  98,  95,  38,   9,  93,  20,  65, 232, 157, 206,  64, 253,   8,  23,  74,
+     15, 199, 180,  62,  18, 252,  37,  75, 129,  44,   4, 120, 203, 187,  32, 189,
+    249,  41, 153, 168, 211,  96, 223,  17, 151, 137, 126, 250, 224, 155,  31, 210,
+    103, 226, 100, 119, 132,  43, 158, 138, 241, 109, 136, 121, 116,  87, 221, 230,
+     57, 123, 238, 131, 225,  88, 242,  13,  52, 248,  48, 233, 185,  35,  84,  21,
+     68,  11,  77, 102,  58,   3, 162, 145, 148,  82,  76, 195, 130, 231, 128, 192,
+    182,  14, 194, 108, 147, 236, 171,  67, 149, 246, 216,  70, 134,   5, 140, 176,
+    117,   0, 204, 133, 215,  61, 115, 122,  72, 228, 209,  89, 173, 184, 198, 208,
+    220, 161, 170,   2,  29, 191, 181, 159,  81, 196, 165,  16,  34, 207,   1, 186,
+    143,  49, 124, 174, 150, 218, 240,  86,  71, 212, 235,  78, 217,  19, 142,  73,
+     85,  22, 255,  59, 244, 164, 178,   6, 160, 167, 251,  27, 110,  60,  51, 205,
+     24,  94, 106, 213, 166,  33, 222, 254,  42,  28, 243,  10,  26,  25,  39,  45);
+
+  Square_PHI: array[0..255] of LongWord = (
+    $00000000,$03010102,$06020204,$05030306,$0C040408,$0F05050A,$0A06060C,$0907070E,
+    $18080810,$1B090912,$1E0A0A14,$1D0B0B16,$140C0C18,$170D0D1A,$120E0E1C,$110F0F1E,
+    $30101020,$33111122,$36121224,$35131326,$3C141428,$3F15152A,$3A16162C,$3917172E,
+    $28181830,$2B191932,$2E1A1A34,$2D1B1B36,$241C1C38,$271D1D3A,$221E1E3C,$211F1F3E,
+    $60202040,$63212142,$66222244,$65232346,$6C242448,$6F25254A,$6A26264C,$6927274E,
+    $78282850,$7B292952,$7E2A2A54,$7D2B2B56,$742C2C58,$772D2D5A,$722E2E5C,$712F2F5E,
+    $50303060,$53313162,$56323264,$55333366,$5C343468,$5F35356A,$5A36366C,$5937376E,
+    $48383870,$4B393972,$4E3A3A74,$4D3B3B76,$443C3C78,$473D3D7A,$423E3E7C,$413F3F7E,
+    $C0404080,$C3414182,$C6424284,$C5434386,$CC444488,$CF45458A,$CA46468C,$C947478E,
+    $D8484890,$DB494992,$DE4A4A94,$DD4B4B96,$D44C4C98,$D74D4D9A,$D24E4E9C,$D14F4F9E,
+    $F05050A0,$F35151A2,$F65252A4,$F55353A6,$FC5454A8,$FF5555AA,$FA5656AC,$F95757AE,
+    $E85858B0,$EB5959B2,$EE5A5AB4,$ED5B5BB6,$E45C5CB8,$E75D5DBA,$E25E5EBC,$E15F5FBE,
+    $A06060C0,$A36161C2,$A66262C4,$A56363C6,$AC6464C8,$AF6565CA,$AA6666CC,$A96767CE,
+    $B86868D0,$BB6969D2,$BE6A6AD4,$BD6B6BD6,$B46C6CD8,$B76D6DDA,$B26E6EDC,$B16F6FDE,
+    $907070E0,$937171E2,$967272E4,$957373E6,$9C7474E8,$9F7575EA,$9A7676EC,$997777EE,
+    $887878F0,$8B7979F2,$8E7A7AF4,$8D7B7BF6,$847C7CF8,$877D7DFA,$827E7EFC,$817F7FFE,
+    $758080F5,$768181F7,$738282F1,$708383F3,$798484FD,$7A8585FF,$7F8686F9,$7C8787FB,
+    $6D8888E5,$6E8989E7,$6B8A8AE1,$688B8BE3,$618C8CED,$628D8DEF,$678E8EE9,$648F8FEB,
+    $459090D5,$469191D7,$439292D1,$409393D3,$499494DD,$4A9595DF,$4F9696D9,$4C9797DB,
+    $5D9898C5,$5E9999C7,$5B9A9AC1,$589B9BC3,$519C9CCD,$529D9DCF,$579E9EC9,$549F9FCB,
+    $15A0A0B5,$16A1A1B7,$13A2A2B1,$10A3A3B3,$19A4A4BD,$1AA5A5BF,$1FA6A6B9,$1CA7A7BB,
+    $0DA8A8A5,$0EA9A9A7,$0BAAAAA1,$08ABABA3,$01ACACAD,$02ADADAF,$07AEAEA9,$04AFAFAB,
+    $25B0B095,$26B1B197,$23B2B291,$20B3B393,$29B4B49D,$2AB5B59F,$2FB6B699,$2CB7B79B,
+    $3DB8B885,$3EB9B987,$3BBABA81,$38BBBB83,$31BCBC8D,$32BDBD8F,$37BEBE89,$34BFBF8B,
+    $B5C0C075,$B6C1C177,$B3C2C271,$B0C3C373,$B9C4C47D,$BAC5C57F,$BFC6C679,$BCC7C77B,
+    $ADC8C865,$AEC9C967,$ABCACA61,$A8CBCB63,$A1CCCC6D,$A2CDCD6F,$A7CECE69,$A4CFCF6B,
+    $85D0D055,$86D1D157,$83D2D251,$80D3D353,$89D4D45D,$8AD5D55F,$8FD6D659,$8CD7D75B,
+    $9DD8D845,$9ED9D947,$9BDADA41,$98DBDB43,$91DCDC4D,$92DDDD4F,$97DEDE49,$94DFDF4B,
+    $D5E0E035,$D6E1E137,$D3E2E231,$D0E3E333,$D9E4E43D,$DAE5E53F,$DFE6E639,$DCE7E73B,
+    $CDE8E825,$CEE9E927,$CBEAEA21,$C8EBEB23,$C1ECEC2D,$C2EDED2F,$C7EEEE29,$C4EFEF2B,
+    $E5F0F015,$E6F1F117,$E3F2F211,$E0F3F313,$E9F4F41D,$EAF5F51F,$EFF6F619,$ECF7F71B,
+    $FDF8F805,$FEF9F907,$FBFAFA01,$F8FBFB03,$F1FCFC0D,$F2FDFD0F,$F7FEFE09,$F4FFFF0B);
+
+  Square_TE: array[0..3, 0..255] of LongWord = (
+   ($26B1B197,$A7CECE69,$B0C3C373,$4A9595DF,$EE5A5AB4,$02ADADAF,$DCE7E73B,$06020204,
+    $D74D4D9A,$CC444488,$F8FBFB03,$469191D7,$140C0C18,$7C8787FB,$16A1A1B7,$F05050A0,
+    $A8CBCB63,$A96767CE,$FC5454A8,$92DDDD4F,$CA46468C,$648F8FEB,$D6E1E137,$D24E4E9C,
+    $E5F0F015,$F2FDFD0F,$F1FCFC0D,$C8EBEB23,$FEF9F907,$B9C4C47D,$2E1A1A34,$B26E6EDC,
+    $E25E5EBC,$EAF5F51F,$A1CCCC6D,$628D8DEF,$241C1C38,$FA5656AC,$C5434386,$F7FEFE09,
+    $0907070E,$A36161C2,$FDF8F805,$9F7575EA,$EB5959B2,$F4FFFF0B,$05030306,$66222244,
+    $6B8A8AE1,$86D1D157,$35131326,$C7EEEE29,$6D8888E5,$00000000,$120E0E1C,$5C343468,
+    $3F15152A,$758080F5,$499494DD,$D0E3E333,$C2EDED2F,$2AB5B59F,$F55353A6,$65232346,
+    $DD4B4B96,$C947478E,$3917172E,$1CA7A7BB,$459090D5,$5F35356A,$08ABABA3,$9DD8D845,
+    $3DB8B885,$94DFDF4B,$D14F4F9E,$F95757AE,$5B9A9AC1,$439292D1,$98DBDB43,$2D1B1B36,
+    $443C3C78,$ADC8C865,$5E9999C7,$0C040408,$678E8EE9,$D5E0E035,$8CD7D75B,$877D7DFA,
+    $7A8585FF,$38BBBB83,$C0404080,$742C2C58,$4E3A3A74,$CF45458A,$E6F1F117,$C6424284,
+    $AF6565CA,$60202040,$C3414182,$28181830,$967272E4,$6F25254A,$409393D3,$907070E0,
+    $5A36366C,$0F05050A,$E3F2F211,$1D0B0B16,$10A3A3B3,$8B7979F2,$C1ECEC2D,$18080810,
+    $6927274E,$53313162,$56323264,$2FB6B699,$847C7CF8,$25B0B095,$1E0A0A14,$957373E6,
+    $ED5B5BB6,$8D7B7BF6,$2CB7B79B,$768181F7,$83D2D251,$170D0D1A,$BE6A6AD4,$6A26264C,
+    $579E9EC9,$E85858B0,$519C9CCD,$708383F3,$9C7474E8,$20B3B393,$01ACACAD,$50303060,
+    $8E7A7AF4,$BB6969D2,$997777EE,$110F0F1E,$07AEAEA9,$63212142,$97DEDE49,$85D0D055,
+    $722E2E5C,$4C9797DB,$30101020,$19A4A4BD,$5D9898C5,$0DA8A8A5,$89D4D45D,$B86868D0,
+    $772D2D5A,$A66262C4,$7B292952,$B76D6DDA,$3A16162C,$DB494992,$9A7676EC,$BCC7C77B,
+    $CDE8E825,$B6C1C177,$4F9696D9,$5937376E,$DAE5E53F,$ABCACA61,$E9F4F41D,$CEE9E927,
+    $A56363C6,$36121224,$B3C2C271,$1FA6A6B9,$3C141428,$31BCBC8D,$80D3D353,$78282850,
+    $04AFAFAB,$712F2F5E,$DFE6E639,$6C242448,$F65252A4,$BFC6C679,$15A0A0B5,$1B090912,
+    $32BDBD8F,$618C8CED,$A4CFCF6B,$E75D5DBA,$33111122,$E15F5FBE,$03010102,$BAC5C57F,
+    $549F9FCB,$473D3D7A,$13A2A2B1,$589B9BC3,$AEC9C967,$4D3B3B76,$37BEBE89,$F35151A2,
+    $2B191932,$211F1F3E,$413F3F7E,$E45C5CB8,$23B2B291,$C4EFEF2B,$DE4A4A94,$A2CDCD6F,
+    $34BFBF8B,$3BBABA81,$B16F6FDE,$AC6464C8,$9ED9D947,$E0F3F313,$423E3E7C,$29B4B49D,
+    $0BAAAAA1,$91DCDC4D,$8AD5D55F,$0A06060C,$B5C0C075,$827E7EFC,$EFF6F619,$AA6666CC,
+    $B46C6CD8,$798484FD,$937171E2,$48383870,$3EB9B987,$271D1D3A,$817F7FFE,$529D9DCF,
+    $D8484890,$688B8BE3,$7E2A2A54,$9BDADA41,$1AA5A5BF,$55333366,$738282F1,$4B393972,
+    $8FD6D659,$887878F0,$7F8686F9,$FBFAFA01,$D9E4E43D,$7D2B2B56,$0EA9A9A7,$221E1E3C,
+    $6E8989E7,$A06060C0,$BD6B6BD6,$CBEAEA21,$FF5555AA,$D44C4C98,$ECF7F71B,$D3E2E231),
+   ($B1B19726,$CECE69A7,$C3C373B0,$9595DF4A,$5A5AB4EE,$ADADAF02,$E7E73BDC,$02020406,
+    $4D4D9AD7,$444488CC,$FBFB03F8,$9191D746,$0C0C1814,$8787FB7C,$A1A1B716,$5050A0F0,
+    $CBCB63A8,$6767CEA9,$5454A8FC,$DDDD4F92,$46468CCA,$8F8FEB64,$E1E137D6,$4E4E9CD2,
+    $F0F015E5,$FDFD0FF2,$FCFC0DF1,$EBEB23C8,$F9F907FE,$C4C47DB9,$1A1A342E,$6E6EDCB2,
+    $5E5EBCE2,$F5F51FEA,$CCCC6DA1,$8D8DEF62,$1C1C3824,$5656ACFA,$434386C5,$FEFE09F7,
+    $07070E09,$6161C2A3,$F8F805FD,$7575EA9F,$5959B2EB,$FFFF0BF4,$03030605,$22224466,
+    $8A8AE16B,$D1D15786,$13132635,$EEEE29C7,$8888E56D,$00000000,$0E0E1C12,$3434685C,
+    $15152A3F,$8080F575,$9494DD49,$E3E333D0,$EDED2FC2,$B5B59F2A,$5353A6F5,$23234665,
+    $4B4B96DD,$47478EC9,$17172E39,$A7A7BB1C,$9090D545,$35356A5F,$ABABA308,$D8D8459D,
+    $B8B8853D,$DFDF4B94,$4F4F9ED1,$5757AEF9,$9A9AC15B,$9292D143,$DBDB4398,$1B1B362D,
+    $3C3C7844,$C8C865AD,$9999C75E,$0404080C,$8E8EE967,$E0E035D5,$D7D75B8C,$7D7DFA87,
+    $8585FF7A,$BBBB8338,$404080C0,$2C2C5874,$3A3A744E,$45458ACF,$F1F117E6,$424284C6,
+    $6565CAAF,$20204060,$414182C3,$18183028,$7272E496,$25254A6F,$9393D340,$7070E090,
+    $36366C5A,$05050A0F,$F2F211E3,$0B0B161D,$A3A3B310,$7979F28B,$ECEC2DC1,$08081018,
+    $27274E69,$31316253,$32326456,$B6B6992F,$7C7CF884,$B0B09525,$0A0A141E,$7373E695,
+    $5B5BB6ED,$7B7BF68D,$B7B79B2C,$8181F776,$D2D25183,$0D0D1A17,$6A6AD4BE,$26264C6A,
+    $9E9EC957,$5858B0E8,$9C9CCD51,$8383F370,$7474E89C,$B3B39320,$ACACAD01,$30306050,
+    $7A7AF48E,$6969D2BB,$7777EE99,$0F0F1E11,$AEAEA907,$21214263,$DEDE4997,$D0D05585,
+    $2E2E5C72,$9797DB4C,$10102030,$A4A4BD19,$9898C55D,$A8A8A50D,$D4D45D89,$6868D0B8,
+    $2D2D5A77,$6262C4A6,$2929527B,$6D6DDAB7,$16162C3A,$494992DB,$7676EC9A,$C7C77BBC,
+    $E8E825CD,$C1C177B6,$9696D94F,$37376E59,$E5E53FDA,$CACA61AB,$F4F41DE9,$E9E927CE,
+    $6363C6A5,$12122436,$C2C271B3,$A6A6B91F,$1414283C,$BCBC8D31,$D3D35380,$28285078,
+    $AFAFAB04,$2F2F5E71,$E6E639DF,$2424486C,$5252A4F6,$C6C679BF,$A0A0B515,$0909121B,
+    $BDBD8F32,$8C8CED61,$CFCF6BA4,$5D5DBAE7,$11112233,$5F5FBEE1,$01010203,$C5C57FBA,
+    $9F9FCB54,$3D3D7A47,$A2A2B113,$9B9BC358,$C9C967AE,$3B3B764D,$BEBE8937,$5151A2F3,
+    $1919322B,$1F1F3E21,$3F3F7E41,$5C5CB8E4,$B2B29123,$EFEF2BC4,$4A4A94DE,$CDCD6FA2,
+    $BFBF8B34,$BABA813B,$6F6FDEB1,$6464C8AC,$D9D9479E,$F3F313E0,$3E3E7C42,$B4B49D29,
+    $AAAAA10B,$DCDC4D91,$D5D55F8A,$06060C0A,$C0C075B5,$7E7EFC82,$F6F619EF,$6666CCAA,
+    $6C6CD8B4,$8484FD79,$7171E293,$38387048,$B9B9873E,$1D1D3A27,$7F7FFE81,$9D9DCF52,
+    $484890D8,$8B8BE368,$2A2A547E,$DADA419B,$A5A5BF1A,$33336655,$8282F173,$3939724B,
+    $D6D6598F,$7878F088,$8686F97F,$FAFA01FB,$E4E43DD9,$2B2B567D,$A9A9A70E,$1E1E3C22,
+    $8989E76E,$6060C0A0,$6B6BD6BD,$EAEA21CB,$5555AAFF,$4C4C98D4,$F7F71BEC,$E2E231D3),
+   ($B19726B1,$CE69A7CE,$C373B0C3,$95DF4A95,$5AB4EE5A,$ADAF02AD,$E73BDCE7,$02040602,
+    $4D9AD74D,$4488CC44,$FB03F8FB,$91D74691,$0C18140C,$87FB7C87,$A1B716A1,$50A0F050,
+    $CB63A8CB,$67CEA967,$54A8FC54,$DD4F92DD,$468CCA46,$8FEB648F,$E137D6E1,$4E9CD24E,
+    $F015E5F0,$FD0FF2FD,$FC0DF1FC,$EB23C8EB,$F907FEF9,$C47DB9C4,$1A342E1A,$6EDCB26E,
+    $5EBCE25E,$F51FEAF5,$CC6DA1CC,$8DEF628D,$1C38241C,$56ACFA56,$4386C543,$FE09F7FE,
+    $070E0907,$61C2A361,$F805FDF8,$75EA9F75,$59B2EB59,$FF0BF4FF,$03060503,$22446622,
+    $8AE16B8A,$D15786D1,$13263513,$EE29C7EE,$88E56D88,$00000000,$0E1C120E,$34685C34,
+    $152A3F15,$80F57580,$94DD4994,$E333D0E3,$ED2FC2ED,$B59F2AB5,$53A6F553,$23466523,
+    $4B96DD4B,$478EC947,$172E3917,$A7BB1CA7,$90D54590,$356A5F35,$ABA308AB,$D8459DD8,
+    $B8853DB8,$DF4B94DF,$4F9ED14F,$57AEF957,$9AC15B9A,$92D14392,$DB4398DB,$1B362D1B,
+    $3C78443C,$C865ADC8,$99C75E99,$04080C04,$8EE9678E,$E035D5E0,$D75B8CD7,$7DFA877D,
+    $85FF7A85,$BB8338BB,$4080C040,$2C58742C,$3A744E3A,$458ACF45,$F117E6F1,$4284C642,
+    $65CAAF65,$20406020,$4182C341,$18302818,$72E49672,$254A6F25,$93D34093,$70E09070,
+    $366C5A36,$050A0F05,$F211E3F2,$0B161D0B,$A3B310A3,$79F28B79,$EC2DC1EC,$08101808,
+    $274E6927,$31625331,$32645632,$B6992FB6,$7CF8847C,$B09525B0,$0A141E0A,$73E69573,
+    $5BB6ED5B,$7BF68D7B,$B79B2CB7,$81F77681,$D25183D2,$0D1A170D,$6AD4BE6A,$264C6A26,
+    $9EC9579E,$58B0E858,$9CCD519C,$83F37083,$74E89C74,$B39320B3,$ACAD01AC,$30605030,
+    $7AF48E7A,$69D2BB69,$77EE9977,$0F1E110F,$AEA907AE,$21426321,$DE4997DE,$D05585D0,
+    $2E5C722E,$97DB4C97,$10203010,$A4BD19A4,$98C55D98,$A8A50DA8,$D45D89D4,$68D0B868,
+    $2D5A772D,$62C4A662,$29527B29,$6DDAB76D,$162C3A16,$4992DB49,$76EC9A76,$C77BBCC7,
+    $E825CDE8,$C177B6C1,$96D94F96,$376E5937,$E53FDAE5,$CA61ABCA,$F41DE9F4,$E927CEE9,
+    $63C6A563,$12243612,$C271B3C2,$A6B91FA6,$14283C14,$BC8D31BC,$D35380D3,$28507828,
+    $AFAB04AF,$2F5E712F,$E639DFE6,$24486C24,$52A4F652,$C679BFC6,$A0B515A0,$09121B09,
+    $BD8F32BD,$8CED618C,$CF6BA4CF,$5DBAE75D,$11223311,$5FBEE15F,$01020301,$C57FBAC5,
+    $9FCB549F,$3D7A473D,$A2B113A2,$9BC3589B,$C967AEC9,$3B764D3B,$BE8937BE,$51A2F351,
+    $19322B19,$1F3E211F,$3F7E413F,$5CB8E45C,$B29123B2,$EF2BC4EF,$4A94DE4A,$CD6FA2CD,
+    $BF8B34BF,$BA813BBA,$6FDEB16F,$64C8AC64,$D9479ED9,$F313E0F3,$3E7C423E,$B49D29B4,
+    $AAA10BAA,$DC4D91DC,$D55F8AD5,$060C0A06,$C075B5C0,$7EFC827E,$F619EFF6,$66CCAA66,
+    $6CD8B46C,$84FD7984,$71E29371,$38704838,$B9873EB9,$1D3A271D,$7FFE817F,$9DCF529D,
+    $4890D848,$8BE3688B,$2A547E2A,$DA419BDA,$A5BF1AA5,$33665533,$82F17382,$39724B39,
+    $D6598FD6,$78F08878,$86F97F86,$FA01FBFA,$E43DD9E4,$2B567D2B,$A9A70EA9,$1E3C221E,
+    $89E76E89,$60C0A060,$6BD6BD6B,$EA21CBEA,$55AAFF55,$4C98D44C,$F71BECF7,$E231D3E2),
+   ($9726B1B1,$69A7CECE,$73B0C3C3,$DF4A9595,$B4EE5A5A,$AF02ADAD,$3BDCE7E7,$04060202,
+    $9AD74D4D,$88CC4444,$03F8FBFB,$D7469191,$18140C0C,$FB7C8787,$B716A1A1,$A0F05050,
+    $63A8CBCB,$CEA96767,$A8FC5454,$4F92DDDD,$8CCA4646,$EB648F8F,$37D6E1E1,$9CD24E4E,
+    $15E5F0F0,$0FF2FDFD,$0DF1FCFC,$23C8EBEB,$07FEF9F9,$7DB9C4C4,$342E1A1A,$DCB26E6E,
+    $BCE25E5E,$1FEAF5F5,$6DA1CCCC,$EF628D8D,$38241C1C,$ACFA5656,$86C54343,$09F7FEFE,
+    $0E090707,$C2A36161,$05FDF8F8,$EA9F7575,$B2EB5959,$0BF4FFFF,$06050303,$44662222,
+    $E16B8A8A,$5786D1D1,$26351313,$29C7EEEE,$E56D8888,$00000000,$1C120E0E,$685C3434,
+    $2A3F1515,$F5758080,$DD499494,$33D0E3E3,$2FC2EDED,$9F2AB5B5,$A6F55353,$46652323,
+    $96DD4B4B,$8EC94747,$2E391717,$BB1CA7A7,$D5459090,$6A5F3535,$A308ABAB,$459DD8D8,
+    $853DB8B8,$4B94DFDF,$9ED14F4F,$AEF95757,$C15B9A9A,$D1439292,$4398DBDB,$362D1B1B,
+    $78443C3C,$65ADC8C8,$C75E9999,$080C0404,$E9678E8E,$35D5E0E0,$5B8CD7D7,$FA877D7D,
+    $FF7A8585,$8338BBBB,$80C04040,$58742C2C,$744E3A3A,$8ACF4545,$17E6F1F1,$84C64242,
+    $CAAF6565,$40602020,$82C34141,$30281818,$E4967272,$4A6F2525,$D3409393,$E0907070,
+    $6C5A3636,$0A0F0505,$11E3F2F2,$161D0B0B,$B310A3A3,$F28B7979,$2DC1ECEC,$10180808,
+    $4E692727,$62533131,$64563232,$992FB6B6,$F8847C7C,$9525B0B0,$141E0A0A,$E6957373,
+    $B6ED5B5B,$F68D7B7B,$9B2CB7B7,$F7768181,$5183D2D2,$1A170D0D,$D4BE6A6A,$4C6A2626,
+    $C9579E9E,$B0E85858,$CD519C9C,$F3708383,$E89C7474,$9320B3B3,$AD01ACAC,$60503030,
+    $F48E7A7A,$D2BB6969,$EE997777,$1E110F0F,$A907AEAE,$42632121,$4997DEDE,$5585D0D0,
+    $5C722E2E,$DB4C9797,$20301010,$BD19A4A4,$C55D9898,$A50DA8A8,$5D89D4D4,$D0B86868,
+    $5A772D2D,$C4A66262,$527B2929,$DAB76D6D,$2C3A1616,$92DB4949,$EC9A7676,$7BBCC7C7,
+    $25CDE8E8,$77B6C1C1,$D94F9696,$6E593737,$3FDAE5E5,$61ABCACA,$1DE9F4F4,$27CEE9E9,
+    $C6A56363,$24361212,$71B3C2C2,$B91FA6A6,$283C1414,$8D31BCBC,$5380D3D3,$50782828,
+    $AB04AFAF,$5E712F2F,$39DFE6E6,$486C2424,$A4F65252,$79BFC6C6,$B515A0A0,$121B0909,
+    $8F32BDBD,$ED618C8C,$6BA4CFCF,$BAE75D5D,$22331111,$BEE15F5F,$02030101,$7FBAC5C5,
+    $CB549F9F,$7A473D3D,$B113A2A2,$C3589B9B,$67AEC9C9,$764D3B3B,$8937BEBE,$A2F35151,
+    $322B1919,$3E211F1F,$7E413F3F,$B8E45C5C,$9123B2B2,$2BC4EFEF,$94DE4A4A,$6FA2CDCD,
+    $8B34BFBF,$813BBABA,$DEB16F6F,$C8AC6464,$479ED9D9,$13E0F3F3,$7C423E3E,$9D29B4B4,
+    $A10BAAAA,$4D91DCDC,$5F8AD5D5,$0C0A0606,$75B5C0C0,$FC827E7E,$19EFF6F6,$CCAA6666,
+    $D8B46C6C,$FD798484,$E2937171,$70483838,$873EB9B9,$3A271D1D,$FE817F7F,$CF529D9D,
+    $90D84848,$E3688B8B,$547E2A2A,$419BDADA,$BF1AA5A5,$66553333,$F1738282,$724B3939,
+    $598FD6D6,$F0887878,$F97F8686,$01FBFAFA,$3DD9E4E4,$567D2B2B,$A70EA9A9,$3C221E1E,
+    $E76E8989,$C0A06060,$D6BD6B6B,$21CBEAEA,$AAFF5555,$98D44C4C,$1BECF7F7,$31D3E2E2));
+
+  Square_TD: array[0..3, 0..255] of LongWord = (
+   ($02BC68E3,$0C628555,$31233F2A,$F713AB61,$726DD498,$199ACB21,$61A4223C,$CD3D9D45,
+    $23B4FD05,$5F07C42B,$C0012C9B,$0F80D93D,$745C6C48,$857E7FF9,$1FAB73F1,$0EDEEDB6,
+    $ED6B3C28,$1A789749,$8D912A9F,$339F57C9,$AAA807A9,$7DED0DA5,$8F2D427C,$C9B04D76,
+    $57E8914D,$CC63A9CE,$D296EEB4,$B6E12830,$B961F10D,$266719BD,$80AD9B41,$C76EA0C0,
+    $41F28351,$34F0DB92,$FC1EA26F,$4CCE328F,$7333E013,$6DC6A769,$93646DE5,$FA2F1ABF,
+    $B7BF1CBB,$B5037458,$4F2C6EE7,$96B7895D,$2A059CE8,$A3196644,$FB712E34,$6529F20F,
+    $7A8281FE,$F12213B1,$EC3508A3,$7E0F51CD,$14A67AFF,$F893725C,$1297C22F,$C3E370F3,
+    $1C492F99,$681543D1,$1B26A3C2,$B332CC88,$6F7ACF8A,$9F06E8B0,$1EF5477A,$DA79BBD2,
+    $210895E6,$5CE59843,$0631B8D0,$AF7BE311,$5365417E,$102BAACC,$9CE4B4D8,$D4A75664,
+    $59367CFB,$84204B72,$F64D9FEA,$DFAA5F6A,$CEDFC12D,$58684870,$81F3AFCA,$91D80506,
+    $694B775A,$A528DE94,$4210DF39,$47C33B81,$A6CA82FC,$C5D2C823,$B26CF803,$9AD50C08,
+    $40ACB7DA,$E109B97D,$2C342438,$A24752CF,$D174B2DC,$2B5BA863,$9555D535,$11759E47,
+    $E2EBE515,$C630944B,$A8146F4A,$869C2391,$39CC6A4C,$4AFF8A5F,$4D900604,$BBDD99EE,
+    $CA52111E,$18C4FFAA,$986964EB,$FFFCFE07,$015E348B,$BE0E7D56,$D99BE7BA,$32C16342,
+    $7BDCB575,$17442697,$66CBAE67,$CB0C2595,$67959AEC,$D02A8657,$99375060,$05D3E4B8,
+    $BA83AD65,$35AEEF19,$13C9F6A4,$A94A5BC1,$D61B3E87,$5E59F0A0,$5B8A1418,$3B7002AF,
+    $76E004AB,$BF5049DD,$63184ADF,$56B6A5C6,$0A533D85,$371287FA,$A794B677,$7F516546,
+    $09B161ED,$E9E6EC1B,$258545D5,$523B75F5,$3D41BA7F,$8842CE27,$434EEBB2,$97E9BDD6,
+    $F39E7B52,$457F5362,$A0FB3A2C,$70D1BC7B,$6BF71FB9,$1D171B12,$C8EE79FD,$F07C273A,
+    $D7450A0C,$7960DD96,$ABF63322,$891CFAAC,$5DBBACC8,$307D0BA1,$4BA1BED4,$940BE1BE,
+    $540ACD25,$62467E54,$8211F3A2,$3EA3E617,$E6663526,$750258C3,$9B8B3883,$C2BD4478,
+    $DC480302,$8BA0924F,$7CB3392E,$E584694E,$718F88F0,$27392D36,$3FFDD29C,$6E24FB01,
+    $DD163789,$00000000,$E0578DF6,$6C9893E2,$15F84E74,$5AD42093,$E73801AD,$B45D40D3,
+    $87C2171A,$2D6A10B3,$2FD67850,$3C1F8EF4,$A1A50EA7,$364CB371,$AE25D79A,$24DB715E,
+    $50871D16,$D5F962EF,$9086318D,$161A121C,$CF81F5A6,$076F8C5B,$491DD637,$923A596E,
+    $6477C684,$B83FC586,$F9CD46D7,$B0D090E0,$834FC729,$FD4096E4,$0B0D090E,$2056A16D,
+    $22EAC98E,$2E884CDB,$8E7376F7,$BCB215B5,$C15F1810,$6AA92B32,$B18EA46B,$5554F9AE,
+    $EE896040,$08EF5566,$442167E9,$BDEC213E,$77BE3020,$ADC78BF2,$29E7C080,$8CCF1E14,
+    $4843E2BC,$8AFEA6C4,$D8C5D331,$60FA16B7,$9DBA8053,$F2C04FD9,$783EE91D,$3A2E3624,
+    $DEF46BE1,$EFD754CB,$F4F1F709,$F5AFC382,$28B9F40B,$51D9299D,$38925EC7,$EB5A84F8,
+    $E8B8D890,$0D3CB1DE,$048DD033,$03E25C68,$E4DA5DC5,$9E58DC3B,$469D0F0A,$D3C8DA3F,
+    $DB278F59,$C48CFCA8,$AC99BF79,$4E725A6C,$FEA2CA8C,$E3B5D19E,$A476EA1F,$EA04B073),
+   ($BC68E302,$6285550C,$233F2A31,$13AB61F7,$6DD49872,$9ACB2119,$A4223C61,$3D9D45CD,
+    $B4FD0523,$07C42B5F,$012C9BC0,$80D93D0F,$5C6C4874,$7E7FF985,$AB73F11F,$DEEDB60E,
+    $6B3C28ED,$7897491A,$912A9F8D,$9F57C933,$A807A9AA,$ED0DA57D,$2D427C8F,$B04D76C9,
+    $E8914D57,$63A9CECC,$96EEB4D2,$E12830B6,$61F10DB9,$6719BD26,$AD9B4180,$6EA0C0C7,
+    $F2835141,$F0DB9234,$1EA26FFC,$CE328F4C,$33E01373,$C6A7696D,$646DE593,$2F1ABFFA,
+    $BF1CBBB7,$037458B5,$2C6EE74F,$B7895D96,$059CE82A,$196644A3,$712E34FB,$29F20F65,
+    $8281FE7A,$2213B1F1,$3508A3EC,$0F51CD7E,$A67AFF14,$93725CF8,$97C22F12,$E370F3C3,
+    $492F991C,$1543D168,$26A3C21B,$32CC88B3,$7ACF8A6F,$06E8B09F,$F5477A1E,$79BBD2DA,
+    $0895E621,$E598435C,$31B8D006,$7BE311AF,$65417E53,$2BAACC10,$E4B4D89C,$A75664D4,
+    $367CFB59,$204B7284,$4D9FEAF6,$AA5F6ADF,$DFC12DCE,$68487058,$F3AFCA81,$D8050691,
+    $4B775A69,$28DE94A5,$10DF3942,$C33B8147,$CA82FCA6,$D2C823C5,$6CF803B2,$D50C089A,
+    $ACB7DA40,$09B97DE1,$3424382C,$4752CFA2,$74B2DCD1,$5BA8632B,$55D53595,$759E4711,
+    $EBE515E2,$30944BC6,$146F4AA8,$9C239186,$CC6A4C39,$FF8A5F4A,$9006044D,$DD99EEBB,
+    $52111ECA,$C4FFAA18,$6964EB98,$FCFE07FF,$5E348B01,$0E7D56BE,$9BE7BAD9,$C1634232,
+    $DCB5757B,$44269717,$CBAE6766,$0C2595CB,$959AEC67,$2A8657D0,$37506099,$D3E4B805,
+    $83AD65BA,$AEEF1935,$C9F6A413,$4A5BC1A9,$1B3E87D6,$59F0A05E,$8A14185B,$7002AF3B,
+    $E004AB76,$5049DDBF,$184ADF63,$B6A5C656,$533D850A,$1287FA37,$94B677A7,$5165467F,
+    $B161ED09,$E6EC1BE9,$8545D525,$3B75F552,$41BA7F3D,$42CE2788,$4EEBB243,$E9BDD697,
+    $9E7B52F3,$7F536245,$FB3A2CA0,$D1BC7B70,$F71FB96B,$171B121D,$EE79FDC8,$7C273AF0,
+    $450A0CD7,$60DD9679,$F63322AB,$1CFAAC89,$BBACC85D,$7D0BA130,$A1BED44B,$0BE1BE94,
+    $0ACD2554,$467E5462,$11F3A282,$A3E6173E,$663526E6,$0258C375,$8B38839B,$BD4478C2,
+    $480302DC,$A0924F8B,$B3392E7C,$84694EE5,$8F88F071,$392D3627,$FDD29C3F,$24FB016E,
+    $163789DD,$00000000,$578DF6E0,$9893E26C,$F84E7415,$D420935A,$3801ADE7,$5D40D3B4,
+    $C2171A87,$6A10B32D,$D678502F,$1F8EF43C,$A50EA7A1,$4CB37136,$25D79AAE,$DB715E24,
+    $871D1650,$F962EFD5,$86318D90,$1A121C16,$81F5A6CF,$6F8C5B07,$1DD63749,$3A596E92,
+    $77C68464,$3FC586B8,$CD46D7F9,$D090E0B0,$4FC72983,$4096E4FD,$0D090E0B,$56A16D20,
+    $EAC98E22,$884CDB2E,$7376F78E,$B215B5BC,$5F1810C1,$A92B326A,$8EA46BB1,$54F9AE55,
+    $896040EE,$EF556608,$2167E944,$EC213EBD,$BE302077,$C78BF2AD,$E7C08029,$CF1E148C,
+    $43E2BC48,$FEA6C48A,$C5D331D8,$FA16B760,$BA80539D,$C04FD9F2,$3EE91D78,$2E36243A,
+    $F46BE1DE,$D754CBEF,$F1F709F4,$AFC382F5,$B9F40B28,$D9299D51,$925EC738,$5A84F8EB,
+    $B8D890E8,$3CB1DE0D,$8DD03304,$E25C6803,$DA5DC5E4,$58DC3B9E,$9D0F0A46,$C8DA3FD3,
+    $278F59DB,$8CFCA8C4,$99BF79AC,$725A6C4E,$A2CA8CFE,$B5D19EE3,$76EA1FA4,$04B073EA),
+   ($68E302BC,$85550C62,$3F2A3123,$AB61F713,$D498726D,$CB21199A,$223C61A4,$9D45CD3D,
+    $FD0523B4,$C42B5F07,$2C9BC001,$D93D0F80,$6C48745C,$7FF9857E,$73F11FAB,$EDB60EDE,
+    $3C28ED6B,$97491A78,$2A9F8D91,$57C9339F,$07A9AAA8,$0DA57DED,$427C8F2D,$4D76C9B0,
+    $914D57E8,$A9CECC63,$EEB4D296,$2830B6E1,$F10DB961,$19BD2667,$9B4180AD,$A0C0C76E,
+    $835141F2,$DB9234F0,$A26FFC1E,$328F4CCE,$E0137333,$A7696DC6,$6DE59364,$1ABFFA2F,
+    $1CBBB7BF,$7458B503,$6EE74F2C,$895D96B7,$9CE82A05,$6644A319,$2E34FB71,$F20F6529,
+    $81FE7A82,$13B1F122,$08A3EC35,$51CD7E0F,$7AFF14A6,$725CF893,$C22F1297,$70F3C3E3,
+    $2F991C49,$43D16815,$A3C21B26,$CC88B332,$CF8A6F7A,$E8B09F06,$477A1EF5,$BBD2DA79,
+    $95E62108,$98435CE5,$B8D00631,$E311AF7B,$417E5365,$AACC102B,$B4D89CE4,$5664D4A7,
+    $7CFB5936,$4B728420,$9FEAF64D,$5F6ADFAA,$C12DCEDF,$48705868,$AFCA81F3,$050691D8,
+    $775A694B,$DE94A528,$DF394210,$3B8147C3,$82FCA6CA,$C823C5D2,$F803B26C,$0C089AD5,
+    $B7DA40AC,$B97DE109,$24382C34,$52CFA247,$B2DCD174,$A8632B5B,$D5359555,$9E471175,
+    $E515E2EB,$944BC630,$6F4AA814,$2391869C,$6A4C39CC,$8A5F4AFF,$06044D90,$99EEBBDD,
+    $111ECA52,$FFAA18C4,$64EB9869,$FE07FFFC,$348B015E,$7D56BE0E,$E7BAD99B,$634232C1,
+    $B5757BDC,$26971744,$AE6766CB,$2595CB0C,$9AEC6795,$8657D02A,$50609937,$E4B805D3,
+    $AD65BA83,$EF1935AE,$F6A413C9,$5BC1A94A,$3E87D61B,$F0A05E59,$14185B8A,$02AF3B70,
+    $04AB76E0,$49DDBF50,$4ADF6318,$A5C656B6,$3D850A53,$87FA3712,$B677A794,$65467F51,
+    $61ED09B1,$EC1BE9E6,$45D52585,$75F5523B,$BA7F3D41,$CE278842,$EBB2434E,$BDD697E9,
+    $7B52F39E,$5362457F,$3A2CA0FB,$BC7B70D1,$1FB96BF7,$1B121D17,$79FDC8EE,$273AF07C,
+    $0A0CD745,$DD967960,$3322ABF6,$FAAC891C,$ACC85DBB,$0BA1307D,$BED44BA1,$E1BE940B,
+    $CD25540A,$7E546246,$F3A28211,$E6173EA3,$3526E666,$58C37502,$38839B8B,$4478C2BD,
+    $0302DC48,$924F8BA0,$392E7CB3,$694EE584,$88F0718F,$2D362739,$D29C3FFD,$FB016E24,
+    $3789DD16,$00000000,$8DF6E057,$93E26C98,$4E7415F8,$20935AD4,$01ADE738,$40D3B45D,
+    $171A87C2,$10B32D6A,$78502FD6,$8EF43C1F,$0EA7A1A5,$B371364C,$D79AAE25,$715E24DB,
+    $1D165087,$62EFD5F9,$318D9086,$121C161A,$F5A6CF81,$8C5B076F,$D637491D,$596E923A,
+    $C6846477,$C586B83F,$46D7F9CD,$90E0B0D0,$C729834F,$96E4FD40,$090E0B0D,$A16D2056,
+    $C98E22EA,$4CDB2E88,$76F78E73,$15B5BCB2,$1810C15F,$2B326AA9,$A46BB18E,$F9AE5554,
+    $6040EE89,$556608EF,$67E94421,$213EBDEC,$302077BE,$8BF2ADC7,$C08029E7,$1E148CCF,
+    $E2BC4843,$A6C48AFE,$D331D8C5,$16B760FA,$80539DBA,$4FD9F2C0,$E91D783E,$36243A2E,
+    $6BE1DEF4,$54CBEFD7,$F709F4F1,$C382F5AF,$F40B28B9,$299D51D9,$5EC73892,$84F8EB5A,
+    $D890E8B8,$B1DE0D3C,$D033048D,$5C6803E2,$5DC5E4DA,$DC3B9E58,$0F0A469D,$DA3FD3C8,
+    $8F59DB27,$FCA8C48C,$BF79AC99,$5A6C4E72,$CA8CFEA2,$D19EE3B5,$EA1FA476,$B073EA04),
+   ($E302BC68,$550C6285,$2A31233F,$61F713AB,$98726DD4,$21199ACB,$3C61A422,$45CD3D9D,
+    $0523B4FD,$2B5F07C4,$9BC0012C,$3D0F80D9,$48745C6C,$F9857E7F,$F11FAB73,$B60EDEED,
+    $28ED6B3C,$491A7897,$9F8D912A,$C9339F57,$A9AAA807,$A57DED0D,$7C8F2D42,$76C9B04D,
+    $4D57E891,$CECC63A9,$B4D296EE,$30B6E128,$0DB961F1,$BD266719,$4180AD9B,$C0C76EA0,
+    $5141F283,$9234F0DB,$6FFC1EA2,$8F4CCE32,$137333E0,$696DC6A7,$E593646D,$BFFA2F1A,
+    $BBB7BF1C,$58B50374,$E74F2C6E,$5D96B789,$E82A059C,$44A31966,$34FB712E,$0F6529F2,
+    $FE7A8281,$B1F12213,$A3EC3508,$CD7E0F51,$FF14A67A,$5CF89372,$2F1297C2,$F3C3E370,
+    $991C492F,$D1681543,$C21B26A3,$88B332CC,$8A6F7ACF,$B09F06E8,$7A1EF547,$D2DA79BB,
+    $E6210895,$435CE598,$D00631B8,$11AF7BE3,$7E536541,$CC102BAA,$D89CE4B4,$64D4A756,
+    $FB59367C,$7284204B,$EAF64D9F,$6ADFAA5F,$2DCEDFC1,$70586848,$CA81F3AF,$0691D805,
+    $5A694B77,$94A528DE,$394210DF,$8147C33B,$FCA6CA82,$23C5D2C8,$03B26CF8,$089AD50C,
+    $DA40ACB7,$7DE109B9,$382C3424,$CFA24752,$DCD174B2,$632B5BA8,$359555D5,$4711759E,
+    $15E2EBE5,$4BC63094,$4AA8146F,$91869C23,$4C39CC6A,$5F4AFF8A,$044D9006,$EEBBDD99,
+    $1ECA5211,$AA18C4FF,$EB986964,$07FFFCFE,$8B015E34,$56BE0E7D,$BAD99BE7,$4232C163,
+    $757BDCB5,$97174426,$6766CBAE,$95CB0C25,$EC67959A,$57D02A86,$60993750,$B805D3E4,
+    $65BA83AD,$1935AEEF,$A413C9F6,$C1A94A5B,$87D61B3E,$A05E59F0,$185B8A14,$AF3B7002,
+    $AB76E004,$DDBF5049,$DF63184A,$C656B6A5,$850A533D,$FA371287,$77A794B6,$467F5165,
+    $ED09B161,$1BE9E6EC,$D5258545,$F5523B75,$7F3D41BA,$278842CE,$B2434EEB,$D697E9BD,
+    $52F39E7B,$62457F53,$2CA0FB3A,$7B70D1BC,$B96BF71F,$121D171B,$FDC8EE79,$3AF07C27,
+    $0CD7450A,$967960DD,$22ABF633,$AC891CFA,$C85DBBAC,$A1307D0B,$D44BA1BE,$BE940BE1,
+    $25540ACD,$5462467E,$A28211F3,$173EA3E6,$26E66635,$C3750258,$839B8B38,$78C2BD44,
+    $02DC4803,$4F8BA092,$2E7CB339,$4EE58469,$F0718F88,$3627392D,$9C3FFDD2,$016E24FB,
+    $89DD1637,$00000000,$F6E0578D,$E26C9893,$7415F84E,$935AD420,$ADE73801,$D3B45D40,
+    $1A87C217,$B32D6A10,$502FD678,$F43C1F8E,$A7A1A50E,$71364CB3,$9AAE25D7,$5E24DB71,
+    $1650871D,$EFD5F962,$8D908631,$1C161A12,$A6CF81F5,$5B076F8C,$37491DD6,$6E923A59,
+    $846477C6,$86B83FC5,$D7F9CD46,$E0B0D090,$29834FC7,$E4FD4096,$0E0B0D09,$6D2056A1,
+    $8E22EAC9,$DB2E884C,$F78E7376,$B5BCB215,$10C15F18,$326AA92B,$6BB18EA4,$AE5554F9,
+    $40EE8960,$6608EF55,$E9442167,$3EBDEC21,$2077BE30,$F2ADC78B,$8029E7C0,$148CCF1E,
+    $BC4843E2,$C48AFEA6,$31D8C5D3,$B760FA16,$539DBA80,$D9F2C04F,$1D783EE9,$243A2E36,
+    $E1DEF46B,$CBEFD754,$09F4F1F7,$82F5AFC3,$0B28B9F4,$9D51D929,$C738925E,$F8EB5A84,
+    $90E8B8D8,$DE0D3CB1,$33048DD0,$6803E25C,$C5E4DA5D,$3B9E58DC,$0A469D0F,$3FD3C8DA,
+    $59DB278F,$A8C48CFC,$79AC99BF,$6C4E725A,$8CFEA2CA,$9EE3B5D1,$1FA476EA,$73EA04B0));
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROVer.inc b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROVer.inc
new file mode 100644
index 0000000..9dc7dae
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROVer.inc	
@@ -0,0 +1,48 @@
+{$A+,B-,E-,F-,G+,H+,I-,J+,K-,N+,P+,Q-,R-,S-,T-,V+,W-,X+,Y-}
+
+
+{.$DEFINE 486GE}   // Assembler Core only for >= 486 CPU
+{$DEFINE UseASM}   // use Assembler optimated core
+
+{.$DEFINE ManualRegisterClasses} // all Cipher- and Hashclasses must be manual register
+
+{$IFDEF VER80}  { Delphi 1.0     }
+  {$DEFINE VER_D1}
+{$ENDIF}
+
+{$IFDEF VER90}  { Delphi 2.0     }
+  {$DEFINE VER_D2}
+{$ENDIF}
+
+{$IFDEF VER100} {Borland Delphi 3.0 }
+  {$DEFINE VER_D3}
+{$ENDIF}
+
+{$IFDEF VER120} {Borland Delphi 4.0 }
+  {$DEFINE VER_D4}
+{$ENDIF}
+
+{$IFDEF VER93}  { Borland C++Builder 1.0 }
+  {$DEFINE VER_BCB1}
+{$ENDIF}
+
+{$IFDEF VER110} { Borland C++Builder 3.0 }
+  {$DEFINE VER_BCB3}
+{$ENDIF}
+
+{$IFNDEF VER80}           { Delphi 1.0     }
+ {$IFNDEF VER90}          { Delphi 2.0     }
+  {$IFNDEF VER93}         { C++Builder 1.0 }
+    {$DEFINE VER_D3H}     { Delphi 3.0 or higher }
+    {$IFNDEF VER100}
+      {$DEFINE VER_BCB3H} { C++Builder 3.0 or higher }
+      {$IFNDEF VER110}
+        {$DEFINE VER_D4H} { Delphi 4.0 or higher }
+      {$ENDIF}
+    {$ENDIF}
+  {$ENDIF}
+ {$ENDIF}
+{$ENDIF}
+
+
+{$I ..\eDefines.inc}
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROcipher.inc b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROcipher.inc
new file mode 100644
index 0000000..06478d3
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROcipher.inc	
@@ -0,0 +1,1636 @@
+const
+  Gost_Data: array[0..3, 0..255] of LongWord = (
+   ($00072000,$00075000,$00074800,$00071000,$00076800,$00074000,$00070000,$00077000,
+    $00073000,$00075800,$00070800,$00076000,$00073800,$00077800,$00072800,$00071800,
+    $0005A000,$0005D000,$0005C800,$00059000,$0005E800,$0005C000,$00058000,$0005F000,
+    $0005B000,$0005D800,$00058800,$0005E000,$0005B800,$0005F800,$0005A800,$00059800,
+    $00022000,$00025000,$00024800,$00021000,$00026800,$00024000,$00020000,$00027000,
+    $00023000,$00025800,$00020800,$00026000,$00023800,$00027800,$00022800,$00021800,
+    $00062000,$00065000,$00064800,$00061000,$00066800,$00064000,$00060000,$00067000,
+    $00063000,$00065800,$00060800,$00066000,$00063800,$00067800,$00062800,$00061800,
+    $00032000,$00035000,$00034800,$00031000,$00036800,$00034000,$00030000,$00037000,
+    $00033000,$00035800,$00030800,$00036000,$00033800,$00037800,$00032800,$00031800,
+    $0006A000,$0006D000,$0006C800,$00069000,$0006E800,$0006C000,$00068000,$0006F000,
+    $0006B000,$0006D800,$00068800,$0006E000,$0006B800,$0006F800,$0006A800,$00069800,
+    $0007A000,$0007D000,$0007C800,$00079000,$0007E800,$0007C000,$00078000,$0007F000,
+    $0007B000,$0007D800,$00078800,$0007E000,$0007B800,$0007F800,$0007A800,$00079800,
+    $00052000,$00055000,$00054800,$00051000,$00056800,$00054000,$00050000,$00057000,
+    $00053000,$00055800,$00050800,$00056000,$00053800,$00057800,$00052800,$00051800,
+    $00012000,$00015000,$00014800,$00011000,$00016800,$00014000,$00010000,$00017000,
+    $00013000,$00015800,$00010800,$00016000,$00013800,$00017800,$00012800,$00011800,
+    $0001A000,$0001D000,$0001C800,$00019000,$0001E800,$0001C000,$00018000,$0001F000,
+    $0001B000,$0001D800,$00018800,$0001E000,$0001B800,$0001F800,$0001A800,$00019800,
+    $00042000,$00045000,$00044800,$00041000,$00046800,$00044000,$00040000,$00047000,
+    $00043000,$00045800,$00040800,$00046000,$00043800,$00047800,$00042800,$00041800,
+    $0000A000,$0000D000,$0000C800,$00009000,$0000E800,$0000C000,$00008000,$0000F000,
+    $0000B000,$0000D800,$00008800,$0000E000,$0000B800,$0000F800,$0000A800,$00009800,
+    $00002000,$00005000,$00004800,$00001000,$00006800,$00004000,$00000000,$00007000,
+    $00003000,$00005800,$00000800,$00006000,$00003800,$00007800,$00002800,$00001800,
+    $0003A000,$0003D000,$0003C800,$00039000,$0003E800,$0003C000,$00038000,$0003F000,
+    $0003B000,$0003D800,$00038800,$0003E000,$0003B800,$0003F800,$0003A800,$00039800,
+    $0002A000,$0002D000,$0002C800,$00029000,$0002E800,$0002C000,$00028000,$0002F000,
+    $0002B000,$0002D800,$00028800,$0002E000,$0002B800,$0002F800,$0002A800,$00029800,
+    $0004A000,$0004D000,$0004C800,$00049000,$0004E800,$0004C000,$00048000,$0004F000,
+    $0004B000,$0004D800,$00048800,$0004E000,$0004B800,$0004F800,$0004A800,$00049800),
+   ($03A80000,$03C00000,$03880000,$03E80000,$03D00000,$03980000,$03A00000,$03900000,
+    $03F00000,$03F80000,$03E00000,$03B80000,$03B00000,$03800000,$03C80000,$03D80000,
+    $06A80000,$06C00000,$06880000,$06E80000,$06D00000,$06980000,$06A00000,$06900000,
+    $06F00000,$06F80000,$06E00000,$06B80000,$06B00000,$06800000,$06C80000,$06D80000,
+    $05280000,$05400000,$05080000,$05680000,$05500000,$05180000,$05200000,$05100000,
+    $05700000,$05780000,$05600000,$05380000,$05300000,$05000000,$05480000,$05580000,
+    $00A80000,$00C00000,$00880000,$00E80000,$00D00000,$00980000,$00A00000,$00900000,
+    $00F00000,$00F80000,$00E00000,$00B80000,$00B00000,$00800000,$00C80000,$00D80000,
+    $00280000,$00400000,$00080000,$00680000,$00500000,$00180000,$00200000,$00100000,
+    $00700000,$00780000,$00600000,$00380000,$00300000,$00000000,$00480000,$00580000,
+    $04280000,$04400000,$04080000,$04680000,$04500000,$04180000,$04200000,$04100000,
+    $04700000,$04780000,$04600000,$04380000,$04300000,$04000000,$04480000,$04580000,
+    $04A80000,$04C00000,$04880000,$04E80000,$04D00000,$04980000,$04A00000,$04900000,
+    $04F00000,$04F80000,$04E00000,$04B80000,$04B00000,$04800000,$04C80000,$04D80000,
+    $07A80000,$07C00000,$07880000,$07E80000,$07D00000,$07980000,$07A00000,$07900000,
+    $07F00000,$07F80000,$07E00000,$07B80000,$07B00000,$07800000,$07C80000,$07D80000,
+    $07280000,$07400000,$07080000,$07680000,$07500000,$07180000,$07200000,$07100000,
+    $07700000,$07780000,$07600000,$07380000,$07300000,$07000000,$07480000,$07580000,
+    $02280000,$02400000,$02080000,$02680000,$02500000,$02180000,$02200000,$02100000,
+    $02700000,$02780000,$02600000,$02380000,$02300000,$02000000,$02480000,$02580000,
+    $03280000,$03400000,$03080000,$03680000,$03500000,$03180000,$03200000,$03100000,
+    $03700000,$03780000,$03600000,$03380000,$03300000,$03000000,$03480000,$03580000,
+    $06280000,$06400000,$06080000,$06680000,$06500000,$06180000,$06200000,$06100000,
+    $06700000,$06780000,$06600000,$06380000,$06300000,$06000000,$06480000,$06580000,
+    $05A80000,$05C00000,$05880000,$05E80000,$05D00000,$05980000,$05A00000,$05900000,
+    $05F00000,$05F80000,$05E00000,$05B80000,$05B00000,$05800000,$05C80000,$05D80000,
+    $01280000,$01400000,$01080000,$01680000,$01500000,$01180000,$01200000,$01100000,
+    $01700000,$01780000,$01600000,$01380000,$01300000,$01000000,$01480000,$01580000,
+    $02A80000,$02C00000,$02880000,$02E80000,$02D00000,$02980000,$02A00000,$02900000,
+    $02F00000,$02F80000,$02E00000,$02B80000,$02B00000,$02800000,$02C80000,$02D80000,
+    $01A80000,$01C00000,$01880000,$01E80000,$01D00000,$01980000,$01A00000,$01900000,
+    $01F00000,$01F80000,$01E00000,$01B80000,$01B00000,$01800000,$01C80000,$01D80000),
+   ($30000002,$60000002,$38000002,$08000002,$28000002,$78000002,$68000002,$40000002,
+    $20000002,$50000002,$48000002,$70000002,$00000002,$18000002,$58000002,$10000002,
+    $B0000005,$E0000005,$B8000005,$88000005,$A8000005,$F8000005,$E8000005,$C0000005,
+    $A0000005,$D0000005,$C8000005,$F0000005,$80000005,$98000005,$D8000005,$90000005,
+    $30000005,$60000005,$38000005,$08000005,$28000005,$78000005,$68000005,$40000005,
+    $20000005,$50000005,$48000005,$70000005,$00000005,$18000005,$58000005,$10000005,
+    $30000000,$60000000,$38000000,$08000000,$28000000,$78000000,$68000000,$40000000,
+    $20000000,$50000000,$48000000,$70000000,$00000000,$18000000,$58000000,$10000000,
+    $B0000003,$E0000003,$B8000003,$88000003,$A8000003,$F8000003,$E8000003,$C0000003,
+    $A0000003,$D0000003,$C8000003,$F0000003,$80000003,$98000003,$D8000003,$90000003,
+    $30000001,$60000001,$38000001,$08000001,$28000001,$78000001,$68000001,$40000001,
+    $20000001,$50000001,$48000001,$70000001,$00000001,$18000001,$58000001,$10000001,
+    $B0000000,$E0000000,$B8000000,$88000000,$A8000000,$F8000000,$E8000000,$C0000000,
+    $A0000000,$D0000000,$C8000000,$F0000000,$80000000,$98000000,$D8000000,$90000000,
+    $B0000006,$E0000006,$B8000006,$88000006,$A8000006,$F8000006,$E8000006,$C0000006,
+    $A0000006,$D0000006,$C8000006,$F0000006,$80000006,$98000006,$D8000006,$90000006,
+    $B0000001,$E0000001,$B8000001,$88000001,$A8000001,$F8000001,$E8000001,$C0000001,
+    $A0000001,$D0000001,$C8000001,$F0000001,$80000001,$98000001,$D8000001,$90000001,
+    $30000003,$60000003,$38000003,$08000003,$28000003,$78000003,$68000003,$40000003,
+    $20000003,$50000003,$48000003,$70000003,$00000003,$18000003,$58000003,$10000003,
+    $30000004,$60000004,$38000004,$08000004,$28000004,$78000004,$68000004,$40000004,
+    $20000004,$50000004,$48000004,$70000004,$00000004,$18000004,$58000004,$10000004,
+    $B0000002,$E0000002,$B8000002,$88000002,$A8000002,$F8000002,$E8000002,$C0000002,
+    $A0000002,$D0000002,$C8000002,$F0000002,$80000002,$98000002,$D8000002,$90000002,
+    $B0000004,$E0000004,$B8000004,$88000004,$A8000004,$F8000004,$E8000004,$C0000004,
+    $A0000004,$D0000004,$C8000004,$F0000004,$80000004,$98000004,$D8000004,$90000004,
+    $30000006,$60000006,$38000006,$08000006,$28000006,$78000006,$68000006,$40000006,
+    $20000006,$50000006,$48000006,$70000006,$00000006,$18000006,$58000006,$10000006,
+    $B0000007,$E0000007,$B8000007,$88000007,$A8000007,$F8000007,$E8000007,$C0000007,
+    $A0000007,$D0000007,$C8000007,$F0000007,$80000007,$98000007,$D8000007,$90000007,
+    $30000007,$60000007,$38000007,$08000007,$28000007,$78000007,$68000007,$40000007,
+    $20000007,$50000007,$48000007,$70000007,$00000007,$18000007,$58000007,$10000007),
+   ($000000E8,$000000D8,$000000A0,$00000088,$00000098,$000000F8,$000000A8,$000000C8,
+    $00000080,$000000D0,$000000F0,$000000B8,$000000B0,$000000C0,$00000090,$000000E0,
+    $000007E8,$000007D8,$000007A0,$00000788,$00000798,$000007F8,$000007A8,$000007C8,
+    $00000780,$000007D0,$000007F0,$000007B8,$000007B0,$000007C0,$00000790,$000007E0,
+    $000006E8,$000006D8,$000006A0,$00000688,$00000698,$000006F8,$000006A8,$000006C8,
+    $00000680,$000006D0,$000006F0,$000006B8,$000006B0,$000006C0,$00000690,$000006E0,
+    $00000068,$00000058,$00000020,$00000008,$00000018,$00000078,$00000028,$00000048,
+    $00000000,$00000050,$00000070,$00000038,$00000030,$00000040,$00000010,$00000060,
+    $000002E8,$000002D8,$000002A0,$00000288,$00000298,$000002F8,$000002A8,$000002C8,
+    $00000280,$000002D0,$000002F0,$000002B8,$000002B0,$000002C0,$00000290,$000002E0,
+    $000003E8,$000003D8,$000003A0,$00000388,$00000398,$000003F8,$000003A8,$000003C8,
+    $00000380,$000003D0,$000003F0,$000003B8,$000003B0,$000003C0,$00000390,$000003E0,
+    $00000568,$00000558,$00000520,$00000508,$00000518,$00000578,$00000528,$00000548,
+    $00000500,$00000550,$00000570,$00000538,$00000530,$00000540,$00000510,$00000560,
+    $00000268,$00000258,$00000220,$00000208,$00000218,$00000278,$00000228,$00000248,
+    $00000200,$00000250,$00000270,$00000238,$00000230,$00000240,$00000210,$00000260,
+    $000004E8,$000004D8,$000004A0,$00000488,$00000498,$000004F8,$000004A8,$000004C8,
+    $00000480,$000004D0,$000004F0,$000004B8,$000004B0,$000004C0,$00000490,$000004E0,
+    $00000168,$00000158,$00000120,$00000108,$00000118,$00000178,$00000128,$00000148,
+    $00000100,$00000150,$00000170,$00000138,$00000130,$00000140,$00000110,$00000160,
+    $000001E8,$000001D8,$000001A0,$00000188,$00000198,$000001F8,$000001A8,$000001C8,
+    $00000180,$000001D0,$000001F0,$000001B8,$000001B0,$000001C0,$00000190,$000001E0,
+    $00000768,$00000758,$00000720,$00000708,$00000718,$00000778,$00000728,$00000748,
+    $00000700,$00000750,$00000770,$00000738,$00000730,$00000740,$00000710,$00000760,
+    $00000368,$00000358,$00000320,$00000308,$00000318,$00000378,$00000328,$00000348,
+    $00000300,$00000350,$00000370,$00000338,$00000330,$00000340,$00000310,$00000360,
+    $000005E8,$000005D8,$000005A0,$00000588,$00000598,$000005F8,$000005A8,$000005C8,
+    $00000580,$000005D0,$000005F0,$000005B8,$000005B0,$000005C0,$00000590,$000005E0,
+    $00000468,$00000458,$00000420,$00000408,$00000418,$00000478,$00000428,$00000448,
+    $00000400,$00000450,$00000470,$00000438,$00000430,$00000440,$00000410,$00000460,
+    $00000668,$00000658,$00000620,$00000608,$00000618,$00000678,$00000628,$00000648,
+    $00000600,$00000650,$00000670,$00000638,$00000630,$00000640,$00000610,$00000660));
+
+  Blowfish_Data: array[0..3, 0..255] of LongWord = (
+   ($D1310BA6,$98DFB5AC,$2FFD72DB,$D01ADFB7,$B8E1AFED,$6A267E96,$BA7C9045,$F12C7F99,
+    $24A19947,$B3916CF7,$0801F2E2,$858EFC16,$636920D8,$71574E69,$A458FEA3,$F4933D7E,
+    $0D95748F,$728EB658,$718BCD58,$82154AEE,$7B54A41D,$C25A59B5,$9C30D539,$2AF26013,
+    $C5D1B023,$286085F0,$CA417918,$B8DB38EF,$8E79DCB0,$603A180E,$6C9E0E8B,$B01E8A3E,
+    $D71577C1,$BD314B27,$78AF2FDA,$55605C60,$E65525F3,$AA55AB94,$57489862,$63E81440,
+    $55CA396A,$2AAB10B6,$B4CC5C34,$1141E8CE,$A15486AF,$7C72E993,$B3EE1411,$636FBC2A,
+    $2BA9C55D,$741831F6,$CE5C3E16,$9B87931E,$AFD6BA33,$6C24CF5C,$7A325381,$28958677,
+    $3B8F4898,$6B4BB9AF,$C4BFE81B,$66282193,$61D809CC,$FB21A991,$487CAC60,$5DEC8032,
+    $EF845D5D,$E98575B1,$DC262302,$EB651B88,$23893E81,$D396ACC5,$0F6D6FF3,$83F44239,
+    $2E0B4482,$A4842004,$69C8F04A,$9E1F9B5E,$21C66842,$F6E96C9A,$670C9C61,$ABD388F0,
+    $6A51A0D2,$D8542F68,$960FA728,$AB5133A3,$6EEF0B6C,$137A3BE4,$BA3BF050,$7EFB2A98,
+    $A1F1651D,$39AF0176,$66CA593E,$82430E88,$8CEE8619,$456F9FB4,$7D84A5C3,$3B8B5EBE,
+    $E06F75D8,$85C12073,$401A449F,$56C16AA6,$4ED3AA62,$363F7706,$1BFEDF72,$429B023D,
+    $37D0D724,$D00A1248,$DB0FEAD3,$49F1C09B,$075372C9,$80991B7B,$25D479D8,$F6E8DEF7,
+    $E3FE501A,$B6794C3B,$976CE0BD,$04C006BA,$C1A94FB6,$409F60C4,$5E5C9EC2,$196A2463,
+    $68FB6FAF,$3E6C53B5,$1339B2EB,$3B52EC6F,$6DFC511F,$9B30952C,$CC814544,$AF5EBD09,
+    $BEE3D004,$DE334AFD,$660F2807,$192E4BB3,$C0CBA857,$45C8740F,$D20B5F39,$B9D3FBDB,
+    $5579C0BD,$1A60320A,$D6A100C6,$402C7279,$679F25FE,$FB1FA3CC,$8EA5E9F8,$DB3222F8,
+    $3C7516DF,$FD616B15,$2F501EC8,$AD0552AB,$323DB5FA,$FD238760,$53317B48,$3E00DF82,
+    $9E5C57BB,$CA6F8CA0,$1A87562E,$DF1769DB,$D542A8F6,$287EFFC3,$AC6732C6,$8C4F5573,
+    $695B27B0,$BBCA58C8,$E1FFA35D,$B8F011A0,$10FA3D98,$FD2183B8,$4AFCB56C,$2DD1D35B,
+    $9A53E479,$B6F84565,$D28E49BC,$4BFB9790,$E1DDF2DA,$A4CB7E33,$62FB1341,$CEE4C6E8,
+    $EF20CADA,$36774C01,$D07E9EFE,$2BF11FB4,$95DBDA4D,$AE909198,$EAAD8E71,$6B93D5A0,
+    $D08ED1D0,$AFC725E0,$8E3C5B2F,$8E7594B7,$8FF6E2FB,$F2122B64,$8888B812,$900DF01C,
+    $4FAD5EA0,$688FC31C,$D1CFF191,$B3A8C1AD,$2F2F2218,$BE0E1777,$EA752DFE,$8B021FA1,
+    $E5A0CC0F,$B56F74E8,$18ACF3D6,$CE89E299,$B4A84FE0,$FD13E0B7,$7CC43B81,$D2ADA8D9,
+    $165FA266,$80957705,$93CC7314,$211A1477,$E6AD2065,$77B5FA86,$C75442F5,$FB9D35CF,
+    $EBCDAF0C,$7B3E89A0,$D6411BD3,$AE1E7E49,$00250E2D,$2071B35E,$226800BB,$57B8E0AF,
+    $2464369B,$F009B91E,$5563911D,$59DFA6AA,$78C14389,$D95A537F,$207D5BA2,$02E5B9C5,
+    $83260376,$6295CFA9,$11C81968,$4E734A41,$B3472DCA,$7B14A94A,$1B510052,$9A532915,
+    $D60F573F,$BC9BC6E4,$2B60A476,$81E67400,$08BA6FB5,$571BE91F,$F296EC6B,$2A0DD915,
+    $B6636521,$E7B9F9B6,$FF34052E,$C5855664,$53B02D5D,$A99F8FA1,$08BA4799,$6E85076A),
+   ($4B7A70E9,$B5B32944,$DB75092E,$C4192623,$AD6EA6B0,$49A7DF7D,$9CEE60B8,$8FEDB266,
+    $ECAA8C71,$699A17FF,$5664526C,$C2B19EE1,$193602A5,$75094C29,$A0591340,$E4183A3E,
+    $3F54989A,$5B429D65,$6B8FE4D6,$99F73FD6,$A1D29C07,$EFE830F5,$4D2D38E6,$F0255DC1,
+    $4CDD2086,$8470EB26,$6382E9C6,$021ECC5E,$09686B3F,$3EBAEFC9,$3C971814,$6B6A70A1,
+    $687F3584,$52A0E286,$B79C5305,$AA500737,$3E07841C,$7FDEAE5C,$8E7D44EC,$5716F2B8,
+    $B03ADA37,$F0500C0D,$F01C1F04,$0200B3FF,$AE0CF51A,$3CB574B2,$25837A58,$DC0921BD,
+    $D19113F9,$7CA92FF6,$94324773,$22F54701,$3AE5E581,$37C2DADC,$C8B57634,$9AF3DDA7,
+    $A9446146,$0FD0030E,$ECC8C73E,$A4751E41,$E238CD99,$3BEA0E2F,$3280BBA1,$183EB331,
+    $4E548B38,$4F6DB908,$6F420D03,$F60A04BF,$2CB81290,$24977C79,$5679B072,$BCAF89AF,
+    $DE9A771F,$D9930810,$B38BAE12,$DCCF3F2E,$5512721F,$2E6B7124,$501ADDE6,$9F84CD87,
+    $7A584718,$7408DA17,$BC9F9ABC,$E94B7D8C,$EC7AEC3A,$DB851DFA,$63094366,$C464C3D2,
+    $EF1C1847,$3215D908,$DD433B37,$24C2BA16,$12A14D43,$2A65C451,$50940002,$133AE4DD,
+    $71DFF89E,$10314E55,$81AC77D6,$5F11199B,$043556F1,$D7A3C76B,$3C11183B,$5924A509,
+    $F28FE6ED,$97F1FBFA,$9EBABF2C,$1E153C6E,$86E34570,$EAE96FB1,$860E5E0A,$5A3E2AB3,
+    $771FE71C,$4E3D06FA,$2965DCB9,$99E71D0F,$803E89D6,$5266C825,$2E4CC978,$9C10B36A,
+    $C6150EBA,$94E2EA78,$A5FC3C53,$1E0A2DF4,$F2F74EA7,$361D2B3D,$1939260F,$19C27960,
+    $5223A708,$F71312B6,$EBADFE6E,$EAC31F66,$E3BC4595,$A67BC883,$B17F37D1,$018CFF28,
+    $C332DDEF,$BE6C5AA5,$65582185,$68AB9802,$EECEA50F,$DB2F953B,$2AEF7DAD,$5B6E2F84,
+    $1521B628,$29076170,$ECDD4775,$619F1510,$13CCA830,$EB61BD96,$0334FE1E,$AA0363CF,
+    $B5735C90,$4C70A239,$D59E9E0B,$CBAADE14,$EECC86BC,$60622CA7,$9CAB5CAB,$B2F3846E,
+    $648B1EAF,$19BDF0CA,$A02369B9,$655ABB50,$40685A32,$3C2AB4B3,$319EE9D5,$C021B8F7,
+    $9B540B19,$875FA099,$95F7997E,$623D7DA8,$F837889A,$97E32D77,$11ED935F,$16681281,
+    $0E358829,$C7E61FD6,$96DEDFA1,$7858BA99,$57F584A5,$1B227263,$9B83C3FF,$1AC24696,
+    $CDB30AEB,$532E3054,$8FD948E4,$6DBC3128,$58EBF2EF,$34C6FFEA,$FE28ED61,$EE7C3C73,
+    $5D4A14D9,$E864B7E3,$42105D14,$203E13E0,$45EEE2B6,$A3AAABEA,$DB6C4F15,$FACB4FD0,
+    $C742F442,$EF6ABBB5,$654F3B1D,$41CD2105,$D81E799E,$86854DC7,$E44B476A,$3D816250,
+    $CF62A1F2,$5B8D2646,$FC8883A0,$C1C7B6A3,$7F1524C3,$69CB7492,$47848A0B,$5692B285,
+    $095BBF00,$AD19489D,$1462B174,$23820E00,$58428D2A,$0C55F5EA,$1DADF43E,$233F7061,
+    $3372F092,$8D937E41,$D65FECF1,$6C223BDB,$7CDE3759,$CBEE7460,$4085F2A7,$CE77326E,
+    $A6078084,$19F8509E,$E8EFD855,$61D99735,$A969A7AA,$C50C06C2,$5A04ABFC,$800BCADC,
+    $9E447A2E,$C3453484,$FDD56705,$0E1E9EC9,$DB73DBD3,$105588CD,$675FDA79,$E3674340,
+    $C5C43465,$713E38D8,$3D28F89E,$F16DFF20,$153E21E7,$8FB03D4A,$E6E39F2B,$DB83ADF7),
+   ($E93D5A68,$948140F7,$F64C261C,$94692934,$411520F7,$7602D4F7,$BCF46B2E,$D4A20068,
+    $D4082471,$3320F46A,$43B7D4B7,$500061AF,$1E39F62E,$97244546,$14214F74,$BF8B8840,
+    $4D95FC1D,$96B591AF,$70F4DDD3,$66A02F45,$BFBC09EC,$03BD9785,$7FAC6DD0,$31CB8504,
+    $96EB27B3,$55FD3941,$DA2547E6,$ABCA0A9A,$28507825,$530429F4,$0A2C86DA,$E9B66DFB,
+    $68DC1462,$D7486900,$680EC0A4,$27A18DEE,$4F3FFEA2,$E887AD8C,$B58CE006,$7AF4D6B6,
+    $AACE1E7C,$D3375FEC,$CE78A399,$406B2A42,$20FE9E35,$D9F385B9,$EE39D7AB,$3B124E8B,
+    $1DC9FAF7,$4B6D1856,$26A36631,$EAE397B2,$3A6EFA74,$DD5B4332,$6841E7F7,$CA7820FB,
+    $FB0AF54E,$D8FEB397,$454056AC,$BA489527,$55533A3A,$20838D87,$FE6BA9B7,$D096954B,
+    $55A867BC,$A1159A58,$CCA92963,$99E1DB33,$A62A4A56,$3F3125F9,$5EF47E1C,$9029317C,
+    $FDF8E802,$04272F70,$80BB155C,$05282CE3,$95C11548,$E4C66D22,$48C1133F,$C70F86DC,
+    $07F9C9EE,$41041F0F,$404779A4,$5D886E17,$325F51EB,$D59BC0D1,$F2BCC18F,$41113564,
+    $257B7834,$602A9C60,$DFF8E8A3,$1F636C1B,$0E12B4C2,$02E1329E,$AF664FD1,$CAD18115,
+    $6B2395E0,$333E92E1,$3B240B62,$EEBEB922,$85B2A20E,$E6BA0D99,$DE720C8C,$2DA2F728,
+    $D0127845,$95B794FD,$647D0862,$E7CCF5F0,$5449A36F,$877D48FA,$C39DFD27,$F33E8D1E,
+    $0A476341,$992EFF74,$3A6F6EAB,$F4F8FD37,$A812DC60,$A1EBDDF8,$991BE14C,$DB6E6B0D,
+    $C67B5510,$6D672C37,$2765D43B,$DCD0E804,$F1290DC7,$CC00FFA3,$B5390F92,$690FED0B,
+    $667B9FFB,$CEDB7D9C,$A091CF0B,$D9155EA3,$BB132F88,$515BAD24,$7B9479BF,$763BD6EB,
+    $37392EB3,$CC115979,$8026E297,$F42E312D,$6842ADA7,$C66A2B3B,$12754CCC,$782EF11C,
+    $6A124237,$B79251E7,$06A1BBE6,$4BFB6350,$1A6B1018,$11CAEDFA,$3D25BDD8,$E2E1C3C9,
+    $44421659,$0A121386,$D90CEC6E,$D5ABEA2A,$64AF674E,$DA86A85F,$BEBFE988,$64E4C3FE,
+    $9DBC8057,$F0F7C086,$60787BF8,$6003604D,$D1FD8346,$F6381FB0,$7745AE04,$D736FCCC,
+    $83426B33,$F01EAB71,$B0804187,$3C005E5F,$77A057BE,$BDE8AE24,$55464299,$BF582E61,
+    $4E58F48F,$F2DDFDA2,$F474EF38,$8789BDC2,$5366F9C3,$C8B38E74,$B475F255,$46FCD9B9,
+    $7AEB2661,$8B1DDF84,$846A0E79,$915F95E2,$466E598E,$20B45770,$8CD55591,$C902DE4C,
+    $B90BACE1,$BB8205D0,$11A86248,$7574A99E,$B77F19B6,$E0A9DC09,$662D09A1,$C4324633,
+    $E85A1F02,$09F0BE8C,$4A99A025,$1D6EFE10,$1AB93D1D,$0BA5A4DF,$A186F20F,$2868F169,
+    $DCB7DA83,$573906FE,$A1E2CE9B,$4FCD7F52,$50115E01,$A70683FA,$A002B5C4,$0DE6D027,
+    $9AF88C27,$773F8641,$C3604C06,$61A806B5,$F0177A28,$C0F586E0,$006058AA,$30DC7D62,
+    $11E69ED7,$2338EA63,$53C2DD94,$C2C21634,$BBCBEE56,$90BCB6DE,$EBFC7DA1,$CE591D76,
+    $6F05E409,$4B7C0188,$39720A3D,$7C927C24,$86E3725F,$724D9DB9,$1AC15BB4,$D39EB8FC,
+    $ED545578,$08FCA5B5,$D83D7CD3,$4DAD0FC4,$1E50EF5E,$B161E6F8,$A28514D9,$6C51133C,
+    $6FD5C7E7,$56E14EC4,$362ABFCE,$DDC6C837,$D79A3234,$92638212,$670EFA8E,$406000E0),
+   ($3A39CE37,$D3FAF5CF,$ABC27737,$5AC52D1B,$5CB0679E,$4FA33742,$D3822740,$99BC9BBE,
+    $D5118E9D,$BF0F7315,$D62D1C7E,$C700C47B,$B78C1B6B,$21A19045,$B26EB1BE,$6A366EB4,
+    $5748AB2F,$BC946E79,$C6A376D2,$6549C2C8,$530FF8EE,$468DDE7D,$D5730A1D,$4CD04DC6,
+    $2939BBDB,$A9BA4650,$AC9526E8,$BE5EE304,$A1FAD5F0,$6A2D519A,$63EF8CE2,$9A86EE22,
+    $C089C2B8,$43242EF6,$A51E03AA,$9CF2D0A4,$83C061BA,$9BE96A4D,$8FE51550,$BA645BD6,
+    $2826A2F9,$A73A3AE1,$4BA99586,$EF5562E9,$C72FEFD3,$F752F7DA,$3F046F69,$77FA0A59,
+    $80E4A915,$87B08601,$9B09E6AD,$3B3EE593,$E990FD5A,$9E34D797,$2CF0B7D9,$022B8B51,
+    $96D5AC3A,$017DA67D,$D1CF3ED6,$7C7D2D28,$1F9F25CF,$ADF2B89B,$5AD6B472,$5A88F54C,
+    $E029AC71,$E019A5E6,$47B0ACFD,$ED93FA9B,$E8D3C48D,$283B57CC,$F8D56629,$79132E28,
+    $785F0191,$ED756055,$F7960E44,$E3D35E8C,$15056DD4,$88F46DBA,$03A16125,$0564F0BD,
+    $C3EB9E15,$3C9057A2,$97271AEC,$A93A072A,$1B3F6D9B,$1E6321F5,$F59C66FB,$26DCF319,
+    $7533D928,$B155FDF5,$03563482,$8ABA3CBB,$28517711,$C20AD9F8,$ABCC5167,$CCAD925F,
+    $4DE81751,$3830DC8E,$379D5862,$9320F991,$EA7A90C2,$FB3E7BCE,$5121CE64,$774FBE32,
+    $A8B6E37E,$C3293D46,$48DE5369,$6413E680,$A2AE0810,$DD6DB224,$69852DFD,$09072166,
+    $B39A460A,$6445C0DD,$586CDECF,$1C20C8AE,$5BBEF7DD,$1B588D40,$CCD2017F,$6BB4E3BB,
+    $DDA26A7E,$3A59FF45,$3E350A44,$BCB4CDD5,$72EACEA8,$FA6484BB,$8D6612AE,$BF3C6F47,
+    $D29BE463,$542F5D9E,$AEC2771B,$F64E6370,$740E0D8D,$E75B1357,$F8721671,$AF537D5D,
+    $4040CB08,$4EB4E2CC,$34D2466A,$0115AF84,$E1B00428,$95983A1D,$06B89FB4,$CE6EA048,
+    $6F3F3B82,$3520AB82,$011A1D4B,$277227F8,$611560B1,$E7933FDC,$BB3A792B,$344525BD,
+    $A08839E1,$51CE794B,$2F32C9B7,$A01FBAC9,$E01CC87E,$BCC7D1F6,$CF0111C3,$A1E8AAC7,
+    $1A908749,$D44FBD9A,$D0DADECB,$D50ADA38,$0339C32A,$C6913667,$8DF9317C,$E0B12B4F,
+    $F79E59B7,$43F5BB3A,$F2D519FF,$27D9459C,$BF97222C,$15E6FC2A,$0F91FC71,$9B941525,
+    $FAE59361,$CEB69CEB,$C2A86459,$12BAA8D1,$B6C1075E,$E3056A0C,$10D25065,$CB03A442,
+    $E0EC6E0E,$1698DB3B,$4C98A0BE,$3278E964,$9F1F9532,$E0D392DF,$D3A0342B,$8971F21E,
+    $1B0A7441,$4BA3348C,$C5BE7120,$C37632D8,$DF359F8D,$9B992F2E,$E60B6F47,$0FE3F11D,
+    $E54CDA54,$1EDAD891,$CE6279CF,$CD3E7E6F,$1618B166,$FD2C1D05,$848FD2C5,$F6FB2299,
+    $F523F357,$A6327623,$93A83531,$56CCCD02,$ACF08162,$5A75EBB5,$6E163697,$88D273CC,
+    $DE966292,$81B949D0,$4C50901B,$71C65614,$E6C6C7BD,$327A140A,$45E1D006,$C3F27B9A,
+    $C9AA53FD,$62A80F00,$BB25BFE2,$35BDD2F6,$71126905,$B2040222,$B6CBCF7C,$CD769C2B,
+    $53113EC0,$1640E3D3,$38ABBD60,$2547ADF0,$BA38209C,$F746CE76,$77AFA1C5,$20756060,
+    $85CBFE4E,$8AE88DD8,$7AAAF9B0,$4CF9AA7E,$1948C25C,$02FB8A8C,$01C36AE4,$D6EBE1F9,
+    $90D4F869,$A65CDEA0,$3F09252D,$C208E69F,$B74E6132,$CE77E25B,$578FDFE3,$3AC372E6));
+
+  Blowfish_Key: array[0..17] of LongWord = (
+    $243F6A88,$85A308D3,$13198A2E,$03707344,$A4093822,$299F31D0,
+    $082EFA98,$EC4E6C89,$452821E6,$38D01377,$BE5466CF,$34E90C6C,
+    $C0AC29B7,$C97C50DD,$3F84D5B5,$B5470917,$9216D5D9,$8979FB1B);
+
+  Q128_Data: array[0..1023] of LongWord = (
+    $D6D92632,$5E84404D,$4F341282,$71654B06,$D48D6A0B,$245BECC4,$C8F84D80,$22C620C9,
+    $66AA8B02,$0AC697FF,$8B755A36,$2577931C,$438D17B6,$BB7B1BD1,$E0A8F51E,$F4FD583D,
+    $BECEEB95,$7945C1AE,$29CE9628,$3D7965CD,$80CFBDB9,$2F535A25,$7666A9BD,$6DF2324B,
+    $98731A06,$E4D32444,$265FAF55,$41895427,$F2D2C55E,$8151930F,$77A888A3,$9CBA9A32,
+    $A7EC629C,$55DCF904,$B35B9179,$1AB8E42E,$A0EF8027,$DB4C5CDE,$9FC2A9D3,$A9512439,
+    $9C08CB5C,$4BFD92B6,$C23EDA7F,$037833E1,$40177A91,$BAE53567,$774AD665,$3CB744D3,
+    $6E8A01AA,$65D2B8E3,$0507A12A,$EF69C3CB,$230801D7,$0BBAE78F,$62630B36,$ED6D805A,
+    $5AAF9EBF,$721D78E7,$D33CD9DE,$6618DA6C,$9DC6EA42,$0D272B82,$3559EF65,$DCFDEF0B,
+    $865271B4,$3621DC84,$885D667F,$92E58251,$2E9D7B3B,$E9165100,$99BD3B18,$B1ED8386,
+    $84563225,$446CABCB,$7E462315,$A2BBCC1E,$3BE4A9C0,$320A0276,$416B0AE1,$C6A755E3,
+    $5C8003DC,$36C38242,$97E2237B,$2AE6AA61,$8A5925EE,$3B56F8AE,$26BDF193,$96CE5CA3,
+    $E51D055A,$AD2AF563,$2B9ADA11,$9F70F8BD,$3F9F789A,$89934761,$A8CF0A8F,$C78B2A3B,
+    $8F5E84C4,$B8B1795E,$AFCCE834,$D9AA4189,$C28C8B11,$7636A615,$F2609430,$ECA3A144,
+    $7869BE76,$12C8612E,$D18ACB21,$CC61C21C,$EDDFD134,$AD7AFACB,$7F6A5CCD,$0C0B545A,
+    $584983E8,$04998F9C,$969E530B,$E21EE7E1,$FFF5EEDC,$FE3BCFC2,$97007DBD,$66FA84AA,
+    $A375ED00,$3509E0CD,$1B76C530,$70193B76,$86E020DA,$C9366C9E,$49F9D127,$AE52C682,
+    $260FA0FD,$E380C957,$CE358E25,$02044391,$AEB09844,$F31CE440,$F0D686CF,$8CC4E9E3,
+    $BE2CB553,$1E933ADC,$C312A5A7,$1D0957FB,$A1C3FFFF,$BD5486B2,$E8D8701E,$6E685F6C,
+    $1BC4945E,$062F9D63,$84063D8D,$C1F4B8F0,$A7BC6D34,$C4F319DA,$F81452A1,$4CAE7FA5,
+    $1DBB0695,$AA9B46B6,$6BDDAF28,$61F96611,$9A27563F,$C2DC84B9,$6530E625,$E7494963,
+    $6FF671DA,$B8532798,$C06A9646,$CC839CDA,$9EEED60B,$A70E3C5A,$F0868967,$02544C39,
+    $87CC5F02,$B3B9CFBF,$F6F91BAC,$DCADE0A3,$8B9704F0,$6CDE4D93,$64AEC893,$3E515984,
+    $7BF3D351,$3EB30742,$BE9EE43D,$B15FD2E8,$2C7B666C,$01CE211E,$3B06F706,$05E5FFEC,
+    $24E9BDAA,$FDA1A2E5,$E04AABD8,$E9A4006E,$019E2EB6,$8D0AC8FD,$73D359F9,$6A43819E,
+    $00500FA8,$DA302CAE,$C0D8C728,$62D15A58,$61A969B9,$1E216BB2,$0892DBC6,$3A7A8776,
+    $34259F15,$79A79F68,$F96822D1,$7F88020B,$AF9CE79C,$017C7070,$F8445D09,$EE15B3BB,
+    $E3629791,$20203D9E,$53413509,$25279CB4,$DF378D84,$8921160F,$A89F0527,$413B0549,
+    $AD98A40D,$FB8E3F86,$00000000,$D717072C,$E6353913,$ACB4DBD5,$1F0D146A,$C411471C,
+    $B9CD092E,$41D95B8F,$74D0BB42,$86027E1C,$DA827DC0,$57D8BA95,$12986E86,$9BB97889,
+    $C9843DF0,$122A3FE8,$556EA86A,$D8346F3F,$693BB27F,$53113AA1,$2850B89E,$0CE90A9C,
+    $FB3C6EE8,$7A6DFDE7,$917FEF76,$2A54FB0F,$E2ACB68F,$E4832BEC,$2E7F25FD,$110203A1,
+    $AACB491E,$18ECA817,$9E5C8765,$14B7F3E5,$C146E99E,$2E2F2A55,$47A6C944,$23BA50B9,
+    $D2F2F8C0,$FBDE302E,$A494517D,$B5740C1A,$72AF2989,$EE45BC13,$03283C49,$6FA67E72,
+    $F767351A,$1A5ABAE8,$197286A1,$E71946CB,$0F7367BB,$DD33CE15,$31C060F9,$67D6FB72,
+    $AEE097EC,$28E2E9F0,$E7AB17A5,$BA076BA1,$2595CDDA,$D43F3B65,$25C5C272,$C81A1346,
+    $177D916A,$9B5B264F,$E166D400,$9EBED9A3,$7EF4727B,$611B38D7,$5DFC73AC,$0C5B5BF2,
+    $8DE8963B,$C7DB2593,$31223E3F,$D7470884,$606748A7,$FFA5E174,$F3FEBA86,$40F52457,
+    $A3C7BC6E,$DC4FBE65,$6233049E,$C26ED5D7,$4F8643EC,$468AB69C,$53A36BCF,$558CF6AC,
+    $95043E2C,$1B26CA98,$4867FF91,$85C81C93,$B60C3FFB,$897119A7,$4AD1ED6E,$7480B4EA,
+    $0BEAE827,$D0F6BB51,$58198C40,$6989E311,$5F1A6EFB,$696BBDD7,$6847C20F,$6C6C1CFD,
+    $1EC33574,$F64B4AC2,$F41F06FB,$00B2516E,$644C9655,$8C94E64B,$6648D5C4,$A2EBC3B6,
+    $4C1C2ECB,$F7856BDC,$7ADFAC89,$4837F039,$AE02C92A,$35BBB1A3,$E461752A,$F7D56474,
+    $D210A606,$718715C0,$A4C45ED5,$BAB53ACF,$1C252823,$CB807E61,$CDAFE302,$AA791870,
+    $0B58B949,$A00DDEE1,$60D519C9,$E1848AC6,$D9481F4F,$F148A879,$64FEC73B,$3C551A15,
+    $E5AF5434,$4D605EBB,$A55A7063,$3C0515BD,$1DEB093D,$0D957AEC,$3EE308EA,$CCD39372,
+    $D38E88B0,$FA401E98,$8F0E8B6C,$B023A298,$9207DC97,$7C126F2C,$D8863E51,$CD4DBDC4,
+    $382ECB4F,$6A138E36,$631F7B46,$19228909,$1C75278B,$50DB582E,$90039F06,$A9B37AFF,
+    $06CDC3A5,$210C4246,$8FECD5AA,$B227E109,$3D9B3B0B,$B92F57E8,$23EA5F11,$7839B1DE,
+    $CAAC01B9,$127A3040,$F282CAF6,$9A950751,$8E22F4B4,$FC6F83FB,$56F4C54D,$BCCAA804,
+    $0F91397D,$60851661,$807DECD7,$EADC338F,$51457698,$9F20F715,$E4317A82,$D7A55642,
+    $F2309B98,$3F2D29F4,$EB121291,$DBAE0218,$99ED34B0,$FD13F38B,$91CDBE18,$C9666336,
+    $7B118D97,$042BDEF2,$ED3D8FF2,$179FCFAC,$63AD2A28,$32B85318,$CDFFECAA,$724D774F,
+    $21EE1C80,$42A1686E,$2A04F4A7,$95B66F42,$DE4BFDF4,$D240A9AE,$4A81E2C6,$A82D5449,
+    $7D3E10F4,$614B377F,$FAA2405E,$3FCF7732,$90B1CE68,$FC8DDD3D,$8DB89993,$16E3BFDC,
+    $B30B9ED1,$8229A0EE,$4EAA3C34,$B10FDD40,$56A4CAE5,$84E4634B,$D16895E7,$6E3850C4,
+    $95543184,$58ABDD2E,$BE7CBAFB,$C8A84228,$DAD27268,$DB1C5376,$71D71A68,$BDB6D874,
+    $EBF04C57,$DFD5D342,$852A4255,$D66B775C,$B4087C6A,$CBD071C9,$EB421D39,$DD819F7B,
+    $4FD64C44,$305E4E4F,$7D8C419A,$D014E597,$DEA9A332,$1C97794D,$45A28AD5,$628155F0,
+    $912FE0DE,$43DD181E,$FAF24FF6,$4EFA339C,$9399F221,$0EED490D,$B4BA2D04,$A193F057,
+    $942841F4,$E136DBA8,$E7FB180D,$F5337923,$30BC1089,$BC9AA7AC,$CFFBAF3B,$6560E98D,
+    $33942CC0,$0A969857,$5788B53D,$20703236,$31906F51,$A75E33F2,$5987A2F6,$6B3FF1EE,
+    $C5DF6602,$A25992D8,$6AF1D0F0,$1651EEB2,$5FA83F95,$D8D631F9,$788BE0B0,$B6BE6E95,
+    $A121A139,$19C0D7CF,$095CFAD8,$09BEA41E,$872E01C4,$C7397B55,$990F6A76,$1601E11A,
+    $17CFC004,$3BB4A668,$8ABB7B28,$809FB211,$94CA1F32,$B277EEA1,$CFABA093,$5965FC30,
+    $9AC508F9,$7F3A5365,$EF8B9D0D,$37EFFD9A,$949A109A,$9F92A67B,$90E1C1C0,$F8F60C67,
+    $8A092A46,$F8A603CF,$F9382D79,$6F142F1C,$5AFF9117,$ACE4D47D,$FE899EAC,$13564F98,
+    $D2A2F768,$76D4F8D3,$A2099D70,$08C2D46E,$42133900,$07E1BC7D,$F4AD5795,$EEF7ED7D,
+    $932BA34F,$33267DAE,$CAFC0E11,$2FB104E3,$503906E8,$172D9EC2,$F61B456A,$6EDA0E02,
+    $4E4862F2,$C56D376C,$526D4AD1,$E9465EA8,$448EF50D,$EA3E6D49,$3952BB3F,$2ECD7493,
+    $AC068ABB,$59D7AD5E,$877E0E6C,$A397B3C6,$069DCC0D,$D63B78F4,$7CF031EA,$180EF6D1,
+    $CA1E50D7,$DF85DCEA,$8C76B88D,$EA6E62E1,$090CF570,$E54D0AF2,$B2C5BFCF,$14E7FC4D,
+    $B7204023,$7EA47DD3,$52DF1BBF,$6582B74B,$ECF3AEEC,$C03A99EE,$7E162CBD,$3A98D9B0,
+    $0DC57544,$A325E2A8,$D5434B15,$E687687D,$6817CDA7,$6D406325,$4714982A,$102E7C79,
+    $BC28F6C2,$78DBEF18,$2AB6A5C9,$C3A0F4C9,$7D6E1F5C,$9C58C4F4,$82CBFE28,$21BE1328,
+    $576AEBFB,$8E72FB1C,$A6724C2A,$4638E7F2,$2B7884D7,$40477539,$5442D7B2,$EA8C3C27,
+    $1455AD23,$2773D08D,$387EC4E7,$3AC8D618,$4B4FC3D8,$18BCA7BF,$83B78E58,$53F36467,
+    $2723DF25,$4C4C2163,$8598133B,$1FBF4504,$2FE10B4B,$297CC746,$46DAB934,$56469423,
+    $641C99FD,$4CFE700D,$8B25559E,$5D1E2D6A,$BC78F96A,$24B9B202,$EF39CC63,$C116E636,
+    $989144C0,$EFDB92A5,$5D4E22C2,$68A59CC9,$77F8870B,$7A3DF24F,$7CA03E42,$FD43FC23,
+    $70FB65B0,$905390AE,$443CA463,$6D106C8D,$1529DD53,$38CC9589,$5935F398,$2F03558D,
+    $B8E176F6,$B073AD30,$5E661E8B,$11520C09,$573AE453,$8C26B725,$DDD190D3,$97507215,
+    $27C181E3,$0557AE82,$F3AEB52E,$D51344BD,$9D96E5EA,$42F167C6,$A6C01D44,$982315AE,
+    $2B288B7F,$A171AE91,$97B22CD3,$919DB1B0,$13B4115E,$7684F77B,$C342AA0F,$08208AA8,
+    $08708500,$E5FF5B9C,$4E186D5A,$2800B736,$D5A115D3,$C4A31672,$159B8C3D,$FE6BC06A,
+    $967C0DCD,$07B1B3D5,$433F46D8,$E8887FB6,$4668E85A,$45F2857D,$2BCAD5B9,$D4DD65A3,
+    $72FF2621,$B99D0686,$8EC0AA72,$2DE548DA,$E01AA470,$8355D09E,$5E361123,$E66536BB,
+    $5F4A6153,$5DAC7C04,$23580E7F,$B52403B2,$93C9FD89,$B6EE613D,$C6F75A4B,$3A2A88DE,
+    $70AB6A18,$4D305113,$C3F0FB61,$22247E0F,$49A9DE8F,$8D5AC755,$95E660EA,$C088C880,
+    $C6450B25,$F7373AB2,$F1AAF6BF,$3CE74B7B,$FDF1AD4D,$634F74EE,$ABE736C6,$436F4970,
+    $4A63BC00,$94784E5C,$27918E4B,$300E41E7,$9BE97721,$DBFE0DB0,$ED8FDE9C,$81E3C261,
+    $FED99104,$33C42368,$5ED44FE5,$0753ED13,$47F6C6EC,$704934DE,$2CC93702,$02B612FF,
+    $3F7D265C,$A4760FBB,$1A0AB540,$09EEABB6,$ADC8ABA5,$13E41EF6,$88BF38B9,$D91810E7,
+    $523D4579,$6734A5B4,$370DA35C,$DC1FB1CD,$04C98034,$2DB54772,$4DD20FD5,$86B02F72,
+    $BB994517,$D044EA3F,$D1DAC489,$4885A157,$3902B497,$C1A4B758,$0FC136D5,$FF17B01A,
+    $5B83E167,$7A8FA321,$1579D2FB,$EBA043FF,$50690940,$802DE37F,$A6224382,$6B8DA080,
+    $0A74C691,$7432E584,$528F1417,$A5E8210D,$88EF3711,$9A775997,$0CB90534,$292CC8EE,
+    $47449782,$20C26358,$C615048D,$AA2917D8,$494B8049,$84B46CE3,$73610897,$7BA3DCF9,
+    $4510DBBB,$68F59361,$8279AF46,$BD04891A,$CE87DF4B,$553EA7C2,$CB322F0F,$5C625D1A,
+    $4F641D2A,$325A0DDE,$A50A7FCB,$11B052CF,$1D595853,$F563768B,$98C14B68,$3D296A65,
+    $DE1BF25C,$3671D32C,$E3329839,$F581284D,$37BFF232,$DEF9AC9A,$8E90A5DA,$754E95F4,
+    $5B31B009,$B4EA22AC,$713544AE,$CE65818D,$067F92CB,$39E0EA51,$B0C1FC5E,$C84A1CEE,
+    $6AA1DF58,$E9F40FC6,$F1FAF917,$13064030,$05B5F044,$424336A8,$0A24C939,$C44148B4,
+    $6F4420B4,$047BD15A,$39B0E5F9,$8BC70B58,$0E5F1863,$D1389A4F,$AF2EB6F2,$C9D43258,
+    $107E73D1,$89C348C9,$9CEA959A,$11E05D67,$BB2B1479,$73835651,$F34CEBE8,$D36CD676,
+    $4540D413,$5CD00C74,$31723197,$EEA7E2D5,$0F236813,$81B3CDC9,$7FD80DA3,$D7F559EA,
+    $03CA628F,$3DCB34A3,$33767206,$2C2B69C4,$51F727F6,$829BF180,$039A6D27,$56169B8B,
+    $4D82007D,$9D24B484,$BDE6D7DC,$389C9A21,$69D9ECB9,$B792114D,$44DEFAA5,$8FBCDA02,
+    $92B58DF9,$962C0265,$CF19F1FD,$7462EA2C,$227471A7,$C53D38C4,$9257D33F,$32E85CB0,
+    $ABB7396E,$30EC1F21,$58FBD286,$5B61BFA1,$240BE36C,$B7704F8B,$A69012EC,$1F5D1BC2,
+    $8305DF36,$299E9980,$5FF8303D,$C58F69AA,$7DDC4E32,$E6D767D5,$880D69D7,$D46F34CD,
+    $FF47BFB2,$22962F61,$A9E37557,$FA101130,$83E781F0,$CF49FE55,$FCDDD295,$2D07161C,
+    $E83A2ED8,$CA4E5F7F,$75FCC49A,$7915CE06,$54F086DC,$A9012B91,$0EBD46A5,$DF67822C,
+    $D9FA4E21,$AF7EB95A,$81019CA7,$F118A7D1,$00E25EC6,$9B0B29E7,$E2FCB927,$EC11F02A,
+    $857A4DFD,$3497CE7B,$1B949BF6,$9D74BB2C,$CC31CDB4,$E3D0C6FF,$BF00CA8B,$36938DEA,
+    $16B3B074,$CED7D0E3,$6037470F,$CD1DB26C,$6DA23DE3,$BBC94ABF,$5A1DCFD1,$C76974FD,
+    $A05DD149,$F034D809,$A4260013,$B091F3F6,$A5B82EA5,$6786F4DA,$4BAD9D1E,$1E71641A,
+    $B59652DC,$BA576409,$B1BD8C2E,$2D5719B4,$7331073F,$AC568513,$B97F5840,$BF50C523,
+    $0703E2BB,$6764AA1C,$20926CF0,$012C7FD8,$1CC776E5,$9E0C88CD,$995F65DE,$F44F0953,
+    $E86A2170,$1FEF4AAC,$7C426084,$771AD9CD,$2C9938AA,$B8032830,$4A33B3A8,$751E9A5C,
+    $DD63C1BD,$79F790C0,$51157930,$D5F11A7B,$D8646097,$CB6220A7,$D689299A,$879C50AA,
+    $B7C21EE5,$4B1FCC70,$0B08B6E1,$28B2E658,$B295B067,$AB056800,$75ACCB32,$BFB29BE5,
+    $F5D127E5,$6C8E423B,$6B6FFE46,$215C4DEE,$F9DA73BF,$7B41823F,$48D5AEFF,$1405A28B,
+    $BFE2944D,$347590BD,$B45873C2,$B65C3053,$A0BF8F8F,$937BACE7,$1AE8EB86,$40A52BFF,
+    $E24EE849,$D3DE8718,$6C3C1355,$1990D867,$54A08974,$375DACF4,$508B5786,$63FD2580,
+    $F98A7C17,$34C7C1D3,$D0A6B4F9,$3E01562C,$185EF979,$5412D81A,$B5C65D74,$26EDFE3B,
+    $35EBBE0B,$02E61D57,$15CB8395,$0E0F17CB,$FC3F8C53,$5A4DC079,$E0F8FAB6,$5BD3EECF,
+    $E1D4856E,$8AEB7480,$5C3252B2,$AB5567A8,$FB6C6140,$B3E9C017,$EC41FF82,$F064D7A1,
+    $491B8FE1,$A87D5BE1,$10CC22BF,$F6A91404,$0D77242A,$DA602306,$51A7285E,$109C2D17);
+
+  Twofish_8x8: array[0..1, 0..255] of Byte = (
+   ($A9,$67,$B3,$E8,$04,$FD,$A3,$76,$9A,$92,$80,$78,$E4,$DD,$D1,$38,
+    $0D,$C6,$35,$98,$18,$F7,$EC,$6C,$43,$75,$37,$26,$FA,$13,$94,$48,
+    $F2,$D0,$8B,$30,$84,$54,$DF,$23,$19,$5B,$3D,$59,$F3,$AE,$A2,$82,
+    $63,$01,$83,$2E,$D9,$51,$9B,$7C,$A6,$EB,$A5,$BE,$16,$0C,$E3,$61,
+    $C0,$8C,$3A,$F5,$73,$2C,$25,$0B,$BB,$4E,$89,$6B,$53,$6A,$B4,$F1,
+    $E1,$E6,$BD,$45,$E2,$F4,$B6,$66,$CC,$95,$03,$56,$D4,$1C,$1E,$D7,
+    $FB,$C3,$8E,$B5,$E9,$CF,$BF,$BA,$EA,$77,$39,$AF,$33,$C9,$62,$71,
+    $81,$79,$09,$AD,$24,$CD,$F9,$D8,$E5,$C5,$B9,$4D,$44,$08,$86,$E7,
+    $A1,$1D,$AA,$ED,$06,$70,$B2,$D2,$41,$7B,$A0,$11,$31,$C2,$27,$90,
+    $20,$F6,$60,$FF,$96,$5C,$B1,$AB,$9E,$9C,$52,$1B,$5F,$93,$0A,$EF,
+    $91,$85,$49,$EE,$2D,$4F,$8F,$3B,$47,$87,$6D,$46,$D6,$3E,$69,$64,
+    $2A,$CE,$CB,$2F,$FC,$97,$05,$7A,$AC,$7F,$D5,$1A,$4B,$0E,$A7,$5A,
+    $28,$14,$3F,$29,$88,$3C,$4C,$02,$B8,$DA,$B0,$17,$55,$1F,$8A,$7D,
+    $57,$C7,$8D,$74,$B7,$C4,$9F,$72,$7E,$15,$22,$12,$58,$07,$99,$34,
+    $6E,$50,$DE,$68,$65,$BC,$DB,$F8,$C8,$A8,$2B,$40,$DC,$FE,$32,$A4,
+    $CA,$10,$21,$F0,$D3,$5D,$0F,$00,$6F,$9D,$36,$42,$4A,$5E,$C1,$E0),
+   ($75,$F3,$C6,$F4,$DB,$7B,$FB,$C8,$4A,$D3,$E6,$6B,$45,$7D,$E8,$4B,
+    $D6,$32,$D8,$FD,$37,$71,$F1,$E1,$30,$0F,$F8,$1B,$87,$FA,$06,$3F,
+    $5E,$BA,$AE,$5B,$8A,$00,$BC,$9D,$6D,$C1,$B1,$0E,$80,$5D,$D2,$D5,
+    $A0,$84,$07,$14,$B5,$90,$2C,$A3,$B2,$73,$4C,$54,$92,$74,$36,$51,
+    $38,$B0,$BD,$5A,$FC,$60,$62,$96,$6C,$42,$F7,$10,$7C,$28,$27,$8C,
+    $13,$95,$9C,$C7,$24,$46,$3B,$70,$CA,$E3,$85,$CB,$11,$D0,$93,$B8,
+    $A6,$83,$20,$FF,$9F,$77,$C3,$CC,$03,$6F,$08,$BF,$40,$E7,$2B,$E2,
+    $79,$0C,$AA,$82,$41,$3A,$EA,$B9,$E4,$9A,$A4,$97,$7E,$DA,$7A,$17,
+    $66,$94,$A1,$1D,$3D,$F0,$DE,$B3,$0B,$72,$A7,$1C,$EF,$D1,$53,$3E,
+    $8F,$33,$26,$5F,$EC,$76,$2A,$49,$81,$88,$EE,$21,$C4,$1A,$EB,$D9,
+    $C5,$39,$99,$CD,$AD,$31,$8B,$01,$18,$23,$DD,$1F,$4E,$2D,$F9,$48,
+    $4F,$F2,$65,$8E,$78,$5C,$58,$19,$8D,$E5,$98,$57,$67,$7F,$05,$64,
+    $AF,$63,$B6,$FE,$F5,$B7,$3C,$A5,$CE,$E9,$68,$44,$E0,$4D,$43,$69,
+    $29,$2E,$AC,$15,$59,$A8,$0A,$9E,$6E,$47,$DF,$34,$35,$6A,$CF,$DC,
+    $22,$C9,$C0,$9B,$89,$D4,$ED,$AB,$12,$A2,$0D,$52,$BB,$02,$2F,$A9,
+    $D7,$61,$1E,$B4,$50,$04,$F6,$C2,$16,$25,$86,$56,$55,$09,$BE,$91));
+
+  Twofish_Data: array[0..3, 0..255] of LongWord = (
+  ($BCBC3275,$ECEC21F3,$202043C6,$B3B3C9F4,$DADA03DB,$02028B7B,$E2E22BFB,$9E9EFAC8,
+   $C9C9EC4A,$D4D409D3,$18186BE6,$1E1E9F6B,$98980E45,$B2B2387D,$A6A6D2E8,$2626B74B,
+   $3C3C57D6,$93938A32,$8282EED8,$525298FD,$7B7BD437,$BBBB3771,$5B5B97F1,$474783E1,
+   $24243C30,$5151E20F,$BABAC6F8,$4A4AF31B,$BFBF4887,$0D0D70FA,$B0B0B306,$7575DE3F,
+   $D2D2FD5E,$7D7D20BA,$666631AE,$3A3AA35B,$59591C8A,$00000000,$CDCD93BC,$1A1AE09D,
+   $AEAE2C6D,$7F7FABC1,$2B2BC7B1,$BEBEB90E,$E0E0A080,$8A8A105D,$3B3B52D2,$6464BAD5,
+   $D8D888A0,$E7E7A584,$5F5FE807,$1B1B1114,$2C2CC2B5,$FCFCB490,$3131272C,$808065A3,
+   $73732AB2,$0C0C8173,$79795F4C,$6B6B4154,$4B4B0292,$53536974,$94948F36,$83831F51,
+   $2A2A3638,$C4C49CB0,$2222C8BD,$D5D5F85A,$BDBDC3FC,$48487860,$FFFFCE62,$4C4C0796,
+   $4141776C,$C7C7E642,$EBEB24F7,$1C1C1410,$5D5D637C,$36362228,$6767C027,$E9E9AF8C,
+   $4444F913,$1414EA95,$F5F5BB9C,$CFCF18C7,$3F3F2D24,$C0C0E346,$7272DB3B,$54546C70,
+   $29294CCA,$F0F035E3,$0808FE85,$C6C617CB,$F3F34F11,$8C8CE4D0,$A4A45993,$CACA96B8,
+   $68683BA6,$B8B84D83,$38382820,$E5E52EFF,$ADAD569F,$0B0B8477,$C8C81DC3,$9999FFCC,
+   $5858ED03,$19199A6F,$0E0E0A08,$95957EBF,$70705040,$F7F730E7,$6E6ECF2B,$1F1F6EE2,
+   $B5B53D79,$09090F0C,$616134AA,$57571682,$9F9F0B41,$9D9D803A,$111164EA,$2525CDB9,
+   $AFAFDDE4,$4545089A,$DFDF8DA4,$A3A35C97,$EAEAD57E,$353558DA,$EDEDD07A,$4343FC17,
+   $F8F8CB66,$FBFBB194,$3737D3A1,$FAFA401D,$C2C2683D,$B4B4CCF0,$32325DDE,$9C9C71B3,
+   $5656E70B,$E3E3DA72,$878760A7,$15151B1C,$F9F93AEF,$6363BFD1,$3434A953,$9A9A853E,
+   $B1B1428F,$7C7CD133,$88889B26,$3D3DA65F,$A1A1D7EC,$E4E4DF76,$8181942A,$91910149,
+   $0F0FFB81,$EEEEAA88,$161661EE,$D7D77321,$9797F5C4,$A5A5A81A,$FEFE3FEB,$6D6DB5D9,
+   $7878AEC5,$C5C56D39,$1D1DE599,$7676A4CD,$3E3EDCAD,$CBCB6731,$B6B6478B,$EFEF5B01,
+   $12121E18,$6060C523,$6A6AB0DD,$4D4DF61F,$CECEE94E,$DEDE7C2D,$55559DF9,$7E7E5A48,
+   $2121B24F,$03037AF2,$A0A02665,$5E5E198E,$5A5A6678,$65654B5C,$62624E58,$FDFD4519,
+   $0606F48D,$404086E5,$F2F2BE98,$3333AC57,$17179067,$05058E7F,$E8E85E05,$4F4F7D64,
+   $89896AAF,$10109563,$74742FB6,$0A0A75FE,$5C5C92F5,$9B9B74B7,$2D2D333C,$3030D6A5,
+   $2E2E49CE,$494989E9,$46467268,$77775544,$A8A8D8E0,$9696044D,$2828BD43,$A9A92969,
+   $D9D97929,$8686912E,$D1D187AC,$F4F44A15,$8D8D1559,$D6D682A8,$B9B9BC0A,$42420D9E,
+   $F6F6C16E,$2F2FB847,$DDDD06DF,$23233934,$CCCC6235,$F1F1C46A,$C1C112CF,$8585EBDC,
+   $8F8F9E22,$7171A1C9,$9090F0C0,$AAAA539B,$0101F189,$8B8BE1D4,$4E4E8CED,$8E8E6FAB,
+   $ABABA212,$6F6F3EA2,$E6E6540D,$DBDBF252,$92927BBB,$B7B7B602,$6969CA2F,$3939D9A9,
+   $D3D30CD7,$A7A72361,$A2A2AD1E,$C3C399B4,$6C6C4450,$07070504,$04047FF6,$272746C2,
+   $ACACA716,$D0D07625,$50501386,$DCDCF756,$84841A55,$E1E15109,$7A7A25BE,$1313EF91),
+  ($A9D93939,$67901717,$B3719C9C,$E8D2A6A6,$04050707,$FD985252,$A3658080,$76DFE4E4,
+   $9A084545,$92024B4B,$80A0E0E0,$78665A5A,$E4DDAFAF,$DDB06A6A,$D1BF6363,$38362A2A,
+   $0D54E6E6,$C6432020,$3562CCCC,$98BEF2F2,$181E1212,$F724EBEB,$ECD7A1A1,$6C774141,
+   $43BD2828,$7532BCBC,$37D47B7B,$269B8888,$FA700D0D,$13F94444,$94B1FBFB,$485A7E7E,
+   $F27A0303,$D0E48C8C,$8B47B6B6,$303C2424,$84A5E7E7,$54416B6B,$DF06DDDD,$23C56060,
+   $1945FDFD,$5BA33A3A,$3D68C2C2,$59158D8D,$F321ECEC,$AE316666,$A23E6F6F,$82165757,
+   $63951010,$015BEFEF,$834DB8B8,$2E918686,$D9B56D6D,$511F8383,$9B53AAAA,$7C635D5D,
+   $A63B6868,$EB3FFEFE,$A5D63030,$BE257A7A,$16A7ACAC,$0C0F0909,$E335F0F0,$6123A7A7,
+   $C0F09090,$8CAFE9E9,$3A809D9D,$F5925C5C,$73810C0C,$2C273131,$2576D0D0,$0BE75656,
+   $BB7B9292,$4EE9CECE,$89F10101,$6B9F1E1E,$53A93434,$6AC4F1F1,$B499C3C3,$F1975B5B,
+   $E1834747,$E66B1818,$BDC82222,$450E9898,$E26E1F1F,$F4C9B3B3,$B62F7474,$66CBF8F8,
+   $CCFF9999,$95EA1414,$03ED5858,$56F7DCDC,$D4E18B8B,$1C1B1515,$1EADA2A2,$D70CD3D3,
+   $FB2BE2E2,$C31DC8C8,$8E195E5E,$B5C22C2C,$E9894949,$CF12C1C1,$BF7E9595,$BA207D7D,
+   $EA641111,$77840B0B,$396DC5C5,$AF6A8989,$33D17C7C,$C9A17171,$62CEFFFF,$7137BBBB,
+   $81FB0F0F,$793DB5B5,$0951E1E1,$ADDC3E3E,$242D3F3F,$CDA47676,$F99D5555,$D8EE8282,
+   $E5864040,$C5AE7878,$B9CD2525,$4D049696,$44557777,$080A0E0E,$86135050,$E730F7F7,
+   $A1D33737,$1D40FAFA,$AA346161,$ED8C4E4E,$06B3B0B0,$706C5454,$B22A7373,$D2523B3B,
+   $410B9F9F,$7B8B0202,$A088D8D8,$114FF3F3,$3167CBCB,$C2462727,$27C06767,$90B4FCFC,
+   $20283838,$F67F0404,$60784848,$FF2EE5E5,$96074C4C,$5C4B6565,$B1C72B2B,$AB6F8E8E,
+   $9E0D4242,$9CBBF5F5,$52F2DBDB,$1BF34A4A,$5FA63D3D,$9359A4A4,$0ABCB9B9,$EF3AF9F9,
+   $91EF1313,$85FE0808,$49019191,$EE611616,$2D7CDEDE,$4FB22121,$8F42B1B1,$3BDB7272,
+   $47B82F2F,$8748BFBF,$6D2CAEAE,$46E3C0C0,$D6573C3C,$3E859A9A,$6929A9A9,$647D4F4F,
+   $2A948181,$CE492E2E,$CB17C6C6,$2FCA6969,$FCC3BDBD,$975CA3A3,$055EE8E8,$7AD0EDED,
+   $AC87D1D1,$7F8E0505,$D5BA6464,$1AA8A5A5,$4BB72626,$0EB9BEBE,$A7608787,$5AF8D5D5,
+   $28223636,$14111B1B,$3FDE7575,$2979D9D9,$88AAEEEE,$3C332D2D,$4C5F7979,$02B6B7B7,
+   $B896CACA,$DA583535,$B09CC4C4,$17FC4343,$551A8484,$1FF64D4D,$8A1C5959,$7D38B2B2,
+   $57AC3333,$C718CFCF,$8DF40606,$74695353,$B7749B9B,$C4F59797,$9F56ADAD,$72DAE3E3,
+   $7ED5EAEA,$154AF4F4,$229E8F8F,$12A2ABAB,$584E6262,$07E85F5F,$99E51D1D,$34392323,
+   $6EC1F6F6,$50446C6C,$DE5D3232,$68724646,$6526A0A0,$BC93CDCD,$DB03DADA,$F8C6BABA,
+   $C8FA9E9E,$A882D6D6,$2BCF6E6E,$40507070,$DCEB8585,$FE750A0A,$328A9393,$A48DDFDF,
+   $CA4C2929,$10141C1C,$2173D7D7,$F0CCB4B4,$D309D4D4,$5D108A8A,$0FE25151,$00000000,
+   $6F9A1919,$9DE01A1A,$368F9494,$42E6C7C7,$4AECC9C9,$5EFDD2D2,$C1AB7F7F,$E0D8A8A8),
+  ($BC75BC32,$ECF3EC21,$20C62043,$B3F4B3C9,$DADBDA03,$027B028B,$E2FBE22B,$9EC89EFA,
+   $C94AC9EC,$D4D3D409,$18E6186B,$1E6B1E9F,$9845980E,$B27DB238,$A6E8A6D2,$264B26B7,
+   $3CD63C57,$9332938A,$82D882EE,$52FD5298,$7B377BD4,$BB71BB37,$5BF15B97,$47E14783,
+   $2430243C,$510F51E2,$BAF8BAC6,$4A1B4AF3,$BF87BF48,$0DFA0D70,$B006B0B3,$753F75DE,
+   $D25ED2FD,$7DBA7D20,$66AE6631,$3A5B3AA3,$598A591C,$00000000,$CDBCCD93,$1A9D1AE0,
+   $AE6DAE2C,$7FC17FAB,$2BB12BC7,$BE0EBEB9,$E080E0A0,$8A5D8A10,$3BD23B52,$64D564BA,
+   $D8A0D888,$E784E7A5,$5F075FE8,$1B141B11,$2CB52CC2,$FC90FCB4,$312C3127,$80A38065,
+   $73B2732A,$0C730C81,$794C795F,$6B546B41,$4B924B02,$53745369,$9436948F,$8351831F,
+   $2A382A36,$C4B0C49C,$22BD22C8,$D55AD5F8,$BDFCBDC3,$48604878,$FF62FFCE,$4C964C07,
+   $416C4177,$C742C7E6,$EBF7EB24,$1C101C14,$5D7C5D63,$36283622,$672767C0,$E98CE9AF,
+   $441344F9,$149514EA,$F59CF5BB,$CFC7CF18,$3F243F2D,$C046C0E3,$723B72DB,$5470546C,
+   $29CA294C,$F0E3F035,$088508FE,$C6CBC617,$F311F34F,$8CD08CE4,$A493A459,$CAB8CA96,
+   $68A6683B,$B883B84D,$38203828,$E5FFE52E,$AD9FAD56,$0B770B84,$C8C3C81D,$99CC99FF,
+   $580358ED,$196F199A,$0E080E0A,$95BF957E,$70407050,$F7E7F730,$6E2B6ECF,$1FE21F6E,
+   $B579B53D,$090C090F,$61AA6134,$57825716,$9F419F0B,$9D3A9D80,$11EA1164,$25B925CD,
+   $AFE4AFDD,$459A4508,$DFA4DF8D,$A397A35C,$EA7EEAD5,$35DA3558,$ED7AEDD0,$431743FC,
+   $F866F8CB,$FB94FBB1,$37A137D3,$FA1DFA40,$C23DC268,$B4F0B4CC,$32DE325D,$9CB39C71,
+   $560B56E7,$E372E3DA,$87A78760,$151C151B,$F9EFF93A,$63D163BF,$345334A9,$9A3E9A85,
+   $B18FB142,$7C337CD1,$8826889B,$3D5F3DA6,$A1ECA1D7,$E476E4DF,$812A8194,$91499101,
+   $0F810FFB,$EE88EEAA,$16EE1661,$D721D773,$97C497F5,$A51AA5A8,$FEEBFE3F,$6DD96DB5,
+   $78C578AE,$C539C56D,$1D991DE5,$76CD76A4,$3EAD3EDC,$CB31CB67,$B68BB647,$EF01EF5B,
+   $1218121E,$602360C5,$6ADD6AB0,$4D1F4DF6,$CE4ECEE9,$DE2DDE7C,$55F9559D,$7E487E5A,
+   $214F21B2,$03F2037A,$A065A026,$5E8E5E19,$5A785A66,$655C654B,$6258624E,$FD19FD45,
+   $068D06F4,$40E54086,$F298F2BE,$335733AC,$17671790,$057F058E,$E805E85E,$4F644F7D,
+   $89AF896A,$10631095,$74B6742F,$0AFE0A75,$5CF55C92,$9BB79B74,$2D3C2D33,$30A530D6,
+   $2ECE2E49,$49E94989,$46684672,$77447755,$A8E0A8D8,$964D9604,$284328BD,$A969A929,
+   $D929D979,$862E8691,$D1ACD187,$F415F44A,$8D598D15,$D6A8D682,$B90AB9BC,$429E420D,
+   $F66EF6C1,$2F472FB8,$DDDFDD06,$23342339,$CC35CC62,$F16AF1C4,$C1CFC112,$85DC85EB,
+   $8F228F9E,$71C971A1,$90C090F0,$AA9BAA53,$018901F1,$8BD48BE1,$4EED4E8C,$8EAB8E6F,
+   $AB12ABA2,$6FA26F3E,$E60DE654,$DB52DBF2,$92BB927B,$B702B7B6,$692F69CA,$39A939D9,
+   $D3D7D30C,$A761A723,$A21EA2AD,$C3B4C399,$6C506C44,$07040705,$04F6047F,$27C22746,
+   $AC16ACA7,$D025D076,$50865013,$DC56DCF7,$8455841A,$E109E151,$7ABE7A25,$139113EF),
+  ($D939A9D9,$90176790,$719CB371,$D2A6E8D2,$05070405,$9852FD98,$6580A365,$DFE476DF,
+   $08459A08,$024B9202,$A0E080A0,$665A7866,$DDAFE4DD,$B06ADDB0,$BF63D1BF,$362A3836,
+   $54E60D54,$4320C643,$62CC3562,$BEF298BE,$1E12181E,$24EBF724,$D7A1ECD7,$77416C77,
+   $BD2843BD,$32BC7532,$D47B37D4,$9B88269B,$700DFA70,$F94413F9,$B1FB94B1,$5A7E485A,
+   $7A03F27A,$E48CD0E4,$47B68B47,$3C24303C,$A5E784A5,$416B5441,$06DDDF06,$C56023C5,
+   $45FD1945,$A33A5BA3,$68C23D68,$158D5915,$21ECF321,$3166AE31,$3E6FA23E,$16578216,
+   $95106395,$5BEF015B,$4DB8834D,$91862E91,$B56DD9B5,$1F83511F,$53AA9B53,$635D7C63,
+   $3B68A63B,$3FFEEB3F,$D630A5D6,$257ABE25,$A7AC16A7,$0F090C0F,$35F0E335,$23A76123,
+   $F090C0F0,$AFE98CAF,$809D3A80,$925CF592,$810C7381,$27312C27,$76D02576,$E7560BE7,
+   $7B92BB7B,$E9CE4EE9,$F10189F1,$9F1E6B9F,$A93453A9,$C4F16AC4,$99C3B499,$975BF197,
+   $8347E183,$6B18E66B,$C822BDC8,$0E98450E,$6E1FE26E,$C9B3F4C9,$2F74B62F,$CBF866CB,
+   $FF99CCFF,$EA1495EA,$ED5803ED,$F7DC56F7,$E18BD4E1,$1B151C1B,$ADA21EAD,$0CD3D70C,
+   $2BE2FB2B,$1DC8C31D,$195E8E19,$C22CB5C2,$8949E989,$12C1CF12,$7E95BF7E,$207DBA20,
+   $6411EA64,$840B7784,$6DC5396D,$6A89AF6A,$D17C33D1,$A171C9A1,$CEFF62CE,$37BB7137,
+   $FB0F81FB,$3DB5793D,$51E10951,$DC3EADDC,$2D3F242D,$A476CDA4,$9D55F99D,$EE82D8EE,
+   $8640E586,$AE78C5AE,$CD25B9CD,$04964D04,$55774455,$0A0E080A,$13508613,$30F7E730,
+   $D337A1D3,$40FA1D40,$3461AA34,$8C4EED8C,$B3B006B3,$6C54706C,$2A73B22A,$523BD252,
+   $0B9F410B,$8B027B8B,$88D8A088,$4FF3114F,$67CB3167,$4627C246,$C06727C0,$B4FC90B4,
+   $28382028,$7F04F67F,$78486078,$2EE5FF2E,$074C9607,$4B655C4B,$C72BB1C7,$6F8EAB6F,
+   $0D429E0D,$BBF59CBB,$F2DB52F2,$F34A1BF3,$A63D5FA6,$59A49359,$BCB90ABC,$3AF9EF3A,
+   $EF1391EF,$FE0885FE,$01914901,$6116EE61,$7CDE2D7C,$B2214FB2,$42B18F42,$DB723BDB,
+   $B82F47B8,$48BF8748,$2CAE6D2C,$E3C046E3,$573CD657,$859A3E85,$29A96929,$7D4F647D,
+   $94812A94,$492ECE49,$17C6CB17,$CA692FCA,$C3BDFCC3,$5CA3975C,$5EE8055E,$D0ED7AD0,
+   $87D1AC87,$8E057F8E,$BA64D5BA,$A8A51AA8,$B7264BB7,$B9BE0EB9,$6087A760,$F8D55AF8,
+   $22362822,$111B1411,$DE753FDE,$79D92979,$AAEE88AA,$332D3C33,$5F794C5F,$B6B702B6,
+   $96CAB896,$5835DA58,$9CC4B09C,$FC4317FC,$1A84551A,$F64D1FF6,$1C598A1C,$38B27D38,
+   $AC3357AC,$18CFC718,$F4068DF4,$69537469,$749BB774,$F597C4F5,$56AD9F56,$DAE372DA,
+   $D5EA7ED5,$4AF4154A,$9E8F229E,$A2AB12A2,$4E62584E,$E85F07E8,$E51D99E5,$39233439,
+   $C1F66EC1,$446C5044,$5D32DE5D,$72466872,$26A06526,$93CDBC93,$03DADB03,$C6BAF8C6,
+   $FA9EC8FA,$82D6A882,$CF6E2BCF,$50704050,$EB85DCEB,$750AFE75,$8A93328A,$8DDFA48D,
+   $4C29CA4C,$141C1014,$73D72173,$CCB4F0CC,$09D4D309,$108A5D10,$E2510FE2,$00000000,
+   $9A196F9A,$E01A9DE0,$8F94368F,$E6C742E6,$ECC94AEC,$FDD25EFD,$AB7FC1AB,$D8A8E0D8));
+
+  Shark_SE: array[0..255] of Byte = (
+   177, 206, 195, 149,  90, 173, 231,   2,  77,  68, 251, 145,  12, 135, 161,  80,
+   203, 103,  84, 221,  70, 143, 225,  78, 240, 253, 252, 235, 249, 196,  26, 110,
+    94, 245, 204, 141,  28,  86,  67, 254,   7,  97, 248, 117,  89, 255,   3,  34,
+   138, 209,  19, 238, 136,   0,  14,  52,  21, 128, 148, 227, 237, 181,  83,  35,
+    75,  71,  23, 167, 144,  53, 171, 216, 184, 223,  79,  87, 154, 146, 219,  27,
+    60, 200, 153,   4, 142, 224, 215, 125, 133, 187,  64,  44,  58,  69, 241,  66,
+   101,  32,  65,  24, 114,  37, 147, 112,  54,   5, 242,  11, 163, 121, 236,   8,
+    39,  49,  50, 182, 124, 176,  10, 115,  91, 123, 183, 129, 210,  13, 106,  38,
+   158,  88, 156, 131, 116, 179, 172,  48, 122, 105, 119,  15, 174,  33, 222, 208,
+    46, 151,  16, 164, 152, 168, 212, 104,  45,  98,  41, 109,  22,  73, 118, 199,
+   232, 193, 150,  55, 229, 202, 244, 233,  99,  18, 194, 166,  20, 188, 211,  40,
+   175,  47, 230,  36,  82, 198, 160,   9, 189, 140, 207,  93,  17,  95,   1, 197,
+   159,  61, 162, 155, 201,  59, 190,  81,  25,  31,  63,  92, 178, 239,  74, 205,
+   191, 186, 111, 100, 217, 243,  62, 180, 170, 220, 213,   6, 192, 126, 246, 102,
+   108, 132, 113,  56, 185,  29, 127, 157,  72, 139,  42, 218, 165,  51, 130,  57,
+   214, 120, 134, 250, 228,  43, 169,  30, 137,  96, 107, 234,  85,  76, 247, 226);
+
+  Shark_SD: array[0..255] of Byte = (
+    53, 190,   7,  46,  83, 105, 219,  40, 111, 183, 118, 107,  12, 125,  54, 139,
+   146, 188, 169,  50, 172,  56, 156,  66,  99, 200,  30,  79,  36, 229, 247, 201,
+    97, 141,  47,  63, 179, 101, 127, 112, 175, 154, 234, 245,  91, 152, 144, 177,
+   135, 113, 114, 237,  55,  69, 104, 163, 227, 239,  92, 197,  80, 193, 214, 202,
+    90,  98,  95,  38,   9,  93,  20,  65, 232, 157, 206,  64, 253,   8,  23,  74,
+    15, 199, 180,  62,  18, 252,  37,  75, 129,  44,   4, 120, 203, 187,  32, 189,
+   249,  41, 153, 168, 211,  96, 223,  17, 151, 137, 126, 250, 224, 155,  31, 210,
+   103, 226, 100, 119, 132,  43, 158, 138, 241, 109, 136, 121, 116,  87, 221, 230,
+    57, 123, 238, 131, 225,  88, 242,  13,  52, 248,  48, 233, 185,  35,  84,  21,
+    68,  11,  77, 102,  58,   3, 162, 145, 148,  82,  76, 195, 130, 231, 128, 192,
+   182,  14, 194, 108, 147, 236, 171,  67, 149, 246, 216,  70, 134,   5, 140, 176,
+   117,   0, 204, 133, 215,  61, 115, 122,  72, 228, 209,  89, 173, 184, 198, 208,
+   220, 161, 170,   2,  29, 191, 181, 159,  81, 196, 165,  16,  34, 207,   1, 186,
+   143,  49, 124, 174, 150, 218, 240,  86,  71, 212, 235,  78, 217,  19, 142,  73,
+    85,  22, 255,  59, 244, 164, 178,   6, 160, 167, 251,  27, 110,  60,  51, 205,
+    24,  94, 106, 213, 166,  33, 222, 254,  42,  28, 243,  10,  26,  25,  39,  45);
+
+  Shark_G: array[0..7, 0..7] of Byte = (
+   ($CE,$95,$57,$82,$8A,$19,$B0,$01),($E7,$FE,$05,$D2,$52,$C1,$88,$F1),
+   ($B9,$DA,$4D,$D1,$9E,$17,$83,$86),($D0,$9D,$26,$2C,$5D,$9F,$6D,$75),
+   ($52,$A9,$07,$6C,$B9,$8F,$70,$17),($87,$28,$3A,$5A,$F4,$33,$0B,$6C),
+   ($74,$51,$15,$CF,$09,$A4,$62,$09),($0B,$31,$7F,$86,$BE,$05,$83,$34));
+
+  Shark_I: array[0..7, 0..7] of Byte = (
+   ($E7,$30,$90,$85,$D0,$4B,$91,$41),($53,$95,$9B,$A5,$96,$BC,$A1,$68),
+   ($02,$45,$F7,$65,$5C,$1F,$B6,$52),($A2,$CA,$22,$94,$44,$63,$2A,$A2),
+   ($FC,$67,$8E,$10,$29,$75,$85,$71),($24,$45,$A2,$CF,$2F,$22,$C1,$0E),
+   ($A1,$F1,$71,$40,$91,$27,$18,$A5),($56,$F4,$AF,$32,$D2,$A4,$DC,$71));
+
+  Shark_CE: array[0..7, 0..511] of LongWord = (
+  ($16F3A365,$060D838F,$5CAE56F6,$A68857EE,$3C2C4D89,$EBF51635,$88E85BDC,$652174BE,
+   $86C17921,$0D4E9A80,$CFFA58A1,$27BA7D33,$A237B530,$88D9E104,$A4FBE816,$693B8755,
+   $26B254A0,$DAC95918,$FB336AF3,$45C2E369,$7B3E4EF4,$A96E1FB8,$35EB7EF0,$B7578F14,
+   $32056F74,$839AF80B,$C71F277A,$AE37F55C,$FDFF37D5,$A4208538,$AD3CDB6F,$35991E74,
+   $B32A07D1,$BA191594,$2E572B7B,$5344D177,$103FFE43,$E7EFE5DE,$41DE5E5B,$A3796FDC,
+   $5FC882E5,$2CF9643C,$48196D22,$FFDBF6FD,$BBCF780A,$33949DFB,$D0CEC8BD,$7D15679D,
+   $024498B1,$5F5E229C,$62C683CE,$12236347,$3041F7C5,$DCC4DA97,$9032DA44,$0B43190F,
+   $DFC5A6E2,$C05598ED,$7753F4B8,$9E5FD31A,$C0F136FE,$9AFA8243,$F3D61528,$CC4F6B06,
+   $3BC25C0D,$DF38612A,$EDC0C996,$43CF60E6,$F855BEE0,$CFB3D0BB,$ECE28534,$96E071A8,
+   $D909FBC4,$21B7FEBC,$B4C41655,$8ED4628B,$B04CD3C2,$30682646,$94BA1FD3,$B5FF5DC2,
+   $4B7FB931,$75AAC52F,$37AFE641,$E809AD88,$8D42D2E9,$0EB2213D,$61A057DD,$98525095,
+   $70BDE53C,$AA92A405,$C63D6BD8,$7B18E412,$F67C9C1D,$A7DC3E85,$87E33583,$D8618BCE,
+   $A79D3C05,$E34AB487,$73DB312F,$20E397D7,$1D7008AD,$05F13832,$7FB68B63,$17D25B75,
+   $0366D413,$8A7133D2,$00000000,$00000000,$96FE8762,$EAA17F5E,$75176C09,$C101F186,
+   $0488C597,$BEBC44CD,$8C609E4B,$DB9D3073,$DA6F2FD7,$ABC6CD6E,$1F34901C,$5AAF1AAE,
+   $89CA177E,$B00E65F0,$ABF08649,$D47B7825,$5B404772,$924520F1,$D5644188,$1686321E,
+   $3F4A999A,$618425E7,$0D4FF6EE,$E21EDDEC,$A0732D81,$D787C398,$E407FAEF,$1F6DF9C7,
+   $676C0AFB,$79B036C4,$27901802,$0FE64856,$D602959B,$9CF701CC,$AE5A0F7C,$BFE82DA6,
+   $CB729D36,$990639FE,$E525B64D,$CA42E889,$8249BCB6,$B3F2DE4D,$E643625E,$4033DB5B,
+   $4C91A8B5,$4167B230,$C397E2ED,$108BB191,$58269361,$18341323,$927642F5,$541D3B93,
+   $FA112651,$90EDF227,$45569BCC,$1DC52B11,$BAED34A8,$E6BB8CB5,$BD03252C,$D276FBAA,
+   $1A9E1929,$313C4F2D,$E9480C01,$FD73242B,$6A23FC15,$9BAEEB28,$EEA61D85,$C9BE5334,
+   $63E4CF6C,$C70C7209,$3D0E012B,$3EDA077B,$46304FDF,$97B418C3,$111DB2E1,$32C0F490,
+   $E3E9EB6B,$2BA08ED8,$A9B41EF8,$8B255AB9,$50C3ECBA,$91B99B4C,$E2CBA7C9,$FE8F9F96,
+   $8AACC36D,$3A7F5622,$2318DD95,$B15A0C9B,$14B73BD4,$5953A113,$640ADEE8,$F3C10516,
+   $2ADFEEEC,$EDF895BA,$CC9C8CB2,$ADCB4EE1,$911096E6,$DE6C0841,$8E2406FA,$84C312EF,
+   $D1EC841F,$A83A76D3,$EF845127,$1C91427A,$A6BF70A7,$3665A5C9,$797AD645,$F6303D24,
+   $5904DFC3,$CD1B026D,$53A538A9,$1BC8A89E,$DB4D6375,$7EE9DC20,$8F064A58,$51EC03A1,
+   $686764A4,$C4F0C9B4,$9A933D2E,$DD90B3FC,$6CEFA133,$7A4C8D79,$5D8C1A54,$73A746A0,
+   $BC21698E,$0759EAE4,$4474D76E,$C8EA3A5F,$2BFDA24E,$38D784F4,$78589AE7,$231F2C6A,
+   $D4460D2A,$C3A92350,$F75ED0BF,$72F32FCB,$0F0B6E5F,$BD40FF70,$DEE7EA40,$157A89A3,
+   $85A7AD32,$873FA952,$60821B7F,$4D7D41DB,$4ED53004,$1E3990AC,$3AE010AF,$0A177064,
+   $F1928D99,$9311499A,$223A9137,$64751DD5,$5569658F,$FA2ACECF,$7A1C0256,$7C410EF6,
+   $332723D6,$56B5E945,$B2084B73,$6F3604DA,$9D7D2CAA,$E95DC4E3,$C8144925,$13770A2C,
+   $A5D9A4B4,$BC14961B,$B8A9AC19,$B9E5AE29,$C55BBFCB,$F169D7C0,$C479F369,$2446C68E,
+   $3986C4BC,$806643B6,$719FA99E,$7FBDB54B,$B7A2C246,$04A55159,$215C4524,$EE042E07,
+   $B5E65AF7,$5BFB73C5,$2C13B3CA,$0C1AF3EB,$EB0C94B0,$A22D06B7,$127B66F2,$B8B1C742,
+   $E86A40A3,$285C3565,$207E0986,$3B2B3F49,$9C5F6008,$3C72D5AD,$EA2ED812,$770217F9,
+   $439AC6EA,$FC274D40,$C1D37A5C,$4FD5930D,$FE99E3C6,$2E51B6EA,$05AA8935,$6B935583,
+   $F2F4598A,$19607A48,$9BB1718C,$08BFA2B2,$97DCCBC0,$3F8E6E10,$812F68A5,$3983ED9F,
+   $664E4659,$AC9F278A,$98D7A59F,$82CE9160,$7E94C7C1,$C2FD4A3B,$836BF014,$66DDCF03,
+   $06CC5D26,$E1E26651,$E1AD73DA,$74FEAC44,$BF47BD9D,$8D28D936,$34C93252,$62789E5A,
+   $93540E57,$81322ADD,$4FF77CA6,$CB1681E2,$6EAB3982,$2512AFE5,$B6808EE4,$D18A4017,
+   $560FB19C,$705BFD1D,$7671B81A,$4B70C254,$D720D939,$49D81082,$AC1E97CD,$E0B60F3A,
+   $6B01B0B7,$4E81FA66,$E7612EFC,$951CCA15,$F0B0C13B,$463E58D4,$9E1BF8B9,$632CF731,
+   $09C73379,$5CA29921,$D3A81CAE,$F764544F,$AF7843DE,$6AC73CE8,$DD813E53,$9F0BBA71,
+   $24F6CC11,$85977B84,$BE65F13F,$5807C878,$0E2922FD,$686FEE3E,$CDBEC010,$78E45FAF,
+   $B98BE0BB,$6CCABF67,$69452806,$11DFD8FA,$5287740B,$CEE7B9D0,$25D480B3,$50B86ACA,
+   $A315F992,$5DF6F04A,$A896525A,$5E0A4BF7,$0B83ABC8,$03FCBBBD,$1E16DCBE,$8F800BE0,
+   $17D1EFC7,$D32292C1,$B16E9F60,$E5473708,$D28A500C,$224B4501,$FFBBAF64,$FB7EA7A4,
+   $368DAAE3,$3D26BCC6,$2F7567D9,$866BC039,$0C6DBA4C,$3731CCA2,$9F39B41B,$B603E67F,
+   $E08F3F78,$A1D1BD0A,$2D31FF68,$D935E2A5,$6DCDED91,$AF639C37,$AAD2CAEB,$0154696B,
+   $800D2407,$ECACFCD1,$6F897520,$F03DBEAB,$A1516123,$02A8D2D6,$D82BB766,$F498EFF2,
+   $FCDD7B77,$710F9476,$F43804AC,$F8821C19,$5EEACE47,$F9D67572,$F977F242,$1A9CC1F5,
+   $8485E190,$5210B81C,$13592A50,$6D9ED60C,$CED81403,$F2956C7D,$19F8CD3A,$BB4D7CFF,
+   $CA50D194,$4C2928B0,$18DA8198,$6E626DB1,$1BBC558B,$E4135E63,$7CD05F70,$9DA368A7,
+   $572DFD3E,$A574EC53,$3163BB67,$09EBCBD9,$DCA372F1,$4A24AB3F,$4712037D,$429B098D,
+   $99F5E93D,$57E1802E,$8B8E8FCF,$EF50476C,$4A5DF593,$A085D461,$07EE1184,$34CD771F,
+   $C9360587,$C6581B62,$F51A480E,$2DAD0D57,$08E57FDB,$898D886F,$0AA1E76A,$D6D3AAF3,
+   $40FC12F9,$76567E92,$3E68D538,$B4AB34A9,$289B765D,$B2A6B726,$15957776,$8C7CB05D,
+   $38A4881E,$554952F8,$01224CA2,$D52F114E,$95985371,$60D04C8C,$29B93AFF,$6789A668,
+   $544B292D,$2F05DF81,$5A620BD0,$476A31BF,$72F97D8D,$F5CC8699,$7DF213D2,$488C79E9,
+   $51E1A018,$44968A02,$6528924A,$26EE1458,$1C52440F,$D0DE297C,$C2B5AE4F,$C5A4A0DF,
+   $42B88A48,$29085C0E,$743520AB,$142EE0C8,$493B2180,$2AF4E7B3,$4DB3E417,$9448A37E),
+  ($05BA30CE,$E2795BA1,$F5E0FBDD,$65B5D634,$64DD8C55,$2D7D7F14,$ADD1C20B,$EEFBF778,
+   $F11968E7,$1EB0FBD1,$CE30CD8D,$E6073F45,$CCB67E90,$21FFD3CD,$A750A262,$DF0941CF,
+   $B75EF18A,$C61DF5B1,$9DC337C6,$C5C7DEFA,$073C83D3,$2581B729,$167173CF,$A5E97513,
+   $381526B9,$DD3673BD,$F91EBB93,$E8BAA1EE,$F625EB34,$3B314CF8,$D5FC5DF8,$579D4BC8,
+   $E7681B28,$BB598EC2,$80708794,$C8A06B1A,$6E5CEC3C,$1C8FC9A3,$0807D374,$F60A5A3F,
+   $3A9395A4,$1ACE9F35,$7AAB2CEE,$7E9E5038,$D0466D36,$B5E41069,$B92602D9,$8CEA6EE3,
+   $8AF1E7FD,$F952DDAD,$1BCC9075,$B19A748D,$B2E4C144,$2464AE10,$F4A35829,$FCC9A070,
+   $A06C21B1,$FA88F6E6,$D105CEC2,$2C98662D,$D77AEEE5,$9065A740,$AAED41D8,$CB7A4051,
+   $4AB9D923,$55A279BA,$98790708,$27BE855B,$52B059BF,$BABC97FB,$DDFB8E8C,$A19711F7,
+   $CB8AFD43,$047E64E4,$C90C4E5E,$C386886C,$281B7551,$C422C7C3,$15B46326,$FB6DEFDF,
+   $B5D84297,$01E51939,$9C809432,$5CBBA8BE,$09447080,$6F762C7B,$D4BFFE0C,$CEE13D8C,
+   $FF619BB4,$54476083,$BC9C3217,$6E933542,$0E78F353,$4AF79B52,$B49BE163,$98996F7D,
+   $6823CC1B,$A07208CE,$3012F5CD,$2B3C2982,$FDE728A9,$93BF8C0B,$E62BB8DC,$2225F886,
+   $CF736E79,$7F7B4901,$00000000,$00000000,$9F4584DB,$023F3272,$5BF4293F,$D5CABB80,
+   $E1173B0F,$07A44FAF,$4CC6F904,$E95FB8D7,$04F9933A,$7B052DE5,$7716CF54,$6AED51A6,
+   $E8534B8F,$68D263D4,$BE1A810A,$A96BD9CA,$DB84AEAB,$1D6AD09A,$1DB3B052,$0D67B5E0,
+   $ABAEE22C,$52063615,$93BBC495,$8F3045A8,$4647996D,$D8AD0E60,$EAD5F892,$AF2A8F5C,
+   $BF5922FE,$3017AF8E,$F2DC780E,$4034611D,$D2C0DE2B,$721CFCE1,$1A8F3381,$28E602C9,
+   $2F27F682,$E1A370EA,$AF577116,$29031BF0,$100E53E8,$1914B47E,$60241F6F,$567852F1,
+   $9BBC17E1,$793A1F97,$1809809C,$EF1EEE41,$14F7C0D2,$6211999B,$7E52BFD4,$059B7DDD,
+   $D841BE42,$43EE4A56,$E910E87B,$F1AE1590,$95C4E4B2,$33CD84C5,$BBA0B1C4,$4B12826B,
+   $D3837DDF,$EB608AA5,$796E3C07,$201ACAF4,$2CE2E66B,$BF27EA26,$570A6971,$58C5CC5A,
+   $5E4E19F1,$37B3E021,$215F05D1,$AB54EBB8,$26638602,$8ED55C91,$2BDE65B8,$9AA65D0F,
+   $C4B1ADE4,$D7F589F2,$34EB66F7,$50390467,$23D9B6CC,$6CAC0730,$81332460,$51DC1D5E,
+   $272025F6,$17A92AD5,$13CB4301,$47902EB2,$8F4BD733,$1B2B860C,$702A4C87,$4F6CE68F,
+   $6167BC9B,$CF0424B5,$0143A3F4,$997C7644,$B121D1AD,$7AE034DC,$C6371EF9,$100D657A,
+   $FCA48B5D,$0AC3FA4F,$1288E0F5,$DEEC58F6,$2DA1459F,$265B9C62,$8DCD642E,$DCD36A84,
+   $51754956,$E4380D37,$ECAAD8B5,$13D74E31,$417B1ABE,$FD2CB949,$83B5977D,$9624F1D6,
+   $A6130196,$4675378B,$497CC9CA,$0B26E376,$47043A99,$41D17824,$B0627259,$E39C4298,
+   $FE223840,$CD3B16C7,$AC9261FF,$7787813C,$24E5351F,$492DB019,$C84FEDAA,$5AFAFE28,
+   $583139D6,$8B4E214C,$4BFA7AD7,$CCDE0FFE,$194A2368,$76629805,$E5EEA835,$7CA1624A,
+   $3E6A069E,$61CBB2D0,$913D7788,$48C8A920,$114DF01C,$8068C23A,$0F3B50A7,$D38BED16,
+   $201CA625,$32289DFC,$5649CA85,$C1B9BA1E,$874C0447,$ED21DC33,$42BE0A57,$A3A82385,
+   $7D97AF3D,$5B1FE711,$A2EA92AC,$3D701A6E,$67189CBC,$73F9E5D8,$E05498FB,$9ED839EB,
+   $E2D22BE6,$5920D563,$1F35034F,$CA9F5968,$73EF5C6E,$11E87C43,$366DD5EA,$97C1E8EF,
+   $C0483EDE,$ACF0A417,$BAE31230,$D26EF42F,$067F2027,$BCFDC16D,$993AA4FC,$BEC2F31F,
+   $8C8EC7DA,$45AF1CC0,$0A816069,$31F2B6B7,$F39FDBFA,$D9481759,$E4AD0BC1,$E5DD140E,
+   $3CECB583,$A6335E58,$DCB82D78,$38EB67B3,$229A1538,$F5D07174,$B61D527E,$5F6183F5,
+   $82F63489,$0F588792,$92F86761,$164C33EC,$3956854D,$444A05F9,$A495B28B,$818DDB03,
+   $EF6FC85C,$4D53D4FD,$0CFE404E,$8D0F77DA,$DAC70D5F,$8416A6DE,$DF7D3D91,$666FFD7F,
+   $FADBAB7A,$B63E3B22,$C38D2E37,$F2743EDB,$A3A93158,$A40C6C2A,$558CDA6C,$9F3D20D2,
+   $6BE6DCF2,$FEF69202,$4E404A19,$2EA7545F,$31515639,$B2405FC6,$53F3FA4B,$23C0E1BF,
+   $3BD03650,$83B2E971,$54CF7998,$06415696,$CDF5DD64,$B883A589,$43FDA9A3,$3AD455C1,
+   $483F6A3E,$925A9532,$94874746,$AAB1F281,$974257AF,$F435684D,$907ED47C,$D1B4DF64,
+   $69606FEF,$390E7E8A,$25A696EB,$D051C65D,$659E2FA1,$B4010950,$A86BF2C5,$0C82ACD9,
+   $72ACFF9A,$88940A07,$76556CA0,$F39127E2,$5F0DBA05,$AECF9665,$2A9DC64C,$03DA2B4B,
+   $3DAF1677,$3F4F281C,$74D3DFBD,$3469CB6A,$5CC8AAEC,$F04B0CA9,$44C12A70,$1F55E2E8,
+   $5AB78ACB,$4CB6CDC4,$E3918812,$C05CA327,$A9285131,$95FEDA9D,$782D9FF3,$B966BCB0,
+   $8934F714,$A7D64761,$7169EF73,$D61090CB,$F85D1867,$71C6D7AA,$329446D0,$ECC4C50A,
+   $4038B94A,$6450CF0D,$6D99FCD5,$420B536F,$33D7E524,$75B8B34E,$7CD40CC9,$C2639155,
+   $D9021DB6,$DA923C12,$C5F20E10,$4E89FFB6,$D6394D11,$0919D104,$EDE97B41,$8AAB3875,
+   $0BC2C39D,$A88EC0F3,$4F03E9ED,$B7DB221B,$0286B31D,$C7F8EC88,$FB98088E,$2F424D66,
+   $9AFFB415,$E04669D3,$887754E0,$3EAA3125,$03C510E9,$5E849ACC,$8E0874C7,$8257F048,
+   $B3A762B0,$BD18D854,$848914AE,$B3A546FF,$7F111C20,$9CE70B99,$1732D03B,$3C950357,
+   $7BE88F1A,$E7E2267C,$A12F8245,$63F480A2,$8BB24409,$602EABE9,$1CF013A6,$941BC3A4,
+   $6AA57F06,$678AE446,$59729A22,$12325708,$9601F45B,$6D491E09,$2958D6A5,$5D5EB187,
+   $0DBDE3BA,$1473019E,$F76648C0,$A24D3ABC,$6F1F4FC8,$85F3BFE7,$63E10F86,$08FCC83D,
+   $860FA7B3,$745DAA77,$62A2AC72,$9180BE79,$F05ACB13,$87CC8D95,$2E645576,$78DF06AE,
+   $A5D6117F,$18F1AD47,$C10B9D2A,$358CD253,$372E761E,$0EBD9EAB,$BDDF91E3,$F7EF4306,
+   $4D855AF0,$7023CE93,$EE2C6BA8,$D42FA2B9,$EB965B66,$3656F918,$CAC95EB7,$9D0212A0,
+   $85CAB75A,$2AD930BB,$45828984,$862994AC,$5036EAA2,$7D447B73,$AE14D2E2,$B07F6DB4,
+   $C2CE8DC3,$6B08489F,$9E06272F,$9B434436,$75907C49,$AD15BD2E,$6CDA5F21,$DB77252B,
+   $665B3F48,$EA85939C,$35A8C503,$C9457223,$B865A12D,$159618A7,$5D8B0918,$69377AED,
+   $C774BD0D,$8971133E,$1E76A0BB,$53E32F2C,$3F29A56A,$F8B7C494,$DE3E9E65,$FF138B3B),
+  ($FDABECC6,$7C6A2EB5,$752BBEA0,$401CDA0A,$56DC57C4,$19252171,$01D70787,$56DEC6D3,
+   $73C6AC58,$41C751FF,$A92CB5F9,$C9067697,$AAA0BC85,$3391C917,$0E742AFE,$AE0A9A4C,
+   $162A62F4,$AA8CA972,$2935DF99,$5AA19391,$FE27E5BA,$86FD9135,$1D3F538E,$FFCA074B,
+   $24CDFC1B,$0E3CB65D,$7FE9885D,$4384B2E0,$8DE149E2,$C73AC0CA,$45972EB4,$48E5BC76,
+   $6EF9FFD6,$BE0D56B4,$C0EF5F50,$200E6D05,$597F7ABD,$E1F17DEE,$0C2F2405,$0243E31F,
+   $2741F567,$F4AB09DD,$47CC204F,$E4ACC525,$B83CC272,$348F92C3,$1F645D75,$53837E18,
+   $CF4C7229,$D8DA319A,$ECBB9B4D,$81E3CAE1,$EB818E32,$D6E687C7,$8E6D409E,$3DAD7F4A,
+   $F053CF44,$28F70B79,$437A3C4C,$493E3783,$461B27C8,$B27203F6,$FFF0E23D,$D02357E6,
+   $6F2EF851,$E8D39067,$D49E335F,$26CBBD24,$7B5F945E,$EE164046,$49B80AB1,$4AA65F69,
+   $5487593F,$B56C5822,$570B5043,$4FFBE7A2,$3C93B411,$0ABA8563,$E5F5A4CC,$78EC1D8B,
+   $15A66B88,$501B16F2,$D27321A7,$271036D1,$F769DA3B,$7FF2465F,$BED1D08A,$35541936,
+   $7A8893D9,$B8C88695,$E2CFB1B3,$2FE950AD,$094E3F81,$F90FD76A,$EEE095B6,$2DAAB3B2,
+   $5C1E6139,$1ABD499B,$28E2D81E,$0C7F5542,$79049AA5,$425F3915,$95BF01E8,$C3BCF3F4,
+   $526A4BC7,$B4B7D3D7,$00000000,$00000000,$2AB9D6E5,$A0362C11,$8C364E65,$91E40619,
+   $6B98E452,$454162C1,$6A4FE3D5,$139FA412,$06ED12F8,$01DB8BF5,$B648E88C,$9A85088F,
+   $9CF13E69,$3AB3249E,$E143B8CF,$D57EEF2D,$4CD91135,$B1EA6B1C,$E9DA80C9,$7AAFFE94,
+   $04B61C03,$AD92F2A6,$207BE018,$A3AE44FB,$65ECCEAC,$EB4BF88D,$9F7D3715,$C0249B1E,
+   $1A0546F1,$A8CF4A6D,$8B0C5B1A,$C6E14B3F,$BBB0CB0E,$CE182D43,$17FD6573,$FC526FA1,
+   $C2B451AB,$8C471456,$025B0EFB,$AC497953,$185E480A,$0486333E,$5031453C,$18FEAA84,
+   $2C54C41D,$A1EDA7E4,$14716C0F,$06C5D021,$1EB35AF2,$055DB8CB,$412132B7,$E5774ED0,
+   $B413E677,$36CC71DC,$67B7C057,$470281DE,$251AFB9C,$58E2708E,$1CE85409,$A914C198,
+   $40F63530,$B3A98803,$BF06D70D,$638ADFE5,$3A7EA6E9,$0B610E96,$86F47898,$927C6EF3,
+   $719DA2A3,$ED8E28AC,$CBFA6E2A,$7548C33C,$35DD8B90,$F3B55209,$C4594353,$8D9C9FA3,
+   $A68F9880,$31D22A08,$2E0FCAE6,$0DA4DEB7,$C8766756,$8FDF7CBC,$3BA9A16E,$5DBFC845,
+   $CE9B75AE,$8E04F749,$E094BF48,$83A029FE,$32E79EEF,$A4B01F2F,$486F0D36,$1C7899BA,
+   $AB77BB02,$654F0FC4,$FB46FE3E,$7DB1A540,$134B7970,$51C09D07,$A50391FC,$CB459588,
+   $8242649B,$3FEE9C55,$1BD24176,$FE118CBE,$C13858D7,$76D0ABD6,$316B9793,$5E27A0AF,
+   $8395631C,$69305A86,$9A1C2C91,$3B68AF6B,$9BCB2B16,$6DB669B8,$3825A812,$A72877C5,
+   $F532D4C0,$D3BB3F0C,$97E40F13,$6FF58AA7,$9EAA3092,$96FA5DCD,$E80D874E,$2C713847,
+   $81CE6DE7,$C57923D5,$FA91F9B9,$2B6F6393,$365182EC,$0922ED89,$AC4DAE7D,$324A42E2,
+   $74FCB927,$16C21CD9,$9468066F,$95623527,$EF379231,$7B747561,$6D75F6AA,$449AE934,
+   $21ACE79F,$F5708228,$23F7E964,$5939FB7B,$E318B634,$7937967E,$F208C1BF,$84BE722A,
+   $30BC9014,$08F9667C,$7DB286A6,$EFCDCBB3,$3EC8BAEA,$A6F3FC30,$6301DC54,$EA907378,
+   $B9EBC5F5,$62515410,$F3DFC638,$D260B4F9,$AE16A086,$9E033BB1,$90DE1A6C,$38F0C781,
+   $93521310,$C2677801,$EA5689B5,$80384114,$B0A5FA74,$9B5E837A,$2D83C39A,$F7336137,
+   $A0628A78,$3009A1FD,$E7AEAA37,$D4A564D8,$05611B84,$FB4C3475,$2FD8CD61,$5B7A1864,
+   $CA2D69AD,$239605EF,$0FA32D79,$F8D45C9F,$704AA524,$BB50EE7F,$96330894,$392B4C74,
+   $2220EEE3,$0FE73DA8,$B2FEF48F,$3717FA29,$33309968,$F26ED9FC,$ED6C9CCA,$D73D0C32,
+   $C363562C,$DA99D285,$DB3D1E26,$DE1FE1BB,$DF8B0225,$738D131D,$F6BEDDBC,$292C808C,
+   $62D6DBD3,$BC4EB5AB,$0AC236FD,$039868EA,$B79FEF0B,$CC5BCE5C,$4A3403CD,$B031E0E9,
+   $87237F1F,$C4A2A820,$58A87D3A,$B72FBB3D,$08993806,$AFD111B9,$857871E4,$68EBD173,
+   $A4D4967B,$9D9B535B,$69C3EAA9,$E9081B92,$D3A42620,$71CEF002,$80196A60,$93A7E506,
+   $DC070B59,$891AAC9D,$7E3E8FDA,$155A7433,$51E642BB,$4E206C57,$9847226A,$9721D638,
+   $6CA2F12D,$12442FE7,$DE5C05A2,$2553D5CE,$2696F2E0,$A275CF0E,$D8B1175A,$24885E3B,
+   $A7589F07,$670CECDB,$CD177CD2,$749348C9,$AD9AA9FA,$64948431,$FC7CEB41,$2AB4E866,
+   $4BE3044A,$E6EF263A,$4D0E16B2,$E734ADCF,$8ADB5C9D,$903F8DEC,$3F1FBD6D,$F02D3AE3,
+   $D96610DD,$725698E8,$4E821FCE,$1DA3124F,$7211ABDF,$1719972C,$6660C7D0,$11DC470D,
+   $7770B05B,$EC55A359,$6814ED2E,$BFD6DD41,$073A157F,$57054D26,$44402933,$1E3B7AA5,
+   $3786856B,$5FFC2B5A,$B329F308,$61C93CFA,$84AF7663,$3E3517A0,$2B6ED162,$F6E8EAC2,
+   $608DD528,$1007CCF8,$A1B58DFF,$66D7672E,$D0282F5C,$8B594F82,$42AD3BCB,$1FE0F150,
+   $4F551849,$4B7DD49C,$5DC966BE,$4C638F48,$BD5DD9F6,$CFC3A6B6,$615AD2AF,$46D90A2B,
+   $F4E5D347,$8565F9DF,$92851497,$94B9BED2,$038C097C,$FA97BF80,$7C658121,$B9130D60,
+   $D7123A23,$DC5C02A4,$CCC07B55,$224D8E1A,$F8CAF742,$87261AC0,$C9A160D1,$D901BA6F,
+   $10C7700C,$AB572287,$C6024DA8,$21D5E6F0,$BA67CC89,$98C6EB90,$E679ADB0,$827BA20B,
+   $BC8ADE71,$991D6065,$0B15317A,$5546AE39,$340A8C17,$A56B94DA,$129C7EF7,$071E5BD4,
+   $5F926845,$E02AF61B,$8FBA4719,$6B73B999,$DDD00CDE,$DFC46A4E,$C7D54A2F,$770B2023,
+   $F184C8C3,$7E29CDAA,$76A7B7DC,$BA8B658A,$A2398483,$9C40D8AE,$A8FBB27E,$9FD8B044,
+   $C58E44D4,$DB425970,$53BD4C40,$E2691504,$88805266,$3C76F4BF,$39F2AF95,$F1F6B116,
+   $0DF82382,$549D25CC,$5B247446,$4DB804BD,$D6C53DA4,$8A82C477,$19894F8D,$5258F5ED,
+   $91091DEB,$6E2E0152,$999025ED,$C1FF10EB,$643BC92B,$BD953E5E,$AFC1A701,$C8DDFD62,
+   $3D44B396,$5C6443B0,$9D2639EE,$6C6DE24D,$78D39D22,$1481FFC6,$F91DF0C5,$D1F8DC13,
+   $A3EE8304,$CA9E1E7D,$D1FF28DB,$DD878951,$B5C4E1F0,$6012B70F,$5AF373C1,$1B66C26E,
+   $55505EB8,$E3B29EF1,$D54934D8,$70157BF7,$E422A34B,$2E32DB58,$895755E1,$6AA8326C,
+   $5E456FC2,$B6F430C8,$1110778B,$FD89E454,$DAEA19A1,$88C12768,$B172FDF3,$CD8045A9),
+  ($6655B742,$99183E61,$A50D6860,$B2872032,$060528EF,$0946F63B,$141EF07D,$36612B9A,
+   $DD49579B,$0634DA84,$486C8A57,$FC9C9E9B,$744E6FD0,$A63FE3C0,$D8B46BF9,$F1515758,
+   $CD5197FF,$3E82559F,$2BC40177,$92E12D26,$5A7752C5,$C3BB433A,$5183267A,$21C3852A,
+   $CF528F09,$39130725,$2DC12998,$9BA7DB1D,$873E055E,$C58F99BE,$8F32656C,$D9D42449,
+   $8CCA71E1,$27F75FAE,$A8FC3430,$59B91019,$CAAFB36B,$CE768AF9,$F0887E03,$9D930199,
+   $F3706A8E,$63B07A7E,$A70E7096,$B5167288,$E967D22E,$40CC1A28,$79BF3380,$4D01D3EB,
+   $6456AFB4,$9E896CDB,$C75EEF3B,$2548BAD2,$AB0420BD,$A79A6BFE,$BB1CE0D9,$9F2CE4E5,
+   $82C3393C,$32EA1462,$F7765A97,$6D67DEFF,$B31080EB,$83775912,$4E69A2B8,$F5DA68A0,
+   $98D4819C,$11967434,$4D91B635,$0BF91347,$7DB90399,$43D6776A,$7FBA1B6F,$444725D0,
+   $2E393D15,$6584A0FA,$121BD892,$3F27DDA1,$DAB7730F,$F6C005E2,$73B04B44,$56CB3CA6,
+   $F1737278,$642128C4,$35D589CE,$BF4AE9F1,$EE99F6BA,$B038C54E,$9123EDD5,$F47FE09E,
+   $69A7F3E4,$75B75CF0,$1FEA84C2,$D419ED8A,$B4EEA47F,$73838674,$EF62FAC1,$498AEC13,
+   $8EC96917,$20660D14,$3FDAF10A,$A48006BC,$55851663,$2F1421AB,$92DBF958,$0A5C9B79,
+   $567D02EE,$D1375A4C,$00000000,$00000000,$17E6E4F0,$C842507D,$9320F523,$F3EEB224,
+   $C8ACAB9D,$C9E7D843,$DCB25BE0,$FF86F3D9,$78443FFB,$B4B3FAB6,$31D3B9D7,$B19D4D70,
+   $26355D27,$79DF1D0D,$23C86145,$8EBA90D1,$3BDCC113,$AA57A23D,$83383547,$CB583D3F,
+   $50782A01,$D871AC77,$9F2AA508,$E162AB52,$1018C064,$38B68F1B,$1A17B8A0,$237C6056,
+   $3DD9E9FC,$A3115406,$FF7A3AA5,$713C6308,$D54537A9,$1A6F6773,$D94F6782,$08E37E05,
+   $80C021CA,$357B46D8,$283C15FA,$6CC256C1,$15E5FC06,$CFD302C7,$7E411714,$BDF50C8D,
+   $6FA2DB0B,$7CF1AACB,$E56D8205,$5240035E,$6DA1C3FD,$7B60F871,$DF4A4F6D,$01A5883E,
+   $19EFAC2D,$DD5F1BB1,$3824D59E,$5474D9DA,$DB4C7F74,$0F722CBF,$459DD607,$17A2AEB0,
+   $CB54BF10,$37C4A3A4,$853D1DA8,$C21ECB04,$A2F34CF4,$4273FF54,$1BECB4DB,$DACE490B,
+   $F5754261,$6AF68C45,$342E85B5,$46F8C0AC,$6E59D770,$85438396,$F8841E31,$81C8BC6E,
+   $84C611D3,$3BACE259,$479ECEF1,$1033FC0A,$080C6032,$1C5BBDF7,$B6EDBC89,$7412D4CE,
+   $70485FC9,$A8E84741,$37D69138,$B8DBBB4B,$020318F6,$079152BA,$6BA4EB12,$72260E4A,
+   $60509FAD,$905EC85A,$1E1188B9,$2DABC4D7,$89374D83,$D092D272,$B8E4F454,$610F9F02,
+   $4B949EDA,$02BFE57C,$29C71981,$95707F9C,$BCE2C44D,$6FD83B83,$3E21FD71,$5D322FE1,
+   $5F8A6EA7,$34DECEE6,$5E7162DC,$CD6CE7BB,$4A6F92A1,$FB0DCC21,$8ACF590E,$2EB1A995,
+   $C6A5E340,$DCFA938F,$BAE7ECA2,$669ECDB8,$0E0948DD,$151D4BCC,$9726C53A,$FD3916A5,
+   $77B67B5D,$581C9827,$0A0F78C4,$1BCAEF4D,$527B32F7,$DFE0FECD,$0C0A502B,$128C1976,
+   $B113981D,$84E60BA8,$86C50925,$3C3DB0E3,$FB7C0ABC,$7FEBC789,$B0E89466,$7D5422F5,
+   $8B345575,$D70380C8,$A308408F,$BBC1D609,$0BF474BF,$E278C610,$AAFF2CC6,$5E2842A3,
+   $2A3F0D0C,$6B53047B,$05FD3C62,$F7658DDC,$F28B66F5,$9A025323,$685CFF9F,$8C0575AD,
+   $FD792253,$76AD31B2,$BEE1DCBB,$68496939,$243645D1,$7E4E4FB7,$D6BD2324,$E44C1C94,
+   $EA9FC6A3,$BEEF61CF,$BF1AD0C0,$91FB4064,$4997862C,$052EB7C6,$7BBC2B76,$4A908151,
+   $FC822E28,$8F1F18EF,$5B8C5EBE,$3A096A67,$4466DA7C,$EE1087ED,$53803E8C,$2652D790,
+   $203075C8,$7099EB36,$CCAA9B84,$C7307CC2,$E16BB21C,$5C97A7DF,$AEF91CDF,$50FFE622,
+   $B716B0F2,$8DA0FD93,$61AB93D6,$69ECE107,$161DE88B,$31F07920,$D3401F46,$13299148,
+   $94DED1B7,$031A6D42,$813B2DB1,$CCC96F85,$D14307B0,$14B8C3F2,$FA8706C7,$8659EED4,
+   $7C420FE2,$BA645E37,$88CC41F8,$2920FB2F,$25CD49AA,$87FC66EA,$4398FEE8,$1EE4588B,
+   $0FF244A6,$ECAF6291,$DEB14316,$F817A163,$A0F05402,$45E2ADEE,$27CE515C,$806D3450,
+   $ACFA0429,$576EB498,$E090BE67,$A5258E82,$21CB79B3,$892BC26B,$63A88B20,$6E7DB3BD,
+   $ED61E237,$4E1BBEA9,$39DFD9E5,$ADC6F087,$6A5FE769,$8B942717,$764D7726,$A1AEB17A,
+   $A4F6641B,$4B35096F,$C55DF7CD,$22D9E868,$E76E9AF3,$55D151E4,$BD19C836,$966A12DE,
+   $90D8E1AE,$0DCDC9C3,$4C6ABA4E,$F24B3A1A,$1814A056,$24ED32EC,$724B473F,$AF7915FB,
+   $57860E95,$28857311,$2FC2316E,$9C3689A7,$EB64CAD8,$475D4892,$E6959688,$AC6378B9,
+   $A907384B,$A00B3944,$13E0D4E9,$C695F4FC,$C957A7E6,$3055F11E,$2C3A25E3,$6215F240,
+   $8D317D9A,$DE4576F3,$F48E4E1A,$9344A518,$6C5ACF86,$82D2D12C,$9B2C9511,$EFB50FD3,
+   $4665C28A,$E981D557,$75B563AB,$5F8DCA9D,$33D0A121,$B60C1FCA,$03F8148D,$FE237BE7,
+   $547E1A18,$D6A608F6,$E89CDE55,$B97E3375,$1DE99C34,$D388BF30,$E368AAEA,$5B06F565,
+   $07FE2494,$F0F4DF66,$9AD7996A,$1607268E,$AD010852,$AEDC9DC5,$4060EA65,$E0C7236C,
+   $D2BB133D,$EA9BB815,$FE8136DE,$888E4A55,$3C22E587,$5AA37D5B,$11E3CC1F,$C104A646,
+   $71B353B2,$515A6E1C,$58744A33,$C42A1180,$22336D3E,$7708B98C,$1C12904F,$2A3A966D,
+   $B515A804,$8A31AF29,$D0B80BCB,$ED0AEAAF,$C15BC7D4,$2C0E4CE9,$4F92AEC3,$0C6841FD,
+   $B91FF82F,$98BDB65F,$9CD2B185,$1F41D0B5,$7A47270D,$B322A80C,$9D29BDFE,$E6F3F9E8,
+   $B2EB8C90,$7AC5704F,$AF0210A4,$A94DCF7F,$F97F124A,$787A9533,$C4A6FBB6,$DB6BC135,
+   $96DDC941,$048B3FF8,$992F8DE7,$E8245D69,$D4BE3BD2,$E3DD4E2E,$5C727A2A,$CAFDB501,
+   $EC9AEE4C,$B7A997F4,$4263F293,$E75671D6,$C358DF22,$2B9F1E53,$9ED1A973,$18D0820F,
+   $E4968E7E,$ABF22A03,$E293A691,$A2B4DC38,$65ADA3CF,$673B4586,$01FB0C7B,$F9B2295D,
+   $C2A3D359,$D22D370E,$6253875B,$97CF9AE0,$04063019,$0ED7A481,$3028B5AC,$482F642D,
+   $CEA98372,$C0A12E78,$322BAD5A,$4FBE3697,$419BE61E,$19750A31,$362D9D43,$41699216,
+   $C0A0CBAF,$D5BC65B4,$09F76C49,$E5E994AA,$0DF15C50,$EB3E302B,$F68D56EC,$94D5F7A2,
+   $3A27CD68,$53E58B60,$598F4648,$3D9838DD,$67AEBB39,$60AA173C,$D7462F5F,$1DFE35C9,
+   $A6F57CED,$4CA45BD5,$A10B5879,$BC5084B3,$9525DDCC,$FAA8441F,$5D897651,$334F9C5C),
+  ($83ADF27E,$DA1687A8,$578D9F22,$E35C9378,$1637FA40,$303CA453,$74B20375,$A088321F,
+   $9ACB95E9,$C9863F3A,$7D0B0ED4,$5FCF47C5,$E1280B4B,$4AA211E4,$871D1289,$E1A4C9BA,
+   $59F03A4F,$49266647,$E3707BCA,$ADFB36ED,$1F8EF7E1,$CF7BD189,$8F882792,$9735559E,
+   $F84E6CDC,$5932A976,$F547818A,$9DC792BE,$85456208,$06FDEEB3,$1EA2CF5B,$46AD3877,
+   $1543B27B,$5EB36AA4,$D1BCB511,$8B2EB33C,$E598EBBC,$71105FF6,$6F8C1463,$5441AD84,
+   $646D6943,$4C5FFF57,$F633C9B1,$F3485C49,$9D0F3D25,$9CBBBFDF,$67192178,$22D031A0,
+   $2213A4ED,$CA024899,$63A9C18F,$19627FB2,$DA5DC831,$9330E1EF,$19666797,$1390B892,
+   $9893E568,$2EDF1833,$D3E4C590,$6C779435,$8281CAC4,$53C06E56,$6B3CF494,$6FF3E396,
+   $61F1B10E,$FE3B58BB,$60DD89B4,$77EDB145,$D0908DAB,$02F85AC2,$712EDB38,$12EC95F3,
+   $FEA6FCAA,$85D9C06D,$6285F935,$90B4964C,$26A3441A,$F1B0068B,$5D40DAB8,$72942855,
+   $C5D33FD0,$5C4B3066,$AD9B837F,$5D371D07,$2167ECD6,$A48D866E,$504937EE,$B661139D,
+   $A4228EDE,$A27068DD,$E4B4D306,$F8C6B608,$3EE91B37,$6BF657E7,$8B38C765,$AC871B8C,
+   $B4FDE4E8,$4EA7A595,$97C278BF,$0D7304F2,$38018B41,$B71D3EFC,$5BA84ACE,$AE7F414E,
+   $33E0F661,$AF036C2F,$00000000,$00000000,$7F537E55,$B89660CC,$F1F7617D,$A675DCAC,
+   $4426BD2F,$610490C7,$3094BE5A,$C18CA2D8,$CD460ACB,$2ADAAC42,$1A122FAC,$7D1F7665,
+   $654151F9,$C58916A9,$7897D699,$EDABE029,$204BD46C,$2D5B6F90,$32CCCEDB,$26D585D1,
+   $25D70C21,$9F3FC87C,$DD9960FD,$C60D610A,$C33BAFA6,$80A0597D,$F9625466,$D0E44088,
+   $367C2E2C,$1D67CBC3,$480368C3,$2C2742F1,$012C38BA,$89D6E9FE,$2D42393A,$E9AE5458,
+   $392DB3FB,$3ECBD702,$E89106EA,$B5E5643E,$DEED28C6,$A882AFFD,$DB71F08B,$1AE60811,
+   $B215749E,$924CCC8E,$B1613CA5,$FCC30279,$13AB220D,$825803BF,$3B75C37A,$D992F00B,
+   $F2832946,$C8FA125B,$2BAAA94C,$35453D43,$8CFC6FA9,$F9BA9B69,$FB3A24E7,$37BD6781,
+   $4FC7C00F,$791AC214,$24FB349B,$16E92182,$EBE54ED1,$DB6AAAC9,$533D7FD5,$D8EEDD6A,
+   $725A9303,$7C635B04,$07C4A8CC,$553D80E5,$184A5F2D,$9A46516C,$F46BB930,$14117B40,
+   $8EA41F28,$1EE3BC60,$5A847274,$27A9A8B0,$9BE7AD53,$4050D6C4,$9F574DA4,$7BE298D6,
+   $56A1A798,$6A8A7A86,$0C25D5EC,$4D23D236,$A1BE5693,$1014CF31,$059CD84D,$B264A7EC,
+   $959A083E,$EA2A23FB,$4EEBF8B5,$F0CC2BEA,$0895351B,$76919C24,$12871AB7,$0B8EEA41,
+   $76EA73F4,$47D11516,$42CE2D59,$BDEFF9DC,$A50EB664,$2BA68123,$3D9D530C,$05799910,
+   $02587081,$E7592709,$A8075B32,$EF53BAEB,$DCB55847,$4FDB88F4,$0374483B,$6E8FCEF7,
+   $C9F6EA3C,$1168E250,$B3394C24,$1B9A2570,$8DD05713,$706C7297,$467ECDAE,$865DB7CE,
+   $EAC9766B,$52BC4337,$3A59FBC0,$504419F5,$84695AB2,$8F2B074D,$2C6E0180,$6078BDA6,
+   $233F9C57,$43D4A167,$2F1A49BB,$0EF77351,$FF8AC410,$0C0F2993,$8960B7E4,$4BDE3C85,
+   $A92B6388,$66855315,$41BA6562,$D360372B,$9006D073,$584E8417,$7002E382,$9B3A7C0D,
+   $492F5079,$A5F1AB0F,$1DD68760,$2822F680,$CE3242F0,$445562B5,$0E7DA56D,$AA7AF53F,
+   $E9BD3E50,$3C338DC0,$04B0E0F7,$3BB24E12,$C4FF076A,$D59DD998,$0ACD459A,$91C8BB2D,
+   $96EE4005,$84A5ED0C,$AEEFCB44,$33B8D3F0,$D7542567,$57C5DA27,$C6A777EB,$32C4FE91,
+   $43E215E3,$34391022,$B5D1DC52,$C7714C6B,$51650F54,$3FB7FA63,$2E367101,$87219AAF,
+   $7376ABB9,$F5B5B2FA,$F3AF11FC,$412CFBA5,$06E89076,$DCEB691B,$C78B4F51,$BB12176F,
+   $35086617,$73E80534,$3FC5238D,$E220BE19,$D50C55E6,$B09CFD2E,$171BC2FA,$B9EA4DAD,
+   $4D9FB08E,$9E43E51D,$93729848,$36C14AE0,$B6A59469,$A9FE829C,$55D5EFA3,$0405B471,
+   $7ACFA618,$0AF2C720,$A2CA1EA8,$7E9B01C6,$6EA02CD9,$DD97447A,$ED0DDEA7,$0781C3D2,
+   $278F7CA0,$7866EF75,$912AE8C9,$D1986DE9,$4A5B1842,$CB7E65F8,$CF1E7A4A,$CD838B4B,
+   $663519C2,$AB06D85E,$ACB7BBC5,$D4E1F4F9,$D929800A,$FDBF2F18,$9E7B751E,$F2347128,
+   $2A8691F6,$BC93D4BD,$81F582FF,$3D4FA0A1,$AFC3F3FE,$BA6E3A0E,$40965DD8,$5AB6DED5,
+   $FDD2B491,$EB560E9A,$C217971C,$0976B083,$10DF6A36,$ECD7CD48,$0F519DD7,$23AC1CC1,
+   $FA161C5D,$BE6B8E7F,$CA82A207,$7FE72CA7,$58DC02F5,$C0F08FB9,$F71FF10B,$7A9EB5B7,
+   $99BFDDD2,$A709F1CD,$54F9D719,$8DD35D8F,$3CB16BB6,$8CAF70EE,$BA804185,$E4DD50AA,
+   $7BE39EA2,$83242EDE,$C8DAD286,$98BE0BAE,$EE79969C,$690E0D25,$5F18AA39,$95CD0F5C,
+   $BF1C99C8,$56B9F746,$D805B8B0,$7469C6E6,$B9F409BE,$8A529E5D,$6A10CC2E,$E6250A68,
+   $F0DB59C7,$2FA33552,$4B7720F8,$42A88C06,$BBAC793F,$6D0BB954,$0BE17D20,$181E52D3,
+   $925EA0F2,$BF17A31E,$37501696,$94B1223D,$450A8595,$E8D27939,$A756C6E5,$CCFFA62A,
+   $BC68D1F3,$383639B1,$C04FE79D,$EE2F978A,$CC6A3271,$A30C45BC,$E6ECA387,$1F9F9101,
+   $BD44E949,$B1E0D04F,$E25C4370,$242DDF13,$9C23059F,$156D5621,$69648415,$88AAC49F,
+   $FCFE8C2B,$6280E764,$BE30A172,$DF6F1EB8,$D2C8FD2A,$E5A17DCB,$EF55AE26,$E0D8E4DB,
+   $94B63084,$63FCCA05,$1CFABFDA,$A1F41F7E,$759E3BCF,$295EDBE1,$C163DF27,$67F97E74,
+   $B8D83104,$038477A3,$D6781DDD,$DE1333D9,$6CF85C58,$3ACE6373,$7C27366E,$D619AE3B,
+   $28DEE177,$5BCAF3B4,$6DD464E2,$B3188A8D,$5E349283,$1C1BE6A2,$6848BCAF,$017C2D61,
+   $EC21E61D,$8E572A2C,$CBAE9ABD,$F631C559,$AB731309,$81DC741C,$09B90DA1,$FF4775DA,
+   $80D9BA45,$B499495F,$4752F514,$0F8B5E30,$D4206D5C,$394A14D0,$77C64B4E,$CE07FCE8,
+   $1B3E1716,$F4C99F9B,$0D09ED56,$C4F53BC8,$884C8F5E,$C208D57B,$AA5F2BB3,$080A9DE2,
+   $7E7F46EF,$31408932,$34245EAD,$FA3EECCA,$B789ACD3,$20286B62,$B04D041F,$7515EB87,
+   $5211476F,$51383494,$11F3528C,$650124B6,$4CB38834,$17950CE3,$A67AFE5F,$45294FD4,
+   $DFC1107C,$21544603,$31B886E0,$485A4B26,$86312A33,$68722044,$79BBEE23,$647D09D7,
+   $8A14FFDF,$2551F272,$146F8AC1,$D765835A,$29F2D9CD,$D21C1A4A,$A0926E29,$99C226CF,
+   $5C6CE202,$FB42C1AB,$E00433F1,$C374F81A,$E7C09B3D,$964978FF,$A3E62612,$F74DE838),
+  ($B0592C6A,$74B87B36,$FFB4B81C,$3D82D75D,$15267825,$88842467,$7ED4E5DE,$DAF2D8A7,
+   $0E53F9C7,$FEB11865,$59226B06,$BD2D1AEA,$DBABB191,$26CE87F6,$EB66BD0A,$32772ECB,
+   $C5104C8C,$D4BBF82B,$0C4E03A1,$05535772,$32D0F6FD,$EF5BE62A,$5D186ACA,$BE1C84C4,
+   $65A1643C,$ACC7E4A5,$19687B84,$8DD77315,$3C830F3A,$11EAFE4F,$A358AFE5,$04EF8E68,
+   $534B930D,$40AD9CA1,$855A5C0E,$E44191D4,$809420F1,$6001D20B,$173B8243,$73666B70,
+   $E728BEAB,$372479B9,$5F0590AC,$45FECBD3,$1301838F,$7057F55E,$A1455583,$FF0DC17F,
+   $10E804DA,$0CC467B8,$FA7AC4E3,$B9C29482,$754960E6,$A003831D,$BE0AD5AD,$8A096353,
+   $D9B64BF7,$DD2CC8E1,$52BFEE3E,$C7DC4150,$21D17572,$9F0C1374,$4C041323,$35A93E8D,
+   $2D9F76D3,$9A5F4406,$BC172FCB,$71EB2C44,$14D20516,$0FF5F996,$B4632DA6,$7789E518,
+   $E97B476C,$C99561DC,$6BF29DFB,$5276FCC0,$4BD795BA,$4A0B3245,$9E2FDDEC,$9274ADD6,
+   $4799961B,$4F586537,$4DF06E10,$B2D8E37C,$5685EFF2,$C4EDDF7E,$E2E6C254,$B3643A66,
+   $6A06E0C8,$D5072131,$111C79E9,$8BB5BA49,$6455190F,$2BB63954,$0627FBAA,$F8D3D139,
+   $F3FABBBD,$38D1802F,$729AE67F,$DFA18FD5,$E88F3A5F,$4EE4BC2D,$12F5FEBC,$F72628AF,
+   $189C06B7,$0AA6AEE4,$00000000,$00000000,$8EC7D936,$9EB0CA6E,$4257EAE4,$CB1826E8,
+   $20250841,$187DCE85,$5EF1ED9F,$C28F1622,$F1E741DB,$C333CF38,$F8673E85,$4220DB95,
+   $76A0E7B3,$DC9011FB,$9395A37E,$10562755,$C70DB6EA,$2F59B73C,$89145FAF,$E112C6A6,
+   $0DBA7E92,$82228A83,$681B1AAE,$2EE56E26,$CB43B54B,$2A0AE04E,$F4293D24,$47738CE7,
+   $D22BCECF,$A7DD935B,$CD644EE1,$D2D93177,$91885918,$EBB46842,$BBC4A952,$0E49208C,
+   $79076347,$A550D46F,$FC5D3F49,$411145BB,$2E76F186,$E6CCD6E0,$E4C139FE,$4BB7EB5F,
+   $7F2098ED,$5D830556,$394D73C5,$95AABD90,$DF91B05D,$25FF19D8,$AEE2D177,$86CD04EB,
+   $043A01CC,$03319E2E,$371E8A02,$6B1BA5F5,$1B7581E2,$76353C02,$23CC8F14,$64EE5C63,
+   $D03634A9,$5C3FDC4C,$9C32278A,$6996E2C1,$BA30D461,$8938FD7D,$A48B297C,$7B4D82A0,
+   $F20EC68E,$BFA05DDE,$1D527A48,$8EE6ED3B,$2F828CB5,$61BD0B11,$88E0229C,$66631B57,
+   $CC9033D2,$55A8EC86,$837DA7A4,$1C9240ED,$9FDBA0DF,$15057027,$C4E431BF,$53CA25DA,
+   $6E3CE104,$D636BF1F,$ED4146A0,$CAA4FFF2,$A0B128B0,$787C1C8E,$CAB7C878,$AD7B3DBF,
+   $A57F544F,$FC3C5F51,$41BE6DB1,$B78BB40E,$B67ED7C0,$8C6BAA0F,$4E19E945,$CE4B719A,
+   $A93157EE,$F96F0823,$ACFF2B11,$7D2F4BFC,$FB8EB9D0,$3EB34973,$2238F227,$E39F8192,
+   $D7E5B230,$239DD084,$8747A668,$1FA3DEC3,$F99343B6,$C5510664,$466DEB28,$C829B8C6,
+   $AAD8D0BB,$85FC9AC5,$EEA8C1F5,$B6376D14,$8AFDD8FA,$9D815440,$F7C0BA71,$3BE01E01,
+   $2BB88D79,$628C953F,$3F6A886F,$6D796CA9,$AD0B5622,$FA5E960D,$2A4CF04A,$E5FD48CE,
+   $81605DC2,$E7700FFA,$6C211B62,$2DD4F008,$78F31E74,$2221099E,$D1C2499A,$DB4E01BD,
+   $16CFFF70,$F417B681,$EA92C039,$B506F33A,$6FC89C37,$514762EE,$25EB74BE,$9C3D8D5A,
+   $5CEC17F9,$396D5935,$E53544CD,$CCC636AE,$B78AAAF3,$0B1A77FE,$3AA4F490,$E9392F76,
+   $6DD56651,$AAA52DF9,$5B3F9160,$46CF55FD,$D611CF03,$A4EC0D75,$619B65F0,$AFF67A8B,
+   $E312BF67,$3415E797,$0B9D8538,$7AF15BBA,$09807F5E,$811314AD,$01F47D33,$8771DDF1,
+   $3D777209,$969B23BE,$6272E2A5,$D365E86D,$736E9B4C,$58D05224,$FDA9427A,$C660984A,
+   $63869F96,$5414359C,$95B258D4,$E885F66C,$8CDA2350,$65528579,$907C242B,$6CC5B5B3,
+   $944625E7,$6FF42B9D,$F5DD4017,$C0025116,$DE65CD6E,$A28EC429,$84AE213D,$63304C25,
+   $07D38699,$7FA20CC8,$29A5771F,$996EDA28,$241F098D,$1B4C50AB,$28510A2C,$1E1F07D9,
+   $4470114E,$33CBF7D1,$E6DCC398,$B055A448,$86B3DB5B,$98D20332,$36EAF731,$EC6A7804,
+   $DA5FCCA2,$A1BF5A07,$FE40C52F,$BAF30AAC,$1A81FCD1,$F144E1F3,$2602F3EB,$E0AE1FBC,
+   $30CD0C9B,$14B9A93D,$DC783708,$596C8B3E,$33248BCE,$682A3BDB,$556C68A7,$B87E4D98,
+   $A696D31A,$80AFCDB7,$67BC9E5A,$5725ABB2,$9A15DC20,$914533F8,$7B1A9921,$5EB29B78,
+   $AF16AC44,$01BCD91A,$5ACBEC53,$C1BE880C,$99FC5B75,$EDD6A11E,$AB2CAD88,$028D4734,
+   $B244D60C,$8F5A3421,$ECB53B93,$4DD52203,$54981594,$3F0F9069,$CE8DC9B4,$AE4AA391,
+   $483E12EF,$3698A0A3,$B9D95334,$F5AB6F9B,$B3B0AB3F,$082BE9D0,$C95E4F2D,$D1E8AF59,
+   $D5F84856,$D87F9F93,$3B5089A3,$6E48F287,$70871C19,$2443C0C2,$49CA6FDC,$B1E97D52,
+   $03E98755,$7C9392E6,$A2ACD2D6,$839E5399,$8F33A405,$19C1179F,$DD8C4A3B,$DE1D56CF,
+   $D3DFB3FC,$20AC4EAA,$8B09A5C9,$1AF089B1,$58D61635,$3A5CC71B,$F0133CE8,$444212C9,
+   $B82D2E07,$72DAB26A,$43A397D7,$4C69FB19,$B1AD5159,$F3C9A6C7,$2C6B0BE0,$1D2E99F7,
+   $45846C7D,$B4BA2A20,$8D2E5E63,$E2235888,$606F18C3,$2887A77A,$C6F9CBD9,$A8286ACD,
+   $D40C3565,$5F0E4262,$9DC65AB9,$EEE73F30,$8289DA97,$9BE39D1C,$9BE1A113,$1634EE09,
+   $3E9EF55C,$EA08B158,$9261DE4D,$9727FAA4,$C337B726,$2C682912,$E10F4501,$CFF7A880,
+   $34F70D57,$17883713,$74BD1DD5,$27725EEC,$EF5CBCC6,$3146B0E5,$1CA6077B,$099730CA,
+   $1EBBFD1D,$F2757FDD,$98082646,$6AA77CEF,$5156696B,$BB4FD3B6,$C8AA321E,$569972A8,
+   $7173612A,$A3321D33,$C0DE3073,$50FBBBF4,$D84236C4,$5A5D1510,$0A69F80B,$FD80864B,
+   $A762AE29,$07DE1046,$7D3D628B,$A6614A41,$C12A4D40,$D78A6605,$27F68ED8,$67DFC24D,
+   $F634C742,$BC91C3F0,$6648E369,$D0547643,$4FED9476,$493AAC6B,$38B90EF6,$12DB6061,
+   $69EF679D,$A994B3D7,$7CC91FB8,$211097B0,$404A1082,$30FA69FF,$50A21458,$3C3E0E47,
+   $1F4F802E,$7504A22C,$05CE7CFF,$844043DF,$B5975095,$F0F838E9,$A8C52ADD,$7E1ED5D2,
+   $35037064,$90F9EAE2,$0874026D,$0662C95C,$965BDF81,$9416648A,$BDE352F8,$F69AF1B5,
+   $BFFEA89E,$0D78BEA2,$CF79B487,$293B7E60,$7AEEE412,$D9C34689,$021DFA66,$FBE24F17,
+   $97AFA2B2,$1367B97B,$C2C3CA15,$AB19F4E3,$E0FB3832,$48867571,$313971A8,$93C874CC,
+   $0FA784F4,$79C0C594,$4A23E889,$CD7AEFB4,$577192C1,$439C028F,$77549A80,$5BE1CC0A),
+  ($78656928,$714D28D7,$84F64F7C,$C88A7C6B,$AB89AACA,$EC43CAC5,$10DC16A3,$777FA381,
+   $E4213B5C,$0F7D5C87,$F3A1EF51,$73F051E5,$C330D541,$EA714193,$E016C4F3,$95E5F3DA,
+   $95A0E173,$63D37380,$8FF379D6,$9825D66F,$48F45338,$E8CC38A1,$25F06BB0,$A840B0C0,
+   $5F748735,$944135C3,$247AD31C,$74661CAA,$ACD56864,$E7B16426,$6E6F0589,$D1E689DF,
+   $C1D150EC,$A73DEC47,$427BDD3E,$64453ECF,$5B43789A,$0ED99A9E,$C05BE840,$7B1B402D,
+   $6FE5BD25,$0DC025B5,$4E22293A,$3F183A28,$160A6CA1,$A0ABA108,$05BD4703,$46BE0337,
+   $B2B10F6E,$86DF6E94,$9DCEEAD8,$A216D83A,$EDC5885B,$129E5B57,$9C445274,$7E307450,
+   $A8E297CB,$7D29CB7B,$0EB871A9,$1611A933,$5EFE3F99,$486799A9,$5828459B,$9FB39B20,
+   $D10D464F,$D0424FC6,$F79610FE,$E968FEB8,$64E08B8F,$5D6F8FB1,$AE34EDC9,$AAFDC9F2,
+   $8BC48679,$02BD7932,$BB55BC69,$9B3C6944,$2AC2A2B5,$6277B599,$0DD34CA8,$877BA88D,
+   $A531DB63,$FA5263F6,$974164DE,$2E9FDE54,$D8E9F548,$CDA14816,$76DD1881,$675C81E4,
+   $743C9D2C,$2A102C30,$7DD82E2B,$37F32BE0,$901DA670,$256D70B7,$BD83C66B,$4CE86BCD,
+   $0B0536AA,$50AFAA04,$9F2F6F75,$EF5A75EE,$44ADA73C,$B3913C46,$D9634DE4,$1187E47C,
+   $EB13F259,$C54A59DE,$00000000,$00000000,$BF6243C6,$01A4C619,$BC097EC7,$90CEC7A7,
+   $91971EDC,$F94BDCDD,$814B087F,$8E347F5C,$60D77420,$C7F720EC,$F61CA852,$354E52D2,
+   $497EEB94,$34EA94CB,$4D49143B,$AE723B96,$FE72A3F9,$F48BF968,$CD88A4E8,$FC60E8A0,
+   $409A5893,$2909931B,$1FEEDFA6,$BD48A6D8,$7181DA2F,$6CAE2F07,$79EFD184,$AD6B84BD,
+   $55FB0933,$18C833AD,$CC021C44,$204644CA,$269B56B1,$392AB17E,$857CF7D0,$14ACD001,
+   $6236F18D,$8ABB8D38,$204D2CB3,$EEFEB3F7,$75B62580,$F636805A,$CB5EDEEA,$2BB4EA29,
+   $DFB537E6,$C653E6F5,$B5EDCDC0,$8D2DC077,$156151A0,$31C1A0B6,$2EF55D1A,$F8EF1AC4,
+   $D65184E1,$DBB0E125,$51CCF69C,$82509CF0,$4FA89196,$E33E9642,$352C7D13,$DF3F1341,
+   $3E294BB9,$8F90B945,$66010E22,$10232265,$4A15D695,$A5809575,$1C85E2A7,$2C22A766,
+   $C46C17EF,$E183EF70,$F22B57FD,$AFD6FD8F,$BADF04C5,$471AC52E,$02E185AD,$4D4CADD4,
+   $036B3D01,$916A01BE,$FFF81B55,$28AD5502,$C2BA6DED,$3657EDF9,$5AC9C036,$D2FF36F4,
+   $A26D19CD,$F1A0CD15,$5D950298,$D90D9817,$CAD46646,$F7924643,$BEE8FB6A,$DD826A73,
+   $D3ECC3E2,$9D0EE212,$18B21D08,$B6BA083B,$C5E6AF43,$3DA5431A,$33FA0711,$08EB11C8,
+   $5C1FBA34,$052B347D,$45271F90,$6FB7902C,$52A7CB9D,$133A9D4E,$FA455C56,$6E135635,
+   $4CC3AC97,$725497FC,$29A99FB4,$F31DB427,$39758917,$846217A6,$6A58FA26,$4B7E2682,
+   $F8A4D9FB,$235FFBE1,$F92E6157,$FF79578B,$6933C727,$DA14273C,$DD54B24B,$8B1F4B21,
+   $6C8E8024,$9CAA240B,$086E0BAB,$C1C5ABBA,$8A4E3ED5,$DE9BD558,$A3E7A161,$2D86617F,
+   $942A59DF,$BFF5DFEA,$C9BF5B47,$66F847FD,$AD5FD0C8,$3B97C84C,$F1406AFC,$3EBCFC31,
+   $0F32C905,$CA370559,$2F7FE5B6,$24C9B6AE,$6D043888,$408C8861,$88AFBB78,$93D7788C,
+   $EA994AF5,$196CF5B4,$0437FFAF,$9A98AF5D,$0A8F8E06,$8C89066E,$1156AE0F,$AB590FEB,
+   $06D67A02,$D7D40289,$9873ADDB,$E4A8DB0D,$83AA8DD2,$C378D288,$892503D4,$4FF1D4E6,
+   $B9B439C4,$D670C490,$FD199EF8,$65E1F8D6,$96CBDC72,$F2B9723E,$CF692145,$B12C4574,
+   $63BC4921,$569D2152,$2D9E601B,$69851B7A,$50464E30,$5E76309A,$EF240DF6,$5FD2F683,
+   $E2F7415E,$D8A95E0E,$F0CAD250,$E29A505B,$D4B0014C,$96FC4CF1,$E9F277F4,$8806F40A,
+   $3FA3F315,$53B6152F,$B686F0C1,$1C47C1C9,$DA0870E5,$80EDE5C2,$8D12FC7B,$D5697BBB,
+   $72EAE72E,$FDC42EB9,$075CC2AE,$0BF2AEE3,$47C69A3D,$22FB3DF8,$C835E3EB,$BADEEB97,
+   $018AB8AC,$DC26AC6A,$A08C9C60,$BCEC60C1,$E6C0BEF1,$4231F153,$9EA5D7D9,$337CD984,
+   $0C59F404,$5B5D04E7,$4B9F6E39,$79A6391F,$80C1B0D3,$5212D336,$2C14D8B7,$B5A3B710,
+   $232611B2,$7F94B249,$B1DA326F,$17B56F2A,$879D727D,$59E07DD5,$7C529687,$EBD5878A,
+   $7757A02D,$BB7A2D8E,$34A6C5BF,$0319BF2B,$DB82C849,$5CCB49A8,$09E4B307,$1DE307D0,
+   $E19C7C5F,$49C35FB0,$571A8C9E,$55849E79,$7F39AB86,$7ABF8634,$37CDF8BE,$9273BE95,
+   $13B72BA2,$E615A23F,$92FC23DD,$6821DD63,$B33BB7C2,$5AF9C2FE,$68B97F8B,$06328B56,
+   $8E79C17A,$44037A05,$EEAEB55A,$83F45AE9,$DCDE0AE7,$5739E74B,$1A5398A5,$FBF6A5EF,
+   $2711EE1D,$E50C1D14,$DE3F8F4A,$1A754A9F,$F4FD2DFF,$7802FF06,$4110E03F,$F52F3F71,
+   $A4BB63CF,$2674CF9C,$A10624CC,$60CACCAB,$700B6283,$B088836D,$7EB3132A,$A6992A5E,
+   $9A922876,$A9E476D9,$A65AE662,$6B386248,$3CC8CE14,$C2DC1491,$AFBE5565,$76DB6598,
+   $21C7941F,$32D81F9D,$73605F82,$21E282D3,$B70C486D,$C0616DA3,$1E64670A,$616E0AB2,
+   $CEE399E9,$6D0AE91E,$1BD92009,$27D00985,$464C2291,$FEDD9192,$311B82BC,$45A7BC1C,
+   $E878CF58,$54205860,$A9682F67,$A10F6711,$30913A10,$99811076,$14EBE90C,$EDE70CDC,
+   $C7072AEE,$70E9EECE,$8220357E,$1F5E7EE2,$28232718,$2F3B184D,$D2667B4E,$41284E78,
+   $F5779553,$A424536C,$22ACA91E,$A3B21E23,$36474012,$4E5512FF,$3D4276B8,$1EFAB8FB,
+   $56903432,$89A23213,$B0508AC3,$CB93C340,$AA031266,$306566AF,$D53AB9E0,$4ADAE09B,
+   $3B940CBA,$C92EBA72,$8C9844D7,$094FD7D1,$678BB68E,$CC058E0F,$3270BFBD,$D4CDBDA2,
+   $B83E8168,$0A5668FA,$B467756C,$510B6C1D,$43F16592,$B86392A5,$E37DF9F2,$048FF264,
+   $123D930E,$3A330E55,$FBCFE4FA,$B235FA5F,$FC932654,$B9C754BC,$7A84EC85,$3C018503,
+   $D087FEE3,$0C64E3AC,$7B0E5429,$E0272969,$D7DB3C4D,$07964D4F,$656A3323,$814923DB,
+   $99F91577,$388E7767,$1938A5A4,$6A9CA451,$615DCC8C,$1BD18C86,$93769B71,$B4077109,
+   $3A1EB416,$15081618,$59A2FD37,$4395374A,$5471B19F,$C4EE9FC7,$38FF31BB,$5844BBCC,
+   $532D7331,$CF1C3124,$A7D05ECE,$B71ECE22,$C68D9242,$ACCF42A4,$6BD2428A,$97588AE8,
+   $9B1890DA,$75C2DAB3,$E74A065D,$9E175D39,$1D0F5A0B,$F0040B0C,$EC4F30F7,$CEB8F73D,
+   $2B481A19,$BE5119F3,$E5AB83F0,$D35BF0ED,$1780D40D,$7C8D0D62,$8617CAD1,$85C6D1BF),
+  ($7B66F2A4,$B1C74212,$D7A59FC1,$CE916098,$2406FA70,$C312EF8E,$D81403D5,$956C7DCE,
+   $18DD9520,$5A0C9B23,$1A480E8B,$AD0D57F5,$87740B01,$E7B9D052,$2ED81268,$0217F9EA,
+   $F8CD3A06,$4D7CFF19,$572B7B67,$44D1772E,$E65AF72E,$FB73C5B5,$84512705,$91427AEF,
+   $E4CF6C85,$0C720963,$732D8117,$87C398A0,$FE87620E,$A17F5E96,$8E8FCF1D,$50476C8B,
+   $9C8CB225,$CB4EE1CC,$91A8B59A,$67B2304C,$D2CAEBCD,$54696BAA,$6BF01437,$DDCF0383,
+   $79F3690F,$46C68EC4,$CBA7C942,$8F9F96E2,$F5E93DB9,$E1802E99,$C179215A,$4E9A8086,
+   $6764A427,$F0C9B468,$94C7C196,$FD4A3B7E,$83ABC8A2,$FCBBBD0B,$63BB6784,$EBCBD931,
+   $C882E546,$F9643C5F,$41F7C5FC,$C4DA9730,$13B3CA97,$1AF3EB2C,$3E4EF4FB,$6E1FB87B,
+   $4498B1F0,$5E229C02,$2C4D89C3,$F516353C,$F97D8DA9,$CC869972,$E57FDB2A,$8D886F08,
+   $612EFC2F,$1CCA15E7,$FC12F9A5,$567E9240,$32DA44EB,$43190F90,$AD73DACA,$FEAC44E1,
+   $65F13F8C,$07C878BE,$E3358322,$618BCE87,$DFEEEC72,$F895BA2A,$3A913758,$751DD522,
+   $21698E7C,$59EAE4BC,$BA1FD3FE,$FF5DC294,$39B41B5C,$03E67F9F,$D1EFC7C9,$2292C117,
+   $808EE4A6,$8A4017B6,$8F3F78B2,$D1BD0AE0,$BC558BF6,$135E631B,$28924A60,$EE145865,
+   $AE56F6CE,$8857EE5C,$00000000,$00000000,$CA177EED,$0E65F089,$269361DB,$34132358,
+   $CEC8BD4E,$15679DD0,$16DCBE9B,$800BE01E,$CF780AE1,$949DFBBB,$DB312FD1,$E397D773,
+   $1126513C,$EDF227FA,$2723D674,$B5E94533,$B73BD441,$53A11314,$C683CEFD,$23634762,
+   $8A500CBE,$4B4501D2,$6E9F603B,$473708B1,$E010AF26,$1770643A,$8C1A54B6,$A746A05D,
+   $933D2E31,$90B3FC9A,$31FF68EF,$35E2A52D,$68D53833,$AB34A93E,$20D939D3,$D81082D7,
+   $D480B3C5,$B86ACA25,$4528065F,$DFD8FA69,$D615286E,$4F6B06F3,$EB7EF091,$578F1435,
+   $056F740C,$9AF80B32,$BDE53C59,$92A40570,$196D228F,$DBF6FD48,$04DFC3A3,$1B026D59,
+   $9E19298E,$3C4F2D1A,$A538A979,$C8A89E53,$3CDB6F50,$991E74AD,$5C4524D0,$042E0721,
+   $DCCBC076,$8E6E1097,$E285348D,$E071A8EC,$FDA24E0A,$D784F42B,$821B7F0D,$7D41DB60,
+   $5DF5937F,$85D4614A,$ED34A899,$BB8CB5BA,$0B6E5FB7,$40FF700F,$1BF8B924,$2CF7319E,
+   $EC841F36,$3A76D3D1,$40477253,$4520F15B,$7008AD13,$F138321D,$25B64DDF,$42E889E5,
+   $BF70A7F2,$65A5C9A6,$FF37D5A1,$208538FD,$1C025683,$410EF67A,$3D6BD8FF,$18E412C6,
+   $5F6008D4,$72D5AD9C,$B41EF845,$255AB9A9,$AA89356D,$93558305,$71B81ABC,$70C25476,
+   $084B73B3,$3604DAB2,$4B292DE4,$05DF8154,$49BCB64F,$F2DE4D82,$813E5309,$0BBA71DD,
+   $D05F7066,$A368A77C,$DE5E5BDD,$796FDC41,$064A5808,$EC03A18F,$B88A4855,$085C0E42,
+   $9AC6EA2D,$274D4043,$6DBA4C3F,$31CCA20C,$540E5763,$322ADD93,$1E97CD28,$B60F3AAC,
+   $95777639,$7CB05D15,$6C0AFB90,$B036C467,$96525A3D,$0A4BF7A8,$480C01E0,$73242BE9,
+   $0FB19C14,$5BFD1D56,$F08649B5,$7B7825AB,$09FBC41C,$B7FEBCD9,$01B0B7AF,$81FA666B,
+   $B68B63EE,$D25B757F,$F3A365B1,$0D838F16,$620BD02B,$6A31BF5A,$8DAAE319,$26BCC636,
+   $592A50DC,$9ED60C13,$36058748,$581B62C9,$77F242B4,$9CC1F5F9,$2F68A5C7,$83ED9F81,
+   $2DFD3E6C,$74EC5357,$55BEE0CC,$B3D0BBF8,$0D2407BF,$ACFCD180,$7AD6450B,$303D2479,
+   $E7EA4081,$7A89A3DE,$5BBFCB77,$69D7C0C5,$14492530,$770A2CC8,$DD7B77D9,$0F9476FC,
+   $23FC15D7,$AEEB286A,$E85BDC95,$2174BE88,$52440F6B,$DE297C1C,$98537186,$D04C8C95,
+   $3520AB4C,$2EE0C874,$F6CC11BD,$977B8424,$85E190AA,$10B81C84,$B5AE4FEA,$A4A0DFC2,
+   $2BB76664,$98EFF2D8,$5161236F,$A8D2D6A1,$C4165556,$D4628BB4,$4CD3C243,$682646B0,
+   $0C94B010,$2D06B7EB,$DA81987E,$626DB118,$50D194C0,$2928B0CA,$07FAEFA7,$6DF9C7E4,
+   $F77CA612,$1681E24F,$A4881ED6,$4952F838,$03252C04,$76FBAABD,$7843DEA0,$C73CE8AF,
+   $5A0F7CD8,$E82DA6AE,$0ADEE818,$C1051664,$E1A01889,$968A0251,$1F277A87,$37F55CC7,
+   $A9AC1969,$E5AE29B8,$8BE0BB11,$CABF67B9,$3B2180F7,$F4E7B349,$4D6375EC,$E9DC20DB,
+   $CDED914A,$639C376D,$AB3982C2,$12AFE56E,$336AF344,$C2E369FB,$9B765D82,$A6B72628,
+   $D9A4B47A,$14961BA5,$88C59715,$BC44CD04,$A1E76ADA,$D3AAF30A,$47BD9DF4,$28D936BF,
+   $34901CE3,$AF1AAE1F,$224CA278,$2F114E01,$90180235,$E6485627,$A372F171,$24AB3FDC,
+   $A057DD75,$52509561,$6F2FD794,$C6CD6EDA,$E9EB6B3A,$A08ED8E3,$AFE64161,$09AD8837,
+   $9FA99E21,$BDB54B71,$F213D21E,$8C79E97D,$C0C996F5,$CF60E6ED,$7D2CAAAC,$5DC4E39D,
+   $928D999E,$11499AF1,$53F4B8C4,$5FD31A77,$176C0934,$01F18675,$569BCCC8,$C52B1145,
+   $4E4659E8,$9F278A66,$897520BA,$3DBEAB6F,$C7337952,$A2992109,$12037D38,$9B098D47,
+   $B254A04D,$C9591826,$FBE81602,$3B8755A4,$A61D857D,$BE5334EE,$99E3C629,$51B6EAFE,
+   $2A07D1CB,$191594B3,$589AE773,$1F2C6A78,$A7AD32D2,$3FA95285,$6A40A398,$5C3565E8,
+   $42D2E9F8,$B2213D8D,$3FFE4354,$EFE5DE10,$9D3C058A,$4AB487A7,$EE11849D,$CD771F07,
+   $B1718C49,$BFA2B29B,$FA58A1AD,$BA7D33CF,$2922FDCF,$6FEE3E0E,$A81CAEC6,$64544FD3,
+   $37B530E7,$D9E104A2,$5ED0BF7B,$F32FCBF7,$B0C13BE6,$3E58D4F0,$304FDF40,$B418C346,
+   $7FB93107,$AAC52F4B,$7C9C1D03,$DC3E85F6,$D37A5C62,$D5930DC1,$729D36B8,$0639FECB,
+   $1DB2E12C,$C0F49011,$BBAF6451,$7EA7A4FF,$15F9929F,$F6F04AA3,$86C4BCAE,$6643B639,
+   $1096E693,$6C084191,$4A999A4B,$8425E73F,$66D41388,$7133D203,$C25C0D5E,$38612A3B,
+   $C3ECBAF1,$B99B4C50,$7642F51B,$1D3B9392,$ACC36D65,$7F56228A,$609E4B80,$9D30738C,
+   $B3E417E2,$48A37E4D,$97E2ED92,$8BB191C3,$69658F9C,$2ACECF55,$0E012BBB,$DA077B3D,
+   $A2C246DE,$A55159B7,$43625E57,$33DB5BE6,$3804ACF3,$821C19F4,$D530046A,$3990AC4E,
+   $EACE473E,$D675725E,$C93252E9,$789E5A34,$64418823,$86321ED5,$F136FE1A,$FA8243C0,
+   $BEC0105D,$E45FAFCD,$7E0986A8,$2B3F4920,$460D2A5B,$A92350D4,$4FF6EE47,$1EDDEC0D,
+   $B93AFFFA,$89A66829,$F4598A16,$607A48F2,$7567D91F,$6BC0392F,$74D76EB0,$EA3A5F44,
+   $C5A6E2F9,$5598EDDF,$EFA13332,$4C8D796C,$02959BAB,$F701CCD6,$CC5D26E5,$E2665106));
+
+ Shark_CD: array[0..7, 0..511] of LongWord = (
+  ($5E55AFF3,$E6126AF0,$310B0835,$4B6C893F,$EBFC8D57,$AA4C0E84,$F3B3090D,$FB9B5C7B,
+   $CCBA5CE2,$4508A6A9,$4DC6BDE9,$E5D1D206,$5288EDDE,$34834375,$E46B250C,$B684505D,
+   $5A1E91E8,$A8CEDE20,$F9FA6ACC,$40B89B46,$FAB080BA,$8EE1EC1A,$408E0A45,$DE77D6B7,
+   $2E455802,$9A3E184C,$3F0955EF,$BE93FAD2,$AF39B909,$3AE76CE3,$6F5EA7C6,$AD7EE3CF,
+   $CFF0B694,$8B51D1F5,$3C43BF99,$70CA8D8E,$B2A8F6C9,$CCDBA7F8,$B5A922A4,$4C5E6474,
+   $541CCC32,$5D31ADCD,$8C3456A7,$9B7F701E,$ECFD593A,$2AC9CD08,$58C18E1F,$8FA08448,
+   $745BC9EA,$32F0C66C,$CBBB888F,$C58D6525,$4B529C05,$8C633CBE,$8AA0774B,$F2CD9EA6,
+   $CA2E7D0E,$2CBA4811,$C9649778,$E2E33F4D,$AC73537F,$F4BE1BBF,$379F29D9,$22DE6787,
+   $79137E46,$0956C2DD,$78868BC7,$E061EFE9,$0F97A85B,$1CC85ED9,$67C8DBF0,$31337E9A,
+   $E36AF161,$360193D1,$6383E5EB,$7FEFCA4A,$3241E243,$8535FE63,$ED68ACBB,$C3FEE03C,
+   $A570DAC8,$81C4ABDE,$FB25753B,$67D6C12E,$164DD980,$A4282112,$A13BE4D3,$CF181F0E,
+   $F86F9F4D,$A98FB672,$F66DC297,$5C70C59F,$C2B80138,$B0F7D544,$EE2246CD,$0DA79760,
+   $411BFFC4,$3740FB83,$114C0DED,$24ADE29E,$E0201B17,$F858E48D,$FDB154D7,$0E642F96,
+   $531D185F,$DDB46E41,$B33D0348,$25EC8ACC,$B1E21CBF,$0282D0A4,$8B3582CA,$1BFAB392,
+   $DEBCBB79,$AFFC336B,$F0F9E37B,$35C22B27,$1393121A,$03C3B8F6,$19DA71DB,$B8E07FCB,
+   $3DD64A18,$99FDA0BA,$034AEA76,$CE59775C,$80E9148A,$49EE599B,$C6F33F23,$FE2B6194,
+   $044B3E1B,$4EDCB4D0,$887F68BC,$D5A3C4CE,$E2FF04E0,$DF36BEE5,$C766CAA2,$171C4CA0,
+   $C8F162F9,$0BD41279,$EFB7B34C,$E490BA54,$72CFE806,$5B4228D4,$A9AD98E5,$5355825B,
+   $1B056E2C,$9F8E25A3,$10D9F86C,$CD9ACFAA,$DC63A48E,$88926903,$558939B3,$B40680F9,
+   $95EE277C,$239F0FD5,$34D5C3AF,$EC8710DB,$83A3FEFC,$87B72EC7,$6C144DB0,$63279493,
+   $DF294EF8,$46CB1E5F,$1492C677,$83467B7A,$08967C36,$9C4D9D55,$9BEC7AA6,$D6607C38,
+   $6517C407,$165D24F2,$69CA862A,$C4CC0D77,$360ADC58,$CBE94AB3,$9030ECE6,$84749631,
+   $56C3D3C5,$7A5FF7A5,$FEFBBEA1,$C03D58CA,$1A909BAD,$76B90897,$D9BD6F14,$2F79F0E7,
+   $3AD79E75,$19786336,$D7BF32CE,$DA86830A,$D0BEE6A3,$5A034086,$C0671ECF,$97998F2C,
+   $8F7EBCD1,$55260742,$184F845A,$51D752FF,$0A4963C1,$BB23C73D,$4E8C579F,$2B88A55A,
+   $665D2E71,$D80453AE,$8537DF10,$EE05C07F,$48187673,$423A4BE2,$947BD2FD,$CAA822E1,
+   $29448C6F,$1ABBDBC0,$6216106A,$96D8E77E,$CE654315,$6266FCC1,$7E12AA2B,$89D30151,
+   $2FD0AD83,$73093578,$0701D46D,$8085C38C,$B7763D53,$6B303E1C,$9A798F27,$3F57510C,
+   $6ECB5247,$4449CEFB,$22981A2F,$48AF31C9,$9FA744BD,$98BCC8E8,$069421EC,$69B2EEB8,
+   $B077E93E,$EBB5FD90,$150733F6,$6A71564E,$E1B5EE96,$116FC9B9,$937A0690,$4A2DE16D,
+   $BBAB7F7E,$B9A11799,$57562644,$9368DA91,$9E32B13C,$718BE5DC,$2599CE42,$C82AF245,
+   $F7F83716,$B547E8AB,$D62AC74F,$33B1AE3E,$4550C1DF,$799C4F53,$38088182,$3E16395E,
+   $7010F7F1,$7C2C72BC,$28D179EE,$F38CF6F4,$0CDD422D,$D2912985,$5B8B6469,$41F9F314,
+   $D3F40CD5,$945A37DA,$090389B7,$757AB061,$4AC76984,$6554118A,$D261F954,$7D6D1AEE,
+   $A2710EA5,$01416852,$735A1D87,$B27505E0,$B8E19508,$77F860C5,$E721CF7A,$78DD2701,
+   $DAF78562,$E12087BB,$21D2F059,$86F64695,$2746D1B5,$EF44A82D,$8EEB4950,$BC112A76,
+   $4F19A21E,$C2BF886E,$C5B9D555,$307216C8,$87E8C0E7,$C96B9A17,$92EFF311,$A31ACC59,
+   $817CE10B,$A0D974AF,$F16C16FA,$DCF50613,$7711239C,$FCA9B130,$3E9CA06E,$57A4D7E6,
+   $D8289A95,$C64EDDD3,$309EFDB4,$A25BA40B,$7BCC61B1,$2E3898B5,$0E025DDA,$F5FF73ED,
+   $A7AFC53F,$A6AAF1B6,$C42C20D4,$D9453BFC,$AAE77293,$9D0CF507,$FF6E4B20,$290A75FE,
+   $05DECB9A,$A7EB99E4,$230DEFAE,$A1981CFD,$F226FC8C,$12AC714F,$AB728712,$743BD833,
+   $33D417C2,$6C02D357,$0195F581,$E9372D34,$BFE04165,$F77DA349,$A4E52F49,$68F386EA,
+   $240C3BC3,$211DDF71,$5057F229,$13ED191D,$A3E4FB24,$E8764566,$425115B2,$F9198CDF,
+   $BD3F5E92,$D013F921,$E6B43AFB,$91EA0A35,$84A22A91,$0732ED4B,$1206E79B,$EAF495C2,
+   $0BDC9640,$5214EA09,$00000000,$00000000,$D12B1322,$B3346DB2,$4C534868,$0CE6FF32,
+   $7CCDB5DC,$AEBD5B39,$6A806C5C,$0A957A2B,$1C04BA41,$1F0BE62F,$D4F5D8B8,$14DFF456,
+   $615CFA1C,$58819022,$3540362E,$05B03DEF,$6B1599DD,$E3A2571F,$F52728E1,$9229B2C3,
+   $A8386D64,$BA62AF6F,$26D32434,$06738519,$E8B66721,$641579D8,$9731388B,$04F155BD,
+   $B9746089,$9ECF4DF1,$867D3566,$205CB723,$43C4E033,$102EA1EB,$0D48B7AC,$3BA604B1,
+   $BA3E8AFF,$50963AAD,$CD2FA963,$AC3F8B9D,$F4B2DD60,$7B1E9FF7,$1D914FC0,$F63CCB1B,
+   $C1F2EB4E,$7EAEA218,$E5FED08D,$5FB37D69,$9CEDAECB,$56E5BFB4,$685F73AB,$2DFB2043,
+   $DDF6510F,$61A54437,$204705D8,$6FC16BA1,$FC24A156,$E75302A2,$2B9B9398,$3DD581A8,
+   $75CE3C6B,$DBC7EB58,$44C5345E,$90AB6267,$C32DF4B9,$59C0F870,$59547B9E,$6697A97C,
+   $D5602D39,$FDE8D962,$AEAC4C88,$D3D041D7,$478FDE28,$5EF2153B,$2A0E6619,$D4E2AC9C,
+   $BE75B4E4,$1E4A8E7D,$8DA1A326,$72485D2A,$EA6978D6,$437B23B0,$7684D61D,$159E9C04,
+   $5FC05A72,$0F2547C4,$99336551,$F10E2650,$89EA9D3D,$3C94E9FA,$9D785B4A,$BFD29280,
+   $DB6270E3,$0817AA8F,$7F875FAA,$60E42C65,$98A690D0,$18390B64,$7D58405D,$478A760D,
+   $5D1F4585,$284B1DAC,$60C90F9D,$B1B6BD16,$1F4E5037,$D1529173,$17D82C01,$4D1F0C26,
+   $7A599430,$C70FB581,$91A51967,$6D43BB05,$82360B7D,$6E8003F3,$ADE6A6FE,$1D89368B,
+   $A63A30BE,$4F9DDC82,$96A4CD0A,$EDC67889,$498D83F2,$AB0D66D6,$2D0FB274,$54676F10,
+   $5C8AB004,$C17C3098,$1EDBA5B6,$3865BC47,$BCAAAB13,$3924D415,$71850270,$951B5F88,
+   $6D81B831,$8A10B9A7,$2C9A47F5,$BD504224,$B43CD725,$A5694940,$64823186,$FF6A09C6,
+   $E92392A0,$8D2254EC,$461A2BA9,$B7C5380F,$B6E3C8D2,$82071328,$399D7403,$D721146A,
+   $51C207A8,$FADA3429,$A0AE1152,$262F323A,$3B426BF4,$F04F4E02,$02DF1FF7,$276E5A68),
+  ($FD16E203,$3B4016DB,$1174530A,$9A7574C5,$C02EC8D3,$90012E69,$D780E076,$F44580E3,
+   $49ECA14B,$F81DEC2B,$A6E3D7EF,$26CAE3E8,$0C41F6AB,$0962419E,$70EBD951,$54D1EB40,
+   $0188EEC8,$865E884B,$A406FE8A,$DF76067E,$E594FBA0,$29849412,$6869C0F2,$46156989,
+   $BBD6724E,$B5DDD6B3,$9E6C413D,$0C586CC8,$54D904EA,$6B0AD970,$EC62B109,$A135621E,
+   $087EA461,$0EEF7E47,$DFFE4417,$FAAAFEA4,$80342331,$E0AD344E,$3D382AD0,$AB4138B2,
+   $8E90FCFF,$10739046,$218561B9,$BE0885A2,$7D22C132,$DBED2295,$7FC7E857,$2251C703,
+   $BA5E9C86,$33835EF8,$F4E0A8AA,$B3F1E0D7,$2432DDBB,$3FDB3230,$A3546BED,$A719547A,
+   $CB3DAB1F,$E10C3DF3,$8AAFAE35,$17FEAF9F,$154B01C0,$9DF84B1C,$93A5595E,$8364A51D,
+   $74D48B9B,$535CD499,$4B09882E,$01A109BD,$B0C51182,$C4D0C529,$E1ABA96A,$2E09ABCB,
+   $CDE7D0B0,$1F3DE7BC,$1D35A5A1,$9317355B,$50E65620,$6C87E6A9,$42FFC287,$8910FFB1,
+   $275F1A16,$40395FED,$DA49F815,$7B794936,$98B63A92,$F269B687,$DBC116DD,$FD27C17D,
+   $9BDBFD3F,$8D8BDB5A,$14C3EF08,$1BA6C357,$C6F4B37C,$6E30F426,$036DC7AD,$7FE26DDD,
+   $57B4C347,$14E8B4AD,$25BA3373,$B985BA7B,$8C75D59A,$E9CF75D0,$5898F241,$626898EE,
+   $339CF51E,$5B9F9CBA,$BFE92084,$B250E96A,$C1A6261B,$165FA622,$9C896858,$F5E4895E,
+   $2DC49712,$B76AC43C,$9612E55C,$02B7128F,$5BF535EC,$1D8AF533,$28732B10,$36B973AE,
+   $E02347A2,$A8572380,$4192052A,$F6F2926C,$D0D27511,$8C2AD2E7,$3A6ABFB7,$D32E6AB6,
+   $FC9E0CCB,$BD1E9E90,$DD1B6D72,$03161B32,$F23AD305,$4DC03A98,$05B7BC02,$81D3B792,
+   $B572AD80,$450372BB,$3CB0C418,$2D1FB0F9,$388F96D2,$2A928F20,$D6080EBE,$721B08A8,
+   $563C2D8F,$92B63CE6,$1A6730C6,$EB78675F,$538B918D,$13658B74,$B14DFF4A,$428E4D62,
+   $09F64AA9,$88B1F60C,$D2375C74,$75963771,$9140703B,$7AD8408B,$ADF0B423,$57C7F072,
+   $121994A7,$E5971918,$E6F93C0D,$5666F9CF,$0DC91863,$8F3CC9D5,$86EE589E,$1E9CEE01,
+   $9FE4AFF5,$8A06E483,$6EB3BB5D,$B824B3C6,$AC785AEB,$D1997839,$CAB545D7,$6752B5B8,
+   $F0DFFA60,$B47CDF0E,$190AF76B,$949A0A82,$69E12E3A,$C04BE1C2,$90C89EF3,$FC86C8C0,
+   $5D2F4E43,$E3BB2F7C,$1FD08CC4,$6AABD0CD,$A2DC8525,$2147DC31,$B8BBB5E3,$CA3FBB6E,
+   $60176493,$48FA17CE,$17AE28A5,$6444AE8A,$73861EFC,$2B33869D,$E771D2C5,$D0387184,
+   $DE76AADF,$7CF476EF,$13917A6F,$63C99153,$65A0D891,$C929A05C,$362B491C,$DA4C2B28,
+   $06DA7BAF,$FE31DA4F,$22E8A614,$C1EAE87F,$37A3A7D4,$5C12A363,$C9D8827A,$18B0D865,
+   $840B71FB,$E7200B97,$BD0C09E1,$4BEC0CFC,$43772C4F,$0F4E77FA,$B9335B2B,$4C613325,
+   $D3BFB2BC,$F3C8BF3A,$4A8166E6,$87FF81F6,$7A705455,$A3827091,$82D10A54,$1911D1D8,
+   $FE7B25AE,$44A27B06,$D9243FB8,$049B24EB,$B3A8D62F,$BB32A8F4,$8B2740FD,$91A027D4,
+   $B22038E7,$3D6C20BF,$CF02F9D5,$E681022A,$45AD57E0,$F17FADB5,$F78D6F07,$CC138D0A,
+   $2B1EECBD,$495B1E73,$200D8F71,$38560DE9,$AB2ACF8C,$A9F62A3D,$236048DC,$47B46034,
+   $46C0904D,$8E9DC068,$3907781A,$ACCC076B,$F15714A8,$32225745,$3E55ED7D,$D4A3556F,
+   $E34E800F,$D7B54E5D,$32141BD6,$DDC114F1,$1BEFDE0E,$6D26EF14,$DC9383BA,$85489379,
+   $9A5313F7,$0BD55311,$07529567,$786F5204,$F3B23DCD,$CB9EB2D3,$3179DC7B,$A223792C,
+   $D15A9BD9,$0A745AAC,$0B1363CC,$710D139A,$89C26998,$681CC242,$5FCA6726,$1A07CAEA,
+   $D8ACD170,$82C5ACA0,$7BF8BA9D,$25DCF8DA,$6DDE7CF0,$C7C6DE1B,$B4FA4348,$C35DFAF0,
+   $EF0F76A4,$DED70FC3,$A9CFE6E9,$504ACFAB,$FBCC99AC,$C571CC94,$A1B14288,$5EA5B1EC,
+   $AF159D46,$AE7B15E4,$2EA950BF,$C888A9E1,$0A9B8D04,$F7539BD1,$8F181237,$962D180D,
+   $59101C89,$E43610A5,$4425B928,$772125FE,$979A0B94,$84E99AC4,$26D7F4DE,$C667D7A6,
+   $C3430F7E,$EFE343B4,$755C6553,$D5025CD2,$E85DE3C3,$A6B85DC7,$A8470821,$D61447E0,
+   $6F3B5595,$3E7A3B8D,$3FDD03B5,$52FDDD24,$4EBE342C,$8072BE2F,$188219A3,$12C482C9,
+   $C8506CB2,$9EEE502E,$720EF034,$AD6D0ED6,$A58E1042,$59288E35,$1626C66D,$E21A26C1,
+   $30F132B3,$247DF167,$0EA4DFCE,$F0DEA408,$2C4C79DA,$31344C77,$64283659,$4F772817,
+   $4C5B1D49,$79CE5BB9,$00000000,$00000000,$9D018690,$73BA0115,$993ED45A,$74373ECC,
+   $B79784E5,$BCBF972D,$2F21BE77,$4ED621AA,$EB30246E,$D95A301A,$5E4289EE,$9C5942A1,
+   $637AA33E,$37187A13,$EDEA5FC1,$276BEA55,$10FCBDC2,$1C2BFC8E,$5551EA22,$ED54513B,
+   $E9D50D0B,$20E6D58C,$B61F6A2D,$3AE11F66,$81BCCDF9,$66F3BC05,$77B94C36,$2CBEB944,
+   $CC6F3E78,$99636FF7,$52037F45,$953B033F,$29FBC5D8,$B0E7FBE5,$CE8A171D,$60DF8A61,
+   $8DFD3B52,$6F91FD9B,$7631A2FE,$AAE0310F,$6A8CE997,$BFA98C1F,$D4ED27DB,$8BA7ED3E,
+   $8766B656,$98C2664A,$4F36DAE4,$062C3664,$3BE2517F,$5570E2FD,$516EB8E8,$EAD96EE2,
+   $6C569238,$41985650,$34CE6079,$23F0CEBE,$6745F1F4,$309545CA,$78957D30,$5A3E9507,
+   $85839F33,$617E83DC,$94F7CC39,$FB0BF719,$F929B0C9,$3CCD2902,$401AEBE2,$70AC1A27,
+   $619F8A5B,$CEA49F85,$6B04075F,$39F70454,$D565C913,$0DF96575,$47487E85,$08C34823,
+   $71633799,$D28F630B,$1E58620C,$ECF55886,$FFF3CB66,$C2FCF34D,$C4119A19,$978C11B0,
+   $C2CBE1B6,$69BDCBFF,$F8A15E01,$BA93A149,$E2C66EC7,$51EBC616,$043F52CA,$078D3FD9,
+   $EE87986C,$58898788,$F60581CF,$4A4D0541,$C77C5DB4,$E86E7C6D,$884A8750,$EE424A09,
+   $BC84E729,$CDB284B7,$5CA7A08B,$65E5A737,$AAA22144,$2FA8A276,$A76B3927,$A0946BA3,
+   $35468EB1,$A5AE46F5,$F5684662,$35AF689C,$AE9D738E,$28259DAF,$2A960275,$CF059638,
+   $66CD1F3C,$B6CBCD81,$48644F83,$7E436460,$5A7DDB24,$9BD47D78,$FA447764,$432F44DF,
+   $8359E49C,$9F4F5993,$957F22F1,$7D557F52,$0F2C3106,$76802C43,$791D93F8,$DC601D4C,
+   $922DB796,$053A2D56,$C59974D1,$11D299FB,$02E52965,$F9BCE596,$A039AC40,$D8FB39A7,
+   $BE61CE4C,$340E6121,$EAB8CAA6,$5F04B851,$7CAA2FFA,$5DB3AADE,$1CBD4B69,$1549BD10,
+   $4DD3F381,$FF90D3F2,$E41C1568,$AFDA1C59,$62F24DF6,$B146F258,$7E4F069F,$A40F4F48),
+  ($F8F0F94C,$A1A35CEB,$0F3F095D,$2C203D65,$4084A2A7,$1A2BDAEE,$4D7BCC68,$D3240457,
+   $94A9ADC4,$F785BEA5,$6206949C,$F2EB5445,$0475CED1,$3F5E334D,$835D1F60,$5994299B,
+   $AC204794,$785B7989,$CF461A41,$025DA6A2,$F01A901B,$DF1F3A71,$8BB77637,$27284F01,
+   $694C5310,$E1955A6D,$D9D261AC,$24A1BAF2,$9FE36A48,$E4FBB08D,$F7CFF011,$8D83618E,
+   $ABF5279E,$2AC72276,$E68EEBF6,$F9E32621,$D3F86F69,$BF323FB4,$B8745BEB,$BB888605,
+   $7ACD2F65,$70DAFE1E,$1F1EDBF3,$D0ADF1A4,$2B089625,$1E91635F,$864818F8,$EE2791B8,
+   $C56C1484,$99CE23E4,$FF259946,$F33F0714,$1CBE7528,$BD6F9916,$61A63A47,$9F293CF7,
+   $EA114C70,$B80173F6,$D54DC62A,$6543EF25,$A0BFE012,$39B92C5E,$7187E8E9,$63A4F036,
+   $2CDDF62F,$4C0D38A0,$39E92319,$07334C42,$C3D9BDC7,$43BFF375,$5F9A7954,$CA862B4A,
+   $E8D12BE2,$5D2E902A,$0B4AC78C,$137E0E28,$30638307,$F162A1B6,$3E3C4313,$55AF17BD,
+   $1DDEBC61,$35821278,$E52E452D,$94214E93,$DB12063E,$C18E592E,$490E02B9,$EC7A371A,
+   $DA72CF77,$4963D240,$0C9FA786,$41E255D7,$4244C535,$FF043932,$0160C949,$88ED8B6E,
+   $9E83A301,$6C163BE3,$B09E32BC,$C534E09F,$D78DA1B8,$806C0CF9,$9B96A499,$DBA583C0,
+   $11411BE7,$746047AF,$C6CCBA5F,$F40C4B56,$ECA4E533,$6270A367,$7492EF71,$D4174815,
+   $1B6B1522,$EFF3C2E9,$72274632,$0E669884,$9AF66DD0,$534808AE,$18CBBBF9,$8231AA5B,
+   $F3BA3EC0,$B2DD52C3,$3F5C8A5A,$DD429CD3,$E39BEC6E,$4E509E02,$16947BED,$26FC1C50,
+   $54D0BED8,$D9F82562,$4BCE652B,$0955D4C6,$FDE5FED4,$1610E4C8,$03A0AEDB,$6DC268B2,
+   $C079131C,$2E7D9BC7,$14541C7F,$C3D3FF8C,$BBD4F530,$D64AEEB7,$E15B8BFC,$AB7F7DDE,
+   $32A3E495,$144D426A,$A5AAE78A,$8E0A947D,$31034A4E,$798F2AD8,$6FF9FA53,$3BE48AFC,
+   $07D5600A,$529C5BFF,$4EDB62B3,$BEE66CE5,$DCC76634,$931202D1,$C8937A4B,$50C1FD5D,
+   $0E5FC014,$A4CDB60B,$F17A5952,$57F2B11F,$A8558945,$47054AC4,$D13808FB,$5A1DDC68,
+   $75F22638,$5CFAC37B,$897711A5,$C207ACDD,$64B33DDF,$289A84D4,$46310BE4,$C05A0A7F,
+   $50A57009,$E6A6162F,$A4CA2EC3,$06E71F13,$279731A3,$5F733688,$70E721A0,$EB497B58,
+   $98360A42,$B667EB72,$A60A4951,$E3C8FCCF,$CD867DD3,$E772457E,$682C9A59,$6978D103,
+   $204251A9,$0DEF6D77,$0DFF6ECF,$C90FDEB9,$823DD629,$D179A2F5,$5D5A1EC6,$2FA9C896,
+   $4AAEAC62,$81B85FA8,$A27F8780,$DC96CF82,$23E2FF72,$602D05C5,$12E1B53C,$19A22F1D,
+   $02C06792,$E52FE3DC,$1E7E12BA,$58407ACA,$BEC1F2A8,$61F95694,$4751C2AD,$48B78111,
+   $7C788626,$AAAB2E8F,$6B8C3482,$04BAB9B1,$921C0487,$2DF46E34,$C40CDDCD,$1123A88A,
+   $E2FB2527,$C6BD156C,$95C9648D,$7F6835CB,$85E8B623,$83E5F90A,$7EB8E1B4,$4F84CD53,
+   $F9903005,$294ED785,$E44E8C64,$1CCCC5FD,$C2B9748E,$CB52781B,$796D81BE,$1D1896AC,
+   $6E99331A,$B3090192,$4591A53F,$AD9862CD,$90DC6315,$C8DB8DE8,$FE45500F,$7BD28C7A,
+   $19AB72B0,$0ADC2135,$B33E9C67,$A8F6882D,$CA531DD9,$B5EE1E81,$B25E552E,$201B0343,
+   $91BCAA5C,$40360686,$17F4B2A4,$AE11973E,$FC85379D,$9EFD6FA6,$B91492A2,$33650D6B,
+   $F2DAF789,$3A30D9AD,$BD615C73,$0C3B3E26,$098AA01E,$F651EDF4,$E7EE22BF,$710EAD4F,
+   $765288E3,$3138ABC9,$AEE02006,$9D749A55,$51C5B940,$6E4B9D41,$BC01953A,$84D6B548,
+   $4FBBABFA,$360BE78B,$AA95EED7,$A22AA918,$D42D0F63,$EDAE644B,$3576849F,$46D11995,
+   $486ECBF0,$6497BC74,$29C8F1B7,$FBBE8083,$8817D8EC,$4AEA27B3,$6C595488,$5626E24E,
+   $F6AF3958,$056EEAE0,$67139304,$4558EC66,$FA309EDE,$448CBF37,$CCE6B49A,$6F9FCE10,
+   $65D3F496,$A0770FBA,$1A0BDC6B,$671E4987,$06B5A943,$DA71D091,$D6ED68F1,$08818797,
+   $37B6E30D,$A3FEFA49,$3CFC2481,$B080F461,$DE0701A6,$763DE10D,$B1FEFBF5,$4DD96BF1,
+   $41E46BEE,$92C65180,$80FDB1BB,$34564129,$584F195E,$981A70B5,$CB33D490,$3D0395EF,
+   $25575631,$BA5CD554,$1534D536,$4B3E74E2,$3A498DC2,$6AF124F0,$08EA6957,$7EBC669A,
+   $EB718539,$30ECF898,$2E1D91BD,$A922DB7C,$63665DD5,$7A06DF2B,$A1DF295B,$B154A730,
+   $1021D2AE,$FC8DCCC1,$A935400C,$CFE8C1AA,$B74B52B6,$97A8BB60,$8FC2B8E6,$18767C4C,
+   $9709031F,$9A47D617,$00000000,$00000000,$D8B2A8E5,$AC4C319C,$773241AA,$B9D520A7,
+   $6D399DC1,$DECB6920,$B62B9BFF,$1F45300E,$592FD017,$10F7FBDB,$9956C30B,$3E8A601C,
+   $212298E0,$8502E619,$5BEFB785,$F5D81807,$A31F4EC9,$547B44EC,$33C32DDC,$9CA0C904,
+   $F46F5ECA,$E041093C,$C119DA55,$A69010A9,$7FD828FD,$C769463D,$2DBD3F66,$C4E0B3CE,
+   $44F16C76,$2575E9A3,$9D230DDA,$01D45351,$B4EBFC6D,$FA6AD3D2,$E9B1E2AB,$D5C31B44,
+   $7BADE62C,$F8377570,$819D78F2,$BCBBCA47,$26F7F8EA,$D79EBDE6,$4C1B0521,$5BC98F39,
+   $7D184F6F,$2246A5E1,$9669CA56,$12AA5D79,$BAB43C79,$5EA765D9,$9C43C493,$8939D83F,
+   $24379F78,$32B15E3A,$BFA13BE1,$E914DDFA,$8EA271AF,$909BF722,$28A838FE,$73530BED,
+   $D058C1B2,$D2F05706,$DF67C8EF,$FED06A63,$57701003,$B43A4DD0,$937CCDCE,$A519E55A,
+   $8C62163D,$75B414FE,$8AD7BF7E,$AFC5C46F,$E03B42B5,$2392F6B0,$3D9CEDC8,$386D7F0F,
+   $2F7D58F4,$21CF5012,$0A2A0EC5,$9B938546,$55B07791,$5115AE0C,$EF044BE8,$0FB2CBD5,
+   $EDC42C7A,$EA9D2809,$FB505797,$CC613459,$5EFAB01D,$426BA024,$AF80E94F,$1599113B,
+   $5A8F7ECC,$7D359369,$5265179B,$0389F5F3,$EE6482A1,$875F40BB,$780D48F7,$95F51DC2,
+   $C7AC7316,$7CE1C038,$34164DD6,$CE3C92FB,$66735A4D,$CDB56708,$CE26D308,$8AB02DCC,
+   $13817C75,$914FA473,$5305DED2,$8B647E9D,$C9F3B302,$D82C7633,$B58B3524,$728758BC,
+   $2282363B,$E8C08EAB,$3889EA50,$8FDEC72C,$36D62A44,$2B137127,$5610D94A,$3CD7C6BE,
+   $D298A620,$37DFB4DA,$73478F7B,$868B13EA,$05150798,$B7B3B823,$84887F6A,$0B087264,
+   $DDA7AF7D,$1BFF89BF,$43240C7C,$77E9B25C,$AD408EDD,$F0B6F2E7,$60C6F30E,$17C4B799,
+   $6AECFDCB,$8C5732DF,$F50F9783,$68AC8252,$8728D1B1,$66CA1AD6,$A76A8018,$6B2577A1,
+   $3B29448B,$E21CAF9E,$5C3AD78F,$A74443F8,$8D02DF74,$FD599F90,$2A685F6C,$967CE831),
+  ($BA3AF751,$FA7B9775,$769C2D13,$03EF98CB,$7072359E,$7191CE06,$FF7516A8,$BAB18B6B,
+   $FBC1065E,$E6E5EF4E,$B1D0DBF4,$7BEC74A3,$07C31C4A,$656B4FB9,$9FC86304,$4E8520F9,
+   $D16DAE58,$8FD8DF31,$E60A7244,$90A93FC1,$B449CFC5,$30AD09F2,$91BB5B90,$8453BE7E,
+   $C08FEAAD,$1D68A3D1,$04B410F6,$5C546425,$8A9E3707,$8061383C,$CCA6DA42,$F9940FBE,
+   $A982BBDF,$46E1D97D,$56F7AD77,$FC505216,$F35C2647,$5E4D2704,$CA48C2CF,$8BEA5973,
+   $A34593BD,$D06323DF,$6A7A5DCE,$62B65130,$4966D116,$A436B071,$1EBC78A6,$4F73FB13,
+   $11E244F5,$92B07CE0,$C2D5E2D6,$33429139,$15565403,$CEE418C5,$CEFCD239,$D7BE3D56,
+   $5F4789A9,$53ED8328,$0D043428,$F3E9B51B,$D8DD8A86,$20650E0F,$D21AA2E4,$B6E7F4AD,
+   $3189C491,$6D0FB63D,$AC1BAFEE,$0DA0A42C,$EFBA569A,$3F14EEFF,$1A086850,$13279F36,
+   $A6DC878C,$9B225E8E,$715F3159,$6684D772,$24DF9092,$A3EBAEF8,$D4F4BA69,$C499A260,
+   $93E153EB,$AA798C96,$29DBA4BA,$50021BE3,$FD2F1ED3,$949BB983,$F8B60AE2,$DFDAC4D2,
+   $7B98193B,$F0062DD0,$09B024DE,$AFBDD13E,$89E93BBB,$B95E13A0,$86B707E8,$649D9453,
+   $0C2930EF,$E4FCAC6F,$C43BFA5B,$413CC7F4,$F49F3A0D,$3B2668BD,$8D5D2B4D,$E50A7785,
+   $9A517735,$05C45DA8,$6ECE4D38,$3EE23515,$A11F9BC6,$FE491137,$536EB946,$B7112F47,
+   $6DB94184,$07DD1E89,$AD36AB29,$1AB5BD58,$0BEA2CA5,$8197E3D6,$12954849,$AB8F577C,
+   $CB65C608,$9CFF4007,$5243BD81,$A0043633,$D783B6D5,$FDA689FC,$E2BE62B2,$CCFD5BE4,
+   $6B575909,$75A34844,$012D04C7,$17151974,$3B4EECF3,$FB8D4C9F,$7F2C09CD,$AC5249F5,
+   $90965F57,$9346A70A,$1B256C97,$04328642,$B564CB02,$27B81086,$2E18B8F0,$3569545A,
+   $DD449EB7,$6B24735E,$59A99124,$2193D5E5,$A268977A,$C7763AAB,$3ED7F8C2,$B0CC31CE,
+   $78EF1587,$C939064C,$80591F65,$16E3C29E,$85C00B54,$5DA2BFCF,$9EE567C3,$5990398D,
+   $F02B2AFB,$67720C98,$32FEC82D,$54309DA1,$D6AEB212,$EAB39088,$0AC72862,$9682FAA2,
+   $D5D9BEAE,$D38CBB14,$682055B5,$4C9C63D8,$4F88C99B,$D648E6BC,$8E2A27F1,$DC355C19,
+   $6C944543,$10C807FD,$DF1E96CC,$450E41B6,$40D6F5C8,$0B8B614F,$54ADA50C,$D27A60FE,
+   $F2712280,$49583E70,$268598E9,$8DC19C10,$1F917C61,$5866E267,$4638ED45,$79F53782,
+   $3839E04F,$C2B26703,$8F072336,$CB20456D,$197F64EC,$2A18B4AA,$E3936675,$DBE84290,
+   $879A032F,$73888D27,$214684A3,$E8AAD3A9,$4715E982,$6EE02EF6,$E57D7EF8,$A996145D,
+   $F99B0E25,$C8CFDDA6,$ECCD5A26,$062BC563,$3410D0A0,$264ECB6C,$089D2019,$B8A8C84A,
+   $5D1D81D2,$7DC7B1C0,$3914E488,$D5A77E77,$05991431,$4B417D51,$9755431D,$F62DE8B3,
+   $5134B13D,$993B1DAF,$7D7601B6,$82787B1D,$6190716B,$E321B2E6,$A4868FF7,$B5086C66,
+   $3C8DF0B9,$9EE60326,$AF6CA352,$349F8FB0,$690D5172,$5B897AAC,$DC699A70,$7C316A2A,
+   $B860FF2A,$D451A59D,$F1062E3C,$706715EC,$FC021A14,$838EA0F7,$4462E53E,$57DF056A,
+   $94224FA1,$CF12C32F,$BB17F396,$ED6E8E01,$677E69E6,$915FE42B,$3DA0F47E,$89F31A52,
+   $7AB51DFC,$E71334A4,$6409655A,$A860CFB7,$BDF9EB1B,$9F10D8CC,$4CFFC527,$EF77CD20,
+   $4DD2C1E0,$F862D454,$4B3CD96D,$8A1C8299,$88C43F7C,$AE4B0AD4,$D040AA9F,$98CDC645,
+   $AAF5B763,$7FDEF2E1,$28F6A07D,$47170297,$EA2342AB,$745593AE,$CD8BDE85,$EE8116CA,
+   $06EE188D,$727E56CD,$2F35BC37,$227C4D2E,$8BB333C0,$97742148,$A5AB8B30,$A21D7512,
+   $7E010D0A,$BB475081,$B0FDDF33,$6CF96DD7,$EE97525D,$2801F78B,$41FBF10F,$1C9E783B,
+   $4A11DDAA,$9D099BED,$30A4C056,$7A1AAF49,$43A1F974,$32B44AD3,$99267B89,$3CFB7634,
+   $C93FCE73,$B2D572EF,$EB0E466C,$63408ADA,$FE58126F,$ADA4921F,$72283DE5,$5FBBFCEE,
+   $5C308515,$6AD2A8B4,$2D6FB44C,$0C567FC6,$7C5B0571,$956D6269,$428CFDB3,$25A153A7,
+   $F6C53276,$150C5A55,$E0E46AC9,$E2D7690C,$62E77DD7,$DA1E997A,$E1C96E0E,$F5C27078,
+   $B94DFBED,$C344BCE9,$9D926B7F,$60AF1211,$D337A623,$A1F2EDD9,$0E733894,$CAD69E87,
+   $D9F08E41,$3770177B,$C812CAB4,$A5C06B9B,$3767DC1C,$1F71E0F0,$5E6A8D6E,$44F89A5C,
+   $1CE670DD,$6159C9FB,$5019B5FA,$8E2E04DB,$BCD4EFDC,$8805C1B8,$967847DA,$E138F1C7,
+   $84ED0F93,$4AB7A6BB,$00000000,$00000000,$8203171E,$38C9F076,$2C42B08B,$1B4366B2,
+   $C74CF6E7,$7803EC68,$3A63E834,$EC9855EB,$E4507A3F,$BE830D29,$74C62568,$2DC5AA23,
+   $BE8EE7A7,$A62FF350,$1DCB741A,$764CD08F,$A7F1834B,$8C3747FA,$5BF3995F,$0FB9E70D,
+   $B38AD38F,$55C6464B,$162158BF,$F7DB3359,$2231881F,$D195F835,$B73EC379,$0992226E,
+   $77B129D4,$14FA81BF,$73053922,$48AEE59A,$C3F8E611,$2457884D,$206B8064,$FFBFCADD,
+   $25F29455,$B4FEB78C,$66536D21,$864AFD5F,$C661F220,$6F16F51C,$79C21140,$DE2C1F38,
+   $DBAA863A,$195A2593,$025A087B,$2E2A32E8,$33D3CCEA,$432584D5,$F5B23ECA,$2C3371C9,
+   $3FFAFC05,$A7D928BA,$B2A7D748,$42D35F3F,$10CF4032,$85A56594,$364AD8DB,$0864F984,
+   $8C702F8A,$F21F6EF1,$FAEC0299,$F1F0F63A,$147B50C4,$D9F101B1,$832E13D9,$2FDCE902,
+   $E9544E17,$4D6AB832,$170C5C78,$E0CE2A2D,$A8AFBF18,$51F4C009,$ABD8B3A4,$68CBEB95,
+   $4EA5CD5C,$C15DFFC8,$F7E836B1,$02194321,$EDE05EE1,$113EDC17,$DE33920B,$521B58C2,
+   $27A89C2E,$9AD48564,$C516FE9C,$5629DE80,$9CBF6FB8,$77BA0B65,$AE41A795,$238A96C4,
+   $9B7C73F2,$12D144DC,$950F4B66,$D807DA5B,$588495E3,$3686CC91,$5ADE9D98,$18ACFE79,
+   $E8794AD0,$5A7FA146,$231C8CD8,$C680E141,$B613C7BE,$1E873B1A,$60BD75AC,$F434AB92,
+   $63CA7910,$CD0B800E,$13B84C8E,$BC9A4E08,$1852602B,$3D0DADDE,$454FE1F9,$40CA1C1E,
+   $C1A2EE6A,$0A7DBAA5,$2AACA806,$693D307F,$DA8782FD,$0E4F3CE7,$92CC572C,$BD6C95E2,
+   $75EB21AF,$3AD0B357,$2B81ACC1,$7E28290B,$81741BA2,$01F6DBEA,$E7277683,$87BC26B5,
+   $03770CBC,$393F2B9C,$0F5E3C53,$DDC387F3,$57DAA9B0,$EB454B62,$484BD5D1,$B323A905,
+   $BFA3E360,$B13AEA24,$353DD467,$315BD218,$980B7F4E,$2BEE6F40,$A0329F01,$E95C0843,
+   $5580A1CB,$C56F798A,$6524619D,$BF75D6C3,$6FE349FF,$29F72C61,$CFD1D6FE,$C0AB2422),
+  ($E957943C,$561FC423,$69079288,$014287CA,$DFCD1D21,$2F086129,$A044FD99,$C537D4AE,
+   $D7C8A457,$F1E8C3BF,$5CDF9BFB,$2971998A,$2CE9E460,$23FA649A,$56A6716A,$3AA9E9C3,
+   $AA3D1708,$D6EFA4E7,$FDA5B5EB,$705A24B1,$B170A9FC,$101E0CE2,$0E814CAA,$7CA82102,
+   $1931ED13,$0BC97ADA,$778C59CE,$34DF1711,$9226D2BF,$D35020EF,$805006B4,$575D43E9,
+   $9B1DB840,$91ACEBEC,$3B5945D9,$549B3F42,$3925163E,$99A3ED9D,$369A891D,$7917A50A,
+   $B4B6DC4E,$E372343C,$D949E8FD,$8D40E2BD,$D0728202,$CFBC29BE,$7108AC12,$96979485,
+   $B30CFA1B,$DD26DE3D,$D8773B74,$115C8B28,$C480A3D5,$E9F9C92C,$4116D0D3,$4DC8B21B,
+   $4F979C79,$31609319,$0342806E,$5124BB4A,$DEF3CEA8,$B31408BC,$F158AAA6,$C1CAD76C,
+   $E1522D4A,$88FF66B5,$76B28A47,$A8C37E84,$896B6C4B,$15A188EA,$0684F5DC,$A2488394,
+   $5919EE49,$DA1DA154,$45EE76E8,$22B8E350,$25D28E9F,$6106AF99,$4792250F,$EF80318F,
+   $CFC79ACD,$663DD0F0,$26900EF1,$302214D3,$61022BFE,$DFA2255C,$8CAD19F9,$E6CDB034,
+   $6A4512E6,$50663C80,$74CED9A0,$65FBAC5B,$C9436F11,$C4755364,$0B473918,$8FC419DC,
+   $9961EBA7,$5C943933,$6EBDB4DD,$3F166DCB,$15CCF25E,$BA598907,$BECF36DF,$F0AA4475,
+   $BB09436D,$03C67CAB,$AEC5B133,$B99FF5AC,$75F00A29,$F9E7C5CE,$D6F677DE,$6DF4AA2A,
+   $F5A00C9D,$AEBA8627,$EC91E18E,$A573FCFD,$B5880FC7,$7F6E5DA9,$E86947B5,$CA03ADB6,
+   $ACB9E2D4,$74A72773,$4CD51C17,$60442853,$1CF798A1,$F8A54204,$8A29EC25,$448533A0,
+   $436A8334,$80F060C4,$9A236BC9,$0DB08279,$CEF94944,$FA21B965,$1DC94B28,$64B92B91,
+   $94A22763,$7118A37B,$9CA79E15,$AFF801ED,$2B53C235,$1DAE8E9B,$0A79EA91,$13D87049,
+   $335CFCAF,$8A7B9DD4,$F95D13D0,$1F2A75FA,$2E95B787,$EEC2B645,$23567B43,$C34E2C0D,
+   $3120AF48,$47434F0B,$BD8DB6B1,$A18EFF3F,$502284B6,$98E16A57,$CC851AA3,$37196BBA,
+   $6240AB90,$8E869E16,$BA3790E4,$9FDA153E,$86D4F368,$F515C07D,$2FAB640E,$72DEDFD0,
+   $DDB14EC6,$E230B3F6,$180F3E9A,$97D5134F,$66B80DAB,$E1F6CF5D,$E5AA8B71,$E78F37FE,
+   $6F836754,$A30A045E,$F21A2AC8,$90EE6C26,$A4BC5BA2,$AA4785E5,$FA1F93BE,$4E0ECEB0,
+   $A3067DF7,$94136FE4,$E49458F8,$7B935E6B,$EB2BC7DB,$9B2716FC,$1276D40B,$840D6306,
+   $959CF4EA,$ED04CAEE,$7F89E0B8,$EA3FB587,$5DE14872,$B56DF01F,$100A87EC,$4935B1D9,
+   $916452D1,$82749BA5,$C87DBC98,$58693AF1,$8855BFC2,$89BDE17F,$A6C00845,$677F573A,
+   $168E7230,$EB7D324D,$D20ED1E5,$0284FB61,$0CFD1F4D,$B190F3DD,$EEEDB269,$684B2E22,
+   $8ED14A1E,$2BF562EB,$0FBF9F23,$E0B44897,$EDAF3207,$396F9568,$B84BC303,$52E2C7E1,
+   $17B0A1B9,$77615BD8,$DC8F9D4F,$7E2CDA63,$6CC1E73A,$F22EBF14,$985F382E,$C08850A6,
+   $E210AD24,$D9DBDDFF,$2DD737E9,$BFE60D0F,$822C5553,$9A659136,$A97F9766,$87CB1FAD,
+   $2811425B,$4C8A35D1,$F863C059,$83361C6F,$FB214037,$D212A725,$D330026C,$9E9892F4,
+   $E32E7EAD,$45C7B46A,$7374FFF5,$5BAF465A,$DA0B6893,$DC6459F7,$7833C6ED,$D46B5F86,
+   $F066792F,$5DD6BEF9,$816ED53D,$CB412A7C,$C5BE705C,$75E5A0B9,$3DDDB005,$F6D3BCD6,
+   $A7FEDBCC,$FB633EAF,$11345465,$D529D84C,$536004D8,$C9C5D11D,$301E7CC1,$DB5F269E,
+   $C07805EE,$86899867,$BCB36538,$3D9296AA,$64C45E4C,$2CCE1D82,$1A736D7D,$5AEDC190,
+   $B6CA8FA9,$2E4AE6E3,$905A8158,$1E68F230,$0805B976,$DEE0A296,$027C53E7,$CD38D2DF,
+   $87EA20E1,$6909A9E8,$C6FCF032,$24C11BF3,$13480782,$18110A93,$3E9F306B,$A7F7079C,
+   $8B173FAC,$D8995A35,$7B714683,$854FE4CC,$FFD9E60C,$BD62F66E,$E06CFEC3,$14E30F20,
+   $6DFF34B3,$6E32D681,$FEE73585,$217E9FFB,$3A679650,$C88756D7,$1E8BCB46,$359D90DB,
+   $14F221D7,$2645E092,$511C573F,$04FD03C2,$46ACF686,$739C581A,$65FA8DC5,$B0D27417,
+   $D48A2439,$A0CC78F5,$4B6F3A42,$5E10C252,$37A45A94,$E50BCC9F,$D14C518B,$53A0402B,
+   $B2322992,$413AB7A8,$97E0A70D,$203C1831,$6B7BC16F,$CC7A5515,$58273DC0,$4601C8C1,
+   $44D0A561,$BEA48AC5,$F7DC5F7A,$638254F8,$5798A2E3,$A6B58056,$D5B4F7B0,$3CD01160,
+   $B04E7A75,$8C026577,$8D93CA70,$7AD1D9A1,$5F9D1B95,$785522C0,$2268A8CA,$5F524598,
+   $CA01EF7F,$9551E82E,$00000000,$00000000,$7CCB60D6,$BB1B0ECD,$CB3F3CF6,$094D81BB,
+   $35D80973,$28331E40,$54DA228D,$F7913B1C,$3CE3638C,$6ACFD543,$A84144EF,$1BD77638,
+   $9EDBCDF2,$62C0D332,$2A6D11BC,$81B2E70E,$C33A8580,$D7AD232D,$381BC5B7,$05BF8408,
+   $9D994D9C,$33E46878,$9FE51E7B,$FEDCBAA7,$93180136,$4F4C497A,$EA151452,$073B7F69,
+   $F324F941,$0CF205B3,$84A8A08F,$382D12A2,$425450BD,$1CEC0951,$525ED751,$55D9B888,
+   $BFF1E556,$6CB62DE0,$4028035A,$D1D4DB8E,$AFFB62BA,$25839C39,$AB03C481,$4AF3CD72,
+   $85967306,$A4317B37,$C146D667,$1A95F1F2,$2014FB2D,$926A9747,$8FEF9997,$B7E90B7E,
+   $B975108A,$CEFEAE74,$07BA2655,$3E54EA01,$292F91D2,$D0965C44,$CDBBC92A,$AB05022F,
+   $24EC5D16,$FD1AC60C,$4DEBCF9E,$FC5841C6,$5EA3C81C,$E4494B55,$E6E80B1F,$B6AB8CB4,
+   $3FA1E3E2,$3BEB6E09,$05C675B2,$F36C38DE,$013ED389,$9C1C6995,$5A5B6E27,$8B391A1E,
+   $FC9B6662,$EC464D24,$4EA94FF0,$AD7CFA8C,$482DBA2C,$0F347918,$68394101,$9D5EEE5F,
+   $7EB73331,$7623DC12,$F49EDF14,$32A6EFB2,$0DC3CCC4,$2D8C9A48,$B7F45C20,$B2568F76,
+   $212A28A4,$0E76FED2,$790D1564,$48773613,$637E7819,$129AF783,$A238AE7E,$080F0671,
+   $A582882B,$365BEC70,$093B6AFF,$42FCCB03,$70367F9B,$0A8BFD10,$F6E28CF3,$FF9E3D6D,
+   $AD87315D,$E8BB4EE6,$724A2C7C,$C7B32FCF,$C7C223BB,$B8DD7266,$491369A5,$9328108D,
+   $831286DA,$0679F8A3,$7DF5B35F,$27076758,$1FB518CF,$A981F94E,$55E4F104,$6B8D5289,
+   $32622F26,$1667F441,$E7D6D896,$2AB7E521,$27AEDD78,$AC3E7D46,$6786DE22,$7DEAA6C8,
+   $5B65BDAE,$1725738B,$C2045609,$4BB14AB8,$A17A2E10,$592BBD3B,$4A51E9CB,$C20CABC7,
+   $04F8A63B,$6F70514B,$96DE7484,$BC2071A4,$7A4F950A,$19538D59,$EFD361E0,$F45747B7,
+   $603CF877,$43BE4CC9,$1B4DBEF4,$C6F1A805,$34E6DAFA,$B42F77D5,$DB35BB1A,$40783062),
+  ($2DEB0A4E,$F5A96C29,$EE653C51,$211C9DF6,$BEEEF596,$04DE5DDC,$7457C19F,$E1E5B06F,
+   $14A54FB6,$74CA30F0,$C5457D85,$C296F9F7,$484D10B0,$7D4EE08A,$BF9B13AD,$AE87F2D0,
+   $0E89AFB7,$8DF4BB48,$D9A2D61E,$2D8B7A67,$BD712ADB,$0F3559C8,$2F013338,$541BC731,
+   $636D5164,$9EC4848B,$60F28E29,$952F809F,$B28D6357,$28984D8C,$C38E361F,$D4B5F1DF,
+   $7076B373,$5674135F,$042172EC,$B791A330,$D4B4A6E4,$AB94C53B,$9305FFD8,$F17731F5,
+   $801E1DCF,$39C7A621,$3BA47C8E,$20D1F7C1,$F95FACAA,$5E3DA912,$E5B80731,$B1202A82,
+   $6DE4FED3,$13303FC3,$5314168A,$2E29C43E,$0D1670FA,$861FBF5C,$F3F771F1,$6458B16A,
+   $DCF642C9,$3043765B,$B825BE0C,$12FD55F4,$D65E9F92,$0A266E23,$2636312E,$6595DB5D,
+   $87A0B06E,$85BD0105,$0842E42D,$9BD7B360,$0175E63B,$AA59AF0C,$854A8918,$240FAA1D,
+   $F82A4A91,$F464061E,$A6282CE1,$5C527D7C,$8AB6C094,$03A2BE59,$76BDF8E9,$40571B77,
+   $1F7874D6,$E4F68784,$32937E98,$115FEBAD,$442E8671,$5108F0DA,$3C1AD12F,$9CAB50E5,
+   $5640825D,$33E1C802,$D8D73025,$87D2D56B,$9A32FDCE,$C0F92D99,$126E042C,$62E938D8,
+   $A0E3677B,$4A717554,$039FDF4D,$0BEB0414,$9CF9B654,$D6DA25B1,$FAC073E7,$55D6AD06,
+   $C7AF44F3,$632452EF,$5B56F2A7,$B5FE775E,$B0675A21,$892AE694,$7C1525B2,$7A32030F,
+   $73E96C3E,$5D9F174B,$10843D5A,$C35B93C0,$E8AE77CB,$373F95DE,$455B604A,$FB515FD6,
+   $8BC326AF,$A9FB1155,$64D3FCC5,$22BE23AF,$5E026670,$A8367B62,$B9505837,$B8A4FAF8,
+   $2362A5F9,$785DD761,$18C6D977,$588C20A0,$77C81ED2,$EA0EB47B,$36B20C74,$A6CE489D,
+   $37C7EA4F,$0C97E791,$9D8C506F,$7C838ABD,$A5B7F3AC,$57B97968,$7ADE6E28,$6C110B27,
+   $AE6AC8CC,$C785CE1C,$8C7D8B0E,$1581B671,$98D8C4B8,$614B8681,$0FFC498C,$27AD1444,
+   $7EFF1CC4,$DB80A817,$42E5CDEB,$472BF8F2,$3AD19AB5,$8A8858CD,$A75DCADA,$F60BD270,
+   $FC0B387D,$43F5A52E,$AF1F2EF7,$6DDC6110,$46C4BF07,$F0BA5BC2,$F068AEBC,$6FB3B57E,
+   $6E7B219E,$18DB3BD7,$0BDD3B60,$903CB774,$A9D4656D,$7BFF6938,$D27FED7E,$BDB7CD13,
+   $6B2FB549,$051337EB,$9E138F22,$77688EA9,$21889C8F,$D9EF7C79,$34583502,$077CE385,
+   $CC727F93,$F318E59B,$BACF877A,$B34FFEEC,$FD7EDE46,$E9AC0A22,$71035548,$FC2DBC53,
+   $5F77804B,$026FD46E,$CAB93409,$E53BEDB3,$ADF51781,$CC6ECA08,$A1968140,$E028DA58,
+   $0AA8DD5B,$3A651878,$F28297CA,$CE011E66,$69C58C3F,$A4A19CF3,$F11D4887,$C5EA1A72,
+   $24DC0858,$C4277045,$29CA78A2,$4238CF19,$FF94E730,$481EA13A,$C011E952,$DF5EF5CB,
+   $EC8F0527,$80AE36EE,$47B1593C,$5AE3F4CE,$7834575E,$CDA3A03F,$7F8AFAFF,$71D9071B,
+   $4C6C625C,$CADF43BA,$06CB4B9A,$16230828,$D30A0B45,$17EE621F,$C8530D7F,$448946AB,
+   $3F850E62,$974054F1,$20FD7AB4,$73B6D375,$131BE217,$C8B097D4,$B6AC11BB,$9F09EEBC,
+   $1D924DA0,$45442C9C,$E4CDE10A,$1B79858E,$5CE85F06,$0984D07A,$417A12A6,$4CC0FCE6,
+   $57356466,$99B8670E,$352DD339,$AD254C89,$8381C282,$322CA235,$2743D715,$CFCC7451,
+   $4E865B2A,$6B6DE8A2,$AB3E5C1B,$DA4DC220,$65A61AFE,$88E78CA3,$816BFBF4,$939E092D,
+   $99AD2283,$CB12298D,$C926EB44,$EED0E9A7,$82F424B9,$98750D39,$164F76C0,$D5789BE8,
+   $58C92DEA,$BE15734A,$2A55A7EF,$49D3CB0D,$7941B165,$67FA0F33,$DB48EF68,$8C39D17F,
+   $508BC9C7,$25C2C02A,$6218B75F,$349D2B87,$AA4BBA20,$70146D2C,$D095D408,$1C05660B,
+   $2E74D503,$FE42683D,$DD83A4F2,$9A1AD957,$19B33F4C,$F2D58FAC,$394E45F8,$81635CD9,
+   $D1E03233,$B65CC907,$9F666919,$DD3121A5,$09370216,$318E1C6C,$EF10DA6A,$8B4532FA,
+   $BBBA6141,$191651E0,$61876812,$3F762F93,$6C9118E8,$B96990CF,$8E97B278,$B4331D69,
+   $F449DC50,$D822164E,$5261F0B1,$84706B32,$1E0D92ED,$4EAF2888,$11F1DB61,$69023CCC,
+   $AC80F1BA,$66376504,$89291FD9,$0849BA4D,$FBB595DC,$FF8F020A,$91EFC6AE,$50C59AED,
+   $055494D7,$1DC80C3C,$8FE25443,$1E6AB265,$3EF0E859,$3D19FBFD,$909A2095,$FA9C35E1,
+   $CE9846E5,$52AA4E83,$A37CB836,$419A7140,$D72B79A9,$A07FC12F,$C4309BBE,$68CF56FB,
+   $D5C140DF,$01CD6A37,$54AABB2B,$9253631A,$7D60C389,$D06BAC03,$674C2388,$295527BB,
+   $221743C2,$D204786D,$00000000,$00000000,$729C8A05,$F7C6B847,$4AA729C6,$DCFC4B92,
+   $2B2041D4,$E38A6401,$6F0EC7A5,$B28294DB,$E9DB91F0,$9D663AD2,$DE1C7BBF,$91F1DD43,
+   $4D198467,$6086ECB6,$CD0799A8,$59414A97,$E0EC93E6,$ACE826BE,$BC04CCE0,$A56CF6C4,
+   $F53C3A6B,$727BB942,$25A9EE63,$6E7EDF49,$DA3D0953,$26607E73,$95CEB442,$E75439DD,
+   $F6A3E526,$7990BD56,$96516B0F,$ECBF3DC9,$4BD2CFFD,$76A5E49E,$EA444EBD,$968D3EC6,
+   $927019E3,$5B2E9EF9,$9B471BF5,$6AA08295,$33E698A3,$BB0644A1,$6639C5B3,$830C88B7,
+   $FEE1010B,$E2470E36,$307947EE,$B0ED40B5,$B7D9F780,$355041B0,$843F6F23,$8E560511,
+   $173A90FB,$7F2134E4,$EDFAE31C,$2AF799E2,$752227A4,$4BBC1F63,$CFEDA0DE,$F8F3E18F,
+   $E206AA90,$0D5A8DA6,$0C6396C1,$2C461050,$15D0A98D,$DE939FFC,$6A5A5372,$AF4A98E7,
+   $51FE2FFC,$8F9B6F26,$3D6F3714,$36F2FFE9,$68B06A04,$0EF833FF,$400FF49D,$E69953EA,
+   $B112BC1A,$23734998,$B44628CD,$3EBB45A4,$310CA1D5,$1AB4EFB9,$86D55655,$2FE4AE09,
+   $A2095E0D,$EBC3DE4C,$1B59063A,$536724B4,$97248D34,$46E692C5,$383BA3C3,$2B3AF3D5,
+   $DF699D84,$3BA8724F,$4FF3BD11,$C13447AE,$94BB5279,$4D0D96D1,$A4C21597,$FDE0D664,
+   $4938F68B,$D7174F86,$C2FBD024,$7EEC5ED3,$8D086D35,$BFD8197D,$CBCCD232,$4F6242BF,
+   $E3734CAB,$A70322AA,$5D9DB93D,$A3DD7F76,$B533CEF6,$94E2EAA8,$59BCCBD1,$144CDC46,
+   $7BAB8813,$C648A42B,$1A2CE001,$F93E8BB8,$E627D87C,$BACB2E96,$07BEADA1,$BC7AA724,
+   $C6DAA2C8,$C97DFDE3,$02EA3976,$A1B2AB18,$5A23149C,$1FA7D852,$C1640F69,$75075AC7,
+   $28BF9E99,$E8616015,$885CF9E2,$A2101541,$1CE7AB9B,$EF1D8390,$E19975DD,$06B189B2,
+   $55DF5D10,$380ACC16,$E7523E47,$1092819A,$F7D6031D,$D3C9125A,$A8A18356,$D1A6C634,
+   $2C9EEC75,$5FF0C325,$B3F8856C,$82C1E280,$43902BD0,$ED7257FE,$EB31A886,$3CD491CA),
+  ($FAD9E7DF,$94AF9EB6,$03C94DDD,$9208AE5E,$7158480B,$1D8DE8D6,$BA147AF8,$FD093CD2,
+   $E6597CCF,$A45CEB22,$7BF113DA,$9BBDE6E7,$65FFFE5C,$E4EDF4B4,$4E8D2A2F,$7125622E,
+   $8F68430D,$1791B81B,$902195C0,$B56A63D1,$30D2EE67,$A980832B,$84862397,$4C0A7FB3,
+   $1DC7A05B,$ED58BC0D,$5C4D0637,$5955D7F0,$806FCF4E,$D2B9B1C8,$F910AA02,$06A730E8,
+   $46AA0768,$B8B60BD8,$FCBE7D90,$45BF370A,$5EC370A1,$16F6B037,$8B81AFD4,$89227660,
+   $D0EC08E7,$DCCCC1B5,$62DF5F58,$E8569491,$A41A977E,$82592E81,$4FCA1164,$AC8EABB7,
+   $92AFE356,$FAC90416,$331BA3BA,$3B882D75,$CEE2E561,$A39CD3E6,$D7CCA9E3,$D077A190,
+   $534A8A74,$9C7DDE23,$F3B9F1D3,$80973ED9,$209CB4E9,$CE535132,$B6DABB66,$AA299B5F,
+   $6DD8D31B,$2D7E9D42,$0D89FAD5,$8A8B6E14,$3FD56224,$6CA88AF8,$13871753,$F5DB7C47,
+   $9BCFF55A,$EEF1A479,$6636B381,$76E55AEA,$A33A367A,$8EE24EA4,$C44BBEB0,$25ACDDD7,
+   $AA5A2076,$9ADAEECB,$5083C7A9,$0E75707D,$94C87919,$2BD9ADAA,$DFEB84A4,$19E4C866,
+   $F070BC0E,$129F9087,$AFF4F7E4,$D9C2E929,$B9DD3725,$6F01928C,$64B8C517,$39463D2D,
+   $E4D70A59,$EBFF8CE5,$418AA66C,$B40D6BFD,$3B3C8EFD,$F21B4483,$E5903112,$3654457C,
+   $05AED792,$431807E2,$3E92596F,$B1034361,$FE300B06,$0A1C50CD,$B79D802D,$778252C6,
+   $0720A104,$0CBB6025,$1AE7015F,$E1E3DC28,$8128F405,$0F127851,$AB1D1B3D,$47712752,
+   $9CEF545E,$E24AC45C,$A0F37BA7,$1CEAE0FA,$FDF946DB,$9814FE93,$CC6C93F7,$EC3FB421,
+   $75B1A4D2,$833E26AD,$176EFB8A,$6B68B23C,$FB9EDC94,$4904572F,$AC3DBA39,$4BCA4777,
+   $93E8D81D,$2762CD8F,$04E9ECD9,$9EB3CE7B,$27BC15ED,$C2E83117,$357C39F5,$EA9884C9,
+   $6BBF4954,$FC6E34FE,$21DB8FA2,$13F898AB,$C782F36D,$B7A47389,$B0BD2129,$7B3932E3,
+   $C9C24465,$AF27B3C3,$1629C0C1,$B6C37BA5,$5D0A3D7C,$84FE1E69,$59E3D1A5,$1A4DD012,
+   $677188CA,$AB4E9373,$546A2B70,$90C6BE06,$EA97BD51,$F37C4CAF,$96460F8F,$647ACA6D,
+   $D325453A,$4EC46FEB,$4C035CB9,$3E8605E9,$D68B92A8,$0DDC6809,$DC22C979,$8BEC6638,
+   $104E5A8E,$67D3D219,$45634AB5,$2ABEA586,$0BEE609A,$5B9BC7A8,$D2627E71,$936FA672,
+   $49AD8B2B,$7D9E020B,$8DE6359B,$5832DFDC,$58A4EAEE,$C7E6198B,$797F654C,$D41E8120,
+   $C22C24FF,$F4BC746B,$CB4C32F3,$E084D404,$2A35EF38,$48635F03,$DB02687D,$8757061D,
+   $73D63E9D,$522E8F11,$E819CBC7,$BCDF2B68,$6E119EC6,$BF76331C,$A9936DAB,$08D24095,
+   $C8857F2E,$728C7A5A,$06679A4F,$D110A9BC,$26FB2EA6,$1F43F88E,$B89A0C6E,$B2AA5B15,
+   $7D968995,$4AAD4F5B,$D542DF75,$9FD4C657,$4B23FDBD,$323D65CC,$F6172641,$C38F393B,
+   $994183CC,$A152C3BE,$82E1B9D8,$9D1AD60F,$E3F7AB5D,$E744ECC0,$B513F6BB,$38213501,
+   $9E6122C8,$ADE9A39B,$343B02BE,$37334D50,$5B6DA733,$55EEB7D5,$7CD1B2DE,$970686C2,
+   $D405E43E,$427F0FCE,$701F7340,$C026214F,$83A68293,$40B11F96,$57A366AD,$02CE1058,
+   $CFA5DE2A,$7E371A7F,$EDB71C55,$FFC72C8A,$9166AE8B,$68C1AA48,$890FD942,$C68111A7,
+   $E71E4784,$79F722BB,$A8D456E0,$D579890C,$9F261983,$70426A02,$EF396AC3,$B0644B4D,
+   $F8579149,$DB0CF971,$8AC6949F,$5489BFF9,$AEB3CCAF,$046920B0,$9806B887,$7CF90A27,
+   $7F18FF03,$050E289C,$47ED3C23,$651DC241,$74F69F99,$5E95EF34,$EE7E5188,$6DCF82D4,
+   $729105D6,$8F854688,$2212C27F,$81F036F5,$970134C4,$B9D103F4,$A27D0D31,$5349873D,
+   $BB5341B3,$20A2F54B,$6C9FE850,$F0D554DB,$28BB99AE,$07C038C4,$1C809B10,$30F37594,
+   $9DA86F15,$3FE10DC5,$7AB62891,$46162F7E,$325C98F1,$E623E4EC,$3C1C2FF9,$FEA024A6,
+   $B23357BF,$349A5524,$63986413,$35FD5D08,$AD7A8172,$96618EEE,$5F844BEA,$CB5D79AE,
+   $6AF8721F,$21C5FD67,$0CCEC19E,$5720A78D,$958F4252,$F6726433,$2532637B,$8D4B56D0,
+   $15E08D1C,$24CBD5FB,$E2B09016,$3AEF2559,$DA455336,$5AFCCF84,$F5DE6B9C,$51879765,
+   $C36B1FB4,$2917BDF2,$605129CE,$A7F5F356,$A1B440EC,$C1412963,$CA0B09B8,$3D2F1D9D,
+   $37F24F63,$A53BE30E,$A55DAC35,$5FF2E718,$1F49D6CD,$A2FBDBCA,$442471FE,$F7156C1F,
+   $61161285,$7A5E3ACF,$8E2F7846,$CA3A7182,$8848E209,$1B2AD83E,$E179DDCB,$A8E78B07,
+   $4A64C6F6,$EF96AC55,$00000000,$00000000,$38F5C320,$6013EADD,$1BA03A14,$3C4815B1,
+   $78385E07,$09B548B9,$ECF0271E,$226CE513,$BEFD9621,$63BAF2A9,$2D154E3C,$44D83F26,
+   $A694E1E8,$CDFA4946,$7678E90F,$113688F3,$8CA10ED0,$85991645,$0F078C43,$C52809D3,
+   $552D103B,$4D6D779F,$F7501D0A,$1E24F0A2,$D1AB33AC,$0167082C,$0960160C,$1438A06F,
+   $14A7B657,$F9601C62,$48EAB060,$A035CB92,$24755830,$50E09F49,$FF77304D,$D7B79954,
+   $B454CDF0,$E58AFC98,$86085501,$03A91874,$6F56A58D,$62DDFA85,$DEACBFEF,$C44F01FF,
+   $192E4C82,$73EB7276,$2EDC03E1,$D6D09178,$4304D0FA,$FBAE0C3A,$2C527577,$9973F6BF,
+   $A7D3DAA3,$105180DF,$4243EBB1,$2605C5A3,$85C118DC,$91A1B62A,$08272D47,$C99369F6,
+   $F2FECA98,$5D3CF740,$F1378745,$CF34591E,$D98C1EEB,$C8F461DA,$2F9B38AA,$0B7B58E1,
+   $4D4467F2,$E32DCC70,$E03EE680,$754C429E,$51C4FCE2,$D3DEB9E4,$68760489,$6E669AA0,
+   $C1E56922,$66B4DA35,$028E7696,$4FA367C7,$110961C5,$BA781B80,$520DB13F,$41D617BA,
+   $9A88CE11,$335A6DE0,$56E45DE6,$DF65D9C1,$773FD244,$CC9D416A,$2355F934,$5C5BFF6C,
+   $12C02C18,$2870B5DE,$D8CB25A0,$155FA843,$36B57428,$78902A97,$186977C9,$AE40BBEF,
+   $5A2A9C78,$88457E4C,$C6C5C826,$6A0FBA10,$1E0EED86,$7F501253,$F49950D7,$8C2C5EFC,
+   $CD2BA8BC,$31947DB8,$BC73E0B7,$2C19956E,$3D5B14B2,$230BED3F,$40CD9D27,$69A6A264,
+   $0AA95BD1,$86300E31,$69313FC2,$B3CD5339,$0E40B708,$1883C04A,$BD34DBFC,$F1B25CF7,
+   $3A7BB5B6,$2FB08D1A,$7E5FC448,$D8A5E105,$01473B4B,$DDABC999,$874F6E4A,$DE02D1ED,
+   $39B2F86B,$BDB82344,$DD65F232,$5647AFA1,$EBD0861A,$2ED78536,$B3746CF4,$E9319CBD,
+   $B1FA1A62,$A692FB7A,$3195D52C,$742B4AB2,$2B72D473,$95C8969A,$E95EF08C,$6174E2F1,
+   $C50C85FB,$F807144E,$BFBAAD6A,$BE113B30,$29FCA2E5,$DA6BF15D,$C0A25269,$BB1F13AC),
+  ($F9E37BF9,$C22B27F0,$0955EF09,$93FAD23F,$A22A91A2,$32ED4B84,$CC61B1CC,$3898B57B,
+   $AD98E5AD,$55825BA9,$9421EC94,$B2EEB806,$CE3C6BCE,$C7EB5875,$1F45851F,$4B1DAC5D,
+   $4705D847,$C16BA120,$1A2BA91A,$C5380F46,$909BAD90,$B908971A,$763D5376,$303E1CB7,
+   $53486853,$E6FF324C,$61F95461,$6D1AEED2,$6AF1616A,$0193D1E3,$F0B694F0,$51D1F5CF,
+   $2728E127,$29B2C3F5,$EB4950EB,$112A768E,$6F9F4D6F,$8FB672F8,$5BC9EA5B,$F0C66C74,
+   $2FA9632F,$3F8B9DCD,$DBA5B6DB,$65BC471E,$967C3696,$4D9D5508,$18767318,$3A4BE248,
+   $144DB014,$2794936C,$99CE4299,$2AF24525,$75B4E475,$4A8E7DBE,$3A30BE3A,$9DDC82A6,
+   $4C0DED4C,$ADE29E11,$C6BDE9C6,$D1D2064D,$E04165E0,$7DA349BF,$E8C0E7E8,$6B9A1787,
+   $F6510FF6,$A54437DD,$2392A023,$2254ECE9,$BD6F14BD,$79F0E7D9,$798F2779,$57510C9A,
+   $2B13222B,$346DB2D1,$C76984C7,$54118A4A,$83E5EB83,$EFCA4A63,$43BF9943,$CA8D8E3C,
+   $BCBB79BC,$FC336BDE,$45580245,$3E184C2E,$06E79B06,$F495C212,$025DDA02,$FF73ED0E,
+   $CFE806CF,$4228D472,$A744BDA7,$BCC8E89F,$C5345EC5,$AB626744,$C90F9DC9,$B6BD1660,
+   $A3FEFCA3,$B72EC783,$32B13C32,$8BE5DC9E,$A1A326A1,$485D2A8D,$A4CD0AA4,$C6788996,
+   $1BFFC41B,$40FB8341,$BA5CE2BA,$08A6A9CC,$E52F49E5,$F386EAA4,$EFF311EF,$1ACC5992,
+   $1599DD15,$A2571F6B,$46D1B546,$44A82D27,$6DC2976D,$70C59FF6,$BB888FBB,$8D6525CB,
+   $3E8AFF3E,$963AADBA,$8AB0048A,$7C30985C,$EC7AA6EC,$607C389B,$7BD2FD7B,$A822E194,
+   $BEE6A3BE,$034086D0,$65431565,$66FCC1CE,$FED08DFE,$B37D69E5,$AE1152AE,$2F323AA0,
+   $137E4613,$56C2DD79,$1CCC321C,$31ADCD54,$F5D8B8F5,$DFF456D4,$8B64698B,$F9F3145B,
+   $E4FB24E4,$764566A3,$E77293E7,$0CF507AA,$4AEA764A,$59775C03,$FA6ACCFA,$B89B46F9,
+   $602D3960,$E8D962D5,$6270E362,$17AA8FDB,$66CAA266,$1C4CA0C7,$7A06907A,$2DE16D93,
+   $C05A72C0,$2547C45F,$59943059,$0FB5817A,$8939B389,$0680F955,$08818208,$16395E38,
+   $26FC8C26,$AC714FF2,$11239C11,$A9B13077,$3D03483D,$EC8ACCB3,$0B08350B,$6C893F31,
+   $70DAC870,$C4ABDEA5,$2E7D0E2E,$BA4811CA,$31388B31,$F155BD97,$21CF7A21,$DD2701E7,
+   $0ADC580A,$E94AB336,$4963C149,$23C73D0A,$7D35667D,$5CB72386,$9A47F59A,$5042242C,
+   $5115B251,$198CDF42,$6E4B206E,$0A75FEFF,$D64A18D6,$FDA0BA3D,$1E91E81E,$CEDE205A,
+   $AC4C88AC,$D041D7AE,$875FAA87,$E42C657F,$FF04E0FF,$36BEE5E2,$B5EE96B5,$6FC9B9E1,
+   $671ECF67,$998F2CC0,$12AA2B12,$D301517E,$F2EB4EF2,$AEA218C1,$C207A8C2,$DA342951,
+   $868BC786,$61EFE978,$3456A734,$7F701E8C,$04BA4104,$0BE62F1C,$DD422DDD,$9129850C,
+   $25753B25,$D6C12EFB,$64977864,$E33F4DC9,$B66721B6,$1579D8E8,$E19508E1,$F860C5B8,
+   $30ECE630,$74963190,$8C579F8C,$88A55A4E,$74608974,$CF4DF1B9,$81B83181,$10B9A76D,
+   $33655133,$0E265099,$A51967A5,$43BB0591,$63A48E63,$926903DC,$50C1DF50,$9C4F5345,
+   $72871272,$3BD833AB,$9CA06E9C,$A4D7E63E,$1D185F1D,$B46E4153,$55AFF355,$126AF05E,
+   $AAAB13AA,$24D415BC,$B2DD60B2,$1E9FF7F4,$37DF1037,$05C07F85,$92C67792,$467B7A14,
+   $F78562F7,$2087BBDA,$5CFA1C5C,$81902261,$A0774BA0,$CD9EA68A,$2246CD22,$A79760EE,
+   $88EDDE88,$83437552,$201B1720,$58E48DE0,$B9D555B9,$7216C8C5,$95F58195,$372D3401,
+   $AB7F7EAB,$A11799BB,$EE277CEE,$9F0FD595,$0FB2740F,$676F102D,$84D61D84,$9E9C0476,
+   $CB5247CB,$49CEFB6E,$F162F9F1,$D41279C8,$D82C01D8,$1F0C2617,$547B9E54,$97A97C59,
+   $39B90939,$E76CE3AF,$93121A93,$C3B8F613,$9EFDB49E,$5BA40B30,$B43AFBB4,$EA0A35E6,
+   $F40CD5F4,$5A37DAD3,$DC9640DC,$14EA090B,$A922A4A9,$5E6474B5,$68ACBB68,$FEE03CED,
+   $E3C8D2E3,$071328B6,$24A15624,$5302A2FC,$01D46D01,$85C38C07,$FBBEA1FB,$3D58CAFE,
+   $6B250C6B,$84505DE4,$B154D7B1,$642F96FD,$19A21E19,$BF886E4F,$D417C2D4,$02D35733,
+   $56264456,$68DA9157,$D5C3AFD5,$8710DB34,$8D83F28D,$0D66D649,$6978D669,$7B23B0EA,
+   $85027085,$1B5F8871,$914FC091,$3CCB1B1D,$5D2E715D,$0453AE66,$294EF829,$CB1E5FDF,
+   $D2F059D2,$F6469521,$40362E40,$B03DEF35,$529C0552,$633CBE4B,$B80138B8,$F7D544C2,
+   $0389B703,$7AB06109,$00000000,$00000000,$A8F6C9A8,$DBA7F8B2,$41E24341,$35FE6332,
+   $9D74039D,$21146A39,$9B93989B,$D581A82B,$D0AD83D0,$0935782F,$C3D3C5C3,$5FF7A556,
+   $981A2F98,$AF31C922,$B7B34CB7,$90BA54EF,$4E50374E,$5291731F,$2DF4B92D,$C0F870C3,
+   $5EA7C65E,$7EE3CF6F,$DA71DBDA,$E07FCB19,$289A9528,$4EDDD3D8,$3F5E923F,$13F921BD,
+   $6C16FA6C,$F50613F1,$0DEFAE0D,$981CFD23,$FC8D57FC,$4C0E84EB,$E21CBFE2,$82D0A4B1,
+   $E6A6FEE6,$89368BAD,$785B4A78,$D292809D,$F83716F8,$47E8ABF7,$056E2C05,$8E25A31B,
+   $4F845A4F,$D752FF18,$CA862ACA,$CC0D7769,$3CD7253C,$694940B4,$C4E033C4,$2EA1EB43,
+   $9F29D99F,$DE678737,$3BE4D33B,$181F0EA1,$710EA571,$416852A2,$386D6438,$62AF6FA8,
+   $C18E1FC1,$A0844858,$C8DBF0C8,$337E9A67,$10F7F110,$2C72BC70,$CDB5DCCD,$BD5B397C,
+   $16106A16,$D8E77E62,$BF32CEBF,$86830AD7,$426BF442,$4F4E023B,$EDAECBED,$E5BFB49C,
+   $58405D58,$8A760D7D,$0E66190E,$E2AC9C2A,$77E93E77,$B5FD90B0,$4B3E1B4B,$DCB4D004,
+   $2C20D42C,$453BFCC4,$57F22957,$ED191D50,$B080BAB0,$E1EC1AFA,$E9148AE9,$EE599B80,
+   $7EBCD17E,$2607428F,$17C40717,$5D24F265,$82318682,$6A09C664,$48B7AC48,$A604B10D,
+   $73537F73,$BE1BBFAC,$4DD9804D,$28211216,$5A1D875A,$7505E073,$D32434D3,$73851926,
+   $7CE10B7C,$D974AF81,$DECB9ADE,$EB99E405,$B3090DB3,$9B5C7BF3,$3582CA35,$FAB3928B,
+   $360B7D36,$8003F382,$EA9D3DEA,$94E9FA89,$2AC74F2A,$B1AE3ED6,$D9F86CD9,$9ACFAA10,
+   $A690D0A6,$390B6498,$8FDE288F,$F2153B47,$0733F607,$71564E15,$7F68BC7F,$A3C4CE88,
+   $AFC53FAF,$AAF1B6A7,$0C3BC30C,$1DDF7124,$8E0A458E,$77D6B740,$F33F23F3,$2B6194C6,
+   $FD593AFD,$C9CD08EC,$97A85B97,$C85ED90F,$D179EED1,$8CF6F428,$806C5C80,$957A2B6A,
+   $448C6F44,$BBDBC029,$D79E75D7,$7863363A,$DF1FF7DF,$6E5A6802,$5F73AB5F,$FB204368));
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROcipher1.inc b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROcipher1.inc
new file mode 100644
index 0000000..95f6bc2
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODEC/uROcipher1.inc	
@@ -0,0 +1,1013 @@
+const
+  Cast128_Data: array[0..3, 0..255] of LongWord = (
+   ($30FB40D4,$9FA0FF0B,$6BECCD2F,$3F258C7A,$1E213F2F,$9C004DD3,$6003E540,$CF9FC949,
+    $BFD4AF27,$88BBBDB5,$E2034090,$98D09675,$6E63A0E0,$15C361D2,$C2E7661D,$22D4FF8E,
+    $28683B6F,$C07FD059,$FF2379C8,$775F50E2,$43C340D3,$DF2F8656,$887CA41A,$A2D2BD2D,
+    $A1C9E0D6,$346C4819,$61B76D87,$22540F2F,$2ABE32E1,$AA54166B,$22568E3A,$A2D341D0,
+    $66DB40C8,$A784392F,$004DFF2F,$2DB9D2DE,$97943FAC,$4A97C1D8,$527644B7,$B5F437A7,
+    $B82CBAEF,$D751D159,$6FF7F0ED,$5A097A1F,$827B68D0,$90ECF52E,$22B0C054,$BC8E5935,
+    $4B6D2F7F,$50BB64A2,$D2664910,$BEE5812D,$B7332290,$E93B159F,$B48EE411,$4BFF345D,
+    $FD45C240,$AD31973F,$C4F6D02E,$55FC8165,$D5B1CAAD,$A1AC2DAE,$A2D4B76D,$C19B0C50,
+    $882240F2,$0C6E4F38,$A4E4BFD7,$4F5BA272,$564C1D2F,$C59C5319,$B949E354,$B04669FE,
+    $B1B6AB8A,$C71358DD,$6385C545,$110F935D,$57538AD5,$6A390493,$E63D37E0,$2A54F6B3,
+    $3A787D5F,$6276A0B5,$19A6FCDF,$7A42206A,$29F9D4D5,$F61B1891,$BB72275E,$AA508167,
+    $38901091,$C6B505EB,$84C7CB8C,$2AD75A0F,$874A1427,$A2D1936B,$2AD286AF,$AA56D291,
+    $D7894360,$425C750D,$93B39E26,$187184C9,$6C00B32D,$73E2BB14,$A0BEBC3C,$54623779,
+    $64459EAB,$3F328B82,$7718CF82,$59A2CEA6,$04EE002E,$89FE78E6,$3FAB0950,$325FF6C2,
+    $81383F05,$6963C5C8,$76CB5AD6,$D49974C9,$CA180DCF,$380782D5,$C7FA5CF6,$8AC31511,
+    $35E79E13,$47DA91D0,$F40F9086,$A7E2419E,$31366241,$051EF495,$AA573B04,$4A805D8D,
+    $548300D0,$00322A3C,$BF64CDDF,$BA57A68E,$75C6372B,$50AFD341,$A7C13275,$915A0BF5,
+    $6B54BFAB,$2B0B1426,$AB4CC9D7,$449CCD82,$F7FBF265,$AB85C5F3,$1B55DB94,$AAD4E324,
+    $CFA4BD3F,$2DEAA3E2,$9E204D02,$C8BD25AC,$EADF55B3,$D5BD9E98,$E31231B2,$2AD5AD6C,
+    $954329DE,$ADBE4528,$D8710F69,$AA51C90F,$AA786BF6,$22513F1E,$AA51A79B,$2AD344CC,
+    $7B5A41F0,$D37CFBAD,$1B069505,$41ECE491,$B4C332E6,$032268D4,$C9600ACC,$CE387E6D,
+    $BF6BB16C,$6A70FB78,$0D03D9C9,$D4DF39DE,$E01063DA,$4736F464,$5AD328D8,$B347CC96,
+    $75BB0FC3,$98511BFB,$4FFBCC35,$B58BCF6A,$E11F0ABC,$BFC5FE4A,$A70AEC10,$AC39570A,
+    $3F04442F,$6188B153,$E0397A2E,$5727CB79,$9CEB418F,$1CACD68D,$2AD37C96,$0175CB9D,
+    $C69DFF09,$C75B65F0,$D9DB40D8,$EC0E7779,$4744EAD4,$B11C3274,$DD24CB9E,$7E1C54BD,
+    $F01144F9,$D2240EB1,$9675B3FD,$A3AC3755,$D47C27AF,$51C85F4D,$56907596,$A5BB15E6,
+    $580304F0,$CA042CF1,$011A37EA,$8DBFAADB,$35BA3E4A,$3526FFA0,$C37B4D09,$BC306ED9,
+    $98A52666,$5648F725,$FF5E569D,$0CED63D0,$7C63B2CF,$700B45E1,$D5EA50F1,$85A92872,
+    $AF1FBDA7,$D4234870,$A7870BF3,$2D3B4D79,$42E04198,$0CD0EDE7,$26470DB8,$F881814C,
+    $474D6AD7,$7C0C5E5C,$D1231959,$381B7298,$F5D2F4DB,$AB838653,$6E2F1E23,$83719C9E,
+    $BD91E046,$9A56456E,$DC39200C,$20C8C571,$962BDA1C,$E1E696FF,$B141AB08,$7CCA89B9,
+    $1A69E783,$02CC4843,$A2F7C579,$429EF47D,$427B169C,$5AC9F049,$DD8F0F00,$5C8165BF),
+   ($1F201094,$EF0BA75B,$69E3CF7E,$393F4380,$FE61CF7A,$EEC5207A,$55889C94,$72FC0651,
+    $ADA7EF79,$4E1D7235,$D55A63CE,$DE0436BA,$99C430EF,$5F0C0794,$18DCDB7D,$A1D6EFF3,
+    $A0B52F7B,$59E83605,$EE15B094,$E9FFD909,$DC440086,$EF944459,$BA83CCB3,$E0C3CDFB,
+    $D1DA4181,$3B092AB1,$F997F1C1,$A5E6CF7B,$01420DDB,$E4E7EF5B,$25A1FF41,$E180F806,
+    $1FC41080,$179BEE7A,$D37AC6A9,$FE5830A4,$98DE8B7F,$77E83F4E,$79929269,$24FA9F7B,
+    $E113C85B,$ACC40083,$D7503525,$F7EA615F,$62143154,$0D554B63,$5D681121,$C866C359,
+    $3D63CF73,$CEE234C0,$D4D87E87,$5C672B21,$071F6181,$39F7627F,$361E3084,$E4EB573B,
+    $602F64A4,$D63ACD9C,$1BBC4635,$9E81032D,$2701F50C,$99847AB4,$A0E3DF79,$BA6CF38C,
+    $10843094,$2537A95E,$F46F6FFE,$A1FF3B1F,$208CFB6A,$8F458C74,$D9E0A227,$4EC73A34,
+    $FC884F69,$3E4DE8DF,$EF0E0088,$3559648D,$8A45388C,$1D804366,$721D9BFD,$A58684BB,
+    $E8256333,$844E8212,$128D8098,$FED33FB4,$CE280AE1,$27E19BA5,$D5A6C252,$E49754BD,
+    $C5D655DD,$EB667064,$77840B4D,$A1B6A801,$84DB26A9,$E0B56714,$21F043B7,$E5D05860,
+    $54F03084,$066FF472,$A31AA153,$DADC4755,$B5625DBF,$68561BE6,$83CA6B94,$2D6ED23B,
+    $ECCF01DB,$A6D3D0BA,$B6803D5C,$AF77A709,$33B4A34C,$397BC8D6,$5EE22B95,$5F0E5304,
+    $81ED6F61,$20E74364,$B45E1378,$DE18639B,$881CA122,$B96726D1,$8049A7E8,$22B7DA7B,
+    $5E552D25,$5272D237,$79D2951C,$C60D894C,$488CB402,$1BA4FE5B,$A4B09F6B,$1CA815CF,
+    $A20C3005,$8871DF63,$B9DE2FCB,$0CC6C9E9,$0BEEFF53,$E3214517,$B4542835,$9F63293C,
+    $EE41E729,$6E1D2D7C,$50045286,$1E6685F3,$F33401C6,$30A22C95,$31A70850,$60930F13,
+    $73F98417,$A1269859,$EC645C44,$52C877A9,$CDFF33A6,$A02B1741,$7CBAD9A2,$2180036F,
+    $50D99C08,$CB3F4861,$C26BD765,$64A3F6AB,$80342676,$25A75E7B,$E4E6D1FC,$20C710E6,
+    $CDF0B680,$17844D3B,$31EEF84D,$7E0824E4,$2CCB49EB,$846A3BAE,$8FF77888,$EE5D60F6,
+    $7AF75673,$2FDD5CDB,$A11631C1,$30F66F43,$B3FAEC54,$157FD7FA,$EF8579CC,$D152DE58,
+    $DB2FFD5E,$8F32CE19,$306AF97A,$02F03EF8,$99319AD5,$C242FA0F,$A7E3EBB0,$C68E4906,
+    $B8DA230C,$80823028,$DCDEF3C8,$D35FB171,$088A1BC8,$BEC0C560,$61A3C9E8,$BCA8F54D,
+    $C72FEFFA,$22822E99,$82C570B4,$D8D94E89,$8B1C34BC,$301E16E6,$273BE979,$B0FFEAA6,
+    $61D9B8C6,$00B24869,$B7FFCE3F,$08DC283B,$43DAF65A,$F7E19798,$7619B72F,$8F1C9BA4,
+    $DC8637A0,$16A7D3B1,$9FC393B7,$A7136EEB,$C6BCC63E,$1A513742,$EF6828BC,$520365D6,
+    $2D6A77AB,$3527ED4B,$821FD216,$095C6E2E,$DB92F2FB,$5EEA29CB,$145892F5,$91584F7F,
+    $5483697B,$2667A8CC,$85196048,$8C4BACEA,$833860D4,$0D23E0F9,$6C387E8A,$0AE6D249,
+    $B284600C,$D835731D,$DCB1C647,$AC4C56EA,$3EBD81B3,$230EABB0,$6438BC87,$F0B5B1FA,
+    $8F5EA2B3,$FC184642,$0A036B7A,$4FB089BD,$649DA589,$A345415E,$5C038323,$3E5D3BB9,
+    $43D79572,$7E6DD07C,$06DFDF1E,$6C6CC4EF,$7160A539,$73BFBE70,$83877605,$4523ECF1),
+   ($8DEFC240,$25FA5D9F,$EB903DBF,$E810C907,$47607FFF,$369FE44B,$8C1FC644,$AECECA90,
+    $BEB1F9BF,$EEFBCAEA,$E8CF1950,$51DF07AE,$920E8806,$F0AD0548,$E13C8D83,$927010D5,
+    $11107D9F,$07647DB9,$B2E3E4D4,$3D4F285E,$B9AFA820,$FADE82E0,$A067268B,$8272792E,
+    $553FB2C0,$489AE22B,$D4EF9794,$125E3FBC,$21FFFCEE,$825B1BFD,$9255C5ED,$1257A240,
+    $4E1A8302,$BAE07FFF,$528246E7,$8E57140E,$3373F7BF,$8C9F8188,$A6FC4EE8,$C982B5A5,
+    $A8C01DB7,$579FC264,$67094F31,$F2BD3F5F,$40FFF7C1,$1FB78DFC,$8E6BD2C1,$437BE59B,
+    $99B03DBF,$B5DBC64B,$638DC0E6,$55819D99,$A197C81C,$4A012D6E,$C5884A28,$CCC36F71,
+    $B843C213,$6C0743F1,$8309893C,$0FEDDD5F,$2F7FE850,$D7C07F7E,$02507FBF,$5AFB9A04,
+    $A747D2D0,$1651192E,$AF70BF3E,$58C31380,$5F98302E,$727CC3C4,$0A0FB402,$0F7FEF82,
+    $8C96FDAD,$5D2C2AAE,$8EE99A49,$50DA88B8,$8427F4A0,$1EAC5790,$796FB449,$8252DC15,
+    $EFBD7D9B,$A672597D,$ADA840D8,$45F54504,$FA5D7403,$E83EC305,$4F91751A,$925669C2,
+    $23EFE941,$A903F12E,$60270DF2,$0276E4B6,$94FD6574,$927985B2,$8276DBCB,$02778176,
+    $F8AF918D,$4E48F79E,$8F616DDF,$E29D840E,$842F7D83,$340CE5C8,$96BBB682,$93B4B148,
+    $EF303CAB,$984FAF28,$779FAF9B,$92DC560D,$224D1E20,$8437AA88,$7D29DC96,$2756D3DC,
+    $8B907CEE,$B51FD240,$E7C07CE3,$E566B4A1,$C3E9615E,$3CF8209D,$6094D1E3,$CD9CA341,
+    $5C76460E,$00EA983B,$D4D67881,$FD47572C,$F76CEDD9,$BDA8229C,$127DADAA,$438A074E,
+    $1F97C090,$081BDB8A,$93A07EBE,$B938CA15,$97B03CFF,$3DC2C0F8,$8D1AB2EC,$64380E51,
+    $68CC7BFB,$D90F2788,$12490181,$5DE5FFD4,$DD7EF86A,$76A2E214,$B9A40368,$925D958F,
+    $4B39FFFA,$BA39AEE9,$A4FFD30B,$FAF7933B,$6D498623,$193CBCFA,$27627545,$825CF47A,
+    $61BD8BA0,$D11E42D1,$CEAD04F4,$127EA392,$10428DB7,$8272A972,$9270C4A8,$127DE50B,
+    $285BA1C8,$3C62F44F,$35C0EAA5,$E805D231,$428929FB,$B4FCDF82,$4FB66A53,$0E7DC15B,
+    $1F081FAB,$108618AE,$FCFD086D,$F9FF2889,$694BCC11,$236A5CAE,$12DECA4D,$2C3F8CC5,
+    $D2D02DFE,$F8EF5896,$E4CF52DA,$95155B67,$494A488C,$B9B6A80C,$5C8F82BC,$89D36B45,
+    $3A609437,$EC00C9A9,$44715253,$0A874B49,$D773BC40,$7C34671C,$02717EF6,$4FEB5536,
+    $A2D02FFF,$D2BF60C4,$D43F03C0,$50B4EF6D,$07478CD1,$006E1888,$A2E53F55,$B9E6D4BC,
+    $A2048016,$97573833,$D7207D67,$DE0F8F3D,$72F87B33,$ABCC4F33,$7688C55D,$7B00A6B0,
+    $947B0001,$570075D2,$F9BB88F8,$8942019E,$4264A5FF,$856302E0,$72DBD92B,$EE971B69,
+    $6EA22FDE,$5F08AE2B,$AF7A616D,$E5C98767,$CF1FEBD2,$61EFC8C2,$F1AC2571,$CC8239C2,
+    $67214CB8,$B1E583D1,$B7DC3E62,$7F10BDCE,$F90A5C38,$0FF0443D,$606E6DC6,$60543A49,
+    $5727C148,$2BE98A1D,$8AB41738,$20E1BE24,$AF96DA0F,$68458425,$99833BE5,$600D457D,
+    $282F9350,$8334B362,$D91D1120,$2B6D8DA0,$642B1E31,$9C305A00,$52BCE688,$1B03588A,
+    $F7BAEFD5,$4142ED9C,$A4315C11,$83323EC5,$DFEF4636,$A133C501,$E9D3531C,$EE353783),
+   ($9DB30420,$1FB6E9DE,$A7BE7BEF,$D273A298,$4A4F7BDB,$64AD8C57,$85510443,$FA020ED1,
+    $7E287AFF,$E60FB663,$095F35A1,$79EBF120,$FD059D43,$6497B7B1,$F3641F63,$241E4ADF,
+    $28147F5F,$4FA2B8CD,$C9430040,$0CC32220,$FDD30B30,$C0A5374F,$1D2D00D9,$24147B15,
+    $EE4D111A,$0FCA5167,$71FF904C,$2D195FFE,$1A05645F,$0C13FEFE,$081B08CA,$05170121,
+    $80530100,$E83E5EFE,$AC9AF4F8,$7FE72701,$D2B8EE5F,$06DF4261,$BB9E9B8A,$7293EA25,
+    $CE84FFDF,$F5718801,$3DD64B04,$A26F263B,$7ED48400,$547EEBE6,$446D4CA0,$6CF3D6F5,
+    $2649ABDF,$AEA0C7F5,$36338CC1,$503F7E93,$D3772061,$11B638E1,$72500E03,$F80EB2BB,
+    $ABE0502E,$EC8D77DE,$57971E81,$E14F6746,$C9335400,$6920318F,$081DBB99,$FFC304A5,
+    $4D351805,$7F3D5CE3,$A6C866C6,$5D5BCCA9,$DAEC6FEA,$9F926F91,$9F46222F,$3991467D,
+    $A5BF6D8E,$1143C44F,$43958302,$D0214EEB,$022083B8,$3FB6180C,$18F8931E,$281658E6,
+    $26486E3E,$8BD78A70,$7477E4C1,$B506E07C,$F32D0A25,$79098B02,$E4EABB81,$28123B23,
+    $69DEAD38,$1574CA16,$DF871B62,$211C40B7,$A51A9EF9,$0014377B,$041E8AC8,$09114003,
+    $BD59E4D2,$E3D156D5,$4FE876D5,$2F91A340,$557BE8DE,$00EAE4A7,$0CE5C2EC,$4DB4BBA6,
+    $E756BDFF,$DD3369AC,$EC17B035,$06572327,$99AFC8B0,$56C8C391,$6B65811C,$5E146119,
+    $6E85CB75,$BE07C002,$C2325577,$893FF4EC,$5BBFC92D,$D0EC3B25,$B7801AB7,$8D6D3B24,
+    $20C763EF,$C366A5FC,$9C382880,$0ACE3205,$AAC9548A,$ECA1D7C7,$041AFA32,$1D16625A,
+    $6701902C,$9B757A54,$31D477F7,$9126B031,$36CC6FDB,$C70B8B46,$D9E66A48,$56E55A79,
+    $026A4CEB,$52437EFF,$2F8F76B4,$0DF980A5,$8674CDE3,$EDDA04EB,$17A9BE04,$2C18F4DF,
+    $B7747F9D,$AB2AF7B4,$EFC34D20,$2E096B7C,$1741A254,$E5B6A035,$213D42F6,$2C1C7C26,
+    $61C2F50F,$6552DAF9,$D2C231F8,$25130F69,$D8167FA2,$0418F2C8,$001A96A6,$0D1526AB,
+    $63315C21,$5E0A72EC,$49BAFEFD,$187908D9,$8D0DBD86,$311170A7,$3E9B640C,$CC3E10D7,
+    $D5CAD3B6,$0CAEC388,$F73001E1,$6C728AFF,$71EAE2A1,$1F9AF36E,$CFCBD12F,$C1DE8417,
+    $AC07BE6B,$CB44A1D8,$8B9B0F56,$013988C3,$B1C52FCA,$B4BE31CD,$D8782806,$12A3A4E2,
+    $6F7DE532,$58FD7EB6,$D01EE900,$24ADFFC2,$F4990FC5,$9711AAC5,$001D7B95,$82E5E7D2,
+    $109873F6,$00613096,$C32D9521,$ADA121FF,$29908415,$7FBB977F,$AF9EB3DB,$29C9ED2A,
+    $5CE2A465,$A730F32C,$D0AA3FE8,$8A5CC091,$D49E2CE7,$0CE454A9,$D60ACD86,$015F1919,
+    $77079103,$DEA03AF6,$78A8565E,$DEE356DF,$21F05CBE,$8B75E387,$B3C50651,$B8A5C3EF,
+    $D8EEB6D2,$E523BE77,$C2154529,$2F69EFDF,$AFE67AFB,$F470C4B2,$F3E0EB5B,$D6CC9876,
+    $39E4460C,$1FDA8538,$1987832F,$CA007367,$A99144F8,$296B299E,$492FC295,$9266BEAB,
+    $B5676E69,$9BD3DDDA,$DF7E052F,$DB25701C,$1B5E51EE,$F65324E6,$6AFCE36C,$0316CC04,
+    $8644213E,$B7DC59D0,$7965291F,$CCD6FD43,$41823979,$932BCDF6,$B657C34D,$4EDFD282,
+    $7AE5290C,$3CB9536B,$851E20FE,$9833557E,$13ECF0B0,$D3FFB372,$3F85C5C1,$0AEF7ED2));
+
+  Cast128_Key: array[0..3, 0..255] of LongWord = (
+   ($7EC90C04,$2C6E74B9,$9B0E66DF,$A6337911,$B86A7FFF,$1DD358F5,$44DD9D44,$1731167F,
+    $08FBF1FA,$E7F511CC,$D2051B00,$735ABA00,$2AB722D8,$386381CB,$ACF6243A,$69BEFD7A,
+    $E6A2E77F,$F0C720CD,$C4494816,$CCF5C180,$38851640,$15B0A848,$E68B18CB,$4CAADEFF,
+    $5F480A01,$0412B2AA,$259814FC,$41D0EFE2,$4E40B48D,$248EB6FB,$8DBA1CFE,$41A99B02,
+    $1A550A04,$BA8F65CB,$7251F4E7,$95A51725,$C106ECD7,$97A5980A,$C539B9AA,$4D79FE6A,
+    $F2F3F763,$68AF8040,$ED0C9E56,$11B4958B,$E1EB5A88,$8709E6B0,$D7E07156,$4E29FEA7,
+    $6366E52D,$02D1C000,$C4AC8E05,$9377F571,$0C05372A,$578535F2,$2261BE02,$D642A0C9,
+    $DF13A280,$74B55BD2,$682199C0,$D421E5EC,$53FB3CE8,$C8ADEDB3,$28A87FC9,$3D959981,
+    $5C1FF900,$FE38D399,$0C4EFF0B,$062407EA,$AA2F4FB1,$4FB96976,$90C79505,$B0A8A774,
+    $EF55A1FF,$E59CA2C2,$A6B62D27,$E66A4263,$DF65001F,$0EC50966,$DFDD55BC,$29DE0655,
+    $911E739A,$17AF8975,$32C7911C,$89F89468,$0D01E980,$524755F4,$03B63CC9,$0CC844B2,
+    $BCF3F0AA,$87AC36E9,$E53A7426,$01B3D82B,$1A9E7449,$64EE2D7E,$CDDBB1DA,$01C94910,
+    $B868BF80,$0D26F3FD,$9342EDE7,$04A5C284,$636737B6,$50F5B616,$F24766E3,$8ECA36C1,
+    $136E05DB,$FEF18391,$FB887A37,$D6E7F7D4,$C7FB7DC9,$3063FCDF,$B6F589DE,$EC2941DA,
+    $26E46695,$B7566419,$F654EFC5,$D08D58B7,$48925401,$C1BACB7F,$E5FF550F,$B6083049,
+    $5BB5D0E8,$87D72E5A,$AB6A6EE1,$223A66CE,$C62BF3CD,$9E0885F9,$68CB3E47,$086C010F,
+    $A21DE820,$D18B69DE,$F3F65777,$FA02C3F6,$407EDAC3,$CBB3D550,$1793084D,$B0D70EBA,
+    $0AB378D5,$D951FB0C,$DED7DA56,$4124BBE4,$94CA0B56,$0F5755D1,$E0E1E56E,$6184B5BE,
+    $580A249F,$94F74BC0,$E327888E,$9F7B5561,$C3DC0280,$05687715,$646C6BD7,$44904DB3,
+    $66B4F0A3,$C0F1648A,$697ED5AF,$49E92FF6,$309E374F,$2CB6356A,$85808573,$4991F840,
+    $76F0AE02,$083BE84D,$28421C9A,$44489406,$736E4CB8,$C1092910,$8BC95FC6,$7D869CF4,
+    $134F616F,$2E77118D,$B31B2BE1,$AA90B472,$3CA5D717,$7D161BBA,$9CAD9010,$AF462BA2,
+    $9FE459D2,$45D34559,$D9F2DA13,$DBC65487,$F3E4F94E,$176D486F,$097C13EA,$631DA5C7,
+    $445F7382,$175683F4,$CDC66A97,$70BE0288,$B3CDCF72,$6E5DD2F3,$20936079,$459B80A5,
+    $BE60E2DB,$A9C23101,$EBA5315C,$224E42F2,$1C5C1572,$F6721B2C,$1AD2FFF3,$8C25404E,
+    $324ED72F,$4067B7FD,$0523138E,$5CA3BC78,$DC0FD66E,$75922283,$784D6B17,$58EBB16E,
+    $44094F85,$3F481D87,$FCFEAE7B,$77B5FF76,$8C2302BF,$AAF47556,$5F46B02A,$2B092801,
+    $3D38F5F7,$0CA81F36,$52AF4A8A,$66D5E7C0,$DF3B0874,$95055110,$1B5AD7A8,$F61ED5AD,
+    $6CF6E479,$20758184,$D0CEFA65,$88F7BE58,$4A046826,$0FF6F8F3,$A09C7F70,$5346ABA0,
+    $5CE96C28,$E176EDA3,$6BAC307F,$376829D2,$85360FA9,$17E3FE2A,$24B79767,$F5A96B20,
+    $D6CD2595,$68FF1EBF,$7555442C,$F19F06BE,$F9E0659A,$EEB9491D,$34010718,$BB30CAB8,
+    $E822FE15,$88570983,$750E6249,$DA627E55,$5E76FFA8,$B1534546,$6D47DE08,$EFE9E7D4),
+   ($F6FA8F9D,$2CAC6CE1,$4CA34867,$E2337F7C,$95DB08E7,$016843B4,$ECED5CBC,$325553AC,
+    $BF9F0960,$DFA1E2ED,$83F0579D,$63ED86B9,$1AB6A6B8,$DE5EBE39,$F38FF732,$8989B138,
+    $33F14961,$C01937BD,$F506C6DA,$E4625E7E,$A308EA99,$4E23E33C,$79CBD7CC,$48A14367,
+    $A3149619,$FEC94BD5,$A114174A,$EAA01866,$A084DB2D,$09A8486F,$A888614A,$2900AF98,
+    $01665991,$E1992863,$C8F30C60,$2E78EF3C,$D0D51932,$CF0FEC14,$F7CA07D2,$D0A82072,
+    $FD41197E,$9305A6B0,$E86BE3DA,$74BED3CD,$372DA53C,$4C7F4448,$DAB5D440,$6DBA0EC3,
+    $083919A7,$9FBAEED9,$49DBCFB0,$4E670C53,$5C3D9C01,$64BDB941,$2C0E636A,$BA7DD9CD,
+    $EA6F7388,$E70BC762,$35F29ADB,$5C4CDD8D,$F0D48D8C,$B88153E2,$08A19866,$1AE2EAC8,
+    $284CAF89,$AA928223,$9334BE53,$3B3A21BF,$16434BE3,$9AEA3906,$EFE8C36E,$F890CDD9,
+    $80226DAE,$C340A4A3,$DF7E9C09,$A694A807,$5B7C5ECC,$221DB3A6,$9A69A02F,$68818A54,
+    $CEB2296F,$53C0843A,$FE893655,$25BFE68A,$B4628ABC,$CF222EBF,$25AC6F48,$A9A99387,
+    $53BDDB65,$E76FFBE7,$E967FD78,$0BA93563,$8E342BC1,$E8A11BE9,$4980740D,$C8087DFC,
+    $8DE4BF99,$A11101A0,$7FD37975,$DA5A26C0,$E81F994F,$9528CD89,$FD339FED,$B87834BF,
+    $5F04456D,$22258698,$C9C4C83B,$2DC156BE,$4F628DAA,$57F55EC5,$E2220ABE,$D2916EBF,
+    $4EC75B95,$24F2C3C0,$42D15D99,$CD0D7FA0,$7B6E27FF,$A8DC8AF0,$7345C106,$F41E232F,
+    $35162386,$E6EA8926,$3333B094,$157EC6F2,$372B74AF,$692573E4,$E9A9D848,$F3160289,
+    $3A62EF1D,$A787E238,$F3A5F676,$74364853,$20951063,$4576698D,$B6FAD407,$592AF950,
+    $36F73523,$4CFB6E87,$7DA4CEC0,$6C152DAA,$CB0396A8,$C50DFE5D,$FCD707AB,$0921C42F,
+    $89DFF0BB,$5FE2BE78,$448F4F33,$754613C9,$2B05D08D,$48B9D585,$DC049441,$C8098F9B,
+    $7DEDE786,$C39A3373,$42410005,$6A091751,$0EF3C8A6,$890072D6,$28207682,$A9A9F7BE,
+    $BF32679D,$D45B5B75,$B353FD00,$CBB0E358,$830F220A,$1F8FB214,$D372CF08,$CC3C4A13,
+    $8CF63166,$061C87BE,$88C98F88,$6062E397,$47CF8E7A,$B6C85283,$3CC2ACFB,$3FC06976,
+    $4E8F0252,$64D8314D,$DA3870E3,$1E665459,$C10908F0,$513021A5,$6C5B68B7,$822F8AA0,
+    $3007CD3E,$74719EEF,$DC872681,$073340D4,$7E432FD9,$0C5EC241,$8809286C,$F592D891,
+    $08A930F6,$957EF305,$B7FBFFBD,$C266E96F,$6FE4AC98,$B173ECC0,$BC60B42A,$953498DA,
+    $FBA1AE12,$2D4BD736,$0F25FAAB,$A4F3FCEB,$E2969123,$257F0C3D,$9348AF49,$361400BC,
+    $E8816F4A,$3814F200,$A3F94043,$9C7A54C2,$BC704F57,$DA41E7F9,$C25AD33A,$54F4A084,
+    $B17F5505,$59357CBE,$EDBD15C8,$7F97C5AB,$BA5AC7B5,$B6F6DEAF,$3A479C3A,$5302DA25,
+    $653D7E6A,$54268D49,$51A477EA,$5017D55B,$D7D25D88,$44136C76,$0404A8C8,$B8E5A121,
+    $B81A928A,$60ED5869,$97C55B96,$EAEC991B,$29935913,$01FDB7F1,$088E8DFA,$9AB6F6F5,
+    $3B4CBF9F,$4A5DE3AB,$E6051D35,$A0E1D855,$D36B4CF1,$F544EDEB,$B0E93524,$BEBB8FBD,
+    $A2D762CF,$49C92F54,$38B5F331,$7128A454,$48392905,$A65B1DB8,$851C97BD,$D675CF2F),
+   ($85E04019,$332BF567,$662DBFFF,$CFC65693,$2A8D7F6F,$AB9BC912,$DE6008A1,$2028DA1F,
+    $0227BCE7,$4D642916,$18FAC300,$50F18B82,$2CB2CB11,$B232E75C,$4B3695F2,$B28707DE,
+    $A05FBCF6,$CD4181E9,$E150210C,$E24EF1BD,$B168C381,$FDE4E789,$5C79B0D8,$1E8BFD43,
+    $4D495001,$38BE4341,$913CEE1D,$92A79C3F,$089766BE,$BAEEADF4,$1286BECF,$B6EACB19,
+    $2660C200,$7565BDE4,$64241F7A,$8248DCA9,$C3B3AD66,$28136086,$0BD8DFA8,$356D1CF2,
+    $107789BE,$B3B2E9CE,$0502AA8F,$0BC0351E,$166BF52A,$EB12FF82,$E3486911,$D34D7516,
+    $4E7B3AFF,$5F43671B,$9CF6E037,$4981AC83,$334266CE,$8C9341B7,$D0D854C0,$CB3A6C88,
+    $47BC2829,$4725BA37,$A66AD22B,$7AD61F1E,$0C5CBAFA,$4437F107,$B6E79962,$42D2D816,
+    $0A961288,$E1A5C06E,$13749E67,$72FC081A,$B1D139F7,$F9583745,$CF19DF58,$BEC3F756,
+    $C06EBA30,$07211B24,$45C28829,$C95E317F,$BC8EC511,$38BC46E9,$C6E6FA14,$BAE8584A,
+    $AD4EBC46,$468F508B,$7829435F,$F124183B,$821DBA9F,$AFF60FF4,$EA2C4E6D,$16E39264,
+    $92544A8B,$009B4FC3,$ABA68CED,$9AC96F78,$06A5B79A,$B2856E6E,$1AEC3CA9,$BE838688,
+    $0E0804E9,$55F1BE56,$E7E5363B,$B3A1F25D,$F7DEBB85,$61FE033C,$16746233,$3C034C28,
+    $DA6D0C74,$79AAC56C,$3CE4E1AD,$51F0C802,$98F8F35A,$1626A49F,$EED82B29,$1D382FE3,
+    $0C4FB99A,$BB325778,$3EC6D97B,$6E77A6A9,$CB658B5C,$D45230C7,$2BD1408B,$60C03EB7,
+    $B9068D78,$A33754F4,$F430C87D,$C8A71302,$B96D8C32,$EBD4E7BE,$BE8B9D2D,$7979FB06,
+    $E7225308,$8B75CF77,$11EF8DA4,$E083C858,$8D6B786F,$5A6317A6,$FA5CF7A0,$5DDA0033,
+    $F28EBFB0,$F5B9C310,$A0EAC280,$08B9767A,$A3D9D2B0,$79D34217,$021A718D,$9AC6336A,
+    $2711FD60,$438050E3,$069908A8,$3D7FEDC4,$826D2BEF,$4EEB8476,$488DCF25,$36C9D566,
+    $28E74E41,$C2610ACA,$3D49A9CF,$BAE3B9DF,$B65F8DE6,$92AEAF64,$3AC7D5E6,$9EA80509,
+    $F22B017D,$A4173F70,$DD1E16C3,$15E0D7F9,$50B1B887,$2B9F4FD5,$625ABA82,$6A017962,
+    $2EC01B9C,$15488AA9,$D716E740,$40055A2C,$93D29A22,$E32DBF9A,$058745B9,$3453DC1E,
+    $D699296E,$496CFF6F,$1C9F4986,$DFE2ED07,$B87242D1,$19DE7EAE,$053E561A,$15AD6F8C,
+    $66626C1C,$7154C24C,$EA082B2A,$93EB2939,$17DCB0F0,$58D4F2AE,$9EA294FB,$52CF564C,
+    $9883FE66,$2EC40581,$763953C3,$01D6692E,$D3A0C108,$A1E7160E,$E4F2DFA6,$693ED285,
+    $74904698,$4C2B0EDD,$4F757656,$5D393378,$A132234F,$3D321C5D,$C3F5E194,$4B269301,
+    $C79F022F,$3C997E7E,$5E4F9504,$3FFAFBBD,$76F7AD0E,$296693F4,$3D1FCE6F,$C61E45BE,
+    $D3B5AB34,$F72BF9B7,$1B0434C0,$4E72B567,$5592A33D,$B5229301,$CFD2A87F,$60AEB767,
+    $1814386B,$30BCC33D,$38A0C07D,$FD1606F2,$C363519B,$589DD390,$5479F8E6,$1CB8D647,
+    $97FD61A9,$EA7759F4,$2D57539D,$569A58CF,$E84E63AD,$462E1B78,$6580F87E,$F3817914,
+    $91DA55F4,$40A230F3,$D1988F35,$B6E318D2,$3FFA50BC,$3D40F021,$C3C0BDAE,$4958C24C,
+    $518F36B2,$84B1D370,$0FEDCE83,$878DDADA,$F2A279C7,$94E01BE8,$90716F4B,$954B8AA3),
+   ($E216300D,$BBDDFFFC,$A7EBDABD,$35648095,$7789F8B7,$E6C1121B,$0E241600,$052CE8B5,
+    $11A9CFB0,$E5952F11,$ECE7990A,$9386D174,$2A42931C,$76E38111,$B12DEF3A,$37DDDDFC,
+    $DE9ADEB1,$0A0CC32C,$BE197029,$84A00940,$BB243A0F,$B4D137CF,$B44E79F0,$049EEDFD,
+    $0B15A15D,$480D3168,$8BBBDE5A,$669DED42,$C7ECE831,$3F8F95E7,$72DF191B,$7580330D,
+    $94074251,$5C7DCDFA,$ABBE6D63,$AA402164,$B301D40A,$02E7D1CA,$53571DAE,$7A3182A2,
+    $12A8DDEC,$FDAA335D,$176F43E8,$71FB46D4,$38129022,$CE949AD4,$B84769AD,$965BD862,
+    $82F3D055,$66FB9767,$15B80B4E,$1D5B47A0,$4CFDE06F,$C28EC4B8,$57E8726E,$647A78FC,
+    $99865D44,$608BD593,$6C200E03,$39DC5FF6,$5D0B00A3,$AE63AFF2,$7E8BD632,$70108C0C,
+    $BBD35049,$2998DF04,$980CF42A,$9B6DF491,$9E7EDD53,$06918548,$58CB7E07,$3B74EF2E,
+    $522FFFB1,$D24708CC,$1C7E27CD,$A4EB215B,$3CF1D2E2,$19B47A38,$424F7618,$35856039,
+    $9D17DEE7,$27EB35E6,$C9AFF67B,$36BAF5B8,$09C467CD,$C18910B1,$E11DBF7B,$06CD1AF8,
+    $7170C608,$2D5E3354,$D4DE495A,$64C6D006,$BCC0C62C,$3DD00DB3,$708F8F34,$77D51B42,
+    $264F620F,$24B8D2BF,$15C1B79E,$46A52564,$F8D7E54E,$3E378160,$7895CDA5,$859C15A5,
+    $E6459788,$C37BC75F,$DB07BA0C,$0676A3AB,$7F229B1E,$31842E7B,$24259FD7,$F8BEF472,
+    $835FFCB8,$6DF4C1F2,$96F5B195,$FD0AF0FC,$B0FE134C,$E2506D3D,$4F9B12EA,$F215F225,
+    $A223736F,$9FB4C428,$25D04979,$34C713F8,$C4618187,$EA7A6E98,$7CD16EFC,$1436876C,
+    $F1544107,$BEDEEE14,$56E9AF27,$A04AA441,$3CF7C899,$92ECBAE6,$DD67016D,$151682EB,
+    $A842EEDF,$FDBA60B4,$F1907B75,$20E3030F,$24D8C29E,$E139673B,$EFA63FB8,$71873054,
+    $B6F2CF3B,$9F326442,$CB15A4CC,$B01A4504,$F1E47D8D,$844A1BE5,$BAE7DFDC,$42CBDA70,
+    $CD7DAE0A,$57E85B7A,$D53F5AF6,$20CF4D8C,$CEA4D428,$79D130A4,$3486EBFB,$33D3CDDC,
+    $77853B53,$37EFFCB5,$C5068778,$E580B3E6,$4E68B8F4,$C5C8B37E,$0D809EA2,$398FEB7C,
+    $132A4F94,$43B7950E,$2FEE7D1C,$223613BD,$DD06CAA2,$37DF932B,$C4248289,$ACF3EBC3,
+    $5715F6B7,$EF3478DD,$F267616F,$C148CBE4,$9052815E,$5E410FAB,$B48A2465,$2EDA7FA4,
+    $E87B40E4,$E98EA084,$5889E9E1,$EFD390FC,$DD07D35B,$DB485694,$38D7E5B2,$57720101,
+    $730EDEBC,$5B643113,$94917E4F,$503C2FBA,$646F1282,$7523D24A,$E0779695,$F9C17A8F,
+    $7A5B2121,$D187B896,$29263A4D,$BA510CDF,$81F47C9F,$AD1163ED,$EA7B5965,$1A00726E,
+    $11403092,$00DA6D77,$4A0CDD61,$AD1F4603,$605BDFB0,$9EEDC364,$22EBE6A8,$CEE7D28A,
+    $A0E736A0,$5564A6B9,$10853209,$C7EB8F37,$2DE705CA,$8951570F,$DF09822B,$BD691A6C,
+    $AA12E4F2,$87451C0F,$E0F6A27A,$3ADA4819,$4CF1764F,$0D771C2B,$67CDB156,$350D8384,
+    $5938FA0F,$42399EF3,$36997B07,$0E84093D,$4AA93E61,$8360D87B,$1FA98B0C,$1149382C,
+    $E97625A5,$0614D1B7,$0E25244B,$0C768347,$589E8D82,$0D2059D1,$A466BB1E,$F8DA0A82,
+    $04F19130,$BA6E4EC0,$99265164,$1EE7230D,$50B2AD80,$EAEE6801,$8DB2A283,$EA8BF59E));
+
+  Cast256_Data: array[0..3, 0..255] of LongWord = (
+   ($30FB40D4,$9FA0FF0B,$6BECCD2F,$3F258C7A,$1E213F2F,$9C004DD3,$6003E540,$CF9FC949,
+    $BFD4AF27,$88BBBDB5,$E2034090,$98D09675,$6E63A0E0,$15C361D2,$C2E7661D,$22D4FF8E,
+    $28683B6F,$C07FD059,$FF2379C8,$775F50E2,$43C340D3,$DF2F8656,$887CA41A,$A2D2BD2D,
+    $A1C9E0D6,$346C4819,$61B76D87,$22540F2F,$2ABE32E1,$AA54166B,$22568E3A,$A2D341D0,
+    $66DB40C8,$A784392F,$004DFF2F,$2DB9D2DE,$97943FAC,$4A97C1D8,$527644B7,$B5F437A7,
+    $B82CBAEF,$D751D159,$6FF7F0ED,$5A097A1F,$827B68D0,$90ECF52E,$22B0C054,$BC8E5935,
+    $4B6D2F7F,$50BB64A2,$D2664910,$BEE5812D,$B7332290,$E93B159F,$B48EE411,$4BFF345D,
+    $FD45C240,$AD31973F,$C4F6D02E,$55FC8165,$D5B1CAAD,$A1AC2DAE,$A2D4B76D,$C19B0C50,
+    $882240F2,$0C6E4F38,$A4E4BFD7,$4F5BA272,$564C1D2F,$C59C5319,$B949E354,$B04669FE,
+    $B1B6AB8A,$C71358DD,$6385C545,$110F935D,$57538AD5,$6A390493,$E63D37E0,$2A54F6B3,
+    $3A787D5F,$6276A0B5,$19A6FCDF,$7A42206A,$29F9D4D5,$F61B1891,$BB72275E,$AA508167,
+    $38901091,$C6B505EB,$84C7CB8C,$2AD75A0F,$874A1427,$A2D1936B,$2AD286AF,$AA56D291,
+    $D7894360,$425C750D,$93B39E26,$187184C9,$6C00B32D,$73E2BB14,$A0BEBC3C,$54623779,
+    $64459EAB,$3F328B82,$7718CF82,$59A2CEA6,$04EE002E,$89FE78E6,$3FAB0950,$325FF6C2,
+    $81383F05,$6963C5C8,$76CB5AD6,$D49974C9,$CA180DCF,$380782D5,$C7FA5CF6,$8AC31511,
+    $35E79E13,$47DA91D0,$F40F9086,$A7E2419E,$31366241,$051EF495,$AA573B04,$4A805D8D,
+    $548300D0,$00322A3C,$BF64CDDF,$BA57A68E,$75C6372B,$50AFD341,$A7C13275,$915A0BF5,
+    $6B54BFAB,$2B0B1426,$AB4CC9D7,$449CCD82,$F7FBF265,$AB85C5F3,$1B55DB94,$AAD4E324,
+    $CFA4BD3F,$2DEAA3E2,$9E204D02,$C8BD25AC,$EADF55B3,$D5BD9E98,$E31231B2,$2AD5AD6C,
+    $954329DE,$ADBE4528,$D8710F69,$AA51C90F,$AA786BF6,$22513F1E,$AA51A79B,$2AD344CC,
+    $7B5A41F0,$D37CFBAD,$1B069505,$41ECE491,$B4C332E6,$032268D4,$C9600ACC,$CE387E6D,
+    $BF6BB16C,$6A70FB78,$0D03D9C9,$D4DF39DE,$E01063DA,$4736F464,$5AD328D8,$B347CC96,
+    $75BB0FC3,$98511BFB,$4FFBCC35,$B58BCF6A,$E11F0ABC,$BFC5FE4A,$A70AEC10,$AC39570A,
+    $3F04442F,$6188B153,$E0397A2E,$5727CB79,$9CEB418F,$1CACD68D,$2AD37C96,$0175CB9D,
+    $C69DFF09,$C75B65F0,$D9DB40D8,$EC0E7779,$4744EAD4,$B11C3274,$DD24CB9E,$7E1C54BD,
+    $F01144F9,$D2240EB1,$9675B3FD,$A3AC3755,$D47C27AF,$51C85F4D,$56907596,$A5BB15E6,
+    $580304F0,$CA042CF1,$011A37EA,$8DBFAADB,$35BA3E4A,$3526FFA0,$C37B4D09,$BC306ED9,
+    $98A52666,$5648F725,$FF5E569D,$0CED63D0,$7C63B2CF,$700B45E1,$D5EA50F1,$85A92872,
+    $AF1FBDA7,$D4234870,$A7870BF3,$2D3B4D79,$42E04198,$0CD0EDE7,$26470DB8,$F881814C,
+    $474D6AD7,$7C0C5E5C,$D1231959,$381B7298,$F5D2F4DB,$AB838653,$6E2F1E23,$83719C9E,
+    $BD91E046,$9A56456E,$DC39200C,$20C8C571,$962BDA1C,$E1E696FF,$B141AB08,$7CCA89B9,
+    $1A69E783,$02CC4843,$A2F7C579,$429EF47D,$427B169C,$5AC9F049,$DD8F0F00,$5C8165BF),
+   ($1F201094,$EF0BA75B,$69E3CF7E,$393F4380,$FE61CF7A,$EEC5207A,$55889C94,$72FC0651,
+    $ADA7EF79,$4E1D7235,$D55A63CE,$DE0436BA,$99C430EF,$5F0C0794,$18DCDB7D,$A1D6EFF3,
+    $A0B52F7B,$59E83605,$EE15B094,$E9FFD909,$DC440086,$EF944459,$BA83CCB3,$E0C3CDFB,
+    $D1DA4181,$3B092AB1,$F997F1C1,$A5E6CF7B,$01420DDB,$E4E7EF5B,$25A1FF41,$E180F806,
+    $1FC41080,$179BEE7A,$D37AC6A9,$FE5830A4,$98DE8B7F,$77E83F4E,$79929269,$24FA9F7B,
+    $E113C85B,$ACC40083,$D7503525,$F7EA615F,$62143154,$0D554B63,$5D681121,$C866C359,
+    $3D63CF73,$CEE234C0,$D4D87E87,$5C672B21,$071F6181,$39F7627F,$361E3084,$E4EB573B,
+    $602F64A4,$D63ACD9C,$1BBC4635,$9E81032D,$2701F50C,$99847AB4,$A0E3DF79,$BA6CF38C,
+    $10843094,$2537A95E,$F46F6FFE,$A1FF3B1F,$208CFB6A,$8F458C74,$D9E0A227,$4EC73A34,
+    $FC884F69,$3E4DE8DF,$EF0E0088,$3559648D,$8A45388C,$1D804366,$721D9BFD,$A58684BB,
+    $E8256333,$844E8212,$128D8098,$FED33FB4,$CE280AE1,$27E19BA5,$D5A6C252,$E49754BD,
+    $C5D655DD,$EB667064,$77840B4D,$A1B6A801,$84DB26A9,$E0B56714,$21F043B7,$E5D05860,
+    $54F03084,$066FF472,$A31AA153,$DADC4755,$B5625DBF,$68561BE6,$83CA6B94,$2D6ED23B,
+    $ECCF01DB,$A6D3D0BA,$B6803D5C,$AF77A709,$33B4A34C,$397BC8D6,$5EE22B95,$5F0E5304,
+    $81ED6F61,$20E74364,$B45E1378,$DE18639B,$881CA122,$B96726D1,$8049A7E8,$22B7DA7B,
+    $5E552D25,$5272D237,$79D2951C,$C60D894C,$488CB402,$1BA4FE5B,$A4B09F6B,$1CA815CF,
+    $A20C3005,$8871DF63,$B9DE2FCB,$0CC6C9E9,$0BEEFF53,$E3214517,$B4542835,$9F63293C,
+    $EE41E729,$6E1D2D7C,$50045286,$1E6685F3,$F33401C6,$30A22C95,$31A70850,$60930F13,
+    $73F98417,$A1269859,$EC645C44,$52C877A9,$CDFF33A6,$A02B1741,$7CBAD9A2,$2180036F,
+    $50D99C08,$CB3F4861,$C26BD765,$64A3F6AB,$80342676,$25A75E7B,$E4E6D1FC,$20C710E6,
+    $CDF0B680,$17844D3B,$31EEF84D,$7E0824E4,$2CCB49EB,$846A3BAE,$8FF77888,$EE5D60F6,
+    $7AF75673,$2FDD5CDB,$A11631C1,$30F66F43,$B3FAEC54,$157FD7FA,$EF8579CC,$D152DE58,
+    $DB2FFD5E,$8F32CE19,$306AF97A,$02F03EF8,$99319AD5,$C242FA0F,$A7E3EBB0,$C68E4906,
+    $B8DA230C,$80823028,$DCDEF3C8,$D35FB171,$088A1BC8,$BEC0C560,$61A3C9E8,$BCA8F54D,
+    $C72FEFFA,$22822E99,$82C570B4,$D8D94E89,$8B1C34BC,$301E16E6,$273BE979,$B0FFEAA6,
+    $61D9B8C6,$00B24869,$B7FFCE3F,$08DC283B,$43DAF65A,$F7E19798,$7619B72F,$8F1C9BA4,
+    $DC8637A0,$16A7D3B1,$9FC393B7,$A7136EEB,$C6BCC63E,$1A513742,$EF6828BC,$520365D6,
+    $2D6A77AB,$3527ED4B,$821FD216,$095C6E2E,$DB92F2FB,$5EEA29CB,$145892F5,$91584F7F,
+    $5483697B,$2667A8CC,$85196048,$8C4BACEA,$833860D4,$0D23E0F9,$6C387E8A,$0AE6D249,
+    $B284600C,$D835731D,$DCB1C647,$AC4C56EA,$3EBD81B3,$230EABB0,$6438BC87,$F0B5B1FA,
+    $8F5EA2B3,$FC184642,$0A036B7A,$4FB089BD,$649DA589,$A345415E,$5C038323,$3E5D3BB9,
+    $43D79572,$7E6DD07C,$06DFDF1E,$6C6CC4EF,$7160A539,$73BFBE70,$83877605,$4523ECF1),
+   ($8DEFC240,$25FA5D9F,$EB903DBF,$E810C907,$47607FFF,$369FE44B,$8C1FC644,$AECECA90,
+    $BEB1F9BF,$EEFBCAEA,$E8CF1950,$51DF07AE,$920E8806,$F0AD0548,$E13C8D83,$927010D5,
+    $11107D9F,$07647DB9,$B2E3E4D4,$3D4F285E,$B9AFA820,$FADE82E0,$A067268B,$8272792E,
+    $553FB2C0,$489AE22B,$D4EF9794,$125E3FBC,$21FFFCEE,$825B1BFD,$9255C5ED,$1257A240,
+    $4E1A8302,$BAE07FFF,$528246E7,$8E57140E,$3373F7BF,$8C9F8188,$A6FC4EE8,$C982B5A5,
+    $A8C01DB7,$579FC264,$67094F31,$F2BD3F5F,$40FFF7C1,$1FB78DFC,$8E6BD2C1,$437BE59B,
+    $99B03DBF,$B5DBC64B,$638DC0E6,$55819D99,$A197C81C,$4A012D6E,$C5884A28,$CCC36F71,
+    $B843C213,$6C0743F1,$8309893C,$0FEDDD5F,$2F7FE850,$D7C07F7E,$02507FBF,$5AFB9A04,
+    $A747D2D0,$1651192E,$AF70BF3E,$58C31380,$5F98302E,$727CC3C4,$0A0FB402,$0F7FEF82,
+    $8C96FDAD,$5D2C2AAE,$8EE99A49,$50DA88B8,$8427F4A0,$1EAC5790,$796FB449,$8252DC15,
+    $EFBD7D9B,$A672597D,$ADA840D8,$45F54504,$FA5D7403,$E83EC305,$4F91751A,$925669C2,
+    $23EFE941,$A903F12E,$60270DF2,$0276E4B6,$94FD6574,$927985B2,$8276DBCB,$02778176,
+    $F8AF918D,$4E48F79E,$8F616DDF,$E29D840E,$842F7D83,$340CE5C8,$96BBB682,$93B4B148,
+    $EF303CAB,$984FAF28,$779FAF9B,$92DC560D,$224D1E20,$8437AA88,$7D29DC96,$2756D3DC,
+    $8B907CEE,$B51FD240,$E7C07CE3,$E566B4A1,$C3E9615E,$3CF8209D,$6094D1E3,$CD9CA341,
+    $5C76460E,$00EA983B,$D4D67881,$FD47572C,$F76CEDD9,$BDA8229C,$127DADAA,$438A074E,
+    $1F97C090,$081BDB8A,$93A07EBE,$B938CA15,$97B03CFF,$3DC2C0F8,$8D1AB2EC,$64380E51,
+    $68CC7BFB,$D90F2788,$12490181,$5DE5FFD4,$DD7EF86A,$76A2E214,$B9A40368,$925D958F,
+    $4B39FFFA,$BA39AEE9,$A4FFD30B,$FAF7933B,$6D498623,$193CBCFA,$27627545,$825CF47A,
+    $61BD8BA0,$D11E42D1,$CEAD04F4,$127EA392,$10428DB7,$8272A972,$9270C4A8,$127DE50B,
+    $285BA1C8,$3C62F44F,$35C0EAA5,$E805D231,$428929FB,$B4FCDF82,$4FB66A53,$0E7DC15B,
+    $1F081FAB,$108618AE,$FCFD086D,$F9FF2889,$694BCC11,$236A5CAE,$12DECA4D,$2C3F8CC5,
+    $D2D02DFE,$F8EF5896,$E4CF52DA,$95155B67,$494A488C,$B9B6A80C,$5C8F82BC,$89D36B45,
+    $3A609437,$EC00C9A9,$44715253,$0A874B49,$D773BC40,$7C34671C,$02717EF6,$4FEB5536,
+    $A2D02FFF,$D2BF60C4,$D43F03C0,$50B4EF6D,$07478CD1,$006E1888,$A2E53F55,$B9E6D4BC,
+    $A2048016,$97573833,$D7207D67,$DE0F8F3D,$72F87B33,$ABCC4F33,$7688C55D,$7B00A6B0,
+    $947B0001,$570075D2,$F9BB88F8,$8942019E,$4264A5FF,$856302E0,$72DBD92B,$EE971B69,
+    $6EA22FDE,$5F08AE2B,$AF7A616D,$E5C98767,$CF1FEBD2,$61EFC8C2,$F1AC2571,$CC8239C2,
+    $67214CB8,$B1E583D1,$B7DC3E62,$7F10BDCE,$F90A5C38,$0FF0443D,$606E6DC6,$60543A49,
+    $5727C148,$2BE98A1D,$8AB41738,$20E1BE24,$AF96DA0F,$68458425,$99833BE5,$600D457D,
+    $282F9350,$8334B362,$D91D1120,$2B6D8DA0,$642B1E31,$9C305A00,$52BCE688,$1B03588A,
+    $F7BAEFD5,$4142ED9C,$A4315C11,$83323EC5,$DFEF4636,$A133C501,$E9D3531C,$EE353783),
+   ($9DB30420,$1FB6E9DE,$A7BE7BEF,$D273A298,$4A4F7BDB,$64AD8C57,$85510443,$FA020ED1,
+    $7E287AFF,$E60FB663,$095F35A1,$79EBF120,$FD059D43,$6497B7B1,$F3641F63,$241E4ADF,
+    $28147F5F,$4FA2B8CD,$C9430040,$0CC32220,$FDD30B30,$C0A5374F,$1D2D00D9,$24147B15,
+    $EE4D111A,$0FCA5167,$71FF904C,$2D195FFE,$1A05645F,$0C13FEFE,$081B08CA,$05170121,
+    $80530100,$E83E5EFE,$AC9AF4F8,$7FE72701,$D2B8EE5F,$06DF4261,$BB9E9B8A,$7293EA25,
+    $CE84FFDF,$F5718801,$3DD64B04,$A26F263B,$7ED48400,$547EEBE6,$446D4CA0,$6CF3D6F5,
+    $2649ABDF,$AEA0C7F5,$36338CC1,$503F7E93,$D3772061,$11B638E1,$72500E03,$F80EB2BB,
+    $ABE0502E,$EC8D77DE,$57971E81,$E14F6746,$C9335400,$6920318F,$081DBB99,$FFC304A5,
+    $4D351805,$7F3D5CE3,$A6C866C6,$5D5BCCA9,$DAEC6FEA,$9F926F91,$9F46222F,$3991467D,
+    $A5BF6D8E,$1143C44F,$43958302,$D0214EEB,$022083B8,$3FB6180C,$18F8931E,$281658E6,
+    $26486E3E,$8BD78A70,$7477E4C1,$B506E07C,$F32D0A25,$79098B02,$E4EABB81,$28123B23,
+    $69DEAD38,$1574CA16,$DF871B62,$211C40B7,$A51A9EF9,$0014377B,$041E8AC8,$09114003,
+    $BD59E4D2,$E3D156D5,$4FE876D5,$2F91A340,$557BE8DE,$00EAE4A7,$0CE5C2EC,$4DB4BBA6,
+    $E756BDFF,$DD3369AC,$EC17B035,$06572327,$99AFC8B0,$56C8C391,$6B65811C,$5E146119,
+    $6E85CB75,$BE07C002,$C2325577,$893FF4EC,$5BBFC92D,$D0EC3B25,$B7801AB7,$8D6D3B24,
+    $20C763EF,$C366A5FC,$9C382880,$0ACE3205,$AAC9548A,$ECA1D7C7,$041AFA32,$1D16625A,
+    $6701902C,$9B757A54,$31D477F7,$9126B031,$36CC6FDB,$C70B8B46,$D9E66A48,$56E55A79,
+    $026A4CEB,$52437EFF,$2F8F76B4,$0DF980A5,$8674CDE3,$EDDA04EB,$17A9BE04,$2C18F4DF,
+    $B7747F9D,$AB2AF7B4,$EFC34D20,$2E096B7C,$1741A254,$E5B6A035,$213D42F6,$2C1C7C26,
+    $61C2F50F,$6552DAF9,$D2C231F8,$25130F69,$D8167FA2,$0418F2C8,$001A96A6,$0D1526AB,
+    $63315C21,$5E0A72EC,$49BAFEFD,$187908D9,$8D0DBD86,$311170A7,$3E9B640C,$CC3E10D7,
+    $D5CAD3B6,$0CAEC388,$F73001E1,$6C728AFF,$71EAE2A1,$1F9AF36E,$CFCBD12F,$C1DE8417,
+    $AC07BE6B,$CB44A1D8,$8B9B0F56,$013988C3,$B1C52FCA,$B4BE31CD,$D8782806,$12A3A4E2,
+    $6F7DE532,$58FD7EB6,$D01EE900,$24ADFFC2,$F4990FC5,$9711AAC5,$001D7B95,$82E5E7D2,
+    $109873F6,$00613096,$C32D9521,$ADA121FF,$29908415,$7FBB977F,$AF9EB3DB,$29C9ED2A,
+    $5CE2A465,$A730F32C,$D0AA3FE8,$8A5CC091,$D49E2CE7,$0CE454A9,$D60ACD86,$015F1919,
+    $77079103,$DEA03AF6,$78A8565E,$DEE356DF,$21F05CBE,$8B75E387,$B3C50651,$B8A5C3EF,
+    $D8EEB6D2,$E523BE77,$C2154529,$2F69EFDF,$AFE67AFB,$F470C4B2,$F3E0EB5B,$D6CC9876,
+    $39E4460C,$1FDA8538,$1987832F,$CA007367,$A99144F8,$296B299E,$492FC295,$9266BEAB,
+    $B5676E69,$9BD3DDDA,$DF7E052F,$DB25701C,$1B5E51EE,$F65324E6,$6AFCE36C,$0316CC04,
+    $8644213E,$B7DC59D0,$7965291F,$CCD6FD43,$41823979,$932BCDF6,$B657C34D,$4EDFD282,
+    $7AE5290C,$3CB9536B,$851E20FE,$9833557E,$13ECF0B0,$D3FFB372,$3F85C5C1,$0AEF7ED2));
+
+  Mars_Data: array[0..511] of LongWord = (
+    $09D0C479,$28C8FFE0,$84AA6C39,$9DAD7287,$7DFF9BE3,$D4268361,$C96DA1D4,$7974CC93,
+    $85D0582E,$2A4B5705,$1CA16A62,$C3BD279D,$0F1F25E5,$5160372F,$C695C1FB,$4D7FF1E4,
+    $AE5F6BF4,$0D72EE46,$FF23DE8A,$B1CF8E83,$F14902E2,$3E981E42,$8BF53EB6,$7F4BF8AC,
+    $83631F83,$25970205,$76AFE784,$3A7931D4,$4F846450,$5C64C3F6,$210A5F18,$C6986A26,
+    $28F4E826,$3A60A81C,$D340A664,$7EA820C4,$526687C5,$7EDDD12B,$32A11D1D,$9C9EF086,
+    $80F6E831,$AB6F04AD,$56FB9B53,$8B2E095C,$B68556AE,$D2250B0D,$294A7721,$E21FB253,
+    $AE136749,$E82AAE86,$93365104,$99404A66,$78A784DC,$B69BA84B,$04046793,$23DB5C1E,
+    $46CAE1D6,$2FE28134,$5A223942,$1863CD5B,$C190C6E3,$07DFB846,$6EB88816,$2D0DCC4A,
+    $A4CCAE59,$3798670D,$CBFA9493,$4F481D45,$EAFC8CA8,$DB1129D6,$B0449E20,$0F5407FB,
+    $6167D9A8,$D1F45763,$4DAA96C3,$3BEC5958,$ABABA014,$B6CCD201,$38D6279F,$02682215,
+    $8F376CD5,$092C237E,$BFC56593,$32889D2C,$854B3E95,$05BB9B43,$7DCD5DCD,$A02E926C,
+    $FAE527E5,$36A1C330,$3412E1AE,$F257F462,$3C4F1D71,$30A2E809,$68E5F551,$9C61BA44,
+    $5DED0AB8,$75CE09C8,$9654F93E,$698C0CCA,$243CB3E4,$2B062B97,$0F3B8D9E,$00E050DF,
+    $FC5D6166,$E35F9288,$C079550D,$0591AEE8,$8E531E74,$75FE3578,$2F6D829A,$F60B21AE,
+    $95E8EB8D,$6699486B,$901D7D9B,$FD6D6E31,$1090ACEF,$E0670DD8,$DAB2E692,$CD6D4365,
+    $E5393514,$3AF345F0,$6241FC4D,$460DA3A3,$7BCF3729,$8BF1D1E0,$14AAC070,$1587ED55,
+    $3AFD7D3E,$D2F29E01,$29A9D1F6,$EFB10C53,$CF3B870F,$B414935C,$664465ED,$024ACAC7,
+    $59A744C1,$1D2936A7,$DC580AA6,$CF574CA8,$040A7A10,$6CD81807,$8A98BE4C,$ACCEA063,
+    $C33E92B5,$D1E0E03D,$B322517E,$2092BD13,$386B2C4A,$52E8DD58,$58656DFB,$50820371,
+    $41811896,$E337EF7E,$D39FB119,$C97F0DF6,$68FEA01B,$A150A6E5,$55258962,$EB6FF41B,
+    $D7C9CD7A,$A619CD9E,$BCF09576,$2672C073,$F003FB3C,$4AB7A50B,$1484126A,$487BA9B1,
+    $A64FC9C6,$F6957D49,$38B06A75,$DD805FCD,$63D094CF,$F51C999E,$1AA4D343,$B8495294,
+    $CE9F8E99,$BFFCD770,$C7C275CC,$378453A7,$7B21BE33,$397F41BD,$4E94D131,$92CC1F98,
+    $5915EA51,$99F861B7,$C9980A88,$1D74FD5F,$B0A495F8,$614DEED0,$B5778EEA,$5941792D,
+    $FA90C1F8,$33F824B4,$C4965372,$3FF6D550,$4CA5FEC0,$8630E964,$5B3FBBD6,$7DA26A48,
+    $B203231A,$04297514,$2D639306,$2EB13149,$16A45272,$532459A0,$8E5F4872,$F966C7D9,
+    $07128DC0,$0D44DB62,$AFC8D52D,$06316131,$D838E7CE,$1BC41D00,$3A2E8C0F,$EA83837E,
+    $B984737D,$13BA4891,$C4F8B949,$A6D6ACB3,$A215CDCE,$8359838B,$6BD1AA31,$F579DD52,
+    $21B93F93,$F5176781,$187DFDDE,$E94AEB76,$2B38FD54,$431DE1DA,$AB394825,$9AD3048F,
+    $DFEA32AA,$659473E3,$623F7863,$F3346C59,$AB3AB685,$3346A90B,$6B56443E,$C6DE01F8,
+    $8D421FC0,$9B0ED10C,$88F1A1E9,$54C1F029,$7DEAD57B,$8D7BA426,$4CF5178A,$551A7CCA,
+    $1A9A5F08,$FCD651B9,$25605182,$E11FC6C3,$B6FD9676,$337B3027,$B7C8EB14,$9E5FD030,
+    $6B57E354,$AD913CF7,$7E16688D,$58872A69,$2C2FC7DF,$E389CCC6,$30738DF1,$0824A734,
+    $E1797A8B,$A4A8D57B,$5B5D193B,$C8A8309B,$73F9A978,$73398D32,$0F59573E,$E9DF2B03,
+    $E8A5B6C8,$848D0704,$98DF93C2,$720A1DC3,$684F259A,$943BA848,$A6370152,$863B5EA3,
+    $D17B978B,$6D9B58EF,$0A700DD4,$A73D36BF,$8E6A0829,$8695BC14,$E35B3447,$933AC568,
+    $8894B022,$2F511C27,$DDFBCC3C,$006662B6,$117C83FE,$4E12B414,$C2BCA766,$3A2FEC10,
+    $F4562420,$55792E2A,$46F5D857,$CEDA25CE,$C3601D3B,$6C00AB46,$EFAC9C28,$B3C35047,
+    $611DFEE3,$257C3207,$FDD58482,$3B14D84F,$23BECB64,$A075F3A3,$088F8EAD,$07ADF158,
+    $7796943C,$FACABF3D,$C09730CD,$F7679969,$DA44E9ED,$2C854C12,$35935FA3,$2F057D9F,
+    $690624F8,$1CB0BAFD,$7B0DBDC6,$810F23BB,$FA929A1A,$6D969A17,$6742979B,$74AC7D05,
+    $010E65C4,$86A3D963,$F907B5A0,$D0042BD3,$158D7D03,$287A8255,$BBA8366F,$096EDC33,
+    $21916A7B,$77B56B86,$951622F9,$A6C5E650,$8CEA17D1,$CD8C62BC,$A3D63433,$358A68FD,
+    $0F9B9D3C,$D6AA295B,$FE33384A,$C000738E,$CD67EB2F,$E2EB6DC2,$97338B02,$06C9F246,
+    $419CF1AD,$2B83C045,$3723F18A,$CB5B3089,$160BEAD7,$5D494656,$35F8A74B,$1E4E6C9E,
+    $000399BD,$67466880,$B4174831,$ACF423B2,$CA815AB3,$5A6395E7,$302A67C5,$8BDB446B,
+    $108F8FA4,$10223EDA,$92B8B48B,$7F38D0EE,$AB2701D4,$0262D415,$AF224A30,$B3D88ABA,
+    $F8B2C3AF,$DAF7EF70,$CC97D3B7,$E9614B6C,$2BAEBFF4,$70F687CF,$386C9156,$CE092EE5,
+    $01E87DA6,$6CE91E6A,$BB7BCC84,$C7922C20,$9D3B71FD,$060E41C6,$D7590F15,$4E03BB47,
+    $183C198E,$63EEB240,$2DDBF49A,$6D5CBA54,$923750AF,$F9E14236,$7838162B,$59726C72,
+    $81B66760,$BB2926C1,$48A0CE0D,$A6C0496D,$AD43507B,$718D496A,$9DF057AF,$44B1BDE6,
+    $054356DC,$DE7CED35,$D51A138B,$62088CC9,$35830311,$C96EFCA2,$686F86EC,$8E77CB68,
+    $63E1D6B8,$C80F9778,$79C491FD,$1B4C67F2,$72698D7D,$5E368C31,$F7D95E2E,$A1D3493F,
+    $DCD9433E,$896F1552,$4BC4CA7A,$A6D1BAF4,$A5A96DCC,$0BEF8B46,$A169FDA7,$74DF40B7,
+    $4E208804,$9A756607,$038E87C8,$20211E44,$8B7AD4BF,$C6403F35,$1848E36D,$80BDB038,
+    $1E62891C,$643D2107,$BF04D6F8,$21092C8C,$F644F389,$0778404E,$7B78ADB8,$A2C52D53,
+    $42157ABE,$A2253E2E,$7BF3F4AE,$80F594F9,$953194E7,$77EB92ED,$B3816930,$DA8D9336,
+    $BF447469,$F26D9483,$EE6FAED5,$71371235,$DE425F73,$B4E59F43,$7DBE2D4E,$2D37B185,
+    $49DC9A63,$98C39D98,$1301C9A2,$389B1BBF,$0C18588D,$A421C1BA,$7AA3865C,$71E08558,
+    $3C5CFCAA,$7D239CA4,$0297D9DD,$D7DC2830,$4B37802B,$7428AB54,$AEEE0347,$4B3FBB85,
+    $692F2F08,$134E578E,$36D9E0BF,$AE8B5FCF,$EDB93ECF,$2B27248E,$170EB1EF,$7DC57FD6,
+    $1E760F16,$B1136601,$864E1B9B,$D7EA7319,$3AB871BD,$CFA4D76F,$E31BD782,$0DBEB469,
+    $ABB96061,$5370F85D,$FFB07E37,$DA30D0FB,$EBC977B6,$0B98B40F,$3A4D0FE6,$DF4FC26B,
+    $159CF22A,$C298D6E2,$2B78EF6A,$61A94AC0,$AB561187,$14EEA0F0,$DF0D4164,$19AF70EE);
+
+  Mars_Key: array[0..6] of LongWord =
+   ($09D0C479,$28C8FFE0,$84AA6C39,$9DAD7287,$7DFF9BE3,$D4268361,$C96DA1D4);
+
+
+  Misty_Data7: array[0..$7F] of Byte =
+   ($1B,$32,$33,$5A,$3B,$10,$17,$54,$5B,$1A,$72,$73,$6B,$2C,$66,$49,
+    $1F,$24,$13,$6C,$37,$2E,$3F,$4A,$5D,$0F,$40,$56,$25,$51,$1C,$04,
+    $0B,$46,$20,$0D,$7B,$35,$44,$42,$2B,$1E,$41,$14,$4B,$79,$15,$6F,
+    $0E,$55,$09,$36,$74,$0C,$67,$53,$28,$0A,$7E,$38,$02,$07,$60,$29,
+    $19,$12,$65,$2F,$30,$39,$08,$68,$5F,$78,$2A,$4C,$64,$45,$75,$3D,
+    $59,$48,$03,$57,$7C,$4F,$62,$3C,$1D,$21,$5E,$27,$6A,$70,$4D,$3A,
+    $01,$6D,$6E,$63,$18,$77,$23,$05,$26,$76,$00,$31,$2D,$7A,$7F,$61,
+    $50,$22,$11,$06,$47,$16,$52,$4E,$71,$3E,$69,$43,$34,$5C,$58,$7D);
+
+  Misty_Data9: array[0..$1FF] of Word =
+   ($01C3,$00CB,$0153,$019F,$01E3,$00E9,$00FB,$0035,
+    $0181,$00B9,$0117,$01EB,$0133,$0009,$002D,$00D3,
+    $00C7,$014A,$0037,$007E,$00EB,$0164,$0193,$01D8,
+    $00A3,$011E,$0055,$002C,$001D,$01A2,$0163,$0118,
+    $014B,$0152,$01D2,$000F,$002B,$0030,$013A,$00E5,
+    $0111,$0138,$018E,$0063,$00E3,$00C8,$01F4,$001B,
+    $0001,$009D,$00F8,$01A0,$016D,$01F3,$001C,$0146,
+    $007D,$00D1,$0082,$01EA,$0183,$012D,$00F4,$019E,
+    $01D3,$00DD,$01E2,$0128,$01E0,$00EC,$0059,$0091,
+    $0011,$012F,$0026,$00DC,$00B0,$018C,$010F,$01F7,
+    $00E7,$016C,$00B6,$00F9,$00D8,$0151,$0101,$014C,
+    $0103,$00B8,$0154,$012B,$01AE,$0017,$0071,$000C,
+    $0047,$0058,$007F,$01A4,$0134,$0129,$0084,$015D,
+    $019D,$01B2,$01A3,$0048,$007C,$0051,$01CA,$0023,
+    $013D,$01A7,$0165,$003B,$0042,$00DA,$0192,$00CE,
+    $00C1,$006B,$009F,$01F1,$012C,$0184,$00FA,$0196,
+    $01E1,$0169,$017D,$0031,$0180,$010A,$0094,$01DA,
+    $0186,$013E,$011C,$0060,$0175,$01CF,$0067,$0119,
+    $0065,$0068,$0099,$0150,$0008,$0007,$017C,$00B7,
+    $0024,$0019,$00DE,$0127,$00DB,$00E4,$01A9,$0052,
+    $0109,$0090,$019C,$01C1,$0028,$01B3,$0135,$016A,
+    $0176,$00DF,$01E5,$0188,$00C5,$016E,$01DE,$01B1,
+    $00C3,$01DF,$0036,$00EE,$01EE,$00F0,$0093,$0049,
+    $009A,$01B6,$0069,$0081,$0125,$000B,$005E,$00B4,
+    $0149,$01C7,$0174,$003E,$013B,$01B7,$008E,$01C6,
+    $00AE,$0010,$0095,$01EF,$004E,$00F2,$01FD,$0085,
+    $00FD,$00F6,$00A0,$016F,$0083,$008A,$0156,$009B,
+    $013C,$0107,$0167,$0098,$01D0,$01E9,$0003,$01FE,
+    $00BD,$0122,$0089,$00D2,$018F,$0012,$0033,$006A,
+    $0142,$00ED,$0170,$011B,$00E2,$014F,$0158,$0131,
+    $0147,$005D,$0113,$01CD,$0079,$0161,$01A5,$0179,
+    $009E,$01B4,$00CC,$0022,$0132,$001A,$00E8,$0004,
+    $0187,$01ED,$0197,$0039,$01BF,$01D7,$0027,$018B,
+    $00C6,$009C,$00D0,$014E,$006C,$0034,$01F2,$006E,
+    $00CA,$0025,$00BA,$0191,$00FE,$0013,$0106,$002F,
+    $01AD,$0172,$01DB,$00C0,$010B,$01D6,$00F5,$01EC,
+    $010D,$0076,$0114,$01AB,$0075,$010C,$01E4,$0159,
+    $0054,$011F,$004B,$00C4,$01BE,$00F7,$0029,$00A4,
+    $000E,$01F0,$0077,$004D,$017A,$0086,$008B,$00B3,
+    $0171,$00BF,$010E,$0104,$0097,$015B,$0160,$0168,
+    $00D7,$00BB,$0066,$01CE,$00FC,$0092,$01C5,$006F,
+    $0016,$004A,$00A1,$0139,$00AF,$00F1,$0190,$000A,
+    $01AA,$0143,$017B,$0056,$018D,$0166,$00D4,$01FB,
+    $014D,$0194,$019A,$0087,$01F8,$0123,$00A7,$01B8,
+    $0141,$003C,$01F9,$0140,$002A,$0155,$011A,$01A1,
+    $0198,$00D5,$0126,$01AF,$0061,$012E,$0157,$01DC,
+    $0072,$018A,$00AA,$0096,$0115,$00EF,$0045,$007B,
+    $008D,$0145,$0053,$005F,$0178,$00B2,$002E,$0020,
+    $01D5,$003F,$01C9,$01E7,$01AC,$0044,$0038,$0014,
+    $00B1,$016B,$00AB,$00B5,$005A,$0182,$01C8,$01D4,
+    $0018,$0177,$0064,$00CF,$006D,$0100,$0199,$0130,
+    $015A,$0005,$0120,$01BB,$01BD,$00E0,$004F,$00D6,
+    $013F,$01C4,$012A,$0015,$0006,$00FF,$019B,$00A6,
+    $0043,$0088,$0050,$015F,$01E8,$0121,$0073,$017E,
+    $00BC,$00C2,$00C9,$0173,$0189,$01F5,$0074,$01CC,
+    $01E6,$01A8,$0195,$001F,$0041,$000D,$01BA,$0032,
+    $003D,$01D1,$0080,$00A8,$0057,$01B9,$0162,$0148,
+    $00D9,$0105,$0062,$007A,$0021,$01FF,$0112,$0108,
+    $01C0,$00A9,$011D,$01B0,$01A6,$00CD,$00F3,$005C,
+    $0102,$005B,$01D9,$0144,$01F6,$00AD,$00A5,$003A,
+    $01CB,$0136,$017F,$0046,$00E1,$001E,$01DD,$00E6,
+    $0137,$01FA,$0185,$008C,$008F,$0040,$01B5,$00BE,
+    $0078,$0000,$00AC,$0110,$015E,$0124,$0002,$01BC,
+    $00A2,$00EA,$0070,$01FC,$0116,$015C,$004C,$01C2);
+
+  RC2_Data: array[0..255] of Byte =
+   ($D9,$78,$F9,$C4,$19,$DD,$B5,$ED,$28,$E9,$FD,$79,$4A,$A0,$D8,$9D,
+    $C6,$7E,$37,$83,$2B,$76,$53,$8E,$62,$4C,$64,$88,$44,$8B,$FB,$A2,
+    $17,$9A,$59,$F5,$87,$B3,$4F,$13,$61,$45,$6D,$8D,$09,$81,$7D,$32,
+    $BD,$8F,$40,$EB,$86,$B7,$7B,$0B,$F0,$95,$21,$22,$5C,$6B,$4E,$82,
+    $54,$D6,$65,$93,$CE,$60,$B2,$1C,$73,$56,$C0,$14,$A7,$8C,$F1,$DC,
+    $12,$75,$CA,$1F,$3B,$BE,$E4,$D1,$42,$3D,$D4,$30,$A3,$3C,$B6,$26,
+    $6F,$BF,$0E,$DA,$46,$69,$07,$57,$27,$F2,$1D,$9B,$BC,$94,$43,$03,
+    $F8,$11,$C7,$F6,$90,$EF,$3E,$E7,$06,$C3,$D5,$2F,$C8,$66,$1E,$D7,
+    $08,$E8,$EA,$DE,$80,$52,$EE,$F7,$84,$AA,$72,$AC,$35,$4D,$6A,$2A,
+    $96,$1A,$D2,$71,$5A,$15,$49,$74,$4B,$9F,$D0,$5E,$04,$18,$A4,$EC,
+    $C2,$E0,$41,$6E,$0F,$51,$CB,$CC,$24,$91,$AF,$50,$A1,$F4,$70,$39,
+    $99,$7C,$3A,$85,$23,$B8,$B4,$7A,$FC,$02,$36,$5B,$25,$55,$97,$31,
+    $2D,$5D,$FA,$98,$E3,$8A,$92,$AE,$05,$DF,$29,$10,$67,$6C,$BA,$C9,
+    $D3,$00,$E6,$CF,$E1,$9E,$A8,$2C,$63,$16,$01,$3F,$58,$E2,$89,$A9,
+    $0D,$38,$34,$1B,$AB,$33,$FF,$B0,$BB,$48,$0C,$5F,$B9,$B1,$CD,$2E,
+    $C5,$F3,$DB,$47,$E5,$A5,$9C,$77,$0A,$A6,$20,$68,$FE,$7F,$C1,$AD);
+
+  FROG_Data: array[0..250] of Byte = (
+    $71,$15,$E8,$12,$71,$5C,$3F,$9D,$7C,$C1,$A6,$C5,$7E,$38,$E5,$E5,
+    $9C,$A2,$36,$11,$E6,$59,$BD,$57,$A9,$00,$51,$CC,$08,$46,$CB,$E1,
+    $A0,$3B,$A7,$BD,$64,$9D,$54,$0B,$07,$82,$1D,$33,$20,$2D,$87,$ED,
+    $8B,$21,$11,$DD,$18,$32,$59,$4A,$15,$CD,$BF,$F2,$54,$35,$03,$E6,
+    $E7,$76,$0F,$0F,$6B,$04,$15,$22,$03,$9C,$39,$42,$5D,$FF,$BF,$03,
+    $55,$87,$CD,$C8,$B9,$CC,$34,$25,$23,$18,$44,$B9,$C9,$0A,$E0,$EA,
+    $07,$78,$C9,$73,$D8,$67,$39,$FF,$5D,$6E,$2A,$F9,$44,$0E,$1D,$37,
+    $80,$54,$25,$98,$DD,$89,$27,$0B,$FC,$32,$90,$23,$B2,$BE,$2B,$A2,
+    $67,$F9,$6D,$08,$EB,$21,$9E,$6F,$FC,$CD,$A9,$36,$0A,$14,$DD,$C9,
+    $B2,$E0,$59,$B8,$B6,$41,$C9,$0A,$3C,$06,$BF,$AE,$4F,$62,$1A,$A0,
+    $FC,$33,$3F,$4F,$06,$66,$7B,$AD,$31,$03,$6E,$E9,$5A,$9E,$E4,$D2,
+    $D1,$ED,$1E,$5F,$1C,$B3,$CC,$DC,$48,$A3,$4D,$A6,$C0,$62,$A5,$19,
+    $91,$A2,$5B,$D4,$29,$E6,$6E,$06,$6B,$BB,$7F,$26,$52,$62,$1E,$43,
+    $E1,$50,$D0,$86,$3C,$FA,$99,$57,$94,$3C,$42,$A5,$48,$1D,$A5,$52,
+    $D3,$CF,$00,$B1,$CE,$0D,$06,$0E,$5C,$F8,$3C,$C9,$84,$5F,$23,$D7,
+    $76,$B1,$79,$B4,$1B,$53,$83,$1A,$27,$2E,$0C);
+
+  Rijndael_S: array[0..1, 0..255] of Byte = (
+   ($63,$7C,$77,$7B,$F2,$6B,$6F,$C5,$30,$01,$67,$2B,$FE,$D7,$AB,$76,
+    $CA,$82,$C9,$7D,$FA,$59,$47,$F0,$AD,$D4,$A2,$AF,$9C,$A4,$72,$C0,
+    $B7,$FD,$93,$26,$36,$3F,$F7,$CC,$34,$A5,$E5,$F1,$71,$D8,$31,$15,
+    $04,$C7,$23,$C3,$18,$96,$05,$9A,$07,$12,$80,$E2,$EB,$27,$B2,$75,
+    $09,$83,$2C,$1A,$1B,$6E,$5A,$A0,$52,$3B,$D6,$B3,$29,$E3,$2F,$84,
+    $53,$D1,$00,$ED,$20,$FC,$B1,$5B,$6A,$CB,$BE,$39,$4A,$4C,$58,$CF,
+    $D0,$EF,$AA,$FB,$43,$4D,$33,$85,$45,$F9,$02,$7F,$50,$3C,$9F,$A8,
+    $51,$A3,$40,$8F,$92,$9D,$38,$F5,$BC,$B6,$DA,$21,$10,$FF,$F3,$D2,
+    $CD,$0C,$13,$EC,$5F,$97,$44,$17,$C4,$A7,$7E,$3D,$64,$5D,$19,$73,
+    $60,$81,$4F,$DC,$22,$2A,$90,$88,$46,$EE,$B8,$14,$DE,$5E,$0B,$DB,
+    $E0,$32,$3A,$0A,$49,$06,$24,$5C,$C2,$D3,$AC,$62,$91,$95,$E4,$79,
+    $E7,$C8,$37,$6D,$8D,$D5,$4E,$A9,$6C,$56,$F4,$EA,$65,$7A,$AE,$08,
+    $BA,$78,$25,$2E,$1C,$A6,$B4,$C6,$E8,$DD,$74,$1F,$4B,$BD,$8B,$8A,
+    $70,$3E,$B5,$66,$48,$03,$F6,$0E,$61,$35,$57,$B9,$86,$C1,$1D,$9E,
+    $E1,$F8,$98,$11,$69,$D9,$8E,$94,$9B,$1E,$87,$E9,$CE,$55,$28,$DF,
+    $8C,$A1,$89,$0D,$BF,$E6,$42,$68,$41,$99,$2D,$0F,$B0,$54,$BB,$16),
+   ($52,$09,$6A,$D5,$30,$36,$A5,$38,$BF,$40,$A3,$9E,$81,$F3,$D7,$FB,
+    $7C,$E3,$39,$82,$9B,$2F,$FF,$87,$34,$8E,$43,$44,$C4,$DE,$E9,$CB,
+    $54,$7B,$94,$32,$A6,$C2,$23,$3D,$EE,$4C,$95,$0B,$42,$FA,$C3,$4E,
+    $08,$2E,$A1,$66,$28,$D9,$24,$B2,$76,$5B,$A2,$49,$6D,$8B,$D1,$25,
+    $72,$F8,$F6,$64,$86,$68,$98,$16,$D4,$A4,$5C,$CC,$5D,$65,$B6,$92,
+    $6C,$70,$48,$50,$FD,$ED,$B9,$DA,$5E,$15,$46,$57,$A7,$8D,$9D,$84,
+    $90,$D8,$AB,$00,$8C,$BC,$D3,$0A,$F7,$E4,$58,$05,$B8,$B3,$45,$06,
+    $D0,$2C,$1E,$8F,$CA,$3F,$0F,$02,$C1,$AF,$BD,$03,$01,$13,$8A,$6B,
+    $3A,$91,$11,$41,$4F,$67,$DC,$EA,$97,$F2,$CF,$CE,$F0,$B4,$E6,$73,
+    $96,$AC,$74,$22,$E7,$AD,$35,$85,$E2,$F9,$37,$E8,$1C,$75,$DF,$6E,
+    $47,$F1,$1A,$71,$1D,$29,$C5,$89,$6F,$B7,$62,$0E,$AA,$18,$BE,$1B,
+    $FC,$56,$3E,$4B,$C6,$D2,$79,$20,$9A,$DB,$C0,$FE,$78,$CD,$5A,$F4,
+    $1F,$DD,$A8,$33,$88,$07,$C7,$31,$B1,$12,$10,$59,$27,$80,$EC,$5F,
+    $60,$51,$7F,$A9,$19,$B5,$4A,$0D,$2D,$E5,$7A,$9F,$93,$C9,$9C,$EF,
+    $A0,$E0,$3B,$4D,$AE,$2A,$F5,$B0,$C8,$EB,$BB,$3C,$83,$53,$99,$61,
+    $17,$2B,$04,$7E,$BA,$77,$D6,$26,$E1,$69,$14,$63,$55,$21,$0C,$7D));
+
+  Rijndael_T: array[0..7, 0..255] of LongWord = (
+   ($A56363C6,$847C7CF8,$997777EE,$8D7B7BF6,$0DF2F2FF,$BD6B6BD6,$B16F6FDE,$54C5C591,
+    $50303060,$03010102,$A96767CE,$7D2B2B56,$19FEFEE7,$62D7D7B5,$E6ABAB4D,$9A7676EC,
+    $45CACA8F,$9D82821F,$40C9C989,$877D7DFA,$15FAFAEF,$EB5959B2,$C947478E,$0BF0F0FB,
+    $ECADAD41,$67D4D4B3,$FDA2A25F,$EAAFAF45,$BF9C9C23,$F7A4A453,$967272E4,$5BC0C09B,
+    $C2B7B775,$1CFDFDE1,$AE93933D,$6A26264C,$5A36366C,$413F3F7E,$02F7F7F5,$4FCCCC83,
+    $5C343468,$F4A5A551,$34E5E5D1,$08F1F1F9,$937171E2,$73D8D8AB,$53313162,$3F15152A,
+    $0C040408,$52C7C795,$65232346,$5EC3C39D,$28181830,$A1969637,$0F05050A,$B59A9A2F,
+    $0907070E,$36121224,$9B80801B,$3DE2E2DF,$26EBEBCD,$6927274E,$CDB2B27F,$9F7575EA,
+    $1B090912,$9E83831D,$742C2C58,$2E1A1A34,$2D1B1B36,$B26E6EDC,$EE5A5AB4,$FBA0A05B,
+    $F65252A4,$4D3B3B76,$61D6D6B7,$CEB3B37D,$7B292952,$3EE3E3DD,$712F2F5E,$97848413,
+    $F55353A6,$68D1D1B9,$00000000,$2CEDEDC1,$60202040,$1FFCFCE3,$C8B1B179,$ED5B5BB6,
+    $BE6A6AD4,$46CBCB8D,$D9BEBE67,$4B393972,$DE4A4A94,$D44C4C98,$E85858B0,$4ACFCF85,
+    $6BD0D0BB,$2AEFEFC5,$E5AAAA4F,$16FBFBED,$C5434386,$D74D4D9A,$55333366,$94858511,
+    $CF45458A,$10F9F9E9,$06020204,$817F7FFE,$F05050A0,$443C3C78,$BA9F9F25,$E3A8A84B,
+    $F35151A2,$FEA3A35D,$C0404080,$8A8F8F05,$AD92923F,$BC9D9D21,$48383870,$04F5F5F1,
+    $DFBCBC63,$C1B6B677,$75DADAAF,$63212142,$30101020,$1AFFFFE5,$0EF3F3FD,$6DD2D2BF,
+    $4CCDCD81,$140C0C18,$35131326,$2FECECC3,$E15F5FBE,$A2979735,$CC444488,$3917172E,
+    $57C4C493,$F2A7A755,$827E7EFC,$473D3D7A,$AC6464C8,$E75D5DBA,$2B191932,$957373E6,
+    $A06060C0,$98818119,$D14F4F9E,$7FDCDCA3,$66222244,$7E2A2A54,$AB90903B,$8388880B,
+    $CA46468C,$29EEEEC7,$D3B8B86B,$3C141428,$79DEDEA7,$E25E5EBC,$1D0B0B16,$76DBDBAD,
+    $3BE0E0DB,$56323264,$4E3A3A74,$1E0A0A14,$DB494992,$0A06060C,$6C242448,$E45C5CB8,
+    $5DC2C29F,$6ED3D3BD,$EFACAC43,$A66262C4,$A8919139,$A4959531,$37E4E4D3,$8B7979F2,
+    $32E7E7D5,$43C8C88B,$5937376E,$B76D6DDA,$8C8D8D01,$64D5D5B1,$D24E4E9C,$E0A9A949,
+    $B46C6CD8,$FA5656AC,$07F4F4F3,$25EAEACF,$AF6565CA,$8E7A7AF4,$E9AEAE47,$18080810,
+    $D5BABA6F,$887878F0,$6F25254A,$722E2E5C,$241C1C38,$F1A6A657,$C7B4B473,$51C6C697,
+    $23E8E8CB,$7CDDDDA1,$9C7474E8,$211F1F3E,$DD4B4B96,$DCBDBD61,$868B8B0D,$858A8A0F,
+    $907070E0,$423E3E7C,$C4B5B571,$AA6666CC,$D8484890,$05030306,$01F6F6F7,$120E0E1C,
+    $A36161C2,$5F35356A,$F95757AE,$D0B9B969,$91868617,$58C1C199,$271D1D3A,$B99E9E27,
+    $38E1E1D9,$13F8F8EB,$B398982B,$33111122,$BB6969D2,$70D9D9A9,$898E8E07,$A7949433,
+    $B69B9B2D,$221E1E3C,$92878715,$20E9E9C9,$49CECE87,$FF5555AA,$78282850,$7ADFDFA5,
+    $8F8C8C03,$F8A1A159,$80898909,$170D0D1A,$DABFBF65,$31E6E6D7,$C6424284,$B86868D0,
+    $C3414182,$B0999929,$772D2D5A,$110F0F1E,$CBB0B07B,$FC5454A8,$D6BBBB6D,$3A16162C),
+   ($6363C6A5,$7C7CF884,$7777EE99,$7B7BF68D,$F2F2FF0D,$6B6BD6BD,$6F6FDEB1,$C5C59154,
+    $30306050,$01010203,$6767CEA9,$2B2B567D,$FEFEE719,$D7D7B562,$ABAB4DE6,$7676EC9A,
+    $CACA8F45,$82821F9D,$C9C98940,$7D7DFA87,$FAFAEF15,$5959B2EB,$47478EC9,$F0F0FB0B,
+    $ADAD41EC,$D4D4B367,$A2A25FFD,$AFAF45EA,$9C9C23BF,$A4A453F7,$7272E496,$C0C09B5B,
+    $B7B775C2,$FDFDE11C,$93933DAE,$26264C6A,$36366C5A,$3F3F7E41,$F7F7F502,$CCCC834F,
+    $3434685C,$A5A551F4,$E5E5D134,$F1F1F908,$7171E293,$D8D8AB73,$31316253,$15152A3F,
+    $0404080C,$C7C79552,$23234665,$C3C39D5E,$18183028,$969637A1,$05050A0F,$9A9A2FB5,
+    $07070E09,$12122436,$80801B9B,$E2E2DF3D,$EBEBCD26,$27274E69,$B2B27FCD,$7575EA9F,
+    $0909121B,$83831D9E,$2C2C5874,$1A1A342E,$1B1B362D,$6E6EDCB2,$5A5AB4EE,$A0A05BFB,
+    $5252A4F6,$3B3B764D,$D6D6B761,$B3B37DCE,$2929527B,$E3E3DD3E,$2F2F5E71,$84841397,
+    $5353A6F5,$D1D1B968,$00000000,$EDEDC12C,$20204060,$FCFCE31F,$B1B179C8,$5B5BB6ED,
+    $6A6AD4BE,$CBCB8D46,$BEBE67D9,$3939724B,$4A4A94DE,$4C4C98D4,$5858B0E8,$CFCF854A,
+    $D0D0BB6B,$EFEFC52A,$AAAA4FE5,$FBFBED16,$434386C5,$4D4D9AD7,$33336655,$85851194,
+    $45458ACF,$F9F9E910,$02020406,$7F7FFE81,$5050A0F0,$3C3C7844,$9F9F25BA,$A8A84BE3,
+    $5151A2F3,$A3A35DFE,$404080C0,$8F8F058A,$92923FAD,$9D9D21BC,$38387048,$F5F5F104,
+    $BCBC63DF,$B6B677C1,$DADAAF75,$21214263,$10102030,$FFFFE51A,$F3F3FD0E,$D2D2BF6D,
+    $CDCD814C,$0C0C1814,$13132635,$ECECC32F,$5F5FBEE1,$979735A2,$444488CC,$17172E39,
+    $C4C49357,$A7A755F2,$7E7EFC82,$3D3D7A47,$6464C8AC,$5D5DBAE7,$1919322B,$7373E695,
+    $6060C0A0,$81811998,$4F4F9ED1,$DCDCA37F,$22224466,$2A2A547E,$90903BAB,$88880B83,
+    $46468CCA,$EEEEC729,$B8B86BD3,$1414283C,$DEDEA779,$5E5EBCE2,$0B0B161D,$DBDBAD76,
+    $E0E0DB3B,$32326456,$3A3A744E,$0A0A141E,$494992DB,$06060C0A,$2424486C,$5C5CB8E4,
+    $C2C29F5D,$D3D3BD6E,$ACAC43EF,$6262C4A6,$919139A8,$959531A4,$E4E4D337,$7979F28B,
+    $E7E7D532,$C8C88B43,$37376E59,$6D6DDAB7,$8D8D018C,$D5D5B164,$4E4E9CD2,$A9A949E0,
+    $6C6CD8B4,$5656ACFA,$F4F4F307,$EAEACF25,$6565CAAF,$7A7AF48E,$AEAE47E9,$08081018,
+    $BABA6FD5,$7878F088,$25254A6F,$2E2E5C72,$1C1C3824,$A6A657F1,$B4B473C7,$C6C69751,
+    $E8E8CB23,$DDDDA17C,$7474E89C,$1F1F3E21,$4B4B96DD,$BDBD61DC,$8B8B0D86,$8A8A0F85,
+    $7070E090,$3E3E7C42,$B5B571C4,$6666CCAA,$484890D8,$03030605,$F6F6F701,$0E0E1C12,
+    $6161C2A3,$35356A5F,$5757AEF9,$B9B969D0,$86861791,$C1C19958,$1D1D3A27,$9E9E27B9,
+    $E1E1D938,$F8F8EB13,$98982BB3,$11112233,$6969D2BB,$D9D9A970,$8E8E0789,$949433A7,
+    $9B9B2DB6,$1E1E3C22,$87871592,$E9E9C920,$CECE8749,$5555AAFF,$28285078,$DFDFA57A,
+    $8C8C038F,$A1A159F8,$89890980,$0D0D1A17,$BFBF65DA,$E6E6D731,$424284C6,$6868D0B8,
+    $414182C3,$999929B0,$2D2D5A77,$0F0F1E11,$B0B07BCB,$5454A8FC,$BBBB6DD6,$16162C3A),
+   ($63C6A563,$7CF8847C,$77EE9977,$7BF68D7B,$F2FF0DF2,$6BD6BD6B,$6FDEB16F,$C59154C5,
+    $30605030,$01020301,$67CEA967,$2B567D2B,$FEE719FE,$D7B562D7,$AB4DE6AB,$76EC9A76,
+    $CA8F45CA,$821F9D82,$C98940C9,$7DFA877D,$FAEF15FA,$59B2EB59,$478EC947,$F0FB0BF0,
+    $AD41ECAD,$D4B367D4,$A25FFDA2,$AF45EAAF,$9C23BF9C,$A453F7A4,$72E49672,$C09B5BC0,
+    $B775C2B7,$FDE11CFD,$933DAE93,$264C6A26,$366C5A36,$3F7E413F,$F7F502F7,$CC834FCC,
+    $34685C34,$A551F4A5,$E5D134E5,$F1F908F1,$71E29371,$D8AB73D8,$31625331,$152A3F15,
+    $04080C04,$C79552C7,$23466523,$C39D5EC3,$18302818,$9637A196,$050A0F05,$9A2FB59A,
+    $070E0907,$12243612,$801B9B80,$E2DF3DE2,$EBCD26EB,$274E6927,$B27FCDB2,$75EA9F75,
+    $09121B09,$831D9E83,$2C58742C,$1A342E1A,$1B362D1B,$6EDCB26E,$5AB4EE5A,$A05BFBA0,
+    $52A4F652,$3B764D3B,$D6B761D6,$B37DCEB3,$29527B29,$E3DD3EE3,$2F5E712F,$84139784,
+    $53A6F553,$D1B968D1,$00000000,$EDC12CED,$20406020,$FCE31FFC,$B179C8B1,$5BB6ED5B,
+    $6AD4BE6A,$CB8D46CB,$BE67D9BE,$39724B39,$4A94DE4A,$4C98D44C,$58B0E858,$CF854ACF,
+    $D0BB6BD0,$EFC52AEF,$AA4FE5AA,$FBED16FB,$4386C543,$4D9AD74D,$33665533,$85119485,
+    $458ACF45,$F9E910F9,$02040602,$7FFE817F,$50A0F050,$3C78443C,$9F25BA9F,$A84BE3A8,
+    $51A2F351,$A35DFEA3,$4080C040,$8F058A8F,$923FAD92,$9D21BC9D,$38704838,$F5F104F5,
+    $BC63DFBC,$B677C1B6,$DAAF75DA,$21426321,$10203010,$FFE51AFF,$F3FD0EF3,$D2BF6DD2,
+    $CD814CCD,$0C18140C,$13263513,$ECC32FEC,$5FBEE15F,$9735A297,$4488CC44,$172E3917,
+    $C49357C4,$A755F2A7,$7EFC827E,$3D7A473D,$64C8AC64,$5DBAE75D,$19322B19,$73E69573,
+    $60C0A060,$81199881,$4F9ED14F,$DCA37FDC,$22446622,$2A547E2A,$903BAB90,$880B8388,
+    $468CCA46,$EEC729EE,$B86BD3B8,$14283C14,$DEA779DE,$5EBCE25E,$0B161D0B,$DBAD76DB,
+    $E0DB3BE0,$32645632,$3A744E3A,$0A141E0A,$4992DB49,$060C0A06,$24486C24,$5CB8E45C,
+    $C29F5DC2,$D3BD6ED3,$AC43EFAC,$62C4A662,$9139A891,$9531A495,$E4D337E4,$79F28B79,
+    $E7D532E7,$C88B43C8,$376E5937,$6DDAB76D,$8D018C8D,$D5B164D5,$4E9CD24E,$A949E0A9,
+    $6CD8B46C,$56ACFA56,$F4F307F4,$EACF25EA,$65CAAF65,$7AF48E7A,$AE47E9AE,$08101808,
+    $BA6FD5BA,$78F08878,$254A6F25,$2E5C722E,$1C38241C,$A657F1A6,$B473C7B4,$C69751C6,
+    $E8CB23E8,$DDA17CDD,$74E89C74,$1F3E211F,$4B96DD4B,$BD61DCBD,$8B0D868B,$8A0F858A,
+    $70E09070,$3E7C423E,$B571C4B5,$66CCAA66,$4890D848,$03060503,$F6F701F6,$0E1C120E,
+    $61C2A361,$356A5F35,$57AEF957,$B969D0B9,$86179186,$C19958C1,$1D3A271D,$9E27B99E,
+    $E1D938E1,$F8EB13F8,$982BB398,$11223311,$69D2BB69,$D9A970D9,$8E07898E,$9433A794,
+    $9B2DB69B,$1E3C221E,$87159287,$E9C920E9,$CE8749CE,$55AAFF55,$28507828,$DFA57ADF,
+    $8C038F8C,$A159F8A1,$89098089,$0D1A170D,$BF65DABF,$E6D731E6,$4284C642,$68D0B868,
+    $4182C341,$9929B099,$2D5A772D,$0F1E110F,$B07BCBB0,$54A8FC54,$BB6DD6BB,$162C3A16),
+   ($C6A56363,$F8847C7C,$EE997777,$F68D7B7B,$FF0DF2F2,$D6BD6B6B,$DEB16F6F,$9154C5C5,
+    $60503030,$02030101,$CEA96767,$567D2B2B,$E719FEFE,$B562D7D7,$4DE6ABAB,$EC9A7676,
+    $8F45CACA,$1F9D8282,$8940C9C9,$FA877D7D,$EF15FAFA,$B2EB5959,$8EC94747,$FB0BF0F0,
+    $41ECADAD,$B367D4D4,$5FFDA2A2,$45EAAFAF,$23BF9C9C,$53F7A4A4,$E4967272,$9B5BC0C0,
+    $75C2B7B7,$E11CFDFD,$3DAE9393,$4C6A2626,$6C5A3636,$7E413F3F,$F502F7F7,$834FCCCC,
+    $685C3434,$51F4A5A5,$D134E5E5,$F908F1F1,$E2937171,$AB73D8D8,$62533131,$2A3F1515,
+    $080C0404,$9552C7C7,$46652323,$9D5EC3C3,$30281818,$37A19696,$0A0F0505,$2FB59A9A,
+    $0E090707,$24361212,$1B9B8080,$DF3DE2E2,$CD26EBEB,$4E692727,$7FCDB2B2,$EA9F7575,
+    $121B0909,$1D9E8383,$58742C2C,$342E1A1A,$362D1B1B,$DCB26E6E,$B4EE5A5A,$5BFBA0A0,
+    $A4F65252,$764D3B3B,$B761D6D6,$7DCEB3B3,$527B2929,$DD3EE3E3,$5E712F2F,$13978484,
+    $A6F55353,$B968D1D1,$00000000,$C12CEDED,$40602020,$E31FFCFC,$79C8B1B1,$B6ED5B5B,
+    $D4BE6A6A,$8D46CBCB,$67D9BEBE,$724B3939,$94DE4A4A,$98D44C4C,$B0E85858,$854ACFCF,
+    $BB6BD0D0,$C52AEFEF,$4FE5AAAA,$ED16FBFB,$86C54343,$9AD74D4D,$66553333,$11948585,
+    $8ACF4545,$E910F9F9,$04060202,$FE817F7F,$A0F05050,$78443C3C,$25BA9F9F,$4BE3A8A8,
+    $A2F35151,$5DFEA3A3,$80C04040,$058A8F8F,$3FAD9292,$21BC9D9D,$70483838,$F104F5F5,
+    $63DFBCBC,$77C1B6B6,$AF75DADA,$42632121,$20301010,$E51AFFFF,$FD0EF3F3,$BF6DD2D2,
+    $814CCDCD,$18140C0C,$26351313,$C32FECEC,$BEE15F5F,$35A29797,$88CC4444,$2E391717,
+    $9357C4C4,$55F2A7A7,$FC827E7E,$7A473D3D,$C8AC6464,$BAE75D5D,$322B1919,$E6957373,
+    $C0A06060,$19988181,$9ED14F4F,$A37FDCDC,$44662222,$547E2A2A,$3BAB9090,$0B838888,
+    $8CCA4646,$C729EEEE,$6BD3B8B8,$283C1414,$A779DEDE,$BCE25E5E,$161D0B0B,$AD76DBDB,
+    $DB3BE0E0,$64563232,$744E3A3A,$141E0A0A,$92DB4949,$0C0A0606,$486C2424,$B8E45C5C,
+    $9F5DC2C2,$BD6ED3D3,$43EFACAC,$C4A66262,$39A89191,$31A49595,$D337E4E4,$F28B7979,
+    $D532E7E7,$8B43C8C8,$6E593737,$DAB76D6D,$018C8D8D,$B164D5D5,$9CD24E4E,$49E0A9A9,
+    $D8B46C6C,$ACFA5656,$F307F4F4,$CF25EAEA,$CAAF6565,$F48E7A7A,$47E9AEAE,$10180808,
+    $6FD5BABA,$F0887878,$4A6F2525,$5C722E2E,$38241C1C,$57F1A6A6,$73C7B4B4,$9751C6C6,
+    $CB23E8E8,$A17CDDDD,$E89C7474,$3E211F1F,$96DD4B4B,$61DCBDBD,$0D868B8B,$0F858A8A,
+    $E0907070,$7C423E3E,$71C4B5B5,$CCAA6666,$90D84848,$06050303,$F701F6F6,$1C120E0E,
+    $C2A36161,$6A5F3535,$AEF95757,$69D0B9B9,$17918686,$9958C1C1,$3A271D1D,$27B99E9E,
+    $D938E1E1,$EB13F8F8,$2BB39898,$22331111,$D2BB6969,$A970D9D9,$07898E8E,$33A79494,
+    $2DB69B9B,$3C221E1E,$15928787,$C920E9E9,$8749CECE,$AAFF5555,$50782828,$A57ADFDF,
+    $038F8C8C,$59F8A1A1,$09808989,$1A170D0D,$65DABFBF,$D731E6E6,$84C64242,$D0B86868,
+    $82C34141,$29B09999,$5A772D2D,$1E110F0F,$7BCBB0B0,$A8FC5454,$6DD6BBBB,$2C3A1616),
+   ($50A7F451,$5365417E,$C3A4171A,$965E273A,$CB6BAB3B,$F1459D1F,$AB58FAAC,$9303E34B,
+    $55FA3020,$F66D76AD,$9176CC88,$254C02F5,$FCD7E54F,$D7CB2AC5,$80443526,$8FA362B5,
+    $495AB1DE,$671BBA25,$980EEA45,$E1C0FE5D,$02752FC3,$12F04C81,$A397468D,$C6F9D36B,
+    $E75F8F03,$959C9215,$EB7A6DBF,$DA595295,$2D83BED4,$D3217458,$2969E049,$44C8C98E,
+    $6A89C275,$78798EF4,$6B3E5899,$DD71B927,$B64FE1BE,$17AD88F0,$66AC20C9,$B43ACE7D,
+    $184ADF63,$82311AE5,$60335197,$457F5362,$E07764B1,$84AE6BBB,$1CA081FE,$942B08F9,
+    $58684870,$19FD458F,$876CDE94,$B7F87B52,$23D373AB,$E2024B72,$578F1FE3,$2AAB5566,
+    $0728EBB2,$03C2B52F,$9A7BC586,$A50837D3,$F2872830,$B2A5BF23,$BA6A0302,$5C8216ED,
+    $2B1CCF8A,$92B479A7,$F0F207F3,$A1E2694E,$CDF4DA65,$D5BE0506,$1F6234D1,$8AFEA6C4,
+    $9D532E34,$A055F3A2,$32E18A05,$75EBF6A4,$39EC830B,$AAEF6040,$069F715E,$51106EBD,
+    $F98A213E,$3D06DD96,$AE053EDD,$46BDE64D,$B58D5491,$055DC471,$6FD40604,$FF155060,
+    $24FB9819,$97E9BDD6,$CC434089,$779ED967,$BD42E8B0,$888B8907,$385B19E7,$DBEEC879,
+    $470A7CA1,$E90F427C,$C91E84F8,$00000000,$83868009,$48ED2B32,$AC70111E,$4E725A6C,
+    $FBFF0EFD,$5638850F,$1ED5AE3D,$27392D36,$64D90F0A,$21A65C68,$D1545B9B,$3A2E3624,
+    $B1670A0C,$0FE75793,$D296EEB4,$9E919B1B,$4FC5C080,$A220DC61,$694B775A,$161A121C,
+    $0ABA93E2,$E52AA0C0,$43E0223C,$1D171B12,$0B0D090E,$ADC78BF2,$B9A8B62D,$C8A91E14,
+    $8519F157,$4C0775AF,$BBDD99EE,$FD607FA3,$9F2601F7,$BCF5725C,$C53B6644,$347EFB5B,
+    $7629438B,$DCC623CB,$68FCEDB6,$63F1E4B8,$CADC31D7,$10856342,$40229713,$2011C684,
+    $7D244A85,$F83DBBD2,$1132F9AE,$6DA129C7,$4B2F9E1D,$F330B2DC,$EC52860D,$D0E3C177,
+    $6C16B32B,$99B970A9,$FA489411,$2264E947,$C48CFCA8,$1A3FF0A0,$D82C7D56,$EF903322,
+    $C74E4987,$C1D138D9,$FEA2CA8C,$360BD498,$CF81F5A6,$28DE7AA5,$268EB7DA,$A4BFAD3F,
+    $E49D3A2C,$0D927850,$9BCC5F6A,$62467E54,$C2138DF6,$E8B8D890,$5EF7392E,$F5AFC382,
+    $BE805D9F,$7C93D069,$A92DD56F,$B31225CF,$3B99ACC8,$A77D1810,$6E639CE8,$7BBB3BDB,
+    $097826CD,$F418596E,$01B79AEC,$A89A4F83,$656E95E6,$7EE6FFAA,$08CFBC21,$E6E815EF,
+    $D99BE7BA,$CE366F4A,$D4099FEA,$D67CB029,$AFB2A431,$31233F2A,$3094A5C6,$C066A235,
+    $37BC4E74,$A6CA82FC,$B0D090E0,$15D8A733,$4A9804F1,$F7DAEC41,$0E50CD7F,$2FF69117,
+    $8DD64D76,$4DB0EF43,$544DAACC,$DF0496E4,$E3B5D19E,$1B886A4C,$B81F2CC1,$7F516546,
+    $04EA5E9D,$5D358C01,$737487FA,$2E410BFB,$5A1D67B3,$52D2DB92,$335610E9,$1347D66D,
+    $8C61D79A,$7A0CA137,$8E14F859,$893C13EB,$EE27A9CE,$35C961B7,$EDE51CE1,$3CB1477A,
+    $59DFD29C,$3F73F255,$79CE1418,$BF37C773,$EACDF753,$5BAAFD5F,$146F3DDF,$86DB4478,
+    $81F3AFCA,$3EC468B9,$2C342438,$5F40A3C2,$72C31D16,$0C25E2BC,$8B493C28,$41950DFF,
+    $7101A839,$DEB30C08,$9CE4B4D8,$90C15664,$6184CB7B,$70B632D5,$745C6C48,$4257B8D0),
+   ($A7F45150,$65417E53,$A4171AC3,$5E273A96,$6BAB3BCB,$459D1FF1,$58FAACAB,$03E34B93,
+    $FA302055,$6D76ADF6,$76CC8891,$4C02F525,$D7E54FFC,$CB2AC5D7,$44352680,$A362B58F,
+    $5AB1DE49,$1BBA2567,$0EEA4598,$C0FE5DE1,$752FC302,$F04C8112,$97468DA3,$F9D36BC6,
+    $5F8F03E7,$9C921595,$7A6DBFEB,$595295DA,$83BED42D,$217458D3,$69E04929,$C8C98E44,
+    $89C2756A,$798EF478,$3E58996B,$71B927DD,$4FE1BEB6,$AD88F017,$AC20C966,$3ACE7DB4,
+    $4ADF6318,$311AE582,$33519760,$7F536245,$7764B1E0,$AE6BBB84,$A081FE1C,$2B08F994,
+    $68487058,$FD458F19,$6CDE9487,$F87B52B7,$D373AB23,$024B72E2,$8F1FE357,$AB55662A,
+    $28EBB207,$C2B52F03,$7BC5869A,$0837D3A5,$872830F2,$A5BF23B2,$6A0302BA,$8216ED5C,
+    $1CCF8A2B,$B479A792,$F207F3F0,$E2694EA1,$F4DA65CD,$BE0506D5,$6234D11F,$FEA6C48A,
+    $532E349D,$55F3A2A0,$E18A0532,$EBF6A475,$EC830B39,$EF6040AA,$9F715E06,$106EBD51,
+    $8A213EF9,$06DD963D,$053EDDAE,$BDE64D46,$8D5491B5,$5DC47105,$D406046F,$155060FF,
+    $FB981924,$E9BDD697,$434089CC,$9ED96777,$42E8B0BD,$8B890788,$5B19E738,$EEC879DB,
+    $0A7CA147,$0F427CE9,$1E84F8C9,$00000000,$86800983,$ED2B3248,$70111EAC,$725A6C4E,
+    $FF0EFDFB,$38850F56,$D5AE3D1E,$392D3627,$D90F0A64,$A65C6821,$545B9BD1,$2E36243A,
+    $670A0CB1,$E757930F,$96EEB4D2,$919B1B9E,$C5C0804F,$20DC61A2,$4B775A69,$1A121C16,
+    $BA93E20A,$2AA0C0E5,$E0223C43,$171B121D,$0D090E0B,$C78BF2AD,$A8B62DB9,$A91E14C8,
+    $19F15785,$0775AF4C,$DD99EEBB,$607FA3FD,$2601F79F,$F5725CBC,$3B6644C5,$7EFB5B34,
+    $29438B76,$C623CBDC,$FCEDB668,$F1E4B863,$DC31D7CA,$85634210,$22971340,$11C68420,
+    $244A857D,$3DBBD2F8,$32F9AE11,$A129C76D,$2F9E1D4B,$30B2DCF3,$52860DEC,$E3C177D0,
+    $16B32B6C,$B970A999,$489411FA,$64E94722,$8CFCA8C4,$3FF0A01A,$2C7D56D8,$903322EF,
+    $4E4987C7,$D138D9C1,$A2CA8CFE,$0BD49836,$81F5A6CF,$DE7AA528,$8EB7DA26,$BFAD3FA4,
+    $9D3A2CE4,$9278500D,$CC5F6A9B,$467E5462,$138DF6C2,$B8D890E8,$F7392E5E,$AFC382F5,
+    $805D9FBE,$93D0697C,$2DD56FA9,$1225CFB3,$99ACC83B,$7D1810A7,$639CE86E,$BB3BDB7B,
+    $7826CD09,$18596EF4,$B79AEC01,$9A4F83A8,$6E95E665,$E6FFAA7E,$CFBC2108,$E815EFE6,
+    $9BE7BAD9,$366F4ACE,$099FEAD4,$7CB029D6,$B2A431AF,$233F2A31,$94A5C630,$66A235C0,
+    $BC4E7437,$CA82FCA6,$D090E0B0,$D8A73315,$9804F14A,$DAEC41F7,$50CD7F0E,$F691172F,
+    $D64D768D,$B0EF434D,$4DAACC54,$0496E4DF,$B5D19EE3,$886A4C1B,$1F2CC1B8,$5165467F,
+    $EA5E9D04,$358C015D,$7487FA73,$410BFB2E,$1D67B35A,$D2DB9252,$5610E933,$47D66D13,
+    $61D79A8C,$0CA1377A,$14F8598E,$3C13EB89,$27A9CEEE,$C961B735,$E51CE1ED,$B1477A3C,
+    $DFD29C59,$73F2553F,$CE141879,$37C773BF,$CDF753EA,$AAFD5F5B,$6F3DDF14,$DB447886,
+    $F3AFCA81,$C468B93E,$3424382C,$40A3C25F,$C31D1672,$25E2BC0C,$493C288B,$950DFF41,
+    $01A83971,$B30C08DE,$E4B4D89C,$C1566490,$84CB7B61,$B632D570,$5C6C4874,$57B8D042),
+   ($F45150A7,$417E5365,$171AC3A4,$273A965E,$AB3BCB6B,$9D1FF145,$FAACAB58,$E34B9303,
+    $302055FA,$76ADF66D,$CC889176,$02F5254C,$E54FFCD7,$2AC5D7CB,$35268044,$62B58FA3,
+    $B1DE495A,$BA25671B,$EA45980E,$FE5DE1C0,$2FC30275,$4C8112F0,$468DA397,$D36BC6F9,
+    $8F03E75F,$9215959C,$6DBFEB7A,$5295DA59,$BED42D83,$7458D321,$E0492969,$C98E44C8,
+    $C2756A89,$8EF47879,$58996B3E,$B927DD71,$E1BEB64F,$88F017AD,$20C966AC,$CE7DB43A,
+    $DF63184A,$1AE58231,$51976033,$5362457F,$64B1E077,$6BBB84AE,$81FE1CA0,$08F9942B,
+    $48705868,$458F19FD,$DE94876C,$7B52B7F8,$73AB23D3,$4B72E202,$1FE3578F,$55662AAB,
+    $EBB20728,$B52F03C2,$C5869A7B,$37D3A508,$2830F287,$BF23B2A5,$0302BA6A,$16ED5C82,
+    $CF8A2B1C,$79A792B4,$07F3F0F2,$694EA1E2,$DA65CDF4,$0506D5BE,$34D11F62,$A6C48AFE,
+    $2E349D53,$F3A2A055,$8A0532E1,$F6A475EB,$830B39EC,$6040AAEF,$715E069F,$6EBD5110,
+    $213EF98A,$DD963D06,$3EDDAE05,$E64D46BD,$5491B58D,$C471055D,$06046FD4,$5060FF15,
+    $981924FB,$BDD697E9,$4089CC43,$D967779E,$E8B0BD42,$8907888B,$19E7385B,$C879DBEE,
+    $7CA1470A,$427CE90F,$84F8C91E,$00000000,$80098386,$2B3248ED,$111EAC70,$5A6C4E72,
+    $0EFDFBFF,$850F5638,$AE3D1ED5,$2D362739,$0F0A64D9,$5C6821A6,$5B9BD154,$36243A2E,
+    $0A0CB167,$57930FE7,$EEB4D296,$9B1B9E91,$C0804FC5,$DC61A220,$775A694B,$121C161A,
+    $93E20ABA,$A0C0E52A,$223C43E0,$1B121D17,$090E0B0D,$8BF2ADC7,$B62DB9A8,$1E14C8A9,
+    $F1578519,$75AF4C07,$99EEBBDD,$7FA3FD60,$01F79F26,$725CBCF5,$6644C53B,$FB5B347E,
+    $438B7629,$23CBDCC6,$EDB668FC,$E4B863F1,$31D7CADC,$63421085,$97134022,$C6842011,
+    $4A857D24,$BBD2F83D,$F9AE1132,$29C76DA1,$9E1D4B2F,$B2DCF330,$860DEC52,$C177D0E3,
+    $B32B6C16,$70A999B9,$9411FA48,$E9472264,$FCA8C48C,$F0A01A3F,$7D56D82C,$3322EF90,
+    $4987C74E,$38D9C1D1,$CA8CFEA2,$D498360B,$F5A6CF81,$7AA528DE,$B7DA268E,$AD3FA4BF,
+    $3A2CE49D,$78500D92,$5F6A9BCC,$7E546246,$8DF6C213,$D890E8B8,$392E5EF7,$C382F5AF,
+    $5D9FBE80,$D0697C93,$D56FA92D,$25CFB312,$ACC83B99,$1810A77D,$9CE86E63,$3BDB7BBB,
+    $26CD0978,$596EF418,$9AEC01B7,$4F83A89A,$95E6656E,$FFAA7EE6,$BC2108CF,$15EFE6E8,
+    $E7BAD99B,$6F4ACE36,$9FEAD409,$B029D67C,$A431AFB2,$3F2A3123,$A5C63094,$A235C066,
+    $4E7437BC,$82FCA6CA,$90E0B0D0,$A73315D8,$04F14A98,$EC41F7DA,$CD7F0E50,$91172FF6,
+    $4D768DD6,$EF434DB0,$AACC544D,$96E4DF04,$D19EE3B5,$6A4C1B88,$2CC1B81F,$65467F51,
+    $5E9D04EA,$8C015D35,$87FA7374,$0BFB2E41,$67B35A1D,$DB9252D2,$10E93356,$D66D1347,
+    $D79A8C61,$A1377A0C,$F8598E14,$13EB893C,$A9CEEE27,$61B735C9,$1CE1EDE5,$477A3CB1,
+    $D29C59DF,$F2553F73,$141879CE,$C773BF37,$F753EACD,$FD5F5BAA,$3DDF146F,$447886DB,
+    $AFCA81F3,$68B93EC4,$24382C34,$A3C25F40,$1D1672C3,$E2BC0C25,$3C288B49,$0DFF4195,
+    $A8397101,$0C08DEB3,$B4D89CE4,$566490C1,$CB7B6184,$32D570B6,$6C48745C,$B8D04257),
+   ($5150A7F4,$7E536541,$1AC3A417,$3A965E27,$3BCB6BAB,$1FF1459D,$ACAB58FA,$4B9303E3,
+    $2055FA30,$ADF66D76,$889176CC,$F5254C02,$4FFCD7E5,$C5D7CB2A,$26804435,$B58FA362,
+    $DE495AB1,$25671BBA,$45980EEA,$5DE1C0FE,$C302752F,$8112F04C,$8DA39746,$6BC6F9D3,
+    $03E75F8F,$15959C92,$BFEB7A6D,$95DA5952,$D42D83BE,$58D32174,$492969E0,$8E44C8C9,
+    $756A89C2,$F478798E,$996B3E58,$27DD71B9,$BEB64FE1,$F017AD88,$C966AC20,$7DB43ACE,
+    $63184ADF,$E582311A,$97603351,$62457F53,$B1E07764,$BB84AE6B,$FE1CA081,$F9942B08,
+    $70586848,$8F19FD45,$94876CDE,$52B7F87B,$AB23D373,$72E2024B,$E3578F1F,$662AAB55,
+    $B20728EB,$2F03C2B5,$869A7BC5,$D3A50837,$30F28728,$23B2A5BF,$02BA6A03,$ED5C8216,
+    $8A2B1CCF,$A792B479,$F3F0F207,$4EA1E269,$65CDF4DA,$06D5BE05,$D11F6234,$C48AFEA6,
+    $349D532E,$A2A055F3,$0532E18A,$A475EBF6,$0B39EC83,$40AAEF60,$5E069F71,$BD51106E,
+    $3EF98A21,$963D06DD,$DDAE053E,$4D46BDE6,$91B58D54,$71055DC4,$046FD406,$60FF1550,
+    $1924FB98,$D697E9BD,$89CC4340,$67779ED9,$B0BD42E8,$07888B89,$E7385B19,$79DBEEC8,
+    $A1470A7C,$7CE90F42,$F8C91E84,$00000000,$09838680,$3248ED2B,$1EAC7011,$6C4E725A,
+    $FDFBFF0E,$0F563885,$3D1ED5AE,$3627392D,$0A64D90F,$6821A65C,$9BD1545B,$243A2E36,
+    $0CB1670A,$930FE757,$B4D296EE,$1B9E919B,$804FC5C0,$61A220DC,$5A694B77,$1C161A12,
+    $E20ABA93,$C0E52AA0,$3C43E022,$121D171B,$0E0B0D09,$F2ADC78B,$2DB9A8B6,$14C8A91E,
+    $578519F1,$AF4C0775,$EEBBDD99,$A3FD607F,$F79F2601,$5CBCF572,$44C53B66,$5B347EFB,
+    $8B762943,$CBDCC623,$B668FCED,$B863F1E4,$D7CADC31,$42108563,$13402297,$842011C6,
+    $857D244A,$D2F83DBB,$AE1132F9,$C76DA129,$1D4B2F9E,$DCF330B2,$0DEC5286,$77D0E3C1,
+    $2B6C16B3,$A999B970,$11FA4894,$472264E9,$A8C48CFC,$A01A3FF0,$56D82C7D,$22EF9033,
+    $87C74E49,$D9C1D138,$8CFEA2CA,$98360BD4,$A6CF81F5,$A528DE7A,$DA268EB7,$3FA4BFAD,
+    $2CE49D3A,$500D9278,$6A9BCC5F,$5462467E,$F6C2138D,$90E8B8D8,$2E5EF739,$82F5AFC3,
+    $9FBE805D,$697C93D0,$6FA92DD5,$CFB31225,$C83B99AC,$10A77D18,$E86E639C,$DB7BBB3B,
+    $CD097826,$6EF41859,$EC01B79A,$83A89A4F,$E6656E95,$AA7EE6FF,$2108CFBC,$EFE6E815,
+    $BAD99BE7,$4ACE366F,$EAD4099F,$29D67CB0,$31AFB2A4,$2A31233F,$C63094A5,$35C066A2,
+    $7437BC4E,$FCA6CA82,$E0B0D090,$3315D8A7,$F14A9804,$41F7DAEC,$7F0E50CD,$172FF691,
+    $768DD64D,$434DB0EF,$CC544DAA,$E4DF0496,$9EE3B5D1,$4C1B886A,$C1B81F2C,$467F5165,
+    $9D04EA5E,$015D358C,$FA737487,$FB2E410B,$B35A1D67,$9252D2DB,$E9335610,$6D1347D6,
+    $9A8C61D7,$377A0CA1,$598E14F8,$EB893C13,$CEEE27A9,$B735C961,$E1EDE51C,$7A3CB147,
+    $9C59DFD2,$553F73F2,$1879CE14,$73BF37C7,$53EACDF7,$5F5BAAFD,$DF146F3D,$7886DB44,
+    $CA81F3AF,$B93EC468,$382C3424,$C25F40A3,$1672C31D,$BC0C25E2,$288B493C,$FF41950D,
+    $397101A8,$08DEB30C,$D89CE4B4,$6490C156,$7B6184CB,$D570B632,$48745C6C,$D04257B8));
+
+  Rijndael_Key: array[0..255] of LongWord = (
+    $00000000,$0B0D090E,$161A121C,$1D171B12,$2C342438,$27392D36,$3A2E3624,$31233F2A,
+    $58684870,$5365417E,$4E725A6C,$457F5362,$745C6C48,$7F516546,$62467E54,$694B775A,
+    $B0D090E0,$BBDD99EE,$A6CA82FC,$ADC78BF2,$9CE4B4D8,$97E9BDD6,$8AFEA6C4,$81F3AFCA,
+    $E8B8D890,$E3B5D19E,$FEA2CA8C,$F5AFC382,$C48CFCA8,$CF81F5A6,$D296EEB4,$D99BE7BA,
+    $7BBB3BDB,$70B632D5,$6DA129C7,$66AC20C9,$578F1FE3,$5C8216ED,$41950DFF,$4A9804F1,
+    $23D373AB,$28DE7AA5,$35C961B7,$3EC468B9,$0FE75793,$04EA5E9D,$19FD458F,$12F04C81,
+    $CB6BAB3B,$C066A235,$DD71B927,$D67CB029,$E75F8F03,$EC52860D,$F1459D1F,$FA489411,
+    $9303E34B,$980EEA45,$8519F157,$8E14F859,$BF37C773,$B43ACE7D,$A92DD56F,$A220DC61,
+    $F66D76AD,$FD607FA3,$E07764B1,$EB7A6DBF,$DA595295,$D1545B9B,$CC434089,$C74E4987,
+    $AE053EDD,$A50837D3,$B81F2CC1,$B31225CF,$82311AE5,$893C13EB,$942B08F9,$9F2601F7,
+    $46BDE64D,$4DB0EF43,$50A7F451,$5BAAFD5F,$6A89C275,$6184CB7B,$7C93D069,$779ED967,
+    $1ED5AE3D,$15D8A733,$08CFBC21,$03C2B52F,$32E18A05,$39EC830B,$24FB9819,$2FF69117,
+    $8DD64D76,$86DB4478,$9BCC5F6A,$90C15664,$A1E2694E,$AAEF6040,$B7F87B52,$BCF5725C,
+    $D5BE0506,$DEB30C08,$C3A4171A,$C8A91E14,$F98A213E,$F2872830,$EF903322,$E49D3A2C,
+    $3D06DD96,$360BD498,$2B1CCF8A,$2011C684,$1132F9AE,$1A3FF0A0,$0728EBB2,$0C25E2BC,
+    $656E95E6,$6E639CE8,$737487FA,$78798EF4,$495AB1DE,$4257B8D0,$5F40A3C2,$544DAACC,
+    $F7DAEC41,$FCD7E54F,$E1C0FE5D,$EACDF753,$DBEEC879,$D0E3C177,$CDF4DA65,$C6F9D36B,
+    $AFB2A431,$A4BFAD3F,$B9A8B62D,$B2A5BF23,$83868009,$888B8907,$959C9215,$9E919B1B,
+    $470A7CA1,$4C0775AF,$51106EBD,$5A1D67B3,$6B3E5899,$60335197,$7D244A85,$7629438B,
+    $1F6234D1,$146F3DDF,$097826CD,$02752FC3,$335610E9,$385B19E7,$254C02F5,$2E410BFB,
+    $8C61D79A,$876CDE94,$9A7BC586,$9176CC88,$A055F3A2,$AB58FAAC,$B64FE1BE,$BD42E8B0,
+    $D4099FEA,$DF0496E4,$C2138DF6,$C91E84F8,$F83DBBD2,$F330B2DC,$EE27A9CE,$E52AA0C0,
+    $3CB1477A,$37BC4E74,$2AAB5566,$21A65C68,$10856342,$1B886A4C,$069F715E,$0D927850,
+    $64D90F0A,$6FD40604,$72C31D16,$79CE1418,$48ED2B32,$43E0223C,$5EF7392E,$55FA3020,
+    $01B79AEC,$0ABA93E2,$17AD88F0,$1CA081FE,$2D83BED4,$268EB7DA,$3B99ACC8,$3094A5C6,
+    $59DFD29C,$52D2DB92,$4FC5C080,$44C8C98E,$75EBF6A4,$7EE6FFAA,$63F1E4B8,$68FCEDB6,
+    $B1670A0C,$BA6A0302,$A77D1810,$AC70111E,$9D532E34,$965E273A,$8B493C28,$80443526,
+    $E90F427C,$E2024B72,$FF155060,$F418596E,$C53B6644,$CE366F4A,$D3217458,$D82C7D56,
+    $7A0CA137,$7101A839,$6C16B32B,$671BBA25,$5638850F,$5D358C01,$40229713,$4B2F9E1D,
+    $2264E947,$2969E049,$347EFB5B,$3F73F255,$0E50CD7F,$055DC471,$184ADF63,$1347D66D,
+    $CADC31D7,$C1D138D9,$DCC623CB,$D7CB2AC5,$E6E815EF,$EDE51CE1,$F0F207F3,$FBFF0EFD,
+    $92B479A7,$99B970A9,$84AE6BBB,$8FA362B5,$BE805D9F,$B58D5491,$A89A4F83,$A397468D);
+
+  Skipjack_Data: array[0..255] of Byte = (
+    $A3,$D7,$09,$83,$F8,$48,$F6,$F4,$B3,$21,$15,$78,$99,$B1,$AF,$F9,
+    $E7,$2D,$4D,$8A,$CE,$4C,$CA,$2E,$52,$95,$D9,$1E,$4E,$38,$44,$28,
+    $0A,$DF,$02,$A0,$17,$F1,$60,$68,$12,$B7,$7A,$C3,$E9,$FA,$3D,$53,
+    $96,$84,$6B,$BA,$F2,$63,$9A,$19,$7C,$AE,$E5,$F5,$F7,$16,$6A,$A2,
+    $39,$B6,$7B,$0F,$C1,$93,$81,$1B,$EE,$B4,$1A,$EA,$D0,$91,$2F,$B8,
+    $55,$B9,$DA,$85,$3F,$41,$BF,$E0,$5A,$58,$80,$5F,$66,$0B,$D8,$90,
+    $35,$D5,$C0,$A7,$33,$06,$65,$69,$45,$00,$94,$56,$6D,$98,$9B,$76,
+    $97,$FC,$B2,$C2,$B0,$FE,$DB,$20,$E1,$EB,$D6,$E4,$DD,$47,$4A,$1D,
+    $42,$ED,$9E,$6E,$49,$3C,$CD,$43,$27,$D2,$07,$D4,$DE,$C7,$67,$18,
+    $89,$CB,$30,$1F,$8D,$C6,$8F,$AA,$C8,$74,$DC,$C9,$5D,$5C,$31,$A4,
+    $70,$88,$61,$2C,$9F,$0D,$2B,$87,$50,$82,$54,$64,$26,$7D,$03,$40,
+    $34,$4B,$1C,$73,$D1,$C4,$FD,$3B,$CC,$FB,$7F,$AB,$E6,$3E,$5B,$A5,
+    $AD,$04,$23,$9C,$14,$51,$22,$F0,$29,$79,$71,$7E,$FF,$8C,$0E,$E2,
+    $0C,$EF,$BC,$72,$75,$6F,$37,$A1,$EC,$D3,$8E,$62,$8B,$86,$10,$E8,
+    $08,$77,$11,$BE,$92,$4F,$24,$C5,$32,$36,$9D,$CF,$F3,$A6,$BB,$AC,
+    $5E,$6C,$A9,$13,$57,$25,$B5,$E3,$BD,$A8,$3A,$01,$05,$59,$2A,$46);
+
+  DES_PC1: array[0..55] of Byte =
+   (56, 48, 40, 32, 24, 16,  8,  0, 57, 49, 41, 33, 25, 17,
+     9,  1, 58, 50, 42, 34, 26,	18, 10,  2, 59, 51, 43, 35,
+    62, 54, 46, 38, 30, 22, 14,	 6, 61, 53, 45, 37, 29, 21,
+    13,  5, 60, 52, 44, 36, 28,	20, 12,  4, 27, 19, 11,  3);
+
+  DES_PC2: array[0..47] of Byte =
+   (13, 16, 10, 23,  0,  4,  2, 27, 14,  5, 20,  9,
+    22, 18, 11,  3, 25,  7, 15,  6, 26, 19, 12,  1,
+    40, 51, 30, 36, 46, 54, 29, 39, 50, 44, 32, 47,
+    43, 48, 38, 55, 33, 52, 45, 41, 49, 35, 28, 31);
+
+  DES_Data: array[0..7, 0..63] of LongWord = (
+   ($00200000,$04200002,$04000802,$00000000,$00000800,$04000802,$00200802,$04200800,
+    $04200802,$00200000,$00000000,$04000002,$00000002,$04000000,$04200002,$00000802,
+    $04000800,$00200802,$00200002,$04000800,$04000002,$04200000,$04200800,$00200002,
+    $04200000,$00000800,$00000802,$04200802,$00200800,$00000002,$04000000,$00200800,
+    $04000000,$00200800,$00200000,$04000802,$04000802,$04200002,$04200002,$00000002,
+    $00200002,$04000000,$04000800,$00200000,$04200800,$00000802,$00200802,$04200800,
+    $00000802,$04000002,$04200802,$04200000,$00200800,$00000000,$00000002,$04200802,
+    $00000000,$00200802,$04200000,$00000800,$04000002,$04000800,$00000800,$00200002),
+   ($00000100,$02080100,$02080000,$42000100,$00080000,$00000100,$40000000,$02080000,
+    $40080100,$00080000,$02000100,$40080100,$42000100,$42080000,$00080100,$40000000,
+    $02000000,$40080000,$40080000,$00000000,$40000100,$42080100,$42080100,$02000100,
+    $42080000,$40000100,$00000000,$42000000,$02080100,$02000000,$42000000,$00080100,
+    $00080000,$42000100,$00000100,$02000000,$40000000,$02080000,$42000100,$40080100,
+    $02000100,$40000000,$42080000,$02080100,$40080100,$00000100,$02000000,$42080000,
+    $42080100,$00080100,$42000000,$42080100,$02080000,$00000000,$40080000,$42000000,
+    $00080100,$02000100,$40000100,$00080000,$00000000,$40080000,$02080100,$40000100),
+   ($00000208,$08020200,$00000000,$08020008,$08000200,$00000000,$00020208,$08000200,
+    $00020008,$08000008,$08000008,$00020000,$08020208,$00020008,$08020000,$00000208,
+    $08000000,$00000008,$08020200,$00000200,$00020200,$08020000,$08020008,$00020208,
+    $08000208,$00020200,$00020000,$08000208,$00000008,$08020208,$00000200,$08000000,
+    $08020200,$08000000,$00020008,$00000208,$00020000,$08020200,$08000200,$00000000,
+    $00000200,$00020008,$08020208,$08000200,$08000008,$00000200,$00000000,$08020008,
+    $08000208,$00020000,$08000000,$08020208,$00000008,$00020208,$00020200,$08000008,
+    $08020000,$08000208,$00000208,$08020000,$00020208,$00000008,$08020008,$00020200),
+   ($01010400,$00000000,$00010000,$01010404,$01010004,$00010404,$00000004,$00010000,
+    $00000400,$01010400,$01010404,$00000400,$01000404,$01010004,$01000000,$00000004,
+    $00000404,$01000400,$01000400,$00010400,$00010400,$01010000,$01010000,$01000404,
+    $00010004,$01000004,$01000004,$00010004,$00000000,$00000404,$00010404,$01000000,
+    $00010000,$01010404,$00000004,$01010000,$01010400,$01000000,$01000000,$00000400,
+    $01010004,$00010000,$00010400,$01000004,$00000400,$00000004,$01000404,$00010404,
+    $01010404,$00010004,$01010000,$01000404,$01000004,$00000404,$00010404,$01010400,
+    $00000404,$01000400,$01000400,$00000000,$00010004,$00010400,$00000000,$01010004),
+   ($10001040,$00001000,$00040000,$10041040,$10000000,$10001040,$00000040,$10000000,
+    $00040040,$10040000,$10041040,$00041000,$10041000,$00041040,$00001000,$00000040,
+    $10040000,$10000040,$10001000,$00001040,$00041000,$00040040,$10040040,$10041000,
+    $00001040,$00000000,$00000000,$10040040,$10000040,$10001000,$00041040,$00040000,
+    $00041040,$00040000,$10041000,$00001000,$00000040,$10040040,$00001000,$00041040,
+    $10001000,$00000040,$10000040,$10040000,$10040040,$10000000,$00040000,$10001040,
+    $00000000,$10041040,$00040040,$10000040,$10040000,$10001000,$10001040,$00000000,
+    $10041040,$00041000,$00041000,$00001040,$00001040,$00040040,$10000000,$10041000),
+   ($20000010,$20400000,$00004000,$20404010,$20400000,$00000010,$20404010,$00400000,
+    $20004000,$00404010,$00400000,$20000010,$00400010,$20004000,$20000000,$00004010,
+    $00000000,$00400010,$20004010,$00004000,$00404000,$20004010,$00000010,$20400010,
+    $20400010,$00000000,$00404010,$20404000,$00004010,$00404000,$20404000,$20000000,
+    $20004000,$00000010,$20400010,$00404000,$20404010,$00400000,$00004010,$20000010,
+    $00400000,$20004000,$20000000,$00004010,$20000010,$20404010,$00404000,$20400000,
+    $00404010,$20404000,$00000000,$20400010,$00000010,$00004000,$20400000,$00404010,
+    $00004000,$00400010,$20004010,$00000000,$20404000,$20000000,$00400010,$20004010),
+   ($00802001,$00002081,$00002081,$00000080,$00802080,$00800081,$00800001,$00002001,
+    $00000000,$00802000,$00802000,$00802081,$00000081,$00000000,$00800080,$00800001,
+    $00000001,$00002000,$00800000,$00802001,$00000080,$00800000,$00002001,$00002080,
+    $00800081,$00000001,$00002080,$00800080,$00002000,$00802080,$00802081,$00000081,
+    $00800080,$00800001,$00802000,$00802081,$00000081,$00000000,$00000000,$00802000,
+    $00002080,$00800080,$00800081,$00000001,$00802001,$00002081,$00002081,$00000080,
+    $00802081,$00000081,$00000001,$00002000,$00800001,$00002001,$00802080,$00800081,
+    $00002001,$00002080,$00800000,$00802001,$00000080,$00800000,$00002000,$00802080),
+   ($80108020,$80008000,$00008000,$00108020,$00100000,$00000020,$80100020,$80008020,
+    $80000020,$80108020,$80108000,$80000000,$80008000,$00100000,$00000020,$80100020,
+    $00108000,$00100020,$80008020,$00000000,$80000000,$00008000,$00108020,$80100000,
+    $00100020,$80000020,$00000000,$00108000,$00008020,$80108000,$80100000,$00008020,
+    $00000000,$00108020,$80100020,$00100000,$80008020,$80100000,$80108000,$00008000,
+    $80100000,$80008000,$00000020,$80108020,$00108020,$00000020,$00008000,$80000000,
+    $00008020,$80108000,$00100000,$80000020,$00100020,$80008020,$80000020,$00100020,
+    $00108000,$00000000,$80008000,$00008020,$80000000,$80100020,$80108020,$00108000));
+
+  NewDES_Data: array[0..255] of Byte = (
+    32,137,239,188,102,125,221, 72,212, 68, 81, 37, 86,237,147,149,
+    70,229, 17,124,115,207, 33, 20,122,143, 25,215, 51,183,138,142,
+   146,211,110,173,  1,228,189, 14,103, 78,162, 36,253,167,116,255,
+   158, 45,185, 50, 98,168,250,235, 54,141,195,247,240, 63,148,  2,
+   224,169,214,180, 62, 22,117,108, 19,172,161,159,160, 47, 43,171,
+   194,175,178, 56,196,112, 23,220, 89, 21,164,130,157,  8, 85,251,
+   216, 44, 94,179,226, 38, 90,119, 40,202, 34,206, 35, 69,231,246,
+    29,109, 74, 71,176,  6, 60,145, 65, 13, 77,151, 12,127, 95,199,
+    57,101,  5,232,150,210,129, 24,181, 10,121,187, 48,193,139,252,
+   219, 64, 88,233, 96,128, 80, 53,191,144,218, 11,106,132,155,104,
+    91,136, 31, 42,243, 66,126,135, 30, 26, 87,186,182,154,242,123,
+    82,166,208, 39,152,190,113,205,114,105,225, 84, 73,163, 99,111,
+   204, 61,200,217,170, 15,198, 28,192,254,134,234,222,  7,236,248,
+   201, 41,177,156, 92,131, 67,249,245,184,203,  9,241,  0, 27, 46,
+   133,174, 75, 18, 93,209,100,120, 76,213, 16, 83,  4,107,140, 52,
+   58, 55,  3,244, 97,197,238,227,118, 49, 79,230,223,165,153, 59);
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D10.bdsproj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D10.bdsproj
new file mode 100644
index 0000000..24569b2
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D10.bdsproj	
@@ -0,0 +1,181 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality" Type="String">Delphi.Personality</Option>
+			<Option Name="ProjectType" Type="String"></Option>
+			<Option Name="Version" Type="String">1.0</Option>
+			<Option Name="GUID" Type="String">{0FE2BA34-A199-4666-87ED-E47A2B9D252C}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource" Type="String">RemObjects_RODX_D10.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version" Type="String">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A" Type="Integer">8</Compiler>
+			<Compiler Name="B" Type="Integer">0</Compiler>
+			<Compiler Name="C" Type="Integer">1</Compiler>
+			<Compiler Name="D" Type="Integer">1</Compiler>
+			<Compiler Name="E" Type="Integer">0</Compiler>
+			<Compiler Name="F" Type="Integer">0</Compiler>
+			<Compiler Name="G" Type="Integer">1</Compiler>
+			<Compiler Name="H" Type="Integer">1</Compiler>
+			<Compiler Name="I" Type="Integer">1</Compiler>
+			<Compiler Name="J" Type="Integer">0</Compiler>
+			<Compiler Name="K" Type="Integer">0</Compiler>
+			<Compiler Name="L" Type="Integer">1</Compiler>
+			<Compiler Name="M" Type="Integer">0</Compiler>
+			<Compiler Name="N" Type="Integer">1</Compiler>
+			<Compiler Name="O" Type="Integer">1</Compiler>
+			<Compiler Name="P" Type="Integer">1</Compiler>
+			<Compiler Name="Q" Type="Integer">0</Compiler>
+			<Compiler Name="R" Type="Integer">0</Compiler>
+			<Compiler Name="S" Type="Integer">0</Compiler>
+			<Compiler Name="T" Type="Integer">0</Compiler>
+			<Compiler Name="U" Type="Integer">0</Compiler>
+			<Compiler Name="V" Type="Integer">1</Compiler>
+			<Compiler Name="W" Type="Integer">0</Compiler>
+			<Compiler Name="X" Type="Integer">1</Compiler>
+			<Compiler Name="Y" Type="Integer">1</Compiler>
+			<Compiler Name="Z" Type="Integer">1</Compiler>
+			<Compiler Name="ShowHints" Type="Boolean">True</Compiler>
+			<Compiler Name="ShowWarnings" Type="Boolean">True</Compiler>
+			<Compiler Name="UnitAliases" Type="String">WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;</Compiler>
+			<Compiler Name="NamespacePrefix" Type="String"></Compiler>
+			<Compiler Name="GenerateDocumentation" Type="Boolean">False</Compiler>
+			<Compiler Name="DefaultNamespace" Type="String"></Compiler>
+			<Compiler Name="SymbolDeprecated" Type="Boolean">False</Compiler>
+			<Compiler Name="SymbolLibrary" Type="Boolean">False</Compiler>
+			<Compiler Name="SymbolPlatform" Type="Boolean">False</Compiler>
+			<Compiler Name="SymbolExperimental" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitLibrary" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitPlatform" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitDeprecated" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitExperimental" Type="Boolean">False</Compiler>
+			<Compiler Name="HResultCompat" Type="Boolean">True</Compiler>
+			<Compiler Name="HidingMember" Type="Boolean">True</Compiler>
+			<Compiler Name="HiddenVirtual" Type="Boolean">True</Compiler>
+			<Compiler Name="Garbage" Type="Boolean">True</Compiler>
+			<Compiler Name="BoundsError" Type="Boolean">True</Compiler>
+			<Compiler Name="ZeroNilCompat" Type="Boolean">True</Compiler>
+			<Compiler Name="StringConstTruncated" Type="Boolean">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar" Type="Boolean">True</Compiler>
+			<Compiler Name="TypedConstVarPar" Type="Boolean">True</Compiler>
+			<Compiler Name="AsgToTypedConst" Type="Boolean">True</Compiler>
+			<Compiler Name="CaseLabelRange" Type="Boolean">True</Compiler>
+			<Compiler Name="ForVariable" Type="Boolean">True</Compiler>
+			<Compiler Name="ConstructingAbstract" Type="Boolean">True</Compiler>
+			<Compiler Name="ComparisonFalse" Type="Boolean">True</Compiler>
+			<Compiler Name="ComparisonTrue" Type="Boolean">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned" Type="Boolean">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned" Type="Boolean">True</Compiler>
+			<Compiler Name="UnsupportedConstruct" Type="Boolean">True</Compiler>
+			<Compiler Name="FileOpen" Type="Boolean">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc" Type="Boolean">True</Compiler>
+			<Compiler Name="BadGlobalSymbol" Type="Boolean">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor" Type="Boolean">True</Compiler>
+			<Compiler Name="InvalidDirective" Type="Boolean">True</Compiler>
+			<Compiler Name="PackageNoLink" Type="Boolean">True</Compiler>
+			<Compiler Name="PackageThreadVar" Type="Boolean">True</Compiler>
+			<Compiler Name="ImplicitImport" Type="Boolean">True</Compiler>
+			<Compiler Name="HPPEMITIgnored" Type="Boolean">True</Compiler>
+			<Compiler Name="NoRetVal" Type="Boolean">True</Compiler>
+			<Compiler Name="UseBeforeDef" Type="Boolean">True</Compiler>
+			<Compiler Name="ForLoopVarUndef" Type="Boolean">True</Compiler>
+			<Compiler Name="UnitNameMismatch" Type="Boolean">True</Compiler>
+			<Compiler Name="NoCFGFileFound" Type="Boolean">True</Compiler>
+			<Compiler Name="MessageDirective" Type="Boolean">True</Compiler>
+			<Compiler Name="ImplicitVariants" Type="Boolean">True</Compiler>
+			<Compiler Name="UnicodeToLocale" Type="Boolean">True</Compiler>
+			<Compiler Name="LocaleToUnicode" Type="Boolean">True</Compiler>
+			<Compiler Name="ImagebaseMultiple" Type="Boolean">True</Compiler>
+			<Compiler Name="SuspiciousTypecast" Type="Boolean">True</Compiler>
+			<Compiler Name="PrivatePropAccessor" Type="Boolean">True</Compiler>
+			<Compiler Name="UnsafeType" Type="Boolean">False</Compiler>
+			<Compiler Name="UnsafeCode" Type="Boolean">False</Compiler>
+			<Compiler Name="UnsafeCast" Type="Boolean">False</Compiler>
+			<Compiler Name="OptionTruncated" Type="Boolean">True</Compiler>
+			<Compiler Name="WideCharReduced" Type="Boolean">True</Compiler>
+			<Compiler Name="DuplicatesIgnored" Type="Boolean">True</Compiler>
+			<Compiler Name="UnitInitSeq">True</Compiler>
+			<Compiler Name="LocalPInvoke">True</Compiler>
+			<Compiler Name="CodePage"></Compiler>
+		</Compiler>
+		<Linker>
+			<Linker Name="MapFile" Type="Integer">0</Linker>
+			<Linker Name="OutputObjs" Type="Integer">0</Linker>
+			<Linker Name="ConsoleApp" Type="Integer">1</Linker>
+			<Linker Name="DebugInfo" Type="Boolean">False</Linker>
+			<Linker Name="RemoteSymbols" Type="Boolean">False</Linker>
+			<Linker Name="GenerateDRC" Type="Boolean">False</Linker>
+			<Linker Name="MinStackSize" Type="Integer">16384</Linker>
+			<Linker Name="MaxStackSize" Type="Integer">1048576</Linker>
+			<Linker Name="ImageBase" Type="Integer">4194304</Linker>
+			<Linker Name="ExeDescription" Type="String">RemObjects SDK - RODXSock Library</Linker>
+			<Linker Name="GenerateHpps">False</Linker>
+		</Linker>
+		<Directories>
+			<Directories Name="OutputDir" Type="String"></Directories>
+			<Directories Name="UnitOutputDir" Type="String">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDLLOutputDir" Type="String">..\..\Dcu\D10</Directories>
+			<Directories Name="PackageDCPOutputDir" Type="String">..\..\Dcu\D10</Directories>
+			<Directories Name="SearchPath" Type="String">..\;..\..\Dcu\D10</Directories>
+			<Directories Name="Packages" Type="String"></Directories>
+			<Directories Name="Conditionals" Type="String"></Directories>
+			<Directories Name="DebugSourceDirs" Type="String"></Directories>
+			<Directories Name="UsePackages" Type="Boolean">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams" Type="String"></Parameters>
+			<Parameters Name="HostApplication" Type="String"></Parameters>
+			<Parameters Name="Launcher" Type="String"></Parameters>
+			<Parameters Name="UseLauncher" Type="Boolean">False</Parameters>
+			<Parameters Name="DebugCWD" Type="String"></Parameters>
+			<Parameters Name="RemoteHost" Type="String"></Parameters>
+			<Parameters Name="RemotePath" Type="String"></Parameters>
+			<Parameters Name="RemoteLauncher" Type="String"></Parameters>
+			<Parameters Name="RemoteCWD" Type="String"></Parameters>
+			<Parameters Name="RemoteDebug" Type="Boolean">False</Parameters>
+			<Parameters Name="Debug Symbols Search Path"></Parameters>
+			<Parameters Name="LoadAllSymbols">True</Parameters>
+			<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+		</Parameters>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo" Type="Boolean">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="MajorVer" Type="Integer">4</VersionInfo>
+			<VersionInfo Name="MinorVer" Type="Integer">0</VersionInfo>
+			<VersionInfo Name="Release" Type="Integer">0</VersionInfo>
+			<VersionInfo Name="Build" Type="Integer">404</VersionInfo>
+			<VersionInfo Name="Debug" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="PreRelease" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="Special" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="Private" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="DLL" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="Locale" Type="Integer">1033</VersionInfo>
+			<VersionInfo Name="CodePage" Type="Integer">1252</VersionInfo>
+		</VersionInfo>
+		<Language>
+			<Language Name="ActiveLang" Type="String"></Language>
+			<Language Name="ProjectLang" Type="String">$00000000</Language>
+			<Language Name="RootDir" Type="String"></Language>
+		</Language>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion">4.0.0.404</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+			<VersionInfoKeys Name="Comments"></VersionInfoKeys>
+		</VersionInfoKeys>
+	</Delphi.Personality>
+	<ModelSupport>False</ModelSupport>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D10.cfg b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D10.cfg
new file mode 100644
index 0000000..74d82bb
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D10.cfg	
@@ -0,0 +1,52 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N0"..\..\Dcu\D10"
+-LE"..\..\Dcu\D10"
+-LN"..\..\Dcu\D10"
+-U"..\;..\..\Dcu\D10"
+-O"..\;..\..\Dcu\D10"
+-I"..\;..\..\Dcu\D10"
+-R"..\;..\..\Dcu\D10"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-SYMBOL_EXPERIMENTAL
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNIT_EXPERIMENTAL
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D10.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D10.dpk
new file mode 100644
index 0000000..0e7beb1
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D10.dpk	
@@ -0,0 +1,46 @@
+package RemObjects_RODX_D10;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - RODXSock Library'}
+{$IMPLICITBUILD OFF}
+{%File 'RemObjects.inc'}
+
+requires
+  vcl,
+  rtl;
+
+contains
+  uRODXServerCore in 'uRODXServerCore.pas',
+  uRODXSessionTracker in 'uRODXSessionTracker.pas',
+  uRODXSock in 'uRODXSock.pas',
+  uRODXSockClient in 'uRODXSockClient.pas',
+  uRODXSocket in 'uRODXSocket.pas',
+  uRODXString in 'uRODXString.pas',
+  uRODXHTTPHeaderTools in 'uRODXHTTPHeaderTools.pas',
+  uRODXHTTPServerCore in 'uRODXHTTPServerCore.pas',
+  uRODXISAPI in 'uRODXISAPI.pas',
+  uRODXISAPIFilter in 'uRODXISAPIFilter.pas',
+  uRODXSecurity in 'uRODXSecurity.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D10.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D10.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D10.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D11.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D11.dpk
new file mode 100644
index 0000000..993aa0b
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D11.dpk	
@@ -0,0 +1,45 @@
+package RemObjects_RODX_D11;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - RODXSock Library'}
+{$IMPLICITBUILD OFF}
+
+requires
+  vcl,
+  rtl;
+
+contains
+  uRODXServerCore in 'uRODXServerCore.pas',
+  uRODXSessionTracker in 'uRODXSessionTracker.pas',
+  uRODXSock in 'uRODXSock.pas',
+  uRODXSockClient in 'uRODXSockClient.pas',
+  uRODXSocket in 'uRODXSocket.pas',
+  uRODXString in 'uRODXString.pas',
+  uRODXHTTPHeaderTools in 'uRODXHTTPHeaderTools.pas',
+  uRODXHTTPServerCore in 'uRODXHTTPServerCore.pas',
+  uRODXISAPI in 'uRODXISAPI.pas',
+  uRODXISAPIFilter in 'uRODXISAPIFilter.pas',
+  uRODXSecurity in 'uRODXSecurity.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D11.dproj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D11.dproj
new file mode 100644
index 0000000..95be6be
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D11.dproj	
@@ -0,0 +1,98 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{27e9e5ec-4c40-4f0d-8fcb-942f127195d1}</ProjectGuid>
+    <MainSource>RemObjects_RODX_D11.dpk</MainSource>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+    <DCC_DependencyCheckOutputName>..\..\Dcu\D11\RemObjects_RODX_D11.bpl</DCC_DependencyCheckOutputName>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DebugInformation>False</DCC_DebugInformation>
+    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+    <DCC_DcuOutput>..\..\Dcu\D10</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D10</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D10</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D10</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D10</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\;..\..\Dcu\D10</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\;..\..\Dcu\D10</DCC_ResourcePath>
+    <DCC_ObjPath>..\;..\..\Dcu\D10</DCC_ObjPath>
+    <DCC_IncludePath>..\;..\..\Dcu\D10</DCC_IncludePath>
+    <DCC_Define>RELEASE</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_SYMBOL_EXPERIMENTAL>False</DCC_SYMBOL_EXPERIMENTAL>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+    <DCC_UNIT_EXPERIMENTAL>False</DCC_UNIT_EXPERIMENTAL>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DcuOutput>..\..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\;..\..\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\;..\..\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\;..\..\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\;..\..\Dcu\D11</DCC_IncludePath>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_SYMBOL_EXPERIMENTAL>False</DCC_SYMBOL_EXPERIMENTAL>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+    <DCC_UNIT_EXPERIMENTAL>False</DCC_UNIT_EXPERIMENTAL>
+  </PropertyGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Delphi.Personality</Borland.Personality>
+    <Borland.ProjectType>Package</Borland.ProjectType>
+    <BorlandProject>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">RemObjects SDK - RODXSock Library</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">4</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">404</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">4.0.0.404</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">RemObjects_RODX_D11.dpk</Source></Source>  <Excluded_Packages>
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      <Excluded_Packages Name="$(BDS)\bin\dclbde100.bpl">CodeGear BDE DB Components</Excluded_Packages>
+      <Excluded_Packages Name="$(BDS)\bin\bcboffice2k100.bpl">CodeGear C++Builder Office 2000 Servers Package</Excluded_Packages>
+      <Excluded_Packages Name="$(BDS)\bin\bcbofficexp100.bpl">CodeGear C++Builder Office XP Servers Package</Excluded_Packages>
+      <Excluded_Packages Name="$(BDS)\bin\dcloffice2k100.bpl">Microsoft Office 2000 Sample Automation Server Wrapper Components</Excluded_Packages>
+      <Excluded_Packages Name="$(BDS)\bin\dclofficexp100.bpl">Microsoft Office XP Sample Automation Server Wrapper Components</Excluded_Packages>
+    </Excluded_Packages>
+  </Delphi.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
+  <ItemGroup>
+    <DelphiCompile Include="RemObjects_RODX_D11.dpk">
+      <MainSource>MainSource</MainSource>
+    </DelphiCompile>
+    <DCCReference Include="..\rtl.dcp" />
+    <DCCReference Include="..\vcl.dcp" />
+    <DCCReference Include="uRODXHTTPHeaderTools.pas" />
+    <DCCReference Include="uRODXHTTPServerCore.pas" />
+    <DCCReference Include="uRODXISAPI.pas" />
+    <DCCReference Include="uRODXISAPIFilter.pas" />
+    <DCCReference Include="uRODXSecurity.pas" />
+    <DCCReference Include="uRODXServerCore.pas" />
+    <DCCReference Include="uRODXSessionTracker.pas" />
+    <DCCReference Include="uRODXSock.pas" />
+    <DCCReference Include="uRODXSockClient.pas" />
+    <DCCReference Include="uRODXSocket.pas" />
+    <DCCReference Include="uRODXString.pas" />
+    <None Include="RemObjects.inc" />
+  </ItemGroup>
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D11.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D11.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D11.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D12.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D12.dpk
new file mode 100644
index 0000000..9e5c5e1
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D12.dpk	
@@ -0,0 +1,45 @@
+package RemObjects_RODX_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - RODXSock Library'}
+{$IMPLICITBUILD OFF}
+
+requires
+  vcl,
+  rtl;
+
+contains
+  uRODXServerCore in 'uRODXServerCore.pas',
+  uRODXSessionTracker in 'uRODXSessionTracker.pas',
+  uRODXSock in 'uRODXSock.pas',
+  uRODXSockClient in 'uRODXSockClient.pas',
+  uRODXSocket in 'uRODXSocket.pas',
+  uRODXString in 'uRODXString.pas',
+  uRODXHTTPHeaderTools in 'uRODXHTTPHeaderTools.pas',
+  uRODXHTTPServerCore in 'uRODXHTTPServerCore.pas',
+  uRODXISAPI in 'uRODXISAPI.pas',
+  uRODXISAPIFilter in 'uRODXISAPIFilter.pas',
+  uRODXSecurity in 'uRODXSecurity.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D12.dproj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D12.dproj
new file mode 100644
index 0000000..642b975
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D12.dproj	
@@ -0,0 +1,111 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{27e9e5ec-4c40-4f0d-8fcb-942f127195d1}</ProjectGuid>
+			<MainSource>RemObjects_RODX_D12.dpk</MainSource>
+			<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+			<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+			<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D11\RemObjects_RODX_D11.bpl</DCC_DependencyCheckOutputName>
+			<ProjectVersion>11.1</ProjectVersion>
+			<Config Condition="'$(Config)'==''">Base</Config>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base)'!=''">
+			<DCC_SymbolReferenceInfo>1</DCC_SymbolReferenceInfo>
+			<DCC_CVT_WCHAR_TO_ACHAR>error</DCC_CVT_WCHAR_TO_ACHAR>
+			<DCC_IMPLICIT_STRING_CAST>error</DCC_IMPLICIT_STRING_CAST>
+			<DCC_EXPLICIT_STRING_CAST_LOSS>error</DCC_EXPLICIT_STRING_CAST_LOSS>
+			<DCC_CVT_WIDENING_STRING_LOST>error</DCC_CVT_WIDENING_STRING_LOST>
+			<DCC_EXPLICIT_STRING_CAST>error</DCC_EXPLICIT_STRING_CAST>
+			<DCC_CVT_ACHAR_TO_WCHAR>error</DCC_CVT_ACHAR_TO_WCHAR>
+			<DCC_IMPLICIT_STRING_CAST_LOSS>error</DCC_IMPLICIT_STRING_CAST_LOSS>
+			<DCC_CVT_NARROWING_STRING_LOST>error</DCC_CVT_NARROWING_STRING_LOST>
+			<GenDll>true</GenDll>
+			<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+			<DCC_DcpOutput>..\..\Dcu\D12</DCC_DcpOutput>
+			<DCC_DcuOutput>..\..\Dcu\D12</DCC_DcuOutput>
+			<GenPackage>true</GenPackage>
+			<DesignOnlyPackage>false</DesignOnlyPackage>
+			<DCC_ImageBase>00400000</DCC_ImageBase>
+			<DCC_DependencyCheckOutputName>..\..\Dcu\D12\RemObjects_RODX_D12.bpl</DCC_DependencyCheckOutputName>
+			<DCC_Description>RemObjects SDK - RODXSock Library</DCC_Description>
+			<DCC_UnitSearchPath>..\..\Dcu\D12;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+			<DCC_BplOutput>..\..\Dcu\D12</DCC_BplOutput>
+		</PropertyGroup>
+		<ItemGroup>
+			<DelphiCompile Include="RemObjects_RODX_D12.dpk">
+				<MainSource>MainSource</MainSource>
+			</DelphiCompile>
+			<DCCReference Include="vcl.dcp"/>
+			<DCCReference Include="rtl.dcp"/>
+			<DCCReference Include="uRODXServerCore.pas"/>
+			<DCCReference Include="uRODXSessionTracker.pas"/>
+			<DCCReference Include="uRODXSock.pas"/>
+			<DCCReference Include="uRODXSockClient.pas"/>
+			<DCCReference Include="uRODXSocket.pas"/>
+			<DCCReference Include="uRODXString.pas"/>
+			<DCCReference Include="uRODXHTTPHeaderTools.pas"/>
+			<DCCReference Include="uRODXHTTPServerCore.pas"/>
+			<DCCReference Include="uRODXISAPI.pas"/>
+			<DCCReference Include="uRODXISAPIFilter.pas"/>
+			<DCCReference Include="uRODXSecurity.pas"/>
+			<None Include="RemObjects.inc"/>
+			<BuildConfiguration Include="Base">
+				<Key>Base</Key>
+			</BuildConfiguration>
+		</ItemGroup>
+		<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+		<ProjectExtensions>
+			<Borland.Personality>Delphi.Personality.12</Borland.Personality>
+			<Borland.ProjectType>Package</Borland.ProjectType>
+			<BorlandProject>
+				<Delphi.Personality>
+					<Parameters>
+						<Parameters Name="UseLauncher">False</Parameters>
+						<Parameters Name="LoadAllSymbols">True</Parameters>
+						<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+					</Parameters>
+					<VersionInfo>
+						<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+						<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+						<VersionInfo Name="MajorVer">4</VersionInfo>
+						<VersionInfo Name="MinorVer">0</VersionInfo>
+						<VersionInfo Name="Release">0</VersionInfo>
+						<VersionInfo Name="Build">404</VersionInfo>
+						<VersionInfo Name="Debug">False</VersionInfo>
+						<VersionInfo Name="PreRelease">False</VersionInfo>
+						<VersionInfo Name="Special">False</VersionInfo>
+						<VersionInfo Name="Private">False</VersionInfo>
+						<VersionInfo Name="DLL">False</VersionInfo>
+						<VersionInfo Name="Locale">1033</VersionInfo>
+						<VersionInfo Name="CodePage">1252</VersionInfo>
+					</VersionInfo>
+					<VersionInfoKeys>
+						<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="FileDescription"/>
+						<VersionInfoKeys Name="FileVersion">4.0.0.404</VersionInfoKeys>
+						<VersionInfoKeys Name="InternalName"/>
+						<VersionInfoKeys Name="LegalCopyright"/>
+						<VersionInfoKeys Name="LegalTrademarks"/>
+						<VersionInfoKeys Name="OriginalFilename"/>
+						<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+						<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+						<VersionInfoKeys Name="Comments"/>
+					</VersionInfoKeys>
+					<Source>
+						<Source Name="MainSource">RemObjects_RODX_D12.dpk</Source>
+					</Source>
+					<Excluded_Packages>
+						<Excluded_Packages Name="$(BDS)\bin\dclbde100.bpl">CodeGear BDE DB Components</Excluded_Packages>
+						<Excluded_Packages Name="$(BDS)\bin\bcboffice2k100.bpl">CodeGear C++Builder Office 2000 Servers Package</Excluded_Packages>
+						<Excluded_Packages Name="$(BDS)\bin\bcbofficexp100.bpl">CodeGear C++Builder Office XP Servers Package</Excluded_Packages>
+						<Excluded_Packages Name="$(BDS)\bin\dcloffice2k100.bpl">Microsoft Office 2000 Sample Automation Server Wrapper Components</Excluded_Packages>
+						<Excluded_Packages Name="$(BDS)\bin\dclofficexp100.bpl">Microsoft Office XP Sample Automation Server Wrapper Components</Excluded_Packages>
+					</Excluded_Packages>
+				</Delphi.Personality>
+			</BorlandProject>
+			<ProjectFileVersion>12</ProjectFileVersion>
+		</ProjectExtensions>
+	</Project>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D12.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D12.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D12.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D5.dof b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D5.dof
new file mode 100644
index 0000000..77d8281
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D5.dof	
@@ -0,0 +1,94 @@
+[Compiler]
+A=1
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects SDK - RODXSock Library
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D5
+PackageDLLOutputDir=..\..\Dcu\D5
+PackageDCPOutputDir=..\..\Dcu\D5
+SearchPath=..\..\Dcu\D5
+Packages=
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+[Parameters]
+RunParams=
+HostApplication=
+[Language]
+ActiveLang=
+ProjectLang=$00000409
+RootDir=
+[Version Info]
+IncludeVerInfo=1
+AutoIncBuild=0
+MajorVer=1
+MinorVer=0
+Release=0
+Build=0
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+[Version Info Keys]
+CompanyName=
+FileDescription=
+FileVersion=1.0.0.0
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+Comments=
+[HistoryLists\hlUnitAliases]
+Count=1
+Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+[HistoryLists\hlUnitOutputDirectory]
+Count=1
+Item0=s:\exe\dcu50
+[HistoryLists\hlBPLOutput]
+Count=1
+Item0=l:\Packages
+[HistoryLists\hlDCPOutput]
+Count=1
+Item0=l:\Packages
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D5.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D5.dpk
new file mode 100644
index 0000000..60ba7f5
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D5.dpk	
@@ -0,0 +1,45 @@
+package RemObjects_RODX_D5;
+
+{$R *.RES}
+{$ALIGN ON}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - RODXSock Library'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  Vcl50;
+
+contains
+  uRODXServerCore in 'uRODXServerCore.pas',
+  uRODXSessionTracker in 'uRODXSessionTracker.pas',
+  uRODXSock in 'uRODXSock.pas',
+  uRODXSockClient in 'uRODXSockClient.pas',
+  uRODXSocket in 'uRODXSocket.pas',
+  uRODXString in 'uRODXString.pas',
+  uRODXHTTPHeaderTools in 'uRODXHTTPHeaderTools.pas',
+  uRODXHTTPServerCore in 'uRODXHTTPServerCore.pas',
+  uRODXISAPI in 'uRODXISAPI.pas',
+  uRODXISAPIFilter in 'uRODXISAPIFilter.pas',
+  uRODXSecurity in 'uRODXSecurity.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D5.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D5.res
new file mode 100644
index 0000000..a2de886
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D5.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D6.dof b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D6.dof
new file mode 100644
index 0000000..f7b2069
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D6.dof	
@@ -0,0 +1,91 @@
+[FileVersion]
+Version=6.0
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects - RODXSock Library
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D6
+PackageDLLOutputDir=..\..\Dcu\D6
+PackageDCPOutputDir=..\..\Dcu\D6
+SearchPath=..\..\Dcu\D6
+Packages=Vcl50;Vclx50;VclSmp50;Vcldb50;vclado50;Vclbde50;vcldbx50;VCLIB50;Vclmid50;vclie50;Inetdb50;Inet50;dclocx50;dclaxserver50;Indy50;RemObjects_Core_D5
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+[Parameters]
+RunParams=
+HostApplication=
+Launcher=
+UseLauncher=0
+DebugCWD=
+[Version Info]
+IncludeVerInfo=1
+AutoIncBuild=0
+MajorVer=1
+MinorVer=0
+Release=0
+Build=0
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+[Version Info Keys]
+CompanyName=
+FileDescription=
+FileVersion=1.0.0.0
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+Comments=
+[Excluded Packages]
+L:\Packages\addict3db_d6.bpl=Addict 3.2 for Delphi 6 (DB Aware Components)
+L:\Packages\X255PD60.bpl=TurboPower XMLPartner Professional 2.55 Designtime package - VCL60
+l:\Packages\dclcxLibraryVCLD6.bpl=Express Cross Platform Library (VCL Edition) by Developer Express Inc.
+L:\Packages\dclcxEditorsVCLD6.bpl=ExpressEditors Library 4 (VCL Edition) by Developer Express Inc.
+L:\Packages\dclcxGridUtilsVCLD6.bpl=ExpressQuantumGrid 4 Utils (VCL Edition) by Developer Express Inc.
+L:\Packages\dclcxGridVCLD6.bpl=ExpressQuantumGrid 4 (VCL Edition) by Developer Express Inc.
+L:\Packages\dclcxSpreadSheetVCLD6.bpl=ExpressSpreadSheet (VCL Edition) by Developer Express Inc.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D6.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D6.dpk
new file mode 100644
index 0000000..eb4b9de
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D6.dpk	
@@ -0,0 +1,47 @@
+package RemObjects_RODX_D6;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - RODXSock Library'}
+{$IMPLICITBUILD OFF}
+
+requires
+  vcl,
+  rtl;
+
+{%File '..\RemObjects.inc'}
+
+contains
+  uRODXServerCore in 'uRODXServerCore.pas',
+  uRODXSessionTracker in 'uRODXSessionTracker.pas',
+  uRODXSock in 'uRODXSock.pas',
+  uRODXSockClient in 'uRODXSockClient.pas',
+  uRODXSocket in 'uRODXSocket.pas',
+  uRODXString in 'uRODXString.pas',
+  uRODXHTTPHeaderTools in 'uRODXHTTPHeaderTools.pas',
+  uRODXHTTPServerCore in 'uRODXHTTPServerCore.pas',
+  uRODXISAPI in 'uRODXISAPI.pas',
+  uRODXISAPIFilter in 'uRODXISAPIFilter.pas',
+  uRODXSecurity in 'uRODXSecurity.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D6.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D6.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D6.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D7.dof b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D7.dof
new file mode 100644
index 0000000..90385b4
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D7.dof	
@@ -0,0 +1,138 @@
+[FileVersion]
+Version=7.0
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects SDK - RODXSock Library
+[Directories]
+OutputDir=
+UnitOutputDir=..\..\Dcu\D7
+PackageDLLOutputDir=..\..\Dcu\D7
+PackageDCPOutputDir=..\..\Dcu\D7
+SearchPath=..\..\Dcu\D7
+Packages=Vcl50;Vclx50;VclSmp50;Vcldb50;vclado50;Vclbde50;vcldbx50;VCLIB50;Vclmid50;vclie50;Inetdb50;Inet50;dclocx50;dclaxserver50;Indy50;RemObjects_Core_D5
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+[Parameters]
+RunParams=
+HostApplication=
+Launcher=
+UseLauncher=0
+DebugCWD=
+[Language]
+ActiveLang=
+ProjectLang=
+RootDir=
+[Version Info]
+IncludeVerInfo=1
+AutoIncBuild=0
+MajorVer=1
+MinorVer=0
+Release=0
+Build=0
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+[Version Info Keys]
+CompanyName=
+FileDescription=
+FileVersion=1.0.0.0
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+Comments=
+[Excluded Packages]
+C:\Program Files\BoldSoft\Bold\Bin\Bold40D7ComGUI.bpl=Bold for Delphi 4.0 (COM GUI controls)
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D7.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D7.dpk
new file mode 100644
index 0000000..acfe631
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D7.dpk	
@@ -0,0 +1,47 @@
+package RemObjects_RODX_D7;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - RODXSock Library'}
+{$IMPLICITBUILD OFF}
+
+requires
+  vcl,
+  rtl;
+
+{%File '..\RemObjects.inc'}
+
+contains
+  uRODXServerCore in 'uRODXServerCore.pas',
+  uRODXSessionTracker in 'uRODXSessionTracker.pas',
+  uRODXSock in 'uRODXSock.pas',
+  uRODXSockClient in 'uRODXSockClient.pas',
+  uRODXSocket in 'uRODXSocket.pas',
+  uRODXString in 'uRODXString.pas',
+  uRODXHTTPHeaderTools in 'uRODXHTTPHeaderTools.pas',
+  uRODXHTTPServerCore in 'uRODXHTTPServerCore.pas',
+  uRODXISAPI in 'uRODXISAPI.pas',
+  uRODXISAPIFilter in 'uRODXISAPIFilter.pas',
+  uRODXSecurity in 'uRODXSecurity.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D7.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D7.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_D7.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_Lazarus_Mac.lpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_Lazarus_Mac.lpk
new file mode 100644
index 0000000..a015294
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_Lazarus_Mac.lpk	
@@ -0,0 +1,82 @@
+<?xml version="1.0"?>
+<CONFIG>
+  <Package Version="3">
+    <Name Value="RemObjects_RODX_Lazarus_Mac"/>
+    <CompilerOptions>
+      <Version Value="8"/>
+      <SearchPaths>
+        <UnitOutputDirectory Value="../units/$(TargetCPU)-$(TargetOS)"/>
+      </SearchPaths>
+      <Other>
+        <CompilerPath Value="$(CompPath)"/>
+      </Other>
+    </CompilerOptions>
+    <Files Count="12">
+      <Item1>
+        <Filename Value="uRODXHTTPHeaderTools.pas"/>
+        <UnitName Value="uRODXHTTPHeaderTools"/>
+      </Item1>
+      <Item2>
+        <Filename Value="uRODXHTTPServerCore.pas"/>
+        <UnitName Value="uRODXHTTPServerCore"/>
+      </Item2>
+      <Item3>
+        <Filename Value="uRODXISAPI.pas"/>
+        <UnitName Value="uRODXISAPI"/>
+      </Item3>
+      <Item4>
+        <Filename Value="uRODXISAPIFilter.pas"/>
+        <UnitName Value="uRODXISAPIFilter"/>
+      </Item4>
+      <Item5>
+        <Filename Value="uRODXSecurity.pas"/>
+        <UnitName Value="uRODXSecurity"/>
+      </Item5>
+      <Item6>
+        <Filename Value="uRODXServerCore.pas"/>
+        <UnitName Value="uRODXServerCore"/>
+      </Item6>
+      <Item7>
+        <Filename Value="uRODXSessionTracker.pas"/>
+        <UnitName Value="uRODXSessionTracker"/>
+      </Item7>
+      <Item8>
+        <Filename Value="uRODXSock.pas"/>
+        <UnitName Value="uRODXSock"/>
+      </Item8>
+      <Item9>
+        <Filename Value="uRODXSockClient.pas"/>
+        <UnitName Value="uRODXSockClient"/>
+      </Item9>
+      <Item10>
+        <Filename Value="uRODXSocket.pas"/>
+        <UnitName Value="uRODXSocket"/>
+      </Item10>
+      <Item11>
+        <Filename Value="uRODXString.pas"/>
+        <UnitName Value="uRODXString"/>
+      </Item11>
+      <Item12>
+        <Filename Value="uRODXSock.def"/>
+        <Type Value="Text"/>
+      </Item12>
+    </Files>
+    <Type Value="RunAndDesignTime"/>
+    <RequiredPkgs Count="2">
+      <Item1>
+        <PackageName Value="RemObjects_Core_Lazarus_Mac"/>
+      </Item1>
+      <Item2>
+        <PackageName Value="FCL"/>
+        <MinVersion Major="1" Valid="True"/>
+      </Item2>
+    </RequiredPkgs>
+    <UsageOptions>
+      <UnitPath Value="$(PkgOutDir)"/>
+    </UsageOptions>
+    <PublishOptions>
+      <Version Value="2"/>
+      <IgnoreBinaries Value="False"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_Lazarus_Unix.lpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_Lazarus_Unix.lpk
new file mode 100644
index 0000000..0726b39
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_Lazarus_Unix.lpk	
@@ -0,0 +1,87 @@
+<?xml version="1.0"?>
+<CONFIG>
+  <Package Version="3">
+    <PathDelim Value="\"/>
+    <Name Value="RemObjects_RODX_Lazarus_Unix"/>
+    <CompilerOptions>
+      <Version Value="5"/>
+      <PathDelim Value="\"/>
+      <SearchPaths>
+        <UnitOutputDirectory Value="..\units\$(TargetCPU)-$(TargetOS)"/>
+      </SearchPaths>
+      <CodeGeneration>
+        <Generate Value="Faster"/>
+      </CodeGeneration>
+      <Other>
+        <CompilerPath Value="$(CompPath)"/>
+      </Other>
+    </CompilerOptions>
+    <Files Count="12">
+      <Item1>
+        <Filename Value="uRODXHTTPHeaderTools.pas"/>
+        <UnitName Value="uRODXHTTPHeaderTools"/>
+      </Item1>
+      <Item2>
+        <Filename Value="uRODXHTTPServerCore.pas"/>
+        <UnitName Value="uRODXHTTPServerCore"/>
+      </Item2>
+      <Item3>
+        <Filename Value="uRODXISAPI.pas"/>
+        <UnitName Value="uRODXISAPI"/>
+      </Item3>
+      <Item4>
+        <Filename Value="uRODXISAPIFilter.pas"/>
+        <UnitName Value="uRODXISAPIFilter"/>
+      </Item4>
+      <Item5>
+        <Filename Value="uRODXSecurity.pas"/>
+        <UnitName Value="uRODXSecurity"/>
+      </Item5>
+      <Item6>
+        <Filename Value="uRODXServerCore.pas"/>
+        <UnitName Value="uRODXServerCore"/>
+      </Item6>
+      <Item7>
+        <Filename Value="uRODXSessionTracker.pas"/>
+        <UnitName Value="uRODXSessionTracker"/>
+      </Item7>
+      <Item8>
+        <Filename Value="uRODXSock.pas"/>
+        <UnitName Value="uRODXSock"/>
+      </Item8>
+      <Item9>
+        <Filename Value="uRODXSockClient.pas"/>
+        <UnitName Value="uRODXSockClient"/>
+      </Item9>
+      <Item10>
+        <Filename Value="uRODXSocket.pas"/>
+        <UnitName Value="uRODXSocket"/>
+      </Item10>
+      <Item11>
+        <Filename Value="uRODXString.pas"/>
+        <UnitName Value="uRODXString"/>
+      </Item11>
+      <Item12>
+        <Filename Value="uRODXSock.def"/>
+        <Type Value="Text"/>
+      </Item12>
+    </Files>
+    <Type Value="RunAndDesignTime"/>
+    <RequiredPkgs Count="2">
+      <Item1>
+        <PackageName Value="RemObjects_Core_Lazarus_Unix"/>
+      </Item1>
+      <Item2>
+        <PackageName Value="FCL"/>
+        <MinVersion Major="1" Valid="True"/>
+      </Item2>
+    </RequiredPkgs>
+    <UsageOptions>
+      <UnitPath Value="$(PkgOutDir)"/>
+    </UsageOptions>
+    <PublishOptions>
+      <Version Value="2"/>
+      <IgnoreBinaries Value="False"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_Lazarus_Windows.lpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_Lazarus_Windows.lpk
new file mode 100644
index 0000000..0ca79c6
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/RemObjects_RODX_Lazarus_Windows.lpk	
@@ -0,0 +1,87 @@
+<?xml version="1.0"?>
+<CONFIG>
+  <Package Version="3">
+    <PathDelim Value="\"/>
+    <Name Value="RemObjects_RODX_Lazarus_Windows"/>
+    <CompilerOptions>
+      <Version Value="5"/>
+      <PathDelim Value="\"/>
+      <SearchPaths>
+        <UnitOutputDirectory Value="..\..\Dcu\Lazarus\$(TargetCPU)-$(TargetOS)"/>
+      </SearchPaths>
+      <CodeGeneration>
+        <Generate Value="Faster"/>
+      </CodeGeneration>
+      <Other>
+        <CompilerPath Value="$(CompPath)"/>
+      </Other>
+    </CompilerOptions>
+    <Files Count="12">
+      <Item1>
+        <Filename Value="uRODXHTTPHeaderTools.pas"/>
+        <UnitName Value="uRODXHTTPHeaderTools"/>
+      </Item1>
+      <Item2>
+        <Filename Value="uRODXHTTPServerCore.pas"/>
+        <UnitName Value="uRODXHTTPServerCore"/>
+      </Item2>
+      <Item3>
+        <Filename Value="uRODXISAPI.pas"/>
+        <UnitName Value="uRODXISAPI"/>
+      </Item3>
+      <Item4>
+        <Filename Value="uRODXISAPIFilter.pas"/>
+        <UnitName Value="uRODXISAPIFilter"/>
+      </Item4>
+      <Item5>
+        <Filename Value="uRODXSecurity.pas"/>
+        <UnitName Value="uRODXSecurity"/>
+      </Item5>
+      <Item6>
+        <Filename Value="uRODXServerCore.pas"/>
+        <UnitName Value="uRODXServerCore"/>
+      </Item6>
+      <Item7>
+        <Filename Value="uRODXSessionTracker.pas"/>
+        <UnitName Value="uRODXSessionTracker"/>
+      </Item7>
+      <Item8>
+        <Filename Value="uRODXSock.pas"/>
+        <UnitName Value="uRODXSock"/>
+      </Item8>
+      <Item9>
+        <Filename Value="uRODXSockClient.pas"/>
+        <UnitName Value="uRODXSockClient"/>
+      </Item9>
+      <Item10>
+        <Filename Value="uRODXSocket.pas"/>
+        <UnitName Value="uRODXSocket"/>
+      </Item10>
+      <Item11>
+        <Filename Value="uRODXString.pas"/>
+        <UnitName Value="uRODXString"/>
+      </Item11>
+      <Item12>
+        <Filename Value="uRODXSock.def"/>
+        <Type Value="Text"/>
+      </Item12>
+    </Files>
+    <Type Value="RunAndDesignTime"/>
+    <RequiredPkgs Count="2">
+      <Item1>
+        <PackageName Value="RemObjects_Core_Lazarus_Windows"/>
+      </Item1>
+      <Item2>
+        <PackageName Value="FCL"/>
+        <MinVersion Major="1" Valid="True"/>
+      </Item2>
+    </RequiredPkgs>
+    <UsageOptions>
+      <UnitPath Value="$(PkgOutDir)"/>
+    </UsageOptions>
+    <PublishOptions>
+      <Version Value="2"/>
+      <IgnoreBinaries Value="False"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/Resource_English.inc b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/Resource_English.inc
new file mode 100644
index 0000000..3c5a17d
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/Resource_English.inc	
@@ -0,0 +1,53 @@
+ResourceString
+
+      _WSAEINTR           = 'Interrupted system call';                         // 10004 L:4
+      _WSAEBADF           = 'Bad file number';                                 // 10009 L:9
+      _WSAEACCES          = 'Permission denied';                               // 10013 L:13
+      _WSAEFAULT          = 'Bad address';                                     // 10014 L:14
+      _WSAEINVAL          = 'Invalid argument';                                // 10022 L:22
+      _WSAEMFILE          = 'Too many open files';                             // 10024 L:24
+      _WSAEWOULDBLOCK     = 'Operation would block';                           // 10035 L:11 (?L:35?)
+      _WSAEINPROGRESS     = 'Operation now in progress';                       // 10036 L:115
+      _WSAEALREADY        = 'Operation already in progress';                   // 10037 L:114
+      _WSAENOTSOCK        = 'Socket operation on non-socket';                  // 10038 L:88
+      _WSAEDESTADDRREQ    = 'Destination address required';                    // 10039 L:89
+      _WSAEMSGSIZE        = 'Message too long';                                // 10040 L:90
+      _WSAEPROTOTYPE      = 'Protocol wrong type for socket';                  // 10041 L:91
+      _WSAENOPROTOOPT     = 'Protocol not available';                          // 10042 L:92
+      _WSAEPROTONOSUPPORT = 'Protocol not supported';                          // 10043 L:93
+      _WSAESOCKTNOSUPPORT = 'Socket type not supported';                       // 10044 L:94
+      _WSAEOPNOTSUPP      = 'Operation not supported on socket';               // 10045 L:95
+      _WSAEPFNOSUPPORT    = 'Protocol family not supported';                   // 10046 L:96
+      _WSAEAFNOSUPPORT    = 'Address family not supported by protocol family'; // 10047 L:97
+      _WSAEADDRINUSE      = 'Address already in use';                          // 10048 L:98
+      _WSAEADDRNOTAVAIL   = 'Can''t assign requested address';                 // 10049 L:99
+      _WSAENETDOWN        = 'Network is down';                                 // 10050 L:100
+      _WSAENETUNREACH     = 'Network is unreachable';                          // 10051 L:101
+      _WSAENETRESET       = 'Network dropped connection on reset';             // 10052 L:102
+      _WSAECONNABORTED    = 'Software caused connection abort';                // 10053 L:103
+      _WSAECONNRESET      = 'Connection reset by peer';                        // 10054 L:104
+      _WSAENOBUFS         = 'No buffer space available';                       // 10055 L:105
+      _WSAEISCONN         = 'Socket is already connected';                     // 10056 L:106
+      _WSAENOTCONN        = 'Socket is not connected';                         // 10057 L:107
+      _WSAESHUTDOWN       = 'Can''t send after socket shutdown';               // 10058 L:108
+      _WSAETOOMANYREFS    = 'Too many references can''t splice';               // 10059 L:109
+      _WSAETIMEDOUT       = 'Connection timed out';                            // 10060 L:110
+      _WSAECONNREFUSED    = 'Connection refused';                              // 10061 L:111
+      _WSAELOOP           = 'Too many levels of symbolic links';               // 10062 L:40
+      _WSAENAMETOOLONG    = 'File name too long';                              // 10063 L:36
+      _WSAEHOSTDOWN       = 'Host is down';                                    // 10064 L:112
+      _WSAEHOSTUNREACH    = 'No route to host';                                // 10065 L:113
+      _WSAENOTEMPTY       = 'Directory not empty';                             // 10066 L:39
+      _WSAEPROCLIM        = 'Too many processes';                              // 10067
+      _WSAEUSERS          = 'Too many users';                                  // 10068 L:87
+      _WSAEDQUOT          = 'Disk quota exceeded';                             // 10069 L:122
+      _WSAESTALE          = 'Stale NFS file handle';                           // 10070 L:116
+      _WSAEREMOTE         = 'Too many levels of remote in path';               // 10071 L:66
+      _WSASYSNOTREADY     = 'Network sub-system is unusable';                  // 10091
+      _WSAVERNOTSUPPORTED = 'WSOCK32.DLL DLL cannot support this application'; // 10092
+      _WSANOTINITIALISED  = 'WSOCK32.DLL not initialized';                     // 10093
+      _WSAHOST_NOT_FOUND  = 'Host not found';                                  // 11001 L:1
+      _WSATRY_AGAIN       = 'Non-authoritative host not found';                // 11002 L:2
+      _WSANO_RECOVERY     = 'Non-recoverable error';                           // 11003 L:3
+      _WSANO_DATA         = 'No Data';                                         // 11004 L:4
+      _WSAUNKNOWN         = 'Unknown Socket Error';
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/Resource_French.inc b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/Resource_French.inc
new file mode 100644
index 0000000..0e564d0
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/Resource_French.inc	
@@ -0,0 +1,53 @@
+ResourceString
+
+      _WSAEINTR            = 'Procédure de systeme interrompue'; // 10004
+      _WSAEBADF            = 'Mauvais numero de fichier'; // 10009
+      _WSAEACCES           = 'Permission refusée'; // 10013
+      _WSAEFAULT           = 'Mauvais adresse'; // 10014
+      _WSAEINVAL           = 'Argument invalide'; // 10022
+      _WSAEMFILE           = 'Trop de fichier ouverts'; // 10024
+      _WSAEWOULDBLOCK      = 'Opération terminerá en blocage'; // 10035
+      _WSAEINPROGRESS      = 'Opération est en progrès'; // 10036
+      _WSAEALREADY         = 'Opération est déjà en progrès'; // 10037
+      _WSAENOTSOCK         = 'Opération en non-socket'; // 10038
+      _WSAEDESTADDRREQ     = 'Destination adresse necessaire'; // 10039
+      _WSAEMSGSIZE         = 'Message trop long'; // 10040
+      _WSAEPROTOTYPE       = 'Protocole type incorrect pour ce socket'; // 10041
+      _WSAENOPROTOOPT      = 'Protocole est pas disponible'; // 10042
+      _WSAEPROTONOSUPPORT  = 'Protocole pas supportée'; // 10043
+      _WSAESOCKTNOSUPPORT  = 'Socket type pas supporté'; // 10044
+      _WSAEOPNOTSUPP       = 'Opération pas supportée on socket'; // 10045
+      _WSAEPFNOSUPPORT     = 'Famille de protocole pas supportée'; // 10046
+      _WSAEAFNOSUPPORT     = 'Famille de adresse pas supportée par la famille de protocole'; // 10047
+      _WSAEADDRINUSE       = 'Adresse déjà en use'; // 10048
+      _WSAEADDRNOTAVAIL    = 'Impossible de assigner l''address en question'; // 10049
+      _WSAENETDOWN         = 'Réseau est inactif'; // 10050
+      _WSAENETUNREACH      = 'Réseau est innaccessible'; // 10051
+      _WSAENETRESET        = 'Connexion de réseau est tombée'; // 10052
+      _WSAECONNABORTED     = 'Programme a provoqué la connexion de s''arrêter'; // 10053
+      _WSAECONNRESET       = 'Connexion recommencée'; // 10054
+      _WSAENOBUFS          = 'Pas de espace dans le buffer'; // 10055
+      _WSAEISCONN          = 'Socket déjà connecté'; // 10056
+      _WSAENOTCONN         = 'Socket est pas connecté'; // 10057
+      _WSAESHUTDOWN        = 'Impossible d''envoyer quand le socket est inactif'; // 10058
+      _WSAETOOMANYREFS     = 'Trop de references'; // 10059
+      _WSAETIMEDOUT        = 'Connexion timed-out'; // 10060
+      _WSAECONNREFUSED     = 'Connexion refusée'; // 10061
+      _WSAELOOP            = 'Trop de niveau de symbolique links'; // 10062
+      _WSAENAMETOOLONG     = 'Nom du fichier trop long'; // 10063
+      _WSAEHOSTDOWN        = 'Host est inactif'; // 10064
+      _WSAEHOSTUNREACH     = 'Host untrouvable'; // 10065
+      _WSAENOTEMPTY        = 'Directory pas vide'; // 10066
+      _WSAEPROCLIM         = 'Trop de process'; // 10067
+      _WSAEUSERS           = 'Trop de utulisateurs'; // 10068
+      _WSAEDQUOT           = 'Disk quota dexcadée'; // 10069
+      _WSAESTALE           = 'NFS handle du fichier timeout'; // 10070
+      _WSAEREMOTE          = 'Trop niveau de remote dans le path'; // 10071
+      _WSASYSNOTREADY      = 'Reseau sub-system est inutilisable'; // 10091
+      _WSAVERNOTSUPPORTED  = 'WSOCK32.DLL DLL ne supporte pas cette application'; // 10092
+      _WSANOTINITIALISED   = 'WSOCK32.DLL pas initialisé'; // 10093
+      _WSAHOST_NOT_FOUND   = 'Host pas trouvé'; // 11001
+      _WSATRY_AGAIN        = 'Non-authoritative host pas trouvé'; // 11002
+      _WSANO_RECOVERY      = 'Unrecoverable error'; // 11003
+      _WSANO_DATA          = 'Pas de data'; // 11004
+      _WSAUNKNOWN          = 'Inconnu Socket Error';
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/Resource_German.inc b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/Resource_German.inc
new file mode 100644
index 0000000..765cf34
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/Resource_German.inc	
@@ -0,0 +1,53 @@
+ResourceString
+
+      _WSAEINTR            = 'Unterbrochener Systemaufruf'; // 10004
+      _WSAEBADF            = 'Ungültige Dateinummer'; // 10009
+      _WSAEACCES           = 'Zugriff verweigert'; // 10013
+      _WSAEFAULT           = 'Ungültige Adresse'; // 10014
+      _WSAEINVAL           = 'Ungültiger oder falscher Parameter'; // 10022
+      _WSAEMFILE           = 'Zu viele offene Dateien'; // 10024
+      _WSAEWOULDBLOCK      = 'Aktion würde System blockieren'; // 10035
+      _WSAEINPROGRESS      = 'Aktion wird ausgeführt'; // 10036
+      _WSAEALREADY         = 'Aktion wird bereits ausgeführt'; // 10037
+      _WSAENOTSOCK         = 'Socket Aktion auf ungültigem Socket'; // 10038
+      _WSAEDESTADDRREQ     = 'Zieladresse erforderlich'; // 10039
+      _WSAEMSGSIZE         = 'Nachricht ist zu lang'; // 10040
+      _WSAEPROTOTYPE       = 'Falsches Protokoll für Socket'; // 10041
+      _WSAENOPROTOOPT      = 'Protokoll ist nicht verfügbar'; // 10042
+      _WSAEPROTONOSUPPORT  = 'Protokoll wird nicht unterstützt'; // 10043
+      _WSAESOCKTNOSUPPORT  = 'Socket Typ wird nicht unterstützt'; // 10044
+      _WSAEOPNOTSUPP       = 'Aktion wird nicht von Socket unterstützt'; // 10045
+      _WSAEPFNOSUPPORT     = 'Protokollfamilie wird nicht unterstützt'; // 10046
+      _WSAEAFNOSUPPORT     = 'Addressfamilie wird durch Protokollfamilie nicht unterstützt'; // 10047
+      _WSAEADDRINUSE       = 'Addresse wird bereits benutzt'; // 10048
+      _WSAEADDRNOTAVAIL    = 'Kann angeforderte Adresse nicht zuweisen'; // 10049
+      _WSAENETDOWN         = 'Kein Netzwerk'; // 10050
+      _WSAENETUNREACH      = 'Netzwerk ist nicht erreichbar'; // 10051
+      _WSAENETRESET        = 'Netzwerk hat Verbindung durch Reset abgebrochen'; // 10052
+      _WSAECONNABORTED     = 'Software hat Verbindungsabbruch ausgelöst'; // 10053
+      _WSAECONNRESET       = 'Verbindungsreset durch Peer'; // 10054
+      _WSAENOBUFS          = 'Kein Bufferplatz verfügbar'; // 10055
+      _WSAEISCONN          = 'Socket ist bereits verbunden'; // 10056
+      _WSAENOTCONN         = 'Socket ist nicht verbunden'; // 10057
+      _WSAESHUTDOWN        = 'Kann nach Socket-Trennung nicht verbinden'; // 10058
+      _WSAETOOMANYREFS     = 'Zu viele Referenzen   Kann nicht splitten'; // 10059
+      _WSAETIMEDOUT        = 'Verbindung   Time out !'; // 10060
+      _WSAECONNREFUSED     = 'Verbindung abgelehnt'; // 10061
+      _WSAELOOP            = 'Zu viele Ebenen symbolischer Verknüpfungen'; // 10062
+      _WSAENAMETOOLONG     = 'Dateiname zu lang'; // 10063
+      _WSAEHOSTDOWN        = 'Host ist nicht verfügbar'; // 10064
+      _WSAEHOSTUNREACH     = 'Keine Verbindung zum Host'; // 10065
+      _WSAENOTEMPTY        = 'Verzeichnis ist nicht leer'; // 10066
+      _WSAEPROCLIM         = 'Zu viele Prozesse'; // 10067
+      _WSAEUSERS           = 'Zu viele Benutzer'; // 10068
+      _WSAEDQUOT           = 'Festplattenspeicherplatz erreicht'; // 10069
+      _WSAESTALE           = 'Alte NFS Dateiverknüpfung'; // 10070
+      _WSAEREMOTE          = 'Zu viele Ebenen im Remote Pfad'; // 10071
+      _WSASYSNOTREADY      = 'Netzwerk Subsystem ist nicht zu gebrauchen'; // 10091
+      _WSAVERNOTSUPPORTED  = 'WSOCK32.DLL DLL kann diese Anwendung nicht unterstützen'; // 10092
+      _WSANOTINITIALISED   = 'WSOCK32.DLL nicht initialisiert'; // 10093
+      _WSAHOST_NOT_FOUND   = 'Host nicht gefunden'; // 11001
+      _WSATRY_AGAIN        = 'Unzuverlässigen Host nicht gefunden'; // 11002
+      _WSANO_RECOVERY      = 'Fehler - Kein Wiederherstellung möglich'; // 11003
+      _WSANO_DATA          = 'Keine Daten'; // 11004
+      _WSAUNKNOWN          = 'Unbekannter Socket Fehler';
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/Resource_Italian.inc b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/Resource_Italian.inc
new file mode 100644
index 0000000..c1529b8
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/Resource_Italian.inc	
@@ -0,0 +1,54 @@
+ResourceString
+
+      _WSAEINTR            = 'Chiamata di sistema interrotta';
+      _WSAEBADF            = 'Numero di file errato';
+      _WSAEACCES           = 'Accesso negato';
+      _WSAEFAULT           = 'Indirizzo errato';
+      _WSAEINVAL           = 'Argomento non valido';
+      _WSAEMFILE           = 'Troppi file aperti';
+      _WSAEWOULDBLOCK      = 'Operazione bloccante';
+      _WSAEINPROGRESS      = 'Operazione in corso';
+      _WSAEALREADY         = 'Operation già in corso';
+      _WSAENOTSOCK         = 'Operazione socket eseguita non su socket';
+      _WSAEDESTADDRREQ     = 'Indirizzo di destinazione necessario';
+      _WSAEMSGSIZE         = 'Messaggio troppo lungo';
+      _WSAEPROTOTYPE       = 'Tipo di protocollo errato per questa socket';
+      _WSAENOPROTOOPT      = 'Protocollo non disponibile';
+      _WSAEPROTONOSUPPORT  = 'Protocollo non supportato';
+      _WSAESOCKTNOSUPPORT  = 'Tipo di socket non supportato';
+      _WSAEOPNOTSUPP       = 'Operazione non supportata dalla socket';
+      _WSAEPFNOSUPPORT     = 'Famiglia di protocolli non supportata';
+      _WSAEAFNOSUPPORT     = 'Famiglia di indirizzi non supportata dalla famiglia di protocolli';
+      _WSAEADDRINUSE       = 'Indirizzo già in uso';
+      _WSAEADDRNOTAVAIL    = 'Impossibile assegnare l''indirizzo richiesto';
+      _WSAENETDOWN         = 'La rete non funziona';
+      _WSAENETUNREACH      = 'La rete è irraggiungibile';
+      _WSAENETRESET        = 'La rete ha interrotto la connessione';
+      _WSAECONNABORTED     = 'Il software ha causato l''interruzione della connessione';
+      _WSAECONNRESET       = 'Connessione interrotta';
+      _WSAENOBUFS          = 'Non c''è spazio buffer disponibile';
+      _WSAEISCONN          = 'La socket è già connessa';
+      _WSAENOTCONN         = 'La socket non è connessa';
+      _WSAESHUTDOWN        = 'Impossibile inviare pacchetti su una socket chiusa';
+      _WSAETOOMANYREFS     = 'Troppi riferimenti';
+      _WSAETIMEDOUT        = 'Timeout della connessione';
+      _WSAECONNREFUSED     = 'Connessione rifiutata';
+      _WSAELOOP            = 'Troppi livelli di link simbolici';
+      _WSAENAMETOOLONG     = 'Il nome del file è troppo lungo';
+      _WSAEHOSTDOWN        = 'L''host è fermo';
+      _WSAEHOSTUNREACH     = 'L''host è irraggiungibile';
+      _WSAENOTEMPTY        = 'La directory non è vuota';
+      _WSAEPROCLIM         = 'Troppi processi in esecuzione';
+      _WSAEUSERS           = 'Troppi utenti collegati';
+      _WSAEDQUOT           = 'La quota disco è stata superata';
+      _WSAESTALE           = 'NFS file handle scaduto';
+      _WSAEREMOTE          = 'Troppi livelli remoti nel path';
+      _WSASYSNOTREADY      = 'Il sottosistema di rete è inutilizzabile';
+      _WSAVERNOTSUPPORTED  = 'WSOCK32.DLL non supporta questa applicazione';
+      _WSANOTINITIALISED   = 'WSOCK32.DLL non inizializzata';
+      _WSAHOST_NOT_FOUND   = 'Host non trovato';
+      _WSATRY_AGAIN        = 'Host non-autoritativo non trovato';
+      _WSANO_RECOVERY      = 'Errore irreversibile';
+      _WSANO_DATA          = 'Dati mancanti';
+      _WSAUNKNOWN          = 'Unknown Socket Error';
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/Resource_LowMem.inc b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/Resource_LowMem.inc
new file mode 100644
index 0000000..53247f8
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/Resource_LowMem.inc	
@@ -0,0 +1,53 @@
+ResourceString
+
+      _WSAEINTR            = '10004';
+      _WSAEBADF            = '10009';
+      _WSAEACCES           = '10013';
+      _WSAEFAULT           = '10014';
+      _WSAEINVAL           = '10022';
+      _WSAEMFILE           = '10024';
+      _WSAEWOULDBLOCK      = '10035';
+      _WSAEINPROGRESS      = '10036';
+      _WSAEALREADY         = '10037';
+      _WSAENOTSOCK         = '10038';
+      _WSAEDESTADDRREQ     = '10039';
+      _WSAEMSGSIZE         = '10040';
+      _WSAEPROTOTYPE       = '10041';
+      _WSAENOPROTOOPT      = '10042';
+      _WSAEPROTONOSUPPORT  = '10043';
+      _WSAESOCKTNOSUPPORT  = '10044';
+      _WSAEOPNOTSUPP       = '10045';
+      _WSAEPFNOSUPPORT     = '10046';
+      _WSAEAFNOSUPPORT     = '10047';
+      _WSAEADDRINUSE       = '10048';
+      _WSAEADDRNOTAVAIL    = '10049';
+      _WSAENETDOWN         = '10050';
+      _WSAENETUNREACH      = '10051';
+      _WSAENETRESET        = '10052';
+      _WSAECONNABORTED     = '10053';
+      _WSAECONNRESET       = '10054';
+      _WSAENOBUFS          = '10055';
+      _WSAEISCONN          = '10056';
+      _WSAENOTCONN         = '10057';
+      _WSAESHUTDOWN        = '10058';
+      _WSAETOOMANYREFS     = '10059';
+      _WSAETIMEDOUT        = '10060';
+      _WSAECONNREFUSED     = '10061';
+      _WSAELOOP            = '10062';
+      _WSAENAMETOOLONG     = '10063';
+      _WSAEHOSTDOWN        = '10064';
+      _WSAEHOSTUNREACH     = '10065';
+      _WSAENOTEMPTY        = '10066';
+      _WSAEPROCLIM         = '10067';
+      _WSAEUSERS           = '10068';
+      _WSAEDQUOT           = '10069';
+      _WSAESTALE           = '10070';
+      _WSAEREMOTE          = '10071';
+      _WSASYSNOTREADY      = '10091';
+      _WSAVERNOTSUPPORTED  = '10092';
+      _WSANOTINITIALISED   = '10093';
+      _WSAHOST_NOT_FOUND   = '11001';
+      _WSATRY_AGAIN        = '11002';
+      _WSANO_RECOVERY      = '11003';
+      _WSANO_DATA          = '11004';
+      _WSAUNKNOWN          = '';
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/Resource_Portuguese.inc b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/Resource_Portuguese.inc
new file mode 100644
index 0000000..5b34750
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/Resource_Portuguese.inc	
@@ -0,0 +1,53 @@
+ResourceString
+
+      _WSAEINTR            = 'Chamada de sistema interrompida'; // 10004
+      _WSAEBADF            = 'Numero de arquivo invalido'; // 10009
+      _WSAEACCES           = 'Permissao negada'; // 10013
+      _WSAEFAULT           = 'Endereco invalido'; // 10014
+      _WSAEINVAL           = 'Argumento invalido'; // 10022
+      _WSAEMFILE           = 'Muitos arquivos abertos'; // 10024
+      _WSAEWOULDBLOCK      = 'Operacao sera bloqueada'; // 10035
+      _WSAEINPROGRESS      = 'Operacao em andamento'; // 10036
+      _WSAEALREADY         = 'Operacao ja esta em andamento'; // 10037
+      _WSAENOTSOCK         = 'Operacao de Socket em Nao-Socket'; // 10038
+      _WSAEDESTADDRREQ     = 'Endereco de destino obrigatorio'; // 10039
+      _WSAEMSGSIZE         = 'Menssagem muito longa'; // 10040
+      _WSAEPROTOTYPE       = 'Tipo errado de protocolo para este socket'; // 10041
+      _WSAENOPROTOOPT      = 'Protocolo nao disponivel'; // 10042
+      _WSAEPROTONOSUPPORT  = 'Protocolo nao suportado'; // 10043
+      _WSAESOCKTNOSUPPORT  = 'Tipo de Socket nao suportado'; // 10044
+      _WSAEOPNOTSUPP       = 'Operacao nao suportada pelo socket'; // 10045
+      _WSAEPFNOSUPPORT     = 'Familia de protocolo nao suportada'; // 10046
+      _WSAEAFNOSUPPORT     = 'Endereco de familia nao suportado pela familia do protocolo'; // 10047
+      _WSAEADDRINUSE       = 'Endereco em uso'; // 10048
+      _WSAEADDRNOTAVAIL    = 'Nao e possivel atribuir o endereco solicitado'; // 10049
+      _WSAENETDOWN         = 'A rede esta fora do ar'; // 10050
+      _WSAENETUNREACH      = 'A rede nao pode ser encontrada'; // 10051
+      _WSAENETRESET        = 'A rede desligou a conexao ao reinicializar'; // 10052
+      _WSAECONNABORTED     = 'O software causou uma desconexao'; // 10053
+      _WSAECONNRESET       = 'Conexao reinicializada por outro computador'; // 10054
+      _WSAENOBUFS          = 'Nao ha espaco no buffer'; // 10055
+      _WSAEISCONN          = 'Socket ja esta conectado'; // 10056
+      _WSAENOTCONN         = 'Socket nao esta conectado'; // 10057
+      _WSAESHUTDOWN        = 'Nao e possivel enviar apos desligamento do socket'; // 10058
+      _WSAETOOMANYREFS     = 'Muitas referencias  nao e possivel fazer mais ligacoes'; // 10059
+      _WSAETIMEDOUT        = 'Tempo maximo da conexao excedido'; // 10060
+      _WSAECONNREFUSED     = 'Conexao recusada'; // 10061
+      _WSAELOOP            = 'Muitos niveis de links simbolicos'; // 10062
+      _WSAENAMETOOLONG     = 'Nome de arquivo muito longo'; // 10063
+      _WSAEHOSTDOWN        = 'Servidor esta fora do ar'; // 10064
+      _WSAEHOSTUNREACH     = 'Nao ha rota para o servidor'; // 10065
+      _WSAENOTEMPTY        = 'Diretorio nao esta vazio'; // 10066
+      _WSAEPROCLIM         = 'Muitos processos'; // 10067
+      _WSAEUSERS           = 'Muitos usuarios'; // 10068
+      _WSAEDQUOT           = 'Quota de disco excedida'; // 10069
+      _WSAESTALE           = 'Handle do arquivo NFS antigo'; // 10070
+      _WSAEREMOTE          = 'Muitos niveis de caminhos remotos'; // 10071
+      _WSASYSNOTREADY      = 'Nao e possivel usar o sub-sistema da rede'; // 10091
+      _WSAVERNOTSUPPORTED  = 'WSOCK32.DLL DLL nao suporta esta operacao'; // 10092
+      _WSANOTINITIALISED   = 'WSOCK32.DLL nao inicializada'; // 10093
+      _WSAHOST_NOT_FOUND   = 'Servidor nao encontrado'; // 11001
+      _WSATRY_AGAIN        = 'Servidor secundario nao encontrado'; // 11002
+      _WSANO_RECOVERY      = 'Erro nao-recuperavel'; // 11003
+      _WSANO_DATA          = 'Nao ha dados'; // 11004
+      _WSAUNKNOWN          = 'Erro de socket desconhecido';
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/Resource_Russian.inc b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/Resource_Russian.inc
new file mode 100644
index 0000000..91a932a
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/Resource_Russian.inc	
@@ -0,0 +1,53 @@
+ResourceString
+
+      _WSAEINTR            = 'Ïðåðâàííûé ñèñòåìíûé âûçîâ';
+      _WSAEBADF            = 'Ïëîõîé íîìåð ôàéëà';
+      _WSAEACCES           = 'Äîñòóï çàïðåùåí';
+      _WSAEFAULT           = 'Ïëîõîé àäðåñ';
+      _WSAEINVAL           = 'Íåäîïóñòèìûé ïàðàìåòð';
+      _WSAEMFILE           = 'Ñëèøêîì ìíîãî îòêðûòûõ ôàéëîâ';
+      _WSAEWOULDBLOCK      = 'Îïåðàöèÿ âîçìîæíî çàáëîêèðîâàíà';
+      _WSAEINPROGRESS      = 'Îïåðàöèÿ ñåé÷àñ âûïîëíÿåòñÿ';
+      _WSAEALREADY         = 'Îïåðàöèÿ óæå âûïîëíÿåòñÿ';
+      _WSAENOTSOCK         = 'Íåäîïóñòèìàÿ îïåðàöèÿ. Èñïîëüçóåòñÿ íå ñîêåò';
+      _WSAEDESTADDRREQ     = 'Òðåáóåòñÿ àäðåñ íàçíà÷åíèÿ';
+      _WSAEMSGSIZE         = 'Ñîîáùåíèå ñëèøêîì äëèííîå';
+      _WSAEPROTOTYPE       = 'Íåïðàâèëüíûé òèï ïðîòîêîëà äëÿ ñîêåòà';
+      _WSAENOPROTOOPT      = 'Ïðîòîêîë íå äîñòóïåí';
+      _WSAEPROTONOSUPPORT  = 'Ïðîòîêîë íå ïîääåðæèâàåòñÿ';
+      _WSAESOCKTNOSUPPORT  = 'Òèï ñîêåòà íå ïîääåðæèâàåòñÿ';
+      _WSAEOPNOTSUPP       = 'Îïåðàöèÿ íå ïîääåðæèâàåòñÿ äëÿ ñîêåòà';
+      _WSAEPFNOSUPPORT     = 'Ñåìåéñòâî ïðîòîêîëîâ íå ïîääåðæèâàåòñÿ';
+      _WSAEAFNOSUPPORT     = 'Ãðóïïà àäðåñîâ íå ïîääåðæèâàåòñÿ ñåìåéñòâîì ïðîòîêîëîâ';
+      _WSAEADDRINUSE       = 'Àäðåñ óæå èñïîëüçóåòñÿ';
+      _WSAEADDRNOTAVAIL    = 'Íåâîçìîæíî íàçíà÷èòü òðåáóåìûé àäðåñ';
+      _WSAENETDOWN         = 'Ñåòü îñòàíîâëåíà';
+      _WSAENETUNREACH      = 'Ñåòü íåäîñòóïíà';
+      _WSAENETRESET        = 'Ñåòü îáîðâàëà ñîåäèíåíèå ïðè ïîâòîðíîé èíèöèàëèçàöèè';
+      _WSAECONNABORTED     = 'Ïðîãðàììíîå îáåñïå÷åíèå âûçâàëî àâàðèéíîå ïðåêðàùåíèå ñîåäèíåíèÿ';
+      _WSAECONNRESET       = 'Ñîåäèíåíèå îáîðâàíî äðóãèì óçëîì ñåòè';
+      _WSAENOBUFS          = 'Áóôåð ïåðåïîëíåí';
+      _WSAEISCONN          = 'Ñîêåò óæå ïîäêëþ÷åí';
+      _WSAENOTCONN         = 'Ñîêåò íå ïîäêëþ÷åí';
+      _WSAESHUTDOWN        = 'Íåâîçìîæíî îòïðàâèòü ïîñëå çàâåðøåíèÿ ñîåäèíåíèÿ';
+      _WSAETOOMANYREFS     = 'Ñëèøêîì ìíîãî ññûëîê  íåâîçìîæíî îáúåäèíèòü';
+      _WSAETIMEDOUT        = 'Ïðåâûøåíî âðåìÿ îæèäàíèÿ îòâåòà';
+      _WSAECONNREFUSED     = 'Ñîåäèíåíèå îòâåðãíóòî';
+      _WSAELOOP            = 'Ñëèøêîì ìíîãî óðîâíåé ñèìâîëüíûõ ññûëîê';
+      _WSAENAMETOOLONG     = 'Ñëèøêîì äëèííîå èìÿ ôàéëà';
+      _WSAEHOSTDOWN        = 'Õîñò âûêëþ÷åí';
+      _WSAEHOSTUNREACH     = 'Íåò ìàðøðóòà ê õîñòó';
+      _WSAENOTEMPTY        = 'Äèðåêòîðèÿ íå ïóñòà';
+      _WSAEPROCLIM         = 'Ñëèøêîì ìíîãî ïðîöåññîâ';
+      _WSAEUSERS           = 'Ñëèøêîì ìíîãî ïîëüçîâàòåëåé';
+      _WSAEDQUOT           = 'Ïðåâûøåíî âûäåëåííîå äèñêîâîå ïðîñòðàíñòâî';
+      _WSAESTALE           = 'Óñòàðåë ôàéëîâûé äåñêðèïòîð NFS';
+      _WSAEREMOTE          = 'Ñëèøêîì áîëüøàÿ âëîæåííîñòü êàòàëîãîâ â óäàëåííîì ïóòè';
+      _WSASYSNOTREADY      = 'Ñåòåâàÿ ïîäñèñòåìà íå èñïîëüçóåòñÿ';
+      _WSAVERNOTSUPPORTED  = 'WSOCK32.DLL áèáëèîòåêà íå ïîääåðæèâàåòñÿ ýòèì ïðèëîæåíèåì';
+      _WSANOTINITIALISED   = 'WSOCK32.DLL íå èíèöèàëèçèðîâàíà';
+      _WSAHOST_NOT_FOUND   = 'Õîñò íå íàéäåí';
+      _WSATRY_AGAIN        = 'Íåîôèöèàëüíûé õîñò íå íàéäåí';
+      _WSANO_RECOVERY      = 'Íåïîïðàâèìàÿ îøèáêà';
+      _WSANO_DATA          = 'Íåò äàííûõ';
+      _WSAUNKNOWN          = 'Íåèçâåñòíàÿ îøèáêà ñîêåòà';
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/Resource_Spanish.inc b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/Resource_Spanish.inc
new file mode 100644
index 0000000..cc3db98
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/Resource_Spanish.inc	
@@ -0,0 +1,55 @@
+ResourceString
+
+       _WSAEINTR            = 'Procedura de sistema interrumpida'; // 10004
+       _WSAEBADF            = 'Número de archivo incorrecto'; // 10009
+       _WSAEACCES           = 'Permiso negado'; // 10013
+       _WSAEFAULT           = 'Dirección incorrecta'; // 10014
+       _WSAEINVAL           = 'Argumento inválido'; // 10022
+       _WSAEMFILE           = 'Demasiados archivos abiertos'; // 10024
+       _WSAEWOULDBLOCK      = 'Operación se bloquearía'; // 10035
+       _WSAEINPROGRESS      = 'Operación ahora en marcha'; // 10036
+       _WSAEALREADY         = 'Operación ya en marcha'; // 10037
+       _WSAENOTSOCK         = 'Operación de socket en un non-socket'; // 10038
+       _WSAEDESTADDRREQ     = 'Dirección del destinatario requerido'; // 10039
+       _WSAEMSGSIZE         = 'Mensaje demasiado largo'; // 10040
+       _WSAEPROTOTYPE       = 'Tipo de protocolo incorrecto para el socket'; // 10041
+       _WSAENOPROTOOPT      = 'Protocolo no disponible'; // 10042
+       _WSAEPROTONOSUPPORT  = 'Protocolo no soportado'; // 10043
+       _WSAESOCKTNOSUPPORT  = 'Tipo de socket no soportado'; // 10044
+       _WSAEOPNOTSUPP       = 'Operación no soportada en socket'; // 10045
+       _WSAEPFNOSUPPORT     = 'Familia de protocolos no soportada'; // 10046
+       _WSAEAFNOSUPPORT     = 'Familia de direcciones no soportada por la familia de protocolos'; // 10047
+       _WSAEADDRINUSE       = 'Dirección ya en uso'; // 10048
+       _WSAEADDRNOTAVAIL    = 'No se puede asignar la dirección solicitada'; // 10049
+       _WSAENETDOWN         = 'La red está parada'; // 10050
+       _WSAENETUNREACH      = 'La red está inutilizable'; // 10051
+       _WSAENETRESET        = 'La red interrumpió la conexión'; // 10052
+       _WSAECONNABORTED     = 'El sistema causó la interrupción de la conexión'; // 10053
+       _WSAECONNRESET       = 'Conexión interrumpida'; // 10054
+       _WSAENOBUFS          = 'No hay espacio disponible en el buffer'; // 10055
+       _WSAEISCONN          = 'Socket ya está conectado'; // 10056
+       _WSAENOTCONN         = 'Socket no está conectado'; // 10057
+       _WSAESHUTDOWN        = 'Imposible enviar cuando el socket esta cerrado'; // 10058
+       _WSAETOOMANYREFS     = 'Demasiadas referencias'; // 10059
+       _WSAETIMEDOUT        = 'Conexión tuvo un timeout'; // 10060
+       _WSAECONNREFUSED     = 'Conexión rechazada'; // 10061
+       _WSAELOOP            = 'Demasiados niveles de links simbólicos'; // 10062
+       _WSAENAMETOOLONG     = 'El nombre del archivo es muy grande'; // 10063
+       _WSAEHOSTDOWN        = 'Host está parado'; // 10064
+       _WSAEHOSTUNREACH     = 'No hay ruta para el host'; // 10065
+       _WSAENOTEMPTY        = 'El directorio no está vacío'; // 10066
+       _WSAEPROCLIM         = 'Demasiados procesos'; // 10067
+       _WSAEUSERS           = 'Demasiados usuarios'; // 10068
+       _WSAEDQUOT           = 'Contingente del disco excedido'; // 10069
+       _WSAESTALE           = 'NFS handle archivo vencido'; // 10070
+       _WSAEREMOTE          = 'Demasiados niveles remotos en el path'; // 10071
+       _WSASYSNOTREADY      = 'Sub-sistema de la red inutilizable'; // 10091
+       _WSAVERNOTSUPPORTED  = 'WSOCK32.DLL DLL no puede soportar esta aplicación'; // 10092
+       _WSANOTINITIALISED   = 'WSOCK32.DLL no fue inicializado'; // 10093
+       _WSAHOST_NOT_FOUND   = 'Host no fue encontrado'; // 11001
+       _WSATRY_AGAIN        = 'Host no-autoritativo no fue encontrado'; // 11002
+       _WSANO_RECOVERY      = 'No recuperable error'; // 11003
+       _WSANO_DATA          = 'No hay datos'; // 11004
+       _WSAUNKNOWN          = 'Error de socket desconocido';
+
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/Resource_Turkish.inc b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/Resource_Turkish.inc
new file mode 100644
index 0000000..e4a2501
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/Resource_Turkish.inc	
@@ -0,0 +1,53 @@
+ResourceString
+
+      _WSAEINTR            = 'Kesilmiþ system çaðrýsý';
+      _WSAEBADF            = 'Yanlýþ dosya numarasý';
+      _WSAEACCES           = 'Eriþim engellendi';
+      _WSAEFAULT           = 'Yanlýþ adres';
+      _WSAEINVAL           = 'Geçersiz argüman';
+      _WSAEMFILE           = 'Çok fazla açýk dosya';
+      _WSAEWOULDBLOCK      = 'Operasyon kesintiye uðrar';
+      _WSAEINPROGRESS      = 'Operasyon þu anda sürüyor';
+      _WSAEALREADY         = 'Operasyon zaten devam ediyor';
+      _WSAENOTSOCK         = 'Soket olmayan üzerinde soket operasyonu';
+      _WSAEDESTADDRREQ     = 'Hedef adresi gerekli';
+      _WSAEMSGSIZE         = 'Mesaj çok uzun';
+      _WSAEPROTOTYPE       = 'Soket için protokolün tipi yanlýþ';
+      _WSAENOPROTOOPT      = 'Protokol mevcut deðil';
+      _WSAEPROTONOSUPPORT  = 'Protokol desteklenmiyor';
+      _WSAESOCKTNOSUPPORT  = 'Soket tipi desteklenmiyor';
+      _WSAEOPNOTSUPP       = 'Operasyon soket üzerinde desteklenmiyor';
+      _WSAEPFNOSUPPORT     = 'Protokol ailesi desteklenmiyor';
+      _WSAEAFNOSUPPORT     = 'Adres ailesi protokol ailesi tarafýndan desteklenmiyor';
+      _WSAEADDRINUSE       = 'Adres zaten kullanýmda';
+      _WSAEADDRNOTAVAIL    = 'Ýstenen adres atanamýyor';
+      _WSAENETDOWN         = 'Að trafiðe kapalý';
+      _WSAENETUNREACH      = 'Aða eriþilemiyor';
+      _WSAENETRESET        = 'Að baðlantýyý kapattý';
+      _WSAECONNABORTED     = 'Yazýlým baðlantýnýn kopmasýna sebep oldu';
+      _WSAECONNRESET       = 'Diðer uçtaki bilgisayar baðlantýyý kesti';
+      _WSAENOBUFS          = 'Bellek alaný kalmadý';
+      _WSAEISCONN          = 'Soket zaten baðlý';
+      _WSAENOTCONN         = 'Soket baðlý deðil';
+      _WSAESHUTDOWN        = 'Soket kapandýktan sonra gönderilemiyor';
+      _WSAETOOMANYREFS     = 'Çok fazla referans  iliþtirilemiyor';
+      _WSAETIMEDOUT        = 'Baðantý zamaný doldu';
+      _WSAECONNREFUSED     = 'Baðlantý geri çevrildi';
+      _WSAELOOP            = 'Çok fazla sembolik hat';
+      _WSAENAMETOOLONG     = 'Dosya ismi çok uzun';
+      _WSAEHOSTDOWN        = 'Hedef bilgisayar kullaným dýþý';
+      _WSAEHOSTUNREACH     = 'Hedef bilgisayara yol bulunamadý';
+      _WSAENOTEMPTY        = 'Dizin boþ deðil';
+      _WSAEPROCLIM         = 'Çok fazla süreç';
+      _WSAEUSERS           = 'Çok fazla kullanýcý';
+      _WSAEDQUOT           = 'Disk kotasý aþýldý';
+      _WSAESTALE           = 'Geçersiz NFS dosya göstergeci';
+      _WSAEREMOTE          = 'Uzaktakinin yolunda çok fazla seviye';
+      _WSASYSNOTREADY      = 'Að altsistemi kullanýlamaz durumda';
+      _WSAVERNOTSUPPORTED  = 'WSOCK32.DLL DLL bu uygulamayý destekliyemiyor';
+      _WSANOTINITIALISED   = 'WSOCK32.DLL baþlatýlmamýþ';
+      _WSAHOST_NOT_FOUND   = 'Hedef bilgisayar bulunamadý';
+      _WSATRY_AGAIN        = 'Ýzin gerektirmeyen hedef bilgisayar bulunamadý';
+      _WSANO_RECOVERY      = 'Geri dönülemez hata';
+      _WSANO_DATA          = 'Veri yok';
+      _WSAUNKNOWN          = 'Bilinmeyen soket hatasý';
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXFree.def b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXFree.def
new file mode 100644
index 0000000..24d4191
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXFree.def	
@@ -0,0 +1,72 @@
+{$IFDEF LINUX}
+{$I ../eDefines.inc}
+{$ELSE}
+{$I ..\eDefines.inc}
+{$ENDIF LINUX}
+
+{$IFDEF FPC}
+  {$MODE DELPHI}
+{$ENDIF}
+// ONLY ENABLE THIS - IF YOU LICENSED OUR TLS-EDITION OF DXSOCK
+// IT IS NOT FREE - IT IS NOT INCLUDED WITH WWS - IT'S AS A LEGAL ISSUE!
+//
+{.$DEFINE TLS_EDITION}
+
+// ONLY ENABLE THIS - IF YOU LICENSED OUR CODE TRACER SUITE
+{.$DEFINE CODE_TRACER}
+
+// custom feature for SMTP Sender -> SMTP Relay -> track session ID
+{$DEFINE SMTP_SESSION_FEATURE}
+
+// THESE CAN BE CHANGED BY YOU:
+{.$DEFINE FINALBUILD}
+{.$DEFINE OCX_ONLY}    // not done - will be in DXSock 4.0
+{.$DEFINE OBJECTS_ONLY}
+{$IFNDEF CPU64}
+{$DEFINE ASM8086}
+{$ENDIF}
+// LANGUAGE FILE FOR ERROR MESSAGE TEXT
+{$DEFINE ENGLISH1}
+{.$DEFINE FRENCH1}
+{.$DEFINE GERMAN1}
+{.$DEFINE ITALIAN1}
+{.$DEFINE LOWMEM1}
+{.$DEFINE PORTUGUESE1}
+{.$DEFINE RUSSIAN1}
+{.$DEFINE SPANISH1}
+{.$DEFINE TURKISH1}
+
+////////////////////////////////////////////////////////////////////////////////
+{$IFDEF VER90}
+   {$DEFINE VER100}
+{$ENDIF}
+{$IFDEF VER105}
+   {$DEFINE VER100}
+{$ENDIF}
+
+{$IFDEF FINALBUILD}
+ {$ALIGN ON}
+ {$ASSERTIONS OFF}
+ {$DEBUGINFO OFF}
+ {$DEFINITIONINFO OFF}
+ {$DESCRIPTION 'Uses Brain Patchwork DX, LLC. DXSock 3.0.0'}
+ {$EXTENDEDSYNTAX ON}
+ {$HINTS ON}
+ {$IMAGEBASE $2112CAFE}
+ {$IMPORTEDDATA ON}
+ {$IOCHECKS ON}
+ {$LOCALSYMBOLS OFF}
+ {$LONGSTRINGS ON}
+ {$OBJEXPORTALL ON}
+ {$OPTIMIZATION ON}
+ {$OVERFLOWCHECKS OFF}
+ {$RANGECHECKS OFF}
+ {$REALCOMPATIBILITY OFF}
+ {$REFERENCEINFO OFF}
+ {$RUNONLY OFF}
+ {$STACKFRAMES OFF}
+ {$VARSTRINGCHECKS ON}
+ {$WARNINGS ON}
+{$ENDIF}
+// END OF FILE //
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXHTTPHeaderTools.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXHTTPHeaderTools.pas
new file mode 100644
index 0000000..dbd2617
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXHTTPHeaderTools.pas	
@@ -0,0 +1,570 @@
+unit uRODXHTTPHeaderTools;
+
+interface
+
+///////////////////////////////////////////////////////////////////////////////
+//    Component: TDXHTTPHeaderTools
+//       Author: G.E. Ozz Nixon Jr. (onixon@dxsock.com)
+// ========================================================================
+// Source Owner: DX, Inc. 1995-2002
+//    Copyright: All code is the property of DX, Inc. Licensed for
+//               resell by Brain Patchwork DX (tm) and part of the
+//               DX (r) product lines, which are (c) 1999-2002
+//               DX, Inc. Source may not be distributed without
+//               written permission from both Brain Patchwork DX,
+//               and DX, Inc.
+//      License: (Reminder), None of this code can be added to other
+//               developer products without permission. This includes
+//               but not limited to DCU's, DCP's, DLL's, OCX's, or
+//               any other form of merging our technologies. All of
+//               your products released to a public consumer be it
+//               shareware, freeware, commercial, etc. must contain a
+//               license notification somewhere visible in the
+//               application.
+//               Example is Internet Explorer - Help->About screen
+//               shows the licensed code contained in the application.
+// Code Version: (3rd Generation Code)
+// ========================================================================
+//  Description:
+// ========================================================================
+///////////////////////////////////////////////////////////////////////////////
+{$I uRODXSock.def}
+uses
+  uRODXString,
+  Classes;
+
+Type
+  PHeaderInfo=^THeaderInfo;
+  THeaderInfo=Record
+    ContentLength:Integer;
+    Raw:AnsiString;       // Original Header Request
+    Protocol:AnsiString;
+    Method:AnsiString;    //GET, HEAD, etc.  All caps!!!
+    URI:AnsiString;
+    PhysPath:AnsiString;
+    Allow:AnsiString;
+    AuthType:AnsiString;  // BASIC
+    AuthName:AnsiString;
+    AuthPass:AnsiString;
+    Date:AnsiString;
+    Pragma:AnsiString;
+    CacheControl:AnsiString;
+    Connection:AnsiString;
+    TransferEncoding:AnsiString;
+    Upgrade:AnsiString;
+    Via:AnsiString;
+    Host:AnsiString;      // multiple domains on single IP!
+    From:AnsiString;
+    IfModSince:AnsiString;
+    IfMatch:AnsiString;
+    IfNoneMatch:AnsiString;
+    IfRange:AnsiString;
+    IfUnModSince:AnsiString;
+    MaxForwards:AnsiString;
+    ProxyAuthorization:AnsiString;
+    KeepAlive:AnsiString;
+    PublicCache:AnsiString; // 2.3 renamed field!
+    Range:AnsiString;
+    Referer:AnsiString;
+    UserAgent:AnsiString;
+    ContentType:AnsiString;
+    Accept:AnsiString;
+    AcceptCharset:AnsiString;
+    AcceptEncoding:AnsiString;
+    AcceptLanguage:AnsiString;
+    ClientName:AnsiString;
+    ClientAddr:AnsiString;
+    ClientHost:AnsiString;
+    Cookie:AnsiString;
+    QueryString:AnsiString;
+    Weferer:AnsiString;
+    WserAgent:AnsiString;
+    Forwarded:AnsiString;
+    ForwardedFor:AnsiString;
+    ProxyConnection:AnsiString;
+    CacheInfo:AnsiString;
+    PostData:AnsiString;  // 3.0
+    HostRootPath:AnsiString;  // needed for SSI+ Banner routines and ISAPI Variables
+    All_RAW:AnsiString; // needed for trace, and ISAPIs!
+    All_HTTP:AnsiString;
+    Unknown:AnsiString;
+  end;
+
+  TDXHTTPHeaderTools = class(TDXComponent)
+  private
+    fSessionHeader:PHeaderInfo;
+  protected
+    Function FindUnknownHeader(ServerVariable:AnsiString):AnsiString;
+    Procedure ReplaceUnknownHeader(ServerVariable, VariableValue:AnsiString);
+    Function UnknownHeaderExists(ServerVariable:AnsiString):Boolean;
+  public
+    constructor Create(AOwner:TComponent); {$IFNDEF OBJECTS_ONLY} override; {$ENDIF}
+    Destructor Destroy; override;
+    Procedure Init(HTTPHeader:PHeaderInfo);
+    // 2.0.12
+    Function HeaderGetString(ServerVariable:AnsiString):AnsiString;
+    Function HeaderGetInteger(ServerVariable:AnsiString):Integer;
+    Function HeaderDataExists(ServerVariable:AnsiString):Boolean;
+    Function QueryGetString(ServerVariable:AnsiString):AnsiString;
+    Function QueryGetInteger(ServerVariable:AnsiString):Integer;
+    Function QueryDataExists(ServerVariable:AnsiString):Boolean;
+
+    Function AddHeader(ServerVariable, VariableValue:AnsiString):Boolean;
+    Function SetHeader(ServerVariable, VariableValue:AnsiString):Boolean;
+    Function ToStrings:TStrings;
+
+  published
+  end;
+
+implementation
+
+Uses
+   SysUtils
+   {$IFDEF DELPHI2009UP},AnsiStrings{$ENDIF};
+
+constructor TDXHTTPHeaderTools.Create(AOwner:TComponent);
+Begin
+   Inherited Create(AOwner);
+end;
+
+Destructor TDXHTTPHeaderTools.Destroy;
+Begin
+   Inherited Destroy;
+end;
+
+Procedure TDXHTTPHeaderTools.Init(HTTPHeader:PHeaderInfo);
+Begin
+   fSessionHeader:=HTTPHeader;
+   fSessionHeader^.ContentLength:=0;
+End;
+
+Function TDXHTTPHeaderTools.HeaderGetString(ServerVariable:AnsiString):AnsiString;
+Var
+   Ch:AnsiChar;
+   Ws:AnsiString;
+   URI2:AnsiString;
+
+Begin
+   Result:='';
+   Ws:=UpperCase(ServerVariable);
+   If Ws='' then Exit; //2.0.11
+   If (Copy(Ws,1,5)='HTTP_') then Begin
+      Delete(Ws,1,5); // 3.0
+   End;
+   Ch:=Ws[1];
+   With fSessionHeader^ do
+   Case Ch of
+      'A':If (Ws='ALLOW') then Result:=Allow
+          Else If (Ws='ALL_RAW') then Result:=All_Raw // .9k & 2.3b
+          Else If (Ws='ALL_HTTP') then Result:=All_HTTP // 3.0
+          Else If (Ws='AUTHTYPE') or (Ws='AUTH_TYPE') then Result:=AuthType
+          Else If (Ws='AUTHNAME') or (Ws='AUTH_NAME') or (Ws='AUTH_USER') then Result:=AuthName
+          Else If (Ws='AUTHPASS') or (Ws='AUTH_PASS') or (Ws='AUTH_PASSWORD') then Result:=AuthPass
+          Else If (Ws='ACCEPT') then Result:=Accept
+          Else If (Ws='ACCEPT_CHARSET') or (Ws='ACCEPTCHARSET') then Result:=AcceptCharset
+          Else If (Ws='ACCEPT_ENCODING') or (Ws='ACCEPTENCODING') then Result:=AcceptEncoding
+          Else If (Ws='ACCEPT_LANGUAGE') or (Ws='ACCEPTLANGUAGE') then Result:=AcceptLanguage
+          Else Result := FindUnknownHeader(ServerVariable);
+      'C':If (Ws='CONTENT_LENGTH') or (Ws='CONTENTLENGTH') then Result:=Ansi_IntToStr(ContentLength)
+          Else If (Ws='CACHECONTROL') or (Ws='CACHE_CONTROL') then Result:=CacheControl
+          Else If (Ws='CACHE_INFO') then Result:=CacheInfo
+          Else If (Ws='CONNECTION') then Result:=Connection
+          Else If (Ws='CONTENT_TYPE') or (Ws='CONTENTTYPE') then Result:=ContentType
+          Else If (Ws='CLIENTNAME') or (Ws='CLIENT_NAME') then Result:=ClientName
+          Else If (Ws='CLIENTADDR') or (Ws='CLIENT_ADDR') then Result:=ClientAddr
+          Else If (Ws='COOKIE') then Result:=Cookie
+          Else Result := FindUnknownHeader(ServerVariable);
+      'D':If (Ws='DATE') then Result:=Date
+          Else Result := FindUnknownHeader(ServerVariable);
+      'F':If (Ws='FROM') then Result:=From
+          Else If (Ws='FORWARDED') then Result:=Forwarded
+          Else If (Ws='FORWARDED_FOR') then Result:=ForwardedFor
+          Else Result := FindUnknownHeader(ServerVariable);
+      'H':If (Ws='HOST') then Begin
+             Result:=Host;
+             If Pos(AnsiChar('@'),Result)>0 then Delete(Result,1,Pos(AnsiChar(':'),Result));
+             If Pos(AnsiChar(':'),Result)>0 then Delete(Result,Pos(AnsiChar(':'),Result),Length(Result));
+          End
+          Else If (Ws='HTTPS') then Result:='off'
+          Else Result := FindUnknownHeader(ServerVariable);
+      'I':If (Ws='IFMODSINCE') or (Ws='IF_MODSINCE') or (Ws='IF_MOD_SINCE') then Result:=IfModSince
+          Else If (Ws='IFMATCH') or (Ws='IF_MATCH') then Result:=IfMatch
+          Else If (Ws='IFNONEMATCH') or (Ws='IF_NONEMATCH') or (Ws='IF_NONE_MATCH') then Result:=IfNoneMatch
+          Else If (Ws='IFRANGE') or (Ws='IF_RANGE') then Result:=IfRange
+          Else If (Ws='IFUNMODSINCE') or (Ws='IF_UNMODSINCE') or (Ws='IF_UNMOD_SINCE') then Result:=IfUnModSince
+          Else Result := FindUnknownHeader(ServerVariable);
+      'K':If (Ws='KEEPALIVE') or (Ws='KEEP_ALIVE') then Result:=KeepAlive
+          Else Result := FindUnknownHeader(ServerVariable);
+      'M':If (Ws='METHOD') then Result:=Method
+          Else If (Ws='MAXFORWARDS') or (Ws='MAX_FORWARDS') then Result:=MaxForwards
+          Else Result := FindUnknownHeader(ServerVariable);
+      'P':If (Ws='PROTOCOL') then Result:=Protocol
+          Else If (Ws='PRAGMA') then Result:=Pragma
+          Else if (Ws='PROXYAUTHORIZATION') or (Ws='PROXY_AUTHORIZATION') then Result:=ProxyAuthorization
+          Else if (Ws='PUBLIC') then Result:=PublicCache
+          Else if (Ws='PROXY_CONNECTION') then Result:=ProxyConnection
+          Else Result := FindUnknownHeader(ServerVariable);
+      'Q':If (Ws='QUERYSTRING') or (Ws='QUERY_STRING') then Result:=QueryString
+          Else Result := FindUnknownHeader(ServerVariable);
+      'R':If (Ws='RANGE') then Result:=Range
+          Else If (Ws='REFERER') or (Ws='REFERRER') or (Ws='REFFERER') then Result:=Referer
+          Else If (Ws='REQUEST_METHOD') then Result:=Method
+          Else If (Ws='REMOTE_NAME') or (Ws='REMOTE_HOST') then Result:=ClientName
+          Else If (Ws='REMOTE_ADDR') then Result:=ClientAddr
+          Else If (Ws='REQUEST_URI') then Begin
+             URI2:=ToUnixSlashes(URI);
+             If Pos(AnsiChar('/'),URI2)=0 then Result:=AnsiChar('/')+URI2
+             Else Begin
+                If Copy(URI2,1,1)<>'/' then URI2:=AnsiChar('/')+URI2;
+                Result:=URI2; // 4/2/2002 Copy(URI2,1,PosLastChar('/',URI2));
+             End;
+          End
+          Else Result := FindUnknownHeader(ServerVariable);
+      'S':If (Ws='SERVER_PROTOCOL') then Result:=Protocol
+          Else If (Ws='SERVER_NAME') then Begin
+             Result:=Host;
+             If Pos(AnsiChar('@'),Result)>0 then Delete(Result,1,Pos(AnsiChar(':'),Result));
+             If Pos(AnsiChar(':'),Result)>0 then Delete(Result,Pos(AnsiChar(':'),Result),Length(Result));
+          End
+          Else If (Ws='SERVER_PORT_SECURE') then Result:=AnsiChar('0')
+          Else Result := FindUnknownHeader(ServerVariable);
+      'T':If (Ws='TRANSFERENCODING') or (Ws='TRANSFER_ENCODING') then Result:=TransferEncoding
+          Else Result := FindUnknownHeader(ServerVariable);
+      'U':If (Ws='URI') then Begin
+             URI2:=ToUnixSlashes(URI);
+             If Pos(AnsiChar('/'),URI2)=0 then Result:=AnsiChar('/')+URI2
+             Else Begin
+                If Copy(URI2,1,1)<>AnsiChar('/') then URI2:=AnsiChar('/')+URI2;
+                Result:=URI2; // 4/2/2002 Copy(URI2,1,PosLastChar('/',URI2));
+             End;
+          End
+          Else If (Ws='URL') then Begin
+             URI2:=ToUnixSlashes(URI);
+             If Copy(URI2,1,1)=AnsiChar('/') then Result:=URI2
+             Else Result:=AnsiChar('/')+URI2;
+          End
+          Else If (Ws='UPGRADE') then Result:=Upgrade
+          Else if (Ws='USERAGENT') or (Ws='USER_AGENT') then Result:=UserAgent
+          Else Result := FindUnknownHeader(ServerVariable);
+      'V':If (Ws='VIA') then Result:=Via
+          Else Result := FindUnknownHeader(ServerVariable);
+      'W':If (Ws='WEFERER') then Result:=Weferer
+          Else If (Ws='WSER_AGENT') then Result:=WserAgent
+          Else Result := FindUnknownHeader(ServerVariable);
+       Else
+          Result := FindUnknownHeader(ServerVariable);
+   End;
+End;
+
+Function TDXHTTPHeaderTools.HeaderGetInteger(ServerVariable:AnsiString):Integer;
+Var
+   Ch:AnsiChar;
+   Ws:AnsiString;
+
+Begin
+   Result:=0;
+   Ws:=UpperCase(ServerVariable);
+   If Ws='' then Exit; // 2.0.11
+   Ch:=Ws[1];
+   With fSessionHeader^ do
+   Case Ch of
+      'C':If (Ws='CONTENT_LENGTH') or (Ws='CONTENTLENGTH') then Result:=ContentLength;
+   End;
+End;
+
+Function TDXHTTPHeaderTools.HeaderDataExists(ServerVariable:AnsiString):Boolean;
+Begin
+   Result:=HeaderGetString(ServerVariable)<>'';
+End;
+
+// 2.0.12
+Function TDXHTTPHeaderTools.QueryGetString(ServerVariable:AnsiString):AnsiString;
+Var
+   Ws:AnsiString;
+   Tmp:AnsiString;
+   Value:AnsiString;
+
+Begin
+   Result:='';
+   Tmp:=fSessionHeader^.QueryString+AnsiChar('&');
+   While (Pos(AnsiChar('&'),Tmp)>0) do Begin
+      Ws:=Copy(Tmp,1,Pos(AnsiChar('&'),Tmp)-1);
+      Delete(Tmp,1,Pos(AnsiChar('&'),Tmp));
+      Value:=Copy(Ws,1,Pos(AnsiChar('='),Ws)-1);
+      Delete(Ws,1,Pos(AnsiChar('='),Ws));
+      If UpperCase(Value)=UpperCase(ServerVariable) then Begin
+         If Result<>'' then Result:=Result+AnsiChar(#13)+AnsiChar(#10)+Ws
+         Else Result:=Ws;
+      End;
+   End;
+End;
+
+Function TDXHTTPHeaderTools.QueryGetInteger(ServerVariable:AnsiString):Integer;
+Var
+   Ws:AnsiString;
+
+Begin
+   Ws:=QueryGetString(ServerVariable);
+   If (Ws<>'') and (IsNumericString(Ws)) then Result:=Ansi_StrToInt(Ws)
+   Else Result:=-1;
+End;
+
+Function TDXHTTPHeaderTools.QueryDataExists(ServerVariable:AnsiString):Boolean;
+Begin
+   Result:=QueryGetString(ServerVariable)<>'';
+End;
+
+Function TDXHTTPHeaderTools.AddHeader(ServerVariable, VariableValue:AnsiString):Boolean;
+Var
+   Ch:AnsiChar;
+   Ws:AnsiString;
+
+  Procedure AddToUnknown; // 7-27
+  Begin
+     If fSessionHeader^.Unknown='' then fSessionHeader^.Unknown:=ServerVariable+AnsiString(': ')+VariableValue
+     Else fSessionHeader^.Unknown:=fSessionHeader^.Unknown+AnsiString(#13#10)+ServerVariable+AnsiString(': ')+VariableValue;
+  End;
+
+Begin
+   Result:=False;
+   Ws:=Uppercase(ServerVariable);
+   If Ws='' then Exit;
+// 7-27
+   Ws:=StringReplace(Ws,AnsiChar('-'),AnsiChar('_'),[rfReplaceAll]);
+   Ch:=Ws[1];
+   With fSessionHeader^ do
+   Case Ch of
+      'A':If (Ws='ALLOW') then Allow:=VariableValue
+          Else If (Ws='AUTHTYPE') or (Ws='AUTH_TYPE') then AuthType:=VariableValue
+          Else If (Ws='AUTHNAME') or (Ws='AUTH_NAME') then AuthName:=VariableValue
+          Else If (Ws='AUTHPASS') or (Ws='AUTH_PASS') then AuthPass:=VariableValue
+          Else If (Ws='ACCEPT') then Accept:=VariableValue
+          Else If (Ws='ACCEPT_CHARSET') or (Ws='ACCEPTCHARSET') then AcceptCharset:=VariableValue
+          Else If (Ws='ACCEPT_ENCODING') or (Ws='ACCEPTENCODING') then AcceptEncoding:=VariableValue
+          Else If (Ws='ACCEPT_LANGUAGE') or (Ws='ACCEPTLANGUAGE') then AcceptLanguage:=VariableValue
+          Else AddToUnknown;
+      'C':If (Ws='CONTENT_LENGTH') or (Ws='CONTENTLENGTH') then ContentLength:=Ansi_StrToInt(VariableValue)
+          Else If (Ws='CACHECONTROL') or (Ws='CACHE_CONTROL') then CacheControl:=VariableValue
+          Else If (Ws='CACHE_INFO') then CacheInfo:=VariableValue
+          Else If (Ws='CONNECTION') then Connection:=VariableValue
+          Else If (Ws='CONTENT_TYPE') or (Ws='CONTENTTYPE') then ContentType:=VariableValue
+          Else If (Ws='CLIENTNAME') or (Ws='CLIENT_NAME') then ClientName:=VariableValue
+          Else If (Ws='CLIENTADDR') or (Ws='CLIENT_ADDR') then ClientAddr:=VariableValue
+          Else If (Ws='COOKIE') then Cookie:=VariableValue
+          Else AddToUnknown;
+      'D':If (Ws='DATE') then Date:=VariableValue
+          Else AddToUnknown;
+      'F':If (Ws='FROM') then From:=VariableValue
+          Else If (Ws='FORWARDED') then Forwarded:=VariableValue
+          Else If (Ws='FORWARDED_FOR') then ForwardedFor:=VariableValue
+          Else AddToUnknown;
+      'H':If (Ws='HOST') then Host:=VariableValue
+          Else AddToUnknown;
+      'I':If (Ws='IFMODSINCE') or (Ws='IF_MODSINCE') or (Ws='IF_MOD_SINCE') then IfModSince:=VariableValue
+          Else If (Ws='IFMATCH') or (Ws='IF_MATCH') then IfMatch:=VariableValue
+          Else If (Ws='IFNONEMATCH') or (Ws='IF_NONEMATCH') or (Ws='IF_NONE_MATCH') then IfNoneMatch:=VariableValue
+          Else If (Ws='IFRANGE') or (Ws='IF_RANGE') then IfRange:=VariableValue
+          Else If (Ws='IFUNMODSINCE') or (Ws='IF_UNMODSINCE') or (Ws='IF_UNMOD_SINCE') then IfUnModSince:=VariableValue
+          Else AddToUnknown;
+      'K':If (Ws='KEEPALIVE') or (Ws='KEEP_ALIVE') then KeepAlive:=VariableValue
+          Else AddToUnknown;
+      'M':If (Ws='METHOD') then Method:=VariableValue
+          Else If (Ws='MAXFORWARDS') or (Ws='MAX_FORWARDS') then MaxForwards:=VariableValue
+          Else AddToUnknown;
+      'P':If (Ws='PROTOCOL') then Protocol:=VariableValue
+          Else If (Ws='PRAGMA') then Pragma:=VariableValue
+          Else if (Ws='PROXYAUTHORIZATION') or (Ws='PROXY_AUTHORIZATION') then ProxyAuthorization:=VariableValue
+          Else if (Ws='PUBLIC') then PublicCache:=VariableValue
+          Else if (Ws='PROXY_CONNECTION') then ProxyConnection:=VariableValue
+          Else AddToUnknown;
+      'Q':If (Ws='QUERYSTRING') or (Ws='QUERY_STRING') then QueryString:=VariableValue
+          Else AddToUnknown;
+      'R':If (Ws='RANGE') then Range:=VariableValue
+          Else If (Ws='REFERER') or (Ws='REFERRER') or (Ws='REFFERER') then Referer:=VariableValue
+          Else AddToUnknown;
+      'U':If (Ws='URI') then URI:=VariableValue
+          Else If (Ws='UPGRADE') then Upgrade:=VariableValue
+          Else if (Ws='USERAGENT') or (Ws='USER_AGENT') then UserAgent:=VariableValue
+          Else AddToUnknown;
+      'T':If (Ws='TRANSFERENCODING') or (Ws='TRANSFER_ENCODING') then TransferEncoding:=VariableValue
+          Else AddToUnknown;
+      'V':If (Ws='VIA') then Via:=VariableValue // 7-27
+          Else AddToUnknown;
+      'W':If (Ws='WEFERER') then Weferer:=VariableValue // 7-27
+          Else If (Ws='WSER_AGENT') then WserAgent:=VariableValue // 7-27
+          Else AddToUnknown;
+     Else
+       AddToUnknown;
+   End;//case
+   Result:=True;
+End;
+
+Function TDXHTTPHeaderTools.SetHeader(ServerVariable, VariableValue:AnsiString):Boolean;
+Begin
+   Result:=AddHeader(ServerVariable, VariableValue);
+End;
+
+Function TDXHTTPHeaderTools.FindUnknownHeader(ServerVariable:AnsiString):AnsiString;
+var
+   line, buf:AnsiString;
+   i : Integer;
+
+Begin
+   line:=fSessionHeader^.Unknown;
+   i := Pos(ServerVariable, line);
+   if i <> 0 then
+   Begin
+      buf := Copy(line, i, Length(line));
+      i := Pos(AnsiString(#13#10), buf);
+      buf := Copy(buf, 0, i-1);
+      i := Pos(AnsiChar(#32), buf);
+      Result := Copy(buf, i, Length(buf));
+   End; //IF
+End;
+
+Procedure TDXHTTPHeaderTools.ReplaceUnknownHeader(ServerVariable, VariableValue:AnsiString);
+var line:PAnsiString;
+   str, buf:AnsiString;
+   i, k, m:Integer;
+Begin
+   if Not UnknownHeaderExists(ServerVariable) then Exit;
+   line:=@fSessionHeader^.Unknown;
+   k := Pos(ServerVariable, line^);
+   if k <> 0 then
+   Begin
+      str := Copy(line^, k, Length(line^));
+      m := Pos(AnsiString(#13#10), str);
+      buf := Copy(str, 0, k-1);
+      i := Pos(AnsiChar(#32), buf);
+      k := k + i;
+      Delete(line^, k, m);
+      Insert(VariableValue, line^, k);
+   End;
+End;
+
+Function TDXHTTPHeaderTools.UnknownHeaderExists(ServerVariable:AnsiString):Boolean;
+Begin
+   if ServerVariable = '' then Result:=False
+   Else if fSessionHeader^.Unknown = '' then Result:=False
+   Else if Pos(ServerVariable, fSessionHeader^.Unknown) = 0 then Result:=False
+   Else Result:=True;
+End;
+
+Function TDXHTTPHeaderTools.ToStrings:TStrings;
+
+   procedure AddIntoStringList(res:TStrings; AValue: AnsiString);
+   begin
+     Res.Add({$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(AValue));
+   end;
+
+var res:TStrings;
+    endch:AnsiString;
+    split :AnsiString;
+//    CleanLoop:Integer;
+
+Begin
+   split:=': ';
+   endch :='';// 7-27 #13#10;
+   res := TStringList.Create;
+   With fSessionHeader^ do
+   Begin
+    if Allow <> '' then
+       AddIntoStringList(Res,'ALLOW'+split+Allow+endch);
+    if AuthType <> '' then
+       AddIntoStringList(Res,'AUTHTYPE'+split+AuthType+endch);
+    if AuthName <> '' then
+       AddIntoStringList(Res,'AUTHNAME'+split+AuthName+endch);
+    if AuthPass <> '' then
+       AddIntoStringList(Res,'AUTHPASS'+split+AuthPass+endch);
+    if Accept <> '' then
+       AddIntoStringList(Res,'ACCEPT'+split+Accept+endch);
+    if AcceptCharset <> '' then
+       AddIntoStringList(Res,'ACCEPT-CHARSET'+split+AcceptCharset+endch);
+    if AcceptEncoding <> '' then
+       AddIntoStringList(Res,'ACCEPT-ENCODING'+split+AcceptEncoding+endch);
+    if AcceptLanguage <> '' then
+       AddIntoStringList(Res,'ACCEPT-LANGUAGE'+split+AcceptLanguage+endch);
+    if ContentLength <> 0 then
+       AddIntoStringList(Res,'CONTENT-LENGTH'+split+Ansi_IntToStr(ContentLength)+endch);
+    if CacheControl <> '' then // 7-27
+       AddIntoStringList(Res,'CACHE-CONTROL'+split+CacheControl+endch);
+    if CacheInfo <> '' then // 7-27
+       AddIntoStringList(Res,'CACHE-INFO'+split+CacheInfo+endch);
+    if Connection <> '' then
+       AddIntoStringList(Res,'CONNECTION'+split+Connection+endch);
+    if ContentType <> '' then
+       AddIntoStringList(Res,'CONTENT-TYPE'+split+ContentType+endch);
+    if ClientName <> '' then
+       AddIntoStringList(Res,'CLIENTNAME'+split+ClientName+endch);
+    if ClientAddr <> '' then
+       AddIntoStringList(Res,'CLIENTADDR'+split+ClientAddr+endch);
+    if Cookie <> '' then
+       AddIntoStringList(Res,'COOKIE'+split+Cookie+endch);
+    if Date <> '' then
+       AddIntoStringList(Res,'DATE'+split+Date+endch);
+    if From <> '' then
+       AddIntoStringList(Res,'FROM'+split+From+endch);
+    if Forwarded <> '' then
+       AddIntoStringList(Res,'FORWARDED'+split+Forwarded+endch);
+    if ForwardedFor <> '' then
+       AddIntoStringList(Res,'FORWARDED-FOR'+split+ForwardedFor+endch);
+    if Host <> '' then
+       AddIntoStringList(Res,'HOST'+split+Host+endch);
+    if IfModSince <> '' then
+       AddIntoStringList(Res,'IFMODSINCE'+split+IfModSince+endch);
+    if IfMatch <> '' then
+       AddIntoStringList(Res,'IFMATCH'+split+IfMatch+endch);
+    if IfNoneMatch <> '' then
+       AddIntoStringList(Res,'IFNONEMATCH'+split+IfNoneMatch+endch);
+    if IfRange <> '' then
+       AddIntoStringList(Res,'IFRANGE'+split+IfRange+endch);
+    if IfUnModSince <> '' then
+       AddIntoStringList(Res,'IFUNMODSINCE'+split+IfUnModSince+endch);
+    if KeepAlive <> '' then
+       AddIntoStringList(Res,'KEEPALIVE'+split+KeepAlive+endch);
+    if Method <> '' then
+       AddIntoStringList(Res,'METHOD'+split+Method+endch);
+    if MaxForwards <> '' then
+       AddIntoStringList(Res,'MAXFORWARDS'+split+MaxForwards+endch);
+    if Protocol <> '' then
+       AddIntoStringList(Res,'PROTOCOL'+split+Protocol+endch);
+    if ProxyConnection <> '' then
+       AddIntoStringList(Res,'PROXY-CONNECTION'+split+ProxyConnection+endch);
+    if Pragma <> '' then
+       AddIntoStringList(Res,'PRAGMA'+split+Pragma+endch);
+    if ProxyAuthorization <> '' then
+       AddIntoStringList(Res,'PROXYAUTHORIZATION'+split+ProxyAuthorization+endch);
+    if PublicCache <> '' then
+       AddIntoStringList(Res,'PUBLIC'+split+PublicCache+endch);
+    if QueryString <> '' then
+       AddIntoStringList(Res,'QUERYSTRING'+split+QueryString+endch);
+    if Range <> '' then
+       AddIntoStringList(Res,'RANGE'+split+Range+endch);
+    if Referer <> '' then
+       AddIntoStringList(Res,'REFERER'+split+Referer+endch);
+    if URI <> '' then
+       AddIntoStringList(Res,'URI'+split+URI+endch);
+    if Upgrade <> '' then
+       AddIntoStringList(Res,'UPGRADE'+split+Upgrade+endch);
+    if UserAgent <> '' then
+       AddIntoStringList(Res,'USERAGENT'+split+UserAgent+endch);
+    if TransferEncoding <> '' then
+       AddIntoStringList(Res,'TRANSFERENCODING'+split+TransferEncoding+endch);
+    if Via <> '' then
+       AddIntoStringList(Res,'VIA'+split+Via+endch);
+    if Weferer <> '' then
+       AddIntoStringList(Res,'WEFERER'+split+Weferer+endch);
+    if WserAgent <> '' then
+       AddIntoStringList(Res,'WSER-AGENT'+split+WserAgent+endch);
+    if Unknown <> '' then
+       AddIntoStringList(Res,Unknown+endch);
+   End; //With
+{   CleanLoop:=res.Count;
+   While CleanLoop>0 do Begin
+      if res[CleanLoop-1]='' then res.delete(CleanLoop-1);
+      Dec(CleanLoop);
+   End;}
+   Result:=res;
+End;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXHTTPServerCore.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXHTTPServerCore.pas
new file mode 100644
index 0000000..4f38e44
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXHTTPServerCore.pas	
@@ -0,0 +1,767 @@
+unit uRODXHTTPServerCore;
+
+interface
+
+///////////////////////////////////////////////////////////////////////////////
+//    Component: TDXHTTPServerCore
+//       Author: G.E. Ozz Nixon Jr. (onixon@dxsock.com)
+// ========================================================================
+// Source Owner: DX, Inc. 1995-2002
+//    Copyright: All code is the property of DX, Inc. Licensed for
+//               resell by Brain Patchwork DX (tm) and part of the
+//               DX (r) product lines, which are (c) 1999-2002
+//               DX, Inc. Source may not be distributed without
+//               written permission from both Brain Patchwork DX,
+//               and DX, Inc.
+//      License: (Reminder), None of this code can be added to other
+//               developer products without permission. This includes
+//               but not limited to DCU's, DCP's, DLL's, OCX's, or
+//               any other form of merging our technologies. All of
+//               your products released to a public consumer be it
+//               shareware, freeware, commercial, etc. must contain a
+//               license notification somewhere visible in the
+//               application.
+//               Example is Internet Explorer - Help->About screen
+//               shows the licensed code contained in the application.
+// Code Version: (3rd Generation Code)
+// ========================================================================
+//  Description:
+// ========================================================================
+///////////////////////////////////////////////////////////////////////////////
+
+{$I uRODXSock.def}
+
+uses
+{$IFDEF CODE_TRACER}
+  DXCodeTracer,
+{$ENDIF}
+  uRODXSocket, // 3.0
+  Classes,
+  uRODXServerCore,
+  uRODXISAPI,
+  uRODXHTTPHeaderTools;
+
+// RFC2068, Response Codes
+Const
+   MaxStatusCodes=40;
+   StatusCodes:array[0..MaxStatusCodes] of record
+      Code:Integer;
+      Msg:AnsiString
+   end =
+  ((Code:100; Msg:'Continue'),
+   (Code:101; Msg:'Switching Protocols'),
+   (Code:200; Msg:'OK'),
+   (Code:201; Msg:'Created'),
+   (Code:202; Msg:'Accepted'),
+   (Code:203; Msg:'Non-Authoritative Information'),
+   (Code:204; Msg:'No Content'),
+   (Code:205; Msg:'Reset Content'),
+   (Code:206; Msg:'Partial Content'),
+   (Code:300; Msg:'Multiple Choices'),
+   (Code:301; Msg:'Moved Permanently'),
+   (Code:302; Msg:'Moved Temporarily'),
+   (Code:303; Msg:'See Other'),
+   (Code:304; Msg:'Not Modified'),
+   (Code:305; Msg:'Use Proxy'),
+   (Code:306; Msg:'Unused'),
+   (Code:307; Msg:'Temporary Redirect'),
+   (Code:400; Msg:'Bad Request'),
+   (Code:401; Msg:'Unauthorized'),
+   (Code:402; Msg:'Payment Required'),
+   (Code:403; Msg:'Forbidden'),
+   (Code:404; Msg:'Not Found'),
+   (Code:405; Msg:'Method Not Allowed'),
+   (Code:406; Msg:'Not Acceptable'),
+   (Code:407; Msg:'Proxy Authentication Required'),
+   (Code:408; Msg:'Request Time-out'),
+   (Code:409; Msg:'Conflict'),
+   (Code:410; Msg:'Gone'),
+   (Code:411; Msg:'Length Required'),
+   (Code:412; Msg:'Precondition Failed'),
+   (Code:413; Msg:'Request Entity Too Large'),
+   (Code:414; Msg:'Request-URI Too Large'),
+   (Code:415; Msg:'Unsupported Media Type'),
+   (Code:416; Msg:'Requested Range Not Satisfiable'),
+   (Code:417; Msg:'Expectation Failed'),
+   (Code:500; Msg:'Internal Server Error'),
+   (Code:501; Msg:'Not Implemented'),
+   (Code:502; Msg:'Bad Gateway'),
+   (Code:503; Msg:'Service Unavailable'),
+   (Code:504; Msg:'Gateway Time-out'),
+   (Code:505; Msg:'HTTP Version Not Supported'));
+
+Type
+  HTTPTBasicEvent = procedure(ClientThread:TDXClientThread;HeaderInfo:PHeaderInfo;Var EnableKeepAlive:Boolean) of object;
+  HTTPTOtherEvent = procedure(ClientThread:TDXClientThread;HeaderInfo:PHeaderInfo;var Handled:Boolean) of object;
+
+  TDXHTTPServerCore = class(TDXServerCore)
+  private
+    fOnCommandGET:HTTPTBasicEvent;         // GET <file> HTTP/1.0
+    fOnCommandPOST:HTTPTBasicEvent;        // POST <file> HTTP/1.0
+    fOnCommandHEAD:HTTPTBasicEvent;        // HEAD <file> HTTP/1.0
+    fOnCommandCHECKOUT:HTTPTBasicEvent;
+    fOnCommandSHOWMETHOD:HTTPTBasicEvent;
+    fOnCommandPUT:HTTPTBasicEvent;
+    fOnCommandDELETE:HTTPTBasicEvent;
+    fOnCommandLINK:HTTPTBasicEvent;
+    fOnCommandUNLINK:HTTPTBasicEvent;
+    fOnCommandCHECKIN:HTTPTBasicEvent;
+    fOnCommandTEXTSEARCH:HTTPTBasicEvent;
+    fOnCommandSPACEJUMP:HTTPTBasicEvent;
+    fOnCommandSEARCH:HTTPTBasicEvent;
+    fOnCommandOPTIONS:HTTPTBasicEvent;
+    fOnCommandTRACE:HTTPTBasicEvent;
+    fOnCommandCONNECT:HTTPTBasicEvent;
+    fOnCommandPATCH:HTTPTBasicEvent;
+    fOnCommandOther:HTTPTOtherEvent;
+    fEventArray:TList;
+    fiTimeout:Cardinal;
+    fSupportKeepAlive:Boolean;
+    fDXISAPI:TDXISAPI;
+  protected
+    Procedure SetOnCommandGET(value:HTTPTBasicEvent);
+    Procedure SetOnCommandPOST(value:HTTPTBasicEvent);
+    Procedure SetOnCommandHEAD(value:HTTPTBasicEvent);
+    Procedure SetOnCommandCHECKOUT(value:HTTPTBasicEvent);
+    Procedure SetOnCommandSHOWMETHOD(value:HTTPTBasicEvent);
+    Procedure SetOnCommandPUT(value:HTTPTBasicEvent);
+    Procedure SetOnCommandDELETE(value:HTTPTBasicEvent);
+    Procedure SetOnCommandLINK(value:HTTPTBasicEvent);
+    Procedure SetOnCommandUNLINK(value:HTTPTBasicEvent);
+    Procedure SetOnCommandCHECKIN(value:HTTPTBasicEvent);
+    Procedure SetOnCommandTEXTSEARCH(value:HTTPTBasicEvent);
+    Procedure SetOnCommandSPACEJUMP(value:HTTPTBasicEvent);
+    Procedure SetOnCommandSEARCH(value:HTTPTBasicEvent);
+    Procedure SetOnCommandOPTIONS(value:HTTPTBasicEvent);
+    Procedure SetOnCommandTRACE(value:HTTPTBasicEvent);
+    Procedure SetOnCommandCONNECT(value:HTTPTBasicEvent);
+    Procedure SetOnCommandPATCH(value:HTTPTBasicEvent);
+  public
+    constructor Create(AOwner:TComponent); {$IFNDEF OBJECTS_ONLY} override; {$ENDIF}
+    destructor Destroy; override;
+    procedure ProcessSession(ClientThread:TDXClientThread);
+    Procedure AddBasicEvent(Command:AnsiString;EventProc:HTTPTBasicEvent);
+    Function HeaderText(StatusCode:Integer):AnsiString; //2.0.12
+    procedure Start; override;
+    procedure Stop; override;
+  published
+    property Timeout:Cardinal read fiTimeout
+                           write fiTimeout;
+    property SupportKeepAlive:Boolean read fSupportKeepAlive
+                                      write fSupportKeepAlive;
+    property OnCommandGET: HTTPTBasicEvent read fOnCommandGET
+                                           write SetOnCommandGET;
+    property OnCommandPOST: HTTPTBasicEvent read fOnCommandPOST
+                                            write SetOnCommandPOST;
+    property OnCommandHEAD: HTTPTBasicEvent read fOnCommandHEAD
+                                            write SetOnCommandHEAD;
+    property OnCommandCHECKOUT: HTTPTBasicEvent read fOnCommandCHECKOUT
+                                                write SetOnCommandCHECKOUT;
+    property OnCommandSHOWMETHOD: HTTPTBasicEvent read fOnCommandSHOWMETHOD
+                                                  write SetOnCommandSHOWMETHOD;
+    property OnCommandPUT: HTTPTBasicEvent read fOnCommandPUT
+                                           write SetOnCommandPUT;
+    property OnCommandDELETE: HTTPTBasicEvent read fOnCommandDELETE
+                                              write SetOnCommandDELETE;
+    property OnCommandLINK: HTTPTBasicEvent read fOnCommandLINK
+                                            write SetOnCommandLINK;
+    property OnCommandUNLINK: HTTPTBasicEvent read fOnCommandUNLINK
+                                              write SetOnCommandUNLINK;
+    property OnCommandCHECKIN: HTTPTBasicEvent read fOnCommandCHECKIN
+                                               write SetOnCommandCHECKIN;
+    property OnCommandTEXTSEARCH: HTTPTBasicEvent read fOnCommandTEXTSEARCH
+                                                  write SetOnCommandTEXTSEARCH;
+    property OnCommandSPACEJUMP: HTTPTBasicEvent read fOnCommandSPACEJUMP
+                                                 write SetOnCommandSPACEJUMP;
+    property OnCommandSEARCH: HTTPTBasicEvent read fOnCommandSEARCH
+                                              write SetOnCommandSEARCH;
+    property OnCommandOPTIONS: HTTPTBasicEvent read fOnCommandOPTIONS
+                                               write SetOnCommandOPTIONS;
+    property OnCommandTRACE: HTTPTBasicEvent read fOnCommandTRACE
+                                             write SetOnCommandTRACE;
+    property OnCommandCONNECT: HTTPTBasicEvent read fOnCommandCONNECT
+                                             write SetOnCommandCONNECT;
+    property OnCommandPATCH: HTTPTBasicEvent read fOnCommandPATCH
+                                             write SetOnCommandPATCH;
+    property OnCommandOther: HTTPTOtherEvent read fOnCommandOther
+                                             write fOnCommandOther;
+    property ISAPIServer: TDXISAPI read fDXISAPI
+                                   write fDXISAPI;
+  end;
+
+implementation
+
+Uses
+   uRODXSock,
+   SysUtils,
+   {$IFDEF DELPHI2009UP}AnsiStrings,{$ENDIF}
+   uRODXString;
+
+Type
+  PHTTPBasicEvent=^THTTPBasicEvent;
+  THTTPBasicEvent=record
+     Tag:Integer;
+     Command:AnsiString;
+     EventProcedure:HTTPTBasicEvent;
+  End;
+
+///////////////////////////////////////////////////////////////////////////////
+//CREATE:
+//       Define the Default Port number to Listen On.
+///////////////////////////////////////////////////////////////////////////////
+constructor TDXHTTPServerCore.Create(AOwner:TComponent);
+begin
+   inherited Create(AOwner);
+   ServerPort:=80;
+   fEventArray:=TList.Create;
+   fiTimeout:=30000;
+end;
+
+///////////////////////////////////////////////////////////////////////////////
+//DESTROY:
+//        Destory this object.
+///////////////////////////////////////////////////////////////////////////////
+destructor TDXHTTPServerCore.Destroy;
+Var
+   PBasicEvent:PHTTPBasicEvent;
+
+begin
+   If Assigned(fEventArray) then Begin
+      While fEventArray.Count>0 do Begin
+         Case PHTTPBasicEvent(fEventArray[0])^.Tag of
+            1:Begin
+              PBasicEvent:=fEventArray[0];
+              Dispose(PBasicEvent);
+            End;
+         End;
+         fEventArray.Delete(0);
+      End;
+      fEventArray.Free;
+      fEventArray:=Nil;
+   End;
+   inherited Destroy;
+end;
+
+///////////////////////////////////////////////////////////////////////////////
+//ADDBASICEVENT:
+//              Allows you to dynamically assign a new command to the internal
+//              parser. This allows the servercore to support the 'pre-defined'
+//              OnCommand* events, plus you can add other commands dynamically
+//              at run-time in your application without requiring a source code
+//              modification to our components!
+//
+//              To make support easier for us, we ask that you use the Add*Event
+//              procedures to expand our code, reducing code changes when an
+//              upgrade is released!
+//
+//              See documentation for complete information on how this works.
+//
+//              Example Usage: AddBasicEvent('CDROM',MySpecialEvent);
+///////////////////////////////////////////////////////////////////////////////
+Procedure TDXHTTPServerCore.AddBasicEvent(Command:AnsiString;EventProc:HTTPTBasicEvent);
+Var
+   PBasicEvent:PHTTPBasicEvent;
+   Loop:Integer;
+
+Begin
+   Command:=Uppercase(Command);
+   Loop:=0;
+   While Loop<fEventArray.Count do Begin
+      If PHTTPBasicEvent(fEventArray[Loop])^.Command=Command then Begin
+         PHTTPBasicEvent(fEventArray[Loop])^.EventProcedure:=EventProc;
+         Exit;
+      End
+      Else Inc(Loop);
+   End;
+   New(PBasicEvent);
+   PBasicEvent^.Tag:=1;      // Denotes Event in fEventArray is a TBasicEvent!
+   PBasicEvent^.Command:=Command;
+   PBasicEvent^.EventProcedure:=EventProc;
+   fEventArray.Add(PBasicEvent);
+End;
+
+Procedure TDXHTTPServerCore.SetOnCommandGET(value:HTTPTBasicEvent);
+Begin
+   fOnCommandGET:=Value;
+   AddBasicEvent('GET',Value);
+End;
+
+Procedure TDXHTTPServerCore.SetOnCommandPOST(value:HTTPTBasicEvent);
+Begin
+   fOnCommandPOST:=Value;
+   AddBasicEvent('POST',Value);
+End;
+
+Procedure TDXHTTPServerCore.SetOnCommandHEAD(value:HTTPTBasicEvent);
+Begin
+   fOnCommandHEAD:=Value;
+   AddBasicEvent('HEAD',Value);
+End;
+
+Procedure TDXHTTPServerCore.SetOnCommandCHECKOUT(value:HTTPTBasicEvent);
+Begin
+   fOnCommandCHECKOUT:=Value;
+   AddBasicEvent('CHECKOUT',Value);
+End;
+
+Procedure TDXHTTPServerCore.SetOnCommandSHOWMETHOD(value:HTTPTBasicEvent);
+Begin
+   fOnCommandSHOWMETHOD:=Value;
+   AddBasicEvent('SHOWMETHOD',Value);
+End;
+
+Procedure TDXHTTPServerCore.SetOnCommandPUT(value:HTTPTBasicEvent);
+Begin
+   fOnCommandPUT:=Value;
+   AddBasicEvent('PUT',Value);
+End;
+
+Procedure TDXHTTPServerCore.SetOnCommandDELETE(value:HTTPTBasicEvent);
+Begin
+   fOnCommandDELETE:=Value;
+   AddBasicEvent('DELETE',Value);
+End;
+
+Procedure TDXHTTPServerCore.SetOnCommandLINK(value:HTTPTBasicEvent);
+Begin
+   fOnCommandLINK:=Value;
+   AddBasicEvent('LINK',Value);
+End;
+
+Procedure TDXHTTPServerCore.SetOnCommandUNLINK(value:HTTPTBasicEvent);
+Begin
+   fOnCommandUNLINK:=Value;
+   AddBasicEvent('UNLINK',Value);
+End;
+
+Procedure TDXHTTPServerCore.SetOnCommandCHECKIN(value:HTTPTBasicEvent);
+Begin
+   fOnCommandCHECKIN:=Value;
+   AddBasicEvent('CHECKIN',Value);
+End;
+
+Procedure TDXHTTPServerCore.SetOnCommandTEXTSEARCH(value:HTTPTBasicEvent);
+Begin
+   fOnCommandTEXTSEARCH:=Value;
+   AddBasicEvent('TEXTSEARCH',Value);
+End;
+
+Procedure TDXHTTPServerCore.SetOnCommandSPACEJUMP(value:HTTPTBasicEvent);
+Begin
+   fOnCommandSPACEJUMP:=Value;
+   AddBasicEvent('SPACEJUMP',Value);
+End;
+
+Procedure TDXHTTPServerCore.SetOnCommandSEARCH(value:HTTPTBasicEvent);
+Begin
+   fOnCommandSEARCH:=Value;
+   AddBasicEvent('SEARCH',Value);
+End;
+
+Procedure TDXHTTPServerCore.SetOnCommandOPTIONS(value:HTTPTBasicEvent);
+Begin
+   fOnCommandOPTIONS:=Value;
+   AddBasicEvent('OPTIONS',Value);
+End;
+
+Procedure TDXHTTPServerCore.SetOnCommandTRACE(value:HTTPTBasicEvent);
+Begin
+   fOnCommandTRACE:=Value;
+   AddBasicEvent('TRACE',Value);
+End;
+
+Procedure TDXHTTPServerCore.SetOnCommandCONNECT(value:HTTPTBasicEvent);
+Begin
+   fOnCommandCONNECT:=Value;
+   AddBasicEvent('CONNECT',Value);
+End;
+
+Procedure TDXHTTPServerCore.SetOnCommandPATCH(value:HTTPTBasicEvent);
+Begin
+   fOnCommandPATCH:=Value;
+   AddBasicEvent('PATCH',Value);
+End;
+
+///////////////////////////////////////////////////////////////////////////////
+//PROCESSSESSION:
+//               If you want this CORE to process the parsing, you should call
+//               this from your "OnNewConnect" implementation. This should be
+//               right after your call to SayHello (optional).
+///////////////////////////////////////////////////////////////////////////////
+procedure TDXHTTPServerCore.ProcessSession(ClientThread:TDXClientThread);
+var
+  S,WS:Ansistring;
+  HeaderInfo:PHeaderInfo;
+  Loop:Integer;
+  WasHandled:Boolean;
+  OutData:Pointer;
+  WantKeepAlive:Boolean;
+  //SmartTimeout:Integer; // 3.0a
+  ManualTimeout:Cardinal;
+
+  procedure NotHandled;
+  begin
+     ClientThread.Socket.Write(
+        AnsiString('HTTP/1.0 ')+HeaderText(400)+AnsiString(#13#10+#13#10+
+        '<html><head><title>Error</title>'+
+        '<body><h1>Error</h1><hr><h3>Unsupported Method <B>"')+
+        HeaderInfo^.Method+AnsiString('"</B></h3></body></head></html>'));
+  end;
+
+  Procedure BuildHeader(ClientHeader:AnsiString);
+  var
+     line,token1,token2:AnsiString;
+     Error:Integer;
+     Ch:AnsiChar;
+
+   Procedure AddToUnknown; // 7-27
+   Begin
+      If HeaderInfo^.Unknown='' then HeaderInfo^.Unknown:=token1+AnsiString(': ')+line
+      Else HeaderInfo^.Unknown:=HeaderInfo^.Unknown+AnsiString(#13#10)+token1+AnsiString(': ')+line;
+   End;
+
+  Begin
+     line:=ClientHeader;
+     With HeaderInfo^ do Begin
+        If RAW='' then Begin
+           RAW:=Line;
+           Method:=Uppercase(FetchByChar(line,#32,False));
+           URI:=(EscapeDecode(FetchByChar(line,#32,False)));
+           If Pos(AnsiChar('?'),URI)>0 then Begin
+              QueryString:=Copy(URI,Pos(AnsiChar('?'),URI)+1,Length(URI));
+              Delete(URI,Pos(AnsiChar('?'),URI),Length(URI));
+           End;
+           Protocol:=FetchByChar(line,#32,False);
+        End
+        Else Begin
+           ALL_RAW:=ALL_RAW+Line+AnsiString(#13#10);
+           token1:=Uppercase(FetchByChar(line,#32,False));
+           token2:=StringReplace(token1,AnsiChar('-'),AnsiChar('_'),[rfReplaceAll]);
+           ALL_HTTP:=ALL_HTTP+AnsiString('HTTP_')+Token2+Line+AnsiString(#13#10);
+           Ch:=Token1[1];
+           Case Ch of // 2.0
+              'A':if token1='ACCEPT:' then Accept:=Accept+Line
+                else if token1='ACCEPT-CHARSET:' then AcceptCharset:=Line
+                else if token1='ACCEPT-ENCODING:' then AcceptEncoding:=Line
+                else if token1='ACCEPT-LANGUAGE:' then AcceptLanguage:=Line
+                else if token1='ALLOW:' then Allow:=Line
+                else if token1='AUTHORIZATION:' then begin
+                   AuthType:=FetchByChar(line,#32,False); // Usually is "Basic"
+                   token2:=FetchByChar(line,#32,False);
+                   token2:=Base64ToString(token2); // Decode the "Basic" encoded AnsiString
+                   AuthName:=FetchByChar(token2,':',False);
+                   AuthPass:=FetchByChar(token2,';',False); // should actually be leftovers
+                end
+                Else AddToUnknown;
+              'C':if token1='CACHE-CONTROL:' then CacheControl:=Line
+                else if token1='CONNECTION:' then Connection:=Line
+                else if token1='CACHE-INFO:' then CacheInfo:=Line
+                else if token1='CONTENT-LENGTH:' then Begin
+                   Val({$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(FetchByChar(line,#32,False)),ContentLength,Error);
+                end
+                else if token1='CONTENT-TYPE:' then ContentType:=Line
+                else if token1='COOKIE:' then Cookie:=Line
+                Else AddToUnknown;
+              'D':if token1='DATE:' then Date:=Line
+                Else AddToUnknown;
+              'F':if token1='FROM:' then From:=Line
+                Else if token1='FORWARDED:' then Forwarded:=Line
+                Else if token1='FORWARDED-FOR:' then ForwardedFor:=Line
+                Else AddToUnknown;
+              'H':if token1='HOST:' then Host:=Line
+                Else AddToUnknown;
+              'I':if token1='IF-MODIFIED-SINCE:' then IfModSince:=Line
+                else if token1='IF-MATCH:' then IfMatch:=Line
+                else if token1='IF-NONE-MATCH:' then IfNoneMatch:=Line
+                else if token1='IF-RANGE:' then IfRange:=Line
+                else if token1='IF-UNMODIFIED-SINCE:' then IfUnModSince:=Line
+                Else AddToUnknown;
+              'K':if token1='KEEP-ALIVE:' then KeepAlive:=Line
+                Else AddToUnknown;
+              'M':if token1='MAX-FORWARDS:' then MaxForwards:=Line
+                Else AddToUnknown;
+              'P':if token1='PUBLIC:' then PublicCache:=Line
+                else if token1='PRAGMA:' then Pragma:=Line
+                else if token1='PROXY-CONNECTION:' then ProxyConnection:=Line
+                else if token1='PROXY-AUTHORIZATION:' then ProxyAuthorization:=Line
+                Else AddToUnknown;
+              'R':if token1='REFERER:' then Referer:=Line
+                else if token1='RANGE:' then Range:=Line
+                Else AddToUnknown;
+              'T':if token1='TRANSFER-ENCODING:' then TransferEncoding:=Line
+                Else AddToUnknown;
+              'U':if token1='UPGRADE:' then Upgrade:=Line
+                else if token1='USER-AGENT:' then
+                UserAgent:=Trim(Line)
+                Else AddToUnknown;
+              'V':if token1='VIA:' then Via:=Line
+                Else AddToUnknown;
+              'W':if token1='WEFERER:' then Weferer:=Line
+                Else if token1='WSER-AGENT:' then WserAgent:=Line
+                Else AddToUnknown;
+              Else AddToUnknown;
+           End;
+        End;
+     end;
+  End;
+
+  Procedure ManuallyGetHost;
+  Begin
+     With HeaderInfo^ do Begin
+        If Pos(AnsiString('//'),URI)>0 then Begin
+           Host:=Copy(URI,1,Pos(AnsiString('//'),URI)+1);
+           Delete(URI,1,Length(Host));
+        End;
+        If URI<>'/' then Begin
+           Host:=Host+Copy(URI,1,Pos(AnsiChar('/'),URI));
+           Delete(URI,1,Pos(AnsiChar('/'),URI));
+        End;
+     End;
+  End;
+
+begin
+   New(HeaderInfo); // 2.4 moved before repeat
+   repeat
+{      FillChar(HeaderInfo^,Sizeof(HeaderInfo^),#0);
+      HeaderInfo^.ClientAddr:=ClientThread.Socket.PeerIPAddress;
+      HeaderInfo^.ClientHost:=HeaderInfo^.ClientAddr;
+      HeaderInfo^.ContentLength:=0;}
+// this is faster than above code
+   With HeaderInfo^ do Begin
+      ClientAddr:=ClientThread.Socket.PeerIPAddress;
+      ClientHost:=HeaderInfo^.ClientAddr;
+      ContentLength:=0;
+      Raw:='';
+      Protocol:='';
+      Method:='';
+      URI:='';
+      PhysPath:='';
+      Allow:='';
+      AuthType:='';
+      AuthName:='';
+      AuthPass:='';
+      Date:='';
+      Pragma:='';
+      CacheControl:='';
+      Connection:='';
+      TransferEncoding:='';
+      Upgrade:='';
+      Via:='';
+      Host:='';
+      From:='';
+      IfMatch:='';
+      IfNoneMatch:='';
+      IfRange:='';
+      IfRange:='';
+      IfUnModSince:='';
+      MaxForwards:='';
+      ProxyAuthorization:='';
+      KeepAlive:='';
+      PublicCache:='';
+      Range:='';
+      Referer:='';
+      UserAgent:='';
+      ContentType:='';
+      Accept:='';
+      AcceptCharset:='';
+      AcceptEncoding:='';
+      AcceptLanguage:='';
+      Cookie:='';
+      ClientName:='';
+      QueryString:='';
+      HostRootPath:='';
+      Weferer:='';
+      WserAgent:='';
+      CacheInfo:='';
+      ProxyConnection:='';
+      Forwarded:='';
+      ForwardedFor:='';
+      All_HTTP:='';
+      All_RAW:='';
+      PostData:='';
+      Unknown:='';
+   End;
+   with ClientThread.Socket do begin
+{$IFDEF DXSOCK2}
+      S:='*';
+      SmartTimeout:=fiTimeout;
+      While (S<>'') do Begin
+         S:=Readln(SmartTimeout);
+         SmartTimeout:=500;
+         If LastReadTimeout or Not Connected then Begin
+{$IFDEF CODE_TRACER}
+            If Assigned(ClientThread.DXCodeTracer) then Begin
+               ClientThread.DXCodeTracer.SendMessage(dxctDebug,'TDXServerCore.ProcessSession - Header timeout - aborting.');
+            End;
+{$ENDIF}
+            Dispose(Headerinfo);
+            Exit;
+         End;
+         If S<>'' then Begin
+            If Assigned(OnFilter) then Begin
+               Loop:=FilterRead(@S[1],OutData,Length(S),ClientThread);
+               SetLength(S,Loop);
+               If Assigned(Outdata) then Begin
+                  Move(TDXBSArray(OutData^),S[1],Loop);
+                  OnFilter(ddFreePointer,Nil,OutData,Loop,Loop,WasHandled,ClientThread);
+               End;
+            End;
+            //SF_NOTIFY_READ_RAW_DATA
+            if assigned(fDXISAPI) and (fDXISAPI.FilterCount>0) then
+               fDXISAPI.ServerRawRead(S,Length(S));
+            BuildHeader(S);
+         End
+         Else If (S='') and (HeaderInfo^.Method='') then S:='*'; //2.3 Keep-Alive
+      End;
+{$ELSE}
+//      ShowMessageWindow('','Starting Read!');
+      If Not fSupportKeepAlive then Begin
+         S:='';
+         While (Pos(AnsiString(#13#10#13#10),S)=0) and
+            (Length(S)<8192) do Begin
+            S:=S+ReadStr(-1);
+            if ((LastCommandStatus<>0) and (LastCommandStatus<>WSAETIMEDOUT))
+               Or (Not Connected)
+               then Begin
+{$IFDEF CODE_TRACER}
+               If Assigned(ClientThread.DXCodeTracer) then Begin
+                  ClientThread.DXCodeTracer.SendMessage(dxctDebug,'TDXServerCore.ProcessSession - Header timeout - aborting.');
+               End;
+{$ENDIF}
+               Dispose(Headerinfo);
+               Exit;
+            End;
+         End;
+      End
+      Else Begin
+         ManualTimeout:=TimeCounter+fiTimeout;
+         S:='';
+         While (Pos(AnsiString(#13#10#13#10),S)=0) and
+            (Length(S)<8192) and
+            (ManualTimeout>TimeCounter) do Begin
+            S:=S+ReadStr(-1);
+            if ((LastCommandStatus<>0) and (LastCommandStatus<>WSAETIMEDOUT))
+               Or (Not Connected)
+               then Begin
+{$IFDEF CODE_TRACER}
+               If Assigned(ClientThread.DXCodeTracer) then Begin
+                  ClientThread.DXCodeTracer.SendMessage(dxctDebug,'TDXServerCore.ProcessSession - Header timeout - aborting.');
+               End;
+{$ENDIF}
+               Dispose(Headerinfo);
+               Exit;
+            End;
+         End;
+      End;
+      If LastReadTimeout or Not Connected then Begin
+{$IFDEF CODE_TRACER}
+         If Assigned(ClientThread.DXCodeTracer) then Begin
+            ClientThread.DXCodeTracer.SendMessage(dxctDebug,'TDXServerCore.ProcessSession - Header timeout - aborting.');
+         End;
+{$ENDIF}
+         Dispose(Headerinfo);
+         Exit;
+      End;
+      While Length(S)>0 do Begin
+         Ws:=Copy(S,1,Pos(AnsiString(#13#10),S)-1);
+         If Assigned(OnFilter) then Begin
+            Loop:=FilterRead(@WS[1],OutData,Length(WS),ClientThread);
+            SetLength(WS,Loop);
+            If Assigned(Outdata) then Begin
+               Move(TDXBSArray(OutData^),WS[1],Loop);
+               OnFilter(ddFreePointer,Nil,OutData,Loop,Loop,WasHandled,ClientThread);
+            End;
+         End;
+         //SF_NOTIFY_READ_RAW_DATA
+         if assigned(fDXISAPI) and (fDXISAPI.FilterCount>0) then
+            fDXISAPI.ServerRawRead(WS,Length(WS));
+         BuildHeader(Ws);
+         Delete(S,1,Length(Ws)+2);
+         If Copy(S,1,2)=#13#10 then Begin //end of header
+            HeaderInfo^.PostData:=Copy(S,3,Length(S));
+            S:='';
+         End;
+      End;
+{$ENDIF}
+//      ShowMessageWindow('','Finished Read!'+#13#10+HeaderInfo^.All_RAW);
+      If HeaderInfo^.Host='' then ManuallyGetHost;
+      Delete(HeaderInfo^.ALL_HTTP,Length(HeaderInfo^.ALL_HTTP)-1,2);
+      HeaderInfo^.ALL_HTTP:=HeaderInfo^.ALL_HTTP+AnsiChar(#0);
+      //SF_NOTIFY_PREPROC_HEADERS
+      if assigned(fDXISAPI) and (fDXISAPI.FilterCount>0) then
+         fDXISAPI.ServerPreprocHeaderEvent(HeaderInfo);
+      Loop:=0;
+      WasHandled:=False;
+      WantKeepAlive:=fSupportKeepAlive;
+      While (Loop<fEventArray.Count) and (Not WasHandled) do Begin
+         If PHTTPBasicEvent(fEventArray[Loop])^.Command=HeaderInfo^.Method then Begin
+            Case PHTTPBasicEvent(fEventArray[Loop]).Tag of
+               1:if Assigned(PHTTPBasicEvent(fEventArray[Loop]).EventProcedure) then
+                    HTTPTBasicEvent(PHTTPBasicEvent(fEventArray[Loop]).EventProcedure)(ClientThread,HeaderInfo,WantKeepAlive);
+            End;
+            WasHandled:=True;
+         End
+         Else Inc(Loop);
+      End;
+      If Not WasHandled then Begin
+         if assigned(OnCommandOther) then
+            OnCommandOther(ClientThread,HeaderInfo,WasHandled);
+         if not WasHandled then NotHandled;
+         WantKeepAlive:=False;
+      end;
+   end;
+   //SF_NOTIFY_END_OF_REQUEST
+   if assigned(fDXISAPI) and (fDXISAPI.FilterCount>0) then
+      fDXISAPI.ServerEndOfRequest;
+   If Not fSupportKeepAlive then WantKeepAlive:=False;
+   If WantKeepAlive then ProcessWindowsMessageQueue; // 9/11/2002
+{$IFDEF CODE_TRACER}
+   If Assigned(ClientThread.DXCodeTracer) then Begin
+      If WantKeepAlive then
+         ClientThread.DXCodeTracer.SendMessage(dxctDebug,'TDXServerCore.ProcessSession - looping for keepalive.');
+   End;
+{$ENDIF}
+   Until (Not WantKeepAlive) or (Not ClientThread.Socket.Connected);
+   Dispose(HeaderInfo); //2.4
+   //SF_NOTIFY_END_OF_NET_SESSION
+   if assigned(fDXISAPI) and (fDXISAPI.FilterCount>0) then
+     fDXISAPI.ServerEndSession;
+end;
+
+//2.0.12
+Function TDXHTTPServerCore.HeaderText(StatusCode:Integer):AnsiString;
+Var
+   Loop:Integer;
+
+Begin
+   If StatusCode>404 then Begin // divide and conquor
+      Loop:=MaxStatusCodes;
+      While StatusCodes[Loop].Code>StatusCode do Dec(Loop);
+   End
+   Else begin
+      Loop:=0;
+      While StatusCodes[Loop].Code<StatusCode do Inc(Loop);
+   End;
+   If StatusCodes[Loop].Code=StatusCode then
+      Result:=Ansi_IntToStr(StatusCode)+AnsiChar(#32)+StatusCodes[Loop].Msg
+   Else
+      Result:=AnsiString('500 Internal Server Error');
+End;
+
+Procedure TDXHTTPServerCore.Start;
+Begin
+   if assigned(fDXISAPI) and (fDXISAPI.FilterCount>0) then
+     fDXISAPI.ServerStartEvent;
+   inherited Start;
+End;
+
+Procedure TDXHTTPServerCore.Stop;
+Begin
+   if assigned(fDXISAPI) and (fDXISAPI.FilterCount>0) then Begin
+     fDXISAPI.ServerStopEvent;
+   End;
+   inherited Stop;
+End;
+
+end.
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXISAPI.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXISAPI.pas
new file mode 100644
index 0000000..05ac4f2
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXISAPI.pas	
@@ -0,0 +1,1640 @@
+unit uRODXISAPI;
+
+///////////////////////////////////////////////////////////////////////////////
+//    Component: TDXISAPI
+//       Author: G.E. Ozz Nixon Jr. (onixon@dxsock.com)
+// ========================================================================
+// Source Owner: DX, Inc. 1995-2002
+//    Copyright: All code is the property of DX, Inc. Licensed for
+//               resell by Brain Patchwork DX (tm) and part of the
+//               DX (r) product lines, which are (c) 1999-2002
+//               DX, Inc. Source may not be distributed without
+//               written permission from both Brain Patchwork DX,
+//               and DX, Inc.
+//      License: (Reminder), None of this code can be added to other
+//               developer products without permission. This includes
+//               but not limited to DCU's, DCP's, DLL's, OCX's, or
+//               any other form of merging our technologies. All of
+//               your products released to a public consumer be it
+//               shareware, freeware, commercial, etc. must contain a
+//               license notification somewhere visible in the
+//               application.
+//               Example is Internet Explorer - Help->About screen
+//               shows the licensed code contained in the application.
+// Code Version: (3rd Generation Code)
+// ========================================================================
+//  Description:
+// ========================================================================
+// IMPLEMENTATION OF ISAPI 4.0 SPECIFICATIONS (FEBRUARY 2002)
+// Create one instance of the TDXIAPI component in your application. To use:
+// TDXISAPI.RegisterDLL(Path+Filename) - Registers the DLL with our DLLManager!
+// TDXISAPI.Execute(TDXClientThread;Path+Filename) - Executes the DLL
+// TDXISAPI.UnregisterDLL(Path+Filename) - removes from our DLLManager.
+//
+// You must specify the following events!
+// TDXISAPI.GetServerVariable(Session:TDXClientThread;Variable:AnsiString;Var Results:AnsiString);
+//
+// All other ISAPI callbacks are actually handled internal to this component.
+//
+// To achieve HIGH-SPEED, register all known DLL's at the startup of your
+// application, and then on termination unregister all of these DLL's. Then
+// all you have to do is execute the DLL as needed.
+//
+// MSDN:
+// Important - It is vital that the work performed by ISAPI filters is minimized,
+// because the effects on scalability and performance is potentially quite severe.
+// For example, if your ISAPI filter implemented your own custom encryption scheme,
+// the encryption and decryption would need to take place within your ISAPI filter
+// code, but the reading and writing of the data should be handled by IIS.
+///////////////////////////////////////////////////////////////////////////////
+
+interface
+{$I uRODXSock.def}
+
+{.$DEFINE USE_DLL_MGR}
+{$IFDEF MSWINDOWS}
+{$DEFINE SUPPORT_COM}
+{$ENDIF}
+
+Uses
+{$IFDEF MSWINDOWS}
+  Windows,
+{$ENDIF}
+{$IFDEF SUPPORT_COM}
+  ActiveX,
+{$ENDIF}
+  Classes,
+  uRODXString,
+  uRODXServerCore,
+{$IFDEF USE_DLL_MGR}
+  DXDLLManager,
+{$ENDIF}
+  uRODXSecurity,
+  uRODXISAPIFilter,
+  uRODXHTTPHeaderTools;
+
+Type
+{$IFDEF FPC}
+   HCONN = TThreadID;
+{$ELSE}
+   HCONN=THandle;
+{$ENDIF}
+{$IFDEF VER100}
+   Longword=Cardinal;
+{$ENDIF}
+{$IFNDEF MSWINDOWS}
+   LPDWord=^Longword;
+   LPCSTR=PAnsiChar;
+{$ENDIF}
+
+Const
+   HSE_LOG_BUFFER_LEN=80;
+   HSE_MAX_EXT_DLL_NAME_LEN=256;
+
+type
+  TGetServerVariableProc = function ( hConn: HCONN;
+                                      VariableName: PAnsiChar;
+                                      Buffer: Pointer;
+                                      Size:LPDWord): BOOLEAN; stdcall;
+
+  TWriteClientProc = function ( ConnID: HCONN;
+                                Buffer: Pointer;
+                                var Bytes: Longword;
+                                dwReserved: Longword ): BOOLEAN; stdcall;
+
+  TReadClientProc = function ( ConnID: HCONN;
+                               Buffer: Pointer;
+                               var Size: Longword ): BOOLEAN; stdcall;
+
+  TServerSupportFunctionProc = function ( hConn: HCONN;
+                                          HSERRequest: Longword;
+                                          Buffer: Pointer;
+                                          Size:Pointer{LPDWord};
+                                          DataType: Pointer{LPDWord} ): BOOLEAN; stdcall;
+
+//
+// passed to extension procedure on a new request
+//
+type
+
+  PEXTENSION_CONTROL_BLOCK = ^TEXTENSION_CONTROL_BLOCK;
+  TEXTENSION_CONTROL_BLOCK = packed record
+    cbSize: Longword;                    // size of this struct.
+    dwVersion: Longword;                 // version info of this spec
+    ConnID: HCONN;                    // Context number not to be modified!
+    dwHttpStatusCode: Longword;          // HTTP Status code
+                     // null terminated log info specific to this Extension DLL
+    lpszLogData: array [0..HSE_LOG_BUFFER_LEN-1] of AnsiChar;
+    lpszMethod: PAnsiChar;                // REQUEST_METHOD
+    lpszQueryString: PAnsiChar;           // QUERY_STRING
+    lpszPathInfo: PAnsiChar;              // PATH_INFO
+    lpszPathTranslated: PAnsiChar;        // PATH_TRANSLATED
+    cbTotalBytes: Longword;              // Total bytes indicated from client
+    cbAvailable: Longword;               // Available number of bytes
+    lpbData: Pointer;                 // pointer to cbAvailable bytes
+    lpszContentType: PAnsiChar;           // Content type of client data
+
+    GetServerVariable: TGetServerVariableProc;
+    WriteClient: TWriteClientProc;
+    ReadClient: TReadClientProc;
+    ServerSupportFunction: TServerSupportFunctionProc;
+  end;
+  PHSE_VERSION_INFO = ^HSE_VERSION_INFO;
+  HSE_VERSION_INFO = packed record
+    dwExtensionVersion: Longword;
+    lpszExtensionDesc: array [0..HSE_MAX_EXT_DLL_NAME_LEN-1] of AnsiChar;
+  end;
+  THSE_VERSION_INFO = HSE_VERSION_INFO;
+  LPHSE_VERSION_INFO = PHSE_VERSION_INFO;
+
+Type
+   TDX_GetServerVariable=procedure(ClientThread:TDXClientThread;Variable:AnsiString;Var Results:AnsiString) of object;
+   TDX_RedirectHeader=Procedure(ClientThread:TDXClientThread;Location:AnsiString;Var Header:AnsiString) of object;
+   TDX_BuildHeader=Procedure(dwHttpStatusCode:Integer;var Results:AnsiString) of object;
+
+   //Extension Function
+   TGetExtensionVersion = function (var Ver: THSE_VERSION_INFO): BOOLEAN; stdcall;
+   THttpExtensionProc = function (var ECB: TEXTENSION_CONTROL_BLOCK): Longword; stdcall;
+   TTerminateExtension = function (dwFlags: Longword): BOOLEAN; stdcall;
+
+   TNotificationFiltersProc = Procedure (Notify:Longword; Buf1:Pointer;
+                        sizeBuf1:Longword; Buf2:Pointer; sizeBuf2:Longword);
+
+   TDX_FilterGetServerVariable = function (var pfc: THTTP_FILTER_CONTEXT;
+    VariableName: PAnsiChar; Buffer: Pointer; var Size: Longword ): BOOLEAN of Object;
+
+///////////////////////////////////////////////////////////////////////////////
+// MSDN:
+// This structure is used to send certificate information to the
+// ISAPI extension when the HSE_REQ_GET_CERT_INFO_EX value is set for the
+// dwHSERRequest parameter of the ServerSupportFunction.
+///////////////////////////////////////////////////////////////////////////////
+
+
+type
+  TDXISAPI = class(TDXComponent)
+  private
+    fGetServerVariable:TDX_GetServerVariable;
+    fRedirectHeader:TDX_RedirectHeader;
+    fBuildHeader:TDX_BuildHeader;
+    fTimeout:Integer;
+//    fCertificate:TCERT_CONTEXT_EX;
+  protected
+    Procedure RegisterFilters(var ResultLog:AnsiString);
+    Procedure UnRegisterFilters(var ResultLog:AnsiString);
+    Procedure SetServerVariableProc(value:TFilterGetServerVariableProc);
+    Function GetServerVariableProc:TFilterGetServerVariableProc;
+  public
+    //////////////////////////////
+    // Server Event Procedure
+    // Not of use to end-user.
+    //////////////////////////////
+    Procedure ServerStartEvent;
+    Procedure ServerStopEvent;
+    Procedure ServerRawRead(ReadString:AnsiString;Len:Longword);
+    Procedure ServerPreprocHeaderEvent(DXHeaderInfo:PHeaderInfo);
+    Procedure ConvertedURL2Physical(URL:AnsiString;Physical:AnsiString);
+    //////////////////////////////
+    // there are more to be added between converted and end of request in 2.4
+    //////////////////////////////
+    Procedure ServerEndOfRequest;
+    Procedure ServerEndSession;
+
+  public
+    constructor Create(AOwner:TComponent); {$IFNDEF OBJECTS_ONLY} override; {$ENDIF}
+    Destructor Destroy; override;
+    Function Execute(Session:TDXClientThread;ISAPI,Method,QueryString,
+                     PathInfo,PathTranslated,POSTContent_Type,POSTData:AnsiString;
+                     POSTDataSize:Integer;Var ResultLog:AnsiString):Boolean;
+
+    Function RegisterDLL(ISAPI:AnsiString):Boolean;
+    Function UnRegisterDLL(ISAPI:AnsiString):Boolean;
+
+    Function AddFilter(ISAPI:AnsiString):Boolean;
+    Function RemoveFilter(ISAPI:AnsiString):Boolean;
+    Function FilterCount:Integer;
+
+  published
+    Property GetVariable:TDX_GetServerVariable read fGetServerVariable
+                                               write fGetServerVariable;
+    Property GetVariableFilter:TFilterGetServerVariableProc read GetServerVariableProc
+                                               write SetServerVariableProc;
+    Property NeedHeaderForRedirect:TDX_RedirectHeader read fRedirectHeader
+                                               write fRedirectHeader;
+    Property NeedHeader:TDX_BuildHeader read fBuildHeader
+                                        write fBuildHeader;
+    Property ReadSocketTimeout:Integer read fTimeout
+                                       write fTimeout;
+  end;
+
+Implementation
+
+Uses
+{$IFNDEF MSWINDOWS}
+   {$IFDEF FPC}dynlibs,{$ENDIF}
+//   Libc,
+{$ENDIF}
+
+   SysUtils(*{, {StrPCopy}
+   uRODXHTTPServerCore*)
+   {$IFDEF DELPHI2009UP},AnsiStrings{$ENDIF};
+
+Const
+{from Microsoft's .h files for ISAPI!}
+   HSE_VERSION_MAJOR=5;
+   HSE_VERSION_MINOR=1;
+   HSE_VERSION=$0501;
+   HSE_REQ_END_RESERVED=1000;
+///////////////////////////////////////////////////////////////////////////////
+// MSDN:
+// The extension has finished processing and the server should disconnect the
+// client and free up allocated resources.
+///////////////////////////////////////////////////////////////////////////////
+   HSE_STATUS_SUCCESS=1;
+///////////////////////////////////////////////////////////////////////////////
+// MSDN:
+// The extension has finished processing and the server should wait for the next
+// HTTP request if the client supports Keep-Alive connections. The extension
+// can return this only if it was able to send the correct Content-Length header
+// to the client.
+///////////////////////////////////////////////////////////////////////////////
+   HSE_STATUS_SUCCESS_AND_KEEP_CONN=2;
+///////////////////////////////////////////////////////////////////////////////
+// MSDN:
+// The extension has queued the request for processing and will notify the
+// server when it has finished. See HSE_REQ_DONE_WITH_SESSION under
+// ServerSupportFunction.
+///////////////////////////////////////////////////////////////////////////////
+   HSE_STATUS_PENDING=3;
+///////////////////////////////////////////////////////////////////////////////
+// MSDN:
+// The extension has encountered an error while processing the request, so the
+// server can disconnect the client and free up allocated resources. An HTTP
+// status code of 500 is written to the IIS log for the request.
+///////////////////////////////////////////////////////////////////////////////
+   HSE_STATUS_ERROR=4;
+// The following are the values to request services with the
+//   ServerSupportFunction().
+//  Values from 0 to 1000 are reserved for future versions of the interface
+   HSE_REQ_BASE=0;
+///////////////////////////////////////////////////////////////////////////////
+// MSDN:
+// This support function allows your ISAPI extension to redirect a client
+// browser to a different URL from the one they initially requested. When this
+// support function is called, you must provide the new URL. IIS then sends the
+// HTTP status code 302 (URL Redirect) to the client browser.
+///////////////////////////////////////////////////////////////////////////////
+   HSE_REQ_SEND_URL_REDIRECT_RESP=( HSE_REQ_BASE + 1 ); // ISAPI 2.0/3.0
+   HSE_REQ_SEND_URL=( HSE_REQ_BASE + 2 ); // ISAPI 2.0/3.0
+///////////////////////////////////////////////////////////////////////////////
+// MSDN:
+// This support function allows you to request that IIS send a complete HTTP
+// response header to the client browser, including the HTTP status, server
+// version, message time, and MIME version. Your extension can also, optionally,
+// append other header information to the end of IIS-generated header, such as
+// Content-Type or Content-Length.
+///////////////////////////////////////////////////////////////////////////////
+   HSE_REQ_SEND_RESPONSE_HEADER=( HSE_REQ_BASE + 3 ); // ISAPI 2.0/3.0 // depreciated
+   HSE_REQ_SEND_RESPONSE_HEADER_EX=(HSE_REQ_END_RESERVED+16); // ISAPI 2.0/3.0
+///////////////////////////////////////////////////////////////////////////////
+// MSDN:
+// If your extension is performing some form of extended processing, and its
+// HttpExtensionProc entry-point function has returned the status code
+// HSE_STATUS_PENDING, then your extension should notify IIS when all
+// processing is complete by using this support function. Calling this function
+// will terminate the session connection.
+///////////////////////////////////////////////////////////////////////////////
+   HSE_REQ_DONE_WITH_SESSION=( HSE_REQ_BASE + 4 ); // ISAPI 2.0/3.0
+
+//  These are Microsoft specific extensions
+
+///////////////////////////////////////////////////////////////////////////////
+// MSDN:
+// This support function allows your ISAPI extension to map a logical URL path
+// to a physical path.
+///////////////////////////////////////////////////////////////////////////////
+   HSE_REQ_MAP_URL_TO_PATH=(HSE_REQ_END_RESERVED+1); // ISAPI 2.0/3.0
+   HSE_REQ_MAP_URL_TO_PATH_EX=(HSE_REQ_END_RESERVED+12); // ISAPI 4.0
+///////////////////////////////////////////////////////////////////////////////
+// MSDN:
+// This support function allows your ISAPI extension to retrieve context and
+// credential handles to the CtxtHandle and CredHandle structures, as defined
+// in the header file sspi.h. Once these handles are retrieved, they can be
+// used to query or manipulate the server certificate information by using the
+// standard certificate APIs that are also defined in sspi.h.
+///////////////////////////////////////////////////////////////////////////////
+   HSE_REQ_GET_SSPI_INFO=(HSE_REQ_END_RESERVED+2); // ISAPI 2.0/3.0
+///////////////////////////////////////////////////////////////////////////////
+// MSDN:
+// You can use this support function to write your own custom log strings to
+// the log record. When this function is called, the string contained in the
+// buffer you specify is appended to the log record for the current HTTP
+// request.
+///////////////////////////////////////////////////////////////////////////////
+   HSE_APPEND_LOG_PARAMETER=(HSE_REQ_END_RESERVED+3); // ISAPI 2.0/3.0
+///////////////////////////////////////////////////////////////////////////////
+// MSDN:
+// Using this support function, you can set a special callback function that
+// will be used for handling asynchronous I/O operations.
+///////////////////////////////////////////////////////////////////////////////
+   HSE_REQ_IO_COMPLETION=(HSE_REQ_END_RESERVED+5); // ISAPI 2.0/3.0
+///////////////////////////////////////////////////////////////////////////////
+// MSDN:
+// This support function enables your ISAPI extension to call the
+// high-performance Win32® API TransmitFile function to send a file to the
+// client browser. This function accepts as a parameter a pointer to a
+// structure, HSE_TF_INFO, so that you can specify the file handle of the file
+// to be sent, HTTP headers for the response, and other important information.
+//
+// TransmitFile is carried out asynchronously, so your extension must specify a
+// special callback function so IIS can notify your extension when the
+// asynchronous write operation has completed. You can do this either by using
+// the pfnHseIO member of the HSE_TF_INFO used in the function call, or by using
+// the support function HSE_REQ_IO_COMPLETION.
+///////////////////////////////////////////////////////////////////////////////
+   HSE_REQ_TRANSMIT_FILE=(HSE_REQ_END_RESERVED+6); // ISAPI 2.0/3.0
+///////////////////////////////////////////////////////////////////////////////
+// MSDN:
+// This support function forces IIS to reprocess the discretionary access
+// control list (DACL) for an ISAPI extension's DLL. Given sufficient security
+// permissions, this support function can be used to reprocess another
+// extension's DACL, as well.
+///////////////////////////////////////////////////////////////////////////////
+   HSE_REQ_REFRESH_ISAPI_ACL=(HSE_REQ_END_RESERVED+7); // ISAPI 2.0/3.0
+///////////////////////////////////////////////////////////////////////////////
+// MSDN:
+// This support function can be used to determine the Keep-Alive status of the
+// current connection.
+///////////////////////////////////////////////////////////////////////////////
+   HSE_REQ_IS_KEEP_CONN=(HSE_REQ_END_RESERVED+8);
+///////////////////////////////////////////////////////////////////////////////
+// MSDN:
+// Using this support function, your ISAPI extension can request that IIS
+// attempt to read from the client asynchronously. In order for this function
+// to work properly, however, you must have specified a special callback
+// function, which IIS will call when the asynchronous read has completed. This
+// callback function can be set using the ServerSupportFunction request
+// HSE_REQ_IO_COMPLETION.
+///////////////////////////////////////////////////////////////////////////////
+   HSE_REQ_ASYNC_READ_CLIENT=(HSE_REQ_END_RESERVED+10);
+///////////////////////////////////////////////////////////////////////////////
+// MSDN:
+// This support function allows you to retrieve a handle to the impersonation
+// token that the request is using. An impersonation token represents a user
+// context.
+///////////////////////////////////////////////////////////////////////////////
+   HSE_REQ_GET_IMPERSONATION_TOKEN=(HSE_REQ_END_RESERVED+11); // ISAPI 4.0
+///////////////////////////////////////////////////////////////////////////////
+// MSDN:
+// This support function can be used to request that, when disconnecting the
+// current connection, IIS will use an abortive shutdown sequence to close the
+// TCP/IP connection socket.
+///////////////////////////////////////////////////////////////////////////////
+   HSE_REQ_ABORTIVE_CLOSE=(HSE_REQ_END_RESERVED+14);
+///////////////////////////////////////////////////////////////////////////////
+// MSDN:
+// This support function specifies the certificate context for the first
+// certificate in the client's certificate chain.
+///////////////////////////////////////////////////////////////////////////////
+   HSE_REQ_GET_CERT_INFO_EX=(HSE_REQ_END_RESERVED+15); // ISAPI 4.0
+///////////////////////////////////////////////////////////////////////////////
+// MSDN:
+// This server support function sends a request to IIS to close the current
+// client socket connection, even if there is an asynchronous read pending.
+///////////////////////////////////////////////////////////////////////////////
+   HSE_REQ_CLOSE_CONNECTION=(HSE_REQ_END_RESERVED+17); // ISAPI 5.0/5.1
+
+   HSE_TERM_MUST_UNLOAD=2;
+
+Type
+   PHSE_SEND_HEADER_EX_INFO=^HSE_SEND_HEADER_EX_INFO;
+   HSE_SEND_HEADER_EX_INFO=Record
+      pszStatus:LPCSTR;   // HTTP status code; for example "200 OK".
+      pszHeader:LPCSTR;  // HTTP header.
+      cchStatus:Longword;   // Number of characters in status code.
+      cchHeader:Longword;   // Number of characters in header.
+      fKeepConn:BOOLEAN;    // Keep client connection alive?
+   End;
+Const
+   MAX_PATH = (256);
+
+Type
+   PCERT_CONTEXT_EX=^TCERT_CONTEXT_EX;
+   TCERT_CONTEXT_EX = packed record
+      CertContext:TCERT_CONTEXT;
+      cbAllocated:Longword;
+      dwCertificateFlags:Longword;
+   End;
+   PHSE_URL_MAPEX_INFO = ^THSE_URL_MAPEX_INFO;
+   THSE_URL_MAPEX_INFO = record
+      lpszPath: array [0..MAX_PATH-1] of AnsiChar; // Physical path mapped to by the URL.
+      dwFlags:Longword;              // Flags associated with this URL path.
+      cchMatchingPath:Longword;    // Number of matching characters in
+      cchMatchingURL:Longword;     // Number of matching characters in URL.
+      dwReserved1:Longword;
+      dwReserved2:Longword;
+   End;
+   PDXThreadRecord=^TDXThreadRecord;
+   TDXThreadRecord=record
+      fAllocMem:TList;
+      fToken:THandle;
+      fDopHeaders:AnsiString;
+      fDopDeniedHeaders:AnsiString;
+      fHeaderInfo:PHeaderInfo;
+      ThreadID:HCONN;
+      Thread:TDXClientThread;
+      fGetServerVariable:TDX_GetServerVariable;
+      fRedirectHeader:TDX_RedirectHeader;
+      fBuildHeader:TDX_BuildHeader;
+      fiTimeout:Integer;
+      ECB:TEXTENSION_CONTROL_BLOCK;
+      mapex:THSE_URL_MAPEX_INFO;
+      fRealPath:AnsiString; // 3.0
+      fISAPIThreadPoolDone:Boolean;
+   end;
+   PDXFilterRecord = ^TDXFilterRecord;
+   TDXFilterRecord = record
+      fName:AnsiString;
+      fVersion:PHTTP_FILTER_VERSION;
+      fNotification:Boolean;
+      fDisableNotification:Longword;
+      fNextReadSize:Longword;
+   End;
+   PDXMemoryBlock= ^TDXMemoryBlock;
+   TDXMemoryBlock = record
+      fPointer:Pointer;
+      fSize:Longword;
+   End;
+
+Var
+   fDXThreadArray:TList;
+   fActiveFilter:PDXFilterRecord;
+   fFilter:TList;
+{$IFDEF USE_DLL_MGR}
+   fDLLManager:TDXDLLManager;
+{$ENDIF}
+   fPreprocHeader:PHeaderInfo;
+   fGetServerVariableFilterProc:TFilterGetServerVariableProc;
+
+constructor TDXISAPI.Create(AOwner:TComponent);
+begin
+   inherited Create(AOwner);
+{$IFDEF USE_DLL_MGR}
+   fDLLManager:=TDXDLLManager.Create(Nil);
+{$ENDIF}
+   fDXThreadArray:=TList.Create;
+   fFilter:=TList.Create;
+   fTimeout:=30000;
+end;
+
+destructor TDXISAPI.Destroy;
+Var
+   DXThreadRecord:PDXThreadRecord;
+   DXMemoryBlock:PDXMemoryBlock;
+
+begin
+   MyCriticalSection.StartingWrite;
+   If Assigned(fDXThreadArray) then Begin
+      MyCriticalSection.StartingWrite;
+      While fDXThreadArray.Count>0 do Begin
+         DXThreadRecord:=fDXThreadArray[0];
+         //Free memory for FilterAllocMem
+         while DXThreadRecord^.fAllocMem.Count>0 do Begin
+            DXMemoryBlock:=DXThreadRecord^.fAllocMem[0];
+            FreeMem(DXMemoryBlock^.fPointer, DXMemoryBlock^.fSize);
+            DXThreadRecord^.fAllocMem.Delete(0);
+         End;
+         Dispose(DXThreadRecord);
+         fDXThreadArray.Delete(0);
+      End;
+      MyCriticalSection.FinishedWrite;
+      fDXThreadArray.Free;
+      fDXThreadArray := Nil;
+   End;
+   MyCriticalSection.FinishedWrite;
+
+{$IFDEF USE_DLL_MGR}
+   If Assigned(fDLLManager) then Begin
+      fDLLManager.Free;
+      fDLLManager := Nil;
+   End;
+{$ENDIF}
+
+   If Assigned(fFilter) then Begin
+      fFilter.Free;
+      fFilter := Nil;
+   End;
+
+   inherited destroy;
+end;
+
+Function FindThread(FindHCONN:HCONN):PDXThreadRecord;
+Var
+   Loop:Integer;
+   DXThreadRecord:PDXThreadRecord;
+
+Begin
+   Result:=Nil;
+//   MyCriticalSection.StartingRead;
+   For Loop:=fDXThreadArray.Count-1 downto 0 do Begin
+      DXThreadRecord:=PDXThreadRecord(fDXThreadArray[Loop]);
+      If DXThreadRecord^.ThreadID=FindHCONN then Begin
+         Result:=DXThreadRecord;
+         Break; // o.z
+      End;
+   End;
+//   MyCriticalSection.FinishedRead;
+End;
+
+Function FindThreadToFilter(var pfc: THTTP_FILTER_CONTEXT):PDXThreadRecord;
+var
+   conn:Pointer;
+Begin
+   GetMem(conn, sizeof(Longword));
+   THTTP_FILTER_CONTEXT(pfc).ServerSupportFunction(pfc, SF_REQ_GET_CONNID, conn, 0, 0);
+   Result:=FindThread(HCONN(conn^));
+   FreeMem(conn, sizeof(Longword));
+End;
+
+///////////////////////////////////////////////////////////////////////////////
+// Filter function implementation
+///////////////////////////////////////////////////////////////////////////////
+
+Function FilterAddResponseHeaders(var pfc{: THTTP_FILTER_CONTEXT};
+    lpszHeaders: PAnsiChar; dwReserved: Longword):BOOLEAN; stdcall;
+var
+   DXThreadRecord:PDXThreadRecord;
+Begin
+   DXThreadRecord:=FindThreadToFilter(THTTP_FILTER_CONTEXT(pfc));
+   DXThreadRecord^.fDopHeaders:=DXThreadRecord^.fDopHeaders+lpszHeaders;
+   Result:=True;
+End;
+
+Function FilterWriteClient(var pfc{: THTTP_FILTER_CONTEXT};
+    Buffer: Pointer; var Bytes: Longword; dwReserved: Longword): BOOLEAN; stdcall;
+var   DXThreadRecord:PDXThreadRecord;
+      conn:Pointer;
+Begin
+   GetMem(conn, sizeof(Longword));
+   THTTP_FILTER_CONTEXT(pfc).ServerSupportFunction(pfc, SF_REQ_GET_CONNID, conn, 0, 0);
+   DXThreadRecord:=FindThread(HCONN(conn^));
+   FreeMem(conn, sizeof(Longword));
+{$IFDEF VER100} // D3
+   DXThreadRecord^.Thread.Socket.BlockWrite(Buffer,Bytes);
+{$ELSE}
+   DXThreadRecord^.Thread.Socket.Write(Buffer,Bytes);
+{$ENDIF}
+   Result:=True;
+End;
+
+Function FilterAllocMem(var pfc{: THTTP_FILTER_CONTEXT}; cbSize: Longword;
+    dwReserved: Longword):Pointer;  stdcall;
+var p:Pointer;
+   MemoryBlock:TDXMemoryBlock;
+   DXThreadRecord:PDXThreadRecord;
+Begin
+   p:=Nil;
+Try
+   GetMem(p, cbSize);
+Except
+   FreeMem(p);
+   Result:=Nil;
+   Exit;
+End;
+   MemoryBlock.fPointer:=p;
+   MemoryBlock.fSize:=cbSize;
+   DXThreadRecord:=FindThreadToFilter(THTTP_FILTER_CONTEXT(pfc));
+   DXThreadRecord^.fAllocMem.Add(@MemoryBlock);
+   Result:=p;
+End;
+
+Function FilterServerSupportFunction(var pfc{: THTTP_FILTER_CONTEXT};
+    sfReq: Longword; pData: Pointer; ul1, ul2: {$IFDEF cpu64}UInt64{$ELSE}Longword{$ENDIF}):BOOLEAN; stdcall;
+var
+   Results, hex:AnsiString;
+   normal:PAnsiString;
+   size:Longword;
+   DXThreadRecord:PDXThreadRecord;
+   i, dec, code : Integer;
+Begin
+   Result:=True;
+
+   case sfReq of
+      SF_REQ_SEND_RESPONSE_HEADER:Begin
+         If pData = Nil then Results:='HTTP/1.1 200 OK'+#13#10
+         Else Results:=AnsiString(pData^);
+         Results:=Results+AnsiString(Pointer(ul1)^);
+         size:=Length(Results)+1;
+         THTTP_FILTER_CONTEXT(pfc).WriteClient(pfc, PAnsiChar(Results), size, 0);
+      End; //SF_REQ_SEND_RESPONSE_HEADER
+
+      SF_REQ_ADD_HEADERS_ON_DENIAL:Begin
+         DXThreadRecord := FindThreadToFilter(THTTP_FILTER_CONTEXT(pfc));
+         DXThreadRecord.fDopDeniedHeaders :=
+            DXThreadRecord.fDopDeniedHeaders+ AnsiString(pData);
+      End;//SF_REQ_ADD_HEADERS_ON_DENIAL
+
+      SF_REQ_SET_NEXT_READ_SIZE:Begin
+         fActiveFilter.fNextReadSize := ul1;
+      End; //SF_REQ_SET_NEXT_READ_SIZE
+
+      SF_REQ_SET_PROXY_INFO:Begin
+         //You can use this support function to indicate whether
+         //the current request is an HTTP proxy request.
+         if ul1 = 1 then Begin
+           //request is a proxy request.
+         End
+         Else
+         if ul1 = 0 then Begin
+           //request is not a proxy request
+         End;
+      End; //SF_REQ_SET_PROXY_INFO
+
+      SF_REQ_GET_CONNID:Begin
+         HCONN(pData^):=GetCurrentThreadId;
+      End;
+
+      SF_REQ_DISABLE_NOTIFICATIONS:Begin
+         fActiveFilter.fDisableNotification:=ul1;
+      End;
+
+      SF_REQ_GET_PROPERTY:Begin
+         //You can use this support function to retrieve special IIS
+         //properties defined in SF_PROPERTY_IIS.
+         case ul1 of
+            SF_PROPERTY_INSTANCE_NUM_ID:Begin
+               pData := Nil;
+            End;
+         End; //case
+      End;
+
+      SF_REQ_NORMALIZE_URL:Begin
+         normal := PAnsiString(pData);
+         i:=1;
+         while i<> Length(normal^) do
+         Begin
+            if normal^[i] = '%' then Begin
+               hex := Copy(normal^, i, 3);
+               hex[1] := '$';
+               Val({$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(hex), dec, Code);
+               if code <> 0 then Delete(normal^, i, 3)
+               Else Begin
+                  Delete(normal^, i, 2);
+                  normal^[i]:=AnsiChar(dec);
+               End;
+            End;
+            i := i + 1;
+         End;//while
+      End; //SF_REQ_NORMALIZE_URL
+   else
+      Result:=False;
+   End;
+End;
+
+///////////////////////////////////////////////////////////////////////////////
+// MSDN:
+// The AddHeader callback function adds an HTTP header to the incoming request
+// or outgoing response. This callback function is available only during
+// notifications for the SF_NOTIFY_PREPROC_HEADERS and
+// SF_NOTIFY_SEND_RESPONSE events.
+///////////////////////////////////////////////////////////////////////////////
+Function FilterAddHeader(var pfc: THTTP_FILTER_CONTEXT; lpszName,
+          lpszValue: PAnsiChar): BOOLEAN; stdcall;
+var DXThreadRecord:PDXThreadRecord;
+    HeaderTools:TDXHTTPHeaderTools;
+Begin
+   DXThreadRecord:=FindThreadToFilter(pfc);
+   HeaderTools := TDXHTTPHeaderTools.Create(Nil);
+   if Not Assigned(DXThreadRecord) then HeaderTools.Init(fPreprocHeader)
+   Else HeaderTools.Init(DXThreadRecord.fHeaderInfo);
+   Result := HeaderTools.AddHeader(AnsiString(lpszName), AnsiString(lpszValue));
+   HeaderTools.Free;
+End;
+
+Function FilterGetHeader(var pfc: THTTP_FILTER_CONTEXT; lpszName: PAnsiChar;
+    var lpvBuffer; var lpdwSize: Longword):BOOLEAN; stdcall;
+var DXThreadRecord:PDXThreadRecord;
+    HeaderTools:TDXHTTPHeaderTools;
+    res:AnsiString;
+    resLength:Longword;
+Begin
+   Result := False;
+   DXThreadRecord:=FindThreadToFilter(pfc);
+   HeaderTools := TDXHTTPHeaderTools.Create(Nil);
+   if Not Assigned(DXThreadRecord) then HeaderTools.Init(fPreprocHeader)
+   Else HeaderTools.Init(DXThreadRecord.fHeaderInfo);
+   res := HeaderTools.HeaderGetString(AnsiString(lpszName));
+   if res <> '' then Begin
+      resLength:=Length(res);
+      Result := True;
+      PAnsiChar(lpvBuffer) := PAnsiChar(res);
+      lpdwSize := resLength;
+   End;
+   HeaderTools.Free;
+End;
+
+Function FilterSetHeader(var pfc: THTTP_FILTER_CONTEXT; lpszName,
+    lpszValue: PAnsiChar):BOOLEAN; stdcall;
+var DXThreadRecord:PDXThreadRecord;
+    HeaderTools:TDXHTTPHeaderTools;
+Begin
+   DXThreadRecord:=FindThreadToFilter(pfc);
+   HeaderTools := TDXHTTPHeaderTools.Create(Nil);
+   if Not Assigned(DXThreadRecord) then HeaderTools.Init(fPreprocHeader)
+   Else HeaderTools.Init(DXThreadRecord.fHeaderInfo);
+   Result := HeaderTools.SetHeader(AnsiString(lpszName), AnsiString(lpszValue));
+   HeaderTools.Free;
+End;
+
+Procedure NotificationFilters(Notify:Longword; Buf1:Pointer; sizeBuf1:Longword;
+                                                     Buf2:Pointer; sizeBuf2:Longword);
+var p:Pointer;
+    filterContext:THTTP_FILTER_CONTEXT;
+    i:Integer;
+    filterRecord:PDXFilterRecord;
+    DLLHandle:THandle;
+    filterProc:THttpFilterProc;
+    outRes:PAnsiChar;
+    str:AnsiString;
+    outResSize:Longword;
+    DXThreadRecord:PDXThreadRecord;
+
+Begin
+   If fFilter.Count<1 then Exit;
+   with filterContext do Begin
+      cbSize:=sizeof(THTTP_FILTER_CONTEXT);
+      Revision:=4;
+      ServerContext:=Nil;
+      ulReserved:=0;
+      fIsSecurePort:=False;
+      pFilterContext:=Nil;
+      GetServerVariable:=fGetServerVariableFilterProc;
+      AddResponseHeaders:=FilterAddresponseHeaders;
+      WriteClient:=FilterWriteClient;
+      AllocMem:=FilterAllocMem;
+      ServerSupportFunction:=FilterServerSupportFunction;
+   End;
+   DXThreadRecord:=FindThreadToFilter(filterContext);
+
+   Case Notify of
+      //Port Security Settings
+      SF_NOTIFY_SECURE_PORT : Begin
+         filterContext.fIsSecurePort:=True;
+         p:=Nil;
+      End;
+
+      SF_NOTIFY_NONSECURE_PORT : Begin
+         filterContext.fIsSecurePort:=False;
+         p:=Nil;
+      End;
+
+////////////////////////////////////////////////////////////////////////////////
+// This event was used when the ISAPI sends data to the client.
+// Or when the server is reading data from the client.
+////////////////////////////////////////////////////////////////////////////////
+      SF_NOTIFY_SEND_RAW_DATA: Begin
+         //this probably needs to be redesigned
+         GetMem(p, sizeof(THTTP_FILTER_RAW_DATA));
+         with PHTTP_FILTER_RAW_DATA(p)^ do Begin
+            pvInData:=Buf1;
+            cbInData:=sizeBuf1;
+            cbInBuffer:=sizeof(Buf1);
+            dwReserved:=0;
+         End;
+      End;
+      SF_NOTIFY_READ_RAW_DATA:Begin
+         //HTTP_FILTER_RAW_DATA
+         GetMem(p, sizeof(THTTP_FILTER_RAW_DATA));
+         with PHTTP_FILTER_RAW_DATA(p)^ do Begin
+            pvInData:=Buf1;
+            cbInData:=sizeBuf1;
+            cbInBuffer:=sizeof(Buf1);
+            dwReserved:=0;
+         End;
+      End;
+
+////////////////////////////////////////////////////////////////////////////////
+// Create hooks for Get/Set/Add Header Routines
+////////////////////////////////////////////////////////////////////////////////
+      SF_NOTIFY_PREPROC_HEADERS:Begin
+         //HTTP_FILTER_PREPROC_HEADERS
+         GetMem(p, sizeof(THTTP_FILTER_PREPROC_HEADERS));
+         with PHTTP_FILTER_PREPROC_HEADERS(p)^ do Begin
+            GetHeader:=FilterGetHeader;
+            SetHeader:=FilterSetHeader;
+            AddHeader:=FilterAddHeader;
+            HttpStatus:=200; //HTTP_STATUS_CONTINUE
+            dwReserved:=0;
+         End;
+         fPreprocHeader := PHeaderInfo(Buf1);
+      End;
+
+      SF_NOTIFY_AUTHENTICATION:Begin
+         //HTTP_FILTER_AUTHENT
+         GetMem(p, sizeof(THTTP_FILTER_AUTHENT));
+         with PHTTP_FILTER_AUTHENT(p)^ do Begin
+            pszUser:=PAnsiChar(Buf1);
+            cbUserBuff:=sizeBuf1;
+            pszPassword:=PAnsiChar(Buf2);
+            cbPasswordBuff:=sizeBuf2;
+         End;
+      End;
+///////////////////////////////////////////////////////////////////////////////
+// Notification is given to the filters after you have looked up the physical
+// path. If the filters do not like it, then they can only close the connection
+// and use SF_NOTIFY_PREPROC_HEADERS to write a 302 url.
+///////////////////////////////////////////////////////////////////////////////
+      SF_NOTIFY_URL_MAP:Begin
+         // HTTP_FILTER_URL_MAP
+         GetMem(p, sizeof(THTTP_FILTER_URL_MAP));
+         with PHTTP_FILTER_URL_MAP(p)^ do Begin
+            pszURL:=PAnsiChar(Buf1);
+            pszPhysicalPath:=PAnsiChar(Buf2);
+            cbPathBuff:=sizeBuf2;
+         End;
+      End;
+
+      SF_NOTIFY_ACCESS_DENIED:Begin
+         // HTTP_FILTER_ACCESS_DENIED
+         GetMem(p, sizeof(THTTP_FILTER_ACCESS_DENIED));
+         with PHTTP_FILTER_ACCESS_DENIED(p)^ do Begin
+            pszURL:=PAnsiChar(Buf1);            // Requesting URL
+            dwReason:=sizeBuf1;          // Bitfield of SF_DENIED flags
+            pszPhysicalPath:=PAnsiChar(Buf2);   // Physical path of resource
+         End;
+      End;
+
+      SF_NOTIFY_LOG:Begin
+         //HTTP_FILTER_LOG
+         GetMem(p, sizeof(THTTP_FILTER_LOG));
+         with PHTTP_FILTER_LOG(p)^ do Begin
+            pszClientHostName:='not support';
+            pszClientUserName:='not support';
+            pszServerName:='not support';
+            pszOperation:='not support';
+            pszTarget:='not support';
+            pszParameters:='not support';
+            dwHttpStatus:=200;
+            dwWin32Status:=0;
+            dwBytesSent:=0;
+            dwBytesRecvd:=0;
+            msTimeForProcessing:=0;
+         End;
+      End;
+
+      SF_NOTIFY_END_OF_REQUEST:Begin
+         p:=Nil;
+      End;
+
+      SF_NOTIFY_END_OF_NET_SESSION:Begin
+         p:=Nil;
+      End;
+
+////////////////////////////////////////////////////////////////////////////////
+// Create hooks for Get/Set/Add Header Routines - guess means to actually
+// transmit the header to the client.
+////////////////////////////////////////////////////////////////////////////////
+      SF_NOTIFY_SEND_RESPONSE:Begin
+         //HTTP_FILTER_SEND_RESPONSE
+         GetMem(p, sizeof(THTTP_FILTER_SEND_RESPONSE));
+         with PHTTP_FILTER_SEND_RESPONSE(p)^ do Begin
+            GetHeader:=FilterGetHeader;
+            SetHeader:=FilterSetHeader;
+            AddHeader:=FilterAddHeader;
+            HttpStatus:=200;
+            dwReserved:=0;
+         End;
+//         DXThreadRecord.fHeaderInfo := PHeaderInfo(Buf1);
+      End;
+      Else
+       Exit;
+   End;
+
+   for i:=fFilter.Count-1 downto 0 do Begin
+      filterRecord:=fFilter.Items[i];
+      if Not filterRecord.fNotification then continue;
+      if (filterRecord.fVersion.dwFlags AND
+         (Not filterRecord.fDisableNotification) AND Notify)=0 then continue;
+      fActiveFilter:=filterRecord;
+{$IFDEF USE_DLL_MGR}
+      DLLHandle:=fDLLManager.GetDLLHandle(filterRecord.fName);
+{$ELSE}
+{$IFNDEF MSWINDOWS}
+      DLLHandle:=LoadLibrary(PAnsiChar(filterRecord.fName));
+{$ELSE}
+      DLLHandle:=LoadLibraryExA(PAnsiChar(filterRecord.fName),0,0);
+{$ENDIF}
+{$ENDIF}
+      If DLLHandle=0 then continue;
+      @filterProc:=GetProcAddress(DLLHandle,PAnsiChar('HttpFilterProc'));
+      If Not Assigned(filterProc) then continue;
+      case filterProc(filterContext, Notify, p) of
+          SF_STATUS_REQ_FINISHED_KEEP_CONN,
+          SF_STATUS_REQ_FINISHED:Begin
+            if Assigned(DXThreadRecord) then
+               DXThreadRecord.Thread.Socket.CloseNow;
+          End;
+          SF_STATUS_REQ_NEXT_NOTIFICATION:Begin
+             continue; // pass to next filter
+          End;
+          SF_STATUS_REQ_HANDLED_NOTIFICATION:Begin
+             Break; // handled and done
+          End;
+          SF_STATUS_REQ_ERROR:Begin
+            NotificationFilters(SF_NOTIFY_ACCESS_DENIED, PAnsiChar(filterRecord.fName),
+                                SF_DENIED_FILTER, PAnsiChar(''), 0);
+
+{$IFDEF MSWINDOWS}
+            FormatMessage(
+                FORMAT_MESSAGE_ALLOCATE_BUFFER OR
+                FORMAT_MESSAGE_FROM_SYSTEM OR
+                FORMAT_MESSAGE_IGNORE_INSERTS,
+                Nil,
+                GetLastError(),
+                0, // Default language
+                @outRes,
+                0,
+                Nil
+             );
+{$ENDIF}
+            if outRes <> '' then Begin
+               str := AnsiString('HTTP/1.1 500 ')+sLineBreak;
+               str := str + DXThreadRecord.fDopDeniedHeaders;
+               str := str + AnsiString(outRes) +sLineBreak;
+               outResSize:=Length(str);
+               filterContext.WriteClient(filterContext, PAnsiChar(str), outResSize, 0);
+            End
+            Else Begin
+               str:=AnsiString('HTTP/1.1 500') + sLineBreak + DXThreadRecord.fDopDeniedHeaders;
+               outResSize:=Length(str);
+               filterContext.WriteClient(filterContext, PAnsiChar(str), outResSize, 0);
+            End;
+            if Assigned(DXThreadRecord) then
+               DXThreadRecord.Thread.Socket.CloseNow;
+          End; //SF_STATUS_REQ_ERROR
+
+// to-do: this has to be able to let the web server object do the read,
+// that way no data disappear from the stream. Normally this status type
+// is only returned when the filter is opaque (like SSL).
+          SF_STATUS_REQ_READ_NEXT:Begin
+            DXThreadRecord.ECB.ReadClient(DXThreadRecord.ThreadID, Pointer(outRes), filterRecord.fNextReadSize);
+          End; //SF_STATUS_REQ_READ_NEXT
+      End; //case
+
+   End; //for
+// once done - we have to return the changes to the P content!
+   if Assigned(p) then FreeMem(p);
+   fActiveFilter:=Nil;
+End;
+
+///////////////////////////////////////////////////////////////////////////////
+// Extension ISAPI implementation
+// ==============================
+// ISAPI CALLBACK FUNCTIONS
+///////////////////////////////////////////////////////////////////////////////
+
+function ServerVariable(ThreadID:HCONN;Variable:PAnsiChar;Buffer:Pointer;Size:LPDWord):BOOLEAN; stdcall;
+var
+   DXThreadRecord:PDXThreadRecord;
+   Results:AnsiString;
+   Str:AnsiString;
+
+begin
+   Result:=False;
+   LongWord(Size^):=0;
+   DXThreadRecord:=FindThread(ThreadID);
+   If Not Assigned(DXThreadRecord) then Exit;
+   Results:='';
+   str := Variable;
+   If Str=AnsiString('INSTANCE_ID') then Results:=Ansi_IntToStr(DWORD(ThreadID))
+   Else if Assigned(DXThreadRecord^.fGetServerVariable) then
+      DXThreadRecord^.fGetServerVariable(DXThreadRecord^.Thread,Str,Results);
+   StrPCopy(PAnsiChar(Buffer),Results);
+   If Results<>'' then LongWord(Size^):=Length(Results)+1;
+   Result:=True;
+end;
+
+Function ExtensionWriteClient(ThreadID:HCONN;Buf:Pointer;Var Bytes:Longword;dwReserved:Longword):BOOLEAN; stdcall;
+var
+   DXThreadRecord:PDXThreadRecord;
+
+begin
+   If Bytes=0 then Begin // PHP occasionally calls this with zero bytes?!
+      Result:=True;
+      Exit;
+   End;
+   Result:=False;
+   DXThreadRecord:=FindThread(ThreadID);
+   If Not Assigned(DXThreadRecord) then Exit;
+   NotificationFilters(SF_NOTIFY_SEND_RAW_DATA, Buf, Bytes, Nil, 0);
+{$IFDEF VER100} // D3
+   DXThreadRecord^.Thread.Socket.BlockWrite(Buf,Bytes);
+{$ELSE}
+   DXThreadRecord^.Thread.Socket.Write(Buf,Bytes);
+{$ENDIF}
+   Result:=DXThreadRecord^.Thread.Socket.LastCommandStatus=0;
+end;
+
+function ExtensionReadClient(ThreadID:HCONN;Buf:Pointer;var Size:Longword):BOOLEAN; stdcall;
+var
+   DXThreadRecord:PDXThreadRecord;
+begin
+   Result:=False;
+   DXThreadRecord:=FindThread(ThreadID);
+   If Not Assigned(DXThreadRecord) then Exit;
+   NotificationFilters(SF_NOTIFY_READ_RAW_DATA, Buf, Size, Nil, 0);
+{$IFDEF VER100}
+   Size:=DXThreadRecord^.Thread.Socket.BlockRead(Buf,Size);
+{$ELSE}
+   Size:=DXThreadRecord^.Thread.Socket.Read(Buf,Size);
+{$ENDIF}
+   Result:=True;
+end;
+
+{$HINTS OFF}
+function ServerSupportFunctionS(ThreadID:HCONN;
+                                HSE_REQ:Longword;
+                                Buf:Pointer;
+                                Size:Pointer{PDWORD};
+                                DataType:Pointer{PDWORD}):BOOLEAN; stdcall;
+var
+   DXThreadRecord:PDXThreadRecord;
+   Results:AnsiString;
+
+begin // HTTPODBC.DLL calls with HSE_REQ=61442 (wtf?)
+   Result:=False;
+   Results:='';
+   DXThreadRecord:=FindThread(ThreadID);
+   If Not Assigned(DXThreadRecord) then Exit;
+   Case HSE_REQ of
+      HSE_APPEND_LOG_PARAMETER:Begin
+         Move(Buf^,DXThreadRecord^.ECB.lpszLogData,StrLen(PAnsiChar(Buf)));
+         Result:=False;
+      End;
+      HSE_REQ_ABORTIVE_CLOSE,
+      HSE_REQ_CLOSE_CONNECTION:Begin
+         DXThreadRecord^.Thread.Socket.CloseNow;
+         Result:=True;
+      End;
+      HSE_REQ_IS_KEEP_CONN:Begin
+         Boolean(Buf^):=False; // when I get keep alive for ISAPI working set this to true
+         Result:=True;
+      End;
+      HSE_REQ_MAP_URL_TO_PATH:
+      Begin
+         Results := StringReplace(AnsiString(PAnsiChar(Buf)), AnsiChar('/'), AnsiChar('\'), [rfReplaceAll]);
+         Results := StringReplace(DXThreadRecord^.fRealPath + Results,AnsiString('\\'),AnsiChar('\'),[rfReplaceAll]);
+         LongWord(Size^):=Length(Results); // 9/11/2002
+         Buf:=PAnsiChar(Results);
+         with DXThreadRecord^.mapex do Begin
+            StrPCopy(lpszPath, Results);
+            dwFlags:=1+2+4; //READ+WRITE+EXECUTE
+            cchMatchingPath:=StrLen(lpszPath);
+            cchMatchingURL:=StrLen(lpszPath);
+            dwReserved1:=0;
+            dwReserved2:=0;
+         End;
+         Move(DXThreadRecord^.Mapex,DataType^,Sizeof(DXThreadRecord^.Mapex));
+         NotificationFilters(SF_NOTIFY_URL_MAP, Buf, Longword(Size), @Results, Length(Results));
+         Result:=True;
+      End;
+      HSE_REQ_MAP_URL_TO_PATH_EX:
+      Begin
+         Results := StringReplace(AnsiString(PAnsiChar(Buf)), AnsiChar('/'), AnsiChar('\'), [rfReplaceAll]);
+         Results := StringReplace(DXThreadRecord^.fRealPath + Results,AnsiString('\\'),AnsiChar('\'),[rfReplaceAll]);
+         with DXThreadRecord^.mapex do Begin
+            StrPCopy(lpszPath,Results);
+            dwFlags:=1+2+4; //READ+WRITE+EXECUTE
+            cchMatchingPath:=StrLen(lpszPath);
+            cchMatchingURL:=StrLen(lpszPath);
+            dwReserved1:=0;
+            dwReserved2:=0;
+         End;
+         Move(DXThreadRecord^.Mapex,DataType^,Sizeof(DXThreadRecord^.Mapex));
+         NotificationFilters(SF_NOTIFY_URL_MAP, Buf, Longword(Size), @Results, Length(Results));
+         Result:=True;
+      End;
+      HSE_REQ_SEND_URL_REDIRECT_RESP,
+      HSE_REQ_SEND_URL:Begin
+         If Assigned(DXThreadRecord^.fRedirectHeader) then
+            DXThreadRecord^.fRedirectHeader(
+            DXThreadRecord^.Thread,
+            StrPas(PAnsiChar(Buf)),Results)
+         Else Results:=AnsiString('HTTP/1.1 302 Moved Temporarily'+#13#10+'Location: ')+StrPas(PAnsiChar(Buf))+AnsiString(#13#10);
+         DXThreadRecord^.Thread.Socket.Writeln(Results);
+         Result:=True;
+      End;
+      HSE_REQ_SEND_RESPONSE_HEADER:Begin
+         Result := True;
+         Results:='';
+         If Assigned(Buf) then begin
+            If PAnsiChar(Buf)<>'' then Begin
+               Results:=AnsiString('HTTP/1.1 ')+PAnsiChar(Buf)+AnsiString(#13#10);
+            End;
+         End;
+         If Results='' then Begin
+            If Assigned(DXThreadRecord^.fBuildHeader) then
+               DXThreadRecord^.fBuildHeader(DXThreadRecord^.ECB.dwHttpStatusCode,Results)
+            Else Begin
+               Results:='HTTP/1.1 200 OK'+#13#10;
+            End;
+         End;
+         If Assigned(DataType) then begin
+            Results:=Results+PAnsiChar(DataType);
+         End;
+         If Copy(Results,Length(Results)-1,2)<>#13#10 then
+            Results:=Results+AnsiString(#13#10);
+         {// 5-11-2002
+         If Copy(Results,Length(Results)-3,4)<>#13#10#13#10 then
+            DXThreadRecord^.Thread.Socket.Writeln(Results)}
+
+         // 5-11-2002
+         If (Copy(Results,Length(Results)-3,4)<>#13#10#13#10) and
+            (Copy(Results,Length(Results)-1,2)<>#10#10) and //10-3-2002
+            (Copy(Results,Length(Results)-1,2)<>#13#13) then Begin //10-3-2002
+            // 10-3-2002
+            If PAnsiChar(Buf)<>'' then DXThreadRecord^.Thread.Socket.Writeln(Results)
+            Else DXThreadRecord^.Thread.Socket.Write(Results);
+         End
+         Else
+            DXThreadRecord^.Thread.Socket.Write(Results)
+      End;
+      HSE_REQ_SEND_RESPONSE_HEADER_EX:Begin
+         Results:='';
+         If Assigned(DXThreadRecord^.fBuildHeader) then
+            DXThreadRecord^.fBuildHeader(DXThreadRecord^.ECB.dwHttpStatusCode,Results)
+         Else Begin
+            If PHSE_SEND_HEADER_EX_INFO(Buf)^.cchStatus>0 then
+               Results:=AnsiString('HTTP/1.1 ')+PAnsiChar(PHSE_SEND_HEADER_EX_INFO(Buf)^.pszStatus)+AnsiString(#13#10)
+            Else
+               Results:=AnsiString('HTTP/1.1 200 OK'+#13#10);
+         End;
+         If PHSE_SEND_HEADER_EX_INFO(Buf)^.cchHeader=0 then
+           Results:=Results+AnsiString(#13#10)
+         Else
+           Results:=Results+PHSE_SEND_HEADER_EX_INFO(Buf)^.pszHeader;
+         // redesign
+         NotificationFilters(SF_NOTIFY_SEND_RESPONSE, @Results, 0, Nil, 0);
+         DXThreadRecord^.Thread.Socket.Write(Results);
+         Result:=True;
+      End;
+      HSE_REQ_TRANSMIT_FILE:Begin
+         Result:=False;
+      // ?
+      //if access denied to call
+      //NotificationFilters(SF_NOTIFY_ACCESS_DENIED, Pointer1, SF_DENIED_RESOURCE, Pointer2, 0);
+      //This: Pointer1 - Requesting URL,
+      //      Pointer2 - Physical path of resource
+      End;
+      HSE_REQ_DONE_WITH_SESSION:Begin
+         DXThreadRecord^.fISAPIThreadPoolDone:=True;
+         Result:=True;
+      End;
+      HSE_REQ_GET_SSPI_INFO:Begin
+         Result:=False;
+      End;
+      HSE_REQ_IO_COMPLETION:Begin
+         Result:=False;
+      End;
+      HSE_REQ_REFRESH_ISAPI_ACL:Begin
+         Result:=False;
+      End;
+      HSE_REQ_ASYNC_READ_CLIENT:Begin
+         Result:=True;
+      End;
+{ do not know there values!
+      HSE_REQ_EXECUTE_CHILD:Begin // ISAPI 5.1
+         Result:=False;
+      End;
+      HSE_REQ_GET_EXECUTE_FLAGS:Begin // ISAPI 5.1
+         Reslut:=True;
+         Move(HSE_EXEC_CUSTOM_ERROR,DataType,Sizeof(HSE_EXEC_CUSTOM_ERROR));
+      End;
+}
+      HSE_REQ_GET_IMPERSONATION_TOKEN:Begin
+        Result:=False;
+{$IFDEF MSWINDOWS}
+        If Assigned(Buf) then Begin
+          Result:=OpenThreadToken(HCONN(DXThreadRecord^.Thread), TOKEN_ALL_ACCESS, False, THandle(DXThreadRecord^.fToken));
+          if Result then Buf:=@DXThreadRecord^.fToken;
+        End;
+{$ENDIF}
+      End;
+      HSE_REQ_GET_CERT_INFO_EX:Begin
+         Result:=False;
+//         fCertificate:=TCERT_CONTEXT_EX(Buf);
+      End;
+
+   End;
+end;
+{$HINTS ON}
+
+///////////////////////////////////////////////////////////////////////////////
+// LOG INFORMATION
+// Use to write log information of transaction request and response.
+///////////////////////////////////////////////////////////////////////////////
+function WriteTransactionToLog(LogStr:AnsiString; Size:Longword):BOOLEAN;
+Begin
+  NotificationFilters(SF_NOTIFY_LOG, PAnsiChar(LogStr), Size, Nil, 0);
+  Result:=True;
+End;
+
+///////////////////////////////////////////////////////////////////////////////
+// Find and Load DLL instance
+///////////////////////////////////////////////////////////////////////////////
+Function TDXISAPI.RegisterDLL(ISAPI:AnsiString):Boolean;
+Begin
+{$IFDEF USE_DLL_MGR}
+   Result:=fDLLManager.LoadThisDLL(ISAPI);
+{$ELSE}
+   Result:=True;
+{$ENDIF}
+End;
+
+///////////////////////////////////////////////////////////////////////////////
+// Find and Un-Load DLL instance
+///////////////////////////////////////////////////////////////////////////////
+Function TDXISAPI.UnRegisterDLL(ISAPI:AnsiString):Boolean;
+Begin
+{$IFDEF USE_DLL_MGR}
+   Result:=fDLLManager.UnLoadThisDLL(ISAPI);
+{$ELSE}
+   Result:=True;
+{$ENDIF}
+End;
+
+///////////////////////////////////////////////////////////////////////////////
+// LAUNCH THE DLL!
+///////////////////////////////////////////////////////////////////////////////
+
+Function TDXISAPI.Execute(Session:TDXClientThread;
+                          ISAPI,
+                          Method,
+                          QueryString,
+                          PathInfo,
+                          PathTranslated,
+                          POSTContent_Type,
+                          POSTData:AnsiString;
+                          POSTDataSize:Integer;
+                          Var ResultLog:AnsiString):Boolean;
+Var
+   DXThreadRecord:PDXThreadRecord;
+   Version:TGetExtensionVersion;
+   Proc:THttpExtensionProc;
+   AllDone:TTerminateExtension;
+   Loop:Integer;
+   DLLHandle:THandle;
+   ProcResults:Longword;
+   Err:PAnsiChar;
+   EVI:THSE_VERSION_INFO;
+   StartTime:Cardinal; // 3.0.b
+
+Begin
+   Result:=False;
+{$IFDEF USE_DLL_MGR}
+   DLLHandle:=fDLLManager.GetDLLHandle(ISAPI);
+{$ELSE}
+{$IFNDEF MSWINDOWS}
+   DLLHandle:=LoadLibrary(PAnsiChar(ISAPI));
+{$ELSE}
+   DLLHandle:=LoadLibraryExA(PAnsiChar(ISAPI),0,0);
+{$ENDIF}
+{$ENDIF}
+   If DLLHandle=0 then Begin
+      GetMem(Err,256);
+{$IFDEF MSWINDOWS}
+      FormatMessageA(FORMAT_MESSAGE_FROM_SYSTEM,nil,GetLastError,0,Err,256,Nil);
+{$ENDIF}
+      ResultLog:=ISAPI+AnsiString(' was not registered! (')+Err+AnsiChar(')');
+      FreeMem(Err,256);
+{$IFNDEF USE_DLL_MGR}
+      FreeLibrary(DLLHandle);
+{$ENDIF}
+      Exit;
+   End;
+   @Version:=GetProcAddress(DLLHandle,PAnsiChar('GetExtensionVersion'));
+   If Not Assigned(Version) then Begin
+      ResultLog:=ISAPI+AnsiString(' does not export "GetExtensionVersion"');
+{$IFNDEF USE_DLL_MGR}
+      FreeLibrary(DLLHandle);
+{$ENDIF}
+      Exit;
+   End;
+   @Proc:=GetProcAddress(DLLHandle,PAnsiChar('HttpExtensionProc'));
+   If Not Assigned(Proc) then Begin
+      ResultLog:=ISAPI+AnsiString(' does not export "HTTPExtensionProc"');
+{$IFNDEF USE_DLL_MGR}
+      FreeLibrary(DLLHandle);
+{$ENDIF}
+      Exit;
+   End;
+
+   New(DXThreadRecord);
+   With DXThreadRecord^ do Begin
+      ThreadID:=GetCurrentThreadID;
+      Thread:=Session;
+      fToken:=0;
+      fDopHeaders:='';
+      fDopDeniedHeaders:='';
+      fGetServerVariable:=self.fGetServerVariable;
+      fRedirectHeader:=self.fRedirectHeader;
+      fBuildHeader:=self.fBuildHeader;
+      fRealPath:=ExtractFilePath(PathTranslated);
+      fiTimeout:=fTimeout;
+      fISAPIThreadPoolDone:=False;
+   End;
+   If Assigned(Version) then Begin
+      FillChar(EVI,Sizeof(EVI),#0);
+      If Not Version(EVI) then Begin
+         Dispose(DXThreadRecord);
+         ResultLog:=ISAPI+AnsiString(' Version Hook Refused');
+{$IFNDEF USE_DLL_MGR}
+         FreeLibrary(DLLHandle);
+{$ENDIF}
+         Exit;
+      End
+      Else ResultLog:=EVI.lpszExtensionDesc;
+   End;
+
+   With DXThreadRecord^.ECB do Begin
+      cbSize:=sizeof(TEXTENSION_CONTROL_BLOCK);
+      dwVersion:=HSE_VERSION_MAJOR shl 16 + HSE_VERSION_MINOR;
+      ConnID:=DXThreadRecord^.ThreadID;
+      dwHttpStatusCode:=200;
+      FillChar(lpszLogData,HSE_LOG_BUFFER_LEN,#0);
+      lpszMethod:=PAnsiChar(Method);
+      lpszQueryString:=PAnsiChar(QueryString);
+      lpszPathInfo:=PAnsiChar(PathInfo);
+      lpszPathTranslated:=PAnsiChar(PathTranslated);
+      cbAvailable:=Length(PostData);
+      lpbData:=PAnsiChar(PostData);
+      cbTotalBytes:=POSTDataSize;
+      lpszContentType:=PAnsiChar(PostContent_Type);
+      GetServerVariable:=ServerVariable;
+      ServerSupportFunction:=ServerSupportFunctionS;
+      WriteClient:=ExtensionWriteClient;
+      ReadClient:=ExtensionReadClient;
+   End;
+
+   MyCriticalSection.StartingWrite;
+   fDXThreadArray.Add(DXThreadRecord);
+   MyCriticalSection.FinishedWrite;
+try
+   ProcResults:=Proc(DXThreadRecord^.ECB);
+   Result:=True;
+   Case ProcResults of
+      HSE_STATUS_SUCCESS,
+      HSE_STATUS_SUCCESS_AND_KEEP_CONN:Begin
+         ResultLog:=ResultLog+AnsiString(' success: ')+StrPas(DXThreadRecord^.ECB.lpszLogData);
+      End;
+      HSE_STATUS_PENDING:Begin
+         // we must loop here and wait for ISAPIThreadPool to finish.
+         // 3.0.b
+         StartTime:=TimeCounter; // 9/11/2002 moved down here.
+         While (Not DXThreadRecord^.fISAPIThreadPoolDone) and (TimeCounter<StartTime+30000) do Begin
+            DoSleepEx(1);
+         End;
+      End;
+      HSE_STATUS_ERROR:Begin
+         ResultLog:=ResultLog+AnsiString(' failed: ')+StrPas(DXThreadRecord^.ECB.lpszLogData);
+         Result:=False;
+         NotificationFilters(SF_NOTIFY_ACCESS_DENIED, PAnsiChar(ISAPI), SF_DENIED_APPLICATION, PAnsiChar(PathTranslated), 0);
+      End;
+      else Begin
+         ResultLog:=ResultLog+ansiString(' returned unknown status ')+
+            StrPas(DXThreadRecord^.ECB.lpszLogData);
+         Result:=False;
+      End; //else
+   End; //case
+except
+   on E: Exception do Begin
+      ResultLog:=ISAPI+' failed: '+{$IFDEF UNICODE}WideStringToAnsiString{$ENDIF}(E.Message);
+      Result:=False;
+   End;
+end;
+   NotificationFilters(SF_NOTIFY_END_OF_REQUEST, Nil, 0, Nil, 0); //END Request
+   @AllDone:=GetProcAddress(DLLHandle,PAnsiChar('TerminateExtension'));
+   If Assigned(AllDone) then AllDone(HSE_TERM_MUST_UNLOAD);
+{$IFNDEF USE_DLL_MGR}
+   FreeLibrary(DLLHandle);
+{$ENDIF}
+   WriteTransactionToLog('',0);
+   Loop:=0;
+   MyCriticalSection.StartingRead;
+   While (Loop<fDXThreadArray.Count) do Begin
+      DXThreadRecord:=fDXThreadArray[Loop];
+      If DXThreadRecord^.ThreadID=getCurrentThreadID then  Begin
+         // closing token if he is exist
+         MyCriticalSection.FinishedRead;
+         MyCriticalSection.StartingWrite;
+{$IFDEF MSWINDOWS}
+         If DXThreadRecord^.fToken<>0 then
+            CloseHandle(DXThreadRecord^.fToken);
+{$ENDIF}
+         Dispose(DXThreadRecord);
+         fDXThreadArray.Delete(Loop);
+         MyCriticalSection.FinishedWrite;
+         Exit;
+      End
+      Else Inc(Loop);
+   End;
+   MyCriticalSection.FinishedRead;
+End;
+
+function SortFilterCompare(Item1, Item2: Pointer): Integer;
+var fv1, fv2 : PHTTP_FILTER_VERSION;
+Begin
+   fv1:=PDXFilterRecord(Item1).fVersion;
+   fv2:=PDXFilterRecord(Item2).fVersion;
+   Result:= (fv1.dwFlags AND SF_NOTIFY_ORDER_MASK) -
+            (fv2.dwFlags AND SF_NOTIFY_ORDER_MASK);
+End;
+
+Procedure TDXISAPI.RegisterFilters(var ResultLog:AnsiString);
+var DXFilterRecord:PDXFilterRecord;
+    filterVersion:THTTP_FILTER_VERSION;
+    i:Integer;
+    DLLHandle:THandle;
+    ISAPI:AnsiString;
+    Version:TGetFilterVersion;
+Begin
+   for i:=0 to fFilter.Count-1 do Begin
+      DXFilterRecord:=fFilter.Items[i];
+      ISAPI:=DXFilterRecord.fName;
+      RegisterDLL(ISAPI);
+{$IFDEF USE_DLL_MGR}
+      DLLHandle:=fDLLManager.GetDLLHandle(ISAPI);
+{$ELSE}
+{$IFNDEF MSWINDOWS}
+      DLLHandle:=LoadLibrary(PAnsiChar(ISAPI));
+{$ELSE}
+      DLLHandle:=LoadLibraryExA(PAnsiChar(ISAPI),0,0);
+{$ENDIF}
+{$ENDIF}
+      If DLLHandle=0 then Begin
+         ResultLog:=ISAPI+AnsiString(' was not registered!');
+         Continue;
+      End;
+
+      @Version:=GetProcAddress(DLLHandle,PAnsiChar('GetFilterVersion'));
+      If Not Assigned(Version) then Begin
+         ResultLog:=ISAPI+AnsiString(' does not export "GetFilterVersion"');
+         RemoveFilter(ISAPI);
+         Exit;
+      End;
+
+      DXFilterRecord.fNotification:=Version(filterVersion);
+      DXFilterRecord.fVersion^:=filterVersion;
+   End;
+
+   fFilter.Sort(SortFilterCompare);
+End;
+
+Procedure TDXISAPI.UnRegisterFilters(var ResultLog:AnsiString);
+var DXFilterRecord:PDXFilterRecord;
+    i:Integer;
+    DLLHandle:THandle;
+    Term:TTerminateFilter;
+Begin
+   for i:=0 to fFilter.Count-1 do Begin
+      DXFilterRecord:=fFilter.Items[i];
+{$IFDEF USE_DLL_MGR}
+      DLLHandle:=fDLLManager.GetDLLHandle(DXFilterRecord.fName);
+{$ELSE}
+{$IFNDEF MSWINDOWS}
+      DLLHandle:=LoadLibrary(PAnsiChar(DXFilterRecord.fName));
+{$ELSE}
+      DLLHandle:=LoadLibraryExA(PAnsiChar(DXFilterRecord.fName),0,0);
+{$ENDIF}
+{$ENDIF}
+      If DLLHandle=0 then Begin
+         ResultLog:=DXFilterRecord.fName+AnsiString(' was not registered!');
+         Continue;
+      End;
+
+      @Term:=GetProcAddress(DLLHandle,PAnsiChar('TerminateFilter'));
+      If Not Assigned(Term) then
+         Continue;
+
+      Term(0);
+{$IFDEF USE_DLL_MGR}
+      fDLLManager.UnLoadThisDLL(DXFilterRecord.fName);
+{$ELSE}
+      FreeLibrary(DLLHandle);
+{$ENDIF}
+   End;
+End;
+
+Function TDXISAPI.AddFilter(ISAPI:AnsiString):Boolean;
+var DXFilterRecord:PDXFilterRecord;
+    filterVersion:PHTTP_FILTER_VERSION;
+Begin
+   Result:=False;
+   New(DXFilterRecord);
+   New(filterVersion);
+   DXFilterRecord.fName:=ISAPI;
+   with filterVersion^ do
+   Begin
+      dwServerFilterVersion:=HTTP_FILTER_REVISION;
+      dwFilterVersion:=0;
+      lpszFilterDesc:='';
+      dwFlags:=0;
+   End;
+   DXFilterRecord.fVersion := filterVersion;
+   DXFilterRecord.fNotification := True;
+   DXFilterRecord.fDisableNotification := 0;
+   DXFilterRecord.fNextReadSize := 16*1024; //16Kb
+   if (fFilter.Add(DXFilterRecord) >= 0) then Result:=True
+   else Begin
+      Dispose(filterVersion);
+      Dispose(DXFilterRecord);
+   End;
+End;
+
+Function TDXISAPI.RemoveFilter(ISAPI:AnsiString):Boolean;
+var DXFilterRecord:PDXFilterRecord;
+    HTTP_FILTER_VERSION:PHTTP_FILTER_VERSION;
+    i : Integer;
+Begin
+   Result:=False;
+   MyCriticalSection.StartingWrite;
+   for i:=0 to fFilter.Count-1 do
+   Begin
+      DXFilterRecord:=fFilter.Items[i];
+      if DXFilterRecord.fName = ISAPI then
+      Begin
+       HTTP_FILTER_VERSION:=DXFilterRecord.fVersion;
+       Dispose(HTTP_FILTER_VERSION);
+       Dispose(DXFilterRecord);
+       fFilter.Delete(i);
+       Result:=True;
+       MyCriticalSection.FinishedWrite;
+       Exit;
+      End;
+   End;
+   MyCriticalSection.FinishedRead;
+End;
+
+Procedure TDXISAPI.ServerStartEvent;
+var
+   res:AnsiString;
+Begin
+   RegisterFilters(res);
+End;
+
+Procedure TDXISAPI.ServerStopEvent;
+var
+   res:AnsiString;
+Begin
+   self.UnRegisterFilters(res);
+End;
+
+Procedure TDXISAPI.ServerRawRead(ReadString:AnsiString;Len:Longword);
+Begin
+   NotificationFilters(SF_NOTIFY_READ_RAW_DATA, @ReadString, Len, Nil, 0);
+End;
+
+Procedure TDXISAPI.ServerPreprocHeaderEvent(DXHeaderInfo:PHeaderInfo);
+Begin
+   NotificationFilters(SF_NOTIFY_PREPROC_HEADERS, DXHeaderInfo, 0, Nil, 0);
+End;
+
+Procedure TDXISAPI.ConvertedURL2Physical(URL:AnsiString;Physical:AnsiString);
+Begin
+   NotificationFilters(SF_NOTIFY_URL_MAP,@URL,Length(URL),@Physical,Length(Physical));
+End;
+
+Procedure TDXISAPI.ServerEndOfRequest;
+Begin
+   NotificationFilters(SF_NOTIFY_END_OF_REQUEST, Nil, 0, Nil, 0);
+End;
+
+Procedure TDXISAPI.ServerEndSession;
+Begin
+   NotificationFilters(SF_NOTIFY_END_OF_NET_SESSION, Nil, 0, Nil, 0);
+End;
+
+Procedure TDXISAPI.SetServerVariableProc(value:TFilterGetServerVariableProc);
+Begin
+   fGetServerVariableFilterProc:=value;
+End;
+
+Function TDXISAPI.GetServerVariableProc:TFilterGetServerVariableProc;
+Begin
+   Result := fGetServerVariableFilterProc;
+End;
+
+Function TDXISAPI.FilterCount:Integer;
+Begin
+   Result:=fFilter.Count;
+End;
+
+{$IFDEF SUPPORT_COM}
+initialization
+  CoInitializeEx(nil,COINIT_MULTITHREADED);
+finalization
+  CoUninitialize;
+{$ENDIF}
+
+end.
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXISAPIFilter.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXISAPIFilter.pas
new file mode 100644
index 0000000..b5fcb87
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXISAPIFilter.pas	
@@ -0,0 +1,481 @@
+unit uRODXISAPIFilter;
+
+interface
+
+///////////////////////////////////////////////////////////////////////////////
+//    Component: TDXISAPIFilter
+//       Author: G.E. Ozz Nixon Jr. (onixon@dxsock.com)
+// ========================================================================
+// Source Owner: DX, Inc. 1995-2002
+//    Copyright: All code is the property of DX, Inc. Licensed for
+//               resell by Brain Patchwork DX (tm) and part of the
+//               DX (r) product lines, which are (c) 1999-2002
+//               DX, Inc. Source may not be distributed without
+//               written permission from both Brain Patchwork DX,
+//               and DX, Inc.
+//      License: (Reminder), None of this code can be added to other
+//               developer products without permission. This includes
+//               but not limited to DCU's, DCP's, DLL's, OCX's, or
+//               any other form of merging our technologies. All of
+//               your products released to a public consumer be it
+//               shareware, freeware, commercial, etc. must contain a
+//               license notification somewhere visible in the
+//               application.
+//               Example is Internet Explorer - Help->About screen
+//               shows the licensed code contained in the application.
+// Code Version: (3rd Generation Code)
+// ========================================================================
+//  Description:
+// ========================================================================
+///////////////////////////////////////////////////////////////////////////////
+
+{$IFDEF VER100}
+Type
+   Longword=Cardinal;
+{$ENDIF}
+
+Const
+  HTTP_FILTER_REVISION    = $00040000;
+
+  SF_MAX_USERNAME         = (256+1);
+  SF_MAX_PASSWORD         = (256+1);
+
+  SF_MAX_FILTER_DESC_LEN  = (256+1);
+
+  //
+  //  These values can be used with the pfnSFCallback function supplied in
+  //  the filter context structure
+  //
+
+  //
+  //  Sends a complete HTTP server response header including
+  //  the status, server version, message time and MIME version.
+  //
+  //  Server extensions should append other information at the end,
+  //  such as Content-type, Content-length etc followed by an extra
+  //  '\r\n'.
+  //
+  //  pData - Zero terminated string pointing to optional
+  //      status string (i.e., "401 Access Denied") or NULL for
+  //      the default response of "200 OK".
+  //
+  //  ul1 - Zero terminated string pointing to optional data to be
+  //      appended and set with the header.  If NULL, the header will
+  //      be terminated with an empty line.
+  //
+
+  SF_REQ_SEND_RESPONSE_HEADER = 0;
+  {.$EXTERNALSYM SF_REQ_SEND_RESPONSE_HEADER}
+
+  //
+  //  If the server denies the HTTP request, add the specified headers
+  //  to the server error response.
+  //
+  //  This allows an authentication filter to advertise its services
+  //  w/o filtering every request.  Generally the headers will be
+  //  WWW-Authenticate headers with custom authentication schemes but
+  //  no restriction is placed on what headers may be specified.
+  //
+  //  pData - Zero terminated string pointing to one or more header lines
+  //      with terminating '\r\n'.
+  //
+
+  SF_REQ_ADD_HEADERS_ON_DENIAL = 1;
+  {.$EXTERNALSYM SF_REQ_ADD_HEADERS_ON_DENIAL}
+
+  //
+  //  Only used by raw data filters that return SF_STATUS_READ_NEXT
+  //
+  //  ul1 - size in bytes for the next read
+  //
+
+  SF_REQ_SET_NEXT_READ_SIZE = 2;
+  {.$EXTERNALSYM SF_REQ_SET_NEXT_READ_SIZE}
+
+  //
+  //  Used to indicate this request is a proxy request
+  //
+  //  ul1 - The proxy flags to set
+  //      0x00000001 - This is a HTTP proxy request
+  //
+  //
+
+  SF_REQ_SET_PROXY_INFO = 3;
+  {.$EXTERNALSYM SF_REQ_SET_PROXY_INFO}
+
+  SF_REQ_GET_CONNID = 4;
+  {.$EXTERNALSYM SF_REQ_GET_CONNID}
+
+  SF_REQ_DISABLE_NOTIFICATIONS = 5;
+  {.$EXTERNALSYM SF_REQ_DISABLE_NOTIFICATIONS}
+
+  SF_REQ_GET_PROPERTY = 6;
+  {.$EXTERNALSYM SF_REQ_GET_PROPERTY}
+
+  SF_REQ_NORMALIZE_URL = 7;
+  {.$EXTERNALSYM SF_REQ_NORMALIZE_URL}
+
+  //
+  //  These values are returned by the filter entry point when a new request is
+  //  received indicating their interest in this particular request
+  //
+
+  //
+  //  The filter has handled the HTTP request.  The server should disconnect
+  //  the session.
+  //
+
+  SF_STATUS_REQ_FINISHED = $8000000;
+  {.$EXTERNALSYM SF_STATUS_REQ_FINISHED}
+
+  //
+  //  Same as SF_STATUS_FINISHED except the server should keep the TCP
+  //  session open if the option was negotiated
+  //
+
+  SF_STATUS_REQ_FINISHED_KEEP_CONN = $8000001;
+  {.$EXTERNALSYM SF_STATUS_REQ_FINISHED_KEEP_CONN}
+
+  //
+  //  The next filter in the notification chain should be called
+  //
+
+  SF_STATUS_REQ_NEXT_NOTIFICATION = $8000002;
+  {.$EXTERNALSYM SF_STATUS_REQ_NEXT_NOTIFICATION}
+
+  //
+  //  This filter handled the notification.  No other handles should be
+  //  called for this particular notification type
+  //
+
+  SF_STATUS_REQ_HANDLED_NOTIFICATION = $8000003;
+  {.$EXTERNALSYM SF_STATUS_REQ_HANDLED_NOTIFICATION}
+
+  //
+  //  An error occurred.  The server should use GetLastError() and indicate
+  //  the error to the client
+  //
+
+  SF_STATUS_REQ_ERROR = $8000004;
+  {.$EXTERNALSYM SF_STATUS_REQ_ERROR}
+
+  //
+  //  The filter is an opaque stream filter and we're negotiating the
+  //  session parameters.  Only valid for raw read notification.
+  //
+
+  SF_STATUS_REQ_READ_NEXT = $8000005;
+  {.$EXTERNALSYM SF_STATUS_REQ_READ_NEXT}
+
+  //
+  //  Bitfield indicating the requested resource has been denied by the server due
+  //  to a logon failure, an ACL on a resource, an ISAPI Filter or an
+  //  ISAPI Application/CGI Application.
+  //
+  //  SF_DENIED_BY_CONFIG can appear with SF_DENIED_LOGON if the server
+  //  configuration did not allow the user to logon.
+  //
+
+  SF_DENIED_LOGON             = $00000001;
+  {.$EXTERNALSYM SF_DENIED_LOGON}
+  SF_DENIED_RESOURCE          = $00000002;
+  {.$EXTERNALSYM SF_DENIED_RESOURCE}
+  SF_DENIED_FILTER            = $00000004;
+  {.$EXTERNALSYM SF_DENIED_FILTER}
+  SF_DENIED_APPLICATION       = $00000008;
+  {.$EXTERNALSYM SF_DENIED_APPLICATION}
+  SF_DENIED_BY_CONFIG         = $00010000;
+  {.$EXTERNALSYM SF_DENIED_BY_CONFIG}
+
+
+  //
+  //  Notification Flags
+  //
+  //  SF_NOTIFY_SECURE_PORT
+  //  SF_NOTIFY_NONSECURE_PORT
+  //
+  //      Indicates whether the application wants to be notified for transactions
+  //      that are happenning on the server port(s) that support data encryption
+  //      (such as PCT and SSL), on only the non-secure port(s) or both.
+  //
+  //  SF_NOTIFY_READ_RAW_DATA
+  //
+  //      Applications are notified after the server reads a block of memory
+  //      from the client but before the server does any processing on the
+  //      block.  The data block may contain HTTP headers and entity data.
+  //
+  //
+  //
+
+  SF_NOTIFY_SECURE_PORT               = $00000001;
+  {.$EXTERNALSYM SF_NOTIFY_SECURE_PORT}
+  SF_NOTIFY_NONSECURE_PORT            = $00000002;
+  {.$EXTERNALSYM SF_NOTIFY_NONSECURE_PORT}
+  SF_NOTIFY_READ_RAW_DATA             = $00008000;
+  {.$EXTERNALSYM SF_NOTIFY_READ_RAW_DATA}
+  SF_NOTIFY_PREPROC_HEADERS           = $00004000;
+  {.$EXTERNALSYM SF_NOTIFY_PREPROC_HEADERS}
+  SF_NOTIFY_AUTHENTICATION            = $00002000;
+  {.$EXTERNALSYM SF_NOTIFY_AUTHENTICATION}
+  SF_NOTIFY_URL_MAP                   = $00001000;
+  {.$EXTERNALSYM SF_NOTIFY_URL_MAP}
+  SF_NOTIFY_ACCESS_DENIED             = $00000800;
+  {.$EXTERNALSYM SF_NOTIFY_ACCESS_DENIED}
+  SF_NOTIFY_SEND_RAW_DATA             = $00000400;
+  {.$EXTERNALSYM SF_NOTIFY_SEND_RAW_DATA}
+  SF_NOTIFY_LOG                       = $00000200;
+  {.$EXTERNALSYM SF_NOTIFY_LOG}
+  SF_NOTIFY_END_OF_NET_SESSION        = $00000100;
+  {.$EXTERNALSYM SF_NOTIFY_END_OF_NET_SESSION}
+  SF_NOTIFY_END_OF_REQUEST =            $00000080;
+  {.$EXTERNALSYM SF_NOTIFY_END_OF_REQUEST}
+  SF_NOTIFY_SEND_RESPONSE =             $00010000;
+  {.$EXTERNALSYM SF_NOTIFY_SEND_RESPONSE}
+
+  //
+  //  Filter ordering flags
+  //
+  //  Filters will tend to be notified by their specified
+  //  ordering.  For ties, notification order is determined by load order.
+  //
+  //  SF_NOTIFY_ORDER_HIGH - Authentication or data transformation filters
+  //  SF_NOTIFY_ORDER_MEDIUM
+  //  SF_NOTIFY_ORDER_LOW  - Logging filters that want the results of any other
+  //                      filters might specify this order.
+  //
+
+  SF_NOTIFY_ORDER_HIGH               = $00080000;
+  {.$EXTERNALSYM SF_NOTIFY_ORDER_HIGH}
+  SF_NOTIFY_ORDER_MEDIUM             = $00040000;
+  {.$EXTERNALSYM SF_NOTIFY_ORDER_MEDIUM}
+  SF_NOTIFY_ORDER_LOW                = $00020000;
+  {.$EXTERNALSYM SF_NOTIFY_ORDER_LOW}
+  SF_NOTIFY_ORDER_DEFAULT            = SF_NOTIFY_ORDER_LOW;
+  {.$EXTERNALSYM SF_NOTIFY_ORDER_DEFAULT}
+  SF_NOTIFY_ORDER_MASK               = SF_NOTIFY_ORDER_HIGH or
+                                       SF_NOTIFY_ORDER_MEDIUM or
+                                       SF_NOTIFY_ORDER_LOW;
+  {.$EXTERNALSYM SF_NOTIFY_ORDER_MASK}
+
+  SF_PROPERTY_INSTANCE_NUM_ID = 1;
+  {.$EXTERNALSYM SF_PROPERTY_INSTANCE_NUM_ID}
+//
+//  pvNotification points to this structure for all request notification types
+//
+
+Type
+   SF_REQ_TYPE = LONGWORD;
+   SF_STATUS_TYPE = LONGWORD;
+
+  PHTTP_FILTER_CONTEXT = ^THTTP_FILTER_CONTEXT;
+  TFilterGetServerVariableProc = function (pfc: PHTTP_FILTER_CONTEXT;
+    VariableName: PAnsiChar; Buffer: Pointer; var Size: LONGWORD ): BOOLEAN of Object;
+//  TFilterGetServerVariableProc = function (var pfc{: THTTP_FILTER_CONTEXT};
+//    VariableName: PChar; Buffer: Pointer; var Size: DWORD ): BOOL of Object;
+
+  TFilterAddResponseHeadersProc = function (var pfc{: THTTP_FILTER_CONTEXT};
+    lpszHeaders: PAnsiChar; dwReserved: Longword): BOOLEAN; stdcall;
+
+  TFilterWriteClientProc = function (var pfc{: THTTP_FILTER_CONTEXT};
+    Buffer: Pointer; var Bytes: Longword; dwReserved: Longword ): BOOLEAN; stdcall;
+
+  TFilterAllocMemProc = function (var pfc{: THTTP_FILTER_CONTEXT}; cbSize: Longword;
+    dwReserved: Longword): Pointer; stdcall;
+
+  TFilterServerSupportFunctionProc = function (var pfc{: THTTP_FILTER_CONTEXT};
+    sfReq: Longword; pData: Pointer; ul1, ul2:{$IFDEF cpu64}UInt64{$ELSE}Longword{$ENDIF}): BOOLEAN; stdcall;
+
+  THTTP_FILTER_CONTEXT = record
+    cbSize: LONGWORD;
+
+    //
+    //  This is the structure revision level.
+    //
+
+    Revision: LONGWORD;
+
+    //
+    //  Private context information for the server.
+    //
+
+    ServerContext: Pointer;
+    ulReserved: LONGWORD;
+
+    //
+    //  TRUE if this request is coming over a secure port
+    //
+
+    fIsSecurePort: BOOLEAN;
+
+    //
+    //  A context that can be used by the filter
+    //
+
+    pFilterContext: Pointer;
+
+    //
+    //  Server callbacks
+    //
+
+    GetServerVariable: TFilterGetServerVariableProc;
+    AddResponseHeaders: TFilterAddResponseHeadersProc;
+    WriteClient: TFilterWriteClientProc;
+    AllocMem: TFilterAllocMemProc;
+    ServerSupportFunction: TFilterServerSupportFunctionProc;
+  end;
+
+  PHTTP_FILTER_RAW_DATA = ^THTTP_FILTER_RAW_DATA;
+  THTTP_FILTER_RAW_DATA = record
+    //
+    //  This is a pointer to the data for the filter to process.
+    //
+    pvInData: Pointer;
+    cbInData: LONGWORD;       // Number of valid data bytes
+    cbInBuffer: LONGWORD;     // Total size of buffer
+    dwReserved: LONGWORD;
+  end;
+
+  //
+  //  This structure is the notification info for when the server is about to
+  //  process the client headers
+  //
+
+  TGetHeaderProc = function (var pfc: THTTP_FILTER_CONTEXT; lpszName: PAnsiChar;
+    var lpvBuffer; var lpdwSize: Longword): BOOLEAN; stdcall;
+
+  TSetHeaderProc = function (var pfc: THTTP_FILTER_CONTEXT; lpszName,
+    lpszValue: PAnsiChar): BOOLEAN; stdcall;
+
+  TAddHeaderProc = function (var pfc: THTTP_FILTER_CONTEXT; lpszName,
+    lpszValue: PAnsiChar): BOOLEAN; stdcall;
+
+
+   PHTTP_FILTER_SEND_RESPONSE = ^THTTP_FILTER_SEND_RESPONSE;
+   THTTP_FILTER_SEND_RESPONSE = record
+      AddHeader:TAddHeaderProc;
+      SetHeader:TSetHeaderProc;
+      GetHeader:TGetHeaderProc;
+      HttpStatus:LONGWORD;
+      dwReserved:LONGWORD;
+   End;
+
+
+  PHTTP_FILTER_PREPROC_HEADERS = ^THTTP_FILTER_PREPROC_HEADERS;
+  THTTP_FILTER_PREPROC_HEADERS = record
+    //
+    //  Retrieves the specified header value.  Header names should include
+    //  the trailing ':'.  The special values 'method', 'url' and 'version'
+    //  can be used to retrieve the individual portions of the request line
+    //
+
+    GetHeader: TGetHeaderProc;
+
+    //
+    //  Replaces this header value to the specified value.  To delete a header,
+    //  specified a value of '\0'.
+    //
+
+    SetHeader: TSetHeaderProc;
+
+    //
+    //  Adds the specified header and value
+    //
+
+    AddHeader: TAddHeaderProc;
+
+    HttpStatus: LONGWORD;
+
+    dwReserved: LONGWORD;
+  end;
+
+
+  //
+  //  Authentication information for this request.
+  //
+
+  PHTTP_FILTER_AUTHENT = ^THTTP_FILTER_AUTHENT;
+  THTTP_FILTER_AUTHENT = record
+    //
+    //  Pointer to username and password, empty strings for the anonymous user
+    //
+    //  Client's can overwrite these buffers which are guaranteed to be at
+    //  least SF_MAX_USERNAME and SF_MAX_PASSWORD bytes large.
+    //
+
+    pszUser: PAnsiChar;
+    cbUserBuff: LONGWORD;
+
+    pszPassword: PAnsiChar;
+    cbPasswordBuff: LONGWORD;
+  end;
+
+  //
+  //  Indicates the server is going to use the specific physical mapping for
+  //  the specified URL.  Filters can modify the physical path in place.
+  //
+
+  PHTTP_FILTER_URL_MAP = ^THTTP_FILTER_URL_MAP;
+  THTTP_FILTER_URL_MAP = record
+    pszURL: PAnsiChar;
+    pszPhysicalPath: PAnsiChar;
+    cbPathBuff: LONGWORD;
+  end;
+
+  PHTTP_FILTER_ACCESS_DENIED = ^THTTP_FILTER_ACCESS_DENIED;
+  THTTP_FILTER_ACCESS_DENIED = record
+    pszURL: PAnsiChar;            // Requesting URL
+    pszPhysicalPath: PAnsiChar;   // Physical path of resource
+    dwReason: LONGWORD;          // Bitfield of SF_DENIED flags
+  end;
+
+  //
+  //  The log information about to be written to the server log file.  The
+  //  string pointers can be replaced but the memory must remain valid until
+  //  the next notification
+  //
+
+  PHTTP_FILTER_LOG = ^THTTP_FILTER_LOG;
+  THTTP_FILTER_LOG = record
+    pszClientHostName: PAnsiChar;
+    pszClientUserName: PAnsiChar;
+    pszServerName: PAnsiChar;
+    pszOperation: PAnsiChar;
+    pszTarget: PAnsiChar;
+    pszParameters: PAnsiChar;
+    dwHttpStatus: LONGWORD;
+    dwWin32Status: LONGWORD;
+    dwBytesSent:LONGWORD;
+    dwBytesRecvd:LONGWORD;
+    msTimeForProcessing:LONGWORD;
+  end;
+
+  //
+  //  Filter version information, passed to GetFilterVersion
+  //
+  PHTTP_FILTER_VERSION = ^THTTP_FILTER_VERSION;
+  THTTP_FILTER_VERSION = record
+    //
+    //  Version of the spec the server is using
+    //
+
+    dwServerFilterVersion: LONGWORD;
+
+    //
+    //  Fields specified by the client
+    //
+    dwFilterVersion: LONGWORD;
+    lpszFilterDesc: array[0..SF_MAX_FILTER_DESC_LEN - 1] of AnsiChar;
+    dwFlags: LONGWORD;
+  end;
+
+
+  THttpFilterProc = function (var pfc: THTTP_FILTER_CONTEXT;
+    Notificationtype: LONGWORD; pvNotification: Pointer): LONGWORD; stdcall;
+
+  TGetFilterVersion = function (var pVer: THTTP_FILTER_VERSION): BOOLEAN; stdcall;
+  
+  TTerminateFilter = function(flags:LONGWORD): BOOLEAN; stdcall;
+
+implementation
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXSecurity.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXSecurity.pas
new file mode 100644
index 0000000..d9783f8
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXSecurity.pas	
@@ -0,0 +1,306 @@
+unit uRODXSecurity;
+
+///////////////////////////////////////////////////////////////////////////////
+//         Unit: DXSecurity
+//       Author: G.E. Ozz Nixon Jr. (onixon@dxsock.com)
+// ========================================================================
+// Source Owner: DX, Inc. 1995-2002
+//    Copyright: All code is the property of DX, Inc. Licensed for
+//               resell by Brain Patchwork DX (tm) and part of the
+//               DX (r) product lines, which are (c) 1999-2002
+//               DX, Inc. Source may not be distributed without
+//               written permission from both Brain Patchwork DX,
+//               and DX, Inc.
+//      License: (Reminder), None of this code can be added to other
+//               developer products without permission. This includes
+//               but not limited to DCU's, DCP's, DLL's, OCX's, or
+//               any other form of merging our technologies. All of
+//               your products released to a public consumer be it
+//               shareware, freeware, commercial, etc. must contain a
+//               license notification somewhere visible in the
+//               application.
+//               Example is Internet Explorer - Help->About screen
+//               shows the licensed code contained in the application.
+// Code Version: (3rd Generation Code)
+// ========================================================================
+//  Description:
+// ========================================================================
+// Content all certificates and security structures and types.
+///////////////////////////////////////////////////////////////////////////////
+
+interface
+
+{$IFDEF VER100}
+Uses
+   Windows;
+   
+Type
+   LongWord=DWord;
+{$ENDIF}
+
+Const
+   //Encoding/decoding algoritms
+   X509_ASN_ENCODING = 1;
+   PKCS_7_ASN_ENCODING = 2;
+
+   //certificat vervion
+   CERT_V1=1;
+   CERT_V2=2;
+   CERT_V3=3;
+
+   //OID of algorithm
+   szOID_RSA='1.2.840.113549';
+   szOID_PKCS='1.2.840.113549.1';
+   szOID_RSA_HASH='1.2.840.113549.2';
+   szOID_RSA_ENCRYPT='1.2.840.113549.3';
+   szOID_PKCS_1='1.2.840.113549.1.1';
+   szOID_PKCS_2='1.2.840.113549.1.2';
+   szOID_PKCS_3='1.2.840.113549.1.3';
+   szOID_PKCS_4='1.2.840.113549.1.4';
+   szOID_PKCS_5='1.2.840.113549.1.5';
+   szOID_PKCS_6='1.2.840.113549.1.6';
+   szOID_PKCS_7='1.2.840.113549.1.7';
+   szOID_PKCS_8='1.2.840.113549.1.8';
+   szOID_PKCS_9='1.2.840.113549.1.9';
+   szOID_PKCS_10='1.2.840.113549.1.10';
+   szOID_PKCS_12='1.2.840.113549.1.12';
+   szOID_RSA_MD2='1.2.840.113549.1.1.2';
+   szOID_RSA_MD4='1.2.840.113549.1.1.3';
+   szOID_RSA_MD5='1.2.840.113549.1.1.4';
+   szOID_RSA_RSA='1.2.840.113549.1.1.1';
+   szOID_RSA_MD2RSA='1.2.840.113549.1.1.2';
+   szOID_RSA_MD4RSA='1.2.840.113549.1.1.3';
+   szOID_RSA_MD5RSA='1.2.840.113549.1.1.4';
+   szOID_RSA_SHA1RSA='1.2.840.113549.1.1.5';
+   szOID_RSA_SETOAEP_RSA='1.2.840.113549.1.1.5';
+   szOID_RSA_DH='1.2.840.113549.1.3.1';
+   szOID_RSA_data='1.2.840.113549.1.7.1';
+   szOID_RSA_signedData='1.2.840.113549.1.7.2';
+   szOID_RSA_envelopedData='1.2.840.113549.1.7.3';
+   szOID_RSA_signEnvData='1.2.840.113549.1.7.4';
+   szOID_RSA_digestedData='1.2.840.113549.1.7.5';
+   szOID_RSA_hashedData='1.2.840.113549.1.7.5';
+   szOID_RSA_encryptedData='1.2.840.113549.1.7.6';
+   szOID_RSA_emailAddr='1.2.840.113549.1.9.1';
+   szOID_RSA_unstructName='1.2.840.113549.1.9.2';
+   szOID_RSA_contentType='1.2.840.113549.1.9.3';
+   szOID_RSA_messageDigest='1.2.840.113549.1.9.4';
+   szOID_RSA_signingTime='1.2.840.113549.1.9.5';
+   szOID_RSA_counterSign='1.2.840.113549.1.9.6';
+   szOID_RSA_challengePwd='1.2.840.113549.1.9.7';
+   szOID_RSA_unstructAddr='1.2.840.113549.1.9.8';
+   szOID_RSA_extCertAttrs='1.2.840.113549.1.9.9';
+   szOID_RSA_SMIMECapabilities='1.2.840.113549.1.9.15';
+   szOID_RSA_preferSignedData='1.2.840.113549.1.9.15.1';
+   szOID_RSA_RC2CBC='1.2.840.113549.3.2';
+   szOID_RSA_RC4='1.2.840.113549.3.4';
+   szOID_RSA_DES_EDE3_CBC='1.2.840.113549.3.7';
+   szOID_RSA_RC5_CBCPad='1.2.840.113549.3.9';
+   szOID_ANSI_x942='1.2.840.10046';
+   szOID_ANSI_x942_DH='1.2.840.10046.2.1';
+   szOID_X957='1.2.840.10040';
+   szOID_X957_DSA='1.2.840.10040.4.1';
+   szOID_DATA_STRUCTURE='1.2.840.10040.4.3';
+   szOId_DS='2.5';
+   szOID_DSALG='2.5.8';
+   szOID_DSALG_CRPT='2.5.8.1';
+   szOID_DSALG_HASH='2.5.8.2';
+   szOID_DSALG_SIGN='2.5.8.3';
+   szOID_DSALG_RSA='2.5.8.1.1';
+   szOID_OIW='1.3.14';
+   szOID_OIWSEC='1.3.14.3.2';
+   szOID_OIWSEC_md4RSA='1.3.14.3.2.2';
+   szOID_OIWSEC_md5RSA='1.3.14.3.2.3';
+   szOID_OIWSEC_md4RSA2='1.3.14.3.2.4';
+   szOID_OIWSEC_desECB='1.3.14.3.2.6';
+   szOID_OIWSEC_desCBC='1.3.14.3.2.7';
+   szOID_OIWSEC_desOFB='1.3.14.3.2.8';
+   szOID_OIWSEC_desCFB='1.3.14.3.2.9';
+   szOID_OIWSEC_desMAC='1.3.14.3.2.10';
+   szOID_OIWSEC_rsaSign='1.3.14.3.2.11';
+   szOID_OIWSEC_dsa='1.3.14.3.2.12';
+   szOID_OIWSEC_shaDSA='1.3.14.3.2.13';
+   szOID_OIWSEC_mdc2RSA='1.3.14.3.2.14';
+   szOID_OIWSEC_shaRSA='1.3.14.3.2.15';
+   szOID_OIWSEC_dhCommMod='1.3.14.3.2.16';
+   szOID_OIWSEC_desEDE='1.3.14.3.2.17';
+   szOID_OIWSEC_sha='1.3.14.3.2.18';
+   szOID_OIWSEC_mdc2='1.3.14.3.2.19';
+   szOID_OIWSEC_dsaComm='1.3.14.3.2.20';
+   szOID_OIWSEC_dsaCommSHA='1.3.14.3.2.21';
+   szOID_OIWSEC_rsaXchg='1.3.14.3.2.22';
+   szOID_OIWSEC_keyHashSeal='1.3.14.3.2.23';
+   szOID_OIWSEC_md2RSASign='1.3.14.3.2.24';
+   szOID_OIWSEC_md5RSASign='1.3.14.3.2.25';
+   szOID_OIWSEC_sha1='1.3.14.3.2.26';
+   szOID_OIWSEC_dsaSHA1='1.3.14.3.2.27';
+   szOID_OIWSEC_dsaCommSHA1='1.3.14.3.2.28';
+   szOID_OIWSEC_sha1RSASign='1.3.14.3.2.29';
+   szOID_OIWDIR='1.3.14.7.2';
+   szOID_OIWDIR_CRPT='1.3.14.7.2.1';
+   szOID_OIWDIR_HASH='1.3.14.7.2.2';
+   szOID_OIWDIR_SIGN='1.3.14.7.2.3';
+   szOID_OIWDIR_md2='1.3.14.7.2.2.1';
+   szOID_OIWDIR_md2RSA='1.3.14.7.2.3.1';
+   szOID_INFOSEC='2.16.840.1.101.2.1';
+   szOID_INFOSEC_sdnsSignature='2.16.840.1.101.2.1.1.1';
+   szOID_INFOSEC_mosaicSignature='2.16.840.1.101.2.1.1.2';
+   szOID_INFOSEC_sdnsConfidentiality='2.16.840.1.101.2.1.1.3';
+   szOID_INFOSEC_mosaicConfidentiality='2.16.840.1.101.2.1.1.4';
+   szOID_INFOSEC_sdnsIntegrity='2.16.840.1.101.2.1.1.5';
+   szOID_INFOSEC_mosaicIntegrity='2.16.840.1.101.2.1.1.6';
+   szOID_INFOSEC_sdnsTokenProtection='2.16.840.1.101.2.1.1.7';
+   szOID_INFOSEC_mosaicTokenProtection='2.16.840.1.101.2.1.1.8';
+   szOID_INFOSEC_sdnsKeyManagement='2.16.840.1.101.2.1.1.9';
+   szOID_INFOSEC_mosaicKeyManagement='2.16.840.1.101.2.1.1.10';
+   szOID_INFOSEC_sdnsKMandSig='2.16.840.1.101.2.1.1.11';
+   szOID_INFOSEC_mosaicKMandSig='2.16.840.1.101.2.1.1.12';
+   szOID_INFOSEC_SuiteASignature='2.16.840.1.101.2.1.1.13';
+   szOID_INFOSEC_SuiteAConfidentiality='2.16.840.1.101.2.1.1.14';
+   szOID_INFOSEC_SuiteAIntegrity='2.16.840.1.101.2.1.1.15';
+   szOID_INFOSEC_SuiteATokenProtection='2.16.840.1.101.2.1.1.16';
+   szOID_INFOSEC_SuiteAKeyManagement='2.16.840.1.101.2.1.1.17';
+   szOID_INFOSEC_SuiteAKMandSig='2.16.840.1.101.2.1.1.18';
+   szOID_INFOSEC_mosaicUpdatedSig='2.16.840.1.101.2.1.1.19';
+   szOID_INFOSEC_mosaicKMandUpdSig='2.16.840.1.101.2.1.1.20';
+   szOID_INFOSEC_mosaicUpdatedInteg='2.16.840.1.101.2.1.1.21';
+
+   //predefine algorithm types
+   X509_DSS_PARAMETERS = szOID_OIWSEC_dsa;
+   PKCS_RC2_CBC_PARAMETERS = szOID_RSA_RC2CBC;
+   X509_OCTET_STRING = szOID_OIWSEC_desCBC;
+{   X509_OCTET_STRING = szOID_RSA_DES_EDE3_CBC;
+   X509_OCTET_STRING = szOID_RSA_RC4;}
+
+Type
+   HCERTSTORE = Cardinal;
+
+///////////////////////////////////////////////////////////////////////////////
+// MSDN:
+// The CryptoAPI BLOB structure is used for an arbitrary array of bytes.
+// It is declared in Wincrypt.h and provides
+// flexibility for objects that can contain various data types.
+///////////////////////////////////////////////////////////////////////////////
+   TBLOB = record
+      cbData:LONGWORD;
+      pbData:^BYTE;
+   End;
+
+   TCRYPT_INTEGER_BLOB=TBLOB;
+   PCRYPT_INTEGER_BLOB=^TBLOB;
+   TCRYPT_UINT_BLOB=TBLOB;
+   PCRYPT_UINT_BLOB=^TBLOB;
+   TCRYPT_OBJID_BLOB=TBLOB;
+   PCRYPT_OBJID_BLOB=^TBLOB;
+   TCERT_NAME_BLOB=TBLOB;
+   PCERT_NAME_BLOB=^TBLOB;
+   TCERT_RDN_VALUE_BLOB=TBLOB;
+   PCERT_RDN_VALUE_BLOB=^TBLOB;
+   TCERT_BLOB=TBLOB;
+   PCERT_BLOB=^TBLOB;
+   TCRL_BLOB=TBLOB;
+   PCRL_BLOB=^TBLOB;
+   TDATA_BLOB=TBLOB;
+   PDATA_BLOB=^TBLOB;
+   TCRYPT_DATA_BLOB=TBLOB;
+   PCRYPT_DATA_BLOB=^TBLOB;
+   TCRYPT_HASH_BLOB=TBLOB;
+   PCRYPT_HASH_BLOB=^TBLOB;
+   TCRYPT_DIGEST_BLOB=TBLOB;
+   PCRYPT_DIGEST_BLOB=^TBLOB;
+   TCRYPT_DER_BLOB=TBLOB;
+   PCRYPT_DER_BLOB=^TBLOB;
+   TCRYPT_ATTR_BLOB=TBLOB;
+   PCRYPT_ATTR_BLOB=^TBLOB;
+
+///////////////////////////////////////////////////////////////////////////////
+// MSDN:
+// The CRYPT_BIT_BLOB structure contains an array of bytes. In a
+// CRYPT_BIT_BLOB the last byte in the array can contain zero to seven
+// unused bits. Therefore, the number of meaningful bits in the pbData
+// member is cbData * 8 – cUnusedBits.
+///////////////////////////////////////////////////////////////////////////////
+   PCRYPT_BIT_BLOB=^TCRYPT_BIT_BLOB;
+   TCRYPT_BIT_BLOB = packed record
+      cbData:LONGWORD;
+      pbData:^BYTE;
+      cUnusedBits:LONGWORD;
+   End;
+
+///////////////////////////////////////////////////////////////////////////////
+// MSDN:
+// The CRYPT_ALGORITHM_IDENTIFIER structure specifies an algorithm.
+// The structure includes the object identifier (OID) of the algorithm and
+// any needed parameters for that algorithm. The parameters contained in
+// its CRYPT_OBJID_BLOB are encoded.
+///////////////////////////////////////////////////////////////////////////////
+   PCRYPT_ALGORITHM_IDENTIFIER=^TCRYPT_ALGORITHM_IDENTIFIER;
+   TCRYPT_ALGORITHM_IDENTIFIER = packed record
+      pszObjId:AnsiString;
+      Parameters:TCRYPT_OBJID_BLOB;
+   End;
+
+///////////////////////////////////////////////////////////////////////////////
+// MSDN:
+// The CERT_PUBLIC_KEY_INFO structure contains a public key and its algorithm.
+///////////////////////////////////////////////////////////////////////////////
+   PCERT_PUBLIC_KEY_INFO=^TCERT_PUBLIC_KEY_INFO;
+   TCERT_PUBLIC_KEY_INFO = packed record
+      Algorithm:TCRYPT_ALGORITHM_IDENTIFIER;
+      PublicKey:TCRYPT_BIT_BLOB;
+   End;
+
+///////////////////////////////////////////////////////////////////////////////
+// MSDN:
+// The CERT_EXTENSION structure contains the extension information for a
+// certificate, Certificate Revocation List (CRL)
+// or Certificate Trust List (CTL).
+///////////////////////////////////////////////////////////////////////////////
+   PCERT_EXTENSION = ^TCERT_EXTENSION;
+   TCERT_EXTENSION = packed record
+      pszObjId:AnsiString;
+      fCritical:Boolean;
+      Value:TCRYPT_OBJID_BLOB;
+   End;
+
+///////////////////////////////////////////////////////////////////////////////
+// MSDN:
+// The CERT_INFO structure contains a certificate's information.
+///////////////////////////////////////////////////////////////////////////////
+   PCERT_INFO=^TCERT_INFO;
+   TCERT_INFO = packed record
+      dwVersion:LONGWORD;
+      SerialNumber:TCRYPT_INTEGER_BLOB;
+      SignatureAlgorithm:TCRYPT_ALGORITHM_IDENTIFIER;
+      Issuer:TCERT_NAME_BLOB;
+      NotBefore:TDATETIME;
+      NotAfter:TDATETIME;
+      Subject:TCERT_NAME_BLOB;
+      SubjectPublicKeyInfo:TCERT_PUBLIC_KEY_INFO;
+      IssuerUniqueId:TCRYPT_BIT_BLOB;
+      SubjectUniqueId:TCRYPT_BIT_BLOB;
+      cExtension:LONGWORD;
+      rgExtension:PCERT_EXTENSION;
+   End;
+
+///////////////////////////////////////////////////////////////////////////////
+// MSDN:
+// The CERT_CONTEXT structure contains both the encoded and decoded
+// representations of a certificate. A certificate context returned by one
+// of the functions defined in Wincrypt.h must be freed by calling the
+// CertFreeCertificateContext function. The CertDuplicateCertificateContext
+// function can be called to make a duplicate copy (which also must be
+// freed by calling CertFreeCertificateContext).
+///////////////////////////////////////////////////////////////////////////////
+   PCERT_CONTEXT=^TCERT_CONTEXT;
+   TCERT_CONTEXT = packed record
+      dwCertEncodingType:LONGWORD;
+      pbCertEncoded:^BYTE;
+      cbCertEncoded:LONGWORD;
+      pCertInfo:^PCERT_INFO;
+      hCertStore:HCERTSTORE;
+   End;
+
+implementation
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXServerCore.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXServerCore.pas
new file mode 100644
index 0000000..8865510
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXServerCore.pas	
@@ -0,0 +1,1157 @@
+unit uRODXServerCore;
+
+///////////////////////////////////////////////////////////////////////////////
+//    Component: TDXServerCore
+//       Author: G.E. Ozz Nixon Jr. (onixon@dxsock.com)
+// ========================================================================
+// Source Owner: DX, Inc. 1995-2002
+//    Copyright: All code is the property of DX, Inc. Licensed for
+//               resell by Brain Patchwork DX (tm) and part of the
+//               DX (r) product lines, which are (c) 1999-2002
+//               DX, Inc. Source may not be distributed without
+//               written permission from both Brain Patchwork DX,
+//               and DX, Inc.
+//      License: (Reminder), None of this code can be added to other
+//               developer products without permission. This includes
+//               but not limited to DCU's, DCP's, DLL's, OCX's, or
+//               any other form of merging our technologies. All of
+//               your products released to a public consumer be it
+//               shareware, freeware, commercial, etc. must contain a
+//               license notification somewhere visible in the
+//               application.
+//               Example is Internet Explorer - Help->About screen
+//               shows the licensed code contained in the application.
+// Code Version: (3rd Generation Code)
+// ========================================================================
+//  Description: Ancestor to all our Protocol Implementations.
+// ========================================================================
+// Parent Thread Object and "Defacto" Server Object.
+// The Server Object (DXServerCore) is the heart of all protocols. It is used
+// to initiate winsock listening, and start the Parent Thread
+// (DXServerCoreThread). The Parent Thread constantly checks if the listener
+// has received a connection request, accepts the connection and spawns a
+// (DXServerThread) Session. And continues checking for more connections.
+///////////////////////////////////////////////////////////////////////////////
+
+interface
+
+{$I uRODXSock.def}
+
+uses
+{$IFDEF CODE_TRACER}
+  DXCodeTracer,
+{$ENDIF}
+  uRODXSessionTracker,
+  uRODXSock,
+  uRODXString,
+  Classes;
+
+type
+  TWhichProtocol =
+     (wpUDPOnly, wpTCPOnly);
+  TServerType =
+     (stNonBlocking, stThreadBlocking); // so you can port Borland code to DXSOCK!
+
+//*****************************************************************************
+// This thread is the spawned "Session" thread. Every connection detected by
+// the "Listener" thread is created as a TDXServerThread, and then that new
+// thread takes over communications with the new session.
+//*****************************************************************************
+  TDXClientThread = class;
+  TDX_NewConnect = procedure(ClientThread: TDXClientThread) of object;
+  TDX_DestroySessionData = procedure(ClientThread: TDXClientThread; SessionData: Pointer) of object;
+
+  {$IFDEF FPC}
+  TMy_SessionID = TThreadID;
+  {$ELSE}
+  TMy_SessionID = THandle;
+  {$ENDIF}
+
+  TDXClientThread = class(TThread)
+  private
+{$IFDEF CODE_TRACER}
+    CodeTracer:TDXCodeTracer;
+{$ENDIF}
+    Client: TDXSock;
+    feNewConnect: TDX_NewConnect;
+    feDestroySessionData: TDX_DestroySessionData;
+    fBlockSizeFlags: TDXBlockSizeFlags;
+    ListenerThreadObject:TThread;
+  protected
+    procedure Execute; override;
+    function GetSessionID:TMy_SessionID; // making move from INDY easier!
+  public
+    fpSessionData: Pointer;
+    constructor Create(CreateSuspended: Boolean);
+    destructor Destroy; override;
+    procedure SetSocketLater(Socket: TDXSock);
+  //published
+    property SessionID:TMy_SessionID read GetSessionID;
+    property Socket: TDXSock read Client
+      write Client;
+    property OnNewConnect: TDX_Newconnect read feNewConnect
+      write feNewConnect;
+    property OnDestroySessionData: TDX_DestroySessionData read feDestroySessionData
+      write feDestroySessionData;
+{$IFDEF CODE_TRACER}
+    property DXCodeTracer:TDXCodeTracer read CodeTracer
+                                        write CodeTracer;
+{$ENDIF}
+     Property Terminated;
+  end;
+
+//*****************************************************************************
+// All protocols use this thread to listen for incoming connections. This is
+// the "Listener" thread.
+//*****************************************************************************
+type
+  TDX_ListenerFailed = procedure(ErrorCode: Integer) of object;
+  TDXServerCoreThread = class;
+  TDX_MaxConnects = procedure(ServerCoreThread: TDXServerCoreThread) of object;
+  TDX_Idle = procedure(ServerCoreThread: TDXServerCoreThread) of object;
+  TDX_Sleep = procedure(ServerCoreThread: TDXServerCoreThread) of object;
+  TDX_WakeUp = procedure(ServerCoreThread: TDXServerCoreThread) of object;
+// 3.0c
+  TDX_UDPData = procedure(Data:Pointer;PeerIP:AnsiString;PeerPort,DataLen:Integer) of object;
+
+  TDXServerCoreThread = class(TThread)
+  private
+{$IFDEF CODE_TRACER}
+    CodeTracer:TDXCodeTracer;
+{$ENDIF}
+    fbSuspend: Boolean;
+    fbBufferCreates: Boolean;
+    ListenerSocket: TDXSock;
+    fSessionTracker:TDXSessionTracker;
+    fsBindTo: AnsiString;
+    fiServerPort: Integer;
+    fiMaxConn: Integer;
+    fbAnnouncedIdle: Boolean;
+    feNewConnect: TDX_NewConnect;
+    feMaxConnects: TDX_MaxConnects;
+    feListenerFailed: TDX_ListenerFailed;
+    feIdle: TDX_Idle;
+    feSleep: TDX_Sleep;
+    feWakeUp: TDX_WakeUp;
+    feUDPData: TDX_UDPData;
+{$IFDEF MSWINDOWS}
+    fstPriority: TThreadPriority;
+{$ENDIF}
+    fThreadPool: TList;
+    fWhichprotocol: TWhichProtocol;
+    FActiveConnections: Integer;
+    fBlockSizeFlags: TDXBlockSizeFlags;
+  protected
+    MyCriticalSection:TDXCritical;
+    procedure Execute; override;
+    procedure SetBufferCreates(value: Boolean);
+    procedure SetSuspend(value: Boolean);
+    function GetSocket: TDXSock;
+  public
+    constructor Create(CreateSuspended: Boolean);
+    destructor Destroy; override;
+    function ActiveNumberOfConnections: Integer;
+  //published
+    property MainSocket: TDXSock read GetSocket;
+{$IFDEF MSWINDOWS}
+    property SpawnedThreadPriority: TThreadPriority read fstPriority
+      write fstPriority;
+{$ENDIF}
+    property BufferCreates: Boolean read fbBufferCreates
+      write SetBufferCreates;
+    property SuspendListener: Boolean read fbSuspend
+      write SetSuspend;
+    property BindTo: AnsiString read fsBindTo
+      write fsBindTo;
+    property ServerPort: Integer read fiServerPort
+      write fiServerPort;
+    property ThreadCacheSize: Integer read fiMaxConn
+      write fiMaxConn;
+    property OnNewConnect: TDX_NewConnect read feNewConnect
+      write feNewConnect;
+    property OnMaxConnects: TDX_MaxConnects read feMaxConnects
+      write feMaxConnects;
+    property OnGoingIdle: TDX_Idle read feIdle
+      write feIdle;
+    property OnAsleep: TDX_Sleep read feSleep
+      write feSleep;
+    property OnWakeUp: TDX_WakeUp read feWakeUp
+      write feWakeUp;
+    property OnListenerFailed: TDX_ListenerFailed read feListenerFailed
+      write feListenerFailed;
+    property OnUDPDataNoPool: TDX_UDPData read feUDPData
+      write feUDPData;
+    property ProtocolToBind: TWhichProtocol read fWhichprotocol
+      write fWhichprotocol;
+{$IFDEF CODE_TRACER}
+    property DXCodeTracer:TDXCodeTracer read CodeTracer
+                                        write CodeTracer;
+{$ENDIF}
+  end;
+
+//*****************************************************************************
+// All protocols are descendants of this object/component. When making changes
+// that need to flow to the actual protocol, like supporting a change to the
+// spawned thread. You would make the "property" in this piece of code, and
+// then when this piece of code creates the listener thread you can pass the
+// information to the listener. At that point, you could pass it down to the
+// protocol thread TDXServerThread.
+//*****************************************************************************
+type
+  TDXServerCore = class(TDXComponent)
+  private
+{$IFDEF CODE_TRACER}
+    CodeTracer:TDXCodeTracer;
+{$ENDIF}
+    fbSSL:Boolean;
+    fbActive: Boolean;
+    fbSuspend: Boolean;
+    fbBufferCreates: Boolean;
+    fsBindTo: AnsiString;
+    fiServerPort: Integer;
+    fiMaxConn: Integer;
+    feNewConnect: TDX_NewConnect;
+    feMaxConnects: TDX_MaxConnects;
+    feListenerFailed: TDX_ListenerFailed;
+    feIdle: TDX_Idle;
+    feSleep: TDX_Sleep;
+    feWakeUp: TDX_WakeUp;
+    feUDPData: TDX_UDPData;
+    ListenerThread: TDXServerCoreThread;
+{$IFDEF MSWINDOWS}
+    fltPriority: TThreadPriority;
+    fstPriority: TThreadPriority;
+{$ENDIF}
+    fWhichprotocol: TWhichProtocol;
+    fBlockSizeFlags: TDXBlockSizeFlags;
+    fServerType: TServerType;
+    fDummy: AnsiString;
+  protected
+    procedure SetActive(value: boolean);
+    procedure SetSuspend(value: boolean);
+    function GetThreadCacheSize: Integer;
+    procedure SetThreadCacheSize(value: Integer);
+    function GetSocket: TDXSock;
+    procedure SetfiMaxConn(Value: Integer);
+  public
+    constructor Create(AOwner:TComponent); {$IFNDEF OBJECTS_ONLY} override; {$ENDIF}
+    destructor Destroy; override;
+    function ActiveNumberOfConnections: Integer;
+    procedure Start; virtual;
+    procedure Stop; virtual;
+    procedure Open;
+    procedure Close;
+    procedure Pause;
+    procedure Resume;
+    property Socket: TDXSock read GetSocket;
+    function InternalSessionTracker:TDXSessionTracker;
+//    property :TDXSessionTracker read GetSessionTracker;
+  published
+{$IFDEF MSWINDOWS}
+    property ListenerThreadPriority: TThreadPriority read fltPriority
+      write fltPriority;
+    property SpawnedThreadPriority: TThreadPriority read fstPriority
+      write fstPriority;
+{$ENDIF}
+    property IsActive: Boolean read fbActive;
+    property Suspend: Boolean read fbSuspend
+      write SetSuspend;
+    property UseSSL: Boolean read fbSSL
+      write fbSSL;
+    property UseThreadPool: Boolean read fbBufferCreates
+      write fbBufferCreates;
+    property BindTo: AnsiString read fsBindTo
+      write fsBindTo;
+    property ServerPort: Integer read fiServerPort
+      write fiServerPort;
+    property OnNewConnect: TDX_NewConnect read feNewConnect
+      write feNewConnect;
+    property OnMaxConnects: TDX_MaxConnects read feMaxConnects
+      write feMaxConnects;
+    property OnGoingIdle: TDX_Idle read feIdle
+      write feIdle;
+    property OnAsleep: TDX_Sleep read feSleep
+      write feSleep;
+    property OnWakeUp: TDX_WakeUp read feWakeUp
+      write feWakeUp;
+    property OnListenerFailed: TDX_ListenerFailed read feListenerFailed
+      write feListenerFailed;
+    property ProtocolToBind: TWhichProtocol read fWhichprotocol
+      write fWhichprotocol;
+    property SocketOutputBufferSize: TDXBlockSizeFlags read fBlockSizeFlags
+      write fBlockSizeFlags;
+    property ServerType: TServerType read fServerType
+      write fServerType;
+    property Service: AnsiString read fDummy write fDummy;
+    property ThreadCacheSize: Integer read GetThreadCacheSize
+      write SetThreadCacheSize;
+    property OnUDPDataNoPool: TDX_UDPData read feUDPData
+      write feUDPData;
+{$IFDEF CODE_TRACER}
+    property DXCodeTracer:TDXCodeTracer read CodeTracer
+                                        write CodeTracer;
+{$ENDIF}
+  end;
+
+implementation
+
+uses
+{$IFDEF MSWINDOWS}
+   Windows, // InterlockedXX thanks to EYAL!
+{$ENDIF}
+   SysUtils,
+   uRODXSocket;
+
+///////////////////////////////////////////////////////////////////////////////
+//CREATE:
+//       This section is created when the DXServerCore has accepted a valid
+//       socket connection from a client.
+///////////////////////////////////////////////////////////////////////////////
+
+constructor TDXClientThread.Create(CreateSuspended: Boolean);
+begin
+   inherited Create(CreateSuspended);
+   FreeOnTerminate := True;
+   Client := nil;
+   fpSessionData := nil;
+end;
+
+///////////////////////////////////////////////////////////////////////////////
+//DESTROY:
+//        Cleans-up this instance of the socket connection. Does not effect the
+//        "Listener" thread socket.
+///////////////////////////////////////////////////////////////////////////////
+
+destructor TDXClientThread.Destroy;
+begin
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctInfo,'ClientThread.Terminating');
+   End;
+{$ENDIF}
+try
+   If Assigned(ListenerThreadObject) then
+      If Assigned(TDXServerCoreThread(ListenerThreadObject).fSessionTracker) then
+         TDXServerCoreThread(ListenerThreadObject).fSessionTracker.UnregisterSession(Self);
+except
+   on E: Exception do begin
+//         E.Message;
+   end;
+end;
+try
+   if Assigned(fpSessionData) then
+      if assigned(feDestroySessionData) then
+         feDestroySessionData(Self, fpSessionData);
+except
+   on E: Exception do begin
+//         E.Message;
+   end;
+end;
+try
+   if Assigned(Client) then begin
+      Client.Free;
+      Client := nil;
+   end;
+except
+   on E: Exception do begin
+//         E.Message;
+   end;
+end;
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctInfo,'ClientThread.Terminated!');
+   End;
+{$ENDIF}
+   inherited Destroy;
+end;
+
+function TDXClientThread.GetSessionID:TMy_SessionID; // making move from INDY easier!
+Begin
+   Result:=ThreadID;
+End;
+
+///////////////////////////////////////////////////////////////////////////////
+//EXECUTE:
+//        Once this thread has "Resume"d, execute is called by TThread. This will
+//        fire the OnExecute (where the server protocol processes the connection)
+//        and once that is finished it fires the OnDisconnet event.
+///////////////////////////////////////////////////////////////////////////////
+
+procedure TDXClientThread.Execute;
+begin
+try
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctInfo,'TDXClientThread.Execute Starting '+
+         IntToStr(TDXServerCoreThread(ListenerThreadObject).FActiveConnections));
+   End;
+{$ENDIF}
+   while not Terminated do begin
+      if Assigned(Client) then begin
+         Client.OutputBufferSize := fBlockSizeFlags;
+         if Client.ValidSocket then begin
+{$IFDEF CODE_TRACER}
+            If Assigned(CodeTracer) then Begin
+               CodeTracer.SendMessage(dxctInfo,'TDXClientThread.Execute ONNEWCONNECT '+
+                  IntToStr(TDXServerCoreThread(ListenerThreadObject).FActiveConnections));
+            End;
+{$ENDIF}
+try
+            if Assigned(feNewConnect) then feNewConnect(Self);
+finally
+{$IFNDEF MSWINDOWS}
+            TDXServerCoreThread(ListenerThreadObject).MyCriticalSection.StartingWrite;
+            Dec(TDXServerCoreThread(ListenerThreadObject).FActiveConnections);
+            TDXServerCoreThread(ListenerThreadObject).MyCriticalSection.FinishedWrite;
+{$ELSE}
+            InterlockedDecrement(TDXServerCoreThread(ListenerThreadObject).FActiveConnections);
+{$ENDIF}
+end;
+{$IFDEF CODE_TRACER}
+            If Assigned(CodeTracer) then Begin
+               CodeTracer.SendMessage(dxctInfo,'TDXClientThread.Execute ONNEWCONNECT-DONE '+
+                  IntToStr(TDXServerCoreThread(ListenerThreadObject).FActiveConnections));
+            End;
+{$ENDIF}
+         end;
+      end
+      Else Begin
+         FreeOnTerminate:=True;
+         Break;
+      End;
+      // incase user destoryed my DXSock client object, test client.
+      if Assigned(Client) then begin
+try
+         if Client.IsUDPMode then Client.Sock := INVALID_SOCKET
+         else If Client.Sock<>INVALID_SOCKET then Client.CloseGracefully;
+except
+try
+         Client.Free;
+finally
+         Client:=Nil;
+end;
+end;
+      end;
+      If FreeOnTerminate then Break;
+      if not Terminated then Suspend;
+      if Terminated {and Assigned(Client)} then FreeOnTerminate:=True;
+   end;
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctInfo,'TDXClientThread.Execute Exiting.'+
+         IntToStr(TDXServerCoreThread(ListenerThreadObject).FActiveConnections));
+   End;
+{$ENDIF}
+finally
+   Terminate;
+end;
+end;
+
+///////////////////////////////////////////////////////////////////////////////
+//SETSOCKETLATER:
+//               Simple implementation of this "Thread" is to pass the Create the
+//               recently "Accept"ed Socket during the create. But, if you are
+//               producing speed by pre-creating the threads, this procedure will
+//               allow you to pre-create threads, and pass the "Socket" when the
+//               new accept is valid.
+///////////////////////////////////////////////////////////////////////////////
+
+procedure TDXClientThread.SetSocketLater(Socket: TDXSock);
+begin
+  if Assigned(Client) then begin
+    Client.Free;
+    Client := nil;
+  end;
+  Client := Socket;
+  Client.PeerIPAddress := Socket.PeerIPAddress;
+  Client.PeerPort := Socket.PeerPort;
+end;
+
+///////////////////////////////////////////////////////////////////////////////
+// 'LISTENER' THREAD
+// =================
+///////////////////////////////////////////////////////////////////////////////
+
+///////////////////////////////////////////////////////////////////////////////
+//CREATE:
+//       This is the "Outter" Thread of a server. It does the listening loop, and
+//       creates the thread that interacts with the client. Think of this as a
+//       while active listen for a connection, and on connection spawn a thread
+//       for the client connection (DXServerThread).
+///////////////////////////////////////////////////////////////////////////////
+
+constructor TDXServerCoreThread.Create(CreateSuspended: Boolean);
+begin
+  inherited Create(CreateSuspended);
+  {$IFDEF MSWINDOWS}
+  FreeOnTerminate := True;
+  {$ELSE}
+  FreeOnTerminate := False;
+  {$ENDIF}
+  ListenerSocket := TDXSock.Create;
+  fsBindTo := '';
+  fiServerPort := 0;
+  fiMaxConn := 200;
+  FActiveConnections := 0;
+  fbAnnouncedIdle := False;
+  fbBufferCreates := True;
+  fThreadPool := TList.Create;
+  MyCriticalSection:=TDXCritical.Create;
+  fSessionTracker:=TDXSessionTracker.Create(Nil);
+end;
+
+///////////////////////////////////////////////////////////////////////////////
+//DESTROY:
+//        Kills the Listener Socket.
+///////////////////////////////////////////////////////////////////////////////
+
+destructor TDXServerCoreThread.Destroy;
+begin
+  if Assigned(fThreadPool) then begin
+    MyCriticalSection.StartingWrite;
+    while fThreadPool.Count > 0 do begin
+      if Assigned(fThreadPool[0]) then
+      try
+        TDXClientThread(fThreadPool[0]).ListenerThreadObject:=Nil;
+        fSessionTracker.UnRegisterSession(TDXClientThread(fThreadPool[0]));
+      finally
+        try
+// this will raise an exception if it is already set "FreeOnTerminate"!
+          TDXClientThread(fThreadPool[0]).FreeOnTerminate:=True;
+          TDXClientThread(fThreadPool[0]).Terminate;
+        except
+        end;
+      end;
+      fThreadPool.Delete(0);
+    end;
+    fThreadPool.Free;
+    fThreadPool := nil;
+    MyCriticalSection.FinishedWrite;
+  end;
+  fSessionTracker.Free;
+  fSessionTracker:=Nil;
+try
+  if Assigned(ListenerSocket) then ListenerSocket.Free;
+finally
+  ListenerSocket:=Nil;
+end;
+  MyCriticalSection.Free;
+  inherited Destroy;
+end;
+
+function TDXServerCoreThread.ActiveNumberOfConnections: Integer;
+begin
+// 7-27   MyCriticalSection.StartingRead;
+   Result := fActiveConnections;
+// 7-27   MyCriticalSection.FinishedRead;
+end;
+
+///////////////////////////////////////////////////////////////////////////////
+//SETBUFFERCREATES:
+//                 To be safe, you should not change the Buffer Creates if you
+//                 have already started listening. I try to make sure nothing gets
+//                 messed up, but potentially you could crash yourself!
+///////////////////////////////////////////////////////////////////////////////
+
+procedure TDXServerCoreThread.SetBufferCreates(value: Boolean);
+begin
+  if fActiveConnections > 0 then Exit;
+  fbBufferCreates := Value;
+  if not Value then
+    if fiMaxConn < 1 then fiMaxConn := 100;
+end;
+
+procedure TDXServerCoreThread.SetSuspend(value: Boolean);
+begin
+  fbSuspend := Value;
+end;
+
+function TDXServerCoreThread.GetSocket: TDXSock;
+begin
+  Result := ListenerSocket;
+end;
+
+///////////////////////////////////////////////////////////////////////////////
+//EXECUTE:
+//        This is the "Loop" for the server. It listens on the specified port and
+//        IP address(es). As a connection comes in, it creates a DXServerThread
+//        and gives it a new instance of the client socket. At that point the new
+//        DXServerThread runs independant of this thread. If you wish to have a
+//        pool of DXServerThreads suspended this is the section to change! When
+//        a new DXServerThread is created, all of the "Events" are passed to it,
+//        which means you "Server" events better be threadsafe!
+//
+//        Events: OnIdle is fired one the server has stopped receiving connection
+//        requests. It is fired everytime the server goes idle from connection(s)
+//        OnSleep is fired every two seconds after this loop has gone Idle.
+///////////////////////////////////////////////////////////////////////////////
+
+procedure TDXServerCoreThread.Execute;
+var
+  toggleSleep: Integer;
+  DXClientThread: TDXClientThread;
+  newClient: TDXSock;
+
+  function InitializeThreading(UDP: Boolean): Boolean;
+  var
+    NewListen: PNewListen;
+    Ws:AnsiString;
+
+  begin
+    toggleSleep := 0;
+    Result := False;
+    if (Length(fsBindTo) > 7) then ListenerSocket.BindTo := fsBindTo;
+    New(NewListen);
+    with NewListen^ do begin
+      Port := fiServerPort;
+      UseNAGLE := True;
+      UseBlocking := True;
+      UseUDP := UDP;
+      WinsockQueue := 100;
+      ConnectionLess := UDP; // 2.0.12
+    end;
+    if not ListenerSocket.Listen(NewListen) then begin
+{$IFDEF CODE_TRACER}
+       If Assigned(CodeTracer) then Begin
+          CodeTracer.SendMessage(dxctInfo,'Listener Initialization Error: '+
+             ListenerSocket.GetErrorDesc(ListenerSocket.LastCommandStatus));
+       End;
+{$ENDIF}
+      if Assigned(feListenerFailed) then begin
+        feListenerFailed(ListenerSocket.LastCommandStatus);
+      end
+      else begin
+        Str(fiServerPort,Ws);
+{$IFDEF MSWINDOWS}
+        If IsConsole then Begin
+           Beep;
+           Beep;
+           Beep;
+           Writeln(AnsiString('Listener on port ') +Ws+AnsiString(', ')+
+              ListenerSocket.GetErrorDesc(ListenerSocket.LastCommandStatus));
+           DoSleepEx(1000);
+        End
+        Else
+{$ENDIF}
+           ShowMessageWindow(
+            'Listener on port ' +{$IFDEF UNICODE}AnsiStringToWideString{$ENDIF} (Ws),
+             {$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(ListenerSocket.GetErrorDesc(ListenerSocket.LastCommandStatus)));
+      end;
+      Dispose(NewListen);
+      Exit;
+    end;
+    Dispose(NewListen);
+    Result := True;
+  end;
+
+  procedure EventsOrSleep;
+  begin
+// 3.0b    DoSleepEx(1);
+    if toggleSleep < 2000 then begin
+      Inc(toggleSleep);
+      if (toggleSleep>1000) and not fbAnnouncedIdle then begin
+{$IFDEF CODE_TRACER}
+         If Assigned(CodeTracer) then Begin
+            CodeTracer.SendMessage(dxctInfo,'TDXServerCoreThread.GoingIdle');
+         End;
+{$ENDIF}
+        fbAnnouncedIdle := True;
+        if assigned(feIdle) then feIdle(Self);
+        ProcessWindowsMessageQueue; // have to do incase event was GUI based.
+      end;
+    end
+    else begin
+      if fbAnnouncedIdle then begin
+{$IFDEF CODE_TRACER}
+         If Assigned(CodeTracer) then Begin
+            CodeTracer.SendMessage(dxctInfo,'TDXServerCoreThread.GoingAsleep');
+         End;
+{$ENDIF}
+        if assigned(feSleep) then feSleep(Self);
+        ProcessWindowsMessageQueue; // have to do - incase event was GUI based.
+        fbAnnouncedIdle := False;
+      end;
+      if toggleSleep < 5000 {3.0 - was 50} then Inc(toggleSleep)
+      else begin
+        DoSleepEx(1); // 7-27
+        ProcessWindowsMessageQueue;
+      end;
+    end;
+  end;
+
+procedure ThreadAtATime;
+begin
+   DXClientThread := TDXClientThread.Create(True);
+   DXClientThread.Client:=TDXSock.Create; // 3.0d
+{$IFDEF MSWINDOWS}
+   DXClientThread.Priority := fstPriority;
+{$ENDIF}
+   DXClientThread.OnNewConnect := feNewConnect;
+   DXClientThread.fBlockSizeFlags := fBlockSizeFlags;
+   DXClientThread.ListenerThreadObject:=Self;
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctInfo,'TDXServerCoreThread.Execute.ThreadAtATime Ready');
+   End;
+{$ENDIF}
+   While not Terminated do Begin
+      if (FActiveConnections < fiMaxConn) then begin
+         if fbSuspend then DoSleepEx(20)
+         else
+         if ListenerSocket.Accept(DXClientThread.Client) then begin
+{$IFDEF CODE_TRACER}
+            If Assigned(CodeTracer) then Begin
+               DXClientThread.CodeTracer:=CodeTracer;
+            End;
+{$ENDIF}
+            fSessionTracker.RegisterSession(DXClientThread);
+            DXClientThread.Resume;
+{$IFNDEF MSWINDOWS}
+            MyCriticalSection.StartingWrite;
+            Inc(FActiveConnections);
+            MyCriticalSection.FinishedWrite;
+{$ELSE}
+            InterlockedIncrement(FActiveConnections);
+{$ENDIF}
+            if (fbAnnouncedIdle) then Begin
+{$IFDEF CODE_TRACER}
+               If Assigned(CodeTracer) then Begin
+                  CodeTracer.SendMessage(dxctInfo,'TDXServerCoreThread.WakeUp');
+               End;
+{$ENDIF}
+               If Assigned(feWakeUp) then feWakeUp(Self);
+            End;
+            DXClientThread := TDXClientThread.Create(True);
+            DXClientThread.Client:=TDXSock.Create; // 3.0d
+{$IFDEF MSWINDOWS}
+            DXClientThread.Priority := fstPriority;
+{$ENDIF}
+            DXClientThread.OnNewConnect := feNewConnect;
+            DXClientThread.fBlockSizeFlags := fBlockSizeFlags;
+            DXClientThread.ListenerThreadObject:=Self;
+
+            fbAnnouncedIdle := False;
+            toggleSleep := 0;
+         end
+         else EventsOrSleep;
+      end
+      else
+      begin
+         if assigned(feMaxConnects) then Begin
+            feMaxConnects(Self);
+            ProcessWindowsMessageQueue; // have to do incase event was GUI based.
+         End
+         else
+         DoSleepEx(1); //3.0
+      end;
+
+   End;
+   fSessionTracker.UnRegisterSession(DXClientThread);
+   {$IFDEF MSWINDOWS}
+   DXClientThread.Resume;
+   DXClientThread.Terminate;
+   WaitForSingleObject(DXClientThread.Handle, INFINITE);
+   {$ELSE}
+   DXClientThread.FreeOnTerminate:=True;
+   DXClientThread.Terminate;
+   {$ENDIF}
+end;
+
+procedure ThreadPool;
+var
+   NextThread: Integer;
+   LoopCount: Integer;
+   Done:Boolean;
+
+begin
+   while fThreadPool.Count < fiMaxConn - 1 do begin
+      DXClientThread := TDXClientThread.Create(True);
+      DXClientThread.FreeOnTerminate:=False; // flags "Is ThreadPool".
+{$IFDEF MSWINDOWS}
+      DXClientThread.Priority:=fstPriority;
+{$ENDIF}
+      DXClientThread.OnNewConnect:=feNewConnect;
+      DXClientThread.fBlockSizeFlags:=fBlockSizeFlags;
+      DXClientThread.ListenerThreadObject:=Self;
+      DXClientThread.Client:=Nil;
+      fThreadPool.Add(DXClientThread);
+      fSessionTracker.RegisterSession(DXClientThread);
+   end;
+   LoopCount := fThreadPool.Count;
+   NextThread := 0;
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctInfo,'TDXServerCoreThread.Execute.ThreadPool Ready');
+   End;
+{$ENDIF}
+   While not Terminated do Begin
+      if fbSuspend then DoSleepEx(20)
+      else if ListenerSocket.Accept(TDXClientThread(fThreadPool[NextThread]).Client) then begin
+{$IFDEF CODE_TRACER}
+         If Assigned(CodeTracer) then Begin
+            DXClientThread.CodeTracer:=CodeTracer;
+         End;
+{$ENDIF}
+         TDXClientThread(fThreadPool[NextThread]).Resume;
+{$IFNDEF MSWINDOWS}
+         MyCriticalSection.StartingWrite;
+         Inc(FActiveConnections);
+         MyCriticalSection.FinishedWrite;
+{$ELSE}
+         InterlockedIncrement(FActiveConnections);
+{$ENDIF}
+         Inc(NextThread);
+         if NextThread >= LoopCount then NextThread := 0;
+         Done:=False;
+         while (not Terminated) and (not fbSuspend) and (not done) do begin
+            If TDXClientThread(fThreadPool[NextThread]).Client=Nil then Done:=True
+            Else If Not TDXClientThread(fThreadPool[NextThread]).Client.ValidSocket then Done:=True
+            Else Begin
+               Inc(NextThread);
+               if NextThread >= LoopCount then NextThread := 0;
+            End;
+         end;
+         toggleSleep := 0;
+         if (fbAnnouncedIdle) then Begin
+{$IFDEF CODE_TRACER}
+            If Assigned(CodeTracer) then Begin
+               CodeTracer.SendMessage(dxctInfo,'TDXServerCoreThread.WakeUp');
+            End;
+{$ENDIF}
+            If Assigned(feWakeUp) then feWakeUp(Self);
+         End;
+         fbAnnouncedIdle := False;
+      end
+      else EventsOrSleep;
+   End;
+end;
+
+{$WARNINGS OFF}
+procedure UDPSingleThreaded;
+Var
+   Data:Pointer;
+   DataSize:Integer;
+begin
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctInfo,'TDXServerCoreThread.Execute.UDPSingleThread Ready');
+   End;
+{$ENDIF}
+   if Assigned(feUDPData) then Data:=SysGetMem(TDXMaxSocketBuffer) else Data := nil;
+   While not Terminated do Begin
+      if (FActiveConnections < fiMaxConn) then begin
+         if fbSuspend then DoSleepEx(20)
+         else if ListenerSocket.Readable then begin
+            if Assigned(feUDPData) then Begin
+{$IFDEF VER100}
+               DataSize:=ListenerSocket.BlockRead(Data,TDXMaxSocketBuffer);
+{$ELSE}
+               DataSize:=ListenerSocket.Read(Data,TDXMaxSocketBuffer);
+{$ENDIF}
+               feUDPData(Data,inet_ntoa(ListenerSocket.SockAddr.sin_addr),
+                  ntohs(ListenerSocket.SockAddr.sin_port),DataSize);
+            End
+            Else Begin
+               newClient := TDXSock.Create;
+               newClient.Sock := ListenerSocket.Sock;
+               newClient.IsUDPMode := True;
+               DXClientThread := TDXClientThread.Create(True);
+               DXClientThread.SetSocketLater(newClient);
+{$IFDEF MSWINDOWS}
+               DXClientThread.Priority := fstPriority;
+{$ENDIF}
+               DXClientThread.OnNewConnect := feNewConnect;
+               DXClientThread.fBlockSizeFlags := fBlockSizeFlags;
+               DXClientThread.ListenerThreadObject:=Self;
+               fSessionTracker.RegisterSession(DXClientThread);
+{$IFDEF CODE_TRACER}
+               If Assigned(CodeTracer) then Begin
+                  DXClientThread.CodeTracer:=CodeTracer;
+               End;
+{$ENDIF}
+               DXClientThread.Resume;
+            End;
+ //           DoSleepEx(1); { a must - tests show this cleans up the reads tremendously!}
+            if (fbAnnouncedIdle) then Begin
+{$IFDEF CODE_TRACER}
+               If Assigned(CodeTracer) then Begin
+                  CodeTracer.SendMessage(dxctInfo,'TDXServerCoreThread.WakeUp');
+               End;
+{$ENDIF}
+               If Assigned(feWakeUp) then feWakeUp(Self);
+            End;
+            toggleSleep:=0;
+            fbAnnouncedIdle:=False;
+         end
+         else
+            EventsOrSleep;
+      end
+      else begin
+         if assigned(feMaxConnects) then Begin
+            feMaxConnects(Self);
+            ProcessWindowsMessageQueue; // have to do incase event was GUI based.
+         end
+         else
+         begin
+            DoSleepEx(1);
+         end;
+      end;
+   End;
+   if Assigned(feUDPData) then SysFreeMem(Data);
+end;
+{$WARNINGS ON}
+
+begin
+   If terminated then exit;
+   if not Assigned(ListenerSocket) then begin
+      ShowMessageWindow(
+         'Developer Trap #2',
+         'You must pass the listerner socket. You have coded around ' +
+         'our fail-safe routines!');
+      Exit;
+   end;
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctInfo,'TDXServerCoreThread.Execute');
+   End;
+{$ENDIF}
+try
+   if not InitializeThreading({False}fWhichprotocol=wpUDPOnly) then Exit;
+   if fWhichprotocol=wpUDPOnly then UDPSinglethreaded
+   else begin
+      case fbBufferCreates of
+         False: begin
+            ThreadAtATime;
+         end;
+         else begin
+            ThreadPool;
+         end;
+      end;
+   end;
+finally
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctInfo,'TDXClientThread.Execute Terminating');
+   End;
+{$ENDIF}
+{$IFNDEF MSWINDOWS}
+   FreeOnTerminate:=False;
+   Terminate;
+{$ENDIF}
+end;
+end;
+
+///////////////////////////////////////////////////////////////////////////////
+// ANCESTOR TO ALL PROTOCOLS
+// =========================
+// DXSERVERCORE - Mainly Allows for "Properties" to be defined. And to Start,
+// Stop, and Suspend the 'LISTNER' Thread.
+///////////////////////////////////////////////////////////////////////////////
+
+///////////////////////////////////////////////////////////////////////////////
+//CREATE:
+//       Protocols use this object to interact with the DXSock environment. This
+//       Section allows the protocol to specify the status of the server.
+///////////////////////////////////////////////////////////////////////////////
+constructor TDXServerCore.Create(AOwner: TComponent);
+begin
+   inherited create(aowner);
+   fbActive:=False;
+   fiMaxConn:=200;
+   fbBufferCreates:=True;
+{$IFDEF MSWINDOWS}
+   fstPriority:=tpNormal;
+   fltPriority:=tpNormal;
+{$ENDIF}
+   fWhichProtocol:=wpTCPOnly;
+   fBlockSizeFlags:=bsfHuge;
+   fServerType:=stThreadBlocking;
+end;
+
+///////////////////////////////////////////////////////////////////////////////
+//DESTROY:
+//        If the cleans up any pending threads.
+///////////////////////////////////////////////////////////////////////////////
+
+destructor TDXServerCore.Destroy;
+begin
+   if fbActive then SetActive(False);
+   inherited destroy;
+end;
+
+function TDXServerCore.GetSocket: TDXSock;
+begin
+   if Assigned(ListenerThread) then
+      Result := ListenerThread.ListenerSocket
+   else Result := nil;
+end;
+
+function TDXServerCore.ActiveNumberOfConnections: Integer;
+begin
+   if Assigned(ListenerThread) then  Result := ListenerThread.ActiveNumberOfConnections
+   else Result := 0;
+end;
+
+procedure TDXServerCore.SetActive(value: boolean);
+begin
+{$IFNDEF OBJECTS_ONLY}
+   if (csDesigning in ComponentState) then exit;
+{$ENDIF}
+   fbSuspend := False;
+
+   if Value <> fbActive then begin
+      if Value then begin
+         if not Assigned(feNewConnect) then begin
+            if Not Assigned(feUDPData) then Begin
+               ShowMessageWindow(
+                  'Developer Trap #1!',
+                  'You must specify a OnNewConnect Event!');
+               Exit;
+            End;
+         end;
+         fbActive:=Value;
+{$IFDEF CODE_TRACER}
+         If Assigned(CodeTracer) then Begin
+            CodeTracer.StartTransaction;
+            CodeTracer.SendMessage(dxctDebug,'TDXSServerCore.Active=True');
+            CodeTracer.SendObject(dxctDebug,Self);
+         End;
+{$ENDIF}
+         fbSuspend := False;
+         ListenerThread := TDXServerCoreThread.Create(True);
+         ListenerThread.fsBindTo := fsBindTo;
+         ListenerThread.fiServerPort := fiServerPort;
+         ListenerThread.fiMaxConn := fiMaxConn;
+         ListenerThread.feNewConnect := feNewConnect;
+         ListenerThread.feMaxConnects := feMaxConnects;
+         ListenerThread.feListenerFailed := feListenerFailed;
+         ListenerThread.feIdle := feIdle;
+         ListenerThread.feSleep := feSleep;
+         ListenerThread.feWakeUp := feWakeUp;
+{$IFDEF MSWINDOWS}
+         ListenerThread.Priority := fltPriority;
+         ListenerThread.SpawnedThreadPriority := fstPriority;
+{$ENDIF}
+         ListenerThread.fBlockSizeFlags := fBlockSizeFlags;
+         ListenerThread.fbSuspend := False;
+         ListenerThread.feUDPData:=feUDPData; // 3.0c
+{$IFNDEF FPC}
+       {$WARN SYMBOL_PLATFORM	OFF}
+         If DebugHOOK<>0 then ListenerThread.fbBufferCreates:=False
+       {$WARN SYMBOL_PLATFORM	ON}  
+         Else
+{$ENDIF}
+           ListenerThread.fbBufferCreates := fbBufferCreates;
+
+{$IFDEF CODE_TRACER}
+         If Assigned(CodeTracer) then Begin
+            ListenerThread.CodeTracer:=CodeTracer;
+         End;
+{$ENDIF}
+
+         ListenerThread.fWhichProtocol := fWhichProtocol;
+         ListenerThread.Resume;
+      end
+      else begin
+         fbActive:=Value;
+         if Assigned(ListenerThread) then begin
+{$IFDEF CODE_TRACER}
+            If Assigned(CodeTracer) then Begin
+               CodeTracer.SendMessage(dxctInfo,'DXServerCore.ListenerThread still existed - terminating');
+            End;
+{$ENDIF}
+            If ListenerThread.Suspended then ListenerThread.Resume;
+            {$IFNDEF MSWINDOWS}
+            ListenerThread.FreeOnTerminate:=True;
+            {$ENDIF}
+            ListenerThread.Terminate;
+// 9/11/2002
+            {$IFDEF MSWINDOWS}
+            WaitForSingleObject(ListenerThread.Handle, INFINITE); 
+            {$ENDIF}
+//            ListenerThread.WaitFor;
+//            ListenerThread.Free;
+         end;
+// 9/11/2002
+//         ListenerThread:=Nil;
+{$IFDEF CODE_TRACER}
+         If Assigned(CodeTracer) then Begin
+            CodeTracer.SendObject(dxctDebug,Self);
+            CodeTracer.SendMessage(dxctDebug,'TDXSServerCore.Active=False');
+            CodeTracer.EndTransaction;
+         End;
+{$ENDIF}
+      end;
+   end;
+end;
+
+procedure TDXServerCore.Start;
+begin
+   SetActive(True);
+end;
+
+procedure TDXServerCore.Stop;
+begin
+   SetActive(False);
+end;
+
+procedure TDXServerCore.Open;
+begin
+   Start;
+end;
+
+procedure TDXServerCore.Close;
+begin
+   Stop;
+end;
+
+procedure TDXServerCore.Pause;
+begin
+   SetSuspend(True);
+End;
+
+procedure TDXServerCore.Resume;
+begin
+   SetSuspend(False);
+End;
+
+procedure TDXServerCore.SetSuspend(value: boolean);
+begin
+   if fbActive then begin
+      fbSuspend := Value;
+      ListenerThread.SuspendListener := Value;
+   end;
+end;
+
+procedure TDXServerCore.SetfiMaxConn(Value: Integer);
+begin
+   if Value < 1 then begin
+{$IFNDEF FPC}
+   {$WARN SYMBOL_PLATFORM	OFF}
+      if DebugHOOK <> 0 then Exit; {cant enable this from within DELPHI live!}
+   {$WARN SYMBOL_PLATFORM	ON}   
+{$ENDIF}
+      fiMaxConn := -1;
+      fbBufferCreates := True;
+   end
+   else fiMaxConn := Value;
+end;
+
+function TDXServerCore.GetThreadCacheSize: Integer;
+begin
+   Result := fiMaxConn;
+end;
+
+procedure TDXServerCore.SetThreadCacheSize(value: Integer);
+begin
+   SetfiMaxConn(Value);
+end;
+
+function TDXServerCore.InternalSessionTracker:TDXSessionTracker;
+Begin
+   if Assigned(ListenerThread) then  Result:=ListenerThread.fSessionTracker
+   Else Result:=Nil;
+End;
+
+end.
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXSessionTracker.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXSessionTracker.pas
new file mode 100644
index 0000000..12dd243
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXSessionTracker.pas	
@@ -0,0 +1,135 @@
+unit uRODXSessionTracker;
+
+interface
+
+///////////////////////////////////////////////////////////////////////////////
+//    Component: TDXSessionTracker
+//       Author: G.E. Ozz Nixon Jr. (onixon@dxsock.com)
+// ========================================================================
+// Source Owner: DX, Inc. 1995-2002
+//    Copyright: All code is the property of DX, Inc. Licensed for
+//               resell by Brain Patchwork DX (tm) and part of the
+//               DX (r) product lines, which are (c) 1999-2002
+//               DX, Inc. Source may not be distributed without
+//               written permission from both Brain Patchwork DX,
+//               and DX, Inc.
+//      License: (Reminder), None of this code can be added to other
+//               developer products without permission. This includes
+//               but not limited to DCU's, DCP's, DLL's, OCX's, or
+//               any other form of merging our technologies. All of
+//               your products released to a public consumer be it
+//               shareware, freeware, commercial, etc. must contain a
+//               license notification somewhere visible in the
+//               application.
+//               Example is Internet Explorer - Help->About screen
+//               shows the licensed code contained in the application.
+// Code Version: (3rd Generation Code)
+// ========================================================================
+//  Description:
+// ========================================================================
+///////////////////////////////////////////////////////////////////////////////
+{$I uRODXSock.def}
+uses
+  uRODXString,
+  Classes;
+
+{$DEFINE BYPASS}
+
+type
+  TDXSessionTracker = class(TDXComponent)
+  private
+    fSessionArray:TList;
+  protected
+  public
+    constructor Create(AOwner:TComponent); override;
+    destructor Destroy; override;
+    Procedure RegisterSession(ClientThread:TThread);
+    Procedure UnregisterSession(ClientThread:TThread);
+    Procedure CloseAllSessions;
+    Procedure ClearAllSessions;
+  published
+  end;
+
+implementation
+
+Uses
+   uRODXServerCore;
+
+constructor TDXSessionTracker.Create(AOwner:TComponent);
+begin
+   inherited;
+   fSessionArray:=TList.Create;
+end;
+
+destructor TDXSessionTracker.Destroy;
+begin
+   fSessionArray.Free;
+   CloseAllSessions;
+   ClearAllSessions;
+   inherited Destroy;
+end;
+
+Procedure TDXSessionTracker.RegisterSession(ClientThread:TThread);
+Begin
+{$IFNDEF BYPASS}
+   MyCriticalSection.StartingWrite;
+   fSessionArray.Add(TDXClientThread(ClientThread));
+   MyCriticalSection.FinishedWrite;
+{$ENDIF}
+End;
+
+Procedure TDXSessionTracker.UnregisterSession(ClientThread:TThread);
+//Var
+   //Loop:Integer;
+   //LookingFor:Cardinal;
+
+Begin
+{$IFNDEF BYPASS}
+   LookingFor:=TDXClientThread(ClientThread).ThreadID;
+   MyCriticalSection.StartingRead;
+   Loop:=0;
+   While Loop<fSessionArray.Count do Begin
+      If TDXClientThread(fSessionArray[Loop]).ThreadID=LookingFor then Begin
+         MyCriticalSection.FinishedRead;
+         MyCriticalSection.StartingWrite;
+         fSessionArray.Delete(Loop);
+         MyCriticalSection.FinishedWrite;
+         Exit;
+      End
+      Else Inc(Loop);
+   End;
+   MyCriticalSection.FinishedRead;
+{$ENDIF}
+End;
+
+Procedure TDXSessionTracker.CloseAllSessions;
+//Var Loop:Integer;
+
+Begin
+{$IFNDEF BYPASS}
+   MyCriticalSection.StartingWrite;
+   Loop:=0;
+   While Loop<fSessionArray.Count do Begin
+      If Assigned(TDXClientThread(fSessionArray[Loop]).Socket) then
+         TDXClientThread(fSessionArray[Loop]).Socket.CloseGracefully;
+      Inc(Loop);
+   End;
+   MyCriticalSection.FinishedWrite;
+{$ENDIF}
+End;
+
+Procedure TDXSessionTracker.ClearAllSessions;
+Begin
+{$IFNDEF BYPASS}
+   MyCriticalSection.StartingWrite;
+   If Assigned(fSessionArray) then Begin
+      While fSessionArray.Count>0 do Begin
+         fSessionArray.Delete(0);
+      End;
+   End;
+   MyCriticalSection.FinishedWrite;
+{$ENDIF}
+End;
+
+end.
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXSock.def b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXSock.def
new file mode 100644
index 0000000..5073be9
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXSock.def	
@@ -0,0 +1,72 @@
+{$IFDEF LINUX}
+{$I ../eDefines.inc}
+{$ELSE}
+{$I ..\eDefines.inc}
+{$ENDIF LINUX}
+
+{$IFDEF FPC}
+  {$MODE DELPHI}
+{$ENDIF}
+
+// ONLY ENABLE THIS - IF YOU LICENSED OUR TLS-EDITION OF DXSOCK
+// IT IS NOT FREE - IT IS NOT INCLUDED WITH WWS - IT'S AS A LEGAL ISSUE!
+//
+{.$DEFINE TLS_EDITION}
+
+// ONLY ENABLE THIS - IF YOU LICENSED OUR CODE TRACER SUITE
+{.$DEFINE CODE_TRACER}
+
+// custom feature for SMTP Sender -> SMTP Relay -> track session ID
+{$DEFINE SMTP_SESSION_FEATURE}
+
+// THESE CAN BE CHANGED BY YOU:
+{.$DEFINE FINALBUILD}
+{.$DEFINE OCX_ONLY}    // not done - will be in DXSock 4.0
+{.$DEFINE OBJECTS_ONLY}
+{$IFNDEF CPU64}
+  {$DEFINE ASM8086}
+{$ENDIF}
+// LANGUAGE FILE FOR ERROR MESSAGE TEXT
+{$DEFINE ENGLISH1}
+{.$DEFINE FRENCH1}
+{.$DEFINE GERMAN1}
+{.$DEFINE ITALIAN1}
+{.$DEFINE LOWMEM1}
+{.$DEFINE PORTUGUESE1}
+{.$DEFINE RUSSIAN1}
+{.$DEFINE SPANISH1}
+{.$DEFINE TURKISH1}
+
+////////////////////////////////////////////////////////////////////////////////
+{$IFDEF VER90}
+   {$DEFINE VER100}
+{$ENDIF}
+{$IFDEF VER105}
+   {$DEFINE VER100}
+{$ENDIF}
+
+{$IFDEF FINALBUILD}
+ {$ALIGN ON}
+ {$ASSERTIONS OFF}
+ {$DEBUGINFO OFF}
+ {$DEFINITIONINFO OFF}
+ {$DESCRIPTION 'Uses Brain Patchwork DX, LLC. DXSock 3.0.0'}
+ {$EXTENDEDSYNTAX ON}
+ {$HINTS ON}
+ {$IMAGEBASE $2112CAFE}
+ {$IMPORTEDDATA ON}
+ {$IOCHECKS ON}
+ {$LOCALSYMBOLS OFF}
+ {$LONGSTRINGS ON}
+ {$OBJEXPORTALL ON}
+ {$OPTIMIZATION ON}
+ {$OVERFLOWCHECKS OFF}
+ {$RANGECHECKS OFF}
+ {$REALCOMPATIBILITY OFF}
+ {$REFERENCEINFO OFF}
+ {$RUNONLY OFF}
+ {$STACKFRAMES OFF}
+ {$VARSTRINGCHECKS ON}
+ {$WARNINGS ON}
+{$ENDIF}
+// END OF FILE //
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXSock.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXSock.pas
new file mode 100644
index 0000000..5bd2ac4
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXSock.pas	
@@ -0,0 +1,1879 @@
+unit uRODXSock;
+
+///////////////////////////////////////////////////////////////////////////////
+//    Component: TDXSock
+//       Author: G.E. Ozz Nixon Jr. (onixon@dxsock.com)
+// ========================================================================
+// Source Owner: DX, Inc. 1995-2002
+//    Copyright: All code is the property of DX, Inc. Licensed for
+//               resell by Brain Patchwork DX (tm) and part of the
+//               DX (r) product lines, which are (c) 1999-2002
+//               DX, Inc. Source may not be distributed without
+//               written permission from both Brain Patchwork DX,
+//               and DX, Inc.
+//      License: (Reminder), None of this code can be added to other
+//               developer products without permission. This includes
+//               but not limited to DCU's, DCP's, DLL's, OCX's, or
+//               any other form of merging our technologies. All of
+//               your products released to a public consumer be it
+//               shareware, freeware, commercial, etc. must contain a
+//               license notification somewhere visible in the
+//               application.
+//               Example is Internet Explorer - Help->About screen
+//               shows the licensed code contained in the application.
+// Code Version: (3rd Generation Code)
+// ========================================================================
+//  Description: Low-Level Socket Wrapper as an Object.
+// ========================================================================
+// 3.0a (pre-release)
+// Changes GetMem/FreeMem to SysGetMem/SysFreeMem
+///////////////////////////////////////////////////////////////////////////////
+
+interface
+
+{$I uRODXSock.def}
+
+uses
+{$IFNDEF MSWINDOWS}
+  sockets,
+{$ENDIF}
+{$IFDEF MSWINDOWS}
+  WinSock,  
+{$ENDIF}
+  uRODXSocket,
+{$IFDEF CODE_TRACER}
+  DXCodeTracer,
+{$ENDIF}
+{$IFDEF TLS_EDITION}
+  MjbLIFO,
+  BrkApart,
+{$ENDIF}
+  Classes;
+
+const
+  TDXHugeSize=8192{*2};                      // 16kb CHUNKS
+  TDXXferTimeout: Word = 500;              // if data loss then set to 5000
+  TDXMaxSocketBuffer: Word = TDXHugeSize;  // Winsock Buffer Size
+  PeekBufferSize: Byte = 250;              // do not go over 250!
+
+type
+  Str1 = ansistring;
+  Str2 = AnsiChar;
+
+  //
+//     *   <B>ddAboutToWrite</B> denotes that your Socket Layer
+//         filter should encode, or compress the data.
+//     *   <B>ddAfterRead</B> denotes that your Socket Layer
+//         filter should decode, or decompres the data
+//     *   <B>dFreePointer</B> denotes that your Socket Layer
+//         filter should free the work pointer
+  TDXDataDirection = (ddAboutToWrite, ddAfterRead, ddCleanRead, ddFreePointer);
+
+  TDXFilterCallBack = Procedure(DataDirection: TDXDataDirection; Const InData: Pointer; Var OutData: Pointer; Const
+    InSize: Integer; Var OutSize: Integer; Var Handled: Boolean; xClientThread: TThread) Of Object;
+
+  // This controls outbound data only. It was implemented to
+  // assist people who wanted to be able to just say send this big
+  // chunk of data, without undertsanding the socket layer itself.
+  //
+  //
+  //     *   <B>bsfRealSmall</B> uses 128 byte block of data.
+  //         Obviously smaller than a TCP packet. And with Nagle
+  //         enabled it would actually slow down your output.
+  //         However, if you are designing a UDP based
+  //         application, and know the average package size will
+  //         be under 128 bytes, then you should set your output
+  //         buffer to this setting. Used: <B>Very Rare</B>
+  //     *   <B>bsfSmall</B> uses 256 byte block of data. Which is
+  //         a standard TCP packet. Used: <B>Occasionally</B>
+  //     *   <B>bsfNormal</B> uses 512 byte block of data. Which
+  //         is bigger than a standard TCP packet, but is optimial
+  //         when you know your data is usually bigger than 256
+  //         bytes, and smaller than 512. Our testing has shown
+  //         this to be very optimal when using that rule. Used: <B>Very
+  //         Frequently</B>
+  //     *   <B>bsfBigger</B> uses a 2048 byte block of data.
+  //         Again, bigger than a standard TCP packet. Used <B>Very
+  //         Rare</B>
+  //     *   <B>bsgBiggest</B> uses a 4096 byte block of data.
+  //         Bigger than a standard TCP packet, but is used very
+  //         often by people who are porting from DOS based
+  //         applications to windows. They are used to the old
+  //         Borland examples which used 4kb buffers for file copy
+  //         etc. Used: <B>Often</B>
+  //     *   <B>bsfHUGE</B> uses a 8192 byte block of data. Bigger
+  //         than a standard TCP packet, but produces the best
+  //         performance. Especially is you plan to just say "Send
+  //         this data, who cares how big it is". Used: <B>Most
+  //         Often</B>
+  // <B>Note</B> when we point out that the block of data is
+  // bigger then a standard TCP packet, that is just a mental note
+  // for you. The socket layer will always build the packet to the
+  // appropriate network packet size. These buffers are strictly
+  // used internally for how to break the data apart and shove it
+  // down to the socket layer.
+  //
+  //
+  //
+  // Summary
+  // Define the packet size between DXSock and the Socket Layer.
+  TDXBlockSizeFlags = (
+    bsfZero, // special meaning for TLS!
+    bsfRealSmall,
+    bsfSmall, bsfNormal,
+    bsfBigger,
+    bsfBiggest,
+    bsfHUGE);
+
+Type
+  TDXBSArray=Array [0..65500] of AnsiChar;
+  TDXBSArray2=Array [0..250] of AnsiChar;
+
+  TDXSock = class
+  private
+{$IFDEF CODE_TRACER}
+    CodeTracer:TDXCodeTracer;
+{$ENDIF}
+{$IFDEF TLS_EDITION}
+    tBuf: TBrkApart;
+    tStack: TMJBLIFO;
+    Straggler: AnsiString;
+{$ENDIF}
+    FClientThread:TThread;
+    FTLS:Boolean;
+    fChunkBuf:Pointer; // 3.0a
+    fbClientMode: Boolean;
+    fbIsUDP: Boolean;
+    fbIsKeepAlive: Boolean;
+    FsBindTo: AnsiString;
+    FPeekBuffer: ^TDXBSArray2;
+    FReadTimeout: Boolean;
+    FUseBlocking: Boolean;
+    FBlockSizeFlags: TDXBlockSizeFlags;
+    FActualBlockSize: Integer;
+    FErrStatus: Integer;
+    fTooManyCharacters: Integer;
+    feOnFilter: TDXFilterCallBack;
+{$IFDEF TLS_EDITION}
+    feOnReadFilter: TDXFilterCallBack;
+{$ENDIF}
+    GlobalPeerPort: Integer;
+    GlobalPeerIPAddress: Ansistring;
+    GlobalTimeout: TTimeVal;
+    VarConstSizeofTSockAddrIn:Integer;
+  protected
+    function GetReleaseDate: AnsiString;
+    procedure SetReleaseDate(value: AnsiString);
+    function GetLocalPort: Integer;
+    function GetLocalIPAddr: AnsiString;
+    function IsConnected: Boolean;
+    function IsValidSocket: Boolean;
+    function IsReadable: Boolean;
+    function IsWritable: Boolean;
+    function DidReadTimeout: Boolean;
+    procedure SetfBlockSizeFlags(Value: TDXBlockSizeFlags);
+    function CountWaiting: Integer;
+  public
+    SockAddr: TSockAddrIn;
+    Sock: TSocket;
+    constructor Create;
+    destructor Destroy; override;
+    function Connect(Parameters: PNewConnect): Boolean;
+    function Listen(Parameters: PNewListen): Boolean;
+    function Accept(var NewSock: TDXSock): Boolean;
+    procedure CloseGracefully;
+    procedure Disconnect; // Borland Friendly
+    procedure CloseNow;
+    function SendBuf(const Buf; Count: Integer): Integer; // Borland friendly
+    function ReceiveBuf(var Buf; Count: Integer): Integer; // Borland friendly
+{$IFDEF VER100}
+    function BlockWrite(buf: Pointer; len: Integer): Integer;
+    function WriteCh(c: AnsiChar): Integer;
+    function Write(const s: Ansistring): Integer;
+{$ELSE}
+    function Write(c: AnsiChar): Integer; overload;
+    function Write(const s: Ansistring): Integer; overload;
+    function Write(buf: Pointer; len: Integer): Integer; overload;
+{$ENDIF}
+    function WriteLn(const s: Ansistring): Integer;
+    function WriteResultCode(const Code: Integer; const Rslt: AnsiString): Integer;
+    function WriteWithSize(S: AnsiString): Boolean; //2.4 for ASTAIO
+    function WriteInteger(const n: integer): integer;
+
+{$IFDEF VER100}
+    function SendFromStream(Stream: TStream): Boolean;
+    function SendFromWindowsFile(var Handle: Integer): boolean;
+    function SendFromBorlandFile(var Handle: file): boolean;
+{$ELSE}
+    function SendFrom(Stream: TStream): Boolean; overload;
+    function SendFrom(var Handle: Integer): boolean; overload;
+    function SendFrom(var Handle: file): boolean; overload;
+{$ENDIF}
+    function SendFromStreamWithSize(Stream: TStream): Boolean;
+{$IFDEF VER100}
+    function BlockRead(buf: Pointer; len: Integer): Integer;
+    function Read:AnsiChar;
+{$ELSE}
+    function Read(buf: Pointer; len: Integer): Integer; overload;
+    function Read: AnsiChar; overload;
+{$ENDIF}
+    function ReadInteger: integer;
+    function ReadStr(MaxLength: Integer): Ansistring;
+    function ReadString(MaxLength: Integer; Timeout: Longword): AnsiString;
+    function ReadLn(Timeout: Longword): Ansistring;
+    function ReadCRLF(Timeout: Longword): AnsiString;
+    function ReadToAnyDelimiter(Timeout: Longword;Delimiter:AnsiString): AnsiString;
+    function ReadNull(Timeout: Longword): AnsiString;
+    function ReadSpace(Timeout: Longword): AnsiString;
+    function ReadWithSize: Ansistring; // 2.4 for ASTAIO (no TIMEOUT, just error check)
+{$IFDEF VER100}
+    function SaveToStream(Stream: TStream; Timeout: Longword): Boolean;
+    function SaveToWindowsFile(var Handle: Integer; Timeout: Longword): boolean;
+    function SaveToBorlandFile(var Handle: file; Timeout: Longword): boolean;
+{$ELSE}
+    function SaveTo(Stream: TStream; Timeout: Longword): Boolean; overload;
+    function SaveTo(var Handle: Integer; Timeout: Longword): boolean; overload;
+    function SaveTo(var Handle: file; Timeout: Longword): boolean; overload;
+{$ENDIF}
+    function SaveToStreamWithSize(Stream: TStream; Timeout: Longword): Boolean;
+    function GetChar: Str1;
+    function GetByte: Byte;
+    function FilterRead(Const InBuf: Pointer; var OutBuf: Pointer; InSize: Integer;xClientThread: TThread): Integer;
+    function PeekString: AnsiString;
+    function PeekChar: AnsiChar;
+    function GetErrorStr: AnsiString;
+    function GetErrorDesc(errorCode: Integer): AnsiString;
+    procedure SetNagle(TurnOn: Boolean);
+    procedure SetBlocking(TurnOn: Boolean);
+    procedure WinsockVersion(var WinsockInfo: PWinsockInfo);
+    // made public for new TDXSockClient:
+    procedure SockClientSetGlobal(I:AnsiString;P:Integer);
+    procedure SetTimeoutAndBuffer(SocketHandle: Integer);
+// new 3.0 features:
+    Function DroppedConnection:Boolean;
+    Function WaitForData(timeout:Longint):Boolean;
+  //published
+    property TLSActive: Boolean read FTLS write FTLS;
+    property TLSClientThread: TThread read FClientThread write FClientThread;
+    property BindTo: AnsiString read fsBindTo
+      write fsBindTo;
+    property Connected: Boolean read IsConnected;
+    property CharactersToRead: Integer read CountWaiting;
+    property ReceiveLength: Integer read CountWaiting; // Borland Friendly
+    property ValidSocket: Boolean read IsValidSocket;
+    property LastReadTimeout: Boolean read DidReadTimeout;
+    property LastCommandStatus: Integer read FErrStatus write FErrStatus;
+    property OutputBufferSize: TDXBlockSizeFlags read fBlockSizeFlags
+      write SetfBlockSizeFlags;
+    property TooManyCharacters: Integer read fTooManyCharacters
+      write fTooManyCharacters;
+    property IsUDPMode: Boolean read fbIsUDP
+      write fbIsUDP;
+    property IsKeepAliveMode: Boolean read fbIsKeepAlive write fbIsKeepAlive;
+    property PeerIPAddress: Ansistring read GlobalPeerIPAddress
+      write GlobalPeerIPAddress;
+    property PeerPort: Integer read GlobalPeerPort
+      write GlobalPeerPort;
+    property LocalIPAddress: AnsiString read GetLocalIPAddr;
+    property LocalPort: Integer read GetLocalPort;
+    property Readable: Boolean read IsReadable;
+    property Writable: Boolean read IsWritable;
+    property ReleaseDate: AnsiString read GetReleaseDate
+      write SetReleaseDate;
+    property OnFilter: TDXFilterCallBack read feOnFilter
+      write feOnFilter;
+{$IFDEF CODE_TRACER}
+    property DXCodeTracer:TDXCodeTracer read CodeTracer
+                                        write CodeTracer;
+{$ENDIF}
+{$IFDEF TLS_EDITION}
+    Property OnReadFilter: TDXFilterCallBack READ feOnReadFilter
+      WRITE feOnReadFilter;
+{$ENDIF}
+  end;
+
+implementation
+
+uses
+{$IFDEF MSWINDOWS}
+  Windows,
+{$ENDIF}
+  uRODXString, Math,
+  SysUtils;
+
+function TDXSock.GetReleaseDate: AnsiString;
+begin
+  Result := BPDX_RELEASE_DATE;
+end;
+
+procedure TDXSock.SetReleaseDate(value: AnsiString);
+begin
+       // Absorb!
+end;
+
+constructor TDXSock.Create;
+begin
+   inherited Create;
+   FReadTimeout := False;
+   FPeekBuffer:=SysGetMem(PeekBufferSize);
+   fChunkBuf:=Nil;
+   SetFBlockSizeFlags(bsfNormal); // allocates fChunkBuf
+   if not SocketLayerLoaded then
+      ShowMessageWindow('Fatal Socket Error', '(WSAStartup) ' +{$IFDEF UNICODE}AnsiStringToWideString{$ENDIF} (GetErrorStr));
+   fTooManyCharacters := 2048;
+   Sock := INVALID_SOCKET;
+   fbIsUDP := False;
+   fbIsKeepAlive := False;
+   fbClientMode := False;
+   FUseBlocking := True;
+   GlobalPeerPort := 0;
+   GlobalPeerIPAddress := '';
+   GlobalTimeout.tv_Sec := 0;
+   GlobalTimeout.tv_uSec := 10000;
+   VarConstSizeofTSockAddrIn := ConstSizeofTSockAddrIn;
+end;
+
+destructor TDXSock.Destroy;
+begin
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.EndTransaction;
+   End;
+{$ENDIF}
+{$IFDEF TLS_EDITION}
+   If assigned(tstack) Then Begin
+      tStack.Free;
+      tStack := Nil;
+   End;
+{$ENDIF}
+   If Assigned(fChunkBuf) then SysFreeMem(fChunkBuf); //,FActualBlockSize);
+   fChunkBuf:=Nil;
+   if Assigned(FPeekBuffer) then SysFreeMem(FPeekBuffer); // ,PeekBufferSize);
+   fPeekBuffer:=Nil;
+   if Sock <> INVALID_SOCKET then CloseNow;
+   inherited Destroy;
+end;
+
+procedure TDXSock.SetTimeoutAndBuffer(SocketHandle: Integer);
+begin
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctDebug,'TDXSock.SetTimeoutAndBuffer('+IntToStr(SocketHandle)+')');
+   End;
+{$ENDIF}
+   SetReceiveTimeout(SocketHandle, TDXXferTimeout, FErrStatus);
+   SetSendTimeout(SocketHandle, TDXXferTimeout, FErrStatus);
+   SetSendBuffer(SocketHandle, TDXMaxSocketBuffer, FErrStatus);
+// Certain Protocol Implementations you may want to add the div 2
+   SetReceiveBuffer(SocketHandle, TDXMaxSocketBuffer div 2, FErrStatus);
+   FErrStatus := 0;
+end;
+
+function TDXSock.Connect(Parameters: PNewConnect): Boolean;
+begin
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.StartTransaction;
+      CodeTracer.SendMessage(dxctDebug,'TDXSock.Connect');
+   End;
+{$ENDIF}
+   Result := False;
+   with Parameters^ do begin
+      FUseBlocking := UseBlocking;
+      fbIsUDP := UseUDP;
+      Sock := ClientConnectToServer(ipAddress, Port, UseUDP, UseNAGLE, @SockAddr, FErrStatus);
+      if (FErrStatus <> 0) then Exit;
+      GlobalPeerPort := ntohs(SockAddr.sin_port);
+      GlobalPeerIPAddress := inet_ntoa(SockAddr.sin_addr);
+      uRODXSocket.SetBlocking(Sock, UseBlocking, FErrStatus);
+      fbIsKeepAlive := False;
+      if not FbIsUDP then begin
+         SetSockStatusBool(Sock, SO_KeepAlive, True, FErrStatus);
+         fbIsKeepAlive := FErrStatus = 0;
+      end;
+      SetTimeoutAndBuffer(Sock);
+      // 3.0c
+      if FbIsUDP then begin
+         // try to scale up the primary buffer.
+         SetReceiveBuffer(Sock, TDXMaxSocketBuffer*4, FErrStatus);
+         If FErrStatus<>0 then
+            SetReceiveBuffer(Sock, TDXMaxSocketBuffer*3, FErrStatus);
+         If FErrStatus<>0 then
+            SetReceiveBuffer(Sock, TDXMaxSocketBuffer*2, FErrStatus);
+         If FErrStatus<>0 then
+            SetReceiveBuffer(Sock, TDXMaxSocketBuffer, FErrStatus);
+      End;
+   end;
+   fbClientMode := True;
+   Result := True;
+end;
+
+function TDXSock.Listen(Parameters: PNewListen): Boolean;
+begin
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.StartTransaction;
+      CodeTracer.SendMessage(dxctDebug,'TDXSock.Listen');
+   End;
+{$ENDIF}
+   Result := False;
+   with Parameters^ do begin
+      FUseBlocking := UseBlocking;
+      Sock := BindAndListen(fsBindTo, Port, WinsockQueue, UseUDP, UseNAGLE,
+         Connectionless, @SockAddr, FErrStatus);
+      fbIsUDP := UseUDP;
+      If Sock=Invalid_Socket then Exit; // linux does not set FErrStatus!
+      if FErrStatus = 0 then uRODXSocket.SetBlocking(Sock, UseBlocking, FErrStatus)
+      else Exit;
+      if not fbIsUDP then begin
+         SetSockStatusBool(Sock, SO_KeepAlive, True, FErrStatus);
+         fbIsKeepAlive := fErrStatus = 0;
+      end;
+      SetTimeoutAndBuffer(Sock);
+   end;
+   fErrStatus := 0;
+   fbClientMode := False;
+   Result := True;
+   GlobalPeerPort := 0;
+   GlobalPeerIPAddress := '';
+end;
+
+function TDXSock.Accept(var NewSock: TDXSock): Boolean;
+var
+  ICreatedIt: Boolean;
+
+begin
+   Result:=False;
+   if Sock=INVALID_SOCKET then exit;
+   Result:=IsAcceptWaiting(Sock);
+   if (not Result) or fbIsUDP then Exit;
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctDebug,'TDXSock.Accept');
+   End;
+{$ENDIF}
+   ICreatedIt:=not Assigned(NewSock);
+   If ICreatedIt then NewSock := TDXSock.Create;
+   NewSock.Sock := AcceptNewConnect(Sock, @NewSock.SockAddr, @VarConstSizeofTSockAddrIn, FErrStatus);
+   if FErrStatus <> 0 then begin
+      NewSock.Sock := Invalid_Socket;
+      if ICreatedIt then begin
+         NewSock.Free;
+         NewSock := nil;
+      end;
+      Result := False;
+      Exit;
+   end;
+   NewSock.GlobalPeerPort := ntohs(NewSock.SockAddr.sin_port);
+   NewSock.GlobalPeerIPAddress := inet_ntoa(NewSock.SockAddr.sin_addr);
+   NewSock.fbClientMode := False;
+//   SetTimeoutAndBuffer(NewSock.Sock);
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      NewSock.DXCodeTracer:=CodeTracer; // link new sessions automatically
+      CodeTracer.SendMessage(dxctDebug,'TDXSock.Accepted/Configured');
+   End;
+{$ENDIF}
+end;
+
+{$IFDEF VER100}
+function TDXSock.BlockWrite(buf: Pointer; len: Integer): Integer;
+{$ELSE}
+function TDXSock.Write(buf: Pointer; len: Integer): Integer;
+{$ENDIF}
+var
+  BytesLeft: Integer;
+  BytesSent: Integer;
+  XferSize: Integer;
+  TmpP: Pointer;
+  Filtered: Pointer;
+  NewLen: Integer;
+  Handled: Boolean;
+
+begin
+{$IFDEF TLS_EDITION}
+   DoSleepEx(0);
+{$ENDIF}
+   Result := 0;
+   if Sock = INVALID_SOCKET then Exit;
+   if (Len < 1) then begin
+      if fbIsUDP then Begin
+         UDPSend(Sock, Buf^, 0, 0, SockAddr, ConstSizeofTSockAddrIn, FErrStatus); // 2.3 - empty udp packet
+         GlobalPeerPort := ntohs(SockAddr.sin_port);
+         GlobalPeerIPAddress := inet_ntoa(SockAddr.sin_addr);
+      End;
+      Exit;
+   end;
+   NewLen := 0;
+   if Assigned(feOnFilter) then begin
+      Handled := False;
+      Filtered := nil;
+      feOnFilter(ddAboutToWrite, Buf, Filtered, Len, NewLen, Handled,FClientThread);
+      if not Handled then begin
+         fErrStatus := 9999; {onFilter failed!}
+         Exit;
+      end;
+   end;
+   if fbIsUDP then begin
+      if NewLen = 0 then
+         Result := UDPSend(Sock, Buf^, Len, 0, SockAddr, ConstSizeofTSockAddrIn, FErrStatus)
+      else begin
+         Result := UDPSend(Sock, Filtered^, NewLen, 0, SockAddr, ConstSizeofTSockAddrIn, FErrStatus);
+         if Assigned(feOnFilter) then
+            feOnFilter(ddFreePointer, Filtered, Filtered, NewLen, NewLen, Handled,FClientThread);
+      end;
+      GlobalPeerPort := ntohs(SockAddr.sin_port);
+      GlobalPeerIPAddress := inet_ntoa(SockAddr.sin_addr);
+      Exit;
+   end;
+   if NewLen = 0 then begin
+      BytesLeft := Len;
+      TmpP := Buf;
+   end
+   else begin
+      BytesLeft := NewLen;
+      Len := NewLen;
+      TmpP := Filtered;
+   end;
+   fErrStatus := 0;
+   repeat
+      XferSize:=BytesLeft;
+{$IFDEF MSWINDOWS}
+      If IsWritAble then Begin
+{$ENDIF}
+//      If XFerSize>FActualBlockSize then XFerSize:=FActualBlockSize;
+         BytesSent := BasicSend(Sock, TmpP^, XferSize, 0, FErrStatus);
+{$IFDEF CODE_TRACER}
+         If Assigned(CodeTracer) then Begin
+            CodeTracer.SendMessage(dxctDebug,'TDXSock.Write SENT: ['+IntToStr(BytesSent)+' bytes] FErrStatus='+IntToStr(FErrStatus));
+         End;
+{$ENDIF}
+         Case BytesSent of
+            -1:Begin
+               Case fErrStatus of
+                  WSAENOBUFS:fErrStatus := 0;
+                  WSAETIMEDOUT:Begin
+                     // if this code is execute then TDXXferTimeout is too small!
+                     fErrStatus := 0;
+                     Break;
+                  End;
+                  WSAECONNABORTED:CloseNow;
+               End;
+            End;
+            0:CloseNow;
+            else begin
+               If BytesSent>0 then Dec(BytesLeft,BytesSent);
+               If (BytesLeft>0) and (fErrStatus=0) then begin// 3.0 [major bug fix!!]
+                  TmpP := PAnsiChar(TmpP)+BytesSent;
+               End;
+            End;
+         end;
+{$IFDEF MSWINDOWS}
+      End; // Is Write able.
+{$ENDIF}
+   until (BytesLeft=0) or (FErrStatus<>0) or (sock=Invalid_Socket);
+   Result := Len - BytesLeft;
+   if Assigned(feOnFilter) then
+      feOnFilter(ddFreePointer, nil, Filtered, NewLen, NewLen, Handled,FClientThread);
+end;
+
+function TDXSock.WriteInteger(const n: integer): integer;
+var
+  x: integer;
+begin
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctDebug,'TDXSock.WriteInteger('+IntToStr(N)+')');
+   End;
+{$ENDIF}
+  x := htonl(n);
+{$IFDEF VER100}
+  result := BlockWrite(@x, sizeof(x));
+{$ELSE}
+  result := Write(@x, sizeof(x));
+{$ENDIF}
+end;
+
+{$IFDEF VER100}
+function TDXSock.WriteCh(c: AnsiChar): Integer;
+{$ELSE}
+function TDXSock.Write(c: AnsiChar): Integer;
+{$ENDIF}
+begin
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctDebug,'TDXSock.WriteCh('+C+')');
+   End;
+{$ENDIF}
+{$IFDEF VER100}
+  Result := BlockWrite(@C, SizeOf(AnsiChar));
+{$ELSE}
+  Result := Write(@C, SizeOf(AnsiChar));
+{$ENDIF}
+end;
+
+function TDXSock.Write(const s: Ansistring): Integer;
+begin
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctDebug,'TDXSock.Write('+S+')');
+   End;
+{$ENDIF}
+{$IFDEF VER100}
+  Result := BlockWrite(@S[1], Length(s)*SizeOf(AnsiChar));
+{$ELSE}
+  Result := Write(@S[1], Length(s)*SizeOf(AnsiChar));
+{$ENDIF}
+end;
+
+function TDXSock.WriteLn(const s: Ansistring): Integer;
+var
+  Len: Integer;
+  Ws: Ansistring;
+
+begin
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctDebug,'TDXSock.WriteLn('+S+')');
+   End;
+{$ENDIF}
+  Ws := #13#10;
+  if Assigned(feOnFilter) then begin
+     Len := 2;
+     Result := Write(S) + Len; // send via filter
+     if fbIsUDP then begin // append CRLF unfiltered!
+        UDPSend(Sock, Ws[1], Len, 0, SockAddr, ConstSizeofTSockAddrIn, FErrStatus);
+     end
+     else begin
+        BasicSend(Sock, Ws[1], Len, 0, FErrStatus);
+     end;
+  end
+  else
+     Result := Write(S+Ws);
+end;
+
+function TDXSock.WriteResultCode(const Code: Integer; const Rslt: AnsiString): Integer;
+begin
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctDebug,'TDXSock.WriteResult()');
+   End;
+{$ENDIF}
+   Result:=Writeln(Ansi_IntToStr(Code)+#32+Rslt);
+end;
+
+function TDXSock.ReadInteger: integer;
+var
+  n: integer;
+  cnt: integer;
+
+begin
+{$IFDEF VER100}
+  cnt := BlockRead(@n, sizeof(n));
+{$ELSE}
+  cnt := Read(@n, sizeof(n));
+{$ENDIF}
+  if cnt = sizeof(n) then begin
+     n := ntohl(n);
+     result := n;
+  end
+  else result := -1;
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctDebug,'TDXSock.ReadInteger='+IntToStr(Result));
+   End;
+{$ENDIF}
+end;
+
+{$IFDEF VER100}
+function TDXSock.BlockRead(buf: Pointer; len:Integer): Integer;
+{$ELSE}
+function TDXSock.Read(buf: Pointer; len:Integer): Integer;
+{$ENDIF}
+var
+  UDPAddrSize: Integer;
+  Tries:Integer;
+{$IFDEF TLS_EDITION}
+  Filtered, InData: Pointer;
+  Handled: Boolean;
+  NewLen: Integer;
+  StartTime: Longword;
+  SizeToRead: Integer;
+{$ENDIF}
+
+begin
+// 7-27 try
+{$IFDEF TLS_EDITION}
+   DoSleepEx(0);
+{$ENDIF}
+   fReadTimeout := False;
+   Result := 0;
+   if (Sock=INVALID_SOCKET) or (Len<1) then exit;
+   Tries:=0;
+   if fbIsUDP then begin
+      UDPAddrSize := ConstSizeofTSockAddrIn;
+      Result := UDPRecv(Sock, Buf^, Len, 0, SockAddr, UDPAddrSize, FErrStatus);
+      GlobalPeerPort := ntohs(SockAddr.sin_port);
+      GlobalPeerIPAddress := inet_ntoa(SockAddr.sin_addr);
+   end
+   else begin
+      While (Not IsReadAble) and (Tries<3) Do Begin
+         DoSleepEx(1);
+         Inc(Tries);
+      End;
+{$IFNDEF TLS_EDITION}
+      If (CountWaiting>0) or (Tries>=3) then Begin
+         Result := BasicRecv(Sock, Buf^, Len, 0, FErrStatus);
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      If (Result=-1) and (fErrStatus=10060) then {absorb}
+      Else
+      If Result>0 then
+         CodeTracer.SendMessage(dxctDebug,'TDXSock.Read RECV: '+PAnsiChar(Buf)+' ['+IntToStr(Result)+'] fes='+IntToStr(FErrStatus))
+      Else
+         CodeTracer.SendMessage(dxctDebug,'TDXSock.Read RECV: ['+IntToStr(Result)+'] fes='+IntToStr(FErrStatus));
+   End;
+{$ENDIF}
+      End;
+{$ELSE}
+       If (CountWaiting > 0) Or (Tries >= 3) Then
+      Begin
+        If Assigned(feOnFilter) Then
+        Begin
+          SetBlocking(True);
+          SizeToRead := 0;
+          StartTime := DxString.TimeCounter + 120000;
+          While (SizeToRead = 0) And Connected And (Not DXString.Timeout(StartTime)) Do
+          Begin
+            ioctlsocket(Sock, FIONREAD, Longint(SizeToRead));
+            DoSleepEx(1);
+          End;
+          If SizeToRead <> 0 Then Begin
+            InData := Nil;
+            Filtered:=Nil;
+        //    Freemem(Buf,Len);
+            GetMem(InData, SizeToRead);
+            Result := Recv(Sock, InData^, SizeToRead, 0);
+          End;
+        End
+        Else Result := BasicRecv(Sock, Buf^, Len, 0, FErrStatus);
+      End;
+    End;
+    If Result = 0 Then CloseGracefully;
+    fReadTimeout := Result < 1;
+    If (Result > 0) And Assigned(feOnFilter) Then
+    Begin
+      Handled := False; Len :=0;
+      feOnFilter(ddAfterRead, InData, Filtered, SizeToRead, Len, Handled, FClientThread);
+      If Not Handled Then
+      Begin
+        fErrStatus := 9999; {onFilter failed!}
+        If InData <> Nil Then
+        Begin
+          FreeMem(InData, SizeToRead);
+          InData := Nil;
+        End;
+        CloseGracefully;
+      End else Result := Len;
+      If Filtered = Nil Then Result := 0;
+      If Filtered <> Nil Then Move(Filtered^,Buf^,Len);
+      If InData <> Nil Then
+      Begin
+        FreeMem(InData, SizeToRead);
+        InData := Nil;
+      End;
+      feOnFilter(ddFreePointer, Nil, Filtered, Len, Len, Handled, FClientThread);
+    End;
+{$ENDIF}
+   end;
+   fReadTimeout := Result < 1;
+   if Result = 0 then CloseGracefully;
+// 7-27 finally
+// 7-27 end;
+end;
+
+function TDXSock.Read: AnsiChar;
+var
+  Size: Integer;
+
+begin
+{$IFDEF VER100}
+  Size := BlockRead(@Result, 1);
+{$ELSE}
+  Size := Read(@Result, 1);
+{$ENDIF}
+  if Size < 1 then Result := #0;
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctDebug,'TDXSock.Read='+Result);
+   End;
+{$ENDIF}
+end;
+
+function TDXSock.ReadStr(MaxLength: Integer): AnsiString;
+var
+  Size: Integer;
+
+begin
+  fReadTimeout := False;
+  if Sock = INVALID_SOCKET then Exit;
+  if MaxLength < 0 then MaxLength := TDXHugeSize;
+  Result:='';
+  if MaxLength=0 then Exit; //2.3c
+  Setlength(Result, MaxLength);
+  FillChar(Result[1],MaxLength,0);
+{$IFDEF VER100}
+  Size := BlockRead(@Result[1], MaxLength);
+{$ELSE}
+  Size := Read(@Result[1], MaxLength);
+{$ENDIF}
+  if (((fErrStatus <> 0) and (fErrStatus <> WSAETIMEDOUT))) or (Size = 0) then Result := ''
+  // 3.0
+  else if (Size=Socket_Error) then Result:=''
+       else Setlength(Result, Size);
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      If Result<>'' then
+         CodeTracer.SendMessage(dxctDebug,'TDXSock.ReadStr='+Result);
+   End;
+{$ENDIF}
+end;
+
+function TDXSock.ReadString(MaxLength: Integer; Timeout: Longword): AnsiString;
+var
+  Size: Integer;
+  StartTime: Longword;
+
+begin
+  Result := '';
+  fReadTimeout := False;
+  if Sock = INVALID_SOCKET then Exit;
+  fReadTimeout := False;
+  if (MaxLength < 1) or (MaxLength > 250) then Exit; // 2.3
+  StartTime := TimeCounter + Timeout;
+  fErrStatus := 0;
+  while (CountWaiting < MaxLength) and
+    (not uRODXString.Timeout(StartTime)) and
+    ((fErrStatus = 0) or (fErrStatus = WSAETIMEDOUT)) do begin
+    DoSleepEx(1);
+  end;
+  if (CountWaiting < MaxLength) then begin
+    fReadTimeout := True;
+    Exit;
+  end;
+  Setlength(Result, MaxLength);
+  FillChar(Result[1],MaxLength,0);
+{$IFDEF VER100}
+  Size := BlockRead(@Result[1], MaxLength);
+{$ELSE}
+  Size := Read(@Result[1], MaxLength);
+{$ENDIF}
+  if (((fErrStatus <> 0) and (fErrStatus <> WSAETIMEDOUT))) or (Size = 0) then Result := ''
+  // 3.0
+  else if (Size=Socket_Error) then Result:=''
+     else Setlength(Result, Size);
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctDebug,'TDXSock.ReadString='+Result);
+   End;
+{$ENDIF}
+end;
+
+function TDXSock.GetChar: Str1;
+var
+  Size: Integer;
+
+begin
+// 7-27   SetLength(Result, 1);
+  Result:=Str2(#32);
+{$IFDEF VER100}
+  Size := BlockRead(@Result[1], 1);
+{$ELSE}
+  Size := Read(@Result[1], 1);
+{$ENDIF}
+  case Size of
+    0: begin
+        CloseNow; // 2.3
+        Result := '';
+      end;
+    1: begin
+      end;
+  else begin
+      if fErrStatus=WSAETIMEDOUT then fReadTimeout := False; // 2.3b
+      Result := '';
+    end;
+  end;
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctDebug,'TDXSock.GetChar='+Result);
+   End;
+{$ENDIF}
+end;
+
+function TDXSock.GetByte: Byte;
+var
+  L: Str1;
+
+begin
+  L := GetChar;
+  if L = '' then Result := 0
+  else Result := Ord(L[1]);
+end;
+
+function TDXSock.ReadLn(Timeout: Longword): Ansistring;
+var
+  markerCR, markerLF: Integer;
+  s: Ansistring;
+  startTime: Longword;
+  LastChar: Str1;
+  pstring: Ansistring;
+
+{$IFDEF TLS_EDITION}
+  Function TestStack(ts: TMJBLIFO): Boolean;
+  Begin
+    Result := False;
+    If assigned(tStack) Then
+      Result := ts.ItemCount > 0
+    Else tStack := TMJBLIFO.Create;
+  End;
+{$ENDIF}
+
+begin
+  Result := '';
+  fReadTimeout := False;
+  if Sock = INVALID_SOCKET then exit;
+{$IFDEF TLS_EDITION}
+  If FTLS = True Then
+  Begin
+    If TestStack(tStack) Then
+      Result := tStack.Pop
+    Else
+    Begin
+      pString := ReadStr(-1);
+      If pString = '' Then pString := ReadStr(-1);
+  //   If pString[1] = #0 Then pString := ReadStr(-1);
+      If Straggler <> '' Then pString := Straggler + pString;
+      {$IFDEF OBJECTS_ONLY}
+      tBuf := TBrkApart.Create;
+      {$ELSE}
+      tBuf := TBrkApart.Create(Nil);
+      {$ENDIF}
+      tBuf.AllowEmptyString := True;
+      tBuf.BaseString := pString;
+      tBuf.BreakString := #13#10;
+      tBuf.BreakApart;
+      MarkerLF := tbuf.StringList.Count - 2; // Allow for last String as CRLF
+      For markerCR := MarkerLF Downto 0 Do
+      Begin
+        tStack.Push(tbuf.StringList.Strings[markerCR]);
+      End;
+      Straggler := tBuf.Straggler;
+      FreeAndNil(tBuf);
+      If tStack.ItemCount > 0 Then
+        Result := tStack.Pop
+      Else
+        Result := pString;
+    End;
+    Exit;
+  End;
+{$ENDIF}
+  S := GetChar;
+  LastChar := S;
+  if (Sock = INVALID_SOCKET) {or (fReadTimeout) removed 7-27} then exit;
+  MarkerLF := 0;
+  MarkerCR := 0;
+  fErrStatus := 0;
+  StartTime := TimeCounter + Timeout;
+  while (Sock <> Invalid_Socket) and
+    (MarkerLF + MarkerCR = 0) and
+    (not uRODXString.Timeout(StartTime)) and
+    (Length(S) < fTooManyCharacters) and
+    ((fErrStatus = 0) or (fErrStatus = WSAETIMEDOUT)
+    // 7-27:
+    or (fErrStatus = WSAEWOULDBLOCK)) do begin
+    If fErrStatus = WSAEWOULDBLOCK then ProcessWindowsMessageQueue;
+    if (LastChar = '') or (not (LastChar[1] in [#10, #13])) then begin {handles getchar from above!}
+      pString := PeekString;
+      if uRODXString.Timeout(StartTime) then Break;
+      if (pString = '') then begin
+        LastChar := GetChar;
+      end
+      else begin
+        MarkerLF := Pos(AnsiChar(#10), pString);
+        MarkerCR := Pos(AnsiChar(#13), pString);
+        if MarkerLF + MarkerCR > 0 then begin
+          if MarkerLF = 0 then MarkerLF := MarkerCR
+          else if MarkerCR = 0 then MarkerCR := MarkerLF;
+          if Min(MarkerLF, MarkerCR)>1 then // 2.4
+             S := S + Copy(pString, 1, Min(MarkerLF, MarkerCR)-1);
+          ReadStr(Min(MarkerLF, MarkerCR));
+          LastChar := AnsiChar(#13);
+        end
+        else begin
+          S := S + pString;
+          ReadStr(Length(pString));
+          LastChar := '';
+        end;
+      end;
+      if uRODXString.Timeout(StartTime) then Break;
+      if LastChar > '' then begin
+        S := S + LastChar;
+      end;
+    end;
+    if (Length(LastChar) > 0) and (LastChar[1] in [#10, #13]) then begin
+      MarkerLF := Pos(AnsiChar(#10), S);
+      MarkerCR := Pos(AnsiChar(#13), S);
+      if MarkerLF + MarkerCR > 0 then begin
+        if MarkerLF = Length(S) then begin {unix or DOS}
+          if MarkerCR = 0 then begin {unix or Mac}
+            if CountWaiting > 0 then
+              if PeekChar = #13 then begin {Mac}
+                LastChar := GetChar;
+                S := S + LastChar;
+              end;
+          end
+          else if MarkerCR < MarkerLF then MarkerLF := MarkerCR;
+          MarkerCR := MarkerLF;
+        end;
+        if MarkerCR = Length(S) then begin {Mac or DOS}
+          if MarkerLF = 0 then begin {Mac or DOS}
+            if CountWaiting > 0 then
+              if PeekChar = #10 then begin {DOS}
+                LastChar := GetChar;
+                S := S + LastChar;
+              end;
+          end
+          else if MarkerLF < MarkerCR then MarkerCR := MarkerLF;
+          MarkerLF := MarkerCR;
+        end;
+      end;
+    end;
+  end;
+  if Sock = INVALID_SOCKET then exit;
+  FReadTimeout := (MarkerCR < 1) and (uRODXString.Timeout(StartTime));
+  Result := Copy(S, 1, MarkerCR - 1);
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctDebug,'TDXSock.ReadLn='+Result);
+   End;
+{$ENDIF}
+end;
+
+function TDXSock.ReadCRLF(Timeout: Longword): AnsiString;
+Begin
+   Result:=ReadToAnyDelimiter(Timeout,#13#10);
+End;
+{var
+  marker: Integer;
+  s: AnsiString;
+  startTime: Longword;
+
+begin
+  Result := '';
+  fReadTimeout := False;
+  if Sock = INVALID_SOCKET then exit;
+  Marker := 0;
+  StartTime := TimeCounter + Timeout;
+  fErrStatus := 0;
+  while (sock <> Invalid_Socket) and
+    (Marker = 0) and
+    (not DXString.Timeout(StartTime)) and
+    (Length(S) < fTooManyCharacters) and
+    ((fErrStatus = 0) or (fErrStatus = WSAETIMEDOUT)) do begin
+    S := S + GetChar;
+    Marker := QuickPos(#13#10, S);
+  end;
+  if Sock = INVALID_SOCKET then exit;
+  Result := Copy(S, 1, Marker - 1);
+end;}
+
+function TDXSock.ReadToAnyDelimiter(Timeout: Longword;Delimiter:AnsiString): AnsiString;
+var
+  slen: Integer;
+  marker: Integer;
+  s: AnsiString;
+  startTime: Longword;
+  pString:AnsiString;
+  iDel:Integer;
+
+Begin
+  Result := '';
+  fReadTimeout := False;
+  if Sock = INVALID_SOCKET then exit;
+  S := '';
+  sLen:=0;
+  StartTime := TimeCounter + Timeout;
+  Marker:=0;
+  while (sock <> Invalid_Socket) and
+    (Marker = 0) and
+    (not uRODXString.Timeout(StartTime)) and
+    (sLen < fTooManyCharacters) and
+    ((fErrStatus = 0) or (fErrStatus = WSAETIMEDOUT)) do begin
+    pString := PeekString;
+    if pString<>'' then Begin
+       sLen:=Length(S);
+       S:=S+pString;
+       Marker := Pos(Delimiter, S);
+       If Marker=0 then Begin
+          ReadStr(Length(pString)); // clear socket
+       End
+       Else Begin
+          S:=Copy(S,1,Marker-1);
+          If Marker<sLen then iDel:=Length(Delimiter)-(sLen-Marker)
+          Else iDel:=(Marker-sLen)+Length(Delimiter);
+//          If Marker<sLen then iDel:=Length(Delimiter)-(sLen-Marker+1)
+//          Else iDel:=Marker-sLen+(Length(Delimiter)-1);
+          ReadStr(iDel);
+       End;
+    End
+    Else Begin
+       pString:=GetChar;
+       if pString='' then DoSleepEx(1)
+       Else begin
+          Inc(sLen);
+          S:=S+pString;
+       End;
+    End;
+  End;
+  if Sock = INVALID_SOCKET then exit;
+  fReadTimeout:=uRODXString.Timeout(StartTime);
+  Result := S; // return what ever is collected, even if not done!
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctDebug,'TDXSock.ReadToAnyDelimeter='+Result);
+   End;
+{$ENDIF}
+End;
+
+function TDXSock.ReadNull(Timeout: Longword): AnsiString;
+begin
+  Result := ReadToAnyDelimiter(Timeout,AnsiChar(#0));
+end;
+
+function TDXSock.ReadSpace(Timeout: Longword): AnsiString;
+begin
+  Result := ReadToAnyDelimiter(Timeout,AnsiChar(#32));
+end;
+
+function TDXSock.SendBuf(const Buf; Count: Integer): Integer; // Borland friendly
+begin
+{$IFDEF VER100}
+  Result := BlockWrite(@Buf, Count);
+{$ELSE}
+  Result := Write(@Buf, Count);
+{$ENDIF}
+end;
+
+function TDXSock.ReceiveBuf(var Buf; Count: Integer): Integer; // Borland friendly
+begin
+{$IFDEF VER100}
+  Result := BlockRead(@Buf, Count);
+{$ELSE}
+  Result := Read(@Buf, Count);
+{$ENDIF}
+end;
+
+{$IFDEF VER100}
+function TDXSock.SendFromStream(Stream: TStream): Boolean;
+{$ELSE}
+function TDXSock.SendFrom(Stream: TStream): Boolean;
+{$ENDIF}
+var
+  Len: Integer;
+  SSize, SPosition: Integer;
+  Tries: Integer;
+
+begin
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctDebug,'TDXSock.SendFrom');
+   End;
+{$ENDIF}
+  fErrStatus := 0;
+  SSize := Stream.Size;
+  SPosition := Stream.Position;
+  Tries := 0;
+  while (sock <> Invalid_Socket) and
+    (Stream.Position < Stream.Size) and
+    (fErrStatus = 0) and
+    (Tries < 3) do begin
+    if (SSize - SPosition) < FActualBlockSize then Len := SSize - SPosition
+    else Len := FActualBlockSize;
+    if Len > 0 then begin
+      Stream.Seek(SPosition, 0);
+      Stream.Read(fChunkBuf^, Len);
+{$IFDEF VER100}
+      Len := BlockWrite(fChunkBuf, Len);
+{$ELSE}
+      Len := Write(fChunkBuf, Len);
+{$ENDIF}
+      SPosition := SPosition + Len;
+      if fErrStatus > 0 then begin
+        Tries := 3;
+      end
+      else if Len < 1 then Inc(Tries)
+      else Tries := 0;
+    end;
+  end;
+  Result := (Sock <> INVALID_SOCKET) and (fErrStatus = 0);
+end;
+
+{$IFDEF VER100}
+function TDXSock.SendFromWindowsFile(var Handle: Integer): boolean;
+{$ELSE}
+function TDXSock.SendFrom(var Handle: Integer): boolean;
+{$ENDIF}
+var
+  Len: Integer;
+  SLen: Integer;
+  Offset: Integer;
+  FSize: Integer;
+  Tries: Integer;
+
+begin
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctDebug,'TDXSock.SendFrom');
+   End;
+{$ENDIF}
+  Result := False;
+  fReadTimeout := False;
+  if Sock = INVALID_SOCKET then Exit;
+  if Handle <> 0 then begin
+    Offset := FileSeek(Handle, 0, 1);
+    FSize := FileSeek(Handle, 0, 2);
+    FileSeek(Handle, Offset, 0);
+    fErrStatus := 0;
+    Tries := 0;
+    while (sock <> Invalid_Socket) and
+      (Offset < FSize) and
+      (fErrStatus = 0) and
+      (Tries < 3) do begin
+      if Sock <> INVALID_SOCKET then begin
+        Len := FileRead(Handle, fChunkBuf^, FActualBlockSize - 1);
+        if Len > 0 then begin
+{$IFDEF VER100}
+          SLen := BlockWrite(fChunkBuf, Len);
+{$ELSE}
+          SLen := Write(fChunkBuf, Len);
+{$ENDIF}
+          if SLen <> Len then begin
+            Offset := SLen + Offset;
+            FileSeek(Handle, Offset, 0);
+            Inc(Tries);
+          end
+          else Tries := 0;
+          if fErrStatus > 0 then Tries := 3;
+        end;
+      end;
+      Offset := FileSeek(Handle, 0, 1);
+    end;
+  end;
+  Result := (Sock <> INVALID_SOCKET) and (fErrStatus = 0);
+end;
+
+{$IFDEF VER100}
+function TDXSock.SendFromBorlandFile(var Handle: file): boolean;
+{$ELSE}
+function TDXSock.SendFrom(var Handle: file): boolean;
+{$ENDIF}
+var
+  Len: Integer;
+  SLen: Integer;
+  OffSet: Integer;
+  Tries: Integer;
+
+begin
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctDebug,'TDXSock.SendFrom');
+   End;
+{$ENDIF}
+  Result := False;
+  fReadTimeout := False;
+  if Sock = INVALID_SOCKET then Exit;
+  fErrStatus := 0;
+  Tries := 0;
+  while not Eof(Handle) and (fErrStatus = 0) and (Tries < 3) and (sock <> Invalid_Socket) do begin
+    Offset := System.FilePos(Handle);
+    if (Sock <> INVALID_SOCKET) then begin
+      System.BlockRead(Handle, fChunkBuf^, FActualBlockSize - 1, Len);
+{$IFDEF VER100}
+      SLen := BlockWrite(fChunkBuf, Len);
+{$ELSE}
+      SLen := Write(fChunkBuf, Len);
+{$ENDIF}
+      if SLen = Len then begin
+        Tries := 0;
+      end
+      else begin
+        Offset := SLen + Offset;
+        System.Seek(Handle, Offset);
+        Inc(Tries);
+      end;
+      if fErrStatus > 0 then Tries := 3;
+    end;
+  end;
+  Result := (Sock <> INVALID_SOCKET) and (fErrStatus = 0);
+end;
+
+{$IFDEF VER100}
+function TDXSock.SaveToStream(Stream: TStream; Timeout: Longword): Boolean;
+{$ELSE}
+function TDXSock.SaveTo(Stream: TStream; Timeout: Longword): Boolean;
+{$ENDIF}
+var
+  SLen: Integer;
+  StartTime: Longword;
+  OldSize:Integer;
+
+begin
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctDebug,'TDXSock.SaveTo');
+   End;
+{$ENDIF}
+   OldSize:=Stream.Size;
+   fErrStatus := 0;
+   fReadTimeout := False;
+   StartTime := TimeCounter + Timeout;
+   while ((fErrStatus = 0) or (fErrStatus = WSAETIMEDOUT)) and
+      (not uRODXString.Timeout(StartTime)) do begin
+{$IFDEF VER100}
+      SLen := BlockRead(fChunkBuf, FActualBlockSize);
+{$ELSE}
+      SLen := Read(fChunkBuf, FActualBlockSize);
+{$ENDIF}
+      if SLen < 1 then begin
+         if SLen = 0 then Break;
+      end
+      else Stream.Write(fChunkBuf^, SLen);
+      If SLen < FActualBlockSize Then Break; //GT for TLS Stops looping until timeout
+   end;
+   Result := (Sock <> INVALID_SOCKET) and ((fErrStatus = 0) or (fErrStatus = WSAETIMEDOUT));
+   If Result then Result:=Stream.Size<>OldSize;
+end;
+
+{$IFDEF VER100}
+function TDXSock.SaveToWindowsFile(var Handle: Integer; Timeout: Longword): boolean;
+{$ELSE}
+function TDXSock.SaveTo(var Handle: Integer; Timeout: Longword): boolean;
+{$ENDIF}
+var
+  SLen: Integer;
+{$IFDEF VER100}
+  STmp: Integer;
+{$ELSE}
+  STmp: Cardinal;
+{$ENDIF}
+  StartTime: Longword;
+
+begin
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctDebug,'TDXSock.SaveTo');
+   End;
+{$ENDIF}
+  fErrStatus := 0;
+  fReadTimeout := False;
+  StartTime := TimeCounter + Timeout;
+  while ((fErrStatus = 0) or (fErrStatus = WSAETIMEDOUT)) and
+    (not uRODXString.Timeout(StartTime)) do begin
+{$IFDEF VER100}
+    SLen := BlockRead(fChunkBuf, FActualBlockSize);
+{$ELSE}
+    SLen := Read(fChunkBuf, FActualBlockSize);
+{$ENDIF}
+    STmp := 0;
+    if SLen < 1 then begin
+      if SLen = 0 then Break;
+    end
+    else
+      WindowsWriteFile(Handle, fChunkBuf^, SLen, STmp);
+  end;
+  Result := (Sock <> INVALID_SOCKET) and ((fErrStatus = 0) or (fErrStatus = WSAETIMEDOUT));
+end;
+
+{$IFDEF VER100}
+function TDXSock.SaveToBorlandFile(var Handle: file; Timeout: Longword): boolean;
+{$ELSE}
+function TDXSock.SaveTo(var Handle: file; Timeout: Longword): boolean;
+{$ENDIF}
+var
+  SLen: Integer;
+  StartTime: Longword;
+
+begin
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctDebug,'TDXSock.SaveTo');
+   End;
+{$ENDIF}
+  fErrStatus := 0;
+  fReadTimeout := False;
+  StartTime := TimeCounter + Timeout;
+  while ((fErrStatus = 0) or (fErrStatus = WSAETIMEDOUT)) and
+    (not uRODXString.Timeout(StartTime)) do begin
+{$IFDEF VER100}
+    SLen := BlockRead(fChunkBuf, FActualBlockSize);
+{$ELSE}
+    SLen := Read(fChunkBuf, FActualBlockSize);
+{$ENDIF}
+    if SLen < 1 then begin
+      if SLen = 0 then Break;
+    end
+    else
+      System.BlockWrite(Handle, fChunkBuf^, SLen);
+  end;
+  Result := (Sock <> INVALID_SOCKET) and ((fErrStatus = 0) or (fErrStatus = WSAETIMEDOUT));
+end;
+
+function TDXSock.WriteWithSize(S: AnsiString): Boolean;
+var
+  Size: Integer;
+
+begin
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctDebug,'TDXSock.WriteWithSize('+S+')');
+   End;
+{$ENDIF}
+  Result := False;
+  Size := Length(S);
+  size := htonl(size);
+{$IFDEF VER100}
+  if BlockWrite(@Size, 4) = 4 then
+    Result := BlockWrite(@S[1], Size) = Size;
+{$ELSE}
+  if Write(@Size, 4) = 4 then
+    Result := Write(@S[1], Size) = Size;
+{$ENDIF}
+end;
+
+function TDXSock.ReadWithSize: Ansistring; // 2.4 for ASTAIO (no TIMEOUT, just error check)
+var
+  Done: Boolean;
+  Size: Integer;
+
+begin
+  Result := '';
+  Done := False;
+  Size := 0;
+  FErrStatus := 0;
+  while (not Done) and (Connected) and ((fErrStatus = 0) or (fErrStatus = WSAETIMEDOUT)) and (Size >= 0) and (Length(Result) <= Size) do begin
+    if Size = 0 then begin
+{$IFDEF VER100}
+      BlockRead(@Size, 4);
+{$ELSE}
+      Read(@Size, 4);
+{$ENDIF}
+      If fErrStatus = WSAETIMEDOUT Then Done := True; //gt while not does not work
+      size := ntohl(size);
+    end
+    else begin
+      Result := Result + ReadStr(Size-Length(Result));
+      Done := Length(Result) = Size;
+    end;
+  end;
+  if ((fErrStatus <> 0) and (fErrStatus <> WSAETIMEDOUT)) or (Size = 0) then Result := ''
+  // 3.0
+  else if (Size=Socket_Error) then Result:=''
+     else Setlength(Result, Size);
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctDebug,'TDXSock.ReadWithSize='+Result);
+   End;
+{$ENDIF}
+end;
+
+function TDXSock.SendFromStreamWithSize(Stream: TStream): Boolean;
+var
+  Size: Integer;
+
+begin
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctDebug,'TDXSock.SendFromStreamWithSize');
+   End;
+{$ENDIF}
+  Result:=False;
+  Size:=Stream.Size;
+  if size<1 then Exit;
+  size:=htonl(size);
+  Stream.Seek(0, 0);
+{$IFDEF VER100}
+  if BlockWrite(@Size, 4) = 4 then
+    Result := SendFromStream(Stream);
+{$ELSE}
+  if Write(@Size, 4) = 4 then
+    Result := SendFrom(Stream);
+{$ENDIF}
+end;
+
+function TDXSock.SaveToStreamWithSize(Stream: TStream; Timeout: Longword): Boolean;
+var
+  Size: Integer;
+  StartTime: Longword;
+  SLen: Integer;
+
+begin
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctDebug,'TDXSock.SaveToStreamWithSize');
+   End;
+{$ENDIF}
+  Stream.Size := 0;
+  fReadTimeout := False;
+{$IFDEF VER100}
+  if BlockRead(@Size, 4) = 4 then begin
+{$ELSE}
+  if Read(@Size, 4) = 4 then begin
+{$ENDIF}
+    size := ntohl(size);
+    StartTime := TimeCounter + Timeout;
+    fErrStatus := 0;
+    while ((fErrStatus = 0) or (fErrStatus = WSAETIMEDOUT)) and
+      (not uRODXString.Timeout(StartTime)) and
+      (Size > 0) do begin
+{$IFDEF VER100}
+      SLen := BlockRead(fChunkBuf, Min(Size, FActualBlockSize));
+{$ELSE}
+      SLen := Read(fChunkBuf, Min(Size, FActualBlockSize));
+{$ENDIF}
+      Case SLen of
+         -1:Begin // non-fatal
+         End;
+         0:Break; // fatal
+         Else Begin
+            Stream.Write(fChunkBuf^, SLen);
+            Dec(Size, SLen);
+         end;
+      End;
+    end;
+  end;
+  Result := (Sock <> INVALID_SOCKET) and ((fErrStatus = 0) or (fErrStatus = WSAETIMEDOUT)) and
+    ((Size=0) and (Stream.Size>0)); // 2.3c
+end;
+
+function TDXSock.PeekString: AnsiString;
+var
+  Size: Integer;
+{$IFDEF TLS_EDITION}
+  Filtered, InData: Pointer;
+  Handled: Boolean;
+  NewLen: Integer;
+  SizeToRead: Integer;
+  S: AnsiString;
+  StartTime: Longword;
+{$ENDIF}
+
+begin
+  Result := '';
+{$IFDEF TLS_EDITION}
+  indata := Nil;
+{$ENDIF}
+  fReadTimeout := False;
+  if Sock = INVALID_SOCKET then exit;
+{$IFDEF TLS_EDITION}
+  If Assigned(feOnFilter) Then
+  Begin
+    SizeToRead := 0;
+    StartTime := DxString.TimeCounter + 1000;
+    While (SizeToRead = 0) And Connected And (Not DXString.Timeout(StartTime)) Do
+    Begin
+      ioctlsocket(Sock, FIONREAD, Longint(SizeToRead));
+      DoSleepEx(1);
+    End;
+    If SizeToRead = 0 Then Begin Result := ''; Exit; End;
+
+    GetMem(InData, SizeToRead);
+
+    If Sock <> Invalid_Socket Then
+      FErrStatus := Recv(Sock, Indata^, SizeToRead, 0)
+    Else
+      FErrStatus := Socket_Error;
+  End
+  Else
+{$ENDIF}
+  FErrStatus := BasicPeek(Sock, FPeekBuffer^, PeekBufferSize);
+  if FErrStatus = Socket_Error then begin
+    FErrStatus := 0;
+    Exit;
+  end
+  else Size := FErrStatus;
+{$IFDEF TLS_EDITION}
+  If Assigned(feOnFilter) Then
+  Begin
+    Handled := False;
+    Filtered := Nil;
+    feOnFilter(ddAfterRead, InData, Filtered, SizeToRead, NewLen, Handled, FClientThread);
+    If Not Handled Then Begin
+      fErrStatus := 9999; {onFilter failed!}
+      If Assigned(feOnFilter) Then
+      Begin
+        feOnFilter(ddFreePointer, Nil, Filtered, NewLen, NewLen, Handled, FClientThread);
+        If InData <> Nil Then
+        Begin
+          FreeMem(InData, SizeToRead);
+          InData := Nil;
+        End;
+      End;
+      Exit;
+    End;
+    If Filtered <> Nil Then
+    Begin
+      SetLength(S, NewLen);
+      Move(TDXBSArray(Filtered^), S[1], NewLen);
+      Result := S;
+      fReadTimeout := False;
+      FErrStatus := 0;
+    End Else Result := '';
+    If Assigned(feOnFilter) Then
+    Begin
+      feOnFilter(ddFreePointer, Nil, Filtered, NewLen, NewLen, Handled, FClientThread);
+      If InData <> Nil Then
+      Begin
+        FreeMem(InData, SizeToRead);
+        InData := Nil;
+      End;
+    End;
+  End Else
+  Begin
+{$ENDIF}
+  Setlength(Result, Size);
+  If Size>0 then Move(FPeekBuffer^, Result[1], Size); // 3.0
+{$IFDEF TLS_EDITION}
+    fReadTimeout := False;
+    FErrStatus := 0;
+  End;
+{$ENDIF}
+end;
+
+function TDXSock.PeekChar: AnsiChar;
+begin
+  Result := #0;
+  fReadTimeout := False;
+  if Sock = INVALID_SOCKET then exit;
+  FErrStatus := BasicPeek(Sock, FPeekBuffer^, 1);
+// 3.0
+//  if FErrStatus = Socket_Error then CloseNow
+//  else Result := FPeekBuffer^[0];
+   Case fErrStatus of
+      0:CloseNow;
+      Socket_Error:FErrStatus:=0;
+      Else Result:=FPeekBuffer^[0];
+   End;
+end;
+
+procedure TDXSock.CloseGracefully;
+begin
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctDebug,'TDXSock.CloseGraceFully');
+   End;
+{$ENDIF}
+  CloseConnection(Sock, True);
+end;
+
+procedure TDXSock.Disconnect;
+begin
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctDebug,'TDXSock.Disconnect');
+   End;
+{$ENDIF}
+  CloseConnection(Sock, True);
+end;
+
+procedure TDXSock.CloseNow;
+begin
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctDebug,'TDXSock.CloseNow');
+   End;
+{$ENDIF}
+  CloseConnection(Sock, False);
+end;
+
+function TDXSock.IsValidSocket: Boolean;
+begin
+  Result := Sock <> INVALID_SOCKET;
+end;
+
+function TDXSock.IsConnected: Boolean;
+begin
+  Result := (Sock <> INVALID_SOCKET)
+    and ((LastCommandStatus = 0) or (LastCommandStatus = WSAETIMEDOUT));
+  if not Result and (CountWaiting > 0) then Result := True;
+end;
+
+function TDXSock.IsReadable: Boolean;
+begin
+  fReadTimeout := False;
+  Result := False;
+  if Sock = INVALID_SOCKET then exit;
+  Result:=BasicSelect(Sock,True,GlobalTimeout)>0;
+// Global Timout sometimes sets these write - do we do it to be safe:
+  SetReceiveTimeout(Sock, TDXXferTimeout, FErrStatus);
+  SetSendTimeout(Sock, TDXXferTimeout, FErrStatus);
+  fErrStatus := 0;
+end;
+
+function TDXSock.IsWritable: Boolean;
+begin
+  fReadTimeout := False;
+  Result := False;
+  if Sock = INVALID_SOCKET then exit;
+  Result:=BasicSelect(Sock,False,GlobalTimeout)>0;
+// Global Timout sometimes sets these write - do we do it to be safe:
+  SetReceiveTimeout(Sock, TDXXferTimeout, FErrStatus);
+  SetSendTimeout(Sock, TDXXferTimeout, FErrStatus);
+  fErrStatus := 0;
+end;
+
+function TDXSock.DidReadTimeout: Boolean;
+begin
+  Result := fReadTimeout;
+end;
+
+function TDXSock.GetLocalPort: Integer;
+begin
+  Result := 0;
+  if Sock = INVALID_SOCKET then exit;
+  Result:=uRODXSocket.GetLocalPort(Sock);
+end;
+
+function TDXSock.GetLocalIPAddr: AnsiString;
+begin
+  Result := '';
+  if Sock = INVALID_SOCKET then exit;
+  Result:=uRODXSocket.GetLocalIPAddr(Sock);
+end;
+
+function TDXSock.GetErrorStr: AnsiString;
+begin
+  result := GetErrorDesc(GetLastError);
+end;
+
+procedure TDXSock.WinsockVersion(var WinsockInfo: PWinsockInfo);
+begin
+  if not Assigned(WinsockInfo) then Exit;
+  if not SocketLayerLoaded then Exit;
+  GetSocketVersion(WinsockInfo);
+end;
+
+procedure TDXSock.SetNagle(TurnOn: Boolean);
+begin
+  uRODXSocket.SetNagle(Sock, TurnOn, FErrStatus);
+end;
+
+procedure TDXSock.SetBlocking(TurnOn: Boolean);
+begin
+  fUseBlocking := TurnOn;
+  uRODXSocket.SetBlocking(Sock, TurnOn, FErrStatus);
+end;
+
+function TDXSock.GetErrorDesc(errorCode: Integer): AnsiString;
+begin
+  Result := uRODXSocket.GetErrorDesc(ErrorCode);
+end;
+
+procedure TDXSock.SetfBlockSizeFlags(Value: TDXBlockSizeFlags);
+begin
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctDebug,'TDXSock.SetfBlockSizeFlags');
+   End;
+{$ENDIF}
+  If Assigned(fChunkBuf) then SysFreeMem(fChunkBuf); // ,FActualBlockSize);
+  fChunkBuf:=Nil;
+  fBlockSizeFlags := Value;
+  case FBlockSizeFlags of
+    bsfZero: fActualBlockSize := 0;
+    bsfRealSmall: fActualBlockSize := 128;
+    bsfSmall: fActualBlockSize := 256;
+    bsfNormal: fActualBlockSize := 512;
+    bsfBigger: fActualBlockSize := 2048;
+    bsfBiggest: fActualBlockSize := 4096;
+      {bsfHUGE:}
+  else fActualBlockSize := TDXHugeSize;
+  end;
+  If FBlockSizeFlags <> bsfZero then fChunkBuf:=SysGetMem(FActualBlockSize);
+end;
+
+function TDXSOCK.CountWaiting: Integer;
+begin
+  Result := uRODXSocket.CountWaiting(Sock, FErrStatus);
+  if FErrStatus <> 0 then begin
+    Result := 0;
+    Exit;
+  end;
+end;
+
+function TDXSOCK.FilterRead(Const InBuf: Pointer; var OutBuf: Pointer; InSize: Integer;xClientThread: TThread): Integer;
+var
+  Handled: Boolean;
+
+begin
+  if InSize > 0 then
+    if Assigned(feOnFilter) then begin
+      Handled := False;
+      Result := 0;
+      feOnFilter(ddAfterRead, InBuf, OutBuf, InSize, Result, Handled,xClientThread);
+      if not Handled then begin
+        fErrStatus := 9999; {onFilter failed!}
+        Exit;
+      end;
+    end;
+end;
+
+// used by TDXSockClient only!
+procedure TDXSock.SockClientSetGlobal(I:AnsiString;P:Integer);
+Begin
+   GlobalPeerPort:=P;
+   GlobalPeerIPAddress:=I;
+End;
+
+// new 3.0 features:
+Function TDXSock.DroppedConnection:Boolean;
+Begin
+   Result:=False;
+   If IsReadable then
+      If CharactersToRead=0 then Begin
+         CloseNow; // invalidates the handle
+         Result:=True;
+      End;
+End;
+
+Function TDXSock.WaitForData(timeout:Longint):Boolean;
+Var
+   StartTime:Cardinal;
+
+Begin
+{$IFDEF CODE_TRACER}
+   If Assigned(CodeTracer) then Begin
+      CodeTracer.SendMessage(dxctDebug,'TDXSock.WaitForData');
+   End;
+{$ENDIF}
+   Result:=False;
+   StartTime:=Int64(TimeCounter)+timeout;
+   While Not uRODXString.TimeOut(StartTime) do Begin
+      If DroppedConnection then Begin
+         CloseNow;
+         Exit;
+      End
+      Else Begin
+         If CharactersToRead>0 then Begin
+            Result:=True;
+            Exit;
+         End
+         Else Begin
+            ProcessWindowsMessageQueue;
+            DoSleepEx(0);
+         End;
+      End;
+   End;
+End;
+
+end.
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXSockClient.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXSockClient.pas
new file mode 100644
index 0000000..6caab9d
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXSockClient.pas	
@@ -0,0 +1,697 @@
+unit uRODXSockClient;
+
+///////////////////////////////////////////////////////////////////////////////
+//    Component: TDXSockClient
+//       Author: G.E. Ozz Nixon Jr. (onixon@dxsock.com)
+// ========================================================================
+// Source Owner: DX, Inc. 1995-2002
+//    Copyright: All code is the property of DX, Inc. Licensed for
+//               resell by Brain Patchwork DX (tm) and part of the
+//               DX (r) product lines, which are (c) 1999-2002
+//               DX, Inc. Source may not be distributed without
+//               written permission from both Brain Patchwork DX,
+//               and DX, Inc.
+//      License: (Reminder), None of this code can be added to other
+//               developer products without permission. This includes
+//               but not limited to DCU's, DCP's, DLL's, OCX's, or
+//               any other form of merging our technologies. All of
+//               your products released to a public consumer be it
+//               shareware, freeware, commercial, etc. must contain a
+//               license notification somewhere visible in the
+//               application.
+//               Example is Internet Explorer - Help->About screen
+//               shows the licensed code contained in the application.
+// Code Version: (3rd Generation Code)
+// ========================================================================
+//  Description:
+//  This is a low-level wrapper for the Winsock dll. It is designed to be a
+//  CLIENT core. If you need to develop a client that supports server type
+//  connections, you should visit our DXSockClientFTP component. It demonstrates
+//  using this layer with an add-on for supporting listener routines.
+// ========================================================================
+///////////////////////////////////////////////////////////////////////////////
+
+interface
+{$I uRODXSock.def} {2.0}
+uses
+   Classes,
+   uRODXString,
+   uRODXSock,
+   uRODXSocket;
+
+
+
+type
+  TDX_Connecting=procedure(ConnectingTo:AnsiString;Port:Integer) of object;
+  TDX_Connected=procedure(ConnectedTo:AnsiString;Port:Integer) of object;
+  TDX_ConnectFailed=procedure(ConnectTo:AnsiString;ErrorCode:Integer) of object;
+  TDX_Disconnected=procedure(ConnectedTo:AnsiString) of object;
+  TDX_SendingData=procedure(ConnectTo:AnsiString;Bytes:Integer) of object;
+  TDX_DataSent=procedure(ConnectTo:AnsiString;Bytes:Integer) of object;
+  TDX_DataPendingRead=procedure(CharactersWaiting:Integer) of object;
+//  TDX_NewClientPendingAccept=procedure(Socket:u_Int) of object;
+  TDX_ResolvingHost=procedure(ConnectTo:AnsiString) of object;
+  TDX_ResolvedHost=procedure(ConnectTo:AnsiString;ResolvedTo:AnsiString) of object;
+  TDX_ResolveFailed=procedure(ConnectTo:AnsiString) of object;
+
+  TDXSockClient=class(TDXComponent)
+  private
+    // Component Oriented Variables:
+    fsHost:AnsiString;
+    fiPort:Integer;
+    fbUseNagle:Boolean;
+    fbUseUDP:Boolean;
+    fbUseBlocking:Boolean;
+    // Events:
+    feResolvingHost:TDX_ResolvingHost;
+    feResolvedHost:TDX_ResolvedHost;
+    fMimicAsynch:Boolean;
+    feConnecting:TDX_Connecting;
+    feConnected:TDX_Connected;
+    feConnectFailed:TDX_ConnectFailed;
+    feSendingData:TDX_SendingData;
+    feSendingDone:TDX_DataSent;
+    feDisconnected:TDX_Disconnected;
+    // Asynch Notification Variables:
+    fNotifiedOfData:Boolean;
+    fLastAddress:AnsiString;
+    fLastIP:AnsiString;
+
+(*
+    feDataPendingRead:TDX_DataPendingRead;
+//    feNewClientPendingAccept:TDX_NewClientPendingAccept;
+    feResolveFailed:TDX_ResolveFailed;
+    fiSleepBetweenReads:Integer;
+*)
+  protected
+//    Procedure CheckInBuffer;
+    Function GetPeerPort:Integer;
+    Function GetPeerIPAddr:AnsiString;
+    Function GetLocalPort:Integer;
+    Function GetLocalIPAddr:AnsiString;
+    Function IsConnected:Boolean;
+    Function IsValidSocket:Boolean;
+    Function IsReadable:Boolean;
+    Function IsWritable:Boolean;
+    Function DidReadTimeout:Boolean;
+//    Procedure SetfBlockSizeFlags(Value:TBlockSizeFlags);
+    Function CountWaiting:Integer;
+    Function GetFErrStatus:Integer;
+  public
+    Socket:TDXSock;
+    constructor Create(AOwner:TComponent); override;
+    Destructor Destroy; override;
+    Function DoConnect:Boolean;
+    Function QuickConnect(DestAddr:AnsiString;DestPort:Integer):Boolean;
+    Function Connect(Parameters:PNewConnect):Boolean;
+    Function Listen(Parameters:PNewListen):Boolean;
+    Function Accept(Var NewSock:TDXSockClient):Boolean;
+    Procedure Disconnect; {2.0}
+{$IFDEF VER100} // D3
+    Function WriteCh(c:AnsiChar):Integer;
+    Function Write(Const s:AnsiString):Integer;
+    Function BlockWrite(buf:Pointer;len:Integer):Integer;
+    Function BlockRead(buf:Pointer;len,tOut:Integer):Integer;
+    Function Read(tOut:Integer):AnsiChar;
+    Function SendFromStream(Stream:TStream):Boolean;
+    Function SendFromWindowsFile(var Handle:Integer):boolean;
+    Function SendFromBorlandFile(var Handle:File):boolean;
+    Function SaveToStream(Stream:TStream;Timeout:Integer):Boolean;
+    Function SaveToWindowsFile(var Handle:Integer;Timeout:Integer):boolean;
+    Function SaveToBorlandFile(var Handle:File;Timeout:Integer):boolean;
+{$ELSE} // D4 or D5
+    Function Read(buf:Pointer;len,tOut:Integer):Integer; overload;
+    Function Read(tOut:Integer):AnsiChar; overload;
+    Function Write(c:AnsiChar):Integer; overload;
+    Function Write(Const s:AnsiString):Integer; overload;
+    Function Write(buf:Pointer;len:Integer):Integer; overload;
+    Function SendFrom(Stream:TStream):Boolean; overload;
+    Function SendFrom(var Handle:Integer):boolean; overload;
+    Function SendFrom(var Handle:File):boolean; overload;
+    Function SaveTo(Stream:TStream;Timeout:Integer):Boolean; overload;
+    Function SaveTo(var Handle:Integer;Timeout:Integer):boolean; overload;
+    Function SaveTo(var Handle:File;Timeout:Integer):boolean; overload;
+{$ENDIF}
+    Function WriteLn(Const s:AnsiString):Integer;
+    Function ReadStr(MaxLength,Timeout:Integer):AnsiString; {2.0.70}
+    Function ReadLn(Timeout: Longword): Ansistring;
+    Function PeekString:AnsiString;
+    Function PeekChar:AnsiChar;
+    Function GetErrorStr:AnsiString;
+    Function GetErrorDesc(errorCode:Integer):AnsiString;
+    Procedure SetNagle(TurnOn:Boolean);
+    Procedure SetBlocking(TurnOn:Boolean); {2.0}
+    Procedure WinsockVersion(Var WinsockInfo:PWinsockInfo);
+  published
+    Property Host:AnsiString read fsHost
+                         write fsHost;
+    Property Port:Integer read fiPort
+                          write fiPort;
+    Property EnabledNagle:Boolean read fbUseNagle
+                                  write fbUseNagle;
+    Property EnabledUDP:Boolean read fbUseUDP
+                                  write fbUseUdp;
+    Property EnabledBlocking:Boolean read fbUseBlocking
+                                     write fbUseBlocking;
+    Property PeerIPAddress:AnsiString read GetPeerIPAddr; {2.0}
+    Property PeerPort:Integer read GetPeerPort; {2.0}
+    Property LocalIPAddress:AnsiString read GetLocalIPAddr; {2.0}
+    Property LocalPort:Integer read GetLocalPort; {2.0}
+    Property Connected:Boolean read IsConnected; {2.0}
+    Property ValidSocket:Boolean read IsValidSocket; {2.0}
+    Property Readable:Boolean read IsReadable; {2.0}
+    Property Writable:Boolean read IsWritable; {2.0}
+    Property LastReadTimeout:Boolean read DidReadTimeout; {2.0}
+    Property CharactersToRead:Integer read CountWaiting; {2.0}
+    Property LastCommandStatus:Integer read GetFErrStatus;
+    Property ConnectingToServer:TDX_Connecting read feConnecting
+                                               write feConnecting; {2.0.70}
+    Property ConnectedToServer:TDX_Connected read feConnected
+                                             write feConnected; {2.0.70}
+    Property ConnectionFailed:TDX_ConnectFailed read feConnectFailed
+                                                write feConnectFailed; {2.0.70}
+    Property ConnectionTerminated:TDX_Disconnected read feDisconnected
+                                                   write feDisconnected; {2.0.70}
+    Property SendInProgress:TDX_SendingData read feSendingData
+                                            write feSendingData; {2.0.70}
+    Property SendDone:TDX_DataSent read feSendingDone
+                                   write feSendingDone; {2.0.70}
+    Property ResolvingHost:TDX_ResolvingHost read feResolvingHost
+                                             write feResolvingHost; {2.0.70}
+    Property ResolvedHost:TDX_ResolvedHost read feResolvedHost
+                                           write feResolvedHost; {2.0.70}
+(*    Property CheckData:Integer read fiSleepBetweenReads
+                               write fiSleepBetweenReads;
+    Property PacketType:TPacketTypeFlags read fPacketType
+                                         write fPacketType;
+    Property OutputBufferSize:TBlockSizeFlags read fBlockSizeFlags
+                                              write SetfBlockSizeFlags;
+    Property DataReadyToRead:TDX_DataPendingRead read feDataPendingRead
+                                                 write feDataPendingRead; {2.0.70}
+    Property ResolveFailed:TDX_ResolveFailed read feResolveFailed
+                                             write feResolveFailed; {2.0.70}
+*)
+  end;
+
+(*  TDXClientThread=class(TThread)
+  private
+    TT:TDXSockClient;
+  protected
+  public
+    constructor CreateTimerThread(TT:TDXSockClient);
+    procedure Execute; override;
+  end; *)
+
+implementation
+
+constructor TDXSockClient.Create(AOwner:TComponent);
+begin
+   inherited Create(AOwner);
+   Socket:=TDXSock.Create;
+   fsHost:='127.0.0.1';
+   fiPort:=0;
+   fbUseNagle:=True;
+   fbUseUDP:=False;
+   fMimicAsynch:=False;
+   fNotifiedOfData:=False;
+   fbUseBlocking:=True;
+   fLastAddress:='';
+   fLastIP:='';
+(*
+   fiSleepBetweenReads:=500;
+*)
+end;
+
+destructor TDXSockClient.Destroy;
+begin
+try
+   Socket.Free;
+finally
+   inherited Destroy;
+end;
+end;
+
+Function TDXSockClient.DoConnect:Boolean;
+Var
+   NewConnect:PNewConnect;
+
+Begin
+   New(NewConnect);
+   NewConnect^.Port:=fiPort;
+   NewConnect^.UseNAGLE:=fbUseNagle;
+   NewConnect^.UseUDP:=fbUseUDP;
+   NewConnect^.UseBlocking:=fbUseBlocking;
+   NewConnect^.ipAddress:=fsHost;
+   Result:=Connect(NewConnect);
+   Dispose(NewConnect);
+End;
+
+Function TDXSockClient.QuickConnect(DestAddr:AnsiString;DestPort:Integer):Boolean;
+Begin
+   fiPort:=DestPort;
+//   fbUseNagle:=True;
+//   fbUseUDP:=False;
+   fsHost:=DestAddr;
+   Result:=DoConnect;
+End;
+
+Function TDXSockClient.Connect(Parameters:PNewConnect):Boolean;
+Var
+   Ws:AnsiString;
+   fErrStatus:Integer;
+   Addr:AnsiString;
+
+begin
+   Result := False;
+   with Parameters^ do begin
+      fsHost:=ipAddress;
+      If Assigned(feResolvingHost) then Begin
+         feResolvingHost(ipAddress);
+         ProcessWindowsMessageQueue;
+      End;
+      If ipAddress<>fLastAddress then Begin
+         If isNumericString(ipAddress) then Begin
+            Ws:=GetHostByIPAddress(ipAddress);
+            Addr:=ipAddress;
+         End
+         Else Begin
+            Ws:=GetIPAddressByHost(ipAddress,1);
+            Addr:=Ws;
+         End;
+         fLastIP:=Addr;
+         fLastAddress:=ipAddress;
+      End
+      Else Begin
+         Addr:=fLastIP;
+         Ws:=fLastIP;
+      End;
+      If Ws='' then Ws:=ipAddress;
+      If Assigned(feResolvedHost) then Begin
+         feResolvedHost(ipAddress,Ws);
+         ProcessWindowsMessageQueue;
+      End;
+      FbUseBlocking := UseBlocking;
+      fbUseUDP := UseUDP;
+      Socket.IsUDPMode:=fbUseUDP;
+      If Assigned(feConnecting) then Begin
+         feConnecting(ipAddress,Port);
+         ProcessWindowsMessageQueue;
+      End;
+      Socket.Sock:=ClientConnectToServer(Addr, Port, UseUDP, UseNAGLE,
+         @Socket.SockAddr,fErrStatus);
+      Socket.LastCommandStatus:=fErrStatus;
+      if (FErrStatus <> 0) then Begin
+         If Assigned(feConnectFailed) then Begin
+            feConnectFailed(IpAddress,FErrStatus);
+            ProcessWindowsMessageQueue;
+         End;
+         Exit;
+      End;
+      Socket.SockClientSetGlobal(
+         inet_ntoa(Socket.SockAddr.sin_addr),
+         ntohs(Socket.SockAddr.sin_port));
+      If Not UseBlocking then Socket.SetBlocking(UseBlocking);
+      Socket.IsKeepAliveMode:=False;
+{
+      if not FbUseUDP then begin
+         SetSockStatusBool(Socket.Sock, SO_KeepAlive, True, FErrStatus);
+         Socket.IsKeepAliveMode:=FErrStatus = 0;
+      end;
+}      Socket.SetTimeoutAndBuffer(Socket.Sock);
+      // 3.0c
+      if FbUseUDP then begin
+         // try to scale up the primary buffer.
+         SetReceiveBuffer(Socket.Sock, TDXMaxSocketBuffer*4, FErrStatus);
+         If FErrStatus<>0 then
+            SetReceiveBuffer(Socket.Sock, TDXMaxSocketBuffer*3, FErrStatus);
+         If FErrStatus<>0 then
+            SetReceiveBuffer(Socket.Sock, TDXMaxSocketBuffer*2, FErrStatus);
+         If FErrStatus<>0 then
+            SetReceiveBuffer(Socket.Sock, TDXMaxSocketBuffer, FErrStatus);
+      End;
+   end;
+   If Assigned(feConnected) then Begin
+      feConnected(Parameters^.IpAddress,Parameters^.Port);
+      ProcessWindowsMessageQueue;
+   End;
+   Result := True;
+   If fMimicAsynch then Begin
+      fNotifiedOfData:=False;
+(*      with TDXClientThread.CreateTimerThread(self) do begin
+         Priority:=tpIdle; // make a property!
+         Resume;
+      end; *)
+   End;
+end;
+
+Function TDXSockClient.Listen(Parameters:PNewListen):Boolean;
+begin
+   Result:=Socket.Listen(Parameters);
+end;
+
+{$WARNINGS OFF}
+function TDXSockClient.Accept(Var NewSock:TDXSockClient):Boolean;
+begin
+//   Result:=Client.Accept(NewSock);
+  //mh: result := false;
+end;
+{$WARNINGS ON}
+
+{$IFDEF VER100} // D3
+function TDXSockClient.BlockWrite(buf:Pointer;len:Integer):Integer;
+{$ELSE}
+function TDXSockClient.Write(buf:Pointer;len:Integer):Integer;
+{$ENDIF}
+begin
+   If Assigned(feSendingData) then Begin
+      feSendingData(fsHost,Len);
+      ProcessWindowsMessageQueue;
+   End;
+   Result:=Socket.
+       {$IFDEF VER100} BlockWrite( {$ELSE} Write( {$ENDIF}
+       Buf,Len);
+   If Assigned(feSendingDone) then Begin
+      feSendingDone(fsHost,Result);
+      ProcessWindowsMessageQueue;
+   End;
+end;
+
+{$IFDEF VER100}
+function  TDXSockClient.WriteCh(c:AnsiChar):Integer;
+{$ELSE}
+function TDXSockClient.Write(c:AnsiChar):Integer;
+{$ENDIF}
+begin
+{$IFDEF VER100} // D3
+   Result:=BlockWrite(@C,1);
+{$ELSE}
+   Result:=Write(@C,1);
+{$ENDIF}
+end;
+
+function TDXSockClient.Write(Const S:AnsiString):Integer;
+begin
+{$IFDEF VER100} // D3
+   Result:=BlockWrite(@S[1],Length(S));
+{$ELSE}
+   Result:=Write(@S[1],Length(S));
+{$ENDIF}
+end;
+
+// this talks directly to DXSock to support OnFilter encoding
+// thus, you can not do write(AnsiString+#13#10) you have to do it
+// this way - to let TDXSock encode AnsiString and send raw #13#10!
+function TDXSockClient.WriteLn(Const s:AnsiString):Integer;
+begin
+   If Assigned(feSendingData) then Begin
+      feSendingData(fsHost,Length(S));
+      ProcessWindowsMessageQueue;
+   End;
+   Result:=Socket.WriteLn(S);
+   If Assigned(feSendingDone) then Begin
+      feSendingDone(fsHost,Result);
+      ProcessWindowsMessageQueue;
+   End;
+end;
+
+{$IFDEF VER100}
+function TDXSockClient.BlockRead(buf:Pointer;len,tOut:Integer):Integer;
+{$ELSE}
+function TDXSockClient.Read(buf:Pointer;len,tOut:Integer):Integer;
+{$ENDIF}
+begin
+   Result:=Socket.
+       {$IFDEF VER100} BlockRead( {$ELSE} Read( {$ENDIF}
+       Buf,Len);
+   fNotifiedOfData:=False;
+End;
+
+function TDXSockClient.Read(tOut:Integer):AnsiChar;
+begin
+{$IFDEF VER100}
+   BlockRead(@Result,1,tOut);
+{$ELSE}
+   Read(@Result,1,tOut);
+{$ENDIF}
+end;
+
+function TDXSockClient.ReadStr(MaxLength,Timeout:Integer):AnsiString;
+begin
+   Result:=Socket.ReadStr(MaxLength);
+   fNotifiedOfData:=False;
+end;
+
+function TDXSockClient.ReadLn(Timeout: Longword): Ansistring;
+begin
+   Result:=Socket.ReadLn(Timeout);
+   fNotifiedOfData:=False;
+end;
+
+{$IFDEF VER100}
+function  TDXSockClient.SendFromStream(Stream:TStream):Boolean;
+{$ELSE}
+function  TDXSockClient.SendFrom(Stream:TStream):Boolean;
+{$ENDIF}
+Begin
+   If Assigned(feSendingData) then Begin
+      feSendingData(fsHost,Stream.Size);
+      ProcessWindowsMessageQueue;
+   End;
+   Result:=Socket.
+       {$IFDEF VER100} SendFromStream( {$ELSE} SendFrom( {$ENDIF}
+       Stream);
+   If Assigned(feSendingDone) then Begin
+      feSendingDone(fsHost,Stream.Position);
+      ProcessWindowsMessageQueue;
+   End;
+   fNotifiedOfData:=False;
+End;
+
+{$IFDEF VER100}
+function  TDXSockClient.SendFromWindowsFile(var Handle:Integer):boolean;
+{$ELSE}
+function  TDXSockClient.SendFrom(var Handle:Integer):boolean;
+{$ENDIF}
+Begin
+   If Assigned(feSendingData) then Begin
+//      feSendingData(fsHost,Stream.Size);
+      ProcessWindowsMessageQueue;
+   End;
+   Result:=Socket.
+       {$IFDEF VER100} SendFromWindowsFile( {$ELSE} SendFrom( {$ENDIF}
+       Handle);
+   If Assigned(feSendingDone) then Begin
+//      feSendingDone(fsHost,Stream.Position);
+      ProcessWindowsMessageQueue;
+   End;
+   fNotifiedOfData:=False;
+End;
+
+//*****************************************************************************
+// SENDFROMBORLANDFILE: Send the Borland File handle to the socket until end of
+// file
+//*****************************************************************************
+{$IFDEF VER100}
+function  TDXSockClient.SendFromBorlandFile(var Handle:File):boolean;
+{$ELSE}
+function  TDXSockClient.SendFrom(var Handle:File):boolean;
+{$ENDIF}
+Begin
+   If Assigned(feSendingData) then Begin
+//      feSendingData(fsHost,Stream.Size);
+      ProcessWindowsMessageQueue;
+   End;
+   Result:=Socket.
+       {$IFDEF VER100} SendFromBorlandFile( {$ELSE} SendFrom( {$ENDIF}
+       Handle);
+   If Assigned(feSendingDone) then Begin
+//      feSendingDone(fsHost,Stream.Position);
+      ProcessWindowsMessageQueue;
+   End;
+   fNotifiedOfData:=False;
+End;
+
+{$IFDEF VER100}
+function  TDXSockClient.SaveToStream(Stream:TStream;Timeout:Integer):Boolean;
+{$ELSE}
+function  TDXSockClient.SaveTo(Stream:TStream;Timeout:Integer):Boolean;
+{$ENDIF}
+Begin
+   Result:=Socket.
+       {$IFDEF VER100} SaveToStream( {$ELSE} SaveTo( {$ENDIF}
+       Stream,Timeout);
+   fNotifiedOfData:=False;
+End;
+
+{$IFDEF VER100}
+function  TDXSockClient.SaveToWindowsFile(var Handle:Integer;Timeout:Integer):boolean;
+{$ELSE}
+function  TDXSockClient.SaveTo(var Handle:Integer;Timeout:Integer):boolean;
+{$ENDIF}
+Begin
+   Result:=Socket.
+       {$IFDEF VER100} SaveToWindowsFile( {$ELSE} SaveTo( {$ENDIF}
+       Handle,Timeout);
+   fNotifiedOfData:=False;
+End;
+
+{$IFDEF VER100}
+function  TDXSockClient.SaveToBorlandFile(var Handle:File;Timeout:Integer):boolean;
+{$ELSE}
+function  TDXSockClient.SaveTo(var Handle:File;Timeout:Integer):boolean;
+{$ENDIF}
+Begin
+   Result:=Socket.
+       {$IFDEF VER100} SaveToBorlandFile( {$ELSE} SaveTo( {$ENDIF}
+       Handle,Timeout);
+   fNotifiedOfData:=False;
+End;
+
+function TDXSockClient.PeekString:AnsiString;
+begin
+   Result:=Socket.PeekString;
+end;
+
+function TDXSockClient.PeekChar:AnsiChar;
+begin
+   Result:=Socket.PeekChar;
+end;
+
+procedure TDXSockClient.Disconnect;
+begin
+   if Not IsValidSocket then Exit;
+   If Assigned(feDisconnected) then Begin
+      feDisconnected(fsHost);
+      ProcessWindowsMessageQueue;
+   End;
+   Socket.CloseGracefully;
+end;
+
+function  TDXSockClient.IsValidSocket:Boolean;
+Begin
+   If Assigned(Socket) then Result:=Socket.ValidSocket
+   Else Result:=False;
+End;
+
+function TDXSockClient.IsConnected:Boolean;
+begin
+   If Assigned(Socket) then Result:=Socket.Connected
+   Else Result:=False;
+end;
+
+function TDXSockClient.IsReadable:Boolean;
+begin
+   If Assigned(Socket) then Result:=Socket.Readable
+   Else Result:=False;
+end;
+
+function TDXSockClient.IsWritable:Boolean;
+begin
+   If Assigned(Socket) then Result:=Socket.Writable
+   Else Result:=False;
+end;
+
+Function  TDXSockClient.DidReadTimeout:Boolean;
+Begin
+   If Assigned(Socket) then Result:=Socket.LastReadTimeout
+   Else Result:=True;
+End;
+
+function TDXSockClient.GetPeerPort:Integer;
+begin
+   If Assigned(Socket) then Result:=Socket.PeerPort
+   Else Result:=-1;
+end;
+
+function TDXSockClient.GetPeerIPAddr:AnsiString;
+begin
+   If Assigned(Socket) then Result:=Socket.PeerIPAddress
+   Else Result:='';
+end;
+
+function TDXSockClient.GetLocalPort:Integer;
+begin
+   If Assigned(Socket) then Result:=Socket.LocalPort
+   Else Result:=-1;
+end;
+
+function TDXSockClient.GetLocalIPAddr:AnsiString;
+begin
+   If Assigned(Socket) then Result:=Socket.LocalIPAddress
+   Else Result:='';
+end;
+
+Function TDXSockClient.GetErrorStr:AnsiString;
+begin
+   If Assigned(Socket) then Result:=Socket.GetErrorStr
+   Else Result:='Socket instance does not exist';
+end;
+
+Procedure  TDXSockClient.WinsockVersion(Var WinsockInfo:PWinsockInfo);
+begin
+   Socket.WinsockVersion(WinsockInfo);
+end;
+
+Procedure  TDXSockClient.SetNagle(TurnOn:Boolean);
+Begin
+   fbUseNagle:=TurnOn;
+   Socket.SetNagle(fbUseNagle);
+End;
+
+Procedure  TDXSockClient.SetBlocking(TurnOn:Boolean);
+Begin
+   fbUseBlocking:=TurnOn;
+   Socket.SetBlocking(fbUseBlocking);
+End;
+
+function TDXSockClient.GetErrorDesc(errorCode:Integer):AnsiString;
+begin
+   Result:=Socket.GetErrorDesc(ErrorCode);
+end;
+
+Function TDXSockClient.CountWaiting:Integer;
+Begin
+   Result:=Socket.CharactersToRead;
+End;
+
+Function TDXSockClient.GetFErrStatus:Integer;
+Begin
+   Result:=Socket.LastCommandStatus;
+End;
+
+(* Procedure TDXSockClient.CheckInBuffer;
+Var
+   MsgRec:TMsg;
+
+Begin
+   While isValidSocket do Begin
+      If (CountWaiting>0) then Begin
+         If (Not fNotifiedOfData) then Begin
+            fNotifiedOfData:=True;
+            if Assigned(feDataPendingRead) then
+               feDataPendingRead(CountWaiting);
+         End
+      End;
+      SleepEx(fiSleepBetweenReads,True);
+      {2.0.91}
+      while PeekMessage(MsgRec,0{WindowHandle},0,0,PM_REMOVE) do begin
+         TranslateMessage(MsgRec);
+         DispatchMessage(MsgRec)
+      end;
+   End;
+End;
+
+constructor TDXClientThread.CreateTimerThread(TT:TDXSockClient);
+begin
+  inherited Create(true);
+  self.tt:=tt;
+  FreeOnTerminate:=true;
+end;
+
+procedure TDXClientThread.Execute;
+begin
+   Synchronize(TT.CheckInBuffer);
+end; *)
+
+end.
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXSocket.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXSocket.pas
new file mode 100644
index 0000000..7bdf02c
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXSocket.pas	
@@ -0,0 +1,1153 @@
+{$I uRODXSock.def}
+
+unit uRODXSocket;
+
+///////////////////////////////////////////////////////////////////////////////
+//         Unit: DXSocket
+//       Author: G.E. Ozz Nixon Jr. (onixon@dxsock.com)
+// ========================================================================
+// Source Owner: DX, Inc. 1995-2002
+//    Copyright: All code is the property of DX, Inc. Licensed for
+//               resell by Brain Patchwork DX (tm) and part of the
+//               DX (r) product lines, which are (c) 1999-2002
+//               DX, Inc. Source may not be distributed without
+//               written permission from both Brain Patchwork DX,
+//               and DX, Inc.
+//      License: (Reminder), None of this code can be added to other
+//               developer products without permission. This includes
+//               but not limited to DCU's, DCP's, DLL's, OCX's, or
+//               any other form of merging our technologies. All of
+//               your products released to a public consumer be it
+//               shareware, freeware, commercial, etc. must contain a
+//               license notification somewhere visible in the
+//               application.
+//               Example is Internet Explorer - Help->About screen
+//               shows the licensed code contained in the application.
+// Code Version: (3rd Generation Code)
+// ========================================================================
+//  Description: Low-Level Socket Wrapper, producing a common framework.
+// ========================================================================
+///////////////////////////////////////////////////////////////////////////////
+
+interface
+
+{$IFDEF MSWINDOWS}
+uses
+   Windows,
+   Winsock;
+{$ENDIF}
+
+{$IFNDEF MSWINDOWS}
+uses
+  baseunix, sockets;
+
+Const
+   TCP_NODELAY = 1;
+   
+   INVALID_SOCKET = -1;
+   SO_KeepAlive=sockets.SO_KEEPALIVE;
+   WSAEINTR=ESysEINTR;
+   WSAEBADF=ESysEBADF;
+   WSAEACCES=ESysEACCES;
+   WSAEFAULT=ESysEFAULT;
+   WSAEINVAL=ESysEINVAL;
+   WSAEMFILE=ESysEMFILE;
+   WSAEWOULDBLOCK=ESysEWOULDBLOCK;
+   WSAEINPROGRESS=ESysEINPROGRESS;
+   WSAEALREADY=ESysEALREADY;
+   WSAENOTSOCK=ESysENOTSOCK;
+   WSAEDESTADDRREQ=ESysEDESTADDRREQ;
+   WSAEMSGSIZE=ESysEMSGSIZE;
+   WSAEPROTOTYPE=ESysEPROTOTYPE;
+   WSAENOPROTOOPT=ESysENOPROTOOPT;
+   WSAEPROTONOSUPPORT=ESysEPROTONOSUPPORT;
+   WSAESOCKTNOSUPPORT=ESysESOCKTNOSUPPORT;
+   WSAEOPNOTSUPP=ESysEOPNOTSUPP;
+   WSAEPFNOSUPPORT=ESysEPFNOSUPPORT;
+   WSAEAFNOSUPPORT=ESysEAFNOSUPPORT;
+   WSAEADDRINUSE=ESysEADDRINUSE;
+   WSAEADDRNOTAVAIL=ESysEADDRNOTAVAIL;
+   WSAENETDOWN=ESysENETDOWN;
+   WSAENETUNREACH=ESysENETUNREACH;
+   WSAENETRESET=ESysENETRESET;
+   WSAECONNABORTED=ESysECONNABORTED;
+   WSAECONNRESET=ESysECONNRESET;
+   WSAENOBUFS=ESysENOBUFS;
+   WSAEISCONN=ESysEISCONN;
+   WSAENOTCONN=ESysENOTCONN;
+   WSAESHUTDOWN=ESysESHUTDOWN;
+   WSAETOOMANYREFS=ESysETOOMANYREFS;
+   WSAETIMEDOUT=ESysETIMEDOUT;
+   WSAECONNREFUSED=ESysECONNREFUSED;
+   WSAELOOP=ESysELOOP;
+   WSAENAMETOOLONG=ESysENAMETOOLONG;
+   WSAEHOSTDOWN=ESysEHOSTDOWN;
+   WSAEHOSTUNREACH=ESysEHOSTUNREACH;
+   WSAENOTEMPTY=ESysENOTEMPTY;
+   WSAEPROCLIM=1000; // not applicable
+   WSAEUSERS=ESysEUSERS;
+   WSAEDQUOT=ESysEDQUOT;
+   WSAESTALE=ESysESTALE;
+   WSAEREMOTE=ESysEREMOTE;
+   WSASYSNOTREADY=1001; // not applicable
+   WSAVERNOTSUPPORTED=1002; // not applicable
+   WSANOTINITIALISED=1003; // not applicable
+   WSAHOST_NOT_FOUND=1;
+   WSATRY_AGAIN=2;
+   WSANO_RECOVERY=3;
+   WSANO_DATA=4;
+   WSAUNKNOWN=5;
+   Socket_Error=-1;
+
+{$DEFINE USE_LIBC_functions}
+
+{$IFDEF USE_LIBC_functions}
+const clib = 'c';
+type
+  Phostent = ^hostent;
+  hostent = record
+    h_name: PChar;
+    h_aliases: PPChar;
+    h_addrtype: Integer;
+    h_length: socklen_t;
+    case Byte of
+      0: (h_addr_list: PPChar);
+      1: (h_addr: PPChar);
+  end;
+__socklen_t = dword;
+function gethostbyaddr(__addr:pointer; __len:__socklen_t; __type:longint):Phostent;cdecl;external clib name 'gethostbyaddr';
+function gethostbyname(__name:Pchar):Phostent;cdecl;external clib name 'gethostbyname';
+{$ENDIF}
+   
+{$ENDIF}
+
+{$IFDEF MSWINDOWS}
+Const
+   INVALID_SOCKET=Winsock.INVALID_SOCKET;
+   SO_KeepAlive=Winsock.SO_KEEPALIVE;
+   WSAENOBUFS=Winsock.WSAENOBUFS;
+   WSAETIMEDOUT=Winsock.WSAETIMEDOUT;
+   WSAECONNABORTED=Winsock.WSAECONNABORTED;
+   Socket_Error=Winsock.SOCKET_ERROR;
+   // 7-27:
+   WSAEWOULDBLOCK=Winsock.WSAEWOULDBLOCK;
+{$ENDIF}
+
+{$IFDEF VER100}
+type
+  in_addr = TInAddr;
+{$ENDIF}
+
+Type
+{$IFNDEF MSWINDOWS}
+   TSockAddrIn = sockaddr;
+   TTimeVal = timeval;
+  // TFDSet=Libc.TFDSet;
+{$ENDIF}
+
+{$IFDEF MSWINDOWS}
+   TSockAddrIn=Winsock.TSockAddrIn;
+   TTimeVal=Winsock.TTimeVal;
+   TFDSet=Winsock.TFDSet;
+{$ENDIF}
+   PNewConnect=^TNewConnect;
+   TNewConnect=Record
+      Port:Integer;
+      UseNAGLE:Boolean;
+      UseUDP:Boolean;
+      UseBlocking:Boolean;
+      ipAddress:AnsiString;
+   End;
+
+   PNewListen=^TNewListen;
+   TNewListen=Record
+      Port:Integer;
+      WinsockQueue:Integer;
+      UseNAGLE:Boolean;
+      UseUDP:Boolean;
+      UseBlocking:Boolean;
+      ConnectionLess:Boolean;
+   End;
+
+   PWinsockInfo=^TWinsockInfo; // 2.3 changed array from 0.. to 1..
+   TWinsockInfo=Record
+     Major_Version:Byte;                 {current version}
+     Minor_Version:Byte;                 {current version}
+     Highest_Major_Version:Byte;         {available on disk}
+     Highest_Minor_Version:Byte;         {available on disk}
+     Description:array[1..256] of AnsiChar;  // C++ Char Description[256];
+     SystemStatus:array[1..128] of AnsiChar; // C++ Char Description[128];
+     MaxSockets:Word;                    // C++ Unsigned short MaxSockets;
+     MaxUDPDatagramSize:Word;            // C++ Unsigned short MaxUDPDatagramSize;
+     VendorInfo:PAnsiChar;                   // C++ Char FAR * VendorInfo;
+   End;
+
+Const
+   ConstSizeofTSockAddrIn=16;
+
+Function CreateSocket(sin_family,socket_type,protocol:integer;
+                      Var ErrorCode:Integer):TSocket;
+Function ClientConnectToServer(ServerIPAddress:AnsiString;
+                               ServerPort:Integer;
+                               UseUDP,UseNAGLE:Boolean;
+                               ResultSockAddr:PSockAddr;
+                               Var ErrorCode:Integer):TSocket;
+Function BindAndListen(BindToIPAddress:AnsiString;
+                       BindToPort,WinsockQueue:Integer;
+                       UseUDP,UseNAGLE,ConnectionLess:Boolean;
+                       ResultSockAddr:PSockAddr;
+                       Var ErrorCode:Integer):TSocket;
+Function IsAcceptWaiting(ListenerSock:TSocket):Boolean;
+Function AcceptNewConnect(ListenerSock:TSocket;
+                          ResultAddr:PSockAddr;
+                          ResultAddrlen:PInteger;
+                          Var ErrorCode:Integer):TSocket;
+Procedure CloseConnection(Var Sock:TSocket;
+                          Gracefully:Boolean);
+Function BasicSend(Sock:TSocket;
+                   Var Buf;
+                   Len:Integer;
+                   Flags:Integer;
+                   Var ErrorCode:Integer):Integer;
+Function BasicRecv(Sock:TSocket;
+                   Var Buf;
+                   Len:Integer;
+                   Flags:Integer;
+                   Var ErrorCode:Integer):Integer;
+Function UDPSend(Sock:TSocket;
+                 Var Buf;
+                 Len:Integer;
+                 Flags:Integer;
+                 SendTo:TSockAddr;
+                 SendToSize:Integer;
+                 Var ErrorCode:Integer):Integer;
+Function UDPRecv(Sock:TSocket;
+                 Var Buf;
+                 Len:Integer;
+                 Flags:Integer;
+                 Var RcvFrom:TSockAddr;
+                 Var RcvFromSize:Integer;
+                 Var ErrorCode:Integer):Integer;
+Function BasicPeek(Sock:TSocket;
+                   Var Buf;
+                   Len:Integer):Integer;
+Function BasicSelect(Sock:TSocket;
+                     CheckRead:Boolean;
+                     Timeout:TTimeVal):Integer;
+Procedure SetNagle(Sock:TSocket;
+                   TurnOn:Boolean;
+                   Var ErrorCode:Integer);
+Procedure SetBlocking(Sock:TSocket;
+                      UseBlocking:Boolean;
+                      Var ErrorCode:Integer);
+Procedure SetReceiveTimeout(Sock:TSocket;
+                            TimeoutMS:Integer;
+                            Var ErrorCode:Integer);
+Procedure SetSendTimeout(Sock:TSocket;
+                         TimeoutMS:Integer;
+                         Var ErrorCode:Integer);
+Procedure SetReceiveBuffer(Sock:TSocket;
+                           WantedSize:Integer;
+                           Var ErrorCode:Integer);
+Procedure SetSendBuffer(Sock:TSocket;
+                        WantedSize:Integer;
+                        Var ErrorCode:Integer);
+Function GetReceiveBuffer(Sock:TSocket;
+                          Var ErrorCode:Integer):Integer;
+Function GetSendBuffer(Sock:TSocket;
+                       Var ErrorCode:Integer):Integer;
+Function GetSockStatusBool(Sock:TSocket;
+                           SO_Flag:Integer;
+                           Var ErrorCode:Integer):Boolean;
+Function GetSockStatusInt(Sock:TSocket;
+                          SO_Flag:Integer;
+                          Var ErrorCode:Integer):Integer;
+Procedure SetSockStatusBool(Sock:TSocket;
+                           SO_Flag:Integer;
+                           Setting:Boolean;
+                           Var ErrorCode:Integer);
+Procedure SetSockStatusInt(Sock:TSocket;
+                          SO_Flag:Integer;
+                          Setting:Integer;
+                          Var ErrorCode:Integer);
+Function CountWaiting(Sock:TSocket;
+                      Var ErrorCode:Integer):Integer;
+Function GetAddressCountByIP(IPAddress:AnsiString):Integer;
+Function GetAddressCountByHost(Host:AnsiString):Integer;
+Function GetIPAddressByHost(Host:AnsiString;Which:Integer):AnsiString;
+Function GetHostByIPAddress(IPAddress:AnsiString):AnsiString;
+Function GetLocalHostName:AnsiString;
+function GetLocalPort(Sock:TSocket):Integer;
+function GetLocalIPAddr(Sock:TSocket):AnsiString;
+function GetLastError:Integer;
+Function GetErrorDesc(ErrorCode:Integer):AnsiString;
+function ByteSwap4(long:Cardinal):Cardinal;
+function ByteSwap2(short:smallint):smallint;
+Function IPIntToIPStr(IPAddr:Integer):AnsiString;
+Function IPStrToIPInt(IPAddr:AnsiString):Integer;
+Function SocketLayerLoaded:Boolean;
+Procedure GetSocketVersion(WinsockInfo:PWinsockInfo);
+Function ntohs(netshort:Word):Word;
+Function inet_ntoa(inaddr:in_addr):PAnsiChar;
+Function htonl(Hostlong:Integer):Integer;
+Function ntohl(Netlong:Integer):Integer;
+Function SetErrorCode(ResultCode:Integer):Integer;
+
+implementation
+
+Uses
+   uRODXString,
+   SysUtils;
+
+Var
+{$IFDEF MSWINDOWS}
+   DLLData:TWSAData;
+{$ENDIF}
+   StartupResult:Integer;
+   GlobalTimeout:TTimeVal; //6-9
+
+Var
+{$IFNDEF MSWINDOWS}
+   SizeOfInt:Cardinal=4; // optimize compiling
+{$ELSE}
+   SizeOfInt:Integer=4; // optimize compiling
+{$ENDIF}
+
+{$IFDEF ENGLISH1}
+{$I Resource_English.inc}
+{$ENDIF}
+{$IFDEF FRENCH1}
+{$I Resource_French.inc}
+{$ENDIF}
+{$IFDEF GERMAN1}
+{$I Resource_German.inc}
+{$ENDIF}
+{$IFDEF ITALIAN1}
+{$I Resource_Italian.inc}
+{$ENDIF}
+{$IFDEF LOWMEM1}
+{$I Resource_LowMem.inc}
+{$ENDIF}
+{$IFDEF PORTUGUESE1}
+{$I Resource_Portuguese.inc}
+{$ENDIF}
+{$IFDEF RUSSIAN1}
+{$I Resource_Russian.inc}
+{$ENDIF}
+{$IFDEF SPANISH1}
+{$I Resource_Spanish.inc}
+{$ENDIF}
+{$IFDEF TURKISH1}
+{$I Resource_Turkish.inc}
+{$ENDIF}
+
+{$IFNDEF MSWINDOWS}
+Function WSAGetLastError:Integer;
+Begin
+   Result:=fpGetErrno;
+End;
+{$ENDIF}
+
+Function CreateSocket(sin_family,socket_type,protocol:integer;
+                      Var ErrorCode:Integer):TSocket;
+Begin
+   ErrorCode:=0;
+// 7-27   Case StartupResult of
+// 7-27      999:Begin
+         Result:={$IFNDEF MSWINDOWS}socket(sin_family,socket_type,protocol){$ENDIF}
+                 {$IFDEF MSWINDOWS}Winsock.Socket(sin_family,socket_type,protocol){$ENDIF}
+                 ;
+         If Result=Invalid_Socket then ErrorCode:=WSAGetLastError;
+// 7-27      End
+// 7-27      Else Begin
+// 7-27         Result:=Invalid_Socket;
+// 7-27         ErrorCode:=WSANotInitialised;
+// 7-27      End;
+// 7-27   End;
+End;
+
+Function SetErrorCode(ResultCode:Integer):Integer;
+Begin
+   If ResultCode=Socket_Error then Result:=WSAGetLastError
+   Else Result:=0;
+End;
+
+Procedure SetNagle(Sock:TSocket;
+                   TurnOn:Boolean;
+                   Var ErrorCode:Integer);
+Var
+   TA:Array[0..3] of AnsiChar;
+
+Begin
+   If Not TurnOn then TA:='1111'
+   Else TA:='0000';
+   ErrorCode:=SetErrorCode(
+   {$IFNDEF MSWINDOWS}fpSetSockOpt(Sock,IPPROTO_TCP,TCP_NODELAY,@TA,SizeofInt){$ENDIF}
+   {$IFDEF MSWINDOWS}SetSockOpt(Sock,IPPROTO_TCP,TCP_NODELAY,@TA,SizeofInt){$ENDIF}
+   );
+End;
+
+Procedure SetBlocking(Sock:TSocket;
+                      UseBlocking:Boolean;
+                      Var ErrorCode:Integer);
+{$IFNDEF MSWINDOWS}
+Const
+   FIONBIO=$5421;
+{$ENDIF}
+
+Var
+{$IFDEF VER90}
+   iBlocking:u_long;
+{$ELSE}
+   iBlocking:Integer;
+{$ENDIF}
+
+Begin
+   If UseBlocking then iBlocking:=0
+   Else iBlocking:=1;
+   ErrorCode:=SetErrorCode(
+   {$IFNDEF MSWINDOWS}fpioctl(Sock,FIONBIO,@iBlocking){$ENDIF}
+   {$IFDEF MSWINDOWS}Winsock.ioctlsocket(Sock,FIONBIO,iBlocking){$ENDIF}
+   );
+End;
+
+Procedure SetReceiveTimeout(Sock:TSocket;
+                            TimeoutMS:Integer;
+                            Var ErrorCode:Integer);
+Begin
+   ErrorCode:=SetErrorCode(
+     {$IFNDEF MSWINDOWS}fpsetsockopt(Sock,SOL_SOCKET,SO_RCVTIMEO,@TimeoutMS,SizeOfInt){$ENDIF}
+     {$IFDEF MSWINDOWS}setsockopt(Sock,SOL_SOCKET,SO_RCVTIMEO,@TimeoutMS,SizeOfInt){$ENDIF}
+     );
+End;
+
+Procedure SetSendTimeout(Sock:TSocket;
+                         TimeoutMS:Integer;
+                         Var ErrorCode:Integer);
+Begin
+   ErrorCode:=SetErrorCode(
+     {$IFNDEF MSWINDOWS}fpsetsockopt(Sock,SOL_SOCKET,SO_SNDTIMEO,@TimeoutMS,SizeofInt){$ENDIF}
+     {$IFDEF MSWINDOWS}setsockopt(Sock,SOL_SOCKET,SO_SNDTIMEO,@TimeoutMS,SizeofInt){$ENDIF}
+   );
+End;
+
+Procedure SetReceiveBuffer(Sock:TSocket;
+                           WantedSize:Integer;
+                           Var ErrorCode:Integer);
+Begin
+   ErrorCode:=SetErrorCode(
+     {$IFNDEF MSWINDOWS}fpsetsockopt(Sock,SOL_SOCKET,SO_RCVBUF,@WantedSize,SizeofInt){$ENDIF}
+     {$IFDEF MSWINDOWS}setsockopt(Sock,SOL_SOCKET,SO_RCVBUF,@WantedSize,SizeofInt){$ENDIF}
+   );
+End;
+
+Function GetSockStatusBool(Sock:TSocket;
+                           SO_Flag:Integer;
+                           Var ErrorCode:Integer):Boolean;
+Var
+   Rslt:Boolean;
+
+Begin
+// 7-27
+   ErrorCode:=SetErrorCode(
+     {$IFNDEF MSWINDOWS}fpGetSockOpt(Sock,SOL_SOCKET,SO_Flag,@Rslt,@SizeofInt){$ENDIF}
+     {$IFDEF MSWINDOWS}GetSockOpt(Sock,SOL_SOCKET,SO_Flag,PAnsiChar(@Rslt),SizeofInt){$ENDIF}
+   );
+   If ErrorCode=0 then Result:=Rslt
+   Else Result:=False;
+End;
+
+Function GetSockStatusInt(Sock:TSocket;
+                          SO_Flag:Integer;
+                          Var ErrorCode:Integer):Integer;
+Var
+   Rslt:Integer;
+
+Begin
+// 7-27
+   ErrorCode:=SetErrorCode(
+     {$IFNDEF MSWINDOWS}fpGetSockOpt(Sock,SOL_SOCKET,SO_Flag,@Rslt,@SizeofInt){$ENDIF}
+     {$IFDEF MSWINDOWS}GetSockOpt(Sock,SOL_SOCKET,SO_Flag,PAnsiChar(@Rslt),SizeofInt){$ENDIF}
+   );
+   If ErrorCode=0 then Result:=Rslt
+   Else Result:=0;
+End;
+
+Procedure SetSockStatusBool(Sock:TSocket;
+                           SO_Flag:Integer;
+                           Setting:Boolean;
+                           Var ErrorCode:Integer);
+var
+   intval:integer;
+
+Begin
+   if (Setting) then intval:=1
+   else intval:=0;
+   ErrorCode:=SetErrorCode(
+     {$IFNDEF MSWINDOWS}fpSetSockOpt(Sock,SOL_Socket,SO_Flag,@intval,SizeofInt){$ENDIF}
+     {$IFDEF MSWINDOWS}SetSockOpt(Sock,SOL_Socket,SO_Flag,@intval,SizeofInt){$ENDIF}
+   );
+End;
+
+Procedure SetSockStatusInt(Sock:TSocket;
+                          SO_Flag:Integer;
+                          Setting:Integer;
+                          Var ErrorCode:Integer);
+Begin
+   ErrorCode:=SetErrorCode(
+     {$IFNDEF MSWINDOWS}fpSetSockOpt(Sock,SOL_Socket,SO_Flag,@Setting,SizeofInt){$ENDIF}
+     {$IFDEF MSWINDOWS}SetSockOpt(Sock,SOL_Socket,SO_Flag,@Setting,SizeofInt){$ENDIF}
+   );
+End;
+
+
+Procedure SetSendBuffer(Sock:TSocket;
+                        WantedSize:Integer;
+                        Var ErrorCode:Integer);
+Begin
+   ErrorCode:=SetErrorCode(
+     {$IFNDEF MSWINDOWS}fpsetsockopt(Sock,SOL_SOCKET,SO_SNDBUF,@WantedSize,SizeofInt){$ENDIF}
+     {$IFDEF MSWINDOWS}setsockopt(Sock,SOL_SOCKET,SO_SNDBUF,@WantedSize,SizeofInt){$ENDIF}
+   );
+End;
+
+Function GetReceiveBuffer(Sock:TSocket;
+                          Var ErrorCode:Integer):Integer;
+Begin
+   Result:=GetSockStatusInt(Sock,SO_RCVBUF,ErrorCode);
+End;
+
+Function GetSendBuffer(Sock:TSocket;
+                       Var ErrorCode:Integer):Integer;
+Begin
+   Result:=GetSockStatusInt(Sock,SO_SNDBUF,ErrorCode);
+End;
+
+Procedure KillSocket(Var Sock:TSocket);
+Begin
+   If Sock<>Invalid_Socket then Begin
+      ShutDown(Sock,2);
+      {$IFNDEF MSWINDOWS}closeSocket(Sock);{$ENDIF}
+      {$IFDEF MSWINDOWS}CloseSocket(Sock);{$ENDIF}
+      Sock:=Invalid_Socket;
+   End;
+End;
+
+Procedure CloseConnection(Var Sock:TSocket;
+                          Gracefully:Boolean);
+Var
+{$IFDEF VER100} // Delphi3 code
+   Lin:TLinger;
+{$ELSE}
+   Lin:Linger;
+{$ENDIF}
+
+Begin
+   If Sock=Invalid_Socket then Exit;
+   Lin.l_linger:=0;
+   If Gracefully then Begin
+      Lin.l_onoff:=1; // Not(0);
+      {$IFNDEF MSWINDOWS}fpsetsockopt(Sock,SOL_SOCKET,SO_LINGER,@lin,Sizeof(Lin));{$ENDIF}
+      {$IFDEF MSWINDOWS}Winsock.setsockopt(Sock,SOL_SOCKET,SO_LINGER,@lin,Sizeof(Lin));{$ENDIF}
+   End
+   Else Begin
+      Lin.l_onoff:=0;
+      {$IFNDEF MSWINDOWS}fpsetsockopt(Sock,SOL_SOCKET,SO_LINGER,@lin,sizeof(lin));{$ENDIF}
+      {$IFDEF MSWINDOWS}Winsock.setsockopt(Sock,SOL_SOCKET,SO_LINGER,@lin,sizeof(lin));{$ENDIF}
+   End;
+//   DoSleepEx(0);
+   KillSocket(Sock);
+End;
+
+{$IFDEF MSWINDOWS}
+function CheckForSocketError(ResultCode:Integer):Boolean;
+begin
+  Result := ResultCode = SOCKET_ERROR;
+end;
+{$ENDIF}
+{$IFNDEF MSWINDOWS}
+function CheckForSocketError(ResultCode: Boolean):Boolean;
+begin
+  Result := ResultCode = False;
+end;
+{$ENDIF}
+
+
+Function ClientConnectToServer(ServerIPAddress:AnsiString;
+                               ServerPort:Integer;
+                               UseUDP,UseNAGLE:Boolean;
+                               ResultSockAddr:PSockAddr;
+                               Var ErrorCode:Integer):TSocket;
+{$IFNDEF MSWINDOWS}
+Const
+   SOCK_dgram=2;
+   SOCK_stream=1;
+{$ENDIF}
+
+begin
+   Result:=Invalid_Socket;
+   If ServerIPAddress='' then Exit;
+   ServerIPAddress:=FixDottedIp(ServerIPAddress);
+   FillChar(ResultSockAddr^,Sizeof(ResultSockAddr^),#0);
+   ResultSockAddr.sin_family:=AF_INET;
+   ResultSockAddr.sin_port:=htons(ServerPort);
+   {$IFNDEF MSWINDOWS}
+   ResultSockAddr.sin_addr.S_addr:= StrToNetAddr(ServerIPAddress).s_addr;
+   {$ENDIF}
+   {$IFDEF MSWINDOWS}
+   ResultSockAddr.sin_addr.S_addr:=Inet_Addr(PAnsichar(ServerIPAddress));
+   {$ENDIF}
+   Case UseUDP of
+      True:Begin
+         Result:=CreateSocket(AF_INET,SOCK_DGRAM,IPPROTO_UDP,ErrorCode);
+         Exit;
+      End;
+      Else Begin
+         Result:=CreateSocket(AF_INET,SOCK_STREAM,IPPROTO_TCP,ErrorCode);
+         If (Result<>Invalid_Socket) and (Not UseNAGLE) then
+            SetNAGLE(Result,UseNAGLE,ErrorCode);
+      End;
+   End;
+   If Result=Invalid_Socket then Exit;
+   SetSendTimeout(Result,5000,ErrorCode);
+   If CheckForSocketError(Connect(Result,ResultSockAddr^,ConstSizeofTSockAddrIn)) then begin
+      ErrorCode:=WSAGetLastError;
+      KillSocket(Result);
+   End;
+end;
+
+Function BindAndListen(BindToIPAddress:AnsiString;
+                       BindToPort,WinsockQueue:Integer;
+                       UseUDP,UseNAGLE,ConnectionLess:Boolean;
+                       ResultSockAddr:PSockAddr;
+                       Var ErrorCode:Integer):TSocket;
+{$IFNDEF MSWINDOWS}
+Const
+   SOCK_dgram=2;
+   SOCK_stream=1;
+{$ENDIF}
+
+begin
+   FillChar(ResultSockAddr^,Sizeof(ResultSockAddr^),#0); // DO ! USE ZEROMEMORY
+// SPX: Result:=CreateSocket(AF_IPX,SOCK_STREAM,NSPROTO_SPX,ErrorCode);
+// IPX: Result:=CreateSocket(AF_IPX,SOCK_DGRAM,NSPROTO_IPX,ErrorCode);
+   Case UseUDP of
+      True:Result:=CreateSocket(AF_INET,SOCK_DGRAM,IPPROTO_UDP,ErrorCode);
+      Else Begin
+         Result:=CreateSocket(AF_INET,SOCK_STREAM,IPPROTO_TCP,ErrorCode);
+         If (Result<>Invalid_Socket) and (Not UseNAGLE) then SetNAGLE(Result,UseNAGLE,ErrorCode);
+      End;
+   End;
+   If Result=Invalid_Socket then Exit;
+   ResultSockAddr.sin_family:=AF_INET;
+   ResultSockAddr.sin_port:=htons(BindToPORT);
+// 7-27
+   if (length(BindToIPAddress)<7) then
+     ResultSockAddr.sin_addr.S_addr:=INADDR_ANY
+   else
+     {$IFNDEF MSWINDOWS}
+     ResultSockAddr.sin_addr.S_addr:=StrToNetAddr(BindToIPAddress).s_addr;
+     {$ENDIF}
+     {$IFDEF MSWINDOWS}
+     ResultSockAddr.sin_addr.S_addr:=Inet_Addr(PAnsiChar(BindToIPAddress));
+     {$ENDIF}
+   If CheckForSocketError(Bind(Result,ResultSockAddr^,ConstSizeofTSockAddrIn)) then Begin
+      Result:=Invalid_Socket;
+      ErrorCode:=WSAGetLastError;
+      Exit;
+   End;
+// 7-27
+   If Not ConnectionLess then
+      If CheckForSocketError(Listen(Result,WinsockQueue)) then Begin
+         Result:=Invalid_Socket;
+         ErrorCode:=WSAGetLastError;
+      End;
+End;
+
+Function IsAcceptWaiting(ListenerSock:TSocket):Boolean;
+{$IFDEF MSWINDOWS}
+Var
+   SockList:TFDSet;
+{$ENDIF}
+
+Begin
+{$IFNDEF MSWINDOWS}
+   Result:=BasicSelect(ListenerSock,True,GlobalTimeout)>0;
+{$ELSE}
+   SockList.fd_count:=1;
+   SockList.fd_array[0]:=ListenerSock;
+   Result:=Select(0,@sockList,nil,nil,@GlobalTimeout)>0;
+{$ENDIF}
+End;
+
+Function AcceptNewConnect(ListenerSock:TSocket;
+                          ResultAddr:PSockAddr;
+                          ResultAddrlen:PInteger;
+                          Var ErrorCode:Integer):TSocket;
+Begin
+   Result:={$IFNDEF MSWINDOWS}Accept(ListenerSock,ResultAddr^,ResultAddrLen^);{$ENDIF}
+           {$IFDEF MSWINDOWS}
+              {$IFDEF VER90}
+              Winsock.Accept(ListenerSock,ResultAddr^,ResultAddrLen^);
+              {$ELSE}
+              Winsock.Accept(ListenerSock,ResultAddr,ResultAddrLen);
+              {$ENDIF}
+           {$ENDIF}
+   If Result=Invalid_Socket then ErrorCode:=WSAGetLastError
+   Else If ResultAddrLen^=0 then ErrorCode:=WSAEFault
+   Else ErrorCode:=0;
+End;
+
+Function BasicSend(Sock:TSocket;
+                   Var Buf;
+                   Len:Integer;
+                   Flags:Integer;
+                   Var ErrorCode:Integer):Integer;
+Begin
+//   Result:=Socket_Error;
+//   ErrorCode:=WSAEINTR;
+//   While (Result<0) and ((ErrorCode=WSAEINTR) or (ErrorCode=WSAETIMEDOUT)) do Begin
+       Result:=Send(Sock,Buf,Len,Flags);
+       ErrorCode:=SetErrorCode(Result);
+//   End;
+End;
+
+Function UDPSend(Sock:TSocket;
+                 Var Buf;
+                 Len:Integer;
+                 Flags:Integer;
+                 SendTo:TSockAddr;
+                 SendToSize:Integer;
+                 Var ErrorCode:Integer):Integer;
+Begin
+   Result:={$IFNDEF MSWINDOWS}fpSendTo(Sock,@Buf,Len,Flags,@SendTo,SendToSize);{$ENDIF}
+           {$IFDEF MSWINDOWS}Winsock.SendTo(Sock,Buf,Len,Flags,SendTo,SendToSize);{$ENDIF}
+   ErrorCode:=SetErrorCode(Result);
+End;
+
+Function BasicRecv(Sock:TSocket;
+                   Var Buf;
+                   Len:Integer;
+                   Flags:Integer;
+                   Var ErrorCode:Integer):Integer;
+Begin
+// 7-27   If Sock<>Invalid_Socket then Begin
+      Result:=Recv(Sock,Buf,Len,Flags);
+      ErrorCode:=SetErrorCode(Result);
+// 7-27   End
+// 7-27   Else Result:=0;
+End;
+
+Function UDPRecv(Sock:TSocket;
+                 Var Buf;
+                 Len:Integer;
+                 Flags:Integer;
+                 Var RcvFrom:TSockAddr;
+                 Var RcvFromSize:Integer;
+                 Var ErrorCode:Integer):Integer;
+Begin
+// 7-27   If Sock<>Invalid_Socket then Begin
+      Result:={$IFNDEF MSWINDOWS}recvfrom(Sock,Buf,Len,Flags,RcvFrom,RcvFromSize);{$ENDIF}
+              {$IFDEF MSWINDOWS}Winsock.recvfrom(Sock,Buf,Len,Flags,RcvFrom,RcvFromSize);{$ENDIF}
+      ErrorCode:=SetErrorCode(Result);
+// 7-27   End
+// 7-27   Else Result:=0;
+End;
+
+Function BasicPeek(Sock:TSocket;
+                   Var Buf;
+                   Len:Integer):Integer;
+Begin
+// 7-27   If Sock<>Invalid_Socket then Begin
+      Result:=Recv(Sock, Buf, Len, MSG_PEEK);
+// 7-27   End
+// 7-27   Else Result:=Socket_Error;
+End;
+
+Function BasicSelect(Sock:TSocket;
+                     CheckRead:Boolean;
+                     Timeout:TTimeVal):Integer;
+var
+  SockList: TFDSet;
+
+Begin
+{$IFNDEF MSWINDOWS}
+   fpFD_ZERO(SockList);
+   SockList[0]:=Sock;
+   If CheckRead then
+      Result:=fpSelect(1,@SockList,nil,nil,@Timeout)
+   Else
+      Result:=fpSelect(1,nil,@SockList,nil,@Timeout);
+{$ENDIF}
+{$IFDEF MSWINDOWS}
+   SockList.fd_count:=1;
+   SockList.fd_array[0]:=Sock;
+   If CheckRead then
+     Result:=Select(0,@sockList,nil,nil,@Timeout)
+   Else
+     Result:=Select(0,nil,@sockList,nil,@Timeout)
+{$ENDIF}
+End;
+
+Function CountWaiting(Sock:TSocket;Var ErrorCode:Integer):Integer;
+{$IFNDEF MSWINDOWS}
+Const
+   FIONREAD=$541B;
+{$ENDIF}
+var
+   numWaiting:longint;
+
+begin
+   Result:=0;
+// in linux IOCtl is used to "set" not "get" values.
+   ErrorCode:=SetErrorCode({$IFNDEF MSWINDOWS}fpIOCtl(Sock,FIONREAD,@numWaiting));{$ENDIF}
+                           {$IFDEF MSWINDOWS}Winsock.IOCtlSocket(Sock,FIONREAD,numWaiting));{$ENDIF}
+   If ErrorCode=0 then Result:=numWaiting;
+end;
+
+Function GetAddressCountByIP(IPAddress:AnsiString):Integer;
+Var
+   HostEnt:PHostEnt;
+   {$IFDEF MSWINDOWS}
+   InAddr: integer;
+   {$ENDIF}
+   {$IFNDEF MSWINDOWS}
+   InAddr:cuint32;
+   {$ENDIF}
+
+Begin
+   IPAddress:=FixDottedIp(IPAddress);
+   {$IFDEF MSWINDOWS}
+   InAddr:=inet_addr(PAnsiChar(IPAddress));
+   {$ENDIF}
+   {$IFNDEF MSWINDOWS}
+   InAddr:=StrToNetAddr(IPAddress).s_addr;
+   {$ENDIF}
+{$WARNINGS OFF}
+   HostEnt:=gethostbyaddr(@InAddr,Length(IPAddress),AF_INET);
+   If Assigned(HostEnt) then Result:=HostEnt.h_length div 4
+   Else Result:=0;
+{$WARNINGS ON}
+End;
+
+Function GetAddressCountByHost(Host:AnsiString):Integer;
+Var
+   HostEnt:PHostEnt;
+
+Begin
+// 7-27   if Host='' then Begin
+// 7-27      Result:=0;
+// 7-27      Exit;
+// 7-27   End;
+   HostEnt:=gethostbyname(PAnsiChar(Host));
+// 7-27
+   If Assigned(HostEnt) then Result:=GetAddressCountByIP(HostEnt.h_addr^)
+   Else Result:=0;
+End;
+
+Function GetIPAddressByHost(Host:AnsiString;Which:Integer):AnsiString;
+Var
+   HostEnt:PHostEnt;
+   iAddr:Integer;
+
+Begin
+// 7-27   if (Host='') or (Which<1) then Begin
+// 7-27      Result:='';
+// 7-27      Exit;
+// 7-27   End;
+   HostEnt:=gethostbyname(PAnsiChar(Host));
+   If Assigned(HostEnt) then Begin
+      If Which<=(HostEnt.h_length div 4) then Begin
+         Move(PByteArray(HostEnt.h_addr_list^)[(Which-1)*4],iAddr,4);
+         Result:=inet_ntoa(in_Addr(iAddr));
+      End
+      Else Result:='';
+   End
+   Else Result:='';
+End;
+
+Function GetHostByIPAddress(IPAddress:AnsiString):AnsiString;
+Var
+   HostEnt:PHostEnt;
+   {$IFDEF MSWINDOWS}
+   InAddr: integer;
+   {$ENDIF}
+   {$IFNDEF MSWINDOWS}
+   InAddr:cuint32;
+   {$ENDIF}
+
+Begin
+   IPAddress:=FixDottedIp(IPAddress);
+   {$IFDEF MSWINDOWS}
+   InAddr:=inet_addr(PAnsiChar(IPAddress));
+   {$ENDIF}
+   {$IFNDEF MSWINDOWS}
+   InAddr:=StrToNetAddr(IPAddress).s_addr;
+   {$ENDIF}
+{$WARNINGS OFF}
+   HostEnt:=gethostbyaddr(@InAddr,Length(IPAddress),AF_INET);
+   If Assigned(HostEnt) then Result:=StrPas(HostEnt.h_name)
+   Else Result:='';
+{$WARNINGS ON}
+End;
+
+Function GetLocalHostName:AnsiString;
+Begin
+   Result:=GetHostByIPAddress(
+      GetIPAddressByHost('localhost',1));
+   If Result='' then Result:='Localhost';
+End;
+
+function GetLocalPort(Sock:TSocket):Integer;
+var
+  addr: TSockAddrIn;
+{$IFNDEF MSWINDOWS}
+  addrlen: cardinal;
+{$ENDIF}
+{$IFDEF MSWINDOWS}
+  addrlen: integer;
+{$ENDIF}
+
+begin
+  addrlen:=ConstSizeofTSockAddrIn;
+  {$IFDEF MSWINDOWS}
+  if getsockname(Sock,addr,addrlen)=0 then
+  {$ENDIF}
+  {$IFNDEF MSWINDOWS}
+  if fpgetsockname(Sock,@addr,@addrlen)=0 then
+  {$ENDIF}
+    Result:=ntohs(addr.sin_port)
+  else Result := 0;
+end;
+
+function GetLocalIPAddr(Sock:TSocket):AnsiString;
+var
+  addr: TSockAddrIn;
+{$IFNDEF MSWINDOWS}
+  addrlen: cardinal;
+{$ENDIF}
+{$IFDEF MSWINDOWS}
+  addrlen: integer;
+{$ENDIF}
+
+begin
+  addrlen:=ConstSizeofTSockAddrIn;
+  FillChar(Addr,Sizeof(TSockAddrIn),#0);
+{$IFNDEF MSWINDOWS}
+  fpgetsockname(Sock,@addr,@addrlen);
+{$ENDIF}
+{$IFDEF MSWINDOWS}
+  getsockname(Sock,addr,addrlen);
+{$ENDIF}
+  Result:=inet_ntoa(addr.sin_addr);
+end;
+
+Procedure GetRemoteSockAddr(Sock:TSocket;
+                            ResultAddr:PSockAddr;
+                            ResultAddrlen:PInteger;
+                            Var ErrorCode:Integer);
+{$IFNDEF MSWINDOWS}
+Var
+   TmpAddrLen:LongInt;
+{$ENDIF}
+
+Begin
+{$IFNDEF MSWINDOWS}
+   ErrorCode:=SetErrorCode(getpeername(Sock,ResultAddr^,TmpAddrlen));
+   ResultAddrLen^:=TmpAddrLen;
+{$ENDIF}
+{$IFDEF MSWINDOWS}
+   ErrorCode:=SetErrorCode(getpeername(Sock,ResultAddr^,ResultAddrlen^));
+{$ENDIF}
+End;
+
+function GetLastError:Integer;
+Begin
+   Result:=WSAGetLastError;
+End;
+
+Function GetErrorDesc(errorCode:Integer):AnsiString;
+var
+  r: string;
+begin
+// If you compile and get "Undeclared Identified -
+// Edit DXSock.DEF - and select a language!
+   case errorCode of
+      WSAEINTR:R:=_WSAEINTR;
+      WSAEBADF:R:=_WSAEBADF;
+      WSAEACCES:R:=_WSAEACCES;
+      WSAEFAULT:R:=_WSAEFAULT;
+      WSAEINVAL:R:=_WSAEINVAL;
+      WSAEMFILE:R:=_WSAEMFILE;
+      WSAEWOULDBLOCK:R:=_WSAEWOULDBLOCK;
+      WSAEINPROGRESS:R:=_WSAEINPROGRESS;
+      WSAEALREADY:R:=_WSAEALREADY;
+      WSAENOTSOCK:R:=_WSAENOTSOCK;
+      WSAEDESTADDRREQ:R:=_WSAEDESTADDRREQ;
+      WSAEMSGSIZE:R:=_WSAEMSGSIZE;
+      WSAEPROTOTYPE:R:=_WSAEPROTOTYPE;
+      WSAENOPROTOOPT:R:=_WSAENOPROTOOPT;
+      WSAEPROTONOSUPPORT:R:=_WSAEPROTONOSUPPORT;
+      WSAESOCKTNOSUPPORT:R:=_WSAESOCKTNOSUPPORT;
+      WSAEOPNOTSUPP:R:=_WSAEOPNOTSUPP;
+      WSAEPFNOSUPPORT:R:=_WSAEPFNOSUPPORT;
+      WSAEAFNOSUPPORT:R:=_WSAEAFNOSUPPORT;
+      WSAEADDRINUSE:R:=_WSAEADDRINUSE;
+      WSAEADDRNOTAVAIL:R:=_WSAEADDRNOTAVAIL;
+      WSAENETDOWN:R:=_WSAENETDOWN;
+      WSAENETUNREACH:R:=_WSAENETUNREACH;
+      WSAENETRESET:R:=_WSAENETRESET;
+      WSAECONNABORTED:R:=_WSAECONNABORTED;
+      WSAECONNRESET:R:=_WSAECONNRESET;
+      WSAENOBUFS:R:=_WSAENOBUFS;
+      WSAEISCONN:R:=_WSAEISCONN;
+      WSAENOTCONN:R:=_WSAENOTCONN;
+      WSAESHUTDOWN:R:=_WSAESHUTDOWN;
+      WSAETOOMANYREFS:R:=_WSAETOOMANYREFS;
+      WSAETIMEDOUT:R:=_WSAETIMEDOUT;
+      WSAECONNREFUSED:R:=_WSAECONNREFUSED;
+      WSAELOOP:R:=_WSAELOOP;
+      WSAENAMETOOLONG:R:=_WSAENAMETOOLONG;
+      WSAEHOSTDOWN:R:=_WSAEHOSTDOWN;
+      WSAEHOSTUNREACH:R:=_WSAEHOSTUNREACH;
+      WSAENOTEMPTY:R:=_WSAENOTEMPTY;
+      WSAEPROCLIM:R:=_WSAEPROCLIM;
+      WSAEUSERS:R:=_WSAEUSERS;
+      WSAEDQUOT:R:=_WSAEDQUOT;
+      WSAESTALE:R:=_WSAESTALE;
+      WSAEREMOTE:R:=_WSAEREMOTE;
+      WSASYSNOTREADY:R:=_WSASYSNOTREADY;
+      WSAVERNOTSUPPORTED:R:=_WSAVERNOTSUPPORTED;
+      WSANOTINITIALISED:R:=_WSANOTINITIALISED;
+      WSAHOST_NOT_FOUND:R:=_WSAHOST_NOT_FOUND;
+      WSATRY_AGAIN:R:=_WSATRY_AGAIN;
+      WSANO_RECOVERY:R:=_WSANO_RECOVERY;
+      {$IFDEF MSWINDOWS}
+      WSANO_DATA:R:=_WSANO_DATA;
+      {$ENDIF}
+      Else R:=_WSAUNKNOWN+' ('+IntToCommaStr(ErrorCode)+')';
+   end;
+   // message in the native Ansi so
+   Result := {$IFDEF UNICODE}WideStringToAnsiString{$ENDIF}(R);
+end;
+
+function ByteSwap4(long:Cardinal):Cardinal;
+begin
+   result:=ntohl(long);
+end;
+
+function ByteSwap2(short:smallint):smallint;
+begin
+   result:=ntohs(short);
+end;
+
+Function IPIntToIPStr(IPAddr:Integer):AnsiString;
+Var
+   Ws:AnsiString;
+
+Begin
+   Setlength(Ws,4);
+   Move(IPAddr,Ws[1],4);
+   Result:=
+      Ansi_IntToStr(Ord(Ws[1]))+'.'+
+      Ansi_IntToStr(Ord(Ws[2]))+'.'+
+      Ansi_IntToStr(Ord(Ws[3]))+'.'+
+      Ansi_IntToStr(Ord(Ws[4]));
+End;
+
+Function IPStrToIPInt(IPAddr:AnsiString):Integer;
+  function _getChar(AValue: Ansistring): AnsiChar;
+  begin
+    Result :=AnsiChar(Ansi_StrToInt(AValue));
  end;
+Var
+   Ws:AnsiString;
+
+Begin
+   Setlength(Ws,4);
+   Ws[1]:=_getChar(FetchByChar(IPAddr,'.',False));
+   Ws[2]:=_getChar(FetchByChar(IPAddr,'.',False));
+   Ws[3]:=_getChar(FetchByChar(IPAddr,'.',False));
+   Ws[4]:=_getChar(FetchByChar(IPAddr,'.',False));
+   Move(Ws[1],Result,4);
+End;
+
+Function SocketLayerLoaded:Boolean;
+Begin
+   Result:=(StartupResult=999);
+End;
+
+Procedure GetSocketVersion(WinsockInfo:PWinsockInfo);
+Begin
+{$IFNDEF MSWINDOWS}
+   With WinsockInfo^ do Begin
+      Major_Version:=2;
+      Minor_Version:=0;
+      Highest_Major_Version:=2;
+      Highest_Minor_Version:=0;
+      Move('Linux Socket Layer 2.0',Description,256);
+      Move('Ready',SystemStatus,128);
+      MaxSockets:=65000;
+      MaxUDPDatagramSize:=1500;
+      VendorInfo:='Brain Patchwork DX, LLC.';
+   End;
+{$ENDIF}
+{$IFDEF MSWINDOWS}
+   With WinsockInfo^ do Begin
+      Major_Version:=BYTE(DllData.wVersion);
+      Minor_Version:=HIBYTEOfWORD(DllData.wVersion);
+      Highest_Major_Version:=BYTE(DllData.wHighVersion);
+      Highest_Minor_Version:=HIBYTEOfWORD(DllData.wHighVersion);
+      Move(DllData.szDescription,Description,256);
+      Move(DllData.szSystemStatus,SystemStatus,128);
+      MaxSockets:=DllData.iMaxSockets;
+      MaxUDPDatagramSize:=DllData.iMaxUdpDg;
+      VendorInfo:=DllData.lpVendorInfo;
+   End;
+{$ENDIF}
+End;
+
+Function ntohs(netshort:Word):Word;
+Begin
+   Result:={$IFNDEF MSWINDOWS}sockets.ntohs(Netshort);{$ENDIF}
+           {$IFDEF MSWINDOWS}Winsock.ntohs(Netshort);{$ENDIF}
+End;
+
+Function inet_ntoa(inaddr:in_addr):PAnsiChar;
+Begin
+   Result:={$IFNDEF MSWINDOWS}PAnsiChar(NetAddrToStr(inaddr));{$ENDIF}
+           {$IFDEF MSWINDOWS}Winsock.inet_ntoa(inaddr);{$ENDIF}
+End;
+
+Function htonl(Hostlong:Integer):Integer;
+Begin
+   Result:={$IFNDEF MSWINDOWS}sockets.htonl(Hostlong);{$ENDIF}
+           {$IFDEF MSWINDOWS}Winsock.htonl(Hostlong);{$ENDIF}
+End;
+
+Function ntohl(Netlong:Integer):Integer;
+Begin
+   Result:={$IFNDEF MSWINDOWS}sockets.ntohl(netlong);{$ENDIF}
+           {$IFDEF MSWINDOWS}Winsock.ntohl(netlong);{$ENDIF}
+End;
+
+initialization
+{$IFNDEF MSWINDOWS}
+   StartupResult:=0;
+{$ELSE}
+   StartupResult:=WSAStartup(MAKEBytesToWORD(2,2),DLLData);
+{$ENDIF}
+   if StartupResult=0 then Begin
+      StartupResult:=999;
+      // 6-9: added to load 1 time.
+      GlobalTimeout.tv_Sec:=0;
+      GlobalTimeout.tv_uSec:=2500;
+   End
+   else StartupResult:=123;
+
+finalization
+{$IFDEF MSWINDOWS}
+   If StartupResult=999 then WSACleanup;
+{$ENDIF}
+
+End.
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXString.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXString.pas
new file mode 100644
index 0000000..33fb6c8
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RODX/uRODXString.pas	
@@ -0,0 +1,802 @@
+{$I uRODXSock.def}
+
+unit uRODXString;
+
+interface
+
+///////////////////////////////////////////////////////////////////////////////
+//         Unit: DXString
+//       Author: G.E. Ozz Nixon Jr. (onixon@dxsock.com)
+//     Assembly: Pete Morris and Ozz Nixon {all asm by Ozz is denoted!}
+// ========================================================================
+// Source Owner: DX, Inc. 1995-2002
+//    Copyright: All code is the property of DX, Inc. Licensed for
+//               resell by Brain Patchwork DX (tm) and part of the
+//               DX (r) product lines, which are (c) 1999-2002
+//               DX, Inc. Source may not be distributed without
+//               written permission from both Brain Patchwork DX,
+//               and DX, Inc.
+//      License: (Reminder), None of this code can be added to other
+//               developer products without permission. This includes
+//               but not limited to DCU's, DCP's, DLL's, OCX's, or
+//               any other form of merging our technologies. All of
+//               your products released to a public consumer be it
+//               shareware, freeware, commercial, etc. must contain a
+//               license notification somewhere visible in the
+//               application.
+//               Example is Internet Explorer - Help->About screen
+//               shows the licensed code contained in the application.
+// Code Version: (3rd Generation Code)
+// ========================================================================
+//  Description:
+// ========================================================================
+///////////////////////////////////////////////////////////////////////////////
+
+Uses
+{$IFDEF MSWINDOWS}
+   Windows,
+{$ENDIF}
+   Classes,
+   SyncObjs,
+   SysUtils;
+
+
+// DO NOT CHANGE THIS ONE
+// BRAIN PATCHWORK DX ONLY CHANGES THIS
+// IT IS USED FOR TECHNICAL SUPPORT (VERSION CONTROLS)
+CONST BPDX_RELEASE_DATE='2002-09-01'; {YYYY-MM-DD}
+
+
+///////////////////////////////////////////////////////////////////////////////
+// Brain Patchwork - Just so you can verify which release you have at run-time.
+///////////////////////////////////////////////////////////////////////////////
+Type
+   TDXCritical = Class(TObject)
+   private
+     Synchronizer:TCriticalSection;
+   public
+     constructor Create;
+     destructor Destroy; override;
+     procedure StartingRead;
+     procedure FinishedRead;
+     procedure StartingWrite;
+     procedure FinishedWrite;
+   End;
+   
+{$IFDEF OBJECTS_ONLY}
+   TDXComponent = Class(TObject)
+{$ELSE}
+   TDXComponent = Class(TComponent)
+{$ENDIF}
+   private
+         procedure SetReleaseDate(value: AnsiString);
+         Function GetReleaseDate:AnsiString;
+   public
+         MyCriticalSection:TDXCritical;
+         constructor Create(AOwner: TComponent); {$IFNDEF OBJECTS_ONLY} override; {$ENDIF}
+         destructor Destroy; override;
+   published
+         property ReleaseDate:AnsiString Read GetReleaseDate write SetReleaseDate;
+   End;
+
+///////////////////////////////////////////////////////////////////////////////
+// Routines to centralize "Windows" calls
+///////////////////////////////////////////////////////////////////////////////
+{$IFNDEF MSWINDOWS}
+Type
+   DWord=LongWord;
+   TThreadPriority = (tpIdle, tpLowest, tpLower, tpNormal, tpHigher, tpHighest, pTimeCritical);
+{$ELSE}
+Type
+   PInteger = Windows.PInteger;
+   DWORD = Windows.DWord;
+{$ENDIF}
+
+// LINUX:
+Function LocalTimeZoneBias:Integer;
+// WINDOWS:
+Procedure ProcessWindowsMessageQueue;
+function  HiByteOfWord(Const W:Word):Byte;
+function  MakeBytesToWord(Const A,B:Byte):Word;
+function  WindowsWriteFile(hFile:THandle;
+   const Buffer;nNumberOfBytesToWrite:DWORD;
+   var lpNumberOfBytesWritten:DWORD):Boolean;
+Procedure ShowMessageWindow(Const Caption,Message:String);
+Procedure DoSleepEX(Const Interval:DWord);
+
+///////////////////////////////////////////////////////////////////////////////
+// Numeric Routines
+///////////////////////////////////////////////////////////////////////////////
+Function IsNumeric(Const c:AnsiChar):Boolean; // 2.3 asm
+Function isNumericString(Const S:AnsiString):Boolean;
+Function IntToCommaStr(Const Number:Integer):String; // 2.3 const
+
+///////////////////////////////////////////////////////////////////////////////
+// AnsiString Routines
+///////////////////////////////////////////////////////////////////////////////
+Function FetchByChar(var S:AnsiString;Const Sub:AnsiChar;Const IgnoreCase:Boolean):AnsiString;
+function Ansi_StrToInt(const S: Ansistring): Integer;
+function Ansi_IntToStr(Value: Integer): Ansistring;
+function AnsiStringToWideString(AValue: AnsiString): WideString;
+function WideStringToAnsiString(AValue: WideString): AnsiString;
+
+///////////////////////////////////////////////////////////////////////////////
+// Internet Routines
+///////////////////////////////////////////////////////////////////////////////
+Function GetIndex(Const c:AnsiChar):Integer;
+Function Base64ToString(Const S:AnsiString):AnsiString;
+function FixDottedIP(Const S:AnsiString):AnsiString;
+Function EscapeDecode(Const S:ansiString):AnsiString;
+
+///////////////////////////////////////////////////////////////////////////////
+// Date and/or Time Routines
+///////////////////////////////////////////////////////////////////////////////
+Function DateTimeToGMTRFC822(Const DT:TDateTime):AnsiString;
+Function TimeOut(Const MyTime:DWord):Boolean;
+Function TimeCounter:DWord;
+Function DateTimeToGMT(const DT:TDateTime):TDateTime;
+
+///////////////////////////////////////////////////////////////////////////////
+// File/Disk Routines
+///////////////////////////////////////////////////////////////////////////////
+Function ToUnixSlashes(Const S:AnsiString):AnsiString;
+
+implementation
+
+{$IFNDEF MSWINDOWS}
+Uses
+   baseunix, unix, Forms, Dialogs;
+{$ELSE}
+Uses
+   {$IFDEF DELPHI2009UP}AnsiStrings,{$ENDIF}
+   Registry; {to avoid Win2K security issue!}
+{$ENDIF}
+
+Const
+   Alphabet='ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/';
+   AlphabetLength = 64; //Needed in GetIndex
+{$IFDEF VER100} // D3 Windows.PAS is missing these:
+   TIME_ZONE_ID_STANDARD = 1;
+   TIME_ZONE_ID_DAYLIGHT = 2;
+{$ENDIF}
+{$IFNDEF VER90}
+   ole32='ole32.dll';
+{$ENDIF}
+{$WARNINGS OFF}
+   crc_32_tab: ARRAY[0..255] OF LONGINT = (
+      $00000000, $77073096, $ee0e612c, $990951ba, $076dc419, $706af48f, $e963a535, $9e6495a3,
+      $0edb8832, $79dcb8a4, $e0d5e91e, $97d2d988, $09b64c2b, $7eb17cbd, $e7b82d07, $90bf1d91,
+      $1db71064, $6ab020f2, $f3b97148, $84be41de, $1adad47d, $6ddde4eb, $f4d4b551, $83d385c7,
+      $136c9856, $646ba8c0, $fd62f97a, $8a65c9ec, $14015c4f, $63066cd9, $fa0f3d63, $8d080df5,
+      $3b6e20c8, $4c69105e, $d56041e4, $a2677172, $3c03e4d1, $4b04d447, $d20d85fd, $a50ab56b,
+      $35b5a8fa, $42b2986c, $dbbbc9d6, $acbcf940, $32d86ce3, $45df5c75, $dcd60dcf, $abd13d59,
+      $26d930ac, $51de003a, $c8d75180, $bfd06116, $21b4f4b5, $56b3c423, $cfba9599, $b8bda50f,
+      $2802b89e, $5f058808, $c60cd9b2, $b10be924, $2f6f7c87, $58684c11, $c1611dab, $b6662d3d,
+      $76dc4190, $01db7106, $98d220bc, $efd5102a, $71b18589, $06b6b51f, $9fbfe4a5, $e8b8d433,
+      $7807c9a2, $0f00f934, $9609a88e, $e10e9818, $7f6a0dbb, $086d3d2d, $91646c97, $e6635c01,
+      $6b6b51f4, $1c6c6162, $856530d8, $f262004e, $6c0695ed, $1b01a57b, $8208f4c1, $f50fc457,
+      $65b0d9c6, $12b7e950, $8bbeb8ea, $fcb9887c, $62dd1ddf, $15da2d49, $8cd37cf3, $fbd44c65,
+      $4db26158, $3ab551ce, $a3bc0074, $d4bb30e2, $4adfa541, $3dd895d7, $a4d1c46d, $d3d6f4fb,
+      $4369e96a, $346ed9fc, $ad678846, $da60b8d0, $44042d73, $33031de5, $aa0a4c5f, $dd0d7cc9,
+      $5005713c, $270241aa, $be0b1010, $c90c2086, $5768b525, $206f85b3, $b966d409, $ce61e49f,
+      $5edef90e, $29d9c998, $b0d09822, $c7d7a8b4, $59b33d17, $2eb40d81, $b7bd5c3b, $c0ba6cad,
+      $edb88320, $9abfb3b6, $03b6e20c, $74b1d29a, $ead54739, $9dd277af, $04db2615, $73dc1683,
+      $e3630b12, $94643b84, $0d6d6a3e, $7a6a5aa8, $e40ecf0b, $9309ff9d, $0a00ae27, $7d079eb1,
+      $f00f9344, $8708a3d2, $1e01f268, $6906c2fe, $f762575d, $806567cb, $196c3671, $6e6b06e7,
+      $fed41b76, $89d32be0, $10da7a5a, $67dd4acc, $f9b9df6f, $8ebeeff9, $17b7be43, $60b08ed5,
+      $d6d6a3e8, $a1d1937e, $38d8c2c4, $4fdff252, $d1bb67f1, $a6bc5767, $3fb506dd, $48b2364b,
+      $d80d2bda, $af0a1b4c, $36034af6, $41047a60, $df60efc3, $a867df55, $316e8eef, $4669be79,
+      $cb61b38c, $bc66831a, $256fd2a0, $5268e236, $cc0c7795, $bb0b4703, $220216b9, $5505262f,
+      $c5ba3bbe, $b2bd0b28, $2bb45a92, $5cb36a04, $c2d7ffa7, $b5d0cf31, $2cd99e8b, $5bdeae1d,
+      $9b64c2b0, $ec63f226, $756aa39c, $026d930a, $9c0906a9, $eb0e363f, $72076785, $05005713,
+      $95bf4a82, $e2b87a14, $7bb12bae, $0cb61b38, $92d28e9b, $e5d5be0d, $7cdcefb7, $0bdbdf21,
+      $86d3d2d4, $f1d4e242, $68ddb3f8, $1fda836e, $81be16cd, $f6b9265b, $6fb077e1, $18b74777,
+      $88085ae6, $ff0f6a70, $66063bca, $11010b5c, $8f659eff, $f862ae69, $616bffd3, $166ccf45,
+      $a00ae278, $d70dd2ee, $4e048354, $3903b3c2, $a7672661, $d06016f7, $4969474d, $3e6e77db,
+      $aed16a4a, $d9d65adc, $40df0b66, $37d83bf0, $a9bcae53, $debb9ec5, $47b2cf7f, $30b5ffe9,
+      $bdbdf21c, $cabac28a, $53b39330, $24b4a3a6, $bad03605, $cdd70693, $54de5729, $23d967bf,
+      $b3667a2e, $c4614ab8, $5d681b02, $2a6f2b94, $b40bbe37, $c30c8ea1, $5a05df1b, $2d02ef8d);
+ crc_arc_tab: Array[0..$FF] of Word =
+    ($00000, $0C0C1, $0C181, $00140, $0C301, $003C0, $00280, $0C241,
+     $0C601, $006C0, $00780, $0C741, $00500, $0C5C1, $0C481, $00440,
+     $0CC01, $00CC0, $00D80, $0CD41, $00F00, $0CFC1, $0CE81, $00E40,
+     $00A00, $0CAC1, $0CB81, $00B40, $0C901, $009C0, $00880, $0C841,
+     $0D801, $018C0, $01980, $0D941, $01B00, $0DBC1, $0DA81, $01A40,
+     $01E00, $0DEC1, $0DF81, $01F40, $0DD01, $01DC0, $01C80, $0DC41,
+     $01400, $0D4C1, $0D581, $01540, $0D701, $017C0, $01680, $0D641,
+     $0D201, $012C0, $01380, $0D341, $01100, $0D1C1, $0D081, $01040,
+     $0F001, $030C0, $03180, $0F141, $03300, $0F3C1, $0F281, $03240,
+     $03600, $0F6C1, $0F781, $03740, $0F501, $035C0, $03480, $0F441,
+     $03C00, $0FCC1, $0FD81, $03D40, $0FF01, $03FC0, $03E80, $0FE41,
+     $0FA01, $03AC0, $03B80, $0FB41, $03900, $0F9C1, $0F881, $03840,
+     $02800, $0E8C1, $0E981, $02940, $0EB01, $02BC0, $02A80, $0EA41,
+     $0EE01, $02EC0, $02F80, $0EF41, $02D00, $0EDC1, $0EC81, $02C40,
+     $0E401, $024C0, $02580, $0E541, $02700, $0E7C1, $0E681, $02640,
+     $02200, $0E2C1, $0E381, $02340, $0E101, $021C0, $02080, $0E041,
+     $0A001, $060C0, $06180, $0A141, $06300, $0A3C1, $0A281, $06240,
+     $06600, $0A6C1, $0A781, $06740, $0A501, $065C0, $06480, $0A441,
+     $06C00, $0ACC1, $0AD81, $06D40, $0AF01, $06FC0, $06E80, $0AE41,
+     $0AA01, $06AC0, $06B80, $0AB41, $06900, $0A9C1, $0A881, $06840,
+     $07800, $0B8C1, $0B981, $07940, $0BB01, $07BC0, $07A80, $0BA41,
+     $0BE01, $07EC0, $07F80, $0BF41, $07D00, $0BDC1, $0BC81, $07C40,
+     $0B401, $074C0, $07580, $0B541, $07700, $0B7C1, $0B681, $07640,
+     $07200, $0B2C1, $0B381, $07340, $0B101, $071C0, $07080, $0B041,
+     $05000, $090C1, $09181, $05140, $09301, $053C0, $05280, $09241,
+     $09601, $056C0, $05780, $09741, $05500, $095C1, $09481, $05440,
+     $09C01, $05CC0, $05D80, $09D41, $05F00, $09FC1, $09E81, $05E40,
+     $05A00, $09AC1, $09B81, $05B40, $09901, $059C0, $05880, $09841,
+     $08801, $048C0, $04980, $08941, $04B00, $08BC1, $08A81, $04A40,
+     $04E00, $08EC1, $08F81, $04F40, $08D01, $04DC0, $04C80, $08C41,
+     $04400, $084C1, $08581, $04540, $08701, $047C0, $04680, $08641,
+     $08201, $042C0, $04380, $08341, $04100, $081C1, $08081, $04040);
+ crc_16_tab: Array[0..$FF] of Word =
+    ($00000, $01021, $02042, $03063, $04084, $050a5, $060c6, $070e7,
+     $08108, $09129, $0a14a, $0b16b, $0c18c, $0d1ad, $0e1ce, $0f1ef,
+     $01231, $00210, $03273, $02252, $052b5, $04294, $072f7, $062d6,
+     $09339, $08318, $0b37b, $0a35a, $0d3bd, $0c39c, $0f3ff, $0e3de,
+     $02462, $03443, $00420, $01401, $064e6, $074c7, $044a4, $05485,
+     $0a56a, $0b54b, $08528, $09509, $0e5ee, $0f5cf, $0c5ac, $0d58d,
+     $03653, $02672, $01611, $00630, $076d7, $066f6, $05695, $046b4,
+     $0b75b, $0a77a, $09719, $08738, $0f7df, $0e7fe, $0d79d, $0c7bc,
+     $048c4, $058e5, $06886, $078a7, $00840, $01861, $02802, $03823,
+     $0c9cc, $0d9ed, $0e98e, $0f9af, $08948, $09969, $0a90a, $0b92b,
+     $05af5, $04ad4, $07ab7, $06a96, $01a71, $00a50, $03a33, $02a12,
+     $0dbfd, $0cbdc, $0fbbf, $0eb9e, $09b79, $08b58, $0bb3b, $0ab1a,
+     $06ca6, $07c87, $04ce4, $05cc5, $02c22, $03c03, $00c60, $01c41,
+     $0edae, $0fd8f, $0cdec, $0ddcd, $0ad2a, $0bd0b, $08d68, $09d49,
+     $07e97, $06eb6, $05ed5, $04ef4, $03e13, $02e32, $01e51, $00e70,
+     $0ff9f, $0efbe, $0dfdd, $0cffc, $0bf1b, $0af3a, $09f59, $08f78,
+     $09188, $081a9, $0b1ca, $0a1eb, $0d10c, $0c12d, $0f14e, $0e16f,
+     $01080, $000a1, $030c2, $020e3, $05004, $04025, $07046, $06067,
+     $083b9, $09398, $0a3fb, $0b3da, $0c33d, $0d31c, $0e37f, $0f35e,
+     $002b1, $01290, $022f3, $032d2, $04235, $05214, $06277, $07256,
+     $0b5ea, $0a5cb, $095a8, $08589, $0f56e, $0e54f, $0d52c, $0c50d,
+     $034e2, $024c3, $014a0, $00481, $07466, $06447, $05424, $04405,
+     $0a7db, $0b7fa, $08799, $097b8, $0e75f, $0f77e, $0c71d, $0d73c,
+     $026d3, $036f2, $00691, $016b0, $06657, $07676, $04615, $05634,
+     $0d94c, $0c96d, $0f90e, $0e92f, $099c8, $089e9, $0b98a, $0a9ab,
+     $05844, $04865, $07806, $06827, $018c0, $008e1, $03882, $028a3,
+     $0cb7d, $0db5c, $0eb3f, $0fb1e, $08bf9, $09bd8, $0abbb, $0bb9a,
+     $04a75, $05a54, $06a37, $07a16, $00af1, $01ad0, $02ab3, $03a92,
+     $0fd2e, $0ed0f, $0dd6c, $0cd4d, $0bdaa, $0ad8b, $09de8, $08dc9,
+     $07c26, $06c07, $05c64, $04c45, $03ca2, $02c83, $01ce0, $00cc1,
+     $0ef1f, $0ff3e, $0cf5d, $0df7c, $0af9b, $0bfba, $08fd9, $09ff8,
+     $06e17, $07e36, $04e55, $05e74, $02e93, $03eb2, $00ed1, $01ef0);
+{$WARNINGS ON}
+
+///////////////////////////////////////////////////////////////////////////////
+// Internal Version Control Routines (used for DCU's mainly)
+///////////////////////////////////////////////////////////////////////////////
+procedure TDXComponent.SetReleaseDate(value: AnsiString);
+Begin
+End;
+
+Function TDXComponent.GetReleaseDate:AnsiString;
+Begin
+   Result:=BPDX_RELEASE_DATE;
+End;
+
+constructor TDXComponent.Create(AOwner: TComponent);
+Begin
+{$IFDEF OBJECTS_ONLY}
+   inherited create;
+{$ELSE}
+   inherited create(AOwner);
+{$ENDIF}
+   MyCriticalSection:=TDXCritical.Create;
+End;
+
+destructor TDXComponent.Destroy;
+Begin
+   MyCriticalSection.Free;
+   MyCriticalSection:=Nil;
+   inherited;
+End;
+
+constructor TDXCritical.Create;
+Begin
+  inherited;
+  Synchronizer:=TCriticalSection.Create;
+End;
+
+destructor TDXCritical.Destroy;
+Begin
+  try
+     Synchronizer.Free;
+  except
+  end;
+  inherited;
+End;
+
+Procedure TDXCritical.StartingRead;
+Begin
+  Synchronizer.Acquire; 
+End;
+
+Procedure TDXCritical.FinishedRead;
+Begin
+   Synchronizer.Release;
+End;
+
+Procedure TDXCritical.StartingWrite;
+Begin
+   Synchronizer.Acquire;
+End;
+
+Procedure TDXCritical.FinishedWrite;
+Begin
+   Synchronizer.Release;
+End;
+
+///////////////////////////////////////////////////////////////////////////////
+// Windows/Operating System Routines
+///////////////////////////////////////////////////////////////////////////////
+
+Procedure ProcessWindowsMessageQueue;
+{$IFNDEF MSWINDOWS}
+Begin
+   Application.ProcessMessages;
+End;
+{$ELSE}
+Var
+   MsgRec:TMsg;
+
+Begin
+   If Not IsConsole then
+      while PeekMessage(MsgRec,0,0,0,PM_REMOVE) do begin
+         TranslateMessage(MsgRec);
+         DispatchMessage(MsgRec)
+      end;
+End;
+{$ENDIF}
+
+function HiByteOfWord(Const W:Word):Byte;
+Begin
+   Result:=Hi(W);
+End;
+
+function MakeBytesToWord(Const A,B:Byte):Word;
+Begin
+   Result:=(A shl 8) + B;
+End;
+
+function WindowsWriteFile(hFile:THandle;const Buffer;nNumberOfBytesToWrite:DWORD;
+  var lpNumberOfBytesWritten: DWORD):Boolean;
+Begin
+{$IFNDEF MSWINDOWS}
+   lpNumberOfBytesWritten:=FileWrite(hFile,Buffer,nNumberOfBytesToWrite);
+   Result:=lpNumberOfBytesWritten=nNumberOfBytesToWrite;
+{$ELSE}
+   Result:=WriteFile(hFile,Buffer,nNumberOfBytesToWrite,lpNumberOfBytesWritten,Nil);
+{$ENDIF}
+End;
+Procedure ShowMessageWindow(Const Caption,Message:String);
+Begin
+{$IFNDEF MSWINDOWS}
+   MessageDlg(Caption,Message,mtError,[mbOk],0);
+{$ELSE}
+   MessageBox(0,PChar(Message),PChar(Caption),MB_ICONEXCLAMATION or MB_SYSTEMMODAL);
+{$ENDIF}
+End;
+
+Procedure DoSleepEX(Const Interval:DWord);
+Begin
+{$IFNDEF MSWINDOWS}
+   Sleep(Interval);
+{$ELSE}
+   SleepEx(Interval,False{True});
+{$ENDIF}
+End;
+
+Function IsNumeric(Const c:AnsiChar):Boolean;
+begin
+{$IFNDEF ASM8086}
+  Result:= c in ['0'..'9'];
+{$ELSE} // ASM BY OZZ
+asm
+   mov AL,C
+   cmp AL, $30   // 0
+   jl @NoMatch   // it's before '0' so Result=False/Exit
+   cmp AL, $39   // 9
+   jg @NoMatch   // it's after '9' so Result=False/Exit
+   jmp @Matched  // it's 0..9 so Result=True/Exit
+@NoMatch:
+   mov Result,0
+   jmp @TheEnd
+@Matched:
+   mov Result,1
+@TheEnd:
+end {asm}
+{$ENDIF}
+end;
+Function isNumericString(Const S:AnsiString):Boolean;
+Var
+   Loop,MaxLoop:Integer;
+begin
+   Result:=True;
+   MaxLoop:=Length(S);
+   Loop:=0;
+   While (Loop<MaxLoop) and (Result) do Begin
+      If S[Loop+1]<>'.' then
+         Result:=IsNumeric(S[Loop+1]);
+      Inc(Loop);
+   End;
+end;
+
+Function IntToCommaStr(Const Number:Integer):String;
+Var
+   StrPos:Integer;
+Begin
+   Result:=IntToStr(Number);
+   StrPos:=Length(Result)-2;
+   While StrPos>1 Do Begin
+      Insert(',',Result,StrPos);
+      StrPos:=StrPos-3;
+   End;
+End;
+
+//////////////////////////////////////////////////////////////////////////////
+// AnsiString Routines
+///////////////////////////////////////////////////////////////////////////////
+function AnsiStringToWideString(AValue: AnsiString): WideString;
+begin
+  {$IFDEF UNICODE} //AnsiStringToWideString
+  Result := StringOf(BytesOf(AValue));
+  {$ELSE}
+  Result := AValue;
+  {$ENDIF}
+end;
+
+function WideStringToAnsiString(AValue: WideString): AnsiString;
+{$IFDEF UNICODE} //WideStringToAnsiString
+var
+  b: TBytes;
+begin
+  b := BytesOf(AValue);
+  SetLength(Result, Length(b));
+  Move(b[0], pointer(Result)^,Length(b));
+end;
+{$ELSE}
+begin
+  Result := AValue;
+end;
+{$ENDIF}
+
+
+function Ansi_StrToInt(const S: Ansistring): Integer;
+begin
+  Result := StrToInt({$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(s));
+end;
+
+function Ansi_IntToStr(Value: Integer): Ansistring;
+begin
+  Result := {$IFDEF UNICODE}WideStringToAnsiString{$ENDIF}(IntToStr(Value));
+end;
+
+Function FetchByChar(var S:AnsiString;Const Sub:AnsiChar;Const IgnoreCase:Boolean):AnsiString;
+var
+   P:Integer;
+begin
+   If IgnoreCase then
+     P:=Pos(UpCase(Sub),UpperCase(S))
+   else
+     P:=Pos(Sub,S);
+   if (P=0) then Begin
+      Result:=S;
+      S:='';
+   End
+   Else Begin
+      Result:=Copy(S,1,P-1);
+      Delete(S,1,P);
+   End;
+end;
+(*
+Function Uppercase(Const S:AnsiString):AnsiString;
+{$IFNDEF ASM8086}
+var
+   Loop:Integer;
+   MaxLoop:Integer;
+
+Begin
+   Result:=S;
+   MaxLoop:=Length(Result);
+   For Loop:=MaxLoop downto 1 do
+      If Result[Loop] in ['a'..'z'] then Dec(Result[Loop],32);
+End;
+{$ELSE} // Ozz: tweaked to use Pointer() which is faster than @AnsiString!
+var
+  LenOfString:Integer;
+  FirstSource,FirstDest:Pointer;
+
+begin
+   LenOfString:=Length(S);
+   If LenOfString=0 then Begin
+      Result:='';
+      Exit;
+   End;
+   SetLength(Result,LenOfString);
+   FirstSource:=Pointer(s);
+   FirstDest:=Pointer(Result);
+asm
+   PUSH ESI            //Firstly and most importantly
+   PUSH EDI            //Delphi uses EBX, ESI, EDI extensively, so we need to
+                       //push them onto the stack, and then pop them off after
+   mov ESI, FirstSource//Move the address of Result into ESI
+   mov EDI, FirstDest  //ESI and EDI are 2 generic "data moving" registers
+                       //ESI = Source, EDI = Destination
+                       //MovSB (MoveString Byte, there is also, MovSW word and MovSD double)
+                       //MovXX copy from EDI to ESI, and then INC *both* ESI and EDI
+                       //  and also DEC ECX (generic AnsiString length counter)
+                       //But I will not use these as I need to Uppercase the results
+   mov ECX, LenOfString//ECX will contain a count of how many chars left to do
+@NextChar:
+   mov AL, [ESI]       //Move ESI^ into AL
+                       //  AL = AnsiChar, AX = Word, EAX = DWord, all different parts
+                       //  of the same register
+   cmp AL, $61
+   jl  @NoUpper        // < 'a' don't convert
+   cmp AL, $7A
+   jg  @NoUpper        // > 'z' don't convert
+   and AL, $DF          // Convert to uppercase
+@NoUpper:
+   mov [EDI], AL       // Put AL back into EDI^  (That's what [] means)
+   Inc ESI             //Point to next character
+   Inc EDI
+   Dec ECX             //Decrement the count, if it reaches 0, the ZERO flag will be set
+   jnz @NextChar       //"J"ump if "n"ot "z"ero to the next character
+   POP EDI
+   POP ESI
+end; {asm}
+end;
+{$ENDIF}
+
+Function Trim(const S:AnsiString):AnsiString;
+var
+   I, L: Integer;
+begin
+   L := Length(S);
+   I := 1;
+   while (I <= L) and (S[I] <= ' ') do Inc(I);
+   if I > L then Result := ''
+   else begin
+      while S[L] <= ' ' do Dec(L);
+      Result := Copy(S, I, L - I + 1);
+   end;
+end;
+*)
+///////////////////////////////////////////////////////////////////////////////
+// Internet Routines
+///////////////////////////////////////////////////////////////////////////////
+Function GetIndex(Const c:AnsiChar):Integer;
+var
+   i:Integer;
+{$IFDEF ASM8086}
+   S:AnsiString;
+{$ENDIF}
+
+begin
+{$IFNDEF ASM8086}
+   i:=Pos(c,Alphabet);  //overkill for just 1 character
+{$ELSE}
+   S := Alphabet;
+asm
+   PUSH EDI                 //Preserve this register
+   mov  EDI, S              //Point EDI at Alphabet AnsiString
+   mov  ECX, AlphaBetLength //Tell CPU how big Alphabet is
+   mov  AL,  C              //and which AnsiChar we want
+   RepNE ScaSB              //"Rep"eat while "N"ot "E"qual
+                            //this is the same as
+                            //While (EDI^ <> AL) and (ECX>0) do begin
+                            //  Inc(EDI);
+                            //  Dec(ECX);
+                            //end;
+   jnz  @NotFound           //Zero flag will be set if there was a match
+   sub  EDI, S              //EDI has been incremented, so EDI-OrigAdress = AnsiChar pos !
+   mov  I,   EDI
+@NotFound:
+   POP  EDI
+end;
+{$ENDIF}
+   if (i>0) then Dec(i);
+   result:=i;
+end;
+
+//gsw and ozz
+function DecodeUnit(Const InStr:AnsiString):ShortString;
+var
+   a,b,c,d:Byte;
+
+
+begin
+   a:=GetIndex(InStr[1]);
+   b:=GetIndex(InStr[2]);
+   If InStr[3]='=' then Begin
+      SetLength(Result,1);
+      result[1]:=AnsiChar((a shl 2) or (b shr 4));
+   end
+   Else If InStr[4]='=' then Begin
+      SetLength(Result,2);
+      c:=GetIndex(InStr[3]);
+      result[1]:=AnsiChar((a shl 2) or (b shr 4));
+      result[2]:=AnsiChar((b shl 4) or (c shr 2));
+   End
+   Else Begin
+      c:=GetIndex(InStr[3]);
+      d:=GetIndex(InStr[4]);
+      SetLength(result,3);
+      result[1]:=AnsiChar((a shl 2) or (b shr 4));
+      result[2]:=AnsiChar((b shl 4) or (c shr 2));
+      result[3]:=AnsiChar((c shl 6) or d);
+   End;
+end;
+
+
+Function Base64ToString(Const S:AnsiString):AnsiString;
+var
+  i:Integer;
+
+begin
+   Result:='';
+   for i:=((Length(s) div 4)-1) downto 0  do
+      Result:=DecodeUnit(Copy(s,i*4+1,4))+Result;
+end;
+
+function FixDottedIP(Const S:AnsiString):AnsiString;
+var
+   n:Cardinal;
+begin
+   Result:=AnsiChar('.')+S;
+   n:=Pos(AnsiString('.0'),Result);
+   while n>0 do begin
+      Delete(Result,n+1,1);
+      n:=Pos(AnsiString('.0'),Result);
+   end;
+   n:=Pos(AnsiString('..'),Result);
+   While N>0 do begin
+      Insert(AnsiChar('0'),Result,n+1);
+      n:=Pos(AnsiString('..'),Result);
+   End;
+   If Result[Length(Result)]=AnsiChar('.') then Result:=Result+AnsiChar('0');
+   Delete(Result,1,1);
+end;
+
+function EscapeDecode(Const S: AnsiString):AnsiString;
+var
+   ch:AnsiChar;
+   val:AnsiString;
+   I:Integer;
+begin
+   Result:=S;
+   I:=Pos(AnsiChar('%'),Result);
+   While I>0 do Begin
+     Val:=AnsiChar('$')+ Result[I+1]+Result[I+2];
+     try
+       Ch:=AnsiChar(Ansi_StrToInt(Val));
+     except
+       Ch:='a'; // 2.0.12
+     end;
+     Result:=Copy(Result,1,I-1)+Ch+Copy(Result,I+3,Length(Result));
+     I:=Pos(AnsiChar('%'),Result);
+   End;
+   I:=Pos(AnsiChar('+'),Result);
+   While I>0 do Begin
+      Result:=Copy(Result,1,I-1)+#32+Copy(Result,I+1,Length(Result));
+      I:=Pos(AnsiChar('+'),Result);
+   End;
+end;
+
+///////////////////////////////////////////////////////////////////////////////
+// Date and/or Time Routines
+///////////////////////////////////////////////////////////////////////////////
+
+Function DateTimeToGMT(const DT:TDateTime):TDateTime;
+begin
+   Result:=DT+LocalTimeZoneBias/1440;
+end;
+
+Function LocalTimeZoneBias:Integer;
+{$IFNDEF MSWINDOWS}
+Var
+   TV:TTimeval;
+   TZ:TTimezone;
+
+Begin
+   fpgettimeofday(@TV,@TZ);
+   Result:=TZ.tz_minuteswest;
+End;
+{$ELSE}
+var
+   TimeZoneInformation:TTimeZoneInformation;
+   Bias:Longint;
+
+begin
+   case GetTimeZoneInformation(TimeZoneInformation) of
+      TIME_ZONE_ID_STANDARD:Bias:=TimeZoneInformation.Bias+TimeZoneInformation.StandardBias;
+      TIME_ZONE_ID_DAYLIGHT:Bias:=TimeZoneInformation.Bias+((TimeZoneInformation.DaylightBias div 60)*-100);
+      else Bias:=TimeZoneInformation.Bias;
+   End;
+   Result:=Bias;
+End;
+{$ENDIF}
+
+Function ToUnixSlashes(Const S:AnsiString):AnsiString;
+var
+   Loop:Integer;
+   MaxLoop:Integer;
+
+begin
+   Result:=S;
+   MaxLoop:=Length(Result);
+   For Loop:=1 to MaxLoop do If Result[Loop]='\' then Result[Loop]:='/';
+end;
+
+const
+  f_formatA  = AnsiString('dddd, dd-mmm-yy hh:nn:ss');
+  f_formatB  = AnsiString('ddd, dd mmm yyyy hh:nn:ss');
+
+const
+  s_Month : array [1..12] of AnsiString =( 'Jan','Feb','Mar','Apr', 'May', 'Jun', 'Jul', 'Aug', 'Sep',  'Oct', 'Nov', 'Dec');
+  s_ShortDayNames: array[1..7] of AnsiString =('Mon','Tue','Wed','Thu','Fri','Sat','Sun');
+  s_LongDayNames: array[1..7] of AnsiString =('Monday','Tuesday','Wednesday','Thursday','Friday','Saturday','Sunday');
+
+function FormatDateTime_English(const Format: AnsiString; ADateTime: TDateTime): AnsiString;
+var
+  lYear, lMonth, lDay: Word;
+  lHour, lMin, lSec, lMsec: Word;
+begin
+  DecodeDate(ADateTime,lYear, lMonth, lDay);
+  DecodeTime(ADateTime,lHour, lMin, lSec, lMsec);
+  if Format = f_formatA then
+    Result:={$IFDEF UNICODE}WideStringToAnsiString{$ENDIF}(SysUtils.Format('%s, %.2d-%s-%.2d %.2d:%.2d:%.2d',[s_LongDayNames[DayOfWeek(ADateTime)], lDay, s_Month[lMonth], lYear, lHour, lMin, lSec]))
+  else if Format = f_formatB then
+    Result:={$IFDEF UNICODE}WideStringToAnsiString{$ENDIF}( SysUtils.Format('%s, %.2d %s %.4d %.2d:%.2d:%.2d',[s_ShortDayNames[DayOfWeek(ADateTime)], lDay, s_Month[lMonth], lYear, lHour, lMin, lSec]));
+end;
+
+Function DateTimeToGMTRFC822(Const DT:TDateTime):AnsiString;
+Begin
+   Result:=FormatDateTime_English(f_formatB,DateTimeToGMT(DT))+AnsiString(' GMT');
+End;
+
+Function TimeOut(Const MyTime:DWord):Boolean;
+Begin
+   Result:=MyTime<=TimeCounter;
+End;
+
+Function TimeCounter:DWord;
+{$IFNDEF MSWINDOWS}
+Var
+   TV:TTimeval;
+
+Begin
+   fpgettimeofday(@TV,nil);
+   Result:=(TV.tv_sec*1000)+(TV.tv_usec div 1000);
+End;
+(* the following code returns EPOCH
+var
+  T: TTime_T;
+begin
+  __time(@T);
+  Result:=T;
+end;
+//*)
+{$ELSE}
+Var
+   lpSystemTimeAsFileTime:TFileTime;
+   X:Cardinal;
+
+Begin
+   GetSystemTimeAsFileTime(lpSystemTimeAsFileTime);
+   {$WARNINGS OFF}
+   If lpSystemTimeAsFileTime.dwLowDateTime<0 then X:=lpSystemTimeAsFileTime.dwLowDateTime shr 1
+   {$WARNINGS ON}
+   Else X:=lpSystemTimeAsFileTime.dwLowDateTime;
+   Result:=(((lpSystemTimeAsFileTime.dwHighDateTime mod 1000)*1000000)+
+         X div 10000);
+//   Result:=GetTickCount;
+End;
+{$ENDIF}
+
+
+end.
+
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ROMasterServerLibrary_Intf.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ROMasterServerLibrary_Intf.pas
new file mode 100644
index 0000000..4740630
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ROMasterServerLibrary_Intf.pas	
@@ -0,0 +1,571 @@
+unit ROMasterServerLibrary_Intf;
+
+{----------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project .                               }
+{                                                                            }
+{ Do not modify this unit manually, or your changes will be lost when this   }
+{ unit is regenerated the next time you compile the project.                 }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  {vcl:} Classes, TypInfo,
+  {RemObjects:} uROXMLIntf, uROClasses, uROClient, uROTypes, uROClientIntf;
+
+const
+  { Library ID }
+  LibraryUID = '{3B3A1E32-67EF-4541-A26A-73F27A8608BD}';
+  TargetNamespace = '';
+
+  { Service Interface ID's }
+  IROSessionManager_IID : TGUID = '{9B77C6B4-F2CA-4CFF-91F5-A194265725CF}';
+
+  { Event ID's }
+
+type
+  { Forward declarations }
+  IROSessionManager = interface;
+
+  TROSessionManagerConfiguration = class;
+  TROUserSession = class;
+
+
+  { TROSessionManagerConfiguration }
+  TROSessionManagerConfiguration = class(TROComplexType)
+  private
+    fMaxSessions: Integer;
+    fSessionDuration: Integer;
+    fMessageDuration: Integer;
+  public
+    procedure Assign(iSource: TPersistent); override;
+    procedure ReadComplex(ASerializer: TObject); override;
+    procedure WriteComplex(ASerializer: TObject); override;
+  published
+    property MaxSessions:Integer read fMaxSessions write fMaxSessions;
+    property SessionDuration:Integer read fSessionDuration write fSessionDuration;
+    property MessageDuration:Integer read fMessageDuration write fMessageDuration;
+  end;
+
+  { TROSessionManagerConfigurationCollection }
+  TROSessionManagerConfigurationCollection = class(TROCollection)
+  protected
+    constructor Create(aItemClass: TCollectionItemClass); overload;
+    function GetItems(aIndex: integer): TROSessionManagerConfiguration;
+    procedure SetItems(aIndex: integer; const Value: TROSessionManagerConfiguration);
+  public
+    constructor Create; overload;
+    function Add: TROSessionManagerConfiguration; reintroduce;
+    property Items[Index: integer]:TROSessionManagerConfiguration read GetItems write SetItems; default;
+  end;
+
+  { TROUserSession }
+  TROUserSession = class(TROComplexType)
+  private
+    fSessionID: AnsiString;
+    fCreated: DateTime;
+    fLastAccessed: DateTime;
+    fData: Binary;
+    function GetData: Binary;
+  public
+    procedure Assign(iSource: TPersistent); override;
+    procedure ReadComplex(ASerializer: TObject); override;
+    procedure WriteComplex(ASerializer: TObject); override;
+  published
+    property SessionID:AnsiString read fSessionID write fSessionID;
+    property Created:DateTime read fCreated write fCreated;
+    property LastAccessed:DateTime read fLastAccessed write fLastAccessed;
+    property Data:Binary read GetData write fData;
+  end;
+
+  { TROUserSessionCollection }
+  TROUserSessionCollection = class(TROCollection)
+  protected
+    constructor Create(aItemClass: TCollectionItemClass); overload;
+    function GetItems(aIndex: integer): TROUserSession;
+    procedure SetItems(aIndex: integer; const Value: TROUserSession);
+  public
+    constructor Create; overload;
+    function Add: TROUserSession; reintroduce;
+    property Items[Index: integer]:TROUserSession read GetItems write SetItems; default;
+  end;
+
+  { IROSessionManager }
+  IROSessionManager = interface
+    ['{9B77C6B4-F2CA-4CFF-91F5-A194265725CF}']
+    function ReadConfiguration: TROSessionManagerConfiguration;
+    procedure UpdateConfiguration(const Configuration: TROSessionManagerConfiguration);
+    function CreateSession(const SessionID: AnsiString; const SessionData: Binary): Boolean;
+    function ReadSession(const SessionID: AnsiString): TROUserSession;
+    procedure UpdateSession(const SessionID: AnsiString; const SessionData: Binary);
+    function DeleteSession(const SessionID: AnsiString): Boolean;
+    procedure ClearSessions(const OnlyExpired: Boolean);
+    function GetSessionCount: Integer;
+    procedure StoreMessage(const SourceSessionID: AnsiString; const MessageData: Binary);
+    function GetMessages(const SessionID: AnsiString; out MessageData: Binary): Integer;
+    function GetTimeout: Integer;
+    procedure SetTimeout(const value: Integer);
+  end;
+
+  { CoROSessionManager }
+  CoROSessionManager = class
+    class function Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): IROSessionManager;
+  end;
+
+  { TROSessionManager_Proxy }
+  TROSessionManager_Proxy = class(TROProxy, IROSessionManager)
+  protected
+    function __GetInterfaceName:string; override;
+
+    function ReadConfiguration: TROSessionManagerConfiguration;
+    procedure UpdateConfiguration(const Configuration: TROSessionManagerConfiguration);
+    function CreateSession(const SessionID: AnsiString; const SessionData: Binary): Boolean;
+    function ReadSession(const SessionID: AnsiString): TROUserSession;
+    procedure UpdateSession(const SessionID: AnsiString; const SessionData: Binary);
+    function DeleteSession(const SessionID: AnsiString): Boolean;
+    procedure ClearSessions(const OnlyExpired: Boolean);
+    function GetSessionCount: Integer;
+    procedure StoreMessage(const SourceSessionID: AnsiString; const MessageData: Binary);
+    function GetMessages(const SessionID: AnsiString; out MessageData: Binary): Integer;
+    function GetTimeout: Integer;
+    procedure SetTimeout(const value: Integer);
+  end;
+
+implementation
+
+uses
+  {vcl:} SysUtils,
+  {RemObjects:} uROEventRepository, uROSerializer, uRORes;
+
+{ TROSessionManagerConfiguration }
+
+procedure TROSessionManagerConfiguration.Assign(iSource: TPersistent); 
+var lSource: ROMasterServerLibrary_Intf.TROSessionManagerConfiguration;
+begin
+  inherited Assign(iSource);
+  if (iSource is ROMasterServerLibrary_Intf.TROSessionManagerConfiguration) then begin
+    lSource := ROMasterServerLibrary_Intf.TROSessionManagerConfiguration(iSource);
+    MaxSessions := lSource.MaxSessions;
+    SessionDuration := lSource.SessionDuration;
+    MessageDuration := lSource.MessageDuration;
+  end;
+end;
+
+procedure TROSessionManagerConfiguration.ReadComplex(ASerializer: TObject);
+var
+  l_MaxSessions: Integer;
+  l_MessageDuration: Integer;
+  l_SessionDuration: Integer;
+begin
+  if TROSerializer(ASerializer).RecordStrictOrder then begin
+    l_MaxSessions := MaxSessions;
+    TROSerializer(ASerializer).ReadInteger('MaxSessions', otSLong, l_MaxSessions);
+    MaxSessions := l_MaxSessions;
+    l_SessionDuration := SessionDuration;
+    TROSerializer(ASerializer).ReadInteger('SessionDuration', otSLong, l_SessionDuration);
+    SessionDuration := l_SessionDuration;
+    l_MessageDuration := MessageDuration;
+    TROSerializer(ASerializer).ReadInteger('MessageDuration', otSLong, l_MessageDuration);
+    MessageDuration := l_MessageDuration;
+  end
+  else begin
+    l_MaxSessions := MaxSessions;
+    TROSerializer(ASerializer).ReadInteger('MaxSessions', otSLong, l_MaxSessions);
+    MaxSessions := l_MaxSessions;
+    l_MessageDuration := MessageDuration;
+    TROSerializer(ASerializer).ReadInteger('MessageDuration', otSLong, l_MessageDuration);
+    MessageDuration := l_MessageDuration;
+    l_SessionDuration := SessionDuration;
+    TROSerializer(ASerializer).ReadInteger('SessionDuration', otSLong, l_SessionDuration);
+    SessionDuration := l_SessionDuration;
+  end;
+end;
+
+procedure TROSessionManagerConfiguration.WriteComplex(ASerializer: TObject);
+var
+  l_MaxSessions: Integer;
+  l_MessageDuration: Integer;
+  l_SessionDuration: Integer;
+begin
+  if TROSerializer(ASerializer).RecordStrictOrder then begin
+    TROSerializer(ASerializer).ChangeClass(TROSessionManagerConfiguration);
+    l_MaxSessions := MaxSessions;
+    TROSerializer(ASerializer).WriteInteger('MaxSessions', otSLong, l_MaxSessions);
+    l_SessionDuration := SessionDuration;
+    TROSerializer(ASerializer).WriteInteger('SessionDuration', otSLong, l_SessionDuration);
+    l_MessageDuration := MessageDuration;
+    TROSerializer(ASerializer).WriteInteger('MessageDuration', otSLong, l_MessageDuration);
+  end
+  else begin
+    l_MaxSessions := MaxSessions;
+    TROSerializer(ASerializer).WriteInteger('MaxSessions', otSLong, l_MaxSessions);
+    l_MessageDuration := MessageDuration;
+    TROSerializer(ASerializer).WriteInteger('MessageDuration', otSLong, l_MessageDuration);
+    l_SessionDuration := SessionDuration;
+    TROSerializer(ASerializer).WriteInteger('SessionDuration', otSLong, l_SessionDuration);
+  end;
+end;
+
+{ TROSessionManagerConfigurationCollection }
+constructor TROSessionManagerConfigurationCollection.Create;
+begin
+  inherited Create(TROSessionManagerConfiguration);
+end;
+
+constructor TROSessionManagerConfigurationCollection.Create(aItemClass: TCollectionItemClass);
+begin
+  inherited Create(aItemClass);
+end;
+
+function TROSessionManagerConfigurationCollection.Add: TROSessionManagerConfiguration;
+begin
+  result := TROSessionManagerConfiguration(inherited Add);
+end;
+
+function TROSessionManagerConfigurationCollection.GetItems(aIndex: integer): TROSessionManagerConfiguration;
+begin
+  result := TROSessionManagerConfiguration(inherited Items[aIndex]);
+end;
+
+procedure TROSessionManagerConfigurationCollection.SetItems(aIndex: integer; const Value: TROSessionManagerConfiguration);
+begin
+  TROSessionManagerConfiguration(inherited Items[aIndex]).Assign(Value);
+end;
+
+{ TROUserSession }
+
+procedure TROUserSession.Assign(iSource: TPersistent); 
+var lSource: ROMasterServerLibrary_Intf.TROUserSession;
+begin
+  inherited Assign(iSource);
+  if (iSource is ROMasterServerLibrary_Intf.TROUserSession) then begin
+    lSource := ROMasterServerLibrary_Intf.TROUserSession(iSource);
+    SessionID := lSource.SessionID;
+    Created := lSource.Created;
+    LastAccessed := lSource.LastAccessed;
+    if Assigned(Data) then
+
+    Data.Assign(lSource.Data);
+  end;
+end;
+
+function TROUserSession.GetData: Binary;
+begin
+  result := fData;
+end;
+
+procedure TROUserSession.ReadComplex(ASerializer: TObject);
+var
+  l_Created: DateTime;
+  l_Data: Binary;
+  l_LastAccessed: DateTime;
+  l_SessionID: AnsiString;
+begin
+  if TROSerializer(ASerializer).RecordStrictOrder then begin
+    l_SessionID := SessionID;
+    TROSerializer(ASerializer).ReadAnsiString('SessionID', l_SessionID);
+    SessionID := l_SessionID;
+    l_Created := Created;
+    TROSerializer(ASerializer).ReadDateTime('Created', l_Created);
+    Created := l_Created;
+    l_LastAccessed := LastAccessed;
+    TROSerializer(ASerializer).ReadDateTime('LastAccessed', l_LastAccessed);
+    LastAccessed := l_LastAccessed;
+    l_Data := Data;
+    TROSerializer(ASerializer).ReadBinary('Data', l_Data);
+    if Data <> l_Data then Data.Free;
+    Data := l_Data;
+  end
+  else begin
+    l_Created := Created;
+    TROSerializer(ASerializer).ReadDateTime('Created', l_Created);
+    Created := l_Created;
+    l_Data := Data;
+    TROSerializer(ASerializer).ReadBinary('Data', l_Data);
+    if Data <> l_Data then Data.Free;
+    Data := l_Data;
+    l_LastAccessed := LastAccessed;
+    TROSerializer(ASerializer).ReadDateTime('LastAccessed', l_LastAccessed);
+    LastAccessed := l_LastAccessed;
+    l_SessionID := SessionID;
+    TROSerializer(ASerializer).ReadAnsiString('SessionID', l_SessionID);
+    SessionID := l_SessionID;
+  end;
+end;
+
+procedure TROUserSession.WriteComplex(ASerializer: TObject);
+var
+  l_Created: DateTime;
+  l_Data: Binary;
+  l_LastAccessed: DateTime;
+  l_SessionID: AnsiString;
+begin
+  if TROSerializer(ASerializer).RecordStrictOrder then begin
+    TROSerializer(ASerializer).ChangeClass(TROUserSession);
+    l_SessionID := SessionID;
+    TROSerializer(ASerializer).WriteAnsiString('SessionID', l_SessionID);
+    l_Created := Created;
+    TROSerializer(ASerializer).WriteDateTime('Created', l_Created);
+    l_LastAccessed := LastAccessed;
+    TROSerializer(ASerializer).WriteDateTime('LastAccessed', l_LastAccessed);
+    l_Data := Data;
+    TROSerializer(ASerializer).WriteBinary('Data', l_Data);
+  end
+  else begin
+    l_Created := Created;
+    TROSerializer(ASerializer).WriteDateTime('Created', l_Created);
+    l_Data := Data;
+    TROSerializer(ASerializer).WriteBinary('Data', l_Data);
+    l_LastAccessed := LastAccessed;
+    TROSerializer(ASerializer).WriteDateTime('LastAccessed', l_LastAccessed);
+    l_SessionID := SessionID;
+    TROSerializer(ASerializer).WriteAnsiString('SessionID', l_SessionID);
+  end;
+end;
+
+{ TROUserSessionCollection }
+constructor TROUserSessionCollection.Create;
+begin
+  inherited Create(TROUserSession);
+end;
+
+constructor TROUserSessionCollection.Create(aItemClass: TCollectionItemClass);
+begin
+  inherited Create(aItemClass);
+end;
+
+function TROUserSessionCollection.Add: TROUserSession;
+begin
+  result := TROUserSession(inherited Add);
+end;
+
+function TROUserSessionCollection.GetItems(aIndex: integer): TROUserSession;
+begin
+  result := TROUserSession(inherited Items[aIndex]);
+end;
+
+procedure TROUserSessionCollection.SetItems(aIndex: integer; const Value: TROUserSession);
+begin
+  TROUserSession(inherited Items[aIndex]).Assign(Value);
+end;
+
+{ CoROSessionManager }
+
+class function CoROSessionManager.Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): IROSessionManager;
+begin
+  result := TROSessionManager_Proxy.Create(aMessage, aTransportChannel);
+end;
+
+{ TROSessionManager_Proxy }
+
+function TROSessionManager_Proxy.__GetInterfaceName:string;
+begin
+  result := 'ROSessionManager';
+end;
+
+function TROSessionManager_Proxy.ReadConfiguration: TROSessionManagerConfiguration;
+begin
+  try
+    result := nil;
+    __Message.InitializeRequestMessage(__TransportChannel, 'ROMasterServerLibrary', __InterfaceName, 'ReadConfiguration');
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(ROMasterServerLibrary_Intf.TROSessionManagerConfiguration), result, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+procedure TROSessionManager_Proxy.UpdateConfiguration(const Configuration: TROSessionManagerConfiguration);
+begin
+  try
+    __Message.InitializeRequestMessage(__TransportChannel, 'ROMasterServerLibrary', __InterfaceName, 'UpdateConfiguration');
+    __Message.Write('Configuration', TypeInfo(ROMasterServerLibrary_Intf.TROSessionManagerConfiguration), Configuration, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+function TROSessionManager_Proxy.CreateSession(const SessionID: AnsiString; const SessionData: Binary): Boolean;
+begin
+  try
+    __Message.InitializeRequestMessage(__TransportChannel, 'ROMasterServerLibrary', __InterfaceName, 'CreateSession');
+    __Message.Write('SessionID', TypeInfo(AnsiString), SessionID, []);
+    __Message.Write('SessionData', TypeInfo(Binary), SessionData, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(Boolean), result, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+function TROSessionManager_Proxy.ReadSession(const SessionID: AnsiString): TROUserSession;
+begin
+  try
+    result := nil;
+    __Message.InitializeRequestMessage(__TransportChannel, 'ROMasterServerLibrary', __InterfaceName, 'ReadSession');
+    __Message.Write('SessionID', TypeInfo(AnsiString), SessionID, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(ROMasterServerLibrary_Intf.TROUserSession), result, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+procedure TROSessionManager_Proxy.UpdateSession(const SessionID: AnsiString; const SessionData: Binary);
+begin
+  try
+    __Message.InitializeRequestMessage(__TransportChannel, 'ROMasterServerLibrary', __InterfaceName, 'UpdateSession');
+    __Message.Write('SessionID', TypeInfo(AnsiString), SessionID, []);
+    __Message.Write('SessionData', TypeInfo(Binary), SessionData, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+function TROSessionManager_Proxy.DeleteSession(const SessionID: AnsiString): Boolean;
+begin
+  try
+    __Message.InitializeRequestMessage(__TransportChannel, 'ROMasterServerLibrary', __InterfaceName, 'DeleteSession');
+    __Message.Write('SessionID', TypeInfo(AnsiString), SessionID, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(Boolean), result, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+procedure TROSessionManager_Proxy.ClearSessions(const OnlyExpired: Boolean);
+begin
+  try
+    __Message.InitializeRequestMessage(__TransportChannel, 'ROMasterServerLibrary', __InterfaceName, 'ClearSessions');
+    __Message.Write('OnlyExpired', TypeInfo(Boolean), OnlyExpired, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+function TROSessionManager_Proxy.GetSessionCount: Integer;
+begin
+  try
+    __Message.InitializeRequestMessage(__TransportChannel, 'ROMasterServerLibrary', __InterfaceName, 'GetSessionCount');
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(Integer), result, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+procedure TROSessionManager_Proxy.StoreMessage(const SourceSessionID: AnsiString; const MessageData: Binary);
+begin
+  try
+    __Message.InitializeRequestMessage(__TransportChannel, 'ROMasterServerLibrary', __InterfaceName, 'StoreMessage');
+    __Message.Write('SourceSessionID', TypeInfo(AnsiString), SourceSessionID, []);
+    __Message.Write('MessageData', TypeInfo(Binary), MessageData, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+function TROSessionManager_Proxy.GetMessages(const SessionID: AnsiString; out MessageData: Binary): Integer;
+begin
+  try
+    MessageData := nil;
+    __Message.InitializeRequestMessage(__TransportChannel, 'ROMasterServerLibrary', __InterfaceName, 'GetMessages');
+    __Message.Write('SessionID', TypeInfo(AnsiString), SessionID, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(Integer), result, []);
+    __Message.Read('MessageData', TypeInfo(Binary), MessageData, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+function TROSessionManager_Proxy.GetTimeout: Integer;
+begin
+  try
+    __Message.InitializeRequestMessage(__TransportChannel, 'ROMasterServerLibrary', __InterfaceName, 'GetTimeout');
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(Integer), result, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+procedure TROSessionManager_Proxy.SetTimeout(const value: Integer);
+begin
+  try
+    __Message.InitializeRequestMessage(__TransportChannel, 'ROMasterServerLibrary', __InterfaceName, 'SetTimeout');
+    __Message.Write('value', TypeInfo(Integer), value, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+initialization
+  RegisterROClass(TROSessionManagerConfiguration);
+  RegisterROClass(TROUserSession);
+  RegisterProxyClass(IROSessionManager_IID, TROSessionManager_Proxy);
+
+
+finalization
+  UnregisterROClass(TROSessionManagerConfiguration);
+  UnregisterROClass(TROUserSession);
+  UnregisterProxyClass(IROSessionManager_IID);
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ROServiceDiscovery.RODL b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ROServiceDiscovery.RODL
new file mode 100644
index 0000000..39ed565
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ROServiceDiscovery.RODL	
@@ -0,0 +1,35 @@
+<Library Name="ROServerDiscovery" UID="{943975A3-664A-4F07-AD0F-7357744276BF}" Version="3.0">
+<Services>
+<Service Name="IROServerDiscoveryService">
+<Interfaces>
+<Interface Name="Default" UID="{D0F69433-544B-4003-946F-AD35046169B0}">
+<Operations>
+<Operation Name="FindService" UID="{F3CBA367-1C02-4BAE-AEC3-ECD092090883}" ForceAsyncResponse="1">
+<Parameters>
+<Parameter Name="Result" DataType="String" Flag="Result">
+</Parameter>
+<Parameter Name="iName" DataType="String" Flag="In" >
+</Parameter>
+<Parameter Name="ioServerOptions" DataType="TRODiscoveryOptions" Flag="InOut" >
+</Parameter>
+</Parameters>
+</Operation>
+</Operations>
+</Interface>
+</Interfaces>
+</Service>
+</Services>
+<Structs>
+<Struct Name="TRODiscoveryOptions" UID="{F9C17F81-F8C2-4890-A282-AF6DF0E38462}" AutoCreateParams="1">
+<Documentation>
+<![CDATA[Use this base class to define custom Option strcuts that you can pass back from your Server Discovery calls]]>
+</Documentation>
+<Elements>
+</Elements>
+</Struct>
+</Structs>
+<Enums>
+</Enums>
+<Arrays>
+</Arrays>
+</Library>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects.inc b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects.inc
new file mode 100644
index 0000000..bbc33e5
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects.inc	
@@ -0,0 +1,151 @@
+{$INCLUDE eDefines.inc}
+
+{ Define to check for RemObjects SDK 3.0 [vs. future versions] }
+{.$DEFINE ROSDK4}
+{$DEFINE ROSDK5}
+
+{ Define to check for RemObjects SDK 3.0 and above [vs. older versions] }
+{$DEFINE ROSDK3UP}
+{$DEFINE ROSDK4UP}
+{$DEFINE ROSDK5UP}
+
+{ DXSock }
+
+    { To use RemObjects with the standalone version of DXSock, simply remove the
+      define below. Note that this has only been tested with DXSock 3.0, and that
+      doing so requires a separate license for DXSock from Brain PatchWorks
+      see http://www.bpdx.com for more information }
+
+    {$DEFINE RemObjects_USE_RODX}
+
+{ Internet Component Suite (ICS) }
+    { Internet Component Suite - http://www.overbyte.be }
+    
+    {$DEFINE RemObjects_ICS_v5}
+    {.$DEFINE RemObjects_ICS_v6}
+
+{ Indy }
+
+   { If you are using Indy 10.2.3 or the latest just uncomment the
+     RemObjects_INDY10C DEFINE right below, and remove the Indy
+     package references from the Requires section of RemObjects_Indy_Dx.dpk
+     before re-compiling your RemObjects Indy package. }
+
+  {.$DEFINE RemObjects_INDY10C}
+  {$IFDEF RemObjects_INDY10C}
+    {$DEFINE RemObjects_INDY10}  
+    {$DEFINE RemObjects_INDY10B}
+    {$DEFINE RemObjects_GLOBAL_INDY_DEFINE}
+  {$ENDIF}
+
+   { If you are using latest Indy 10 in Delphi 6 or 7, just uncomment the 
+     RemObjects_INDY10_in_Delphi67 DEFINE right below, and remove the Indy 
+     package references from the Requires section of RemObjects_Indy_Dx.dpk 
+     before re-compiling your RemObjects Indy package. }
+
+  {.$DEFINE RemObjects_INDY10_in_Delphi67}
+  {$IFDEF RemObjects_INDY10_in_Delphi67}
+    {$DEFINE RemObjects_INDY10}  
+    {$DEFINE RemObjects_INDY10B}  
+    {$DEFINE RemObjects_GLOBAL_INDY_DEFINE}
+  {$ENDIF}
+
+  {$IFNDEF RemObjects_GLOBAL_INDY_DEFINE}
+
+    {$UNDEF RemObjects_INDY8}
+    {$UNDEF RemObjects_INDY9}
+    {$UNDEF RemObjects_INDY10}
+
+    {$IFDEF FPC}
+    	{$DEFINE RemObjects_INDY10}
+    	{$DEFINE RemObjects_INDY10B}
+      {$DEFINE RemObjects_INDY10C}
+    {$ELSE}
+      {$IFDEF DELPHI12UP}
+        {$DEFINE RemObjects_INDY10}
+        {$DEFINE RemObjects_INDY10B}
+        {$DEFINE RemObjects_INDY10C}
+      {$ELSE}
+        {$IFDEF DELPHI10UP}
+          {$DEFINE RemObjects_INDY10}
+          {$DEFINE RemObjects_INDY10B}
+        {$ELSE}
+          {$IFDEF DELPHI9UP}
+            {$DEFINE RemObjects_INDY10}
+            {$DEFINE RemObjects_INDY10A}
+          {$ELSE}
+            {$IFDEF DELPHI7UP}
+              {$DEFINE RemObjects_INDY9}
+            {$ELSE}
+              {$DEFINE RemObjects_INDY8}
+            {$ENDIF}
+          {$ENDIF}
+        {$ENDIF}          
+      {$ENDIF}
+
+      {$IFDEF KYLIX}
+        {$IFDEF KYLIX3UP}
+          {$DEFINE RemObjects_INDY9}
+        {$ELSE}
+          {$DEFINE RemObjects_INDY8}
+        {$ENDIF}
+      {$ENDIF}
+    {$ENDIF}
+
+    { If you are using Indy 9 in Delphi 6 just uncomment the Indy9 DEFINE below,
+      and remove the Indy package references from the Requires section of
+      RemObjects_Indy_D6.dpk before compiling your RemObjects Indy package. }
+
+    {.$DEFINE RemObjects_INDY9}
+
+    {$IFDEF RemObjects_INDY9}
+      {$UNDEF RemObjects_INDY8}
+    {$ENDIF}
+
+  {$ENDIF}
+
+    { If you are using a newer version of Indy that properly works at designtime,
+      you can set define the define below. If the define is not set (as is the
+      default), Indy channels cannot be used to connect at designtime, trying so
+      will display a warning message.
+
+      If you enable this define and receive an Access Violation when trying to
+      connect at designtime, then your Indy version does not yet include the
+      fix for this problem. Please contact the Indy Crew for details.
+
+      This problem applies to the Delphi Windows IDE's only; Kylix is not affected. }
+
+    {.$DEFINE RemObjects_INDY_DESIGNTIME_FIX}
+
+{ Thread Names in Debugger }
+
+    {$IFDEF DELPHI7UP}
+      {$DEFINE RemObjects_SetThreadName}
+    {$ENDIF}
+
+{ XML }
+
+    {$IFDEF MSWINDOWS}
+      {$DEFINE RemObjects_MSXML}
+    {$ELSE}
+      {$DEFINE RemObjects_OpenXML}
+    {$ENDIF}
+
+    { if we someone manually defined RemObjects_OpenXML, then undef RemObjects_MSXML }
+    {$IFDEF RemObjects_OpenXML}
+      {$UNDEF RemObjects_MSXML}
+    {$ENDIF}
+
+{ Encryption }
+
+    {$IFDEF MSWINDOWS}
+      {$DEFINE RemObjects_UseEncryption }
+    {$ENDIF MSWINDOWS}
+
+    {$IFDEF FPC}
+      {$MODE DELPHI}
+      {$UNDEF RemObjects_UseEncryption}
+      {$DEFINE RemObjects_OpenXML}
+      {$UNDEF RemObjects_MSXML}
+    {$ENDIF}
+ {$Q-,B-,R-}
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D10.bdsproj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D10.bdsproj
new file mode 100644
index 0000000..437e515
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D10.bdsproj	
@@ -0,0 +1,181 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality" Type="String">Delphi.Personality</Option>
+			<Option Name="ProjectType" Type="String"></Option>
+			<Option Name="Version" Type="String">1.0</Option>
+			<Option Name="GUID" Type="String">{ADCC1E83-6977-48E1-B7B7-21A9890C8C6F}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource" Type="String">RemObjects_BPDX_D10.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version" Type="String">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A" Type="Integer">8</Compiler>
+			<Compiler Name="B" Type="Integer">0</Compiler>
+			<Compiler Name="C" Type="Integer">1</Compiler>
+			<Compiler Name="D" Type="Integer">1</Compiler>
+			<Compiler Name="E" Type="Integer">0</Compiler>
+			<Compiler Name="F" Type="Integer">0</Compiler>
+			<Compiler Name="G" Type="Integer">1</Compiler>
+			<Compiler Name="H" Type="Integer">1</Compiler>
+			<Compiler Name="I" Type="Integer">1</Compiler>
+			<Compiler Name="J" Type="Integer">0</Compiler>
+			<Compiler Name="K" Type="Integer">0</Compiler>
+			<Compiler Name="L" Type="Integer">1</Compiler>
+			<Compiler Name="M" Type="Integer">0</Compiler>
+			<Compiler Name="N" Type="Integer">1</Compiler>
+			<Compiler Name="O" Type="Integer">1</Compiler>
+			<Compiler Name="P" Type="Integer">1</Compiler>
+			<Compiler Name="Q" Type="Integer">0</Compiler>
+			<Compiler Name="R" Type="Integer">0</Compiler>
+			<Compiler Name="S" Type="Integer">0</Compiler>
+			<Compiler Name="T" Type="Integer">0</Compiler>
+			<Compiler Name="U" Type="Integer">0</Compiler>
+			<Compiler Name="V" Type="Integer">1</Compiler>
+			<Compiler Name="W" Type="Integer">0</Compiler>
+			<Compiler Name="X" Type="Integer">1</Compiler>
+			<Compiler Name="Y" Type="Integer">1</Compiler>
+			<Compiler Name="Z" Type="Integer">1</Compiler>
+			<Compiler Name="ShowHints" Type="Boolean">True</Compiler>
+			<Compiler Name="ShowWarnings" Type="Boolean">True</Compiler>
+			<Compiler Name="UnitAliases" Type="String">WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;</Compiler>
+			<Compiler Name="NamespacePrefix" Type="String"></Compiler>
+			<Compiler Name="GenerateDocumentation" Type="Boolean">False</Compiler>
+			<Compiler Name="DefaultNamespace" Type="String"></Compiler>
+			<Compiler Name="SymbolDeprecated" Type="Boolean">False</Compiler>
+			<Compiler Name="SymbolLibrary" Type="Boolean">False</Compiler>
+			<Compiler Name="SymbolPlatform" Type="Boolean">False</Compiler>
+			<Compiler Name="SymbolExperimental" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitLibrary" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitPlatform" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitDeprecated" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitExperimental" Type="Boolean">False</Compiler>
+			<Compiler Name="HResultCompat" Type="Boolean">True</Compiler>
+			<Compiler Name="HidingMember" Type="Boolean">True</Compiler>
+			<Compiler Name="HiddenVirtual" Type="Boolean">True</Compiler>
+			<Compiler Name="Garbage" Type="Boolean">True</Compiler>
+			<Compiler Name="BoundsError" Type="Boolean">True</Compiler>
+			<Compiler Name="ZeroNilCompat" Type="Boolean">True</Compiler>
+			<Compiler Name="StringConstTruncated" Type="Boolean">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar" Type="Boolean">True</Compiler>
+			<Compiler Name="TypedConstVarPar" Type="Boolean">True</Compiler>
+			<Compiler Name="AsgToTypedConst" Type="Boolean">True</Compiler>
+			<Compiler Name="CaseLabelRange" Type="Boolean">True</Compiler>
+			<Compiler Name="ForVariable" Type="Boolean">True</Compiler>
+			<Compiler Name="ConstructingAbstract" Type="Boolean">True</Compiler>
+			<Compiler Name="ComparisonFalse" Type="Boolean">True</Compiler>
+			<Compiler Name="ComparisonTrue" Type="Boolean">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned" Type="Boolean">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned" Type="Boolean">True</Compiler>
+			<Compiler Name="UnsupportedConstruct" Type="Boolean">True</Compiler>
+			<Compiler Name="FileOpen" Type="Boolean">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc" Type="Boolean">True</Compiler>
+			<Compiler Name="BadGlobalSymbol" Type="Boolean">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor" Type="Boolean">True</Compiler>
+			<Compiler Name="InvalidDirective" Type="Boolean">True</Compiler>
+			<Compiler Name="PackageNoLink" Type="Boolean">True</Compiler>
+			<Compiler Name="PackageThreadVar" Type="Boolean">True</Compiler>
+			<Compiler Name="ImplicitImport" Type="Boolean">True</Compiler>
+			<Compiler Name="HPPEMITIgnored" Type="Boolean">True</Compiler>
+			<Compiler Name="NoRetVal" Type="Boolean">True</Compiler>
+			<Compiler Name="UseBeforeDef" Type="Boolean">True</Compiler>
+			<Compiler Name="ForLoopVarUndef" Type="Boolean">True</Compiler>
+			<Compiler Name="UnitNameMismatch" Type="Boolean">True</Compiler>
+			<Compiler Name="NoCFGFileFound" Type="Boolean">True</Compiler>
+			<Compiler Name="MessageDirective" Type="Boolean">True</Compiler>
+			<Compiler Name="ImplicitVariants" Type="Boolean">True</Compiler>
+			<Compiler Name="UnicodeToLocale" Type="Boolean">True</Compiler>
+			<Compiler Name="LocaleToUnicode" Type="Boolean">True</Compiler>
+			<Compiler Name="ImagebaseMultiple" Type="Boolean">True</Compiler>
+			<Compiler Name="SuspiciousTypecast" Type="Boolean">True</Compiler>
+			<Compiler Name="PrivatePropAccessor" Type="Boolean">True</Compiler>
+			<Compiler Name="UnsafeType" Type="Boolean">False</Compiler>
+			<Compiler Name="UnsafeCode" Type="Boolean">False</Compiler>
+			<Compiler Name="UnsafeCast" Type="Boolean">False</Compiler>
+			<Compiler Name="OptionTruncated" Type="Boolean">True</Compiler>
+			<Compiler Name="WideCharReduced" Type="Boolean">True</Compiler>
+			<Compiler Name="DuplicatesIgnored" Type="Boolean">True</Compiler>
+			<Compiler Name="UnitInitSeq">True</Compiler>
+			<Compiler Name="LocalPInvoke">True</Compiler>
+			<Compiler Name="CodePage"></Compiler>
+		</Compiler>
+		<Linker>
+			<Linker Name="MapFile" Type="Integer">0</Linker>
+			<Linker Name="OutputObjs" Type="Integer">0</Linker>
+			<Linker Name="ConsoleApp" Type="Integer">1</Linker>
+			<Linker Name="DebugInfo" Type="Boolean">False</Linker>
+			<Linker Name="RemoteSymbols" Type="Boolean">False</Linker>
+			<Linker Name="GenerateDRC" Type="Boolean">False</Linker>
+			<Linker Name="MinStackSize" Type="Integer">16384</Linker>
+			<Linker Name="MaxStackSize" Type="Integer">1048576</Linker>
+			<Linker Name="ImageBase" Type="Integer">4194304</Linker>
+			<Linker Name="ExeDescription" Type="String">RemObjects SDK - BPDX Library</Linker>
+			<Linker Name="GenerateHpps">False</Linker>
+		</Linker>
+		<Directories>
+			<Directories Name="OutputDir" Type="String"></Directories>
+			<Directories Name="UnitOutputDir" Type="String">..\Dcu\D10</Directories>
+			<Directories Name="PackageDLLOutputDir" Type="String">..\Dcu\D10</Directories>
+			<Directories Name="PackageDCPOutputDir" Type="String">..\Dcu\D10</Directories>
+			<Directories Name="SearchPath" Type="String">..\Dcu\D10</Directories>
+			<Directories Name="Packages" Type="String"></Directories>
+			<Directories Name="Conditionals" Type="String"></Directories>
+			<Directories Name="DebugSourceDirs" Type="String"></Directories>
+			<Directories Name="UsePackages" Type="Boolean">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams" Type="String"></Parameters>
+			<Parameters Name="HostApplication" Type="String"></Parameters>
+			<Parameters Name="Launcher" Type="String"></Parameters>
+			<Parameters Name="UseLauncher" Type="Boolean">False</Parameters>
+			<Parameters Name="DebugCWD" Type="String"></Parameters>
+			<Parameters Name="RemoteHost" Type="String"></Parameters>
+			<Parameters Name="RemotePath" Type="String"></Parameters>
+			<Parameters Name="RemoteLauncher" Type="String"></Parameters>
+			<Parameters Name="RemoteCWD" Type="String"></Parameters>
+			<Parameters Name="RemoteDebug" Type="Boolean">False</Parameters>
+			<Parameters Name="Debug Symbols Search Path"></Parameters>
+			<Parameters Name="LoadAllSymbols">True</Parameters>
+			<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+		</Parameters>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo" Type="Boolean">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="MajorVer" Type="Integer">4</VersionInfo>
+			<VersionInfo Name="MinorVer" Type="Integer">0</VersionInfo>
+			<VersionInfo Name="Release" Type="Integer">0</VersionInfo>
+			<VersionInfo Name="Build" Type="Integer">404</VersionInfo>
+			<VersionInfo Name="Debug" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="PreRelease" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="Special" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="Private" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="DLL" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="Locale" Type="Integer">1033</VersionInfo>
+			<VersionInfo Name="CodePage" Type="Integer">1252</VersionInfo>
+		</VersionInfo>
+		<Language>
+			<Language Name="ActiveLang" Type="String"></Language>
+			<Language Name="ProjectLang" Type="String">$00000000</Language>
+			<Language Name="RootDir" Type="String"></Language>
+		</Language>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion">4.0.0.404</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+			<VersionInfoKeys Name="Comments"></VersionInfoKeys>
+		</VersionInfoKeys>
+	</Delphi.Personality>
+	<ModelSupport>False</ModelSupport>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D10.cfg b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D10.cfg
new file mode 100644
index 0000000..b1c5a4f
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D10.cfg	
@@ -0,0 +1,52 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N0"..\Dcu\D10"
+-LE"..\Dcu\D10"
+-LN"..\Dcu\D10"
+-U"..\Dcu\D10"
+-O"..\Dcu\D10"
+-I"..\Dcu\D10"
+-R"..\Dcu\D10"
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-SYMBOL_EXPERIMENTAL
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNIT_EXPERIMENTAL
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D10.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D10.dpk
new file mode 100644
index 0000000..0134bf6
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D10.dpk	
@@ -0,0 +1,40 @@
+package RemObjects_BPDX_D10;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - BPDX Library'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  designide,
+  RemObjects_Core_D10,
+  RemObjects_RODX_D10;
+
+contains
+  uROBPDXHTTPServer in 'uROBPDXHTTPServer.pas',
+  uROBPDXTCPServer in 'uROBPDXTCPServer.pas',
+  RemObjects_BPDX_Reg in 'RemObjects_BPDX_Reg.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D10.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D10.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D10.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D11.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D11.dpk
new file mode 100644
index 0000000..811342a
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D11.dpk	
@@ -0,0 +1,40 @@
+package RemObjects_BPDX_D11;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - BPDX Library'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  designide,
+  RemObjects_Core_D11,
+  RemObjects_RODX_D11;
+
+contains
+  uROBPDXHTTPServer in 'uROBPDXHTTPServer.pas',
+  uROBPDXTCPServer in 'uROBPDXTCPServer.pas',
+  RemObjects_BPDX_Reg in 'RemObjects_BPDX_Reg.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D11.dproj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D11.dproj
new file mode 100644
index 0000000..872a5ec
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D11.dproj	
@@ -0,0 +1,75 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{e83cd92a-d359-4246-b0d2-a93d5f176eba}</ProjectGuid>
+    <MainSource>RemObjects_BPDX_D11.dpk</MainSource>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+    <DCC_DependencyCheckOutputName>..\Dcu\D11\RemObjects_BPDX_D11.bpl</DCC_DependencyCheckOutputName>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DebugInformation>False</DCC_DebugInformation>
+    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+    <DCC_DcuOutput>..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\Dcu\D11</DCC_IncludePath>
+    <DCC_Define>RELEASE</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_SYMBOL_EXPERIMENTAL>False</DCC_SYMBOL_EXPERIMENTAL>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+    <DCC_UNIT_EXPERIMENTAL>False</DCC_UNIT_EXPERIMENTAL>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DcuOutput>..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\Dcu\D11</DCC_IncludePath>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_SYMBOL_EXPERIMENTAL>False</DCC_SYMBOL_EXPERIMENTAL>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+    <DCC_UNIT_EXPERIMENTAL>False</DCC_UNIT_EXPERIMENTAL>
+  </PropertyGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Delphi.Personality</Borland.Personality>
+    <Borland.ProjectType>Package</Borland.ProjectType>
+    <BorlandProject>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">RemObjects SDK - BPDX Library</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">4</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">404</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">4.0.0.404</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">RemObjects_BPDX_D11.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
+  <ItemGroup>
+    <DelphiCompile Include="RemObjects_BPDX_D11.dpk">
+      <MainSource>MainSource</MainSource>
+    </DelphiCompile>
+    <DCCReference Include="designide.dcp" />
+    <DCCReference Include="RemObjects_BPDX_Reg.pas" />
+    <DCCReference Include="RemObjects_Core_D11.dcp" />
+    <DCCReference Include="RemObjects_RODX_D11.dcp" />
+    <DCCReference Include="rtl.dcp" />
+    <DCCReference Include="uROBPDXHTTPServer.pas" />
+    <DCCReference Include="uROBPDXTCPServer.pas" />
+    <DCCReference Include="vcl.dcp" />
+  </ItemGroup>
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D11.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D11.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D11.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D12.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D12.dpk
new file mode 100644
index 0000000..6e49a31
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D12.dpk	
@@ -0,0 +1,40 @@
+package RemObjects_BPDX_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - BPDX Library'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  designide,
+  RemObjects_Core_D12,
+  RemObjects_RODX_D12;
+
+contains
+  uROBPDXHTTPServer in 'uROBPDXHTTPServer.pas',
+  uROBPDXTCPServer in 'uROBPDXTCPServer.pas',
+  RemObjects_BPDX_Reg in 'RemObjects_BPDX_Reg.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D12.dproj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D12.dproj
new file mode 100644
index 0000000..f2a3611
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D12.dproj	
@@ -0,0 +1,99 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{e83cd92a-d359-4246-b0d2-a93d5f176eba}</ProjectGuid>
+			<MainSource>RemObjects_BPDX_D12.dpk</MainSource>
+			<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+			<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+			<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+			<DCC_DependencyCheckOutputName>..\Dcu\D12\RemObjects_BPDX_D12.bpl</DCC_DependencyCheckOutputName>
+			<ProjectVersion>11.1</ProjectVersion>
+			<Config Condition="'$(Config)'==''">Base</Config>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base)'!=''">
+			<DCC_SymbolReferenceInfo>1</DCC_SymbolReferenceInfo>
+			<DCC_CVT_WCHAR_TO_ACHAR>error</DCC_CVT_WCHAR_TO_ACHAR>
+			<DCC_IMPLICIT_STRING_CAST>error</DCC_IMPLICIT_STRING_CAST>
+			<DCC_EXPLICIT_STRING_CAST_LOSS>error</DCC_EXPLICIT_STRING_CAST_LOSS>
+			<DCC_CVT_WIDENING_STRING_LOST>error</DCC_CVT_WIDENING_STRING_LOST>
+			<DCC_EXPLICIT_STRING_CAST>error</DCC_EXPLICIT_STRING_CAST>
+			<DCC_CVT_ACHAR_TO_WCHAR>error</DCC_CVT_ACHAR_TO_WCHAR>
+			<DCC_IMPLICIT_STRING_CAST_LOSS>error</DCC_IMPLICIT_STRING_CAST_LOSS>
+			<DCC_CVT_NARROWING_STRING_LOST>error</DCC_CVT_NARROWING_STRING_LOST>
+			<GenDll>true</GenDll>
+			<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+			<DCC_DcpOutput>..\Dcu\D12</DCC_DcpOutput>
+			<DCC_DcuOutput>..\Dcu\D12</DCC_DcuOutput>
+			<GenPackage>true</GenPackage>
+			<DesignOnlyPackage>false</DesignOnlyPackage>
+			<DCC_ImageBase>00400000</DCC_ImageBase>
+			<DCC_DependencyCheckOutputName>..\Dcu\D12\RemObjects_BPDX_D12.bpl</DCC_DependencyCheckOutputName>
+			<DCC_Description>RemObjects SDK - BPDX Library</DCC_Description>
+			<DCC_UnitSearchPath>..\Dcu\D12;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+			<DCC_BplOutput>..\Dcu\D12</DCC_BplOutput>
+		</PropertyGroup>
+		<ItemGroup>
+			<DelphiCompile Include="RemObjects_BPDX_D12.dpk">
+				<MainSource>MainSource</MainSource>
+			</DelphiCompile>
+			<DCCReference Include="rtl.dcp"/>
+			<DCCReference Include="vcl.dcp"/>
+			<DCCReference Include="designide.dcp"/>
+			<DCCReference Include="RemObjects_Core_D12.dcp"/>
+			<DCCReference Include="RemObjects_RODX_D12.dcp"/>
+			<DCCReference Include="uROBPDXHTTPServer.pas"/>
+			<DCCReference Include="uROBPDXTCPServer.pas"/>
+			<DCCReference Include="RemObjects_BPDX_Reg.pas"/>
+			<BuildConfiguration Include="Base">
+				<Key>Base</Key>
+			</BuildConfiguration>
+		</ItemGroup>
+		<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+		<ProjectExtensions>
+			<Borland.Personality>Delphi.Personality.12</Borland.Personality>
+			<Borland.ProjectType>Package</Borland.ProjectType>
+			<BorlandProject>
+				<Delphi.Personality>
+					<Parameters>
+						<Parameters Name="UseLauncher">False</Parameters>
+						<Parameters Name="LoadAllSymbols">True</Parameters>
+						<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+					</Parameters>
+					<VersionInfo>
+						<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+						<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+						<VersionInfo Name="MajorVer">4</VersionInfo>
+						<VersionInfo Name="MinorVer">0</VersionInfo>
+						<VersionInfo Name="Release">0</VersionInfo>
+						<VersionInfo Name="Build">404</VersionInfo>
+						<VersionInfo Name="Debug">False</VersionInfo>
+						<VersionInfo Name="PreRelease">False</VersionInfo>
+						<VersionInfo Name="Special">False</VersionInfo>
+						<VersionInfo Name="Private">False</VersionInfo>
+						<VersionInfo Name="DLL">False</VersionInfo>
+						<VersionInfo Name="Locale">1033</VersionInfo>
+						<VersionInfo Name="CodePage">1252</VersionInfo>
+					</VersionInfo>
+					<VersionInfoKeys>
+						<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="FileDescription"/>
+						<VersionInfoKeys Name="FileVersion">4.0.0.404</VersionInfoKeys>
+						<VersionInfoKeys Name="InternalName"/>
+						<VersionInfoKeys Name="LegalCopyright"/>
+						<VersionInfoKeys Name="LegalTrademarks"/>
+						<VersionInfoKeys Name="OriginalFilename"/>
+						<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+						<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+						<VersionInfoKeys Name="Comments"/>
+					</VersionInfoKeys>
+					<Source>
+						<Source Name="MainSource">RemObjects_BPDX_D12.dpk</Source>
+					</Source>
+					<Excluded_Packages/>
+				</Delphi.Personality>
+			</BorlandProject>
+			<ProjectFileVersion>12</ProjectFileVersion>
+		</ProjectExtensions>
+	</Project>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D12.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D12.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D12.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D5.dof b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D5.dof
new file mode 100644
index 0000000..5281b65
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D5.dof	
@@ -0,0 +1,94 @@
+[Compiler]
+A=1
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects SDK - BPDX Library
+[Directories]
+OutputDir=
+UnitOutputDir=..\Dcu\D5
+PackageDLLOutputDir=..\Dcu\D5
+PackageDCPOutputDir=..\Dcu\D5
+SearchPath=..\Dcu\D5
+Packages=Vcl50;Vclx50;VclSmp50;Vcldb50;vclado50;Vclbde50;vcldbx50;VCLIB50;Vclmid50;vclie50;Inetdb50;Inet50;dclocx50;dclaxserver50;Indy50;RemObjects_Core_D5
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+[Parameters]
+RunParams=
+HostApplication=
+[Language]
+ActiveLang=
+ProjectLang=$00000409
+RootDir=
+[Version Info]
+IncludeVerInfo=1
+AutoIncBuild=0
+MajorVer=1
+MinorVer=0
+Release=0
+Build=0
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+[Version Info Keys]
+CompanyName=
+FileDescription=
+FileVersion=1.0.0.0
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+Comments=
+[HistoryLists\hlUnitAliases]
+Count=1
+Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+[HistoryLists\hlUnitOutputDirectory]
+Count=1
+Item0=s:\exe\dcu50
+[HistoryLists\hlBPLOutput]
+Count=1
+Item0=l:\Packages
+[HistoryLists\hlDCPOutput]
+Count=1
+Item0=l:\Packages
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D5.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D5.dpk
new file mode 100644
index 0000000..7a5622e
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D5.dpk	
@@ -0,0 +1,39 @@
+package RemObjects_BPDX_D5;
+
+{$R *.res}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - BPDX Library'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+
+requires
+  RemObjects_Core_D5,
+  RemObjects_RODX_D5;
+
+{%File 'RemObjects.inc'}
+
+contains
+  RemObjects_BPDX_Reg in 'RemObjects_BPDX_Reg.pas',
+  uROBPDXTCPServer in 'uROBPDXTCPServer.pas',
+  uROBPDXHTTPServer in 'uROBPDXHTTPServer.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D5.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D5.res
new file mode 100644
index 0000000..a2de886
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D5.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D6.dof b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D6.dof
new file mode 100644
index 0000000..53b983a
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D6.dof	
@@ -0,0 +1,95 @@
+[FileVersion]
+Version=6.0
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects SDK - BPDX Library
+[Directories]
+OutputDir=
+UnitOutputDir=..\Dcu\D6
+PackageDLLOutputDir=..\Dcu\D6
+PackageDCPOutputDir=..\Dcu\D6
+SearchPath=..\Dcu\D6
+Packages=Vcl50;Vclx50;VclSmp50;Vcldb50;vclado50;Vclbde50;vcldbx50;VCLIB50;Vclmid50;vclie50;Inetdb50;Inet50;dclocx50;dclaxserver50;Indy50;RemObjects_Core_D5
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+[Parameters]
+RunParams=
+HostApplication=
+Launcher=
+UseLauncher=0
+DebugCWD=
+[Version Info]
+IncludeVerInfo=1
+AutoIncBuild=0
+MajorVer=1
+MinorVer=0
+Release=0
+Build=0
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+[Version Info Keys]
+CompanyName=
+FileDescription=
+FileVersion=1.0.0.0
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+Comments=
+[Excluded Packages]
+C:\Program Files\Developer Express Inc\ExpressLayout Control\Delphi 6\Lib\dcldxLayoutControlD6.bpl=ExpressLayout Control by Developer Express Inc.
+C:\Program Files\Borland\Delphi6\Projects\BPL\SAX_D60.BPL=SAX for Pascal Design Package
+C:\PROGRA~1\Borland\Delphi6\Projects\Bpl\Xdom_2_3Delphi6.bpl=Extended Document Object Model (XDOM)
+C:\Program Files\Borland\Delphi6\Projects\BPL\SAXMS_D60.BPL=MSXML Vendor Design Package for SAX by Keith Wood
+C:\Program Files\Developer Express Inc\ExpressLayout Control\Delphi 6\Lib\dxLayoutControldxEditAdaptersD6.bpl=ExpressLayoutControl Adapters for ExpressEditors Library by Developer Express Inc.
+[HistoryLists\hlConditionals]
+Count=1
+Item0=Development
+[HistoryLists\hlUnitAliases]
+Count=1
+Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D6.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D6.dpk
new file mode 100644
index 0000000..80945c2
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D6.dpk	
@@ -0,0 +1,38 @@
+package RemObjects_BPDX_D6;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - BPDX Library'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  RemObjects_Core_D6,
+  RemObjects_RODX_D6;
+
+contains
+  uROBPDXHTTPServer in 'uROBPDXHTTPServer.pas',
+  uROBPDXTCPServer in 'uROBPDXTCPServer.pas',
+  RemObjects_BPDX_Reg in 'RemObjects_BPDX_Reg.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D6.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D6.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D6.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D7.dof b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D7.dof
new file mode 100644
index 0000000..9766921
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D7.dof	
@@ -0,0 +1,149 @@
+[FileVersion]
+Version=7.0
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects SDK - BPDX Library
+[Directories]
+OutputDir=
+UnitOutputDir=..\Dcu\D7
+PackageDLLOutputDir=..\Dcu\D7
+PackageDCPOutputDir=..\Dcu\D7
+SearchPath=..\Dcu\D7
+Packages=Vcl50;Vclx50;VclSmp50;Vcldb50;vclado50;Vclbde50;vcldbx50;VCLIB50;Vclmid50;vclie50;Inetdb50;Inet50;dclocx50;dclaxserver50;Indy50;RemObjects_Core_D5
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+[Parameters]
+RunParams=
+HostApplication=
+Launcher=
+UseLauncher=0
+DebugCWD=
+[Language]
+ActiveLang=
+ProjectLang=
+RootDir=
+[Version Info]
+IncludeVerInfo=1
+AutoIncBuild=0
+MajorVer=3
+MinorVer=0
+Release=0
+Build=258
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=3.0.0.258
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
+[Excluded Packages]
+R:\Data Abstract\Dcu\D7\DataAbstract_Core_D7.bpl=Data Abstract - Core Library
+R:\Data Abstract\Dcu\D7\DataAbstract_DBXDriver_D7.bpl=Data Abstract - dbExpress Driver
+R:\Data Abstract\Dcu\D7\DataAbstract_ADODriver_D7.bpl=Data Abstract - ADOExpress/dbGo Driver
+R:\Data Abstract\Dcu\D7\DataAbstract_IBXDriver_D7.bpl=Data Abstract - InterBase Express Driver
+l:\Packages\RO_ServiceTesterDesigntime_D7.bpl=(untitled)
+L:\Packages\eBrazil_70.bpl=elitedevelopments Library - Brazil - FOR INTERNAL USE ONLY
+L:\Packages\eBrazilComponents_70.bpl=elitedevelopments Library - Brazil Components - FOR INTERNAL USE ONLY
+L:\Packages\eBrazilContentEditor_70.bpl=elitedevelopments Library - Brazil Content Editor 2.0 - FOR INTERNAL USE ONLY
+R:\NexusDB Pack\Dcu\D7\RemObjects_NexusDB_IDE_D7.bpl=(untitled)
+R:\Data Abstract\Dcu\D7\DataAbstract_IDE_D7.bpl=Data Abstract - IDE Package
+R:\Hydra\Dcu\D7\Hydra_RO_IDE_D7.bpl=RemObjects' Hydra - RemObjects SDK IDE Integration
+R:\Hydra\Dcu\D7\Hydra_RO_D7.bpl=RemObjects' Hydra - RemObjects SDK Integration Library
+C:\Program Files\Borland\Delphi7\Projects\Bpl\NexusDB103dv70.bpl=NexusDB 1.03 - designtime - VCL70
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D7.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D7.dpk
new file mode 100644
index 0000000..37e7ff1
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D7.dpk	
@@ -0,0 +1,39 @@
+package RemObjects_BPDX_D7;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - BPDX Library'}
+{$IMPLICITBUILD OFF}
+
+requires
+  rtl,
+  vcl,
+  RemObjects_Core_D7,
+  RemObjects_RODX_D7;
+
+contains
+  uROBPDXHTTPServer in 'uROBPDXHTTPServer.pas',
+  uROBPDXTCPServer in 'uROBPDXTCPServer.pas',
+  RemObjects_BPDX_Reg in 'RemObjects_BPDX_Reg.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D7.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D7.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_D7.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_Glyphs.lrs b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_Glyphs.lrs
new file mode 100644
index 0000000..1364243
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_Glyphs.lrs	
@@ -0,0 +1,226 @@
+LazarusResources.Add('TROBPDXHTTPSERVER','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#255#0#255#153'c@'#149'^<'#153'c@'#146']Hmk?H'#146'>'#255
+  +#0#255#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@@@'#185
+  +'x='#185'x='#173'e'''#171'P'#20'jb'#30'$'#137'!1'#153'1@'#157'?@'#157'?'#255
+  +#0#255#255#0#255'@'#0#192#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255'@'#0#192
+  +'@@@'#231#129#22#227'm'#3#224']'#0#144'Z'#0#2'h'#0#0'k'#0#0'l'#0#15#134#15'@'
+  +#139'5H'#146'>'#255#0#255'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192
+  +#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192
+  +'@@@'#252#134#15#237#135#15#186'~'#7'R~'#2#18'z'#1#9'n'#0#0'l'#0#0'p'#0#5's'
+  +#4#151'6'#1#255#0#255'@'#0#192#255#255#255'@'#0#192'@'#0#192#255#255#255#255
+  +#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@'
+  +#207#146'#`'#137#14'l'#143#22#217#146'#'#255#135#22#186'~'#7'>x'#0#17'w'#0#28
+  +'['#1'lB'#22#136'2'#7'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255
+  +#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@:'
+  +#151#26'E'#153'"'#255#170'P'#255#161'B'#251#153'1'#255#140#28#255#128#9#237
+  +'n'#1#194'P'#4#144'8'#11#145'9'#12'@'#0#192#255#255#255'@'#0#192'@'#0#192'@'
+  +#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0
+  +#192'@@@'#22#166'%'#172#177'Q'#255#188'{'#251#177'_'#251#166'H'#251#153'1'
+  +#255#138#25#255'{'#4#224'e'#2#171'P'#20#150'='#14'@'#0#192#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255'@'#0#192'@@@;'#189'H'#194'a'#215#201#134#239
+  +#192'{'#251#177'_'#246#163'C'#240#147'&'#251#132#12#215'r'#2'tb'#3'lB'#22'@'
+  +#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'~'#204'kl'#215'sl'#215'sn'#203'g'#194'av'
+  +#173'Dh'#156'('#185#149'&'#255#135#22#168'z'#3#13#131#0'#c'#5'HJK'#196#189
+  +#194#192#186#192#189#183#189#189#183#189'HJK'#217#215#218'HJK{{{{{{'#169'~H'
+  +#192#191'ju'#218'{'#156#238#158#156#238#158'i'#213'oA'#189'H'#22#166'%'#26
+  +#152#23#185#149'&'#255#137#28#168'z'#3#13#131#0#2'}'#0'HJK'#198#193#198#194
+  +#189#194#192#186#192#189#183#189'HJK'#222#221#225'HJK{{{{{{{{{\'#191'Ux'#219
+  +'|'#165#241#165#165#241#165'u'#218'{O'#193'Q%'#168')R'#156'$'#242#154'3'#255
+  +#135#22't~'#2#2#129#0#255#0#255'HJK'#203#197#203#198#192#198#194#188#194#192
+  +#186#192'HJK'#227#226#230'HJK{{{{{{{{{BqCh'#207'h'#129#221#130#129#221#130'e'
+  +#206'fD'#186'E'#28#163'#:'#151#26#217#146'#'#255#132#18'R~'#2#2#129#0#255#0
+  +#255'HJK'#206#202#206#202#197#202#198#193#198#196#188#196'HJK'#231#230#234'H'
+  +'JK{{{{{{{{{{{{F'#134'FV'#197'WV'#197'WI'#188'I2'#172'3'#12#153#22'#'#139#12
+  +#206#139#24#255'~'#10#255'~'#10#255#0#255#255#0#255'HJK'#212#208#212#207#202
+  +#207#203#197#202#198#192#198'HJK'#235#234#237'HJK'#134#134#134#134#134#134
+  +#134#134#134#146#146#146'{{{BqC.q0%'#168')'#26#152#23#6#139#8'`'#137#14#244
+  +#132#16#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#217#213#216#212#208#212
+  +#207#202#207#203#197#202'HJK'#237#237#239'HJK{{{{{{{{{ooo'#134#134#134#134
+  +#134#134#167#167#167'HJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255'HJK'#222#218#221#217#213#217#233#231#234#207
+  +#202#207'HJK'#238#237#240'HJK'#140#140#140#140#140#140#146#146#146'{{{{{{{{{'
+  +#143#143#143'HJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255'HJK'#227#224#227#238#237#238#156#154#156#211#207#211'HJ'
+  +'K'#237#237#239'HJKTVWcddnnn'#140#140#140#140#140#140#140#140#140#166#166#166
+  +'HJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255'HJK'#231#230#231#144#144#146#158#157#158#216#212#216'HJK'#206#207
+  +#208#207#207#207#134#135#135'ceeNPQMOP\]]kkl'#146#146#146'HJK'#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#237
+  +#235#237#146#146#147#227#224#226#255#255#255#176#176#178'QRSUVWuvw'#169#170
+  +#170#211#211#212#189#189#191''#128#129'[\]JLMHJK'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#240#240#242#237
+  +#235#237#255#255#255#233#233#235#226#225#229#220#217#221#191#187#191#151#149
+  +#152'onrXYZNPQhij'#147#149#150#208#209#209'HJK'#255#0#255#0#0#0#0#0#0#255#0
+  +#255#255#0#255#0#0#0#255#0#255#0#0#0'HJK'#246#246#246#255#255#255#238#238#240
+  +#242#242#244#238#237#239#229#227#231#217#215#218#203#199#204#189#183#189#173
+  +#167#173#153#145#151#153#145#151'zsuHJK'#255#0#255#255#0#255#0#0#0#255#0#255
+  +#0#0#0#255#0#255#0#0#0#255#0#255#0#0#0'HJK'#255#255#255#237#237#239#248#248
+  +#250#251#251#252#246#244#247#234#234#237#221#220#224#207#204#208#192#187#193
+  +#176#170#176#160#152#158'HJKHJK'#255#0#255#255#0#255#255#0#255#0#0#0#255#0
+  ,#255#0#0#0#255#0#255#255#0#255#0#0#0#255#0#255#255#0#255'HJKHJK'#233#233#234
+  +#252#252#252#246#246#247#235#234#238#222#220#224#208#204#208#193#187#193'HJK'
+  +'HJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0#0#0#255#0#255#0#0#0
+  +#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255#255#0#255#255#0#255'HJKHJKHJKHJKH'
+  +'JKHJKHJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#0#0#0#0#0#0#255#0#255#255#0#255#0#0#0#255#0#255#0#0#0
+]);
+LazarusResources.Add('TROBPDXTCPSERVER','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'
+  +#142']Y'#142']Y'#142']Y'#128'PK@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@@@'#242#216
+  +#177#240#212#171#239#209#165#238#206#158#238#202#152#237#199#146#235#197#142
+  +#235#196#137#234#193#134#233#191#130#128'PK@'#0#192#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255'@'#0#192'@@@'#231#183'y'#230#181'u'#230#180'r'#230#177
+  +'n'#229#176'k'#227#173'h'#227#172'e'#226#170'b'#226#169'^'#234#194#135#128'P'
+  +'K@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255
+  +'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@@@'#246#226#197#243#222
+  +#189#243#218#182#183#180#164#7'9z'#182#175#154#238#206#157#238#202#151#235
+  +#199#145#235#197#140#128'PK@'#0#192#255#255#255'@'#0#192'@'#0#192#255#255#255
+  +#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192
+  +'@@@'#234#188#132#233#187#128#176#157'{'#7'9z'#9'b'#208#7'9z'#173#150'o'#229
+  +#173'j'#227#172'g'#237#201#147#128'PK@'#0#192#255#255#255'@'#0#192#255#255
+  +#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255
+  +#255'@'#0#192'@@@'#248#235#215#188#192#191#7'9z'#15'j'#211#17't'#234#9'b'#208
+  +#7'9z'#182#177#158#239#208#160#238#204#154#128'PK@'#0#192#255#255#255'@'#0
+  +#192'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255
+  +#255#255#255'@'#0#192'@@@'#171#144't'#7'9z'#25'x'#216'6'#150#240'('#138#238
+  +#27''#235#12'e'#209#7'9z'#183#177#160#239#209#163#128'PK@'#0#192#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255'@'#0#192'@@@'#7'9z'#7'9z'#7'9z@'#157#242'@'
+  +#157#242'5'#150#239#7'9z'#7'9z'#7'9z'#242#213#172#128'PK@'#0#192'@'#0#192'@'
+  +#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192#252#251#246#227#173'y'#128#196'w'#7'9z@'#157#242'@'#157#242'@'
+  +#157#242#7'9z'#246#225#196#244#222#189#242#218#182#128'PKHJK'#196#189#194#192
+  +#186#192#189#183#189#189#183#189'HJK'#217#215#218'HJK{{{{{{{{{'#209#146'm'
+  +#255#254#251#227#175'}'#226#173'{'#7'9z'#7'9z'#7'9z'#7'9z'#7'9z'#233#188#130
+  +#231#187#128#244#224#192#128'PKHJK'#198#193#198#194#189#194#192#186#192#189
+  +#183#189'HJK'#222#221#225'HJK{{{{{{{{{'#218#157'u'#255#255#255#254#254#252
+  +#254#251#250#254#250#244#252#247#239#251#244#233#251#242#227#250#239#221#248
+  +#235#215#247#231#207#246#227#201#128'PKHJK'#203#197#203#198#192#198#194#188
+  +#194#192#186#192'HJK'#227#226#230'HJK{{{{{{{{{'#218#157'u'#255#255#255#227
+  +#177#129#227#177#128#227#176''#226#173'}'#227#173'y'#225#171'x'#225#170'u'
+  +#225#169'r'#224#166'n'#247#233#211#128'PKHJK'#206#202#206#202#197#202#198#193
+  +#198#196#188#196'HJK'#231#230#234'HJK{{{{{{{{{'#231#171'y'#255#255#255#227
+  +#177#129#227#177#129#227#177#129#227#176''#227#175'}'#226#173'{'#226#172'x'
+  +#225#170'v'#225#169'r'#248#237#220#128'PKHJK'#212#208#212#207#202#207#203#197
+  +#202#198#192#198'HJK'#235#234#237'HJK'#134#134#134#134#134#134#134#134#134
+  +#231#171'y'#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#254#252#255#252#250#254#250#244#252#247#240#251#244#234#251#242#229#128'PKH'
+  +'JK'#217#213#216#212#208#212#207#202#207#203#197#202'HJK'#237#237#239'HJK{{{'
+  +'{{{{{{'#231#171'y'#207#142'h'#207#142'h'#207#142'h'#207#142'h'#207#142'h'
+  +#207#142'h'#207#142'h'#207#142'h'#207#142'h'#207#142'h'#207#142'h'#128'PKHJK'
+  +#222#218#221#217#213#217#233#231#234#207#202#207'HJK'#238#237#240'HJK'#140
+  +#140#140#140#140#140#146#146#146'{{{{{{{{{'#143#143#143'HJK'#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#227#224
+  +#227#238#237#238#156#154#156#211#207#211'HJK'#237#237#239'HJKTVWcddnnn'#140
+  +#140#140#140#140#140#140#140#140#166#166#166'HJK'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#231#230#231#144
+  +#144#146#158#157#158#216#212#216'HJK'#206#207#208#207#207#207#134#135#135'ce'
+  +'eNPQMOP\]]kkl'#146#146#146'HJK'#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255'HJK'#237#235#237#146#146#147#227#224#226
+  +#255#255#255#176#176#178'QRSUVWuvw'#169#170#170#211#211#212#189#189#191''
+  +#128#129'[\]JLMHJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255'HJK'#240#240#242#237#235#237#255#255#255#233#233#235
+  +#226#225#229#220#217#221#191#187#191#151#149#152'onrXYZNPQhij'#147#149#150
+  +#208#209#209'HJK'#255#0#255#0#0#0#0#0#0#255#0#255#255#0#255#0#0#0#255#0#255#0
+  +#0#0'HJK'#246#246#246#255#255#255#238#238#240#242#242#244#238#237#239#229#227
+  +#231#217#215#218#203#199#204#189#183#189#173#167#173#153#145#151#153#145#151
+  +'zsuHJK'#255#0#255#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255
+  ,#0#0#0'HJK'#255#255#255#237#237#239#248#248#250#251#251#252#246#244#247#234
+  +#234#237#221#220#224#207#204#208#192#187#193#176#170#176#160#152#158'HJKHJK'
+  +#255#0#255#255#0#255#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255#255#0#255#0#0
+  +#0#255#0#255#255#0#255'HJKHJK'#233#233#234#252#252#252#246#246#247#235#234
+  +#238#222#220#224#208#204#208#193#187#193'HJKHJK'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255#0#0
+  +#0#255#0#255#255#0#255#255#0#255'HJKHJKHJKHJKHJKHJKHJK'#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0#0#0#0#0#0#255#0#255#255
+  +#0#255#0#0#0#255#0#255#0#0#0
+]);
+LazarusResources.Add('TROBPDXSPACE','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#194#30#0#0#194#30#0#0#0#0#0#0#0#0#0#0#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#255#255
+  +#128#128#128#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#255#255#128#128#128#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#255#255#128#128#128#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#255#255#128#128#128#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#255#255
+  +#128#128#128#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#255#255#128#128#128#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#255#255#128#128#128#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#255#255#128#128#128#255#0
+  +#255#0#0#0#0#0#0#0#0#0#255#0#255#255#0#255#0#0#0#255#0#255#255#0#255#255#0
+  +#255#255#0#255#0#0#0#0#0#0#0#0#0#255#0#255#255#0#255#0#0#0#255#0#255#255#0
+  +#255#0#0#0#255#0#255#255#0#255#255#255#255#128#128#128#255#0#255#0#0#0#255#0
+  +#255#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255#255#0#255#255#0#255#255#0#255
+  +#0#0#0#255#0#255#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255#255#0#255#0#0#0
+  +#255#0#255#255#0#255#255#255#255#128#128#128#255#0#255#0#0#0#255#0#255#255#0
+  +#255#0#0#0#255#0#255#0#0#0#255#0#255#255#0#255#255#0#255#255#0#255#0#0#0#255
+  +#0#255#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255#255#0#255#0#0#0#255#0#255#0
+  +#0#0#255#255#255#128#128#128#255#0#255#0#0#0#0#0#0#0#0#0#255#0#255#255#0#255
+  +#0#0#0#0#0#0#0#0#0#255#0#255#255#0#255#0#0#0#255#0#255#255#0#255#0#0#0#255#0
+  +#255#255#0#255#0#0#0#0#0#0#255#0#255#255#0#255#255#0#255#255#255#255#128#128
+  +#128#255#0#255#0#0#0#255#0#255#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255#255
+  +#0#255#0#0#0#255#0#255#0#0#0#255#0#255#255#0#255#0#0#0#255#0#255#0#0#0#255#0
+  +#255#255#0#255#0#0#0#255#0#255#0#0#0#255#255#255#128#128#128#255#0#255#0#0#0
+  +#255#0#255#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255#255#0#255#0#0#0#255#0
+  +#255#0#0#0#255#0#255#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255#255#0#255#0#0
+  +#0#255#0#255#255#0#255#255#255#255#128#128#128#255#0#255#0#0#0#0#0#0#0#0#0
+  +#255#0#255#255#0#255#0#0#0#0#0#0#0#0#0#255#0#255#255#0#255#0#0#0#0#0#0#0#0#0
+  +#255#0#255#255#0#255#0#0#0#255#0#255#255#0#255#0#0#0#255#0#255#255#0#255#255
+  +#255#255#128#128#128#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#255#255#128#128#128#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#255#255#128#128#128#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#255#255#128#128
+  +#128#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#255#255#128#128#128#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#255#255#128#128#128#255#0#255#255#0#255#255#0#255
+  ,#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#255#255#128#128#128#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#255#255#128
+  +#128#128#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#255#255#128#128#128#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255
+]);
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_Lazarus_Mac.lpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_Lazarus_Mac.lpk
new file mode 100644
index 0000000..e72a557
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_Lazarus_Mac.lpk	
@@ -0,0 +1,53 @@
+<?xml version="1.0"?>
+<CONFIG>
+  <Package Version="3">
+    <Name Value="RemObjects_BPDX_Lazarus_Mac"/>
+    <CompilerOptions>
+      <Version Value="8"/>
+      <SearchPaths>
+        <OtherUnitFiles Value="$(LazarusDir)/lcl/units/$(TargetCPU)-$(TargetOS)/;RODX/"/>
+        <UnitOutputDirectory Value="units/$(TargetCPU)-$(TargetOS)"/>
+      </SearchPaths>
+      <Other>
+        <CompilerPath Value="$(CompPath)"/>
+      </Other>
+    </CompilerOptions>
+    <Description Value="RemObjects SDK - BPDX Library
+"/>
+    <Files Count="3">
+      <Item1>
+        <Filename Value="RemObjects_BPDX_Reg.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="RemObjects_BPDX_Reg"/>
+      </Item1>
+      <Item2>
+        <Filename Value="uROBPDXHTTPServer.pas"/>
+        <UnitName Value="uROBPDXHTTPServer"/>
+      </Item2>
+      <Item3>
+        <Filename Value="uROBPDXTCPServer.pas"/>
+        <UnitName Value="uROBPDXTCPServer"/>
+      </Item3>
+    </Files>
+    <Type Value="RunAndDesignTime"/>
+    <RequiredPkgs Count="3">
+      <Item1>
+        <PackageName Value="RemObjects_RODX_Lazarus_Mac"/>
+      </Item1>
+      <Item2>
+        <PackageName Value="RemObjects_Core_Lazarus_Mac"/>
+      </Item2>
+      <Item3>
+        <PackageName Value="FCL"/>
+        <MinVersion Major="1" Valid="True"/>
+      </Item3>
+    </RequiredPkgs>
+    <UsageOptions>
+      <UnitPath Value="$(PkgOutDir)/"/>
+    </UsageOptions>
+    <PublishOptions>
+      <Version Value="2"/>
+      <IgnoreBinaries Value="False"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_Lazarus_Unix.lpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_Lazarus_Unix.lpk
new file mode 100644
index 0000000..6c19738
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_Lazarus_Unix.lpk	
@@ -0,0 +1,53 @@
+<?xml version="1.0"?>
+<CONFIG>
+  <Package Version="3">
+    <Name Value="RemObjects_BPDX_Lazarus_Unix"/>
+    <CompilerOptions>
+      <Version Value="8"/>
+      <SearchPaths>
+        <OtherUnitFiles Value="$(LazarusDir)/lcl/units/$(TargetCPU)-$(TargetOS)/;RODX/"/>
+        <UnitOutputDirectory Value="units/$(TargetCPU)-$(TargetOS)"/>
+      </SearchPaths>
+      <Other>
+        <CompilerPath Value="$(CompPath)"/>
+      </Other>
+    </CompilerOptions>
+    <Description Value="RemObjects SDK - BPDX Library
+"/>
+    <Files Count="3">
+      <Item1>
+        <Filename Value="RemObjects_BPDX_Reg.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="RemObjects_BPDX_Reg"/>
+      </Item1>
+      <Item2>
+        <Filename Value="uROBPDXHTTPServer.pas"/>
+        <UnitName Value="uROBPDXHTTPServer"/>
+      </Item2>
+      <Item3>
+        <Filename Value="uROBPDXTCPServer.pas"/>
+        <UnitName Value="uROBPDXTCPServer"/>
+      </Item3>
+    </Files>
+    <Type Value="RunAndDesignTime"/>
+    <RequiredPkgs Count="3">
+      <Item1>
+        <PackageName Value="RemObjects_RODX_Lazarus_Unix"/>
+      </Item1>
+      <Item2>
+        <PackageName Value="RemObjects_Core_Lazarus_Unix"/>
+      </Item2>
+      <Item3>
+        <PackageName Value="FCL"/>
+        <MinVersion Major="1" Valid="True"/>
+      </Item3>
+    </RequiredPkgs>
+    <UsageOptions>
+      <UnitPath Value="$(PkgOutDir)/"/>
+    </UsageOptions>
+    <PublishOptions>
+      <Version Value="2"/>
+      <IgnoreBinaries Value="False"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_Lazarus_Windows.lpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_Lazarus_Windows.lpk
new file mode 100644
index 0000000..3190e60
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_Lazarus_Windows.lpk	
@@ -0,0 +1,53 @@
+<?xml version="1.0"?>
+<CONFIG>
+  <Package Version="3">
+    <PathDelim Value="\"/>
+    <Name Value="RemObjects_BPDX_Lazarus_Windows"/>
+    <CompilerOptions>
+      <Version Value="5"/>
+      <PathDelim Value="\"/>
+      <SearchPaths>
+        <OtherUnitFiles Value="RODX\"/>
+        <UnitOutputDirectory Value="..\Dcu\Lazarus\$(TargetCPU)-$(TargetOS)"/>
+      </SearchPaths>
+      <Other>
+        <CompilerPath Value="$(CompPath)"/>
+      </Other>
+    </CompilerOptions>
+    <Files Count="3">
+      <Item1>
+        <Filename Value="RemObjects_BPDX_Reg.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="RemObjects_BPDX_Reg"/>
+      </Item1>
+      <Item2>
+        <Filename Value="uROBPDXHTTPServer.pas"/>
+        <UnitName Value="uROBPDXHTTPServer"/>
+      </Item2>
+      <Item3>
+        <Filename Value="uROBPDXTCPServer.pas"/>
+        <UnitName Value="uROBPDXTCPServer"/>
+      </Item3>
+    </Files>
+    <Type Value="RunAndDesignTime"/>
+    <RequiredPkgs Count="3">
+      <Item1>
+        <PackageName Value="RemObjects_RODX_Lazarus_Windows"/>
+      </Item1>
+      <Item2>
+        <PackageName Value="RemObjects_Core_Lazarus_Windows"/>
+      </Item2>
+      <Item3>
+        <PackageName Value="FCL"/>
+        <MinVersion Major="1" Valid="True"/>
+      </Item3>
+    </RequiredPkgs>
+    <UsageOptions>
+      <UnitPath Value="$(PkgOutDir)"/>
+    </UsageOptions>
+    <PublishOptions>
+      <Version Value="2"/>
+      <IgnoreBinaries Value="False"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_Reg.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_Reg.pas
new file mode 100644
index 0000000..9d7a4c4
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_BPDX_Reg.pas	
@@ -0,0 +1,51 @@
+unit RemObjects_BPDX_Reg;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+procedure Register;
+
+implementation
+
+uses {$IFDEF FPC} LResources, {$ENDIF}
+     uRORes, Classes, uROClasses,
+     {$IFDEF BDS}DesignIntf,{$ENDIF}
+     {$IFDEF REMOBJECTS_DEPRECATED_BPDX_CLIENTS}
+     uROBPDXTCPChannel, uROBPDXHTTPChannel,
+     {$ENDIF REMOBJECTS_DEPRECATED_BPDX_CLIENTS}
+     uROBPDXHTTPServer, uROBPDXTCPServer;
+
+{$IFNDEF FPC}
+  {$R RemObjects_Bpdx_Glyphs.res}
+{$ENDIF FPC}
+
+procedure Register;
+begin
+  {$IFDEF BDS}
+  ForceDemandLoadState(dlDisable);
+  {$ENDIF}
+  RegisterComponents(str_ProductName,
+    [{$IFDEF REMOBJECTS_DEPRECATED_BPDX_CLIENTS}
+     TROBPDXTCPChannel, TROBPDXHTTPChannel,
+     {$ENDIF REMOBJECTS_DEPRECATED_BPDX_CLIENTS}
+     TROBPDXTCPServer, TROBPDXHTTPServer]);
+end;
+
+{$IFDEF FPC}
+initialization
+  {$I RemObjects_BPDX_Glyphs.lrs}
+{$ENDIF FPC}  
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Bpdx_Glyphs.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Bpdx_Glyphs.res
new file mode 100644
index 0000000..db1f298
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Bpdx_Glyphs.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D10.bdsproj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D10.bdsproj
new file mode 100644
index 0000000..50a863a
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D10.bdsproj	
@@ -0,0 +1,180 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality" Type="String">Delphi.Personality</Option>
+			<Option Name="ProjectType" Type="String"></Option>
+			<Option Name="Version" Type="String">1.0</Option>
+			<Option Name="GUID" Type="String">{99EA5527-0200-455E-815C-646FF77F0ACD}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource" Type="String">RemObjects_Core_D10.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version" Type="String">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A" Type="Integer">8</Compiler>
+			<Compiler Name="B" Type="Integer">0</Compiler>
+			<Compiler Name="C" Type="Integer">1</Compiler>
+			<Compiler Name="D" Type="Integer">1</Compiler>
+			<Compiler Name="E" Type="Integer">0</Compiler>
+			<Compiler Name="F" Type="Integer">0</Compiler>
+			<Compiler Name="G" Type="Integer">1</Compiler>
+			<Compiler Name="H" Type="Integer">1</Compiler>
+			<Compiler Name="I" Type="Integer">1</Compiler>
+			<Compiler Name="J" Type="Integer">0</Compiler>
+			<Compiler Name="K" Type="Integer">0</Compiler>
+			<Compiler Name="L" Type="Integer">1</Compiler>
+			<Compiler Name="M" Type="Integer">0</Compiler>
+			<Compiler Name="N" Type="Integer">1</Compiler>
+			<Compiler Name="O" Type="Integer">1</Compiler>
+			<Compiler Name="P" Type="Integer">1</Compiler>
+			<Compiler Name="Q" Type="Integer">0</Compiler>
+			<Compiler Name="R" Type="Integer">0</Compiler>
+			<Compiler Name="S" Type="Integer">0</Compiler>
+			<Compiler Name="T" Type="Integer">0</Compiler>
+			<Compiler Name="U" Type="Integer">0</Compiler>
+			<Compiler Name="V" Type="Integer">1</Compiler>
+			<Compiler Name="W" Type="Integer">1</Compiler>
+			<Compiler Name="X" Type="Integer">1</Compiler>
+			<Compiler Name="Y" Type="Integer">1</Compiler>
+			<Compiler Name="Z" Type="Integer">1</Compiler>
+			<Compiler Name="ShowHints" Type="Boolean">True</Compiler>
+			<Compiler Name="ShowWarnings" Type="Boolean">True</Compiler>
+			<Compiler Name="UnitAliases" Type="String">WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;</Compiler>
+			<Compiler Name="NamespacePrefix" Type="String"></Compiler>
+			<Compiler Name="GenerateDocumentation" Type="Boolean">False</Compiler>
+			<Compiler Name="DefaultNamespace" Type="String"></Compiler>
+			<Compiler Name="SymbolDeprecated" Type="Boolean">False</Compiler>
+			<Compiler Name="SymbolLibrary" Type="Boolean">False</Compiler>
+			<Compiler Name="SymbolPlatform" Type="Boolean">False</Compiler>
+			<Compiler Name="SymbolExperimental" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitLibrary" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitPlatform" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitDeprecated" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitExperimental" Type="Boolean">False</Compiler>
+			<Compiler Name="HResultCompat" Type="Boolean">True</Compiler>
+			<Compiler Name="HidingMember" Type="Boolean">True</Compiler>
+			<Compiler Name="HiddenVirtual" Type="Boolean">True</Compiler>
+			<Compiler Name="Garbage" Type="Boolean">True</Compiler>
+			<Compiler Name="BoundsError" Type="Boolean">True</Compiler>
+			<Compiler Name="ZeroNilCompat" Type="Boolean">True</Compiler>
+			<Compiler Name="StringConstTruncated" Type="Boolean">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar" Type="Boolean">True</Compiler>
+			<Compiler Name="TypedConstVarPar" Type="Boolean">True</Compiler>
+			<Compiler Name="AsgToTypedConst" Type="Boolean">True</Compiler>
+			<Compiler Name="CaseLabelRange" Type="Boolean">True</Compiler>
+			<Compiler Name="ForVariable" Type="Boolean">True</Compiler>
+			<Compiler Name="ConstructingAbstract" Type="Boolean">True</Compiler>
+			<Compiler Name="ComparisonFalse" Type="Boolean">True</Compiler>
+			<Compiler Name="ComparisonTrue" Type="Boolean">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned" Type="Boolean">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned" Type="Boolean">True</Compiler>
+			<Compiler Name="UnsupportedConstruct" Type="Boolean">True</Compiler>
+			<Compiler Name="FileOpen" Type="Boolean">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc" Type="Boolean">True</Compiler>
+			<Compiler Name="BadGlobalSymbol" Type="Boolean">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor" Type="Boolean">True</Compiler>
+			<Compiler Name="InvalidDirective" Type="Boolean">True</Compiler>
+			<Compiler Name="PackageNoLink" Type="Boolean">True</Compiler>
+			<Compiler Name="PackageThreadVar" Type="Boolean">True</Compiler>
+			<Compiler Name="ImplicitImport" Type="Boolean">True</Compiler>
+			<Compiler Name="HPPEMITIgnored" Type="Boolean">True</Compiler>
+			<Compiler Name="NoRetVal" Type="Boolean">True</Compiler>
+			<Compiler Name="UseBeforeDef" Type="Boolean">True</Compiler>
+			<Compiler Name="ForLoopVarUndef" Type="Boolean">True</Compiler>
+			<Compiler Name="UnitNameMismatch" Type="Boolean">True</Compiler>
+			<Compiler Name="NoCFGFileFound" Type="Boolean">True</Compiler>
+			<Compiler Name="MessageDirective" Type="Boolean">True</Compiler>
+			<Compiler Name="ImplicitVariants" Type="Boolean">True</Compiler>
+			<Compiler Name="UnicodeToLocale" Type="Boolean">True</Compiler>
+			<Compiler Name="LocaleToUnicode" Type="Boolean">True</Compiler>
+			<Compiler Name="ImagebaseMultiple" Type="Boolean">True</Compiler>
+			<Compiler Name="SuspiciousTypecast" Type="Boolean">True</Compiler>
+			<Compiler Name="PrivatePropAccessor" Type="Boolean">True</Compiler>
+			<Compiler Name="UnsafeType" Type="Boolean">False</Compiler>
+			<Compiler Name="UnsafeCode" Type="Boolean">False</Compiler>
+			<Compiler Name="UnsafeCast" Type="Boolean">False</Compiler>
+			<Compiler Name="OptionTruncated" Type="Boolean">True</Compiler>
+			<Compiler Name="WideCharReduced" Type="Boolean">True</Compiler>
+			<Compiler Name="DuplicatesIgnored" Type="Boolean">True</Compiler>
+			<Compiler Name="UnitInitSeq">True</Compiler>
+			<Compiler Name="LocalPInvoke">True</Compiler>
+			<Compiler Name="CodePage"></Compiler>
+		</Compiler>
+		<Linker>
+			<Linker Name="MapFile" Type="Integer">0</Linker>
+			<Linker Name="OutputObjs" Type="Integer">0</Linker>
+			<Linker Name="ConsoleApp" Type="Integer">1</Linker>
+			<Linker Name="DebugInfo" Type="Boolean">False</Linker>
+			<Linker Name="RemoteSymbols" Type="Boolean">False</Linker>
+			<Linker Name="GenerateDRC" Type="Boolean">False</Linker>
+			<Linker Name="MinStackSize" Type="Integer">16384</Linker>
+			<Linker Name="MaxStackSize" Type="Integer">1048576</Linker>
+			<Linker Name="ImageBase" Type="Integer">4194304</Linker>
+			<Linker Name="ExeDescription" Type="String">RemObjects SDK - Core Library</Linker>
+			<Linker Name="GenerateHpps">False</Linker>
+		</Linker>
+		<Directories>
+			<Directories Name="OutputDir" Type="String"></Directories>
+			<Directories Name="UnitOutputDir" Type="String">..\Dcu\D10</Directories>
+			<Directories Name="PackageDLLOutputDir" Type="String">..\Dcu\D10</Directories>
+			<Directories Name="PackageDCPOutputDir" Type="String">..\Dcu\D10</Directories>
+			<Directories Name="SearchPath" Type="String"></Directories>
+			<Directories Name="Packages" Type="String"></Directories>
+			<Directories Name="Conditionals" Type="String">DESIGNTIME</Directories>
+			<Directories Name="DebugSourceDirs" Type="String"></Directories>
+			<Directories Name="UsePackages" Type="Boolean">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams" Type="String"></Parameters>
+			<Parameters Name="HostApplication" Type="String"></Parameters>
+			<Parameters Name="Launcher" Type="String"></Parameters>
+			<Parameters Name="UseLauncher" Type="Boolean">False</Parameters>
+			<Parameters Name="DebugCWD" Type="String"></Parameters>
+			<Parameters Name="RemoteHost" Type="String"></Parameters>
+			<Parameters Name="RemotePath" Type="String"></Parameters>
+			<Parameters Name="RemoteLauncher" Type="String"></Parameters>
+			<Parameters Name="RemoteCWD" Type="String"></Parameters>
+			<Parameters Name="RemoteDebug" Type="Boolean">False</Parameters>
+			<Parameters Name="Debug Symbols Search Path"></Parameters>
+			<Parameters Name="LoadAllSymbols">True</Parameters>
+			<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+		</Parameters>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo" Type="Boolean">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="MajorVer" Type="Integer">4</VersionInfo>
+			<VersionInfo Name="MinorVer" Type="Integer">0</VersionInfo>
+			<VersionInfo Name="Release" Type="Integer">0</VersionInfo>
+			<VersionInfo Name="Build" Type="Integer">404</VersionInfo>
+			<VersionInfo Name="Debug" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="PreRelease" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="Special" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="Private" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="DLL" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="Locale" Type="Integer">1033</VersionInfo>
+			<VersionInfo Name="CodePage" Type="Integer">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName" Type="String">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription" Type="String"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion" Type="String">4.0.0.404</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName" Type="String"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright" Type="String"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks" Type="String"></VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename" Type="String"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName" Type="String">RemObjects SDK</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion" Type="String">1.0.0.0</VersionInfoKeys>
+		</VersionInfoKeys>
+		<Language>
+			<Language Name="ActiveLang" Type="String"></Language>
+			<Language Name="ProjectLang" Type="String">$00000000</Language>
+			<Language Name="RootDir" Type="String"></Language>
+		</Language>
+	</Delphi.Personality>
+	<ModelSupport>True</ModelSupport>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D10.cfg b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D10.cfg
new file mode 100644
index 0000000..5d79656
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D10.cfg	
@@ -0,0 +1,53 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N0"..\Dcu\D10"
+-LE"..\Dcu\D10"
+-LN"..\Dcu\D10"
+-U"..\Dcu\D10"
+-O"..\Dcu\D10"
+-I"..\Dcu\D10"
+-R"..\Dcu\D10"
+-DDESIGNTIME
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-SYMBOL_EXPERIMENTAL
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNIT_EXPERIMENTAL
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D10.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D10.dpk
new file mode 100644
index 0000000..3da608e
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D10.dpk	
@@ -0,0 +1,114 @@
+package RemObjects_Core_D10;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - Core Library'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+{$DEFINE DESIGNTIME}
+{%File 'RemObjects.inc'}
+{%TogetherDiagram 'ModelSupport_RemObjects_Core_D10\default.txaPackage'}
+
+requires
+  vcl,
+  rtl,
+  dbrtl;
+
+contains
+  uROWinMessageChannel in 'uROWinMessageChannel.pas',
+  uROWinMessageServer in 'uROWinMessageServer.pas',
+  uROWinInetHttpChannel in 'uROWinInetHttpChannel.pas',
+  uROZLib in 'Zlib\uROZLib.pas',
+  uRORng in 'RODEC\uRORng.pas',
+  uROCipher1 in 'RODEC\uROCipher1.pas',
+  uROCipher in 'RODEC\uROCipher.pas',
+  uROCiphers in 'RODEC\uROCiphers.pas',
+  uRODECConst in 'RODEC\uRODECConst.pas',
+  uRODECUtil in 'RODEC\uRODECUtil.pas',
+  uROHash in 'RODEC\uROHash.pas',
+  uROHCMngr in 'RODEC\uROHCMngr.pas',
+  uRORFC2289 in 'RODEC\uRORFC2289.pas',
+  uRODLLChannel in 'uRODLLChannel.pas',
+  uRODLLHelpers in 'uRODLLHelpers.pas',
+  uROMSXMLImpl in 'uROMSXMLImpl.pas',
+  uROMSXML2_TLB in 'uROMSXML2_TLB.pas',
+  uROEncryption in 'uROEncryption.pas',
+  uRODLToXML in 'CodeGen\uRODLToXML.pas',
+  uRODLToWSDL in 'CodeGen\uRODLToWSDL.pas',
+  uROSOAPMessage in 'uROSOAPMessage.pas',
+  uROBinMessage in 'uROBinMessage.pas',
+  uRODL in 'uRODL.pas',
+  uROServerIntf in 'uROServerIntf.pas',
+  uROClient in 'uROClient.pas',
+  uROClientIntf in 'uROClientIntf.pas',
+  uRORes in 'uRORes.pas',
+  uROServer in 'uROServer.pas',
+  uROUnicodeConv in 'uROUnicodeConv.pas',
+  uROXDOM_2_3 in 'uROXDOM_2_3.pas',
+  uROTypes in 'uROTypes.pas',
+  RemObjects_Core_Reg in 'RemObjects_Core_Reg.pas',
+  uROSerializer in 'uROSerializer.pas',
+  uROStreamSerializer in 'uROStreamSerializer.pas',
+  uROXMLSerializer in 'uROXMLSerializer.pas',
+  uROHTTPTools in 'uROHTTPTools.pas',
+  uROIdeOnly in 'uROIdeOnly.pas',
+  uROHTTPDispatch in 'uROHTTPDispatch.pas',
+  uROPoweredByRemObjectsButton in 'uROPoweredByRemObjectsButton.pas',
+  uROCompression in 'uROCompression.pas',
+  uROXMLIntf in 'uROXMLIntf.pas',
+  uROOpenXMLImpl in 'uROOpenXMLImpl.pas',
+  uROClasses in 'uROClasses.pas',
+  uROClassFactories in 'uROClassFactories.pas',
+  uRORemoteDataModule in 'uRORemoteDataModule.pas',
+  uROAsync in 'uROAsync.pas',
+  uROThread in 'uROThread.pas',
+  uROSessions in 'uROSessions.pas',
+  uRORemoteService in 'uRORemoteService.pas',
+  uROBinaryHelpers in 'uROBinaryHelpers.pas',
+  uROPleaseWaitForm in 'uROPleaseWaitForm.pas' {PleaseWaitForm},
+  uRONamedPipeServer in 'uRONamedPipeServer.pas',
+  uRONamedPipeChannel in 'uRONamedPipeChannel.pas',
+  uRODBSessionManager in 'uRODBSessionManager.pas',
+  uRODynamicRequest in 'uRODynamicRequest.pas',
+  uROEventRepository in 'uROEventRepository.pas',
+  uROMasterServerEventRepository in 'uROMasterServerEventRepository.pas',
+  ROMasterServerLibrary_Intf in 'ROMasterServerLibrary_Intf.pas',
+  uROMasterServerSessionManager in 'uROMasterServerSessionManager.pas',
+  uROPostMessage in 'uROPostMessage.pas',
+  uROComboService in 'uROComboService.pas',
+  uROLocalChannel in 'uROLocalChannel.pas',
+  uROLocalServer in 'uROLocalServer.pas',
+  uROHtmlServerInfo in 'uROHtmlServerInfo.pas',
+  uROXmlRpcMessage in 'uROXmlRpcMessage.pas',
+  uROThreadPool in 'uROThreadPool.pas',
+  uIPHttpHeaders in 'uIPHttpHeaders.pas',
+  uROBaseSuperHttpServer in 'uROBaseSuperHttpServer.pas',
+  uROBaseSuperHttpChannel in 'uROBaseSuperHttpChannel.pas',
+  uROServerMultiMessage in 'uROServerMultiMessage.pas',
+  uROAsyncSCHelpers in 'uROAsyncSCHelpers.pas',
+  uROAsyncSuperTcpServer in 'uROAsyncSuperTcpServer.pas',
+  uROEncryptionEnvelope in 'uROEncryptionEnvelope.pas',
+  uRODBEventRepository in 'uRODBEventRepository.pas',
+  uROJSONParser in 'uROJSONParser.pas',
+  uROJSONMessage in 'uROJSONMessage.pas';
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D10.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D10.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D10.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D11.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D11.dpk
new file mode 100644
index 0000000..d51c59f
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D11.dpk	
@@ -0,0 +1,113 @@
+package RemObjects_Core_D11;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - Core Library'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+{$DEFINE DESIGNTIME}
+
+requires
+  vcl,
+  rtl,
+  dbrtl;
+
+contains
+  uROWinMessageChannel in 'uROWinMessageChannel.pas',
+  uROWinMessageServer in 'uROWinMessageServer.pas',
+  uROWinInetHttpChannel in 'uROWinInetHttpChannel.pas',
+  uROZLib in 'Zlib\uROZLib.pas',
+  uRORng in 'RODEC\uRORng.pas',
+  uROCipher1 in 'RODEC\uROCipher1.pas',
+  uROCipher in 'RODEC\uROCipher.pas',
+  uROCiphers in 'RODEC\uROCiphers.pas',
+  uRODECConst in 'RODEC\uRODECConst.pas',
+  uRODECUtil in 'RODEC\uRODECUtil.pas',
+  uROHash in 'RODEC\uROHash.pas',
+  uROHCMngr in 'RODEC\uROHCMngr.pas',
+  uRORFC2289 in 'RODEC\uRORFC2289.pas',
+  uRODLLChannel in 'uRODLLChannel.pas',
+  uRODLLHelpers in 'uRODLLHelpers.pas',
+  uROMSXMLImpl in 'uROMSXMLImpl.pas',
+  uROMSXML2_TLB in 'uROMSXML2_TLB.pas',
+  uROEncryption in 'uROEncryption.pas',
+  uRODLToXML in 'CodeGen\uRODLToXML.pas',
+  uRODLToWSDL in 'CodeGen\uRODLToWSDL.pas',
+  uROSOAPMessage in 'uROSOAPMessage.pas',
+  uROBinMessage in 'uROBinMessage.pas',
+  uRODL in 'uRODL.pas',
+  uROServerIntf in 'uROServerIntf.pas',
+  uROClient in 'uROClient.pas',
+  uROClientIntf in 'uROClientIntf.pas',
+  uRORes in 'uRORes.pas',
+  uROServer in 'uROServer.pas',
+  uROUnicodeConv in 'uROUnicodeConv.pas',
+  uROXDOM_2_3 in 'uROXDOM_2_3.pas',
+  uROTypes in 'uROTypes.pas',
+  RemObjects_Core_Reg in 'RemObjects_Core_Reg.pas',
+  uROSerializer in 'uROSerializer.pas',
+  uROStreamSerializer in 'uROStreamSerializer.pas',
+  uROXMLSerializer in 'uROXMLSerializer.pas',
+  uROHTTPTools in 'uROHTTPTools.pas',
+  uROIdeOnly in 'uROIdeOnly.pas',
+  uROHTTPDispatch in 'uROHTTPDispatch.pas',
+  uROPoweredByRemObjectsButton in 'uROPoweredByRemObjectsButton.pas',
+  uROCompression in 'uROCompression.pas',
+  uROXMLIntf in 'uROXMLIntf.pas',
+  uROOpenXMLImpl in 'uROOpenXMLImpl.pas',
+  uROClasses in 'uROClasses.pas',
+  uROClassFactories in 'uROClassFactories.pas',
+  uRORemoteDataModule in 'uRORemoteDataModule.pas',
+  uROAsync in 'uROAsync.pas',
+  uROThread in 'uROThread.pas',
+  uROSessions in 'uROSessions.pas',
+  uRORemoteService in 'uRORemoteService.pas',
+  uROBinaryHelpers in 'uROBinaryHelpers.pas',
+  uROPleaseWaitForm in 'uROPleaseWaitForm.pas' {PleaseWaitForm},
+  uRONamedPipeServer in 'uRONamedPipeServer.pas',
+  uRONamedPipeChannel in 'uRONamedPipeChannel.pas',
+  uRODBSessionManager in 'uRODBSessionManager.pas',
+  uRODynamicRequest in 'uRODynamicRequest.pas',
+  uROEventRepository in 'uROEventRepository.pas',
+  uROMasterServerEventRepository in 'uROMasterServerEventRepository.pas',
+  ROMasterServerLibrary_Intf in 'ROMasterServerLibrary_Intf.pas',
+  uROMasterServerSessionManager in 'uROMasterServerSessionManager.pas',
+  uROPostMessage in 'uROPostMessage.pas',
+  uROComboService in 'uROComboService.pas',
+  uROLocalChannel in 'uROLocalChannel.pas',
+  uROLocalServer in 'uROLocalServer.pas',
+  uROHtmlServerInfo in 'uROHtmlServerInfo.pas',
+  uROXmlRpcMessage in 'uROXmlRpcMessage.pas',
+  uROThreadPool in 'uROThreadPool.pas',
+  uIPHttpHeaders in 'uIPHttpHeaders.pas',
+  uROBaseSuperHttpServer in 'uROBaseSuperHttpServer.pas',
+  uROBaseSuperHttpChannel in 'uROBaseSuperHttpChannel.pas',
+  uROServerMultiMessage in 'uROServerMultiMessage.pas',
+  uROAsyncSCHelpers in 'uROAsyncSCHelpers.pas',
+  uROAsyncSuperTcpServer in 'uROAsyncSuperTcpServer.pas',
+  uROEncryptionEnvelope in 'uROEncryptionEnvelope.pas',
+  uRODBEventRepository in 'uRODBEventRepository.pas',
+  uROJSONParser in 'uROJSONParser.pas',
+  uROJSONMessage in 'uROJSONMessage.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D11.dproj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D11.dproj
new file mode 100644
index 0000000..444581f
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D11.dproj	
@@ -0,0 +1,392 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{698068b8-4884-426d-a991-66d8c3907ce0}</ProjectGuid>
+    <MainSource>RemObjects_Core_D11.dpk</MainSource>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+    <DCC_DependencyCheckOutputName>..\Dcu\D11\RemObjects_Core_D11.bpl</DCC_DependencyCheckOutputName>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DebugInformation>False</DCC_DebugInformation>
+    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+    <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+    <DCC_DcuOutput>..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\Dcu\D11</DCC_DcpOutput>
+    <DCC_Define>DESIGNTIME;RELEASE</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_SYMBOL_EXPERIMENTAL>False</DCC_SYMBOL_EXPERIMENTAL>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+    <DCC_UNIT_EXPERIMENTAL>False</DCC_UNIT_EXPERIMENTAL>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+    <DCC_DcuOutput>..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\Dcu\D11</DCC_DcpOutput>
+    <DCC_Define>DESIGNTIME</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_SYMBOL_EXPERIMENTAL>False</DCC_SYMBOL_EXPERIMENTAL>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+    <DCC_UNIT_EXPERIMENTAL>False</DCC_UNIT_EXPERIMENTAL>
+  </PropertyGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Delphi.Personality</Borland.Personality>
+    <Borland.ProjectType>Package</Borland.ProjectType>
+    <BorlandProject>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">RemObjects SDK - Core Library</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">True</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">4</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">404</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">4.0.0.404</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">RemObjects_Core_D11.dpk</Source></Source>  <Excluded_Packages>
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      
+      <Excluded_Packages Name="C:\Program Files (x86)\RemObjects Software\RemObjects SDK for Delphi\Dcu\D10\RemObjects_RODX_D10.bpl">RemObjects SDK - RODXSock Library</Excluded_Packages>
+      <Excluded_Packages Name="C:\Program Files (x86)\RemObjects Software\RemObjects SDK for Delphi\Dcu\D10\RemObjects_BPDX_D10.bpl">RemObjects SDK - BPDX Library</Excluded_Packages>
+      <Excluded_Packages Name="C:\Program Files (x86)\RemObjects Software\RemObjects SDK for Delphi\Dcu\D10\RemObjects_Core_D10.bpl">RemObjects SDK - Core Library</Excluded_Packages>
+      <Excluded_Packages Name="C:\Program Files (x86)\RemObjects Software\Pascal Script for Delphi\Dcu\D10\PascalScript_Core_D10.bpl">RemObjects Pascal Script - Core Package</Excluded_Packages>
+      <Excluded_Packages Name="C:\Program Files (x86)\RemObjects Software\RemObjects SDK for Delphi\Dcu\D10\RemObjects_WebBroker_D10.bpl">RemObjects SDK - WebBroker Library</Excluded_Packages>
+      <Excluded_Packages Name="C:\Program Files (x86)\RemObjects Software\Data Abstract for Delphi\Dcu\D10\DataAbstract_Core_D10.bpl">RemObjects Data Abstract - Core Library</Excluded_Packages>
+      <Excluded_Packages Name="C:\Program Files (x86)\RemObjects Software\Data Abstract for Delphi\Dcu\D10\DataAbstract_IBXDriver_D10.bpl">RemObjects Data Abstract - InterBase Express Driver</Excluded_Packages>
+      <Excluded_Packages Name="C:\Program Files (x86)\RemObjects Software\Data Abstract for Delphi\Dcu\D10\DataAbstract_ADODriver_D10.bpl">RemObjects Data Abstract - ADOExpress/dbGo Driver</Excluded_Packages>
+      <Excluded_Packages Name="C:\Program Files (x86)\RemObjects Software\Data Abstract for Delphi\Dcu\D10\DataAbstract_Scripting_D10.bpl">RemObjects Data Abstract - Scripting Integration Library</Excluded_Packages>
+      <Excluded_Packages Name="C:\Program Files (x86)\RemObjects Software\Data Abstract for Delphi\Dcu\D10\DataAbstract_DBXDriver_D10B.bpl">RemObjects Data Abstract - dbExpress Driver</Excluded_Packages>
+      <Excluded_Packages Name="C:\Program Files (x86)\RemObjects Software\Data Abstract for Delphi\Dcu\D10\DataAbstract_BDEDriver_D10.bpl">RemObjects Data Abstract - BDE Driver</Excluded_Packages>
+      <Excluded_Packages Name="C:\Program Files (x86)\RemObjects Software\Data Abstract for Delphi\Dcu\D10\DataAbstract_SQLiteDriver_D10.bpl">RemObjects Data Abstract - SQLite Driver</Excluded_Packages>
+      <Excluded_Packages Name="C:\Program Files (x86)\RemObjects Software\RemObjects SDK for Delphi\Dcu\D10\RemObjects_Synapse_D10.bpl">RemObjects SDK - Synapse based Channels</Excluded_Packages>
+      <Excluded_Packages Name="C:\Program Files (x86)\RemObjects Software\RemObjects SDK for Delphi\Dcu\D10\RemObjects_DataSnap_D10.bpl">RemObjects SDK - DataSnap Integration Pack</Excluded_Packages>
+      <Excluded_Packages Name="C:\Program Files (x86)\RemObjects Software\Everwood\Bin\RemObjects_Everwood_D10.bpl">RemObjects Everwood for Delphi</Excluded_Packages>
+      <Excluded_Packages Name="C:\Program Files (x86)\RemObjects Software\RemObjects SDK for Delphi\Dcu\D10\RemObjects_Indy_D10.bpl">RemObjects SDK - Indy Library</Excluded_Packages>
+      <Excluded_Packages Name="C:\Program Files (x86)\RemObjects Software\RemObjects SDK for Delphi\Dcu\D10\RemObjects_IDE_D10.bpl">RemObjects SDK - IDE Integration for Win32</Excluded_Packages>
+      <Excluded_Packages Name="C:\Program Files (x86)\RemObjects Software\Data Abstract for Delphi\Dcu\D10\DataAbstract_IDE_D10.bpl">RemObjects Data Abstract - IDE Package</Excluded_Packages>
+      <Excluded_Packages Name="C:\Program Files (x86)\RemObjects Software\Data Abstract for Delphi\Dcu\D10\DataAbstract_DBISAMDriver_D10.bpl">RemObjects Data Abstract - DBISAM Driver</Excluded_Packages>
+      <Excluded_Packages Name="$(BDS)\bin\dclbde100.bpl">CodeGear BDE DB Components</Excluded_Packages>
+      <Excluded_Packages Name="$(BDS)\bin\bcboffice2k100.bpl">CodeGear C++Builder Office 2000 Servers Package</Excluded_Packages>
+      <Excluded_Packages Name="$(BDS)\bin\bcbofficexp100.bpl">CodeGear C++Builder Office XP Servers Package</Excluded_Packages>
+      <Excluded_Packages Name="$(BDS)\bin\dcloffice2k100.bpl">Microsoft Office 2000 Sample Automation Server Wrapper Components</Excluded_Packages>
+      <Excluded_Packages Name="$(BDS)\bin\dclofficexp100.bpl">Microsoft Office XP Sample Automation Server Wrapper Components</Excluded_Packages>
+      <Excluded_Packages Name="C:\Program Files (x86)\RemObjects Software\Pascal Script for Delphi\Dcu\D10\PascalScript_RO_D10.bpl">RemObjects Pascal Script - Core Package</Excluded_Packages>
+    </Excluded_Packages>
+  </Delphi.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
+  <ItemGroup>
+    <DelphiCompile Include="RemObjects_Core_D11.dpk">
+      <MainSource>MainSource</MainSource>
+    </DelphiCompile>
+    <DCCReference Include="CodeGen\uRODLToWSDL.pas" />
+    <DCCReference Include="CodeGen\uRODLToXML.pas" />
+    <DCCReference Include="dbrtl.dcp" />
+    <DCCReference Include="RemObjects_Core_Reg.pas" />
+    <DCCReference Include="RODEC\uROCipher.pas" />
+    <DCCReference Include="RODEC\uROCipher1.pas" />
+    <DCCReference Include="RODEC\uROCiphers.pas" />
+    <DCCReference Include="RODEC\uRODECConst.pas" />
+    <DCCReference Include="RODEC\uRODECUtil.pas" />
+    <DCCReference Include="RODEC\uROHash.pas" />
+    <DCCReference Include="RODEC\uROHCMngr.pas" />
+    <DCCReference Include="RODEC\uRORFC2289.pas" />
+    <DCCReference Include="RODEC\uRORng.pas" />
+    <DCCReference Include="ROMasterServerLibrary_Intf.pas" />
+    <DCCReference Include="rtl.dcp" />
+    <DCCReference Include="uIPHttpHeaders.pas" />
+    <DCCReference Include="uROAsync.pas" />
+    <DCCReference Include="uROBaseSuperHttpChannel.pas" />
+    <DCCReference Include="uROBaseSuperHttpServer.pas" />
+    <DCCReference Include="uROBinaryHelpers.pas" />
+    <DCCReference Include="uROBinMessage.pas" />
+    <DCCReference Include="uROClasses.pas" />
+    <DCCReference Include="uROClassFactories.pas" />
+    <DCCReference Include="uROClient.pas" />
+    <DCCReference Include="uROClientIntf.pas" />
+    <DCCReference Include="uROComboService.pas" />
+    <DCCReference Include="uROCompression.pas" />
+    <DCCReference Include="uRODBSessionManager.pas" />
+    <DCCReference Include="uRODL.pas" />
+    <DCCReference Include="uRODLLChannel.pas" />
+    <DCCReference Include="uRODLLHelpers.pas" />
+    <DCCReference Include="uRODLLServer.pas" />
+    <DCCReference Include="uRODynamicRequest.pas" />
+    <DCCReference Include="uROEncryption.pas" />
+    <DCCReference Include="uROEventRepository.pas" />
+    <DCCReference Include="uROHtmlServerInfo.pas" />
+    <DCCReference Include="uROHTTPDispatch.pas" />
+    <DCCReference Include="uROHTTPTools.pas" />
+    <DCCReference Include="uROIdeOnly.pas" />
+    <DCCReference Include="uROLocalChannel.pas" />
+    <DCCReference Include="uROLocalServer.pas" />
+    <DCCReference Include="uROMasterServerEventRepository.pas" />
+    <DCCReference Include="uROMasterServerSessionManager.pas" />
+    <DCCReference Include="uROMSXML2_TLB.pas" />
+    <DCCReference Include="uROMSXMLImpl.pas" />
+    <DCCReference Include="uRONamedPipeChannel.pas" />
+    <DCCReference Include="uRONamedPipeServer.pas" />
+    <DCCReference Include="uROOpenXMLImpl.pas" />
+    <DCCReference Include="uROPleaseWaitForm.pas">
+      <Form>PleaseWaitForm</Form>
+    </DCCReference>
+    <DCCReference Include="uROPostMessage.pas" />
+    <DCCReference Include="uROPoweredByRemObjectsButton.pas" />
+    <DCCReference Include="uRORemoteDataModule.pas" />
+    <DCCReference Include="uRORemoteService.pas" />
+    <DCCReference Include="uRORes.pas" />
+    <DCCReference Include="uROSerializer.pas" />
+    <DCCReference Include="uROServer.pas" />
+    <DCCReference Include="uROServerIntf.pas" />
+    <DCCReference Include="uROServerMultiMessage.pas" />
+    <DCCReference Include="uROSessions.pas" />
+    <DCCReference Include="uROSOAPMessage.pas" />
+    <DCCReference Include="uROStreamSerializer.pas" />
+    <DCCReference Include="uROThread.pas" />
+    <DCCReference Include="uROThreadPool.pas" />
+    <DCCReference Include="uROTypes.pas" />
+    <DCCReference Include="uROUnicodeConv.pas" />
+    <DCCReference Include="uROWinInetHttpChannel.pas" />
+    <DCCReference Include="uROWinMessageChannel.pas" />
+    <DCCReference Include="uROWinMessageServer.pas" />
+    <DCCReference Include="uROXDOM_2_3.pas" />
+    <DCCReference Include="uROXMLIntf.pas" />
+    <DCCReference Include="uROXmlRpcMessage.pas" />
+    <DCCReference Include="uROXMLSerializer.pas" />
+    <DCCReference Include="vcl.dcp" />
+    <DCCReference Include="Zlib\uROZLib.pas" />
+    <None Include="ModelSupport_RemObjects_Core_D10\default.txaPackage" />
+    <None Include="RemObjects.inc" />
+  </ItemGroup>
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D11.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D11.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D11.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D12.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D12.dpk
new file mode 100644
index 0000000..57ed431
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D12.dpk	
@@ -0,0 +1,113 @@
+package RemObjects_Core_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - Core Library'}
+{$IMPLICITBUILD OFF}
+{$DEFINE DESIGNTIME}
+
+requires
+  rtl,
+  vcl,
+  dbrtl;
+
+contains
+  uROWinMessageChannel in 'uROWinMessageChannel.pas',
+  uROWinMessageServer in 'uROWinMessageServer.pas',
+  uROWinInetHttpChannel in 'uROWinInetHttpChannel.pas',
+  uROZLib in 'Zlib\uROZLib.pas',
+  uRORng in 'RODEC\uRORng.pas',
+  uROCipher1 in 'RODEC\uROCipher1.pas',
+  uROCipher in 'RODEC\uROCipher.pas',
+  uROCiphers in 'RODEC\uROCiphers.pas',
+  uRODECConst in 'RODEC\uRODECConst.pas',
+  uRODECUtil in 'RODEC\uRODECUtil.pas',
+  uROHash in 'RODEC\uROHash.pas',
+  uROHCMngr in 'RODEC\uROHCMngr.pas',
+  uRORFC2289 in 'RODEC\uRORFC2289.pas',
+  uRODLLChannel in 'uRODLLChannel.pas',
+  uRODLLHelpers in 'uRODLLHelpers.pas',
+  uROMSXMLImpl in 'uROMSXMLImpl.pas',
+  uROMSXML2_TLB in 'uROMSXML2_TLB.pas',
+  uROEncryption in 'uROEncryption.pas',
+  uRODLToXML in 'CodeGen\uRODLToXML.pas',
+  uRODLToWSDL in 'CodeGen\uRODLToWSDL.pas',
+  uROSOAPMessage in 'uROSOAPMessage.pas',
+  uROBinMessage in 'uROBinMessage.pas',
+  uRODL in 'uRODL.pas',
+  uROServerIntf in 'uROServerIntf.pas',
+  uROClient in 'uROClient.pas',
+  uROClientIntf in 'uROClientIntf.pas',
+  uRORes in 'uRORes.pas',
+  uROServer in 'uROServer.pas',
+  uROUnicodeConv in 'uROUnicodeConv.pas',
+  uROXDOM_2_3 in 'uROXDOM_2_3.pas',
+  uROTypes in 'uROTypes.pas',
+  RemObjects_Core_Reg in 'RemObjects_Core_Reg.pas',
+  uROSerializer in 'uROSerializer.pas',
+  uROStreamSerializer in 'uROStreamSerializer.pas',
+  uROXMLSerializer in 'uROXMLSerializer.pas',
+  uROHTTPTools in 'uROHTTPTools.pas',
+  uROIdeOnly in 'uROIdeOnly.pas',
+  uROHTTPDispatch in 'uROHTTPDispatch.pas',
+  uROPoweredByRemObjectsButton in 'uROPoweredByRemObjectsButton.pas',
+  uROCompression in 'uROCompression.pas',
+  uROXMLIntf in 'uROXMLIntf.pas',
+  uROOpenXMLImpl in 'uROOpenXMLImpl.pas',
+  uROClasses in 'uROClasses.pas',
+  uROClassFactories in 'uROClassFactories.pas',
+  uRORemoteDataModule in 'uRORemoteDataModule.pas',
+  uROAsync in 'uROAsync.pas',
+  uROThread in 'uROThread.pas',
+  uROSessions in 'uROSessions.pas',
+  uRORemoteService in 'uRORemoteService.pas',
+  uROBinaryHelpers in 'uROBinaryHelpers.pas',
+  uROPleaseWaitForm in 'uROPleaseWaitForm.pas' {PleaseWaitForm},
+  uRONamedPipeServer in 'uRONamedPipeServer.pas',
+  uRONamedPipeChannel in 'uRONamedPipeChannel.pas',
+  uRODBSessionManager in 'uRODBSessionManager.pas',
+  uRODynamicRequest in 'uRODynamicRequest.pas',
+  uROEventRepository in 'uROEventRepository.pas',
+  uROMasterServerEventRepository in 'uROMasterServerEventRepository.pas',
+  ROMasterServerLibrary_Intf in 'ROMasterServerLibrary_Intf.pas',
+  uROMasterServerSessionManager in 'uROMasterServerSessionManager.pas',
+  uROPostMessage in 'uROPostMessage.pas',
+  uROComboService in 'uROComboService.pas',
+  uROLocalChannel in 'uROLocalChannel.pas',
+  uROLocalServer in 'uROLocalServer.pas',
+  uROHtmlServerInfo in 'uROHtmlServerInfo.pas',
+  uROXmlRpcMessage in 'uROXmlRpcMessage.pas',
+  uROThreadPool in 'uROThreadPool.pas',
+  uIPHttpHeaders in 'uIPHttpHeaders.pas',
+  uROBaseSuperHttpServer in 'uROBaseSuperHttpServer.pas',
+  uROBaseSuperHttpChannel in 'uROBaseSuperHttpChannel.pas',
+  uROServerMultiMessage in 'uROServerMultiMessage.pas',
+  uROAsyncSCHelpers in 'uROAsyncSCHelpers.pas',
+  uROAsyncSuperTcpServer in 'uROAsyncSuperTcpServer.pas',
+  uROEncryptionEnvelope in 'uROEncryptionEnvelope.pas',
+  uRODBEventRepository in 'uRODBEventRepository.pas',
+  uROJSONParser in 'uROJSONParser.pas',
+  uROJSONMessage in 'uROJSONMessage.pas',
+  uROCOMInit in 'uROCOMInit.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D12.dproj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D12.dproj
new file mode 100644
index 0000000..a24203b
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D12.dproj	
@@ -0,0 +1,265 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{698068b8-4884-426d-a991-66d8c3907ce0}</ProjectGuid>
+			<MainSource>RemObjects_Core_D12.dpk</MainSource>
+			<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+			<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+			<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+			<DCC_DependencyCheckOutputName>..\Dcu\D12\RemObjects_Core_D12.bpl</DCC_DependencyCheckOutputName>
+			<ProjectVersion>11.1</ProjectVersion>
+			<Config Condition="'$(Config)'==''">Base</Config>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base)'!=''">
+			<DCC_SymbolReferenceInfo>1</DCC_SymbolReferenceInfo>
+			<DCC_IMPLICIT_STRING_CAST>error</DCC_IMPLICIT_STRING_CAST>
+			<DCC_IMPLICIT_STRING_CAST_LOSS>error</DCC_IMPLICIT_STRING_CAST_LOSS>
+			<DCC_EXPLICIT_STRING_CAST_LOSS>error</DCC_EXPLICIT_STRING_CAST_LOSS>
+			<DCC_EXPLICIT_STRING_CAST>error</DCC_EXPLICIT_STRING_CAST>
+			<DCC_CVT_ACHAR_TO_WCHAR>error</DCC_CVT_ACHAR_TO_WCHAR>
+			<DCC_CVT_WCHAR_TO_ACHAR>error</DCC_CVT_WCHAR_TO_ACHAR>
+			<DCC_CVT_WIDENING_STRING_LOST>error</DCC_CVT_WIDENING_STRING_LOST>
+			<DCC_CVT_NARROWING_STRING_LOST>error</DCC_CVT_NARROWING_STRING_LOST>
+			<GenDll>true</GenDll>
+			<DCC_DcpOutput>..\Dcu\D12</DCC_DcpOutput>
+			<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+			<DCC_DcuOutput>..\Dcu\D12</DCC_DcuOutput>
+			<GenPackage>true</GenPackage>
+			<DCC_GenerateStackFrames>true</DCC_GenerateStackFrames>
+			<DesignOnlyPackage>false</DesignOnlyPackage>
+			<DCC_ImageBase>00400000</DCC_ImageBase>
+			<DCC_DependencyCheckOutputName>..\Dcu\D12\RemObjects_Core_D12.bpl</DCC_DependencyCheckOutputName>
+			<DCC_UnitSearchPath>..\Dcu\D12;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+			<DCC_Description>RemObjects SDK - Core Library</DCC_Description>
+			<DCC_Define>DESIGNTIME;$(DCC_Define)</DCC_Define>
+			<DCC_BplOutput>..\Dcu\D12</DCC_BplOutput>
+		</PropertyGroup>
+		<ItemGroup>
+			<DelphiCompile Include="RemObjects_Core_D12.dpk">
+				<MainSource>MainSource</MainSource>
+			</DelphiCompile>
+			<DCCReference Include="rtl.dcp"/>
+			<DCCReference Include="vcl.dcp"/>
+			<DCCReference Include="dbrtl.dcp"/>
+			<DCCReference Include="uROWinMessageChannel.pas"/>
+			<DCCReference Include="uROWinMessageServer.pas"/>
+			<DCCReference Include="uROWinInetHttpChannel.pas"/>
+			<DCCReference Include="Zlib\uROZLib.pas"/>
+			<DCCReference Include="RODEC\uRORng.pas"/>
+			<DCCReference Include="RODEC\uROCipher1.pas"/>
+			<DCCReference Include="RODEC\uROCipher.pas"/>
+			<DCCReference Include="RODEC\uROCiphers.pas"/>
+			<DCCReference Include="RODEC\uRODECConst.pas"/>
+			<DCCReference Include="RODEC\uRODECUtil.pas"/>
+			<DCCReference Include="RODEC\uROHash.pas"/>
+			<DCCReference Include="RODEC\uROHCMngr.pas"/>
+			<DCCReference Include="RODEC\uRORFC2289.pas"/>
+			<DCCReference Include="uRODLLChannel.pas"/>
+			<DCCReference Include="uRODLLHelpers.pas"/>
+			<DCCReference Include="uROMSXMLImpl.pas"/>
+			<DCCReference Include="uROMSXML2_TLB.pas"/>
+			<DCCReference Include="uROEncryption.pas"/>
+			<DCCReference Include="CodeGen\uRODLToXML.pas"/>
+			<DCCReference Include="CodeGen\uRODLToWSDL.pas"/>
+			<DCCReference Include="uROSOAPMessage.pas"/>
+			<DCCReference Include="uROBinMessage.pas"/>
+			<DCCReference Include="uRODL.pas"/>
+			<DCCReference Include="uROServerIntf.pas"/>
+			<DCCReference Include="uROClient.pas"/>
+			<DCCReference Include="uROClientIntf.pas"/>
+			<DCCReference Include="uRORes.pas"/>
+			<DCCReference Include="uROServer.pas"/>
+			<DCCReference Include="uROUnicodeConv.pas"/>
+			<DCCReference Include="uROXDOM_2_3.pas"/>
+			<DCCReference Include="uROTypes.pas"/>
+			<DCCReference Include="RemObjects_Core_Reg.pas"/>
+			<DCCReference Include="uROSerializer.pas"/>
+			<DCCReference Include="uROStreamSerializer.pas"/>
+			<DCCReference Include="uROXMLSerializer.pas"/>
+			<DCCReference Include="uROHTTPTools.pas"/>
+			<DCCReference Include="uROIdeOnly.pas"/>
+			<DCCReference Include="uROHTTPDispatch.pas"/>
+			<DCCReference Include="uROPoweredByRemObjectsButton.pas"/>
+			<DCCReference Include="uROCompression.pas"/>
+			<DCCReference Include="uROXMLIntf.pas"/>
+			<DCCReference Include="uROOpenXMLImpl.pas"/>
+			<DCCReference Include="uROClasses.pas"/>
+			<DCCReference Include="uROClassFactories.pas"/>
+			<DCCReference Include="uRORemoteDataModule.pas"/>
+			<DCCReference Include="uROAsync.pas"/>
+			<DCCReference Include="uROThread.pas"/>
+			<DCCReference Include="uROSessions.pas"/>
+			<DCCReference Include="uRORemoteService.pas"/>
+			<DCCReference Include="uROBinaryHelpers.pas"/>
+			<DCCReference Include="uROPleaseWaitForm.pas">
+				<Form>PleaseWaitForm</Form>
+			</DCCReference>
+			<DCCReference Include="uRONamedPipeServer.pas"/>
+			<DCCReference Include="uRONamedPipeChannel.pas"/>
+			<DCCReference Include="uRODBSessionManager.pas"/>
+			<DCCReference Include="uRODynamicRequest.pas"/>
+			<DCCReference Include="uROEventRepository.pas"/>
+			<DCCReference Include="uROMasterServerEventRepository.pas"/>
+			<DCCReference Include="ROMasterServerLibrary_Intf.pas"/>
+			<DCCReference Include="uROMasterServerSessionManager.pas"/>
+			<DCCReference Include="uROPostMessage.pas"/>
+			<DCCReference Include="uROComboService.pas"/>
+			<DCCReference Include="uROLocalChannel.pas"/>
+			<DCCReference Include="uROLocalServer.pas"/>
+			<DCCReference Include="uROHtmlServerInfo.pas"/>
+			<DCCReference Include="uROXmlRpcMessage.pas"/>
+			<DCCReference Include="uROThreadPool.pas"/>
+			<DCCReference Include="uIPHttpHeaders.pas"/>
+			<DCCReference Include="uROBaseSuperHttpServer.pas"/>
+			<DCCReference Include="uROBaseSuperHttpChannel.pas"/>
+			<DCCReference Include="uROServerMultiMessage.pas"/>
+			<DCCReference Include="uROAsyncSCHelpers.pas"/>
+			<DCCReference Include="uROAsyncSuperTcpServer.pas"/>
+			<DCCReference Include="uROEncryptionEnvelope.pas"/>
+			<DCCReference Include="uRODBEventRepository.pas"/>
+			<DCCReference Include="uROJSONParser.pas"/>
+			<DCCReference Include="uROJSONMessage.pas"/>
+			<DCCReference Include="uROCOMInit.pas"/>
+			<None Include="RemObjects.inc">
+				<ContainerId>File</ContainerId>
+			</None>
+			<BuildConfiguration Include="Base">
+				<Key>Base</Key>
+			</BuildConfiguration>
+		</ItemGroup>
+		<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+		<ProjectExtensions>
+			<Borland.Personality>Delphi.Personality.12</Borland.Personality>
+			<Borland.ProjectType>Package</Borland.ProjectType>
+			<BorlandProject>
+				<Delphi.Personality>
+					<Parameters>
+						<Parameters Name="UseLauncher">False</Parameters>
+						<Parameters Name="LoadAllSymbols">True</Parameters>
+						<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+					</Parameters>
+					<VersionInfo>
+						<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+						<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+						<VersionInfo Name="MajorVer">5</VersionInfo>
+						<VersionInfo Name="MinorVer">0</VersionInfo>
+						<VersionInfo Name="Release">35</VersionInfo>
+						<VersionInfo Name="Build">741</VersionInfo>
+						<VersionInfo Name="Debug">False</VersionInfo>
+						<VersionInfo Name="PreRelease">False</VersionInfo>
+						<VersionInfo Name="Special">False</VersionInfo>
+						<VersionInfo Name="Private">False</VersionInfo>
+						<VersionInfo Name="DLL">False</VersionInfo>
+						<VersionInfo Name="Locale">1033</VersionInfo>
+						<VersionInfo Name="CodePage">1252</VersionInfo>
+					</VersionInfo>
+					<VersionInfoKeys>
+						<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="FileDescription"/>
+						<VersionInfoKeys Name="FileVersion">5.0.35.741</VersionInfoKeys>
+						<VersionInfoKeys Name="InternalName"/>
+						<VersionInfoKeys Name="LegalCopyright"/>
+						<VersionInfoKeys Name="LegalTrademarks"/>
+						<VersionInfoKeys Name="OriginalFilename"/>
+						<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+						<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+					</VersionInfoKeys>
+					<Source>
+						<Source Name="MainSource">RemObjects_Core_D12.dpk</Source>
+					</Source>
+					<Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dclcxLibraryD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dclcxLibraryD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dcldxmdsD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dcldxmdsD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dcldxDockingD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dcldxDockingD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dclcxEditorsD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dclcxEditorsD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dclcxExtEditorsD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dclcxExtEditorsD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxLayoutControlcxEditAdaptersD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxLayoutControlcxEditAdaptersD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dcldxLayoutControlD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dcldxLayoutControlD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dcldxSBD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dcldxSBD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dclcxPageControlD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dclcxPageControlD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dcldxNavBarD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dcldxNavBarD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dclcxGridD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dclcxGridD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dclcxPivotGridD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dclcxPivotGridD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dclcxPivotGridChartD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dclcxPivotGridChartD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dclcxPivotGridOLAPD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dclcxPivotGridOLAPD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dclcxSchedulerD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dclcxSchedulerD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dclcxSchedulerGridD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dclcxSchedulerGridD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dcldxFlowChartD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dcldxFlowChartD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dcldxOrgCD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dcldxOrgCD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dcldxDBOrD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dcldxDBOrD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dclcxVerticalGridD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dclcxVerticalGridD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dclcxSpreadSheetD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dclcxSpreadSheetD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dcldxBarD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dcldxBarD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dclcxBarEditItemD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dclcxBarEditItemD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dcldxRibbonD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dcldxRibbonD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dcldxBarExtItemsD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dcldxBarExtItemsD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dcldxBarExtDBItemsD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dcldxBarExtDBItemsD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dcldxBarDBNavD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dcldxBarDBNavD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dcldxdbtrD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dcldxdbtrD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dcldxtrmdD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dcldxtrmdD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dclcxTreeListD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dclcxTreeListD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dcldxPSCoreD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dcldxPSCoreD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxPSLnksD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxPSLnksD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxPScxCommonD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxPScxCommonD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxPScxExtCommonD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxPScxExtCommonD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxPSTeeChartD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxPSTeeChartD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxPSPrVwAdvD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxPSPrVwAdvD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxPSdxOCLnkD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxPSdxOCLnkD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxPSdxLCLnkD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxPSdxLCLnkD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxPSdxFCLnkD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxPSdxFCLnkD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxPSdxDBTVLnkD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxPSdxDBTVLnkD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxPSdxDBOCLnkD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxPSdxDBOCLnkD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxPSDBTeeChartD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxPSDBTeeChartD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxPScxTLLnkD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxPScxTLLnkD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxPScxSSLnkD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxPScxSSLnkD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxPScxScheduler3LnkD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxPScxScheduler3LnkD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxPScxPivotGrid2LnkD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxPScxPivotGrid2LnkD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxPScxPCProdD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxPScxPCProdD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxPScxGrid6LnkD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxPScxGrid6LnkD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxPScxVGridLnkD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxPScxVGridLnkD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxSkinXmas2008BlueD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxSkinXmas2008BlueD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxSkinValentineD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxSkinValentineD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxSkinStardustD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxSkinStardustD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxSkinSilverD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxSkinSilverD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxSkinsdxRibbonPainterD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxSkinsdxRibbonPainterD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxSkinsdxNavBar2PainterD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxSkinsdxNavBar2PainterD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxSkinsdxLCPainterD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxSkinsdxLCPainterD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxSkinsdxDLPainterD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxSkinsdxDLPainterD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxSkinsdxBarPainterD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxSkinsdxBarPainterD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxSkinscxScheduler3PainterD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxSkinscxScheduler3PainterD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxSkinscxPCPainterD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxSkinscxPCPainterD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxSkinOffice2007SilverD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxSkinOffice2007SilverD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxSkinOffice2007PinkD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxSkinOffice2007PinkD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxSkinOffice2007GreenD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxSkinOffice2007GreenD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxSkinOffice2007BlueD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxSkinOffice2007BlueD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxSkinOffice2007BlackD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxSkinOffice2007BlackD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxSkinMoneyTwinsD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxSkinMoneyTwinsD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxSkinMcSkinD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxSkinMcSkinD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxSkinLondonLiquidSkyD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxSkinLondonLiquidSkyD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxSkinLiquidSkyD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxSkinLiquidSkyD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxSkinLilianD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxSkinLilianD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxSkiniMaginaryD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxSkiniMaginaryD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxSkinGlassOceansD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxSkinGlassOceansD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxSkinCoffeeD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxSkinCoffeeD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxSkinSummer2008D12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxSkinSummer2008D12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxSkinCaramelD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxSkinCaramelD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxSkinBlueD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxSkinBlueD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxSkinBlackD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxSkinBlackD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxSkinDarkSideD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxSkinDarkSideD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dxSkinPumpkinD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dxSkinPumpkinD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dcldxSkinsCoreD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dcldxSkinsCoreD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dcldxSkinsDesignHelperD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dcldxSkinsDesignHelperD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dcldxSkinsdxNavBar2PainterD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dcldxSkinsdxNavBar2PainterD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dcldxSkinsdxLCPainterD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dcldxSkinsdxLCPainterD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dcldxSkinsdxBarsPaintersD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dcldxSkinsdxBarsPaintersD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dcldxSkinscxScheduler3PainterD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dcldxSkinscxScheduler3PainterD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dcldxSkinscxPCPainterD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dcldxSkinscxPCPainterD12.bpl not found</Excluded_Packages>
+						<Excluded_Packages Name="C:\DevExpress\x.42\Delphi 2009 Library\dcldxSpellCheckerD12.bpl">File C:\DevExpress\x.42\Delphi 2009 Library\dcldxSpellCheckerD12.bpl not found</Excluded_Packages>
+					</Excluded_Packages>
+				</Delphi.Personality>
+			</BorlandProject>
+			<ProjectFileVersion>12</ProjectFileVersion>
+		</ProjectExtensions>
+	</Project>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D12.identcache b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D12.identcache
new file mode 100644
index 0000000..0af7d2b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D12.identcache differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D12.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D12.res
new file mode 100644
index 0000000..da6c4f2
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D12.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D5.dof b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D5.dof
new file mode 100644
index 0000000..a9b8faf
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D5.dof	
@@ -0,0 +1,107 @@
+[Compiler]
+A=1
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects SDK - Core Library
+[Directories]
+OutputDir=
+UnitOutputDir=..\Dcu\D5
+PackageDLLOutputDir=..\Dcu\D5
+PackageDCPOutputDir=..\Dcu\D5
+SearchPath=ZLib;CodeGen;..\Dcu\D5
+Packages=Vcl50;Vclx50;VclSmp50;Vcldb50;vclado50;Vclbde50;vcldbx50;VCLIB50;Vclmid50;vclie50;Inetdb50;Inet50;dclocx50;dclaxserver50;Indy50;RemObjects_Core_D5
+Conditionals=DESIGNTIME
+DebugSourceDirs=
+UsePackages=0
+[Parameters]
+RunParams=
+HostApplication=
+[Language]
+ActiveLang=
+ProjectLang=$00000409
+RootDir=
+[Version Info]
+IncludeVerInfo=1
+AutoIncBuild=0
+MajorVer=1
+MinorVer=0
+Release=0
+Build=0
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+[Version Info Keys]
+CompanyName=
+FileDescription=
+FileVersion=1.0.0.0
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=
+ProductVersion=1.0.0.0
+Comments=
+[HistoryLists\hlConditionals]
+Count=1
+Item0=DESIGNTIME
+[HistoryLists\hlUnitAliases]
+Count=1
+Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+[HistoryLists\hlSearchPath]
+Count=3
+Item0=..\Dcu\D5
+Item1=..\Dcu\D6
+Item2=..\Dcu\D7
+[HistoryLists\hlUnitOutputDirectory]
+Count=3
+Item0=..\Dcu\D5
+Item1=..\Dcu\D6
+Item2=..\Dcu\D7
+[HistoryLists\hlBPLOutput]
+Count=2
+Item0=..\Dcu\D5
+Item1=..\Dcu\D6
+[HistoryLists\hlDCPOutput]
+Count=3
+Item0=..\Dcu\D5
+Item1=..\Dcu\D6
+Item2=..\Dcu\D7
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D5.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D5.dpk
new file mode 100644
index 0000000..5bfa76f
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D5.dpk	
@@ -0,0 +1,112 @@
+package RemObjects_Core_D5;
+
+{$R *.res}
+{$ALIGN ON}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - Core Library'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+{$DEFINE DESIGNTIME}
+{%File 'RemObjects.inc'}
+
+requires
+  Vcl50,
+  Inet50;
+
+contains
+  uROWinMessageChannel in 'uROWinMessageChannel.pas',
+  uROWinMessageServer in 'uROWinMessageServer.pas',
+  uROWinInetHttpChannel in 'uROWinInetHttpChannel.pas',
+  uROZLib in 'Zlib\uROZLib.pas',
+  uRORng in 'RODEC\uRORng.pas',
+  uROCipher1 in 'RODEC\uROCipher1.pas',
+  uROCipher in 'RODEC\uROCipher.pas',
+  uROCiphers in 'RODEC\uROCiphers.pas',
+  uRODECConst in 'RODEC\uRODECConst.pas',
+  uRODECUtil in 'RODEC\uRODECUtil.pas',
+  uROHash in 'RODEC\uROHash.pas',
+  uROHCMngr in 'RODEC\uROHCMngr.pas',
+  uRORFC2289 in 'RODEC\uRORFC2289.pas',
+  uRODLLChannel in 'uRODLLChannel.pas',
+  uRODLLHelpers in 'uRODLLHelpers.pas',
+  uROMSXMLImpl in 'uROMSXMLImpl.pas',
+  uROMSXML2_TLB in 'uROMSXML2_TLB.pas',
+  uROEncryption in 'uROEncryption.pas',
+  uRODLToXML in 'CodeGen\uRODLToXML.pas',
+  uRODLToWSDL in 'CodeGen\uRODLToWSDL.pas',
+  uROSOAPMessage in 'uROSOAPMessage.pas',
+  uROBinMessage in 'uROBinMessage.pas',
+  uRODL in 'uRODL.pas',
+  uROServerIntf in 'uROServerIntf.pas',
+  uROClient in 'uROClient.pas',
+  uROClientIntf in 'uROClientIntf.pas',
+  uRORes in 'uRORes.pas',
+  uROServer in 'uROServer.pas',
+  uROUnicodeConv in 'uROUnicodeConv.pas',
+  uROXDOM_2_3 in 'uROXDOM_2_3.pas',
+  uROTypes in 'uROTypes.pas',
+  RemObjects_Core_Reg in 'RemObjects_Core_Reg.pas',
+  uROSerializer in 'uROSerializer.pas',
+  uROStreamSerializer in 'uROStreamSerializer.pas',
+  uROXMLSerializer in 'uROXMLSerializer.pas',
+  uROHTTPTools in 'uROHTTPTools.pas',
+  uROIdeOnly in 'uROIdeOnly.pas',
+  uROHTTPDispatch in 'uROHTTPDispatch.pas',
+  uROPoweredByRemObjectsButton in 'uROPoweredByRemObjectsButton.pas',
+  uROCompression in 'uROCompression.pas',
+  uROXMLIntf in 'uROXMLIntf.pas',
+  uROOpenXMLImpl in 'uROOpenXMLImpl.pas',
+  uROClasses in 'uROClasses.pas',
+  uROClassFactories in 'uROClassFactories.pas',
+  uRORemoteDataModule in 'uRORemoteDataModule.pas',
+  uROAsync in 'uROAsync.pas',
+  uROThread in 'uROThread.pas',
+  uROSessions in 'uROSessions.pas',
+  uRORemoteService in 'uRORemoteService.pas',
+  uROBinaryHelpers in 'uROBinaryHelpers.pas',
+  uROPleaseWaitForm in 'uROPleaseWaitForm.pas' {PleaseWaitForm},
+  uRONamedPipeServer in 'uRONamedPipeServer.pas',
+  uRONamedPipeChannel in 'uRONamedPipeChannel.pas',
+  uRODBSessionManager in 'uRODBSessionManager.pas',
+  uRODynamicRequest in 'uRODynamicRequest.pas',
+  uROEventRepository in 'uROEventRepository.pas',
+  uROMasterServerEventRepository in 'uROMasterServerEventRepository.pas',
+  ROMasterServerLibrary_Intf in 'ROMasterServerLibrary_Intf.pas',
+  uROMasterServerSessionManager in 'uROMasterServerSessionManager.pas',
+  uROPostMessage in 'uROPostMessage.pas',
+  uROComboService in 'uROComboService.pas',
+  uROLocalChannel in 'uROLocalChannel.pas',
+  uROLocalServer in 'uROLocalServer.pas',
+  uROHtmlServerInfo in 'uROHtmlServerInfo.pas',
+  uROXmlRpcMessage in 'uROXmlRpcMessage.pas',  
+  uROThreadPool in 'uROThreadPool.pas',
+  uIPHttpHeaders in 'uIPHttpHeaders.pas',
+  uROBaseSuperHttpServer in 'uROBaseSuperHttpServer.pas',
+  uROBaseSuperHttpChannel in 'uROBaseSuperHttpChannel.pas',
+  uROServerMultiMessage in 'uROServerMultiMessage.pas',
+  uROAsyncSCHelpers in 'uROAsyncSCHelpers.pas',
+  uROAsyncSuperTcpServer in 'uROAsyncSuperTcpServer.pas',
+  uROEncryptionEnvelope in 'uROEncryptionEnvelope.pas',
+  uRODBEventRepository in 'uRODBEventRepository.pas',
+  uROJSONParser in 'uROJSONParser.pas',
+  uROJSONMessage in 'uROJSONMessage.pas';
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D5.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D5.res
new file mode 100644
index 0000000..a2de886
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D5.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D6.dof b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D6.dof
new file mode 100644
index 0000000..29c940c
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D6.dof	
@@ -0,0 +1,82 @@
+[FileVersion]
+Version=6.0
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects SDK - Core Library
+[Directories]
+OutputDir=
+UnitOutputDir=..\Dcu\D6
+PackageDLLOutputDir=..\Dcu\D6
+PackageDCPOutputDir=..\Dcu\D6
+SearchPath=CodeGen;..\Dcu\D6
+Packages=Vcl50;Vclx50;VclSmp50;Vcldb50;vclado50;Vclbde50;vcldbx50;VCLIB50;Vclmid50;vclie50;Inetdb50;Inet50;dclocx50;dclaxserver50;Indy50;RemObjects_Core_D5
+Conditionals=DESIGNTIME
+DebugSourceDirs=
+UsePackages=0
+[Parameters]
+RunParams=
+HostApplication=
+Launcher=
+UseLauncher=0
+DebugCWD=
+[Version Info]
+IncludeVerInfo=1
+AutoIncBuild=0
+MajorVer=2
+MinorVer=0
+Release=3
+Build=237
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=2.0.3.237
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D6.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D6.dpk
new file mode 100644
index 0000000..c3965c8
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D6.dpk	
@@ -0,0 +1,113 @@
+package RemObjects_Core_D6;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - Core Library'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+{$DEFINE DESIGNTIME}
+{%File 'RemObjects.inc'}
+
+requires
+  vcl,
+  rtl,
+  dbrtl;
+
+contains
+  uROWinMessageChannel in 'uROWinMessageChannel.pas',
+  uROWinMessageServer in 'uROWinMessageServer.pas',
+  uROWinInetHttpChannel in 'uROWinInetHttpChannel.pas',
+  uROZLib in 'Zlib\uROZLib.pas',
+  uRORng in 'RODEC\uRORng.pas',
+  uROCipher1 in 'RODEC\uROCipher1.pas',
+  uROCipher in 'RODEC\uROCipher.pas',
+  uROCiphers in 'RODEC\uROCiphers.pas',
+  uRODECConst in 'RODEC\uRODECConst.pas',
+  uRODECUtil in 'RODEC\uRODECUtil.pas',
+  uROHash in 'RODEC\uROHash.pas',
+  uROHCMngr in 'RODEC\uROHCMngr.pas',
+  uRORFC2289 in 'RODEC\uRORFC2289.pas',
+  uRODLLChannel in 'uRODLLChannel.pas',
+  uRODLLHelpers in 'uRODLLHelpers.pas',
+  uROMSXMLImpl in 'uROMSXMLImpl.pas',
+  uROMSXML2_TLB in 'uROMSXML2_TLB.pas',
+  uROEncryption in 'uROEncryption.pas',
+  uRODLToXML in 'CodeGen\uRODLToXML.pas',
+  uRODLToWSDL in 'CodeGen\uRODLToWSDL.pas',
+  uROSOAPMessage in 'uROSOAPMessage.pas',
+  uROBinMessage in 'uROBinMessage.pas',
+  uRODL in 'uRODL.pas',
+  uROServerIntf in 'uROServerIntf.pas',
+  uROClient in 'uROClient.pas',
+  uROClientIntf in 'uROClientIntf.pas',
+  uRORes in 'uRORes.pas',
+  uROServer in 'uROServer.pas',
+  uROUnicodeConv in 'uROUnicodeConv.pas',
+  uROXDOM_2_3 in 'uROXDOM_2_3.pas',
+  uROTypes in 'uROTypes.pas',
+  RemObjects_Core_Reg in 'RemObjects_Core_Reg.pas',
+  uROSerializer in 'uROSerializer.pas',
+  uROStreamSerializer in 'uROStreamSerializer.pas',
+  uROXMLSerializer in 'uROXMLSerializer.pas',
+  uROHTTPTools in 'uROHTTPTools.pas',
+  uROIdeOnly in 'uROIdeOnly.pas',
+  uROHTTPDispatch in 'uROHTTPDispatch.pas',
+  uROPoweredByRemObjectsButton in 'uROPoweredByRemObjectsButton.pas',
+  uROCompression in 'uROCompression.pas',
+  uROXMLIntf in 'uROXMLIntf.pas',
+  uROOpenXMLImpl in 'uROOpenXMLImpl.pas',
+  uROClasses in 'uROClasses.pas',
+  uROClassFactories in 'uROClassFactories.pas',
+  uRORemoteDataModule in 'uRORemoteDataModule.pas',
+  uROAsync in 'uROAsync.pas',
+  uROThread in 'uROThread.pas',
+  uROSessions in 'uROSessions.pas',
+  uRORemoteService in 'uRORemoteService.pas',
+  uROBinaryHelpers in 'uROBinaryHelpers.pas',
+  uROPleaseWaitForm in 'uROPleaseWaitForm.pas' {PleaseWaitForm},
+  uRONamedPipeServer in 'uRONamedPipeServer.pas',
+  uRONamedPipeChannel in 'uRONamedPipeChannel.pas',
+  uRODBSessionManager in 'uRODBSessionManager.pas',
+  uRODynamicRequest in 'uRODynamicRequest.pas',
+  uROEventRepository in 'uROEventRepository.pas',
+  uROMasterServerEventRepository in 'uROMasterServerEventRepository.pas',
+  ROMasterServerLibrary_Intf in 'ROMasterServerLibrary_Intf.pas',
+  uROMasterServerSessionManager in 'uROMasterServerSessionManager.pas',
+  uROPostMessage in 'uROPostMessage.pas',
+  uROComboService in 'uROComboService.pas',
+  uROLocalChannel in 'uROLocalChannel.pas',
+  uROLocalServer in 'uROLocalServer.pas',
+  uROHtmlServerInfo in 'uROHtmlServerInfo.pas',
+  uROXmlRpcMessage in 'uROXmlRpcMessage.pas',  
+  uROThreadPool in 'uROThreadPool.pas',
+  uIPHttpHeaders in 'uIPHttpHeaders.pas',
+  uROBaseSuperHttpServer in 'uROBaseSuperHttpServer.pas',
+  uROBaseSuperHttpChannel in 'uROBaseSuperHttpChannel.pas',
+  uROServerMultiMessage in 'uROServerMultiMessage.pas',
+  uROAsyncSCHelpers in 'uROAsyncSCHelpers.pas',
+  uROAsyncSuperTcpServer in 'uROAsyncSuperTcpServer.pas',
+  uROEncryptionEnvelope in 'uROEncryptionEnvelope.pas',
+  uRODBEventRepository in 'uRODBEventRepository.pas',
+  uROJSONParser in 'uROJSONParser.pas',
+  uROJSONMessage in 'uROJSONMessage.pas';
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D6.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D6.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D6.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D7.dof b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D7.dof
new file mode 100644
index 0000000..be28ecf
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D7.dof	
@@ -0,0 +1,132 @@
+[FileVersion]
+Version=7.0
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+[Linker]
+MapFile=3
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=1
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects SDK - Core Library
+[Directories]
+OutputDir=
+UnitOutputDir=..\Dcu\D7
+PackageDLLOutputDir=..\Dcu\D7
+PackageDCPOutputDir=..\Dcu\D7
+SearchPath=..\Dcu\D7;RODEC
+Packages=Vcl50;Vclx50;VclSmp50;Vcldb50;vclado50;Vclbde50;vcldbx50;VCLIB50;Vclmid50;vclie50;Inetdb50;Inet50;dclocx50;dclaxserver50;Indy50;RemObjects_Core_D5
+Conditionals=DESIGNTIME
+DebugSourceDirs=
+UsePackages=0
+[Parameters]
+RunParams=
+HostApplication=
+Launcher=
+UseLauncher=0
+DebugCWD=
+[Version Info]
+IncludeVerInfo=1
+AutoIncBuild=0
+MajorVer=3
+MinorVer=0
+Release=0
+Build=260
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=3.0.0.260
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
+[Excluded Packages]
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D7.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D7.dpk
new file mode 100644
index 0000000..511c621
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D7.dpk	
@@ -0,0 +1,113 @@
+package RemObjects_Core_D7;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - Core Library'}
+{$DESIGNONLY}
+{$IMPLICITBUILD OFF}
+{$DEFINE DESIGNTIME}
+
+requires
+  vcl,
+  rtl,
+  dbrtl;
+
+contains
+  uROWinMessageChannel in 'uROWinMessageChannel.pas',
+  uROWinMessageServer in 'uROWinMessageServer.pas',
+  uROWinInetHttpChannel in 'uROWinInetHttpChannel.pas',
+  uROZLib in 'Zlib\uROZLib.pas',
+  uRORng in 'RODEC\uRORng.pas',
+  uROCipher1 in 'RODEC\uROCipher1.pas',
+  uROCipher in 'RODEC\uROCipher.pas',
+  uROCiphers in 'RODEC\uROCiphers.pas',
+  uRODECConst in 'RODEC\uRODECConst.pas',
+  uRODECUtil in 'RODEC\uRODECUtil.pas',
+  uROHash in 'RODEC\uROHash.pas',
+  uROHCMngr in 'RODEC\uROHCMngr.pas',
+  uRORFC2289 in 'RODEC\uRORFC2289.pas',
+  uRODLLChannel in 'uRODLLChannel.pas',
+  uRODLLHelpers in 'uRODLLHelpers.pas',
+  uROMSXMLImpl in 'uROMSXMLImpl.pas',
+  uROMSXML2_TLB in 'uROMSXML2_TLB.pas',
+  uROEncryption in 'uROEncryption.pas',
+  uRODLToXML in 'CodeGen\uRODLToXML.pas',
+  uRODLToWSDL in 'CodeGen\uRODLToWSDL.pas',
+  uROSOAPMessage in 'uROSOAPMessage.pas',
+  uROBinMessage in 'uROBinMessage.pas',
+  uRODL in 'uRODL.pas',
+  uROServerIntf in 'uROServerIntf.pas',
+  uROClient in 'uROClient.pas',
+  uROClientIntf in 'uROClientIntf.pas',
+  uRORes in 'uRORes.pas',
+  uROServer in 'uROServer.pas',
+  uROUnicodeConv in 'uROUnicodeConv.pas',
+  uROXDOM_2_3 in 'uROXDOM_2_3.pas',
+  uROTypes in 'uROTypes.pas',
+  RemObjects_Core_Reg in 'RemObjects_Core_Reg.pas',
+  uROSerializer in 'uROSerializer.pas',
+  uROStreamSerializer in 'uROStreamSerializer.pas',
+  uROXMLSerializer in 'uROXMLSerializer.pas',
+  uROHTTPTools in 'uROHTTPTools.pas',
+  uROIdeOnly in 'uROIdeOnly.pas',
+  uROHTTPDispatch in 'uROHTTPDispatch.pas',
+  uROPoweredByRemObjectsButton in 'uROPoweredByRemObjectsButton.pas',
+  uROCompression in 'uROCompression.pas',
+  uROXMLIntf in 'uROXMLIntf.pas',
+  uROOpenXMLImpl in 'uROOpenXMLImpl.pas',
+  uROClasses in 'uROClasses.pas',
+  uROClassFactories in 'uROClassFactories.pas',
+  uRORemoteDataModule in 'uRORemoteDataModule.pas',
+  uROAsync in 'uROAsync.pas',
+  uROThread in 'uROThread.pas',
+  uROSessions in 'uROSessions.pas',
+  uRORemoteService in 'uRORemoteService.pas',
+  uROBinaryHelpers in 'uROBinaryHelpers.pas',
+  uROPleaseWaitForm in 'uROPleaseWaitForm.pas' {PleaseWaitForm},
+  uRONamedPipeServer in 'uRONamedPipeServer.pas',
+  uRONamedPipeChannel in 'uRONamedPipeChannel.pas',
+  uRODBSessionManager in 'uRODBSessionManager.pas',
+  uRODynamicRequest in 'uRODynamicRequest.pas',
+  uROEventRepository in 'uROEventRepository.pas',
+  uROMasterServerEventRepository in 'uROMasterServerEventRepository.pas',
+  ROMasterServerLibrary_Intf in 'ROMasterServerLibrary_Intf.pas',
+  uROMasterServerSessionManager in 'uROMasterServerSessionManager.pas',
+  uROPostMessage in 'uROPostMessage.pas',
+  uROComboService in 'uROComboService.pas',
+  uROLocalChannel in 'uROLocalChannel.pas',
+  uROLocalServer in 'uROLocalServer.pas',
+  uROHtmlServerInfo in 'uROHtmlServerInfo.pas',
+  uROXmlRpcMessage in 'uROXmlRpcMessage.pas',
+  uROThreadPool in 'uROThreadPool.pas',
+  uIPHttpHeaders in 'uIPHttpHeaders.pas',
+  uROBaseSuperHttpServer in 'uROBaseSuperHttpServer.pas',
+  uROBaseSuperHttpChannel in 'uROBaseSuperHttpChannel.pas',
+  uROServerMultiMessage in 'uROServerMultiMessage.pas',
+  uROEncryptionEnvelope in 'uROEncryptionEnvelope.pas',
+  uROAsyncSCHelpers in 'uROAsyncSCHelpers.pas',
+  uROAsyncSuperTcpServer in 'uROAsyncSuperTcpServer.pas',
+  uRODBEventRepository in 'uRODBEventRepository.pas',
+  uROJSONParser in 'uROJSONParser.pas',
+  uROJSONMessage in 'uROJSONMessage.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D7.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D7.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_D7.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_Glyphs.lrs b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_Glyphs.lrs
new file mode 100644
index 0000000..d3032dc
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_Glyphs.lrs	
@@ -0,0 +1,2261 @@
+LazarusResources.Add('TROBINMESSAGE','BMP',[
+  'BM'#248#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#194#6#0#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#0#0#0#0#0#0#255#0#255'@'#0#192'@'#0#192'@'#0#192'@'
+  +#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#0#0#0#255#0#255#0#0#0'@'#0#192#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255'@'#0#192'@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#0#0#0#0#0#0#255#0#255'@'#0#192#255#255#255'@'
+  +#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255
+  +#255#255#255#255'@'#0#192'@@@'#255#0#255#255#0#255#255#0#255#0#129#0#255#0
+  +#255#255#0#255#255#0#255#255#0#255#0#0#0#255#0#255#0#0#0'@'#0#192#255#255#255
+  +'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255#255#255#255
+  +'@'#0#192#255#255#255'@'#0#192'@@@'#255#0#255#255#0#255#255#0#255#0#129#0#0
+  +#129#0#255#0#255#255#0#255#255#0#255#0#0#0#0#0#0#255#0#255'@'#0#192#255#255
+  +#255'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255
+  +#255'@'#0#192#255#255#255'@'#0#192'@@@'#255#0#255#255#0#255#255#0#255#0#129#0
+  +'8'#196'Z'#0#129#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192
+  +#255#255#255'@'#0#192'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0
+  +#192#255#255#255#255#255#255'@'#0#192'@@@'#0#129#0#0#129#0#0#129#0#0#129#0'G'
+  +#212't:'#196'['#0#129#0#150#150#150#150#150#150#150#150#150#255#0#255'@'#0
+  +#192#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255'@'#0#192'@@@2'#218'e1'#217
+  +'d/'#215'b5'#212'eJ'#215'vG'#211's2'#184'J'#0#129#0#224#224#224#224#224#224
+  +#152#152#152'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'6'#225'j7'#226'k6'#225'j5'#221
+  +'hL'#222'yL'#218'xI'#213'uF'#209'r1'#183'I'#0#129#0#238#238#238#154#154#154
+  +#157#157#157#246#246#246#246#246#246#246#246#246#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#0#129#0'#'#197'F8'#227'l='#234'r>'#235's<'
+  +#233'pK'#230'{S'#226#128'N'#221'{J'#216'wG'#211's,'#181'D'#0#129#0#246#246
+  +#246#157#157#157#158#158#158#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#0#129#0'%'#199'H<'#233'pA'
+  +#240'wE'#246'{A'#239'vZ'#235#136'U'#229#130'P'#222'}K'#217'w.'#184'F'#0#129#0
+  +#251#251#251#251#251#251#158#158#158#158#158#158#254#254#254#254#254#254#254
+  +#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#0#129#0
+  +#0#129#0#0#129#0#0#129#0#0#129#0#0#129#0#0#129#0#0#129#0'P'#222'}0'#187'I'#0
+  +#129#0#254#254#254#254#254#254#254#254#254#158#158#158#159#159#159#255#255
+  +#255#255#255#255#255#255#255#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#0#129#0'8'#193'Q'#0#129#0#157#157#157#255#255#255#255
+  +#255#255#255#255#255#159#159#159#159#159#159#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#0
+  +#129#0#0#129#0#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#159#159#159#159#159#159#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#0#129#0#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#159#159#159#158#158
+  +#158#255#255#255#255#255#255#255#255#255#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#255#255#255#255#255#255#255#255#255#158#158#158#158#158#158#252#252#252
+  +#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252
+  +#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252
+  +#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252
+  +#252#252#252#252#252#252#158#158#158#157#157#157#248#248#248#248#248#248#248
+  +#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248
+  +#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248
+  +#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248
+  +#248#248#157#157#157#156#156#156#242#242#242#242#242#242#242#242#242#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#242#242#242#242#242#242#242#242#242#156#156
+  ,#156#153#153#153#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#153#153#153#150#150#150
+  +#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218
+  +#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218
+  +#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218
+  +#218#218#218#218#218#218#218#218#218#150#150#150#146#146#146#201#201#201#201
+  +#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201
+  +#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201
+  +#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201
+  +#201#201#201#201#201#146#146#146#255#0#255#144#144#144#144#144#144#144#144
+  +#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144
+  +#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144
+  +#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144
+  +#144#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#0#0
+]);
+LazarusResources.Add('TROPOSTMESSAGE','BMP',[
+  'BM'#248#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#194#6#0#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#0#0#0#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#0#0#0#255#0#255#255#0#255'@'#0#192#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255'@'#0#192'@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#0#0#0#0#0#0#255#0#255'@'#0#192#255#255#255
+  +'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255
+  +#255#255#255#255#255'@'#0#192'@@@'#255#0#255#255#0#255#255#0#255#0#129#0#255
+  +#0#255#255#0#255#255#0#255#255#0#255#0#0#0#255#0#255#0#0#0'@'#0#192#255#255
+  +#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255#255#255
+  +#255'@'#0#192#255#255#255'@'#0#192'@@@'#255#0#255#255#0#255#255#0#255#0#129#0
+  +#0#129#0#255#0#255#255#0#255#255#0#255#0#0#0#0#0#0#255#0#255'@'#0#192#255#255
+  +#255'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255
+  +#255'@'#0#192#255#255#255'@'#0#192'@@@'#255#0#255#255#0#255#255#0#255#0#129#0
+  +'8'#196'Z'#0#129#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192
+  +#255#255#255'@'#0#192'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0
+  +#192#255#255#255#255#255#255'@'#0#192'@@@'#0#129#0#0#129#0#0#129#0#0#129#0'G'
+  +#212't:'#196'['#0#129#0#150#150#150#150#150#150#150#150#150#255#0#255'@'#0
+  +#192#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255'@'#0#192'@@@2'#218'e1'#217
+  +'d/'#215'b5'#212'eJ'#215'vG'#211's2'#184'J'#0#129#0#224#224#224#224#224#224
+  +#152#152#152'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'6'#225'j7'#226'k6'#225'j5'#221
+  +'hL'#222'yL'#218'xI'#213'uF'#209'r1'#183'I'#0#129#0#238#238#238#154#154#154
+  +#157#157#157#246#246#246#246#246#246#246#246#246#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#0#129#0'#'#197'F8'#227'l='#234'r>'#235's<'
+  +#233'pK'#230'{S'#226#128'N'#221'{J'#216'wG'#211's,'#181'D'#0#129#0#246#246
+  +#246#157#157#157#158#158#158#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#0#129#0'%'#199'H<'#233'pA'
+  +#240'wE'#246'{A'#239'vZ'#235#136'U'#229#130'P'#222'}K'#217'w.'#184'F'#0#129#0
+  +#251#251#251#251#251#251#158#158#158#158#158#158#254#254#254#254#254#254#254
+  +#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#0#129#0
+  +#0#129#0#0#129#0#0#129#0#0#129#0#0#129#0#0#129#0#0#129#0'P'#222'}0'#187'I'#0
+  +#129#0#254#254#254#254#254#254#254#254#254#158#158#158#159#159#159#255#255
+  +#255#255#255#255#255#255#255#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#0#129#0'8'#193'Q'#0#129#0#157#157#157#255#255#255#255
+  +#255#255#255#255#255#159#159#159#159#159#159#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#0
+  +#129#0#0#129#0#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#159#159#159#159#159#159#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#0#129#0#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#159#159#159#158#158
+  +#158#255#255#255#255#255#255#255#255#255#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#255#255#255#255#255#255#255#255#255#158#158#158#158#158#158#252#252#252
+  +#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252
+  +#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252
+  +#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252
+  +#252#252#252#252#252#252#158#158#158#157#157#157#248#248#248#248#248#248#248
+  +#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248
+  +#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248
+  +#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248
+  +#248#248#157#157#157#156#156#156#242#242#242#242#242#242#242#242#242#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#242#242#242#242#242#242#242#242#242#156#156
+  ,#156#153#153#153#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#153#153#153#150#150#150
+  +#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218
+  +#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218
+  +#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218
+  +#218#218#218#218#218#218#218#218#218#150#150#150#146#146#146#201#201#201#201
+  +#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201
+  +#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201
+  +#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201
+  +#201#201#201#201#201#146#146#146#255#0#255#144#144#144#144#144#144#144#144
+  +#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144
+  +#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144
+  +#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144
+  +#144#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#0#0
+]);
+LazarusResources.Add('TROSOAPMESSAGE','BMP',[
+  'BM'#248#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#194#6#0#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#0#0#0#0#0#0#255#0#255'@'#0#192'@'#0#192'@'#0#192'@'
+  +#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#0#0#0'@'#0#192#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255'@'#0#192'@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#0#0#0#255#0#255'@'#0#192#255#255
+  +#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192
+  +#255#255#255#255#255#255'@'#0#192'@@@'#255#0#255#255#0#255#255#0#255#0#129#0
+  +#255#0#255#255#0#255#255#0#255#255#0#255#0#0#0#255#0#255#255#0#255'@'#0#192
+  +#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255
+  +#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@'#255#0#255#255#0#255#255#0#255
+  +#0#129#0#0#129#0#255#0#255#255#0#255#255#0#255#255#0#255#0#0#0#0#0#0'@'#0#192
+  +#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255
+  +#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@'#255#0#255#255#0#255#255#0#255
+  +#0#129#0'8'#196'Z'#0#129#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +'@'#0#192#255#255#255'@'#0#192'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0
+  +#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@@@'#0#129#0#0#129#0#0#129#0#0
+  +#129#0'G'#212't:'#196'['#0#129#0#150#150#150#150#150#150#150#150#150#255#0
+  +#255'@'#0#192#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255'@'#0#192'@@@2'#218
+  +'e1'#217'd/'#215'b5'#212'eJ'#215'vG'#211's2'#184'J'#0#129#0#224#224#224#224
+  +#224#224#152#152#152'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'
+  +#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'6'#225'j7'#226'k6'#225'j'
+  +'5'#221'hL'#222'yL'#218'xI'#213'uF'#209'r1'#183'I'#0#129#0#238#238#238#154
+  +#154#154#157#157#157#246#246#246#246#246#246#246#246#246#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#0#129#0'#'#197'F8'#227'l='#234'r>'
+  +#235's<'#233'pK'#230'{S'#226#128'N'#221'{J'#216'wG'#211's,'#181'D'#0#129#0
+  +#246#246#246#157#157#157#158#158#158#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#0#129#0'%'#199'H<'
+  +#233'pA'#240'wE'#246'{A'#239'vZ'#235#136'U'#229#130'P'#222'}K'#217'w.'#184'F'
+  +#0#129#0#251#251#251#251#251#251#158#158#158#158#158#158#254#254#254#254#254
+  +#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254
+  +#0#129#0#0#129#0#0#129#0#0#129#0#0#129#0#0#129#0#0#129#0#0#129#0'P'#222'}0'
+  +#187'I'#0#129#0#254#254#254#254#254#254#254#254#254#158#158#158#159#159#159
+  +#255#255#255#255#255#255#255#255#255#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#0#129#0'8'#193'Q'#0#129#0#157#157#157#255#255
+  +#255#255#255#255#255#255#255#159#159#159#159#159#159#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#0#129#0#0#129#0#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#159#159#159#159#159#159#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#0#129#0#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#159#159#159#158
+  +#158#158#255#255#255#255#255#255#255#255#255#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#255#255#255#255#255#255#255#255#255#158#158#158#158#158#158#252#252
+  +#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252
+  +#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252
+  +#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252
+  +#252#252#252#252#252#252#252#158#158#158#157#157#157#248#248#248#248#248#248
+  +#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248
+  +#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248
+  +#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248
+  +#248#248#248#157#157#157#156#156#156#242#242#242#242#242#242#242#242#242#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#242#242#242#242#242#242#242#242#242#156
+  ,#156#156#153#153#153#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#153#153#153#150#150
+  +#150#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218
+  +#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218
+  +#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218
+  +#218#218#218#218#218#218#218#218#218#218#150#150#150#146#146#146#201#201#201
+  +#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201
+  +#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201
+  +#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201
+  +#201#201#201#201#201#201#146#146#146#255#0#255#144#144#144#144#144#144#144
+  +#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144
+  +#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144
+  +#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144
+  +#144#144#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#0#0
+]);
+LazarusResources.Add('TROXMLRPCMESSAGE','BMP',[
+  'BM'#248#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#194#6#0#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#0#0#0#255#0#255#0#0#0'@'#0#192'@'#0#192'@'#0#192'@'
+  +#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#0#0#0#255#0#255#0#0#0'@'#0#192#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255'@'#0#192'@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#0#0#0#255#0#255'@'#0#192#255#255#255
+  +'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255
+  +#255#255#255#255#255'@'#0#192'@@@'#255#0#255#255#0#255#255#0#255#0#129#0#255
+  +#0#255#255#0#255#255#0#255#255#0#255#0#0#0#255#0#255#0#0#0'@'#0#192#255#255
+  +#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255#255#255
+  +#255'@'#0#192#255#255#255'@'#0#192'@@@'#255#0#255#255#0#255#255#0#255#0#129#0
+  +#0#129#0#255#0#255#255#0#255#255#0#255#0#0#0#255#0#255#0#0#0'@'#0#192#255#255
+  +#255'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255
+  +#255'@'#0#192#255#255#255'@'#0#192'@@@'#255#0#255#255#0#255#255#0#255#0#129#0
+  +'8'#196'Z'#0#129#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192
+  +#255#255#255'@'#0#192'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0
+  +#192#255#255#255#255#255#255'@'#0#192'@@@'#0#129#0#0#129#0#0#129#0#0#129#0'G'
+  +#212't:'#196'['#0#129#0#150#150#150#150#150#150#150#150#150#255#0#255'@'#0
+  +#192#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255'@'#0#192'@@@2'#218'e1'#217
+  +'d/'#215'b5'#212'eJ'#215'vG'#211's2'#184'J'#0#129#0#224#224#224#224#224#224
+  +#152#152#152'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'6'#225'j7'#226'k6'#225'j5'#221
+  +'hL'#222'yL'#218'xI'#213'uF'#209'r1'#183'I'#0#129#0#238#238#238#154#154#154
+  +#157#157#157#246#246#246#246#246#246#246#246#246#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#0#129#0'#'#197'F8'#227'l='#234'r>'#235's<'
+  +#233'pK'#230'{S'#226#128'N'#221'{J'#216'wG'#211's,'#181'D'#0#129#0#246#246
+  +#246#157#157#157#158#158#158#251#251#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#0#129#0'%'#199'H<'#233'pA'
+  +#240'wE'#246'{A'#239'vZ'#235#136'U'#229#130'P'#222'}K'#217'w.'#184'F'#0#129#0
+  +#251#251#251#251#251#251#158#158#158#158#158#158#254#254#254#254#254#254#254
+  +#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#0#129#0
+  +#0#129#0#0#129#0#0#129#0#0#129#0#0#129#0#0#129#0#0#129#0'P'#222'}0'#187'I'#0
+  +#129#0#254#254#254#254#254#254#254#254#254#158#158#158#159#159#159#255#255
+  +#255#255#255#255#255#255#255#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#0#129#0'8'#193'Q'#0#129#0#157#157#157#255#255#255#255
+  +#255#255#255#255#255#159#159#159#159#159#159#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#0
+  +#129#0#0#129#0#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#159#159#159#159#159#159#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#0#129#0#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#159#159#159#158#158
+  +#158#255#255#255#255#255#255#255#255#255#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#255#255#255#255#255#255#255#255#255#158#158#158#158#158#158#252#252#252
+  +#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252
+  +#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252
+  +#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252
+  +#252#252#252#252#252#252#158#158#158#157#157#157#248#248#248#248#248#248#248
+  +#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248
+  +#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248
+  +#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248
+  +#248#248#157#157#157#156#156#156#242#242#242#242#242#242#242#242#242#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#242#242#242#242#242#242#242#242#242#156#156
+  ,#156#153#153#153#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#153#153#153#150#150#150
+  +#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218
+  +#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218
+  +#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218
+  +#218#218#218#218#218#218#218#218#218#150#150#150#146#146#146#201#201#201#201
+  +#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201
+  +#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201
+  +#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201
+  +#201#201#201#201#201#146#146#146#255#0#255#144#144#144#144#144#144#144#144
+  +#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144
+  +#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144
+  +#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144
+  +#144#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#0#0
+]);
+LazarusResources.Add('TROJSONMESSAGE','BMP',[
+  'BM'#248#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#194#6#0#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#0#0#0#0#0#0#255#0#255'@'#0#192'@'#0#192'@'#0#192'@'
+  +#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#0#0#0'@'#0#192#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255'@'#0#192'@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0#0#0'@'#0#192#255#255
+  +#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192
+  +#255#255#255#255#255#255'@'#0#192'@@@'#255#0#255#255#0#255#255#0#255#0#129#0
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0#0#0'@'#0#192
+  +#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255
+  +#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@'#255#0#255#255#0#255#255#0#255
+  +#0#129#0#0#129#0#255#0#255#255#0#255#255#0#255#0#0#0#0#0#0#0#0#0'@'#0#192#255
+  +#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255
+  +#255#255'@'#0#192#255#255#255'@'#0#192'@@@'#255#0#255#255#0#255#255#0#255#0
+  +#129#0'8'#196'Z'#0#129#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'
+  +#0#192#255#255#255'@'#0#192'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0
+  +#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@@@'#0#129#0#0#129#0#0#129#0#0
+  +#129#0'G'#212't:'#196'['#0#129#0#150#150#150#150#150#150#150#150#150#255#0
+  +#255'@'#0#192#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255'@'#0#192'@@@2'#218
+  +'e1'#217'd/'#215'b5'#212'eJ'#215'vG'#211's2'#184'J'#0#129#0#224#224#224#224
+  +#224#224#152#152#152'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'
+  +#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'6'#225'j7'#226'k6'#225'j'
+  +'5'#221'hL'#222'yL'#218'xI'#213'uF'#209'r1'#183'I'#0#129#0#238#238#238#154
+  +#154#154#157#157#157#246#246#246#246#246#246#246#246#246#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#0#129#0'#'#197'F8'#227'l='#234'r>'
+  +#235's<'#233'pK'#230'{S'#226#128'N'#221'{J'#216'wG'#211's,'#181'D'#0#129#0
+  +#246#246#246#157#157#157#158#158#158#251#251#251#251#251#251#251#251#251#251
+  +#251#251#251#251#251#251#251#251#251#251#251#251#251#251#0#129#0'%'#199'H<'
+  +#233'pA'#240'wE'#246'{A'#239'vZ'#235#136'U'#229#130'P'#222'}K'#217'w.'#184'F'
+  +#0#129#0#251#251#251#251#251#251#158#158#158#158#158#158#254#254#254#254#254
+  +#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254
+  +#0#129#0#0#129#0#0#129#0#0#129#0#0#129#0#0#129#0#0#129#0#0#129#0'P'#222'}0'
+  +#187'I'#0#129#0#254#254#254#254#254#254#254#254#254#158#158#158#159#159#159
+  +#255#255#255#255#255#255#255#255#255#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#0#129#0'8'#193'Q'#0#129#0#157#157#157#255#255
+  +#255#255#255#255#255#255#255#159#159#159#159#159#159#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#0#129#0#0#129#0#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#159#159#159#159#159#159#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#0#129#0#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#159#159#159#158
+  +#158#158#255#255#255#255#255#255#255#255#255#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#255#255#255#255#255#255#255#255#255#158#158#158#158#158#158#252#252
+  +#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252
+  +#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252
+  +#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252#252
+  +#252#252#252#252#252#252#252#158#158#158#157#157#157#248#248#248#248#248#248
+  +#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248
+  +#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248
+  +#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248#248
+  +#248#248#248#157#157#157#156#156#156#242#242#242#242#242#242#242#242#242#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157#157
+  +#157#157#157#157#157#157#157#157#157#242#242#242#242#242#242#242#242#242#156
+  ,#156#156#153#153#153#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231#231
+  +#231#231#231#231#231#231#231#231#231#231#231#231#231#231#153#153#153#150#150
+  +#150#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218
+  +#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218
+  +#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218#218
+  +#218#218#218#218#218#218#218#218#218#218#150#150#150#146#146#146#201#201#201
+  +#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201
+  +#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201
+  +#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201#201
+  +#201#201#201#201#201#201#146#146#146#255#0#255#144#144#144#144#144#144#144
+  +#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144
+  +#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144
+  +#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144#144
+  +#144#144#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#0#0
+]);
+LazarusResources.Add('TROMESSAGEENVELOPE','BMP',[
+  'BM'#248#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0#0
+  +#0#0#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']'
+  +'Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'
+  +#142']Y'#142']Y'#142']Y'#142']Y'#255#0#255#255#0#255#142']Y'#172'yg'#235#178
+  +#131#255#196#139#255#196#138#254#196#138#255#196#139#255#196#139#255#196#138
+  +#255#196#138#255#196#139#255#196#138#255#196#138#255#196#138#255#196#138#255
+  +#196#139#255#196#139#255#196#139#255#196#139#255#197#139#235#178#130#172'yg'
+  +#142']Y'#255#0#255#142']Y'#217#167#132#166'ug'#247#197#150#255#203#152#254
+  +#203#152#255#203#153#255#203#152#255#203#153#254#203#152#255#202#152#254#203
+  +#153#254#203#153#255#203#152#255#203#153#255#203#152#254#203#152#255#203#153
+  +#255#203#152#248#197#150#166'ug'#217#166#132#142']Y'#255#0#255#142']Y'#254
+  +#212#170#194#147'~'#186#138'x'#255#212#169#255#212#170#255#212#170#255#212
+  +#170#254#212#170#254#212#170#255#212#169#255#212#170#254#212#170#255#212#170
+  +#254#212#170#254#212#170#255#212#170#255#212#170#255#212#170#184#138'x'#194
+  +#147'~'#254#212#170#142']Y'#255#0#255#142']Y'#254#222#189#251#218#187#172#128
+  +'u'#209#170#149#254#222#188#255#221#188#255#222#188#254#222#188#254#221#189
+  +#255#221#189#255#221#189#255#222#188#254#221#189#254#222#189#254#222#188#255
+  +#221#188#255#221#189#209#170#149#172#128't'#252#218#186#255#222#188#142']Y'
+  +#255#0#255#142']Y'#254#231#208#255#231#208#240#213#194#161'um'#233#203#183
+  +#255#231#208#255#231#208#254#231#208#255#231#208#254#231#208#255#231#208#254
+  +#231#208#254#231#208#254#231#208#254#231#208#254#231#208#231#203#184#161'um'
+  +#239#213#193#254#231#208#254#231#208#142']Y'#255#0#255#142']Y'#254#240#226
+  +#254#240#227#254#240#226#221#197#187#163'xs'#246#230#218#255#240#227#254#240
+  +#227#254#240#227#254#240#226#254#240#227#254#240#226#254#240#227#254#240#226
+  +#254#240#226#247#230#218#163'xs'#222#197#186#254#240#226#254#240#227#254#240
+  +#226#142']Y'#255#0#255#142']Y'#254#248#242#254#248#243#254#248#242#255#247
+  +#243#197#167#163#181#145#140#254#248#243#254#248#243#254#248#242#254#247#242
+  +#254#248#243#254#248#242#254#248#243#254#248#242#255#248#243#181#145#140#197
+  +#169#164#254#247#243#254#248#243#254#248#242#254#248#242#142']Y'#255#0#255
+  +#142']Y'#254#254#254#254#254#254#254#254#254#254#254#254#252#251#251#173#137
+  +#135#204#181#180#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254
+  +#254#254#254#254#254#254#202#178#176#175#139#136#252#251#251#254#254#254#254
+  +#254#254#254#254#254#254#254#254#142']Y'#255#0#255#142']Y'#254#254#254#254
+  +#254#254#254#254#254#252#251#251#199#173#172#172#136#132#152'kh'#152'kh'#152
+  +'kh'#152'kh'#152'kh'#152'kh'#152'kh'#152'kh'#152'kh'#194#166#164#252#251#251
+  +#254#254#254#254#254#254#254#254#254#254#254#254#142']Y'#255#0#255#142']Y'
+  +#254#254#254#254#254#254#240#235#234#173#137#134#180#145#143#244#240#240#254
+  +#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254
+  +#254#254#254#254#244#240#240#180#145#143#173#137#134#240#235#234#254#254#254
+  +#254#254#254#254#254#254#142']Y'#255#0#255#142']Y'#254#254#254#220#204#202
+  +#160'vs'#206#182#181#254#254#254#254#254#254#254#254#254#254#254#254#254#254
+  +#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254
+  +#254#254#254#206#182#181#160'vs'#220#204#202#254#254#254#254#254#254#142']Y'
+  +#255#0#255#142']Y'#198#172#170#165'~z'#172#172#172#254#254#254#254#254#254
+  +#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254
+  +#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#233#222
+  +#221#165'~z'#198#172#170#254#254#254#142']Y'#255#0#255#142']Y'#161#134#135
+  +#165#230#230#172#172#172#255#255#255#251#255#255#250#255#255#246#255#255#246
+  +#255#255#239#255#255#239#255#255#239#255#255#242#255#255#242#255#255#244#255
+  +#255#246#255#255#244#255#255#239#255#255#231#246#246#209#225#225#181#183#183
+  +#178#157#157#142']Y'#255#0#255#142']Y'#166#149#152#167#254#255#172#172#172
+  +#254#255#255#251#255#255#251#255#255#251#255#255#255#255#255#255#255#255#255
+  +#255#255#251#255#255#238#247#247#213#222#224#193#204#206#182#189#191#173#180
+  +#181#172#173#173#170#173#175#161#175#180#154#172#178#163#144#146#142']Y'#255
+  +#0#255#255#0#255#142']Y'#184#150#150#172#172#172#255#255#255#255#255#255#255
+  +#255#255#233#235#235#206#213#215#189#197#198#177#186#186#170#175#176#170#172
+  +#173#163#173#176#151#175#181#137#175#186'~'#175#192's'#177#204'g'#186#224'y'
+  ,#170#199#166#131#137#142']Y'#255#0#255#255#0#255#255#0#255#255#0#255#142']Y'
+  +#198#150#149#173#180#181#171#186#186#172#172#172#165#182#184#154#186#188#143
+  +#191#197#129#201#207'v'#209#218'm'#216#231'n'#216#235'p'#212#235'r'#209#237
+  +'o'#215#247'm'#215#252#145#173#194#142']Y'#142']Y'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#142']Y'#151'tr'#153#182#187'r'#240#251'k'
+  +#246#255'p'#234#250'r'#235#251'r'#238#252't'#239#255't'#240#255'u'#237#254'v'
+  +#231#252'o'#235#255'w'#218#244#154#169#182#142']Y'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#142']Y'#176#149#150#134#209#217'k'#255#255'r'#246#255't'#239#255't'#239#255
+  +'t'#239#255'p'#244#255'm'#248#255#135#202#217#176#146#150#142']Y'#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#142']Y'#142']Y'#152#186#191'w'#235#246'm'
+  +#251#255'm'#251#255'n'#248#255'u'#238#251#152#186#191#142']Y'#142']Y'#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#142']'
+  +'Y'#142']Y'#157#175#178#149#187#193#158#173#176#142']Y'#142']Y'#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#142']Y'#142']Y'#142']Y'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0
+  +#0
+]);
+LazarusResources.Add('TROAESENCRYPTIONENVELOPE','BMP',[
+  'BM'#248#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#194#6#0#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@@@'#0#153#204#0#153#204#0#153#204#0#153#204#0#153#204#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255'@'#0#192'@@@A'#225#255'K'#228#255'<'#223#255','
+  +#218#255#24#202#245#0#153#204#0#153#204#142']Y'#142']Y'#142']Y'#255#0#255'@'
+  +#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0
+  +#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@@@O'#229#255'_'#234#255'Q'
+  +#230#255'7'#200#232#13#132#177'#'#215#255#16#200#245#0#153#204#235#178#130
+  +#172'yg'#142']Y@'#0#192#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255
+  +'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@['#233#255
+  +'p'#240#255'd'#236#255''''#138#166#0'Jo.'#194#228'+'#218#255#0#153#204#166'u'
+  +'g'#217#166#132#142']Y@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255
+  +#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@d'
+  +#236#255'~'#244#255'u'#241#255'#i~'#0'2L'#23'n'#139'B'#225#255#0#153#204#194
+  +#147'~'#254#212#170#142']Y@'#0#192#255#255#255'@'#0#192'@'#0#192'@'#0#192#255
+  +#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@@@l'
+  +#239#255#138#248#255#130#246#255'U'#180#194#0''';D'#175#194'W'#232#255#0#153
+  +#204#252#218#186#255#222#188#142']Y@'#0#192#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255'@'#0#192'@@@q'#240#255#147#251#255#141#249#255'~'#234#243'Q'#168
+  +#182't'#241#255'i'#238#255#0#153#204#254#231#208#254#231#208#142']Y@'#0#192
+  +'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192't'#228#243#152#152#152#143#175#179#210#254#255#203#253
+  +#255#190#251#255#156#248#255'y'#243#255#0#153#204#254#240#227#254#240#226#142
+  +']Y'#255#0#255#142']Y'#254#248#242#254#248#243#254#248#242#255#247#243#197
+  +#167#163#181#145#140#254#248#243#254#248#243#254#248#242#0#153#204#24#152#190
+  +#152#152#152#143#175#179't'#241#255#134#245#255#151#249#255#152#152#152#164
+  +#251#255#0#153#204#254#248#242#254#248#242#142']Y'#255#0#255#142']Y'#254#254
+  +#254#254#254#254#254#254#254#254#254#254#252#251#251#173#137#135#204#181#180
+  +#254#254#254#254#254#254#254#254#254#0#153#204#152#152#152'x'#161#172#25#193
+  +#236''''#204#242'g'#187#204#152#152#152'h'#209#226#0#153#204#254#254#254#254
+  +#254#254#142']Y'#255#0#255#142']Y'#254#254#254#254#254#254#254#254#254#252
+  +#251#251#199#173#172#172#136#132#152'kh'#152'kh'#152'kh'#152'kh'#152'kh'#152
+  +#152#152#131#153#160#0#153#204#0#153#204'R'#153#177#152#152#152#0#153#204#254
+  +#254#254#254#254#254#254#254#254#142']Y'#255#0#255#142']Y'#254#254#254#254
+  +#254#254#240#235#234#173#137#134#180#145#143#244#240#240#254#254#254#254#254
+  +#254#254#254#254#254#254#254#254#254#254#152#152#152#153#153#153#254#254#254
+  +#244#240#240#153#153#153#152#152#152#240#235#234#254#254#254#254#254#254#254
+  +#254#254#142']Y'#255#0#255#142']Y'#254#254#254#220#204#202#160'vs'#206#182
+  +#181#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254
+  +#254#254#254#152#152#152#223#222#222#152#152#152#152#152#152#146#145#144#152
+  +#152#152#160'vs'#220#204#202#254#254#254#254#254#254#142']Y'#255#0#255#142']'
+  +'Y'#198#172#170#165'~z'#172#172#172#254#254#254#254#254#254#254#254#254#254
+  +#254#254#254#254#254#254#254#254#254#254#254#254#254#254#152#152#152#182#182
+  +#182#224#224#224#159#159#159#163#163#163#152#152#152#233#222#221#165'~z'#198
+  +#172#170#254#254#254#142']Y'#255#0#255#142']Y'#161#134#135#165#230#230#172
+  +#172#172#255#255#255#251#255#255#250#255#255#246#255#255#246#255#255#239#255
+  +#255#239#255#255#239#255#255#242#255#255#152#152#152#152#152#152#152#152#152
+  +#152#152#152#239#255#255#231#246#246#209#225#225#181#183#183#178#157#157#142
+  +']Y'#255#0#255#142']Y'#166#149#152#167#254#255#172#172#172#254#255#255#251
+  +#255#255#251#255#255#251#255#255#255#255#255#255#255#255#255#255#255#251#255
+  +#255#238#247#247#213#222#224#193#204#206#182#189#191#173#180#181#172#173#173
+  +#170#173#175#161#175#180#154#172#178#163#144#146#142']Y'#255#0#255#255#0#255
+  +#142']Y'#184#150#150#172#172#172#255#255#255#255#255#255#255#255#255#233#235
+  +#235#206#213#215#189#197#198#177#186#186#170#175#176#170#172#173#163#173#176
+  +#151#175#181#137#175#186'~'#175#192's'#177#204'g'#186#224'y'#170#199#166#131
+  +#137#142']Y'#255#0#255#255#0#255#255#0#255#255#0#255#142']Y'#198#150#149#173
+  +#180#181#171#186#186#172#172#172#165#182#184#154#186#188#143#191#197#129#201
+  +#207'v'#209#218'm'#216#231'n'#216#235'p'#212#235'r'#209#237'o'#215#247'm'#215
+  ,#252#145#173#194#142']Y'#142']Y'#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#142']Y'#151'tr'#153#182#187'r'#240#251'k'#246#255'p'#234#250
+  +'r'#235#251'r'#238#252't'#239#255't'#240#255'u'#237#254'v'#231#252'o'#235#255
+  +'w'#218#244#154#169#182#142']Y'#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#142']Y'#176#149#150
+  +#134#209#217'k'#255#255'r'#246#255't'#239#255't'#239#255't'#239#255'p'#244
+  +#255'm'#248#255#135#202#217#176#146#150#142']Y'#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#142']Y'#142']Y'#152#186#191'w'#235#246'm'#251#255'm'#251#255
+  +'n'#248#255'u'#238#251#152#186#191#142']Y'#142']Y'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#142']Y'#142']Y'#157#175
+  +#178#149#187#193#158#173#176#142']Y'#142']Y'#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#142']Y'#142']Y'#142']Y'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0#0
+]);
+LazarusResources.Add('TROWININETHTTPCHANNEL','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#255#0#255#153'c@'#149'^<'#153'c@'#146']Hmk?H'#146'>'#255
+  +#0#255#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@@@'#185
+  +'x='#185'x='#173'e'''#171'P'#20'jb'#30'$'#137'!1'#153'1@'#157'?@'#157'?'#255
+  +#0#255#255#0#255'@'#0#192#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255'@'#0#192
+  +'@@@'#231#129#22#227'm'#3#224']'#0#144'Z'#0#2'h'#0#0'k'#0#0'l'#0#15#134#15'@'
+  +#139'5H'#146'>'#255#0#255'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192
+  +#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192
+  +'@@@'#252#134#15#237#135#15#186'~'#7'R~'#2#18'z'#1#9'n'#0#0'l'#0#0'p'#0#5's'
+  +#4#151'6'#1#255#0#255'@'#0#192#255#255#255'@'#0#192'@'#0#192#255#255#255#255
+  +#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@'
+  +#207#146'#`'#137#14'l'#143#22#217#146'#'#255#135#22#186'~'#7'>x'#0#17'w'#0#28
+  +'['#1'lB'#22#136'2'#7'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255
+  +#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@:'
+  +#151#26'E'#153'"'#255#170'P'#255#161'B'#251#153'1'#255#140#28#255#128#9#237
+  +'n'#1#194'P'#4#144'8'#11#145'9'#12'@'#0#192#255#255#255'@'#0#192'@'#0#192'@'
+  +#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0
+  +#192'@@@'#22#166'%'#172#177'Q'#255#188'{'#251#177'_'#251#166'H'#251#153'1'
+  +#255#138#25#255'{'#4#224'e'#2#171'P'#20#150'='#14'@'#0#192#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255'@'#0#192'@@@;'#189'H'#194'a'#215#201#134#239
+  +#192'{'#251#177'_'#246#163'C'#240#147'&'#251#132#12#215'r'#2'tb'#3'lB'#22'@'
+  +#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'~'#204'kl'#215'sl'#215'sn'#203'g'#194'av'
+  +#173'Dh'#156'('#185#149'&'#255#135#22#168'z'#3#13#131#0'#c'#5'422'#168#162
+  +#167'}st'#254#150#18#254#145#12#254#150#18#254#150#18#254#150#18#254#150#18
+  +#254#150#18#169'~H'#192#191'ju'#218'{'#156#238#158#156#238#158'i'#213'oA'#189
+  +'H'#22#166'%'#26#152#23#185#149'&'#255#137#28#168'z'#3#13#131#0#2'}'#0':77'
+  +#165#164#165'opp'#254#150#18#254#150#18#254#150#18#254#150#18#254#162'!'#254
+  +#162'!'#254#162'!'#254#162'!\'#191'Ux'#219'|'#165#241#165#165#241#165'u'#218
+  +'{O'#193'Q%'#168')R'#156'$'#242#154'3'#255#135#22't~'#2#2#129#0#255#0#255'42'
+  +'2'#178#176#178'xux'#254#150#18#254#158#28#254#162'!'#255#172'0'#255#172'0'
+  +#255#172'0'#255#176'6'#255#172'0BqCh'#207'h'#129#221#130#129#221#130'e'#206
+  +'fD'#186'E'#28#163'#:'#151#26#217#146'#'#255#132#18'R~'#2#2#129#0#255#0#255
+  +'989'#182#176#181'}st'#254#162'!'#255#172'0'#255#172'0'#255#180'<'#255#186'D'
+  +#255#186'D'#255#186'D'#255#186'D'#255#180'<F'#134'FV'#197'WV'#197'WI'#188'I2'
+  +#172'3'#12#153#22'#'#139#12#206#139#24#255'~'#10#255'~'#10#255#0#255#255#0
+  +#255'989'#182#176#181'xux'#255#172'0'#255#172'0'#255#186'D'#255#191'M'#255
+  +#196'U'#255#196'U'#255#199'\'#255#196'U'#255#192'M'#255#186'DBqC.q0%'#168')'
+  +#26#152#23#6#139#8'`'#137#14#244#132#16#255#0#255#255#0#255#255#0#255#255#0
+  +#255'989'#188#185#189'opp'#255#176'6'#255#186'D'#255#196'U'#255#199'\'#255
+  +#205'e'#255#208'j'#255#205'e'#255#205'e'#255#199'\'#255#196'U'#255#186'D'#255
+  +#180'<'#255#172'0'#137'h8*%%'#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255'A<<'#184#183#184'opp'#255#186'D'#255#196'U'#255#199'\'#255#208
+  +'j'#255#215't'#255#216'v'#255#217'x'#255#216'v'#255#208'j'#255#205'e'#255#196
+  +'U'#255#186'D'#255#172'0'#130'kM*%%'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255'989'#188#185#189'opp'#255#186'D'#255#201']'#255#208'j'
+  +#255#216'v'#255#221#129#254#226#136#254#226#136#255#221#129#255#217'x'#255
+  +#208'j'#255#199'\'#255#192'M'#255#180'<'#130'kM*%%'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255'A<<'#182#176#181'vtv'#255#196'U'#255#201
+  +']'#255#216'v'#255#217'x'#254#230#144#254#234#152#254#234#152#254#230#144#255
+  +#221#129#255#216'v'#255#205'e'#255#196'U'#255#186'D'#130'kM*%%'#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255'989'#184#183#184'opp'#255#196
+  +'U'#255#205'e'#255#216'v'#255#221#129#254#234#152#254#242#166#254#243#169#254
+  +#234#152#254#226#136#255#216'v'#255#205'e'#255#196'U'#255#186'D'#134'oS*%%'
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'A<<'#182#176#181
+  +'vtv'#201#161'W'#189#154'Q'#238#201'n'#254#226#136#254#234#150#254#242#166
+  +#254#243#169#254#234#152#254#226#136#255#216'v'#255#208'j'#255#196'U'#255#186
+  +'D'#137'tW*%%'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'9'
+  +'89'#184#183#184'nmnnmnoppoppa]]'#135#130'u'#130'~m'#167#160#129#163#152'r'
+  +#203#181'y'#197#167'b'#238#192'^'#255#196'U'#255#186'D'#142'w[*%%'#255#0#255
+  ,#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'A<<------'#212#209#213#196
+  +#196#197#173#172#173#160#160#163#141#137#140#141#137#140'xux}}~oppxuxxuxddd'
+  +#135't`}st*%%'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255'HJKHJK'#30#30#30'422788FFFZVWnmnopp'#144#141#145#128#128#128#161
+  +#154#160#144#141#145#139#131#137#132'yzZST*%%'#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJKHJKHJKHJKHJK'
+  +#30#30#30'111------------989422111'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255
+]);
+LazarusResources.Add('TROWINMESSAGECHANNEL','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#188'K'#0#188'K'#0#188'K'#0#188'K'#0#188'K'#0#188'K'#0#188
+  +'K'#0#188'K'#0#188'K'#0#188'K'#0#188'K'#0'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@@@'
+  +#255#224#186#255#220#177#255#216#169#255#212#163#255#209#159#255#209#159#255
+  +#209#159#255#209#159#255#209#159#255#216#169#188'K'#0'@'#0#192#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255'@'#0#192'@@@'#188'K'#0#188'K'#0#188'K'#0#188
+  +'K'#0#188'K'#0#188'K'#0#188'K'#0#188'K'#0#188'K'#0#255#216#169#188'K'#0'@'#0
+  +#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0
+  +#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@@@'#188'K'#0#199#199#198#199
+  +#194#187#199#189#175#199#182#160#199#180#157#199#180#157#199#180#157#188'K'#0
+  +#255#212#163#188'K'#0'@'#0#192#255#255#255'@'#0#192'@'#0#192#255#255#255#255
+  +#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@'
+  +#188'K'#0#199#199#198#199#194#187#199#190#180#199#184#167#6'C'#150#199#175
+  +#150#202#181#158#188'K'#0#255#212#163#188'K'#0'@'#0#192#255#255#255'@'#0#192
+  +#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192
+  +#255#255#255'@'#0#192'@@@'#188'K'#0#199#199#198#199#199#198#199#199#198#199
+  +#189#175'+b'#145#22'V'#154#202#184#161#188'K'#0#255#212#163#188'K'#0'@'#0#192
+  +#255#255#255'@'#0#192'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0
+  +#192#255#255#255#255#255#255'@'#0#192'@@@'#188'K'#0#199#199#198#199#199#198
+  +#199#199#198#199#194#187#199#190#180#18'p'#218#202#184#161#188'K'#0#255#212
+  +#163#188'K'#0'@'#0#192#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255'@'#0#192
+  +'@@@'#188'K'#0#199#199#198#199#199#198#199#199#198#199#199#198#22'S'#149#26
+  +#128#230'"V'#142#188'K'#0#255#216#169#188'K'#0'@'#0#192'@'#0#192'@'#0#192'@'
+  +#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192#255#254#254#188'K'#0#189#158'}'#1'G'#165#189#158'}'#189#158'}!'#129#220
+  +#23'u'#216#8'Mo'#188'K'#0#255#220#177#188'K'#0'422'#168#162#167'}st'#254#150
+  +#18#254#145#12#254#150#18#188'K'#0#255#254#254#255#254#254#255#254#254#255
+  +#254#254#255#254#254#255#254#254#255#254#254#188'K'#0#1'G'#165#24't'#207#30
+  +''#216'"'#146#251#11'Q'#146#31'x<'#255#216#169#254#229#201#188'K'#0':77'#165
+  +#164#165'opp'#254#150#18#254#150#18#254#150#18#188'K'#0#255#254#254#255#254
+  +#254#255#254#254#255#254#254#255#254#254#255#254#254#255#254#254#255#254#254
+  +#1'G'#165#21#131#251#22#131#248#12'['#188#255#233#207#254#229#201#254#229#198
+  +#254#229#198#188'K'#0'422'#178#176#178'xux'#254#150#18#254#158#28#254#162'!'
+  +#188'K'#0#255#254#254#255#254#254#255#254#254#255#254#254#255#254#254#255#254
+  +#254#255#254#254#255#254#254#1'G'#165#10'n'#235#10'o'#235#6'P'#181#255#239
+  +#224#254#233#208#254#229#201#254#233#208#188'K'#0'989'#182#176#181'}st'#254
+  +#162'!'#255#172'0'#255#172'0'#188'K'#0#255#254#254#255#254#254#255#254#254
+  +#255#254#254#255#254#254#255#254#254#255#254#254#255#254#254#1'G'#165#1'G'
+  +#165#1'G'#165#1'G'#165#1'G'#165#255#254#254#255#248#240#255#254#254#188'K'#0
+  +'989'#182#176#181'xux'#255#172'0'#255#172'0'#255#186'D'#188'K'#0#239#172'_'
+  +#239#172'_'#239#172'_'#239#172'_'#239#172'_'#239#172'_'#239#172'_'#239#172'_'
+  +#239#172'_'#239#172'_'#239#172'_'#239#172'_'#239#172'_'#238#164'S'#238#164'S'
+  +#239#169'W'#188'K'#0'989'#188#185#189'opp'#255#176'6'#255#186'D'#255#196'U'
+  +#188'K'#0#196'H'#0#196'H'#0#196'H'#0#196'H'#0#196'H'#0#196'H'#0#196'H'#0#196
+  +'H'#0#196'H'#0#196'H'#0#196'H'#0#194'H'#0#194'H'#0#194'H'#0#196'H'#0#196'H'#0
+  +#188'K'#0'A<<'#184#183#184'opp'#255#186'D'#255#196'U'#255#199'\'#255#208'j'
+  +#188'K'#0#188'K'#0#188'K'#0#188'K'#0#188'K'#0#188'K'#0#188'K'#0#188'K'#0#188
+  +'K'#0#188'K'#0#188'K'#0#188'K'#0#188'K'#0#188'K'#0#188'K'#0#188'K'#0#255#0
+  +#255'989'#188#185#189'opp'#255#186'D'#255#201']'#255#208'j'#255#216'v'#255
+  +#221#129#254#226#136#254#226#136#255#221#129#255#217'x'#255#208'j'#255#199'\'
+  +#255#192'M'#255#180'<'#130'kM*%%'#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255'A<<'#182#176#181'vtv'#255#196'U'#255#201']'#255#216'v'#255
+  +#217'x'#254#230#144#254#234#152#254#234#152#254#230#144#255#221#129#255#216
+  +'v'#255#205'e'#255#196'U'#255#186'D'#130'kM*%%'#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255'989'#184#183#184'opp'#255#196'U'#255#205'e'
+  +#255#216'v'#255#221#129#254#234#152#254#242#166#254#243#169#254#234#152#254
+  +#226#136#255#216'v'#255#205'e'#255#196'U'#255#186'D'#134'oS*%%'#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255'A<<'#182#176#181'vtv'#201#161
+  +'W'#189#154'Q'#238#201'n'#254#226#136#254#234#150#254#242#166#254#243#169#254
+  +#234#152#254#226#136#255#216'v'#255#208'j'#255#196'U'#255#186'D'#137'tW*%%'
+  ,#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'989'#184#183#184
+  +'nmnnmnoppoppa]]'#135#130'u'#130'~m'#167#160#129#163#152'r'#203#181'y'#197
+  +#167'b'#238#192'^'#255#196'U'#255#186'D'#142'w[*%%'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255'A<<------'#212#209#213#196#196#197#173#172
+  +#173#160#160#163#141#137#140#141#137#140'xux}}~oppxuxxuxddd'#135't`}st*%%'
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#30#30#30'422788FFFZVWnmnopp'#144#141#145#128#128#128#161#154
+  +#160#144#141#145#139#131#137#132'yzZST*%%'#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#30#30#30'111------------989422111'#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+]);
+LazarusResources.Add('TROWINMESSAGESERVER','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#188'K'#0#188'K'#0#188'K'#0#188'K'#0#188'K'#0#188'K'#0#188
+  +'K'#0#188'K'#0#188'K'#0#188'K'#0#188'K'#0'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@@@'
+  +#255#224#186#255#220#177#255#216#169#255#212#163#255#209#159#255#209#159#255
+  +#209#159#255#209#159#255#209#159#255#216#169#188'K'#0'@'#0#192#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255'@'#0#192'@@@'#188'K'#0#188'K'#0#188'K'#0#188
+  +'K'#0#188'K'#0#188'K'#0#188'K'#0#188'K'#0#188'K'#0#255#216#169#188'K'#0'@'#0
+  +#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0
+  +#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@@@'#188'K'#0#199#199#198#199
+  +#194#187#199#189#175#199#182#160#199#180#157#199#180#157#199#180#157#188'K'#0
+  +#255#212#163#188'K'#0'@'#0#192#255#255#255'@'#0#192'@'#0#192#255#255#255#255
+  +#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@'
+  +#188'K'#0#199#199#198#199#194#187#199#190#180#199#184#167#6'C'#150#199#175
+  +#150#202#181#158#188'K'#0#255#212#163#188'K'#0'@'#0#192#255#255#255'@'#0#192
+  +#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192
+  +#255#255#255'@'#0#192'@@@'#188'K'#0#199#199#198#199#199#198#199#199#198#199
+  +#189#175'+b'#145#22'V'#154#202#184#161#188'K'#0#255#212#163#188'K'#0'@'#0#192
+  +#255#255#255'@'#0#192'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0
+  +#192#255#255#255#255#255#255'@'#0#192'@@@'#188'K'#0#199#199#198#199#199#198
+  +#199#199#198#199#194#187#199#190#180#18'p'#218#202#184#161#188'K'#0#255#212
+  +#163#188'K'#0'@'#0#192#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255'@'#0#192
+  +'@@@'#188'K'#0#199#199#198#199#199#198#199#199#198#199#199#198#22'S'#149#26
+  +#128#230'"V'#142#188'K'#0#255#216#169#188'K'#0'@'#0#192'@'#0#192'@'#0#192'@'
+  +#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192#255#254#254#188'K'#0#189#158'}'#1'G'#165#189#158'}'#189#158'}!'#129#220
+  +#23'u'#216#8'Mo'#188'K'#0#255#220#177#188'K'#0'HJK'#196#189#194#192#186#192
+  +#189#183#189#189#183#189'HJK'#188'K'#0#255#254#254#255#254#254#255#254#254
+  +#255#254#254#255#254#254#255#254#254#255#254#254#188'K'#0#1'G'#165#24't'#207
+  +#30''#216'"'#146#251#11'Q'#146#31'x<'#255#216#169#254#229#201#188'K'#0'HJK'
+  +#198#193#198#194#189#194#192#186#192#189#183#189'HJK'#188'K'#0#255#254#254
+  +#255#254#254#255#254#254#255#254#254#255#254#254#255#254#254#255#254#254#255
+  +#254#254#1'G'#165#21#131#251#22#131#248#12'['#188#255#233#207#254#229#201#254
+  +#229#198#254#229#198#188'K'#0'HJK'#203#197#203#198#192#198#194#188#194#192
+  +#186#192'HJK'#188'K'#0#255#254#254#255#254#254#255#254#254#255#254#254#255
+  +#254#254#255#254#254#255#254#254#255#254#254#1'G'#165#10'n'#235#10'o'#235#6
+  +'P'#181#255#239#224#254#233#208#254#229#201#254#233#208#188'K'#0'HJK'#206#202
+  +#206#202#197#202#198#193#198#196#188#196'HJK'#188'K'#0#255#254#254#255#254
+  +#254#255#254#254#255#254#254#255#254#254#255#254#254#255#254#254#255#254#254
+  +#1'G'#165#1'G'#165#1'G'#165#1'G'#165#1'G'#165#255#254#254#255#248#240#255#254
+  +#254#188'K'#0'HJK'#212#208#212#207#202#207#203#197#202#198#192#198'HJK'#188
+  +'K'#0#239#172'_'#239#172'_'#239#172'_'#239#172'_'#239#172'_'#239#172'_'#239
+  +#172'_'#239#172'_'#239#172'_'#239#172'_'#239#172'_'#239#172'_'#239#172'_'#238
+  +#164'S'#238#164'S'#239#169'W'#188'K'#0'HJK'#217#213#216#212#208#212#207#202
+  +#207#203#197#202'HJK'#188'K'#0#196'H'#0#196'H'#0#196'H'#0#196'H'#0#196'H'#0
+  +#196'H'#0#196'H'#0#196'H'#0#196'H'#0#196'H'#0#196'H'#0#194'H'#0#194'H'#0#194
+  +'H'#0#196'H'#0#196'H'#0#188'K'#0'HJK'#222#218#221#217#213#217#233#231#234#207
+  +#202#207'HJK'#238#237#240#188'K'#0#188'K'#0#188'K'#0#188'K'#0#188'K'#0#188'K'
+  +#0#188'K'#0#188'K'#0#188'K'#0#188'K'#0#188'K'#0#188'K'#0#188'K'#0#188'K'#0
+  +#188'K'#0#188'K'#0#255#0#255'HJK'#227#224#227#238#237#238#156#154#156#211#207
+  +#211'HJK'#237#237#239'HJKTVWcddnnn'#140#140#140#140#140#140#140#140#140#166
+  +#166#166'HJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255'HJK'#231#230#231#144#144#146#158#157#158#216#212#216'HJK'
+  +#206#207#208#207#207#207#134#135#135'ceeNPQMOP\]]kkl'#146#146#146'HJK'#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'H'
+  +'JK'#237#235#237#146#146#147#227#224#226#255#255#255#176#176#178'QRSUVWuvw'
+  +#169#170#170#211#211#212#189#189#191''#128#129'[\]JLMHJK'#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#240#240
+  +#242#237#235#237#255#255#255#233#233#235#226#225#229#220#217#221#191#187#191
+  +#151#149#152'onrXYZNPQhij'#147#149#150#208#209#209'HJK'#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#246#246#246
+  ,#255#255#255#238#238#240#242#242#244#238#237#239#229#227#231#217#215#218#203
+  +#199#204#189#183#189#173#167#173#153#145#151#153#145#151'zsuHJK'#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255'HJK'#255#255#255#237#237#239#248#248#250#251#251#252#246#244#247#234#234
+  +#237#221#220#224#207#204#208#192#187#193#176#170#176#160#152#158'HJKHJK'#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255'HJKHJK'#233#233#234#252#252#252#246#246#247
+  +#235#234#238#222#220#224#208#204#208#193#187#193'HJKHJK'#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJKHJKHJKHJKHJKHJKHJK'
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+]);
+LazarusResources.Add('TROLOCALCHANNEL','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@@@'#30#30#30#30#30#30#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255'@'#0#192'@@@'#132'yzFFF'#30#30#30#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192#255
+  +#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0
+  +#192#255#255#255#255#255#255'@'#0#192'@@@'#132'yz'#132'yz'#30#30#30#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0
+  +#192#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255
+  +#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@'#132'yzZST---'#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0
+  +#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255
+  +#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@FFF---'#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0
+  +#192#255#255#255'@'#0#192'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192
+  +'@'#0#192#255#255#255#255#255#255'@'#0#192'@@@'#255#0#255#255#0#255#255#0#255
+  +#255#0#255#137'&'#2#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255'@'#0#192#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255'@'#0#192'@@@'#30#30
+  +#30#30#30#30#255#0#255#138''''#3#156'4'#2#138''''#3#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192#144#133#136'tlnFF'
+  +'F'#30#30#30#138''''#3#173'A'#1#171'>'#1#138''''#3#255#0#255#255#0#255#255#0
+  +#255#255#0#255'422'#168#162#167'}st'#254#150#18#254#145#12#254#150#18#254#150
+  +#18#254#150#18#254#150#18#254#150#18#254#171'9'#234#181'h'#215#186#147#182
+  +#176#181#156#146#147#136'}~'#138''''#3#142')'#3#184'I'#0#159'5'#1#138''''#3
+  +#255#0#255#255#0#255#255#0#255':77'#165#164#165'opp'#254#150#18#254#150#18
+  +#254#150#18#254#150#18#137'&'#2#137'&'#2#137'&'#2#137'&'#2#137'&'#2#137'&'#2
+  +#137'&'#2#138''''#3#138''''#3#255#0#255#138''''#3#142')'#3#184'I'#0#152'0'#2
+  +#138''''#3#255#0#255#255#0#255'422'#178#176#178'xux'#254#150#18#254#158#28
+  +#254#162'!'#255#172'0'#137'&'#2#216'r'#27#198'['#12#182'I'#2#180'C'#0#181'E'
+  +#0#182'E'#0#182'F'#0#156'4'#2#137'&'#2'422'#138''''#3#147'.'#2#184'I'#0#142
+  +')'#3#255#0#255#255#0#255'989'#182#176#181'}st'#254#162'!'#255#172'0'#255#172
+  +'0'#255#180'<'#137'&'#2#255#166'7'#226'{'#30#216'l'#16#137'&'#2#137'&'#2#137
+  +'&'#2#137'&'#2#137'&'#2#159'l*'#30#30#30#255#0#255#138''''#3#166';'#1#166';'
+  +#1#138''''#3#255#0#255'989'#182#176#181'xux'#255#172'0'#255#172'0'#255#186'D'
+  +#255#191'M'#137'&'#2#255#170'9'#226'{'#30#222'y'#30#193'Y'#15#135'#'#2#255
+  +#180'<'#255#172'0'#254#162'!'#159'l*---'#255#0#255#255#0#255#144'+'#2#182'E'
+  +#0#137''''#3#255#0#255'989'#188#185#189'opp'#255#176'6'#255#186'D'#255#196'U'
+  +#255#199'\'#137'&'#2#255#170'9'#160';'#10#138'('#3#246#147'*'#172'F'#12#135
+  +'$'#2#255#180'<'#255#172'0'#137'h8*%%'#255#0#255#255#0#255#137'&'#3#196'Q'#0
+  +#137'&'#3#255#0#255'A<<'#184#183#184'opp'#255#186'D'#255#196'U'#255#199'\'
+  +#255#208'j'#137'&'#2#255#171':'#137'&'#2#134'#'#1#157'8'#9#250#152'.'#194'['
+  +#18#135'$'#2#255#172'0'#130'kM*%%'#255#0#255#138''''#3#147'-'#2#188'K'#0#137
+  +'&'#3#255#0#255'989'#188#185#189'opp'#255#186'D'#255#201']'#255#208'j'#255
+  +#216'v'#137'&'#2#255#171':'#137'&'#2#255#221#129#136'$'#2#158'8'#9#235#137'('
+  +#209'l'#25#142'('#3#137'%'#2'*%%'#138'&'#3#137'&'#3#177'C'#0#166';'#1#138''''
+  +#3#255#0#255'A<<'#182#176#181'vtv'#255#196'U'#255#201']'#255#216'v'#255#217
+  +'x'#137'&'#2#255#172':'#137'&'#2#254#230#144#255#221#129#137'%'#2#143'*'#3
+  +#213'p'#31#234#134'#'#171'C'#9#154'4'#3#151'/'#2#177'C'#0#182'E'#0#142')'#3
+  +#255#0#255#255#0#255'989'#184#183#184'opp'#255#196'U'#255#205'e'#255#216'v'
+  +#255#221#129#136'$'#2#251#156'3'#137'&'#2#254#234#152#254#226#136#255#216'v'
+  +#137'&'#2#136'$'#2#165'@'#12#203'e'#22#203'`'#15#178'F'#3#154'3'#2#137'&'#3
+  +#138''''#3#255#0#255#255#0#255'A<<'#182#176#181'vtv'#201#161'W'#189#154'Q'
+  +#238#201'n'#254#226#136#254#234#150#137'%'#2#254#243#169#254#234#152#254#226
+  +#136#255#216'v'#255#208'j'#255#196'U'#137'&'#2#137'%'#2#137'&'#2#137'&'#3#138
+  +''''#3#255#0#255#255#0#255#255#0#255#255#0#255'989'#184#183#184'nmnnmnoppopp'
+  +'a]]'#135#130'u'#130'~m'#167#160#129#163#152'r'#203#181'y'#197#167'b'#238#192
+  +'^'#255#196'U'#255#186'D'#142'w[*%%'#255#0#255#255#0#255#255#0#255#255#0#255
+  ,#255#0#255#255#0#255'A<<------'#212#209#213#196#196#197#173#172#173#160#160
+  +#163#141#137#140#141#137#140'xux}}~oppxuxxuxddd'#135't`}st*%%'#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#30#30#30'422788FFFZVWnmnopp'#144#141#145#128#128#128#161#154#160#144#141#145
+  +#139#131#137#132'yzZST*%%'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#30#30#30'111------------989422111'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255
+]);
+LazarusResources.Add('TROLOCALSERVER','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255'@'#0#192'@@@HJKHJKHJK'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192#255#255#255
+  +'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255
+  +#255#255#255#255#255'@'#0#192'@@@{{{'#147#147#147'III'#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192#255#255
+  +#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255#255#255
+  +#255'@'#0#192#255#255#255'@'#0#192'@@@{{{'#147#147#147'III'#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192#255
+  +#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255
+  +#255#255'@'#0#192#255#255#255'@'#0#192'@@@{{{'#147#147#147'III'#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192
+  +#255#255#255'@'#0#192'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0
+  +#192#255#255#255#255#255#255'@'#0#192'@@@{{{'#147#147#147'III'#255#0#255#137
+  +'&'#2#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255'@'#0#192'@@@{{{'#147#147#147'II'
+  +'I'#138''''#3#156'4'#2#138''''#3#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'{{{{{{'#147#147#147'III'#138''''#3
+  +#173'A'#1#171'>'#1#138''''#3#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#196
+  +#189#194#192#186#192#189#183#189#189#183#189'HJK'#217#215#218'HJK{{{{{{{{{{{'
+  +'{{{{{{{'#147#147#147'III'#138''''#3#142')'#3#184'I'#0#159'5'#1#138''''#3#255
+  +#0#255#255#0#255#255#0#255'HJK'#198#193#198#194#189#194#192#186#192#189#183
+  +#189'HJK'#222#221#225#137'&'#2#137'&'#2#137'&'#2#137'&'#2#137'&'#2#137'&'#2
+  +#137'&'#2#138''''#3#138''''#3#255#0#255#138''''#3#142')'#3#184'I'#0#152'0'#2
+  +#138''''#3#255#0#255#255#0#255'HJK'#203#197#203#198#192#198#194#188#194#192
+  +#186#192'HJK'#227#226#230#137'&'#2#216'r'#27#198'['#12#182'I'#2#180'C'#0#181
+  +'E'#0#182'E'#0#182'F'#0#156'4'#2#137'&'#2#255#0#255#138''''#3#147'.'#2#184'I'
+  +#0#142')'#3#255#0#255#255#0#255'HJK'#206#202#206#202#197#202#198#193#198#196
+  +#188#196'HJK'#231#230#234#137'&'#2#255#166'7'#226'{'#30#216'l'#16#137'&'#2
+  +#137'&'#2#137'&'#2#137'&'#2#137'&'#2#255#0#255#255#0#255#255#0#255#138''''#3
+  +#166';'#1#166';'#1#138''''#3#255#0#255'HJK'#212#208#212#207#202#207#203#197
+  +#202#198#192#198'HJK'#235#234#237#137'&'#2#255#170'9'#226'{'#30#222'y'#30#193
+  +'Y'#15#135'#'#2'{{{'#147#147#147'HJK'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#144'+'#2#182'E'#0#137''''#3#255#0#255'HJK'#217#213#216#212#208#212#207#202
+  +#207#203#197#202'HJK'#237#237#239#137'&'#2#255#170'9'#160';'#10#138'('#3#246
+  +#147'*'#172'F'#12#135'$'#2#167#167#167'HJK'#255#0#255#255#0#255#255#0#255#255
+  +#0#255#137'&'#3#196'Q'#0#137'&'#3#255#0#255'HJK'#222#218#221#217#213#217#233
+  +#231#234#207#202#207'HJK'#238#237#240#137'&'#2#255#171':'#137'&'#2#134'#'#1
+  +#157'8'#9#250#152'.'#194'['#18#135'$'#2'HJK'#255#0#255#255#0#255#255#0#255
+  +#138''''#3#147'-'#2#188'K'#0#137'&'#3#255#0#255'HJK'#227#224#227#238#237#238
+  +#156#154#156#211#207#211'HJK'#237#237#239#137'&'#2#255#171':'#137'&'#2'nnn'
+  +#136'$'#2#158'8'#9#235#137'('#209'l'#25#142'('#3#137'%'#2#255#0#255#138'&'#3
+  +#137'&'#3#177'C'#0#166';'#1#138''''#3#255#0#255'HJK'#231#230#231#144#144#146
+  +#158#157#158#216#212#216'HJK'#206#207#208#137'&'#2#255#172':'#137'&'#2'NPQMO'
+  +'P'#137'%'#2#143'*'#3#213'p'#31#234#134'#'#171'C'#9#154'4'#3#151'/'#2#177'C'
+  +#0#182'E'#0#142')'#3#255#0#255#255#0#255'HJK'#237#235#237#146#146#147#227#224
+  +#226#255#255#255#176#176#178'QRS'#136'$'#2#251#156'3'#137'&'#2#211#211#212
+  +#189#189#191''#128#129#137'&'#2#136'$'#2#165'@'#12#203'e'#22#203'`'#15#178
+  +'F'#3#154'3'#2#137'&'#3#138''''#3#255#0#255#255#0#255'HJK'#240#240#242#237
+  +#235#237#255#255#255#233#233#235#226#225#229#220#217#221#191#187#191#137'%'#2
+  +'onrXYZNPQhij'#147#149#150#208#209#209#137'&'#2#137'%'#2#137'&'#2#137'&'#3
+  +#138''''#3#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#246#246#246#255#255
+  +#255#238#238#240#242#242#244#238#237#239#229#227#231#217#215#218#203#199#204
+  +#189#183#189#173#167#173#153#145#151#153#145#151'zsuHJK'#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'
+  ,#255#255#255#237#237#239#248#248#250#251#251#252#246#244#247#234#234#237#221
+  +#220#224#207#204#208#192#187#193#176#170#176#160#152#158'HJKHJK'#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255'HJKHJK'#233#233#234#252#252#252#246#246#247#235#234
+  +#238#222#220#224#208#204#208#193#187#193'HJKHJK'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJKHJKHJKHJKHJKHJKHJK'#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+]);
+LazarusResources.Add('TRONAMEDPIPECHANNEL','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#255#0#255#255#0#255#255#0#255#206'l'#9#255#240#194#235
+  +#140')'#153'3'#0#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'
+  +#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@@@'#30#30#30#30#30#30#255#0#255#206'l'#9#255#240#194#235#140
+  +')'#153'3'#0#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255'@'#0#192'@@@'#132'yzFFF'#30#30#30#206'l'#9#255
+  +#240#194#235#140')'#153'3'#0#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192
+  +#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192
+  +'@'#0#192#255#255#255#255#255#255'@'#0#192'@@@'#132'yz'#132'yz'#30#30#30#206
+  +'l'#9#255#240#194#235#140')'#153'3'#0#255#0#255#255#0#255#255#0#255#255#0#255
+  +'@'#0#192#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192#255
+  +#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@'#132'yzZST---'#206'l'
+  +#9#255#240#194#235#140')'#153'3'#0#255#0#255#255#0#255#255#0#255#255#0#255'@'
+  +#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255
+  +#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@FFF---III'#206'l'#9#255#240
+  +#194#235#140')'#153'3'#0#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192#255
+  +#255#255'@'#0#192'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192
+  +#255#255#255#255#255#255'@'#0#192'@@@{{{'#147#147#147'III'#206'l'#9#255#240
+  +#194#235#140')'#153'3'#0#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255'@'#0#192'@@@'#30#30#30#30#30#30'III'
+  +#206'l'#9#255#240#194#235#140')'#153'3'#0#255#0#255#255#0#255#255#0#255#255#0
+  +#255'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@'#0#192'@'#0#192'@'#0#192#144#133#136'tln'#8'u'#13#8'u'#13#8'u'#13
+  +#8'u'#13#8'u'#13#8'u'#13#8'u'#13#8'u'#13#255#0#255#255#0#255'422'#168#162#167
+  +'}st'#254#150#18#254#145#12#254#150#18#254#150#18#254#150#18#254#150#18#254
+  +#150#18#254#171'9'#234#181'h'#215#186#147#182#176#181#8'u'#13'7'#199'T/'#192
+  +'I'''#186'= '#179'2'#23#174''''#17#169#31#8'u'#13#255#0#255#255#0#255':77'
+  +#165#164#165'opp'#254#150#18#254#150#18#254#150#18#254#150#18#254#162'!'#254
+  +#162'!'#254#162'!'#254#162'!'#254#153#22#254#153#22#254#150#18#8'u'#13'D'#209
+  +'f<'#203'[4'#197'P-'#190'E$'#183'9'#28#178'/'#8'u'#13#255#0#255#255#0#255'42'
+  +'2'#178#176#178'xux'#254#150#18#254#158#28#254#162'!'#255#172'0'#255#172'0'
+  +#255#172'0'#255#176'6'#255#172'0'#255#172'0'#8'u'#13#8'u'#13#8'u'#13'N'#218
+  +'uH'#213'lA'#207'c9'#201'W2'#195'M)'#189'A'#8'u'#13#8'u'#13#8'u'#13'989'#182
+  +#176#181'}st'#254#162'!'#255#172'0'#255#172'0'#255#180'<'#255#186'D'#255#186
+  +'D'#255#186'D'#255#186'D'#255#180'<'#8'u'#13'A'#196'aT'#222'}T'#222'}Q'#220
+  +'yL'#216'rF'#211'j?'#205'_7'#199'T/'#192'I'#31#169'1'#8'u'#13'989'#182#176
+  +#181'xux'#255#172'0'#255#172'0'#255#186'D'#255#191'M'#255#196'U'#255#196'U'
+  +#255#199'\'#255#196'U'#255#192'M'#255#186'D'#8'u'#13'A'#196'aT'#222'}T'#222
+  +'}T'#222'}P'#219'xK'#214'pD'#209'f/'#181'G'#8'u'#13#255#0#255'989'#188#185
+  +#189'opp'#255#176'6'#255#186'D'#255#196'U'#255#199'\'#255#205'e'#255#208'j'
+  +#255#205'e'#255#205'e'#255#199'\'#255#196'U'#255#186'D'#8'u'#13'A'#196'aT'
+  +#222'}T'#222'}T'#222'}R'#221'{<'#192'['#8'u'#13#255#0#255#255#0#255'A<<'#184
+  +#183#184'opp'#255#186'D'#255#196'U'#255#199'\'#255#208'j'#255#215't'#255#216
+  +'v'#255#217'x'#255#216'v'#255#208'j'#255#205'e'#255#196'U'#255#186'D'#8'u'#13
+  +'A'#196'aT'#222'}T'#222'}A'#196'a'#8'u'#13#255#0#255#255#0#255#255#0#255'989'
+  +#188#185#189'opp'#255#186'D'#255#201']'#255#208'j'#255#216'v'#255#221#129#254
+  +#226#136#254#226#136#255#221#129#255#217'x'#255#208'j'#255#199'\'#255#192'M'
+  +#255#180'<'#8'u'#13'A'#196'aA'#196'a'#8'u'#13#255#0#255#255#0#255#255#0#255
+  +#255#0#255'A<<'#182#176#181'vtv'#255#196'U'#255#201']'#255#216'v'#255#217'x'
+  +#254#230#144#254#234#152#254#234#152#254#230#144#255#221#129#255#216'v'#255
+  +#205'e'#255#196'U'#255#186'D'#130'kM'#8'u'#13#8'u'#13#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255'989'#184#183#184'opp'#255#196'U'#255#205'e'#255
+  +#216'v'#255#221#129#254#234#152#254#242#166#254#243#169#254#234#152#254#226
+  +#136#255#216'v'#255#205'e'#255#196'U'#255#186'D'#134'oS*%%'#2'g'#155#2'g'#155
+  +#2'g'#155#255#0#255#255#0#255#255#0#255'A<<'#182#176#181'vtv'#201#161'W'#189
+  +#154'Q'#238#201'n'#254#226#136#254#234#150#254#242#166#254#243#169#254#234
+  +#152#254#226#136#255#216'v'#255#208'j'#255#196'U'#255#186'D'#137'tW*%%8'#189
+  +#229'#'#192#229#2'g'#155'k$'#0#153'3'#0#153'3'#0'989'#184#183#184'nmnnmnoppo'
+  +'ppa]]'#135#130'u'#130'~m'#167#160#129#163#152'r'#203#181'y'#197#167'b'#238
+  +#192'^'#255#196'U'#255#186'D'#142'w[*%%h'#227#255'K'#233#255#2'g'#155#170'l,'
+  ,#243#155'?'#243#155'?A<<------'#212#209#213#196#196#197#173#172#173#160#160
+  +#163#141#137#140#141#137#140'xux}}~oppxuxxuxddd'#135't`}st*%%'#136#231#255'l'
+  +#237#255#2'g'#155#178#168#135#255#240#194#255#240#194#255#0#255'HJKHJK'#30#30
+  +#30'422788FFFZVWnmnopp'#144#141#145#128#128#128#161#154#160#144#141#145#139
+  +#131#137#132'yzZST*%%'#169#238#255#145#244#255#2'g'#155#144'K'#6#206'l'#9#206
+  +'l'#9#255#0#255#255#0#255#255#0#255'HJKHJKHJKHJKHJK'#30#30#30'111-----------'
+  +'-989422111'#2'g'#155#2'g'#155#2'g'#155#2'g'#155#255#0#255#255#0#255#255#0
+  +#255
+]);
+LazarusResources.Add('TRONAMEDPIPESERVER','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#255#0#255#255#0#255#255#0#255#206'l'#9#255#240#194#235
+  +#140')'#153'3'#0#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'
+  +#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@@@'#255#0#255#255#0#255#255#0#255#206'l'#9#255#240#194#235#140
+  +')'#153'3'#0#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255'@'#0#192'@@@HJKHJKHJK'#206'l'#9#255#240#194#235
+  +#140')'#153'3'#0#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192#255#255#255
+  +'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255
+  +#255#255#255#255#255'@'#0#192'@@@{{{'#147#147#147'III'#206'l'#9#255#240#194
+  +#235#140')'#153'3'#0#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192#255#255
+  +#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255#255#255
+  +#255'@'#0#192#255#255#255'@'#0#192'@@@{{{'#147#147#147'III'#206'l'#9#255#240
+  +#194#235#140')'#153'3'#0#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192#255
+  +#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255
+  +#255#255'@'#0#192#255#255#255'@'#0#192'@@@{{{'#147#147#147'III'#206'l'#9#255
+  +#240#194#235#140')'#153'3'#0#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192
+  +#255#255#255'@'#0#192'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0
+  +#192#255#255#255#255#255#255'@'#0#192'@@@{{{'#147#147#147'III'#206'l'#9#255
+  +#240#194#235#140')'#153'3'#0#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255'@'#0#192'@@@{{{'#147#147#147'II'
+  +'I'#206'l'#9#255#240#194#235#140')'#153'3'#0#255#0#255#255#0#255#255#0#255
+  +#255#0#255'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'
+  +#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'{{{{{{'#8'u'#13#8'u'#13#8'u'#13#8
+  +'u'#13#8'u'#13#8'u'#13#8'u'#13#8'u'#13#255#0#255#255#0#255'HJK'#196#189#194
+  +#192#186#192#189#183#189#189#183#189'HJK'#217#215#218'HJK{{{{{{{{{{{{{{{{{{'
+  +#8'u'#13'7'#199'T/'#192'I'''#186'= '#179'2'#23#174''''#17#169#31#8'u'#13#255
+  +#0#255#255#0#255'HJK'#198#193#198#194#189#194#192#186#192#189#183#189'HJK'
+  +#222#221#225'HJK{{{{{{{{{{{{{{{{{{'#8'u'#13'D'#209'f<'#203'[4'#197'P-'#190'E'
+  +'$'#183'9'#28#178'/'#8'u'#13#255#0#255#255#0#255'HJK'#203#197#203#198#192#198
+  +#194#188#194#192#186#192'HJK'#227#226#230'HJK{{{{{{{{{{{{'#8'u'#13#8'u'#13#8
+  +'u'#13'N'#218'uH'#213'lA'#207'c9'#201'W2'#195'M)'#189'A'#8'u'#13#8'u'#13#8'u'
+  +#13'HJK'#206#202#206#202#197#202#198#193#198#196#188#196'HJK'#231#230#234'HJ'
+  +'K{{{{{{{{{{{{'#8'u'#13'A'#196'aT'#222'}T'#222'}Q'#220'yL'#216'rF'#211'j?'
+  +#205'_7'#199'T/'#192'I'#31#169'1'#8'u'#13'HJK'#212#208#212#207#202#207#203
+  +#197#202#198#192#198'HJK'#235#234#237'HJK'#134#134#134#134#134#134#134#134
+  +#134#146#146#146'{{{'#8'u'#13'A'#196'aT'#222'}T'#222'}T'#222'}P'#219'xK'#214
+  +'pD'#209'f/'#181'G'#8'u'#13#255#0#255'HJK'#217#213#216#212#208#212#207#202
+  +#207#203#197#202'HJK'#237#237#239'HJK{{{{{{{{{ooo'#134#134#134#134#134#134#8
+  +'u'#13'A'#196'aT'#222'}T'#222'}T'#222'}R'#221'{<'#192'['#8'u'#13#255#0#255
+  +#255#0#255'HJK'#222#218#221#217#213#217#233#231#234#207#202#207'HJK'#238#237
+  +#240'HJK'#140#140#140#140#140#140#146#146#146'{{{{{{{{{'#143#143#143#8'u'#13
+  +'A'#196'aT'#222'}T'#222'}A'#196'a'#8'u'#13#255#0#255#255#0#255#255#0#255'HJK'
+  +#227#224#227#238#237#238#156#154#156#211#207#211'HJK'#237#237#239'HJKTVWcddn'
+  +'nn'#140#140#140#140#140#140#140#140#140#166#166#166'HJK'#8'u'#13'A'#196'aA'
+  +#196'a'#8'u'#13#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#231#230#231#144
+  +#144#146#158#157#158#216#212#216'HJK'#206#207#208#207#207#207#134#135#135'ce'
+  +'eNPQMOP\]]kkl'#146#146#146'HJK'#255#0#255#8'u'#13#8'u'#13#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255'HJK'#237#235#237#146#146#147#227#224#226
+  +#255#255#255#176#176#178'QRSUVWuvw'#169#170#170#211#211#212#189#189#191''
+  +#128#129'[\]JLMHJK'#2'g'#155#2'g'#155#2'g'#155#2'g'#155#2'g'#155#255#0#255
+  +#255#0#255#255#0#255'HJK'#240#240#242#237#235#237#255#255#255#233#233#235#226
+  +#225#229#220#217#221#191#187#191#151#149#152'onrXYZNPQhij'#147#149#150#208
+  +#209#209'HJKw'#210#229'O'#194#229'8'#189#229'#'#192#229#2'g'#155'k$'#0#153'3'
+  +#0#153'3'#0'HJK'#246#246#246#255#255#255#238#238#240#242#242#244#238#237#239
+  +#229#227#231#217#215#218#203#199#204#189#183#189#173#167#173#153#145#151#153
+  +#145#151'zsuHJK'#2'g'#155#194#255#255#138#234#255'h'#227#255'K'#233#255#2'g'
+  +#155#170'l,'#243#155'?'#243#155'?HJK'#255#255#255#237#237#239#248#248#250#251
+  +#251#252#246#244#247#234#234#237#221#220#224#207#204#208#192#187#193#176#170
+  +#176#160#152#158'HJKHJK'#255#240#194#2'g'#155#222#255#255#167#237#255#136#231
+  +#255'l'#237#255#2'g'#155#178#168#135#255#240#194#255#240#194#255#0#255'HJKHJ'
+  ,'K'#233#233#234#252#252#252#246#246#247#235#234#238#222#220#224#208#204#208
+  +#193#187#193'HJKHJK'#206'l'#9#206'l'#9#206'l'#9#2'g'#155#253#255#255#198#244
+  +#255#169#238#255#145#244#255#2'g'#155#144'K'#6#206'l'#9#206'l'#9#255#0#255
+  +#255#0#255#255#0#255'HJKHJKHJKHJKHJKHJKHJK'#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#2'g'#155#2'g'#155#2'g'#155#2'g'#155#2'g'#155#2'g'#155#255#0
+  +#255#255#0#255#255#0#255
+]);
+LazarusResources.Add('TRODLLCHANNEL','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#129#30
+  +#0'w'#23#0'w'#23#0#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@@@'#30#30#30#30#30#30#255#0#255#129#30#0#129#30#0#129#30#0#252#154'*'
+  +#184':'#0#184':'#0#128'*'#3#255#0#255'@'#0#192#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255'@'#0#192'@@@'#132'yzFFF'#130#24#0#129#30#0#248'w'#0#255#129
+  +#0#255#149#19#255#170'4'#255#189'Z'#138#31#0#255#0#255'@'#0#192#255#255#255
+  +'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255
+  +#255#255#255#255#255'@'#0#192'@@@'#132'yz'#132'yz'#130#24#0'y'#16#0#255#158
+  +' '#252'w'#0#143#30#0#213'g'#10#255#171'8'#138#31#0#255#0#255'@'#0#192#255
+  +#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255#255
+  +#255#255'@'#0#192#255#255#255'@'#0#192'@@@'#132'yz'#130#24#0#130#24#0#221#152
+  +'Z'#255#191']'#186'M'#5#255#0#255'v'#12#0#242#134#20#252#160'4'#138#31#0'@'#0
+  +#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255
+  +#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@'#9'o'#164'W9'#23#171'3'#0
+  +#233#171'n'#255#215#146#193'e%'#255#0#255'v'#12#0#242'w'#1#255#150#25#138#31
+  +#0'@'#0#192#255#255#255'@'#0#192'@'#0#192'@'#0#192#255#255#255#255#255#255'@'
+  +#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@@@I'#221#255#0'v'#186#0'v'
+  +#186'YVE'#255#218#154#233#170'j'#145'%'#0#193'M'#0#255'~'#0#138#31#0#255#0
+  +#255'@'#0#192#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255'@'#0#192'@@@'''#212
+  +#255'N'#222#255'y'#233#255#0'v'#186#255#218#154#255#218#154#255#211#137#255
+  +#177'C'#255#138#7#138#31#0#255#0#255'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192#0#158#218
+  +#0'N'#138#22#163#212'R'#224#255#0'v'#186#196'f#'#203'g'#25#255#218#154#184':'
+  +#0#184':'#0#184':'#0#255#0#255'422'#168#162#167'}st'#254#150#18#254#145#12
+  +#254#150#18#254#150#18#254#150#18#0';v'#11#128#176#156#233#254'h'#230#255#255
+  +#0#255#0'A~'#0'F'#129'0'#215#255'M'#215#254'%_p'#184':'#0#184':'#0#255#0#255
+  +#255#0#255#255#0#255#255#0#255':77'#165#164#165'opp'#254#150#18#254#150#18
+  +#254#150#18#254#150#18#254#162'!'#0';v'#3'{'#176#165#235#254#167#243#255#255
+  +#0#255#0'L'#138#0'N'#138#19#204#255'-'#206#252#13'b'#145#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255'422'#178#176#178'xux'#254#150#18#254
+  +#158#28#254#162'!'#255#172'0'#255#172'0'#255#172'0'#0'@z'#24#150#196#182#246
+  +#255'~'#212#238#3'g'#157#13#182#235#1#198#255#13'b'#145'422'#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255'989'#182#176#181'}st'#254#162'!'
+  +#255#172'0'#255#172'0'#255#180'<'#255#186'D'#255#186'D'#0'A~'#27#153#196#181
+  +#244#255#182#246#255#154#240#255'N'#222#255#13#202#255#13'b'#145#30#30#30#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'989'#182#176#181'xu'
+  +'x'#255#172'0'#255#172'0'#255#186'D'#255#191'M'#255#196'U'#255#196'U'#255#199
+  +'\'#0'Ay'#0'E~;'#175#213#182#246#255#13'b'#145#13'b'#145#159'l*---'#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'989'#188#185#189'opp'#255
+  +#176'6'#255#186'D'#255#196'U'#255#199'\'#255#205'e'#255#208'j'#255#205'e'#255
+  +#205'e'#255#199'\'#0'A{'#0'E{'#255#180'<'#255#172'0'#137'h8*%%'#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255'A<<'#184#183#184'opp'#255#186
+  +'D'#255#196'U'#255#199'\'#255#208'j'#255#215't'#255#216'v'#255#217'x'#255#216
+  +'v'#255#208'j'#255#205'e'#255#196'U'#255#186'D'#255#172'0'#130'kM*%%'#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'989'#188#185#189'opp'
+  +#255#186'D'#255#201']'#255#208'j'#255#216'v'#255#221#129#254#226#136#254#226
+  +#136#255#221#129#255#217'x'#255#208'j'#255#199'\'#255#192'M'#255#180'<'#130
+  +'kM*%%'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'A<<'#182
+  +#176#181'vtv'#255#196'U'#255#201']'#255#216'v'#255#217'x'#254#230#144#254#234
+  +#152#254#234#152#254#230#144#255#221#129#255#216'v'#255#205'e'#255#196'U'#255
+  +#186'D'#130'kM*%%'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255'989'#184#183#184'opp'#255#196'U'#255#205'e'#255#216'v'#255#221#129#254
+  +#234#152#254#242#166#254#243#169#254#234#152#254#226#136#255#216'v'#255#205
+  +'e'#255#196'U'#255#186'D'#134'oS*%%'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255'A<<'#182#176#181'vtv'#201#161'W'#189#154'Q'#238#201'n'
+  +#254#226#136#254#234#150#254#242#166#254#243#169#254#234#152#254#226#136#255
+  +#216'v'#255#208'j'#255#196'U'#255#186'D'#137'tW*%%'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255'989'#184#183#184'nmnnmnoppoppa]]'#135#130
+  +'u'#130'~m'#167#160#129#163#152'r'#203#181'y'#197#167'b'#238#192'^'#255#196
+  ,'U'#255#186'D'#142'w[*%%'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255'A<<------'#212#209#213#196#196#197#173#172#173#160#160#163#141#137
+  +#140#141#137#140'xux}}~oppxuxxuxddd'#135't`}st*%%'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255'HJKHJK'#30#30#30'422788FFFZVWnm'
+  +'nopp'#144#141#145#128#128#128#161#154#160#144#141#145#139#131#137#132'yzZST'
+  +'*%%'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255'HJKHJKHJKHJKHJK'#30#30#30'111------------989422111'#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+]);
+LazarusResources.Add('TROREMOTESERVICE','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@@@'#255#0#255#255#0#255#255#0#255'UUVUUVUUVUUV'#255#0#255#255#0
+  +#255#255#0#255#255#0#255'@'#0#192#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +'@'#0#192'@@@'#255#0#255'---jhj'#165#164#166#156#153#157#145#142#146'ifi/..'
+  +#255#0#255#255#0#255#255#0#255'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0
+  +#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0
+  +#192'@@@EAB'#225#224#226#225#224#226#165#164#166#156#153#157#145#142#146#176
+  +#172#177#160#152#158'EAB'#255#0#255#255#0#255'@'#0#192#255#255#255'@'#0#192
+  +'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192
+  +#255#255#255'@'#0#192'@@@eee'#246#244#247#176#172#177#142#139#142#166#165#167
+  +#134#130#134'KHJ'#160#152#158'c]_'#255#0#255#255#0#255'@'#0#192#255#255#255
+  +'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255
+  +'@'#0#192#255#255#255'@'#0#192'@@@'#28'3'#31'bbc`_`ooo'#166#165#167#176#172
+  +#177'ZVYYVX)(('#255#0#255#255#0#255'@'#0#192#255#255#255'@'#0#192'@'#0#192'@'
+  +#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0
+  +#192'@@@'#184#181#184#204#199#203#171#163#166#129'zwogiWSU989'#30#30#30#255#0
+  +#255#255#0#255#255#0#255'@'#0#192#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +'@'#0#192'@@@'#189#135'5'#254#171'9'#249#202't'#254#217#164#230#215#194#204
+  +#199#203#184#181#184#159#153#159'\Z\'#30#30#30#255#0#255'@'#0#192'@'#0#192'@'
+  +#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192#22'K'#140#31'KwJYT'#151's/'#250#150#20#252#158#31#253#160'"'
+  +#243#169'H'#218#171'j'#187#169#137#142#139#142'989'#255#0#255#244#129#13#244
+  +#134#19#244#139#27#244#143' '#11'=~/Mg'#246#147'()bP'#6'A'#138#15'^'#187#24
+  +'~'#229#30#137#242#25#133#243#18'v'#230#9'V'#181':Wg'#225#159'4'#254#169'*'
+  +#254#167')'#253#160'"'#254#152#20#197't'#28'LKL'#244#134#17#244#139#27#244
+  +#146''''#246#152'0'#246#154'4'#11'?'#130#3'A'#154#15'@}'#9'L'#161#22'y'#225
+  +'$'#146#250'&'#145#242#25't'#206#17'_'#183#17']'#178#12'`'#197#7'R'#182'(Tz'
+  +#229#173'I'#255#186'C'#255#177'5'#254#165'%'#190'y'#28'HGH'#244#139#27#244
+  +#146''''#246#157'6'#246#163'B'#246#166'I'#11'?'#130#10'l'#231#9'b'#209#21'}'
+  +#237'$'#146#250'('#147#238#14'P'#157#21'A{ecI'#196#157'L'#136#135'd''V'#131#5
+  +'@'#145'Lit'#255#196'T'#255#189'J'#255#177'5'#190'y'#28'EAB'#244#146''''#246
+  +#157'6C'#164'-C'#164'-t'#169'='#9'?'#129#10'l'#231#13't'#237#24#129#239'&'
+  +#145#242#15'V'#164#11'DOuss'#189#135'5'#255#196'T'#255#207'g'#249#202'ts'#135
+  +'}'#5':'#130#255#208'j'#255#199'Z'#255#186'C'#189#134'-A>@'#246#152'0'#177
+  +#163':'#17#163'#'#17#163'#'#17#163'#'#5'>'#10'l'#231#13't'#237#25#133#243#26
+  +'x'#212#5':{'#22'Y$vut'#189#146'B'#255#203'`'#255#215'u'#255#225#134#254#230
+  +#145#149#163#136#255#219'|'#255#207'g'#255#194'Q'#173'~1>:;'#246#159';'#204
+  +#165'M'#28#164'('#17#163'#'#17#163'#'#5'>'#10'l'#231#10'r'#242#20'~'#242#30
+  +#137#242#20'f'#187#6'<xWgx'#189#146'B'#255#207'g'#255#219'|'#254#233#150#254
+  +#243#167#254#235#154#255#225#134#255#211'm'#255#197'V'#161'F>:;'#246#163'B'
+  +#247#175'X'#187#182'^%'#167'.'#17#163'#'#5'='#128#3'K'#182#7'R'#182#9'Q'#171
+  +#11'O'#163#10'M'#151#6'=}+Q}'#129'zw'#187#175#150#169#160#130#187#169#137#169
+  +#160#130#189#171'n'#189#171'n'#255#208'j'#255#194'Q'#164#129'H/..'#243#169'H'
+  +#247#177'^'#247#189'w'#226#202#135'u'#188'b'#8'Jp'#7'In'#9'ZY'#11'nH'#15#146
+  +'/'#15#146'/'#22'c!J=,(% '#30#30#30'''''''HGHPPQdce`_`HGHYVXdZN'#30#30#30#255
+  +#0#255#247#177'^'#247#189'w'#248#203#146#250#217#175#231#225#189'X'#189'_'#17
+  +#163'#'#17#163'#'#17#163'#'#17#163'#%'#165'+'#230#176'Y'#246#164'D'#246#152
+  +'0'#197't'#28#183'e'#11']\'#19#23'Z!'#24'Q &/'''#30#30#30#30#30#30#255#0#255
+  +#255#0#255#28#164'('#163#181'Y'#248#200#141#248#211#164#250#222#187#231#225
+  +#189#27#166'+'#17#163'#'#17#163'#'#17#163'#'#17#163'#%'#164')='#163'+'#26#161
+  +'#'#244#138#24#244''#9'5'#152#27#17#163'#'#17#163'#'#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#17#163'#'#147#183'['#248#203#146#248#211
+  +#164#250#217#175'='#176'A'#17#163'#'#17#163'#'#17#163'#'#17#163'#'#17#163'#'
+  +#17#163'#%'#160'#'#244#136#22#243'}'#7#17#163'#'#17#163'#'#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#17#163'#'
+  +#147#183'['#248#200#141#248#203#146'='#172'<'#17#163'#'#17#163'#'#17#163'#'
+  +#17#163'#'#17#163'#'#17#163'#q'#151#31#244#132#16#243'y'#4#17#163'#'#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  ,#255#0#255#255#0#255#17#163'#'#187#182'^'#230#188'r%'#167'.'#17#163'#'#17#163
+  +'#'#17#163'#'#17#163'#'#17#163'#'#26#161'#'#227#138#24#244''#9#236'r'#1#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#17#163'#%'#165'+'#17#163'#'#17#163
+  +'#'#17#163'#'#17#163'#'#17#163'#'#17#163'#'#160#146#28#244#131#15#243'y'#4
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#17
+  +#163'#'#17#163'#'#17#163'#'#17#163'#'#17#163'#q'#151#31#244#134#19#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255
+]);
+LazarusResources.Add('TRODYNAMICREQUEST','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#0#0#130#0#0#130#0#0#130#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#4#9#151#8''''#218
+  +#0#3#199#0#0#169#0#0#130#255#0#255'@'#0#192#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255'@'#0#192'@@@'#255#0#255#255#0#255#255#0#255#255#0#255#7#14#159
+  +#29'@'#242#16'3'#250#3'"'#251#0#2#196#0#0#167#0#0#130'@'#0#192#255#255#255'@'
+  +#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255
+  +#255#255#255#255'@'#0#192'@@@'#255#0#255#255#0#255#255#0#255#8#16#163#31'='
+  +#242#3#5#171#13'3'#254#1#27#248#2#23#240#0#1#193#0#0#130'@'#0#192#255#255#255
+  +'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255#255#255#255
+  +'@'#0#192#255#255#255'@'#0#192'@@@'#255#0#255#255#0#255#9#16#163' >'#242#3#5
+  +#171'Bg'#254#3#31#248#3#17#230#6#9#212#0#0#175#0#0#130'@'#0#192#255#255#255
+  +'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255
+  +'@'#0#192#255#255#255'@'#0#192'@@@'#255#0#255#9#17#163'!?'#242#3#5#171'Cg'
+  +#254#3#31#250#1#5#176#12'*'#246#15#15#202#0#0#130#255#0#255'@'#0#192#255#255
+  +#255'@'#0#192'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255
+  +#255#255#255#255#255'@'#0#192'@@@'#17'!'#186'"A'#242#3#5#171'Cg'#254#3' '#251
+  +#1#5#175'6O'#244#28'.'#225#0#0#130#255#0#255#255#0#255'@'#0#192#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255'@'#0#192'@@@'#16#29#191#3#5#171'Cg'#254#3'"'
+  +#252#1#5#175'4H'#240#26','#225#0#0#130#255#0#255#255#0#255#255#0#255'@'#0#192
+  +'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192#255#0#255#7#13#192'Dh'#254#3'#'#252#1#5#173'3A'#235#22
+  +'('#225#0#0#130#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#192'Q'#3
+  +#255#235#177#239#131'('#129#30#0#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#1#0#139#1#0#139#0#0#130#1#28#242#1#5#173'3='#230#19'$'#226#0
+  +#0#130#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#192'Q'#3
+  +#255#235#177#239#131'('#129#30#0#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#1#0#139'$I'#243#15'5'#255#0#22#222#0#2#145#0#0#130#0#0#130#0#0#130#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#192'Q'#3
+  +#255#235#177#239#131'('#129#30#0#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#5#11#192#16'5'#252#0#22#222#0#3#151#0#0#130#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#192'Q'#3#255#235#177#239#131'('#129#30#0#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#5#11#192#5#31#243#4#14#194#1#3#137#1#0#139#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#192'Q'#3#255#235#177#239#131'('#129#30#0#255#0#255#255#0#255#255#0#255
+  +#255#0#255'wuoIHD'#8#4#142#0#0#130#0#0#130#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +'w2'#2#158#146'm'#149'Q'#24'P'#19#0#255#0#255#255#0#255#255#0#255'ifcIHD'#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0'L'#131#0'L'
+  +#131#0'L'#131#0'L'#131#0'L'#131#0'L'#131#255#0#255'[XWIHD'#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0'L'#131'x'#240
+  +#255'Q'#231#255'2'#226#255#18#175#221#0'L'#131'P'#19#0'IHD[XW'#129#30#0#129
+  +#30#0#129#30#0#129#30#0'{ '#2'{ '#2'{ '#2'{ '#2'{ '#2'{ '#2'{ '#2'{ '#2'{ '#2
+  +'{ '#2'{ '#2#0'L'#131#147#233#255'n'#224#255'M'#218#255'"'#171#221#0'L'#131
+  +#142'G'#14#229's'#22#229's'#22#229's'#22#229's'#22#229's'#22#229's'#22#229's'
+  +#22#229's'#22#229's'#22#229's'#22#229's'#22#229's'#22#229's'#22#229's'#22#229
+  +'s'#22#229's'#22#229's'#22#0'L'#131#182#240#255#145#231#255'p'#227#255'5'#177
+  +#221#0'L'#131#158#146'm'#255#235#177#255#235#177#255#235#177#255#235#177#255
+  +#235#177#255#235#177#255#235#177#255#235#177#255#235#177#255#235#177#255#235
+  +#177#255#235#177#255#235#177#255#235#177#255#235#177#255#235#177#255#235#177
+  +#0'L'#131#252#255#255#212#255#255#177#255#255'\'#197#221#0'L'#131'w2'#2#192
+  +'Q'#3#192'Q'#3#192'Q'#3#192'Q'#3#192'Q'#3#192'Q'#3#192'Q'#3#192'Q'#3#192'Q'#3
+  +#192'Q'#3#192'Q'#3#192'Q'#3#192'Q'#3#192'Q'#3#192'Q'#3#192'Q'#3#192'Q'#3#0'L'
+  +#131#0'L'#131#0'L'#131#0'L'#131#0'L'#131#0'L'#131#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  ,#255#255#0#255#192'Q'#3#255#235#177#239#131'('#129#30#0#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#192'Q'#3#255#235#177#239#131'('#129#30#0#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#192'Q'#3#255#235#177#239#131'('
+  +#129#30#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+]);
+LazarusResources.Add('TROMASTERSERVERSESSIONMANAGER','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#0'Z'#0#0'Z'#0#0'Z'#0#0'Z'#0#0'Z'#0#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@@@'
+  +#3#143#10#17#172'.'#22#175'2'#13#146#15#0''#0#0'Z'#0#0'Z'#0#255#0#255#255#0
+  +#255#255#0#255#255#0#255'@'#0#192#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +'@'#0#192'@@@'#31#189'L'#23#186'K'#15#147#19#140#226#140#17#144#19#0'z'#0#0
+  +']'#0'n-'#19'n-'#19#255#0#255#255#0#255'@'#0#192#255#255#255'@'#0#192#255#255
+  +#255'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255
+  +#255'@'#0#192'@@@"'#202'Y'#15#147#19'p'#211'j'#255#240#239#30#157'"'#7#147#24
+  +#0'\'#0#244'[A'#248'J6n-'#19'n-'#19'@'#0#192#255#255#255'@'#0#192'@'#0#192
+  +#255#255#255#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255
+  +#255'@'#0#192'@@@'#23#178'='#15#147#19#160#199#188#251#252#252#25#164'$'#12
+  +#150'%'#0'Z'#1#237#156#136#234#136't'#225'@#n-'#19'@'#0#192#255#255#255'@'#0
+  +#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0
+  +#192#255#255#255'@'#0#192'@@@'#12')'#24'1X~.X'#146'5i'#130#17#135'8'#0'Z'#0
+  +#184'A'#23#255#240#239#226#176#154#212'C'#31'n-'#19'@'#0#192#255#255#255'@'#0
+  +#192'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255
+  +#255#255#255'@'#0#192'@@@'#9#17'?'#7')'#154#5'('#149#2#29#143#2#29#143#184'A'
+  +#23#233#161#140#251#252#252#229#160#136#226'U-n-'#19'@'#0#192#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255'@'#0#192'@@@'#14'?'#167#13'A'#181#13'?'#172#14
+  +'@'#175#2#28#145#134'wwZ'#135#153'W'#131#143#149'hR'#181'2'#21#255#0#255'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@'#0#192'@'#0#192#10#28'='#18'T'#213#16'M'#198#17'M'#197#17'M'#197
+  +#17'L'#203#17'W'#139#9'_'#194#4'W'#193#11'n'#154#13#13#13#255#0#255'~~~UUUII'
+  +'IIII$F'#196#14'?'#255#7':'#255#1'4'#254#28'4'#153'111'#3#3#4#0#0#0#10#26'1'
+  +#24'j'#229#22'g'#229#22'c'#221#22'c'#221#23'e'#231#17'W'#139' '#129#251#30'{'
+  +#247#22'k'#239#11'n'#154'UUUdddUUUUUUIII6O'#166#14'?'#255#14'?'#255#7':'#255
+  +'*9x888'#5#5#6#10#9#7#24#27#31#28'['#169#31#139#255#31#138#255#31#139#255#31
+  +#138#255#17'W'#139')'#145#250'&'#142#250'!'#132#250#26'p'#235#11'n'#154'^^^U'
+  +'UUUUUUUUJMX+J'#187' E'#209'(A'#161'AAA888888%%%USP+2:'#17'5]'#19'K'#135#23
+  +'W'#154#22'Cx('#142#230'0'#157#251'-'#152#250'('#144#251#31#130#247#11'n'#154
+  +'^^^^^^UUUUUUIIIUUUIIIAAAAAAAAA888'#5#5#6'AABNKJ865'#22#19#19#5#3#3#5#2#1#2
+  +'7\5'#166#255'1'#157#251','#150#251'#'#137#246#11'n'#154'hhh^^^UUU^^^UUUIIIP'
+  +'PPIIIIIIAAAAAA4;T'#1'4'#254' '#31'"'#29#28#28#20#20#20#12#12#12#2'Bm'#29'x'
+  +#189'9'#172#255'7'#167#255'4'#160#255#11'n'#154'...'#138#138#138'ddd^^^UUUUU'
+  +'UUUUUUUIIIIIICJ`?BN888'#29'<'#182#1'4'#254'+3Y111'#19'i'#156'R'#152#188#21
+  +'c'#146#3'>h'#3'>h'#0'<j'#11'n'#154'UUU'#255#0#255'dddddd^^^X[eNZ'#129'QT^UU'
+  +'UDMn'#29'K'#243#23'E'#243'"A'#184#7':'#255#16'6'#205'58D111111#w'#166#22'i'
+  +#151#7'P~'#0'<j!!!!!!'#255#0#255#255#0#255'dddddd_bkEk'#224'9h'#255'A^'#191
+  +'UUU>S'#157' Q'#255#26'K'#255#14'?'#255#14'?'#255'AAA888888888'#31'-u'#12'%'
+  +#178#16'#'#150')))!!!!!!'#255#0#255#255#0#255#143#143#143'hhhagxGs'#245'9h'
+  +#255'9h'#255'C^'#181'2\'#233' Q'#255' Q'#255' Q'#255#14'?'#255#14'?'#255'"A'
+  +#184'888888111111)))))))))~~~'#255#0#255#255#0#255#255#0#255'hhhhhh[l'#159'F'
+  +'t'#255'?n'#255'9h'#255'3b'#255'3b'#255' Q'#255' Q'#255' Q'#255#14'?'#255#20
+  +'@'#231'AAA888888888111111888'#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255'hhhhhh[l'#159'Ft'#255'?n'#255'9h'#255'3b'#255'3b'#255' Q'#255' Q'#255' '
+  +'Q'#255'$F'#196'2A}"A'#184'1:`888888111'#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255'hhhhhh_h'#130'Lo'#216'9h'#255'9h'#255'3b'
+  +#255'3b'#255' Q'#255' Q'#255#26'K'#255#14'?'#255' E'#209'8>W888888'#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255'hhhhhhddd_h'#130'Nf'#175'Cd'#204'<_'#213'<_'#213'3U'#200'6O'#166'CJ`III'
+  +'AAAIII'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#143#143#143'hhhdddddd^^^^^^UUUU'
+  +'UUUUUIIIIIIvvv'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#138#138#138'hhh^^^^^^^^^~~~'#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+]);
+LazarusResources.Add('TROINMEMORYSESSIONMANAGER','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#0'Z'#0#0'Z'#0#0'Z'#0#0'Z'#0#0'Z'#0#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@@@'
+  +#3#143#10#17#172'.'#22#175'2'#13#146#15#0''#0#0'Z'#0#0'Z'#0#255#0#255#255#0
+  +#255#255#0#255#255#0#255'@'#0#192#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +'@'#0#192'@@@'#31#189'L'#23#186'K'#15#147#19#140#226#140#17#144#19#0'z'#0#0
+  +']'#0'n-'#19'n-'#19#255#0#255#255#0#255'@'#0#192#255#255#255'@'#0#192#255#255
+  +#255'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255
+  +#255'@'#0#192'@@@"'#202'Y'#15#147#19'p'#211'j'#255#240#239#30#157'"'#7#147#24
+  +#0'\'#0#244'[A'#248'J6n-'#19'n-'#19'@'#0#192#255#255#255'@'#0#192'@'#0#192
+  +#255#255#255#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255
+  +#255'@'#0#192'@@@'#23#178'='#15#147#19#160#199#188#251#252#252#25#164'$'#12
+  +#150'%'#0'Z'#1#237#156#136#234#136't'#225'@#n-'#19'@'#0#192#255#255#255'@'#0
+  +#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0
+  +#192#255#255#255'@'#0#192'@@@'#12')'#24'1X~.X'#146'5i'#130#17#135'8'#0'Z'#0
+  +#184'A'#23#255#240#239#226#176#154#212'C'#31'n-'#19'@'#0#192#255#255#255'@'#0
+  +#192'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255
+  +#255#255#255'@'#0#192'@@@'#9#17'?'#7')'#154#5'('#149#2#29#143#2#29#143#184'A'
+  +#23#233#161#140#251#252#252#229#160#136#226'U-n-'#19'@'#0#192#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255'@'#0#192'@@@'#14'?'#167#13'A'#181#13'?'#172#14
+  +'@'#175#2#28#145#134'wwZ'#135#153'W'#131#143#149'hR'#181'2'#21#255#0#255'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@'#0#192'@'#0#192#10#28'='#18'T'#213#16'M'#198#17'M'#197#17'M'#197
+  +#17'L'#203#17'W'#139#9'_'#194#4'W'#193#11'n'#154#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'Z[[==='#203#202#202
+  +#158#157#157#3#3#4#0#0#0#10#26'1'#24'j'#229#22'g'#229#22'c'#221#22'c'#221#23
+  +'e'#231#17'W'#139' '#129#251#30'{'#247#22'k'#239#11'n'#154#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255'Z[[QQQmkl'#233#230#231#152#151
+  +#152#5#5#6#10#9#7#24#27#31#28'['#169#31#139#255#31#138#255#31#139#255#31#138
+  +#255#17'W'#139')'#145#250'&'#142#250'!'#132#250#26'p'#235#11'n'#154#255#0#255
+  +#255#0#255#255#0#255#255#0#255'Z[[QQQ'#226#225#225'mkl'#218#215#217#146#144
+  +#145'v9'#23'%%%USP+2:'#17'5]'#19'K'#135#23'W'#154#22'Cx('#142#230'0'#157#251
+  +'-'#152#250'('#144#251#31#130#247#11'n'#154#255#0#255#255#0#255#255#0#255'Z['
+  +'[[[['#224#221#222#227#224#226'mkl'#203#198#201#138#135#137'I7.'#5#5#6'AABNK'
+  +'J865'#22#19#19#5#3#3#5#2#1#2'7\5'#166#255'1'#157#251','#150#251'#'#137#246
+  +#11'n'#154#255#0#255#255#0#255'Z[[rpr'#234#233#233#224#221#222#212#207#209'm'
+  +'kl'#176#170#172#201#197#198#153#152#152'wvw[[[ '#31'"'#29#28#28#20#20#20#12
+  +#12#12#2'Bm'#29'x'#189'9'#172#255'7'#167#255'4'#160#255#11'n'#154'CDD'#255#0
+  +#255'Z[[pop'#231#229#230#221#217#218#208#203#206#196#189#192#186#178#182'mkl'
+  +'mklmkl'#193#189#191#191#187#188#156#152#153'~{}kjj'#19'i'#156'R'#152#188#21
+  +'c'#146#3'>h'#3'>h'#0'<j'#11'n'#154'CDDZ[['#135#134#135#229#226#227#217#213
+  +#215#204#199#202#192#186#189#189#182#186#240#239#240#250#250#250#225#222#224
+  +#188#186#187#144#140#142'mklmkl'#135#130#132#165#160#163#171#166#169'#w'#166
+  +#22'i'#151#7'P~'#0'<j\\\tnpCDDZ[['#225#222#224#213#209#212#202#196#198#189
+  +#182#186#191#183#187#231#229#230#254#254#254#250#250#250#243#240#242#233#230
+  +#231#222#218#221#211#206#208#191#186#188#163#158#160'mklmklmkl'#144#140#142
+  +#184#181#182#184#183#183#166#166#166'RPQCDDZ[['#211#206#208#197#191#194#187
+  +#180#183#191#183#187#225#221#224#242#240#242#254#254#254#250#250#250#243#240
+  +#242#233#230#231#222#218#221#211#206#208#197#192#194#186#178#182#191#184#188
+  +#202#196#198#211#206#208#194#192#193'mkl'#143#140#142'sprZ[['#255#0#255'Z[['
+  +#194#188#191#186#178#182#189#183#187#211#206#208#227#224#226#242#240#242#254
+  +#254#254#250#250#250#243#240#242#233#230#231#222#218#221#211#206#208#197#192
+  +#194#186#178#182#191#184#188#202#196#198#212#207#209#222#218#221#181#180#180
+  +']]]Z[['#255#0#255#255#0#255'Z[['#184#177#181#184#178#182#198#192#196#212#208
+  +#211#227#224#226#242#240#242#254#254#254#250#250#250#243#240#242#233#230#231
+  +#222#218#221#211#206#208#197#192#194#186#178#182#191#184#188#202#196#198#212
+  +#207#209#129''#128'Z[[Z[['#255#0#255#255#0#255#255#0#255'Z[['#183#176#180
+  +#184#177#181#198#192#196#212#208#211#227#224#226#242#240#242#254#254#254#250
+  +#250#250#243#240#242#233#230#231#222#218#221#211#206#208#197#192#194#186#178
+  +#182#191#184#188#181#175#177'`_`Z[['#255#0#255#255#0#255#255#0#255#255#0#255
+  ,#255#0#255#255#0#255'Z[[Z[['#147#144#145#189#186#188#227#224#226#242#240#242
+  +#254#254#254#250#250#250#243#240#242#233#230#231#222#218#221#211#206#208#197
+  +#192#194#186#178#182#142#138#140'Z[['#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'Z[[Z[[Z[[Z[[Z[['
+  +#180#180#180#202#201#201#233#230#231#222#218#221#211#206#208#187#182#184'mkl'
+  +'Z[['#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255'Z[[Z[[Z[[Z[[Z[[Z[['#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+]);
+LazarusResources.Add('TROEVENTSESSIONMANAGER','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#0'Z'#0#0'Z'#0#0'Z'#0#0'Z'#0#0'Z'#0#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@@@'
+  +#3#143#10#17#172'.'#22#175'2'#13#146#15#0''#0#0'Z'#0#0'Z'#0#255#0#255#255#0
+  +#255#255#0#255#255#0#255'@'#0#192#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +'@'#0#192'@@@'#31#189'L'#23#186'K'#15#147#19#140#226#140#17#144#19#0'z'#0#0
+  +']'#0'n-'#19'n-'#19#255#0#255#255#0#255'@'#0#192#255#255#255'@'#0#192#255#255
+  +#255'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255
+  +#255'@'#0#192'@@@"'#202'Y'#15#147#19'p'#211'j'#255#240#239#30#157'"'#7#147#24
+  +#0'\'#0#244'[A'#248'J6n-'#19'n-'#19'@'#0#192#255#255#255'@'#0#192'@'#0#192
+  +#255#255#255#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255
+  +#255'@'#0#192'@@@'#23#178'='#15#147#19#160#199#188#251#252#252#25#164'$'#12
+  +#150'%'#0'Z'#1#237#156#136#234#136't'#225'@#n-'#19'@'#0#192#255#255#255'@'#0
+  +#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0
+  +#192#255#255#255'@'#0#192'@@@'#12')'#24'1X~.X'#146'5i'#130#17#135'8'#0'Z'#0
+  +#184'A'#23#255#240#239#226#176#154#212'C'#31'n-'#19'@'#0#192#255#255#255'@'#0
+  +#192'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255
+  +#255#255#255'@'#0#192'@@@'#9#17'?'#7')'#154#5'('#149#2#29#143#2#29#143#184'A'
+  +#23#233#161#140#251#252#252#229#160#136#226'U-n-'#19'@'#0#192#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255'@'#0#192'@@@'#14'?'#167#13'A'#181#13'?'#172#14
+  +'@'#175#2#28#145#134'wwZ'#135#153'W'#131#143#149'hR'#181'2'#21#255#0#255'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@'#0#192'@'#0#192#10#28'='#18'T'#213#16'M'#198#17'M'#197#17'M'#197
+  +#17'L'#203#17'W'#139#9'_'#194#4'W'#193#11'n'#154#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#225#191#176#230#215#208#227#229#230#220#224#230#206
+  +#199#199#196#189#191#188#188#192#3#3#4#0#0#0#10#26'1'#24'j'#229#22'g'#229#22
+  +'c'#221#22'c'#221#23'e'#231#17'W'#139' '#129#251#30'{'#247#22'k'#239#11'n'
+  +#154#255#0#255#255#0#255#255#0#255#227#193#178#240#237#233#240#248#252#222
+  +#191#177#203'~Y'#201'sJ'#199'rI'#194'vS'#5#5#6#10#9#7#24#27#31#28'['#169#31
+  +#139#255#31#138#255#31#139#255#31#138#255#17'W'#139')'#145#250'&'#142#250'!'
+  +#132#250#26'p'#235#11'n'#154#255#0#255#225#189#173#246#240#239#250#255#255
+  +#211#139'i'#188'F'#22#191'J'#26#243#216#201#238#199#181#189'F'#22#191'I'#24
+  +'%%%USP+2:'#17'5]'#19'K'#135#23'W'#154#22'Cx('#142#230'0'#157#251'-'#152#250
+  +'('#144#251#31#130#247#11'n'#154#255#0#255#240#225#217#255#255#255#218#154'z'
+  +#186'A'#17#189'K'#27#191'N'#31#226#170#142#222#159#129#189'L'#28#189'L'#28#5
+  +#5#6'AABNKJ865'#22#19#19#5#3#3#5#2#1#2'7\5'#166#255'1'#157#251','#150#251'#'
+  +#137#246#11'n'#154#227#193#178#254#252#252#244#222#209#194'U$'#191'L'#29#189
+  +'J'#28#194'W('#222#159#128#215#139'g'#189'J'#26#191'N'#30#191'L'#28#191'O'#31
+  +' '#31'"'#29#28#28#20#20#20#12#12#12#2'Bm'#29'x'#189'9'#172#255'7'#167#255'4'
+  +#160#255#11'n'#154#255#0#255#234#206#194#255#255#255#226#167#135#196'W#'#197
+  +'Z)'#191'O'#30#198']/'#254#248#244#248#235#229#193'T%'#187'F'#22#191'O'#31
+  +#189'E'#22#203#137'k'#213#216#221#220#188#175#19'i'#156'R'#152#188#21'c'#146
+  +#3'>h'#3'>h'#0'<j'#11'n'#154#255#0#255#238#215#206#255#255#255#220#151'm'#202
+  +'f-'#202'f1'#199'^+'#193'T#'#231#183#159#255#255#255#235#201#183#194'Y+'#188
+  +'I'#25#188'G'#23#202'uM'#225#230#237#221#194#182#255#0#255'#w'#166#22'i'#151
+  +#7'P~'#0'<j'#255#0#255#255#0#255#255#0#255#238#215#204#255#255#255#225#163'u'
+  +#208't9'#208'r;'#203'i3'#201'c.'#198'\)'#230#182#156#255#255#255#244#224#213
+  +#196'Z,'#186'A'#18#204'xP'#237#243#248#225#197#186#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#233#204#192#255#255
+  +#255#235#192#156#213'~A'#215#131'L'#216#135'T'#207'r;'#203'g1'#197'Z&'#230
+  +#181#153#255#255#255#220#154'y'#183';'#12#215#150'v'#243#250#255#226#196#182
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#233#204#192#252#250#250#250#238#224#220#142'O'#242#209#183#255#255#254
+  +#225#163'w'#206'k0'#199'^%'#221#153'r'#255#255#255#226#169#138#192'M'#28#238
+  +#217#206#243#240#239#226#196#182#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#240#224#215#255#255#255#238
+  +#197#159#233#178#130#255#255#255#252#247#243#234#187#156#233#186#152#252#246
+  +#242#254#250#247#211'{J'#222#160''#255#255#255#234#212#202#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#230#199#186#248#238#234#255#255#255#237#194#152#235#192#146#248
+  ,#233#217#252#247#242#252#246#239#246#224#207#225#158'r'#227#171#132#255#255
+  +#255#243#231#226#234#212#202#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#230#199#186
+  +#247#237#233#255#255#255#247#227#207#239#199#160#237#194#153#234#187#147#234
+  +#184#146#244#217#197#255#255#255#244#233#227#226#193#177#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#230#199#186#243#230#224#248#243#242#254
+  +#252#251#255#254#252#254#252#251#252#251#251#250#243#242#242#224#215#242#224
+  +#215#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#229#198#184#229#198#184#233#204#193#233#203#191#230#199#186
+  +#230#199#186#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+]);
+LazarusResources.Add('TRODBSESSIONMANAGER','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#0'Z'#0#0'Z'#0#0'Z'#0#0'Z'#0#0'Z'#0#2't'#169#2't'#169#255
+  +#0#255#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@@@'#3
+  +#143#10#17#172'.'#22#175'2'#13#146#15#0''#0#0'Z'#0#0'Z'#0#2't'#169#2't'#169
+  +#255#0#255#255#0#255'@'#0#192#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255'@'#0
+  +#192'@@@'#31#189'L'#23#186'K'#15#147#19#140#226#140#17#144#19#0'z'#0#0']'#0
+  +'n-'#19'n-'#19#2't'#169#255#0#255'@'#0#192#255#255#255'@'#0#192#255#255#255
+  +'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255
+  +'@'#0#192'@@@"'#202'Y'#15#147#19'p'#211'j'#255#240#239#30#157'"'#7#147#24#0
+  +'\'#0#244'[A'#248'J6n-'#19'n-'#19'@'#0#192#255#255#255'@'#0#192'@'#0#192#255
+  +#255#255#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'
+  +#0#192'@@@'#23#178'='#15#147#19#160#199#188#251#252#252#25#164'$'#12#150'%'#0
+  +'Z'#1#237#156#136#234#136't'#225'@#n-'#19'@'#0#192#255#255#255'@'#0#192#255
+  +#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255
+  +#255#255'@'#0#192'@@@'#12')'#24'1X~.X'#146'5i'#130#17#135'8'#0'Z'#0#184'A'#23
+  +#255#240#239#226#176#154#212'C'#31'n-'#19'@'#0#192#255#255#255'@'#0#192'@'#0
+  +#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255
+  +#255'@'#0#192'@@@'#9#17'?'#7')'#154#5'('#149#2#29#143#2#29#143#184'A'#23#233
+  +#161#140#251#252#252#229#160#136#226'U-n-'#19'@'#0#192#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255'@'#0#192'@@@'#14'?'#167#13'A'#181#13'?'#172#14'@'
+  +#175#2#28#145#134'wwZ'#135#153'W'#131#143#149'hR'#181'2'#21#255#0#255'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@'#0#192'@'#0#192#10#28'='#18'T'#213#16'M'#198#17'M'#197#17'M'#197
+  +#17'L'#203#17'W'#139#9'_'#194#4'W'#193#11'n'#154#2't'#169#255#0#255#255#0#255
+  +#2't'#169'`'#221#231'b'#244#255'5'#222#254#17#203#254#20#201#252'7'#207#246
+  +'\'#202#226'\'#176#196#3#3#4#0#0#0#10#26'1'#24'j'#229#22'g'#229#22'c'#221#22
+  +'c'#221#23'e'#231#17'W'#139' '#129#251#30'{'#247#22'k'#239#11'n'#154#255#0
+  +#255#255#0#255#2't'#169'`'#221#231'`'#244#255'3'#222#254#15#203#254#18#199
+  +#252'5'#207#246'Z'#202#226'\'#176#196#5#5#6#10#9#7#24#27#31#28'['#169#31#139
+  +#255#31#138#255#31#139#255#31#138#255#17'W'#139')'#145#250'&'#142#250'!'#132
+  +#250#26'p'#235#11'n'#154#255#0#255#2't'#169']'#220#231'd'#246#255'='#226#255
+  +#30#209#255'$'#209#254'J'#216#246'k'#208#226'g'#180#197#2't'#169'%%%USP+2:'
+  +#17'5]'#19'K'#135#23'W'#154#22'Cx('#142#230'0'#157#251'-'#152#250'('#144#251
+  +#31#130#247#11'n'#154#255#0#255#2't'#169'w'#227#237#144#250#255'x'#226#247'o'
+  +#213#239'y'#206#231#136#201#222#136#192#206'}'#172#186#2't'#169#5#5#6'AABNKJ'
+  +'865'#22#19#19#5#3#3#5#2#1#2'7\5'#166#255'1'#157#251','#150#251'#'#137#246#11
+  +'n'#154#255#0#255#2't'#169#137#212#226'j'#197#217'?'#181#213#24#160#204#12
+  +#145#194#19#140#186'('#142#176'5'#131#159#2't'#169'_'#221#231']'#244#255' '
+  +#31'"'#29#28#28#20#20#20#12#12#12#2'Bm'#29'x'#189'9'#172#255'7'#167#255'4'
+  +#160#255#11'n'#154#255#0#255#255#0#255#2't'#169'A'#173#199'7'#193#218''''#199
+  +#234#14#196#246#20#203#254';'#215#246'^'#204#226'U'#169#191#2't'#169']'#221
+  +#231'n'#246#255'N'#229#254'3'#218#254'3'#218#254#19'i'#156'R'#152#188#21'c'
+  +#146#3'>h'#3'>h'#0'<j'#11'n'#154#255#0#255#255#0#255#2't'#169'X'#213#226'g'
+  +#252#255'6'#226#255#17#204#255#20#202#254'7'#207#246']'#203#226'^'#178#197#2
+  +'t'#169#156#225#235#206#254#255#186#252#255#172#255#254#150#255#254#135#255
+  +#254'#w'#166#22'i'#151#7'P~'#0'<j'#24#171#216#2't'#169#255#0#255#255#0#255#2
+  +'t'#169'c'#224#233'b'#244#255'5'#222#254#17#203#254#20#201#252'7'#207#246']'
+  +#204#229'^'#180#199#2't'#169#154#194#213#255#255#255#237#255#255#194#255#255
+  +#159#255#255#136#255#255#131#255#255#132#255#255#138#255#255#130#255#255'8'
+  +#197#225#2't'#169#255#0#255#255#0#255#2't'#169'`'#221#231'b'#244#255'5'#222
+  +#254#17#203#254#20#201#252'7'#209#248'_'#208#234'b'#186#207'.'#139#170#2't'
+  +#169#2't'#169#137#196#215#149#215#229#144#227#237't'#226#234'j'#227#235'^'
+  +#217#229'O'#198#215#2't'#169#2't'#169#255#0#255#255#0#255#255#0#255#2't'#169
+  +'_'#221#231']'#244#255'.'#221#254#12#199#254#15#197#252'4'#208#251'`'#215#242
+  +'h'#196#220'0'#150#183#7'n'#154#0'['#136#2't'#169#2't'#169#2't'#169#2't'#169
+  +#2't'#169#2't'#169#2't'#169#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#2't'#169']'#221#231'n'#246#255'N'#229#254'3'#218#254'3'#218#254'N'#226#254
+  +'n'#231#250's'#221#237'B'#181#209#15#132#177#0'e'#151#2'b'#142#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#2't'#169#156#225#235#206#254#255#186#252#255#172#255#254
+  ,#150#255#254#135#255#254#131#254#252#128#251#250'v'#240#244'C'#206#226#22#159
+  +#201#2'n'#160#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#2't'#169#154#194#213#255#255
+  +#255#237#255#255#194#255#255#159#255#255#136#255#255#131#255#255#131#254#254
+  +#137#252#252#128#251#251'7'#193#220#2's'#167#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#2't'#169#2't'#169#137#196#215#149#215#229#144#227#237't'#226
+  +#234'j'#227#235'^'#217#229'O'#198#215#2's'#167#2's'#167#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#2't'#169#2't'#169#2't'
+  +#169#2't'#169#2't'#169#2't'#169#2't'#169#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255
+]);
+LazarusResources.Add('TROEVENTRECEIVER','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#129#30#0#129#30#0#129#30#0
+  +#129#30#0#129#30#0#129#30#0'['#128'&'#9']W'#7'Ay'#22'K'#140#31'KwJYT'#151's/'
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#129#30#0#129#30#0'`'''#22#128'4'#13#11'=~/Mg'#157'>'#5')bP'#6
+  +'A'#138#15'^'#187#24'~'#229#30#137#242#25#133#243#18'v'#230#9'V'#181':Wg'#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#129#30#0#129#30#0'l'
+  +'+'#18#163'A'#4#196'N'#0#199'P'#0#11'?'#130#3'A'#154#15'@}'#9'L'#161#22'y'
+  +#225'$'#146#250'&'#145#242#25't'#206#17'_'#183#17']'#178#12'`'#197#7'R'#182
+  +'(Tz'#255#0#255#255#0#255#255#0#255#255#0#255#129#30#0'`'''#22#146'<'#8#201
+  +'Q'#0#198'O'#0#188'K'#0#187'J'#0#11'?'#130#10'l'#231#9'b'#209#21'}'#237'$'
+  +#146#250'('#147#238#14'P'#157#21'A{'#151'='#7#129#30#0#129#30#0'''V'#131#5'@'
+  +#145'Lit'#255#0#255#255#0#255#129#30#0'i*'#19#153'='#6#202'Q'#0#191'M'#0#187
+  +'K'#0#188'K'#0#188'K'#0#9'?'#129#10'l'#231#13't'#237#24#129#239'&'#145#242#15
+  +'V'#164#11'DO'#188'L'#0#206'R'#0#153'='#6#129#30#0#129#30#0#255#0#255#5':'
+  +#130#255#0#255#255#0#255#129#30#0#154'?'#5#199'P'#0#189'K'#0#188'K'#0#188'K'
+  +#0#188'K'#0#188'K'#0#5'>'#10'l'#231#13't'#237#25#133#243#26'x'#212#5':{'#22
+  +'Y$'#188'K'#0#187'J'#0#206'Q'#0#151'='#7#129#30#0#255#0#255#255#0#255#255#0
+  +#255#129#30#0#139'7'#9#196'N'#0#189'L'#0#188'K'#0#188'K'#0#188'L'#0#188'K'#0
+  +#197'`'#19#5'>'#10'l'#231#10'r'#242#20'~'#242#30#137#242#20'f'#187#6'<x'#188
+  +'K'#0#188'K'#0#188'K'#0#202'P'#0't-'#16#129#30#0#255#0#255#255#0#255#129#30#0
+  +#172'E'#3#197'O'#0#191'O'#2#192'P'#3#192'S'#4#189'L'#0#192'P'#2#234#197#161#5
+  +'='#128#3'K'#182#7'R'#182#9'Q'#171#11'O'#163#10'M'#151#6'=}+Q}'#188'K'#0#187
+  +'K'#0#197'N'#0#167'C'#3#129#30#0#255#0#255#202'h'#0#145':'#9#193'S'#3#197'W'
+  +#6#197'['#9#198'\'#12#199'^'#13#197'W'#6#199'['#11#229#177#128#8'Jp'#7'In'#9
+  +'ZY'#11'nH'#15#146'/'#15#146'/'#22'c!'#229#181#136#188'K'#0#188'K'#0#188'K'#0
+  +#198'O'#0'e('#21#129#30#0#202'h'#0#164'D'#8#204'_'#10#201'b'#16#203'e'#19#204
+  +'g'#22#206'i'#23#203'b'#16#206'f'#21#203'd'#18#202'_'#14#198'['#10#193'S'#5
+  +#189'N'#1#188'K'#0#203'p&'#248#239#230#254#254#254#206'x/'#188'K'#0#188'K'#0
+  +#199'P'#0#130'5'#12#129#30#0#202'h'#0#177'P'#11#212'k'#22#209'l'#28#209'm'#29
+  +#211'p '#212's#'#211'm'#26#212'o'#31#209'l'#28#207'i'#23#203'c'#17#198'\'#12
+  +#196'U'#5#189'N'#1#188'K'#0#213#140'K'#254#254#254#229#181#136#188'K'#0#188
+  +'K'#0#198'O'#0#149';'#7#129#30#0#202'h'#0#187'['#18#218'~-'#216#129'4'#216'x'
+  +'*'#217'z,'#218'}.'#218'}-'#217'y*'#215'v%'#254#254#254#208'k'#25#203'c'#18
+  +#199'\'#12#193'T'#5#188'M'#1#202'n#'#254#254#254#235#198#164#188'K'#0#187'J'
+  +#0#197'N'#0#157'>'#5#129#30#0#202'h'#0#193'c'#27#226#147'K'#227#153'W'#224
+  +#136';'#224#135'9'#226#137'<'#225#137';'#224#134'7'#254#254#254#254#254#254
+  +#213'u$'#208'k'#26#202'c'#19#198'Z'#10#192'P'#3#217#149'W'#254#254#254#227
+  +#176#129#188'K'#0#187'J'#0#197'N'#0#157'>'#5#129#30#0#202'h'#0#193'd'#27#231
+  +#159'^'#235#178'}'#230#153'R'#230#145'E'#231#149'I'#231#147'H'#254#254#254
+  +#254#254#254#254#254#254#220#129'5'#212'r '#207'i'#23#202'_'#14#215#136'B'
+  +#251#244#238#252#251#250#202'l!'#188'K'#0#188'K'#0#198'O'#0#149';'#7#129#30#0
+  +#202'h'#0#188'['#19#234#163'c'#242#198#156#239#177'w'#237#157'T'#246#204#165
+  +#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254#254
+  +#254#254#254#254#254#254#254#254#254#254#254#221#159'g'#188'K'#0#188'K'#0#188
+  +'K'#0#199'P'#0#128'4'#13#129#30#0#202'h'#0#202'h'#0#230#153'U'#244#204#166
+  +#248#208#169#243#176't'#248#212#175#254#254#254#254#254#254#254#254#254#254
+  +#254#254#254#254#254#254#254#254#254#254#254#254#252#250#242#216#191#211#130
+  +'<'#188'L'#0#188'K'#0#188'K'#0#189'K'#0#196'N'#0'b('#22#129#30#0#255#0#255
+  +#202'h'#0#213'}3'#246#196#149#250#227#203#248#208#169#251#189#128#250#178'n'
+  +#254#254#254#254#254#254#254#254#254#226#144'D'#218'}-'#212's"'#206'h'#23#199
+  +']'#13#192'R'#3#188'L'#0#188'K'#0#187'K'#0#198'O'#0#165'B'#3#129#30#0#255#0
+  +#255#255#0#255#202'h'#0#202'h'#0#239#175'r'#251#221#191#252#234#215#254#213
+  +#172#251#187'z'#244#176'n'#254#254#254#254#254#254#226#139'@'#217'}-'#212's"'
+  +#206'h'#23#199']'#13#192'R'#4#188'L'#0#188'K'#0#189'K'#0#202'P'#0'm,'#18#129
+  +#30#0#255#0#255#255#0#255#255#0#255#202'h'#0#207't*'#248#197#146#252#231#211
+  +#254#238#222#250#211#172#246#187#134#235#156'S'#254#254#254#224#135'9'#217'z'
+  +'+'#211'p '#204'g'#22#198'\'#12#192'Q'#3#188'K'#0#189'L'#0#204'Q'#0#142'8'#9
+  +#129#30#0#255#0#255#255#0#255#255#0#255#255#0#255#202'h'#0#202'h'#0#211'{3'
+  +#247#198#151#251#229#206#254#238#222#248#221#193#243#199#156#235#166'i'#225
+  +#142'B'#217#129'3'#212'v'''#207'o '#203'j'#27#197'b'#19#196'W'#7#204'Q'#0#144
+  +'8'#9'O'#31#28#129#30#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#202
+  +'h'#0#202'h'#0#207'v-'#242#182'~'#250#213#177#250#229#208#250#229#208#246#217
+  ,#189#238#199#161#234#184#136#229#171'u'#225#161'h'#218#144'M'#212'v'''#202'['
+  +#10#145'9'#8'T#'#25#129#30#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#202'h'#0#202'h'#0#202'h'#0#215#135'B'#235#175'u'#242
+  +#196#149#244#204#166#243#204#167#240#197#154#234#181#129#226#157'\'#209'{1'
+  +#175'S'#19'5'#16#129#30#0#129#30#0#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#202'h'#0#202'h'
+  +#0#202'h'#0#186'f$'#197'v7'#201'}>'#196'w9'#186'h,'#161'Q'#28#132';'#20'n-'
+  +#19#129#30#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#202'h'#0#202'h'#0#202'h'#0#202'h'#0#202'h'#0#202'h'#0#202'h'#0#202'h'#0#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+]);
+LazarusResources.Add('TRODBEVENTREPOSITORY','BMP',[
+  'BM'#248#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#194#6#0#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@@&'#129'A%'#129'A%'#129'A%'#129'A%'#129'A%'#2't'#169#255#0
+  +#255#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@@@'#203
+  +'f'#0#203'f'#0#203'f'#0#203'f'#0#203'f'#0#203'f'#0#129'A%'#129'A%'#2't'#169
+  +#255#0#255#255#0#255'@'#0#192#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255'@'#0
+  +#192'@@@'#202'e'#0#202'e'#0#202'e'#0#202'e'#0#203'f'#0#203'f'#0#203'f'#0#197
+  +'c'#3#129'A%'#2't'#169#255#0#255'@'#0#192#255#255#255'@'#0#192#255#255#255'@'
+  +#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0
+  +#192'@@@'#198'a'#0#198'a'#0#198'a'#0#200'c'#0#201'd'#0#203'f'#0#203'f'#0#203
+  +'f'#0#197'c'#3#129'A%'#255#0#255'@'#0#192#255#255#255'@'#0#192'@'#0#192#255
+  +#255#255#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'
+  +#0#192'@@@'#191'['#2#206#131'?'#214#149'Z'#216#151'['#214#143'K'#208'w '#203
+  +'f'#0#203'f'#0#203'f'#0#130'A%'#255#0#255'@'#0#192#255#255#255'@'#0#192#255
+  +#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255
+  +#255#255'@'#0#192'@@@'#193'd'#5#231#195#160#254#254#254#254#254#254#254#254
+  +#254#254#254#254#219#153'W'#203'f'#0#203'f'#0#203'f'#0'@&@'#0#192#255#255
+  +#255'@'#0#192'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255
+  +#255#255#255#255#255'@'#0#192'@@@'#197'o'#23#197'o'#24#198'q'#28#196'n'#26
+  +#197'm'#30#228#183#141#254#254#254#202'e'#0#203'f'#0#203'f'#0#130'A%@'#0#192
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255'@'#0#192'@@@'#204'},'#234#204
+  +#172#198'p'#25#194'h'#12#191'`'#3#198'i'#21#254#254#254#202'e'#0#203'f'#0#203
+  +'f'#0#130'A%@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'
+  +#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192#212#141'D'#236#207#177#254#254#254
+  +#203'{*'#198'p'#25#195'g'#11#215#152']'#254#254#254#202'e'#0#203'f'#0#203'f'
+  +#0#130'A%'#255#0#255#2't'#169'`'#221#231'b'#244#255'5'#222#254#17#203#254#20
+  +#201#252'7'#207#246#170'W'#17#230#180#130#227#177'|'#218#152'T'#244#224#204
+  +#254#254#254#254#254#254#248#238#227#243#225#207#242#223#204#254#254#254#229
+  +#184#141#202'e'#0#203'f'#0#203'f'#0#130'A%'#255#0#255#2't'#169'`'#221#231'`'
+  +#244#255'3'#222#254#15#203#254#18#199#252'5'#207#246#170'U'#14#231#178'}'#240
+  +#211#181#229#176'y'#245#225#204#254#254#254#254#254#254#244#226#208#235#203
+  +#171#233#199#164#219#158'`'#199'c'#3#202'e'#0#203'f'#0#203'f'#0'@&'#255#0
+  +#255#2't'#169']'#220#231'd'#246#255'='#226#255#30#209#255'$'#209#254'J'#216
+  +#246'k'#208#226#175'b!'#243#217#191#244#217#190#234#187#139#242#216#189#254
+  +#254#254#213#142'E'#208#130'2'#205'w '#203'o'#17#202'f'#4#202'e'#0#203'f'#0
+  +#130'A%'#255#0#255#255#0#255#2't'#169'w'#227#237#144#250#255'x'#226#247'o'
+  +#213#239'y'#206#231#136#201#222#136#192#206#170'U'#14#233#183#130#248#231#213
+  +#246#223#200#233#187#139#239#207#174#215#143'E'#211#132'3'#208'z"'#207't'#23
+  +#203'h'#8#203'f'#0#197'c'#3'}?'''#255#0#255#255#0#255#2't'#169#137#212#226'j'
+  +#197#217'?'#181#213#24#160#204#12#145#194#19#140#186'('#142#176'5'#131#159
+  +#171'V'#16#235#185#134#246#224#202#247#230#212#240#209#177#232#185#138#227
+  +#170'q'#223#160'`'#217#143'D'#206'q'#17#197'c'#3#143'H'#30#2't'#169#255#0#255
+  +#255#0#255#2't'#169'A'#173#199'7'#193#218''''#199#234#14#196#246#20#203#254
+  +';'#215#246'^'#204#226'U'#169#191#2't'#169#172'W'#15#179'g('#236#188#139#240
+  +#203#166#238#202#164#234#188#142#225#162'c'#212'~('#176'\'#21#137'E!'#0'y'
+  +#182#2't'#169#255#0#255#255#0#255#2't'#169'X'#213#226'g'#252#255'6'#226#255
+  +#17#204#255#20#202#254'7'#207#246']'#203#226'^'#178#197#2't'#169#156#225#235
+  +#206#254#255#174'Y'#17#176']'#23#178'a'#29#177'`'#26#176'['#20#156'P'#25'z'
+  +#250#254'H'#220#242#24#171#216#2't'#169#255#0#255#255#0#255#2't'#169'c'#224
+  +#233'b'#244#255'5'#222#254#17#203#254#20#201#252'7'#207#246']'#204#229'^'#180
+  +#199#2't'#169#154#194#213#255#255#255#237#255#255#194#255#255#159#255#255#136
+  +#255#255#131#255#255#132#255#255#138#255#255#130#255#255'8'#197#225#2't'#169
+  +#255#0#255#255#0#255#2't'#169'`'#221#231'b'#244#255'5'#222#254#17#203#254#20
+  +#201#252'7'#209#248'_'#208#234'b'#186#207'.'#139#170#2't'#169#2't'#169#137
+  +#196#215#149#215#229#144#227#237't'#226#234'j'#227#235'^'#217#229'O'#198#215
+  +#2't'#169#2't'#169#255#0#255#255#0#255#255#0#255#2't'#169'_'#221#231']'#244
+  +#255'.'#221#254#12#199#254#15#197#252'4'#208#251'`'#215#242'h'#196#220'0'#150
+  +#183#7'n'#154#0'['#136#2't'#169#2't'#169#2't'#169#2't'#169#2't'#169#2't'#169
+  +#2't'#169#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#2't'#169']'#221
+  +#231'n'#246#255'N'#229#254'3'#218#254'3'#218#254'N'#226#254'n'#231#250's'#221
+  +#237'B'#181#209#15#132#177#0'e'#151#2'b'#142#255#0#255#255#0#255#255#0#255
+  ,#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#2't'#169#156#225#235#206#254#255#186#252#255#172#255#254#150#255#254#135
+  +#255#254#131#254#252#128#251#250'v'#240#244'C'#206#226#22#159#201#2'n'#160
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#2't'#169#154#194#213#255#255#255#237#255
+  +#255#194#255#255#159#255#255#136#255#255#131#255#255#131#254#254#137#252#252
+  +#128#251#251'7'#193#220#2's'#167#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#2't'#169#2't'#169#137#196#215#149#215#229#144#227#237't'#226#234'j'#227#235
+  +'^'#217#229'O'#198#215#2's'#167#2's'#167#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#2't'#169#2't'#169#2't'#169#2't'#169
+  +#2't'#169#2't'#169#2't'#169#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#0#0
+]);
+LazarusResources.Add('TROINMEMORYEVENTREPOSITORY','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@@&'#129'A%'#129'A%'#129'A%'#129'A%'#129'A%'#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@@@'#203
+  +'f'#0#203'f'#0#203'f'#0#203'f'#0#203'f'#0#203'f'#0#129'A%'#129'A%'#255#0#255
+  +#255#0#255#255#0#255'@'#0#192#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255'@'#0
+  +#192'@@@'#202'e'#0#202'e'#0#202'e'#0#202'e'#0#203'f'#0#203'f'#0#203'f'#0#197
+  +'c'#3#129'A%'#255#0#255#255#0#255'@'#0#192#255#255#255'@'#0#192#255#255#255
+  +'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255
+  +'@'#0#192'@@@'#198'a'#0#198'a'#0#198'a'#0#200'c'#0#201'd'#0#203'f'#0#203'f'#0
+  +#203'f'#0#197'c'#3#129'A%'#255#0#255'@'#0#192#255#255#255'@'#0#192'@'#0#192
+  +#255#255#255#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255
+  +#255'@'#0#192'@@@'#191'['#2#206#131'?'#214#149'Z'#216#151'['#214#143'K'#208
+  +'w '#203'f'#0#203'f'#0#203'f'#0#130'A%'#255#0#255'@'#0#192#255#255#255'@'#0
+  +#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0
+  +#192#255#255#255'@'#0#192'@@@'#193'd'#5#231#195#160#254#254#254#254#254#254
+  +#254#254#254#254#254#254#219#153'W'#203'f'#0#203'f'#0#203'f'#0'@&@'#0#192
+  +#255#255#255'@'#0#192'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0
+  +#192#255#255#255#255#255#255'@'#0#192'@@@'#197'o'#23#197'o'#24#198'q'#28#196
+  +'n'#26#197'm'#30#228#183#141#254#254#254#202'e'#0#203'f'#0#203'f'#0#130'A%@'
+  +#0#192#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255'@'#0#192'@@@'#204'},'
+  +#234#204#172#198'p'#25#194'h'#12#191'`'#3#198'i'#21#254#254#254#202'e'#0#203
+  +'f'#0#203'f'#0#130'A%@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'
+  +#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192#212#141'D'#236#207#177
+  +#254#254#254#203'{*'#198'p'#25#195'g'#11#215#152']'#254#254#254#202'e'#0#203
+  +'f'#0#203'f'#0#130'A%'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255'Z[[==='#170'W'#17#230#180#130#227#177'|'#218#152'T'#244#224#204#254
+  +#254#254#254#254#254#248#238#227#243#225#207#242#223#204#254#254#254#229#184
+  +#141#202'e'#0#203'f'#0#203'f'#0#130'A%'#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255'Z[[QQQmkl'#170'U'#14#231#178'}'#240#211#181#229#176'y'#245#225
+  +#204#254#254#254#254#254#254#244#226#208#235#203#171#233#199#164#219#158'`'
+  +#199'c'#3#202'e'#0#203'f'#0#203'f'#0'@&'#255#0#255#255#0#255#255#0#255#255#0
+  +#255'Z[[QQQ'#226#225#225'mkl'#218#215#217#175'b!'#243#217#191#244#217#190#234
+  +#187#139#242#216#189#254#254#254#213#142'E'#208#130'2'#205'w '#203'o'#17#202
+  +'f'#4#202'e'#0#203'f'#0#130'A%CDD'#255#0#255#255#0#255#255#0#255'Z[[[[['#224
+  +#221#222#227#224#226'mkl'#203#198#201#170'U'#14#233#183#130#248#231#213#246
+  +#223#200#233#187#139#239#207#174#215#143'E'#211#132'3'#208'z"'#207't'#23#203
+  +'h'#8#203'f'#0#197'c'#3'}?''CDD'#255#0#255#255#0#255'Z[[rpr'#234#233#233#224
+  +#221#222#212#207#209'mkl'#176#170#172#201#197#198#171'V'#16#235#185#134#246
+  +#224#202#247#230#212#240#209#177#232#185#138#227#170'q'#223#160'`'#217#143'D'
+  +#206'q'#17#197'c'#3#143'H'#30#149#146#147'CDD'#255#0#255'Z[[pop'#231#229#230
+  +#221#217#218#208#203#206#196#189#192#186#178#182'mklmklmkl'#172'W'#15#179'g('
+  +#236#188#139#240#203#166#238#202#164#234#188#142#225#162'c'#212'~('#176'\'#21
+  +#137'E!WKD'#134#130#131'CDDZ[['#135#134#135#229#226#227#217#213#215#204#199
+  +#202#192#186#189#189#182#186#240#239#240#250#250#250#225#222#224#188#186#187
+  +#144#140#142'mkl'#174'Y'#17#176']'#23#178'a'#29#177'`'#26#176'['#20#156'P'#25
+  +'jjjAAA\\\tnpCDDZ[['#225#222#224#213#209#212#202#196#198#189#182#186#191#183
+  +#187#231#229#230#254#254#254#250#250#250#243#240#242#233#230#231#222#218#221
+  +#211#206#208#191#186#188#163#158#160'mklmklmkl'#144#140#142#184#181#182#184
+  +#183#183#166#166#166'RPQCDDZ[['#211#206#208#197#191#194#187#180#183#191#183
+  +#187#225#221#224#242#240#242#254#254#254#250#250#250#243#240#242#233#230#231
+  +#222#218#221#211#206#208#197#192#194#186#178#182#191#184#188#202#196#198#211
+  +#206#208#194#192#193'mkl'#143#140#142'sprZ[['#255#0#255'Z[['#194#188#191#186
+  +#178#182#189#183#187#211#206#208#227#224#226#242#240#242#254#254#254#250#250
+  +#250#243#240#242#233#230#231#222#218#221#211#206#208#197#192#194#186#178#182
+  +#191#184#188#202#196#198#212#207#209#222#218#221#181#180#180']]]Z[['#255#0
+  +#255#255#0#255'Z[['#184#177#181#184#178#182#198#192#196#212#208#211#227#224
+  +#226#242#240#242#254#254#254#250#250#250#243#240#242#233#230#231#222#218#221
+  +#211#206#208#197#192#194#186#178#182#191#184#188#202#196#198#212#207#209#129
+  +''#128'Z[[Z[['#255#0#255#255#0#255#255#0#255'Z[['#183#176#180#184#177#181
+  +#198#192#196#212#208#211#227#224#226#242#240#242#254#254#254#250#250#250#243
+  ,#240#242#233#230#231#222#218#221#211#206#208#197#192#194#186#178#182#191#184
+  +#188#181#175#177'`_`Z[['#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255'Z[[Z[['#147#144#145#189#186#188#227#224#226#242#240#242#254#254
+  +#254#250#250#250#243#240#242#233#230#231#222#218#221#211#206#208#197#192#194
+  +#186#178#182#142#138#140'Z[['#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'Z[[Z[[Z[[Z[[Z[['#180
+  +#180#180#202#201#201#233#230#231#222#218#221#211#206#208#187#182#184'mklZ[['
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255'Z[[Z[[Z[[Z[[Z[[Z[['#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+]);
+LazarusResources.Add('TROMASTERSERVEREVENTREPOSITORY','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@@&'#129'A%'#129'A%'#129'A%'#129'A%'#129'A%'#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@@@'#203
+  +'f'#0#203'f'#0#203'f'#0#203'f'#0#203'f'#0#203'f'#0#129'A%'#129'A%'#255#0#255
+  +#255#0#255#255#0#255'@'#0#192#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255'@'#0
+  +#192'@@@'#202'e'#0#202'e'#0#202'e'#0#202'e'#0#203'f'#0#203'f'#0#203'f'#0#197
+  +'c'#3#129'A%'#255#0#255#255#0#255'@'#0#192#255#255#255'@'#0#192#255#255#255
+  +'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255
+  +'@'#0#192'@@@'#198'a'#0#198'a'#0#198'a'#0#200'c'#0#201'd'#0#203'f'#0#203'f'#0
+  +#203'f'#0#197'c'#3#129'A%'#255#0#255'@'#0#192#255#255#255'@'#0#192'@'#0#192
+  +#255#255#255#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255
+  +#255'@'#0#192'@@@'#191'['#2#206#131'?'#214#149'Z'#216#151'['#214#143'K'#208
+  +'w '#203'f'#0#203'f'#0#203'f'#0#130'A%'#255#0#255'@'#0#192#255#255#255'@'#0
+  +#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0
+  +#192#255#255#255'@'#0#192'@@@'#193'd'#5#231#195#160#254#254#254#254#254#254
+  +#254#254#254#254#254#254#219#153'W'#203'f'#0#203'f'#0#203'f'#0'@&@'#0#192
+  +#255#255#255'@'#0#192'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0
+  +#192#255#255#255#255#255#255'@'#0#192'@@@'#197'o'#23#197'o'#24#198'q'#28#196
+  +'n'#26#197'm'#30#228#183#141#254#254#254#202'e'#0#203'f'#0#203'f'#0#130'A%@'
+  +#0#192#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255'@'#0#192'@@@'#204'},'
+  +#234#204#172#198'p'#25#194'h'#12#191'`'#3#198'i'#21#254#254#254#202'e'#0#203
+  +'f'#0#203'f'#0#130'A%@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'
+  +#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192#212#141'D'#236#207#177
+  +#254#254#254#203'{*'#198'p'#25#195'g'#11#215#152']'#254#254#254#202'e'#0#203
+  +'f'#0#203'f'#0#130'A%~~~UUUIIIIII$F'#196#14'?'#255#7':'#255#1'4'#254#170'W'
+  +#17#230#180#130#227#177'|'#218#152'T'#244#224#204#254#254#254#254#254#254#248
+  +#238#227#243#225#207#242#223#204#254#254#254#229#184#141#202'e'#0#203'f'#0
+  +#203'f'#0#130'A%dddUUUUUUIII6O'#166#14'?'#255#14'?'#255#7':'#255#170'U'#14
+  +#231#178'}'#240#211#181#229#176'y'#245#225#204#254#254#254#254#254#254#244
+  +#226#208#235#203#171#233#199#164#219#158'`'#199'c'#3#202'e'#0#203'f'#0#203'f'
+  +#0'@&^^^UUUUUUUUUJMX+J'#187' E'#209'(A'#161'AAA'#175'b!'#243#217#191#244#217
+  +#190#234#187#139#242#216#189#254#254#254#213#142'E'#208#130'2'#205'w '#203'o'
+  +#17#202'f'#4#202'e'#0#203'f'#0#130'A%'#13#13#13'^^^^^^UUUUUUIIIUUUIIIAAAAAA'
+  +#170'U'#14#233#183#130#248#231#213#246#223#200#233#187#139#239#207#174#215
+  +#143'E'#211#132'3'#208'z"'#207't'#23#203'h'#8#203'f'#0#197'c'#3'}?'''#16#16
+  +#16'hhh^^^UUU^^^UUUIIIPPPIIIIIIAAA'#171'V'#16#235#185#134#246#224#202#247#230
+  +#212#240#209#177#232#185#138#227#170'q'#223#160'`'#217#143'D'#206'q'#17#197
+  +'c'#3#143'H'#30#30#30#30'...'#138#138#138'ddd^^^UUUUUUUUUUUUIIIIIICJ`?BN'#172
+  +'W'#15#179'g('#236#188#139#240#203#166#238#202#164#234#188#142#225#162'c'#212
+  +'~('#176'\'#21#137'E!'#30#30#30#18#18#28'UUU'#255#0#255'dddddd^^^X[eNZ'#129
+  +'QT^UUUDMn'#29'K'#243#23'E'#243'"A'#184#7':'#255#174'Y'#17#176']'#23#178'a'
+  +#29#177'`'#26#176'['#20#156'P'#25#0#27#206#27'!M!!!!!!'#255#0#255#255#0#255
+  +'dddddd_bkEk'#224'9h'#255'A^'#191'UUU>S'#157' Q'#255#26'K'#255#14'?'#255#14
+  +'?'#255'AAA888888888'#31'-u'#12'%'#178#16'#'#150')))!!!!!!'#255#0#255#255#0
+  +#255#143#143#143'hhhagxGs'#245'9h'#255'9h'#255'C^'#181'2\'#233' Q'#255' Q'
+  +#255' Q'#255#14'?'#255#14'?'#255'"A'#184'888888111111)))))))))~~~'#255#0#255
+  +#255#0#255#255#0#255'hhhhhh[l'#159'Ft'#255'?n'#255'9h'#255'3b'#255'3b'#255' '
+  +'Q'#255' Q'#255' Q'#255#14'?'#255#20'@'#231'AAA888888888111111888'#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255'hhhhhh[l'#159'Ft'#255'?n'#255'9h'
+  +#255'3b'#255'3b'#255' Q'#255' Q'#255' Q'#255'$F'#196'2A}"A'#184'1:`888888111'
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'hhhhh'
+  +'h_h'#130'Lo'#216'9h'#255'9h'#255'3b'#255'3b'#255' Q'#255' Q'#255#26'K'#255
+  +#14'?'#255' E'#209'8>W888888'#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255'hhhhhhddd_h'#130'Nf'#175'Cd'#204
+  +'<_'#213'<_'#213'3U'#200'6O'#166'CJ`IIIAAAIII'#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#143#143#143'hhhdddddd^^^^^^UUUUUUUUUIIIIIIvvv'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#138#138#138'hhh^^^^^^^^^~'
+  +'~~'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  ,#255#0#255#255#0#255
+]);
+LazarusResources.Add('TROPOWEREDBYREMOBJECTSBUTTON','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@@@'#255#0#255#135'L*'#135'N.'#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255'@'#0#192'@@@'#152'bA'#142'V5'#135'N.'#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192#255
+  +#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0
+  +#192#255#255#255#255#255#255'@'#0#192'@@@'#191#144'm'#169'vR'#135'N.'#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'
+  +#0#192#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255
+  +#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@'#224#186#152#173'}Y'#135
+  +'N.'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255'@'
+  +#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@'#226#191#159
+  +#166'tU'#137'P2'#134'L-'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255'@'#0#192#255#255#255'@'#0#192'@'#0#192'@'#0#192#255#255
+  +#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@@@'#231
+  +#199#169#182#138'j'#156'hI'#144'Z:'#139'R2'#135'N.'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255'@'#0#192#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +'@'#0#192'@@@'#250#225#198#237#207#177#211#172#142#180#132'g'#153'eE'#142'T5'
+  +#136'P/'#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192#254#233#209#254#233#209#255#235#207#255#231#202#239#208#178#203#163#130
+  +#165'rQ'#144'W8'#137'P2'#135'M-'#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#208#183#169#207#182#164#224#201#181#247#229#209#255#240#221#255#240
+  +#221#254#238#218#254#237#216#254#235#213#254#234#212#254#233#209#254#233#207
+  +#255#234#206#255#235#207#251#225#196#220#183#151#170'xX'#143'Y:'#138'R3'#255
+  +#0#255#255#0#255#255#0#255#255#0#255#218#198#187#216#192#180#224#203#187#246
+  +#230#212#255#243#225#255#240#221#254#239#222#254#239#222#254#237#220#254#238
+  +#218#254#237#216#254#234#212#254#233#209#254#231#207#255#231#202#255#234#206
+  +#255#230#198#215#177#144#161'oP'#143'Y:'#139'T4'#255#0#255#255#0#255#255#0
+  +#255#225#208#197#226#206#194#240#224#209#254#240#226#255#243#227#254#240#226
+  +#254#240#226#254#240#226#254#240#224#254#239#222#254#237#220#254#237#216#254
+  +#234#212#254#233#209#254#231#206#255#231#202#255#234#202#247#217#184#193#150
+  +'v'#151'dD'#143'Y:'#255#0#255#255#0#255#235#225#218#231#218#208#235#221#208
+  +#250#237#224#254#242#231#254#242#231#254#243#230#254#243#230#254#243#230#255
+  +#243#227#254#239#225#254#239#222#254#237#220#254#237#216#254#234#212#254#233
+  +#209#254#231#206#255#231#201#255#230#198#222#184#153#164'tU'#147'_A'#145'[<'
+  +#255#0#255#240#235#230#237#227#220#242#230#220#252#242#230#254#244#237#254
+  +#244#237#254#244#237#254#244#237#254#244#237#254#242#231#254#242#229#254#239
+  +#225#254#239#221#254#238#218#254#235#213#254#233#209#254#231#207#255#231#202
+  +#255#231#201#234#202#170#176#129'e'#153'gH'#150'bC'#255#0#255#247#243#242#243
+  +#235#230#246#237#227#252#243#234#254#247#239#254#247#240#254#247#239#254#247
+  +#240#254#247#239#254#244#237#254#242#231#254#242#229#254#240#224#254#237#220
+  +#254#237#216#254#234#212#254#233#207#255#231#202#255#231#202#237#204#173#180
+  +#136'k'#158'mP'#154'iJ'#255#0#255#254#252#252#250#246#243#247#240#234#252#244
+  +#235#254#248#240#254#250#244#254#250#244#254#250#244#254#248#240#254#244#237
+  +#254#244#234#254#243#230#254#240#226#254#239#221#254#237#217#254#235#213#254
+  +#233#207#254#231#206#255#231#202#229#197#166#178#137'l'#161'tX'#159'oR'#255#0
+  +#255#255#255#255#255#254#254#252#248#246#252#246#239#254#250#244#254#251#247
+  +#254#251#248#254#251#247#254#250#244#254#247#239#254#246#235#254#243#230#254
+  +#240#226#254#239#222#254#237#217#254#235#213#254#233#209#254#233#207#252#226
+  +#197#213#180#151#177#136'm'#167'z`'#164'wZ'#255#0#255#255#0#255#255#255#255
+  +#255#255#255#254#250#247#254#250#244#254#251#248#254#252#252#254#251#248#254
+  +#250#244#254#248#240#254#244#237#254#243#230#254#240#226#254#239#222#254#237
+  +#217#254#235#213#254#233#209#255#234#206#235#208#181#197#160#136#178#138'r'
+  +#172#130'i'#255#0#255#255#0#255#255#0#255#255#255#255#255#255#255#255#255#252
+  +#254#250#247#254#250#247#254#251#247#254#251#247#254#250#244#252#246#239#254
+  +#246#234#254#243#230#254#240#226#254#239#221#254#237#217#254#237#216#254#233
+  ,#209#242#218#192#211#181#157#189#154#131#182#144'z'#178#138't'#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#255#255#255#255#255#255#254#254#254#251#248
+  +#254#250#244#254#247#240#254#247#240#254#244#237#254#244#234#254#243#230#254
+  +#240#226#255#240#221#254#237#216#251#231#208#239#216#193#217#191#171#198#167
+  +#149#192#159#139#187#153#132#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#255#255#255#255#255#255#255#255#254#251#248#254#250#244
+  +#252#246#239#252#243#234#252#240#229#251#239#226#250#235#220#248#231#215#242
+  +#224#206#230#211#193#218#194#178#208#181#164#202#173#156#198#167#149#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#255#255#255#255#255#255#255#255#255#254#254#252#252#248#250#247#240#247
+  +#239#233#244#234#225#239#227#217#235#220#209#229#212#201#221#203#191#216#196
+  +#182#213#189#175#208#183#166#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#255#255
+  +#255#255#255#255#255#255#255#254#254#251#247#246#246#239#235#242#233#227#237
+  +#225#220#231#218#211#227#212#202#221#204#193#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#255#255#255#254
+  +#254#251#247#246#246#240#237#242#233#227#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+]);
+LazarusResources.Add('TROWEBSOCKETSHTTPCHANNEL','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#255#0#255#153'c@'#149'^<'#153'c@'#146']Hmk?H'#146'>'#255
+  +#0#255#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@@@'#185
+  +'x='#185'x='#173'e'''#171'P'#20'jb'#30'$'#137'!1'#153'1@'#157'?@'#157'?'#255
+  +#0#255#255#0#255'@'#0#192#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255'@'#0#192
+  +'@@@'#231#129#22#227'm'#3#224']'#0#144'Z'#0#2'h'#0#0'k'#0#0'l'#0#15#134#15'@'
+  +#139'5H'#146'>'#255#0#255'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192
+  +#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192
+  +'@@@'#252#134#15#237#135#15#186'~'#7'R~'#2#18'z'#1#9'n'#0#0'l'#0#0'p'#0#5's'
+  +#4#151'6'#1#255#0#255'@'#0#192#255#255#255'@'#0#192'@'#0#192#255#255#255#255
+  +#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@'
+  +#207#146'#`'#137#14'l'#143#22#217#146'#'#255#135#22#186'~'#7'>x'#0#17'w'#0#28
+  +'['#1'lB'#22#136'2'#7'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255
+  +#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@:'
+  +#151#26'E'#153'"'#255#170'P'#255#161'B'#251#153'1'#255#140#28#255#128#9#237
+  +'n'#1#194'P'#4#144'8'#11#145'9'#12'@'#0#192#255#255#255'@'#0#192'@'#0#192'@'
+  +#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0
+  +#192'@@@'#22#166'%'#172#177'Q'#255#188'{'#251#177'_'#251#166'H'#251#153'1'
+  +#255#138#25#255'{'#4#224'e'#2#171'P'#20#150'='#14'@'#0#192#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255'@'#0#192'@@@;'#189'H'#194'a'#215#201#134#239
+  +#192'{'#251#177'_'#246#163'C'#240#147'&'#251#132#12#215'r'#2'tb'#3'lB'#22'@'
+  +#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'~'#204'kl'#215'sl'#215'sn'#203'g'#194'av'
+  +#173'Dh'#156'('#185#149'&'#255#135#22#168'z'#3#13#131#0'#c'#5'422'#168#162
+  +#167'}st'#254#150#18#254#145#12#254#150#18#254#150#18#254#150#18#254#150#18
+  +#254#150#18#169'~H'#192#191'ju'#218'{'#156#238#158#156#238#158'i'#213'oA'#189
+  +'H'#22#166'%'#26#152#23#185#149'&'#255#137#28#168'z'#3#13#131#0#2'}'#0':77'
+  +#165#164#165'opp'#254#150#18#254#150#18#254#150#18#254#150#18#254#162'!'#254
+  +#162'!'#254#162'!'#254#162'!\'#191'Ux'#219'|'#165#241#165#165#241#165'u'#218
+  +'{O'#193'Q%'#168')R'#156'$'#242#154'3'#255#135#22't~'#2#2#129#0#255#0#255'42'
+  +'2'#178#176#178'xux'#254#150#18#254#158#28#254#162'!'#255#172'0'#255#172'0'
+  +#255#172'0'#255#176'6'#255#172'0BqCh'#207'h'#129#221#130#129#221#130'e'#206
+  +'fD'#186'E'#28#163'#:'#151#26#217#146'#'#255#132#18'R~'#2#2#129#0#255#0#255
+  +'989'#182#176#181'}st'#254#162'!'#255#172'0'#255#172'0'#255#180'<'#255#186'D'
+  +#255#186'D'#255#186'D'#255#186'D'#255#180'<F'#134'FV'#197'WV'#197'WI'#188'I2'
+  +#172'3'#12#153#22'#'#139#12#206#139#24#255'~'#10#255'~'#10#255#0#255#255#0
+  +#255'989'#182#176#181'xux'#255#172'0'#255#172'0'#255#186'D'#255#191'M'#255
+  +#196'U'#255#196'U'#255#199'\'#255#196'U'#255#192'M'#255#186'DBqC.q0%'#168')'
+  +#26#152#23#6#139#8'`'#137#14#244#132#16#255#0#255#255#0#255#255#0#255#255#0
+  +#255'989'#188#185#189'opp'#255#176'6'#255#186'D'#255#196'U'#255#199'\'#255
+  +#205'e'#255#208'j'#255#205'e'#255#205'e'#255#199'\'#255#196'U'#255#186'D'#255
+  +#180'<'#255#172'0'#137'h8*%%'#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255'A<<'#184#183#184'opp'#255#186'D'#255#196'U'#255#199'\'#255#208
+  +'j'#255#215't'#255#216'v'#255#217'x'#255#216'v'#255#208'j'#255#205'e'#255#196
+  +'U'#255#186'D'#255#172'0'#130'kM*%%'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255'989'#188#185#189'opp'#255#186'D'#255#201']'#255#208'j'
+  +#255#216'v'#255#221#129#254#226#136#254#226#136#255#221#129#255#217'x'#255
+  +#208'j'#255#199'\'#255#192'M'#255#180'<'#130'kM*%%'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255'A<<'#182#176#181'vtv'#255#196'U'#255#201
+  +']'#255#216'v'#255#217'x'#254#230#144#254#234#152#254#234#152#254#230#144#255
+  +#221#129#255#216'v'#255#205'e'#255#196'U'#255#186'D'#130'kM*%%'#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255'989'#184#183#184'opp'#255#196
+  +'U'#255#205'e'#255#216'v'#255#221#129#254#234#152#254#242#166#254#243#169#254
+  +#234#152#254#226#136#255#216'v'#255#205'e'#255#196'U'#255#186'D'#134'oS*%%'
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'A<<'#182#176#181
+  +'vtv'#201#161'W'#189#154'Q'#238#201'n'#254#226#136#254#234#150#254#242#166
+  +#254#243#169#254#234#152#254#226#136#255#216'v'#255#208'j'#255#196'U'#255#186
+  +'D'#137'tW*%%'#255#0#255#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255'989'#184
+  +#183#184'nmnnmnoppoppa]]'#135#130'u'#130'~m'#167#160#129#163#152'r'#203#181
+  +'y'#197#167'b'#238#192'^'#255#196'U'#255#186'D'#142'w[*%%'#255#0#255#0#0#0
+  ,#255#0#255#0#0#0#255#0#255#0#0#0'A<<------'#212#209#213#196#196#197#173#172
+  +#173#160#160#163#141#137#140#141#137#140'xux}}~oppxuxxuxddd'#135't`}st*%%'
+  +#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255#255#0#255#255#0
+  +#255#30#30#30'422788FFFZVWnmnopp'#144#141#145#128#128#128#161#154#160#144#141
+  +#145#139#131#137#132'yzZST*%%'#255#0#255#0#0#0#255#0#255#255#0#255#255#0#255
+  +#0#0#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#30#30#30'111------------989422111'#255#0#255#255#0#255#0#0#0#255#0
+  +#255#255#0#255#255#0#255#0#0#0
+]);
+LazarusResources.Add('TROWEBSOCKETSHTTPSERVER','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#255#0#255#153'c@'#149'^<'#153'c@'#146']Hmk?H'#146'>'#255
+  +#0#255#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@@@'#185
+  +'x='#185'x='#173'e'''#171'P'#20'jb'#30'$'#137'!1'#153'1@'#157'?@'#157'?'#255
+  +#0#255#255#0#255'@'#0#192#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255'@'#0#192
+  +'@@@'#231#129#22#227'm'#3#224']'#0#144'Z'#0#2'h'#0#0'k'#0#0'l'#0#15#134#15'@'
+  +#139'5H'#146'>'#255#0#255'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192
+  +#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192
+  +'@@@'#252#134#15#237#135#15#186'~'#7'R~'#2#18'z'#1#9'n'#0#0'l'#0#0'p'#0#5's'
+  +#4#151'6'#1#255#0#255'@'#0#192#255#255#255'@'#0#192'@'#0#192#255#255#255#255
+  +#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@'
+  +#207#146'#`'#137#14'l'#143#22#217#146'#'#255#135#22#186'~'#7'>x'#0#17'w'#0#28
+  +'['#1'lB'#22#136'2'#7'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255
+  +#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@:'
+  +#151#26'E'#153'"'#255#170'P'#255#161'B'#251#153'1'#255#140#28#255#128#9#237
+  +'n'#1#194'P'#4#144'8'#11#145'9'#12'@'#0#192#255#255#255'@'#0#192'@'#0#192'@'
+  +#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0
+  +#192'@@@'#22#166'%'#172#177'Q'#255#188'{'#251#177'_'#251#166'H'#251#153'1'
+  +#255#138#25#255'{'#4#224'e'#2#171'P'#20#150'='#14'@'#0#192#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255'@'#0#192'@@@;'#189'H'#194'a'#215#201#134#239
+  +#192'{'#251#177'_'#246#163'C'#240#147'&'#251#132#12#215'r'#2'tb'#3'lB'#22'@'
+  +#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'~'#204'kl'#215'sl'#215'sn'#203'g'#194'av'
+  +#173'Dh'#156'('#185#149'&'#255#135#22#168'z'#3#13#131#0'#c'#5'HJK'#196#189
+  +#194#192#186#192#189#183#189#189#183#189'HJK'#217#215#218'HJK{{{{{{'#169'~H'
+  +#192#191'ju'#218'{'#156#238#158#156#238#158'i'#213'oA'#189'H'#22#166'%'#26
+  +#152#23#185#149'&'#255#137#28#168'z'#3#13#131#0#2'}'#0'HJK'#198#193#198#194
+  +#189#194#192#186#192#189#183#189'HJK'#222#221#225'HJK{{{{{{{{{\'#191'Ux'#219
+  +'|'#165#241#165#165#241#165'u'#218'{O'#193'Q%'#168')R'#156'$'#242#154'3'#255
+  +#135#22't~'#2#2#129#0#255#0#255'HJK'#203#197#203#198#192#198#194#188#194#192
+  +#186#192'HJK'#227#226#230'HJK{{{{{{{{{BqCh'#207'h'#129#221#130#129#221#130'e'
+  +#206'fD'#186'E'#28#163'#:'#151#26#217#146'#'#255#132#18'R~'#2#2#129#0#255#0
+  +#255'HJK'#206#202#206#202#197#202#198#193#198#196#188#196'HJK'#231#230#234'H'
+  +'JK{{{{{{{{{{{{F'#134'FV'#197'WV'#197'WI'#188'I2'#172'3'#12#153#22'#'#139#12
+  +#206#139#24#255'~'#10#255'~'#10#255#0#255#255#0#255'HJK'#212#208#212#207#202
+  +#207#203#197#202#198#192#198'HJK'#235#234#237'HJK'#134#134#134#134#134#134
+  +#134#134#134#146#146#146'{{{BqC.q0%'#168')'#26#152#23#6#139#8'`'#137#14#244
+  +#132#16#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#217#213#216#212#208#212
+  +#207#202#207#203#197#202'HJK'#237#237#239'HJK{{{{{{{{{ooo'#134#134#134#134
+  +#134#134#167#167#167'HJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255'HJK'#222#218#221#217#213#217#233#231#234#207
+  +#202#207'HJK'#238#237#240'HJK'#140#140#140#140#140#140#146#146#146'{{{{{{{{{'
+  +#143#143#143'HJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255'HJK'#227#224#227#238#237#238#156#154#156#211#207#211'HJ'
+  +'K'#237#237#239'HJKTVWcddnnn'#140#140#140#140#140#140#140#140#140#166#166#166
+  +'HJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255'HJK'#231#230#231#144#144#146#158#157#158#216#212#216'HJK'#206#207
+  +#208#207#207#207#134#135#135'ceeNPQMOP\]]kkl'#146#146#146'HJK'#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#237
+  +#235#237#146#146#147#227#224#226#255#255#255#176#176#178'QRSUVWuvw'#169#170
+  +#170#211#211#212#189#189#191''#128#129'[\]JLMHJK'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#240#240#242#237
+  +#235#237#255#255#255#233#233#235#226#225#229#220#217#221#191#187#191#151#149
+  +#152'onrXYZNPQhij'#147#149#150#208#209#209'HJK'#255#0#255#255#0#255#255#0#255
+  +#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255'HJK'#246#246#246#255#255#255#238
+  +#238#240#242#242#244#238#237#239#229#227#231#217#215#218#203#199#204#189#183
+  +#189#173#167#173#153#145#151#153#145#151'zsuHJK'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255#0#0#0'HJK'#255#255#255#237#237
+  +#239#248#248#250#251#251#252#246#244#247#234#234#237#221#220#224#207#204#208
+  +#192#187#193#176#170#176#160#152#158'HJKHJK'#255#0#255#255#0#255#255#0#255
+  ,#255#0#255#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255'HJKHJK'
+  +#233#233#234#252#252#252#246#246#247#235#234#238#222#220#224#208#204#208#193
+  +#187#193'HJKHJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#0#0#0#255#0#255#255#0#255#255#0#255#0#0#0#255#0#255#255#0#255#255
+  +#0#255'HJKHJKHJKHJKHJKHJKHJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#0#0#0#255#0#255#255#0#255#255#0
+  +#255#0#0#0
+]);
+LazarusResources.Add('TROSERVERMULTIMESSAGE','BMP',[
+  'BM'#248#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#194#6#0#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#0#153#204#0#153#204#0#153#204#0#153
+  +#204#0#153#204#0#153#204#0#153#204#0#153#204#0#153#204#0#153#204#0#153#204#0
+  +#153#204#0#153#204#0#153#204#0#153#204#0#153#204#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0#153#204#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#0#153#204#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#0#153#204#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#0#153#204#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0#153#204
+  +#253#255#255#253#255#255#253#255#255#253#255#255#253#255#255#253#255#255#253
+  +#255#255#253#255#255#253#255#255#253#255#255#253#255#255#253#255#255#253#255
+  +#255#253#255#255#0#153#204#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#0#153#204#251#255#255#251#255#255#251#255#255
+  +#251#255#255#251#255#255#251#255#255#251#255#255#251#255#255#251#255#255#251
+  +#255#255#251#255#255#251#255#255#251#255#255#251#255#255#0#153#204#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0#153
+  +#204#247#255#255#247#255#255#247#255#255#247#255#255#247#255#255#247#255#255
+  +#247#255#255#247#255#255#247#255#255#247#255#255#247#255#255#247#255#255#247
+  +#255#255#247#255#255#0#153#204#255#0#255#154'ff'#154'ff'#154'ff'#154'ff'#154
+  +'ff'#154'ff'#154'ff'#0#153#204#242#255#255#242#255#255#242#255#255#242#255
+  +#255#242#255#255#242#255#255#242#255#255#242#255#255#242#255#255#242#255#255
+  +#242#255#255#242#255#255#242#255#255#242#255#255#0#153#204#255#0#255#154'ff'
+  +#245#218#189#246#217#188#246#217#187#247#216#185#247#214#179#247#188#135#0
+  +#153#204#237#255#255#237#255#255#237#255#255#198#213#213#154#166#166#154#166
+  +#166#154#166#166#186#200#200#231#249#249#237#255#255#237#255#255#237#255#255
+  +#237#255#255#237#255#255#0#153#204#255#0#255#154'ff'#243#221#198#244#221#197
+  +#244#220#196#244#220#195#245#217#188#245#192#142#0#153#204#231#255#255#231
+  +#255#255#184#148'u'#173'H'#1#173'H'#1#173'H'#1#164'k>'#150#166#166#186#205
+  +#205#231#255#255#231#255#255#231#255#255#231#255#255#231#255#255#0#153#204
+  +#255#0#255#154'ff'#242#224#206#242#224#205#242#223#204#242#223#203#243#220
+  +#196#243#194#148#0#153#204#224#255#255#204#183#156#173'H'#1#242#144#10#255
+  +#154#2#252#163'!'#173'H'#1#163'rI'#146#166#166#224#255#255#224#255#255#224
+  +#255#255#224#255#255#224#255#255#0#153#204#255#0#255#154'ff'#240#226#212#240
+  +#226#211#241#226#210#241#225#209#241#222#203#241#197#153#0#153#204#217#255
+  +#255#173'H'#1#236#145'!'#255#162#27#189'Y'#3#217#147'P'#252#163'!'#173'H'#1
+  +#141#166#166#217#255#255#217#255#255#217#255#255#217#255#255#217#255#255#0
+  +#153#204#255#0#255#154'ff'#239#228#215#239#228#215#239#227#214#240#227#214
+  +#223#152'='#223#134'.'#0#153#204#210#255#255#173'H'#1#255#187']'#172'M'#23
+  +#141#137'|'#173'H'#1#255#179'A'#173'H'#1#137#166#166#210#255#255#210#255#255
+  +#210#255#255#210#255#255#210#255#255#0#153#204#255#0#255#154'ff'#240#230#219
+  +#240#230#218#240#229#218#239#229#217#239#225#210#239#199#160#0#153#204#202
+  +#255#254#173'H'#1#255#196't'#172'M'#23#131#166#165#173'H'#1#255#181'H'#173'H'
+  +#1#131#165#165#196#248#247#191#241#241#188#238#237#186#235#235#183#231#231#0
+  +#153#204#255#0#255#154'ff'#242#234#224#242#233#223#242#233#223#241#232#222
+  +#223#152'='#223#134'.'#0#153#204#193#255#254#173'H'#1#255#200#128#172'M'#23
+  +'~'#166#165#173'H'#1#255#185'S'#173'H'#1'z'#161#161#171#225#224#158#208#207
+  +#148#195#195#142#187#188#136#186#189#0#153#204#255#0#255#154'ff'#245#237#229
+  +#244#237#228#244#236#228#244#236#227#243#232#220#243#206#167#0#153#204#184
+  +#255#254#173'H'#1#255#204#138#172'M'#23'x'#166#165#173'H'#1#255#189']'#173'H'
+  +#1'w'#165#164#196#231#231#176#214#218#145#200#208'm'#198#217#27#176#220#0#153
+  +#204#255#0#255#154'ff'#247#241#234#246#240#234#246#240#233#246#239#232#245
+  +#236#225#245#208#171#0#153#204#175#255#254#173'H'#1#255#208#150#172'M'#23'r'
+  +#166#165#173'H'#1#255#192'i'#173'H'#1'r'#166#165#191#243#246#183#240#254'y'
+  +#228#255#27#179#225#0#153#204#255#0#255#255#0#255#154'ff'#249#244#240#248#244
+  +#239#248#243#238#248#243#237#247#239#230#247#212#175#0#153#204#166#255#254
+  +#173'H'#1#255#211#161#172'M'#23'l'#166#165#173'H'#1#255#196's'#173'H'#1'l'
+  +#166#165#152#227#233'w'#227#255#26#179#225#0#153#204#255#0#255#255#0#255#255
+  +#0#255#154'ff'#251#248#245#251#247#244#250#247#243#250#246#242#250#243#235
+  +#249#214#179#0#153#204#156#255#254#173'H'#1#255#215#172#172'M'#23'f'#166#165
+  +#173'H'#1#255#200''#173'H'#1'f'#166#165'o'#216#233#25#178#225#0#153#204'^z'
+  ,#142#255#0#255#255#0#255#255#0#255#154'ff'#253#252#250#253#251#249#252#251
+  +#248#252#250#248#252#246#240#251#218#182#0#153#204#153#255#254#173'H'#1#236
+  +#192#156#172'M'#23#140#233#232#173'H'#1#255#204#137#173'H'#1'^'#161#162#27
+  +#177#220#0#153#204#151#207#224#154'ff'#255#0#255#255#0#255#255#0#255#154'ff'
+  +#255#255#254#255#254#254#254#254#253#254#254#253#254#250#245#254#220#186#0
+  +#153#204#0#153#204'&'#153#173'H'#1'&'#153#0#153#204#173'H'#1#255#200#132
+  +#173'H'#1#0'd'#133#0#153#204' '#153#235#249#245#241#154'ff'#255#0#255#255#0
+  +#255#255#0#255#154'ff'#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#254#254#255#254#254#254#254#253#254#253
+  +#252#181#141'r'#173'H'#1#255#197#130#173'H'#1#164#163#162#252#250#248#252#250
+  +#247#251#249#246#154'ff'#255#0#255#255#0#255#255#0#255#154'ff'#154'ff'#154'f'
+  +'f'#154'ff'#154'ff'#154'ff'#154'ff'#173'H'#1#154'ff'#154'ff'#154'ff'#168'S'
+  +#26#173'H'#1#229#158'9'#249#193#135#173'H'#1#150'dd'#154'ff'#154'ff'#154'ff'
+  +#154'ff'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#173'H'#1#252#217#176#245#182'f'
+  +#245#186's'#247#191'|'#249#195#143#173'H'#1#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#173'H'
+  +#1#173'H'#1#173'H'#1#173'H'#1#173'H'#1#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0#0
+]);
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_Glyphs.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_Glyphs.res
new file mode 100644
index 0000000..96314a2
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_Glyphs.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_Lazarus_Mac.lpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_Lazarus_Mac.lpk
new file mode 100644
index 0000000..94cddb8
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_Lazarus_Mac.lpk	
@@ -0,0 +1,293 @@
+<?xml version="1.0"?>
+<CONFIG>
+  <Package Version="3">
+    <PathDelim Value="\"/>
+    <Name Value="RemObjects_Core_Lazarus_Mac"/>
+    <CompilerOptions>
+      <Version Value="8"/>
+      <PathDelim Value="\"/>
+      <SearchPaths>
+        <OtherUnitFiles Value="$(LazarusDir)\lcl\units\$(TargetCPU)-$(TargetOS)\;$(LazarusDir)\packager\units\$(TargetCPU)-$(TargetOS)\;CodeGen\;ZLib\FPC\"/>
+        <UnitOutputDirectory Value="units\$(TargetCPU)-$(TargetOS)"/>
+        <SrcPath Value="$(LazarusDir)\lcl\"/>
+      </SearchPaths>
+      <Other>
+        <CompilerPath Value="$(CompPath)"/>
+      </Other>
+    </CompilerOptions>
+    <Description Value="RemObjects SDK - Core Library
+"/>
+    <Files Count="65">
+      <Item1>
+        <Filename Value="RemObjects_Core_Reg.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="RemObjects_Core_Reg"/>
+      </Item1>
+      <Item2>
+        <Filename Value="ROMasterServerLibrary_Intf.pas"/>
+        <UnitName Value="ROMasterServerLibrary_Intf"/>
+      </Item2>
+      <Item3>
+        <Filename Value="uIPHttpHeaders.pas"/>
+        <UnitName Value="uIPHttpHeaders"/>
+      </Item3>
+      <Item4>
+        <Filename Value="uROAsync.pas"/>
+        <UnitName Value="uROAsync"/>
+      </Item4>
+      <Item5>
+        <Filename Value="uROAsyncSCHelpers.pas"/>
+        <UnitName Value="uROAsyncSCHelpers"/>
+      </Item5>
+      <Item6>
+        <Filename Value="uROAsyncSuperTcpServer.pas"/>
+        <UnitName Value="uROAsyncSuperTcpServer"/>
+      </Item6>
+      <Item7>
+        <Filename Value="uROBaseSuperHttpChannel.pas"/>
+        <UnitName Value="uROBaseSuperHttpChannel"/>
+      </Item7>
+      <Item8>
+        <Filename Value="uROBaseSuperHttpServer.pas"/>
+        <UnitName Value="uROBaseSuperHttpServer"/>
+      </Item8>
+      <Item9>
+        <Filename Value="uROBinaryHelpers.pas"/>
+        <UnitName Value="uROBinaryHelpers"/>
+      </Item9>
+      <Item10>
+        <Filename Value="uROBinMessage.pas"/>
+        <UnitName Value="uROBinMessage"/>
+      </Item10>
+      <Item11>
+        <Filename Value="uROClasses.pas"/>
+        <UnitName Value="uROClasses"/>
+      </Item11>
+      <Item12>
+        <Filename Value="uROClassFactories.pas"/>
+        <UnitName Value="uROClassFactories"/>
+      </Item12>
+      <Item13>
+        <Filename Value="uROClient.pas"/>
+        <UnitName Value="uROClient"/>
+      </Item13>
+      <Item14>
+        <Filename Value="uROClientIntf.pas"/>
+        <UnitName Value="uROClientIntf"/>
+      </Item14>
+      <Item15>
+        <Filename Value="uROCOMInit.pas"/>
+        <UnitName Value="uROCOMInit"/>
+      </Item15>
+      <Item16>
+        <Filename Value="uROCompression.pas"/>
+        <UnitName Value="uROCompression"/>
+      </Item16>
+      <Item17>
+        <Filename Value="uRODBEventRepository.pas"/>
+        <UnitName Value="uRODBEventRepository"/>
+      </Item17>
+      <Item18>
+        <Filename Value="uRODBSessionManager.pas"/>
+        <UnitName Value="uRODBSessionManager"/>
+      </Item18>
+      <Item19>
+        <Filename Value="uRODL.pas"/>
+        <UnitName Value="uRODL"/>
+      </Item19>
+      <Item20>
+        <Filename Value="uRODynamicRequest.pas"/>
+        <UnitName Value="uRODynamicRequest"/>
+      </Item20>
+      <Item21>
+        <Filename Value="uROEventRepository.pas"/>
+        <UnitName Value="uROEventRepository"/>
+      </Item21>
+      <Item22>
+        <Filename Value="uROHtmlServerInfo.pas"/>
+        <UnitName Value="uROHtmlServerInfo"/>
+      </Item22>
+      <Item23>
+        <Filename Value="uROHtmlServerInfo.lrs"/>
+        <Type Value="LRS"/>
+      </Item23>
+      <Item24>
+        <Filename Value="uROHTTPDispatch.pas"/>
+        <UnitName Value="uROHTTPDispatch"/>
+      </Item24>
+      <Item25>
+        <Filename Value="uROHTTPTools.pas"/>
+        <UnitName Value="uROHTTPTools"/>
+      </Item25>
+      <Item26>
+        <Filename Value="uROIdeOnly.pas"/>
+        <UnitName Value="uROIdeOnly"/>
+      </Item26>
+      <Item27>
+        <Filename Value="uROLocalChannel.pas"/>
+        <UnitName Value="uROLocalChannel"/>
+      </Item27>
+      <Item28>
+        <Filename Value="uROLocalServer.pas"/>
+        <UnitName Value="uROLocalServer"/>
+      </Item28>
+      <Item29>
+        <Filename Value="uROMasterServerEventRepository.pas"/>
+        <UnitName Value="uROMasterServerEventRepository"/>
+      </Item29>
+      <Item30>
+        <Filename Value="uROMasterServerSessionManager.pas"/>
+        <UnitName Value="uROMasterServerSessionManager"/>
+      </Item30>
+      <Item31>
+        <Filename Value="uROOpenXMLImpl.pas"/>
+        <UnitName Value="uROOpenXMLImpl"/>
+      </Item31>
+      <Item32>
+        <Filename Value="uROPleaseWaitForm.pas"/>
+        <UnitName Value="uROPleaseWaitForm"/>
+      </Item32>
+      <Item33>
+        <Filename Value="uROPleaseWaitForm.lfm"/>
+        <Type Value="LFM"/>
+      </Item33>
+      <Item34>
+        <Filename Value="uROPleaseWaitForm.lrs"/>
+        <Type Value="LRS"/>
+      </Item34>
+      <Item35>
+        <Filename Value="uROPostMessage.pas"/>
+        <UnitName Value="uROPostMessage"/>
+      </Item35>
+      <Item36>
+        <Filename Value="uROPoweredByRemObjectsButton.pas"/>
+        <UnitName Value="uROPoweredByRemObjectsButton"/>
+      </Item36>
+      <Item37>
+        <Filename Value="uRORemoteDataModule.pas"/>
+        <UnitName Value="uRORemoteDataModule"/>
+      </Item37>
+      <Item38>
+        <Filename Value="uRORemoteService.pas"/>
+        <UnitName Value="uRORemoteService"/>
+      </Item38>
+      <Item39>
+        <Filename Value="uRORes.pas"/>
+        <UnitName Value="uRORes"/>
+      </Item39>
+      <Item40>
+        <Filename Value="uROSerializer.pas"/>
+        <UnitName Value="uROSerializer"/>
+      </Item40>
+      <Item41>
+        <Filename Value="uROServer.pas"/>
+        <UnitName Value="uROServer"/>
+      </Item41>
+      <Item42>
+        <Filename Value="uROServerIntf.pas"/>
+        <UnitName Value="uROServerIntf"/>
+      </Item42>
+      <Item43>
+        <Filename Value="uROServerMultiMessage.pas"/>
+        <UnitName Value="uROServerMultiMessage"/>
+      </Item43>
+      <Item44>
+        <Filename Value="uROSessions.pas"/>
+        <UnitName Value="uROSessions"/>
+      </Item44>
+      <Item45>
+        <Filename Value="uROSOAPMessage.pas"/>
+        <UnitName Value="uROSOAPMessage"/>
+      </Item45>
+      <Item46>
+        <Filename Value="uROStreamSerializer.pas"/>
+        <UnitName Value="uROStreamSerializer"/>
+      </Item46>
+      <Item47>
+        <Filename Value="uROThread.pas"/>
+        <UnitName Value="uROThread"/>
+      </Item47>
+      <Item48>
+        <Filename Value="uROThreadPool.pas"/>
+        <UnitName Value="uROThreadPool"/>
+      </Item48>
+      <Item49>
+        <Filename Value="uROTypes.pas"/>
+        <UnitName Value="uROTypes"/>
+      </Item49>
+      <Item50>
+        <Filename Value="uROUnicodeConv.pas"/>
+        <UnitName Value="uROUnicodeConv"/>
+      </Item50>
+      <Item51>
+        <Filename Value="uROXDOM_2_3.pas"/>
+        <UnitName Value="uROXDOM_2_3"/>
+      </Item51>
+      <Item52>
+        <Filename Value="uROXMLIntf.pas"/>
+        <UnitName Value="uROXMLIntf"/>
+      </Item52>
+      <Item53>
+        <Filename Value="uROXmlRpcMessage.pas"/>
+        <UnitName Value="uROXmlRpcMessage"/>
+      </Item53>
+      <Item54>
+        <Filename Value="uROXMLSerializer.pas"/>
+        <UnitName Value="uROXMLSerializer"/>
+      </Item54>
+      <Item55>
+        <Filename Value="CodeGen\uRODLGenTools.pas"/>
+        <UnitName Value="uRODLGenTools"/>
+      </Item55>
+      <Item56>
+        <Filename Value="CodeGen\uRODLToPascal.pas"/>
+        <UnitName Value="uRODLToPascal"/>
+      </Item56>
+      <Item57>
+        <Filename Value="CodeGen\uRODLToPascalAsync.pas"/>
+        <UnitName Value="uRODLToPascalAsync"/>
+      </Item57>
+      <Item58>
+        <Filename Value="CodeGen\uRODLToPascalImpl.pas"/>
+        <UnitName Value="uRODLToPascalImpl"/>
+      </Item58>
+      <Item59>
+        <Filename Value="CodeGen\uRODLToPascalIntf.pas"/>
+        <UnitName Value="uRODLToPascalIntf"/>
+      </Item59>
+      <Item60>
+        <Filename Value="CodeGen\uRODLToPascalInvk.pas"/>
+        <UnitName Value="uRODLToPascalInvk"/>
+      </Item60>
+      <Item61>
+        <Filename Value="CodeGen\uRODLToWSDL.pas"/>
+        <UnitName Value="uRODLToWSDL"/>
+      </Item61>
+      <Item62>
+        <Filename Value="CodeGen\uRODLToXML.pas"/>
+        <UnitName Value="uRODLToXML"/>
+      </Item62>
+      <Item63>
+        <Filename Value="ZLib\FPC\uROZLib.pas"/>
+        <UnitName Value="uROZLib"/>
+      </Item63>
+      <Item64>
+        <Filename Value="uROJSONMessage.pas"/>
+        <UnitName Value="uROJSONMessage"/>
+      </Item64>
+      <Item65>
+        <Filename Value="uROJSONParser.pas"/>
+      </Item65>
+    </Files>
+    <Type Value="DesignTime"/>
+    <RequiredPkgs Count="1">
+      <Item1>
+        <PackageName Value="LCL"/>
+      </Item1>
+    </RequiredPkgs>
+    <PublishOptions>
+      <Version Value="2"/>
+      <DestinationDirectory Value="$(TestDir)\publishedpackage\"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_Lazarus_Unix.lpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_Lazarus_Unix.lpk
new file mode 100644
index 0000000..60c96d3
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_Lazarus_Unix.lpk	
@@ -0,0 +1,294 @@
+<?xml version="1.0"?>
+<CONFIG>
+  <Package Version="3">
+    <PathDelim Value="\"/>
+    <Name Value="RemObjects_Core_Lazarus_Unix"/>
+    <CompilerOptions>
+      <Version Value="8"/>
+      <PathDelim Value="\"/>
+      <SearchPaths>
+        <OtherUnitFiles Value="$(LazarusDir)\lcl\units\$(TargetCPU)-$(TargetOS)\;$(LazarusDir)\packager\units\$(TargetCPU)-$(TargetOS)\;CodeGen\;ZLib\FPC\"/>
+        <UnitOutputDirectory Value="units\$(TargetCPU)-$(TargetOS)"/>
+        <SrcPath Value="$(LazarusDir)\lcl\"/>
+      </SearchPaths>
+      <Other>
+        <CompilerPath Value="$(CompPath)"/>
+      </Other>
+    </CompilerOptions>
+    <Description Value="RemObjects SDK - Core Library
+"/>
+    <Files Count="65">
+      <Item1>
+        <Filename Value="RemObjects_Core_Reg.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="RemObjects_Core_Reg"/>
+      </Item1>
+      <Item2>
+        <Filename Value="ROMasterServerLibrary_Intf.pas"/>
+        <UnitName Value="ROMasterServerLibrary_Intf"/>
+      </Item2>
+      <Item3>
+        <Filename Value="uIPHttpHeaders.pas"/>
+        <UnitName Value="uIPHttpHeaders"/>
+      </Item3>
+      <Item4>
+        <Filename Value="uROAsync.pas"/>
+        <UnitName Value="uROAsync"/>
+      </Item4>
+      <Item5>
+        <Filename Value="uROAsyncSCHelpers.pas"/>
+        <UnitName Value="uROAsyncSCHelpers"/>
+      </Item5>
+      <Item6>
+        <Filename Value="uROAsyncSuperTcpServer.pas"/>
+        <UnitName Value="uROAsyncSuperTcpServer"/>
+      </Item6>
+      <Item7>
+        <Filename Value="uROBaseSuperHttpChannel.pas"/>
+        <UnitName Value="uROBaseSuperHttpChannel"/>
+      </Item7>
+      <Item8>
+        <Filename Value="uROBaseSuperHttpServer.pas"/>
+        <UnitName Value="uROBaseSuperHttpServer"/>
+      </Item8>
+      <Item9>
+        <Filename Value="uROBinaryHelpers.pas"/>
+        <UnitName Value="uROBinaryHelpers"/>
+      </Item9>
+      <Item10>
+        <Filename Value="uROBinMessage.pas"/>
+        <UnitName Value="uROBinMessage"/>
+      </Item10>
+      <Item11>
+        <Filename Value="uROClasses.pas"/>
+        <UnitName Value="uROClasses"/>
+      </Item11>
+      <Item12>
+        <Filename Value="uROClassFactories.pas"/>
+        <UnitName Value="uROClassFactories"/>
+      </Item12>
+      <Item13>
+        <Filename Value="uROClient.pas"/>
+        <UnitName Value="uROClient"/>
+      </Item13>
+      <Item14>
+        <Filename Value="uROClientIntf.pas"/>
+        <UnitName Value="uROClientIntf"/>
+      </Item14>
+      <Item15>
+        <Filename Value="uROCOMInit.pas"/>
+        <UnitName Value="uROCOMInit"/>
+      </Item15>
+      <Item16>
+        <Filename Value="uROCompression.pas"/>
+        <UnitName Value="uROCompression"/>
+      </Item16>
+      <Item17>
+        <Filename Value="uRODBEventRepository.pas"/>
+        <UnitName Value="uRODBEventRepository"/>
+      </Item17>
+      <Item18>
+        <Filename Value="uRODBSessionManager.pas"/>
+        <UnitName Value="uRODBSessionManager"/>
+      </Item18>
+      <Item19>
+        <Filename Value="uRODL.pas"/>
+        <UnitName Value="uRODL"/>
+      </Item19>
+      <Item20>
+        <Filename Value="uRODynamicRequest.pas"/>
+        <UnitName Value="uRODynamicRequest"/>
+      </Item20>
+      <Item21>
+        <Filename Value="uROEventRepository.pas"/>
+        <UnitName Value="uROEventRepository"/>
+      </Item21>
+      <Item22>
+        <Filename Value="uROHtmlServerInfo.pas"/>
+        <UnitName Value="uROHtmlServerInfo"/>
+      </Item22>
+      <Item23>
+        <Filename Value="uROHtmlServerInfo.lrs"/>
+        <Type Value="LRS"/>
+      </Item23>
+      <Item24>
+        <Filename Value="uROHTTPDispatch.pas"/>
+        <UnitName Value="uROHTTPDispatch"/>
+      </Item24>
+      <Item25>
+        <Filename Value="uROHTTPTools.pas"/>
+        <UnitName Value="uROHTTPTools"/>
+      </Item25>
+      <Item26>
+        <Filename Value="uROIdeOnly.pas"/>
+        <UnitName Value="uROIdeOnly"/>
+      </Item26>
+      <Item27>
+        <Filename Value="uROLocalChannel.pas"/>
+        <UnitName Value="uROLocalChannel"/>
+      </Item27>
+      <Item28>
+        <Filename Value="uROLocalServer.pas"/>
+        <UnitName Value="uROLocalServer"/>
+      </Item28>
+      <Item29>
+        <Filename Value="uROMasterServerEventRepository.pas"/>
+        <UnitName Value="uROMasterServerEventRepository"/>
+      </Item29>
+      <Item30>
+        <Filename Value="uROMasterServerSessionManager.pas"/>
+        <UnitName Value="uROMasterServerSessionManager"/>
+      </Item30>
+      <Item31>
+        <Filename Value="uROOpenXMLImpl.pas"/>
+        <UnitName Value="uROOpenXMLImpl"/>
+      </Item31>
+      <Item32>
+        <Filename Value="uROPleaseWaitForm.pas"/>
+        <UnitName Value="uROPleaseWaitForm"/>
+      </Item32>
+      <Item33>
+        <Filename Value="uROPleaseWaitForm.lfm"/>
+        <Type Value="LFM"/>
+      </Item33>
+      <Item34>
+        <Filename Value="uROPleaseWaitForm.lrs"/>
+        <Type Value="LRS"/>
+      </Item34>
+      <Item35>
+        <Filename Value="uROPostMessage.pas"/>
+        <UnitName Value="uROPostMessage"/>
+      </Item35>
+      <Item36>
+        <Filename Value="uROPoweredByRemObjectsButton.pas"/>
+        <UnitName Value="uROPoweredByRemObjectsButton"/>
+      </Item36>
+      <Item37>
+        <Filename Value="uRORemoteDataModule.pas"/>
+        <UnitName Value="uRORemoteDataModule"/>
+      </Item37>
+      <Item38>
+        <Filename Value="uRORemoteService.pas"/>
+        <UnitName Value="uRORemoteService"/>
+      </Item38>
+      <Item39>
+        <Filename Value="uRORes.pas"/>
+        <UnitName Value="uRORes"/>
+      </Item39>
+      <Item40>
+        <Filename Value="uROSerializer.pas"/>
+        <UnitName Value="uROSerializer"/>
+      </Item40>
+      <Item41>
+        <Filename Value="uROServer.pas"/>
+        <UnitName Value="uROServer"/>
+      </Item41>
+      <Item42>
+        <Filename Value="uROServerIntf.pas"/>
+        <UnitName Value="uROServerIntf"/>
+      </Item42>
+      <Item43>
+        <Filename Value="uROServerMultiMessage.pas"/>
+        <UnitName Value="uROServerMultiMessage"/>
+      </Item43>
+      <Item44>
+        <Filename Value="uROSessions.pas"/>
+        <UnitName Value="uROSessions"/>
+      </Item44>
+      <Item45>
+        <Filename Value="uROSOAPMessage.pas"/>
+        <UnitName Value="uROSOAPMessage"/>
+      </Item45>
+      <Item46>
+        <Filename Value="uROStreamSerializer.pas"/>
+        <UnitName Value="uROStreamSerializer"/>
+      </Item46>
+      <Item47>
+        <Filename Value="uROThread.pas"/>
+        <UnitName Value="uROThread"/>
+      </Item47>
+      <Item48>
+        <Filename Value="uROThreadPool.pas"/>
+        <UnitName Value="uROThreadPool"/>
+      </Item48>
+      <Item49>
+        <Filename Value="uROTypes.pas"/>
+        <UnitName Value="uROTypes"/>
+      </Item49>
+      <Item50>
+        <Filename Value="uROUnicodeConv.pas"/>
+        <UnitName Value="uROUnicodeConv"/>
+      </Item50>
+      <Item51>
+        <Filename Value="uROXDOM_2_3.pas"/>
+        <UnitName Value="uROXDOM_2_3"/>
+      </Item51>
+      <Item52>
+        <Filename Value="uROXMLIntf.pas"/>
+        <UnitName Value="uROXMLIntf"/>
+      </Item52>
+      <Item53>
+        <Filename Value="uROXmlRpcMessage.pas"/>
+        <UnitName Value="uROXmlRpcMessage"/>
+      </Item53>
+      <Item54>
+        <Filename Value="uROXMLSerializer.pas"/>
+        <UnitName Value="uROXMLSerializer"/>
+      </Item54>
+      <Item55>
+        <Filename Value="CodeGen\uRODLGenTools.pas"/>
+        <UnitName Value="uRODLGenTools"/>
+      </Item55>
+      <Item56>
+        <Filename Value="CodeGen\uRODLToPascal.pas"/>
+        <UnitName Value="uRODLToPascal"/>
+      </Item56>
+      <Item57>
+        <Filename Value="CodeGen\uRODLToPascalAsync.pas"/>
+        <UnitName Value="uRODLToPascalAsync"/>
+      </Item57>
+      <Item58>
+        <Filename Value="CodeGen\uRODLToPascalImpl.pas"/>
+        <UnitName Value="uRODLToPascalImpl"/>
+      </Item58>
+      <Item59>
+        <Filename Value="CodeGen\uRODLToPascalIntf.pas"/>
+        <UnitName Value="uRODLToPascalIntf"/>
+      </Item59>
+      <Item60>
+        <Filename Value="CodeGen\uRODLToPascalInvk.pas"/>
+        <UnitName Value="uRODLToPascalInvk"/>
+      </Item60>
+      <Item61>
+        <Filename Value="CodeGen\uRODLToWSDL.pas"/>
+        <UnitName Value="uRODLToWSDL"/>
+      </Item61>
+      <Item62>
+        <Filename Value="CodeGen\uRODLToXML.pas"/>
+        <UnitName Value="uRODLToXML"/>
+      </Item62>
+      <Item63>
+        <Filename Value="ZLib\FPC\uROZLib.pas"/>
+        <UnitName Value="uROZLib"/>
+      </Item63>
+      <Item64>
+        <Filename Value="uROJSONMessage.pas"/>
+        <UnitName Value="uROJSONMessage"/>
+      </Item64>
+      <Item65>
+        <Filename Value="uROJSONParser.pas"/>
+        <UnitName Value="uROJSONParser"/>
+      </Item65>
+    </Files>
+    <Type Value="DesignTime"/>
+    <RequiredPkgs Count="1">
+      <Item1>
+        <PackageName Value="LCL"/>
+      </Item1>
+    </RequiredPkgs>
+    <PublishOptions>
+      <Version Value="2"/>
+      <DestinationDirectory Value="$(TestDir)\publishedpackage\"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_Lazarus_Windows.lpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_Lazarus_Windows.lpk
new file mode 100644
index 0000000..1350b8b
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_Lazarus_Windows.lpk	
@@ -0,0 +1,294 @@
+<?xml version="1.0"?>
+<CONFIG>
+  <Package Version="3">
+    <PathDelim Value="\"/>
+    <Name Value="RemObjects_Core_Lazarus_Windows"/>
+    <CompilerOptions>
+      <Version Value="8"/>
+      <PathDelim Value="\"/>
+      <SearchPaths>
+        <OtherUnitFiles Value="CodeGen\;ZLib\FPC\"/>
+        <UnitOutputDirectory Value="..\Dcu\Lazarus\$(TargetCPU)-$(TargetOS)"/>
+        <SrcPath Value="$(LazarusDir)\lcl\"/>
+      </SearchPaths>
+      <Other>
+        <CompilerPath Value="$(CompPath)"/>
+      </Other>
+    </CompilerOptions>
+    <Description Value="RemObjects SDK - Core Library
+"/>
+    <Files Count="65">
+      <Item1>
+        <Filename Value="RemObjects_Core_Reg.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="RemObjects_Core_Reg"/>
+      </Item1>
+      <Item2>
+        <Filename Value="ROMasterServerLibrary_Intf.pas"/>
+        <UnitName Value="ROMasterServerLibrary_Intf"/>
+      </Item2>
+      <Item3>
+        <Filename Value="uIPHttpHeaders.pas"/>
+        <UnitName Value="uIPHttpHeaders"/>
+      </Item3>
+      <Item4>
+        <Filename Value="uROAsync.pas"/>
+        <UnitName Value="uROAsync"/>
+      </Item4>
+      <Item5>
+        <Filename Value="uROAsyncSCHelpers.pas"/>
+        <UnitName Value="uROAsyncSCHelpers"/>
+      </Item5>
+      <Item6>
+        <Filename Value="uROAsyncSuperTcpServer.pas"/>
+        <UnitName Value="uROAsyncSuperTcpServer"/>
+      </Item6>
+      <Item7>
+        <Filename Value="uROBaseSuperHttpChannel.pas"/>
+        <UnitName Value="uROBaseSuperHttpChannel"/>
+      </Item7>
+      <Item8>
+        <Filename Value="uROBaseSuperHttpServer.pas"/>
+        <UnitName Value="uROBaseSuperHttpServer"/>
+      </Item8>
+      <Item9>
+        <Filename Value="uROBinaryHelpers.pas"/>
+        <UnitName Value="uROBinaryHelpers"/>
+      </Item9>
+      <Item10>
+        <Filename Value="uROBinMessage.pas"/>
+        <UnitName Value="uROBinMessage"/>
+      </Item10>
+      <Item11>
+        <Filename Value="uROClasses.pas"/>
+        <UnitName Value="uROClasses"/>
+      </Item11>
+      <Item12>
+        <Filename Value="uROClassFactories.pas"/>
+        <UnitName Value="uROClassFactories"/>
+      </Item12>
+      <Item13>
+        <Filename Value="uROClient.pas"/>
+        <UnitName Value="uROClient"/>
+      </Item13>
+      <Item14>
+        <Filename Value="uROClientIntf.pas"/>
+        <UnitName Value="uROClientIntf"/>
+      </Item14>
+      <Item15>
+        <Filename Value="uROCOMInit.pas"/>
+        <UnitName Value="uROCOMInit"/>
+      </Item15>
+      <Item16>
+        <Filename Value="uROCompression.pas"/>
+        <UnitName Value="uROCompression"/>
+      </Item16>
+      <Item17>
+        <Filename Value="uRODBEventRepository.pas"/>
+        <UnitName Value="uRODBEventRepository"/>
+      </Item17>
+      <Item18>
+        <Filename Value="uRODBSessionManager.pas"/>
+        <UnitName Value="uRODBSessionManager"/>
+      </Item18>
+      <Item19>
+        <Filename Value="uRODL.pas"/>
+        <UnitName Value="uRODL"/>
+      </Item19>
+      <Item20>
+        <Filename Value="uRODynamicRequest.pas"/>
+        <UnitName Value="uRODynamicRequest"/>
+      </Item20>
+      <Item21>
+        <Filename Value="uROEventRepository.pas"/>
+        <UnitName Value="uROEventRepository"/>
+      </Item21>
+      <Item22>
+        <Filename Value="uROHtmlServerInfo.pas"/>
+        <UnitName Value="uROHtmlServerInfo"/>
+      </Item22>
+      <Item23>
+        <Filename Value="uROHtmlServerInfo.lrs"/>
+        <Type Value="LRS"/>
+      </Item23>
+      <Item24>
+        <Filename Value="uROHTTPDispatch.pas"/>
+        <UnitName Value="uROHTTPDispatch"/>
+      </Item24>
+      <Item25>
+        <Filename Value="uROHTTPTools.pas"/>
+        <UnitName Value="uROHTTPTools"/>
+      </Item25>
+      <Item26>
+        <Filename Value="uROIdeOnly.pas"/>
+        <UnitName Value="uROIdeOnly"/>
+      </Item26>
+      <Item27>
+        <Filename Value="uROLocalChannel.pas"/>
+        <UnitName Value="uROLocalChannel"/>
+      </Item27>
+      <Item28>
+        <Filename Value="uROLocalServer.pas"/>
+        <UnitName Value="uROLocalServer"/>
+      </Item28>
+      <Item29>
+        <Filename Value="uROMasterServerEventRepository.pas"/>
+        <UnitName Value="uROMasterServerEventRepository"/>
+      </Item29>
+      <Item30>
+        <Filename Value="uROMasterServerSessionManager.pas"/>
+        <UnitName Value="uROMasterServerSessionManager"/>
+      </Item30>
+      <Item31>
+        <Filename Value="uROOpenXMLImpl.pas"/>
+        <UnitName Value="uROOpenXMLImpl"/>
+      </Item31>
+      <Item32>
+        <Filename Value="uROPleaseWaitForm.pas"/>
+        <UnitName Value="uROPleaseWaitForm"/>
+      </Item32>
+      <Item33>
+        <Filename Value="uROPleaseWaitForm.lfm"/>
+        <Type Value="LFM"/>
+      </Item33>
+      <Item34>
+        <Filename Value="uROPleaseWaitForm.lrs"/>
+        <Type Value="LRS"/>
+      </Item34>
+      <Item35>
+        <Filename Value="uROPostMessage.pas"/>
+        <UnitName Value="uROPostMessage"/>
+      </Item35>
+      <Item36>
+        <Filename Value="uROPoweredByRemObjectsButton.pas"/>
+        <UnitName Value="uROPoweredByRemObjectsButton"/>
+      </Item36>
+      <Item37>
+        <Filename Value="uRORemoteDataModule.pas"/>
+        <UnitName Value="uRORemoteDataModule"/>
+      </Item37>
+      <Item38>
+        <Filename Value="uRORemoteService.pas"/>
+        <UnitName Value="uRORemoteService"/>
+      </Item38>
+      <Item39>
+        <Filename Value="uRORes.pas"/>
+        <UnitName Value="uRORes"/>
+      </Item39>
+      <Item40>
+        <Filename Value="uROSerializer.pas"/>
+        <UnitName Value="uROSerializer"/>
+      </Item40>
+      <Item41>
+        <Filename Value="uROServer.pas"/>
+        <UnitName Value="uROServer"/>
+      </Item41>
+      <Item42>
+        <Filename Value="uROServerIntf.pas"/>
+        <UnitName Value="uROServerIntf"/>
+      </Item42>
+      <Item43>
+        <Filename Value="uROServerMultiMessage.pas"/>
+        <UnitName Value="uROServerMultiMessage"/>
+      </Item43>
+      <Item44>
+        <Filename Value="uROSessions.pas"/>
+        <UnitName Value="uROSessions"/>
+      </Item44>
+      <Item45>
+        <Filename Value="uROSOAPMessage.pas"/>
+        <UnitName Value="uROSOAPMessage"/>
+      </Item45>
+      <Item46>
+        <Filename Value="uROStreamSerializer.pas"/>
+        <UnitName Value="uROStreamSerializer"/>
+      </Item46>
+      <Item47>
+        <Filename Value="uROThread.pas"/>
+        <UnitName Value="uROThread"/>
+      </Item47>
+      <Item48>
+        <Filename Value="uROThreadPool.pas"/>
+        <UnitName Value="uROThreadPool"/>
+      </Item48>
+      <Item49>
+        <Filename Value="uROTypes.pas"/>
+        <UnitName Value="uROTypes"/>
+      </Item49>
+      <Item50>
+        <Filename Value="uROUnicodeConv.pas"/>
+        <UnitName Value="uROUnicodeConv"/>
+      </Item50>
+      <Item51>
+        <Filename Value="uROXDOM_2_3.pas"/>
+        <UnitName Value="uROXDOM_2_3"/>
+      </Item51>
+      <Item52>
+        <Filename Value="uROXMLIntf.pas"/>
+        <UnitName Value="uROXMLIntf"/>
+      </Item52>
+      <Item53>
+        <Filename Value="uROXmlRpcMessage.pas"/>
+        <UnitName Value="uROXmlRpcMessage"/>
+      </Item53>
+      <Item54>
+        <Filename Value="uROXMLSerializer.pas"/>
+        <UnitName Value="uROXMLSerializer"/>
+      </Item54>
+      <Item55>
+        <Filename Value="CodeGen\uRODLGenTools.pas"/>
+        <UnitName Value="uRODLGenTools"/>
+      </Item55>
+      <Item56>
+        <Filename Value="CodeGen\uRODLToPascal.pas"/>
+        <UnitName Value="uRODLToPascal"/>
+      </Item56>
+      <Item57>
+        <Filename Value="CodeGen\uRODLToPascalAsync.pas"/>
+        <UnitName Value="uRODLToPascalAsync"/>
+      </Item57>
+      <Item58>
+        <Filename Value="CodeGen\uRODLToPascalImpl.pas"/>
+        <UnitName Value="uRODLToPascalImpl"/>
+      </Item58>
+      <Item59>
+        <Filename Value="CodeGen\uRODLToPascalIntf.pas"/>
+        <UnitName Value="uRODLToPascalIntf"/>
+      </Item59>
+      <Item60>
+        <Filename Value="CodeGen\uRODLToPascalInvk.pas"/>
+        <UnitName Value="uRODLToPascalInvk"/>
+      </Item60>
+      <Item61>
+        <Filename Value="CodeGen\uRODLToWSDL.pas"/>
+        <UnitName Value="uRODLToWSDL"/>
+      </Item61>
+      <Item62>
+        <Filename Value="CodeGen\uRODLToXML.pas"/>
+        <UnitName Value="uRODLToXML"/>
+      </Item62>
+      <Item63>
+        <Filename Value="ZLib\FPC\uROZLib.pas"/>
+        <UnitName Value="uROZLib"/>
+      </Item63>
+      <Item64>
+        <Filename Value="uROJSONMessage.pas"/>
+        <UnitName Value="uROJSONMessage"/>
+      </Item64>
+      <Item65>
+        <Filename Value="uROJSONParser.pas"/>
+        <UnitName Value="uROJSONParser"/>
+      </Item65>
+    </Files>
+    <Type Value="DesignTime"/>
+    <RequiredPkgs Count="1">
+      <Item1>
+        <PackageName Value="LCL"/>
+      </Item1>
+    </RequiredPkgs>
+    <PublishOptions>
+      <Version Value="2"/>
+      <DestinationDirectory Value="$(TestDir)\publishedpackage\"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_Reg.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_Reg.pas
new file mode 100644
index 0000000..e5af580
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_Reg.pas	
@@ -0,0 +1,112 @@
+unit RemObjects_Core_Reg;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+procedure Register;
+
+implementation
+
+uses
+  {$IFDEF FPC}
+  LResources,
+  {$ENDIF}
+  Classes,
+  uRORes,
+  uROSOAPMessage,
+  uROXmlRpcMessage,
+  uROServerMultiMessage,
+  uRODynamicRequest,
+  {$IFNDEF FPC}
+  {$IFDEF MSWINDOWS}
+  uROWinMessageChannel,
+  uROWinMessageServer,
+  uROWinInetHttpChannel,
+  {$ENDIF MSWINDOWS}
+  {$ENDIF FPC}
+  {$IFDEF MSWINDOWS}
+  uRODLLChannel,
+  uRONamedPipeChannel, uRONamedPipeServer,
+  {$ENDIF MSWINDOWS}
+  uROBinMessage,
+  uROPostMessage,
+  {$IF defined(VER140UP) OR defined(FPC)}
+  uROSessions,
+  uRORemoteService,
+  {$IFEND}
+  uROPoweredByRemObjectsButton,
+  uROEventRepository,
+  uRODBSessionManager,uRODBEventRepository,
+  uROMasterServerSessionManager,
+  uROMasterServerEventRepository,
+  {$IFDEF RemObjects_UseEncryption}
+  uROEncryptionEnvelope,
+  {$ENDIF}
+  uROLocalChannel,
+  uROLocalServer,
+  uROJSONMessage;
+
+{$IFNDEF FPC}
+  {$R RemObjects_Core_Glyphs.res}
+{$ENDIF}
+
+procedure Register;
+begin
+  RegisterComponents(str_ProductName,
+                     [TROBinMessage,
+                      TROPostMessage,
+                      TROSoapMessage,
+                      TROXmlRpcMessage,
+					  TROJSONMessage,
+                      TROServerMultiMessage,
+                      TRODynamicRequest,
+
+                      {$IFNDEF FPC}
+                        {$IFDEF MSWINDOWS}
+                          TROWinInetHTTPChannel,
+                          TROWinMessageChannel, TROWinMessageServer,
+                        {$ENDIF MSWINDOWS}
+                      {$ENDIF FPC}
+
+                      {$IFDEF MSWINDOWS}
+                        TROLocalChannel, TROLocalServer,
+                        TRODLLChannel,
+                        TRONamedPipeChannel, TRONamedPipeServer,
+                      {$ENDIF MSWINDOWS}                    
+
+                      {$IF defined(VER140UP) OR defined(FPC)}
+                        TROEventSessionManager,
+                        TROInMemorySessionManager,
+                        TRORemoteService,
+                      {$IFEND}
+
+                      TRODBSessionManager, TRODBEventRepository,
+
+                      TROPoweredByRemObjectsButton,
+                      TROInMemoryEventRepository,
+                      TROEventReceiver,
+                      TROMasterServerSessionManager,
+                      {$IFDEF RemObjects_UseEncryption}
+                      TROEncryptionEnvelope, TROAESEncryptionEnvelope,
+                      {$ENDIF RemObjects_UseEncryption}
+                      TROMasterServerEventRepository]);
+end;
+
+{$IFDEF FPC}
+initialization
+  {$i RemObjects_Core_Glyphs.lrs}
+{$ENDIF}
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_Reg.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_Reg.res
new file mode 100644
index 0000000..1f3a610
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Core_Reg.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_ICS_D12.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_ICS_D12.dpk
new file mode 100644
index 0000000..1a95ffb
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_ICS_D12.dpk	
@@ -0,0 +1,39 @@
+package RemObjects_ICS_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - ICS Library'}
+{$IMPLICITBUILD OFF}
+{$DEFINE DESIGNTIME}
+
+requires
+  rtl,
+  RemObjects_Core_D12,
+  dbrtl,
+  vcl;
+
+contains
+  uROIcsAsyncSuperTcpServer in 'uROIcsAsyncSuperTcpServer.pas',
+  RemObjects_ICS_Reg in 'RemObjects_ICS_Reg.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_ICS_D12.dproj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_ICS_D12.dproj
new file mode 100644
index 0000000..60fe31d
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_ICS_D12.dproj	
@@ -0,0 +1,152 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{bb4d9846-36ba-4252-9a22-3ad7df132255}</ProjectGuid>
+			<MainSource>RemObjects_ICS_D12.dpk</MainSource>
+			<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+			<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+			<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+			<DCC_DependencyCheckOutputName>..\Dcu\D12\RemObjects_ICS_D12.bpl</DCC_DependencyCheckOutputName>
+			<ProjectVersion>12</ProjectVersion>
+			<Config Condition="'$(Config)'==''">Debug</Config>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Release' or '$(Cfg_Release)'!=''">
+			<Cfg_Release>true</Cfg_Release>
+			<CfgParent>Base</CfgParent>
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Debug' or '$(Cfg_Debug)'!=''">
+			<Cfg_Debug>true</Cfg_Debug>
+			<CfgParent>Base</CfgParent>
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base)'!=''">
+			<GenDll>true</GenDll>
+			<DCC_DcpOutput>..\Dcu\D12</DCC_DcpOutput>
+			<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+			<DCC_DcuOutput>..\Dcu\D12</DCC_DcuOutput>
+			<GenPackage>true</GenPackage>
+			<DCC_GenerateStackFrames>true</DCC_GenerateStackFrames>
+			<DesignOnlyPackage>false</DesignOnlyPackage>
+			<DCC_ImageBase>00400000</DCC_ImageBase>
+			<DCC_DependencyCheckOutputName>..\Dcu\D12\RemObjects_ICS_D12.bpl</DCC_DependencyCheckOutputName>
+			<DCC_UnitSearchPath>..\Dcu\D12;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+			<DCC_Description>RemObjects SDK - ICS Library</DCC_Description>
+			<DCC_Define>DESIGNTIME;$(DCC_Define)</DCC_Define>
+			<DCC_BplOutput>..\Dcu\D12</DCC_BplOutput>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Cfg_Release)'!=''">
+			<DCC_DcpOutput>..\Dcu\D12</DCC_DcpOutput>
+			<DCC_HppOutput>..\Dcu\D12</DCC_HppOutput>
+			<DCC_DcuOutput>..\Dcu\D12</DCC_DcuOutput>
+			<Version>7.0</Version>
+			<DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+			<DCC_DebugInformation>False</DCC_DebugInformation>
+			<DCC_ObjPath>..\Dcu\D12;$(DCC_ObjPath)</DCC_ObjPath>
+			<DCC_ResourcePath>..\Dcu\D12;$(DCC_ResourcePath)</DCC_ResourcePath>
+			<DCC_Define>RELEASE;$(DCC_Define)</DCC_Define>
+			<DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+			<DCC_ObjOutput>..\Dcu\D12</DCC_ObjOutput>
+			<DCC_IncludePath>..\Dcu\D12;$(DCC_IncludePath)</DCC_IncludePath>
+			<DCC_BplOutput>..\Dcu\D12</DCC_BplOutput>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Cfg_Debug)'!=''">
+			<DCC_SYMBOL_EXPERIMENTAL>False</DCC_SYMBOL_EXPERIMENTAL>
+			<DCC_DcpOutput>..\Dcu\D12</DCC_DcpOutput>
+			<DCC_HppOutput>..\Dcu\D12</DCC_HppOutput>
+			<DCC_DcuOutput>..\Dcu\D12</DCC_DcuOutput>
+			<Version>7.0</Version>
+			<DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+			<DCC_UNIT_EXPERIMENTAL>False</DCC_UNIT_EXPERIMENTAL>
+			<DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+			<DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+			<DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+			<DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+			<DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+			<DCC_ObjPath>..\Dcu\D12;$(DCC_ObjPath)</DCC_ObjPath>
+			<DCC_ResourcePath>..\Dcu\D12;$(DCC_ResourcePath)</DCC_ResourcePath>
+			<DCC_Define>DEBUG;$(DCC_Define)</DCC_Define>
+			<DCC_ObjOutput>..\Dcu\D12</DCC_ObjOutput>
+			<DCC_IncludePath>..\Dcu\D12;$(DCC_IncludePath)</DCC_IncludePath>
+			<DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+			<DCC_BplOutput>..\Dcu\D12</DCC_BplOutput>
+		</PropertyGroup>
+		<ItemGroup>
+			<DelphiCompile Include="RemObjects_ICS_D12.dpk">
+				<MainSource>MainSource</MainSource>
+			</DelphiCompile>
+			<DCCReference Include="rtl.dcp"/>
+			<DCCReference Include="RemObjects_Core_D12.dcp"/>
+			<DCCReference Include="dbrtl.dcp"/>
+			<DCCReference Include="vcl.dcp"/>
+			<DCCReference Include="uROIcsAsyncSuperTcpServer.pas"/>
+			<DCCReference Include="RemObjects_ICS_Reg.pas"/>
+			<BuildConfiguration Include="Base">
+				<Key>Base</Key>
+			</BuildConfiguration>
+			<BuildConfiguration Include="Release">
+				<Key>Cfg_Release</Key>
+				<CfgParent>Base</CfgParent>
+			</BuildConfiguration>
+			<BuildConfiguration Include="Debug">
+				<Key>Cfg_Debug</Key>
+				<CfgParent>Base</CfgParent>
+			</BuildConfiguration>
+		</ItemGroup>
+		<Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" Condition="Exists('$(MSBuildBinPath)\Borland.Delphi.Targets')"/>
+		<ProjectExtensions>
+			<Borland.Personality>Delphi.Personality</Borland.Personality>
+			<Borland.ProjectType>Package</Borland.ProjectType>
+			<BorlandProject><BorlandProject>
+	<Delphi.Personality>
+		<Parameters>
+			<Parameters Name="UseLauncher">False</Parameters>
+			<Parameters Name="LoadAllSymbols">True</Parameters>
+			<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+		</Parameters>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+			<VersionInfo Name="MajorVer">1</VersionInfo>
+			<VersionInfo Name="MinorVer">0</VersionInfo>
+			<VersionInfo Name="Release">0</VersionInfo>
+			<VersionInfo Name="Build">0</VersionInfo>
+			<VersionInfo Name="Debug">False</VersionInfo>
+			<VersionInfo Name="PreRelease">False</VersionInfo>
+			<VersionInfo Name="Special">False</VersionInfo>
+			<VersionInfo Name="Private">False</VersionInfo>
+			<VersionInfo Name="DLL">False</VersionInfo>
+			<VersionInfo Name="Locale">1049</VersionInfo>
+			<VersionInfo Name="CodePage">1251</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+			<VersionInfoKeys Name="Comments"></VersionInfoKeys>
+		</VersionInfoKeys>
+		<Source>
+			<Source Name="MainSource">RemObjects_ICS_D12.dpk</Source>
+		</Source>  <Excluded_Packages>
+      
+      
+      
+      
+      <Excluded_Packages Name="$(BDS)\bin\bcboffice2k120.bpl">CodeGear C++Builder Office 2000 Servers Package</Excluded_Packages>
+      <Excluded_Packages Name="$(BDS)\bin\bcbofficexp120.bpl">CodeGear C++Builder Office XP Servers Package</Excluded_Packages>
+      <Excluded_Packages Name="$(BDS)\bin\dcloffice2k120.bpl">Microsoft Office 2000 Sample Automation Server Wrapper Components</Excluded_Packages>
+      <Excluded_Packages Name="$(BDS)\bin\dclofficexp120.bpl">Microsoft Office XP Sample Automation Server Wrapper Components</Excluded_Packages>
+    </Excluded_Packages>
+  </Delphi.Personality>
+</BorlandProject>
+</BorlandProject>
+		</ProjectExtensions>
+	</Project>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_ICS_D12.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_ICS_D12.res
new file mode 100644
index 0000000..622f41e
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_ICS_D12.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D10.bdsproj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D10.bdsproj
new file mode 100644
index 0000000..09886ed
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D10.bdsproj	
@@ -0,0 +1,184 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality" Type="String">Delphi.Personality</Option>
+			<Option Name="ProjectType" Type="String"></Option>
+			<Option Name="Version" Type="String">1.0</Option>
+			<Option Name="GUID" Type="String">{C7097D35-5E65-41AB-A425-381DD819B555}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource" Type="String">RemObjects_Indy_D10.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version" Type="String">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A" Type="Integer">8</Compiler>
+			<Compiler Name="B" Type="Integer">0</Compiler>
+			<Compiler Name="C" Type="Integer">1</Compiler>
+			<Compiler Name="D" Type="Integer">1</Compiler>
+			<Compiler Name="E" Type="Integer">0</Compiler>
+			<Compiler Name="F" Type="Integer">0</Compiler>
+			<Compiler Name="G" Type="Integer">1</Compiler>
+			<Compiler Name="H" Type="Integer">1</Compiler>
+			<Compiler Name="I" Type="Integer">1</Compiler>
+			<Compiler Name="J" Type="Integer">0</Compiler>
+			<Compiler Name="K" Type="Integer">0</Compiler>
+			<Compiler Name="L" Type="Integer">1</Compiler>
+			<Compiler Name="M" Type="Integer">0</Compiler>
+			<Compiler Name="N" Type="Integer">1</Compiler>
+			<Compiler Name="O" Type="Integer">1</Compiler>
+			<Compiler Name="P" Type="Integer">1</Compiler>
+			<Compiler Name="Q" Type="Integer">0</Compiler>
+			<Compiler Name="R" Type="Integer">0</Compiler>
+			<Compiler Name="S" Type="Integer">0</Compiler>
+			<Compiler Name="T" Type="Integer">0</Compiler>
+			<Compiler Name="U" Type="Integer">0</Compiler>
+			<Compiler Name="V" Type="Integer">1</Compiler>
+			<Compiler Name="W" Type="Integer">1</Compiler>
+			<Compiler Name="X" Type="Integer">1</Compiler>
+			<Compiler Name="Y" Type="Integer">1</Compiler>
+			<Compiler Name="Z" Type="Integer">1</Compiler>
+			<Compiler Name="ShowHints" Type="Boolean">True</Compiler>
+			<Compiler Name="ShowWarnings" Type="Boolean">True</Compiler>
+			<Compiler Name="UnitAliases" Type="String">WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;</Compiler>
+			<Compiler Name="NamespacePrefix" Type="String"></Compiler>
+			<Compiler Name="GenerateDocumentation" Type="Boolean">False</Compiler>
+			<Compiler Name="DefaultNamespace" Type="String"></Compiler>
+			<Compiler Name="SymbolDeprecated" Type="Boolean">False</Compiler>
+			<Compiler Name="SymbolLibrary" Type="Boolean">False</Compiler>
+			<Compiler Name="SymbolPlatform" Type="Boolean">False</Compiler>
+			<Compiler Name="SymbolExperimental" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitLibrary" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitPlatform" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitDeprecated" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitExperimental" Type="Boolean">False</Compiler>
+			<Compiler Name="HResultCompat" Type="Boolean">True</Compiler>
+			<Compiler Name="HidingMember" Type="Boolean">True</Compiler>
+			<Compiler Name="HiddenVirtual" Type="Boolean">True</Compiler>
+			<Compiler Name="Garbage" Type="Boolean">True</Compiler>
+			<Compiler Name="BoundsError" Type="Boolean">True</Compiler>
+			<Compiler Name="ZeroNilCompat" Type="Boolean">True</Compiler>
+			<Compiler Name="StringConstTruncated" Type="Boolean">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar" Type="Boolean">True</Compiler>
+			<Compiler Name="TypedConstVarPar" Type="Boolean">True</Compiler>
+			<Compiler Name="AsgToTypedConst" Type="Boolean">True</Compiler>
+			<Compiler Name="CaseLabelRange" Type="Boolean">True</Compiler>
+			<Compiler Name="ForVariable" Type="Boolean">True</Compiler>
+			<Compiler Name="ConstructingAbstract" Type="Boolean">True</Compiler>
+			<Compiler Name="ComparisonFalse" Type="Boolean">True</Compiler>
+			<Compiler Name="ComparisonTrue" Type="Boolean">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned" Type="Boolean">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned" Type="Boolean">True</Compiler>
+			<Compiler Name="UnsupportedConstruct" Type="Boolean">True</Compiler>
+			<Compiler Name="FileOpen" Type="Boolean">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc" Type="Boolean">True</Compiler>
+			<Compiler Name="BadGlobalSymbol" Type="Boolean">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor" Type="Boolean">True</Compiler>
+			<Compiler Name="InvalidDirective" Type="Boolean">True</Compiler>
+			<Compiler Name="PackageNoLink" Type="Boolean">True</Compiler>
+			<Compiler Name="PackageThreadVar" Type="Boolean">True</Compiler>
+			<Compiler Name="ImplicitImport" Type="Boolean">True</Compiler>
+			<Compiler Name="HPPEMITIgnored" Type="Boolean">True</Compiler>
+			<Compiler Name="NoRetVal" Type="Boolean">True</Compiler>
+			<Compiler Name="UseBeforeDef" Type="Boolean">True</Compiler>
+			<Compiler Name="ForLoopVarUndef" Type="Boolean">True</Compiler>
+			<Compiler Name="UnitNameMismatch" Type="Boolean">True</Compiler>
+			<Compiler Name="NoCFGFileFound" Type="Boolean">True</Compiler>
+			<Compiler Name="MessageDirective" Type="Boolean">True</Compiler>
+			<Compiler Name="ImplicitVariants" Type="Boolean">True</Compiler>
+			<Compiler Name="UnicodeToLocale" Type="Boolean">True</Compiler>
+			<Compiler Name="LocaleToUnicode" Type="Boolean">True</Compiler>
+			<Compiler Name="ImagebaseMultiple" Type="Boolean">True</Compiler>
+			<Compiler Name="SuspiciousTypecast" Type="Boolean">True</Compiler>
+			<Compiler Name="PrivatePropAccessor" Type="Boolean">True</Compiler>
+			<Compiler Name="UnsafeType" Type="Boolean">False</Compiler>
+			<Compiler Name="UnsafeCode" Type="Boolean">False</Compiler>
+			<Compiler Name="UnsafeCast" Type="Boolean">False</Compiler>
+			<Compiler Name="OptionTruncated" Type="Boolean">True</Compiler>
+			<Compiler Name="WideCharReduced" Type="Boolean">True</Compiler>
+			<Compiler Name="DuplicatesIgnored" Type="Boolean">True</Compiler>
+			<Compiler Name="UnitInitSeq">True</Compiler>
+			<Compiler Name="LocalPInvoke">True</Compiler>
+			<Compiler Name="CodePage"></Compiler>
+		</Compiler>
+		<Linker>
+			<Linker Name="MapFile" Type="Integer">0</Linker>
+			<Linker Name="OutputObjs" Type="Integer">0</Linker>
+			<Linker Name="ConsoleApp" Type="Integer">1</Linker>
+			<Linker Name="DebugInfo" Type="Boolean">False</Linker>
+			<Linker Name="RemoteSymbols" Type="Boolean">False</Linker>
+			<Linker Name="GenerateDRC" Type="Boolean">False</Linker>
+			<Linker Name="MinStackSize" Type="Integer">16384</Linker>
+			<Linker Name="MaxStackSize" Type="Integer">1048576</Linker>
+			<Linker Name="ImageBase" Type="Integer">4194304</Linker>
+			<Linker Name="ExeDescription" Type="String">RemObjects SDK - Indy Library</Linker>
+			<Linker Name="GenerateHpps">False</Linker>
+		</Linker>
+		<Directories>
+			<Directories Name="OutputDir" Type="String"></Directories>
+			<Directories Name="UnitOutputDir" Type="String">..\Dcu\D10</Directories>
+			<Directories Name="PackageDLLOutputDir" Type="String">..\Dcu\D10</Directories>
+			<Directories Name="PackageDCPOutputDir" Type="String">..\Dcu\D10</Directories>
+			<Directories Name="SearchPath" Type="String">..\Dcu\D10;$(BDS)\lib\Indy10</Directories>
+			<Directories Name="Packages" Type="String"></Directories>
+			<Directories Name="Conditionals" Type="String">DESIGNTIME</Directories>
+			<Directories Name="DebugSourceDirs" Type="String"></Directories>
+			<Directories Name="UsePackages" Type="Boolean">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams" Type="String"></Parameters>
+			<Parameters Name="HostApplication" Type="String"></Parameters>
+			<Parameters Name="Launcher" Type="String"></Parameters>
+			<Parameters Name="UseLauncher" Type="Boolean">False</Parameters>
+			<Parameters Name="DebugCWD" Type="String"></Parameters>
+			<Parameters Name="RemoteHost" Type="String"></Parameters>
+			<Parameters Name="RemotePath" Type="String"></Parameters>
+			<Parameters Name="RemoteLauncher" Type="String"></Parameters>
+			<Parameters Name="RemoteCWD" Type="String"></Parameters>
+			<Parameters Name="RemoteDebug" Type="Boolean">False</Parameters>
+			<Parameters Name="Debug Symbols Search Path"></Parameters>
+			<Parameters Name="LoadAllSymbols">True</Parameters>
+			<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+		</Parameters>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo" Type="Boolean">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="MajorVer" Type="Integer">0</VersionInfo>
+			<VersionInfo Name="MinorVer" Type="Integer">0</VersionInfo>
+			<VersionInfo Name="Release" Type="Integer">0</VersionInfo>
+			<VersionInfo Name="Build" Type="Integer">0</VersionInfo>
+			<VersionInfo Name="Debug" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="PreRelease" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="Special" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="Private" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="DLL" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="Locale" Type="Integer">1033</VersionInfo>
+			<VersionInfo Name="CodePage" Type="Integer">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName" Type="String">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription" Type="String"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion" Type="String">0.0.0.0</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName" Type="String"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright" Type="String"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks" Type="String"></VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename" Type="String"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName" Type="String">RemObjects SDK</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion" Type="String">1.0.0.0</VersionInfoKeys>
+		</VersionInfoKeys>
+		<Language>
+			<Language Name="ActiveLang" Type="String"></Language>
+			<Language Name="ProjectLang" Type="String">$00000000</Language>
+			<Language Name="RootDir" Type="String"></Language>
+		</Language>  <Excluded_Packages>
+      <Excluded_Packages Name="R:\Everwood\Dcu\D10\RemObjects_Everwood_D10.bpl">RemObjects Everwood for Delphi</Excluded_Packages>
+      <Excluded_Packages Name="R:\RemObjects SDK for Delphi\Dcu\D10\RemObjects_Core_D10.bpl">RemObjects SDK - Core Library</Excluded_Packages>
+      <Excluded_Packages Name="R:\RemObjects SDK for Delphi\Dcu\D10\RemObjects_IDE_D10.bpl">RemObjects SDK - IDE Integration for Win32</Excluded_Packages>
+    </Excluded_Packages>
+  </Delphi.Personality>
+	<ModelSupport>False</ModelSupport>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D10.cfg b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D10.cfg
new file mode 100644
index 0000000..5d79656
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D10.cfg	
@@ -0,0 +1,53 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N0"..\Dcu\D10"
+-LE"..\Dcu\D10"
+-LN"..\Dcu\D10"
+-U"..\Dcu\D10"
+-O"..\Dcu\D10"
+-I"..\Dcu\D10"
+-R"..\Dcu\D10"
+-DDESIGNTIME
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-SYMBOL_EXPERIMENTAL
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNIT_EXPERIMENTAL
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D10.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D10.dpk
new file mode 100644
index 0000000..b905d30
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D10.dpk	
@@ -0,0 +1,69 @@
+package RemObjects_Indy_D10;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - Indy Library'}
+{$IMPLICITBUILD OFF}
+{$DEFINE DESIGNTIME}
+{%File 'RemObjects.inc'}
+
+requires
+  rtl,
+  {$IFDEF RemObjects_INDY9}
+  Indy,
+  {$ELSE}
+  IndyCore, IndySystem, IndyProtocols,
+  {$ENDIF}
+  vcl,
+  vclx,
+  {$IFNDEF RemObjects_NO_DEMANDLOAD_FIX}
+  designide,
+  {$ENDIF}  
+  RemObjects_Core_D10;
+
+contains
+  RemObjects_Indy_Reg in 'RemObjects_Indy_Reg.pas',
+  uROIndyHTTPChannel in 'uROIndyHTTPChannel.pas',
+  uROIndyTCPChannel in 'uROIndyTCPChannel.pas',
+  uROIndyTCPServer in 'uROIndyTCPServer.pas',
+  uROIndyHTTPServer in 'uROIndyHTTPServer.pas',
+  uROIndyUDPServer in 'uROIndyUDPServer.pas',
+  uROIndyUDPChannel in 'uROIndyUDPChannel.pas',
+  uROBroadcastServer in 'uROBroadcastServer.pas',
+  uROBroadcastChannel in 'uROBroadcastChannel.pas',
+  uROStreamUtils in 'uROStreamUtils.pas',
+  uROIndyEmailChannel in 'uROIndyEmailChannel.pas',
+  uROIndyEmailServer in 'uROIndyEmailServer.pas',
+  uROIndyEmail in 'uROIndyEmail.pas',
+  uRODiscovery in 'uRODiscovery.pas',
+  uRODiscoveryService_Impl in 'uRODiscoveryService_Impl.pas',
+  uRODiscovery_Async in 'uRODiscovery_Async.pas',
+  uRODiscovery_Intf in 'uRODiscovery_Intf.pas',
+  uRODiscovery_Invk in 'uRODiscovery_Invk.pas',
+  uROAsyncResponseStorage in 'uROAsyncResponseStorage.pas',
+  uROSuperTCPServer in 'uROSuperTCPServer.pas',
+  uROSuperTCPChannel in 'uROSuperTCPChannel.pas',
+  uROSCHelpers in 'uROSCHelpers.pas',
+  uROIndySuperHttpChannel in 'uROIndySuperHttpChannel.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D10.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D10.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D10.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D11.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D11.dpk
new file mode 100644
index 0000000..61ea101
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D11.dpk	
@@ -0,0 +1,68 @@
+package RemObjects_Indy_D11;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - Indy Library'}
+{$IMPLICITBUILD OFF}
+{$DEFINE DESIGNTIME}
+
+{$INCLUDE RemObjects.inc}
+
+requires
+  rtl,
+  {$IFDEF RemObjects_INDY9}
+  Indy,
+  {$ELSE}
+  IndyCore, IndySystem, IndyProtocols,
+  {$ENDIF}
+  vcl,
+  vclx,
+  designide,
+  RemObjects_Core_D11;
+
+contains
+  RemObjects_Indy_Reg in 'RemObjects_Indy_Reg.pas',
+  uROIndyHTTPChannel in 'uROIndyHTTPChannel.pas',
+  uROIndyTCPChannel in 'uROIndyTCPChannel.pas',
+  uROIndyTCPServer in 'uROIndyTCPServer.pas',
+  uROIndyHTTPServer in 'uROIndyHTTPServer.pas',
+  uROIndyUDPServer in 'uROIndyUDPServer.pas',
+  uROIndyUDPChannel in 'uROIndyUDPChannel.pas',
+  uROBroadcastServer in 'uROBroadcastServer.pas',
+  uROBroadcastChannel in 'uROBroadcastChannel.pas',
+  uROStreamUtils in 'uROStreamUtils.pas',
+  uROIndyEmailChannel in 'uROIndyEmailChannel.pas',
+  uROIndyEmailServer in 'uROIndyEmailServer.pas',
+  uROIndyEmail in 'uROIndyEmail.pas',
+  uRODiscovery in 'uRODiscovery.pas',
+  uRODiscoveryService_Impl in 'uRODiscoveryService_Impl.pas',
+  uRODiscovery_Async in 'uRODiscovery_Async.pas',
+  uRODiscovery_Intf in 'uRODiscovery_Intf.pas',
+  uRODiscovery_Invk in 'uRODiscovery_Invk.pas',
+  uROAsyncResponseStorage in 'uROAsyncResponseStorage.pas',
+  uROSuperTCPServer in 'uROSuperTCPServer.pas',
+  uROSuperTCPChannel in 'uROSuperTCPChannel.pas',
+  uROSCHelpers in 'uROSCHelpers.pas',
+  uROIndySuperHttpChannel in 'uROIndySuperHttpChannel.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D11.dproj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D11.dproj
new file mode 100644
index 0000000..96d8adb
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D11.dproj	
@@ -0,0 +1,109 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{2c907631-bcb2-4bfe-83c9-ce4d30a1f7e0}</ProjectGuid>
+    <MainSource>RemObjects_Indy_D11.dpk</MainSource>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+    <DCC_DependencyCheckOutputName>..\Dcu\D11\RemObjects_Indy_D11.bpl</DCC_DependencyCheckOutputName>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DebugInformation>False</DCC_DebugInformation>
+    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+    <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+    <DCC_DcuOutput>..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\Dcu\D11;$(BDS)\lib\Indy10</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\Dcu\D11;$(BDS)\lib\Indy10</DCC_ResourcePath>
+    <DCC_ObjPath>..\Dcu\D11;$(BDS)\lib\Indy10</DCC_ObjPath>
+    <DCC_IncludePath>..\Dcu\D11;$(BDS)\lib\Indy10</DCC_IncludePath>
+    <DCC_Define>DESIGNTIME;RELEASE</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_SYMBOL_EXPERIMENTAL>False</DCC_SYMBOL_EXPERIMENTAL>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+    <DCC_UNIT_EXPERIMENTAL>False</DCC_UNIT_EXPERIMENTAL>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+    <DCC_DcuOutput>..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\Dcu\D11</DCC_IncludePath>
+    <DCC_Define>DESIGNTIME</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_SYMBOL_EXPERIMENTAL>False</DCC_SYMBOL_EXPERIMENTAL>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+    <DCC_UNIT_EXPERIMENTAL>False</DCC_UNIT_EXPERIMENTAL>
+  </PropertyGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Delphi.Personality</Borland.Personality>
+    <Borland.ProjectType>Package</Borland.ProjectType>
+    <BorlandProject>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">RemObjects SDK - Indy Library</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">3</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">516</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">3.0.0.516</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
+      
+      
+      
+      <Excluded_Packages Name="R:\Everwood\Dcu\D10\RemObjects_Everwood_D10.bpl">RemObjects Everwood for Delphi</Excluded_Packages>
+      <Excluded_Packages Name="R:\RemObjects SDK for Delphi\Dcu\D10\RemObjects_Core_D10.bpl">RemObjects SDK - Core Library</Excluded_Packages>
+      <Excluded_Packages Name="R:\RemObjects SDK for Delphi\Dcu\D10\RemObjects_IDE_D10.bpl">RemObjects SDK - IDE Integration for Win32</Excluded_Packages>
+    </Excluded_Packages><Source><Source Name="MainSource">RemObjects_Indy_D11.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
+  <ItemGroup>
+    <DelphiCompile Include="RemObjects_Indy_D11.dpk">
+      <MainSource>MainSource</MainSource>
+    </DelphiCompile>
+    <DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\designide.dcp" />
+    <DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\IndyCore.dcp" />
+    <DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\IndyProtocols.dcp" />
+    <DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\IndySystem.dcp" />
+    <DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\RemObjects_Core_D11.dcp" />
+    <DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\rtl.dcp" />
+    <DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\vcl.dcp" />
+    <DCCReference Include="..\..\..\Stardock\Object Desktop\DeskScapes\vclx.dcp" />
+    <DCCReference Include="RemObjects_Indy_Reg.pas" />
+    <DCCReference Include="uROAsyncResponseStorage.pas" />
+    <DCCReference Include="uROBroadcastChannel.pas" />
+    <DCCReference Include="uROBroadcastServer.pas" />
+    <DCCReference Include="uRODiscovery.pas" />
+    <DCCReference Include="uRODiscoveryService_Impl.pas" />
+    <DCCReference Include="uRODiscovery_Async.pas" />
+    <DCCReference Include="uRODiscovery_Intf.pas" />
+    <DCCReference Include="uRODiscovery_Invk.pas" />
+    <DCCReference Include="uROIndyEmail.pas" />
+    <DCCReference Include="uROIndyEmailChannel.pas" />
+    <DCCReference Include="uROIndyEmailServer.pas" />
+    <DCCReference Include="uROIndyHTTPChannel.pas" />
+    <DCCReference Include="uROIndyHTTPServer.pas" />
+    <DCCReference Include="uROIndySuperHttpChannel.pas" />
+    <DCCReference Include="uROIndyTCPChannel.pas" />
+    <DCCReference Include="uROIndyTCPServer.pas" />
+    <DCCReference Include="uROIndyUDPChannel.pas" />
+    <DCCReference Include="uROIndyUDPServer.pas" />
+    <DCCReference Include="uROSCHelpers.pas" />
+    <DCCReference Include="uROStreamUtils.pas" />
+    <DCCReference Include="uROSuperTCPChannel.pas" />
+    <DCCReference Include="uROSuperTCPServer.pas" />
+    <None Include="RemObjects.inc" />
+  </ItemGroup>
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D11.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D11.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D11.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D12.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D12.dpk
new file mode 100644
index 0000000..0f7491f
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D12.dpk	
@@ -0,0 +1,68 @@
+package RemObjects_Indy_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - Indy Library'}
+{$IMPLICITBUILD OFF}
+{$DEFINE DESIGNTIME}
+
+{$INCLUDE RemObjects.inc}
+
+requires
+  rtl,
+  {$IFDEF RemObjects_INDY9}
+  Indy,
+  {$ELSE}
+  IndyCore, IndySystem, IndyProtocols,
+  {$ENDIF}
+  vcl,
+  vclx,
+  designide,
+  RemObjects_Core_D12;
+
+contains
+  RemObjects_Indy_Reg in 'RemObjects_Indy_Reg.pas',
+  uROIndyHTTPChannel in 'uROIndyHTTPChannel.pas',
+  uROIndyTCPChannel in 'uROIndyTCPChannel.pas',
+  uROIndyTCPServer in 'uROIndyTCPServer.pas',
+  uROIndyHTTPServer in 'uROIndyHTTPServer.pas',
+  uROIndyUDPServer in 'uROIndyUDPServer.pas',
+  uROIndyUDPChannel in 'uROIndyUDPChannel.pas',
+  uROBroadcastServer in 'uROBroadcastServer.pas',
+  uROBroadcastChannel in 'uROBroadcastChannel.pas',
+  uROStreamUtils in 'uROStreamUtils.pas',
+  uROIndyEmailChannel in 'uROIndyEmailChannel.pas',
+  uROIndyEmailServer in 'uROIndyEmailServer.pas',
+  uROIndyEmail in 'uROIndyEmail.pas',
+  uRODiscovery in 'uRODiscovery.pas',
+  uRODiscoveryService_Impl in 'uRODiscoveryService_Impl.pas',
+  uRODiscovery_Async in 'uRODiscovery_Async.pas',
+  uRODiscovery_Intf in 'uRODiscovery_Intf.pas',
+  uRODiscovery_Invk in 'uRODiscovery_Invk.pas',
+  uROAsyncResponseStorage in 'uROAsyncResponseStorage.pas',
+  uROSuperTCPServer in 'uROSuperTCPServer.pas',
+  uROSuperTCPChannel in 'uROSuperTCPChannel.pas',
+  uROSCHelpers in 'uROSCHelpers.pas',
+  uROIndySuperHttpChannel in 'uROIndySuperHttpChannel.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D12.dproj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D12.dproj
new file mode 100644
index 0000000..c2c2102
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D12.dproj	
@@ -0,0 +1,124 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{2c907631-bcb2-4bfe-83c9-ce4d30a1f7e0}</ProjectGuid>
+			<MainSource>RemObjects_Indy_D12.dpk</MainSource>
+			<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+			<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+			<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+			<DCC_DependencyCheckOutputName>..\Dcu\D12\RemObjects_Indy_D12.bpl</DCC_DependencyCheckOutputName>
+			<ProjectVersion>11.1</ProjectVersion>
+			<Config Condition="'$(Config)'==''">Base</Config>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base)'!=''">
+			<DCC_SymbolReferenceInfo>1</DCC_SymbolReferenceInfo>
+			<DCC_IMPLICIT_STRING_CAST>error</DCC_IMPLICIT_STRING_CAST>
+			<DCC_IMPLICIT_STRING_CAST_LOSS>error</DCC_IMPLICIT_STRING_CAST_LOSS>
+			<DCC_EXPLICIT_STRING_CAST_LOSS>error</DCC_EXPLICIT_STRING_CAST_LOSS>
+			<DCC_EXPLICIT_STRING_CAST>error</DCC_EXPLICIT_STRING_CAST>
+			<DCC_CVT_ACHAR_TO_WCHAR>error</DCC_CVT_ACHAR_TO_WCHAR>
+			<DCC_CVT_WCHAR_TO_ACHAR>error</DCC_CVT_WCHAR_TO_ACHAR>
+			<DCC_CVT_WIDENING_STRING_LOST>error</DCC_CVT_WIDENING_STRING_LOST>
+			<DCC_CVT_NARROWING_STRING_LOST>error</DCC_CVT_NARROWING_STRING_LOST>
+			<GenDll>true</GenDll>
+			<DCC_DcpOutput>..\Dcu\D12</DCC_DcpOutput>
+			<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+			<DCC_DcuOutput>..\Dcu\D12</DCC_DcuOutput>
+			<GenPackage>true</GenPackage>
+			<DCC_GenerateStackFrames>true</DCC_GenerateStackFrames>
+			<DesignOnlyPackage>false</DesignOnlyPackage>
+			<DCC_ImageBase>00400000</DCC_ImageBase>
+			<DCC_DependencyCheckOutputName>..\Dcu\D12\RemObjects_Indy_D12.bpl</DCC_DependencyCheckOutputName>
+			<DCC_UnitSearchPath>..\Dcu\D12;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+			<DCC_Description>RemObjects SDK - Indy Library</DCC_Description>
+			<DCC_Define>DESIGNTIME;$(DCC_Define)</DCC_Define>
+			<DCC_BplOutput>..\Dcu\D12</DCC_BplOutput>
+		</PropertyGroup>
+		<ItemGroup>
+			<DelphiCompile Include="RemObjects_Indy_D12.dpk">
+				<MainSource>MainSource</MainSource>
+			</DelphiCompile>
+			<DCCReference Include="rtl.dcp"/>
+			<DCCReference Include="IndyCore.dcp"/>
+			<DCCReference Include="IndySystem.dcp"/>
+			<DCCReference Include="IndyProtocols.dcp"/>
+			<DCCReference Include="vcl.dcp"/>
+			<DCCReference Include="vclx.dcp"/>
+			<DCCReference Include="designide.dcp"/>
+			<DCCReference Include="RemObjects_Core_D12.dcp"/>
+			<DCCReference Include="RemObjects_Indy_Reg.pas"/>
+			<DCCReference Include="uROIndyHTTPChannel.pas"/>
+			<DCCReference Include="uROIndyTCPChannel.pas"/>
+			<DCCReference Include="uROIndyTCPServer.pas"/>
+			<DCCReference Include="uROIndyHTTPServer.pas"/>
+			<DCCReference Include="uROIndyUDPServer.pas"/>
+			<DCCReference Include="uROIndyUDPChannel.pas"/>
+			<DCCReference Include="uROBroadcastServer.pas"/>
+			<DCCReference Include="uROBroadcastChannel.pas"/>
+			<DCCReference Include="uROStreamUtils.pas"/>
+			<DCCReference Include="uROIndyEmailChannel.pas"/>
+			<DCCReference Include="uROIndyEmailServer.pas"/>
+			<DCCReference Include="uROIndyEmail.pas"/>
+			<DCCReference Include="uRODiscovery.pas"/>
+			<DCCReference Include="uRODiscoveryService_Impl.pas"/>
+			<DCCReference Include="uRODiscovery_Async.pas"/>
+			<DCCReference Include="uRODiscovery_Intf.pas"/>
+			<DCCReference Include="uRODiscovery_Invk.pas"/>
+			<DCCReference Include="uROAsyncResponseStorage.pas"/>
+			<DCCReference Include="uROSuperTCPServer.pas"/>
+			<DCCReference Include="uROSuperTCPChannel.pas"/>
+			<DCCReference Include="uROSCHelpers.pas"/>
+			<DCCReference Include="uROIndySuperHttpChannel.pas"/>
+			<None Include="RemObjects.inc"/>
+			<BuildConfiguration Include="Base">
+				<Key>Base</Key>
+			</BuildConfiguration>
+		</ItemGroup>
+		<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+		<ProjectExtensions>
+			<Borland.Personality>Delphi.Personality.12</Borland.Personality>
+			<Borland.ProjectType>Package</Borland.ProjectType>
+			<BorlandProject>
+				<Delphi.Personality>
+					<Parameters>
+						<Parameters Name="UseLauncher">False</Parameters>
+						<Parameters Name="LoadAllSymbols">True</Parameters>
+						<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+					</Parameters>
+					<VersionInfo>
+						<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+						<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+						<VersionInfo Name="MajorVer">3</VersionInfo>
+						<VersionInfo Name="MinorVer">0</VersionInfo>
+						<VersionInfo Name="Release">0</VersionInfo>
+						<VersionInfo Name="Build">516</VersionInfo>
+						<VersionInfo Name="Debug">False</VersionInfo>
+						<VersionInfo Name="PreRelease">False</VersionInfo>
+						<VersionInfo Name="Special">False</VersionInfo>
+						<VersionInfo Name="Private">False</VersionInfo>
+						<VersionInfo Name="DLL">False</VersionInfo>
+						<VersionInfo Name="Locale">1033</VersionInfo>
+						<VersionInfo Name="CodePage">1252</VersionInfo>
+					</VersionInfo>
+					<VersionInfoKeys>
+						<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="FileDescription"/>
+						<VersionInfoKeys Name="FileVersion">3.0.0.516</VersionInfoKeys>
+						<VersionInfoKeys Name="InternalName"/>
+						<VersionInfoKeys Name="LegalCopyright"/>
+						<VersionInfoKeys Name="LegalTrademarks"/>
+						<VersionInfoKeys Name="OriginalFilename"/>
+						<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+						<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+					</VersionInfoKeys>
+					<Excluded_Packages/>
+					<Source>
+						<Source Name="MainSource">RemObjects_Indy_D12.dpk</Source>
+					</Source>
+				</Delphi.Personality>
+			</BorlandProject>
+			<ProjectFileVersion>12</ProjectFileVersion>
+		</ProjectExtensions>
+	</Project>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D12.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D12.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D12.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D5.dof b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D5.dof
new file mode 100644
index 0000000..44f59f8
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D5.dof	
@@ -0,0 +1,95 @@
+[Compiler]
+A=1
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects - Indy Package
+[Directories]
+OutputDir=
+UnitOutputDir=..\Dcu\D5
+PackageDLLOutputDir=..\Dcu\D5
+PackageDCPOutputDir=..\Dcu\D5
+SearchPath=..\Dcu\D5
+Packages=Vcl50;Vclx50;VclSmp50;Vcldb50;vclado50;Vclbde50;vcldbx50;VCLIB50;Vclmid50;vclie50;Inetdb50;Inet50;dclocx50;dclaxserver50;Indy50;RemObjects_Core_D5
+Conditionals=
+DebugSourceDirs=
+UsePackages=0
+[Parameters]
+RunParams=
+HostApplication=
+[Language]
+ActiveLang=
+ProjectLang=$00000409
+RootDir=
+[Version Info]
+IncludeVerInfo=1
+AutoIncBuild=0
+MajorVer=0
+MinorVer=0
+Release=0
+Build=0
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=0.0.0.0
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
+[Excluded Packages]
+L:\Others\Async Professional 4.0\A405_D50.BPL=Async Professional components
+[HistoryLists\hlUnitAliases]
+Count=1
+Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+[HistoryLists\hlUnitOutputDirectory]
+Count=1
+Item0=s:\exe\dcu50
+[HistoryLists\hlBPLOutput]
+Count=1
+Item0=l:\Packages
+[HistoryLists\hlDCPOutput]
+Count=1
+Item0=l:\Packages
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D5.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D5.dpk
new file mode 100644
index 0000000..664961b
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D5.dpk	
@@ -0,0 +1,59 @@
+package RemObjects_Indy_D5;
+
+{$R *.res}
+{$ALIGN ON}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - Indy Library'}
+{$IMPLICITBUILD OFF}
+{$DEFINE DESIGNTIME}
+{%File 'RemObjects.inc'}
+
+requires
+  Vcl50,
+  RemObjects_Core_D5;
+
+contains
+  RemObjects_Indy_Reg in 'RemObjects_Indy_Reg.pas',
+  uROIndyHTTPChannel in 'uROIndyHTTPChannel.pas',
+  uROIndyTCPChannel in 'uROIndyTCPChannel.pas',
+  uROIndyTCPServer in 'uROIndyTCPServer.pas',
+  uROIndyHTTPServer in 'uROIndyHTTPServer.pas',
+  uROIndyUDPServer in 'uROIndyUDPServer.pas',
+  uROIndyUDPChannel in 'uROIndyUDPChannel.pas',
+  uROBroadcastServer in 'uROBroadcastServer.pas',
+  uROBroadcastChannel in 'uROBroadcastChannel.pas',
+  uROStreamUtils in 'uROStreamUtils.pas',
+  uROIndyEmailChannel in 'uROIndyEmailChannel.pas',
+  uROIndyEmailServer in 'uROIndyEmailServer.pas',
+  uROIndyEmail in 'uROIndyEmail.pas',
+  uRODiscovery in 'uRODiscovery.pas',
+  uRODiscoveryService_Impl in 'uRODiscoveryService_Impl.pas',
+  uRODiscovery_Async in 'uRODiscovery_Async.pas',
+  uRODiscovery_Intf in 'uRODiscovery_Intf.pas',
+  uRODiscovery_Invk in 'uRODiscovery_Invk.pas',
+  uROAsyncResponseStorage in 'uROAsyncResponseStorage.pas',
+  uROSuperTCPServer in 'uROSuperTCPServer.pas',
+  uROSuperTCPChannel in 'uROSuperTCPChannel.pas',
+  uROSCHelpers in 'uROSCHelpers.pas',
+  uROIndySuperHttpChannel in 'uROIndySuperHttpChannel.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D5.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D5.res
new file mode 100644
index 0000000..a2de886
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D5.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D6.dof b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D6.dof
new file mode 100644
index 0000000..1fda2aa
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D6.dof	
@@ -0,0 +1,104 @@
+[FileVersion]
+Version=6.0
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects SDK - Indy Library
+[Directories]
+OutputDir=
+UnitOutputDir=..\Dcu\D6
+PackageDLLOutputDir=..\Dcu\D6
+PackageDCPOutputDir=..\Dcu\D6
+SearchPath=..\Dcu\D6
+Packages=Vcl50;Vclx50;VclSmp50;Vcldb50;vclado50;Vclbde50;vcldbx50;VCLIB50;Vclmid50;vclie50;Inetdb50;Inet50;dclocx50;dclaxserver50;Indy50;RemObjects_Core_D5
+Conditionals=DESIGNTIME
+DebugSourceDirs=
+UsePackages=0
+[Parameters]
+RunParams=
+HostApplication=
+Launcher=
+UseLauncher=0
+DebugCWD=
+[Version Info]
+IncludeVerInfo=1
+AutoIncBuild=0
+MajorVer=1
+MinorVer=0
+Release=4
+Build=47
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=1.0.4.47
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
+[Excluded Packages]
+W:\Ginger\RemObjects\Dcu\D6\RemObjects_DataSnap_D6.bpl=RemObjects - DataSnap Package
+W:\Ginger\RemObjects\Dcu\D6\RemObjects_IDE_D6.bpl=RemObjects - IDE
+W:\Ginger\RemObjects\Dcu\D6\RemObjects_Indy_D6.bpl=RemObjects - Indy Package
+W:\Ginger\RemObjects\Dcu\D6\RemObjects_BPDX_D6.bpl=RemObjects - BPDX Package
+L:\Others\DevEx\ExpressWeb Framework\Delphi 6\Lib\dclcxWebD6.bpl=ExpressWeb Framework by Developer Express Inc.
+L:\Others\DevEx\ExpressWeb Framework\Delphi 6\Lib\dclcxWebTeeChartD6.bpl=WebTeeChart for EWF by Developer Express Inc.
+L:\Others\DevEx\ExpressWeb Framework\Delphi 6\Lib\dclcxWebSnapD6.bpl=ExpressWebPage Module for WebSnap Application by Developer Express Inc.
+L:\Packages\addict3db_d6.bpl=Addict 3.2 for Delphi 6 (DB Aware Components)
+L:\Packages\X255PD60.bpl=TurboPower XMLPartner Professional 2.55 Designtime package - VCL60
+l:\Others\DevEx\CX Library\Delphi 6\Lib\dclcxLibraryVCLD6.bpl=Express Cross Platform Library (VCL Edition) by Developer Express Inc.
+l:\Others\DevEx\ExpressEditors Library 4\Delphi 6\Lib\dclcxEditorsVCLD6.bpl=ExpressEditors Library 4 (VCL Edition) by Developer Express Inc.
+l:\Others\DevEx\ExpressQuantumGrid 4\Delphi 6\Lib\dclcxGridVCLD6.bpl=ExpressQuantumGrid 4 (VCL Edition) by Developer Express Inc.
+l:\Others\DevEx\ExpressQuantumGrid 4\Delphi 6\Lib\dclcxGridUtilsVCLD6.bpl=ExpressQuantumGrid 4 Utils (VCL Edition) by Developer Express Inc.
+l:\Others\DevEx\ExpressSpreadSheet\Delphi 6\Lib\dclcxSpreadSheetVCLD6.bpl=ExpressSpreadSheet (VCL Edition) by Developer Express Inc.
+l:\Others\DevEx\ExpressPageControl 2\Delphi 6\Lib\dclcxPageControlVCLD6.bpl=Express Cross Platform PageControl (VCL Edition) by Developer Express Inc.
+[HistoryLists\hlConditionals]
+Count=1
+Item0=Development
+[HistoryLists\hlUnitAliases]
+Count=1
+Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D6.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D6.dpk
new file mode 100644
index 0000000..097ea3b
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D6.dpk	
@@ -0,0 +1,62 @@
+package RemObjects_Indy_D6;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - Indy Library'}
+{$IMPLICITBUILD OFF}
+{$DEFINE DESIGNTIME}
+{%File 'RemObjects.inc'}
+
+requires
+  rtl,
+  indy,
+  vcl,
+  vclx,
+  RemObjects_Core_D6;
+
+contains
+  RemObjects_Indy_Reg in 'RemObjects_Indy_Reg.pas',
+  uROIndyHTTPChannel in 'uROIndyHTTPChannel.pas',
+  uROIndyTCPChannel in 'uROIndyTCPChannel.pas',
+  uROIndyTCPServer in 'uROIndyTCPServer.pas',
+  uROIndyHTTPServer in 'uROIndyHTTPServer.pas',
+  uROIndyUDPServer in 'uROIndyUDPServer.pas',
+  uROIndyUDPChannel in 'uROIndyUDPChannel.pas',
+  uROBroadcastServer in 'uROBroadcastServer.pas',
+  uROBroadcastChannel in 'uROBroadcastChannel.pas',
+  uROStreamUtils in 'uROStreamUtils.pas',
+  uROIndyEmailChannel in 'uROIndyEmailChannel.pas',
+  uROIndyEmailServer in 'uROIndyEmailServer.pas',
+  uROIndyEmail in 'uROIndyEmail.pas',
+  uRODiscovery in 'uRODiscovery.pas',
+  uRODiscoveryService_Impl in 'uRODiscoveryService_Impl.pas',
+  uRODiscovery_Async in 'uRODiscovery_Async.pas',
+  uRODiscovery_Intf in 'uRODiscovery_Intf.pas',
+  uRODiscovery_Invk in 'uRODiscovery_Invk.pas',
+  uROAsyncResponseStorage in 'uROAsyncResponseStorage.pas',
+  uROSuperTCPServer in 'uROSuperTCPServer.pas',
+  uROSuperTCPChannel in 'uROSuperTCPChannel.pas',
+  uROSCHelpers in 'uROSCHelpers.pas',
+  uROIndySuperHttpChannel in 'uROIndySuperHttpChannel.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D6.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D6.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D6.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D7.dof b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D7.dof
new file mode 100644
index 0000000..1f1a621
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D7.dof	
@@ -0,0 +1,131 @@
+[FileVersion]
+Version=7.0
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects SDK - Indy Library
+[Directories]
+OutputDir=
+UnitOutputDir=..\Dcu\D7
+PackageDLLOutputDir=..\Dcu\D7
+PackageDCPOutputDir=..\Dcu\D7
+SearchPath=$(DELPHI)\Lib\Debug;..\Dcu\D7
+Packages=Vcl50;Vclx50;VclSmp50;Vcldb50;vclado50;Vclbde50;vcldbx50;VCLIB50;Vclmid50;vclie50;Inetdb50;Inet50;dclocx50;dclaxserver50;Indy50;RemObjects_Core_D5
+Conditionals=DESIGNTIME
+DebugSourceDirs=
+UsePackages=0
+[Parameters]
+RunParams=
+HostApplication=
+Launcher=
+UseLauncher=0
+DebugCWD=
+[Version Info]
+IncludeVerInfo=1
+AutoIncBuild=0
+MajorVer=3
+MinorVer=0
+Release=0
+Build=257
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=3.0.0.257
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D7.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D7.dpk
new file mode 100644
index 0000000..b6139f6
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D7.dpk	
@@ -0,0 +1,62 @@
+package RemObjects_Indy_D7;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - Indy Library'}
+{$IMPLICITBUILD OFF}
+{$DEFINE DESIGNTIME}
+{%File 'RemObjects.inc'}
+
+requires
+  rtl,
+  indy,
+  vcl,
+  vclx,
+  RemObjects_Core_D7;
+
+contains
+  RemObjects_Indy_Reg in 'RemObjects_Indy_Reg.pas',
+  uROIndyHTTPChannel in 'uROIndyHTTPChannel.pas',
+  uROIndyTCPChannel in 'uROIndyTCPChannel.pas',
+  uROIndyTCPServer in 'uROIndyTCPServer.pas',
+  uROIndyHTTPServer in 'uROIndyHTTPServer.pas',
+  uROIndyUDPServer in 'uROIndyUDPServer.pas',
+  uROIndyUDPChannel in 'uROIndyUDPChannel.pas',
+  uROBroadcastServer in 'uROBroadcastServer.pas',
+  uROBroadcastChannel in 'uROBroadcastChannel.pas',
+  uROStreamUtils in 'uROStreamUtils.pas',
+  uROIndyEmailChannel in 'uROIndyEmailChannel.pas',
+  uROIndyEmailServer in 'uROIndyEmailServer.pas',
+  uROIndyEmail in 'uROIndyEmail.pas',
+  uRODiscovery in 'uRODiscovery.pas',
+  uRODiscoveryService_Impl in 'uRODiscoveryService_Impl.pas',
+  uRODiscovery_Async in 'uRODiscovery_Async.pas',
+  uRODiscovery_Intf in 'uRODiscovery_Intf.pas',
+  uRODiscovery_Invk in 'uRODiscovery_Invk.pas',
+  uROAsyncResponseStorage in 'uROAsyncResponseStorage.pas',
+  uROSuperTCPServer in 'uROSuperTCPServer.pas',
+  uROSuperTCPChannel in 'uROSuperTCPChannel.pas',
+  uROSCHelpers in 'uROSCHelpers.pas',
+  uROIndySuperHttpChannel in 'uROIndySuperHttpChannel.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D7.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D7.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_D7.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_Glyphs.lrs b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_Glyphs.lrs
new file mode 100644
index 0000000..2f8fa04
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_Glyphs.lrs	
@@ -0,0 +1,1112 @@
+LazarusResources.Add('TROINDYHTTPCHANNEL','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#255#0#255#153'c@'#149'^<'#153'c@'#146']Hmk?H'#146'>'#255
+  +#0#255#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@@@'#185
+  +'x='#185'x='#173'e'''#171'P'#20'jb'#30'$'#137'!1'#153'1@'#157'?@'#157'?'#255
+  +#0#255#255#0#255'@'#0#192#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255'@'#0#192
+  +'@@@'#231#129#22#227'm'#3#224']'#0#144'Z'#0#2'h'#0#0'k'#0#0'l'#0#15#134#15'@'
+  +#139'5H'#146'>'#255#0#255'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192
+  +#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192
+  +'@@@'#252#134#15#237#135#15#186'~'#7'R~'#2#18'z'#1#9'n'#0#0'l'#0#0'p'#0#5's'
+  +#4#151'6'#1#255#0#255'@'#0#192#255#255#255'@'#0#192'@'#0#192#255#255#255#255
+  +#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@'
+  +#207#146'#`'#137#14'l'#143#22#217#146'#'#255#135#22#186'~'#7'>x'#0#17'w'#0#28
+  +'['#1'lB'#22#136'2'#7'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255
+  +#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@:'
+  +#151#26'E'#153'"'#255#170'P'#255#161'B'#251#153'1'#255#140#28#255#128#9#237
+  +'n'#1#194'P'#4#144'8'#11#145'9'#12'@'#0#192#255#255#255'@'#0#192'@'#0#192'@'
+  +#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0
+  +#192'@@@'#22#166'%'#172#177'Q'#255#188'{'#251#177'_'#251#166'H'#251#153'1'
+  +#255#138#25#255'{'#4#224'e'#2#171'P'#20#150'='#14'@'#0#192#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255'@'#0#192'@@@;'#189'H'#194'a'#215#201#134#239
+  +#192'{'#251#177'_'#246#163'C'#240#147'&'#251#132#12#215'r'#2'tb'#3'lB'#22'@'
+  +#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'~'#204'kl'#215'sl'#215'sn'#203'g'#194'av'
+  +#173'Dh'#156'('#185#149'&'#255#135#22#168'z'#3#13#131#0'#c'#5'422'#168#162
+  +#167'}st'#254#150#18#254#145#12#254#150#18#254#150#18#254#150#18#254#150#18
+  +#254#150#18#169'~H'#192#191'ju'#218'{'#156#238#158#156#238#158'i'#213'oA'#189
+  +'H'#22#166'%'#26#152#23#185#149'&'#255#137#28#168'z'#3#13#131#0#2'}'#0':77'
+  +#165#164#165'opp'#254#150#18#254#150#18#254#150#18#254#150#18#254#162'!'#254
+  +#162'!'#254#162'!'#254#162'!\'#191'Ux'#219'|'#165#241#165#165#241#165'u'#218
+  +'{O'#193'Q%'#168')R'#156'$'#242#154'3'#255#135#22't~'#2#2#129#0#255#0#255'42'
+  +'2'#178#176#178'xux'#254#150#18#254#158#28#254#162'!'#255#172'0'#255#172'0'
+  +#255#172'0'#255#176'6'#255#172'0BqCh'#207'h'#129#221#130#129#221#130'e'#206
+  +'fD'#186'E'#28#163'#:'#151#26#217#146'#'#255#132#18'R~'#2#2#129#0#255#0#255
+  +'989'#182#176#181'}st'#254#162'!'#255#172'0'#255#172'0'#255#180'<'#255#186'D'
+  +#255#186'D'#255#186'D'#255#186'D'#255#180'<F'#134'FV'#197'WV'#197'WI'#188'I2'
+  +#172'3'#12#153#22'#'#139#12#206#139#24#255'~'#10#255'~'#10#255#0#255#255#0
+  +#255'989'#182#176#181'xux'#255#172'0'#255#172'0'#255#186'D'#255#191'M'#255
+  +#196'U'#255#196'U'#255#199'\'#255#196'U'#255#192'M'#255#186'DBqC.q0%'#168')'
+  +#26#152#23#6#139#8'`'#137#14#244#132#16#255#0#255#255#0#255#255#0#255#255#0
+  +#255'989'#188#185#189'opp'#255#176'6'#255#186'D'#255#196'U'#255#199'\'#255
+  +#205'e'#255#208'j'#255#205'e'#255#205'e'#255#199'\'#255#196'U'#255#186'D'#255
+  +#180'<'#255#172'0'#137'h8*%%'#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255'A<<'#184#183#184'opp'#255#186'D'#255#196'U'#255#199'\'#255#208
+  +'j'#255#215't'#255#216'v'#255#217'x'#255#216'v'#255#208'j'#255#205'e'#255#196
+  +'U'#255#186'D'#255#172'0'#130'kM*%%'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255'989'#188#185#189'opp'#255#186'D'#255#201']'#255#208'j'
+  +#255#216'v'#255#221#129#254#226#136#254#226#136#255#221#129#255#217'x'#255
+  +#208'j'#255#199'\'#255#192'M'#255#180'<'#130'kM*%%'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255'A<<'#182#176#181'vtv'#255#196'U'#255#201
+  +']'#255#216'v'#255#217'x'#254#230#144#254#234#152#254#234#152#254#230#144#255
+  +#221#129#255#216'v'#255#205'e'#255#196'U'#255#186'D'#130'kM*%%'#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255'989'#184#183#184'opp'#255#196
+  +'U'#255#205'e'#255#216'v'#255#221#129#254#234#152#254#242#166#254#243#169#254
+  +#234#152#254#226#136#255#216'v'#255#205'e'#255#196'U'#255#186'D'#134'oS*%%'
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'A<<'#182#176#181
+  +'vtv'#201#161'W'#189#154'Q'#238#201'n'#254#226#136#254#234#150#254#242#166
+  +#254#243#169#254#234#152#254#226#136#255#216'v'#255#208'j'#255#196'U'#255#186
+  +'D'#137'tW*%%'#255#0#255#0#0#0#255#0#255#255#0#255#0#0#0#0#0#0'989'#184#183
+  +#184'nmnnmnoppoppa]]'#135#130'u'#130'~m'#167#160#129#163#152'r'#203#181'y'
+  +#197#167'b'#238#192'^'#255#196'U'#255#186'D'#142'w[*%%'#255#0#255#0#0#0#255#0
+  ,#255#0#0#0#255#0#255#0#0#0'A<<------'#212#209#213#196#196#197#173#172#173#160
+  +#160#163#141#137#140#141#137#140'xux}}~oppxuxxuxddd'#135't`}st*%%'#255#0#255
+  +#0#0#0#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255#255#0#255#255#0#255#30#30#30
+  +'422788FFFZVWnmnopp'#144#141#145#128#128#128#161#154#160#144#141#145#139#131
+  +#137#132'yzZST*%%'#255#0#255#0#0#0#255#0#255#255#0#255#0#0#0#0#0#0#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#30#30
+  +#30'111------------989422111'#255#0#255#255#0#255#0#0#0#255#0#255#255#0#255
+  +#255#0#255#0#0#0
+]);
+LazarusResources.Add('TROINDYHTTPSERVER','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#255#0#255#153'c@'#149'^<'#153'c@'#146']Hmk?H'#146'>'#255
+  +#0#255#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@@@'#185
+  +'x='#185'x='#173'e'''#171'P'#20'jb'#30'$'#137'!1'#153'1@'#157'?@'#157'?'#255
+  +#0#255#255#0#255'@'#0#192#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255'@'#0#192
+  +'@@@'#231#129#22#227'm'#3#224']'#0#144'Z'#0#2'h'#0#0'k'#0#0'l'#0#15#134#15'@'
+  +#139'5H'#146'>'#255#0#255'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192
+  +#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192
+  +'@@@'#252#134#15#237#135#15#186'~'#7'R~'#2#18'z'#1#9'n'#0#0'l'#0#0'p'#0#5's'
+  +#4#151'6'#1#255#0#255'@'#0#192#255#255#255'@'#0#192'@'#0#192#255#255#255#255
+  +#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@'
+  +#207#146'#`'#137#14'l'#143#22#217#146'#'#255#135#22#186'~'#7'>x'#0#17'w'#0#28
+  +'['#1'lB'#22#136'2'#7'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255
+  +#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@:'
+  +#151#26'E'#153'"'#255#170'P'#255#161'B'#251#153'1'#255#140#28#255#128#9#237
+  +'n'#1#194'P'#4#144'8'#11#145'9'#12'@'#0#192#255#255#255'@'#0#192'@'#0#192'@'
+  +#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0
+  +#192'@@@'#22#166'%'#172#177'Q'#255#188'{'#251#177'_'#251#166'H'#251#153'1'
+  +#255#138#25#255'{'#4#224'e'#2#171'P'#20#150'='#14'@'#0#192#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255'@'#0#192'@@@;'#189'H'#194'a'#215#201#134#239
+  +#192'{'#251#177'_'#246#163'C'#240#147'&'#251#132#12#215'r'#2'tb'#3'lB'#22'@'
+  +#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'~'#204'kl'#215'sl'#215'sn'#203'g'#194'av'
+  +#173'Dh'#156'('#185#149'&'#255#135#22#168'z'#3#13#131#0'#c'#5'HJK'#196#189
+  +#194#192#186#192#189#183#189#189#183#189'HJK'#217#215#218'HJK{{{{{{'#169'~H'
+  +#192#191'ju'#218'{'#156#238#158#156#238#158'i'#213'oA'#189'H'#22#166'%'#26
+  +#152#23#185#149'&'#255#137#28#168'z'#3#13#131#0#2'}'#0'HJK'#198#193#198#194
+  +#189#194#192#186#192#189#183#189'HJK'#222#221#225'HJK{{{{{{{{{\'#191'Ux'#219
+  +'|'#165#241#165#165#241#165'u'#218'{O'#193'Q%'#168')R'#156'$'#242#154'3'#255
+  +#135#22't~'#2#2#129#0#255#0#255'HJK'#203#197#203#198#192#198#194#188#194#192
+  +#186#192'HJK'#227#226#230'HJK{{{{{{{{{BqCh'#207'h'#129#221#130#129#221#130'e'
+  +#206'fD'#186'E'#28#163'#:'#151#26#217#146'#'#255#132#18'R~'#2#2#129#0#255#0
+  +#255'HJK'#206#202#206#202#197#202#198#193#198#196#188#196'HJK'#231#230#234'H'
+  +'JK{{{{{{{{{{{{F'#134'FV'#197'WV'#197'WI'#188'I2'#172'3'#12#153#22'#'#139#12
+  +#206#139#24#255'~'#10#255'~'#10#255#0#255#255#0#255'HJK'#212#208#212#207#202
+  +#207#203#197#202#198#192#198'HJK'#235#234#237'HJK'#134#134#134#134#134#134
+  +#134#134#134#146#146#146'{{{BqC.q0%'#168')'#26#152#23#6#139#8'`'#137#14#244
+  +#132#16#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#217#213#216#212#208#212
+  +#207#202#207#203#197#202'HJK'#237#237#239'HJK{{{{{{{{{ooo'#134#134#134#134
+  +#134#134#167#167#167'HJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255'HJK'#222#218#221#217#213#217#233#231#234#207
+  +#202#207'HJK'#238#237#240'HJK'#140#140#140#140#140#140#146#146#146'{{{{{{{{{'
+  +#143#143#143'HJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255'HJK'#227#224#227#238#237#238#156#154#156#211#207#211'HJ'
+  +'K'#237#237#239'HJKTVWcddnnn'#140#140#140#140#140#140#140#140#140#166#166#166
+  +'HJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255'HJK'#231#230#231#144#144#146#158#157#158#216#212#216'HJK'#206#207
+  +#208#207#207#207#134#135#135'ceeNPQMOP\]]kkl'#146#146#146'HJK'#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#237
+  +#235#237#146#146#147#227#224#226#255#255#255#176#176#178'QRSUVWuvw'#169#170
+  +#170#211#211#212#189#189#191''#128#129'[\]JLMHJK'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#240#240#242#237
+  +#235#237#255#255#255#233#233#235#226#225#229#220#217#221#191#187#191#151#149
+  +#152'onrXYZNPQhij'#147#149#150#208#209#209'HJK'#255#0#255#255#0#255#255#0#255
+  +#0#0#0#255#0#255#255#0#255#0#0#0#0#0#0'HJK'#246#246#246#255#255#255#238#238
+  +#240#242#242#244#238#237#239#229#227#231#217#215#218#203#199#204#189#183#189
+  +#173#167#173#153#145#151#153#145#151'zsuHJK'#255#0#255#255#0#255#255#0#255
+  +#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255#0#0#0'HJK'#255#255#255#237#237#239
+  +#248#248#250#251#251#252#246#244#247#234#234#237#221#220#224#207#204#208#192
+  +#187#193#176#170#176#160#152#158'HJKHJK'#255#0#255#255#0#255#255#0#255#255#0
+  ,#255#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255'HJKHJK'#233
+  +#233#234#252#252#252#246#246#247#235#234#238#222#220#224#208#204#208#193#187
+  +#193'HJKHJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#0#0#0#255#0#255#255#0#255#0#0#0#0#0#0#255#0#255#255#0#255#255#0#255'H'
+  +'JKHJKHJKHJKHJKHJKHJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#0#0#0#255#0#255#255#0#255#255#0#255#0#0
+  +#0
+]);
+LazarusResources.Add('TROINDYTCPCHANNEL','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'
+  +#142']Y'#142']Y'#142']Y'#128'PK@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@@@'#242#216
+  +#177#240#212#171#239#209#165#238#206#158#238#202#152#237#199#146#235#197#142
+  +#235#196#137#234#193#134#233#191#130#128'PK@'#0#192#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255'@'#0#192'@@@'#231#183'y'#230#181'u'#230#180'r'#230#177
+  +'n'#229#176'k'#227#173'h'#227#172'e'#226#170'b'#226#169'^'#234#194#135#128'P'
+  +'K@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255
+  +'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@@@'#246#226#197#243#222
+  +#189#243#218#182#183#180#164#7'9z'#182#175#154#238#206#157#238#202#151#235
+  +#199#145#235#197#140#128'PK@'#0#192#255#255#255'@'#0#192'@'#0#192#255#255#255
+  +#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192
+  +'@@@'#234#188#132#233#187#128#176#157'{'#7'9z'#9'b'#208#7'9z'#173#150'o'#229
+  +#173'j'#227#172'g'#237#201#147#128'PK@'#0#192#255#255#255'@'#0#192#255#255
+  +#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255
+  +#255'@'#0#192'@@@'#248#235#215#188#192#191#7'9z'#15'j'#211#17't'#234#9'b'#208
+  +#7'9z'#182#177#158#239#208#160#238#204#154#128'PK@'#0#192#255#255#255'@'#0
+  +#192'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255
+  +#255#255#255'@'#0#192'@@@'#171#144't'#7'9z'#25'x'#216'6'#150#240'('#138#238
+  +#27''#235#12'e'#209#7'9z'#183#177#160#239#209#163#128'PK@'#0#192#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255'@'#0#192'@@@'#7'9z'#7'9z'#7'9z@'#157#242'@'
+  +#157#242'5'#150#239#7'9z'#7'9z'#7'9z'#242#213#172#128'PK@'#0#192'@'#0#192'@'
+  +#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192#252#251#246#227#173'y'#128#196'w'#7'9z@'#157#242'@'#157#242'@'
+  +#157#242#7'9z'#246#225#196#244#222#189#242#218#182#128'PK422'#168#162#167'}s'
+  +'t'#254#150#18#254#145#12#254#150#18#254#150#18#254#150#18#254#150#18#254#150
+  +#18#254#171'9'#209#146'm'#255#254#251#227#175'}'#226#173'{'#7'9z'#7'9z'#7'9z'
+  +#7'9z'#7'9z'#233#188#130#231#187#128#244#224#192#128'PK:77'#165#164#165'opp'
+  +#254#150#18#254#150#18#254#150#18#254#150#18#254#162'!'#254#162'!'#254#162'!'
+  +#254#162'!'#218#157'u'#255#255#255#254#254#252#254#251#250#254#250#244#252
+  +#247#239#251#244#233#251#242#227#250#239#221#248#235#215#247#231#207#246#227
+  +#201#128'PK422'#178#176#178'xux'#254#150#18#254#158#28#254#162'!'#255#172'0'
+  +#255#172'0'#255#172'0'#255#176'6'#255#172'0'#218#157'u'#255#255#255#227#177
+  +#129#227#177#128#227#176''#226#173'}'#227#173'y'#225#171'x'#225#170'u'#225
+  +#169'r'#224#166'n'#247#233#211#128'PK989'#182#176#181'}st'#254#162'!'#255#172
+  +'0'#255#172'0'#255#180'<'#255#186'D'#255#186'D'#255#186'D'#255#186'D'#231#171
+  +'y'#255#255#255#227#177#129#227#177#129#227#177#129#227#176''#227#175'}'#226
+  +#173'{'#226#172'x'#225#170'v'#225#169'r'#248#237#220#128'PK989'#182#176#181
+  +'xux'#255#172'0'#255#172'0'#255#186'D'#255#191'M'#255#196'U'#255#196'U'#255
+  +#199'\'#255#196'U'#231#171'y'#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#254#252#255#252#250#254#250#244#252#247#240#251#244#234#251
+  +#242#229#128'PK989'#188#185#189'opp'#255#176'6'#255#186'D'#255#196'U'#255#199
+  +'\'#255#205'e'#255#208'j'#255#205'e'#255#205'e'#231#171'y'#207#142'h'#207#142
+  +'h'#207#142'h'#207#142'h'#207#142'h'#207#142'h'#207#142'h'#207#142'h'#207#142
+  +'h'#207#142'h'#207#142'h'#128'PKA<<'#184#183#184'opp'#255#186'D'#255#196'U'
+  +#255#199'\'#255#208'j'#255#215't'#255#216'v'#255#217'x'#255#216'v'#255#208'j'
+  +#255#205'e'#255#196'U'#255#186'D'#255#172'0'#130'kM*%%'#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255'989'#188#185#189'opp'#255#186'D'#255
+  +#201']'#255#208'j'#255#216'v'#255#221#129#254#226#136#254#226#136#255#221#129
+  +#255#217'x'#255#208'j'#255#199'\'#255#192'M'#255#180'<'#130'kM*%%'#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'A<<'#182#176#181'vtv'#255
+  +#196'U'#255#201']'#255#216'v'#255#217'x'#254#230#144#254#234#152#254#234#152
+  +#254#230#144#255#221#129#255#216'v'#255#205'e'#255#196'U'#255#186'D'#130'kM*'
+  +'%%'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'989'#184#183
+  +#184'opp'#255#196'U'#255#205'e'#255#216'v'#255#221#129#254#234#152#254#242
+  +#166#254#243#169#254#234#152#254#226#136#255#216'v'#255#205'e'#255#196'U'#255
+  +#186'D'#134'oS*%%'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255'A<<'#182#176#181'vtv'#201#161'W'#189#154'Q'#238#201'n'#254#226#136#254
+  +#234#150#254#242#166#254#243#169#254#234#152#254#226#136#255#216'v'#255#208
+  +'j'#255#196'U'#255#186'D'#137'tW*%%'#255#0#255#0#0#0#255#0#255#255#0#255#0#0
+  ,#0#0#0#0'989'#184#183#184'nmnnmnoppoppa]]'#135#130'u'#130'~m'#167#160#129#163
+  +#152'r'#203#181'y'#197#167'b'#238#192'^'#255#196'U'#255#186'D'#142'w[*%%'#255
+  +#0#255#0#0#0#255#0#255#0#0#0#255#0#255#0#0#0'A<<------'#212#209#213#196#196
+  +#197#173#172#173#160#160#163#141#137#140#141#137#140'xux}}~oppxuxxuxddd'#135
+  +'t`}st*%%'#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255#255#0
+  +#255#255#0#255#30#30#30'422788FFFZVWnmnopp'#144#141#145#128#128#128#161#154
+  +#160#144#141#145#139#131#137#132'yzZST*%%'#255#0#255#0#0#0#255#0#255#255#0
+  +#255#0#0#0#0#0#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#30#30#30'111------------989422111'#255#0#255#255#0#255#0
+  +#0#0#255#0#255#255#0#255#255#0#255#0#0#0
+]);
+LazarusResources.Add('TROINDYTCPSERVER','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'
+  +#142']Y'#142']Y'#142']Y'#128'PK@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@@@'#242#216
+  +#177#240#212#171#239#209#165#238#206#158#238#202#152#237#199#146#235#197#142
+  +#235#196#137#234#193#134#233#191#130#128'PK@'#0#192#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255'@'#0#192'@@@'#231#183'y'#230#181'u'#230#180'r'#230#177
+  +'n'#229#176'k'#227#173'h'#227#172'e'#226#170'b'#226#169'^'#234#194#135#128'P'
+  +'K@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255
+  +'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@@@'#246#226#197#243#222
+  +#189#243#218#182#183#180#164#7'9z'#182#175#154#238#206#157#238#202#151#235
+  +#199#145#235#197#140#128'PK@'#0#192#255#255#255'@'#0#192'@'#0#192#255#255#255
+  +#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192
+  +'@@@'#234#188#132#233#187#128#176#157'{'#7'9z'#9'b'#208#7'9z'#173#150'o'#229
+  +#173'j'#227#172'g'#237#201#147#128'PK@'#0#192#255#255#255'@'#0#192#255#255
+  +#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255
+  +#255'@'#0#192'@@@'#248#235#215#188#192#191#7'9z'#15'j'#211#17't'#234#9'b'#208
+  +#7'9z'#182#177#158#239#208#160#238#204#154#128'PK@'#0#192#255#255#255'@'#0
+  +#192'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255
+  +#255#255#255'@'#0#192'@@@'#171#144't'#7'9z'#25'x'#216'6'#150#240'('#138#238
+  +#27''#235#12'e'#209#7'9z'#183#177#160#239#209#163#128'PK@'#0#192#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255'@'#0#192'@@@'#7'9z'#7'9z'#7'9z@'#157#242'@'
+  +#157#242'5'#150#239#7'9z'#7'9z'#7'9z'#242#213#172#128'PK@'#0#192'@'#0#192'@'
+  +#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192#252#251#246#227#173'y'#128#196'w'#7'9z@'#157#242'@'#157#242'@'
+  +#157#242#7'9z'#246#225#196#244#222#189#242#218#182#128'PKHJK'#196#189#194#192
+  +#186#192#189#183#189#189#183#189'HJK'#217#215#218'HJK{{{{{{{{{'#209#146'm'
+  +#255#254#251#227#175'}'#226#173'{'#7'9z'#7'9z'#7'9z'#7'9z'#7'9z'#233#188#130
+  +#231#187#128#244#224#192#128'PKHJK'#198#193#198#194#189#194#192#186#192#189
+  +#183#189'HJK'#222#221#225'HJK{{{{{{{{{'#218#157'u'#255#255#255#254#254#252
+  +#254#251#250#254#250#244#252#247#239#251#244#233#251#242#227#250#239#221#248
+  +#235#215#247#231#207#246#227#201#128'PKHJK'#203#197#203#198#192#198#194#188
+  +#194#192#186#192'HJK'#227#226#230'HJK{{{{{{{{{'#218#157'u'#255#255#255#227
+  +#177#129#227#177#128#227#176''#226#173'}'#227#173'y'#225#171'x'#225#170'u'
+  +#225#169'r'#224#166'n'#247#233#211#128'PKHJK'#206#202#206#202#197#202#198#193
+  +#198#196#188#196'HJK'#231#230#234'HJK{{{{{{{{{'#231#171'y'#255#255#255#227
+  +#177#129#227#177#129#227#177#129#227#176''#227#175'}'#226#173'{'#226#172'x'
+  +#225#170'v'#225#169'r'#248#237#220#128'PKHJK'#212#208#212#207#202#207#203#197
+  +#202#198#192#198'HJK'#235#234#237'HJK'#134#134#134#134#134#134#134#134#134
+  +#231#171'y'#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#254#252#255#252#250#254#250#244#252#247#240#251#244#234#251#242#229#128'PKH'
+  +'JK'#217#213#216#212#208#212#207#202#207#203#197#202'HJK'#237#237#239'HJK{{{'
+  +'{{{{{{'#231#171'y'#207#142'h'#207#142'h'#207#142'h'#207#142'h'#207#142'h'
+  +#207#142'h'#207#142'h'#207#142'h'#207#142'h'#207#142'h'#207#142'h'#128'PKHJK'
+  +#222#218#221#217#213#217#233#231#234#207#202#207'HJK'#238#237#240'HJK'#140
+  +#140#140#140#140#140#146#146#146'{{{{{{{{{'#143#143#143'HJK'#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#227#224
+  +#227#238#237#238#156#154#156#211#207#211'HJK'#237#237#239'HJKTVWcddnnn'#140
+  +#140#140#140#140#140#140#140#140#166#166#166'HJK'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#231#230#231#144
+  +#144#146#158#157#158#216#212#216'HJK'#206#207#208#207#207#207#134#135#135'ce'
+  +'eNPQMOP\]]kkl'#146#146#146'HJK'#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255'HJK'#237#235#237#146#146#147#227#224#226
+  +#255#255#255#176#176#178'QRSUVWuvw'#169#170#170#211#211#212#189#189#191''
+  +#128#129'[\]JLMHJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255'HJK'#240#240#242#237#235#237#255#255#255#233#233#235
+  +#226#225#229#220#217#221#191#187#191#151#149#152'onrXYZNPQhij'#147#149#150
+  +#208#209#209'HJK'#255#0#255#255#0#255#255#0#255#0#0#0#255#0#255#255#0#255#0#0
+  +#0#0#0#0'HJK'#246#246#246#255#255#255#238#238#240#242#242#244#238#237#239#229
+  +#227#231#217#215#218#203#199#204#189#183#189#173#167#173#153#145#151#153#145
+  +#151'zsuHJK'#255#0#255#255#0#255#255#0#255#255#0#255#0#0#0#255#0#255#0#0#0
+  ,#255#0#255#0#0#0'HJK'#255#255#255#237#237#239#248#248#250#251#251#252#246#244
+  +#247#234#234#237#221#220#224#207#204#208#192#187#193#176#170#176#160#152#158
+  +'HJKHJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0#0#0#255#0#255#0
+  +#0#0#255#0#255#0#0#0#255#0#255'HJKHJK'#233#233#234#252#252#252#246#246#247
+  +#235#234#238#222#220#224#208#204#208#193#187#193'HJKHJK'#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0#0#0#255#0#255#255#0#255
+  +#0#0#0#0#0#0#255#0#255#255#0#255#255#0#255'HJKHJKHJKHJKHJKHJKHJK'#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#0#0#0#255#0#255#255#0#255#255#0#255#0#0#0
+]);
+LazarusResources.Add('TROINDYUDPCHANNEL','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'
+  +#142']Y'#142']Y'#142']Y'#128'PK@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@@@'#242#216
+  +#177#240#212#171#239#209#165#238#206#158#238#202#152#237#199#146#235#197#142
+  +#235#196#137#234#193#134#233#191#130#128'PK@'#0#192#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255'@'#0#192'@@@'#243#221#187#242#217#180#242#215#173#183
+  +#176#158#7'9z'#180#171#147#237#202#149#235#198#143#235#196#138#234#194#135
+  +#128'PK@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255
+  +#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@@@'#246#226#197#243
+  +#222#189#184#182#170#7'9z'#31#134#243#7'9z'#181#172#150#238#202#151#235#199
+  +#145#235#197#140#128'PK@'#0#192#255#255#255'@'#0#192'@'#0#192#255#255#255#255
+  +#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@'
+  +#247#231#207#187#189#183#7'9z3'#153#248'3'#153#248'4'#153#250#7'9z'#182#172
+  +#152#238#203#153#237#201#147#128'PK@'#0#192#255#255#255'@'#0#192#255#255#255
+  +'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255
+  +'@'#0#192'@@@'#248#235#215#7'9z'#7'9zI'#172#255'I'#172#255'I'#172#255#7'9z'#7
+  +'9z'#239#208#160#238#204#154#128'PK@'#0#192#255#255#255'@'#0#192'@'#0#192'@'
+  +#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0
+  +#192'@@@'#250#240#224#248#237#217#248#233#211#7'9z'#7'9z'#7'9z'#242#220#183
+  +#242#216#177#240#212#170#239#209#163#128'PK@'#0#192#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255'@'#0#192'@@@'#252#244#233#250#242#227#250#238#220#248
+  +#235#213#247#231#207#246#227#199#246#224#193#244#221#186#242#217#178#242#213
+  +#172#128'PK@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'
+  +#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192#252#251#246#254#248#240#252#244
+  +#235#251#242#229#189#198#201#7'9z'#188#192#191#247#230#202#246#225#196#244
+  +#222#189#242#218#182#128'PK422'#168#162#167'}st'#254#150#18#254#145#12#254
+  +#150#18#254#150#18#254#150#18#254#150#18#254#150#18#254#171'9'#209#146'm'#255
+  +#254#251#254#251#247#252#248#243#191#204#213#7'9z'#31#134#243#7'9z'#188#193
+  +#192#246#230#204#244#227#199#244#224#192#128'PK:77'#165#164#165'opp'#254#150
+  +#18#254#150#18#254#150#18#254#150#18#254#162'!'#254#162'!'#254#162'!'#254#162
+  +'!'#218#157'u'#255#255#255#254#254#252#193#207#222#7'9z3'#153#248'3'#153#248
+  +'4'#153#250#7'9z'#188#196#196#247#231#207#246#227#201#128'PK422'#178#176#178
+  +'xux'#254#150#18#254#158#28#254#162'!'#255#172'0'#255#172'0'#255#172'0'#255
+  +#176'6'#255#172'0'#218#157'u'#255#255#255#255#255#255#7'9z'#7'9zI'#172#255'I'
+  +#172#255'I'#172#255#7'9z'#7'9z'#248#235#217#247#233#211#128'PK989'#182#176
+  +#181'}st'#254#162'!'#255#172'0'#255#172'0'#255#180'<'#255#186'D'#255#186'D'
+  +#255#186'D'#255#186'D'#231#171'y'#255#255#255#255#255#255#255#255#255#255#255
+  +#255#7'9z'#7'9z'#7'9z'#252#247#238#251#243#233#250#240#225#248#237#220#128'P'
+  +'K989'#182#176#181'xux'#255#172'0'#255#172'0'#255#186'D'#255#191'M'#255#196
+  +'U'#255#196'U'#255#199'\'#255#196'U'#231#171'y'#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#254#252#255#252#250#254#250#244#252#247
+  +#240#251#244#234#251#242#229#128'PK989'#188#185#189'opp'#255#176'6'#255#186
+  +'D'#255#196'U'#255#199'\'#255#205'e'#255#208'j'#255#205'e'#255#205'e'#231#171
+  +'y'#207#142'h'#207#142'h'#207#142'h'#207#142'h'#207#142'h'#207#142'h'#207#142
+  +'h'#207#142'h'#207#142'h'#207#142'h'#207#142'h'#128'PKA<<'#184#183#184'opp'
+  +#255#186'D'#255#196'U'#255#199'\'#255#208'j'#255#215't'#255#216'v'#255#217'x'
+  +#255#216'v'#255#208'j'#255#205'e'#255#196'U'#255#186'D'#255#172'0'#130'kM*%%'
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'989'#188#185#189
+  +'opp'#255#186'D'#255#201']'#255#208'j'#255#216'v'#255#221#129#254#226#136#254
+  +#226#136#255#221#129#255#217'x'#255#208'j'#255#199'\'#255#192'M'#255#180'<'
+  +#130'kM*%%'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'A<<'
+  +#182#176#181'vtv'#255#196'U'#255#201']'#255#216'v'#255#217'x'#254#230#144#254
+  +#234#152#254#234#152#254#230#144#255#221#129#255#216'v'#255#205'e'#255#196'U'
+  +#255#186'D'#130'kM*%%'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255'989'#184#183#184'opp'#255#196'U'#255#205'e'#255#216'v'#255#221#129#254
+  +#234#152#254#242#166#254#243#169#254#234#152#254#226#136#255#216'v'#255#205
+  +'e'#255#196'U'#255#186'D'#134'oS*%%'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255'A<<'#182#176#181'vtv'#201#161'W'#189#154'Q'#238#201'n'
+  +#254#226#136#254#234#150#254#242#166#254#243#169#254#234#152#254#226#136#255
+  +#216'v'#255#208'j'#255#196'U'#255#186'D'#137'tW*%%'#255#0#255#0#0#0#255#0#255
+  ,#255#0#255#0#0#0#0#0#0'989'#184#183#184'nmnnmnoppoppa]]'#135#130'u'#130'~m'
+  +#167#160#129#163#152'r'#203#181'y'#197#167'b'#238#192'^'#255#196'U'#255#186
+  +'D'#142'w[*%%'#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255#0#0#0'A<<------'#212
+  +#209#213#196#196#197#173#172#173#160#160#163#141#137#140#141#137#140'xux}}~o'
+  +'ppxuxxuxddd'#135't`}st*%%'#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255#0#0#0
+  +#255#0#255#255#0#255#255#0#255#30#30#30'422788FFFZVWnmnopp'#144#141#145#128
+  +#128#128#161#154#160#144#141#145#139#131#137#132'yzZST*%%'#255#0#255#0#0#0
+  +#255#0#255#255#0#255#0#0#0#0#0#0#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#30#30#30'111------------989422111'#255#0
+  +#255#255#0#255#0#0#0#255#0#255#255#0#255#255#0#255#0#0#0
+]);
+LazarusResources.Add('TROINDYUDPSERVER','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'
+  +#142']Y'#142']Y'#142']Y'#128'PK@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@@@'#242#216
+  +#177#240#212#171#239#209#165#238#206#158#238#202#152#237#199#146#235#197#142
+  +#235#196#137#234#193#134#233#191#130#128'PK@'#0#192#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255'@'#0#192'@@@'#243#221#187#242#217#180#242#215#173#183
+  +#176#158#7'9z'#180#171#147#237#202#149#235#198#143#235#196#138#234#194#135
+  +#128'PK@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255
+  +#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@@@'#246#226#197#243
+  +#222#189#184#182#170#7'9z'#31#134#243#7'9z'#181#172#150#238#202#151#235#199
+  +#145#235#197#140#128'PK@'#0#192#255#255#255'@'#0#192'@'#0#192#255#255#255#255
+  +#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@'
+  +#247#231#207#187#189#183#7'9z3'#153#248'3'#153#248'4'#153#250#7'9z'#182#172
+  +#152#238#203#153#237#201#147#128'PK@'#0#192#255#255#255'@'#0#192#255#255#255
+  +'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255
+  +'@'#0#192'@@@'#248#235#215#7'9z'#7'9zI'#172#255'I'#172#255'I'#172#255#7'9z'#7
+  +'9z'#239#208#160#238#204#154#128'PK@'#0#192#255#255#255'@'#0#192'@'#0#192'@'
+  +#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0
+  +#192'@@@'#250#240#224#248#237#217#248#233#211#7'9z'#7'9z'#7'9z'#242#220#183
+  +#242#216#177#240#212#170#239#209#163#128'PK@'#0#192#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255'@'#0#192'@@@'#252#244#233#250#242#227#250#238#220#248
+  +#235#213#247#231#207#246#227#199#246#224#193#244#221#186#242#217#178#242#213
+  +#172#128'PK@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'
+  +#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192#252#251#246#254#248#240#252#244
+  +#235#251#242#229#189#198#201#7'9z'#188#192#191#247#230#202#246#225#196#244
+  +#222#189#242#218#182#128'PKHJK'#196#189#194#192#186#192#189#183#189#189#183
+  +#189'HJK'#217#215#218'HJK{{{{{{{{{'#209#146'm'#255#254#251#254#251#247#252
+  +#248#243#191#204#213#7'9z'#31#134#243#7'9z'#188#193#192#246#230#204#244#227
+  +#199#244#224#192#128'PKHJK'#198#193#198#194#189#194#192#186#192#189#183#189
+  +'HJK'#222#221#225'HJK{{{{{{{{{'#218#157'u'#255#255#255#254#254#252#193#207
+  +#222#7'9z3'#153#248'3'#153#248'4'#153#250#7'9z'#188#196#196#247#231#207#246
+  +#227#201#128'PKHJK'#203#197#203#198#192#198#194#188#194#192#186#192'HJK'#227
+  +#226#230'HJK{{{{{{{{{'#218#157'u'#255#255#255#255#255#255#7'9z'#7'9zI'#172
+  +#255'I'#172#255'I'#172#255#7'9z'#7'9z'#248#235#217#247#233#211#128'PKHJK'#206
+  +#202#206#202#197#202#198#193#198#196#188#196'HJK'#231#230#234'HJK{{{{{{{{{'
+  +#231#171'y'#255#255#255#255#255#255#255#255#255#255#255#255#7'9z'#7'9z'#7'9z'
+  +#252#247#238#251#243#233#250#240#225#248#237#220#128'PKHJK'#212#208#212#207
+  +#202#207#203#197#202#198#192#198'HJK'#235#234#237'HJK'#134#134#134#134#134
+  +#134#134#134#134#231#171'y'#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#254#252#255#252#250#254#250#244#252#247#240#251#244#234#251
+  +#242#229#128'PKHJK'#217#213#216#212#208#212#207#202#207#203#197#202'HJK'#237
+  +#237#239'HJK{{{{{{{{{'#231#171'y'#207#142'h'#207#142'h'#207#142'h'#207#142'h'
+  +#207#142'h'#207#142'h'#207#142'h'#207#142'h'#207#142'h'#207#142'h'#207#142'h'
+  +#128'PKHJK'#222#218#221#217#213#217#233#231#234#207#202#207'HJK'#238#237#240
+  +'HJK'#140#140#140#140#140#140#146#146#146'{{{{{{{{{'#143#143#143'HJK'#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'H'
+  +'JK'#227#224#227#238#237#238#156#154#156#211#207#211'HJK'#237#237#239'HJKTVW'
+  +'cddnnn'#140#140#140#140#140#140#140#140#140#166#166#166'HJK'#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#231#230
+  +#231#144#144#146#158#157#158#216#212#216'HJK'#206#207#208#207#207#207#134#135
+  +#135'ceeNPQMOP\]]kkl'#146#146#146'HJK'#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#237#235#237#146#146#147#227
+  +#224#226#255#255#255#176#176#178'QRSUVWuvw'#169#170#170#211#211#212#189#189
+  +#191''#128#129'[\]JLMHJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255'HJK'#240#240#242#237#235#237#255#255#255#233
+  +#233#235#226#225#229#220#217#221#191#187#191#151#149#152'onrXYZNPQhij'#147
+  +#149#150#208#209#209'HJK'#255#0#255#255#0#255#255#0#255#0#0#0#255#0#255#255#0
+  +#255#0#0#0#0#0#0'HJK'#246#246#246#255#255#255#238#238#240#242#242#244#238#237
+  +#239#229#227#231#217#215#218#203#199#204#189#183#189#173#167#173#153#145#151
+  +#153#145#151'zsuHJK'#255#0#255#255#0#255#255#0#255#255#0#255#0#0#0#255#0#255
+  ,#0#0#0#255#0#255#0#0#0'HJK'#255#255#255#237#237#239#248#248#250#251#251#252
+  +#246#244#247#234#234#237#221#220#224#207#204#208#192#187#193#176#170#176#160
+  +#152#158'HJKHJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0#0#0#255
+  +#0#255#0#0#0#255#0#255#0#0#0#255#0#255'HJKHJK'#233#233#234#252#252#252#246
+  +#246#247#235#234#238#222#220#224#208#204#208#193#187#193'HJKHJK'#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0#0#0#255#0#255
+  +#255#0#255#0#0#0#0#0#0#255#0#255#255#0#255#255#0#255'HJKHJKHJKHJKHJKHJKHJK'
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#0#0#0#255#0#255#255#0#255#255#0#255#0#0#0
+]);
+LazarusResources.Add('TROEMAILCHANNEL','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'
+  +#142']Y'#142']Y'#142']Y'#255#0#255'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@@@'#255
+  +#204#151#255#204#151#255#204#151#255#204#151#255#204#151#255#204#151#255#204
+  +#150#255#211#153#229#173#140#180'{u'#142']Y@'#0#192#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255'@'#0#192'@@@'#242#207#173#242#208#173#242#208#173#242
+  +#208#173#242#208#173#242#207#173#244#211#175#235#196#166#181'}w'#216#169#143
+  +#142']Y@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255
+  +#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@@@'#237#216#196#237
+  +#216#196#237#216#196#237#216#196#237#216#196#237#216#196#239#221#199#189#140
+  +#135#194#145#131#239#216#193#142']Y@'#0#192#255#255#255'@'#0#192'@'#0#192#255
+  +#255#255#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'
+  +#0#192'@@@'#239#231#217#238#226#215#238#226#215#238#226#215#238#226#215#242
+  +#234#220#208#175#167#180'~v'#239#220#198#234#220#208#142']Y@'#0#192#255#255
+  +#255'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255
+  +#255'@'#0#192#255#255#255'@'#0#192'@@@'#231#213#207#242#229#220#239#226#217
+  +#239#226#217#240#227#218#227#202#196#178'zv'#226#197#181#247#244#234#240#227
+  +#220#142']Y@'#0#192#255#255#255'@'#0#192'@'#0#192'@'#0#192#255#255#255#255
+  +#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@@@'#142']Y'#142
+  +']Y'#142']Y'#142']Y'#142']Y'#142']Y'#175'vs'#215#182#176#255#255#254#246#239
+  +#237#142']Y@'#0#192#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255'@'#0#192'@@'
+  +'@'#240#240#240#231#226#227#230#227#229#227#227#227#226#233#234#233#247#247
+  +#213#206#204#177#128''#189#143#142#237#220#220#142']Y@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192#251#255#255#248#255#255#244#255#255#242#255#255#238#255#255#235#255
+  +#255#234#255#255#235#255#255#230#246#246#194#163#161#181#130''#142']Y422'
+  +#168#162#167'}st'#254#150#18#254#145#12#254#150#18#254#150#18#254#150#18#142
+  +']Y'#163#218#222#255#255#255#252#255#255#250#255#255#250#255#255#250#255#255
+  +#247#255#255#247#255#255#240#254#252#235#248#248#225#244#244#213#237#238#197
+  +#237#242#171#187#192#142']Y:77'#165#164#165'opp'#254#150#18#254#150#18#254
+  +#150#18#254#150#18#254#162'!'#254#162'!'#142']Y'#255#255#255#255#255#255#255
+  +#255#255#240#247#248#225#237#238#201#226#229#166#204#209#147#193#202#132#184
+  +#198'z'#177#197'n'#175#203'r'#161#191#142']Y'#255#0#255'422'#178#176#178'xux'
+  +#254#150#18#254#158#28#254#162'!'#255#172'0'#255#172'0'#255#172'0'#255#176'6'
+  +#142']Y'#167#216#222#139#252#255'}'#222#234's'#212#225'l'#216#227'j'#218#233
+  +'l'#216#238'm'#216#242'l'#218#252#135#186#211#142']Y'#255#0#255#255#0#255'98'
+  +'9'#182#176#181'}st'#254#162'!'#255#172'0'#255#172'0'#255#180'<'#255#186'D'
+  +#255#186'D'#255#186'D'#255#186'D'#142']Y'#146#183#189'p'#240#252'n'#247#255
+  +'s'#242#255's'#243#255'o'#247#255'v'#230#250#156#170#182#142']Y'#255#0#255
+  +#255#0#255#255#0#255'989'#182#176#181'xux'#255#172'0'#255#172'0'#255#186'D'
+  +#255#191'M'#255#196'U'#255#196'U'#255#199'\'#255#196'U'#255#192'M'#142']Y'
+  +#142']Y'#130#216#224's'#240#250't'#239#248#131#215#224#142']Y'#142']Y'#255#0
+  +#255#255#0#255#255#0#255#255#0#255'989'#188#185#189'opp'#255#176'6'#255#186
+  +'D'#255#196'U'#255#199'\'#255#205'e'#255#208'j'#255#205'e'#255#205'e'#255#199
+  +'\'#255#196'U'#255#186'D'#142']Y'#142']Y'#142']Y'#142']Y'#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255'A<<'#184#183#184'opp'#255#186'D'#255
+  +#196'U'#255#199'\'#255#208'j'#255#215't'#255#216'v'#255#217'x'#255#216'v'#255
+  +#208'j'#255#205'e'#255#196'U'#255#186'D'#255#172'0'#130'kM*%%'#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255'989'#188#185#189'opp'#255#186
+  +'D'#255#201']'#255#208'j'#255#216'v'#255#221#129#254#226#136#254#226#136#255
+  +#221#129#255#217'x'#255#208'j'#255#199'\'#255#192'M'#255#180'<'#130'kM*%%'
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'A<<'#182#176#181
+  +'vtv'#255#196'U'#255#201']'#255#216'v'#255#217'x'#254#230#144#254#234#152#254
+  +#234#152#254#230#144#255#221#129#255#216'v'#255#205'e'#255#196'U'#255#186'D'
+  +#130'kM*%%'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'989'
+  +#184#183#184'opp'#255#196'U'#255#205'e'#255#216'v'#255#221#129#254#234#152
+  +#254#242#166#254#243#169#254#234#152#254#226#136#255#216'v'#255#205'e'#255
+  +#196'U'#255#186'D'#134'oS*%%'#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255'A<<'#182#176#181'vtv'#201#161'W'#189#154'Q'#238#201'n'#254#226
+  +#136#254#234#150#254#242#166#254#243#169#254#234#152#254#226#136#255#216'v'
+  ,#255#208'j'#255#196'U'#255#186'D'#137'tW*%%'#255#0#255#0#0#0#255#0#255#255#0
+  +#255#0#0#0#0#0#0'989'#184#183#184'nmnnmnoppoppa]]'#135#130'u'#130'~m'#167#160
+  +#129#163#152'r'#203#181'y'#197#167'b'#238#192'^'#255#196'U'#255#186'D'#142'w'
+  +'[*%%'#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255#0#0#0'A<<------'#212#209#213
+  +#196#196#197#173#172#173#160#160#163#141#137#140#141#137#140'xux}}~oppxuxxux'
+  +'ddd'#135't`}st*%%'#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255
+  +#255#0#255#255#0#255#30#30#30'422788FFFZVWnmnopp'#144#141#145#128#128#128#161
+  +#154#160#144#141#145#139#131#137#132'yzZST*%%'#255#0#255#0#0#0#255#0#255#255
+  +#0#255#0#0#0#0#0#0#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#30#30#30'111------------989422111'#255#0#255#255#0
+  +#255#0#0#0#255#0#255#255#0#255#255#0#255#0#0#0
+]);
+LazarusResources.Add('TROEMAILSERVER','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'
+  +#142']Y'#142']Y'#142']Y'#255#0#255'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@@@'#255
+  +#204#151#255#204#151#255#204#151#255#204#151#255#204#151#255#204#151#255#204
+  +#150#255#211#153#229#173#140#180'{u'#142']Y@'#0#192#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255'@'#0#192'@@@'#242#207#173#242#208#173#242#208#173#242
+  +#208#173#242#208#173#242#207#173#244#211#175#235#196#166#181'}w'#216#169#143
+  +#142']Y@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255
+  +#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@@@'#237#216#196#237
+  +#216#196#237#216#196#237#216#196#237#216#196#237#216#196#239#221#199#189#140
+  +#135#194#145#131#239#216#193#142']Y@'#0#192#255#255#255'@'#0#192'@'#0#192#255
+  +#255#255#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'
+  +#0#192'@@@'#239#231#217#238#226#215#238#226#215#238#226#215#238#226#215#242
+  +#234#220#208#175#167#180'~v'#239#220#198#234#220#208#142']Y@'#0#192#255#255
+  +#255'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255
+  +#255'@'#0#192#255#255#255'@'#0#192'@@@'#231#213#207#242#229#220#239#226#217
+  +#239#226#217#240#227#218#227#202#196#178'zv'#226#197#181#247#244#234#240#227
+  +#220#142']Y@'#0#192#255#255#255'@'#0#192'@'#0#192'@'#0#192#255#255#255#255
+  +#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@@@'#142']Y'#142
+  +']Y'#142']Y'#142']Y'#142']Y'#142']Y'#175'vs'#215#182#176#255#255#254#246#239
+  +#237#142']Y@'#0#192#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255'@'#0#192'@@'
+  +'@'#240#240#240#231#226#227#230#227#229#227#227#227#226#233#234#233#247#247
+  +#213#206#204#177#128''#189#143#142#237#220#220#142']Y@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192#251#255#255#248#255#255#244#255#255#242#255#255#238#255#255#235#255
+  +#255#234#255#255#235#255#255#230#246#246#194#163#161#181#130''#142']YHJK'
+  +#196#189#194#192#186#192#189#183#189#189#183#189'HJK'#217#215#218'HJK'#142']'
+  +'Y'#163#218#222#255#255#255#252#255#255#250#255#255#250#255#255#250#255#255
+  +#247#255#255#247#255#255#240#254#252#235#248#248#225#244#244#213#237#238#197
+  +#237#242#171#187#192#142']YHJK'#198#193#198#194#189#194#192#186#192#189#183
+  +#189'HJK'#222#221#225'HJK{{{'#142']Y'#255#255#255#255#255#255#255#255#255#240
+  +#247#248#225#237#238#201#226#229#166#204#209#147#193#202#132#184#198'z'#177
+  +#197'n'#175#203'r'#161#191#142']Y'#255#0#255'HJK'#203#197#203#198#192#198#194
+  +#188#194#192#186#192'HJK'#227#226#230'HJK{{{{{{'#142']Y'#167#216#222#139#252
+  +#255'}'#222#234's'#212#225'l'#216#227'j'#218#233'l'#216#238'm'#216#242'l'#218
+  +#252#135#186#211#142']Y'#255#0#255#255#0#255'HJK'#206#202#206#202#197#202#198
+  +#193#198#196#188#196'HJK'#231#230#234'HJK{{{{{{{{{'#142']Y'#146#183#189'p'
+  +#240#252'n'#247#255's'#242#255's'#243#255'o'#247#255'v'#230#250#156#170#182
+  +#142']Y'#255#0#255#255#0#255#255#0#255'HJK'#212#208#212#207#202#207#203#197
+  +#202#198#192#198'HJK'#235#234#237'HJK'#134#134#134#134#134#134#134#134#134
+  +#146#146#146#142']Y'#142']Y'#130#216#224's'#240#250't'#239#248#131#215#224
+  +#142']Y'#142']Y'#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#217#213#216#212
+  +#208#212#207#202#207#203#197#202'HJK'#237#237#239'HJK{{{{{{{{{ooo'#134#134
+  +#134#134#134#134#142']Y'#142']Y'#142']Y'#142']Y'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255'HJK'#222#218#221#217#213#217#233#231#234
+  +#207#202#207'HJK'#238#237#240'HJK'#140#140#140#140#140#140#146#146#146'{{{{{'
+  +'{{{{'#143#143#143'HJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255'HJK'#227#224#227#238#237#238#156#154#156#211#207
+  +#211'HJK'#237#237#239'HJKTVWcddnnn'#140#140#140#140#140#140#140#140#140#166
+  +#166#166'HJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255'HJK'#231#230#231#144#144#146#158#157#158#216#212#216'HJK'
+  +#206#207#208#207#207#207#134#135#135'ceeNPQMOP\]]kkl'#146#146#146'HJK'#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'H'
+  +'JK'#237#235#237#146#146#147#227#224#226#255#255#255#176#176#178'QRSUVWuvw'
+  +#169#170#170#211#211#212#189#189#191''#128#129'[\]JLMHJK'#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#240#240
+  +#242#237#235#237#255#255#255#233#233#235#226#225#229#220#217#221#191#187#191
+  +#151#149#152'onrXYZNPQhij'#147#149#150#208#209#209'HJK'#255#0#255#255#0#255
+  +#255#0#255#0#0#0#255#0#255#255#0#255#0#0#0#0#0#0'HJK'#246#246#246#255#255#255
+  +#238#238#240#242#242#244#238#237#239#229#227#231#217#215#218#203#199#204#189
+  ,#183#189#173#167#173#153#145#151#153#145#151'zsuHJK'#255#0#255#255#0#255#255
+  +#0#255#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255#0#0#0'HJK'#255#255#255#237
+  +#237#239#248#248#250#251#251#252#246#244#247#234#234#237#221#220#224#207#204
+  +#208#192#187#193#176#170#176#160#152#158'HJKHJK'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255'HJK'
+  +'HJK'#233#233#234#252#252#252#246#246#247#235#234#238#222#220#224#208#204#208
+  +#193#187#193'HJKHJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#0#0#0#255#0#255#255#0#255#0#0#0#0#0#0#255#0#255#255#0#255#255
+  +#0#255'HJKHJKHJKHJKHJKHJKHJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#0#0#0#255#0#255#255#0#255#255#0
+  +#255#0#0#0
+]);
+LazarusResources.Add('TROBROADCASTCHANNEL','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@@@'#30#30#30#30#30#30#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255'@'#0#192'@@@'#132'yzFFF'#30#30#30#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192#255
+  +#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0
+  +#192#255#255#255#255#255#255'@'#0#192'@@@'#132'yz'#132'yz'#30#30#30#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0
+  +#192#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255
+  +#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@'#132'yzZST---'#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0
+  +#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255
+  +#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@FFF---'#255#0#255#7#7#187#6
+  +#11#197#7#7#187#7#7#187#7#7#187#255#0#255#255#0#255#255#0#255'@'#0#192#255
+  +#255#255'@'#0#192'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192
+  +#255#255#255#255#255#255'@'#0#192'@@@'#255#0#255#7#7#187#5#8#184#3'$'#250#3
+  +'$'#250#2' '#250#1#28#246#1#27#243#7#7#187#7#7#187#255#0#255'@'#0#192#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255'@'#0#192'@@@'#4#5#171#30#30#30#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0#30#255#0#28#247#7#7#187
+  +'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192#144#133#136'tlnFFF'#6#9#194#6#10#196#6#9#192
+  +#7#7#187#7#7#187#255#0#255#255#0#255#255#0#255#7#7#187'422'#168#162#167'}st'
+  +#254#150#18#254#145#12#254#150#18#254#150#18#254#150#18#254#150#18#254#150#18
+  +#254#171'9'#234#181'h'#215#186#147#182#176#181#8#5#182#136'}~111'#30#30#30#1
+  +''''#255#7#7#187#7#7#187#255#0#255#255#0#255#7#7#187':77'#165#164#165'opp'
+  +#254#150#18#254#150#18#254#150#18#254#150#18#254#162'!'#254#162'!'#254#162'!'
+  +'333333333'#254#150#18#227#153'5'#6#10#196#6#10#196#6#10#196#255#0#255#255#0
+  +#255#7#7#187#255#0#255#7#7#187#255#0#255'422'#178#176#178'xux'#254#150#18#254
+  +#158#28#254#162'!'#255#172'0'#255#172'0'#255#172'0333mjktpsIII "f'#6#10#196#6
+  +#10#196#159'l*'#6#10#196#255#0#255#6#10#196#255#0#255#255#0#255#255#0#255#255
+  +#0#255'989'#182#176#181'}st'#254#162'!'#255#172'0'#255#172'0'#255#180'<'#255
+  +#186'DZ[['#222#221#221'TSTffjOQ`jobhn=Em(1]'#6#10#196#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255'989'#182#176#181'xux'#255#172'0'#255
+  +#172'0'#255#186'D'#255#191'M'#255#196'UZ[['#250#247#247'88;'#12#14#21#31'%?-'
+  +'9zAO'#167']h'#156'gl'#130'TVj7J'#143'333'#255#0#255#255#0#255#255#0#255#255
+  +#0#255'989'#188#185#189'opp'#255#176'6'#255#186'D'#255#196'U'#255#199'\'#255
+  +#205'eZ[['#230#225#229'./3'#0#0#4#1#6'+'#7#23#154#12' '#207#20'#'#145'18\HKY'
+  +#201#198#189'333'#255#0#255#255#0#255#255#0#255#255#0#255'A<<'#184#183#184'o'
+  +'pp'#255#186'D'#255#196'U'#255#199'\'#255#208'j'#255#215'tZ[['#215#207#211'+'
+  +',0'#0#0#3#0#3'&'#7#31#166#14'/'#250#3#15#147#4#9'&'#17#19#28#172#172#175'33'
+  +'3'#255#0#255#255#0#255#255#0#255#255#0#255'989'#188#185#189'opp'#255#186'D'
+  +#255#201']'#255#208'j'#255#216'v'#255#221#129'Z[['#175#167#171#150#146#149'_'
+  +']`#)C'#17#30'^'#5#23#142#0#4'I'#0#0#10#0#0#3#134#130#132'333'#255#0#255#255
+  +#0#255#255#0#255#255#0#255'A<<'#182#176#181'vtv'#255#196'U'#255#201']'#255
+  +#216'v'#255#217'x'#254#230#144#254#234#152'Z[[Z[[Z[['#134#131#130#158#153#151
+  +'{'#152'TWg$&-'#7#7#10'hcf333'#255#0#255#255#0#255#255#0#255#255#0#255'989'
+  +#184#183#184'opp'#255#196'U'#255#205'e'#255#216'v'#255#221#129#254#234#152
+  +#254#242#166#254#243#169#254#234#152#254#226#136'Z[[Z[[Z[[vus'#202#201#201
+  +#171#171#173'hcf333'#255#0#255#255#0#255#255#0#255#255#0#255'A<<'#182#176#181
+  +'vtv'#201#161'W'#189#154'Q'#238#201'n'#254#226#136#254#234#150#254#242#166
+  +#254#243#169#254#234#152#254#226#136#255#216'v'#255#208'j'#255#196'UZ[[Z[[Z['
+  +'[555'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'989'#184#183#184'nm'
+  +'nnmnoppoppa]]'#135#130'u'#130'~m'#167#160#129#163#152'r'#203#181'y'#197#167
+  +'b'#238#192'^'#255#196'U'#255#186'D'#142'w[*%%'#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255'A<<------'#212#209#213#196#196#197#173#172#173
+  +#160#160#163#141#137#140#141#137#140'xux}}~oppxuxxuxddd'#135't`}st*%%'#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#30#30#30'422788FFFZVWnmnopp'#144#141#145#128#128#128#161#154#160
+  ,#144#141#145#139#131#137#132'yzZST*%%'#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#30#30#30'111------------989422111'#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+]);
+LazarusResources.Add('TROBROADCASTSERVER','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255'@'#0#192'@@@HJKHJKHJK'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192#255#255#255
+  +'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255
+  +#255#255#255#255#255'@'#0#192'@@@{{{'#147#147#147'III'#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192#255#255
+  +#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255#255#255
+  +#255'@'#0#192#255#255#255'@'#0#192'@@@{{{'#147#147#147'III'#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192#255
+  +#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255
+  +#255#255'@'#0#192#255#255#255'@'#0#192'@@@{{{'#147#147#147'III'#7#7#187#6#11
+  +#197#7#7#187#7#7#187#7#7#187#255#0#255#255#0#255#255#0#255'@'#0#192#255#255
+  +#255'@'#0#192'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255
+  +#255#255#255#255#255'@'#0#192'@@@{{{'#7#7#187#5#8#184#3'$'#250#3'$'#250#2' '
+  +#250#1#28#246#1#27#243#7#7#187#7#7#187#255#0#255'@'#0#192#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255'@'#0#192'@@@'#4#5#171#147#147#147'III'#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#0#30#255#0#28#247#7#7#187'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@'#0#192'{{{{{{'#147#147#147#6#9#194#6#10#196#6#9#192#7#7#187#7#7
+  +#187#255#0#255#255#0#255#255#0#255#7#7#187'HJK'#196#189#194#192#186#192#189
+  +#183#189#189#183#189'HJK'#217#215#218'HJK{{{{{{{{{{{{{{{{{{'#8#5#182'III'#255
+  +#0#255#255#0#255#1''''#255#7#7#187#7#7#187#255#0#255#255#0#255#7#7#187'HJK'
+  +#198#193#198#194#189#194#192#186#192#189#183#189'HJK'#222#221#225'HJK{{{{{{3'
+  +'33333333{{{'#147#147#147#6#10#196#6#10#196#6#10#196#255#0#255#255#0#255#7#7
+  +#187#255#0#255#7#7#187#255#0#255'HJK'#203#197#203#198#192#198#194#188#194#192
+  +#186#192'HJK'#227#226#230'HJK{{{333mjktpsIII "f'#6#10#196#6#10#196#255#0#255
+  +#6#10#196#255#0#255#6#10#196#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#206
+  +#202#206#202#197#202#198#193#198#196#188#196'HJK'#231#230#234'HJKZ[['#222#221
+  +#221'TSTffjOQ`jobhn=Em(1]'#6#10#196#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255'HJK'#212#208#212#207#202#207#203#197#202#198#192#198'HJ'
+  +'K'#235#234#237'HJKZ[['#250#247#247'88;'#12#14#21#31'%?-9zAO'#167']h'#156'gl'
+  +#130'TVj7J'#143'333'#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#217#213#216
+  +#212#208#212#207#202#207#203#197#202'HJK'#237#237#239'HJKZ[['#230#225#229'./'
+  +'3'#0#0#4#1#6'+'#7#23#154#12' '#207#20'#'#145'18\HKY'#201#198#189'333'#255#0
+  +#255#255#0#255#255#0#255#255#0#255'HJK'#222#218#221#217#213#217#233#231#234
+  +#207#202#207'HJK'#238#237#240'HJKZ[['#215#207#211'+,0'#0#0#3#0#3'&'#7#31#166
+  +#14'/'#250#3#15#147#4#9'&'#17#19#28#172#172#175'333'#255#0#255#255#0#255#255
+  +#0#255#255#0#255'HJK'#227#224#227#238#237#238#156#154#156#211#207#211'HJK'
+  +#237#237#239'HJKZ[['#175#167#171#150#146#149'_]`#)C'#17#30'^'#5#23#142#0#4'I'
+  +#0#0#10#0#0#3#134#130#132'333'#255#0#255#255#0#255#255#0#255#255#0#255'HJK'
+  +#231#230#231#144#144#146#158#157#158#216#212#216'HJK'#206#207#208#207#207#207
+  +#134#135#135'Z[[Z[[Z[['#134#131#130#158#153#151'{'#152'TWg$&-'#7#7#10'hcf33'
+  +'3'#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#237#235#237#146#146#147#227
+  +#224#226#255#255#255#176#176#178'QRSUVWuvw'#169#170#170#211#211#212#189#189
+  +#191'Z[[Z[[Z[[vus'#202#201#201#171#171#173'hcf333'#255#0#255#255#0#255#255#0
+  +#255#255#0#255'HJK'#240#240#242#237#235#237#255#255#255#233#233#235#226#225
+  +#229#220#217#221#191#187#191#151#149#152'onrXYZNPQhij'#147#149#150#208#209
+  +#209'Z[[Z[[Z[[555'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#246
+  +#246#246#255#255#255#238#238#240#242#242#244#238#237#239#229#227#231#217#215
+  +#218#203#199#204#189#183#189#173#167#173#153#145#151#153#145#151'zsuHJK'#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255'HJK'#255#255#255#237#237#239#248#248#250#251#251#252#246#244#247
+  +#234#234#237#221#220#224#207#204#208#192#187#193#176#170#176#160#152#158'HJK'
+  +'HJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255'HJKHJK'#233#233#234#252#252#252#246
+  +#246#247#235#234#238#222#220#224#208#204#208#193#187#193'HJKHJK'#255#0#255
+  ,#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJKHJKHJKHJ'
+  +'KHJKHJKHJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+]);
+LazarusResources.Add('TRODISCOVERYCLIENT','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@@@'#30#30#30#30#30#30#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255'@'#0#192'@@@'#132'yzFFF'#30#30#30#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192#255
+  +#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0
+  +#192#255#255#255#255#255#255'@'#0#192'@@@'#132'yz'#132'yz'#30#30#30#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0
+  +#192#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255
+  +#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@'#132'yzZST---'#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0
+  +#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255
+  +#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@FFF---'#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0
+  +#192#255#255#255'@'#0#192'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192
+  +'@'#0#192#255#255#255#255#255#255'@'#0#192'@@@'#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255'@'#0#192#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255'@'#0#192'@@@'#30#30
+  +#30#30#30#30#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192#144#133#136'tlnFF'
+  +'F'#30#30#30#30#30#30#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255'422'#168#162#167'}st'#254#150#18#254#145#12#254#150#18#254#150
+  +#18#254#150#18#254#150#18#254#150#18#254#171'9'#2'U'#142#11'['#137#11'f'#152
+  +#2'U'#142#136'}~111'#30#30#30#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255':77'#165#164#165'opp'#254#150#18#254#150#18#254#150#18#254#150
+  +#18#254#162'!'#254#162'!'#254#162'!'#8'n'#169#25't'#156#5#5#5#2#2#2#13'4F'#5
+  +'d'#157#147'~m422'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255'422'#178#176#178'xux'#254#150#18#254#158#28#254#162'!'#255#172'0'#255
+  +#172'0'#2'U'#142#21#151#213'#'#189#254'<z'#136#238#180'zfO:'#0#0#0#22'G_'#159
+  +'l*422'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'989'#182
+  +#176#181'}st'#254#162'!'#255#172'0'#255#172'0'#255#180'<'#3'['#147#9's'#175
+  +'#'#189#254'#'#189#254'<z'#136#255#191#129#255#191#129'4)'#31#10#13#15#23'j'
+  +#157#30#30#30#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'98'
+  +'9'#182#176#181'xux'#255#172'0'#255#172'0'#0'K'#130#14#129#189'#'#189#254#14
+  +#129#189'$'#189#254'0'#193#254':'#142#173#238#180'z'#255#191#129#152'tR'#2#2
+  +#2'A~'#160'---'#255#0#255#0'8l'#24'l'#159#0'K'#130#255#0#255#255#0#255'989'
+  +#188#185#189'opp'#255#176'6'#5'd'#157#26#166#229'#'#189#254'&'#191#254#19'}'
+  +#182'X'#206#255'z'#216#255#153#224#255#151#132'l'#255#191#129#191#145'g'#2#2
+  +#2'7u'#152#0'K'#130','#129#177'J'#135#164#11#13#15#13#31')'#5'W'#139#255#0
+  +#255'A<<'#184#183#184'opp'#9's'#175'#'#189#254'*'#192#254'A'#199#254'd'#208
+  +#255'+'#132#182#150#217#247#194#237#255#220#244#255#225#234#239#144'liO7'#29
+  +'4@ v'#167'h'#197#238'`'#208#255'Ct'#129#134'gI'#1#1#1#7#25'$'#0'K'#130'989'
+  +#2'U'#142#9'l'#166'1'#194#254'M'#202#254'o'#212#255#144#221#255#175#231#255
+  +#171#216#238'>'#134#175#242#251#255#235#248#255#211#242#255#169#222#247'C'
+  +#146#191#5'~'#178'='#177#230'7'#196#254''''#191#254'<z'#136#255#191#129'R@.'
+  +#1#1#1#4'Ai'#5']'#150#31#147#206'5'#154#206'z'#216#255#154#225#255#184#234
+  +#255#212#242#255#234#248#255#242#251#255#27#134#180#25#132#180'K'#165#204'-'
+  +#132#180#4'o'#164#0'X'#143#1#152#203#28#166#229'#'#189#254'#'#189#254#28#132
+  +#172#238#180'z'#191#145'g'#0#0#0#13'X'#130#0'K'#130'{'#209#247'#v'#167#194
+  +#237#255#221#244#255#239#250#255#239#250#255#220#244#255#191#235#255'w'#194
+  +#230#13#132#184#1#137#189#1'y'#175#1#152#203#0'k'#161#1#147#198#19#165#225'#'
+  +#189#254'#'#189#254'#'#189#254'mzl'#191#145'g'#0#0#0#11'R{'#0'K'#130#203#239
+  +#255'j'#165#198'`'#157#191#235#248#255#209#240#255#180#231#255#149#222#255'u'
+  +#213#255'U'#204#255'6'#196#254#14#139#199#1'Z'#146#1''#180#0'b'#152#1#142
+  +#193#3#136#191'#'#189#254'#'#189#254'#'#189#254'#'#178#238';fl'#2' 1'#2'U'
+  +#142#0'K'#130'r'#169#198#194#224#238#23'g'#152#19'e'#152'I'#161#206'F'#166
+  +#213'I'#201#254'/'#193#254'$'#189#254'#'#189#254'#'#189#254#31#182#246#14#134
+  ,#194#2'w'#173#1#137#189#1#142#193#10#145#202#31#182#246#15#150#212#6'y'#181#0
+  +'['#149#0'8l'#255#0#255'A<<'#0'K'#130#0'K'#130#212#209#213#196#196#197#4'V'
+  +#142#21#138#197#19#144#206#19#144#206#31#182#246'#'#189#254'#'#189#254'#'#189
+  +#254'#'#189#254#31#182#246#19#144#206#0'Q'#135#0'['#143#0'8l'#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#30#30#30'42'
+  +'2788FFF'#4'b'#154#21#151#213#9's'#175#14#129#189#10#136#196#6'y'#181#1'e'
+  +#158#0'Q'#136#0'8lZST*%%'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#0'Y'#145#1'`'#153#0'J'#128'---------989422111'#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+]);
+LazarusResources.Add('TRODISCOVERYSERVER','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255'@'#0#192'@@@HJKHJKHJK'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192#255#255#255
+  +'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255
+  +#255#255#255#255#255'@'#0#192'@@@{{{'#147#147#147'III'#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192#255#255
+  +#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255#255#255
+  +#255'@'#0#192#255#255#255'@'#0#192'@@@{{{'#147#147#147'III'#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192#255
+  +#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255
+  +#255#255'@'#0#192#255#255#255'@'#0#192'@@@{{{'#147#147#147'III'#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192
+  +#255#255#255'@'#0#192'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0
+  +#192#255#255#255#255#255#255'@'#0#192'@@@{{{'#147#147#147'III'#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255'@'#0#192'@@@{{{'#147#147#147'II'
+  +'I'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'{{{{{{'#147#147#147'III'#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'
+  +#196#189#194#192#186#192#189#183#189#189#183#189'HJK'#217#215#218'HJK{{{{{{{'
+  +'{{'#2'U'#142#11'['#137#11'f'#152#2'U'#142'III'#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#198#193#198#194#189
+  +#194#192#186#192#189#183#189'HJK'#222#221#225'HJK{{{{{{'#8'n'#169#25't'#156#5
+  +#5#5#2#2#2#13'4F'#5'd'#157#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255'HJK'#203#197#203#198#192#198#194#188#194#192
+  +#186#192'HJK'#227#226#230'HJK'#2'U'#142#21#151#213'#'#189#254'<z'#136#238#180
+  +'zfO:'#0#0#0#22'G_'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255'HJK'#206#202#206#202#197#202#198#193#198#196#188#196
+  +'HJK'#231#230#234#3'['#147#9's'#175'#'#189#254'#'#189#254'<z'#136#255#191#129
+  +#255#191#129'4)'#31#10#13#15#23'j'#157#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255'HJK'#212#208#212#207#202#207#203#197#202
+  +#198#192#198#0'K'#130#14#129#189'#'#189#254#14#129#189'$'#189#254'0'#193#254
+  +':'#142#173#238#180'z'#255#191#129#152'tR'#2#2#2'A~'#160#255#0#255#255#0#255
+  +#0'8l'#24'l'#159#0'K'#130#255#0#255#255#0#255'HJK'#217#213#216#212#208#212
+  +#207#202#207#5'd'#157#26#166#229'#'#189#254'&'#191#254#19'}'#182'X'#206#255
+  +'z'#216#255#153#224#255#151#132'l'#255#191#129#191#145'g'#2#2#2'7u'#152#0'K'
+  +#130','#129#177'J'#135#164#11#13#15#13#31')'#5'W'#139#255#0#255'HJK'#222#218
+  +#221#217#213#217#9's'#175'#'#189#254'*'#192#254'A'#199#254'd'#208#255'+'#132
+  +#182#150#217#247#194#237#255#220#244#255#225#234#239#144'liO7'#29'4@ v'#167
+  +'h'#197#238'`'#208#255'Ct'#129#134'gI'#1#1#1#7#25'$'#0'K'#130'HJK'#2'U'#142#9
+  +'l'#166'1'#194#254'M'#202#254'o'#212#255#144#221#255#175#231#255#171#216#238
+  +'>'#134#175#242#251#255#235#248#255#211#242#255#169#222#247'C'#146#191#5'~'
+  +#178'='#177#230'7'#196#254''''#191#254'<z'#136#255#191#129'R@.'#1#1#1#4'Ai'#5
+  +']'#150#31#147#206'5'#154#206'z'#216#255#154#225#255#184#234#255#212#242#255
+  +#234#248#255#242#251#255#27#134#180#25#132#180'K'#165#204'-'#132#180#4'o'#164
+  +#0'X'#143#1#152#203#28#166#229'#'#189#254'#'#189#254#28#132#172#238#180'z'
+  +#191#145'g'#0#0#0#13'X'#130#0'K'#130'{'#209#247'#v'#167#194#237#255#221#244
+  +#255#239#250#255#239#250#255#220#244#255#191#235#255'w'#194#230#13#132#184#1
+  +#137#189#1'y'#175#1#152#203#0'k'#161#1#147#198#19#165#225'#'#189#254'#'#189
+  +#254'#'#189#254'mzl'#191#145'g'#0#0#0#11'R{'#0'K'#130#203#239#255'j'#165#198
+  +'`'#157#191#235#248#255#209#240#255#180#231#255#149#222#255'u'#213#255'U'#204
+  +#255'6'#196#254#14#139#199#1'Z'#146#1''#180#0'b'#152#1#142#193#3#136#191'#'
+  +#189#254'#'#189#254'#'#189#254'#'#178#238';fl'#2' 1'#2'U'#142#0'K'#130'r'#169
+  +#198#194#224#238#23'g'#152#19'e'#152'I'#161#206'F'#166#213'I'#201#254'/'#193
+  +#254'$'#189#254'#'#189#254'#'#189#254#31#182#246#14#134#194#2'w'#173#1#137
+  ,#189#1#142#193#10#145#202#31#182#246#15#150#212#6'y'#181#0'['#149#0'8l'#255#0
+  +#255'HJK'#0'K'#130#0'K'#130#248#248#250#251#251#252#4'V'#142#21#138#197#19
+  +#144#206#19#144#206#31#182#246'#'#189#254'#'#189#254'#'#189#254'#'#189#254#31
+  +#182#246#19#144#206#0'Q'#135#0'['#143#0'8l'#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255'HJKHJK'#233#233#234#252#252#252#246#246#247#235
+  +#234#238#4'b'#154#21#151#213#9's'#175#14#129#189#10#136#196#6'y'#181#1'e'#158
+  +#0'Q'#136#0'8l'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJKHJKHJKHJKHJK'#0'Y'#145
+  +#1'`'#153#0'J'#128#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+]);
+LazarusResources.Add('TROSUPERTCPCHANNEL','BMP',[
+  'BM'#248#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#194#6#0#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#0#0#0#255#0#255#255#0#255#0#0#0#0#0#0'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@@@'#30#30#30#30#30#30#255#0#255#255#0#255#255#0#255#255#0#255#0#0#0#255#0
+  +#255#0#0#0#255#0#255#0#0#0'@'#0#192#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255'@'#0#192'@@@'#132'yzFFF'#30#30#30#255#0#255#255#0#255#255#0#255#0#0#0
+  +#255#0#255#0#0#0#255#0#255#0#0#0'@'#0#192#255#255#255'@'#0#192#255#255#255'@'
+  +#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0
+  +#192'@@@'#132'yz'#132'yz'#30#30#30#255#0#255#255#0#255#255#0#255#0#0#0#255#0
+  +#255#255#0#255#0#0#0#0#0#0'@'#0#192#255#255#255'@'#0#192'@'#0#192#255#255#255
+  +#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192
+  +'@@@'#132'yzZST---'#255#0#255#255#0#255#255#0#255#0#0#0#255#0#255#255#0#255
+  +#255#0#255#0#0#0'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255
+  +#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@FFF--'
+  +'-'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255'@'#0#192#255#255#255'@'#0#192'@'#0#192'@'#0#192#255#255#255
+  +#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@@@'#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255'@'#0#192#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255'@'#0#192'@@@'#30#30#30#30#30#30#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192#144#133#136'tlnFFF'#30#30#30#30#30#30#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255'422'#168#162#167'}st'#254#150#18#254
+  +#145#12#254#150#18#254#150#18#254#150#18#254#150#18#254#150#18#254#171'9'#234
+  +#181'h'#215#186#147#182#176#181#156#146#147#136'}~111'#30#30#30#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255':77'#165#164#165'opp'#254#150
+  +#18#254#150#18#254#150#18#254#150#18#254#162'!'#254#162'!'#254#162'!'#254#162
+  +'!'#254#153#22#254#153#22#254#150#18#227#153'5'#201#150'U'#147'~m422'#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'422'#178#176#178'xux'
+  +#254#150#18#254#158#28#254#162'!'#255#172'0'#255#172'0'#255#172'0'#255#176'6'
+  +#255#172'0'#255#172'0'#254#162'!'#254#162'!'#254#150#18#254#150#18#0#0''#3
+  +#24#221#1#9#172#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'989'#182
+  +#176#181'}st'#254#162'!'#255#172'0'#255#172'0'#255#180'<'#255#186'D'#255#186
+  +'D'#255#186'D'#255#186'D'#255#180'<'#255#172'0'#255#172'0'#4#3''#254#150#18
+  +#0#0''#20'7'#255#4#17#188#255#0#255#28#26#144#28#26#144#255#0#255#255#0#255
+  +'989'#182#176#181'xux'#255#172'0'#255#172'0'#255#186'D'#255#191'M'#255#196'U'
+  +#255#196'U'#255#199'\'#255#196'U'#255#192'M'#255#186'D'#4#8#150'$<'#221#7#8
+  +#140#0#0''#28'?'#255#6#19#188#6#6#132#3#20#204#1#10#172#28#26#144#255#0#255
+  +'989'#188#185#189'opp'#255#176'6'#255#186'D'#255#196'U'#255#199'\'#255#205'e'
+  +#255#208'j'#255#205'e'#255#205'e'#255#199'\'#255#196'U'#5#9#150'Wr'#247'8P'
+  +#230#0#1#135'(J'#255#8#22#188#9#27#204#19'6'#255#3#20#204#28#25#143#255#0#255
+  +'A<<'#184#183#184'opp'#255#186'D'#255#196'U'#255#199'\'#255#208'j'#255#215't'
+  +#255#216'v'#255#217'x'#255#216'v'#255#208'j'#255#205'e'#255#196'U'#5#9#150'Z'
+  +'u'#247'<V'#238'9Z'#255'#D'#247',N'#255#9#27#204#6#6#132#255#0#255#255#0#255
+  +'989'#188#185#189'opp'#255#186'D'#255#201']'#255#208'j'#255#216'v'#255#221
+  +#129#254#226#136#254#226#136#255#221#129#255#217'x'#4#3''#4#3'%1'#188'.D'
+  +#221'n'#137#255'd'#128#255'Qp'#255'''F'#247#10#24#188#6#20#188#3#16#188#0#0
+  +'A<<'#182#176#181'vtv'#255#196'U'#255#201']'#255#216'v'#255#217'x'#254#230
+  +#144#254#234#152#254#234#152#254#230#144#255#221#129#4#3''#151#171#255#137
+  +#159#255'z'#147#255#130#153#255'x'#145#255'g'#130#255'@`'#255'1S'#255'#F'#255
+  +#17'4'#255#0#0'989'#184#183#184'opp'#255#196'U'#255#205'e'#255#216'v'#255
+  +#221#129#254#234#152#254#242#166#254#243#169#254#234#152#254#226#136#0#0''#0
+  +#0''#0#0'EU'#213#157#176#255#132#156#255'u'#143#255'D^'#238#1#1#135#0#0''
+  +#0#0''#28#24#140'A<<'#182#176#181'vtv'#201#161'W'#189#154'Q'#238#201'n'#254
+  +#226#136#254#234#150#254#242#166#254#243#169#254#234#152#254#226#136#255#216
+  +'v'#255#208'jP['#204#192#204#255'BP'#204#129#153#255'3E'#213'f'#247'D['#230
+  +#8#9#139#255#0#255#255#0#255'989'#184#183#184'nmnnmnoppoppa]]'#135#130'u'#130
+  +'~m'#167#160#129#163#152'r'#203#181'y'#197#167'b'#4#3''#220#227#255'R\'#204
+  +#0#0''#146#167#255'+5'#188#7#11#150'i'#129#247'5K'#221#6#6#131#255#0#255'A<'
+  ,'<------'#212#209#213#196#196#197#173#172#173#160#160#163#141#137#140#141#137
+  +#140'xux}}~oppxux'#4#3',1'#172#28#24#139#0#0''#163#181#255'1;'#188#28#24
+  +#139#8#12#150#7#11#150#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#30
+  +#30#30'422788FFFZVWnmnopp'#144#141#145#128#128#128#161#154#160#144#141#145
+  +#139#131#137#132'yz'#0#0''#178#194#255'7A'#188#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#30#30#30'111------------989422'#6#5#131#16#21#157#6
+  +#8#142#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0#0
+]);
+LazarusResources.Add('TROSUPERTCPSERVER','BMP',[
+  'BM'#248#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#194#6#0#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#0#0#0#255#0#255#255#0#255#0#0#0#0#0#0'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0#0#0#255#0
+  +#255#0#0#0#255#0#255#0#0#0'@'#0#192#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255'@'#0#192'@@@HJKHJKHJK'#255#0#255#255#0#255#255#0#255#0#0#0#255#0#255#0#0
+  +#0#255#0#255#0#0#0'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255
+  +#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@@@{{{'
+  +#147#147#147'III'#255#0#255#255#0#255#255#0#255#0#0#0#255#0#255#255#0#255#0#0
+  +#0#0#0#0'@'#0#192#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0
+  +#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@{{{'#147#147
+  +#147'III'#255#0#255#255#0#255#255#0#255#0#0#0#255#0#255#255#0#255#255#0#255#0
+  +#0#0'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192
+  +#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@{{{'#147#147#147'I'
+  +'II'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255'@'#0#192#255#255#255'@'#0#192'@'#0#192'@'#0#192#255#255#255#255
+  +#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@@@{{{'#147#147
+  +#147'III'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255'@'#0#192#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255'@'#0#192
+  +'@@@{{{'#147#147#147'III'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'{{{{{{'#147
+  +#147#147'III'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255'HJK'#196#189#194#192#186#192#189#183#189#189#183#189'HJK'
+  +#217#215#218'HJK{{{{{{{{{{{{{{{{{{'#147#147#147'III'#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#198#193#198#194
+  +#189#194#192#186#192#189#183#189'HJK'#222#221#225'HJK{{{{{{{{{{{{{{{{{{'#147
+  +#147#147'HJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255'HJK'#203#197#203#198#192#198#194#188#194#192#186#192'HJK'
+  +#227#226#230'HJK{{{{{{{{{{{{{{{{{{'#147#147#147'HJK'#0#0''#3#24#221#1#9#172
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#206#202#206#202#197
+  +#202#198#193#198#196#188#196'HJK'#231#230#234'HJK{{{{{{{{{{{{{{{{{{'#4#3'HJ'
+  +'K'#0#0''#20'7'#255#4#17#188#255#0#255#28#26#144#28#26#144#255#0#255#255#0
+  +#255'HJK'#212#208#212#207#202#207#203#197#202#198#192#198'HJK'#235#234#237'H'
+  +'JK'#134#134#134#134#134#134#134#134#134#146#146#146'{{{'#4#8#150'$<'#221#7#8
+  +#140#0#0''#28'?'#255#6#19#188#6#6#132#3#20#204#1#10#172#28#26#144#255#0#255
+  +'HJK'#217#213#216#212#208#212#207#202#207#203#197#202'HJK'#237#237#239'HJK{{'
+  +'{{{{{{{ooo'#134#134#134#5#9#150'Wr'#247'8P'#230#0#1#135'(J'#255#8#22#188#9
+  +#27#204#19'6'#255#3#20#204#28#25#143#255#0#255'HJK'#222#218#221#217#213#217
+  +#233#231#234#207#202#207'HJK'#238#237#240'HJK'#140#140#140#140#140#140#146
+  +#146#146'{{{{{{{{{'#5#9#150'Zu'#247'<V'#238'9Z'#255'#D'#247',N'#255#9#27#204
+  +#6#6#132#255#0#255#255#0#255'HJK'#227#224#227#238#237#238#156#154#156#211#207
+  +#211'HJK'#237#237#239'HJKTVWcddnnn'#140#140#140#4#3''#4#3'%1'#188'.D'#221
+  +'n'#137#255'd'#128#255'Qp'#255'''F'#247#10#24#188#6#20#188#3#16#188#0#0'HJK'
+  +#231#230#231#144#144#146#158#157#158#216#212#216'HJK'#206#207#208#207#207#207
+  +#134#135#135'ceeNPQMOP'#4#3''#151#171#255#137#159#255'z'#147#255#130#153#255
+  +'x'#145#255'g'#130#255'@`'#255'1S'#255'#F'#255#17'4'#255#0#0'HJK'#237#235
+  +#237#146#146#147#227#224#226#255#255#255#176#176#178'QRSUVWuvw'#169#170#170
+  +#211#211#212#189#189#191#0#0''#0#0''#0#0'EU'#213#157#176#255#132#156#255
+  +'u'#143#255'D^'#238#1#1#135#0#0''#0#0''#28#24#140'HJK'#240#240#242#237#235
+  +#237#255#255#255#233#233#235#226#225#229#220#217#221#191#187#191#151#149#152
+  +'onrXYZNPQhij'#147#149#150'P['#204#192#204#255'BP'#204#129#153#255'3E'#213'f'
+  +''#247'D['#230#8#9#139#255#0#255#255#0#255'HJK'#246#246#246#255#255#255#238
+  +#238#240#242#242#244#238#237#239#229#227#231#217#215#218#203#199#204#189#183
+  +#189#173#167#173#153#145#151#153#145#151#4#3''#220#227#255'R\'#204#0#0''
+  +#146#167#255'+5'#188#7#11#150'i'#129#247'5K'#221#6#6#131#255#0#255'HJK'#255
+  +#255#255#237#237#239#248#248#250#251#251#252#246#244#247#234#234#237#221#220
+  +#224#207#204#208#192#187#193#176#170#176#160#152#158'HJK'#4#3',1'#172#28#24
+  +#139#0#0''#163#181#255'1;'#188#28#24#139#8#12#150#7#11#150#255#0#255#255#0
+  +#255#255#0#255'HJKHJK'#233#233#234#252#252#252#246#246#247#235#234#238#222
+  ,#220#224#208#204#208#193#187#193'HJKHJK'#255#0#255#255#0#255#255#0#255#255#0
+  +#255#0#0''#178#194#255'7A'#188#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255'HJKHJKHJKHJKHJKHJKHJK'#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#6#5#131#16#21#157#6#8#142#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#0#0
+]);
+LazarusResources.Add('TROINDYSUPERHTTPCHANNEL','BMP',[
+  'BM'#248#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#194#6#0#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#255#0#255#153'c@'#149'^<'#153'c@'#146']Hmk?H'#146'>'#255
+  +#0#255#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@@@'#185
+  +'x='#185'x='#173'e'''#171'P'#20'jb'#30'$'#137'!1'#153'1@'#157'?@'#157'?'#255
+  +#0#255#255#0#255'@'#0#192#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255'@'#0#192
+  +'@@@'#231#129#22#227'm'#3#224']'#0#144'Z'#0#2'h'#0#0'k'#0#0'l'#0#15#134#15'@'
+  +#139'5H'#146'>'#255#0#255'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192
+  +#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192
+  +'@@@'#252#134#15#237#135#15#186'~'#7'R~'#2#18'z'#1#9'n'#0#0'l'#0#0'p'#0#5's'
+  +#4#151'6'#1#255#0#255'@'#0#192#255#255#255'@'#0#192'@'#0#192#255#255#255#255
+  +#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@'
+  +#207#146'#`'#137#14'l'#143#22#217#146'#'#255#135#22#186'~'#7'>x'#0#17'w'#0#28
+  +'['#1'lB'#22#136'2'#7'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255
+  +#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@:'
+  +#151#26'E'#153'"'#255#170'P'#255#161'B'#251#153'1'#255#140#28#255#128#9#237
+  +'n'#1#194'P'#4#144'8'#11#145'9'#12'@'#0#192#255#255#255'@'#0#192'@'#0#192'@'
+  +#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0
+  +#192'@@@'#22#166'%'#172#177'Q'#255#188'{'#0#0''#3#24#221#1#9#172#255#138#25
+  +#255'{'#4#224'e'#2#171'P'#20#150'='#14'@'#0#192#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255'@'#0#192'@@@;'#189'H'#4#3''#215#201#134#0#0''#20'7'#255#4
+  +#17#188#240#147'&'#28#26#144#28#26#144'tb'#3'lB'#22'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'~'#204'k'#4#8#150'$<'#221#7#8#140#0#0''#28'?'#255#6#19#188#6#6#132
+  +#3#20#204#1#10#172#28#26#144'#c'#5'422'#168#162#167'}st'#254#150#18#254#145
+  +#12#254#150#18#254#150#18#254#150#18#254#150#18#254#150#18#169'~H'#192#191'j'
+  +'u'#218'{'#5#9#150'Wr'#247'8P'#230#0#1#135'(J'#255#8#22#188#9#27#204#19'6'
+  +#255#3#20#204#28#25#143#2'}'#0':77'#165#164#165'opp'#254#150#18#254#150#18
+  +#254#150#18#254#150#18#254#162'!'#254#162'!'#254#162'!'#254#162'!\'#191'Ux'
+  +#219'|'#165#241#165#5#9#150'Zu'#247'<V'#238'9Z'#255'#D'#247',N'#255#9#27#204
+  +#6#6#132#2#129#0#255#0#255'422'#178#176#178'xux'#254#150#18#254#158#28#254
+  +#162'!'#255#172'0'#255#172'0'#255#172'0'#255#176'6'#255#172'0BqC'#4#3''#4#3
+  +'%1'#188'.D'#221'n'#137#255'd'#128#255'Qp'#255'''F'#247#10#24#188#6#20#188#3
+  +#16#188#0#0'989'#182#176#181'}st'#254#162'!'#255#172'0'#255#172'0'#255#180
+  +'<'#255#186'D'#255#186'D'#255#186'D'#255#186'D'#255#180'<'#4#3''#151#171#255
+  +#137#159#255'z'#147#255#130#153#255'x'#145#255'g'#130#255'@`'#255'1S'#255'#F'
+  +#255#17'4'#255#0#0'989'#182#176#181'xux'#255#172'0'#255#172'0'#255#186'D'
+  +#255#191'M'#255#196'U'#255#196'U'#255#199'\'#255#196'U'#255#192'M'#0#0''#0#0
+  +''#0#0'EU'#213#157#176#255#132#156#255'u'#143#255'D^'#238#1#1#135#0#0''#0
+  +#0''#28#24#140'989'#188#185#189'opp'#255#176'6'#255#186'D'#255#196'U'#255
+  +#199'\'#255#205'e'#255#208'j'#255#205'e'#255#205'e'#255#199'\'#255#196'U'#255
+  +#186'DP['#204#192#204#255'BP'#204#129#153#255'3E'#213'f'#247'D['#230#8#9#139
+  +#255#0#255#255#0#255'A<<'#184#183#184'opp'#255#186'D'#255#196'U'#255#199'\'
+  +#255#208'j'#255#215't'#255#216'v'#255#217'x'#255#216'v'#255#208'j'#255#205'e'
+  +#4#3''#220#227#255'R\'#204#0#0''#146#167#255'+5'#188#7#11#150'i'#129#247'5'
+  +'K'#221#6#6#131#255#0#255'989'#188#185#189'opp'#255#186'D'#255#201']'#255#208
+  +'j'#255#216'v'#255#221#129#254#226#136#254#226#136#255#221#129#255#217'x'#255
+  +#208'j'#4#3',1'#172#28#24#139#0#0''#163#181#255'1;'#188#28#24#139#8#12#150
+  +#7#11#150#255#0#255#255#0#255'A<<'#182#176#181'vtv'#255#196'U'#255#201']'#255
+  +#216'v'#255#217'x'#254#230#144#254#234#152#254#234#152#254#230#144#255#221
+  +#129#255#216'v'#255#205'e'#255#196'U'#255#186'D'#0#0''#178#194#255'7A'#188
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'989'#184#183#184'opp'#255
+  +#196'U'#255#205'e'#255#216'v'#255#221#129#254#234#152#254#242#166#254#243#169
+  +#254#234#152#254#226#136#255#216'v'#255#205'e'#255#196'U'#255#186'D'#6#5#131
+  +#16#21#157#6#8#142#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'A<<'#182
+  +#176#181'vtv'#201#161'W'#189#154'Q'#238#201'n'#254#226#136#254#234#150#254
+  +#242#166#254#243#169#254#234#152#254#226#136#255#216'v'#255#208'j'#255#196'U'
+  +#255#186'D'#137'tW*%%'#255#0#255#0#0#0#255#0#255#255#0#255#0#0#0#0#0#0'989'
+  +#184#183#184'nmnnmnoppoppa]]'#135#130'u'#130'~m'#167#160#129#163#152'r'#203
+  +#181'y'#197#167'b'#238#192'^'#255#196'U'#255#186'D'#142'w[*%%'#255#0#255#0#0
+  +#0#255#0#255#0#0#0#255#0#255#0#0#0'A<<------'#212#209#213#196#196#197#173#172
+  ,#173#160#160#163#141#137#140#141#137#140'xux}}~oppxuxxuxddd'#135't`}st*%%'
+  +#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255'HJKHJK'#30#30#30
+  +'422788FFFZVWnmnopp'#144#141#145#128#128#128#161#154#160#144#141#145#139#131
+  +#137#132'yzZST*%%'#255#0#255#0#0#0#255#0#255#255#0#255#0#0#0#0#0#0#255#0#255
+  +#255#0#255#255#0#255'HJKHJKHJKHJKHJK'#30#30#30'111------------989422111'#255
+  +#0#255#255#0#255#0#0#0#255#0#255#255#0#255#255#0#255#0#0#0#0#0
+]);
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_Glyphs.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_Glyphs.res
new file mode 100644
index 0000000..759fd3e
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_Glyphs.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_Lazarus_Mac.lpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_Lazarus_Mac.lpk
new file mode 100644
index 0000000..edc9578
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_Lazarus_Mac.lpk	
@@ -0,0 +1,143 @@
+<?xml version="1.0"?>
+<CONFIG>
+  <Package Version="3">
+    <Name Value="RemObjects_Indy_Lazarus_Mac"/>
+    <CompilerOptions>
+      <Version Value="8"/>
+      <SearchPaths>
+        <OtherUnitFiles Value="CodeGen/;ZLib/FPC/"/>
+        <UnitOutputDirectory Value="units/$(TargetCPU)-$(TargetOS)"/>
+      </SearchPaths>
+      <Other>
+        <CompilerPath Value="$(CompPath)"/>
+      </Other>
+    </CompilerOptions>
+    <Description Value="RemObjects SDK - Indy Library
+"/>
+    <Files Count="23">
+      <Item1>
+        <Filename Value="RemObjects_Indy_Reg.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="RemObjects_Indy_Reg"/>
+      </Item1>
+      <Item2>
+        <Filename Value="uROAsyncResponseStorage.pas"/>
+        <UnitName Value="uROAsyncResponseStorage"/>
+      </Item2>
+      <Item3>
+        <Filename Value="uROBroadcastChannel.pas"/>
+        <UnitName Value="uROBroadcastChannel"/>
+      </Item3>
+      <Item4>
+        <Filename Value="uROBroadcastServer.pas"/>
+        <UnitName Value="uROBroadcastServer"/>
+      </Item4>
+      <Item5>
+        <Filename Value="uRODiscovery.pas"/>
+        <UnitName Value="uRODiscovery"/>
+      </Item5>
+      <Item6>
+        <Filename Value="uRODiscovery_Async.pas"/>
+        <UnitName Value="uRODiscovery_Async"/>
+      </Item6>
+      <Item7>
+        <Filename Value="uRODiscovery_Intf.pas"/>
+        <UnitName Value="uRODiscovery_Intf"/>
+      </Item7>
+      <Item8>
+        <Filename Value="uRODiscovery_Invk.pas"/>
+        <UnitName Value="uRODiscovery_Invk"/>
+      </Item8>
+      <Item9>
+        <Filename Value="uRODiscoveryService_Impl.pas"/>
+        <UnitName Value="uRODiscoveryService_Impl"/>
+      </Item9>
+      <Item10>
+        <Filename Value="uROIndyEmail.pas"/>
+        <UnitName Value="uROIndyEmail"/>
+      </Item10>
+      <Item11>
+        <Filename Value="uROIndyEmailChannel.pas"/>
+        <UnitName Value="uROIndyEmailChannel"/>
+      </Item11>
+      <Item12>
+        <Filename Value="uROIndyEmailServer.pas"/>
+        <UnitName Value="uROIndyEmailServer"/>
+      </Item12>
+      <Item13>
+        <Filename Value="uROIndyHTTPChannel.pas"/>
+        <UnitName Value="uROIndyHTTPChannel"/>
+      </Item13>
+      <Item14>
+        <Filename Value="uROIndyHTTPServer.pas"/>
+        <UnitName Value="uROIndyHTTPServer"/>
+      </Item14>
+      <Item15>
+        <Filename Value="uROIndyTCPChannel.pas"/>
+        <UnitName Value="uROIndyTCPChannel"/>
+      </Item15>
+      <Item16>
+        <Filename Value="uROIndyTCPServer.pas"/>
+        <UnitName Value="uROIndyTCPServer"/>
+      </Item16>
+      <Item17>
+        <Filename Value="uROIndyUDPChannel.pas"/>
+        <UnitName Value="uROIndyUDPChannel"/>
+      </Item17>
+      <Item18>
+        <Filename Value="uROIndyUDPServer.pas"/>
+        <UnitName Value="uROIndyUDPServer"/>
+      </Item18>
+      <Item19>
+        <Filename Value="uROSCHelpers.pas"/>
+        <UnitName Value="uROSCHelpers"/>
+      </Item19>
+      <Item20>
+        <Filename Value="uROStreamUtils.pas"/>
+        <UnitName Value="uROStreamUtils"/>
+      </Item20>
+      <Item21>
+        <Filename Value="uROSuperTCPChannel.pas"/>
+        <UnitName Value="uROSuperTCPChannel"/>
+      </Item21>
+      <Item22>
+        <Filename Value="uROSuperTCPServer.pas"/>
+        <UnitName Value="uROSuperTCPServer"/>
+      </Item22>
+      <Item23>
+        <Filename Value="uROIndySuperHttpChannel.pas"/>
+        <UnitName Value="uROIndySuperHttpChannel"/>
+      </Item23>
+    </Files>
+    <Type Value="RunAndDesignTime"/>
+    <RequiredPkgs Count="6">
+      <Item1>
+        <PackageName Value="FCL"/>
+        <MinVersion Major="1" Valid="True"/>
+      </Item1>
+      <Item2>
+        <PackageName Value="IDEIntf"/>
+      </Item2>
+      <Item3>
+        <PackageName Value="RemObjects_Core_Lazarus_Mac"/>
+      </Item3>
+      <Item4>
+        <PackageName Value="indysystemlaz"/>
+        <MinVersion Major="10" Minor="2"/>
+      </Item4>
+      <Item5>
+        <PackageName Value="indycorelaz"/>
+      </Item5>
+      <Item6>
+        <PackageName Value="indyprotocolslaz"/>
+      </Item6>
+    </RequiredPkgs>
+    <UsageOptions>
+      <UnitPath Value="$(PkgOutDir)/"/>
+    </UsageOptions>
+    <PublishOptions>
+      <Version Value="2"/>
+      <IgnoreBinaries Value="False"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_Lazarus_Unix.lpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_Lazarus_Unix.lpk
new file mode 100644
index 0000000..26faff7
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_Lazarus_Unix.lpk	
@@ -0,0 +1,154 @@
+<?xml version="1.0"?>
+<CONFIG>
+  <Package Version="3">
+    <PathDelim Value="\"/>
+    <Name Value="RemObjects_Indy_Lazarus_Unix"/>
+    <CompilerOptions>
+      <Version Value="5"/>
+      <PathDelim Value="\"/>
+      <SearchPaths>
+        <OtherUnitFiles Value="CodeGen\;ZLib\FPC\"/>
+        <UnitOutputDirectory Value="units\$(TargetCPU)-$(TargetOS)"/>
+      </SearchPaths>
+      <Parsing>
+        <SyntaxOptions>
+          <D2Extensions Value="False"/>
+        </SyntaxOptions>
+      </Parsing>
+      <CodeGeneration>
+        <Generate Value="Faster"/>
+      </CodeGeneration>
+      <Other>
+        <CompilerPath Value="$(CompPath)"/>
+      </Other>
+    </CompilerOptions>
+    <Description Value="RemObjects SDK - Indy Library
+"/>
+    <Files Count="23">
+      <Item1>
+        <Filename Value="RemObjects_Indy_Reg.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="RemObjects_Indy_Reg"/>
+      </Item1>
+      <Item2>
+        <Filename Value="uROAsyncResponseStorage.pas"/>
+        <UnitName Value="uROAsyncResponseStorage"/>
+      </Item2>
+      <Item3>
+        <Filename Value="uROBroadcastChannel.pas"/>
+        <UnitName Value="uROBroadcastChannel"/>
+      </Item3>
+      <Item4>
+        <Filename Value="uROBroadcastServer.pas"/>
+        <UnitName Value="uROBroadcastServer"/>
+      </Item4>
+      <Item5>
+        <Filename Value="uRODiscovery.pas"/>
+        <UnitName Value="uRODiscovery"/>
+      </Item5>
+      <Item6>
+        <Filename Value="uRODiscovery_Async.pas"/>
+        <UnitName Value="uRODiscovery_Async"/>
+      </Item6>
+      <Item7>
+        <Filename Value="uRODiscovery_Intf.pas"/>
+        <UnitName Value="uRODiscovery_Intf"/>
+      </Item7>
+      <Item8>
+        <Filename Value="uRODiscovery_Invk.pas"/>
+        <UnitName Value="uRODiscovery_Invk"/>
+      </Item8>
+      <Item9>
+        <Filename Value="uRODiscoveryService_Impl.pas"/>
+        <UnitName Value="uRODiscoveryService_Impl"/>
+      </Item9>
+      <Item10>
+        <Filename Value="uROIndyEmail.pas"/>
+        <UnitName Value="uROIndyEmail"/>
+      </Item10>
+      <Item11>
+        <Filename Value="uROIndyEmailChannel.pas"/>
+        <UnitName Value="uROIndyEmailChannel"/>
+      </Item11>
+      <Item12>
+        <Filename Value="uROIndyEmailServer.pas"/>
+        <UnitName Value="uROIndyEmailServer"/>
+      </Item12>
+      <Item13>
+        <Filename Value="uROIndyHTTPChannel.pas"/>
+        <UnitName Value="uROIndyHTTPChannel"/>
+      </Item13>
+      <Item14>
+        <Filename Value="uROIndyHTTPServer.pas"/>
+        <UnitName Value="uROIndyHTTPServer"/>
+      </Item14>
+      <Item15>
+        <Filename Value="uROIndyTCPChannel.pas"/>
+        <UnitName Value="uROIndyTCPChannel"/>
+      </Item15>
+      <Item16>
+        <Filename Value="uROIndyTCPServer.pas"/>
+        <UnitName Value="uROIndyTCPServer"/>
+      </Item16>
+      <Item17>
+        <Filename Value="uROIndyUDPChannel.pas"/>
+        <UnitName Value="uROIndyUDPChannel"/>
+      </Item17>
+      <Item18>
+        <Filename Value="uROIndyUDPServer.pas"/>
+        <UnitName Value="uROIndyUDPServer"/>
+      </Item18>
+      <Item19>
+        <Filename Value="uROSCHelpers.pas"/>
+        <UnitName Value="uROSCHelpers"/>
+      </Item19>
+      <Item20>
+        <Filename Value="uROStreamUtils.pas"/>
+        <UnitName Value="uROStreamUtils"/>
+      </Item20>
+      <Item21>
+        <Filename Value="uROSuperTCPChannel.pas"/>
+        <UnitName Value="uROSuperTCPChannel"/>
+      </Item21>
+      <Item22>
+        <Filename Value="uROSuperTCPServer.pas"/>
+        <UnitName Value="uROSuperTCPServer"/>
+      </Item22>
+      <Item23>
+        <Filename Value="uROIndySuperHttpChannel.pas"/>
+        <UnitName Value="uROIndySuperHttpChannel"/>
+      </Item23>
+    </Files>
+    <Type Value="RunAndDesignTime"/>
+    <RequiredPkgs Count="6">
+      <Item1>
+        <PackageName Value="FCL"/>
+        <MinVersion Major="1" Valid="True"/>
+      </Item1>
+      <Item2>
+        <PackageName Value="IDEIntf"/>
+      </Item2>
+      <Item3>
+        <PackageName Value="RemObjects_Core_Lazarus_Unix"/>
+      </Item3>
+      <Item4>
+        <PackageName Value="indysystemlaz"/>
+        <MinVersion Major="10" Minor="2"/>
+      </Item4>
+      <Item5>
+        <PackageName Value="indycorelaz"/>
+      </Item5>
+      <Item6>
+        <PackageName Value="indyprotocolslaz"/>
+      </Item6>
+    </RequiredPkgs>
+    <UsageOptions>
+      <UnitPath Value="$(PkgOutDir)\"/>
+    </UsageOptions>
+    <PublishOptions>
+      <Version Value="2"/>
+      <DestinationDirectory Value="$(TestDir)\publishedpackage\"/>
+      <IgnoreBinaries Value="False"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_Lazarus_Windows.lpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_Lazarus_Windows.lpk
new file mode 100644
index 0000000..fbcc167
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_Lazarus_Windows.lpk	
@@ -0,0 +1,147 @@
+<?xml version="1.0"?>
+<CONFIG>
+  <Package Version="3">
+    <PathDelim Value="\"/>
+    <Name Value="RemObjects_Indy_Lazarus_Windows"/>
+    <CompilerOptions>
+      <Version Value="8"/>
+      <PathDelim Value="\"/>
+      <SearchPaths>
+        <UnitOutputDirectory Value="..\Dcu\Lazarus\$(TargetCPU)-$(TargetOS)"/>
+      </SearchPaths>
+      <Parsing>
+        <SyntaxOptions>
+          <CStyleOperator Value="False"/>
+        </SyntaxOptions>
+      </Parsing>
+      <Other>
+        <CompilerPath Value="$(CompPath)"/>
+      </Other>
+    </CompilerOptions>
+    <Files Count="23">
+      <Item1>
+        <Filename Value="RemObjects_Indy_Reg.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="RemObjects_Indy_Reg"/>
+      </Item1>
+      <Item2>
+        <Filename Value="uROAsyncResponseStorage.pas"/>
+        <UnitName Value="uROAsyncResponseStorage"/>
+      </Item2>
+      <Item3>
+        <Filename Value="uROBroadcastChannel.pas"/>
+        <UnitName Value="uROBroadcastChannel"/>
+      </Item3>
+      <Item4>
+        <Filename Value="uROBroadcastServer.pas"/>
+        <UnitName Value="uROBroadcastServer"/>
+      </Item4>
+      <Item5>
+        <Filename Value="uRODiscovery.pas"/>
+        <UnitName Value="uRODiscovery"/>
+      </Item5>
+      <Item6>
+        <Filename Value="uRODiscovery_Async.pas"/>
+        <UnitName Value="uRODiscovery_Async"/>
+      </Item6>
+      <Item7>
+        <Filename Value="uRODiscovery_Intf.pas"/>
+        <UnitName Value="uRODiscovery_Intf"/>
+      </Item7>
+      <Item8>
+        <Filename Value="uRODiscovery_Invk.pas"/>
+        <UnitName Value="uRODiscovery_Invk"/>
+      </Item8>
+      <Item9>
+        <Filename Value="uRODiscoveryService_Impl.pas"/>
+        <UnitName Value="uRODiscoveryService_Impl"/>
+      </Item9>
+      <Item10>
+        <Filename Value="uROIndyEmail.pas"/>
+        <UnitName Value="uROIndyEmail"/>
+      </Item10>
+      <Item11>
+        <Filename Value="uROIndyEmailChannel.pas"/>
+        <UnitName Value="uROIndyEmailChannel"/>
+      </Item11>
+      <Item12>
+        <Filename Value="uROIndyEmailServer.pas"/>
+        <UnitName Value="uROIndyEmailServer"/>
+      </Item12>
+      <Item13>
+        <Filename Value="uROIndyHTTPChannel.pas"/>
+        <UnitName Value="uROIndyHTTPChannel"/>
+      </Item13>
+      <Item14>
+        <Filename Value="uROIndyHTTPServer.pas"/>
+        <UnitName Value="uROIndyHTTPServer"/>
+      </Item14>
+      <Item15>
+        <Filename Value="uROIndyTCPChannel.pas"/>
+        <UnitName Value="uROIndyTCPChannel"/>
+      </Item15>
+      <Item16>
+        <Filename Value="uROIndyTCPServer.pas"/>
+        <UnitName Value="uROIndyTCPServer"/>
+      </Item16>
+      <Item17>
+        <Filename Value="uROIndyUDPChannel.pas"/>
+        <UnitName Value="uROIndyUDPChannel"/>
+      </Item17>
+      <Item18>
+        <Filename Value="uROIndyUDPServer.pas"/>
+        <UnitName Value="uROIndyUDPServer"/>
+      </Item18>
+      <Item19>
+        <Filename Value="uROSCHelpers.pas"/>
+        <UnitName Value="uROSCHelpers"/>
+      </Item19>
+      <Item20>
+        <Filename Value="uROStreamUtils.pas"/>
+        <UnitName Value="uROStreamUtils"/>
+      </Item20>
+      <Item21>
+        <Filename Value="uROSuperTCPChannel.pas"/>
+        <UnitName Value="uROSuperTCPChannel"/>
+      </Item21>
+      <Item22>
+        <Filename Value="uROSuperTCPServer.pas"/>
+        <UnitName Value="uROSuperTCPServer"/>
+      </Item22>
+      <Item23>
+        <Filename Value="uROIndySuperHttpChannel.pas"/>
+        <UnitName Value="uROIndySuperHttpChannel"/>
+      </Item23>
+    </Files>
+    <Type Value="RunAndDesignTime"/>
+    <RequiredPkgs Count="6">
+      <Item1>
+        <PackageName Value="RemObjects_Core_Lazarus_Windows"/>
+      </Item1>
+      <Item2>
+        <PackageName Value="FCL"/>
+        <MinVersion Major="1" Valid="True"/>
+      </Item2>
+      <Item3>
+        <PackageName Value="IDEIntf"/>
+      </Item3>
+      <Item4>
+        <PackageName Value="indysystemlaz"/>
+        <MinVersion Major="10" Minor="2"/>
+      </Item4>
+      <Item5>
+        <PackageName Value="indycorelaz"/>
+      </Item5>
+      <Item6>
+        <PackageName Value="indyprotocolslaz"/>
+      </Item6>
+    </RequiredPkgs>
+    <UsageOptions>
+      <UnitPath Value="$(PkgOutDir)\"/>
+    </UsageOptions>
+    <PublishOptions>
+      <Version Value="2"/>
+      <IgnoreBinaries Value="False"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_Reg.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_Reg.pas
new file mode 100644
index 0000000..416bbf4
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Indy_Reg.pas	
@@ -0,0 +1,65 @@
+unit RemObjects_Indy_Reg;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Indy Components                                   }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+procedure Register;
+
+implementation
+
+uses 
+     {$IFDEF FPC}LResources,{$ENDIF}
+     Classes,
+     {$IFDEF BDS}DesignIntf,{$ENDIF}
+     uRORes,
+     uROSuperTCPChannel, uROSuperTCPServer,
+     uROIndyTCPChannel, uROIndyHTTPChannel, uROIndyUDPChannel,
+     uROIndyHTTPServer, uROIndyTCPServer, uROIndyUDPServer,
+     uROBroadcastChannel, uROBroadcastServer,
+     uROIndyEmailChannel, uROIndyEmailServer,
+     uRODiscovery, uROIndySuperHttpChannel;
+
+{$IFNDEF FPC}
+  {$R RemObjects_Indy_Glyphs.res}
+{$ENDIF}   
+     
+procedure Register;
+begin
+  {$IFDEF BDS}
+  {$IFNDEF RemObjects_NO_DEMANDLOAD_FIX}
+  ForceDemandLoadState(dlDisable);
+  {$ENDIF}
+  {$ENDIF}
+  RegisterComponents(str_ProductName,
+                     [TROIndyHTTPServer, TROIndyHTTPChannel,
+                      TROIndyTCPServer, TROIndyTCPChannel,
+                      TROSuperTCPServer, TROSuperTCPChannel,
+                      TROIndyUDPServer, TROIndyUDPChannel,
+                      {$IFDEF MSWINDOWS}
+                      TROBroadcastChannel, TROBroadcastServer,
+                      TRODiscoveryClient, TRODiscoveryServer,
+                      {$ENDIF MSWINDOWS}
+                      TROEmailChannel, TROEmailServer,
+					  TROIndySuperHTTPChannel]);
+
+
+end;
+
+{$IFDEF FPC}
+initialization
+  {$i RemObjects_Indy_Glyphs.lrs}
+{$ENDIF}
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D10.bdsproj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D10.bdsproj
new file mode 100644
index 0000000..f3d5040
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D10.bdsproj	
@@ -0,0 +1,181 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality">Delphi.Personality</Option>
+			<Option Name="ProjectType"></Option>
+			<Option Name="Version">1.0</Option>
+			<Option Name="GUID">{273ED1C9-0197-4A8B-B785-4B4C22EE13B8}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource">RemObjects_Synapse_D10.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A">8</Compiler>
+			<Compiler Name="B">0</Compiler>
+			<Compiler Name="C">1</Compiler>
+			<Compiler Name="D">1</Compiler>
+			<Compiler Name="E">0</Compiler>
+			<Compiler Name="F">0</Compiler>
+			<Compiler Name="G">1</Compiler>
+			<Compiler Name="H">1</Compiler>
+			<Compiler Name="I">1</Compiler>
+			<Compiler Name="J">0</Compiler>
+			<Compiler Name="K">0</Compiler>
+			<Compiler Name="L">1</Compiler>
+			<Compiler Name="M">0</Compiler>
+			<Compiler Name="N">1</Compiler>
+			<Compiler Name="O">1</Compiler>
+			<Compiler Name="P">1</Compiler>
+			<Compiler Name="Q">0</Compiler>
+			<Compiler Name="R">0</Compiler>
+			<Compiler Name="S">0</Compiler>
+			<Compiler Name="T">0</Compiler>
+			<Compiler Name="U">0</Compiler>
+			<Compiler Name="V">1</Compiler>
+			<Compiler Name="W">1</Compiler>
+			<Compiler Name="X">1</Compiler>
+			<Compiler Name="Y">1</Compiler>
+			<Compiler Name="Z">1</Compiler>
+			<Compiler Name="ShowHints">True</Compiler>
+			<Compiler Name="ShowWarnings">True</Compiler>
+			<Compiler Name="UnitAliases">WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;</Compiler>
+			<Compiler Name="NamespacePrefix"></Compiler>
+			<Compiler Name="GenerateDocumentation">False</Compiler>
+			<Compiler Name="DefaultNamespace"></Compiler>
+			<Compiler Name="SymbolDeprecated">False</Compiler>
+			<Compiler Name="SymbolLibrary">False</Compiler>
+			<Compiler Name="SymbolPlatform">False</Compiler>
+			<Compiler Name="SymbolExperimental">False</Compiler>
+			<Compiler Name="UnitLibrary">False</Compiler>
+			<Compiler Name="UnitPlatform">False</Compiler>
+			<Compiler Name="UnitDeprecated">False</Compiler>
+			<Compiler Name="UnitExperimental">False</Compiler>
+			<Compiler Name="HResultCompat">True</Compiler>
+			<Compiler Name="HidingMember">True</Compiler>
+			<Compiler Name="HiddenVirtual">True</Compiler>
+			<Compiler Name="Garbage">True</Compiler>
+			<Compiler Name="BoundsError">True</Compiler>
+			<Compiler Name="ZeroNilCompat">True</Compiler>
+			<Compiler Name="StringConstTruncated">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar">True</Compiler>
+			<Compiler Name="TypedConstVarPar">True</Compiler>
+			<Compiler Name="AsgToTypedConst">True</Compiler>
+			<Compiler Name="CaseLabelRange">True</Compiler>
+			<Compiler Name="ForVariable">True</Compiler>
+			<Compiler Name="ConstructingAbstract">True</Compiler>
+			<Compiler Name="ComparisonFalse">True</Compiler>
+			<Compiler Name="ComparisonTrue">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned">True</Compiler>
+			<Compiler Name="UnsupportedConstruct">True</Compiler>
+			<Compiler Name="FileOpen">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc">True</Compiler>
+			<Compiler Name="BadGlobalSymbol">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor">True</Compiler>
+			<Compiler Name="InvalidDirective">True</Compiler>
+			<Compiler Name="PackageNoLink">True</Compiler>
+			<Compiler Name="PackageThreadVar">True</Compiler>
+			<Compiler Name="ImplicitImport">True</Compiler>
+			<Compiler Name="HPPEMITIgnored">True</Compiler>
+			<Compiler Name="NoRetVal">True</Compiler>
+			<Compiler Name="UseBeforeDef">True</Compiler>
+			<Compiler Name="ForLoopVarUndef">True</Compiler>
+			<Compiler Name="UnitNameMismatch">True</Compiler>
+			<Compiler Name="NoCFGFileFound">True</Compiler>
+			<Compiler Name="MessageDirective">True</Compiler>
+			<Compiler Name="ImplicitVariants">True</Compiler>
+			<Compiler Name="UnicodeToLocale">True</Compiler>
+			<Compiler Name="LocaleToUnicode">True</Compiler>
+			<Compiler Name="ImagebaseMultiple">True</Compiler>
+			<Compiler Name="SuspiciousTypecast">True</Compiler>
+			<Compiler Name="PrivatePropAccessor">True</Compiler>
+			<Compiler Name="UnsafeType">False</Compiler>
+			<Compiler Name="UnsafeCode">False</Compiler>
+			<Compiler Name="UnsafeCast">False</Compiler>
+			<Compiler Name="OptionTruncated">True</Compiler>
+			<Compiler Name="WideCharReduced">True</Compiler>
+			<Compiler Name="DuplicatesIgnored">True</Compiler>
+			<Compiler Name="UnitInitSeq">True</Compiler>
+			<Compiler Name="LocalPInvoke">True</Compiler>
+			<Compiler Name="CodePage"></Compiler>
+		</Compiler>
+		<Linker>
+			<Linker Name="MapFile">0</Linker>
+			<Linker Name="OutputObjs">0</Linker>
+			<Linker Name="ConsoleApp">1</Linker>
+			<Linker Name="DebugInfo">False</Linker>
+			<Linker Name="RemoteSymbols">False</Linker>
+			<Linker Name="GenerateDRC">False</Linker>
+			<Linker Name="MinStackSize">16384</Linker>
+			<Linker Name="MaxStackSize">1048576</Linker>
+			<Linker Name="ImageBase">4194304</Linker>
+			<Linker Name="ExeDescription">RemObjects SDK - Synapse based Channels</Linker>
+			<Linker Name="GenerateHpps">False</Linker>
+		</Linker>
+		<Directories>
+			<Directories Name="OutputDir">..\Dcu\D10</Directories>
+			<Directories Name="UnitOutputDir">..\Dcu\D10</Directories>
+			<Directories Name="PackageDLLOutputDir">..\Dcu\D10</Directories>
+			<Directories Name="PackageDCPOutputDir">..\Dcu\D10</Directories>
+			<Directories Name="SearchPath">..\Dcu\D10</Directories>
+			<Directories Name="Packages"></Directories>
+			<Directories Name="Conditionals">DESIGNTIME</Directories>
+			<Directories Name="DebugSourceDirs"></Directories>
+			<Directories Name="UsePackages">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams"></Parameters>
+			<Parameters Name="HostApplication"></Parameters>
+			<Parameters Name="Launcher"></Parameters>
+			<Parameters Name="UseLauncher">False</Parameters>
+			<Parameters Name="DebugCWD"></Parameters>
+			<Parameters Name="RemoteHost"></Parameters>
+			<Parameters Name="RemotePath"></Parameters>
+			<Parameters Name="RemoteLauncher"></Parameters>
+			<Parameters Name="RemoteCWD"></Parameters>
+			<Parameters Name="RemoteDebug">False</Parameters>
+			<Parameters Name="Debug Symbols Search Path"></Parameters>
+			<Parameters Name="LoadAllSymbols">True</Parameters>
+			<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+		</Parameters>
+		<Language>
+			<Language Name="ActiveLang"></Language>
+			<Language Name="ProjectLang">$00000000</Language>
+			<Language Name="RootDir"></Language>
+		</Language>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+			<VersionInfo Name="MajorVer">3</VersionInfo>
+			<VersionInfo Name="MinorVer">0</VersionInfo>
+			<VersionInfo Name="Release">0</VersionInfo>
+			<VersionInfo Name="Build">257</VersionInfo>
+			<VersionInfo Name="Debug">False</VersionInfo>
+			<VersionInfo Name="PreRelease">False</VersionInfo>
+			<VersionInfo Name="Special">False</VersionInfo>
+			<VersionInfo Name="Private">False</VersionInfo>
+			<VersionInfo Name="DLL">False</VersionInfo>
+			<VersionInfo Name="Locale">1033</VersionInfo>
+			<VersionInfo Name="CodePage">1252</VersionInfo>
+		</VersionInfo>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription">ROServiceTester</VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion">3.0.0.257</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName">ROServiceTester</VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright">Copyright RemObjects Software 2002</VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks">RemObjects Software 2002</VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename">ROServiceTester.exe</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion">3.0.0.0</VersionInfoKeys>
+			<VersionInfoKeys Name="Compile Date">Sunday, March 21, 2004 5:55 PM</VersionInfoKeys>
+		</VersionInfoKeys>
+	</Delphi.Personality>
+	<ModelSupport>False</ModelSupport>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D10.cfg b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D10.cfg
new file mode 100644
index 0000000..5094cf5
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D10.cfg	
@@ -0,0 +1,54 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W+
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-E"..\Dcu\D10"
+-N0"..\Dcu\D10"
+-LE"..\Dcu\D10"
+-LN"..\Dcu\D10"
+-U"..\Dcu\D10"
+-O"..\Dcu\D10"
+-I"..\Dcu\D10"
+-R"..\Dcu\D10"
+-DDESIGNTIME
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-SYMBOL_EXPERIMENTAL
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNIT_EXPERIMENTAL
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D10.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D10.dpk
new file mode 100644
index 0000000..4e289df
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D10.dpk	
@@ -0,0 +1,56 @@
+package RemObjects_Synapse_D10;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - Synapse based Channels'}
+{$IMPLICITBUILD OFF}
+{$DEFINE DESIGNTIME}
+
+requires
+  rtl,
+  vcl,
+  inet,
+  RemObjects_Core_D10;
+
+contains
+  RemObjects_Synapse_Reg in 'RemObjects_Synapse_Reg.pas',
+  uROSynapseHTTPChannel in 'uROSynapseHTTPChannel.pas',
+  synsock in 'Synapse\synsock.pas',
+  blcksock in 'Synapse\blcksock.pas',
+  httpsend in 'Synapse\httpsend.pas',
+  synacode in 'Synapse\synacode.pas',
+  synafpc in 'Synapse\synafpc.pas',
+  synaip in 'Synapse\synaip.pas',
+  synautil in 'Synapse\synautil.pas',
+  uIPAsyncSocket in 'uIPAsyncSocket.pas',
+  uIPAsyncHttpServer in 'uIPAsyncHttpServer.pas',
+  uROIpSuperHttpServer in  'uROIpSuperHttpServer.pas',  
+  uROSynapseSuperHttpChannel in 'uROSynapseSuperHttpChannel.pas',
+  uROSynapseSCHelpers in 'uROSynapseSCHelpers.pas',
+  uROSynapseServerSocket in 'uROSynapseServerSocket.pas',
+  uROSynapseSuperTCPChannel in 'uROSynapseSuperTCPCHannel.pas',
+  uROSynapseSuperTCPServer in 'uROSynapseSuperTCPServer.pas',
+  uROIpHttpServer in 'uROIpHttpServer.pas', 
+  uROIpTcpServer in 'uROIpTcpServer.pas';  
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D10.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D10.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D10.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D11.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D11.dpk
new file mode 100644
index 0000000..0ff0dd3
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D11.dpk	
@@ -0,0 +1,56 @@
+package RemObjects_Synapse_D11;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - Synapse based Channels'}
+{$IMPLICITBUILD OFF}
+{$DEFINE DESIGNTIME}
+
+requires
+  rtl,
+  vcl,
+  inet,
+  RemObjects_Core_D11;
+
+contains
+  RemObjects_Synapse_Reg in 'RemObjects_Synapse_Reg.pas',
+  uROSynapseHTTPChannel in 'uROSynapseHTTPChannel.pas',
+  synsock in 'Synapse\synsock.pas',
+  blcksock in 'Synapse\blcksock.pas',
+  httpsend in 'Synapse\httpsend.pas',
+  synacode in 'Synapse\synacode.pas',
+  synafpc in 'Synapse\synafpc.pas',
+  synaip in 'Synapse\synaip.pas',
+  synautil in 'Synapse\synautil.pas',
+  uIPAsyncSocket in 'uIPAsyncSocket.pas',
+  uIPAsyncHttpServer in 'uIPAsyncHttpServer.pas',
+  uROIpSuperHttpServer in 'uROIpSuperHttpServer.pas',
+  uROSynapseSuperHttpChannel in 'uROSynapseSuperHttpChannel.pas',
+  uROSynapseSCHelpers in 'uROSynapseSCHelpers.pas',
+  uROSynapseServerSocket in 'uROSynapseServerSocket.pas',
+  uROSynapseSuperTCPChannel in 'uROSynapseSuperTCPCHannel.pas',
+  uROSynapseSuperTCPServer in 'uROSynapseSuperTCPServer.pas',
+  uROIpHttpServer in 'uROIpHttpServer.pas', 
+  uROIpTcpServer in 'uROIpTcpServer.pas';  
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D11.dproj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D11.dproj
new file mode 100644
index 0000000..7fc424c
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D11.dproj	
@@ -0,0 +1,95 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{5c79699f-2653-4670-a29a-e5e2459651b1}</ProjectGuid>
+    <MainSource>RemObjects_Synapse_D11.dpk</MainSource>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+    <DCC_DependencyCheckOutputName>..\Dcu\D11\RemObjects_Synapse_D11.bpl</DCC_DependencyCheckOutputName>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DebugInformation>False</DCC_DebugInformation>
+    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+    <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+    <DCC_ExeOutput>..\Dcu\D11</DCC_ExeOutput>
+    <DCC_DcuOutput>..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\Dcu\D11</DCC_IncludePath>
+    <DCC_Define>DESIGNTIME;RELEASE</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_SYMBOL_EXPERIMENTAL>False</DCC_SYMBOL_EXPERIMENTAL>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+    <DCC_UNIT_EXPERIMENTAL>False</DCC_UNIT_EXPERIMENTAL>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
+    <DCC_ExeOutput>..\Dcu\D11</DCC_ExeOutput>
+    <DCC_DcuOutput>..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\Dcu\D11</DCC_IncludePath>
+    <DCC_Define>DESIGNTIME</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_SYMBOL_EXPERIMENTAL>False</DCC_SYMBOL_EXPERIMENTAL>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+    <DCC_UNIT_EXPERIMENTAL>False</DCC_UNIT_EXPERIMENTAL>
+  </PropertyGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Delphi.Personality</Borland.Personality>
+    <Borland.ProjectType>Package</Borland.ProjectType>
+    <BorlandProject>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">RemObjects SDK - Synapse based Channels</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">3</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">257</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="FileDescription">ROServiceTester</VersionInfoKeys><VersionInfoKeys Name="FileVersion">3.0.0.257</VersionInfoKeys><VersionInfoKeys Name="InternalName">ROServiceTester</VersionInfoKeys><VersionInfoKeys Name="LegalCopyright">Copyright RemObjects Software 2002</VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks">RemObjects Software 2002</VersionInfoKeys><VersionInfoKeys Name="OriginalFilename">ROServiceTester.exe</VersionInfoKeys><VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">3.0.0.0</VersionInfoKeys><VersionInfoKeys Name="Compile Date">Sunday, March 21, 2004 5:55 PM</VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">RemObjects_Synapse_D11.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
+  <ItemGroup>
+    <DelphiCompile Include="RemObjects_Synapse_D11.dpk">
+      <MainSource>MainSource</MainSource>
+    </DelphiCompile>
+    <DCCReference Include="inet.dcp" />
+    <DCCReference Include="RemObjects_Core_D11.dcp" />
+    <DCCReference Include="RemObjects_Synapse_Reg.pas" />
+    <DCCReference Include="rtl.dcp" />
+    <DCCReference Include="Synapse\blcksock.pas" />
+    <DCCReference Include="Synapse\httpsend.pas" />
+    <DCCReference Include="Synapse\synacode.pas" />
+    <DCCReference Include="Synapse\synafpc.pas" />
+    <DCCReference Include="Synapse\synaip.pas" />
+    <DCCReference Include="Synapse\synautil.pas" />
+    <DCCReference Include="Synapse\synsock.pas" />
+    <DCCReference Include="uIPAsyncHttpServer.pas" />
+    <DCCReference Include="uIPAsyncSocket.pas" />
+    <DCCReference Include="uROIpSuperHttpServer.pas" />
+    <DCCReference Include="uROSynapseHTTPChannel.pas" />
+    <DCCReference Include="uROSynapseSuperHttpChannel.pas" />
+    <DCCReference Include="uROSynSCHelpers.pas" />
+    <DCCReference Include="uROSynServerSocket.pas" />
+    <DCCReference Include="uROSynSuperTCPCHannel.pas" />
+    <DCCReference Include="uROSynSuperTCPServer.pas" />
+	<DCCReference Include="uROIpHttpServer.pas" />
+	<DCCReference Include="uROIpTcpServer.pas" />
+    <DCCReference Include="vcl.dcp" />
+  </ItemGroup>
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D11.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D11.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D11.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D12.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D12.dpk
new file mode 100644
index 0000000..c00682e
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D12.dpk	
@@ -0,0 +1,56 @@
+package RemObjects_Synapse_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - Synapse based Channels'}
+{$IMPLICITBUILD OFF}
+{$DEFINE DESIGNTIME}
+
+requires
+  rtl,
+  vcl,
+  inet,
+  RemObjects_Core_D12;
+
+contains
+  RemObjects_Synapse_Reg in 'RemObjects_Synapse_Reg.pas',
+  uROSynapseHTTPChannel in 'uROSynapseHTTPChannel.pas',
+  synsock in 'Synapse\synsock.pas',
+  blcksock in 'Synapse\blcksock.pas',
+  httpsend in 'Synapse\httpsend.pas',
+  synacode in 'Synapse\synacode.pas',
+  synafpc in 'Synapse\synafpc.pas',
+  synaip in 'Synapse\synaip.pas',
+  synautil in 'Synapse\synautil.pas',
+  uIPAsyncSocket in 'uIPAsyncSocket.pas',
+  uIPAsyncHttpServer in 'uIPAsyncHttpServer.pas',
+  uROIpSuperHttpServer in 'uROIpSuperHttpServer.pas',
+  uROSynapseSuperHttpChannel in 'uROSynapseSuperHttpChannel.pas',
+  uROSynapseSCHelpers in 'uROSynapseSCHelpers.pas',
+  uROSynapseServerSocket in 'uROSynapseServerSocket.pas',
+  uROSynapseSuperTCPCHannel in 'uROSynapseSuperTCPCHannel.pas',
+  uROSynapseSuperTCPServer in 'uROSynapseSuperTCPServer.pas',
+  uROIpHttpServer in 'uROIpHttpServer.pas',
+  uROIpTcpServer in 'uROIpTcpServer.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D12.dproj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D12.dproj
new file mode 100644
index 0000000..64ea2a0
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D12.dproj	
@@ -0,0 +1,107 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{5c79699f-2653-4670-a29a-e5e2459651b1}</ProjectGuid>
+			<MainSource>RemObjects_Synapse_D12.dpk</MainSource>
+			<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+			<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+			<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+			<DCC_DependencyCheckOutputName>..\Dcu\D12\RemObjects_Synapse_D12.bpl</DCC_DependencyCheckOutputName>
+			<ProjectVersion>11.1</ProjectVersion>
+			<Config Condition="'$(Config)'==''">Base</Config>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base)'!=''">
+			<DCC_SymbolReferenceInfo>1</DCC_SymbolReferenceInfo>
+			<GenDll>true</GenDll>
+			<DCC_DcpOutput>..\Dcu\D12</DCC_DcpOutput>
+			<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+			<DCC_DcuOutput>..\Dcu\D12</DCC_DcuOutput>
+			<GenPackage>true</GenPackage>
+			<DCC_GenerateStackFrames>true</DCC_GenerateStackFrames>
+			<DesignOnlyPackage>false</DesignOnlyPackage>
+			<DCC_ImageBase>00400000</DCC_ImageBase>
+			<DCC_DependencyCheckOutputName>..\Dcu\D12\RemObjects_Synapse_D12.bpl</DCC_DependencyCheckOutputName>
+			<DCC_UnitSearchPath>..\Dcu\D12;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+			<DCC_Description>RemObjects SDK - Synapse based Channels</DCC_Description>
+			<DCC_Define>DESIGNTIME;$(DCC_Define)</DCC_Define>
+			<DCC_BplOutput>..\Dcu\D12</DCC_BplOutput>
+		</PropertyGroup>
+		<ItemGroup>
+			<DelphiCompile Include="RemObjects_Synapse_D12.dpk">
+				<MainSource>MainSource</MainSource>
+			</DelphiCompile>
+			<DCCReference Include="rtl.dcp"/>
+			<DCCReference Include="vcl.dcp"/>
+			<DCCReference Include="inet.dcp"/>
+			<DCCReference Include="RemObjects_Core_D12.dcp"/>
+			<DCCReference Include="RemObjects_Synapse_Reg.pas"/>
+			<DCCReference Include="uROSynapseHTTPChannel.pas"/>
+			<DCCReference Include="Synapse\synsock.pas"/>
+			<DCCReference Include="Synapse\blcksock.pas"/>
+			<DCCReference Include="Synapse\httpsend.pas"/>
+			<DCCReference Include="Synapse\synacode.pas"/>
+			<DCCReference Include="Synapse\synafpc.pas"/>
+			<DCCReference Include="Synapse\synaip.pas"/>
+			<DCCReference Include="Synapse\synautil.pas"/>
+			<DCCReference Include="uIPAsyncSocket.pas"/>
+			<DCCReference Include="uIPAsyncHttpServer.pas"/>
+			<DCCReference Include="uROIpSuperHttpServer.pas"/>
+			<DCCReference Include="uROSynapseSuperHttpChannel.pas"/>
+			<DCCReference Include="uROSynapseSCHelpers.pas"/>
+			<DCCReference Include="uROSynapseServerSocket.pas"/>
+			<DCCReference Include="uROSynapseSuperTCPCHannel.pas"/>
+			<DCCReference Include="uROSynapseSuperTCPServer.pas"/>
+			<DCCReference Include="uROIpHttpServer.pas"/>
+			<DCCReference Include="uROIpTcpServer.pas"/>
+			<BuildConfiguration Include="Base">
+				<Key>Base</Key>
+			</BuildConfiguration>
+		</ItemGroup>
+		<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+		<ProjectExtensions>
+			<Borland.Personality>Delphi.Personality.12</Borland.Personality>
+			<Borland.ProjectType>Package</Borland.ProjectType>
+			<BorlandProject>
+				<Delphi.Personality>
+					<Parameters>
+						<Parameters Name="UseLauncher">False</Parameters>
+						<Parameters Name="LoadAllSymbols">True</Parameters>
+						<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+					</Parameters>
+					<VersionInfo>
+						<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+						<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+						<VersionInfo Name="MajorVer">3</VersionInfo>
+						<VersionInfo Name="MinorVer">0</VersionInfo>
+						<VersionInfo Name="Release">0</VersionInfo>
+						<VersionInfo Name="Build">257</VersionInfo>
+						<VersionInfo Name="Debug">False</VersionInfo>
+						<VersionInfo Name="PreRelease">False</VersionInfo>
+						<VersionInfo Name="Special">False</VersionInfo>
+						<VersionInfo Name="Private">False</VersionInfo>
+						<VersionInfo Name="DLL">False</VersionInfo>
+						<VersionInfo Name="Locale">1033</VersionInfo>
+						<VersionInfo Name="CodePage">1252</VersionInfo>
+					</VersionInfo>
+					<VersionInfoKeys>
+						<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="FileDescription">ROServiceTester</VersionInfoKeys>
+						<VersionInfoKeys Name="FileVersion">3.0.0.257</VersionInfoKeys>
+						<VersionInfoKeys Name="InternalName">ROServiceTester</VersionInfoKeys>
+						<VersionInfoKeys Name="LegalCopyright">Copyright RemObjects Software 2002</VersionInfoKeys>
+						<VersionInfoKeys Name="LegalTrademarks">RemObjects Software 2002</VersionInfoKeys>
+						<VersionInfoKeys Name="OriginalFilename">ROServiceTester.exe</VersionInfoKeys>
+						<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+						<VersionInfoKeys Name="ProductVersion">3.0.0.0</VersionInfoKeys>
+						<VersionInfoKeys Name="Compile Date">Sunday, March 21, 2004 5:55 PM</VersionInfoKeys>
+					</VersionInfoKeys>
+					<Source>
+						<Source Name="MainSource">RemObjects_Synapse_D12.dpk</Source>
+					</Source>
+				</Delphi.Personality>
+			</BorlandProject>
+			<ProjectFileVersion>12</ProjectFileVersion>
+		</ProjectExtensions>
+	</Project>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D12.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D12.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D12.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D5.dof b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D5.dof
new file mode 100644
index 0000000..b4be9d9
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D5.dof	
@@ -0,0 +1,131 @@
+[FileVersion]
+Version=7.0
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=1
+SymbolLibrary=1
+SymbolPlatform=1
+UnitLibrary=1
+UnitPlatform=1
+UnitDeprecated=1
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects SDK - Synapse based Channels
+[Directories]
+OutputDir=..\Dcu\D5
+UnitOutputDir=..\Dcu\D5
+PackageDLLOutputDir=..\Dcu\D5
+PackageDCPOutputDir=..\Dcu\D5
+SearchPath=..\Dcu\D5
+Conditionals=DESIGNTIME
+DebugSourceDirs=
+UsePackages=0
+[Parameters]
+RunParams=
+HostApplication=
+Launcher=
+UseLauncher=0
+DebugCWD=
+[Version Info]
+IncludeVerInfo=1
+AutoIncBuild=0
+MajorVer=3
+MinorVer=0
+Release=0
+Build=257
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=ROServiceTester
+FileVersion=3.0.0.257
+InternalName=ROServiceTester
+LegalCopyright=Copyright RemObjects Software 2002
+LegalTrademarks=RemObjects Software 2002
+OriginalFilename=ROServiceTester.exe
+ProductName=RemObjects SDK
+ProductVersion=3.0.0.0
+Compile Date=Sunday, March 21, 2004 5:55 PM
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D5.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D5.dpk
new file mode 100644
index 0000000..8f718f2
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D5.dpk	
@@ -0,0 +1,54 @@
+package RemObjects_Synapse_D5;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - Synapse based Channels'}
+{$IMPLICITBUILD OFF}
+{$DEFINE DESIGNTIME}
+
+requires
+  vcl50,
+  RemObjects_Core_D5;
+
+contains
+  RemObjects_Synapse_Reg in 'RemObjects_Synapse_Reg.pas',
+  uROSynapseHTTPChannel in 'uROSynapseHTTPChannel.pas',
+  synsock in 'Synapse\synsock.pas',
+  blcksock in 'Synapse\blcksock.pas',
+  httpsend in 'Synapse\httpsend.pas',
+  synacode in 'Synapse\synacode.pas',
+  synafpc in 'Synapse\synafpc.pas',
+  synaip in 'Synapse\synaip.pas',
+  synautil in 'Synapse\synautil.pas',
+  uIPAsyncSocket in 'uIPAsyncSocket.pas',
+  uIPAsyncHttpServer in 'uIPAsyncHttpServer.pas',
+  uROIpSuperHttpServer in  'uROIpSuperHttpServer.pas',  
+  uROSynapseSuperHttpChannel in 'uROSynapseSuperHttpChannel.pas',
+  uROSynapseSCHelpers in 'uROSynapseSCHelpers.pas',
+  uROSynapseServerSocket in 'uROSynapseServerSocket.pas',
+  uROSynapseSuperTCPChannel in 'uROSynapseSuperTCPCHannel.pas',
+  uROSynapseSuperTCPServer in 'uROSynapseSuperTCPServer.pas',
+  uROIpHttpServer in 'uROIpHttpServer.pas', 
+  uROIpTcpServer in 'uROIpTcpServer.pas';  
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D5.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D5.res
new file mode 100644
index 0000000..fff68a1
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D5.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D6.dof b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D6.dof
new file mode 100644
index 0000000..ca66914
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D6.dof	
@@ -0,0 +1,132 @@
+[FileVersion]
+Version=6.0
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=1
+SymbolLibrary=1
+SymbolPlatform=1
+UnitLibrary=1
+UnitPlatform=1
+UnitDeprecated=1
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects SDK - Synapse based Channels
+[Directories]
+OutputDir=..\Dcu\D6
+UnitOutputDir=..\Dcu\D6
+PackageDLLOutputDir=..\Dcu\D6
+PackageDCPOutputDir=..\Dcu\D6
+SearchPath=..\Dcu\D6
+Packages=
+Conditionals=DESIGNTIME
+DebugSourceDirs=
+UsePackages=0
+[Parameters]
+RunParams=
+HostApplication=
+Launcher=
+UseLauncher=0
+DebugCWD=
+[Version Info]
+IncludeVerInfo=1
+AutoIncBuild=0
+MajorVer=3
+MinorVer=0
+Release=0
+Build=257
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=ROServiceTester
+FileVersion=3.0.0.257
+InternalName=ROServiceTester
+LegalCopyright=Copyright RemObjects Software 2002
+LegalTrademarks=RemObjects Software 2002
+OriginalFilename=ROServiceTester.exe
+ProductName=RemObjects SDK
+ProductVersion=3.0.0.0
+Compile Date=Sunday, March 21, 2004 5:55 PM
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D6.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D6.dpk
new file mode 100644
index 0000000..ccf8471
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D6.dpk	
@@ -0,0 +1,56 @@
+package RemObjects_Synapse_D6;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - Synapse based Channels'}
+{$IMPLICITBUILD OFF}
+{$DEFINE DESIGNTIME}
+
+requires
+  rtl,
+  vcl,
+  inet,
+  RemObjects_Core_D6;
+
+contains
+  RemObjects_Synapse_Reg in 'RemObjects_Synapse_Reg.pas',
+  uROSynapseHTTPChannel in 'uROSynapseHTTPChannel.pas',
+  synsock in 'Synapse\synsock.pas',
+  blcksock in 'Synapse\blcksock.pas',
+  httpsend in 'Synapse\httpsend.pas',
+  synacode in 'Synapse\synacode.pas',
+  synafpc in 'Synapse\synafpc.pas',
+  synaip in 'Synapse\synaip.pas',
+  synautil in 'Synapse\synautil.pas',
+  uIPAsyncSocket in 'uIPAsyncSocket.pas',
+  uIPAsyncHttpServer in 'uIPAsyncHttpServer.pas',
+  uROIpSuperHttpServer in  'uROIpSuperHttpServer.pas',  
+  uROSynapseSuperHttpChannel in 'uROSynapseSuperHttpChannel.pas',
+  uROSynapseSCHelpers in 'uROSynapseSCHelpers.pas',
+  uROSynapseServerSocket in 'uROSynapseServerSocket.pas',
+  uROSynapseSuperTCPChannel in 'uROSynapseSuperTCPCHannel.pas',
+  uROSynapseSuperTCPServer in 'uROSynapseSuperTCPServer.pas',
+  uROIpHttpServer in 'uROIpHttpServer.pas', 
+  uROIpTcpServer in 'uROIpTcpServer.pas';  
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D6.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D6.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D6.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D7.dof b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D7.dof
new file mode 100644
index 0000000..f7aba1c
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D7.dof	
@@ -0,0 +1,136 @@
+[FileVersion]
+Version=7.0
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=1
+SymbolLibrary=1
+SymbolPlatform=1
+UnitLibrary=1
+UnitPlatform=1
+UnitDeprecated=1
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects SDK - Synapse based Channels
+[Directories]
+OutputDir=..\Dcu\D7
+UnitOutputDir=..\Dcu\D7
+PackageDLLOutputDir=..\Dcu\D7
+PackageDCPOutputDir=..\Dcu\D7
+SearchPath=..\Dcu\D7
+Packages=
+Conditionals=DESIGNTIME
+DebugSourceDirs=
+UsePackages=0
+[Parameters]
+RunParams=
+HostApplication=
+Launcher=
+UseLauncher=0
+DebugCWD=
+[Language]
+ActiveLang=
+ProjectLang=
+RootDir=
+[Version Info]
+IncludeVerInfo=1
+AutoIncBuild=0
+MajorVer=3
+MinorVer=0
+Release=0
+Build=257
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=ROServiceTester
+FileVersion=3.0.0.257
+InternalName=ROServiceTester
+LegalCopyright=Copyright RemObjects Software 2002
+LegalTrademarks=RemObjects Software 2002
+OriginalFilename=ROServiceTester.exe
+ProductName=RemObjects SDK
+ProductVersion=3.0.0.0
+Compile Date=Sunday, March 21, 2004 5:55 PM
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D7.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D7.dpk
new file mode 100644
index 0000000..517d048
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D7.dpk	
@@ -0,0 +1,56 @@
+package RemObjects_Synapse_D7;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES ON}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - Synapse based Channels'}
+{$IMPLICITBUILD OFF}
+{$DEFINE DESIGNTIME}
+
+requires
+  rtl,
+  vcl,
+  inet,
+  RemObjects_Core_D7;
+
+contains
+  RemObjects_Synapse_Reg in 'RemObjects_Synapse_Reg.pas',
+  uROSynapseHTTPChannel in 'uROSynapseHTTPChannel.pas',
+  synsock in 'Synapse\synsock.pas',
+  blcksock in 'Synapse\blcksock.pas',
+  httpsend in 'Synapse\httpsend.pas',
+  synacode in 'Synapse\synacode.pas',
+  synafpc in 'Synapse\synafpc.pas',
+  synaip in 'Synapse\synaip.pas',
+  synautil in 'Synapse\synautil.pas',
+  uIPAsyncSocket in 'uIPAsyncSocket.pas',
+  uIPAsyncHttpServer in 'uIPAsyncHttpServer.pas',
+  uROIpSuperHttpServer in 'uROIpSuperHttpServer.pas',
+  uROSynapseSuperHttpChannel in 'uROSynapseSuperHttpChannel.pas',
+  uROSynapseSCHelpers in 'uROSynapseSCHelpers.pas',
+  uROSynapseServerSocket in 'uROSynapseServerSocket.pas',
+  uROSynapseSuperTCPChannel in 'uROSynapseSuperTCPCHannel.pas',
+  uROSynapseSuperTCPServer in 'uROSynapseSuperTCPServer.pas',
+  uROIpHttpServer in 'uROIpHttpServer.pas', 
+  uROIpTcpServer in 'uROIpTcpServer.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D7.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D7.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_D7.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_Glyphs.lrs b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_Glyphs.lrs
new file mode 100644
index 0000000..e499939
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_Glyphs.lrs	
@@ -0,0 +1,511 @@
+LazarusResources.Add('TROSYNAPSEHTTPCHANNEL','BMP',[
+  'BM'#246#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#192#6#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#255#0#255#153'c@'#149'^<'#153'c@'#146']Hmk?H'#146'>'#255
+  +#0#255#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@@@'#185
+  +'x='#185'x='#173'e'''#171'P'#20'jb'#30'$'#137'!1'#153'1@'#157'?@'#157'?'#255
+  +#0#255#255#0#255'@'#0#192#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255'@'#0#192
+  +'@@@'#231#129#22#227'm'#3#224']'#0#144'Z'#0#2'h'#0#0'k'#0#0'l'#0#15#134#15'@'
+  +#139'5H'#146'>'#255#0#255'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192
+  +#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192
+  +'@@@'#252#134#15#237#135#15#186'~'#7'R~'#2#18'z'#1#9'n'#0#0'l'#0#0'p'#0#5's'
+  +#4#151'6'#1#255#0#255'@'#0#192#255#255#255'@'#0#192'@'#0#192#255#255#255#255
+  +#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@'
+  +#207#146'#`'#137#14'l'#143#22#217#146'#'#255#135#22#186'~'#7'>x'#0#17'w'#0#28
+  +'['#1'lB'#22#136'2'#7'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255
+  +#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@:'
+  +#151#26'E'#153'"'#255#170'P'#255#161'B'#251#153'1'#255#140#28#255#128#9#237
+  +'n'#1#194'P'#4#144'8'#11#145'9'#12'@'#0#192#255#255#255'@'#0#192'@'#0#192'@'
+  +#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0
+  +#192'@@@'#22#166'%'#172#177'Q'#255#188'{'#251#177'_'#251#166'H'#251#153'1'
+  +#255#138#25#255'{'#4#224'e'#2#171'P'#20#150'='#14'@'#0#192#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255'@'#0#192'@@@;'#189'H'#194'a'#215#201#134#239
+  +#192'{'#251#177'_'#246#163'C'#240#147'&'#251#132#12#215'r'#2'tb'#3'lB'#22'@'
+  +#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'~'#204'kl'#215'sl'#215'sn'#203'g'#194'av'
+  +#173'Dh'#156'('#185#149'&'#255#135#22#168'z'#3#13#131#0'#c'#5'422'#168#162
+  +#167'}st'#254#150#18#254#145#12#254#150#18#254#150#18#254#150#18#254#150#18
+  +#254#150#18#169'~H'#192#191'ju'#218'{'#156#238#158#156#238#158'i'#213'oA'#189
+  +'H'#22#166'%'#26#152#23#185#149'&'#255#137#28#168'z'#3#13#131#0#2'}'#0':77'
+  +#165#164#165'opp'#254#150#18#254#150#18#254#150#18#254#150#18#254#162'!'#254
+  +#162'!'#254#162'!'#254#162'!\'#191'Ux'#219'|'#165#241#165#165#241#165'u'#218
+  +'{O'#193'Q%'#168')R'#156'$'#242#154'3'#255#135#22't~'#2#2#129#0#255#0#255'42'
+  +'2'#178#176#178'xux'#254#150#18#254#158#28#254#162'!'#255#172'0'#255#172'0'
+  +#255#172'0'#255#176'6'#255#172'0BqCh'#207'h'#129#221#130#129#221#130'e'#206
+  +'fD'#186'E'#28#163'#:'#151#26#217#146'#'#255#132#18'R~'#2#2#129#0#255#0#255
+  +'989'#182#176#181'}st'#254#162'!'#255#172'0'#255#172'0'#255#180'<'#255#186'D'
+  +#255#186'D'#255#186'D'#255#186'D'#255#180'<F'#134'FV'#197'WV'#197'WI'#188'I2'
+  +#172'3'#12#153#22'#'#139#12#206#139#24#255'~'#10#255'~'#10#255#0#255#255#0
+  +#255'989'#182#176#181'xux'#255#172'0'#255#172'0'#255#186'D'#255#191'M'#255
+  +#196'U'#255#196'U'#255#199'\'#255#196'U'#255#192'M'#255#186'DBqC.q0%'#168')'
+  +#26#152#23#6#139#8'`'#137#14#244#132#16#255#0#255#255#0#255#255#0#255#255#0
+  +#255'989'#188#185#189'opp'#255#176'6'#255#186'D'#255#196'U'#255#199'\'#255
+  +#205'e'#255#208'j'#255#205'e'#255#205'e'#255#199'\'#255#196'U'#255#186'D'#255
+  +#180'<'#255#172'0'#137'h8*%%'#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255'A<<'#184#183#184'opp'#255#186'D'#255#196'U'#255#199'\'#255#208
+  +'j'#255#215't'#255#216'v'#255#217'x'#255#216'v'#255#208'j'#255#205'e'#255#196
+  +'U'#255#186'D'#255#172'0'#130'kM*%%'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255'989'#188#185#189'opp'#255#186'D'#255#201']'#255#208'j'
+  +#255#216'v'#255#221#129#254#226#136#254#226#136#255#221#129#255#217'x'#255
+  +#208'j'#255#199'\'#255#192'M'#255#180'<'#130'kM*%%'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255'A<<'#182#176#181'vtv'#255#196'U'#255#201
+  +']'#255#216'v'#255#217'x'#254#230#144#254#234#152#254#234#152#254#230#144#255
+  +#221#129#255#216'v'#255#205'e'#255#196'U'#255#186'D'#130'kM*%%'#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255'989'#184#183#184'opp'#255#196
+  +'U'#255#205'e'#255#216'v'#255#221#129#254#234#152#254#242#166#254#243#169#254
+  +#234#152#254#226#136#255#216'v'#255#205'e'#255#196'U'#255#186'D'#134'oS*%%'
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'A<<'#182#176#181
+  +'vtv'#201#161'W'#189#154'Q'#238#201'n'#254#226#136#254#234#150#254#242#166
+  +#254#243#169#254#234#152#254#226#136#255#216'v'#255#208'j'#255#196'U'#255#186
+  +'D'#137'tW*%%'#255#0#255#255#0#255#0#0#0#0#0#0#0#0#0#255#0#255'989'#184#183
+  +#184'nmnnmnoppoppa]]'#135#130'u'#130'~m'#167#160#129#163#152'r'#203#181'y'
+  +#197#167'b'#238#192'^'#255#196'U'#255#186'D'#142'w[*%%'#255#0#255#255#0#255
+  ,#255#0#255#255#0#255#255#0#255#0#0#0'A<<------'#212#209#213#196#196#197#173
+  +#172#173#160#160#163#141#137#140#141#137#140'xux}}~oppxuxxuxddd'#135't`}st*%'
+  +'%'#255#0#255#255#0#255#255#0#255#0#0#0#0#0#0#255#0#255#255#0#255'HJKHJK'#30
+  +#30#30'422788FFFZVWnmnopp'#144#141#145#128#128#128#161#154#160#144#141#145
+  +#139#131#137#132'yzZST*%%'#255#0#255#255#0#255#0#0#0#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255'HJKHJKHJKHJKHJK'#30#30#30'111----------'
+  +'--989422111'#255#0#255#255#0#255#255#0#255#255#0#255#0#0#0#0#0#0#0#0#0
+]);
+LazarusResources.Add('TROSYNAPSESUPERHTTPCHANNEL','BMP',[
+  'BM'#248#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#194#6#0#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#255#0#255#153'c@'#149'^<'#153'c@'#146']Hmk?H'#146'>'#255
+  +#0#255#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@@@'#185
+  +'x='#185'x='#173'e'''#171'P'#20'jb'#30'$'#137'!1'#153'1@'#157'?@'#157'?'#255
+  +#0#255#255#0#255'@'#0#192#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255'@'#0#192
+  +'@@@'#231#129#22#227'm'#3#224']'#0#144'Z'#0#2'h'#0#0'k'#0#0'l'#0#15#134#15'@'
+  +#139'5H'#146'>'#255#0#255'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192
+  +#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192
+  +'@@@'#252#134#15#237#135#15#186'~'#7'R~'#2#18'z'#1#9'n'#0#0'l'#0#0'p'#0#5's'
+  +#4#151'6'#1#255#0#255'@'#0#192#255#255#255'@'#0#192'@'#0#192#255#255#255#255
+  +#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@'
+  +#207#146'#`'#137#14'l'#143#22#217#146'#'#255#135#22#186'~'#7'>x'#0#17'w'#0#28
+  +'['#1'lB'#22#136'2'#7'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255
+  +#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@:'
+  +#151#26'E'#153'"'#255#170'P'#255#161'B'#251#153'1'#255#140#28#255#128#9#237
+  +'n'#1#194'P'#4#144'8'#11#145'9'#12'@'#0#192#255#255#255'@'#0#192'@'#0#192'@'
+  +#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0
+  +#192'@@@'#22#166'%'#172#177'Q'#255#188'{'#0#0''#3#24#221#1#9#172#255#138#25
+  +#255'{'#4#224'e'#2#171'P'#20#150'='#14'@'#0#192#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255'@'#0#192'@@@;'#189'H'#4#3''#215#201#134#0#0''#20'7'#255#4
+  +#17#188#240#147'&'#28#26#144#28#26#144'tb'#3'lB'#22'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'~'#204'k'#4#8#150'$<'#221#7#8#140#0#0''#28'?'#255#6#19#188#6#6#132
+  +#3#20#204#1#10#172#28#26#144'#c'#5'422'#168#162#167'}st'#254#150#18#254#145
+  +#12#254#150#18#254#150#18#254#150#18#254#150#18#254#150#18#169'~H'#192#191'j'
+  +'u'#218'{'#5#9#150'Wr'#247'8P'#230#0#1#135'(J'#255#8#22#188#9#27#204#19'6'
+  +#255#3#20#204#28#25#143#2'}'#0':77'#165#164#165'opp'#254#150#18#254#150#18
+  +#254#150#18#254#150#18#254#162'!'#254#162'!'#254#162'!'#254#162'!\'#191'Ux'
+  +#219'|'#165#241#165#5#9#150'Zu'#247'<V'#238'9Z'#255'#D'#247',N'#255#9#27#204
+  +#6#6#132#2#129#0#255#0#255'422'#178#176#178'xux'#254#150#18#254#158#28#254
+  +#162'!'#255#172'0'#255#172'0'#255#172'0'#255#176'6'#255#172'0BqC'#4#3''#4#3
+  +'%1'#188'.D'#221'n'#137#255'd'#128#255'Qp'#255'''F'#247#10#24#188#6#20#188#3
+  +#16#188#0#0'989'#182#176#181'}st'#254#162'!'#255#172'0'#255#172'0'#255#180
+  +'<'#255#186'D'#255#186'D'#255#186'D'#255#186'D'#255#180'<'#4#3''#151#171#255
+  +#137#159#255'z'#147#255#130#153#255'x'#145#255'g'#130#255'@`'#255'1S'#255'#F'
+  +#255#17'4'#255#0#0'989'#182#176#181'xux'#255#172'0'#255#172'0'#255#186'D'
+  +#255#191'M'#255#196'U'#255#196'U'#255#199'\'#255#196'U'#255#192'M'#0#0''#0#0
+  +''#0#0'EU'#213#157#176#255#132#156#255'u'#143#255'D^'#238#1#1#135#0#0''#0
+  +#0''#28#24#140'989'#188#185#189'opp'#255#176'6'#255#186'D'#255#196'U'#255
+  +#199'\'#255#205'e'#255#208'j'#255#205'e'#255#205'e'#255#199'\'#255#196'U'#255
+  +#186'DP['#204#192#204#255'BP'#204#129#153#255'3E'#213'f'#247'D['#230#8#9#139
+  +#255#0#255#255#0#255'A<<'#184#183#184'opp'#255#186'D'#255#196'U'#255#199'\'
+  +#255#208'j'#255#215't'#255#216'v'#255#217'x'#255#216'v'#255#208'j'#255#205'e'
+  +#4#3''#220#227#255'R\'#204#0#0''#146#167#255'+5'#188#7#11#150'i'#129#247'5'
+  +'K'#221#6#6#131#255#0#255'989'#188#185#189'opp'#255#186'D'#255#201']'#255#208
+  +'j'#255#216'v'#255#221#129#254#226#136#254#226#136#255#221#129#255#217'x'#255
+  +#208'j'#4#3',1'#172#28#24#139#0#0''#163#181#255'1;'#188#28#24#139#8#12#150
+  +#7#11#150#255#0#255#255#0#255'A<<'#182#176#181'vtv'#255#196'U'#255#201']'#255
+  +#216'v'#255#217'x'#254#230#144#254#234#152#254#234#152#254#230#144#255#221
+  +#129#255#216'v'#255#205'e'#255#196'U'#255#186'D'#0#0''#178#194#255'7A'#188
+  +#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'989'#184#183#184'opp'#255
+  +#196'U'#255#205'e'#255#216'v'#255#221#129#254#234#152#254#242#166#254#243#169
+  +#254#234#152#254#226#136#255#216'v'#255#205'e'#255#196'U'#255#186'D'#6#5#131
+  +#16#21#157#6#8#142#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'A<<'#182
+  +#176#181'vtv'#201#161'W'#189#154'Q'#238#201'n'#254#226#136#254#234#150#254
+  +#242#166#254#243#169#254#234#152#254#226#136#255#216'v'#255#208'j'#255#196'U'
+  +#255#186'D'#137'tW*%%'#255#0#255#255#0#255#0#0#0#0#0#0#0#0#0#255#0#255'989'
+  +#184#183#184'nmnnmnoppoppa]]'#135#130'u'#130'~m'#167#160#129#163#152'r'#203
+  +#181'y'#197#167'b'#238#192'^'#255#196'U'#255#186'D'#142'w[*%%'#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#0#0#0'A<<------'#212#209#213#196#196#197
+  ,#173#172#173#160#160#163#141#137#140#141#137#140'xux}}~oppxuxxuxddd'#135't`}'
+  +'st*%%'#255#0#255#255#0#255#255#0#255#0#0#0#0#0#0#255#0#255#255#0#255'HJKHJK'
+  +#30#30#30'422788FFFZVWnmnopp'#144#141#145#128#128#128#161#154#160#144#141#145
+  +#139#131#137#132'yzZST*%%'#255#0#255#255#0#255#0#0#0#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255'HJKHJKHJKHJKHJK'#30#30#30'111----------'
+  +'--989422111'#255#0#255#255#0#255#255#0#255#255#0#255#0#0#0#0#0#0#0#0#0#0#0
+]);
+LazarusResources.Add('TROSYNAPSESUPERTCPCHANNEL','BMP',[
+  'BM'#248#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#194#6#0#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#0#0#0#0#0#0#0#0#0#255#0#255'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@@@'#30#30#30#30#30#30#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#0#0#0'@'#0#192#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255'@'#0#192'@@@'#132'yzFFF'#30#30#30#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#0#0#0#0#0#0#255#0#255'@'#0#192#255#255#255'@'#0#192#255#255
+  +#255'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255
+  +#255'@'#0#192'@@@'#132'yz'#132'yz'#30#30#30#255#0#255#255#0#255#255#0#255#255
+  +#0#255#0#0#0#255#0#255#255#0#255#255#0#255'@'#0#192#255#255#255'@'#0#192'@'#0
+  +#192#255#255#255#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255
+  +#255#255'@'#0#192'@@@'#132'yzZST---'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#0#0#0#0#0#0#0#0#0'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0
+  +#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0
+  +#192'@@@FFF---'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255'@'#0#192#255#255#255'@'#0#192'@'#0#192'@'#0
+  +#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0
+  +#192'@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255'@'#0#192'@@@'#30#30#30#30#30#30#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192
+  +'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192#144#133#136'tlnFFF'#30#30#30#30#30#30#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'422'#168#162#167'}st'
+  +#254#150#18#254#145#12#254#150#18#254#150#18#254#150#18#254#150#18#254#150#18
+  +#254#171'9'#234#181'h'#215#186#147#182#176#181#156#146#147#136'}~111'#30#30
+  +#30#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255':77'#165#164
+  +#165'opp'#254#150#18#254#150#18#254#150#18#254#150#18#254#162'!'#254#162'!'
+  +#254#162'!'#254#162'!'#254#153#22#254#153#22#254#150#18#227#153'5'#201#150'U'
+  +#147'~m422'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'422'
+  +#178#176#178'xux'#254#150#18#254#158#28#254#162'!'#255#172'0'#255#172'0'#255
+  +#172'0'#255#176'6'#255#172'0'#255#172'0'#254#162'!'#254#162'!'#254#150#18#254
+  +#150#18#0#0''#3#24#221#1#9#172#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255'989'#182#176#181'}st'#254#162'!'#255#172'0'#255#172'0'#255#180'<'#255
+  +#186'D'#255#186'D'#255#186'D'#255#186'D'#255#180'<'#255#172'0'#255#172'0'#4#3
+  +''#254#150#18#0#0''#20'7'#255#4#17#188#255#0#255#28#26#144#28#26#144#255#0
+  +#255#255#0#255'989'#182#176#181'xux'#255#172'0'#255#172'0'#255#186'D'#255#191
+  +'M'#255#196'U'#255#196'U'#255#199'\'#255#196'U'#255#192'M'#255#186'D'#4#8#150
+  +'$<'#221#7#8#140#0#0''#28'?'#255#6#19#188#6#6#132#3#20#204#1#10#172#28#26
+  +#144#255#0#255'989'#188#185#189'opp'#255#176'6'#255#186'D'#255#196'U'#255#199
+  +'\'#255#205'e'#255#208'j'#255#205'e'#255#205'e'#255#199'\'#255#196'U'#5#9#150
+  +'Wr'#247'8P'#230#0#1#135'(J'#255#8#22#188#9#27#204#19'6'#255#3#20#204#28#25
+  +#143#255#0#255'A<<'#184#183#184'opp'#255#186'D'#255#196'U'#255#199'\'#255#208
+  +'j'#255#215't'#255#216'v'#255#217'x'#255#216'v'#255#208'j'#255#205'e'#255#196
+  +'U'#5#9#150'Zu'#247'<V'#238'9Z'#255'#D'#247',N'#255#9#27#204#6#6#132#255#0
+  +#255#255#0#255'989'#188#185#189'opp'#255#186'D'#255#201']'#255#208'j'#255#216
+  +'v'#255#221#129#254#226#136#254#226#136#255#221#129#255#217'x'#4#3''#4#3'%'
+  +'1'#188'.D'#221'n'#137#255'd'#128#255'Qp'#255'''F'#247#10#24#188#6#20#188#3
+  +#16#188#0#0'A<<'#182#176#181'vtv'#255#196'U'#255#201']'#255#216'v'#255#217
+  +'x'#254#230#144#254#234#152#254#234#152#254#230#144#255#221#129#4#3''#151
+  +#171#255#137#159#255'z'#147#255#130#153#255'x'#145#255'g'#130#255'@`'#255'1S'
+  +#255'#F'#255#17'4'#255#0#0'989'#184#183#184'opp'#255#196'U'#255#205'e'#255
+  +#216'v'#255#221#129#254#234#152#254#242#166#254#243#169#254#234#152#254#226
+  +#136#0#0''#0#0''#0#0'EU'#213#157#176#255#132#156#255'u'#143#255'D^'#238#1
+  +#1#135#0#0''#0#0''#28#24#140'A<<'#182#176#181'vtv'#201#161'W'#189#154'Q'
+  +#238#201'n'#254#226#136#254#234#150#254#242#166#254#243#169#254#234#152#254
+  +#226#136#255#216'v'#255#208'jP['#204#192#204#255'BP'#204#129#153#255'3E'#213
+  +'f'#247'D['#230#8#9#139#255#0#255#255#0#255'989'#184#183#184'nmnnmnoppoppa]'
+  +']'#135#130'u'#130'~m'#167#160#129#163#152'r'#203#181'y'#197#167'b'#4#3''
+  +#220#227#255'R\'#204#0#0''#146#167#255'+5'#188#7#11#150'i'#129#247'5K'#221#6
+  ,#6#131#255#0#255'A<<------'#212#209#213#196#196#197#173#172#173#160#160#163
+  +#141#137#140#141#137#140'xux}}~oppxux'#4#3',1'#172#28#24#139#0#0''#163#181
+  +#255'1;'#188#28#24#139#8#12#150#7#11#150#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#30#30#30'422788FFFZVWnmnopp'#144#141#145#128#128#128#161#154
+  +#160#144#141#145#139#131#137#132'yz'#0#0''#178#194#255'7A'#188#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#30#30#30'111------------989422'#6#5
+  +#131#16#21#157#6#8#142#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0#0
+]);
+LazarusResources.Add('TROSYNAPSESUPERTCPSERVER','BMP',[
+  'BM'#248#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#194#6#0#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#0#0#0#0#0#0#0#0#0#255#0#255'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@@@'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#0#0#0'@'#0#192#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255'@'#0#192'@@@HJKHJKHJK'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#0#0#0#0#0#0#255#0#255'@'#0#192#255#255#255'@'#0#192#255#255#255'@'
+  +#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0
+  +#192'@@@{{{'#147#147#147'III'#255#0#255#255#0#255#255#0#255#255#0#255#0#0#0
+  +#255#0#255#255#0#255#255#0#255'@'#0#192#255#255#255'@'#0#192'@'#0#192#255#255
+  +#255#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0
+  +#192'@@@{{{'#147#147#147'III'#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#0#0#0#0#0#0#0#0#0'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255
+  +#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@{'
+  +'{{'#147#147#147'III'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255'@'#0#192#255#255#255'@'#0#192'@'#0#192'@'#0#192#255
+  +#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@@@{'
+  +'{{'#147#147#147'III'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255'@'#0#192#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +'@'#0#192'@@@{{{'#147#147#147'III'#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'{{{'
+  +'{{{'#147#147#147'III'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255'HJK'#196#189#194#192#186#192#189#183#189#189#183
+  +#189'HJK'#217#215#218'HJK{{{{{{{{{{{{{{{{{{'#147#147#147'III'#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#198#193
+  +#198#194#189#194#192#186#192#189#183#189'HJK'#222#221#225'HJK{{{{{{{{{{{{{{{'
+  +'{{{'#147#147#147'HJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255'HJK'#203#197#203#198#192#198#194#188#194#192#186
+  +#192'HJK'#227#226#230'HJK{{{{{{{{{{{{{{{{{{'#147#147#147'HJK'#0#0''#3#24#221
+  +#1#9#172#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#206#202#206
+  +#202#197#202#198#193#198#196#188#196'HJK'#231#230#234'HJK{{{{{{{{{{{{{{{{{{'
+  +#4#3'HJK'#0#0''#20'7'#255#4#17#188#255#0#255#28#26#144#28#26#144#255#0#255
+  +#255#0#255'HJK'#212#208#212#207#202#207#203#197#202#198#192#198'HJK'#235#234
+  +#237'HJK'#134#134#134#134#134#134#134#134#134#146#146#146'{{{'#4#8#150'$<'
+  +#221#7#8#140#0#0''#28'?'#255#6#19#188#6#6#132#3#20#204#1#10#172#28#26#144
+  +#255#0#255'HJK'#217#213#216#212#208#212#207#202#207#203#197#202'HJK'#237#237
+  +#239'HJK{{{{{{{{{ooo'#134#134#134#5#9#150'Wr'#247'8P'#230#0#1#135'(J'#255#8
+  +#22#188#9#27#204#19'6'#255#3#20#204#28#25#143#255#0#255'HJK'#222#218#221#217
+  +#213#217#233#231#234#207#202#207'HJK'#238#237#240'HJK'#140#140#140#140#140
+  +#140#146#146#146'{{{{{{{{{'#5#9#150'Zu'#247'<V'#238'9Z'#255'#D'#247',N'#255#9
+  +#27#204#6#6#132#255#0#255#255#0#255'HJK'#227#224#227#238#237#238#156#154#156
+  +#211#207#211'HJK'#237#237#239'HJKTVWcddnnn'#140#140#140#4#3''#4#3'%1'#188
+  +'.D'#221'n'#137#255'd'#128#255'Qp'#255'''F'#247#10#24#188#6#20#188#3#16#188#0
+  +#0'HJK'#231#230#231#144#144#146#158#157#158#216#212#216'HJK'#206#207#208#207
+  +#207#207#134#135#135'ceeNPQMOP'#4#3''#151#171#255#137#159#255'z'#147#255#130
+  +#153#255'x'#145#255'g'#130#255'@`'#255'1S'#255'#F'#255#17'4'#255#0#0'HJK'
+  +#237#235#237#146#146#147#227#224#226#255#255#255#176#176#178'QRSUVWuvw'#169
+  +#170#170#211#211#212#189#189#191#0#0''#0#0''#0#0'EU'#213#157#176#255#132
+  +#156#255'u'#143#255'D^'#238#1#1#135#0#0''#0#0''#28#24#140'HJK'#240#240#242
+  +#237#235#237#255#255#255#233#233#235#226#225#229#220#217#221#191#187#191#151
+  +#149#152'onrXYZNPQhij'#147#149#150'P['#204#192#204#255'BP'#204#129#153#255'3'
+  +'E'#213'f'#247'D['#230#8#9#139#255#0#255#255#0#255'HJK'#246#246#246#255#255
+  +#255#238#238#240#242#242#244#238#237#239#229#227#231#217#215#218#203#199#204
+  +#189#183#189#173#167#173#153#145#151#153#145#151#4#3''#220#227#255'R\'#204#0
+  +#0''#146#167#255'+5'#188#7#11#150'i'#129#247'5K'#221#6#6#131#255#0#255'HJK'
+  +#255#255#255#237#237#239#248#248#250#251#251#252#246#244#247#234#234#237#221
+  +#220#224#207#204#208#192#187#193#176#170#176#160#152#158'HJK'#4#3',1'#172#28
+  +#24#139#0#0''#163#181#255'1;'#188#28#24#139#8#12#150#7#11#150#255#0#255#255
+  +#0#255#255#0#255'HJKHJK'#233#233#234#252#252#252#246#246#247#235#234#238#222
+  ,#220#224#208#204#208#193#187#193'HJKHJK'#255#0#255#255#0#255#255#0#255#255#0
+  +#255#0#0''#178#194#255'7A'#188#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255'HJKHJKHJKHJKHJKHJKHJK'#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#6#5#131#16#21#157#6#8#142#255#0#255
+  +#255#0#255#255#0#255#255#0#255#255#0#255#0#0
+]);
+LazarusResources.Add('TROIPSUPERHTTPSERVER','BMP',[
+  'BM'#248#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#194#6#0#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#255#0#255#153'c@'#149'^<'#153'c@'#146']Hmk?H'#146'>'#255
+  +#0#255#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@@@'#185
+  +'x='#185'x='#173'e'''#171'P'#20'jb'#30'$'#137'!1'#153'1@'#157'?@'#157'?'#255
+  +#0#255#255#0#255'@'#0#192#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255'@'#0#192
+  +'@@@'#231#129#22#227'm'#3#224']'#0#144'Z'#0#2'h'#0#0'k'#0#0'l'#0#15#134#15'@'
+  +#139'5H'#146'>'#255#0#255'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192
+  +#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192
+  +'@@@'#252#134#15#237#135#15#186'~'#7'R~'#2#18'z'#1#9'n'#0#0'l'#0#0'p'#0#5's'
+  +#4#151'6'#1#255#0#255'@'#0#192#255#255#255'@'#0#192'@'#0#192#255#255#255#255
+  +#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@'
+  +#207#146'#`'#137#14'l'#143#22#217#146'#'#255#135#22#186'~'#7'>x'#0#17'w'#0#28
+  +'['#1'lB'#22#136'2'#7'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255
+  +#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@:'
+  +#151#26'E'#153'"'#255#170'P'#255#161'B'#251#153'1'#255#140#28#255#128#9#237
+  +'n'#1#194'P'#4#144'8'#11#145'9'#12'@'#0#192#255#255#255'@'#0#192'@'#0#192'@'
+  +#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0
+  +#192'@@@'#22#166'%'#172#177'Q'#255#188'{'#251#177'_'#251#166'H'#251#153'1'
+  +#255#138#25#255'{'#4#224'e'#2#171'P'#20#150'='#14'@'#0#192#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255'@'#0#192'@@@;'#189'H'#194'a'#215#201#134#239
+  +#192'{'#251#177'_'#246#163'C'#240#147'&'#251#132#12#215'r'#2'tb'#3'lB'#22'@'
+  +#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'~'#204'kl'#215'sl'#215'sn'#203'g'#194'av'
+  +#173'Dh'#156'('#185#149'&'#255#135#22#168'z'#3#13#131#0'#c'#5'HJK'#196#189
+  +#194#192#186#192#189#183#189#189#183#189'HJK'#217#215#218'HJK{{{{{{'#169'~H'
+  +#192#191'ju'#218'{'#156#238#158#156#238#158'i'#213'oA'#189'H'#22#166'%'#26
+  +#152#23#185#149'&'#255#137#28#168'z'#3#13#131#0#2'}'#0'HJK'#198#193#198#194
+  +#189#194#192#186#192#189#183#189'HJK'#222#221#225'HJK{{{{{{{{{\'#191'Ux'#219
+  +'|'#165#241#165#165#241#165'u'#218'{O'#193'Q%'#168')R'#156'$'#242#154'3'#255
+  +#135#22't~'#2#2#129#0#255#0#255'HJK'#203#197#203#198#192#198#194#188#194#192
+  +#186#192'HJK'#227#226#230'HJK{{{{{{{{{BqCh'#207'h'#129#221#130#129#221#130'e'
+  +#206'f'#0#0''#3#24#221#1#9#172#217#146'#'#255#132#18'R~'#2#2#129#0#255#0#255
+  +'HJK'#206#202#206#202#197#202#198#193#198#196#188#196'HJK'#231#230#234'HJK{{'
+  +'{{{{{{{{{{F'#134'FV'#197'W'#4#3'I'#188'I'#0#0''#20'7'#255#4#17#188#206#139
+  +#24#28#26#144#28#26#144#255#0#255#255#0#255'HJK'#212#208#212#207#202#207#203
+  +#197#202#198#192#198'HJK'#235#234#237'HJK'#134#134#134#134#134#134#134#134
+  +#134#146#146#146'{{{'#4#8#150'$<'#221#7#8#140#0#0''#28'?'#255#6#19#188#6#6
+  +#132#3#20#204#1#10#172#28#26#144#255#0#255'HJK'#217#213#216#212#208#212#207
+  +#202#207#203#197#202'HJK'#237#237#239'HJK{{{{{{{{{ooo'#134#134#134#5#9#150'W'
+  +'r'#247'8P'#230#0#1#135'(J'#255#8#22#188#9#27#204#19'6'#255#3#20#204#28#25
+  +#143#255#0#255'HJK'#222#218#221#217#213#217#233#231#234#207#202#207'HJK'#238
+  +#237#240'HJK'#140#140#140#140#140#140#146#146#146'{{{{{{{{{'#5#9#150'Zu'#247
+  +'<V'#238'9Z'#255'#D'#247',N'#255#9#27#204#6#6#132#255#0#255#255#0#255'HJK'
+  +#227#224#227#238#237#238#156#154#156#211#207#211'HJK'#237#237#239'HJKTVWcddn'
+  +'nn'#140#140#140#4#3''#4#3'%1'#188'.D'#221'n'#137#255'd'#128#255'Qp'#255
+  +'''F'#247#10#24#188#6#20#188#3#16#188#0#0'HJK'#231#230#231#144#144#146#158
+  +#157#158#216#212#216'HJK'#206#207#208#207#207#207#134#135#135'ceeNPQMOP'#4#3
+  +''#151#171#255#137#159#255'z'#147#255#130#153#255'x'#145#255'g'#130#255'@`'
+  +#255'1S'#255'#F'#255#17'4'#255#0#0'HJK'#237#235#237#146#146#147#227#224#226
+  +#255#255#255#176#176#178'QRSUVWuvw'#169#170#170#211#211#212#189#189#191#0#0
+  +''#0#0''#0#0'EU'#213#157#176#255#132#156#255'u'#143#255'D^'#238#1#1#135#0
+  +#0''#0#0''#28#24#140'HJK'#240#240#242#237#235#237#255#255#255#233#233#235
+  +#226#225#229#220#217#221#191#187#191#151#149#152'onrXYZNPQhij'#147#149#150'P'
+  +'['#204#192#204#255'BP'#204#129#153#255'3E'#213'f'#247'D['#230#8#9#139#255#0
+  +#255#255#0#255'HJK'#246#246#246#255#255#255#238#238#240#242#242#244#238#237
+  +#239#229#227#231#217#215#218#203#199#204#189#183#189#173#167#173#153#145#151
+  +#153#145#151#4#3''#220#227#255'R\'#204#0#0''#146#167#255'+5'#188#7#11#150
+  +'i'#129#247'5K'#221#6#6#131#255#0#255'HJK'#255#255#255#237#237#239#248#248
+  +#250#251#251#252#246#244#247#234#234#237#221#220#224#207#204#208#192#187#193
+  +#176#170#176#160#152#158'HJK'#4#3',1'#172#28#24#139#0#0''#163#181#255'1;'
+  ,#188#28#24#139#8#12#150#7#11#150#255#0#255#255#0#255#255#0#255'HJKHJK'#233
+  +#233#234#252#252#252#246#246#247#235#234#238#222#220#224#208#204#208#193#187
+  +#193'HJKHJK'#255#0#255#255#0#255#255#0#255#255#0#255#0#0''#178#194#255'7A'
+  +#188#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255'HJKHJKHJKHJKHJKHJKHJK'#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#6#5#131#16#21#157#6#8#142#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#0#0
+]);
+LazarusResources.Add('TROIPHTTPSERVER','BMP',[
+  'BM'#248#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#194#6#0#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#255#0#255#153'c@'#149'^<'#153'c@'#146']Hmk?H'#146'>'#255
+  +#0#255#255#0#255#255#0#255#255#0#255'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@@@'#185
+  +'x='#185'x='#173'e'''#171'P'#20'jb'#30'$'#137'!1'#153'1@'#157'?@'#157'?'#255
+  +#0#255#255#0#255'@'#0#192#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255'@'#0#192
+  +'@@@'#231#129#22#227'm'#3#224']'#0#144'Z'#0#2'h'#0#0'k'#0#0'l'#0#15#134#15'@'
+  +#139'5H'#146'>'#255#0#255'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192
+  +#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192
+  +'@@@'#252#134#15#237#135#15#186'~'#7'R~'#2#18'z'#1#9'n'#0#0'l'#0#0'p'#0#5's'
+  +#4#151'6'#1#255#0#255'@'#0#192#255#255#255'@'#0#192'@'#0#192#255#255#255#255
+  +#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@'
+  +#207#146'#`'#137#14'l'#143#22#217#146'#'#255#135#22#186'~'#7'>x'#0#17'w'#0#28
+  +'['#1'lB'#22#136'2'#7'@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255
+  +#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192'@@@:'
+  +#151#26'E'#153'"'#255#170'P'#255#161'B'#251#153'1'#255#140#28#255#128#9#237
+  +'n'#1#194'P'#4#144'8'#11#145'9'#12'@'#0#192#255#255#255'@'#0#192'@'#0#192'@'
+  +#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0
+  +#192'@@@'#22#166'%'#172#177'Q'#255#188'{'#251#177'_'#251#166'H'#251#153'1'
+  +#255#138#25#255'{'#4#224'e'#2#171'P'#20#150'='#14'@'#0#192#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255'@'#0#192'@@@;'#189'H'#194'a'#215#201#134#239
+  +#192'{'#251#177'_'#246#163'C'#240#147'&'#251#132#12#215'r'#2'tb'#3'lB'#22'@'
+  +#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192'@'#0#192'@'#0#192'~'#204'kl'#215'sl'#215'sn'#203'g'#194'av'
+  +#173'Dh'#156'('#185#149'&'#255#135#22#168'z'#3#13#131#0'#c'#5'HJK'#196#189
+  +#194#192#186#192#189#183#189#189#183#189'HJK'#217#215#218'HJK{{{{{{'#169'~H'
+  +#192#191'ju'#218'{'#156#238#158#156#238#158'i'#213'oA'#189'H'#22#166'%'#26
+  +#152#23#185#149'&'#255#137#28#168'z'#3#13#131#0#2'}'#0'HJK'#198#193#198#194
+  +#189#194#192#186#192#189#183#189'HJK'#222#221#225'HJK{{{{{{{{{\'#191'Ux'#219
+  +'|'#165#241#165#165#241#165'u'#218'{O'#193'Q%'#168')R'#156'$'#242#154'3'#255
+  +#135#22't~'#2#2#129#0#255#0#255'HJK'#203#197#203#198#192#198#194#188#194#192
+  +#186#192'HJK'#227#226#230'HJK{{{{{{{{{BqCh'#207'h'#129#221#130#129#221#130'e'
+  +#206'fD'#186'E'#28#163'#:'#151#26#217#146'#'#255#132#18'R~'#2#2#129#0#255#0
+  +#255'HJK'#206#202#206#202#197#202#198#193#198#196#188#196'HJK'#231#230#234'H'
+  +'JK{{{{{{{{{{{{F'#134'FV'#197'WV'#197'WI'#188'I2'#172'3'#12#153#22'#'#139#12
+  +#206#139#24#255'~'#10#255'~'#10#255#0#255#255#0#255'HJK'#212#208#212#207#202
+  +#207#203#197#202#198#192#198'HJK'#235#234#237'HJK'#134#134#134#134#134#134
+  +#134#134#134#146#146#146'{{{BqC.q0%'#168')'#26#152#23#6#139#8'`'#137#14#244
+  +#132#16#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#217#213#216#212#208#212
+  +#207#202#207#203#197#202'HJK'#237#237#239'HJK{{{{{{{{{ooo'#134#134#134#134
+  +#134#134#167#167#167'HJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#255#0#255'HJK'#222#218#221#217#213#217#233#231#234#207
+  +#202#207'HJK'#238#237#240'HJK'#140#140#140#140#140#140#146#146#146'{{{{{{{{{'
+  +#143#143#143'HJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255'HJK'#227#224#227#238#237#238#156#154#156#211#207#211'HJ'
+  +'K'#237#237#239'HJKTVWcddnnn'#140#140#140#140#140#140#140#140#140#166#166#166
+  +'HJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255'HJK'#231#230#231#144#144#146#158#157#158#216#212#216'HJK'#206#207
+  +#208#207#207#207#134#135#135'ceeNPQMOP\]]kkl'#146#146#146'HJK'#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#237
+  +#235#237#146#146#147#227#224#226#255#255#255#176#176#178'QRSUVWuvw'#169#170
+  +#170#211#211#212#189#189#191''#128#129'[\]JLMHJK'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#240#240#242#237
+  +#235#237#255#255#255#233#233#235#226#225#229#220#217#221#191#187#191#151#149
+  +#152'onrXYZNPQhij'#147#149#150#208#209#209'HJK'#255#0#255#255#0#255#255#0#255
+  +#0#0#0#255#0#255#0#0#0#255#0#255#255#0#255'HJK'#246#246#246#255#255#255#238
+  +#238#240#242#242#244#238#237#239#229#227#231#217#215#218#203#199#204#189#183
+  +#189#173#167#173#153#145#151#153#145#151'zsuHJK'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255#255#0#255'HJK'#255#255#255#237
+  +#237#239#248#248#250#251#251#252#246#244#247#234#234#237#221#220#224#207#204
+  +#208#192#187#193#176#170#176#160#152#158'HJKHJK'#255#0#255#255#0#255#255#0
+  ,#255#255#0#255#255#0#255#0#0#0#255#0#255#0#0#0#0#0#0#255#0#255#255#0#255'HJK'
+  +'HJK'#233#233#234#252#252#252#246#246#247#235#234#238#222#220#224#208#204#208
+  +#193#187#193'HJKHJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255#0#0#0#255#0#255#255#0#255#255
+  +#0#255'HJKHJKHJKHJKHJKHJKHJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#0#0#0#255#0#255#0#0#0#0#0#0#255
+  +#0#255#0#0
+]);
+LazarusResources.Add('TROIPTCPSERVER','BMP',[
+  'BM'#248#6#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#24#0#0#0#24#0#0#0#1#0#24#0#0#0#0#0
+  +#194#6#0#0#18#11#0#0#18#11#0#0#0#0#0#0#0#0#0#0#255#0#255'@@@@@@@@@@@@@@@@@@@'
+  +'@@@@@@@@@@@@@@@@@'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'#142']Y'
+  +#142']Y'#142']Y'#142']Y'#128'PK@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192
+  +'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@@@'#242#216
+  +#177#240#212#171#239#209#165#238#206#158#238#202#152#237#199#146#235#197#142
+  +#235#196#137#234#193#134#233#191#130#128'PK@'#0#192#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255'@'#0#192'@@@'#231#183'y'#230#181'u'#230#180'r'#230#177
+  +'n'#229#176'k'#227#173'h'#227#172'e'#226#170'b'#226#169'^'#234#194#135#128'P'
+  +'K@'#0#192#255#255#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255
+  +'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@@@'#246#226#197#243#222
+  +#189#243#218#182#183#180#164#7'9z'#182#175#154#238#206#157#238#202#151#235
+  +#199#145#235#197#140#128'PK@'#0#192#255#255#255'@'#0#192'@'#0#192#255#255#255
+  +#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255#255'@'#0#192
+  +'@@@'#234#188#132#233#187#128#176#157'{'#7'9z'#9'b'#208#7'9z'#173#150'o'#229
+  +#173'j'#227#172'g'#237#201#147#128'PK@'#0#192#255#255#255'@'#0#192#255#255
+  +#255'@'#0#192#255#255#255'@'#0#192#255#255#255#255#255#255'@'#0#192#255#255
+  +#255'@'#0#192'@@@'#248#235#215#188#192#191#7'9z'#15'j'#211#17't'#234#9'b'#208
+  +#7'9z'#182#177#158#239#208#160#238#204#154#128'PK@'#0#192#255#255#255'@'#0
+  +#192'@'#0#192'@'#0#192#255#255#255#255#255#255'@'#0#192'@'#0#192#255#255#255
+  +#255#255#255'@'#0#192'@@@'#171#144't'#7'9z'#25'x'#216'6'#150#240'('#138#238
+  +#27''#235#12'e'#209#7'9z'#183#177#160#239#209#163#128'PK@'#0#192#255#255#255
+  +#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#255#255#255#255#255#255#255#255'@'#0#192'@@@'#7'9z'#7'9z'#7'9z@'#157#242'@'
+  +#157#242'5'#150#239#7'9z'#7'9z'#7'9z'#242#213#172#128'PK@'#0#192'@'#0#192'@'
+  +#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0#192'@'#0
+  +#192'@'#0#192#252#251#246#227#173'y'#128#196'w'#7'9z@'#157#242'@'#157#242'@'
+  +#157#242#7'9z'#246#225#196#244#222#189#242#218#182#128'PKHJK'#196#189#194#192
+  +#186#192#189#183#189#189#183#189'HJK'#217#215#218'HJK{{{{{{{{{'#209#146'm'
+  +#255#254#251#227#175'}'#226#173'{'#7'9z'#7'9z'#7'9z'#7'9z'#7'9z'#233#188#130
+  +#231#187#128#244#224#192#128'PKHJK'#198#193#198#194#189#194#192#186#192#189
+  +#183#189'HJK'#222#221#225'HJK{{{{{{{{{'#218#157'u'#255#255#255#254#254#252
+  +#254#251#250#254#250#244#252#247#239#251#244#233#251#242#227#250#239#221#248
+  +#235#215#247#231#207#246#227#201#128'PKHJK'#203#197#203#198#192#198#194#188
+  +#194#192#186#192'HJK'#227#226#230'HJK{{{{{{{{{'#218#157'u'#255#255#255#227
+  +#177#129#227#177#128#227#176''#226#173'}'#227#173'y'#225#171'x'#225#170'u'
+  +#225#169'r'#224#166'n'#247#233#211#128'PKHJK'#206#202#206#202#197#202#198#193
+  +#198#196#188#196'HJK'#231#230#234'HJK{{{{{{{{{'#231#171'y'#255#255#255#227
+  +#177#129#227#177#129#227#177#129#227#176''#227#175'}'#226#173'{'#226#172'x'
+  +#225#170'v'#225#169'r'#248#237#220#128'PKHJK'#212#208#212#207#202#207#203#197
+  +#202#198#192#198'HJK'#235#234#237'HJK'#134#134#134#134#134#134#134#134#134
+  +#231#171'y'#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255#255
+  +#254#252#255#252#250#254#250#244#252#247#240#251#244#234#251#242#229#128'PKH'
+  +'JK'#217#213#216#212#208#212#207#202#207#203#197#202'HJK'#237#237#239'HJK{{{'
+  +'{{{{{{'#231#171'y'#207#142'h'#207#142'h'#207#142'h'#207#142'h'#207#142'h'
+  +#207#142'h'#207#142'h'#207#142'h'#207#142'h'#207#142'h'#207#142'h'#128'PKHJK'
+  +#222#218#221#217#213#217#233#231#234#207#202#207'HJK'#238#237#240'HJK'#140
+  +#140#140#140#140#140#146#146#146'{{{{{{{{{'#143#143#143'HJK'#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#227#224
+  +#227#238#237#238#156#154#156#211#207#211'HJK'#237#237#239'HJKTVWcddnnn'#140
+  +#140#140#140#140#140#140#140#140#166#166#166'HJK'#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255'HJK'#231#230#231#144
+  +#144#146#158#157#158#216#212#216'HJK'#206#207#208#207#207#207#134#135#135'ce'
+  +'eNPQMOP\]]kkl'#146#146#146'HJK'#255#0#255#255#0#255#255#0#255#255#0#255#255
+  +#0#255#255#0#255#255#0#255#255#0#255'HJK'#237#235#237#146#146#147#227#224#226
+  +#255#255#255#176#176#178'QRSUVWuvw'#169#170#170#211#211#212#189#189#191''
+  +#128#129'[\]JLMHJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0
+  +#255#255#0#255#255#0#255'HJK'#240#240#242#237#235#237#255#255#255#233#233#235
+  +#226#225#229#220#217#221#191#187#191#151#149#152'onrXYZNPQhij'#147#149#150
+  +#208#209#209'HJK'#255#0#255#255#0#255#255#0#255#0#0#0#255#0#255#0#0#0#255#0
+  +#255#255#0#255'HJK'#246#246#246#255#255#255#238#238#240#242#242#244#238#237
+  +#239#229#227#231#217#215#218#203#199#204#189#183#189#173#167#173#153#145#151
+  +#153#145#151'zsuHJK'#255#0#255#255#0#255#255#0#255#255#0#255#0#0#0#255#0#255
+  ,#0#0#0#255#0#255#255#0#255'HJK'#255#255#255#237#237#239#248#248#250#251#251
+  +#252#246#244#247#234#234#237#221#220#224#207#204#208#192#187#193#176#170#176
+  +#160#152#158'HJKHJK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0#0#0
+  +#255#0#255#0#0#0#0#0#0#255#0#255#255#0#255'HJKHJK'#233#233#234#252#252#252
+  +#246#246#247#235#234#238#222#220#224#208#204#208#193#187#193'HJKHJK'#255#0
+  +#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#0#0#0#255#0
+  +#255#0#0#0#255#0#255#0#0#0#255#0#255#255#0#255#255#0#255'HJKHJKHJKHJKHJKHJKH'
+  +'JK'#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255#255#0#255
+  +#255#0#255#255#0#255#0#0#0#255#0#255#0#0#0#0#0#0#255#0#255#0#0
+]);
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_Glyphs.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_Glyphs.res
new file mode 100644
index 0000000..47f1b7e
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_Glyphs.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_Lazarus_Mac.lpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_Lazarus_Mac.lpk
new file mode 100644
index 0000000..2ce79fc
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_Lazarus_Mac.lpk	
@@ -0,0 +1,102 @@
+<?xml version="1.0"?>
+<CONFIG>
+  <Package Version="3">
+    <Name Value="RemObjects_Synapse_Lazarus_Mac"/>
+    <CompilerOptions>
+      <Version Value="8"/>
+      <SearchPaths>
+        <OtherUnitFiles Value="$(LazarusDir)/lcl/units/$(TargetCPU)-$(TargetOS)/;Synapse/"/>
+        <UnitOutputDirectory Value="units/$(TargetCPU)-$(TargetOS)"/>
+      </SearchPaths>
+      <Other>
+        <CompilerPath Value="$(CompPath)"/>
+      </Other>
+    </CompilerOptions>
+    <Description Value="RemObjects SDK - Synapse based Channels"/>
+    <Files Count="17">
+      <Item1>
+        <Filename Value="RemObjects_Synapse_Reg.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="RemObjects_Synapse_Reg"/>
+      </Item1>
+      <Item2>
+        <Filename Value="uIPAsyncHttpServer.pas"/>
+        <UnitName Value="uIPAsyncHttpServer"/>
+      </Item2>
+      <Item3>
+        <Filename Value="uIPAsyncSocket.pas"/>
+        <UnitName Value="uIPAsyncSocket"/>
+      </Item3>
+      <Item4>
+        <Filename Value="uROIpSuperHttpServer.pas"/>
+        <UnitName Value="uROIpSuperHttpServer"/>
+      </Item4>
+      <Item5>
+        <Filename Value="uROSynapseHTTPChannel.pas"/>
+        <UnitName Value="uROSynapseHTTPChannel"/>
+      </Item5>
+      <Item6>
+        <Filename Value="uROSynapseSCHelpers.pas"/>
+        <UnitName Value="uROSynapseSCHelpers"/>
+      </Item6>
+      <Item7>
+        <Filename Value="uROSynapseServerSocket.pas"/>
+        <UnitName Value="uROSynapseServerSocket"/>
+      </Item7>
+      <Item8>
+        <Filename Value="uROSynapseSuperHttpChannel.pas"/>
+        <UnitName Value="uROSynapseSuperHttpChannel"/>
+      </Item8>
+      <Item9>
+        <Filename Value="uROSynapseSuperTCPChannel.pas"/>
+        <UnitName Value="uROSynapseSuperTCPChannel"/>
+      </Item9>
+      <Item10>
+        <Filename Value="uROSynapseSuperTCPServer.pas"/>
+        <UnitName Value="uROSynapseSuperTCPServer"/>
+      </Item10>
+      <Item11>
+        <Filename Value="Synapse/blcksock.pas"/>
+        <UnitName Value="blcksock"/>
+      </Item11>
+      <Item12>
+        <Filename Value="Synapse/httpsend.pas"/>
+        <UnitName Value="httpsend"/>
+      </Item12>
+      <Item13>
+        <Filename Value="Synapse/synacode.pas"/>
+        <UnitName Value="synacode"/>
+      </Item13>
+      <Item14>
+        <Filename Value="Synapse/synautil.pas"/>
+        <UnitName Value="synautil"/>
+      </Item14>
+      <Item15>
+        <Filename Value="Synapse/synsock.pas"/>
+        <UnitName Value="synsock"/>
+      </Item15>
+      <Item16>
+        <Filename Value="uROIpHttpServer.pas"/>
+        <UnitName Value="uROIpHttpServer"/>
+      </Item16>
+      <Item17>
+        <Filename Value="uROIpTcpServer.pas"/>
+        <UnitName Value="uROIpTcpServer"/>
+      </Item17>
+    </Files>
+    <Type Value="RunAndDesignTime"/>
+    <RequiredPkgs Count="2">
+      <Item1>
+        <PackageName Value="RemObjects_Core_Lazarus_Mac"/>
+      </Item1>
+      <Item2>
+        <PackageName Value="FCL"/>
+        <MinVersion Major="1" Valid="True"/>
+      </Item2>
+    </RequiredPkgs>
+    <PublishOptions>
+      <Version Value="2"/>
+      <IgnoreBinaries Value="False"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_Lazarus_Unix.lpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_Lazarus_Unix.lpk
new file mode 100644
index 0000000..993c1de
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_Lazarus_Unix.lpk	
@@ -0,0 +1,113 @@
+<?xml version="1.0"?>
+<CONFIG>
+  <Package Version="3">
+    <PathDelim Value="\"/>
+    <Name Value="RemObjects_Synapse_Lazarus_Unix"/>
+    <CompilerOptions>
+      <Version Value="5"/>
+      <PathDelim Value="\"/>
+      <SearchPaths>
+        <OtherUnitFiles Value="$(LazarusDir)\lcl\units\$(TargetCPU)-$(TargetOS)\;Synapse\"/>
+        <UnitOutputDirectory Value="units\$(TargetCPU)-$(TargetOS)"/>
+      </SearchPaths>
+      <Parsing>
+        <SyntaxOptions>
+          <D2Extensions Value="False"/>
+        </SyntaxOptions>
+      </Parsing>
+      <CodeGeneration>
+        <Generate Value="Faster"/>
+      </CodeGeneration>
+      <Other>
+        <CompilerPath Value="$(CompPath)"/>
+      </Other>
+    </CompilerOptions>
+    <Description Value="RemObjects SDK - Synapse based Channels"/>
+    <Files Count="17">
+      <Item1>
+        <Filename Value="RemObjects_Synapse_Reg.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="RemObjects_Synapse_Reg"/>
+      </Item1>
+      <Item2>
+        <Filename Value="uIPAsyncHttpServer.pas"/>
+        <UnitName Value="uIPAsyncHttpServer"/>
+      </Item2>
+      <Item3>
+        <Filename Value="uIPAsyncSocket.pas"/>
+        <UnitName Value="uIPAsyncSocket"/>
+      </Item3>
+      <Item4>
+        <Filename Value="uROIpSuperHttpServer.pas"/>
+        <UnitName Value="uROIpSuperHttpServer"/>
+      </Item4>
+      <Item5>
+        <Filename Value="uROSynapseHTTPChannel.pas"/>
+        <UnitName Value="uROSynapseHTTPChannel"/>
+      </Item5>
+      <Item6>
+        <Filename Value="uROSynapseSCHelpers.pas"/>
+        <UnitName Value="uROSynapseSCHelpers"/>
+      </Item6>
+      <Item7>
+        <Filename Value="uROSynapseServerSocket.pas"/>
+        <UnitName Value="uROSynapseServerSocket"/>
+      </Item7>
+      <Item8>
+        <Filename Value="uROSynapseSuperHttpChannel.pas"/>
+        <UnitName Value="uROSynapseSuperHttpChannel"/>
+      </Item8>
+      <Item9>
+        <Filename Value="uROSynapseSuperTCPChannel.pas"/>
+        <UnitName Value="uROSynapseSuperTCPChannel"/>
+      </Item9>
+      <Item10>
+        <Filename Value="uROSynapseSuperTCPServer.pas"/>
+        <UnitName Value="uROSynapseSuperTCPServer"/>
+      </Item10>
+      <Item11>
+        <Filename Value="Synapse\blcksock.pas"/>
+        <UnitName Value="blcksock"/>
+      </Item11>
+      <Item12>
+        <Filename Value="Synapse\httpsend.pas"/>
+        <UnitName Value="httpsend"/>
+      </Item12>
+      <Item13>
+        <Filename Value="Synapse\synacode.pas"/>
+        <UnitName Value="synacode"/>
+      </Item13>
+      <Item14>
+        <Filename Value="Synapse\synautil.pas"/>
+        <UnitName Value="synautil"/>
+      </Item14>
+      <Item15>
+        <Filename Value="Synapse\synsock.pas"/>
+        <UnitName Value="synsock"/>
+      </Item15>
+      <Item16>
+        <Filename Value="uROIpHttpServer.pas"/>
+        <UnitName Value="uROIpHttpServer"/>
+      </Item16>
+      <Item17>
+        <Filename Value="uROIpTcpServer.pas"/>
+        <UnitName Value="uROIpTcpServer"/>
+      </Item17>
+    </Files>
+    <Type Value="RunAndDesignTime"/>
+    <RequiredPkgs Count="2">
+      <Item1>
+        <PackageName Value="RemObjects_Core_Lazarus_Unix"/>
+      </Item1>
+      <Item2>
+        <PackageName Value="FCL"/>
+        <MinVersion Major="1" Valid="True"/>
+      </Item2>
+    </RequiredPkgs>
+    <PublishOptions>
+      <Version Value="2"/>
+      <DestinationDirectory Value="$(TestDir)\publishedpackage\"/>
+      <IgnoreBinaries Value="False"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_Lazarus_Windows.lpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_Lazarus_Windows.lpk
new file mode 100644
index 0000000..7fa879f
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_Lazarus_Windows.lpk	
@@ -0,0 +1,114 @@
+<?xml version="1.0"?>
+<CONFIG>
+  <Package Version="3">
+    <PathDelim Value="\"/>
+    <Name Value="RemObjects_Synapse_Lazarus_Windows"/>
+    <CompilerOptions>
+      <Version Value="5"/>
+      <PathDelim Value="\"/>
+      <SearchPaths>
+        <OtherUnitFiles Value="Synapse\"/>
+        <UnitOutputDirectory Value="..\Dcu\Lazarus\$(TargetCPU)-$(TargetOS)"/>
+      </SearchPaths>
+      <Parsing>
+        <SyntaxOptions>
+          <D2Extensions Value="False"/>
+        </SyntaxOptions>
+      </Parsing>
+      <CodeGeneration>
+        <Generate Value="Faster"/>
+      </CodeGeneration>
+      <Other>
+        <CompilerPath Value="$(CompPath)"/>
+      </Other>
+    </CompilerOptions>
+    <Files Count="17">
+      <Item1>
+        <Filename Value="RemObjects_Synapse_Reg.pas"/>
+        <HasRegisterProc Value="True"/>
+        <UnitName Value="RemObjects_Synapse_Reg"/>
+      </Item1>
+      <Item2>
+        <Filename Value="uIPAsyncHttpServer.pas"/>
+        <UnitName Value="uIPAsyncHttpServer"/>
+      </Item2>
+      <Item3>
+        <Filename Value="uIPAsyncSocket.pas"/>
+        <UnitName Value="uIPAsyncSocket"/>
+      </Item3>
+      <Item4>
+        <Filename Value="uROIpSuperHttpServer.pas"/>
+        <UnitName Value="uROIpSuperHttpServer"/>
+      </Item4>
+      <Item5>
+        <Filename Value="uROSynapseHTTPChannel.pas"/>
+        <UnitName Value="uROSynapseHTTPChannel"/>
+      </Item5>
+      <Item6>
+        <Filename Value="uROSynapseSCHelpers.pas"/>
+        <UnitName Value="uROSynapseSCHelpers"/>
+      </Item6>
+      <Item7>
+        <Filename Value="uROSynapseServerSocket.pas"/>
+        <UnitName Value="uROSynapseServerSocket"/>
+      </Item7>
+      <Item8>
+        <Filename Value="uROSynapseSuperHttpChannel.pas"/>
+        <UnitName Value="uROSynapseSuperHttpChannel"/>
+      </Item8>
+      <Item9>
+        <Filename Value="uROSynapseSuperTCPChannel.pas"/>
+        <UnitName Value="uROSynapseSuperTCPChannel"/>
+      </Item9>
+      <Item10>
+        <Filename Value="uROSynapseSuperTCPServer.pas"/>
+        <UnitName Value="uROSynapseSuperTCPServer"/>
+      </Item10>
+      <Item11>
+        <Filename Value="Synapse\blcksock.pas"/>
+        <UnitName Value="blcksock"/>
+      </Item11>
+      <Item12>
+        <Filename Value="Synapse\httpsend.pas"/>
+        <UnitName Value="httpsend"/>
+      </Item12>
+      <Item13>
+        <Filename Value="Synapse\synacode.pas"/>
+        <UnitName Value="synacode"/>
+      </Item13>
+      <Item14>
+        <Filename Value="Synapse\synautil.pas"/>
+        <UnitName Value="synautil"/>
+      </Item14>
+      <Item15>
+        <Filename Value="Synapse\synsock.pas"/>
+        <UnitName Value="synsock"/>
+      </Item15>
+      <Item16>
+        <Filename Value="uROIpHttpServer.pas"/>
+        <UnitName Value="uROIpHttpServer"/>
+      </Item16>
+      <Item17>
+        <Filename Value="uROIpTcpServer.pas"/>
+        <UnitName Value="uROIpTcpServer"/>
+      </Item17>
+    </Files>
+    <Type Value="RunAndDesignTime"/>
+    <RequiredPkgs Count="3">
+      <Item1>
+        <PackageName Value="RemObjects_Core_Lazarus_Windows"/>
+      </Item1>
+      <Item2>
+        <PackageName Value="LCL"/>
+      </Item2>
+      <Item3>
+        <PackageName Value="FCL"/>
+        <MinVersion Major="1" Valid="True"/>
+      </Item3>
+    </RequiredPkgs>
+    <PublishOptions>
+      <Version Value="2"/>
+      <IgnoreBinaries Value="False"/>
+    </PublishOptions>
+  </Package>
+</CONFIG>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_Reg.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_Reg.pas
new file mode 100644
index 0000000..6ba11ec
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_Synapse_Reg.pas	
@@ -0,0 +1,49 @@
+unit RemObjects_Synapse_Reg;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Synapse Components                                }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+procedure Register;
+
+implementation
+
+uses
+  {$IFDEF FPC}LResources,{$ENDIF}
+  Classes,
+  uROSynapseHTTPChannel, uROClasses, uRORes,
+  uROSynapseSuperHttpChannel, uIPAsyncSocket,
+  uIPAsyncHttpServer, uROIpSuperHttpServer,
+  uROIpHttpServer, uROIpTcpServer,
+  uROSynapseSuperTCPChannel, uROSynapseSuperTCPServer;
+
+{$IFNDEF FPC}
+  {$R RemObjects_Synapse_Glyphs.res}
+{$ENDIF}
+  
+procedure Register;
+begin
+  RegisterComponents(str_ProductName,
+                     [TROSynapseHTTPChannel, TROSynapseSuperHTTPChannel, TROIpSuperHTTPServer,
+                      TROSynapseSuperTCPServer, TROSynapseSuperTCPChannel, TROIpTCPServer, TROIpHTTPServer]);
+
+end;
+
+{$IFDEF FPC}
+initialization
+  {$i RemObjects_Synapse_Glyphs.lrs}
+{$ENDIF}
+end.
+ 
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D10.bdsproj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D10.bdsproj
new file mode 100644
index 0000000..e539593
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D10.bdsproj	
@@ -0,0 +1,181 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+	<PersonalityInfo>
+		<Option>
+			<Option Name="Personality" Type="String">Delphi.Personality</Option>
+			<Option Name="ProjectType" Type="String"></Option>
+			<Option Name="Version" Type="String">1.0</Option>
+			<Option Name="GUID" Type="String">{9661820C-D398-4219-806E-11B42219A50F}</Option>
+		</Option>
+	</PersonalityInfo>
+	<Delphi.Personality>
+		<Source>
+			<Source Name="MainSource" Type="String">RemObjects_WebBroker_D10.dpk</Source>
+		</Source>
+		<FileVersion>
+			<FileVersion Name="Version" Type="String">7.0</FileVersion>
+		</FileVersion>
+		<Compiler>
+			<Compiler Name="A" Type="Integer">8</Compiler>
+			<Compiler Name="B" Type="Integer">0</Compiler>
+			<Compiler Name="C" Type="Integer">1</Compiler>
+			<Compiler Name="D" Type="Integer">1</Compiler>
+			<Compiler Name="E" Type="Integer">0</Compiler>
+			<Compiler Name="F" Type="Integer">0</Compiler>
+			<Compiler Name="G" Type="Integer">1</Compiler>
+			<Compiler Name="H" Type="Integer">1</Compiler>
+			<Compiler Name="I" Type="Integer">1</Compiler>
+			<Compiler Name="J" Type="Integer">0</Compiler>
+			<Compiler Name="K" Type="Integer">0</Compiler>
+			<Compiler Name="L" Type="Integer">1</Compiler>
+			<Compiler Name="M" Type="Integer">0</Compiler>
+			<Compiler Name="N" Type="Integer">1</Compiler>
+			<Compiler Name="O" Type="Integer">1</Compiler>
+			<Compiler Name="P" Type="Integer">1</Compiler>
+			<Compiler Name="Q" Type="Integer">0</Compiler>
+			<Compiler Name="R" Type="Integer">0</Compiler>
+			<Compiler Name="S" Type="Integer">0</Compiler>
+			<Compiler Name="T" Type="Integer">0</Compiler>
+			<Compiler Name="U" Type="Integer">0</Compiler>
+			<Compiler Name="V" Type="Integer">1</Compiler>
+			<Compiler Name="W" Type="Integer">0</Compiler>
+			<Compiler Name="X" Type="Integer">1</Compiler>
+			<Compiler Name="Y" Type="Integer">1</Compiler>
+			<Compiler Name="Z" Type="Integer">1</Compiler>
+			<Compiler Name="ShowHints" Type="Boolean">True</Compiler>
+			<Compiler Name="ShowWarnings" Type="Boolean">True</Compiler>
+			<Compiler Name="UnitAliases" Type="String">WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;</Compiler>
+			<Compiler Name="NamespacePrefix" Type="String"></Compiler>
+			<Compiler Name="GenerateDocumentation" Type="Boolean">False</Compiler>
+			<Compiler Name="DefaultNamespace" Type="String"></Compiler>
+			<Compiler Name="SymbolDeprecated" Type="Boolean">False</Compiler>
+			<Compiler Name="SymbolLibrary" Type="Boolean">False</Compiler>
+			<Compiler Name="SymbolPlatform" Type="Boolean">False</Compiler>
+			<Compiler Name="SymbolExperimental" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitLibrary" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitPlatform" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitDeprecated" Type="Boolean">False</Compiler>
+			<Compiler Name="UnitExperimental" Type="Boolean">False</Compiler>
+			<Compiler Name="HResultCompat" Type="Boolean">True</Compiler>
+			<Compiler Name="HidingMember" Type="Boolean">True</Compiler>
+			<Compiler Name="HiddenVirtual" Type="Boolean">True</Compiler>
+			<Compiler Name="Garbage" Type="Boolean">True</Compiler>
+			<Compiler Name="BoundsError" Type="Boolean">True</Compiler>
+			<Compiler Name="ZeroNilCompat" Type="Boolean">True</Compiler>
+			<Compiler Name="StringConstTruncated" Type="Boolean">True</Compiler>
+			<Compiler Name="ForLoopVarVarPar" Type="Boolean">True</Compiler>
+			<Compiler Name="TypedConstVarPar" Type="Boolean">True</Compiler>
+			<Compiler Name="AsgToTypedConst" Type="Boolean">True</Compiler>
+			<Compiler Name="CaseLabelRange" Type="Boolean">True</Compiler>
+			<Compiler Name="ForVariable" Type="Boolean">True</Compiler>
+			<Compiler Name="ConstructingAbstract" Type="Boolean">True</Compiler>
+			<Compiler Name="ComparisonFalse" Type="Boolean">True</Compiler>
+			<Compiler Name="ComparisonTrue" Type="Boolean">True</Compiler>
+			<Compiler Name="ComparingSignedUnsigned" Type="Boolean">True</Compiler>
+			<Compiler Name="CombiningSignedUnsigned" Type="Boolean">True</Compiler>
+			<Compiler Name="UnsupportedConstruct" Type="Boolean">True</Compiler>
+			<Compiler Name="FileOpen" Type="Boolean">True</Compiler>
+			<Compiler Name="FileOpenUnitSrc" Type="Boolean">True</Compiler>
+			<Compiler Name="BadGlobalSymbol" Type="Boolean">True</Compiler>
+			<Compiler Name="DuplicateConstructorDestructor" Type="Boolean">True</Compiler>
+			<Compiler Name="InvalidDirective" Type="Boolean">True</Compiler>
+			<Compiler Name="PackageNoLink" Type="Boolean">True</Compiler>
+			<Compiler Name="PackageThreadVar" Type="Boolean">True</Compiler>
+			<Compiler Name="ImplicitImport" Type="Boolean">True</Compiler>
+			<Compiler Name="HPPEMITIgnored" Type="Boolean">True</Compiler>
+			<Compiler Name="NoRetVal" Type="Boolean">True</Compiler>
+			<Compiler Name="UseBeforeDef" Type="Boolean">True</Compiler>
+			<Compiler Name="ForLoopVarUndef" Type="Boolean">True</Compiler>
+			<Compiler Name="UnitNameMismatch" Type="Boolean">True</Compiler>
+			<Compiler Name="NoCFGFileFound" Type="Boolean">True</Compiler>
+			<Compiler Name="MessageDirective" Type="Boolean">True</Compiler>
+			<Compiler Name="ImplicitVariants" Type="Boolean">True</Compiler>
+			<Compiler Name="UnicodeToLocale" Type="Boolean">True</Compiler>
+			<Compiler Name="LocaleToUnicode" Type="Boolean">True</Compiler>
+			<Compiler Name="ImagebaseMultiple" Type="Boolean">True</Compiler>
+			<Compiler Name="SuspiciousTypecast" Type="Boolean">True</Compiler>
+			<Compiler Name="PrivatePropAccessor" Type="Boolean">True</Compiler>
+			<Compiler Name="UnsafeType" Type="Boolean">False</Compiler>
+			<Compiler Name="UnsafeCode" Type="Boolean">False</Compiler>
+			<Compiler Name="UnsafeCast" Type="Boolean">False</Compiler>
+			<Compiler Name="OptionTruncated" Type="Boolean">True</Compiler>
+			<Compiler Name="WideCharReduced" Type="Boolean">True</Compiler>
+			<Compiler Name="DuplicatesIgnored" Type="Boolean">True</Compiler>
+			<Compiler Name="UnitInitSeq">True</Compiler>
+			<Compiler Name="LocalPInvoke">True</Compiler>
+			<Compiler Name="CodePage"></Compiler>
+		</Compiler>
+		<Linker>
+			<Linker Name="MapFile" Type="Integer">0</Linker>
+			<Linker Name="OutputObjs" Type="Integer">0</Linker>
+			<Linker Name="ConsoleApp" Type="Integer">1</Linker>
+			<Linker Name="DebugInfo" Type="Boolean">False</Linker>
+			<Linker Name="RemoteSymbols" Type="Boolean">False</Linker>
+			<Linker Name="GenerateDRC" Type="Boolean">False</Linker>
+			<Linker Name="MinStackSize" Type="Integer">16384</Linker>
+			<Linker Name="MaxStackSize" Type="Integer">1048576</Linker>
+			<Linker Name="ImageBase" Type="Integer">4194304</Linker>
+			<Linker Name="ExeDescription" Type="String">RemObjects SDK - WebBroker Library</Linker>
+			<Linker Name="GenerateHpps">False</Linker>
+		</Linker>
+		<Directories>
+			<Directories Name="OutputDir" Type="String"></Directories>
+			<Directories Name="UnitOutputDir" Type="String">..\Dcu\D10</Directories>
+			<Directories Name="PackageDLLOutputDir" Type="String">..\Dcu\D10</Directories>
+			<Directories Name="PackageDCPOutputDir" Type="String">..\Dcu\D10</Directories>
+			<Directories Name="SearchPath" Type="String">..\Dcu\D10</Directories>
+			<Directories Name="Packages" Type="String"></Directories>
+			<Directories Name="Conditionals" Type="String">DESIGNTIME</Directories>
+			<Directories Name="DebugSourceDirs" Type="String"></Directories>
+			<Directories Name="UsePackages" Type="Boolean">False</Directories>
+		</Directories>
+		<Parameters>
+			<Parameters Name="RunParams" Type="String"></Parameters>
+			<Parameters Name="HostApplication" Type="String"></Parameters>
+			<Parameters Name="Launcher" Type="String"></Parameters>
+			<Parameters Name="UseLauncher" Type="Boolean">False</Parameters>
+			<Parameters Name="DebugCWD" Type="String"></Parameters>
+			<Parameters Name="RemoteHost" Type="String"></Parameters>
+			<Parameters Name="RemotePath" Type="String"></Parameters>
+			<Parameters Name="RemoteLauncher" Type="String"></Parameters>
+			<Parameters Name="RemoteCWD" Type="String"></Parameters>
+			<Parameters Name="RemoteDebug" Type="Boolean">False</Parameters>
+			<Parameters Name="Debug Symbols Search Path"></Parameters>
+			<Parameters Name="LoadAllSymbols">True</Parameters>
+			<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+		</Parameters>
+		<VersionInfo>
+			<VersionInfo Name="IncludeVerInfo" Type="Boolean">True</VersionInfo>
+			<VersionInfo Name="AutoIncBuild" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="MajorVer" Type="Integer">4</VersionInfo>
+			<VersionInfo Name="MinorVer" Type="Integer">0</VersionInfo>
+			<VersionInfo Name="Release" Type="Integer">0</VersionInfo>
+			<VersionInfo Name="Build" Type="Integer">404</VersionInfo>
+			<VersionInfo Name="Debug" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="PreRelease" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="Special" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="Private" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="DLL" Type="Boolean">False</VersionInfo>
+			<VersionInfo Name="Locale" Type="Integer">1033</VersionInfo>
+			<VersionInfo Name="CodePage" Type="Integer">1252</VersionInfo>
+		</VersionInfo>
+		<Language>
+			<Language Name="ActiveLang" Type="String"></Language>
+			<Language Name="ProjectLang" Type="String">$00000000</Language>
+			<Language Name="RootDir" Type="String"></Language>
+		</Language>
+		<VersionInfoKeys>
+			<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+			<VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+			<VersionInfoKeys Name="FileVersion">4.0.0.404</VersionInfoKeys>
+			<VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys>
+			<VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys>
+			<VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+			<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+			<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+			<VersionInfoKeys Name="Comments"></VersionInfoKeys>
+		</VersionInfoKeys>
+	</Delphi.Personality>
+	<ModelSupport>True</ModelSupport>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D10.cfg b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D10.cfg
new file mode 100644
index 0000000..05ca7ed
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D10.cfg	
@@ -0,0 +1,53 @@
+-$A8
+-$B-
+-$C+
+-$D+
+-$E-
+-$F-
+-$G+
+-$H+
+-$I+
+-$J-
+-$K-
+-$L+
+-$M-
+-$N+
+-$O+
+-$P+
+-$Q-
+-$R-
+-$S-
+-$T-
+-$U-
+-$V+
+-$W-
+-$X+
+-$YD
+-$Z1
+-cg
+-AWinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+-H+
+-W+
+-M
+-$M16384,1048576
+-K$00400000
+-N0"..\Dcu\D10"
+-LE"..\Dcu\D10"
+-LN"..\Dcu\D10"
+-U"..\Dcu\D10"
+-O"..\Dcu\D10"
+-I"..\Dcu\D10"
+-R"..\Dcu\D10"
+-DDESIGNTIME
+-Z
+-w-SYMBOL_DEPRECATED
+-w-SYMBOL_LIBRARY
+-w-SYMBOL_PLATFORM
+-w-SYMBOL_EXPERIMENTAL
+-w-UNIT_LIBRARY
+-w-UNIT_PLATFORM
+-w-UNIT_DEPRECATED
+-w-UNIT_EXPERIMENTAL
+-w-UNSAFE_TYPE
+-w-UNSAFE_CODE
+-w-UNSAFE_CAST
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D10.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D10.dpk
new file mode 100644
index 0000000..5302175
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D10.dpk	
@@ -0,0 +1,41 @@
+package RemObjects_WebBroker_D10;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - WebBroker Library'}
+{$IMPLICITBUILD OFF}
+{$DEFINE DESIGNTIME}
+{%TogetherDiagram 'ModelSupport_RemObjects_WebBroker_D10\default.txaPackage'}
+
+requires
+  rtl,
+  vcl,
+  inet,
+  designide,
+  RemObjects_Core_D10;
+
+contains
+  RemObjects_WebBroker_Reg in 'RemObjects_WebBroker_Reg.pas',
+  uROWebBrokerServer in 'uROWebBrokerServer.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D10.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D10.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D10.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D11.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D11.dpk
new file mode 100644
index 0000000..9610f31
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D11.dpk	
@@ -0,0 +1,40 @@
+package RemObjects_WebBroker_D11;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - WebBroker Library'}
+{$IMPLICITBUILD OFF}
+{$DEFINE DESIGNTIME}
+
+requires
+  rtl,
+  vcl,
+  inet,
+  designide,
+  RemObjects_Core_D11;
+
+contains
+  RemObjects_WebBroker_Reg in 'RemObjects_WebBroker_Reg.pas',
+  uROWebBrokerServer in 'uROWebBrokerServer.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D11.dproj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D11.dproj
new file mode 100644
index 0000000..bd2f2de
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D11.dproj	
@@ -0,0 +1,76 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <PropertyGroup>
+    <ProjectGuid>{850d4f71-0ea3-4073-a632-8eafa8318d76}</ProjectGuid>
+    <MainSource>RemObjects_WebBroker_D11.dpk</MainSource>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+    <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+    <DCC_DependencyCheckOutputName>..\Dcu\D11\RemObjects_WebBroker_D11.bpl</DCC_DependencyCheckOutputName>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DebugInformation>False</DCC_DebugInformation>
+    <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
+    <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
+    <DCC_DcuOutput>..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\Dcu\D11</DCC_IncludePath>
+    <DCC_Define>DESIGNTIME;RELEASE</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_SYMBOL_EXPERIMENTAL>False</DCC_SYMBOL_EXPERIMENTAL>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+    <DCC_UNIT_EXPERIMENTAL>False</DCC_UNIT_EXPERIMENTAL>
+  </PropertyGroup>
+  <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
+    <Version>7.0</Version>
+    <DCC_DcuOutput>..\Dcu\D11</DCC_DcuOutput>
+    <DCC_ObjOutput>..\Dcu\D11</DCC_ObjOutput>
+    <DCC_HppOutput>..\Dcu\D11</DCC_HppOutput>
+    <DCC_BplOutput>..\Dcu\D11</DCC_BplOutput>
+    <DCC_DcpOutput>..\Dcu\D11</DCC_DcpOutput>
+    <DCC_UnitSearchPath>..\Dcu\D11</DCC_UnitSearchPath>
+    <DCC_ResourcePath>..\Dcu\D11</DCC_ResourcePath>
+    <DCC_ObjPath>..\Dcu\D11</DCC_ObjPath>
+    <DCC_IncludePath>..\Dcu\D11</DCC_IncludePath>
+    <DCC_Define>DESIGNTIME</DCC_Define>
+    <DCC_SYMBOL_DEPRECATED>False</DCC_SYMBOL_DEPRECATED>
+    <DCC_SYMBOL_LIBRARY>False</DCC_SYMBOL_LIBRARY>
+    <DCC_SYMBOL_PLATFORM>False</DCC_SYMBOL_PLATFORM>
+    <DCC_SYMBOL_EXPERIMENTAL>False</DCC_SYMBOL_EXPERIMENTAL>
+    <DCC_UNIT_LIBRARY>False</DCC_UNIT_LIBRARY>
+    <DCC_UNIT_PLATFORM>False</DCC_UNIT_PLATFORM>
+    <DCC_UNIT_DEPRECATED>False</DCC_UNIT_DEPRECATED>
+    <DCC_UNIT_EXPERIMENTAL>False</DCC_UNIT_EXPERIMENTAL>
+  </PropertyGroup>
+  <ProjectExtensions>
+    <Borland.Personality>Delphi.Personality</Borland.Personality>
+    <Borland.ProjectType>Package</Borland.ProjectType>
+    <BorlandProject>
+<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">RemObjects SDK - WebBroker Library</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">4</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">404</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">1033</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">4.0.0.404</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">RemObjects_WebBroker_D11.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
+  </ProjectExtensions>
+  <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
+  <ItemGroup>
+    <DelphiCompile Include="RemObjects_WebBroker_D11.dpk">
+      <MainSource>MainSource</MainSource>
+    </DelphiCompile>
+    <DCCReference Include="designide.dcp" />
+    <DCCReference Include="inet.dcp" />
+    <DCCReference Include="RemObjects_Core_D11.dcp" />
+    <DCCReference Include="RemObjects_WebBroker_Reg.pas" />
+    <DCCReference Include="rtl.dcp" />
+    <DCCReference Include="uROWebBrokerServer.pas" />
+    <DCCReference Include="vcl.dcp" />
+    <None Include="ModelSupport_RemObjects_WebBroker_D10\default.txaPackage" />
+  </ItemGroup>
+</Project>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D11.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D11.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D11.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D12.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D12.dpk
new file mode 100644
index 0000000..235601c
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D12.dpk	
@@ -0,0 +1,40 @@
+package RemObjects_WebBroker_D12;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - WebBroker Library'}
+{$IMPLICITBUILD OFF}
+{$DEFINE DESIGNTIME}
+
+requires
+  rtl,
+  vcl,
+  inet,
+  designide,
+  RemObjects_Core_D12;
+
+contains
+  RemObjects_WebBroker_Reg in 'RemObjects_WebBroker_Reg.pas',
+  uROWebBrokerServer in 'uROWebBrokerServer.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D12.dproj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D12.dproj
new file mode 100644
index 0000000..d16da4e
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D12.dproj	
@@ -0,0 +1,99 @@
+	<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+		<PropertyGroup>
+			<ProjectGuid>{850d4f71-0ea3-4073-a632-8eafa8318d76}</ProjectGuid>
+			<MainSource>RemObjects_WebBroker_D12.dpk</MainSource>
+			<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+			<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
+			<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
+			<DCC_DependencyCheckOutputName>..\Dcu\D12\RemObjects_WebBroker_D12.bpl</DCC_DependencyCheckOutputName>
+			<ProjectVersion>11.1</ProjectVersion>
+			<Config Condition="'$(Config)'==''">Base</Config>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Config)'=='Base' or '$(Base)'!=''">
+			<Base>true</Base>
+		</PropertyGroup>
+		<PropertyGroup Condition="'$(Base)'!=''">
+			<DCC_SymbolReferenceInfo>1</DCC_SymbolReferenceInfo>
+			<DCC_CVT_WCHAR_TO_ACHAR>error</DCC_CVT_WCHAR_TO_ACHAR>
+			<DCC_IMPLICIT_STRING_CAST>error</DCC_IMPLICIT_STRING_CAST>
+			<DCC_EXPLICIT_STRING_CAST_LOSS>error</DCC_EXPLICIT_STRING_CAST_LOSS>
+			<DCC_CVT_WIDENING_STRING_LOST>error</DCC_CVT_WIDENING_STRING_LOST>
+			<DCC_EXPLICIT_STRING_CAST>error</DCC_EXPLICIT_STRING_CAST>
+			<DCC_CVT_ACHAR_TO_WCHAR>error</DCC_CVT_ACHAR_TO_WCHAR>
+			<DCC_IMPLICIT_STRING_CAST_LOSS>error</DCC_IMPLICIT_STRING_CAST_LOSS>
+			<DCC_CVT_NARROWING_STRING_LOST>error</DCC_CVT_NARROWING_STRING_LOST>
+			<GenDll>true</GenDll>
+			<DCC_DcpOutput>..\Dcu\D12</DCC_DcpOutput>
+			<DCC_OutputNeverBuildDcps>true</DCC_OutputNeverBuildDcps>
+			<DCC_DcuOutput>..\Dcu\D12</DCC_DcuOutput>
+			<GenPackage>true</GenPackage>
+			<DesignOnlyPackage>false</DesignOnlyPackage>
+			<DCC_ImageBase>00400000</DCC_ImageBase>
+			<DCC_DependencyCheckOutputName>..\Dcu\D12\RemObjects_WebBroker_D12.bpl</DCC_DependencyCheckOutputName>
+			<DCC_UnitSearchPath>..\Dcu\D12;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
+			<DCC_Description>RemObjects SDK - WebBroker Library</DCC_Description>
+			<DCC_Define>DESIGNTIME;$(DCC_Define)</DCC_Define>
+			<DCC_BplOutput>..\Dcu\D12</DCC_BplOutput>
+		</PropertyGroup>
+		<ItemGroup>
+			<DelphiCompile Include="RemObjects_WebBroker_D12.dpk">
+				<MainSource>MainSource</MainSource>
+			</DelphiCompile>
+			<DCCReference Include="rtl.dcp"/>
+			<DCCReference Include="vcl.dcp"/>
+			<DCCReference Include="inet.dcp"/>
+			<DCCReference Include="designide.dcp"/>
+			<DCCReference Include="RemObjects_Core_D12.dcp"/>
+			<DCCReference Include="RemObjects_WebBroker_Reg.pas"/>
+			<DCCReference Include="uROWebBrokerServer.pas"/>
+			<None Include="ModelSupport_RemObjects_WebBroker_D10\default.txaPackage"/>
+			<BuildConfiguration Include="Base">
+				<Key>Base</Key>
+			</BuildConfiguration>
+		</ItemGroup>
+		<Import Project="$(BDS)\Bin\CodeGear.Delphi.Targets" Condition="Exists('$(BDS)\Bin\CodeGear.Delphi.Targets')"/>
+		<ProjectExtensions>
+			<Borland.Personality>Delphi.Personality.12</Borland.Personality>
+			<Borland.ProjectType>Package</Borland.ProjectType>
+			<BorlandProject>
+				<Delphi.Personality>
+					<Parameters>
+						<Parameters Name="UseLauncher">False</Parameters>
+						<Parameters Name="LoadAllSymbols">True</Parameters>
+						<Parameters Name="LoadUnspecifiedSymbols">False</Parameters>
+					</Parameters>
+					<VersionInfo>
+						<VersionInfo Name="IncludeVerInfo">True</VersionInfo>
+						<VersionInfo Name="AutoIncBuild">False</VersionInfo>
+						<VersionInfo Name="MajorVer">4</VersionInfo>
+						<VersionInfo Name="MinorVer">0</VersionInfo>
+						<VersionInfo Name="Release">0</VersionInfo>
+						<VersionInfo Name="Build">404</VersionInfo>
+						<VersionInfo Name="Debug">False</VersionInfo>
+						<VersionInfo Name="PreRelease">False</VersionInfo>
+						<VersionInfo Name="Special">False</VersionInfo>
+						<VersionInfo Name="Private">False</VersionInfo>
+						<VersionInfo Name="DLL">False</VersionInfo>
+						<VersionInfo Name="Locale">1033</VersionInfo>
+						<VersionInfo Name="CodePage">1252</VersionInfo>
+					</VersionInfo>
+					<VersionInfoKeys>
+						<VersionInfoKeys Name="CompanyName">RemObjects Software</VersionInfoKeys>
+						<VersionInfoKeys Name="FileDescription"/>
+						<VersionInfoKeys Name="FileVersion">4.0.0.404</VersionInfoKeys>
+						<VersionInfoKeys Name="InternalName"/>
+						<VersionInfoKeys Name="LegalCopyright"/>
+						<VersionInfoKeys Name="LegalTrademarks"/>
+						<VersionInfoKeys Name="OriginalFilename"/>
+						<VersionInfoKeys Name="ProductName">RemObjects SDK</VersionInfoKeys>
+						<VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+						<VersionInfoKeys Name="Comments"/>
+					</VersionInfoKeys>
+					<Source>
+						<Source Name="MainSource">RemObjects_WebBroker_D12.dpk</Source>
+					</Source>
+				</Delphi.Personality>
+			</BorlandProject>
+			<ProjectFileVersion>12</ProjectFileVersion>
+		</ProjectExtensions>
+	</Project>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D12.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D12.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D12.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D5.dof b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D5.dof
new file mode 100644
index 0000000..fa3480e
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D5.dof	
@@ -0,0 +1,136 @@
+[FileVersion]
+Version=7.0
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects SDK - WebBroker Library
+[Directories]
+OutputDir=
+UnitOutputDir=..\Dcu\D5
+PackageDLLOutputDir=..\Dcu\D5
+PackageDCPOutputDir=..\Dcu\D5
+SearchPath=..\Dcu\D5
+Packages=
+Conditionals=DESIGNTIME
+DebugSourceDirs=
+UsePackages=0
+[Parameters]
+RunParams=
+HostApplication=
+Launcher=
+UseLauncher=0
+DebugCWD=
+[Language]
+ActiveLang=
+ProjectLang=
+RootDir=
+[Version Info]
+IncludeVerInfo=1
+AutoIncBuild=0
+MajorVer=3
+MinorVer=0
+Release=0
+Build=261
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=3.0.0.261
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
+Comments=
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D5.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D5.dpk
new file mode 100644
index 0000000..46bd58d
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D5.dpk	
@@ -0,0 +1,39 @@
+package RemObjects_WebBroker_D5;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - WebBroker Library'}
+{$IMPLICITBUILD OFF}
+{$DEFINE DESIGNTIME}
+
+requires
+  rtl,
+  vcl,
+  inet,
+  RemObjects_Core_D5;
+
+contains
+  RemObjects_WebBroker_Reg in 'RemObjects_WebBroker_Reg.pas',
+  uROWebBrokerServer in 'uROWebBrokerServer.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D5.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D5.res
new file mode 100644
index 0000000..1644e97
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D5.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D6.dof b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D6.dof
new file mode 100644
index 0000000..a25bd14
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D6.dof	
@@ -0,0 +1,106 @@
+[FileVersion]
+Version=6.0
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=0
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects SDK - WebBroker Library
+[Directories]
+OutputDir=
+UnitOutputDir=..\Dcu\D6
+PackageDLLOutputDir=..\Dcu\D6
+PackageDCPOutputDir=..\Dcu\D6
+SearchPath=..\Dcu\D6
+Packages=
+Conditionals=DESIGNTIME
+DebugSourceDirs=
+UsePackages=0
+[Parameters]
+RunParams=
+HostApplication=
+Launcher=
+UseLauncher=0
+DebugCWD=
+[Version Info]
+IncludeVerInfo=1
+AutoIncBuild=0
+MajorVer=3
+MinorVer=0
+Release=0
+Build=261
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=3.0.0.261
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
+Comments=
+[Excluded Packages]
+C:\Dev\DA3\Dcu\D6\DataAbstract_Core_D6.bpl=Data Abstract - Core Library
+C:\Dev\DA3\Dcu\D6\DataAbstract_IDE_D6.bpl=Data Abstract - IDE Package
+C:\Dev\DA3\Dcu\D6\DataAbstract_ADODriver_D6.bpl=Data Abstract - ADOExpress/dbGo Driver
+[HistoryLists\hlConditionals]
+Count=2
+Item0=DESIGNTIME
+Item1=Development
+[HistoryLists\hlUnitAliases]
+Count=1
+Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+[HistoryLists\hlSearchPath]
+Count=1
+Item0=..\Dcu\D6
+[HistoryLists\hlUnitOutputDirectory]
+Count=1
+Item0=..\Dcu\D6
+[HistoryLists\hlBPLOutput]
+Count=1
+Item0=..\Dcu\D6
+[HistoryLists\hlDCPOutput]
+Count=1
+Item0=..\Dcu\D6
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D6.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D6.dpk
new file mode 100644
index 0000000..573a901
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D6.dpk	
@@ -0,0 +1,39 @@
+package RemObjects_WebBroker_D6;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - WebBroker Library'}
+{$IMPLICITBUILD OFF}
+{$DEFINE DESIGNTIME}
+
+requires
+  rtl,
+  vcl,
+  inet,
+  RemObjects_Core_D6;
+
+contains
+  RemObjects_WebBroker_Reg in 'RemObjects_WebBroker_Reg.pas',
+  uROWebBrokerServer in 'uROWebBrokerServer.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D6.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D6.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D6.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D7.dof b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D7.dof
new file mode 100644
index 0000000..c504a97
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D7.dof	
@@ -0,0 +1,170 @@
+[FileVersion]
+Version=7.0
+[Compiler]
+A=8
+B=0
+C=1
+D=1
+E=0
+F=0
+G=1
+H=1
+I=1
+J=0
+K=0
+L=1
+M=0
+N=1
+O=1
+P=1
+Q=0
+R=0
+S=0
+T=0
+U=0
+V=1
+W=1
+X=1
+Y=1
+Z=1
+ShowHints=1
+ShowWarnings=1
+UnitAliases=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+NamespacePrefix=
+SymbolDeprecated=0
+SymbolLibrary=0
+SymbolPlatform=0
+UnitLibrary=0
+UnitPlatform=0
+UnitDeprecated=0
+HResultCompat=1
+HidingMember=1
+HiddenVirtual=1
+Garbage=1
+BoundsError=1
+ZeroNilCompat=1
+StringConstTruncated=1
+ForLoopVarVarPar=1
+TypedConstVarPar=1
+AsgToTypedConst=1
+CaseLabelRange=1
+ForVariable=1
+ConstructingAbstract=1
+ComparisonFalse=1
+ComparisonTrue=1
+ComparingSignedUnsigned=1
+CombiningSignedUnsigned=1
+UnsupportedConstruct=1
+FileOpen=1
+FileOpenUnitSrc=1
+BadGlobalSymbol=1
+DuplicateConstructorDestructor=1
+InvalidDirective=1
+PackageNoLink=1
+PackageThreadVar=1
+ImplicitImport=1
+HPPEMITIgnored=1
+NoRetVal=1
+UseBeforeDef=1
+ForLoopVarUndef=1
+UnitNameMismatch=1
+NoCFGFileFound=1
+MessageDirective=1
+ImplicitVariants=1
+UnicodeToLocale=1
+LocaleToUnicode=1
+ImagebaseMultiple=1
+SuspiciousTypecast=1
+PrivatePropAccessor=1
+UnsafeType=0
+UnsafeCode=0
+UnsafeCast=0
+[Linker]
+MapFile=0
+OutputObjs=0
+ConsoleApp=1
+DebugInfo=0
+RemoteSymbols=0
+MinStackSize=16384
+MaxStackSize=1048576
+ImageBase=4194304
+ExeDescription=RemObjects SDK - WebBroker Library
+[Directories]
+OutputDir=
+UnitOutputDir=..\Dcu\D7
+PackageDLLOutputDir=..\Dcu\D7
+PackageDCPOutputDir=..\Dcu\D7
+SearchPath=..\Dcu\D7
+Packages=
+Conditionals=DESIGNTIME
+DebugSourceDirs=
+UsePackages=0
+[Parameters]
+RunParams=
+HostApplication=
+Launcher=
+UseLauncher=0
+DebugCWD=
+[Language]
+ActiveLang=
+ProjectLang=
+RootDir=
+[Version Info]
+IncludeVerInfo=1
+AutoIncBuild=0
+MajorVer=3
+MinorVer=0
+Release=0
+Build=261
+Debug=0
+PreRelease=0
+Special=0
+Private=0
+DLL=0
+Locale=1033
+CodePage=1252
+[Version Info Keys]
+CompanyName=RemObjects Software
+FileDescription=
+FileVersion=3.0.0.261
+InternalName=
+LegalCopyright=
+LegalTrademarks=
+OriginalFilename=
+ProductName=RemObjects SDK
+ProductVersion=1.0.0.0
+Comments=
+[Excluded Packages]
+c:\program files\borland\delphi7\RBServer\Lib\dclRBS77.bpl=ReportBuilder Server
+C:\Program Files\Developer Express Inc\ExpressPrinting System\Delphi 7\Lib\dxPSTLLnkD7.bpl=ExpressPrinting System ReportLink for ExpressQuantumTreeList by Developer Express Inc.
+C:\Program Files\Developer Express Inc\ExpressPrinting System\Delphi 7\Lib\dxPSdxDBTLLnkD7.bpl=ExpressPrinting System ReportLink for ExpressQuantumDBTreeList by Developer Express Inc.
+C:\Program Files\Developer Express Inc\ExpressPrinting System\Delphi 7\Lib\dxPSdxDBGrLnkD7.bpl=ExpressPrinting System ReportLink for ExpressQuantumGrid by Developer Express Inc.
+C:\Program Files\Developer Express Inc\ExpressPrinting System\Delphi 7\Lib\dxPSdxDBTVLnkD7.bpl=ExpressPrinting System ReportLink for ExpressDBTree by Developer Express Inc.
+C:\Program Files\Developer Express Inc\ExpressPrinting System\Delphi 7\Lib\dxPSdxInsLnkD7.bpl=ExpressPrinting System ReportLink for ExpressInspector by Developer Express Inc.
+C:\Program Files\Developer Express Inc\ExpressPrinting System\Delphi 7\Lib\dxPSdxOILnkD7.bpl=ExpressPrinting System ReportLink for ExpressRTTIInspector by Developer Express Inc.
+C:\Program Files\Developer Express Inc\ExpressPrinting System\Delphi 7\Lib\dxPSdxMVLnkD7.bpl=ExpressPrinting System ReportLink for ExpressMasterView by Developer Express Inc.
+C:\Program Files\Developer Express Inc\ExpressPrinting System\Delphi 7\Lib\dxPSdxOCLnkD7.bpl=ExpressPrinting System ReportLinks for ExpressOrgChart by Developer Express Inc.
+C:\Program Files\Developer Express Inc\ExpressPrinting System\Delphi 7\Lib\dxPSdxDBOCLnkD7.bpl=ExpressPrinting System ReportLinks for ExpressDBOrgChart by Developer Express Inc.
+C:\Program Files\Developer Express Inc\ExpressPrinting System\Delphi 7\Lib\dxPSdxFCLnkD7.bpl=ExpressPrinting System ReportLinks for ExpressFlowChart by Developer Express Inc.
+C:\Program Files\Developer Express Inc\ExpressPrinting System\Delphi 7\Lib\dxPSdxLCLnkD7.bpl=ExpressPrinting System ReportLink for ExpressLayoutControl by Developer Express Inc.
+C:\Program Files\Developer Express Inc\ExpressPrinting System\Delphi 7\Lib\dxPScxSSLnkD7.bpl=ExpressPrinting System ReportLink for ExpressSpreadSheet by Developer Express Inc.
+C:\Program Files\Developer Express Inc\ExpressPrinting System\Delphi 7\Lib\dxPscxTLLnkD7.bpl=ExpressPrinting System ReportLink for ExpressQuantumTreeList 4 by Developer Express Inc.
+C:\Dev\DataAbstract\Dcu\D7\DataAbstract_ReportBuilder_D7.bpl=(untitled)
+[HistoryLists\hlConditionals]
+Count=1
+Item0=DESIGNTIME
+[HistoryLists\hlUnitAliases]
+Count=1
+Item0=WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;
+[HistoryLists\hlSearchPath]
+Count=1
+Item0=..\Dcu\D7
+[HistoryLists\hlUnitOutputDirectory]
+Count=1
+Item0=..\Dcu\D7
+[HistoryLists\hlBPLOutput]
+Count=1
+Item0=..\Dcu\D7
+[HistoryLists\hlDCPOutput]
+Count=1
+Item0=..\Dcu\D7
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D7.dpk b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D7.dpk
new file mode 100644
index 0000000..4648f41
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D7.dpk	
@@ -0,0 +1,39 @@
+package RemObjects_WebBroker_D7;
+
+{$R *.res}
+{$ALIGN 8}
+{$ASSERTIONS ON}
+{$BOOLEVAL OFF}
+{$DEBUGINFO ON}
+{$EXTENDEDSYNTAX ON}
+{$IMPORTEDDATA ON}
+{$IOCHECKS ON}
+{$LOCALSYMBOLS ON}
+{$LONGSTRINGS ON}
+{$OPENSTRINGS ON}
+{$OPTIMIZATION ON}
+{$OVERFLOWCHECKS OFF}
+{$RANGECHECKS OFF}
+{$REFERENCEINFO ON}
+{$SAFEDIVIDE OFF}
+{$STACKFRAMES OFF}
+{$TYPEDADDRESS OFF}
+{$VARSTRINGCHECKS ON}
+{$WRITEABLECONST OFF}
+{$MINENUMSIZE 1}
+{$IMAGEBASE $400000}
+{$DESCRIPTION 'RemObjects SDK - WebBroker Library'}
+{$IMPLICITBUILD OFF}
+{$DEFINE DESIGNTIME}
+
+requires
+  rtl,
+  vcl,
+  inet,
+  RemObjects_Core_D7;
+
+contains
+  RemObjects_WebBroker_Reg in 'RemObjects_WebBroker_Reg.pas',
+  uROWebBrokerServer in 'uROWebBrokerServer.pas';
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D7.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D7.res
new file mode 100644
index 0000000..3fd3b9b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_D7.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_Glyphs.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_Glyphs.res
new file mode 100644
index 0000000..7bdcb7f
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_Glyphs.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_Reg.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_Reg.pas
new file mode 100644
index 0000000..a823749
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/RemObjects_WebBroker_Reg.pas	
@@ -0,0 +1,38 @@
+unit RemObjects_WebBroker_Reg;
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+{$R RemObjects_WebBroker_Glyphs.res}
+
+interface
+
+procedure Register;
+
+implementation
+
+uses Classes,
+     {$IFDEF BDS}DesignIntf,{$ENDIF}
+     uRORes, uROWebBrokerServer;
+
+procedure Register;
+begin
+  {$IFDEF BDS}
+  ForceDemandLoadState(dlDisable);
+  {$ENDIF}
+  RegisterComponents(str_ProductName,
+                     [TROWebBrokerServer]);
+
+
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/Synapse/blcksock.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/Synapse/blcksock.pas
new file mode 100644
index 0000000..a483f92
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/Synapse/blcksock.pas	
@@ -0,0 +1,4073 @@
+{$IFDEF WIN64}{$DEFINE WIN32}{$ENDIF}
+{==============================================================================|
+| Project : Ararat Synapse                                       | 009.003.002 |
+|==============================================================================|
+| Content: Library base                                                        |
+|==============================================================================|
+| Copyright (c)1999-2007, Lukas Gebauer                                        |
+| All rights reserved.                                                         |
+|                                                                              |
+| Redistribution and use in source and binary forms, with or without           |
+| modification, are permitted provided that the following conditions are met:  |
+|                                                                              |
+| Redistributions of source code must retain the above copyright notice, this  |
+| list of conditions and the following disclaimer.                             |
+|                                                                              |
+| Redistributions in binary form must reproduce the above copyright notice,    |
+| this list of conditions and the following disclaimer in the documentation    |
+| and/or other materials provided with the distribution.                       |
+|                                                                              |
+| Neither the name of Lukas Gebauer nor the names of its contributors may      |
+| be used to endorse or promote products derived from this software without    |
+| specific prior written permission.                                           |
+|                                                                              |
+| THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"  |
+| AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE    |
+| IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE   |
+| ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE FOR  |
+| ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL       |
+| DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR   |
+| SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER   |
+| CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT           |
+| LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY    |
+| OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH  |
+| DAMAGE.                                                                      |
+|==============================================================================|
+| The Initial Developer of the Original Code is Lukas Gebauer (Czech Republic).|
+| Portions created by Lukas Gebauer are Copyright (c)1999-2007.                |
+| All Rights Reserved.                                                         |
+|==============================================================================|
+| Contributor(s):                                                              |
+|==============================================================================|
+| History: see HISTORY.HTM from distribution package                           |
+|          (Found at URL: http://www.ararat.cz/synapse/)                       |
+|==============================================================================}
+
+{
+Special thanks to Gregor Ibic <gregor.ibic@intelicom.si>
+ (Intelicom d.o.o., http://www.intelicom.si)
+ for good inspiration about SSL programming.
+}
+
+{$DEFINE ONCEWINSOCK}
+{Note about define ONCEWINSOCK:
+If you remove this compiler directive, then socket interface is loaded and
+initialized on constructor of TBlockSocket class for each socket separately.
+Socket interface is used only if your need it.
+
+If you leave this directive here, then socket interface is loaded and
+initialized only once at start of your program! It boost performace on high
+count of created and destroyed sockets. It eliminate possible small resource
+leak on Windows systems too.
+}
+
+//{$DEFINE RAISEEXCEPT}
+{When you enable this define, then is Raiseexcept property is on by default
+}
+
+{:@abstract(Synapse's library core)
+
+Core with implementation basic socket classes.
+}
+
+{$IFDEF FPC}
+  {$MODE DELPHI}
+{$ENDIF}
+{$IFDEF VER125}
+  {$DEFINE BCB}
+{$ENDIF}
+{$IFDEF BCB}
+  {$ObjExportAll On}
+{$ENDIF}
+{$Q-}
+{$H+}
+{$M+}
+
+unit blcksock;
+
+interface
+
+uses
+  SysUtils, Classes,
+  synafpc,
+  synsock, synautil, synacode, synaip
+{$IFDEF CIL}
+  ,System.Net
+  ,System.Net.Sockets
+  ,System.Text
+{$ENDIF}
+  ;
+
+const
+
+  SynapseRelease = '38b5';
+
+  cLocalhost = '127.0.0.1';
+  cAnyHost = '0.0.0.0';
+  cBroadcast = '255.255.255.255';
+  c6Localhost = '::1';
+  c6AnyHost = '::0';
+  c6Broadcast = 'ffff::1';
+  cAnyPort = '0';
+  CR = #$0d;
+  LF = #$0a;
+  CRLF = CR + LF;
+  c64k = 65536;
+
+type
+
+  {:@abstract(Exception clas used by Synapse)
+   When you enable generating of exceptions, this exception is raised by
+   Synapse's units.}
+  ESynapseError = class(Exception)
+  private
+    FErrorCode: Integer;
+    FErrorMessage: string;
+  published
+    {:Code of error. Value depending on used operating system}
+    property ErrorCode: Integer read FErrorCode Write FErrorCode;
+    {:Human readable description of error.}
+    property ErrorMessage: string read FErrorMessage Write FErrorMessage;
+  end;
+
+  {:Types of OnStatus events}
+  THookSocketReason = (
+    {:Resolving is begin. Resolved IP and port is in parameter in format like:
+     'localhost.somewhere.com:25'.}
+    HR_ResolvingBegin,
+    {:Resolving is done. Resolved IP and port is in parameter in format like:
+     'localhost.somewhere.com:25'. It is always same as in HR_ResolvingBegin!}
+    HR_ResolvingEnd,
+    {:Socket created by CreateSocket method. It reporting Family of created
+     socket too!}
+    HR_SocketCreate,
+    {:Socket closed by CloseSocket method.}
+    HR_SocketClose,
+    {:Socket binded to IP and Port. Binded IP and Port is in parameter in format
+     like: 'localhost.somewhere.com:25'.}
+    HR_Bind,
+    {:Socket connected to IP and Port. Connected IP and Port is in parameter in
+     format like: 'localhost.somewhere.com:25'.}
+    HR_Connect,
+    {:Called when CanRead method is used with @True result.}
+    HR_CanRead,
+    {:Called when CanWrite method is used with @True result.}
+    HR_CanWrite,
+    {:Socket is swithed to Listen mode. (TCP socket only)}
+    HR_Listen,
+    {:Socket Accepting client connection. (TCP socket only)}
+    HR_Accept,
+    {:report count of bytes readed from socket. Number is in parameter string.
+     If you need is in integer, you must use StrToInt function!}
+    HR_ReadCount,
+    {:report count of bytes writed to socket. Number is in parameter string. If
+     you need is in integer, you must use StrToInt function!}
+    HR_WriteCount,
+    {:If is limiting of bandwidth on, then this reason is called when sending or
+     receiving is stopped for satisfy bandwidth limit. Parameter is count of
+     waiting milliseconds.}
+    HR_Wait,
+    {:report situation where communication error occured. When raiseexcept is
+     @true, then exception is called after this Hook reason.}
+    HR_Error
+    );
+
+  {:Procedural type for OnStatus event. Sender is calling TBlockSocket object,
+   Reason is one of set Status events and value is optional data.}
+  THookSocketStatus = procedure(Sender: TObject; Reason: THookSocketReason;
+    const Value: string) of object;
+
+  {:This procedural type is used for DataFilter hooks.}
+  THookDataFilter = procedure(Sender: TObject; var Value: string) of object;
+
+  {:This procedural type is used for hook OnCreateSocket. By this hook you can
+   insert your code after initialisation of socket. (you can set special socket
+   options, etc.)}
+  THookCreateSocket = procedure(Sender: TObject) of object;
+
+  {:This procedural type is used for monitoring of communication.}
+  THookMonitor = procedure(Sender: TObject; Writing: Boolean;
+    const Buffer: TMemory; Len: Integer) of object;
+
+  {:This procedural type is used for hook OnAfterConnect. By this hook you can
+   insert your code after TCP socket has been sucessfully connected.}
+  THookAfterConnect = procedure(Sender: TObject) of object;
+
+  {:Specify family of socket.}
+  TSocketFamily = (
+    {:Default mode. Socket family is defined by target address for connection.
+     It allows instant access to IPv4 and IPv6 nodes. When you need IPv6 address
+     as destination, then is used IPv6 mode. othervise is used IPv4 mode.
+     However this mode not working properly with preliminary IPv6 supports!}
+    SF_Any,
+    {:Turn this class to pure IPv4 mode. This mode is totally compatible with
+     previous Synapse releases.}
+    SF_IP4,
+    {:Turn to only IPv6 mode.}
+    SF_IP6
+    );
+
+  {:specify possible values of SOCKS modes.}
+  TSocksType = (
+    ST_Socks5,
+    ST_Socks4
+    );
+
+  {:Specify requested SSL/TLS version for secure connection.}
+  TSSLType = (
+    LT_all,
+    LT_SSLv2,
+    LT_SSLv3,
+    LT_TLSv1,
+    LT_TLSv1_1,
+    LT_SSHv2
+    );
+
+  {:Specify type of socket delayed option.}
+  TSynaOptionType = (
+    SOT_Linger,
+    SOT_RecvBuff,
+    SOT_SendBuff,
+    SOT_NonBlock,
+    SOT_RecvTimeout,
+    SOT_SendTimeout,
+    SOT_Reuse,
+    SOT_TTL,
+    SOT_Broadcast,
+    SOT_MulticastTTL,
+    SOT_MulticastLoop
+    );
+
+  {:@abstract(this object is used for remember delayed socket option set.)}
+  TSynaOption = class(TObject)
+  public
+    Option: TSynaOptionType;
+    Enabled: Boolean;
+    Value: Integer;
+  end;
+
+  TCustomSSL = class;
+  TSSLClass = class of TCustomSSL;
+
+  {:@abstract(Basic IP object.)
+   This is parent class for other class with protocol implementations. Do not
+   use this class directly! Use @link(TICMPBlockSocket), @link(TRAWBlockSocket),
+   @link(TTCPBlockSocket) or @link(TUDPBlockSocket) instead.}
+  TBlockSocket = class(TObject)
+  private
+    FOnStatus: THookSocketStatus;
+    FOnReadFilter: THookDataFilter;
+    FOnCreateSocket: THookCreateSocket;
+    FOnMonitor: THookMonitor;
+    FLocalSin: TVarSin;
+    FRemoteSin: TVarSin;
+    FTag: integer;
+    FBuffer: string;
+    FRaiseExcept: Boolean;
+    FNonBlockMode: Boolean;
+    FMaxLineLength: Integer;
+    FMaxSendBandwidth: Integer;
+    FNextSend: LongWord;
+    FMaxRecvBandwidth: Integer;
+    FNextRecv: LongWord;
+    FConvertLineEnd: Boolean;
+    FLastCR: Boolean;
+    FLastLF: Boolean;
+    FBinded: Boolean;
+    FFamily: TSocketFamily;
+    FFamilySave: TSocketFamily;
+    FIP6used: Boolean;
+    FPreferIP4: Boolean;
+    FDelayedOptions: TList;
+    FInterPacketTimeout: Boolean;
+    {$IFNDEF CIL}
+    FFDSet: TFDSet;
+    {$ENDIF}
+    FRecvCounter: Integer;
+    FSendCounter: Integer;
+    FSendMaxChunk: Integer;
+    FStopFlag: Boolean;
+    FNonblockSendTimeout: Integer;
+    function GetSizeRecvBuffer: Integer;
+    procedure SetSizeRecvBuffer(Size: Integer);
+    function GetSizeSendBuffer: Integer;
+    procedure SetSizeSendBuffer(Size: Integer);
+    procedure SetNonBlockMode(Value: Boolean);
+    procedure SetTTL(TTL: integer);
+    function GetTTL:integer;
+    procedure SetFamily(Value: TSocketFamily); virtual;
+    procedure SetSocket(Value: TSocket); virtual;
+    function GetWsaData: TWSAData;
+    function FamilyToAF(f: TSocketFamily): TAddrFamily;
+  protected
+    FSocket: TSocket;
+    FLastError: Integer;
+    FLastErrorDesc: string;
+    procedure SetDelayedOption(const Value: TSynaOption);
+    procedure DelayedOption(const Value: TSynaOption);
+    procedure ProcessDelayedOptions;
+    procedure InternalCreateSocket(Sin: TVarSin);
+    procedure SetSin(var Sin: TVarSin; IP, Port: string);
+    function GetSinIP(Sin: TVarSin): string;
+    function GetSinPort(Sin: TVarSin): Integer;
+    procedure DoStatus(Reason: THookSocketReason; const Value: string);
+    procedure DoReadFilter(Buffer: TMemory; var Len: Integer);
+    procedure DoMonitor(Writing: Boolean; const Buffer: TMemory; Len: Integer);
+    procedure DoCreateSocket;
+    procedure LimitBandwidth(Length: Integer; MaxB: integer; var Next: LongWord);
+    procedure SetBandwidth(Value: Integer);
+    function TestStopFlag: Boolean;
+    procedure InternalSendStream(const Stream: TStream; WithSize, Indy: boolean); virtual;
+  public
+    constructor Create;
+
+    {:Create object and load all necessary socket library. What library is
+     loaded is described by STUB parameter. If STUB is empty string, then is
+     loaded default libraries.}
+    constructor CreateAlternate(Stub: string);
+    destructor Destroy; override;
+
+    {:If @link(family) is not SF_Any, then create socket with type defined in
+     @link(Family) property. If family is SF_Any, then do nothing! (socket is
+     created automaticly when you know what type of socket you need to create.
+     (i.e. inside @link(Connect) or @link(Bind) call.) When socket is created,
+     then is aplyed all stored delayed socket options.}
+    procedure CreateSocket;
+
+    {:It create socket. Address resolving of Value tells what type of socket is
+     created. If Value is resolved as IPv4 IP, then is created IPv4 socket. If
+     value is resolved as IPv6 address, then is created IPv6 socket.}
+    procedure CreateSocketByName(const Value: String);
+
+    {:Destroy socket in use. This method is also automatically called from
+     object destructor.}
+    procedure CloseSocket; virtual;
+
+    {:Abort any work on Socket and destroy them.}
+    procedure AbortSocket; virtual;
+
+    {:Connects socket to local IP address and PORT. IP address may be numeric or
+     symbolic ('192.168.74.50', 'cosi.nekde.cz', 'ff08::1'). The same for PORT
+     - it may be number or mnemonic port ('23', 'telnet').
+
+     If port value is '0', system chooses itself and conects unused port in the
+     range 1024 to 4096 (this depending by operating system!). Structure
+     LocalSin is filled after calling this method.
+
+     Note: If you call this on non-created socket, then socket is created
+     automaticly.
+
+     Warning: when you call : Bind('0.0.0.0','0'); then is nothing done! In this
+     case is used implicit system bind instead.}
+    procedure Bind(IP, Port: string);
+
+    {:Connects socket to remote IP address and PORT. The same rules as with
+     @link(BIND) method are valid. The only exception is that PORT with 0 value
+     will not be connected!
+
+     Structures LocalSin and RemoteSin will be filled with valid values.
+
+     When you call this on non-created socket, then socket is created
+     automaticly. Type of created socket is by @link(Family) property. If is
+     used SF_IP4, then is created socket for IPv4. If is used SF_IP6, then is
+     created socket for IPv6. When you have family on SF_Any (default!), then
+     type of created socket is determined by address resolving of destination
+     address. (Not work properly on prilimitary winsock IPv6 support!)}
+    procedure Connect(IP, Port: string); virtual;
+
+    {:Sends data of LENGTH from BUFFER address via connected socket. System
+     automatically splits data to packets.}
+    function SendBuffer(Buffer: Tmemory; Length: Integer): Integer; virtual;
+
+    {:One data BYTE is sent via connected socket.}
+    procedure SendByte(Data: Byte); virtual;
+
+    {:Send data string via connected socket. Any terminator is not added! If you
+     need send true string with CR-LF termination, you must add CR-LF characters
+     to sended string! Because any termination is not added automaticly, you can
+     use this function for sending any binary data in binary string.}
+    procedure SendString(Data: AnsiString); virtual;
+
+    {:Send integer as four bytes to socket.}
+    procedure SendInteger(Data: integer); virtual;
+
+    {:Send data as one block to socket. Each block begin with 4 bytes with
+     length of data in block. This 4 bytes is added automaticly by this
+     function.}
+    procedure SendBlock(const Data: AnsiString); virtual;
+
+    {:Send data from stream to socket.}
+    procedure SendStreamRaw(const Stream: TStream); virtual;
+
+    {:Send content of stream to socket. It using @link(SendBlock) method}
+    procedure SendStream(const Stream: TStream); virtual;
+
+    {:Send content of stream to socket. It using @link(SendBlock) method and
+    this is compatible with streams in Indy library.}
+    procedure SendStreamIndy(const Stream: TStream); virtual;
+
+    {:Note: This is low-level receive function. You must be sure if data is
+     waiting for read before call this function for avoid deadlock!
+
+     Waits until allocated buffer is filled by received data. Returns number of
+     data received, which equals to LENGTH value under normal operation. If it
+     is not equal the communication channel is possibly broken.
+
+     On stream oriented sockets if is received 0 bytes, it mean 'socket is
+     closed!"
+
+     On datagram socket is readed first waiting datagram.}
+    function RecvBuffer(Buffer: TMemory; Length: Integer): Integer; virtual;
+
+    {:Note: This is high-level receive function. It using internal
+     @link(LineBuffer) and you can combine this function freely with other
+     high-level functions!
+
+     Method waits until data is received. If no data is received within TIMEOUT
+     (in milliseconds) period, @link(LastError) is set to WSAETIMEDOUT. Methods
+     serves for reading any size of data (i.e. one megabyte...). This method is
+     preffered for reading from stream sockets (like TCP).}
+    function RecvBufferEx(Buffer: Tmemory; Len: Integer;
+      Timeout: Integer): Integer; virtual;
+
+    {:Similar to @link(RecvBufferEx), but readed data is stored in binary
+     string, not in memory buffer.}
+    function RecvBufferStr(Length: Integer; Timeout: Integer): AnsiString; virtual;
+
+    {:Note: This is high-level receive function. It using internal
+     @link(LineBuffer) and you can combine this function freely with other
+     high-level functions.
+
+     Waits until one data byte is received which is also returned as function
+     result. If no data is received within TIMEOUT (in milliseconds)period,
+     @link(LastError) is set to WSAETIMEDOUT and result have value 0.}
+    function RecvByte(Timeout: Integer): Byte; virtual;
+
+    {:Note: This is high-level receive function. It using internal
+     @link(LineBuffer) and you can combine this function freely with other
+     high-level functions.
+
+     Waits until one four bytes are received and return it as one Ineger Value.
+     If no data is received within TIMEOUT (in milliseconds)period,
+     @link(LastError) is set to WSAETIMEDOUT and result have value 0.}
+    function RecvInteger(Timeout: Integer): Integer; virtual;
+
+    {:Note: This is high-level receive function. It using internal
+     @link(LineBuffer) and you can combine this function freely with other
+     high-level functions.
+
+     Method waits until data string is received. This string is terminated by
+     CR-LF characters. The resulting string is returned without this termination
+     (CR-LF)! If @link(ConvertLineEnd) is used, then CR-LF sequence may not be
+     exactly CR-LF. See @link(ConvertLineEnd) description. If no data is
+     received within TIMEOUT (in milliseconds) period, @link(LastError) is set
+     to WSAETIMEDOUT. You may also specify maximum length of reading data by
+     @link(MaxLineLength) property.}
+    function RecvString(Timeout: Integer): AnsiString; virtual;
+
+    {:Note: This is high-level receive function. It using internal
+     @link(LineBuffer) and you can combine this function freely with other
+     high-level functions.
+
+     Method waits until data string is received. This string is terminated by
+     Terminator string. The resulting string is returned without this
+     termination. If no data is received within TIMEOUT (in milliseconds)
+     period, @link(LastError) is set to WSAETIMEDOUT. You may also specify
+     maximum length of reading data by @link(MaxLineLength) property.}
+    function RecvTerminated(Timeout: Integer; const Terminator: AnsiString): AnsiString; virtual;
+
+    {:Note: This is high-level receive function. It using internal
+     @link(LineBuffer) and you can combine this function freely with other
+     high-level functions.
+
+     Method reads all data waiting for read. If no data is received within
+     TIMEOUT (in milliseconds) period, @link(LastError) is set to WSAETIMEDOUT.
+     Methods serves for reading unknown size of data. Because before call this
+     function you don't know size of received data, returned data is stored in
+     dynamic size binary string. This method is preffered for reading from
+     stream sockets (like TCP). It is very goot for receiving datagrams too!
+     (UDP protocol)}
+    function RecvPacket(Timeout: Integer): AnsiString; virtual;
+
+    {:Read one block of data from socket. Each block begin with 4 bytes with
+     length of data in block. This function read first 4 bytes for get lenght,
+     then it wait for reported count of bytes.}
+    function RecvBlock(Timeout: Integer): AnsiString; virtual;
+
+    {:Read all data from socket to stream until socket is closed (or any error
+     occured.)}
+    procedure RecvStreamRaw(const Stream: TStream; Timeout: Integer); virtual;
+    {:Read requested count of bytes from socket to stream.}
+    procedure RecvStreamSize(const Stream: TStream; Timeout: Integer; Size: Integer);
+
+    {:Receive data to stream. It using @link(RecvBlock) method.}
+    procedure RecvStream(const Stream: TStream; Timeout: Integer); virtual;
+
+    {:Receive data to stream. This function is compatible with similar function
+    in Indy library. It using @link(RecvBlock) method.}
+    procedure RecvStreamIndy(const Stream: TStream; Timeout: Integer); virtual;
+
+    {:Same as @link(RecvBuffer), but readed data stays in system input buffer.
+    Warning: this function not respect data in @link(LineBuffer)! Is not
+    recommended to use this function!}
+    function PeekBuffer(Buffer: TMemory; Length: Integer): Integer; virtual;
+
+    {:Same as @link(RecvByte), but readed data stays in input system buffer.
+     Warning: this function not respect data in @link(LineBuffer)! Is not
+    recommended to use this function!}
+    function PeekByte(Timeout: Integer): Byte; virtual;
+
+    {:On stream sockets it returns number of received bytes waiting for picking.
+     0 is returned when there is no such data. On datagram socket it returns
+     length of the first waiting datagram. Returns 0 if no datagram is waiting.}
+    function WaitingData: Integer; virtual;
+
+    {:Same as @link(WaitingData), but if exists some of data in @link(Linebuffer),
+     return their length instead.}
+    function WaitingDataEx: Integer;
+
+    {:Clear all waiting data for read from buffers.}
+    procedure Purge;
+
+    {:Sets linger. Enabled linger means that the system waits another LINGER
+     (in milliseconds) time for delivery of sent data. This function is only for
+     stream type of socket! (TCP)}
+    procedure SetLinger(Enable: Boolean; Linger: Integer);
+
+    {:Actualize values in @link(LocalSin).}
+    procedure GetSinLocal;
+
+    {:Actualize values in @link(RemoteSin).}
+    procedure GetSinRemote;
+
+    {:Actualize values in @link(LocalSin) and @link(RemoteSin).}
+    procedure GetSins;
+
+    {:If you "manually" call Socket API functions, forward their return code as
+     parameter to this function, which evaluates it, eventually calls
+     GetLastError and found error code returns and stores to @link(LastError).}
+    function SockCheck(SockResult: Integer): Integer;
+
+    {:If @link(LastError) contains some error code and @link(RaiseExcept)
+     property is @true, raise adequate exception.}
+    procedure ExceptCheck;
+
+    {:Returns local computer name as numerical or symbolic value. It try get
+     fully qualified domain name. Name is returned in the format acceptable by
+     functions demanding IP as input parameter.}
+    function LocalName: string;
+
+    {:Try resolve name to all possible IP address. i.e. If you pass as name
+     result of @link(LocalName) method, you get all IP addresses used by local
+     system.}
+    procedure ResolveNameToIP(Name: string; const IPList: TStrings);
+
+    {:Try resolve name to primary IP address. i.e. If you pass as name result of
+     @link(LocalName) method, you get primary IP addresses used by local system.}
+    function ResolveName(Name: string): string;
+
+    {:Try resolve IP to their primary domain name. If IP not have domain name,
+     then is returned original IP.}
+    function ResolveIPToName(IP: string): string;
+
+    {:Try resolve symbolic port name to port number. (i.e. 'Echo' to 8)}
+    function ResolvePort(Port: string): Word;
+
+    {:Set information about remote side socket. It is good for seting remote
+     side for sending UDP packet, etc.}
+    procedure SetRemoteSin(IP, Port: string);
+
+    {:Picks IP socket address from @link(LocalSin).}
+    function GetLocalSinIP: string; virtual;
+
+    {:Picks IP socket address from @link(RemoteSin).}
+    function GetRemoteSinIP: string; virtual;
+
+    {:Picks socket PORT number from @link(LocalSin).}
+    function GetLocalSinPort: Integer; virtual;
+
+    {:Picks socket PORT number from @link(RemoteSin).}
+    function GetRemoteSinPort: Integer; virtual;
+
+    {:Return @TRUE, if you can read any data from socket or is incoming
+     connection on TCP based socket. Status is tested for time Timeout (in
+     milliseconds). If value in Timeout is 0, status is only tested and
+     continue. If value in Timeout is -1, run is breaked and waiting for read
+     data maybe forever.
+
+     This function is need only on special cases, when you need use
+     @link(RecvBuffer) function directly!}
+    function CanRead(Timeout: Integer): Boolean; virtual;
+
+    {:Same as @link(CanRead), but additionally return @TRUE if is some data in
+     @link(LineBuffer).}
+    function CanReadEx(Timeout: Integer): Boolean; virtual;
+
+    {:Return @TRUE, if you can to socket write any data (not full sending
+     buffer). Status is tested for time Timeout (in milliseconds). If value in
+     Timeout is 0, status is only tested and continue. If value in Timeout is
+     -1, run is breaked and waiting for write data maybe forever.
+
+     This function is need only on special cases!}
+    function CanWrite(Timeout: Integer): Boolean; virtual;
+
+    {:Same as @link(SendBuffer), but send datagram to address from
+     @link(RemoteSin). Usefull for sending reply to datagram received by
+     function @link(RecvBufferFrom).}
+    function SendBufferTo(Buffer: TMemory; Length: Integer): Integer; virtual;
+
+    {:Note: This is low-lever receive function. You must be sure if data is
+     waiting for read before call this function for avoid deadlock!
+
+     Receives first waiting datagram to allocated buffer. If there is no waiting
+     one, then waits until one comes. Returns length of datagram stored in
+     BUFFER. If length exceeds buffer datagram is truncated. After this
+     @link(RemoteSin) structure contains information about sender of UDP packet.}
+    function RecvBufferFrom(Buffer: TMemory; Length: Integer): Integer; virtual;
+{$IFNDEF CIL}
+    {:This function is for check for incoming data on set of sockets. Whitch
+    sockets is checked is decribed by SocketList Tlist with TBlockSocket
+    objects. TList may have maximal number of objects defined by FD_SETSIZE
+    constant. Return @TRUE, if you can from some socket read any data or is
+    incoming connection on TCP based socket. Status is tested for time Timeout
+    (in milliseconds). If value in Timeout is 0, status is only tested and
+    continue. If value in Timeout is -1, run is breaked and waiting for read
+    data maybe forever. If is returned @TRUE, CanReadList TList is filled by all
+    TBlockSocket objects what waiting for read.}
+    function GroupCanRead(const SocketList: TList; Timeout: Integer;
+      const CanReadList: TList): Boolean;
+{$ENDIF}
+    {:By this method you may turn address reuse mode for local @link(bind). It
+     is good specially for UDP protocol. Using this with TCP protocol is
+     hazardous!}
+    procedure EnableReuse(Value: Boolean);
+
+    {:Try set timeout for all sending and receiving operations, if socket
+     provider can do it. (It not supported by all socket providers!)}
+    procedure SetTimeout(Timeout: Integer);
+
+    {:Try set timeout for all sending operations, if socket provider can do it.
+     (It not supported by all socket providers!)}
+    procedure SetSendTimeout(Timeout: Integer);
+
+    {:Try set timeout for all receiving operations, if socket provider can do
+     it. (It not supported by all socket providers!)}
+    procedure SetRecvTimeout(Timeout: Integer);
+
+    {:Return value of socket type.}
+    function GetSocketType: integer; Virtual;
+
+    {:Return value of protocol type for socket creation.}
+    function GetSocketProtocol: integer; Virtual;
+
+    {:WSA structure with information about socket provider. On linux is this
+     structure simulated!}
+    property WSAData: TWSADATA read GetWsaData;
+
+    {:Structure describing local socket side.}
+    property LocalSin: TVarSin read FLocalSin write FLocalSin;
+
+    {:Structure describing remote socket side.}
+    property RemoteSin: TVarSin read FRemoteSin write FRemoteSin;
+
+    {:Socket handler. Suitable for "manual" calls to socket API or manual
+     connection of socket to a previously created socket (i.e by Accept method
+     on TCP socket)}
+    property Socket: TSocket read FSocket write SetSocket;
+
+    {:Last socket operation error code. Error codes are described in socket
+     documentation. Human readable error description is stored in
+     @link(LastErrorDesc) property.}
+    property LastError: Integer read FLastError;
+
+    {:Human readable error description of @link(LastError) code.}
+    property LastErrorDesc: string read FLastErrorDesc;
+
+    {:Buffer used by all high-level receiving functions. This buffer is used for
+     optimized reading of data from socket. In normal cases you not need access
+     to this buffer directly!}
+    property LineBuffer: string read FBuffer write FBuffer;
+
+    {:Size of Winsock receive buffer. If it is not supported by socket provider,
+     it return as size one kilobyte.}
+    property SizeRecvBuffer: Integer read GetSizeRecvBuffer write SetSizeRecvBuffer;
+
+    {:Size of Winsock send buffer. If it is not supported by socket provider, it
+     return as size one kilobyte.}
+    property SizeSendBuffer: Integer read GetSizeSendBuffer write SetSizeSendBuffer;
+
+    {:If @True, turn class to non-blocking mode. Not all functions are working
+     properly in this mode, you must know exactly what you are doing! However
+     when you have big experience with non-blocking programming, then you can
+     optimise your program by non-block mode!}
+    property NonBlockMode: Boolean read FNonBlockMode Write SetNonBlockMode;
+
+    {:Set Time-to-live value. (if system supporting it!)}
+    property TTL: Integer read GetTTL Write SetTTL;
+
+    {:If is @true, then class in in IPv6 mode.}
+    property IP6used: Boolean read FIP6used;
+
+    {:Return count of received bytes on this socket from begin of current
+     connection.}
+    property RecvCounter: Integer read FRecvCounter;
+
+    {:Return count of sended bytes on this socket from begin of current
+     connection.}
+    property SendCounter: Integer read FSendCounter;
+  published
+    {:Return descriptive string for given error code. This is class function.
+     You may call it without created object!}
+    class function GetErrorDesc(ErrorCode: Integer): string;
+
+    {:this value is for free use.}
+    property Tag: Integer read FTag write FTag;
+
+    {:If @true, winsock errors raises exception. Otherwise is setted
+    @link(LastError) value only and you must check it from your program! Default
+    value is @false.}
+    property RaiseExcept: Boolean read FRaiseExcept write FRaiseExcept;
+
+    {:Define maximum length in bytes of @link(LineBuffer) for high-level
+     receiving functions. If this functions try to read more data then this
+     limit, error is returned! If value is 0 (default), no limitation is used.
+     This is very good protection for stupid attacks to your server by sending
+     lot of data without proper terminator... until all your memory is allocated
+     by LineBuffer!
+
+     Note: This maximum length is checked only in functions, what read unknown
+     number of bytes! (like @link(RecvString) or @link(RecvTerminated))}
+    property MaxLineLength: Integer read FMaxLineLength Write FMaxLineLength;
+
+    {:Define maximal bandwidth for all sending operations in bytes per second.
+     If value is 0 (default), bandwidth limitation is not used.}
+    property MaxSendBandwidth: Integer read FMaxSendBandwidth Write FMaxSendBandwidth;
+
+    {:Define maximal bandwidth for all receiving operations in bytes per second.
+     If value is 0 (default), bandwidth limitation is not used.}
+    property MaxRecvBandwidth: Integer read FMaxRecvBandwidth Write FMaxRecvBandwidth;
+
+    {:Define maximal bandwidth for all sending and receiving operations in bytes
+     per second. If value is 0 (default), bandwidth limitation is not used.}
+    property MaxBandwidth: Integer Write SetBandwidth;
+
+    {:Do a conversion of non-standard line terminators to CRLF. (Off by default)
+     If @True, then terminators like sigle CR, single LF or LFCR are converted
+     to CRLF internally. This have effect only in @link(RecvString) method!}
+    property ConvertLineEnd: Boolean read FConvertLineEnd Write FConvertLineEnd;
+
+    {:Specified Family of this socket. When you are using Windows preliminary
+     support for IPv6, then I recommend to set this property!}
+    property Family: TSocketFamily read FFamily Write SetFamily;
+
+    {:When resolving of domain name return both IPv4 and IPv6 addresses, then
+     specify if is used IPv4 (dafault - @true) or IPv6.}
+    property PreferIP4: Boolean read FPreferIP4 Write FPreferIP4;
+
+    {:By default (@true) is all timeouts used as timeout between two packets in
+     reading operations. If you set this to @false, then Timeouts is for overall
+     reading operation!}
+    property InterPacketTimeout: Boolean read FInterPacketTimeout Write FInterPacketTimeout;
+
+    {:All sended datas was splitted by this value.}
+    property SendMaxChunk: Integer read FSendMaxChunk Write FSendMaxChunk;
+
+    {:By setting this property to @true you can stop any communication. You can
+     use this property for soft abort of communication.}
+    property StopFlag: Boolean read FStopFlag Write FStopFlag;
+
+    {:Timeout for data sending by non-blocking socket mode.}
+    property NonblockSendTimeout: Integer read FNonblockSendTimeout Write FNonblockSendTimeout;
+
+    {:This event is called by various reasons. It is good for monitoring socket,
+     create gauges for data transfers, etc.}
+    property OnStatus: THookSocketStatus read FOnStatus write FOnStatus;
+
+    {:this event is good for some internal thinks about filtering readed datas.
+     It is used by telnet client by example.}
+    property OnReadFilter: THookDataFilter read FOnReadFilter write FOnReadFilter;
+
+    {:This event is called after real socket creation for setting special socket
+     options, because you not know when socket is created. (it is depended on
+     Ipv4, IPv6 or automatic mode)}
+    property OnCreateSocket: THookCreateSocket read FOnCreateSocket write FOnCreateSocket;
+
+    {:This event is good for monitoring content of readed or writed datas.}
+    property OnMonitor: THookMonitor read FOnMonitor write FOnMonitor;
+  end;
+
+  {:@abstract(Support for SOCKS4 and SOCKS5 proxy)
+   Layer with definition all necessary properties and functions for
+   implementation SOCKS proxy client. Do not use this class directly.}
+  TSocksBlockSocket = class(TBlockSocket)
+  protected
+    FSocksIP: string;
+    FSocksPort: string;
+    FSocksTimeout: integer;
+    FSocksUsername: string;
+    FSocksPassword: string;
+    FUsingSocks: Boolean;
+    FSocksResolver: Boolean;
+    FSocksLastError: integer;
+    FSocksResponseIP: string;
+    FSocksResponsePort: string;
+    FSocksLocalIP: string;
+    FSocksLocalPort: string;
+    FSocksRemoteIP: string;
+    FSocksRemotePort: string;
+    FBypassFlag: Boolean;
+    FSocksType: TSocksType;
+    function SocksCode(IP, Port: string): string;
+    function SocksDecode(Value: string): integer;
+  public
+    constructor Create;
+
+    {:Open connection to SOCKS proxy and if @link(SocksUsername) is set, do
+     authorisation to proxy. This is needed only in special cases! (it is called
+     internally!)}
+    function SocksOpen: Boolean;
+
+    {:Send specified request to SOCKS proxy. This is needed only in special
+     cases! (it is called internally!)}
+    function SocksRequest(Cmd: Byte; const IP, Port: string): Boolean;
+
+    {:Receive response to previosly sended request. This is needed only in
+     special cases! (it is called internally!)}
+    function SocksResponse: Boolean;
+
+    {:Is @True when class is using SOCKS proxy.}
+    property UsingSocks: Boolean read FUsingSocks;
+
+    {:If SOCKS proxy failed, here is error code returned from SOCKS proxy.}
+    property SocksLastError: integer read FSocksLastError;
+  published
+    {:Address of SOCKS server. If value is empty string, SOCKS support is
+     disabled. Assingning any value to this property enable SOCKS mode.
+     Warning: You cannot combine this mode with HTTP-tunneling mode!}
+    property SocksIP: string read FSocksIP write FSocksIP;
+
+    {:Port of SOCKS server. Default value is '1080'.}
+    property SocksPort: string read FSocksPort write FSocksPort;
+
+    {:If you need authorisation on SOCKS server, set username here.}
+    property SocksUsername: string read FSocksUsername write FSocksUsername;
+
+    {:If you need authorisation on SOCKS server, set password here.}
+    property SocksPassword: string read FSocksPassword write FSocksPassword;
+
+    {:Specify timeout for communicatin with SOCKS server. Default is one minute.}
+    property SocksTimeout: integer read FSocksTimeout write FSocksTimeout;
+
+    {:If @True, all symbolic names of target hosts is not translated to IP's
+     locally, but resolving is by SOCKS proxy. Default is @True.}
+    property SocksResolver: Boolean read FSocksResolver write FSocksResolver;
+
+    {:Specify SOCKS type. By default is used SOCKS5, but you can use SOCKS4 too.
+     When you select SOCKS4, then if @link(SOCKSResolver) is enabled, then is
+     used SOCKS4a. Othervise is used pure SOCKS4.}
+    property SocksType: TSocksType read FSocksType write FSocksType;
+  end;
+
+  {:@abstract(Implementation of TCP socket.)
+   Supported features: IPv4, IPv6, SSL/TLS or SSH (depending on used plugin),
+   SOCKS5 proxy (outgoing connections and limited incomming), SOCKS4/4a proxy
+   (outgoing connections and limited incomming), TCP through HTTP proxy tunnel.}
+  TTCPBlockSocket = class(TSocksBlockSocket)
+  protected
+    FOnAfterConnect: THookAfterConnect;
+    FSSL: TCustomSSL;
+    FHTTPTunnelIP: string;
+    FHTTPTunnelPort: string;
+    FHTTPTunnel: Boolean;
+    FHTTPTunnelRemoteIP: string;
+    FHTTPTunnelRemotePort: string;
+    FHTTPTunnelUser: string;
+    FHTTPTunnelPass: string;
+    FHTTPTunnelTimeout: integer;
+    procedure SocksDoConnect(IP, Port: string);
+    procedure HTTPTunnelDoConnect(IP, Port: string);
+    procedure DoAfterConnect;
+  public
+    {:Create TCP socket class with default plugin for SSL/TSL/SSH implementation
+    (see @link(SSLImplementation))}
+    constructor Create;
+
+    {:Create TCP socket class with desired plugin for SSL/TSL/SSH implementation}
+    constructor CreateWithSSL(SSLPlugin: TSSLClass);
+    destructor Destroy; override;
+
+    {:See @link(TBlockSocket.CloseSocket)}
+    procedure CloseSocket; override;
+
+    {:See @link(TBlockSocket.WaitingData)}
+    function WaitingData: Integer; override;
+
+    {:Sets socket to receive mode for new incoming connections. It is necessary
+     to use @link(TBlockSocket.BIND) function call before this method to select
+     receiving port!
+
+     If you use SOCKS, activate incoming TCP connection by this proxy. (By BIND
+     method of SOCKS.)}
+    procedure Listen; virtual;
+
+    {:Waits until new incoming connection comes. After it comes a new socket is
+     automatically created (socket handler is returned by this function as
+     result).
+
+     If you use SOCKS, new socket is not created! In this case is used same
+     socket as socket for listening! So, you can accept only one connection in
+     SOCKS mode.}
+    function Accept: TSocket;
+
+    {:Connects socket to remote IP address and PORT. The same rules as with
+     @link(TBlockSocket.BIND) method are valid. The only exception is that PORT
+     with 0 value will not be connected. After call to this method
+     a communication channel between local and remote socket is created. Local
+     socket is assigned automatically if not controlled by previous call to
+     @link(TBlockSocket.BIND) method. Structures @link(TBlockSocket.LocalSin)
+     and @link(TBlockSocket.RemoteSin) will be filled with valid values.
+
+     If you use SOCKS, activate outgoing TCP connection by SOCKS proxy specified
+     in @link(TSocksBlockSocket.SocksIP). (By CONNECT method of SOCKS.)
+
+     If you use HTTP-tunnel mode, activate outgoing TCP connection by HTTP
+     tunnel specified in @link(HTTPTunnelIP). (By CONNECT method of HTTP
+     protocol.)
+
+     Note: If you call this on non-created socket, then socket is created
+     automaticly.}
+    procedure Connect(IP, Port: string); override;
+
+    {:If you need upgrade existing TCP connection to SSL/TLS (or SSH2, if plugin
+     allows it) mode, then call this method. This method switch this class to
+     SSL mode and do SSL/TSL handshake.}
+    procedure SSLDoConnect;
+
+    {:By this method you can downgrade existing SSL/TLS connection to normal TCP
+     connection.}
+    procedure SSLDoShutdown;
+
+    {:If you need use this component as SSL/TLS TCP server, then after accepting
+     of inbound connection you need start SSL/TLS session by this method. Before
+     call this function, you must have assigned all neeeded certificates and
+     keys!}
+    function SSLAcceptConnection: Boolean;
+
+    {:See @link(TBlockSocket.GetLocalSinIP)}
+    function GetLocalSinIP: string; override;
+
+    {:See @link(TBlockSocket.GetRemoteSinIP)}
+    function GetRemoteSinIP: string; override;
+
+    {:See @link(TBlockSocket.GetLocalSinPort)}
+    function GetLocalSinPort: Integer; override;
+
+    {:See @link(TBlockSocket.GetRemoteSinPort)}
+    function GetRemoteSinPort: Integer; override;
+
+    {:See @link(TBlockSocket.SendBuffer)}
+    function SendBuffer(Buffer: TMemory; Length: Integer): Integer; override;
+
+    {:See @link(TBlockSocket.RecvBuffer)}
+    function RecvBuffer(Buffer: TMemory; Len: Integer): Integer; override;
+
+    {:Return value of socket type. For TCP return SOCK_STREAM.}
+    function GetSocketType: integer; override;
+
+    {:Return value of protocol type for socket creation. For TCP return
+     IPPROTO_TCP.}
+    function GetSocketProtocol: integer; override;
+
+    {:Class implementing SSL/TLS support. It is allways some descendant
+     of @link(TCustomSSL) class. When programmer not select some SSL plugin
+     class, then is used @link(TSSLNone)}
+    property SSL: TCustomSSL read FSSL;
+
+    {:@True if is used HTTP tunnel mode.}
+    property HTTPTunnel: Boolean read FHTTPTunnel;
+  published
+    {:Specify IP address of HTTP proxy. Assingning non-empty value to this
+     property enable HTTP-tunnel mode. This mode is for tunnelling any outgoing
+     TCP connection through HTTP proxy server. (If policy on HTTP proxy server
+     allow this!) Warning: You cannot combine this mode with SOCK5 mode!}
+    property HTTPTunnelIP: string read FHTTPTunnelIP Write FHTTPTunnelIP;
+
+    {:Specify port of HTTP proxy for HTTP-tunneling.}
+    property HTTPTunnelPort: string read FHTTPTunnelPort Write FHTTPTunnelPort;
+
+    {:Specify authorisation username for access to HTTP proxy in HTTP-tunnel
+     mode. If you not need authorisation, then let this property empty.}
+    property HTTPTunnelUser: string read FHTTPTunnelUser Write FHTTPTunnelUser;
+
+    {:Specify authorisation password for access to HTTP proxy in HTTP-tunnel
+     mode.}
+    property HTTPTunnelPass: string read FHTTPTunnelPass Write FHTTPTunnelPass;
+
+    {:Specify timeout for communication with HTTP proxy in HTTPtunnel mode.}
+    property HTTPTunnelTimeout: integer read FHTTPTunnelTimeout Write FHTTPTunnelTimeout;
+
+    {:This event is called after sucessful TCP socket connection.}
+    property OnAfterConnect: THookAfterConnect read FOnAfterConnect write FOnAfterConnect;
+  end;
+
+  {:@abstract(Datagram based communication)
+   This class implementing datagram based communication instead default stream
+   based communication style.}
+  TDgramBlockSocket = class(TSocksBlockSocket)
+  public
+    {:Fill @link(TBlockSocket.RemoteSin) structure. This address is used for
+     sending data.}
+    procedure Connect(IP, Port: string); override;
+
+    {:Silently redirected to @link(TBlockSocket.SendBufferTo).}
+    function SendBuffer(Buffer: TMemory; Length: Integer): Integer; override;
+
+    {:Silently redirected to @link(TBlockSocket.RecvBufferFrom).}
+    function RecvBuffer(Buffer: TMemory; Length: Integer): Integer; override;
+  end;
+
+  {:@abstract(Implementation of UDP socket.)
+   NOTE: in this class is all receiving redirected to RecvBufferFrom. You can
+   use for reading any receive function. Preffered is RecvPacket! Similary all
+   sending is redirected to SendbufferTo. You can use for sending UDP packet any
+   sending function, like SendString.
+
+   Supported features: IPv4, IPv6, unicasts, broadcasts, multicasts, SOCKS5
+   proxy (only unicasts! Outgoing and incomming.)}
+  TUDPBlockSocket = class(TDgramBlockSocket)
+  protected
+    FSocksControlSock: TTCPBlockSocket;
+    function UdpAssociation: Boolean;
+    procedure SetMulticastTTL(TTL: integer);
+    function GetMulticastTTL:integer;
+  public
+    destructor Destroy; override;
+
+    {:Enable or disable sending of broadcasts. If seting OK, result is @true.
+     This method is not supported in SOCKS5 mode! IPv6 does not support
+     broadcasts! In this case you must use Multicasts instead.}
+    procedure EnableBroadcast(Value: Boolean);
+
+    {:See @link(TBlockSocket.SendBufferTo)}
+    function SendBufferTo(Buffer: TMemory; Length: Integer): Integer; override;
+
+    {:See @link(TBlockSocket.RecvBufferFrom)}
+    function RecvBufferFrom(Buffer: TMemory; Length: Integer): Integer; override;
+{$IFNDEF CIL}
+    {:Add this socket to given multicast group. You cannot use Multicasts in
+     SOCKS mode!}
+    procedure AddMulticast(MCastIP:string);
+
+    {:Remove this socket from given multicast group.}
+    procedure DropMulticast(MCastIP:string);
+{$ENDIF}
+    {:All sended multicast datagrams is loopbacked to your interface too. (you
+     can read your sended datas.) You can disable this feature by this function.
+     This function not working on some Windows systems!}
+    procedure EnableMulticastLoop(Value: Boolean);
+
+    {:Return value of socket type. For UDP return SOCK_DGRAM.}
+    function GetSocketType: integer; override;
+
+    {:Return value of protocol type for socket creation. For UDP return
+     IPPROTO_UDP.}
+    function GetSocketProtocol: integer; override;
+
+    {:Set Time-to-live value for multicasts packets. It define number of routers
+     for transfer of datas. If you set this to 1 (dafault system value), then
+     multicasts packet goes only to you local network. If you need transport
+     multicast packet to worldwide, then increase this value, but be carefull,
+     lot of routers on internet does not transport multicasts packets!}
+    property MulticastTTL: Integer read GetMulticastTTL Write SetMulticastTTL;
+  end;
+
+  {:@abstract(Implementation of RAW ICMP socket.)
+   For this object you must have rights for creating RAW sockets!}
+  TICMPBlockSocket = class(TDgramBlockSocket)
+  public
+    {:Return value of socket type. For RAW and ICMP return SOCK_RAW.}
+    function GetSocketType: integer; override;
+
+    {:Return value of protocol type for socket creation. For ICMP returns
+     IPPROTO_ICMP or IPPROTO_ICMPV6}
+    function GetSocketProtocol: integer; override;
+  end;
+
+  {:@abstract(Implementation of RAW socket.)
+   For this object you must have rights for creating RAW sockets!}
+  TRAWBlockSocket = class(TBlockSocket)
+  public
+    {:Return value of socket type. For RAW and ICMP return SOCK_RAW.}
+    function GetSocketType: integer; override;
+
+    {:Return value of protocol type for socket creation. For RAW returns
+     IPPROTO_RAW.}
+    function GetSocketProtocol: integer; override;
+  end;
+
+  {:@abstract(Parent class for all SSL plugins.)
+   This is abstract class defining interface for other SSL plugins.
+
+   Instance of this class will be created for each @link(TTCPBlockSocket).
+
+   Warning: not all methods and propertis can work in all existing SSL plugins!
+   Please, read documentation of used SSL plugin.}
+  TCustomSSL = class(TObject)
+  protected
+    FSocket: TTCPBlockSocket;
+    FSSLEnabled: Boolean;
+    FLastError: integer;
+    FLastErrorDesc: string;
+    FSSLType: TSSLType;
+    FKeyPassword: string;
+    FCiphers: string;
+    FCertificateFile: string;
+    FPrivateKeyFile: string;
+    FCertificate: string;
+    FPrivateKey: string;
+    FPFX: string;
+    FPFXfile: string;
+    FCertCA: string;
+    FCertCAFile: string;
+    FTrustCertificate: string;
+    FTrustCertificateFile: string;
+    FVerifyCert: Boolean;
+    FUsername: string;
+    FPassword: string;
+    FSSHChannelType: string;
+    FSSHChannelArg1: string;
+    FSSHChannelArg2: string;
+    procedure ReturnError;
+    function CreateSelfSignedCert(Host: string): Boolean; virtual;
+  public
+    {: Create plugin class. it is called internally from @link(TTCPBlockSocket)}
+    constructor Create(const Value: TTCPBlockSocket); virtual;
+
+    {: Assign settings (certificates and configuration) from another SSL plugin
+     class.}
+    procedure Assign(const Value: TCustomSSL); virtual;
+
+    {: return description of used plugin. It usually return name and version
+     of used SSL library.}
+    function LibVersion: String; virtual;
+
+    {: return name of used plugin.}
+    function LibName: String; virtual;
+
+    {: Do not call this directly. It is used internally by @link(TTCPBlockSocket)!
+
+     Here is needed code for start SSL connection.}
+    function Connect: boolean; virtual;
+
+    {: Do not call this directly. It is used internally by @link(TTCPBlockSocket)!
+
+     Here is needed code for acept new SSL connection.}
+    function Accept: boolean; virtual;
+
+    {: Do not call this directly. It is used internally by @link(TTCPBlockSocket)!
+
+     Here is needed code for hard shutdown of SSL connection. (for example,
+     before socket is closed)}
+    function Shutdown: boolean; virtual;
+
+    {: Do not call this directly. It is used internally by @link(TTCPBlockSocket)!
+
+     Here is needed code for soft shutdown of SSL connection. (for example,
+     when you need to continue with unprotected connection.)}
+    function BiShutdown: boolean; virtual;
+
+    {: Do not call this directly. It is used internally by @link(TTCPBlockSocket)!
+
+     Here is needed code for sending some datas by SSL connection.}
+    function SendBuffer(Buffer: TMemory; Len: Integer): Integer; virtual;
+
+    {: Do not call this directly. It is used internally by @link(TTCPBlockSocket)!
+
+     Here is needed code for receiving some datas by SSL connection.}
+    function RecvBuffer(Buffer: TMemory; Len: Integer): Integer; virtual;
+
+    {: Do not call this directly. It is used internally by @link(TTCPBlockSocket)!
+
+     Here is needed code for getting count of datas what waiting for read.
+     If SSL plugin not allows this, then it should return 0.}
+    function WaitingData: Integer; virtual;
+
+    {:Return string with identificator of SSL/TLS version of existing
+     connection.}
+    function GetSSLVersion: string; virtual;
+
+    {:Return subject of remote SSL peer.}
+    function GetPeerSubject: string; virtual;
+
+    {:Return issuer certificate of remote SSL peer.}
+    function GetPeerIssuer: string; virtual;
+
+    {:Return peer name from remote side certificate. This is good for verify,
+     if certificate is generated for remote side IP name.}
+    function GetPeerName: string; virtual;
+
+    {:Return fingerprint of remote SSL peer.}
+    function GetPeerFingerprint: string; virtual;
+
+    {:Return all detailed information about certificate from remote side of
+     SSL/TLS connection. Result string can be multilined! Each plugin can return
+     this informations in different format!}
+    function GetCertInfo: string; virtual;
+
+    {:Return currently used Cipher.}
+    function GetCipherName: string; virtual;
+
+    {:Return currently used number of bits in current Cipher algorythm.}
+    function GetCipherBits: integer; virtual;
+
+    {:Return number of bits in current Cipher algorythm.}
+    function GetCipherAlgBits: integer; virtual;
+
+    {:Return result value of verify remote side certificate. Look to OpenSSL
+     documentation for possible values. For example 0 is successfuly verified
+     certificate, or 18 is self-signed certificate.}
+    function GetVerifyCert: integer; virtual;
+
+    {: Resurn @true if SSL mode is enabled on existing cvonnection.}
+    property SSLEnabled: Boolean read FSSLEnabled;
+
+    {:Return error code of last SSL operation. 0 is OK.}
+    property LastError: integer read FLastError;
+
+    {:Return error description of last SSL operation.}
+    property LastErrorDesc: string read FLastErrorDesc;
+  published
+    {:Here you can specify requested SSL/TLS mode. Default is autodetection, but
+     on some servers autodetection not working properly. In this case you must
+     specify requested SSL/TLS mode by your hand!}
+    property SSLType: TSSLType read FSSLType write FSSLType;
+
+    {:Password for decrypting of encoded certificate or key.}
+    property KeyPassword: string read FKeyPassword write FKeyPassword;
+
+    {:Username for possible credentials.}
+    property Username: string read FUsername write FUsername;
+
+    {:password for possible credentials.}
+    property Password: string read FPassword write FPassword;
+
+    {:By this property you can modify default set of SSL/TLS ciphers.}
+    property Ciphers: string read FCiphers write FCiphers;
+
+    {:Used for loading certificate from disk file. See to plugin documentation
+     if this method is supported and how!}
+    property CertificateFile: string read FCertificateFile write FCertificateFile;
+
+    {:Used for loading private key from disk file. See to plugin documentation
+     if this method is supported and how!}
+    property PrivateKeyFile: string read FPrivateKeyFile write FPrivateKeyFile;
+
+    {:Used for loading certificate from binary string. See to plugin documentation
+     if this method is supported and how!}
+    property Certificate: string read FCertificate write FCertificate;
+
+    {:Used for loading private key from binary string. See to plugin documentation
+     if this method is supported and how!}
+    property PrivateKey: string read FPrivateKey write FPrivateKey;
+
+    {:Used for loading PFX from binary string. See to plugin documentation
+     if this method is supported and how!}
+    property PFX: string read FPFX write FPFX;
+
+    {:Used for loading PFX from disk file. See to plugin documentation
+     if this method is supported and how!}
+    property PFXfile: string read FPFXfile write FPFXfile;
+
+    {:Used for loading trusted certificates from disk file. See to plugin documentation
+     if this method is supported and how!}
+    property TrustCertificateFile: string read FTrustCertificateFile write FTrustCertificateFile;
+
+    {:Used for loading trusted certificates from binary string. See to plugin documentation
+     if this method is supported and how!}
+    property TrustCertificate: string read FTrustCertificate write FTrustCertificate;
+
+    {:Used for loading CA certificates from binary string. See to plugin documentation
+     if this method is supported and how!}
+    property CertCA: string read FCertCA write FCertCA;
+
+    {:Used for loading CA certificates from disk file. See to plugin documentation
+     if this method is supported and how!}
+    property CertCAFile: string read FCertCAFile write FCertCAFile;
+
+    {:If @true, then is verified client certificate. (it is good for writing
+     SSL/TLS servers.) When you are not server, but you are client, then if this
+     property is @true, verify servers certificate.}
+    property VerifyCert: Boolean read FVerifyCert write FVerifyCert;
+
+    {:channel type for possible SSH connections}
+    property SSHChannelType: string read FSSHChannelType write FSSHChannelType;
+
+    {:First argument of channel type for possible SSH connections}
+    property SSHChannelArg1: string read FSSHChannelArg1 write FSSHChannelArg1;
+
+    {:Second argument of channel type for possible SSH connections}
+    property SSHChannelArg2: string read FSSHChannelArg2 write FSSHChannelArg2;
+  end;
+
+  {:@abstract(Default SSL plugin with no SSL support.)
+   Dummy SSL plugin implementation for applications without SSL/TLS support.}
+  TSSLNone = class (TCustomSSL)
+  public
+    {:See @inherited}
+    function LibVersion: String; override;
+    {:See @inherited}
+    function LibName: String; override;
+  end;
+
+  {:@abstract(Record with definition of IP packet header.)
+   For reading data from ICMP or RAW sockets.}
+  TIPHeader = record
+    VerLen: Byte;
+    TOS: Byte;
+    TotalLen: Word;
+    Identifer: Word;
+    FragOffsets: Word;
+    TTL: Byte;
+    Protocol: Byte;
+    CheckSum: Word;
+    SourceIp: LongWord;
+    DestIp: LongWord;
+    Options: LongWord;
+  end;
+
+  {:@abstract(Parent class of application protocol implementations.)
+   By this class is defined common properties.}
+  TSynaClient = Class(TObject)
+  protected
+    FTargetHost: string;
+    FTargetPort: string;
+    FIPInterface: string;
+    FTimeout: integer;
+    FUserName: string;
+    FPassword: string;
+  public
+    constructor Create;
+  published
+    {:Specify terget server IP (or symbolic name). Default is 'localhost'.}
+    property TargetHost: string read FTargetHost Write FTargetHost;
+
+    {:Specify terget server port (or symbolic name).}
+    property TargetPort: string read FTargetPort Write FTargetPort;
+
+    {:Defined local socket address. (outgoing IP address). By default is used
+     '0.0.0.0' as wildcard for default IP.}
+    property IPInterface: string read FIPInterface Write FIPInterface;
+
+    {:Specify default timeout for socket operations.}
+    property Timeout: integer read FTimeout Write FTimeout;
+
+    {:If protocol need user authorization, then fill here username.}
+    property UserName: string read FUserName Write FUserName;
+
+    {:If protocol need user authorization, then fill here password.}
+    property Password: string read FPassword Write FPassword;
+  end;
+
+var
+  {:Selected SSL plugin. Default is @link(TSSLNone).
+
+   Do not change this value directly!!!
+
+   Just add your plugin unit to your project uses instead. Each plugin unit have
+   initialization code what modify this variable.}
+  SSLImplementation: TSSLClass = TSSLNone;
+
+implementation
+
+{$IFDEF ONCEWINSOCK}
+var
+  WsaDataOnce: TWSADATA;
+  e: ESynapseError;
+{$ENDIF}
+
+
+constructor TBlockSocket.Create;
+begin
+  CreateAlternate('');
+end;
+
+constructor TBlockSocket.CreateAlternate(Stub: string);
+{$IFNDEF ONCEWINSOCK}
+var
+  e: ESynapseError;
+{$ENDIF}
+begin
+  inherited Create;
+  FDelayedOptions := TList.Create;
+  FRaiseExcept := False;
+{$IFDEF RAISEEXCEPT}
+  FRaiseExcept := True;
+{$ENDIF}
+  FSocket := INVALID_SOCKET;
+  FBuffer := '';
+  FLastCR := False;
+  FLastLF := False;
+  FBinded := False;
+  FNonBlockMode := False;
+  FMaxLineLength := 0;
+  FMaxSendBandwidth := 0;
+  FNextSend := 0;
+  FMaxRecvBandwidth := 0;
+  FNextRecv := 0;
+  FConvertLineEnd := False;
+  FFamily := SF_Any;
+  FFamilySave := SF_Any;
+  FIP6used := False;
+  FPreferIP4 := True;
+  FInterPacketTimeout := True;
+  FRecvCounter := 0;
+  FSendCounter := 0;
+  FSendMaxChunk := c64k;
+  FStopFlag := False;
+  FNonblockSendTimeout := 15000;
+{$IFNDEF ONCEWINSOCK}
+  if Stub = '' then
+    Stub := DLLStackName;
+  if not InitSocketInterface(Stub) then
+  begin
+    e := ESynapseError.Create('Error loading Socket interface (' + Stub + ')!');
+    e.ErrorCode := 0;
+    e.ErrorMessage := 'Error loading Socket interface (' + Stub + ')!';
+    raise e;
+  end;
+  SockCheck(synsock.WSAStartup(WinsockLevel, FWsaDataOnce));
+  ExceptCheck;
+{$ENDIF}
+end;
+
+destructor TBlockSocket.Destroy;
+var
+  n: integer;
+  p: TSynaOption;
+begin
+  CloseSocket;
+{$IFNDEF ONCEWINSOCK}
+  synsock.WSACleanup;
+  DestroySocketInterface;
+{$ENDIF}
+  for n := FDelayedOptions.Count - 1 downto 0 do
+    begin
+      p := TSynaOption(FDelayedOptions[n]);
+      p.Free;
+    end;
+  FDelayedOptions.Free;
+  inherited Destroy;
+end;
+
+function TBlockSocket.FamilyToAF(f: TSocketFamily): TAddrFamily;
+begin
+  case f of
+    SF_ip4:
+      Result := AF_INET;
+    SF_ip6:
+      Result := AF_INET6;
+  else
+    Result := AF_UNSPEC;
+  end;
+end;
+
+procedure TBlockSocket.SetDelayedOption(const Value: TSynaOption);
+var
+  li: TLinger;
+  x: integer;
+  buf: TMemory;
+begin
+  case value.Option of
+    SOT_Linger:
+      begin
+        {$IFDEF CIL}
+        li := TLinger.Create(Value.Enabled, Value.Value div 1000);
+        synsock.SetSockOptObj(FSocket, integer(SOL_SOCKET), integer(SO_LINGER), li);
+        {$ELSE}
+        li.l_onoff := Ord(Value.Enabled);
+        li.l_linger := Value.Value div 1000;
+        buf := @li;
+        synsock.SetSockOpt(FSocket, integer(SOL_SOCKET), integer(SO_LINGER), buf, SizeOf(li));
+        {$ENDIF}
+      end;
+    SOT_RecvBuff:
+      begin
+        {$IFDEF CIL}
+        buf := System.BitConverter.GetBytes(value.Value);
+        {$ELSE}
+        buf := @Value.Value;
+        {$ENDIF}
+        synsock.SetSockOpt(FSocket, integer(SOL_SOCKET), integer(SO_RCVBUF),
+          buf, SizeOf(Value.Value));
+      end;
+    SOT_SendBuff:
+      begin
+        {$IFDEF CIL}
+        buf := System.BitConverter.GetBytes(value.Value);
+        {$ELSE}
+        buf := @Value.Value;
+        {$ENDIF}
+        synsock.SetSockOpt(FSocket, integer(SOL_SOCKET), integer(SO_SNDBUF),
+          buf, SizeOf(Value.Value));
+      end;
+    SOT_NonBlock:
+      begin
+        FNonBlockMode := Value.Enabled;
+        x := Ord(FNonBlockMode);
+        synsock.IoctlSocket(FSocket, FIONBIO, x);
+      end;
+    SOT_RecvTimeout:
+      begin
+        {$IFDEF CIL}
+        buf := System.BitConverter.GetBytes(value.Value);
+        {$ELSE}
+        buf := @Value.Value;
+        {$ENDIF}
+        synsock.SetSockOpt(FSocket, integer(SOL_SOCKET), integer(SO_RCVTIMEO),
+          buf, SizeOf(Value.Value));
+      end;
+    SOT_SendTimeout:
+      begin
+        {$IFDEF CIL}
+        buf := System.BitConverter.GetBytes(value.Value);
+        {$ELSE}
+        buf := @Value.Value;
+        {$ENDIF}
+        synsock.SetSockOpt(FSocket, integer(SOL_SOCKET), integer(SO_SNDTIMEO),
+          buf, SizeOf(Value.Value));
+      end;
+    SOT_Reuse:
+      begin
+        x := Ord(Value.Enabled);
+        {$IFDEF CIL}
+        buf := System.BitConverter.GetBytes(x);
+        {$ELSE}
+        buf := @x;
+        {$ENDIF}
+        synsock.SetSockOpt(FSocket, integer(SOL_SOCKET), integer(SO_REUSEADDR), buf, SizeOf(x));
+      end;
+    SOT_TTL:
+      begin
+        {$IFDEF CIL}
+        buf := System.BitConverter.GetBytes(value.Value);
+        {$ELSE}
+        buf := @Value.Value;
+        {$ENDIF}
+        if FIP6Used then
+          synsock.SetSockOpt(FSocket, integer(IPPROTO_IPV6), integer(IPV6_UNICAST_HOPS),
+            buf, SizeOf(Value.Value))
+        else
+          synsock.SetSockOpt(FSocket, integer(IPPROTO_IP), integer(IP_TTL),
+            buf, SizeOf(Value.Value));
+      end;
+    SOT_Broadcast:
+      begin
+//#todo1 broadcasty na IP6
+        x := Ord(Value.Enabled);
+        {$IFDEF CIL}
+        buf := System.BitConverter.GetBytes(x);
+        {$ELSE}
+        buf := @x;
+        {$ENDIF}
+        synsock.SetSockOpt(FSocket, integer(SOL_SOCKET), integer(SO_BROADCAST), buf, SizeOf(x));
+      end;
+    SOT_MulticastTTL:
+      begin
+        {$IFDEF CIL}
+        buf := System.BitConverter.GetBytes(value.Value);
+        {$ELSE}
+        buf := @Value.Value;
+        {$ENDIF}
+        if FIP6Used then
+          synsock.SetSockOpt(FSocket, integer(IPPROTO_IPV6), integer(IPV6_MULTICAST_HOPS),
+            buf, SizeOf(Value.Value))
+        else
+          synsock.SetSockOpt(FSocket, integer(IPPROTO_IP), integer(IP_MULTICAST_TTL),
+            buf, SizeOf(Value.Value));
+      end;
+   SOT_MulticastLoop:
+      begin
+        x := Ord(Value.Enabled);
+        {$IFDEF CIL}
+        buf := System.BitConverter.GetBytes(x);
+        {$ELSE}
+        buf := @x;
+        {$ENDIF}
+        if FIP6Used then
+          synsock.SetSockOpt(FSocket, integer(IPPROTO_IPV6), integer(IPV6_MULTICAST_LOOP), buf, SizeOf(x))
+        else
+          synsock.SetSockOpt(FSocket, integer(IPPROTO_IP), integer(IP_MULTICAST_LOOP), buf, SizeOf(x));
+      end;
+  end;
+  Value.free;
+end;
+
+procedure TBlockSocket.DelayedOption(const Value: TSynaOption);
+begin
+  if FSocket = INVALID_SOCKET then
+  begin
+    FDelayedOptions.Insert(0, Value);
+  end
+  else
+    SetDelayedOption(Value);
+end;
+
+procedure TBlockSocket.ProcessDelayedOptions;
+var
+  n: integer;
+  d: TSynaOption;
+begin
+  for n := FDelayedOptions.Count - 1 downto 0 do
+  begin
+    d := TSynaOption(FDelayedOptions[n]);
+    SetDelayedOption(d);
+  end;
+  FDelayedOptions.Clear;
+end;
+
+procedure TBlockSocket.SetSin(var Sin: TVarSin; IP, Port: string);
+var
+  f: TSocketFamily;
+begin
+  DoStatus(HR_ResolvingBegin, IP + ':' + Port);
+  FLastError := 0;
+  //if socket exists, then use their type, else use users selection
+  f := SF_Any;
+  if (FSocket = INVALID_SOCKET) and (FFamily = SF_any) then
+  begin
+    if IsIP(IP) then
+      f := SF_IP4
+    else
+      if IsIP6(IP) then
+        f := SF_IP6;
+  end
+  else
+    f := FFamily;
+  FLastError := synsock.SetVarSin(sin, ip, port, FamilyToAF(f),
+    GetSocketprotocol, GetSocketType, FPreferIP4);
+  DoStatus(HR_ResolvingEnd, IP + ':' + Port);
+end;
+
+function TBlockSocket.GetSinIP(Sin: TVarSin): string;
+begin
+  Result := synsock.GetSinIP(sin);
+end;
+
+function TBlockSocket.GetSinPort(Sin: TVarSin): Integer;
+begin
+  Result := synsock.GetSinPort(sin);
+end;
+
+procedure TBlockSocket.CreateSocket;
+var
+  sin: TVarSin;
+begin
+  //dummy for SF_Any Family mode
+  FLastError := 0;
+  if (FFamily <> SF_Any) and (FSocket = INVALID_SOCKET) then
+  begin
+    {$IFDEF CIL}
+    if FFamily = SF_IP6 then
+      sin := TVarSin.Create(IPAddress.Parse('::0'), 0)
+    else
+      sin := TVarSin.Create(IPAddress.Parse('0.0.0.0'), 0);
+    {$ELSE}
+    FillChar(Sin, Sizeof(Sin), 0);
+    if FFamily = SF_IP6 then
+      sin.sin_family := AF_INET6
+    else
+      sin.sin_family := AF_INET;
+    {$ENDIF}
+    InternalCreateSocket(Sin);
+  end;
+end;
+
+procedure TBlockSocket.CreateSocketByName(const Value: String);
+var
+  sin: TVarSin;
+begin
+  FLastError := 0;
+  if FSocket = INVALID_SOCKET then
+  begin
+    SetSin(sin, value, '0');
+    if FLastError = 0 then
+      InternalCreateSocket(Sin);
+  end;
+end;
+
+procedure TBlockSocket.InternalCreateSocket(Sin: TVarSin);
+begin
+  FStopFlag := False;
+  FRecvCounter := 0;
+  FSendCounter := 0;
+  FLastError := 0;
+  if FSocket = INVALID_SOCKET then
+  begin
+    FBuffer := '';
+    FBinded := False;
+    FIP6Used := Sin.AddressFamily = AF_INET6;
+    FSocket := synsock.Socket(integer(Sin.AddressFamily), GetSocketType, GetSocketProtocol);
+    if FSocket = INVALID_SOCKET then
+      FLastError := synsock.WSAGetLastError;
+    {$IFNDEF CIL}
+    FD_ZERO(FFDSet);
+    FD_SET(FSocket, FFDSet);
+    {$ENDIF}
+    ExceptCheck;
+    if FIP6used then
+      DoStatus(HR_SocketCreate, 'IPv6')
+    else
+      DoStatus(HR_SocketCreate, 'IPv4');
+    ProcessDelayedOptions;
+    DoCreateSocket;
+  end;
+end;
+
+procedure TBlockSocket.CloseSocket;
+begin
+  AbortSocket;
+end;
+
+procedure TBlockSocket.AbortSocket;
+var
+  n: integer;
+  p: TSynaOption;
+begin
+  if FSocket <> INVALID_SOCKET then
+    synsock.CloseSocket(FSocket);
+  FSocket := INVALID_SOCKET;
+  for n := FDelayedOptions.Count - 1 downto 0 do
+    begin
+      p := TSynaOption(FDelayedOptions[n]);
+      p.Free;
+    end;
+  FDelayedOptions.Clear;
+  FFamily := FFamilySave;
+  FLastError := 0;
+  DoStatus(HR_SocketClose, '');
+end;
+
+procedure TBlockSocket.Bind(IP, Port: string);
+var
+  Sin: TVarSin;
+begin
+  FLastError := 0;
+  if (FSocket <> INVALID_SOCKET)
+    or not((FFamily = SF_ANY) and (IP = cAnyHost) and (Port = cAnyPort)) then
+  begin
+    SetSin(Sin, IP, Port);
+    if FLastError = 0 then
+    begin
+      if FSocket = INVALID_SOCKET then
+        InternalCreateSocket(Sin);
+      SockCheck(synsock.Bind(FSocket, Sin));
+      GetSinLocal;
+      FBuffer := '';
+      FBinded := True;
+    end;
+    ExceptCheck;
+    DoStatus(HR_Bind, IP + ':' + Port);
+  end;
+end;
+
+procedure TBlockSocket.Connect(IP, Port: string);
+var
+  Sin: TVarSin;
+begin
+  SetSin(Sin, IP, Port);
+  if FLastError = 0 then
+  begin
+    if FSocket = INVALID_SOCKET then
+      InternalCreateSocket(Sin);
+    SockCheck(synsock.Connect(FSocket, Sin));
+    if FLastError = 0 then
+      GetSins;
+    FBuffer := '';
+    FLastCR := False;
+    FLastLF := False;
+  end;
+  ExceptCheck;
+  DoStatus(HR_Connect, IP + ':' + Port);
+end;
+
+procedure TBlockSocket.GetSinLocal;
+begin
+  synsock.GetSockName(FSocket, FLocalSin);
+end;
+
+procedure TBlockSocket.GetSinRemote;
+begin
+  synsock.GetPeerName(FSocket, FRemoteSin);
+end;
+
+procedure TBlockSocket.GetSins;
+begin
+  GetSinLocal;
+  GetSinRemote;
+end;
+
+procedure TBlockSocket.SetBandwidth(Value: Integer);
+begin
+  MaxSendBandwidth := Value;
+  MaxRecvBandwidth := Value;
+end;
+
+procedure TBlockSocket.LimitBandwidth(Length: Integer; MaxB: integer; var Next: LongWord);
+var
+  x: LongWord;
+  y: LongWord;
+  n: integer;
+begin
+  if FStopFlag then
+    exit;
+  if MaxB > 0 then
+  begin
+    y := GetTick;
+    if Next > y then
+    begin
+      x := Next - y;
+      if x > 0 then
+      begin
+        DoStatus(HR_Wait, IntToStr(x));
+        sleep(x mod 250);
+        for n := 1 to x div 250 do
+          if FStopFlag then
+            Break
+          else
+            sleep(250);
+      end;
+    end;
+    Next := GetTick + Trunc((Length / MaxB) * 1000);
+  end;
+end;
+
+function TBlockSocket.TestStopFlag: Boolean;
+begin
+  Result := FStopFlag;
+  if Result then
+  begin
+    FStopFlag := False;
+    FLastError := WSAECONNABORTED;
+    ExceptCheck;
+  end;
+end;
+
+
+function TBlockSocket.SendBuffer(Buffer: TMemory; Length: Integer): Integer;
+{$IFNDEF CIL}
+var
+  x, y: integer;
+  l, r: integer;
+  p: Pointer;
+{$ENDIF}
+begin
+  Result := 0;
+  if TestStopFlag then
+    Exit;
+  DoMonitor(True, Buffer, Length);
+{$IFDEF CIL}
+  Result := synsock.Send(FSocket, Buffer, Length, 0);
+{$ELSE}
+  l := Length;
+  x := 0;
+  while x < l do
+  begin
+    y := l - x;
+    if y > FSendMaxChunk then
+      y := FSendMaxChunk;
+    if y > 0 then
+    begin
+      LimitBandwidth(y, FMaxSendBandwidth, FNextsend);
+      p := IncPoint(Buffer, x);
+      r := synsock.Send(FSocket, p, y, MSG_NOSIGNAL);
+      SockCheck(r);
+      if FLastError = WSAEWOULDBLOCK then
+      begin
+        if CanWrite(FNonblockSendTimeout) then
+        begin
+          r := synsock.Send(FSocket, p, y, MSG_NOSIGNAL);
+          SockCheck(r);
+        end
+        else
+          FLastError := WSAETIMEDOUT;
+      end;
+      if FLastError <> 0 then
+        Break;
+      Inc(x, r);
+      Inc(Result, r);
+      Inc(FSendCounter, r);
+      DoStatus(HR_WriteCount, IntToStr(r));
+    end
+    else
+      break;
+  end;
+{$ENDIF}
+  ExceptCheck;
+end;
+
+procedure TBlockSocket.SendByte(Data: Byte);
+{$IFDEF CIL}
+var
+  buf: TMemory;
+{$ENDIF}
+begin
+{$IFDEF CIL}
+  setlength(buf, 1);
+  buf[0] := Data;
+  SendBuffer(buf, 1);
+{$ELSE}
+  SendBuffer(@Data, 1);
+{$ENDIF}
+end;
+
+procedure TBlockSocket.SendString(Data: AnsiString);
+var
+  buf: TMemory;
+begin
+//  SendBuffer(PChar(Data), Length(Data));
+  {$IFDEF CIL}
+  buf := BytesOf(Data);
+  {$ELSE}
+  buf := pchar(data);
+  {$ENDIF}
+  SendBuffer(buf, Length(Data));
+end;
+
+procedure TBlockSocket.SendInteger(Data: integer);
+var
+  buf: TMemory;
+begin
+  {$IFDEF CIL}
+  buf := System.BitConverter.GetBytes(Data);
+  {$ELSE}
+  buf := @Data;
+  {$ENDIF}
+  SendBuffer(buf, SizeOf(Data));
+end;
+
+procedure TBlockSocket.SendBlock(const Data: AnsiString);
+var
+  i: integer;
+begin
+  i := SwapBytes(Length(data));
+  SendString(Codelongint(i) + Data);
+end;
+
+procedure TBlockSocket.InternalSendStream(const Stream: TStream; WithSize, Indy: boolean);
+var
+  si, l: integer;
+  x, y, yr: integer;
+  s: AnsiString;
+  b: boolean;
+{$IFDEF CIL}
+  buf: TMemory;
+{$ENDIF}
+begin
+  si := Stream.Size - Stream.Position;
+  if not indy then
+    l := SwapBytes(si)
+  else
+    l := si;
+  x := 0;
+  b := true;
+  while x < si do
+  begin
+    y := si - x;
+    if y > FSendMaxChunk then
+      y := FSendMaxChunk;
+    {$IFDEF CIL}
+    Setlength(buf, y);
+    yr := Stream.read(buf, y);
+    if yr > 0 then
+    begin
+      if WithSize and b then
+      begin
+        b := false;
+        SendString(CodeLongInt(l));
+      end;
+      SendBuffer(buf, yr);
+      if FLastError <> 0 then
+        break;
+      Inc(x, yr);
+    end
+    else
+      break;
+    {$ELSE}
+    Setlength(s, y);
+    yr := Stream.read(Pchar(s)^, y);
+    if yr > 0 then
+    begin
+      SetLength(s, yr);
+      if WithSize and b then
+      begin
+        b := false;
+        SendString(CodeLongInt(l) + s);
+      end
+      else
+        SendString(s);
+      if FLastError <> 0 then
+        break;
+      Inc(x, yr);
+    end
+    else
+      break;
+    {$ENDIF}
+  end;
+end;
+
+procedure TBlockSocket.SendStreamRaw(const Stream: TStream);
+begin
+  InternalSendStream(Stream, false, false);
+end;
+
+procedure TBlockSocket.SendStreamIndy(const Stream: TStream);
+begin
+  InternalSendStream(Stream, true, true);
+end;
+
+procedure TBlockSocket.SendStream(const Stream: TStream);
+begin
+  InternalSendStream(Stream, true, false);
+end;
+
+function TBlockSocket.RecvBuffer(Buffer: TMemory; Length: Integer): Integer;
+begin
+  Result := 0;
+  if TestStopFlag then
+    Exit;
+  LimitBandwidth(Length, FMaxRecvBandwidth, FNextRecv);
+//  Result := synsock.Recv(FSocket, Buffer^, Length, MSG_NOSIGNAL);
+  Result := synsock.Recv(FSocket, Buffer, Length, MSG_NOSIGNAL);
+  if Result = 0 then
+    FLastError := WSAECONNRESET
+  else
+    SockCheck(Result);
+  ExceptCheck;
+  if Result > 0 then
+  begin
+    Inc(FRecvCounter, Result);
+    DoStatus(HR_ReadCount, IntToStr(Result));
+    DoMonitor(False, Buffer, Result);
+    DoReadFilter(Buffer, Result);
+  end;
+end;
+
+function TBlockSocket.RecvBufferEx(Buffer: TMemory; Len: Integer;
+  Timeout: Integer): Integer;
+var
+  s: AnsiString;
+  rl, l: integer;
+  ti: LongWord;
+{$IFDEF CIL}
+  n: integer;
+  b: TMemory;
+{$ENDIF}
+begin
+  FLastError := 0;
+  Result := 0;
+  if Len > 0 then
+  begin
+    rl := 0;
+    repeat
+      ti := GetTick;
+      s := RecvPacket(Timeout);
+      l := Length(s);
+      if (rl + l) > Len then
+        l := Len - rl;
+      {$IFDEF CIL}
+      b := BytesOf(s);
+      for n := 0 to l do
+        Buffer[rl + n] := b[n];
+      {$ELSE}
+      Move(Pointer(s)^, IncPoint(Buffer, rl)^, l);
+      {$ENDIF}
+      rl := rl + l;
+      if FLastError <> 0 then
+        Break;
+      if rl >= Len then
+        Break;
+      if not FInterPacketTimeout then
+      begin
+        Timeout := Timeout - integer(TickDelta(ti, GetTick));
+        if Timeout <= 0 then
+        begin
+          FLastError := WSAETIMEDOUT;
+          Break;
+        end;
+      end;
+    until False;
+    delete(s, 1, l);
+    FBuffer := s;
+    Result := rl;
+  end;
+end;
+
+function TBlockSocket.RecvBufferStr(Length: Integer; Timeout: Integer): AnsiString;
+var
+  x: integer;
+{$IFDEF CIL}
+  buf: Tmemory;
+{$ENDIF}
+begin
+  Result := '';
+  if Length > 0 then
+  begin
+    {$IFDEF CIL}
+    Setlength(Buf, Length);
+    x := RecvBufferEx(buf, Length , Timeout);
+    if FLastError = 0 then
+    begin
+      SetLength(Buf, x);
+      Result := StringOf(buf);
+    end
+    else
+      Result := '';
+    {$ELSE}
+    Setlength(Result, Length);
+    x := RecvBufferEx(PChar(Result), Length , Timeout);
+    if FLastError = 0 then
+      SetLength(Result, x)
+    else
+      Result := '';
+    {$ENDIF}
+  end;
+end;
+
+function TBlockSocket.RecvPacket(Timeout: Integer): AnsiString;
+var
+  x: integer;
+{$IFDEF CIL}
+  buf: TMemory;
+{$ENDIF}
+begin
+  Result := '';
+  FLastError := 0;
+  if FBuffer <> '' then
+  begin
+    Result := FBuffer;
+    FBuffer := '';
+  end
+  else
+  begin
+    {$IFDEF WIN32}
+    //not drain CPU on large downloads...
+    Sleep(0);
+    {$ENDIF}
+    x := WaitingData;
+    if x > 0 then
+    begin
+      {$IFDEF CIL}
+      SetLength(Buf, x);
+      x := RecvBuffer(Buf, x);
+      if x >= 0 then
+      begin
+        SetLength(Buf, x);
+        Result := StringOf(Buf);
+      end;
+      {$ELSE}
+      SetLength(Result, x);
+      x := RecvBuffer(Pointer(Result), x);
+      if x >= 0 then
+        SetLength(Result, x);
+      {$ENDIF}
+    end
+    else
+    begin
+      if CanRead(Timeout) then
+      begin
+        x := WaitingData;
+        if x = 0 then
+          FLastError := WSAECONNRESET;
+        if x > 0 then
+        begin
+          {$IFDEF CIL}
+          SetLength(Buf, x);
+          x := RecvBuffer(Buf, x);
+          if x >= 0 then
+          begin
+            SetLength(Buf, x);
+            result := StringOf(Buf);
+          end;
+          {$ELSE}
+          SetLength(Result, x);
+          x := RecvBuffer(Pointer(Result), x);
+          if x >= 0 then
+            SetLength(Result, x);
+          {$ENDIF}
+        end;
+      end
+      else
+        FLastError := WSAETIMEDOUT;
+    end;
+  end;
+  if FConvertLineEnd and (Result <> '') then
+  begin
+    if FLastCR and (Result[1] = LF) then
+      Delete(Result, 1, 1);
+    if FLastLF and (Result[1] = CR) then
+      Delete(Result, 1, 1);
+    FLastCR := False;
+    FLastLF := False;
+  end;
+  ExceptCheck;
+end;
+
+
+function TBlockSocket.RecvByte(Timeout: Integer): Byte;
+begin
+  Result := 0;
+  FLastError := 0;
+  if FBuffer = '' then
+    FBuffer := RecvPacket(Timeout);
+  if (FLastError = 0) and (FBuffer <> '') then
+  begin
+    Result := Ord(FBuffer[1]);
+    Delete(FBuffer, 1, 1);
+  end;
+  ExceptCheck;
+end;
+
+function TBlockSocket.RecvInteger(Timeout: Integer): Integer;
+var
+  s: AnsiString;
+begin
+  Result := 0;
+  s := RecvBufferStr(4, Timeout);
+  if FLastError = 0 then
+    Result := (ord(s[1]) + ord(s[2]) * 256) + (ord(s[3]) + ord(s[4]) * 256) * 65536;
+end;
+
+function TBlockSocket.RecvTerminated(Timeout: Integer; const Terminator: AnsiString): AnsiString;
+var
+  x: Integer;
+  s: AnsiString;
+  l: Integer;
+  CorCRLF: Boolean;
+  t: AnsiString;
+  tl: integer;
+  ti: LongWord;
+begin
+  FLastError := 0;
+  Result := '';
+  l := Length(Terminator);
+  if l = 0 then
+    Exit;
+  tl := l;
+  CorCRLF := FConvertLineEnd and (Terminator = CRLF);
+  s := '';
+  x := 0;
+  repeat
+    //get rest of FBuffer or incomming new data...
+    ti := GetTick;
+    s := s + RecvPacket(Timeout);
+    if FLastError <> 0 then
+      Break;
+    x := 0;
+    if Length(s) > 0 then
+      if CorCRLF then
+      begin
+        t := '';
+        x := PosCRLF(s, t);
+        tl := Length(t);
+        if t = CR then
+          FLastCR := True;
+        if t = LF then
+          FLastLF := True;
+      end
+      else
+      begin
+        x := pos(Terminator, s);
+        tl := l;
+      end;
+    if (FMaxLineLength <> 0) and (Length(s) > FMaxLineLength) then
+    begin
+      FLastError := WSAENOBUFS;
+      Break;
+    end;
+    if x > 0 then
+      Break;
+    if not FInterPacketTimeout then
+    begin
+      Timeout := Timeout - integer(TickDelta(ti, GetTick));
+      if Timeout <= 0 then
+      begin
+        FLastError := WSAETIMEDOUT;
+        Break;
+      end;
+    end;
+  until False;
+  if x > 0 then
+  begin
+    Result := Copy(s, 1, x - 1);
+    Delete(s, 1, x + tl - 1);
+  end;
+  FBuffer := s;
+  ExceptCheck;
+end;
+
+function TBlockSocket.RecvString(Timeout: Integer): AnsiString;
+var
+  s: AnsiString;
+begin
+  Result := '';
+  s := RecvTerminated(Timeout, CRLF);
+  if FLastError = 0 then
+    Result := s;
+end;
+
+function TBlockSocket.RecvBlock(Timeout: Integer): AnsiString;
+var
+  x: integer;
+begin
+  Result := '';
+  x := RecvInteger(Timeout);
+  if FLastError = 0 then
+    Result := RecvBufferStr(x, Timeout);
+end;
+
+procedure TBlockSocket.RecvStreamRaw(const Stream: TStream; Timeout: Integer);
+var
+  s: AnsiString;
+begin
+  repeat
+    s := RecvPacket(Timeout);
+    if FLastError = 0 then
+      WriteStrToStream(Stream, s);
+  until FLastError <> 0;
+end;
+
+procedure TBlockSocket.RecvStreamSize(const Stream: TStream; Timeout: Integer; Size: Integer);
+var
+  s: AnsiString;
+  n: integer;
+{$IFDEF CIL}
+  buf: TMemory;
+{$ENDIF}
+begin
+  for n := 1 to (Size div FSendMaxChunk) do
+  begin
+    {$IFDEF CIL}
+    SetLength(buf, FSendMaxChunk);
+    RecvBufferEx(buf, FSendMaxChunk, Timeout);
+    if FLastError <> 0 then
+      Exit;
+    Stream.Write(buf, FSendMaxChunk);
+    {$ELSE}
+    s := RecvBufferStr(FSendMaxChunk, Timeout);
+    if FLastError <> 0 then
+      Exit;
+    Stream.Write(Pchar(s)^, FSendMaxChunk);
+    {$ENDIF}
+  end;
+  n := Size mod FSendMaxChunk;
+  if n > 0 then
+  begin
+    {$IFDEF CIL}
+    SetLength(buf, n);
+    RecvBufferEx(buf, n, Timeout);
+    if FLastError <> 0 then
+      Exit;
+    Stream.Write(buf, n);
+    {$ELSE}
+    s := RecvBufferStr(n, Timeout);
+    if FLastError <> 0 then
+      Exit;
+    Stream.Write(Pchar(s)^, n);
+    {$ENDIF}
+  end;
+end;
+
+procedure TBlockSocket.RecvStreamIndy(const Stream: TStream; Timeout: Integer);
+var
+  x: integer;
+begin
+  x := RecvInteger(Timeout);
+  x := synsock.NToHL(x);
+  if FLastError = 0 then
+    RecvStreamSize(Stream, Timeout, x);
+end;
+
+procedure TBlockSocket.RecvStream(const Stream: TStream; Timeout: Integer);
+var
+  x: integer;
+begin
+  x := RecvInteger(Timeout);
+  if FLastError = 0 then
+    RecvStreamSize(Stream, Timeout, x);
+end;
+
+function TBlockSocket.PeekBuffer(Buffer: TMemory; Length: Integer): Integer;
+begin
+ {$IFNDEF CIL}
+//  Result := synsock.Recv(FSocket, Buffer^, Length, MSG_PEEK + MSG_NOSIGNAL);
+  Result := synsock.Recv(FSocket, Buffer, Length, MSG_PEEK + MSG_NOSIGNAL);
+  SockCheck(Result);
+  ExceptCheck;
+  {$ENDIF}
+end;
+
+function TBlockSocket.PeekByte(Timeout: Integer): Byte;
+var
+  s: string;
+begin
+ {$IFNDEF CIL}
+  Result := 0;
+  if CanRead(Timeout) then
+  begin
+    SetLength(s, 1);
+    PeekBuffer(Pointer(s), 1);
+    if s <> '' then
+      Result := Ord(s[1]);
+  end
+  else
+    FLastError := WSAETIMEDOUT;
+  ExceptCheck;
+  {$ENDIF}
+end;
+
+function TBlockSocket.SockCheck(SockResult: Integer): Integer;
+begin
+  FLastErrorDesc := '';
+  if SockResult = integer(SOCKET_ERROR) then
+  begin
+    Result := synsock.WSAGetLastError;
+    FLastErrorDesc := GetErrorDesc(Result);
+  end
+  else
+    Result := 0;
+  FLastError := Result;
+end;
+
+procedure TBlockSocket.ExceptCheck;
+var
+  e: ESynapseError;
+begin
+  FLastErrorDesc := GetErrorDesc(FLastError);
+  if (LastError <> 0) and (LastError <> WSAEINPROGRESS)
+    and (LastError <> WSAEWOULDBLOCK) then
+  begin
+    DoStatus(HR_Error, IntToStr(FLastError) + ',' + FLastErrorDesc);
+    if FRaiseExcept then
+    begin
+      e := ESynapseError.Create(Format('Synapse TCP/IP Socket error %d: %s',
+        [FLastError, FLastErrorDesc]));
+//      e := ESynapseError.CreateFmt('Synapse TCP/IP Socket error %d: %s',
+//        [FLastError, FLastErrorDesc]);
+      e.ErrorCode := FLastError;
+      e.ErrorMessage := FLastErrorDesc;
+      raise e;
+    end;
+  end;
+end;
+
+function TBlockSocket.WaitingData: Integer;
+var
+  x: Integer;
+begin
+  Result := 0;
+  if synsock.IoctlSocket(FSocket, FIONREAD, x) = 0 then
+    Result := x;
+  if Result > c64k then
+    Result := c64k;
+end;
+
+function TBlockSocket.WaitingDataEx: Integer;
+begin
+  if FBuffer <> '' then
+    Result := Length(FBuffer)
+  else
+    Result := WaitingData;
+end;
+
+procedure TBlockSocket.Purge;
+begin
+  Sleep(1);
+  try
+    while (Length(FBuffer) > 0) or (WaitingData > 0) do
+    begin
+      RecvPacket(0);
+      if FLastError <> 0 then
+        break;
+    end;
+  except
+    on exception do;
+  end;
+  FLastError := 0;
+end;
+
+procedure TBlockSocket.SetLinger(Enable: Boolean; Linger: Integer);
+var
+  d: TSynaOption;
+begin
+  d := TSynaOption.Create;
+  d.Option := SOT_Linger;
+  d.Enabled := Enable;
+  d.Value := Linger;
+  DelayedOption(d);
+end;
+
+function TBlockSocket.LocalName: string;
+begin
+  Result := synsock.GetHostName;
+  if Result = '' then
+    Result := '127.0.0.1';
+end;
+
+procedure TBlockSocket.ResolveNameToIP(Name: string; const IPList: TStrings);
+begin
+  IPList.Clear;
+  synsock.ResolveNameToIP(Name, FamilyToAF(FFamily), GetSocketprotocol, GetSocketType, IPList);
+  if IPList.Count = 0 then
+    IPList.Add(cAnyHost);
+end;
+
+function TBlockSocket.ResolveName(Name: string): string;
+var
+  l: TStringList;
+begin
+  l := TStringList.Create;
+  try
+    ResolveNameToIP(Name, l);
+    Result := l[0];
+  finally
+    l.Free;
+  end;
+end;
+
+function TBlockSocket.ResolvePort(Port: string): Word;
+begin
+  Result := synsock.ResolvePort(Port, FamilyToAF(FFamily), GetSocketProtocol, GetSocketType);
+end;
+
+function TBlockSocket.ResolveIPToName(IP: string): string;
+begin
+  if not IsIP(IP) or not IsIp6(IP) then
+    IP := ResolveName(IP);
+  Result := synsock.ResolveIPToName(IP, FamilyToAF(FFamily), GetSocketProtocol, GetSocketType);
+end;
+
+procedure TBlockSocket.SetRemoteSin(IP, Port: string);
+begin
+  SetSin(FRemoteSin, IP, Port);
+end;
+
+function TBlockSocket.GetLocalSinIP: string;
+begin
+  Result := GetSinIP(FLocalSin);
+end;
+
+function TBlockSocket.GetRemoteSinIP: string;
+begin
+  Result := GetSinIP(FRemoteSin);
+end;
+
+function TBlockSocket.GetLocalSinPort: Integer;
+begin
+  Result := GetSinPort(FLocalSin);
+end;
+
+function TBlockSocket.GetRemoteSinPort: Integer;
+begin
+  Result := GetSinPort(FRemoteSin);
+end;
+
+function TBlockSocket.CanRead(Timeout: Integer): Boolean;
+{$IFDEF CIL}
+begin
+  Result := FSocket.Poll(Timeout * 1000, SelectMode.SelectRead);
+{$ELSE}
+var
+  TimeVal: PTimeVal;
+  TimeV: TTimeVal;
+  x: Integer;
+  FDSet: TFDSet;
+begin
+  TimeV.tv_usec := (Timeout mod 1000) * 1000;
+  TimeV.tv_sec := Timeout div 1000;
+  TimeVal := @TimeV;
+  if Timeout = -1 then
+    TimeVal := nil;
+  FDSet := FFdSet;
+  x := synsock.Select(FSocket + 1, @FDSet, nil, nil, TimeVal);
+  SockCheck(x);
+  if FLastError <> 0 then
+    x := 0;
+  Result := x > 0;
+{$ENDIF}
+  ExceptCheck;
+  if Result then
+    DoStatus(HR_CanRead, '');
+end;
+
+function TBlockSocket.CanWrite(Timeout: Integer): Boolean;
+{$IFDEF CIL}
+begin
+  Result := FSocket.Poll(Timeout * 1000, SelectMode.SelectWrite);
+{$ELSE}
+var
+  TimeVal: PTimeVal;
+  TimeV: TTimeVal;
+  x: Integer;
+  FDSet: TFDSet;
+begin
+  TimeV.tv_usec := (Timeout mod 1000) * 1000;
+  TimeV.tv_sec := Timeout div 1000;
+  TimeVal := @TimeV;
+  if Timeout = -1 then
+    TimeVal := nil;
+  FDSet := FFdSet;
+  x := synsock.Select(FSocket + 1, nil, @FDSet, nil, TimeVal);
+  SockCheck(x);
+  if FLastError <> 0 then
+    x := 0;
+  Result := x > 0;
+{$ENDIF}
+  ExceptCheck;
+  if Result then
+    DoStatus(HR_CanWrite, '');
+end;
+
+function TBlockSocket.CanReadEx(Timeout: Integer): Boolean;
+begin
+  if FBuffer <> '' then
+    Result := True
+  else
+    Result := CanRead(Timeout);
+end;
+
+function TBlockSocket.SendBufferTo(Buffer: TMemory; Length: Integer): Integer;
+begin
+  Result := 0;
+  if TestStopFlag then
+    Exit;
+  DoMonitor(True, Buffer, Length);
+  LimitBandwidth(Length, FMaxSendBandwidth, FNextsend);
+  Result := synsock.SendTo(FSocket, Buffer, Length, MSG_NOSIGNAL, FRemoteSin);
+  SockCheck(Result);
+  ExceptCheck;
+  Inc(FSendCounter, Result);
+  DoStatus(HR_WriteCount, IntToStr(Result));
+end;
+
+function TBlockSocket.RecvBufferFrom(Buffer: TMemory; Length: Integer): Integer;
+begin
+  Result := 0;
+  if TestStopFlag then
+    Exit;
+  LimitBandwidth(Length, FMaxRecvBandwidth, FNextRecv);
+  Result := synsock.RecvFrom(FSocket, Buffer, Length, MSG_NOSIGNAL, FRemoteSin);
+  SockCheck(Result);
+  ExceptCheck;
+  Inc(FRecvCounter, Result);
+  DoStatus(HR_ReadCount, IntToStr(Result));
+  DoMonitor(False, Buffer, Result);
+end;
+
+function TBlockSocket.GetSizeRecvBuffer: Integer;
+var
+  l: Integer;
+{$IFDEF CIL}
+  buf: TMemory;
+{$ENDIF}
+begin
+{$IFDEF CIL}
+  setlength(buf, 4);
+  SockCheck(synsock.GetSockOpt(FSocket, integer(SOL_SOCKET), integer(SO_RCVBUF), buf, l));
+  Result := System.BitConverter.ToInt32(buf,0);
+{$ELSE}
+  l := SizeOf(Result);
+  SockCheck(synsock.GetSockOpt(FSocket, SOL_SOCKET, SO_RCVBUF, @Result, l));
+  if FLastError <> 0 then
+    Result := 1024;
+  ExceptCheck;
+{$ENDIF}
+end;
+
+procedure TBlockSocket.SetSizeRecvBuffer(Size: Integer);
+var
+  d: TSynaOption;
+begin
+  d := TSynaOption.Create;
+  d.Option := SOT_RecvBuff;
+  d.Value := Size;
+  DelayedOption(d);
+end;
+
+function TBlockSocket.GetSizeSendBuffer: Integer;
+var
+  l: Integer;
+{$IFDEF CIL}
+  buf: TMemory;
+{$ENDIF}
+begin
+{$IFDEF CIL}
+  setlength(buf, 4);
+  SockCheck(synsock.GetSockOpt(FSocket, integer(SOL_SOCKET), integer(SO_SNDBUF), buf, l));
+  Result := System.BitConverter.ToInt32(buf,0);
+{$ELSE}
+  l := SizeOf(Result);
+  SockCheck(synsock.GetSockOpt(FSocket, SOL_SOCKET, SO_SNDBUF, @Result, l));
+  if FLastError <> 0 then
+    Result := 1024;
+  ExceptCheck;
+{$ENDIF}
+end;
+
+procedure TBlockSocket.SetSizeSendBuffer(Size: Integer);
+var
+  d: TSynaOption;
+begin
+  d := TSynaOption.Create;
+  d.Option := SOT_SendBuff;
+  d.Value := Size;
+  DelayedOption(d);
+end;
+
+procedure TBlockSocket.SetNonBlockMode(Value: Boolean);
+var
+  d: TSynaOption;
+begin
+  d := TSynaOption.Create;
+  d.Option := SOT_nonblock;
+  d.Enabled := Value;
+  DelayedOption(d);
+end;
+
+procedure TBlockSocket.SetTimeout(Timeout: Integer);
+begin
+  SetSendTimeout(Timeout);
+  SetRecvTimeout(Timeout);
+end;
+
+procedure TBlockSocket.SetSendTimeout(Timeout: Integer);
+var
+  d: TSynaOption;
+begin
+  d := TSynaOption.Create;
+  d.Option := SOT_sendtimeout;
+  d.Value := Timeout;
+  DelayedOption(d);
+end;
+
+procedure TBlockSocket.SetRecvTimeout(Timeout: Integer);
+var
+  d: TSynaOption;
+begin
+  d := TSynaOption.Create;
+  d.Option := SOT_recvtimeout;
+  d.Value := Timeout;
+  DelayedOption(d);
+end;
+
+{$IFNDEF CIL}
+function TBlockSocket.GroupCanRead(const SocketList: TList; Timeout: Integer;
+  const CanReadList: TList): boolean;
+var
+  FDSet: TFDSet;
+  TimeVal: PTimeVal;
+  TimeV: TTimeVal;
+  x, n: Integer;
+  Max: Integer;
+begin
+  TimeV.tv_usec := (Timeout mod 1000) * 1000;
+  TimeV.tv_sec := Timeout div 1000;
+  TimeVal := @TimeV;
+  if Timeout = -1 then
+    TimeVal := nil;
+  FD_ZERO(FDSet);
+  Max := 0;
+  for n := 0 to SocketList.Count - 1 do
+    if TObject(SocketList.Items[n]) is TBlockSocket then
+    begin
+      if TBlockSocket(SocketList.Items[n]).Socket > Max then
+        Max := TBlockSocket(SocketList.Items[n]).Socket;
+      FD_SET(TBlockSocket(SocketList.Items[n]).Socket, FDSet);
+    end;
+  x := synsock.Select(Max + 1, @FDSet, nil, nil, TimeVal);
+  SockCheck(x);
+  ExceptCheck;
+  if FLastError <> 0 then
+    x := 0;
+  Result := x > 0;
+  CanReadList.Clear;
+  if Result then
+    for n := 0 to SocketList.Count - 1 do
+      if TObject(SocketList.Items[n]) is TBlockSocket then
+        if FD_ISSET(TBlockSocket(SocketList.Items[n]).Socket, FDSet) then
+          CanReadList.Add(TBlockSocket(SocketList.Items[n]));
+end;
+{$ENDIF}
+
+procedure TBlockSocket.EnableReuse(Value: Boolean);
+var
+  d: TSynaOption;
+begin
+  d := TSynaOption.Create;
+  d.Option := SOT_reuse;
+  d.Enabled := Value;
+  DelayedOption(d);
+end;
+
+procedure TBlockSocket.SetTTL(TTL: integer);
+var
+  d: TSynaOption;
+begin
+  d := TSynaOption.Create;
+  d.Option := SOT_TTL;
+  d.Value := TTL;
+  DelayedOption(d);
+end;
+
+function TBlockSocket.GetTTL:integer;
+var
+  l: Integer;
+begin
+{$IFNDEF CIL}
+  l := SizeOf(Result);
+  if FIP6Used then
+    synsock.GetSockOpt(FSocket, IPPROTO_IPV6, IPV6_UNICAST_HOPS, @Result, l)
+  else
+    synsock.GetSockOpt(FSocket, IPPROTO_IP, IP_TTL, @Result, l);
+{$ENDIF}
+end;
+
+procedure TBlockSocket.SetFamily(Value: TSocketFamily);
+begin
+  FFamily := Value;
+  FFamilySave := Value;
+end;
+
+procedure TBlockSocket.SetSocket(Value: TSocket);
+begin
+  FRecvCounter := 0;
+  FSendCounter := 0;
+  FSocket := Value;
+{$IFNDEF CIL}
+  FD_ZERO(FFDSet);
+  FD_SET(FSocket, FFDSet);
+{$ENDIF}
+  GetSins;
+  FIP6Used := FRemoteSin.AddressFamily = AF_INET6;
+end;
+
+function TBlockSocket.GetWsaData: TWSAData;
+begin
+  Result := WsaDataOnce;
+end;
+
+function TBlockSocket.GetSocketType: integer;
+begin
+  Result := 0;
+end;
+
+function TBlockSocket.GetSocketProtocol: integer;
+begin
+  Result := integer(IPPROTO_IP);
+end;
+
+procedure TBlockSocket.DoStatus(Reason: THookSocketReason; const Value: string);
+begin
+  if assigned(OnStatus) then
+    OnStatus(Self, Reason, Value);
+end;
+
+procedure TBlockSocket.DoReadFilter(Buffer: TMemory; var Len: Integer);
+var
+  s: string;
+begin
+  if assigned(OnReadFilter) then
+    if Len > 0 then
+      begin
+        {$IFDEF CIL}
+        s := StringOf(Buffer);
+        {$ELSE}
+        SetLength(s, Len);
+        Move(Buffer^, Pointer(s)^, Len);
+        {$ENDIF}
+        OnReadFilter(Self, s);
+        if Length(s) > Len then
+          SetLength(s, Len);
+        Len := Length(s);
+        {$IFDEF CIL}
+        Buffer := BytesOf(s);
+        {$ELSE}
+        Move(Pointer(s)^, Buffer^, Len);
+        {$ENDIF}
+      end;
+end;
+
+procedure TBlockSocket.DoCreateSocket;
+begin
+  if assigned(OnCreateSocket) then
+    OnCreateSocket(Self);
+end;
+
+procedure TBlockSocket.DoMonitor(Writing: Boolean; const Buffer: TMemory; Len: Integer);
+begin
+  if assigned(OnMonitor) then
+  begin
+    OnMonitor(Self, Writing, Buffer, Len);
+  end;
+end;
+
+class function TBlockSocket.GetErrorDesc(ErrorCode: Integer): string;
+begin
+{$IFDEF CIL}
+  if ErrorCode = 0 then
+    Result := ''
+  else
+  begin
+    Result := WSAGetLastErrorDesc;
+    if Result = '' then
+      Result := 'Other Winsock error (' + IntToStr(ErrorCode) + ')';
+  end;
+{$ELSE}
+  case ErrorCode of
+    0:
+      Result := '';
+    WSAEINTR: {10004}
+      Result := 'Interrupted system call';
+    WSAEBADF: {10009}
+      Result := 'Bad file number';
+    WSAEACCES: {10013}
+      Result := 'Permission denied';
+    WSAEFAULT: {10014}
+      Result := 'Bad address';
+    WSAEINVAL: {10022}
+      Result := 'Invalid argument';
+    WSAEMFILE: {10024}
+      Result := 'Too many open files';
+    WSAEWOULDBLOCK: {10035}
+      Result := 'Operation would block';
+    WSAEINPROGRESS: {10036}
+      Result := 'Operation now in progress';
+    WSAEALREADY: {10037}
+      Result := 'Operation already in progress';
+    WSAENOTSOCK: {10038}
+      Result := 'Socket operation on nonsocket';
+    WSAEDESTADDRREQ: {10039}
+      Result := 'Destination address required';
+    WSAEMSGSIZE: {10040}
+      Result := 'Message too long';
+    WSAEPROTOTYPE: {10041}
+      Result := 'Protocol wrong type for Socket';
+    WSAENOPROTOOPT: {10042}
+      Result := 'Protocol not available';
+    WSAEPROTONOSUPPORT: {10043}
+      Result := 'Protocol not supported';
+    WSAESOCKTNOSUPPORT: {10044}
+      Result := 'Socket not supported';
+    WSAEOPNOTSUPP: {10045}
+      Result := 'Operation not supported on Socket';
+    WSAEPFNOSUPPORT: {10046}
+      Result := 'Protocol family not supported';
+    WSAEAFNOSUPPORT: {10047}
+      Result := 'Address family not supported';
+    WSAEADDRINUSE: {10048}
+      Result := 'Address already in use';
+    WSAEADDRNOTAVAIL: {10049}
+      Result := 'Can''t assign requested address';
+    WSAENETDOWN: {10050}
+      Result := 'Network is down';
+    WSAENETUNREACH: {10051}
+      Result := 'Network is unreachable';
+    WSAENETRESET: {10052}
+      Result := 'Network dropped connection on reset';
+    WSAECONNABORTED: {10053}
+      Result := 'Software caused connection abort';
+    WSAECONNRESET: {10054}
+      Result := 'Connection reset by peer';
+    WSAENOBUFS: {10055}
+      Result := 'No Buffer space available';
+    WSAEISCONN: {10056}
+      Result := 'Socket is already connected';
+    WSAENOTCONN: {10057}
+      Result := 'Socket is not connected';
+    WSAESHUTDOWN: {10058}
+      Result := 'Can''t send after Socket shutdown';
+    WSAETOOMANYREFS: {10059}
+      Result := 'Too many references:can''t splice';
+    WSAETIMEDOUT: {10060}
+      Result := 'Connection timed out';
+    WSAECONNREFUSED: {10061}
+      Result := 'Connection refused';
+    WSAELOOP: {10062}
+      Result := 'Too many levels of symbolic links';
+    WSAENAMETOOLONG: {10063}
+      Result := 'File name is too long';
+    WSAEHOSTDOWN: {10064}
+      Result := 'Host is down';
+    WSAEHOSTUNREACH: {10065}
+      Result := 'No route to host';
+    WSAENOTEMPTY: {10066}
+      Result := 'Directory is not empty';
+    WSAEPROCLIM: {10067}
+      Result := 'Too many processes';
+    WSAEUSERS: {10068}
+      Result := 'Too many users';
+    WSAEDQUOT: {10069}
+      Result := 'Disk quota exceeded';
+    WSAESTALE: {10070}
+      Result := 'Stale NFS file handle';
+    WSAEREMOTE: {10071}
+      Result := 'Too many levels of remote in path';
+    WSASYSNOTREADY: {10091}
+      Result := 'Network subsystem is unusable';
+    WSAVERNOTSUPPORTED: {10092}
+      Result := 'Winsock DLL cannot support this application';
+    WSANOTINITIALISED: {10093}
+      Result := 'Winsock not initialized';
+    WSAEDISCON: {10101}
+      Result := 'Disconnect';
+    WSAHOST_NOT_FOUND: {11001}
+      Result := 'Host not found';
+    WSATRY_AGAIN: {11002}
+      Result := 'Non authoritative - host not found';
+    WSANO_RECOVERY: {11003}
+      Result := 'Non recoverable error';
+    WSANO_DATA: {11004}
+      Result := 'Valid name, no data record of requested type'
+  else
+    Result := 'Other Winsock error (' + IntToStr(ErrorCode) + ')';
+  end;
+{$ENDIF}
+end;
+
+{======================================================================}
+
+constructor TSocksBlockSocket.Create;
+begin
+  inherited Create;
+  FSocksIP:= '';
+  FSocksPort:= '1080';
+  FSocksTimeout:= 60000;
+  FSocksUsername:= '';
+  FSocksPassword:= '';
+  FUsingSocks := False;
+  FSocksResolver := True;
+  FSocksLastError := 0;
+  FSocksResponseIP := '';
+  FSocksResponsePort := '';
+  FSocksLocalIP := '';
+  FSocksLocalPort := '';
+  FSocksRemoteIP := '';
+  FSocksRemotePort := '';
+  FBypassFlag := False;
+  FSocksType := ST_Socks5;
+end;
+
+function TSocksBlockSocket.SocksOpen: boolean;
+var
+  Buf: string;
+  n: integer;
+begin
+  Result := False;
+  FUsingSocks := False;
+  if FSocksType <> ST_Socks5 then
+  begin
+    FUsingSocks := True;
+    Result := True;
+  end
+  else
+  begin
+    FBypassFlag := True;
+    try
+      if FSocksUsername = '' then
+        Buf := #5 + #1 + #0
+      else
+        Buf := #5 + #2 + #2 +#0;
+      SendString(Buf);
+      Buf := RecvBufferStr(2, FSocksTimeout);
+      if Length(Buf) < 2 then
+        Exit;
+      if Buf[1] <> #5 then
+        Exit;
+      n := Ord(Buf[2]);
+      case n of
+        0: //not need authorisation
+          ;
+        2:
+          begin
+            Buf := #1 + char(Length(FSocksUsername)) + FSocksUsername
+              + char(Length(FSocksPassword)) + FSocksPassword;
+            SendString(Buf);
+            Buf := RecvBufferStr(2, FSocksTimeout);
+            if Length(Buf) < 2 then
+              Exit;
+            if Buf[2] <> #0 then
+              Exit;
+          end;
+      else
+        //other authorisation is not supported!
+        Exit;
+      end;
+      FUsingSocks := True;
+      Result := True;
+    finally
+      FBypassFlag := False;
+    end;
+  end;
+end;
+
+function TSocksBlockSocket.SocksRequest(Cmd: Byte;
+  const IP, Port: string): Boolean;
+var
+  Buf: string;
+begin
+  FBypassFlag := True;
+  try
+    if FSocksType <> ST_Socks5 then
+      Buf := #4 + char(Cmd) + SocksCode(IP, Port)
+    else
+      Buf := #5 + char(Cmd) + #0 + SocksCode(IP, Port);
+    SendString(Buf);
+    Result := FLastError = 0;
+  finally
+    FBypassFlag := False;
+  end;
+end;
+
+function TSocksBlockSocket.SocksResponse: Boolean;
+var
+  Buf, s: string;
+  x: integer;
+begin
+  Result := False;
+  FBypassFlag := True;
+  try
+    FSocksResponseIP := '';
+    FSocksResponsePort := '';
+    FSocksLastError := -1;
+    if FSocksType <> ST_Socks5 then
+    begin
+      Buf := RecvBufferStr(8, FSocksTimeout);
+      if FLastError <> 0 then
+        Exit;
+      if Buf[1] <> #0 then
+        Exit;
+      FSocksLastError := Ord(Buf[2]);
+    end
+    else
+    begin
+      Buf := RecvBufferStr(4, FSocksTimeout);
+      if FLastError <> 0 then
+        Exit;
+      if Buf[1] <> #5 then
+        Exit;
+      case Ord(Buf[4]) of
+        1:
+          s := RecvBufferStr(4, FSocksTimeout);
+        3:
+          begin
+            x := RecvByte(FSocksTimeout);
+            if FLastError <> 0 then
+              Exit;
+            s := char(x) + RecvBufferStr(x, FSocksTimeout);
+          end;
+        4:
+          s := RecvBufferStr(16, FSocksTimeout);
+      else
+        Exit;
+      end;
+      Buf := Buf + s + RecvBufferStr(2, FSocksTimeout);
+      if FLastError <> 0 then
+        Exit;
+      FSocksLastError := Ord(Buf[2]);
+    end;
+    if ((FSocksLastError <> 0) and (FSocksLastError <> 90)) then
+      Exit;
+    SocksDecode(Buf);
+    Result := True;
+  finally
+    FBypassFlag := False;
+  end;
+end;
+
+function TSocksBlockSocket.SocksCode(IP, Port: string): string;
+var
+  ip6: TIp6Bytes;
+  n: integer;
+begin
+  if FSocksType <> ST_Socks5 then
+  begin
+    Result := CodeInt(ResolvePort(Port));
+    if not FSocksResolver then
+      IP := ResolveName(IP);
+    if IsIP(IP) then
+    begin
+      Result := Result + IPToID(IP);
+      Result := Result + FSocksUsername + #0;
+    end
+    else
+    begin
+      Result := Result + IPToID('0.0.0.1');
+      Result := Result + FSocksUsername + #0;
+      Result := Result + IP + #0;
+    end;
+  end
+  else
+  begin
+    if not FSocksResolver then
+      IP := ResolveName(IP);
+    if IsIP(IP) then
+      Result := #1 + IPToID(IP)
+    else
+      if IsIP6(IP) then
+      begin
+        ip6 := StrToIP6(IP);
+        Result := #4;
+        for n := 0 to 15 do
+          Result := Result + char(ip6[n]);
+      end
+      else
+        Result := #3 + char(Length(IP)) + IP;
+    Result := Result + CodeInt(ResolvePort(Port));
+  end;
+end;
+
+function TSocksBlockSocket.SocksDecode(Value: string): integer;
+var
+  Atyp: Byte;
+  y, n: integer;
+  w: Word;
+  ip6: TIp6Bytes;
+begin
+  FSocksResponsePort := '0';
+  Result := 0;
+  if FSocksType <> ST_Socks5 then
+  begin
+    if Length(Value) < 8 then
+      Exit;
+    Result := 3;
+    w := DecodeInt(Value, Result);
+    FSocksResponsePort := IntToStr(w);
+    FSocksResponseIP := Format('%d.%d.%d.%d',
+      [Ord(Value[5]), Ord(Value[6]), Ord(Value[7]), Ord(Value[8])]);
+    Result := 9;
+  end
+  else
+  begin
+    if Length(Value) < 4 then
+      Exit;
+    Atyp := Ord(Value[4]);
+    Result := 5;
+    case Atyp of
+      1:
+        begin
+          if Length(Value) < 10 then
+            Exit;
+          FSocksResponseIP := Format('%d.%d.%d.%d',
+              [Ord(Value[5]), Ord(Value[6]), Ord(Value[7]), Ord(Value[8])]);
+          Result := 9;
+        end;
+      3:
+        begin
+          y := Ord(Value[5]);
+          if Length(Value) < (5 + y + 2) then
+            Exit;
+          for n := 6 to 6 + y - 1 do
+            FSocksResponseIP := FSocksResponseIP + Value[n];
+          Result := 5 + y + 1;
+        end;
+      4:
+        begin
+          if Length(Value) < 22 then
+            Exit;
+          for n := 0 to 15 do
+            ip6[n] := ord(Value[n + 5]);
+          FSocksResponseIP := IP6ToStr(ip6);
+          Result := 21;
+        end;
+    else
+      Exit;
+    end;
+    w := DecodeInt(Value, Result);
+    FSocksResponsePort := IntToStr(w);
+    Result := Result + 2;
+  end;
+end;
+
+{======================================================================}
+
+procedure TDgramBlockSocket.Connect(IP, Port: string);
+begin
+  SetRemoteSin(IP, Port);
+  InternalCreateSocket(FRemoteSin);
+  FBuffer := '';
+  DoStatus(HR_Connect, IP + ':' + Port);
+end;
+
+function TDgramBlockSocket.RecvBuffer(Buffer: TMemory; Length: Integer): Integer;
+begin
+  Result := RecvBufferFrom(Buffer, Length);
+end;
+
+function TDgramBlockSocket.SendBuffer(Buffer: TMemory; Length: Integer): Integer;
+begin
+  Result := SendBufferTo(Buffer, Length);
+end;
+
+{======================================================================}
+
+destructor TUDPBlockSocket.Destroy;
+begin
+  if Assigned(FSocksControlSock) then
+    FSocksControlSock.Free;
+  inherited;
+end;
+
+procedure TUDPBlockSocket.EnableBroadcast(Value: Boolean);
+var
+  d: TSynaOption;
+begin
+  d := TSynaOption.Create;
+  d.Option := SOT_Broadcast;
+  d.Enabled := Value;
+  DelayedOption(d);
+end;
+
+function TUDPBlockSocket.UdpAssociation: Boolean;
+var
+  b: Boolean;
+begin
+  Result := True;
+  FUsingSocks := False;
+  if FSocksIP <> '' then
+  begin
+    Result := False;
+    if not Assigned(FSocksControlSock) then
+      FSocksControlSock := TTCPBlockSocket.Create;
+    FSocksControlSock.CloseSocket;
+    FSocksControlSock.CreateSocketByName(FSocksIP);
+    FSocksControlSock.Connect(FSocksIP, FSocksPort);
+    if FSocksControlSock.LastError <> 0 then
+      Exit;
+    // if not assigned local port, assign it!
+    if not FBinded then
+      Bind(cAnyHost, cAnyPort);
+    //open control TCP connection to SOCKS
+    FSocksControlSock.FSocksUsername := FSocksUsername;
+    FSocksControlSock.FSocksPassword := FSocksPassword;
+    b := FSocksControlSock.SocksOpen;
+    if b then
+      b := FSocksControlSock.SocksRequest(3, GetLocalSinIP, IntToStr(GetLocalSinPort));
+    if b then
+      b := FSocksControlSock.SocksResponse;
+    if not b and (FLastError = 0) then
+      FLastError := WSANO_RECOVERY;
+    FUsingSocks :=FSocksControlSock.UsingSocks;
+    FSocksRemoteIP := FSocksControlSock.FSocksResponseIP;
+    FSocksRemotePort := FSocksControlSock.FSocksResponsePort;
+    Result := b and (FLastError = 0);
+  end;
+end;
+
+function TUDPBlockSocket.SendBufferTo(Buffer: TMemory; Length: Integer): Integer;
+var
+  SIp: string;
+  SPort: integer;
+  Buf: string;
+begin
+  Result := 0;
+  FUsingSocks := False;
+  if (FSocksIP <> '') and (not UdpAssociation) then
+    FLastError := WSANO_RECOVERY
+  else
+  begin
+    if FUsingSocks then
+    begin
+{$IFNDEF CIL}
+      Sip := GetRemoteSinIp;
+      SPort := GetRemoteSinPort;
+      SetRemoteSin(FSocksRemoteIP, FSocksRemotePort);
+      SetLength(Buf,Length);
+      Move(Buffer^, PChar(Buf)^, Length);
+      Buf := #0 + #0 + #0 + SocksCode(Sip, IntToStr(SPort)) + Buf;
+      Result := inherited SendBufferTo(PChar(Buf), System.Length(buf));
+      SetRemoteSin(Sip, IntToStr(SPort));
+{$ENDIF}
+    end
+    else
+      Result := inherited SendBufferTo(Buffer, Length);
+  end;
+end;
+
+function TUDPBlockSocket.RecvBufferFrom(Buffer: TMemory; Length: Integer): Integer;
+var
+  Buf: string;
+  x: integer;
+begin
+  Result := inherited RecvBufferFrom(Buffer, Length);
+  if FUsingSocks then
+  begin
+{$IFNDEF CIL}
+    SetLength(Buf, Result);
+    Move(Buffer^, PChar(Buf)^, Result);
+    x := SocksDecode(Buf);
+    Result := Result - x + 1;
+    Buf := Copy(Buf, x, Result);
+    Move(PChar(Buf)^, Buffer^, Result);
+    SetRemoteSin(FSocksResponseIP, FSocksResponsePort);
+{$ENDIF}
+  end;
+end;
+
+{$IFNDEF CIL}
+procedure TUDPBlockSocket.AddMulticast(MCastIP: string);
+var
+  Multicast: TIP_mreq;
+  Multicast6: TIPv6_mreq;
+  n: integer;
+  ip6: Tip6bytes;
+begin
+  if FIP6Used then
+  begin
+    ip6 := StrToIp6(MCastIP);
+    for n := 0 to 15 do
+      Multicast6.ipv6mr_multiaddr.u6_addr8[n] := Ip6[n];
+    Multicast6.ipv6mr_interface := 0;
+    SockCheck(synsock.SetSockOpt(FSocket, IPPROTO_IPV6, IPV6_JOIN_GROUP,
+      pchar(@Multicast6), SizeOf(Multicast6)));
+  end
+  else
+  begin
+    Multicast.imr_multiaddr.S_addr := swapbytes(strtoip(MCastIP));
+    Multicast.imr_interface.S_addr := INADDR_ANY;
+    SockCheck(synsock.SetSockOpt(FSocket, IPPROTO_IP, IP_ADD_MEMBERSHIP,
+      pchar(@Multicast), SizeOf(Multicast)));
+  end;
+  ExceptCheck;
+end;
+
+procedure TUDPBlockSocket.DropMulticast(MCastIP: string);
+var
+  Multicast: TIP_mreq;
+  Multicast6: TIPv6_mreq;
+  n: integer;
+  ip6: Tip6bytes;
+begin
+  if FIP6Used then
+  begin
+    ip6 := StrToIp6(MCastIP);
+    for n := 0 to 15 do
+      Multicast6.ipv6mr_multiaddr.u6_addr8[n] := Ip6[n];
+    Multicast6.ipv6mr_interface := 0;
+    SockCheck(synsock.SetSockOpt(FSocket, IPPROTO_IPV6, IPV6_LEAVE_GROUP,
+      pchar(@Multicast6), SizeOf(Multicast6)));
+  end
+  else
+  begin
+    Multicast.imr_multiaddr.S_addr := swapbytes(strtoip(MCastIP));
+    Multicast.imr_interface.S_addr := INADDR_ANY;
+    SockCheck(synsock.SetSockOpt(FSocket, IPPROTO_IP, IP_DROP_MEMBERSHIP,
+      pchar(@Multicast), SizeOf(Multicast)));
+  end;
+  ExceptCheck;
+end;
+{$ENDIF}
+
+procedure TUDPBlockSocket.SetMulticastTTL(TTL: integer);
+var
+  d: TSynaOption;
+begin
+  d := TSynaOption.Create;
+  d.Option := SOT_MulticastTTL;
+  d.Value := TTL;
+  DelayedOption(d);
+end;
+
+function TUDPBlockSocket.GetMulticastTTL:integer;
+var
+  l: Integer;
+begin
+{$IFNDEF CIL}
+  l := SizeOf(Result);
+  if FIP6Used then
+    synsock.GetSockOpt(FSocket, IPPROTO_IPV6, IPV6_MULTICAST_HOPS, @Result, l)
+  else
+    synsock.GetSockOpt(FSocket, IPPROTO_IP, IP_MULTICAST_TTL, @Result, l);
+{$ENDIF}
+end;
+
+procedure TUDPBlockSocket.EnableMulticastLoop(Value: Boolean);
+var
+  d: TSynaOption;
+begin
+  d := TSynaOption.Create;
+  d.Option := SOT_MulticastLoop;
+  d.Enabled := Value;
+  DelayedOption(d);
+end;
+
+function TUDPBlockSocket.GetSocketType: integer;
+begin
+  Result := integer(SOCK_DGRAM);
+end;
+
+function TUDPBlockSocket.GetSocketProtocol: integer;
+begin
+ Result := integer(IPPROTO_UDP);
+end;
+
+{======================================================================}
+constructor TTCPBlockSocket.CreateWithSSL(SSLPlugin: TSSLClass);
+begin
+  inherited Create;
+  FSSL := SSLPlugin.Create(self);
+  FHTTPTunnelIP := '';
+  FHTTPTunnelPort := '';
+  FHTTPTunnel := False;
+  FHTTPTunnelRemoteIP := '';
+  FHTTPTunnelRemotePort := '';
+  FHTTPTunnelUser := '';
+  FHTTPTunnelPass := '';
+  FHTTPTunnelTimeout := 30000;
+end;
+
+constructor TTCPBlockSocket.Create;
+begin
+  CreateWithSSL(SSLImplementation);
+end;
+
+destructor TTCPBlockSocket.Destroy;
+begin
+  inherited Destroy;
+  FSSL.Free;
+end;
+
+procedure TTCPBlockSocket.CloseSocket;
+begin
+  if FSSL.SSLEnabled then
+    FSSL.Shutdown;
+  if FSocket <> INVALID_SOCKET then
+  begin
+    Synsock.Shutdown(FSocket, 1);
+    Purge;
+  end;
+  inherited CloseSocket;
+end;
+
+procedure TTCPBlockSocket.DoAfterConnect;
+begin
+  if assigned(OnAfterConnect) then
+  begin
+    OnAfterConnect(Self);
+  end;
+end;
+
+function TTCPBlockSocket.WaitingData: Integer;
+begin
+  Result := 0;
+  if FSSL.SSLEnabled and (FSocket <> INVALID_SOCKET) then
+    Result := FSSL.WaitingData;
+  if Result = 0 then
+    Result := inherited WaitingData;
+end;
+
+procedure TTCPBlockSocket.Listen;
+var
+  b: Boolean;
+  Sip,SPort: string;
+begin
+  if FSocksIP = '' then
+  begin
+    SockCheck(synsock.Listen(FSocket, SOMAXCONN));
+    GetSins;
+  end
+  else
+  begin
+    Sip := GetLocalSinIP;
+    if Sip = cAnyHost then
+      Sip := LocalName;
+    SPort := IntToStr(GetLocalSinPort);
+    inherited Connect(FSocksIP, FSocksPort);
+    b := SocksOpen;
+    if b then
+      b := SocksRequest(2, Sip, SPort);
+    if b then
+      b := SocksResponse;
+    if not b and (FLastError = 0) then
+      FLastError := WSANO_RECOVERY;
+    FSocksLocalIP := FSocksResponseIP;
+    if FSocksLocalIP = cAnyHost then
+      FSocksLocalIP := FSocksIP;
+    FSocksLocalPort := FSocksResponsePort;
+    FSocksRemoteIP := '';
+    FSocksRemotePort := '';
+  end;
+  ExceptCheck;
+  DoStatus(HR_Listen, '');
+end;
+
+function TTCPBlockSocket.Accept: TSocket;
+begin
+  if FUsingSocks then
+  begin
+    if not SocksResponse and (FLastError = 0) then
+      FLastError := WSANO_RECOVERY;
+    FSocksRemoteIP := FSocksResponseIP;
+    FSocksRemotePort := FSocksResponsePort;
+    Result := FSocket;
+  end
+  else
+  begin
+    Result := synsock.Accept(FSocket, FRemoteSin);
+///    SockCheck(Result);
+  end;
+  ExceptCheck;
+  DoStatus(HR_Accept, '');
+end;
+
+procedure TTCPBlockSocket.Connect(IP, Port: string);
+begin
+  if FSocksIP <> '' then
+    SocksDoConnect(IP, Port)
+  else
+    if FHTTPTunnelIP <> '' then
+      HTTPTunnelDoConnect(IP, Port)
+    else
+      inherited Connect(IP, Port);
+  if FLasterror = 0 then
+    DoAfterConnect;
+end;
+
+procedure TTCPBlockSocket.SocksDoConnect(IP, Port: string);
+var
+  b: Boolean;
+begin
+  inherited Connect(FSocksIP, FSocksPort);
+  if FLastError = 0 then
+  begin
+    b := SocksOpen;
+    if b then
+      b := SocksRequest(1, IP, Port);
+    if b then
+      b := SocksResponse;
+    if not b and (FLastError = 0) then
+      FLastError := WSASYSNOTREADY;
+    FSocksLocalIP := FSocksResponseIP;
+    FSocksLocalPort := FSocksResponsePort;
+    FSocksRemoteIP := IP;
+    FSocksRemotePort := Port;
+  end;
+  ExceptCheck;
+  DoStatus(HR_Connect, IP + ':' + Port);
+end;
+
+procedure TTCPBlockSocket.HTTPTunnelDoConnect(IP, Port: string);
+//bugfixed by Mike Green (mgreen@emixode.com)
+var
+  s: string;
+begin
+  Port := IntToStr(ResolvePort(Port));
+  inherited Connect(FHTTPTunnelIP, FHTTPTunnelPort);
+  if FLastError <> 0 then
+    Exit;
+  FHTTPTunnel := False;
+  if IsIP6(IP) then
+    IP := '[' + IP + ']';
+  SendString('CONNECT ' + IP + ':' + Port + ' HTTP/1.0' + CRLF);
+  if FHTTPTunnelUser <> '' then
+  Sendstring('Proxy-Authorization: Basic ' +
+    EncodeBase64(FHTTPTunnelUser + ':' + FHTTPTunnelPass) + CRLF);
+  SendString(CRLF);
+  repeat
+    s := RecvTerminated(FHTTPTunnelTimeout, #$0a);
+    if FLastError <> 0 then
+      Break;
+    if (Pos('HTTP/', s) = 1) and (Length(s) > 11) then
+      FHTTPTunnel := s[10] = '2';
+  until (s = '') or (s = #$0d);
+  if (FLasterror = 0) and not FHTTPTunnel then
+    FLastError := WSASYSNOTREADY;
+  FHTTPTunnelRemoteIP := IP;
+  FHTTPTunnelRemotePort := Port;
+  ExceptCheck;
+end;
+
+procedure TTCPBlockSocket.SSLDoConnect;
+begin
+  FLastError := 0;
+  if not FSSL.Connect then
+    FLastError := WSASYSNOTREADY;
+  ExceptCheck;
+end;
+
+procedure TTCPBlockSocket.SSLDoShutdown;
+begin
+  FLastError := 0;
+  FSSL.BiShutdown;
+end;
+
+function TTCPBlockSocket.GetLocalSinIP: string;
+begin
+  if FUsingSocks then
+    Result := FSocksLocalIP
+  else
+    Result := inherited GetLocalSinIP;
+end;
+
+function TTCPBlockSocket.GetRemoteSinIP: string;
+begin
+  if FUsingSocks then
+    Result := FSocksRemoteIP
+  else
+    if FHTTPTunnel then
+      Result := FHTTPTunnelRemoteIP
+    else
+      Result := inherited GetRemoteSinIP;
+end;
+
+function TTCPBlockSocket.GetLocalSinPort: Integer;
+begin
+  if FUsingSocks then
+    Result := StrToIntDef(FSocksLocalPort, 0)
+  else
+    Result := inherited GetLocalSinPort;
+end;
+
+function TTCPBlockSocket.GetRemoteSinPort: Integer;
+begin
+  if FUsingSocks then
+    Result := ResolvePort(FSocksRemotePort)
+  else
+    if FHTTPTunnel then
+      Result := StrToIntDef(FHTTPTunnelRemotePort, 0)
+    else
+      Result := inherited GetRemoteSinPort;
+end;
+
+function TTCPBlockSocket.RecvBuffer(Buffer: TMemory; Len: Integer): Integer;
+begin
+  if FSSL.SSLEnabled then
+  begin
+    Result := 0;
+    if TestStopFlag then
+      Exit;
+    FLastError := 0;
+    LimitBandwidth(Len, FMaxRecvBandwidth, FNextRecv);
+    Result := FSSL.RecvBuffer(Buffer, Len);
+    if FSSL.LastError <> 0 then
+      FLastError := WSASYSNOTREADY;
+    ExceptCheck;
+    Inc(FRecvCounter, Result);
+    DoStatus(HR_ReadCount, IntToStr(Result));
+    DoMonitor(False, Buffer, Result);
+    DoReadFilter(Buffer, Result);
+  end
+  else
+    Result := inherited RecvBuffer(Buffer, Len);
+end;
+
+function TTCPBlockSocket.SendBuffer(Buffer: TMemory; Length: Integer): Integer;
+var
+  x, y: integer;
+  l, r: integer;
+{$IFNDEF CIL}
+  p: Pointer;
+{$ENDIF}
+begin
+  if FSSL.SSLEnabled then
+  begin
+    Result := 0;
+    if TestStopFlag then
+      Exit;
+    FLastError := 0;
+    DoMonitor(True, Buffer, Length);
+{$IFDEF CIL}
+    Result := FSSL.SendBuffer(Buffer, Length);
+    if FSSL.LastError <> 0 then
+      FLastError := WSASYSNOTREADY;
+    Inc(FSendCounter, Result);
+    DoStatus(HR_WriteCount, IntToStr(Result));
+{$ELSE}
+    l := Length;
+    x := 0;
+    while x < l do
+    begin
+      y := l - x;
+      if y > FSendMaxChunk then
+        y := FSendMaxChunk;
+      if y > 0 then
+      begin
+        LimitBandwidth(y, FMaxSendBandwidth, FNextsend);
+        p := IncPoint(Buffer, x);
+        r := FSSL.SendBuffer(p, y);
+        if FSSL.LastError <> 0 then
+          FLastError := WSASYSNOTREADY;
+        if Flasterror <> 0 then
+          Break;
+        Inc(x, r);
+        Inc(Result, r);
+        Inc(FSendCounter, r);
+        DoStatus(HR_WriteCount, IntToStr(r));
+      end
+      else
+        break;
+    end;
+{$ENDIF}
+    ExceptCheck;
+  end
+  else
+    Result := inherited SendBuffer(Buffer, Length);
+end;
+
+function TTCPBlockSocket.SSLAcceptConnection: Boolean;
+begin
+  FLastError := 0;
+  if not FSSL.Accept then
+    FLastError := WSASYSNOTREADY;
+  ExceptCheck;
+  Result := FLastError = 0;
+end;
+
+function TTCPBlockSocket.GetSocketType: integer;
+begin
+  Result := integer(SOCK_STREAM);
+end;
+
+function TTCPBlockSocket.GetSocketProtocol: integer;
+begin
+  Result := integer(IPPROTO_TCP);
+end;
+
+{======================================================================}
+
+function TICMPBlockSocket.GetSocketType: integer;
+begin
+  Result := integer(SOCK_RAW);
+end;
+
+function TICMPBlockSocket.GetSocketProtocol: integer;
+begin
+  if FIP6Used then
+    Result := integer(IPPROTO_ICMPV6)
+  else
+    Result := integer(IPPROTO_ICMP);
+end;
+
+{======================================================================}
+
+function TRAWBlockSocket.GetSocketType: integer;
+begin
+  Result := integer(SOCK_RAW);
+end;
+
+function TRAWBlockSocket.GetSocketProtocol: integer;
+begin
+  Result := integer(IPPROTO_RAW);
+end;
+
+{======================================================================}
+
+constructor TSynaClient.Create;
+begin
+  inherited Create;
+  FIPInterface := cAnyHost;
+  FTargetHost := cLocalhost;
+  FTargetPort := cAnyPort;
+  FTimeout := 5000;
+  FUsername := '';
+  FPassword := '';
+end;
+
+{======================================================================}
+
+constructor TCustomSSL.Create(const Value: TTCPBlockSocket);
+begin
+  inherited Create;
+  FSocket := Value;
+  FSSLEnabled := False;
+  FUsername := '';
+  FPassword := '';
+  FLastError := 0;
+  FLastErrorDesc := '';
+  FVerifyCert := False;
+  FSSLType := LT_all;
+  FKeyPassword := '';
+  FCiphers := '';
+  FCertificateFile := '';
+  FPrivateKeyFile := '';
+  FCertCAFile := '';
+  FCertCA := '';
+  FTrustCertificate := '';
+  FTrustCertificateFile := '';
+  FCertificate := '';
+  FPrivateKey := '';
+  FPFX := '';
+  FPFXfile := '';
+  FSSHChannelType := '';
+  FSSHChannelArg1 := '';
+  FSSHChannelArg2 := '';
+end;
+
+procedure TCustomSSL.Assign(const Value: TCustomSSL);
+begin
+  FUsername := Value.Username;
+  FPassword := Value.Password;
+  FVerifyCert := Value.VerifyCert;
+  FSSLType := Value.SSLType;
+  FKeyPassword := Value.KeyPassword;
+  FCiphers := Value.Ciphers;
+  FCertificateFile := Value.CertificateFile;
+  FPrivateKeyFile := Value.PrivateKeyFile;
+  FCertCAFile := Value.CertCAFile;
+  FCertCA := Value.CertCA;
+  FTrustCertificate := Value.TrustCertificate;
+  FTrustCertificateFile := Value.TrustCertificateFile;
+  FCertificate := Value.Certificate;
+  FPrivateKey := Value.PrivateKey;
+  FPFX := Value.PFX;
+  FPFXfile := Value.PFXfile;
+end;
+
+procedure TCustomSSL.ReturnError;
+begin
+  FLastError := -1;
+  FLastErrorDesc := 'SLL is not implemented!';
+end;
+
+function TCustomSSL.LibVersion: String;
+begin
+  Result := '';
+end;
+
+function TCustomSSL.LibName: String;
+begin
+  Result := '';
+end;
+
+function TCustomSSL.CreateSelfSignedCert(Host: string): Boolean;
+begin
+  Result := False;
+end;
+
+function TCustomSSL.Connect: boolean;
+begin
+  ReturnError;
+  Result := False;
+end;
+
+function TCustomSSL.Accept: boolean;
+begin
+  ReturnError;
+  Result := False;
+end;
+
+function TCustomSSL.Shutdown: boolean;
+begin
+  ReturnError;
+  Result := False;
+end;
+
+function TCustomSSL.BiShutdown: boolean;
+begin
+  ReturnError;
+  Result := False;
+end;
+
+function TCustomSSL.SendBuffer(Buffer: TMemory; Len: Integer): Integer;
+begin
+  ReturnError;
+  Result := integer(SOCKET_ERROR);
+end;
+
+function TCustomSSL.RecvBuffer(Buffer: TMemory; Len: Integer): Integer;
+begin
+  ReturnError;
+  Result := integer(SOCKET_ERROR);
+end;
+
+function TCustomSSL.WaitingData: Integer;
+begin
+  ReturnError;
+  Result := 0;
+end;
+
+function TCustomSSL.GetSSLVersion: string;
+begin
+  Result := '';
+end;
+
+function TCustomSSL.GetPeerSubject: string;
+begin
+  Result := '';
+end;
+
+function TCustomSSL.GetPeerName: string;
+begin
+  Result := '';
+end;
+
+function TCustomSSL.GetPeerIssuer: string;
+begin
+  Result := '';
+end;
+
+function TCustomSSL.GetPeerFingerprint: string;
+begin
+  Result := '';
+end;
+
+function TCustomSSL.GetCertInfo: string;
+begin
+  Result := '';
+end;
+
+function TCustomSSL.GetCipherName: string;
+begin
+  Result := '';
+end;
+
+function TCustomSSL.GetCipherBits: integer;
+begin
+  Result := 0;
+end;
+
+function TCustomSSL.GetCipherAlgBits: integer;
+begin
+  Result := 0;
+end;
+
+function TCustomSSL.GetVerifyCert: integer;
+begin
+  Result := 1;
+end;
+
+{======================================================================}
+
+function TSSLNone.LibVersion: String;
+begin
+  Result := 'Without SSL support';
+end;
+
+function TSSLNone.LibName: String;
+begin
+  Result := 'ssl_none';
+end;
+
+{======================================================================}
+
+{$IFDEF ONCEWINSOCK}
+initialization
+begin
+  if not InitSocketInterface(DLLStackName) then
+  begin
+    e := ESynapseError.Create('Error loading Socket interface (' + DLLStackName + ')!');
+    e.ErrorCode := 0;
+    e.ErrorMessage := 'Error loading Socket interface (' + DLLStackName + ')!';
+    raise e;
+  end;
+  synsock.WSAStartup(WinsockLevel, WsaDataOnce);
+end;
+{$ENDIF}
+
+finalization
+begin
+{$IFDEF ONCEWINSOCK}
+  synsock.WSACleanup;
+  DestroySocketInterface;
+{$ENDIF}
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/Synapse/httpsend.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/Synapse/httpsend.pas
new file mode 100644
index 0000000..4bfa14d
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/Synapse/httpsend.pas	
@@ -0,0 +1,774 @@
+{$IFDEF WIN64}{$DEFINE WIN32}{$ENDIF}
+{==============================================================================|
+| Project : Ararat Synapse                                       | 003.010.007 |
+|==============================================================================|
+| Content: HTTP client                                                         |
+|==============================================================================|
+| Copyright (c)1999-2007, Lukas Gebauer                                        |
+| All rights reserved.                                                         |
+|                                                                              |
+| Redistribution and use in source and binary forms, with or without           |
+| modification, are permitted provided that the following conditions are met:  |
+|                                                                              |
+| Redistributions of source code must retain the above copyright notice, this  |
+| list of conditions and the following disclaimer.                             |
+|                                                                              |
+| Redistributions in binary form must reproduce the above copyright notice,    |
+| this list of conditions and the following disclaimer in the documentation    |
+| and/or other materials provided with the distribution.                       |
+|                                                                              |
+| Neither the name of Lukas Gebauer nor the names of its contributors may      |
+| be used to endorse or promote products derived from this software without    |
+| specific prior written permission.                                           |
+|                                                                              |
+| THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"  |
+| AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE    |
+| IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE   |
+| ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE FOR  |
+| ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL       |
+| DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR   |
+| SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER   |
+| CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT           |
+| LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY    |
+| OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH  |
+| DAMAGE.                                                                      |
+|==============================================================================|
+| The Initial Developer of the Original Code is Lukas Gebauer (Czech Republic).|
+| Portions created by Lukas Gebauer are Copyright (c) 1999-2007.               |
+| All Rights Reserved.                                                         |
+|==============================================================================|
+| Contributor(s):                                                              |
+|==============================================================================|
+| History: see HISTORY.HTM from distribution package                           |
+|          (Found at URL: http://www.ararat.cz/synapse/)                       |
+|==============================================================================}
+
+{:@abstract(HTTP protocol client)
+
+Used RFC: RFC-1867, RFC-1947, RFC-2388, RFC-2616
+}
+
+{$IFDEF FPC}
+  {$MODE DELPHI}
+{$ENDIF}
+{$H+}
+
+unit httpsend;
+
+interface
+
+uses
+  SysUtils, Classes,
+  blcksock, synautil, synaip, synacode, synsock;
+
+const
+  cHttpProtocol = '80';
+
+type
+  {:These encoding types are used internally by the THTTPSend object to identify
+   the transfer data types.}
+  TTransferEncoding = (TE_UNKNOWN, TE_IDENTITY, TE_CHUNKED);
+
+  {:abstract(Implementation of HTTP protocol.)}
+  THTTPSend = class(TSynaClient)
+  protected
+    FSock: TTCPBlockSocket;
+    FTransferEncoding: TTransferEncoding;
+    FAliveHost: string;
+    FAlivePort: string;
+    FHeaders: TStringList;
+    FDocument: TMemoryStream;
+    FMimeType: string;
+    FProtocol: string;
+    FKeepAlive: Boolean;
+    FStatus100: Boolean;
+    FProxyHost: string;
+    FProxyPort: string;
+    FProxyUser: string;
+    FProxyPass: string;
+    FResultCode: Integer;
+    FResultString: string;
+    FUserAgent: string;
+    FCookies: TStringList;
+    FDownloadSize: integer;
+    FUploadSize: integer;
+    FRangeStart: integer;
+    FRangeEnd: integer;
+    function ReadUnknown: Boolean;
+    function ReadIdentity(Size: Integer): Boolean;
+    function ReadChunked: Boolean;
+    procedure ParseCookies;
+    function PrepareHeaders: string;
+    function InternalDoConnect(needssl: Boolean): Boolean;
+    function InternalConnect(needssl: Boolean): Boolean;
+  public
+    constructor Create;
+    destructor Destroy; override;
+
+    {:Reset headers and document and Mimetype.}
+    procedure Clear;
+
+    {:Decode ResultCode and ResultString from Value.}
+    procedure DecodeStatus(const Value: string);
+
+    {:Connects to host define in URL and access to resource defined in URL by
+     method. If Document is not empty, send it to server as part of HTTP request.
+     Server response is in Document and headers. Connection may be authorised
+     by username and password in URL. If you define proxy properties, connection
+     is made by this proxy. If all OK, result is @true, else result is @false.
+
+     If you use in URL 'https:' instead only 'http:', then your request is made
+     by SSL/TLS connection (if you not specify port, then port 443 is used
+     instead standard port 80). If you use SSL/TLS request and you have defined
+     HTTP proxy, then HTTP-tunnel mode is automaticly used .}
+    function HTTPMethod(const Method, URL: string): Boolean;
+
+    {:You can call this method from OnStatus event for break current data
+     transfer. (or from another thread.)}
+    procedure Abort;
+  published
+    {:Before HTTP operation you may define any non-standard headers for HTTP
+     request, except of: 'Expect: 100-continue', 'Content-Length', 'Content-Type',
+     'Connection', 'Authorization', 'Proxy-Authorization' and 'Host' headers.
+     After HTTP operation contains full headers of returned document.}
+    property Headers: TStringList read FHeaders;
+
+    {:This is stringlist with name-value stringlist pairs. Each this pair is one
+     cookie. After HTTP request is returned cookies parsed to this stringlist.
+     You can leave this cookies untouched for next HTTP request. You can also
+     save this stringlist for later use.}
+    property Cookies: TStringList read FCookies;
+
+    {:Stream with document to send (before request, or with document received
+     from HTTP server (after request).}
+    property Document: TMemoryStream read FDocument;
+
+    {:If you need download only part of requested document, here specify
+     possition of subpart begin. If here 0, then is requested full document.}
+    property RangeStart: integer read FRangeStart Write FRangeStart;
+
+    {:If you need download only part of requested document, here specify
+     possition of subpart end. If here 0, then is requested document from
+     rangeStart to end of document. (for broken download restoration,
+     for example.)}
+    property RangeEnd: integer read FRangeEnd Write FRangeEnd;
+
+    {:Mime type of sending data. Default is: 'text/html'.}
+    property MimeType: string read FMimeType Write FMimeType;
+
+    {:Define protocol version. Possible values are: '1.1', '1.0' (default)
+     and '0.9'.}
+    property Protocol: string read FProtocol Write FProtocol;
+
+    {:If @true (default value), keepalives in HTTP protocol 1.1 is enabled.}
+    property KeepAlive: Boolean read FKeepAlive Write FKeepAlive;
+
+    {:if @true, then server is requested for 100status capability when uploading
+     data. Default is @false (off).}
+    property Status100: Boolean read FStatus100 Write FStatus100;
+
+    {:Address of proxy server (IP address or domain name) where you want to
+     connect in @link(HTTPMethod) method.}
+    property ProxyHost: string read FProxyHost Write FProxyHost;
+
+    {:Port number for proxy connection. Default value is 8080.}
+    property ProxyPort: string read FProxyPort Write FProxyPort;
+
+    {:Username for connect to proxy server where you want to connect in
+     HTTPMethod method.}
+    property ProxyUser: string read FProxyUser Write FProxyUser;
+
+    {:Password for connect to proxy server where you want to connect in
+     HTTPMethod method.}
+    property ProxyPass: string read FProxyPass Write FProxyPass;
+
+    {:Here you can specify custom User-Agent indentification. By default is
+     used: 'Mozilla/4.0 (compatible; Synapse)'}
+    property UserAgent: string read FUserAgent Write FUserAgent;
+
+    {:After successful @link(HTTPMethod) method contains result code of
+     operation.}
+    property ResultCode: Integer read FResultCode;
+
+    {:After successful @link(HTTPMethod) method contains string after result code.}
+    property ResultString: string read FResultString;
+
+    {:if this value is not 0, then data download pending. In this case you have
+     here total sice of downloaded data. It is good for draw download
+     progressbar from OnStatus event.}
+    property DownloadSize: integer read FDownloadSize;
+
+    {:if this value is not 0, then data upload pending. In this case you have
+     here total sice of uploaded data. It is good for draw upload progressbar
+     from OnStatus event.}
+    property UploadSize: integer read FUploadSize;
+    {:Socket object used for TCP/IP operation. Good for seting OnStatus hook, etc.}
+    property Sock: TTCPBlockSocket read FSock;
+  end;
+
+{:A very usefull function, and example of use can be found in the THTTPSend
+ object. It implements the GET method of the HTTP protocol. This function sends
+ the GET method for URL document to an HTTP server. Returned document is in the
+ "Response" stringlist (without any headers). Returns boolean TRUE if all went
+ well.}
+function HttpGetText(const URL: string; const Response: TStrings): Boolean;
+
+{:A very usefull function, and example of use can be found in the THTTPSend
+ object. It implements the GET method of the HTTP protocol. This function sends
+ the GET method for URL document to an HTTP server. Returned document is in the
+ "Response" stream. Returns boolean TRUE if all went well.}
+function HttpGetBinary(const URL: string; const Response: TStream): Boolean;
+
+{:A very useful function, and example of use can be found in the THTTPSend
+ object. It implements the POST method of the HTTP protocol. This function sends
+ the SEND method for a URL document to an HTTP server. The document to be sent
+ is located in "Data" stream. The returned document is in the "Data" stream.
+ Returns boolean TRUE if all went well.}
+function HttpPostBinary(const URL: string; const Data: TStream): Boolean;
+
+{:A very useful function, and example of use can be found in the THTTPSend
+ object. It implements the POST method of the HTTP protocol. This function is
+ good for POSTing form data. It sends the POST method for a URL document to
+ an HTTP server. You must prepare the form data in the same manner as you would
+ the URL data, and pass this prepared data to "URLdata". The following is
+ a sample of how the data would appear: 'name=Lukas&field1=some%20data'.
+ The information in the field must be encoded by EncodeURLElement function.
+ The returned document is in the "Data" stream. Returns boolean TRUE if all
+ went well.}
+function HttpPostURL(const URL, URLData: string; const Data: TStream): Boolean;
+
+{:A very useful function, and example of use can be found in the THTTPSend
+ object. It implements the POST method of the HTTP protocol. This function sends
+ the POST method for a URL document to an HTTP server. This function simulate
+ posting of file by HTML form used method 'multipart/form-data'. Posting file
+ is in DATA stream. Its name is Filename string. Fieldname is for name of
+ formular field with file. (simulate HTML INPUT FILE) The returned document is
+ in the ResultData Stringlist. Returns boolean TRUE if all went well.}
+function HttpPostFile(const URL, FieldName, FileName: string;
+  const Data: TStream; const ResultData: TStrings): Boolean;
+
+implementation
+
+constructor THTTPSend.Create;
+begin
+  inherited Create;
+  FHeaders := TStringList.Create;
+  FCookies := TStringList.Create;
+  FDocument := TMemoryStream.Create;
+  FSock := TTCPBlockSocket.Create;
+  FSock.ConvertLineEnd := True;
+  FSock.SizeRecvBuffer := c64k;
+  FSock.SizeSendBuffer := c64k;
+  FTimeout := 90000;
+  FTargetPort := cHttpProtocol;
+  FProxyHost := '';
+  FProxyPort := '8080';
+  FProxyUser := '';
+  FProxyPass := '';
+  FAliveHost := '';
+  FAlivePort := '';
+  FProtocol := '1.0';
+  FKeepAlive := True;
+  FStatus100 := False;
+  FUserAgent := 'Mozilla/4.0 (compatible; Synapse)';
+  FDownloadSize := 0;
+  FUploadSize := 0;
+  Clear;
+end;
+
+destructor THTTPSend.Destroy;
+begin
+  FSock.Free;
+  FDocument.Free;
+  FCookies.Free;
+  FHeaders.Free;
+  inherited Destroy;
+end;
+
+procedure THTTPSend.Clear;
+begin
+  FRangeStart := 0;
+  FRangeEnd := 0;
+  FDocument.Clear;
+  FHeaders.Clear;
+  FMimeType := 'text/html';
+end;
+
+procedure THTTPSend.DecodeStatus(const Value: string);
+var
+  s, su: string;
+begin
+  s := Trim(SeparateRight(Value, ' '));
+  su := Trim(SeparateLeft(s, ' '));
+  FResultCode := StrToIntDef(su, 0);
+  FResultString := Trim(SeparateRight(s, ' '));
+  if FResultString = s then
+    FResultString := '';
+end;
+
+function THTTPSend.PrepareHeaders: string;
+begin
+  if FProtocol = '0.9' then
+    Result := FHeaders[0] + CRLF
+  else
+{$IFNDEF WIN32}
+    Result := AdjustLineBreaks(FHeaders.Text, tlbsCRLF);
+{$ELSE}
+    Result := FHeaders.Text;
+{$ENDIF}
+end;
+
+function THTTPSend.InternalDoConnect(needssl: Boolean): Boolean;
+begin
+  Result := False;
+  FSock.CloseSocket;
+  FSock.Bind(FIPInterface, cAnyPort);
+  if FSock.LastError <> 0 then
+    Exit;
+  FSock.Connect(FTargetHost, FTargetPort);
+  if FSock.LastError <> 0 then
+    Exit;
+  if needssl then
+  begin
+    FSock.SSLDoConnect;
+    if FSock.LastError <> 0 then
+      Exit;
+  end;
+  FAliveHost := FTargetHost;
+  FAlivePort := FTargetPort;
+  Result := True;
+end;
+
+function THTTPSend.InternalConnect(needssl: Boolean): Boolean;
+begin
+  if FSock.Socket = INVALID_SOCKET then
+    Result := InternalDoConnect(needssl)
+  else
+    if (FAliveHost <> FTargetHost) or (FAlivePort <> FTargetPort)
+      or FSock.CanRead(0) then
+      Result := InternalDoConnect(needssl)
+    else
+      Result := True;
+end;
+
+function THTTPSend.HTTPMethod(const Method, URL: string): Boolean;
+var
+  Sending, Receiving: Boolean;
+  status100: Boolean;
+  status100error: string;
+  ToClose: Boolean;
+  Size: Integer;
+  Prot, User, Pass, Host, Port, Path, Para, URI: string;
+  s, su: string;
+  HttpTunnel: Boolean;
+  n: integer;
+begin
+  {initial values}
+  Result := False;
+  FResultCode := 500;
+  FResultString := '';
+  FDownloadSize := 0;
+  FUploadSize := 0;
+
+  URI := ParseURL(URL, Prot, User, Pass, Host, Port, Path, Para);
+  if User = '' then
+  begin
+    User := FUsername;
+    Pass := FPassword;
+  end;
+  if UpperCase(Prot) = 'HTTPS' then
+  begin
+    HttpTunnel := FProxyHost <> '';
+    FSock.HTTPTunnelIP := FProxyHost;
+    FSock.HTTPTunnelPort := FProxyPort;
+    FSock.HTTPTunnelUser := FProxyUser;
+    FSock.HTTPTunnelPass := FProxyPass;
+  end
+  else
+  begin
+    HttpTunnel := False;
+    FSock.HTTPTunnelIP := '';
+    FSock.HTTPTunnelPort := '';
+    FSock.HTTPTunnelUser := '';
+    FSock.HTTPTunnelPass := '';
+  end;
+
+  Sending := FDocument.Size > 0;
+  {Headers for Sending data}
+  status100 := FStatus100 and Sending and (FProtocol = '1.1');
+  if status100 then
+    FHeaders.Insert(0, 'Expect: 100-continue');
+  if Sending then
+  begin
+    FHeaders.Insert(0, 'Content-Length: ' + IntToStr(FDocument.Size));
+    if FMimeType <> '' then
+      FHeaders.Insert(0, 'Content-Type: ' + FMimeType);
+  end;
+  { setting User-agent }
+  if FUserAgent <> '' then
+    FHeaders.Insert(0, 'User-Agent: ' + FUserAgent);
+  { setting Ranges }
+  if (FRangeStart > 0) or (FRangeEnd > 0) then
+  begin
+    if FRangeEnd >= FRangeStart then
+      FHeaders.Insert(0, 'Range: bytes=' + IntToStr(FRangeStart) + '-' + IntToStr(FRangeEnd))
+    else
+      FHeaders.Insert(0, 'Range: bytes=' + IntToStr(FRangeStart) + '-');
+  end;
+  { setting Cookies }
+  s := '';
+  for n := 0 to FCookies.Count - 1 do
+  begin
+    if s <> '' then
+      s := s + '; ';
+    s := s + FCookies[n];
+  end;
+  if s <> '' then
+    FHeaders.Insert(0, 'Cookie: ' + s);
+  { setting KeepAlives }
+  if not FKeepAlive then
+    FHeaders.Insert(0, 'Connection: close');
+  { set target servers/proxy, authorizations, etc... }
+  if User <> '' then
+    FHeaders.Insert(0, 'Authorization: Basic ' + EncodeBase64(User + ':' + Pass));
+  if (FProxyHost <> '') and (FProxyUser <> '') and not(HttpTunnel) then
+    FHeaders.Insert(0, 'Proxy-Authorization: Basic ' +
+      EncodeBase64(FProxyUser + ':' + FProxyPass));
+  if isIP6(Host) then
+    s := '[' + Host + ']'
+  else
+    s := Host;
+  if Port<>'80' then
+     FHeaders.Insert(0, 'Host: ' + s + ':' + Port)
+  else
+     FHeaders.Insert(0, 'Host: ' + s);
+  if (FProxyHost <> '') and not(HttpTunnel)then
+    URI := Prot + '://' + s + ':' + Port + URI;
+  if URI = '/*' then
+    URI := '*';
+  if FProtocol = '0.9' then
+    FHeaders.Insert(0, UpperCase(Method) + ' ' + URI)
+  else
+    FHeaders.Insert(0, UpperCase(Method) + ' ' + URI + ' HTTP/' + FProtocol);
+  if (FProxyHost <> '') and not(HttpTunnel) then
+  begin
+    FTargetHost := FProxyHost;
+    FTargetPort := FProxyPort;
+  end
+  else
+  begin
+    FTargetHost := Host;
+    FTargetPort := Port;
+  end;
+  if FHeaders[FHeaders.Count - 1] <> '' then
+    FHeaders.Add('');
+
+  { connect }
+  if not InternalConnect(UpperCase(Prot) = 'HTTPS') then
+  begin
+    FAliveHost := '';
+    FAlivePort := '';
+    Exit;
+  end;
+
+  { reading Status }
+  FDocument.Position := 0;
+  Status100Error := '';
+  if status100 then
+  begin
+    { send Headers }
+    FSock.SendString(PrepareHeaders);
+    if FSock.LastError <> 0 then
+      Exit;
+    repeat
+      s := FSock.RecvString(FTimeout);
+      if s <> '' then
+        Break;
+    until FSock.LastError <> 0;
+    DecodeStatus(s);
+    Status100Error := s;
+    repeat
+      s := FSock.recvstring(FTimeout);
+      if s = '' then
+        Break;
+    until FSock.LastError <> 0;
+    if (FResultCode >= 100) and (FResultCode < 200) then
+    begin
+      { we can upload content }
+      Status100Error := '';
+      FUploadSize := FDocument.Size;
+      FSock.SendBuffer(FDocument.Memory, FDocument.Size);
+    end;
+  end
+  else
+    { upload content }
+    if sending then
+    begin
+      if FDocument.Size >= c64k then
+      begin
+        FSock.SendString(PrepareHeaders);
+        FUploadSize := FDocument.Size;
+        FSock.SendBuffer(FDocument.Memory, FDocument.Size);
+      end
+      else
+      begin
+        s := PrepareHeaders + ReadStrFromStream(FDocument, FDocument.Size);
+        FUploadSize := Length(s);
+        FSock.SendString(s);
+      end;
+    end
+    else
+    begin
+      { we not need to upload document, send headers only }
+      FSock.SendString(PrepareHeaders);
+    end;
+
+  if FSock.LastError <> 0 then
+    Exit;
+
+  Clear;
+  Size := -1;
+  FTransferEncoding := TE_UNKNOWN;
+
+  { read status }
+  if Status100Error = '' then
+  begin
+    repeat
+      s := FSock.RecvString(FTimeout);
+      if s <> '' then
+        Break;
+    until FSock.LastError <> 0;
+    if Pos('HTTP/', UpperCase(s)) = 1 then
+    begin
+      FHeaders.Add(s);
+      DecodeStatus(s);
+    end
+    else
+    begin
+      { old HTTP 0.9 and some buggy servers not send result }
+      s := s + CRLF;
+      WriteStrToStream(FDocument, s);
+      FResultCode := 0;
+    end;
+  end
+  else
+    FHeaders.Add(Status100Error);
+
+  { if need receive headers, receive and parse it }
+  ToClose := FProtocol <> '1.1';
+  if FHeaders.Count > 0 then
+    repeat
+      s := FSock.RecvString(FTimeout);
+      FHeaders.Add(s);
+      if s = '' then
+        Break;
+      su := UpperCase(s);
+      if Pos('CONTENT-LENGTH:', su) = 1 then
+      begin
+        Size := StrToIntDef(Trim(SeparateRight(s, ' ')), -1);
+        if Size <> -1 then
+          FTransferEncoding := TE_IDENTITY;
+      end;
+      if Pos('CONTENT-TYPE:', su) = 1 then
+        FMimeType := Trim(SeparateRight(s, ' '));
+      if Pos('TRANSFER-ENCODING:', su) = 1 then
+      begin
+        s := Trim(SeparateRight(su, ' '));
+        if Pos('CHUNKED', s) > 0 then
+          FTransferEncoding := TE_CHUNKED;
+      end;
+      if Pos('CONNECTION: CLOSE', su) = 1 then
+        ToClose := True;
+    until FSock.LastError <> 0;
+  Result := FSock.LastError = 0;
+  if not Result then
+    Exit;
+
+  {if need receive response body, read it}
+  Receiving := Method <> 'HEAD';
+  Receiving := Receiving and (FResultCode <> 204);
+  Receiving := Receiving and (FResultCode <> 304);
+  if Receiving then
+    case FTransferEncoding of
+      TE_UNKNOWN:
+        Result := ReadUnknown;
+      TE_IDENTITY:
+        Result := ReadIdentity(Size);
+      TE_CHUNKED:
+        Result := ReadChunked;
+    end;
+
+  FDocument.Seek(0, soFromBeginning);
+  if ToClose then
+  begin
+    FSock.CloseSocket;
+    FAliveHost := '';
+    FAlivePort := '';
+  end;
+  ParseCookies;
+end;
+
+function THTTPSend.ReadUnknown: Boolean;
+var
+  s: string;
+begin
+  repeat
+    s := FSock.RecvPacket(FTimeout);
+    if FSock.LastError = 0 then
+      WriteStrToStream(FDocument, s);
+  until FSock.LastError <> 0;
+  Result := FSock.LastError = WSAECONNRESET;
+end;
+
+function THTTPSend.ReadIdentity(Size: Integer): Boolean;
+begin
+  if Size > 0 then
+  begin
+    FDownloadSize := Size;
+    FSock.RecvStreamSize(FDocument, FTimeout, Size);
+    FDocument.Seek(0, soFromEnd);
+    Result := FSock.LastError = 0;
+  end
+  else
+    Result := true;
+end;
+
+function THTTPSend.ReadChunked: Boolean;
+var
+  s: string;
+  Size: Integer;
+begin
+  repeat
+    repeat
+      s := FSock.RecvString(FTimeout);
+    until (s <> '') or (FSock.LastError <> 0);
+    if FSock.LastError <> 0 then
+      Break;
+    s := Trim(SeparateLeft(s, ' '));
+    s := Trim(SeparateLeft(s, ';'));
+    Size := StrToIntDef('$' + s, 0);
+    if Size = 0 then
+      Break;
+    if not ReadIdentity(Size) then
+      break;
+  until False;
+  Result := FSock.LastError = 0;
+end;
+
+procedure THTTPSend.ParseCookies;
+var
+  n: integer;
+  s: string;
+  sn, sv: string;
+begin
+  for n := 0 to FHeaders.Count - 1 do
+    if Pos('set-cookie:', lowercase(FHeaders[n])) = 1 then
+    begin
+      s := SeparateRight(FHeaders[n], ':');
+      s := trim(SeparateLeft(s, ';'));
+      sn := trim(SeparateLeft(s, '='));
+      sv := trim(SeparateRight(s, '='));
+      FCookies.Values[sn] := sv;
+    end;
+end;
+
+procedure THTTPSend.Abort;
+begin
+  FSock.StopFlag := True;
+end;
+
+{==============================================================================}
+
+function HttpGetText(const URL: string; const Response: TStrings): Boolean;
+var
+  HTTP: THTTPSend;
+begin
+  HTTP := THTTPSend.Create;
+  try
+    Result := HTTP.HTTPMethod('GET', URL);
+    if Result then
+      Response.LoadFromStream(HTTP.Document);
+  finally
+    HTTP.Free;
+  end;
+end;
+
+function HttpGetBinary(const URL: string; const Response: TStream): Boolean;
+var
+  HTTP: THTTPSend;
+begin
+  HTTP := THTTPSend.Create;
+  try
+    Result := HTTP.HTTPMethod('GET', URL);
+    if Result then
+    begin
+      Response.Seek(0, soFromBeginning);
+      Response.CopyFrom(HTTP.Document, 0);
+    end;
+  finally
+    HTTP.Free;
+  end;
+end;
+
+function HttpPostBinary(const URL: string; const Data: TStream): Boolean;
+var
+  HTTP: THTTPSend;
+begin
+  HTTP := THTTPSend.Create;
+  try
+    HTTP.Document.CopyFrom(Data, 0);
+    HTTP.MimeType := 'Application/octet-stream';
+    Result := HTTP.HTTPMethod('POST', URL);
+    if Result then
+    begin
+      Data.Seek(0, soFromBeginning);
+      Data.CopyFrom(HTTP.Document, 0);
+    end;
+  finally
+    HTTP.Free;
+  end;
+end;
+
+function HttpPostURL(const URL, URLData: string; const Data: TStream): Boolean;
+var
+  HTTP: THTTPSend;
+begin
+  HTTP := THTTPSend.Create;
+  try
+    WriteStrToStream(HTTP.Document, URLData);
+    HTTP.MimeType := 'application/x-www-form-urlencoded';
+    Result := HTTP.HTTPMethod('POST', URL);
+    if Result then
+      Data.CopyFrom(HTTP.Document, 0);
+  finally
+    HTTP.Free;
+  end;
+end;
+
+function HttpPostFile(const URL, FieldName, FileName: string;
+  const Data: TStream; const ResultData: TStrings): Boolean;
+var
+  HTTP: THTTPSend;
+  Bound, s: string;
+begin
+  Bound := IntToHex(Random(MaxInt), 8) + '_Synapse_boundary';
+  HTTP := THTTPSend.Create;
+  try
+    s := '--' + Bound + CRLF;
+    s := s + 'content-disposition: form-data; name="' + FieldName + '";';
+    s := s + ' filename="' + FileName +'"' + CRLF;
+    s := s + 'Content-Type: Application/octet-string' + CRLF + CRLF;
+    WriteStrToStream(HTTP.Document, s);
+    HTTP.Document.CopyFrom(Data, 0);
+    s := CRLF + '--' + Bound + '--' + CRLF;
+    WriteStrToStream(HTTP.Document, s);
+    HTTP.MimeType := 'multipart/form-data; boundary=' + Bound;
+    Result := HTTP.HTTPMethod('POST', URL);
+    if Result then
+      ResultData.LoadFromStream(HTTP.Document);
+  finally
+    HTTP.Free;
+  end;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/Synapse/ssfpc.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/Synapse/ssfpc.pas
new file mode 100644
index 0000000..8568023
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/Synapse/ssfpc.pas	
@@ -0,0 +1,872 @@
+{==============================================================================|
+| Project : Ararat Synapse                                       | 001.000.003 |
+|==============================================================================|
+| Content: Socket Independent Platform Layer - FreePascal definition include   |
+|==============================================================================|
+| Copyright (c)2006, Lukas Gebauer                                             |
+| All rights reserved.                                                         |
+|                                                                              |
+| Redistribution and use in source and binary forms, with or without           |
+| modification, are permitted provided that the following conditions are met:  |
+|                                                                              |
+| Redistributions of source code must retain the above copyright notice, this  |
+| list of conditions and the following disclaimer.                             |
+|                                                                              |
+| Redistributions in binary form must reproduce the above copyright notice,    |
+| this list of conditions and the following disclaimer in the documentation    |
+| and/or other materials provided with the distribution.                       |
+|                                                                              |
+| Neither the name of Lukas Gebauer nor the names of its contributors may      |
+| be used to endorse or promote products derived from this software without    |
+| specific prior written permission.                                           |
+|                                                                              |
+| THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"  |
+| AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE    |
+| IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE   |
+| ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE FOR  |
+| ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL       |
+| DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR   |
+| SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER   |
+| CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT           |
+| LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY    |
+| OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH  |
+| DAMAGE.                                                                      |
+|==============================================================================|
+| The Initial Developer of the Original Code is Lukas Gebauer (Czech Republic).|
+| Portions created by Lukas Gebauer are Copyright (c)2006.                     |
+| All Rights Reserved.                                                         |
+|==============================================================================|
+| Contributor(s):                                                              |
+|==============================================================================|
+| History: see HISTORY.HTM from distribution package                           |
+|          (Found at URL: http://www.ararat.cz/synapse/)                       |
+|==============================================================================}
+
+{:@exclude}
+
+{$IFDEF FPC}
+
+//{$DEFINE FORCEOLDAPI}
+{Note about define FORCEOLDAPI:
+If you activate this compiler directive, then is allways used old socket API
+for name resolution. If you leave this directive inactive, then the new API
+is used, when running system allows it.
+
+For IPv6 support you must have new API!
+}
+
+{$IFDEF FPC}
+  {$MODE DELPHI}
+{$ENDIF}
+{$H+}
+
+{$ifdef FreeBSD}
+{$DEFINE SOCK_HAS_SINLEN}               // BSD definition of scoketaddr
+{$endif}
+{$ifdef darwin}
+{$DEFINE SOCK_HAS_SINLEN}               // BSD definition of scoketaddr
+{$endif}
+
+interface
+
+uses
+  SyncObjs, SysUtils, Classes,
+  synafpc, BaseUnix, Unix, termio, sockets, netdb;
+
+function InitSocketInterface(stack: string): Boolean;
+function DestroySocketInterface: Boolean;
+
+const
+  DLLStackName = '';
+  WinsockLevel = $0202;
+
+  cLocalHost = '127.0.0.1';
+  cAnyHost = '0.0.0.0';
+  c6AnyHost = '::0';
+
+type
+  TSocket = longint;
+  TAddrFamily = integer;
+
+  TMemory = pointer;
+
+
+type
+  TFDSet = Baseunix.TFDSet;
+  PFDSet = ^TFDSet;
+  Ptimeval = Baseunix.ptimeval;
+  Ttimeval = Baseunix.ttimeval;
+
+const
+  FIONREAD        = termio.FIONREAD;
+  FIONBIO         = termio.FIONBIO;
+  FIOASYNC        = termio.FIOASYNC;
+
+const
+  IPPROTO_IP     =   0;		{ Dummy					}
+  IPPROTO_ICMP   =   1;		{ Internet Control Message Protocol }
+  IPPROTO_IGMP   =   2;		{ Internet Group Management Protocol}
+  IPPROTO_TCP    =   6;		{ TCP           			}
+  IPPROTO_UDP    =   17;	{ User Datagram Protocol		}
+  IPPROTO_IPV6   =   41;
+  IPPROTO_ICMPV6 =   58;
+
+  IPPROTO_RAW    =   255;
+  IPPROTO_MAX    =   256;
+
+type
+  PInAddr = ^TInAddr;
+  TInAddr = sockets.in_addr;
+
+  PSockAddrIn = ^TSockAddrIn;
+  TSockAddrIn = sockets.TInetSockAddr;
+
+
+  TIP_mreq =  record
+    imr_multiaddr: TInAddr;     // IP multicast address of group
+    imr_interface: TInAddr;     // local IP address of interface
+  end;
+
+
+  PInAddr6 = ^TInAddr6;
+  TInAddr6 = sockets.Tin6_addr;
+
+  PSockAddrIn6 = ^TSockAddrIn6;
+  TSockAddrIn6 = sockets.TInetSockAddr6;
+
+
+  TIPv6_mreq = record
+    ipv6mr_multiaddr: TInAddr6; // IPv6 multicast address.
+    ipv6mr_interface: integer;   // Interface index.
+  end;
+
+const
+  INADDR_ANY       = $00000000;
+  INADDR_LOOPBACK  = $7F000001;
+  INADDR_BROADCAST = $FFFFFFFF;
+  INADDR_NONE      = $FFFFFFFF;
+  ADDR_ANY		 = INADDR_ANY;
+  INVALID_SOCKET		= TSocket(NOT(0));
+  SOCKET_ERROR			= -1;
+
+Const
+  IP_TOS             = sockets.IP_TOS;             { int; IP type of service and precedence.  }
+  IP_TTL             = sockets.IP_TTL;             { int; IP time to live.  }
+  IP_HDRINCL         = sockets.IP_HDRINCL;         { int; Header is included with data.  }
+  IP_OPTIONS         = sockets.IP_OPTIONS;         { ip_opts; IP per-packet options.  }
+//  IP_ROUTER_ALERT    = sockets.IP_ROUTER_ALERT;    { bool }
+  IP_RECVOPTS        = sockets.IP_RECVOPTS;        { bool }
+  IP_RETOPTS         = sockets.IP_RETOPTS;         { bool }
+//  IP_PKTINFO         = sockets.IP_PKTINFO;         { bool }
+//  IP_PKTOPTIONS      = sockets.IP_PKTOPTIONS;
+//  IP_PMTUDISC        = sockets.IP_PMTUDISC;        { obsolete name? }
+//  IP_MTU_DISCOVER    = sockets.IP_MTU_DISCOVER;    { int; see below }
+//  IP_RECVERR         = sockets.IP_RECVERR;         { bool }
+//  IP_RECVTTL         = sockets.IP_RECVTTL;         { bool }
+//  IP_RECVTOS         = sockets.IP_RECVTOS;         { bool }
+  IP_MULTICAST_IF    = sockets.IP_MULTICAST_IF;    { in_addr; set/get IP multicast i/f }
+  IP_MULTICAST_TTL   = sockets.IP_MULTICAST_TTL;   { u_char; set/get IP multicast ttl }
+  IP_MULTICAST_LOOP  = sockets.IP_MULTICAST_LOOP;  { i_char; set/get IP multicast loopback }
+  IP_ADD_MEMBERSHIP  = sockets.IP_ADD_MEMBERSHIP;  { ip_mreq; add an IP group membership }
+  IP_DROP_MEMBERSHIP = sockets.IP_DROP_MEMBERSHIP; { ip_mreq; drop an IP group membership }
+
+  SOL_SOCKET    = sockets.SOL_SOCKET;
+
+  SO_DEBUG      = sockets.SO_DEBUG;
+  SO_REUSEADDR  = sockets.SO_REUSEADDR;
+  SO_TYPE       = sockets.SO_TYPE;
+  SO_ERROR      = sockets.SO_ERROR;
+  SO_DONTROUTE  = sockets.SO_DONTROUTE;
+  SO_BROADCAST  = sockets.SO_BROADCAST;
+  SO_SNDBUF     = sockets.SO_SNDBUF;
+  SO_RCVBUF     = sockets.SO_RCVBUF;
+  SO_KEEPALIVE  = sockets.SO_KEEPALIVE;
+  SO_OOBINLINE  = sockets.SO_OOBINLINE;
+//  SO_NO_CHECK   = sockets.SO_NO_CHECK;
+//  SO_PRIORITY   = sockets.SO_PRIORITY;
+  SO_LINGER     = sockets.SO_LINGER;
+//  SO_BSDCOMPAT  = sockets.SO_BSDCOMPAT;
+//  SO_REUSEPORT  = sockets.SO_REUSEPORT;
+//  SO_PASSCRED   = sockets.SO_PASSCRED;
+//  SO_PEERCRED   = sockets.SO_PEERCRED;
+  SO_RCVLOWAT   = sockets.SO_RCVLOWAT;
+  SO_SNDLOWAT   = sockets.SO_SNDLOWAT;
+  SO_RCVTIMEO   = sockets.SO_RCVTIMEO;
+  SO_SNDTIMEO   = sockets.SO_SNDTIMEO;
+{ Security levels - as per NRL IPv6 - don't actually do anything }
+//  SO_SECURITY_AUTHENTICATION       = sockets.SO_SECURITY_AUTHENTICATION;
+//  SO_SECURITY_ENCRYPTION_TRANSPORT = sockets.SO_SECURITY_ENCRYPTION_TRANSPORT;
+//  SO_SECURITY_ENCRYPTION_NETWORK   = sockets.SO_SECURITY_ENCRYPTION_NETWORK;
+//  SO_BINDTODEVICE                  = sockets.SO_BINDTODEVICE;
+{ Socket filtering }
+//  SO_ATTACH_FILTER = sockets.SO_ATTACH_FILTER;
+//  SO_DETACH_FILTER = sockets.SO_DETACH_FILTER;
+
+  SOMAXCONN       = 1024;
+
+  IPV6_UNICAST_HOPS     = sockets.IPV6_UNICAST_HOPS;
+  IPV6_MULTICAST_IF     = sockets.IPV6_MULTICAST_IF;
+  IPV6_MULTICAST_HOPS   = sockets.IPV6_MULTICAST_HOPS;
+  IPV6_MULTICAST_LOOP   = sockets.IPV6_MULTICAST_LOOP;
+  IPV6_JOIN_GROUP       = sockets.IPV6_JOIN_GROUP;
+  IPV6_LEAVE_GROUP      = sockets.IPV6_LEAVE_GROUP;
+
+const
+  SOCK_STREAM     = 1;               { stream socket }
+  SOCK_DGRAM      = 2;               { datagram socket }
+  SOCK_RAW        = 3;               { raw-protocol interface }
+  SOCK_RDM        = 4;               { reliably-delivered message }
+  SOCK_SEQPACKET  = 5;               { sequenced packet stream }
+
+{ TCP options. }
+  TCP_NODELAY     = $0001;
+
+{ Address families. }
+
+  AF_UNSPEC       = 0;               { unspecified }
+  AF_INET         = 2;               { internetwork: UDP, TCP, etc. }
+  AF_INET6        = 10;              { Internetwork Version 6 }
+  AF_MAX          = 24;
+
+{ Protocol families, same as address families for now. }
+  PF_UNSPEC       = AF_UNSPEC;
+  PF_INET         = AF_INET;
+  PF_INET6        = AF_INET6;
+  PF_MAX          = AF_MAX;
+
+type
+{ Structure used for manipulating linger option. }
+  PLinger = ^TLinger;
+  TLinger = packed record
+    l_onoff: integer;
+    l_linger: integer;
+  end;
+
+const
+
+  MSG_OOB       = sockets.MSG_OOB;      // Process out-of-band data.
+  MSG_PEEK      = sockets.MSG_PEEK;     // Peek at incoming messages.
+  {$IFDEF DARWIN}
+  MSG_NOSIGNAL  = $4000;
+  {$ELSE}
+  MSG_NOSIGNAL  = sockets.MSG_NOSIGNAL; // Do not generate SIGPIPE.
+  {$ENDIF}
+
+const
+  WSAEINTR = ESysEINTR;
+  WSAEBADF = ESysEBADF;
+  WSAEACCES = ESysEACCES;
+  WSAEFAULT = ESysEFAULT;
+  WSAEINVAL = ESysEINVAL;
+  WSAEMFILE = ESysEMFILE;
+  WSAEWOULDBLOCK = ESysEWOULDBLOCK;
+  WSAEINPROGRESS = ESysEINPROGRESS;
+  WSAEALREADY = ESysEALREADY;
+  WSAENOTSOCK = ESysENOTSOCK;
+  WSAEDESTADDRREQ = ESysEDESTADDRREQ;
+  WSAEMSGSIZE = ESysEMSGSIZE;
+  WSAEPROTOTYPE = ESysEPROTOTYPE;
+  WSAENOPROTOOPT = ESysENOPROTOOPT;
+  WSAEPROTONOSUPPORT = ESysEPROTONOSUPPORT;
+  WSAESOCKTNOSUPPORT = ESysESOCKTNOSUPPORT;
+  WSAEOPNOTSUPP = ESysEOPNOTSUPP;
+  WSAEPFNOSUPPORT = ESysEPFNOSUPPORT;
+  WSAEAFNOSUPPORT = ESysEAFNOSUPPORT;
+  WSAEADDRINUSE = ESysEADDRINUSE;
+  WSAEADDRNOTAVAIL = ESysEADDRNOTAVAIL;
+  WSAENETDOWN = ESysENETDOWN;
+  WSAENETUNREACH = ESysENETUNREACH;
+  WSAENETRESET = ESysENETRESET;
+  WSAECONNABORTED = ESysECONNABORTED;
+  WSAECONNRESET = ESysECONNRESET;
+  WSAENOBUFS = ESysENOBUFS;
+  WSAEISCONN = ESysEISCONN;
+  WSAENOTCONN = ESysENOTCONN;
+  WSAESHUTDOWN = ESysESHUTDOWN;
+  WSAETOOMANYREFS = ESysETOOMANYREFS;
+  WSAETIMEDOUT = ESysETIMEDOUT;
+  WSAECONNREFUSED = ESysECONNREFUSED;
+  WSAELOOP = ESysELOOP;
+  WSAENAMETOOLONG = ESysENAMETOOLONG;
+  WSAEHOSTDOWN = ESysEHOSTDOWN;
+  WSAEHOSTUNREACH = ESysEHOSTUNREACH;
+  WSAENOTEMPTY = ESysENOTEMPTY;
+  WSAEPROCLIM = -1;
+  WSAEUSERS = ESysEUSERS;
+  WSAEDQUOT = ESysEDQUOT;
+  WSAESTALE = ESysESTALE;
+  WSAEREMOTE = ESysEREMOTE;
+  WSASYSNOTREADY = -2;
+  WSAVERNOTSUPPORTED = -3;
+  WSANOTINITIALISED = -4;
+  WSAEDISCON = -5;
+  WSAHOST_NOT_FOUND = 1;
+  WSATRY_AGAIN = 2;
+  WSANO_RECOVERY = 3;
+  WSANO_DATA = -6;
+
+const
+  WSADESCRIPTION_LEN     =   256;
+  WSASYS_STATUS_LEN      =   128;
+type
+  PWSAData = ^TWSAData;
+  TWSAData = packed record
+    wVersion: Word;
+    wHighVersion: Word;
+    szDescription: array[0..WSADESCRIPTION_LEN] of Char;
+    szSystemStatus: array[0..WSASYS_STATUS_LEN] of Char;
+    iMaxSockets: Word;
+    iMaxUdpDg: Word;
+    lpVendorInfo: PChar;
+  end;
+
+  function IN6_IS_ADDR_UNSPECIFIED(const a: PInAddr6): boolean;
+  function IN6_IS_ADDR_LOOPBACK(const a: PInAddr6): boolean;
+  function IN6_IS_ADDR_LINKLOCAL(const a: PInAddr6): boolean;
+  function IN6_IS_ADDR_SITELOCAL(const a: PInAddr6): boolean;
+  function IN6_IS_ADDR_MULTICAST(const a: PInAddr6): boolean;
+  function IN6_ADDR_EQUAL(const a: PInAddr6; const b: PInAddr6):boolean;
+  procedure SET_IN6_IF_ADDR_ANY (const a: PInAddr6);
+  procedure SET_LOOPBACK_ADDR6 (const a: PInAddr6);
+
+var
+  in6addr_any, in6addr_loopback : TInAddr6;
+
+procedure FD_CLR(Socket: TSocket; var FDSet: TFDSet);
+function FD_ISSET(Socket: TSocket; var FDSet: TFDSet): Boolean;
+procedure FD_SET(Socket: TSocket; var FDSet: TFDSet);
+procedure FD_ZERO(var FDSet: TFDSet);
+
+{=============================================================================}
+
+var
+  SynSockCS: SyncObjs.TCriticalSection;
+  SockEnhancedApi: Boolean;
+  SockWship6Api: Boolean;
+
+type
+  TVarSin = packed record
+  {$ifdef SOCK_HAS_SINLEN}
+     sin_len     : cuchar;
+  {$endif}
+    case integer of
+      0: (AddressFamily: sa_family_t);
+      1: (
+        case sin_family: sa_family_t of
+          AF_INET: (sin_port: word;
+                    sin_addr: TInAddr;
+                    sin_zero: array[0..7] of Char);
+          AF_INET6: (sin6_port:     word;
+                		sin6_flowinfo: longword;
+      	    	      sin6_addr:     TInAddr6;
+      		          sin6_scope_id: longword);
+          );
+  end;
+
+function SizeOfVarSin(sin: TVarSin): integer;
+
+  function WSAStartup(wVersionRequired: Word; var WSData: TWSAData): Integer;
+  function WSACleanup: Integer;
+  function WSAGetLastError: Integer;
+  function GetHostName: string;
+  function Shutdown(s: TSocket; how: Integer): Integer;
+  function SetSockOpt(s: TSocket; level, optname: Integer; optval: TMemory;
+    optlen: Integer): Integer;
+  function GetSockOpt(s: TSocket; level, optname: Integer; optval: TMemory;
+    var optlen: Integer): Integer;
+  function Send(s: TSocket; Buf: TMemory; len, flags: Integer): Integer;
+  function Recv(s: TSocket; Buf: TMemory; len, flags: Integer): Integer;
+  function SendTo(s: TSocket; Buf: TMemory; len, flags: Integer; addrto: TVarSin): Integer;
+  function RecvFrom(s: TSocket; Buf: TMemory; len, flags: Integer; var from: TVarSin): Integer;
+  function ntohs(netshort: word): word;
+  function ntohl(netlong: longword): longword;
+  function Listen(s: TSocket; backlog: Integer): Integer;
+  function IoctlSocket(s: TSocket; cmd: DWORD; var arg: integer): Integer;
+  function htons(hostshort: word): word;
+  function htonl(hostlong: longword): longword;
+  function GetSockName(s: TSocket; var name: TVarSin): Integer;
+  function GetPeerName(s: TSocket; var name: TVarSin): Integer;
+  function Connect(s: TSocket; const name: TVarSin): Integer;
+  function CloseSocket(s: TSocket): Integer;
+  function Bind(s: TSocket; const addr: TVarSin): Integer;
+  function Accept(s: TSocket; var addr: TVarSin): TSocket;
+  function Socket(af, Struc, Protocol: Integer): TSocket;
+  function Select(nfds: Integer; readfds, writefds, exceptfds: PFDSet;
+    timeout: PTimeVal): Longint;
+
+function IsNewApi(Family: integer): Boolean;
+function SetVarSin(var Sin: TVarSin; IP, Port: string; Family, SockProtocol, SockType: integer; PreferIP4: Boolean): integer;
+function GetSinIP(Sin: TVarSin): string;
+function GetSinPort(Sin: TVarSin): Integer;
+procedure ResolveNameToIP(Name: string;  Family, SockProtocol, SockType: integer; const IPList: TStrings);
+function ResolveIPToName(IP: string; Family, SockProtocol, SockType: integer): string;
+function ResolvePort(Port: string; Family, SockProtocol, SockType: integer): Word;
+
+
+{==============================================================================}
+implementation
+
+
+function IN6_IS_ADDR_UNSPECIFIED(const a: PInAddr6): boolean;
+begin
+  Result := ((a^.u6_addr32[0] = 0) and (a^.u6_addr32[1] = 0) and
+             (a^.u6_addr32[2] = 0) and (a^.u6_addr32[3] = 0));
+end;
+
+function IN6_IS_ADDR_LOOPBACK(const a: PInAddr6): boolean;
+begin
+  Result := ((a^.u6_addr32[0] = 0) and (a^.u6_addr32[1] = 0) and
+             (a^.u6_addr32[2] = 0) and
+             (a^.u6_addr8[12] = 0) and (a^.u6_addr8[13] = 0) and
+             (a^.u6_addr8[14] = 0) and (a^.u6_addr8[15] = 1));
+end;
+
+function IN6_IS_ADDR_LINKLOCAL(const a: PInAddr6): boolean;
+begin
+  Result := ((a^.u6_addr8[0] = $FE) and (a^.u6_addr8[1] = $80));
+end;
+
+function IN6_IS_ADDR_SITELOCAL(const a: PInAddr6): boolean;
+begin
+  Result := ((a^.u6_addr8[0] = $FE) and (a^.u6_addr8[1] = $C0));
+end;
+
+function IN6_IS_ADDR_MULTICAST(const a: PInAddr6): boolean;
+begin
+  Result := (a^.u6_addr8[0] = $FF);
+end;
+
+function IN6_ADDR_EQUAL(const a: PInAddr6; const b: PInAddr6): boolean;
+begin
+  Result := (CompareMem( a, b, sizeof(TInAddr6)));
+end;
+
+procedure SET_IN6_IF_ADDR_ANY (const a: PInAddr6);
+begin
+  FillChar(a^, sizeof(TInAddr6), 0);
+end;
+
+procedure SET_LOOPBACK_ADDR6 (const a: PInAddr6);
+begin
+  FillChar(a^, sizeof(TInAddr6), 0);
+  a^.u6_addr8[15] := 1;
+end;
+
+{=============================================================================}
+
+function WSAStartup(wVersionRequired: Word; var WSData: TWSAData): Integer;
+begin
+  with WSData do
+  begin
+    wVersion := wVersionRequired;
+    wHighVersion := $202;
+    szDescription := 'Synsock - Synapse Platform Independent Socket Layer';
+    szSystemStatus := 'Running on Unix/Linux by FreePascal';
+    iMaxSockets := 32768;
+    iMaxUdpDg := 8192;
+  end;
+  Result := 0;
+end;
+
+function WSACleanup: Integer;
+begin
+  Result := 0;
+end;
+
+function WSAGetLastError: Integer;
+begin
+  Result := fpGetErrno; 
+end;
+
+function FD_ISSET(Socket: TSocket; var fdset: TFDSet): Boolean;
+begin
+  Result := fpFD_ISSET(socket, fdset) <> 0;
+end;
+
+procedure FD_SET(Socket: TSocket; var fdset: TFDSet);
+begin
+  fpFD_SET(Socket, fdset);
+end;
+
+procedure FD_CLR(Socket: TSocket; var fdset: TFDSet);
+begin
+  fpFD_CLR(Socket, fdset);
+end;
+
+procedure FD_ZERO(var fdset: TFDSet);
+begin
+  fpFD_ZERO(fdset);
+end;
+
+{=============================================================================}
+
+function SizeOfVarSin(sin: TVarSin): integer;
+begin
+  case sin.sin_family of
+    AF_INET:
+            Result := SizeOf(TSockAddrIn);
+    AF_INET6:
+            Result := SizeOf(TSockAddrIn6);
+  else
+    Result := 0;
+  end;
+end;
+
+{=============================================================================}
+
+function Bind(s: TSocket; const addr: TVarSin): Integer;
+begin
+  if sockets.Bind(s, addr, SizeOfVarSin(addr)) then
+    Result := 0
+  else
+    Result := SOCKET_ERROR;
+end;
+
+function Connect(s: TSocket; const name: TVarSin): Integer;
+begin
+  if sockets.Connect(s, name, SizeOfVarSin(name)) then
+    Result := 0
+  else
+    Result := SOCKET_ERROR;
+end;
+
+function GetSockName(s: TSocket; var name: TVarSin): Integer;
+var
+  len: integer;
+begin
+  len := SizeOf(name);
+  FillChar(name, len, 0);
+  Result := sockets.GetSocketName(s, name, Len);
+end;
+
+function GetPeerName(s: TSocket; var name: TVarSin): Integer;
+var
+  len: integer;
+begin
+  len := SizeOf(name);
+  FillChar(name, len, 0);
+  Result := sockets.GetPeerName(s, name, Len);
+end;
+
+function GetHostName: string;
+begin
+  Result := unix.GetHostName;
+end;
+
+function Send(s: TSocket; Buf: TMemory; len, flags: Integer): Integer;
+begin
+  Result := sockets.Send(s, Buf^, len, flags);
+end;
+
+function Recv(s: TSocket; Buf: TMemory; len, flags: Integer): Integer;
+begin
+  Result := sockets.Recv(s, Buf^, len, flags);
+end;
+
+function SendTo(s: TSocket; Buf: TMemory; len, flags: Integer; addrto: TVarSin): Integer;
+begin
+  Result := sockets.SendTo(s, Buf^, len, flags, addrto, SizeOfVarSin(addrto));
+end;
+
+function RecvFrom(s: TSocket; Buf: TMemory; len, flags: Integer; var from: TVarSin): Integer;
+var
+  x: integer;
+begin
+  x := SizeOf(from);
+  Result := sockets.RecvFrom(s, Buf^, len, flags, from, x);
+end;
+
+function Accept(s: TSocket; var addr: TVarSin): TSocket;
+var
+  x: integer;
+begin
+  x := SizeOf(addr);
+  Result := sockets.Accept(s, addr, x);
+end;
+
+function Shutdown(s: TSocket; how: Integer): Integer;
+begin
+  Result := sockets.Shutdown(s, how);
+end;
+
+function SetSockOpt(s: TSocket; level, optname: Integer; optval: Tmemory;
+  optlen: Integer): Integer;
+begin
+  Result := sockets.SetSocketOptions(s, level, optname, optval^, optlen);
+end;
+
+function GetSockOpt(s: TSocket; level, optname: Integer; optval: Tmemory;
+  var optlen: Integer): Integer;
+begin
+  Result := sockets.GetSocketOptions(s, level, optname, optval^, optlen);
+end;
+
+function  ntohs(netshort: word): word;
+begin
+  Result := sockets.ntohs(NetShort);
+end;
+
+function  ntohl(netlong: longword): longword;
+begin
+  Result := sockets.ntohl(NetLong);
+end;
+
+function  Listen(s: TSocket; backlog: Integer): Integer;
+begin
+  if sockets.Listen(s, backlog) then
+    Result := 0
+  else
+    Result := SOCKET_ERROR;
+end;
+
+function  IoctlSocket(s: TSocket; cmd: DWORD; var arg: integer): Integer;
+begin
+  Result := fpIoctl(s, cmd, @arg);
+end;
+
+function  htons(hostshort: word): word;
+begin
+  Result := sockets.htons(Hostshort);
+end;
+
+function  htonl(hostlong: longword): longword;
+begin
+  Result := sockets.htonl(HostLong);
+end;
+
+function CloseSocket(s: TSocket): Integer;
+begin
+  Result := sockets.CloseSocket(s);
+end;
+
+function Socket(af, Struc, Protocol: Integer): TSocket;
+begin
+  Result := sockets.Socket(af, struc, protocol);
+end;
+
+function Select(nfds: Integer; readfds, writefds, exceptfds: PFDSet;
+  timeout: PTimeVal): Longint;
+begin
+  Result := fpSelect(nfds, readfds, writefds, exceptfds, timeout);
+end;
+
+{=============================================================================}
+function IsNewApi(Family: integer): Boolean;
+begin
+  Result := SockEnhancedApi;
+  if not Result then
+    Result := (Family = AF_INET6) and SockWship6Api;
+end;
+
+function SetVarSin(var Sin: TVarSin; IP, Port: string; Family, SockProtocol, SockType: integer; PreferIP4: Boolean): integer;
+var
+  TwoPass: boolean;
+  f1, f2: integer;
+
+  function GetAddr(f:integer): integer;
+  var
+    a4: array [1..1] of in_addr;
+    a6: array [1..1] of Tin6_addr;
+  begin
+    Result := WSAEPROTONOSUPPORT;
+    case f of
+      AF_INET:
+        begin
+          if IP = cAnyHost then
+          begin
+            Sin.sin_family := AF_INET;
+            Result := 0;
+          end
+          else
+          begin
+            a4[1].s_addr := 0;
+            Result := WSAHOST_NOT_FOUND;
+            a4[1] := StrTonetAddr(IP);
+            if a4[1].s_addr = INADDR_ANY then
+              Resolvename(ip, a4);
+            if a4[1].s_addr <> INADDR_ANY then
+            begin
+              Sin.sin_family := AF_INET;
+              sin.sin_addr := a4[1];
+              Result := 0;
+            end;
+          end;
+        end;
+      AF_INET6:
+        begin
+          if IP = c6AnyHost then
+          begin
+            Sin.sin_family := AF_INET6;
+            Result := 0;
+          end
+          else
+          begin
+            Result := WSAHOST_NOT_FOUND;
+            SET_IN6_IF_ADDR_ANY(@a6[1]);
+            a6[1] := StrTonetAddr6(IP);
+            if IN6_IS_ADDR_UNSPECIFIED(@a6[1]) then
+              Resolvename6(ip, a6);
+            if IN6_IS_ADDR_UNSPECIFIED(@a6[1]) then
+            begin
+              Sin.sin_family := AF_INET6;
+              sin.sin6_addr := a6[1];
+              Result := 0;
+            end;
+          end;
+        end;
+    end;
+  end;
+begin
+  Result := 0;
+  FillChar(Sin, Sizeof(Sin), 0);
+  Sin.sin_port := Resolveport(port, family, SockProtocol, SockType);
+  TwoPass := False;
+  if Family = AF_UNSPEC then
+  begin
+    if PreferIP4 then
+    begin
+      f1 := AF_INET;
+      f2 := AF_INET6;
+      TwoPass := True;
+    end
+    else
+    begin
+      f2 := AF_INET;
+      f1 := AF_INET6;
+      TwoPass := True;
+    end;
+  end
+  else
+    f1 := Family;
+  Result := GetAddr(f1);
+  if Result <> 0 then
+    if TwoPass then
+      Result := GetAddr(f2);
+end;
+
+function GetSinIP(Sin: TVarSin): string;
+begin
+  Result := '';
+  case sin.AddressFamily of
+    AF_INET:
+      begin
+        result := NetAddrToStr(sin.sin_addr);
+      end;
+    AF_INET6:
+      begin
+        result := NetAddrToStr6(sin.sin6_addr);
+      end;
+  end;
+end;
+
+function GetSinPort(Sin: TVarSin): Integer;
+begin
+  if (Sin.sin_family = AF_INET6) then
+    Result := synsock.ntohs(Sin.sin6_port)
+  else
+    Result := synsock.ntohs(Sin.sin_port);
+end;
+
+procedure ResolveNameToIP(Name: string; Family, SockProtocol, SockType: integer; const IPList: TStrings);
+var
+  x, n: integer;
+  a4: array [1..255] of in_addr;
+  a6: array [1..255] of Tin6_addr;
+begin
+  IPList.Clear;
+  if (family = AF_INET) or (family = AF_UNSPEC) then
+  begin
+    a4[1] := StrTonetAddr(name);
+    if a4[1].s_addr = INADDR_ANY then
+      x := Resolvename(name, a4)
+    else
+      x := 1;
+    for n := 1  to x do
+      IpList.Add(netaddrToStr(a4[n]));
+  end;
+
+  if (family = AF_INET6) or (family = AF_UNSPEC) then
+  begin
+    a6[1] := StrTonetAddr6(name);
+    if IN6_IS_ADDR_UNSPECIFIED(@a6[1]) then
+      x := Resolvename6(name, a6)
+    else
+      x := 1;
+    for n := 1  to x do
+      IpList.Add(netaddrToStr6(a6[n]));
+  end;
+  
+  if IPList.Count = 0 then
+    IPList.Add(cLocalHost);
+end;
+
+function ResolvePort(Port: string; Family, SockProtocol, SockType: integer): Word;
+var
+  ProtoEnt: TProtocolEntry;
+  ServEnt: TServiceEntry;
+begin
+  Result := synsock.htons(StrToIntDef(Port, 0));
+  if Result = 0 then
+  begin
+    ProtoEnt.Name := '';
+    GetProtocolByNumber(SockProtocol, ProtoEnt);
+    ServEnt.port := 0;
+    GetServiceByName(Port, ProtoEnt.Name, ServEnt);
+    Result := ServEnt.port;  
+  end;
+end;
+
+function ResolveIPToName(IP: string; Family, SockProtocol, SockType: integer): string;
+var
+  n: integer;
+  a4: array [1..1] of in_addr;
+  a6: array [1..1] of Tin6_addr;
+  a: array [1..1] of string;
+begin
+  Result := IP;
+  a4[1] := StrToNetAddr(IP);
+  if a4[1].s_addr <> INADDR_ANY then
+  begin
+//why ResolveAddress need address in HOST order? :-O 
+    n := ResolveAddress(nettohost(a4[1]), a);
+    if n > 0 then
+      Result := a[1];
+  end
+  else
+  begin
+    a6[1] := StrToNetAddr6(IP);
+    n := ResolveAddress6(a6[1], a);
+    if n > 0 then
+      Result := a[1];
+  end;
+end;
+
+{=============================================================================}
+
+function InitSocketInterface(stack: string): Boolean;
+begin
+  SockEnhancedApi := False;
+  SockWship6Api := False;
+//  Libc.Signal(Libc.SIGPIPE, TSignalHandler(Libc.SIG_IGN));
+  Result := True;
+end;
+
+function DestroySocketInterface: Boolean;
+begin
+  Result := True;
+end;
+
+initialization
+begin
+  SynSockCS := SyncObjs.TCriticalSection.Create;
+  SET_IN6_IF_ADDR_ANY (@in6addr_any);
+  SET_LOOPBACK_ADDR6  (@in6addr_loopback);
+end;
+
+finalization
+begin
+  SynSockCS.Free;
+end;
+
+{$ENDIF}
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/Synapse/sslinux.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/Synapse/sslinux.pas
new file mode 100644
index 0000000..c337281
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/Synapse/sslinux.pas	
@@ -0,0 +1,1313 @@
+{==============================================================================|
+| Project : Ararat Synapse                                       | 002.000.008 |
+|==============================================================================|
+| Content: Socket Independent Platform Layer - Linux definition include        |
+|==============================================================================|
+| Copyright (c)1999-2003, Lukas Gebauer                                        |
+| All rights reserved.                                                         |
+|                                                                              |
+| Redistribution and use in source and binary forms, with or without           |
+| modification, are permitted provided that the following conditions are met:  |
+|                                                                              |
+| Redistributions of source code must retain the above copyright notice, this  |
+| list of conditions and the following disclaimer.                             |
+|                                                                              |
+| Redistributions in binary form must reproduce the above copyright notice,    |
+| this list of conditions and the following disclaimer in the documentation    |
+| and/or other materials provided with the distribution.                       |
+|                                                                              |
+| Neither the name of Lukas Gebauer nor the names of its contributors may      |
+| be used to endorse or promote products derived from this software without    |
+| specific prior written permission.                                           |
+|                                                                              |
+| THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"  |
+| AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE    |
+| IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE   |
+| ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE FOR  |
+| ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL       |
+| DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR   |
+| SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER   |
+| CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT           |
+| LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY    |
+| OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH  |
+| DAMAGE.                                                                      |
+|==============================================================================|
+| The Initial Developer of the Original Code is Lukas Gebauer (Czech Republic).|
+| Portions created by Lukas Gebauer are Copyright (c)2003.                     |
+| All Rights Reserved.                                                         |
+|==============================================================================|
+| Contributor(s):                                                              |
+|==============================================================================|
+| History: see HISTORY.HTM from distribution package                           |
+|          (Found at URL: http://www.ararat.cz/synapse/)                       |
+|==============================================================================}
+
+{:@exclude}
+
+{$IFDEF LINUX}
+
+//{$DEFINE FORCEOLDAPI}
+{Note about define FORCEOLDAPI:
+If you activate this compiler directive, then is allways used old socket API
+for name resolution. If you leave this directive inactive, then the new API
+is used, when running system allows it.
+
+For IPv6 support you must have new API!
+}
+
+{$IFDEF FPC}
+  {$MODE DELPHI}
+{$ENDIF}
+{$H+}
+interface
+
+uses
+  SyncObjs, SysUtils, Classes,
+  synafpc,
+  Libc;
+
+function InitSocketInterface(stack: string): Boolean;
+function DestroySocketInterface: Boolean;
+
+const
+  WinsockLevel = $0202;
+
+type
+  u_char = Char;
+  u_short = Word;
+  u_int = Integer;
+  u_long = Longint;
+  pu_long = ^u_long;
+  pu_short = ^u_short;
+  TSocket = u_int;
+  TAddrFamily = integer;
+
+  TMemory = pointer;
+
+
+const
+  DLLStackName = 'libc.so.6';
+
+  cLocalhost = '127.0.0.1';
+  cAnyHost = '0.0.0.0';
+  cBroadcast = '255.255.255.255';
+  c6Localhost = '::1';
+  c6AnyHost = '::0';
+  c6Broadcast = 'ffff::1';
+  cAnyPort = '0';
+
+type
+  DWORD = Integer;
+  __fd_mask = LongWord;
+const
+  __FD_SETSIZE    = 1024;
+  __NFDBITS       = 8 * sizeof(__fd_mask);
+type
+  __fd_set = {packed} record
+    fds_bits: packed array[0..(__FD_SETSIZE div __NFDBITS)-1] of __fd_mask;
+  end;
+  TFDSet = __fd_set;
+  PFDSet = ^TFDSet;
+
+const
+  FIONREAD        = $541B;
+  FIONBIO         = $5421;
+  FIOASYNC        = $5452;
+
+type
+  PTimeVal = ^TTimeVal;
+  TTimeVal = packed record
+    tv_sec: Longint;
+    tv_usec: Longint;
+  end;
+
+const
+  IPPROTO_IP     =   0;		{ Dummy					}
+  IPPROTO_ICMP   =   1;		{ Internet Control Message Protocol }
+  IPPROTO_IGMP   =   2;		{ Internet Group Management Protocol}
+  IPPROTO_TCP    =   6;		{ TCP           			}
+  IPPROTO_UDP    =   17;	{ User Datagram Protocol		}
+  IPPROTO_IPV6   =   41;
+  IPPROTO_ICMPV6 =   58;
+
+  IPPROTO_RAW    =   255;
+  IPPROTO_MAX    =   256;
+
+type
+  PInAddr = ^TInAddr;
+  TInAddr = packed record
+    case integer of
+      0: (S_bytes: packed array [0..3] of byte);
+      1: (S_addr: u_long);
+  end;
+
+  PSockAddrIn = ^TSockAddrIn;
+  TSockAddrIn = packed record
+    case Integer of
+      0: (sin_family: u_short;
+          sin_port: u_short;
+          sin_addr: TInAddr;
+          sin_zero: array[0..7] of Char);
+      1: (sa_family: u_short;
+          sa_data: array[0..13] of Char)
+  end;
+
+  TIP_mreq =  record
+    imr_multiaddr: TInAddr;     { IP multicast address of group }
+    imr_interface: TInAddr;     { local IP address of interface }
+  end;
+
+  PInAddr6 = ^TInAddr6;
+  TInAddr6 = packed record
+    case integer of
+      0: (S6_addr: packed array [0..15] of byte);
+      1: (u6_addr8: packed array [0..15] of byte);
+      2: (u6_addr16: packed array [0..7] of word);
+      3: (u6_addr32: packed array [0..3] of integer);
+  end;
+
+  PSockAddrIn6 = ^TSockAddrIn6;
+  TSockAddrIn6 = packed record
+		sin6_family:   u_short;     // AF_INET6
+		sin6_port:     u_short;     // Transport level port number
+		sin6_flowinfo: u_long;	    // IPv6 flow information
+		sin6_addr:     TInAddr6;    // IPv6 address
+		sin6_scope_id: u_long;      // Scope Id: IF number for link-local
+                                //           SITE id for site-local
+  end;
+
+  TIPv6_mreq = record
+    ipv6mr_multiaddr: TInAddr6; // IPv6 multicast address.
+    ipv6mr_interface: integer;   // Interface index.
+    padding: u_long;
+  end;
+
+  PHostEnt = ^THostEnt;
+  THostent = record
+    h_name: PChar;
+    h_aliases: PPChar;
+    h_addrtype: Integer;
+    h_length: Cardinal;
+    case Byte of
+      0: (h_addr_list: PPChar);
+      1: (h_addr: PPChar);
+  end;
+
+  PNetEnt = ^TNetEnt;
+  TNetEnt = record
+    n_name: PChar;
+    n_aliases: PPChar;
+    n_addrtype: Integer;
+    n_net: uint32_t;
+  end;
+
+  PServEnt = ^TServEnt;
+  TServEnt = record
+    s_name: PChar;
+    s_aliases: PPChar;
+    s_port: Integer;
+    s_proto: PChar;
+  end;
+
+  PProtoEnt = ^TProtoEnt;
+  TProtoEnt = record
+    p_name: PChar;
+    p_aliases: ^PChar;
+    p_proto: u_short;
+  end;
+
+const
+  INADDR_ANY       = $00000000;
+  INADDR_LOOPBACK  = $7F000001;
+  INADDR_BROADCAST = $FFFFFFFF;
+  INADDR_NONE      = $FFFFFFFF;
+  ADDR_ANY		 = INADDR_ANY;
+  INVALID_SOCKET		= TSocket(NOT(0));
+  SOCKET_ERROR			= -1;
+
+Const
+  IP_TOS             = 1;  { int; IP type of service and precedence.  }
+  IP_TTL             = 2;  { int; IP time to live.  }
+  IP_HDRINCL         = 3;  { int; Header is included with data.  }
+  IP_OPTIONS         = 4;  { ip_opts; IP per-packet options.  }
+  IP_ROUTER_ALERT    = 5;  { bool }
+  IP_RECVOPTS        = 6;  { bool }
+  IP_RETOPTS         = 7;  { bool }
+  IP_PKTINFO         = 8;  { bool }
+  IP_PKTOPTIONS      = 9;
+  IP_PMTUDISC        = 10; { obsolete name? }
+  IP_MTU_DISCOVER    = 10; { int; see below }
+  IP_RECVERR         = 11; { bool }
+  IP_RECVTTL         = 12; { bool }
+  IP_RECVTOS         = 13; { bool }
+  IP_MULTICAST_IF    = 32; { in_addr; set/get IP multicast i/f }
+  IP_MULTICAST_TTL   = 33; { u_char; set/get IP multicast ttl }
+  IP_MULTICAST_LOOP  = 34; { i_char; set/get IP multicast loopback }
+  IP_ADD_MEMBERSHIP  = 35; { ip_mreq; add an IP group membership }
+  IP_DROP_MEMBERSHIP = 36; { ip_mreq; drop an IP group membership }
+
+  SOL_SOCKET    = 1;
+
+  SO_DEBUG      = 1;
+  SO_REUSEADDR  = 2;
+  SO_TYPE       = 3;
+  SO_ERROR      = 4;
+  SO_DONTROUTE  = 5;
+  SO_BROADCAST  = 6;
+  SO_SNDBUF     = 7;
+  SO_RCVBUF     = 8;
+  SO_KEEPALIVE  = 9;
+  SO_OOBINLINE  = 10;
+  SO_NO_CHECK   = 11;
+  SO_PRIORITY   = 12;
+  SO_LINGER     = 13;
+  SO_BSDCOMPAT  = 14;
+  SO_REUSEPORT  = 15;
+  SO_PASSCRED   = 16;
+  SO_PEERCRED   = 17;
+  SO_RCVLOWAT   = 18;
+  SO_SNDLOWAT   = 19;
+  SO_RCVTIMEO   = 20;
+  SO_SNDTIMEO   = 21;
+{ Security levels - as per NRL IPv6 - don't actually do anything }
+  SO_SECURITY_AUTHENTICATION       = 22;
+  SO_SECURITY_ENCRYPTION_TRANSPORT = 23;
+  SO_SECURITY_ENCRYPTION_NETWORK   = 24;
+  SO_BINDTODEVICE                  = 25;
+{ Socket filtering }
+  SO_ATTACH_FILTER = 26;
+  SO_DETACH_FILTER = 27;
+
+  SOMAXCONN       = 128;
+
+  IPV6_UNICAST_HOPS     = 16;
+  IPV6_MULTICAST_IF     = 17;
+  IPV6_MULTICAST_HOPS   = 18;
+  IPV6_MULTICAST_LOOP   = 19;
+  IPV6_JOIN_GROUP       = 20;
+  IPV6_LEAVE_GROUP      = 21;
+
+  MSG_NOSIGNAL  = $4000;                // Do not generate SIGPIPE.
+
+  // getnameinfo constants
+  NI_MAXHOST	   = 1025;
+  NI_MAXSERV	   = 32;
+  NI_NOFQDN 	   = $4;
+  NI_NUMERICHOST = $1;
+  NI_NAMEREQD	   = $8;
+  NI_NUMERICSERV = $2;
+  NI_DGRAM       = $10;
+
+const
+  SOCK_STREAM     = 1;               { stream socket }
+  SOCK_DGRAM      = 2;               { datagram socket }
+  SOCK_RAW        = 3;               { raw-protocol interface }
+  SOCK_RDM        = 4;               { reliably-delivered message }
+  SOCK_SEQPACKET  = 5;               { sequenced packet stream }
+
+{ TCP options. }
+  TCP_NODELAY     = $0001;
+
+{ Address families. }
+
+  AF_UNSPEC       = 0;               { unspecified }
+  AF_INET         = 2;               { internetwork: UDP, TCP, etc. }
+  AF_INET6        = 10;              { Internetwork Version 6 }
+  AF_MAX          = 24;
+
+{ Protocol families, same as address families for now. }
+  PF_UNSPEC       = AF_UNSPEC;
+  PF_INET         = AF_INET;
+  PF_INET6        = AF_INET6;
+  PF_MAX          = AF_MAX;
+
+type
+  { Structure used by kernel to store most addresses. }
+  PSockAddr = ^TSockAddr;
+  TSockAddr = TSockAddrIn;
+
+  { Structure used by kernel to pass protocol information in raw sockets. }
+  PSockProto = ^TSockProto;
+  TSockProto = packed record
+    sp_family: u_short;
+    sp_protocol: u_short;
+  end;
+
+type
+  PAddrInfo = ^TAddrInfo;
+  TAddrInfo = record
+                ai_flags: integer;    // AI_PASSIVE, AI_CANONNAME, AI_NUMERICHOST.
+                ai_family: integer;   // PF_xxx.
+                ai_socktype: integer; // SOCK_xxx.
+                ai_protocol: integer; // 0 or IPPROTO_xxx for IPv4 and IPv6.
+                ai_addrlen: u_int;    // Length of ai_addr.
+                ai_addr: PSockAddr;   // Binary address.
+                ai_canonname: PChar;  // Canonical name for nodename.
+                ai_next: PAddrInfo;     // Next structure in linked list.
+              end;
+
+const
+  // Flags used in "hints" argument to getaddrinfo().
+  AI_PASSIVE     = $1;  // Socket address will be used in bind() call.
+  AI_CANONNAME   = $2;  // Return canonical name in first ai_canonname.
+  AI_NUMERICHOST = $4;  // Nodename must be a numeric address string.
+
+type
+{ Structure used for manipulating linger option. }
+  PLinger = ^TLinger;
+  TLinger = packed record
+    l_onoff: integer;
+    l_linger: integer;
+  end;
+
+const
+
+  MSG_OOB       = $01;                  // Process out-of-band data.
+  MSG_PEEK      = $02;                  // Peek at incoming messages.
+
+const
+  WSAEINTR = EINTR;
+  WSAEBADF = EBADF;
+  WSAEACCES = EACCES;
+  WSAEFAULT = EFAULT;
+  WSAEINVAL = EINVAL;
+  WSAEMFILE = EMFILE;
+  WSAEWOULDBLOCK = EWOULDBLOCK;
+  WSAEINPROGRESS = EINPROGRESS;
+  WSAEALREADY = EALREADY;
+  WSAENOTSOCK = ENOTSOCK;
+  WSAEDESTADDRREQ = EDESTADDRREQ;
+  WSAEMSGSIZE = EMSGSIZE;
+  WSAEPROTOTYPE = EPROTOTYPE;
+  WSAENOPROTOOPT = ENOPROTOOPT;
+  WSAEPROTONOSUPPORT = EPROTONOSUPPORT;
+  WSAESOCKTNOSUPPORT = ESOCKTNOSUPPORT;
+  WSAEOPNOTSUPP = EOPNOTSUPP;
+  WSAEPFNOSUPPORT = EPFNOSUPPORT;
+  WSAEAFNOSUPPORT = EAFNOSUPPORT;
+  WSAEADDRINUSE = EADDRINUSE;
+  WSAEADDRNOTAVAIL = EADDRNOTAVAIL;
+  WSAENETDOWN = ENETDOWN;
+  WSAENETUNREACH = ENETUNREACH;
+  WSAENETRESET = ENETRESET;
+  WSAECONNABORTED = ECONNABORTED;
+  WSAECONNRESET = ECONNRESET;
+  WSAENOBUFS = ENOBUFS;
+  WSAEISCONN = EISCONN;
+  WSAENOTCONN = ENOTCONN;
+  WSAESHUTDOWN = ESHUTDOWN;
+  WSAETOOMANYREFS = ETOOMANYREFS;
+  WSAETIMEDOUT = ETIMEDOUT;
+  WSAECONNREFUSED = ECONNREFUSED;
+  WSAELOOP = ELOOP;
+  WSAENAMETOOLONG = ENAMETOOLONG;
+  WSAEHOSTDOWN = EHOSTDOWN;
+  WSAEHOSTUNREACH = EHOSTUNREACH;
+  WSAENOTEMPTY = ENOTEMPTY;
+  WSAEPROCLIM = -1;
+  WSAEUSERS = EUSERS;
+  WSAEDQUOT = EDQUOT;
+  WSAESTALE = ESTALE;
+  WSAEREMOTE = EREMOTE;
+  WSASYSNOTREADY = -2;
+  WSAVERNOTSUPPORTED = -3;
+  WSANOTINITIALISED = -4;
+  WSAEDISCON = -5;
+  WSAHOST_NOT_FOUND = HOST_NOT_FOUND;
+  WSATRY_AGAIN = TRY_AGAIN;
+  WSANO_RECOVERY = NO_RECOVERY;
+  WSANO_DATA = -6;
+
+  EAI_BADFLAGS    = -1;   { Invalid value for `ai_flags' field.  }
+  EAI_NONAME      = -2;   { NAME or SERVICE is unknown.  }
+  EAI_AGAIN       = -3;   { Temporary failure in name resolution.  }
+  EAI_FAIL        = -4;   { Non-recoverable failure in name res.  }
+  EAI_NODATA      = -5;   { No address associated with NAME.  }
+  EAI_FAMILY      = -6;   { `ai_family' not supported.  }
+  EAI_SOCKTYPE    = -7;   { `ai_socktype' not supported.  }
+  EAI_SERVICE     = -8;   { SERVICE not supported for `ai_socktype'.  }
+  EAI_ADDRFAMILY  = -9;   { Address family for NAME not supported.  }
+  EAI_MEMORY      = -10;  { Memory allocation failure.  }
+  EAI_SYSTEM      = -11;  { System error returned in `errno'.  }
+
+const
+  WSADESCRIPTION_LEN     =   256;
+  WSASYS_STATUS_LEN      =   128;
+type
+  PWSAData = ^TWSAData;
+  TWSAData = packed record
+    wVersion: Word;
+    wHighVersion: Word;
+    szDescription: array[0..WSADESCRIPTION_LEN] of Char;
+    szSystemStatus: array[0..WSASYS_STATUS_LEN] of Char;
+    iMaxSockets: Word;
+    iMaxUdpDg: Word;
+    lpVendorInfo: PChar;
+  end;
+
+  function IN6_IS_ADDR_UNSPECIFIED(const a: PInAddr6): boolean;
+  function IN6_IS_ADDR_LOOPBACK(const a: PInAddr6): boolean;
+  function IN6_IS_ADDR_LINKLOCAL(const a: PInAddr6): boolean;
+  function IN6_IS_ADDR_SITELOCAL(const a: PInAddr6): boolean;
+  function IN6_IS_ADDR_MULTICAST(const a: PInAddr6): boolean;
+  function IN6_ADDR_EQUAL(const a: PInAddr6; const b: PInAddr6):boolean;
+  procedure SET_IN6_IF_ADDR_ANY (const a: PInAddr6);
+  procedure SET_LOOPBACK_ADDR6 (const a: PInAddr6);
+var
+  in6addr_any, in6addr_loopback : TInAddr6;
+
+procedure FD_CLR(Socket: TSocket; var FDSet: TFDSet);
+function FD_ISSET(Socket: TSocket; var FDSet: TFDSet): Boolean;
+procedure FD_SET(Socket: TSocket; var FDSet: TFDSet);
+procedure FD_ZERO(var FDSet: TFDSet);
+
+{=============================================================================}
+
+type
+  TWSAStartup = function(wVersionRequired: Word; var WSData: TWSAData): Integer;
+    cdecl;
+  TWSACleanup = function: Integer;
+    cdecl;
+  TWSAGetLastError = function: Integer;
+    cdecl;
+  TGetServByName = function(name, proto: PChar): PServEnt;
+    cdecl;
+  TGetServByPort = function(port: Integer; proto: PChar): PServEnt;
+    cdecl;
+  TGetProtoByName = function(name: PChar): PProtoEnt;
+    cdecl;
+  TGetProtoByNumber = function(proto: Integer): PProtoEnt;
+    cdecl;
+  TGetHostByName = function(name: PChar): PHostEnt;
+    cdecl;
+  TGetHostByAddr = function(addr: Pointer; len, Struc: Integer): PHostEnt;
+    cdecl;
+  TGetHostName = function(name: PChar; len: Integer): Integer;
+    cdecl;
+  TShutdown = function(s: TSocket; how: Integer): Integer;
+    cdecl;
+  TSetSockOpt = function(s: TSocket; level, optname: Integer; optval: PChar;
+    optlen: Integer): Integer;
+    cdecl;
+  TGetSockOpt = function(s: TSocket; level, optname: Integer; optval: PChar;
+    var optlen: Integer): Integer;
+    cdecl;
+  TSendTo = function(s: TSocket; const Buf; len, flags: Integer; addrto: PSockAddr;
+    tolen: Integer): Integer;
+    cdecl;
+  TSend = function(s: TSocket; const Buf; len, flags: Integer): Integer;
+    cdecl;
+  TRecv = function(s: TSocket; var Buf; len, flags: Integer): Integer;
+    cdecl;
+  TRecvFrom = function(s: TSocket; var Buf; len, flags: Integer; from: PSockAddr;
+    var fromlen: Integer): Integer;
+    cdecl;
+  Tntohs = function(netshort: u_short): u_short;
+    cdecl;
+  Tntohl = function(netlong: u_long): u_long;
+    cdecl;
+  TListen = function(s: TSocket; backlog: Integer): Integer;
+    cdecl;
+  TIoctlSocket = function(s: TSocket; cmd: DWORD; var arg: integer): Integer;
+    cdecl;
+  TInet_ntoa = function(inaddr: TInAddr): PChar;
+    cdecl;
+  TInet_addr = function(cp: PChar): u_long;
+    cdecl;
+  Thtons = function(hostshort: u_short): u_short;
+    cdecl;
+  Thtonl = function(hostlong: u_long): u_long;
+    cdecl;
+  TGetSockName = function(s: TSocket; name: PSockAddr; var namelen: Integer): Integer;
+    cdecl;
+  TGetPeerName = function(s: TSocket; name: PSockAddr; var namelen: Integer): Integer;
+    cdecl;
+  TConnect = function(s: TSocket; name: PSockAddr; namelen: Integer): Integer;
+    cdecl;
+  TCloseSocket = function(s: TSocket): Integer;
+    cdecl;
+  TBind = function(s: TSocket; addr: PSockAddr; namelen: Integer): Integer;
+    cdecl;
+  TAccept = function(s: TSocket; addr: PSockAddr; var addrlen: Integer): TSocket;
+    cdecl;
+  TTSocket = function(af, Struc, Protocol: Integer): TSocket;
+    cdecl;
+  TSelect = function(nfds: Integer; readfds, writefds, exceptfds: PFDSet;
+    timeout: PTimeVal): Longint;
+    cdecl;
+
+  TGetAddrInfo = function(NodeName: PChar; ServName: PChar; Hints: PAddrInfo;
+    var Addrinfo: PAddrInfo): integer;
+    cdecl;
+  TFreeAddrInfo = procedure(ai: PAddrInfo);
+    cdecl;
+  TGetNameInfo = function( addr: PSockAddr; namelen: Integer; host: PChar;
+    hostlen: DWORD; serv: PChar; servlen: DWORD; flags: integer): integer;
+    cdecl;
+
+var
+  WSAStartup: TWSAStartup = nil;
+  WSACleanup: TWSACleanup = nil;
+  WSAGetLastError: TWSAGetLastError = nil;
+  GetServByName: TGetServByName = nil;
+  GetServByPort: TGetServByPort = nil;
+  GetProtoByName: TGetProtoByName = nil;
+  GetProtoByNumber: TGetProtoByNumber = nil;
+  GetHostByName: TGetHostByName = nil;
+  GetHostByAddr: TGetHostByAddr = nil;
+  ssGetHostName: TGetHostName = nil;
+  Shutdown: TShutdown = nil;
+  SetSockOpt: TSetSockOpt = nil;
+  GetSockOpt: TGetSockOpt = nil;
+  ssSendTo: TSendTo = nil;
+  ssSend: TSend = nil;
+  ssRecv: TRecv = nil;
+  ssRecvFrom: TRecvFrom = nil;
+  ntohs: Tntohs = nil;
+  ntohl: Tntohl = nil;
+  Listen: TListen = nil;
+  IoctlSocket: TIoctlSocket = nil;
+  Inet_ntoa: TInet_ntoa = nil;
+  Inet_addr: TInet_addr = nil;
+  htons: Thtons = nil;
+  htonl: Thtonl = nil;
+  ssGetSockName: TGetSockName = nil;
+  ssGetPeerName: TGetPeerName = nil;
+  ssConnect: TConnect = nil;
+  CloseSocket: TCloseSocket = nil;
+  ssBind: TBind = nil;
+  ssAccept: TAccept = nil;
+  Socket: TTSocket = nil;
+  Select: TSelect = nil;
+
+  GetAddrInfo: TGetAddrInfo = nil;
+  FreeAddrInfo: TFreeAddrInfo = nil;
+  GetNameInfo: TGetNameInfo = nil;
+
+function LSWSAStartup(wVersionRequired: Word; var WSData: TWSAData): Integer; cdecl;
+function LSWSACleanup: Integer; cdecl;
+function LSWSAGetLastError: Integer; cdecl;
+
+var
+  SynSockCS: SyncObjs.TCriticalSection;
+  SockEnhancedApi: Boolean;
+  SockWship6Api: Boolean;
+
+type
+  TVarSin = packed record
+    case integer of
+      0: (AddressFamily: u_short);
+      1: (
+        case sin_family: u_short of
+          AF_INET: (sin_port: u_short;
+                    sin_addr: TInAddr;
+                    sin_zero: array[0..7] of Char);
+          AF_INET6: (sin6_port:     u_short;
+                		sin6_flowinfo: u_long;
+      	    	      sin6_addr:     TInAddr6;
+      		          sin6_scope_id: u_long);
+          );
+  end;
+
+function SizeOfVarSin(sin: TVarSin): integer;
+
+function Bind(s: TSocket; const addr: TVarSin): Integer;
+function Connect(s: TSocket; const name: TVarSin): Integer;
+function GetSockName(s: TSocket; var name: TVarSin): Integer;
+function GetPeerName(s: TSocket; var name: TVarSin): Integer;
+function GetHostName: string;
+function Send(s: TSocket; Buf: TMemory; len, flags: Integer): Integer;
+function Recv(s: TSocket; Buf: TMemory; len, flags: Integer): Integer;
+function SendTo(s: TSocket; Buf: TMemory; len, flags: Integer; addrto: TVarSin): Integer;
+function RecvFrom(s: TSocket; Buf: TMemory; len, flags: Integer; var from: TVarSin): Integer;
+function Accept(s: TSocket; var addr: TVarSin): TSocket;
+
+function IsNewApi(Family: integer): Boolean;
+function SetVarSin(var Sin: TVarSin; IP, Port: string; Family, SockProtocol, SockType: integer; PreferIP4: Boolean): integer;
+function GetSinIP(Sin: TVarSin): string;
+function GetSinPort(Sin: TVarSin): Integer;
+procedure ResolveNameToIP(Name: string;  Family, SockProtocol, SockType: integer; const IPList: TStrings);
+function ResolveIPToName(IP: string; Family, SockProtocol, SockType: integer): string;
+function ResolvePort(Port: string; Family, SockProtocol, SockType: integer): Word;
+
+{==============================================================================}
+implementation
+
+var
+  SynSockCount: Integer = 0;
+  LibHandle: TLibHandle = 0;
+  Libwship6Handle: TLibHandle = 0;
+
+function IN6_IS_ADDR_UNSPECIFIED(const a: PInAddr6): boolean;
+begin
+  Result := ((a^.u6_addr32[0] = 0) and (a^.u6_addr32[1] = 0) and
+             (a^.u6_addr32[2] = 0) and (a^.u6_addr32[3] = 0));
+end;
+
+function IN6_IS_ADDR_LOOPBACK(const a: PInAddr6): boolean;
+begin
+  Result := ((a^.u6_addr32[0] = 0) and (a^.u6_addr32[1] = 0) and
+             (a^.u6_addr32[2] = 0) and
+             (a^.u6_addr8[12] = 0) and (a^.u6_addr8[13] = 0) and
+             (a^.u6_addr8[14] = 0) and (a^.u6_addr8[15] = 1));
+end;
+
+function IN6_IS_ADDR_LINKLOCAL(const a: PInAddr6): boolean;
+begin
+  Result := ((a^.u6_addr8[0] = $FE) and (a^.u6_addr8[1] = $80));
+end;
+
+function IN6_IS_ADDR_SITELOCAL(const a: PInAddr6): boolean;
+begin
+  Result := ((a^.u6_addr8[0] = $FE) and (a^.u6_addr8[1] = $C0));
+end;
+
+function IN6_IS_ADDR_MULTICAST(const a: PInAddr6): boolean;
+begin
+  Result := (a^.u6_addr8[0] = $FF);
+end;
+
+function IN6_ADDR_EQUAL(const a: PInAddr6; const b: PInAddr6): boolean;
+begin
+  Result := (CompareMem( a, b, sizeof(TInAddr6)));
+end;
+
+procedure SET_IN6_IF_ADDR_ANY (const a: PInAddr6);
+begin
+  FillChar(a^, sizeof(TInAddr6), 0);
+end;
+
+procedure SET_LOOPBACK_ADDR6 (const a: PInAddr6);
+begin
+  FillChar(a^, sizeof(TInAddr6), 0);
+  a^.u6_addr8[15] := 1;
+end;
+
+{=============================================================================}
+var
+{$IFNDEF VER1_0}  //FTP version 1.0.x
+  errno_loc: function: PInteger cdecl = nil;
+{$ELSE}
+  errno_loc: function: PInteger = nil; cdecl;
+{$ENDIF}
+
+function LSWSAStartup(wVersionRequired: Word; var WSData: TWSAData): Integer;
+begin
+  with WSData do
+  begin
+    wVersion := wVersionRequired;
+    wHighVersion := $202;
+    szDescription := 'Synsock - Synapse Platform Independent Socket Layer';
+    szSystemStatus := 'Running on Linux';
+    iMaxSockets := 32768;
+    iMaxUdpDg := 8192;
+  end;
+  Result := 0;
+end;
+
+function LSWSACleanup: Integer;
+begin
+  Result := 0;
+end;
+
+function LSWSAGetLastError: Integer;
+var
+  p: PInteger;
+begin
+  p := errno_loc;
+  Result := p^;
+end;
+
+function __FDELT(Socket: TSocket): Integer;
+begin
+  Result := Socket div __NFDBITS;
+end;
+
+function __FDMASK(Socket: TSocket): __fd_mask;
+begin
+  Result := LongWord(1) shl (Socket mod __NFDBITS);
+end;
+
+function FD_ISSET(Socket: TSocket; var fdset: TFDSet): Boolean;
+begin
+  Result := (fdset.fds_bits[__FDELT(Socket)] and __FDMASK(Socket)) <> 0;
+end;
+
+procedure FD_SET(Socket: TSocket; var fdset: TFDSet);
+begin
+  fdset.fds_bits[__FDELT(Socket)] := fdset.fds_bits[__FDELT(Socket)] or __FDMASK(Socket);
+end;
+
+procedure FD_CLR(Socket: TSocket; var fdset: TFDSet);
+begin
+  fdset.fds_bits[__FDELT(Socket)] := fdset.fds_bits[__FDELT(Socket)] and (not __FDMASK(Socket));
+end;
+
+procedure FD_ZERO(var fdset: TFDSet);
+var
+  I: Integer;
+begin
+  with fdset do
+    for I := Low(fds_bits) to High(fds_bits) do
+      fds_bits[I] := 0;
+end;
+
+{=============================================================================}
+
+function SizeOfVarSin(sin: TVarSin): integer;
+begin
+  case sin.sin_family of
+    AF_INET:
+            Result := SizeOf(TSockAddrIn);
+    AF_INET6:
+            Result := SizeOf(TSockAddrIn6);
+  else
+    Result := 0;
+  end;
+end;
+
+{=============================================================================}
+
+function Bind(s: TSocket; const addr: TVarSin): Integer;
+begin
+  Result := ssBind(s, @addr, SizeOfVarSin(addr));
+end;
+
+function Connect(s: TSocket; const name: TVarSin): Integer;
+begin
+  Result := ssConnect(s, @name, SizeOfVarSin(name));
+end;
+
+function GetSockName(s: TSocket; var name: TVarSin): Integer;
+var
+  len: integer;
+begin
+  len := SizeOf(name);
+  FillChar(name, len, 0);
+  Result := ssGetSockName(s, @name, Len);
+end;
+
+function GetPeerName(s: TSocket; var name: TVarSin): Integer;
+var
+  len: integer;
+begin
+  len := SizeOf(name);
+  FillChar(name, len, 0);
+  Result := ssGetPeerName(s, @name, Len);
+end;
+
+function GetHostName: string;
+var
+  s: string;
+begin
+  Result := '';
+  setlength(s, 255);
+  ssGetHostName(pchar(s), Length(s) - 1);
+  Result := Pchar(s);
+end;
+
+function Send(s: TSocket; Buf: TMemory; len, flags: Integer): Integer;
+begin
+  Result := ssSend(s, Buf^, len, flags);
+end;
+
+function Recv(s: TSocket; Buf: TMemory; len, flags: Integer): Integer;
+begin
+  Result := ssRecv(s, Buf^, len, flags);
+end;
+
+function SendTo(s: TSocket; Buf: TMemory; len, flags: Integer; addrto: TVarSin): Integer;
+begin
+  Result := ssSendTo(s, Buf^, len, flags, @addrto, SizeOfVarSin(addrto));
+end;
+
+function RecvFrom(s: TSocket; Buf: TMemory; len, flags: Integer; var from: TVarSin): Integer;
+var
+  x: integer;
+begin
+  x := SizeOf(from);
+  Result := ssRecvFrom(s, Buf^, len, flags, @from, x);
+end;
+
+function Accept(s: TSocket; var addr: TVarSin): TSocket;
+var
+  x: integer;
+begin
+  x := SizeOf(addr);
+  Result := ssAccept(s, @addr, x);
+end;
+
+{=============================================================================}
+function IsNewApi(Family: integer): Boolean;
+begin
+  Result := SockEnhancedApi;
+  if not Result then
+    Result := (Family = AF_INET6) and SockWship6Api;
+end;
+
+function SetVarSin(var Sin: TVarSin; IP, Port: string; Family, SockProtocol, SockType: integer; PreferIP4: Boolean): integer;
+type
+  pu_long = ^u_long;
+var
+  ProtoEnt: PProtoEnt;
+  ServEnt: PServEnt;
+  HostEnt: PHostEnt;
+  r: integer;
+  Hints1, Hints2: TAddrInfo;
+  Sin1, Sin2: TVarSin;
+  TwoPass: boolean;
+
+  function GetAddr(const IP, port: string; Hints: TAddrInfo; var Sin: TVarSin): integer;
+  var
+    Addr: PAddrInfo;
+  begin
+    Addr := nil;
+    try
+      FillChar(Sin, Sizeof(Sin), 0);
+      if Hints.ai_socktype = SOCK_RAW then
+      begin
+        Hints.ai_socktype := 0;
+        Hints.ai_protocol := 0;
+        Result := synsock.GetAddrInfo(PChar(IP), nil, @Hints, Addr);
+      end
+      else
+      begin
+        if (IP = cAnyHost) or (IP = c6AnyHost) then
+        begin
+          Hints.ai_flags := AI_PASSIVE;
+          Result := synsock.GetAddrInfo(nil, PChar(Port), @Hints, Addr);
+        end
+        else
+          if (IP = cLocalhost) or (IP = c6Localhost) then
+          begin
+            Result := synsock.GetAddrInfo(nil, PChar(Port), @Hints, Addr);
+          end
+          else
+          begin
+            Result := synsock.GetAddrInfo(PChar(IP), PChar(Port), @Hints, Addr);
+          end;
+      end;
+      if Result = 0 then
+        if (Addr <> nil) then
+          Move(Addr^.ai_addr^, Sin, Addr^.ai_addrlen);
+    finally
+      if Assigned(Addr) then
+        synsock.FreeAddrInfo(Addr);
+    end;
+  end;
+
+begin
+  Result := 0;
+  FillChar(Sin, Sizeof(Sin), 0);
+  if not IsNewApi(family) then
+  begin
+    SynSockCS.Enter;
+    try
+      Sin.sin_family := AF_INET;
+      ProtoEnt := synsock.GetProtoByNumber(SockProtocol);
+      ServEnt := nil;
+      if ProtoEnt <> nil then
+        ServEnt := synsock.GetServByName(PChar(Port), ProtoEnt^.p_name);
+      if ServEnt = nil then
+        Sin.sin_port := synsock.htons(StrToIntDef(Port, 0))
+      else
+        Sin.sin_port := ServEnt^.s_port;
+      if IP = cBroadcast then
+        Sin.sin_addr.s_addr := u_long(INADDR_BROADCAST)
+      else
+      begin
+        Sin.sin_addr.s_addr := synsock.inet_addr(PChar(IP));
+        if Sin.sin_addr.s_addr = u_long(INADDR_NONE) then
+        begin
+          HostEnt := synsock.GetHostByName(PChar(IP));
+          Result := synsock.WSAGetLastError;
+          if HostEnt <> nil then
+            Sin.sin_addr.S_addr := u_long(Pu_long(HostEnt^.h_addr_list^)^);
+        end;
+      end;
+    finally
+      SynSockCS.Leave;
+    end;
+  end
+  else
+  begin
+    FillChar(Hints1, Sizeof(Hints1), 0);
+    FillChar(Hints2, Sizeof(Hints2), 0);
+    TwoPass := False;
+    if Family = AF_UNSPEC then
+    begin
+      if PreferIP4 then
+      begin
+        Hints1.ai_family := AF_INET;
+        Hints2.ai_family := AF_INET6;
+        TwoPass := True;
+      end
+      else
+      begin
+        Hints2.ai_family := AF_INET;
+        Hints1.ai_family := AF_INET6;
+        TwoPass := True;
+      end;
+    end
+    else
+      Hints1.ai_family := Family;
+
+    Hints1.ai_socktype := SockType;
+    Hints1.ai_protocol := SockProtocol;
+    Hints2.ai_socktype := Hints1.ai_socktype;
+    Hints2.ai_protocol := Hints1.ai_protocol;
+
+    r := GetAddr(IP, Port, Hints1, Sin1);
+    Result := r;
+    sin := sin1;
+    if r <> 0 then
+      if TwoPass then
+      begin
+        r := GetAddr(IP, Port, Hints2, Sin2);
+        Result := r;
+        if r = 0 then
+          sin := sin2;
+      end;
+  end;
+end;
+
+function GetSinIP(Sin: TVarSin): string;
+var
+  p: PChar;
+  host, serv: string;
+  hostlen, servlen: integer;
+  r: integer;
+begin
+  Result := '';
+  if not IsNewApi(Sin.AddressFamily) then
+  begin
+    p := synsock.inet_ntoa(Sin.sin_addr);
+    if p <> nil then
+      Result := p;
+  end
+  else
+  begin
+    hostlen := NI_MAXHOST;
+    servlen := NI_MAXSERV;
+    setlength(host, hostlen);
+    setlength(serv, servlen);
+    r := getnameinfo(@sin, SizeOfVarSin(sin), PChar(host), hostlen,
+      PChar(serv), servlen, NI_NUMERICHOST + NI_NUMERICSERV);
+    if r = 0 then
+      Result := PChar(host);
+  end;
+end;
+
+function GetSinPort(Sin: TVarSin): Integer;
+begin
+  if (Sin.sin_family = AF_INET6) then
+    Result := synsock.ntohs(Sin.sin6_port)
+  else
+    Result := synsock.ntohs(Sin.sin_port);
+end;
+
+procedure ResolveNameToIP(Name: string; Family, SockProtocol, SockType: integer; const IPList: TStrings);
+type
+  TaPInAddr = array[0..250] of PInAddr;
+  PaPInAddr = ^TaPInAddr;
+var
+  Hints: TAddrInfo;
+  Addr: PAddrInfo;
+  AddrNext: PAddrInfo;
+  r: integer;
+  host, serv: string;
+  hostlen, servlen: integer;
+  RemoteHost: PHostEnt;
+  IP: u_long;
+  PAdrPtr: PaPInAddr;
+  i: Integer;
+  s: string;
+  InAddr: TInAddr;
+begin
+  IPList.Clear;
+  if not IsNewApi(Family) then
+  begin
+    IP := synsock.inet_addr(PChar(Name));
+    if IP = u_long(INADDR_NONE) then
+    begin
+      SynSockCS.Enter;
+      try
+        RemoteHost := synsock.GetHostByName(PChar(Name));
+        if RemoteHost <> nil then
+        begin
+          PAdrPtr := PAPInAddr(RemoteHost^.h_addr_list);
+          i := 0;
+          while PAdrPtr^[i] <> nil do
+          begin
+            InAddr := PAdrPtr^[i]^;
+            s := Format('%d.%d.%d.%d', [InAddr.S_bytes[0], InAddr.S_bytes[1],
+              InAddr.S_bytes[2], InAddr.S_bytes[3]]);
+            IPList.Add(s);
+            Inc(i);
+          end;
+        end;
+      finally
+        SynSockCS.Leave;
+      end;
+    end
+    else
+      IPList.Add(Name);
+  end
+  else
+  begin
+    Addr := nil;
+    try
+      FillChar(Hints, Sizeof(Hints), 0);
+      Hints.ai_family := AF_UNSPEC;
+      Hints.ai_socktype := SockType;
+      Hints.ai_protocol := SockProtocol;
+      Hints.ai_flags := 0;
+      r := synsock.GetAddrInfo(PChar(Name), nil, @Hints, Addr);
+      if r = 0 then
+      begin
+        AddrNext := Addr;
+        while not(AddrNext = nil) do
+        begin
+          if not(((Family = AF_INET6) and (AddrNext^.ai_family = AF_INET))
+            or ((Family = AF_INET) and (AddrNext^.ai_family = AF_INET6))) then
+          begin
+            hostlen := NI_MAXHOST;
+            servlen := NI_MAXSERV;
+            setlength(host, hostlen);
+            setlength(serv, servlen);
+            r := getnameinfo(AddrNext^.ai_addr, AddrNext^.ai_addrlen,
+              PChar(host), hostlen, PChar(serv), servlen,
+              NI_NUMERICHOST + NI_NUMERICSERV);
+            if r = 0 then
+            begin
+              host := PChar(host);
+              IPList.Add(host);
+            end;
+          end;
+          AddrNext := AddrNext^.ai_next;
+        end;
+      end;
+    finally
+      if Assigned(Addr) then
+        synsock.FreeAddrInfo(Addr);
+    end;
+  end;
+  if IPList.Count = 0 then
+    IPList.Add(cAnyHost);
+end;
+
+function ResolvePort(Port: string; Family, SockProtocol, SockType: integer): Word;
+var
+  ProtoEnt: PProtoEnt;
+  ServEnt: PServEnt;
+  Hints: TAddrInfo;
+  Addr: PAddrInfo;
+  r: integer;
+begin
+  Result := 0;
+  if not IsNewApi(Family) then
+  begin
+    SynSockCS.Enter;
+    try
+      ProtoEnt := synsock.GetProtoByNumber(SockProtocol);
+      ServEnt := nil;
+      if ProtoEnt <> nil then
+        ServEnt := synsock.GetServByName(PChar(Port), ProtoEnt^.p_name);
+      if ServEnt = nil then
+        Result := StrToIntDef(Port, 0)
+      else
+        Result := synsock.htons(ServEnt^.s_port);
+    finally
+      SynSockCS.Leave;
+    end;
+  end
+  else
+  begin
+    Addr := nil;
+    try
+      FillChar(Hints, Sizeof(Hints), 0);
+      Hints.ai_family := AF_UNSPEC;
+      Hints.ai_socktype := SockType;
+      Hints.ai_protocol := Sockprotocol;
+      Hints.ai_flags := AI_PASSIVE;
+      r := synsock.GetAddrInfo(nil, PChar(Port), @Hints, Addr);
+      if (r = 0) and Assigned(Addr) then
+      begin
+        if Addr^.ai_family = AF_INET then
+          Result := synsock.htons(Addr^.ai_addr^.sin_port);
+        if Addr^.ai_family = AF_INET6 then
+          Result := synsock.htons(PSockAddrIn6(Addr^.ai_addr)^.sin6_port);
+      end;
+    finally
+      if Assigned(Addr) then
+        synsock.FreeAddrInfo(Addr);
+    end;
+  end;
+end;
+
+function ResolveIPToName(IP: string; Family, SockProtocol, SockType: integer): string;
+var
+  Hints: TAddrInfo;
+  Addr: PAddrInfo;
+  r: integer;
+  host, serv: string;
+  hostlen, servlen: integer;
+  RemoteHost: PHostEnt;
+  IPn: u_long;
+begin
+  Result := IP;
+  if not IsNewApi(Family) then
+  begin
+    IPn := synsock.inet_addr(PChar(IP));
+    if IPn <> u_long(INADDR_NONE) then
+    begin
+      SynSockCS.Enter;
+      try
+        RemoteHost := GetHostByAddr(@IPn, SizeOf(IPn), AF_INET);
+        if RemoteHost <> nil then
+          Result := RemoteHost^.h_name;
+      finally
+        SynSockCS.Leave;
+      end;
+    end;
+  end
+  else
+  begin
+    Addr := nil;
+    try
+      FillChar(Hints, Sizeof(Hints), 0);
+      Hints.ai_family := AF_UNSPEC;
+      Hints.ai_socktype := SockType;
+      Hints.ai_protocol := SockProtocol;
+      Hints.ai_flags := 0;
+      r := synsock.GetAddrInfo(PChar(IP), nil, @Hints, Addr);
+      if (r = 0) and Assigned(Addr)then
+      begin
+        hostlen := NI_MAXHOST;
+        servlen := NI_MAXSERV;
+        setlength(host, hostlen);
+        setlength(serv, servlen);
+        r := getnameinfo(Addr^.ai_addr, Addr^.ai_addrlen,
+          PChar(host), hostlen, PChar(serv), servlen,
+          NI_NUMERICSERV);
+        if r = 0 then
+          Result := PChar(host);
+      end;
+    finally
+      if Assigned(Addr) then
+        synsock.FreeAddrInfo(Addr);
+    end;
+  end;
+end;
+
+{=============================================================================}
+
+function InitSocketInterface(stack: string): Boolean;
+begin
+  Result := False;
+  SockEnhancedApi := False;
+  if stack = '' then
+    stack := DLLStackName;
+  SynSockCS.Enter;
+  try
+    if SynSockCount = 0 then
+    begin
+      SockEnhancedApi := False;
+      SockWship6Api := False;
+      Libc.Signal(Libc.SIGPIPE, TSignalHandler(Libc.SIG_IGN));
+      LibHandle := LoadLibrary(PChar(Stack));
+      if LibHandle <> 0 then
+      begin
+        errno_loc := GetProcAddress(LibHandle, PChar('__errno_location'));
+        CloseSocket := GetProcAddress(LibHandle, PChar('close'));
+        IoctlSocket := GetProcAddress(LibHandle, PChar('ioctl'));
+        WSAGetLastError := LSWSAGetLastError;
+        WSAStartup := LSWSAStartup;
+        WSACleanup := LSWSACleanup;
+        ssAccept := GetProcAddress(LibHandle, PChar('accept'));
+        ssBind := GetProcAddress(LibHandle, PChar('bind'));
+        ssConnect := GetProcAddress(LibHandle, PChar('connect'));
+        ssGetPeerName := GetProcAddress(LibHandle, PChar('getpeername'));
+        ssGetSockName := GetProcAddress(LibHandle, PChar('getsockname'));
+        GetSockOpt := GetProcAddress(LibHandle, PChar('getsockopt'));
+        Htonl := GetProcAddress(LibHandle, PChar('htonl'));
+        Htons := GetProcAddress(LibHandle, PChar('htons'));
+        Inet_Addr := GetProcAddress(LibHandle, PChar('inet_addr'));
+        Inet_Ntoa := GetProcAddress(LibHandle, PChar('inet_ntoa'));
+        Listen := GetProcAddress(LibHandle, PChar('listen'));
+        Ntohl := GetProcAddress(LibHandle, PChar('ntohl'));
+        Ntohs := GetProcAddress(LibHandle, PChar('ntohs'));
+        ssRecv := GetProcAddress(LibHandle, PChar('recv'));
+        ssRecvFrom := GetProcAddress(LibHandle, PChar('recvfrom'));
+        Select := GetProcAddress(LibHandle, PChar('select'));
+        ssSend := GetProcAddress(LibHandle, PChar('send'));
+        ssSendTo := GetProcAddress(LibHandle, PChar('sendto'));
+        SetSockOpt := GetProcAddress(LibHandle, PChar('setsockopt'));
+        ShutDown := GetProcAddress(LibHandle, PChar('shutdown'));
+        Socket := GetProcAddress(LibHandle, PChar('socket'));
+        GetHostByAddr := GetProcAddress(LibHandle, PChar('gethostbyaddr'));
+        GetHostByName := GetProcAddress(LibHandle, PChar('gethostbyname'));
+        GetProtoByName := GetProcAddress(LibHandle, PChar('getprotobyname'));
+        GetProtoByNumber := GetProcAddress(LibHandle, PChar('getprotobynumber'));
+        GetServByName := GetProcAddress(LibHandle, PChar('getservbyname'));
+        GetServByPort := GetProcAddress(LibHandle, PChar('getservbyport'));
+        ssGetHostName := GetProcAddress(LibHandle, PChar('gethostname'));
+
+{$IFNDEF FORCEOLDAPI}
+        GetAddrInfo := GetProcAddress(LibHandle, PChar('getaddrinfo'));
+        FreeAddrInfo := GetProcAddress(LibHandle, PChar('freeaddrinfo'));
+        GetNameInfo := GetProcAddress(LibHandle, PChar('getnameinfo'));
+        SockEnhancedApi := Assigned(GetAddrInfo) and Assigned(FreeAddrInfo)
+          and Assigned(GetNameInfo);
+{$ENDIF}
+        Result := True;
+      end;
+    end
+    else Result := True;
+    if Result then
+      Inc(SynSockCount);
+  finally
+    SynSockCS.Leave;
+  end;
+end;
+
+function DestroySocketInterface: Boolean;
+begin
+  SynSockCS.Enter;
+  try
+    Dec(SynSockCount);
+    if SynSockCount < 0 then
+      SynSockCount := 0;
+    if SynSockCount = 0 then
+    begin
+      if LibHandle <> 0 then
+      begin
+        FreeLibrary(libHandle);
+        LibHandle := 0;
+      end;
+      if LibWship6Handle <> 0 then
+      begin
+        FreeLibrary(LibWship6Handle);
+        LibWship6Handle := 0;
+      end;
+    end;
+  finally
+    SynSockCS.Leave;
+  end;
+  Result := True;
+end;
+
+initialization
+begin
+  SynSockCS := SyncObjs.TCriticalSection.Create;
+  SET_IN6_IF_ADDR_ANY (@in6addr_any);
+  SET_LOOPBACK_ADDR6  (@in6addr_loopback);
+end;
+
+finalization
+begin
+  SynSockCS.Free;
+end;
+
+{$ENDIF}
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/Synapse/sswin32.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/Synapse/sswin32.pas
new file mode 100644
index 0000000..6439286
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/Synapse/sswin32.pas	
@@ -0,0 +1,1588 @@
+{$IFDEF WIN64}{$DEFINE WIN32}{$ENDIF}
+{==============================================================================|
+| Project : Ararat Synapse                                       | 002.000.002 |
+|==============================================================================|
+| Content: Socket Independent Platform Layer - Win32 definition include        |
+|==============================================================================|
+| Copyright (c)1999-2003, Lukas Gebauer                                        |
+| All rights reserved.                                                         |
+|                                                                              |
+| Redistribution and use in source and binary forms, with or without           |
+| modification, are permitted provided that the following conditions are met:  |
+|                                                                              |
+| Redistributions of source code must retain the above copyright notice, this  |
+| list of conditions and the following disclaimer.                             |
+|                                                                              |
+| Redistributions in binary form must reproduce the above copyright notice,    |
+| this list of conditions and the following disclaimer in the documentation    |
+| and/or other materials provided with the distribution.                       |
+|                                                                              |
+| Neither the name of Lukas Gebauer nor the names of its contributors may      |
+| be used to endorse or promote products derived from this software without    |
+| specific prior written permission.                                           |
+|                                                                              |
+| THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"  |
+| AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE    |
+| IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE   |
+| ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE FOR  |
+| ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL       |
+| DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR   |
+| SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER   |
+| CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT           |
+| LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY    |
+| OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH  |
+| DAMAGE.                                                                      |
+|==============================================================================|
+| The Initial Developer of the Original Code is Lukas Gebauer (Czech Republic).|
+| Portions created by Lukas Gebauer are Copyright (c)2003.                     |
+| All Rights Reserved.                                                         |
+|==============================================================================|
+| Contributor(s):                                                              |
+|==============================================================================|
+| History: see HISTORY.HTM from distribution package                           |
+|          (Found at URL: http://www.ararat.cz/synapse/)                       |
+|==============================================================================}
+
+{:@exclude}
+
+{$IFDEF WIN32}
+
+//{$DEFINE WINSOCK1}
+{Note about define WINSOCK1:
+If you activate this compiler directive, then socket interface level 1.1 is
+used instead default level 2.2. Level 2.2 is not available on old W95, however
+you can install update.
+}
+
+//{$DEFINE FORCEOLDAPI}
+{Note about define FORCEOLDAPI:
+If you activate this compiler directive, then is allways used old socket API
+for name resolution. If you leave this directive inactive, then the new API
+is used, when running system allows it.
+
+For IPv6 support you must have new API!
+}
+
+{$IFDEF FPC}
+  {$MODE DELPHI}
+{$ENDIF}
+{$H+}
+{$IFDEF VER125}
+  {$DEFINE BCB}
+{$ENDIF}
+{$IFDEF BCB}
+  {$ObjExportAll On}
+  (*$HPPEMIT '/* EDE 2003-02-19 */' *)
+  (*$HPPEMIT 'namespace Synsock { using System::Shortint; }' *)
+  (*$HPPEMIT '#undef h_addr' *)
+  (*$HPPEMIT '#undef IOCPARM_MASK' *)
+  (*$HPPEMIT '#undef FD_SETSIZE' *)
+  (*$HPPEMIT '#undef IOC_VOID' *)
+  (*$HPPEMIT '#undef IOC_OUT' *)
+  (*$HPPEMIT '#undef IOC_IN' *)
+  (*$HPPEMIT '#undef IOC_INOUT' *)
+  (*$HPPEMIT '#undef FIONREAD' *)
+  (*$HPPEMIT '#undef FIONBIO' *)
+  (*$HPPEMIT '#undef FIOASYNC' *)
+  (*$HPPEMIT '#undef IPPROTO_IP' *)
+  (*$HPPEMIT '#undef IPPROTO_ICMP' *)
+  (*$HPPEMIT '#undef IPPROTO_IGMP' *)
+  (*$HPPEMIT '#undef IPPROTO_TCP' *)
+  (*$HPPEMIT '#undef IPPROTO_UDP' *)
+  (*$HPPEMIT '#undef IPPROTO_RAW' *)
+  (*$HPPEMIT '#undef IPPROTO_MAX' *)
+  (*$HPPEMIT '#undef INADDR_ANY' *)
+  (*$HPPEMIT '#undef INADDR_LOOPBACK' *)
+  (*$HPPEMIT '#undef INADDR_BROADCAST' *)
+  (*$HPPEMIT '#undef INADDR_NONE' *)
+  (*$HPPEMIT '#undef INVALID_SOCKET' *)
+  (*$HPPEMIT '#undef SOCKET_ERROR' *)
+  (*$HPPEMIT '#undef WSADESCRIPTION_LEN' *)
+  (*$HPPEMIT '#undef WSASYS_STATUS_LEN' *)
+  (*$HPPEMIT '#undef IP_OPTIONS' *)
+  (*$HPPEMIT '#undef IP_TOS' *)
+  (*$HPPEMIT '#undef IP_TTL' *)
+  (*$HPPEMIT '#undef IP_MULTICAST_IF' *)
+  (*$HPPEMIT '#undef IP_MULTICAST_TTL' *)
+  (*$HPPEMIT '#undef IP_MULTICAST_LOOP' *)
+  (*$HPPEMIT '#undef IP_ADD_MEMBERSHIP' *)
+  (*$HPPEMIT '#undef IP_DROP_MEMBERSHIP' *)
+  (*$HPPEMIT '#undef IP_DONTFRAGMENT' *)
+  (*$HPPEMIT '#undef IP_DEFAULT_MULTICAST_TTL' *)
+  (*$HPPEMIT '#undef IP_DEFAULT_MULTICAST_LOOP' *)
+  (*$HPPEMIT '#undef IP_MAX_MEMBERSHIPS' *)
+  (*$HPPEMIT '#undef SOL_SOCKET' *)
+  (*$HPPEMIT '#undef SO_DEBUG' *)
+  (*$HPPEMIT '#undef SO_ACCEPTCONN' *)
+  (*$HPPEMIT '#undef SO_REUSEADDR' *)
+  (*$HPPEMIT '#undef SO_KEEPALIVE' *)
+  (*$HPPEMIT '#undef SO_DONTROUTE' *)
+  (*$HPPEMIT '#undef SO_BROADCAST' *)
+  (*$HPPEMIT '#undef SO_USELOOPBACK' *)
+  (*$HPPEMIT '#undef SO_LINGER' *)
+  (*$HPPEMIT '#undef SO_OOBINLINE' *)
+  (*$HPPEMIT '#undef SO_DONTLINGER' *)
+  (*$HPPEMIT '#undef SO_SNDBUF' *)
+  (*$HPPEMIT '#undef SO_RCVBUF' *)
+  (*$HPPEMIT '#undef SO_SNDLOWAT' *)
+  (*$HPPEMIT '#undef SO_RCVLOWAT' *)
+  (*$HPPEMIT '#undef SO_SNDTIMEO' *)
+  (*$HPPEMIT '#undef SO_RCVTIMEO' *)
+  (*$HPPEMIT '#undef SO_ERROR' *)
+  (*$HPPEMIT '#undef SO_OPENTYPE' *)
+  (*$HPPEMIT '#undef SO_SYNCHRONOUS_ALERT' *)
+  (*$HPPEMIT '#undef SO_SYNCHRONOUS_NONALERT' *)
+  (*$HPPEMIT '#undef SO_MAXDG' *)
+  (*$HPPEMIT '#undef SO_MAXPATHDG' *)
+  (*$HPPEMIT '#undef SO_UPDATE_ACCEPT_CONTEXT' *)
+  (*$HPPEMIT '#undef SO_CONNECT_TIME' *)
+  (*$HPPEMIT '#undef SO_TYPE' *)
+  (*$HPPEMIT '#undef SOCK_STREAM' *)
+  (*$HPPEMIT '#undef SOCK_DGRAM' *)
+  (*$HPPEMIT '#undef SOCK_RAW' *)
+  (*$HPPEMIT '#undef SOCK_RDM' *)
+  (*$HPPEMIT '#undef SOCK_SEQPACKET' *)
+  (*$HPPEMIT '#undef TCP_NODELAY' *)
+  (*$HPPEMIT '#undef AF_UNSPEC' *)
+  (*$HPPEMIT '#undef SOMAXCONN' *)
+  (*$HPPEMIT '#undef AF_INET' *)
+  (*$HPPEMIT '#undef AF_MAX' *)
+  (*$HPPEMIT '#undef PF_UNSPEC' *)
+  (*$HPPEMIT '#undef PF_INET' *)
+  (*$HPPEMIT '#undef PF_MAX' *)
+  (*$HPPEMIT '#undef MSG_OOB' *)
+  (*$HPPEMIT '#undef MSG_PEEK' *)
+  (*$HPPEMIT '#undef WSABASEERR' *)
+  (*$HPPEMIT '#undef WSAEINTR' *)
+  (*$HPPEMIT '#undef WSAEBADF' *)
+  (*$HPPEMIT '#undef WSAEACCES' *)
+  (*$HPPEMIT '#undef WSAEFAULT' *)
+  (*$HPPEMIT '#undef WSAEINVAL' *)
+  (*$HPPEMIT '#undef WSAEMFILE' *)
+  (*$HPPEMIT '#undef WSAEWOULDBLOCK' *)
+  (*$HPPEMIT '#undef WSAEINPROGRESS' *)
+  (*$HPPEMIT '#undef WSAEALREADY' *)
+  (*$HPPEMIT '#undef WSAENOTSOCK' *)
+  (*$HPPEMIT '#undef WSAEDESTADDRREQ' *)
+  (*$HPPEMIT '#undef WSAEMSGSIZE' *)
+  (*$HPPEMIT '#undef WSAEPROTOTYPE' *)
+  (*$HPPEMIT '#undef WSAENOPROTOOPT' *)
+  (*$HPPEMIT '#undef WSAEPROTONOSUPPORT' *)
+  (*$HPPEMIT '#undef WSAESOCKTNOSUPPORT' *)
+  (*$HPPEMIT '#undef WSAEOPNOTSUPP' *)
+  (*$HPPEMIT '#undef WSAEPFNOSUPPORT' *)
+  (*$HPPEMIT '#undef WSAEAFNOSUPPORT' *)
+  (*$HPPEMIT '#undef WSAEADDRINUSE' *)
+  (*$HPPEMIT '#undef WSAEADDRNOTAVAIL' *)
+  (*$HPPEMIT '#undef WSAENETDOWN' *)
+  (*$HPPEMIT '#undef WSAENETUNREACH' *)
+  (*$HPPEMIT '#undef WSAENETRESET' *)
+  (*$HPPEMIT '#undef WSAECONNABORTED' *)
+  (*$HPPEMIT '#undef WSAECONNRESET' *)
+  (*$HPPEMIT '#undef WSAENOBUFS' *)
+  (*$HPPEMIT '#undef WSAEISCONN' *)
+  (*$HPPEMIT '#undef WSAENOTCONN' *)
+  (*$HPPEMIT '#undef WSAESHUTDOWN' *)
+  (*$HPPEMIT '#undef WSAETOOMANYREFS' *)
+  (*$HPPEMIT '#undef WSAETIMEDOUT' *)
+  (*$HPPEMIT '#undef WSAECONNREFUSED' *)
+  (*$HPPEMIT '#undef WSAELOOP' *)
+  (*$HPPEMIT '#undef WSAENAMETOOLONG' *)
+  (*$HPPEMIT '#undef WSAEHOSTDOWN' *)
+  (*$HPPEMIT '#undef WSAEHOSTUNREACH' *)
+  (*$HPPEMIT '#undef WSAENOTEMPTY' *)
+  (*$HPPEMIT '#undef WSAEPROCLIM' *)
+  (*$HPPEMIT '#undef WSAEUSERS' *)
+  (*$HPPEMIT '#undef WSAEDQUOT' *)
+  (*$HPPEMIT '#undef WSAESTALE' *)
+  (*$HPPEMIT '#undef WSAEREMOTE' *)
+  (*$HPPEMIT '#undef WSASYSNOTREADY' *)
+  (*$HPPEMIT '#undef WSAVERNOTSUPPORTED' *)
+  (*$HPPEMIT '#undef WSANOTINITIALISED' *)
+  (*$HPPEMIT '#undef WSAEDISCON' *)
+  (*$HPPEMIT '#undef WSAENOMORE' *)
+  (*$HPPEMIT '#undef WSAECANCELLED' *)
+  (*$HPPEMIT '#undef WSAEEINVALIDPROCTABLE' *)
+  (*$HPPEMIT '#undef WSAEINVALIDPROVIDER' *)
+  (*$HPPEMIT '#undef WSAEPROVIDERFAILEDINIT' *)
+  (*$HPPEMIT '#undef WSASYSCALLFAILURE' *)
+  (*$HPPEMIT '#undef WSASERVICE_NOT_FOUND' *)
+  (*$HPPEMIT '#undef WSATYPE_NOT_FOUND' *)
+  (*$HPPEMIT '#undef WSA_E_NO_MORE' *)
+  (*$HPPEMIT '#undef WSA_E_CANCELLED' *)
+  (*$HPPEMIT '#undef WSAEREFUSED' *)
+  (*$HPPEMIT '#undef WSAHOST_NOT_FOUND' *)
+  (*$HPPEMIT '#undef HOST_NOT_FOUND' *)
+  (*$HPPEMIT '#undef WSATRY_AGAIN' *)
+  (*$HPPEMIT '#undef TRY_AGAIN' *)
+  (*$HPPEMIT '#undef WSANO_RECOVERY' *)
+  (*$HPPEMIT '#undef NO_RECOVERY' *)
+  (*$HPPEMIT '#undef WSANO_DATA' *)
+  (*$HPPEMIT '#undef NO_DATA' *)
+  (*$HPPEMIT '#undef WSANO_ADDRESS' *)
+  (*$HPPEMIT '#undef ENAMETOOLONG' *)
+  (*$HPPEMIT '#undef ENOTEMPTY' *)
+  (*$HPPEMIT '#undef FD_CLR' *)
+  (*$HPPEMIT '#undef FD_ISSET' *)
+  (*$HPPEMIT '#undef FD_SET' *)
+  (*$HPPEMIT '#undef FD_ZERO' *)
+  (*$HPPEMIT '#undef NO_ADDRESS' *)
+  (*$HPPEMIT '#undef ADDR_ANY' *)
+  (*$HPPEMIT '#undef SO_GROUP_ID' *)
+  (*$HPPEMIT '#undef SO_GROUP_PRIORITY' *)
+  (*$HPPEMIT '#undef SO_MAX_MSG_SIZE' *)
+  (*$HPPEMIT '#undef SO_PROTOCOL_INFOA' *)
+  (*$HPPEMIT '#undef SO_PROTOCOL_INFOW' *)
+  (*$HPPEMIT '#undef SO_PROTOCOL_INFO' *)
+  (*$HPPEMIT '#undef PVD_CONFIG' *)
+  (*$HPPEMIT '#undef AF_INET6' *)
+  (*$HPPEMIT '#undef PF_INET6' *)
+{$ENDIF}
+
+interface
+
+uses
+  SyncObjs, SysUtils, Classes,
+  Windows;
+
+function InitSocketInterface(stack: string): Boolean;
+function DestroySocketInterface: Boolean;
+
+const
+{$IFDEF WINSOCK1}
+  WinsockLevel = $0101;
+{$ELSE}
+  WinsockLevel = $0202;
+{$ENDIF}
+
+type
+  u_char = Char;
+  u_short = Word;
+  u_int = Integer;
+  u_long = Longint;
+  pu_long = ^u_long;
+  pu_short = ^u_short;
+  TSocket = u_int;
+  TAddrFamily = integer;
+
+  TMemory = pointer;
+
+const
+  {$IFDEF WINSOCK1}
+    DLLStackName = 'wsock32.dll';
+  {$ELSE}
+    DLLStackName = 'ws2_32.dll';
+  {$ENDIF}
+  DLLwship6 = 'wship6.dll';
+
+  cLocalhost = '127.0.0.1';
+  cAnyHost = '0.0.0.0';
+  cBroadcast = '255.255.255.255';
+  c6Localhost = '::1';
+  c6AnyHost = '::0';
+  c6Broadcast = 'ffff::1';
+  cAnyPort = '0';
+  
+
+const
+  FD_SETSIZE     =   64;
+type
+  PFDSet = ^TFDSet;
+  TFDSet = packed record
+    fd_count: u_int;
+    fd_array: array[0..FD_SETSIZE-1] of TSocket;
+  end;
+
+const
+  FIONREAD     = $4004667f;
+  FIONBIO      = $8004667e;
+  FIOASYNC     = $8004667d;
+
+type
+  PTimeVal = ^TTimeVal;
+  TTimeVal = packed record
+    tv_sec: Longint;
+    tv_usec: Longint;
+  end;
+
+const
+  IPPROTO_IP     =   0;		{ Dummy					}
+  IPPROTO_ICMP   =   1;		{ Internet Control Message Protocol }
+  IPPROTO_IGMP   =   2;		{ Internet Group Management Protocol}
+  IPPROTO_TCP    =   6;		{ TCP           			}
+  IPPROTO_UDP    =   17;	{ User Datagram Protocol		}
+  IPPROTO_IPV6   =   41;
+  IPPROTO_ICMPV6 =   58;
+
+  IPPROTO_RAW    =   255;
+  IPPROTO_MAX    =   256;
+
+type
+
+  PInAddr = ^TInAddr;
+  TInAddr = packed record
+    case integer of
+      0: (S_bytes: packed array [0..3] of byte);
+      1: (S_addr: u_long);
+  end;
+
+  PSockAddrIn = ^TSockAddrIn;
+  TSockAddrIn = packed record
+    case Integer of
+      0: (sin_family: u_short;
+          sin_port: u_short;
+          sin_addr: TInAddr;
+          sin_zero: array[0..7] of Char);
+      1: (sa_family: u_short;
+          sa_data: array[0..13] of Char)
+  end;
+
+  TIP_mreq =  record
+    imr_multiaddr: TInAddr;     { IP multicast address of group }
+    imr_interface: TInAddr;     { local IP address of interface }
+  end;
+
+  PInAddr6 = ^TInAddr6;
+  TInAddr6 = packed record
+    case integer of
+      0: (S6_addr: packed array [0..15] of byte);
+      1: (u6_addr8: packed array [0..15] of byte);
+      2: (u6_addr16: packed array [0..7] of word);
+      3: (u6_addr32: packed array [0..3] of integer);
+  end;
+
+  PSockAddrIn6 = ^TSockAddrIn6;
+  TSockAddrIn6 = packed record
+		sin6_family:   u_short;     // AF_INET6
+		sin6_port:     u_short;     // Transport level port number
+		sin6_flowinfo: u_long;	    // IPv6 flow information
+		sin6_addr:     TInAddr6;    // IPv6 address
+		sin6_scope_id: u_long;      // Scope Id: IF number for link-local
+                                //           SITE id for site-local
+  end;
+
+  TIPv6_mreq = record
+    ipv6mr_multiaddr: TInAddr6; // IPv6 multicast address.
+    ipv6mr_interface: integer;   // Interface index.
+    padding: integer;
+  end;
+
+  PHostEnt = ^THostEnt;
+  THostEnt = packed record
+    h_name: PChar;
+    h_aliases: ^PChar;
+    h_addrtype: Smallint;
+    h_length: Smallint;
+    case integer of
+     0: (h_addr_list: ^PChar);
+     1: (h_addr: ^PInAddr);
+  end;
+
+  PNetEnt = ^TNetEnt;
+  TNetEnt = packed record
+    n_name: PChar;
+    n_aliases: ^PChar;
+    n_addrtype: Smallint;
+    n_net: u_long;
+  end;
+
+  PServEnt = ^TServEnt;
+  TServEnt = packed record
+    s_name: PChar;
+    s_aliases: ^PChar;
+    s_port: Smallint;
+    s_proto: PChar;
+  end;
+
+  PProtoEnt = ^TProtoEnt;
+  TProtoEnt = packed record
+    p_name: PChar;
+    p_aliases: ^Pchar;
+    p_proto: Smallint;
+  end;
+
+const
+  INADDR_ANY       = $00000000;
+  INADDR_LOOPBACK  = $7F000001;
+  INADDR_BROADCAST = $FFFFFFFF;
+  INADDR_NONE      = $FFFFFFFF;
+  ADDR_ANY		 = INADDR_ANY;
+  INVALID_SOCKET		= TSocket(NOT(0));
+  SOCKET_ERROR			= -1;
+
+Const
+  {$IFDEF WINSOCK1}
+    IP_OPTIONS          = 1;
+    IP_MULTICAST_IF     = 2;           { set/get IP multicast interface   }
+    IP_MULTICAST_TTL    = 3;           { set/get IP multicast timetolive  }
+    IP_MULTICAST_LOOP   = 4;           { set/get IP multicast loopback    }
+    IP_ADD_MEMBERSHIP   = 5;           { add  an IP group membership      }
+    IP_DROP_MEMBERSHIP  = 6;           { drop an IP group membership      }
+    IP_TTL              = 7;           { set/get IP Time To Live          }
+    IP_TOS              = 8;           { set/get IP Type Of Service       }
+    IP_DONTFRAGMENT     = 9;           { set/get IP Don't Fragment flag   }
+  {$ELSE}
+    IP_OPTIONS          = 1;
+    IP_HDRINCL          = 2;
+    IP_TOS              = 3;           { set/get IP Type Of Service       }
+    IP_TTL              = 4;           { set/get IP Time To Live          }
+    IP_MULTICAST_IF     = 9;           { set/get IP multicast interface   }
+    IP_MULTICAST_TTL    = 10;           { set/get IP multicast timetolive  }
+    IP_MULTICAST_LOOP   = 11;           { set/get IP multicast loopback    }
+    IP_ADD_MEMBERSHIP   = 12;           { add  an IP group membership      }
+    IP_DROP_MEMBERSHIP  = 13;           { drop an IP group membership      }
+    IP_DONTFRAGMENT     = 14;           { set/get IP Don't Fragment flag   }
+  {$ENDIF}
+
+  IP_DEFAULT_MULTICAST_TTL   = 1;    { normally limit m'casts to 1 hop  }
+  IP_DEFAULT_MULTICAST_LOOP  = 1;    { normally hear sends if a member  }
+  IP_MAX_MEMBERSHIPS         = 20;   { per socket; must fit in one mbuf }
+
+  SOL_SOCKET      = $ffff;          {options for socket level }
+{ Option flags per-socket. }
+  SO_DEBUG        = $0001;          { turn on debugging info recording }
+  SO_ACCEPTCONN   = $0002;          { socket has had listen() }
+  SO_REUSEADDR    = $0004;          { allow local address reuse }
+  SO_KEEPALIVE    = $0008;          { keep connections alive }
+  SO_DONTROUTE    = $0010;          { just use interface addresses }
+  SO_BROADCAST    = $0020;          { permit sending of broadcast msgs }
+  SO_USELOOPBACK  = $0040;          { bypass hardware when possible }
+  SO_LINGER       = $0080;          { linger on close if data present }
+  SO_OOBINLINE    = $0100;          { leave received OOB data in line }
+  SO_DONTLINGER  =   $ff7f;
+{ Additional options. }
+  SO_SNDBUF       = $1001;          { send buffer size }
+  SO_RCVBUF       = $1002;          { receive buffer size }
+  SO_SNDLOWAT     = $1003;          { send low-water mark }
+  SO_RCVLOWAT     = $1004;          { receive low-water mark }
+  SO_SNDTIMEO     = $1005;          { send timeout }
+  SO_RCVTIMEO     = $1006;          { receive timeout }
+  SO_ERROR        = $1007;          { get error status and clear }
+  SO_TYPE         = $1008;          { get socket type }
+{ WinSock 2 extension -- new options }
+  SO_GROUP_ID       = $2001; { ID of a socket group}
+  SO_GROUP_PRIORITY = $2002; { the relative priority within a group}
+  SO_MAX_MSG_SIZE   = $2003; { maximum message size }
+  SO_PROTOCOL_INFOA = $2004; { WSAPROTOCOL_INFOA structure }
+  SO_PROTOCOL_INFOW = $2005; { WSAPROTOCOL_INFOW structure }
+  SO_PROTOCOL_INFO  = SO_PROTOCOL_INFOA;
+  PVD_CONFIG        = $3001; {configuration info for service provider }
+{ Option for opening sockets for synchronous access. }
+  SO_OPENTYPE     = $7008;
+  SO_SYNCHRONOUS_ALERT    = $10;
+  SO_SYNCHRONOUS_NONALERT = $20;
+{ Other NT-specific options. }
+  SO_MAXDG        = $7009;
+  SO_MAXPATHDG    = $700A;
+  SO_UPDATE_ACCEPT_CONTEXT     = $700B;
+  SO_CONNECT_TIME = $700C;
+
+  SOMAXCONN       = $7fffffff;
+
+  IPV6_UNICAST_HOPS      = 8;  // ???
+  IPV6_MULTICAST_IF      = 9;  // set/get IP multicast i/f
+  IPV6_MULTICAST_HOPS    = 10; // set/get IP multicast ttl
+  IPV6_MULTICAST_LOOP    = 11; // set/get IP multicast loopback
+  IPV6_JOIN_GROUP        = 12; // add an IP group membership
+  IPV6_LEAVE_GROUP       = 13; // drop an IP group membership
+
+  MSG_NOSIGNAL  = 0;
+
+  // getnameinfo constants
+  NI_MAXHOST	   = 1025;
+  NI_MAXSERV	   = 32;
+  NI_NOFQDN 	   = $1;
+  NI_NUMERICHOST = $2;
+  NI_NAMEREQD	   = $4;
+  NI_NUMERICSERV = $8;
+  NI_DGRAM       = $10;
+
+
+const
+  SOCK_STREAM     = 1;               { stream socket }
+  SOCK_DGRAM      = 2;               { datagram socket }
+  SOCK_RAW        = 3;               { raw-protocol interface }
+  SOCK_RDM        = 4;               { reliably-delivered message }
+  SOCK_SEQPACKET  = 5;               { sequenced packet stream }
+
+{ TCP options. }
+  TCP_NODELAY     = $0001;
+
+{ Address families. }
+
+  AF_UNSPEC       = 0;               { unspecified }
+  AF_INET         = 2;               { internetwork: UDP, TCP, etc. }
+  AF_INET6        = 23;              { Internetwork Version 6 }
+  AF_MAX          = 24;
+
+{ Protocol families, same as address families for now. }
+  PF_UNSPEC       = AF_UNSPEC;
+  PF_INET         = AF_INET;
+  PF_INET6        = AF_INET6;
+  PF_MAX          = AF_MAX;
+
+type
+  { Structure used by kernel to store most addresses. }
+  PSockAddr = ^TSockAddr;
+  TSockAddr = TSockAddrIn;
+
+  { Structure used by kernel to pass protocol information in raw sockets. }
+  PSockProto = ^TSockProto;
+  TSockProto = packed record
+    sp_family: u_short;
+    sp_protocol: u_short;
+  end;
+
+type
+  PAddrInfo = ^TAddrInfo;
+  TAddrInfo = record
+                ai_flags: integer;    // AI_PASSIVE, AI_CANONNAME, AI_NUMERICHOST.
+                ai_family: integer;   // PF_xxx.
+                ai_socktype: integer; // SOCK_xxx.
+                ai_protocol: integer; // 0 or IPPROTO_xxx for IPv4 and IPv6.
+                ai_addrlen: u_int;    // Length of ai_addr.
+                ai_canonname: PChar;  // Canonical name for nodename.
+                ai_addr: PSockAddr;   // Binary address.
+                ai_next: PAddrInfo;     // Next structure in linked list.
+              end;
+
+const
+  // Flags used in "hints" argument to getaddrinfo().
+  AI_PASSIVE     = $1;  // Socket address will be used in bind() call.
+  AI_CANONNAME   = $2;  // Return canonical name in first ai_canonname.
+  AI_NUMERICHOST = $4;  // Nodename must be a numeric address string.
+
+type
+{ Structure used for manipulating linger option. }
+  PLinger = ^TLinger;
+  TLinger = packed record
+    l_onoff: u_short;
+    l_linger: u_short;
+  end;
+
+const
+
+  MSG_OOB       = $01;                  // Process out-of-band data.
+  MSG_PEEK      = $02;                  // Peek at incoming messages.
+
+const
+
+{ All Windows Sockets error constants are biased by WSABASEERR from the "normal" }
+  WSABASEERR              = 10000;
+
+{ Windows Sockets definitions of regular Microsoft C error constants }
+
+  WSAEINTR                = (WSABASEERR+4);
+  WSAEBADF                = (WSABASEERR+9);
+  WSAEACCES               = (WSABASEERR+13);
+  WSAEFAULT               = (WSABASEERR+14);
+  WSAEINVAL               = (WSABASEERR+22);
+  WSAEMFILE               = (WSABASEERR+24);
+
+{ Windows Sockets definitions of regular Berkeley error constants }
+
+  WSAEWOULDBLOCK          = (WSABASEERR+35);
+  WSAEINPROGRESS          = (WSABASEERR+36);
+  WSAEALREADY             = (WSABASEERR+37);
+  WSAENOTSOCK             = (WSABASEERR+38);
+  WSAEDESTADDRREQ         = (WSABASEERR+39);
+  WSAEMSGSIZE             = (WSABASEERR+40);
+  WSAEPROTOTYPE           = (WSABASEERR+41);
+  WSAENOPROTOOPT          = (WSABASEERR+42);
+  WSAEPROTONOSUPPORT      = (WSABASEERR+43);
+  WSAESOCKTNOSUPPORT      = (WSABASEERR+44);
+  WSAEOPNOTSUPP           = (WSABASEERR+45);
+  WSAEPFNOSUPPORT         = (WSABASEERR+46);
+  WSAEAFNOSUPPORT         = (WSABASEERR+47);
+  WSAEADDRINUSE           = (WSABASEERR+48);
+  WSAEADDRNOTAVAIL        = (WSABASEERR+49);
+  WSAENETDOWN             = (WSABASEERR+50);
+  WSAENETUNREACH          = (WSABASEERR+51);
+  WSAENETRESET            = (WSABASEERR+52);
+  WSAECONNABORTED         = (WSABASEERR+53);
+  WSAECONNRESET           = (WSABASEERR+54);
+  WSAENOBUFS              = (WSABASEERR+55);
+  WSAEISCONN              = (WSABASEERR+56);
+  WSAENOTCONN             = (WSABASEERR+57);
+  WSAESHUTDOWN            = (WSABASEERR+58);
+  WSAETOOMANYREFS         = (WSABASEERR+59);
+  WSAETIMEDOUT            = (WSABASEERR+60);
+  WSAECONNREFUSED         = (WSABASEERR+61);
+  WSAELOOP                = (WSABASEERR+62);
+  WSAENAMETOOLONG         = (WSABASEERR+63);
+  WSAEHOSTDOWN            = (WSABASEERR+64);
+  WSAEHOSTUNREACH         = (WSABASEERR+65);
+  WSAENOTEMPTY            = (WSABASEERR+66);
+  WSAEPROCLIM             = (WSABASEERR+67);
+  WSAEUSERS               = (WSABASEERR+68);
+  WSAEDQUOT               = (WSABASEERR+69);
+  WSAESTALE               = (WSABASEERR+70);
+  WSAEREMOTE              = (WSABASEERR+71);
+
+{ Extended Windows Sockets error constant definitions }
+
+  WSASYSNOTREADY          = (WSABASEERR+91);
+  WSAVERNOTSUPPORTED      = (WSABASEERR+92);
+  WSANOTINITIALISED       = (WSABASEERR+93);
+  WSAEDISCON              = (WSABASEERR+101);
+  WSAENOMORE              = (WSABASEERR+102);
+  WSAECANCELLED           = (WSABASEERR+103);
+  WSAEEINVALIDPROCTABLE   = (WSABASEERR+104);
+  WSAEINVALIDPROVIDER     = (WSABASEERR+105);
+  WSAEPROVIDERFAILEDINIT  = (WSABASEERR+106);
+  WSASYSCALLFAILURE       = (WSABASEERR+107);
+  WSASERVICE_NOT_FOUND    = (WSABASEERR+108);
+  WSATYPE_NOT_FOUND       = (WSABASEERR+109);
+  WSA_E_NO_MORE           = (WSABASEERR+110);
+  WSA_E_CANCELLED         = (WSABASEERR+111);
+  WSAEREFUSED             = (WSABASEERR+112);
+
+{ Error return codes from gethostbyname() and gethostbyaddr()
+  (when using the resolver). Note that these errors are
+  retrieved via WSAGetLastError() and must therefore follow
+  the rules for avoiding clashes with error numbers from
+  specific implementations or language run-time systems.
+  For this reason the codes are based at WSABASEERR+1001.
+  Note also that [WSA]NO_ADDRESS is defined only for
+  compatibility purposes. }
+
+{ Authoritative Answer: Host not found }
+  WSAHOST_NOT_FOUND       = (WSABASEERR+1001);
+  HOST_NOT_FOUND          = WSAHOST_NOT_FOUND;
+{ Non-Authoritative: Host not found, or SERVERFAIL }
+  WSATRY_AGAIN            = (WSABASEERR+1002);
+  TRY_AGAIN               = WSATRY_AGAIN;
+{ Non recoverable errors, FORMERR, REFUSED, NOTIMP }
+  WSANO_RECOVERY          = (WSABASEERR+1003);
+  NO_RECOVERY             = WSANO_RECOVERY;
+{ Valid name, no data record of requested type }
+  WSANO_DATA              = (WSABASEERR+1004);
+  NO_DATA                 = WSANO_DATA;
+{ no address, look for MX record }
+  WSANO_ADDRESS           = WSANO_DATA;
+  NO_ADDRESS              = WSANO_ADDRESS;
+
+  EWOULDBLOCK        =  WSAEWOULDBLOCK;
+  EINPROGRESS        =  WSAEINPROGRESS;
+  EALREADY           =  WSAEALREADY;
+  ENOTSOCK           =  WSAENOTSOCK;
+  EDESTADDRREQ       =  WSAEDESTADDRREQ;
+  EMSGSIZE           =  WSAEMSGSIZE;
+  EPROTOTYPE         =  WSAEPROTOTYPE;
+  ENOPROTOOPT        =  WSAENOPROTOOPT;
+  EPROTONOSUPPORT    =  WSAEPROTONOSUPPORT;
+  ESOCKTNOSUPPORT    =  WSAESOCKTNOSUPPORT;
+  EOPNOTSUPP         =  WSAEOPNOTSUPP;
+  EPFNOSUPPORT       =  WSAEPFNOSUPPORT;
+  EAFNOSUPPORT       =  WSAEAFNOSUPPORT;
+  EADDRINUSE         =  WSAEADDRINUSE;
+  EADDRNOTAVAIL      =  WSAEADDRNOTAVAIL;
+  ENETDOWN           =  WSAENETDOWN;
+  ENETUNREACH        =  WSAENETUNREACH;
+  ENETRESET          =  WSAENETRESET;
+  ECONNABORTED       =  WSAECONNABORTED;
+  ECONNRESET         =  WSAECONNRESET;
+  ENOBUFS            =  WSAENOBUFS;
+  EISCONN            =  WSAEISCONN;
+  ENOTCONN           =  WSAENOTCONN;
+  ESHUTDOWN          =  WSAESHUTDOWN;
+  ETOOMANYREFS       =  WSAETOOMANYREFS;
+  ETIMEDOUT          =  WSAETIMEDOUT;
+  ECONNREFUSED       =  WSAECONNREFUSED;
+  ELOOP              =  WSAELOOP;
+  ENAMETOOLONG       =  WSAENAMETOOLONG;
+  EHOSTDOWN          =  WSAEHOSTDOWN;
+  EHOSTUNREACH       =  WSAEHOSTUNREACH;
+  ENOTEMPTY          =  WSAENOTEMPTY;
+  EPROCLIM           =  WSAEPROCLIM;
+  EUSERS             =  WSAEUSERS;
+  EDQUOT             =  WSAEDQUOT;
+  ESTALE             =  WSAESTALE;
+  EREMOTE            =  WSAEREMOTE;
+
+  EAI_ADDRFAMILY  = 1;   // Address family for nodename not supported.
+  EAI_AGAIN       = 2;   // Temporary failure in name resolution.
+  EAI_BADFLAGS    = 3;   // Invalid value for ai_flags.
+  EAI_FAIL        = 4;   // Non-recoverable failure in name resolution.
+  EAI_FAMILY      = 5;   // Address family ai_family not supported.
+  EAI_MEMORY      = 6;   // Memory allocation failure.
+  EAI_NODATA      = 7;   // No address associated with nodename.
+  EAI_NONAME      = 8;   // Nodename nor servname provided, or not known.
+  EAI_SERVICE     = 9;   // Servname not supported for ai_socktype.
+  EAI_SOCKTYPE    = 10;  // Socket type ai_socktype not supported.
+  EAI_SYSTEM      = 11;  // System error returned in errno.
+
+const
+  WSADESCRIPTION_LEN     =   256;
+  WSASYS_STATUS_LEN      =   128;
+type
+  PWSAData = ^TWSAData;
+  TWSAData = packed record
+    wVersion: Word;
+    wHighVersion: Word;
+    szDescription: array[0..WSADESCRIPTION_LEN] of Char;
+    szSystemStatus: array[0..WSASYS_STATUS_LEN] of Char;
+    iMaxSockets: Word;
+    iMaxUdpDg: Word;
+    lpVendorInfo: PChar;
+  end;
+
+  function IN6_IS_ADDR_UNSPECIFIED(const a: PInAddr6): boolean;
+  function IN6_IS_ADDR_LOOPBACK(const a: PInAddr6): boolean;
+  function IN6_IS_ADDR_LINKLOCAL(const a: PInAddr6): boolean;
+  function IN6_IS_ADDR_SITELOCAL(const a: PInAddr6): boolean;
+  function IN6_IS_ADDR_MULTICAST(const a: PInAddr6): boolean;
+  function IN6_ADDR_EQUAL(const a: PInAddr6; const b: PInAddr6):boolean;
+  procedure SET_IN6_IF_ADDR_ANY (const a: PInAddr6);
+  procedure SET_LOOPBACK_ADDR6 (const a: PInAddr6);
+var
+  in6addr_any, in6addr_loopback : TInAddr6;
+
+procedure FD_CLR(Socket: TSocket; var FDSet: TFDSet);
+function FD_ISSET(Socket: TSocket; var FDSet: TFDSet): Boolean;
+procedure FD_SET(Socket: TSocket; var FDSet: TFDSet);
+procedure FD_ZERO(var FDSet: TFDSet);
+
+{=============================================================================}
+
+type
+  TWSAStartup = function(wVersionRequired: Word; var WSData: TWSAData): Integer;
+    stdcall;
+  TWSACleanup = function: Integer;
+    stdcall;
+  TWSAGetLastError = function: Integer;
+    stdcall;
+  TGetServByName = function(name, proto: PChar): PServEnt;
+    stdcall;
+  TGetServByPort = function(port: Integer; proto: PChar): PServEnt;
+    stdcall;
+  TGetProtoByName = function(name: PChar): PProtoEnt;
+    stdcall;
+  TGetProtoByNumber = function(proto: Integer): PProtoEnt;
+    stdcall;
+  TGetHostByName = function(name: PChar): PHostEnt;
+    stdcall;
+  TGetHostByAddr = function(addr: Pointer; len, Struc: Integer): PHostEnt;
+    stdcall;
+  TGetHostName = function(name: PChar; len: Integer): Integer;
+    stdcall;
+  TShutdown = function(s: TSocket; how: Integer): Integer;
+    stdcall;
+  TSetSockOpt = function(s: TSocket; level, optname: Integer; optval: PChar;
+    optlen: Integer): Integer;
+    stdcall;
+  TGetSockOpt = function(s: TSocket; level, optname: Integer; optval: PChar;
+    var optlen: Integer): Integer;
+    stdcall;
+  TSendTo = function(s: TSocket; const Buf; len, flags: Integer; addrto: PSockAddr;
+    tolen: Integer): Integer;
+    stdcall;
+  TSend = function(s: TSocket; const Buf; len, flags: Integer): Integer;
+    stdcall;
+  TRecv = function(s: TSocket; var Buf; len, flags: Integer): Integer;
+    stdcall;
+  TRecvFrom = function(s: TSocket; var Buf; len, flags: Integer; from: PSockAddr;
+    var fromlen: Integer): Integer;
+    stdcall;
+  Tntohs = function(netshort: u_short): u_short;
+    stdcall;
+  Tntohl = function(netlong: u_long): u_long;
+    stdcall;
+  TListen = function(s: TSocket; backlog: Integer): Integer;
+    stdcall;
+  TIoctlSocket = function(s: TSocket; cmd: DWORD; var arg: Integer): Integer;
+    stdcall;
+  TInet_ntoa = function(inaddr: TInAddr): PChar;
+    stdcall;
+  TInet_addr = function(cp: PChar): u_long;
+    stdcall;
+  Thtons = function(hostshort: u_short): u_short;
+    stdcall;
+  Thtonl = function(hostlong: u_long): u_long;
+    stdcall;
+  TGetSockName = function(s: TSocket; name: PSockAddr; var namelen: Integer): Integer;
+    stdcall;
+  TGetPeerName = function(s: TSocket; name: PSockAddr; var namelen: Integer): Integer;
+    stdcall;
+  TConnect = function(s: TSocket; name: PSockAddr; namelen: Integer): Integer;
+    stdcall;
+  TCloseSocket = function(s: TSocket): Integer;
+    stdcall;
+  TBind = function(s: TSocket; addr: PSockAddr; namelen: Integer): Integer;
+    stdcall;
+  TAccept = function(s: TSocket; addr: PSockAddr; var addrlen: Integer): TSocket;
+    stdcall;
+  TTSocket = function(af, Struc, Protocol: Integer): TSocket;
+    stdcall;
+  TSelect = function(nfds: Integer; readfds, writefds, exceptfds: PFDSet;
+    timeout: PTimeVal): Longint;
+    stdcall;
+
+  TGetAddrInfo = function(NodeName: PChar; ServName: PChar; Hints: PAddrInfo;
+    var Addrinfo: PAddrInfo): integer;
+    stdcall;
+  TFreeAddrInfo = procedure(ai: PAddrInfo);
+    stdcall;
+  TGetNameInfo = function( addr: PSockAddr; namelen: Integer; host: PChar;
+    hostlen: DWORD; serv: PChar; servlen: DWORD; flags: integer): integer;
+    stdcall;
+
+  T__WSAFDIsSet = function (s: TSocket; var FDSet: TFDSet): Bool;
+    stdcall;
+
+  TWSAIoctl = function (s: TSocket; dwIoControlCode: DWORD; lpvInBuffer: Pointer;
+    cbInBuffer: DWORD; lpvOutBuffer: Pointer; cbOutBuffer: DWORD;
+    lpcbBytesReturned: PDWORD; lpOverlapped: Pointer;
+    lpCompletionRoutine: pointer): u_int;
+    stdcall;
+
+var
+  WSAStartup: TWSAStartup = nil;
+  WSACleanup: TWSACleanup = nil;
+  WSAGetLastError: TWSAGetLastError = nil;
+  GetServByName: TGetServByName = nil;
+  GetServByPort: TGetServByPort = nil;
+  GetProtoByName: TGetProtoByName = nil;
+  GetProtoByNumber: TGetProtoByNumber = nil;
+  GetHostByName: TGetHostByName = nil;
+  GetHostByAddr: TGetHostByAddr = nil;
+  ssGetHostName: TGetHostName = nil;
+  Shutdown: TShutdown = nil;
+  SetSockOpt: TSetSockOpt = nil;
+  GetSockOpt: TGetSockOpt = nil;
+  ssSendTo: TSendTo = nil;
+  ssSend: TSend = nil;
+  ssRecv: TRecv = nil;
+  ssRecvFrom: TRecvFrom = nil;
+  ntohs: Tntohs = nil;
+  ntohl: Tntohl = nil;
+  Listen: TListen = nil;
+  IoctlSocket: TIoctlSocket = nil;
+  Inet_ntoa: TInet_ntoa = nil;
+  Inet_addr: TInet_addr = nil;
+  htons: Thtons = nil;
+  htonl: Thtonl = nil;
+  ssGetSockName: TGetSockName = nil;
+  ssGetPeerName: TGetPeerName = nil;
+  ssConnect: TConnect = nil;
+  CloseSocket: TCloseSocket = nil;
+  ssBind: TBind = nil;
+  ssAccept: TAccept = nil;
+  Socket: TTSocket = nil;
+  Select: TSelect = nil;
+
+  GetAddrInfo: TGetAddrInfo = nil;
+  FreeAddrInfo: TFreeAddrInfo = nil;
+  GetNameInfo: TGetNameInfo = nil;
+
+  __WSAFDIsSet: T__WSAFDIsSet = nil;
+
+  WSAIoctl: TWSAIoctl = nil;
+
+var
+  SynSockCS: SyncObjs.TCriticalSection;
+  SockEnhancedApi: Boolean;
+  SockWship6Api: Boolean;
+
+type
+  TVarSin = packed record
+    case integer of
+      0: (AddressFamily: u_short);
+      1: (
+        case sin_family: u_short of
+          AF_INET: (sin_port: u_short;
+                    sin_addr: TInAddr;
+                    sin_zero: array[0..7] of Char);
+          AF_INET6: (sin6_port:     u_short;
+                		sin6_flowinfo: u_long;
+      	    	      sin6_addr:     TInAddr6;
+      		          sin6_scope_id: u_long);
+          );
+  end;
+
+function SizeOfVarSin(sin: TVarSin): integer;
+
+function Bind(s: TSocket; const addr: TVarSin): Integer;
+function Connect(s: TSocket; const name: TVarSin): Integer;
+function GetSockName(s: TSocket; var name: TVarSin): Integer;
+function GetPeerName(s: TSocket; var name: TVarSin): Integer;
+function GetHostName: string;
+function Send(s: TSocket; Buf: TMemory; len, flags: Integer): Integer;
+function Recv(s: TSocket; Buf: TMemory; len, flags: Integer): Integer;
+function SendTo(s: TSocket; Buf: TMemory; len, flags: Integer; addrto: TVarSin): Integer;
+function RecvFrom(s: TSocket; Buf: TMemory; len, flags: Integer; var from: TVarSin): Integer;
+function Accept(s: TSocket; var addr: TVarSin): TSocket;
+
+function IsNewApi(Family: integer): Boolean;
+function SetVarSin(var Sin: TVarSin; IP, Port: string; Family, SockProtocol, SockType: integer; PreferIP4: Boolean): integer;
+function GetSinIP(Sin: TVarSin): string;
+function GetSinPort(Sin: TVarSin): Integer;
+procedure ResolveNameToIP(Name: string;  Family, SockProtocol, SockType: integer; const IPList: TStrings);
+function ResolveIPToName(IP: string; Family, SockProtocol, SockType: integer): string;
+function ResolvePort(Port: string; Family, SockProtocol, SockType: integer): Word;
+
+{==============================================================================}
+implementation
+
+var
+  SynSockCount: Integer = 0;
+  LibHandle: THandle = 0;
+  Libwship6Handle: THandle = 0;
+
+function IN6_IS_ADDR_UNSPECIFIED(const a: PInAddr6): boolean;
+begin
+  Result := ((a^.u6_addr32[0] = 0) and (a^.u6_addr32[1] = 0) and
+             (a^.u6_addr32[2] = 0) and (a^.u6_addr32[3] = 0));
+end;
+
+function IN6_IS_ADDR_LOOPBACK(const a: PInAddr6): boolean;
+begin
+  Result := ((a^.u6_addr32[0] = 0) and (a^.u6_addr32[1] = 0) and
+             (a^.u6_addr32[2] = 0) and
+             (a^.u6_addr8[12] = 0) and (a^.u6_addr8[13] = 0) and
+             (a^.u6_addr8[14] = 0) and (a^.u6_addr8[15] = 1));
+end;
+
+function IN6_IS_ADDR_LINKLOCAL(const a: PInAddr6): boolean;
+begin
+  Result := ((a^.u6_addr8[0] = $FE) and (a^.u6_addr8[1] = $80));
+end;
+
+function IN6_IS_ADDR_SITELOCAL(const a: PInAddr6): boolean;
+begin
+  Result := ((a^.u6_addr8[0] = $FE) and (a^.u6_addr8[1] = $C0));
+end;
+
+function IN6_IS_ADDR_MULTICAST(const a: PInAddr6): boolean;
+begin
+  Result := (a^.u6_addr8[0] = $FF);
+end;
+
+function IN6_ADDR_EQUAL(const a: PInAddr6; const b: PInAddr6): boolean;
+begin
+  Result := (CompareMem( a, b, sizeof(TInAddr6)));
+end;
+
+procedure SET_IN6_IF_ADDR_ANY (const a: PInAddr6);
+begin
+  FillChar(a^, sizeof(TInAddr6), 0);
+end;
+
+procedure SET_LOOPBACK_ADDR6 (const a: PInAddr6);
+begin
+  FillChar(a^, sizeof(TInAddr6), 0);
+  a^.u6_addr8[15] := 1;
+end;
+
+{=============================================================================}
+procedure FD_CLR(Socket: TSocket; var FDSet: TFDSet);
+var
+  I: Integer;
+begin
+  I := 0;
+  while I < FDSet.fd_count do
+  begin
+    if FDSet.fd_array[I] = Socket then
+    begin
+      while I < FDSet.fd_count - 1 do
+      begin
+        FDSet.fd_array[I] := FDSet.fd_array[I + 1];
+        Inc(I);
+      end;
+      Dec(FDSet.fd_count);
+      Break;
+    end;
+    Inc(I);
+  end;
+end;
+
+function FD_ISSET(Socket: TSocket; var FDSet: TFDSet): Boolean;
+begin
+  Result := __WSAFDIsSet(Socket, FDSet);
+end;
+
+procedure FD_SET(Socket: TSocket; var FDSet: TFDSet);
+begin
+  if FDSet.fd_count < FD_SETSIZE then
+  begin
+    FDSet.fd_array[FDSet.fd_count] := Socket;
+    Inc(FDSet.fd_count);
+  end;
+end;
+
+procedure FD_ZERO(var FDSet: TFDSet);
+begin
+  FDSet.fd_count := 0;
+end;
+
+{=============================================================================}
+
+function SizeOfVarSin(sin: TVarSin): integer;
+begin
+  case sin.sin_family of
+    AF_INET:
+            Result := SizeOf(TSockAddrIn);
+    AF_INET6:
+            Result := SizeOf(TSockAddrIn6);
+  else
+    Result := 0;
+  end;
+end;
+
+{=============================================================================}
+
+function Bind(s: TSocket; const addr: TVarSin): Integer;
+begin
+  Result := ssBind(s, @addr, SizeOfVarSin(addr));
+end;
+
+function Connect(s: TSocket; const name: TVarSin): Integer;
+begin
+  Result := ssConnect(s, @name, SizeOfVarSin(name));
+end;
+
+function GetSockName(s: TSocket; var name: TVarSin): Integer;
+var
+  len: integer;
+begin
+  len := SizeOf(name);
+  FillChar(name, len, 0);
+  Result := ssGetSockName(s, @name, Len);
+end;
+
+function GetPeerName(s: TSocket; var name: TVarSin): Integer;
+var
+  len: integer;
+begin
+  len := SizeOf(name);
+  FillChar(name, len, 0);
+  Result := ssGetPeerName(s, @name, Len);
+end;
+
+function GetHostName: string;
+var
+  s: string;
+begin
+  Result := '';
+  setlength(s, 255);
+  ssGetHostName(pchar(s), Length(s) - 1);
+  Result := Pchar(s);
+end;
+
+function Send(s: TSocket; Buf: TMemory; len, flags: Integer): Integer;
+begin
+  Result := ssSend(s, Buf^, len, flags);
+end;
+
+function Recv(s: TSocket; Buf: TMemory; len, flags: Integer): Integer;
+begin
+  Result := ssRecv(s, Buf^, len, flags);
+end;
+
+function SendTo(s: TSocket; Buf: TMemory; len, flags: Integer; addrto: TVarSin): Integer;
+begin
+  Result := ssSendTo(s, Buf^, len, flags, @addrto, SizeOfVarSin(addrto));
+end;
+
+function RecvFrom(s: TSocket; Buf: TMemory; len, flags: Integer; var from: TVarSin): Integer;
+var
+  x: integer;
+begin
+  x := SizeOf(from);
+  Result := ssRecvFrom(s, Buf^, len, flags, @from, x);
+end;
+
+function Accept(s: TSocket; var addr: TVarSin): TSocket;
+var
+  x: integer;
+begin
+  x := SizeOf(addr);
+  Result := ssAccept(s, @addr, x);
+end;
+
+{=============================================================================}
+function IsNewApi(Family: integer): Boolean;
+begin
+  Result := SockEnhancedApi;
+  if not Result then
+    Result := (Family = AF_INET6) and SockWship6Api;
+end;
+
+function SetVarSin(var Sin: TVarSin; IP, Port: string; Family, SockProtocol, SockType: integer; PreferIP4: Boolean): integer;
+type
+  pu_long = ^u_long;
+var
+  ProtoEnt: PProtoEnt;
+  ServEnt: PServEnt;
+  HostEnt: PHostEnt;
+  r: integer;
+  Hints1, Hints2: TAddrInfo;
+  Sin1, Sin2: TVarSin;
+  TwoPass: boolean;
+
+  function GetAddr(const IP, port: string; Hints: TAddrInfo; var Sin: TVarSin): integer;
+  var
+    Addr: PAddrInfo;
+  begin
+    Addr := nil;
+    try
+      FillChar(Sin, Sizeof(Sin), 0);
+      if Hints.ai_socktype = SOCK_RAW then
+      begin
+        Hints.ai_socktype := 0;
+        Hints.ai_protocol := 0;
+        Result := synsock.GetAddrInfo(PChar(IP), nil, @Hints, Addr);
+      end
+      else
+      begin
+        if (IP = cAnyHost) or (IP = c6AnyHost) then
+        begin
+          Hints.ai_flags := AI_PASSIVE;
+          Result := synsock.GetAddrInfo(nil, PChar(Port), @Hints, Addr);
+        end
+        else
+          if (IP = cLocalhost) or (IP = c6Localhost) then
+          begin
+            Result := synsock.GetAddrInfo(nil, PChar(Port), @Hints, Addr);
+          end
+          else
+          begin
+            Result := synsock.GetAddrInfo(PChar(IP), PChar(Port), @Hints, Addr);
+          end;
+      end;
+      if Result = 0 then
+        if (Addr <> nil) then
+          Move(Addr^.ai_addr^, Sin, Addr^.ai_addrlen);
+    finally
+      if Assigned(Addr) then
+        synsock.FreeAddrInfo(Addr);
+    end;
+  end;
+
+begin
+  Result := 0;
+  FillChar(Sin, Sizeof(Sin), 0);
+  if not IsNewApi(family) then
+  begin
+    SynSockCS.Enter;
+    try
+      Sin.sin_family := AF_INET;
+      ProtoEnt := synsock.GetProtoByNumber(SockProtocol);
+      ServEnt := nil;
+      if ProtoEnt <> nil then
+        ServEnt := synsock.GetServByName(PChar(Port), ProtoEnt^.p_name);
+      if ServEnt = nil then
+        Sin.sin_port := synsock.htons(StrToIntDef(Port, 0))
+      else
+        Sin.sin_port := ServEnt^.s_port;
+      if IP = cBroadcast then
+        Sin.sin_addr.s_addr := u_long(INADDR_BROADCAST)
+      else
+      begin
+        Sin.sin_addr.s_addr := synsock.inet_addr(PChar(IP));
+        if Sin.sin_addr.s_addr = u_long(INADDR_NONE) then
+        begin
+          HostEnt := synsock.GetHostByName(PChar(IP));
+          Result := synsock.WSAGetLastError;
+          if HostEnt <> nil then
+            Sin.sin_addr.S_addr := u_long(Pu_long(HostEnt^.h_addr_list^)^);
+        end;
+      end;
+    finally
+      SynSockCS.Leave;
+    end;
+  end
+  else
+  begin
+    FillChar(Hints1, Sizeof(Hints1), 0);
+    FillChar(Hints2, Sizeof(Hints2), 0);
+    TwoPass := False;
+    if Family = AF_UNSPEC then
+    begin
+      if PreferIP4 then
+      begin
+        Hints1.ai_family := AF_INET;
+        Hints2.ai_family := AF_INET6;
+        TwoPass := True;
+      end
+      else
+      begin
+        Hints2.ai_family := AF_INET;
+        Hints1.ai_family := AF_INET6;
+        TwoPass := True;
+      end;
+    end
+    else
+      Hints1.ai_family := Family;
+
+    Hints1.ai_socktype := SockType;
+    Hints1.ai_protocol := SockProtocol;
+    Hints2.ai_socktype := Hints1.ai_socktype;
+    Hints2.ai_protocol := Hints1.ai_protocol;
+
+    r := GetAddr(IP, Port, Hints1, Sin1);
+    Result := r;
+    sin := sin1;
+    if r <> 0 then
+      if TwoPass then
+      begin
+        r := GetAddr(IP, Port, Hints2, Sin2);
+        Result := r;
+        if r = 0 then
+          sin := sin2;
+      end;
+  end;
+end;
+
+function GetSinIP(Sin: TVarSin): string;
+var
+  p: PChar;
+  host, serv: string;
+  hostlen, servlen: integer;
+  r: integer;
+begin
+  Result := '';
+  if not IsNewApi(Sin.AddressFamily) then
+  begin
+    p := synsock.inet_ntoa(Sin.sin_addr);
+    if p <> nil then
+      Result := p;
+  end
+  else
+  begin
+    hostlen := NI_MAXHOST;
+    servlen := NI_MAXSERV;
+    setlength(host, hostlen);
+    setlength(serv, servlen);
+    r := getnameinfo(@sin, SizeOfVarSin(sin), PChar(host), hostlen,
+      PChar(serv), servlen, NI_NUMERICHOST + NI_NUMERICSERV);
+    if r = 0 then
+      Result := PChar(host);
+  end;
+end;
+
+function GetSinPort(Sin: TVarSin): Integer;
+begin
+  if (Sin.sin_family = AF_INET6) then
+    Result := synsock.ntohs(Sin.sin6_port)
+  else
+    Result := synsock.ntohs(Sin.sin_port);
+end;
+
+procedure ResolveNameToIP(Name: string; Family, SockProtocol, SockType: integer; const IPList: TStrings);
+type
+  TaPInAddr = array[0..250] of PInAddr;
+  PaPInAddr = ^TaPInAddr;
+var
+  Hints: TAddrInfo;
+  Addr: PAddrInfo;
+  AddrNext: PAddrInfo;
+  r: integer;
+  host, serv: string;
+  hostlen, servlen: integer;
+  RemoteHost: PHostEnt;
+  IP: u_long;
+  PAdrPtr: PaPInAddr;
+  i: Integer;
+  s: string;
+  InAddr: TInAddr;
+begin
+  IPList.Clear;
+  if not IsNewApi(Family) then
+  begin
+    IP := synsock.inet_addr(PChar(Name));
+    if IP = u_long(INADDR_NONE) then
+    begin
+      SynSockCS.Enter;
+      try
+        RemoteHost := synsock.GetHostByName(PChar(Name));
+        if RemoteHost <> nil then
+        begin
+          PAdrPtr := PAPInAddr(RemoteHost^.h_addr_list);
+          i := 0;
+          while PAdrPtr^[i] <> nil do
+          begin
+            InAddr := PAdrPtr^[i]^;
+            s := Format('%d.%d.%d.%d', [InAddr.S_bytes[0], InAddr.S_bytes[1],
+              InAddr.S_bytes[2], InAddr.S_bytes[3]]);
+            IPList.Add(s);
+            Inc(i);
+          end;
+        end;
+      finally
+        SynSockCS.Leave;
+      end;
+    end
+    else
+      IPList.Add(Name);
+  end
+  else
+  begin
+    Addr := nil;
+    try
+      FillChar(Hints, Sizeof(Hints), 0);
+      Hints.ai_family := AF_UNSPEC;
+      Hints.ai_socktype := SockType;
+      Hints.ai_protocol := SockProtocol;
+      Hints.ai_flags := 0;
+      r := synsock.GetAddrInfo(PChar(Name), nil, @Hints, Addr);
+      if r = 0 then
+      begin
+        AddrNext := Addr;
+        while not(AddrNext = nil) do
+        begin
+          if not(((Family = AF_INET6) and (AddrNext^.ai_family = AF_INET))
+            or ((Family = AF_INET) and (AddrNext^.ai_family = AF_INET6))) then
+          begin
+            hostlen := NI_MAXHOST;
+            servlen := NI_MAXSERV;
+            setlength(host, hostlen);
+            setlength(serv, servlen);
+            r := getnameinfo(AddrNext^.ai_addr, AddrNext^.ai_addrlen,
+              PChar(host), hostlen, PChar(serv), servlen,
+              NI_NUMERICHOST + NI_NUMERICSERV);
+            if r = 0 then
+            begin
+              host := PChar(host);
+              IPList.Add(host);
+            end;
+          end;
+          AddrNext := AddrNext^.ai_next;
+        end;
+      end;
+    finally
+      if Assigned(Addr) then
+        synsock.FreeAddrInfo(Addr);
+    end;
+  end;
+  if IPList.Count = 0 then
+    IPList.Add(cAnyHost);
+end;
+
+function ResolvePort(Port: string; Family, SockProtocol, SockType: integer): Word;
+var
+  ProtoEnt: PProtoEnt;
+  ServEnt: PServEnt;
+  Hints: TAddrInfo;
+  Addr: PAddrInfo;
+  r: integer;
+begin
+  Result := 0;
+  if not IsNewApi(Family) then
+  begin
+    SynSockCS.Enter;
+    try
+      ProtoEnt := synsock.GetProtoByNumber(SockProtocol);
+      ServEnt := nil;
+      if ProtoEnt <> nil then
+        ServEnt := synsock.GetServByName(PChar(Port), ProtoEnt^.p_name);
+      if ServEnt = nil then
+        Result := StrToIntDef(Port, 0)
+      else
+        Result := synsock.htons(ServEnt^.s_port);
+    finally
+      SynSockCS.Leave;
+    end;
+  end
+  else
+  begin
+    Addr := nil;
+    try
+      FillChar(Hints, Sizeof(Hints), 0);
+      Hints.ai_family := AF_UNSPEC;
+      Hints.ai_socktype := SockType;
+      Hints.ai_protocol := Sockprotocol;
+      Hints.ai_flags := AI_PASSIVE;
+      r := synsock.GetAddrInfo(nil, PChar(Port), @Hints, Addr);
+      if (r = 0) and Assigned(Addr) then
+      begin
+        if Addr^.ai_family = AF_INET then
+          Result := synsock.htons(Addr^.ai_addr^.sin_port);
+        if Addr^.ai_family = AF_INET6 then
+          Result := synsock.htons(PSockAddrIn6(Addr^.ai_addr)^.sin6_port);
+      end;
+    finally
+      if Assigned(Addr) then
+        synsock.FreeAddrInfo(Addr);
+    end;
+  end;
+end;
+
+function ResolveIPToName(IP: string; Family, SockProtocol, SockType: integer): string;
+var
+  Hints: TAddrInfo;
+  Addr: PAddrInfo;
+  r: integer;
+  host, serv: string;
+  hostlen, servlen: integer;
+  RemoteHost: PHostEnt;
+  IPn: u_long;
+begin
+  Result := IP;
+  if not IsNewApi(Family) then
+  begin
+    IPn := synsock.inet_addr(PChar(IP));
+    if IPn <> u_long(INADDR_NONE) then
+    begin
+      SynSockCS.Enter;
+      try
+        RemoteHost := GetHostByAddr(@IPn, SizeOf(IPn), AF_INET);
+        if RemoteHost <> nil then
+          Result := RemoteHost^.h_name;
+      finally
+        SynSockCS.Leave;
+      end;
+    end;
+  end
+  else
+  begin
+    Addr := nil;
+    try
+      FillChar(Hints, Sizeof(Hints), 0);
+      Hints.ai_family := AF_UNSPEC;
+      Hints.ai_socktype := SockType;
+      Hints.ai_protocol := SockProtocol;
+      Hints.ai_flags := 0;
+      r := synsock.GetAddrInfo(PChar(IP), nil, @Hints, Addr);
+      if (r = 0) and Assigned(Addr)then
+      begin
+        hostlen := NI_MAXHOST;
+        servlen := NI_MAXSERV;
+        setlength(host, hostlen);
+        setlength(serv, servlen);
+        r := getnameinfo(Addr^.ai_addr, Addr^.ai_addrlen,
+          PChar(host), hostlen, PChar(serv), servlen,
+          NI_NUMERICSERV);
+        if r = 0 then
+          Result := PChar(host);
+      end;
+    finally
+      if Assigned(Addr) then
+        synsock.FreeAddrInfo(Addr);
+    end;
+  end;
+end;
+
+{=============================================================================}
+
+function InitSocketInterface(stack: string): Boolean;
+begin
+  Result := False;
+  SockEnhancedApi := False;
+  if stack = '' then
+    stack := DLLStackName;
+  SynSockCS.Enter;
+  try
+    if SynSockCount = 0 then
+    begin
+      SockEnhancedApi := False;
+      SockWship6Api := False;
+      LibHandle := LoadLibrary(PChar(Stack));
+      if LibHandle <> 0 then
+      begin
+        WSAIoctl := GetProcAddress(LibHandle, PAnsiChar('WSAIoctl'));
+        __WSAFDIsSet := GetProcAddress(LibHandle, PAnsiChar('__WSAFDIsSet'));
+        CloseSocket := GetProcAddress(LibHandle, PAnsiChar('closesocket'));
+        IoctlSocket := GetProcAddress(LibHandle, PAnsiChar('ioctlsocket'));
+        WSAGetLastError := GetProcAddress(LibHandle, PAnsiChar('WSAGetLastError'));
+        WSAStartup := GetProcAddress(LibHandle, PAnsiChar('WSAStartup'));
+        WSACleanup := GetProcAddress(LibHandle, PAnsiChar('WSACleanup'));
+        ssAccept := GetProcAddress(LibHandle, PAnsiChar('accept'));
+        ssBind := GetProcAddress(LibHandle, PAnsiChar('bind'));
+        ssConnect := GetProcAddress(LibHandle, PAnsiChar('connect'));
+        ssGetPeerName := GetProcAddress(LibHandle, PAnsiChar('getpeername'));
+        ssGetSockName := GetProcAddress(LibHandle, PAnsiChar('getsockname'));
+        GetSockOpt := GetProcAddress(LibHandle, PAnsiChar('getsockopt'));
+        Htonl := GetProcAddress(LibHandle, PAnsiChar('htonl'));
+        Htons := GetProcAddress(LibHandle, PAnsiChar('htons'));
+        Inet_Addr := GetProcAddress(LibHandle, PAnsiChar('inet_addr'));
+        Inet_Ntoa := GetProcAddress(LibHandle, PAnsiChar('inet_ntoa'));
+        Listen := GetProcAddress(LibHandle, PAnsiChar('listen'));
+        Ntohl := GetProcAddress(LibHandle, PAnsiChar('ntohl'));
+        Ntohs := GetProcAddress(LibHandle, PAnsiChar('ntohs'));
+        ssRecv := GetProcAddress(LibHandle, PAnsiChar('recv'));
+        ssRecvFrom := GetProcAddress(LibHandle, PAnsiChar('recvfrom'));
+        Select := GetProcAddress(LibHandle, PAnsiChar('select'));
+        ssSend := GetProcAddress(LibHandle, PAnsiChar('send'));
+        ssSendTo := GetProcAddress(LibHandle, PAnsiChar('sendto'));
+        SetSockOpt := GetProcAddress(LibHandle, PAnsiChar('setsockopt'));
+        ShutDown := GetProcAddress(LibHandle, PAnsiChar('shutdown'));
+        Socket := GetProcAddress(LibHandle, PAnsiChar('socket'));
+        GetHostByAddr := GetProcAddress(LibHandle, PAnsiChar('gethostbyaddr'));
+        GetHostByName := GetProcAddress(LibHandle, PAnsiChar('gethostbyname'));
+        GetProtoByName := GetProcAddress(LibHandle, PAnsiChar('getprotobyname'));
+        GetProtoByNumber := GetProcAddress(LibHandle, PAnsiChar('getprotobynumber'));
+        GetServByName := GetProcAddress(LibHandle, PAnsiChar('getservbyname'));
+        GetServByPort := GetProcAddress(LibHandle, PAnsiChar('getservbyport'));
+        ssGetHostName := GetProcAddress(LibHandle, PAnsiChar('gethostname'));
+
+{$IFNDEF FORCEOLDAPI}
+        GetAddrInfo := GetProcAddress(LibHandle, PAnsiChar('getaddrinfo'));
+        FreeAddrInfo := GetProcAddress(LibHandle, PAnsiChar('freeaddrinfo'));
+        GetNameInfo := GetProcAddress(LibHandle, PAnsiChar('getnameinfo'));
+        SockEnhancedApi := Assigned(GetAddrInfo) and Assigned(FreeAddrInfo)
+          and Assigned(GetNameInfo);
+        if not SockEnhancedApi then
+        begin
+          LibWship6Handle := LoadLibrary(PChar(DLLWship6));
+          if LibWship6Handle <> 0 then
+          begin
+            GetAddrInfo := GetProcAddress(LibWship6Handle, PAnsiChar('getaddrinfo'));
+            FreeAddrInfo := GetProcAddress(LibWship6Handle, PAnsiChar('freeaddrinfo'));
+            GetNameInfo := GetProcAddress(LibWship6Handle, PAnsiChar('getnameinfo'));
+            SockWship6Api := Assigned(GetAddrInfo) and Assigned(FreeAddrInfo)
+              and Assigned(GetNameInfo);
+          end;
+        end;
+{$ENDIF}
+        Result := True;
+      end;
+    end
+    else Result := True;
+    if Result then
+      Inc(SynSockCount);
+  finally
+    SynSockCS.Leave;
+  end;
+end;
+
+function DestroySocketInterface: Boolean;
+begin
+  SynSockCS.Enter;
+  try
+    Dec(SynSockCount);
+    if SynSockCount < 0 then
+      SynSockCount := 0;
+    if SynSockCount = 0 then
+    begin
+      if LibHandle <> 0 then
+      begin
+        FreeLibrary(libHandle);
+        LibHandle := 0;
+      end;
+      if LibWship6Handle <> 0 then
+      begin
+        FreeLibrary(LibWship6Handle);
+        LibWship6Handle := 0;
+      end;
+    end;
+  finally
+    SynSockCS.Leave;
+  end;
+  Result := True;
+end;
+
+initialization
+begin
+  SynSockCS := SyncObjs.TCriticalSection.Create;
+  SET_IN6_IF_ADDR_ANY (@in6addr_any);
+  SET_LOOPBACK_ADDR6  (@in6addr_loopback);
+end;
+
+finalization
+begin
+  SynSockCS.Free;
+end;
+
+{$ENDIF}
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/Synapse/synacode.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/Synapse/synacode.pas
new file mode 100644
index 0000000..f183c8c
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/Synapse/synacode.pas	
@@ -0,0 +1,1454 @@
+{==============================================================================|
+| Project : Ararat Synapse                                       | 002.002.000 |
+|==============================================================================|
+| Content: Coding and decoding support                                         |
+|==============================================================================|
+| Copyright (c)1999-2007, Lukas Gebauer                                        |
+| All rights reserved.                                                         |
+|                                                                              |
+| Redistribution and use in source and binary forms, with or without           |
+| modification, are permitted provided that the following conditions are met:  |
+|                                                                              |
+| Redistributions of source code must retain the above copyright notice, this  |
+| list of conditions and the following disclaimer.                             |
+|                                                                              |
+| Redistributions in binary form must reproduce the above copyright notice,    |
+| this list of conditions and the following disclaimer in the documentation    |
+| and/or other materials provided with the distribution.                       |
+|                                                                              |
+| Neither the name of Lukas Gebauer nor the names of its contributors may      |
+| be used to endorse or promote products derived from this software without    |
+| specific prior written permission.                                           |
+|                                                                              |
+| THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"  |
+| AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE    |
+| IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE   |
+| ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE FOR  |
+| ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL       |
+| DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR   |
+| SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER   |
+| CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT           |
+| LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY    |
+| OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH  |
+| DAMAGE.                                                                      |
+|==============================================================================|
+| The Initial Developer of the Original Code is Lukas Gebauer (Czech Republic).|
+| Portions created by Lukas Gebauer are Copyright (c)2000-2007.                |
+| All Rights Reserved.                                                         |
+|==============================================================================|
+| Contributor(s):                                                              |
+|==============================================================================|
+| History: see HISTORY.HTM from distribution package                           |
+|          (Found at URL: http://www.ararat.cz/synapse/)                       |
+|==============================================================================}
+
+{:@abstract(Various encoding and decoding support)}
+{$IFDEF FPC}
+  {$MODE DELPHI}
+{$ENDIF}
+{$Q-}
+{$R-}
+{$H+}
+
+unit synacode;
+
+interface
+
+uses
+  SysUtils;
+
+type
+  TSpecials = set of AnsiChar;
+
+const
+
+  SpecialChar: TSpecials =
+  ['=', '(', ')', '[', ']', '<', '>', ':', ';', ',', '@', '/', '?', '\',
+    '"', '_'];
+  NonAsciiChar: TSpecials =
+  [Char(0)..Char(31), Char(127)..Char(255)];
+  URLFullSpecialChar: TSpecials =
+  [';', '/', '?', ':', '@', '=', '&', '#', '+'];
+  URLSpecialChar: TSpecials =
+  [#$00..#$20, '_', '<', '>', '"', '%', '{', '}', '|', '\', '^', '~', '[', ']',
+    '`', #$7F..#$FF];
+  TableBase64 =
+    'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/=';
+  TableBase64mod =
+    'ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+,=';
+  TableUU =
+    '`!"#$%&''()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_';
+  TableXX =
+    '+-0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz';
+  ReTablebase64 =
+    #$40 +#$40 +#$40 +#$40 +#$40 +#$40 +#$40 +#$40 +#$40 +#$40 +#$3E +#$40
+    +#$40 +#$40 +#$3F +#$34 +#$35 +#$36 +#$37 +#$38 +#$39 +#$3A +#$3B +#$3C
+    +#$3D +#$40 +#$40 +#$40 +#$40 +#$40 +#$40 +#$40 +#$00 +#$01 +#$02 +#$03
+    +#$04 +#$05 +#$06 +#$07 +#$08 +#$09 +#$0A +#$0B +#$0C +#$0D +#$0E +#$0F
+    +#$10 +#$11 +#$12 +#$13 +#$14 +#$15 +#$16 +#$17 +#$18 +#$19 +#$40 +#$40
+    +#$40 +#$40 +#$40 +#$40 +#$1A +#$1B +#$1C +#$1D +#$1E +#$1F +#$20 +#$21
+    +#$22 +#$23 +#$24 +#$25 +#$26 +#$27 +#$28 +#$29 +#$2A +#$2B +#$2C +#$2D
+    +#$2E +#$2F +#$30 +#$31 +#$32 +#$33 +#$40 +#$40 +#$40 +#$40 +#$40 +#$40;
+  ReTableUU =
+    #$01 +#$02 +#$03 +#$04 +#$05 +#$06 +#$07 +#$08 +#$09 +#$0A +#$0B +#$0C
+    +#$0D +#$0E +#$0F +#$10 +#$11 +#$12 +#$13 +#$14 +#$15 +#$16 +#$17 +#$18
+    +#$19 +#$1A +#$1B +#$1C +#$1D +#$1E +#$1F +#$20 +#$21 +#$22 +#$23 +#$24
+    +#$25 +#$26 +#$27 +#$28 +#$29 +#$2A +#$2B +#$2C +#$2D +#$2E +#$2F +#$30
+    +#$31 +#$32 +#$33 +#$34 +#$35 +#$36 +#$37 +#$38 +#$39 +#$3A +#$3B +#$3C
+    +#$3D +#$3E +#$3F +#$00 +#$40 +#$40 +#$40 +#$40 +#$40 +#$40 +#$40 +#$40
+    +#$40 +#$40 +#$40 +#$40 +#$40 +#$40 +#$40 +#$40 +#$40 +#$40 +#$40 +#$40
+    +#$40 +#$40 +#$40 +#$40 +#$40 +#$40 +#$40 +#$40 +#$40 +#$40 +#$40 +#$40;
+  ReTableXX =
+    #$40 +#$40 +#$40 +#$40 +#$40 +#$40 +#$40 +#$40 +#$40 +#$40 +#$00 +#$40
+    +#$01 +#$40 +#$40 +#$02 +#$03 +#$04 +#$05 +#$06 +#$07 +#$08 +#$09 +#$0A
+    +#$0B +#$40 +#$40 +#$40 +#$40 +#$40 +#$40 +#$40 +#$0C +#$0D +#$0E +#$0F
+    +#$10 +#$11 +#$12 +#$13 +#$14 +#$15 +#$16 +#$17 +#$18 +#$19 +#$1A +#$1B
+    +#$1C +#$1D +#$1E +#$1F +#$20 +#$21 +#$22 +#$23 +#$24 +#$25 +#$40 +#$40
+    +#$40 +#$40 +#$40 +#$40 +#$26 +#$27 +#$28 +#$29 +#$2A +#$2B +#$2C +#$2D
+    +#$2E +#$2F +#$30 +#$31 +#$32 +#$33 +#$34 +#$35 +#$36 +#$37 +#$38 +#$39
+    +#$3A +#$3B +#$3C +#$3D +#$3E +#$3F +#$40 +#$40 +#$40 +#$40 +#$40 +#$40;
+
+{:Decodes triplet encoding with a given character delimiter. It is used for
+ decoding quoted-printable or URL encoding.}
+function DecodeTriplet(const Value: AnsiString; Delimiter: AnsiChar): AnsiString;
+
+{:Decodes a string from quoted printable form. (also decodes triplet sequences
+ like '=7F')}
+function DecodeQuotedPrintable(const Value: AnsiString): AnsiString;
+
+{:Decodes a string of URL encoding. (also decodes triplet sequences like '%7F')}
+function DecodeURL(const Value: AnsiString): AnsiString;
+
+{:Performs triplet encoding with a given character delimiter. Used for encoding
+ quoted-printable or URL encoding.}
+function EncodeTriplet(const Value: AnsiString; Delimiter: AnsiChar;
+  Specials: TSpecials): AnsiString;
+
+{:Encodes a string to triplet quoted printable form. All @link(NonAsciiChar)
+ are encoded.}
+function EncodeQuotedPrintable(const Value: AnsiString): AnsiString;
+
+{:Encodes a string to triplet quoted printable form. All @link(NonAsciiChar) and
+ @link(SpecialChar) are encoded.}
+function EncodeSafeQuotedPrintable(const Value: AnsiString): AnsiString;
+
+{:Encodes a string to URL format. Used for encoding data from a form field in
+ HTTP, etc. (Encodes all critical characters including characters used as URL
+ delimiters ('/',':', etc.)}
+function EncodeURLElement(const Value: AnsiString): AnsiString;
+
+{:Encodes a string to URL format. Used to encode critical characters in all
+ URLs.}
+function EncodeURL(const Value: AnsiString): AnsiString;
+
+{:Decode 4to3 encoding with given table. If some element is not found in table,
+ first item from table is used. This is good for buggy coded items by Microsoft
+ Outlook. This software sometimes using wrong table for UUcode, where is used
+ ' ' instead '`'.}
+function Decode4to3(const Value, Table: AnsiString): AnsiString;
+
+{:Decode 4to3 encoding with given REVERSE table. Using this function with
+reverse table is much faster then @link(Decode4to3). This function is used
+internally for Base64, UU or XX decoding.}
+function Decode4to3Ex(const Value, Table: AnsiString): AnsiString;
+
+{:Encode by system 3to4 (used by Base64, UU coding, etc) by given table.}
+function Encode3to4(const Value, Table: AnsiString): AnsiString;
+
+{:Decode string from base64 format.}
+function DecodeBase64(const Value: AnsiString): AnsiString;
+
+{:Encodes a string to base64 format.}
+function EncodeBase64(const Value: AnsiString): AnsiString;
+
+{:Decode string from modified base64 format. (used in IMAP, for example.)}
+function DecodeBase64mod(const Value: AnsiString): AnsiString;
+
+{:Encodes a string to  modified base64 format. (used in IMAP, for example.)}
+function EncodeBase64mod(const Value: AnsiString): AnsiString;
+
+{:Decodes a string from UUcode format.}
+function DecodeUU(const Value: AnsiString): AnsiString;
+
+{:encode UUcode. it encode only datas, you must also add header and footer for
+ proper encode.}
+function EncodeUU(const Value: AnsiString): AnsiString;
+
+{:Decodes a string from XXcode format.}
+function DecodeXX(const Value: AnsiString): AnsiString;
+
+{:decode line with Yenc code. This code is sometimes used in newsgroups.}
+function DecodeYEnc(const Value: AnsiString): AnsiString;
+
+{:Returns a new CRC32 value after adding a new byte of data.}
+function UpdateCrc32(Value: Byte; Crc32: Integer): Integer;
+
+{:return CRC32 from a value string.}
+function Crc32(const Value: AnsiString): Integer;
+
+{:Returns a new CRC16 value after adding a new byte of data.}
+function UpdateCrc16(Value: Byte; Crc16: Word): Word;
+
+{:return CRC16 from a value string.}
+function Crc16(const Value: AnsiString): Word;
+
+{:Returns a binary string with a RSA-MD5 hashing of "Value" string.}
+function MD5(const Value: AnsiString): AnsiString;
+
+{:Returns a binary string with HMAC-MD5 hash.}
+function HMAC_MD5(Text, Key: AnsiString): AnsiString;
+
+{:Returns a binary string with a RSA-MD5 hashing of string what is constructed
+ by repeating "value" until length is "Len".}
+function MD5LongHash(const Value: AnsiString; Len: integer): AnsiString;
+
+{:Returns a binary string with a SHA-1 hashing of "Value" string.}
+function SHA1(const Value: AnsiString): AnsiString;
+
+{:Returns a binary string with HMAC-SHA1 hash.}
+function HMAC_SHA1(Text, Key: AnsiString): AnsiString;
+
+{:Returns a binary string with a SHA-1 hashing of string what is constructed
+ by repeating "value" until length is "Len".}
+function SHA1LongHash(const Value: AnsiString; Len: integer): AnsiString;
+
+{:Returns a binary string with a RSA-MD4 hashing of "Value" string.}
+function MD4(const Value: AnsiString): AnsiString;
+
+implementation
+
+const
+
+  Crc32Tab: array[0..255] of Integer = (
+    Integer($00000000), Integer($77073096), Integer($EE0E612C), Integer($990951BA),
+    Integer($076DC419), Integer($706AF48F), Integer($E963A535), Integer($9E6495A3),
+    Integer($0EDB8832), Integer($79DCB8A4), Integer($E0D5E91E), Integer($97D2D988),
+    Integer($09B64C2B), Integer($7EB17CBD), Integer($E7B82D07), Integer($90BF1D91),
+    Integer($1DB71064), Integer($6AB020F2), Integer($F3B97148), Integer($84BE41DE),
+    Integer($1ADAD47D), Integer($6DDDE4EB), Integer($F4D4B551), Integer($83D385C7),
+    Integer($136C9856), Integer($646BA8C0), Integer($FD62F97A), Integer($8A65C9EC),
+    Integer($14015C4F), Integer($63066CD9), Integer($FA0F3D63), Integer($8D080DF5),
+    Integer($3B6E20C8), Integer($4C69105E), Integer($D56041E4), Integer($A2677172),
+    Integer($3C03E4D1), Integer($4B04D447), Integer($D20D85FD), Integer($A50AB56B),
+    Integer($35B5A8FA), Integer($42B2986C), Integer($DBBBC9D6), Integer($ACBCF940),
+    Integer($32D86CE3), Integer($45DF5C75), Integer($DCD60DCF), Integer($ABD13D59),
+    Integer($26D930AC), Integer($51DE003A), Integer($C8D75180), Integer($BFD06116),
+    Integer($21B4F4B5), Integer($56B3C423), Integer($CFBA9599), Integer($B8BDA50F),
+    Integer($2802B89E), Integer($5F058808), Integer($C60CD9B2), Integer($B10BE924),
+    Integer($2F6F7C87), Integer($58684C11), Integer($C1611DAB), Integer($B6662D3D),
+    Integer($76DC4190), Integer($01DB7106), Integer($98D220BC), Integer($EFD5102A),
+    Integer($71B18589), Integer($06B6B51F), Integer($9FBFE4A5), Integer($E8B8D433),
+    Integer($7807C9A2), Integer($0F00F934), Integer($9609A88E), Integer($E10E9818),
+    Integer($7F6A0DBB), Integer($086D3D2D), Integer($91646C97), Integer($E6635C01),
+    Integer($6B6B51F4), Integer($1C6C6162), Integer($856530D8), Integer($F262004E),
+    Integer($6C0695ED), Integer($1B01A57B), Integer($8208F4C1), Integer($F50FC457),
+    Integer($65B0D9C6), Integer($12B7E950), Integer($8BBEB8EA), Integer($FCB9887C),
+    Integer($62DD1DDF), Integer($15DA2D49), Integer($8CD37CF3), Integer($FBD44C65),
+    Integer($4DB26158), Integer($3AB551CE), Integer($A3BC0074), Integer($D4BB30E2),
+    Integer($4ADFA541), Integer($3DD895D7), Integer($A4D1C46D), Integer($D3D6F4FB),
+    Integer($4369E96A), Integer($346ED9FC), Integer($AD678846), Integer($DA60B8D0),
+    Integer($44042D73), Integer($33031DE5), Integer($AA0A4C5F), Integer($DD0D7CC9),
+    Integer($5005713C), Integer($270241AA), Integer($BE0B1010), Integer($C90C2086),
+    Integer($5768B525), Integer($206F85B3), Integer($B966D409), Integer($CE61E49F),
+    Integer($5EDEF90E), Integer($29D9C998), Integer($B0D09822), Integer($C7D7A8B4),
+    Integer($59B33D17), Integer($2EB40D81), Integer($B7BD5C3B), Integer($C0BA6CAD),
+    Integer($EDB88320), Integer($9ABFB3B6), Integer($03B6E20C), Integer($74B1D29A),
+    Integer($EAD54739), Integer($9DD277AF), Integer($04DB2615), Integer($73DC1683),
+    Integer($E3630B12), Integer($94643B84), Integer($0D6D6A3E), Integer($7A6A5AA8),
+    Integer($E40ECF0B), Integer($9309FF9D), Integer($0A00AE27), Integer($7D079EB1),
+    Integer($F00F9344), Integer($8708A3D2), Integer($1E01F268), Integer($6906C2FE),
+    Integer($F762575D), Integer($806567CB), Integer($196C3671), Integer($6E6B06E7),
+    Integer($FED41B76), Integer($89D32BE0), Integer($10DA7A5A), Integer($67DD4ACC),
+    Integer($F9B9DF6F), Integer($8EBEEFF9), Integer($17B7BE43), Integer($60B08ED5),
+    Integer($D6D6A3E8), Integer($A1D1937E), Integer($38D8C2C4), Integer($4FDFF252),
+    Integer($D1BB67F1), Integer($A6BC5767), Integer($3FB506DD), Integer($48B2364B),
+    Integer($D80D2BDA), Integer($AF0A1B4C), Integer($36034AF6), Integer($41047A60),
+    Integer($DF60EFC3), Integer($A867DF55), Integer($316E8EEF), Integer($4669BE79),
+    Integer($CB61B38C), Integer($BC66831A), Integer($256FD2A0), Integer($5268E236),
+    Integer($CC0C7795), Integer($BB0B4703), Integer($220216B9), Integer($5505262F),
+    Integer($C5BA3BBE), Integer($B2BD0B28), Integer($2BB45A92), Integer($5CB36A04),
+    Integer($C2D7FFA7), Integer($B5D0CF31), Integer($2CD99E8B), Integer($5BDEAE1D),
+    Integer($9B64C2B0), Integer($EC63F226), Integer($756AA39C), Integer($026D930A),
+    Integer($9C0906A9), Integer($EB0E363F), Integer($72076785), Integer($05005713),
+    Integer($95BF4A82), Integer($E2B87A14), Integer($7BB12BAE), Integer($0CB61B38),
+    Integer($92D28E9B), Integer($E5D5BE0D), Integer($7CDCEFB7), Integer($0BDBDF21),
+    Integer($86D3D2D4), Integer($F1D4E242), Integer($68DDB3F8), Integer($1FDA836E),
+    Integer($81BE16CD), Integer($F6B9265B), Integer($6FB077E1), Integer($18B74777),
+    Integer($88085AE6), Integer($FF0F6A70), Integer($66063BCA), Integer($11010B5C),
+    Integer($8F659EFF), Integer($F862AE69), Integer($616BFFD3), Integer($166CCF45),
+    Integer($A00AE278), Integer($D70DD2EE), Integer($4E048354), Integer($3903B3C2),
+    Integer($A7672661), Integer($D06016F7), Integer($4969474D), Integer($3E6E77DB),
+    Integer($AED16A4A), Integer($D9D65ADC), Integer($40DF0B66), Integer($37D83BF0),
+    Integer($A9BCAE53), Integer($DEBB9EC5), Integer($47B2CF7F), Integer($30B5FFE9),
+    Integer($BDBDF21C), Integer($CABAC28A), Integer($53B39330), Integer($24B4A3A6),
+    Integer($BAD03605), Integer($CDD70693), Integer($54DE5729), Integer($23D967BF),
+    Integer($B3667A2E), Integer($C4614AB8), Integer($5D681B02), Integer($2A6F2B94),
+    Integer($B40BBE37), Integer($C30C8EA1), Integer($5A05DF1B), Integer($2D02EF8D)
+    );
+
+  Crc16Tab: array[0..255] of Word = (
+    $0000, $1189, $2312, $329B, $4624, $57AD, $6536, $74BF,
+    $8C48, $9DC1, $AF5A, $BED3, $CA6C, $DBE5, $E97E, $F8F7,
+    $1081, $0108, $3393, $221A, $56A5, $472C, $75B7, $643E,
+    $9CC9, $8D40, $BFDB, $AE52, $DAED, $CB64, $F9FF, $E876,
+    $2102, $308B, $0210, $1399, $6726, $76AF, $4434, $55BD,
+    $AD4A, $BCC3, $8E58, $9FD1, $EB6E, $FAE7, $C87C, $D9F5,
+    $3183, $200A, $1291, $0318, $77A7, $662E, $54B5, $453C,
+    $BDCB, $AC42, $9ED9, $8F50, $FBEF, $EA66, $D8FD, $C974,
+    $4204, $538D, $6116, $709F, $0420, $15A9, $2732, $36BB,
+    $CE4C, $DFC5, $ED5E, $FCD7, $8868, $99E1, $AB7A, $BAF3,
+    $5285, $430C, $7197, $601E, $14A1, $0528, $37B3, $263A,
+    $DECD, $CF44, $FDDF, $EC56, $98E9, $8960, $BBFB, $AA72,
+    $6306, $728F, $4014, $519D, $2522, $34AB, $0630, $17B9,
+    $EF4E, $FEC7, $CC5C, $DDD5, $A96A, $B8E3, $8A78, $9BF1,
+    $7387, $620E, $5095, $411C, $35A3, $242A, $16B1, $0738,
+    $FFCF, $EE46, $DCDD, $CD54, $B9EB, $A862, $9AF9, $8B70,
+    $8408, $9581, $A71A, $B693, $C22C, $D3A5, $E13E, $F0B7,
+    $0840, $19C9, $2B52, $3ADB, $4E64, $5FED, $6D76, $7CFF,
+    $9489, $8500, $B79B, $A612, $D2AD, $C324, $F1BF, $E036,
+    $18C1, $0948, $3BD3, $2A5A, $5EE5, $4F6C, $7DF7, $6C7E,
+    $A50A, $B483, $8618, $9791, $E32E, $F2A7, $C03C, $D1B5,
+    $2942, $38CB, $0A50, $1BD9, $6F66, $7EEF, $4C74, $5DFD,
+    $B58B, $A402, $9699, $8710, $F3AF, $E226, $D0BD, $C134,
+    $39C3, $284A, $1AD1, $0B58, $7FE7, $6E6E, $5CF5, $4D7C,
+    $C60C, $D785, $E51E, $F497, $8028, $91A1, $A33A, $B2B3,
+    $4A44, $5BCD, $6956, $78DF, $0C60, $1DE9, $2F72, $3EFB,
+    $D68D, $C704, $F59F, $E416, $90A9, $8120, $B3BB, $A232,
+    $5AC5, $4B4C, $79D7, $685E, $1CE1, $0D68, $3FF3, $2E7A,
+    $E70E, $F687, $C41C, $D595, $A12A, $B0A3, $8238, $93B1,
+    $6B46, $7ACF, $4854, $59DD, $2D62, $3CEB, $0E70, $1FF9,
+    $F78F, $E606, $D49D, $C514, $B1AB, $A022, $92B9, $8330,
+    $7BC7, $6A4E, $58D5, $495C, $3DE3, $2C6A, $1EF1, $0F78
+    );
+
+procedure ArrByteToLong(var ArByte: Array of byte; var ArLong: Array of Integer);
+{$IFDEF CIL}
+var
+  n: integer;
+{$ENDIF}
+begin
+  if (High(ArByte) + 1) > ((High(ArLong) + 1) * 4) then
+    Exit;
+  {$IFDEF CIL}
+  for n := 0 to ((high(ArByte) + 1) div 4) - 1 do
+    ArLong[n] := ArByte[n * 4 + 0]
+      + (ArByte[n * 4 + 1] shl 8)
+      + (ArByte[n * 4 + 2] shl 16)
+      + (ArByte[n * 4 + 3] shl 24);
+  {$ELSE}
+  Move(ArByte[0], ArLong[0], High(ArByte) + 1);
+  {$ENDIF}
+end;
+
+procedure ArrLongToByte(var ArLong: Array of Integer; var ArByte: Array of byte);
+{$IFDEF CIL}
+var
+  n: integer;
+{$ENDIF}
+begin
+  if (High(ArByte) + 1) < ((High(ArLong) + 1) * 4) then
+    Exit;
+  {$IFDEF CIL}
+  for n := 0 to high(ArLong) do
+  begin
+    ArByte[n * 4 + 0] := ArLong[n] and $000000FF;
+    ArByte[n * 4 + 1] := (ArLong[n] shr 8) and $000000FF;
+    ArByte[n * 4 + 2] := (ArLong[n] shr 16) and $000000FF;
+    ArByte[n * 4 + 3] := (ArLong[n] shr 24) and $000000FF;
+  end;
+  {$ELSE}
+  Move(ArLong[0], ArByte[0], High(ArByte) + 1);
+  {$ENDIF}
+end;
+
+type
+  TMDCtx = record
+    State: array[0..3] of Integer;
+    Count: array[0..1] of Integer;
+    BufAnsiChar: array[0..63] of Byte;
+    BufLong: array[0..15] of Integer;
+  end;
+  TSHA1Ctx= record
+    Hi, Lo: integer;
+    Buffer: array[0..63] of byte;
+    Index: integer;
+    Hash: array[0..4] of Integer;
+    HashByte: array[0..19] of byte;
+  end;
+
+  TMDTransform = procedure(var Buf: array of LongInt; const Data: array of LongInt);
+
+{==============================================================================}
+
+function DecodeTriplet(const Value: AnsiString; Delimiter: AnsiChar): AnsiString;
+var
+  x, l, lv: Integer;
+  c: AnsiChar;
+  b: Byte;
+  bad: Boolean;
+begin
+  lv := Length(Value);
+  SetLength(Result, lv);
+  x := 1;
+  l := 1;
+  while x <= lv do
+  begin
+    c := Value[x];
+    Inc(x);
+    if c <> Delimiter then
+    begin
+      Result[l] := c;
+      Inc(l);
+    end
+    else
+      if x < lv then
+      begin
+        Case Value[x] Of
+          #13:
+            if (Value[x + 1] = #10) then
+              Inc(x, 2)
+            else
+              Inc(x);
+          #10:
+            if (Value[x + 1] = #13) then
+              Inc(x, 2)
+            else
+              Inc(x);
+        else
+          begin
+            bad := False;
+            Case Value[x] Of
+              '0'..'9': b := (Byte(Value[x]) - 48) Shl 4;
+              'a'..'f', 'A'..'F': b := ((Byte(Value[x]) And 7) + 9) shl 4;
+            else
+              begin
+                b := 0;
+                bad := True;
+              end;
+            end;
+            Case Value[x + 1] Of
+              '0'..'9': b := b Or (Byte(Value[x + 1]) - 48);
+              'a'..'f', 'A'..'F': b := b Or ((Byte(Value[x + 1]) And 7) + 9);
+            else
+              bad := True;
+            end;
+            if bad then
+            begin
+              Result[l] := c;
+              Inc(l);
+            end
+            else
+            begin
+              Inc(x, 2);
+              Result[l] := AnsiChar(b);
+              Inc(l);
+            end;
+          end;
+        end;
+      end
+      else
+        break;
+  end;
+  Dec(l);
+  SetLength(Result, l);
+end;
+
+{==============================================================================}
+
+function DecodeQuotedPrintable(const Value: AnsiString): AnsiString;
+begin
+  Result := DecodeTriplet(Value, '=');
+end;
+
+{==============================================================================}
+
+function DecodeURL(const Value: AnsiString): AnsiString;
+begin
+  Result := DecodeTriplet(Value, '%');
+end;
+
+{==============================================================================}
+
+function EncodeTriplet(const Value: AnsiString; Delimiter: AnsiChar;
+  Specials: TSpecials): AnsiString;
+var
+  n, l: Integer;
+  s: AnsiString;
+  c: AnsiChar;
+begin
+  SetLength(Result, Length(Value) * 3);
+  l := 1;
+  for n := 1 to Length(Value) do
+  begin
+    c := Value[n];
+    if c in Specials then
+    begin
+      Result[l] := Delimiter;
+      Inc(l);
+      s := IntToHex(Ord(c), 2);
+      Result[l] := s[1];
+      Inc(l);
+      Result[l] := s[2];
+      Inc(l);
+    end
+    else
+    begin
+      Result[l] := c;
+      Inc(l);
+    end;
+  end;
+  Dec(l);
+  SetLength(Result, l);
+end;
+
+{==============================================================================}
+
+function EncodeQuotedPrintable(const Value: AnsiString): AnsiString;
+begin
+  Result := EncodeTriplet(Value, '=',  ['='] + NonAsciiChar);
+end;
+
+{==============================================================================}
+
+function EncodeSafeQuotedPrintable(const Value: AnsiString): AnsiString;
+begin
+  Result := EncodeTriplet(Value, '=', SpecialChar + NonAsciiChar);
+end;
+
+{==============================================================================}
+
+function EncodeURLElement(const Value: AnsiString): AnsiString;
+begin
+  Result := EncodeTriplet(Value, '%', URLSpecialChar + URLFullSpecialChar);
+end;
+
+{==============================================================================}
+
+function EncodeURL(const Value: AnsiString): AnsiString;
+begin
+  Result := EncodeTriplet(Value, '%', URLSpecialChar);
+end;
+
+{==============================================================================}
+
+function Decode4to3(const Value, Table: AnsiString): AnsiString;
+var
+  x, y, n, l: Integer;
+  d: array[0..3] of Byte;
+begin
+  SetLength(Result, Length(Value));
+  x := 1;
+  l := 1;
+  while x <= Length(Value) do
+  begin
+    for n := 0 to 3 do
+    begin
+      if x > Length(Value) then
+        d[n] := 64
+      else
+      begin
+        y := Pos(Value[x], Table);
+        if y < 1 then
+          y := 1;
+        d[n] := y - 1;
+      end;
+      Inc(x);
+    end;
+    Result[l] := AnsiChar((D[0] and $3F) shl 2 + (D[1] and $30) shr 4);
+    Inc(l);
+    if d[2] <> 64 then
+    begin
+      Result[l] := AnsiChar((D[1] and $0F) shl 4 + (D[2] and $3C) shr 2);
+      Inc(l);
+      if d[3] <> 64 then
+      begin
+        Result[l] := AnsiChar((D[2] and $03) shl 6 + (D[3] and $3F));
+        Inc(l);
+      end;
+    end;
+  end;
+  Dec(l);
+  SetLength(Result, l);
+end;
+
+{==============================================================================}
+function Decode4to3Ex(const Value, Table: AnsiString): AnsiString;
+var
+  x, y, lv: Integer;
+  d: integer;
+  dl: integer;
+  c: byte;
+  p: integer;
+begin
+  lv := Length(Value);
+  SetLength(Result, lv);
+  x := 1;
+  dl := 4;
+  d := 0;
+  p := 1;
+  while x <= lv do
+  begin
+    y := Ord(Value[x]);
+    if y in [33..127] then
+      c := Ord(Table[y - 32])
+    else
+      c := 64;
+    Inc(x);
+    if c > 63 then
+      continue;
+    d := (d shl 6) or c;
+    dec(dl);
+    if dl <> 0 then
+      continue;
+    Result[p] := AnsiChar((d shr 16) and $ff);
+    inc(p);
+    Result[p] := AnsiChar((d shr 8) and $ff);
+    inc(p);
+    Result[p] := AnsiChar(d and $ff);
+    inc(p);
+    d := 0;
+    dl := 4;
+  end;
+  case dl of
+    1:
+      begin
+        d := d shr 2;
+        Result[p] := AnsiChar((d shr 8) and $ff);
+        inc(p);
+        Result[p] := AnsiChar(d and $ff);
+        inc(p);
+      end;
+    2:
+      begin
+        d := d shr 4;
+        Result[p] := AnsiChar(d and $ff);
+        inc(p);
+      end;
+  end;
+  SetLength(Result, p - 1);
+end;
+
+{==============================================================================}
+
+function Encode3to4(const Value, Table: AnsiString): AnsiString;
+var
+  c: Byte;
+  n, l: Integer;
+  Count: Integer;
+  DOut: array[0..3] of Byte;
+begin
+  setlength(Result, ((Length(Value) + 2) div 3) * 4);
+  l := 1;
+  Count := 1;
+  while Count <= Length(Value) do
+  begin
+    c := Ord(Value[Count]);
+    Inc(Count);
+    DOut[0] := (c and $FC) shr 2;
+    DOut[1] := (c and $03) shl 4;
+    if Count <= Length(Value) then
+    begin
+      c := Ord(Value[Count]);
+      Inc(Count);
+      DOut[1] := DOut[1] + (c and $F0) shr 4;
+      DOut[2] := (c and $0F) shl 2;
+      if Count <= Length(Value) then
+      begin
+        c := Ord(Value[Count]);
+        Inc(Count);
+        DOut[2] := DOut[2] + (c and $C0) shr 6;
+        DOut[3] := (c and $3F);
+      end
+      else
+      begin
+        DOut[3] := $40;
+      end;
+    end
+    else
+    begin
+      DOut[2] := $40;
+      DOut[3] := $40;
+    end;
+    for n := 0 to 3 do
+    begin
+      if (DOut[n] + 1) <= Length(Table) then
+      begin
+        Result[l] := Table[DOut[n] + 1];
+        Inc(l);
+      end;
+    end;
+  end;
+  SetLength(Result, l - 1);
+end;
+
+{==============================================================================}
+
+function DecodeBase64(const Value: AnsiString): AnsiString;
+begin
+  Result := Decode4to3Ex(Value, ReTableBase64);
+end;
+
+{==============================================================================}
+
+function EncodeBase64(const Value: AnsiString): AnsiString;
+begin
+  Result := Encode3to4(Value, TableBase64);
+end;
+
+{==============================================================================}
+
+function DecodeBase64mod(const Value: AnsiString): AnsiString;
+begin
+  Result := Decode4to3(Value, TableBase64mod);
+end;
+
+{==============================================================================}
+
+function EncodeBase64mod(const Value: AnsiString): AnsiString;
+begin
+  Result := Encode3to4(Value, TableBase64mod);
+end;
+
+{==============================================================================}
+
+function DecodeUU(const Value: AnsiString): AnsiString;
+var
+  s: AnsiString;
+  uut: AnsiString;
+  x: Integer;
+begin
+  Result := '';
+  uut := TableUU;
+  s := trim(UpperCase(Value));
+  if s = '' then Exit;
+  if Pos('BEGIN', s) = 1 then
+    Exit;
+  if Pos('END', s) = 1 then
+    Exit;
+  if Pos('TABLE', s) = 1 then
+    Exit; //ignore Table yet (set custom UUT)
+  //begin decoding
+  x := Pos(Value[1], uut) - 1;
+  case (x mod 3) of
+    0: x :=(x div 3)* 4;
+    1: x :=((x div 3) * 4) + 2;
+    2: x :=((x  div 3) * 4) + 3;
+  end;
+  //x - lenght UU line
+  s := Copy(Value, 2, x);
+  if s = '' then
+    Exit;
+  s := s + StringOfChar(' ', x - length(s));
+  Result := Decode4to3(s, uut);
+end;
+
+{==============================================================================}
+
+function EncodeUU(const Value: AnsiString): AnsiString;
+begin
+  Result := '';
+  if Length(Value) < Length(TableUU) then
+    Result := TableUU[Length(Value) + 1] + Encode3to4(Value, TableUU);
+end;
+
+{==============================================================================}
+
+function DecodeXX(const Value: AnsiString): AnsiString;
+var
+  s: AnsiString;
+  x: Integer;
+begin
+  Result := '';
+  s := trim(UpperCase(Value));
+  if s = '' then
+    Exit;
+  if Pos('BEGIN', s) = 1 then
+    Exit;
+  if Pos('END', s) = 1 then
+    Exit;
+  //begin decoding
+  x := Pos(Value[1], TableXX) - 1;
+  case (x mod 3) of
+    0: x :=(x div 3)* 4;
+    1: x :=((x div 3) * 4) + 2;
+    2: x :=((x  div 3) * 4) + 3;
+  end;
+  //x - lenght XX line
+  s := Copy(Value, 2, x);
+  if s = '' then
+    Exit;
+  s := s + StringOfChar(' ', x - length(s));
+  Result := Decode4to3(s, TableXX);
+end;
+
+{==============================================================================}
+
+function DecodeYEnc(const Value: AnsiString): AnsiString;
+var
+  C : Byte;
+  i: integer;
+begin
+  Result := '';
+  i := 1;
+  while i <= Length(Value) do
+  begin
+    c := Ord(Value[i]);
+    Inc(i);
+    if c = Ord('=') then
+    begin
+      c := Ord(Value[i]);
+      Inc(i);
+      Dec(c, 64);
+    end;
+    Dec(C, 42);
+    Result := Result + AnsiChar(C);
+  end;
+end;
+
+{==============================================================================}
+
+function UpdateCrc32(Value: Byte; Crc32: Integer): Integer;
+begin
+  Result := (Crc32 shr 8)
+    xor crc32tab[Byte(Value xor (Crc32 and Integer($000000FF)))];
+end;
+
+{==============================================================================}
+
+function Crc32(const Value: AnsiString): Integer;
+var
+  n: Integer;
+begin
+  Result := Integer($FFFFFFFF);
+  for n := 1 to Length(Value) do
+    Result := UpdateCrc32(Ord(Value[n]), Result);
+  Result := not Result;
+end;
+
+{==============================================================================}
+
+function UpdateCrc16(Value: Byte; Crc16: Word): Word;
+begin
+  Result := ((Crc16 shr 8) and $00FF) xor
+    crc16tab[Byte(Crc16 xor (Word(Value)) and $00FF)];
+end;
+
+{==============================================================================}
+
+function Crc16(const Value: AnsiString): Word;
+var
+  n: Integer;
+begin
+  Result := $FFFF;
+  for n := 1 to Length(Value) do
+    Result := UpdateCrc16(Ord(Value[n]), Result);
+end;
+
+{==============================================================================}
+
+procedure MDInit(var MDContext: TMDCtx);
+var
+  n: integer;
+begin
+  MDContext.Count[0] := 0;
+  MDContext.Count[1] := 0;
+  for n := 0 to high(MDContext.BufAnsiChar) do
+    MDContext.BufAnsiChar[n] := 0;
+  for n := 0 to high(MDContext.BufLong) do
+    MDContext.BufLong[n] := 0;
+  MDContext.State[0] := Integer($67452301);
+  MDContext.State[1] := Integer($EFCDAB89);
+  MDContext.State[2] := Integer($98BADCFE);
+  MDContext.State[3] := Integer($10325476);
+end;
+
+procedure MD5Transform(var Buf: array of LongInt; const Data: array of LongInt);
+var
+  A, B, C, D: LongInt;
+
+  procedure Round1(var W: LongInt; X, Y, Z, Data: LongInt; S: Byte);
+  begin
+    Inc(W, (Z xor (X and (Y xor Z))) + Data);
+    W := (W shl S) or (W shr (32 - S));
+    Inc(W, X);
+  end;
+
+  procedure Round2(var W: LongInt; X, Y, Z, Data: LongInt; S: Byte);
+  begin
+    Inc(W, (Y xor (Z and (X xor Y))) + Data);
+    W := (W shl S) or (W shr (32 - S));
+    Inc(W, X);
+  end;
+
+  procedure Round3(var W: LongInt; X, Y, Z, Data: LongInt; S: Byte);
+  begin
+    Inc(W, (X xor Y xor Z) + Data);
+    W := (W shl S) or (W shr (32 - S));
+    Inc(W, X);
+  end;
+
+  procedure Round4(var W: LongInt; X, Y, Z, Data: LongInt; S: Byte);
+  begin
+    Inc(W, (Y xor (X or not Z)) + Data);
+    W := (W shl S) or (W shr (32 - S));
+    Inc(W, X);
+  end;
+begin
+  A := Buf[0];
+  B := Buf[1];
+  C := Buf[2];
+  D := Buf[3];
+
+  Round1(A, B, C, D, Data[0] + Longint($D76AA478), 7);
+  Round1(D, A, B, C, Data[1] + Longint($E8C7B756), 12);
+  Round1(C, D, A, B, Data[2] + Longint($242070DB), 17);
+  Round1(B, C, D, A, Data[3] + Longint($C1BDCEEE), 22);
+  Round1(A, B, C, D, Data[4] + Longint($F57C0FAF), 7);
+  Round1(D, A, B, C, Data[5] + Longint($4787C62A), 12);
+  Round1(C, D, A, B, Data[6] + Longint($A8304613), 17);
+  Round1(B, C, D, A, Data[7] + Longint($FD469501), 22);
+  Round1(A, B, C, D, Data[8] + Longint($698098D8), 7);
+  Round1(D, A, B, C, Data[9] + Longint($8B44F7AF), 12);
+  Round1(C, D, A, B, Data[10] + Longint($FFFF5BB1), 17);
+  Round1(B, C, D, A, Data[11] + Longint($895CD7BE), 22);
+  Round1(A, B, C, D, Data[12] + Longint($6B901122), 7);
+  Round1(D, A, B, C, Data[13] + Longint($FD987193), 12);
+  Round1(C, D, A, B, Data[14] + Longint($A679438E), 17);
+  Round1(B, C, D, A, Data[15] + Longint($49B40821), 22);
+
+  Round2(A, B, C, D, Data[1] + Longint($F61E2562), 5);
+  Round2(D, A, B, C, Data[6] + Longint($C040B340), 9);
+  Round2(C, D, A, B, Data[11] + Longint($265E5A51), 14);
+  Round2(B, C, D, A, Data[0] + Longint($E9B6C7AA), 20);
+  Round2(A, B, C, D, Data[5] + Longint($D62F105D), 5);
+  Round2(D, A, B, C, Data[10] + Longint($02441453), 9);
+  Round2(C, D, A, B, Data[15] + Longint($D8A1E681), 14);
+  Round2(B, C, D, A, Data[4] + Longint($E7D3FBC8), 20);
+  Round2(A, B, C, D, Data[9] + Longint($21E1CDE6), 5);
+  Round2(D, A, B, C, Data[14] + Longint($C33707D6), 9);
+  Round2(C, D, A, B, Data[3] + Longint($F4D50D87), 14);
+  Round2(B, C, D, A, Data[8] + Longint($455A14ED), 20);
+  Round2(A, B, C, D, Data[13] + Longint($A9E3E905), 5);
+  Round2(D, A, B, C, Data[2] + Longint($FCEFA3F8), 9);
+  Round2(C, D, A, B, Data[7] + Longint($676F02D9), 14);
+  Round2(B, C, D, A, Data[12] + Longint($8D2A4C8A), 20);
+
+  Round3(A, B, C, D, Data[5] + Longint($FFFA3942), 4);
+  Round3(D, A, B, C, Data[8] + Longint($8771F681), 11);
+  Round3(C, D, A, B, Data[11] + Longint($6D9D6122), 16);
+  Round3(B, C, D, A, Data[14] + Longint($FDE5380C), 23);
+  Round3(A, B, C, D, Data[1] + Longint($A4BEEA44), 4);
+  Round3(D, A, B, C, Data[4] + Longint($4BDECFA9), 11);
+  Round3(C, D, A, B, Data[7] + Longint($F6BB4B60), 16);
+  Round3(B, C, D, A, Data[10] + Longint($BEBFBC70), 23);
+  Round3(A, B, C, D, Data[13] + Longint($289B7EC6), 4);
+  Round3(D, A, B, C, Data[0] + Longint($EAA127FA), 11);
+  Round3(C, D, A, B, Data[3] + Longint($D4EF3085), 16);
+  Round3(B, C, D, A, Data[6] + Longint($04881D05), 23);
+  Round3(A, B, C, D, Data[9] + Longint($D9D4D039), 4);
+  Round3(D, A, B, C, Data[12] + Longint($E6DB99E5), 11);
+  Round3(C, D, A, B, Data[15] + Longint($1FA27CF8), 16);
+  Round3(B, C, D, A, Data[2] + Longint($C4AC5665), 23);
+
+  Round4(A, B, C, D, Data[0] + Longint($F4292244), 6);
+  Round4(D, A, B, C, Data[7] + Longint($432AFF97), 10);
+  Round4(C, D, A, B, Data[14] + Longint($AB9423A7), 15);
+  Round4(B, C, D, A, Data[5] + Longint($FC93A039), 21);
+  Round4(A, B, C, D, Data[12] + Longint($655B59C3), 6);
+  Round4(D, A, B, C, Data[3] + Longint($8F0CCC92), 10);
+  Round4(C, D, A, B, Data[10] + Longint($FFEFF47D), 15);
+  Round4(B, C, D, A, Data[1] + Longint($85845DD1), 21);
+  Round4(A, B, C, D, Data[8] + Longint($6FA87E4F), 6);
+  Round4(D, A, B, C, Data[15] + Longint($FE2CE6E0), 10);
+  Round4(C, D, A, B, Data[6] + Longint($A3014314), 15);
+  Round4(B, C, D, A, Data[13] + Longint($4E0811A1), 21);
+  Round4(A, B, C, D, Data[4] + Longint($F7537E82), 6);
+  Round4(D, A, B, C, Data[11] + Longint($BD3AF235), 10);
+  Round4(C, D, A, B, Data[2] + Longint($2AD7D2BB), 15);
+  Round4(B, C, D, A, Data[9] + Longint($EB86D391), 21);
+
+  Inc(Buf[0], A);
+  Inc(Buf[1], B);
+  Inc(Buf[2], C);
+  Inc(Buf[3], D);
+end;
+
+//fixed by James McAdams
+procedure MDUpdate(var MDContext: TMDCtx; const Data: AnsiString; transform: TMDTransform);
+var
+  Index, partLen, InputLen, I: integer;
+{$IFDEF CIL}
+  n: integer;
+{$ENDIF}
+begin
+  InputLen := Length(Data);
+  with MDContext do
+  begin
+    Index := (Count[0] shr 3) and $3F;
+    Inc(Count[0], InputLen shl 3);
+    if Count[0] < (InputLen shl 3) then
+      Inc(Count[1]);
+    Inc(Count[1], InputLen shr 29);
+    partLen := 64 - Index;
+    if InputLen >= partLen then
+    begin
+      ArrLongToByte(BufLong, BufAnsiChar);
+      {$IFDEF CIL}
+      for n := 1 to partLen do
+        BufAnsiChar[index - 1 + n] := Ord(Data[n]);
+      {$ELSE}
+      Move(Data[1], BufAnsiChar[Index], partLen);
+      {$ENDIF}
+      ArrByteToLong(BufAnsiChar, BufLong);
+      Transform(State, Buflong);
+      I := partLen;
+  		while I + 63 < InputLen do
+      begin
+        ArrLongToByte(BufLong, BufAnsiChar);
+        {$IFDEF CIL}
+        for n := 1 to 64 do
+          BufAnsiChar[n - 1] := Ord(Data[i + n]);
+        {$ELSE}
+        Move(Data[I+1], BufAnsiChar, 64);
+        {$ENDIF}
+        ArrByteToLong(BufAnsiChar, BufLong);
+        Transform(State, Buflong);
+	  	  inc(I, 64);
+		  end;
+      Index := 0;
+    end
+    else
+      I := 0;
+    ArrLongToByte(BufLong, BufAnsiChar);
+    {$IFDEF CIL}
+    for n := 1 to InputLen-I do
+      BufAnsiChar[Index + n - 1] := Ord(Data[i + n]);
+    {$ELSE}
+    Move(Data[I+1], BufAnsiChar[Index], InputLen-I);
+    {$ENDIF}
+    ArrByteToLong(BufAnsiChar, BufLong);
+  end
+end;
+
+function MDFinal(var MDContext: TMDCtx; transform: TMDTransform): AnsiString;
+var
+  Cnt: Word;
+  P: Byte;
+  digest: array[0..15] of Byte;
+  i: Integer;
+  n: integer;
+begin
+  for I := 0 to 15 do
+    Digest[I] := I + 1;
+  with MDContext do
+  begin
+    Cnt := (Count[0] shr 3) and $3F;
+    P := Cnt;
+    BufAnsiChar[P] := $80;
+    Inc(P);
+    Cnt := 64 - 1 - Cnt;
+    if Cnt < 8 then
+    begin
+      for n := 0 to cnt - 1 do
+        BufAnsiChar[P + n] := 0;
+      ArrByteToLong(BufAnsiChar, BufLong);
+//      FillChar(BufAnsiChar[P], Cnt, #0);
+      Transform(State, BufLong);
+      ArrLongToByte(BufLong, BufAnsiChar);
+      for n := 0 to 55 do
+        BufAnsiChar[n] := 0;
+      ArrByteToLong(BufAnsiChar, BufLong);
+//      FillChar(BufAnsiChar, 56, #0);
+    end
+    else
+    begin
+      for n := 0 to Cnt - 8 - 1 do
+        BufAnsiChar[p + n] := 0;
+      ArrByteToLong(BufAnsiChar, BufLong);
+//      FillChar(BufAnsiChar[P], Cnt - 8, #0);
+    end;
+    BufLong[14] := Count[0];
+    BufLong[15] := Count[1];
+    Transform(State, BufLong);
+    ArrLongToByte(State, Digest);
+//    Move(State, Digest, 16);
+    Result := '';
+    for i := 0 to 15 do
+      Result := Result + AnsiChar(digest[i]);
+  end;
+//  FillChar(MD5Context, SizeOf(TMD5Ctx), #0)
+end;
+
+{==============================================================================}
+
+function MD5(const Value: AnsiString): AnsiString;
+var
+  MDContext: TMDCtx;
+begin
+  MDInit(MDContext);
+  MDUpdate(MDContext, Value, @MD5Transform);
+  Result := MDFinal(MDContext, @MD5Transform);
+end;
+
+{==============================================================================}
+
+function HMAC_MD5(Text, Key: AnsiString): AnsiString;
+var
+  ipad, opad, s: AnsiString;
+  n: Integer;
+  MDContext: TMDCtx;
+begin
+  if Length(Key) > 64 then
+    Key := md5(Key);
+  ipad := StringOfChar(#$36, 64);
+  opad := StringOfChar(#$5C, 64);
+  for n := 1 to Length(Key) do
+  begin
+    ipad[n] := AnsiChar(Byte(ipad[n]) xor Byte(Key[n]));
+    opad[n] := AnsiChar(Byte(opad[n]) xor Byte(Key[n]));
+  end;
+  MDInit(MDContext);
+  MDUpdate(MDContext, ipad, @MD5Transform);
+  MDUpdate(MDContext, Text, @MD5Transform);
+  s := MDFinal(MDContext, @MD5Transform);
+  MDInit(MDContext);
+  MDUpdate(MDContext, opad, @MD5Transform);
+  MDUpdate(MDContext, s, @MD5Transform);
+  Result := MDFinal(MDContext, @MD5Transform);
+end;
+
+{==============================================================================}
+
+function MD5LongHash(const Value: AnsiString; Len: integer): AnsiString;
+var
+  cnt, rest: integer;
+  l: integer;
+  n: integer;
+  MDContext: TMDCtx;
+begin
+  l := length(Value);
+  cnt := Len div l;
+  rest := Len mod l;
+  MDInit(MDContext);
+  for n := 1 to cnt do
+    MDUpdate(MDContext, Value, @MD5Transform);
+  if rest > 0 then
+    MDUpdate(MDContext, Copy(Value, 1, rest), @MD5Transform);
+  Result := MDFinal(MDContext, @MD5Transform);
+end;
+
+{==============================================================================}
+// SHA1 is based on sources by Dave Barton (davebarton@bigfoot.com)
+
+procedure SHA1init( var SHA1Context: TSHA1Ctx );
+var
+  n: integer;
+begin
+  SHA1Context.Hi := 0;
+  SHA1Context.Lo := 0;
+  SHA1Context.Index := 0;
+  for n := 0 to High(SHA1Context.Buffer) do
+    SHA1Context.Buffer[n] := 0;
+  for n := 0 to High(SHA1Context.HashByte) do
+    SHA1Context.HashByte[n] := 0;
+//  FillChar(SHA1Context, SizeOf(TSHA1Ctx), #0);
+  SHA1Context.Hash[0] := integer($67452301);
+  SHA1Context.Hash[1] := integer($EFCDAB89);
+  SHA1Context.Hash[2] := integer($98BADCFE);
+  SHA1Context.Hash[3] := integer($10325476);
+  SHA1Context.Hash[4] := integer($C3D2E1F0);
+end;
+
+//******************************************************************************
+function RB(A: integer): integer;
+begin
+  Result := (A shr 24) or ((A shr 8) and $FF00) or ((A shl 8) and $FF0000) or (A shl 24);
+end;
+
+procedure SHA1Compress(var Data: TSHA1Ctx);
+var
+  A, B, C, D, E, T: integer;
+  W: array[0..79] of integer;
+  i: integer;
+  n: integer;
+
+  function F1(x, y, z: integer): integer;
+  begin
+    Result := z xor (x and (y xor z));
+  end;
+  function F2(x, y, z: integer): integer;
+  begin
+    Result := x xor y xor z;
+  end;
+  function F3(x, y, z: integer): integer;
+  begin
+    Result := (x and y) or (z and (x or y));
+  end;
+  function LRot32(X: integer; c: integer): integer;
+  begin
+    result := (x shl c) or (x shr (32 - c));
+  end;
+begin
+  ArrByteToLong(Data.Buffer, W);
+//  Move(Data.Buffer, W, Sizeof(Data.Buffer));
+  for i := 0 to 15 do
+    W[i] := RB(W[i]);
+  for i := 16 to 79 do
+    W[i] := LRot32(W[i-3] xor W[i-8] xor W[i-14] xor W[i-16], 1);
+  A := Data.Hash[0];
+  B := Data.Hash[1];
+  C := Data.Hash[2];
+  D := Data.Hash[3];
+  E := Data.Hash[4];
+  for i := 0 to 19 do
+  begin
+    T := LRot32(A, 5) + F1(B, C, D) + E + W[i] + integer($5A827999);
+    E := D;
+    D := C;
+    C := LRot32(B, 30);
+    B := A;
+    A := T;
+  end;
+  for i := 20 to 39 do
+  begin
+    T := LRot32(A, 5) + F2(B, C, D) + E + W[i] + integer($6ED9EBA1);
+    E := D;
+    D := C;
+    C := LRot32(B, 30);
+    B := A;
+    A := T;
+  end;
+  for i := 40 to 59 do
+  begin
+    T := LRot32(A, 5) + F3(B, C, D) + E + W[i] + integer($8F1BBCDC);
+    E := D;
+    D := C;
+    C := LRot32(B, 30);
+    B := A;
+    A := T;
+  end;
+  for i := 60 to 79 do
+  begin
+    T := LRot32(A, 5) + F2(B, C, D) + E + W[i] + integer($CA62C1D6);
+    E := D;
+    D := C;
+    C := LRot32(B, 30);
+    B := A;
+    A := T;
+  end;
+  Data.Hash[0] := Data.Hash[0] + A;
+  Data.Hash[1] := Data.Hash[1] + B;
+  Data.Hash[2] := Data.Hash[2] + C;
+  Data.Hash[3] := Data.Hash[3] + D;
+  Data.Hash[4] := Data.Hash[4] + E;
+  for n := 0 to high(w) do
+    w[n] := 0;
+//  FillChar(W, Sizeof(W), 0);
+  for n := 0 to high(Data.Buffer) do
+    Data.Buffer[n] := 0;
+//  FillChar(Data.Buffer, Sizeof(Data.Buffer), 0);
+end;
+
+//******************************************************************************
+procedure SHA1Update(var Context: TSHA1Ctx; const Data: AnsiString);
+var
+  Len: integer;
+  n: integer;
+  i, k: integer;
+begin
+  Len := Length(data);
+  for k := 0 to 7 do
+  begin
+    i := Context.Lo;
+    Inc(Context.Lo, Len);
+    if Context.Lo < i then
+      Inc(Context.Hi);
+  end;
+  for n := 1 to len do
+  begin
+    Context.Buffer[Context.Index] := byte(Data[n]);
+    Inc(Context.Index);
+    if Context.Index = 64 then
+    begin
+      Context.Index := 0;
+      SHA1Compress(Context);
+    end;
+  end;
+end;
+
+//******************************************************************************
+function SHA1Final(var Context: TSHA1Ctx): AnsiString;
+type
+  Pinteger = ^integer;
+var
+  i: integer;
+  procedure ItoArr(var Ar: Array of byte; I, value: Integer);
+  begin
+    Ar[i + 0] := Value and $000000FF;
+    Ar[i + 1] := (Value shr 8) and $000000FF;
+    Ar[i + 2] := (Value shr 16) and $000000FF;
+    Ar[i + 3] := (Value shr 24) and $000000FF;
+  end;
+begin
+  Context.Buffer[Context.Index] := $80;
+  if Context.Index >= 56 then
+    SHA1Compress(Context);
+  ItoArr(Context.Buffer, 56, RB(Context.Hi));
+  ItoArr(Context.Buffer, 60, RB(Context.Lo));
+//  Pinteger(@Context.Buffer[56])^ := RB(Context.Hi);
+//  Pinteger(@Context.Buffer[60])^ := RB(Context.Lo);
+  SHA1Compress(Context);
+  Context.Hash[0] := RB(Context.Hash[0]);
+  Context.Hash[1] := RB(Context.Hash[1]);
+  Context.Hash[2] := RB(Context.Hash[2]);
+  Context.Hash[3] := RB(Context.Hash[3]);
+  Context.Hash[4] := RB(Context.Hash[4]);
+  ArrLongToByte(Context.Hash, Context.HashByte);
+  Result := '';
+  for i := 0 to 19 do
+    Result := Result + AnsiChar(Context.HashByte[i]);
+end;
+
+function SHA1(const Value: AnsiString): AnsiString;
+var
+  SHA1Context: TSHA1Ctx;
+begin
+  SHA1Init(SHA1Context);
+  SHA1Update(SHA1Context, Value);
+  Result := SHA1Final(SHA1Context);
+end;
+
+{==============================================================================}
+
+function HMAC_SHA1(Text, Key: AnsiString): AnsiString;
+var
+  ipad, opad, s: AnsiString;
+  n: Integer;
+  SHA1Context: TSHA1Ctx;
+begin
+  if Length(Key) > 64 then
+    Key := SHA1(Key);
+  ipad := StringOfChar(#$36, 64);
+  opad := StringOfChar(#$5C, 64);
+  for n := 1 to Length(Key) do
+  begin
+    ipad[n] := AnsiChar(Byte(ipad[n]) xor Byte(Key[n]));
+    opad[n] := AnsiChar(Byte(opad[n]) xor Byte(Key[n]));
+  end;
+  SHA1Init(SHA1Context);
+  SHA1Update(SHA1Context, ipad);
+  SHA1Update(SHA1Context, Text);
+  s := SHA1Final(SHA1Context);
+  SHA1Init(SHA1Context);
+  SHA1Update(SHA1Context, opad);
+  SHA1Update(SHA1Context, s);
+  Result := SHA1Final(SHA1Context);
+end;
+
+{==============================================================================}
+
+function SHA1LongHash(const Value: AnsiString; Len: integer): AnsiString;
+var
+  cnt, rest: integer;
+  l: integer;
+  n: integer;
+  SHA1Context: TSHA1Ctx;
+begin
+  l := length(Value);
+  cnt := Len div l;
+  rest := Len mod l;
+  SHA1Init(SHA1Context);
+  for n := 1 to cnt do
+    SHA1Update(SHA1Context, Value);
+  if rest > 0 then
+    SHA1Update(SHA1Context, Copy(Value, 1, rest));
+  Result := SHA1Final(SHA1Context);
+end;
+
+{==============================================================================}
+
+procedure MD4Transform(var Buf: array of LongInt; const Data: array of LongInt);
+var
+  A, B, C, D: LongInt;
+  function LRot32(a, b: longint): longint;
+  begin
+    Result:= (a shl b) or (a shr (32 - b));
+  end;
+begin
+  A := Buf[0];
+  B := Buf[1];
+  C := Buf[2];
+  D := Buf[3];
+
+  A:= LRot32(A + (D xor (B and (C xor D))) + Data[ 0], 3);
+  D:= LRot32(D + (C xor (A and (B xor C))) + Data[ 1], 7);
+  C:= LRot32(C + (B xor (D and (A xor B))) + Data[ 2], 11);
+  B:= LRot32(B + (A xor (C and (D xor A))) + Data[ 3], 19);
+  A:= LRot32(A + (D xor (B and (C xor D))) + Data[ 4], 3);
+  D:= LRot32(D + (C xor (A and (B xor C))) + Data[ 5], 7);
+  C:= LRot32(C + (B xor (D and (A xor B))) + Data[ 6], 11);
+  B:= LRot32(B + (A xor (C and (D xor A))) + Data[ 7], 19);
+  A:= LRot32(A + (D xor (B and (C xor D))) + Data[ 8], 3);
+  D:= LRot32(D + (C xor (A and (B xor C))) + Data[ 9], 7);
+  C:= LRot32(C + (B xor (D and (A xor B))) + Data[10], 11);
+  B:= LRot32(B + (A xor (C and (D xor A))) + Data[11], 19);
+  A:= LRot32(A + (D xor (B and (C xor D))) + Data[12], 3);
+  D:= LRot32(D + (C xor (A and (B xor C))) + Data[13], 7);
+  C:= LRot32(C + (B xor (D and (A xor B))) + Data[14], 11);
+  B:= LRot32(B + (A xor (C and (D xor A))) + Data[15], 19);
+
+  A:= LRot32(A + ((B and C) or (B and D) or (C and D)) + Data[ 0] + longint($5a827999), 3);
+  D:= LRot32(D + ((A and B) or (A and C) or (B and C)) + Data[ 4] + longint($5a827999), 5);
+  C:= LRot32(C + ((D and A) or (D and B) or (A and B)) + Data[ 8] + longint($5a827999), 9);
+  B:= LRot32(B + ((C and D) or (C and A) or (D and A)) + Data[12] + longint($5a827999), 13);
+  A:= LRot32(A + ((B and C) or (B and D) or (C and D)) + Data[ 1] + longint($5a827999), 3);
+  D:= LRot32(D + ((A and B) or (A and C) or (B and C)) + Data[ 5] + longint($5a827999), 5);
+  C:= LRot32(C + ((D and A) or (D and B) or (A and B)) + Data[ 9] + longint($5a827999), 9);
+  B:= LRot32(B + ((C and D) or (C and A) or (D and A)) + Data[13] + longint($5a827999), 13);
+  A:= LRot32(A + ((B and C) or (B and D) or (C and D)) + Data[ 2] + longint($5a827999), 3);
+  D:= LRot32(D + ((A and B) or (A and C) or (B and C)) + Data[ 6] + longint($5a827999), 5);
+  C:= LRot32(C + ((D and A) or (D and B) or (A and B)) + Data[10] + longint($5a827999), 9);
+  B:= LRot32(B + ((C and D) or (C and A) or (D and A)) + Data[14] + longint($5a827999), 13);
+  A:= LRot32(A + ((B and C) or (B and D) or (C and D)) + Data[ 3] + longint($5a827999), 3);
+  D:= LRot32(D + ((A and B) or (A and C) or (B and C)) + Data[ 7] + longint($5a827999), 5);
+  C:= LRot32(C + ((D and A) or (D and B) or (A and B)) + Data[11] + longint($5a827999), 9);
+  B:= LRot32(B + ((C and D) or (C and A) or (D and A)) + Data[15] + longint($5a827999), 13);
+
+  A:= LRot32(A + (B xor C xor D) + Data[ 0] + longint($6ed9eba1), 3);
+  D:= LRot32(D + (A xor B xor C) + Data[ 8] + longint($6ed9eba1), 9);
+  C:= LRot32(C + (D xor A xor B) + Data[ 4] + longint($6ed9eba1), 11);
+  B:= LRot32(B + (C xor D xor A) + Data[12] + longint($6ed9eba1), 15);
+  A:= LRot32(A + (B xor C xor D) + Data[ 2] + longint($6ed9eba1), 3);
+  D:= LRot32(D + (A xor B xor C) + Data[10] + longint($6ed9eba1), 9);
+  C:= LRot32(C + (D xor A xor B) + Data[ 6] + longint($6ed9eba1), 11);
+  B:= LRot32(B + (C xor D xor A) + Data[14] + longint($6ed9eba1), 15);
+  A:= LRot32(A + (B xor C xor D) + Data[ 1] + longint($6ed9eba1), 3);
+  D:= LRot32(D + (A xor B xor C) + Data[ 9] + longint($6ed9eba1), 9);
+  C:= LRot32(C + (D xor A xor B) + Data[ 5] + longint($6ed9eba1), 11);
+  B:= LRot32(B + (C xor D xor A) + Data[13] + longint($6ed9eba1), 15);
+  A:= LRot32(A + (B xor C xor D) + Data[ 3] + longint($6ed9eba1), 3);
+  D:= LRot32(D + (A xor B xor C) + Data[11] + longint($6ed9eba1), 9);
+  C:= LRot32(C + (D xor A xor B) + Data[ 7] + longint($6ed9eba1), 11);
+  B:= LRot32(B + (C xor D xor A) + Data[15] + longint($6ed9eba1), 15);
+
+  Inc(Buf[0], A);
+  Inc(Buf[1], B);
+  Inc(Buf[2], C);
+  Inc(Buf[3], D);
+end;
+
+{==============================================================================}
+
+function MD4(const Value: AnsiString): AnsiString;
+var
+  MDContext: TMDCtx;
+begin
+  MDInit(MDContext);
+  MDUpdate(MDContext, Value, @MD4Transform);
+  Result := MDFinal(MDContext, @MD4Transform);
+end;
+
+{==============================================================================}
+
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/Synapse/synafpc.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/Synapse/synafpc.pas
new file mode 100644
index 0000000..f3985b8
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/Synapse/synafpc.pas	
@@ -0,0 +1,132 @@
+{$IFDEF WIN64}{$DEFINE WIN32}{$ENDIF}
+{==============================================================================|
+| Project : Ararat Synapse                                       | 001.001.000 |
+|==============================================================================|
+| Content: Utils for FreePascal compatibility                                  |
+|==============================================================================|
+| Copyright (c)1999-2006, Lukas Gebauer                                        |
+| All rights reserved.                                                         |
+|                                                                              |
+| Redistribution and use in source and binary forms, with or without           |
+| modification, are permitted provided that the following conditions are met:  |
+|                                                                              |
+| Redistributions of source code must retain the above copyright notice, this  |
+| list of conditions and the following disclaimer.                             |
+|                                                                              |
+| Redistributions in binary form must reproduce the above copyright notice,    |
+| this list of conditions and the following disclaimer in the documentation    |
+| and/or other materials provided with the distribution.                       |
+|                                                                              |
+| Neither the name of Lukas Gebauer nor the names of its contributors may      |
+| be used to endorse or promote products derived from this software without    |
+| specific prior written permission.                                           |
+|                                                                              |
+| THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"  |
+| AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE    |
+| IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE   |
+| ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE FOR  |
+| ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL       |
+| DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR   |
+| SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER   |
+| CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT           |
+| LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY    |
+| OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH  |
+| DAMAGE.                                                                      |
+|==============================================================================|
+| The Initial Developer of the Original Code is Lukas Gebauer (Czech Republic).|
+| Portions created by Lukas Gebauer are Copyright (c)2003-2006.                |
+| All Rights Reserved.                                                         |
+|==============================================================================|
+| Contributor(s):                                                              |
+|==============================================================================|
+| History: see HISTORY.HTM from distribution package                           |
+|          (Found at URL: http://www.ararat.cz/synapse/)                       |
+|==============================================================================}
+
+{:@exclude}
+
+{$IFDEF FPC}
+  {$MODE DELPHI}
+{$ENDIF}
+{$H+}
+
+unit synafpc;
+
+interface
+
+uses
+{$IFDEF FPC}
+  dynlibs, sysutils;
+{$ELSE}
+  {$IFDEF WIN32}
+  Windows;
+  {$ELSE}
+  Sysutils;
+  {$ENDIF}
+{$ENDIF}
+
+{$IFDEF FPC}
+type
+  TLibHandle = dynlibs.TLibHandle;
+  
+function LoadLibrary(ModuleName: PChar): TLibHandle;
+function FreeLibrary(Module: TLibHandle): LongBool;
+function GetProcAddress(Module: TLibHandle; Proc: PChar): Pointer;
+function GetModuleFileName(Module: TLibHandle; Buffer: PChar; BufLen: Integer): Integer;
+{$ELSE}
+type
+  {$IFDEF CIL}
+  TLibHandle = Integer;
+  {$ELSE}
+  TLibHandle = HModule;
+  {$ENDIF}
+  {$IFDEF VER100}
+  LongWord = DWord;
+  {$ENDIF}
+{$ENDIF}
+
+procedure Sleep(milliseconds: Cardinal);
+
+
+implementation
+
+{==============================================================================}
+{$IFDEF FPC}
+function LoadLibrary(ModuleName: PChar): TLibHandle;
+begin
+  Result := dynlibs.LoadLibrary(Modulename);
+end;
+
+function FreeLibrary(Module: TLibHandle): LongBool;
+begin
+  Result := dynlibs.UnloadLibrary(Module);
+end;
+
+function GetProcAddress(Module: TLibHandle; Proc: PChar): Pointer;
+begin
+  Result := dynlibs.GetProcedureAddress(Module, Proc);
+end;
+
+function GetModuleFileName(Module: TLibHandle; Buffer: PChar; BufLen: Integer): Integer;
+begin
+  Result := 0;
+end;
+
+{$ELSE}
+{$ENDIF}
+
+procedure Sleep(milliseconds: Cardinal);
+begin
+{$IFDEF WIN32}
+  {$IFDEF FPC}
+  sysutils.sleep(milliseconds);
+  {$ELSE}
+  windows.sleep(milliseconds);
+  {$ENDIF}
+{$ELSE}
+  sysutils.sleep(milliseconds);
+{$ENDIF}
+
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/Synapse/synaip.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/Synapse/synaip.pas
new file mode 100644
index 0000000..f365a6f
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/Synapse/synaip.pas	
@@ -0,0 +1,397 @@
+{==============================================================================|
+| Project : Ararat Synapse                                       | 001.000.002 |
+|==============================================================================|
+| Content: IP address support procedures and functions                         |
+|==============================================================================|
+| Copyright (c)2006, Lukas Gebauer                                             |
+| All rights reserved.                                                         |
+|                                                                              |
+| Redistribution and use in source and binary forms, with or without           |
+| modification, are permitted provided that the following conditions are met:  |
+|                                                                              |
+| Redistributions of source code must retain the above copyright notice, this  |
+| list of conditions and the following disclaimer.                             |
+|                                                                              |
+| Redistributions in binary form must reproduce the above copyright notice,    |
+| this list of conditions and the following disclaimer in the documentation    |
+| and/or other materials provided with the distribution.                       |
+|                                                                              |
+| Neither the name of Lukas Gebauer nor the names of its contributors may      |
+| be used to endorse or promote products derived from this software without    |
+| specific prior written permission.                                           |
+|                                                                              |
+| THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"  |
+| AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE    |
+| IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE   |
+| ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE FOR  |
+| ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL       |
+| DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR   |
+| SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER   |
+| CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT           |
+| LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY    |
+| OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH  |
+| DAMAGE.                                                                      |
+|==============================================================================|
+| The Initial Developer of the Original Code is Lukas Gebauer (Czech Republic).|
+| Portions created by Lukas Gebauer are Copyright (c) 2006.                    |
+| All Rights Reserved.                                                         |
+|==============================================================================|
+| Contributor(s):                                                              |
+|==============================================================================|
+| History: see HISTORY.HTM from distribution package                           |
+|          (Found at URL: http://www.ararat.cz/synapse/)                       |
+|==============================================================================}
+
+{:@abstract(IP adress support procedures and functions)}
+
+{$IFDEF FPC}
+  {$MODE DELPHI}
+{$ENDIF}
+{$Q-}
+{$R-}
+{$H+}
+
+unit synaip;
+
+interface
+
+uses
+  SysUtils, SynaUtil;
+
+type
+{:binary form of IPv6 adress (for string conversion routines)}
+  TIp6Bytes = array [0..15] of Byte;
+{:binary form of IPv6 adress (for string conversion routines)}
+  TIp6Words = array [0..7] of Word;
+
+{:Returns @TRUE, if "Value" is a valid IPv4 address. Cannot be a symbolic Name!}
+function IsIP(const Value: string): Boolean;
+
+{:Returns @TRUE, if "Value" is a valid IPv6 address. Cannot be a symbolic Name!}
+function IsIP6(const Value: string): Boolean;
+
+{:Returns a string with the "Host" ip address converted to binary form.}
+function IPToID(Host: string): string;
+
+{:Convert IPv6 address from their string form to binary byte array.}
+function StrToIp6(value: string): TIp6Bytes;
+
+{:Convert IPv6 address from binary byte array to string form.}
+function Ip6ToStr(value: TIp6Bytes): string;
+
+{:Convert IPv4 address from their string form to binary.}
+function StrToIp(value: string): integer;
+
+{:Convert IPv4 address from binary to string form.}
+function IpToStr(value: integer): string;
+
+{:Convert IPv4 address to reverse form.}
+function ReverseIP(Value: AnsiString): AnsiString;
+
+{:Convert IPv6 address to reverse form.}
+function ReverseIP6(Value: AnsiString): AnsiString;
+
+
+implementation
+
+{==============================================================================}
+
+function IsIP(const Value: string): Boolean;
+var
+  TempIP: string;
+  function ByteIsOk(const Value: string): Boolean;
+  var
+    x, n: integer;
+  begin
+    x := StrToIntDef(Value, -1);
+    Result := (x >= 0) and (x < 256);
+    // X may be in correct range, but value still may not be correct value!
+    // i.e. "$80"
+    if Result then
+      for n := 1 to length(Value) do
+        if not (Value[n] in ['0'..'9']) then
+        begin
+          Result := False;
+          Break;
+        end;
+  end;
+begin
+  TempIP := Value;
+  Result := False;
+  if not ByteIsOk(Fetch(TempIP, '.')) then
+    Exit;
+  if not ByteIsOk(Fetch(TempIP, '.')) then
+    Exit;
+  if not ByteIsOk(Fetch(TempIP, '.')) then
+    Exit;
+  if ByteIsOk(TempIP) then
+    Result := True;
+end;
+
+{==============================================================================}
+
+function IsIP6(const Value: string): Boolean;
+var
+  TempIP: string;
+  s,t: string;
+  x: integer;
+  partcount: integer;
+  zerocount: integer;
+  First: Boolean;
+begin
+  TempIP := Value;
+  Result := False;
+  if Value = '::' then
+  begin
+    Result := True;
+    Exit;
+  end;
+  partcount := 0;
+  zerocount := 0;
+  First := True;
+  while tempIP <> '' do
+  begin
+    s := fetch(TempIP, ':');
+    if not(First) and (s = '') then
+      Inc(zerocount);
+    First := False;
+    if zerocount > 1 then
+      break;
+    Inc(partCount);
+    if s = '' then
+      Continue;
+    if partCount > 8 then
+      break;
+    if tempIP = '' then
+    begin
+      t := SeparateRight(s, '%');
+      s := SeparateLeft(s, '%');
+      x := StrToIntDef('$' + t, -1);
+      if (x < 0) or (x > $ffff) then
+        break;
+    end;
+    x := StrToIntDef('$' + s, -1);
+    if (x < 0) or (x > $ffff) then
+      break;
+    if tempIP = '' then
+      if not((PartCount = 1) and (ZeroCount = 0)) then
+        Result := True;
+  end;
+end;
+
+{==============================================================================}
+function IPToID(Host: string): string;
+var
+  s: string;
+  i, x: Integer;
+begin
+  Result := '';
+  for x := 0 to 3 do
+  begin
+    s := Fetch(Host, '.');
+    i := StrToIntDef(s, 0);
+    Result := Result + Chr(i);
+  end;
+end;
+
+{==============================================================================}
+
+function StrToIp(value: string): integer;
+var
+  s: string;
+  i, x: Integer;
+begin
+  Result := 0;
+  for x := 0 to 3 do
+  begin
+    s := Fetch(value, '.');
+    i := StrToIntDef(s, 0);
+    Result := (256 * Result) + i;
+  end;
+end;
+
+{==============================================================================}
+
+function IpToStr(value: integer): string;
+var
+  x1, x2: word;
+  y1, y2: byte;
+begin
+  Result := '';
+  x1 := value shr 16;
+  x2 := value and $FFFF;
+  y1 := x1 div $100;
+  y2 := x1 mod $100;
+  Result := inttostr(y1) + '.' + inttostr(y2) + '.';
+  y1 := x2 div $100;
+  y2 := x2 mod $100;
+  Result := Result + inttostr(y1) + '.' + inttostr(y2);
+end;
+
+{==============================================================================}
+
+function StrToIp6(Value: string): TIp6Bytes;
+var
+ IPv6: TIp6Words;
+ Index: Integer;
+ ZeroAt: Integer;
+ n: integer;
+ b1, b2: byte;
+ s: string;
+ x: integer;
+begin
+  for n := 0 to 15 do
+    Result[n] := 0;
+  for n := 0 to 7 do
+    Ipv6[n] := 0;
+  Index := 0;
+  ZeroAt := -1;
+
+  while Value <> '' do
+  begin
+    if Index > 7 then
+      Exit;
+    s := fetch(value, ':');
+    if s = '@' then
+      break;
+    if s = '' then
+    begin
+      ZeroAt := Index;
+      IPv6[Index] := 0;
+    end
+    else
+    begin
+      x := StrToIntDef('$' + s, -1);
+      if (x > 65535) or (x < 0) then
+        Exit;
+      IPv6[Index] := x;
+    end;
+    Inc(Index);
+  end;
+  if ZeroAt >= 0 then
+  Begin
+    x := Index - ZeroAt - 1;
+    for n := 1 to x do
+      IPv6[7 - n + 1] := Ipv6[ZeroAt + x - 1 + n];
+    for n := ZeroAt + 1 to Index - 1 do
+      IPv6[n] := 0;
+  End;
+  for n := 0 to 7 do
+  begin
+    b1 := ipv6[n] div 256;
+    b2 := ipv6[n] mod 256;
+    Result[n * 2] := b1;
+    Result[(n * 2) + 1] := b2;
+  end;
+end;
+
+{==============================================================================}
+//based on routine by the Free Pascal development team
+function Ip6ToStr(value: TIp6Bytes): string;
+var
+  i, x: byte;
+  zr1,zr2: set of byte;
+  zc1,zc2: byte;
+  have_skipped: boolean;
+  ip6w: TIp6words;
+begin
+  zr1 := [];
+  zr2 := [];
+  zc1 := 0;
+  zc2 := 0;
+  for i := 0 to 7 do
+  begin
+    x := i * 2;
+    ip6w[i] := value[x] * 256 + value[x + 1];
+    if ip6w[i] = 0 then
+    begin
+      include(zr2, i);
+      inc(zc2);
+    end
+    else
+    begin
+      if zc1 < zc2 then
+      begin
+        zc1 := zc2;
+        zr1 := zr2;
+        zc2 := 0;
+        zr2 := [];
+      end;
+    end;
+  end;
+  if zc1 < zc2 then
+  begin
+    zr1 := zr2;
+  end;
+  SetLength(Result, 8*5-1);
+  SetLength(Result, 0);
+  have_skipped := false;
+  for i := 0 to 7 do
+  begin
+    if not(i in zr1) then
+    begin
+      if have_skipped then
+      begin
+        if Result = '' then
+          Result := '::'
+        else
+          Result := Result + ':';
+        have_skipped := false;
+      end;
+      Result := Result + IntToHex(Ip6w[i], 1) + ':';
+    end
+    else
+    begin
+      have_skipped := true;
+    end;
+  end;
+  if have_skipped then
+    if Result = '' then
+      Result := '::0'
+    else
+      Result := Result + ':';
+
+  if Result = '' then
+    Result := '::0';
+  if not (7 in zr1) then
+    SetLength(Result, Length(Result)-1);
+  Result := LowerCase(result);
+end;
+
+{==============================================================================}
+function ReverseIP(Value: AnsiString): AnsiString;
+var
+  x: Integer;
+begin
+  Result := '';
+  repeat
+    x := LastDelimiter('.', Value);
+    Result := Result + '.' + Copy(Value, x + 1, Length(Value) - x);
+    Delete(Value, x, Length(Value) - x + 1);
+  until x < 1;
+  if Length(Result) > 0 then
+    if Result[1] = '.' then
+      Delete(Result, 1, 1);
+end;
+
+{==============================================================================}
+function ReverseIP6(Value: AnsiString): AnsiString;
+var
+  ip6: TIp6bytes;
+  n: integer;
+  x, y: integer;
+begin
+  ip6 := StrToIP6(Value);
+  x := ip6[15] div 16;
+  y := ip6[15] mod 16;
+  Result := IntToHex(y, 1) + '.' + IntToHex(x, 1);
+  for n := 14 downto 0 do
+  begin
+    x := ip6[n] div 16;
+    y := ip6[n] mod 16;
+    Result := Result + '.' + IntToHex(y, 1) + '.' + IntToHex(x, 1);
+  end;
+end;
+
+{==============================================================================}
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/Synapse/synautil.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/Synapse/synautil.pas
new file mode 100644
index 0000000..9115675
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/Synapse/synautil.pas	
@@ -0,0 +1,1770 @@
+{$IFDEF WIN64}{$DEFINE WIN32}{$ENDIF}
+{==============================================================================|
+| Project : Ararat Synapse                                       | 004.011.003 |
+|==============================================================================|
+| Content: support procedures and functions                                    |
+|==============================================================================|
+| Copyright (c)1999-2005, Lukas Gebauer                                        |
+| All rights reserved.                                                         |
+|                                                                              |
+| Redistribution and use in source and binary forms, with or without           |
+| modification, are permitted provided that the following conditions are met:  |
+|                                                                              |
+| Redistributions of source code must retain the above copyright notice, this  |
+| list of conditions and the following disclaimer.                             |
+|                                                                              |
+| Redistributions in binary form must reproduce the above copyright notice,    |
+| this list of conditions and the following disclaimer in the documentation    |
+| and/or other materials provided with the distribution.                       |
+|                                                                              |
+| Neither the name of Lukas Gebauer nor the names of its contributors may      |
+| be used to endorse or promote products derived from this software without    |
+| specific prior written permission.                                           |
+|                                                                              |
+| THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"  |
+| AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE    |
+| IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE   |
+| ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE FOR  |
+| ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL       |
+| DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR   |
+| SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER   |
+| CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT           |
+| LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY    |
+| OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH  |
+| DAMAGE.                                                                      |
+|==============================================================================|
+| The Initial Developer of the Original Code is Lukas Gebauer (Czech Republic).|
+| Portions created by Lukas Gebauer are Copyright (c) 1999-2005.               |
+| Portions created by Hernan Sanchez are Copyright (c) 2000.                   |
+| All Rights Reserved.                                                         |
+|==============================================================================|
+| Contributor(s):                                                              |
+|   Hernan Sanchez (hernan.sanchez@iname.com)                                  |
+|==============================================================================|
+| History: see HISTORY.HTM from distribution package                           |
+|          (Found at URL: http://www.ararat.cz/synapse/)                       |
+|==============================================================================}
+
+{:@abstract(Support procedures and functions)}
+
+{$IFDEF FPC}
+  {$MODE DELPHI}
+{$ENDIF}
+{$Q-}
+{$R-}
+{$H+}
+
+unit synautil;
+
+interface
+
+uses
+{$IFDEF WIN32}
+  Windows,
+{$ELSE}
+  {$IFDEF FPC}
+  UnixUtil, Unix, BaseUnix,
+  {$ELSE}
+  Libc,
+  {$ENDIF}
+{$ENDIF}
+{$IFDEF CIL}
+  System.IO,
+{$ENDIF}
+  SysUtils, Classes, SynaFpc;
+
+{:Return your timezone bias from UTC time in minutes.}
+function TimeZoneBias: integer;
+
+{:Return your timezone bias from UTC time in string representation like "+0200".}
+function TimeZone: string;
+
+{:Returns current time in format defined in RFC-822. Useful for SMTP messages,
+ but other protocols use this time format as well. Results contains the timezone
+ specification. Four digit year is used to break any Y2K concerns. (Example
+ 'Fri, 15 Oct 1999 21:14:56 +0200')}
+function Rfc822DateTime(t: TDateTime): string;
+
+{:Returns date and time in format defined in C compilers in format "mmm dd hh:nn:ss"}
+function CDateTime(t: TDateTime): string;
+
+{:Returns date and time in format defined in format 'yymmdd hhnnss'}
+function SimpleDateTime(t: TDateTime): string;
+
+{:Returns date and time in format defined in ANSI C compilers in format
+ "ddd mmm d hh:nn:ss yyyy" }
+function AnsiCDateTime(t: TDateTime): string;
+
+{:Decode three-letter string with name of month to their month number. If string
+ not match any month name, then is returned 0. For parsing are used predefined
+ names for English, French and German and names from system locale too.}
+function GetMonthNumber(Value: AnsiString): integer;
+
+{:Return decoded time from given string. Time must be witch separator ':'. You
+ can use "hh:mm" or "hh:mm:ss".}
+function GetTimeFromStr(Value: string): TDateTime;
+
+{:Decode string in format "m-d-y" to TDateTime type.}
+function GetDateMDYFromStr(Value: string): TDateTime;
+
+{:Decode various string representations of date and time to Tdatetime type.
+ This function do all timezone corrections too! This function can decode lot of
+  formats like:
+ @longcode(#
+ ddd, d mmm yyyy hh:mm:ss
+ ddd, d mmm yy hh:mm:ss
+ ddd, mmm d yyyy hh:mm:ss
+ ddd mmm dd hh:mm:ss yyyy #)
+
+and more with lot of modifications, include:
+@longcode(#
+Sun, 06 Nov 1994 08:49:37 GMT    ; RFC 822, updated by RFC 1123
+Sunday, 06-Nov-94 08:49:37 GMT   ; RFC 850, obsoleted by RFC 1036
+Sun Nov  6 08:49:37 1994         ; ANSI C's asctime() Format
+#)
+Timezone corrections known lot of symbolic timezone names (like CEST, EDT, etc.)
+or numeric representation (like +0200). By convention defined in RFC timezone
+ +0000 is GMT and -0000 is current your system timezone.}
+function DecodeRfcDateTime(Value: string): TDateTime;
+
+{:Return current system date and time in UTC timezone.}
+function GetUTTime: TDateTime;
+
+{:Set Newdt as current system date and time in UTC timezone. This function work
+ only if you have administrator rights!}
+function SetUTTime(Newdt: TDateTime): Boolean;
+
+{:Return current value of system timer with precizion 1 millisecond. Good for
+ measure time difference.}
+function GetTick: LongWord;
+
+{:Return difference between two timestamps. It working fine only for differences
+ smaller then maxint. (difference must be smaller then 24 days.)}
+function TickDelta(TickOld, TickNew: LongWord): LongWord;
+
+{:Return two characters, which ordinal values represents the value in byte
+ format. (High-endian)}
+function CodeInt(Value: Word): Ansistring;
+
+{:Decodes two characters located at "Index" offset position of the "Value"
+ string to Word values.}
+function DecodeInt(const Value: Ansistring; Index: Integer): Word;
+
+{:Return four characters, which ordinal values represents the value in byte
+ format. (High-endian)}
+function CodeLongInt(Value: LongInt): Ansistring;
+
+{:Decodes four characters located at "Index" offset position of the "Value"
+ string to LongInt values.}
+function DecodeLongInt(const Value: Ansistring; Index: Integer): LongInt;
+
+{:Dump binary buffer stored in a string to a result string.}
+function DumpStr(const Buffer: Ansistring): string;
+
+{:Dump binary buffer stored in a string to a result string. All bytes with code
+ of character is written as character, not as hexadecimal value.}
+function DumpExStr(const Buffer: Ansistring): string;
+
+{:Dump binary buffer stored in a string to a file with DumpFile filename.}
+procedure Dump(const Buffer: AnsiString; DumpFile: string);
+
+{:Dump binary buffer stored in a string to a file with DumpFile filename. All
+ bytes with code of character is written as character, not as hexadecimal value.}
+procedure DumpEx(const Buffer: AnsiString; DumpFile: string);
+
+{:Like TrimLeft, but remove only spaces, not control characters!}
+function TrimSPLeft(const S: string): string;
+
+{:Like TrimRight, but remove only spaces, not control characters!}
+function TrimSPRight(const S: string): string;
+
+{:Like Trim, but remove only spaces, not control characters!}
+function TrimSP(const S: string): string;
+
+{:Returns a portion of the "Value" string located to the left of the "Delimiter"
+ string. If a delimiter is not found, results is original string.}
+function SeparateLeft(const Value, Delimiter: string): string;
+
+{:Returns the portion of the "Value" string located to the right of the
+ "Delimiter" string. If a delimiter is not found, results is original string.}
+function SeparateRight(const Value, Delimiter: string): string;
+
+{:Returns parameter value from string in format:
+ parameter1="value1"; parameter2=value2}
+function GetParameter(const Value, Parameter: string): string;
+
+{:parse value string with elements differed by Delimiter into stringlist.}
+procedure ParseParametersEx(Value, Delimiter: string; const Parameters: TStrings);
+
+{:parse value string with elements differed by ';' into stringlist.}
+procedure ParseParameters(Value: string; const Parameters: TStrings);
+
+{:Index of string in stringlist with same beginning as Value is returned.}
+function IndexByBegin(Value: string; const List: TStrings): integer;
+
+{:Returns only the e-mail portion of an address from the full address format.
+ i.e. returns 'nobody@@somewhere.com' from '"someone" <nobody@@somewhere.com>'}
+function GetEmailAddr(const Value: string): string;
+
+{:Returns only the description part from a full address format. i.e. returns
+ 'someone' from '"someone" <nobody@@somewhere.com>'}
+function GetEmailDesc(Value: string): string;
+
+{:Returns a string with hexadecimal digits representing the corresponding values
+ of the bytes found in "Value" string.}
+function StrToHex(const Value: Ansistring): string;
+
+{:Returns a string of binary "Digits" representing "Value".}
+function IntToBin(Value: Integer; Digits: Byte): string;
+
+{:Returns an integer equivalent of the binary string in "Value".
+ (i.e. ('10001010') returns 138)}
+function BinToInt(const Value: string): Integer;
+
+{:Parses a URL to its various components.}
+function ParseURL(URL: string; var Prot, User, Pass, Host, Port, Path,
+  Para: string): string;
+
+{:Replaces all "Search" string values found within "Value" string, with the
+ "Replace" string value.}
+function ReplaceString(Value, Search, Replace: string): string;
+
+{:It is like RPos, but search is from specified possition.}
+function RPosEx(const Sub, Value: string; From: integer): Integer;
+
+{:It is like POS function, but from right side of Value string.}
+function RPos(const Sub, Value: String): Integer;
+
+{:Like @link(fetch), but working with binary strings, not with text.}
+function FetchBin(var Value: string; const Delimiter: string): string;
+
+{:Fetch string from left of Value string.}
+function Fetch(var Value: string; const Delimiter: string): string;
+
+{:Fetch string from left of Value string. This function ignore delimitesr inside
+ quotations.}
+function FetchEx(var Value: string; const Delimiter, Quotation: string): string;
+
+{:If string is binary string (contains non-printable characters), then is
+ returned true.}
+function IsBinaryString(const Value: string): Boolean;
+
+{:return position of string terminator in string. If terminator found, then is
+ returned in terminator parameter.
+ Possible line terminators are: CRLF, LFCR, CR, LF}
+function PosCRLF(const Value: AnsiString; var Terminator: AnsiString): integer;
+
+{:Delete empty strings from end of stringlist.}
+Procedure StringsTrim(const value: TStrings);
+
+{:Like Pos function, buf from given string possition.}
+function PosFrom(const SubStr, Value: String; From: integer): integer;
+
+{$IFNDEF CIL}
+{:Increase pointer by value.}
+function IncPoint(const p: pointer; Value: integer): pointer;
+{$ENDIF}
+
+{:Get string between PairBegin and PairEnd. This function respect nesting.
+ For example:
+ @longcode(#
+ Value is: 'Hi! (hello(yes!))'
+ pairbegin is: '('
+ pairend is: ')'
+ In this case result is: 'hello(yes!)'#)}
+function GetBetween(const PairBegin, PairEnd, Value: string): string;
+
+{:Return count of Chr in Value string.}
+function CountOfChar(const Value: string; Chr: char): integer;
+
+{:Remove quotation from Value string. If Value is not quoted, then return same
+ string without any modification. }
+function UnquoteStr(const Value: string; Quote: Char): string;
+
+{:Quote Value string. If Value contains some Quote chars, then it is doubled.}
+function QuoteStr(const Value: string; Quote: Char): string;
+
+{:Convert lines in stringlist from 'name: value' form to 'name=value' form.}
+procedure HeadersToList(const Value: TStrings);
+
+{:Convert lines in stringlist from 'name=value' form to 'name: value' form.}
+procedure ListToHeaders(const Value: TStrings);
+
+{:swap bytes in integer.}
+function SwapBytes(Value: integer): integer;
+
+{:read string with requested length form stream.}
+function ReadStrFromStream(const Stream: TStream; len: integer): AnsiString;
+
+{:write string to stream.}
+procedure WriteStrToStream(const Stream: TStream; Value: AnsiString);
+
+{:Return filename of new temporary file in Dir (if empty, then default temporary
+ directory is used) and with optional filename prefix.}
+function GetTempFile(const Dir, prefix: AnsiString): AnsiString;
+
+{:Return padded string. If length is greater, string is truncated. If length is
+ smaller, string is padded by Pad character.}
+function PadString(const Value: AnsiString; len: integer; Pad: AnsiChar): AnsiString;
+
+var
+  {:can be used for your own months strings for @link(getmonthnumber)}
+  CustomMonthNames: array[1..12] of string;
+
+implementation
+
+{==============================================================================}
+
+const
+  MyDayNames: array[1..7] of AnsiString =
+    ('Sun', 'Mon', 'Tue', 'Wed', 'Thu', 'Fri', 'Sat');
+var
+  MyMonthNames: array[0..6, 1..12] of AnsiString =
+    (
+    ('Jan', 'Feb', 'Mar', 'Apr', 'May', 'Jun',  //rewrited by system locales
+     'Jul', 'Aug', 'Sep', 'Oct', 'Nov', 'Dec'),
+    ('Jan', 'Feb', 'Mar', 'Apr', 'May', 'Jun',  //English
+     'Jul', 'Aug', 'Sep', 'Oct', 'Nov', 'Dec'),
+    ('jan', 'fév', 'mar', 'avr', 'mai', 'jun', //French
+     'jul', 'aoû', 'sep', 'oct', 'nov', 'déc'),
+    ('jan', 'fev', 'mar', 'avr', 'mai', 'jun',  //French#2
+     'jul', 'aou', 'sep', 'oct', 'nov', 'dec'),
+    ('Jan', 'Feb', 'Mar', 'Apr', 'Mai', 'Jun',  //German
+     'Jul', 'Aug', 'Sep', 'Okt', 'Nov', 'Dez'),
+    ('Jan', 'Feb', 'Mär', 'Apr', 'Mai', 'Jun',  //German#2
+     'Jul', 'Aug', 'Sep', 'Okt', 'Nov', 'Dez'),
+    ('Led', 'Úno', 'Bøe', 'Dub', 'Kvì', 'Èen',  //Czech
+     'Èec', 'Srp', 'Záø', 'Øíj', 'Lis', 'Pro')
+     );
+
+
+{==============================================================================}
+
+function TimeZoneBias: integer;
+{$IFNDEF WIN32}
+{$IFNDEF FPC}
+var
+  t: TTime_T;
+  UT: TUnixTime;
+begin
+  __time(@T);
+  localtime_r(@T, UT);
+  Result := ut.__tm_gmtoff div 60;
+{$ELSE}
+begin
+  Result := TZSeconds div 60;
+{$ENDIF}
+{$ELSE}
+var
+  zoneinfo: TTimeZoneInformation;
+  bias: Integer;
+begin
+  case GetTimeZoneInformation(Zoneinfo) of
+    2:
+      bias := zoneinfo.Bias + zoneinfo.DaylightBias;
+    1:
+      bias := zoneinfo.Bias + zoneinfo.StandardBias;
+  else
+    bias := zoneinfo.Bias;
+  end;
+  Result := bias * (-1);
+{$ENDIF}
+end;
+
+{==============================================================================}
+
+function TimeZone: string;
+var
+  bias: Integer;
+  h, m: Integer;
+begin
+  bias := TimeZoneBias;
+  if bias >= 0 then
+    Result := '+'
+  else
+    Result := '-';
+  bias := Abs(bias);
+  h := bias div 60;
+  m := bias mod 60;
+  Result := Result + Format('%.2d%.2d', [h, m]);
+end;
+
+{==============================================================================}
+
+function Rfc822DateTime(t: TDateTime): string;
+var
+  wYear, wMonth, wDay: word;
+begin
+  DecodeDate(t, wYear, wMonth, wDay);
+  Result := Format('%s, %d %s %s %s', [MyDayNames[DayOfWeek(t)], wDay,
+    MyMonthNames[1, wMonth], FormatDateTime('yyyy hh":"nn":"ss', t), TimeZone]);
+end;
+
+{==============================================================================}
+
+function CDateTime(t: TDateTime): string;
+var
+  wYear, wMonth, wDay: word;
+begin
+  DecodeDate(t, wYear, wMonth, wDay);
+  Result:= Format('%s %2d %s', [MyMonthNames[1, wMonth], wDay,
+    FormatDateTime('hh":"nn":"ss', t)]);
+end;
+
+{==============================================================================}
+
+function SimpleDateTime(t: TDateTime): string;
+begin
+  Result := FormatDateTime('yymmdd hhnnss', t);
+end;
+
+{==============================================================================}
+
+function AnsiCDateTime(t: TDateTime): string;
+var
+  wYear, wMonth, wDay: word;
+begin
+  DecodeDate(t, wYear, wMonth, wDay);
+  Result := Format('%s %s %d %s', [MyDayNames[DayOfWeek(t)], MyMonthNames[1, wMonth],
+    wDay, FormatDateTime('hh":"nn":"ss yyyy ', t)]);
+end;
+
+{==============================================================================}
+
+function DecodeTimeZone(Value: string; var Zone: integer): Boolean;
+var
+  x: integer;
+  zh, zm: integer;
+  s: string;
+begin
+  Result := false;
+  s := Value;
+  if (Pos('+', s) = 1) or (Pos('-',s) = 1) then
+  begin
+    if s = '-0000' then
+      Zone := TimeZoneBias
+    else
+      if Length(s) > 4 then
+      begin
+        zh := StrToIntdef(s[2] + s[3], 0);
+        zm := StrToIntdef(s[4] + s[5], 0);
+        zone := zh * 60 + zm;
+        if s[1] = '-' then
+          zone := zone * (-1);
+      end;
+    Result := True;
+  end
+  else
+  begin
+    x := 32767;
+    if s = 'NZDT' then x := 13;
+    if s = 'IDLE' then x := 12;
+    if s = 'NZST' then x := 12;
+    if s = 'NZT' then x := 12;
+    if s = 'EADT' then x := 11;
+    if s = 'GST' then x := 10;
+    if s = 'JST' then x := 9;
+    if s = 'CCT' then x := 8;
+    if s = 'WADT' then x := 8;
+    if s = 'WAST' then x := 7;
+    if s = 'ZP6' then x := 6;
+    if s = 'ZP5' then x := 5;
+    if s = 'ZP4' then x := 4;
+    if s = 'BT' then x := 3;
+    if s = 'EET' then x := 2;
+    if s = 'MEST' then x := 2;
+    if s = 'MESZ' then x := 2;
+    if s = 'SST' then x := 2;
+    if s = 'FST' then x := 2;
+    if s = 'CEST' then x := 2;
+    if s = 'CET' then x := 1;
+    if s = 'FWT' then x := 1;
+    if s = 'MET' then x := 1;
+    if s = 'MEWT' then x := 1;
+    if s = 'SWT' then x := 1;
+    if s = 'UT' then x := 0;
+    if s = 'UTC' then x := 0;
+    if s = 'GMT' then x := 0;
+    if s = 'WET' then x := 0;
+    if s = 'WAT' then x := -1;
+    if s = 'BST' then x := -1;
+    if s = 'AT' then x := -2;
+    if s = 'ADT' then x := -3;
+    if s = 'AST' then x := -4;
+    if s = 'EDT' then x := -4;
+    if s = 'EST' then x := -5;
+    if s = 'CDT' then x := -5;
+    if s = 'CST' then x := -6;
+    if s = 'MDT' then x := -6;
+    if s = 'MST' then x := -7;
+    if s = 'PDT' then x := -7;
+    if s = 'PST' then x := -8;
+    if s = 'YDT' then x := -8;
+    if s = 'YST' then x := -9;
+    if s = 'HDT' then x := -9;
+    if s = 'AHST' then x := -10;
+    if s = 'CAT' then x := -10;
+    if s = 'HST' then x := -10;
+    if s = 'EAST' then x := -10;
+    if s = 'NT' then x := -11;
+    if s = 'IDLW' then x := -12;
+    if x <> 32767 then
+    begin
+      zone := x * 60;
+      Result := True;
+    end;
+  end;
+end;
+
+{==============================================================================}
+
+function GetMonthNumber(Value: AnsiString): integer;
+var
+  n: integer;
+  function TestMonth(Value: AnsiString; Index: Integer): Boolean;
+  var
+    n: integer;
+  begin
+    Result := False;
+    for n := 0 to 6 do
+      if Value = AnsiUppercase(MyMonthNames[n, Index]) then
+      begin
+        Result := True;
+        Break;
+      end;
+  end;
+begin
+  Result := 0;
+  Value := AnsiUppercase(Value);
+  for n := 1 to 12 do
+    if TestMonth(Value, n) or (Value = AnsiUppercase(CustomMonthNames[n])) then
+    begin
+      Result := n;
+      Break;
+    end;
+end;
+
+{==============================================================================}
+
+function GetTimeFromStr(Value: string): TDateTime;
+var
+  x: integer;
+begin
+  x := rpos(':', Value);
+  if (x > 0) and ((Length(Value) - x) > 2) then
+    Value := Copy(Value, 1, x + 2);
+  Value := ReplaceString(Value, ':', TimeSeparator);
+  Result := -1;
+  try
+    Result := StrToTime(Value);
+  except
+    on Exception do ;
+  end;
+end;
+
+{==============================================================================}
+
+function GetDateMDYFromStr(Value: string): TDateTime;
+var
+  wYear, wMonth, wDay: word;
+  s: string;
+begin
+  Result := 0;
+  s := Fetch(Value, '-');
+  wMonth := StrToIntDef(s, 12);
+  s := Fetch(Value, '-');
+  wDay := StrToIntDef(s, 30);
+  wYear := StrToIntDef(Value, 1899);
+  if wYear < 1000 then
+    if (wYear > 99) then
+      wYear := wYear + 1900
+    else
+      if wYear > 50 then
+        wYear := wYear + 1900
+      else
+        wYear := wYear + 2000;
+  try
+    Result := EncodeDate(wYear, wMonth, wDay);
+  except
+    on Exception do ;
+  end;
+end;
+
+{==============================================================================}
+
+function DecodeRfcDateTime(Value: string): TDateTime;
+var
+  day, month, year: Word;
+  zone: integer;
+  x, y: integer;
+  s: string;
+  t: TDateTime;
+begin
+// ddd, d mmm yyyy hh:mm:ss
+// ddd, d mmm yy hh:mm:ss
+// ddd, mmm d yyyy hh:mm:ss
+// ddd mmm dd hh:mm:ss yyyy
+// Sun, 06 Nov 1994 08:49:37 GMT    ; RFC 822, updated by RFC 1123
+// Sunday, 06-Nov-94 08:49:37 GMT   ; RFC 850, obsoleted by RFC 1036
+// Sun Nov  6 08:49:37 1994         ; ANSI C's asctime() Format
+
+  Result := 0;
+  if Value = '' then
+    Exit;
+  day := 0;
+  month := 0;
+  year := 0;
+  zone := 0;
+  Value := ReplaceString(Value, ' -', ' #');
+  Value := ReplaceString(Value, '-', ' ');
+  Value := ReplaceString(Value, ' #', ' -');
+  while Value <> '' do
+  begin
+    s := Fetch(Value, ' ');
+    s := uppercase(s);
+    // timezone
+    if DecodetimeZone(s, x) then
+    begin
+      zone := x;
+      continue;
+    end;
+    x := StrToIntDef(s, 0);
+    // day or year
+    if x > 0 then
+      if (x < 32) and (day = 0) then
+      begin
+        day := x;
+        continue;
+      end
+      else
+      begin
+        if (year = 0) and ((month > 0) or (x > 12)) then
+        begin
+          year := x;
+          if year < 32 then
+            year := year + 2000;
+          if year < 1000 then
+           year := year + 1900;
+          continue;
+        end;
+      end;
+    // time
+    if rpos(':', s) > Pos(':', s) then
+    begin
+      t := GetTimeFromStr(s);
+      if t <> -1 then
+        Result := t;
+      continue;
+    end;
+    //timezone daylight saving time
+    if s = 'DST' then
+    begin
+      zone := zone + 60;
+      continue;
+    end;
+    // month
+    y := GetMonthNumber(s);
+    if (y > 0) and (month = 0) then
+      month := y;
+  end;
+  if year = 0 then
+    year := 1980;
+  if month < 1 then
+    month := 1;
+  if month > 12 then
+    month := 12;
+  if day < 1 then
+    day := 1;
+  x := MonthDays[IsLeapYear(year), month];
+  if day > x then
+    day := x;
+  Result := Result + Encodedate(year, month, day);
+  zone := zone - TimeZoneBias;
+  x := zone div 1440;
+  Result := Result - x;
+  zone := zone mod 1440;
+  t := EncodeTime(Abs(zone) div 60, Abs(zone) mod 60, 0, 0);
+  if zone < 0 then
+    t := 0 - t;
+  Result := Result - t;
+end;
+
+{==============================================================================}
+
+function GetUTTime: TDateTime;
+{$IFDEF WIN32}
+{$IFNDEF FPC}
+var
+  st: TSystemTime;
+begin
+  GetSystemTime(st);
+  result := SystemTimeToDateTime(st);
+{$ELSE}
+var
+  st: SysUtils.TSystemTime;
+  stw: Windows.TSystemTime;
+begin
+  GetSystemTime(stw);
+  st.Year := stw.wYear;
+  st.Month := stw.wMonth;
+  st.Day := stw.wDay;
+  st.Hour := stw.wHour;
+  st.Minute := stw.wMinute;
+  st.Second := stw.wSecond;
+  st.Millisecond := stw.wMilliseconds;
+  result := SystemTimeToDateTime(st);
+{$ENDIF}
+{$ELSE}
+{$IFNDEF FPC}
+var
+  TV: TTimeVal;
+begin
+  gettimeofday(TV, nil);
+  Result := UnixDateDelta + (TV.tv_sec + TV.tv_usec / 1000000) / 86400;
+{$ELSE}
+var
+  TV: TimeVal;
+begin
+  fpgettimeofday(@TV, nil);
+  Result := UnixDateDelta + (TV.tv_sec + TV.tv_usec / 1000000) / 86400;
+{$ENDIF}
+{$ENDIF}
+end;
+
+{==============================================================================}
+
+function SetUTTime(Newdt: TDateTime): Boolean;
+{$IFDEF WIN32}
+{$IFNDEF FPC}
+var
+  st: TSystemTime;
+begin
+  DateTimeToSystemTime(newdt,st);
+  Result := SetSystemTime(st);
+{$ELSE}
+var
+  st: SysUtils.TSystemTime;
+  stw: Windows.TSystemTime;
+begin
+  DateTimeToSystemTime(newdt,st);
+  stw.wYear := st.Year;
+  stw.wMonth := st.Month;
+  stw.wDay := st.Day;
+  stw.wHour := st.Hour;
+  stw.wMinute := st.Minute;
+  stw.wSecond := st.Second;
+  stw.wMilliseconds := st.Millisecond;
+  Result := SetSystemTime(stw);
+{$ENDIF}
+{$ELSE}
+{$IFNDEF FPC}
+var
+  TV: TTimeVal;
+  d: double;
+  TZ: Ttimezone;
+  PZ: PTimeZone;
+begin
+  TZ.tz_minuteswest := 0;
+  TZ.tz_dsttime := 0;
+  PZ := @TZ;
+  gettimeofday(TV, PZ);
+  d := (newdt - UnixDateDelta) * 86400;
+  TV.tv_sec := trunc(d);
+  TV.tv_usec := trunc(frac(d) * 1000000);
+  Result := settimeofday(TV, TZ) <> -1;
+{$ELSE}
+var
+  TV: TimeVal;
+  d: double;
+begin
+  d := (newdt - UnixDateDelta) * 86400;
+  TV.tv_sec := trunc(d);
+  TV.tv_usec := trunc(frac(d) * 1000000);
+  Result := fpsettimeofday(@TV, nil) <> -1;
+{$ENDIF}
+{$ENDIF}
+end;
+
+{==============================================================================}
+
+{$IFNDEF WIN32}
+function GetTick: LongWord;
+var
+  Stamp: TTimeStamp;
+begin
+  Stamp := DateTimeToTimeStamp(Now);
+  Result := Stamp.Time;
+end;
+{$ELSE}
+function GetTick: LongWord;
+var
+  tick, freq: TLargeInteger;
+{$IFDEF VER100}
+  x: TLargeInteger;
+{$ENDIF}
+begin
+  if Windows.QueryPerformanceFrequency(freq) then
+  begin
+    Windows.QueryPerformanceCounter(tick);
+{$IFDEF VER100}
+    x.QuadPart := (tick.QuadPart / freq.QuadPart) * 1000;
+    Result := x.LowPart;
+{$ELSE}
+    Result := Trunc((tick / freq) * 1000) and High(LongWord)
+{$ENDIF}
+  end
+  else
+    Result := Windows.GetTickCount;
+end;
+{$ENDIF}
+
+{==============================================================================}
+
+function TickDelta(TickOld, TickNew: LongWord): LongWord;
+begin
+//if DWord is signed type (older Deplhi),
+// then it not work properly on differencies larger then maxint!
+  Result := 0;
+  if TickOld <> TickNew then
+  begin
+    if TickNew < TickOld then
+    begin
+      TickNew := TickNew + LongWord(MaxInt) + 1;
+      TickOld := TickOld + LongWord(MaxInt) + 1;
+    end;
+    Result := TickNew - TickOld;
+    if TickNew < TickOld then
+      if Result > 0 then
+        Result := 0 - Result;
+  end;
+end;
+
+{==============================================================================}
+
+function CodeInt(Value: Word): Ansistring;
+begin
+  setlength(result, 2);
+  result[1] := AnsiChar(Value div 256);
+  result[2] := AnsiChar(Value mod 256);
+//  Result := AnsiChar(Value div 256) + AnsiChar(Value mod 256)
+end;
+
+{==============================================================================}
+
+function DecodeInt(const Value: Ansistring; Index: Integer): Word;
+var
+  x, y: Byte;
+begin
+  if Length(Value) > Index then
+    x := Ord(Value[Index])
+  else
+    x := 0;
+  if Length(Value) >= (Index + 1) then
+    y := Ord(Value[Index + 1])
+  else
+    y := 0;
+  Result := x * 256 + y;
+end;
+
+{==============================================================================}
+
+function CodeLongInt(Value: Longint): Ansistring;
+var
+  x, y: word;
+begin
+  // this is fix for negative numbers on systems where longint = integer
+  x := (Value shr 16) and integer($ffff);
+  y := Value and integer($ffff);
+  setlength(result, 4);
+  result[1] := AnsiChar(x div 256);
+  result[2] := AnsiChar(x mod 256);
+  result[3] := AnsiChar(y div 256);
+  result[4] := AnsiChar(y mod 256);
+end;
+
+{==============================================================================}
+
+function DecodeLongInt(const Value: Ansistring; Index: Integer): LongInt;
+var
+  x, y: Byte;
+  xl, yl: Byte;
+begin
+  if Length(Value) > Index then
+    x := Ord(Value[Index])
+  else
+    x := 0;
+  if Length(Value) >= (Index + 1) then
+    y := Ord(Value[Index + 1])
+  else
+    y := 0;
+  if Length(Value) >= (Index + 2) then
+    xl := Ord(Value[Index + 2])
+  else
+    xl := 0;
+  if Length(Value) >= (Index + 3) then
+    yl := Ord(Value[Index + 3])
+  else
+    yl := 0;
+  Result := ((x * 256 + y) * 65536) + (xl * 256 + yl);
+end;
+
+{==============================================================================}
+
+function DumpStr(const Buffer: Ansistring): string;
+var
+  n: Integer;
+begin
+  Result := '';
+  for n := 1 to Length(Buffer) do
+    Result := Result + ' +#$' + IntToHex(Ord(Buffer[n]), 2);
+end;
+
+{==============================================================================}
+
+function DumpExStr(const Buffer: Ansistring): string;
+var
+  n: Integer;
+  x: Byte;
+begin
+  Result := '';
+  for n := 1 to Length(Buffer) do
+  begin
+    x := Ord(Buffer[n]);
+    if x in [65..90, 97..122] then
+      Result := Result + ' +''' + char(x) + ''''
+    else
+      Result := Result + ' +#$' + IntToHex(Ord(Buffer[n]), 2);
+  end;
+end;
+
+{==============================================================================}
+
+procedure Dump(const Buffer: AnsiString; DumpFile: string);
+var
+  f: Text;
+begin
+  AssignFile(f, DumpFile);
+  if FileExists(DumpFile) then
+    DeleteFile(DumpFile);
+  Rewrite(f);
+  try
+    Writeln(f, DumpStr(Buffer));
+  finally
+    CloseFile(f);
+  end;
+end;
+
+{==============================================================================}
+
+procedure DumpEx(const Buffer: AnsiString; DumpFile: string);
+var
+  f: Text;
+begin
+  AssignFile(f, DumpFile);
+  if FileExists(DumpFile) then
+    DeleteFile(DumpFile);
+  Rewrite(f);
+  try
+    Writeln(f, DumpExStr(Buffer));
+  finally
+    CloseFile(f);
+  end;
+end;
+
+{==============================================================================}
+
+function TrimSPLeft(const S: string): string;
+var
+  I, L: Integer;
+begin
+  Result := '';
+  if S = '' then
+    Exit;
+  L := Length(S);
+  I := 1;
+  while (I <= L) and (S[I] = ' ') do
+    Inc(I);
+  Result := Copy(S, I, Maxint);
+end;
+
+{==============================================================================}
+
+function TrimSPRight(const S: string): string;
+var
+  I: Integer;
+begin
+  Result := '';
+  if S = '' then
+    Exit;
+  I := Length(S);
+  while (I > 0) and (S[I] = ' ') do
+    Dec(I);
+  Result := Copy(S, 1, I);
+end;
+
+{==============================================================================}
+
+function TrimSP(const S: string): string;
+begin
+  Result := TrimSPLeft(s);
+  Result := TrimSPRight(Result);
+end;
+
+{==============================================================================}
+
+function SeparateLeft(const Value, Delimiter: string): string;
+var
+  x: Integer;
+begin
+  x := Pos(Delimiter, Value);
+  if x < 1 then
+    Result := Value
+  else
+    Result := Copy(Value, 1, x - 1);
+end;
+
+{==============================================================================}
+
+function SeparateRight(const Value, Delimiter: string): string;
+var
+  x: Integer;
+begin
+  x := Pos(Delimiter, Value);
+  if x > 0 then
+    x := x + Length(Delimiter) - 1;
+  Result := Copy(Value, x + 1, Length(Value) - x);
+end;
+
+{==============================================================================}
+
+function GetParameter(const Value, Parameter: string): string;
+var
+  s: string;
+  v: string;
+begin
+  Result := '';
+  v := Value;
+  while v <> '' do
+  begin
+    s := Trim(FetchEx(v, ';', '"'));
+    if Pos(Uppercase(parameter), Uppercase(s)) = 1 then
+    begin                       
+      Delete(s, 1, Length(Parameter));
+      s := Trim(s);
+      if s = '' then
+        Break;
+      if s[1] = '=' then
+      begin
+        Result := Trim(SeparateRight(s, '='));
+        Result := UnquoteStr(Result, '"');
+        break;
+      end;
+    end;
+  end;
+end;
+
+{==============================================================================}
+
+procedure ParseParametersEx(Value, Delimiter: string; const Parameters: TStrings);
+var
+  s: string;
+begin
+  Parameters.Clear;
+  while Value <> '' do
+  begin
+    s := Trim(FetchEx(Value, Delimiter, '"'));
+    Parameters.Add(s);
+  end;
+end;
+
+{==============================================================================}
+
+procedure ParseParameters(Value: string; const Parameters: TStrings);
+begin
+  ParseParametersEx(Value, ';', Parameters);
+end;
+
+{==============================================================================}
+
+function IndexByBegin(Value: string; const List: TStrings): integer;
+var
+  n: integer;
+  s: string;
+begin
+  Result := -1;
+  Value := uppercase(Value);
+  for n := 0 to List.Count -1 do
+  begin
+    s := UpperCase(List[n]);
+    if Pos(Value, s) = 1 then
+    begin
+      Result := n;
+      Break;
+    end;
+  end;
+end;
+
+{==============================================================================}
+
+function GetEmailAddr(const Value: string): string;
+var
+  s: string;
+begin
+  s := SeparateRight(Value, '<');
+  s := SeparateLeft(s, '>');
+  Result := Trim(s);
+end;
+
+{==============================================================================}
+
+function GetEmailDesc(Value: string): string;
+var
+  s: string;
+begin
+  Value := Trim(Value);
+  s := SeparateRight(Value, '"');
+  if s <> Value then
+    s := SeparateLeft(s, '"')
+  else
+  begin
+    s := SeparateLeft(Value, '<');
+    if s = Value then
+    begin
+      s := SeparateRight(Value, '(');
+      if s <> Value then
+        s := SeparateLeft(s, ')')
+      else
+        s := '';
+    end;
+  end;
+  Result := Trim(s);
+end;
+
+{==============================================================================}
+
+function StrToHex(const Value: Ansistring): string;
+var
+  n: Integer;
+begin
+  Result := '';
+  for n := 1 to Length(Value) do
+    Result := Result + IntToHex(Byte(Value[n]), 2);
+  Result := LowerCase(Result);
+end;
+
+{==============================================================================}
+
+function IntToBin(Value: Integer; Digits: Byte): string;
+var
+  x, y, n: Integer;
+begin
+  Result := '';
+  x := Value;
+  repeat
+    y := x mod 2;
+    x := x div 2;
+    if y > 0 then
+      Result := '1' + Result
+    else
+      Result := '0' + Result;
+  until x = 0;
+  x := Length(Result);
+  for n := x to Digits - 1 do
+    Result := '0' + Result;
+end;
+
+{==============================================================================}
+
+function BinToInt(const Value: string): Integer;
+var
+  n: Integer;
+begin
+  Result := 0;
+  for n := 1 to Length(Value) do
+  begin
+    if Value[n] = '0' then
+      Result := Result * 2
+    else
+      if Value[n] = '1' then
+        Result := Result * 2 + 1
+      else
+        Break;
+  end;
+end;
+
+{==============================================================================}
+
+function ParseURL(URL: string; var Prot, User, Pass, Host, Port, Path,
+  Para: string): string;
+var
+  x, y: Integer;
+  sURL: string;
+  s: string;
+  s1, s2: string;
+begin
+  Prot := 'http';
+  User := '';
+  Pass := '';
+  Port := '80';
+  Para := '';
+
+  x := Pos('://', URL);
+  if x > 0 then
+  begin
+    Prot := SeparateLeft(URL, '://');
+    sURL := SeparateRight(URL, '://');
+  end
+  else
+    sURL := URL;
+  if UpperCase(Prot) = 'HTTPS' then
+    Port := '443';
+  if UpperCase(Prot) = 'FTP' then
+    Port := '21';
+  x := Pos('@', sURL);
+  y := Pos('/', sURL);
+  if (x > 0) and ((x < y) or (y < 1))then
+  begin
+    s := SeparateLeft(sURL, '@');
+    sURL := SeparateRight(sURL, '@');
+    x := Pos(':', s);
+    if x > 0 then
+    begin
+      User := SeparateLeft(s, ':');
+      Pass := SeparateRight(s, ':');
+    end
+    else
+      User := s;
+  end;
+  x := Pos('/', sURL);
+  if x > 0 then
+  begin
+    s1 := SeparateLeft(sURL, '/');
+    s2 := SeparateRight(sURL, '/');
+  end
+  else
+  begin
+    s1 := sURL;
+    s2 := '';
+  end;
+  if Pos('[', s1) = 1 then
+  begin
+    Host := Separateleft(s1, ']');
+    Delete(Host, 1, 1);
+    s1 := SeparateRight(s1, ']');
+    if Pos(':', s1) = 1 then
+      Port := SeparateRight(s1, ':');
+  end
+  else
+  begin
+    x := Pos(':', s1);
+    if x > 0 then
+    begin
+      Host := SeparateLeft(s1, ':');
+      Port := SeparateRight(s1, ':');
+    end
+    else
+      Host := s1;
+  end;
+  Result := '/' + s2;
+  x := Pos('?', s2);
+  if x > 0 then
+  begin
+    Path := '/' + SeparateLeft(s2, '?');
+    Para := SeparateRight(s2, '?');
+  end
+  else
+    Path := '/' + s2;
+  if Host = '' then
+    Host := 'localhost';
+end;
+
+{==============================================================================}
+
+function ReplaceString(Value, Search, Replace: string): string;
+var
+  x, l, ls, lr: Integer;
+begin
+  if (Value = '') or (Search = '') then
+  begin
+    Result := Value;
+    Exit;
+  end;
+  ls := Length(Search);
+  lr := Length(Replace);
+  Result := '';
+  x := Pos(Search, Value);
+  while x > 0 do
+  begin
+    {$IFNDEF CIL}
+    l := Length(Result);
+    SetLength(Result, l + x - 1);
+    Move(Pointer(Value)^, Pointer(@Result[l + 1])^, x - 1);
+    {$ELSE}
+    Result:=Result+Copy(Value,1,x-1);
+    {$ENDIF}
+    {$IFNDEF CIL}
+    l := Length(Result);
+    SetLength(Result, l + lr);
+    Move(Pointer(Replace)^, Pointer(@Result[l + 1])^, lr);
+    {$ELSE}
+    Result:=Result+Replace;
+    {$ENDIF}
+    Delete(Value, 1, x - 1 + ls);
+    x := Pos(Search, Value);
+  end;
+  Result := Result + Value;
+end;
+
+{==============================================================================}
+
+function RPosEx(const Sub, Value: string; From: integer): Integer;
+var
+  n: Integer;
+  l: Integer;
+begin
+  result := 0;
+  l := Length(Sub);
+  for n := From - l + 1 downto 1 do
+  begin
+    if Copy(Value, n, l) = Sub then
+    begin
+      result := n;
+      break;
+    end;
+  end;
+end;
+
+{==============================================================================}
+
+function RPos(const Sub, Value: String): Integer;
+begin
+  Result := RPosEx(Sub, Value, Length(Value));
+end;
+
+{==============================================================================}
+
+function FetchBin(var Value: string; const Delimiter: string): string;
+var
+  s: string;
+begin
+  Result := SeparateLeft(Value, Delimiter);
+  s := SeparateRight(Value, Delimiter);
+  if s = Value then
+    Value := ''
+  else
+    Value := s;
+end;
+
+{==============================================================================}
+
+function Fetch(var Value: string; const Delimiter: string): string;
+begin
+  Result := FetchBin(Value, Delimiter);
+  Result := TrimSP(Result);
+  Value := TrimSP(Value);
+end;
+
+{==============================================================================}
+
+function FetchEx(var Value: string; const Delimiter, Quotation: string): string;
+var
+  b: Boolean;
+begin
+  Result := '';
+  b := False;
+  while Length(Value) > 0 do
+  begin
+    if b then
+    begin
+      if Pos(Quotation, Value) = 1 then
+        b := False;
+      Result := Result + Value[1];
+      Delete(Value, 1, 1);
+    end
+    else
+    begin
+      if Pos(Delimiter, Value) = 1 then
+      begin
+        Delete(Value, 1, Length(delimiter));
+        break;
+      end;
+      b := Pos(Quotation, Value) = 1;
+      Result := Result + Value[1];
+      Delete(Value, 1, 1);
+    end;
+  end;
+end;
+
+{==============================================================================}
+
+function IsBinaryString(const Value: string): Boolean;
+var
+  n: integer;
+begin
+  Result := False;
+  for n := 1 to Length(Value) do
+    if Value[n] in [#0..#8, #10..#31] then
+      //ignore null-terminated strings
+      if not ((n = Length(value)) and (Value[n] = #0)) then
+      begin
+        Result := True;
+        Break;
+      end;
+end;
+
+{==============================================================================}
+
+function PosCRLF(const Value: AnsiString; var Terminator: AnsiString): integer;
+var
+  n, l: integer;
+begin
+  Result := -1;
+  Terminator := '';
+  l := length(value);
+  for n := 1 to l do
+    if value[n] in [#$0d, #$0a] then
+    begin
+      Result := n;
+      Terminator := Value[n];
+      if n <> l then
+        case value[n] of
+          #$0d:
+            if value[n + 1] = #$0a then
+              Terminator := #$0d + #$0a;
+          #$0a:
+            if value[n + 1] = #$0d then
+              Terminator := #$0a + #$0d;
+        end;
+      Break;
+    end;
+end;
+
+{==============================================================================}
+
+Procedure StringsTrim(const Value: TStrings);
+var
+  n: integer;
+begin
+  for n := Value.Count - 1 downto 0 do
+    if Value[n] = '' then
+      Value.Delete(n)
+    else
+      Break;
+end;
+
+{==============================================================================}
+
+function PosFrom(const SubStr, Value: String; From: integer): integer;
+var
+  ls,lv: integer;
+begin
+  Result := 0;
+  ls := Length(SubStr);
+  lv := Length(Value);
+  if (ls = 0) or (lv = 0) then
+    Exit;
+  if From < 1 then
+    From := 1;
+  while (ls + from - 1) <= (lv) do
+  begin
+    {$IFNDEF CIL}
+    if CompareMem(@SubStr[1],@Value[from],ls) then
+    {$ELSE}
+    if SubStr = copy(Value, from, ls) then
+    {$ENDIF}
+    begin
+      result := from;
+      break;
+    end
+    else
+      inc(from);
+  end;
+end;
+
+{==============================================================================}
+
+{$IFNDEF CIL}
+function IncPoint(const p: pointer; Value: integer): pointer;
+begin
+  Result := PChar(p) + Value;
+end;
+{$ENDIF}
+
+{==============================================================================}
+//improved by 'DoggyDawg'
+function GetBetween(const PairBegin, PairEnd, Value: string): string;
+var
+  n: integer;
+  x: integer;
+  s: string;
+  lenBegin: integer;
+  lenEnd: integer;
+  str: string;
+  max: integer;
+begin
+  lenBegin := Length(PairBegin);
+  lenEnd := Length(PairEnd);
+  n := Length(Value);
+  if (Value = PairBegin + PairEnd) then
+  begin
+    Result := '';//nothing between
+    exit;
+  end;
+  if (n < lenBegin + lenEnd) then
+  begin
+    Result := Value;
+    exit;
+  end;
+  s := SeparateRight(Value, PairBegin);
+  if (s = Value) then
+  begin
+    Result := Value;
+    exit;
+  end;
+  n := Pos(PairEnd, s);
+  if (n = 0) then
+  begin
+    Result := Value;
+    exit;
+  end;
+  Result := '';
+  x := 1;
+  max := Length(s) - lenEnd + 1;
+  for n := 1 to max do
+  begin
+    str := copy(s, n, lenEnd);
+    if (str = PairEnd) then
+    begin
+      Dec(x);
+      if (x <= 0) then
+        Break;
+    end;
+    str := copy(s, n, lenBegin);
+    if (str = PairBegin) then
+      Inc(x);
+    Result := Result + s[n];
+  end;
+end;
+
+{==============================================================================}
+
+function CountOfChar(const Value: string; Chr: char): integer;
+var
+  n: integer;
+begin
+  Result := 0;
+  for n := 1 to Length(Value) do
+    if Value[n] = chr then
+      Inc(Result);
+end;
+
+{==============================================================================}
+// ! do not use AnsiExtractQuotedStr, it's very buggy and can crash application!
+function UnquoteStr(const Value: string; Quote: Char): string;
+var
+  n: integer;
+  inq, dq: Boolean;
+  c, cn: char;
+begin
+  Result := '';
+  if Value = '' then
+    Exit;
+  if Value = Quote + Quote then
+    Exit;
+  inq := False;
+  dq := False;
+  for n := 1 to Length(Value) do
+  begin
+    c := Value[n];
+    if n <> Length(Value) then
+      cn := Value[n + 1]
+    else
+      cn := #0;
+    if c = quote then
+      if dq then
+        dq := False
+      else
+        if not inq then
+          inq := True
+        else
+          if cn = quote then
+          begin
+            Result := Result + Quote;
+            dq := True;
+          end
+          else
+            inq := False
+    else
+      Result := Result + c;
+  end;
+end;
+
+{==============================================================================}
+
+function QuoteStr(const Value: string; Quote: Char): string;
+var
+  n: integer;
+begin
+  Result := '';
+  for n := 1 to length(value) do
+  begin
+    Result := result + Value[n];
+    if value[n] = Quote then
+      Result := Result + Quote;
+  end;
+  Result :=  Quote + Result + Quote;
+end;
+
+{==============================================================================}
+
+procedure HeadersToList(const Value: TStrings);
+var
+  n, x, y: integer;
+  s: string;
+begin
+  for n := 0 to Value.Count -1 do
+  begin
+    s := Value[n];
+    x := Pos(':', s);
+    if x > 0 then
+    begin
+      y:= Pos('=',s); 
+      if not ((y > 0) and (y < x)) then
+      begin
+        s[x] := '=';
+        Value[n] := s;
+      end;
+    end;
+  end;
+end;
+
+{==============================================================================}
+
+procedure ListToHeaders(const Value: TStrings);
+var
+  n, x: integer;
+  s: string;
+begin
+  for n := 0 to Value.Count -1 do
+  begin
+    s := Value[n];
+    x := Pos('=', s);
+    if x > 0 then
+    begin
+      s[x] := ':';
+      Value[n] := s;
+    end;
+  end;
+end;
+
+{==============================================================================}
+
+function SwapBytes(Value: integer): integer;
+var
+  s: string;
+  x, y, xl, yl: Byte;
+begin
+  s := CodeLongInt(Value);
+  x := Ord(s[4]);
+  y := Ord(s[3]);
+  xl := Ord(s[2]);
+  yl := Ord(s[1]);
+  Result := ((x * 256 + y) * 65536) + (xl * 256 + yl);
+end;
+
+{==============================================================================}
+
+function ReadStrFromStream(const Stream: TStream; len: integer): AnsiString;
+var
+  x: integer;
+{$IFDEF CIL}
+  buf: Array of Byte;
+{$ENDIF}
+begin
+{$IFDEF CIL}
+  Setlength(buf, Len);
+  x := Stream.read(buf, Len);
+  SetLength(buf, x);
+  Result := StringOf(Buf);
+{$ELSE}
+  Setlength(Result, Len);
+  x := Stream.read(Pchar(Result)^, Len);
+  SetLength(Result, x);
+{$ENDIF}
+end;
+
+{==============================================================================}
+
+procedure WriteStrToStream(const Stream: TStream; Value: AnsiString);
+{$IFDEF CIL}
+var
+  buf: Array of Byte;
+{$ENDIF}
+begin
+{$IFDEF CIL}
+  buf := BytesOf(Value);
+  Stream.Write(buf,length(Value));
+{$ELSE}
+  Stream.Write(PChar(Value)^, Length(Value));
+{$ENDIF}
+end;
+
+{==============================================================================}
+function GetTempFile(const Dir, prefix: AnsiString): AnsiString;
+{$IFNDEF FPC}
+{$IFDEF WIN32}
+var
+  Path: AnsiString;
+  x: integer;
+{$ENDIF}
+{$ENDIF}
+begin
+{$IFDEF FPC}
+  Result := GetTempFileName(Dir, Prefix);
+{$ELSE}
+  {$IFNDEF WIN32}
+    Result := tempnam(Pointer(Dir), Pointer(prefix));
+  {$ELSE}
+    {$IFDEF CIL}
+  Result := System.IO.Path.GetTempFileName;
+    {$ELSE}
+  if Dir = '' then
+  begin
+    SetLength(Path, MAX_PATH);
+	  x := GetTempPath(Length(Path), PChar(Path));
+  	SetLength(Path, x);
+  end
+  else
+    Path := Dir;
+  x := Length(Path);
+  if Path[x] <> '\' then
+    Path := Path + '\';
+  SetLength(Result, MAX_PATH + 1);
+  GetTempFileName(PChar(Path), PChar(Prefix), 0, PChar(Result));
+  Result := PChar(Result);
+  SetFileattributes(PChar(Result), GetFileAttributes(PChar(Result)) or FILE_ATTRIBUTE_TEMPORARY);
+    {$ENDIF}
+  {$ENDIF}
+{$ENDIF}
+end;
+
+{==============================================================================}
+
+function PadString(const Value: AnsiString; len: integer; Pad: AnsiChar): AnsiString;
+begin
+  if length(value) >= len then
+    Result := Copy(value, 1, len)
+  else
+    Result := Value + StringOfChar(Pad, len - length(value));
+end;
+
+{==============================================================================}
+var
+  n: integer;
+begin
+  for n :=  1 to 12 do
+  begin
+    CustomMonthNames[n] := ShortMonthNames[n];
+    MyMonthNames[0, n] := ShortMonthNames[n];
+  end;
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/Synapse/synsock.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/Synapse/synsock.pas
new file mode 100644
index 0000000..7d6d63d
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/Synapse/synsock.pas	
@@ -0,0 +1,68 @@
+{$IFDEF WIN64}{$DEFINE WIN32}{$ENDIF}
+{==============================================================================|
+| Project : Ararat Synapse                                       | 005.001.000 |
+|==============================================================================|
+| Content: Socket Independent Platform Layer                                   |
+|==============================================================================|
+| Copyright (c)1999-2003, Lukas Gebauer                                        |
+| All rights reserved.                                                         |
+|                                                                              |
+| Redistribution and use in source and binary forms, with or without           |
+| modification, are permitted provided that the following conditions are met:  |
+|                                                                              |
+| Redistributions of source code must retain the above copyright notice, this  |
+| list of conditions and the following disclaimer.                             |
+|                                                                              |
+| Redistributions in binary form must reproduce the above copyright notice,    |
+| this list of conditions and the following disclaimer in the documentation    |
+| and/or other materials provided with the distribution.                       |
+|                                                                              |
+| Neither the name of Lukas Gebauer nor the names of its contributors may      |
+| be used to endorse or promote products derived from this software without    |
+| specific prior written permission.                                           |
+|                                                                              |
+| THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"  |
+| AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE    |
+| IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE   |
+| ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE FOR  |
+| ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL       |
+| DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR   |
+| SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER   |
+| CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT           |
+| LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY    |
+| OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH  |
+| DAMAGE.                                                                      |
+|==============================================================================|
+| The Initial Developer of the Original Code is Lukas Gebauer (Czech Republic).|
+| Portions created by Lukas Gebauer are Copyright (c)2001-2003.                |
+| All Rights Reserved.                                                         |
+|==============================================================================|
+| Contributor(s):                                                              |
+|==============================================================================|
+| History: see HISTORY.HTM from distribution package                           |
+|          (Found at URL: http://www.ararat.cz/synapse/)                       |
+|==============================================================================}
+
+{:@exclude}
+
+unit synsock;
+
+{$MINENUMSIZE 4}
+
+{$IFDEF CIL}
+  {$I ssdotnet.pas}
+{$ENDIF}
+
+{$IFDEF WIN32}
+  {$I sswin32.pas}
+{$ELSE}
+  {$IFDEF FPC}
+    {$I ssfpc.pas}
+  {$ELSE}
+    {$I sslinux.pas}
+  {$ENDIF}
+{$ENDIF}
+
+
+end.
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/Thumbs.db b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/Thumbs.db
new file mode 100644
index 0000000..2946d3d
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/Thumbs.db differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/FPC/uROZLib.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/FPC/uROZLib.pas
new file mode 100644
index 0000000..2102d38
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/FPC/uROZLib.pas	
@@ -0,0 +1,432 @@
+{******************************************************************}
+{                                                                  }
+{       Borland Delphi Supplemental Components                     }
+{       ZLIB Data Compression Interface Unit                       }
+{                                                                  }
+{       Copyright (c) 1997-2002 Borland Software Corporation       }
+{                                                                  }
+{******************************************************************}
+
+unit uROZLib;
+
+{$IFDEF LINUX}
+{$I ../../RemObjects.inc}
+{$ELSE}
+{$I ..\..\RemObjects.inc}
+{$ENDIF LINUX}
+
+interface
+
+uses SysUtils, Classes, zlib;
+
+type
+  // Abstract ancestor class
+  TCustomZlibStream = class(TStream)
+  private
+    FStrm: TStream;
+    FStrmPos: Integer;
+    FOnProgress: TNotifyEvent;
+    FZRec: TZStreamRec;
+    FBuffer: array [Word] of Char;
+  protected
+    procedure Progress(Sender: TObject); dynamic;
+    property OnProgress: TNotifyEvent read FOnProgress write FOnProgress;
+  public
+    constructor Create(Strm: TStream);
+  end;
+
+{ TCompressionStream compresses data on the fly as data is written to it, and
+  stores the compressed data to another stream.
+
+  TCompressionStream is write-only and strictly sequential. Reading from the
+  stream will raise an exception. Using Seek to move the stream pointer
+  will raise an exception.
+
+  Output data is cached internally, written to the output stream only when
+  the internal output buffer is full.  All pending output data is flushed
+  when the stream is destroyed.
+
+  The Position property returns the number of uncompressed bytes of
+  data that have been written to the stream so far.
+
+  CompressionRate returns the on-the-fly percentage by which the original
+  data has been compressed:  (1 - (CompressedBytes / UncompressedBytes)) * 100
+  If raw data size = 100 and compressed data size = 25, the CompressionRate
+  is 75%
+
+  The OnProgress event is called each time the output buffer is filled and
+  written to the output stream.  This is useful for updating a progress
+  indicator when you are writing a large chunk of data to the compression
+  stream in a single call.}
+
+
+  TCompressionLevel = (clNone, clFastest, clDefault, clMax);
+
+  TCompressionStream = class(TCustomZlibStream)
+  private
+    function GetCompressionRate: Single;
+  public
+    constructor Create(CompressionLevel: TCompressionLevel; Dest: TStream);
+    destructor Destroy; override;
+    function Read(var Buffer; Count: Longint): Longint; override;
+    function Write(const Buffer; Count: Longint): Longint; override;
+    function Seek(Offset: Longint; Origin: Word): Longint; override;
+    property CompressionRate: Single read GetCompressionRate;
+    property OnProgress;
+  end;
+
+{ TDecompressionStream decompresses data on the fly as data is read from it.
+
+  Compressed data comes from a separate source stream.  TDecompressionStream
+  is read-only and unidirectional; you can seek forward in the stream, but not
+  backwards.  The special case of setting the stream position to zero is
+  allowed.  Seeking forward decompresses data until the requested position in
+  the uncompressed data has been reached.  Seeking backwards, seeking relative
+  to the end of the stream, requesting the size of the stream, and writing to
+  the stream will raise an exception.
+
+  The Position property returns the number of bytes of uncompressed data that
+  have been read from the stream so far.
+
+  The OnProgress event is called each time the internal input buffer of
+  compressed data is exhausted and the next block is read from the input stream.
+  This is useful for updating a progress indicator when you are reading a
+  large chunk of data from the decompression stream in a single call.}
+
+  TDecompressionStream = class(TCustomZlibStream)
+  public
+    constructor Create(Source: TStream);
+    destructor Destroy; override;
+    function Read(var Buffer; Count: Longint): Longint; override;
+    function Write(const Buffer; Count: Longint): Longint; override;
+    function Seek(Offset: Longint; Origin: Word): Longint; override;
+    property OnProgress;
+  end;
+
+
+
+{ CompressBuf compresses data, buffer to buffer, in one call.
+   In: InBuf = ptr to compressed data
+       InBytes = number of bytes in InBuf
+  Out: OutBuf = ptr to newly allocated buffer containing decompressed data
+       OutBytes = number of bytes in OutBuf   }
+procedure CompressBuf(const InBuf: Pointer; InBytes: Integer;
+                      out OutBuf: Pointer; out OutBytes: Integer);
+
+
+{ DecompressBuf decompresses data, buffer to buffer, in one call.
+   In: InBuf = ptr to compressed data
+       InBytes = number of bytes in InBuf
+       OutEstimate = zero, or est. size of the decompressed data
+  Out: OutBuf = ptr to newly allocated buffer containing decompressed data
+       OutBytes = number of bytes in OutBuf   }
+procedure DecompressBuf(const InBuf: Pointer; InBytes: Integer;
+ OutEstimate: Integer; out OutBuf: Pointer; out OutBytes: Integer);
+
+{ DecompressToUserBuf decompresses data, buffer to buffer, in one call.
+   In: InBuf = ptr to compressed data
+       InBytes = number of bytes in InBuf
+  Out: OutBuf = ptr to user-allocated buffer to contain decompressed data
+       BufSize = number of bytes in OutBuf   }
+procedure DecompressToUserBuf(const InBuf: Pointer; InBytes: Integer;
+  const OutBuf: Pointer; BufSize: Integer);
+
+type
+  EZlibError = class(Exception);
+  ECompressionError = class(EZlibError);
+  EDecompressionError = class(EZlibError);
+
+implementation
+
+resourcestring
+ sTargetBufferTooSmall = 'ZLib: Target buffer may be too small';
+ sInvalidStreamOp = 'ZLib: Invalid stream operation';
+ sError = 'ZLib: Error';
+
+function CCheck(code: Integer): Integer;
+begin
+  Result := code;
+  if code < 0 then
+    raise ECompressionError.Create(sError); //!!
+end;
+
+function DCheck(code: Integer): Integer;
+begin
+  Result := code;
+  if code < 0 then
+    raise EDecompressionError.Create(sError);  //!!
+end;
+
+procedure CompressBuf(const InBuf: Pointer; InBytes: Integer;
+                      out OutBuf: Pointer; out OutBytes: Integer);
+var
+  strm: TZStreamRec;
+  P: Pointer;
+begin
+  FillChar(strm, sizeof(strm), 0);
+  strm.zalloc := zlibAllocMem;
+  strm.zfree := zlibFreeMem;
+  OutBytes := ((InBytes + (InBytes div 10) + 12) + 255) and not 255;
+  GetMem(OutBuf, OutBytes);
+  try
+    strm.next_in := InBuf;
+    strm.avail_in := InBytes;
+    strm.next_out := OutBuf;
+    strm.avail_out := OutBytes;
+    CCheck(deflateInit_(strm, Z_BEST_COMPRESSION, zlib_version, sizeof(strm)));
+    try
+      while CCheck(deflate(strm, Z_FINISH)) <> Z_STREAM_END do
+      begin
+        P := OutBuf;
+        Inc(OutBytes, 256);
+        ReallocMem(OutBuf, OutBytes);
+        strm.next_out := pbytef(pchar(OutBuf) + (pchar(strm.next_out) - pchar(P)));
+        strm.avail_out := 256;
+      end;
+    finally
+      CCheck(deflateEnd(strm));
+    end;
+    ReallocMem(OutBuf, strm.total_out);
+    OutBytes := strm.total_out;
+  except
+    FreeMem(OutBuf);
+    raise
+  end;
+end;
+
+
+procedure DecompressBuf(const InBuf: Pointer; InBytes: Integer;
+  OutEstimate: Integer; out OutBuf: Pointer; out OutBytes: Integer);
+var
+  strm: TZStreamRec;
+  P: Pointer;
+  BufInc: Integer;
+begin
+  FillChar(strm, sizeof(strm), 0);
+  strm.zalloc := zlibAllocMem;
+  strm.zfree := zlibFreeMem;
+  BufInc := (InBytes + 255) and not 255;
+  if OutEstimate = 0 then
+    OutBytes := BufInc
+  else
+    OutBytes := OutEstimate;
+  GetMem(OutBuf, OutBytes);
+  try
+    strm.next_in := InBuf;
+    strm.avail_in := InBytes;
+    strm.next_out := OutBuf;
+    strm.avail_out := OutBytes;
+    DCheck(inflateInit_(strm, zlib_version, sizeof(strm)));
+    try
+      while DCheck(inflate(strm, Z_FINISH)) <> Z_STREAM_END do
+      begin
+        P := OutBuf;
+        Inc(OutBytes, BufInc);
+        ReallocMem(OutBuf, OutBytes);
+        strm.next_out := pbytef(pchar(OutBuf) + (pchar(strm.next_out) - pchar(P)));
+        strm.avail_out := BufInc;
+      end;
+    finally
+      DCheck(inflateEnd(strm));
+    end;
+    ReallocMem(OutBuf, strm.total_out);
+    OutBytes := strm.total_out;
+  except
+    FreeMem(OutBuf);
+    raise
+  end;
+end;
+
+procedure DecompressToUserBuf(const InBuf: Pointer; InBytes: Integer;
+  const OutBuf: Pointer; BufSize: Integer);
+var
+  strm: TZStreamRec;
+begin
+  FillChar(strm, sizeof(strm), 0);
+  strm.zalloc := zlibAllocMem;
+  strm.zfree := zlibFreeMem;
+  strm.next_in := InBuf;
+  strm.avail_in := InBytes;
+  strm.next_out := OutBuf;
+  strm.avail_out := BufSize;
+  DCheck(inflateInit_(strm, zlib_version, sizeof(strm)));
+  try
+    if DCheck(inflate(strm, Z_FINISH)) <> Z_STREAM_END then
+      raise EZlibError.CreateRes(@sTargetBufferTooSmall);
+  finally
+    DCheck(inflateEnd(strm));
+  end;
+end;
+
+// TCustomZlibStream
+
+constructor TCustomZLibStream.Create(Strm: TStream);
+begin
+  inherited Create;
+  FStrm := Strm;
+  FStrmPos := Strm.Position;
+  FZRec.zalloc := zlibAllocMem;
+  FZRec.zfree := zlibFreeMem;
+end;
+
+procedure TCustomZLibStream.Progress(Sender: TObject);
+begin
+  if Assigned(FOnProgress) then FOnProgress(Sender);
+end;
+
+
+// TCompressionStream
+
+constructor TCompressionStream.Create(CompressionLevel: TCompressionLevel;
+  Dest: TStream);
+const
+  Levels: array [TCompressionLevel] of ShortInt =
+    (Z_NO_COMPRESSION, Z_BEST_SPEED, Z_DEFAULT_COMPRESSION, Z_BEST_COMPRESSION);
+begin
+  inherited Create(Dest);
+  FZRec.next_out := pbytef(@FBuffer);
+  FZRec.avail_out := sizeof(FBuffer);
+  CCheck(deflateInit_(FZRec, Levels[CompressionLevel], zlib_version, sizeof(FZRec)));
+end;
+
+destructor TCompressionStream.Destroy;
+begin
+  FZRec.next_in := nil;
+  FZRec.avail_in := 0;
+  try
+    if FStrm.Position <> FStrmPos then FStrm.Position := FStrmPos;
+    while (CCheck(deflate(FZRec, Z_FINISH)) <> Z_STREAM_END)
+      and (FZRec.avail_out = 0) do
+    begin
+      FStrm.WriteBuffer(FBuffer, sizeof(FBuffer));
+      FZRec.next_out := pbytef(@FBuffer);
+      FZRec.avail_out := sizeof(FBuffer);
+    end;
+    if FZRec.avail_out < sizeof(FBuffer) then
+      FStrm.WriteBuffer(FBuffer, sizeof(FBuffer) - FZRec.avail_out);
+  finally
+    deflateEnd(FZRec);
+  end;
+  inherited Destroy;
+end;
+
+function TCompressionStream.Read(var Buffer; Count: Longint): Longint;
+begin
+  Result := 0; // else it's warn
+  raise ECompressionError.CreateRes(@sInvalidStreamOp);
+end;
+
+function TCompressionStream.Write(const Buffer; Count: Longint): Longint;
+begin
+  FZRec.next_in := @Buffer;
+  FZRec.avail_in := Count;
+  if FStrm.Position <> FStrmPos then FStrm.Position := FStrmPos;
+  while (FZRec.avail_in > 0) do
+  begin
+    CCheck(deflate(FZRec, 0));
+    if FZRec.avail_out = 0 then
+    begin
+      FStrm.WriteBuffer(FBuffer, sizeof(FBuffer));
+      FZRec.next_out := pbytef(@FBuffer);
+      FZRec.avail_out := sizeof(FBuffer);
+      FStrmPos := FStrm.Position;
+      Progress(Self);
+    end;
+  end;
+  Result := Count;
+end;
+
+function TCompressionStream.Seek(Offset: Longint; Origin: Word): Longint;
+begin
+  if (Offset = 0) and (Origin = soFromCurrent) then
+    Result := FZRec.total_in
+  else
+    raise ECompressionError.CreateRes(@sInvalidStreamOp);
+end;
+
+function TCompressionStream.GetCompressionRate: Single;
+begin
+  if FZRec.total_in = 0 then
+    Result := 0
+  else
+    Result := (1.0 - (FZRec.total_out / FZRec.total_in)) * 100.0;
+end;
+
+
+// TDecompressionStream
+
+constructor TDecompressionStream.Create(Source: TStream);
+begin
+  inherited Create(Source);
+  FZRec.next_in := pbytef(@FBuffer);
+  FZRec.avail_in := 0;
+  DCheck(inflateInit_(FZRec, zlib_version, sizeof(FZRec)));
+end;
+
+destructor TDecompressionStream.Destroy;
+begin
+  FStrm.Seek(-FZRec.avail_in, 1);
+  inflateEnd(FZRec);
+  inherited Destroy;
+end;
+
+function TDecompressionStream.Read(var Buffer; Count: Longint): Longint;
+begin
+  FZRec.next_out := @Buffer;
+  FZRec.avail_out := Count;
+  if FStrm.Position <> FStrmPos then FStrm.Position := FStrmPos;
+  while (FZRec.avail_out > 0) do
+  begin
+    if FZRec.avail_in = 0 then
+    begin
+      FZRec.avail_in := FStrm.Read(FBuffer, sizeof(FBuffer));
+      if FZRec.avail_in = 0 then
+      begin
+        Result := Count - FZRec.avail_out;
+        Exit;
+      end;
+	  FZRec.next_in := pbytef(@FBuffer);
+      FStrmPos := FStrm.Position;
+      Progress(Self);
+    end;
+    CCheck(inflate(FZRec, 0));
+  end;
+  Result := Count;
+end;
+
+function TDecompressionStream.Write(const Buffer; Count: Longint): Longint;
+begin
+  Result := 0; // else it's warn
+  raise EDecompressionError.CreateRes(@sInvalidStreamOp);
+end;
+
+function TDecompressionStream.Seek(Offset: Longint; Origin: Word): Longint;
+var
+  I: Integer;
+  Buf: array [0..4095] of Char;
+begin
+  if (Offset = 0) and (Origin = soFromBeginning) then
+  begin
+    DCheck(inflateReset(FZRec));
+    FZRec.next_in := pbytef(@FBuffer);
+    FZRec.avail_in := 0;
+    FStrm.Position := 0;
+    FStrmPos := 0;
+  end
+  else if ( (Offset >= 0) and (Origin = soFromCurrent)) or
+          ( ((Offset - FZRec.total_out) > 0) and (Origin = soFromBeginning)) then
+  begin
+    if Origin = soFromBeginning then Dec(Offset, FZRec.total_out);
+    if Offset > 0 then
+    begin
+      for I := 1 to Offset div sizeof(Buf) do
+        ReadBuffer(Buf, sizeof(Buf));
+      ReadBuffer(Buf, Offset mod sizeof(Buf));
+    end;
+  end
+  else
+    raise EDecompressionError.CreateRes(@sInvalidStreamOp);
+  Result := FZRec.total_out;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/adler32.obj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/adler32.obj
new file mode 100644
index 0000000..84d2850
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/adler32.obj differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/compress.obj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/compress.obj
new file mode 100644
index 0000000..90cf74f
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/compress.obj differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/crc32.obj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/crc32.obj
new file mode 100644
index 0000000..ea14153
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/crc32.obj differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/deflate.obj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/deflate.obj
new file mode 100644
index 0000000..3ffc8bc
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/deflate.obj differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/gzio.obj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/gzio.obj
new file mode 100644
index 0000000..ff94037
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/gzio.obj differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/infback.obj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/infback.obj
new file mode 100644
index 0000000..2114f10
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/infback.obj differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/inffast.obj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/inffast.obj
new file mode 100644
index 0000000..c8f5b1f
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/inffast.obj differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/inflate.obj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/inflate.obj
new file mode 100644
index 0000000..4c53c01
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/inflate.obj differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/inftrees.obj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/inftrees.obj
new file mode 100644
index 0000000..c37455e
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/inftrees.obj differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/trees.obj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/trees.obj
new file mode 100644
index 0000000..98a6110
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/trees.obj differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/uROZLib.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/uROZLib.pas
new file mode 100644
index 0000000..08171f0
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/uROZLib.pas	
@@ -0,0 +1,923 @@
+(*
+  License file:
+  The MIT License
+Copyright (c) 2002-2005 Roberto Della Pasqua and previous
+
+Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated documentation files (the "Software"), to deal in the Software without restriction, including without limitation the rights to use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of the Software, and to permit persons to whom the Software is furnished to do so, subject to the following conditions:
+
+The above copyright notice and this permission notice shall be included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+
+*)
+{*****************************************************************************
+*  ZLibEx.pas (zlib 1.2.3)                                                   *
+*                                                                            *
+*  copyright (c) 2002-2005 Roberto Della Pasqua (www.dellapasqua.com)        *
+*  copyright (c) 2000-2002 base2 technologies (www.base2ti.com)              *
+*  copyright (c) 1997 Borland International (www.borland.com)                *
+*                                                                            *
+*  revision history                                                          *
+*    2006.04.21  updated with latest Borland C++ 2006 SP2                    *
+*    2005.02.03  updated with latest zlib 1.2.2, thanks to Fabio Dell'Aria   *
+*                (www.eurekalog.com) for provide me the compiled objects     *
+*                zlib is compiled without crc32-compressBound                *
+*    2003.12.18  updated with latest zlib 1.2.1 (see www.zlib.org)           *
+*                obj's compiled with fastest speed optimizations (bcc 5.6.4) *
+*                (hint:see basm newsgroup about a Move RTL fast replacement) *
+*                Thanks to Cosmin Truta for the pascal zlib reference        *
+*                                                                            *
+*    2002.11.02  ZSendToBrowser: deflate algorithm for HTTP1.1 compression   *
+*    2002.10.24  ZFastCompressString and ZFastDecompressString:300% faster   *
+*    2002.10.15  recompiled zlib 1.1.4 c sources with speed optimizations    *
+*                (and targeting 686+ cpu) and changes to accomodate Borland  *
+*                standards  (C++ v5.6 compiler)                              *
+*    2002.10.15  optimized move mem for not aligned structures  (strings,etc)*
+*    2002.10.15  little changes to avoid system unique string calls          *
+*                                                                            *
+*    2002.03.15  updated to zlib version 1.1.4                               *
+*    2001.11.27  enhanced TZDecompressionStream.Read to adjust source        *
+*                  stream position upon end of compression data              *
+*                fixed endless loop in TZDecompressionStream.Read when       *
+*                  destination count was greater than uncompressed data      *
+*    2001.10.26  renamed unit to integrate "nicely" with delphi 6            *
+*    2000.11.24  added soFromEnd condition to TZDecompressionStream.Seek     *
+*                added ZCompressStream and ZDecompressStream                 *
+*    2000.06.13  optimized, fixed, rewrote, and enhanced the zlib.pas unit   *
+*                  included on the delphi cd (zlib version 1.1.3)            *
+*                                                                            *
+*  acknowledgements                                                          *
+*    erik turner    Z*Stream routines                                        *
+*    david bennion  finding the nastly little endless loop quirk with the    *
+*                     TZDecompressionStream.Read method                      *
+*    burak kalayci  informing me about the zlib 1.1.4 update                 *
+*****************************************************************************}
+
+unit uROZlib;
+
+interface
+
+uses
+  Windows,
+  Sysutils,
+  Classes;
+
+const
+  ZLIB_VERSION = '1.2.3';
+
+type
+  TZAlloc = function(opaque: Pointer; items, size: Integer): Pointer;
+  TZFree = procedure(opaque, block: Pointer);
+  TZCompressionLevel = (clNone, clFastest, clDefault, clMax);
+
+  {** TZStreamRec ***********************************************************}
+
+  TZStreamRec = packed record
+    next_in: PAnsiChar; // next input byte
+    avail_in: Longint; // number of bytes available at next_in
+    total_in: Longint; // total nb of input bytes read so far
+    next_out: PansiChar; // next output byte should be put here
+    avail_out: Longint; // remaining free space at next_out
+    total_out: Longint; // total nb of bytes output so far
+    msg: PAnsiChar; // last error message, NULL if no error
+    state: Pointer; // not visible by applications
+    zalloc: TZAlloc; // used to allocate the internal state
+    zfree: TZFree; // used to free the internal state
+    opaque: Pointer; // private data object passed to zalloc and zfree
+    data_type: Integer; // best guess about the data type: ascii or binary
+    adler: Longint; // adler32 value of the uncompressed data
+    reserved: Longint; // reserved for future use
+  end;
+
+  {** TCustomZStream ********************************************************}
+
+  TCustomZStream = class(TStream)
+  private
+    FStream: TStream;
+    FStreamPos: Integer;
+    FOnProgress: TNotifyEvent;
+    FZStream: TZStreamRec;
+    FBuffer: array[Word] of AnsiChar;
+  protected
+    constructor Create(stream: TStream);
+    procedure DoProgress; dynamic;
+    property OnProgress: TNotifyEvent read FOnProgress write FOnProgress;
+  end;
+
+  {** TZCompressionStream ***************************************************}
+
+  TCompressionStream = class(TCustomZStream)
+  private
+    function GetCompressionRate: Single;
+  public
+    constructor Create(compressionLevel: TZCompressionLevel; dest: TStream);
+    destructor Destroy; override;
+    function Read(var buffer; count: Longint): Longint; override;
+    function Write(const buffer; count: Longint): Longint; override;
+    function Seek(offset: Longint; origin: Word): Longint; override;
+    property CompressionRate: Single read GetCompressionRate;
+    property OnProgress;
+  end;
+
+  {** TZDecompressionStream *************************************************}
+
+  TDecompressionStream = class(TCustomZStream)
+  public
+    constructor Create(source: TStream);
+    destructor Destroy; override;
+    function Read(var buffer; count: Longint): Longint; override;
+    function Write(const buffer; count: Longint): Longint; override;
+    function Seek(offset: Longint; origin: Word): Longint; override;
+    property OnProgress;
+  end;
+
+{** zlib public routines ****************************************************}
+
+{*****************************************************************************
+*  ZCompress                                                                 *
+*                                                                            *
+*  pre-conditions                                                            *
+*    inBuffer  = pointer to uncompressed data                                *
+*    inSize    = size of inBuffer (bytes)                                    *
+*    outBuffer = pointer (unallocated)                                       *
+*    level     = compression level                                           *
+*                                                                            *
+*  post-conditions                                                           *
+*    outBuffer = pointer to compressed data (allocated)                      *
+*    outSize   = size of outBuffer (bytes)                                   *
+*****************************************************************************}
+
+procedure ZCompress(const inBuffer: Pointer; inSize: Integer;
+  out outBuffer: Pointer; out outSize: Integer;
+  level: TZCompressionLevel = clDefault);
+
+{*****************************************************************************
+*  ZDecompress                                                               *
+*                                                                            *
+*  pre-conditions                                                            *
+*    inBuffer    = pointer to compressed data                                *
+*    inSize      = size of inBuffer (bytes)                                  *
+*    outBuffer   = pointer (unallocated)                                     *
+*    outEstimate = estimated size of uncompressed data (bytes)               *
+*                                                                            *
+*  post-conditions                                                           *
+*    outBuffer = pointer to decompressed data (allocated)                    *
+*    outSize   = size of outBuffer (bytes)                                   *
+*****************************************************************************}
+
+procedure ZDecompress(const inBuffer: Pointer; inSize: Integer;
+  out outBuffer: Pointer; out outSize: Integer; outEstimate: Integer = 0);
+
+{** string routines *********************************************************}
+
+function ZCompressStr(const s: string; level: TZCompressionLevel = clDefault): string;
+
+function ZDecompressStr(const s: string): string;
+
+{** stream routines *********************************************************}
+
+procedure ZCompressStream(inStream, outStream: TStream;
+  level: TZCompressionLevel = clDefault);
+
+procedure ZDecompressStream(inStream, outStream: TStream);
+
+{** export routines ********************************************************}
+
+function adler32(adler: LongInt; const buf: PAnsiChar; len: Integer): LongInt;
+procedure MoveI32(const Source; var Dest; Count: Integer);
+procedure ZFastCompressString(var s: ansistring; level: TZCompressionLevel);
+procedure ZFastDecompressString(var s: ansistring);
+procedure ZSendToBrowser(var s: string);
+function deflateInit_(var strm: TZStreamRec; level: Integer; version: PChar; recsize: Integer): Integer;
+function DeflateInit2_(var strm: TZStreamRec; level: integer; method: integer; windowBits: integer; memLevel: integer; strategy: integer; version: PChar; recsize: integer): integer;
+function deflate(var strm: TZStreamRec; flush: Integer): Integer;
+function deflateEnd(var strm: TZStreamRec): Integer;
+function inflateInit_(var strm: TZStreamRec; version: PChar; recsize: Integer): Integer;
+function inflateInit2_(var strm: TZStreamRec; windowBits: integer;  version: PChar; recsize: integer): integer;
+function inflate(var strm: TZStreamRec; flush: Integer): Integer;
+function inflateEnd(var strm: TZStreamRec): Integer;
+function inflateReset(var strm: TZStreamRec): Integer; 
+
+type
+  EZLibError = class(Exception);
+  EZCompressionError = class(EZLibError);
+  EZDecompressionError = class(EZLibError);
+
+implementation
+
+{** link zlib 1.2.3 **************************************************************}
+{** bcc32 -c -6 -O2 -Ve -X -pr -a8 -b -d -k- -vi -tWM -r -RT- -ff *.c **}
+
+{$L adler32.obj}
+{$L deflate.obj}
+{$L infback.obj}
+{$L inffast.obj}
+{$L inflate.obj}
+{$L inftrees.obj}
+{$L trees.obj}
+{$L compress.obj}
+{$L crc32.obj}
+
+{*****************************************************************************
+*  note: do not reorder the above -- doing so will result in external        *
+*  functions being undefined                                                 *
+*****************************************************************************}
+
+const
+  {** flush constants *******************************************************}
+
+  Z_NO_FLUSH = 0;
+  Z_PARTIAL_FLUSH = 1;
+  Z_SYNC_FLUSH = 2;
+  Z_FULL_FLUSH = 3;
+  Z_FINISH = 4;
+
+  {** return codes **********************************************************}
+
+  Z_OK = 0;
+  Z_STREAM_END = 1;
+  Z_NEED_DICT = 2;
+  Z_ERRNO = (-1);
+  Z_STREAM_ERROR = (-2);
+  Z_DATA_ERROR = (-3);
+  Z_MEM_ERROR = (-4);
+  Z_BUF_ERROR = (-5);
+  Z_VERSION_ERROR = (-6);
+
+  {** compression levels ****************************************************}
+
+  Z_NO_COMPRESSION = 0;
+  Z_BEST_SPEED = 1;
+  Z_BEST_COMPRESSION = 9;
+  Z_DEFAULT_COMPRESSION = (-1);
+
+  {** compression strategies ************************************************}
+
+  Z_FILTERED = 1;
+  Z_HUFFMAN_ONLY = 2;
+  Z_DEFAULT_STRATEGY = 0;
+
+  {** data types ************************************************************}
+
+  Z_BINARY = 0;
+  Z_ASCII = 1;
+  Z_UNKNOWN = 2;
+
+  {** compression methods ***************************************************}
+
+  Z_DEFLATED = 8;
+
+  {** return code messages **************************************************}
+
+  _z_errmsg: array[0..9] of PChar = (
+    'need dictionary', // Z_NEED_DICT      (2)
+    'stream end', // Z_STREAM_END     (1)
+    '', // Z_OK             (0)
+    'file error', // Z_ERRNO          (-1)
+    'stream error', // Z_STREAM_ERROR   (-2)
+    'data error', // Z_DATA_ERROR     (-3)
+    'insufficient memory', // Z_MEM_ERROR      (-4)
+    'buffer error', // Z_BUF_ERROR      (-5)
+    'incompatible version', // Z_VERSION_ERROR  (-6)
+    ''
+    );
+
+  ZLevels: array[TZCompressionLevel] of Shortint = (
+    Z_NO_COMPRESSION,
+    Z_BEST_SPEED,
+    Z_DEFAULT_COMPRESSION,
+    Z_BEST_COMPRESSION
+    );
+
+  SZInvalid = 'Invalid ZStream operation!';
+
+{*********************** Peter Morris not aligned move **********************}
+
+procedure MoveI32(const Source; var Dest; Count: Integer); register;
+asm
+        cmp   ECX,0
+        Je    @JustQuit
+        push  ESI
+        push  EDI
+        mov   ESI, EAX
+        mov   EDI, EDX
+    @Loop:
+	Mov   AL, [ESI]
+        Inc   ESI
+        mov   [EDI], AL
+        Inc   EDI
+        Dec   ECX
+        Jnz   @Loop
+        pop   EDI
+        pop   ESI
+    @JustQuit:
+end;
+{****************************************************************************}
+
+{** deflate routines ********************************************************}
+
+function deflateInit_(var strm: TZStreamRec; level: Integer; version: PChar;
+  recsize: Integer): Integer; external;
+
+function DeflateInit2_(var strm: TZStreamRec; level: integer; method: integer; windowBits: integer;
+  memLevel: integer; strategy: integer; version: PChar; recsize: integer): integer; external;
+
+function deflate(var strm: TZStreamRec; flush: Integer): Integer;
+  external;
+
+function deflateEnd(var strm: TZStreamRec): Integer; external;
+
+{** inflate routines ********************************************************}
+
+function inflateInit_(var strm: TZStreamRec; version: PChar;
+  recsize: Integer): Integer; external;
+
+function inflateInit2_(var strm: TZStreamRec; windowBits: integer;
+  version: PChar; recsize: integer): integer; external;
+
+function inflate(var strm: TZStreamRec; flush: Integer): Integer;
+  external;
+
+function inflateEnd(var strm: TZStreamRec): Integer; external;
+
+function inflateReset(var strm: TZStreamRec): Integer; external;
+
+{** utility routines  *******************************************************}
+
+function adler32; external;
+//function crc32; external;
+//function compressBound; external;
+
+{** zlib function implementations *******************************************}
+
+function zcalloc(opaque: Pointer; items, size: Integer): Pointer;
+begin
+  GetMem(result, items * size);
+end;
+
+procedure zcfree(opaque, block: Pointer);
+begin
+  FreeMem(block);
+end;
+
+{** c function implementations **********************************************}
+
+procedure _memset(p: Pointer; b: Byte; count: Integer); cdecl;
+begin
+  FillChar(p^, count, b);
+end;
+
+procedure _memcpy(dest, source: Pointer; count: Integer); cdecl;
+begin
+  Move(source^, dest^, count);
+end;
+
+function _malloc(Size: Integer): Pointer; cdecl;
+begin
+  GetMem(Result, Size);
+end;
+
+procedure _free(Block: Pointer); cdecl;
+begin
+  FreeMem(Block);
+end;
+
+{** custom zlib routines ****************************************************}
+
+function DeflateInit(var stream: TZStreamRec; level: Integer): Integer;
+begin
+  result := DeflateInit_(stream, level, ZLIB_VERSION, SizeOf(TZStreamRec));
+end;
+
+function DeflateInit2(var stream: TZStreamRec; level, method, windowBits,
+  memLevel, strategy: Integer): Integer;
+begin
+  result := DeflateInit2_(stream, level, method, windowBits, memLevel, strategy, ZLIB_VERSION, SizeOf(TZStreamRec));
+end;
+
+function InflateInit(var stream: TZStreamRec): Integer;
+begin
+  result := InflateInit_(stream, ZLIB_VERSION, SizeOf(TZStreamRec));
+end;
+
+function InflateInit2(var stream: TZStreamRec; windowBits: Integer): Integer;
+begin
+  result := InflateInit2_(stream, windowBits, ZLIB_VERSION, SizeOf(TZStreamRec));
+end;
+
+{****************************************************************************}
+
+function ZCompressCheck(code: Integer): Integer;
+begin
+  result := code;
+
+  if code < 0 then
+  begin
+    raise EZCompressionError.Create(_z_errmsg[2 - code]);
+  end;
+end;
+
+function ZDecompressCheck(code: Integer): Integer;
+begin
+  Result := code;
+
+  if code < 0 then
+  begin
+    raise EZDecompressionError.Create(_z_errmsg[2 - code]);
+  end;
+end;
+
+procedure ZCompress(const inBuffer: Pointer; inSize: Integer;
+  out outBuffer: Pointer; out outSize: Integer;
+  level: TZCompressionLevel);
+const
+  delta = 256;
+var
+  zstream: TZStreamRec;
+begin
+  FillChar(zstream, SizeOf(TZStreamRec), 0);
+
+  outSize := ((inSize + (inSize div 10) + 12) + 255) and not 255;
+  GetMem(outBuffer, outSize);
+
+  try
+    zstream.next_in := inBuffer;
+    zstream.avail_in := inSize;
+    zstream.next_out := outBuffer;
+    zstream.avail_out := outSize;
+
+    ZCompressCheck(DeflateInit(zstream, ZLevels[level]));
+
+    try
+      while ZCompressCheck(deflate(zstream, Z_FINISH)) <> Z_STREAM_END do
+      begin
+        Inc(outSize, delta);
+        ReallocMem(outBuffer, outSize);
+
+        zstream.next_out := PAnsiChar(Integer(outBuffer) + zstream.total_out);
+        zstream.avail_out := delta;
+      end;
+    finally
+      ZCompressCheck(deflateEnd(zstream));
+    end;
+
+    ReallocMem(outBuffer, zstream.total_out);
+    outSize := zstream.total_out;
+  except
+    FreeMem(outBuffer);
+    raise;
+  end;
+end;
+
+procedure ZCompress2(const inBuffer: Pointer; inSize: Integer;
+  out outBuffer: Pointer; out outSize: Integer);
+const
+  delta = 256;
+var
+  zstream: TZStreamRec;
+begin
+  FillChar(zstream, SizeOf(TZStreamRec), 0);
+
+  outSize := ((inSize + (inSize div 10) + 12) + 255) and not 255;
+  GetMem(outBuffer, outSize);
+
+  try
+    zstream.next_in := inBuffer;
+    zstream.avail_in := inSize;
+    zstream.next_out := outBuffer;
+    zstream.avail_out := outSize;
+
+    ZCompressCheck(DeflateInit2(zstream, 1, 8, -15, 9, 0));
+
+    try
+      while ZCompressCheck(deflate(zstream, Z_FINISH)) <> Z_STREAM_END do
+      begin
+        Inc(outSize, delta);
+        ReallocMem(outBuffer, outSize);
+
+        zstream.next_out := PAnsiChar(Integer(outBuffer) + zstream.total_out);
+        zstream.avail_out := delta;
+      end;
+    finally
+      ZCompressCheck(deflateEnd(zstream));
+    end;
+
+    ReallocMem(outBuffer, zstream.total_out);
+    outSize := zstream.total_out;
+  except
+    FreeMem(outBuffer);
+    raise;
+  end;
+end;
+
+procedure ZDecompress(const inBuffer: Pointer; inSize: Integer;
+  out outBuffer: Pointer; out outSize: Integer; outEstimate: Integer);
+var
+  zstream: TZStreamRec;
+  delta: Integer;
+begin
+  FillChar(zstream, SizeOf(TZStreamRec), 0);
+
+  delta := (inSize + 255) and not 255;
+
+  if outEstimate = 0 then outSize := delta
+  else outSize := outEstimate;
+
+  GetMem(outBuffer, outSize);
+
+  try
+    zstream.next_in := inBuffer;
+    zstream.avail_in := inSize;
+    zstream.next_out := outBuffer;
+    zstream.avail_out := outSize;
+
+    ZDecompressCheck(InflateInit(zstream));
+
+    try
+      while ZDecompressCheck(inflate(zstream, Z_NO_FLUSH)) <> Z_STREAM_END do
+      begin
+        Inc(outSize, delta);
+        ReallocMem(outBuffer, outSize);
+
+        zstream.next_out := PAnsiChar(Integer(outBuffer) + zstream.total_out);
+        zstream.avail_out := delta;
+      end;
+    finally
+      ZDecompressCheck(inflateEnd(zstream));
+    end;
+
+    ReallocMem(outBuffer, zstream.total_out);
+    outSize := zstream.total_out;
+  except
+    FreeMem(outBuffer);
+    raise;
+  end;
+end;
+
+{** string routines *********************************************************}
+
+function ZCompressStr(const s: string; level: TZCompressionLevel): string;
+var
+  buffer: Pointer;
+  size: Integer;
+begin
+  ZCompress(PChar(s), Length(s), buffer, size, level);
+  SetLength(result, size);
+  Move(buffer^, pointer(result)^, size);
+  FreeMem(buffer);
+end;
+
+procedure ZFastCompressString(var s: ansistring; level: TZCompressionLevel);
+var
+  outBuf: Pointer;
+  outBytes: Integer;
+begin
+  ZCompress(pointer(s), length(s), outBuf, outBytes, level);
+  SetLength(s, outBytes);
+  MoveI32(pointer(outBuf)^, pointer(s)^, outBytes);
+  FreeMem(outBuf);
+end;
+
+procedure ZFastDecompressString(var s: ansistring);
+var
+  outBuf: Pointer;
+  outBytes: Integer;
+begin
+  ZDecompress(pointer(s), Length(s), outBuf, outBytes);
+  SetLength(s, outBytes);
+  MoveI32(pointer(outBuf)^, pointer(s)^, outBytes);
+  FreeMem(outBuf);
+end;
+
+procedure ZSendToBrowser(var s: string);
+var
+  outBuf: Pointer;
+  outBytes: Integer;
+begin
+  ZCompress2(pointer(s), length(s), outBuf, outBytes);
+  SetLength(s, outBytes);
+  Move(pointer(outBuf)^, pointer(s)^, outBytes);
+  FreeMem(outBuf);
+end;
+
+function ZDecompressStr(const s: string): string;
+var
+  buffer: Pointer;
+  size: Integer;
+begin
+  ZDecompress(PChar(s), Length(s), buffer, size);
+  SetLength(result, size);
+  Move(buffer^, pointer(result)^, size);
+  FreeMem(buffer);
+end;
+
+{** stream routines *********************************************************}
+
+procedure ZCompressStream(inStream, outStream: TStream;
+  level: TZCompressionLevel);
+const
+  bufferSize = 32768;
+var
+  zstream: TZStreamRec;
+  zresult: Integer;
+  inBuffer: array[0..bufferSize - 1] of AnsiChar;
+  outBuffer: array[0..bufferSize - 1] of AnsiChar;
+  inSize: Integer;
+  outSize: Integer;
+begin
+  FillChar(zstream, SizeOf(TZStreamRec), 0);
+
+  ZCompressCheck(DeflateInit(zstream, ZLevels[level]));
+
+  inSize := inStream.Read(inBuffer, bufferSize);
+
+  while inSize > 0 do
+  begin
+    zstream.next_in := inBuffer;
+    zstream.avail_in := inSize;
+
+    repeat
+      zstream.next_out := outBuffer;
+      zstream.avail_out := bufferSize;
+
+      ZCompressCheck(deflate(zstream, Z_NO_FLUSH));
+
+      // outSize := zstream.next_out - outBuffer;
+      outSize := bufferSize - zstream.avail_out;
+
+      outStream.Write(outBuffer, outSize);
+    until (zstream.avail_in = 0) and (zstream.avail_out > 0);
+
+    inSize := inStream.Read(inBuffer, bufferSize);
+  end;
+
+  repeat
+    zstream.next_out := outBuffer;
+    zstream.avail_out := bufferSize;
+
+    zresult := ZCompressCheck(deflate(zstream, Z_FINISH));
+
+    // outSize := zstream.next_out - outBuffer;
+    outSize := bufferSize - zstream.avail_out;
+
+    outStream.Write(outBuffer, outSize);
+  until (zresult = Z_STREAM_END) and (zstream.avail_out > 0);
+
+  ZCompressCheck(deflateEnd(zstream));
+end;
+
+procedure ZDecompressStream(inStream, outStream: TStream);
+const
+  bufferSize = 32768;
+var
+  zstream: TZStreamRec;
+  zresult: Integer;
+  inBuffer: array[0..bufferSize - 1] of AnsiChar;
+  outBuffer: array[0..bufferSize - 1] of AnsiChar;
+  inSize: Integer;
+  outSize: Integer;
+begin
+  FillChar(zstream, SizeOf(TZStreamRec), 0);
+
+  ZCompressCheck(InflateInit(zstream));
+
+  inSize := inStream.Read(inBuffer, bufferSize);
+
+  while inSize > 0 do
+  begin
+    zstream.next_in := inBuffer;
+    zstream.avail_in := inSize;
+
+    repeat
+      zstream.next_out := outBuffer;
+      zstream.avail_out := bufferSize;
+      
+      ZCompressCheck(inflate(zstream, Z_NO_FLUSH));
+
+      // outSize := zstream.next_out - outBuffer;
+      outSize := bufferSize - zstream.avail_out;
+
+      outStream.Write(outBuffer, outSize);
+    until (zstream.avail_in = 0);
+
+    inSize := inStream.Read(inBuffer, bufferSize);
+  end;
+
+  repeat
+    zstream.next_out := outBuffer;
+    zstream.avail_out := bufferSize;
+
+    zresult := ZCompressCheck(inflate(zstream, Z_FINISH));
+
+    // outSize := zstream.next_out - outBuffer;
+    outSize := bufferSize - zstream.avail_out;
+
+    outStream.Write(outBuffer, outSize);
+  until (zresult = Z_STREAM_END) and (zstream.avail_out > 0);
+
+  ZCompressCheck(inflateEnd(zstream));
+end;
+
+{** TCustomZStream **********************************************************}
+
+constructor TCustomZStream.Create(stream: TStream);
+begin
+  inherited Create;
+  FStream := stream;
+  FStreamPos := stream.Position;
+end;
+
+procedure TCustomZStream.DoProgress;
+begin
+  if Assigned(FOnProgress) then FOnProgress(Self);
+end;
+
+{** TZCompressionStream *****************************************************}
+
+constructor TCompressionStream.Create(compressionLevel: TZCompressionLevel; dest: TStream);
+begin
+  inherited Create(dest);
+
+  FZStream.next_out := FBuffer;
+  FZStream.avail_out := SizeOf(FBuffer);
+
+  ZCompressCheck(DeflateInit(FZStream, ZLevels[compressionLevel]));
+end;
+
+destructor TCompressionStream.Destroy;
+begin
+  FZStream.next_in := nil;
+  FZStream.avail_in := 0;
+
+  try
+    if FStream.Position <> FStreamPos then FStream.Position := FStreamPos;
+
+    while ZCompressCheck(deflate(FZStream, Z_FINISH)) <> Z_STREAM_END do
+    begin
+      FStream.WriteBuffer(FBuffer, SizeOf(FBuffer) - FZStream.avail_out);
+
+      FZStream.next_out := FBuffer;
+      FZStream.avail_out := SizeOf(FBuffer);
+    end;
+
+    if FZStream.avail_out < SizeOf(FBuffer) then
+    begin
+      FStream.WriteBuffer(FBuffer, SizeOf(FBuffer) - FZStream.avail_out);
+    end;
+  finally
+    deflateEnd(FZStream);
+  end;
+
+  inherited Destroy;
+end;
+
+function TCompressionStream.Read(var buffer; count: Longint): Longint;
+begin
+  raise EZCompressionError.Create(SZInvalid);
+end;
+
+function TCompressionStream.Write(const buffer; count: Longint): Longint;
+begin
+  FZStream.next_in := @buffer;
+  FZStream.avail_in := count;
+
+  if FStream.Position <> FStreamPos then FStream.Position := FStreamPos;
+
+  while FZStream.avail_in > 0 do
+  begin
+    ZCompressCheck(deflate(FZStream, Z_NO_FLUSH));
+
+    if FZStream.avail_out = 0 then
+    begin
+      FStream.WriteBuffer(FBuffer, SizeOf(FBuffer));
+
+      FZStream.next_out := FBuffer;
+      FZStream.avail_out := SizeOf(FBuffer);
+
+      FStreamPos := FStream.Position;
+
+      DoProgress;
+    end;
+  end;
+
+  result := Count;
+end;
+
+function TCompressionStream.Seek(offset: Longint; origin: Word): Longint;
+begin
+  if (offset = 0) and (origin = soFromCurrent) then
+  begin
+    result := FZStream.total_in;
+  end
+  else raise EZCompressionError.Create(SZInvalid);
+end;
+
+function TCompressionStream.GetCompressionRate: Single;
+begin
+  if FZStream.total_in = 0 then result := 0
+  else result := (1.0 - (FZStream.total_out / FZStream.total_in)) * 100.0;
+end;
+
+{** TZDecompressionStream ***************************************************}
+
+constructor TDecompressionStream.Create(source: TStream);
+begin
+  inherited Create(source);
+  FZStream.next_in := FBuffer;
+  FZStream.avail_in := 0;
+  ZDecompressCheck(InflateInit(FZStream));
+end;
+
+destructor TDecompressionStream.Destroy;
+begin
+  inflateEnd(FZStream);
+  inherited Destroy;
+end;
+
+function TDecompressionStream.Read(var buffer; count: Longint): Longint;
+var
+  zresult: Integer;
+begin
+  FZStream.next_out := @buffer;
+  FZStream.avail_out := count;
+
+  if FStream.Position <> FStreamPos then FStream.Position := FStreamPos;
+
+  zresult := Z_OK;
+
+  while (FZStream.avail_out > 0) and (zresult <> Z_STREAM_END) do
+  begin
+    if FZStream.avail_in = 0 then
+    begin
+      FZStream.avail_in := FStream.Read(FBuffer, SizeOf(FBuffer));
+
+      if FZStream.avail_in = 0 then
+      begin
+        result := count - FZStream.avail_out;
+
+        Exit;
+      end;
+
+      FZStream.next_in := FBuffer;
+      FStreamPos := FStream.Position;
+
+      DoProgress;
+    end;
+
+    zresult := ZDecompressCheck(inflate(FZStream, Z_NO_FLUSH));
+  end;
+
+  if (zresult = Z_STREAM_END) and (FZStream.avail_in > 0) then
+  begin
+    FStream.Position := FStream.Position - FZStream.avail_in;
+    FStreamPos := FStream.Position;
+
+    FZStream.avail_in := 0;
+  end;
+
+  result := count - FZStream.avail_out;
+end;
+
+function TDecompressionStream.Write(const Buffer; Count: Longint): Longint;
+begin
+  raise EZDecompressionError.Create(SZInvalid);
+end;
+
+function TDecompressionStream.Seek(Offset: Longint; Origin: Word): Longint;
+var
+  buf: array[0..8191] of Byte;
+  i: Integer;
+begin
+  if (offset = 0) and (origin = soFromBeginning) then
+  begin
+    ZDecompressCheck(inflateReset(FZStream));
+
+    FZStream.next_in := FBuffer;
+    FZStream.avail_in := 0;
+
+    FStream.Position := 0;
+    FStreamPos := 0;
+  end
+  else if ((offset >= 0) and (origin = soFromCurrent)) or
+    (((offset - FZStream.total_out) > 0) and (origin = soFromBeginning)) then
+  begin
+    if origin = soFromBeginning then Dec(offset, FZStream.total_out);
+
+    if offset > 0 then
+    begin
+      for i := 1 to offset div SizeOf(buf) do ReadBuffer(buf, SizeOf(buf));
+      ReadBuffer(buf, offset mod SizeOf(buf));
+    end;
+  end
+  else if (offset = 0) and (origin = soFromEnd) then
+  begin
+    while Read(buf, SizeOf(buf)) > 0 do ;
+  end
+  else raise EZDecompressionError.Create(SZInvalid);
+
+  result := FZStream.total_out;
+end;
+
+end.
+
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/uncompr.obj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/uncompr.obj
new file mode 100644
index 0000000..12cd70b
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/uncompr.obj differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/zutil.obj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/zutil.obj
new file mode 100644
index 0000000..9395409
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/ZLib/zutil.obj differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/eDefines.inc b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/eDefines.inc
new file mode 100644
index 0000000..90b17b7
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/eDefines.inc	
@@ -0,0 +1,459 @@
+{----------------------------------------------------------------------------}
+{file:      eDefines.inc                                                     }
+{type:      Delphi include file                                              }
+{                                                                            }
+{compiler:  Borland Pascal 7,                                                }
+{           Delphi 1-7, 2005-2007 for Win32                                  }
+{           Kylix 1-3,                                                       }
+{           C++Builder 1-6, 2006-2007                                        }
+{           Free Pascal Compiler 2.x                                         }
+{                                                                            }
+{platforms: DOS, DPMI, Win16, Win32, Win64, Linux, Mac OS X                  }
+{                                                                            }
+{author:    mh@elitedev.com                                                  }
+{                                                                            }
+{contents:  Defines that can be flexibily used to determine the exact        }
+{           compiler version used.                                           }
+{                                                                            }
+{(c)opyright elitedevelopments software. all rights reserved.                }
+{            http://www.elitedev.com                                         }
+{                                                                            }
+{ Third Party component developers are encouraged to use the set of defines  }
+{ established in this file, rather then their own system, for checking their }
+{ component libraries agains different versions of Delphi and C++Builder.    }
+{                                                                            }
+{ This file may be distributed freely with both free and commercial source   }
+{ libraries, but you are asked to please leave this comment in place, and    }
+{ to return any improvements you make to this file to the maintainer that    }
+{ is noted above.                                                            }
+{----------------------------------------------------------------------------}
+
+{----------------------------------------------------------------------------}
+{ Compiler and OS version defines:                                           }
+{                                                                            }
+{ exact compiler versions:                                                   }
+{                                                                            }
+{ BP7             Borland Pascal 7.0                                         }
+{ DELPHI1         Delphi 1.0 (any Delphi)                                    }
+{ DELPHI2         Delphi 2.0                                                 }
+{ DELPHI3         Delphi 3.0                                                 }
+{ DELPHI4         Delphi 4.0                                                 }
+{ DELPHI5         Delphi 5.0                                                 }
+{ DELPHI6         Delphi 6.0                                                 }
+{ DELPHI7         Delphi 7.0                                                 }
+{ DELPHI9         Delphi 2005                                                }
+{ DELPHI2005      Delphi 2005                                                }
+{ DELPHI2006      Delphi 2006                                                }
+{ DELPHI2007      Delphi 2007                                                }
+{ KYLIX1          Kylix 1.0                                                  }
+{ KYLIX2          Kylix 2.0                                                  }
+{ KYLIX3          Kylix 3.0                                                  }
+{ CBUILDER1       C++Builder 1.0                                             }
+{ CBUILDER3       C++Builder 3.0                                             }
+{ CBUILDER4       C++Builder 4.0                                             }
+{ CBUILDER5       C++Builder 5.0                                             }
+{                                                                            }
+{                                                                            }
+{ minimum compiler versions:                                                 }
+{                                                                            }
+{ DELPHI1UP       Delphi 1.0 and above (any Delphi)                          }
+{ DELPHI2UP       Delphi 2.0 and above                                       }
+{ DELPHI3UP       Delphi 3.0 and above                                       }
+{ DELPHI4UP       Delphi 4.0 and above                                       }
+{ DELPHI5UP       Delphi 5.0 and above                                       }
+{ DELPHI6UP       Delphi 6.0 and above                                       }
+{ DELPHI7UP       Delphi 7.0 and above                                       }
+{ DELPHI9UP       Delphi 9.0 (2005) and above                                }
+{ DELPHI10UP      Delphi 10.0 (2006) and above                               }
+{ DELPHI11UP      Delphi 11.0 (2007) and above                               }
+{ DELPHI2005UP    Delphi 2005 and above                                      }
+{ DELPHI2006UP    Delphi 2006 and above                                      }
+{ DELPHI2007UP    Delphi 2007 and above                                      }
+{ KYLIX1UP        Kylix 1.0 and above (any Kylix)                            }
+{ KYLIX2UP        Kylix 2.0 and above (any Kylix)                            }
+{ KYLIX3UP        Kylix 3.0 and above (any Kylix)                            }
+{ CBUILDER1UP     C++Builder 1.0 and above or Delphi 2 and above             }
+{ CBUILDER3UP     C++Builder 3.0 and above or Delphi 3.0 and above           }
+{ CBUILDER4UP     C++Builder 4.0 and above or Delphi 4.0 and above           }
+{ CBUILDER5UP     C++Builder 5.0 and above or Delphi 5.0 and above           }
+{ CBUILDER6UP     C++Builder 5.0 and above or Delphi 5.0 and above           }
+{                                                                            }
+{                                                                            }
+{ compiler types:                                                            }
+{                                                                            }
+{ BP              Borland Pascal (not Delphi or C++Builder)                  }
+{ DELPHI          any Delphi version (but not C++Builder or Kylix)           }
+{ KYLIX           any Kylix version (not Delphi or C++Builder for Windows)   }
+{ CBUILDER        any C++Builder for Windows (Pascal)                        }
+{                                                                            }
+{                                                                            }
+{ target platforms compiler types:                                           }
+{                                                                            }
+{ DELPHI_16BIT    16bit Delphi (but not C++Builder!)                         }
+{ DELPHI_32BIT    32bit Delphi (but not C++Builder)                          }
+{ KYLIX_32BIT     32bit Kylix (but not C++Builder)                           }
+{ CBUILDER_32BIT  32bit C++Builer's Pascal (but not Delphi)                  }
+{                                                                            }
+{                                                                            }
+{ target cpu types                                                           }
+{                                                                            }
+{ CPU16           16bit Delphi or Borland Pascal                             }
+{ CPU32           32bit Delphi or Free Pascal                                }
+{ CPU64           64bit Free Pascal                                          }
+{                                                                            }
+{ target platforms                                                           }
+{                                                                            }
+{ DOS             any DOS (plain and DPMI)                                   }
+{ REALMODE        16bit realmode DOS                                         }
+{ PROTECTEDMODE   16bit DPMI DOS                                             }
+{                                                                            }
+{ MSWINDOWS       any Windows platform                                       }
+{ WIN16           16bit Windows                                              }
+{ WIN32           32bit Windows                                              }
+{ WIN64           64bit Windows                                              }
+{ DOTNET          .NET                                                       }
+{                                                                            }
+{ LINUX           any Linux platform                                         }
+{ LINUX32         32bit Linux                                                }
+{ LINUX64         64bit Linux                                                }
+{                                                                            }
+{ DARWIN          Any Mac OS X                                               }
+{ DARWIN32        32bit Mac OS X                                             }
+{ DARWIN64        64bit Mac OS X                                             }
+{----------------------------------------------------------------------------}
+
+{ defines for Borland Pascal 7.0 }
+{$IFDEF VER70}
+  {$DEFINE BP}
+  {$DEFINE BP7}
+  {$DEFINE 16BIT}
+  {$DEFINE CPU16}
+
+  { defines for BP7 DOS real mode }
+  {$IFDEF MSDOS}
+    {$DEFINE DOS}
+    {$DEFINE REALMODE}
+  {$ENDIF}
+
+  { defines for BP7 DOS protected mode }
+  {$IFDEF DPMI}
+    {$DEFINE DOS}
+    {$DEFINE PROTECTEDMODE}
+  {$ENDIF}
+
+  { defines for BP7 Windows }
+  {$IFDEF WINDOWS}
+    {$DEFINE MSWINDOWS}
+    {$DEFINE WIN16}
+  {$ENDIF}
+{$ENDIF}
+
+{ defines for Delphi 1.0 thru 7.0 }
+{$IFDEF MSWINDOWS}
+
+  { defines for Delphi 1.0 }
+  {$IFDEF VER80}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI1}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI_16BIT}
+    {$DEFINE WIN16}
+    {$DEFINE 16BIT}
+    {$DEFINE CPU16}
+  {$ENDIF}
+
+  { defines for Delphi 2.0 }
+  {$IFDEF VER90}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI2}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+  {$ENDIF}
+
+  { defines for C++Builder 1.0 }
+  {$IFDEF VER93}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE CBUILDER}
+    {$DEFINE CBUILDER1}
+    {$DEFINE CBUILDER1UP}
+  {$ENDIF}
+
+  { defines for Delphi 3.0 }
+  {$IFDEF VER100}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI3}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+  {$ENDIF}
+
+  { defines for C++Builder 3.0 }
+  {$IFDEF VER110}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE CBUILDER}
+    {$DEFINE CBUILDER3}
+    {$DEFINE CBUILDER1UP}
+    {$DEFINE CBUILDER3UP}
+  {$ENDIF}
+
+  { defines for Delphi 4.0 }
+  {$IFDEF VER120}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI4}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+  {$ENDIF}
+
+  { defines for C++Builder 4.0 }
+  {$IFDEF VER125}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+    {$DEFINE CBUILDER}
+    {$DEFINE CBUILDER4}
+    {$DEFINE CBUILDER1UP}
+    {$DEFINE CBUILDER3UP}
+    {$DEFINE CBUILDER4UP}
+  {$ENDIF}
+  { defines for Delphi 5.0 }
+  {$IFDEF VER130}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI5}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+    {$DEFINE DELPHI5UP}
+  {$ENDIF}
+
+  { defines for C++Builder 5.0 }
+  {$IFDEF VER135}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+    {$DEFINE DELPHI5UP}
+    {$DEFINE CBUILDER}
+    {$DEFINE CBUILDER5}
+    {$DEFINE CBUILDER1UP}
+    {$DEFINE CBUILDER3UP}
+    {$DEFINE CBUILDER4UP}
+    {$DEFINE CBUILDER5UP}
+  {$ENDIF}
+
+  { defines for Delphi 6.0 }
+  {$IFDEF VER140}
+    {$DEFINE VER140UP}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI6}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+    {$DEFINE DELPHI5UP}
+    {$DEFINE DELPHI6UP}
+  {$ENDIF}
+
+  { defines for Delphi 7.0 }
+  {$IFDEF VER150}
+    {$DEFINE VER140UP}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI7}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+    {$DEFINE DELPHI5UP}
+    {$DEFINE DELPHI6UP}
+    {$DEFINE DELPHI7UP}
+  {$ENDIF}
+
+  { defines for Delphi 2005 }
+  {$IFDEF VER170}
+    {$DEFINE VER140UP}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI9}
+    {$DEFINE DELPHI2005}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+    {$DEFINE DELPHI5UP}
+    {$DEFINE DELPHI6UP}
+    {$DEFINE DELPHI7UP}
+    {$DEFINE DELPHI9UP}
+    {$DEFINE DELPHI2005UP}
+    {$DEFINE BDS}
+    {$DEFINE BDS3}
+    {$DEFINE BDS3UP}
+  {$ENDIF}
+
+  { defines for Delphi 2006 }
+  {$IFDEF VER180}
+    {$DEFINE VER140UP}
+    {$DEFINE DELPHI}
+    {$DEFINE DELPHI10}
+    {$DEFINE DELPHI10A}  
+    {$DEFINE DELPHI2006}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+    {$DEFINE DELPHI5UP}
+    {$DEFINE DELPHI6UP}
+    {$DEFINE DELPHI7UP}
+    {$DEFINE DELPHI9UP}
+    {$DEFINE DELPHI10UP}
+    {$DEFINE DELPHI2005UP}
+    {$DEFINE DELPHI2006UP}
+    {$DEFINE BDS}
+    {$DEFINE BDS4}
+    {$DEFINE BDS3UP}
+    {$DEFINE BDS4UP}
+  {$ENDIF}
+
+  { defines for Delphi 2007 }
+  {$IFDEF VER185}
+    {$UNDEF DELPHI10A}  // declared in VER180
+    {$UNDEF DELPHI2006} // declared in VER180
+    {$UNDEF BDS4}       // declared in VER180
+
+    {$DEFINE DELPHI10B}    
+    {$DEFINE DELPHI10BUP}    
+    {$DEFINE DELPHI11}    
+    {$DEFINE DELPHI11UP}    
+    {$DEFINE DELPHI2007}
+    {$DEFINE DELPHI2007UP}    
+    {$DEFINE BDS5}
+    {$DEFINE BDS5UP}
+  {$ENDIF}
+
+  { defines for Delphi 2009 }
+  {$IFDEF VER200}
+    {$DEFINE VER140UP}
+    {$DEFINE DELPHI}
+
+    {$DEFINE DELPHI12}
+    {$DEFINE DELPHI1UP}
+    {$DEFINE DELPHI2UP}
+    {$DEFINE DELPHI3UP}
+    {$DEFINE DELPHI4UP}
+    {$DEFINE DELPHI5UP}
+    {$DEFINE DELPHI6UP}
+    {$DEFINE DELPHI7UP}
+    {$DEFINE DELPHI9UP}
+    {$DEFINE DELPHI10UP}
+    {$DEFINE DELPHI11UP}
+    {$DEFINE DELPHI12UP}
+
+    {$DEFINE DELPHI2009}
+    {$DEFINE DELPHI2005UP}
+    {$DEFINE DELPHI2006UP}
+    {$DEFINE DELPHI2007UP}
+    {$DEFINE DELPHI2009UP}
+
+    {$DEFINE BDS}
+    {$DEFINE BDS6}
+    {$DEFINE BDS3UP}
+    {$DEFINE BDS4UP}
+    {$DEFINE BDS5UP}
+    {$DEFINE BDS6UP}
+    {$DEFINE BDS6}
+    {$DEFINE BDS6UP}
+  {$ENDIF}
+
+  {$IFDEF WIN32}
+    {$DEFINE MSWINDOWS} //not automatically defined for Delphi 2 thru 5
+    {$DEFINE 32BIT}
+    {$DEFINE CPU32}
+  {$ENDIF}
+
+{$ENDIF MSWINDOWS}
+
+{ defines for "Delphi for .NET" }
+{$IFDEF CLR}
+  {$DEFINE DOTNET}
+{$ENDIF}
+
+{$IFDEF DELPHI}
+  {$IFDEF DELPHI2UP}
+    {$DEFINE DELPHI_32BIT}
+  {$ENDIF}
+{$ENDIF}
+
+{$IFDEF CBUILDER}
+  {$DEFINE CBUILDER_32BIT}
+{$ENDIF}
+
+{$IFNDEF FPC}
+
+  { Kylix 1.0 thru 3.0 }
+  {$IFDEF LINUX}
+
+    {$DEFINE VER140UP}
+
+    { Any Kylix }
+    {$DEFINE 32BIT}
+    {$DEFINE LINUX32}
+    {$DEFINE KYLIX_32BIT}
+    {$DEFINE KYLIX}
+    {$DEFINE KYLIX1UP}
+
+    {$IFDEF CONDITIONALEXPRESSIONS}
+      {$IF Declared(CompilerVersion)}
+
+         { Kylix 2.0 }
+         {$IF Declared(RTLVersion) and (RTLVersion = 14.1)}
+           {$DEFINE KYLIX2}
+           {$DEFINE KYLIX1UP}
+           {$DEFINE KYLIX2UP}
+         {$IFEND}
+
+         { Kylix 3.0 - Delphi portion }
+         {$IF Declared(RTLVersion) and (RTLVersion = 14.5)}
+           {$DEFINE KYLIX3}
+           {$DEFINE KYLIX1UP}
+           {$DEFINE KYLIX2UP}
+           {$DEFINE KYLIX3UP}
+         {$IFEND}
+
+      { Kylix 1.0 }
+      {$ELSE}
+        {$DEFINE KYLIX1}
+      {$IFEND}
+    {$ENDIF CONDITIONALEXPRESSIONS}
+
+  {$ENDIF LINUX}
+{$ENDIF}
+
+{ CPU }
+
+{$IFDEF FPC}
+  {$IFDEF MSWINDOWS}
+    {$IFDEF CPU64}
+      {$DEFINE WIN64}
+    {$ENDIF}
+  {$ENDIF}
+  {$IFDEF LINUX}
+    {$IFDEF CPU32}
+      {$DEFINE LINUX32}
+    {$ENDIF}
+    {$IFDEF CPU64}
+      {$DEFINE LINUX64}
+    {$ENDIF}
+  {$ENDIF}
+  {$IFDEF DARWIN}
+    {$IFDEF CPU32}
+      {$DEFINE DARWIN32}
+    {$ENDIF}
+    {$IFDEF CPU64}
+      {$DEFINE DARWIN64}
+    {$ENDIF}
+  {$ENDIF}
+{$ENDIF}
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uIPAsyncHttpServer.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uIPAsyncHttpServer.pas
new file mode 100644
index 0000000..d440946
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uIPAsyncHttpServer.pas	
@@ -0,0 +1,538 @@
+unit uIPAsyncHttpServer;
+
+interface
+
+{$I RemObjects.inc}
+
+uses
+  SysUtils, Classes, uIPAsyncSocket, uIPHttpHeaders;
+
+const
+  DefaultMaxPostData = 1024 * 1024 * 2; // 2 mb
+
+type
+  TIPAsyncHttpServer = class;
+  TIPAsyncContext = class;
+  IIPAsyncContext = interface
+    ['{83983C87-A9ED-47F2-9352-8C61455325A0}']
+    function GetOwner: TIPAsyncHttpServer;
+    function GetRequest: TIPHttpRequestHeaders;
+    function GetResponse: TIPHttpResponseHeaders;
+    function GetRequestData: TDynamicByteArray;
+    procedure SetRequestData(aData: TDynamicByteArray);
+    function GetResponseData: TDynamicByteArray;
+    procedure SetResponseData(aData: TDynamicByteArray);
+    function GetResponseSent: Boolean;
+    function GetUserData: Pointer;
+    procedure SetUserData(aData: Pointer);
+    function GetDisconnected: Boolean;
+
+    property Owner: TIPAsyncHttpServer read GetOwner;
+    property Request: TIPHttpRequestHeaders read GetRequest;
+    property Response: TIPHttpResponseHeaders read GetResponse;
+    property RequestData: TDynamicByteArray read GetRequestData write SetRequestData;
+    property ResponseData: TDynamicByteArray read GetResponseData write SetResponseData;
+    property ResponseSent: Boolean read GetResponseSent;
+    property UserData: Pointer read GetUserData write SetUserData;
+    property Disconnected: Boolean read GetDisconnected;
+
+    procedure SendResponse;
+    function GetSelf: TIPAsyncContext;
+  end;
+  TIPAsyncContext = class(TInterfacedObject, IIPAsyncContext)
+  private
+    fOwner: TIPAsyncHttpServer;
+    fRequest: TIPHttpRequestHeaders;
+    fResponse: TIPHttpResponseHeaders;
+    fRequestData: TDynamicByteArray;
+    fResponseData: TDynamicByteArray;
+    fResponseSent: Boolean;
+    fConnection: TIPBaseAsyncSocket;
+    fUserData: Pointer;
+    fTempBuf: TDynamicByteArray;
+    fBodyOffset: Integer;
+    fDisconnected: Boolean;
+    procedure cbDisconnect(sender: TIPBaseAsyncSocket);
+    procedure cbFirstLine(sender: TIPBaseAsyncSocket);
+    procedure cbHeaderLine(sender: TIPBaseAsyncSocket);
+    procedure cbPostData(sender: TIPBaseAsyncSocket);
+    procedure cbResponse(sender: TIPBaseAsyncSocket);
+    procedure SendInvalidRequest(aMessage: Ansistring = '');
+    function GetDisconnected: Boolean;
+    function GetOwner: TIPAsyncHttpServer;
+    function GetRequest: TIPHttpRequestHeaders;
+    function GetRequestData: TDynamicByteArray;
+    function GetResponse: TIPHttpResponseHeaders;
+    function GetResponseData: TDynamicByteArray;
+    function GetResponseSent: Boolean;
+    function GetUserData: Pointer;
+    procedure SetRequestData(aData: TDynamicByteArray);
+    procedure SetResponseData(aData: TDynamicByteArray);
+    procedure SetUserData(aData: Pointer);
+  public
+    constructor Create(aOwner: TIPAsyncHttpServer; aConnection: TIPBaseAsyncSocket);
+    destructor Destroy; override;
+
+    procedure Clear;
+
+    procedure Disconnect;
+
+    property Owner: TIPAsyncHttpServer read fOwner;
+    property Request: TIPHttpRequestHeaders read fRequest;
+    property Response: TIPHttpResponseHeaders read fResponse;
+    property RequestData: TDynamicByteArray read fRequestData write fRequestData;
+    property ResponseData: TDynamicByteArray read fResponseData write fResponseData;
+    property ResponseSent: Boolean read fResponseSent;
+    property UserData: Pointer read fUserData write fUserData;
+    property Disconnected: Boolean read fDisconnected;
+
+    procedure SendResponse;
+    function GetSelf: TIPAsyncContext;
+  end;
+  TIPAsyncHttpRequestHandler = procedure (Sender: TObject; aContext: IIPAsyncContext) of Object;
+  TIPAsyncHttpServer = class(TObject)
+  private
+    fDisableNagle: Boolean;
+    fOnManualBind: TNotifyEvent;
+    fOnBeforeData,
+    fOnBeforeCleanupContext,
+    fOnRequest: TIPAsyncHttpRequestHandler;
+    fOnResponseSent,
+    fOnResponsefailed: TIPAsyncHttpRequestHandler;
+    fMaxPostData: Integer;
+    fMaxHeaderLines: Integer;
+    fActive: Boolean;
+    fSocket4,
+    fSocket6: TIPBaseAsyncSocket;
+    fBindV4,
+    fBindV6: Boolean;
+    fPort: Integer;
+    fClients: TInterfaceList;
+    procedure SetActive(aValue: Boolean);
+    procedure cbAccept(aSender: TIPBaseAsyncSocket);
+    procedure DisconnectClients;
+  public
+    constructor Create;
+    destructor Destroy; override;
+
+    property Socket4: TIPBaseAsyncSocket read fSocket4;
+    property Socket6: TIPBaseAsyncSocket read fSocket6;
+    property Port: Integer read fPort write fPort default 80;
+    property BindV4: Boolean read fBindV4 write fBindV4 default true;
+    property BindV6: Boolean read fBindV6 write fBindV6 default false;
+    property MaxHeaderLines: Integer read fMaxHeaderLines write fMaxHeaderLines default 64;
+    property DisableNagle: Boolean read fDisableNagle write fDisableNagle default true;
+
+    property Active: Boolean read fActive write SetActive;
+
+    property MaxPostData: Integer read fMaxPostData write fMaxPostData default DefaultMaxPostData;
+
+    property OnManualBind: TNotifyEvent read fOnManualBind write fOnManualBind;
+    property OnBeforeData: TIPAsyncHttpRequestHandler read fOnBeforeData write fOnBeforeData;
+    property OnRequest: TIPAsyncHttpRequestHandler read fOnrequest write fOnrequest;
+    property OnBeforeCleanupContext: TIPAsyncHttpRequestHandler read fOnBeforeCleanupContext write fOnBeforeCleanupContext;
+    property OnResponseSent: TIPAsyncHttpRequestHandler read fOnResponseSent write fOnResponseSent;
+    property OnResponseFailed: TIPAsyncHttpRequestHandler read fOnResponsefailed write fOnResponsefailed;
+
+  end;
+
+implementation
+
+uses Math, uROClasses;
+
+{ TIPAsyncContext }
+
+procedure TIPAsyncContext.cbDisconnect(sender: TIPBaseAsyncSocket);
+var
+  lConn: TIPBaseAsyncSocket;
+begin
+  fDisconnected := true;
+  if assigned(fOwner) and assigned(fOwner.fOnBeforeCleanupContext) then
+    fOwner.fOnBeforeCleanupContext(fOwner, Self);
+  lConn := fConnection;
+  fConnection := nil;
+  if lConn <> nil then begin
+    lConn.EndDisconnect;
+    lConn.Free;
+  end;
+  if assigned(fOwner) then begin
+    fOwner.fClients.Remove(IIPAsyncContext(self));
+  end;
+end;
+
+procedure TIPAsyncContext.cbFirstLine(sender: TIPBaseAsyncSocket);
+var
+  lLine: string;
+  lIdx: Integer;
+begin
+  if not sender.EndReadLine(lLine) then begin
+    cbDisconnect(sender);
+    exit;
+  end;
+  lIdx := pos(' ', lLine);
+  if lIdx = 0 then begin
+    SendInvalidRequest;
+    exit;
+  end;
+  fRequest.Method := copy(lLine, 1, lIdx-1);
+  Delete(lLine, 1, lIdx);
+  lIdx := pos(' ', lLine);
+  if lIdx = 0 then begin
+    SendInvalidRequest;
+    exit;
+  end;
+  fRequest.Path := copy(lLine, 1, lIdx -1);
+  fRequest.Version := UpperCase(copy(lLine, lIdx+1, MaxInt));
+  if (fRequest.Method <> 'GET') and (fRequest.Method <> 'POST') then begin
+    SendInvalidRequest;
+    exit;
+  end;
+
+  sender.BeginReadLine(cbHeaderLine);
+end;
+
+procedure TIPAsyncContext.cbHeaderLine(sender: TIPBaseAsyncSocket);
+var
+  lLine: string;
+  i: Integer;
+  lName, lVal: string;
+begin
+  if not Sender.EndReadLine(lLine) then begin
+    cbDisconnect(sender);
+    exit;
+  end;
+  if lLine <> '' then begin
+    if assigned(fOwner) and (fRequest.Headers.Count > fOwner.MaxHeaderLines) then begin
+      SendInvalidRequest;
+      exit;
+    end;
+    i := Pos(':', lLine);
+    if i = 0 then begin
+      SendInvalidRequest;
+      exit;
+    end;
+    lName := Trim(copy(lLine, 1, i-1));
+    lVal := trim(Copy(lLine, i+1, MaxInt));
+    fRequest.Headers.Add(lName+'='+lVal);
+    sender.BeginReadLine(cbHeaderLine);
+  end else begin
+    if fRequest.Method = 'POST' then begin
+      try
+        if assigned(fOwner) and assigned(fowner.fOnBeforeData) then fOwner.fOnBeforeData(fOwner, Self);
+      except
+        SendInvalidRequest; // we cannot let exceptions escape to the caller thread.
+        exit;
+      end;
+      if fRequest.ContentLength > fOwner.fMaxPostData then begin
+        SendInvalidRequest('Content-Length too large');
+        exit;
+      end;
+      SetLength(fRequestData, fRequest.ContentLength);
+      sender.BeginReceive(@fRequestData[0], 0, Length(fRequestData), cbPostData);
+    end else begin
+      try
+        if assigned(fOwner) and assigned(fOwner.fOnRequest) then begin
+          fOwner.fOnRequest(fOwner, Self);
+        end else begin
+          SendInvalidRequest('Request handler not assigned');
+          exit;
+        end;
+      except
+        SendInvalidRequest;
+        exit;
+      end;
+    end;
+  end;
+end;
+
+procedure TIPAsyncContext.cbPostData(sender: TIPBaseAsyncSocket);
+begin
+  if sender.EndReceive < Length(fRequestData) then begin
+    cbDisconnect(sender); // we got disconnected when there's less data. When buffered is true it won't return until all data is there.
+    exit;
+  end;
+  try
+    if assigned(fOwner) and assigned(fOwner.fOnRequest) then begin
+      Request.ClientAddress:= sender.GetRemoteIp;
+      fOwner.fOnRequest(fOwner, Self);
+    end else begin
+      SendInvalidRequest('Request handler not assigned');
+      exit;
+    end;
+  except
+    SendInvalidRequest;
+    exit;
+  end;
+end;
+
+procedure TIPAsyncContext.Clear;
+begin
+  if assigned(fOwner) and assigned(fOwner.fOnBeforeCleanupContext) then
+    fOwner.fOnBeforeCleanupContext(fOwner, Self);
+  fRequest.Clear;
+  fResponse.Clear;
+  fRequestData := nil;
+  fResponseData := nil;
+  fResponseSent := false;
+end;
+
+constructor TIPAsyncContext.Create(aOwner: TIPAsyncHttpServer;
+  aConnection: TIPBaseAsyncSocket);
+begin
+  fOwner := aOwner;
+  fConnection := aConnection;
+  fConnection.MaxLineLength := 8096;
+  fConnection.OnDisconnected := cbDisconnect;
+  fRequest := TIPHttpRequestHeaders.Create;
+  fResponse := TIPHttpResponseHeaders.Create;
+  fconnection.Buffered := true;
+  fConnection.IdleTimeout := 180; // 3min
+  fConnection.OnTimeout := cbDisconnect;
+  fConnection.BeginReadLine(cbFirstLine);
+end;
+
+destructor TIPAsyncContext.Destroy;
+begin
+  inc(FRefCount);
+  Clear;
+  Dec(FRefCount);
+  fRequest.Free;
+  fResponse.Free;
+  inherited Destroy;
+end;
+
+procedure TIPAsyncContext.Disconnect;
+begin
+  fDisconnected := true;
+  if fResponseSent then begin
+    if assigned(fOwner) and assigned(fOwner.fOnResponsefailed) then fOwner.fOnResponsefailed(fOwner, Self);
+  end;
+
+  if assigned(fConnection) then
+    fConnection.BeginDisconnect(cbDisconnect);
+end;
+
+procedure TIPAsyncContext.SendInvalidRequest(aMessage: Ansistring = '');
+begin
+  fResponse.Code := 500;
+  fResponse.Reason := 'Internal Server Error';
+  fResponse.Headers.VAlues['Content-Type'] := 'text/html';
+  aMessage := '<html><head><title>Invalid Request</title></head><body><h1>Invalid Request</h1>'+aMessage+'</body></html>';
+  SetLength(fResponseData, Length(aMessage));
+  Move(aMessage[1], fResponseData[0], Length(aMessage));
+  SendResponse;
+end;
+
+procedure TIPAsyncContext.SendResponse;
+var
+  lHeaderData: Ansistring;
+begin
+  if fResponseSent then raise EIPSocketError.Create('Response already sent');
+  fResponseSent := true;
+  if fDisconnected then begin
+    if assigned(fOwner)  and assigned(fOwner.fOnResponsefailed) then begin
+      fOwner.fOnResponsefailed(fOwner, self);
+    end;
+    exit;
+  end;
+  fResponse.Headers.Values['Content-Length'] := IntToStr(Length(fResponseData));
+  lHeaderData := {$IFDEF UNICODE}WideStringToAnsiString{$ENDIF}(fResponse.ToString);
+  if (Length(lHeaderData) > 4096) or (Length(fResponseData) = 0) then begin
+    if Length(fTempBuf) < Length(lHeaderData) then begin
+      if Length(lHeaderData) > 4096 then
+        SetLength(fTempBuf, Length(lHeaderData))
+      else
+        SetLength(fTempBuf, 4096);
+    end;
+    Move(lHeaderdata[1], fTempBuf[0], Length(lHeaderData));
+    fBodyOffset := 0;
+    fConnection.BeginSend(@ftempBuf[0], 0, Length(lHeaderData), cbResponse);
+  end else begin
+    if Length(fTempBuf) < 4096 then SetLength(fTempBuf, 4096);
+    Move(lHeaderdata[1], fTempBuf[0], Length(lHeaderData));
+    fBodyOffset := 4096 - Length(lHeaderData);
+    if fBodyOffset > Length(fResponseData) then fBodyOffset := Length(fResponseData);
+    Move(fResponseData[0], fTempBuf[Length(lHeaderData)], fBodyOffset);
+    fconnection.BeginSend(@fTempBuf[0], 0, fBodyOffset + Length(lHeaderData), cbResponse);
+  end;
+end;
+
+
+procedure TIPAsyncContext.cbResponse(sender: TIPBaseAsyncSocket);
+var
+  lLen: Integer;
+begin
+  if fConnection.EndSend <= 0 then begin
+    cbDisconnect(sender);
+    exit;
+  end;
+  lLen := 4096;
+  if fBodyOffset+ lLen > Length(fResponseData) then
+    lLen := Length(fResponseData) - fBodyOffset;
+  if lLen <= 0 then begin
+    if assigned(fOwner) and assigned(fOwner.fOnResponseSent) then fOwner.fOnResponseSent(fOwner, Self);
+    Clear; // we're done
+    fConnection.BeginReadLine(cbFirstLine);
+  end else begin
+    move(fResponseData[fBodyOffset], fTempBuf[0], lLen);
+    fBodyOffset := fBodyOffset + lLen;
+    fcOnnection.BeginSend(@fTempBuf[0], 0, lLen, cbResponse);
+  end;
+end;
+
+
+function TIPAsyncContext.GetDisconnected: Boolean;
+begin
+  result := fDisconnected;
+end;
+
+function TIPAsyncContext.GetOwner: TIPAsyncHttpServer;
+begin
+  result := fOwner;
+end;
+
+function TIPAsyncContext.GetRequest: TIPHttpRequestHeaders;
+begin
+  result := fRequest;
+end;
+
+function TIPAsyncContext.GetRequestData: TDynamicByteArray;
+begin
+  result := fRequestData;
+end;
+
+function TIPAsyncContext.GetResponse: TIPHttpResponseHeaders;
+begin
+  result := fREsponse;
+end;
+
+function TIPAsyncContext.GetResponseData: TDynamicByteArray;
+begin
+  result := fResponseData;
+end;
+
+function TIPAsyncContext.GetResponseSent: Boolean;
+begin
+  result := fResponseSent;
+end;
+
+function TIPAsyncContext.GetUserData: Pointer;
+begin
+  result := fUserData;
+end;
+
+procedure TIPAsyncContext.SetRequestData(aData: TDynamicByteArray);
+begin
+  fRequestData := aData;
+end;
+
+procedure TIPAsyncContext.SetResponseData(aData: TDynamicByteArray);
+begin
+  fResponseData := aData;
+end;
+
+procedure TIPAsyncContext.SetUserData(aData: Pointer);
+begin
+  fUserData := aDAta;
+end;
+
+function TIPAsyncContext.GetSelf: TIPAsyncContext;
+begin
+  result := self;
+end;
+
+{ TIPAsyncHttpServer }
+
+procedure TIPAsyncHttpServer.cbAccept(aSender: TIPBaseAsyncSocket);
+var
+  lSock: TIPBaseAsyncSocket;
+  lContext: IIPAsyncContext;
+begin
+  try
+    lSock := aSender.EndAccept;
+  except
+    on e: EIPSocketError do
+      exit;
+      // We're shutting down, exit now.
+  end;
+  lContext := TIPAsyncContext.Create(self, lSock);
+  if fDisableNagle then
+
+    lSock.NoDelay := true;
+  fClients.Add(lContext);
+  aSender.BeginAccept(cbAccept);
+end;
+
+constructor TIPAsyncHttpServer.Create;
+begin
+  inherited Create;
+  fMaxPostData := DefaultMaxPostData;
+  fMaxHeaderLines := 64;
+  fBindV6 := false;
+  fBindV4 := true;
+  fDisableNagle := true;
+  fPort := 80;
+  fClients := TInterfaceList.Create;
+end;
+
+destructor TIPAsyncHttpServer.Destroy;
+begin
+  Active := False;
+  DisconnectClients;
+  fClients.Free;
+  inherited Destroy;
+end;
+
+procedure TIPAsyncHttpServer.DisconnectClients;
+var
+  i: integer;
+  ctx: IIPAsyncContext;
+begin
+  fClients.Lock;
+  try
+    for i := 0 to fClients.Count -1 do begin
+      ctx := IIPAsyncContext(fClients[i]);
+      ctx.GetSelf.fOwner := nil;
+      ctx.GetSelf.Disconnect;
+    end;
+  finally
+    fClients.Unlock;
+  end;
+  fClients.Clear;
+end;
+
+procedure TIPAsyncHttpServer.SetActive(aValue: Boolean);
+begin
+  if fActive = aValue then exit;
+  fActive := aValue;
+  if aValue then begin
+    if fBindV4 then begin
+      fSocket4 := TIPAsyncSocket.Create(rsmTCPIP4);
+      if not assigned(fOnManualBind) then
+        fSocket4.Bind('0.0.0.0', fPort);
+    end;
+    if fBindV6 then begin
+      fSocket6 := TIPAsyncSocket.Create(rsmTCPIP6);
+      if not assigned(fOnManualBind) then
+        fSocket6.Bind('::', fPort);
+    end;
+    if assigned(fOnManualBind) then fOnManualBind(self);
+    if assigned(fSocket4) then begin
+      fSocket4.Listen(10);
+      fSocket4.BeginAccept(cbAccept);
+    end;
+    if assigned(fSocket6) then begin
+      fSocket6.Listen(10);
+      fSocket6.BeginAccept(cbAccept);
+    end;
+  end else begin
+    DisconnectClients;
+    fSocket4.Free;
+    fSocket6.Free;
+    fSocket4 := nil;
+    fSocket6 := nil;
+  end;
+end;
+
+end.
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uIPAsyncSocket.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uIPAsyncSocket.pas
new file mode 100644
index 0000000..1b3a9c0
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uIPAsyncSocket.pas	
@@ -0,0 +1,970 @@
+unit uIPAsyncSocket;
+{$R-,Q-}
+interface
+
+{$I RemObjects.inc}
+
+uses
+  SysUtils, Classes, SyncObjs, synsock, uROThread;
+
+const
+  SocketsPerWorkerThread = 64;
+
+type
+  EIPSocketError = class(Exception);
+  TIPBaseAsyncSocket = class;
+  TIPSocketMode = (rsmTCPIP4, rsmTCPIP6);
+  TIPSocketCallback = procedure(Sender: TIPBaseAsyncSocket) of object;
+  TIPBaseAsyncSocket = class(TObject)
+  private
+    fBuffered: Boolean;
+    fMaxLineLength: Integer;
+
+    fOnDisconnected: TIPSocketCallback;
+    fBufWriteCallback, fBufReadCallback: TIPSocketCallback;
+
+    fLineSoFar: string;
+    fReadLineCallback: TIPSocketCallback;
+    fReadLineBuf: array of Byte;
+    fReadLineBufStart,
+    fReadLineBufEnd: Integer;
+    fIdleTimeout: Integer;
+    fOnTimeout: TIPSocketCallback;
+
+    procedure BufferedSendCallback(Sender: TIPBaseAsyncSocket);
+    procedure BufferedReceiveCallback(sender: TIPBaseAsyncSocket);
+    procedure ReadLineCallback(sender: TIPBaseAsyncSocket);
+
+    procedure BufferedBeginReceive(aCallback: TIPSocketCallback);
+    function BufferedEndReceive: Integer;
+  protected
+    fLastData: TDateTime;
+
+    fWriteDestData: Pointer;
+    fWriteStart,
+    fWriteLength: Integer;
+
+    fReadDestData: Pointer;
+    fReadStart,
+    fReadLength: Integer;
+    function GetNoDelay: Boolean; virtual; abstract;
+    procedure SetNoDelay(B: Boolean); virtual; abstract;
+    function GetReceiverBufferSize: Integer; virtual; abstract;
+    function GetSendBufferSize: Integer; virtual; abstract;
+    procedure SetReceiverBufferSize(const Value: Integer); virtual; abstract;
+    procedure SetSendBufferSize(const Value: Integer); virtual; abstract;
+
+    procedure IntBeginSend(aCallback: TIPSocketCallback); virtual; abstract;
+    function IntEndSend: Integer; virtual; abstract;
+    procedure IntBeginReceive(aCallback: TIPSocketCallback); virtual; abstract;
+    function IntEndReceive: Integer; virtual; abstract;
+  public
+    constructor Create;
+    destructor Destroy; override;
+
+    property IdleTimeout: Integer read fIdleTimeout write fIdleTimeout;   // default: 0 = no timeout; Is checked every 30 seconds
+    property Buffered: Boolean read fBuffered write fBuffered;
+    property MaxLineLength: Integer read fMaxLineLength write fMaxLineLength; // 8192
+    function GetLocalPort: Integer; virtual; abstract;
+    function GetLocalIp: string; virtual; abstract;
+    function GetRemotePort: Integer; virtual; abstract;
+    function GetRemoteIp: string; virtual; abstract;
+
+    property ReceiverBufferSize: Integer read GetReceiverBufferSize write SetReceiverBufferSize;
+    property SendBufferSize: Integer read GetSendBufferSize write SetSendBufferSize;
+
+    procedure BeginAccept(aCallback: TIPSocketCallback); virtual; abstract;
+    function EndAccept: TIPBaseAsyncSocket; virtual; abstract;
+
+    procedure BeginConnect(const aIp: string; aPort: Integer; aCallback: TIPSocketCallback); virtual; abstract;
+    function EndConnect: Boolean; virtual; abstract;
+
+    procedure BeginDisconnect(aCallback: TIPSocketCallback); virtual; abstract;
+    procedure EndDisconnect; virtual; abstract;
+
+    property NoDelay: Boolean read GetNoDelay write SetNoDelay;
+
+    // When Buffered is set; the data to be sent and the data to be received is guaranteed to be of the size requested; or the user has been disconnected
+    procedure BeginSend(aData: Pointer; aStart, aLength: Integer; aCallback: TIPSocketCallback);
+    function EndSend: Integer;
+
+    procedure BeginReceive(aData: Pointer; aStart, aLength: Integer; aCallback: TIPSocketCallback);
+    function EndReceive: Integer;
+
+    // returns true if there still is a line in the buffers
+    function BufferReadLine(var aLine: Ansistring): Boolean;
+
+    procedure BeginReadLine(aCallback: TIPSocketCallback);
+    function EndReadLine(var aLine: string): Boolean;
+
+    procedure Bind(const aIp: string; aPort: Integer); virtual; abstract;
+    procedure Listen(aBacklog: Integer); virtual; abstract;
+
+    property OnDisconnected: TIPSocketCallback read fOnDisconnected write fOnDisconnected;
+    property OnTimeout: TIPSocketCallback read fOnTimeout write fOnTimeout;
+  end;
+
+  TIPAsyncSocket = class;
+
+  TIPSocketWorkerThread = class(TROThread)
+  private
+    fReadSet,
+    fWriteSet,
+    fErrorSet: TFDSet;
+
+    fCount: Integer;
+    fLastTimeoutCheck: TDateTime;
+
+    fData: array[0.. SocketsPerWorkerThread-1] of TIPAsyncSocket;
+    fMyCs: TCriticalSection;
+    fSleepEvent: TEvent;
+  protected
+    procedure Execute; override;
+  public
+    constructor Create;
+    destructor Destroy; override;
+  end;
+
+  TIPAsyncSocket = class(TIPBaseAsyncSocket)
+  private
+    fSock: TSocket;
+    fLocSin,
+    fRemSin: TVarSin;
+    fMode: TIPSocketMode;
+    fThread: TIPSocketWorkerThread;
+    fReadEvent,
+    fWriteEvent,
+    fAcceptEvent,
+    fConnectEvent,
+    fDisconnectEvent: TIPSocketCallback;
+    fWantRead,
+    fWantWrite,
+    fWantError: Boolean;
+    fConnectResult: Integer;
+  protected
+    function GetReceiverBufferSize: Integer; override;
+    function GetSendBufferSize: Integer; override;
+    procedure IntBeginReceive(aCallback: TIPSocketCallback); override;
+    procedure IntBeginSend(aCallback: TIPSocketCallback); override;
+    function IntEndReceive: Integer; override;
+    function IntEndSend: Integer; override;
+    procedure SetReceiverBufferSize(const Value: Integer); override;
+    procedure SetSendBufferSize(const Value: Integer); override;
+    function GetNoDelay: Boolean; override;
+    procedure SetNoDelay(B: Boolean); override;
+  public
+    constructor Create(aMode: TIPSocketMode; aHandle: TSocket); overload;
+    constructor Create(aMode: TIPSocketMode); overload;
+    destructor Destroy; override;
+
+    procedure BeginAccept(aCallback: TIPSocketCallback); override;
+    function EndAccept: TIPBaseAsyncSocket; override;
+
+    procedure BeginConnect(const aIp: String; aPort: Integer; aCallback: TIPSocketCallback); override;
+    function EndConnect: Boolean; override;
+
+    procedure BeginDisconnect(aCallback: TIPSocketCallback); override;
+    procedure EndDisconnect; override;
+
+    procedure Bind(const aIp: String; aPort: Integer); override;
+
+    function GetLocalIp: String; override;
+    function GetLocalPort: Integer; override;
+    function GetRemoteIp: String; override;
+    function GetRemotePort: Integer; override;
+    procedure Listen(aBacklog: Integer); override;
+  end;
+  
+
+function InitSocket: Boolean;
+
+implementation
+
+var
+  SockInitialized: Boolean = False;
+  WsaData: TWSAData;
+
+type
+  TByteArray = array[0..4095] of byte;
+  PByteArray = ^TByteArray;
+
+
+var
+  WorkerCS: TCriticalSection;
+  Workers: TList;
+
+function GetWorker(aSock: TIPAsyncSocket): TIPSocketWorkerThread;
+var
+  i, j: Integer;
+  lWorker: TIPSocketWorkerThread;
+begin
+  WorkerCS.Enter;
+  try
+    Result:=nil;
+    for i := 0 to Workers.Count -1 do begin
+      lWorker := TIPSocketWorkerThread(Workers[i]);
+      if lWorker.fCount < SocketsPerWorkerThread then begin
+        lWorker.Fcount := lWorker.fCount +1;
+        lWorker.fMyCs.Enter;
+        try
+          for j :=  0 to SocketsPerWorkerThread -1 do begin
+            if lworker.fData[j] = nil then begin
+              lWorker.FData[j] := aSock;
+              result := lWorker;
+              exit;
+            end;
+          end;
+        finally
+         lWorker.fMyCs.Leave;
+        end;
+      end;
+    end;
+    lWorker := TIPSocketWorkerThread.Create;
+    lWorker.fMyCs.Enter;
+    try
+      lWorker.fData[0] :=aSock;
+      lWorker.fCount := 1;
+    finally
+      lWorker.fMyCs.Leave;
+    end;
+    Workers.Add(lWorker);
+    result := lWorker;
+  finally
+    WorkerCS.Leave;
+  end;
+end;
+
+procedure ReleaseWorker(aWorker: TIPSocketWorkerThread; fSocket: TIPAsyncSocket);
+var
+  j: Integer;
+begin
+  if aworker = nil then exit;
+  if fSocket = nil then exit;
+  aWorker.fMyCs.Enter;
+  try
+    for j :=  0 to SocketsPerWorkerThread -1 do begin
+      if aWorker.fData[j] = fSocket then begin
+        aWorker.FData[j] := nil;
+        aWorker.fCount := aWorker.fCount -1;
+        Exit;
+      end;
+    end;
+  finally
+    aWorker.fMyCs.Leave;
+  end;
+end;
+
+function InitSocket: Boolean;
+begin
+  if SockInitialized then begin
+    result := true;
+    exit;
+  end;
+
+  if not InitSocketInterface(DLLStackName) then begin
+    result := False;
+    exit;
+  end;
+  synsock.WSAStartup(WinsockLevel, WsaData);
+  SockInitialized := true;
+  result := true;
+end;
+
+
+{ TIPBaseAsyncSocket }
+
+procedure TIPBaseAsyncSocket.BeginReadLine(aCallback: TIPSocketCallback);
+var
+  i, lLen: Integer;
+begin
+  if not fBuffered then raise EIPSocketError.Create('Buffered has to be set for BeginReadLine to work');
+  if (@fBufReadCallback <> nil) or (@fReadLineCallback <> nil) then raise EIPSocketError.Create('BeginReceive already running');
+  fReadLineCallback := aCallback;
+  if fReadLineBuf <> nil then begin
+    for i := fReadLineBufStart to fReadLineBufEnd -1 do begin
+      if fReadLineBuf[i] = 10 then begin
+        lLen := i - fReadLineBufStart;
+        if (i > fReadLineBufStart) and (fReadLineBuf[i-1] = 13) then dec(lLen);
+        SetLength(fLineSoFar, lLen);
+        Move(fReadLineBuf[fReadlineBufStart], fLineSoFar[1], lLen);
+        fReadLineBufStart := i +1;
+        fReadLineCallback := nil;
+        aCallback(self);
+        exit;
+      end;
+    end;
+    SetLength(fLineSoFar, fReadLineBufEnd - fReadLineBufStart);
+    Move(fReadLineBuf[fReadlineBufStart], fLineSoFar[1], fReadLineBufEnd - fReadLineBufStart);
+  end;
+  if fReadLineBuf = nil then SetLength(fReadLineBuf, 4096);
+  fReadLineBufStart := 0;
+  fReadLineBufEnd := 0;
+  fReadDestData := fReadLineBuf;
+  fReadStart := 0;
+  fReadLength := 4096;
+  IntBeginReceive(ReadLineCallback);
+end;
+
+procedure TIPBaseAsyncSocket.BeginReceive(aData: Pointer; aStart, aLength: Integer; aCallback: TIPSocketCallback);
+begin
+  if not fBuffered then begin
+    fReadDestData := aData;
+    fReadStart := aStart;
+    fReadLength := aLength;
+    IntBeginReceive(aCallback);
+    exit;
+  end;
+  if @aCallback = nil then raise EIPSocketError.Create('Invalid callback');
+  if aLength <= 0 then raise EIPSocketError.Create('Invalid length');
+  if (@fBufReadCallback <> nil) or (@fReadLineCallback <> nil) then raise EIPSocketError.Create('BeginReceive already running');
+  fBufReadCallback := aCallback;
+  fReadDestData := @(PByteArray(aData)^[aStart]); // move ahead so we always start at 0;
+  fReadStart := 0;
+  fReadLength := aLength;
+  BufferedBeginReceive(BufferedReceiveCallback);
+end;
+
+
+procedure TIPBaseAsyncSocket.BufferedBeginReceive(aCallback: TIPSocketCallback);
+begin
+  if (fReadLineBuf <> nil) and (fReadLineBufStart < fReadLineBufEnd) then begin
+    aCallback(self);
+    exit;
+  end;
+  IntBeginReceive(aCallback);
+end;
+
+function TIPBaseAsyncSocket.BufferedEndReceive: Integer;
+begin
+  if (fReadLineBufStart < fReadLineBufEnd) and (fReadLineBuf <> nil) then begin
+    result := fReadLineBufEnd - fReadLineBufStart;
+    if result > fReadLength then result := fReadLength;
+
+    Move(fReadLineBuf[fReadLineBufStart], PByteArray(fReadDestData)^[fReadStart], Result);
+    fReadLineBufStart := fReadLineBufStart + Result; 
+    fReadStart := fReadStart + Result;
+    exit;
+  end;
+  result := IntEndReceive;
+  fReadStart := fReadStart + Result;
+end;
+
+
+procedure TIPBaseAsyncSocket.BufferedReceiveCallback(
+  sender: TIPBaseAsyncSocket);
+var
+  lCallback: TIPSocketCallback;
+  lEndReceiveResult: Integer;
+begin
+  lEndReceiveResult := BufferedEndReceive;
+  if lEndReceiveResult <= 0 then begin // disconnected
+    // fReadStart := fReadStart + lEndReceiveResult;
+    lCallback := fBufReadCallback;
+    fBufReadCallback := nil;
+    lCallback(self);
+    if assigned(fOnDisconnected) then
+      fOnDisconnected(Self);
+    exit;
+  end;
+ //ReadStart := fReadStart + lEndReceiveResult;
+  if fReadStart < fReadLength then begin
+      BufferedBeginReceive(BufferedReceiveCallback);
+  end else begin
+    lCallback := fBufReadCallback;
+    fBufReadCallback := nil;
+    lCallback(self);
+  end;
+end;
+
+function TIPBaseAsyncSocket.EndReceive: Integer;
+begin
+  if not fBuffered then begin
+    result := IntEndReceive;
+    exit;
+  end;
+  result := fReadStart;
+  fWriteDestData := nil;
+  fBufWriteCallback := nil;
+end;
+
+procedure TIPBaseAsyncSocket.BeginSend(aData: Pointer; aStart,
+  aLength: Integer; aCallback: TIPSocketCallback);
+begin
+  if not fBuffered then begin
+    fWriteDestData:= aData;
+    fWriteStart := aStart;
+    fWriteLength := aLength;
+    IntBeginSend(aCallback);
+    exit;
+  end;
+  if @aCallback = nil then raise EIPSocketError.Create('Invalid callback');
+  if aLength <= 0 then raise EIPSocketError.Create('Invalid length');
+  if @fBufWriteCallback <> nil then raise EIPSocketError.Create('BeginSend already running');
+
+  fBufWriteCallback := aCallback;
+  fWriteDestData:= @(PByteArray(aData)^[aStart]); // move ahead so we always start at 0
+  fWriteStart := 0;
+  fWriteLength := aLength;
+  IntBeginSend(BufferedSendCallback);
+end;
+
+procedure TIPBaseAsyncSocket.BufferedSendCallback(Sender: TIPBaseAsyncSocket);
+var
+  lCallback: TIPSocketCallback;
+  lEndSendResult: Integer;
+begin
+  lEndSendResult := IntEndSend;
+  if lEndSendResult <= 0 then begin // disconnected
+    fWriteStart := fWriteStart + lEndSendResult;
+    lCallback := fBufWriteCallback;
+    fBufWriteCallback := nil;
+    lCallback(self);
+    if assigned(fOnDisconnected) then
+      fOnDisconnected(Self);
+    exit;
+  end;
+  fWriteStart := fWriteStart + lEndSendResult;
+  if fWriteStart < fWriteLength then begin
+    IntBeginSend(BufferedSendCallback);
+  end else begin
+    lCallback := fBufWriteCallback;
+    fBufWriteCallback := nil;
+    lCallback(self);
+  end;
+end;
+
+function TIPBaseAsyncSocket.EndSend: Integer;
+begin
+  if not fBuffered then begin
+    result := IntEndSend;
+    if (Result <= 0) and assigned(fOnDisconnected) then fOnDisconnected(Self);
+    exit;
+  end;
+  result := fWriteStart;
+  fWriteDestData := nil;
+  fBufWriteCallback := nil;
+end;
+
+function TIPBaseAsyncSocket.BufferReadLine(var aLine: Ansistring): Boolean;
+var
+  lLen, i: Integer;
+begin
+  if not fBuffered then raise EIPSocketError.Create('Buffered has to be set for EndReadLine to work');
+  if fReadLineBuf <> nil then begin
+    for i := fReadLineBufStart to fReadLineBufEnd -1 do begin
+      if fReadLineBuf[i] = 10 then begin
+        lLen := i - fReadLineBufStart;
+        if (i > fReadLineBufStart) and (fReadLineBuf[i-1] = 13) then dec(lLen);
+        SetLength(aLine, lLen);
+        Move(fReadLineBuf[fReadlineBufStart], aLine[1], lLen);
+        fReadLineBufStart := i +1;
+        result := true;
+        exit;
+      end;
+    end;
+  end;
+  result := false;
+end;
+
+constructor TIPBaseAsyncSocket.Create;
+begin
+  inherited;
+  fMaxLineLength := 8192;
+end;
+
+destructor TIPBaseAsyncSocket.Destroy;
+begin
+  inherited;
+end;
+
+function TIPBaseAsyncSocket.EndReadLine(var aLine: string): Boolean;
+begin
+  aLine := fLineSoFar;
+  result := fReadLineBufEnd >= 0;
+end;
+
+procedure TIPBaseAsyncSocket.ReadLineCallback(sender: TIPBaseAsyncSocket);
+var
+  s: string;
+  lCb: TIPSocketCallback;
+  i, lLen: Integer;
+begin
+  fReadLineBufEnd := IntEndReceive;
+  if (fReadLineBufEnd <= 0) then begin
+    if assigned(fOnDisconnected) then
+      OnDisconnected(self);
+    exit;
+  end;
+
+  for i := fReadLineBufStart to fReadLineBufEnd -1 do begin
+    if fReadLineBuf[i] = 10 then begin
+      lLen := i - fReadLineBufStart;
+      if (i > fReadLineBufStart) and (fReadLineBuf[i-1] = 13) then dec(lLen);
+      SetLength(s, lLen);
+      Move(fReadLineBuf[fReadlineBufStart], s[1], lLen);
+      fReadLineBufStart := i +1;
+      fLineSoFar := fLineSoFar + s;
+      lCb := fReadLineCallback;
+      fReadLineCallback := nil;
+      lCb(self);
+      exit;
+    end;
+  end;
+  SetLength(s, fReadLineBufEnd - fReadLineBufStart);
+  Move(fReadLineBuf[fReadlineBufStart], s[1], fReadLineBufEnd - fReadLineBufStart);
+  fLineSoFar := fLineSoFar + s;
+  fReadLineBufStart := 0;
+  fReadLineBufEnd := 0;
+  fReadDestData := fReadLineBuf;
+  fReadStart := 0;
+  fReadLength := 4096;
+  IntBeginReceive(ReadLineCallback);
+end;
+
+{ TIPAsyncSocket }
+
+procedure TIPAsyncSocket.BeginAccept(aCallback: TIPSocketCallback);
+begin
+  if assigned(fAcceptEvent) then raise EIPSocketError.Create('BeginAccept already called');
+  if fThread = nil then fThread := GetWorker(self);
+  fAcceptEvent := aCallback;
+  fWantRead := true;
+end;
+
+procedure TIPAsyncSocket.BeginConnect(const aIp: String; aPort: Integer;
+  aCallback: TIPSocketCallback);
+var
+  lSin: TVarSin;
+  lRes: Integer;
+begin
+  if assigned(fConnectEvent) then raise EIPSocketError.Create('BeginConnect already called');
+  if fThread = nil then fThread := GetWorker(self);
+
+  fConnectEvent := aCallback;
+  fConnectResult := 0;
+  if fMode = rsmTCPIP6 then
+    lRes := SetVarSin(lSin, aIp, IntToStr(aPort), AF_INET6, PF_INET6, SOCK_STREAM, false)
+  else
+    lRes := SetVarSin(lSin, aIp, IntToStr(aPort), AF_INET, PF_INET, SOCK_STREAM, true);
+  if lRes <> 0 then raise EIPSocketError.Create('Invalid Address/Port: '+inttostr(WSAGetLastError));
+  lRes := Connect(fSock, lSin);
+  if lRes <> 0 then begin
+    LRes := WSAGetLastError;
+    if lRes <> WSAEWOULDBLOCK then raise EIPSocketError.Create('Cannot connect: '+inttostr(Lres));
+  end;
+  fWantWrite := true;
+  fWantError := true;
+end;
+
+procedure TIPAsyncSocket.BeginDisconnect(aCallback: TIPSocketCallback);
+begin
+  if assigned(fDisconnectEvent) then raise EIPSocketError.Create('BeginDisconnect already called');
+  fDisconnectEvent := aCallback;
+  Synsock.Shutdown(FSock, 1);
+  fWantRead := true;
+end;
+
+procedure TIPAsyncSocket.Bind(const aIp: String; aPort: Integer);
+var
+  lRes: Integer;
+  lSin: TVarSin;
+begin
+  if fMode = rsmTCPIP6 then
+    lRes := SetVarSin(lSin, aIp, IntToStr(aPort), AF_INET6, PF_INET6, SOCK_STREAM, false)
+  else
+    lRes := SetVarSin(lSin, aIp, IntToStr(aPort), AF_INET, PF_INET, SOCK_STREAM, true);
+  if lRes <> 0 then raise EIPSocketError.Create('Invalid Address/Port: '+inttostr(WSAGetLastError));
+  lRes := SynSock.Bind(fSock, lSin);
+  if lRes <> 0 then raise EIPSocketError.Create('Cannot bind: '+inttostr(WSAGetLastError));
+end;
+
+constructor TIPAsyncSocket.Create(aMode: TIPSocketMode);
+var
+  lRes, lVal: Integer;
+begin
+  inherited Create;
+  if not InitSocket then raise EIPSocketError.Create('Could not load socket stack');
+  fMode := aMode;
+  if aMode = rsmTCPIP6 then
+    fSock := Socket(AF_INET6, SOCK_STREAM, IPPROTO_TCP)
+  else
+    fSock := Socket(AF_INET, SOCK_STREAM, IPPROTO_TCP);
+  if fSock <= 0 then raise EIPSocketError.Create('Unable to create socket');
+  lVal := 1;
+  lRes := IoctlSocket(fsock, FIONBIO, lVal);
+  if lRes <> 0 then raise EIPSocketError.Create('Cannot set socket to asynchronous mode: '+inttostr(synsock.WSAGetLastError));
+end;
+
+constructor TIPAsyncSocket.Create(aMode: TIPSocketMode; aHandle: TSocket);
+var
+  lVal, lRes: Integer;
+
+begin
+  inherited Create;
+  fMode := aMode;
+  fSock := aHandle;
+  lVal := 1;
+  lRes := IoctlSocket(fsock, FIONBIO, lVal);
+  if lRes <> 0 then raise EIPSocketError.Create('Cannot set socket to asynchronous mode');
+  if fThread = nil then fThread := GetWorker(self);
+end;
+
+destructor TIPAsyncSocket.Destroy;
+begin
+  if fThread <> nil then begin
+    ReleaseWorker(fThread, self);
+    fThread := nil;
+  end;
+  if FSock <>0 then
+    CloseSocket(fSock);
+  inherited;
+end;
+
+function TIPAsyncSocket.EndAccept: TIPBaseAsyncSocket;
+var
+  lAddr: TVarSin;
+  lSock: TSocket;
+begin
+  fAcceptEvent := nil;
+
+  lSock := synsock.Accept(fSock, lAddr);
+
+  if lSock <= 0 then raise EIPSocketError.Create('Cannot accept connection');
+  Result := TIPAsyncSocket.Create(fMode, lSock);
+  fWantRead := false;
+end;
+
+function TIPAsyncSocket.EndConnect: Boolean;
+begin
+  if fConnectResult = 0 then result := true
+  else result := false;
+  fConnectEvent := nil;
+  fWantWrite := false;
+  fWantError := false;
+end;
+
+procedure TIPAsyncSocket.EndDisconnect;
+begin
+  fDisconnectEvent := nil;
+  CloseSocket(fSock);
+  if fThread <> nil then begin
+    ReleaseWorker(fThread, self);
+    fThread := nil;
+  end;
+  fSock := 0;
+  fWantRead := false;
+end;
+
+function TIPAsyncSocket.GetLocalIp: String;
+begin
+  if fLocSin.AddressFamily = 0 then
+    synsock.GetSockName(FSock, fLocSin);
+  result := GetSinIP(fLocSin);
+end;
+
+function TIPAsyncSocket.GetLocalPort: Integer;
+begin
+  if fLocSin.AddressFamily = 0 then
+    synsock.GetSockName(FSock, fLocSin);
+  result := GetSinPort(fLocSin);
+end;
+
+function TIPAsyncSocket.GetNoDelay: Boolean;
+var
+  lOptLen, lTmpVal: Integer;
+begin
+  lOptLen := 4;
+  GetSockOpt(fSock, 6, 1, pchar(@lTmpVal), lOptLen);
+  result := lTmpVal <> 0;
+end;
+
+function TIPAsyncSocket.GetReceiverBufferSize: Integer;
+var
+  lRes: Integer;
+begin
+  result := 0;
+  lRes := 4;
+  GetSockOpt(fSock, SOL_Socket, SO_RCVBUF, PChar(@Result), lRes);
+end;
+
+function TIPAsyncSocket.GetRemoteIp: String;
+begin
+  if fRemSin.AddressFamily = 0 then
+    synsock.GetPeerName(FSock, fRemSin);
+  result := GetSinIp(fRemSin);
+end;
+
+function TIPAsyncSocket.GetRemotePort: Integer;
+begin
+  if fRemSin.AddressFamily = 0 then
+    synsock.GetPeerName(FSock, fRemSin);
+  result := GetSinPort(fRemSin);
+end;
+
+function TIPAsyncSocket.GetSendBufferSize: Integer;
+var
+  lRes: Integer;
+begin
+  result := 0;
+  lRes := 4;
+  GetSockOpt(fSock, SOL_Socket, SO_SNDBUF, PChar(@Result), lRes);
+end;
+
+procedure TIPAsyncSocket.IntBeginReceive(aCallback: TIPSocketCallback);
+begin
+  if assigned(fReadEvent) then raise EIPSocketError.Create('beginReceive already called');
+  fLastData := Now;
+  fReadEvent := aCallback;
+  fWantRead := true;
+end;
+
+procedure TIPAsyncSocket.IntBeginSend(aCallback: TIPSocketCallback);
+begin
+  if assigned(fWriteEvent) then raise EIPSocketError.Create('BeginSend already called');
+  fLastData := Now;
+  fWriteEvent := aCallback;
+  fWantWrite := true;
+end;
+
+function TIPAsyncSocket.IntEndReceive: Integer;
+begin
+  fwantRead := false;
+  fReadEvent := nil;
+  fLastData := Now;
+  result := Recv(fSock, @PByteArray(fReadDestData)[fReadStart], fReadLength, 0);
+end;
+
+function TIPAsyncSocket.IntEndSend: Integer;
+begin
+  fWriteEvent := nil;
+  fWantWrite := false;
+  fLastData := Now;
+  Result := Send(fSock, @PByteArray(fWriteDestData)[fWriteStart], fWriteLength, 0);
+end;
+
+procedure TIPAsyncSocket.Listen(aBacklog: Integer);
+begin
+  synsock.Listen(fSock, aBacklog);
+end;
+
+procedure TIPAsyncSocket.SetNoDelay(B: Boolean);
+var
+  lTmpVal: Integer;
+begin
+  if b then lTmpVal := 1 else lTmpVal := 0;
+  SetSockOpt(fSock, 6, 1, @lTmpVal, 4);
+end;
+
+procedure TIPAsyncSocket.SetReceiverBufferSize(const Value: Integer);
+var
+  lRes: Integer;
+begin
+  lRes := SetSockOpt(fsock, SOL_Socket, SO_RCVBUF, pchar(@value), 4);
+  if lRes <> 0 then raise EIPSocketError.Create('Unable to set option: '+Inttostr(WSAGetLastError));
+end;
+
+procedure TIPAsyncSocket.SetSendBufferSize(const Value: Integer);
+var
+  lRes: Integer;
+begin
+  lRes := SetSockOpt(fsock, SOL_Socket, SO_SNDBUF, pchar(@value), 4);
+  if lRes <> 0 then raise EIPSocketError.Create('Unable to set option: '+Inttostr(WSAGetLastError));
+end;
+
+procedure CleanupWorkers;
+var
+  i: Integer;
+  lWorker: TIPSocketWorkerThread;
+begin
+  WorkerCS.Enter;
+  try
+    for i := Workers.Count - 1 downto 0 do begin
+      lWorker := TIPSocketWorkerThread(Workers[i]);
+      lWorker.Free;
+    end;
+  finally
+    WorkerCS.Leave;
+  end;
+end;
+
+{ TIPSocketWorkerThread }
+
+constructor TIPSocketWorkerThread.Create;
+begin
+  inherited Create(True);
+  fMyCs := TCriticalSection.Create;
+  fSleepEvent := TEvent.Create(nil, false, false, '');
+  Resume;
+end;
+
+destructor TIPSocketWorkerThread.Destroy;
+begin
+  fSleepEvent.Free;
+  FMyCs.Free;
+  inherited Destroy;
+end;
+
+const
+  TimeoutCheckSpan = 1.0 / (24 * 60 * 2); // every 30 sec
+  OneSecond = 1.0 / (24 * 60 * 60);
+
+procedure TIPSocketWorkerThread.Execute;
+var
+  i: Integer;
+  lCount: Integer;
+  lDummy: Integer;
+  lDate: TDateTime;
+  lSock: TIPAsyncSocket;
+  lEvent: TIPSocketCallback;
+  TimeVal: TTimeVal;
+begin
+  TimeVal.tv_sec := 0;
+  TimeVal.tv_usec := 50;
+  fLastTimeoutCheck := Now;
+  while not Terminated do
+  begin
+    fMyCs.Enter;
+    try
+      lDate := Now;
+      if (lDate - fLastTimeoutCheck) > TimeoutCheckSpan then begin
+        fLastTimeoutCheck := lDate;
+        for i := 0 to SocketsPerWorkerThread -1 do begin
+          lSock := fData[i];
+          if lSock <> nil then begin
+            if (lSock.IdleTimeout > 0) and (lSock.fLastData + (OneSecond * lSock.IdleTimeout) < lDate) then begin
+              fMyCs.Leave;
+              try
+                if assigned(lSock.OnTimeout) then lSock.OnTimeout(lSock);
+              finally
+                fMyCs.Enter;
+              end;
+            end;
+          end;
+        end;
+
+      end;
+      fSleepEvent.ResetEvent;
+      lCount := fCount ;
+      if lCount > 0 then begin
+        FD_ZERO(fReadSet);
+        FD_ZERO(fWriteSet);
+        FD_ZERO(fErrorSet);
+
+        for i := 0 to SocketsPerWorkerThread -1 do begin
+          if fData[i] <> nil then begin
+            if fData[i].fWantRead then
+              FD_Set(fData[i].fSock, fReadset);
+            if fData[i].fWantWrite then
+              FD_Set(fData[i].fSock, fWriteset);
+            if fData[i].fWantError then
+              FD_Set(fData[i].fSock, fErrorSet);
+          end;
+        end;
+      end;
+    finally
+      fMyCs.Leave;
+    end;
+    if lCount = 0 then fSleepEvent.WaitFor(1000) else begin
+      lCount := Select(lCount, @fReadSet, @FwriteSet, @fErrorSet, @TimeVal);
+      if lCount > 0 then begin
+        fMycs.Enter;
+        try
+          for i := 0 to SocketsPerWorkerThread do begin
+            if lCount = 0 then break;
+            if Fdata[i] = nil then continue;
+
+
+            if FD_ISSET(fData[i].fSock, fReadSet) then begin // Read, Accept and Disconnect
+              lEvent := fData[i].fReadEvent;
+              if assigned(lEvent) then begin
+                fMyCS.Leave;
+                try
+                  dec(lCount);
+                  lEvent(fData[i]);
+                finally
+                  fMyCs.Enter;
+                end;
+              end else begin
+                lEvent := fData[i].fAcceptEvent;
+                if assigned(lEvent) then begin
+                  fMyCS.Leave;
+                  try
+                    dec(lCount);
+                    lEvent(fData[i]);
+                  finally
+                    fMyCs.Enter;
+                  end;
+                end else begin
+                  lEvent := fData[i].fDisconnectEvent;
+                  if assigned(lEvent) then begin
+                    fMyCS.Leave;
+                    try
+                      dec(lCount);
+                      lEvent(fData[i]);
+                    finally
+                      fMyCs.Enter;
+                    end;
+                  end;
+                end;
+              end;
+            end else
+
+            if FD_ISSET(fData[i].FSock, FWriteset) then begin // Connect, Write
+              lEvent := fData[i].fWriteEvent;
+              if assigned(lEvent) then begin
+                fMyCS.Leave;
+                try
+                  dec(lCount);
+                  lEvent(fData[i]);
+                finally
+                  fMyCs.Enter;
+                end;
+              end else begin
+                lEvent := fData[i].fConnectEvent;
+                if assigned(lEvent) then begin
+                  fMyCs.Leave;
+                  try
+                    dec(lCount);
+                    lEvent(FData[i]);
+                  finally
+                    fMyCs.Enter;
+                  end;
+                end;
+              end;
+            end else
+
+            if FD_ISSET(fData[i].FSock, fErrorSet) then begin // Connect
+              lEvent := fData[i].fConnectEvent;
+              lDummy := 4;
+              GetSockOpt(fData[i].FSock, SOL_SOCKET, SO_ERROR, Pchar(@fData[i].fConnectResult), lDummy);
+              if assigned(lEvent) then begin
+                fMyCS.Leave;
+                try
+                  dec(lCount);
+                  lEvent(fData[i]);
+                finally
+                  fMyCs.Enter;
+                end;
+              end;
+            end;
+          end;
+        finally
+          fMycs.Leave;
+        end;
+      end;
+    end;
+  end;
+end;
+
+initialization
+  WorkerCS := TCriticalSection.Create;
+  Workers := TList.Create;
+finalization
+  if SockInitialized then begin
+    synsock.WSACleanup;
+    DestroySocketInterface;
+  end;
+  CleanupWorkers;
+  Workers.Free;
+  WorkerCS.Free;
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uIPHttpHeaders.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uIPHttpHeaders.pas
new file mode 100644
index 0000000..8b059e7
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uIPHttpHeaders.pas	
@@ -0,0 +1,158 @@
+unit uIPHttpHeaders;
+
+interface
+
+{$I RemObjects.inc}
+
+uses
+  SysUtils, Classes;
+  
+type
+  TDynamicByteArray = array of Byte;
+  TIPHttpRequestHeaders = class
+  private
+    fHeaders: TStrings;
+    fMethod: string;
+    fPath: string;
+    fVersion: string;
+    FClientAddress: string;
+    function GetContentType: string;
+    function GetContentLength: Int64;
+  public
+    constructor Create;
+    destructor Destroy; override;
+
+    property Headers: TStrings read fHeaders;
+
+    procedure AddHeaderLine(const aLine: string);
+
+    property Method: string read fMethod write fMethod;
+    property Path: string read fPath write fPath;
+    property Version: string read fVersion write fVersion;
+
+    property ContentLength: Int64 read GetContentLength;
+    property ContentType: string read GetContentType;
+    property ClientAddress: string read FClientAddress write FClientAddress;
+    procedure Clear;
+  end;
+  TIPHttpResponseHeaders = class
+  private
+    fHeaders: TStrings;
+    fCode: Integer;
+    fVersion, fReason: string;
+  public
+    constructor Create;
+    destructor Destroy; override;
+
+    property Headers: TStrings read fHeaders;
+    property Version: string read fVersion write fVersion;
+    property Code: Integer read fCode write fCode;
+    property Reason: string read fReason write fReason;
+
+    procedure Assign(aOrg: TIPHttpResponseHeaders);
+    procedure Clear;
+    function ToString: string; {$IFDEF DELPHI12UP} override;{$ENDIF}
+  end;
+
+implementation
+{ TIPHttpRequestHeaders }
+
+procedure TIPHttpRequestHeaders.AddHeaderLine(const aLine: string);
+var
+  lPos: Integer;
+  lName, lVal: string;
+begin
+  lPos := Pos(':', aline);
+  if lPos = 0 then exit;
+  lName := Trim(copy(aLine, 1, lPos -1));
+  lVal := Trim(copy(aLine, lPos+1, MaxInt));
+  fHeaders.ADd(lName+'='+lVal);
+end;
+
+procedure TIPHttpRequestHeaders.Clear;
+begin
+  fHeaders.Clear;
+  fMethod := '';
+  fPath := '';
+  fVersion := '';
+end;
+
+constructor TIPHttpRequestHeaders.Create;
+begin
+  fHeaders := TStringList.Create;
+end;
+
+destructor TIPHttpRequestHeaders.Destroy;
+begin
+  fHeaders.Free;
+  inherited Destroy;
+end;
+
+function TIPHttpRequestHeaders.GetContentLength: Int64;
+var
+  s: string;
+begin
+  s := fHeaders.Values['Content-Length'];
+  Result := StrToInt64Def(s, 0);
+end;
+
+function TIPHttpRequestHeaders.GetContentType: string;
+begin
+  result := fHeaders.Values['Content-Type'];
+end;
+
+{ TIPHttpResponseHeaders }
+
+procedure TIPHttpResponseHeaders.Assign(aOrg: TIPHttpResponseHeaders);
+begin
+  fHeaders.Assign(aOrg.Headers);
+  fCode := aOrg.Code;
+  fVersion := aOrg.Version;
+  fReason := aOrg.Reason;
+end;
+
+procedure TIPHttpResponseHeaders.Clear;
+begin
+  fCode := 200;
+  fVersion := 'HTTP/1.1';
+  fReason := 'OK';
+  fHeaders.Clear;
+end;
+
+constructor TIPHttpResponseHeaders.Create;
+begin
+  inherited Create;
+  fHeaders := TStringList.Create;
+  fVersion := 'HTTP/1.1';
+  Clear;
+end;
+
+destructor TIPHttpResponseHeaders.Destroy;
+begin
+  fHeaders.Free;
+  inherited Destroy;
+end;
+
+
+
+function TIPHttpResponseHeaders.ToString: string;
+var
+  lHeaders, lName, lVal: string;
+  lPos, i: Integer;
+begin
+  lHeaders := fVersion +' '+ IntToStr(fCode)+' '+fReason + #13#10;
+  for i := 0 to fHeaders.Count -1 do begin
+    lVal := fHeaders[i];
+    lPos := Pos('=', lVal);
+    if lPos > 0 then begin
+      lName := Trim(Copy(lVal, 1, lPos -1));
+      lVal := Trim(Copy(lVal, lPos + 1, MaxInt));
+      lHeaders := lHeaders +  lName+': '+lVal + #13#10;
+    end;
+  end;
+  lHeaders := lHeaders + #13#10;
+  Result := lHeaders;
+end;
+
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROAsync.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROAsync.pas
new file mode 100644
index 0000000..335de2e
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROAsync.pas	
@@ -0,0 +1,339 @@
+unit uROAsync;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses Classes, SyncObjs, SysUtils,
+     uROClientIntf, uROClasses, uROThread;
+
+type
+  IROAsyncInterface = interface
+    ['{E858979E-78C4-4AE1-A708-9E6766FDD9B4}']
+    function GetBusy:Boolean;
+    function GetMessageID:string;
+    procedure SetMessageID(aMessageID:string);
+    function GetAnswerReceived:Boolean;
+    function GetAnswerReceivedEvent:TROEvent;
+    property Busy:Boolean read GetBusy;
+    property MessageID:string read GetMessageID write SetMessageID;
+    property AnswerReceived:Boolean read GetAnswerReceived;
+    property AnswerReceivedEvent:TROEvent read GetAnswerReceivedEvent;
+  end;
+
+  IROAsyncTransportChannel = interface
+    ['{206811E7-ABE9-41E6-893C-33DA14E44FF6}']
+    function InvokeRequest(aRequest:TStream; iGetResponse:boolean=true):string;
+    procedure RetrieveResponse(const iMessageID:string; aResponse:TStream);
+    function CheckStatus(const iMessageID:string):boolean;
+  end;
+
+  IROActiveAsyncTransportChannel = interface(IROAsyncTransportChannel)
+    ['{3FC70749-3F4C-4D6A-AB30-01E0E03A25F4}']
+    function InvokeRequest(aRequest:TStream; aGetResponse:boolean=true; aEvent: TROEvent=nil):string; overload;
+  end;
+
+  IROTransportChannelEx = interface
+    ['{96C85DD3-6372-49DF-B259-04BCD5C0E369}']
+    procedure BeforeDispatch(aMessage: IROMessage);
+  end;
+
+  IROTransportChannelAsyncException = interface
+    ['{E3CC33A6-46CD-4A56-AB1A-8BC2DAA461CB}']
+    procedure AsyncException(aAsyncInterface: IROAsyncInterface; AsyncException: Exception);
+  end;
+
+  EROAsyncException = class(EROException);
+  EROAsyncNoAnswerYet = class(EROAsyncException);
+  EROAsyncNoMoreAnswers = class(EROAsyncException);
+
+  TROAsyncProxy = class;
+
+  TROAsyncProxyThread = class(TROThread)
+  private
+    fOwner:TROAsyncProxy;
+    fGetResponse:boolean;
+    fRequest:TStream;
+  protected
+    procedure Execute; override;
+  public
+    constructor Create(iOwner:TROAsyncProxy; const iName:string; iRequest:TStream; iGetResponse:boolean);
+    destructor Destroy; override;
+  end;
+
+  TROAsyncProxy = class(TInterfacedObject, IUnknown, IROAsyncInterface)
+  private
+    fCriticalSection:TCriticalSection;
+    fMessage:IROMessage;
+    fTransportChannel:IROTransportChannel;
+    fAsyncTransportChannel:IROAsyncTransportChannel;
+    fActiveAsyncTransportChannel:IROActiveAsyncTransportChannel;
+    fBeforeDispatch: IROTransportChannelEx;
+    fBusy:Boolean;
+    fAnswerReceived:Boolean;
+    fAnswerReceivedEvent: TROEvent;
+    fMethodName:string;
+    fMessageID:string;
+    fResponse:TStream;
+
+  protected
+    procedure __AssertProxyNotBusy(const iMethodName:string);
+    procedure __DispatchAsyncRequest(const iMethodName:string; iRequest:TStream; iGetResponse:boolean=true); overload;
+    procedure __DispatchAsyncRequest(const iMethodName:string; iRequest:IROMessage; iGetResponse:boolean=true); overload;
+    function __RetrieveAsyncResponse(const iMethodName:string):TStream;
+    property __Message:IROMessage read fMessage;
+    property __TransportChannel:IROTransportChannel read fTransportChannel;
+
+    function __GetInterfaceName:string; virtual; abstract;
+
+    function GetBusy:Boolean;
+    function GetMessageID:string;
+    procedure SetMessageID(aMessageID:string);
+    function GetAnswerReceived:Boolean;
+    function GetAnswerReceivedEvent:TROEvent;
+    property __InterfaceName:string read __GetInterfaceName;
+
+    property __CriticalSection: TCriticalSection read fCriticalSection;
+
+  public
+    constructor Create(const aMessage : IROMessage; const aTransportChannel : IROTransportChannel); virtual;
+    destructor Destroy; override;
+    property Busy:Boolean read fBusy;
+    property AnswerReceived:Boolean read fAnswerReceived;
+    property MessageID:string read GetMessageID write SetMessageID;
+  end;
+
+const
+  REQUEST_MESSAGE_PREFIX  = 'ROSDK REQUEST';
+  RESPONSE_MESSAGE_PREFIX = 'ROSDK RESPONSE';
+
+implementation
+uses
+  uROClient;
+{ TROAsyncProxy }
+
+constructor TROAsyncProxy.Create(const aMessage: IROMessage; const aTransportChannel: IROTransportChannel);
+begin
+  fMessage := aMessage;
+  fTransportChannel := aTransportChannel;
+  Supports(fTransportChannel, IROAsyncTransportChannel, fAsyncTransportChannel);
+  Supports(fTransportChannel, IROActiveAsyncTransportChannel, fActiveAsyncTransportChannel);
+  Supports(fTransportChannel, IROTransportChannelEx, fBeforeDispatch);
+
+  fCriticalSection := TCriticalSection.Create();
+  fAnswerReceivedEvent := TROEvent.Create(nil,false,false,'');
+end;
+
+destructor TROAsyncProxy.Destroy;
+begin
+  //Todo: important: we MUST wait for and free the worker thread here!!!
+  FreeAndNil(fResponse);
+  FreeAndNil(fCriticalSection);
+  FreeAndNil(fAnswerReceivedEvent);
+  inherited;
+end;
+
+function TROAsyncProxy.GetAnswerReceived: Boolean;
+begin
+  fCriticalSection.Enter();
+  try
+    if Assigned(fAsyncTransportChannel) then begin
+      result := fAsyncTransportChannel.CheckStatus(fMessageID);
+    end
+    else begin
+      Result := fAnswerReceived;
+    end;
+  finally
+    fCriticalSection.Leave();
+  end;
+end;
+
+function TROAsyncProxy.GetAnswerReceivedEvent: TROEvent;
+begin
+  if assigned(fAsyncTransportChannel) and not assigned(fActiveAsyncTransportChannel) then
+    raise EROAsyncException.Create('TransportChannel does not support to receive responses without explicit polling.');
+  result := fAnswerReceivedEvent;
+end;
+
+function TROAsyncProxy.GetBusy: Boolean;
+begin
+  fCriticalSection.Enter();
+  try
+    Result := fBusy;
+  finally
+    fCriticalSection.Leave();
+  end;
+end;
+
+function TROAsyncProxy.GetMessageID: string;
+begin
+  result := fMessageID;
+end;
+
+procedure TROAsyncProxy.SetMessageID(aMessageID: string);
+begin
+  fMessageID := aMessageID;
+end;
+
+procedure TROAsyncProxy.__AssertProxyNotBusy(const iMethodName: string);
+begin
+  if (Busy) then
+    raise EROChannelBusy.CreateFmt('There''s already an async request to %s in progress.',[iMethodName]);
+end;
+
+procedure TROAsyncProxy.__DispatchAsyncRequest(const iMethodName:string; iRequest:TStream; iGetResponse:boolean=true);
+begin
+  fCriticalSection.Enter();
+  try
+
+    fAnswerReceivedEvent.ResetEvent();
+    __AssertProxyNotBusy(iMethodName);
+
+    if iGetResponse then begin
+      fMethodName := iMethodName;
+    end;
+    fAnswerReceived := False;
+
+    if Assigned(fActiveAsyncTransportChannel) then begin
+      fMessageID := fActiveAsyncTransportChannel.InvokeRequest(iRequest, iGetResponse, fAnswerReceivedEvent)
+    end
+    else if Assigned(fAsyncTransportChannel) then begin
+      fMessageID := fAsyncTransportChannel.InvokeRequest(iRequest, iGetResponse);
+    end
+    else begin
+      fBusy := true;
+      TROAsyncProxyThread.Create(Self,Format('TROAsyncProxyThread for %s calling %s',[ClassName,iMethodName]),iRequest,iGetResponse);
+    end;
+
+  finally
+    fCriticalSection.Leave();
+  end;
+end;
+
+procedure TROAsyncProxy.__DispatchAsyncRequest(const iMethodName: string;
+  iRequest: IROMessage; iGetResponse: boolean);
+var
+  lRequest: TStream;
+begin
+  if fBeforeDispatch <> nil then
+    fBeforeDispatch.BeforeDispatch(iRequest);
+  lRequest := TMemoryStream.Create;
+
+  iRequest.WriteToStream(lRequest);
+
+  __DispatchAsyncRequest(iMethodName, lRequest, iGetResponse);
+end;
+
+function TROAsyncProxy.__RetrieveAsyncResponse(const iMethodName: string): TStream;
+begin
+  result := nil;
+
+  fCriticalSection.Enter();
+  try
+
+    { Only check the Methodname if we actually preserved one before. depending on
+      the call history, that might have gotten lost. }
+    if (fMethodName <> '') and (fMethodName <> iMethodName) then
+      raise EROAsyncException.CreateFmt('Call to Retrieve_%s does not match previous call to Invoke_%s.',[iMethodName,fMethodName]);
+
+    if Assigned(fAsyncTransportChannel) then begin
+      fResponse := TMemoryStream.Create();
+      try
+        fAsyncTransportChannel.RetrieveResponse(fMessageID,fResponse);
+      except
+        FreeAndNil(fResponse);
+        raise;
+      end;
+    end
+    else begin
+      //fResponse was created by thread.
+      if not fAnswerReceived then
+        raise EROAsyncNoAnswerYet.CreateFmt('Answer for %s has not been received yet.',[iMethodName]);
+    end;
+
+    Assert(Assigned(fResponse));
+
+    Result := fResponse;
+    fResponse := nil;
+
+    fBusy := False;
+    fAnswerReceived := False;
+    fMethodName := '';
+
+  finally
+    fCriticalSection.Leave();
+  end;
+end;
+
+{ TROAsyncProxyThread }
+
+constructor TROAsyncProxyThread.Create(iOwner:TROAsyncProxy; const iName: string; iRequest:TStream; iGetResponse:boolean);
+begin
+  inherited Create(True,iName);
+  FreeOnTerminate := true;
+  fOwner := iOwner;
+  fGetResponse := iGetResponse;
+  fRequest := iRequest;
+  Resume();
+end;
+
+destructor TROAsyncProxyThread.Destroy;
+begin
+  FreeAndNil(fRequest);
+  inherited;
+end;
+
+procedure TROAsyncProxyThread.Execute;
+var
+  lResponse:TStream;
+  temp: IROTransportChannelAsyncException;
+begin
+  inherited;
+  try
+  
+    lResponse := TMemoryStream.Create();
+    try
+      fOwner.__TransportChannel.Dispatch(fRequest, lResponse);
+
+      fOwner.fCriticalSection.Enter();
+      try
+        if fGetResponse then begin
+          fOwner.fResponse := lResponse;
+          lResponse := nil;
+          fOwner.fAnswerReceived := True;
+          fOwner.fAnswerReceivedEvent.SetEvent();
+        end
+        else begin
+          fOwner.fBusy := False;
+        end;
+      finally
+        fOwner.fCriticalSection.Leave();
+      end;
+
+
+    finally
+      FreeAndNil(lResponse);
+    end;
+
+  except
+    on E: Exception do begin
+      fOwner.fBusy := False;
+      if Supports(fOwner.__TransportChannel,IROTransportChannelAsyncException, temp) then temp.AsyncException(fOwner,E);
+      //ToDo: marshal exception to main thread.
+    end;
+  end;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROAsyncResponseStorage.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROAsyncResponseStorage.pas
new file mode 100644
index 0000000..06526d7
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROAsyncResponseStorage.pas	
@@ -0,0 +1,290 @@
+unit uROAsyncResponseStorage;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes, SysUtils, uROClasses, uROClient;
+
+type
+  TROResponseItem = class;
+
+  { IROAsyncResponseStorage }
+  IROAsyncResponseStorage = interface
+    ['{CD2C473C-F557-4B04-876A-4367D5959680}']
+    procedure AddResp(aResp: TROResponseItem);
+    procedure RemoveResp(aResp: TROResponseItem);
+    procedure RemoveRespByUID(aUID: String);
+    procedure DeleteResp(Index: Integer);
+    function  GetResp(Index: Integer): TROResponseItem;
+    function  GetRespByUID(aUID: String): TROResponseItem;
+    function  IndexOfResp(aResp: TROResponseItem): Integer;
+    function  CountOfResp: Integer;
+    procedure ClearStorage;
+
+    property  ResponseItem[Index: Integer]: TROResponseItem read GetResp;
+  end;
+
+  { TROAsyncResponseStorage }
+  TROAsyncResponseStorage = class(TROComponent, IROAsyncResponseStorage)
+  private
+  protected
+    function  GetResp(Index: Integer): TROResponseItem;virtual;abstract;
+  public
+    procedure DeleteResp(Index: Integer);virtual;abstract;
+    procedure AddResp(aResp: TROResponseItem);virtual;abstract;
+    procedure RemoveResp(aResp: TROResponseItem);virtual;abstract;
+    procedure RemoveRespByUID(aUID: String);virtual;abstract;
+    function  GetRespByUID(aUID: String): TROResponseItem;virtual;
+    function  IndexOfResp(aResp: TROResponseItem): Integer;virtual;abstract;
+    function  CountOfResp: Integer;virtual;
+    procedure ClearStorage;virtual;
+
+    property  ResponseItem[Index: Integer]: TROResponseItem read GetResp;
+
+  end;
+
+  { TROSimpleAsyncResponseStorage }
+  TROSimpleAsyncResponseStorage = class(TROAsyncResponseStorage, IROAsyncResponseStorage)
+  private
+    FStorage: TThreadList;
+  protected
+    function  GetResp(Index: Integer): TROResponseItem;override;
+  public
+    procedure DeleteResp(Index: Integer);override;
+    procedure AddResp(aResp: TROResponseItem);override;
+    procedure RemoveResp(aResp: TROResponseItem);override;
+    procedure RemoveRespByUID(aUID: String);override;
+    function  IndexOfResp(aResp: TROResponseItem): Integer;override;
+    function  CountOfResp: Integer;override;
+    procedure ClearStorage;override;
+
+    constructor Create(AOwner: TComponent);override;
+    Destructor Destroy;override;
+  end;
+
+  EROResponseItem = class(EROException);
+
+  { TROResponseItem }
+  TROResponseItem = class
+  private
+    FUID: String;
+    FResponse: TStream;
+    FPort: Integer;
+    FIP: String;
+    procedure SetIP(const Value: String);
+    procedure SetPort(const Value: Integer);
+  public
+    property UID: String read FUID;
+    property IP: String read FIP write SetIP;
+    property Port: Integer read FPort write SetPort;
+    property Response: TStream read FResponse;
+
+    constructor Create(aResponse: TStream;aUID: String);
+    Destructor Destroy;override;
+  end;
+
+implementation
+
+{ TROResponseItem }
+constructor TROResponseItem.Create(aResponse: TStream; aUID: String);
+begin
+  if (not(Assigned(aResponse))) or (aUID = '') then
+    raise EROResponseItem.Create('Invalid constructor parameter value''s');
+
+  FResponse := aResponse;
+  FUID := aUID;
+end;
+
+destructor TROResponseItem.Destroy;
+begin
+  FResponse.Free;
+  inherited;
+end;
+
+procedure TROResponseItem.SetIP(const Value: String);
+begin
+  FIP := Value;
+end;
+
+procedure TROResponseItem.SetPort(const Value: Integer);
+begin
+  FPort := Value;
+end;
+
+{ TROAsyncResponseStorage }
+procedure TROAsyncResponseStorage.ClearStorage;
+var i: Integer;
+begin
+  for i := 0 to CountOfResp-1 do
+    DeleteResp(0);
+end;
+
+function TROAsyncResponseStorage.CountOfResp: Integer;
+begin
+  result := 0;
+end;
+
+function TROAsyncResponseStorage.GetRespByUID(aUID: String): TROResponseItem;
+var i: Integer;
+begin
+  result := nil;
+  if aUID = '' then
+    Exit;
+
+  for i := 0 to CountOfResp-1 do
+  begin
+    if ResponseItem[i].UID = aUID then
+    begin
+      result := ResponseItem[i];
+      Break;
+    end;
+  end;
+end;
+
+{ TROSimpleAsyncResponseStorage }
+constructor TROSimpleAsyncResponseStorage.Create(AOwner: TComponent);
+begin
+  inherited;
+  FStorage := TThreadList.Create;
+end;
+
+destructor TROSimpleAsyncResponseStorage.Destroy;
+begin
+  ClearStorage;
+  FStorage.Free;
+  inherited;
+end;
+
+procedure TROSimpleAsyncResponseStorage.AddResp(aResp: TROResponseItem);
+begin
+  if not(Assigned(aResp)) then
+    Exit;
+
+  FStorage.Add(aResp);
+end;
+
+procedure TROSimpleAsyncResponseStorage.ClearStorage;
+begin
+  Inherited;
+  try
+    with FStorage.LockList do
+    begin
+      Clear;
+    end;
+  finally
+    FStorage.UnlockList;
+  end;
+end;
+
+function TROSimpleAsyncResponseStorage.CountOfResp: Integer;
+begin
+  try
+    with FStorage.LockList do
+    begin
+      result := Count;
+    end;
+  finally
+    FStorage.UnlockList;
+  end;
+end;
+
+function TROSimpleAsyncResponseStorage.GetResp(Index: Integer): TROResponseItem;
+begin
+  try
+    with FStorage.LockList do
+    begin
+      // TList will throw an exception when out of bounds
+      result := TROResponseItem(Items[Index]);
+    end;
+  finally
+    FStorage.UnlockList;
+  end;
+end;
+
+function TROSimpleAsyncResponseStorage.IndexOfResp(aResp: TROResponseItem): Integer;
+var i: Integer;
+begin
+  result := -1;
+  if not(Assigned(aResp)) then
+    Exit;
+
+  try
+    with FStorage.LockList do
+    begin
+      for i := 0 to Count-1 do
+      begin
+        if TROResponseItem(Items[i]) = aResp then
+        begin
+          result := i;
+          Break;
+        end;
+      end;
+    end;
+  finally
+    FStorage.UnlockList;
+  end;
+end;
+
+procedure TROSimpleAsyncResponseStorage.RemoveResp(aResp: TROResponseItem);
+var lIdx: Integer;
+begin
+  if not(Assigned(aResp)) then
+    Exit;
+
+  lIdx := IndexOfResp(aResp);
+  if lIdx <> -1 then
+    DeleteResp(lIdx);
+end;
+
+procedure TROSimpleAsyncResponseStorage.RemoveRespByUID(aUID: String);
+var i: Integer;
+begin
+  if aUID = '' then
+    Exit;
+
+  try
+    with FStorage.LockList do
+    begin
+      for i := 0 to Count-1 do
+      begin
+        if TROResponseItem(Items[i]).UID = aUID then
+        begin
+          DeleteResp(i);
+          Break;
+        end;
+      end;
+    end;
+  finally
+    FStorage.UnlockList;
+  end;
+end;
+
+procedure TROSimpleAsyncResponseStorage.DeleteResp(Index: Integer);
+begin
+  try
+    with FStorage.LockList do
+    begin
+      // TList will throw an exception when out of bounds
+      TROResponseItem(Items[Index]).Free;
+      Delete(Index);
+    end;
+  finally
+    FStorage.UnlockList;
+  end;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROAsyncSCHelpers.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROAsyncSCHelpers.pas
new file mode 100644
index 0000000..21d6007
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROAsyncSCHelpers.pas	
@@ -0,0 +1,956 @@
+unit uROAsyncSCHelpers;
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+interface
+
+uses
+  SysUtils, Classes, uROClasses, uROClient, uROClientIntf,
+  uROServer {$IFDEF MSWINDOWS}, Windows {$ENDIF}, SyncObjs;
+
+type
+  EROTimeout = class(EROException);
+  TROAckState = (rNone, rAck, rNoAck);
+  IROPackageAck = interface
+    ['{89ABD257-42CB-4B4B-9BA6-3E5CED10605B}']
+    function GetEvent: TROEvent;
+    function GetAckNo: Integer;
+    function GetNoAckError: Integer;
+    procedure SetNoAckError(I: Integer);
+    function GetAckState: TROAckState;
+    procedure SetAckState(I: TROAckState);
+
+    property Event: TROEvent read GetEvent;
+    property AckNo: Integer read GetAckNo;
+    property NoAckError: Integer read GetNoAckError write SetNoAckError;
+    property AckState: TROAckState read GetAckState write SetAckState;
+
+    procedure RemoveFromList;
+  end;
+  IROAbstractTCPConnection = interface;
+  TROAsyncCallback = procedure (const Sender: IROAbstractTCPConnection) of object;
+  IROAbstractTCPConnection = interface
+    ['{17BDEB8C-4C92-40FB-9727-DC9F2FA26E8C}']
+    procedure BeginReceive(aData: Pointer; aSize: Integer; aCallback: TROAsyncCallback);
+    procedure BeginSend(aData: Pointer; aSize: Integer; aCallback: TROAsyncCallback);
+
+    function EndReceive: Integer;
+    function EndSend: Integer;
+
+    procedure BeginDisconnect(aForce: Boolean; aCallback: TROAsyncCallback);
+    procedure EndDisconnect;
+
+    procedure BeginConnect(const aAdress: string; aPort: Integer; aCallback: TROAsyncCallback);
+    function EndConnect: Boolean;
+
+    procedure SetOnDisconnected(aCallback: TROAsyncCallback);
+    function GetOnDisconnected: TROAsyncCallback;
+
+    property OnDisconnected: TROAsyncCallback read GetOnDisconnected write SetOnDisconnected;
+
+    procedure SetOnHaveIncompleteData(aCallback: TROAsyncCallback);
+    function GetOnHaveIncompleteData: TROAsyncCallback;
+
+    property OnHaveIncompleteData: TROAsyncCallback read GetOnHaveIncompleteData write SetOnHaveIncompleteData;
+  end;
+  TByteArray = array of Byte;
+  TROAsyncSuperChannelWorker = class(TObject, IUnknown, IROTransport)
+  private
+    fRefCount: Integer;
+    fMaxPackageSize: Integer;
+    fIsServer: Boolean;
+    fConnection: IROAbstractTCPConnection;
+    fClientID: TGUID;
+    fLastId: Integer;
+    fRunning, fConnected: Boolean;
+    fLastData: TDateTime;
+    fStateData: Integer;
+
+    fOtherSideMaxPackageLen: Integer;
+    fWaitingAckList: TInterfaceList;
+    fRemoteSupportsOptions, fRemoteSkipAck, fSkipAck: Boolean;
+    fPingFrequency,
+    fPingTimeout: Integer;
+    fWriteQueue: TThreadList;
+    fServerExpectAck: Integer;
+    fWorkBuffer: TByteArray;
+    procedure SetSkipAck(const Value: Boolean);
+    procedure AsyncWrite(aData: TByteArray);
+    procedure AsyncDisconnected(const Sender: IROAbstractTCPConnection); 
+    procedure AsyncHaveIncompleteData(const aSender: IROAbstractTCPConnection);
+    procedure cbAsyncWrite(const Sender: IROAbstractTCPConnection);
+    procedure cbServerWelcome(const Sender: IROAbstractTCPConnection);
+    procedure cbClientWelcome(const Sender: IROAbstractTCPConnection);
+    procedure cbServerWelcomeDone(const Sender: IROAbstractTCPConnection);
+    procedure cbClientWelcomeDone(const Sender: IROAbstractTCPConnection);
+    procedure cbErrorDone(const Sender: IROAbstractTCPConnection);
+    procedure cbMainRead(const Sender: IROAbstractTCPConnection);
+    procedure cbTimer(Sender: TObject);
+    procedure cbNoAckReply(const Sender: IROAbstractTCPConnection);
+    procedure cbOptionsReply(const Sender: IROAbstractTCPConnection);
+    procedure SetupMainLoop;
+    procedure cbPackageLength(const Sender: IROAbstractTCPConnection);
+    procedure cbPackage(const Sender: IROAbstractTCPConnection);
+    class procedure cbInternalTimer(CurrentTickCount : cardinal);
+  protected
+    { IUnkown methods }
+    function QueryInterface(const IID: TGUID; out Obj): HResult; stdcall;
+    function _AddRef: Integer; stdcall;
+    function _Release: Integer; stdcall;
+
+    { IROTransport }
+    function GetTransportObject : TObject;
+
+    property PingFrequency: Integer read fPingFrequency write fPingFrequency;
+    property PingTimeout: Integer read fPingTimeout write fPingTimeout;
+    property LastData: TDateTime read FLastData;
+    property IsServer: Boolean read fIsServer write fIsServer;
+    procedure Connected; virtual;
+    procedure HaveGuid; virtual;
+    procedure SupportsOptions;
+    procedure ProcessOption(Data: TByteArray);
+    procedure Disconnected(var RestartLoop: Boolean); virtual;
+    procedure IncomingData(Id: Integer; aData: TByteArray); virtual; abstract;
+    function IntSendData(Id: Integer; aData: TStream): IROPackageAck;
+    procedure SetAckDetails(Id: Integer; Oke: Boolean; ErrorNo: Integer); virtual;
+    procedure SendOptions(aData: UTF8String);
+    function GetDefaultResponse: string; virtual; 
+  public
+    constructor Create(aConnection: IROAbstractTCPConnection);
+    destructor Destroy; override;
+
+    property ClientID: TGuid read fClientID write fClientID;
+    property Connection: IROAbstractTCPConnection read fConnection;
+
+    procedure DoSetup;
+
+    procedure Disconnect;
+
+    // Thread safe method
+    procedure SendError(Id: Integer; Error: Byte);
+    function SendPackage(aData: TStream; Id: Integer = 0): IROPackageAck;
+    class procedure WaitForAck(pkg: IROPackageAck; Timeout: Integer = 60000);
+    function GenerateId: Integer;
+
+    // properties
+    property MaxPackageSize: Integer read fMaxPackageSize write fMaxPackageSize;
+    property IsConnected: Boolean read fConnected write fConnected;
+    property SkipAck: Boolean read fSkipAck write SetSkipAck;
+  end;
+
+const
+  ScCmdNoAck_MsgTooLarge = 0;
+  ScCmdNoAck_Timeout = 1;
+  scCmdNoAck_UnknownCommand = 2;
+  ScCmdNoAck_QueueFull = 3;
+  ScCmdNoAck_SupportsOptions = 255;
+
+
+implementation
+
+const
+  ScWelcome :AnsiString = 'ROSC10';
+
+  ScCmdHello = 0;
+  {
+    Client:
+      'ROSC10'
+      [MyGuid] or [NullGuid]
+      MaxPackageLength: Int32;
+    Server:
+      'ROSC10'
+      [YourGuid] or [NewGuid]
+      MaxPackageLength: Int32;
+  }
+  ScCmdPackage = 1;
+  {
+    Request or Event Id: Int32; (Event < 0; Request/Response > 0)
+    Length: Int32;
+    Data: [...]
+  }
+  ScCmdAck = 2;
+  {
+    Id: Integer;
+  }
+  ScCmdNoAck = 3;
+  {
+    Id: Integer;
+    Error:
+      0 = Message too large
+      1 = Timeout
+  }
+
+  ScCmdPing = 4;
+  { Should be sent every 60 seconds by the client
+     RandomNumber: Integer;
+  }
+  ScCmdPong = 5;
+  { Reply to ping
+    OriginalRandomNumber: Integer;
+  }
+  ScCmdOptions = 6;
+  {
+    Length: Longint
+    Data: array of 0..Length -1 of byte
+    UTF8 encoded, seperated by #13
+  }
+
+
+
+type
+  TROPackageAck = class(TInterfacedObject, IROPackageAck)
+  private
+    fEvent: TROEvent;
+    fAckNo,
+    FAckNoError: Integer;
+    FAckState: TROAckState;
+    FOwner: TROAsyncSuperChannelWorker;
+  public
+    function GetEvent: TROEvent;
+    function GetAckNo: Integer;
+    function GetNoAckError: Integer;
+    procedure SetNoAckError(I: Integer);
+    function GetAckState: TROAckState;
+    procedure SetAckState(I: TROAckState);
+
+    constructor Create(aOwner: TROAsyncSuperChannelWorker; aId: Integer);
+    destructor Destroy; override;
+
+    procedure RemoveFromList;
+  end;
+
+
+  
+var
+  fTimer: TROThreadTimer;
+  fTimerList: TThreadList;
+
+class procedure TROAsyncSuperChannelWorker.cbInternalTimer(CurrentTickCount: cardinal);
+var
+  lList: TList;
+  i: Integer;
+begin
+  lList := fTimerList.LockList;
+  try
+    for i := lList.Count -1 downto 0 do
+      TROAsyncSuperChannelWorker(lList[i]).cbTimer(nil);
+  finally
+    fTimerList.UnlockList;
+  end;
+end;
+
+
+
+procedure AddTimer(aCb: TROAsyncSuperChannelWorker);
+var
+  i: Integer;
+  lList: TList;
+begin
+  lList := fTimerList.LockList;
+  try
+    fTimer := TROThreadTimer.Create(TROAsyncSuperChannelWorker.cbInternalTimer, 30000, false);
+    i := lList.IndexOf(aCb);
+    if i <> -1 then exit;
+    i := lList.IndexOf(nil);
+    if i <> -1 then
+      lList[i] := aCb
+    else
+      lList.Add(aCb);
+  finally
+    fTimerList.UnlockList;
+  end;
+end;
+
+procedure RemoveTimer(aCb: TROAsyncSuperChannelWorker);
+var
+  i: Integer;
+  lList: TList;
+begin
+  lList := fTimerList.LockList;
+  try
+    i := lList.IndexOf(aCb);
+    if i <> -1 then lList[i] := nil;
+  finally
+    fTimerList.UnlockList;
+  end;
+end;
+
+
+{ TROPackageAck }
+
+constructor TROPackageAck.Create(aOwner: TROAsyncSuperChannelWorker; aId: Integer);
+begin
+  inherited Create;
+  if not (aOwner.fSkipAck and aOwner.fRemoteSupportsOptions) then
+  fEvent := TROEvent.Create(nil, true, false, '');
+  fAckNo := aId;
+  FOwner := aOwner;
+//  if FOwner <> nil then FOwner.fWaitingAckList.Add(Self as IROPackageAck);
+end;
+
+destructor TROPackageAck.Destroy;
+begin
+  fEvent.Free;
+  inherited;
+end;
+
+function TROPackageAck.GetAckNo: Integer;
+begin
+  result := fAckNo;
+end;
+
+function TROPackageAck.GetAckState: TROAckState;
+begin
+  Result := FAckState;
+end;
+
+function TROPackageAck.GetEvent: TROEvent;
+begin
+  Result := fEvent;
+end;
+
+function TROPackageAck.GetNoAckError: Integer;
+begin
+ Result := FAckNoError;
+end;
+
+{$ifndef fpc}
+function InterlockedExchangePointer(var Target: Pointer; Value: Pointer): Pointer;
+begin
+  Result := Pointer(InterlockedExchange(Integer(Target), Integer(Value)));
+end;
+{$else}
+function InterlockedExchangePointer(var Target: Pointer; Value: Pointer): Pointer;
+begin
+  {$IFDEF CPU64}
+  result := Pointer(InterlockedExchange64(PtrInt(target), PtrInt(value)));
+  {$ELSE}
+  result := Pointer(InterlockedExchange(PtrInt(target), PtrInt(value)));
+  {$ENDIF}
+end;
+{$endif}
+
+procedure TROPackageAck.RemoveFromList;
+var
+  lOwner: TROAsyncSuperChannelWorker;
+begin
+  lOwner := InterlockedExchangePointer(Pointer(FOwner), nil);
+  if lOwner <> nil then lOwner.fWaitingAckList.Remove(self as IROPackageAck);
+end;
+
+procedure TROPackageAck.SetAckState(I: TROAckState);
+begin
+  FAckState := I;
+end;
+
+procedure TROPackageAck.SetNoAckError(I: Integer);
+begin
+  FAckNoError := i;
+end;
+
+type
+  TWriteItem = class
+  public
+    Data: TByteArray;
+  end;
+
+{ TROAsyncSuperChannelWorker }
+
+procedure TROAsyncSuperChannelWorker.AsyncWrite(aData: TByteArray);
+var
+  lList: TList;
+  p: TWriteItem;
+begin
+  lList := fWriteQueue.LockList;
+  try
+    p := TwriteItem.Create;
+    p.Data := aData;
+    lList.Add(p);
+    if lList.Count <= 1 then begin
+      fConnection.BeginSend(@p.Data[0], Length(p.Data), cbAsyncWrite);
+    end;
+  finally
+    fWriteQueue.UnlockList;
+  end;
+end;
+
+procedure TROAsyncSuperChannelWorker.cbAsyncWrite(
+  const Sender: IROAbstractTCPConnection);
+var
+  lList: TList;
+  p: TWriteItem;
+begin
+  fConnection.EndSend;
+  lList := fWriteQueue.LockList;
+  try
+    if lList.Count = 0 then exit;
+    p := lList[0];
+    lList.Delete(0);
+    p.Free;
+    if lList.Count > 0 then begin
+      p := lList[0];
+      fConnection.BeginSend(@p.Data[0], Length(p.Data), cbAsyncWrite);
+    end;
+  finally
+    fWriteQueue.UnlockList;
+  end;
+end;
+
+procedure TROAsyncSuperChannelWorker.Connected;
+begin
+  // do nothing
+end;
+
+constructor TROAsyncSuperChannelWorker.Create(
+  aConnection: IROAbstractTCPConnection);
+begin
+  inherited Create;
+  fPingFrequency := 60;
+  fPingTimeout := 90;
+  fConnection := aConnection;
+  fMaxPackageSize := 10*1024 * 1024; // 10mb
+  fWaitingAckList:= TInterfaceList.Create;
+  fWriteQueue := TThreadList.Create;
+end;
+
+destructor TROAsyncSuperChannelWorker.Destroy;
+var
+  i: Integer;
+  pb: TWriteItem;
+  lItems: TList;
+begin
+  RemoveTimer(self);
+  fWaitingAckList.Lock;
+  try
+    for i := fWaitingAckList.Count -1 downto 0 do
+      IROPackageAck(fWaitingAckList[i]).RemoveFromList;
+  finally
+    fWaitingAckList.Unlock;
+  end;
+  lItems := fWriteQueue.LockList;
+  try
+    while lItems.Count > 0 do begin
+      pb := lItems[0];
+      lItems.Delete(0);
+      pb.Free;
+    end;
+  finally
+    fWriteQueue.UnlockList;
+  end;
+  fWriteQueue.Free;
+  fWaitingAckList.Free;
+  fConnection.OnDisconnected := nil;
+  fConnection.OnHaveIncompleteData := nil;
+  fConnection := nil;
+  inherited Destroy;
+end;
+
+procedure TROAsyncSuperChannelWorker.Disconnected(
+  var RestartLoop: Boolean);
+begin
+  RestartLoop := false;
+  // Do nothing
+end;
+
+function TROAsyncSuperChannelWorker.GenerateId: Integer;
+begin
+  fWriteQueue.LockList;
+  try
+    if IsServer then
+    begin
+      fLastId := fLastId - 1;
+      if fLastId > -1 then fLastId := -1;
+    end
+    else
+    begin
+      fLastId := fLastId + 1;
+      if fLastId < 1 then fLastId := 1;
+    end;
+    Result := fLastId;
+  finally
+    fWriteQueue.UnlockList;
+  end;
+end;
+
+function TROAsyncSuperChannelWorker.GetTransportObject: TObject;
+begin
+  Result := Self;
+end;
+
+procedure TROAsyncSuperChannelWorker.SupportsOptions;
+begin
+  if fSkipAck then SendOptions('SKIPACK'#13'ON');
+  fRemoteSupportsOptions := true;
+end;
+
+function TROAsyncSuperChannelWorker.IntSendData(Id: Integer;
+  aData: TStream): IROPackageAck;
+var
+  Buffer: TByteArray;
+  len: Integer;
+begin
+  fLastData := Now;
+  Result := TROPackageAck.Create(Self, Id);
+  fWaitingAckList.Add(Result);
+  SetLength(Buffer, (4 + 4 + 1) + aData.Size);
+  Buffer[0] := ScCmdPackage;
+  Move(Id, Buffer[1], 4);
+  Len := aData.Size;
+  Move(Len, Buffer[5], 4);
+
+  aData.Seek(0, soFromBeginning);
+  aData.Read(Buffer[9], aData.Size);
+  AsyncWrite(Buffer);
+end;
+
+procedure TROAsyncSuperChannelWorker.ProcessOption(Data: TByteArray);
+var
+  lCmd, lData: UTF8String;
+  lPos: Integer;
+begin
+  SetLength(lData, Length(Data));
+  Move(Data[0], lData[1], Length(lData));
+  lPos := Pos(AnsiChar(#13), lData);
+  if lPos = 0 then begin
+    lCmd := lData;
+    lData := '';
+  end else begin
+    lCmd := copy(lData, 1, lPos-1);
+    Delete(lData, 1, lPos);
+  end;
+  if lCmd = 'SKIPACK' then begin
+    fRemoteSkipAck := lData <> 'OFF';
+  end;
+end;
+
+
+function TROAsyncSuperChannelWorker.QueryInterface(const IID: TGUID;
+  out Obj): HResult;
+begin
+  if GetInterface(IID, Obj) then
+    Result := 0
+  else
+    Result := E_NOINTERFACE;
+end;
+
+procedure TROAsyncSuperChannelWorker.SendError(Id: Integer; Error: Byte);
+var
+  Buffer: TByteArray;
+begin
+  SetLength(Buffer, 6);
+  buffer[0] := ScCmdNoAck;
+  Move(ID, Buffer[1], 4);
+  Buffer[5] := Error;
+  AsyncWrite(Buffer);
+end;
+
+procedure TROAsyncSuperChannelWorker.SendOptions(aData: UTF8String);
+var
+  Buffer: TByteArray;
+  Len: Integer;
+begin
+  fLastData := Now;
+  SetLength(Buffer, Length(aData)+5);
+  Buffer[0] := ScCmdOptions;
+  Len := Length(aData);
+  Move(Len, Buffer[1], 4);
+  Move(aData[1], Buffer[5], Length(aDAta));
+  AsyncWrite(Buffer);
+end;
+
+function TROAsyncSuperChannelWorker.SendPackage(aData: TStream;
+  Id: Integer): IROPackageAck;
+begin
+  if fOtherSideMaxPackageLen < aData.Size then begin
+    raise EROException.Create('Package too large');
+  end
+  else begin
+    if Id = 0 then
+    begin
+      id := GenerateId;
+    end;
+    Result := IntSendData(Id, aData);
+  end;  
+end;
+
+procedure TROAsyncSuperChannelWorker.SetAckDetails(Id: Integer;
+  Oke: Boolean; ErrorNo: Integer);
+var
+  i: Integer;
+  rp: IROPackageAck;
+begin
+  fWaitingAckList.Lock;
+  try
+    for i := fWaitingAckList.Count -1 downto 0 do
+    begin
+      if IROPackageAck(fWaitingAckList[i]).AckNo = Id then
+      begin
+        rp := IROPackageAck(fWaitingAckList[i]);
+        rp.RemoveFromList;
+
+        rp.NoAckError := ErrorNo;
+        if Oke then
+          rp.AckState := rAck
+        else
+          rp.AckState := rNoAck;
+        rp.Event.SetEvent;
+        exit;
+      end;
+    end;
+  finally
+    fWaitingAckList.Unlock;
+  end;
+end;
+
+procedure TROAsyncSuperChannelWorker.SetSkipAck(const Value: Boolean);
+begin
+  fSkipAck := Value;
+end;
+
+class procedure TROAsyncSuperChannelWorker.WaitForAck(pkg: IROPackageAck;
+  Timeout: Integer);
+begin
+  try
+    if pkg.Event = nil then exit; // skipack
+
+    if pkg.Event.WaitFor(Timeout) <> wrSignaled then
+      raise EROTimeout.Create('Timeout');
+    if pkg.AckState <> rAck then
+    begin
+      case pkg.NoAckError of
+        ScCmdNoAck_MsgTooLarge: raise eROMessageTooLarge.Create('Message too large');
+      else
+        raise EROException.Create('Unknown error');
+      end;
+    end;
+  finally
+    pkg.RemoveFromList;
+  end;
+end;
+
+function TROAsyncSuperChannelWorker._AddRef: Integer;
+begin
+  Result := InterlockedIncrement(fRefCount);
+end;
+
+function TROAsyncSuperChannelWorker._Release: Integer;
+begin
+  Result := InterlockedDecrement(fRefCount);
+end;
+
+procedure TROAsyncSuperChannelWorker.DoSetup;
+var
+  lWrite: TList;
+  i: Integer;
+  lData: TByteArray;
+begin
+  fRunning := true;
+  fRemoteSupportsOptions := false;
+  fRemoteSkipAck := false;
+  fServerExpectAck := 0;
+  lWrite := fWriteQueue.LockList;
+  try
+    for i:= 0 to lWRite.Count -1 do begin
+      Pointer(lData) := lWrite[i];
+      lData := nil;
+    end;
+    lWrite.Clear;
+  finally
+    fWriteQueue.UnlockList;
+  end;
+  fLastData := now;
+  fConnection.OnDisconnected := AsyncDisconnected;
+  fConnection.OnHaveIncompleteData := AsyncHaveIncompleteData;
+
+  if fIsServer then begin
+    SetLength(lData, 26);
+    fWorkBuffer := lData;
+    fConnection.BeginReceive(@lData[0], 26, cbServerWelcome);
+  end else begin
+    SetLength(lData, 26);
+    fWorkBuffer := lData;
+    Move(ScWelcome[1], lData[0], Length(ScWelcome));
+    Move(fClientId, lData[6], 16);
+    Move(fMaxPackageSize, lData[22], 4);
+    fConnection.BeginSend(@lData[0], 26, cbClientWelcome);
+  end;
+end;
+
+
+
+procedure TROAsyncSuperChannelWorker.cbClientWelcome(
+  const Sender: IROAbstractTCPConnection);
+begin
+  fConnection.EndSend;
+  fConnection.BeginReceive(@fWorkBuffer[0], 26, cbClientWelcomeDone);
+end;
+
+procedure TROAsyncSuperChannelWorker.cbServerWelcome(
+  const Sender: IROAbstractTCPConnection);
+var
+  lData: Ansistring;
+begin
+  if fConnection.EndReceive <> 26 then fWorkBuffer := nil;
+
+  if (fWorkBuffer = nil) or (fWorkBuffer[0] <> byte(scWelcome[1]))
+    or (fWorkBuffer[1] <> byte(scWelcome[2]))
+    or (fWorkBuffer[2] <> byte(scWelcome[3]))
+    or (fWorkBuffer[3] <> byte(scWelcome[4]))
+    or (fWorkBuffer[4] <> byte(scWelcome[5]))
+    or (fWorkBuffer[5] <> byte(scWelcome[6])) then begin
+    lData :={$IFDEF UNICODE}WideStringToAnsiString{$ENDIF} (GetDefaultResponse);
+    SetLength(fWorkBuffer, Length(lData));
+    move(lData[1], fWorkBuffer[0], Length(lData));
+    fConnection.BeginSend(@fWorkBuffer[0], Length(fWorkBuffer), cbErrorDone);
+    exit;
+  end;
+  Move(fWorkBuffer[6], fClientID, 16);
+  Move(fWorkBuffer[22], fOtherSideMaxPackageLen, 4);
+  if IsEqualGUID(fClientID, EmptyGUID) then
+    fClientID := NewGuid;
+  Move(fClientID, fWorkBuffer[6], 16);
+
+  Move(fMaxPackageSize, fWorkBuffer[22], 4);
+
+  fConnection.BeginSend(@fWorkBuffer[0], 26, cbServerWelcomeDone);
+  HaveGuid;
+end;
+
+procedure TROAsyncSuperChannelWorker.cbClientWelcomeDone(
+  const Sender: IROAbstractTCPConnection);
+var
+  lData: Ansistring;
+begin
+  if fConnection.EndReceive <> 26 then fWorkBuffer := nil;
+  if (fWorkBuffer = nil) or (fWorkBuffer[0] <> Byte(scWelcome[1]))
+    or (fWorkBuffer[1] <> Byte(scWelcome[2]))
+    or (fWorkBuffer[2] <> Byte(scWelcome[3]))
+    or (fWorkBuffer[3] <> Byte(scWelcome[4]))
+    or (fWorkBuffer[4] <> Byte(scWelcome[5]))
+    or (fWorkBuffer[5] <> Byte(scWelcome[6])) then begin
+    lData := {$IFDEF UNICODE}WideStringToAnsiString{$ENDIF}(GetDefaultResponse);
+    SetLength(fWorkBuffer, Length(lData));
+    move(lData[1], fWorkBuffer[0], Length(lData));
+    fConnection.BeginSend(@fWorkBuffer[0], Length(fWorkBuffer), cbErrorDone);
+    exit;
+  end;
+
+  Move(fWorkBuffer[6], fClientID, 16);
+  Move(fWorkBuffer[22], fOtherSideMaxPackageLen, 4);
+  HaveGuid;
+
+  SetupMainLoop;
+end;
+
+procedure TROAsyncSuperChannelWorker.cbServerWelcomeDone(
+  const Sender: IROAbstractTCPConnection);
+begin
+  fConnection.EndSend;
+  SetupMainLoop;
+end;
+
+procedure TROAsyncSuperChannelWorker.cbErrorDone(
+  const Sender: IROAbstractTCPConnection);
+begin
+  fConnection.EndSend;
+  fConnection.BeginDisconnect(True, nil);
+  AsyncDisconnected(Sender);
+end;
+
+procedure TROAsyncSuperChannelWorker.AsyncHaveIncompleteData(
+  const aSender: IROAbstractTCPConnection);
+begin
+  fLastData := Now;
+end;
+
+
+procedure TROAsyncSuperChannelWorker.HaveGuid;
+begin
+  Connected;
+end;
+
+procedure TROAsyncSuperChannelWorker.SetupMainLoop;
+begin
+  SetLength(fWorkBuffer, 6);
+  fWorkbuffer[0] := ScCmdNoAck;
+  fWorkBuffer[1] := 0;
+  fWorkBuffer[2] := 0;
+  fWorkBuffer[3] := 0;
+  fWorkBuffer[4] := 0;
+  fWorkBuffer[5] := ScCmdNoAck_SupportsOptions;
+  AsyncWrite(fWorkBuffer);
+  setlength(fWorkBuffer, 5);
+  fConnection.BeginReceive(@fWorkBuffer[0], 5, cbMainRead);
+  AddTimer(self);
+end;
+
+procedure TROAsyncSuperChannelWorker.AsyncDisconnected (const Sender: IROAbstractTCPConnection);
+begin
+  RemoveTimer(self);
+  fRunning := False;
+  Disconnected(fRunning);
+  if fRunning then DoSetup;
+end;
+
+procedure TROAsyncSuperChannelWorker.Disconnect;
+begin
+  fConnection.BeginDisconnect(true, nil);
+  AsyncDisconnected(fConnection);
+end;
+
+
+
+procedure TROAsyncSuperChannelWorker.cbTimer(Sender: TObject);
+var
+  lData: TByteArray;
+begin
+  if fIsServer then begin
+    if ((Now - fLastData) * (60 * 60 * 24)) > fPingTimeout then begin
+      fConnection.BeginDisconnect(true, nil);
+      AsyncDisconnected(fConnection);
+    end;
+  end else begin
+    if fServerExpectAck <> 0 then begin
+      if ((Now - fLastData) * (60 * 60 * 24)) > fPingTimeout then begin
+        fConnection.BeginDisconnect(true, nil);
+        AsyncDisconnected(fConnection);
+      end;
+    end else begin
+      fServerExpectAck := Trunc(Now * 24 * 60 * 60 * 7);
+      if fServerExpectAck = 0 then fServerExpectAck := 1;
+      SetLength(lData, 5);
+      lData[0] := ScCmdPing;
+      Move(fSErverExpectAck, lData[1], 4);
+      AsyncWrite(lData);
+    end;
+  end;
+end;
+
+procedure TROAsyncSuperChannelWorker.cbNoAckReply(const Sender: IROAbstractTCPConnection);
+begin
+  fConnection.EndReceive;
+  if fWorkBuffer[0] = ScCmdNoAck_SupportsOptions then
+    SupportsOptions
+  else
+    SetAckDetails(fStateData, false, fWorkBuffer[0]);
+  fConnection.BeginReceive(@fWorkBuffer[0], 5, cbMainRead);
+end;
+procedure TROAsyncSuperChannelWorker.cbOptionsReply(const Sender: IROAbstractTCPConnection);
+begin
+  fConnection.EndReceive;
+  ProcessOption(fWorkBuffer);
+  SetLength(fWorkBuffer, 5);
+  fConnection.BeginReceive(@fWorkBuffer[0], 5, cbMainRead);
+end;
+
+procedure TROAsyncSuperChannelWorker.cbPackageLength(const Sender: IROAbstractTCPConnection);
+var
+  lLen: Integer;
+begin
+  fConnection.EndREceive;
+  Move(FWorkBuffer[0], lLen, 4);
+  if (lLen < 0) or (lLen > fMaxPackageSize) then begin
+    fConnection.BeginDisconnect(true, nil);
+    AsyncDisconnected(fConnection);
+    exit;
+  end;
+  SetLength(fWorkBuffer, lLen);
+  fConnection.BeginReceive(@fWorkBuffer[0], lLen, cbPackage);
+end;
+
+procedure TROAsyncSuperChannelWorker.cbPackage(const Sender: IROAbstractTCPConnection);
+var
+  lData: TByteArray;
+begin
+  fConnection.EndReceive;
+  try
+    IncomingData(fStateData, fWorkBuffer);
+    if not fRemoteSkipAck then begin
+      SetLength(lData, 5);
+      lData[0] := ScCmdAck;
+      Move(fStateData, lData[1], 4);
+      AsyncWrite(lData);
+    end;
+  except
+    SendError(fStateData, ScCmdNoAck_QueueFull);
+  end;
+  SetLength(fWorkBuffer, 5);
+  fConnection.BeginReceive(@fWorkBuffer[0], 5, cbMainRead);
+end;
+
+
+procedure TROAsyncSuperChannelWorker.cbMainRead(const Sender: IROAbstractTCPConnection);
+var
+  lTemp: TByteArray;
+begin
+  fLastData := Now;
+  lTemp := nil;
+  fConnection.EndReceive;
+  case fWorkBuffer[0] of
+    ScCmdPong:
+      begin
+        if Integer((@fWorkBuffer[1])^) = fServerExpectAck then fServerExpectAck := 0;
+        fConnection.BeginReceive(@fWorkBuffer[0], 5, cbMainRead);
+      end;
+    ScCmdPing:
+      begin
+        fWorkBuffer[0] := ScCmdPong;
+        AsyncWrite(fWorkBuffer);
+        fWorkBuffer := nil;
+        SetLength(fWorkBuffer, 5);
+        fConnection.BeginReceive(@fWorkBuffer[0], 5, cbMainRead);
+      end;
+    ScCmdAck:
+      begin
+        SetAckDetails(Integer((@fWorkBuffer[1])^), true, 0);
+        fConnection.BeginReceive(@fWorkBuffer[0], 5, cbMainRead);
+      end;
+    ScCmdNoAck:
+      begin
+        Move(fWorkBuffer[1], fStateData, 4);
+        fConnection.BeginReceive(@fWorkBuffer[0], 1, cbNoAckReply);
+      end;
+    ScCmdOptions:
+      begin
+        Move(fWorkBuffer[1], fStateData, 4);
+        if fStateData > fMaxPackageSize then begin
+          fConnection.BeginDisconnect(true, nil);
+          AsyncDisconnected(fConnection);
+          exit;
+        end;
+        SetLength(fWorkBuffer, fStateData);
+        fConnection.BeginReceive(@fWorkBuffer[0], fStateData, cbOptionsReply);
+      end;
+    ScCmdPackage:
+      begin
+        Move(fWorkBuffer[1], fStateData, 4);
+        fConnection.BeginReceive(@fWorkBuffer[0], 4, cbPackageLength);
+      end;
+    else begin
+      fConnection.BeginDisconnect(true, nil);
+      AsyncDisconnected(fConnection);
+    end;
+  end;
+end;
+
+function TROAsyncSuperChannelWorker.GetDefaultResponse: string;
+begin
+  Result := 'ROSC:Invalid connection string';
+end;
+
+initialization
+  fTimerList := TThreadList.Create;
+finalization
+  fTimer.Free;
+  fTimerList.Free;
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROAsyncSuperTcpServer.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROAsyncSuperTcpServer.pas
new file mode 100644
index 0000000..04556ca
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROAsyncSuperTcpServer.pas	
@@ -0,0 +1,284 @@
+unit uROAsyncSuperTcpServer;
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+uses
+  SysUtils, Classes, uROClasses, uROClient, uROClientIntf, uROServerIntf,
+  uROSessions, uROServer{$IFDEF MSWINDOWS}, Windows{$ENDIF}, uROAsyncSCHelpers,
+  uROThreadPool, uROEventRepository;
+
+type
+  TROAsyncConnectionEvent = procedure (aChannel: IROTransport; const aGuid: TGuid) of object;
+  TROBaseAsyncSuperTcpServer = class(TROServer)
+  private
+    fAckWaitTimeout: Integer;
+    fMaxPackageSize: Integer;
+    fGuidToClientMap: TStringList;
+    fSkipAck: Boolean;
+    fEventRepository: TROEventRepository;
+    fBlockingEvents: Boolean;
+    fOnClientConnected: TROAsyncConnectionEvent;
+    fOnClientDisconnected: TROAsyncConnectionEvent;
+    procedure SetThreadPool(const Value: TROThreadPool);
+  protected
+    fOwnsThreadPool: Boolean;
+    fThreadPool: TROThreadPool;
+    fClients: TThreadList;
+    procedure HasData(Id: Integer; aClient: TROAsyncSuperChannelWorker; aData: TStream);
+
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+    procedure DispatchEvent(anEventDataItem : TROEventData; aSessionReference : TGUID; aSender: TObject);
+  public
+    constructor Create(aOwner: TComponent); override;
+    destructor Destroy; override;
+
+    property AckWaitTimeout: Integer read fAckWaitTimeout write fAckWaitTimeout default 10000;
+    property MaxPackageSize: Integer read fMaxPackageSize write fMaxPackageSize default 10*1024*1024;
+    property SkipAck: Boolean read fSkipAck write fSkipAck default false;
+
+    property ThreadPool: TROThreadPool read fThreadPool write SetThreadPool;
+    property EventRepository: TROEventRepository read fEventRepository write fEventRepository;
+    property GuidToClientMap: TStringList read fGuidToClientMap;
+    property BlockingEvents: Boolean read fBlockingEvents write fBlockingEvents default False;
+    property OnClientConnected: TROAsyncConnectionEvent read fOnClientConnected write fOnClientConnected;
+    property OnClientDisconnected: TROAsyncConnectionEvent read fOnClientDisconnected write fOnClientDisconnected;
+  end;
+
+  TROAsyncInvokerQueueItem = class(TInterfacedObject, IROThreadPoolCallback)
+  private
+    fData: TStream;
+    fId: Integer;
+    fCaller: TROBaseAsyncSuperTcpServer;
+    FClient: TROAsyncSuperChannelWorker;
+  public
+    constructor Create(aCaller: TROBaseAsyncSuperTcpServer; aClient: TROAsyncSuperChannelWorker; Id: Integer; aData: TStream);
+    procedure Callback(Caller: TROThreadPool; Thread: TThread);
+    destructor Destroy; override;
+  end;
+
+  TSendEvent = class(TInterfacedObject, IROThreadPoolCallback)
+  private
+    fStream: TROEventData;
+    fOwner: TROBaseAsyncSuperTcpServer;
+    fClientGuid: TGUID;
+    fSender: TROEventRepository;
+    fWorkerOverride: IROTransport;
+  protected
+  public
+    constructor Create(aOwner: TROBaseAsyncSuperTcpServer; aClientGuid: TGUID; aSender: TROEventRepository; aData: TROEventData);
+    destructor Destroy; override;
+
+    procedure Callback(Caller: TROThreadPool; Thread: TThread);
+    property WorkerOverride: IROTransport read fWorkerOverride write fWorkerOverride;
+  end;
+
+implementation
+uses
+  uROTypes;
+
+{ TROBaseAsyncSuperTcpServer }
+
+constructor TROBaseAsyncSuperTcpServer.Create(aOwner: TComponent);
+begin                                                   
+  inherited Create(aOwner);
+  fClients := TThreadList.Create;
+  AckWaitTimeout := 10000;
+  fMaxPackageSize := 10 * 1024 * 1024;
+  fGuidToClientMap := TStringList.Create;
+  fGuidToClientMap.Sorted := true;
+
+end;
+
+destructor TROBaseAsyncSuperTcpServer.Destroy;
+begin
+  Active := False;
+  fGuidToClientMap.Free;
+  fClients.Free;
+  if fOwnsThreadPool then
+    fThreadPool.Free;
+  inherited Destroy;
+end;
+
+procedure TROBaseAsyncSuperTcpServer.HasData(Id: Integer; aClient: TROAsyncSuperChannelWorker; aData: TStream);
+var
+  lItem: IROThreadPoolCallback;
+  lOrg: TROAsyncInvokerQueueItem;
+begin
+  lOrg := TROAsyncInvokerQueueItem.Create(Self, aClient, Id, aData);
+  lItem := lOrg;
+  try
+    fThreadPool.QueueItem(lItem);
+  except
+    aClient.SendError(Id, ScCmdNoAck_QueueFull);
+    lOrg.fData := nil; // caller will free it on exceptions
+    raise;
+  end;
+end;
+
+procedure TROBaseAsyncSuperTcpServer.Notification(AComponent: TComponent; Operation: TOperation);
+begin
+  if (Operation = opRemove) then begin
+    if AComponent = fThreadPool then
+      fThreadPool := nil;
+    if AComponent = fEventRepository then
+      fEventRepository := nil;
+  end;
+  inherited;
+end;
+
+procedure TROBaseAsyncSuperTcpServer.DispatchEvent(anEventDataItem : TROEventData; aSessionReference : TGUID; aSender: TObject);
+var
+  i: Integer;
+  aref: IROSessionsChangesListener;
+  se: IROThreadPoolCallback;
+begin
+  fClients.LockList;
+  try
+    i := fGuidToClientMap.IndexOf(GUIDToString(aSessionReference));
+    if i = -1 then begin
+      if fEventRepository <> nil then begin
+        if Supports(fEventRepository, IROSessionsChangesListener, aref) then
+          aref.SessionsChangedNotification(aSessionReference, saRemoveActiveListener, nil);
+        fEventRepository.StoreEventData(EmptyGUID, Binary(anEventDataItem.Data), false, false, GUIDToString(aSessionReference));
+        if anEventDataItem.RemoveRef = 0 then anEventDataItem.Free;
+        exit;
+      end;
+    end;
+  finally
+    fClients.UnlockList;
+  end;
+  se := TSendEvent.Create(Self, aSessionReference, TROEventRepository(aSender), anEventDataItem);
+  if BlockingEvents then
+    se.Callback(fThreadPool, nil)
+  else
+    fThreadPool.QueueItem(se);
+end;
+
+procedure TROBaseAsyncSuperTcpServer.SetThreadPool(const Value: TROThreadPool);
+begin
+  if fOwnsThreadPool then
+  begin
+    fOwnsThreadPool := false;
+    fThreadPool.Free;
+  end;
+  fThreadPool := Value;
+end;
+
+
+
+procedure TSendEvent.Callback(Caller: TROThreadPool; Thread: TThread);
+var
+  ms: TROConstantMemoryStream;
+  i: Integer;
+  wak: IROPackageAck;
+  ass: IROActiveEventServer;
+  obj: TROAsyncSuperChannelWorker;
+  aRef: IROSessionsChangesListener;
+begin
+  obj := nil;
+  ms := TROConstantMemoryStream.Create(TROConstantMemoryStream(fStream.Data));
+  try
+    try
+      fOwner.fClients.LockList;
+      try
+        i := fOwner.fGuidToClientMap.IndexOf(GUIDToString(fClientGuid));
+        if i = -1 then exit;
+        if fWorkerOverride <> nil then
+          obj := TROAsyncSuperChannelWorker(fWorkerOverride.GetTransportObject)
+        else
+          obj := TROAsyncSuperChannelWorker(fOwner.fGuidToClientMap.Objects[i]);
+        wak := obj.SendPackage(ms, 0);
+        if not Supports(obj, IROSessionsChangesListener, ass) then ass := nil;
+      finally
+        fOwner.fClients.UnlockList;
+      end;
+      TROAsyncSuperChannelWorker.WaitForAck(wak, fOwner.fAckWaitTimeout);
+    except
+      if fOwner.fEventRepository <> nil then begin
+        if Supports(fOwner.fEventRepository, IROSessionsChangesListener, aref) then
+          aref.SessionsChangedNotification(fClientGuid, saRemoveActiveListener, obj);
+        fOwner.fEventRepository.StoreEventData(EmptyGUID, ms, false, false, GUIDToString(fClientGuid));
+        exit;
+      end;
+    end;
+  finally
+    ms.Free;
+  end;
+end;
+
+constructor TSendEvent.Create(aOwner: TROBaseAsyncSuperTcpServer; aClientGuid: TGUID; aSender: TROEventRepository; aData: TROEventData);
+begin
+  inherited Create;
+  fStream := aData;
+  fSender := aSender;
+  fClientGuid := aClientGuid;
+  fOwner := aOwner;
+end;
+
+destructor TSendEvent.Destroy;
+begin
+  if fStream.RemoveRef = 0 then
+    fStream.Free;
+  inherited Destroy;
+end;
+
+{ TROAsyncInvokerQueueItem }
+
+procedure TROAsyncInvokerQueueItem.Callback(Caller: TROThreadPool; Thread: TThread);
+var
+  lResponse: TMemoryStream;
+  l: TList;
+  lClient: IROTransport;
+begin
+  lResponse := TMemoryStream.Create;
+  try
+    lClient := FClient;
+    try
+      fCaller.DispatchMessage(lClient, fData, lResponse);
+    finally
+      lClient := nil;
+    end;
+    lResponse.Seek(0, soFromBeginning);
+    l := fCaller.fClients.LockList;
+    try
+      if l.IndexOf(FClient) = -1 then exit;
+    finally
+      fCaller.fClients.UnlockList;
+    end;
+    if lResponse.Size > FClient.MaxPackageSize then
+      FClient.SendError(fId, ScCmdNoAck_MsgTooLarge)
+    else
+      FClient.SendPackage(lResponse, fId).RemoveFromList; //  we're not going to wait
+  finally
+    lResponse.Free;
+  end;
+end;
+
+constructor TROAsyncInvokerQueueItem.Create(aCaller: TROBaseAsyncSuperTcpServer; aClient: TROAsyncSuperChannelWorker; Id: Integer; aData: TStream);
+begin
+  inherited Create;
+  fCaller := aCaller;
+  fId := Id;
+  fData := aData;
+  fClient := aClient;
+end;
+
+destructor TROAsyncInvokerQueueItem.Destroy;
+begin
+  fData.Free;
+  inherited Destroy;
+end;
+
+end.                                                                                                
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROBPDXHTTPServer.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROBPDXHTTPServer.pas
new file mode 100644
index 0000000..fd5ae96
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROBPDXHTTPServer.pas	
@@ -0,0 +1,539 @@
+unit uROBPDXHTTPServer;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses Classes, uROServer, uROClientIntf, uROBPDXTCPServer, uROHTTPTools,
+     {$IFDEF RemObjects_USE_RODX}
+     uRODXString, uRODXServerCore, uRODXSock, uRODXHTTPServerCore, uRODXHTTPHeaderTools;
+     {$ELSE}
+     DXString, DXServerCore, DXSock, DXHTTPServerCore, DXHTTPHeaderTools;
+     {$ENDIF}
+
+type
+  { TROBPDXHTTPTransport }
+  TROBPDXHTTPTransport = class(TInterfacedObject, IROTransport, IROTCPTransport, IROHTTPTransport)
+  private
+    fResponseHeaders : TStringList;
+
+    fClientThread: TDXClientThread;
+    fHeaderInfo: PHeaderInfo;
+    fOverriddenPathInfo: string;
+  protected
+    { IROHTTPTransport }
+    procedure SetHeaders(const aName, aValue : string);
+    function GetHeaders(const aName : string) : string;
+    function GetContentType : string;
+    procedure SetContentType(const aValue : string);
+    function GetUserAgent : string;
+    procedure SetUserAgent(const aValue : string);
+    function GetTargetURL : string;
+    procedure SetTargetURL(const aValue : string);
+    function GetPathInfo : string;
+    function GetLocation : string;
+    function GetQueryString : string;
+    function GetQueryParameter(const aName: string): string;
+    procedure SetPathInfo(const aValue: String);
+
+    { IROTransport }
+    function GetTransportObject : TObject;
+    function GetClientAddress : string;
+  public
+    constructor Create(aClientThread: TDXClientThread; aHeaderInfo: PHeaderInfo);
+    destructor Destroy; override;
+
+    property ClientThread: TDXClientThread read fClientThread;
+    property HeaderInfo: PHeaderInfo read fHeaderInfo;
+  end;
+
+  { TROBPDXHTTPServer }
+  TROBPDXHTTPServer = class(TROBPDXTCPServer)
+  private
+    fServeInfoPage, fServeRodl: Boolean;
+    fSendExceptionsAs500: boolean;
+    fDisableNagle:  Boolean;
+    fOnGetCustomClientAccessPolicy: TROCustomClientAccessPolicyMethod;
+    fSendClientAccessPolicyXml: TROClientAccessPolicyType;
+    function GetBPDXServer: TDXHTTPServerCore;
+    function GetSupportKeepAlive: Boolean;
+    procedure SetSupportKeepAlive(const Value: Boolean);
+
+  protected
+    function CreateBPDXServer : TDXServerCore; override;
+
+    function BuildResponseHeader(StatusCode:Integer;var EnableKeepAlive : Boolean) : Ansistring;
+    procedure CleanupNetscapeAndProxyRequests(HeaderInfo:PHeaderInfo);
+
+    procedure InternalOnNewConnect(ClientThread:TDXClientThread);
+    procedure InternalHandleSession(ClientThread: TDXClientThread; HeaderInfo: PHeaderInfo; var EnableKeepAlive: boolean);
+
+    function GetDispatchersClass : TROMessageDispatchersClass; override;
+  public
+    constructor Create(aOwner: TComponent); override;
+
+  published
+    property BPDXServer: TDXHTTPServerCore read GetBPDXServer;
+    property DisableNagle: Boolean read fDisableNagle write fDisableNagle default True;
+    property SupportKeepAlive: Boolean read GetSupportKeepAlive write SetSupportKeepAlive;
+    property ServeInfoPage : Boolean read fServeInfoPage write fServeInfoPage default true;
+    property ServeRodl : Boolean read fServeRodl write fServeRodl default true;
+    property SendExceptionsAs500: boolean read fSendExceptionsAs500 write fSendExceptionsAs500 default true;
+    property OnGetRODLReader;
+    property OnGetCustomClientAccessPolicy: TROCustomClientAccessPolicyMethod read fOnGetCustomClientAccessPolicy write fOnGetCustomClientAccessPolicy;
+    property SendClientAccessPolicyXml: TROClientAccessPolicyType read fSendClientAccessPolicyXml write fSendClientAccessPolicyXml default captAllowNone;
+  end;
+
+implementation
+
+uses SysUtils,{$IFDEF DELPHI2009UP}AnsiStrings,{$ENDIF}
+  uRORes, uROHTTPDispatch, uROClient, uROServerIntf, uROClasses,
+  uROHtmlServerInfo, uRODL;
+
+constructor TROBPDXHTTPTransport.Create(aClientThread: TDXClientThread; aHeaderInfo: PHeaderInfo);
+begin
+  inherited Create;
+  fResponseHeaders := TStringList.Create;
+  fClientThread := aClientThread;
+  fHeaderInfo := aHeaderInfo;
+end;
+
+destructor TROBPDXHTTPTransport.Destroy;
+begin
+  fResponseHeaders.Free;
+
+  inherited;
+end;
+
+procedure TROBPDXHTTPTransport.SetHeaders(const aName, aValue : string);
+begin
+  SetHeaderValue(fResponseHeaders, aName, aValue);
+end;
+
+function TROBPDXHTTPTransport.GetHeaders(const aName : string) : string;
+var
+  s: string;
+  lPos: Integer;
+  s1: string;
+begin
+  s1:={$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(fHeaderInfo.Unknown);
+  lPos := Pos(#13#10+aName+'=',s1 );
+  if lPos = 0 then begin
+    result := '';
+    exit;
+  end;
+  s := Copy(s1, lPos + 2, MaxInt);
+  s := copy(s,1,pos(#13#10, s)-1);
+  s := copy(s,pos('=', s)+1, MaxInt);
+  result := s;
+end;
+
+function TROBPDXHTTPTransport.GetContentType : string;
+begin
+  result := {$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(fHeaderInfo.ContentType)
+end;
+
+procedure TROBPDXHTTPTransport.SetContentType(const aValue : string);
+begin
+  SetHeaders(id_ContentType, aValue);
+end;
+
+function TROBPDXHTTPTransport.GetUserAgent : string;
+begin
+  result := {$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(fHeaderInfo.UserAgent)
+end;
+
+procedure TROBPDXHTTPTransport.SetUserAgent(const aValue : string);
+begin
+  SetHeaders(id_UserAgent, aValue);
+end;
+
+function TROBPDXHTTPTransport.GetTargetURL : string;
+begin
+  result := ''
+end;
+
+procedure TROBPDXHTTPTransport.SetTargetURL(const aValue : string);
+begin
+
+end;
+
+function TROBPDXHTTPTransport.GetTransportObject : TObject;
+begin
+  result  :=  Self;
+end;
+
+function TROBPDXHTTPTransport.GetClientAddress : string;
+begin
+  result  :=  {$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(fClientThread.Socket.PeerIPAddress);
+end;
+
+function TROBPDXHTTPTransport.GetPathInfo : string;
+var
+  r: AnsiString;
+begin
+  if fOverriddenPathInfo <> '' then
+    result := fOverriddenPathInfo
+  else begin
+    r := StringReplace(fHeaderInfo^.URI, AnsiString('http://'), AnsiString(''), []);
+    result := {$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(Copy(r, Pos(AnsiChar('/'), r), MaxInt));
+  end;
+end;
+
+function TROBPDXHTTPTransport.GetLocation : string;
+begin
+  result := 'http://'+{$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(fHeaderInfo^.Host);
+end;
+
+{ TROBPDXHTTPServer }
+function TROBPDXHTTPServer.GetBPDXServer: TDXHTTPServerCore;
+begin
+  result := TDXHTTPServerCore(inherited BPDXServer);
+end;
+
+function TROBPDXHTTPServer.CreateBPDXServer: TDXServerCore;
+begin
+  //DXSock.TDXXferTimeout := 100;
+  result  :=  TDXHTTPServerCore.Create(Self);
+
+  with TDXHTTPServerCore(result) do begin
+    ServerPort  :=  8099;
+    BindTo  :=  ''; // blank = ALL IP's!
+    Timeout  :=  50000; // 50 seconds for initial header
+    ThreadCacheSize  :=  10;
+    SocketOutputBufferSize  :=  bsfHuge;
+
+    // Optimized settings
+    {$IFDEF MSWINDOWS}
+    ListenerThreadPriority := tpIdle;
+    SpawnedThreadPriority := tpIdle;
+    {$ENDIF}
+    SocketOutputBufferSize := bsfNormal;
+    UseThreadPool := FALSE;
+    SupportKeepAlive  :=  FALSE;
+
+    OnNewConnect  :=  InternalOnNewConnect;
+    OnCommandGET  :=  InternalHandleSession;
+    OnCommandPOST  :=  InternalHandleSession;
+    OnCommandHEAD  :=  InternalHandleSession;
+  end;
+end;
+
+function TROBPDXHTTPServer.BuildResponseHeader(StatusCode:Integer;var EnableKeepAlive : Boolean) : Ansistring;
+begin
+   Result := AnsiString('HTTP/1.1 ')+BPDXServer.HeaderText(StatusCode)+AnsiString(#13#10+
+      'Server: RemObjects DXSock Web Server v1.0'+#13#10+
+      'Date: ')+{DXString.}DateTimeToGMTRFC822(Now)+AnsiString(#13#10+
+      'MIME-Version: 1.0'+#13#10+
+      'Public: GET,POST,HEAD,TRACE'+#13#10+
+      'Accept-Ranges: none'+#13#10);
+   if StatusCode<>200 then begin
+      Result := Result+
+         AnsiString('Pragma: no-cache'+#13#10+
+                    'Cache-Control: no-cache'+#13#10);
+      EnableKeepAlive := False;
+   end;
+   if EnableKeepAlive then begin
+      Result := Result+AnsiString('Connection: Keep-Alive'+#13#10+
+         'Keep-Alive: timeout=')+Ansi_IntToStr((BPDXServer.Timeout div 1000))+AnsiString(#13#10);
+   End
+   else begin
+      Result := Result+AnsiString('Connection: close'+#13#10);
+   end;
+end;
+
+Procedure TROBPDXHTTPServer.CleanupNetscapeAndProxyRequests(HeaderInfo:PHeaderInfo);
+Var
+   Ws:AnsiString;
+   p: integer;
+begin
+   p:= Pos(AnsiString('://'),HeaderInfo^.Raw);
+   if (p>0) and (p<10) then begin
+      Ws := Copy(HeaderInfo^.RAW,1,Pos(AnsiChar(#32),HeaderInfo^.RAW));
+      Delete(HeaderInfo^.RAW,1,p+2);
+      p := Pos(AnsiChar('/'),HeaderInfo^.RAW);
+      if p = 0 then
+        HeaderInfo^.RAW := AnsiString('/ HTTP/1.1')
+      else
+        Delete(HeaderInfo^.RAW,1,p-1);
+      HeaderInfo^.RAW := Ws+HeaderInfo^.RAW;
+   end;
+end;
+
+procedure TROBPDXHTTPServer.InternalOnNewConnect(ClientThread:TDXClientThread);
+begin
+//  ClientThread.Socket.SetNagle(False);
+  if fDisableNagle then
+    ClientThread.Socket.SetNagle(True);
+  BPDXServer.ProcessSession(ClientThread); // tell server to handle connection
+end;
+
+procedure TROBPDXHTTPServer.InternalHandleSession(ClientThread: TDXClientThread; HeaderInfo: PHeaderInfo; var EnableKeepAlive: boolean);
+
+  function GetError: ansistring;
+  begin
+    Result := AnsiString('<font size="7">500 Invalid Path</font><br />')+
+              {$IFDEF UNICODE}WideStringToAnsiString{$ENDIF}(err_CannotFindMessageDispatcher);
+  end;
+
+Var
+   StatusCode:Integer; // you set this!
+   req : TMemoryStream;
+   resp:TMemoryStream; // you set this!
+   transport : IROHTTPTransport;
+   HeaderStr:ansiString;
+   disp : TROHTTPDispatcher;
+   s: Ansistring;
+    root, sub : string;
+   lIgnore: TROResponseOptions;
+   format: TDataFormat;
+   info: IRONamedModuleInfo;
+   lRodl: TRodlLibrary;
+   ok: Boolean;
+   lPolicyContent: AnsiString;
+begin
+  req  := NIL;
+  resp := NIL;
+  ok := false;
+  // if POST then collect the post data!
+  if HeaderInfo^.Method='POST' then begin // collect post data!
+    if HeaderInfo^.ContentLength=0 then begin // HACKER!!
+      ClientThread.Socket.Writeln(BuildResponseHeader(411,EnableKeepAlive));
+      Exit;
+    end;
+
+    while Length(HeaderInfo^.PostData)<HeaderInfo^.ContentLength do begin
+      HeaderInfo^.PostData  :=  HeaderInfo^.PostData+
+                                ClientThread.Socket.ReadStr(HeaderInfo^.ContentLength-Length(HeaderInfo^.PostData));
+      if ClientThread.Socket.DroppedConnection then begin // connection aborted!
+        EnableKeepAlive := False;
+        Exit;
+      end;
+    end;
+  end;
+
+  // now we handle the request!
+  CleanupNetscapeAndProxyRequests(HeaderInfo);
+  if HeaderInfo^.URI='' then HeaderInfo^.URI := AnsiChar('/'); // fix old Netscape!
+
+  try
+    req := TROBinaryMemoryStream.Create(HeaderInfo^.PostData);
+    resp := TROBinaryMemoryStream.Create;
+    transport  :=  TROBPDXHTTPTransport.Create(ClientThread, HeaderInfo);
+
+    { make sure you set the:
+        StatusCode to the result you want to send!
+        resp - is the page body, xml, html, etc.
+        MimeType - is the Content-Type: <value_only> e.g. text/html }
+
+    root := transport.PathInfo;
+    if (root <> '') and (root[1] = '/') then delete(root, 1,1);
+    if pos('/', root) > 0 then
+    begin
+      sub := copy(root, pos('/', root)+1, maxint);
+      root := '/' + copy(root, 1, pos('/', root) - 1);
+    end else
+    begin
+      root := '/' + root;
+      sub := '';
+    end;
+
+    disp := TROHTTPMessageDispatchers(Dispatchers).GetDispatcherByPath(root) as TROHTTPDispatcher;
+
+    if disp <> nil then
+    begin
+      if (req.Size = 0) then begin
+        ok := fServeRodl;
+        if ok then
+          ok := IntDispatchMessage(disp, transport, req, resp, lIgnore)
+        else begin
+          s := GetError;
+          resp.Write(s[1], length(s));
+        end;
+      end else if (sub = '')  then
+        ok := IntDispatchMessage(disp, transport, req, resp, lIgnore)
+      else if (CompareText(sub, 'rodl') = 0) and fServeRodl then
+      begin
+        if copy(disp.PathInfo, 1, 1) = '/' then transport.PathInfo := disp.PathInfo else transport.PathInfo := '/'+disp.PathInfo;
+        GetRodl(resp, transport, format, GetRODLReader);
+        ok := true;
+      end else if Supports(disp.Message, IRONamedModuleInfo, info) and (CompareText(info.ModuleInfoName, sub) = 0) and fServeRodl then
+      begin
+        if copy(disp.PathInfo, 1, 1) = '/' then transport.PathInfo := disp.PathInfo else transport.PathInfo := '/'+disp.PathInfo;
+        info.GetModuleInfo(resp, transport, format);
+        ok := true;
+      end else
+      begin
+        ok := IntDispatchMessage(disp, transport, req, resp, lIgnore)
+      end;
+    end else if (CompareText(root, '/rodl') = 0) and (sub = '') and fServeRodl then
+    begin
+      GetRodl(resp, transport, format, GetRODLReader);
+      ok := true;
+    end else if fServeInfoPage and (CompareText(root, '/doc') = 0) then
+    begin
+      if sub = 'css' then
+      begin
+        s := GetRodlCss;
+        resp.Write(s[1], length(s));
+        transport.ContentType := 'text/css';
+        ok := true;
+      end else
+      if sub = 'xslt' then
+      begin
+        s := GetRodlStyleSheet;
+        resp.Write(s[1], length(s));
+        transport.ContentType := 'text/xml';
+        ok := true;
+      end else if sub = '' then
+      begin
+        lRodl := GetRodlLibrary(GetRODLReader);
+        try
+          s := GetRodlWithStyleSheet(lRodl, '/doc/xslt');
+          resp.Write(s[1], length(s));
+          transport.ContentType := 'text/xml';
+        finally
+          lRodl.Free;
+        end;
+        ok := true;
+      end else
+      begin
+        s := GetError;
+        resp.Write(s[1], length(s));
+        ok := false;
+      end;
+    end else if fServeInfoPage and (CompareStr(root, '/favicon.ico') = 0) then
+    begin
+      GetRodlFavIcon(resp);
+      transport.ContentType := 'image/x-icon';
+      ok := true;
+    end else if fServeInfoPage and (root = '/') then
+    begin
+      lrodl := GetRodlLibrary(GetRODLReader);
+      try
+        s := GetRodlServerInfo(transport.PathInfo, lRodl, Dispatchers);
+        resp.Write(s[1], length(s));
+      finally
+        lRodl.Free;
+      end;
+      ok := true;
+    end else
+    if CompareText(root, '/clientaccesspolicy.xml') = 0 then begin
+      case fSendClientAccessPolicyXml of
+        captAllowAll: begin
+          lPolicyContent := GetClientAccessPolicy;
+        end;
+        captCustom: begin
+          if Assigned(fOnGetCustomClientAccessPolicy) then
+            fOnGetCustomClientAccessPolicy(Self, lPolicyContent);
+        end;
+      end;
+      if lPolicyContent <> '' then begin
+        transport.ContentType := 'text/xml';
+        resp.Write(lPolicyContent[1], Length(lPolicyContent));
+      end;
+    end  else
+    begin
+      s := GetError;
+      resp.Write(s[1], length(s));
+      ok := false;
+    end;
+
+    if ok or (not fSendExceptionsAs500) then
+      StatusCode:= HTTP_OK
+    else
+      StatusCode := HTTP_FAILED;
+
+    HeaderStr := BuildResponseHeader(StatusCode,EnableKeepAlive)+
+       id_UserAgent+': '+str_ProductName+#13#10+
+       id_ContentLength+': '+Ansi_IntToStr(resp.Size)+#13#10+
+       id_ContentType+': '+{$IFDEF UNICODE}WideStringToAnsiString{$ENDIF}(transport.Headers[id_ContentType])+#13#10;
+
+    ClientThread.Socket.Writeln(HeaderStr);
+
+    if (HeaderInfo^.Method<>'HEAD') and (resp.Size>0) then begin
+      {$IFDEF VER100}
+      ClientThread.Socket.BlockWrite(resp.Memory,resp.Size);
+      {$ELSE}
+      ClientThread.Socket.Write(resp.Memory,resp.Size);
+      {$ENDIF}
+    end;
+  finally
+    req.Free;
+    resp.Free;
+  end;
+end;
+
+function TROBPDXHTTPServer.GetDispatchersClass : TROMessageDispatchersClass;
+begin
+  result := TROHTTPMessageDispatchers
+end;
+
+
+function TROBPDXHTTPServer.GetSupportKeepAlive: Boolean;
+begin
+  Result := BPDXServer.SupportKeepAlive;
+end;
+
+procedure TROBPDXHTTPServer.SetSupportKeepAlive(const Value: Boolean);
+begin
+  BPDXServer.SupportKeepAlive := Value;
+end;
+
+function TROBPDXHTTPTransport.GetQueryString: string;
+begin
+  result := {$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(fHeaderInfo^.QueryString)
+end;
+
+constructor TROBPDXHTTPServer.Create(aOwner: TComponent);
+begin
+  inherited;
+  fServeInfoPage := true;
+  fDisableNagle := true;
+  fServeRodl := true;
+  fSendExceptionsAs500 := true;
+end;
+
+procedure TROBPDXHTTPTransport.SetPathInfo(const aValue: String);
+begin
+  fOverriddenPathInfo := aValue;
+end;
+
+function TROBPDXHTTPTransport.GetQueryParameter(
+  const aName: string): string;
+var
+  s: Ansistring;
+  i: Integer;
+  lName: AnsiString;
+begin
+  lName := {$IFDEF UNICODE}WideStringToAnsiString{$ENDIF}(AName);
+  s := fHeaderInfo^.QueryString;
+  if Copy(s,1,length(lName)+1) = lName+'=' then begin
+    Delete(s,1,Length(lname)+1);
+  end else begin
+    i := Pos('&' +lName+'=',s);
+    if i = 0 then exit;
+    Delete(s,1,i+Length(lName)+1);
+  end;
+  i := pos(AnsiChar('&'), s);
+  if i > 0 then s:= copy(s,1,i-1);
+  Result := {$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(EscapeDecode(s));
+end;
+
+initialization
+  RegisterServerClass(TROBPDXHTTPServer);
+finalization
+  UnregisterServerClass(TROBPDXHTTPServer);
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROBPDXTCPServer.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROBPDXTCPServer.pas
new file mode 100644
index 0000000..db03326
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROBPDXTCPServer.pas	
@@ -0,0 +1,189 @@
+unit uROBPDXTCPServer;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses Classes, uROServer, uROClientIntf,
+     {$IFDEF RemObjects_USE_RODX}
+     uRODXString, uRODXSock, uRODXServerCore;
+     {$ELSE}
+     DXString, DXSock, DXServerCore;
+     {$ENDIF}
+
+type
+  { TROBPDXTCPTransport }
+  TROBPDXTCPTransport = class(TInterfacedObject, IROTransport, IROTCPTransport)
+  private
+    fClientThread: TDXClientThread;
+
+  protected
+    { IROTransport }
+    function GetTransportObject : TObject;
+    function GetClientAddress : string;
+
+  public
+    constructor Create(aClientThread: TDXClientThread);
+
+    property ClientThread: TDXClientThread read fClientThread;
+  end;
+
+  { TROBPDXTCPServer }
+  TROBPDXTCPServer = class(TROServer)
+  private
+    fBPDXServer: TDXServerCore;
+    function GetPort: integer;
+    procedure SetPort(const Value: integer);
+
+  protected
+    function CreateBPDXServer : TDXServerCore; virtual;
+    procedure IntSetActive(const Value: boolean); override;
+    function IntGetActive : boolean; override;
+
+    procedure InternalOnNewConnect(ClientThread:TDXClientThread);
+
+  public
+    constructor Create(aComponent: TComponent); override;
+    destructor Destroy; override;
+
+  published
+    property BPDXServer: TDXServerCore read fBPDXServer;
+    property Port:integer read GetPort write SetPort;
+  end;
+
+implementation
+
+uses SysUtils,
+     uRORes;
+
+
+{ TROBPDXTCPTransport }
+
+constructor TROBPDXTCPTransport.Create(aClientThread: TDXClientThread);
+begin
+  inherited Create;
+  fClientThread := aClientThread;
+end;
+
+function TROBPDXTCPTransport.GetClientAddress: string;
+begin
+  result := {$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(fClientThread.Socket.PeerIPAddress);
+end;
+
+function TROBPDXTCPTransport.GetTransportObject: TObject;
+begin
+  result := Self;
+end;
+
+{ TROBPDXTCPServer }
+
+constructor TROBPDXTCPServer.Create(aComponent: TComponent);
+begin
+  inherited;
+
+  fBPDXServer := CreateBPDXServer;
+  fBPDXServer.Name := 'InternalBPDXServer';
+  {$IFDEF DELPHI6UP}
+  fBPDXServer.SetSubComponent(True);
+  {$ENDIF}
+end;
+
+function TROBPDXTCPServer.CreateBPDXServer: TDXServerCore;
+begin
+  //DXSock.TDXXferTimeout := 100;
+  result:=TDXServerCore.Create(Self);
+  result.ServerPort:=8090;
+  result.BindTo:=''; // blank = ALL IP's!
+  result.ThreadCacheSize := 10;
+  result.OnNewConnect:=InternalOnNewConnect; // accept new connections
+
+  // Optimized settings
+  {$IFDEF MSWINDOWS}
+  result.ListenerThreadPriority := tpIdle;
+  result.SocketOutputBufferSize := bsfNormal;
+  result.SpawnedThreadPriority := tpIdle;
+  {$ENDIF}
+  result.UseThreadPool := FALSE;
+end;
+
+destructor TROBPDXTCPServer.Destroy;
+begin
+  fBPDXServer.Stop; // terminate all sessions!
+  fBPDXServer.Free;
+
+  inherited;
+end;
+
+procedure TROBPDXTCPServer.InternalOnNewConnect(
+  ClientThread: TDXClientThread);
+var req:TMemoryStream;
+    resp:TMemoryStream;
+    transport : IROTCPTransport;
+begin
+  req:=TMemoryStream.Create;
+  resp:=TMemoryStream.Create;
+  try
+    ClientThread.Socket.SetNagle(true);
+    // this is the same as INDY, will read a stream for the 4 byte length header
+    // or fatal socket error
+    // or time out of 120,000ms (2 minutes).
+    ClientThread.Socket.SaveToStreamWithSize(req,120000);
+
+    //If ClientThread.Socket.DroppedConnection then Exit; BIG BOTTLENECK!
+
+    transport := TROBPDXTCPTransport.Create(ClientThread);
+    req.Position := 0;
+    DispatchMessage(transport, req, resp);
+    //ProcessMessage(MessageIntf, transport, req, resp);
+
+    resp.Seek(0,0); // A MUST!
+    
+    ClientThread.Socket.WriteInteger(resp.Size);
+    ClientThread.Socket.Write(resp.Memory, resp.Size);
+  finally
+    resp.Free;
+    req.Free;
+  end;
+end;
+
+function TROBPDXTCPServer.IntGetActive: boolean;
+begin
+  result := fBPDXServer.IsActive and not fBPDXServer.Suspend
+end;
+
+procedure TROBPDXTCPServer.IntSetActive(const Value: boolean);
+begin
+  if Value then begin
+    if not fBPDXServer.IsActive then fBPDXServer.Start
+    else if fBPDXServer.Suspend then fBPDXServer.Resume;
+  end
+  else fBPDXServer.Pause
+end;
+
+procedure TROBPDXTCPServer.SetPort(const Value:integer);
+begin
+  BPDXServer.ServerPort := Value;
+end;
+
+function TROBPDXTCPServer.GetPort: integer;
+begin
+  Result := BPDXServer.ServerPort;
+end;
+
+initialization
+  RegisterServerClass(TROBPDXTCPServer);
+finalization
+  UnregisterServerClass(TROBPDXTCPServer);
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROBaseSuperHttpChannel.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROBaseSuperHttpChannel.pas
new file mode 100644
index 0000000..f5fd52c
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROBaseSuperHttpChannel.pas	
@@ -0,0 +1,643 @@
+unit uROBaseSuperHttpChannel;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Components                                   }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes, SysUtils, uROClient, uROClientIntf, uROAsync, uROClasses, SyncObjs,
+  {$IFDEF RemObjects_UseEncryption} uRoEncryption, {$ENDIF}uROThreadPool;
+
+type
+  TDynByteArray = array of byte;
+  TROHttpWaitingRequest = class
+  private
+    fEvent: TROEvent;
+    fFreeEvent: Boolean;
+    fId: Integer;
+    fResultData: TDynByteArray;
+    fResultErrorCode: Integer;
+  public
+    property Id: Integer read fId;
+    property Event: TROEvent read fEvent;
+    property Resultdata: TDynByteArray read fResultData write fResultData;
+    property ResultErrorCode: Integer read fResultErrorCode write fResultErrorCode;
+
+    constructor Create(Id: Integer); overload;
+    constructor Create(Id: Integer; Ev: TROEvent); overload;
+    destructor Destroy; override;
+  end;
+  EROSuperHttpChannelException = class(EROException);
+  TROOnInvalidClientIdHandler = procedure(Sender: TObject; var aReconnect: Boolean) of object;
+  TROBaseSuperHttpChannel = class(TROTransportChannel, IROTransport,
+    IROActiveEventChannel, IROMultiThreadAwareChannel,
+    IROAsyncTransportChannel, IROActiveAsyncTransportChannel, IROTransportChannelEx, IROHTTPTransport)
+  private
+    fConnectWait: TROEvent;
+    fActive, fConnected: Boolean;
+    fSessionId, fConnectionId: TGuid;
+    fRemoteMaxPackageSize,
+    fMaxPackageSize: Integer;
+    fWaitingRequest: TThreadList;
+    fPackageCounter: Integer;
+    fOwnsThreadPool: Boolean;
+    fEventThreadPool: TROThreadPool;
+    fDispatchLock: TCriticalSection;
+    fWaitingThread: TThread;
+    fEventReceiver: IROEventReceiver;
+    fRequestTimeout: Integer;
+    fConnectTimeout: Integer;
+    fHttpRequestTimeout: Integer;
+    fOnInvalidClientID: TROOnInvalidClientIdHandler;
+    procedure SetActive(const Value: Boolean);
+    procedure ProcessEvent(aId: Integer; aData: TDynByteArray);
+    procedure SetEventThreadPool(const Value: TROThreadPool);
+    function GetEventThreadPool: TROThreadPool;
+  protected
+  { IROTransport }
+    function GetTransportObject : TObject; override;
+  { IROHTTPTransport }
+    function GetClientAddress : string; virtual; abstract;
+    procedure SetHeaders(const aName, aValue : string); virtual; abstract;
+    function GetHeaders(const aName : string) : string; virtual; abstract;
+    function GetContentType : string; virtual; abstract;
+    procedure SetContentType(const aValue : string); virtual; abstract;
+    function GetUserAgent : string; virtual; abstract;
+    procedure SetUserAgent(const aValue : string); virtual; abstract;
+    function GetTargetURL : string; virtual; abstract;
+    procedure SetTargetURL(const aValue : string); virtual; abstract;
+    procedure SetPathInfo (const aValue : string); virtual; abstract;
+    function GetPathInfo : string; virtual; abstract;
+    function GetQueryString : string; virtual; abstract;
+    function GetLocation : string; virtual; abstract;
+    function GetQueryParameter(const aName: string): string; virtual; abstract;
+  protected
+    procedure IntDispatch(aRequest: TStream; aResponse: TStream); override;
+    procedure IntSetServerLocator(aServerLocator: TROServerLocator); override;
+    function CheckStatus(const iMessageID: String): Boolean;
+    procedure RetrieveResponse(const iMessageID: String;
+      aResponse: TStream);
+    procedure BeforeDispatch(aMessage: IROMessage); override;
+    procedure RegisterEventReceiver(aReceiver: IROEventReceiver);
+    procedure UnregisterEventReceiver(aReceiver: IROEventReceiver);
+    function InvokeRequest(aRequest:TStream; iGetResponse:boolean=true):string; overload;
+    function InvokeRequest(aRequest:TStream; aGetResponse:boolean=true; aEvent: TROEvent=nil):string; overload;
+
+    procedure CancelRequest(aWaitingThread: Boolean); virtual; abstract;
+    procedure DispatchHttpRequest(aWaitingThread: Boolean; aRequest: TDynByteArray; out aResponse: TDynByteArray); virtual; abstract;
+
+  public
+    constructor Create(aOwner: TComponent); override;
+    destructor Destroy; override;
+
+    property EventThreadPool :TROThreadPool read GetEventThreadPool write SetEventThreadPool;
+    property ConnectionId: TGUID read fConnectionId write fConnectionId;
+    property SessionId: TGuid read fSessionId write fSessionId;
+    property Connected: Boolean read fConnected;
+    property Active: Boolean read fActive write SetActive;
+    property MaxPackageSize: Integer read fMaxPackageSize write fMaxPackageSize default 10*1024 * 1024;
+    property RequestTimeout: Integer read fRequestTimeout write fRequestTimeout default 60000;
+    property ConnectTimeout: Integer read fConnectTimeout write fConnectTimeout default 10000;
+    property HttpRequestTimeout: Integer read fHttpRequestTimeout write fHttpRequestTimeout default 10000;
+  published
+    property OnInvalidCientID: TROOnInvalidClientIdHandler read fOnInvalidClientID write fOnInvalidClientID;
+    property OnInvalidClientID: TROOnInvalidClientIdHandler read fOnInvalidClientID write fOnInvalidClientID;    
+  end;
+const
+  ShHello = 0;
+  ShGoodbye = 1;
+  ShPackage = 2;
+  ShError = 3;
+  ShError_InvalidClientId = 0;
+  ShError_QueueFull = 1;
+  ShError_UnknownOption = 2;
+  ShOptions = 4;
+  ShAsyncWait = 5;
+implementation
+
+// uses Math;
+
+type
+  TROSuperHttpThread = class(TROInitializedThread)
+  private
+    fOwner: TROBaseSuperHttpChannel;
+  public
+    constructor Create(aOwner: TROBaseSuperHttpChannel);
+    procedure Execute; override;
+  end;
+
+{ TROHttpWaitingRequest }
+
+constructor TROHttpWaitingRequest.Create(Id: Integer);
+begin
+  fId := Id;
+  fEvent := TROEvent.Create(nil, true, false, '');
+  fFreeEvent := true;
+end;
+
+constructor TROHttpWaitingRequest.Create(Id: Integer; Ev: TROEvent);
+begin
+  fEvent := Ev;
+  if Fevent = nil then begin
+    fEvent := TROEvent.Create(nil, true, false, '');
+    fFreeEvent := true;
+  end;
+  fId := Id;
+end;
+
+destructor TROHttpWaitingRequest.Destroy;
+begin
+  if fFreeEvent then fEvent.Free;
+  inherited;
+end;
+
+{ TROBaseSuperHttpChannel }
+
+procedure TROBaseSuperHttpChannel.BeforeDispatch(aMessage: IROMessage);
+begin
+  if not fConnected then begin
+    Active := true;
+    if (fConnectWait.WaitFor(fConnectTimeout) <> wrSignaled) or not fConnected then begin
+      Active:=False;
+      raise EROSuperHttpChannelException.Create('Timeout connecting');
+    end;  
+  end;
+  if aMessage <> nil then 
+    aMessage.ClientID := fSessionId;
+  inherited;
+end;
+
+constructor TROBaseSuperHttpChannel.Create(aOwner: TComponent);
+begin
+  inherited Create(aOwner);
+  fMaxPackageSize := 10 * 1024 * 1024;
+  fRequestTimeout := 60000;
+  fConnectTimeout := 10000;
+  fHttpRequestTimeout := 10000;
+  fConnectWait := TROEvent.Create(nil, true, false, '');
+  fWaitingRequest := TThreadList.Create;
+  ThreadSafe := true;
+  fDispatchLock := TCriticalSection.Create;
+end;
+
+destructor TROBaseSuperHttpChannel.Destroy;
+var
+  i: Integer;
+  lList: TList;
+begin
+  if fOwnsThreadPool then fEventThreadPool.Free;
+  Active := False;
+  fConnectWait.Free;
+  lList := fWaitingRequest.LockList;
+  try
+    for i := 0 to lList.Count -1 do begin
+      TROHttpWaitingRequest(lList[i]).Free;
+    end;
+  finally
+    fWaitingRequest.UnlockList;
+  end;
+  fWaitingRequest.Free;
+  fDispatchLock.Free;
+  inherited;
+end;
+
+procedure TROBaseSuperHttpChannel.IntDispatch(aRequest,
+  aResponse: TStream);
+var
+  lRequest, lResponse: TDynByteArray;
+  lList:TList;
+  lId: Integer;
+  lReq: TROHttpWaitingRequest;
+begin
+  if aRequest.Size > fRemoteMaxPackageSize then raise EROSuperHttpChannelException.Create('Package too large');
+  SetLength(lRequest, 16 + 1 + 4 + aRequest.Size);
+  aRequest.Position := 0;
+
+  Move(fConnectionId, lRequest[0], 16);
+  lRequest[16] := ShPackage;
+  aRequest.Read(lRequest[21], aRequest.Size);
+  lList := fWaitingRequest.LockList;
+  try
+    inc(fPackageCounter);
+    if fPackageCounter < 0 then fPackageCounter := 1;
+    lId := fPackageCounter;
+    lReq := TROHttpWaitingRequest.Create(lId);
+    lList.Add(lReq);
+  finally
+    fWaitingRequest.UnlockList;
+  end;
+  try
+    lRequest[17] := lId;
+    lRequest[18] := lId shr 8;
+    lRequest[19] := lId shr 16;
+    lRequest[20] := lId shr 24;
+    fDispatchLock.Enter;
+    try
+      DispatchHttpRequest(false, lRequest, lResponse);
+      if Length(lResponse) >= 6 then begin
+        if lResponse[0] = shError then begin
+          case lResponse[5] of
+            ShError_InvalidClientId: raise EROSuperHttpChannelException.Create('Invalid client id');
+            ShError_QueueFull: raise EROSuperHttpChannelException.Create('Queue full');
+          else
+            raise EROSuperHttpChannelException.Create('Unknown error');
+          end;
+        end;
+      end;
+    finally
+      fDispatchLock.Release;
+    end;
+    if lReq.Event.WaitFor(fRequestTimeout) <> wrSignaled then
+      raise EROSuperHttpChannelException.Create('Timeout');
+
+    if Length(lReq.fResultData) <> 0 then begin
+      aResponse.Write(lReq.fResultData[0], length(lReq.fResultData))
+    end else begin
+      case lReq.fResultErrorCode of
+        ShError_InvalidClientId: raise EROSuperHttpChannelException.Create('Invalid client id');
+        ShError_QueueFull: raise EROSuperHttpChannelException.Create('Queue full');
+      else
+        raise EROSuperHttpChannelException.Create('Unknown error');
+      end;
+    end;
+  finally
+    lList := fWaitingRequest.LockList;
+    lList.Remove(lReq);
+    fWaitingRequest.UnlockList;
+    lReq.Free;
+  end;
+end;
+
+procedure TROBaseSuperHttpChannel.IntSetServerLocator(
+  aServerLocator: TROServerLocator);
+begin
+
+end;
+
+procedure TROBaseSuperHttpChannel.SetActive(const Value: Boolean);
+begin
+  if fActive = Value then exit;
+  fActive := Value;
+  if fActive then begin
+    GetEventThreadPool;
+    fConnectWait.ResetEvent;
+    if fWaitingThread <> nil then fWaitingThread.Free;
+    fWaitingThread := TROSuperHttpThread.Create(self);
+  end else begin
+    fWaitingThread.Terminate;
+    CancelRequest(true);
+    fWaitingThread.Free;
+    fwaitingThread := nil;
+  end;
+end;
+
+procedure TROBaseSuperHttpChannel.SetEventThreadPool(
+  const Value: TROThreadPool);
+begin
+  if fOwnsThreadPool and (fEventThreadPool <> nil) then fEventThreadPool.Free;
+  fEventThreadPool := Value;
+  fOwnsThreadPool := false;
+end;
+
+procedure TROBaseSuperHttpChannel.RegisterEventReceiver(
+  aReceiver: IROEventReceiver);
+begin
+  fEventReceiver := aReceiver;
+end;
+
+procedure TROBaseSuperHttpChannel.UnregisterEventReceiver(
+  aReceiver: IROEventReceiver);
+begin
+  if fEventReceiver = aReceiver then fEventReceiver := nil;
+end;
+
+
+function FindWaitingRequest(aList: TList; aId: Integer): TROHttpWaitingRequest;
+var
+  i: Integer;
+begin
+  for i := aList.count -1 downto 0 do begin
+    result := TROHttpWaitingRequest(aList[i]);
+    if result.fId = aId then exit;
+  end;
+  result := nil;
+end;
+
+function TROBaseSuperHttpChannel.CheckStatus(
+  const iMessageID: String): Boolean;
+var
+  lList: TList;
+  wr: TROHttpWaitingRequest;
+begin
+  lList := fWaitingRequest.LockList;
+  try
+    wr := FindWaitingRequest(lList, StrToInt(iMessageId));
+    if wr = nil then
+      result := true
+    else
+      result := (Length(wr.Resultdata) <> 0) or (wr.ResultErrorCode <> 0);
+  finally
+    fWaitingRequest.UnlockList;
+  end;
+end;
+
+procedure TROBaseSuperHttpChannel.RetrieveResponse(
+  const iMessageID: String; aResponse: TStream);
+var
+  lList: TList;
+  wr: TROHttpWaitingRequest;
+begin
+  lList := fWaitingRequest.LockList;
+  try
+    wr := FindWaitingRequest(lList, StrToInt(iMessageId));
+  finally
+    fWaitingRequest.UnlockList;
+  end;
+  if wr = nil then raise EROSuperHttpChannelException.Create('Invalid request id');
+  try
+    if wr.fEvent.WaitFor(fRequestTimeout) <> wrSignaled then raise EROSuperHttpChannelException.Create('Timeout');
+    if Length(wr.fResultData) > 0 then begin
+      aResponse.Write(wr.fresultData[0], Length(wr.fresultData));
+      aResponse.Position := 0;
+    end else begin
+      case wr.fResultErrorCode of
+        ShError_InvalidClientId: raise EROSuperHttpChannelException.Create('Invalid client id');
+        ShError_QueueFull: raise EROSuperHttpChannelException.Create('Queue full');
+      else
+        raise EROSuperHttpChannelException.Create('Unknown error');
+      end;
+    end;
+  finally
+    lList := fWaitingRequest.LockList;
+    try
+      lList.Remove(wr);
+      wr.Free;
+    finally
+      fWaitingRequest.UnlockList;
+    end;
+  end;
+
+end;
+
+function TROBaseSuperHttpChannel.InvokeRequest(aRequest: TStream;
+  iGetResponse: boolean): string;
+begin
+  result := InvokeRequest(aRequest, iGetResponse, nil);
+end;
+
+function TROBaseSuperHttpChannel.InvokeRequest(aRequest: TStream;
+  aGetResponse: boolean; aEvent: TROEvent): string;
+var
+  lRequest, lResponse: TDynByteArray;
+  lList:TList;
+  lId: Integer;
+  lReq: TROHttpWaitingRequest;
+begin
+  if aRequest.Size > fRemoteMaxPackageSize then raise EROSuperHttpChannelException.Create('Package too large');
+  SetLength(lRequest, 16 + 1 + 4 + aRequest.Size);
+  if aEvent = nil then aRequest.Position := 0 else // for preventing warning in FPC
+  aRequest.Position := 0;
+
+  Move(fConnectionId, lRequest[0], 16);
+  lRequest[16] := ShPackage;
+  aRequest.Read(lRequest[21], aRequest.Size);
+  lList := fWaitingRequest.LockList;
+  try
+    inc(fPackageCounter);
+    if fPackageCounter < 0 then fPackageCounter := 1;
+    lId := fPackageCounter;
+    if aGetResponse then begin
+      lReq := TROHttpWaitingRequest.Create(lId);
+      lList.Add(lReq);
+    end else
+      lReq := nil;
+  finally
+    fWaitingRequest.UnlockList;
+  end;
+  try
+    lRequest[17] := lId;
+    lRequest[18] := lId shr 8;
+    lRequest[19] := lId shr 16;
+    lRequest[20] := lId shr 24;
+    fDispatchLock.Enter;
+    try
+      DispatchHttpRequest(false, lRequest, lResponse);
+      if Length(lResponse) >= 6 then begin
+        if lResponse[0] = shError then begin
+          case lResponse[5] of
+            ShError_InvalidClientId: raise EROSuperHttpChannelException.Create('Invalid client id');
+            ShError_QueueFull: raise EROSuperHttpChannelException.Create('Queue full');
+          else
+            raise EROSuperHttpChannelException.Create('Unknown error');
+          end;
+        end;
+      end;
+    finally
+      fDispatchLock.Release;
+    end;
+    result := inttostr(lId);
+  except
+    lList := fWaitingRequest.LockList;
+    lList.Remove(lReq);
+    fWaitingRequest.UnlockList;
+    lReq.Free;
+    raise;
+  end;
+end;
+
+type
+  TROSuperEventCallback = class(TInterfacedObject, IROThreadPoolCallback)
+  private
+    fData: TDynByteArray;
+    fOwner: TROBaseSuperHttpChannel;
+  public
+    procedure Callback(Caller: TROThreadPool; aThread: TThread);
+  end;
+
+procedure TROBaseSuperHttpChannel.ProcessEvent(aId: Integer;
+  aData: TDynByteArray);
+var
+  lCb: TROSuperEventCallback;
+begin
+  {$IFDEF FPC}
+  if aID = 0 then lCb := TROSuperEventCallback.Create else // for preventing warning in FPC
+  {$ENDIF}
+  lCb := TROSuperEventCallback.Create;
+  lCb.fOwner := self;
+  lCb.fData := aData;
+  fEventThreadPool.QueueItem(lCb);
+end;
+
+function TROBaseSuperHttpChannel.GetEventThreadPool: TROThreadPool;
+begin
+  if fEventThreadPool = nil then begin
+    fOwnsThreadPool := true;
+    fEventThreadPool := TROThreadPool.Create(nil);
+  end;
+  Result := fEventThreadPool;
+end;
+
+function TROBaseSuperHttpChannel.GetTransportObject: TObject;
+begin
+  Result := Self;
+end;
+
+{ TROSuperHttpThread }
+
+constructor TROSuperHttpThread.Create(aOwner: TROBaseSuperHttpChannel);
+begin
+  inherited Create(true);
+  fOwner := aOwner;
+  Resume;
+end;
+
+procedure TROSuperHttpThread.Execute;
+var
+  lRequest,
+  lTmpData,
+  lResponse: TDynByteArray;
+  lList: TList;
+  lPackageId: Integer;
+  wr: TROHttpWaitingRequest;
+  lReconnect: Boolean;
+begin
+  lReconnect := True;
+  while lReconnect do begin
+    lReconnect := false;
+    try
+      if IsEqualGuid(fOwner.fConnectionId, Emptyguid) then fOwner.fConnectionId := NewGuid;
+      SetLength(lRequest, 16 + 1 +8 + 4 + 16);
+      Move(fOwner.fConnectionId, lRequest[0], 16);
+      lRequest[16] := shHello;
+      lRequest[17] := ord('R');
+      lRequest[18] := ord('O');
+      lRequest[19] := ord('S');
+      lRequest[20] := ord('H');
+      lRequest[21] := ord('1');
+      lRequest[22] := ord('0');
+      lRequest[23] := ord('0');
+      lRequest[24] := ord('0');
+      lRequest[25] := fOwner.fMaxPackageSize;
+      lRequest[26] := fOwner.fMaxPackageSize shr 8;
+      lRequest[27] := fOwner.fMaxPackageSize shr 16;
+      lRequest[28] := fOwner.fMaxPackageSize shr 16;
+      Move(fOwner.fSessionId, lRequest[29], 16);
+      fOwner.fDispatchLock.Enter;
+      try
+        fOwner.DispatchHttpRequest(false, lRequest, lResponse);
+      finally
+        fOwner.fDispatchLock.Leave;
+      end;
+      if Length(lResponse) <> (16 + 8 + 4) then
+        raise EROSuperHttpChannelException.Create('Invalid response from server for connection initiation command');
+
+      if (lResponse[0] <> ord('R')) or (lResponse[1] <> ord('O')) or (lResponse[2] <> ord('S')) or (lResponse[3] <> ord('H')) then
+        raise EROSuperHttpChannelException.Create('Invalid response from server for connection initiation command');
+      fOwner.fRemoteMaxPackageSize := Integer(lResponse[8]) or (Integer(lResponse[9]) shl 8)
+       or (Integer(lResponse[10]) shl 16) or (Integer(lResponse[11]) shl 24);
+      move(lResponse[12], fOwner.fSessionId, 16);
+      fOwner.fConnected := true;
+      fOwner.fConnectWait.SetEvent;
+      SetLength(lRequest, 17);
+      move(fOwner.fConnectionId, lRequest[0], 16);
+      lRequest[16] := ShAsyncWait;
+      while not Terminated do begin
+        try
+          fOwner.DispatchHttpRequest(true, lRequest, lResponse);
+        except
+          Continue;
+        end;
+        if Length(lResponse) <> 0 then begin
+          case lResponse[0] of
+            ShError: begin
+              if Length(lResponse) < 5 then continue;
+              if lResponse[0] = ShError_InvalidClientId then begin // means we've got disconnected
+                if assigned(fOwner.fOnInvalidClientID) then
+                  fOwner.fOnInvalidClientID(fOwner, lReconnect);
+                break;
+              end;
+              lPackageId := Integer(lResponse[1]) or (Integer(lResponse[2]) shl 8)
+              or (Integer(lResponse[3]) shl 16) or (Integer(lResponse[4]) shl 24);
+              lList := fOwner.fWaitingRequest.LockList;
+              try
+                wr := FindWaitingRequest(lList, lPackageId);
+                if wr <> nil then begin
+                 wr.fResultErrorCode := lResponse[4];
+                 wr.fEvent.SetEvent;
+                end;
+              finally
+                fOwner.fWaitingRequest.UnlockList;
+              end;
+            end;
+            shPackage: begin
+              if Length(lResponse) < 5 then continue;
+              lPackageId := Integer(lResponse[1]) or (Integer(lResponse[2]) shl 8)
+              or (Integer(lResponse[3]) shl 16) or (Integer(lResponse[4]) shl 24);
+              setLength(lTmpData, Length(lResponse) -5);
+              Move(lResponse[5], lTmpData[0], Length(lTmpData));
+              if lPackageId < 0 then
+                fOwner.ProcessEvent(lPackageId, lTmpData)
+              else begin
+                lList := fOwner.fWaitingRequest.LockList;
+                try
+                  wr := FindWaitingRequest(lList, lPackageId);
+                  if wr <> nil then begin
+                   wr.fResultData := lTmpData;
+                   wr.fEvent.SetEvent;
+                  end;
+                finally
+                  fOwner.fWaitingRequest.UnlockList;
+                end;
+              end;
+            end;
+          end;
+        end;
+      end;
+      lRequest[16] := shGoodbye;
+      fOwner.fDispatchLock.Enter;
+      try
+        fOwner.DispatchHttpRequest(false, lRequest, lResponse);
+      finally
+        fOwner.fDispatchLock.Leave;
+        if not lReconnect then fOwner.fConnected :=False;
+      end;
+    except
+      // cannot let exceptions escape here
+    end;
+  end;
+end;
+
+{ TROSuperEventCallback }
+
+procedure TROSuperEventCallback.Callback(Caller: TROThreadPool;
+  aThread: TThread);
+var
+  lData: TMemoryStream;
+begin
+  if fOwner.fEventReceiver <> nil then begin
+    lData := TMemoryStream.Create;
+    try
+      lData.Write(fData[0], length(fData));
+      if Caller <> nil then lData.Position := 0 else // for preventing warning in FPC
+      lData.Position := 0;
+      fOwner.fEventReceiver.Dispatch(lData, aThread);
+    finally
+       lData.Free;
+    end;
+  end;
+end;
+
+end.
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROBaseSuperHttpServer.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROBaseSuperHttpServer.pas
new file mode 100644
index 0000000..8c000b3
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROBaseSuperHttpServer.pas	
@@ -0,0 +1,1238 @@
+unit uROBaseSuperHttpServer;
+
+interface
+
+{$I RemObjects.inc}
+
+uses
+  SysUtils, Classes, uROClientIntf, uROServer, uROServerIntf, uROClasses,
+  uIPHttpHeaders, uROThreadPool, uROClient, uROEventRepository,
+  uROHtmlServerInfo, uRODL, uROHTTPDispatch, uROTypes, uROSessions;
+
+type
+  TROSuperHttpWaitingConnection = class(TObject)
+  private
+    fChannel: IUnknown;
+    fTimeout: TDateTime;
+  public
+    constructor Create(aChannel: IUnknown);
+    property Timeout: TDateTime read fTimeout;
+    property Channel: IUnknown read fChannel;
+  end;
+  TROBaseSuperHttpServer = class;
+  TROSuperHttpServerConnection = class;
+  IROSuperHttpServerConnection = interface
+    ['{48AF124A-38F5-43A4-BD82-684A74EDF77F}']
+    function GetSelf: TROSuperHttpServerConnection;
+    function GetGuid: TGuid;
+    function GuidMatches(const aGuid: TGuid): Boolean;
+
+    procedure DisposeData;
+  end;
+  TROSuperHttpServerConnection = class(TInterfacedObject, IROSuperHttpServerConnection, IROActiveEventServer)
+  private
+    fServer: TROBaseSuperHttpServer;
+    fLastTalk: TDateTime;
+    fRemoteMaxPackageLength: Integer;
+    fConnectionId: TGuid;
+    fSessionId: TGuid;
+    fResponseQueue: TInterfaceList;
+    fWaitingConnections: TThreadList;
+    fEventId: Integer;
+  protected
+    function GetSelf: TROSuperHttpServerConnection;
+  public
+    constructor Create(aServer: TROBaseSuperHttpServer);
+    destructor Destroy; override;
+
+    procedure DisposeData;
+
+    function GetGuid: TGuid;
+    function GuidMatches(const aGuid: TGuid): Boolean;
+
+    property Server: TROBaseSuperHttpServer read fServer;
+    property LastTalk: TDateTime read fLastTalk write fLastTalk;
+    property ResponseQueue: TInterfaceList read fResponseQueue;
+    property WaitingConnections: TThreadList read fWaitingConnections;
+    property RemoteMaxPackageLength: Integer read fRemoteMaxPackageLength write fRemoteMaxPackageLength;
+    property ConnectionId: TGuid read fConnectionId write fConnectionId;
+    property SessionId: TGUID read fSessionId write fSessionId;
+    procedure EventsRegistered(aSender: TObject; aClient: TGUID);
+    procedure DispatchEvent(anEventDataItem: TROEventData;
+      aSessionReference: TGUID; aSender: TObject);
+  end;
+
+  TROSuperHttpServerResponse = class;
+  IROSuperHttpServerResponse = interface
+    ['{9C33C4C2-F6AA-452C-9E67-F49F75F292F2}']
+    function GetSelf: TROSuperHttpServerResponse;
+  end;
+  TROSuperHttpServerResponse = class(TInterfacedObject, IROSuperHttpServerResponse)
+  private
+    fHeaders: TIPHttpResponseHeaders;
+    fData: TDynamicByteArray;
+    fConnection: IROSuperHttpServerConnection;
+    fAttempt: Integer;
+    function GetSelf: TROSuperHttpServerResponse;
+  public
+    constructor Create(aConn: IROSuperHttpServerConnection; aHeaders: TIPHttpResponseHeaders);
+    destructor Destroy; override;
+
+    property Headers: TIPHttpResponseHeaders read fHeaders;
+    property Data: TDynamicByteArray read fData write fData;
+    property Connection: IROSuperHttpServerConnection read fConnection write fConnection;
+    property Attempt: Integer read fAttempt write fAttempt;
+  end;
+  TROBaseSuperHttpServer = class(TROServer)
+  private
+    fTimer: TROThreadTimer;
+    fThreadPool: TROThreadPool;
+    fOwnsThreadPool: boolean;
+    fMaxPackageSize: Integer;
+    fConnections: TInterfaceList;
+    fServeRodl,
+    fServeInfoPage: Boolean;
+    fActive: Boolean;
+    fEventRepository: TROEventRepository;
+    fConnectionTimeout: Integer;
+    fAutoRegisterSession: Boolean;
+
+    function GetConnection(const aGuid: TGuid): IROSuperHttpServerConnection;
+    procedure KillConnection(aConnection: IROSuperHttpServerConnection);
+    procedure SendError(aTarget: IUnknown; anError: Ansistring);
+    procedure IncomingData(aTarget: IUnknown; aRequestHeaders: TIPHttpRequestHeaders; aData: TDynamicByteArray; aDispatcher: TROMessageDispatcher);
+    procedure SendRodl(ATarget: IUnknown; aRequest: TIPHttpRequestHeaders; aDispatcher: TROMessageDispatcher; const aTargetService: string);
+    procedure AddWaitingRequest(aTarget: IUnknown; aConnection: IROSuperHttpServerConnection);
+    procedure ProcessPackage(aTarget: IROSuperHttpServerConnection; aHeaders: TIPHttpRequestHeaders; aMessageDispatcher: TROMessageDispatcher; aId: Integer; aData: TDynamicByteArray);
+    procedure SendAsyncResponse(aTarget: IROSuperHttpServerConnection; lHeaders: TIPHttpResponseHeaders; aData: TDynamicByteArray);
+    procedure SetThreadPool(const Value: TROThreadPool);
+    procedure cbCleanup(CurrentTickCount : Cardinal);
+  protected
+
+    procedure CloseConnection(aConnection: IUnknown); virtual; abstract;
+    procedure SendResponse(aTarget: IUnknown; aHeaders: TIPHttpResponseHeaders; aData: TDynamicByteArray; UserData: IInterface); virtual; abstract;
+    function HandleUnknownRequest(aTarget: IUnknown; arequest: TIPHttpRequestHeaders; aData: TDynamicByteArray): Boolean; virtual; abstract;
+    procedure SetDefaultHeaders(aTarget: IUnknown; aHeaders: TIPHttpResponseHeaders); virtual; abstract;
+
+    procedure HandleRequest(aTarget: IUnknown; aRequestHeaders: TIPHttpRequestHeaders; aRequest: TDynamicByteArray);
+    procedure ResponseFailed(aUserData: IInterface);
+    procedure ResponseSucessful(aUserData: IInterface);
+
+    procedure DoActivate; virtual;
+    procedure DoDeactivate; virtual;
+
+    function IntGetActive: Boolean; override;
+    procedure IntSetActive(const Value: Boolean); override;
+    function GetDispatchersClass : TROMessageDispatchersClass; override;
+  public
+    constructor Create(aOwner: TComponent); override;
+    destructor Destroy; override;
+
+  published
+    property ServeRodl: Boolean read fServeRodl write fServeRodl default true;
+    property ServeInfoPage: Boolean read fServeInfoPage write fServeInfoPage default true;
+
+    property MaxPackageSize: Integer read fMaxPackageSize write fMaxPackageSize default 10 * 1024 * 1024;
+    property ConnectionTimeout: Integer read fConnectionTimeout write fConnectionTimeout default 5 * 60;
+    property ThreadPool: TROThreadPool read fThreadPool write SetThreadPool;
+    property EventRepository: TROEventRepository read fEventRepository write fEventRepository;
+    property AutoRegisterSession: Boolean read fAutoRegisterSession write fAutoRegisterSession default true;
+  end;
+
+const
+  ShHello = 0;
+  ShGoodbye = 1;
+  ShPackage = 2;
+  ShError = 3;
+  ShError_InvalidClientId = 0;
+  ShError_QueueFull = 1;
+  ShError_UnknownOption = 2;
+  ShOptions = 4;
+  ShAsyncWait = 5;
+
+
+implementation
+
+{ TROSuperHttpWaitingConnection }
+
+constructor TROSuperHttpWaitingConnection.Create(aChannel: IUnknown);
+begin
+  fChannel := aChannel;
+end;
+
+{ TROSuperHttpServerResponse }
+
+constructor TROSuperHttpServerResponse.Create(aConn: IROSuperHttpServerConnection; aHeaders: TIPHttpResponseHeaders);
+begin
+  inherited Create;
+  fHeaders := aHeaders;
+  if fHeaders = nil then fhEaders := TIPHttpResponseHeaders.Create;
+  fConnection := aConn;
+end;
+
+destructor TROSuperHttpServerResponse.Destroy;
+begin
+  fHeaders.Free;
+  inherited Destroy;
+end;
+
+function TROSuperHttpServerResponse.GetSelf: TROSuperHttpServerResponse;
+begin
+  result := Self;
+end;
+
+{ TROSuperHttpServerConnection }
+
+procedure TROSuperHttpServerConnection.DisposeData;
+var
+  i: Integer;
+  lConn: TROSuperHttpWaitingConnection;
+  lList: TList;
+begin
+  FreeAndNil(fResponseQueue);
+  lList := fWaitingConnections.LockList;
+  for i := 0 to lList.Count -1 do
+  begin
+    lConn := TROSuperHttpWaitingConnection(lList[i]);
+    fServer.CloseConnection(lConn.Channel);
+    lConn.Free;
+  end;
+  fWaitingConnections.UnlockList;
+  FreeAndNil(fWaitingConnections);
+end;
+
+constructor TROSuperHttpServerConnection.Create(
+  aServer: TROBaseSuperHttpServer);
+begin
+  fServer := aServer;
+  fResponseQueue := TInterfaceList.Create;
+  fWaitingConnections := TThreadList.Create;
+end;
+
+destructor TROSuperHttpServerConnection.Destroy;
+begin
+  fResponseQueue.Free;
+  fWaitingConnections.Free;
+  inherited;
+end;
+
+function TROSuperHttpServerConnection.GetSelf: TROSuperHttpServerConnection;
+begin
+  result := self;
+end;
+
+procedure TROSuperHttpServerConnection.DispatchEvent(
+  anEventDataItem: TROEventData; aSessionReference: TGUID; aSender: TObject);
+var
+  lId: Integer;
+  lData: TDynamicByteArray;
+begin
+  fResponseQueue.Lock;
+  fEventId := fEventId - 1;
+  if fEventId > 0 then fEventId := -1;
+  {$IFDEF FPC}
+  if (aSessionReference.D1 = 0) or (aSender = nil) then lId := fEventId else // for preventing warnings in FPC
+  {$ENDIF}
+  lId := fEventId;
+  fResponseQueue.Unlock;
+
+  SetLength(lData, anEventDataItem.Data.size + 5);
+  lData[0] := ShPackage;
+  lData[1] := lId;
+  lData[2] := lId shr 8;
+  lData[3] := lId shr 16;
+  lData[4] := lId shr 24;
+  anEventDataItem.Data.Seek(0, soFromBeginning);
+  anEventDataItem.Data.Read(lData[5], Length(lData) -5);
+  fServer.SendAsyncResponse(self, nil, lData);
+end;
+
+function TROSuperHttpServerConnection.GetGuid: TGuid;
+begin
+  result := fConnectionId;
+end;
+
+function TROSuperHttpServerConnection.GuidMatches(
+  const aGuid: TGuid): Boolean;
+begin
+  result := (fConnectionId.D1 = aGuid.D1) and
+    (fConnectionId.D2 = aGuid.D2) and
+    (fConnectionId.D3 = aGuid.D3) and
+    (fConnectionId.D4[0] = aGuid.D4[0]) and
+    (fConnectionId.D4[1] = aGuid.D4[1]) and
+    (fConnectionId.D4[2] = aGuid.D4[2]) and
+    (fConnectionId.D4[3] = aGuid.D4[3]) and
+    (fConnectionId.D4[4] = aGuid.D4[4]) and
+    (fConnectionId.D4[5] = aGuid.D4[5]) and
+    (fConnectionId.D4[6] = aGuid.D4[6]) and
+    (fConnectionId.D4[7] = aGuid.D4[7]);
+end;
+
+procedure TROSuperHttpServerConnection.EventsRegistered(aSender: TObject;
+  aClient: TGUID);
+begin
+  // do nothing.
+end;
+
+{ TROBaseSuperHttpServer }
+
+procedure TROBaseSuperHttpServer.AddWaitingRequest(aTarget: IUnknown;
+  aConnection: IROSuperHttpServerConnection);
+var
+  lRealConnection: TROSuperHttpServerConnection;
+  lResp: IROSuperHttpServerResponse;
+begin
+  lRealConnection := aConnection.GetSelf;
+  lRealConnection.ResponseQueue.Lock;
+  try
+    if lRealConnection.ResponseQueue.Count > 0 then begin
+      lResp := IROSuperHttpServerResponse(lRealConnection.ResponseQueue[0]);
+      lRealConnection.ResponseQueue.Delete(0);
+
+      Sendresponse(aTarget, lResp.GetSelf.Headers, lResp.GetSelf.Data, lResp);
+      exit;
+    end;
+  finally
+    lRealConnection.ResponseQueue.Unlock;
+  end;
+  lRealConnection.WaitingConnections.Add(TROSuperHttpWaitingConnection.Create(aTarget));
+end;
+
+procedure TROBaseSuperHttpServer.cbCleanup(CurrentTickCount: Cardinal);
+var
+  lTimeoutTime, lConnTimeout: TDateTime;
+  i: Integer;
+  lList: TList;
+  lConn: IROSuperHttpServerConnection;
+begin
+  {$IFDEF FPC}
+  if CurrentTickCount =0 then lTimeoutTime := Now - (90 * (1.0 / (24 * 60 * 60))) else // for preventing warnings in FPC
+  {$ENDIF}
+  lTimeoutTime := Now - (90 * (1.0 / (24 * 60 * 60)));
+  lConnTimeout := Now - (fConnectionTimeout * (1.0 / (24 * 60 * 60)));
+  fConnections.Lock;
+  try
+    for i := fconnections.Count -1 downto 0 do begin
+      lConn := IROSuperHttpServerconnection(fConnections[i]);
+      if lConn.GetSelf.fLastTalk < lConnTimeout then begin
+        KillConnection(lConn);
+        continue;
+      end;
+
+      lList := lConn.GetSelf.fWaitingConnections.LockList;
+      while lList.Count > 0 do
+      begin
+        if TROSuperHttpWaitingConnection(lList[0]).Timeout < lTimeoutTime then begin
+          SendResponse(TROSuperHttpWaitingConnection(lList[0]).fChannel, nil, nil, nil);
+          TROSuperHttpWaitingConnection(lList[0]).Free;
+          lList.Delete(0);
+        end else break;
+      end;
+      lConn.GetSelf.fWaitingConnections.UnlockList;
+    end;
+  finally
+    fConnections.Unlock;
+  end;
+end;
+
+constructor TROBaseSuperHttpServer.Create(aOwner: TComponent);
+begin
+  inherited Create(aOwner);
+  fMaxPackageSize := 1024 *1024 * 10;
+  fServeRodl := true;
+  fServeInfoPage := true;
+  fConnections := TInterfaceList.Create;
+  fConnectionTimeout := 5 * 60;
+  fAutoRegisterSession := True;
+end;
+
+destructor TROBaseSuperHttpServer.Destroy;
+var
+  i: Integer;
+begin
+  Active := False;
+  if fTimer <> nil then FreeAndNil(fTimer);
+  if fOwnsThreadPool then FreeAndNil(fThreadPool);
+
+  fConnections.Lock;
+  try
+    for i := fConnections.Count -1 downto 0 do begin
+      IROSuperHttpServerConnection(fConnections[i]).DisposeData;
+    end;
+  finally
+    fConnections.Unlock;
+  end;
+  fConnections.Free;
+  inherited Destroy;
+end;
+
+procedure TROBaseSuperHttpServer.DoActivate;
+begin
+  if fTimer <> nil then
+    fTimer.Free;
+  fTimer := TROThreadTimer.Create(cbCleanup, 30000);
+  if fThreadPool = nil then begin
+    fThreadPool := TROThreadPool.Create(self);
+    fOwnsThreadPool := true;
+  end;
+end;
+
+procedure TROBaseSuperHttpServer.DoDeactivate;
+begin
+  if fTimer <> nil then
+    fTimer.Free;
+  fTimer := nil;
+end;
+
+function TROBaseSuperHttpServer.GetConnection(
+  const aGuid: TGuid): IROSuperHttpServerConnection;
+var
+  i: Integer;
+begin
+  fConnections.Lock;
+  try
+    for i := fConnections.Count -1 downto 0 do begin
+      Result := IROSuperHttpServerConnection(fConnections[i]);
+      if Result.GuidMatches(aGuid) then exit;
+    end;
+  finally
+    fConnections.Unlock;
+  end;
+  result := nil;
+end;
+
+function TROBaseSuperHttpServer.IntGetActive: Boolean;
+begin
+  result := fActive;
+end;
+
+procedure TROBaseSuperHttpServer.IntSetActive(const Value: Boolean);
+begin
+  if fActive <> Value then begin
+    fActive := Value;
+    if value then
+      DoActivate
+    else
+      DoDeactivate;
+  end;
+end;
+
+procedure TROBaseSuperHttpServer.KillConnection(
+  aConnection: IROSuperHttpServerConnection);
+var
+  fListener: IROSessionsChangesListener;
+begin
+  fConnections.Remove(aConnection);
+  if Supports(fEventRepository, IROSessionsChangesListener, fListener) then
+    flistener.SessionsChangedNotification(aConnection.GetSelf.SessionId, saRemoveActiveListener, aConnection.GetSelf);
+  aConnection.DisposeData;
+end;
+
+procedure TROBaseSuperHttpServer.SendError(aTarget: IUnknown;
+  anError: Ansistring);
+var
+  lData: TDynamicByteArray;
+  lHeaders: TIPHttpResponseHeaders;
+begin
+  anError := '<html><head><title>Internal Server Error</title></head><body><h1>Internal Server Error</h1>'+anError+'</body></html>';
+  lHeaders := TIPHttpResponseHeaders.Create;
+  try
+    lHeaders.Code := 500;
+    lHeaders.Reason := 'Internal Error';
+    lHeaders.Headers.Values['Content-Type'] := 'text/html';
+    SetLength(lData, Length(anError));
+    Move(anError[1], lData[0], Length(anError));
+    SendResponse(aTarget, lHeaders, lData, nil);
+  finally
+    lHeaders.Free;
+  end;
+end;
+
+procedure TROBaseSuperHttpServer.SendRodl(ATarget: IUnknown;
+  aRequest: TIPHttpRequestHeaders; aDispatcher: TROMessageDispatcher;
+  const aTargetService: string);
+var
+  lResponse: TMemoryStream;
+  moduleinfo: IROModuleInfo;
+  aFormat: string;
+  lData: TDynamicByteArray;
+  lHeaders: TIPHttpResponseHeaders;
+begin
+  {$IFDEF FPC}
+  if (aRequest = nil) or (aTargetService = '') then lResponse := TMemoryStream.Create else // for preventing warnings in FPC
+  {$ENDIF}
+  lResponse := TMemoryStream.Create;
+  try
+    aFormat := 'text/xml';
+    if Supports(aDispatcher, IROModuleInfo, moduleinfo) then
+      moduleinfo.GetModuleInfo(lResponse, nil, aFormat)
+    else
+      GetRodl(lResponse, nil, aformat, GetRODLReader);
+    SetLength(lData, lResponse.Size);
+    lResponse.Seek(0, soFromBeginning);
+    lResponse.Read(lData[0], Length(lData));
+
+  except
+    SendError(aTarget, 'Error retrieving RODL file');
+    exit;
+  end;
+  lHeaders := TIPHttpResponseHeaders.Create;
+  try
+    SetDefaultHeaders(aTarget, lHeaders);
+    lHeaders.Headers.Values['Content-Type'] := aFormat;
+    SendResponse(ATarget, lHeaders, lData, nil);
+  finally
+    lHeaders.Free;
+  end;
+end;
+
+function SameGuid(const g1, g2: TGuid): Boolean;
+begin
+  result := (g1.D1 = g2.D1) and
+    (g1.D2 = g2.D2) and
+    (g1.D3 = g2.D3) and
+    (g1.D4[0] = g2.D4[0]) and
+    (g1.D4[1] = g2.D4[1]) and
+    (g1.D4[2] = g2.D4[2]) and
+    (g1.D4[3] = g2.D4[3]) and
+    (g1.D4[4] = g2.D4[4]) and
+    (g1.D4[5] = g2.D4[5]) and
+    (g1.D4[6] = g2.D4[6]) and
+    (g1.D4[7] = g2.D4[7]);
+
+end;
+
+procedure TROBaseSuperHttpServer.IncomingData(aTarget: IUnknown;
+  aRequestHeaders: TIPHttpRequestHeaders; aData: TDynamicByteArray;
+  aDispatcher: TROMessageDispatcher);
+var
+  lClientId: TGuid;
+  lResp: TDynamicByteArray;
+  lConnection: IROSuperHttpServerConnection;
+  i: Integer;
+  data, rs: Binary;
+  evd: TROEventData;
+  len: Longint;
+  fl: boolean;
+begin
+  if Length(aData) < 17 then begin
+    SendError(aTarget, 'Invalid Request');
+    exit;
+  end;
+  {$IFDEF FPC}
+  lClientId.D1:=0; // for preventing warnings
+  {$ENDIF}
+  Move(aData[0], lClientId, Sizeof(lClientID));
+  case aData[16] of
+    ShHello:
+      begin
+        if Length(aData) <> (16 { cid:guid } + 1 { cmd } + 8 { hello command } +
+								4 { max package } + 16 { session guid }) then begin
+          SendError(aTarget, 'Invalid Request');
+          exit;
+        end;
+        if (aData[17] <> ord('R')) or (aData[18] <> ord('O')) or (aData[19] <> ord('S')) or
+          (aData[20] <> ord('H')) then begin
+          SendError(aTarget, 'Invalid Request');
+          exit;
+        end;
+        fConnections.Lock;
+        try
+          lConnection := GetConnection(lClientId);
+          if lConnection <> nil then begin
+            SetLength(lResp, 6);
+            lResp[0] := shError;
+            lResp[5] := shError_InvalidClientId;
+            SendResponse(aTarget, nil, lResp, nil);
+            exit;
+          end;
+          lConnection := TROSuperHttpServerConnection.Create(self);
+          lConnection.GetSelf.ConnectionId := lClientId;
+          lConnection.GetSelf.LastTalk := Now;
+          lConnection.GetSelf.RemoteMaxPackageLength :=
+            aData[25] or
+            (Integer(aData[26]) shl 8) or
+            (Integer(aData[27]) shl 16) or
+            (Integer(aData[28]) shl 24);
+          lConnection.GetSelf.SessionId := TGuid((@aData[29])^);
+          fConnections.Add(lConnection);
+          if SameGuid(lConnection.GetSelf.SessionId, EmptyGUID) then
+            lConnection.GetSelf.SessionId := NewGuid();
+
+          if fEventRepository <> nil then begin
+            if AutoRegisterSession then begin
+              fl := True;
+              fEventRepository.AddSession(lConnection.GetSelf.SessionId, lConnection.GetSelf);
+            end
+            else begin
+              fl := fEventRepository.AddActiveListener(lConnection.GetSelf.SessionId, lConnection.GetSelf);
+            end;
+            if fl then begin
+              rs := Binary.Create;
+              try
+                fEventRepository.GetEventData(lConnection.GetSelf.SessionId, rs);
+                rs.Position := 0;
+                if rs.Read(len, sizeof(len)) <> sizeof(len) then exit;
+                while true do begin
+                  if rs.Read(len, sizeof(len)) <> sizeof(len) then break;
+                  data := Binary.Create;
+                  data.CopyFrom(rs, Len);
+                  data.Position := 0;
+                  evd := TROEventData.Create(data);
+                  try
+                    lConnection.GetSelf.DispatchEvent(evd, lConnection.GetSelf.SessionId, fEventRepository);
+                  finally
+                    data.Free;
+                  end;
+                end;
+              finally
+                rs.Free;
+              end;
+            end;  
+          end;
+        finally
+          fconnections.Unlock;
+        end;
+        SetLength(lResp, 8 + 4 + 16);
+        lResp[0] :=ord('R');
+        lResp[1] := ord('O');
+        lResp[2] := ord('S');
+        lResp[3] :=ord('H');
+        lResp[4] := ord('1');
+        lResp[5] := ord('0');
+        lResp[6] := ord('0');
+        lResp[7] := ord('0');
+        lResp[8] := fMaxPackageSize;
+        lResp[9] := fMaxPackageSize shr 8;
+        lResp[10] := fMaxPackageSize shr 16;
+        lResp[11] := fMaxPackageSize shr 24;
+        Move(lConnection.GetSelf.SessionId, lResp[12], Sizeof(TGuid));
+        SendResponse(aTarget, nil, lResp, nil);
+        exit;
+      end;
+    ShGoodbye:
+      begin
+        lConnection := GetConnection(lClientId);
+        if lConnection = nil then begin
+          SetLength(lResp, 6);
+          lResp[0] := ShError;
+          lResp[5] := ShError_InvalidClientId;
+          SendResponse(aTarget, nil, lResp, nil);
+
+          exit;
+        end;
+        KillConnection(lConnection);
+        SendResponse(aTarget, nil, nil, nil);
+        exit;
+      end;
+    ShPackage:
+      begin
+        lConnection := GetConnection(lClientId);
+        if lConnection = nil then begin
+          SetLength(lResp, 6);
+          lResp[0] := ShError;
+          lResp[5] := ShError_InvalidClientId;
+          SendResponse(aTarget, nil, lResp, nil);
+
+          exit;
+        end;
+
+        lConnection.GetSelf.LastTalk := Now;
+        if Length(aData) < 16 + 1 + 4 then begin
+          SendError(aTarget, 'Invalid Request');
+          exit;
+        end;
+
+        i := aData[17] or (Integer(aData[18]) shl 8)  or (Integer(aData[19]) shl 16)  or (Integer(aData[20]) shl 24);
+        SetLength(lResp, Length(aData)-21);
+        Move(aData[21], lResp[0], Length(lResp));
+        try
+          ProcessPackage(lConnection, aRequestHeaders, aDispatcher, i, lResp);
+        except
+          SetLength(lResp, 6);
+          lResp[0] := ShError;
+          lResp[5] := ShError_QueueFull;
+          lResp[1] := aData[0];
+          lResp[2] := aData[1];
+          lResp[3] := aData[2];
+          lResp[4] := aData[3];
+          SendResponse(aTarget, nil, lResp, nil);
+          exit;
+        end;
+        SendResponse(aTarget, nil, nil, nil);
+        exit;
+      end;
+    ShError:
+      begin
+        SendResponse(aTarget, nil, nil, nil);
+        exit;
+      end;
+    ShOptions:
+      begin
+        lConnection := GetConnection(lClientId);
+        if lConnection = nil then begin
+          SetLength(lResp, 6);
+          lResp[0] := shError;
+          lResp[5] := ShError_InvalidClientId;
+          SendResponse(aTarget, nil, lResp, nil);
+          exit;
+        end
+        else begin
+          SetLength(lResp, 6);
+          lResp[0] := shError;
+          lResp[5] := ShError_InvalidClientId;
+          SendResponse(aTarget, nil, lResp, nil);
+          lConnection.GetSelf.LastTalk := Now;
+          exit;
+        end;
+      end;
+    ShAsyncWait:
+      begin
+        lConnection := GetConnection(lClientId);
+        if lConnection = nil then begin
+          SetLength(lResp, 6);
+          lResp[0] := shError;
+          lResp[5] := ShError_InvalidClientId;
+          SendResponse(aTarget, nil, lResp, nil);
+          exit;
+        end;
+        lConnection.GetSelf.LastTalk := Now;
+
+        AddWaitingRequest(aTarget, lConnection);
+        exit;
+      end;
+    else
+      SendError(aTarget, 'Invalid Request');
+    end;
+end;
+
+procedure TROBaseSuperHttpServer.HandleRequest(aTarget: IUnknown;
+  aRequestHeaders: TIPHttpRequestHeaders; aRequest: TDynamicByteArray);
+var
+  lMd: TROMessageDispatcher;
+  lTempStr: TMemoryStream;
+  s: ansistring;
+  lQueryString,
+  lServiceName,
+  lSubPath,
+  lDispatcher: string;
+  lResponseHeaders: TIPHttpResponseHeaders;
+  lResponse: TDynamicByteArray;
+  lRodl: TRODLLibrary;
+begin
+  try
+    lDispatcher := aRequestHeaders.Path;
+    if Pos('?', lDispatcher) >0 then begin
+      lQueryString := copy(lDispatcher, pos('?', lDispatcher)+1, MaxInt);
+      Delete(lDispatcher, pos('?', lDispatcher), MaxInt);
+    end else
+      lQueryString := '';
+
+    if (lDispatcher <> '') and (lDispatcher[1] = '/') then delete(lDispatcher, 1,1);
+    if pos('/', lDispatcher) > 0 then
+    begin
+      lSubPath := copy(lDispatcher, pos('/', lDispatcher)+1, MaxInt);
+      lDispatcher := '/' + copy(lDispatcher, 1, pos('/', lDispatcher) - 1);
+    end else
+    begin
+      lDispatcher := '/' + lDispatcher;
+      lSubPath := '';
+    end;
+
+    if lQueryString <> '' then begin
+      if copy(lQueryString, 1, 8) = 'service=' then begin
+        lServiceName := copy(lQueryString, 9, MaxInt);
+      end else if pos('&service=', lQueryString) > 0 then begin
+        lServiceName := Copy(lQueryString, pos('&service=', lQueryString)+10, MaxInt);
+      end;
+      if pos('&', lServiceName) >0 then Delete(lServiceName, pos('&', lServiceName), MaxInt);
+    end;
+
+    lMd := TROHTTPMessageDispatchers(Dispatchers).GetDispatcherByPath(lDispatcher) as TROHTTPDispatcher;
+
+    if lmd = nil then begin
+      if HandleUnknownRequest(aTarget, aRequestHeaders, aRequest) then
+      exit
+      else
+      begin
+        if (lDispatcher = '/') and (fServeInfoPage) then begin
+          lResponseHeaders := TIPHttpResponseHeaders.Create;
+          try
+            SetDefaultHeaders(aTarget, lResponseHeaders);
+            lResponseHeaders.Headers.Values['Content-Type'] := 'text/html; charset=utf-8';
+
+            lrodl := GetRodlLibrary(GetRODLReader);
+            try
+              s := GetRodlServerInfo('', lRodl, Dispatchers);
+            finally
+              lRodl.Free;
+            end;
+            SetLength(lResponse, length(s));
+            Move(s[1], lResponse[0], Length(S));
+            SendResponse(aTarget, lResponseHeaders, lResponse, nil);
+          finally
+            lResponseHeaders.Free;
+          end;
+          exit;
+        end
+        else if (Lowercase(lDispatcher) = '/doc')and (fServeInfoPage) then begin
+          lResponseHeaders := TIPHttpResponseHeaders.Create;
+          try
+            SetDefaultHeaders(aTarget, lResponseHeaders);
+            if lSubPath = 'css' then
+            begin
+              s := GetRodlCss;
+              lResponseHeaders.Headers.Values['Content-Type'] := 'text/css';
+            end else
+            if lSubPath = 'xslt' then
+            begin
+              s := GetRodlStyleSheet;
+              lResponseHeaders.Headers.Values['Content-Type'] := 'text/xml';
+            end else if lSubPath = '' then
+            begin
+              lRodl := GetRodlLibrary(GetRODLReader);
+              try
+                lResponseHeaders.Headers.Values['Content-Type'] := 'text/xml';
+                s := GetRodlWithStyleSheet(lRodl, '/doc/xslt');
+              finally
+                lRodl.Free;
+              end;
+            end else
+            begin
+              SendError(aTarget, 'Invalid Path');
+              exit;
+            end;
+            SetLength(lResponse, length(s));
+            Move(s[1], lResponse[0], Length(S));
+            SendResponse(aTarget, lResponseHeaders, lResponse, nil);
+          finally
+            lResponseHeaders.Free;
+          end;
+          exit;
+        end
+        else if (LowerCase(lDispatcher) = '/favicon.ico') and (fServeInfoPage) then begin
+          lResponseHeaders := TIPHttpResponseHeaders.Create;
+          try
+            SetDefaultHeaders(aTarget, lResponseHeaders);
+            lResponseHeaders.Headers.Values['Content-Type'] := 'image/x-icon';
+            lTempStr := TMemoryStream.Create;
+            try
+              GetRodlFavIcon(lTempStr);
+              SetLengtH(lResponse, lTempStr.Size);
+              lTempStr.Position := 0;
+              lTempstr.Read(lResponse[0], Length(lResponse));
+            finally
+              lTempStr.Free;
+            end;
+            SendResponse(aTarget, lResponseHeaders, lResponse, nil);
+          finally
+            lResponseHeaders.Free;
+          end;
+          exit;
+        end
+        else if (Lowercase(lDispatcher) = '/rodl') and (fServeRodl) then begin
+          SendRodl(aTarget, aRequestHeaders, lMd, lServiceName);
+          exit;
+        end else begin
+          SendError(aTarget, 'No dispatcher configured for "'+{$IFDEF UNICODE}WideStringToAnsiString{$ENDIF}(lDispatcher)+'".');
+          exit;
+        end;
+      end;
+    end;
+    if not lMd.Enabled then begin
+      SendError(aTarget, 'Dispatcher for "'+{$IFDEF UNICODE}WideStringToAnsiString{$ENDIF}(lDispatcher)+'" is disabled.');
+      exit;
+    end;
+    if lMd.Message = nil then begin
+      SendError(aTarget, 'Message for dispatcher "'+{$IFDEF UNICODE}WideStringToAnsiString{$ENDIF}(lDispatcher)+'" is has not been assigned.');
+      exit;
+    end;
+
+    if ((aRequestHeaders.Method = 'GET') or
+      (Length(aRequest) = 4)) and(fServeRodl) then begin
+      if (lSubPath = '') or (lSubPath = 'rodl') then begin
+        SendRodl(aTarget, aRequestHeaders, lmd, lServiceName);
+        exit;
+      end
+      else begin
+        SendError(aTarget, 'Message for dispatcher "'+{$IFDEF UNICODE}WideStringToAnsiString{$ENDIF}(lDispatcher)+'" is has not been assigned.');
+        exit;
+      end;
+    end;
+
+    IncomingData(aTarget, aRequestHeaders, aRequest, lmd);
+  except
+    on e: Exception do
+      SendError(aTarget, {$IFDEF UNICODE}WideStringToAnsiString{$ENDIF}(e.Message));
+  end;
+end;
+
+procedure TROBaseSuperHttpServer.SendAsyncResponse(
+  aTarget: IROSuperHttpServerConnection; lHeaders: TIPHttpResponseHeaders;
+  aData: TDynamicByteArray);
+var
+  lResponse: IROSuperHttpServerResponse;
+  lList: TList;
+  lWc: TROSuperHttpWaitingConnection;
+begin
+  lResponse := TROSuperHttpServerResponse.Create(aTarget.GetSelf, lHeaders);
+  lResponse.GetSelf.fData := aData;
+  lResponse.GetSelf.fConnection := aTarget.GetSelf;
+  lList := aTarget.GetSelf.WaitingConnections.LockList;
+  try
+    if lList.Count > 0 then begin
+      lResponse.GetSelf.Attempt :=lResponse.GetSelf.Attempt + 1;
+      lWc := lList[0];
+      lList.Delete(0);
+      SendResponse(lWc.Channel, lResponse.GetSelf.Headers, lResponse.GetSelf.Data, lResponse);
+      lWc.Free;
+      exit;
+    end;
+    aTarget.GetSelf.ResponseQueue.Add(lResponse);
+  finally
+    aTarget.GetSelf.WaitingConnections.UnlockList;
+  end;
+end;
+
+procedure TROBaseSuperHttpServer.SetThreadPool(const Value: TROThreadPool);
+begin
+  if fOwnsThreadPool then
+    FreeAndNil(fThreadPool);
+  fOwnsThreadPool := false;
+  fThreadPool := Value;
+end;
+
+type
+  TQueueItem = class(TInterfacedObject, IROThreadPoolCallback, IROTransport, IROTCPTransport, IROHTTPTransport)
+  private
+    fTarget: IROSuperHttpServerConnection;
+    fHeaders: TIPHttpRequestHeaders;
+    fMessageDispatcher: TROMessageDispatcher;
+    fId: Integer;
+    fData: TDynamicByteArray;
+    fOwner: TROBaseSuperHttpServer;
+  public
+    constructor Create(aOwner: TROBaseSuperHttpServer; aTarget: IROSuperHttpServerConnection; aHeaders: TIPHttpRequestHeaders;
+      aMessageDispatcher: TROMessageDispatcher; aId: Integer;
+      aData: TDynamicByteArray);
+    destructor Destroy; override;
+    procedure Callback(Caller: TROThreadPool; aThread: TThread);
+    function GetTransportObject: TObject;
+    function GetContentType: String;
+    function GetHeaders(const aName: String): String;
+    function GetLocation: String;
+    function GetPathInfo: String;
+    function GetQueryString: String;
+    function GetTargetURL: String;
+    function GetUserAgent: String;
+    procedure SetContentType(const aValue: String);
+    procedure SetHeaders(const aName: String; const aValue: String);
+    procedure SetPathInfo(const aValue: String);
+    procedure SetTargetURL(const aValue: String);
+    procedure SetUserAgent(const aValue: String);
+    function GetClientAddress: String;
+    function GetQueryParameter(const aName: String): String;
+  end;
+
+
+procedure TROBaseSuperHttpServer.ProcessPackage(
+  aTarget: IROSuperHttpServerConnection; aHeaders: TIPHttpRequestHeaders;
+  aMessageDispatcher: TROMessageDispatcher; aId: Integer;
+  aData: TDynamicByteArray);
+begin
+  fThreadPool.QueueItem(TQueueItem.Create(self, aTarget, aHeaders, aMessageDispatcher, aId, aData));
+end;
+
+
+
+procedure TROBaseSuperHttpServer.ResponseFailed(aUserData: IInterface);
+var
+  lData: IROSuperHttpServerResponse;
+  lConn: IROSuperHttpServerConnection;
+  lList: TList;
+  lWc: TROSuperHttpWaitingConnection;
+
+begin
+  if aUserData = nil then exit;
+
+  lData := IROSuperHttpServerResponse(aUserData);
+  if lData.GetSelf.Attempt = 16 then exit; // it won't arrive after 16 tries.
+
+  lConn := lData.GetSelf.Connection;
+  lList := lConn.GetSelf.WaitingConnections.LockList;
+  try
+    if lList.Count > 0 then begin
+      lData.GetSelf.Attempt := lData.GetSelf.Attempt + 1;
+      lWc := TROSuperHttpWaitingConnection(lList[0]);
+      lList.Delete(0);
+      SendResponse(lWc.Channel, lData.GetSelf.Headers, lData.GetSelf.Data, lData);
+      lWc.Free;
+      exit;
+    end;
+    lConn.GetSelf.ResponseQueue.Add(lData);
+  finally
+    lConn.GetSelf.WaitingConnections.UnlockList;
+  end;
+
+
+end;
+
+procedure TROBaseSuperHttpServer.ResponseSucessful(aUserData: IInterface);
+begin
+  // nothing to do here.
+end;
+
+function TROBaseSuperHttpServer.GetDispatchersClass: TROMessageDispatchersClass;
+begin
+  Result :=  TROHTTPMessageDispatchers;
+end;
+(*
+type
+  TByteArrayStream = class(TStream)
+  private
+    fPos: Integer;
+    fData: TDynamicByteArray;
+  protected
+    {$IFDEF DELPHI7UP}
+    function GetSize: Int64; override;
+	{$ENDIF}
+  public
+    constructor Create(aData: TDynamicByteArray);
+    function Write(const Buffer; Count: Integer): Integer; override;
+    function Read(var Buffer; Count: Integer): Integer; override;
+    function Seek(Offset: Integer; Origin: Word): Integer; override;
+  end;
+*)
+{ TQueueItem }
+
+procedure TQueueItem.Callback(Caller: TROThreadPool; aThread: TThread);
+var
+  lStream, lResponse: TStream;
+  lResp: TDynamicByteArray;
+begin
+  {$IFDEF FPC}
+  if (Caller = nil) or (aThread = nil) then lStream := nil else //for preventing warnings in FPC
+  {$ENDIF}
+  lStream := nil;
+  lResponse := TMemoryStream.Create;
+  try
+//     if assigned(fOwner.OnReadFromStream) then begin
+      lStream := TMemoryStream.Create;
+      lStream.Write(fData[0], Length(fData));
+      lstream.Position := 0;
+      if assigned(fOwner.OnReadFromStream) then fOwner.OnReadFromStream(lStream);
+
+{    end
+    else
+     lStream := TByteArrayStream.Create(fData);
+}
+    fData := nil;
+
+    fOwner.DispatchMessage(self, lStream, lResponse);
+
+    if assigned(fOwner.OnWriteToStream) then
+      fOwner.OnWriteToStream(lResponse);
+
+    lResponse.Position := 0;
+
+    SetLength(lResp, lResponse.Size + 5);
+    lResp[0] := ShPackage;
+    lResp[1] := fId;
+    lResp[2] := fId shr 8;
+    lResp[3] := fId shr 16;
+    lResp[4] := fId shr 24;
+    lResponse.Read(lResp[5], lResponse.Size);
+    fOwner.SendAsyncResponse(fTarget, nil, lResp);
+  except
+    on E: Exception do begin
+      setLength(lResp, 4 + 1 + 1);
+      lResp[0] := ShError;
+      lResp[1] := fId;
+      lResp[2] := fId shr 8;
+      lResp[3] := fId shr 16;
+      lResp[4] := fId shr 24;
+      lResp[5] := ShError_QueueFull;
+      fOwner.SendAsyncResponse(fTarget, nil, lResp);
+    end;
+  end;
+  lStream.Free;
+  lResponse.Free;
+end;
+
+constructor TQueueItem.Create(aOwner: TROBaseSuperHttpServer;
+  aTarget: IROSuperHttpServerConnection; aHeaders: TIPHttpRequestHeaders;
+  aMessageDispatcher: TROMessageDispatcher; aId: Integer;
+  aData: TDynamicByteArray);
+begin
+  inherited Create;
+  fOwner := aOwner;
+  fTarget := aTarget;
+  fHeaders := TIPHttpRequestHeaders.Create;
+  fHeaders.Headers.Assign(aHeaders.Headers);
+  fHeaders.Method := aHeaders.Method;
+  fHeaders.Version := aHeaders.Version;
+  fHeaders.Path := aHeaders.Path;
+  fHeaders.ClientAddress := aHeaders.ClientAddress;
+
+  fMessageDispatcher := aMessageDispatcher;
+  fId := aId;
+  fData := aData;
+end;
+
+destructor TQueueItem.Destroy;
+begin
+  fHeaders.Free;
+  inherited Destroy;
+end;
+
+function TQueueItem.GetClientAddress: String;
+begin
+  result := fHeaders.ClientAddress;
+end;
+
+function TQueueItem.GetContentType: String;
+begin
+  result := fHeaders.ContentType;
+end;
+
+function TQueueItem.GetHeaders(const aName: String): String;
+begin
+  result := fHeaders.Headers.Values[aName];
+end;
+
+function TQueueItem.GetLocation: String;
+begin
+  result := '';
+end;
+
+function TQueueItem.GetPathInfo: String;
+begin
+  result := fHeaders.Path;
+end;
+
+function EscapeDecode(const s:string):string;
+var
+   I:Integer;
+begin
+  Result := S;
+  I := Pos('%',Result);
+  while I > 0 do begin
+    Result := Copy(Result, 1, I-1) + Chr(StrToIntDef('$' + Copy(result, I + 1, 2), ord('a'))) + Copy(Result, I+3, Length(Result));
+    I := Pos('%',Result);
+  end;
+  I := Pos('+',Result);
+  while I > 0 do begin
+    Result := Copy(Result, 1, I - 1) + ' ' + Copy(Result, I + 1, Length(Result));
+    I := Pos('+',Result);
+  end;
+end;
+
+
+function TQueueItem.GetQueryParameter(const aName: String): String;
+var
+  s: string;
+  i: Integer;
+begin
+  s := GetQueryString;
+  result := '';
+  if Copy(s,1,length(aName)+1) = aName+'=' then begin
+    Delete(s,1,Length(aname)+1);
+  end else begin
+    i := Pos('&' +aName+'=',s);
+    if i = 0 then exit;
+    Delete(s,1,i+Length(aName)+1);
+  end;
+  if pos('&', s) > 0 then s:= copy(s,1,pos('&', s)-1);
+  result := EscapeDecode(s);
+end;
+
+function TQueueItem.GetQueryString: String;
+begin
+  result := fHeaders.Path;
+  if pos('?', Result) <> 0 then
+     result := copy(Result, pos('?', Result) + 1 ,MaxInt)
+  else
+    result := '';
+end;
+
+function TQueueItem.GetTargetURL: String;
+begin
+  result := '';
+end;
+
+function TQueueItem.GetTransportObject: TObject;
+begin
+  result := fOwner;
+end;
+
+function TQueueItem.GetUserAgent: String;
+begin
+  result := fHeaders.Headers.Values['User-Agent'];
+end;
+
+procedure TQueueItem.SetContentType(const aValue: String);
+begin
+end;
+
+procedure TQueueItem.SetHeaders(const aName, aValue: String);
+begin
+  fHeaders.Headers.Values[aName] := aValue;
+end;
+
+procedure TQueueItem.SetPathInfo(const aValue: String);
+begin
+end;
+
+procedure TQueueItem.SetTargetURL(const aValue: String);
+begin
+end;
+
+procedure TQueueItem.SetUserAgent(const aValue: String);
+begin
+end;
+(*
+{ TByteArrayStream }
+
+constructor TByteArrayStream.Create(aData: TDynamicByteArray);
+begin
+  inherited Create;
+  fData := aData;
+  fPos := 0;
+end;
+
+{$IFDEF DELPHI7UP}
+function TByteArrayStream.GetSize: Int64;
+begin
+  result := Length(fData);
+end;
+{$ENDIF}
+
+function TByteArrayStream.Read(var Buffer; Count: Integer): Integer;
+begin
+  if fPos + Count >= Length(fData) then Count := Length(fData) - fPos;
+  Move(fData[fPos], Buffer, Count);
+  fPos := fPos + Count;
+  result := Count;
+end;
+
+function TByteArrayStream.Seek(Offset: Integer; Origin: Word): Integer;
+begin
+  case Origin of
+    soFromBeginning: fPos := Offset;
+    soFromCurrent: fPos := fPos + Offset;
+    soFromEnd: fPos := Length(fData) + Offset;
+  end;
+  if fPos < 0 then fPos := 0;
+  if fPos >= Length(fData) then fPos := Length(fData) -1;
+  Result := fPos;
+end;
+
+function TByteArrayStream.Write(const Buffer; Count: Integer): Integer;
+begin
+  {$IFDEF FPC}
+  if (Count = 1) then Result := 0 else Result := 0; //for preventing warnings in FPC
+  {$ENDIF}
+  raise Exception.Create('Readonly stream cannot be written to');
+end;
+*)
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROBinMessage.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROBinMessage.pas
new file mode 100644
index 0000000..076a6a4
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROBinMessage.pas	
@@ -0,0 +1,622 @@
+unit uROBinMessage;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes, SysUtils, TypInfo,
+  uROSerializer, uROClient, uROClientIntf;
+
+type
+  TBinMessageSignature = array[0..4] of AnsiChar;
+
+const
+  BinSignature: TBinMessageSignature =          ( #82,  #79,  #49,  #48, #55); // 'RO107';
+  EncryptedBinSignature: TBinMessageSignature = (#114, #111, #114, #111, #99); //'roroc';
+
+  BIN_HEADER_SIZE = $1c;
+
+  { Misc }
+  {
+    // Header BINARY LAYOUT: $1C bytes
+    //
+    // Keep in sync with
+    //  - Delphi - uROBINMessage.pas
+    //  - C#     - BinMessage.cs
+    //
+    // 52 4f 31 30  = "RO10" basic RO signature for RO 1.0
+    // XX YY ZZ --  = XX: subversion (currenly "7")
+    //		 YY: option flags: 01 = compressed
+    //		 ZZ: message type as defined in uROClientIntf
+    //     --: reserved for future use
+    // -- -- UU UU  = UU: user data (word)
+    // CC CC CC CC    $10 bytes ClientID (guid)
+    // CC CC CC CC
+    // CC CC CC CC
+    // CC CC CC CC
+  }
+
+type
+  TBinHeaderArray = array[0..BIN_HEADER_SIZE - 1] of byte;
+  TBinMessageType = Byte;
+
+type
+  TBinHeader = class
+  private
+    fHeader: TBinHeaderArray;
+    function GetCompressed: boolean;
+    procedure SetCompressed(const Value: boolean);
+    function GetSignatureValid: boolean;
+    function GetSignatureIsEncrypted: boolean;
+    function GetMessageType: TBinMessageType;
+    procedure SetMessageType(const Value: TBinMessageType);
+    function GetUserData: Word;
+    procedure SetUserData(const Value: Word);
+    function GetClientID: TGUID;
+    procedure SetClientID(const Value: TGUID);
+
+  public
+    constructor CreateFromStream(iStream: TStream);
+    constructor Create;
+    procedure WriteToStream(iStream: TStream);
+
+    {$IFNDEF DELPHI10UP}property Header: TBinHeaderArray read fHeader;{$ENDIF}
+    property Compressed: boolean read GetCompressed write SetCompressed;
+    property SignatureValid: boolean read GetSignatureValid;
+    property SignatureIsEncrypted: boolean read GetSignatureIsEncrypted;
+    property MessageType: TBinMessageType read GetMessageType write SetMessageType;
+    property UserData: Word read GetUserData write SetUserData;    
+    property ClientID: TGUID read GetClientID write SetClientID;
+  end;
+
+  TROCompressionEvent = procedure(OriginalSize, CompressedSize, CompressionTime: integer) of object;
+
+  { TROBinMessage }
+
+  IROBinMessage = interface(IROMessage)
+    ['{255E6B2C-66BC-4BE3-9C29-459D00221F7E}']
+    function GetCompressionBufferSize: integer;
+    function GetUseCompression: boolean;
+    function GetMinSizeForCompression: integer;
+    procedure SetMinSizeForCompression(const Value: integer);
+    procedure SetCompressionBufferSize(const Value: integer);
+    procedure SetUseCompression(const Value: boolean);
+    function GetWasCompressed : boolean;
+
+    function GetStream: TStream;
+
+    property UseCompression: boolean read GetUseCompression write SetUseCompression;
+    property MinSizeForCompression: integer read GetMinSizeForCompression write SetMinSizeForCompression;
+    property CompressionBufferSize: integer read GetCompressionBufferSize write SetCompressionBufferSize;
+    property Stream: TStream read GetStream;
+    property WasCompressed : boolean read GetWasCompressed;
+  end;
+
+  TROBinMessage = class(TROMessage, IROBinMessage, IROStreamAccess)
+  private
+    fStream: TStream;
+    fUseCompression: boolean;
+    fDestroyStream: boolean;
+    fWasCompressed: boolean;
+    fOnCompress: TROCompressionEvent;
+    fOnDecompress: TROCompressionEvent;
+    fCompressionBufferSize: integer;
+    fType: TMessageType;
+    fMinSizeForCompression: integer;
+    function GetMinSizeForCompression: integer;
+    procedure SetMinSizeForCompression(const Value: integer);
+
+    procedure WriteStream(aMessageType: TBinMessageType; Source, Destination: TStream);
+
+    function GetCompressionBufferSize: integer;
+    function GetUseCompression: boolean;
+    procedure SetCompressionBufferSize(const Value: integer);
+    procedure SetUseCompression(const Value: boolean);
+    function GetWasCompressed : boolean;
+
+  protected
+    { Internals }
+    function ReadException: Exception; override;
+    procedure WriteException(aStream: TStream; anException: Exception); override;
+
+    function CreateSerializer: TROSerializer; override;
+
+    { IROMessage }
+    procedure Initialize(const aTransport: IROTransport; const anInterfaceName, aMessageName: string; aType: TMessageType); override;
+
+
+    procedure WriteToStream(aStream: TStream); override;
+    procedure IntReadFromStream(aStream: TStream; CopyStream: Boolean);
+
+    procedure ReadFromStream(aStream: TStream); overload; override;
+    procedure ReadFromStream(aStream: TStream; var aFreeStream: Boolean); overload; override;
+
+    function GetStream: TStream;
+    procedure FreeStream; override;
+    procedure InitializeExceptionMessage(const aTransport: IROTransport;
+      const aLibraryName: String; const anInterfaceName: String;
+      const aMessageName: String); override;
+  public
+    procedure InitObject; override;
+    destructor Destroy; override;
+
+    procedure Assign(iSource: TPersistent); override;
+
+    property Stream: TStream read FStream;
+    function IsValidMessage(aData: PAnsiChar; aLength: Integer): boolean;  override;
+  published
+    property UseCompression: boolean read GetUseCompression write SetUseCompression default true;
+    property MinSizeForCompression: integer read GetMinSizeForCompression write SetMinSizeForCompression default 4096;
+    property CompressionBufferSize: integer read GetCompressionBufferSize write SetCompressionBufferSize default 256 * 1024;
+    property OnCompress: TROCompressionEvent read fOnCompress write fOnCompress;
+    property OnDecompress: TROCompressionEvent read fOnDecompress write fOnDecompress;
+  end;
+
+implementation
+
+uses
+  {$IFDEF MSWINDOWS}Windows, {$ENDIF MSWINDOWS}
+  {$IFDEF DEBUG_REMOBJECTS_BINMESSAGE}eDebugServer, {$ENDIF DEBUG_REMOBJECTS_BINMESSAGE}
+  uROStreamSerializer,
+  uRORes, uROCompression, uROHTTPTools, uROClasses,
+  uROTypes, uROBinaryHelpers, uROZLib;
+
+{ TROBinMessage }
+
+destructor TROBinMessage.Destroy;
+begin
+  if fDestroyStream then FreeAndNIL(fStream);
+  inherited;
+end;
+
+function TROBinMessage.CreateSerializer: TROSerializer;
+begin
+  result := TROStreamSerializer.Create(nil);
+end;
+
+procedure TROBinMessage.Initialize(const aTransport: IROTransport; const anInterfaceName, aMessageName: string; aType: TMessageType);
+begin
+  inherited;
+
+  SetHTTPInfo(aTransport, DataFormatBinary);
+
+  if fDestroyStream then FreeAndNIL(fStream);
+  fStream := TMemoryStream.Create;
+  fDestroyStream := TRUE;
+
+  (Serializer as TROStreamSerializer).SetStorageRef(fStream); // Very important!
+
+  MessageName := aMessageName;
+  InterfaceName := anInterfaceName;
+  fType := aType;
+
+  Stream_WriteStringWithLength(fStream, InterfaceName);
+  Stream_WriteStringWithLength(fStream, MessageName);
+end;
+
+procedure TROBinMessage.IntReadFromStream(aStream: TStream; CopyStream: Boolean);
+var //sze : integer;
+  //s : string;
+  lHeader: TBinHeader;
+  lPos: Int64;
+  {$IFDEF REMOBJECTS_PERFORMANCE_MEASUREMENT}
+  start: Integer;
+  PerformanceFrequency,
+    PerformanceCounter: Int64;
+  {$ENDIF REMOBJECTS_PERFORMANCE_MEASUREMENT}
+begin
+  inherited;
+
+  {$IFDEF DEBUG_REMOBJECTS_BINMESSAGE}
+  DebugServer.EnterMethod('TROBinMessage.ReadFromStream(stream=%x; position:$%x)', [integer(pointer(aStream)), aStream.Position]);
+  try
+    DebugServer.WriteHexDump('Incoming BIN, start of ReadFromStream: ', aStream);
+    //aStream.Seek(0,soBeginning);
+    {$ENDIF DEBUG_REMOBJECTS_BINMESSAGE}
+
+    if fDestroyStream then FreeAndNIL(fStream);
+
+    lHeader := TBinHeader.CreateFromStream(aStream);
+    try
+      fWasCompressed := lHeader.Compressed;
+      SetClientID(lHeader.ClientID);
+
+      if lHeader.Compressed then begin
+        {$IFDEF REMOBJECTS_PERFORMANCE_MEASUREMENT}
+        if not QueryPerformanceFrequency(PerformanceFrequency) then RaiseLastOSError;
+        if not QueryPerformanceCounter(PerformanceCounter) then RaiseLastOSError;
+        start := GetTickCount();
+        {$ENDIF REMOBJECTS_PERFORMANCE_MEASUREMENT}
+
+        fDestroyStream := TRUE;
+        fStream := TMemoryStream.Create;
+
+        ZDecompressStream(aStream, fStream);
+
+        {$IFDEF DEBUG_REMOBJECTS_BINMESSAGE}
+        DebugServer.WriteHexDump('Decompressed BIN message (sans Header): ', fStream);
+        //aStream.Seek(0,soBeginning);
+        {$ENDIF DEBUG_REMOBJECTS_BINMESSAGE}
+
+        {$IFDEF REMOBJECTS_PERFORMANCE_MEASUREMENT}
+        if not QueryPerformanceCounter(PerformanceCounter) then RaiseLastOSError;
+        if Assigned(OnDeCompress) then OnDecompress(fStream.Size, aStream.Size, GetTickCount - start);
+        {$ELSE}
+        if Assigned(OnDeCompress) then OnDecompress(fStream.Size, aStream.Size, 0);
+        {$ENDIF REMOBJECTS_PERFORMANCE_MEASUREMENT}
+
+        fStream.Position := 0;
+        // TROTransportChannel.Dispatch always destroys stream if error.
+        if (lHeader.MessageType<>MESSAGE_TYPE_EXCEPTION) then
+          if not CopyStream then aStream.Free;
+      end
+      else begin
+        if CopyStream then begin
+          fStream := TMemoryStream.Create;
+          lPos := aStream.Position;
+          aStream.position := 0;
+          fStream.CopyFrom(aStream, aStream.Size);
+          fStream.Position := lPos;
+        end
+        else
+          fStream := aStream;
+        fDestroyStream := true;
+      end;
+
+      (Serializer as TROStreamSerializer).SetStorageRef(fStream); // Very important!
+      case lHeader.MessageType of
+        MESSAGE_TYPE_EVENT,
+        MESSAGE_TYPE_MESSAGE: begin
+            InterfaceName := Stream_ReadStringWithLength(fStream, MAX_ITEM_NAME);
+            MessageName := Stream_ReadStringWithLength(fStream, MAX_ITEM_NAME);
+          end;
+        MESSAGE_TYPE_EXCEPTION: begin
+            ProcessException;
+          end;
+      else // Do what?
+      end;
+
+    finally
+      FreeAndNil(lHeader);
+    end;
+
+  {$IFDEF DEBUG_REMOBJECTS_BINMESSAGE}
+  finally
+    DebugServer.ExitMethod('TROBinMessage.ReadFromStream(stream=%x; position:$%x)', [integer(pointer(fStream)), fStream.Position]);
+  end;
+  {$ENDIF DEBUG_REMOBJECTS_BINMESSAGE}
+
+end;
+
+procedure TROBinMessage.WriteToStream(aStream: TStream);
+begin
+  if fType = mtEvent then
+    WriteStream(MESSAGE_TYPE_EVENT, fStream, aStream)
+  else
+    WriteStream(MESSAGE_TYPE_MESSAGE, fStream, aStream);
+
+  inherited;
+end;
+
+function TROBinMessage.ReadException: Exception;
+var
+  lExceptionName, lMessage: string;
+begin
+  // At this point the stream is already at position 1
+  lExceptionName := Stream_ReadStringWithLength(fStream, MAX_ITEM_NAME);
+  lMessage := AnsiStringToWideString(AnsiString(Stream_ReadUTF8StringWithLength(fStream, MAX_EXCEPTION_TEXT)));
+
+  result := CreateException(lExceptionName, lMessage);
+
+  // Reads the other fields which have been properly serialized
+  if result.InheritsFrom(EROException) then
+    Serializer.Read(name_Exception, result.ClassType.ClassInfo, result);
+    
+  fDestroyStream:=False; // we destroy stream in TROTransportChannel.Dispatch
+end;
+
+procedure TROBinMessage.WriteException(aStream: TStream; anException: Exception);
+var typinfo : PTypeInfo;
+begin
+  if fDestroyStream then FreeAndNIL(fStream);
+  fStream := TMemoryStream.Create;
+  fDestroyStream := TRUE;
+
+  Stream_WriteStringWithLength(fStream, anException.ClassName);
+  Stream_WriteUTF8StringWithLength(fStream, UTF8String(WideStringToAnsiString(anException.Message)));
+
+  if (anException is EROException) then begin
+    with TROStreamSerializer.Create(fStream) do try
+      typinfo := anException.ClassInfo;
+      Write(name_Exception, typinfo, anException);
+    finally
+      Free;
+    end;
+  end;
+
+  WriteStream(MESSAGE_TYPE_EXCEPTION, fStream, aStream);
+  inherited;
+end;
+
+procedure TROBinMessage.WriteStream(aMessageType: TBinMessageType; Source, Destination: TStream);
+var
+  lHeader: TBinHeader;
+  {$IFDEF REMOBJECTS_PERFORMANCE_MEASUREMENT}
+  start: Integer;
+  PerformanceFrequency,
+    PerformanceCounter: Int64;
+  {$ENDIF REMOBJECTS_PERFORMANCE_MEASUREMENT}
+begin
+  {$IFDEF DEBUG_REMOBJECTS_BINMESSAGE}
+  DebugServer.EnterMethod('TROBinMessage.WriteStream()');
+  try
+    {$ENDIF DEBUG_REMOBJECTS_BINMESSAGE}
+
+    // Writes the header
+    lHeader := TBinHeader.Create();
+    try
+      lHeader.Compressed := UseCompression and (Source.Size >= MinSizeForCompression);
+      lHeader.MessageType := aMessageType;
+      lHeader.ClientID := GetClientID;
+      lHeader.WriteToStream(Destination);
+    finally
+      FreeAndNil(lHeader);
+    end;
+    // Writes the data
+    Source.Position := 0;
+    if UseCompression and (Source.Size >= MinSizeForCompression) then begin
+
+      {$IFDEF DEBUG_REMOBJECTS_BINMESSAGE}
+      DebugServer.WriteHexDump('Uncompressed BIN: ', Source);
+      {$ENDIF DEBUG_REMOBJECTS_BINMESSAGE}
+
+      {$IFDEF REMOBJECTS_PERFORMANCE_MEASUREMENT}
+      if not QueryPerformanceFrequency(PerformanceFrequency) then
+        RaiseLastOSError;
+      if not QueryPerformanceCounter(PerformanceCounter) then
+        RaiseLastOSError;
+      start := GetTickCount { + Frac(PerformanceCounter / PerformanceFrequency * MSecsPerSec)};
+      {$ENDIF REMOBJECTS_PERFORMANCE_MEASUREMENT}
+
+      ZCompressStream(Source, Destination);
+
+      {$IFDEF REMOBJECTS_PERFORMANCE_MEASUREMENT}
+      if not QueryPerformanceCounter(PerformanceCounter) then RaiseLastOSError;
+      if Assigned(OnCompress) then OnCompress(Source.Size, Destination.Size, GetTickCount - start);
+      {$ELSE }
+      if Assigned(OnCompress) then OnCompress(Source.Size, Destination.Size, 0);
+      {$ENDIF REMOBJECTS_PERFORMANCE_MEASUREMENT}
+    end
+    else begin
+      TMemoryStream(Source).SaveToStream(Destination);
+      {ToDo -cOptimization/RO4: The infrastructure could re rearranged so that the message
+        could be written to the final stream right away. This would require significant
+        changes to proxy and invoker code, among others, so we'll defer to RO4. mh. }
+    end;
+
+    {$IFDEF DEBUG_REMOBJECTS_BINMESSAGE}
+    DebugServer.WriteHexDump('Outgoing BIN: ', Destination);
+  finally
+    DebugServer.ExitMethod('TROBinMessage.WriteStream()');
+  end;
+  //Destination.Seek(0,soBeginning);
+  {$ENDIF DEBUG_REMOBJECTS_BINMESSAGE}
+
+end;
+
+procedure TROBinMessage.InitObject;
+begin
+  inherited;
+  fUseCompression := true;
+  fCompressionBufferSize := 256 * 1024;
+  fMinSizeForCompression := 4096;
+end;
+
+procedure TROBinMessage.Assign(iSource: TPersistent);
+var
+  lSource: TROBinMessage;
+begin
+  inherited;
+  if Assigned(iSource) then begin
+    if not (iSource is TROBinMessage) then RaiseError('Cannot Assign a %s t a %s', [ClassName, iSource.ClassName]);
+    lSource := TROBinMessage(iSource);
+    self.UseCompression := lSource.UseCompression;
+    self.MinSizeForCompression := lSource.MinSizeForCompression;
+    self.CompressionBufferSize := lSource.CompressionBufferSize;
+    self.OnCompress := lSource.OnCompress;
+    self.OnDecompress := lSource.OnDecompress;
+    //ToDO -c2.0 -omh: clone the stream to, if one is assigned;
+  end;
+end;
+
+function TROBinMessage.GetCompressionBufferSize: integer;
+begin
+  result := fCompressionBufferSize;
+end;
+
+function TROBinMessage.GetMinSizeForCompression: integer;
+begin
+  result :=  fMinSizeForCompression;
+end;
+
+function TROBinMessage.GetUseCompression: boolean;
+begin
+  result := fUseCompression;
+end;
+
+procedure TROBinMessage.SetCompressionBufferSize(const Value: integer);
+begin
+  fCompressionBufferSize := Value;
+end;
+
+procedure TROBinMessage.SetMinSizeForCompression(const Value: integer);
+begin
+  fMinSizeForCompression := Value;
+end;
+
+procedure TROBinMessage.SetUseCompression(const Value: boolean);
+begin
+  fUseCompression := Value;
+end;
+
+function TROBinMessage.GetStream: TStream;
+begin
+  result := fStream;
+end;
+
+function TROBinMessage.GetWasCompressed: boolean;
+begin
+  result := fWasCompressed;
+end;
+
+procedure TROBinMessage.ReadFromStream(aStream: TStream);
+begin
+  inherited;
+  IntReadFromStream(aStream, true);
+end;
+
+procedure TROBinMessage.ReadFromStream(aStream: TStream;
+  var aFreeStream: Boolean);
+begin
+  inherited ReadFromStream(aStream);
+  aFreeStream := False; // set to false BEFORE the call; as the following might raise exceptions
+  IntReadFromStream(aStream, false);
+end;
+
+procedure TROBinMessage.FreeStream;
+begin
+  inherited;
+  if fDestroyStream then FreeAndNil(FStream);
+end;
+
+procedure TROBinMessage.InitializeExceptionMessage(
+  const aTransport: IROTransport; const aLibraryName, anInterfaceName,
+  aMessageName: String);
+begin
+  inherited;
+  SetHTTPInfo(aTransport, DataFormatBinary);
+end;
+
+function TROBinMessage.IsValidMessage(aData: PAnsiChar; aLength: Integer): boolean;
+begin
+  Result := (aLength >= Sizeof(TBinMessageSignature)) and
+   ((StrLComp(aData, Pansichar(@BinSignature),SizeOf(TBinMessageSignature))=0) or
+   (StrLComp(aData, PAnsichar(@EncryptedBinSignature),SizeOf(TBinMessageSignature))=0));
+end;
+
+{ TBinHeader }
+
+const
+  OFFSET_MESSAGE_FLAGS = $05; { offset of Flags field in header }
+  OFFSET_MESSAGE_TYPE = $06; { offset of Type field in header }
+  OFFSET_USER_DATA = $0a; { offset of UserData field in header }
+  OFFSET_CLIENTID = $0c; { offset of ClientID GUID }
+
+  BINMESSAGE_FLAG_COMPRESSED = $01;
+
+constructor TBinHeader.Create;
+begin
+  inherited Create();
+
+  fHeader[0] := Ord(BINSignature[0]);
+  fHeader[1] := Ord(BINSignature[1]);
+  fHeader[2] := Ord(BINSignature[2]);
+  fHeader[3] := Ord(BINSignature[3]);
+  fHeader[4] := Ord(BINSignature[4]);
+end;
+
+constructor TBinHeader.CreateFromStream(iStream: TStream);
+begin
+  inherited Create();
+  iStream.ReadBuffer(fHeader, SizeOf(fHeader));
+  if not SignatureValid then begin
+    if SignatureIsEncrypted then
+      RaiseInvalidStreamError(err_InvalidHeaderEncrypted, [], iStream);
+    RaiseInvalidStreamError(err_InvalidHeader, [], iStream);
+  end;
+end;
+
+function TBinHeader.GetMessageType: TBinMessageType;
+begin
+  result := TBinMessageType(fHeader[OFFSET_MESSAGE_TYPE]);
+end;
+
+procedure TBinHeader.SetMessageType(const Value: TBinMessageType);
+begin
+  fHeader[OFFSET_MESSAGE_TYPE] := byte(Value);
+end;
+
+function TBinHeader.GetSignatureIsEncrypted: boolean;
+begin
+  result := (fHeader[0] = ord(EncryptedBinSignature[0])) and
+    (fHeader[1] = ord(EncryptedBinSignature[1])) and
+    (fHeader[2] = ord(EncryptedBinSignature[2])) and
+    (fHeader[3] = ord(EncryptedBinSignature[3])) and
+    (fHeader[4] = ord(EncryptedBinSignature[4]));
+end;
+
+function TBinHeader.GetSignatureValid: boolean;
+begin
+  result := (fHeader[0] = ord(BINSignature[0])) and
+    (fHeader[1] = ord(BINSignature[1])) and
+    (fHeader[2] = ord(BINSignature[2])) and
+    (fHeader[3] = ord(BINSignature[3])) and
+    (fHeader[4] = ord(BINSignature[4]));
+end;
+
+function TBinHeader.GetCompressed: boolean;
+begin
+  result := fHeader[OFFSET_MESSAGE_FLAGS] and BINMESSAGE_FLAG_COMPRESSED = BINMESSAGE_FLAG_COMPRESSED;
+end;
+
+procedure TBinHeader.SetCompressed(const Value: boolean);
+begin
+  if Value then
+    fHeader[OFFSET_MESSAGE_FLAGS] := fHeader[OFFSET_MESSAGE_FLAGS] or BINMESSAGE_FLAG_COMPRESSED
+  else
+    fHeader[OFFSET_MESSAGE_FLAGS] := fHeader[OFFSET_MESSAGE_FLAGS] and not BINMESSAGE_FLAG_COMPRESSED;
+end;
+
+procedure TBinHeader.WriteToStream(iStream: TStream);
+begin
+  iStream.Write(fHeader, SizeOf(fHeader));
+end;
+
+function TBinHeader.GetUserData: Word;
+begin
+  result := Word((@fHeader[OFFSET_USER_DATA])^);
+end;
+
+procedure TBinHeader.SetUserData(const Value: Word);
+begin
+  Word((@fHeader[OFFSET_USER_DATA])^) := Value;
+end;
+
+function TBinHeader.GetClientID: TGUID;
+begin
+  Move(fHeader[OFFSET_CLIENTID], result, SizeOf(TGUID));
+end;
+
+procedure TBinHeader.SetClientID(const Value: TGUID);
+begin
+  Move(Value, fHeader[OFFSET_CLIENTID], SizeOf(TGUID));
+end;
+
+initialization
+  RegisterMessageClass(TROBinMessage);
+
+end.
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROBinaryHelpers.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROBinaryHelpers.pas
new file mode 100644
index 0000000..09e2e38
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROBinaryHelpers.pas	
@@ -0,0 +1,735 @@
+unit uROBinaryHelpers;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+{ToDo: -cRO3 clean up this mess, rename the methods appropriately and group
+             them depending on what they do (ie handle complex variants; do
+             conversions of *plain* binaries, etc. }
+
+uses
+  Classes, {$IFDEF FPC}Variants, {$ELSE}{$IFDEF VER140UP}Variants,{$ENDIF}{$ENDIF}
+  uROTypes, uROClasses, FMTBcd;
+
+type
+  EROBinaryConversionException = class(EROException);
+{$IFDEF FPC}OleVariant = Variant; {$ENDIF}
+
+function BinaryFromVariant(const iVariant:OleVariant):Binary;
+function VariantFromBinary(const iBinary:TStream):OleVariant;
+
+procedure WriteVariantBinaryToBinary(const iVariant:OleVariant; ioBinary:TStream);
+procedure WriteVariantArrayToBinary(const iVariant:OleVariant; ioBinary:TStream);
+
+function VariantArrayFromBinary(const iBinary:TStream; iType:word):OleVariant;
+function VariantBinaryFromBinary(const iBinary:TStream):OleVariant;
+
+procedure WriteVariantToBinary(const iVariant:OleVariant; ioBinary:TStream);
+function ReadVariantFromBinary(const iBinary:TStream):OleVariant;
+
+function VariantBinaryFromRawBinary(const iBinary:TStream):OleVariant;
+procedure VariantBinaryToRawBinary(const iVariant:OleVariant; ioBinary:TStream);
+function VariantBinaryToString(const iVariant:OleVariant):ansistring;
+
+function Stream_ReadUTF8StringWithLength(iStream:TStream; iMaxLength:integer=-1): UTF8string;
+procedure Stream_WriteUTF8StringWithLength(iStream:TStream; const iString: UTF8string);
+
+function Stream_ReadStringWithLength(iStream:TStream; iMaxLength:integer=-1): string;
+procedure Stream_WriteStringWithLength(iStream:TStream; const iString: string);
+
+{$IFDEF DEBUG_REMOBJECTS_VARIANTS}
+function TestVariant(iVariant:OleVariant):OleVariant;
+{$ENDIF DEBUG_REMOBJECTS_VARIANTS}
+
+
+type
+  PDecimal = ^TDecimal;
+  TDecimal = array[0..3] of Cardinal;
+
+function BCDToDecimal(const aBcd: TBcd): TDecimal;
+function DecimalToBCD(const aDecimal: TDecimal): TBcd;
+function DecimalToString(const aDecimal: TDecimal; aDot: Char): string;
+function StringToDecimal(const aString: string; aDot: Char): TDecimal;
+function DecimalToVariant(const aDecimal: TDecimal): Variant;
+function VariantToDecimal(const aVariant: Variant): TDecimal;
+function VariantToBCD(const aVariant: Variant): TBCD;
+function BCDToVariant(const aBCD: TBCD; const StoreAsDecimal: Boolean = False): Variant;
+// correctly convert DecimalVariant into string
+function DecimalVariantToString(const aVariant: Variant): string;
+{ ToDo: extend this to handle all common Variant types, and use it for
+        marshaling OwnerData, instead of string. }
+
+function VarByteArrayToDecimal(const aVariant: Variant; var aDecimal: TDecimal): Boolean;
+
+implementation
+
+uses {$IFDEF DEBUG_REMOBJECTS_VARIANTS}eDebugServer,{$ENDIF}
+     SysUtils, uRORes;
+
+procedure WriteAnsiStringToBinary(const ioBinary:TStream; const AValue: AnsiString);
+var
+  lSize:integer;
+begin
+  lSize := Length(AValue);
+  ioBinary.Write(lSize,sizeof(integer));
+  ioBinary.Write(pointer(aValue)^,lSize);
+end;
+
+
+procedure WriteVariantToBinary(const iVariant:OleVariant; ioBinary:TStream);
+var lType:integer;
+    lIntegerValue:integer;
+    {$IFNDEF DELPHI5}
+    lShortIntValue:shortint;
+    lSmallIntValue: smallint;
+    lInt64Value:Int64;
+    {$ENDIF DELPHI5}
+    lByteValue:byte;
+    lDoubleValue:double;
+    lSingleValue:single;
+    lCurrencyValue:currency;
+begin
+  lType := VarType(iVariant);
+
+  {$IFDEF DEBUG_REMOBJECTS_VARIANTS}
+  DebugServer.Write('BinaryFromVariant type=%d',[lType]);
+  {$ENDIF DEBUG_REMOBJECTS_VARIANTS}
+
+  { Array types }
+  if (lType and $2000) = $2000 then begin
+
+    case lType of
+      $2011:WriteVariantBinaryToBinary(iVariant,ioBinary); {8209; handle Array of Byte special. for now. }
+      else WriteVariantArrayToBinary(iVariant,ioBinary);
+    end;
+
+  end
+  { Plain Types }
+  else begin
+
+    case lType of
+      varEmpty,varNull,varError:begin { 0, 1, A }
+          ioBinary.Write(lType,sizeof(integer));
+        end;
+      {$IFNDEF DELPHI5}
+      varShortInt:begin { 2, 10, 12 }
+        lShortIntValue := iVariant;
+        ioBinary.Write(lType,sizeof(integer));
+        ioBinary.Write(lShortIntValue,sizeof(shortint));
+      end;
+      varSmallInt,varWord : begin
+        lSmallIntValue := iVariant;
+        ioBinary.Write(lType,sizeof(integer));
+        ioBinary.Write(lSmallIntValue,sizeof(lSmallIntValue));
+      end;
+      {$ENDIF DELPHI5}
+      {$IFNDEF DELPHI5}varLongWord,{$ENDIF DELPHI5}
+      varInteger:begin { 3, 13 }
+          lIntegerValue := iVariant;
+          ioBinary.Write(lType,sizeof(integer));
+          ioBinary.Write(lIntegerValue,sizeof(integer));
+        end;
+      varSingle:begin { 4 }
+          lSingleValue := iVariant;
+          ioBinary.Write(lType,sizeof(integer));
+          ioBinary.Write(lSingleValue,sizeof(single));
+        end;
+      varDouble, varDate:begin { 5, 7 }
+          lDoubleValue := iVariant;
+          ioBinary.Write(lType,sizeof(integer));
+          ioBinary.Write(lDoubleValue,sizeof(double));
+        end;
+      varCurrency:begin { 6 }
+          lCurrencyValue := iVariant;
+          ioBinary.Write(lType,sizeof(integer));
+          ioBinary.Write(lCurrencyValue,sizeof(currency));
+        end;
+      varDispatch:begin { 9 }
+          raise EROBinaryConversionException.CreateFmt(err_IDispatchMarshalingNotSupported,[VarType(iVariant)]);
+        end;
+      varBoolean:begin { B }
+          if iVariant then lByteValue := 1 else lByteValue := 0;
+          ioBinary.Write(lType,sizeof(integer));
+          ioBinary.Write(lByteValue,sizeof(byte));
+        end;
+      varByte:begin { 11 }
+          lByteValue := iVariant;
+          ioBinary.Write(lType,sizeof(integer));
+          ioBinary.Write(lByteValue,sizeof(byte));
+        end;
+      {$IFNDEF DELPHI5}
+      varInt64:begin { 14 }
+          lInt64Value := iVariant;
+          ioBinary.Write(lType,sizeof(integer));
+          ioBinary.Write(lInt64Value,sizeof(Int64));
+        end;
+      {$ENDIF DELPHI5}
+      varString:begin { 8, 100 }
+          ioBinary.Write(lType,sizeof(integer));
+          WriteAnsiStringToBinary(ioBinary, VarToAnsiStr(iVariant));
+        end;
+      varUString,  {258}
+      varOleStr:
+        begin
+          ioBinary.Write(lType,sizeof(integer));
+          WriteAnsiStringToBinary(ioBinary, UTF8Encode(VarToWideStr(iVariant)));
+        end;
+      else raise EROBinaryConversionException.CreateFmt(err_UnsupportedVariantType, [VarType(iVariant)]);
+    end;    { case }
+
+  end;
+end;
+
+function BinaryFromVariant(const iVariant:OleVariant):Binary;
+begin
+  result := Binary.Create();
+  WriteVariantToBinary(iVariant,result);
+  {$IFDEF DEBUG_REMOBJECTS_VARIANTS}
+  DebugServer.WriteHexDump('Written Binary',result);
+  {$ENDIF DEBUG_REMOBJECTS_VARIANTS}
+  result.Seek(0,soFromBeginning)
+end;
+
+function ReadAnsiStringFromBinary(const iBinary:TStream):ansistring;
+var lSize:integer;
+begin
+  iBinary.Read(lSize,sizeof(integer));
+  SetLength(Result,lSize);
+  iBinary.read(Result[1],lSize);
+end;
+
+function ReadVariantFromBinary(const iBinary:TStream):OleVariant;
+var lType:integer;
+    lIntegerValue:integer;
+    {$IFNDEF DELPHI5}
+    lShortInt:shortint;
+    lSmallIntValue: smallint;
+    lInt64Value:Int64;
+    {$ENDIF DELPHI5}
+    lByteValue:byte;
+    lDoubleValue:double;
+    lSingleValue:single;
+    lCurrencyValue:currency;
+begin
+  iBinary.Read(lType,sizeof(integer));
+
+  {$IFDEF DEBUG_REMOBJECTS_VARIANTS}
+  DebugServer.Write('VariantFromBinary type=%d',[lType]);
+  {$ENDIF DEBUG_REMOBJECTS_VARIANTS}
+
+  { Array types }
+  if (lType and $2000) = $2000 then begin
+
+    case lType of
+      $2011:result := VariantBinaryFromBinary(iBinary);
+      else result := VariantArrayFromBinary(iBinary,(lType and $fff));
+    end;
+
+  end
+  { Plain Types }
+  else begin
+
+    case lType of
+      varEmpty:result := Unassigned;
+      varNull:result := Null;
+      varError:result := EmptyParam;
+      {$IFNDEF DELPHI5}
+      varShortInt:begin
+          iBinary.Read(lShortInt,sizeof(shortint));
+          result := lShortInt;
+        end;
+      varSmallInt,varWord : begin
+        iBinary.Read(lSmallIntValue,sizeof(lSmallIntValue));
+        result := lSmallIntValue;
+      end;
+      {$ENDIF DELPHI5}
+      {$IFNDEF DELPHI5}
+      varLongWord,
+      {$ENDIF DELPHI5}
+      varInteger:begin
+          iBinary.Read(lIntegerValue,sizeof(integer));
+          result := lIntegerValue;
+        end;
+      varSingle:begin
+          iBinary.Read(lSingleValue,sizeof(single));
+          result := lSingleValue;
+        end;
+      varDouble:begin
+          iBinary.Read(lDoubleValue,sizeof(double));
+          result := lDoubleValue;
+        end;
+      varCurrency:begin
+          iBinary.Read(lCurrencyValue,sizeof(currency));
+          result := lcurrencyValue;
+        end;
+      varDate:begin
+          iBinary.Read(lDoubleValue,sizeof(double));
+          result := TDateTime(lDoubleValue);
+        end;
+      varBoolean:begin
+          iBinary.Read(lByteValue,sizeof(byte));
+          result := (lByteValue <> 0);
+        end;
+      varByte:begin
+          iBinary.Read(lByteValue,sizeof(byte));
+          result := lByteValue;
+        end;
+      {$IFNDEF DELPHI5}
+      varInt64:begin
+          iBinary.Read(lInt64Value,sizeof(Int64));
+          result := lInt64Value;
+        end;
+      {$ENDIF DELPHI5}
+      varString:Result := ReadAnsiStringFromBinary(iBinary);
+      varUString,
+      varOleStr:Result := UTF8toString(ReadAnsiStringFromBinary(iBinary));
+      else raise EROBinaryConversionException.CreateFmt(err_UnsupportedVariantType, [lType]);
+    end;    { case }
+  end;
+end;
+
+function VariantFromBinary(const iBinary:TStream):OleVariant;
+begin
+  if iBinary.Size < 4 then raise EROBinaryConversionException.Create(err_InvalidBinaryFormat);
+
+  {$IFDEF DEBUG_REMOBJECTS_VARIANTS}
+  DebugServer.WriteHexDump('Read Binary',iBInary);
+  {$ENDIF DEBUG_REMOBJECTS_VARIANTS}
+
+  iBinary.Seek(0,soFromBeginning);
+  result := ReadVariantFromBinary(iBinary);
+end;
+
+procedure CheckVariant(const iVariant:OleVariant);
+begin
+  // Introduced by AleF to address part of this check mess
+  if not VarIsArray(iVariant)
+    then raise EROBinaryConversionException.CreateFmt(err_VariantIsNotArray,[VarType(iVariant)]);
+
+  if VarArrayDimCount(iVariant) <> 1
+    then raise EROBinaryConversionException.CreateFmt(err_InvalidVarArrayDimCount, [VarArrayDimCount(iVariant)]);
+end;
+
+procedure WriteVariantBinaryToBinary(const iVariant:OleVariant; ioBinary:TStream);
+var //l:longword;
+    lType,lSize:integer;
+    p:pointer;
+begin
+  CheckVariant(iVariant);
+
+  lSize := VarArrayHighBound(iVariant,1)-VarArrayLowBound(iVariant,1)+1;
+
+  p := VarArrayLock(iVariant);
+  try
+    lType := VarType(iVariant);
+    {$IFDEF DEBUG_REMOBJECTS_VARIANTS}
+    DebugServer.Write('BinaryFromVariantBinary type=%d',[lType]);
+    {$ENDIF DEBUG_REMOBJECTS_VARIANTS}
+    ioBinary.Write(lType,sizeof(integer));
+    ioBinary.Write(lSize,sizeof(integer));
+    ioBinary.Write(p^,lSize);
+  finally
+    VarArrayUnlock(iVariant);
+  end;
+
+end;
+
+procedure WriteVariantArrayToBinary(const iVariant:OleVariant; ioBinary:TStream);
+var lLowBound,lHighBound:integer;
+    i:Integer;
+    lType:integer;
+begin
+  CheckVariant(iVariant);
+
+  lType := VarType(iVariant);
+  lLowBound := VarArrayLowBound(iVariant,1);
+  lHighBound := VarArrayHighBound(iVariant,1);
+  //l := VarArrayHighBound(iVariant,1)-VarArrayLowBound(iVariant,1)+1;
+
+  {$IFDEF DEBUG_REMOBJECTS_VARIANTS}
+  DebugServer.Write('WriteVariantArrayToBinary type=%d, bounds=%d..%d',[lType,lLowBound,lHighBound]);
+  {$ENDIF DEBUG_REMOBJECTS_VARIANTS}
+
+  ioBinary.Write(lType,sizeof(integer));
+  ioBinary.Write(lLowBound,sizeof(integer));
+  ioBinary.Write(lHighBound,sizeof(integer));
+
+  for i := lLowBound to lHighBound do begin
+    WriteVariantToBinary(iVariant[i],ioBinary);
+  end;
+
+end;
+
+function VariantBinaryFromBinary(const iBinary:TStream):OleVariant;
+var p:pointer;
+    lSize:integer;
+begin
+  iBinary.Read(lSize,sizeof(integer));
+  result := VarArrayCreate([0,lSize-1],varByte);
+  p := VarArrayLock(result);
+  try
+    iBinary.Read(p^,lSize);
+  finally
+    VarArrayUnlock(result);
+  end;
+end;
+
+
+
+function VariantArrayFromBinary(const iBinary:TStream; iType:word):OleVariant;
+var lLowBound,lHighBound:integer;
+    i:Integer;
+begin
+  iType := (iType and $fff);
+
+  iBinary.Read(lLowBound,sizeof(integer));
+  iBinary.Read(lHighBound,sizeof(integer));
+
+  result := VarArrayCreate([lLowBound,lHighBound],iType);
+
+  for i := lLowBound to lHighBound do begin
+    result[i] := ReadVariantFromBinary(iBinary);
+  end;
+
+end;
+
+{$IFDEF DEBUG_REMOBJECTS_VARIANTS}
+function TestVariant(iVariant:OleVariant):OleVariant;
+var
+  lBinary:Binary;
+begin
+  DebugServer.EnterMethod('Original varType '+IntToStr(VarType(iVariant)));
+  lBinary := BinaryFromVariant(iVariant);
+  try
+    result := VariantFromBinary(lBinary);
+    DebugServer.ExitMethod('Result  varType '+IntToStr(VarType(result)));
+  finally
+    FreeAndNil(lBinary);
+  end;
+end;
+{$ENDIF DEBUG_REMOBJECTS_VARIANTS}
+
+
+{-----------------------------------------------------------------------------}
+{ Conversion fromto Binary "Array of Bytes" Variants to other data types      }
+{ containing *just* the binary data, no additional type info.                 }
+{-----------------------------------------------------------------------------}
+
+{ Description:
+    Will read the *remainder* of the iBinary stream into a new
+    binary variant (aka array of bytes). }
+
+function VariantBinaryFromRawBinary(const iBinary:TStream):OleVariant;
+var p:pointer;
+    lSize:integer;
+begin
+  lSize := iBinary.Size-iBinary.Position;
+
+  result := VarArrayCreate([0,lSize-1],varByte);
+  p := VarArrayLock(result);
+  try
+    iBinary.Read(p^,lSize);
+  finally
+    VarArrayUnlock(result);
+  end;
+end;
+
+{ Description:
+    Will write the data from the binary variant (aka array of bytes) to the
+    current position of the iBinary stream. }
+procedure VariantBinaryToRawBinary(const iVariant:OleVariant; ioBinary:TStream);
+var
+  lSize:integer;
+  p:pointer;
+begin
+  if (VarType(iVariant)=varEmpty) then Exit;
+
+  CheckVariant(iVariant);
+
+  lSize := VarArrayHighBound(iVariant,1)-VarArrayLowBound(iVariant,1)+1;
+
+  p := VarArrayLock(iVariant);
+  try
+    ioBinary.Write(p^,lSize);
+  finally
+    VarArrayUnlock(iVariant);
+  end;
+
+end;
+
+{ Description:
+    Will return the data from the binary variant (aka array of bytes) as a
+    binary AnsiString }
+function VariantBinaryToString(const iVariant:OleVariant):ansistring;
+var
+  lSize:integer;
+  p:pointer;
+begin
+  if (VarType(iVariant)=varEmpty) then Exit;
+  if not VarIsArray(iVariant) then begin
+    Result:= VarToAnsiStr(iVariant);
+    Exit;
+  end;
+
+  CheckVariant(iVariant);
+
+  lSize := VarArrayHighBound(iVariant,1)-VarArrayLowBound(iVariant,1)+1;
+
+  p := VarArrayLock(iVariant);
+  try
+    SetLength(result,lSize);
+    if lSize > 0 then
+      Move(p^,result[1],lSize);
+  finally
+    VarArrayUnlock(iVariant);
+  end;
+
+end;
+
+function Stream_ReadUTF8StringWithLength(iStream:TStream; iMaxLength:integer=-1): UTF8string;
+var lLength:integer;
+    lBytesRead:Integer;
+begin
+  lBytesRead := iStream.Read(lLength, sizeof(lLength));
+  if lBytesRead <> sizeof(lLength) then RaiseError(err_UnexpectedEndOfStream,[]);
+
+  if (iMaxLength > -1) and (lLength > iMaxLength) then
+    RaiseError(err_InvalidStringLength,[lLength]);
+
+  SetLength(Result, lLength);
+  if (lLength > 0) then iStream.Read(pointer(Result)^, lLength);
+end;
+
+procedure Stream_WriteUTF8StringWithLength(iStream:TStream; const iString: UTF8string);
+var
+  lLength:integer;
+begin
+  lLength := Length(iString);
+  iStream.Write(lLength, SizeOf(lLength));
+  if (lLength > 0) then iStream.Write(pointer(iString)^, lLength);
+end;
+
+function Stream_ReadStringWithLength(iStream:TStream; iMaxLength:integer=-1): string;
+begin
+  Result:= UTF8ToString(Stream_ReadUTF8StringWithLength(iStream,iMaxLength));
+end;
+
+procedure Stream_WriteStringWithLength(iStream:TStream; const iString: string);
+begin
+  Stream_WriteUTF8StringWithLength(iStream,UTF8Encode(iString));
+end;
+
+var
+  numbers: array[0..9] of char = '0123456789';
+
+function DecimalToString(const aDecimal: TDecimal; aDot: Char): string;
+var
+  modres: Integer;
+  d: Int64;
+  pos: Integer;
+  scale: Integer;
+  sign: Boolean;
+  aDec: TDecimal;
+  aResult: array[0..31] of Char;
+begin
+  aDec := aDecimal;
+  sign := (aDecimal[3] and $80000000) <> 0;
+  scale := (aDecimal[3] and $FF0000) shr 16;
+  pos := 31;
+  while (aDec[0] <> 0) or (aDec[1] <> 0) or (aDec[2] <> 0) or (31 - pos < scale) do begin
+    modres := 0;
+    d := Int64(Int64(ModRes) shl 32) or aDec[2];
+    ModRes := d mod 10;
+    aDec[2] := d div 10;
+    d := Int64(Int64(ModRes) shl 32) or aDec[1];
+    ModRes := d mod 10;
+    aDec[1] := d div 10;
+    d := Int64(Int64(ModRes) shl 32) or aDec[0];
+    ModRes := d mod 10;
+    aDec[0] := d div 10;
+
+    aResult[pos] := numbers[Modres];
+    Dec(pos);
+    if 31 - pos = scale then begin
+      aresult[pos] := aDot;
+      dec(pos);
+      if (aDec[0] = 0) and (aDec[1] = 0) and (aDec[2] = 0) then begin
+        aresult[pos] := '0';
+        dec(pos);
+      end;
+    end;
+  end;
+  if pos = 31 then begin result := '0'; exit; end;
+  if sign then begin
+    aResult[pos] := '-';
+    dec(pos);
+  end;
+  SetString(Result, pchar(@aResult[pos+1]), 31-Pos);
+end;
+
+resourcestring
+  SInvalidDecimal = 'Cannot convert empty string to decimal value';
+
+function StringToDecimal(const aString: string; aDot: Char): TDecimal;
+var
+  scalepos, pos, i: Integer;
+  mulres: Integer;
+  d: Int64;
+  aRes: TDecimal;
+begin
+  if Astring = '' then EConvertError.CreateRes(@SInvalidDecimal);
+  Fillchar(aRes, sizeof(aRes), 0);
+  pos := 0;
+  scalepos := -1;
+  for i := 1 to Length(aString) do begin
+    mulres := 0;
+    case aString[i] of
+      '0': ; // already set
+      '1': mulres := 1;
+      '2': mulres := 2;
+      '3': mulres := 3;
+      '4': mulres := 4;
+      '5': mulres := 5;
+      '6': mulres := 6;
+      '7': mulres := 7;
+      '8': mulres := 8;
+      '9': mulres := 9;
+      else begin
+        if aString[i] = '-' then begin
+          aRes[3] := aRes[3] or $80000000;
+          continue;
+        end else if aString[i] = aDot then begin
+          if scalepos = -1 then
+          scalepos := pos;
+          continue;
+        end else
+          continue; // ignore invalid chars for now
+      end;
+    end;
+    d := Int64(aRes[0]) * 10 + mulres;
+    mulres := d shr 32;
+    aRes[0] := d;
+    d := Int64(aRes[1]) * 10 + mulres;
+    mulres := d shr 32;
+    aRes[1] := d;
+    aRes[2] := Int64(aRes[2]) * 10 + mulres;
+    Inc(pos);
+  end;
+  if scalepos <> -1 then begin
+    pos:= pos - scalepos;
+    aRes[3] := aRes[3] or Cardinal(Pos shl 16);
+  end;
+  Result := aRes;
+end;
+
+
+function BCDToDecimal(const aBcd: TBcd): TDecimal;
+begin
+  Result := StringToDecimal(BcdToStr(aBcd), DecimalSeparator);
+end;
+
+function DecimalToBCD(const aDecimal: TDecimal): TBcd;
+begin
+  Result := StrToBcd(DecimalToString(aDecimal, DecimalSeparator));
+end;
+
+function DecimalToVarByteArray(const aDecimal: TDecimal): Variant;
+var
+  p: Pointer;
+begin
+  Result := VarArrayCreate([0,SizeOf(TDecimal)-1],varByte);
+  p := VarArrayLock(Result);
+  try
+    move(PDecimal(@aDecimal)^, p^ ,SizeOf(TDecimal));
+  finally
+    VarArrayUnlock(Result);
+  end;
+end;
+
+function VarByteArrayToDecimal(const aVariant: Variant; var aDecimal: TDecimal): Boolean;
+var
+  p: Pointer;
+begin
+  Result:= False;
+  if (VarType(aVariant) = varByte or varArray) and
+     (VarArrayDimCount(aVariant) = 1) and
+     (VarArrayHighBound(aVariant,1)-VarArrayLowBound(aVariant,1)+1 = SizeOf(TDecimal)) then begin
+    p := VarArrayLock(aVariant);
+    try
+      move(p^, PDecimal(@aDecimal)^, SizeOf(TDecimal));
+    finally
+      VarArrayUnlock(aVariant);
+    end;
+    Result:=True;
+  end;
+end;
+
+function DecimalToVariant(const aDecimal: TDecimal): Variant;
+begin
+  Result := DecimalToVarByteArray(aDecimal);
+end;
+
+function VariantToDecimal(const aVariant: Variant): TDecimal;
+var
+  s: string;
+begin
+  if VarIsNull(aVariant) then
+    FillChar(PDecimal(@result)^,SizeOf(Result),0)
+  else if not VarByteArrayToDecimal(aVariant,Result) then begin
+    if VarIsFMTBcd(aVariant) then
+      s:=BcdToStr(VarToBcd(aVariant))
+    else
+      s:=VarToStr(aVariant);
+    Result:=StringToDecimal(s, DecimalSeparator);
+  end;
+end;
+
+function VariantToBCD(const aVariant: Variant): TBCD;
+var
+  aDecimal: TDecimal;
+begin
+  if VarIsNull(aVariant) then
+    Result := NullBcd
+  else if VarByteArrayToDecimal(aVariant,aDecimal) then
+    Result:=DecimalToBCD(aDecimal)
+  else begin
+    if VarIsFMTBcd(aVariant) then
+      Result := VarToBcd(aVariant)
+    else
+      Result:= StrToBcd(VarToStr(aVariant));
+  end;
+end;
+
+function BCDToVariant(const aBCD: TBCD; const StoreAsDecimal: Boolean): Variant;
+begin
+  if StoreAsDecimal then
+    Result := DecimalToVarByteArray(BCDToDecimal(aBCD))
+  else
+    Result := VarFMTBcdCreate(aBCD);
+end;
+
+function DecimalVariantToString(const aVariant: Variant): string;
+var
+  lDecimal: TDecimal;
+begin
+  if VarByteArrayToDecimal(aVariant,lDecimal) then
+    Result := DecimalToString(lDecimal,DecimalSeparator)
+  else
+    Result := VarToStr(aVariant);
+end;
+
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROBroadcastChannel.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROBroadcastChannel.pas
new file mode 100644
index 0000000..1b144b1
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROBroadcastChannel.pas	
@@ -0,0 +1,240 @@
+unit uROBroadcastChannel;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Provided by Nico Schoemaker (nico.schoemaker@teamro.remobjects.com)        }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses Classes, {ContNrs,} SysUtils,
+  uROIndyUDPChannel, uROClasses;
+
+type
+
+  IROBroadcastNotification = interface
+    ['{5C18A885-76D2-40D2-9529-CC81B00E7C99}']
+    procedure ResponseReceived(ServerIP, ResponseUID: string);
+  end;
+
+  TROBCResponseThread = class(TROUDPResponseThread)
+  private
+  protected
+    procedure Execute; override;
+  public
+  end;
+
+  TROResponseReceivedEvent = procedure(ServerIP, ResponseUID: string) of object;
+
+  TROBroadcastChannel = class(TROIndyUDPChannel)
+  private
+    FNotifyList: TROInterfaceRegistry;
+    FGetServerGUID: string;
+    FOnBroadcastResponseReceived: TROResponseReceivedEvent;
+    procedure SetOnBroadcastResponseReceived(const Value: TROResponseReceivedEvent);
+
+  protected
+    procedure NotifyListners(aServerIP, aResponseUID: string);
+    procedure Loaded; override;
+    procedure SendReq(aRequest: TStream; UID: string; AddToStorage: Boolean = true); override;
+    function GetResponseThreadClass: TROUDPResponseThreadClass; override;
+    procedure DoEndOfThread(Sender: TROUDPResponseThread); override;
+  public
+    procedure RegisterResponseListner(aListner: IROBroadcastNotification);
+    procedure UnRegisterResponseListner(aListner: IROBroadcastNotification);
+    function ReceiveResp(aTimeOut: Integer): Boolean; override;
+    constructor Create(AOwner: TComponent); override;
+    destructor Destroy; override;
+  published
+    property OnBroadcastResponseReceived: TROResponseReceivedEvent read FOnBroadcastResponseReceived write SetOnBroadcastResponseReceived;
+  end;
+
+implementation
+
+uses uROClient, uROStreamUtils, uROAsyncResponseStorage, idGlobal;
+
+constructor TROBroadcastChannel.Create(AOwner: TComponent);
+begin
+  inherited;
+  FGetServerGUID := '';
+  FNotifyList := TROInterfaceRegistry.Create(IROBroadcastNotification);
+end;
+
+destructor TROBroadcastChannel.Destroy;
+begin
+  FNotifyList.Free;
+  inherited;
+end;
+
+procedure TROBroadcastChannel.SendReq(aRequest: TStream; UID: string; AddToStorage: Boolean = true);
+var
+  lReq: Ansistring;
+begin
+  lReq := Strm_StreamToStr(aRequest);
+  // Sends the Message identifier in front of the actual message
+  IndyClient.Broadcast(UID + {$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(lReq), IndyClient.Port);
+  if AddToStorage then
+    AddRequestToStorage(aRequest, UID);
+end;
+
+procedure TROBroadcastChannel.Loaded;
+begin
+  inherited;
+  Self.IndyClient.BroadcastEnabled := True;
+end;
+
+function TROBroadcastChannel.GetResponseThreadClass: TROUDPResponseThreadClass;
+begin
+  result := TROBCResponseThread;
+end;
+
+procedure TROBroadcastChannel.RegisterResponseListner(aListner: IROBroadcastNotification);
+begin
+  if not (Assigned(aListner)) then
+    Exit;
+  FNotifyList.Register(aListner);
+end;
+
+procedure TROBroadcastChannel.UnRegisterResponseListner(aListner: IROBroadcastNotification);
+begin
+  if not (Assigned(aListner)) then
+    Exit;
+  FNotifyList.Unregister(aListner);
+end;
+
+procedure TROBroadcastChannel.NotifyListners(aServerIP, aResponseUID: string);
+var
+  i: Integer;
+begin
+  for i := 0 to FNotifyList.Count - 1 do
+    IROBroadcastNotification(FNotifyList[i]).ResponseReceived(aServerIP, aResponseUID);
+end;
+
+procedure TROBroadcastChannel.DoEndOfThread(Sender: TROUDPResponseThread);
+var
+  lUID: string;
+  lResItm: TROResponseItem;
+begin
+  try
+    lUID := Sender.RequestUID;
+    if (Sender.ReceivedResponse) and
+      ((Assigned(FOnBroadcastResponseReceived)) or (FNotifyList.Count > 0)) then begin
+      while CheckStatus(lUID) do begin
+        // Atention, the event handler is supposed to process the response
+        // Processing the response will remove the response automaticly
+        lResItm := ResponseStorage.GetRespByUID(lUID);
+        if Assigned(lResItm) then       {// to be sure} begin
+          NotifyListners(lResItm.IP, lResItm.UID);
+          if Assigned(FOnBroadcastResponseReceived) then
+            FOnBroadcastResponseReceived(lResItm.IP, lResItm.UID);
+          // Remove the response in case the user didn't process it.
+          // If it is already gone , no harm is done
+          ResponseStorage.RemoveResp(lResItm);
+        end;
+      end;
+    end;
+
+  finally
+    RequestStorage.RemoveRespByUID(lUID);
+    inherited;
+  end;
+end;
+
+procedure TROBroadcastChannel.SetOnBroadcastResponseReceived(const Value: TROResponseReceivedEvent);
+begin
+  FOnBroadcastResponseReceived := Value;
+end;
+
+{-----------------------------------------------------------------------------
+  Procedure: TROBroadcastChannel.ReceiveResp
+  Author:    Nico
+  Date:      23-apr-2003
+  Arguments: aTimeOut: Integer
+  Result:    Boolean
+  Keeps reading from the socket until a read time out occurs
+-----------------------------------------------------------------------------}
+
+function TROBroadcastChannel.ReceiveResp(aTimeOut: Integer): Boolean;
+var
+  lBuf: Ansistring;
+  lID: string;
+  lResItm: TROResponseItem;
+  lResp: TROBinaryMemoryStream;
+  lIP: string;
+{$IFDEF RemObjects_INDY10}
+    lPort: TIDPort;
+    LBuffer : TIdBytes;
+    i: integer;
+{$ELSE}
+    lPort: Integer;
+{$ENDIF}
+begin
+  {$IFDEF RemObjects_INDY10}
+  SetLength(LBuffer, IndyClient.BufferSize);
+  {$ENDIF}
+  FCriticalSection.Enter;
+  try
+    result := False;
+    lPort := 0;
+    lIP := '';
+    repeat
+      {$IFDEF RemObjects_INDY10}
+      SetLength(LBuffer, IndyClient.BufferSize);
+      i:=IndyClient.ReceiveBuffer(LBuffer, lIP,lPort,aTimeOut);
+      SetLength(lBuf, i);
+      Move(lBuffer[0],pointer(lbuf)^,i);
+      {$ELSE}
+      lBuf := IndyClient.ReceiveString(lIP,lPort,aTimeOut);
+      {$ENDIF}
+      if lBuf <> '' then begin
+        lID := {$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(StripID(lBuf));
+        lResp := TROBinaryMemoryStream.Create(lBuf);
+        lResItm := TROResponseItem.Create(lResp, lID);
+        lResItm.IP := lIP;
+        lResItm.Port := lPort;
+        ResponseStorage.AddResp(lResItm);
+        result := True;
+      end;
+    until lBuf = '';
+  finally
+    FCriticalSection.Leave;
+  end;
+end;
+
+//------------------------------------------------------------------------------
+                               { TROBCResponseThread }
+//------------------------------------------------------------------------------
+
+procedure TROBCResponseThread.Execute;
+begin
+  {$IFDEF RemObjects_SetThreadName}
+  SetName(Name);
+  {$ENDIF}
+
+  Channel.ReceiveResp(Channel.AsyncTimeOut);
+  FRespReceived := Channel.CheckStatus(RequestUID);
+
+  if not FRespReceived then
+    Synchronize(DoTimeOut)
+  else
+    Synchronize(DoEnd);
+end;
+
+initialization
+  RegisterTransportChannelClass(TROBroadcastChannel);
+
+finalization
+  UnRegisterTransportChannelClass(TROBroadcastChannel);
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROBroadcastServer.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROBroadcastServer.pas
new file mode 100644
index 0000000..3c4c270
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROBroadcastServer.pas	
@@ -0,0 +1,165 @@
+unit uROBroadcastServer;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Provided by Nico Schoemaker (nico.schoemaker@teamro.remobjects.com)        }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes, Sysutils,
+  IdSocketHandle, IdGlobal,{$IFDEF RemObjects_INDY10C}IdUDPServer,{$ENDIF}
+  uROIndyUDPServer;
+
+type
+  TROBroadcastTransport = class(TROIndyUDPTransport)
+  end;
+
+  TROBroadcastServer = class(TROIndyUDPServer)
+  private
+    FOnRORequest: TNotifyEvent;
+    FUIDCnt: Integer;
+    FLastMessage: Ansistring;
+
+    procedure SetOnRORequest(const Value: TNotifyEvent);
+
+  protected
+    {$IFDEF RemObjects_INDY10C}
+    procedure InternalUDPRead(Sender: TIdUDPListenerThread; AData: TIdBytes; ABinding: TIdSocketHandle); override;
+    {$ELSE}
+    {$IFDEF RemObjects_INDY10}
+    procedure InternalUDPRead(Sender: TObject; AData: TIdBytes; ABinding: TIdSocketHandle); override;
+    {$ELSE}
+    procedure InternalUDPRead(Sender: TObject; AData: TStream; ABinding: TIdSocketHandle); override;
+    {$ENDIF}
+    {$ENDIF}
+    function GetTransportClass: TROIndyUDPTransportClass; override;
+    procedure Loaded; override;
+    
+  public
+    constructor Create(AOwner: TComponent); override;
+  published
+    property OnRORequest: TNotifyEvent read FOnRORequest write SetOnRORequest;
+  end;
+
+implementation
+
+{ TROBroadcastServer }
+
+uses
+  uROServer, uROClasses, uROClientIntf, uROServerIntf;
+
+constructor TROBroadcastServer.Create(AOwner: TComponent);
+begin
+  inherited;
+  // In case implementation of NewStrippedGuidAsString changes
+  FUIDCnt := Length(NewGuidAsString);
+  FLastMessage := '';
+end;
+
+{$IFDEF RemObjects_INDY10C}
+procedure TROBroadcastServer.InternalUDPRead(Sender: TIdUDPListenerThread; AData: TIdBytes; ABinding: TIdSocketHandle); 
+{$ELSE}
+{$IFDEF RemObjects_INDY10}
+procedure TROBroadcastServer.InternalUDPRead(Sender: TObject; AData: TIdBytes; ABinding: TIdSocketHandle);
+{$ELSE}
+procedure TROBroadcastServer.InternalUDPRead(Sender: TObject; AData: TStream; ABinding: TIdSocketHandle);
+{$ENDIF}
+{$ENDIF}
+var
+  lResp: TROBinaryMemoryStream;
+  lReq: TMemoryStream;
+  lRespS: AnsiString;
+  lTransport: IROTCPTransport;
+  lMesgID: AnsiString;
+  lRespOpt: TROResponseOptions;
+  lStream: TStream;
+{$IFDEF RemObjects_INDY10}
+    b : TIdBytes;
+{$ENDIF}
+begin
+  {$IFDEF RemObjects_INDY10}
+  lStream := TMemoryStream.Create();
+  WriteTIdBytesToStream(lStream, AData);
+  lStream.Position := 0;
+  try
+  {$ELSE}
+  lStream := AData;
+  {$ENDIF}
+
+  lMesgID := GetMessageID(lStream);
+
+  if FLastMessage <> lMesgID then
+  begin
+    FLastMessage := lMesgID;
+    if Assigned(FOnRORequest) then
+      FOnRORequest(Self);
+
+    lResp := TROBinaryMemoryStream.Create('');
+    lReq := nil;
+    try
+      lReq := FormatDispStream(lStream);
+      if Assigned(lReq) then  // lReq becomes nil if not a valid (RO) AData Stream
+      begin
+        lTransport := GetTransportClass.Create(Self,ABinding);
+        DispatchMessage(lTransport, lReq, lResp,lRespOpt);
+        if not(roNoResponse in lRespOpt) then
+        begin
+          lRespS := lMesgID+lResp.ToString;
+          {$IFDEF RemObjects_INDY10}
+          SetLength(b,Length(lRespS));
+          Move(pointer(lRespS)^, b[0], Length(lRespS));
+          ABinding.SendTo(ABinding.PeerIP, ABinding.PeerPort, b);
+          {$ELSE}
+          ABinding.SendTo(ABinding.PeerIP, ABinding.PeerPort, lRespS[1], Length(lRespS));
+          {$ENDIF}
+        end;
+      end;
+    finally
+      if Assigned(lReq) then
+        lReq.Free;
+      lResp.Free;
+    end;
+  end;
+  {$IFDEF RemObjects_INDY10}
+  finally
+    FreeAndNil(lStream);
+  end;
+  {$ENDIF}
+end;
+
+function TROBroadcastServer.GetTransportClass: TROIndyUDPTransportClass;
+begin
+  result := TROBroadcastTransport
+end;
+
+procedure TROBroadcastServer.SetOnRORequest(const Value: TNotifyEvent);
+begin
+  FOnRORequest := Value;
+end;
+
+procedure TROBroadcastServer.Loaded;
+begin
+  inherited;
+  IndyUDPServer.BroadcastEnabled := True;
+end;
+
+initialization
+  RegisterServerClass(TROBroadcastServer);
+finalization
+  UnregisterServerClass(TROBroadcastServer);
+
+end.
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROCOMInit.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROCOMInit.pas
new file mode 100644
index 0000000..12ac239
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROCOMInit.pas	
@@ -0,0 +1,31 @@
+unit uROCOMInit;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+implementation
+
+{$IFDEF MSWINDOWS}
+uses ActiveX;
+
+initialization
+  CoInitializeEx(nil,COINIT_MULTITHREADED);
+
+finalization
+  CoUninitialize;
+{$ENDIF}
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROClassFactories.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROClassFactories.pas
new file mode 100644
index 0000000..9d94068
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROClassFactories.pas	
@@ -0,0 +1,514 @@
+unit uROClassFactories;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses 
+     SysUtils, SyncObjs, Contnrs, Classes,
+     uROServer, uROThread, uROClasses, uROTypes,uROServerIntf;
+
+type
+  { TROSingletonClassFactory }
+  TROSingletonClassFactory = class(TROClassFactory)
+  private
+    fInstance : IInterface;
+
+  protected
+    procedure CreateInstance(const aClientID : TGUID; out anInstance : IInterface); override;
+    procedure ReleaseInstance(const aClientID: TGUID; var anInstance : IInterface); override;
+  public
+  end;
+
+  { TROSynchronizedSingletonClassFactory }
+  TROSynchronizedSingletonClassFactory = class(TROSingletonClassFactory)
+  private
+    fCriticalSection:TCriticalSection;
+  protected
+    procedure CreateInstance(const aClientID : TGUID; out anInstance : IInterface); override;
+    procedure ReleaseInstance(const aClientID: TGUID; var anInstance : IInterface); override;
+  public
+    constructor Create(const anInterfaceName : string;
+                       aCreatorFunc : TRORemotableCreatorFunc;
+                       anInvokerClass : TROInvokerClass);
+    destructor Destroy; override;
+  end;
+
+  TROPoolInterfaceEntry = record
+    fInterface:IInterface;
+    fInUse:Boolean;
+  end;
+
+  EROPoolNoFreeObjects = class(EROException);
+
+  TROPoolBehavior = (pbFail, pbWait, pbCreateAdditional);
+
+  { TROPooledClassFactory }
+  TROPooledClassFactory = class(TROClassFactory,IROPooledClassFactory)
+  private
+    fInstances : array of TROPoolInterfaceEntry;
+    fCriticalSection:TCriticalSection;
+    fPoolBehavior:TROPoolBehavior;
+    fPoolSize:Integer;
+    //,fLastInc : integer;
+
+  protected
+    procedure CreateInstance(const aClientID : TGUID; out anInstance : IInterface); override;
+    procedure ReleaseInstance(const aClientID: TGUID; var anInstance : IInterface); override;
+
+  public
+    constructor Create(const anInterfaceName : string;
+                       aCreatorFunc : TRORemotableCreatorFunc;
+                       anInvokerClass : TROInvokerClass;
+                       aPoolSize : Integer;
+                       aPoolBehavior:TROPoolBehavior=pbCreateAdditional;
+                       aPreInitializePool:Boolean=false);
+    destructor Destroy; override;
+    procedure ClearPool();
+  end;
+
+  { TROPerClientClassFactory }
+  TClientInstance = class
+    ServerObject:IInterface;
+    ClientID:TGUID;
+    LastAccess:TDateTime;
+  end;
+
+  TROPerClientClassFactory = class;
+
+  { TROPerClientClassFactory_TimeoutThread }
+  TROPerClientClassFactory_TimeoutThread = class(TROThread)
+  private
+    fOwner:TROPerClientClassFactory;
+    fTimeoutSeconds:Integer;
+    fWakeUp:TROEvent;
+  protected
+    procedure Execute; override;
+  public
+    constructor Create(iOwner:TROPerClientClassFactory; iTimeoutSeconds:integer);
+    destructor Destroy; override;
+  end;
+
+  IROPerClientClassFactory = interface
+    ['{43D43745-A9F7-4194-825B-0E238902C153}']
+    procedure TimeoutSession(const aClientId: TGuid);
+    procedure TimeoutSessions();
+  end;
+  { TROPerClientClassFactory }
+  TROPerClientClassFactory = class(TROClassFactory, IROPerClientClassFactory)
+  private
+    fInstances:TObjectList;
+    fCriticalSection:TCriticalSection;
+    fTimeoutThread:TROPerClientClassFactory_TimeoutThread;
+    fTimeoutSeconds:Integer;
+
+  protected
+    procedure CreateInstance(const aClientID : TGUID; out anInstance : IInterface); override;
+    procedure ReleaseInstance(const aClientID: TGUID; var anInstance : IInterface); override;
+
+  public
+    constructor Create(const anInterfaceName : string;
+                       aCreatorFunc : TRORemotableCreatorFunc;
+                       anInvokerClass : TROInvokerClass;
+                       aTimeoutSeconds:cardinal);
+    destructor Destroy; override;
+
+    procedure TimeoutSession(const aClientId: TGuid);
+    class procedure TimeoutAllSessions(const aClientId: TGuid);
+    procedure TimeoutSessions();
+  end;
+
+implementation
+
+uses {$IFDEF DELPHI5}ActiveX, Windows, {$ENDIF} // for IsEqualGuid and Sleep
+     {$IFDEF DEBUG_REMOBJECTS_CLASSFACTORIES}eDebugServer, {$ENDIF}
+      uROClient, uRORes;
+
+const POOL_SLEEP_MS_WHILE_WAITING = 500; { sleep 0.5 seconds between trys while waiting for a pooled
+                                           instance to become free } 
+
+{ TROSingletonClassFactory }
+
+procedure TROSingletonClassFactory.CreateInstance(const aClientID: TGUID; out anInstance: IInterface);
+begin
+  if (fInstance=NIL)
+    then inherited CreateInstance(aClientID, fInstance);
+
+  anInstance := fInstance;
+end;
+
+procedure TROSingletonClassFactory.ReleaseInstance(const aClientID: TGUID; var anInstance: IInterface);
+begin
+  //DeactivateInstance(aClientID,anInstance);
+  { Do nothing else, since we want to keep instance alive }
+end;
+
+{ TROPooledClassFactory }
+
+constructor TROPooledClassFactory.Create(const anInterfaceName: string;
+  aCreatorFunc: TRORemotableCreatorFunc; anInvokerClass: TROInvokerClass;
+  aPoolSize : Integer; aPoolBehavior:TROPoolBehavior=pbCreateAdditional; aPreInitializePool:Boolean=false);
+var i : integer;
+begin
+  inherited Create(anInterfaceName, aCreatorFunc, anInvokerClass);
+
+  fCriticalSection := TCriticalSection.Create();
+
+  SetLength(fInstances, aPoolSize);
+  fPoolSize := aPoolSize;
+  fPoolBehavior := aPoolBehavior;
+
+  if fPoolSize < 1 then RaiseError(err_PoolSizeMustBe1orHigher,[]);
+    
+  //fLastInc := -1;
+  if aPreInitializePool then
+    for i := 0 to (fPoolSize-1) do inherited CreateInstance(EmptyGUID, fInstances[i].fInterface);
+end;
+
+destructor TROPooledClassFactory.Destroy;
+var i : integer;
+begin
+  for i := Low(fInstances) to High(fInstances) do fInstances[i].fInterface := nil;
+  FreeAndNil(fCriticalSection);
+  inherited;
+end;
+
+procedure TROPooledClassFactory.CreateInstance(const aClientID : TGUID; out anInstance : IInterface);
+var i:Integer;
+    //, refcnt : integer;
+begin
+  anInstance := nil;
+
+  repeat
+
+    fCriticalSection.Acquire();
+    try
+
+      for I := 0 to fPoolSize-1 do begin
+        if not fInstances[i].fInUse then begin
+
+          { is this pool instance initialized yet? if not, create pool instance now }
+          if not Assigned(fInstances[i].fInterface) then
+            inherited CreateInstance(EmptyGUID, fInstances[i].fInterface);
+
+          { return instance and break loop }
+          anInstance := fInstances[i].fInterface;
+          fInstances[i].fInUse := True;
+          break;
+
+        end;
+      end; { for }
+
+    finally
+      fCriticalSection.Release();
+    end;
+
+    if not Assigned(anInstance) then
+      case fPoolBehavior of
+        pbFail:raise EROPoolNoFreeObjects.CreateFmt(err_NoFreeObjectsInPool,[GetInterfaceName, fPoolSize]);
+        pbWait:Sleep(POOL_SLEEP_MS_WHILE_WAITING);
+        pbCreateAdditional:inherited CreateInstance(EmptyGUID, anInstance);
+      end; { case }
+
+  until (fPoolBehavior <> pbWait) or (Assigned(anInstance));
+
+  //if Assigned(anInstance) then ActivateInstance(aClientID,anInstance);
+
+  //i := fLastInc;
+  {while (anInstance=NIL) do try
+    if (i>=fPoolSize-1) then i := 0 else Inc(i);
+
+    refcnt := fInstances[i]._AddRef;
+    if (refcnt=2) then begin
+      anInstance := fInstances[i];
+      fLastInc := i;
+    end;
+  finally
+    fInstances[i]._Release;
+  end;}
+end;
+
+procedure TROPooledClassFactory.ClearPool;
+var i:Integer;
+begin
+  fCriticalSection.Acquire();
+  try
+
+    for i := 0 to fPoolSize-1 do begin
+      fInstances[i].fInUse := false;
+      fInstances[i].fInterface := nil;
+    end; { for }
+
+  finally
+    fCriticalSection.Release();
+  end;
+end;
+
+
+procedure TROPooledClassFactory.ReleaseInstance(const aClientID: TGUID; var anInstance: IInterface);
+var i:Integer;
+begin
+  //DeactivateInstance(aClientID,anInstance);
+
+  fCriticalSection.Acquire();
+  try
+
+    for i := 0 to fPoolSize-1 do begin
+      if fInstances[i].fInterface = anInstance then begin
+
+        { return instance and break loop }
+        anInstance := nil;
+        fInstances[i].fInUse := false;
+        break;
+
+      end;
+    end;    { for }
+
+  finally
+    fCriticalSection.Release();
+  end;
+
+  { still assigned? then we had a spare object created to serve this request. Just free it. }
+  if Assigned(anInstance) then anInstance := nil;
+end;
+
+{ TROSynchronizedSingletonClassFactory }
+
+constructor TROSynchronizedSingletonClassFactory.Create(const anInterfaceName: string; aCreatorFunc: TRORemotableCreatorFunc; anInvokerClass: TROInvokerClass);
+begin
+  inherited;
+  fCriticalSection := TCriticalSection.Create();
+end;
+
+destructor TROSynchronizedSingletonClassFactory.Destroy;
+begin
+  FreeAndNil(fCriticalSection);
+  inherited;
+end;
+
+procedure TROSynchronizedSingletonClassFactory.CreateInstance(const aClientID : TGUID; out anInstance : IInterface);
+begin
+  fCriticalSection.Enter();
+  inherited;
+end;
+
+procedure TROSynchronizedSingletonClassFactory.ReleaseInstance(const aClientID: TGUID; var anInstance: IInterface);
+begin
+  inherited;
+  fCriticalSection.Leave();
+end;
+
+{ TROPerClientClassFactory }
+
+constructor TROPerClientClassFactory.Create(const anInterfaceName: string;
+  aCreatorFunc: TRORemotableCreatorFunc; anInvokerClass: TROInvokerClass;
+  aTimeoutSeconds:cardinal);
+begin
+  inherited Create(anInterfaceName, aCreatorFunc, anInvokerClass);
+  fCriticalSection := TCriticalSection.Create;
+  fInstances := TObjectList.Create;
+  fTimeoutSeconds := aTimeoutSeconds;
+  fTimeoutThread := TROPerClientClassFactory_TimeoutThread.Create(Self, aTimeoutSeconds div 10);
+end;
+
+destructor TROPerClientClassFactory.Destroy;
+begin
+  fTimeoutThread.Free;
+  FreeAndNil(fInstances);
+  FreeAndNil(fCriticalSection);
+  inherited;
+end;
+
+procedure TROPerClientClassFactory.CreateInstance(const aClientID: TGUID;
+  out anInstance: IInterface);
+var i : integer;
+    instinfo : TClientInstance;
+begin
+  anInstance := NIL;
+
+  fCriticalSection.Enter();
+  try
+
+    for i := 0 to fInstances.Count-1 do
+      if IsEqualGUID(TClientInstance(fInstances[i]).ClientID, aClientID) then begin
+        anInstance := TClientInstance(fInstances[i]).ServerObject;
+        TClientInstance(fInstances[i]).LastAccess := Now();
+        Exit;
+      end;
+
+    //CreatorFunc(anInstance); // If not found the creates it
+    inherited CreateInstance(aClientID, anInstance);
+
+    instinfo := TClientInstance.Create;
+    instinfo.ServerObject := anInstance;
+    instinfo.ClientID := aClientID;
+    instinfo.LastAccess := Now();
+
+    fInstances.Add(instinfo)
+  finally
+    fCriticalSection.Leave();
+  end;
+end;
+
+procedure TROPerClientClassFactory.ReleaseInstance(const aClientID: TGUID; 
+  var anInstance: IInterface);
+var destcontr : IRODestructorController;
+    i : integer;
+begin
+  //DeactivateInstance(aClientID,anInstance);
+
+  if Supports(anInstance, IRODestructorController, destcontr) and destcontr.CanBeDestroyed then begin
+
+    fCriticalSection.Enter();
+    try
+      for i := 0 to fInstances.Count-1 do
+        if IsEqualGUID(TClientInstance(fInstances[i]).ClientID, aClientID) then begin
+          anInstance := NIL;
+          fInstances.Delete(i);
+          break;
+        end;
+    finally
+      fCriticalSection.Leave();
+    end;
+
+  end;
+end;
+
+procedure TROPerClientClassFactory.TimeoutSessions;
+var i:Integer;
+
+  function IsExpired(iInfo:TClientInstance):Boolean;
+  var lExpireTime:TDateTime;
+  const lSecsPerDay=24*60*60;
+  begin
+    lExpireTime := ((iInfo.LastAccess * lSecsPerDay) + fTimeoutSeconds) / lSecsPerDay;
+    Result := lExpireTime < Now();
+    {$IFDEF DEBUG_REMOBJECTS_CLASSFACTORIES}
+    DebugServer.Write('Instance for Client ID %s - Last accessed %s, expires %s (now is %s)',
+                      [GuidToString(iInfo.ClientID),
+                      DateTimeToStr(iInfo.LastAccess),
+                      DateTimeToStr(lExpireTime),
+                      DateTimeToStr(Now())]);
+    {$ENDIF DEBUG_REMOBJECTS_CLASSFACTORIES}
+  end;
+
+var lInstance:IInterface;
+    lObjectTimeout:IROObjectTimeout;
+begin
+  {$IFDEF DEBUG_REMOBJECTS_CLASSFACTORIES}
+  DebugServer.EnterMethod('TROPerClientClassFactory.TimeoutSessions()'); try
+  DebugServer.Write('%d instances in class factory',[fInstances.Count]);
+  {$ENDIF DEBUG_REMOBJECTS_CLASSFACTORIES}
+
+  fCriticalSection.Enter();
+  try
+
+    for i := fInstances.Count-1 downto 0 do
+      if IsExpired(TClientInstance(fInstances[i])) then begin
+        {$IFDEF DEBUG_REMOBJECTS_CLASSFACTORIES}
+        DebugServer.Write('Expired PerClient instance for %s',[GuidToString(TClientInstance(fInstances[i]).ClientID)]);
+        {$ENDIF DEBUG_REMOBJECTS_CLASSFACTORIES}
+
+        lInstance := (fInstances[i] as TClientInstance).ServerObject;
+        if Supports(lInstance,IROObjectTimeout,lObjectTimeout) then
+          lObjectTimeout.OnTimeout();
+        lInstance := nil;
+
+        fInstances.Delete(i);
+      end;
+
+  finally
+    fCriticalSection.Leave();
+  end;
+
+  {$IFDEF DEBUG_REMOBJECTS_CLASSFACTORIES}
+  finally DebugServer.ExitMethod('TROPerClientClassFactory.TimeoutSessions()'); end;
+  {$ENDIF DEBUG_REMOBJECTS_CLASSFACTORIES}
+end;
+
+procedure TROPerClientClassFactory.TimeoutSession(const aClientId: TGuid);
+var i:Integer;
+
+var lInstance:IInterface;
+    lObjectTimeout:IROObjectTimeout;
+begin
+  fCriticalSection.Enter();
+  try
+    for i := fInstances.Count-1 downto 0 do
+      if IsEqualGUID(TClientInstance(fInstances[i]).ClientID, aClientID) then begin
+
+        lInstance := (fInstances[i] as TClientInstance).ServerObject;
+        if Supports(lInstance,IROObjectTimeout,lObjectTimeout) then
+          lObjectTimeout.OnTimeout();
+        lInstance := nil;
+
+        fInstances.Delete(i);
+      end;
+
+  finally
+    fCriticalSection.Leave();
+  end;
+end;
+
+class procedure TROPerClientClassFactory.TimeoutAllSessions(
+  const aClientId: TGuid);
+var
+  lNames: IROStrings;
+  lPerClient: IROPerClientClassFactory;
+  i: Integer;
+begin
+  lNames := GetClassFactoryNames;
+  for i := 0 to lNames.Count -1 do begin
+    if Supports(GetClassFactory(lNames[i]), IROPerClientClassFactory, lPerClient) then begin
+      lPerClient.TimeoutSession(aClientId);
+    end;
+  end;
+end;
+
+{ TROPerClientClassFactory_TimeoutThread }
+
+constructor TROPerClientClassFactory_TimeoutThread.Create(iOwner: TROPerClientClassFactory; iTimeoutSeconds:integer);
+begin
+  inherited Create(true,'TROPerClientClassFactory_TimeoutThread');
+  fWakeUp := TROEvent.Create(nil,False,False,'');
+  fOwner := iOwner;
+  fTimeoutSeconds := iTimeoutSeconds;
+  if fTimeoutSeconds < 10 then fTimeoutSeconds := 10;
+  Resume();
+end;
+
+destructor TROPerClientClassFactory_TimeoutThread.Destroy();
+begin
+  Terminate();
+  fWakeUp.SetEvent();
+  inherited;                           
+  FreeAndNil(fWakeUp);
+end;
+
+procedure TROPerClientClassFactory_TimeoutThread.Execute;
+begin
+  while not Terminated do begin
+    fWakeUp.WaitFor(fTimeoutSeconds*1000); { WaitFor expects ms }
+    if not Terminated then begin
+      fOwner.TimeoutSessions();
+    end;
+  end;    { while }
+end;
+
+initialization
+  RegisterExceptionClass(EROPoolNoFreeObjects);
+finalization
+  UnregisterExceptionClass(EROPoolNoFreeObjects);
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROClasses.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROClasses.pas
new file mode 100644
index 0000000..aa935eb
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROClasses.pas	
@@ -0,0 +1,2266 @@
+unit uROClasses;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses Classes, {$IFDEF MSWINDOWS} Windows, {$ENDIF} SyncObjs, SysUtils, TypInfo
+ {$IFNDEF MSWINDOWS},unixtype, baseunix, pthreads {$ENDIF}
+  ;
+
+const MinTimerMS = 100;
+var
+  ROInitializeThreads: Boolean = False;
+
+type TRODataType = (rtInteger, rtDateTime, rtDouble, rtCurrency, rtWidestring, rtString,
+                    rtInt64, rtBoolean, rtVariant, rtBinary, rtXML, rtGuid, rtDecimal,
+                    rtUTF8String, rtXsDateTime, rtUserDefined);
+     TRODataTypeMapping = record
+       Name: string;
+       NewType: TRODataType;
+     end;
+
+    DataTypeNames_Array = array[TRODataType] of string;
+    DataTypeRemapping_Array = array[0..0] of TRODataTypeMapping;
+const
+  DataTypeNames : DataTypeNames_Array = (
+        'Integer',
+        'DateTime',
+        'Double',
+        'Currency',
+        'Widestring',
+        'AnsiString',
+        'Int64',
+        'Boolean',
+        'Variant',
+        'Binary',
+        'Xml',
+        'Guid',
+        'Decimal',
+        'Utf8String',
+        'XsDateTime',
+        '???');
+  DataTypeRemapping: DataTypeRemapping_Array =
+  (
+  //  (Name: 'Utf8String'; NewType: rtString)
+    (Name: '???'; NewType: rtUserDefined)
+  );
+
+
+
+type
+  {$IFDEF DELPHI5}
+  IInterface = IUnknown;
+  {$ENDIF DELPHI5}
+  {$IFNDEF MSWINDOWS}
+
+  TROEvent = class
+  private
+    FEvent: TSemaphore;
+  public
+    constructor Create(Dummy: Pointer; ManualReset, InitialVal: Boolean; Name: string);
+    destructor Destroy; override;
+    function WaitFor(Timeout: LongWord): TWaitResult;
+    procedure SetEvent;
+    procedure ResetEvent;
+  end;
+  {$ELSE}
+  TROEvent = TEvent;
+  {$ENDIF}
+  { IROStrings
+      Interface wrapper around a TStrings }
+  IROStrings = interface
+  ['{A96F7741-E9C4-4055-BF38-185B6063380C}']
+    function GetCount : integer;
+    function GetStringsObj : TStrings;
+
+    function GetValues(const Name: string): string;
+    procedure SetValues(const Name, Value: string);
+    function GetNames(Index: Integer): string;
+
+    function GetObject(Index: Integer): TObject;
+    procedure PutObject(Index: Integer; const Value: TObject);
+
+    function GetText : string;
+    procedure SetText(const Value : string);
+
+    function GetCommaText : string;
+    procedure SetCommaText(const Value : string);
+
+    function GetStrings(Index : integer) : string;
+    procedure SetStrings(Index : integer; const Value : string);
+
+    function GetSorted : boolean;
+    procedure SetSorted(aValue : boolean);
+    procedure CustomSort(Compare: TStringListSortCompare);
+
+    function GetDuplicates : TDuplicates;
+    procedure SetDuplicates(Value : TDuplicates);
+
+    function Add(const aString : string) : integer;
+    function AddObject(const aString: string; aObject: TObject): Integer;
+
+    procedure Insert(Index: Integer; const S: string);
+    procedure InsertObject(Index: Integer; const S: string; AObject: TObject);
+
+    procedure Delete(Index : integer);
+    function IndexOf(const aString : string) : integer;
+
+
+    function ExtractValue(const aName : string) : string;
+    function RenameName(const aName : string) : boolean;
+
+    function Find(const aString : string) : integer;
+
+    procedure Clear;
+
+    function IndexOfName(const aName : string) : integer;
+
+    procedure AddStrings(aList : TStrings);
+
+    property Count : integer read GetCount;
+    property Sorted : boolean read GetSorted write SetSorted;
+    property Duplicates: TDuplicates read GetDuplicates write SetDuplicates;
+    //property StringsObj : TStrings read GetStringsObj;
+    property Strings : TStrings read GetStringsObj;
+    property Values[const aName : string] : string read GetValues write SetValues;
+    property Names[Index : integer] : string read GetNames;
+    property StringAccess[Index : integer] : string read GetStrings write SetStrings; default;
+    property Text : string read GetText write SetText;
+    property CommaText : string read GetCommaText write SetCommaText;
+    property Objects[Index: Integer]: TObject read GetObject write PutObject;
+  end;
+
+  {$IFDEF DELPHI5}
+  TSeekOrigin = (soBeginning, soCurrent, soEnd); { Under Delphi 5 we can assume 0,1,m2 to be used }
+  {$ENDIF}
+
+  { IROStream
+      Interface wrapper around TStream }
+  IROStream = interface
+  ['{662BD786-2337-46DA-9F5C-FD226C2BBB13}']
+    function GetStreamObj : TStream;
+    function GetPosition: Int64;
+    procedure SetPosition(const aValue: Int64);
+    function GetSize: Int64;
+    procedure SetSize(const aValue: Int64);
+    function Read(var Buffer; Count: Longint): Longint;
+    function Write(const Buffer; Count: Longint): Longint;
+    function Seek(Offset: Longint; Origin: Word): Longint; overload;
+    function Seek(const Offset: Int64; Origin: TSeekOrigin): Int64; overload;
+    procedure ReadBuffer(var Buffer; Count: Longint);
+    procedure WriteBuffer(const Buffer; Count: Longint);
+    function ReadComponent(Instance: TComponent): TComponent;
+    procedure WriteComponent(Instance: TComponent);
+
+    property Stream : TStream read GetStreamObj;
+    property Position: Int64 read GetPosition write SetPosition;
+    property Size: Int64 read GetSize write SetSize;
+
+    procedure BeginUpdate;
+    procedure EndUpdate;
+    function InUpdateMode: Boolean;
+  end;
+
+  { IROIdentifiedInterface }
+  IROInterfaceWithID = interface
+  ['{048F42B5-D3E4-4BD5-9E72-16BF9FC01388}']
+    function GetID : string;
+  end;
+
+  { Forwards }
+  TROThreadTimer = class;
+
+  { Misc }
+  TStringArray = array of string;
+
+  { TROStrings }
+  TROStrings = class(TInterfacedObject, IROStrings)
+  private
+    fListRef : TStrings;
+    fOwnsList : boolean;
+
+  protected
+    // IROStrings
+    function GetCount : integer;
+    function GetStringsObj : TStrings;
+    function GetValues(const Name: string): string;
+    procedure SetValues(const Name, Value: string);
+    function GetNames(Index: Integer): string;
+    function GetStrings(Index : integer) : string;
+    procedure SetStrings(Index : integer; const Value : string);
+
+    function GetObject(Index: Integer): TObject;
+    procedure PutObject(Index: Integer; const Value: TObject);
+
+    function GetDuplicates : TDuplicates;
+    procedure SetDuplicates(Value : TDuplicates);
+
+    function GetText : string;
+    procedure SetText(const Value : string);
+
+    function GetCommaText : string;
+    procedure SetCommaText(const Value : string);
+
+    function GetSorted : boolean;
+    procedure SetSorted(aValue : boolean);
+
+    procedure CustomSort(Compare: TStringListSortCompare);
+
+    procedure Clear;
+
+    function Add(const aString : string) : integer;
+    function AddObject(const aString: string; aObject: TObject): Integer;
+    procedure Insert(Index: Integer; const S: string);
+    procedure InsertObject(Index: Integer; const S: string; AObject: TObject);
+
+    procedure Delete(Index : integer);
+    function IndexOf(const aString : string) : integer;
+
+    function ExtractValue(const aName : string) : string;
+    function RenameName(const aName : string) : boolean;
+
+    function Find(const aString : string) : integer;
+
+    procedure AddStrings(aList : TStrings);
+
+    function IndexOfName(const aName : string) : integer;
+
+  public
+    constructor Create(aList : TStrings; OwnsList : boolean); overload; virtual;
+    constructor CreateCopy(aList:TStrings); overload; virtual;
+    constructor Create; overload;
+
+    destructor Destroy; override;
+  end;
+
+  { TROStream }
+  TROStream = class(TInterfacedObject, IROStream)
+  private
+    fStreamRef : TStream;
+    fOwnsStream : boolean;
+    FOnChange: TNotifyEvent;
+    FChanging: byte;
+    procedure Changed;
+  protected
+    // IROStream
+    function GetStreamObj : TStream;
+    function GetPosition: Int64;
+    procedure SetPosition(const aValue: Int64);
+    function GetSize: Int64;
+    procedure SetSize(const aValue: Int64);
+    function Read(var Buffer; Count: Longint): Longint;
+    function Write(const Buffer; Count: Longint): Longint;
+    function Seek(Offset: Longint; Origin: Word): Longint; overload;
+    function Seek(const Offset: Int64; Origin: TSeekOrigin): Int64; overload;
+    procedure ReadBuffer(var Buffer; Count: Longint);
+    procedure WriteBuffer(const Buffer; Count: Longint);
+    function ReadComponent(Instance: TComponent): TComponent;
+    procedure WriteComponent(Instance: TComponent);
+    procedure BeginUpdate;
+    procedure EndUpdate;
+    function InUpdateMode: Boolean;
+  public
+    constructor Create(aStream : TStream; OwnsStream : boolean); overload; virtual;
+    constructor Create; overload;
+
+    destructor Destroy; override;
+    property OnChange: TNotifyEvent read FOnChange write FOnChange;
+  end;
+
+
+   {$M+}
+   TROBinaryMemoryStream = class(TMemoryStream)
+   private
+    FCapacityIncrement: integer;
+   protected
+     function Realloc(var NewCapacity: Longint): Pointer; override;
+   public
+     constructor Create(const iString:Ansistring); overload;
+     constructor Create; overload;    // required for C++ compatibility
+     procedure Assign(iSource:TStream);
+     function Clone:TROBinaryMemoryStream;
+
+     procedure LoadFromString(const iString:Ansistring);
+     procedure LoadFromHexString(const iString:Ansistring);
+     function ToString:AnsiString;  {$IFDEF DELPHI12UP}reintroduce;{$ENDIF}
+     function ToHexString:Ansistring;
+     function ToReadableString:Ansistring;
+     function WriteAnsiString(AString: AnsiString): integer;
+     property CapacityIncrement: integer read FCapacityIncrement write FCapacityIncrement;
+   end;
+   {$M-}
+
+  TROConstantMemoryStream = class(TROBinaryMemoryStream)
+  public
+    constructor Create(aStream: TCustomMemoryStream; aFreeOldStream: boolean=false); reintroduce;
+    destructor Destroy; override;
+
+    function Write(const Buffer; Count: Integer): Integer; override;
+  end;
+
+  { TROInitializedThread }
+  TROInitializedThread = class(TThread)
+  private
+    FInitialize: Boolean;
+  public
+    constructor Create(CreateSuspended: Boolean);
+    destructor Destroy; override;
+  end;
+
+  { TROThreadTimer }
+  TROTimerEvent = procedure(CurrentTickCount : cardinal) of object;
+
+  TROThreadTimer = class(TROInitializedThread)
+  private
+    {$IFDEF MSWINDOWS}
+    fFreeWaiting: TObject; // TROEvent
+    fIsTerminated: Boolean;
+    {$ENDIF MSWINDOWS}
+
+    fTimerEvent : TROTimerEvent;
+    fTimeoutMS : integer;
+    {$IFDEF MSWINDOWS}
+    fWakeUp : TEvent;
+    {$ENDIF}
+    fSynchronized: Boolean;
+
+    function GetTimeout: integer;
+    procedure SetTimeout(const Value: integer);
+    procedure RunEvent;
+
+  protected
+    {$IFDEF MSWINDOWS}
+    procedure DoTerminate; override;
+    {$ENDIF MSWINDOWS}
+    procedure Execute; override;
+
+  public
+    constructor Create(aTimerEvent: TROTimerEvent; aTimeout: integer); overload;
+    constructor Create(aTimerEvent: TROTimerEvent; aTimeout: integer; Synchronized: Boolean); overload;
+    destructor Destroy; override;
+
+    procedure TerminateWaitFor; virtual;
+
+    {$IFDEF MSWINDOWS}
+    function WaitFor: DWORD; reintroduce;
+    {$IFNDEF FPC}
+    procedure Free; reintroduce; // Windows limitation workaround
+    {$ENDIF}
+    {$ENDIF}
+
+    // got to make sure we aren''t freeing threads from within themselves
+    procedure AsyncFree;
+
+    // In MS
+    property Timeout : integer read GetTimeout write SetTimeout;
+    property Synchronized : Boolean read fSynchronized write fSynchronized;
+  end;
+
+  TROInterfaceRegistry = class(TInterfaceList)
+  private
+    fInterfaceType:TGUID;
+  public
+    constructor Create(aInterfaceType:TGUID);
+    procedure Register(aInterface:IInterface);
+    procedure Unregister(aInterface:IInterface);
+  end;
+
+  TClassList = TList;
+
+  { Exceptions }
+  {$M+}
+  EROException = class(Exception)
+  public
+    class function GetAttributeCount: Integer; virtual;
+    class function GetAttributeName(aIndex: Integer): string; virtual;
+    class function GetAttributeValue(aIndex: Integer): string; virtual;
+
+    procedure ReadException(ASerializer: TObject);virtual;
+    procedure WriteException(ASerializer: TObject);virtual;
+    destructor Destroy; override;
+  end;
+  {$M-}
+
+  EROExceptionClass = class of EROException;
+
+  EROServerException = class(EROException);
+  EROUnregisteredServerException = class(EROServerException); // Marshelled exceptions that have not being registered in the framework
+
+  EROInvalidStream = class(EROException);
+
+  EROUserError = class(EROException); // Indicates something was done incorrectly by the user
+
+  EROUnknownItem = class(EROException); // uRODL, uRODynamicRequest and similar
+
+  EROCircularReference = class(EROException); // RODL entities' circular references and similar
+
+  EROIDEProblem = class(EROException);
+
+  { TROCollection }
+  TROSearchOption = (soIgnoreCase);
+
+  TROSearchOptions = set of TROSearchOption;
+  TROCollection = class(TCollection)
+  private
+  protected
+  public
+    function Search(const aPropertyName : string;
+                    const aPropertyValue : Variant;
+                    StartFrom : integer = 0;
+                    Options : TROSearchOptions = [soIgnoreCase]) : TCollectionItem;
+    function GetIndex(const aPropertyName : string;
+                    const aPropertyValue : Variant;
+                    StartFrom : integer = 0;
+                    Options : TROSearchOptions = [soIgnoreCase]) : integer;
+  end;
+
+  TROInterfacedObject = class(TObject, IInterface)
+  protected
+    FRefCount: Integer;
+    function QueryInterface(const IID: TGUID; out Obj): HResult; virtual; stdcall;
+    function _AddRef: Integer; virtual; stdcall;
+    function _Release: Integer; virtual; stdcall;
+  public
+    procedure AfterConstruction; override;
+    procedure BeforeDestruction; override;
+    class function NewInstance: TObject; override;
+    property RefCount: Integer read FRefCount;
+  end;
+
+  TROBaseSerializer = class
+  protected
+    procedure ReadObject(obj: TObject);virtual;abstract;
+    procedure WriteObject(obj: TObject);virtual;abstract;
+  end;
+
+// Exceptions
+procedure Check(DoRaise : boolean; const aMessage : string; const Parameters : array of const; iExceptionClass:ExceptClass); overload;
+procedure Check(DoRaise : boolean; const aMessage : string; const Parameters : array of const); overload;
+procedure Check(DoRaise : boolean; const aMessage : string); overload;
+
+procedure RaiseError(const aMessage : string; const Parameters : array of const; iExceptionClass:ExceptClass); overload;
+procedure RaiseError(const aMessage : string; const Parameters : array of const); overload;
+procedure RaiseError(const aMessage : string); overload;
+procedure RaiseInvalidStreamError(const anErrorMessage : string; const someParams : array of const; iStream:TStream);
+procedure NotSupported(const Hint : string = '');
+
+// IROStrings
+function NewROStrings : IROStrings; overload;
+function NewROStrings(const someStrings : array of string) : IROStrings; overload;
+function NewROStrings(const someText : string) : IROStrings; overload;
+function NewROStrings(const aList : TStrings; OwnList : boolean = TRUE) : IROStrings; overload;
+function ListStringElements(const aString : string; const aSeparator : string = ';') : IROStrings;
+function ListParameters(const aString : string; ParameterID : char = ':'; StringDelimiter : char = '''') : IROStrings;
+function PackStrings(aList : IROStrings; const aDelimiter : string) : string;
+
+// IROStreams
+function NewROStream : IROStream; overload;
+function NewROStream(aStream : TStream; OwnsStream : boolean = TRUE) : IROStream; overload;
+
+// TStrings
+procedure StringArrayToStrings(const anArray : TStringArray; Destination : TStrings; ClearStrings : boolean = TRUE);
+function StringsToStringArray(aSource : TStrings) : TStringArray;
+function StringsToString(const aStringList : TStrings) : string;
+
+// Numeric
+function IncID(CurrVal, MaxVal : integer) : integer;
+function LoopList(var CurrentIndex : integer; const ListCount  : integer; var EvalCount : integer) : boolean;
+
+// Time
+procedure StartTickCounter(var aTickTracker : cardinal);
+function GetElapsedTicks(const aTickTracker : cardinal) : cardinal;
+
+// Variants
+function StreamToVariant(Stream: TStream): Variant;
+procedure VariantToStream(const Data: Variant; Stream: TStream);
+
+// Interfaces
+function GetRefCount(const anInstance : IUnknown) : integer;
+
+// Strings
+function TrimAndClean(const aString : string) : string;
+function SameText(const Str1, Str2 : string) : boolean;
+function WriteSpace(Count : integer) : string;
+
+type
+  TSetOfAnsiChars = set of AnsiChar;
+
+function NewGuid:TGUID;
+function NewGuidAsString:string;
+function NewStrippedGuidAsString:string;
+
+procedure ReplaceChar(var s:string; iChars:TSetOfAnsiChars; iChar:char);
+procedure Remove(var s:string; iChars:TSetOfAnsiChars); overload;
+procedure RemoveAnsi(var s:Ansistring; iChars:TSetOfAnsiChars); overload;
+procedure RemoveExcept(var s:string; iChars:TSetOfAnsiChars);
+function MakeValidIdentifier(const aName:string):string;
+function CleanStringFromBinaries(const iString:Ansistring):Ansistring;
+procedure SaveStringToFile(const aFilename, aString: string);
+
+function EndsWith(const iSubStr,iString:string):boolean;
+
+function GetTempPath:string;
+function GetTempFileName(const aFileExt:string):string;
+
+{$IFNDEF MSWINDOWS}
+function GetTickCount:cardinal;
+{$ENDIF}
+
+{$IFDEF DELPHI5}
+function TryEncodeDateTime(const AYear, AMonth, ADay, AHour, AMinute, ASecond, AMilliSecond: Word; out AValue: TDateTime): Boolean;
+procedure DecodeDateTime(const AValue: TDateTime; out AYear, AMonth, ADay, AHour, AMinute, ASecond, AMilliSecond: Word);
+function MinutesBetween(const ANow, AThen: TDateTime): Int64;
+function IncMinute(const AValue: TDateTime; const ANumberOfMinutes: Int64): TDateTime;
+function IncYear(const AValue: TDateTime; const ANumberOfYears: Integer): TDateTime;
+{$ENDIF DELPHI5}
+
+function WrappedHexString(iData:string; iWrapLength:integer=40):string;
+function StringFromHexString(iData:string):string;
+function StringFromHexStringAnsi(iData:Ansistring):Ansistring;
+function StringToHexString(iData:string):string;
+function ROVariantsEqual(const A, B: Variant): Boolean;
+function ROWideCompare(const S1, S2: WideString; aCaseInsensitive: Boolean {$IFDEF MSWINDOWS};aLocale: LCID = LOCALE_USER_DEFAULT{$ENDIF}): Integer;
+function ROAnsiCompare(const S1, S2: AnsiString; aCaseInsensitive: Boolean {$IFDEF MSWINDOWS};aLocale: LCID = LOCALE_USER_DEFAULT{$ENDIF}): Integer;
+function AnsiHexToBin(aString: AnsiString): Ansistring;
+
+{$IFNDEF DELPHI2009UP}
+  // from system.pas
+const
+   varUString  = $0102; { Unicode string 258 } {not OLE compatible}
+
+function CharInSet(c: Char; CharSet: TSysCharSet):Boolean;
+function UTF8ToString(const S: UTF8String): WideString;
+{$ENDIF}
+
+Function ROGetEnumName(aTypeInfo : PTypeInfo;Value : Integer) : string;
+function ROGetEnumValue(TypeInfo: PTypeInfo; const Name: string): Integer;
+
+function AnsiStringToWideString(AValue: AnsiString): WideString;
+function WideStringToAnsiString(AValue: WideString): AnsiString;
+function VarToAnsiStr(const Value: Variant): Ansistring;
+function GUIDToAnsiString(const GUID: TGUID): Ansistring;
+function StrToDataType(const aString : string) : TRODataType;
+
+{$IFDEF DARWIN}
+function sem_timedwait(__sem:cint;wait_time: timespec):cint;
+{$ENDIF}
+implementation
+
+{$IFDEF DELPHI6}
+  {$DEFINE PATCH_MEMORYSTREAM_REALLOC}
+{$ENDIF}
+{$IFDEF DELPHI7}
+  {$DEFINE PATCH_MEMORYSTREAM_REALLOC}
+{$ENDIF}
+
+uses {$IFDEF MSWINDOWS}ActiveX,{$ENDIF}
+     {$IFDEF FPC}Variants,
+     {$ELSE}
+       {$IFDEF VER140UP}Variants,{$ENDIF}
+     {$ENDIF}
+     {$IFDEF PATCH_MEMORYSTREAM_REALLOC}RTLConsts,{$ENDIF}
+     uRORes{, uROSerializer};
+
+function GUIDToAnsiString(const GUID: TGUID): Ansistring;
+begin
+{$IFDEF UNICODE}
+  SetLength(Result, 38);
+  StrLFmt(PAnsiChar(Result), 38,'{%.8x-%.4x-%.4x-%.2x%.2x-%.2x%.2x%.2x%.2x%.2x%.2x}',   // do not localize
+    [GUID.D1, GUID.D2, GUID.D3, GUID.D4[0], GUID.D4[1], GUID.D4[2], GUID.D4[3],
+    GUID.D4[4], GUID.D4[5], GUID.D4[6], GUID.D4[7]]);
+{$ELSE}
+  Result := GUIDToString(GUID);
+{$ENDIF}
+end;
+
+function VarToAnsiStr(const Value: Variant): Ansistring;
+begin
+  if (Value = Unassigned) or VarIsnull(Value) then
+    Result := ''
+  else
+    {$IFDEF UNICODE}
+    // based on _VarOleStrToString
+    if TVarData(Value).VType = varString then
+      Result := AnsiString(TVarData(Value).VString)
+    else
+      Result := WideStringToAnsiString(VarToWideStr(Value));
+    {$ELSE}
+    Result := VarToStr(Value);
+    {$ENDIF}
+end;
+
+{$IFNDEF DELPHI2009UP}
+function CharInSet(c: Char; CharSet: TSysCharSet): Boolean;
+begin
+  Result := c in CharSet;
+end;
+
+function UTF8ToString(const S: UTF8String): WideString;
+begin
+  Result := UTF8Decode(S);
+end;
+{$ENDIF}
+
+function AnsiStringToWideString(AValue: AnsiString): WideString;
+begin
+  {$IFDEF UNICODE} //AnsiStringToWideString
+  Result := StringOf(BytesOf(AValue));
+  {$ELSE}
+  Result := AValue;
+  {$ENDIF}
+end;
+
+function WideStringToAnsiString(AValue: WideString): AnsiString;
+{$IFDEF UNICODE} //WideStringToAnsiString
+var
+  b: TBytes;
+begin
+  b := BytesOf(AValue);
+  SetLength(Result, Length(b));
+  Move(b[0], pointer(Result)^,Length(b));
+end;
+{$ELSE}
+begin
+  Result := AValue;
+end;
+{$ENDIF}
+
+{$IFDEF FPC}
+const
+  BooleanIdents: array [Boolean] of string = ('False', 'True');
+{$ENDIF}
+
+Function ROGetEnumName(aTypeInfo : PTypeInfo;Value : Integer) : string;
+begin
+  {$IFDEF FPC}
+  if (aTypeInfo = System.TypeInfo(Boolean)) then
+    { LongBool/WordBool/ByteBool have MinValue < 0 and arbitrary content in Value; Boolean has Value in [0, 1] }
+    Result := BooleanIdents[Value <> 0]
+  else
+  {$ENDIF}
+    Result := TypInfo.GetEnumName(aTypeInfo,Value);
+end;
+
+function ROGetEnumValue(TypeInfo: PTypeInfo; const Name: string): Integer;
+begin
+{$IFDEF FPC}
+  if (TypeInfo = System.TypeInfo(Boolean)) then  begin
+    if SameText(Name, BooleanIdents[False]) then
+      Result := 0
+    else
+      Result := 1;
+  end
+  else
+{$ENDIF FPC}
+  Result := TypInfo.GetEnumValue(TypeInfo, Name);
+end;
+
+function StrToDataType(const aString : string) : TRODataType;
+var dt : TRODataType;
+    i: Integer;
+begin
+  result := rtUserDefined;
+
+  for dt := Low(TRODataType) to High(TRODataType) do
+    if (CompareText(aString, DataTypeNames[dt])=0) then begin
+      result := dt;
+      Exit;
+    end;
+  for i := low(DataTypeRemapping) to High(DataTypeRemapping) do
+  begin
+    if CompareText(aString, DataTypeRemapping[i].Name) = 0 then begin
+      Result := DataTypeRemapping[i].NewType;
+      exit;
+    end;
+  end;
+end;
+
+{ TROBinaryMemoryStream }
+
+procedure TROBinaryMemoryStream.Assign(iSource:TStream);
+begin
+  if (iSource is TROBinaryMemoryStream) then begin
+    Clear();
+    CopyFrom(iSource,0);
+    Position := iSource.Position;
+  end
+  else begin
+    raise EConvertError.CreateResFmt(@err_AssignError, [iSource.ClassName, ClassName]);
+  end;
+end;
+
+function TROBinaryMemoryStream.Clone:TROBinaryMemoryStream;
+begin
+  Result := ClassType.Create() as TROBinaryMemoryStream;
+  Result.Assign(self);
+end;
+
+constructor TROBinaryMemoryStream.Create;
+begin
+  inherited Create;
+end;
+
+constructor TROBinaryMemoryStream.Create(const iString: Ansistring);
+begin
+  FCapacityIncrement:=0; //standard mode
+  Create();
+  LoadFromString(iString);
+end;
+
+procedure TROBinaryMemoryStream.LoadFromString(const iString: Ansistring);
+var
+  lLength:integer;
+begin
+  lLength := Length(iString);
+  SetSize(lLength);
+  Move(pointer(iString)^,Memory^,Length(iString));
+  Seek(0,soFromBeginning);
+end;
+
+procedure TROBinaryMemoryStream.LoadFromHexString(const iString: Ansistring);
+begin
+  if Length(iString) mod 2 <> 0 then RaiseError('String length must be 2n');
+  Size := Length(iString) div 2;
+  HexToBin(pAnsiChar(iString),Memory,Size);
+  Seek(0,soFromBeginning);
+end;
+
+function TROBinaryMemoryStream.ToHexString: Ansistring;
+begin
+  SetLength(result,Size*2);
+  BinToHex(Memory,pAnsiChar(result),Size);
+end;
+
+function TROBinaryMemoryStream.ToReadableString: Ansistring;
+begin
+  Result := CleanStringFromBinaries(ToString);
+end;
+
+function TROBinaryMemoryStream.ToString: AnsiString;
+begin
+  SetLength(Result,Size);
+  Seek(0,soFromBeginning);
+  Read(pointer(Result)^,Size);
+end;
+
+
+function TROBinaryMemoryStream.WriteAnsiString(AString: AnsiString): integer;
+begin
+  Result:=Write(pointer(AString)^, Length(Astring));
+end;
+
+// Exceptions
+procedure RaiseError(const aMessage : string; const Parameters : array of const);
+begin
+  raise EROException.CreateFmt(aMessage, Parameters);
+end;
+
+procedure RaiseError(const aMessage : string; const Parameters : array of const; iExceptionClass:ExceptClass);
+begin
+  raise iExceptionClass.CreateFmt(aMessage, Parameters);
+end;
+
+procedure Check(DoRaise : boolean; const aMessage : string; const Parameters : array of const; iExceptionClass:ExceptClass); overload;
+begin
+  if DoRaise
+    then RaiseError(aMessage, Parameters, iExceptionClass);
+end;
+
+procedure Check(DoRaise : boolean; const aMessage : string; const Parameters : array of const);
+begin
+  if DoRaise
+    then RaiseError(aMessage, Parameters);
+end;
+
+procedure RaiseError(const aMessage : string);
+begin
+  RaiseError(aMessage, []);
+end;
+
+procedure Check(DoRaise : boolean; const aMessage : string);
+begin
+  Check(DoRaise, aMessage, []);
+end;
+
+procedure NotSupported(const Hint : string = '');
+const Msg = 'Not Supported';
+begin
+  if (Hint<>'') then RaiseError(Hint+' '+Msg) else RaiseError(Msg);
+end;
+
+procedure RaiseInvalidStreamError(const anErrorMessage : string; const someParams : array of const; iStream:TStream);
+var
+  lSize:Int64;
+  s: Ansistring;
+begin
+  iStream.Seek(0,soFromBeginning);
+  lSize := iStream.Size;
+  if lSize > 500 then lSize := 500;
+  SetLength(s, lSize);
+  iStream.ReadBuffer(pointer(s)^,lSize);
+  raise EROInvalidStream.Create(Format(anErrorMessage,someParams)+#13#13+{$IFDEF UNICODE}UTF8ToString{$ENDIF}(CleanStringFromBinaries(s)));
+end;
+
+// IROStrings
+function NewROStrings : IROStrings;
+var sl : TStringList;
+begin
+  sl := TStringList.Create;
+  result := NewROStrings(sl, TRUE);
+end;
+
+function NewROStrings(const aList : TStrings; OwnList : boolean = TRUE) : IROStrings;
+begin
+  result := TROStrings.Create(aList, OwnList);
+end;
+
+function NewROStrings(const someStrings : array of string) : IROStrings;
+var i : integer;
+begin
+  result := NewROStrings;
+  for i := 0 to Length(someStrings) do
+    result.Add(someStrings[i])
+end;
+
+function NewROStrings(const someText : string) : IROStrings; overload;
+begin
+  result := NewROStrings;
+  result.Text := someText;
+end;
+
+function ListStringElements(const aString : string; const aSeparator : string = ';') : IROStrings;
+var str : string;
+    spl, i : integer;
+    list : TStringList;
+begin
+  str := aString;
+  spl := Length(aSeparator);
+  list := TStringList.Create;
+
+  result := NewROStrings(list);
+
+  i := Pos(aSeparator, str);
+  while (i>0) do begin
+    result.Add(Copy(str, 1, i-1));
+    Delete(str, 1, i-1+spl);
+
+    i := Pos(aSeparator, str);
+  end;
+
+  if (str<>'') then result.Add(str);
+end;
+
+function ListParameters(const aString : string; ParameterID : char = ':'; StringDelimiter : char = '''') : IROStrings;
+var startidx, i, len : integer;
+    //instr : boolean;
+begin
+  result := NewROStrings;
+  //instr := FALSE; was not used elsewhere?
+
+  startidx := 0;
+  len := Length(aString);
+
+  for i := 0 to len do begin
+    if (aString[i]=StringDelimiter) then begin
+      //instr := instr XOR TRUE; was not used elsewhere?
+      Continue;
+    end
+
+    else if (aString[i]=ParameterID)
+      then startidx := i
+
+      else if ((startidx>0) and not CharInSet(aString[i], ['a'..'z', 'A'..'Z', '0'..'9', '_'])) then begin
+      result.Add(Copy(aString, startidx+1, i-startidx-1));
+      startidx := 0;
+    end
+
+    else if ((i=len) and (startidx>0))
+      then result.Add(Copy(aString, startidx+1, i-startidx-1));
+  end;
+end;
+
+function PackStrings(aList : IROStrings; const aDelimiter : string) : string;
+var i : integer;
+begin
+  result := '';
+  if (aList.Count=0) then Exit;
+
+  for i := 0 to (aList.Count-1) do
+    result := result+aList[i]+aDelimiter;
+
+  Delete(result, Length(result), Length(aDelimiter));
+end;
+
+// IROStreams
+function NewROStream : IROStream;
+begin
+  result := TROStream.Create;
+end;
+
+function NewROStream(aStream : TStream; OwnsStream : boolean = TRUE) : IROStream;
+begin
+  result := TROStream.Create(aStream, OwnsStream);
+end;
+
+// TStrings
+procedure StringArrayToStrings(const anArray : TStringArray; Destination : TStrings; ClearStrings : boolean = TRUE);
+var i : integer;
+begin
+  if ClearStrings then Destination.Clear;
+  for i := 0 to Length(anArray)-1 do
+    Destination.Add(anArray[i])
+end;
+
+function StringsToStringArray(aSource : TStrings) : TStringArray;
+var i : integer;
+begin
+  SetLength(result, aSource.Count-1);
+  for i := 0 to (aSource.Count-1) do
+    result[i] := aSource[i];
+end;
+
+function StringsToString(const aStringList : TStrings) : string;
+var i : integer;
+begin
+  result := aStringList.Text;
+  for i := 1 to Length(result) do
+   if CharInSet(result[i], [#10, #13]) then result[i] := #32
+end;
+
+// Streams
+function StreamToVariant(Stream: TStream): Variant;
+var p: Pointer;
+begin
+  Result := VarArrayCreate([0, Stream.Size - 1], varByte);
+  p := VarArrayLock(Result);
+  try
+    Stream.Position := 0; //start from beginning of stream
+    Stream.Read(p^, Stream.Size);
+  finally
+    VarArrayUnlock(Result);
+  end;
+end;
+
+procedure VariantToStream(const Data: Variant; Stream: TStream);
+var p: Pointer;
+begin
+  p := VarArrayLock(Data);
+  try
+    Stream.Write(p^, VarArrayHighBound(Data, 1) + 1); //assuming low bound = 0
+  finally
+    VarArrayUnlock(Data);
+  end;
+end;
+
+// Interfaces
+function GetRefCount(const anInstance : IUnknown) : integer;
+begin
+  anInstance._AddRef;
+  result := anInstance._Release;
+end;
+
+// Strings
+function TrimAndClean(const aString : string) : string;
+const
+  DirtyChars : set of AnsiChar = [#13, #10, #32];
+var i : integer;
+begin
+  result := aString;
+
+  while ((Length(result)>0) and CharInSet(result[1], DirtyChars)) do
+    Delete(result, 1, 1);
+
+  while (Length(result)>0) do begin
+    i := Length(result);
+    if CharInSet(result[i], DirtyChars) then
+      Delete(result, i, 1)
+    else
+      Exit;
+  end;
+end;
+
+function SameText(const Str1, Str2 : string) : boolean;
+begin
+  result := CompareText(Str1, Str2)=0
+end;
+
+function WriteSpace(Count : integer) : string;
+begin
+  SetLength(result, Count);
+  FillChar(result[1], Count, #32);
+end;
+
+// Numeric
+function IncID(CurrVal, MaxVal : integer) : integer;
+begin
+  if (CurrVal>=MaxVal)
+    then result := 0
+    else result := CurrVal+1;
+end;
+
+procedure StartListLoop(const StartFrom : integer; var CurrentIndex : integer; var EvalCount : integer);
+begin
+  CurrentIndex := StartFrom;
+  EvalCount := 0;
+end;
+
+function LoopList(var CurrentIndex : integer; const ListCount  : integer; var EvalCount : integer) : boolean;
+begin
+  result := TRUE;
+  if (EvalCount<ListCount) then begin
+    CurrentIndex := IncID(CurrentIndex, ListCount-1);
+    Inc(EvalCount);
+  end
+  else result := FALSE;
+end;
+
+// Time
+procedure StartTickCounter(var aTickTracker : cardinal);
+begin
+  aTickTracker := GetTickCount
+end;
+
+function GetElapsedTicks(const aTickTracker : cardinal) : cardinal;
+begin
+  result := GetTickCount-aTickTracker
+end;
+
+{$IFDEF MSWINDOWS}
+function GetTempPath:string;
+var
+  lTempdir : array[0..MAX_PATH] of char;
+begin
+  Windows.GetTempPath(Length(lTempdir), lTempdir);
+  result := IncludeTrailingPathDelimiter(lTempdir);
+end;
+{$ENDIF}
+{$IFNDEF MSWINDOWS}
+function GetTempPath:string;
+begin
+  result := GetEnvironmentVariable('tmp');
+end;
+{$ENDIF}
+
+function GetTempFileName(const aFileExt:string):string;
+begin
+  result := GetTempPath+NewStrippedGuidAsString()+aFileExt;
+end;
+
+{$IFNDEF MSWINDOWS}
+function GetTickCount:cardinal;
+begin
+  // from lclintf.pas (FPC)
+  Result := DWord(Trunc(Now * 24 * 60 * 60 * 1000));
+
+  //  result := clock div (CLOCKS_PER_SEC div 1000);
+end;
+{$ENDIF}
+
+function NewGuid:TGUID;
+begin
+  {$IFDEF MSWINDOWS}
+  CoCreateGuid(result);
+  {$ELSE}
+  CreateGuid(result);
+  {$ENDIF}
+end;
+
+function NewGuidAsString:string;
+begin
+  result := GuidToString(NewGuid());
+end;
+
+function NewStrippedGuidAsString:string;
+begin
+  result := NewGuidAsString();
+  Remove(result,['-','{','}']);
+end;
+
+procedure ReplaceChar(var s:string; iChars:TSetOfAnsiChars; iChar:char);
+var i:Integer;
+begin
+  for i := 1 to length(s) do begin
+    if CharInSet(s[i], iChars) then s[i] := iChar;
+  end;
+end;
+
+procedure Remove(var s:string; iChars:TSetOfAnsiChars); 
+var i,l:Integer;
+   // source:string;
+begin
+ // source := s;
+  l := 0;
+  for i := 1 to length(s) do begin
+    if not CharInSet(s[i], iChars) then begin
+      s[l+1] := s[i];
+      inc(l);
+    end;
+  end;
+  SetLength(s,l);
+end;
+
+procedure RemoveAnsi(var s:Ansistring; iChars:TSetOfAnsiChars);
+var i,l:Integer;
+   // source:string;
+begin
+ // source := s;
+  l := 0;
+  for i := 1 to length(s) do begin
+    if not CharInSet(s[i], iChars) then begin
+      s[l+1] := s[i];
+      inc(l);
+    end;
+  end;
+  SetLength(s,l);
+end;
+
+procedure RemoveExcept(var s:string; iChars:TSetOfAnsiChars);
+var i,l:Integer;
+  //  source:string;
+begin
+//  source := s;
+  l := 0;
+  for i := 1 to length(s) do begin
+    if CharInSet(s[i], iChars) then begin
+      s[l+1] := s[i];
+      inc(l);
+    end;
+  end;
+  SetLength(s,l);
+end;
+
+function MakeValidIdentifier(const aName:string):string;
+var
+  i: Integer;
+begin
+  result := aName;
+  for i := 1 to Length(result) do
+    if not CharInSet(result[i], ['a'..'z','A'..'Z','0'..'9','_']) then result[i] := '_';
+end;
+
+function CleanStringFromBinaries(const iString:Ansistring):Ansistring;
+var i:integer;
+begin
+  Result := iString;
+  for i := 1 to Length(Result) do
+    if not CharInSet(Result[i], [#13,#$20..#$7f]) then Result[i] := '.';
+end;
+
+procedure SaveStringToFile(const aFilename, aString:string);
+var
+  lText:TextFile;
+begin
+  try
+    AssignFile(lText,aFilename);
+    Rewrite(lText);
+    try
+      Write(lText,aString);
+    finally
+      CloseFile(lText);
+    end;
+  except
+    on E:Exception do
+      raise EInOutError.Create('Error saving file '+aFilename+' ('+E.ClassName+': '+E.Message+')');
+  end;
+end;
+
+function EndsWith(const iSubStr,iString:string):boolean; overload;
+var Len,Len2,i:integer;
+begin
+  //ToDo -cOptimize: optimize, like we did with StartsWith
+  Len := Length(iSubStr);
+  Len2 := Length(iString);
+  if Len <= Len2 then begin
+    for i := 1 to Len do begin;
+      if iSubStr[Len-i+1] <> iString[Len2-i+1] then begin
+        result := false;
+        exit;
+      end
+    end;
+    result := true;
+  end
+  else begin
+    result := false;
+  end;
+end;
+
+{$IFDEF DELPHI5}
+const
+  HoursPerDay   = 24;
+  MinsPerHour   = 60;
+  SecsPerMin    = 60;
+  MSecsPerSec   = 1000;
+  MinsPerDay    = HoursPerDay * MinsPerHour;
+  SecsPerDay    = MinsPerDay * SecsPerMin;
+  MSecsPerDay   = SecsPerDay * MSecsPerSec;
+
+function TryEncodeDate(Year, Month, Day: Word; out Date: TDateTime): Boolean;
+var
+  I: Integer;
+  DayTable: PDayTable;
+begin
+  Result := False;
+  DayTable := @MonthDays[IsLeapYear(Year)];
+  if (Year >= 1) and (Year <= 9999) and (Month >= 1) and (Month <= 12) and
+    (Day >= 1) and (Day <= DayTable^[Month]) then
+  begin
+    for I := 1 to Month - 1 do Inc(Day, DayTable^[I]);
+    I := Year - 1;
+    Date := I * 365 + I div 4 - I div 100 + I div 400 + Day - DateDelta;
+    Result := True;
+  end;
+end;
+
+function TryEncodeTime(Hour, Min, Sec, MSec: Word; out Time: TDateTime): Boolean;
+begin
+  Result := False;
+  if (Hour < HoursPerDay) and (Min < MinsPerHour) and (Sec < SecsPerMin) and (MSec < MSecsPerSec) then
+  begin
+    Time := (Hour * (MinsPerHour * SecsPerMin * MSecsPerSec) +
+             Min * (SecsPerMin * MSecsPerSec) +
+             Sec * MSecsPerSec +
+             MSec) / MSecsPerDay;
+    Result := True;
+  end;
+end;
+
+function TryEncodeDateTime(const AYear, AMonth, ADay, AHour, AMinute, ASecond, AMilliSecond: Word; out AValue: TDateTime): Boolean;
+var
+  LTime: TDateTime;
+begin
+  Result := TryEncodeDate(AYear, AMonth, ADay, AValue);
+  if Result then begin
+    Result := TryEncodeTime(AHour, AMinute, ASecond, AMilliSecond, LTime);
+    if Result then
+      AValue := AValue + LTime;
+  end;
+end;
+
+procedure DecodeDateTime(const AValue: TDateTime; out AYear, AMonth, ADay, AHour, AMinute, ASecond, AMilliSecond: Word);
+begin
+  DecodeDate(AValue, AYear, AMonth, ADay);
+  DecodeTime(AValue, AHour, AMinute, ASecond, AMilliSecond);
+end;
+
+function SpanOfNowAndThen(const ANow, AThen: TDateTime): TDateTime;
+begin
+  if ANow < AThen then
+    Result := AThen - ANow
+  else
+    Result := ANow - AThen;
+end;
+
+function MinuteSpan(const ANow, AThen: TDateTime): Double;
+begin
+  Result := MinsPerDay * SpanOfNowAndThen(ANow, AThen);
+end;
+
+function MinutesBetween(const ANow, AThen: TDateTime): Int64;
+begin
+  Result := Trunc(MinuteSpan(ANow, AThen));
+end;
+
+function IncMinute(const AValue: TDateTime; const ANumberOfMinutes: Int64):TDateTime;
+begin
+  Result := ((AValue * MinsPerDay) + ANumberOfMinutes) / MinsPerDay;
+end;
+
+{
+function IncYear(const AValue: TDateTime; const ANumberOfYears: Integer): TDateTime;
+begin
+  Result := AValue+365;
+end;
+}
+function IncYear(const AValue: TDateTime; const ANumberOfYears: Integer ): TDateTime;
+Var
+  Y,M,D,H,N,S,MS : Word;
+begin
+  DecodeDateTime(AValue,Y,M,D,H,N,S,MS);
+  Y:=Y+ANumberOfYears;
+  If (M=2) and (D=29) And (Not IsLeapYear(Y)) then D:=28;
+  Result:=EncodeDateTime(Y,M,D,H,N,S,MS);
+end;
+{$ENDIF DELPHI5}
+
+function StringFromHexString(iData:string):string;
+begin
+  Remove(iData,[#13,#10,#32]);
+  if Length(iData) mod 2 <> 0 then raise EROException.Create('String length must be 2n');
+  SetLength(Result,Length(iData) div 2);
+  HexToBin(pChar(iData),pChar(result),Length(result));
+end;
+
+function AnsiHexToBin(aString: AnsiString): Ansistring;
+var
+  i,j,k: integer;
+begin
+  k:=0;
+  Result := '';
+  if Length(aString) mod 2 <> 0 then raise EROException.Create('String length must be 2n');
+  for i:= 1 to Length(aString) do begin
+    j:= ord(aString[i]);
+    case j  of
+      48..57: dec(j,48);
+      65..70: dec(j, 55);
+      97..120: dec(j, 87);
+    else
+      raise Exception.CreateFmt('Can''t decode hex string: "%s"', [aString]);
+    end;
+    k:= k*16 + j;
+    if i mod 2 = 0 then begin
+      Result := Result + AnsiChar(k);
+      k := 0;
+    end;   
+  end;
+end;
+
+function StringFromHexStringAnsi(iData:Ansistring):Ansistring;
+begin
+  RemoveAnsi(iData,[#13,#10,#32]);
+  Result := AnsiHexToBin(iData);
+end;
+
+
+{----------------------------------------------------------------------------}
+function StringToHexString(iData:string):string;
+begin
+  SetLength(Result,Length(iData) * 2);
+  BinToHex(pChar(iData),pChar(result),Length(iData));
+end;
+
+{----------------------------------------------------------------------------}
+function WrappedHexString(iData:string; iWrapLength:integer=40):string;
+var i:integer;
+    s:string;
+begin
+  s := '';
+  for i := 1 to length(iData) do begin
+    s := s+IntToHex(byte(iData[i]),2);
+    if i mod iWrapLength = 0 then s := s+#13#10;
+  end;
+  result := s;
+end;
+
+function TROBinaryMemoryStream.Realloc(var NewCapacity: Integer): Pointer;
+const
+  MemoryDelta = $2000; { Must be a power of 2 }
+begin
+  if (FCapacityIncrement <> 0) and (NewCapacity<>0) then inc(NewCapacity,FCapacityIncrement);
+  {$IFDEF PATCH_MEMORYSTREAM_REALLOC}
+  if (NewCapacity > 0) and (NewCapacity <> Position) then
+    NewCapacity := (NewCapacity + (MemoryDelta - 1)) and not (MemoryDelta - 1);
+  Result := Memory;
+  if NewCapacity <> Capacity then
+  begin
+    if NewCapacity = 0 then
+    begin
+      FreeMem(Memory);
+      Result := nil;
+    end else
+    begin
+      if Capacity = 0 then
+        GetMem(Result, NewCapacity)
+      else
+        ReallocMem(Result, NewCapacity);
+      if Result = nil then raise EStreamError.CreateRes(@SMemoryStreamError);
+    end;
+  end;
+  {$ELSE}
+  Result := inherited Realloc(NewCapacity);
+  {$ENDIF}
+end;
+
+{ TROStrings }
+
+function TROStrings.Add(const aString: string): integer;
+begin
+  result := fListRef.Add(aString)
+end;
+
+function TROStrings.AddObject(const aString: string; aObject: TObject): Integer;
+begin
+  result := fListRef.AddObject(aString, aObject);
+end;
+
+procedure TROStrings.AddStrings(aList: TStrings);
+begin
+  fListRef.AddStrings(aList);
+end;
+
+constructor TROStrings.Create(aList: TStrings; OwnsList: boolean);
+begin
+  inherited Create;
+
+  if not Assigned(aList) then begin
+    fListRef := TStringList.Create;
+    fOwnsList := true;
+  end
+  else begin
+    fListRef := aList;
+    fOwnsList := OwnsList;
+  end;
+end;
+
+constructor TROStrings.Create;
+begin
+  Create(nil,true);
+end;
+
+constructor TROStrings.CreateCopy(aList: TStrings);
+begin
+  Create(nil,true);
+  fListRef.Assign(aList);
+end;
+
+procedure TROStrings.CustomSort(Compare: TStringListSortCompare);
+begin
+  if (fListRef is TStringList)
+    then TStringList(fListRef).CustomSort(Compare);
+end;
+
+procedure TROStrings.Clear;
+begin
+  fListRef.Clear
+end;
+
+procedure TROStrings.Delete(Index: integer);
+begin
+  fListRef.Delete(Index);
+end;
+
+destructor TROStrings.Destroy;
+begin
+  if fOwnsList
+    then fListRef.Free;
+
+  inherited;
+end;
+
+function TROStrings.ExtractValue(const aName: string): string;
+var idx : integer;
+begin
+  result := '';
+
+  idx := fListRef.IndexOfName(aName);
+  if (idx>=0) then begin
+    result := fListRef.Values[aName];
+    fListRef.Delete(idx);
+  end
+end;
+
+function TROStrings.Find(const aString: string): integer;
+begin
+  result := fListRef.IndexOf(aString)
+end;
+
+function TROStrings.GetCount: integer;
+begin
+  result := fListRef.Count
+end;
+
+function TROStrings.GetDuplicates: TDuplicates;
+begin
+  if (fListRef is TStringList) then
+    result := TStringList(fListRef).Duplicates
+  else
+    result := dupAccept;
+end;
+
+function TROStrings.GetNames(Index: Integer): string;
+begin
+  result := fListRef.Names[Index]
+end;
+
+function TROStrings.GetSorted: boolean;
+begin
+  if (fListRef is TStringList)
+    then result := TStringList(fListRef).Sorted
+    else result := FALSE;
+end;
+
+function TROStrings.GetStrings(Index: integer): string;
+begin
+  result := fListRef[Index]
+end;
+
+function TROStrings.GetStringsObj: TStrings;
+begin
+  result := fListRef
+end;
+
+function TROStrings.GetText: string;
+begin
+  result := fListRef.Text
+end;
+
+function TROStrings.GetValues(const Name: string): string;
+begin
+  result := fListRef.Values[Name]
+end;
+
+function TROStrings.IndexOf(const aString: string): integer;
+begin
+  result := fListRef.IndexOf(aString)
+end;
+
+function TROStrings.IndexOfName(const aName: string): integer;
+begin
+  if (fListRef is TStringList)
+    then result := TStringList(fListRef).IndexOfName(aName)
+    else result := -1
+end;
+
+function TROStrings.RenameName(const aName : string) : boolean;
+var idx : integer;
+    curr : string;
+begin
+  // TODO: check this works...
+  idx := fListRef.IndexOfName(aName);
+  result := idx>=0;
+
+  if result then begin
+    curr := fListRef[idx];
+    fListRef[idx] := aName+Copy(curr, Pos('=', curr), MaxInt);
+  end;
+end;
+
+procedure TROStrings.SetDuplicates(Value: TDuplicates);
+begin
+  if (fListRef is TStringList) then
+    TStringList(fListRef).Duplicates := Value;
+end;
+
+procedure TROStrings.SetSorted(aValue: boolean);
+begin
+  if (fListRef is TStringList)
+    then TStringList(fListRef).Sorted := aValue
+end;
+
+procedure TROStrings.SetStrings(Index: integer; const Value: string);
+begin
+  fListRef[Index] := Value
+end;
+
+procedure TROStrings.SetText(const Value: string);
+begin
+  fListRef.Text := Value
+end;
+
+procedure TROStrings.SetValues(const Name, Value: string);
+begin
+  fListRef.Values[Name] := Value
+end;
+
+function TROStrings.GetObject(Index: Integer): TObject;
+begin
+  result := fListRef.Objects[Index];
+end;
+
+procedure TROStrings.PutObject(Index: Integer; const Value: TObject);
+begin
+  fListRef.Objects[Index] := Value;
+end;
+
+procedure TROStrings.Insert(Index: Integer; const S: string);
+begin
+  fListRef.Insert(Index, S);
+end;
+
+procedure TROStrings.InsertObject(Index: Integer; const S: string; AObject: TObject);
+begin
+  fListRef.InsertObject(Index, S, AObject);
+end;
+
+function TROStrings.GetCommaText: string;
+begin
+  result := fListRef.CommaText
+end;
+
+procedure TROStrings.SetCommaText(const Value: string);
+begin
+  fListRef.CommaText := Value
+end;
+
+{ TROThreadTimer }
+
+constructor TROThreadTimer.Create(aTimerEvent: TROTimerEvent; aTimeout: integer);
+begin
+  inherited Create(true);
+{$IFDEF MSWINDOWS}
+  fWakeUp := TEvent.Create(nil,False,False,'');
+  fFreeWaiting := nil;
+{$ENDIF}
+  fTimerEvent := aTimerEvent;
+  Timeout := aTimeout;  
+  Resume();
+end;
+
+destructor TROThreadTimer.Destroy;
+begin
+  if not Terminated then Terminate();
+{$IFDEF MSWINDOWS}
+  while fFreeWaiting <> nil do Sleep(1);
+  if fWakeUp <> nil then fWakeUp.SetEvent();
+  FreeAndNIL(fWakeUp);
+{$ENDIF}
+  inherited;
+end;
+
+procedure TROThreadTimer.Execute;
+{$IFNDEF MSWINDOWS}
+var
+  nexttime: Cardinal;
+{$ENDIF}
+begin
+//  inherited;
+
+  while not Terminated do begin
+  {$IFDEF MSWINDOWS}
+    fWakeUp.WaitFor(fTimeoutMS);
+  {$ELSE}
+    nexttime := GetTickCount + fTimeoutMS;
+    if nexttime < fTimeoutMS then // truncated integer
+    begin
+      while not terminated and (GetTickCount > $80000000) do
+        Sleep(10);
+    end;
+    while not terminated do
+    begin
+      Sleep(10);
+      if GetTickCount > nexttime then
+        break;
+    end;
+  {$ENDIF}
+    if (not Terminated) then
+    begin
+      if fSynchronized then
+        Synchronize(RunEvent)
+      else
+        RunEvent;
+    end;
+  end;
+end;
+
+procedure TROThreadTimer.RunEvent;
+begin
+  if Assigned(fTimerEvent) then
+  begin
+    fTimerEvent(GetTickCount());
+  end;
+end;
+
+function TROThreadTimer.GetTimeout: integer;
+begin
+  result := fTimeoutMS;
+end;
+
+procedure TROThreadTimer.SetTimeout(const Value: integer);
+begin
+  if (Value<MinTimerMS) then
+    fTimeoutMS := MinTimerMS
+  else
+    fTimeoutMS := Value;
+end;
+
+constructor TROThreadTimer.Create(aTimerEvent: TROTimerEvent;
+  aTimeout: integer; Synchronized: Boolean);
+begin
+  inherited Create(true);
+
+  {$IFDEF MSWINDOWS}
+  fWakeUp := TEvent.Create(nil,False,False,'');
+  fFreeWaiting := nil;
+  {$ENDIF}
+
+  fTimerEvent := aTimerEvent;
+  Timeout := aTimeout;
+  fSynchronized := Synchronized;
+  Resume();
+end;
+
+procedure TROThreadTimer.AsyncFree;
+begin
+  FreeOnTerminate := true;
+  fTimerEvent := nil;
+  Terminate;
+  {$IFDEF MSWINDOWS}
+  fWakeUp.SetEvent;
+  {$ENDIF}
+end;
+
+procedure TROThreadTimer.TerminateWaitFor;
+begin
+  Terminate;
+  WaitFor();
+end;
+
+{$IFDEF MSWINDOWS}
+function TROThreadTimer.WaitFor: DWord;
+var
+  lEvent: TROEvent;
+begin
+  result := 0;
+  if fIsTerminated then exit;
+  lEvent := TROEvent.Create(nil, false, false, '');
+  try
+    fFreeWaiting := lEvent;
+    Terminate;
+    fWakeUp.SetEvent;
+    while Suspended do Resume;
+    lEvent.WaitFor(INFINITE);
+    fFreeWaiting := nil;
+  finally
+    lEvent.Free;
+  end;
+  sleep(10); // make sure it''s actually terminated
+end;
+
+{$IFNDEF FPC}
+procedure TROThreadTimer.Free;
+begin
+  if self = nil then exit;
+  if ModuleIsLib then begin
+    // Windows doesn''t return from EndThread until DllMain, so waitfor never returns either.
+    if fIsTerminated then
+      Destroy
+    else begin
+      FreeOnTerminate := true;
+      WaitFor;
+    end;
+  end else
+    Destroy;
+end;
+{$ENDIF}
+
+procedure TROThreadTimer.DoTerminate;
+begin
+  inherited;
+  fIsTerminated := true;
+  if fFreeWaiting <> nil then
+    TROEvent(fFreeWaiting).SetEvent;
+end;
+{$ENDIF MSWINDOWS}
+
+{ TROInterfaceRegistry }
+
+constructor TROInterfaceRegistry.Create(aInterfaceType: TGUID);
+begin
+  inherited Create();
+  fInterfaceType := aInterfaceType;
+end;
+
+procedure TROInterfaceRegistry.Register(aInterface: IInterface);
+begin
+  //ToDo: if not Supports(aInterface,fInterfaceType) then RaiseError('Unsupported Interface Type.');
+  if IndexOf(aInterface) = -1 then Add(aInterface);
+end;
+
+procedure TROInterfaceRegistry.Unregister(aInterface: IInterface);
+var
+  lIndex:integer;
+begin
+  lIndex := IndexOf(aInterface);
+  if lIndex <> -1 then Delete(lIndex);
+end;
+
+{ TROStream }
+constructor TROStream.Create(aStream : TStream; OwnsStream : boolean);
+begin
+  inherited Create;
+
+  if not Assigned(aStream) then begin
+    fStreamRef := TMemoryStream.Create;
+    fOwnsStream := TRUE;
+  end
+  else begin
+    fStreamRef := aStream;
+    fOwnsStream := OwnsStream;
+  end;
+end;
+
+procedure TROStream.BeginUpdate;
+begin
+  Check(FChanging <> 0, 'Stream is already in UpdateMode');
+  inc(FChanging);
+end;
+
+constructor TROStream.Create;
+begin
+  Create(NIL, TRUE);
+end;
+
+destructor TROStream.Destroy;
+begin
+  if fOwnsStream
+    then fStreamRef.Free;
+
+  inherited;
+end;
+
+procedure TROStream.EndUpdate;
+begin
+  Check(FChanging = 0, 'Stream is not in UpdateMode');
+  dec(FChanging);
+  Changed;
+end;
+
+function TROStream.GetPosition: Int64;
+begin
+  result := fStreamRef.Position
+end;
+
+function TROStream.GetSize: Int64;
+begin
+  result := fStreamRef.Size
+end;
+
+function TROStream.GetStreamObj: TStream;
+begin
+  result := fStreamRef
+end;
+
+function TROStream.Read(var Buffer; Count: Integer): Longint;
+begin
+  result := fStreamRef.Read(Buffer, Count)
+end;
+
+procedure TROStream.ReadBuffer(var Buffer; Count: Integer);
+begin
+  fStreamRef.ReadBuffer(Buffer, Count);
+end;
+
+function TROStream.ReadComponent(Instance: TComponent): TComponent;
+begin
+  result := fStreamRef.ReadComponent(Instance)
+end;
+
+function TROStream.Seek(const Offset: Int64; Origin: TSeekOrigin): Int64;
+begin
+  {$IFDEF DELPHI5}
+  result := fStreamRef.Seek(Offset, word(Origin));
+  {$ELSE}
+  result := fStreamRef.Seek(Offset, Origin);
+  {$ENDIF DELPHI5}
+end;
+
+function TROStream.Seek(Offset: Integer; Origin: Word): Longint;
+begin
+  result := fStreamRef.Seek(Offset, Origin);
+end;
+
+procedure TROStream.SetPosition(const aValue: Int64);
+begin
+  fStreamRef.Position := aValue;
+end;
+
+procedure TROStream.SetSize(const aValue: Int64);
+begin
+  fStreamRef.Size := aValue;
+  Changed;
+end;
+
+function TROStream.Write(const Buffer; Count: Integer): Longint;
+begin
+  result := fStreamRef.Write(Buffer, Count);
+  Changed;
+end;
+
+procedure TROStream.WriteBuffer(const Buffer; Count: Integer);
+begin
+  fStreamRef.WriteBuffer(Buffer, Count);
+  Changed;
+end;
+
+procedure TROStream.WriteComponent(Instance: TComponent);
+begin
+  fStreamRef.WriteComponent(Instance);
+  Changed;
+end;
+
+procedure TROStream.Changed;
+begin
+  if (FChanging = 0) and Assigned(FOnChange) then FOnChange(Self);
+end;
+
+function TROStream.InUpdateMode: Boolean;
+begin
+  Result:= FChanging<>0;
+end;
+
+{ TROCollection }
+
+function TROCollection.GetIndex(const aPropertyName: string;
+  const aPropertyValue: Variant; StartFrom: integer;
+  Options: TROSearchOptions): integer;
+var i : integer;
+    val : Variant;
+    curritem : TObject;
+begin
+  result := -1;
+
+  for i := StartFrom to (Count-1) do begin
+    curritem := Items[i];
+    if (curritem=NIL) then Continue;
+
+    val := GetPropValue(curritem, aPropertyName, FALSE);
+
+    if (soIgnoreCase in Options) then begin
+      if (VarToStr(val)=VarToStr(aPropertyValue)) then begin
+        result := i;
+        Exit;
+      end;
+    end
+    else begin
+      if (val=aPropertyValue) then begin
+        result := i;
+        Exit;
+      end;
+    end;
+  end;
+end;
+
+function TROCollection.Search(const aPropertyName : string;
+  const aPropertyValue : Variant; StartFrom : integer = 0;
+  Options : TROSearchOptions = [soIgnoreCase]) : TCollectionItem;
+var idx : integer;
+begin
+  idx := GetIndex(aPropertyName, aPropertyValue, StartFrom, Options);
+  if (idx>=0)
+    then result := Items[idx]
+    else result := NIL;
+end;
+
+{ TROConstantMemoryStream }
+
+constructor TROConstantMemoryStream.Create(aStream: TCustomMemoryStream; aFreeOldStream: boolean=false);
+var
+  lSize: longint;
+  lMemory: Pointer;
+begin
+  inherited Create();
+  lSize := aStream.Size;
+  {$IFDEF FPC}lMemory := nil; {$ENDIF}
+  GetMem(lMemory, lSize);
+  Move(aStream.Memory^, lMemory^, lSize);
+  SetPointer(lMemory, lSize);
+  if aFreeOldStream then
+    aStream.Free();
+end;
+
+destructor TROConstantMemoryStream.Destroy;
+begin
+  FreeMem(Memory);
+  inherited;
+end;
+
+function TROConstantMemoryStream.Write(const Buffer; Count: Integer): Integer;
+begin
+  result := 0; // else it will warn
+  RaiseError(err_StreamIsReadOnly);
+end;
+
+{ TROInterfacedObject }
+
+function TROInterfacedObject.QueryInterface(const IID: TGUID;
+  out Obj): HResult;
+begin
+  if GetInterface(IID, Obj) then
+    Result := 0
+  else
+    Result := E_NOINTERFACE;
+end;
+
+function TROInterfacedObject._AddRef: Integer;
+begin
+  Result := InterlockedIncrement(FRefCount);
+end;
+
+function TROInterfacedObject._Release: Integer;
+begin
+  Result := InterlockedDecrement(FRefCount);
+  if Result = 0 then
+    Destroy;
+end;
+
+procedure TROInterfacedObject.AfterConstruction;
+begin
+  // Release the constructor''s implicit refcount
+  InterlockedDecrement(FRefCount);
+end;
+
+procedure TROInterfacedObject.BeforeDestruction;
+begin
+  if RefCount <> 0 then
+{$IFDEF FPC}
+    raise Exception.Create('Invalid Pointer Operation');
+{$ELSE}
+    System.Error(reInvalidPtr);
+{$ENDIF}
+end;
+
+// Set an implicit refcount so that refcounting
+// during construction won''t destroy the object.
+class function TROInterfacedObject.NewInstance: TObject;
+begin
+  Result := inherited NewInstance;
+  TROInterfacedObject(Result).FRefCount := 1;
+end;
+
+{$IFNDEF MSWINDOWS}
+constructor TROEvent.Create(Dummy: Pointer; ManualReset, InitialVal: Boolean;
+  Name: string);
+begin
+  inherited Create;
+  sem_init(FEvent, 0, Byte(InitialVal));
+end;
+
+destructor TROEvent.Destroy;
+begin
+  sem_destroy(FEvent);
+  inherited Destroy;
+end;
+
+procedure TROEvent.SetEvent;
+var
+  i: Integer;
+begin
+  {$IFDEF FPC}
+  i:=0;
+  {$ENDIF}
+  sem_getvalue(FEvent,I);
+  if I = 0 then
+    sem_post(FEvent);
+end;
+
+{$IFDEF DARWIN}
+{ from /developers/SDKs/MACOSX10.5.sdk/usr/include/mach/samaphore.h
+extern kern_return_t semaphore_timedwait (semaphore_t semaphore, mach_timespec_t wait_time;
+}
+function semaphore_timedwait(__sem:cint;wait_time: timespec):cint;cdecl;external 'c'  name 'semaphore_timedwait';
+
+function sem_timedwait(__sem:cint;wait_time: timespec):cint;
+begin
+  Result := semaphore_timedwait(__sem,wait_time);
+end;
+{$ENDIF}
+
+function TROEvent.WaitFor(Timeout: LongWord): TWaitResult;
+var
+  inttimeout: timespec;
+begin
+  if Timeout = Cardinal($FFFFFFFF) then
+  begin
+    if sem_Wait(FEvent) = 0 then
+      result := wrSignaled
+    else
+      result := wrTimeout;
+  end
+  else begin
+    inttimeout.tv_sec := fptime + (timeout div 1000);
+    inttimeout.tv_nsec := (timeout mod 1000);
+    if sem_timedwait(FEvent, inttimeout) = 0 then
+      Result := wrSignaled
+    else
+      Result := wrTimeout;
+  end;
+end;
+procedure TROEvent.ResetEvent;
+begin
+end;
+{$ENDIF}
+
+{$IFDEF MSWINDOWS}
+function ROWideCompare(const S1, S2: WideString; aCaseInsensitive: Boolean; aLocale: LCID = LOCALE_USER_DEFAULT): Integer;
+var
+  dwCmpFlags: integer;
+  ls1,ls2: AnsiString;
+begin
+  SetLastError(0);
+  if aCaseInsensitive then
+    dwCmpFlags := NORM_IGNORECASE
+  else
+    dwCmpFlags := 0;
+  if Win32Platform = VER_PLATFORM_WIN32_NT then
+    Result := CompareStringW(ALocale, dwCmpFlags, PWideChar(S1), Length(S1), PWideChar(S2), Length(S2)) - 2
+  else begin
+  {$WARNINGS OFF}
+    ls1:= s1;
+    ls2:= s2;
+  {$WARNINGS ON}
+    Result := CompareStringA(ALocale, dwCmpFlags, PAnsiChar(ls1), Length(ls1), PAnsiChar(ls2), Length(ls2)) - 2
+  end;
+  if GetLastError <>0 then RaiseLastOSError;
+end;
+
+function ROAnsiCompare(const S1, S2: AnsiString; aCaseInsensitive: Boolean; aLocale: LCID = LOCALE_USER_DEFAULT): Integer;
+var
+  dwCmpFlags: integer;
+begin
+  SetLastError(0);
+  if aCaseInsensitive then
+    dwCmpFlags := NORM_IGNORECASE
+  else
+    dwCmpFlags := 0;
+  Result := CompareStringA(ALocale, dwCmpFlags, PAnsiChar(s1), Length(s1), PAnsiChar(s2), Length(s2)) - 2;
+  if GetLastError <>0 then RaiseLastOSError;
+end;
+{$ENDIF}
+
+{$IFNDEF MSWINDOWS}
+function ROWideCompare(const S1, S2: WideString; aCaseInsensitive: Boolean): Integer;
+begin
+  if aCaseInsensitive then
+    Result:= WideCompareText(s1, s2)
+  else
+    Result:= WideCompareStr(s1, s2)
+end;
+
+function ROAnsiCompare(const S1, S2: AnsiString; aCaseInsensitive: Boolean): Integer;
+begin
+  if aCaseInsensitive then
+    Result:= AnsiCompareText(s1, s2)
+  else
+    Result:= AnsiCompareStr(s1, s2)
+end;
+{$ENDIF}
+
+function ROVariantsEqual(const A, B: Variant): Boolean;
+
+  function VarCompareArray(const A, B: Variant): TVariantRelationship;
+  const
+    varArrayOfByte = varArray or varByte;
+  var
+    lALen, lBLen: Integer;
+    lAPtr, lBPtr: Pointer;
+  begin
+    // The only type of variant arrays we expect to find is variant array of byte
+    // All other types are not supported by this simple procedure
+    Result := vrNotEqual;
+    if VarIsType(A, varArrayOfByte) and VarIsType(B, varArrayOfByte) then
+    begin
+      lALen := VarArrayHighBound(A, 1) - VarArrayLowBound(A, 1) + 1;
+      lBLen := VarArrayHighBound(B, 1) - VarArrayLowBound(B, 1) + 1;
+      if lALen <> lBLen then Exit;
+
+      lAPtr := nil;
+      lBPtr := nil;
+      try
+        lAPtr := VarArrayLock(A);
+        lBPtr := VarArrayLock(B);
+        if CompareMem(lAPtr, lBPtr, lALen) then Result := vrEqual;
+      finally
+        if Assigned(lAPtr) then VarArrayUnlock(A);
+        if Assigned(lBPtr) then VarArrayUnlock(B);
+      end;
+    end;
+  end;
+
+begin
+  if VarIsArray(A) xor VarIsArray(B) then
+    Result := False
+  else
+  if VarIsArray(A) and VarIsArray(B) then
+    Result := VarCompareArray(A, B) = vrEqual
+  else
+    if (VarType(A) = VarType(B)) then
+      case VarType(A) of
+        varUString, varOleStr: Result:= ROWideCompare(VarToWideStr(A),VarToWideStr(B),False) = 0;
+        varString : Result:= ROAnsiCompare(VarToAnsiStr(A),VarToAnsiStr(B),False) = 0;
+      else
+        Result := VarCompareValue(A, B) = vrEqual;
+      end
+    else
+      Result := VarCompareValue(A, B) = vrEqual;
+end;
+
+{ EROException }
+
+class function EROException.GetAttributeCount: Integer;
+begin
+  result := 0;
+end;
+
+class function EROException.GetAttributeName(aIndex: Integer): string;
+begin
+  result := '';
+end;
+
+class function EROException.GetAttributeValue(aIndex: Integer): string;
+begin
+  result := '';
+end;
+
+destructor EROException.Destroy;
+var props : PPropList;
+    cnt, i : integer;
+    sub : TObject;
+    lName : string;
+begin
+  cnt := GetTypeData(ClassInfo).PropCount;
+  if (cnt=0) then Exit;
+  {$IFDEF FPC}
+  props := nil;
+  {$ENDIF}
+  GetMem(props, cnt*SizeOf(PPropInfo));
+  try
+    cnt := GetPropList(ClassInfo, [tkClass], props);
+
+    for i := 0 to (cnt-1) do begin
+      with props^[i]^ do
+        if (PropType^.Kind=tkClass) then begin
+          lName := {$IFDEF UNICODE}UTF8ToString{$ENDIF}(Name); 
+          sub := GetObjectProp(Self, lName);
+          sub.Free;
+        end;
+    end;
+  finally
+    FreeMem(props, cnt*SizeOf(PPropInfo));
+  end;
+
+  inherited;
+end;
+
+procedure EROException.ReadException(ASerializer: TObject);
+begin
+  TROBaseSerializer(ASerializer).ReadObject(Self);
+end;
+
+procedure EROException.WriteException(ASerializer: TObject);
+begin
+  TROBaseSerializer(ASerializer).WriteObject(Self);
+end;
+
+{ TROInitializedThread }
+
+constructor TROInitializedThread.Create(CreateSuspended: Boolean);
+begin
+  FInitialize := ROInitializeThreads;
+  {$IFDEF MSWINDOWS}
+  if FInitialize then CoInitialize(nil);
+  {$ENDIF}
+  inherited Create(CreateSuspended);
+end;
+
+destructor TROInitializedThread.Destroy;
+begin
+  inherited;
+  {$IFDEF MSWINDOWS}
+  if FInitialize then CoUninitialize;
+  {$ENDIF}
+end;
+
+end.
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROClient.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROClient.pas
new file mode 100644
index 0000000..32a1f43
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROClient.pas	
@@ -0,0 +1,2252 @@
+unit uROClient;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  {$IFDEF RemObjects_UseEncryption}uROEncryption,{$ENDIF}
+  Classes, SysUtils, TypInfo,
+  uRODL, uROSerializer, uROClientIntf, uROClasses, uROAsync;
+
+type
+  TEnvelopeSignature = array[0..4] of AnsiChar;
+
+const
+  EnvelopeSignature : TEnvelopeSignature =    ( #82,  #79,  #69,  #78, #86); //'ROENV';
+  {
+   // 52 4F 45 4E 56 = 'ROENV'  signature
+   // XX             = length of name of envelope
+   // YY ...         = Name of envelope
+  }
+
+const
+  EmptyGUID : TGUID = '{00000000-0000-0000-0000-000000000000}';
+
+  MetadataRequestIDLength = 4;
+  MetadataRequestID : array[0..MetadataRequestIDLength-1] of ansichar = 'RODL';
+
+  ProbeRequestIDLength = 5;
+  ProbeRequestID : array[0..ProbeRequestIDLength-1] of ansichar = 'PROBE';
+
+  ProbeResponseIDLength = 8;
+  ProbeResponseID : array[0..ProbeResponseIDLength-1] of ansichar = 'PROBEDOK';
+
+  name_Exception = 'ROException'; // User by the message components to write exceptions
+  DataFormatXml = 'text/xml; charset="utf-8"';
+  DataFormatBinary = 'application/binary';
+
+type
+
+  TROCustomRODLReader = class;
+  TROMessage = class;
+  TROTransportChannel = class;
+
+  EROChannelBusy = class(EROException);
+
+  EROUnknownType = class(EROUnknownItem);
+  EROMessageTooLarge = class(EROException);
+
+  EROSessionNotFound = class(EROException);
+  EROSessionExpired = class(EROSessionNotFound);
+  SessionNotFoundException = class(EROSessionNotFound);
+
+  TROEventSinkType = (esWriter, esReader);
+  { TROProxy }
+
+  TROProxy = class(TInterfacedObject, IUnknown)
+  private
+    fMessage,
+    fTransportChannel : pointer;
+    // Weak references because the Application frees the components before ref counting steps in. This results in AVs
+
+    fInterfaceName : string;
+
+    function _GetMessage: IROMessage;  // cannot use "GetMessage" name for C++Builder compatibility
+    function GetTransportChannel: IROTransportChannel;
+    function GetInterfaceName:string;
+
+  protected
+    function __GetInterfaceName:string; virtual; abstract;
+
+  public
+    constructor Create(const aMessage : IROMessage; const aTransportChannel : IROTransportChannel); overload; virtual;
+
+    // Added to support polymorphic invocation in Data Abstract. Shouldn't be used in regular situations.
+    constructor Create(const anInterfaceName : string;
+                       const aMessage : IROMessage;
+                       const aTransportChannel : IROTransportChannel); overload; virtual;
+
+    property __Message : IROMessage read _GetMessage;
+    property __TransportChannel : IROTransportChannel read GetTransportChannel;
+    property __InterfaceName:string read GetInterfaceName;
+  end;
+
+  TROProxyClass = class of TROProxy;
+
+  { TROComponent }
+  TROComponent = class(TComponent)
+  end;
+
+  { TROMessageAwareComponent }
+  TROMessageAwareComponent = class(TROComponent)
+  private
+    fMessage: TROMessage;
+
+  protected
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+    procedure SetMessage(const Value: TROMessage); virtual;
+
+  public
+    property Message : TROMessage read fMessage write SetMessage;
+  end;
+
+  { TROChannelAwareComponent }
+  TROChannelAwareComponent = class(TROMessageAwareComponent)
+  private
+    fChannel: TROTransportChannel;
+
+  protected
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+    procedure SetChannel(const Value: TROTransportChannel); virtual;
+
+  public
+    property Channel : TROTransportChannel read fChannel write SetChannel;
+  end;
+
+  { TROMessage }
+  TStreamOperation = procedure(aStream : TStream) of object;
+
+  TROServerExceptionEvent = procedure(anException : Exception; var RaiseException: boolean) of object;
+  TROInitializeMessageEvent = procedure(Sender : TROMessage; const aTransport : IROTransport; const anInterfaceName, aMessageName : string) of object;
+  TROFinalizeMessageEvent = procedure(Sender : TROMessage) of object;
+  TROWriteMessageParameterEvent = procedure(Sender : TROMessage; const aName : string; aTypeInfo : PTypeInfo; const DataRef : pointer; Attributes : TParamAttributes) of object;
+  TROReadMessageParameterEvent = procedure(Sender : TROMessage; const aName : string; aTypeInfo : PTypeInfo; const DataRef : pointer; Attributes : TParamAttributes) of object;
+  TROWriteExceptionEvent = procedure(Sender : TROMessage; aStream: TStream; E : Exception) of object;
+
+
+  { TROCustomRODLReader }
+  TROReadRODLEvent = procedure(aRODLReader : TROCustomRODLReader; aStream : TStream) of object;
+
+  TROCustomRODLReader = class(TROComponent)
+  private
+    fOnBeforeReadRODL: TROReadRODLEvent;
+    fOnAfterReadRODL: TROReadRODLEvent;
+
+  protected
+    procedure DoReadRODLResource(aStream : TStream); virtual; abstract;
+
+  public
+    procedure ReadRODLResource(aStream : TStream);
+
+  published
+    property OnBeforeReadRODL : TROReadRODLEvent read fOnBeforeReadRODL write fOnBeforeReadRODL;
+    property OnAfterReadRODL : TROReadRODLEvent read fOnAfterReadRODL write fOnAfterReadRODL;
+  end;
+
+  TROMessageEnvelope = class;
+  TROMessageEnvelopeItem = class;
+  TROMessageEnvelopeCollection = class;
+  TROMessageEnvelopeMode = (memOutgoing, memIncoming);
+
+  { TROMessage }
+  TROMessage = class(TROComponent, IUnknown, IROMessage, IROMessageCloneable, IROModuleInfo)
+  private
+    fSerializer : TROSerializer;
+    fMessageName,
+    fInterfaceName : string;
+    fOnReadFromStream: TStreamOperation;
+    fOnWriteToStream: TStreamOperation;
+    fOnServerException: TROServerExceptionEvent;
+
+    fRefCount:integer;
+    fReferenceCounted:boolean;
+    fClientID : TGUID;
+    fRODLReader: TROCustomRODLReader;
+    fOnFinalizeMessage: TROFinalizeMessageEvent;
+    fOnInitializeMessage: TROInitializeMessageEvent;
+    fOnReadMessageParameter: TROReadMessageParameterEvent;
+    fOnWriteMessageParameter: TROWriteMessageParameterEvent;
+    fOnWriteException: TROWriteExceptionEvent;
+    fAddServerExceptionPrefix: boolean;
+    fEnvelopes: TROMessageEnvelopeCollection;
+    fBeforeProcessIncomingEnvelopes: TStreamOperation;
+    fAfterProcessOutgoingEnvelopes: TStreamOperation;
+    fAfterProcessIncomingEnvelopes: TStreamOperation;
+    fBeforeProcessOutgoingEnvelopes: TStreamOperation;
+
+    procedure SetRODLReader(const Value: TROCustomRODLReader);
+    procedure TriggerOnWriteToStream(aStream: TStream);
+    procedure SetEnvelopes(const Value: TROMessageEnvelopeCollection);
+
+  protected
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+
+    procedure ProcessException;
+    function ReadException : Exception; virtual; abstract;
+    function CreateException(const aExceptionName, aMessage: string): Exception;
+
+    { Internals }
+    procedure InitObject; virtual;
+    function CreateSerializer : TROSerializer; virtual; abstract;
+
+    { IROUnknown }
+
+    function _AddRef:integer; stdcall;
+    function _Release:integer; stdcall;
+
+    { IROMessage }
+    procedure Initialize(const aTransport : IROTransport; const anInterfaceName, aMessageName : string; aType: TMessageType); overload; virtual;
+    procedure Initialize(const aTransport : IROTransport; const aLibraryName, anInterfaceName, aMessageName : string; aType: TMessageType); overload; virtual;
+    procedure InitializeRead(const aTransport : IROTransport); virtual;
+
+    procedure InitializeRequestMessage(const aTransport : IROTransport; const aLibraryName, anInterfaceName, aMessageName : string);
+    procedure InitializeResponseMessage(const aTransport : IROTransport; const aLibraryName, anInterfaceName, aMessageName : string);
+    procedure InitializeEventMessage(const aTransport : IROTransport; const aLibraryName, anInterfaceName, aMessageName : string);
+    procedure InitializeExceptionMessage(const aTransport : IROTransport; const aLibraryName, anInterfaceName, aMessageName : string); virtual;
+
+    procedure Finalize; virtual;
+
+    {$IFDEF DOTNET}
+    {$ELSE}
+    procedure Write(const aName : string; aTypeInfo : PTypeInfo; const Ptr; Attributes : TParamAttributes); virtual;
+    procedure Read(const aName : string; aTypeInfo : PTypeInfo; var Ptr; Attributes : TParamAttributes); virtual;
+    {$ENDIF}
+
+    function GetClientID : TGUID; virtual;
+    procedure SetClientID(const Value : TGUID); virtual;
+
+    function GetMessageName : string;
+    function GetInterfaceName : string;
+
+    procedure SetInterfaceName(const aValue : string);
+    procedure SetMessageName(const aValue : string);
+
+    procedure WriteToStream(aStream : TStream); virtual;
+    procedure ReadFromStream(aStream : TStream); overload; virtual;
+    procedure ReadFromStream(aStream : TStream; var aFreeStream: Boolean); overload; virtual;
+
+    procedure WriteException(aStream : TStream; anException : Exception); virtual;
+
+    procedure FreeStream; virtual;
+    function GetMessageType: TMessageType; virtual;
+
+    { Writers }
+    procedure WriteInteger(const aName : string; anOrdType : TOrdType; const Ref; ArrayElementId : integer = -1);
+    procedure WriteInt64(const aName : string; const Ref; ArrayElementId : integer = -1);
+    procedure WriteEnumerated(const aName : string; anEnumTypeInfo : PTypeInfo; const Ref; ArrayElementId : integer = -1);
+    procedure WriteUTF8String(const aName : string; const Ref; ArrayElementId : integer = -1);
+    procedure WriteAnsiString(const aName : string; const Ref; ArrayElementId : integer = -1);
+    procedure WriteWideString(const aName : string; const Ref; ArrayElementId : integer = -1);
+    procedure WriteDateTime(const aName : string; const Ref; ArrayElementId : integer = -1);
+    procedure WriteDouble(const aName : string; aFloatType : TFloatType; const Ref; ArrayElementId : integer = -1);
+    procedure WriteVariant(const aName : string; const Ref; ArrayElementId : integer = -1);
+    procedure WriteXml(const aName : string; const Ref; ArrayElementId : integer = -1);
+    procedure WriteGuid(const aName : string; const Ref; ArrayElementId : integer = -1);
+    procedure WriteDecimal(const aName : string; const Ref; ArrayElementId : integer = -1);
+    procedure WriteStruct(const aName : string; const Ref; aClass: TClass = nil;ArrayElementId : integer = -1);
+    procedure WriteArray(const aName : string; const Ref; aClass: TClass = nil;ArrayElementId : integer = -1);
+    procedure WriteBinary(const aName : string; const Ref; ArrayElementId : integer = -1);
+    { Readers }
+    procedure ReadInteger(const aName : string; anOrdType : TOrdType; var Ref; ArrayElementId : integer = -1);
+    procedure ReadInt64(const aName : string; var Ref; ArrayElementId : integer = -1);
+    procedure ReadEnumerated(const aName : string; anEnumTypeInfo : PTypeInfo; var Ref; ArrayElementId : integer = -1);
+    procedure ReadUTF8String(const aName : string; var Ref; ArrayElementId : integer = -1; iMaxLength:integer=-1);
+    procedure ReadAnsiString(const aName : string; var Ref; ArrayElementId : integer = -1; iMaxLength:integer=-1);
+    procedure ReadWideString(const aName : string; var Ref; ArrayElementId : integer = -1; iMaxLength:integer=-1);
+    procedure ReadDateTime(const aName : string; var Ref; ArrayElementId : integer = -1);
+    procedure ReadDouble(const aName : string; aFloatType : TFloatType; var Ref; ArrayElementId : integer = -1);
+    procedure ReadVariant(const aName : string; var Ref; ArrayElementId : integer = -1);
+    procedure ReadXml(const aName : string; var Ref; ArrayElementId : integer = -1);
+    procedure ReadGuid(const aName : string; var Ref; ArrayElementId : integer = -1);
+    procedure ReadDecimal(const aName : string; var Ref; ArrayElementId : integer = -1);
+    function ReadStruct(const aName : string; aClass : TClass; var Ref; ArrayElementId : integer = -1): Boolean;
+    function ReadArray(const aName : string; aClass : TClass; var Ref; ArrayElementId : integer = -1): Boolean;
+    procedure ReadBinary(const aName : string; var Ref; ArrayElementId : integer = -1);
+    { IROModuleInfo }
+
+    procedure GetModuleInfo(aStream : TStream; const aTransport : IROTransport; var aFormat : TDataFormat); virtual;
+    procedure GetRodlInfo(aStream : TStream; const aTransport : IROTransport; var aFormat : TDataFormat); overload;
+
+    { IROMessageClonable }
+    function Clone: IROMessage;
+    procedure SetAttributes(aTransport: IROTransport;
+      const aNames: array of String; const aValues: array of String); virtual;
+    procedure UnsetAttributes(aTransport: IROTransport); virtual;
+  // Envelopes
+    procedure WriteEnvelopeHeader(aEnvelope: TROMessageEnvelope; AStream: TStream);
+    function CheckForEnvelope(aStream: TStream; var aEnvelopeName: String): boolean;
+    procedure Envelopes_ProcessIncoming(aStream: TStream);
+    procedure Envelopes_ProcessOutgoing(aStream: TStream);
+  public
+    constructor CreateRefCountedClone(iMessage:TROMessage); virtual;
+    constructor Create; reintroduce; overload; virtual;
+    constructor Create(aOwner : TComponent); overload; override;
+    destructor Destroy; override;
+
+    procedure Assign(iSource:TPersistent); override;
+
+    property Serializer : TROSerializer read fSerializer;
+
+    property MessageName : string read GetMessageName write SetMessageName;
+    property InterfaceName : string read GetInterfaceName write SetInterfaceName;
+
+    property ClientID:TGuid read GetClientID write SetClientID;
+    function IsValidMessage(aData: PAnsiChar; aLength: Integer): boolean; virtual; abstract;
+    procedure CheckProperties; virtual;
+  published
+    property OnWriteToStream : TStreamOperation read fOnWriteToStream Write fOnWriteToStream;
+    property OnReadFromStream : TStreamOperation read fOnReadFromStream Write fOnReadFromStream;
+    property OnServerException : TROServerExceptionEvent read fOnServerException write fOnServerException;
+
+    property RODLReader : TROCustomRODLReader read fRODLReader write SetRODLReader;
+    property AddServerExceptionPrefix: boolean read fAddServerExceptionPrefix write fAddServerExceptionPrefix default true;
+
+    property OnInitializeMessage : TROInitializeMessageEvent read fOnInitializeMessage write fOnInitializeMessage;
+    property OnFinalizeMessage : TROFinalizeMessageEvent read fOnFinalizeMessage write fOnFinalizeMessage;
+    property OnWriteMessageParameter : TROWriteMessageParameterEvent read fOnWriteMessageParameter write fOnWriteMessageParameter;
+    property OnReadMessageParameter : TROReadMessageParameterEvent read fOnReadMessageParameter write fOnReadMessageParameter;
+    property OnWriteException: TROWriteExceptionEvent read fOnWriteException write fOnWriteException;
+    property OnBeforeProcessOutgoingEnvelopes: TStreamOperation read fBeforeProcessOutgoingEnvelopes write fBeforeProcessOutgoingEnvelopes;
+    property OnAfterProcessOutgoingEnvelopes: TStreamOperation read fAfterProcessOutgoingEnvelopes write fAfterProcessOutgoingEnvelopes;
+    property OnBeforeProcessIncomingEnvelopes: TStreamOperation read fBeforeProcessIncomingEnvelopes write fBeforeProcessIncomingEnvelopes;
+    property OnAfterProcessIncomingEnvelopes: TStreamOperation read fAfterProcessIncomingEnvelopes write fAfterProcessIncomingEnvelopes;
+    property Envelopes : TROMessageEnvelopeCollection read fEnvelopes write SetEnvelopes;
+  end;
+
+  TROMessageClass = class of TROMessage;
+  ExceptionClass = class of Exception;
+
+  { TROTransportChannel }
+  TRODispatchOption = (doFaultTolerant, doLoadBalanced);
+  TRODispatchOptions = set of TRODispatchOption;
+
+  TROBeginProbeServersEvent = procedure(Sender : TROTransportChannel) of object;
+  TROEndProbeServersEvent = procedure(Sender : TROTransportChannel; ProbedCount, EnabledCount, DisabledCount : integer) of object;
+
+  TROBeginProbeServerEvent = procedure(Sender : TROTransportChannel; aServerLocator : TROServerLocator) of object;
+  TROEndProbeServerEvent = procedure(Sender : TROTransportChannel; aServerLocator : TROServerLocator; Failed : boolean) of object;
+
+  TStreamDispatch = procedure(aStream : TStream) of object;
+
+  TServerLocatorAssignment = procedure(Sender : TROTransportChannel;
+                                       aLocator : TROServerLocator;
+                                       aException : Exception) of object;
+
+  TProgressType = (ptUnknown, ptStart, ptInProgress, ptDone);
+  TProgressDirection = (pdUnknown, pdSending, pdReceiving);
+  TProgressEvent = procedure(iSender:TObject; iType:TProgressType; iDirection:TProgressDirection; iTransferred,iTotal:integer) of object;
+
+  TROExceptionEvent = procedure(Sender: TROTransportChannel; anException: Exception; var aRetry: Boolean) of object;
+
+
+  { TROBaseConnection }
+  TROBaseConnection = class(TROComponent)
+  private
+    {$IFDEF RemObjects_UseEncryption}
+    fEncryption: TROEncryption;
+    procedure SetEncryption(NewValue: TROEncryption);
+    {$ENDIF}
+  protected
+  public
+    constructor Create(aOwner: TComponent); override;
+    destructor Destroy; override;
+
+    {$IFDEF RemObjects_UseEncryption}
+    procedure DoEncryption(iPlainText, iCipherText: TStream); virtual;
+    procedure DoDecryption(iCipherText, iPlainText: TStream); virtual;
+    {$ENDIF}
+
+  published
+    {$IFDEF RemObjects_UseEncryption}
+    property Encryption: TROEncryption read fEncryption write SetEncryption;
+    {$ENDIF}
+  end;
+
+  TROAsyncExceptionEvent = procedure(Sender: TROTransportChannel; Async: IROAsyncInterface; anException: Exception) of object;
+
+  {$ifdef REMOBJECTS_UseEncryption}
+  TROTransportChannel = class(TROBaseConnection, IROTransportChannel, IROTransport, IROMetadataReader,IROTransportChannelAsyncException)
+  {$else}
+  TROTransportChannel = class(TComponent, IROTransportChannel, IROTransport, IROMetadataReader,IROTransportChannelAsyncException)
+  {$endif}
+  private
+    fOnReceiveStream : TStreamDispatch;
+    fOnSendStream : TStreamDispatch;
+    fBusy: boolean;
+    fOnProgress: TProgressEvent;
+    fServerLocators: TROServerLocatorCollection;
+    fOnServerLocatorAssignment : TServerLocatorAssignment;
+    fDispatchOptions: TRODispatchOptions;
+
+    fCurrentLocator : TROServerLocator;
+
+    fLoadBalancerLocatorIdx,
+    fFaultToleranceLocatorIdx : integer;
+    fProbingClone : TROTransportChannel;
+
+    fProbeTimer : TROThreadTimer;
+    fLoadedProbeServers,
+    fProbeServers: boolean;
+    fProbeFrequency: cardinal;
+    fOnBeforeProbingServers: TROBeginProbeServersEvent;
+    fOnAfterProbingServers: TROEndProbeServersEvent;
+    fOnBeforeProbingServer: TROBeginProbeServerEvent;
+    fOnAfterProbingServer: TROEndProbeServerEvent;
+    fSynchronizedProbing: Boolean;
+    fOnLoginNeeded: TROExceptionEvent;
+    fOnException: TROExceptionEvent;
+    fThreadSafe: Boolean;
+    fOnAsyncException: TROAsyncExceptionEvent;
+
+    { IROTransportChannel }
+    procedure Dispatch(aRequest, aResponse : TStream); reintroduce; overload;
+
+    procedure SetProbeFrequency(const Value: cardinal);
+    procedure SetProbeServers(const Value: boolean);
+    procedure SetServerLocators(const Value: TROServerLocatorCollection);
+    procedure SetCurrentLocator(const Value: TROServerLocator);
+    procedure OnProbeTimerTick(Dummy: Cardinal);
+    procedure SetSynchronizedProbing(const Value: Boolean);
+  protected
+    function intInitServerLocator:Integer;
+    procedure intChangeServerLocator(var faultstartlocatoridx: integer; var aRetry: Boolean; const aException: Exception);
+    function InitServerLocator:Integer; virtual;
+    procedure ChangeServerLocator(var faultstartlocatoridx: integer; var aRetry: Boolean; const aException: Exception); virtual;
+  protected
+    property ThreadSafe: Boolean read fThreadSafe write fThreadSafe;
+    procedure Loaded; override;
+    { IROTransport }
+    function GetTransportObject : TObject; virtual; abstract;
+
+    { IROTransportChannel }
+    procedure Dispatch(aMessage: IROMessage); reintroduce; overload;
+    function Probe(aServerLocator : TROServerLocator) : boolean;
+    procedure ProbeAll;
+    procedure SetServerLocator(aServerLocator : TROServerLocator; anException : Exception = NIL);
+    { IROTransportChannelAsyncException }
+    procedure AsyncException(aAsyncInterface: IROAsyncInterface; AsyncException: Exception);
+
+    { IROMetadataReader }
+    procedure RetrieveMetadata(out Metadata : TStream); virtual;
+    procedure RetrieveRODL(out RODLLibrary : TRODLLibrary);
+
+    { TROTransportChannel }
+    procedure IntDispatch(aRequest, aResponse : TStream); virtual; abstract;
+    procedure IntSetServerLocator(aServerLocator : TROServerLocator); virtual; abstract;
+
+    procedure TriggerProgress(iType:TProgressType; iDirection:TProgressDirection; iTransfered,iTotal:integer);
+
+    procedure BeforeDispatch(aMessage: IROMessage); virtual;
+  public
+    constructor Create(aOwner : TComponent); override;
+    destructor Destroy; override;
+
+    procedure Assign(aSource : TPersistent); override;
+
+    property CurrentLocator : TROServerLocator read fCurrentLocator write SetCurrentLocator;
+
+    property Busy : boolean read fBusy;
+    property LoadBalancerLocatorIdx : Integer read fLoadBalancerLocatorIdx write fLoadBalancerLocatorIdx;
+    property FaultToleranceLocatorIdx : integer read fFaultToleranceLocatorIdx write fFaultToleranceLocatorIdx;
+    procedure CheckProperties; virtual;
+  public
+    property SynchronizedProbing: Boolean read fSynchronizedProbing write SetSynchronizedProbing default true;
+    property OnSendStream : TStreamDispatch read fOnSendStream write fOnSendStream;
+    property OnReceiveStream : TStreamDispatch read fOnReceiveStream write fOnReceiveStream;
+    property OnServerLocatorAssignment : TServerLocatorAssignment read fOnServerLocatorAssignment write fOnServerLocatorAssignment;
+    property ProbeServers : boolean read fProbeServers write SetProbeServers default false;
+    property ProbeFrequency : cardinal read fProbeFrequency write SetProbeFrequency default 60000;
+    property OnBeforeProbingServers : TROBeginProbeServersEvent read fOnBeforeProbingServers write fOnBeforeProbingServers;
+    property OnAfterProbingServers : TROEndProbeServersEvent read fOnAfterProbingServers write fOnAfterProbingServers;
+    property OnBeforeProbingServer : TROBeginProbeServerEvent read fOnBeforeProbingServer write fOnBeforeProbingServer;
+    property OnAfterProbingServer : TROEndProbeServerEvent read fOnAfterProbingServer write fOnAfterProbingServer;
+    property OnLoginNeeded : TROExceptionEvent read fOnLoginNeeded write fOnLoginNeeded;
+    property OnProgress:TProgressEvent read fOnProgress write fOnProgress;
+    property ServerLocators : TROServerLocatorCollection read fServerLocators write SetServerLocators;
+    property DispatchOptions : TRODispatchOptions read fDispatchOptions write fDispatchOptions;
+  published
+    property OnAsyncException: TROAsyncExceptionEvent read fOnAsyncException write fOnAsyncException;
+    property OnFailure : TROExceptionEvent read fOnException write fOnException; { deprecated }
+    property OnException : TROExceptionEvent read fOnException write fOnException;
+  end;
+
+  TROTransportChannelClass = class of TROTransportChannel;
+
+  { IROObjectRetainer }
+  IROObjectRetainer = interface
+  ['{1DFCCCAB-CD61-415F-ADFB-258C067E9A59}']
+    procedure RetainObject(const anObject : TObject);
+    procedure ReleaseObject(const anObject : TObject);
+    function IsRetained(const anObject : TObject) : boolean;
+  end;
+
+  { TROObjectDisposer }
+  TROObjectDisposer = class(TList)
+  private
+    fService : IInterface;
+
+  public
+    constructor Create(const aService : IInterface);
+    destructor Destroy; override;
+
+    procedure Add(iObject: TObject);
+  end;
+
+  TROMessageEnvelopeProcessed = procedure(AMessageEnvelope:TROMessageEnvelope; AStream: TStream; aMode: TROMessageEnvelopeMode; AMessage: IROMessage) of object;
+
+  TROMessageEnvelope = class(TROComponent)
+  private
+    fAfterEnvelopeProcessed: TROMessageEnvelopeProcessed;
+    fBeforeEnvelopeProcessed: TROMessageEnvelopeProcessed;
+    fReuseOriginalStream: boolean;
+    FEnvelopeMarker: UTF8String;
+    procedure SetEnvelopeMarker(const Value: String);
+    function GetEnvelopeMarker: String;
+  protected
+    procedure intProcessOutgoing(Source, Dest: TStream; aMessage: IROMessage); virtual;
+    procedure intProcessIncoming(Source, Dest: TStream; aMessage: IROMessage); virtual;
+    property ReuseOriginalStream: boolean read fReuseOriginalStream write fReuseOriginalStream default True;
+    function GetDefaultEnvelopeMarker: string; virtual;
+  public
+    constructor Create(AOwner: TComponent); override;
+    function ProcessOutgoing(aMessage: TROMessage; aStream: TStream): TStream;
+    function ProcessIncoming(aMessage: TROMessage; aStream: TStream): TStream;
+  published
+    property EnvelopeMarker: string read GetEnvelopeMarker write SetEnvelopeMarker;
+    property BeforeEnvelopeProcessed: TROMessageEnvelopeProcessed read fBeforeEnvelopeProcessed write fBeforeEnvelopeProcessed;
+    property AfterEnvelopeProcessed: TROMessageEnvelopeProcessed read fAfterEnvelopeProcessed write fAfterEnvelopeProcessed;
+  end;
+
+  TROMessageEnvelopeItem = class(TCollectionItem)
+  private
+    fEnabled: boolean;
+    fEnvelope: TROMessageEnvelope;
+    procedure SetEnvelope(const Value: TROMessageEnvelope);
+    function GetEnabled: boolean;
+  protected
+    function GetDisplayName: string; override;
+  public
+    constructor Create(aCollection: TCollection); override;
+    destructor Destroy; override;
+    procedure Assign(Source: TPersistent); override;
+  published
+    property EnvelopeMarker: string read GetDisplayName;
+    property Envelope: TROMessageEnvelope read fEnvelope write SetEnvelope;
+    property Enabled: Boolean read GetEnabled write fEnabled default True;
+  end;
+
+  TROMessageEnvelopeCollection = class(TCollection)
+  private
+    fMessage: TROMessage;
+    function GetEnvelope(Index: integer): TROMessageEnvelopeItem;
+  protected
+  public
+    constructor Create(aMessage: TROMessage);
+    function ItemByEnvelope(const aEnvelope: TROMessageEnvelope): TROMessageEnvelopeItem;
+    function ItemByMarker(const aMarker: String): TROMessageEnvelopeItem;
+    property Items[Index: integer]: TROMessageEnvelopeItem read GetEnvelope; default;
+  end;
+
+
+{ Message class registration routines }
+procedure RegisterMessageClass(aROMessageClass : TROMessageClass);
+procedure UnregisterMessageClass(aROMessageClass : TROMessageClass);
+function GetMessageClass(Index : integer) : TROMessageClass;
+function GetMessageClassCount : integer;
+function FindMessageClass(const aName : string; Silent : boolean = FALSE) : TROMessageClass;
+procedure ListMessageClasses(aList : TStrings);
+
+{ Proxy registration }
+procedure RegisterProxyClass(const anInterfaceID : TGUID; aProxyClass : TROProxyClass);
+procedure UnregisterProxyClass(const anInterfaceID : TGUID);
+function FindProxyClass(const anInterfaceID : TGUID; Silent : boolean = FALSE) : TROProxyClass;
+procedure ListProxyClasses(aList : TStrings);
+
+{ Exception registration }
+function GetExceptionClass(const anExceptionClassName : string) : ExceptionClass;
+procedure RegisterExceptionClass(anExceptionClass : ExceptionClass);
+procedure UnregisterExceptionClass(anExceptionClass : ExceptionClass);
+
+{ Transport channels registration }
+procedure RegisterTransportChannelClass(aTransportChannelClass : TROTransportChannelClass);
+procedure UnregisterTransportChannelClass(aTransportChannelClass : TROTransportChannelClass);
+function FindTransportChannelClass(const aName : string; Silent : boolean = FALSE) : TROTransportChannelClass;
+procedure ListTransportChannelClasses(aList : TStrings);
+
+procedure GetRodl(aStream: TStream; const aTransport : IROTransport; var aFormat : TDataFormat; ARODLReader: TROCustomRODLReader = nil);
+function GetRodlLibrary(ARodlReader: TROCustomRODLReader = nil): TRODLLibrary;
+
+procedure RegisterServiceAttribute(const aService, aName, aValue: string);
+function  GetServiceAttribute(const aService, aName: string): string;
+function GetServiceAttributes(const aName: string): TStrings;
+
+
+implementation
+
+uses {$IFDEF MSWINDOWS}Windows, {$ENDIF}
+     {$IFDEF DEBUG_REMOBJECTS}eDebugServer,{$ENDIF}
+     uRORes, uROHTTPTools;
+
+var _MessageClasses : TClassList;
+    _ExceptionClasses : TClassList;
+  fServiceAttributeList: TStringList;
+
+function GetServiceAttributes(const aName: string): TStrings;
+var
+  lIndex: Integer;
+begin
+  lIndex := fServiceAttributeList.IndexOf(aName);
+  if lIndex <> -1 then
+    result := TStrings(fServiceAttributeList.Objects[lIndex])
+  else
+    result := nil;
+end;
+
+procedure RegisterServiceAttribute(const aService, aName, aValue: string);
+var
+  lIndex: Integer;
+  lList: TStringList;
+begin
+  lIndex := fServiceAttributeList.IndexOf(aService);
+  if lIndex = -1 then begin
+    lList := TStringList.Create;
+    fServiceAttributeList.AddObject(aService, lList);
+  end else
+    lList := fServiceAttributeList.Objects[lIndex] as TStringList;
+  lList.Values[aName] := aValue;
+end;
+
+function GetServiceAttribute(const aService, aName: string): string;
+var
+  lList: TStrings;
+begin
+  lList := GetServiceAttributes(aService);
+  if lList = nil then
+    result := ''
+  else
+    result := lList.Values[aName];
+end;
+
+
+procedure RegisterMessageClass(aROMessageClass : TROMessageClass);
+begin
+  _MessageClasses.Add(aROMessageClass);
+  Classes.RegisterClass(aROMessageClass);
+end;
+
+procedure UnregisterMessageClass(aROMessageClass : TROMessageClass);
+begin
+  _MessageClasses.Remove(aROMessageClass);
+  Classes.UnRegisterClass(aROMessageClass);
+end;
+
+function GetMessageClass(Index : integer) : TROMessageClass;
+begin
+  result := TROMessageClass(_MessageClasses[Index]);
+end;
+
+function GetMessageClassCount : integer;
+begin
+  result := _MessageClasses.Count
+end;
+
+function FindMessageClass(const aName : string; Silent : boolean = FALSE) : TROMessageClass;
+var i: integer;
+begin
+  result := NIL;
+  for i := 0 to (_MessageClasses.Count-1) do
+    if SameText(TROMessageClass(_MessageClasses[i]).ClassName, aName) then begin
+      result := TROMessageClass(_MessageClasses[i]);
+      Exit;
+    end;
+
+  if not Silent
+    then RaiseError(err_UnknownMessageClass, [aName]);
+end;
+
+procedure ListMessageClasses(aList : TStrings);
+var i: integer;
+begin
+  for i := 0 to (_MessageClasses.Count-1) do
+    aList.Add(TROMessageClass(_MessageClasses[i]).ClassName);
+end;
+var _ProxyClasses,
+    _TransportChannels : TStringList;
+
+{ Transport channels registration }
+procedure RegisterTransportChannelClass(aTransportChannelClass : TROTransportChannelClass);
+begin
+  if _TransportChannels.IndexOf(aTransportChannelClass.ClassName)<0 then begin
+    _TransportChannels.AddObject(aTransportChannelClass.ClassName, TObject(aTransportChannelClass));
+    Classes.RegisterClass(aTransportChannelClass);
+  end;
+end;
+
+procedure UnregisterTransportChannelClass(aTransportChannelClass : TROTransportChannelClass);
+var idx : integer;
+begin
+  idx := _TransportChannels.IndexOf(aTransportChannelClass.ClassName);
+  if idx>=0 then begin
+    _TransportChannels.Delete(idx);
+    Classes.UnregisterClass(aTransportChannelClass);
+  end;
+end;
+
+function FindTransportChannelClass(const aName : string; Silent : boolean = FALSE) : TROTransportChannelClass;
+var idx : integer;
+begin
+  result := nil;
+  idx := _TransportChannels.IndexOf(aName);
+  if (idx>=0)
+    then result := TROTransportChannelClass(_TransportChannels.Objects[idx])
+  else begin
+    if not Silent
+      then RaiseError(err_UnknownTransportChannelClass, [aName])
+  end;
+end;
+
+procedure ListTransportChannelClasses(aList : TStrings);
+begin
+  aList.Assign(_TransportChannels);
+end;
+
+{ Proxy registration }
+procedure RegisterProxyClass(const anInterfaceID : TGUID; aProxyClass : TROProxyClass);
+var s : string;
+begin
+  s := GUIDToString(anInterfaceID);
+  if _ProxyClasses.IndexOf(s)<0
+    then _ProxyClasses.AddObject(GUIDToString(anInterfaceID), TObject(aProxyClass))
+end;
+
+procedure UnregisterProxyClass(const anInterfaceID : TGUID);
+var idx : integer;
+    s : string;
+begin
+  s := GUIDToString(anInterfaceID);
+  idx := _ProxyClasses.IndexOf(s);
+  if (idx>=0)
+    then _ProxyClasses.Delete(idx)
+end;
+
+function FindProxyClass(const anInterfaceID : TGUID; Silent : boolean = FALSE) : TROProxyClass;
+var idx : integer;
+    s : string;
+begin
+  result := NIL;
+  s := GUIDToString(anInterfaceID);
+  idx := _ProxyClasses.IndexOf(s);
+  if (idx>=0)
+    then result := TROProxyClass(_ProxyClasses.Objects[idx])
+  else begin
+    if not Silent
+      then RaiseError(err_UnknownProxyInterface, [s])
+  end;
+end;
+
+procedure ListProxyClasses(aList : TStrings);
+begin
+  aList.Assign(_ProxyClasses);
+end;
+
+{ Exceptions registration }
+function GetExceptionClass(const anExceptionClassName : string) : ExceptionClass;
+var i : integer;
+begin
+  result := EROUnregisteredServerException;
+
+  for i := 0 to (_ExceptionClasses.Count-1) do
+    {$IFDEF DOTNET}
+    if (ExceptionClass(_ExceptionClasses[i]).ClassName = anExceptionClassName) then begin
+    {$ELSE}
+    if (CompareText(ExceptionClass(_ExceptionClasses[i]).ClassName, anExceptionClassName)=0) then begin
+    {$ENDIF DOTNET}
+      result := ExceptionClass(_ExceptionClasses[i]);
+      Exit;
+    end;
+end;
+
+procedure RegisterExceptionClass(anExceptionClass : ExceptionClass);
+begin
+  _ExceptionClasses.Add(anExceptionClass)
+end;
+
+procedure UnregisterExceptionClass(anExceptionClass : ExceptionClass);
+begin
+  _ExceptionClasses.Remove(anExceptionClass)
+end;
+
+{ TROProxy }
+
+constructor TROProxy.Create(const aMessage: IROMessage;
+  const aTransportChannel: IROTransportChannel);
+begin
+  inherited Create;
+  fMessage := pointer(aMessage);
+  fTransportChannel := pointer(aTransportChannel);
+end;
+
+constructor TROProxy.Create(const anInterfaceName: string;
+  const aMessage: IROMessage;
+  const aTransportChannel: IROTransportChannel);
+begin
+  Create(aMessage, aTransportChannel);
+
+  fInterfaceName := anInterfaceName;
+end;
+
+function TROProxy.GetInterfaceName: string;
+begin
+  if (fInterfaceName<>'')
+    then result := fInterfaceName // If the proxy has been created specifiing one then that is the strongest
+    else result := __GetInterfaceName;
+end;
+
+function TROProxy._GetMessage: IROMessage;
+begin
+  result := IROMessage(fMessage);
+end;
+
+function TROProxy.GetTransportChannel: IROTransportChannel;
+begin
+  result := IROTransportChannel(fTransportChannel);
+end;
+
+{ TROMessageAwareComponent }
+
+procedure TROMessageAwareComponent.Notification(AComponent: TComponent; Operation: TOperation);
+begin
+  inherited;
+
+  if (Operation<>opRemove) then Exit;
+
+  if (AComponent=fMessage) then fMessage := NIL;
+end;
+
+procedure TROMessageAwareComponent.SetMessage(const Value: TROMessage);
+begin
+  if (fMessage=Value) then Exit;
+
+  fMessage := Value;
+  if (fMessage<>NIL) then fMessage.FreeNotification(Self);
+end;
+
+{ TROMessage }
+constructor TROMessage.Create(aOwner : TComponent);
+begin
+  inherited Create(aOwner);
+  InitObject;
+end;
+
+constructor TROMessage.Create;
+begin
+  inherited Create(NIL);
+  InitObject;
+end;
+
+function TROMessage.CreateException(const aExceptionName, aMessage: string): Exception;
+var
+  lExceptionClass: ExceptionClass;
+begin
+  lExceptionClass := GetExceptionClass(aExceptionName);
+
+  if Assigned(lExceptionClass) then begin
+    // The exception was registered so we can reraise the right type
+    if AddServerExceptionPrefix then
+      result := lExceptionClass.Create(Format(str_ExceptionReraisedFromServer,[aMessage]))
+    else
+      result := lExceptionClass.Create(aMessage);
+
+  end
+  else begin
+    // Un-registered exception. We fire a EROUnregisteredServerException
+    if AddServerExceptionPrefix then
+      result := EROUnregisteredServerException.CreateFmt(str_ExceptionOnServer, [aExceptionName, aMessage])
+    else
+      result := EROUnregisteredServerException.Create(aMessage);
+  end;
+end;
+
+destructor TROMessage.Destroy;
+begin
+  if Assigned(fSerializer) then FreeAndNIL(fSerializer);
+  FreeAndNil(fEnvelopes);
+  inherited;
+end;
+
+procedure TROMessage.InitObject;
+begin
+  fAddServerExceptionPrefix := true;
+  fSerializer := CreateSerializer;
+  fClientID := NewGuid();
+  fEnvelopes := TROMessageEnvelopeCollection.Create(Self);
+  //CreateGUID(fClientID);
+end;
+
+procedure TROMessage.Initialize(const aTransport : IROTransport; const anInterfaceName, aMessageName: string; aType: TMessageType);
+begin
+  if Assigned(fOnInitializeMessage) then fOnInitializeMessage(Self, aTransport, anInterfaceName, aMessageName);
+  {$IFDEF FPC}
+  if aType = mtRequest then fInterfaceName := anInterfaceName else   // removing warnings
+  {$ENDIF}
+  fInterfaceName := anInterfaceName;
+  fMessageName := aMessageName;
+end;
+
+procedure TROMessage.Initialize(const aTransport: IROTransport; const aLibraryName, anInterfaceName, aMessageName: string; aType: TMessageType);
+begin
+  {$IFDEF FPC}
+  if aLibraryName = '' then Initialize(aTransport, anInterfaceName, aMessageName, aType) else   // removing warnings
+  {$ENDIF}
+  Initialize(aTransport, anInterfaceName, aMessageName, aType);
+end;
+
+procedure TROMessage.Finalize;
+begin
+  //FreeAndNIL(fSerializer);
+  if Assigned(fOnFinalizeMessage) then fOnFinalizeMessage(Self);
+end;
+
+function TROMessage.GetInterfaceName: string;
+begin
+  result := fInterfaceName
+end;
+
+function TROMessage.GetMessageName: string;
+begin
+  result := fMessageName
+end;
+
+procedure TROMessage.SetInterfaceName(const aValue: string);
+begin
+  fInterfaceName := aValue
+end;
+
+procedure TROMessage.SetMessageName(const aValue: string);
+begin
+  fMessageName := aValue
+end;
+
+procedure TROMessage.GetModuleInfo(aStream : TStream; const aTransport : IROTransport; var aFormat : TDataFormat);
+begin
+  GetRodlInfo(aStream, aTransport, aFormat);
+end;
+
+procedure TROMessage.GetRodlInfo(aStream : TStream; const aTransport : IROTransport; var aFormat : TDataFormat);
+begin
+  GetRodl(aStream, aTransport, aFormat, fRODLReader);
+end;
+
+procedure GetRodl(aStream: TStream; const aTransport : IROTransport; var aFormat : TDataFormat; ARODLReader: TROCustomRODLReader);
+var rs : TResourceStream;
+    instance : cardinal;
+begin
+  { ToDo: investigate if we should maybe use hMainInstance instead? the current one
+          breaks with Packages, hMainInstance wouldn't work with DLLs. Since packages
+          are currently not supported, i suggest we keep this the way it is? mh.
+
+    Alef: the following "IF" seems to nicely solve the problem... }
+  if Assigned(ARODLReader) then
+    ARODLReader.ReadRODLResource(aStream)
+  else begin
+  {$IFNDEF FPC}
+    if ModuleIsPackage then
+      instance := MainInstance
+    else
+  {$ENDIF}
+     instance := hInstance;
+
+    rs := TResourceStream.Create(instance, res_RODLFile, RT_RCDATA);
+    try
+      rs.SaveToStream(aStream);
+    finally
+      rs.Free;
+    end;
+  end;
+
+  if aTransport <> nil then
+    SetHTTPInfo(aTransport, DataFormatXml);
+  aFormat := DataFormatXml;
+end;
+
+function GetRodlLibrary(ARodlReader: TROCustomRODLReader): TRODLLibrary;
+var
+  lStream: TMemoryStream;
+  lDummy: TDataFormat;
+  lXmlToRodl: TXMLToRODL;
+begin
+  lStream := TMemoryStream.Create;
+  lXmlToRodl := TXMLToRODL.Create;
+  try
+    {$IFDEF FPC} lDummy := ''; {$ENDIF}
+    GetRodl(lStream, nil, lDummy, ARodlReader);
+    lStream.Position := 0;
+    result := lXmlToRodl.Read(lStream);
+  finally
+    lXmlToRodl.Free;
+    lStream.Free;
+  end;
+end;
+
+
+procedure TROMessage.ReadFromStream(aStream: TStream);
+begin
+  aStream.Position := 0; // Just in case
+  Envelopes_ProcessIncoming(aStream);
+  aStream.Position := 0; // Just in case
+  if Assigned(fOnReadFromStream) then fOnReadFromStream(aStream);
+  aStream.Position := 0; // Just in case
+end;
+
+procedure TROMessage.WriteToStream(aStream: TStream);
+begin
+  TriggerOnWriteToStream(aStream);
+  Envelopes_ProcessOutgoing(aStream);
+  aStream.Position := 0; // Just in case
+end;
+
+procedure TROMessage.TriggerOnWriteToStream(aStream: TStream);
+begin
+  if Assigned(fOnWriteToStream) then begin
+    aStream.Position := 0; // Just in case
+    fOnWriteToStream(aStream);
+  end;
+  aStream.Position := 0; // Just in case
+end;
+
+{$IFDEF DOTNET}
+{$ELSE}
+procedure TROMessage.Read(const aName: string; aTypeInfo: PTypeInfo;
+  var Ptr; Attributes: TParamAttributes);
+begin
+  Serializer.Read(aName, aTypeInfo, Ptr);
+  if Assigned(fOnReadMessageParameter) then fOnReadMessageParameter(Self, aName, aTypeInfo, pointer(Ptr), Attributes);  
+end;
+
+procedure TROMessage.Write(const aName: string; aTypeInfo: PTypeInfo;
+  const Ptr; Attributes: TParamAttributes);
+begin
+  if Assigned(fOnWriteMessageParameter) then fOnWriteMessageParameter(Self, aName, aTypeInfo, pointer(Ptr), Attributes);
+  Serializer.Write(aName, aTypeInfo, Ptr);
+end;
+{$ENDIF DOTNET}
+
+procedure TROMessage.ProcessException;
+var E: Exception;
+    raiseException: boolean;
+begin
+  E := ReadException;
+  raiseException := TRUE;
+  if Assigned(E) then begin
+    if Assigned(fOnServerException) then fOnServerException(E, raiseException);
+
+    if raiseException then raise E;
+  end;
+end;
+
+function TROMessage.Clone: IROMessage;
+begin
+  result := TROMessageClass(ClassType).CreateRefCountedClone(self) as IROMessage;
+end;
+
+constructor TROMessage.CreateRefCountedClone(iMessage: TROMessage);
+begin
+  Create();
+  Assign(iMessage);
+  fReferenceCounted := true;
+
+  //Todo: implement reference counting;
+end;
+
+procedure TROMessage.Assign(iSource: TPersistent);
+var lSource:TROMessage;
+begin
+  if Assigned(iSource) then begin
+
+    // might very well be a descendand, too
+    if not (iSource is ClassType)
+      then RaiseError('Cannot Assign a %s t a %s', [ClassName,iSource.ClassName]);
+
+    lSource := TROMessage(iSource);
+
+    Self.RODLReader := lSource.RODLReader;    
+    Self.OnWriteToStream := lSource.OnWriteToStream;
+    Self.OnReadFromStream := lSource.OnReadFromStream;
+    Self.OnServerException := lSource.OnServerException;
+    Self.OnWriteException := lSource.OnWriteException;
+
+    Self.OnInitializeMessage     := lSource.OnInitializeMessage;
+    Self.OnFinalizeMessage       := lSource.OnFinalizeMessage;
+    Self.OnWriteMessageParameter := lSource.OnWriteMessageParameter;
+    Self.OnReadMessageParameter  := lSource.OnReadMessageParameter;
+    Self.OnBeforeProcessOutgoingEnvelopes := lSource.OnBeforeProcessOutgoingEnvelopes;
+    Self.OnBeforeProcessIncomingEnvelopes := lSource.OnBeforeProcessIncomingEnvelopes;
+    Self.OnAfterProcessOutgoingEnvelopes := lSource.OnAfterProcessOutgoingEnvelopes;
+    Self.OnAfterProcessIncomingEnvelopes := lSource.OnAfterProcessIncomingEnvelopes;
+    Self.Envelopes := lSource.Envelopes;
+  end;
+end;
+
+function TROMessage._AddRef: integer;
+begin
+  result := InterlockedIncrement(fRefCount);
+end;
+
+function TROMessage._Release: integer;
+begin
+  result := InterlockedDecrement(fRefCount);
+
+  if (fRefCount = 0) and fReferenceCounted then Free();
+end;
+
+function TROMessage.GetClientID: TGUID;
+begin
+  result := fClientID;
+end;
+
+procedure TROMessage.SetClientID(const Value: TGUID);
+begin
+  fClientID := Value
+end;
+
+procedure TROMessage.SetRODLReader(const Value: TROCustomRODLReader);
+begin
+  fRODLReader := Value;
+  if Assigned(fRODLReader) then fRODLReader.FreeNotification(Self);
+end;
+
+procedure TROMessage.Notification(AComponent: TComponent;
+  Operation: TOperation);
+begin
+  inherited;
+
+  if (Operation=opRemove) and (aComponent=fRODLReader)
+    then fRODLReader := NIL;
+end;
+
+procedure TROMessage.WriteException(aStream: TStream;
+  anException: Exception);
+begin
+  if Assigned(fOnWriteException) then begin
+    fOnWriteException(Self, aStream, anException);
+  end;
+  TriggerOnWriteToStream(aStream);
+end;
+
+procedure TROMessage.InitializeRequestMessage(
+  const aTransport: IROTransport; const aLibraryName, anInterfaceName,
+  aMessageName: string);
+begin
+  Initialize(aTransport, aLibraryName, anInterfaceName,aMessageName, mtRequest);
+end;
+
+procedure TROMessage.InitializeResponseMessage(
+  const aTransport: IROTransport; const aLibraryName, anInterfaceName,
+  aMessageName: string);
+begin
+  Initialize(aTransport, aLibraryName, anInterfaceName,aMessageName, mtResponse);
+end;
+
+procedure TROMessage.InitializeEventMessage(const aTransport: IROTransport;
+  const aLibraryName, anInterfaceName, aMessageName: string);
+begin
+  Initialize(aTransport, aLibraryName, anInterfaceName,aMessageName, mtEvent);
+end;
+
+procedure TROMessage.ReadFromStream(aStream: TStream;
+  var aFreeStream: Boolean);
+begin
+  aFreeStream := True;
+  ReadFromStream(aStream);
+end;
+
+procedure TROMessage.FreeStream;
+begin
+  
+end;
+
+function TROMessage.GetMessageType: TMessageType;
+begin
+  Result := mtRequest;
+end;
+
+procedure TROMessage.InitializeExceptionMessage(
+  const aTransport: IROTransport; const aLibraryName, anInterfaceName,
+  aMessageName: string);
+begin
+  // do nothing here; descendents can override this to set the types
+end;
+
+procedure TROMessage.SetAttributes(aTransport: IROTransport; const aNames,
+  aValues: array of String);
+begin
+  // overridable
+end;
+
+procedure TROMessage.UnsetAttributes(aTransport: IROTransport);
+begin
+  // overridable
+end;
+
+procedure TROMessage.InitializeRead(const aTransport: IROTransport);
+begin
+  // do nothing.
+end;
+
+procedure TROMessage.CheckProperties;
+begin
+// nothing
+end;
+
+procedure TROMessage.ReadDateTime(const aName: string; var Ref;
+  ArrayElementId: integer);
+begin
+  fSerializer.ReadDateTime(aName, Ref, ArrayElementId);
+end;
+
+procedure TROMessage.ReadDecimal(const aName: string; var Ref;
+  ArrayElementId: integer);
+begin
+  fSerializer.ReadDecimal(aName, Ref, ArrayElementId);
+end;
+
+procedure TROMessage.ReadEnumerated(const aName: string;
+  anEnumTypeInfo: PTypeInfo; var Ref; ArrayElementId: integer);
+begin
+  fSerializer.ReadEnumerated(aName, anEnumTypeInfo, Ref, ArrayElementId);
+end;
+
+procedure TROMessage.ReadDouble(const aName: string; aFloatType: TFloatType;
+  var Ref; ArrayElementId: integer);
+begin
+  fSerializer.ReadDouble(aName, aFloatType, Ref, ArrayElementId);
+end;
+
+procedure TROMessage.ReadGuid(const aName: string; var Ref;
+  ArrayElementId: integer);
+begin
+  fSerializer.ReadGuid(aName, Ref, ArrayElementId);
+end;
+
+procedure TROMessage.ReadInt64(const aName: string; var Ref;
+  ArrayElementId: integer);
+begin
+  fSerializer.ReadInt64(aName, Ref, ArrayElementId);
+end;
+
+procedure TROMessage.ReadInteger(const aName: string; anOrdType: TOrdType;
+  var Ref; ArrayElementId: integer);
+begin
+  fSerializer.ReadInteger(aName, anOrdType, Ref, ArrayElementId);
+end;
+
+procedure TROMessage.ReadUTF8String(const aName: string; var Ref;
+  ArrayElementId, iMaxLength: integer);
+begin
+  fSerializer.ReadUTF8String(aName, Ref, ArrayElementId, iMaxLength);
+end;
+
+procedure TROMessage.ReadVariant(const aName: string; var Ref;
+  ArrayElementId: integer);
+begin
+  fSerializer.ReadVariant(aName, Ref, ArrayElementId);
+end;
+
+procedure TROMessage.ReadWideString(const aName: string; var Ref;
+  ArrayElementId, iMaxLength: integer);
+begin
+  fSerializer.ReadWideString(aName, Ref, ArrayElementId, iMaxLength);
+end;
+
+procedure TROMessage.ReadXml(const aName: string; var Ref;
+  ArrayElementId: integer);
+begin
+  fSerializer.ReadXml(aName, Ref, ArrayElementId);
+end;
+
+procedure TROMessage.WriteDateTime(const aName: string; const Ref;
+  ArrayElementId: integer);
+begin
+  fSerializer.WriteDateTime(aName, Ref, ArrayElementId);
+end;
+
+procedure TROMessage.WriteDecimal(const aName: string; const Ref;
+  ArrayElementId: integer);
+begin
+  fSerializer.WriteDecimal(aName, Ref, ArrayElementId);
+end;
+
+procedure TROMessage.WriteEnumerated(const aName: string;
+  anEnumTypeInfo: PTypeInfo; const Ref; ArrayElementId: integer);
+begin
+  fSerializer.WriteEnumerated(aName, anEnumTypeInfo, Ref, ArrayElementId);
+end;
+
+procedure TROMessage.WriteDouble(const aName: string;
+  aFloatType: TFloatType; const Ref; ArrayElementId: integer);
+begin
+  fSerializer.WriteDouble(aName, aFloatType, Ref, ArrayElementId);
+end;
+
+procedure TROMessage.WriteGuid(const aName: string; const Ref;
+  ArrayElementId: integer);
+begin
+  fSerializer.WriteGuid(aName, Ref, ArrayElementId);
+end;
+
+procedure TROMessage.WriteInt64(const aName: string; const Ref;
+  ArrayElementId: integer);
+begin
+  fSerializer.WriteInt64(aName, Ref, ArrayElementId);
+end;
+
+procedure TROMessage.WriteInteger(const aName: string; anOrdType: TOrdType;
+  const Ref; ArrayElementId: integer);
+begin
+  fSerializer.WriteInteger(aName, anOrdType, Ref, ArrayElementId);
+end;
+
+procedure TROMessage.WriteUTF8String(const aName: string; const Ref;
+  ArrayElementId: integer);
+begin
+  fSerializer.WriteUTF8String(aName, Ref, ArrayElementId);
+end;
+
+procedure TROMessage.WriteVariant(const aName: string; const Ref;
+  ArrayElementId: integer);
+begin
+  fSerializer.WriteVariant(aName, Ref, ArrayElementId);
+end;
+
+procedure TROMessage.WriteWideString(const aName: string; const Ref;
+  ArrayElementId: integer);
+begin
+  fSerializer.WriteWideString(aName, Ref, ArrayElementId);
+end;
+
+procedure TROMessage.WriteXml(const aName: string; const Ref;
+  ArrayElementId: integer);
+begin
+  fSerializer.WriteXml(aName, Ref, ArrayElementId);
+end;
+
+function TROMessage.ReadArray(const aName: string; aClass : TClass; var Ref;
+  ArrayElementId: integer): Boolean;
+begin
+  Result:= fSerializer.ReadArray(aName, aClass, Ref, ArrayElementId);
+end;
+
+function TROMessage.ReadStruct(const aName: string; aClass : TClass; var Ref;
+  ArrayElementId: integer): Boolean;
+begin
+  Result:= fSerializer.ReadStruct(aName, aClass, Ref, ArrayElementId);
+end;
+
+procedure TROMessage.WriteArray(const aName: string; const Ref;aClass: TClass;
+  ArrayElementId: integer);
+begin
+  fSerializer.WriteArray(aName, Ref, aClass, ArrayElementId);
+end;
+
+procedure TROMessage.WriteStruct(const aName: string; const Ref; aClass: TClass;
+  ArrayElementId: integer);
+begin
+  fSerializer.WriteStruct(aName, Ref, aClass, ArrayElementId);
+end;
+
+procedure TROMessage.ReadBinary(const aName: string; var Ref;
+  ArrayElementId: integer);
+begin
+  fSerializer.ReadBinary(aName, Ref, ArrayElementId);
+end;
+
+procedure TROMessage.WriteBinary(const aName: string; const Ref;
+  ArrayElementId: integer);
+begin
+  fSerializer.WriteBinary(aName, Ref, ArrayElementId);
+end;
+
+procedure TROMessage.SetEnvelopes(
+  const Value: TROMessageEnvelopeCollection);
+begin
+  fEnvelopes.Assign(Value);
+end;
+
+procedure TROMessage.WriteEnvelopeHeader(aEnvelope: TROMessageEnvelope; AStream: TStream);
+var
+  lLen: byte;
+  lEnvelopeMarker:UTF8String;
+begin
+  AStream.Write(EnvelopeSignature,SizeOf(TEnvelopeSignature));
+  lEnvelopeMarker := UTF8Encode(aEnvelope.EnvelopeMarker);
+  lLen:=Length(lEnvelopeMarker);
+  AStream.Write(lLen,1);
+  AStream.Write(Pointer(lEnvelopeMarker)^, lLen);
+end;
+
+procedure TROMessage.Envelopes_ProcessIncoming(aStream: TStream);
+var
+  lEnvelopeName: String;
+  lEnvelope: TROMessageEnvelopeItem;
+  lStream,lStream1: Tstream;
+begin
+  if Assigned(fBeforeProcessIncomingEnvelopes) then fBeforeProcessIncomingEnvelopes(aStream);
+  lStream := aStream;
+  try
+    while CheckForEnvelope(lStream,lEnvelopeName) do begin
+      lEnvelope := fEnvelopes.ItemByMarker(lEnvelopeName);
+      Check(lEnvelope = nil, '%s envelope isn''t found',[lEnvelopeName]);
+      Check(lEnvelope.Envelope = nil, '%s envelope can''t be processed! TROMessageEnvelope should be assigned.',[lEnvelopeName]);
+      lStream1 := lEnvelope.Envelope.ProcessIncoming(Self,lStream);
+      if lStream1 <> lStream then begin
+        lStream.Size := 0;
+        if lStream <> aStream then lStream.Free;
+        lStream := lStream1;
+        lStream.Position := 0;
+      end;
+    end;
+  finally
+    if lStream <> aStream then begin
+      aStream.Size := 0;
+      aStream.CopyFrom(lStream,0);
+      lStream.Free;
+    end;
+  end;
+  if Assigned(fAfterProcessIncomingEnvelopes) then fAfterProcessIncomingEnvelopes(aStream);
+end;
+
+procedure TROMessage.Envelopes_ProcessOutgoing(aStream: TStream);
+var
+  i: integer;
+  lStream,lStream1: TStream;
+begin
+  if Assigned(fBeforeProcessOutgoingEnvelopes) then fBeforeProcessOutgoingEnvelopes(aStream);
+  lStream  := aStream;
+  try
+    For i:=0 to fEnvelopes.Count-1 do begin
+      if fEnvelopes.Items[i].Enabled then begin
+        lStream.Position := 0;
+        lStream1 := fEnvelopes.Items[i].Envelope.ProcessOutgoing(Self,lStream);
+        if lStream1 <> lStream then begin
+          lStream.Size := 0;
+          if lStream <> aStream then lStream.Free;
+          lStream := lStream1;
+        end;
+      end;
+    end;
+  finally
+    if lStream <> aStream then begin
+      aStream.Size := 0;
+      aStream.CopyFrom(lStream,0);
+      lStream.Free;
+    end;
+  end;
+  if Assigned(fAfterProcessOutgoingEnvelopes) then fAfterProcessOutgoingEnvelopes(aStream);
+end;
+
+function TROMessage.CheckForEnvelope(aStream: TStream;
+  var aEnvelopeName: String): boolean;
+var
+  lOldPosition: int64;
+  buf: array [0..5] of AnsiChar;
+  lEnvelope: UTF8String;
+begin
+  Result := False;
+  lOldPosition := aStream.Position;
+  if aStream.Size - aStream.Position > 6 then begin
+    aStream.Read(buf,6);
+    Result := (buf[0] = EnvelopeSignature[0]) and
+              (buf[1] = EnvelopeSignature[1]) and
+              (buf[2] = EnvelopeSignature[2]) and
+              (buf[3] = EnvelopeSignature[3]) and
+              (buf[4] = EnvelopeSignature[4]);
+    if Result and (aStream.Size - aStream.Position >= ord(buf[5])) then begin
+      SetLength(lEnvelope, ord(buf[5]));
+      aStream.Read(Pointer(lEnvelope)^,ord(buf[5]));
+      aEnvelopeName := UTF8ToString(lEnvelope);
+    end
+    else begin
+      aStream.Position:= lOldPosition;
+      Result:=False;
+    end;
+  end;
+end;
+
+procedure TROMessage.WriteAnsiString(const aName: string; const Ref;
+  ArrayElementId: integer);
+begin
+  fSerializer.WriteAnsiString(aName, Ref, ArrayElementId);
+end;
+
+procedure TROMessage.ReadAnsiString(const aName: string; var Ref;
+  ArrayElementId, iMaxLength: integer);
+begin
+  fSerializer.ReadAnsiString(aName, Ref, ArrayElementId, iMaxLength);
+end;
+
+{ TROChannelAwareComponent }
+
+procedure TROChannelAwareComponent.Notification(AComponent: TComponent;
+  Operation: TOperation);
+begin
+  inherited;
+
+  if (Operation<>opRemove) then Exit;
+
+  if (AComponent=fChannel) then fChannel := NIL;
+end;
+
+procedure TROChannelAwareComponent.SetChannel(const Value: TROTransportChannel);
+begin
+  if (fChannel=Value) then Exit;
+
+  fChannel := Value;
+  if (fChannel<>NIL) then fChannel.FreeNotification(Self);  
+end;
+
+{ TROCustomRODLReader }
+
+procedure TROCustomRODLReader.ReadRODLResource(aStream: TStream);
+begin
+  if Assigned(fOnBeforeReadRODL) then fOnBeforeReadRODL(Self, aStream);
+  DoReadRODLResource(aStream);
+  if Assigned(fOnAfterReadRODL) then fOnAfterReadRODL(Self, aStream);
+end;
+
+constructor TROBaseConnection.Create(aOwner: TComponent);
+begin
+  inherited Create(aOwner);
+  {$IFDEF RemObjects_UseEncryption}
+  fEncryption := TROEncryption.Create();//(nil);
+  {$ENDIF}
+end;
+
+{$IFDEF RemObjects_UseEncryption}
+procedure TROBaseConnection.DoEncryption(iPlainText, iCipherText: TStream); { public }
+begin
+  iPlainText.Seek(0,soFromBeginning);
+  if Assigned(Encryption) then
+    Encryption.Encrypt(iPlainText, iCipherText)
+  else
+    if iPlainText.Size > 0 then
+      iCipherText.CopyFrom(iPlainText, iPlainText.Size);
+  iCipherText.Seek(0,soFromBeginning);      
+end;
+
+procedure TROBaseConnection.DoDecryption(iCipherText, iPlainText: TStream); { public }
+begin
+  {ToDo: we should find a solution where if no encryption is used, we don't need to copy the stream AT ALL. }
+  iCipherText.Seek(0,soFromBeginning);
+  if Assigned(Encryption) then
+    Encryption.Decrypt(iCipherText, iPlainText)
+  else
+    if iCipherText.Size > 0 then
+      iPlainText.CopyFrom(iCipherText, iCipherText.Size);
+end;
+
+procedure TROBaseConnection.SetEncryption(NewValue: TROEncryption);
+begin
+  fEncryption.Assign(NewValue);
+end;
+{$ENDIF}
+
+destructor TROBaseConnection.Destroy;
+begin
+  inherited Destroy;
+
+  {$IFDEF RemObjects_UseEncryption}
+  FreeAndNil(fEncryption);
+  {$ENDIF}
+end;
+
+{ TROTransportChannel }
+procedure TROTransportChannel.Assign(aSource: TPersistent);
+var lSource:TROTransportChannel;
+begin
+  if Assigned(aSource) then begin
+    if not (aSource is Self.ClassType) then RaiseError('Cannot Assign a %s t a %s',[ClassName,aSource.ClassName]);
+    lSource := TROTransportChannel(aSource);
+    self.OnProgress := lSource.OnProgress;
+    self.OnReceiveStream := lSource.OnReceiveStream;
+    self.OnSendStream := lSource.OnSendStream;
+    self.OnFailure := lSource.OnFailure;
+
+    self.ServerLocators.Assign(lSource.ServerLocators);
+    self.DispatchOptions := lSource.DispatchOptions;
+{$IFDEF RemObjects_UseEncryption}
+    self.Encryption.Assign(lSource.Encryption);
+{$ENDIF}
+  end 
+  else
+    inherited;
+end;
+
+constructor TROTransportChannel.Create(aOwner: TComponent);
+begin
+  inherited;
+  fSynchronizedProbing := true;
+  fProbeFrequency := 60000; // Every minute
+  fLoadBalancerLocatorIdx := -1;
+  fFaultToleranceLocatorIdx := -1;
+  fServerLocators := TROServerLocatorCollection.Create(Self);
+end;
+
+destructor TROTransportChannel.Destroy;
+begin
+  ProbeServers := False;
+  FreeAndNIL(fServerLocators);
+
+  inherited;
+end;
+
+procedure TROTransportChannel.Dispatch(aRequest, aResponse : TStream);
+var retry : boolean;
+    {$ifdef REMOBJECTS_UseEncryption}
+    EncRequest,EncResponse : TMemoryStream;
+    {$endif}
+    faultstartlocatoridx : integer;
+begin
+  retry := TRUE;
+  if not fThreadsafe then
+  begin
+    if Busy then raise EROChannelBusy.Create(err_ChannelBusy);
+
+    fBusy := TRUE;
+  end;
+//removed because of a warning faultstartlocatoridx :=  -1;
+
+  faultstartlocatoridx := InitServerLocator;
+
+  try
+    if Assigned(fOnSendStream)
+      then fOnSendStream(aRequest);
+
+    repeat
+      try
+        aRequest.Position := 0;
+
+        {$IFDEF REMOBJECTS_UseEncryption}
+        if Encryption.EncryptionMethod <> tetNone then begin
+          EncRequest:= TMemoryStream.Create;
+          EncResponse := TMemoryStream.Create;
+          try
+            DoEncryption(aRequest,EncRequest);
+            IntDispatch(encRequest, encResponse);
+            DoDecryption(EncResponse,aResponse);
+          finally
+            EncRequest.Free;
+            EncResponse.free;
+          end;
+        end
+        else
+        {$ENDIF}
+        begin
+          IntDispatch(aRequest, aResponse);
+        end;
+
+        aResponse.Position := 0;
+        if Assigned(fOnReceiveStream) then begin
+          fOnReceiveStream(aResponse);
+          aResponse.Position := 0;
+        end;
+
+        Exit;
+      except
+        on E:Exception do begin
+          retry := FALSE;
+
+          ChangeServerLocator(faultstartlocatoridx,retry,E);
+          //if not retry then begin
+            //if Assigned(fOnException) then fOnException(Self, E, retry);
+          if not retry then raise;
+          //end;
+        end;
+      end;
+    until not retry;
+  finally
+    if not fThreadSafe then
+      fBusy := FALSE;
+  end;
+end;
+
+procedure TROTransportChannel.Loaded;
+begin
+  inherited;
+  ProbeServers := fLoadedProbeServers;
+end;
+
+procedure TROTransportChannel.ProbeAll;
+var i : integer;
+    probedcount,
+    disabledcount,
+    enabledcount : integer;
+    locator : TROServerLocator;
+    proberes : boolean;
+begin
+  probedcount := 0;
+  enabledcount := 0;
+  disabledcount := 0;
+//removed because of a warning   proberes := FALSE;
+
+  if (fServerLocators.Count=0) then Exit;
+
+  if Assigned(fOnBeforeProbingServers) then fOnBeforeProbingServers(Self);
+
+  for i := 0 to (fServerLocators.Count-1) do begin
+    locator := fServerLocators[i];
+
+    if (locator.ProbingOptions=[]) then Continue; // Not subject to probing
+
+    Inc(probedcount);
+
+    // Probe
+    if locator.Enabled and (poProbeWhenEnabled in locator.ProbingOptions) then begin
+      proberes := Probe(locator);
+      if not proberes then Inc(disabledcount);
+    end
+
+    else if not locator.Enabled and (poProbeWhenDisabled in locator.ProbingOptions) then begin
+      proberes := Probe(locator);
+      if proberes then Inc(enabledcount);
+    end;
+  end;
+
+  if Assigned(fOnAfterProbingServers) then fOnAfterProbingServers(Self, probedcount, enabledcount, disabledcount);
+end;
+
+function TROTransportChannel.Probe(aServerLocator : TROServerLocator): boolean;
+var req, resp : TROBinaryMemoryStream;
+begin
+  result := FALSE;
+
+  if (fProbingClone=NIL) then begin
+    // Creates a transport of the same type that will be used during probing operations
+    fProbingClone := TROTransportChannelClass(ClassType).Create(Self);
+    {$ifdef REMOBJECTS_UseEncryption}
+      fProbingClone.Encryption.Assign(Encryption);
+    {$endif}
+    //Probably there is needed Clone infrastructure for channels, the same as for messages.
+    //Because assigning only encryption is not enough here. Proxy setting is required too - but it is channel dependent.
+    //When it will be ready - change code here.
+
+  end;
+  fProbingClone.SetServerLocator(aServerLocator);
+
+  req := TROBinaryMemoryStream.Create(ProbeRequestID);
+  resp := TROBinaryMemoryStream.Create;
+
+  try
+    // Before probing server
+    if Assigned(fOnBeforeProbingServer) then fOnBeforeProbingServer(Self, aServerLocator);
+
+    try
+      fProbingClone.BeforeDispatch(nil);
+      fProbingClone.Dispatch(req, resp);
+      result := (resp.ToString=ProbeResponseID);
+
+      if result and (poEnableIfProbeSucceeded in aServerLocator.ProbingOptions)
+        then aServerLocator.Enabled := TRUE
+
+      else if not result then SysUtils.Abort;
+
+    except
+      if (poDisableIfProbeFailed in aServerLocator.ProbingOptions)
+        then aServerLocator.Enabled := FALSE;
+
+      // We can ignore exceptions. This actually means the method failed.
+    end;
+  finally
+    req.Free;
+    resp.Free;
+
+    // After probing server
+    if Assigned(fOnAfterProbingServer) then fOnAfterProbingServer(Self, aServerLocator, not result);
+  end;
+end;
+
+procedure TROTransportChannel.RetrieveMetadata(out Metadata: TStream);
+var req : TROBinaryMemoryStream;
+begin
+  BeforeDispatch(nil);
+  req := TROBinaryMemoryStream.Create(MetadataRequestID);
+  Metadata := TROBinaryMemoryStream.Create;
+
+  try
+    try
+      Dispatch(req, Metadata);
+    except
+      FreeAndNIL(Metadata);
+      raise;
+    end;
+  finally
+    req.Free;
+  end;
+end;
+
+procedure TROTransportChannel.RetrieveRODL(out RODLLibrary : TRODLLibrary);
+var
+  resp : TStream;
+  XmlToRodl: TXMLToRODL;
+begin
+  RODLLibrary := NIL;
+
+  RetrieveMetadata(resp);
+
+  XmltoRodl := TXMLToRODL.Create(nil);
+  try
+    RODLLibrary := XmltoRodl.Read(resp,'');
+  except
+  end;
+  resp.Free;
+  XmlToRodl.Free;
+end;
+
+procedure TROTransportChannel.SetProbeFrequency(
+  const Value: cardinal);
+begin
+  fProbeFrequency := Value;
+  if Assigned(fProbeTimer)
+    then fProbeTimer.Timeout := Value;
+end;
+
+procedure TROTransportChannel.OnProbeTimerTick(Dummy: Cardinal);
+begin
+  ProbeAll;
+end;
+
+procedure TROTransportChannel.SetProbeServers(const Value: boolean);
+begin
+  if (csLoading in ComponentState) then fLoadedProbeServers := Value
+  else if (fProbeServers<>Value) then begin
+    fProbeServers := Value;
+
+    if (csDesigning in ComponentState) then Exit;
+      
+    if fProbeServers then begin
+      fProbeTimer := TROThreadTimer.Create(OnProbeTimerTick, fProbeFrequency, fSynchronizedProbing);
+    end
+    else begin
+      fProbeTimer.Free;
+      fProbeTimer := nil;
+    end;
+  end;
+end;
+
+procedure TROTransportChannel.SetServerLocator(
+  aServerLocator: TROServerLocator; anException : Exception = NIL);
+begin
+  if Assigned(fOnServerLocatorAssignment)
+    then fOnServerLocatorAssignment(Self, aServerLocator, anException);
+
+  IntSetServerLocator(aServerLocator);
+end;
+
+procedure TROTransportChannel.SetServerLocators(
+  const Value: TROServerLocatorCollection);
+begin
+  fServerLocators.Assign(Value);
+end;
+
+procedure TROTransportChannel.TriggerProgress(iType:TProgressType; iDirection: TProgressDirection; iTransfered, iTotal: integer);
+begin
+  if Assigned(OnProgress) then OnProgress(self, iType, iDirection, iTransfered, iTotal);
+end;
+
+procedure TROTransportChannel.SetSynchronizedProbing(const Value: Boolean);
+begin
+  fSynchronizedProbing := Value;
+  if fProbeTimer <> nil then
+    fProbeTimer.Synchronized := fSynchronizedProbing;
+end;
+
+procedure TROTransportChannel.Dispatch(aMessage: IROMessage);
+var
+  lRequest, lResponse: TMemoryStream;
+  aFreeStream: Boolean;
+  lRetry: boolean;
+begin
+  try
+    BeforeDispatch(aMessage);
+  except
+    on E: Exception do begin
+      lRetry:=False;
+      if assigned(OnException) then OnException(self, e, lRetry);
+      if not lRetry then raise;
+    end;
+  end;
+//  if aMessage.ClientID = EmptyGUID then
+//    aMessage.ClientID := NewGuid;
+
+  lRequest := TMemoryStream.Create;
+  try
+
+    aMessage.WriteToStream(lRequest);
+    repeat
+
+      try
+        aFreeStream := true;
+        lResponse := TMemoryStream.Create;
+        try
+          if lRetry then
+            BeforeDispatch(aMessage);
+
+          lRetry := false;
+          Dispatch(lRequest, lResponse);
+
+          aMessage.InitializeRead(Self);
+          try
+            aMessage.ReadFromStream(lResponse, aFreeStream);
+          except
+            aFreeStream:= True;
+            raise;
+          end;
+        finally
+          if aFreeStream then FreeAndNil(lResponse);
+        end;
+      except
+        on E: EROSessionNotFound do
+        begin
+          if assigned(fOnLoginNeeded) then begin
+            OnLoginNeeded(self, e, lRetry);
+            if not lRetry then raise;
+          end else raise;
+        end;
+
+        on E: Exception do
+        begin
+          if assigned(OnException) then
+            OnException(self, e, lRetry);
+          if not lRetry then
+            raise;
+        end;
+      end;
+    until not lRetry;
+  finally
+    lRequest.Free;
+  end;
+end;
+
+procedure TROTransportChannel.SetCurrentLocator(const Value: TROServerLocator);
+begin
+  if (fCurrentLocator <> Value) and (ServerLocators.IndexOf(Value) > -1) then
+    fCurrentLocator := Value;
+end;
+
+procedure TROTransportChannel.AsyncException(aAsyncInterface: IROAsyncInterface;
+  AsyncException: Exception);
+begin
+  if Assigned(fOnAsyncException) then fOnAsyncException(self,aAsyncInterface,AsyncException);  
+end;
+
+procedure TROTransportChannel.BeforeDispatch(aMessage: IROMessage);
+begin
+ //
+end;
+
+procedure TROTransportChannel.CheckProperties;
+begin
+// nothing
+end;
+
+function TROTransportChannel.intInitServerLocator: integer;
+var
+  templocator : TROServerLocator;
+begin
+  templocator := NIL;
+  Result := fFaultToleranceLocatorIdx;
+
+  // Performs load balacing by changing the target host
+  if (doLoadBalanced in fDispatchOptions) then begin
+    if fServerLocators.GetNextLocator(templocator, fLoadBalancerLocatorIdx, fLoadBalancerLocatorIdx, True) then begin
+      SetServerLocator(templocator, NIL);
+      fCurrentLocator := templocator;
+
+      Result := fLoadBalancerLocatorIdx;
+      fFaultToleranceLocatorIdx := Result;
+    end;
+  end;
+end;
+
+procedure TROTransportChannel.intChangeServerLocator(var faultstartlocatoridx: integer; var aRetry: Boolean; const aException: Exception);
+var
+  templocator : TROServerLocator;
+begin
+  if (doFaultTolerant in fDispatchOptions) then begin
+    // This can improve speed during the next requests
+    if (fCurrentLocator<>NIL) and fCurrentLocator.DisableOnFailure then fCurrentLocator.Enabled := FALSE;
+
+    // Fail-over support: checks using all server locators
+    if fServerLocators.GetNextLocator(templocator, fFaultToleranceLocatorIdx, faultstartlocatoridx, FALSE) then begin
+      aRetry := TRUE;
+
+      SetServerLocator(templocator{fCurrentLocator}, aException);
+      fCurrentLocator := templocator;
+    end
+  end;
+end;
+
+procedure TROTransportChannel.ChangeServerLocator(
+  var faultstartlocatoridx: integer; var aRetry: Boolean;
+  const aException: Exception);
+begin
+  intChangeServerLocator(faultstartlocatoridx,aRetry, aException);
+end;
+
+function TROTransportChannel.InitServerLocator: Integer;
+begin
+  Result:=intInitServerLocator;
+end;
+
+{ TROObjectDisposer }
+
+procedure TROObjectDisposer.Add(iObject: TObject);
+begin
+  if IndexOf(iObject) = -1 then inherited Add(iObject);
+end;
+
+constructor TROObjectDisposer.Create(const aService: IInterface);
+begin
+  inherited Create;
+
+  fService := aService;
+end;
+
+destructor TROObjectDisposer.Destroy;
+var i: integer;
+    objretainer : IROObjectRetainer;
+begin
+  if Supports(fService, IROObjectRetainer, objretainer) then begin
+    // Only destroyes the var and out params the service is not retaining
+    for i := (Count-1) downto 0 do
+      if not objretainer.IsRetained(Items[i])
+        then TObject(Items[i]).Free();
+  end
+
+  else begin
+    for i := 0 to (Count-1) do
+      TObject(Items[i]).Free();
+  end;
+
+  fService := NIL;
+
+  inherited;
+end;
+
+{ TROMessageEnvelope }
+
+constructor TROMessageEnvelope.Create(AOwner: TComponent);
+begin
+  inherited;
+  fReuseOriginalStream := True;
+  EnvelopeMarker := GetDefaultEnvelopeMarker;
+end;
+
+function TROMessageEnvelope.GetDefaultEnvelopeMarker: string;
+begin
+  Result := NewGuidAsString;
+end;
+
+function TROMessageEnvelope.GetEnvelopeMarker: string;
+begin
+  Result := UTF8ToString(FEnvelopeMarker);
+end;
+
+procedure TROMessageEnvelope.intProcessIncoming(Source,
+  Dest: TStream; aMessage: IROMessage);
+begin
+  Dest.CopyFrom(Source,Source.Size-Source.Position);
+end;
+
+procedure TROMessageEnvelope.intProcessOutgoing(Source,
+  Dest: TStream; aMessage: IROMessage);
+begin
+  Dest.CopyFrom(Source,Source.Size-Source.Position);
+end;
+
+function TROMessageEnvelope.ProcessIncoming(aMessage: TROMessage;aStream: TStream): TStream;
+begin
+  if Assigned(fBeforeEnvelopeProcessed) then fBeforeEnvelopeProcessed(Self, aStream, memIncoming,aMessage);
+  Result := TMemoryStream.Create;
+  intProcessIncoming(aStream, Result, aMessage);
+  if fReuseOriginalStream then begin
+    aStream.Size:=0;
+    aStream.CopyFrom(Result,0);
+    Result.Free;
+    Result := aStream;
+  end;
+  Result.Position := 0;
+  if Assigned(fAfterEnvelopeProcessed) then fAfterEnvelopeProcessed(Self, Result, memIncoming,aMessage);
+  Result.Position := 0;
+end;
+
+function TROMessageEnvelope.ProcessOutgoing(aMessage: TROMessage; aStream: TStream): TStream;
+begin
+  if Assigned(fBeforeEnvelopeProcessed) then fBeforeEnvelopeProcessed(Self, aStream, memOutgoing,aMessage);
+  Result := TMemoryStream.Create;
+  aMessage.WriteEnvelopeHeader(Self, Result);
+  intProcessOutgoing(aStream, Result, aMessage);
+  if fReuseOriginalStream then begin
+    aStream.Size:=0;
+    aStream.CopyFrom(Result,0);
+    Result.Free;
+    Result:= aStream;
+  end;
+  Result.Position := 0;
+  if Assigned(fAfterEnvelopeProcessed) then fAfterEnvelopeProcessed(Self, Result, memOutgoing,aMessage);
+  Result.Position := 0;
+end;
+
+procedure TROMessageEnvelope.SetEnvelopeMarker(const Value: String);
+var
+  temp: String;
+begin
+  temp := Value;
+  FEnvelopeMarker := AnsiToUtf8(temp);
+  while Length(FEnvelopeMarker) > 255 do begin
+    SetLength(temp, Length(temp)-1);
+    FEnvelopeMarker := AnsiToUtf8(temp);
+  end;
+  if FEnvelopeMarker = '' then FEnvelopeMarker := AnsiToUtf8(NewGuidAsString);
+end;
+
+{ TROMessageEnvelopeItem }
+
+procedure TROMessageEnvelopeItem.Assign(Source: TPersistent);
+begin
+  if (Source is TROMessageEnvelopeItem) then begin
+    fEnabled := TROMessageEnvelopeItem(Source).fEnabled;
+    fEnvelope := TROMessageEnvelopeItem(Source).fEnvelope;       
+  end
+  else begin
+    inherited;
+  end;
+end;
+
+constructor TROMessageEnvelopeItem.Create(aCollection: TCollection);
+begin
+  inherited;
+  Enabled := True;
+  fEnvelope := nil;
+end;
+
+destructor TROMessageEnvelopeItem.Destroy;
+begin
+
+  inherited;
+end;
+
+function TROMessageEnvelopeItem.GetDisplayName: string;
+begin
+  if (fEnvelope = nil) then
+    result := '[Unassigned]'
+  else
+    result := fEnvelope.EnvelopeMarker;
+end;
+
+function TROMessageEnvelopeItem.GetEnabled: boolean;
+begin
+  Result := fEnabled and Assigned(fEnvelope);
+end;
+
+procedure TROMessageEnvelopeItem.SetEnvelope(
+  const Value: TROMessageEnvelope);
+begin
+  fEnvelope := Value;
+end;
+
+
+{ TROMessageEnvelopeCollection }
+
+constructor TROMessageEnvelopeCollection.Create(aMessage: TROMessage);
+begin
+  inherited Create(TROMessageEnvelopeItem);
+  fMessage := aMessage;
+end;
+
+function TROMessageEnvelopeCollection.ItemByMarker(
+  const aMarker: String): TROMessageEnvelopeItem;
+var
+  i: integer;
+begin
+  for i := 0 to (Count - 1) do begin
+    Result := Items[i];
+    if (CompareText(Result.EnvelopeMarker, aMarker) = 0) then Exit;
+  end;
+  Result := nil;
+end;
+
+function TROMessageEnvelopeCollection.GetEnvelope(
+  Index: integer): TROMessageEnvelopeItem;
+begin
+  Result := TROMessageEnvelopeItem(GetItem(Index));
+end;
+
+
+function TROMessageEnvelopeCollection.ItemByEnvelope(const aEnvelope: TROMessageEnvelope): TROMessageEnvelopeItem;
+var
+  i: integer;
+begin
+  for i := 0 to (Count - 1) do begin
+    Result := Items[i];
+    if Result.fEnvelope = aEnvelope then Exit;
+  end;
+  Result := nil;
+end;
+
+procedure ClearAttributesList;
+var
+  i: integer;
+begin
+  for i := 0 to fServiceAttributeList.Count - 1 do
+    if fServiceAttributeList.Objects[i] <> nil then
+       fServiceAttributeList.Objects[i].Free;
+end;
+
+initialization
+  _MessageClasses := TClassList.Create;
+  _ExceptionClasses := TClassList.Create;
+
+  _ProxyClasses := TStringList.Create;
+  _ProxyClasses.Duplicates := dupError;
+  _ProxyClasses.Sorted := TRUE;
+
+  _TransportChannels := TStringList.Create;
+  _TransportChannels.Duplicates := dupError;
+  _TransportChannels.Sorted := TRUE;
+
+  RegisterExceptionClass(EROUnknownType);
+  RegisterExceptionClass(EROMessageTooLarge);
+  RegisterExceptionClass(EROSessionNotFound);
+  RegisterExceptionClass(EROSessionExpired);
+  RegisterExceptionClass(SessionNotFoundException);
+  fServiceAttributeList:= TStringList.Create;
+
+finalization
+  ClearAttributesList;
+  fServiceAttributeList.Free;
+  UnregisterExceptionClass(EROUnknownType);
+  UnregisterExceptionClass(EROMessageTooLarge);
+  UnregisterExceptionClass(SessionNotFoundException);
+  UnregisterExceptionClass(EROSessionExpired);
+  UnregisterExceptionClass(EROSessionNotFound);
+
+  _MessageClasses.Free;
+  _ExceptionClasses.Free;
+
+  FreeAndNil(_ProxyClasses);
+  FreeAndNil(_TransportChannels);
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROClientIntf.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROClientIntf.pas
new file mode 100644
index 0000000..0764715
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROClientIntf.pas	
@@ -0,0 +1,524 @@
+unit uROClientIntf;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes, SysUtils, TypInfo, uRODL;
+
+const
+  MESSAGE_TYPE_MESSAGE = 0;
+  MESSAGE_TYPE_EXCEPTION = 1;
+  MESSAGE_TYPE_EVENT = 2;
+
+  MAX_ITEM_NAME = $100; { max name length for interface, function etc. }
+  MAX_EXCEPTION_TEXT = $10000; { max exception text }
+
+type
+  { Misc }
+  TROURIType = (utHTTP, utTCP, utUDP, utPipes, utSMTP, utPOP3);
+  TROProbingOption = (poProbeWhenEnabled, poProbeWhenDisabled, poEnableIfProbeSucceeded, poDisableIfProbeFailed);
+  TROProbingOptions = set of TROProbingOption;
+
+const
+  URITypeIdentifiers : array[TROURIType] of string =
+    ('HTTP', 'TCP', 'UDP', 'PIPE', 'SMTP', 'POP3');
+
+type
+  TMessageType = (mtRequest,
+                  mtResponse,
+                  mtException,
+                  mtQueryServiceInfo,
+                  mtEvent,
+                  mtPoll);
+
+  { for Delphi 5 know we can reply on the correct value-assignment 0,1,2 }
+
+  { Forward declarations }
+  IROMessage = interface;
+  TROServerLocator = class;
+
+  { Misc }
+
+  DateTime = TDateTime; { Alias for the type TDateTime }
+
+  { IROMessage }
+  TParamAttribute = (paIsDateTime, paIsArrayElement);
+  TParamAttributes = set of TParamAttribute; { Set of TParamAttribute }
+
+  IROTransport = interface;
+
+  { IROMessage }
+  IROMessage = interface
+  ['{092FB8BE-5FC4-48CB-BB50-623465168B98}']
+    procedure Initialize(const aTransport : IROTransport; const anInterfaceName, aMessageName : string; aType: TMessageType); overload;
+    procedure Initialize(const aTransport : IROTransport; const aLibraryName, anInterfaceName, aMessageName : string; aType: TMessageType); overload;
+
+    procedure InitializeRequestMessage(const aTransport : IROTransport; const aLibraryName, anInterfaceName, aMessageName : string);
+    procedure InitializeResponseMessage(const aTransport : IROTransport; const aLibraryName, anInterfaceName, aMessageName : string);
+    procedure InitializeEventMessage(const aTransport : IROTransport; const aLibraryName, anInterfaceName, aMessageName : string);
+    procedure InitializeExceptionMessage(const aTransport : IROTransport; const aLibraryName, anInterfaceName, aMessageName : string);
+
+    procedure Finalize;
+
+    function GetClientID : TGUID;
+    procedure SetClientID(const Value : TGUID);
+
+    {$IFDEF DOTNET}
+    {$ELSE}
+    procedure Write(const aName : string; aTypeInfo : PTypeInfo; const Ptr; ExtraAttributes : TParamAttributes);
+    {$ENDIF}
+    {$IFDEF DOTNET}
+    {$ELSE}
+    procedure Read(const aName : string; aTypeInfo : PTypeInfo; var Ptr; ExtraAttributes : TParamAttributes);
+    {$ENDIF}
+
+    function GetInterfaceName : string;
+    function GetMessageName : string;
+    procedure SetInterfaceName(const aValue : string);
+    procedure SetMessageName(const aValue : string);
+    procedure WriteToStream(aStream : TStream);
+    procedure ReadFromStream(aStream : TStream); overload;
+    procedure ReadFromStream(aStream : TStream; var aFreeStream: Boolean); overload;
+    procedure WriteException(aStream : TStream; anException : Exception);
+    function GetMessageType: TMessageType;
+
+    procedure FreeStream;
+
+    procedure SetAttributes(aTransport: IROTransport; const aNames: array of string; const aValues: array of string);
+    procedure UnsetAttributes(aTransport: IROTransport);
+
+    procedure InitializeRead(const aTransport : IROTransport);
+
+    property MessageName : string read GetMessageName write SetMessageName;
+    property InterfaceName : string read GetInterfaceName write SetInterfaceName;
+    property ClientID : TGUID read GetClientID write SetClientID;
+    property MessageType : TMessageType read GetMessageType;
+    //
+    { Writers }
+    procedure WriteInteger(const aName : string; anOrdType : TOrdType; const Ref; ArrayElementId : integer = -1);
+    procedure WriteInt64(const aName : string; const Ref; ArrayElementId : integer = -1);
+    procedure WriteEnumerated(const aName : string; anEnumTypeInfo : PTypeInfo; const Ref; ArrayElementId : integer = -1);
+    procedure WriteUTF8String(const aName : string; const Ref; ArrayElementId : integer = -1);
+    procedure WriteAnsiString(const aName : string; const Ref; ArrayElementId : integer = -1);
+    procedure WriteWideString(const aName : string; const Ref; ArrayElementId : integer = -1);
+    procedure WriteDateTime(const aName : string; const Ref; ArrayElementId : integer = -1);
+    procedure WriteDouble(const aName : string; aFloatType : TFloatType; const Ref; ArrayElementId : integer = -1);
+    procedure WriteVariant(const aName : string; const Ref; ArrayElementId : integer = -1);
+    procedure WriteXml(const aName : string; const Ref; ArrayElementId : integer = -1);
+    procedure WriteGuid(const aName : string; const Ref; ArrayElementId : integer = -1);
+    procedure WriteDecimal(const aName : string; const Ref; ArrayElementId : integer = -1);
+    procedure WriteStruct(const aName : string; const Ref; aClass: TClass = nil; ArrayElementId : integer = -1);
+    procedure WriteArray(const aName : string; const Ref; aClass: TClass = nil; ArrayElementId : integer = -1);
+    procedure WriteBinary(const aName : string; const Ref; ArrayElementId : integer = -1);
+
+    { Readers }
+    procedure ReadInteger(const aName : string; anOrdType : TOrdType; var Ref; ArrayElementId : integer = -1);
+    procedure ReadInt64(const aName : string; var Ref; ArrayElementId : integer = -1);
+    procedure ReadEnumerated(const aName : string; anEnumTypeInfo : PTypeInfo; var Ref; ArrayElementId : integer = -1);
+    procedure ReadUTF8String(const aName : string; var Ref; ArrayElementId : integer = -1; iMaxLength:integer=-1);
+    procedure ReadAnsiString(const aName : string; var Ref; ArrayElementId : integer = -1; iMaxLength:integer=-1);    
+    procedure ReadWideString(const aName : string; var Ref; ArrayElementId : integer = -1; iMaxLength:integer=-1);
+    procedure ReadDateTime(const aName : string; var Ref; ArrayElementId : integer = -1);
+    procedure ReadDouble(const aName : string; aFloatType : TFloatType; var Ref; ArrayElementId : integer = -1);
+    procedure ReadVariant(const aName : string; var Ref; ArrayElementId : integer = -1);
+    procedure ReadXml(const aName : string; var Ref; ArrayElementId : integer = -1);
+    procedure ReadGuid(const aName : string; var Ref; ArrayElementId : integer = -1);
+    procedure ReadDecimal(const aName : string; var Ref; ArrayElementId : integer = -1);
+    function ReadStruct(const aName : string; aClass : TClass; var Ref; ArrayElementId : integer = -1): Boolean;
+    function ReadArray(const aName : string; aClass : TClass; var Ref; ArrayElementId : integer = -1): Boolean;
+    procedure ReadBinary(const aName : string; var Ref; ArrayElementId : integer = -1);
+  end;
+
+  IROMessageCloneable = interface
+  ['{4AA33660-25B7-4794-A978-CB791640475D}']
+    function Clone:IROMessage;
+  end;
+
+  IROStreamAccess = interface
+  ['{DF3D000F-7EB3-4981-AA01-921553CAFF52}']
+    function GetStream : TStream;
+
+    property Stream : TStream read GetStream;
+  end;
+
+  { IROTransport }
+  IROTransport = interface
+  ['{56FA09B9-FFC8-4432-80E3-BF78E5E7DF33}']
+    function GetTransportObject : TObject;
+  end;
+
+  { IROTransportChannel }
+  IROTransportChannel = interface(IROTransport)
+  ['{EDFA0CF3-3265-46C9-AC5C-14C3CACF2721}']
+    procedure SetServerLocator(aServerLocator : TROServerLocator; anException : Exception = NIL);
+    function Probe(aServerLocator : TROServerLocator) : boolean;
+    procedure ProbeAll;
+
+    procedure Dispatch(aRequest, aResponse : TStream); overload;
+    procedure Dispatch(aMessage: IROMessage); overload;
+    procedure BeforeDispatch(aMessage: IROMessage);
+  end;
+
+  { IROMetadataReader }
+  IROMetadataReader = interface
+  ['{526269B5-FAB2-45A2-A2E6-8CBFF317BC98}']
+    procedure RetrieveMetadata(out Metadata : TStream);
+    procedure RetrieveRODL(out RODLLibrary : TRODLLibrary);
+  end;
+
+  { IROTCPTransport }
+  IROTCPTransport = interface(IROTransport)
+  ['{C80E773D-B8A8-4E0D-9B49-2668EFC1E27F}']
+    function GetClientAddress : string;
+
+    property ClientAddress : string read GetClientAddress;
+  end;
+
+  { IROHTTPTransport }
+  IROHTTPTransport = interface(IROTCPTransport)
+  ['{AD51DB69-993F-49C1-9F3B-4C678A95007D}']
+    procedure SetHeaders(const aName, aValue : string);
+    function GetHeaders(const aName : string) : string;
+
+    function GetContentType : string;
+    procedure SetContentType(const aValue : string);
+
+    function GetUserAgent : string;
+    procedure SetUserAgent(const aValue : string);
+
+    function GetTargetURL : string;
+    procedure SetTargetURL(const aValue : string);
+
+    procedure SetPathInfo (const aValue : string);
+    function GetPathInfo : string;
+    function GetQueryString : string;
+    function GetLocation : string;
+
+    property ContentType : string read GetContentType write SetContentType;
+    property UserAgent : string read GetUserAgent write SetUserAgent;
+    property TargetURL : string read GetTargetURL write SetTargetURL;
+    property Headers[const aName : string] : string read GetHeaders write SetHeaders;
+
+    property PathInfo : string read GetPathInfo write SetPathInfo;
+    property QueryString : string read GetQueryString;
+    function GetQueryParameter(const aName: string): string; 
+
+    property Location : string read GetLocation;
+  end;
+
+  { IROEventWriter }
+  IROEventWriter = interface
+  ['{501A01A8-0663-488A-BB29-3C0FBA7F43B5}']
+    function GetSessionList: TStrings;
+    function GetExcludeSender: boolean;
+    function GetExcludeSessionList: boolean;
+    procedure SetExcludeSender(const Value: boolean);
+    procedure SetExcludeSessionList(const Value: boolean);
+
+    property ExcludeSender : boolean read GetExcludeSender write SetExcludeSender;
+    property ExcludeSessionList : boolean read GetExcludeSessionList write SetExcludeSessionList;
+    property SessionList : TStrings read GetSessionList;
+  end;
+
+  IROEventsWriter = IROEventWriter {$IFDEF DELPHI10UP}deprecated{$ENDIF};
+
+  { IROModuleInfo }
+  TDataFormat = string;
+  IROModuleInfo = interface
+  ['{83ED3A44-DA4B-4F4E-884A-DDF5E726A2C1}']
+    procedure GetModuleInfo(aStream : TStream; const aTransport : IROTransport; var aFormat : TDataFormat);
+    procedure GetRodlInfo(aStream : TStream; const aTransport : IROTransport; var aFormat : TDataFormat); 
+  end;
+
+  IRONamedModuleInfo = interface(IROModuleInfo)
+  ['{C7D24186-D600-465C-9B09-4E1E2CF835BE}']
+    function ModuleInfoName: string;
+  end;
+
+  { TROServerLocator }
+  TROServerLocatorNotifyEvent = procedure(Sender : TROServerLocator) of object;
+  TROServerLocator = class(TCollectionItem)
+  private
+    fEnabled: boolean;
+    fPort: integer;
+    fHost: string;
+    fDisableOnFailure: boolean;
+    fLoadBalancingServer: boolean;
+    fProbingOptions: TROProbingOptions;
+    fOnEnabledChanged: TROServerLocatorNotifyEvent;
+    fName: string;
+
+    procedure SetHost(const Value: string);
+    procedure SetPort(const Value: integer);
+    function GetEnabled: boolean;
+    procedure SetEnabled(const Value: boolean);
+
+  protected
+    function GetDisplayName: string; override;
+
+  public
+    constructor Create(Collection: TCollection); override;
+    destructor Destroy; override;
+
+    function GetNamePath: string; override;
+    procedure Assign(Source: TPersistent); override;
+
+  published
+    property Name : string read fName write fName;
+    property Enabled : boolean read GetEnabled write SetEnabled;
+    property Host : string read fHost write SetHost;
+    property Port : integer read fPort write SetPort;
+    property DisableOnFailure : boolean read fDisableOnFailure write fDisableOnFailure;
+    property LoadBalancingServer : boolean read fLoadBalancingServer write fLoadBalancingServer;
+    property ProbingOptions : TROProbingOptions read fProbingOptions write fProbingOptions;
+
+    property OnEnabledChanged : TROServerLocatorNotifyEvent read fOnEnabledChanged write fOnEnabledChanged;
+  end;
+
+  { IROMultiThreadAwareChannel }
+  IROMultiThreadAwareChannel = interface
+    ['{0C2FD6DE-DEC1-4B1D-851C-F55C36869920}']
+  end;
+
+  { TROServerLocatorCollection }
+  TROServerLocatorCollection = class(TCollection)
+  private
+    fOwner : TComponent;
+
+  protected
+    function GetItems(aIndex: integer): TROServerLocator;
+    procedure SetItems(aIndex: integer; aNewItem: TROServerLocator);
+    function GetOwner: TPersistent; override;
+  public
+    constructor Create(aOwner : TComponent);
+    destructor Destroy; override;
+
+    function Add: TROServerLocator;
+    function Insert(aIndex: integer): TROServerLocator;
+    function IndexOf(aItem: TROServerLocator): integer;
+
+    function GetNextLocator(out aLocator : TROServerLocator;
+                            var CurrentIndex : integer;
+                            var InitialIndex : integer;
+                            ForLoadBalancing : boolean) : boolean;
+
+    procedure EnableAll;
+    procedure DisableAll;
+
+    property Items[Index: integer]: TROServerLocator read GetItems write SetItems; default;
+  end;
+
+  IROEventReceiver = interface
+    ['{A3320CBC-2E62-41C8-9C3D-FB7ADCBF6920}']
+    procedure Dispatch(aStream: TStream; aCaller: TThread);
+    function GetObject: TObject;
+  end;
+  
+  IROActiveEventChannel = interface
+    ['{BFDD73B9-3C6A-4E78-AFFA-7B9A182A5CC4}']
+    procedure RegisterEventReceiver(aReceiver: IROEventReceiver);
+    procedure UnregisterEventReceiver(aReceiver: IROEventReceiver);
+  end;
+
+
+
+implementation
+
+uses
+  uROClasses;
+
+{ TROServerLocator }
+constructor TROServerLocator.Create(Collection: TCollection);
+begin
+  inherited;
+
+  fProbingOptions := [poProbeWhenEnabled, poProbeWhenDisabled, poEnableIfProbeSucceeded, poDisableIfProbeFailed];
+  fLoadBalancingServer := TRUE;
+  fEnabled := TRUE;
+  fDisableOnFailure := TRUE;
+end;
+
+destructor TROServerLocator.Destroy;
+begin
+  inherited;
+end;
+
+function TROServerLocator.GetDisplayName: string;
+var options : string;
+begin
+  if (Trim(fHost)='')
+    then result := '!!Empty!!'
+    else result := fHost;
+
+  if (fPort>0) then result := result+':'+IntToStr(fPort);
+
+  if not Enabled then result := '(Disabled) '+result;
+
+  if LoadBalancingServer then options := 'LBS' else options := 'non-LBS';
+  if DisableOnFailure then options := options+', Disable On Failure' else options := options+',';
+  options := options+', '+GetPropValue(Self, 'ProbingOptions');
+
+  result := result+' '+options;
+end;
+
+function TROServerLocator.GetEnabled: boolean;
+begin
+  result := fEnabled and (Length(fHost)>0);
+end;
+
+procedure TROServerLocator.SetEnabled(const Value: boolean);
+begin
+  if (fEnabled=Value) then Exit;
+
+  fEnabled := Value;
+  if Assigned(fOnEnabledChanged) then fOnEnabledChanged(Self);
+end;
+
+procedure TROServerLocator.SetHost(const Value: string);
+begin
+  fHost := Trim(Value);
+end;
+
+procedure TROServerLocator.SetPort(const Value: integer);
+begin
+  if (fPort<>Value) and (Value>=0)
+    then fPort := Value;
+end;
+
+function TROServerLocator.GetNamePath: string;
+begin
+  if (Collection <> nil) and (Collection.Owner <> nil) then
+    result := TComponent(Collection.Owner).Name + '.' + FName
+  else                
+    result := inherited GetNamePath
+end;
+
+procedure TROServerLocator.Assign(Source: TPersistent);
+begin
+  if Source is TROServerLocator then begin
+    Name := TROServerLocator(Source).Name;
+    Enabled := TROServerLocator(Source).Enabled;
+    Host := TROServerLocator(Source).Host;
+    Port := TROServerLocator(Source).Port;
+    DisableOnFailure := TROServerLocator(Source).DisableOnFailure;
+    LoadBalancingServer := TROServerLocator(Source).LoadBalancingServer;
+    ProbingOptions := TROServerLocator(Source).ProbingOptions;
+    OnEnabledChanged := TROServerLocator(Source).OnEnabledChanged;
+  end 
+  else
+    inherited;
+end;
+
+{ TROServerLocatorCollection }
+constructor TROServerLocatorCollection.Create(aOwner : TComponent);
+begin
+  inherited Create(TROServerLocator);
+
+  fOwner := aOwner;  
+end;
+
+destructor TROServerLocatorCollection.Destroy;
+begin
+  inherited;
+end;
+
+function TROServerLocatorCollection.Add: TROServerLocator;
+begin
+  result := TROServerLocator(inherited Add);
+end;
+
+function TROServerLocatorCollection.Insert(aIndex: integer): TROServerLocator;
+begin
+  result := TROServerLocator(inherited Insert(aIndex));
+end;
+
+function TROServerLocatorCollection.GetItems(aIndex: integer): TROServerLocator;
+begin
+  result := TROServerLocator(inherited Items[aIndex]);
+end;
+
+function TROServerLocatorCollection.IndexOf(aItem: TROServerLocator): integer;
+var i: integer;
+begin
+  result := - 1;
+  for i := 0 to (Count - 1) do
+    if (aItem = Items[i]) then begin
+      result := i;
+      Exit;
+  end;
+end;
+
+procedure TROServerLocatorCollection.SetItems(aIndex: integer; aNewItem: TROServerLocator);
+begin
+  inherited Items[aIndex].Assign(aNewItem);
+end;
+
+
+function TROServerLocatorCollection.GetNextLocator(out aLocator : TROServerLocator;
+  var CurrentIndex : integer; var InitialIndex : integer; ForLoadBalancing : boolean) : boolean;
+var idx : integer;
+begin
+  aLocator := NIL;
+  result := FALSE;
+  if Count=0 then Exit;
+
+  idx := CurrentIndex;
+  repeat
+    try
+      idx := IncID(idx, Count-1);
+
+      if (idx=InitialIndex)
+        then Exit // We ended up to the first one.
+
+      else if Items[idx].Enabled then begin
+        if ForLoadBalancing and not Items[idx].LoadBalancingServer
+          then Continue;
+
+        result := TRUE;
+        aLocator := Items[idx];
+        CurrentIndex := idx;
+        Exit;
+      end;
+    finally
+      if InitialIndex = -1 then
+        InitialIndex := 0;
+    end;
+  until FALSE;
+end;
+
+procedure TROServerLocatorCollection.DisableAll;
+var i: Integer;
+begin
+  for i := 0 to (Count - 1) do begin
+    Items[i].Enabled := FALSE;
+  end;
+end;
+
+procedure TROServerLocatorCollection.EnableAll;
+var i: Integer;
+begin
+  for i := 0 to (Count - 1) do begin
+    Items[i].Enabled := TRUE;
+  end;
+end;
+
+function TROServerLocatorCollection.GetOwner: TPersistent;
+begin
+  result := fOwner;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROComboService.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROComboService.pas
new file mode 100644
index 0000000..c360cac
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROComboService.pas	
@@ -0,0 +1,293 @@
+unit uROComboService;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+
+interface
+
+uses
+  Classes, SvcMgr;
+
+type
+  TROService = class(TService)
+  private
+  protected
+    procedure Start(Sender: TService; var Started: boolean);
+    procedure Stop(Sender: TService; var Stopped: boolean);
+
+    procedure Execute(Sender: TService);
+  public
+    function GetServiceController: TServiceController; override;
+
+    constructor CreateNew(AOwner: TComponent; Dummy: integer = 0); override;
+
+    procedure CreateForm(InstanceClass: TComponentClass; var Reference);
+    procedure Run;
+  published
+  end;
+
+function ROStartService(const aServiceName, aDisplayName: string; aDescription: string = '';
+  aStartType: TStartType = stAuto; aDependency : string = ''; aServiceType: TServiceType = stWin32;
+  aUserName: string = ''; aPassword: string = ''; aLoadGroup: string = '---'; aParameters: string = ''): Boolean;
+function ROStartDependentService(const aServiceName, aDisplayName: string; aDependency : string = ''): Boolean;
+function ROIsService: boolean;
+
+var
+  ROService: TROService;
+
+implementation
+uses
+  Windows, SysUtils, WinSvc;
+
+var
+  FIsService: boolean;
+  FServiceName: string;
+  FDisplayName: string;
+  FStartType: TStartType;
+  FServiceType: TServiceType;
+  FUserName: string;
+  FPassword: string;
+  FLoadGroup: string;
+  FRegisterService: boolean = False;
+
+type
+  PServiceDescriptionA = ^TServiceDescriptionA;
+  PServiceDescriptionW = ^TServiceDescriptionW;
+  PServiceDescription = ^TServiceDescriptionA;
+  _SERVICE_DESCRIPTIONA = record
+    lpDescription: PChar;
+  end;
+  {$EXTERNALSYM _SERVICE_DESCRIPTIONA}
+  _SERVICE_DESCRIPTIONW = record
+    lpDescription: PWideChar;
+  end;
+  {$EXTERNALSYM _SERVICE_DESCRIPTIONW}
+  _SERVICE_DESCRIPTION = _SERVICE_DESCRIPTIONA;
+  {$EXTERNALSYM _SERVICE_DESCRIPTION}
+  SERVICE_DESCRIPTIONA = _SERVICE_DESCRIPTIONA;
+  {$EXTERNALSYM SERVICE_DESCRIPTIONA}
+  SERVICE_DESCRIPTIONW = _SERVICE_DESCRIPTIONW;
+  {$EXTERNALSYM SERVICE_DESCRIPTIONW}
+  SERVICE_DESCRIPTION = _SERVICE_DESCRIPTIONA;
+  {$EXTERNALSYM SERVICE_DESCRIPTION}
+  TServiceDescriptionA = _SERVICE_DESCRIPTIONA;
+  TServiceDescriptionW = _SERVICE_DESCRIPTIONW;
+  TServiceDescription = TServiceDescriptionA;
+
+  TChangeServiceConfig2 = function (hService: SC_HANDLE; dwInfoLevel: DWORD; lpInfo: Pointer): BOOL; stdcall;
+
+const
+  SERVICE_CONFIG_DESCRIPTION     = 1;
+  {$EXTERNALSYM SERVICE_CONFIG_DESCRIPTION}
+  SERVICE_CONFIG_FAILURE_ACTIONS = 2;
+  {$EXTERNALSYM SERVICE_CONFIG_FAILURE_ACTIONS}
+
+procedure ServiceController(CtrlCode: dword); stdcall;
+begin
+  ROService.Controller(CtrlCode);
+end;
+
+function TROService.GetServiceController: TServiceController;
+begin
+  Result := ServiceController;
+end;
+
+procedure TROService.CreateForm(InstanceClass: TComponentClass; var Reference);
+begin
+  SvcMgr.Application.CreateForm(InstanceClass, Reference);
+end;
+
+procedure TROService.Run;
+begin
+  SvcMgr.Application.Run;
+end;
+
+constructor TROService.CreateNew(AOwner: TComponent; Dummy: integer);
+begin
+  inherited;
+  AllowPause := False;
+  Interactive := True;
+  DisplayName := FDisplayName;
+  Name := FServiceName;
+  OnStart := Start;
+  OnStop := Stop;
+
+  if FRegisterService then
+  begin
+    // New part
+    StartType := FStartType;
+    ServiceType := FServiceType;
+    ServiceStartName := FUserName;
+    Password := FPassword;
+    LoadGroup := FLoadGroup;
+  end;
+end;
+
+procedure TROService.Start(Sender: TService; var Started: boolean);
+begin
+  Started := True;
+end;
+
+procedure TROService.Execute(Sender: TService);
+begin
+  while not Terminated do
+    ServiceThread.ProcessRequests(True);
+end;
+
+procedure TROService.Stop(Sender: TService; var Stopped: boolean);
+begin
+  Stopped := True;
+end;
+
+function ROIsService: boolean;
+begin
+  Result := FIsService;
+end;
+
+function ROStartService(const aServiceName, aDisplayName: string; aDescription: string = '';
+  aStartType: TStartType = stAuto; aDependency : string = ''; aServiceType: TServiceType = stWin32;
+  aUserName: string = ''; aPassword: string = ''; aLoadGroup: string = '---'; aParameters: string = ''): Boolean;
+var
+  Mgr, Svc: Integer;
+  ServiceStartName: string;
+  Config: Pointer;
+  Size: DWord;
+  lServiceDescr: TServiceDescription;
+  lHandle: HMODULE;
+  lChangeServiceConfig2: TChangeServiceConfig2;
+begin
+  FRegisterService := False;
+  FDisplayName := aDisplayName;
+  FServiceName := StringReplace(aServiceName, ' ', '_', [rfReplaceAll]);
+  FStartType := aStartType;
+  FServiceType := aServiceType;
+  FUserName := aUserName;
+  FPassword := aPassword;
+  FLoadGroup := aLoadGroup;
+
+  FIsService := FindCmdLineSwitch('install', ['-', '\', '/'], True) or
+    FindCmdLineSwitch('uninstall', ['-', '\', '/'], True);
+
+  if FIsService then
+  begin
+    FRegisterService := True;
+    try
+      SvcMgr.Application.Initialize;
+      ROService := TROService.CreateNew(SvcMgr.Application, 0);
+
+      (* Version 1.1, block added 29.10.2004 by Janne Timmerbacka *)
+      if Length( aDependency ) > 0 then
+        with RoService.Dependencies do
+        begin
+          Clear;
+          with Add as TDependency do Name := aDependency;
+        end;
+
+      ROService.Run;
+      FreeAndNil(ROService);
+    finally
+      FRegisterService := False;
+    end;
+
+    Mgr := OpenSCManager(nil, nil, SC_MANAGER_CONNECT);
+    if Mgr <> 0 then
+    begin
+      Svc := OpenService(Mgr, PChar(FServiceName), SERVICE_QUERY_CONFIG OR SERVICE_CHANGE_CONFIG);
+      if Svc<>0 then
+      begin
+        if Length(aParameters)>0 then begin
+          if pos(' ', ParamStr(0))>0 then
+            ServiceStartName := AnsiQuotedStr(AnsiDequotedStr(ParamStr(0),'"'),'"')
+          else
+            ServiceStartName := ParamStr(0);
+          if ChangeServiceConfig(Svc,
+            SERVICE_NO_CHANGE, SERVICE_NO_CHANGE,
+            SERVICE_NO_CHANGE,
+            PChar(ServiceStartName + ' ' + aParameters),
+            nil, nil, nil, nil, nil, nil) = False then begin
+            //  OutputDebugString(Pchar(SysErrorMessage(GetLastError)));
+            end;
+          end;
+        lServiceDescr.lpDescription := PChar(aDescription);
+        lHandle := GetModuleHandle(advapi32);
+        if lHandle <> 0 then
+        begin
+          @lChangeServiceConfig2 := GetProcAddress(lHandle, 'ChangeServiceConfig2A');
+          if Assigned(lChangeServiceConfig2) then
+            lChangeServiceConfig2(Svc, SERVICE_CONFIG_DESCRIPTION, @lServiceDescr);
+        end;
+        CloseServiceHandle(Svc);
+      end;
+      CloseServiceHandle(Mgr);
+    end;
+    ExitProcess(0);
+
+    Result := True;
+    Exit;
+  end;
+
+  if FindCmdLineSwitch('standalone', ['-', '\', '/'], True) then
+    FIsService := False
+  else begin
+    Mgr := OpenSCManager(nil, nil, SC_MANAGER_CONNECT);
+    if Mgr <> 0 then
+    begin
+      Svc := OpenService(Mgr, PChar(FServiceName), SERVICE_QUERY_CONFIG);
+      FIsService := Svc <> 0;
+      if FIsService then
+      begin
+        QueryServiceConfig(Svc, nil, 0, Size);
+        Config := AllocMem(Size);
+        try
+          QueryServiceConfig(Svc, Config, Size, Size);
+          ServiceStartName := PQueryServiceConfig(Config)^.lpServiceStartName;
+          if CompareText(ServiceStartName, 'LocalSystem') = 0 then
+            ServiceStartName := 'SYSTEM';
+        finally
+          Dispose(Config);
+        end;
+        CloseServiceHandle(Svc);
+      end;
+      CloseServiceHandle(Mgr);
+    end;
+  end;
+(*
+  if FIsService then
+  begin
+    Size := 256;
+    SetLength(UserName, Size);
+    GetUserName(PChar(UserName), Size);
+    SetLength(UserName, StrLen(PChar(UserName)));
+    n := Pos('\', ServiceStartName);
+    if (n <> -1) then
+      ServiceStartName := Trim(Copy(ServiceStartName, n + 1, maxInt));
+    FIsService := CompareText(UserName, ServiceStartName) = 0;
+  end;
+*)
+  Result := FIsService;
+
+  if FIsService then
+  begin
+    SvcMgr.Application.Initialize;
+    ROService := TROService.CreateNew(SvcMgr.Application, 0);
+  end;
+end;
+
+function ROStartDependentService(const aServiceName, aDisplayName: string; aDependency : string = ''): Boolean;
+begin
+  Result := ROStartService(aServiceName, aDisplayName, '', stAuto,
+  aDependency);
+end;
+
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROCompression.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROCompression.pas
new file mode 100644
index 0000000..2e22a99
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROCompression.pas	
@@ -0,0 +1,356 @@
+unit uROCompression;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+{$IFDEF FPC}
+  {$IFDEF MSWINDOWS}
+    {$DEFINE FPCMSWIN}
+  {$ENDIF}
+  {$IFDEF LINUX}
+    {$DEFINE FPCLINUX}
+  {$ENDIF}
+  {$UNDEF MSWINDOWS}
+  {$DEFINE LINUX}
+{$ENDIF FPC}
+
+interface
+
+uses
+     Classes;
+
+
+{$IFNDEF MSWINDOWS}
+procedure ZCompressStream(anInputStream, aCompressedStream : TStream);
+procedure ZDecompressStream(aCompressedStream, anOutputStream : TStream);
+{$ENDIF}
+function CompressStr(const aString : AnsiString) : AnsiString;
+function DecompressStr(const aString : AnsiString) : AnsiString;
+function CompressAndEncode(const aString: Ansistring): Ansistring;
+function DecodeAndUnCompress(const aString: Ansistring): Ansistring;
+procedure EncodeStream(anInputStream, anOutputStream: TStream);
+procedure DecodeStream(anInputStream, anOutputStream: TStream);
+
+implementation
+
+uses
+  uROClasses,
+  uROZLib, SysUtils;
+
+const
+  EncodeTable: array[0..63] of AnsiChar =
+    'ABCDEFGHIJKLMNOPQRSTUVWXYZ' +
+    'abcdefghijklmnopqrstuvwxyz' +
+    '0123456789+/';
+
+  DecodeTable: array[#0..#127] of Integer = (
+    Byte('='), 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64,
+    64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64,
+    64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 64, 62, 64, 64, 64, 63,
+    52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 64, 64, 64, 64, 64, 64,
+    64,  0,  1,  2,  3,  4,  5,  6,  7,  8,  9, 10, 11, 12, 13, 14,
+    15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 64, 64, 64, 64, 64,
+    64, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40,
+    41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 64, 64, 64, 64, 64);
+
+type
+  PPacket = ^TPacket;
+  TPacket = packed record
+    case Integer of
+      0: (b0, b1, b2, b3: Byte);
+      1: (i: Integer);
+      2: (a: array[0..3] of Byte);
+      3: (c: array[0..3] of AnsiChar);
+  end;
+
+procedure EncodePacket(const Packet: TPacket; NumChars: Integer; OutBuf: PAnsiChar);
+begin
+  OutBuf[0] := EnCodeTable[Packet.a[0] shr 2];
+  OutBuf[1] := EnCodeTable[((Packet.a[0] shl 4) or (Packet.a[1] shr 4)) and $0000003f];
+  if NumChars < 2 then
+    OutBuf[2] := '='
+  else OutBuf[2] := EnCodeTable[((Packet.a[1] shl 2) or (Packet.a[2] shr 6)) and $0000003f];
+  if NumChars < 3 then
+    OutBuf[3] := '='
+  else OutBuf[3] := EnCodeTable[Packet.a[2] and $0000003f];
+end;
+
+function DecodePacket(InBuf: PAnsiChar; var nChars: Integer): TPacket;
+begin
+  Result.a[0] := (DecodeTable[InBuf[0]] shl 2) or
+    (DecodeTable[InBuf[1]] shr 4);
+  NChars := 1;
+  if InBuf[2] <> '=' then
+  begin
+    Inc(NChars);
+    Result.a[1] := (DecodeTable[InBuf[1]] shl 4) or
+      (DecodeTable[InBuf[2]] shr 2);
+  end;
+  if InBuf[3] <> '=' then
+  begin
+    Inc(NChars);
+    Result.a[2] := (DecodeTable[InBuf[2]] shl 6) or DecodeTable[InBuf[3]];
+  end;
+end;
+
+procedure EncodeStream(anInputStream, anOutputStream: TStream);
+type
+  PInteger = ^Integer;
+var
+  InBuf: array[0..509] of Byte;
+  OutBuf: array[0..1023] of AnsiChar;
+  BufPtr: PAnsiChar;
+  I, J, K, BytesRead: Integer;
+  Packet: TPacket;
+begin
+  K := 0;
+  FillChar(OutBuf,SizeOf(OutBuf),#0);
+  repeat
+    BytesRead := anInputStream.Read(InBuf, SizeOf(InBuf));
+    I := 0;
+    BufPtr := OutBuf;
+    while I < BytesRead do
+    begin
+      if BytesRead - I < 3 then
+        J := BytesRead - I
+      else J := 3;
+      Packet.i := 0;
+      Packet.b0 := InBuf[I];
+      if J > 1 then
+        Packet.b1 := InBuf[I + 1];
+      if J > 2 then
+        Packet.b2 := InBuf[I + 2];
+      EncodePacket(Packet, J, BufPtr);
+      Inc(I, 3);
+      Inc(BufPtr, 4);
+      Inc(K, 4);
+      if K > 75 then
+      begin
+        BufPtr[0] := #$0D;
+        BufPtr[1] := #$0A;
+        Inc(BufPtr, 2);
+        K := 0;
+      end;
+    end;
+    anOutputStream.Write(Outbuf, BufPtr - PAnsiChar(@OutBuf));
+  until BytesRead = 0;
+end;
+
+procedure DecodeStream(anInputStream, anOutputStream: TStream);
+var
+  InBuf: array[0..75] of AnsiChar;
+  OutBuf: array[0..49] of Byte;
+  InBufPtr, OutBufPtr: PAnsiChar;
+  I, J, K, BytesRead: Integer;
+  Packet: TPacket;
+
+  procedure SkipWhite;
+  var
+    C: AnsiChar;
+    NumRead: Integer;
+  begin
+    while True do
+    begin
+      NumRead := anInputStream.Read(C, 1);
+      if NumRead = 1 then
+      begin
+        if CharInSet(C, ['0'..'9','A'..'Z','a'..'z','+','/','=']) then
+        begin
+          anInputStream.Position := anInputStream.Position - 1;
+          Break;
+        end;
+      end else Break;
+    end;
+  end;
+
+begin
+  repeat
+    SkipWhite;
+    BytesRead := anInputStream.Read(InBuf, SizeOf(InBuf));
+    InBufPtr := InBuf;
+    OutBufPtr := @OutBuf;
+    I := 0;
+    while I < BytesRead do
+    begin
+      Packet := DecodePacket(InBufPtr, J);
+      K := 0;
+      while J > 0 do
+      begin
+        OutBufPtr^ := AnsiChar(Packet.a[K]);
+        Inc(OutBufPtr);
+        Dec(J);
+        Inc(K);
+      end;
+      Inc(InBufPtr, 4);
+      Inc(I, 4);
+    end;
+    anOutputStream.Write(OutBuf, OutBufPtr - PChar(@OutBuf));
+  until BytesRead = 0;
+end;
+
+function CompressStr(const aString : AnsiString) : AnsiString;
+{$IFNDEF MSWINDOWS}
+var
+  Buffer : Pointer;
+  Size : Integer;
+begin
+  try
+    try
+      CompressBuf(PAnsiChar(aString), Length(aString), Buffer, Size);
+      SetLength(Result, Size);
+      Move(Buffer^, Result[1], Size);
+    except
+      Buffer := nil;
+    end;
+  finally
+    FreeMem(Buffer);
+  end;
+end;
+{$ELSE}
+begin
+  Result := aString;
+  ZFastCompressString(Result, clMax);
+end;
+{$ENDIF}
+
+function DecompressStr(const aString : AnsiString) : AnsiString;
+{$IFNDEF MSWINDOWS}
+var
+  Buffer : Pointer;
+  Size : Integer;
+begin
+  try
+    try
+      DecompressBuf(PAnsiChar(aString), Length(aString), 0, Buffer, Size);
+      SetLength(Result, Size);
+      Move(Buffer^, pointer(Result)^, Size);
+    except
+      Buffer := nil;
+    end;
+  finally
+    FreeMem(Buffer);
+  end;
+end;
+{$ELSE}
+begin
+  Result := aString;
+  ZFastDecompressString(Result);
+end;
+{$ENDIF}
+
+{$IFNDEF MSWINDOWS}
+procedure ZCompressStream(anInputStream, aCompressedStream : TStream);
+var
+  zstream : TCompressionStream;
+begin
+  try
+    zstream := TCompressionStream.Create(clMax, aCompressedStream);
+    zstream.CopyFrom(anInputStream, 0);
+  finally
+    FreeAndNIL(zstream);
+  end;
+end;
+
+procedure ZDecompressStream(aCompressedStream, anOutputStream : TStream);
+var
+  zstream : TDecompressionStream;
+  buffer  : array of byte;
+  bufflen : integer;
+  lBufferSize: integer;
+begin
+  lBufferSize := 10*1024;
+
+  SetLength(buffer,lBufferSize);
+  zstream := TDecompressionStream.Create(aCompressedStream);
+  try
+
+    bufflen := zstream.Read(buffer[0], lBufferSize);
+    while (bufflen>0) do begin
+      anOutputStream.Write(buffer[0], bufflen);
+      bufflen := zstream.Read(buffer[0], lBufferSize);
+    end;
+
+  finally
+    FreeAndNIL(zstream);
+  end;
+end;
+{$ENDIF}
+
+function CompressAndEncode(const aString: AnsiString): Ansistring;
+var
+  fCompressedStream: TROBinaryMemoryStream;
+  fStreamCompressor: TCompressionStream;
+  fStringStream: TROBinaryMemoryStream;
+begin
+  fCompressedStream := TROBinaryMemoryStream.Create;
+  try
+    fStreamCompressor := TCompressionStream.Create(clMax, (fCompressedStream));
+    try
+      fStreamCompressor.Write(pointer(aString)^, length(aString));
+    finally
+      FreeAndNil(fStreamCompressor);
+    end;
+    fStringStream := TROBinaryMemoryStream.create;
+    try
+      fCompressedStream.Position := 0;
+      EncodeStream(fCompressedStream, fStringStream);
+      Result := fStringStream.ToString;
+    finally
+      FreeAndNil(fStringStream);
+    end;
+  finally
+    FreeAndNil(fCompressedStream);
+  end;
+end;
+
+function DecodeAndUnCompress(const aString: Ansistring): Ansistring;
+var
+  fWorkStream: TMemoryStream;
+  fEncodedStream: TMemoryStream;
+  fStreamDeCompressor: TDecompressionStream;
+  fBufLen: integer;
+  fBuffer: array[0..16383] of byte;
+begin
+  fWorkStream := TMemoryStream.create;
+  try
+    fWorkStream.size := length(aString);
+    move(pointer(aString)^, fWorkStream.memory^, fWorkStream.size);
+    fWorkStream.position := 0;
+    fEncodedStream := TMemoryStream.create;
+    try
+      DecodeStream(fWorkStream, fEncodedStream);
+      fWorkStream.size := 0;
+      fEncodedStream.position := 0;
+      fStreamDeCompressor := TDecompressionStream.Create(fEncodedStream);
+      try
+        fBufLen := fStreamDeCompressor.Read(fBuffer, SizeOf(fBuffer));
+        while fBufLen > 0 do
+        begin
+          fWorkStream.Write(fBuffer, fBufLen);
+          fBufLen := fStreamDeCompressor.Read(fBuffer, SizeOf(fBuffer));
+        end;
+      finally
+        FreeAndNil(fStreamDeCompressor);
+      end;
+    finally
+      FreeAndnil(fEncodedStream);
+    end;
+    fWorkStream.position := 0;
+    SetLength(Result, fWorkStream.size);
+    move(fWorkStream.memory^, pointer(Result)^, fWorkStream.size);
+  finally
+    FreeAndNil(fWorkStream);
+  end;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODBEventRepository.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODBEventRepository.pas
new file mode 100644
index 0000000..abcfe1c
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODBEventRepository.pas	
@@ -0,0 +1,599 @@
+unit uRODBEventRepository;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 6 and up                                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+uses
+  SysUtils, Classes, DB, SyncObjs,
+  uROEventRepository, uROTypes;
+
+type
+{
+------------------------------ sql script (MSSQL) ---------------------------------
+CREATE TABLE [Messages](
+	[MessageInc] [int] IDENTITY(1,1) NOT NULL,
+	[Created] [datetime] NULL,
+	[SourceSessionID] [char](38) NOT NULL,
+	[Data] [image] NULL,
+ CONSTRAINT [PK_Messages] PRIMARY KEY
+([MessageInc] ASC)
+)
+
+GO
+
+CREATE INDEX [Messages_IDX1] ON [Messages] ([Created] ASC)
+
+GO
+
+CREATE TABLE [MessagesPerSession](
+	[SessionID] [char](38) NOT NULL,
+	[MessageInc] [int] NOT NULL,
+ CONSTRAINT [PK_MessagesPerSession] PRIMARY KEY
+(  [SessionID] ASC, [MessageInc] ASC)
+)
+
+GO
+
+CREATE INDEX [MessagesPerSession_IDX1] ON [MessagesPerSession] ([MessageInc] ASC)
+
+GO
+
+--------------------------- SQLs --------------------------------------------------
+
+InsertMessages: Insert into Messages (Created, SourceSessionID, Data) values (:Created, :SourceSessionID, :Data)
+DeleteMessages: delete from Messages where MessageInc = :MessageInc
+GetMessageInc:  SELECT IsNull(Ident_Current('Messages'), 0) as LastInc
+GetMessages: select m.MessageInc, m.Data from MessagesPerSession mps join Messages m on (m.MessageInc = mps.MessageInc) where mps.SessionID = :SessionID
+DeleteUnusedMessages:  delete from Messages where MessageInc not in (select distinct MessageInc from MessagesPerSession)
+DeleteOldMessages: delete from Messages where Created < :Created
+DeleteOldMessagesPerSession: delete from MessagesPerSession where MessageInc in (select MessageInc from Messages where Created < :Created)
+
+InsertMessagesPerSession: Insert into MessagesPerSession (SessionID, MessageInc) values (:SessionID, :MessageInc)
+DeleteMessagesPerSession: Delete from MessagesPerSession where SessionID = :SessionID and MessageInc = :MessageInc
+}
+
+
+  {$IFDEF FPC}
+  IProviderSupport = interface
+    procedure PSExecute;
+    function PSGetParams: TParams;
+    procedure PSSetParams(AParams: TParams);
+  end;
+  {$ENDIF}
+
+  TRODBEventRepository = class;
+
+  TRODBEventRepositoryConvertGUIDEvent = function(Sender: TRODBEventRepository; const aGUID: TGUID): string of object;
+  TRODBEventRepositoryDatasetGetParams = function(Sender: TRODBEventRepository; aDataset: TDataset): TParams of object;
+  TRODBEventRepositoryDatasetSetParams = procedure(Sender: TRODBEventRepository; aDataset: TDataset; aParams: TParams) of object;
+  TRODBEventRepositoryDatasetExecute = procedure(Sender: TRODBEventRepository; aDataset: TDataset) of object;
+
+  TRODBEventRepository = class(TROEventRepository)
+  private
+    FInsertMessagesDataset: TDataset;
+    FDeleteMessagesDataset: TDataset;
+    FGetMessagesDataset: TDataset;
+    fOnDatasetExecute: TRODBEventRepositoryDatasetExecute;
+    fOnDatasetGetParams: TRODBEventRepositoryDatasetGetParams;
+    fOnDatasetSetParams: TRODBEventRepositoryDatasetSetParams;
+    fOnConvertGUID: TRODBEventRepositoryConvertGUIDEvent;
+    fFieldName_Data: string;
+    fFieldName_Created: string;
+    fFieldName_SourceSessionID: string;
+    fFieldName_MessageInc: string;
+    fCriticalSection: TCriticalSection;
+    fFieldName_SessionID: string;
+    FGetMessageIncDataset: TDataset;
+    FInsertMessagesPerSessionDataset: TDataset;
+    FDeleteMessagesPerSessionDataset: TDataset;
+    FDeleteUnusedMessagesDataset: TDataset;
+    FDeleteOldMessagesDataset: TDataset;
+    FDeleteOldMessagesPerSessionDataset: TDataset;
+    procedure SetInsertMessagesDataset(const Value: TDataset);
+    procedure SetGetMessagesDataset(const Value: TDataset);
+    function DoDatasetGetParams(aDataset: TDataset; aProvider: IProviderSupport): TParams;
+    procedure DoDatasetSetParams(aDataset: TDataset; aProvider: IProviderSupport; AParams: TParams);
+    procedure DoDatasetExecute(aDataset: TDataset; aProvider: IProviderSupport);
+    function GetProvider(aDataset: TDataset): IProviderSupport;
+    procedure SetDeleteMessagesDataset(const Value: TDataset);
+    procedure SetGetMessageIncDataset(const Value: TDataset);
+    procedure SetInsertMessagesPerSessionDataset(const Value: TDataset);
+    procedure SetDeleteMessagesPerSessionDataset(const Value: TDataset);
+    procedure SetDeleteUnusedMessagesDataset(const Value: TDataset);
+    procedure SetDeleteOldMessagesDataset(const Value: TDataset);
+    procedure SetDeleteOldMessagesPerSessionDataset(const Value: TDataset);
+  protected
+    procedure Notification(aComponent: TComponent; Operation: TOperation); override;
+    procedure DoStoreEventData(SourceSessionID : TGUID; Data : Binary;
+                               const ExcludeSender: Boolean;
+                               const ExcludeSessionList: Boolean;
+                               const SessionList: String); override;
+    function DoGetEventData(SessionID : TGUID; var TargetStream : Binary) : integer; override;
+    procedure DoAddSession(aSessionID : TGUID); override;
+    procedure DoRemoveSession(aSessionID : TGUID); override;
+    function DoConvertGUID(const aGUID: TGUID): string; virtual;
+  public
+    constructor Create(aOwner : TComponent); override;
+    destructor Destroy; override;
+    procedure CheckProperties; override;
+    procedure DeleteUnusedMessages;
+    procedure DeleteOldMessages;
+  published
+    property FieldName_Created : string read fFieldName_Created write fFieldName_Created;
+    property FieldName_Data : string read fFieldName_Data write fFieldName_Data;
+    property FieldName_MessageInc : string read fFieldName_MessageInc write fFieldName_MessageInc;
+    property FieldName_SessionID : string read fFieldName_SessionID write fFieldName_SessionID;
+    property FieldName_SourceSessionID : string read fFieldName_SourceSessionID write fFieldName_SourceSessionID;
+
+    Property InsertMessagesDataset: TDataset read FInsertMessagesDataset write SetInsertMessagesDataset;
+    Property GetMessagesDataset: TDataset read FGetMessagesDataset write SetGetMessagesDataset;
+    Property DeleteMessagesDataset: TDataset read FDeleteMessagesDataset write SetDeleteMessagesDataset;
+    Property GetMessageIncDataset: TDataset read FGetMessageIncDataset write SetGetMessageIncDataset;
+    property InsertMessagesPerSessionDataset: TDataset read FInsertMessagesPerSessionDataset write SetInsertMessagesPerSessionDataset;
+    Property DeleteMessagesPerSessionDataset: TDataset read FDeleteMessagesPerSessionDataset write SetDeleteMessagesPerSessionDataset;
+    property DeleteUnusedMessagesDataset: TDataset read FDeleteUnusedMessagesDataset write SetDeleteUnusedMessagesDataset;
+    property DeleteOldMessagesDataset: TDataset read FDeleteOldMessagesDataset write SetDeleteOldMessagesDataset;
+    property DeleteOldMessagesPerSessionDataset: TDataset read FDeleteOldMessagesPerSessionDataset write SetDeleteOldMessagesPerSessionDataset;
+
+    property OnDatasetGetParams: TRODBEventRepositoryDatasetGetParams read fOnDatasetGetParams write fOnDatasetGetParams;
+    property OnDatasetSetParams: TRODBEventRepositoryDatasetSetParams read fOnDatasetSetParams write fOnDatasetSetParams;
+    property OnDatasetExecute : TRODBEventRepositoryDatasetExecute read fOnDatasetExecute write fOnDatasetExecute;
+    property OnConvertGUID: TRODBEventRepositoryConvertGUIDEvent read fOnConvertGUID write fOnConvertGUID;
+  end;
+
+implementation
+uses
+  uROClasses,{$IFNDEF FPC}SqlTimSt,{$ENDIF}  uROSessions;
+
+{ TRODBEventRepository }
+
+procedure TRODBEventRepository.CheckProperties;
+begin
+  inherited;
+  Check(FieldName_Created = '', Name + '.FieldName_Created must be set.');
+  Check(FieldName_Data = '', Name + '.FieldName_Data must be set.');
+  Check(FieldName_MessageInc = '', Name + '.FieldName_MessageInc must be set.');
+  Check(FieldName_SessionID = '', Name + '.FieldName_SessionID must be set.');
+  Check(FieldName_SourceSessionID = '', Name + '.FieldName_SourceSessionID must be set.');
+  Check(SessionManager = nil, Name + '.SessionManager must be assigned.');
+  SessionManager.CheckProperties;
+  Check(FInsertMessagesDataset = nil, Name + '.InsertMessagesDataset must be assigned.');
+  Check(FDeleteMessagesDataset = nil, Name + '.DeleteMessagesDataset must be assigned.');
+  Check(FGetMessagesDataset = nil, Name + '.GetMessagesDataset must be assigned.');
+  Check(FGetMessageIncDataset = nil, Name + '.GetMessageIncDataset must be assigned.');
+  Check(FInsertMessagesPerSessionDataset = nil, Name + '.InsertMessagesPerSessionDataset must be assigned.');
+  Check(FDeleteMessagesPerSessionDataset = nil, Name + '.DeleteMessagesPerSessionDataset must be assigned.');
+  Check(FDeleteUnusedMessagesDataset = nil, Name + '.DeleteUnusedMessagesDataset must be assigned.');
+  Check(FDeleteOldMessagesDataset = nil, Name + '.DeleteOldMessagesDataset must be assigned.');
+  Check(FDeleteOldMessagesPerSessionDataset = nil, Name + '.DeleteOldMessagesPerSessionDataset must be assigned.');
+
+end;
+
+constructor TRODBEventRepository.Create(aOwner: TComponent);
+begin
+  inherited;
+  fFieldName_MessageInc := 'MessageInc';
+  fFieldName_Created := 'Created';
+  fFieldName_SourceSessionID := 'SourceSessionID';
+  fFieldName_Data := 'Data';
+  fFieldName_SessionID := 'SessionID';
+  fCriticalSection := TCriticalSection.Create;
+end;
+
+destructor TRODBEventRepository.Destroy;
+begin
+  fCriticalSection.Enter;
+  try
+    inherited;
+  finally
+    fCriticalSection.Leave;
+    fCriticalSection.Free;
+  end;
+end;
+
+procedure TRODBEventRepository.DoAddSession(aSessionID: TGUID);
+begin
+  SessionManager.CreateSession(aSessionID);
+end;
+
+function TRODBEventRepository.DoConvertGUID(const aGUID: TGUID): string;
+begin
+  if Assigned(fOnConvertGUID) then
+    try
+      Result:= fOnConvertGUID(Self, aGUID);
+    except
+      Result:= GUIDToString(aGUID);
+    end
+  else
+    Result:= GUIDToString(aGUID);
+end;
+
+procedure TRODBEventRepository.DoDatasetExecute(aDataset: TDataset;
+  aProvider: IProviderSupport);
+begin
+  if Assigned(fOnDatasetExecute) then
+    fOnDatasetExecute(Self,aDataset)
+  else if aProvider <> nil then
+    aProvider.PSExecute
+  else
+    raise Exception.CreateFmt('The %s.OnDatasetExecute event must be defined or %s should support IProviderSupport interface',[Self.Name, aDataset.Name]);
+end;
+
+function TRODBEventRepository.DoDatasetGetParams(aDataset: TDataset;
+  aProvider: IProviderSupport): TParams;
+begin
+  if Assigned(fOnDatasetGetParams) then
+    Result := fOnDatasetGetParams(Self, aDataset)
+  else if aProvider <> nil then
+    Result := aProvider.PSGetParams
+  else
+    raise Exception.CreateFmt('The %s.OnDatasetGetParams event must be defined or %s should support IProviderSupport interface',[Self.Name, aDataset.Name]);
+end;
+
+procedure TRODBEventRepository.DoDatasetSetParams(aDataset: TDataset;
+  aProvider: IProviderSupport; AParams: TParams);
+begin
+  if Assigned(fOnDatasetSetParams) then
+    fOnDatasetSetParams(Self, aDataset, AParams)
+  else if aProvider <> nil then
+    aProvider.PSSetParams(AParams)
+  else
+    raise Exception.CreateFmt('The %s.OnDatasetSetParams event must be defined or %s should support IProviderSupport interface',[Self.Name, aDataset.Name]);
+end;
+
+function TRODBEventRepository.DoGetEventData(SessionID: TGUID; var TargetStream: Binary): integer;
+var
+  params,lParams : TParams;
+  provider : IProviderSupport;
+  lBlobSize : integer;
+  fld: TBlobField;
+  fld1: TField;
+  k: integer;
+begin
+  fCriticalSection.Enter;
+  try
+    result := 0;
+    TargetStream := Binary.Create;
+    TargetStream.Write(result, SizeOf(result));
+    try
+      provider := GetProvider(FGetMessagesDataset);
+      params := DoDatasetGetParams(FGetMessagesDataset, provider);
+      lParams:=TParams.Create;
+      try
+        lParams.Assign(params);
+        lparams.ParamByName(fFieldName_SessionID).AsString := DoConvertGUID(SessionID);
+        DoDatasetSetParams(fGetMessagesDataset, provider, lParams);
+      finally
+        lParams.Free;
+      end;
+      provider:=nil;
+
+
+      provider := GetProvider(FDeleteMessagesPerSessionDataset);
+      params := DoDatasetGetParams(FDeleteMessagesPerSessionDataset, provider);
+      lParams:=TParams.Create;
+      try
+        lParams.Assign(params);
+        lparams.ParamByName(fFieldName_SessionID).AsString := DoConvertGUID(SessionID);
+        k := lparams.ParamByName(fFieldName_MessageInc).Index;
+
+        fGetMessagesDataset.Open;
+        try
+          if not (fGetMessagesDataset.bof and fGetMessagesDataset.Eof) then begin
+            fld := TBlobField(fGetMessagesDataset.FieldByName(fFieldName_Data));
+            fld1:= fGetMessagesDataset.FieldByName(fFieldName_MessageInc);
+            while not fGetMessagesDataset.Eof do begin
+              Inc(Result);
+              lBlobSize := fld.BlobSize;
+              TargetStream.Write(lblobsize, SizeOf(integer));
+              fld.SaveToStream(TargetStream);
+
+              // remove processed session
+              lParams[k].AsInteger := fld1.AsInteger;
+              DoDatasetSetParams(FDeleteMessagesPerSessionDataset, provider, lParams);
+              DoDatasetExecute(FDeleteMessagesPerSessionDataset, provider);
+
+              fGetMessagesDataset.Next;
+            end;
+          end;
+        finally
+          fGetMessagesDataset.Close;
+        end;
+      finally
+        lParams.Free;
+      end;
+    finally
+      TargetStream.Position := 0;
+      TargetStream.Write(result, SizeOf(result));
+      TargetStream.Position := 0;
+    end;
+    DeleteUnusedMessages;
+  finally
+    provider:=nil;
+    fCriticalSection.Leave;
+  end;
+end;
+
+procedure TRODBEventRepository.DoRemoveSession(aSessionID: TGUID);
+begin
+  SessionManager.DeleteSession(aSessionID,False);
+end;
+
+procedure TRODBEventRepository.DoStoreEventData(SourceSessionID: TGUID;
+  Data: Binary; const ExcludeSender, ExcludeSessionList: Boolean;
+  const SessionList: String);
+var
+  params,lParams : TParams;
+  provider : IProviderSupport;
+
+  filteredsessionslist : TStringList;
+  lsessionList : TStringList;
+  isfiltered : boolean;
+
+  i,k: integer;
+  currsessionid,lSourceSessionID: string;
+  lNeedtoDelete: Boolean;
+  lMessageInc: integer;
+begin
+  filteredsessionslist := nil;
+  fCriticalSection.Enter;
+  try
+    lSourceSessionID := DoConvertGUID(SourceSessionID);
+    lsessionList := TStringList.Create;
+    try
+      SessionManager.GetAllSessions(lsessionList);
+
+      filteredsessionslist := NIL;
+      isfiltered := SessionList<>'';
+      if isfiltered then begin
+        filteredsessionslist := TStringList.Create;
+        filteredsessionslist.Sorted := TRUE;
+        filteredsessionslist.Duplicates := dupIgnore;
+        filteredsessionslist.CommaText := SessionList;
+      end;
+
+      // Filters the sessions the message will go to
+      For i:= lsessionList.Count-1 downto 0 do begin
+        currsessionid := lsessionList[i];
+        lNeedtoDelete := False;
+        if isfiltered then begin
+          k := filteredsessionslist.IndexOf(currsessionid);
+          if ExcludeSessionList then begin
+            if k <> -1 then lNeedtoDelete := True
+          end
+          else begin
+            if k = -1 then lNeedtoDelete := True
+          end;
+        end;
+        if ExcludeSender and (currsessionid = lSourceSessionID) then lNeedtoDelete := True;
+        if lNeedtoDelete then lsessionList.Delete(i);
+      end;
+
+      // Checks if the sender is not the only session left. If so, the event doesn't need to be stored
+      if (lsessionList.Count = 0) or
+         ((lsessionList.Count = 1) and (lsessionList[0] = lSourceSessionID)) then Exit;
+
+      provider := GetProvider(FInsertMessagesDataset);
+      params := DoDatasetGetParams(FInsertMessagesDataset, provider);
+      lParams:=TParams.Create;
+      try
+        lParams.Assign(Params);
+        //lparams.ParamByName(fFieldName_MessageInc).AsString := currsessionid;
+        with lparams.ParamByName(fFieldName_Created) do
+          {$IFNDEF FPC}
+          if DataType = ftTimeStamp then
+            AsSQLTimeStamp := DateTimeToSQLTimeStamp(Now)
+          else
+          {$ENDIF}
+            AsDateTime := Now;
+        lparams.ParamByName(fFieldName_SourceSessionID).AsString := lSourceSessionID;
+        lparams.ParamByName(fFieldName_Data).LoadFromStream(data, ftBlob);
+        DoDatasetSetParams(FInsertMessagesDataset, provider, lParams);
+      finally
+        lParams.Free;
+      end;
+      DoDatasetExecute(FInsertMessagesDataset, provider);
+
+      FGetMessageIncDataset.Open;
+      lMessageInc := FGetMessageIncDataset.Fields[0].AsInteger;
+      FGetMessageIncDataset.Close;
+
+      provider := GetProvider(FInsertMessagesPerSessionDataset);
+      params := DoDatasetGetParams(FInsertMessagesPerSessionDataset, provider);
+      lParams:=TParams.Create;
+      try
+        lParams.Assign(Params);
+        lparams.ParamByName(fFieldName_MessageInc).AsInteger := lMessageInc;
+        k := lparams.ParamByName(fFieldName_SessionID).Index;
+
+        For i:= 0 to lsessionList.Count-1 do begin
+          lparams[k].AsString := lsessionList[i];
+          DoDatasetSetParams(FInsertMessagesPerSessionDataset, provider, lParams);
+          DoDatasetExecute(FInsertMessagesPerSessionDataset,provider);
+        end;
+      finally
+        lParams.Free;
+      end;
+    finally
+      provider := nil;
+      lsessionList.Free;
+      filteredsessionslist.Free;
+    end;
+  finally
+    fCriticalSection.Leave;
+  end;
+end;
+
+
+function TRODBEventRepository.GetProvider(
+  aDataset: TDataset): IProviderSupport;
+begin
+  if aDataset = nil then
+    Result := nil
+  {$IFNDEF FPC}
+  {$IFDEF DELPHI7UP}
+  else
+    result := aDataset as IProviderSupport;
+  {$ELSE}
+  else
+    result := IProviderSupport(aDataset);
+  {$ENDIF}
+  {$ENDIF}
+end;
+
+
+procedure TRODBEventRepository.Notification(aComponent: TComponent;
+  Operation: TOperation);
+begin
+  inherited;
+  if (Operation<>opRemove) then Exit;
+
+  if aComponent = FInsertMessagesDataset then FInsertMessagesDataset := nil
+  else if aComponent = FGetMessagesDataset then FGetMessagesDataset := nil
+  else if aComponent = FDeleteMessagesDataset then FDeleteMessagesDataset := nil
+  else if aComponent = FGetMessageIncDataset then FGetMessageIncDataset := nil
+  else if aComponent = FInsertMessagesPerSessionDataset then FInsertMessagesPerSessionDataset := nil
+  else if aComponent = FDeleteMessagesPerSessionDataset then FDeleteMessagesPerSessionDataset := nil
+  else if aComponent = FDeleteUnusedMessagesDataset then FDeleteMessagesPerSessionDataset := nil
+  else if aComponent = FDeleteOldMessagesPerSessionDataset then FDeleteOldMessagesPerSessionDataset := nil
+  ;
+end;
+
+procedure TRODBEventRepository.SetDeleteMessagesDataset(const Value: TDataset);
+begin
+  if Assigned(FDeleteMessagesDataset) then FDeleteMessagesDataset.RemoveFreeNotification(Self);
+  FDeleteMessagesDataset := Value;
+  if Assigned(FDeleteMessagesDataset) then FDeleteMessagesDataset.FreeNotification(Self);
+end;
+
+procedure TRODBEventRepository.SetGetMessageIncDataset(
+  const Value: TDataset);
+begin
+  if Assigned(FGetMessageIncDataset) then FGetMessageIncDataset.RemoveFreeNotification(Self);
+  FGetMessageIncDataset := Value;
+  if Assigned(FGetMessageIncDataset) then FGetMessageIncDataset.FreeNotification(Self);
+end;
+
+procedure TRODBEventRepository.SetInsertMessagesDataset(const Value: TDataset);
+begin
+  if Assigned(FInsertMessagesDataset) then FInsertMessagesDataset.RemoveFreeNotification(Self);
+  FInsertMessagesDataset := Value;
+  if Assigned(FInsertMessagesDataset) then FInsertMessagesDataset.FreeNotification(Self);
+end;
+
+procedure TRODBEventRepository.SetInsertMessagesPerSessionDataset(
+  const Value: TDataset);
+begin
+  if Assigned(FInsertMessagesPerSessionDataset) then FInsertMessagesPerSessionDataset.RemoveFreeNotification(Self);
+  FInsertMessagesPerSessionDataset := Value;
+  if Assigned(FInsertMessagesPerSessionDataset) then FInsertMessagesPerSessionDataset.FreeNotification(Self);
+end;
+
+procedure TRODBEventRepository.SetGetMessagesDataset(const Value: TDataset);
+begin
+  if Assigned(FGetMessagesDataset) then FGetMessagesDataset.RemoveFreeNotification(Self);
+  FGetMessagesDataset := Value;
+  if Assigned(FGetMessagesDataset) then FGetMessagesDataset.FreeNotification(Self);
+end;
+
+
+procedure TRODBEventRepository.SetDeleteMessagesPerSessionDataset(
+  const Value: TDataset);
+begin
+  if Assigned(FDeleteMessagesPerSessionDataset) then FDeleteMessagesPerSessionDataset.RemoveFreeNotification(Self);
+  FDeleteMessagesPerSessionDataset := Value;
+  if Assigned(FDeleteMessagesPerSessionDataset) then FDeleteMessagesPerSessionDataset.FreeNotification(Self);
+end;
+
+procedure TRODBEventRepository.SetDeleteUnusedMessagesDataset(
+  const Value: TDataset);
+begin
+  if Assigned(FDeleteUnusedMessagesDataset) then FDeleteUnusedMessagesDataset.RemoveFreeNotification(Self);
+  FDeleteUnusedMessagesDataset := Value;
+  if Assigned(FDeleteUnusedMessagesDataset) then FDeleteUnusedMessagesDataset.FreeNotification(Self);
+end;
+
+procedure TRODBEventRepository.DeleteUnusedMessages;
+var
+  provider: IProviderSupport;
+begin
+  fCriticalSection.Enter;
+  try
+    provider := GetProvider(FDeleteUnusedMessagesDataset);
+    DoDatasetExecute(FDeleteUnusedMessagesDataset, provider);
+  finally
+    provider:=nil;
+    fCriticalSection.Leave;
+  end;
+end;
+
+
+procedure TRODBEventRepository.SetDeleteOldMessagesDataset(
+  const Value: TDataset);
+begin
+  if Assigned(FDeleteOldMessagesDataset) then FDeleteOldMessagesDataset.RemoveFreeNotification(Self);
+  FDeleteOldMessagesDataset := Value;
+  if Assigned(FDeleteOldMessagesDataset) then FDeleteOldMessagesDataset.FreeNotification(Self);
+end;
+
+procedure TRODBEventRepository.DeleteOldMessages;
+
+  Procedure FillandExecute(aDataset: TDataset; ACreated: TDatetime);
+  var
+    provider: IProviderSupport;
+    params,lParams: TParams;
+  begin
+    provider := GetProvider(ADataset);
+    params := DoDatasetGetParams(ADataset, provider);
+    lParams:=TParams.Create;
+    try
+      lParams.Assign(params);
+      with lparams.ParamByName(fFieldName_Created) do
+        {$IFNDEF FPC}
+        if DataType = ftTimeStamp then
+          AsSQLTimeStamp := DateTimeToSQLTimeStamp(ACreated)
+        else
+        {$ENDIF}
+          AsDateTime := ACreated;
+      DoDatasetSetParams(ADataset, provider, lParams);
+    finally
+      lParams.Free;
+    end;
+    DoDatasetExecute(ADataset, provider);
+    provider:=nil;
+  end;
+
+var
+  lCreated: TDatetime;
+begin
+  lCreated := Now-30; // 30 days
+  fCriticalSection.Enter;
+  try
+    FillandExecute(FDeleteOldMessagesPerSessionDataset,lCreated);
+    FillandExecute(FDeleteOldMessagesDataset,lCreated);    
+  finally
+    fCriticalSection.Leave;
+  end;
+end;
+
+procedure TRODBEventRepository.SetDeleteOldMessagesPerSessionDataset(
+  const Value: TDataset);
+begin
+  if Assigned(FDeleteOldMessagesPerSessionDataset) then FDeleteOldMessagesPerSessionDataset.RemoveFreeNotification(Self);
+  FDeleteOldMessagesPerSessionDataset := Value;
+  if Assigned(FDeleteOldMessagesPerSessionDataset) then FDeleteOldMessagesPerSessionDataset.FreeNotification(Self);
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODBSessionManager.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODBSessionManager.pas
new file mode 100644
index 0000000..301ba00
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODBSessionManager.pas	
@@ -0,0 +1,514 @@
+unit uRODBSessionManager;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Provided by Niko Schoemaker (niko.schoemaker@teamro.remobjects.com)        }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses Classes, uROSessions, DB;
+
+type
+  TConvertGUIDEvent = function(Sender: TROCustomSessionManager; const aGUID: TGUID): string of object;
+  TRODBSessionManagerDatasetGetParams = function(Sender: TROCustomSessionManager; aDataset: TDataset): TParams of object;
+  TRODBSessionManagerDatasetSetParams = procedure(Sender: TROCustomSessionManager; aDataset: TDataset; aParams: TParams) of object;
+  TRODBSessionManagerDatasetExecute = procedure(Sender: TROCustomSessionManager; aDataset: TDataset) of object;
+
+  {$IFDEF FPC}
+  IProviderSupport = interface
+    procedure PSExecute;
+    function PSGetParams: TParams;
+    procedure PSSetParams(AParams: TParams);
+  end;
+  {$ENDIF}
+
+  { TRODBSessionManager }
+  TRODBSessionManager = class(TROCustomSessionManager)
+  private
+    fInsertDataset,
+    fDeleteDataset,
+    fUpdateDataset,
+    fSelectDataset,
+    fGetCountDataset,
+    fClearSessionsDataset,
+    fSelectAllDataset : TDataset;
+
+    fFieldNameSessionID,
+    fFieldNameCreated,
+    fFieldNameLastAccessed,
+    fFieldNameData: string;
+    fClearSessionsOnDestroy: boolean;
+    fClearSessionsOnCreate: boolean;
+    fOnConvertGUID: TConvertGUIDEvent;
+    fOnDatasetExecute: TRODBSessionManagerDatasetExecute;
+    fOnDatasetGetParams: TRODBSessionManagerDatasetGetParams;
+    fOnDatasetSetParams: TRODBSessionManagerDatasetSetParams;
+
+    function GetProvider(aDataset: TDataset): IProviderSupport;
+    procedure SetClearSessionsDataset(const Value: TDataset);
+    procedure SetDeleteDataset(const Value: TDataset);
+    procedure SetGetCountDataset(const Value: TDataset);
+    procedure SetInsertDataset(const Value: TDataset);
+    procedure SetSelectDataset(const Value: TDataset);
+    procedure SetUpdateDataset(const Value: TDataset);
+    procedure SetSelectAllDataset(const Value: TDataSet);
+    function DoDatasetGetParams(aDataset: TDataset; aProvider: IProviderSupport): TParams;
+    procedure DoDatasetSetParams(aDataset: TDataset; aProvider: IProviderSupport; AParams: TParams);
+    procedure DoDatasetExecute(aDataset: TDataset; aProvider: IProviderSupport);
+  protected
+    // TROCustomSessionManager
+    function DoFindSession(const aSessionID : TGUID; aUpdateTime: Boolean) : TROSession; override;
+    procedure DoDeleteSession(const aSessionID : TGUID; IsExpired : boolean); override;
+    procedure DoClearSessions(OnlyExpired : boolean); override;
+    function DoGetSessionCount : integer; override;
+    procedure DoReleaseSession(aSession : TROSession; NewSession : boolean); override;
+    procedure DoGetAllSessions(Dest: TStringList); override;
+
+    function DoConvertGUID(const aGUID: TGUID): string; virtual;
+    // Internals
+    procedure  Notification(AComponent: TComponent; Operation: TOperation); override;
+    procedure Loaded; override;
+
+  public
+    constructor Create(aOwner : TComponent); override;
+    destructor Destroy; override;
+    procedure CheckProperties; override;
+  published
+    property FieldNameSessionID : string read fFieldNameSessionID write fFieldNameSessionID;
+    property FieldNameCreated : string read fFieldNameCreated write fFieldNameCreated;
+    property FieldNameLastAccessed : string read fFieldNameLastAccessed write fFieldNameLastAccessed;
+    property FieldNameData : string read fFieldNameData write fFieldNameData;
+
+    property InsertDataset : TDataset read fInsertDataset write SetInsertDataset;
+    property DeleteDataset : TDataset read fDeleteDataset write SetDeleteDataset;
+    property UpdateDataset : TDataset read fUpdateDataset write SetUpdateDataset;
+    property SelectDataset : TDataset read fSelectDataset write SetSelectDataset;
+    property GetCountDataset : TDataset read fGetCountDataset write SetGetCountDataset;
+    {$WARNINGS OFF}
+    property ClearSessionsDataset : TDataset read fClearSessionsDataset write SetClearSessionsDataset;
+    {$WARNINGS ON}
+    property SelectAllDataset : TDataSet read fSelectAllDataset write SetSelectAllDataset;
+
+    property ClearSessionsOnCreate : boolean read fClearSessionsOnCreate write fClearSessionsOnCreate default true;
+    property ClearSessionsOnDestroy : boolean read fClearSessionsOnDestroy write fClearSessionsOnDestroy default true;
+    property OnConvertGUID: TConvertGUIDEvent read fOnConvertGUID write fOnConvertGUID;
+    property SessionDuration;
+    property SessionCheckInterval;
+    property OnDatasetGetParams: TRODBSessionManagerDatasetGetParams read fOnDatasetGetParams write fOnDatasetGetParams;
+    property OnDatasetSetParams: TRODBSessionManagerDatasetSetParams read fOnDatasetSetParams write fOnDatasetSetParams;
+    property OnDatasetExecute : TRODBSessionManagerDatasetExecute read fOnDatasetExecute write fOnDatasetExecute;
+
+  end;
+
+implementation
+
+uses
+  {$IFDEF DELPHI5}ComObj,{$ENDIF}
+  SysUtils, {$IFNDEF FPC}SqlTimSt,{$ENDIF} uROClasses;
+
+{ TRODBSessionManager }
+
+constructor TRODBSessionManager.Create(aOwner: TComponent);
+begin
+  inherited;
+
+  fClearSessionsOnDestroy := TRUE;
+  ClearSessionsOnCreate := TRUE;
+  
+  fFieldNameSessionID := 'SessionID';
+  fFieldNameCreated := 'Created';
+  fFieldNameLastAccessed := 'LastAccessed';
+  fFieldNameData := 'Data';
+end;
+
+destructor TRODBSessionManager.Destroy;
+begin
+  InsertDataset := nil;
+  DeleteDataset := nil;
+  UpdateDataset := nil;
+  SelectDataset := nil;
+  GetCountDataset := nil;
+  ClearSessionsDataset := nil;
+  inherited;
+end;
+
+function TRODBSessionManager.GetProvider(aDataset : TDataset) : IProviderSupport;
+begin
+  {$IFDEF FPC}
+    if aDataset = nil then Result := nil else // prevent FPC warning
+    Result := nil;
+  {$ELSE}
+    {$IFDEF DELPHI7UP}
+      result := aDataset as IProviderSupport;
+    {$ELSE}
+      result := IProviderSupport(aDataset);
+    {$ENDIF}
+  {$ENDIF FPC}
+end;
+
+procedure TRODBSessionManager.DoClearSessions(OnlyExpired: boolean);
+const HoursPerDay = 24;
+      MinsPerDay  = HoursPerDay * 60;
+var
+  params, lparams : TParams;
+  provider : IProviderSupport;
+  lLastAccessed: TDateTime;
+  lFieldNameSessionID: integer;
+  lLastAccessIndex: integer;
+begin
+  CheckProperties;
+  if OnlyExpired then
+    lLastAccessed := ((Now*MinsPerDay) - SessionDuration) / MinsPerDay
+  else
+    lLastAccessed := Now+30; // 30 days from now. Enough to say all! <G>
+  if Assigned(OnBeforeDeleteSession) then begin
+    fSelectAllDataset.Open;
+    lFieldNameSessionID:= fSelectAllDataset.FieldByName(FieldNameSessionID).Index;
+    lLastAccessIndex:= fSelectAllDataset.FieldByName(FieldNameLastAccessed).Index;
+    try
+      fSelectAllDataset.First;
+      while not fSelectAllDataset.Eof do try
+        if fSelectAllDataset.Fields[lLastAccessIndex].AsDateTime <= lLastAccessed then
+          DeleteSession(StringToGUID(fSelectAllDataset.Fields[lFieldNameSessionID].AsString),OnlyExpired);
+      finally
+        fSelectAllDataset.Next;
+      end;
+    finally
+      fSelectAllDataset.Close;
+    end;
+  end
+  else begin
+    provider := GetProvider(fClearSessionsDataset);
+    params := DoDatasetGetParams(fClearSessionsDataset,provider);
+    lparams:= TParams.Create;
+    try
+      lparams.Assign(params);
+      with lparams.ParamByName(fFieldNameLastAccessed) do
+        {$IFNDEF FPC}
+        if DataType = ftTimeStamp then
+          AsSQLTimeStamp := DateTimeToSQLTimeStamp(lLastAccessed)
+        else
+        {$ENDIF}
+          AsDateTime := lLastAccessed;
+      DoDatasetSetParams(fClearSessionsDataset,provider,lparams);
+    finally
+      lparams.Free;
+    end;
+    DoDatasetExecute(fClearSessionsDataset,provider);
+    provider := nil;
+  end;
+end;
+
+procedure TRODBSessionManager.DoDeleteSession(const aSessionID: TGUID;
+  IsExpired: boolean);
+var params,lParams : TParams;
+    provider : IProviderSupport;
+begin
+  CheckProperties;
+  provider := GetProvider(fDeleteDataset);
+  params := DoDatasetGetParams(fDeleteDataset, provider);
+
+  lParams:=TParams.Create;
+  try
+    lParams.Assign(Params);
+    lparams.ParamByName(fFieldNameSessionID).Value := DoConvertGUID(aSessionID);
+    DoDatasetSetParams(fDeleteDataset, provider, lParams);
+  finally
+    lParams.Free;
+  end;
+  DoDatasetExecute(fDeleteDataset, provider);
+  provider := nil;
+end;
+
+function TRODBSessionManager.DoFindSession(const aSessionID: TGUID; aUpdateTime: Boolean): TROSession;
+var params,lParams : TParams;
+    data : TStream;
+    datafld : TBlobField;
+    provider : IProviderSupport;
+begin
+  CheckProperties;
+  result := NIL;
+  provider := GetProvider(fSelectDataset);
+
+  params := DoDatasetGetParams(fSelectDataset, provider);
+  lParams:=TParams.Create;
+  try
+    lParams.Assign(params);
+    lparams.ParamByName(fFieldNameSessionID).Value := DoConvertGUID(aSessionID);
+    DoDatasetSetParams(fSelectDataset, provider, lParams);
+  finally
+    lParams.Free;
+  end;
+  provider:=nil;
+
+  data := nil;
+  fSelectDataset.Open;
+  try
+    if (fSelectDataset.bof and fSelectDataset.eof) then Exit;
+    data := TMemoryStream.Create;
+
+    //result := TROSession.Create(aSessionID);
+    result := DoCreateSession(aSessionID);
+    result.Created := fSelectDataset.FieldByName(fFieldNameCreated).AsDateTime;
+    result.LastAccessed := fSelectDataset.FieldByName(fFieldNameLastAccessed).AsDateTime;
+
+    datafld := TBlobField(fSelectDataset.FieldByName(fFieldNameData));
+    datafld.SaveToStream(data);
+    data.Position := 0;
+    result.LoadFromStream(data, TRUE);
+  finally
+    fSelectDataset.Close;
+    data.Free;
+  end;
+end;
+
+function TRODBSessionManager.DoGetSessionCount: integer;
+begin
+  CheckProperties;
+  fGetCountDataset.Open;
+  try
+    result := fGetCountDataset.Fields[0].AsInteger;
+  finally
+    fGetCountDataset.Close;
+  end;
+end;
+  
+procedure TRODBSessionManager.DoReleaseSession(aSession: TROSession; NewSession : boolean);
+var params,lparams : TParams;
+    data : TStream;
+    provider : IProviderSupport;
+begin
+  CheckProperties;
+  inherited;
+  data := TMemoryStream.Create;
+  try
+    if NewSession then begin
+      provider := GetProvider(fInsertDataset);
+
+      params := DoDatasetGetParams(fInsertDataset, provider);
+      lparams:=TParams.Create;
+      try
+        lparams.Assign(params);
+        lparams.ParamByName(fFieldNameSessionID).Value := DoConvertGUID(aSession.SessionID);
+
+        with lparams.ParamByName(fFieldNameLastAccessed) do
+          {$IFNDEF FPC}
+          if DataType = ftTimeStamp then
+            AsSQLTimeStamp := DateTimeToSQLTimeStamp(aSession.LastAccessed)
+          else
+          {$ENDIF}
+            AsDateTime := aSession.LastAccessed;
+        with lparams.ParamByName(fFieldNameCreated) do
+          {$IFNDEF FPC}
+          if DataType = ftTimeStamp then
+            AsSQLTimeStamp := DateTimeToSQLTimeStamp(aSession.Created)
+          else
+          {$ENDIF}
+            AsDateTime := aSession.Created;
+        aSession.SaveToStream(data, TRUE);
+        data.Position := 0;
+        lparams.ParamByName(fFieldNameData).LoadFromStream(data, ftBlob);
+
+        DoDatasetSetParams(fInsertDataset, provider, lparams);
+      finally
+        lParams.Free;
+      end;
+      DoDatasetExecute(fInsertDataset, provider);
+    end
+    else begin
+      provider := GetProvider(fUpdateDataset);
+
+      params := DoDatasetGetParams(fUpdateDataset, provider);
+      lparams:=TParams.Create;
+      try
+        lparams.Assign(params);
+        lparams.ParamByName(fFieldNameSessionID).Value := DoConvertGUID(aSession.SessionID);
+        with lparams.ParamByName(fFieldNameLastAccessed) do
+          {$IFNDEF FPC}
+          if DataType = ftTimeStamp then
+            AsSQLTimeStamp := DateTimeToSQLTimeStamp(aSession.LastAccessed)
+          else
+          {$ENDIF}
+            AsDateTime := aSession.LastAccessed;
+        aSession.SaveToStream(data, TRUE);
+        lparams.ParamByName(fFieldNameData).LoadFromStream(data, ftBlob);
+        DoDatasetsetParams(fUpdateDataset, provider, lparams);
+      finally
+        lParams.Free;
+      end;
+      DoDatasetExecute(fUpdateDataset, provider);
+    end;
+    provider := nil;
+  finally
+    data.Free;
+  end;
+  aSession.Free();
+end;
+
+procedure TRODBSessionManager.Notification(AComponent: TComponent;
+  Operation: TOperation);
+begin
+  inherited;
+
+  if (Operation=opRemove) then begin
+   if (AComponent=fInsertDataset) then fInsertDataset := NIL
+   else if (AComponent=fDeleteDataset) then fDeleteDataset := NIL
+   else if (AComponent=fUpdateDataset) then fUpdateDataset := NIL
+   else if (AComponent=fSelectDataset) then fSelectDataset := NIL
+   else if (AComponent=fGetCountDataset) then fGetCountDataset := NIL
+   else if (AComponent=fSelectAllDataset) then fSelectAllDataset := nil
+   else if (AComponent=fClearSessionsDataset) then begin
+
+     if (csDestroying in ComponentState) and ClearSessionsOnDestroy then begin
+       // Cleans up after itself. If you get an AV related to the dataset's connection
+       // be aware of the fact that the dataset's creation order MUST BE after its relative
+       // connection. To see your form's Creation Order simply right click on it and select
+       // the relative menu item.
+
+       DoClearSessions(false);
+     end;
+
+     fClearSessionsDataset := NIL
+   end;
+  end;
+end;
+
+procedure TRODBSessionManager.SetClearSessionsDataset(const Value: TDataset);
+begin
+  fClearSessionsDataset := Value;
+  if (Value<>NIL) then Value.FreeNotification(Self);
+end;
+
+procedure TRODBSessionManager.SetDeleteDataset(const Value: TDataset);
+begin
+  fDeleteDataset := Value;
+  if (Value<>NIL) then Value.FreeNotification(Self);
+end;
+
+procedure TRODBSessionManager.SetGetCountDataset(const Value: TDataset);
+begin
+  fGetCountDataset := Value;
+  if (Value<>NIL) then Value.FreeNotification(Self);
+end;
+
+procedure TRODBSessionManager.SetInsertDataset(const Value: TDataset);
+begin
+  fInsertDataset := Value;
+  if (Value<>NIL) then Value.FreeNotification(Self);
+end;
+
+procedure TRODBSessionManager.SetSelectDataset(const Value: TDataset);
+begin
+  fSelectDataset := Value;
+  if (Value<>NIL) then Value.FreeNotification(Self);
+end;
+
+procedure TRODBSessionManager.SetUpdateDataset(const Value: TDataset);
+begin
+  fUpdateDataset := Value;
+  if (Value<>NIL) then Value.FreeNotification(Self);
+end;
+
+procedure TRODBSessionManager.Loaded;
+begin
+  inherited;
+
+  if not (csDesigning in ComponentState) and ClearSessionsOnCreate
+    then DoClearSessions(false);
+end;
+
+procedure TRODBSessionManager.DoGetAllSessions(Dest: TStringList);
+begin
+  CheckProperties;
+  fSelectAllDataset.Open;
+  try
+    fSelectAllDataset.First;
+    while not fSelectAllDataset.Eof do begin
+      Dest.Add(fSelectAllDataset.Fields[0].Value);
+      fSelectAllDataset.Next;
+    end;
+  finally
+    fSelectAllDataset.Close;
+  end;
+end;
+
+procedure TRODBSessionManager.SetSelectAllDataset(const Value: TDataSet);
+begin
+  fSelectAllDataset := Value;
+  if (Value<>NIL) then Value.FreeNotification(Self);
+end;
+
+function TRODBSessionManager.DoConvertGUID(const aGUID: TGUID): string;
+begin
+  if Assigned(fOnConvertGUID) then
+    try
+      Result:= fOnConvertGUID(Self, aGUID);
+    except
+      Result:= GUIDToString(aGUID);
+    end
+  else
+    Result:= GUIDToString(aGUID);
+end;
+
+procedure TRODBSessionManager.CheckProperties;
+begin
+  Check(FieldNameSessionID = '', Name + '.FieldNameSessionID must be set.');
+  Check(FieldNameCreated = '', Name + '.FieldNameCreated must be set.');
+  Check(FieldNameLastAccessed = '', Name + '.FieldNameLastAccessed must be set.');
+  Check(FieldNameData = '', Name + '.FieldNameData must be set.');
+  Check(InsertDataset = nil, Name + '.InsertDataset must be assigned.');
+  Check(DeleteDataset = nil, Name + '.DeleteDataset must be assigned.');
+  Check(UpdateDataset = nil, Name + '.UpdateDataset must be assigned.');
+  Check(SelectDataset = nil, Name + '.SelectDataset must be assigned.');
+  Check(GetCountDataset = nil, Name + '.GetCountDataset must be assigned.');
+  Check(ClearSessionsDataset = nil, Name + '.ClearSessionsDataset must be assigned.');
+  Check(SelectAllDataset = nil, Name + '.SelectAllDataset must be assigned.');
+end;
+
+procedure TRODBSessionManager.DoDatasetExecute(aDataset: TDataset;
+  aProvider: IProviderSupport);
+begin
+  if Assigned(fOnDatasetExecute) then
+    fOnDatasetExecute(Self,aDataset)
+  else if aProvider <> nil then
+    aProvider.PSExecute
+  else
+    raise Exception.CreateFmt('The %s.OnDatasetExecute event must be defined or %s should support IProviderSupport interface',[Self.Name, aDataset.Name]);
+end;
+
+function TRODBSessionManager.DoDatasetGetParams(aDataset: TDataset;
+  aProvider: IProviderSupport): TParams;
+begin
+  if Assigned(fOnDatasetGetParams) then
+    Result := fOnDatasetGetParams(Self, aDataset)
+  else if aProvider <> nil then
+    Result := aProvider.PSGetParams
+  else
+    raise Exception.CreateFmt('The %s.OnDatasetGetParams event must be defined or %s should support IProviderSupport interface',[Self.Name, aDataset.Name]);
+end;
+
+procedure TRODBSessionManager.DoDatasetSetParams(aDataset: TDataset;
+  aProvider: IProviderSupport; AParams: TParams);
+begin
+  if Assigned(fOnDatasetSetParams) then
+    fOnDatasetSetParams(Self, aDataset, AParams)
+  else if aProvider <> nil then
+    aProvider.PSSetParams(AParams)
+  else
+    raise Exception.CreateFmt('The %s.OnDatasetSetParams event must be defined or %s should support IProviderSupport interface',[Self.Name, aDataset.Name]);
+end;
+
+end.
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODL.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODL.pas
new file mode 100644
index 0000000..68c3747
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODL.pas	
@@ -0,0 +1,2977 @@
+unit uRODL;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes, Contnrs, uROClasses;
+
+const
+  EmptyGUID: TGUID = (D1: 0; D2: 0; D3: 0; D4: (0, 0, 0, 0, 0, 0, 0, 0));
+
+  DefaultIntfName = 'Default';
+
+type
+  { Misc types }
+  TRODLParamFlag = (fIn, fOut, fInOut, fResult);
+
+const
+  RODLParamFlagNames: array[TRODLParamFlag] of string = ('in', 'out', 'in/out', 'result');
+
+type
+  { TRODLNameInfo }  
+  TRODLEntity = class;
+  TRODLLibrary = class;
+
+  TRoPluginMessageType = (rmtInfo, rmtHint, rmtWarning, rmtError, rmtSuccess, rmtCustom);
+
+  IROPluginMessages = interface
+  ['{9B07B5C2-FC07-4B9B-9207-D487CDC58D0E}']
+    procedure AddMessage(iType:TRoPluginMessageType; const iSource, iMessage:string; aReserved:integer=-1; aEntity:TRODLEntity=nil);
+  end;
+
+  IRODLEntityWithAncestor = interface
+  ['{88D59A20-5B47-4CF0-A06C-C135EB598B12}']
+    function GetAncestor:string;
+    procedure SetAncestor(const iValue:string);
+    property Ancestor:string read GetAncestor write SetAncestor;
+  end;
+
+  TRODLUse = class;
+  TRODLGroup = class;
+
+  { TRODLEntity }
+  TRODLEntity = class(TObject, IUnknown)
+  private
+    fIsFromUsedRodl: boolean;
+    fLocatedInRodlUse: TRODLUse;
+    fOwner:TRODLEntity;
+
+    fData: TObject;
+    fGroupUnder: TRODLGroup;
+
+    fName: string;
+    fAttributes: TStringList;
+    fDocumentation: string;
+    fUID: TGUID;
+
+    procedure SetName(const Value: string); virtual;
+    procedure SetDocumentation(const Value: string);
+    function GetAttributes: TStrings;
+
+    function GetInfo: TRODLEntity;
+    function GetOwnerLibrary: TRODLLibrary;
+
+  protected
+    function _AddRef: Integer; stdcall;
+    function _Release: Integer; stdcall;
+    function QueryInterface(const IID: TGUID; out Obj): HRESULT; stdcall;
+
+  public
+    constructor Create; virtual;
+    destructor Destroy; override;
+
+    procedure Validate(iMessages:IRoPluginMessages); virtual;
+    //function Validate(out FaultyEntity: TRODLEntity; out ErrorMessage: string): boolean; virtual;
+
+    property Name: string read fName write SetName;
+    property Documentation: string read fDocumentation write SetDocumentation;
+    property UID: TGUID read fUID write fUID;
+    property Attributes: TStrings read GetAttributes;
+
+    property Owner:TRODLEntity read fOwner;
+    property OwnerLibrary:TRODLLibrary read GetOwnerLibrary;
+
+    property Info: TRODLEntity read GetInfo; { for backwards comatibility }
+    property IsFromUsedRodl:boolean read fIsFromUsedRodl write fIsFromUsedRodl;
+    property LocatedInRodlUse:TRODLUse read fLocatedInRodlUse write fLocatedInRodlUse;
+
+    { Helpers for visual representation in SB and elsewhere }
+    property GroupUnder:TRODLGroup read fGroupUnder write fGroupUnder;
+    class function ReadableEntityTypeName: string;
+
+    { Properties to hold custom application-specific data at runtime, for
+      the application coding convenience. These are not persisted in any way }
+    property Data:TObject read fData write fData;
+
+  end;
+
+  TRODLEntityClass = class of TRODLEntity;
+
+  TRODLGroup = class(TRODLEntity)
+  end;
+
+  { TRODLComplexEntity }
+  TRODLComplexEntity = class(TRODLEntity)
+  private
+    fItems: TObjectList;
+    fAutoCreateParams: boolean;
+    fAbstract: boolean;
+
+    function GetCount: integer;
+    function GetItems(Index: integer): TRODLEntity; 
+
+  protected
+    function GetItemClass: TRODLEntityClass; virtual; abstract;
+
+  public
+    constructor Create; override;
+    destructor Destroy; override;
+
+    procedure Validate(iMessages:IRoPluginMessages); override;
+    //function Validate(out FaultyEntity: TRODLEntity; out ErrorMessage: string): boolean; override;
+
+    function ContainsEntity(aEntity: TRODLEntity; aRecurse:boolean=true):boolean;
+
+    function ItemByName(const aName: string): TRODLEntity;
+    function ItemByUID(const aUID: TGUID): TRODLEntity;
+
+    function Add(anEntity: TRODLEntity): integer; overload; virtual;
+    function Add: TRODLEntity; overload; virtual;
+    procedure Insert(aIndex: integer; anEntity: TRODLEntity); overload; virtual;
+    function Insert(aIndex: integer): TRODLEntity; overload; virtual;
+
+    function UniqueName(aBaseName:string):string;
+
+    procedure Exchange(Index1, Index2: integer); virtual;
+
+
+    procedure Remove(anEntity: TRODLEntity); virtual;
+    procedure Delete(Index: integer); virtual;
+    procedure Clear;
+    procedure Sort;
+
+    property AutoCreateParams:boolean read fAutoCreateParams write fAutoCreateParams;
+    property Abstract:boolean read fAbstract write fAbstract;
+
+    property ItemClass: TRODLEntityClass read GetItemClass;
+    property Items[Index: integer]: TRODLEntity read GetItems; default;
+    property Count: integer read GetCount;
+
+  end;
+
+  { TRODLTypedEntity }
+  TRODLTypedEntity = class(TRODLEntity)
+  private
+    fDataType: string;
+    procedure SetDataType(const Value: string);
+  public
+    procedure Validate(iMessages: IRoPluginMessages); override;
+    property DataType: string read fDataType write SetDataType;
+  end;
+
+  { TRODLStruct }
+  TRODLBaseStruct = class(TRODLComplexEntity, IRODLEntityWithAncestor)
+  private
+    fAncestor: string;
+    function GetItems(Index: integer): TRODLTypedEntity;
+    procedure SetAncestor(const Value: string);
+
+  protected
+    function GetItemClass: TRODLEntityClass; override;
+    function IsDerivedFrom(aBaseStruct: TRODLBaseStruct): Boolean; virtual;
+
+  public
+    function Add(aStructElement: TRODLTypedEntity): integer; reintroduce; overload;
+    function Add: TRODLTypedEntity; reintroduce; overload;
+
+    procedure Validate(iMessages:IRoPluginMessages); override;
+    property Items[Index: integer]: TRODLTypedEntity read GetItems; default;
+    property Ancestor: string read fAncestor write SetAncestor;
+    function GetAncestor: string;
+
+    function CalcItems(aIncludeAncestors: boolean=true; aIgnoreDuplicates: boolean=true): IROStrings;
+    function CalcItemsMarshalingOrder(aIncludeAncestors: boolean=true): IROStrings;
+  end;
+
+  TRODLStruct = class(TRODLBaseStruct);
+
+  { TRODLArray }
+  TRODLArray = class(TRODLEntity)
+  private
+    fElementType: string;
+    procedure SetElementType(const Value: string);
+  public
+    procedure Validate(iMessages:IRoPluginMessages); override;
+    //function Validate(out FaultyEntity: TRODLEntity; out ErrorMessage: string): boolean; override;
+
+    property ElementType: string read fElementType write SetElementType;
+  end;
+
+  { TRODLEnumValue }
+  TRODLEnumValue = class(TRODLEntity)
+  private
+  end;
+
+  { TRODLEnum }
+  TRODLEnum = class(TRODLComplexEntity)
+  private
+    fPrefixEnumValues: Boolean;
+    function GetItems(Index: integer): TRODLEnumValue;
+
+  protected
+    function GetItemClass: TRODLEntityClass; override;
+
+  public
+    constructor Create; override;
+
+    function Add(aStructElement: TRODLEnumValue): integer; reintroduce; overload;
+    function Add: TRODLEnumValue; reintroduce; overload;
+
+    procedure Validate(iMessages:IRoPluginMessages); override;
+    property Items[Index: integer]: TRODLEnumValue read GetItems; default;
+
+    property PrefixEnumValues: Boolean read fPrefixEnumValues write fPrefixEnumValues;
+  end;
+
+  { TRODLOperationParam }
+  TRODLOperationParam = class(TRODLTypedEntity)
+  private
+    fFlag: TRODLParamFlag;
+    function GetFlag: string;
+    procedure SetFlag(const aValue: string);
+  public
+    property Flag: TRODLParamFlag read fFlag write fFlag;
+    property FlagAsString: string read GetFlag write SetFlag;
+  end;
+
+  { TRODLOperation }
+  TRODLOperation = class(TRODLComplexEntity)
+  private
+    fOperationResult: TRODLOperationParam;
+    fCodeBodies: TStringList;
+    fForceAsyncResponse: boolean;
+    function GetItems(Index: integer): TRODLOperationParam;
+    function GetResult: TRODLOperationParam;
+    function GetCodeBody(iLanguage: string): TStrings;
+    function GetCodeBodyCount: integer;
+    function GetCodeBodyLanguages(iIndex: integer): string;
+
+  protected
+    function GetItemClass: TRODLEntityClass; override;
+
+  public
+    constructor Create; override;
+    destructor Destroy; override;
+
+    function Add(aParam: TRODLOperationParam): integer; reintroduce; overload;
+    function Add: TRODLOperationParam; reintroduce; overload;
+
+    {procedure MoveResult();
+    procedure Exchange(Index1, Index2: integer); override;}
+
+    procedure SetCodeBody(iLanguage: string; Value: TStrings);
+    procedure SetCodeBodyAsString(iLanguage: string; const Value: string); 
+
+    function GetParameter(const aParameterName : string) : TRODLOperationParam;
+
+    property Items[Index: integer]: TRODLOperationParam read GetItems; default;
+
+    property Result: TRODLOperationParam read GetResult;
+    function AddResult: TRODLOperationParam;
+    procedure RemoveResult;
+
+    property ForceAsyncResponse:boolean read fForceAsyncResponse write fForceAsyncResponse;
+
+    property CodeBodies[iLanguage:string]:TStrings read GetCodeBody write SetCodeBody;
+    property CodeBodyCount:integer read GetCodeBodyCount;
+    property CodeBodyLanguages[iIndex:integer]:string read GetCodeBodyLanguages;
+
+    procedure Validate(iMessages: IROPluginMessages); override;
+  end;
+
+  { TRODLServiceInterface }
+  TRODLServiceInterface = class(TRODLComplexEntity)
+  private
+    function GetItems(Index: integer): TRODLOperation;
+
+  protected
+    function GetItemClass: TRODLEntityClass; override;
+
+  public
+    procedure GetOperationsList(AList: TList);
+    function FindOperation(const anOperationName : string; IncludeAnchestors : boolean = FALSE) : TRODLOperation;
+    function GetOperation(const anOperationName : string; IncludeAnchestors : boolean = FALSE) : TRODLOperation;
+
+    function CalcItems(aIncludeAncestors: boolean=true; aIgnoreDuplicates: boolean=true): IROStrings;
+
+    function Add(aParam: TRODLOperation): integer; reintroduce; overload;
+    function Add: TRODLOperation; reintroduce; overload;
+
+    property Items[Index: integer]: TRODLOperation read GetItems; default;
+  end;
+
+  { TRODLBaseService }
+  TRODLBaseService = class(TRODLComplexEntity, IRODLEntityWithAncestor)
+  private
+    fAncestor: string;
+    fImplClass: string;
+    fImplUnit: string;
+    fisPrivate: Boolean;
+    function GetItems(Index: integer): TRODLServiceInterface;
+    function GetDefault: TRODLServiceInterface;
+    procedure SetAncestor(const Value: string);
+
+  protected
+    function GetItemClass: TRODLEntityClass; override;
+    function IsDerivedFrom(aBaseService: TRODLBaseService): Boolean; virtual;
+  public
+    constructor Create; override;
+
+    function Add(aServiceInterface: TRODLServiceInterface): integer; reintroduce; overload;
+    function Add: TRODLServiceInterface; reintroduce; overload;
+
+    procedure Validate(iMessages: IRoPluginMessages); override;
+    property Items[Index: integer]: TRODLServiceInterface read GetItems; default;
+    property Default: TRODLServiceInterface read GetDefault;
+    property Ancestor: string read fAncestor write SetAncestor;
+
+    property ImplUnit:string read fImplUnit write fImplUnit;
+    property ImplClass:string read fImplClass write fImplClass;
+    function GetAncestor:string;
+    property isPrivate: Boolean read fisPrivate write fisPrivate;
+  end;
+
+  TRODLService = class(TRODLBaseService);
+  TRODLEventSink = class(TRODLBaseService);
+
+  { TRODLArray }
+  TRODLException = class(TRODLBaseStruct)
+  public
+    procedure Validate(iMessages:IRoPluginMessages); override;
+  end;
+
+  { TRODLUse }
+  TRODLUseSplitMode = (usmAsParent, usmNever, usmAlways);
+  TRODLUse = class(TRODLEntity)
+  private
+    fRodlFile: string;
+    fAbsoluteRodlFile: string;
+    fLoadedRodlLibraryName: string;
+    fGenerateCode: boolean;
+    fSplitMode: TRODLUseSplitMode;
+  public
+    procedure Validate(iMessages:IRoPluginMessages); override;
+    property RodlFile:string read fRodlFile write fRodlFile;
+    property AbsoluteRodlFile:string read fAbsoluteRodlFile write fAbsoluteRodlFile;
+    property LoadedRodlLibraryName: string read fLoadedRodlLibraryName write fLoadedRodlLibraryName;
+    property GenerateCode: boolean read fGenerateCode write fGenerateCode;
+    property SplitMode: TRODLUseSplitMode read fSplitMode write fSplitMode;
+  end;
+
+  { TRODLLibrary }
+  TRODLLibrary = class(TRODLComplexEntity)
+  private
+    fArrayCount: integer;
+    fServiceCount: integer;
+    fStructCount: integer;
+    fEnumCount: integer;
+    fExceptionCount: integer;
+    fUseCount: integer;
+    fEventSinkCount: integer;
+    fGroupCount: integer;
+    fRodlFilename: string;
+    fNamespace: string;
+
+    function GetByType(aIndex:integer; aType:TRODLEntityClass):TRODLEntity;
+    function GetArray(Index: integer): TRODLArray;
+    function GetEnums(Index: integer): TRODLEnum;
+    function GetServices(Index: integer): TRODLService;
+    function GetStructs(Index: integer): TRODLStruct;
+    function GetExceptions(Index: integer): TRODLException;
+    function GetUse(Index: integer): TRODLUse;
+    function CalcOrder(const iObjects: IROStrings): IROStrings;
+    function GetGroups(Index: integer): TRODLGroup;
+    function GetEventSinks(Index: integer): TRODLEventSink;
+
+  protected
+    function GetItemClass: TRODLEntityClass; override;
+
+  public
+    constructor Create(); override;
+
+    procedure GetArraysByElement(const aElementName:string; AList: TList);
+    function FindBaseService(const iServiceName: string): TRODLBaseService;
+    function FindService(const iServiceName: string): TRODLService;
+    function FindStruct(const iStructName: string): TRODLStruct;
+    function FindBaseStruct(const iStructName: string): TRODLBaseStruct;
+    function FindEnum(const iEnumName: string): TRODLEnum;
+    function FindArray(const iArrayName: string): TRODLArray;
+    function FindGroup(const aID: TGUID): TRODLGroup; overload;
+    function FindException(const iExceptionName: string): TRODLException;
+    function FindUse(const iUseName: string): TRODLUse;
+    function FindUseByFilename(const iUseRODLFile: string): TRODLUse;
+
+    procedure ClearDuplicates();
+
+    function GetService(const aServiceName: string): TRODLService;
+    function GetStruct(const aStructName: string): TRODLStruct;
+
+    function IsValidCustomType(const iTypeName:string):boolean;
+    function IsValidSimpleType(const iTypeName: string): boolean;
+    function IsValidType(const iTypeName:string):boolean;
+    function IsValidService(const iServiceName:string):boolean;
+    function IsValidEventSink(const iEventSink:string):boolean;
+    function IsValidException(const iTypeName:string):boolean;
+
+    function Add(anEntity: TRODLEntity): integer; override;
+
+    function CalcServiceOrder:IROStrings;
+    function CalcEventSinkOrder: IROStrings;
+    function CalcExceptionOrder: IROStrings;
+    function CalcStructOrder: IROStrings;
+
+    procedure Delete(Index: integer); override;
+    procedure Remove(anEntity: TRODLEntity); override;
+
+    property RodlFilename:string read fRodlFilename write fRodlFilename;
+    property Namespace: string read fNamespace write fNamespace;
+
+    property Structs[Index: integer]: TRODLStruct read GetStructs;
+    property StructCount: integer read fStructCount;
+
+    property Arrays[Index: integer]: TRODLArray read GetArray;
+    property ArrayCount: integer read fArrayCount;
+
+    property Enums[Index: integer]: TRODLEnum read GetEnums;
+    property EnumCount: integer read fEnumCount;
+
+    property Services[Index: integer]: TRODLService read GetServices;
+    property ServiceCount: integer read fServiceCount;
+
+    property Exceptions[Index: integer]: TRODLException read GetExceptions;
+    property ExceptionCount: integer read fExceptionCount;
+
+    property Use[Index: integer]: TRODLUse read GetUse;
+    property UseCount: integer read fUseCount;
+
+    property Groups[Index: integer]: TRODLGroup read GetGroups;
+    property GroupCount: integer read fGroupCount;
+
+    property EventSinks[Index: integer]: TRODLEventSink read GetEventSinks;
+    property EventSinkCount: integer read fEventSinkCount;
+  end;
+
+  { TRODLConverter }
+  TRODLConverter = class
+  private
+    fBuffer: TStringList;
+    fTargetEntity: string;
+
+    function GetBuffer: TStrings;
+
+  protected
+    procedure IntConvert(const aLibrary: TRODLLibrary; const aTargetEntity: string = ''); virtual; abstract;
+    function ValidateTargetEntity(const aLibrary: TRODLLibrary; const aTargetEntity: string): boolean; virtual;
+
+  public
+    constructor Create(const aLibraryFile: string; const aTargetEntity: string = ''); overload; virtual;
+    constructor Create(const aLibrary: TRODLLibrary; const aTargetEntity: string = ''); overload; virtual;
+    destructor Destroy; override;
+
+    procedure Write(const someText: string; Indentation: integer = 0); overload;
+    procedure WriteLines(const someText: string);
+    procedure WriteEmptyLine;
+
+    procedure Convert(const aLibrary: TRODLLibrary; const aTargetEntity: string = '');
+    class function GetTargetFileName(const aLibrary: TRODLLibrary; const aTargetEntity: string = ''): string; virtual;
+
+    property Buffer: TStrings read GetBuffer;
+    property TargetEntity: string read fTargetEntity;
+  end;
+
+  TRODLConverterClass = class of TRODLConverter;
+
+  { TRODLReader }
+  TRODLReader = class
+  private
+  protected
+    function IntReadFromStream(aStream: TStream; aFilename:string): TRODLLibrary; virtual; abstract;
+
+  public
+    constructor Create; virtual;
+
+    function Read(aStream: TStream; const aFilename:string=''): TRODLLibrary;
+    function ReadFromFile(const aFileName: string): TRODLLibrary;
+  end;
+
+  TRODLReaderClass = class of TRODLReader;
+
+  { TXMLToRODL }
+  TXMLToRODL = class(TRODLReader)
+  private
+    fAddToExistingLibrary:TRODLLibrary;
+    fRecreateGuids:boolean;
+    procedure LoadStreamToLibrary(aStream: TStream; iLibrary: TRODLLibrary; iRodlName: string = ''; iRodlUse: TRODLUse=nil; iReplaceLibraryAttributes:boolean=true);
+    function RecreateGuidIfNeeded(iGuid:TGuid):TGuid;
+  protected
+    function IntReadFromStream(aStream: TStream; aFilename:string): TRODLLibrary; override;
+
+  public
+    constructor Create(iAddToExisting:TRODLLibrary; iRecreateGuids:boolean=false); reintroduce; overload;
+    procedure LoadFileToLibrary(iFilename: string; iLibrary: TRODLLibrary; iRodlUse:TRODLUse=nil);
+
+    function ReadFromString(const aString: string; const aFilename:string=''): TRODLLibrary;
+  end;
+
+function ReadRODLFromFile(aReaderClass: TRODLReaderClass; const aFileName: string): TRODLLibrary;
+
+function ExpandVariables(const aFilename:string):string;
+
+type
+  XMLFlagNamesArray = array[TRODLParamFlag] of string;
+const
+  XMLFlagNames: XMLFlagNamesArray = ('In', 'Out', 'InOut', 'Result');
+
+function XMLFlagNameToFlag(const aName: string): TRODLParamFlag;
+implementation
+
+uses
+  {$IFDEF DEBUG_REMOBJECTS_RODL}eDebugServer, {$ENDIF}
+  {$IFDEF DELPHI5} ActiveX, Windows, {$ENDIF}
+  {$IFDEF MSWINDOWS}Registry, {$IFNDEF DELPHI5}Windows,{$ENDIF}{$ENDIF}
+  SysUtils, TypInfo, uRORes, uROXMLIntf{,uROTypes};
+
+{ Support routines }
+
+{$IFDEF MSWINDOWS}
+function LookupVariable(const aVariable:string):string;
+begin
+  with TRegistry.Create do try
+    RootKey := HKEY_CURRENT_USER;
+    OpenKey('Software\RemObjects\RemObjects SDK\Variables',false);
+    result := ReadString(aVariable);
+{    if result = '' then
+      RaiseError('Variable $(%s) used in RODL is not defined.',[aVariable]);
+      }
+  finally
+    Free;
+  end;
+end;
+{$ENDIF}
+
+{$IFDEF MSWINDOWS}
+function ExpandVariables(const aFilename:string):string;
+var
+  p: Integer;
+  lName,lVar:string;
+begin
+  lName := aFilename;
+  if Pos('$(',lName) = 1 then begin
+    p := Pos(')',lName);
+    if p > 1 then begin
+      lVar := Copy(lName,3,p-3);
+      Delete(lName,1,p);
+      result := LookupVariable(lVar)+lName;
+      exit;
+    end;
+  end;
+  result := aFilename;
+end;
+{$ELSE}
+function ExpandVariables(const aFilename:string):string;
+begin
+  result := aFilename;
+end;
+{$ENDIF}
+
+function CleanupText(const someText: string): string;
+var
+  i: integer;
+begin
+  result := Trim(someText);
+  for i := 1 to Length(result) do
+    case result[i] of
+      '0'..'9': begin
+          if (i = 1) then result[i] := '_';
+        end;
+      'a'..'z',
+        'A'..'Z',
+        '_': Continue;
+    else
+      result[i] := '_';
+    end;
+end;
+
+function CleanupTextAllowSpaces(const someText: string): string;
+var
+  i: integer;
+begin
+  result := Trim(someText);
+  for i := 1 to Length(result) do
+    case result[i] of
+      {'0'..'9' : begin
+        if (i=1) then result[i] := '_';
+      end;}
+      #13, #10, #09,
+        #$20..#$21,
+        #$23..#$25,
+        #$27..#$3b,
+        #$3d,
+        #$3f..#$7e: Continue;
+    else
+      result[i] := '_';
+    end;
+end;
+
+function ReadRODLFromFile(aReaderClass: TRODLReaderClass; const aFileName: string): TRODLLibrary;
+begin
+  with aReaderClass.Create do try
+    result := ReadFromFile(aFileName);
+  finally
+    Free;
+  end;
+end;
+
+{ TRODLNameInfo }
+
+{constructor TRODLNameInfo.Create(const aName: string; aOwner:TRODLEntity);
+begin
+  Name := aName;
+  fOwner := aOwner;
+  fUID := NewUID();
+end;
+
+destructor TRODLNameInfo.Destroy;
+begin
+  if Assigned(fAttributes) then fAttributes.Free;
+  inherited;
+end;
+
+function TRODLNameInfo.GetAttributes: TStrings;
+begin
+  if (fAttributes = nil) then fAttributes := TStringList.Create;
+  result := fAttributes;
+end;
+
+procedure TRODLNameInfo.SetName(const Value: string);
+begin
+  fName := CleanupText(Value);
+end;
+
+procedure TRODLNameInfo.SetDocumentation(const Value: string);
+begin
+  fDocumentation := CleanupTextAllowSpaces(Value);
+end;   }
+
+{ TRODLEntityInfo }
+
+{constructor TRODLEntityInfo.Create(const aName: string; const aUID: TGUID; const someDocumentation: string; aOwner:TRODLEntity);
+begin
+  inherited Create(aName,aOwner);
+
+  UID := aUID;
+  Documentation := someDocumentation;
+end;}
+
+{procedure TRODLEntityInfo.Validate(iMessages:IRoPluginMessages);
+//function TRODLEntityInfo.GetIsValid: boolean;
+begin
+  //result := inherited GetIsValid and
+  if IsEqualGUID(UID, EmptyGUID) then
+    iMessages.AddMessage(rmtWarning,Name,'No UID specified',-1,Owner);
+end;}
+
+{ TRODLEntity }
+
+constructor TRODLEntity.Create;
+begin
+  fUID := NewGUID();
+end;
+
+destructor TRODLEntity.Destroy;
+begin
+  if Assigned(fAttributes) then fAttributes.Free;
+  inherited;
+end;
+
+function TRODLEntity.GetInfo: TRODLEntity;
+begin
+  result := self;
+end;
+
+procedure TRODLEntity.Validate(iMessages:IRoPluginMessages);
+begin
+  if (Trim(Name) = '') then
+    iMessages.AddMessage(rmtError,'','No Name specified',-1,Owner);
+
+  { ToDo: add a flag that specified whether UID is needed for the explicit base types }
+  if IsEqualGUID(UID, EmptyGUID) then
+    iMessages.AddMessage(rmtWarning,Name,'No UID specified',-1,Owner);
+
+  {result := Info.IsValid;
+  if not result then begin
+    FaultyEntity := Self;
+    ErrorMessage := err_InvalidInfo;
+  end;}
+end;
+
+function TRODLEntity.GetOwnerLibrary: TRODLLibrary;
+var lOwner:TRODLEntity;
+begin
+  lOwner := fOwner;
+  while Assigned(lOwner) and (not (lOwner is TRODLLibrary)) do
+    lOwner := lOwner.Owner;
+
+  Assert(Assigned(lOwner));
+  result := lOwner as TRODLLibrary;
+end;
+
+function TRODLEntity._AddRef: Integer;
+begin
+  result := 1;
+end;
+
+function TRODLEntity._Release: Integer;
+begin
+  result := 1;
+end;
+
+function TRODLEntity.QueryInterface(const IID: TGUID; out Obj): HRESULT;
+begin
+  if GetInterface(IID, Obj) then
+    Result := 0
+  else
+    Result := E_NOINTERFACE;
+end;
+
+class function TRODLEntity.ReadableEntityTypeName: string;
+begin
+  result := ClassName;
+  Delete(result,1,5); { delete the "TRODL" }
+end;
+
+function TRODLEntity.GetAttributes: TStrings;
+begin
+  if (fAttributes = nil) then fAttributes := TStringList.Create;
+  result := fAttributes;
+end;
+
+procedure TRODLEntity.SetDocumentation(const Value: string);
+begin
+  fDocumentation := Value;
+end;
+
+procedure TRODLEntity.SetName(const Value: string);
+begin
+  fName := CleanupText(Value);
+end;
+
+{ TRODLComplexEntity }
+
+function TRODLComplexEntity.Add(anEntity: TRODLEntity): integer;
+begin
+  if not (anEntity is ItemClass) then RaiseError(err_InvalidType, [anEntity.ClassName, ItemClass.ClassName]);
+  result := fItems.Add(anEntity);
+  anEntity.fOwner := self;
+end;
+
+function TRODLComplexEntity.Add: TRODLEntity;
+begin
+  result := ItemClass.Create;
+  result.fOwner := self;
+  Add(result);
+end;
+
+procedure TRODLComplexEntity.Insert(aIndex: integer; anEntity: TRODLEntity);
+begin
+  if not (anEntity is ItemClass) then RaiseError(err_InvalidType, [anEntity.ClassName, ItemClass.ClassName]);
+  fItems.Insert(aIndex, anEntity);
+  anEntity.fOwner := self;
+end;
+
+function TRODLComplexEntity.Insert(aIndex: integer): TRODLEntity;
+begin
+  result := ItemClass.Create;
+  result.fOwner := self;
+  Insert(aIndex, result);
+end;
+
+procedure TRODLComplexEntity.Clear;
+begin
+  fItems.Clear;
+end;
+
+constructor TRODLComplexEntity.Create;
+begin
+  inherited;
+  fAutoCreateParams := true;
+  fItems := TObjectList.Create;
+end;
+
+procedure TRODLComplexEntity.Delete(Index: integer);
+begin
+  fItems.Delete(Index);
+end;
+
+destructor TRODLComplexEntity.Destroy;
+begin
+  fItems.Free;
+  inherited;
+end;
+
+function TRODLComplexEntity.GetCount: integer;
+begin
+  result := fItems.Count
+end;
+
+procedure TRODLComplexEntity.Validate(iMessages:IRoPluginMessages); 
+//function TRODLComplexEntity.Validate(out FaultyEntity: TRODLEntity; out ErrorMessage: string): boolean;
+var
+  i, n: integer;
+begin
+  inherited Validate(iMessages);
+  //if not result then Exit;
+  //result := FALSE;
+
+  // Check type names are unique
+  for i := 0 to (Count - 2) do
+    for n := i + 1 to (Count - 1) do
+      if (CompareText(Items[i].Info.Name, Items[n].Info.Name) = 0) then begin
+
+        iMessages.AddMessage(rmtError,Info.Name+'.'+Items[i].Info.Name,err_RodlDuplicateName,-1,Items[n]);
+
+        {FaultyEntity := ;
+        ErrorMessage := Format(err_DuplicateName, [Items[n].Info.Name]);
+        Exit;}
+      end;
+
+  // Check they are all valid on a basic level
+  for i := 0 to (Count - 1) do
+    Items[i].Validate(iMessages);
+    //if not Items[i].Validate(FaultyEntity, ErrorMessage) then Exit;
+
+  //result := TRUE;
+end;
+
+function TRODLComplexEntity.GetItems(Index: integer): TRODLEntity;
+begin
+  result := TRODLEntity(fItems[Index]);
+end;
+
+function TRODLComplexEntity.ItemByName(const aName: string): TRODLEntity;
+var
+  i: integer;
+begin
+  result := nil;
+
+  for i := 0 to (Count - 1) do
+    if (CompareText(Items[i].Info.Name, aName) = 0) then begin
+      result := Items[i];
+      Exit;
+    end;
+end;
+
+function TRODLComplexEntity.ItemByUID(const aUID: TGUID): TRODLEntity;
+var
+  i: integer;
+begin
+  result := nil;
+
+  for i := 0 to (Count - 1) do
+    if IsEqualGUID(Items[i].Info.UID, aUID) then begin
+      result := Items[i];
+      Exit;
+    end;
+end;
+
+procedure TRODLComplexEntity.Remove(anEntity: TRODLEntity);
+begin
+  fItems.Remove(anEntity)
+end;
+
+procedure TRODLComplexEntity.Exchange(Index1, Index2: integer);
+begin
+  fItems.Exchange(Index1, Index2);
+end;
+
+function TRODLComplexEntity.UniqueName(aBaseName: string): string;
+var
+  i: Integer;
+  lIndex: Integer;
+  lOk: boolean;
+begin
+  lIndex := 0;
+  result := aBasename;
+  repeat
+    lOk := true;
+    for i := 0 to Count-1 do begin
+      if result = Items[i].Info.Name then begin
+        inc(lIndex);
+        result := aBaseName+IntToStr(lIndex);
+        lOk  := false;
+      end;
+    end; { for }
+  until lOk;
+end;
+
+function TRODLComplexEntity.ContainsEntity(aEntity: TRODLEntity; aRecurse:boolean=true): boolean;
+var
+  i: Integer;
+begin
+  result := false;
+  for i := 0 to Count-1 do begin
+    if Items[i] = aEntity then begin
+      result := true;
+      exit;
+    end;
+    if aRecurse and (Items[i] is TRODLComplexEntity) then begin
+      result := TRODLComplexEntity(Items[i]).ContainsEntity(aEntity);
+      if result then exit;
+    end;
+  end; { for }
+end;
+
+function SortItem(Item1, Item2: Pointer): Integer;
+begin
+  Result := CompareText(TRODLEntity(Item1).Name, TRODLEntity(Item2).name);
+end;
+
+procedure TRODLComplexEntity.Sort;
+begin
+  fItems.Sort(@SortItem);
+end;
+
+{ TRODLTypedEntity }
+
+procedure TRODLTypedEntity.Validate(iMessages:IRoPluginMessages);
+begin
+  if (DataType = '') then begin
+    iMessages.AddMessage(rmtError,Owner.Owner.Info.Name+'.'+Name,err_RodlNoDataTypeSpecified,-1,Owner);
+    exit;
+  end;
+
+  if not Owner.OwnerLibrary.IsValidType(DataType) then
+    iMessages.AddMessage(rmtError,Owner.Owner.Info.Name+'.'+Name,Format(err_RodlInvalidDataType,[DataType]),-1,Owner);
+
+  if not (Owner is TRODLOperation) then
+  begin
+    if (CompareText(DataType,Owner.Info.Name) = 0) then
+      iMessages.AddMessage(rmtError,Owner.Info.Name,Format(err_RodlStructCannotBeNested,[DataType]),-1,Owner);
+  end;
+end;
+
+procedure TRODLTypedEntity.SetDataType(const Value: string);
+begin
+  fDataType := CleanupText(Value);
+end;
+
+{ TRODLStruct }
+
+function TRODLBaseStruct.Add(aStructElement: TRODLTypedEntity): integer;
+begin
+  result := inherited Add(aStructElement)
+end;
+
+function TRODLBaseStruct.Add: TRODLTypedEntity;
+begin
+  result := TRODLTypedEntity(inherited Add);
+  result.Info.Name := 'Field' + IntToStr(Count);
+end;
+
+function CompareRODLBaseStructItems(List: TStringList; Index1, Index2: Integer): Integer;
+begin
+  Result := CompareText(List[Index1], List[Index2]);
+end;
+
+function TRODLBaseStruct.CalcItems(aIncludeAncestors, aIgnoreDuplicates: boolean): IROStrings;
+var
+  lAncestor, lDescendant: TRODLBaseStruct;
+  i: integer;
+begin
+  result := NewROStrings();
+  if aIgnoreDuplicates then begin
+    result.Sorted := True;
+    result.Duplicates := dupIgnore;
+  end;
+
+  lAncestor := self;
+  repeat
+    for i := lAncestor.Count-1 downto 0 do
+      result.AddObject(lAncestor.Items[i].Name, lAncestor.Items[i]);
+
+    lDescendant := lAncestor;
+    if lAncestor.Ancestor <> '' then
+      lAncestor := OwnerLibrary.FindBaseStruct(lAncestor.Ancestor)
+    else
+      lAncestor := nil;
+
+    if assigned(lAncestor) and lAncestor.IsDerivedFrom(lDescendant) then
+      RaiseError(err_RodlCircularReference, [lDescendant.Name, lAncestor.Name], EROCircularReference);
+
+  until (not Assigned(lAncestor)) or (not aIncludeAncestors);
+end;
+
+function TRODLBaseStruct.CalcItemsMarshalingOrder(aIncludeAncestors: boolean=true): IROStrings;
+begin
+  result := CalcItems(aIncludeAncestors);
+
+  // Do not use "Result.Sorted" because it uses AnsiCompareText for the comparisons
+  // whereas the SortPropList method originally used via GetGetPropList in TROSerializer.ReadObject
+  // does a case insensitive ASCII based sort. Hence the need to do our own
+  // sorting that calls CompareText.
+  result.Sorted := False;
+  result.CustomSort(CompareRODLBaseStructItems);
+end;
+
+function TRODLBaseStruct.GetAncestor: string;
+begin
+  result := fAncestor;
+end;
+
+function TRODLBaseStruct.GetItemClass;
+begin
+  result := TRODLTypedEntity;
+end;
+
+function TRODLBaseStruct.GetItems(Index: integer): TRODLTypedEntity;
+begin
+  result := TRODLTypedEntity(inherited Items[Index]);
+end;
+
+function TRODLBaseStruct.IsDerivedFrom(aBaseStruct: TRODLBaseStruct): Boolean;
+var
+  lAncestor: TRODLBaseStruct;
+  i: Integer;
+begin
+  result := true;
+  lAncestor := OwnerLibrary.FindBaseStruct(Self.Ancestor);
+  for i := 0 to OwnerLibrary.StructCount - 1 do begin // try not more than struct count to prevent ancestor circularity
+    if not assigned(lAncestor) then break;
+    if lAncestor = aBaseStruct then exit;
+    lAncestor := OwnerLibrary.FindBaseStruct(lAncestor.Ancestor);
+  end;
+  result := false;
+end;
+
+procedure TRODLBaseStruct.SetAncestor(const Value: string);
+begin
+  fAncestor := Trim(Value);
+end;
+
+procedure TRODLBaseStruct.Validate(iMessages: IRoPluginMessages);
+var
+  lSelfItems, lAncestorItems: IROStrings;
+  i, j: Integer;
+begin
+  inherited;
+  { Hack: for exemptions, dont warn about missing elements }
+  { ToDo: create a command base class for struct and exception, and derrive both, to avoid this kind of prob. }
+  if (Count = 0) and not (self is TRODLException) and (Ancestor = '') then
+    iMessages.AddMessage(rmtWarning, Name, err_RodlNoStructElementsDefined, -1, self);
+
+  if (Ancestor <> '') then begin
+    if not OwnerLibrary.IsValidType(Ancestor) and not (self is TRODLException) then begin// exceptions ancestors are checked in TRODLException.Validate
+      iMessages.AddMessage(rmtError, Info.Name, Format(err_RodlInvalidAncestorType, [Ancestor]), -1, self);
+      Exit;
+    end;
+
+    if assigned(OwnerLibrary.FindBaseStruct(Ancestor)) then begin
+      if OwnerLibrary.FindBaseStruct(Ancestor).IsDerivedFrom(Self) then begin
+        iMessages.AddMessage(rmtError, Info.Name, Format(err_RodlCircularReference, [Name, Ancestor]), -1, self);
+        Exit;
+      end;
+
+      try
+        lSelfItems := CalcItems(False, False);
+        lAncestorItems := OwnerLibrary.FindBaseStruct(Ancestor).CalcItems(True, False);
+        for i := 0 to lSelfItems.Count - 1 do
+          for j := 0 to lAncestorItems.Count - 1 do
+            if CompareText(lSelfItems[i], lAncestorItems[j]) = 0 then
+              iMessages.AddMessage(rmtError, Name+'.'+lSelfItems[i], Format(err_RodlItemExistsInAnsector, [lSelfItems[i], TRODLEntity(lAncestorItems.Objects[j]).Owner.Name]), -1, Self);
+      except
+        on EROCircularReference do
+          iMessages.AddMessage(rmtWarning, Name, err_RodlCircularityWarning, -1, Self);
+      end;
+    end;
+  end;
+end;
+
+{ TRODLEnum }
+
+function TRODLEnum.Add(aStructElement: TRODLEnumValue): integer;
+begin
+  result := inherited Add(aStructElement)
+end;
+
+function TRODLEnum.Add: TRODLEnumValue;
+begin
+  result := TRODLEnumValue(inherited Add);
+  result.Info.Name := 'Value' + IntToSTr(Count);
+end;
+
+constructor TRODLEnum.Create;
+begin
+  inherited;
+  fPrefixEnumValues := True;
+end;
+
+function TRODLEnum.GetItemClass: TRODLEntityClass;
+begin
+  result := TRODLEnumValue;
+end;
+
+function TRODLEnum.GetItems(Index: integer): TRODLEnumValue;
+begin
+  result := TRODLEnumValue(inherited Items[Index]);
+end;
+
+procedure TRODLEnum.Validate(iMessages: IRoPluginMessages);
+begin
+  inherited;
+  if Count = 0 then
+    iMessages.AddMessage(rmtError,Info.Name,err_RodlNoEnumValues,-1,self);
+end;
+
+{ TRODLBaseService }
+
+function TRODLBaseService.Add(aServiceInterface: TRODLServiceInterface): integer;
+begin
+  result := inherited Add(aServiceInterface);
+end;
+
+function TRODLBaseService.Add: TRODLServiceInterface;
+begin
+  result := TRODLServiceInterface(inherited Add);
+end;
+
+constructor TRODLBaseService.Create;
+var
+  defintf: TRODLServiceInterface;
+begin
+  inherited;
+  fisPrivate := False;
+  defintf := Add;
+  defintf.Info.Name := DefaultIntfName;
+  defintf.Info.UID := NewGUID;
+end;
+
+function TRODLBaseService.GetAncestor: string;
+begin
+  result := fAncestor;
+end;
+
+function TRODLBaseService.GetDefault: TRODLServiceInterface;
+var
+  i: integer;
+begin
+  result := nil;
+  if (Count = 1) then
+    result := Items[0]
+  else
+    for i := 0 to (Count - 1) do
+      if (CompareText(Items[i].Info.name, DefaultIntfName) = 0) then begin
+        result := Items[i];
+        Exit;
+      end;
+end;
+
+function TRODLBaseService.GetItemClass: TRODLEntityClass;
+begin
+  result := TRODLServiceInterface;
+end;
+
+function TRODLBaseService.GetItems(Index: integer): TRODLServiceInterface;
+begin
+  result := TRODLServiceInterface(inherited Items[Index]);
+end;
+
+function TRODLBaseService.IsDerivedFrom(aBaseService: TRODLBaseService): Boolean;
+var
+  lAncestor: TRODLBaseService;
+  i: Integer;  
+begin
+  result := true;
+  lAncestor := OwnerLibrary.FindBaseService(Self.Ancestor);
+  for i := 0 to OwnerLibrary.ServiceCount - 1 do begin // try not more than service count to prevent ancestor circularity
+    if not assigned(lAncestor) then break;
+    if lAncestor = aBaseService then exit;
+    lAncestor := OwnerLibrary.FindBaseService(lAncestor.Ancestor);
+  end;
+  result := false;
+end;
+
+procedure TRODLBaseService.SetAncestor(const Value: string);
+begin
+  fAncestor := Trim(Value);
+end;
+
+procedure TRODLBaseService.Validate(iMessages: IRoPluginMessages);
+var
+  lSelfItems, lAncestorItems: IROStrings;
+  i, j: Integer;
+begin
+  inherited;
+  for i := 0 to Count-1 do begin
+    //Items[i].Validate(iMessages);
+    if (Items[i].Count = 0) and (Ancestor = '') then
+      iMessages.AddMessage(rmtWarning, Name+'.'+Items[i].Name, err_RodlNoOperationsDefined, -1, self);
+  end;
+
+  if (Ancestor <> '') then begin
+    if self is TRODLEventSink then begin
+      if not OwnerLibrary.IsValidEventSink(Ancestor) then begin
+        iMessages.AddMessage(rmtError, Name, Format(err_RodlInvalidAncestorType, [Ancestor]),-1, self);
+        Exit;
+      end;
+    end else begin
+      if not OwnerLibrary.IsValidService(Ancestor) then begin
+        iMessages.AddMessage(rmtError, Name, Format(err_RodlInvalidAncestorType, [Ancestor]),-1, self);
+        Exit;
+      end;
+    end;
+
+    if assigned(OwnerLibrary.FindBaseService(Ancestor)) then begin
+      if OwnerLibrary.FindBaseService(Ancestor).IsDerivedFrom(Self) then begin
+        iMessages.AddMessage(rmtError, Info.Name, Format(err_RodlCircularReference, [Name, Ancestor]), -1, self);
+        Exit;
+      end;
+
+      try
+        lSelfItems := Default.CalcItems(False, False);
+        lAncestorItems := OwnerLibrary.FindBaseService(Ancestor).Default.CalcItems(True, False);
+        for i := 0 to lSelfItems.Count - 1 do
+          for j := 0 to lAncestorItems.Count - 1 do
+            if CompareText(lSelfItems[i], lAncestorItems[j]) = 0 then
+              iMessages.AddMessage(rmtError, Name+'.'+lSelfItems[i], Format(err_RodlItemExistsInAnsector, [lSelfItems[i], TRODLEntity(lAncestorItems.Objects[j]).Owner.Owner.Name]), -1, Self);
+      except
+        on EROCircularReference do
+          iMessages.AddMessage(rmtWarning, Name, err_RodlCircularityWarning, -1, Self);
+      end;
+    end;
+  end;
+end;
+
+{ TRODLOperationParam }
+
+{constructor TRODLOperationParam.Create(const aName, aTypeName: string; aFlag: TRODLParamFlag; aOwner:TRODLEntity);
+begin
+  inherited Create(aName, aTypeName, aOwner);
+  Flag := aFlag;
+end;}
+
+function TRODLOperationParam.GetFlag: string;
+begin
+  result := RODLParamFlagNames[fFlag];
+end;
+
+procedure TRODLOperationParam.SetFlag(const aValue: string);
+var
+  lFlag: TRODLParamFlag;
+begin
+  for lFlag := Low(TRODLParamFlag) to High(TRODLParamFlag) do
+    if SameText(RODLParamFlagNames[lFlag], aValue) then begin
+      fFlag := lFlag;
+      exit;
+    end;
+  RaiseError(err_InvalidParamFlag, [aValue]);
+end;
+
+{ TRODLOperation }
+
+function TRODLOperation.Add(aParam: TRODLOperationParam): integer;
+begin
+  if aParam.fFlag = fResult then
+    RaiseError(err_MayNotAddResult);
+    
+  result := inherited Add(aParam)
+end;
+
+function TRODLOperation.Add: TRODLOperationParam;
+begin
+  result := TRODLOperationParam(inherited Add);
+  result.Info.Name := 'Param' + IntToStr(Count);
+end;
+
+function TRODLOperation.GetItemClass: TRODLEntityClass;
+begin
+  result := TRODLOperationParam;
+end;
+
+function TRODLOperation.GetItems(Index: integer): TRODLOperationParam;
+begin
+  result := TRODLOperationParam(inherited Items[Index]);
+end;
+
+function TRODLOperation.GetResult: TRODLOperationParam;
+{var
+  i: integer;}
+begin
+  result := fOperationResult;
+  {result := nil;
+  for i := 0 to (Count - 1) do
+    if (Items[i].Info.Flag = fResult) then begin
+      result := Items[i];
+      Exit;
+    end;}
+end;
+
+{ Makes sure the Result patrameter is always at the top of the list, so it
+  doesn't get in the way of sorting methods. } 
+
+{procedure TRODLOperation.MoveResult;
+var
+  i: integer;
+begin
+  for i := 0 to (Count - 1) do
+    if (Items[i].Info.Flag = fResult) then begin
+      if i <> 0 then fItems.Move(i,0);
+      Exit;
+    end;
+end;}
+
+
+function TRODLOperation.GetCodeBody(iLanguage: string): TStrings;
+var
+  lIndex:integer;
+begin
+  result := nil;
+
+  lIndex := fCodeBodies.IndexOf(iLanguage);
+  if lIndex > -1 then result := fCodeBodies.Objects[lIndex] as TStrings
+end;
+
+procedure TRODLOperation.SetCodeBody(iLanguage: string; Value: TStrings);
+var
+  lStrings:TStrings;
+  lIndex:integer;
+begin
+  if Assigned(Value) then begin
+    lStrings := GetCodeBody(iLanguage);
+    if not Assigned(lStrings) then begin
+      lStrings := TStringList.Create();
+      fCodeBodies.AddObject(Lowercase(iLanguage),lStrings);
+    end;
+    lStrings.Assign(Value);
+  end
+  else begin
+    lIndex := fCodeBodies.IndexOf(iLanguage);
+    if lIndex > 0 then fCodeBodies.Delete(lIndex);
+  end;
+end;
+
+procedure TRODLOperation.SetCodeBodyAsString(iLanguage: string; const Value: string);
+var
+  lStrings:TStrings;
+  lIndex:integer;
+begin
+  if Value <> '' then begin
+    lStrings := GetCodeBody(iLanguage);
+    if not Assigned(lStrings) then begin
+      lStrings := TStringList.Create();
+      fCodeBodies.AddObject(Lowercase(iLanguage),lStrings);
+    end;
+    lStrings.Text := Value;
+  end
+  else begin
+    lIndex := fCodeBodies.IndexOf(iLanguage);
+    if lIndex > 0 then fCodeBodies.Delete(lIndex);
+  end;
+end;
+
+constructor TRODLOperation.Create;
+begin
+  inherited;
+  fCodeBodies := TStringList.Create();
+  fCodeBodies.Sorted := true;
+  fCodeBodies.Duplicates := dupError;
+end;
+
+destructor TRODLOperation.Destroy;
+var i:integer;
+begin
+  RemoveResult;
+  for i := 0 to fCodeBodies.Count-1 do fCodeBodies.Objects[i].Free();
+  FreeAndNil(fCodeBodies);
+  inherited;
+end;
+
+function TRODLOperation.GetCodeBodyCount: integer;
+begin
+  result := fCodeBodies.Count;
+end;
+
+function TRODLOperation.GetCodeBodyLanguages(iIndex: integer): string;
+begin
+  result := fCodeBodies[iIndex];
+end;
+
+{procedure TRODLOperation.Exchange(Index1, Index2: integer);
+begin
+  MoveResult();
+  if Assigned(GetResult()) then begin
+    inc(Index1);
+    inc(Index2);
+  end;
+  inherited Exchange(Index1, Index2);
+end;}
+
+function TRODLOperation.AddResult: TRODLOperationParam;
+begin
+  if not Assigned(fOperationResult) then begin
+    fOperationResult := TRODLOperationParam.Create;
+    fOperationResult.fOwner := self;
+    fOperationResult.Flag := fResult;
+    fOperationResult.Name := 'Result';
+  end;
+  result := fOperationResult;
+end;
+
+procedure TRODLOperation.RemoveResult;
+begin
+  if Assigned(fOperationResult) then
+    FreeAndNil(fOperationResult);
+end;
+
+function TRODLOperation.GetParameter(const aParameterName: string): TRODLOperationParam;
+begin
+  result := TRODLOperationParam(ItemByName(aParameterName));
+  if result=NIL then raise EROUnknownItem.CreateFmt('Cannot find parameter %s', [aParameterName]);
+end;
+
+procedure TRODLOperation.Validate(iMessages: IROPluginMessages);
+begin
+  inherited;
+  if (Result <> nil) and (Result.DataType <> '') then begin
+    if not Owner.OwnerLibrary.IsValidType(Result.DataType) then
+      iMessages.AddMessage(rmtError,Info.Name+'.'+Name,Format(err_RodlInvalidDataType,[Result.DataType]),-1,Self);
+  end;
+end;
+
+{ TRODLServiceInterface }
+
+function TRODLServiceInterface.Add(aParam: TRODLOperation): integer;
+begin
+  result := inherited Add(aParam)
+end;
+
+function TRODLServiceInterface.Add: TRODLOperation;
+begin
+  result := TRODLOperation(inherited Add);
+  result.Info.Name := 'Operation' + IntToStr(Count);
+  result.Info.UID := NewGUID;
+end;
+
+function TRODLServiceInterface.GetOperation(
+  const anOperationName: string;
+  IncludeAnchestors : boolean = FALSE) : TRODLOperation;
+begin
+  result := FindOperation(anOperationName, IncludeAnchestors);
+  if (result=NIL) then raise EROUnknownItem.CreateFmt('Cannot find operation %s', [anOperationName]);
+end;
+
+procedure TRODLServiceInterface.GetOperationsList(AList: TList);
+var svc : TRODLService;
+    i: Integer;
+    lib : TRODLLibrary;
+begin
+  AList.Clear;
+
+  For i:=0 to Count-1 do
+    AList.Add(Items[i]);
+
+  lib := info.Owner.OwnerLibrary;
+  svc := lib.FindService((Owner as TRODLService).Info.Name);
+
+  while TRUE do begin
+    if (svc.Ancestor='') then Break;
+
+    svc := lib.GetService(svc.Ancestor);
+
+    For i:=0 to svc.Count-1 do
+      AList.Add(svc.Default.Items[i]);
+  end;
+end;
+
+function TRODLServiceInterface.GetItemClass: TRODLEntityClass;
+begin
+  result := TRODLOperation;
+end;
+
+function TRODLServiceInterface.GetItems(Index: integer): TRODLOperation;
+begin
+  result := TRODLOperation(inherited Items[Index]);
+end;
+
+function TRODLServiceInterface.FindOperation(const anOperationName : string; IncludeAnchestors : boolean = FALSE) : TRODLOperation;
+var svc : TRODLService;
+    i: Integer;
+    lib : TRODLLibrary;
+begin
+  result := NIL;
+  for i := 0 to (Count-1) do
+    if SameText(anOperationName, Items[i].Info.Name) then begin
+      result := Items[i];
+      Exit;
+    end;
+
+  if (result=NIL) and IncludeAnchestors then begin
+    lib := info.Owner.OwnerLibrary;
+    //intf := TRODLServiceInterface;
+    svc := lib.FindService((Owner as TRODLService).Info.Name);
+
+    while TRUE do begin
+      if (svc.Ancestor='') then Break;
+
+      svc := lib.GetService(svc.Ancestor);
+      result := svc.Default.FindOperation(anOperationName);
+
+      if (result<>NIL) then Exit;
+    end;
+  end;
+end;
+
+function TRODLServiceInterface.CalcItems(aIncludeAncestors, aIgnoreDuplicates: boolean): IROStrings;
+var
+  lAncestor, lDescendant: TRODLBaseService;
+  i: integer;
+begin
+  result := NewROStrings();
+  if aIgnoreDuplicates then begin
+    result.Sorted := True;
+    result.Duplicates := dupIgnore;
+  end;
+
+  lAncestor := self.Owner as TRODLBaseService;
+  repeat
+    for i := lAncestor.Default.Count-1 downto 0 do
+      result.AddObject(lAncestor.Default.Items[i].Name, lAncestor.Default.Items[i]);
+
+    lDescendant := lAncestor;
+    if lAncestor.Ancestor <> '' then
+      lAncestor := OwnerLibrary.FindService(lAncestor.Ancestor)
+    else
+      lAncestor := nil;
+
+    if aIncludeAncestors and aIncludeAncestors and assigned(lAncestor) and lAncestor.IsDerivedFrom(lDescendant) then
+      RaiseError(err_RodlCircularReference, [lDescendant.Name, lAncestor.Name], EROCircularReference);
+
+  until (not Assigned(lAncestor)) or (not aIncludeAncestors);
+end;
+
+{ TRODLLibrary }
+
+function TRODLLibrary.Add(anEntity: TRODLEntity): integer;
+begin
+  if (anEntity is TRODLArray) then
+    Inc(fArrayCount)
+  else if (anEntity is TRODLEnum) then
+    Inc(fEnumCount)
+  else if (anEntity is TRODLStruct) then
+    Inc(fStructCount)
+  else if (anEntity is TRODLService) then
+    Inc(fServiceCount)
+  else if (anEntity is TRODLUse) then
+    Inc(fUseCount)
+  else if (anEntity is TRODLException) then
+    Inc(fExceptionCount)
+  else if (anEntity is TRODLEventSink) then
+    Inc(fEventSinkCount)
+  else if (anEntity is TRODLGroup) then
+    Inc(fGroupCount);
+
+  result := inherited Add(anEntity);
+end;
+
+function TRODLLibrary.GetItemClass: TRODLEntityClass;
+begin
+  result := TRODLEntity;
+end;
+
+procedure TRODLLibrary.Remove(anEntity: TRODLEntity);
+var
+  i: Integer;
+begin
+  if (anEntity is TRODLGroup) then begin
+    for i := 0 to Count-1 do
+      if Items[i].GroupUnder = anEntity then
+        Items[i].GroupUnder := anEntity.GroupUnder;
+  end
+  else if (anEntity is TRODLUse) then begin
+    for i := Count-1 downto 0 do
+      if Items[i].LocatedInRodlUse = anEntity then
+        Remove(Items[i]);
+  end;
+
+  if (anEntity is TRODLArray) then
+    Dec(fArrayCount)
+  else if (anEntity is TRODLEnum) then
+    Dec(fEnumCount)
+  else if (anEntity is TRODLStruct) then
+    Dec(fStructCount)
+  else if (anEntity is TRODLService) then
+    Dec(fServiceCount)
+  else if (anEntity is TRODLUse) then
+    Dec(fUseCount)
+  else if (anEntity is TRODLException) then
+    Dec(fExceptionCount)
+  else if (anEntity is TRODLEventSink) then
+    Dec(fEventSinkCount)
+  else if (anEntity is TRODLGroup) then
+    Dec(fGroupCount);
+
+  inherited;
+end;
+
+procedure TRODLLibrary.Delete(Index: integer);
+var
+  item: TRODLEntity;
+begin
+  item := Items[Index];
+  Remove(item);
+  inherited Delete(Index);
+end;
+
+function TRODLLibrary.GetArray(Index: integer): TRODLArray;
+begin
+  if (Index > ArrayCount - 1) then RaiseError(err_InvalidIndex, [Index]);
+  result := GetByType(Index,TRODLArray) as TRODLArray;
+end;
+
+function TRODLLibrary.GetEnums(Index: integer): TRODLEnum;
+begin
+  if (Index > EnumCount - 1) then RaiseError(err_InvalidIndex, [Index]);
+  result := GetByType(Index,TRODLEnum) as TRODLEnum;
+end;
+
+function TRODLLibrary.GetServices(Index: integer): TRODLService;
+begin
+  if (Index > ServiceCount - 1) then RaiseError(err_InvalidIndex, [Index]);
+  result := GetByType(Index,TRODLService) as TRODLService;
+end;
+
+function TRODLLibrary.GetStructs(Index: integer): TRODLStruct;
+begin
+  if (Index > StructCount - 1) then RaiseError(err_InvalidIndex, [Index]);
+  result := GetByType(Index,TRODLStruct) as TRODLStruct;
+end;
+
+function TRODLLibrary.GetExceptions(Index: integer): TRODLException;
+begin
+  if (Index > ExceptionCount - 1) then RaiseError(err_InvalidIndex, [Index]);
+  result := GetByType(Index,TRODLException) as TRODLException;
+end;
+
+function TRODLLibrary.GetUse(Index: integer): TRODLUse;
+begin
+  if (Index > UseCount - 1) then RaiseError(err_InvalidIndex, [Index]);
+  result := GetByType(Index,TRODLUse) as TRODLUse;
+end;
+
+function TRODLLibrary.GetGroups(Index: integer): TRODLGroup;
+begin
+  if (Index > GroupCount - 1) then RaiseError(err_InvalidIndex, [Index]);
+  result := GetByType(Index,TRODLGroup) as TRODLGroup;
+end;
+
+function TRODLLibrary.GetEventSinks(Index: integer): TRODLEventSink;
+begin
+  if (Index > EventSinkCount - 1) then RaiseError(err_InvalidIndex, [Index]);
+  result := GetByType(Index,TRODLEventSink) as TRODLEventSink;
+end;
+
+function TRODLLibrary.GetByType(aIndex:integer; aType:TRODLEntityClass):TRODLEntity;
+var
+  i, c: integer;
+begin
+  result := nil;
+  if (aIndex < 0) then RaiseError(err_InvalidIndex, [aIndex]);
+
+  c := -1;
+  for i := 0 to (Count - 1) do begin
+    if (Items[i] is aType) then Inc(c);
+    if (c = aIndex) then begin
+      result := Items[i];
+      Exit;
+    end;
+  end;
+end;
+
+
+constructor TRODLLibrary.Create;
+begin
+  inherited;
+  Info.Name := 'NewLibrary';
+  Info.UID := NewGUID;
+end;
+
+function TRODLLibrary.IsValidCustomType(const iTypeName: string): boolean;
+var
+  i:integer;
+begin
+  result := false;
+  for i := 0 to ArrayCount-1 do begin
+    if CompareText(Arrays[i].Info.Name,iTypeName) = 0 then begin
+      result := true;
+      exit;
+    end;
+  end;
+  for i := 0 to StructCount-1 do begin
+    if CompareText(Structs[i].Info.Name,iTypeName) = 0 then begin
+      result := true;
+      exit;
+    end;
+  end;
+  for i := 0 to EnumCount-1 do begin
+    if CompareText(Enums[i].Info.Name,iTypeName) = 0 then begin
+      result := true;
+      exit;
+    end;
+  end;
+end;
+
+function TRODLLibrary.IsValidSimpleType(const iTypeName: string): boolean;
+var
+  d:TRODataType;
+  i: Integer;
+begin
+  result := false;
+  for d := Low(TRODataType) to High(TRODataType) do begin
+    if (not (d in [rtUserDefined])) and
+       (CompareText(DataTypeNames[d],iTypeName) = 0) then begin
+      result := true;
+      exit;
+    end;
+  end;
+  for i := Low(DataTypeRemapping) to High(DataTypeRemapping) do begin
+    if CompareText(DataTypeRemapping[i].Name, iTypeName) = 0 then begin
+      result := true;
+      exit;
+    end;
+  end;
+end;
+
+
+function TRODLLibrary.IsValidType(const iTypeName: string): boolean;
+begin
+  result := IsValidCustomType(iTypeName) or IsValidSimpleType(iTypeName);
+end;
+
+function TRODLLibrary.FindStruct(const iStructName: string): TRODLStruct;
+var
+  i:integer;
+begin
+  result := nil;
+  for i := 0 to StructCount-1 do begin
+    if CompareText(Structs[i].Info.Name,iStructName) = 0 then begin
+      result := Structs[i];
+      exit;
+    end;
+  end;
+end;
+
+function TRODLLibrary.FindBaseStruct(const iStructName: string): TRODLBaseStruct;
+var
+  i:integer;
+begin
+  result := nil;
+  for i := 0 to Count-1 do begin
+    if (Items[i] is TRODLBaseStruct) and (CompareText(Items[i].Info.Name,iStructName) = 0) then begin
+      result := Items[i] as TRODLBaseStruct;
+      exit;
+    end;
+  end;
+end;
+
+
+function TRODLLibrary.FindEnum(const iEnumName: string): TRODLEnum;
+var
+  i:integer;
+begin
+  result := nil;
+  for i := 0 to EnumCount-1 do begin
+    if CompareText(Enums[i].Info.Name,iEnumName) = 0 then begin
+      result := Enums[i];
+      exit;
+    end;
+  end;
+end;
+
+function TRODLLibrary.FindArray(const iArrayName: string): TRODLArray;
+var
+  i:integer;
+begin
+  result := nil;
+  for i := 0 to ArrayCount-1 do begin
+    if CompareText(Arrays[i].Info.Name,iArrayName) = 0 then begin
+      result := Arrays[i];
+      exit;
+    end;
+  end;
+end;
+
+function TRODLLibrary.FindGroup(const aID: TGUID): TRODLGroup;
+var
+  i:integer;
+begin
+  result := nil;
+  for i := 0 to GroupCount-1 do begin
+    if IsEqualGUID(Groups[i].UID,aID) then begin
+      result := Groups[i];
+      exit;
+    end;
+  end;
+end;
+
+
+function TRODLLibrary.IsValidService(const iServiceName: string): boolean;
+var
+  i:integer;
+begin
+  result := false;
+  for i := 0 to ServiceCount-1 do begin
+    if CompareText(Services[i].Info.Name,iServiceName) = 0 then begin
+      result := true;
+      exit;
+    end;
+  end;
+end;
+
+
+function TRODLLibrary.FindBaseService(const iServiceName: string): TRODLBaseService;
+var
+  i:integer;
+begin
+  result := nil;
+  for i := 0 to Count-1 do begin
+    if (Items[i] is TRODLBaseService) and (CompareText(Items[i].Info.Name,iServiceName) = 0) then begin
+      result := Items[i] as TRODLBaseService;
+      exit;
+    end;
+  end;
+end;
+
+function TRODLLibrary.FindService(const iServiceName: string):TRODLService;
+var
+  i:integer;
+begin
+  result := nil;
+  for i := 0 to ServiceCount-1 do begin
+    if CompareText(Services[i].Info.Name,iServiceName) = 0 then begin
+      result := Services[i];
+      exit;
+    end;
+  end;
+end;
+
+function TRODLLibrary.FindException(const iExceptionName: string):TRODLException;
+var
+  i:integer;
+begin
+  result := nil;
+  for i := 0 to ExceptionCount-1 do begin
+    if CompareText(Exceptions[i].Info.Name,iExceptionName) = 0 then begin
+      result := Exceptions[i];
+      exit;
+    end;
+  end;
+end;
+
+function TRODLLibrary.FindUse(const iUseName: string):TRODLUse;
+var
+  i:integer;
+begin
+  result := nil;
+  for i := 0 to fUseCount-1 do begin
+    if CompareText(Use[i].Info.Name,iUseName) = 0 then begin
+      result := Use[i];
+      exit;
+    end;
+  end;
+end;
+
+function TRODLLibrary.FindUseByFilename(const iUseRODLFile: string):TRODLUse;
+var
+  i:integer;
+begin
+  result := nil;
+  for i := 0 to fUseCount-1 do begin
+    if CompareText(Use[i].RodlFile, iUseRODLFile) = 0 then begin
+      result := Use[i];
+      exit;
+    end;
+  end;
+end;
+
+function TRODLLibrary.IsValidException(const iTypeName:string):boolean;
+var
+  i:integer;
+begin
+  result := false;
+  for i := 0 to ExceptionCount-1 do begin
+    if CompareText(Exceptions[i].Info.Name,iTypeName) = 0 then begin
+      result := true;
+      exit;
+    end;
+  end;
+end;
+
+function TRODLLibrary.CalcServiceOrder: IROStrings;
+var
+  lEntities:IROStrings;
+  i:integer;
+begin
+  lEntities := NewROStrings();
+  for i := ServiceCount-1 downto 0 do begin
+    if not Services[i].IsFromUsedRodl then
+      lEntities.AddObject(Services[i].Info.Name,Services[i])
+  end;
+  result := CalcOrder(lEntities);
+end;
+
+function TRODLLibrary.CalcEventSinkOrder: IROStrings;
+var
+  lEntities:IROStrings;
+  i:integer;
+begin
+  lEntities := NewROStrings();
+  for i := EventSinkCount-1 downto 0 do begin
+    if not EventSinks[i].IsFromUsedRodl then
+      lEntities.AddObject(EventSinks[i].Info.Name,EventSinks[i])
+  end;
+  result := CalcOrder(lEntities);
+end;
+
+function TRODLLibrary.CalcStructOrder: IROStrings;
+var
+  lEntities:IROStrings;
+  i:integer;
+begin
+  lEntities := NewROStrings();
+  for i := StructCount-1 downto 0 do begin
+    if not Structs[i].IsFromUsedRodl then
+      lEntities.AddObject(Structs[i].Info.Name,Structs[i])
+  end;
+  result := CalcOrder(lEntities);
+end;
+
+function TRODLLibrary.CalcExceptionOrder: IROStrings;
+var
+  lEntities:IROStrings;
+  i:integer;
+begin
+  lEntities := NewROStrings();
+  for i := ExceptionCount-1 downto 0 do begin
+    if not Exceptions[i].IsFromUsedRodl then
+      lEntities.AddObject(Exceptions[i].Info.Name,Exceptions[i])
+  end;
+  result := CalcOrder(lEntities);
+end;
+
+function TRODLLibrary.CalcOrder(const iObjects:IROStrings):IROStrings;
+var
+  lAncestors:IROStrings;
+  i,lIndex:integer;
+  lEntity:TRODLEntity;
+  lWorked:boolean;
+begin
+  lAncestors := NewROStrings();
+  result := NewROStrings();
+
+  for i := 0 to iObjects.Count-1 do begin
+    lEntity := iObjects.Objects[i] as TRODLEntity;
+    lAncestors.AddObject((lEntity as IRODLEntityWithAncestor).Ancestor,lEntity)
+  end;
+
+  for i := lAncestors.Count-1 downto 0 do begin
+    if lAncestors[i] <> '' then lIndex := iObjects.IndexOf(lAncestors[i]) else lIndex := -1; { else needed to keep the warning away only }
+    if (lAncestors[i] = '') or (lIndex = -1) then begin
+      result.AddObject((lAncestors.Objects[i] as TRODLEntity).Info.Name,lAncestors.Objects[i]);
+      lAncestors.Delete(i);
+    end;
+  end;
+
+  while lAncestors.Count > 0 do begin
+    lWorked := false;
+    for i := lAncestors.Count-1 downto 0 do begin
+      lIndex := result.IndexOf(lAncestors[i]);
+      if (lIndex > -1) then begin
+        result.InsertObject(lIndex+1,(lAncestors.Objects[i] as TRODLEntity).Info.Name,lAncestors.Objects[i]);
+        lAncestors.Delete(i);
+        lWorked := true;
+      end;
+    end;
+    if (not lWorked) and (lAncestors.Count > 0) then
+      RaiseError('Invalid or recursive inheritance for the following entities: '+lAncestors.Text);
+  end;
+end;
+
+function TRODLLibrary.GetService(const aServiceName: string): TRODLService;
+begin
+  result := FindService(aServiceName);
+  if result=NIL then raise EROUnknownItem.CreateFmt('Cannot find service %s', [aServiceName])
+end;
+
+function TRODLLibrary.GetStruct(const aStructName: string): TRODLStruct;
+begin
+  result := FindStruct(aStructName);
+  if result=NIL then raise EROUnknownItem.CreateFmt('Cannot find struct %s', [aStructName])
+end;
+
+procedure TRODLLibrary.ClearDuplicates;
+var
+  lID: string;
+  lItem: TRODLEntity;
+  lIDs: TStringList;
+  i: Integer;
+const
+  EMPTY_GUID = '{00000000-0000-0000-0000-000000000000}';  
+begin
+  lIDs := TStringList.Create();
+  try
+    lIDs.Duplicates := dupError;
+    lIDs.Sorted := true;
+    for i := Count-1 downto 0 do begin
+      lItem := Items[i];
+      
+      if (lItem is TRODLUse) then continue; { removing duplicate uses would blow up the order; and they do no harm anyway }
+      lID := GUIDToString(lItem.UID);
+      if SameText(lID, EMPTY_GUID) then continue;
+
+      if (lIDs.IndexOf(lID) > -1) and (not SameText(lID, EMPTY_GUID)) then begin
+        {$IFDEF DEBUG_REMOBJECTS_RODL}
+        DebugServer.Write('Removing duplicate %s %s (%s)',[lItem.ReadableEntityTypeName, lItem.Name, lID]);
+        {$ENDIF}
+        Remove(lItem);
+      end
+      else begin
+        lIDs.Add(lID);
+      end;
+    end; { for }
+  finally
+    lIDs.Free();
+  end;
+end;
+
+procedure TRODLLibrary.GetArraysByElement(const aElementName: string;
+  AList: TList);
+var
+  i: integer;
+begin
+  AList.Clear;
+  for i := 0 to ArrayCount-1 do
+    if CompareText(Arrays[i].ElementType,aElementName) = 0 then
+      AList.Add(Arrays[i]);
+end;
+
+function TRODLLibrary.IsValidEventSink(
+  const iEventSink: string): boolean;
+var
+  i: integer;
+begin
+  result := false;
+
+  for i := 0 to EventSinkCount-1 do begin
+    if CompareText(EventSinks[i].Info.Name,iEventsink) = 0 then begin
+      result := true;
+      exit;
+    end;
+  end;
+end;
+
+{ TRODLArray }
+
+procedure TRODLArray.SetElementType(const Value: string);
+begin
+  fElementType := Trim(Value);
+end;
+
+procedure TRODLArray.Validate(iMessages:IRoPluginMessages); 
+//function TRODLArray.Validate(out FaultyEntity: TRODLEntity; out ErrorMessage: string): boolean;
+begin
+  inherited;
+  if (ElementType = '') then
+    iMessages.AddMessage(rmtError,Info.Name,err_RodlNoDataTypeSpecified,-1,self);
+
+  if (ElementType <> '') and not OwnerLibrary.IsValidType(ElementType) then
+    iMessages.AddMessage(rmtError,Info.Name,Format(err_RodlInvalidDataType,[ElementType]),-1,Owner);
+end;
+
+{ TRODLConverter }
+
+constructor TRODLConverter.Create(const aLibraryFile: string; const aTargetEntity: string = '');
+var
+  lLibrary: TRODLLibrary;
+begin
+  with TXMLToRODL.Create(nil) do try
+    lLibrary := ReadFromFile(aLibraryFile);
+    try
+      Self.Create(lLibrary, aTargetEntity);
+    finally
+      FreeAndNil(lLibrary);
+    end;
+  finally
+    Free;
+  end;
+end;
+
+constructor TRODLConverter.Create(const aLibrary: TRODLLibrary; const aTargetEntity: string = '');
+begin
+  inherited Create;
+
+  fBuffer := TStringList.Create;
+  if (aLibrary <> nil) then Convert(aLibrary, aTargetEntity);
+end;
+
+destructor TRODLConverter.Destroy;
+begin
+  fBuffer.Free;
+  inherited;
+end;
+
+procedure TRODLConverter.Convert(const aLibrary: TRODLLibrary; const aTargetEntity: string = '');
+begin
+  if (aLibrary = nil) then
+    RaiseError(err_InvalidLibrary, [])
+  else if (aTargetEntity<>'') and not ValidateTargetEntity(aLibrary, aTargetEntity) then
+    RaiseError(err_InvalidTargetEntity, [aTargetEntity]);
+
+  fTargetEntity := aTargetEntity;
+
+  fBuffer.Clear;
+  IntConvert(aLibrary, aTargetEntity);
+end;
+
+function TRODLConverter.GetBuffer: TStrings;
+begin
+  result := fBuffer as TStrings;
+end;
+
+function TRODLConverter.ValidateTargetEntity(const aLibrary: TRODLLibrary; const aTargetEntity: string): boolean;
+begin
+  result := aLibrary.FindService(aTargetEntity)<>NIL;
+end;
+
+procedure TRODLConverter.Write(const someText: string; Indentation: integer = 0);
+var
+  i: integer;
+  s: string;
+begin
+  s := '';
+
+  for i := 1 to Indentation do
+    s := s + ' ';
+  s := s + someText;
+
+  fBuffer.Add(s)
+end;
+
+procedure TRODLConverter.WriteLines(const someText: string);
+begin
+  fBuffer.Text := fBuffer.Text + someText;
+end;
+
+procedure TRODLConverter.WriteEmptyLine;
+begin
+  fBuffer.Add('');
+end;
+
+class function TRODLConverter.GetTargetFileName(const aLibrary: TRODLLibrary;
+  const aTargetEntity: string): string;
+begin
+{$IFDEF FPC}
+  if (aLibrary <> nil) or (aTargetEntity <> '') then result := '' else // preventing warnings in FPC
+{$ENDIF}
+  result := '';
+end;
+
+{ TRODLReader }
+
+constructor TRODLReader.Create;
+begin
+end;
+
+function TRODLReader.Read(aStream: TStream; const aFilename:string): TRODLLibrary;
+begin
+  if (aStream = nil) then RaiseError(err_InvalidStream, []);
+  result := IntReadFromStream(aStream, aFilename)
+end;
+
+function TRODLReader.ReadFromFile(const aFileName: string): TRODLLibrary;
+var
+  fs: TFileStream;
+begin
+  fs := TFileStream.Create(aFileName, fmOpenRead);
+  try
+    result := Read(fs, aFilename)
+  finally
+    fs.Free;
+  end;
+end;
+
+{ TRODLException }
+
+procedure TRODLException.Validate(iMessages: IRoPluginMessages);
+begin
+  inherited;
+
+  if (Ancestor <> '') and not OwnerLibrary.IsValidException(Ancestor) then
+    iMessages.AddMessage(rmtError,Info.Name,Format(err_RodlInvalidAncestorType,[Ancestor]),-1,self);
+end;
+
+{ TRODLUse }
+
+procedure TRODLUse.Validate(iMessages: IRoPluginMessages);
+begin
+  inherited;
+
+  if not (FileExists(ExpandVariables(fRodlFile)) or FileExists(fAbsoluteRodlFile)) then
+   iMessages.AddMessage(rmtWarning,ExtractFileName(fRodlFile),Format(err_RodlUsedFileDoesNotExist,[ExpandVariables(fRodlFile)]),-1,self);
+
+
+end;
+
+{ TXMLToRODL }
+
+constructor TXMLToRODL.Create(iAddToExisting: TRODLLibrary; iRecreateGuids:boolean=false);
+begin
+  Create();
+  fAddToExistingLibrary := iAddToExisting;
+  fRecreateGuids := iRecreateGuids;
+end;
+
+function TXMLToRODL.IntReadFromStream(aStream: TStream; aFilename:string): TRODLLibrary;
+begin
+  if Assigned(fAddToExistingLibrary) then begin
+    result := fAddToExistingLibrary;
+    LoadStreamToLibrary(aStream, result, aFilename, nil, false); // Don't set RODL Attributes
+  end
+  else begin
+    result := TRODLLibrary.Create();
+    result.RodlFilename := aFilename;
+    LoadStreamToLibrary(aStream, result, aFilename);
+  end;
+end;
+
+procedure TXMLToRODL.LoadFileToLibrary(iFilename: string; iLibrary: TRODLLibrary; iRodlUse:TRODLUse=nil);
+var
+  lStream: TStream;
+begin
+  //ToDo: resolve relative filenames; handle http filenames, etc.
+
+  lStream := TFileStream.Create(iFilename, fmOpenRead);
+  try
+    LoadStreamToLibrary(lStream, iLibrary, iFilename, iRodlUse);
+  finally
+    lStream.Free();
+  end;
+end;
+
+function GetNodeAttribute(aNode: IXMLNode; const anAttributeName: string): string;
+var
+  lAtrributeNode: IXMLNode;
+begin
+  Result := '';
+  if Assigned(aNode) then begin
+    lAtrributeNode := aNode.GetAttributeByName(anAttributeName);
+    if Assigned(lAtrributeNode) then result := lAtrributeNode.Value;
+  end else
+    if CompareText(anAttributeName, 'UID') = 0 then result := GUIDToString(EmptyGUID);
+end;
+
+function ExpandFileNameByBase(const iBase, iFilename:string):string; overload;
+var
+  lCurrentDir:string;
+begin
+  lCurrentDir := GetCurrentDir();
+  SetCurrentDir(iBase);
+  try
+    result := ExpandFileName(iFilename);
+  finally
+    SetCurrentDir(lCurrentDir);
+  end;
+end;
+
+function FixLegacyTypes(aType: string): string;
+begin
+  if LowerCase(aType) = 'string' then result := 'AnsiString'
+  else result := aType;
+end;
+
+function XMLFlagNameToFlag(const aName: string): TRODLParamFlag;
+var
+  f: TRODLParamFlag;
+begin
+  result := fIn;
+
+  for f := Low(TRODLParamFlag) to High(TRODLParamFlag) do
+    if (CompareText(XMLFlagNames[f], aName) = 0) then begin
+      result := f;
+      Exit;
+    end;
+
+  RaiseError(err_InvalidParamFlag, [aName]);
+end;
+
+procedure TXMLToRODL.LoadStreamToLibrary(aStream: TStream; iLibrary: TRODLLibrary; iRodlName: string = ''; iRodlUse: TRODLUse=nil; iReplaceLibraryAttributes:boolean=true);
+var
+  fGroupGuidList: TStringList;
+
+  procedure ReadAttributes(anXMLNode: IXMLNode; aEntity: TRODLEntity);
+  var
+    lGroupID: string;
+    i, k: integer;
+    lName, lValue: string;
+    lNode,lChildNode:IXMLNode;
+  begin
+    if (anXMLNode = nil) then Exit;
+
+    { read legacy v2.0 documentation attribues }
+    if (anXMLNode.GetAttributeByName('Documentation') <> nil) then begin
+      aEntity.Documentation := anXMLNode.GetAttributeByName('Documentation').Value;
+    end;
+
+    lValue := '';
+    for i := 0 to (anXMLNode.ChildrenCount-1) do begin
+
+      lNode :=anXMLNode.Children[i];
+      if (lNode.Name = 'CustomAttributes') then begin
+
+        for k := 0 to (lNode.ChildrenCount-1) do begin
+          lChildNode := lNode.Children[k];
+          lName := lChildNode.Name;
+
+          if (lName = '#text') then Continue;
+          if (lChildNode.GetAttributeByName('Value') <> nil) then begin
+            lValue := lChildNode.GetAttributeByName('Value').Value;
+          end
+          else begin
+            lValue := '';
+          end;
+
+          aEntity.Attributes.Values[lName] := lValue;
+        end;
+
+        Exit;
+      end
+      else if lNode.Name = 'Documentation' then begin
+        aEntity.Documentation := lNode.Value
+      end
+      else if lNode.Name = 'Group' then begin
+        lGroupID := lNode.GetAttributeValue('Under','');
+        if lGroupID <> '' then begin
+          aEntity.GroupUnder := iLibrary.FindGroup(StringToGUID(lGroupID));
+          if aEntity.GroupUnder = nil then begin
+            lGroupID := fGroupGuidList.Values[lGroupId];
+            if lGroupID <> '' then
+              aEntity.GroupUnder := iLibrary.FindGroup(StringToGUID(lGroupID));
+
+          end;
+        end;
+      end;
+
+    end;
+  end;
+
+  function RODLFileIsUsed(aRODL: string): boolean;
+  var
+    i: integer;
+  begin
+    Result:=False;
+    if ARodl <> '' then
+      if FileExists(ARodl) then
+        For i := 0 to iLibrary.UseCount -1 do begin
+          if SameText(ExpandVariables(iLibrary.Use[i].RodlFile),aRODL) or SameText(iLibrary.Use[i].AbsoluteRodlFile, aRODL) then begin
+            Result:=True;
+            Break;
+          end;
+      end;
+  end;
+
+var
+  lFlag: TRODLParamFlag;
+  //domimpl: TDomImplementation;
+  //parser: TXmlToDomParser;
+  xmldoc: IXMLDocument;
+  list,
+    sublist,
+    subsublist,
+    lastlist: IXMLNodeList;
+  i, k, m, p: Integer;
+
+  lParentNode:IXMLNode;
+
+  struct: TRODLStruct;
+  stelem: TRODLTypedEntity;
+  arr: TRODLArray;
+  lUse: TRODLUse;
+  lEventSink: TRODLEventSink;
+  lFilename:string;
+  lException: TRODLException;
+  lGroup: TRODLGroup;
+  svc: TRODLService;
+  enum: TRODLEnum;
+  eval: TRODLEnumValue;
+  intf: TRODLServiceInterface;
+  op: TRODLOperation;
+  par: TRODLOperationParam;
+
+begin
+  fGroupGuidList:= TStringList.Create;
+  try
+    xmldoc := NewROXmlDocument();
+    aStream.Position := 0;
+    xmldoc.New();
+    xmldoc.LoadFromStream(aStream);
+
+    if not Assigned(iRodlUse) then begin
+      // Library
+      if Assigned(xmldoc.DocumentNode) then begin
+        if iReplaceLibraryAttributes then begin
+          iLibrary.Name := GetNodeAttribute(xmldoc.DocumentNode, 'Name');
+          iLibrary.Namespace := GetNodeAttribute(xmldoc.DocumentNode, 'Namespace');
+          iLibrary.UID := RecreateGuidIfNeeded(StringToGUID(GetNodeAttribute(xmldoc.DocumentNode, 'UID')));
+          //iLibrary.Documentation := GetNodeAttribute(xmldoc.DocumentNode, 'Documentation');
+
+          ReadAttributes(xmldoc.DocumentNode, iLibrary);
+        end;
+      end;
+    end else
+    begin
+      iRodlUse.LoadedRodlLibraryName := GetNodeAttribute(xmldoc.DocumentNode, 'Name');
+      //
+    end;
+
+    // Groups
+    lParentNode := xmldoc.DocumentNode.GetNodeByName('Groups');
+    if Assigned(lParentNode) then begin
+      list := lParentNode.GetNodesByName('Group');
+      if Assigned(list) then
+      begin
+        for i := 0 to (list.Count-1) do begin
+          lGroup := TRODLGroup.Create;
+          lGroup.IsFromUsedRodl := iRodlUse <> nil;
+          lGroup.LocatedInRodlUse := iRodlUse;
+          lGroup.Name := GetNodeAttribute(list.Nodes[i], 'Name');
+          //lGroup.Documentation := GetNodeAttribute(list.Nodes[i], 'Documentation');
+          lGroup.UID := RecreateGuidIfNeeded(StringToGUID(GetNodeAttribute(list.Nodes[i], 'UID')));
+          fGroupGuidList.Add(GetNodeAttribute(list.Nodes[i], 'UID')+'='+GUIDToString(lGroup.Uid));
+
+          iLibrary.Add(lGroup);
+        end;
+        for i := 0 to List.count -1 do begin
+          lGroup := iLibrary.Groups[iLibrary.GroupCount - List.count + i];
+          ReadAttributes(list.Nodes[i], lGroup);
+        end;
+      end;
+    end; // Groups
+
+    // Uses
+    lParentNode := xmldoc.DocumentNode.GetNodeByName('Uses');
+    if Assigned(lParentNode) then begin
+      list := lParentNode.GetNodesByName('Use');
+      if Assigned(list) then begin
+        for i := 0 to (list.Count-1) do begin
+          if RODLFileIsUsed(GetNodeAttribute(list.Nodes[i], 'AbsoluteRodl')) then Continue;
+          if RODLFileIsUsed(ExpandVariables(GetNodeAttribute(list.Nodes[i], 'Rodl'))) then Continue;
+          lUse := TRODLUse.Create;
+          lUse.Name := GetNodeAttribute(list.Nodes[i], 'Name');
+          //lUse.Documentation := GetNodeAttribute(list.Nodes[i], 'Documentation');
+          lUse.UID := RecreateGuidIfNeeded(StringToGUID(GetNodeAttribute(list.Nodes[i], 'UID')));
+          lUse.RodlFile := GetNodeAttribute(list.Nodes[i], 'Rodl');
+          lUse.AbsoluteRodlFile := GetNodeAttribute(list.Nodes[i], 'AbsoluteRodl');
+          lUse.GenerateCode := GetNodeAttribute(list.Nodes[i], 'GenerateCode') = '1';
+          lUse.SplitMode := TRODLUseSplitMode(StrToIntDef(GetNodeAttribute(list.Nodes[i], 'SplitMode'), Integer(usmAsParent)));
+
+          ReadAttributes(list.Nodes[i], lUse);
+
+          lUse.IsFromUsedRodl := Assigned(iRodlUse);
+          lUse.LocatedInRodlUse := iRodlUse;
+
+          iLibrary.Add(lUse);
+
+          try
+            with self.ClassType.Create do try
+              {$IFDEF DEBUG_REMOBJECTS_RODLTOXML}
+              DebugServer.Write('Used RODL "%s"',[lUse.RodlFile]);
+              {$ENDIF}
+
+              lFilename := ExpandVariables(lUse.RodlFile);
+              if iRodlName <> '' then begin
+                if lUse.LocatedInRodlUse <> nil then
+                  lFilename := ExpandFileNameByBase(ExtractFilePath(lUse.LocatedInRodlUse.AbsoluteRodlFile),lFilename)
+                else
+                  lFilename := ExpandFileNameByBase(ExtractFilePath(iRodlName),lFilename);
+                if FileExists(lFilename) then
+                  lUse.AbsoluteRodlFile := lFilename;
+              end;
+              if (not FileExists(lFilename)) and (lUse.AbsoluteRodlFile <> '') then begin
+                lFilename := lUse.AbsoluteRodlFile;
+                if FileExists(lFilename) then
+                  lUse.RodlFile := lFilename;
+              end;
+
+              {$IFDEF DEBUG_REMOBJECTS_RODLTOXML}
+              DebugServer.Write('Loading "%s"',[lFilename]);
+              {$ENDIF}
+
+              LoadFileToLibrary(lFilename, iLibrary, lUse);
+            finally
+              Free();
+            end;                          { with }
+          except
+            { ignore if an included RODL cannot be found, for most cases it wont be needed to do the CodeGen }
+          end;
+
+        end;
+      end;
+    end; // Uses
+
+    // Services
+    lParentNode := xmldoc.DocumentNode.GetNodeByName('Services');
+    if Assigned(lParentNode) then begin
+      list := lParentNode.GetNodesByName('Service');
+      if Assigned(list) then begin
+        for i := 0 to (list.Count-1) do begin
+          svc := TRODLService.Create;
+          svc.Name := GetNodeAttribute(list.Nodes[i], 'Name');
+          //svc.Documentation := GetNodeAttribute(list.Nodes[i], 'Documentation');
+          svc.Ancestor := GetNodeAttribute(list.Nodes[i], 'Ancestor');
+
+          svc.ImplUnit := GetNodeAttribute(list.Nodes[i], 'ImplUnit');
+          svc.ImplClass := GetNodeAttribute(list.Nodes[i], 'ImplClass');
+          svc.Abstract := GetNodeAttribute(list.Nodes[i], 'Abstract') = '1';
+          svc.isPrivate := GetNodeAttribute(list.Nodes[i], 'Private') = '1';
+          svc.UID := RecreateGuidIfNeeded(StringToGUID(GetNodeAttribute(list.Nodes[i], 'UID')));
+
+          ReadAttributes(list.Nodes[i], svc);
+
+          // Default interface
+          // TODO: Implement multiple interfaces in the future. Not needed now
+          lParentNode := list.Nodes[i].GetNodeByName('Interfaces');
+          if Assigned(lParentNode) then begin
+            sublist := lParentNode.GetNodesByName('Interface');
+            if Assigned(sublist) and (sublist.Count > 0) then begin
+              //later: for k := 0 to (sublist.Length-1) do begin
+              k := 0;
+
+              intf := svc.Default;
+              intf.Name := GetNodeAttribute(sublist.Nodes[k], 'Name');
+              intf.UID := RecreateGuidIfNeeded(StringToGUID(GetNodeAttribute(sublist.Nodes[k], 'UID'))); // Fixed thanks to a compiler warning! Was using m as index
+              //intf.Documentation := GetNodeAttribute(sublist.Nodes[k], 'Documentation');
+
+              ReadAttributes(sublist.Nodes[k], intf);
+
+              // Operations
+              lParentNode := sublist.Nodes[k].GetNodeByName('Operations');
+              if Assigned(lParentNode) then begin
+                subsublist := lParentNode.GetNodesByName('Operation');
+                if Assigned(subsublist) then begin
+                  for m := 0 to (subsublist.Count-1) do begin
+                    op := intf.Add;
+                    op.Name := GetNodeAttribute(subsublist.Nodes[m], 'Name');
+                    //op.Documentation := GetNodeAttribute(subsublist.Nodes[m], 'Documentation');
+                    op.UID := RecreateGuidIfNeeded(StringToGUID(GetNodeAttribute(subsublist.Nodes[m], 'UID')));
+                    op.ForceAsyncResponse := GetNodeAttribute(subsublist.Nodes[m], 'ForceAsyncResponse') = '1';
+
+                    ReadAttributes(subsublist.Nodes[m], op);
+
+                    // Parameters
+                    lParentNode := subsublist.Nodes[m].GetNodeByName('Parameters');
+                    if Assigned(lParentNode) then begin
+                      lastlist := lParentNode.GetNodesByName('Parameter');
+                      if Assigned(lastlist) then begin
+                        for p := 0 to (lastlist.Count-1) do begin
+                          lFlag := XMLFlagNameToFlag(GetNodeAttribute(lastlist.Nodes[p], 'Flag'));
+                          case lFlag of
+                            fResult:par := op.AddResult();
+                            else par := op.Add();
+                          end;    { case }
+                          par.Name := GetNodeAttribute(lastlist.Nodes[p], 'Name');
+                          //par.Documentation := GetNodeAttribute(lastlist.Nodes[p], 'Documentation');
+                          par.Flag := lFlag;
+                          par.DataType := FixLegacyTypes(GetNodeAttribute(lastlist.Nodes[p], 'DataType'));
+                          ReadAttributes(lastlist.Nodes[p], par);
+                        end;
+                      end;
+                    end; // Service|Interface|Operation|Parameters
+
+                    // Code Bodies
+                    lParentNode := subsublist.Nodes[m].GetNodeByName('Code');
+                    if Assigned(lParentNode) then begin
+                      lastlist := lParentNode.GetNodesByName('Code');
+                      if Assigned(lastlist) then begin
+                        for p := 0 to (lastlist.Count-1) do begin
+                          op.SetCodeBodyAsString(GetNodeAttribute(lastlist.Nodes[p], 'Language'),lastlist.Nodes[p].Value);
+                        end;
+                      end;
+                    end; // Service|Interface|Operation|Parameters
+
+                    {op.MoveResult();}
+                  end;
+                end;
+              end; // Service|Interface|Operations
+            end;
+          end; // Service|Interfaces
+
+          svc.IsFromUsedRodl := Assigned(iRodlUse);
+          svc.LocatedInRodlUse := iRodlUse;
+
+          iLibrary.Add(svc);
+        end;
+      end;
+    end; // Services
+
+    // EventSinks
+    lParentNode := xmldoc.DocumentNode.GetNodeByName('EventSinks');
+    if Assigned(lParentNode) then begin
+      list := lParentNode.GetNodesByName('EventSink');
+      if Assigned(list) then begin
+        for i := 0 to (list.Count-1) do begin
+          lEventSink := TRODLEventSink.Create;
+          lEventSink.Name := GetNodeAttribute(list.Nodes[i], 'Name');
+          //lEventSink.Documentation := GetNodeAttribute(list.Nodes[i], 'Documentation');
+          lEventSink.Ancestor := GetNodeAttribute(list.Nodes[i], 'Ancestor');
+
+          lEventSink.ImplUnit := GetNodeAttribute(list.Nodes[i], 'ImplUnit');
+          lEventSink.ImplClass := GetNodeAttribute(list.Nodes[i], 'ImplClass');
+          lEventSink.Abstract := GetNodeAttribute(list.Nodes[i], 'Abstract') = '1';
+          lEventSink.UID := RecreateGuidIfNeeded(StringToGUID(GetNodeAttribute(list.Nodes[i], 'UID')));
+
+          ReadAttributes(list.Nodes[i], lEventSink);
+
+          // Default interface
+          // TODO: Implement multiple interfaces in the future. Not needed now
+          lParentNode := list.Nodes[i].GetNodeByName('Interfaces');
+          if Assigned(lParentNode) then begin
+            sublist := lParentNode.GetNodesByName('Interface');
+            if Assigned(sublist) and (sublist.Count > 0) then begin
+              //later: for k := 0 to (sublist.Length-1) do begin
+              k := 0;
+
+              intf := lEventSink.Default;
+              intf.Name := GetNodeAttribute(sublist.Nodes[k], 'Name');
+              intf.UID := RecreateGuidIfNeeded(StringToGUID(GetNodeAttribute(sublist.Nodes[k], 'UID'))); // Fixed thanks to a compiler warning! Was using m as index
+              //intf.Documentation := GetNodeAttribute(sublist.Nodes[k], 'Documentation');
+
+              ReadAttributes(sublist.Nodes[k], intf);
+
+              // Operations
+              lParentNode := sublist.Nodes[k].GetNodeByName('Operations');
+              if Assigned(lParentNode) then begin
+                subsublist := lParentNode.GetNodesByName('Operation');
+                if Assigned(subsublist) then begin
+                  for m := 0 to (subsublist.Count-1) do begin
+                    op := intf.Add;
+                    op.Name := GetNodeAttribute(subsublist.Nodes[m], 'Name');
+                    //op.Documentation := GetNodeAttribute(subsublist.Nodes[m], 'Documentation');
+                    op.UID := RecreateGuidIfNeeded(StringToGUID(GetNodeAttribute(subsublist.Nodes[m], 'UID')));
+
+                    ReadAttributes(subsublist.Nodes[m], op);
+
+                    // Parameters
+                    lParentNode := subsublist.Nodes[m].GetNodeByName('Parameters');
+                    if Assigned(lParentNode) then begin
+                      lastlist := lParentNode.GetNodesByName('Parameter');
+                      if Assigned(lastlist) then begin
+                        for p := 0 to (lastlist.Count-1) do begin
+                          lFlag := XMLFlagNameToFlag(GetNodeAttribute(lastlist.Nodes[p], 'Flag'));
+                          case lFlag of
+                            fResult:par := op.AddResult();
+                            else par := op.Add();
+                          end;    { case }
+                          par.Name := GetNodeAttribute(lastlist.Nodes[p], 'Name');
+                          //par.Documentation := GetNodeAttribute(lastlist.Nodes[p], 'Documentation');
+                          par.Flag := lFlag;
+                          par.DataType := FixLegacyTypes(GetNodeAttribute(lastlist.Nodes[p], 'DataType'));
+                          ReadAttributes(lastlist.Nodes[p], par);
+                        end;
+                      end;
+                    end; // Service|Interface|Operation|Parameters
+
+                    // Code Bodies
+                    lParentNode := subsublist.Nodes[m].GetNodeByName('Code');
+                    if Assigned(lParentNode) then begin
+                      lastlist := lParentNode.GetNodesByName('Code');
+                      if Assigned(lastlist) then begin
+                        for p := 0 to (lastlist.Count-1) do begin
+                          op.SetCodeBodyAsString(GetNodeAttribute(lastlist.Nodes[p], 'Language'),StringFromHexString(lastlist.Nodes[p].Value));
+                        end;
+                      end;
+                    end; // Service|Interface|Operation|Parameters
+
+                    {op.MoveResult();}
+                  end;
+                end;
+              end; // Service|Interface|Operations
+            end;
+          end; // Service|Interfaces
+
+          lEventSink.IsFromUsedRodl := Assigned(iRodlUse);
+          lEventSink.LocatedInRodlUse := iRodlUse;
+
+          iLibrary.Add(lEventSink);
+        end;
+      end;
+    end; // EventSinks
+
+    //////////////////// TODO REMOVE **BELOW**
+    // EventSinks
+    lParentNode := xmldoc.DocumentNode.GetNodeByName('CallbackSinks');
+    if Assigned(lParentNode) then begin
+      list := lParentNode.GetNodesByName('CallbackSink');
+      if Assigned(list) then begin
+        for i := 0 to (list.Count-1) do begin
+          lEventSink := TRODLEventSink.Create;
+          lEventSink.Name := GetNodeAttribute(list.Nodes[i], 'Name');
+          //lEventSink.Documentation := GetNodeAttribute(list.Nodes[i], 'Documentation');
+          lEventSink.Ancestor := GetNodeAttribute(list.Nodes[i], 'Ancestor');
+
+          lEventSink.ImplUnit := GetNodeAttribute(list.Nodes[i], 'ImplUnit');
+          lEventSink.ImplClass := GetNodeAttribute(list.Nodes[i], 'ImplClass');
+          lEventSink.Abstract := GetNodeAttribute(list.Nodes[i], 'Abstract') = '1';
+          lEventSink.UID := RecreateGuidIfNeeded(StringToGUID(GetNodeAttribute(list.Nodes[i], 'UID')));
+
+          ReadAttributes(list.Nodes[i], lEventSink);
+
+          // Default interface
+          // TODO: Implement multiple interfaces in the future. Not needed now
+          lParentNode := list.Nodes[i].GetNodeByName('Interfaces');
+          if Assigned(lParentNode) then begin
+            sublist := lParentNode.GetNodesByName('Interface');
+            if Assigned(sublist) and (sublist.Count > 0) then begin
+              //later: for k := 0 to (sublist.Length-1) do begin
+              k := 0;
+
+              intf := lEventSink.Default;
+              intf.Name := GetNodeAttribute(sublist.Nodes[k], 'Name');
+              intf.UID := RecreateGuidIfNeeded(StringToGUID(GetNodeAttribute(sublist.Nodes[k], 'UID'))); // Fixed thanks to a compiler warning! Was using m as index
+              //intf.Documentation := GetNodeAttribute(sublist.Nodes[k], 'Documentation');
+
+              ReadAttributes(sublist.Nodes[k], intf);
+
+              // Operations
+              lParentNode := sublist.Nodes[k].GetNodeByName('Operations');
+              if Assigned(lParentNode) then begin
+                subsublist := lParentNode.GetNodesByName('Operation');
+                if Assigned(subsublist) then begin
+                  for m := 0 to (subsublist.Count-1) do begin
+                    op := intf.Add;
+                    op.Name := GetNodeAttribute(subsublist.Nodes[m], 'Name');
+                    //op.Documentation := GetNodeAttribute(subsublist.Nodes[m], 'Documentation');
+                    op.UID := RecreateGuidIfNeeded(StringToGUID(GetNodeAttribute(subsublist.Nodes[m], 'UID')));
+
+                    ReadAttributes(subsublist.Nodes[m], op);
+
+                    // Parameters
+                    lParentNode := subsublist.Nodes[m].GetNodeByName('Parameters');
+                    if Assigned(lParentNode) then begin
+                      lastlist := lParentNode.GetNodesByName('Parameter');
+                      if Assigned(lastlist) then begin
+                        for p := 0 to (lastlist.Count-1) do begin
+                          lFlag := XMLFlagNameToFlag(GetNodeAttribute(lastlist.Nodes[p], 'Flag'));
+                          case lFlag of
+                            fResult:par := op.AddResult();
+                            else par := op.Add();
+                          end;    { case }
+                          par.Name := GetNodeAttribute(lastlist.Nodes[p], 'Name');
+                          //par.Documentation := GetNodeAttribute(lastlist.Nodes[p], 'Documentation');
+                          par.Flag := lFlag;
+                          par.DataType := FixLegacyTypes(GetNodeAttribute(lastlist.Nodes[p], 'DataType'));
+                          ReadAttributes(lastlist.Nodes[p], par);
+                        end;
+                      end;
+                    end; // Service|Interface|Operation|Parameters
+
+                    // Code Bodies
+                    lParentNode := subsublist.Nodes[m].GetNodeByName('Code');
+                    if Assigned(lParentNode) then begin
+                      lastlist := lParentNode.GetNodesByName('Code');
+                      if Assigned(lastlist) then begin
+                        for p := 0 to (lastlist.Count-1) do begin
+                          op.SetCodeBodyAsString(GetNodeAttribute(lastlist.Nodes[p], 'Language'),StringFromHexString(lastlist.Nodes[p].Value));
+                        end;
+                      end;
+                    end; // Service|Interface|Operation|Parameters
+
+                    {op.MoveResult();}
+                  end;
+                end;
+              end; // Service|Interface|Operations
+            end;
+          end; // Service|Interfaces
+
+          lEventSink.IsFromUsedRodl := Assigned(iRodlUse);
+          lEventSink.LocatedInRodlUse := iRodlUse;
+
+          iLibrary.Add(lEventSink);
+        end;
+      end;
+    end; // EventSinks
+    //////////////////// TODO REMOVE ^^^^^^
+
+    // Structs
+    lParentNode := xmldoc.DocumentNode.GetNodeByName('Structs');
+    if Assigned(lParentNode) then begin
+      list := lParentNode.GetNodesByName('Struct');
+      if Assigned(list) then begin
+        for i := 0 to (list.Count-1) do begin
+          struct := TRODLStruct.Create;
+          struct.Name := GetNodeAttribute(list.Nodes[i], 'Name');
+          //struct.Documentation := GetNodeAttribute(list.Nodes[i], 'Documentation');
+          struct.UID := RecreateGuidIfNeeded(StringToGUID(GetNodeAttribute(list.Nodes[i], 'UID')));
+          struct.Ancestor := GetNodeAttribute(list.Nodes[i], 'Ancestor');
+          struct.AutoCreateParams := GetNodeAttribute(list.Nodes[i], 'AutoCreateParams') <> '0';
+          struct.Abstract := GetNodeAttribute(list.Nodes[i], 'Abstract') = '1';
+
+          ReadAttributes(list.Nodes[i], struct);
+
+          lParentNode := list.Nodes[i].GetNodeByName('Elements');
+          if Assigned(lParentNode) then begin
+            sublist := lParentNode.GetNodesByName('Element');
+            if Assigned(sublist) then begin
+              for p := 0 to (sublist.Count-1) do begin
+                stelem := struct.Add;
+                stelem.Name := GetNodeAttribute(sublist.Nodes[p], 'Name');
+                //stelem.Documentation := GetNodeAttribute(sublist.Nodes[p], 'Documentation');
+                stelem.DataType := FixLegacyTypes(GetNodeAttribute(sublist.Nodes[p], 'DataType'));
+                ReadAttributes(sublist.Nodes[p], stelem);
+              end;
+            end;
+          end; // Struct|Elements
+
+          struct.IsFromUsedRodl := Assigned(iRodlUse);
+          struct.LocatedInRodlUse := iRodlUse;
+
+          iLibrary.Add(struct);
+        end;
+      end;
+    end; //Structs
+
+    // Enums
+    lParentNode := xmldoc.DocumentNode.GetNodeByName('Enums');
+    if Assigned(lParentNode) then begin
+      list := lParentNode.GetNodesByName('Enum');
+      if Assigned(list) then begin
+        for i := 0 to (list.Count-1) do begin
+          enum := TRODLEnum.Create;
+          enum.Name := GetNodeAttribute(list.Nodes[i], 'Name');
+          enum.PrefixEnumValues := GetNodeAttribute(list.Nodes[i], 'Prefix') <> '0';
+          //enum.Documentation := GetNodeAttribute(list.Nodes[i], 'Documentation');
+          enum.UID := RecreateGuidIfNeeded(StringToGUID(GetNodeAttribute(list.Nodes[i], 'UID')));
+
+          ReadAttributes(list.Nodes[i], enum);
+
+          lParentNode := list.Nodes[i].GetNodeByName('EnumValues');
+          if Assigned(lParentNode) then begin
+            sublist := lParentNode.GetNodesByName('EnumValue');
+            if Assigned(sublist) then begin
+              for p := 0 to (sublist.Count-1) do begin
+                eval := enum.Add;
+                eval.Name := GetNodeAttribute(sublist.Nodes[p], 'Name');
+                ReadAttributes(sublist.Nodes[p], eval);
+                //eval.Documentation := GetNodeAttribute(sublist.Nodes[p], 'Documentation');
+              end;
+            end;
+          end; //Enum|EnumValues
+
+          enum.IsFromUsedRodl := Assigned(iRodlUse);
+          enum.LocatedInRodlUse := iRodlUse;
+
+          iLibrary.Add(enum);
+        end;
+      end;
+    end; // Enums
+
+    // Arrays
+    lParentNode := xmldoc.DocumentNode.GetNodeByName('Arrays');
+    if Assigned(lParentNode) then begin
+      list := lParentNode.GetNodesByName('Array');
+      if Assigned(list) then begin
+        for i := 0 to (list.Count-1) do begin
+          arr := TRODLArray.Create;
+          arr.Name := GetNodeAttribute(list.Nodes[i], 'Name');
+          //arr.Documentation := GetNodeAttribute(list.Nodes[i], 'Documentation');
+          arr.UID := RecreateGuidIfNeeded(StringToGUID(GetNodeAttribute(list.Nodes[i], 'UID')));
+
+          ReadAttributes(list.Nodes[i], arr);
+
+          sublist := list.Nodes[i].GetNodesByName('ElementType');
+          if Assigned(sublist) and (sublist.Count > 0) then
+            arr.ElementType := FixLegacyTypes(GetNodeAttribute(sublist.Nodes[0], 'DataType'));
+
+          arr.IsFromUsedRodl := Assigned(iRodlUse);
+          arr.LocatedInRodlUse := iRodlUse;
+
+          iLibrary.Add(arr)
+        end;
+      end;
+    end; // Arrays
+
+    // Exceptions
+    lParentNode := xmldoc.DocumentNode.GetNodeByName('Exceptions');
+    if Assigned(lParentNode) then begin
+      list := lParentNode.GetNodesByName('Exception');
+      if Assigned(list) then begin
+        for i := 0 to (list.Count-1) do begin
+          lException := TRODLException.Create;
+          lException.Name := GetNodeAttribute(list.Nodes[i], 'Name');
+          //lException.Documentation := GetNodeAttribute(list.Nodes[i], 'Documentation');
+          lException.UID := RecreateGuidIfNeeded(StringToGUID(GetNodeAttribute(list.Nodes[i], 'UID')));
+          lException.Ancestor := GetNodeAttribute(list.Nodes[i], 'Ancestor');
+          lException.Abstract := GetNodeAttribute(list.Nodes[i], 'Abstract') = '1';
+
+          ReadAttributes(list.Nodes[i], lException);
+
+          lParentNode := list.Nodes[i].GetNodeByName('Elements');
+          if Assigned(lParentNode) then begin
+            sublist := lParentNode.GetNodesByName('Element');
+            if Assigned(sublist) then begin
+              for p := 0 to (sublist.Count-1) do begin
+                stelem := lException.Add;
+                stelem.Name := GetNodeAttribute(sublist.Nodes[p], 'Name');
+                //stelem.Documentation := GetNodeAttribute(sublist.Nodes[p], 'Documentation');
+                stelem.DataType := FixLegacyTypes(GetNodeAttribute(sublist.Nodes[p], 'DataType'));
+                ReadAttributes(sublist.Nodes[p], stelem);
+              end;
+            end;
+          end; // Struct|Elements
+
+          lException.IsFromUsedRodl := Assigned(iRodlUse);
+          lException.LocatedInRodlUse := iRodlUse;
+
+          iLibrary.Add(lException)
+        end;
+      end;
+    end; // Exceptions
+  finally
+    fGroupGuidList.Free;
+  end;
+end;
+
+function TXMLToRODL.ReadFromString(const aString: string; const aFilename:string): TRODLLibrary;
+var
+  ss: TROBinaryMemoryStream;
+begin
+  ss := TROBinaryMemoryStream.Create;
+  try
+    ss.Write( pointer(aString)^, Length(aString)*SizeOf(Char));
+    result := Read(ss, aFilename);
+  finally
+    ss.Free;
+  end;
+end;
+
+function TXMLToRODL.RecreateGuidIfNeeded(iGuid: TGuid): TGuid;
+begin
+  if fRecreateGuids then
+    result := NewGuid()
+  else
+    result := iGuid;
+end;
+
+end.
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODLLChannel.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODLLChannel.pas
new file mode 100644
index 0000000..0e8a50a
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODLLChannel.pas	
@@ -0,0 +1,273 @@
+unit uRODLLChannel;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses Classes, Windows, uROClient, uROClientIntf, uRODLLHelpers;
+
+type
+  TDLLProcessMessage = function(aRequest:THandle):THandle;
+  TDLLRegisterEventHandler = function(const ClientId: TGuid; const Handler: IRODllEventCallback): Boolean;
+  TDLLUnRegisterEventHandler = procedure(const ClientId: TGuid);
+//type TDLLProcessMessage = procedure(aRequestStream, aResponseStream : TStream);
+
+const
+  DLLProcessMessageName = 'DLLProcessMessage';
+  DLLRegisterEventHandlerName = 'DLLRegisterEventHandler';
+  DLLUnRegisterEventHandlerName = 'DLLUnRegisterEventHandler';
+
+type { TRODLLChannel }
+
+     TDLLLoadEvent      = procedure(Sender:TObject ;DLLHandle: THandle) of object;
+     TDLLUnloadEvent    = TNotifyEvent;
+
+     TRODLLChannel = class(TROTransportChannel, IROActiveEventChannel, IRODllEventCallback)
+     private
+       fDLLName: string;
+       fDLLHandle : THandle;
+       fKeepDLLLoaded: boolean;
+       fDLLProcessMessage : TDLLProcessMessage;
+       FDLLRegisterEventHandler: TDLLRegisterEventHandler;
+       fDLLUnregisterEventHandler: TDLLUnRegisterEventHandler;
+
+       fOnDLLLoaded: TDLLLoadEvent;
+       fOnDLLUnloaded: TDLLUnloadEvent;
+       fSupportsActiveEvents: Boolean;
+       fEventReceiver: IROEventReceiver;
+       fActiveEvents: Boolean;
+       fActiveClientID: TGuid;
+
+     protected
+       { IROTransport }
+       function GetTransportObject : TObject; override;
+
+
+       { TROTransportChannel }
+       procedure IntDispatch(aRequest, aResponse : TStream); override;
+
+       { Getters and setters }
+       function  GetDLLLoaded: Boolean;
+
+
+       procedure LoadDLL;
+       procedure IntSetServerLocator(aServerLocator: TROServerLocator); override;
+       procedure BeforeDispatch(aMessage: IROMessage); override;
+
+       procedure UnregisterEventReceiver(aReceiver: IROEventReceiver);
+       procedure RegisterEventReceiver(aReceiver: IROEventReceiver);
+       procedure ProcessEvent(Data: Pointer; DataSize: Integer);
+       function QueryInterface(const IID: TGUID; out Obj): HRESULT; override; stdcall;
+
+     public
+       property  DLLHandle: THandle read fDLLHandle;
+       property  DLLLoaded: Boolean read GetDLLLoaded;
+
+       property SupportsActiveEvents: Boolean read fSupportsActiveEvents;
+       constructor Create(aOwner : TComponent); override;
+       destructor Destroy; override;
+
+       procedure UnloadDLL;
+       procedure CheckProperties; override;
+       {$IFDEF FPC}
+       property ActiveClientID: TGuid read fActiveClientID write fActiveClientID;
+       {$ENDIF}
+     published
+       property OnDLLLoaded: TDLLLoadEvent read FOnDLLLoaded write FOnDLLLoaded;
+       property OnDLLUnloaded: TDLLUnloadEvent read FOnDLLUnloaded write FOnDLLUnloaded;
+       property DLLName : string read fDLLName write fDLLName;
+       property KeepDLLLoaded : boolean read fKeepDLLLoaded write fKeepDLLLoaded default true;
+       property ActiveEvents : Boolean read fActiveEvents write fActiveEvents default true;
+       {$IFNDEF FPC}
+       property ActiveClientID: TGuid read fActiveClientID write fActiveClientID;
+       {$ENDIF FPC}
+       property ServerLocators;
+       property DispatchOptions;
+     end;
+
+implementation
+
+uses SysUtils, uROClasses;
+
+{ TRODLLChannel }
+
+procedure TRODLLChannel.BeforeDispatch(aMessage: IROMessage);
+begin
+  inherited;
+  LoadDLL;
+  if fActiveEvents and fSupportsActiveEvents then begin
+    if IsEqualGUID(fActiveClientID, EmptyGUID) then fActiveClientID := NewGuid;
+    aMessage.ClientID := ActiveClientID;
+  end;
+end;
+
+procedure TRODLLChannel.CheckProperties;
+begin
+  inherited;
+  Check(not FileExists(DLLName), 'Cannot locate %s', [DLLName]); // TODO: Move in uRORes
+end;
+
+constructor TRODLLChannel.Create(aOwner: TComponent);
+begin
+  inherited;
+  fKeepDLLLoaded := TRUE;
+  ThreadSafe := true;
+  fActiveEvents := true;
+end;
+
+destructor TRODLLChannel.Destroy;
+begin
+  UnloadDLL;
+  inherited;
+end;
+
+function TRODLLChannel.GetDLLLoaded: Boolean;
+begin
+  result := fDLLHandle <> 0;
+end;
+
+function TRODLLChannel.GetTransportObject: TObject;
+begin
+  result := Self;
+end;
+
+procedure TRODLLChannel.IntDispatch(aRequest, aResponse: TStream);
+var lRequestHandle, lResponseHandle:THandle;
+begin
+  try
+    lRequestHandle := StreamToHGlobal(aRequest);
+    try
+      lResponseHandle := fDLLProcessMessage(lRequestHandle);
+      try
+        HGlobalToStream(lResponseHandle,aResponse);
+      finally
+        GlobalFree(lResponseHandle);
+      end;
+    finally
+      GlobalFree(lRequestHandle);
+    end;
+  finally
+    if not KeepDLLLoaded then UnloadDLL;
+  end;
+end;
+
+procedure TRODLLChannel.IntSetServerLocator(
+  aServerLocator: TROServerLocator);
+begin
+  // Do nothing
+end;
+
+procedure TRODLLChannel.LoadDLL;
+begin
+  CheckProperties;
+  if (fDLLHandle>0) then Exit; // Already loaded
+  try
+    fDLLHandle := LoadLibrary(PChar(DLLName));
+    if fDLLHandle = 0 then
+      RaiseLastOSError;
+
+    @fDLLProcessMessage := GetProcAddress(fDLLHandle, PAnsiChar(DLLProcessMessageName));
+    if (@fDLLProcessMessage=NIL) then begin
+      fDLLHandle := 0;
+      RaiseError('Not a RemObjects DLL', []); // TODO: Move in uRORes
+    end;
+     @FDLLRegisterEventHandler := GetProcAddress(fDLLHandle, PAnsiChar(DLLRegisterEventHandlerName));
+     @FDLLUnregisterEventHandler:= GetProcAddress(fDllHandle, PAnsiChar(DLLUnRegisterEventHandlerName));
+     fSupportsActiveEvents := assigned(FDLLRegisterEventHandler) and assigned(FDLLUnregisterEventHandler) and
+       FDLLRegisterEventHandler(EmptyGUID, nil); // returns false if active events aren't supported by the server
+  except
+    if (fDLLHandle>0) then begin
+      FreeLibrary(fDLLHandle);
+      fDLLHandle := 0;
+    end;
+    @fDLLProcessMessage := NIL;
+    raise;
+  end;
+
+  //toDO: make proper Trigger functions.
+  if (DLLLoaded) and (Assigned(fOnDLLLoaded)) then
+    fOnDLLLoaded(Self,fDLLHandle);
+
+end;
+
+procedure TRODLLChannel.ProcessEvent(Data: Pointer; DataSize: Integer);
+var
+  ms: TMemoryStream;
+begin
+  if fEventReceiver = nil then exit;
+  ms := TMemorySTream.Create;
+  try
+    ms.Write(Data^, DataSize);
+    ms.Position := 0;
+    fEventReceiver.Dispatch(ms, nil);
+  finally
+    ms.Free;
+  end;
+
+end;
+
+function TRODLLChannel.QueryInterface(const IID: TGUID; out Obj): HRESULT;
+begin
+  if IsEqualGUID(IID, IROActiveEventChannel) then begin
+    try
+      if fDLLHandle = 0 then LoadDLL;
+    except
+      Result := E_NOINTERFACE;
+      exit;
+    end;
+    if fKeepDLLLoaded and fSupportsActiveEvents and fActiveEvents then
+      Result := inherited QueryInterface(IID, obj)
+    else
+      Result := E_NOINTERFACE;
+  end else Result := inherited QueryInterface(IID, obj);
+end;
+
+procedure TRODLLChannel.RegisterEventReceiver(aReceiver: IROEventReceiver);
+begin
+  fEventReceiver := aReceiver;
+  LoadDLL;
+  if fActiveEvents and fSupportsActiveEvents then begin
+    if IsEqualGUID(fActiveClientID, EmptyGUID) then fActiveClientID := NewGuid;
+    FDLLRegisterEventHandler(fActiveClientID, Self);
+  end;
+end;
+
+procedure TRODLLChannel.UnloadDLL;
+begin
+  if (fDLLHandle<>0) then begin
+    FreeLibrary(fDLLHandle);
+    fDLLHandle := 0;
+    if Assigned(fOnDLLUnloaded) then
+      fOnDLLUnloaded(Self);
+  end;
+end;
+
+
+procedure TRODLLChannel.UnregisterEventReceiver(
+  aReceiver: IROEventReceiver);
+begin
+  if fActiveEvents and fSupportsActiveEvents and (fDLLHandle <> 0) then begin
+    fDLLUnregisterEventHandler(fActiveClientID);
+  end;
+  fEventReceiver := nil;
+end;
+
+initialization
+  RegisterTransportChannelClass(TRODLLChannel);
+
+finalization
+  UnRegisterTransportChannelClass(TRODLLChannel);
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODLLHelpers.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODLLHelpers.pas
new file mode 100644
index 0000000..17b48b2
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODLLHelpers.pas	
@@ -0,0 +1,88 @@
+unit uRODLLHelpers;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses Windows, Classes;
+
+{ Description:
+    Creates a hGlobal object that contains the contents of the stream.
+    The Stream is positioned at it's end when the function returns
+    The Caller is responsible for freeing the returnd hGloba using the
+    GlobalFree API call. }
+function StreamToHGlobal(iStream:TStream):THandle;
+
+{ Description:
+    Loads an hGlobal into the passed Stream. The stream is completeley
+    cleared before loading the memory; It's positioned at 0 when the
+    function returns. }
+procedure HGlobalToStream(lHandle:THandle; iStream:TStream);
+
+type
+  IRODllEventCallback = interface
+    ['{39084976-A3F5-43DB-B2F0-B9EE3137C6EF}']
+    procedure ProcessEvent(Data: Pointer; DataSize: Integer);
+  end;
+
+implementation
+
+uses SysUtils;
+
+type PInteger = ^Integer;
+
+function StreamToHGlobal(iStream:TStream):THandle;
+var lPointer:Pointer;
+begin
+  Result := GlobalAlloc(0,iStream.Size+sizeof(Integer));
+  if Result = 0 then RaiseLastOSError();
+  try
+    lPointer := GlobalLock(Result);
+    if not Assigned(lPointer) then RaiseLastOSError();
+    try
+      iStream.Seek(0,soFromBeginning);
+      PInteger(lPointer)^ := iStream.Size;
+      inc(PInteger(lPointer));
+      iStream.ReadBuffer(lPointer^,iStream.Size);
+    finally
+      //if not GlobalUnlock(Result) then RaiseLastOSError();
+      //ToDo: it seesm the return value on success is also zero (and GetLastError will yield NO_ERROR) on Win9x systems.
+      GlobalUnlock(Result);
+    end;
+  except
+    if GlobalFree(Result) <> 0 then RaiseLastOSError();
+    raise;
+  end;
+end;
+
+procedure HGlobalToStream(lHandle:THandle; iStream:TStream);
+var
+  lPointer:Pointer;
+  lSize:integer;
+begin
+  lPointer := GlobalLock(lHandle);
+  if not Assigned(lPointer) then RaiseLastOSError();
+  try
+    iStream.Size := 0;
+    lSize := PInteger(lPointer)^;
+    inc(PInteger(lPointer));
+    iStream.WriteBuffer(lPointer^,lSize);
+    iStream.Seek(0,soFromBeginning);
+  finally
+    GlobalUnlock(lHandle);
+  end;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODLLServer.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODLLServer.pas
new file mode 100644
index 0000000..c76d561
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODLLServer.pas	
@@ -0,0 +1,179 @@
+unit uRODLLServer;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses Classes, uROClientIntf, uROClient, uROServer, uRODLLHelpers, uROEventRepository;
+
+type { TRODLLServer }
+     TRODLLServer = class(TROServer, IROTransport)
+     private
+       fActiveEventRepository: TROEventRepository;
+     protected
+       { IROTransport }
+       function GetTransportObject : TObject;
+
+       procedure IntSetActive(const Value: boolean); override;
+       function IntGetActive : boolean; override;
+
+     public
+       property ActiveEventRepository: TROEventRepository read fActiveEventRepository write fActiveEventRepository;
+     end;
+
+{ Call this to add a dispatcher to the DLLServer }
+procedure RegisterMessage(aMessage : TROMessage);
+
+{ Use this singleton if you need to hook to the server instance }
+function DLLServer : TRODLLServer;
+
+{ EXPORTED (for external user only): Main DLL entry point for message processing }
+function DLLProcessMessage(aRequest:THandle):THandle;
+function DLLRegisterEventHandler(const ClientId: TGuid; const Handler: IRODllEventCallback): Boolean;
+procedure DLLUnRegisterEventHandler(const ClientId: TGuid);
+
+implementation
+
+uses Windows, uRODLLChannel, uROServerIntf;
+
+var fDLLServer: TRODLLServer;
+
+type
+  TCallbackWrapper = class(TInterfacedObject, IROActiveEventServer)
+  private
+    FDll: IRODllEventCallback;
+  public
+    procedure DispatchEvent(anEventDataItem: TROEventData;
+      aSessionReference: TGUID; aSender: TObject);
+    procedure EventsRegistered(aSender: TObject; aClient: TGUID);
+    constructor Create(aDll: IRODllEventCallback);
+  end;
+
+procedure RegisterMessage(aMessage : TROMessage);
+begin
+  with TROMessageDispatcher(fDLLServer.Dispatchers.Add) do begin
+    Message := aMessage;
+  end;
+end;
+
+function DLLServer : TRODLLServer;
+begin
+  result := fDLLServer;
+end;
+
+{procedure DLLProcessMessage(aRequestStream,
+                            aResponseStream : TStream);
+var transport : IROTransport;
+begin
+  fDLLServer.QueryInterface(IROTransport, transport);
+  fDLLServer.DispatchMessage(transport, aRequestStream, aResponseStream);
+  //fDLLServer.DispatchMessage((fDLLServer as IROTransport), aRequestStream, aResponseStream);
+end;}
+
+
+{ EXPORTED (for external user only): Main DLL entry point for message processing }
+
+function DLLProcessMessage(aRequest:THandle):THandle;
+var lTransport : IROTransport;
+var lRequestStream, lResponseStream:TMemoryStream;
+begin
+  lRequestStream := TMemoryStream.Create();
+  try
+   lResponseStream := TMemoryStream.Create();
+    try
+
+      HGlobalToStream(aRequest,lRequestStream);
+      fDLLServer.QueryInterface(IROTransport, lTransport);
+      fDLLServer.DispatchMessage(lTransport, lRequestStream, lResponseStream);
+      Result := StreamToHGlobal(lResponseStream);
+
+    finally
+      lResponseStream.Free();
+    end;
+  finally
+    lRequestStream.Free();
+  end;
+end;
+
+exports DLLProcessMessage name DLLProcessMessageName,
+  DLLRegisterEventHandler name DLLRegisterEventHandlerName,
+  DLLUnRegisterEventHandler name DLLUnRegisterEventHandlerName;
+
+
+{ TRODLLServer }
+
+function TRODLLServer.GetTransportObject: TObject;
+begin
+  result := Self;
+end;
+
+function TRODLLServer.IntGetActive: boolean;
+begin
+  result := TRUE;
+end;
+
+procedure TRODLLServer.IntSetActive(const Value: boolean);
+begin
+  // not required in this case. Always active
+end;
+
+function DLLRegisterEventHandler(const ClientId: TGuid; const Handler: IRODllEventCallback): Boolean;
+begin
+  if fDLLServer.ActiveEventRepository = nil then begin
+    result := false;
+    exit;
+  end;
+  if Handler <> nil then
+    fDLLServer.ActiveEventRepository.AddSession(ClientID, TCallbackWrapper.Create(Handler));
+  Result := TRue;
+end;
+
+procedure DLLUnRegisterEventHandler(const ClientId: TGuid);
+begin
+  if fDLLServer.ActiveEventRepository = nil then begin
+    exit;
+  end;
+  fDLLServer.ActiveEventRepository.RemoveSession(ClientId);
+end;
+
+
+
+{ TCallbackWrapper }
+
+constructor TCallbackWrapper.Create(aDll: IRODllEventCallback);
+begin
+  inherited Create;
+  FDll := aDll;
+end;
+
+procedure TCallbackWrapper.DispatchEvent(anEventDataItem: TROEventData;
+  aSessionReference: TGUID; aSender: TObject);
+begin
+  FDll.ProcessEvent(TMemoryStream(anEventDataItem.Data).Memory, TMemoryStream(anEventDataItem.Data).Size);
+end;
+
+procedure TCallbackWrapper.EventsRegistered(aSender: TObject;
+  aClient: TGUID);
+begin
+ // do nothing.
+end;
+
+initialization
+  fDLLServer := TRODLLServer.Create(NIL);
+
+finalization
+  fDLLServer.Free;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODiscovery.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODiscovery.pas
new file mode 100644
index 0000000..89536d9
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODiscovery.pas	
@@ -0,0 +1,342 @@
+unit uRODiscovery;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes, Contnrs, SysUtils,
+  uROBroadcastChannel, uROClient, uRODiscovery_Intf, uRODiscovery_Async;
+
+type
+  TRODiscoveryNewServiceFoundEvent = procedure(aSender:TObject; aName:string; aDiscoveryOptions:TRODiscoveryOptions) of object;
+
+  TRODiscoveryException = procedure(aSender: TObject; aException: Exception) of object;
+
+  TROCustomDiscoveryClient = class(TROComponent, IROBroadcastNotification)
+  private
+    fChannel: TROBroadcastChannel;
+    fMessage: TROMessage;
+    fServerList: TStrings;
+    fServiceName: Ansistring;
+    fOnNewServersFound: TNotifyEvent;
+    fDiscoveryService: IRODiscoveryService_Async;
+    fOnNewServiceFound: TRODiscoveryNewServiceFoundEvent;
+    FOnDiscoveryException: TRODiscoveryException;
+
+    procedure SetChannel(const Value: TROBroadcastChannel);
+    procedure SetMessage(const Value: TROMessage);
+    procedure SetServiceName(const Value: Ansistring);
+    procedure TriggerNewServersFound;
+    procedure TriggerNewServiceFound(aName:string; aDiscoveryOptions:TRODiscoveryOptions);
+  private
+    { IROBroadcastNotification }
+    procedure ResponseReceived(ServerIP,ResponseUID: String);
+  protected
+    procedure Notification(aComponent:TComponent; aOperation:TOperation); override;
+  public
+    constructor Create(aOwner:TComponent); override;
+    destructor Destroy; override;
+    procedure RefreshServerList(aDiscoveryOptions: TRODiscoveryOptions=nil);
+    procedure CheckProperties;
+    property Channel:TROBroadcastChannel read fChannel write SetChannel;
+    property Message:TROMessage read fMessage write SetMessage;
+    property ServerList:TStrings read fServerList;
+    property ServiceName:Ansistring read fServiceName write SetServiceName;
+    property OnNewServersFound:TNotifyEvent read fOnNewServersFound write fOnNewServersFound;
+    property OnNewServiceFound:TRODiscoveryNewServiceFoundEvent read fOnNewServiceFound write fOnNewServiceFound;
+    property OnDiscoveryException: TRODiscoveryException read FOnDiscoveryException write FOnDiscoveryException;
+  end;
+
+  TRODiscoveryClient = class(TROCustomDiscoveryClient)
+  published
+    property Channel;
+    property Message;
+    property ServerList;
+    property ServiceName;
+    property OnNewServersFound;
+    property OnNewServiceFound;
+    property OnDiscoveryException;
+  end;
+
+  TRODiscoveryServiceFoundEvent = procedure (aSender:TObject; aName:string; var ioDiscoveryOptions:TRODiscoveryOptions; var ioHandled:boolean) of object;
+
+  TROCustomDiscoveryServer = class(TROComponent)
+  private
+    fServiceList: TStrings;
+    fSupportRegisteredServerClasses: boolean;
+    fOnServiceFound: TRODiscoveryServiceFoundEvent;
+    fServerAddress: string;
+    procedure SetServiceList(const Value: TStrings);
+    procedure TriggerOnServiceFound(aName:string; var ioDiscoveryOptions:TRODiscoveryOptions; var ioHandled:boolean);
+    function FindServiceInList(iList:TStrings; const iName:string; var ioDiscoveryOptions:TRODiscoveryOptions; var ioHandled:boolean):string;
+  protected
+    procedure Notification(aComponent:TComponent; aOperation:TOperation); override;
+    function FindService(const iName: string; var ioDiscoveryOptions:TRODiscoveryOptions; var ioHandled:boolean):string;
+  public
+    constructor Create(aOwner:TComponent); override;
+    destructor Destroy; override;
+    property ServerAddress:string read fServerAddress write fServerAddress;
+    property ServiceList:TStrings read fServiceList write SetServiceList;
+    property SupportRegisteredServerClasses:boolean read fSupportRegisteredServerClasses write fSupportRegisteredServerClasses default true;
+    property OnServiceFound:TRODiscoveryServiceFoundEvent read fOnServiceFound write fOnServiceFound;
+  end;
+
+  TRODiscoveryServer = class(TROCustomDiscoveryServer)
+  published
+    property ServiceList;
+    property SupportRegisteredServerClasses;
+    property OnServiceFound;
+  end;
+
+  TRODiscoveryServerManager = class(TObjectList)
+  public
+    constructor Create();
+    procedure RegisterDiscoveryServer(iDiscoveryServer:TROCustomDiscoveryServer);
+    procedure UnregisterDiscoveryServer(iDiscoveryServer:TROCustomDiscoveryServer);
+    function FindService(const iName:string; var ioDiscoveryOptions:TRODiscoveryOptions; var ioHandled:boolean):string;
+  end;
+
+var
+  DiscoveryServerManager:TRODiscoveryServerManager;
+
+implementation
+
+uses
+  {$IFDEF VER140UP}DateUtils,{$ENDIF}
+  IdStack,
+  uROClassFactories, uROServer, uRODiscoveryService_Impl, uROClasses;
+
+{ TROCustomDiscoveryClient }
+
+constructor TROCustomDiscoveryClient.Create(aOwner: TComponent);
+begin
+  inherited;
+  fServerList := TStringList.Create;
+  TStringList(fServerList).Duplicates := dupIgnore;
+end;
+
+destructor TROCustomDiscoveryClient.Destroy;
+begin
+  Channel := nil;
+  FreeAndNil(fServerList);
+  inherited;
+end;
+
+procedure TROCustomDiscoveryClient.Notification(aComponent: TComponent; aOperation: TOperation);
+begin
+  inherited;
+  if aOperation <> opRemove then exit;
+  if aComponent = Channel then Channel := nil;
+  if aComponent = Message then Message := nil;
+end;
+
+procedure TROCustomDiscoveryClient.RefreshServerList(aDiscoveryOptions: TRODiscoveryOptions=nil);
+begin
+  CheckProperties;
+  fServerList.Clear();
+  TriggerNewServersFound();
+
+  if not Assigned(fDiscoveryService) then
+    fDiscoveryService := CoIRODiscoveryService_Async.Create(Message,Channel);
+
+  fDiscoveryService.Invoke_FindService(ServiceName, aDiscoveryOptions);
+end;
+
+procedure TROCustomDiscoveryClient.TriggerNewServersFound;
+begin
+  if Assigned(OnNewServersFound) then OnNewServersFound(self);
+end;
+
+procedure TROCustomDiscoveryClient.ResponseReceived(ServerIP, ResponseUID: String);
+var
+  lOptions: TRODiscoveryOptions;
+  lServer:string;
+begin
+  lOptions := nil;
+
+  if not Assigned(fDiscoveryService) then exit;
+
+  try
+    lServer := {$IFDEF UNICODE}AnsiStringToWideString{$ENDIF} (fDiscoveryService.Retrieve_FindService(lOptions));
+  except
+    on E: Exception do begin
+      if Assigned(FOnDiscoveryException) then begin
+        FOnDiscoveryException(Self, E);
+        exit;
+      end
+      else begin
+        raise;
+      end;
+    end;
+  end;
+
+  try
+    TriggerNewServiceFound(lServer, lOptions);
+    if (lServer <> '') and (fServerList.IndexOf(lServer) = -1) then begin
+      fServerList.Add(lServer);
+      TriggerNewServersFound();
+    end;
+  finally
+    FreeAndNil(lOptions);
+  end;
+end;
+
+procedure TROCustomDiscoveryClient.SetChannel(const Value: TROBroadcastChannel);
+var
+  lBroadcastNotification:IROBroadcastNotification;
+begin
+  if fChannel <> Value then begin
+    fDiscoveryService := nil;  { proxy is no longer valid }
+    if Assigned(fChannel) then begin
+      fChannel.UnregisterResponseListner(self);
+    end;
+
+    fChannel := Value;
+    if Assigned(fChannel) then begin
+      fChannel.FreeNotification(self);
+      if Supports(self,IROBroadcastNotification,lBroadcastNotification) then
+        fChannel.RegisterResponseListner(lBroadcastNotification);
+    end;
+  end;
+end;
+
+procedure TROCustomDiscoveryClient.SetMessage(const Value: TROMessage);
+begin
+  if fMessage <> Value then begin
+    fDiscoveryService := nil;  { proxy is no longer valid }
+    fMessage := Value;
+    if Assigned(fMessage) then fMessage.FreeNotification(self);
+  end;
+end;
+
+procedure TROCustomDiscoveryClient.SetServiceName(const Value: Ansistring);
+begin
+  if fServiceName <> Value then begin
+    fServiceName := Value;
+  end;
+end;
+
+procedure TROCustomDiscoveryClient.TriggerNewServiceFound(aName: string; aDiscoveryOptions: TRODiscoveryOptions);
+begin
+  if Assigned(OnNewServiceFound) then
+    OnNewServiceFound(self, aName, aDiscoveryOptions);
+end;
+
+procedure TROCustomDiscoveryClient.CheckProperties;
+begin
+  Check(Channel = NIL, Name + '.Channel must be assigned.');
+  Channel.CheckProperties;
+  Check(Message = NIL, Name + '.Message must be assigned.');
+  Message.CheckProperties;
+  Check(ServiceName = '', Name + '.ServiceName must be set.');
+end;
+
+{ TROCustomDiscoveryServer }
+
+constructor TROCustomDiscoveryServer.Create(aOwner: TComponent);
+begin
+  inherited;
+  fServiceList := TStringList.Create;
+  TStringList(fServiceList).Sorted := true;
+  SupportRegisteredServerClasses := true;
+
+  RegisterDiscoveryService();
+  DiscoveryServerManager.RegisterDiscoveryServer(self);
+end;
+
+destructor TROCustomDiscoveryServer.Destroy;
+begin
+  DiscoveryServerManager.UnregisterDiscoveryServer(self);
+  FreeAndNil(fServiceList);
+  inherited;
+end;
+
+function TROCustomDiscoveryServer.FindService(const iName: string; var ioDiscoveryOptions:TRODiscoveryOptions; var ioHandled:boolean):string;
+begin
+  result := FindServiceInList(fServiceList, iName, ioDiscoveryOptions, ioHandled);
+  if (not ioHandled) and SupportRegisteredServerClasses then
+    result := FindServiceInList(GetClassFactoryNames.Strings, iName, ioDiscoveryOptions, ioHandled);
+end;
+
+function TROCustomDiscoveryServer.FindServiceInList(iList:TStrings; const iName:string; var ioDiscoveryOptions:TRODiscoveryOptions; var ioHandled:boolean):string;
+begin
+  result := '';
+  if iList.IndexOf(iName) > -1 then begin
+    ioHandled := true;
+    TriggerOnServiceFound(iName,ioDiscoveryOptions,ioHandled);
+    if ioHandled then begin
+      if fServerAddress <> '' then begin
+        result := fServerAddress;
+      end
+      else begin
+        result := GStack.LocalAddress;
+      end;
+    end;
+  end;
+end;
+
+procedure TROCustomDiscoveryServer.Notification(aComponent:TComponent; aOperation:TOperation);
+begin
+  inherited;
+  if aOperation <> opRemove then exit;
+end;
+
+procedure TROCustomDiscoveryServer.SetServiceList(const Value: TStrings);
+begin
+  fServiceList.Assign(Value);
+end;
+
+procedure TROCustomDiscoveryServer.TriggerOnServiceFound(aName:string; var ioDiscoveryOptions:TRODiscoveryOptions; var ioHandled:boolean);
+begin
+  if Assigned(OnServiceFound) then
+    OnServiceFound(self,aName,ioDiscoveryOptions,ioHandled);
+end;
+
+{ TRODiscoveryServerManager }
+
+constructor TRODiscoveryServerManager.Create;
+begin
+  inherited Create(false);
+end;
+
+function TRODiscoveryServerManager.FindService(const iName: string; var ioDiscoveryOptions:TRODiscoveryOptions; var ioHandled:boolean):string;
+var
+  i:integer;
+begin
+  for i := 0 to Count-1 do begin
+    result := (Items[i] as TROCustomDiscoveryServer).FindService(iName,ioDiscoveryOptions,ioHandled);
+    if ioHandled then exit;
+  end;
+end;
+
+procedure TRODiscoveryServerManager.RegisterDiscoveryServer(iDiscoveryServer:TROCustomDiscoveryServer);
+begin
+  if IndexOf(iDiscoveryServer) = -1 then Add(iDiscoveryServer);
+end;
+
+procedure TRODiscoveryServerManager.UnregisterDiscoveryServer(iDiscoveryServer:TROCustomDiscoveryServer);
+var
+  lIndex:integer;
+begin
+  lIndex := IndexOf(iDiscoveryServer);
+  if IndexOf(iDiscoveryServer) <> -1 then Delete(lIndex);
+end;
+
+initialization
+  DiscoveryServerManager := TRODiscoveryServerManager.Create;
+finalization
+  FreeAndNil(DiscoveryServerManager);
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODiscoveryService_Impl.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODiscoveryService_Impl.pas
new file mode 100644
index 0000000..42a957e
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODiscoveryService_Impl.pas	
@@ -0,0 +1,54 @@
+unit uRODiscoveryService_Impl;
+
+{----------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project .                               }
+{                                                                            }
+{ This is where you are supposed to code the implementation of your objects. }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  {vcl:} Classes, SysUtils, 
+  {RemObjects:} uROClientIntf, uROTypes, uROServer, //uROServerIntf,
+  {Generated:} uRODiscovery_Intf;
+
+type
+  TRODiscoveryService = class(TRORemotable, IRODiscoveryService)
+  private
+  protected
+    function FindService(const iName:Ansistring; var ioDiscoveryOptions:TRODiscoveryOptions):Ansistring;
+  end;
+
+procedure RegisterDiscoveryService();
+
+implementation
+
+uses
+  {Generated:} uRODiscovery_Invk, uROClassFactories, uRODiscovery, uROClasses;
+
+procedure Create_TRODiscoveryService(out anInstance:IUnknown);
+begin
+  anInstance := TRODiscoveryService.Create;
+end;
+
+procedure RegisterDiscoveryService();
+begin
+  //ToDo: prevent class factory from being registered multiple times.
+  if not IsClassFactoryRegistered('IRODiscoveryService') then
+    TROSingletonClassFactory.Create('IRODiscoveryService', Create_TRODiscoveryService, TIRODiscoveryService_Invoker);
+end;
+
+function TRODiscoveryService.FindService(const iName:Ansistring; var ioDiscoveryOptions:TRODiscoveryOptions):Ansistring;
+var
+  lHandled:boolean;
+begin
+  lHandled := false;
+  result := {$IFDEF UNICODE}WideStringToAnsiString{$ENDIF} (DiscoveryServerManager.FindService({$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(iName), ioDiscoveryOptions, lHandled));
+  if not lHandled then ROSendNoResponse();
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODiscovery_Async.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODiscovery_Async.pas
new file mode 100644
index 0000000..ec292d9
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODiscovery_Async.pas	
@@ -0,0 +1,86 @@
+unit uRODiscovery_Async;
+
+{----------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project .                               }
+{                                                                            }
+{ Do not modify this unit manually, or your changes will be lost when this   }
+{ unit is regenerated the next time you compile the project.                 }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  {vcl:} Classes, TypInfo,
+  {RemObjects:} uROXMLIntf, uROClasses, uROTypes, uROClientIntf, uROAsync,
+  {Project:} uRODiscovery_Intf;
+
+type
+  { IRODiscoveryService_Async }
+  IRODiscoveryService_Async = interface(IROAsyncInterface)
+    ['{8E88E437-8B20-4AF4-8C81-DF27E6A6413D}']
+    procedure Invoke_FindService(const iName: AnsiString; const ioServerOptions: TRODiscoveryOptions);
+    function Retrieve_FindService(out ioServerOptions: TRODiscoveryOptions): AnsiString;
+  end;
+
+  { CoIRODiscoveryService_Async }
+  CoIRODiscoveryService_Async = class
+    class function Create(const aMessage : IROMessage; aTransportChannel : IROTransportChannel) : IRODiscoveryService_Async;
+  end;
+
+  TIRODiscoveryService_AsyncProxy = class(TROAsyncProxy, IRODiscoveryService_Async)
+  private
+  protected
+    function __GetInterfaceName: String; override;
+
+    procedure Invoke_FindService(const iName: AnsiString; const ioServerOptions: TRODiscoveryOptions);
+    function Retrieve_FindService(out ioServerOptions: TRODiscoveryOptions): AnsiString;
+  end;
+
+implementation
+
+uses
+  {vcl:} SysUtils;
+
+{ CoIRODiscoveryService }
+
+class function CoIRODiscoveryService_Async.Create(const aMessage : IROMessage; aTransportChannel : IROTransportChannel) : IRODiscoveryService_Async;
+begin
+  result := TIRODiscoveryService_AsyncProxy.Create(aMessage, aTransportChannel);
+end;
+
+{ TIRODiscoveryService_Proxy }
+
+function TIRODiscoveryService_AsyncProxy.__GetInterfaceName: String;
+begin
+  result := 'IRODiscoveryService';
+end;
+
+procedure TIRODiscoveryService_AsyncProxy.Invoke_FindService(const iName: AnsiString; const ioServerOptions: TRODiscoveryOptions);
+begin
+  __AssertProxyNotBusy('FindService');
+
+  __Message.InitializeRequestMessage(__TransportChannel, 'RODiscovery', 'IRODiscoveryService', 'FindService');
+  __Message.Write('iName', TypeInfo(AnsiString), iName, []);
+  __Message.Write('ioServerOptions', TypeInfo(TRODiscoveryOptions), ioServerOptions, []);
+  __DispatchAsyncRequest('FindService',__Message);
+    __Message.UnsetAttributes(__TransportChannel);
+end;
+
+function TIRODiscoveryService_AsyncProxy.Retrieve_FindService(out ioServerOptions: TRODiscoveryOptions): AnsiString;
+var __response:TStream;
+begin
+  ioServerOptions := nil;
+  __response := __RetrieveAsyncResponse('FindService');
+  __Message.ReadFromStream(__response);
+
+  __Message.Read('Result', TypeInfo(AnsiString), Result, []);
+  __Message.Read('ioServerOptions', TypeInfo(TRODiscoveryOptions), ioServerOptions, []);
+
+  __response.Free();
+end;
+
+initialization
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODiscovery_Intf.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODiscovery_Intf.pas
new file mode 100644
index 0000000..5d2f2fc
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODiscovery_Intf.pas	
@@ -0,0 +1,103 @@
+unit uRODiscovery_Intf;
+
+{----------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project .                               }
+{                                                                            }
+{ Do not modify this unit manually, or your changes will be lost when this   }
+{ unit is regenerated the next time you compile the project.                 }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  {vcl:} Classes, TypInfo,
+  {RemObjects:} uROXMLIntf, uROClasses, uROClient, uROTypes, uROClientIntf;
+
+const
+  { Library ID }
+  LibraryUID = '{943975A3-664A-4F07-AD0F-7357744276BF}';
+  TargetNamespace = '';
+
+  { Service Interface ID's }
+  IRODiscoveryService_IID : TGUID = '{D0F69433-544B-4003-946F-AD35046169B0}';
+  { Event ID's }
+
+type
+  { Forward declarations }
+  IRODiscoveryService = interface;
+  TRODiscoveryOptions = class;
+
+  { TRODiscoveryOptions }
+
+  { Description:
+       Use this base class to define custom Option strcuts that you can pass back from your Server Discovery calls  }
+  TRODiscoveryOptions = class(TROComplexType)
+  end;
+
+  { IRODiscoveryService }
+  IRODiscoveryService = interface
+    ['{D0F69433-544B-4003-946F-AD35046169B0}']
+    function FindService(const iName: AnsiString; var ioServerOptions: TRODiscoveryOptions): AnsiString;
+  end;
+
+  { CoIRODiscoveryService }
+  CoRODiscoveryService = class
+    class function Create(const aMessage : IROMessage; aTransportChannel : IROTransportChannel) : IRODiscoveryService;
+  end;
+
+  TRODiscoveryService_Proxy = class(TROProxy, IRODiscoveryService)
+  protected
+    function __GetInterfaceName:string; override;
+
+    function FindService(const iName: AnsiString; var ioServerOptions: TRODiscoveryOptions): AnsiString;
+  end;
+
+implementation
+
+uses
+  {vcl:} SysUtils,
+  {RemObjects:} uROEventRepository, uROSerializer, uRORes;
+
+{ CoIRODiscoveryService }
+
+class function CoRODiscoveryService.Create(const aMessage : IROMessage; aTransportChannel : IROTransportChannel) : IRODiscoveryService;
+begin
+  result := TRODiscoveryService_Proxy.Create(aMessage, aTransportChannel);
+end;
+
+{ TRODiscoveryService_Proxy }
+
+function TRODiscoveryService_Proxy.__GetInterfaceName:string;
+begin
+  result := 'IRODiscoveryService';
+end;
+
+function TRODiscoveryService_Proxy.FindService(const iName: AnsiString; var ioServerOptions: TRODiscoveryOptions): AnsiString;
+begin
+  try
+     __Message.InitializeRequestMessage(__TransportChannel, 'RODiscovery', __InterfaceName, 'FindService');
+    __Message.Write('iName', TypeInfo(AnsiString), iName, []);
+     __Message.Write('ioServerOptions', TypeInfo(TRODiscoveryOptions), ioServerOptions, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(AnsiString), result, []);
+     __Message.Read('ioServerOptions', TypeInfo(TRODiscoveryOptions), ioServerOptions, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
+initialization
+  RegisterROClass(TRODiscoveryOptions);
+  RegisterProxyClass(IRODiscoveryService_IID, TRODiscoveryService_Proxy);
+
+finalization
+  UnregisterROClass(TRODiscoveryOptions);
+  UnregisterProxyClass(IRODiscoveryService_IID);
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODiscovery_Invk.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODiscovery_Invk.pas
new file mode 100644
index 0000000..568a48a
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODiscovery_Invk.pas	
@@ -0,0 +1,79 @@
+unit uRODiscovery_Invk;
+
+{----------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project .                               }
+{                                                                            }
+{ Do not modify this unit manually, or your changes will be lost when this   }
+{ unit is regenerated the next time you compile the project.                 }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  {vcl:} Classes,
+  {RemObjects:} uROXMLIntf, uROServer, uROServerIntf, uROTypes, uROClientIntf,
+  {Generated:} uRODiscovery_Intf;
+
+type
+  TIRODiscoveryService_Invoker = class(TROInvoker)
+  private
+  protected
+  public
+    constructor Create; override;
+  published
+    procedure Invoke_FindService(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+  end;
+
+implementation
+
+uses
+  {RemObjects:} uRORes, uROClient;
+
+{ TIRODiscoveryService_Invoker }
+
+constructor TIRODiscoveryService_Invoker.Create;
+begin
+  inherited Create;
+  FAbstract := False;
+end;
+
+procedure TIRODiscoveryService_Invoker.Invoke_FindService(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function FindService(const iName: AnsiString; var ioServerOptions: TRODiscoveryOptions): AnsiString; }
+var
+  iName: AnsiString;
+  ioServerOptions: TRODiscoveryOptions;
+  __in_ioServerOptions: TRODiscoveryOptions;
+  lResult: AnsiString;
+  __lObjectDisposer: TROObjectDisposer;
+begin
+  ioServerOptions := nil;
+  __in_ioServerOptions := nil;
+  try
+    __Message.Read('iName', TypeInfo(AnsiString), iName, []);
+    __Message.Read('ioServerOptions', TypeInfo(TRODiscoveryOptions), ioServerOptions, []);
+    __in_ioServerOptions := ioServerOptions;
+
+    lResult := (__Instance as IRODiscoveryService).FindService(iName, ioServerOptions);
+
+    __Message.InitializeResponseMessage(__Transport, 'RODiscovery', 'IRODiscoveryService', 'FindServiceResponse');
+    __Message.Write('Result', TypeInfo(AnsiString), lResult, []);
+    __Message.Write('ioServerOptions', TypeInfo(TRODiscoveryOptions), ioServerOptions, []);
+    __Message.Finalize;
+    __Message.UnsetAttributes(__Transport);
+
+  finally
+    __lObjectDisposer := TROObjectDisposer.Create(__Instance);
+    try
+      __lObjectDisposer.Add(__in_ioServerOptions);
+      __lObjectDisposer.Add(ioServerOptions);
+    finally
+      __lObjectDisposer.Free();
+    end;
+  end;
+end;
+
+initialization
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODynamicRequest.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODynamicRequest.pas
new file mode 100644
index 0000000..51e7b60
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRODynamicRequest.pas	
@@ -0,0 +1,1468 @@
+unit uRODynamicRequest;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes, SysUtils, uROClient, uROTypes, uRORemoteService, uRODL, uROClasses;
+
+const
+  RODLParamFlagStr : array[TRODLParamFlag] of string = ('In', 'Out', 'InOut', 'Result');
+
+  err_UnknownComplexType = 'Complex type %s was not found. The type is not registered or the package containing it is not loaded.';
+
+type
+  { Misc }
+  TRODynamicRequest = class;
+  TRORequestParamCollection = class;
+  TRORequestParam = class;
+
+  TRODynamicRequestNotifyEvent = procedure(Sender : TRODynamicRequest) of object;
+  TRODynamicRequestErrorEvent = procedure(Sender : TRODynamicRequest; Error : Exception; var Ignore : boolean) of object;
+  TROStringPropertyChangeEvent = procedure(Sender : TRODynamicRequest; const OldValue, NewValue : string) of object;
+  TROFindCustomTypeImplementationEvent = procedure(Sender: TRODynamicRequest; const aTypeName:string; aParameter: TRORequestParam; out aImplementor: TROComplexType) of object;
+
+  { TRORequestParam }
+  TRORequestParam = class(TCollectionItem)
+  private
+    fName: string;
+    fDataType: TRODataType;
+    fFlag: TRODLParamFlag;
+    fTypeName: string;
+
+    fOwnsBinary, fOwnsComplexType: boolean;
+    fBinaryValue: Binary;
+    fComplexTypeValue: TROComplexType;
+    fSimpleValue: Variant;
+    procedure SetFlag(const Value: TRODLParamFlag);
+    procedure SetName(const Value: string);
+
+    procedure SetDataType(const Value: TRODataType);
+    procedure SetTypeName(const Value: string);
+    function GetAsBoolean: boolean;
+    function GetAsCurrency: currency;
+    function GetAsDateTime: TDateTime;
+    function GetAsFloat: double;
+    function GetAsInteger: integer;
+    function GetAsComplexType: TROComplexType;
+    function GetAsString: string;
+    function GetAsAnsiString: AnsiString;
+    function GetAsVariant: variant;
+    procedure SetAsBoolean(const Value: boolean);
+    procedure SetAsCurrency(const Value: currency);
+    procedure SetAsDateTime(const Value: TDateTime);
+    procedure SetAsFloat(const Value: double);
+    procedure SetAsInteger(const Value: integer);
+    procedure SetAsComplexType(const Value: TROComplexType);
+    procedure SetAsString(const Value: string);
+    procedure SetAsAnsiString(const Value: AnsiString);
+    procedure SetAsVariant(const Value: variant);
+    function GetAsWideString: UnicodeString;
+    procedure SetAsWideString(const Value: UnicodeString);
+    function GetAsInt64: Int64;
+    procedure SetAsInt64(const Value: Int64);
+    function GetAsBinary: Binary;
+    procedure SetAsBinary(const Value: Binary);
+    function GetIsNull: boolean;
+    function GetAsUTF8String: UTF8String;
+    procedure SetAsUTF8String(const Value: UTF8String);
+    {$IFDEF FPC}
+    procedure FPC_ReadVariant(Reader: TReader);
+    procedure FPC_WriteVariant(Writer: TWriter);
+    {$ENDIF FPC}
+  protected
+    function GetDisplayName: string; override;
+
+  public
+    constructor Create(Collection: TCollection); override;
+    destructor Destroy; override;
+
+    function GetSimpleValueReference: PVariant;
+    procedure CopyRODLParam(aSourceParam: TRODLOperationParam; aPersistValues: boolean=true; aOldParams: TRORequestParamCollection=nil);
+
+    procedure ReadSimpleValue(Reader: TReader);
+    procedure WriteSimpleValue(Writer: TWriter);
+    procedure ReadComplexTypeValue(Reader: TReader);
+    procedure WriteComplexTypeValue(Writer: TWriter);
+    procedure ReadBinaryValue(Stream: TStream);
+    procedure WriteBinaryValue(Stream: TStream);
+    procedure DefineProperties(Filer: TFiler); override;
+
+    procedure Assign(Source: TPersistent); override;
+
+    procedure ClearValue;
+    procedure Check; // check if param has values adequate to its datatype
+
+    property IsNull : boolean read GetIsNull;
+
+    property AsBoolean: boolean read GetAsBoolean write SetAsBoolean;
+    property AsCurrency: currency read GetAsCurrency write SetAsCurrency;
+    property AsDateTime: TDateTime read GetAsDateTime write SetAsDateTime;
+    property AsFloat: double read GetAsFloat write SetAsFloat;
+    property AsInteger: integer read GetAsInteger write SetAsInteger;
+    property AsString: string read GetAsString write SetAsString;
+    property AsWideString: UnicodeString read GetAsWideString write SetAsWideString;
+    property AsAnsiString: AnsiString read GetAsAnsiString write SetAsAnsiString;
+    property AsUTF8String: UTF8String read GetAsUTF8String write SetAsUTF8String;
+    property AsInt64 : Int64 read GetAsInt64 write SetAsInt64;
+    property AsVariant: variant read GetAsVariant write SetAsVariant;
+
+    property AsComplexType: TROComplexType read GetAsComplexType write SetAsComplexType;
+    property AsBinary : Binary read GetAsBinary write SetAsBinary;
+
+    property OwnsBinary: boolean read fOwnsBinary write fOwnsBinary;
+    property OwnsComplexType: boolean read fOwnsComplexType write fOwnsComplexType;
+
+  published
+    property Name : string read fName write SetName;
+    property DataType : TRODataType read fDataType write SetDataType;
+    property Flag : TRODLParamFlag read fFlag write SetFlag;
+    property TypeName : string read fTypeName write SetTypeName;
+    property Value: variant read GetAsVariant write SetAsVariant;
+  end;
+
+  { TRORequestParamCollection }
+  TRORequestParamCollection = class(TCollection)
+  private
+    fRequest : TRODynamicRequest;
+    function GetHasResultParam: boolean;
+    function GetResultParam: TRORequestParam;
+
+  protected
+    function GetItems(aIndex: integer): TRORequestParam;
+    procedure SetItems(aIndex: integer; aNewItem: TRORequestParam);
+
+  public
+    constructor Create(aDynamicRequest : TRODynamicRequest);
+    destructor Destroy; override;
+
+    function Add: TRORequestParam; overload;
+    function Add(const aName: string; aDataType: TRODataType; aParamFlag: TRODLParamFlag; const aTypeName: string=''): TRORequestParam; overload;
+    function Insert(aIndex: integer): TRORequestParam;
+
+    function FindParam(const aParamName: string): TRORequestParam;
+    function ParamByName(const aParamName: string): TRORequestParam;
+
+    procedure CopyRODLOperation(anOperation : TRODLOperation);
+
+    procedure Refresh;
+
+    procedure ClearValues;
+    procedure ClearInputValues;
+    procedure ClearOutputValues;
+    procedure Clone(Source : TRORequestParamCollection);
+
+    function IndexOf(aItem: TRORequestParam): integer;
+
+    property ResultParam : TRORequestParam read GetResultParam;
+    property HasResultParam: boolean read GetHasResultParam;
+    property Items[Index: integer]: TRORequestParam read GetItems write SetItems; default;
+  end;
+
+  { TRODynamicRequest }
+  TRODynamicRequest = class(TROComponent)
+  private
+    fMethodName: string;
+    fParams: TRORequestParamCollection;
+    fOnExecuteError: TRODynamicRequestErrorEvent;
+    fOnAfterExecute: TRODynamicRequestNotifyEvent;
+    fOnBeforeExecute: TRODynamicRequestNotifyEvent;
+    fOnChangeMethodName: TROStringPropertyChangeEvent;
+    fOnChangeServiceName: TROStringPropertyChangeEvent;
+    fOnFindCustomTypeImplementation: TROFindCustomTypeImplementationEvent;
+    fRemoteService: TRORemoteService;
+    function GetRODLLibrary: TRODLLibrary;
+  protected
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+    procedure SetRemoteService(const Value: TRORemoteService);
+
+    procedure SetMethodName(const Value: string);
+    function GetParams: TRORequestParamCollection;
+    procedure SetParams(const Value: TRORequestParamCollection);
+    function GetIsFunction: boolean;
+
+  protected
+    procedure DoExecute(aParams: TRORequestParamCollection=nil); virtual;
+    procedure MethodNameChanged; virtual;
+  public
+    constructor Create(aOwner : TComponent); override;
+    destructor Destroy; override;
+
+    procedure CreateInputComplexTypes(SkipIfAssigned : boolean);
+
+    procedure Execute(aParams: TRORequestParamCollection=nil);
+
+    procedure RefreshParams(aPersistValues: boolean = false); overload;
+    procedure RefreshParams(aOperation: TRODLOperation; aPersistValues: boolean = false); overload;
+
+    function FindParam(const aParamName: string): TRORequestParam;
+    function ParamByName(const aParamName: string): TRORequestParam;
+
+    procedure ListServiceOperations(const aServiceName : string; aList : TStrings);
+    procedure CheckProperties;
+    property RODLLibrary : TRODLLibrary read GetRODLLibrary;
+    property IsFunction : boolean read GetIsFunction;
+
+
+  published
+    property OnBeforeExecute : TRODynamicRequestNotifyEvent read fOnBeforeExecute write fOnBeforeExecute;
+    property OnAfterExecute : TRODynamicRequestNotifyEvent read fOnAfterExecute write fOnAfterExecute;
+    property OnExecuteError : TRODynamicRequestErrorEvent read fOnExecuteError write fOnExecuteError;
+    property OnFindCustomTypeImplementation: TROFindCustomTypeImplementationEvent read fOnFindCustomTypeImplementation write fOnFindCustomTypeImplementation;
+
+    property OnChangeServiceName : TROStringPropertyChangeEvent read fOnChangeServiceName write fOnChangeServiceName;
+    property OnChangeMethodName : TROStringPropertyChangeEvent read fOnChangeMethodName write fOnChangeMethodName;
+
+    property RemoteService: TRORemoteService read fRemoteService write SetRemoteService;
+    {$WARNINGS OFF}
+    property MethodName : string read fMethodName write SetMethodName;
+    {$WARNINGS ON}
+    property Params : TRORequestParamCollection read GetParams write SetParams;
+  end;
+
+{ Cloning functions }
+function CloneObject(Proto : TPersistent) : TPersistent;
+function CloneComplexType(Proto : TROComplexType) : TROComplexType;
+function CloneBinary(Proto : Binary) : Binary;
+
+implementation
+
+uses
+  {$IFDEF DEBUG_REMOBJECTS_DYNAMICREQUEST}eDebugServer,{$ENDIF}
+  Variants, TypInfo, IniFiles,uROSerializer, uROBinaryHelpers,
+  uROClientIntf, uRORes;
+
+var CloneNumber : Integer = 0;
+
+{ Copy Event handlers from one component to another.   }
+procedure CopyEvents( S, D : TPersistent );
+var
+  I  : Integer;
+  PProps : PPropList;
+  PCount : Integer;
+  M  : TMethod;
+begin
+  { Scan through all published properties...    }
+  PCount := GetTypeData( S.ClassInfo ).PropCount;
+  GetMem( PProps, PCount * sizeof(PPropInfo));
+  try
+    GetPropInfos( S.ClassInfo, PProps );
+    for I := 0 to PCount - 1 do
+    begin
+      if PProps[I].PropType^.Kind = tkMethod then
+      begin
+        M := GetMethodProp( S, PProps[I] );
+        SetMethodProp( D, PProps[I], M );
+      end;
+    end;
+  finally
+    FreeMem( PProps, PCount * sizeof(PPropInfo));
+  end;
+end;
+
+function CloneObject(Proto : TPersistent) : TPersistent;
+var
+  M : TMemoryStream;
+  T : TComponent;
+begin
+  if Proto=NIL then begin
+    result := NIL;
+    Exit;
+  end
+
+  else if (Proto is TROComplexType) then begin
+    result := TPersistent(TROComplexTypeClass(Proto.ClassType).Create);
+    result.Assign(Proto);
+    Exit;
+  end;
+
+  RegisterClass( TPersistentClass(Proto.ClassType) );
+
+  M := TMemoryStream.Create;
+  try
+    { Write prototype to stream & create a new item by reading it back. }
+    M.WriteComponent(TComponent(Proto));
+    M.Seek( 0, soFromBeginning );
+    T := M.ReadComponent( nil );
+
+    { Set owner and parent as required.     }
+    if T.Owner <> nil then T.Owner.RemoveComponent( T );
+    T.Name := format( 'Clone%d', [CloneNumber] );
+    CloneNumber := CloneNumber+1;
+
+    { The above will lose event handlers for some reason so we must }
+    { copy these using some black magic...    }
+    CopyEvents( Proto, T );
+  finally
+    M.Free;
+  end;
+  Result := T;
+end;
+
+function CloneComplexType(Proto : TROComplexType) : TROComplexType;
+begin
+  result := TROComplexType(CloneObject(Proto));
+end;
+
+function CloneBinary(Proto : Binary) : Binary;
+begin
+  if Proto=NIL then result := NIL
+  else begin
+    result := Binary.Create;
+    result.LoadFromStream(Proto);
+    result.Position := 0;
+  end;
+end;
+
+{ TRORequestParam }
+
+constructor TRORequestParam.Create(Collection: TCollection);
+begin
+  inherited;
+end;
+
+destructor TRORequestParam.Destroy;
+begin
+  if fOwnsComplexType then FreeAndNil(fComplexTypeValue);
+  if fOwnsBinary then FreeAndNil(fBinaryValue);
+  inherited;
+end;
+
+function TRORequestParam.GetDisplayName: string;
+begin
+  if (Trim(Name)='') then
+    result := inherited GetDisplayName
+  else
+    result := Name+': '+ROGetEnumName(TypeInfo(TRODataType), Ord(DataType));
+end;
+
+procedure TRORequestParam.SetTypeName(const Value: string);
+begin
+  fTypeName := Value;
+  if fTypeName <> '' then
+    DataType := rtUserDefined;
+end;
+
+procedure TRORequestParam.SetDataType(const Value: TRODataType);
+begin
+  fDataType := Value;
+
+  if (Value = rtBinary) then begin
+    if not assigned(fBinaryValue) then begin
+      fBinaryValue := Binary.Create();
+      fOwnsBinary := true;
+    end;
+  end
+  else begin
+    if fOwnsBinary then FreeAndNil(fBinaryValue);
+    fBinaryValue := nil;
+    fOwnsBinary := false;
+  end;
+
+  if Value <> rtUserDefined then
+    fTypeName := '';
+end;
+
+procedure TRORequestParam.SetFlag(const Value: TRODLParamFlag);
+begin
+  fFlag := Value;
+end;
+
+procedure TRORequestParam.SetName(const Value: string);
+begin
+  fName := Value;
+end;
+
+function TRORequestParam.GetAsBoolean: boolean;
+begin
+  if VarIsNull(fSimpleValue) then
+    result := false
+  else
+    result := fSimpleValue
+end;
+
+function TRORequestParam.GetAsCurrency: currency;
+begin
+  if VarIsNull(fSimpleValue) then
+    result := 0
+  else
+    result := fSimpleValue
+end;
+
+function TRORequestParam.GetAsDateTime: TDateTime;
+begin
+  if VarIsNull(fSimpleValue) then
+    result := 0
+  else
+    result := fSimpleValue;
+end;
+
+function TRORequestParam.GetAsFloat: double;
+begin
+  if VarIsNull(fSimpleValue) then
+    result := 0
+  else
+    result := fSimpleValue
+end;
+
+function TRORequestParam.GetAsInteger: integer;
+begin
+  if VarIsNull(fSimpleValue) then
+    result := 0
+  else
+    result := fSimpleValue;
+end;
+
+function TRORequestParam.GetAsString: string;
+begin
+  Result := VarToStrDef(fSimpleValue, '');
+end;
+
+function TRORequestParam.GetAsVariant: variant;
+begin
+  result := fSimpleValue
+end;
+
+procedure TRORequestParam.SetAsBoolean(const Value: boolean);
+begin
+  fSimpleValue := Value
+end;
+
+procedure TRORequestParam.SetAsCurrency(const Value: currency);
+begin
+  fSimpleValue := Value
+end;
+
+procedure TRORequestParam.SetAsDateTime(const Value: TDateTime);
+begin
+  fSimpleValue := Value
+end;
+
+procedure TRORequestParam.SetAsFloat(const Value: double);
+begin
+  fSimpleValue := Value
+end;
+
+procedure TRORequestParam.SetAsInteger(const Value: integer);
+begin
+  fSimpleValue := Value
+end;
+
+procedure TRORequestParam.SetAsString(const Value: string);
+begin
+  fSimpleValue := Value
+end;
+
+function TRORequestParam.GetAsAnsiString: AnsiString;
+begin
+  result := VarToAnsiStr(fSimpleValue);
+end;
+
+procedure TRORequestParam.SetAsVariant(const Value: variant);
+begin
+  fSimpleValue := Value
+end;
+
+procedure TRORequestParam.ClearValue;
+begin
+  if fOwnsComplexType then fComplexTypeValue.Free;
+  if fOwnsBinary then fBinaryValue.Free;
+  fComplexTypeValue := nil;
+  fBinaryValue := nil;
+  fSimpleValue := Null;
+  fOwnsComplexType := false;
+  fOwnsBinary := false;
+  DataType := DataType; // recreates Binary if needed
+end;
+
+function TRORequestParam.GetAsWideString: UnicodeString;
+begin
+  result := fSimpleValue
+end;
+
+procedure TRORequestParam.SetAsAnsiString(const Value: AnsiString);
+begin
+  fSimpleValue := Value;
+end;
+
+procedure TRORequestParam.SetAsWideString(const Value: UnicodeString);
+begin
+  fSimpleValue := Value
+end;
+
+function TRORequestParam.GetAsInt64: Int64;
+begin
+  result := fSimpleValue
+end;
+
+procedure TRORequestParam.SetAsInt64(const Value: Int64);
+begin
+  fSimpleValue := Value
+end;
+
+function TRORequestParam.GetAsBinary: Binary;
+begin
+  result := fBinaryValue;
+end;
+
+procedure TRORequestParam.SetAsBinary(const Value: Binary);
+begin
+  if Value <> fBinaryValue then begin
+    if fOwnsBinary then FreeAndNil(fBinaryValue);
+    fOwnsBinary := false;
+    fBinaryValue := Value;
+  end;
+end;
+
+function TRORequestParam.GetAsComplexType: TROComplexType;
+begin
+  result := fComplexTypeValue;
+end;
+
+procedure TRORequestParam.SetAsComplexType(const Value: TROComplexType);
+begin
+  if Value <> fComplexTypeValue then begin
+    if fOwnsComplexType then
+      FreeAndNil(fComplexTypeValue);
+    fOwnsComplexType := false;
+    fComplexTypeValue := Value;
+  end;
+end;
+
+function TRORequestParam.GetIsNull: boolean;
+begin
+  result := ((fDataType = rtBinary) and (fBinaryValue = nil)) or
+            ((fDataType = rtUserDefined) and (fComplexTypeValue = nil)) or
+            (fSimpleValue = Null);
+
+end;
+
+function TRORequestParam.GetSimpleValueReference: PVariant;
+begin
+  result := @fSimpleValue
+end;
+
+procedure TRORequestParam.Assign(Source: TPersistent);
+begin
+  if (Source is TRORequestParam) then begin
+    Name := TRORequestParam(Source).Name;
+    DataType := TRORequestParam(Source).DataType;
+    Flag := TRORequestParam(Source).Flag;
+    TypeName := TRORequestParam(Source).TypeName;
+    case DataType of
+      rtBinary: AsBinary := TRORequestParam(Source).AsBinary;
+      rtUserDefined: AsComplexType := TRORequestParam(Source).AsComplexType;
+      else AsVariant := AsVariant;
+    end;
+  end
+  else inherited;
+end;
+
+procedure TRORequestParam.Check;
+begin
+  case DataType of
+    rtInteger: AsInteger;
+    rtDateTime: AsDateTime;
+    rtDouble: AsFloat;
+    rtCurrency: AsCurrency;
+    rtWidestring: AsWideString;
+    rtString: AsAnsiString;
+    rtUTF8String: AsUTF8String;
+    rtInt64: AsInt64;
+    rtBoolean: AsBoolean;
+    rtVariant: AsVariant;
+    rtBinary: AsBinary;
+    rtUserDefined: AsComplexType;
+    else Assert(False, 'unsupported data type encountered in TRORequestParam '+Name);
+  end;
+end;
+
+procedure TRORequestParam.CopyRODLParam(aSourceParam: TRODLOperationParam; aPersistValues: boolean; aOldParams: TRORequestParamCollection);
+var oldparam : TRORequestParam;
+begin
+  Name := aSourceParam.Name;
+  Flag := aSourceParam.Flag;
+  DataType := StrToDataType(aSourceParam.DataType);
+
+  fSimpleValue := Null;
+  if DataType = rtUserDefined then
+    TypeName := aSourceParam.DataType
+  else
+    TypeName := '';
+
+  if aPersistValues and Assigned(aOldParams) then begin
+    oldparam := aOldParams.FindParam(Name);
+    if Assigned(oldparam) then begin
+      case DataType of
+        rtUserDefined: AsComplexType := oldparam.AsComplexType;
+        rtBinary: AsBinary := oldParam.AsBinary;
+        else AsVariant := oldparam.AsVariant;
+      end;
+    end;
+  end;
+end;
+
+function TRORequestParam.GetAsUTF8String: UTF8String;
+begin
+  result := UTF8Encode(VarToStrDef(fSimpleValue,''));
+end;
+
+procedure TRORequestParam.SetAsUTF8String(const Value: UTF8String);
+begin
+  fSimpleValue := UTF8ToString(Value);
+end;
+
+{ TRORequestParamCollection }
+
+constructor TRORequestParamCollection.Create(aDynamicRequest : TRODynamicRequest);
+begin
+  inherited Create(TRORequestParam);
+
+  fRequest := aDynamicRequest;
+end;
+
+destructor TRORequestParamCollection.Destroy;
+begin
+  inherited;
+end;
+
+function TRORequestParamCollection.Add: TRORequestParam;
+begin
+  result := TRORequestParam(inherited Add);
+end;
+
+function TRORequestParamCollection.Add(const aName: string; aDataType: TRODataType; aParamFlag: TRODLParamFlag; const aTypeName: string=''): TRORequestParam; 
+begin
+  result := Add();
+  with result do begin
+    Name := aName;
+    DataType := aDataType;
+    Flag :=aParamFlag;
+    if DataType = rtUserDefined then
+      TypeName := aTypeName;
+  end;
+end;
+
+function TRORequestParamCollection.Insert(aIndex: integer): TRORequestParam;
+begin
+  result := TRORequestParam(inherited Insert(aIndex));
+end;
+
+function TRORequestParamCollection.GetItems(aIndex: integer): TRORequestParam;
+begin
+  result := TRORequestParam(inherited Items[aIndex]);
+end;
+
+function TRORequestParamCollection.IndexOf(aItem: TRORequestParam): integer;
+var i: integer;
+begin
+  result := - 1;
+  for i := 0 to (Count - 1) do
+    if (aItem = Items[i]) then begin
+      result := i;
+      Exit;
+  end;
+end;
+
+procedure TRORequestParamCollection.SetItems(aIndex: integer; aNewItem: TRORequestParam);
+begin
+  inherited Items[aIndex].Assign(aNewItem);
+end;
+
+procedure TRORequestParamCollection.Refresh;
+var
+  svc : TRODLService;
+  oper : TRODLOperation;
+begin
+  svc := TRODLService(fRequest.RODLLibrary.GetService(fRequest.RemoteService.ServiceName));
+  oper := TRODLOperation(svc.Default.GetOperation(fRequest.MethodName, TRUE));
+
+  CopyRODLOperation(oper);
+end;
+
+procedure TRORequestParamCollection.CopyRODLOperation(anOperation: TRODLOperation);
+var i : integer;
+    param : TRORequestParam;
+begin
+  Clear;
+
+  {$IFDEF DEBUG_REMOBJECTS_DYNAMICREQUEST}
+  DebugServer.EnterMethod('TRORequestParamCollection.CopyRODLOperation');
+  try
+  {$ENDIF}
+
+  for i := 0 to (anOperation.Count-1) do begin
+    {$IFDEF DEBUG_REMOBJECTS_DYNAMICREQUEST}
+    DebugServer.Write('Adding Parameter %s',[anOperation.Items[i].Name]);
+    {$ENDIF}
+    param := Add;
+    param.Name := anOperation.Items[i].Name;
+    param.DataType := StrToDataType(anOperation.Items[i].DataType);
+    param.Flag := anOperation.Items[i].Flag;
+
+    if (param.DataType=rtUserDefined)
+      then param.TypeName := anOperation.Items[i].DataType
+      else param.TypeName := '';
+  end;
+
+  if (anOperation.Result<>NIL) then begin
+    {$IFDEF DEBUG_REMOBJECTS_DYNAMICREQUEST}
+    DebugServer.Write('Adding Result');
+    {$ENDIF}
+
+    param := Insert(0);
+
+    param.Name := anOperation.Result.Name;
+    param.DataType := StrToDataType(anOperation.Result.DataType);
+    param.Flag := anOperation.Result.Flag;
+
+    if (param.DataType=rtUserDefined)
+      then param.TypeName := anOperation.Result.DataType
+      else param.TypeName := '';
+  end;
+
+  {$IFDEF DEBUG_REMOBJECTS_DYNAMICREQUEST}
+  finally
+    DebugServer.ExitMethod('TRORequestParamCollection.CopyRODLOperation');
+  end;
+  {$ENDIF}
+
+end;
+
+function TRORequestParamCollection.FindParam(const aParamName: string): TRORequestParam;
+var i: Integer;
+begin
+  result := NIL;
+  for i := 0 to (Count - 1) do
+    if SameText(Items[i].Name, aParamName) then begin
+      result := Items[i];
+      Exit;
+    end;
+end;                                            
+
+function TRORequestParamCollection.ParamByName(const aParamName: string): TRORequestParam;
+begin
+  result := FindParam(aParamName);
+  if not assigned(result) then raise Exception.CreateFmt(err_CannotFindParameter, [aParamName]);    
+end;
+
+procedure TRORequestParamCollection.ClearValues;
+var
+  i: Integer;
+begin
+  for i := 0 to (Count - 1) do
+    Items[i].ClearValue;
+end;
+
+procedure TRORequestParamCollection.ClearInputValues;
+var
+  i: Integer;
+begin
+  for i := 0 to (Count - 1) do
+    if (Items[i].Flag in [fIn, fInOut]) then // do not remove fInOut
+      Items[i].ClearValue;
+end;
+
+procedure TRORequestParamCollection.ClearOutputValues;
+var
+  i: Integer;
+begin
+  for i := 0 to (Count - 1) do
+    if (Items[i].Flag in [fOut, fResult]) then // do not add fInOut
+      Items[i].ClearValue;
+end;
+
+procedure TRORequestParamCollection.Clone(Source: TRORequestParamCollection);
+var i: integer;
+    v: Variant;
+begin
+  ClearValues;
+  Clear;
+
+  Assign(Source);
+
+  for i := 0 to (Source.Count - 1) do begin
+    case Source[i].DataType of
+      rtUserDefined : Items[i].AsComplexType := CloneObject(Source.Items[i].AsComplexType) as TROComplexType;
+      rtBinary : Items[i].AsBinary := CloneBinary(Source.Items[i].AsBinary);
+      else begin
+        v := Source.Items[i].AsVariant;
+        Items[i].AsVariant := v;
+      end;
+    end;
+  end;
+end;
+
+function TRORequestParamCollection.GetResultParam: TRORequestParam;
+var
+  i: Integer;
+begin
+  for i := 0 to (Count - 1) do begin
+    if (Items[i].Flag in [fResult]) then begin
+      result := Items[i];
+      exit;
+    end;
+  end;
+  result := nil;
+end;
+
+function TRORequestParamCollection.GetHasResultParam: boolean;
+begin
+  result := GetResultParam() <> nil;
+end;
+
+{ TRODynamicRequest }
+
+constructor TRODynamicRequest.Create(aOwner: TComponent);
+begin
+  inherited;
+  fParams := TRORequestParamCollection.Create(Self);
+end;
+
+destructor TRODynamicRequest.Destroy;
+begin
+  fParams.Free;
+  inherited;
+end;
+
+procedure TRODynamicRequest.DoExecute(aParams: TRORequestParamCollection=nil);
+var
+  // Temporary buffers
+  vint: integer;
+  vdatetime: TDateTime;
+  vdouble: double;
+  vcurrency: currency;
+  vwidestring: widestring;
+  vstring: Ansistring;
+  vutf8string: UTF8String;
+  vint64: int64;
+  vboolean: boolean;
+  vcls : TROComplexTypeClass;
+  vobj : TROComplexType;
+  vbinary : Binary;
+  vvariant: Variant;
+
+  lParamName : string;
+  lComplexTypeClass : TClass;
+  lMessage: IROMessage;
+
+  procedure WriteParam(aParam: TRORequestParam);
+  begin
+    if not Assigned(aParam) then exit; // allow passing of nil for ease of use
+    lParamName := aParam.Name;
+
+    case aParam.DataType of
+      rtInteger: begin
+          vint := aParam.AsInteger;
+          lMessage.Write(lParamName, TypeInfo(integer), vint, []);
+        end;
+      rtDateTime: begin
+          vdatetime := aParam.AsDateTime;
+          lMessage.Write(lParamName, TypeInfo(TDateTime), vdatetime, []);
+        end;
+      rtDouble: begin
+          vdouble := aParam.AsFloat;
+          lMessage.Write(lParamName, TypeInfo(TDateTime), vdouble, []);
+        end;
+      rtCurrency: begin
+          vcurrency := aParam.AsCurrency;
+          lMessage.Write(lParamName, TypeInfo(currency), vcurrency, []);
+        end;
+      rtWidestring: begin
+          vwidestring := aParam.AsWideString;
+          lMessage.Write(lParamName, TypeInfo(widestring), vwidestring, []);
+        end;
+      rtString: begin
+          vstring := aParam.AsAnsiString;
+          lMessage.Write(lParamName, TypeInfo(AnsiString), vstring, []);
+        end;
+      rtUTF8String: begin
+          vutf8string := aParam.AsUTF8String;
+          lMessage.Write(lParamName, TypeInfo(UTF8String), vutf8string, []);
+        end;
+      rtInt64: begin
+          vint64 := aParam.AsInt64;
+          lMessage.Write(lParamName, TypeInfo(int64), vint64, []);
+        end;
+      rtBoolean: begin
+          vboolean := aParam.AsBoolean;
+          lMessage.Write(lParamName, TypeInfo(boolean), vboolean, []);
+        end;
+      rtVariant: begin
+          vvariant := aParam.AsVariant;
+          lMessage.Write(aParam.Name, TypeInfo(variant), vvariant, []);
+        end;
+      rtBinary: begin
+          vbinary := aParam.AsBinary;
+          if Assigned(vbinary) then begin
+            lMessage.Write(lParamName, vbinary.ClassInfo, vbinary, []);
+          end
+          else begin
+            lMessage.Write(lParamName, TypeInfo(binary), vbinary, []);
+          end;
+        end;
+      rtUserDefined : begin
+          vobj := aParam.AsComplexType;
+          if assigned(vobj) then
+            lMessage.Write(lParamName, vobj.ClassInfo, vobj, [])
+          else begin
+            lComplexTypeClass := FindROClass(aParam.TypeName);
+            if not assigned(lComplexTypeClass) then
+              raise Exception.CreateFmt('Unknown class %s', [aParam.TypeName]);
+            lMessage.Write(lParamName, lComplexTypeClass.ClassInfo, vobj, []);
+          end;
+        end;
+      else
+        NotSupported;
+    end; { case }
+  end;
+
+  procedure ReadParam(aParam: TRORequestParam);
+  var
+    lDummy: IROCustomStreamableType;
+  begin
+    if not Assigned(aParam) then exit; // allow passing of nil for ease of use
+    lParamName := aParam.Name;
+
+    {$IFDEF DEBUG_REMOBJECTS_DYNAMICREQUEST}
+    DebugServer.Write('Reading Parameter %s.',[lParamName]);
+    {$ENDIF}
+
+    case aParam.DataType of
+      rtInteger: begin
+          lMessage.Read(lParamName, TypeInfo(integer), vint, []);
+          aParam.AsInteger := vint;
+        end;
+      rtDateTime: begin
+          lMessage.Read(lParamName, TypeInfo(TDateTime), vdatetime, []);
+          aParam.AsDateTime := vdatetime;
+        end;
+      rtDouble: begin
+          lMessage.Read(lParamName, TypeInfo(TDateTime), vdouble, []);
+          aParam.AsFloat := vdouble;
+        end;
+      rtCurrency: begin
+          lMessage.Read(lParamName, TypeInfo(currency), vcurrency, []);
+          aParam.AsCurrency := vcurrency;
+        end;
+      rtWidestring: begin
+          lMessage.Read(lParamName, TypeInfo(widestring), vwidestring, []);
+          aParam.AsWideString := vwidestring;
+        end;
+      rtString: begin
+          lMessage.Read(lParamName, TypeInfo(AnsiString), vstring, []);
+          aParam.AsAnsiString := vstring;
+        end;
+      rtUTF8String: begin
+          lMessage.Read(lParamName, TypeInfo(UTF8String), vutf8string, []);
+          aParam.AsUTF8String := vutf8string;
+        end;
+      rtInt64: begin
+          lMessage.Read(lParamName, TypeInfo(int64), vint64, []);
+          aParam.AsInt64 := vint64;
+        end;
+      rtBoolean: begin
+          lMessage.Read(lParamName, TypeInfo(boolean), vboolean, []);
+          aParam.AsBoolean := vboolean;
+        end;
+      rtBinary: begin
+          vbinary := aParam.AsBinary;
+          if assigned(vbinary) and aParam.fOwnsBinary then FreeAndNil(aParam.fBinaryValue);
+          vbinary := nil;
+          lMessage.Read(lParamName, TypeInfo(binary), vbinary, []);
+          {
+          if Assigned(vbinary) then begin
+            lMessage.Read(lParamName, vbinary.ClassInfo, vbinary, []);
+          end
+          else begin
+            lMessage.Read(lParamName, TypeInfo(binary), vbinary, []);
+          end;
+          }
+          aParam.AsBinary := vbinary;
+          aParam.OwnsBinary:=True;
+        end;
+      rtVariant:
+       begin
+          lMessage.Read(aParam.Name, TypeInfo(variant), vvariant, []);
+          aParam.AsVariant:=vvariant;
+       end;
+      rtUserDefined : begin
+          { ToDo -omh: I'm not particulaty happy with this approach yet (both here AND in the general
+                       streaming code. We should add a better hook to create the proper class for reading
+                       complex/array types. See also commenst in uROStreamSerializer. }
+          if Assigned(aParam.AsComplexType) and (aParam.fOwnsComplexType)  then begin
+            if not Supports(aParam, IROCustomStreamableType, lDummy) then FreeAndNil(aParam.fComplexTypeValue);
+          end;
+
+          if Assigned(aParam.AsComplexType) then begin
+            vobj := aParam.AsComplexType;
+            lMessage.Read(lParamName, vobj.ClassInfo, vobj, []);
+          end
+          else begin
+            vobj := nil;
+            vcls := FindROClass(aParam.TypeName);
+            if Assigned(vcls) then begin
+              lMessage.Read(lParamName, vcls.ClassInfo, vobj, []);
+            end
+            else begin
+              if Assigned(OnFindCustomTypeImplementation) then
+                OnFindCustomTypeImplementation(self, aParam.TypeName, aParam, vobj);
+
+              if not Assigned(vobj) then
+                raise EROUnknownType.CreateFmt(err_UnknownClass, [aParam.TypeName]);
+
+              lMessage.Read(lParamName, vobj.ClassInfo, vobj, []);
+            end;
+
+          end;
+          aParam.AsComplexType := vobj;
+        end;
+      else
+        NotSupported;
+    end; { case }
+  end;
+
+var
+  lChannel: IROTransportChannel;
+  i: integer;
+
+begin
+  CheckProperties;
+
+  if not assigned(aParams) then aParams := Params; // use own params, if none are passed in.
+
+  try
+    lMessage := RemoteService.Message as IROMessage;
+    lChannel := RemoteService.Channel as IROTransportChannel;
+
+    lMessage.InitializeRequestMessage(lChannel, '', fRemoteService.ServiceName, MethodName);
+    for i := 0 to (aParams.Count-1) do
+      if (aParams[i].Flag in [fIn, fInOut]) then
+        WriteParam(aParams[i]);
+    lMessage.Finalize;
+
+    (RemoteService.Channel as IROTransportChannel).Dispatch(lMessage);
+
+    ReadParam(aParams.ResultParam); // important: Result must be read before any of the other out or var parameters
+    for i := 0 to (aParams.Count - 1) do
+      if (aParams[i].Flag in [fOut, fInOut]) then
+        ReadParam(aParams[i]);
+
+  finally
+    lMessage.FreeStream;
+  end;
+end;
+
+procedure TRODynamicRequest.Execute(aParams: TRORequestParamCollection=nil);
+var
+  lIgnoreException : boolean;
+begin
+  if Assigned(fOnBeforeExecute) then
+    fOnBeforeExecute(Self);
+  try
+    try
+      DoExecute(aParams);
+    except
+      on E:Exception do begin
+        lIgnoreException := FALSE;
+        if Assigned(fOnExecuteError) then
+          fOnExecuteError(Self, E, lIgnoreException);
+        if not lIgnoreException then raise;
+      end;
+    end;
+  finally
+    if Assigned(fOnAfterExecute) then
+      fOnAfterExecute(Self);
+  end;
+end;
+
+function TRODynamicRequest.GetParams: TRORequestParamCollection;
+begin
+  result := fParams
+end;
+
+function TRODynamicRequest.GetRODLLibrary: TRODLLibrary;
+begin
+  result := RemoteService.GetRODLLibrary();
+end;
+
+function TRODynamicRequest.FindParam(const aParamName: string): TRORequestParam;
+begin
+  result := fParams.FindParam(aParamName);
+end;
+
+function TRODynamicRequest.ParamByName(const aParamName: string): TRORequestParam;
+begin
+  result := fParams.ParamByName(aParamName);
+end;
+
+procedure TRODynamicRequest.RefreshParams(aPersistValues: boolean);
+var
+  lLibrary: TRODLLibrary;
+  lService: TRODLService;
+  lOperation: TRODLOperation;
+begin
+  CheckProperties;
+
+  lLibrary := RemoteService.GetRODLLibrary();
+  lService := lLibrary.FindService(RemoteService.ServiceName);
+  if not Assigned(lService) then RaiseError('Undefined service "' + RemoteService.ServiceName + '"');
+
+  repeat
+    lOperation := lService.Default.FindOperation(MethodName);
+    if not Assigned(lOperation) then begin
+      if lService.Ancestor <> '' then begin
+        lService := lLibrary.FindService(lService.Ancestor);
+      end
+      else
+        lService := nil;
+    end;
+  until Assigned(lOperation) or not Assigned(lService);
+
+  if not Assigned(lOperation) then RaiseError('Method "' + MethodName + '" not found in service ' + RemoteService.ServiceName + ' or its anchestors');
+  RefreshParams(lOperation, aPersistValues);
+end;
+
+procedure TRODynamicRequest.RefreshParams(aOperation: TRODLOperation; aPersistValues: boolean);
+var
+  i: integer;
+  lOldParams: TRORequestParamCollection;
+  lNewParam: TRORequestParam;
+begin
+  lOldParams := nil;
+  try
+
+    if aPersistValues then begin
+      lOldParams := TRORequestParamCollection.Create(nil);
+      for i := 0 to (Params.Count - 1) do begin
+        with lOldParams.Add do begin
+          Assign(Params[i]);
+        end;
+      end;
+    end;
+
+    Params.Clear();
+
+    if Assigned(aOperation.Result) then begin
+      lNewParam := Params.Add();
+      lNewParam.CopyRODLParam(aOperation.Result, true, lOldParams);
+    end;
+
+    for i := 0 to (aOperation.Count - 1) do begin
+      lNewParam := Params.Add();
+      lNewParam.CopyRODLParam(aOperation.Items[i], true, lOldParams);
+    end;
+  finally
+    FreeAndNil(lOldParams);
+  end;
+end;
+
+procedure TRODynamicRequest.SetMethodName(const Value: string);
+var
+  lOldValue: string;
+begin
+  if Value <> fMethodName then begin
+    lOldValue := fMethodName;
+    fMethodName := Value;
+    MethodNameChanged();
+    if Assigned(fOnChangeMethodName) then fOnChangeMethodName(Self, lOldValue, fMethodName);
+  end;
+end;
+
+procedure TRODynamicRequest.SetParams(
+  const Value: TRORequestParamCollection);
+begin
+  fParams.Assign(Value);
+end;
+
+procedure TRODynamicRequest.SetRemoteService(const Value: TRORemoteService);
+begin
+  if Value <> fRemoteService then begin
+    fRemoteService := Value;
+    if assigned(fRemoteService) then fRemoteService.FreeNotification(self);
+  end;
+end;
+
+procedure TRODynamicRequest.ListServiceOperations(
+  const aServiceName: string; aList: TStrings);
+var service : TRODLService;
+  i: Integer;
+begin
+  service := TRODLService(RODLLibrary.FindService(aServiceName));
+  Check(service=NIL, err_CannotFindService, [aServiceName]);
+
+  while service<>NIL do begin
+    for i := 0 to (service.Default.Count - 1) do begin
+      aList.Add(service.Default.Items[i].Name)
+    end;
+
+    if service.Ancestor<>''
+      then service := RODLLibrary.FindService(service.Ancestor)
+      else Break;
+  end;
+end;
+
+procedure TRODynamicRequest.Notification(AComponent: TComponent;
+  Operation: TOperation);
+begin
+  inherited;
+  if Operation = opRemove then begin
+    if AComponent = RemoteService then RemoteService := nil;
+  end;
+end;
+
+procedure TRODynamicRequest.CreateInputComplexTypes(SkipIfAssigned : boolean);
+var
+  i: Integer;
+  cls: TROComplexTypeClass;
+  vobj: TROComplexType;
+begin
+  for i := 0 to (fParams.Count - 1) do
+    if (fParams[i].Flag=fIn) then begin
+      case fParams[i].DataType of
+        rtUserDefined: begin
+          if Assigned(fParams[i].AsComplexType) then begin
+            if SkipIfAssigned then
+              Continue
+            else
+              fParams[i].ClearValue;
+          end;
+
+          cls := FindROClass(fParams[i].TypeName);
+          if assigned(cls) then
+             vObj := cls.Create;
+          if not assigned(vObj) and Assigned(OnFindCustomTypeImplementation) then
+            OnFindCustomTypeImplementation(self, fParams[i].TypeName, fParams[i], vobj);
+          Assert(Assigned(vobj), Format(err_UnknownComplexType, [fParams[i].TypeName]));
+          fParams[i].AsComplexType := vobj;
+        end;
+        rtBinary: begin
+          if Assigned(fParams[i].AsBinary) then begin
+            if SkipIfAssigned then
+              Continue
+            else
+              fParams[i].ClearValue;
+          end;
+
+          fParams[i].AsBinary := Binary.Create;
+        end;
+      end;
+    end;
+end;
+
+function TRODynamicRequest.GetIsFunction: boolean;
+begin
+  result := fParams.ResultParam<>NIL
+end;
+
+procedure TRORequestParam.DefineProperties(Filer: TFiler);
+{$IFNDEF DESIGNTIME}
+var
+  cls: TROComplexTypeClass;
+{$ENDIF DESIGNTIME}
+begin
+  inherited;
+
+  {$IFNDEF DESIGNTIME}
+  if Assigned(Collection) and (Collection.Owner <> nil) and
+    (Collection.Owner is TComponent) and (csDesigning in TComponent(Collection.Owner).ComponentState) then
+    exit;
+
+  if (DataType = rtUserDefined) and not Assigned(fComplexTypeValue) and
+  (Flag in [fIn, fInOut]) then
+  begin
+    cls := FindROClass(TypeName);
+    if assigned(cls) then
+       fComplexTypeValue := cls.Create;
+    if not assigned(fComplexTypeValue) and Assigned(TRORequestParamCollection(Collection).fRequest.OnFindCustomTypeImplementation) then
+      TRORequestParamCollection(Collection).fRequest.OnFindCustomTypeImplementation(TRORequestParamCollection(Collection).fRequest, TypeName, self, fComplexTypeValue);
+    Assert(Assigned(fComplexTypeValue), Format(err_UnknownComplexType, [TypeName]));
+  end;
+
+  Filer.DefineProperty('SimpleValue', ReadSimpleValue, WriteSimpleValue,
+    not (fDataType in [rtBinary, rtUserDefined]));
+  Filer.DefineProperty('ComplexTypeValue', ReadComplexTypeValue, WriteComplexTypeValue,
+    (fDataType = rtUserDefined) and Assigned(fComplexTypeValue));
+  Filer.DefineBinaryProperty('BinaryValue', ReadBinaryValue, WriteBinaryValue,
+    (fDataType = rtBinary) and Assigned(fBinaryValue));
+  {$ENDIF DESIGNTIME}
+end;
+
+procedure TRORequestParam.ReadBinaryValue(Stream: TStream);
+begin
+  if not Assigned(fBinaryValue) then
+  begin
+    fBinaryValue := Binary.Create;
+  end;
+
+  fBinaryValue.LoadFromStream(Stream);
+end;
+
+procedure TRORequestParam.WriteBinaryValue(Stream: TStream);
+begin
+  fBinaryValue.SaveToStream(Stream);
+end;
+
+type
+  TReader2 = class(TReader)
+  private
+  protected
+  public
+    procedure ReadProperty2(Instance: TPersistent);
+  end;
+
+procedure TReader2.ReadProperty2(Instance: TPersistent);
+begin
+  ReadProperty(Instance);
+end;
+
+procedure TRORequestParam.ReadComplexTypeValue(Reader: TReader);
+var
+  cls: TROComplexTypeClass;
+begin
+  if not Assigned(fComplexTypeValue) then
+  begin
+    cls := FindROClass(TypeName);
+    if assigned(cls) then
+       fComplexTypeValue := cls.Create;
+    if not assigned(fComplexTypeValue) and Assigned(TRORequestParamCollection(Collection).fRequest.OnFindCustomTypeImplementation) then
+      TRORequestParamCollection(Collection).fRequest.OnFindCustomTypeImplementation(TRORequestParamCollection(Collection).fRequest, TypeName, self, fComplexTypeValue);
+    Assert(Assigned(fComplexTypeValue), Format(err_UnknownComplexType, [TypeName]));
+  end;
+
+  Reader.ReadListBegin;
+  while not Reader.EndOfList do TReader2(Reader).ReadProperty(fComplexTypeValue);
+  Reader.ReadListEnd;
+end;
+
+type
+  TWriter2 = class(TWriter)
+  private
+  protected
+  public
+    procedure WriteProperties2(Instance: TPersistent);
+  end;
+
+procedure TWriter2.WriteProperties2(Instance: TPersistent);
+begin
+  WriteProperties(Instance);
+end;
+
+procedure TRORequestParam.WriteComplexTypeValue(Writer: TWriter);
+begin
+  Assert(Assigned(fComplexTypeValue));
+  
+  Writer.WriteListBegin;
+  TWriter2(Writer).WriteProperties2(fComplexTypeValue);
+  Writer.WriteListEnd;
+end;
+
+procedure TRORequestParam.ReadSimpleValue(Reader: TReader);
+begin
+  {$IFDEF FPC}
+  FPC_ReadVariant(Reader);
+  {$ELSE}
+  fSimpleValue := Reader.ReadVariant;
+  {$ENDIF}
+end;
+
+procedure TRORequestParam.WriteSimpleValue(Writer: TWriter);
+begin
+  {$IFDEF FPC}
+  FPC_WriteVariant(Writer);
+  {$ELSE}
+  Writer.WriteVariant(fSimpleValue);
+  {$ENDIF}
+end;
+
+{$IFDEF FPC}
+procedure TRORequestParam.FPC_ReadVariant(Reader: TReader);
+begin
+  VarClear(fSimpleValue);
+  case Reader.NextValue of
+    vaNil, vaNull:
+         if Reader.ReadValue <> vaNil then
+            fSimpleValue := Variants.Null;
+    vaInt8:              fSimpleValue := Shortint(Reader.ReadInteger);
+    vaInt16:             fSimpleValue := Smallint(Reader.ReadInteger);
+    vaInt32:             fSimpleValue := Reader.ReadInteger;
+    vaExtended:          fSimpleValue := Reader.ReadFloat;
+    vaSingle:            fSimpleValue := Reader.ReadSingle;
+    vaCurrency:          fSimpleValue := Reader.ReadCurrency;
+    vaDate:              fSimpleValue := Reader.ReadDate;
+    vaString, vaLString: fSimpleValue := Reader.ReadString;
+    vaWString,
+    vaUTF8String:        fSimpleValue := Reader.ReadWideString;
+    vaFalse, vaTrue:     fSimpleValue := (Reader.ReadValue = vaTrue);
+    vaInt64:             fSimpleValue := Reader.ReadInt64;
+  else
+    raise Exception.Create('Error reading ...');
+  end;
+end;
+
+procedure TRORequestParam.FPC_WriteVariant(Writer: TWriter);
+begin
+  if VarIsArray(fSimpleValue) then
+    raise Exception.Create('Error writing ...');
+  case VarType(fSimpleValue) and varTypeMask of
+    {varEmpty:
+      Writer.WriteValue(vaNil);
+    varNull:
+      Writer.WriteValue(vaNull);}
+    varUString,
+    varOleStr:
+      Writer.WriteWideString(fSimpleValue);
+    varString:
+      Writer.WriteString(fSimpleValue);
+    varByte, varShortInt, varWord, varSmallInt, varInteger:
+      Writer.WriteInteger(TVarData(fSimpleValue).vInteger);
+    varSingle:
+      Writer.WriteSingle(TVarData(fSimpleValue).vSingle);
+    varDouble:
+      Writer.WriteFloat(TVarData(fSimpleValue).vDouble);
+    varCurrency:
+      Writer.WriteCurrency(fSimpleValue);
+    varDate:
+      Writer.WriteDate(fSimpleValue);
+    varBoolean:
+    begin
+      if fSimpleValue then
+        Writer.WriteBoolean(True)
+      else
+        Writer.WriteBoolean(False);
+{    varLongWord, varInt64:
+      begin
+        LInt64 := fSimpleValue;
+        WriteInteger(LInt64);
+      end; }
+    end;
+  else
+    raise Exception.Create('Error writing ...');
+  end;
+end;
+
+{$ENDIF}
+procedure TRODynamicRequest.MethodNameChanged;
+begin
+end;
+
+procedure TRODynamicRequest.CheckProperties;
+begin
+  Check(RemoteService = nil, Name + '.RemoteService must be assigned.');
+  RemoteService.CheckProperties;
+  Check(MethodName = '', Name + '.MethodName must be set.');  
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROEncryption.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROEncryption.pas
new file mode 100644
index 0000000..6e7234c
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROEncryption.pas	
@@ -0,0 +1,570 @@
+unit uROEncryption;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+// todo : add hash checksum to encrypted stream to ensure integrity
+
+interface
+
+uses
+  Windows, SysUtils, Classes,
+  uROCipher, uROCiphers, uROCipher1;
+
+type
+  TROEncryptionEvent = procedure(Sender: TObject;
+    OriginalStream: TStream; var ProcessedStream: TStream) of object;
+
+  // keep related encryption types together so the class arrays below will work
+  // be sure to add new types to both the appropriate class array and
+  // the set assignment (in Initialization)
+  //
+  // if you add a new cipher family (like DECCiphers), be sure to add
+  // a "if iEncMethod in MyCiphers" block to both the Extract and Enclose methods
+  // where you handle default keys and instantiating the Cipher variable
+  //
+  TROEncryptionMethod = (tetNone,       //no encryption
+    tetDES, tetBlowfish, tetTwoFish, tetRijndael // DEC encryption}
+    );
+
+  TROCryptoKey = type Ansistring;
+
+const
+  TDECEncryptionClasses: array[tetDES..tetRijndael] of TROCipherClass =
+    (TROCipher_3TDES, TROCipher_Blowfish, TROCipher_Twofish, TROCipher_Rijndael);
+
+const
+  ROStreamIdentifier: AnsiString = 'rorocks';
+  // the following are binary values - 1, 2, 4, etc.
+  ROStreamCompressed = $00000001;
+  ROStreamEncrypted = $00000002;
+
+  ValidStreams      = $00000003;        // sum of all stream types - for detecting invalid values
+
+  // key is Ripe256 hash of 'RemObjects Rules!'
+  // 256 bit key is enough for any of the included ciphers
+  // if a DEC-based cipher is added which needs more than a 256-bit key, replace this.
+
+  DefaultDECCipherKey = '12E4F3024E6F3D720E05984053ED365D7994B471691D8520979AD8D4DB81DF78';
+
+var
+  DECCiphers        : set of TROEncryptionMethod;
+  LastCompressTime,
+    LastEncryptTime : Double;
+  HPCFreq           : Int64;
+
+type
+  TROCustomEncryption = class(TPersistent)
+  private
+    { Private declarations }
+    FEncryptionSendMethod: TROEncryptionMethod;
+    FEncryptionSendKey: TROCryptoKey;
+    FEncryptionRecvKey: TROCryptoKey;
+    FUseCompression: Boolean;
+    FOnBeforeEncryption: TROEncryptionEvent; { Defined in Classes unit. }
+    FOnAfterDecryption: TROEncryptionEvent;
+
+    timebefore, timeafter: Int64;
+
+  protected
+    procedure Enclose(const iSourceStream, iDestStream: TStream;
+      iEncMethod: TROEncryptionMethod; isCompressed: Boolean;
+      iKey: Ansistring = '');
+    function Extract(const iSourceStream, iDestStream: TStream;
+      iKey: Ansistring = ''): Int64;
+    { Protected declarations }
+    function GetEncryptionSendMethod: TROEncryptionMethod; virtual;
+    procedure SetEncryptionSendMethod(NewValue: TROEncryptionMethod); virtual;
+    function GetEncryptionSendKey: TROCryptoKey; virtual;
+    procedure SetEncryptionSendKey(NewValue: TROCryptoKey); virtual;
+    function GetEncryptionRecvKey: TROCryptoKey; virtual;
+    procedure SetEncryptionRecvKey(NewValue: TROCryptoKey); virtual;
+    function GetUseCompression: Boolean; virtual;
+    procedure SetUseCompression(NewValue: Boolean); virtual;
+    { Event triggers: }
+    procedure TriggerBeforeEncryptionEvent(iOriginalStream: TStream; var iProcessedStream: TStream); virtual;
+    procedure TriggerAfterDecryptionEvent(iOriginalStream: TStream; var iProcessedStream: TStream); virtual;
+    procedure AssignTo(Dest: TPersistent); override;
+    property OnBeforeEncryption: TROEncryptionEvent read FOnBeforeEncryption write FOnBeforeEncryption;
+    property OnAfterDecryption: TROEncryptionEvent read FOnAfterDecryption write FOnAfterDecryption;
+  public
+    { Public declarations }
+    constructor Create;//(aOwner: TComponent); override;
+    destructor Destroy; override;
+    procedure Encrypt(iPlaintext, iCiphertext: TStream); virtual;
+    procedure Decrypt(iCiphertext, iPlaintext: TStream); virtual;
+  published
+    { Published properties and events }
+    property EncryptionMethod: TROEncryptionMethod read GetEncryptionSendMethod write SetEncryptionSendMethod default tetNone; { Published }
+    property EncryptionSendKey: TROCryptoKey read GetEncryptionSendKey write SetEncryptionSendKey; { Published }
+    property EncryptionRecvKey: TROCryptoKey read GetEncryptionRecvKey write SetEncryptionRecvKey; { Published }
+    property UseCompression: Boolean read GetUseCompression write SetUseCompression default False; { Published }
+  end;                                  { TROCustomEncryption }
+
+  TROEncryption = class(TROCustomEncryption)
+  published
+    property OnBeforeEncryption;
+    property OnAfterDecryption;
+  end;
+  
+implementation
+
+uses
+  uROZLib;
+
+function TROCustomEncryption.GetEncryptionSendMethod: TROEncryptionMethod;
+{ Returns the value of data member FEncryptionSendMethod. }
+begin
+  { ToDo -cCDK: Add query/calculation code here and/or modify result below. }
+  GetEncryptionSendMethod := FEncryptionSendMethod;
+end;                                    { GetEncryptionSendMethod }
+
+procedure TROCustomEncryption.SetEncryptionSendMethod(NewValue: TROEncryptionMethod);
+{ Sets data member FEncryptionSendMethod to newValue. }
+begin
+  if FEncryptionSendMethod <> NewValue then
+  begin
+    FEncryptionSendMethod := NewValue;
+    { ToDo -cCDK: Add display update code here if needed. }
+  end;
+end;                                    { SetEncryptionSendMethod }
+
+function TROCustomEncryption.GetEncryptionSendKey: TROCryptoKey;
+{ Returns the value of data member FEncryptionSendKey. }
+begin
+  { ToDo -cCDK: Add query/calculation code here and/or modify result below. }
+  GetEncryptionSendKey := FEncryptionSendKey;
+end;                                    { GetEncryptionSendKey }
+
+procedure TROCustomEncryption.SetEncryptionSendKey(NewValue: TROCryptoKey);
+{ Sets data member FEncryptionSendKey to newValue. }
+begin
+  if FEncryptionSendKey <> NewValue then
+  begin
+    FEncryptionSendKey := NewValue;
+    { ToDo -cCDK: Add display update code here if needed. }
+  end;
+end;                                    { SetEncryptionSendKey }
+
+function TROCustomEncryption.GetEncryptionRecvKey: TROCryptoKey;
+{ Returns the value of data member FEncryptionRecvKey. }
+begin
+  { ToDo -cCDK: Add query/calculation code here and/or modify result below. }
+  GetEncryptionRecvKey := FEncryptionRecvKey;
+end;                                    { GetEncryptionRecvKey }
+
+procedure TROCustomEncryption.SetEncryptionRecvKey(NewValue: TROCryptoKey);
+{ Sets data member FEncryptionRecvKey to newValue. }
+begin
+  if FEncryptionRecvKey <> NewValue then
+  begin
+    FEncryptionRecvKey := NewValue;
+    { ToDo -cCDK: Add display update code here if needed. }
+  end;
+end;                                    { SetEncryptionRecvKey }
+
+function TROCustomEncryption.GetUseCompression: Boolean;
+{ Returns the value of data member FUseCompression. }
+begin
+  { ToDo -cCDK: Add query/calculation code here and/or modify result below. }
+  GetUseCompression := FUseCompression;
+end;                                    { GetUseCompression }
+
+procedure TROCustomEncryption.SetUseCompression(NewValue: Boolean);
+{ Sets data member FUseCompression to newValue. }
+begin
+  if FUseCompression <> NewValue then
+  begin
+    FUseCompression := NewValue;
+    { ToDo -cCDK: Add display update code here if needed. }
+  end;
+end;                                    { SetUseCompression }
+
+procedure TROCustomEncryption.Encrypt(iPlaintext, iCiphertext: TStream); { public }
+var
+  NewStream         : TStream;
+begin
+  NewStream := nil;
+  TriggerBeforeEncryptionEvent(iPlaintext, NewStream);
+
+  if NewStream <> nil then
+  begin
+    NewStream.Seek(0,soFromBeginning);
+    Enclose(NewStream, iCiphertext, FEncryptionSendMethod, FUseCompression,
+      FEncryptionSendKey);
+    NewStream.Free;
+  end
+  else
+  begin
+    iPlaintext.seek(0, soFromBeginning);
+    Enclose(iPlaintext, iCiphertext, FEncryptionSendMethod, FUseCompression,
+      FEncryptionSendKey);
+  end;
+end;                                    { Encrypt }
+
+procedure TROCustomEncryption.Decrypt(iCiphertext, iPlaintext: TStream); { public }
+var
+  NewStream         : TStream;
+  OutStream         : TMemoryStream;
+begin
+  OutStream := TMemoryStream.Create;
+  try
+    Extract(iCiphertext, OutStream, FEncryptionRecvKey);
+    NewStream := nil;
+    TriggerAfterDecryptionEvent(OutStream, NewStream);
+    if NewStream <> nil then
+    begin
+      NewStream.Seek(0,soFromBeginning);
+      iPlaintext.CopyFrom(NewStream, NewStream.Size);
+      NewStream.Free;
+    end
+    else
+      OutStream.Seek(0,soFromBeginning);
+      iPlaintext.CopyFrom(OutStream, OutStream.Size);
+  finally                               // wrap up
+    OutStream.Free;
+  end;                                  // try/finally
+end;                                    { Decrypt }
+
+{ Event triggers: }
+
+procedure TROCustomEncryption.TriggerBeforeEncryptionEvent(iOriginalStream: TStream; var iProcessedStream: TStream);
+{ Triggers the OnBeforeEncryption event. This is a virtual method (descendants of this component can override it). }
+{ ToDo -cCDK: Call as needed to trigger event. }
+begin
+  if Assigned(FOnBeforeEncryption) then
+    FOnBeforeEncryption(Self, iOriginalStream, iProcessedStream);
+end;                                    { TriggerBeforeEncryptionEvent }
+
+procedure TROCustomEncryption.TriggerAfterDecryptionEvent(iOriginalStream: TStream; var iProcessedStream: TStream);
+{ Triggers the OnAfterDecryption event. This is a virtual method (descendants of this component can override it). }
+{ ToDo -cCDK: Call as needed to trigger event. }
+begin
+  if Assigned(FOnAfterDecryption) then
+    FOnAfterDecryption(Self, iOriginalStream, iProcessedStream);
+end;                                    { TriggerAfterDecryptionEvent }
+
+procedure TROCustomEncryption.AssignTo(Dest: TPersistent);
+var
+  DestEncr: TROCustomEncryption;
+begin
+  if Dest is TROCustomEncryption then begin
+    DestEncr := TROCustomEncryption(Dest);
+    DestEncr.EncryptionMethod := EncryptionMethod;
+    DestEncr.EncryptionSendKey := EncryptionSendKey;
+    DestEncr.EncryptionRecvKey := EncryptionRecvKey;
+    DestEncr.UseCompression := UseCompression;
+    DestEncr.OnBeforeEncryption := OnBeforeEncryption;
+    DestEncr.OnAfterDecryption := OnAfterDecryption;
+  end else begin
+    inherited;
+  end;
+end;
+
+destructor TROCustomEncryption.Destroy;
+begin
+  { ToDo -cCDK: Free allocated memory and created objects here. }
+  inherited Destroy;
+end;                                    { Destroy }
+
+constructor TROCustomEncryption.Create;//(aOwner: TComponent);
+{ Creates an object of type TROCustomEncryption, and initializes properties. }
+begin
+  inherited Create;//(aOwner);
+  { Initialize properties with default values: }
+  FEncryptionSendMethod := tetNone;
+  FUseCompression := False;
+  { ToDo -cCDK: Add your initialization code here. }
+end;                                    { Create }
+
+procedure TROCustomEncryption.Enclose(const iSourceStream, iDestStream: TStream;
+  iEncMethod: TROEncryptionMethod; isCompressed: Boolean; iKey: Ansistring = '');
+var
+  Size              : Integer;
+  nextStream        : TStream;
+  Cipher            : TROBaseCipher;
+  CipherKey         : Ansistring;
+
+  FreeNext          : Boolean;
+
+  StreamType        : Integer;
+begin
+  // don't do anything if streamsize is 0
+  if iSourceStream.Size = 0 then
+    Exit;
+
+  if (isCompressed) or (iEncMethod <> tetNone) then begin
+    iDestStream.Write(ROStreamIdentifier[1], Length(ROStreamIdentifier)); { brazil }
+
+    if isCompressed then
+      StreamType := ROStreamCompressed
+    else
+      StreamType := 0;
+
+    if iEncMethod <> tetNone then
+    begin
+      StreamType := StreamType or ROStreamEncrypted;
+    end;
+
+    iDestStream.Write(StreamType, SizeOf(StreamType));
+
+    if iEncMethod <> tetNone then
+    begin
+      StreamType := Integer(iEncMethod);
+      iDestStream.Write(StreamType, SizeOf(StreamType));
+    end;
+
+    FreeNext := False;
+    Cipher := nil;
+    nextStream := nil;
+
+    LastCompressTime := 0;
+    LastEncryptTime := 0;
+
+    try
+      if isCompressed then
+      begin
+        // only create NextStream if we need the intermediate result before encryption
+        if iEncMethod <> tetNone then
+        begin
+          nextStream := TMemoryStream.Create;
+         // nextStream.Size := iSourceStream.Size;
+          FreeNext := True;
+        end
+        else
+          nextStream := iDestStream;
+
+        Size := iSourceStream.Size;
+        nextStream.Write(Size, 4);
+
+        with TCompressionStream.Create(clMax, nextStream) do
+        try
+          //iStream.Seek(0,soFromBeginning);
+          QueryPerformanceCounter(timebefore);
+          CopyFrom(iSourceStream, iSourceStream.Size);
+          QueryPerformanceCounter(timeafter);
+          LastCompressTime := (timeafter - timebefore) / HPCFreq;
+        finally
+          Free();
+        end;
+        nextStream.seek(0, soFromBeginning);
+      end
+      else
+      begin
+        if iEncMethod <> tetNone then
+          nextStream := iSourceStream;
+      end;
+
+      if iEncMethod <> tetNone then
+      begin
+        // get key value
+        // - add new sections if new encryption types are added
+        // - new section should include assign default key if
+        //   fEncryptionRecvKey = ''
+        // - otherwise convert fEncryptionRecvKey to key value and
+        //   raise exception if invalid value
+
+        if iEncMethod in DECCiphers then
+        begin
+          if iKey = '' then
+          begin
+            CipherKey := DefaultDECCipherKey;
+          end
+          else
+          begin
+            CipherKey := iKey;
+          end;
+
+          Cipher := TroDECCipher.Create(TDECEncryptionClasses[iEncMethod], CipherKey);
+        end;
+
+        // do decryption
+
+        if Cipher = nil then
+          raise Exception.Create('OK, who forgot to create the cipher?');
+
+        try
+          QueryPerformanceCounter(timebefore);
+          Cipher.EncryptStream(nextStream, iDestStream);
+          QueryPerformanceCounter(timeafter);
+          LastEncryptTime := (timeafter - timebefore) / HPCFreq;
+        finally                         // wrap up
+          Cipher.Free;
+        end;                            // try/finally
+      end;
+
+    finally
+      if FreeNext then
+        nextStream.Free;
+    end;
+  end
+  else
+  begin                                 // nothing happened - copy src to dest
+    iDestStream.CopyFrom(iSourceStream, iSourceStream.Size - iSourceStream.Position);
+  end;
+end;
+
+function TROCustomEncryption.Extract(const iSourceStream, iDestStream: TStream;
+  iKey: Ansistring = ''): Int64;
+var
+  isCompressed      : Boolean;
+  StreamIdentifier  : ansistring;
+  StreamType        : Integer;
+  EncMethodRead     : Integer;
+  EncMethod         : TROEncryptionMethod;
+  OrigPos           : Integer;
+
+  Len               : Integer;
+  nextStream        : TStream;
+  DecompressionStream: TDecompressionStream;
+  Cipher            : TROBaseCipher;
+  CipherKey         : Ansistring;
+
+  FreeNext          : Boolean;
+begin
+  Result := 0;
+
+  SetLength(StreamIdentifier, Length(ROStreamIdentifier));
+  OrigPos := iSourceStream.Position;
+  iSourceStream.read(StreamIdentifier[1], Length(ROStreamIdentifier));
+
+  if StreamIdentifier = ROStreamIdentifier then
+  begin
+    iSourceStream.read(StreamType, 4);
+
+    if StreamType or ValidStreams <> ValidStreams then
+      //if StreamType <> CONST_StreamType then
+      raise Exception.Create('Invalid response type: Newer Brazil DataSnap Server?');
+
+    EncMethod := tetNone;
+
+    if StreamType and ROStreamEncrypted <> 0 then
+    begin
+      iSourceStream.read(EncMethodRead, SizeOf(EncMethodRead));
+
+      try
+        EncMethod := TROEncryptionMethod(EncMethodRead);
+      except
+        on e: Exception do
+          raise Exception.CreateFmt('Invalid encryption method (%d): Newer Brazil DataSnap Server?', [EncMethodRead]);
+      end;                              // try/finally
+    end;
+
+    FreeNext := False;
+    nextStream := nil;
+    Cipher := nil;
+
+    // don't do anything on empty stream
+    if iSourceStream.Size = iSourceStream.Position then
+      Exit;
+
+    LastCompressTime := 0;
+    LastEncryptTime := 0;
+
+    isCompressed := (StreamType and ROStreamCompressed) <> 0;
+
+    try
+      if EncMethod <> tetNone then
+      begin
+        // only create NextStream if we need the intermediate result before decompression
+        if isCompressed then
+        begin
+          nextStream := TMemoryStream.Create;
+          nextStream.Size := iSourceStream.Size;
+          FreeNext := True;
+        end
+        else
+          nextStream := iDestStream;
+
+        // get key value
+        // - add new sections if new encryption types are added
+        // - new section should include assign default key if
+        //   fEncryptionRecvKey = ''
+        // - otherwise convert fEncryptionRecvKey to key value and
+        //   raise exception if invalid value
+
+        if EncMethod in DECCiphers then
+        begin
+          if iKey = '' then
+          begin
+            CipherKey := DefaultDECCipherKey;
+          end
+          else
+          begin
+            CipherKey := iKey;
+          end;
+
+          Cipher := TroDECCipher.Create(TDECEncryptionClasses[EncMethod], CipherKey);
+        end;
+
+        // do decryption
+
+        if Cipher = nil then
+          raise Exception.Create('OK, who forgot to create the cipher?');
+
+        try
+          QueryPerformanceCounter(timebefore);
+          Cipher.DecryptStream(iSourceStream, nextStream);
+          QueryPerformanceCounter(timeafter);
+          LastEncryptTime := (timeafter - timebefore) / HPCFreq;
+        finally                         // wrap up
+          Cipher.Free;
+        end;                            // try/finally
+        nextStream.seek(0, soFromBeginning);
+      end
+      else
+      begin
+        if isCompressed then
+          nextStream := iSourceStream
+        else
+        begin                           // nothing happened - copy src to dest
+          iDestStream.CopyFrom(iSourceStream, iSourceStream.Size - iSourceStream.Position);
+        end;
+      end;
+
+      if isCompressed then
+      begin
+        nextStream.read(Len, 4);
+
+        DecompressionStream := TDecompressionStream.Create(nextStream);
+        try
+          QueryPerformanceCounter(timebefore);
+          iDestStream.CopyFrom(DecompressionStream, Len);
+          QueryPerformanceCounter(timeafter);
+          LastCompressTime := (timeafter - timebefore) / HPCFreq;
+          iDestStream.seek(0, soFromBeginning);
+        finally
+          DecompressionStream.Free();
+        end;                            { with }
+
+        Result := iDestStream.Size - nextStream.Size;
+      end;
+    finally
+      if FreeNext then
+        nextStream.Free;
+    end;
+  end
+  else
+  begin
+    iSourceStream.seek(OrigPos, soFromBeginning);
+    iDestStream.CopyFrom(iSourceStream, iSourceStream.Size - OrigPos);
+  end;
+end;
+
+initialization
+  DECCiphers := [tetDES..tetRijndael];
+  QueryPerformanceFrequency(HPCFreq);
+finalization
+end.
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROEncryptionEnvelope.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROEncryptionEnvelope.pas
new file mode 100644
index 0000000..5becf9d
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROEncryptionEnvelope.pas	
@@ -0,0 +1,1080 @@
+unit uROEncryptionEnvelope;
+
+{$I RemObjects.Inc}
+interface
+
+uses
+  Classes,
+  uROEncryption,
+  uROClientIntf, uROClient;
+
+type
+  TROEnvelopeMessageEncryption = class(TROCustomEncryption)
+  public
+    procedure Encrypt(iPlaintext, iCiphertext: TStream); override;
+    procedure Decrypt(iCiphertext, iPlaintext: TStream); override;
+  end;
+
+  TROEncryptionEnvelope = class(TROMessageEnvelope)
+  private
+    fEncryption: TROEnvelopeMessageEncryption;
+    procedure SetEncryption(NewValue: TROEnvelopeMessageEncryption);
+  protected
+    procedure intProcessOutgoing(Source, Dest: TStream; aMessage: IROMessage); override;
+    procedure intProcessIncoming(Source, Dest: TStream; aMessage: IROMessage); override;
+  public
+    constructor Create(aOwner: TComponent); override;
+    destructor Destroy; override;
+  published
+    property Encryption: TROEnvelopeMessageEncryption read fEncryption write SetEncryption;
+  end;
+
+  TROAESEncryptionEnvelope = class(TROMessageEnvelope)
+  private
+    fPassword: string;
+    procedure SetPassword(const Value: string);
+    procedure EncodePassword;
+  protected
+    FBinaryKey: AnsiString;
+    procedure intProcessOutgoing(Source, Dest: TStream; aMessage: IROMessage); override;
+    procedure intProcessIncoming(Source, Dest: TStream; aMessage: IROMessage); override;
+    function GetDefaultEnvelopeMarker: string; override;
+  public
+    constructor Create(aOwner: TComponent); override;
+  published
+    property Password: string read fPassword write SetPassword;
+  end;
+
+implementation
+uses
+  SysUtils, uROHash, uRODECUtil;
+
+
+
+type
+  TCipherState = (csNew, csInitialized, csEncode, csDecode, csPadded, csDone);
+  TCipherStates = set of TCipherState;
+  Binary_AnsiString         = AnsiString;  // LongString with Binary Contens
+
+
+// Based on Delphi Encryption Compendium 5.1. Original copyright below
+
+{
+ Copyright:      Hagen Reddmann HaReddmann at T-Online dot de
+ Author:         Hagen Reddmann
+ Remarks:        freeware, but this Copyright must be included
+ known Problems: none
+ Version:        5.1,  Part I from Delphi Encryption Compendium  ( DEC Part I)
+                 Delphi 5
+
+ * THIS SOFTWARE IS PROVIDED BY THE AUTHORS ''AS IS'' AND ANY EXPRESS
+ * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+ * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHORS OR CONTRIBUTORS BE
+ * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
+ * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
+ * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
+ * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
+ * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE
+ * OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE,
+ * EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+}
+
+
+  TROCipher_AES  = class(TPersistent)
+  private
+    FState: TCipherState;
+    FData: PByteArray;
+    FDataSize: Integer;
+    FRounds: Integer;
+  protected
+    FBufferSize: Integer;
+    FBufferIndex: Integer;
+    FBlockSize: Integer;
+    FUserSize: Integer;
+    FBuffer: PByteArray;
+    FVector: PByteArray;
+    FFeedback: PByteArray;
+    FUser: Pointer;
+    procedure CheckState(States: TCipherStates);
+    procedure DoInit(const Key; Size: Integer);
+    procedure DoEncode(Source, Dest: Pointer; Size: Integer);
+    procedure DoDecode(Source, Dest: Pointer; Size: Integer);
+    procedure Encode(const Source; var Dest; DataSize: Integer);
+    procedure Decode(const Source; var Dest; DataSize: Integer);
+  public
+    constructor Create;
+    destructor Destroy; override;
+
+    procedure Init(const Key; Size: Integer; const IVector; IVectorSize: Integer; IFiller: Byte = $FF); overload;
+    procedure Init(const Key: Binary_AnsiString; const IVector: Binary_AnsiString = ''; IFiller: Byte = $FF); overload;
+    procedure Done;
+    procedure Protect;
+
+    procedure EncodeStream(const Source, Dest: TStream; const DataSize: Int64= -1);
+    procedure DecodeStream(const Source, Dest: TStream; const DataSize: Int64 = -1);
+  end;
+
+
+
+{ TROEncryptionEnvelope }
+
+constructor TROEncryptionEnvelope.Create(aOwner: TComponent);
+begin
+  inherited Create(aOwner);
+  fEncryption := TROEnvelopeMessageEncryption.Create();
+end;
+
+destructor TROEncryptionEnvelope.Destroy;
+begin
+  FreeAndNil(fEncryption);
+  inherited;
+end;
+
+procedure TROEncryptionEnvelope.intProcessIncoming(Source,
+  Dest: TStream; aMessage: IROMessage);
+begin
+  if Assigned(Encryption) then
+    Encryption.Decrypt(Source, Dest)
+  else
+    inherited intProcessOutgoing(Source, Dest, aMessage);
+end;
+
+procedure TROEncryptionEnvelope.intProcessOutgoing(Source,
+  Dest: TStream; aMessage: IROMessage);
+begin
+  if Assigned(Encryption) then begin
+    Encryption.Encrypt(Source, Dest)
+  end
+  else
+    inherited intProcessOutgoing(Source, Dest, aMessage);
+end;
+
+procedure TROEncryptionEnvelope.SetEncryption(
+  NewValue: TROEnvelopeMessageEncryption);
+begin
+  fEncryption.Assign(NewValue);
+end;
+
+{ TROEnvelopeMessageEncryption }
+procedure TROEnvelopeMessageEncryption.Decrypt(iCiphertext,
+  iPlaintext: TStream);
+begin
+  Extract(iCiphertext, iPlaintext, EncryptionRecvKey);
+end;
+
+procedure TROEnvelopeMessageEncryption.Encrypt(iPlaintext,
+  iCiphertext: TStream);
+begin
+  Enclose(iPlaintext, iCiphertext, GetEncryptionSendMethod, UseCompression, EncryptionSendKey);
+end;
+
+{ TROAESEncryptionEnvelope }
+const
+  c_vector = AnsiString('@1B2c3D4e5F6g7H8');
+
+constructor TROAESEncryptionEnvelope.Create(aOwner: TComponent);
+begin
+  inherited;
+end;
+
+procedure TROAESEncryptionEnvelope.EncodePassword;
+var
+  lUTF8Key : AnsiString;
+begin
+  if fPassword = '' then
+    raise Exception.CreateFmt('No password is configured for %s.',[Self.Name]);
+  lUTF8Key := UTF8Encode(fPassword);
+
+  with TROHash_SHA1.Create(nil) do try
+    FBinaryKey := CalcString(lUTF8Key, nil,fmtCopy);
+  finally
+    Free;
+  end;
+
+  with TROHash_MD5.Create(nil) do try
+    FBinaryKey := FBinaryKey + CalcString(lUTF8Key, nil,fmtCopy);
+  finally
+    Free;
+  end;
+  SetLength(FBinaryKey, 32);
+end;
+
+function TROAESEncryptionEnvelope.GetDefaultEnvelopeMarker: string;
+begin
+  Result := 'AES';
+end;
+
+procedure TROAESEncryptionEnvelope.intProcessIncoming(Source,
+  Dest: TStream; aMessage: IROMessage);
+var
+  FOriginalStreamSize: integer;  
+begin
+  Source.Read(FOriginalStreamSize, SizeOf(integer));
+  EncodePassword;
+  with TROCipher_AES.Create do
+  try
+    Init(FBinaryKey,c_vector);
+    DecodeStream(Source,Dest);
+  finally
+    Free;
+  end;
+  Dest.Size:=FOriginalStreamSize;
+end;
+
+procedure TROAESEncryptionEnvelope.intProcessOutgoing(Source,
+  Dest: TStream; aMessage: IROMessage);
+var
+  FOriginalStreamSize: integer;  
+begin
+  FOriginalStreamSize := Source.Size-Source.Position;
+  Dest.Write(FOriginalStreamSize,SizeOf(integer));
+  EncodePassword;
+  with TROCipher_AES.Create do
+  try
+    Init(FBinaryKey,c_vector);
+    EncodeStream(Source,Dest);
+  finally
+    Free;
+  end;
+end;
+
+procedure TROAESEncryptionEnvelope.SetPassword(const Value: string);
+begin
+  fPassword := Value;
+  EncodePassword;
+end;
+
+{ TROCipher_AES }
+
+type
+  PLongArray     = ^TLongArray;
+  TLongArray     = array[0..1023] of LongWord;
+  
+const
+  StreamBufferSize: Integer = 8192;
+
+{don't change this}
+  Rijndael_Blocks =  4;
+  Rijndael_Rounds = 14;
+
+  Rijndael_S: array[0..1, 0..255] of Byte = (
+   ($63,$7C,$77,$7B,$F2,$6B,$6F,$C5,$30,$01,$67,$2B,$FE,$D7,$AB,$76,
+    $CA,$82,$C9,$7D,$FA,$59,$47,$F0,$AD,$D4,$A2,$AF,$9C,$A4,$72,$C0,
+    $B7,$FD,$93,$26,$36,$3F,$F7,$CC,$34,$A5,$E5,$F1,$71,$D8,$31,$15,
+    $04,$C7,$23,$C3,$18,$96,$05,$9A,$07,$12,$80,$E2,$EB,$27,$B2,$75,
+    $09,$83,$2C,$1A,$1B,$6E,$5A,$A0,$52,$3B,$D6,$B3,$29,$E3,$2F,$84,
+    $53,$D1,$00,$ED,$20,$FC,$B1,$5B,$6A,$CB,$BE,$39,$4A,$4C,$58,$CF,
+    $D0,$EF,$AA,$FB,$43,$4D,$33,$85,$45,$F9,$02,$7F,$50,$3C,$9F,$A8,
+    $51,$A3,$40,$8F,$92,$9D,$38,$F5,$BC,$B6,$DA,$21,$10,$FF,$F3,$D2,
+    $CD,$0C,$13,$EC,$5F,$97,$44,$17,$C4,$A7,$7E,$3D,$64,$5D,$19,$73,
+    $60,$81,$4F,$DC,$22,$2A,$90,$88,$46,$EE,$B8,$14,$DE,$5E,$0B,$DB,
+    $E0,$32,$3A,$0A,$49,$06,$24,$5C,$C2,$D3,$AC,$62,$91,$95,$E4,$79,
+    $E7,$C8,$37,$6D,$8D,$D5,$4E,$A9,$6C,$56,$F4,$EA,$65,$7A,$AE,$08,
+    $BA,$78,$25,$2E,$1C,$A6,$B4,$C6,$E8,$DD,$74,$1F,$4B,$BD,$8B,$8A,
+    $70,$3E,$B5,$66,$48,$03,$F6,$0E,$61,$35,$57,$B9,$86,$C1,$1D,$9E,
+    $E1,$F8,$98,$11,$69,$D9,$8E,$94,$9B,$1E,$87,$E9,$CE,$55,$28,$DF,
+    $8C,$A1,$89,$0D,$BF,$E6,$42,$68,$41,$99,$2D,$0F,$B0,$54,$BB,$16),
+   ($52,$09,$6A,$D5,$30,$36,$A5,$38,$BF,$40,$A3,$9E,$81,$F3,$D7,$FB,
+    $7C,$E3,$39,$82,$9B,$2F,$FF,$87,$34,$8E,$43,$44,$C4,$DE,$E9,$CB,
+    $54,$7B,$94,$32,$A6,$C2,$23,$3D,$EE,$4C,$95,$0B,$42,$FA,$C3,$4E,
+    $08,$2E,$A1,$66,$28,$D9,$24,$B2,$76,$5B,$A2,$49,$6D,$8B,$D1,$25,
+    $72,$F8,$F6,$64,$86,$68,$98,$16,$D4,$A4,$5C,$CC,$5D,$65,$B6,$92,
+    $6C,$70,$48,$50,$FD,$ED,$B9,$DA,$5E,$15,$46,$57,$A7,$8D,$9D,$84,
+    $90,$D8,$AB,$00,$8C,$BC,$D3,$0A,$F7,$E4,$58,$05,$B8,$B3,$45,$06,
+    $D0,$2C,$1E,$8F,$CA,$3F,$0F,$02,$C1,$AF,$BD,$03,$01,$13,$8A,$6B,
+    $3A,$91,$11,$41,$4F,$67,$DC,$EA,$97,$F2,$CF,$CE,$F0,$B4,$E6,$73,
+    $96,$AC,$74,$22,$E7,$AD,$35,$85,$E2,$F9,$37,$E8,$1C,$75,$DF,$6E,
+    $47,$F1,$1A,$71,$1D,$29,$C5,$89,$6F,$B7,$62,$0E,$AA,$18,$BE,$1B,
+    $FC,$56,$3E,$4B,$C6,$D2,$79,$20,$9A,$DB,$C0,$FE,$78,$CD,$5A,$F4,
+    $1F,$DD,$A8,$33,$88,$07,$C7,$31,$B1,$12,$10,$59,$27,$80,$EC,$5F,
+    $60,$51,$7F,$A9,$19,$B5,$4A,$0D,$2D,$E5,$7A,$9F,$93,$C9,$9C,$EF,
+    $A0,$E0,$3B,$4D,$AE,$2A,$F5,$B0,$C8,$EB,$BB,$3C,$83,$53,$99,$61,
+    $17,$2B,$04,$7E,$BA,$77,$D6,$26,$E1,$69,$14,$63,$55,$21,$0C,$7D));
+
+  Rijndael_T: array[0..7, 0..255] of LongWord = (
+   ($A56363C6,$847C7CF8,$997777EE,$8D7B7BF6,$0DF2F2FF,$BD6B6BD6,$B16F6FDE,$54C5C591,
+    $50303060,$03010102,$A96767CE,$7D2B2B56,$19FEFEE7,$62D7D7B5,$E6ABAB4D,$9A7676EC,
+    $45CACA8F,$9D82821F,$40C9C989,$877D7DFA,$15FAFAEF,$EB5959B2,$C947478E,$0BF0F0FB,
+    $ECADAD41,$67D4D4B3,$FDA2A25F,$EAAFAF45,$BF9C9C23,$F7A4A453,$967272E4,$5BC0C09B,
+    $C2B7B775,$1CFDFDE1,$AE93933D,$6A26264C,$5A36366C,$413F3F7E,$02F7F7F5,$4FCCCC83,
+    $5C343468,$F4A5A551,$34E5E5D1,$08F1F1F9,$937171E2,$73D8D8AB,$53313162,$3F15152A,
+    $0C040408,$52C7C795,$65232346,$5EC3C39D,$28181830,$A1969637,$0F05050A,$B59A9A2F,
+    $0907070E,$36121224,$9B80801B,$3DE2E2DF,$26EBEBCD,$6927274E,$CDB2B27F,$9F7575EA,
+    $1B090912,$9E83831D,$742C2C58,$2E1A1A34,$2D1B1B36,$B26E6EDC,$EE5A5AB4,$FBA0A05B,
+    $F65252A4,$4D3B3B76,$61D6D6B7,$CEB3B37D,$7B292952,$3EE3E3DD,$712F2F5E,$97848413,
+    $F55353A6,$68D1D1B9,$00000000,$2CEDEDC1,$60202040,$1FFCFCE3,$C8B1B179,$ED5B5BB6,
+    $BE6A6AD4,$46CBCB8D,$D9BEBE67,$4B393972,$DE4A4A94,$D44C4C98,$E85858B0,$4ACFCF85,
+    $6BD0D0BB,$2AEFEFC5,$E5AAAA4F,$16FBFBED,$C5434386,$D74D4D9A,$55333366,$94858511,
+    $CF45458A,$10F9F9E9,$06020204,$817F7FFE,$F05050A0,$443C3C78,$BA9F9F25,$E3A8A84B,
+    $F35151A2,$FEA3A35D,$C0404080,$8A8F8F05,$AD92923F,$BC9D9D21,$48383870,$04F5F5F1,
+    $DFBCBC63,$C1B6B677,$75DADAAF,$63212142,$30101020,$1AFFFFE5,$0EF3F3FD,$6DD2D2BF,
+    $4CCDCD81,$140C0C18,$35131326,$2FECECC3,$E15F5FBE,$A2979735,$CC444488,$3917172E,
+    $57C4C493,$F2A7A755,$827E7EFC,$473D3D7A,$AC6464C8,$E75D5DBA,$2B191932,$957373E6,
+    $A06060C0,$98818119,$D14F4F9E,$7FDCDCA3,$66222244,$7E2A2A54,$AB90903B,$8388880B,
+    $CA46468C,$29EEEEC7,$D3B8B86B,$3C141428,$79DEDEA7,$E25E5EBC,$1D0B0B16,$76DBDBAD,
+    $3BE0E0DB,$56323264,$4E3A3A74,$1E0A0A14,$DB494992,$0A06060C,$6C242448,$E45C5CB8,
+    $5DC2C29F,$6ED3D3BD,$EFACAC43,$A66262C4,$A8919139,$A4959531,$37E4E4D3,$8B7979F2,
+    $32E7E7D5,$43C8C88B,$5937376E,$B76D6DDA,$8C8D8D01,$64D5D5B1,$D24E4E9C,$E0A9A949,
+    $B46C6CD8,$FA5656AC,$07F4F4F3,$25EAEACF,$AF6565CA,$8E7A7AF4,$E9AEAE47,$18080810,
+    $D5BABA6F,$887878F0,$6F25254A,$722E2E5C,$241C1C38,$F1A6A657,$C7B4B473,$51C6C697,
+    $23E8E8CB,$7CDDDDA1,$9C7474E8,$211F1F3E,$DD4B4B96,$DCBDBD61,$868B8B0D,$858A8A0F,
+    $907070E0,$423E3E7C,$C4B5B571,$AA6666CC,$D8484890,$05030306,$01F6F6F7,$120E0E1C,
+    $A36161C2,$5F35356A,$F95757AE,$D0B9B969,$91868617,$58C1C199,$271D1D3A,$B99E9E27,
+    $38E1E1D9,$13F8F8EB,$B398982B,$33111122,$BB6969D2,$70D9D9A9,$898E8E07,$A7949433,
+    $B69B9B2D,$221E1E3C,$92878715,$20E9E9C9,$49CECE87,$FF5555AA,$78282850,$7ADFDFA5,
+    $8F8C8C03,$F8A1A159,$80898909,$170D0D1A,$DABFBF65,$31E6E6D7,$C6424284,$B86868D0,
+    $C3414182,$B0999929,$772D2D5A,$110F0F1E,$CBB0B07B,$FC5454A8,$D6BBBB6D,$3A16162C),
+   ($6363C6A5,$7C7CF884,$7777EE99,$7B7BF68D,$F2F2FF0D,$6B6BD6BD,$6F6FDEB1,$C5C59154,
+    $30306050,$01010203,$6767CEA9,$2B2B567D,$FEFEE719,$D7D7B562,$ABAB4DE6,$7676EC9A,
+    $CACA8F45,$82821F9D,$C9C98940,$7D7DFA87,$FAFAEF15,$5959B2EB,$47478EC9,$F0F0FB0B,
+    $ADAD41EC,$D4D4B367,$A2A25FFD,$AFAF45EA,$9C9C23BF,$A4A453F7,$7272E496,$C0C09B5B,
+    $B7B775C2,$FDFDE11C,$93933DAE,$26264C6A,$36366C5A,$3F3F7E41,$F7F7F502,$CCCC834F,
+    $3434685C,$A5A551F4,$E5E5D134,$F1F1F908,$7171E293,$D8D8AB73,$31316253,$15152A3F,
+    $0404080C,$C7C79552,$23234665,$C3C39D5E,$18183028,$969637A1,$05050A0F,$9A9A2FB5,
+    $07070E09,$12122436,$80801B9B,$E2E2DF3D,$EBEBCD26,$27274E69,$B2B27FCD,$7575EA9F,
+    $0909121B,$83831D9E,$2C2C5874,$1A1A342E,$1B1B362D,$6E6EDCB2,$5A5AB4EE,$A0A05BFB,
+    $5252A4F6,$3B3B764D,$D6D6B761,$B3B37DCE,$2929527B,$E3E3DD3E,$2F2F5E71,$84841397,
+    $5353A6F5,$D1D1B968,$00000000,$EDEDC12C,$20204060,$FCFCE31F,$B1B179C8,$5B5BB6ED,
+    $6A6AD4BE,$CBCB8D46,$BEBE67D9,$3939724B,$4A4A94DE,$4C4C98D4,$5858B0E8,$CFCF854A,
+    $D0D0BB6B,$EFEFC52A,$AAAA4FE5,$FBFBED16,$434386C5,$4D4D9AD7,$33336655,$85851194,
+    $45458ACF,$F9F9E910,$02020406,$7F7FFE81,$5050A0F0,$3C3C7844,$9F9F25BA,$A8A84BE3,
+    $5151A2F3,$A3A35DFE,$404080C0,$8F8F058A,$92923FAD,$9D9D21BC,$38387048,$F5F5F104,
+    $BCBC63DF,$B6B677C1,$DADAAF75,$21214263,$10102030,$FFFFE51A,$F3F3FD0E,$D2D2BF6D,
+    $CDCD814C,$0C0C1814,$13132635,$ECECC32F,$5F5FBEE1,$979735A2,$444488CC,$17172E39,
+    $C4C49357,$A7A755F2,$7E7EFC82,$3D3D7A47,$6464C8AC,$5D5DBAE7,$1919322B,$7373E695,
+    $6060C0A0,$81811998,$4F4F9ED1,$DCDCA37F,$22224466,$2A2A547E,$90903BAB,$88880B83,
+    $46468CCA,$EEEEC729,$B8B86BD3,$1414283C,$DEDEA779,$5E5EBCE2,$0B0B161D,$DBDBAD76,
+    $E0E0DB3B,$32326456,$3A3A744E,$0A0A141E,$494992DB,$06060C0A,$2424486C,$5C5CB8E4,
+    $C2C29F5D,$D3D3BD6E,$ACAC43EF,$6262C4A6,$919139A8,$959531A4,$E4E4D337,$7979F28B,
+    $E7E7D532,$C8C88B43,$37376E59,$6D6DDAB7,$8D8D018C,$D5D5B164,$4E4E9CD2,$A9A949E0,
+    $6C6CD8B4,$5656ACFA,$F4F4F307,$EAEACF25,$6565CAAF,$7A7AF48E,$AEAE47E9,$08081018,
+    $BABA6FD5,$7878F088,$25254A6F,$2E2E5C72,$1C1C3824,$A6A657F1,$B4B473C7,$C6C69751,
+    $E8E8CB23,$DDDDA17C,$7474E89C,$1F1F3E21,$4B4B96DD,$BDBD61DC,$8B8B0D86,$8A8A0F85,
+    $7070E090,$3E3E7C42,$B5B571C4,$6666CCAA,$484890D8,$03030605,$F6F6F701,$0E0E1C12,
+    $6161C2A3,$35356A5F,$5757AEF9,$B9B969D0,$86861791,$C1C19958,$1D1D3A27,$9E9E27B9,
+    $E1E1D938,$F8F8EB13,$98982BB3,$11112233,$6969D2BB,$D9D9A970,$8E8E0789,$949433A7,
+    $9B9B2DB6,$1E1E3C22,$87871592,$E9E9C920,$CECE8749,$5555AAFF,$28285078,$DFDFA57A,
+    $8C8C038F,$A1A159F8,$89890980,$0D0D1A17,$BFBF65DA,$E6E6D731,$424284C6,$6868D0B8,
+    $414182C3,$999929B0,$2D2D5A77,$0F0F1E11,$B0B07BCB,$5454A8FC,$BBBB6DD6,$16162C3A),
+   ($63C6A563,$7CF8847C,$77EE9977,$7BF68D7B,$F2FF0DF2,$6BD6BD6B,$6FDEB16F,$C59154C5,
+    $30605030,$01020301,$67CEA967,$2B567D2B,$FEE719FE,$D7B562D7,$AB4DE6AB,$76EC9A76,
+    $CA8F45CA,$821F9D82,$C98940C9,$7DFA877D,$FAEF15FA,$59B2EB59,$478EC947,$F0FB0BF0,
+    $AD41ECAD,$D4B367D4,$A25FFDA2,$AF45EAAF,$9C23BF9C,$A453F7A4,$72E49672,$C09B5BC0,
+    $B775C2B7,$FDE11CFD,$933DAE93,$264C6A26,$366C5A36,$3F7E413F,$F7F502F7,$CC834FCC,
+    $34685C34,$A551F4A5,$E5D134E5,$F1F908F1,$71E29371,$D8AB73D8,$31625331,$152A3F15,
+    $04080C04,$C79552C7,$23466523,$C39D5EC3,$18302818,$9637A196,$050A0F05,$9A2FB59A,
+    $070E0907,$12243612,$801B9B80,$E2DF3DE2,$EBCD26EB,$274E6927,$B27FCDB2,$75EA9F75,
+    $09121B09,$831D9E83,$2C58742C,$1A342E1A,$1B362D1B,$6EDCB26E,$5AB4EE5A,$A05BFBA0,
+    $52A4F652,$3B764D3B,$D6B761D6,$B37DCEB3,$29527B29,$E3DD3EE3,$2F5E712F,$84139784,
+    $53A6F553,$D1B968D1,$00000000,$EDC12CED,$20406020,$FCE31FFC,$B179C8B1,$5BB6ED5B,
+    $6AD4BE6A,$CB8D46CB,$BE67D9BE,$39724B39,$4A94DE4A,$4C98D44C,$58B0E858,$CF854ACF,
+    $D0BB6BD0,$EFC52AEF,$AA4FE5AA,$FBED16FB,$4386C543,$4D9AD74D,$33665533,$85119485,
+    $458ACF45,$F9E910F9,$02040602,$7FFE817F,$50A0F050,$3C78443C,$9F25BA9F,$A84BE3A8,
+    $51A2F351,$A35DFEA3,$4080C040,$8F058A8F,$923FAD92,$9D21BC9D,$38704838,$F5F104F5,
+    $BC63DFBC,$B677C1B6,$DAAF75DA,$21426321,$10203010,$FFE51AFF,$F3FD0EF3,$D2BF6DD2,
+    $CD814CCD,$0C18140C,$13263513,$ECC32FEC,$5FBEE15F,$9735A297,$4488CC44,$172E3917,
+    $C49357C4,$A755F2A7,$7EFC827E,$3D7A473D,$64C8AC64,$5DBAE75D,$19322B19,$73E69573,
+    $60C0A060,$81199881,$4F9ED14F,$DCA37FDC,$22446622,$2A547E2A,$903BAB90,$880B8388,
+    $468CCA46,$EEC729EE,$B86BD3B8,$14283C14,$DEA779DE,$5EBCE25E,$0B161D0B,$DBAD76DB,
+    $E0DB3BE0,$32645632,$3A744E3A,$0A141E0A,$4992DB49,$060C0A06,$24486C24,$5CB8E45C,
+    $C29F5DC2,$D3BD6ED3,$AC43EFAC,$62C4A662,$9139A891,$9531A495,$E4D337E4,$79F28B79,
+    $E7D532E7,$C88B43C8,$376E5937,$6DDAB76D,$8D018C8D,$D5B164D5,$4E9CD24E,$A949E0A9,
+    $6CD8B46C,$56ACFA56,$F4F307F4,$EACF25EA,$65CAAF65,$7AF48E7A,$AE47E9AE,$08101808,
+    $BA6FD5BA,$78F08878,$254A6F25,$2E5C722E,$1C38241C,$A657F1A6,$B473C7B4,$C69751C6,
+    $E8CB23E8,$DDA17CDD,$74E89C74,$1F3E211F,$4B96DD4B,$BD61DCBD,$8B0D868B,$8A0F858A,
+    $70E09070,$3E7C423E,$B571C4B5,$66CCAA66,$4890D848,$03060503,$F6F701F6,$0E1C120E,
+    $61C2A361,$356A5F35,$57AEF957,$B969D0B9,$86179186,$C19958C1,$1D3A271D,$9E27B99E,
+    $E1D938E1,$F8EB13F8,$982BB398,$11223311,$69D2BB69,$D9A970D9,$8E07898E,$9433A794,
+    $9B2DB69B,$1E3C221E,$87159287,$E9C920E9,$CE8749CE,$55AAFF55,$28507828,$DFA57ADF,
+    $8C038F8C,$A159F8A1,$89098089,$0D1A170D,$BF65DABF,$E6D731E6,$4284C642,$68D0B868,
+    $4182C341,$9929B099,$2D5A772D,$0F1E110F,$B07BCBB0,$54A8FC54,$BB6DD6BB,$162C3A16),
+   ($C6A56363,$F8847C7C,$EE997777,$F68D7B7B,$FF0DF2F2,$D6BD6B6B,$DEB16F6F,$9154C5C5,
+    $60503030,$02030101,$CEA96767,$567D2B2B,$E719FEFE,$B562D7D7,$4DE6ABAB,$EC9A7676,
+    $8F45CACA,$1F9D8282,$8940C9C9,$FA877D7D,$EF15FAFA,$B2EB5959,$8EC94747,$FB0BF0F0,
+    $41ECADAD,$B367D4D4,$5FFDA2A2,$45EAAFAF,$23BF9C9C,$53F7A4A4,$E4967272,$9B5BC0C0,
+    $75C2B7B7,$E11CFDFD,$3DAE9393,$4C6A2626,$6C5A3636,$7E413F3F,$F502F7F7,$834FCCCC,
+    $685C3434,$51F4A5A5,$D134E5E5,$F908F1F1,$E2937171,$AB73D8D8,$62533131,$2A3F1515,
+    $080C0404,$9552C7C7,$46652323,$9D5EC3C3,$30281818,$37A19696,$0A0F0505,$2FB59A9A,
+    $0E090707,$24361212,$1B9B8080,$DF3DE2E2,$CD26EBEB,$4E692727,$7FCDB2B2,$EA9F7575,
+    $121B0909,$1D9E8383,$58742C2C,$342E1A1A,$362D1B1B,$DCB26E6E,$B4EE5A5A,$5BFBA0A0,
+    $A4F65252,$764D3B3B,$B761D6D6,$7DCEB3B3,$527B2929,$DD3EE3E3,$5E712F2F,$13978484,
+    $A6F55353,$B968D1D1,$00000000,$C12CEDED,$40602020,$E31FFCFC,$79C8B1B1,$B6ED5B5B,
+    $D4BE6A6A,$8D46CBCB,$67D9BEBE,$724B3939,$94DE4A4A,$98D44C4C,$B0E85858,$854ACFCF,
+    $BB6BD0D0,$C52AEFEF,$4FE5AAAA,$ED16FBFB,$86C54343,$9AD74D4D,$66553333,$11948585,
+    $8ACF4545,$E910F9F9,$04060202,$FE817F7F,$A0F05050,$78443C3C,$25BA9F9F,$4BE3A8A8,
+    $A2F35151,$5DFEA3A3,$80C04040,$058A8F8F,$3FAD9292,$21BC9D9D,$70483838,$F104F5F5,
+    $63DFBCBC,$77C1B6B6,$AF75DADA,$42632121,$20301010,$E51AFFFF,$FD0EF3F3,$BF6DD2D2,
+    $814CCDCD,$18140C0C,$26351313,$C32FECEC,$BEE15F5F,$35A29797,$88CC4444,$2E391717,
+    $9357C4C4,$55F2A7A7,$FC827E7E,$7A473D3D,$C8AC6464,$BAE75D5D,$322B1919,$E6957373,
+    $C0A06060,$19988181,$9ED14F4F,$A37FDCDC,$44662222,$547E2A2A,$3BAB9090,$0B838888,
+    $8CCA4646,$C729EEEE,$6BD3B8B8,$283C1414,$A779DEDE,$BCE25E5E,$161D0B0B,$AD76DBDB,
+    $DB3BE0E0,$64563232,$744E3A3A,$141E0A0A,$92DB4949,$0C0A0606,$486C2424,$B8E45C5C,
+    $9F5DC2C2,$BD6ED3D3,$43EFACAC,$C4A66262,$39A89191,$31A49595,$D337E4E4,$F28B7979,
+    $D532E7E7,$8B43C8C8,$6E593737,$DAB76D6D,$018C8D8D,$B164D5D5,$9CD24E4E,$49E0A9A9,
+    $D8B46C6C,$ACFA5656,$F307F4F4,$CF25EAEA,$CAAF6565,$F48E7A7A,$47E9AEAE,$10180808,
+    $6FD5BABA,$F0887878,$4A6F2525,$5C722E2E,$38241C1C,$57F1A6A6,$73C7B4B4,$9751C6C6,
+    $CB23E8E8,$A17CDDDD,$E89C7474,$3E211F1F,$96DD4B4B,$61DCBDBD,$0D868B8B,$0F858A8A,
+    $E0907070,$7C423E3E,$71C4B5B5,$CCAA6666,$90D84848,$06050303,$F701F6F6,$1C120E0E,
+    $C2A36161,$6A5F3535,$AEF95757,$69D0B9B9,$17918686,$9958C1C1,$3A271D1D,$27B99E9E,
+    $D938E1E1,$EB13F8F8,$2BB39898,$22331111,$D2BB6969,$A970D9D9,$07898E8E,$33A79494,
+    $2DB69B9B,$3C221E1E,$15928787,$C920E9E9,$8749CECE,$AAFF5555,$50782828,$A57ADFDF,
+    $038F8C8C,$59F8A1A1,$09808989,$1A170D0D,$65DABFBF,$D731E6E6,$84C64242,$D0B86868,
+    $82C34141,$29B09999,$5A772D2D,$1E110F0F,$7BCBB0B0,$A8FC5454,$6DD6BBBB,$2C3A1616),
+   ($50A7F451,$5365417E,$C3A4171A,$965E273A,$CB6BAB3B,$F1459D1F,$AB58FAAC,$9303E34B,
+    $55FA3020,$F66D76AD,$9176CC88,$254C02F5,$FCD7E54F,$D7CB2AC5,$80443526,$8FA362B5,
+    $495AB1DE,$671BBA25,$980EEA45,$E1C0FE5D,$02752FC3,$12F04C81,$A397468D,$C6F9D36B,
+    $E75F8F03,$959C9215,$EB7A6DBF,$DA595295,$2D83BED4,$D3217458,$2969E049,$44C8C98E,
+    $6A89C275,$78798EF4,$6B3E5899,$DD71B927,$B64FE1BE,$17AD88F0,$66AC20C9,$B43ACE7D,
+    $184ADF63,$82311AE5,$60335197,$457F5362,$E07764B1,$84AE6BBB,$1CA081FE,$942B08F9,
+    $58684870,$19FD458F,$876CDE94,$B7F87B52,$23D373AB,$E2024B72,$578F1FE3,$2AAB5566,
+    $0728EBB2,$03C2B52F,$9A7BC586,$A50837D3,$F2872830,$B2A5BF23,$BA6A0302,$5C8216ED,
+    $2B1CCF8A,$92B479A7,$F0F207F3,$A1E2694E,$CDF4DA65,$D5BE0506,$1F6234D1,$8AFEA6C4,
+    $9D532E34,$A055F3A2,$32E18A05,$75EBF6A4,$39EC830B,$AAEF6040,$069F715E,$51106EBD,
+    $F98A213E,$3D06DD96,$AE053EDD,$46BDE64D,$B58D5491,$055DC471,$6FD40604,$FF155060,
+    $24FB9819,$97E9BDD6,$CC434089,$779ED967,$BD42E8B0,$888B8907,$385B19E7,$DBEEC879,
+    $470A7CA1,$E90F427C,$C91E84F8,$00000000,$83868009,$48ED2B32,$AC70111E,$4E725A6C,
+    $FBFF0EFD,$5638850F,$1ED5AE3D,$27392D36,$64D90F0A,$21A65C68,$D1545B9B,$3A2E3624,
+    $B1670A0C,$0FE75793,$D296EEB4,$9E919B1B,$4FC5C080,$A220DC61,$694B775A,$161A121C,
+    $0ABA93E2,$E52AA0C0,$43E0223C,$1D171B12,$0B0D090E,$ADC78BF2,$B9A8B62D,$C8A91E14,
+    $8519F157,$4C0775AF,$BBDD99EE,$FD607FA3,$9F2601F7,$BCF5725C,$C53B6644,$347EFB5B,
+    $7629438B,$DCC623CB,$68FCEDB6,$63F1E4B8,$CADC31D7,$10856342,$40229713,$2011C684,
+    $7D244A85,$F83DBBD2,$1132F9AE,$6DA129C7,$4B2F9E1D,$F330B2DC,$EC52860D,$D0E3C177,
+    $6C16B32B,$99B970A9,$FA489411,$2264E947,$C48CFCA8,$1A3FF0A0,$D82C7D56,$EF903322,
+    $C74E4987,$C1D138D9,$FEA2CA8C,$360BD498,$CF81F5A6,$28DE7AA5,$268EB7DA,$A4BFAD3F,
+    $E49D3A2C,$0D927850,$9BCC5F6A,$62467E54,$C2138DF6,$E8B8D890,$5EF7392E,$F5AFC382,
+    $BE805D9F,$7C93D069,$A92DD56F,$B31225CF,$3B99ACC8,$A77D1810,$6E639CE8,$7BBB3BDB,
+    $097826CD,$F418596E,$01B79AEC,$A89A4F83,$656E95E6,$7EE6FFAA,$08CFBC21,$E6E815EF,
+    $D99BE7BA,$CE366F4A,$D4099FEA,$D67CB029,$AFB2A431,$31233F2A,$3094A5C6,$C066A235,
+    $37BC4E74,$A6CA82FC,$B0D090E0,$15D8A733,$4A9804F1,$F7DAEC41,$0E50CD7F,$2FF69117,
+    $8DD64D76,$4DB0EF43,$544DAACC,$DF0496E4,$E3B5D19E,$1B886A4C,$B81F2CC1,$7F516546,
+    $04EA5E9D,$5D358C01,$737487FA,$2E410BFB,$5A1D67B3,$52D2DB92,$335610E9,$1347D66D,
+    $8C61D79A,$7A0CA137,$8E14F859,$893C13EB,$EE27A9CE,$35C961B7,$EDE51CE1,$3CB1477A,
+    $59DFD29C,$3F73F255,$79CE1418,$BF37C773,$EACDF753,$5BAAFD5F,$146F3DDF,$86DB4478,
+    $81F3AFCA,$3EC468B9,$2C342438,$5F40A3C2,$72C31D16,$0C25E2BC,$8B493C28,$41950DFF,
+    $7101A839,$DEB30C08,$9CE4B4D8,$90C15664,$6184CB7B,$70B632D5,$745C6C48,$4257B8D0),
+   ($A7F45150,$65417E53,$A4171AC3,$5E273A96,$6BAB3BCB,$459D1FF1,$58FAACAB,$03E34B93,
+    $FA302055,$6D76ADF6,$76CC8891,$4C02F525,$D7E54FFC,$CB2AC5D7,$44352680,$A362B58F,
+    $5AB1DE49,$1BBA2567,$0EEA4598,$C0FE5DE1,$752FC302,$F04C8112,$97468DA3,$F9D36BC6,
+    $5F8F03E7,$9C921595,$7A6DBFEB,$595295DA,$83BED42D,$217458D3,$69E04929,$C8C98E44,
+    $89C2756A,$798EF478,$3E58996B,$71B927DD,$4FE1BEB6,$AD88F017,$AC20C966,$3ACE7DB4,
+    $4ADF6318,$311AE582,$33519760,$7F536245,$7764B1E0,$AE6BBB84,$A081FE1C,$2B08F994,
+    $68487058,$FD458F19,$6CDE9487,$F87B52B7,$D373AB23,$024B72E2,$8F1FE357,$AB55662A,
+    $28EBB207,$C2B52F03,$7BC5869A,$0837D3A5,$872830F2,$A5BF23B2,$6A0302BA,$8216ED5C,
+    $1CCF8A2B,$B479A792,$F207F3F0,$E2694EA1,$F4DA65CD,$BE0506D5,$6234D11F,$FEA6C48A,
+    $532E349D,$55F3A2A0,$E18A0532,$EBF6A475,$EC830B39,$EF6040AA,$9F715E06,$106EBD51,
+    $8A213EF9,$06DD963D,$053EDDAE,$BDE64D46,$8D5491B5,$5DC47105,$D406046F,$155060FF,
+    $FB981924,$E9BDD697,$434089CC,$9ED96777,$42E8B0BD,$8B890788,$5B19E738,$EEC879DB,
+    $0A7CA147,$0F427CE9,$1E84F8C9,$00000000,$86800983,$ED2B3248,$70111EAC,$725A6C4E,
+    $FF0EFDFB,$38850F56,$D5AE3D1E,$392D3627,$D90F0A64,$A65C6821,$545B9BD1,$2E36243A,
+    $670A0CB1,$E757930F,$96EEB4D2,$919B1B9E,$C5C0804F,$20DC61A2,$4B775A69,$1A121C16,
+    $BA93E20A,$2AA0C0E5,$E0223C43,$171B121D,$0D090E0B,$C78BF2AD,$A8B62DB9,$A91E14C8,
+    $19F15785,$0775AF4C,$DD99EEBB,$607FA3FD,$2601F79F,$F5725CBC,$3B6644C5,$7EFB5B34,
+    $29438B76,$C623CBDC,$FCEDB668,$F1E4B863,$DC31D7CA,$85634210,$22971340,$11C68420,
+    $244A857D,$3DBBD2F8,$32F9AE11,$A129C76D,$2F9E1D4B,$30B2DCF3,$52860DEC,$E3C177D0,
+    $16B32B6C,$B970A999,$489411FA,$64E94722,$8CFCA8C4,$3FF0A01A,$2C7D56D8,$903322EF,
+    $4E4987C7,$D138D9C1,$A2CA8CFE,$0BD49836,$81F5A6CF,$DE7AA528,$8EB7DA26,$BFAD3FA4,
+    $9D3A2CE4,$9278500D,$CC5F6A9B,$467E5462,$138DF6C2,$B8D890E8,$F7392E5E,$AFC382F5,
+    $805D9FBE,$93D0697C,$2DD56FA9,$1225CFB3,$99ACC83B,$7D1810A7,$639CE86E,$BB3BDB7B,
+    $7826CD09,$18596EF4,$B79AEC01,$9A4F83A8,$6E95E665,$E6FFAA7E,$CFBC2108,$E815EFE6,
+    $9BE7BAD9,$366F4ACE,$099FEAD4,$7CB029D6,$B2A431AF,$233F2A31,$94A5C630,$66A235C0,
+    $BC4E7437,$CA82FCA6,$D090E0B0,$D8A73315,$9804F14A,$DAEC41F7,$50CD7F0E,$F691172F,
+    $D64D768D,$B0EF434D,$4DAACC54,$0496E4DF,$B5D19EE3,$886A4C1B,$1F2CC1B8,$5165467F,
+    $EA5E9D04,$358C015D,$7487FA73,$410BFB2E,$1D67B35A,$D2DB9252,$5610E933,$47D66D13,
+    $61D79A8C,$0CA1377A,$14F8598E,$3C13EB89,$27A9CEEE,$C961B735,$E51CE1ED,$B1477A3C,
+    $DFD29C59,$73F2553F,$CE141879,$37C773BF,$CDF753EA,$AAFD5F5B,$6F3DDF14,$DB447886,
+    $F3AFCA81,$C468B93E,$3424382C,$40A3C25F,$C31D1672,$25E2BC0C,$493C288B,$950DFF41,
+    $01A83971,$B30C08DE,$E4B4D89C,$C1566490,$84CB7B61,$B632D570,$5C6C4874,$57B8D042),
+   ($F45150A7,$417E5365,$171AC3A4,$273A965E,$AB3BCB6B,$9D1FF145,$FAACAB58,$E34B9303,
+    $302055FA,$76ADF66D,$CC889176,$02F5254C,$E54FFCD7,$2AC5D7CB,$35268044,$62B58FA3,
+    $B1DE495A,$BA25671B,$EA45980E,$FE5DE1C0,$2FC30275,$4C8112F0,$468DA397,$D36BC6F9,
+    $8F03E75F,$9215959C,$6DBFEB7A,$5295DA59,$BED42D83,$7458D321,$E0492969,$C98E44C8,
+    $C2756A89,$8EF47879,$58996B3E,$B927DD71,$E1BEB64F,$88F017AD,$20C966AC,$CE7DB43A,
+    $DF63184A,$1AE58231,$51976033,$5362457F,$64B1E077,$6BBB84AE,$81FE1CA0,$08F9942B,
+    $48705868,$458F19FD,$DE94876C,$7B52B7F8,$73AB23D3,$4B72E202,$1FE3578F,$55662AAB,
+    $EBB20728,$B52F03C2,$C5869A7B,$37D3A508,$2830F287,$BF23B2A5,$0302BA6A,$16ED5C82,
+    $CF8A2B1C,$79A792B4,$07F3F0F2,$694EA1E2,$DA65CDF4,$0506D5BE,$34D11F62,$A6C48AFE,
+    $2E349D53,$F3A2A055,$8A0532E1,$F6A475EB,$830B39EC,$6040AAEF,$715E069F,$6EBD5110,
+    $213EF98A,$DD963D06,$3EDDAE05,$E64D46BD,$5491B58D,$C471055D,$06046FD4,$5060FF15,
+    $981924FB,$BDD697E9,$4089CC43,$D967779E,$E8B0BD42,$8907888B,$19E7385B,$C879DBEE,
+    $7CA1470A,$427CE90F,$84F8C91E,$00000000,$80098386,$2B3248ED,$111EAC70,$5A6C4E72,
+    $0EFDFBFF,$850F5638,$AE3D1ED5,$2D362739,$0F0A64D9,$5C6821A6,$5B9BD154,$36243A2E,
+    $0A0CB167,$57930FE7,$EEB4D296,$9B1B9E91,$C0804FC5,$DC61A220,$775A694B,$121C161A,
+    $93E20ABA,$A0C0E52A,$223C43E0,$1B121D17,$090E0B0D,$8BF2ADC7,$B62DB9A8,$1E14C8A9,
+    $F1578519,$75AF4C07,$99EEBBDD,$7FA3FD60,$01F79F26,$725CBCF5,$6644C53B,$FB5B347E,
+    $438B7629,$23CBDCC6,$EDB668FC,$E4B863F1,$31D7CADC,$63421085,$97134022,$C6842011,
+    $4A857D24,$BBD2F83D,$F9AE1132,$29C76DA1,$9E1D4B2F,$B2DCF330,$860DEC52,$C177D0E3,
+    $B32B6C16,$70A999B9,$9411FA48,$E9472264,$FCA8C48C,$F0A01A3F,$7D56D82C,$3322EF90,
+    $4987C74E,$38D9C1D1,$CA8CFEA2,$D498360B,$F5A6CF81,$7AA528DE,$B7DA268E,$AD3FA4BF,
+    $3A2CE49D,$78500D92,$5F6A9BCC,$7E546246,$8DF6C213,$D890E8B8,$392E5EF7,$C382F5AF,
+    $5D9FBE80,$D0697C93,$D56FA92D,$25CFB312,$ACC83B99,$1810A77D,$9CE86E63,$3BDB7BBB,
+    $26CD0978,$596EF418,$9AEC01B7,$4F83A89A,$95E6656E,$FFAA7EE6,$BC2108CF,$15EFE6E8,
+    $E7BAD99B,$6F4ACE36,$9FEAD409,$B029D67C,$A431AFB2,$3F2A3123,$A5C63094,$A235C066,
+    $4E7437BC,$82FCA6CA,$90E0B0D0,$A73315D8,$04F14A98,$EC41F7DA,$CD7F0E50,$91172FF6,
+    $4D768DD6,$EF434DB0,$AACC544D,$96E4DF04,$D19EE3B5,$6A4C1B88,$2CC1B81F,$65467F51,
+    $5E9D04EA,$8C015D35,$87FA7374,$0BFB2E41,$67B35A1D,$DB9252D2,$10E93356,$D66D1347,
+    $D79A8C61,$A1377A0C,$F8598E14,$13EB893C,$A9CEEE27,$61B735C9,$1CE1EDE5,$477A3CB1,
+    $D29C59DF,$F2553F73,$141879CE,$C773BF37,$F753EACD,$FD5F5BAA,$3DDF146F,$447886DB,
+    $AFCA81F3,$68B93EC4,$24382C34,$A3C25F40,$1D1672C3,$E2BC0C25,$3C288B49,$0DFF4195,
+    $A8397101,$0C08DEB3,$B4D89CE4,$566490C1,$CB7B6184,$32D570B6,$6C48745C,$B8D04257),
+   ($5150A7F4,$7E536541,$1AC3A417,$3A965E27,$3BCB6BAB,$1FF1459D,$ACAB58FA,$4B9303E3,
+    $2055FA30,$ADF66D76,$889176CC,$F5254C02,$4FFCD7E5,$C5D7CB2A,$26804435,$B58FA362,
+    $DE495AB1,$25671BBA,$45980EEA,$5DE1C0FE,$C302752F,$8112F04C,$8DA39746,$6BC6F9D3,
+    $03E75F8F,$15959C92,$BFEB7A6D,$95DA5952,$D42D83BE,$58D32174,$492969E0,$8E44C8C9,
+    $756A89C2,$F478798E,$996B3E58,$27DD71B9,$BEB64FE1,$F017AD88,$C966AC20,$7DB43ACE,
+    $63184ADF,$E582311A,$97603351,$62457F53,$B1E07764,$BB84AE6B,$FE1CA081,$F9942B08,
+    $70586848,$8F19FD45,$94876CDE,$52B7F87B,$AB23D373,$72E2024B,$E3578F1F,$662AAB55,
+    $B20728EB,$2F03C2B5,$869A7BC5,$D3A50837,$30F28728,$23B2A5BF,$02BA6A03,$ED5C8216,
+    $8A2B1CCF,$A792B479,$F3F0F207,$4EA1E269,$65CDF4DA,$06D5BE05,$D11F6234,$C48AFEA6,
+    $349D532E,$A2A055F3,$0532E18A,$A475EBF6,$0B39EC83,$40AAEF60,$5E069F71,$BD51106E,
+    $3EF98A21,$963D06DD,$DDAE053E,$4D46BDE6,$91B58D54,$71055DC4,$046FD406,$60FF1550,
+    $1924FB98,$D697E9BD,$89CC4340,$67779ED9,$B0BD42E8,$07888B89,$E7385B19,$79DBEEC8,
+    $A1470A7C,$7CE90F42,$F8C91E84,$00000000,$09838680,$3248ED2B,$1EAC7011,$6C4E725A,
+    $FDFBFF0E,$0F563885,$3D1ED5AE,$3627392D,$0A64D90F,$6821A65C,$9BD1545B,$243A2E36,
+    $0CB1670A,$930FE757,$B4D296EE,$1B9E919B,$804FC5C0,$61A220DC,$5A694B77,$1C161A12,
+    $E20ABA93,$C0E52AA0,$3C43E022,$121D171B,$0E0B0D09,$F2ADC78B,$2DB9A8B6,$14C8A91E,
+    $578519F1,$AF4C0775,$EEBBDD99,$A3FD607F,$F79F2601,$5CBCF572,$44C53B66,$5B347EFB,
+    $8B762943,$CBDCC623,$B668FCED,$B863F1E4,$D7CADC31,$42108563,$13402297,$842011C6,
+    $857D244A,$D2F83DBB,$AE1132F9,$C76DA129,$1D4B2F9E,$DCF330B2,$0DEC5286,$77D0E3C1,
+    $2B6C16B3,$A999B970,$11FA4894,$472264E9,$A8C48CFC,$A01A3FF0,$56D82C7D,$22EF9033,
+    $87C74E49,$D9C1D138,$8CFEA2CA,$98360BD4,$A6CF81F5,$A528DE7A,$DA268EB7,$3FA4BFAD,
+    $2CE49D3A,$500D9278,$6A9BCC5F,$5462467E,$F6C2138D,$90E8B8D8,$2E5EF739,$82F5AFC3,
+    $9FBE805D,$697C93D0,$6FA92DD5,$CFB31225,$C83B99AC,$10A77D18,$E86E639C,$DB7BBB3B,
+    $CD097826,$6EF41859,$EC01B79A,$83A89A4F,$E6656E95,$AA7EE6FF,$2108CFBC,$EFE6E815,
+    $BAD99BE7,$4ACE366F,$EAD4099F,$29D67CB0,$31AFB2A4,$2A31233F,$C63094A5,$35C066A2,
+    $7437BC4E,$FCA6CA82,$E0B0D090,$3315D8A7,$F14A9804,$41F7DAEC,$7F0E50CD,$172FF691,
+    $768DD64D,$434DB0EF,$CC544DAA,$E4DF0496,$9EE3B5D1,$4C1B886A,$C1B81F2C,$467F5165,
+    $9D04EA5E,$015D358C,$FA737487,$FB2E410B,$B35A1D67,$9252D2DB,$E9335610,$6D1347D6,
+    $9A8C61D7,$377A0CA1,$598E14F8,$EB893C13,$CEEE27A9,$B735C961,$E1EDE51C,$7A3CB147,
+    $9C59DFD2,$553F73F2,$1879CE14,$73BF37C7,$53EACDF7,$5F5BAAFD,$DF146F3D,$7886DB44,
+    $CA81F3AF,$B93EC468,$382C3424,$C25F40A3,$1672C31D,$BC0C25E2,$288B493C,$FF41950D,
+    $397101A8,$08DEB30C,$D89CE4B4,$6490C156,$7B6184CB,$D570B632,$48745C6C,$D04257B8));
+
+procedure XORBuffers(const Source1, Source2; Size: Integer; var Dest);
+asm // Dest^ =  Source1^ xor Source2^ , Size bytes
+       AND   ECX,ECX
+       JZ    @@5
+       PUSH  ESI
+       PUSH  EDI
+       MOV   ESI,EAX
+       MOV   EDI,Dest
+@@1:   TEST  ECX,3
+       JNZ   @@3
+@@2:   SUB   ECX,4
+       JL    @@4
+       MOV   EAX,[ESI + ECX]
+       XOR   EAX,[EDX + ECX]
+       MOV   [EDI + ECX],EAX
+       JMP   @@2
+@@3:   DEC   ECX
+       MOV   AL,[ESI + ECX]
+       XOR   AL,[EDX + ECX]
+       MOV   [EDI + ECX],AL
+       JMP   @@1
+@@4:   POP   EDI
+       POP   ESI
+@@5:
+end;
+
+// wipe
+const
+  WipeCount = 4;
+  WipeBytes : array[0..WipeCount -1] of Byte = ($55, $AA, $FF, $00);
+
+procedure ProtectBuffer(var Buffer; Size: Integer);
+var
+  Count: Integer;
+begin
+  if Size > 0 then
+    for Count := 0 to WipeCount -1 do
+      FillChar(Buffer, Size, WipeBytes[Count]);
+end;
+
+procedure ProtectBinary(var Value: Binary_AnsiString);
+begin
+  UniqueString(AnsiString(Value));
+  ProtectBuffer(Pointer(Value)^, Length(Value));
+  Value := '';
+end;
+
+resourcestring
+  sAlreadyPadded        = 'Cipher have already padded, can not process message';
+  sInvalidState         = 'Cipher is not in valid state for this action';
+
+type
+  EDECException  = class(Exception);
+    
+procedure TROCipher_AES.CheckState(States: TCipherStates);
+var
+  S: String;
+begin
+  if not (FState in States) then
+  begin
+    if FState = csPadded then S := sAlreadyPadded  else S := sInvalidState;
+    raise EDECException.Create(S);
+  end;
+end;
+
+constructor TROCipher_AES.Create;
+begin
+  inherited Create;
+  FBufferSize := Rijndael_Blocks * 4;
+  FUserSize := (Rijndael_Rounds + 1) * Rijndael_Blocks * SizeOf(LongWord) * 2;
+  FBlockSize := Rijndael_Blocks * 4;
+  FDataSize := FBufferSize * 3 + FUserSize;
+  ReallocMem(FData, FDataSize);
+  FVector := @FData[0];
+  FFeedback := @FVector[FBufferSize];
+  FBuffer := @FFeedback[FBufferSize];
+  FUser := @FBuffer[FBufferSize];
+  Protect;
+end;
+
+destructor TROCipher_AES.Destroy;
+begin
+  Protect;
+  ReallocMem(FData, 0);
+  FVector := nil;
+  FFeedback := nil;
+  FBuffer := nil;
+  FUser := nil;
+  inherited Destroy;
+end;
+
+procedure TROCipher_AES.Init(const Key; Size: Integer; const IVector; IVectorSize: Integer; IFiller: Byte);
+begin
+  Protect;
+
+  DoInit(Key, Size);
+
+  FillChar(FVector^, FBufferSize, IFiller);
+  if IVectorSize = 0 then
+  begin
+    DoEncode(FVector, FVector, FBufferSize);
+  end else Move(IVector, FVector^, IVectorSize);
+  Move(FVector^, FFeedback^, FBufferSize);
+  FState := csInitialized;
+end;
+
+procedure TROCipher_AES.Init(const Key: Binary_AnsiString; const IVector: Binary_AnsiString; IFiller: Byte);
+begin
+  Init(Key[1], Length(Key), IVector[1], Length(IVector), IFiller);
+end;
+
+procedure TROCipher_AES.DoDecode(Source, Dest: Pointer; Size: Integer);
+var
+  P: PLongArray;
+  I: Integer;
+  A2,B2,C2,D2: LongWord;
+  A1,B1,C1,D1: LongWord;
+begin
+  Assert(Size = FBlockSize);
+
+  P  := Pointer(PAnsiChar(FUser) + FUserSize shr 1 + FRounds * 16);
+  A1 := PLongArray(Source)[0];
+  B1 := PLongArray(Source)[1];
+  C1 := PLongArray(Source)[2];
+  D1 := PLongArray(Source)[3];
+
+  for I := 2 to FRounds do
+  begin
+    A2 := A1 xor P[0];
+    B2 := B1 xor P[1];
+    C2 := C1 xor P[2];                      
+    D2 := D1 xor P[3];
+
+    A1 := Rijndael_T[4, A2        and $FF] xor
+          Rijndael_T[5, D2 shr  8 and $FF] xor
+          Rijndael_T[6, C2 shr 16 and $FF] xor
+          Rijndael_T[7, B2 shr 24        ];
+    B1 := Rijndael_T[4, B2        and $FF] xor
+          Rijndael_T[5, A2 shr  8 and $FF] xor
+          Rijndael_T[6, D2 shr 16 and $FF] xor
+          Rijndael_T[7, C2 shr 24        ];
+    C1 := Rijndael_T[4, C2        and $FF] xor
+          Rijndael_T[5, B2 shr  8 and $FF] xor
+          Rijndael_T[6, A2 shr 16 and $FF] xor
+          Rijndael_T[7, D2 shr 24        ];
+    D1 := Rijndael_T[4, D2        and $FF] xor
+          Rijndael_T[5, C2 shr  8 and $FF] xor
+          Rijndael_T[6, B2 shr 16 and $FF] xor
+          Rijndael_T[7, A2 shr 24        ];
+
+    Dec(PLongWord(P), 4);
+  end;
+
+  A2 := A1 xor P[0];
+  B2 := B1 xor P[1];
+  C2 := C1 xor P[2];
+  D2 := D1 xor P[3];
+
+  Dec(PLongWord(P), 4);
+
+  PLongArray(Dest)[0] := (Rijndael_S[1, A2        and $FF]        or
+                          Rijndael_S[1, D2 shr  8 and $FF] shl  8 or
+                          Rijndael_S[1, C2 shr 16 and $FF] shl 16 or
+                          Rijndael_S[1, B2 shr 24]         shl 24)    xor P[0];
+  PLongArray(Dest)[1] := (Rijndael_S[1, B2        and $FF]        or
+                          Rijndael_S[1, A2 shr  8 and $FF] shl  8 or
+                          Rijndael_S[1, D2 shr 16 and $FF] shl 16 or
+                          Rijndael_S[1, C2 shr 24]         shl 24)    xor P[1];
+  PLongArray(Dest)[2] := (Rijndael_S[1, C2        and $FF]        or
+                          Rijndael_S[1, B2 shr  8 and $FF] shl  8 or
+                          Rijndael_S[1, A2 shr 16 and $FF] shl 16 or
+                          Rijndael_S[1, D2 shr 24]         shl 24)    xor P[2];
+  PLongArray(Dest)[3] := (Rijndael_S[1, D2        and $FF]        or
+                          Rijndael_S[1, C2 shr  8 and $FF] shl  8 or
+                          Rijndael_S[1, B2 shr 16 and $FF] shl 16 or
+                          Rijndael_S[1, A2 shr 24]         shl 24)    xor P[3];
+end;
+
+procedure TROCipher_AES.DoEncode(Source, Dest: Pointer; Size: Integer);
+var
+  P: PLongArray;
+  I: Integer;
+  A2,B2,C2,D2: LongWord;
+  A1,B1,C1,D1: LongWord;
+begin
+  Assert(Size = FBlockSize);
+  P  := FUser;
+  A1 := PLongArray(Source)[0];
+  B1 := PLongArray(Source)[1];
+  C1 := PLongArray(Source)[2];
+  D1 := PLongArray(Source)[3];
+  for I := 2 to FRounds do
+  begin
+    A2 := A1 xor P[0];
+    B2 := B1 xor P[1];
+    C2 := C1 xor P[2];
+    D2 := D1 xor P[3];
+
+    A1 := Rijndael_T[0, A2        and $FF] xor
+          Rijndael_T[1, B2 shr  8 and $FF] xor
+          Rijndael_T[2, C2 shr 16 and $FF] xor
+          Rijndael_T[3, D2 shr 24        ];
+    B1 := Rijndael_T[0, B2        and $FF] xor
+          Rijndael_T[1, C2 shr  8 and $FF] xor
+          Rijndael_T[2, D2 shr 16 and $FF] xor
+          Rijndael_T[3, A2 shr 24        ];
+    C1 := Rijndael_T[0, C2        and $FF] xor
+          Rijndael_T[1, D2 shr  8 and $FF] xor
+          Rijndael_T[2, A2 shr 16 and $FF] xor
+          Rijndael_T[3, B2 shr 24        ];
+    D1 := Rijndael_T[0, D2        and $FF] xor
+          Rijndael_T[1, A2 shr  8 and $FF] xor
+          Rijndael_T[2, B2 shr 16 and $FF] xor
+          Rijndael_T[3, C2 shr 24        ];
+
+    P := @P[4];
+  end;
+
+  A2 := A1 xor P[0];
+  B2 := B1 xor P[1];
+  C2 := C1 xor P[2];
+  D2 := D1 xor P[3];
+
+  PLongArray(Dest)[0] := (Rijndael_S[0, A2        and $FF]        or
+                          Rijndael_S[0, B2 shr  8 and $FF] shl  8 or
+                          Rijndael_S[0, C2 shr 16 and $FF] shl 16 or
+                          Rijndael_S[0, D2 shr 24        ] shl 24)     xor P[4];
+  PLongArray(Dest)[1] := (Rijndael_S[0, B2        and $FF]        or
+                          Rijndael_S[0, C2 shr  8 and $FF] shl  8 or
+                          Rijndael_S[0, D2 shr 16 and $FF] shl 16 or
+                          Rijndael_S[0, A2 shr 24        ] shl 24)     xor P[5];
+  PLongArray(Dest)[2] := (Rijndael_S[0, C2        and $FF]        or
+                          Rijndael_S[0, D2 shr  8 and $FF] shl  8 or
+                          Rijndael_S[0, A2 shr 16 and $FF] shl 16 or
+                          Rijndael_S[0, B2 shr 24        ] shl 24)     xor P[6];
+  PLongArray(Dest)[3] := (Rijndael_S[0, D2        and $FF]        or
+                          Rijndael_S[0, A2 shr  8 and $FF] shl  8 or
+                          Rijndael_S[0, B2 shr 16 and $FF] shl 16 or
+                          Rijndael_S[0, C2 shr 24        ] shl 24)     xor P[7];
+end;
+
+procedure TROCipher_AES.DoInit(const Key; Size: Integer);
+  procedure BuildEncodeKey;
+  const
+    RCon: array[0..9] of LongWord = ($01,$02,$04,$08,$10,$20,$40,$80,$1b,$36);
+  var
+    I: Integer;
+    T: LongWord;
+    P: PLongArray;
+  begin
+    P := FUser;
+    if Size <= 16 then
+    begin
+      for I := 0 to 9 do
+      begin
+        T := P[3];
+        P[4] := Rijndael_S[0, T shr  8 and $FF]        xor
+                Rijndael_S[0, T shr 16 and $FF] shl  8 xor
+                Rijndael_S[0, T shr 24        ] shl 16 xor
+                Rijndael_S[0, T        and $FF] shl 24 xor P[0] xor RCon[I];
+        P[5] := P[1] xor P[4];
+        P[6] := P[2] xor P[5];
+        P[7] := P[3] xor P[6];
+        P    := @P[4];
+      end;
+    end else
+      if Size <= 24 then
+      begin
+        for I := 0 to 7 do
+        begin
+          T := P[5];
+          P[6] := Rijndael_S[0, T shr  8 and $FF]        xor
+                  Rijndael_S[0, T shr 16 and $FF] shl  8 xor
+                  Rijndael_S[0, T shr 24        ] shl 16 xor
+                  Rijndael_S[0, T        and $FF] shl 24 xor P[0] xor RCon[I];
+          P[7] := P[1] xor P[6];
+          P[8] := P[2] xor P[7];
+          P[9] := P[3] xor P[8];
+          if I = 7 then Break;
+          P[10] := P[4] xor P[9];
+          P[11] := P[5] xor P[10];
+          P     := @P[6];
+        end;
+      end else
+      begin
+        for I :=0 to 6 do
+        begin
+          T := P[7];
+          P[8] := Rijndael_S[0, T shr  8 and $FF]        xor
+                  Rijndael_S[0, T shr 16 and $FF] shl  8 xor
+                  Rijndael_S[0, T shr 24        ] shl 16 xor
+                  Rijndael_S[0, T        and $FF] shl 24 xor P[0] xor RCon[I];
+          P[9] := P[1] xor P[8];
+          P[10] := P[2] xor P[9];
+          P[11] := P[3] xor P[10];
+          if I = 6 then Break;
+          T := P[11];
+          P[12] := Rijndael_S[0, T        and $FF]        xor
+                   Rijndael_S[0, T shr  8 and $FF] shl  8 xor
+                   Rijndael_S[0, T shr 16 and $FF] shl 16 xor
+                   Rijndael_S[0, T shr 24        ] shl 24 xor P[4];
+          P[13] := P[5] xor P[12];
+          P[14] := P[6] xor P[13];
+          P[15] := P[7] xor P[14];
+          P     := @P[8];
+        end;
+      end;
+  end;
+
+
+  procedure BuildDecodeKey;
+  var
+    P: PLongWord;
+    I: Integer;
+  begin
+    P := Pointer(PAnsiChar(FUser) + FUserSize shr 1);
+    Move(FUser^, P^, FUserSize shr 1);
+    Inc(P, 4);
+    for I := 0 to FRounds * 4 -5 do
+    begin
+      P^ := Rijndael_T[4, Rijndael_S[0, P^        and $FF]] xor
+            Rijndael_T[5, Rijndael_S[0, P^ shr  8 and $FF]] xor
+            Rijndael_T[6, Rijndael_S[0, P^ shr 16 and $FF]] xor
+            Rijndael_T[7, Rijndael_S[0, P^ shr 24        ]];
+      Inc(P);
+    end;
+  end;
+
+                                 
+begin
+  if Size <= 16 then FRounds := 10 else
+    if Size <= 24 then FRounds := 12
+      else FRounds := 14;
+  FillChar(FUser^, 32, 0);       
+  Move(Key, FUser^, Size);
+  BuildEncodeKey;
+  BuildDecodeKey;
+end;
+
+procedure TROCipher_AES.Done;
+begin
+  if FState <> csDone then
+  begin
+    FState := csDone;
+    FBufferIndex := 0;
+    DoEncode(FFeedback, FBuffer, FBufferSize);
+    Move(FVector^, FFeedback^, FBufferSize);
+  end;
+end;
+
+procedure TROCipher_AES.Protect;
+begin
+  FState := csNew;
+  ProtectBuffer(FData[0], FDataSize);
+end;
+
+
+procedure TROCipher_AES.Encode(const Source; var Dest; DataSize: Integer);
+
+  procedure EncodeCFB8(S,D: PByteArray; Size: Integer);
+  // CFB-8
+  var
+    I: Integer;
+  begin
+    I := 0;
+    while I < Size do
+    begin
+      DoEncode(FFeedback, FBuffer, FBufferSize);
+      Move(FFeedback[1], FFeedback[0], FBufferSize -1);
+      D[I] := S[I] xor FBuffer[0];
+      FFeedback[FBufferSize -1] := D[I];
+      Inc(I);
+    end;
+    FState := csEncode;
+  end;
+
+  procedure EncodeCBCx(S,D: PByteArray; Size: Integer);
+  var
+    F: PByteArray;
+    I: Integer;
+  begin
+    Dec(Size, FBufferSize);
+    F := FFeedback;
+    I := 0;
+    while I <= Size do
+    begin
+      XORBuffers(S[I], F[0], FBufferSize, D[I]);
+      F := @D[I];
+      DoEncode(F, F, FBufferSize);
+      Inc(I, FBufferSize);
+    end;
+    if F <> FFeedback then
+      Move(F[0], FFeedback[0], FBufferSize);
+    Dec(Size, I - FBufferSize);
+    if Size > 0 then
+    begin  // padding
+      EncodeCFB8(@S[I], @D[I], Size);
+      FState := csPadded;
+    end else FState := csEncode;
+  end;
+
+begin
+  CheckState([csInitialized, csEncode, csDone]);
+  EncodeCBCx(@Source, @Dest, DataSize);
+end;
+
+procedure TROCipher_AES.Decode(const Source; var Dest; DataSize: Integer);
+
+  procedure DecodeCFB8(S,D: PByteArray; Size: Integer);
+  // CFB-8
+  var
+    I: Integer;
+  begin
+    I := 0;
+    while I < Size do
+    begin
+      DoEncode(FFeedback, FBuffer, FBufferSize);
+      Move(FFeedback[1], FFeedback[0], FBufferSize -1);
+      FFeedback[FBufferSize -1] := S[I];
+      D[I] := S[I] xor FBuffer[0];
+      Inc(I);
+    end;
+    FState := csDecode;
+  end;
+
+  procedure DecodeCBCx(S,D: PByteArray; Size: Integer);
+  var
+    I: Integer;
+    F,B,T: PByteArray;
+  begin
+    Dec(Size, FBufferSize);
+    F := FFeedback;
+    I := 0;
+    if S = D then
+    begin
+      B := FBuffer;
+      while I <= Size do
+      begin
+        Move(S[I], B[0], FBufferSize);
+        DoDecode(@S[I], @S[I], FBufferSize);
+        XORBuffers(S[I], F[0], FBufferSize, S[I]);
+        T := F;
+        F := B;
+        B := T;
+        Inc(I, FBufferSize);
+      end;
+    end else
+      while I <= Size do
+      begin
+        DoDecode(@S[I], @D[I], FBufferSize);
+        XORBuffers(F[0], D[I], FBufferSize, D[I]);
+        F := @S[I];
+        Inc(I, FBufferSize);
+      end;
+    if F <> FFeedback then
+      Move(F[0], FFeedback[0], FBufferSize);
+    Dec(Size, I - FBufferSize);
+    if Size > 0 then
+    begin
+      DecodeCFB8(@S[I], @D[I], Size);
+      FState := csPadded;
+    end else FState := csDecode;
+  end;
+
+begin
+  CheckState([csInitialized, csDecode, csDone]);
+  DecodeCBCx(@Source, @Dest, DataSize);
+end;
+
+procedure TROCipher_AES.EncodeStream(const Source, Dest: TStream; const DataSize: Int64);
+var
+  Buffer: AnsiString;
+  BufferSize,Bytes: Integer;
+  Size: Int64;
+  dx: integer;
+begin
+  Size := DataSize;
+  if Size < 0 then Size := Source.Size - Source.Position;
+  BufferSize := StreamBufferSize;
+  SetLength(Buffer, BufferSize);
+  while Size > 0 do
+  begin
+    Bytes := BufferSize;
+    if Bytes > Size then Bytes := Size;
+    Source.ReadBuffer(Buffer[1], Bytes);
+    if (bytes < BufferSize) and (bytes mod FBlockSize <> 0) then begin
+      dx := FBlockSize - (bytes mod FBlockSize);
+      FillChar(Buffer[bytes+1],dx,0);
+      inc(Bytes, dx);
+    end;
+    Encode(Buffer[1], Buffer[1], Bytes);
+    Dest.WriteBuffer(Buffer[1], Bytes);
+    Dec(Size, Bytes);
+  end;
+end;
+
+procedure TROCipher_AES.DecodeStream(const Source, Dest: TStream; const DataSize: Int64);
+var
+  Buffer: Binary_AnsiString;
+  BufferSize,Bytes: Integer;
+  Size: int64;
+begin
+  Size := DataSize;
+  if Size < 0 then Size := Source.Size - Source.Position;
+
+  if Size > 0 then
+  try
+    BufferSize := StreamBufferSize mod FBlockSize;
+    if BufferSize = 0 then BufferSize := StreamBufferSize
+      else BufferSize := StreamBufferSize + FBlockSize - BufferSize;
+    if Size > BufferSize then SetLength(Buffer, BufferSize)
+      else SetLength(Buffer, Size);
+    while Size > 0 do
+    begin
+      Bytes := BufferSize;
+      if Bytes > Size then Bytes := Size;
+      Source.ReadBuffer(Buffer[1], Bytes);
+      Decode(Buffer[1], Buffer[1], Bytes);
+      Dest.WriteBuffer(Buffer[1], Bytes);
+      Dec(Size, Bytes);
+    end;
+  finally
+    ProtectBinary(Buffer);
+  end;
+end;
+
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROEventRepository.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROEventRepository.pas
new file mode 100644
index 0000000..a0e8d39
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROEventRepository.pas	
@@ -0,0 +1,1659 @@
+unit uROEventRepository;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes, SysUtils, SyncObjs, // Contnrs,
+  uROSessions, uROClientIntf, uROClient, uROTypes, uROClasses, uROServerIntf;
+
+type
+  IROEventsInvoker = interface;
+  TROEventReceiver = class;
+  TROSessionReference = class;
+  TROEventRepository = class;
+
+  TROInvokerInvokeMethod = procedure(__EventReceiver : TROEventReceiver; const aMessage : IROMEssage; const aTarget : IInterface) of object;
+
+  { IROEventRepository }
+  IROEventRepository = interface
+  ['{35D49EF1-F62C-4985-B092-8B09D235D81B}']
+    procedure AddSession(aSessionID : TGUID);
+    procedure RemoveSession(aSessionID : TGUID);
+
+    procedure StoreEventData(SourceSessionID : TGUID; Data : Binary;
+                             const ExcludeSender: Boolean;
+                             const ExcludeSessionList: Boolean;
+                             const SessionList: String);
+    function GetEventData(SessionID : TGUID; var TargetStream : Binary) : integer;
+  end;
+
+  { IROEventsInvoker }
+  IROEventsInvoker = interface
+  ['{A7FF5762-8208-4A91-B6C2-5D4ECB014EE9}']
+    procedure Execute(const aTarget : TObject; EventData: TStream);
+  end;
+
+  TROSessionEvent = procedure(Sender : TROEventRepository ; const SessionID : TGUID) of object;
+
+  { TROEventRepository }
+  TROEventRepository = class(TROComponent, IROEventRepository)
+  private
+    fSessionManager: TROCustomSessionManager;
+    fMessage: TROMessage;
+    fOnBeforeAddSession: TROSessionEvent;
+    fOnAfterRemoveSession: TROSessionEvent;
+    fOnAfterAddSession: TROSessionEvent;
+    fOnBeforeRemoveSession: TROSessionEvent;
+    procedure SetMessage(const Value: TROMessage);
+
+  protected
+    procedure SetSessionManager(const Value: TROCustomSessionManager); virtual;
+
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+
+    { Virtuals }
+    procedure DoStoreEventData(SourceSessionID : TGUID; Data : Binary;
+                               const ExcludeSender: Boolean;
+                               const ExcludeSessionList: Boolean;
+                               const SessionList: String); virtual; abstract;
+    function DoGetEventData(SessionID : TGUID; var TargetStream : Binary) : integer; virtual; abstract;
+    procedure DoAddSession(aSessionID : TGUID); overload; virtual; abstract;
+    procedure DoAddSession(aSessionID : TGUID; aActiveEventServer: IROActiveEventServer); overload; virtual;
+    procedure DoRemoveSession(aSessionID : TGUID); virtual; abstract;
+
+    function QueryInterface(const IID: TGUID; out Obj): HResult; override;
+
+  public
+    { IROEventRepository }
+    procedure StoreEventData(SourceSessionID : TGUID; Data : Binary;
+                             const ExcludeSender: Boolean;
+                             const ExcludeSessionList: Boolean;
+                             const SessionList: String);
+    function GetEventData(SessionID : TGUID; var TargetStream : Binary) : integer;
+
+    procedure AddSession(aSessionID : TGUID); overload;
+    procedure AddSession(aSessionID: TGUID; aActiveEventServer: IROActiveEventServer); overload;
+    function AddActiveListener(aSessionID: TGUID; aActiveEventServer: IROActiveEventServer): boolean; virtual;
+    procedure RemoveSession(aSessionID : TGUID);
+    procedure CheckProperties; virtual;
+
+//    procedure DeleteEventData(anEvent: TROEventData); virtual;
+
+    function GetEventWriter(const IID: TGUID): IROEventWriter;
+
+  published
+    property Message : TROMessage read fMessage write SetMessage;
+    property SessionManager : TROCustomSessionManager read fSessionManager write SetSessionManager;
+
+    property OnBeforeAddSession : TROSessionEvent read fOnBeforeAddSession write fOnBeforeAddSession;
+    property OnAfterAddSession : TROSessionEvent read fOnAfterAddSession write fOnAfterAddSession;
+    property OnAfterRemoveSession : TROSessionEvent read fOnAfterRemoveSession write fOnAfterRemoveSession;
+    property OnBeforeRemoveSession : TROSessionEvent read fOnBeforeRemoveSession write fOnBeforeRemoveSession;
+  end;
+
+  TROSessionRefToEventDataLink = class;
+
+  IROActiveEventServerList = interface
+  ['{C6ACE445-267E-4217-9A9C-1D357A7CB3BF}']
+    function GetNext: IROActiveEventServerList;
+    procedure SetNext(aData: IROActiveEventServerList);
+    function GetServer: IROActiveEventServer;
+
+    property Server: IROActiveEventServer read GetServer;
+    property Next: IROActiveEventServerList read GetNext write SetNext;
+    procedure DispatchEvent(anEventDataItem : TROEventData; aSessionReference : TGUID; aSender: TObject);
+  end;
+  TIROActiveEventServerList = class(TInterfacedObject, IROActiveEventServerList)
+  private
+    fNext: IROActiveEventServerList;
+    fServer: IROActiveEventServer;
+  public
+    constructor Create(aNext: IROActiveEventServerList; aItem: IROActiveEventServer);
+    class function AddListener(aList: IROActiveEventServerList; aItem: IROActiveEventServer): IROActiveEventServerList;
+    class function RemoveListener(aList: IROActiveEventServerList; aItem: IROActiveEventServer): IROActiveEventServerList;
+
+    function GetNext: IROActiveEventServerList;
+    function GetServer: IROActiveEventServer;
+    procedure SetNext(aData: IROActiveEventServerList);
+    procedure DispatchEvent(anEventDataItem : TROEventData; aSessionReference : TGUID; aSender: TObject);
+  end;
+
+  { TROSessionReference }
+  TROSessionReference = class
+  private
+    fTail: TROSessionRefToEventDataLink;
+    fHead: TROSessionRefToEventDataLink;
+    fSessionID: TGUID;
+    ActiveEventReference: IROActiveEventServerList;
+
+    function GetHead: TROSessionRefToEventDataLink;
+    function GetTail: TROSessionRefToEventDataLink;
+
+  public
+    constructor Create(aSessionID : TGUID);
+
+    property SessionID : TGUID read fSessionID;
+    property Head : TROSessionRefToEventDataLink read GetHead write fHead;
+    property Tail : TROSessionRefToEventDataLink read GetTail write fTail;
+  end;
+
+  { TROSessionRefToEventDataLink }
+  TROSessionRefToEventDataLink = class
+  private
+    fNext: TROSessionRefToEventDataLink;
+    fEventData: TROEventData;
+    fSessionReference: TROSessionReference;
+
+  public
+    constructor Create(anEventDataItem : TROEventData; aSessionReference : TROSessionReference);
+    destructor Destroy; override;
+
+    property EventData : TROEventData read fEventData;
+    property SessionReference : TROSessionReference read fSessionReference;
+    property Next: TROSessionRefToEventDataLink read fNext write fNext;
+  end;
+
+  { TROInMemoryEventRepository }
+  TROInMemoryEventRepository = class(TROEventRepository, IROSessionsChangesListener)
+  private
+    fSessionIDs: TStringList;
+//    fEvents : TObjectList;
+    fCritical : TCriticalSection;
+    FDestroyed: Boolean;
+
+    function GetSessionReferenceCount: integer;
+    function GetSessionReferences(Index: integer): TROSessionReference;
+
+    procedure UnRegisterSessionsChangesListener;
+    procedure RegisterSessionsChangesListener;
+  protected
+    procedure SetSessionManager(const Value: TROCustomSessionManager); override;
+
+    function FindSession(aSessionID: TGUID): TROSessionReference;
+
+    { Overrides }
+    procedure DoStoreEventData(SourceSessionID : TGUID; Data : Binary;
+                               const ExcludeSender: Boolean;
+                               const ExcludeSessionList: Boolean;
+                               const SessionList: String); override;
+    function DoGetEventData(SessionID : TGUID; var TargetStream : Binary) : integer; override;
+    procedure DoAddSession(aSessionID: TGUID); overload; override;
+    procedure DoAddSession(aSessionID : TGUID; aActiveEventServer: IROActiveEventServer); overload; override;
+    procedure DoRemoveSession(aSessionID: TGUID); override;
+    procedure RemoveSessionActiveListener(aSessionID: TGUID);
+
+    procedure Loaded; override;
+
+    { IROSessionsChangesListener }
+    procedure SessionsChangedNotification(const aSessionID : TGUID; aSessionAction: TROSessionsActions; Sender: TObject);
+
+  public
+//    procedure DeleteEventData(anEvent: TROEventData); override;
+    procedure BeforeDestruction; override;
+    function AddActiveListener(aSessionID: TGUID; aActiveEventServer: IROActiveEventServer): boolean; override;
+    constructor Create(aOwner : TComponent); override;
+    destructor Destroy; override;
+
+    property SessionReferences[Index : integer] : TROSessionReference read GetSessionReferences;
+    property SessionReferenceCount : integer read GetSessionReferenceCount;
+
+  published
+  end;
+
+  TROOnEventExceptionEvent = procedure (Sender: TObject; anException: Exception) of object;
+  IROEventReceiverInvokers = interface
+  ['{C8EA6D75-562E-4FE5-B4EF-47ACD4D2ADE8}']
+    function Invoke_GetEventsData(out EventsData: Binary): Integer;
+    procedure Invoke_RegisterEventClient(const EventTypes: AnsiString);
+    procedure Invoke_UnregisterEventClient(const EventTypes: AnsiString);
+  end;
+  { TROEventReceiver }
+  TROEventReceiver = class(TROChannelAwareComponent, IROObjectRetainer, IROEventReceiver, IROEventReceiverInvokers)
+  private
+    fTimer : TROThreadTimer;
+    fActive: boolean;
+    fServiceName: string;
+    fHandlers : TStringList;
+    fOnActivate: TNotifyEvent;
+    fOnDeactivate: TNotifyEvent;
+    fOnPollException: TROOnEventExceptionEvent;
+    fRetainedObjects : TList;
+    fInterval: Integer;
+    fEventAwareChannel: IROActiveEventChannel;
+    fSynchronizeInvoke: Boolean;
+    FServersideRegisterEvents: Boolean;
+
+    procedure SetInterval(const Value: integer);
+    procedure SetActive(const Value: boolean);
+    procedure SetServiceName(const Value: string);
+    function GetClientID: TGUID;
+    function GetSynchronizeInvoke: Boolean;
+  protected
+    function GetObject: TObject;
+    procedure FireEvents(EventsDataStream: TStream); virtual;
+
+    // Proxy methods
+    function Invoke_GetEventsData(out EventsData: Binary): Integer;
+    procedure Invoke_RegisterEventClient(const EventTypes: AnsiString);
+    procedure Invoke_UnregisterEventClient(const EventTypes: AnsiString);
+
+
+
+    procedure Dispatch(aStream: TStream; aCaller: TThread); reintroduce;
+  public
+    constructor Create(aOwner : TComponent); override;
+    destructor Destroy; override;
+
+    procedure Activate;
+    procedure Deactivate;
+
+    procedure RegisterEventHandlers(const EventIDs : array of Ansistring; const EventHandlers : array of TObject); overload;
+    procedure RegisterEventHandler(const EventID : Ansistring; const EventHandler : TObject);
+    procedure UnregisterEventHandlersByObject(const EventHandler : array of TObject);
+    procedure UnregisterEventHandlers(const EventIDs : array of Ansistring); overload;
+    procedure UnregisterEventHandler(const EventHandler : TObject); overload;
+    procedure UnregisterEventHandler(const EventIDs : Ansistring); overload;
+    function  EventHandlersIsRegistered(const EventIDs: array of Ansistring; const EventHandlers: array of TObject): boolean; deprecated;
+    function  AreEventHandlersRegistered(const aEventIDs: array of Ansistring; const aEventHandlers: array of TObject): boolean;
+    function  IsEventHandlerRegistered(const aEventID: Ansistring; const aEventHandler: TObject): boolean;
+    procedure CheckProperties(CheckServiceName: boolean = true);
+    { IROObjectRetainer }
+    procedure RetainObject(const anObject : TObject);
+    procedure ReleaseObject(const anObject : TObject);
+    function IsRetained(const anObject : TObject) : boolean;
+    procedure OnTimerTick(Dummy: Cardinal);
+    property ClientID : TGUID read GetClientID;
+
+  published
+    property Active : boolean read fActive write SetActive default false;
+    property Interval : integer read fInterval write SetInterval default 30000;
+    property Message;
+    property Channel;
+
+    property OnPollException: TROOnEventExceptionEvent read fOnPollException write fOnPollException;
+    property OnActivate : TNotifyEvent read fOnActivate write fOnActivate;
+    property OnDeactivate : TNotifyEvent read fOnDeactivate write fOnDeactivate;
+    property ServiceName : string read fServiceName write SetServiceName;
+    property SynchronizeInvoke: Boolean read GetSynchronizeInvoke write fSynchronizeInvoke default true;
+    property ServersideRegisterEvents: Boolean read FServersideRegisterEvents write fServersideRegisterEvents default True;
+  end;
+
+  { TROEventProxy }
+  TROEventProxy = class(TInterfacedObject)
+  private
+    fMessage : IROMessage;
+
+    function _GetMessage: IROMessage;  // cannot use "GetMessage" name for C++Builder compatibility
+
+  protected
+    property __Message : IROMessage read _GetMessage;
+
+  public
+    constructor Create(const aMessage : IROMessage; CloneMessage : boolean);
+    destructor Destroy; override;
+  end;
+
+  { TROEventWriter }
+  TROEventWriter = class(TROEventProxy, IROEventWriter)
+  private
+    fRepository : IROEventRepository;
+    fExcludeSender: boolean;
+    fExcludeSessionList: boolean;
+    fSessionList: TStringList;
+
+    function GetRepository: IROEventRepository;
+
+  protected
+    property Repository : IROEventRepository read GetRepository;
+
+    { IROEventWriter }
+    function GetSessionList: TStrings;
+    function GetExcludeSender: boolean;
+    function GetExcludeSessionList: boolean;
+    procedure SetExcludeSender(const Value: boolean);
+    procedure SetExcludeSessionList(const Value: boolean);
+
+  public
+    constructor Create(const aMessage : IROMessage;
+                       const aRepository : IROEventRepository); reintroduce;
+    destructor Destroy; override;
+
+    property ExcludeSender : boolean read GetExcludeSender write SetExcludeSender;
+    property ExcludeSessionList : boolean read GetExcludeSessionList write SetExcludeSessionList;
+    property SessionList : TStrings read GetSessionList;
+  end;
+
+  TROEventWriterClass = class of TROEventWriter;
+
+  { TROEventInvoker }
+  {$M+}
+  TROEventInvoker = class(TROEventProxy, IROEventsInvoker)
+  private
+    fEventReceiver : TROEventReceiver;
+
+  protected
+    { IROEventsInvoker }
+    procedure Execute(const aTarget : TObject; EventData: TStream);
+
+    property __EventReceiver : TROEventReceiver read fEventReceiver;
+
+  public
+    constructor Create(anEventReceiver : TROEventReceiver;
+        const aMessage : IROMessage; CloneMessage : boolean); reintroduce;
+    destructor Destroy; override;
+  end;
+  {$M-}
+
+  TROEventInvokerClass = class of TROEventInvoker;
+
+procedure RegisterEventWriterClass(const anEventIID : TGUID; anEventWriteClass : TROEventWriterClass);
+procedure UnregisterEventWriterClass(const anEventIID : TGUID);
+function FindEventWriterClass(const anEventIID : TGUID) : TROEventWriterClass;
+
+procedure RegisterEventInvokerClass(const anEventID : string; anEventWriteClass : TROEventInvokerClass);
+procedure UnregisterEventInvokerClass(const anEventID : string);
+function FindEventInvokerClass(const anEventID : string) : TROEventInvokerClass;
+
+implementation
+
+uses
+  uRORes;
+
+var
+  _EventInvokers,
+  _EventWriters : TStringList;
+
+procedure RegisterEventWriterClass(const anEventIID : TGUID; anEventWriteClass : TROEventWriterClass);
+var id : string;
+begin
+  id := GUIDToString(anEventIID);
+  _EventWriters.AddObject(id, TObject(anEventWriteClass));
+end;
+
+procedure UnregisterEventWriterClass(const anEventIID : TGUID);
+var idx : integer;
+begin
+  idx := _EventWriters.IndexOf(GUIDToString(anEventIID));
+  if (idx>=0)
+    then _EventWriters.Delete(idx);
+end;
+
+function FindEventWriterClass(const anEventIID : TGUID) : TROEventWriterClass;
+var idx : integer;
+    id : string;
+begin
+  result := NIL;
+  id := GUIDToString(anEventIID);
+  idx := _EventWriters.IndexOf(id);
+  if (idx>=0)
+    then result := TROEventWriterClass(_EventWriters.Objects[idx]);
+end;
+
+procedure RegisterEventInvokerClass(const anEventID : string; anEventWriteClass : TROEventInvokerClass);
+begin
+  _EventInvokers.AddObject(anEventID, TObject(anEventWriteClass));
+end;
+
+procedure UnregisterEventInvokerClass(const anEventID : string);
+var idx : integer;
+begin
+  idx := _EventInvokers.IndexOf(anEventID);
+  if (idx>=0)
+    then _EventInvokers.Delete(idx);
+end;
+
+function FindEventInvokerClass(const anEventID : string) : TROEventInvokerClass;
+var idx : integer;
+begin
+  result := NIL; 
+  idx := _EventInvokers.IndexOf(anEventID);
+  if (idx>=0)
+    then result := TROEventInvokerClass(_EventInvokers.Objects[idx]);
+end;
+
+{ TROEventRepository }
+
+procedure TROEventRepository.AddSession(aSessionID: TGUID);
+begin
+  CheckProperties;
+  if Assigned(fOnBeforeAddSession) then
+    fOnBeforeAddSession(Self, aSessionID);
+
+  DoAddSession(aSessionID);
+
+  if Assigned(fOnAfterAddSession) then
+    fOnAfterAddSession(Self, aSessionID);
+end;
+
+procedure TROEventRepository.AddSession(aSessionID: TGUID; aActiveEventServer: IROActiveEventServer);
+begin
+  CheckProperties;
+  if Assigned(fOnBeforeAddSession) then
+    fOnBeforeAddSession(Self, aSessionID);
+
+  DoAddSession(aSessionID, aActiveEventServer);
+
+  if Assigned(fOnAfterAddSession) then
+    fOnAfterAddSession(Self, aSessionID);
+end;
+
+procedure TROEventRepository.RemoveSession(aSessionID: TGUID);
+begin
+  CheckProperties;
+  if Assigned(fOnBeforeRemoveSession)
+    then fOnBeforeRemoveSession(Self, aSessionID);
+
+  DoRemoveSession(aSessionID);
+
+  if Assigned(fOnAfterRemoveSession)
+    then fOnAfterRemoveSession(Self, aSessionID);
+end;
+
+function TROEventRepository.GetEventData(SessionID: TGUID;
+  var TargetStream: Binary): integer;
+begin
+  CheckProperties;
+  result := DoGetEventData(SessionID, TargetStream);
+end;
+
+function TROEventRepository.GetEventWriter(const IID: TGUID): IROEventWriter;
+var
+  lEventWriterClass: TROEventWriterClass;
+begin
+  lEventWriterClass := FindEventWriterClass(IID);
+  if not assigned(lEventWriterClass) then exit;
+  CheckProperties;
+  result := lEventWriterClass.Create(fMessage, Self) as IROEventWriter;
+end;
+
+procedure TROEventRepository.Notification(AComponent: TComponent;
+  Operation: TOperation);
+begin
+  inherited;
+
+  if (Operation<>opRemove) then Exit;
+
+  if (AComponent=fSessionManager) then fSessionManager := NIL
+  else if (AComponent=fMessage) then fMessage := NIL;
+end;
+
+function TROEventRepository.QueryInterface(const IID: TGUID; out Obj): HResult;
+var eventwriterclass : TROEventWriterClass;
+    eventwriter : TROEventWriter;
+    id : string;
+begin
+  result := inherited QueryInterface(IID, Obj);
+
+  if (result<>S_OK) then begin
+    id := GUIDToString(IID);
+    if (id='') then Exit;
+
+    eventwriterclass := FindEventWriterClass(IID);
+    if (eventwriterclass=NIL) then Exit;
+    CheckProperties;
+    eventwriter := eventwriterclass.Create(fMessage, Self);
+    if eventwriter.GetInterface(IID, Obj)
+      then result := S_OK
+      else eventwriter.Free;
+  end;
+end;
+
+procedure TROEventRepository.SetMessage(const Value: TROMessage);
+begin
+  fMessage := Value;
+  if (fMessage<>NIL) then fMessage.FreeNotification(Self);
+end;
+
+procedure TROEventRepository.SetSessionManager(
+  const Value: TROCustomSessionManager);
+begin
+  if (fSessionManager=Value) then Exit;
+
+  fSessionManager := Value;
+  if (fSessionManager<>NIL)
+    then fSessionManager.FreeNotification(Self);
+end;
+
+procedure TROEventRepository.StoreEventData(SourceSessionID : TGUID; Data : Binary;
+ const ExcludeSender: Boolean; const ExcludeSessionList: Boolean; const SessionList: String);
+begin
+  CheckProperties;
+  DoStoreEventData(SourceSessionID, Data, ExcludeSender, ExcludeSessionList, SessionList);
+end;
+
+procedure TROEventRepository.DoAddSession(aSessionID: TGUID;
+  aActiveEventServer: IROActiveEventServer);
+begin
+  {$IFDEF FPC}
+  if aActiveEventServer = nil then DoAddSession(aSessionID) else // for preventing warnings in FPC
+  {$ENDIF FPC}
+  DoAddSession(aSessionID);
+end;
+
+(*procedure TROEventRepository.DeleteEventData(anEvent: TROEventData);
+begin
+ ///
+end;*)
+
+procedure TROEventRepository.CheckProperties;
+begin
+  // Check(SessionManager = nil, Name + '.SessionManager must be assigned.');
+  Check(Message = nil, Name + '.Message must be assigned.');
+  Message.CheckProperties;
+end;
+
+function TROEventRepository.AddActiveListener(aSessionID: TGUID;
+  aActiveEventServer: IROActiveEventServer): boolean;
+begin
+  Result := False;
+end;
+
+{ TROInMemoryEventRepository }
+
+constructor TROInMemoryEventRepository.Create(aOwner: TComponent);
+begin
+  inherited;
+
+  fCritical := TCriticalSection.Create;
+//  fEvents := TObjectList.Create(False); // cleaned up one by one
+  fSessionIDs := TStringList.Create;
+  fSessionIDs.Duplicates := dupIgnore;
+  fSessionIDs.Sorted := TRUE;
+end;
+
+destructor TROInMemoryEventRepository.Destroy;
+var
+  i: Integer;
+  llink: TROSessionReference;
+  lItem, lnext: TROSessionRefToEventDataLink;
+begin
+  FDestroyed:=True;
+  fCritical.Enter;
+  try
+    for i := fSessionIDs.Count -1 downto 0 do begin
+      llink := TROSessionReference(fSessionIDs.Objects[i]);
+      if llink = nil then continue;
+      lItem := llink.Head;
+      llink.Free;
+      while lItem <> nil do begin
+        if lItem.EventData <> nil then begin
+          if lItem.EventData.RemoveRef <= 0 then 
+//            fEvents.Remove(lItem.EventData);
+            lItem.EventData.Free
+        end;
+        lnext := lItem.Next;
+        lItem.Free;
+        lItem := lNext;
+      end;
+    end;
+  finally
+    fCritical.Leave;
+  end;
+  FreeAndNIL(fSessionIDs);
+//  FreeAndNIL(fEvents);
+  FreeAndNIL(fCritical);
+  
+  inherited;
+end;
+
+function TROInMemoryEventRepository.DoGetEventData(SessionID: TGUID;
+  var TargetStream: Binary): integer;
+var sessionreference : TROSessionReference;
+    prevref,
+    currref : TROSessionRefToEventDataLink;
+    chunksize : integer;
+begin
+  result := 0;
+  if FDestroyed then Exit;
+  fCritical.Enter;
+  try
+    sessionreference := FindSession(SessionID);
+    if (sessionreference=NIL) then Exit;
+
+    TargetStream.Write(result, SizeOf(result));
+
+    currref := sessionreference.Head;
+    if (currref<>NIL) then begin
+      repeat
+        currref.EventData.Data.Position := 0;
+        chunksize := currref.EventData.Data.Size;
+
+        TargetStream.Write(chunksize, SizeOf(chunksize));
+        TargetStream.CopyFrom(currref.EventData.Data, 0);
+
+        Inc(result);
+
+        prevref := currref;
+        currref := currref.Next;
+
+        if (prevref.EventData.RemoveRef=0)then begin
+//          fEvents.Remove(prevref.EventData);
+          prevref.EventData.Free;
+        end;
+
+        prevref.Free;
+
+      until (currref=NIL);
+
+      sessionreference.Head := NIL;
+      sessionreference.Tail := NIL;
+    end;
+
+    // Updates the event count
+    TargetStream.Position := 0;
+    TargetStream.Write(result, SizeOf(result));
+    TargetStream.Position := 0;
+  finally
+    fCritical.Leave;
+  end;
+end;
+
+procedure TROInMemoryEventRepository.DoStoreEventData(SourceSessionID : TGUID; Data : Binary;
+  const ExcludeSender: Boolean; const ExcludeSessionList: Boolean; const SessionList: String);
+var newlink : TROSessionRefToEventDataLink;
+    newevent : TROEventData;
+    sessionref : TROSessionReference;
+    i : integer;
+    filteredsessionslist : TStringList;
+    isfiltered : boolean;
+    currsessionid : string;
+begin
+  if FDestroyed then Exit;
+  filteredsessionslist := NIL;
+  isfiltered := SessionList<>'';
+  if isfiltered then begin
+    filteredsessionslist := TStringList.Create;
+    filteredsessionslist.Sorted := TRUE;
+    filteredsessionslist.Duplicates := dupIgnore;
+    filteredsessionslist.CommaText := SessionList;
+  end;
+  fCritical.Enter;
+  try
+    newevent := TROEventData.Create(Data);
+    try
+      for i := 0 to (SessionReferenceCount-1) do begin
+        sessionref := SessionReferences[i];
+        currsessionid := GUIDToString(sessionref.SessionID);
+
+        // Filters the sessions the message will go to
+        if isfiltered then begin
+          if ExcludeSessionList then begin
+            if (filteredsessionslist.IndexOf(currsessionid)>=0)
+              then Continue;
+          end
+          else begin
+            if not (filteredsessionslist.IndexOf(currsessionid)>=0)
+              then Continue;
+          end;
+        end;
+
+        if IsEqualGUID(sessionref.SessionID, SourceSessionID) and ExcludeSender
+          then Continue;
+        if sessionref.ActiveEventReference <> nil then begin
+          newevent.AddRef; // we don't want the event to be freed before we're done with it.
+          sessionref.ActiveEventReference.DispatchEvent(newevent, sessionref.SessionID, Self);
+        end
+        else begin
+          newlink := TROSessionRefToEventDataLink.Create(newevent, sessionref);
+
+          if (sessionref.Head=NIL)
+            then sessionref.Head := newlink;
+
+          if (sessionref.Tail<>NIL)
+            then sessionref.Tail.Next := newlink;
+
+          sessionref.Tail := newlink;
+        end;
+      end;
+    finally
+      if newevent.RemoveRef < 1 then
+        newevent.Free;
+    end;
+  finally
+    fCritical.Leave;
+    FreeAndNIL(filteredsessionslist);
+  end;
+end;
+
+procedure TROInMemoryEventRepository.DoRemoveSession(aSessionID: TGUID);
+var
+  idx : integer;
+  sessionreference : TROSessionReference;
+  prevref,
+  currref : TROSessionRefToEventDataLink;
+begin
+  if FDestroyed then Exit;
+  fCritical.Enter;
+  try
+    idx := fSessionIDs.IndexOf(GUIDToString(aSessionID));
+    if idx>=0 then begin
+      sessionreference := TROSessionReference(fSessionIDs.Objects[idx]);
+      currref := sessionreference.Head;
+      if (currref<>NIL) then begin
+        repeat
+          prevref := currref;
+          currref := currref.Next;
+
+          if (prevref.EventData.RemoveRef=0)
+            then
+              prevref.EventData.Free;
+
+          prevref.Free;
+
+        until (currref=NIL);
+        sessionreference.Head := NIL;
+        sessionreference.Tail := NIL;
+      end;
+      sessionreference.ActiveEventReference := nil;
+      fSessionIDs.Objects[idx].Free;
+      fSessionIDs.Delete(idx);
+    end;
+  finally
+    fCritical.Leave;
+  end;
+end;
+
+procedure TROInMemoryEventRepository.DoAddSession(aSessionID: TGUID);
+begin
+  DoAddSession(aSessionID, nil);
+end;
+
+function TROInMemoryEventRepository.GetSessionReferenceCount: integer;
+begin
+  result := fSessionIDs.Count;
+end;
+
+function TROInMemoryEventRepository.GetSessionReferences(
+  Index: integer): TROSessionReference;
+begin
+  result := TROSessionReference(fSessionIDs.Objects[Index]);
+end;
+
+function TROInMemoryEventRepository.FindSession(
+  aSessionID: TGUID): TROSessionReference;
+var idx : integer;
+begin
+  result := NIL;
+
+  idx := fSessionIDs.IndexOf(GUIDToString(aSessionID));
+  if (idx>=0)
+    then result := TROSessionReference(fSessionIDs.Objects[idx]);
+end;
+
+procedure TROInMemoryEventRepository.UnRegisterSessionsChangesListener;
+var
+  Ref: IROSessionsChangesNotifier;
+  SelfRef: IROSessionsChangesListener;
+begin
+  if GetInterface(IROSessionsChangesListener, SelfRef) then begin
+    if Assigned(fSessionManager) and
+       fSessionManager.GetInterface(IROSessionsChangesNotifier, ref) then begin
+      ref.UnRegisterSessionsChangesListener(SelfRef);
+    end;
+  end;
+end;
+
+procedure TROInMemoryEventRepository.RegisterSessionsChangesListener;
+var
+  Ref: IROSessionsChangesNotifier;
+  SelfRef: IROSessionsChangesListener;
+begin
+  if GetInterface(IROSessionsChangesListener, SelfRef) then begin
+    if Assigned(fSessionManager) and
+       fSessionManager.GetInterface(IROSessionsChangesNotifier, ref) then begin
+      ref.RegisterSessionsChangesListener(SelfRef);
+    end;
+  end;
+end;
+
+procedure TROInMemoryEventRepository.SetSessionManager(
+  const Value: TROCustomSessionManager);
+begin
+  if (csDesigning in ComponentState) or (csLoading in ComponentState) then begin
+    inherited;
+    Exit;
+  end;
+
+  UnRegisterSessionsChangesListener;
+  inherited;
+  RegisterSessionsChangesListener;
+end;
+
+procedure TROInMemoryEventRepository.Loaded;
+begin
+  inherited;
+  RegisterSessionsChangesListener;
+end;
+
+procedure TROInMemoryEventRepository.SessionsChangedNotification(
+  const aSessionID: TGUID; aSessionAction: TROSessionsActions; Sender: TObject);
+var
+  idx: Integer;
+  lRef: IROActiveEventServer;
+  sessionreference: TROSessionReference;
+begin
+  if FDestroyed then Exit;
+  if aSessionAction in [saDelete, saTmpSessionDelete] then
+    RemoveSession(aSessionID);
+  if aSessionAction = saRemoveActiveListener then begin
+    fCritical.Enter;
+    try
+      idx := fSessionIDs.IndexOf(GUIDToString(aSessionID));
+      if idx>=0 then begin
+        sessionreference := TROSessionReference(fSessionIDs.Objects[idx]);
+        if Supports(Sender, IROActiveEventServer, lref) then begin
+          sessionreference.ActiveEventReference := TIROActiveEventServerList.RemoveListener(sessionreference.ActiveEventReference, lRef);
+        end else
+          sessionreference.ActiveEventReference := nil;
+      end;
+    finally
+      fCritical.Leave;
+    end;
+  end;
+end;
+
+procedure TROInMemoryEventRepository.BeforeDestruction;
+begin
+  UnRegisterSessionsChangesListener;
+  inherited;
+end;
+
+procedure TROInMemoryEventRepository.DoAddSession(aSessionID: TGUID;
+  aActiveEventServer: IROActiveEventServer);
+var newsession : TROSessionReference;
+  idx: Integer;
+begin
+  if FDestroyed then Exit;
+  fCritical.Enter;
+  try
+    idx := fSessionIDs.IndexOf(GUIDToString(aSessionID));
+    if idx < 0 then begin
+      newsession := TROSessionReference.Create(aSessionID);
+      if aActiveEventServer <> nil then begin
+        newsession.ActiveEventReference := TIROActiveEventServerList.AddListener(newsession.ActiveEventReference, aActiveEventServer);
+        aActiveEventServer.EventsRegistered(self, aSessionID);
+      end;
+      fSessionIDs.AddObject(GUIDToString(aSessionID), newsession);
+    end
+    else begin
+      newsession := TROSessionReference(fSessionIDs.Objects[idx]);
+      if aActiveEventServer <> nil then begin
+        newsession.ActiveEventReference := TIROActiveEventServerList.AddListener(newsession.ActiveEventReference, aActiveEventServer);
+        aActiveEventServer.EventsRegistered(self, aSessionID);
+      end;
+    end;
+  finally
+    fCritical.Leave;
+  end;
+end;
+
+procedure TROInMemoryEventRepository.RemoveSessionActiveListener(
+  aSessionID: TGUID);
+var
+  idx : integer;
+  sessionreference : TROSessionReference;
+begin
+  if FDestroyed then Exit;
+  fCritical.Enter;
+  try
+    idx := fSessionIDs.IndexOf(GUIDToString(aSessionID));
+    if idx>=0 then begin
+      sessionreference := TROSessionReference(fSessionIDs.Objects[idx]);
+      sessionreference.ActiveEventReference := nil;
+    end;
+  finally
+    fCritical.Leave;
+  end;
+end;
+
+(*
+procedure TROInMemoryEventRepository.DeleteEventData(
+  anEvent: TROEventData);
+begin
+  fCritical.Enter;
+  try
+    fEvents.Remove(anEvent);
+  finally
+    fCritical.Leave;
+  end;
+end;
+*)
+
+function TROInMemoryEventRepository.AddActiveListener(aSessionID: TGUID;
+  aActiveEventServer: IROActiveEventServer): boolean;
+begin
+  Result := fSessionIDs.IndexOf(GUIDToString(aSessionID)) <> -1;
+  if Result then AddSession(aSessionID,aActiveEventServer);
+end;
+
+{ TROSessionReference }
+
+constructor TROSessionReference.Create(aSessionID: TGUID);
+begin
+  inherited Create;
+
+  fSessionID := aSessionID;
+end;
+
+function TROSessionReference.GetHead: TROSessionRefToEventDataLink;
+begin
+  Result := fHead;
+end;
+
+function TROSessionReference.GetTail: TROSessionRefToEventDataLink;
+begin
+  Result := fTail;
+end;
+
+{ TROSessionRefToEventDataLink }
+
+constructor TROSessionRefToEventDataLink.Create(
+  anEventDataItem: TROEventData; aSessionReference: TROSessionReference);
+begin
+  inherited Create;
+  anEventDataItem.AddRef;
+
+  fEventData := anEventDataItem;
+  fSessionReference := aSessionReference;
+end;
+
+destructor TROSessionRefToEventDataLink.Destroy;
+begin
+  inherited;
+end;
+
+{ TROEventReceiver }
+
+constructor TROEventReceiver.Create(aOwner: TComponent);
+begin
+  inherited;
+
+  fHandlers := TStringList.Create;
+  fInterval := 30000;
+
+  fSynchronizeInvoke := true;
+  FServersideRegisterEvents := True;
+end;
+
+destructor TROEventReceiver.Destroy;
+begin
+  FreeAndNIL(fHandlers);
+  FreeAndNIL(fRetainedObjects);
+  
+  inherited;
+end;
+
+procedure TROEventReceiver.Activate;
+begin
+  Active := TRUE;
+end;
+
+procedure TROEventReceiver.Deactivate;
+begin
+  Active := FALSE;
+end;
+
+procedure TROEventReceiver.SetActive(const Value: boolean);
+begin
+  if Value <> fActive then begin
+    if Value and not (csDesigning in ComponentState) then
+      CheckProperties;
+
+    fActive := Value;
+
+    if (Channel = nil) or not Supports(Channel, IROActiveEventChannel, fEventAwareChannel) then
+      fEventAwareChannel := nil;
+
+    if Value then
+    begin
+      if fEventAwareChannel <> nil then
+        fEventAwareChannel.RegisterEventReceiver(self)
+      else
+      if FTimer = nil then
+        fTimer := TROThreadTimer.Create(OnTimerTick, fInterval, false);
+    end else begin
+      if fEventAwareChannel <> nil then begin
+        fEventAwareChannel.UnregisterEventReceiver(self);
+        fEventAwareChannel:=nil;
+      end
+      else if fTimer <> nil then begin
+        fTimer.AsyncFree;
+        fTimer := nil;
+      end;
+    end;
+
+    if Value then begin
+      if Assigned(fOnActivate) then fOnActivate(Self);
+    end
+    else begin
+      if Assigned(fOnDeactivate) then fOnDeactivate(Self);
+    end;
+  end;
+
+end;
+
+procedure TROEventReceiver.SetInterval(const Value: integer);
+begin
+  fInterval := Value;
+  if fTimer <> nil then
+    fTimer.Timeout := Value;
+end;
+
+procedure TROEventReceiver.SetServiceName(const Value: string);
+begin
+  fServiceName := Trim(Value);
+end;
+
+procedure TROEventReceiver.Invoke_RegisterEventClient(const EventTypes: AnsiString);
+var
+    __message : IROMessage;
+    __channel : IROTransportChannel;
+    ClientId: Ansistring;
+begin
+  CheckProperties;
+  __message := (Message as IROMessage);
+  __channel := (Channel as IROTransportChannel);
+
+  try
+    __message.InitializeRequestMessage(__channel, 'RemObjects', ServiceName, 'RegisterEventClient');
+    __channel.BeforeDispatch(__message); // sets the client id for some channels
+    ClientId := GuidToAnsiString(__message.ClientID);
+    __message.Write('ClientID', TypeInfo(AnsiString), ClientId, []);
+    __message.Write('EventTypes', TypeInfo(AnsiString), EventTypes, []);
+    __message.Finalize;
+
+     __channel.Dispatch(__message);
+
+  finally
+    __Message.FreeStream;
+  end
+end;
+
+procedure TROEventReceiver.Invoke_UnregisterEventClient(const EventTypes: AnsiString);
+var
+    __message : IROMessage;
+    __channel : IROTransportChannel;
+    ClientId: Ansistring;
+begin
+  CheckProperties;
+  __message := (Message as IROMessage);
+  __channel := (Channel as IROTransportChannel);
+
+
+  try
+    __message.InitializeRequestMessage(__channel, 'RemObjects', ServiceName, 'UnregisterEventClient');
+    __channel.BeforeDispatch(__message);
+    ClientId := GuidToAnsiString(__message.ClientID);
+    __message.Write('ClientID', TypeInfo(AnsiString), ClientID, []);
+    __message.Write('EventTypes', TypeInfo(AnsiString), EventTypes, []);
+    __message.Finalize;
+
+     __channel.Dispatch(__message);
+
+  finally
+    __Message.FreeStream;
+  end
+end;
+
+function TROEventReceiver.Invoke_GetEventsData(out EventsData: Binary): Integer;
+var
+    __message : IROMessage;
+    __channel : IROTransportChannel;
+    ClientId: Ansistring;
+begin
+  CheckProperties;
+  __message := (Message as IROMessage);
+  __channel := (Channel as IROTransportChannel);
+
+  try
+    __message.InitializeRequestMessage(__channel, 'RemObjects', ServiceName, 'GetEventsData');
+    __channel.BeforeDispatch(__message);
+    ClientId := GuidToAnsiString(__message.ClientID);
+    __message.Write('ClientID', TypeInfo(AnsiString), ClientID, []);
+    __message.Finalize;
+
+     __channel.Dispatch(__message);
+    result := 0; // else it's warn
+    EventsData := nil; // else it's warn
+    __message.Read('Result', TypeInfo(Integer), result, []);
+    __message.Read('EventsData', TypeInfo(Binary), EventsData, []);
+  finally
+    __message.FreeStream;
+  end
+end;
+
+procedure TROEventReceiver.FireEvents(EventsDataStream : TStream);
+var
+  tempstream : TStream;
+  chunksize, idx, cnt : integer;
+  messageclone : IROMessage;
+  eventInvokerclass : TROEventInvokerClass;
+  eventInvoker : TROEventInvoker;
+begin
+  CheckProperties;
+  tempstream := NIL;
+  eventInvoker := NIL;
+  chunksize:=0;
+
+  messageclone := (Message as IROMessageCloneable).Clone;
+
+  EventsDataStream.Position := 0;
+
+  if fEventAwareChannel <> nil then begin
+    // event aware channels send one event at a time.
+    messageclone.ReadFromStream(EventsDataStream);
+
+    eventInvokerclass := FindEventInvokerClass(messageclone.InterfaceName);
+    eventInvoker := eventInvokerclass.Create(Self, messageclone, FALSE);
+
+    try
+      for idx := 0 to fHandlers.Count -1 do begin
+        if SameText(fHandlers[idx], messageclone.InterfaceName) then
+          eventInvoker.Execute(fHandlers.Objects[idx], EventsDataStream);
+      end;
+    finally
+      FreeAndNIL(eventInvoker);
+    end;
+
+  end
+  else begin
+    cnt := 0; // else it's warn
+    EventsDataStream.Read(cnt, SizeOf(integer));
+
+    while (EventsDataStream.Position<EventsDataStream.Size-1) do try
+      EventsDataStream.Read(chunksize, SizeOf(integer));
+
+      tempstream := TMemoryStream.Create;
+      tempstream.CopyFrom(EventsDataStream, chunksize);
+      tempstream.Position := 0;
+
+      messageclone.ReadFromStream(tempstream);
+
+      eventInvokerclass := FindEventInvokerClass(messageclone.InterfaceName);
+      eventInvoker := eventInvokerclass.Create(Self, messageclone, FALSE);
+
+      try
+        for idx := 0 to fHandlers.Count -1 do begin
+          if SameText(fHandlers[idx], messageclone.InterfaceName) then
+            eventInvoker.Execute(fHandlers.Objects[idx], tempstream);
+        end;
+      finally
+        FreeAndNIL(eventInvoker);
+      end;
+    finally
+      tempstream.Free;
+    end;
+  end;
+end;
+
+procedure TROEventReceiver.OnTimerTick(Dummy: Cardinal);
+var
+  eventsdata: Binary;
+  cnt : integer;
+begin
+  if Channel.Busy then Exit;
+  CheckProperties;
+  {$IFDEF FPC}
+  if Dummy=0 then eventsdata := NIL else // for preventing warning in FPC
+  {$ENDIF}
+  eventsdata := NIL;
+  try
+    try
+      cnt := Invoke_GetEventsData(eventsdata);
+
+      // Fires the events...
+      if (cnt>0) and (eventsdata<>NIL) then begin
+        Dispatch(eventsdata, fTimer);
+      end;
+    except
+      on e: Exception do
+      begin
+        if @fOnPollException <> nil then
+          fOnPollException(self, e);
+      end;
+    end;
+
+  finally
+    if (eventsdata<>NIL)
+      then eventsdata.Free;
+  end;
+end;
+
+procedure TROEventReceiver.RegisterEventHandlers(
+  const EventIDs: array of Ansistring;
+  const EventHandlers: array of TObject);
+var {clientid,} eventID, eventtypes : Ansistring;
+    i : integer;
+begin
+  Activate;
+  // Adds a reference to the event handler object
+  //clientid := GUIDTOString(Self.ClientID);
+  eventtypes := '';
+
+  for i := 0 to Length(EventIDs)-1 do begin
+    eventID := EventIDs[i];
+    eventtypes := eventtypes+eventID+',';
+  end;
+  Delete(eventtypes, Length(eventtypes), 1);
+
+  // Sends the remote request
+  if (fEventAwareChannel = nil) or (ServersideRegisterEvents) then
+    Invoke_RegisterEventClient(eventtypes);
+
+//Moved here to avoid invalid list in case registration is incorrect.
+//(for example if connection to server temporary broken)
+  for i := 0 to Length(EventIDs)-1 do begin
+    // Adds a reference to the local event handler object
+    eventID := EventIDs[i];
+    fHandlers.AddObject({$IFDEF UNICODE}AnsiStringToWideString{$ENDIF} (eventID), EventHandlers[i]);
+  end;
+end;
+
+{$WARN SYMBOL_DEPRECATED OFF} // delphi warns on the implementation of this method because it's defined as deprecated.
+function TROEventReceiver.EventHandlersIsRegistered(const EventIDs: array of Ansistring; const EventHandlers: array of TObject): boolean;
+begin
+  result := AreEventHandlersRegistered(EventIDs, EventHandlers);
+end;
+{$WARN SYMBOL_DEPRECATED ON}
+function TROEventReceiver.AreEventHandlersRegistered(const aEventIDs: array of Ansistring; const aEventHandlers: array of TObject): boolean;
+
+  var
+  i : integer;
+
+begin
+  Result := True;
+  for i := 0 to Length(aEventIDs) - 1 do begin
+    if not IsEventHandlerRegistered(aEventIDs[i], aEventHandlers[i]) then begin
+      Result := False;
+      break;
+    end;
+  end;
+end;
+
+function TROEventReceiver.IsEventHandlerRegistered(const aEventID: Ansistring; const aEventHandler: TObject): boolean;
+var
+  j : integer;
+begin
+  Result := False;
+  for j := 0 to fHandlers.Count - 1 do
+    if (fHandlers.Objects[j] = aEventHandler) and ({$IFDEF UNICODE}WideStringToAnsiString{$ENDIF}(fHandlers[j]) = aEventID) then begin
+      Result := True;
+      break;
+    end;
+end;
+
+procedure TROEventReceiver.UnregisterEventHandlers(const EventIDs: array of Ansistring);
+var {clientid,} eventID, eventtypes : Ansistring;
+    i, idx : integer;
+begin
+  // clientid := GUIDTOString(Self.ClientID);
+  eventtypes := '';
+
+  for i := 0 to Length(EventIDs)-1 do begin
+    eventID := EventIDs[i];
+
+    // Removes the reference to the local event handler object
+    idx := fHandlers.IndexOf({$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(eventID));
+    if (idx>=0)
+      then fHandlers.Delete(idx);
+
+    eventtypes := eventtypes+eventID+',';
+
+  end;
+
+  Delete(eventtypes, Length(eventtypes), 1);
+
+  // Sends the remote request
+  if fEventAwareChannel = nil then
+    Invoke_UnregisterEventClient(eventtypes);
+end;
+
+function TROEventReceiver.GetClientID: TGUID;
+begin
+  CheckProperties;
+  result := Message.ClientID;
+end;
+
+function TROEventReceiver.IsRetained(const anObject: TObject): boolean;
+begin
+  result := (fRetainedObjects<>NIL) and (fRetainedObjects.IndexOf(anObject)>=0)
+end;
+
+procedure TROEventReceiver.ReleaseObject(const anObject: TObject);
+var idx : integer;
+begin
+  // Only creates it if necessary
+  if (fRetainedObjects=NIL) then Exit;
+
+  idx := fRetainedObjects.IndexOf(anObject);
+  if (idx>=0) then fRetainedObjects.Delete(idx);
+end;
+
+procedure TROEventReceiver.RetainObject(const anObject: TObject);
+begin
+  // Only creates it if necessary
+  if (fRetainedObjects=NIL) then
+    fRetainedObjects := TList.Create;
+
+  fRetainedObjects.Add(anObject);
+end;
+
+
+type
+  TMyThread = class(TThread) end; // in d6 a thread is private
+  TSyncClass = class
+  private
+    fData: TStream;
+    fCaller: TROEventReceiver;
+  public
+    property Caller: TROEventReceiver read fCaller write fCaller;
+    property Data: TStream read fData write fData;
+    procedure DoDispatch;
+  end;
+
+
+procedure TSyncClass.DoDispatch;
+begin
+  fCaller.FireEvents(Data);
+end;
+
+
+procedure TROEventReceiver.Dispatch(aStream: TStream; aCaller: TThread);
+var
+  lSync: TSyncClass;
+begin
+  if fSynchronizeInvoke and Assigned(aCaller) then
+  begin
+    lSync := TSyncClass.Create;
+    try
+      lSync.Caller := Self;
+      lSync.Data := aStream;
+      TMyThread(aCaller).Synchronize(lSync.DoDispatch);
+    finally
+      lSync.Free;
+    end;
+  end else
+    FireEvents(aStream);
+end;
+
+function TROEventReceiver.GetSynchronizeInvoke: Boolean;
+begin
+  Result := fSynchronizeInvoke;
+end;
+
+procedure TROEventReceiver.RegisterEventHandler(const EventID: Ansistring;
+  const EventHandler: TObject);
+begin
+  RegisterEventHandlers([EventID], [EventHandler]);
+end;
+
+procedure TROEventReceiver.UnregisterEventHandlersByObject(
+  const EventHandler: array of TObject);
+var {clientid,} eventID, eventtypes : Ansistring;
+    i, idx : integer;
+begin
+//  clientid := GUIDTOString(Self.ClientID);
+  eventtypes := '';
+
+  for i := 0 to Length(EventHandler)-1 do begin
+
+    // Removes the reference to the local event handler object
+    idx := fHandlers.IndexOfObject(EventHandler[i]);
+    if (idx>=0)
+      then begin
+       eventID := {$IFDEF UNICODE}WideStringToAnsiString{$ENDIF}(fHandlers[i]);
+        fHandlers.Delete(idx)
+      end else continue;
+
+    eventtypes := eventtypes+eventID+',';
+
+  end;
+
+  Delete(eventtypes, Length(eventtypes), 1);
+
+  // Sends the remote request
+//  if fEventAwareChannel = nil then
+  Invoke_UnregisterEventClient(eventtypes);
+end;
+
+procedure TROEventReceiver.UnregisterEventHandler(
+  const EventHandler: TObject);
+begin
+  UnregisterEventHandlersByObject([EventHandler]);
+end;
+
+procedure TROEventReceiver.UnregisterEventHandler(const EventIDs: Ansistring);
+begin
+  UnregisterEventHandlers([EventIDs]);
+end;
+
+procedure TROEventReceiver.CheckProperties(CheckServiceName: boolean = true);
+begin
+  Check(Channel = nil, Name + '.Channel must be assigned.');
+  Channel.CheckProperties;
+  Check(Message = nil, Name + '.Message must be assigned.');
+  Message.CheckProperties;
+  if CheckServiceName then
+    Check(ServiceName = '', Name + '.ServiceName must be set.');
+end;
+
+function TROEventReceiver.GetObject: TObject;
+begin
+  result := Self;
+end;
+
+{ TROEventWriter }
+
+constructor TROEventWriter.Create(const aMessage : IROMessage;
+                       const aRepository : IROEventRepository);
+begin
+  inherited Create(aMessage, TRUE);
+
+  fSessionList := TStringList.Create;
+  fSessionList.Sorted := TRUE;
+  fSessionList.Duplicates := dupIgnore;
+
+  fExcludeSender := TRUE;
+  fExcludeSessionList := FALSE; // By default only includes those in the session list
+
+  fRepository := aRepository;
+end;
+
+destructor TROEventWriter.Destroy;
+begin
+  fRepository := NIL;
+  FreeAndNIL(fSessionList);
+  inherited;
+end;
+
+{function TROEventWriter.GetMessage: IROMessage;
+begin
+  result := fMessage;
+end;}
+
+function TROEventWriter.GetExcludeSender: boolean;
+begin
+  result := fExcludeSender
+end;
+
+function TROEventWriter.GetExcludeSessionList: boolean;
+begin
+  result := fExcludeSessionList;
+end;
+
+function TROEventWriter.GetRepository: IROEventRepository;
+begin
+  result := fRepository
+end;
+
+function TROEventWriter.GetSessionList: TStrings;
+begin
+  result := fSessionList;
+end;
+
+procedure TROEventWriter.SetExcludeSender(const Value: boolean);
+begin
+  fExcludeSender := Value
+end;
+
+procedure TROEventWriter.SetExcludeSessionList(const Value: boolean);
+begin
+  fExcludeSessionList := Value
+end;
+
+{ TROEventProxy }
+
+constructor TROEventProxy.Create(const aMessage: IROMessage; CloneMessage: boolean);
+begin
+  inherited Create;
+
+  if CloneMessage then begin
+    if (aMessage=NIL) then raise EROException.Create(err_MessageNotAssigned);
+    fMessage := (aMessage as IROMessageCloneable).Clone
+  end
+  else fMessage := aMessage;
+end;
+
+destructor TROEventProxy.Destroy;
+begin
+  fMessage := NIL;
+  inherited;
+end;
+
+function TROEventProxy._GetMessage: IROMessage;
+begin
+  result := fMessage
+end;
+
+{ TROEventInvoker }
+constructor TROEventInvoker.Create(anEventReceiver: TROEventReceiver;
+  const aMessage: IROMessage; CloneMessage: boolean);
+begin
+  inherited Create(aMessage, CloneMessage);
+
+  fEventReceiver := anEventReceiver;
+end;
+
+destructor TROEventInvoker.Destroy;
+begin
+  inherited;
+end;
+
+procedure TROEventInvoker.Execute(const aTarget : TObject; EventData: TStream);
+var mtd : TROInvokerInvokeMethod;
+    intf : IInterface;
+begin
+  __Message.ReadFromStream(EventData);
+
+  mtd := nil;
+  @mtd := MethodAddress('Invoke_'+__Message.MessageName);
+  if (@mtd <> nil) then begin
+    aTarget.GetInterface(IInterface, intf);
+    mtd(__EventReceiver, __Message, intf);
+  end;
+end;
+
+
+{ TSyncClass }
+
+{ TIROActiveEventServerList }
+
+class function TIROActiveEventServerList.AddListener(
+  aList: IROActiveEventServerList;
+  aItem: IROActiveEventServer): IROActiveEventServerList;
+begin
+  result := aList;
+  while aList <> nil do begin
+    if aList.Server = aItem then exit;
+    aList := aList.Next;
+  end;
+  Result := TIROActiveEventServerList.Create(Result, aItem);
+end;
+
+constructor TIROActiveEventServerList.Create(
+  aNext: IROActiveEventServerList; aItem: IROActiveEventServer);
+begin
+  inherited Create;
+  fNext := aNext;
+  fServer := aItem;
+end;
+
+procedure TIROActiveEventServerList.DispatchEvent(
+  anEventDataItem: TROEventData; aSessionReference: TGUID;
+  aSender: TObject);
+var
+  lItem: IROActiveEventServerList;
+begin
+  lItem := Self;
+  while lItem <> nil do begin
+    lItem.Server.DispatchEvent(anEventDataItem, aSessionReference, aSender);
+    lItem := lItem.Next;
+    if lItem <> nil then
+      anEventDataItem.AddRef;
+  end;
+end;
+
+function TIROActiveEventServerList.GetNext: IROActiveEventServerList;
+begin
+  result := fNext;
+end;
+
+function TIROActiveEventServerList.GetServer: IROActiveEventServer;
+begin
+  result := fServer;
+end;
+
+class function TIROActiveEventServerList.RemoveListener(
+  aList: IROActiveEventServerList; aItem: IROActiveEventServer): IROActiveEventServerList;
+var
+  lPrev: IROActiveEventServerList;
+begin
+  lPrev := nil;
+  result := aList;
+  while aList <> nil do begin
+    if aList.Server = aItem then begin
+      if lPrev = nil then begin
+        result := aList.Next;
+        exit;
+      end else begin
+        lPrev.Next := aList.Next;
+      end;
+    end;
+    aList := aList.Next;
+  end;
+end;
+
+procedure TIROActiveEventServerList.SetNext(
+  aData: IROActiveEventServerList);
+begin
+  fNext := aData;
+end;
+
+initialization
+  _EventInvokers := TStringList.Create;
+  _EventInvokers.Sorted := TRUE;
+  _EventInvokers.Duplicates := dupIgnore;
+
+  _EventWriters := TStringList.Create;
+  _EventWriters.Sorted := TRUE;
+  _EventWriters.Duplicates := dupIgnore;
+
+finalization
+  FreeAndNIL(_EventInvokers);
+  FreeAndNIL(_EventWriters);
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROHTTPDispatch.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROHTTPDispatch.pas
new file mode 100644
index 0000000..713d034
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROHTTPDispatch.pas	
@@ -0,0 +1,150 @@
+unit uROHTTPDispatch;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses Classes, uROServer, uROClient, uROClientIntf;
+
+type
+  { TROHTTPDispatcher }
+  TROHTTPDispatcher = class(TROMessageDispatcher)
+  private
+    fPathInfo: string;
+
+    procedure SetPathInfo(const Value: string);
+
+    function CleanPathInfo(const iPath:string):string;
+
+  protected
+    procedure SetMessage(const Value: TROMessage); override;
+
+  public
+    procedure Assign(Source: TPersistent); override;
+    function CanHandleMessage(const aTransport: IROTransport; aRequeststream : TStream): boolean; override;
+
+  published
+    property PathInfo : string read fPathInfo write SetPathInfo;
+  end;
+
+  { TROHTTPDispatchers }
+  TROHTTPMessageDispatchers = class(TROMessageDispatchers)
+  private
+  protected
+    function GetSupportsMultipleDispatchers: boolean; override;
+    function GetDispatcherClass : TROMessageDispatcherClass; override;
+
+  public
+    function GetDispatcherByPath(Path: string): TROHTTPDispatcher;
+  end;
+
+implementation
+
+uses SysUtils;
+
+{ TROHTTPMessageDispatchers }
+
+function TROHTTPMessageDispatchers.GetDispatcherByPath(
+  Path: string): TROHTTPDispatcher;
+var
+  i: Integer;
+begin
+  for i := Count -1 downto 0 do
+  begin
+    result := Items[i] as TROHTTPDispatcher;
+    if CompareText(result.PathInfo, Path) = 0 then
+      exit;
+    if (Result.PathInfo <> '') and (Result.PathInfo[1] <> '/') and (CompareText('/'+result.PathInfo, Path) = 0) then
+      exit;
+  end;
+  result := nil;
+end;
+
+function TROHTTPMessageDispatchers.GetDispatcherClass: TROMessageDispatcherClass;
+begin
+  result := TROHTTPDispatcher;
+end;
+
+function TROHTTPMessageDispatchers.GetSupportsMultipleDispatchers: boolean;
+begin
+  result := TRUE;
+end;
+
+{ TROHTTPDispatcher }
+
+procedure TROHTTPDispatcher.Assign(Source: TPersistent);
+begin
+  inherited Assign(Source);
+
+  if Source is TROHTTPDispatcher
+    then PathInfo := TROHTTPDispatcher(Source).PathInfo;
+end;
+
+function TROHTTPDispatcher.CanHandleMessage(const aTransport: IROTransport;
+  aRequeststream: TStream): boolean;
+var http : IROHTTPTransport;
+begin
+  if aRequeststream = nil then result := FALSE else // for preventing warning in FPC
+  result := FALSE;
+  if not Enabled or not Supports(aTransport, IROHTTPTransport, http)
+    then Exit;
+
+  //1.0.4: comparison made caseinsensitive; PreparedPathInfo will alraedy be lowercase. mh.
+  //if (CompareText(http.PathInfo, PathInfo)=0) then result := TRUE;
+  result := (CleanPathInfo(http.PathInfo) = CleanPathInfo(PathInfo));
+end;
+
+procedure TROHTTPDispatcher.SetMessage(const Value: TROMessage);
+var s : string;
+begin
+  inherited;
+
+  if (PathInfo='') and (Value<>NIL) then begin
+    s := StringReplace(Value.ClassName, 'Message', '', []);
+    s := StringReplace(s, 'TRO', '', []);
+
+    PathInfo := s;
+  end;
+end;
+
+function ExcludeTrailingForwardSlash(const S: string): string;
+var lLength: Integer;
+begin
+  result := S;
+  lLength := Length(result);
+  if (result <> '') and (result[lLength] = '/') then SetLength(result,lLength-1);
+end;
+
+procedure TROHTTPDispatcher.SetPathInfo(const Value: string);
+begin
+  if Value <> fPathInfo then 
+    fPathInfo := Value;
+end;
+
+function TROHTTPDispatcher.CleanPathInfo(const iPath:string):string;
+begin
+  result := iPath;
+
+  if (Length(result)>0) and (result[1]<>'/') then result :='/'+result;
+
+  // 1.0.4: make sure the path NEVER has a trailing slash
+  StringReplace(result,'\','/',[rfReplaceAll]);
+  result := ExcludeTrailingForwardSlash(result);
+
+  result := LowerCase(result)
+end;
+
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROHTTPTools.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROHTTPTools.pas
new file mode 100644
index 0000000..645f972
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROHTTPTools.pas	
@@ -0,0 +1,135 @@
+unit uROHTTPTools;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses 
+     {$IFDEF DOTNET}
+     Borland.Delphi.Classes,
+     {$ELSE}
+     Classes,
+     {$ENDIF}
+     uROClientIntf;
+
+const
+      id_ContentLength = 'Content-Length';
+      id_ContentType   = 'Content-Type';
+      id_Host          = 'Host';
+      id_UserAgent     = 'User-Agent';
+
+      HTTP_SESSION_ID_HEADER = 'RemObjects-SessionID';
+
+      HTTP_OK     = 200;
+      HTTP_FAILED = 500;
+
+function FindHeaderIndex(someHeaders : TStrings; const aName : string) : integer;
+function GetHeaderValue(someHeaders : TStrings; const aName : string) : string; overload;
+function GetHeaderValue(const iHeaders:string; const iName:string):string; overload;
+procedure SetHeaderValue(someHeaders : TStrings; const aName, aValue : string);
+
+function GetHTTPInfo(const aTransport : IROTransport): TDataFormat;
+procedure SetHTTPInfo(const aTransport : IROTransport; aDataFormat : TDataFormat);
+
+function GetClientAccessPolicy: AnsiString;
+
+type
+  TROCustomClientAccessPolicyMethod = procedure(aSender: TObject; var aPolicyContent: AnsiString) of object;
+  TROClientAccessPolicyType = (captAllowNone, captAllowAll, captCustom);
+
+
+implementation
+
+uses {$IFDEF DOTNET}
+     Borland.Delphi.SysUtils,
+     {$ELSE}
+     SysUtils,
+     {$ENDIF}
+     uRORes;
+
+function FindHeaderIndex(someHeaders : TStrings; const aName : string) : integer;
+var i : integer;
+begin
+  result := -1;
+  with someHeaders do
+    for i := 0 to (Count-1) do
+      if (Pos(aName+': ', Strings[i])=1) then begin
+        result := i;
+        Exit;
+      end;
+end;
+
+function GetHeaderValue(const iHeaders:string; const iName:string):string;
+var p:integer;
+begin
+  result := '';
+  p := Pos(UpperCase(iName)+':',UpperCase(iHeaders));
+  if p > 0 then Begin
+    result := iHeaders;
+    Delete(result,1,p+Length(iName)+1);
+    result := Copy(result,1,Pos(#13,result)-1);
+  end
+end;
+
+function GetHeaderValue(someHeaders : TStrings; const aName : string) : string;
+var idx : integer;
+begin
+  idx := FindHeaderIndex(someHeaders, aName);
+  with someHeaders do
+    if (idx>=0) then result := Trim(Copy(Strings[idx], Pos(':', Strings[idx])+1, Length(Strings[idx])))
+                else result := '';
+end;
+
+procedure SetHeaderValue(someHeaders : TStrings; const aName, aValue : string);
+var idx : integer;
+begin
+  idx := FindHeaderIndex(someHeaders, aName);
+  with someHeaders do
+    if (idx>=0) then someHeaders[idx] := aName+': '+aValue
+                else someHeaders.Add(aName+': '+aValue);
+end;
+
+procedure SetHTTPInfo(const aTransport : IROTransport; aDataFormat : TDataFormat);
+var http : IROHTTPTransport;
+begin
+  {$IFDEF DOTNET}
+  {$ELSE}
+  if Supports(aTransport, IROHTTPTransport, http) then begin
+    http.ContentType := aDataFormat;
+    http.UserAgent := str_ProductName;
+  end;
+  {$ENDIF DOTNET}
+end;
+
+function GetHTTPInfo(const aTransport : IROTransport): TDataFormat;
+var http : IROHTTPTransport;
+begin
+  if Supports(aTransport, IROHTTPTransport, http) then begin
+    result := http.ContentType;
+  end else
+    result := '';
+end;
+
+
+function GetClientAccessPolicy: AnsiString;
+begin
+	result := '<?xml version="1.0" encoding="utf-8"?>'+
+  '<access-policy><cross-domain-access><policy>'+
+  '<allow-from http-request-headers="*"><domain uri="*"/></allow-from>'+
+  '<grant-to><resource path="/" include-subpaths="true"/></grant-to>'+
+  '</policy></cross-domain-access></access-policy>';
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROHtmlServerInfo.lrs b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROHtmlServerInfo.lrs
new file mode 100644
index 0000000..fd78e63
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROHtmlServerInfo.lrs	
@@ -0,0 +1,1221 @@
+LazarusResources.Add('RemObjectsHtmlServerDocumentation','XSL',[
+  '<?xml version="1.0"?>'#13#10'<xsl:stylesheet xmlns:xsl="http://www.w3.org/19'
+  +'99/XSL/Transform" version="1.0">'#13#10#9'<xsl:output method="html"/>'#13#10
+  +#9'<xsl:template match="/Library">'#13#10#9#9'<html xmlns="http://www.w3.org'
+  +'/1999/xhtml">'#13#10#9#9#9'<head>'#13#10#9#9#9#9'<meta name="GENERATOR" con'
+  +'tent="XSL Rodl2Html.xsl"/>'#13#10#9#9#9#9'<meta http-equiv="Content-Type" c'
+  +'ontent="text/html"/>'#13#10#9#9#9#9'<title>'#13#10#9#9#9#9#9'<xsl:value-of '
+  +'select="@Name"/> documentation</title>'#13#10#9#9#9#9'<style>'#13#10#9#9#9#9
+  +#9'<xsl:comment>'#13#10'                        body, table, tr, td'#13#10' '
+  +'                       {'#13#10#9#9#9#9#9#9#9'background-color: #f7f7f7;'#13
+  +#10#9#9#9#9#9#9#9'margin: 0;'#13#10#9#9#9#9#9#9#9'padding: 0;'#13#10#9#9#9#9
+  +#9#9#9'font-family: Verdana, Tahoma, Arial, Helvetica, sans serif;'#13#10#9#9
+  +#9#9#9#9#9'font-size: 10pt;'#13#10'                        }'#13#10#9#9#9#9#9
+  +#9'.header'#13#10#9#9#9#9#9#9'{'#13#10#9#9#9#9#9#9#9'padding: 5px;'#13#10#9#9
+  +#9#9#9#9#9'background-color: #c0c0c0;'#13#10#9#9#9#9#9#9#9'border-bottom: 5p'
+  +'x solid #808080;'#13#10#9#9#9#9#9#9#9'font-size: 1.5em;'#13#10#9#9#9#9#9#9
+  +'}'#13#10#9#9#9#9#9#9'.body'#13#10#9#9#9#9#9#9'{'#13#10#9#9#9#9#9#9#9'paddin'
+  +'g: 5px;'#13#10#9#9#9#9#9#9'}'#13#10#9#9#9#9#9#9'.footer'#13#10#9#9#9#9#9#9
+  +'{'#13#10#9#9#9#9#9#9#9'padding: 5px;'#13#10#9#9#9#9#9#9#9'border-top: 1px s'
+  +'olid #808080;'#13#10#9#9#9#9#9#9#9'font-size: 0.8em;'#13#10#9#9#9#9#9#9'}'
+  +#13#10#9#9#9#9#9#9'.section'#13#10#9#9#9#9#9#9'{'#13#10#9#9#9#9#9#9'    marg'
+  +'in-left: 25px;'#13#10#9#9#9#9#9#9'    padding-left: 3px;'#13#10#9#9#9#9#9#9
+  +'    padding-top: 3px;'#13#10#9#9#9#9#9#9'    padding-bottom: 3px;'#13#10#9#9
+  +#9#9#9#9'    border-left: 1px solid #b0b0b0;'#13#10#9#9#9#9#9#9'    border-b'
+  +'ottom: 1px solid #b0b0b0;'#13#10#9#9#9#9#9#9'}'#13#10#9#9#9#9#9#9'.h1'#13#10
+  +#9#9#9#9#9#9'{'#13#10#9#9#9#9#9#9#9'font-size: 13pt;'#13#10#9#9#9#9#9#9'    '
+  +'border-left: 1px solid #b0b0b0;'#13#10#9#9#9#9#9#9'    border-bottom: 1px s'
+  +'olid #b0b0b0;'#13#10#9#9#9#9#9#9'}'#13#10#9#9#9#9#9#9'.h2'#13#10#9#9#9#9#9#9
+  +'{'#13#10#9#9#9#9#9#9#9'font-size: 13pt;'#13#10#9#9#9#9#9#9'    border-left:'
+  +' 1px solid #b0b0b0;'#13#10#9#9#9#9#9#9'    border-bottom: 1px solid #b0b0b0'
+  +';'#13#10#9#9#9#9#9#9'}'#13#10'                        p { margin-bottom: 0.'
+  +'75em; margin-top: 0; }'#13#10'                        .h1, .h2, .h3, .h4, h'
+  +'4'#13#10'                        {'#13#10'                          margin-'
+  +'top: 1em;'#13#10'                          margin-bottom: 0;'#13#10'       '
+  +'                   padding-bottom: 0;'#13#10'                          padd'
+  +'ing-left: 3px;'#13#10'                          font-weight: bold;'#13#10' '
+  +'                       }'#13#10'                        a { text-decoration'
+  +': none }'#13#10'                        h2 { font-size: 12pt; }'#13#10'    '
+  +'                    h3 { font-size: 11pt; }'#13#10'                        '
+  +'h4 { font-size: 10pt; font-weight: normal; text-decoration: underline;}'#13
+  +#10'                        ul, ol { margin-top: 0; margin-bottom: 0.75em; }'
+  +#13#10'                        pre { margin: 0 }'#13#10'                    '
+  +'    pre, code'#13#10'                        {'#13#10#9'                   '
+  +'   font: 100% Monospace, Courier New, Courier;'#13#10'        '#9'         '
+  +'     color: #000066;'#13#10'                        }'#13#10'              '
+  +'          .spaced'#13#10'                        {'#13#10'                 '
+  +'         letter-spacing: 1px;'#13#10'                          color: #0000'
+  +'60;'#13#10'                        }'#13#10'                        table {'
+  +' padding: 0; }'#13#10'                        tr { margin: 0; padding: 0; }'
+  +#13#10'                        td { margin: 0; }'#13#10'                    '
+  +'    table, td { border: 1px dashed #c0c0c0; }'#13#10#9#9#9#9'</xsl:comment>'
+  +#13#10#9#9#9#9'</style>'#13#10#9#9#9'</head>'#13#10#9#9#9'<body>'#13#10#9#9#9
+  +#9'<div class="header">'#13#10#9#9#9#9#9'<img src="favicon.ico" style="paddi'
+  +'ng-right: 5px;"/>'#13#10#9#9#9#9#9'<xsl:value-of select="/Library/@Name"/>'
+  +#13#10#9#9#9#9'</div>'#13#10#9#9#9#9'<div class="body">'#13#10#9#9#9#9#9'<a>'
+  +#13#10#9#9#9#9#9#9'<xsl:attribute name="name"><xsl:value-of select="/Library'
+  +'/@Name"/></xsl:attribute>'#13#10#9#9#9#9#9'</a>'#13#10#9#9#9#9#9'<div class'
+  +'="h1">Table Of Contents</div>'#13#10#9#9#9#9#9'<p>This document is split in'
+  +'to the following sections:</p>'#13#10#9#9#9#9#9'<ul>'#13#10#9#9#9#9#9#9'<li'
+  +'>'#13#10#9#9#9#9#9#9#9'<a>'#13#10#9#9#9#9#9#9#9#9'<xsl:attribute name="href'
+  +'">#<xsl:value-of select="/Library/@Name"/>.Services</xsl:attribute>'#13#10#9
+  +#9#9#9#9#9#9#9'Services</a>'#13#10#9#9#9#9#9#9'</li>'#13#10#9#9#9#9#9#9'<li>'
+  +#13#10#9#9#9#9#9#9#9'<a>'#13#10#9#9#9#9#9#9#9#9'<xsl:attribute name="href">#'
+  +'<xsl:value-of select="/Library/@Name"/>.EventSinks</xsl:attribute>'#13#10#9
+  +#9#9#9#9#9#9#9'Event sinks</a>'#13#10#9#9#9#9#9#9'</li>'#13#10#9#9#9#9#9#9'<'
+  ,'li>'#13#10#9#9#9#9#9#9#9'<a>'#13#10#9#9#9#9#9#9#9#9'<xsl:attribute name="hr'
+  +'ef">#<xsl:value-of select="/Library/@Name"/>.Structs</xsl:attribute>'#13#10
+  +#9#9#9#9#9#9#9#9'Structs</a>'#13#10#9#9#9#9#9#9'</li>'#13#10#9#9#9#9#9#9'<li'
+  +'>'#13#10#9#9#9#9#9#9#9'<a>'#13#10#9#9#9#9#9#9#9#9'<xsl:attribute name="href'
+  +'">#<xsl:value-of select="/Library/@Name"/>.Enums</xsl:attribute>'#13#10#9#9
+  +#9#9#9#9#9#9'Enums</a>'#13#10#9#9#9#9#9#9'</li>'#13#10#9#9#9#9#9#9'<li>'#13
+  +#10#9#9#9#9#9#9#9'<a>'#13#10#9#9#9#9#9#9#9#9'<xsl:attribute name="href">#<xs'
+  +'l:value-of select="/Library/@Name"/>.Arrays</xsl:attribute>'#13#10#9#9#9#9#9
+  +#9#9#9'Arrays</a>'#13#10#9#9#9#9#9#9'</li>'#13#10#9#9#9#9#9#9'<li>'#13#10#9#9
+  +#9#9#9#9#9'<a>'#13#10#9#9#9#9#9#9#9#9'<xsl:attribute name="href">#<xsl:value'
+  +'-of select="/Library/@Name"/>.Exceptions</xsl:attribute>'#13#10#9#9#9#9#9#9
+  +#9#9'Exceptions</a>'#13#10#9#9#9#9#9#9'</li>'#13#10#9#9#9#9#9#9'<li>'#13#10#9
+  +#9#9#9#9#9#9'<a>'#13#10#9#9#9#9#9#9#9#9'<xsl:attribute name="href">#<xsl:val'
+  +'ue-of select="/Library/@Name"/>.Uses</xsl:attribute>'#13#10#9#9#9#9#9#9#9#9
+  +'Used RODLs</a>'#13#10#9#9#9#9#9#9'</li>'#13#10#9#9#9#9#9'</ul>'#13#10#13#10
+  +#9#9#9#9'<p>'#13#10#9#9#9#9'<b>Library Description:</b> <xsl:value-of select'
+  +'="/Library/Documentation"/>'#13#10#9#9#9#9'</p>'#13#10#13#10#9#9#9#9#9'<xsl'
+  +':call-template name="ServicesOverview"/>'#13#10#9#9#9#9#9#13#10#9#9#9#9#9'<'
+  +'a>'#13#10#9#9#9#9#9#9'<xsl:attribute name="name"><xsl:value-of select="/Lib'
+  +'rary/@Name"/>.EventSinks</xsl:attribute>'#13#10#9#9#9#9#9'</a>'#13#10#9#9#9
+  +#9#9'<xsl:call-template name="EventSinksOverview"/>'#13#10#13#10#9#9#9#9#9'<'
+  +'a>'#13#10#9#9#9#9#9#9'<xsl:attribute name="name"><xsl:value-of select="/Lib'
+  +'rary/@Name"/>.Structs</xsl:attribute>'#13#10#9#9#9#9#9'</a>'#13#10#9#9#9#9#9
+  +'<xsl:call-template name="StructsOverview"/>'#13#10#9#9#9#9#9'<!--<xsl:call-'
+  +'template name="StructsMembers"/>-->'#13#10#9#9#9#9#9'<a>'#13#10#9#9#9#9#9#9
+  +'<xsl:attribute name="name"><xsl:value-of select="/Library/@Name"/>.Enums</x'
+  +'sl:attribute>'#13#10#9#9#9#9#9'</a>'#13#10#9#9#9#9#9'<xsl:call-template nam'
+  +'e="EnumsOverview"/>'#13#10#9#9#9#9#9'<!--<xsl:call-template name="EnumsMemb'
+  +'ers"/>-->'#13#10#9#9#9#9#9'<a>'#13#10#9#9#9#9#9#9'<xsl:attribute name="name'
+  +'"><xsl:value-of select="/Library/@Name"/>.Arrays</xsl:attribute>'#13#10#9#9
+  +#9#9#9'</a>'#13#10#9#9#9#9#9'<xsl:call-template name="ArraysOverview"/>'#13
+  +#10#9#9#9#9#9'<!--<xsl:call-template name="ArraysMembers"/>-->'#13#10#9#9#9#9
+  +#9'<a>'#13#10#9#9#9#9#9#9'<xsl:attribute name="name"><xsl:value-of select="/'
+  +'Library/@Name"/>.Exceptions</xsl:attribute>'#13#10#9#9#9#9#9'</a>'#13#10#9#9
+  +#9#9#9'<xsl:call-template name="ExceptionsOverview"/>'#13#10#9#9#9#9#9'<!--<'
+  +'xsl:call-template name="ExceptionsMembers"/>-->'#13#10#9#9#9#9#9'<a>'#13#10
+  +#9#9#9#9#9#9'<xsl:attribute name="name"><xsl:value-of select="/Library/@Name'
+  +'"/>.Uses</xsl:attribute>'#13#10#9#9#9#9#9'</a>'#13#10#9#9#9#9#9'<xsl:call-t'
+  +'emplate name="UsesOverview"/>'#13#10#9#9#9#9'</div>'#13#10#9#9#9#9'<div cla'
+  +'ss="footer">'#13#10#9#9#9#9#9'RemObjects Software, LLC. <a href="http://www'
+  +'.remobjects.com">remobjects.com</a>.'#13#10#9#9#9#9'</div>'#13#10#9#9#9'</b'
+  +'ody>'#13#10#9#9'</html>'#13#10#9'</xsl:template>'#13#10#13#10#9'<xsl:templa'
+  +'te name="ServicesOverview" match="/Services">'#13#10#9#9'<a>'#13#10#9#9#9'<'
+  +'xsl:attribute name="name"><xsl:value-of select="/Library/@Name"/>.Services<'
+  +'/xsl:attribute>'#13#10#9#9'</a>'#13#10#9#9'<div class="h1">Services</div>'
+  +#13#10#9#9'<div class="section">'#13#10#9#9#9'<p>The following table lists t'
+  +'he Services defined in "<xsl:value-of select="/Library/@Name"/>":</p>'#13#10
+  +#9#9#9'<table width="80%">'#13#10#9#9#9#9'<xsl:for-each select="./Services/S'
+  +'ervice/Interfaces/Interface">'#13#10#9#9#9#9#9'<tr>'#13#10#9#9#9#9#9#9'<td '
+  +'valign="top" width="250">'#13#10#9#9#9#9#9#9#9'<a>'#13#10#9#9#9#9#9#9#9#9'<'
+  +'xsl:attribute name="href">#<xsl:value-of select="../../@Name"/></xsl:attrib'
+  +'ute>'#13#10#9#9#9#9#9#9#9#9'<xsl:value-of select="../../@Name"/>'#13#10#9#9
+  +#9#9#9#9#9'</a>'#13#10#9#9#9#9#9#9'</td>'#13#10#9#9#9#9#9#9'<td>'#13#10#9#9#9
+  +#9#9#9#9'<xsl:value-of select="../../Documentation"/>'#13#10#9#9#9#9#9#9'</t'
+  +'d>'#13#10#9#9#9#9#9'</tr>'#13#10#9#9#9#9'</xsl:for-each>'#13#10#9#9#9'</tab'
+  +'le>'#13#10#9#9#9'<xsl:call-template name="ServicesMembers"/>'#13#10#9#9'</d'
+  +'iv>'#13#10#9'</xsl:template>'#13#10#9'<xsl:template name="ServicesMembers" '
+  +'match="/Services">'#13#10#9#9'<xsl:for-each select="./Services/Service/Inte'
+  +'rfaces/Interface">'#13#10#9#9#9'<a>'#13#10#9#9#9#9'<xsl:attribute name="nam'
+  +'e"><xsl:value-of select="../../@Name"/></xsl:attribute>'#13#10#9#9#9'</a>'
+  +#13#10#9#9#9'<div class="h2">'#13#10#9#9#9#9'Service <i><xsl:value-of select'
+  +'="../../@Name"/></i>'#13#10#9#9#9'</div>'#13#10#9#9#9'<div class="section">'
+  +#13#10#9#9#9#9'<p>The following table lists the Operations defined in "<xsl:'
+  +'value-of select="../../@Name"/>":</p>'#13#10#9#9#9#9'<table width="80%">'#13
+  ,#10#9#9#9#9#9'<xsl:for-each select="./Operations/Operation">'#13#10#9#9#9#9#9
+  +#9'<tr>'#13#10#9#9#9#9#9#9#9'<td valign="top" width="250">'#13#10#9#9#9#9#9#9
+  +#9#9'<a>'#13#10#9#9#9#9#9#9#9#9#9'<xsl:attribute name="href">#<xsl:value-of '
+  +'select="../../../../@Name"/>.<xsl:value-of select="@Name"/></xsl:attribute>'
+  +#13#10#9#9#9#9#9#9#9#9#9'<xsl:value-of select="@Name"/>'#13#10#9#9#9#9#9#9#9
+  +#9'</a>'#13#10#9#9#9#9#9#9#9'</td>'#13#10#9#9#9#9#9#9#9'<td>'#13#10#9#9#9#9#9
+  +#9#9#9'<xsl:value-of select="Documentation"/>'#13#10#9#9#9#9#9#9#9'</td>'#13
+  +#10#9#9#9#9#9#9'</tr>'#13#10#9#9#9#9#9'</xsl:for-each>'#13#10#9#9#9#9'</tabl'
+  +'e>'#13#10#9#9#9#9'<xsl:call-template name="MemberDeclarations"/>'#13#10#9#9
+  +#9'</div>'#13#10#9#9'</xsl:for-each>'#13#10#9'</xsl:template>'#13#10#13#10#9
+  +'<xsl:template name="EventSinksOverview" match="/EventSinks">'#13#10#9#9'<a>'
+  +#13#10#9#9#9'<xsl:attribute name="name"><xsl:value-of select="/Library/@Name'
+  +'"/>.Services</xsl:attribute>'#13#10#9#9'</a>'#13#10#9#9'<div class="h1">Eve'
+  +'nt Sinks</div>'#13#10#9#9'<div class="section">'#13#10#9#9#9'<p>The followi'
+  +'ng table lists the Event Sinks defined in "<xsl:value-of select="/Library/@'
+  +'Name"/>":</p>'#13#10#9#9#9'<table width="80%">'#13#10#9#9#9#9'<xsl:for-each'
+  +' select="./EventSinks/EventSink/Interfaces/Interface">'#13#10#9#9#9#9#9'<tr'
+  +'>'#13#10#9#9#9#9#9#9'<td valign="top" width="250">'#13#10#9#9#9#9#9#9#9'<a>'
+  +#13#10#9#9#9#9#9#9#9#9'<xsl:attribute name="href">#<xsl:value-of select="../'
+  +'../@Name"/></xsl:attribute>'#13#10#9#9#9#9#9#9#9#9'<xsl:value-of select="..'
+  +'/../@Name"/>'#13#10#9#9#9#9#9#9#9'</a>'#13#10#9#9#9#9#9#9'</td>'#13#10#9#9#9
+  +#9#9#9'<td>'#13#10#9#9#9#9#9#9#9'<xsl:value-of select="../../Documentation"/'
+  +'>'#13#10#9#9#9#9#9#9'</td>'#13#10#9#9#9#9#9'</tr>'#13#10#9#9#9#9'</xsl:for-'
+  +'each>'#13#10#9#9#9'</table>'#13#10#9#9#9'<xsl:call-template name="EventSink'
+  +'sMembers"/>'#13#10#9#9'</div>'#13#10#9'</xsl:template>'#13#10#9'<xsl:templa'
+  +'te name="EventSinksMembers" match="/EventSinks">'#13#10#9#9'<xsl:for-each s'
+  +'elect="./EventSinks/EventSink/Interfaces/Interface">'#13#10#9#9#9'<a>'#13#10
+  +#9#9#9#9'<xsl:attribute name="name"><xsl:value-of select="../../@Name"/></xs'
+  +'l:attribute>'#13#10#9#9#9'</a>'#13#10#9#9#9'<div class="h2">Event Sink <i><'
+  +'xsl:value-of select="../../@Name"/></i></div>'#13#10#9#9#9'<div class="sect'
+  +'ion">'#13#10#9#9#9#9'<p>The following table lists the Events defined in "<x'
+  +'sl:value-of select="../../@Name"/>":</p>'#13#10#9#9#9#9'<table width="80%">'
+  +#13#10#9#9#9#9#9'<xsl:for-each select="./Operations/Operation">'#13#10#9#9#9
+  +#9#9#9'<tr>'#13#10#9#9#9#9#9#9#9'<td valign="top" width="250">'#13#10#9#9#9#9
+  +#9#9#9#9'<a>'#13#10#9#9#9#9#9#9#9#9#9'<xsl:attribute name="href">#<xsl:value'
+  +'-of select="../../../../@Name"/>.<xsl:value-of select="@Name"/></xsl:attrib'
+  +'ute>'#13#10#9#9#9#9#9#9#9#9#9'<xsl:value-of select="@Name"/>'#13#10#9#9#9#9
+  +#9#9#9#9'</a>'#13#10#9#9#9#9#9#9#9'</td>'#13#10#9#9#9#9#9#9#9'<td>'#13#10#9#9
+  +#9#9#9#9#9#9'<xsl:value-of select="Documentation"/>'#13#10#9#9#9#9#9#9#9'</t'
+  +'d>'#13#10#9#9#9#9#9#9'</tr>'#13#10#9#9#9#9#9'</xsl:for-each>'#13#10#9#9#9#9
+  +'</table>'#13#10#9#9#9#9'<xsl:call-template name="EventMemberDeclarations"/>'
+  +#13#10#9#9#9'</div>'#13#10#9#9'</xsl:for-each>'#13#10#9'</xsl:template>'#13
+  +#10#13#10#13#10#9'<xsl:template name="MemberDeclarations">'#13#10#9#9'<xsl:f'
+  +'or-each select="./Operations/Operation">'#13#10#9#9#9'<a>'#13#10#9#9#9#9'<x'
+  +'sl:attribute name="name"><xsl:value-of select="../../../../@Name"/>.<xsl:va'
+  +'lue-of select="@Name"/></xsl:attribute>'#13#10#9#9#9'</a>'#13#10#9#9#9'<h3>'
+  +#13#10#9#9#9#9'Method <i><!--<xsl:value-of select="../../../../@Name"/>.--><'
+  +'xsl:value-of select="@Name"/></i>'#13#10#9#9#9'</h3>'#13#10#9#9#9'<p>'#13#10
+  +#9#9#9#9'<xsl:value-of select="@Documentation"/>'#13#10#9#9#9'</p>'#13#10#9#9
+  +#9'<xsl:apply-templates select="Parameters"/>'#13#10#9#9'</xsl:for-each>'#13
+  +#10#9'</xsl:template>'#13#10#9'<xsl:template name="EventMemberDeclarations">'
+  +#13#10#9#9'<xsl:for-each select="./Operations/Operation">'#13#10#9#9#9'<a>'
+  +#13#10#9#9#9#9'<xsl:attribute name="name"><xsl:value-of select="../../../../'
+  +'@Name"/>.<xsl:value-of select="@Name"/></xsl:attribute>'#13#10#9#9#9'</a>'
+  +#13#10#9#9#9'<h3>'#13#10#9#9#9#9'Event <i><!--<xsl:value-of select="../../..'
+  +'/../@Name"/>.--><xsl:value-of select="@Name"/></i>'#13#10#9#9#9'</h3>'#13#10
+  +#9#9#9'<p>'#13#10#9#9#9#9'<xsl:value-of select="@Documentation"/>'#13#10#9#9
+  +#9'</p>'#13#10#9#9#9'<xsl:apply-templates select="Parameters"/>'#13#10#9#9'<'
+  +'/xsl:for-each>'#13#10#9'</xsl:template>'#13#10#9#13#10#9'<xsl:template matc'
+  +'h="Parameters">'#13#10#9#9'<h4>Chrome Syntax:</h4>'#13#10#9#9'<code>'#13#10
+  +#9#9#9'<!--<xsl:choose>'#13#10#9#9#9#9'<xsl:when test="count(./Parameter[@Na'
+  +'me=''Result'']) = 1">'#13#10#9#9#9#9#9'<b>function </b>'#13#10#9#9#9#9'</xs'
+  +'l:when>'#13#10#9#9#9#9'<xsl:otherwise>'#13#10#9#9#9#9#9'<b>procedure </b>'
+  +#13#10#9#9#9#9'</xsl:otherwise>'#13#10#9#9#9'</xsl:choose>-->'#13#10#9#9#9'<'
+  ,'b>method </b>'#13#10#9#9#9'<xsl:value-of select="../../../../../@Name"/>.<x'
+  +'sl:value-of select="../@Name"/>(<xsl:for-each select="Parameter[@Flag!=''Re'
+  +'sult'']">'#13#10#9#9#9#9'<xsl:call-template name="Declaration">'#13#10#9#9#9
+  +#9#9'<xsl:with-param name="Language" select="''Pascal''"/>'#13#10#9#9#9#9'</'
+  +'xsl:call-template>'#13#10#9#9#9'</xsl:for-each>)<xsl:for-each select="Param'
+  +'eter[@Flag=''Result'']">'#13#10#9#9#9#9'<xsl:call-template name="Declaratio'
+  +'n">'#13#10#9#9#9#9#9'<xsl:with-param name="Language" select="''Pascal''"/>'
+  +#13#10#9#9#9#9'</xsl:call-template>'#13#10#9#9#9'</xsl:for-each>;'#13#10'   '
+  +'     </code>'#13#10#9#9'<h4>C# Syntax:</h4>'#13#10#9#9'<code>'#13#10#9#9#9
+  +'<xsl:choose>'#13#10'                <xsl:when test="count(./Parameter[@Name'
+  +'=''Result'']) = 1">'#13#10'  '#9'   '#9#9#9'    public <xsl:value-of select'
+  +'="./Parameter[@Flag=''Result'']/@DataType"/><xsl:text> </xsl:text>'#13#10' '
+  +'               </xsl:when>'#13#10'                <xsl:otherwise>'#13#10'  '
+  +'                  public void'#13#10'                </xsl:otherwise>'#13#10
+  +'            </xsl:choose>'#13#10#9#9#9'<xsl:value-of select="../../../../..'
+  +'/@Name"/>.<xsl:value-of select="../@Name"/>(<xsl:for-each select="Parameter'
+  +'[@Flag!=''Result'']">'#13#10#9#9#9#9'<xsl:call-template name="Declaration">'
+  +#13#10#9#9#9#9#9'<xsl:with-param name="Language" select="''CSharp''"/>'#13#10
+  +#9#9#9#9'</xsl:call-template>'#13#10#9#9#9'</xsl:for-each>);'#13#10#9#9'</co'
+  +'de>'#13#10#9#9#13#10#9#9'<!--<h3>Parameters</h3>'#13#10#9#9'<xsl:call-templ'
+  +'ate name="Parameters"/>'#13#10#9#9'<h3>Return Value</h3>'#13#10#9#9'<xsl:ca'
+  +'ll-template name="ReturnValue"/>'#13#10#9#9'<p>'#13#10#9#9#9'<a>'#13#10#9#9
+  +#9#9'<xsl:attribute name="href">#<xsl:value-of select="/Library/@Name"/></xs'
+  +'l:attribute>'#13#10#9#9#9#9'<xsl:value-of select="/Library/@Name"/>'#13#10#9
+  +#9#9'</a>'#13#10#9#9#9'<xsl:text>'#13#10#9#9#9#9'</xsl:text>'#13#10#9#9#9'<a'
+  +'>'#13#10#9#9#9#9'<xsl:attribute name="href">#<xsl:value-of select="../../..'
+  +'/../../@Name"/></xsl:attribute>'#13#10#9#9#9#9'<xsl:value-of select="../../'
+  +'../../../@Name"/>'#13#10#9#9#9'</a>'#13#10#9#9'</p>-->'#13#10#9'</xsl:templ'
+  +'ate>'#13#10#9'<xsl:template name="Parameters">'#13#10#9#9'<xsl:choose>'#13
+  +#10#9#9#9'<xsl:when test="count(Parameter[@Name!=''Result'']) = 0">None.</xs'
+  +'l:when>'#13#10#9#9#9'<xsl:otherwise>'#13#10#9#9#9#9'<xsl:for-each select="P'
+  +'arameter[@Name!=''Result'']">'#13#10#9#9#9#9#9'<h4>'#13#10#9#9#9#9#9#9'<xsl'
+  +':value-of select="@Name"/>'#13#10#9#9#9#9#9'</h4>'#13#10'           Dear Re'
+  +'mObjects Team: Please add a Parameter documentation to your rodl-file!'#13
+  +#10'         </xsl:for-each>'#13#10#9#9#9'</xsl:otherwise>'#13#10#9#9'</xsl:'
+  +'choose>'#13#10#9'</xsl:template>'#13#10#9'<xsl:template name="ReturnValue">'
+  +#13#10#9#9'<xsl:choose>'#13#10#9#9#9'<xsl:when test="count(Parameter[@Flag='
+  +'''Result'']) = 0">None.</xsl:when>'#13#10#9#9#9'<xsl:otherwise>'#13#10#9#9#9
+  +#9'<xsl:for-each select="Parameter[@Flag=''Result'']">'#13#10#9#9#9#9#9'<!--'
+  +' the Result-comment -->'#13#10'           Dear RemObjects Team: Please add '
+  +'a Parameter documentation to your rodl-file!'#13#10'         </xsl:for-each'
+  +'>'#13#10#9#9#9'</xsl:otherwise>'#13#10#9#9'</xsl:choose>'#13#10#9'</xsl:tem'
+  +'plate>'#13#10#9'<xsl:template name="Declaration">'#13#10#9#9'<xsl:param nam'
+  +'e="Language"/>'#13#10#9#9'<xsl:choose>'#13#10#9#9#9'<xsl:when test="$Langua'
+  +'ge=''Pascal''">'#13#10#9#9#9#9'<xsl:call-template name="GeneratePascalParam'
+  +'eter"/>'#13#10#9#9#9'</xsl:when>'#13#10#9#9#9'<xsl:when test="$Language=''C'
+  +'Sharp''">'#13#10#9#9#9#9'<xsl:call-template name="GenerateCSharpParameter"/'
+  +'>'#13#10#9#9#9'</xsl:when>'#13#10#9#9'</xsl:choose>'#13#10#9'</xsl:template'
+  +'>'#13#10#9'<xsl:template name="GeneratePascalParameter">'#13#10#9#9'<xsl:ch'
+  +'oose>'#13#10#9#9#9'<xsl:when test="position()=1 and @Flag != ''Result''">'
+  +#13#10#9#9#9#9'<xsl:call-template name="FlagToSpec">'#13#10#9#9#9#9#9'<xsl:w'
+  +'ith-param name="Flag" select="@Flag"/>'#13#10#9#9#9#9'</xsl:call-template>'
+  +#13#10#9#9#9#9'<xsl:value-of select="@Name"/>: <xsl:value-of select="@DataTy'
+  +'pe"/>'#13#10#9#9#9'</xsl:when>'#13#10#9#9#9'<xsl:when test="@Flag = ''Resul'
+  +'t''">: <xsl:value-of select="@DataType"/>'#13#10#9#9#9'</xsl:when>'#13#10#9
+  +#9#9'<xsl:when test="position()=last()">; <xsl:call-template name="FlagToSpe'
+  +'c">'#13#10#9#9#9#9#9'<xsl:with-param name="Flag" select="@Flag"/>'#13#10#9#9
+  +#9#9'</xsl:call-template>'#13#10#9#9#9#9'<xsl:value-of select="@Name"/>: <xs'
+  +'l:value-of select="@DataType"/></xsl:when>'#13#10#9#9#9'<xsl:when test="pos'
+  +'ition()>1">; <xsl:call-template name="FlagToSpec">'#13#10#9#9#9#9#9'<xsl:wi'
+  +'th-param name="Flag" select="@Flag"/>'#13#10#9#9#9#9'</xsl:call-template>'
+  +#13#10#9#9#9#9'<xsl:value-of select="@Name"/>: <xsl:value-of select="@DataTy'
+  +'pe"/>'#13#10#9#9#9'</xsl:when>'#13#10#9#9'</xsl:choose>'#13#10#9'</xsl:temp'
+  +'late>'#13#10#9'<xsl:template name="GenerateCSharpParameter">'#13#10#9#9'<xs'
+  ,'l:choose>'#13#10#9#9#9'<xsl:when test="position()=1 and @Flag != ''Result'''
+  +'">'#13#10#9#9#9#9'<xsl:call-template name="FlagToSpecCSharp">'#13#10#9#9#9#9
+  +#9'<xsl:with-param name="Flag" select="@Flag"/>'#13#10#9#9#9#9'</xsl:call-te'
+  +'mplate>'#13#10#9#9#9#9'<xsl:call-template name="DataTypeToCSharp">'#13#10#9
+  +#9#9#9#9'<xsl:with-param name="DataType" select="@DataType"/>'#13#10#9#9#9#9
+  +'</xsl:call-template>'#9#9#9#9#13#10#9#9#9#9'<xsl:text> </xsl:text>'#13#10#9
+  +#9#9#9'<xsl:value-of select="@Name"/>'#13#10#9#9#9'</xsl:when>'#13#10#9#9#9
+  +'<xsl:when test="position()=last()">, <xsl:call-template name="FlagToSpecCSh'
+  +'arp">'#13#10#9#9#9#9#9'<xsl:with-param name="Flag" select="@Flag"/>'#13#10#9
+  +#9#9#9'</xsl:call-template>'#13#10#9#9#9#9'<xsl:call-template name="DataType'
+  +'ToCSharp">'#13#10#9#9#9#9#9'<xsl:with-param name="DataType" select="@DataTy'
+  +'pe"/>'#13#10#9#9#9#9'</xsl:call-template>'#13#10#9#9#9#9'<xsl:text> </xsl:t'
+  +'ext>'#13#10#9#9#9#9'<xsl:value-of select="@Name"/></xsl:when> '#13#10#9#9#9
+  +'<xsl:when test="position()>1">, <xsl:call-template name="FlagToSpecCSharp">'
+  +#13#10#9#9#9#9#9'<xsl:with-param name="Flag" select="@Flag"/>'#13#10#9#9#9#9
+  +'</xsl:call-template>'#13#10#9#9#9#9'<xsl:call-template name="DataTypeToCSha'
+  +'rp">'#13#10#9#9#9#9#9'<xsl:with-param name="DataType" select="@DataType"/>'
+  +#13#10#9#9#9#9'</xsl:call-template>'#13#10#9#9#9#9'<xsl:text> </xsl:text>'#13
+  +#10#9#9#9#9'<xsl:value-of select="@Name"/>'#13#10#9#9#9'</xsl:when>'#13#10#9
+  +#9'</xsl:choose>'#13#10#9'</xsl:template>'#13#10#9'<xsl:template name="FlagT'
+  +'oSpec">'#13#10#9#9'<xsl:param name="Flag"/>'#13#10#9#9'<xsl:choose>'#13#10#9
+  +#9#9'<xsl:when test="$Flag=''In''">'#13#10#9#9#9#9'<b>const </b>'#13#10#9#9#9
+  +'</xsl:when>'#13#10#9#9#9'<xsl:when test="$Flag=''InOut''">'#13#10#9#9#9#9'<'
+  +'b>var </b>'#13#10#9#9#9'</xsl:when>'#13#10#9#9#9'<xsl:otherwise/>'#13#10#9#9
+  +'</xsl:choose>'#13#10#9'</xsl:template>'#13#10#9#13#10#9'<xsl:template name='
+  +'"DataTypeToCSharp">'#13#10#9#9'<xsl:param name="DataType"/>'#13#10#9#9'<xsl'
+  +':choose>'#13#10#9#9#9'<xsl:when test="$DataType=''Integer''">'#13#10#9#9#9#9
+  +'Int32'#13#10#9#9#9'</xsl:when>'#13#10#9#9#9'<xsl:when test="$DataType=''Wid'
+  +'estring''">'#13#10#9#9#9#9'String'#13#10#9#9#9'</xsl:when>'#13#10#9#9#9'<xs'
+  +'l:otherwise>'#13#10#9#9#9#9'<xsl:value-of select="$DataType"/>'#13#10#9#9#9
+  +'</xsl:otherwise>'#13#10#9#9'</xsl:choose>'#13#10#9'</xsl:template>'#13#10#9
+  +#13#10#9'<xsl:template name="FlagToSpecCSharp">'#13#10#9#9'<xsl:param name="'
+  +'Flag"/>'#13#10#9#9'<xsl:choose>'#13#10#9#9#9'<xsl:when test="$Flag=''In''">'
+  +#13#10#9#9#9#9'<!--<b>const </b>-->'#13#10#9#9#9'</xsl:when>'#13#10#9#9#9'<x'
+  +'sl:when test="$Flag=''InOut''">'#13#10#9#9#9#9'<b>ref </b>'#13#10#9#9#9'</x'
+  +'sl:when>'#13#10#9#9#9'<xsl:when test="$Flag=''Out''">'#13#10#9#9#9#9'<b>out'
+  +' </b>'#13#10#9#9#9'</xsl:when>'#13#10#9#9#9'<xsl:otherwise/>'#13#10#9#9'</x'
+  +'sl:choose>'#13#10#9'</xsl:template>'#13#10#13#10#9'<xsl:template name="Stru'
+  +'ctsOverview" match="/Structs">'#13#10#9#9'<a>'#13#10#9#9#9'<xsl:attribute n'
+  +'ame="name"><xsl:value-of select="/Library/@Name"/>.Structs</xsl:attribute>'
+  +#13#10#9#9'</a>'#13#10#9#9'<div class="h1">Structs</div>'#13#10#9#9'<div cla'
+  +'ss="section">'#13#10#9#9#9'<p>The following table lists the Structs defined'
+  +' in "<xsl:value-of select="/Library/@Name"/>":</p>'#13#10#9#9#9'<table widt'
+  +'h="80%">'#13#10#9#9#9#9'<xsl:for-each select="./Structs/Struct">'#13#10#9#9
+  +#9#9#9'<tr>'#13#10#9#9#9#9#9#9'<td valign="top" width="250">'#13#10#9#9#9#9#9
+  +#9#9'<a>'#13#10#9#9#9#9#9#9#9#9'<xsl:attribute name="href">#<xsl:value-of se'
+  +'lect="@Name"/></xsl:attribute>'#13#10#9#9#9#9#9#9#9#9'<xsl:value-of select='
+  +'"@Name"/>'#13#10#9#9#9#9#9#9#9'</a>'#13#10#9#9#9#9#9#9'</td>'#13#10#9#9#9#9
+  +#9#9'<td>'#13#10#9#9#9#9#9#9#9'<xsl:value-of select="Documentation"/>'#13#10
+  +#9#9#9#9#9#9'</td>'#13#10#9#9#9#9#9'</tr>'#13#10#9#9#9#9'</xsl:for-each>'#13
+  +#10#9#9#9'</table>'#13#10#9#9'</div>'#13#10#9'</xsl:template>'#13#10#9'<xsl:'
+  +'template name="StructsMembers" match="/Structs">'#13#10#9#9'<xsl:apply-temp'
+  +'lates select="./Structs/Struct"/>'#13#10#9'</xsl:template>'#13#10#9'<xsl:te'
+  +'mplate match="/Structs/Struct">'#13#10#9#9'<a>'#13#10#9#9#9'<xsl:attribute '
+  +'name="name"><xsl:value-of select="@Name"/></xsl:attribute>'#13#10#9#9'</a>'
+  +#13#10#9#9'<div class="h2">'#13#10#9#9#9'<xsl:value-of select="@Name"/> Stru'
+  +'ct</div>'#13#10#9#9'<p>'#13#10#9#9#9'<xsl:value-of select="Documentation"/>'
+  +#13#10#9#9'</p>'#13#10#9#9'<h3>Members</h3>'#13#10#9#9'<xsl:for-each select='
+  +'"Elements/Element">'#13#10#9#9#9'<h4>'#13#10#9#9#9#9'<xsl:value-of select="'
+  +'@Name"/>'#13#10#9#9#9'</h4>'#13#10#9#9#9'<p>Datatype: <xsl:call-template na'
+  +'me="LinkToDataType">'#13#10#9#9#9#9#9'<xsl:with-param name="DataType" selec'
+  +'t="@DataType"/>'#13#10#9#9#9#9'</xsl:call-template>'#13#10#9#9#9'</p>'#13#10
+  +#9#9'</xsl:for-each>'#13#10#9'</xsl:template>'#13#10#9'<xsl:template name="L'
+  +'inkToDataType">'#13#10#9#9'<xsl:param name="DataType"/>'#13#10#9#9'<xsl:cho'
+  ,'ose>'#13#10#9#9#9'<xsl:when test="(count(/Library/Enums/Enum[@Name=$DataTyp'
+  +'e]) = 1) or (count(/Library/Structs/Struct[@Name=$DataType]) = 1) or (count'
+  +'(/Library/Arrays/Array[@Name=$DataType]) = 1)">'#13#10#9#9#9#9'<a>'#13#10#9
+  +#9#9#9#9'<xsl:attribute name="href">#<xsl:value-of select="$DataType"/></xsl'
+  +':attribute>'#13#10#9#9#9#9#9'<xsl:value-of select="$DataType"/>'#13#10#9#9#9
+  +#9'</a>'#13#10#9#9#9'</xsl:when>'#13#10#9#9#9'<xsl:otherwise>'#13#10#9#9#9#9
+  +'<xsl:value-of select="$DataType"/>'#13#10#9#9#9'</xsl:otherwise>'#13#10#9#9
+  +'</xsl:choose>'#13#10#9'</xsl:template>'#13#10#13#10#9'<xsl:template name="E'
+  +'numsOverview" match="/Enums">'#13#10#9#9'<a>'#13#10#9#9#9'<xsl:attribute na'
+  +'me="name"><xsl:value-of select="/Library/@Name"/>.Enums</xsl:attribute>'#13
+  +#10#9#9'</a>'#13#10#9#9'<div class="h1">Enums</div>'#13#10#9#9'<div class="s'
+  +'ection">'#13#10#9#9#9'<p>The following table lists the Enums defined in "<x'
+  +'sl:value-of select="/Library/@Name"/>":</p>'#13#10#9#9#9'<table width="80%"'
+  +'>'#13#10#9#9#9#9'<xsl:for-each select="./Enums/Enum">'#13#10#9#9#9#9#9'<tr>'
+  +#13#10#9#9#9#9#9#9'<td valign="top" width="250">'#13#10#9#9#9#9#9#9#9'<a>'#13
+  +#10#9#9#9#9#9#9#9#9'<xsl:attribute name="href">#<xsl:value-of select="@Name"'
+  +'/></xsl:attribute>'#13#10#9#9#9#9#9#9#9#9'<xsl:value-of select="@Name"/>'#13
+  +#10#9#9#9#9#9#9#9'</a>'#13#10#9#9#9#9#9#9'</td>'#13#10#9#9#9#9#9#9'<td>'#13
+  +#10#9#9#9#9#9#9#9'<xsl:value-of select="Documentation"/>'#13#10#9#9#9#9#9#9
+  +'</td>'#13#10#9#9#9#9#9'</tr>'#13#10#9#9#9#9'</xsl:for-each>'#13#10#9#9#9'</'
+  +'table>'#13#10#9#9'</div>'#13#10#9'</xsl:template>'#13#10#9'<xsl:template na'
+  +'me="EnumsMembers" match="/Enums">'#13#10#9#9'<xsl:apply-templates select=".'
+  +'/Enums/Enum"/>'#13#10#9'</xsl:template>'#13#10#9'<xsl:template match="/Enum'
+  +'s/Enum">'#13#10#9#9'<a>'#13#10#9#9#9'<xsl:attribute name="name"><xsl:value-'
+  +'of select="@Name"/></xsl:attribute>'#13#10#9#9'</a>'#13#10#9#9'<div class="'
+  +'h2">'#13#10#9#9#9'<xsl:value-of select="@Name"/> Enumerations</div>'#13#10#9
+  +#9'<p>'#13#10#9#9#9'<xsl:value-of select="@Documentation"/>'#13#10#9#9'</p>'
+  +#13#10#9#9'<table width="80%">'#13#10#9#9#9'<tr vAlign="top">'#13#10#9#9#9#9
+  +'<th width="52%">Enumerated Type Value</th>'#13#10#9#9#9#9'<th width="15%">D'
+  +'EC Value</th>'#13#10#9#9#9#9'<th width="33%">HEX Value</th>'#13#10#9#9#9'</'
+  +'tr>'#13#10#9#9#9'<xsl:for-each select="EnumValues/EnumValue">'#13#10#9#9#9#9
+  +'<tr>'#13#10#9#9#9#9#9'<td valign="top" width="250">'#13#10#9#9#9#9#9#9'<xsl'
+  +':value-of select="@Name"/>'#13#10#9#9#9#9#9'</td>'#13#10#9#9#9#9#9'<td>'#13
+  +#10#9#9#9#9#9#9'<xsl:value-of select="position()-1"/>'#13#10#9#9#9#9#9'</td>'
+  +#13#10#9#9#9#9#9'<td>'#13#10#9#9#9#9#9#9'0x<xsl:call-template name="DecToHex'
+  +'">'#13#10#9#9#9#9#9#9#9'<xsl:with-param name="Decimal" select="position()-1'
+  +'"/>'#13#10#9#9#9#9#9#9'</xsl:call-template>'#13#10#9#9#9#9#9'</td>'#13#10#9
+  +#9#9#9'</tr>'#13#10#9#9#9'</xsl:for-each>'#13#10#9#9'</table>'#13#10#9'</xsl'
+  +':template>'#13#10#9'<xsl:template name="DecToHex">'#13#10#9#9'<xsl:param na'
+  +'me="Decimal"/>'#13#10#9#9'How to convert Dec 2 Hex?'#13#10#9#9'<!-- How to '
+  +'do this? -->'#13#10#9'</xsl:template>'#13#10#13#10#9'<xsl:template name="Ar'
+  +'raysOverview" match="/Arrays">'#13#10#9#9'<a>'#13#10#9#9#9'<xsl:attribute n'
+  +'ame="name"><xsl:value-of select="/Library/@Name"/>.Arrays</xsl:attribute>'
+  +#13#10#9#9'</a>'#13#10#9#9'<div class="h1">Arrays</div>'#13#10#9#9'<div clas'
+  +'s="section">'#13#10#13#10#9#9#9'<p>The following table lists the Arrays def'
+  +'ined in "<xsl:value-of select="/Library/@Name"/>":</p>'#13#10#9#9#9'<table '
+  +'width="80%">'#13#10#9#9#9#9'<xsl:for-each select="./Arrays/Array">'#13#10#9
+  +#9#9#9#9'<tr>'#13#10#9#9#9#9#9#9'<td valign="top" width="250">'#13#10#9#9#9#9
+  +#9#9#9'<a>'#13#10#9#9#9#9#9#9#9#9'<xsl:attribute name="href">#<xsl:value-of '
+  +'select="@Name"/></xsl:attribute>'#13#10#9#9#9#9#9#9#9#9'<xsl:value-of selec'
+  +'t="@Name"/>'#13#10#9#9#9#9#9#9#9'</a>'#13#10#9#9#9#9#9#9'</td>'#13#10#9#9#9
+  +#9#9#9'<td>'#13#10#9#9#9#9#9#9#9'<xsl:value-of select="Documentation"/>'#13
+  +#10#9#9#9#9#9#9'</td>'#13#10#9#9#9#9#9'</tr>'#13#10#9#9#9#9'</xsl:for-each>'
+  +#13#10#9#9#9'</table>'#13#10#9#9'</div>'#13#10#9'</xsl:template>'#13#10#9'<x'
+  +'sl:template name="ArraysMembers" match="/Arrays">'#13#10#9#9'<xsl:apply-tem'
+  +'plates select="./Arrays/Array"/>'#13#10#9'</xsl:template>'#13#10#9'<xsl:tem'
+  +'plate match="/Arrays/Array">'#13#10#9#9'<a>'#13#10#9#9#9'<xsl:attribute nam'
+  +'e="name"><xsl:value-of select="@Name"/></xsl:attribute>'#13#10#9#9'</a>'#13
+  +#10#9#9'<div class="h2">'#13#10#9#9#9'<xsl:value-of select="@Name"/> Array</'
+  +'div>'#13#10#9#9'<p>'#13#10#9#9#9'<xsl:value-of select="@Documentation"/>'#13
+  +#10#9#9'</p>'#13#10#9#9'<p>Element Type:'#13#10#9#9'<xsl:call-template name='
+  +'"LinkToDataType">'#13#10#9#9#9#9'<xsl:with-param name="DataType" select="El'
+  +'ementType/@DataType"/>'#13#10#9#9#9'</xsl:call-template>'#13#10#9#9'</p>'#13
+  +#10#9'</xsl:template>'#13#10#13#10#9'<xsl:template name="ExceptionsOverview"'
+  ,' match="/Exceptions">'#13#10#9#9'<a>'#13#10#9#9#9'<xsl:attribute name="name'
+  +'"><xsl:value-of select="/Library/@Name"/>.Exceptions</xsl:attribute>'#13#10
+  +#9#9'</a>'#13#10#9#9'<div class="h1">Exceptions</div>'#13#10#9#9'<div class='
+  +'"section">'#13#10#9#9#9'<p>The following table lists the Exceptions defined'
+  +' in "<xsl:value-of select="/Library/@Name"/>":</p>'#13#10#9#9#9'<table widt'
+  +'h="80%">'#13#10#9#9#9#9'<xsl:for-each select="./Exceptions/Exception">'#13
+  +#10#9#9#9#9#9'<tr>'#13#10#9#9#9#9#9#9'<td valign="top" width="250">'#13#10#9
+  +#9#9#9#9#9#9'<xsl:value-of select="@Name"/>'#13#10#9#9#9#9#9#9'</td>'#13#10#9
+  +#9#9#9#9#9'<td>'#13#10#9#9#9#9#9#9#9'<xsl:value-of select="Documentation"/>'
+  +#13#10#9#9#9#9#9#9'</td>'#13#10#9#9#9#9#9'</tr>'#13#10#9#9#9#9'</xsl:for-eac'
+  +'h>'#13#10#9#9#9'</table>'#13#10#9#9'</div>'#13#10#9'</xsl:template>'#13#10#9
+  +'<xsl:template name="ExceptionsMembers" match="/Exceptions">'#13#10#9#9'<xsl'
+  +':apply-templates select="./Exceptions/Exception"/>'#13#10#9'</xsl:template>'
+  +#13#10#9'<xsl:template match="/Exceptions/Exception">'#13#10#9#9'<a>'#13#10#9
+  +#9#9'<xsl:attribute name="name"><xsl:value-of select="@Name"/></xsl:attribut'
+  +'e>'#13#10#9#9'</a>'#13#10#9#9'<div class="h2">'#13#10#9#9#9'Exception <xsl:'
+  +'value-of select="@Name"/> Struct</div>'#13#10#9#9'<p>'#13#10#9#9#9'<xsl:val'
+  +'ue-of select="@Documentation"/>'#13#10#9#9'</p>'#13#10#9#9'<h3>Members</h3>'
+  +#13#10#9#9'<xsl:for-each select="Elements/Element">'#13#10#9#9#9'<h4>'#13#10
+  +#9#9#9#9'<xsl:value-of select="@Name"/>'#13#10#9#9#9'</h4>'#13#10#9#9#9'<p>D'
+  +'atatype: <xsl:call-template name="LinkToDataType">'#13#10#9#9#9#9#9'<xsl:wi'
+  +'th-param name="DataType" select="@DataType"/>'#13#10#9#9#9#9'</xsl:call-tem'
+  +'plate>'#13#10#9#9#9'</p>'#13#10#9#9'</xsl:for-each>'#13#10#9'</xsl:template'
+  +'>'#13#10#13#10#13#10#9'<xsl:template name="UsesOverview" match="/Uses">'#13
+  +#10#9#9'<a>'#13#10#9#9#9'<xsl:attribute name="name"><xsl:value-of select="/L'
+  +'ibrary/@Name"/>.Uses</xsl:attribute>'#13#10#9#9'</a>'#13#10#9#9'<div class='
+  +'"h1">'#13#10#9#9#9'Used RODL Files'#13#10#9#9'</div>'#13#10#9#9'<div class='
+  +'"section">'#13#10#9#9#9'<p>The following table lists the external RODL file'
+  +'s used by library "<xsl:value-of select="/Library/@Name"/>":</p>'#13#10#9#9
+  +#9'<table width="80%">'#13#10#9#9#9#9'<xsl:for-each select="./Uses/Use">'#13
+  +#10#9#9#9#9#9'<tr>'#13#10#9#9#9#9#9#9'<td valign="top" width="250" rowspan="'
+  +'2">'#13#10#9#9#9#9#9#9#9'<xsl:value-of select="@Name"/>'#13#10#9#9#9#9#9#9
+  +'</td>'#13#10#9#9#9#9#9#9'<td>'#13#10#9#9#9#9#9#9#9'<xsl:value-of select="@R'
+  +'odl"/>'#13#10#9#9#9#9#9#9'</td>'#13#10#9#9#9#9#9'</tr>'#13#10#9#9#9#9#9'<tr'
+  +'>'#13#10#9#9#9#9#9#9'<td>'#13#10#9#9#9#9#9#9#9'<xsl:value-of select="Docume'
+  +'ntation"/>'#13#10#9#9#9#9#9#9'</td>'#13#10#9#9#9#9#9'</tr>'#13#10#9#9#9#9'<'
+  +'/xsl:for-each>'#13#10#9#9#9'</table>'#13#10#9#9'</div>'#13#10#9'</xsl:templ'
+  +'ate>'#13#10'</xsl:stylesheet>'#13#10
+]);
+LazarusResources.Add('RemObjectsHtmlServerInfo','HTML',[
+  '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">'#13#10'<html>'
+  +#13#10#9'<head>'#13#10#9#9'<title>%NAME% - RemObjects SDK for .NET %RO%</tit'
+  +'le>'#13#10#9#9'<meta name="GENERATOR" content="RemObjects SDK for .NET {1}"'
+  +'>'#13#10#9#9'<style>'#13#10#9#9#9'body'#13#10#9#9#9'{'#13#10#9#9#9#9'backgr'
+  +'ound-color: #f7f7f7;'#13#10#9#9#9#9'margin: 0;'#13#10#9#9#9#9'padding: 0;'
+  +#13#10#9#9#9#9'font-family: Verdana, Tahoma, Arial, Helvetica, sans serif;'
+  +#13#10#9#9#9#9'font-size: 10pt;'#13#10#9#9#9'}'#13#10#9#9#9'.header'#13#10#9
+  +#9#9'{'#13#10#9#9#9#9'padding: 5px;'#13#10#9#9#9#9'background-color: #c0c0c0'
+  +';'#13#10#9#9#9#9'border-bottom: 5px solid #808080;'#13#10#9#9#9#9'font-size'
+  +': 1.5em;'#13#10#9#9#9'}'#13#10#9#9#9'.body'#13#10#9#9#9'{'#13#10#9#9#9#9'pa'
+  +'dding: 5px;'#13#10#9#9#9'}'#13#10#9#9#9'.footer'#13#10#9#9#9'{'#13#10#9#9#9
+  +#9'padding: 5px;'#13#10#9#9#9#9'border-top: 1px solid #808080;'#13#10#9#9#9#9
+  +'font-size: 0.8em;'#13#10#9#9#9'}'#13#10#9#9#9'.h2'#13#10#9#9#9'{'#13#10#9#9
+  +#9#9'font-weight: bold;'#13#10#9#9#9'}'#13#10#9#9'</style'#13#10#9'</head>'
+  +#13#10#9'<body>'#13#10#9'<div class="header">'#13#10#9#9'<img src="%BASEPATH'
+  +'%favicon.ico" style="padding-right: 5px;"/>%NAME%'#13#10#9'</div>'#13#10#9
+  +'<div class="body">'#13#10#9#9'%DOC%'#13#10#9#9'<p><a href="%BASEPATH%doc">V'
+  +'iew full documentation</a> | <a href="%BASEPATH%rodl">View RODL</a></p>'#13
+  +#10'    <p class="h2">Available Dispatchers:</p>'#13#10#9#9'<ul>'#13#10#9#9#9
+  +'%DISPATCHERS%'#13#10#9#9'</ul>'#13#10#9'</div>'#13#10#9'<div class="footer"'
+  +'>'#13#10#9#9'RemObjects SDK for Delphi'#13#10#9#9'RemObjects Software, LLC.'
+  +' <a href="http://www.remobjects.com">remobjects.com</a>.'#13#10#9'</div>'#13
+  +#10#13#10#13#10#9'</body>'#13#10'</html>'#13#10
+]);
+LazarusResources.Add('RemObjectsHtmlIcon','ICO',[
+  #0#0#1#0#6#0'00'#0#0#1#0#8#0#168#14#0#0'f'#0#0#0'  '#0#0#1#0#8#0#168#8#0#0#14
+  +#15#0#0#16#16#0#0#1#0#8#0'h'#5#0#0#182#23#0#0'00'#0#0#1#0' '#0#168'%'#0#0#30
+  +#29#0#0'  '#0#0#1#0' '#0#168#16#0#0#198'B'#0#0#16#16#0#0#1#0' '#0'h'#4#0#0'n'
+  +'S'#0#0'('#0#0#0'0'#0#0#0'`'#0#0#0#1#0#8#0#0#0#0#0#0#9#0#0#0#0#0#0#0#0#0#0#0
+  +#1#0#0#0#1#0#0#0#0#0#0#5#5#5#0#6#6#15#0#9#9#9#0#14#14#14#0#12#12#22#0#7#7#26
+  +#0#8#8#27#0#17#17#17#0#21#21#21#0#25#25#25#0#29#29#29#0#5#5'"'#0#17#17'%'#0
+  +#26#27'%'#0#28#29''''#0#20#21')'#0#24#26'.'#0#11#11'1'#0#11#11';'#0#19#22'?'
+  +#0#25#28'<'#0#31' +'#0'!!!'#0'$$$'#0')))'#0'---'#0'%''2'#0'(*6'#0'!$:'#0'/1='
+  +#0'111'#0'555'#0'999'#0'==='#0#6#6'I'#0#9#9'L'#0#22#26'C'#0#20#25'M'#0#5#5'R'
+  +#0#12#13'R'#0#9#9'V'#0#3#3'Z'#0#9#10'X'#0#10#12'['#0#11#14'^'#0#13#17'X'#0#24
+  +#30'T'#0#20#25'Y'#0#22#29'^'#0#28' @'#0'.4M'#0'9<I'#0'.7\'#0'4:T'#0'6<U'#0#3
+  +#3'c'#0#5#5'o'#0#14#20'f'#0#18#24'b'#0#19#28'i'#0#16#25'o'#0#5#5'z'#0#1#1'~'
+  +#0#5#7'~'#0#12#21''#0#15#26'|'#0#18#29'u'#0#25'#f'#0#21' n'#0#27'&k'#0#28'('
+  +'n'#0#23'#s'#0#30'+s'#0#20'!z'#0#25'''y'#0#27'+~'#0')4f'#0'#0m'#0',8j'#0'2<a'
+  +#0'$2p'#0'"3~'#0'3?p'#0'6@d'#0'8Ae'#0'<Eh'#0':Ft'#0'@@@'#0'EEE'#0'@DO'#0'III'
+  +#0'MMM'#0'GJV'#0'AG^'#0'KNY'#0'QQQ'#0'TTT'#0'RU_'#0'YYY'#0']]]'#0'EKa'#0'@Ik'
+  +#0'[^g'#0'RXk'#0'EQ{'#0'S\x'#0'^aj'#0']bt'#0'W`{'#0']e'#0'aaa'#0'eee'#0'bem'
+  +#0'iii'#0'mmm'#0'ppp'#0'ttt'#0'yyy'#0''#0#6#14#136#0#9#18#133#0#14#29#141
+  +#0#16#30#130#0#0#0#144#0#1#2#148#0#0#0#154#0#0#1#156#0#6#19#156#0#9#25#157#0
+  +#23'('#134#0#18'"'#136#0#21','#152#0' 4'#140#0',?'#136#0' :'#157#0'#<'#158#0
+  +#0#3#161#0#0#5#165#0#1#10#163#0#1#12#167#0#0#7#169#0#1#14#171#0#0#9#173#0#4
+  +#18#166#0#6#24#167#0#0#11#177#0#0#13#181#0#2#19#180#0#7#30#178#0#4#26#181#0#0
+  +#16#185#0#2#22#185#0#0#18#190#0#4#28#185#0#11'!'#171#0#20'1'#173#0#26'7'#169
+  +#0#11''''#182#0#12''''#182#0#16','#178#0#23'7'#181#0#17'2'#188#0#18'4'#191#0
+  +'">'#171#0'.A'#137#0'-C'#149#0'.J'#175#0'5N'#165#0'>V'#168#0'&E'#185#0'2Q'
+  +#188#0'MY'#128#0'GV'#136#0'S_'#132#0'^g'#129#0']h'#138#0'AY'#170#0'E]'#171#0
+  +'@]'#191#0'H`'#172#0'Vj'#167#0'Nh'#185#0'Sm'#186#0#0#20#194#0#0#22#198#0#2#27
+  +#195#0#0#24#202#0#2#29#200#0#0#26#206#0#0#28#210#0#0#30#215#0#9'&'#193#0#6'$'
+  +#200#0#14'3'#203#0#24';'#194#0#23'='#207#0#2'#'#212#0#10'/'#208#0#0' '#219#0
+  +#0'"'#223#0#6','#216#0#0''''#231#0#0')'#235#0#3'-'#232#0#0'+'#239#0#3'2'#239
+  +#0#16'='#231#0#0'-'#244#0#0'/'#248#0#10'9'#243#0#13'<'#243#0#0'1'#252#0#1'4'
+  +#254#0#4'6'#255#0#7'9'#255#0#10'<'#255#0#13'?'#255#0#16'?'#243#0#23'@'#219#0
+  +' B'#196#0'(J'#198#0'%J'#209#0'%M'#221#0'0T'#211#0#22'B'#231#0#22'E'#243#0#16
+  +'B'#255#0#19'E'#255#0#22'G'#255#0#25'J'#255#0#28'M'#255#0#31'P'#255#0'.X'#233
+  +#0'#T'#255#0',\'#255#0'=i'#244#0'3b'#255#0'8g'#255#0'<k'#255#0'B`'#192#0'Mm'
+  +#205#0'Dj'#224#0'Lr'#225#0'Ks'#235#0'Co'#245#0'It'#245#0'Bq'#255#0#129#129
+  +#129#0#134#134#134#0#137#137#137#0#143#143#143#0#147#147#147#0#154#154#154#0
+  +#162#162#162#0#170#170#170#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0's\'#8#8#4
+  +#4#4#4'Yo'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0'w!'#10#10#8#10#8#8#8#4#4#4#0#4#0#0#24't'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0's'#10#24#10#10#10#10#10#8#8#8#8#4#4#4#4#4#0#4#0#0'o'#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'w'#25#24#24#24#24#10#24#10#10
+  +#10#10#8#8#8#4#4#0#4#4#0#0#0#0#0't'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +'!'#25#25#24#24#24#24#10#10#15#20'.---)$'#18#5#4#0#4#4#0#0#0#0#24#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#25#25#25#25#25#24#24#24#24#24#15':'#143#141#138
+  +#137#137'}'#137'}?$'#6#0#4#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'w   '#25
+  +#25#25#25#24#24#24#10#24'%'#146#143#141#138#137#137'}'#137#137'}'#137'8'#6#4
+  +#0#0#0#0#0'o'#0#0#0#0#0#0#0#0#0#0#0#0#0'w  '#25' '#25' '#25#25#25#24#24#24#24
+  +'0'#146#146#143#138#138#137#137'}}'#137'}'#137'}*'#2#4#0#0#0#0'o'#0#0#0#0#0#0
+  +#0#0#0#0#0#0'!     '#25#25#25#25#25#24#24#24'='#151#146#146#143#141#138#137
+  +#137#137'}'#137'}'#137#137'?'#6#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'!!!   '#25' '
+  +' '#25#25#25#25#24#24'/'#153#153#146#146#143#138#138#137'}'#137'}'#137'}}'
+  +#137'|'#12#1#0#0#0#0#0#0#0#0#0#0#0#0#0'\!!!!    '#25' '#25#25#25#25#24#24'1'
+  +#153#144'y:'#139#141#138#138'}'#137'}'#137'}}'#137'|'#12#4#0#0#0#24#0#0#0#0#0
+  +#0#0#250'Y!Y!!!    '#25' '#25#25#25#25#24#24#24#24#10#24':'#143#141#138#138
+  +'}'#137'}'#137'}}'#137'|'#6#0#0#0#0't'#0#0#0#0#0#0'YYY!!!!!!    '#25' '#25#25
+  +#25#24#24#24#24#10#15#139#143#141#138#138'}'#137'}'#137'}}'#137'?'#2#4#0#0#0
+  +#0#0#0#0#0'tYY!YY!!!!   '#25' '#25' '#25#25#25#24#24#24#24#21#143#146#143#141
+  +#138#138'}'#137'}'#137'}'#137'}*'#0#4#0#0'o'#0#0#0#0'\YYYY!YY!!!    '#25#25
+  +' '#25#25#25#24#24#21#148#153#146#146#143#141#138#138'}'#137'}'#137'}'#137'}'
+  +#6#0#0#0#0#0#0#0#253'\Y\YYY!!T'#161#194#162'R    '#25#25#25#25#25#29#152#184
+  +#153#153#146#146#143#141#138#138'}'#137'}}'#137'}8'#4#1#4#0't'#0#0'o\\YYYYY'
+  +#165#215#214#214#214#209#156'   '#25' '#25#25#25#27#189#185#184#153#153#146
+  +#146#143#141#138#138'}'#137'}'#137'}'#137#6#3#0#4#24#0#0'`\\\Y\YZ'#218#216
+  ,#215#214#214#209#209'R   '#25' '#25#25#25#152#189#185#153#153#153#146#146#143
+  +#141#138#138#137'}}'#137'}'''#4#0#0#0#0#0'`\\\\YYW'#227#216#216#214#214#214
+  +#209#162'    '#25' '#31#25'H'#185#185#185#184#153#153#146#146#143#141#138'?)'
+  +'9'#137'}?'#4#4#4#0#0#250'```\\\YW'#227#227#217#216#214#214#214#194'!    '#25
+  +' '#25#25#25'F'#149#184#184#153#128#146#146#143#138#16#8#8#137'}'#137#2#4#4#4
+  +'ot````\\\f'#230#227#227#217#216#215#214#157'!!    '#25' '#25#26#25'J'#189
+  +#145'2'#24'A'#146#146'x'#10#10#9'>'#137'}'#18#4#0#4'Ycc````\\\'#222#229#227
+  +#227#217#216#210'7!!!    '#25' '#25#25#130#189'z'#24#24#24';&'#15#10#10#9')|'
+  +#137#18#2#8#4#4'ccc````\\]'#222#229#227#227#218'S!Y!!!    '#26' '#25#155#190
+  +#152#25#24#24#23#15#10#15#10#10#9#9#13#8#8#8#4#3'cccc````\\\fWWYYY!!!!!  N'
+  +#132#158#197#199#190#190#27#24#24#24#23#23#11#10#11#9#9#9#9#8#8#4#4'ccccc```'
+  +'`\\\[YYYYYY!!!! '#201#203#202#159#193#199'F'#25#25#24#24#24#23#23#23#10#23#9
+  +#9#9#9#8#8#4'occccc````\\\[YYY!Y!Y!!'#133#209#203#160' '#25' '#25#25#25#25#24
+  +#24#24#23#23#23#9#23#9#10#9#8#8#8'ooccccc````\\[\YYYYY!!!S'#209#209'N  '#25
+  +' '#25#25#25#25#24#24#24#23#23#23#11#10#11#9#9#8#8'wooocccc````\\[[YYY!YY!!'
+  +#162#214#198'3  '#25' '#25#25#25#27'EC<'#23#10#23#11#10#10#10#9'`'#252'oococ'
+  +'ccc````\\\[YYYY!Y!7'#209#209#202'3  '#25' '#25#25#158#189#187#184#153#22#23
+  +#23#10#10#10#9'o'#0'ooococccc````\\[\YVZYY!T'#214#214#209'M   '#26' F'#191
+  +#190#189#189#185'B'#23#23#23#10#23#9#0#0'oooooccccc````\\^'#221#227#226#166
+  +'YT'#210#214#214#203'5    '#25#130#199#191#190#189#189#129#23#23#23#23#9#23#0
+  +#0'wosoooccm'#178#174'b```\'#168#230#230#230#227#225#218#216#214#135'4!!    '
+  +'I'#202#191#190#190#189'{'#24#24#23#23#23' '#0#0#255'sooooom'#236#238#238#179
+  +'````'#171#232#230#230#230#227#227#216#196'!Y!!!    '#192#199#199#190#189#27
+  +#24#24#23#23#23'w'#0#0#0'osoook'#245#239#239#238#238'h```'#224#232#232#232
+  +#230#229#227#227#217'Y!X!!!   '#30'L'#130'L'#31#27#25#24#24#24#23#0#0#0#0#252
+  +'osoo'#181#247#247#239#239#238#240'cb'#173#233#235#232#232#230#230#230#227
+  +#227#219#164#136'7!!!    '#25#25#25#25#25#25#24#24'p'#0#0#0#0#0'sssoq'#243
+  +#247#247#239#239#238#238#238#235#235#235#232#232#232#232#230#229#227#227#217
+  +#216#195'X!!!     '#25#31#25#25#25#24#0#0#0#0#0#0#254'soso'#175#246#247#247
+  +#239#239#238#238#235#235#235#235#235#232#232#230#230#230#227#227#217#207'X!!'
+  +'!!    '#31#25#31#25#25'w'#0#0#0#0#0#0#0'tsspp'#175#246#247#247#239#239#238
+  +#238#238#235#235#235#232#232#232#232#230#229#227#227#165'YXY!!!    '#26#31#25
+  +'!'#0#0#0#0#0#0#0#0#0'sspso'#176#246#247#247#239#239#238#238#235#235#235#235
+  +#235#232#232#230#230#230#218'YX!47!!!    '#26#31#0#0#0#0#0#0#0#0#0#0#0'ssosp'
+  +#175#244#247#247#239#239#238#238#238#235#235#235#232#232#232#232#230#230#170
+  +'Z'#165#218#215#136'!!!    '#0#0#0#0#0#0#0#0#0#0#0#0#254'sspror'#183#247#247
+  +#239#239#238#238#235#235#235#235#235#232#232#230#230#227#226#227#217#216#136
+  +'!!!!  w'#0#0#0#0#0#0#0#0#0#0#0#0#0#254'ssprqom'#241#247#239#239#238#238#238
+  +#235#235#235#232#232#232#232#230#230#227#220'VYY!!!!w'#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0'ssosopol'#182#242#239#238#238#235#235#235#235#235#232#232#223#167
+  +'^YY!YY!!'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'tspsoooocg'#174#178#180#178
+  +#178#169#169'i_\\\YYYY!`'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#254'sosp'
+  +'oooocccb`````\\[\YYY'#250#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#252'psopoooccccc```\\\[\t'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#255'tpoooodcccc````o'#253#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#252'wooocccv'#250#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#255#255#224#7#255#255#0#0#255#254#0#0''#255#0#0#255#248#0#0#31#255#0#0
+  +#255#224#0#0#7#255#0#0#255#192#0#0#3#255#0#0#255#128#0#0#1#255#0#0#254#0#0#0
+  +#0''#0#0#252#0#0#0#0'?'#0#0#252#0#0#0#0'?'#0#0#248#0#0#0#0#31#0#0#240#0#0#0
+  +#0#15#0#0#224#0#0#0#0#7#0#0#224#0#0#0#0#7#0#0#192#0#0#0#0#3#0#0#192#0#0#0#0#3
+  +#0#0#128#0#0#0#0#1#0#0#128#0#0#0#0#1#0#0#128#0#0#0#0#1#0#0#128#0#0#0#0#1#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#128#0#0#0#0#1#0#0#128#0#0#0#0#1#0#0#128#0#0#0#0#1#0#0#128#0#0#0#0#1
+  +#0#0#192#0#0#0#0#3#0#0#192#0#0#0#0#3#0#0#224#0#0#0#0#7#0#0#224#0#0#0#0#7#0#0
+  +#240#0#0#0#0#15#0#0#248#0#0#0#0#31#0#0#252#0#0#0#0'?'#0#0#252#0#0#0#0'?'#0#0
+  +#254#0#0#0#0''#0#0#255#128#0#0#1#255#0#0#255#192#0#0#3#255#0#0#255#224#0#0#7
+  +#255#0#0#255#248#0#0#31#255#0#0#255#254#0#0''#255#0#0#255#255#224#7#255#255
+  +#0#0'('#0#0#0' '#0#0#0'@'#0#0#0#1#0#8#0#0#0#0#0#0#4#0#0#0#0#0#0#0#0#0#0#0#1#0
+  +#0#0#1#0#0#0#0#0#0#6#6#6#0#5#5#15#0#9#9#9#0#13#13#13#0#16#16#16#0#22#22#22#0
+  +#26#26#26#0#29#29#29#0#4#4'!'#0#22#22' '#0#29#30'('#0#24#26'/'#0#7#7'7'#0#5#5
+  +'>'#0#16#16'7'#0#27#29'2'#0#31' +'#0'!!!'#0'%%%'#0'***'#0'...'#0'&(3'#0'(*5'
+  +#0'111'#0'555'#0'999'#0'==='#0#13#14'H'#0#23#27'E'#0#21#26'N'#0#24#29'I'#0#16
+  +#21']'#0#21#27'['#0#21#27'\'#0#29'!A'#0#28'$]'#0'&)@'#0'!&H'#0'#)K'#0'17O'#0
+  ,'9<H'#0'<?K'#0'+3Y'#0'39R'#0#4#4'e'#0#5#6'o'#0#8#9'j'#0#14#20'f'#0#1#1'u'#0#9
+  +#15'u'#0#4#4'x'#0#18#31'y'#0#21' n'#0#30',s'#0#26'(z'#0'#/l'#0')5h'#0'2;a'#0
+  +'4>c'#0'$2p'#0'(7v'#0'.={'#0'>D['#0':Fu'#0'=Iw'#0'@@@'#0'DDD'#0'III'#0'NNN'#0
+  +'BEQ'#0'HKW'#0'QQQ'#0'UUU'#0'YYY'#0']]]'#0'CLm'#0'[^g'#0'```'#0'fff'#0'iii'#0
+  +'lll'#0'agx'#0'ppp'#0'uuu'#0'~~~'#0#1#1#135#0#1#1#136#0#12#24#131#0#0#0#144#0
+  +#0#0#154#0#0#2#159#0#11#29#151#0#8#25#156#0#23'*'#138#0#24'*'#137#0#15' '#145
+  +#0#29'6'#155#0#31'9'#158#0#0#5#165#0#0#9#171#0#4#17#164#0#6#24#166#0#10#31
+  +#167#0#0#12#177#0#0#15#184#0#2#19#180#0#7#30#177#0#2#22#186#0#0#18#190#0#19
+  +'/'#170#0#11'$'#177#0#12''''#182#0#17'1'#187#0'#?'#171#0'7J'#141#0'*@'#148#0
+  +'-C'#149#0'4J'#153#0'-F'#163#0'8Q'#167#0'<T'#168#0'$C'#184#0'/M'#188#0'HZ'
+  +#149#0'Uf'#156#0'`h'#130#0'Vj'#167#0#0#21#196#0#0#24#202#0#0#27#208#0#0#30
+  +#215#0#5' '#193#0#14'3'#203#0#21'8'#194#0#24';'#195#0#21';'#206#0#0'"'#221#0
+  +#6'/'#222#0#0'('#233#0#3'/'#234#0#18'>'#231#0#0'+'#240#0#0'.'#246#0#3'2'#240
+  +#0#10':'#242#0#15'>'#243#0#0'2'#252#0#3'6'#254#0#7':'#255#0#12'>'#255#0'"J'
+  +#221#0'8_'#223#0'<b'#223#0#20'B'#243#0#24'G'#243#0#16'B'#255#0#21'G'#255#0#26
+  +'K'#255#0#30'O'#255#0' J'#232#0'(S'#233#0'#T'#255#0'''X'#255#0',\'#255#0':c'
+  +#234#0'>g'#234#0'<h'#244#0'1a'#255#0'5e'#255#0':i'#255#0'?n'#255#0'Jg'#194#0
+  +'In'#225#0'Lr'#225#0'Ep'#245#0'It'#245#0'Cr'#255#0#138#138#138#0#142#142#142
+  +#0#144#144#144#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'H'#19#5#5#4#4#19'H'#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0'J'#8#8#8#5#5#5#5#4#4#4#0#0'C'#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0'Q'#19#19#19#8#8#8#8#5#5#5#4#4#4#0#0#0'H'#0#0#0#0#0#0#0#0#0#0#0#0#0#27#20
+  +#20#19#19#19#8' dd[ZW-'#13#4#4#0#0#5#0#0#0#0#0#0#0#0#0#0#0#24#24#20#20#20#19
+  +#19#19#29'dd[[ZZZV'#14#0#0#0#0#0#0#0#0#0#0#0#0#0#27#24#24#24#24#20#20#19#19
+  +'!ihdc[ZZZZ3'#2#0#0#0#0#0#0#0#0#0#0'C'#27#27#24#24#24#20#20#20#19'#jihd[[ZZZ'
+  +'ZY'#9#0#0#5#0#0#0#0#0'S'#27#27#27#27#24#24#24#24#20#20#19'#!'#16'0d[[ZZZZY'
+  +#2#0#0'H'#0#0#0#0'CC'#27#27#27#27#24#24#24#20#20#20#19#19#19#11'hh[[ZZZZ3'#4
+  +#0#0#0#0#0'SDCC'#27#27#24#27#24#24#24#24#20#20#19#19'Xihhc[ZZZZ'#14#0#0'C'#0
+  +#0'DDCC'#27';'#135#144'q:'#24#24#20#20#20'5'#128'iihd[[ZZZW'#4#0#0#0#0'DDDDF'
+  +#146#149#148#148#138#24#24#24#24#20'$'#129#128#128'ihhc[ZZZ'#13#4#4#0'UHHDD@'
+  +#156#150#149#148#148'9'#26#24#24#20#23'`'#129#128'iihd['#28'3Z-'#4#0'CNHHHDA'
+  +#156#156#150#149#148','#26#24#24#24#24#20#22#129'f!eh2'#10#15'ZV'#4#4#8'JHHH'
+  +'HD'#151#157#156#150#135#27#27#27#24#24#24#20'%'#130'4'#19#17#30#16#8#10'/.'
+  +#5#4#4'JJJHHHGvwuC'#27#27#26#27#24'<^p'#131'g'#19#19#19#8#8#8#5#5#5#5#4'JJJJ'
+  +'HHDDDCCB'#27#27#27'('#142#139'^p&'#20#19#19#11#8#8#8#8#5#5#5'NNJJHHHHDDCCC'
+  +#27#27'='#142'n'#24#21#21#20#20#19#18#18#8#8#8#8#5#5'QNJJJJHHHDDCCB'#27#27
+  +#133#139'='#24#24#20#20'&\]#'#11#6#8#6#19#178'NNNJJJHHHDDF?C'#27'b'#148#139
+  +#24#24#24#24#132#129#129'i'#17#8#8#8'H'#0'NNNNJJHHHHL'#160#156'zu'#149#148'b'
+  +#27#24#26#21#137#131#130#129'#'#19#8#8#0#0'QNNNM'#167#170'|HHx'#159#158#156
+  +#156#150'>'#27#27#26#24#24'p'#137#131'k'#19#19#18#8#0#0#178'QQN'#174#171#170
+  +#166'IHx'#162#162#158#156#156'r*'#27#27#27#24#24'67'#23#20#19#19'J'#0#0#0'QN'
+  +'Q'#173#177#170#170#153#153#164#163#162#159#158#157#156#150#136#27#26#27#24
+  +#24#24#23#20#20#19#0#0#0#0#180'QNR'#176#177#171#170#169#169#164#162#162#159
+  +#158#156#156#141#27#27#27#27#24#24#24#24#20'J'#0#0#0#0#0'SQQ~'#176#177#170
+  +#170#169#169#164#163#162#159#158#157'uB*)'#27#27#24#24#24#27#0#0#0#0#0#0#0'Q'
+  +'NQR'#174#177#171#170#169#169#164#162#162#159#158#155'u'#146#145':'#26#27#24
+  +#24#0#0#0#0#0#0#0#0#0'QQNN'#176#170#170#169#169#164#163#162#158#158#157#154
+  +'t'#27#27#27#27#0#0#0#0#0#0#0#0#0#0#0'SQQNN}'#172#166#169#169#164#163#161'{s'
+  +'CCC'#27'C'#0#0#0#0#0#0#0#0#0#0#0#0#0#180'QQNNNJJJHHHDDDCCS'#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#178'QQNNNJJJHHHDU'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#178'QNJJJNU'#0#0#0#0#0#0#0#0#0#0#0#0#255#240#15#255#255#128#1#255#254#0#0''
+  +#252#0#0'?'#248#0#0#31#240#0#0#15#224#0#0#7#192#0#0#3#192#0#0#3#128#0#0#1#128
+  +#0#0#1#128#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#128#0#0#1#128#0#0#1#128#0#0#1#192#0#0#3#192#0#0#3#224#0#0#7#240#0#0#15
+  +#248#0#0#31#252#0#0'?'#254#0#0''#255#128#1#255#255#240#15#255'('#0#0#0#16#0
+  +#0#0' '#0#0#0#1#0#8#0#0#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#1#0#0#0#1#0#0#0#0#0#0
+  +#4#4#4#0#3#3#13#0#9#9#9#0#14#14#14#0#7#7#26#0#18#18#18#0#24#24#24#0#29#29#29
+  ,#0#27#28'&'#0#14#14'5'#0#18#19':'#0#23#26'9'#0#28#31'?'#0'"""'#0''''''''#0','
+  +',,'#0'%&1'#0')+7'#0'111'#0'666'#0';;;'#0'???'#0#7#7'J'#0#26#30'I'#0#8#9'W'#0
+  +'&*B'#0'7:G'#0'<?K'#0'!(V'#0'$.^'#0'09_'#0#2#2'c'#0#11#15'`'#0#10#14'h'#0#18
+  +#27'h'#0#1#1'~'#0#23'"f'#0#30'(b'#0#31',s'#0'5>c'#0'$3q'#0'!2}'#0'>D['#0'=Jw'
+  +#0'AAA'#0'DDD'#0'III'#0'OOO'#0'ADP'#0'SSS'#0'TTT'#0'YYY'#0'^^^'#0'CJ`'#0'OUi'
+  +#0'\_h'#0'CP{'#0'_ew'#0'bbb'#0'hhh'#0'fiq'#0'sss'#0#4#4#130#0#7#16#140#0#11
+  +#23#141#0#14#30#142#0#0#0#154#0#0#1#156#0#25'+'#138#0#0#6#167#0#10#28#162#0#4
+  +#21#172#0#7#28#172#0#0#12#179#0#0#19#191#0#8'"'#184#0' ='#170#0';Q'#156#0'<Z'
+  +#190#0'@X'#170#0'G_'#172#0'H`'#171#0'Pe'#165#0'Ul'#177#0#0#25#204#0#0#31#216
+  +#0#19'5'#192#0#18';'#219#0#3','#229#0#15';'#231#0#4'3'#240#0#1'3'#252#0#8';'
+  +#255#0#30'C'#208#0')J'#199#0'?c'#212#0#24'C'#231#0#24'D'#231#0#21'C'#243#0#18
+  +'C'#255#0#27'L'#255#0'$T'#255#0'-]'#255#0'6f'#255#0'Pp'#207#0'Ms'#226#0'@n'
+  +#255#0#133#133#133#0#150#150#150#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0';'#7
+  +#6#4#4'2'#0#0#0#0#0#0#0#0';'#15#15#12'!'#25#23#5#0'-'#0#0#0#0#0'-'#19#16#15
+  +#24'JFCC '#2#6#0#0#0';'#21#19#19#16#17'A@FCC$'#2'-'#0#0'--'#21#21#19#16#15#24
+  +'JFCC '#0#0'l/1X\)'#19#16'GKJFCC'#5'22/9d]W'#19#19#29'IHJ"?'#23#4'420_^('#21
+  +#21#30'L%'#13#9#11#10#4'4422/--'#31'Y'''#26#15#15#7#7#6';;422/+'#21'[*'#19'&'
+  +'U#'#7#7'm;8R79ebZ'#31#19'EVB'#15';'#0'<Tk`OfecM'#21#21#30#18#15#0#0'l=jkhgf'
+  +'ea'#28#27#19#19'2'#0#0#0'>=ikhgfeaM'#21'-'#0#0#0#0#0'l<:SRRN6-;'#0#0#0#0#0#0
+  +#0#0'm;442l'#0#0#0#0#0#248#31#0#0#224#7#0#0#192#3#0#0#128#1#0#0#128#1#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#128#1#0#0#128#1#0#0#192#3#0#0
+  +#224#7#0#0#248#31#0#0'('#0#0#0'0'#0#0#0'`'#0#0#0#1#0' '#0#0#0#0#0#128'%'#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#25#25#25'/'#23#23#23'o'#22#22#22#159#20#20#20#191#18#18#18
+  +#255#16#16#16#255#15#15#15#255#13#13#13#255#11#11#11#255#10#10#10#255#8#8#8
+  +#191#7#7#7#159#5#5#5'o'#4#4#4'/'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'   '#31#30#30#30#143#28
+  +#28#28#223#26#26#26#255#25#25#25#255#23#23#23#255#21#21#21#255#20#20#20#255
+  +#18#18#18#255#16#16#16#255#15#15#15#255#13#13#13#255#11#11#11#255#10#10#10
+  +#255#8#8#8#255#6#6#6#255#5#5#5#255#3#3#3#223#2#2#2#143#1#1#1#31#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'$$$/###'#175'!!!'#255#31#31#31#255
+  +#30#30#30#255#28#28#28#255#26#26#26#255#25#25#25#255#23#23#23#255#21#21#21
+  +#255#20#20#20#255#18#18#18#255#16#16#16#255#15#15#15#255#13#13#13#255#11#11
+  +#11#255#10#10#10#255#8#8#8#255#6#6#6#255#5#5#5#255#3#3#3#255#1#1#1#255#0#0#0
+  +#159#0#0#0#31#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'***'#15'((('#143'&&&'#255'$$$'#255'###'
+  +#255'!!!'#255#31#31#31#255#30#30#30#255#28#28#28#255#26#26#26#255#25#25#25
+  +#255#23#23#23#255#21#21#21#255#20#20#20#255#18#18#18#255#16#16#16#255#15#15
+  +#15#255#13#13#13#255#11#11#11#255#10#10#10#255#8#8#8#255#6#6#6#255#5#5#5#255
+  +#3#3#3#255#1#1#1#255#0#0#0#255#0#0#0#143#0#0#0#15#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'---?+++'#239')))'#255'((('
+  +#255'&&&'#255'$$$'#255'###'#255'!!!'#255#31#31#31#255#30#30#30#255#26#27'%'
+  ,#255#19#22'?'#255#13#17'X'#255#11#14'^'#255#10#12'['#255#9#10'X'#255#9#9'V'
+  +#255#9#9'L'#255#11#11'1'#255#12#12#22#255#11#11#11#255#10#10#10#255#8#8#8#255
+  +#6#6#6#255#5#5#5#255#3#3#3#255#1#1#1#255#0#0#0#255#0#0#0#223#0#0#0'?'#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000o...'#255'---'#255'+'
+  +'++'#255')))'#255'((('#255'&&&'#255'$$$'#255'###'#255'!!!'#255#31#31#31#255
+  +#28#29''''#255#14#20'f'#255#0#9#173#255#0#7#169#255#0#5#165#255#0#3#161#255#0
+  +#1#156#255#0#0#154#255#0#0#154#255#0#0#154#255#2#2''#255#6#6'I'#255#8#8#27
+  +#255#8#8#8#255#6#6#6#255#5#5#5#255#3#3#3#255#1#1#1#255#0#0#0#255#0#0#0#255#0
+  +#0#0'_'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'333'#159'222'#255'000'#255
+  +'...'#255'---'#255'+++'#255')))'#255'((('#255'&&&'#255'$$$'#255'###'#255'!!!'
+  +#255#31#31#31#255#22#26'C'#255#0#11#177#255#0#9#173#255#0#7#169#255#0#5#165
+  +#255#0#3#161#255#0#1#156#255#0#0#154#255#0#0#154#255#0#0#154#255#0#0#154#255
+  +#0#0#154#255#3#3'c'#255#7#7#26#255#6#6#6#255#5#5#5#255#3#3#3#255#1#1#1#255#0
+  +#0#0#255#0#0#0#255#0#0#0#159#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'777'#159'555'#255'3'
+  +'33'#255'222'#255'000'#255'...'#255'---'#255'+++'#255')))'#255'((('#255'&&&'
+  +#255'$$$'#255'###'#255'!!!'#255#20#25'Y'#255#0#13#181#255#0#11#177#255#0#9
+  +#173#255#0#7#169#255#0#5#165#255#0#3#161#255#0#1#156#255#0#0#154#255#0#0#154
+  +#255#0#0#154#255#0#0#154#255#0#0#154#255#0#0#154#255#3#3'Z'#255#6#6#15#255#5
+  +#5#5#255#3#3#3#255#1#1#1#255#0#0#0#255#0#0#0#255#0#0#0#159#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0':::o8'
+  +'88'#255'777'#255'555'#255'333'#255'222'#255'000'#255'...'#255'---'#255'+++'
+  +#255')))'#255'((('#255'&&&'#255'$$$'#255'###'#255#16#25'o'#255#0#16#185#255#0
+  +#13#181#255#0#11#177#255#0#9#173#255#0#7#169#255#0#5#165#255#0#3#161#255#0#1
+  +#156#255#0#0#154#255#0#0#154#255#0#0#154#255#0#0#154#255#0#0#154#255#0#0#154
+  +#255#1#1'~'#255#5#5'"'#255#5#5#5#255#3#3#3#255#1#1#1#255#0#0#0#255#0#0#0#255
+  +#0#0#0'_'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0'===?;;;'#255':::'#255'888'#255'777'#255'555'#255'333'#255'222'#255'000'
+  +#255'...'#255'---'#255'+++'#255')))'#255'((('#255'&&&'#255'$$$'#255#24#30'T'
+  +#255#0#18#190#255#0#16#185#255#0#13#181#255#0#11#177#255#0#9#173#255#0#7#169
+  +#255#0#5#165#255#0#3#161#255#0#1#156#255#0#0#154#255#0#0#154#255#0#0#154#255
+  +#0#0#154#255#0#0#154#255#0#0#154#255#0#0#144#255#5#5'"'#255#5#5#5#255#3#3#3
+  +#255#1#1#1#255#0#0#0#255#0#0#0#255#0#0#0'?'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0'AAA'#15'???'#239'==='#255';;;'#255':::'#255'888'#255
+  +'777'#255'555'#255'333'#255'222'#255'000'#255'...'#255'---'#255'+++'#255')))'
+  +#255'((('#255'&&&'#255'$$$'#255#22#29'^'#255#0#18#190#255#4#18#166#255#9#18
+  +#133#255#14#20'f'#255#1#10#163#255#0#7#169#255#0#5#165#255#0#3#161#255#0#1
+  +#156#255#0#0#154#255#0#0#154#255#0#0#154#255#0#0#154#255#0#0#154#255#0#0#154
+  +#255#0#0#144#255#5#5'"'#255#5#5#5#255#3#3#3#255#1#1#1#255#0#0#0#255#0#0#0#223
+  +#0#0#0#15#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'BBB'#159'@@@'#255
+  +'???'#255'==='#255';;;'#255':::'#255'888'#255'777'#255'555'#255'333'#255'222'
+  +#255'000'#255'...'#255'---'#255'+++'#255')))'#255'((('#255'&&&'#255'$$$'#255
+  +'###'#255'!!!'#255#31#31#31#255#30#30#30#255#14#20'f'#255#0#9#173#255#0#7#169
+  +#255#0#5#165#255#0#3#161#255#0#1#156#255#0#0#154#255#0#0#154#255#0#0#154#255
+  +#0#0#154#255#0#0#154#255#0#0#154#255#0#0#144#255#5#5'"'#255#5#5#5#255#3#3#3
+  +#255#1#1#1#255#0#0#0#255#0#0#0#143#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'E'
+  +'EE/DDD'#255'BBB'#255'@@@'#255'???'#255'==='#255';;;'#255':::'#255'888'#255
+  +'777'#255'555'#255'333'#255'222'#255'000'#255'...'#255'---'#255'+++'#255')))'
+  +#255'((('#255'&&&'#255'$$$'#255'###'#255'!!!'#255#31#31#31#255#28#29''''#255
+  +#1#12#167#255#0#9#173#255#0#7#169#255#0#5#165#255#0#3#161#255#0#1#156#255#0#0
+  +#154#255#0#0#154#255#0#0#154#255#0#0#154#255#0#0#154#255#0#0#154#255#1#1'~'
+  +#255#6#6#15#255#5#5#5#255#3#3#3#255#1#1#1#255#0#0#0#255#0#0#0#31#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0'GGG'#191'EEE'#255'DDD'#255'BBB'#255'@@@'#255'???'#255'='
+  +'=='#255';;;'#255':::'#255'888'#255'777'#255'555'#255'333'#255'222'#255'000'
+  +#255'...'#255'---'#255'+++'#255')))'#255'((('#255'&&&'#255'$$$'#255'###'#255
+  +'!!!'#255#25#28'<'#255#1#14#171#255#0#11#177#255#0#9#173#255#0#7#169#255#0#5
+  +#165#255#0#3#161#255#0#1#156#255#0#0#154#255#0#0#154#255#0#0#154#255#0#0#154
+  +#255#0#0#154#255#0#0#154#255#3#3'Z'#255#6#6#6#255#5#5#5#255#3#3#3#255#1#1#1
+  +#255#0#0#0#159#0#0#0#0#0#0#0#0#0#0#0#0'JJJ'#31'III'#255'GGG'#255'EEE'#255'DD'
+  +'D'#255'BBB'#255'@@@'#255'???'#255'==='#255';;;'#255':::'#255'888'#255'777'
+  +#255'555'#255'333'#255'222'#255'000'#255'...'#255'---'#255'+++'#255')))'#255
+  +'((('#255'&&&'#255'$$$'#255#28' @'#255#2#19#180#255#0#16#185#255#0#13#181#255
+  ,#0#11#177#255#0#9#173#255#0#7#169#255#0#5#165#255#0#3#161#255#0#1#156#255#0#0
+  +#154#255#0#0#154#255#0#0#154#255#0#0#154#255#0#0#154#255#0#0#154#255#7#7#26
+  +#255#6#6#6#255#5#5#5#255#3#3#3#255#1#1#1#255#1#1#1#31#0#0#0#0#0#0#0#0'LLL'
+  +#143'JJJ'#255'III'#255'GGG'#255'EEE'#255'DDD'#255'BBB'#255'@@@'#255'???'#255
+  +'2<a'#255#23'7'#181#255#14'3'#203#255#17'2'#188#255'"3~'#255'555'#255'333'
+  +#255'222'#255'000'#255'...'#255'---'#255'+++'#255')))'#255'((('#255'!$:'#255
+  +#2#23#187#255#0#20#194#255#0#18#190#255#0#16#185#255#0#13#181#255#0#11#177
+  +#255#0#9#173#255#0#7#169#255#0#5#165#255#0#3#161#255#0#1#156#255#0#0#154#255
+  +#0#0#154#255#0#0#154#255#0#0#154#255#0#0#154#255#3#3'c'#255#8#8#8#255#6#6#6
+  +#255#5#5#5#255#3#3#3#255#2#2#2#143#0#0#0#0#0#0#0#0'NNN'#223'LLL'#255'JJJ'#255
+  +'III'#255'GGG'#255'EEE'#255'DDD'#255'BBB'#255',?'#136#255#7'9'#255#255#4'6'
+  +#255#255#1'4'#254#255#0'1'#252#255#0'/'#248#255#20'1'#173#255'555'#255'333'
+  +#255'222'#255'000'#255'...'#255'---'#255'+++'#255')))'#255'%''2'#255#0#24#202
+  +#255#0#22#198#255#0#20#194#255#0#18#190#255#0#16#185#255#0#13#181#255#0#11
+  +#177#255#0#9#173#255#0#7#169#255#0#5#165#255#0#3#161#255#0#1#156#255#0#0#154
+  +#255#0#0#154#255#0#0#154#255#0#0#154#255#0#0#154#255#8#8#27#255#8#8#8#255#6#6
+  +#6#255#5#5#5#255#3#3#3#223#0#0#0#0'QQQ/OOO'#255'NNN'#255'LLL'#255'JJJ'#255'I'
+  +'II'#255'GGG'#255'EEE'#255'@DO'#255#16'?'#243#255#10'<'#255#255#7'9'#255#255
+  +#4'6'#255#255#1'4'#254#255#0'1'#252#255#0'/'#248#255'"3~'#255'555'#255'333'
+  +#255'222'#255'000'#255'...'#255'---'#255'+++'#255')))'#255#5#28#185#255#0#24
+  +#202#255#0#22#198#255#0#20#194#255#0#18#190#255#0#16#185#255#0#13#181#255#0
+  +#11#177#255#0#9#173#255#0#7#169#255#0#5#165#255#0#3#161#255#0#1#156#255#0#0
+  +#154#255#0#0#154#255#0#0#154#255#0#0#154#255#5#5'R'#255#10#10#10#255#8#8#8
+  +#255#6#6#6#255#5#5#5#255#4#4#4'/RRRoQQQ'#255'OOO'#255'NNN'#255'LLL'#255'JJJ'
+  +#255'III'#255'GGG'#255'9Et'#255#16'B'#255#255#13'?'#255#255#10'<'#255#255#7
+  +'9'#255#255#4'6'#255#255#1'4'#254#255#0'1'#252#255#17'2'#188#255'777'#255'55'
+  +'5'#255'333'#255'222'#255'000'#255'...'#255'---'#255'+++'#255#23'#s'#255#2#27
+  +#195#255#0#24#202#255#0#22#198#255#0#20#194#255#0#18#190#255#0#16#185#255#0
+  +#13#181#255#0#11#177#255#0#9#173#255#0#7#169#255#0#5#165#255#5#7'~'#255#10#10
+  +'X'#255#5#5'o'#255#0#0#154#255#0#0#154#255#2#2''#255#11#11#11#255#10#10#10
+  +#255#8#8#8#255#6#6#6#255#5#5#5'oTTT'#175'SSS'#255'QQQ'#255'OOO'#255'NNN'#255
+  +'LLL'#255'JJJ'#255'III'#255';Gu'#255#19'E'#255#255#16'B'#255#255#13'?'#255
+  +#255#10'<'#255#255#7'9'#255#255#4'6'#255#255#1'4'#254#255#14'3'#203#255'888'
+  +#255'777'#255'555'#255'333'#255'222'#255'000'#255'...'#255'---'#255'+++'#255
+  +')))'#255#25'#f'#255#4#26#181#255#0#22#198#255#0#20#194#255#0#18#190#255#6#19
+  +#156#255#0#13#181#255#0#11#177#255#0#9#173#255#0#7#169#255#20#21')'#255#21#21
+  +#21#255#20#20#20#255#0#0#154#255#0#0#154#255#0#0#154#255#12#12#22#255#11#11
+  +#11#255#10#10#10#255#8#8#8#255#7#7#7#159'VVV'#207'TTT'#255'SSS'#255'QQQ'#255
+  +'OOO'#255'NNN'#255'LLL'#255'JJJ'#255'@Ik'#255#22'G'#255#255#19'E'#255#255#16
+  +'B'#255#255#13'?'#255#255#10'<'#255#255#7'9'#255#255#4'6'#255#255#26'7'#169
+  +#255':::'#255'888'#255'777'#255'555'#255'333'#255'222'#255'000'#255'...'#255
+  +'---'#255'+++'#255')))'#255#20'!z'#255#0#24#202#255#6#24#167#255#28' @'#255
+  +'!!!'#255#12#21''#255#0#13#181#255#0#11#177#255#6#14#136#255#25#25#25#255#23
+  +#23#23#255#21#21#21#255#5#5'z'#255#0#0#154#255#0#0#154#255#11#11'1'#255#13#13
+  +#13#255#11#11#11#255#10#10#10#255#8#8#8#191'XXX'#255'VVV'#255'TTT'#255'SSS'
+  +#255'QQQ'#255'OOO'#255'NNN'#255'LLL'#255'JJJ'#255'%J'#209#255#22'G'#255#255
+  +#19'E'#255#255#16'B'#255#255#13'?'#255#255#10'<'#255#255#10'9'#243#255'6<U'
+  +#255';;;'#255':::'#255'888'#255'777'#255'555'#255'333'#255'222'#255'000'#255
+  +'...'#255'---'#255'+++'#255#18'"'#136#255#0#26#206#255#14#29#141#255'$$$'#255
+  +'###'#255'!!!'#255#18#24'b'#255#20#25'M'#255#24#26'.'#255#26#26#26#255#25#25
+  +#25#255#23#23#23#255#12#13'R'#255#1#2#148#255#0#0#154#255#11#11';'#255#15#15
+  +#15#255#13#13#13#255#11#11#11#255#10#10#10#255'YYY'#255'XXX'#255'VVV'#255'TT'
+  +'T'#255'SSS'#255'QQQ'#255'OOO'#255'NNN'#255'LLL'#255'GJV'#255'%J'#209#255#22
+  +'G'#255#255#19'E'#255#255#16'B'#255#255#16'?'#243#255'3?p'#255'???'#255'==='
+  +#255';;;'#255':::'#255'888'#255'777'#255'555'#255'333'#255'222'#255'000'#255
+  +'...'#255'---'#255#11'!'#171#255#0#28#210#255#4#28#185#255'&&&'#255'$$$'#255
+  +'###'#255'!!!'#255#31#31#31#255#30#30#30#255#28#28#28#255#26#26#26#255#25#25
+  +#25#255#23#23#23#255#21#21#21#255#17#17'%'#255#18#18#18#255#16#16#16#255#15
+  +#15#15#255#13#13#13#255#11#11#11#255'[[['#255'YYY'#255'XXX'#255'VVV'#255'TTT'
+  +#255'SSS'#255'QQQ'#255'OOO'#255'NNN'#255'LLL'#255'JJJ'#255'@Ik'#255';Gu'#255
+  +'9Et'#255'DDD'#255'BBB'#255'@@@'#255'???'#255'==='#255';;;'#255':::'#255'888'
+  +#255'777'#255'555'#255'#0m'#255#21','#152#255#11''''#182#255#2'#'#212#255#0
+  +' '#219#255#0#30#215#255#0#28#210#255'%''2'#255'&&&'#255'$$$'#255'###'#255'!'
+  +'!!'#255#31#31#31#255#30#30#30#255#28#28#28#255#26#26#26#255#25#25#25#255#23
+  ,#23#23#255#21#21#21#255#20#20#20#255#18#18#18#255#16#16#16#255#15#15#15#255
+  +#13#13#13#255']]]'#255'[[['#255'YYY'#255'XXX'#255'VVV'#255'TTT'#255'SSS'#255
+  +'QQQ'#255'OOO'#255'NNN'#255'LLL'#255'JJJ'#255'III'#255'GGG'#255'EEE'#255'DDD'
+  +#255'BBB'#255'@@@'#255'???'#255'==='#255';;;'#255':::'#255'888'#255'777'#255
+  +#6','#216#255#0')'#235#255#0''''#231#255#12''''#182#255#6'$'#200#255#0' '#219
+  +#255#27'&k'#255')))'#255'((('#255'&&&'#255'$$$'#255'###'#255'!!!'#255#31#31
+  +#31#255#30#30#30#255#28#28#28#255#26#26#26#255#25#25#25#255#23#23#23#255#21
+  +#21#21#255#20#20#20#255#18#18#18#255#16#16#16#255#15#15#15#255'^^^'#255']]]'
+  +#255'[[['#255'YYY'#255'XXX'#255'VVV'#255'TTT'#255'SSS'#255'QQQ'#255'OOO'#255
+  +'NNN'#255'LLL'#255'JJJ'#255'III'#255'GGG'#255'EEE'#255'DDD'#255'BBB'#255'@@@'
+  +#255'???'#255'==='#255';;;'#255':::'#255' 4'#140#255#0'-'#244#255#0'+'#239
+  +#255#16','#178#255'222'#255'000'#255'...'#255'---'#255'+++'#255')))'#255'((('
+  +#255'&&&'#255'$$$'#255'###'#255'!!!'#255#31#31#31#255#30#30#30#255#28#28#28
+  +#255#26#26#26#255#25#25#25#255#23#23#23#255#21#21#21#255#20#20#20#255#18#18
+  +#18#255#16#16#16#255'```'#255'^^^'#255']]]'#255'[[['#255'YYY'#255'XXX'#255'V'
+  +'VV'#255'TTT'#255'SSS'#255'QQQ'#255'OOO'#255'NNN'#255'LLL'#255'JJJ'#255'III'
+  +#255'GGG'#255'EEE'#255'DDD'#255'BBB'#255'@@@'#255'???'#255'==='#255';;;'#255
+  +',8j'#255#0'/'#248#255#0'-'#244#255'$2p'#255'333'#255'222'#255'000'#255'...'
+  +#255'---'#255'+++'#255')))'#255'((('#255'&&&'#255'$$$'#255'###'#255'!!!'#255
+  +#31#31#31#255#30#30#30#255#28#28#28#255#26#26#26#255#25#25#25#255#23#23#23
+  +#255#21#21#21#255#20#20#20#255#18#18#18#255'bbb'#207'```'#255'^^^'#255']]]'
+  +#255'[[['#255'YYY'#255'XXX'#255'VVV'#255'TTT'#255'SSS'#255'QQQ'#255'OOO'#255
+  +'NNN'#255'LLL'#255'JJJ'#255'III'#255'GGG'#255'EEE'#255'DDD'#255'BBB'#255'@@@'
+  +#255'???'#255'==='#255';;;'#255#18'4'#191#255#0'/'#248#255#10'/'#208#255'.4M'
+  +#255'333'#255'222'#255'000'#255'...'#255'---'#255'+++'#255')))'#255'%''2'#255
+  +#21' n'#255#18#29'u'#255#19#28'i'#255#31' +'#255#31#31#31#255#30#30#30#255#28
+  +#28#28#255#26#26#26#255#25#25#25#255#23#23#23#255#21#21#21#255#20#20#20#191
+  +'ccc'#175'bbb'#255'```'#255'^^^'#255']]]'#255'[[['#255'YYY'#255'XXX'#255'VVV'
+  +#255'TTT'#255'SSS'#255'QQQ'#255'OOO'#255'NNN'#255'LLL'#255'JJJ'#255'III'#255
+  +'GGG'#255'EEE'#255'DDD'#255'BBB'#255'@@@'#255'???'#255'==='#255'4:T'#255#0'1'
+  +#252#255#0'/'#248#255#3'-'#232#255'.4M'#255'333'#255'222'#255'000'#255'...'
+  +#255'---'#255'+++'#255#7#30#178#255#0#26#206#255#0#24#202#255#0#22#198#255#2
+  +#21#184#255#31' +'#255#31#31#31#255#30#30#30#255#28#28#28#255#26#26#26#255#25
+  +#25#25#255#23#23#23#255#22#22#22#175'eeeoccc'#255'bbb'#255'```'#255'^^^'#255
+  +']]]'#255'[[['#255'YYY'#255'XXX'#255'VVV'#255'TTT'#255'SSS'#255'QQQ'#255'OOO'
+  +#255'NNN'#255'LLL'#255'JJJ'#255'III'#255'GGG'#255'<Eh'#255'ADO'#255'BBB'#255
+  +'@@@'#255'???'#255'2<a'#255#1'4'#254#255#0'1'#252#255#0'/'#248#255')4f'#255
+  +'555'#255'333'#255'222'#255'000'#255'...'#255#28'(n'#255#0#30#215#255#0#28
+  +#210#255#0#26#206#255#0#24#202#255#0#22#198#255#15#26'|'#255'!!!'#255#31#31
+  +#31#255#30#30#30#255#28#28#28#255#26#26#26#255#25#25#25#255#23#23#23'offf/ee'
+  +'e'#255'ccc'#255'bbb'#255'```'#255'^^^'#255']]]'#255'[[['#255'YYY'#255'XXX'
+  +#255'VVV'#255'TTT'#255'SSS'#255'QQQ'#255'OOO'#255'NNN'#255'LLL'#255'EKa'#255
+  +'(J'#198#255#22'G'#255#255#22'E'#243#255'-C'#149#255'BBB'#255'6@d'#255#10'9'
+  +#243#255#4'6'#255#255#1'4'#254#255#3'2'#239#255'.7\'#255'777'#255'555'#255'3'
+  +'33'#255'222'#255'000'#255#23'('#134#255#0' '#219#255#0#30#215#255#0#28#210
+  +#255#0#26#206#255#0#24#202#255#9#25#157#255'###'#255'!!!'#255#31#31#31#255#30
+  +#30#30#255#28#28#28#255#26#26#26#255#25#25#25'/'#0#0#0#0'ggg'#223'eee'#255'c'
+  +'cc'#255'bbb'#255'```'#255'^^^'#255']]]'#255'[[['#255'S\x'#255'F^'#171#255'M'
+  +'Y'#128#255'RU_'#255'SSS'#255'QQQ'#255'OOO'#255'NNN'#255'5N'#165#255#28'M'
+  +#255#255#25'J'#255#255#22'G'#255#255#19'E'#255#255#22'B'#231#255#16'?'#243
+  +#255#10'<'#255#255#7'9'#255#255' :'#158#255'8;H'#255':::'#255'888'#255'777'
+  +#255'555'#255'333'#255'222'#255#30'+s'#255#0'"'#223#255#0' '#219#255#0#30#215
+  +#255#0#28#210#255#0#26#206#255#16#30#130#255'$$$'#255'###'#255'!!!'#255#31#31
+  +#31#255#30#30#30#255#28#28#28#223#0#0#0#0#0#0#0#0'hhh'#143'ggg'#255'eee'#255
+  +'ccc'#255'bbb'#255'```'#255'^^^'#255'W`{'#255'=i'#244#255'8g'#255#255'5d'#255
+  +#255'@]'#191#255'TTT'#255'SSS'#255'QQQ'#255'OOO'#255'2Q'#188#255#31'P'#255
+  +#255#28'M'#255#255#25'J'#255#255#22'G'#255#255#19'E'#255#255#16'B'#255#255#13
+  +'?'#255#255#23'='#207#255'???'#255'==='#255';;;'#255':::'#255'888'#255'777'
+  +#255'555'#255'333'#255'222'#255#9'&'#193#255#0'"'#223#255#0' '#219#255#0#30
+  +#215#255#2#29#200#255'%''2'#255'&&&'#255'$$$'#255'###'#255'!!!'#255#31#31#31
+  +#255#30#30#30#143#0#0#0#0#0#0#0#0'iii'#31'hhh'#255'ggg'#255'eee'#255'ccc'#255
+  +'bbb'#255'^aj'#255'Co'#245#255'>m'#255#255';j'#255#255'8g'#255#255'5d'#255
+  +#255'RXk'#255'TTT'#255'SSS'#255'QQQ'#255'0T'#211#255'"S'#255#255#31'P'#255
+  +#255#28'M'#255#255#25'J'#255#255#22'G'#255#255#19'E'#255#255#16'B'#255#255#13
+  ,'?'#255#255'@@@'#255'???'#255'==='#255';;;'#255':::'#255'888'#255'777'#255'5'
+  +'55'#255'333'#255'/1='#255#27'+~'#255#23'('#134#255#25'''y'#255'(*6'#255')))'
+  +#255'((('#255'&&&'#255'$$$'#255'###'#255'!!!'#255'   '#31#0#0#0#0#0#0#0#0#0#0
+  +#0#0'jjj'#191'hhh'#255'ggg'#255'eee'#255'ccc'#255'Vj'#167#255'Ds'#255#255'Ap'
+  +#255#255'>m'#255#255';j'#255#255'8g'#255#255'B`'#192#255'VVV'#255'RU_'#255'G'
+  +'V'#136#255'.X'#233#255'%V'#255#255'"S'#255#255#31'P'#255#255#28'M'#255#255
+  +#25'J'#255#255#22'G'#255#255#19'E'#255#255#16'B'#255#255#23'@'#219#255'">'
+  +#171#255'#<'#158#255'6<U'#255';;;'#255':::'#255'888'#255'777'#255'555'#255'3'
+  +'33'#255'222'#255'000'#255'...'#255'---'#255'+++'#255')))'#255'((('#255'&&&'
+  +#255'$$$'#255'###'#175#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'kkk?jjj'#255'hhh'#255
+  +'ggg'#255'eee'#255'bem'#255'Lr'#225#255'Ds'#255#255'Ap'#255#255'>m'#255#255
+  +';j'#255#255'8g'#255#255'5d'#255#255'2a'#255#255'/_'#255#255',\'#255#255')Y'
+  +#255#255'%V'#255#255'"S'#255#255#31'P'#255#255#28'M'#255#255#25'J'#255#255#22
+  +'G'#255#255#19'E'#255#255#16'B'#255#255#13'?'#255#255#10'<'#255#255#24';'#194
+  +#255'==='#255';;;'#255':::'#255'888'#255'777'#255'555'#255'333'#255'222'#255
+  +'000'#255'...'#255'---'#255'+++'#255')))'#255'((('#255'&&&'#255'$$$/'#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'kkk'#159'jjj'#255'hhh'#255'ggg'#255'eee'#255
+  +'^g'#129#255'It'#245#255'Ds'#255#255'Ap'#255#255'>m'#255#255';j'#255#255'8g'
+  +#255#255'5d'#255#255'2a'#255#255'/_'#255#255',\'#255#255')Y'#255#255'%V'#255
+  +#255'"S'#255#255#31'P'#255#255#28'M'#255#255#25'J'#255#255#22'G'#255#255#19
+  +'E'#255#255#16'B'#255#255#13'?'#255#255#16'='#231#255'???'#255'==='#255';;;'
+  +#255':::'#255'888'#255'777'#255'555'#255'333'#255'222'#255'000'#255'...'#255
+  +'---'#255'+++'#255')))'#255'((('#159#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0'kkk'#15'kkk'#239'jjj'#255'hhh'#255'ggg'#255'eee'#255'^g'#129#255'Gv'
+  +#255#255'Ds'#255#255'Ap'#255#255'>m'#255#255';j'#255#255'8g'#255#255'5d'#255
+  +#255'2a'#255#255'/_'#255#255',\'#255#255')Y'#255#255'%V'#255#255'"S'#255#255
+  +#31'P'#255#255#28'M'#255#255#25'J'#255#255#22'G'#255#255#19'E'#255#255#16'B'
+  +#255#255'.A'#137#255'@@@'#255'???'#255'==='#255';;;'#255':::'#255'888'#255'7'
+  +'77'#255'555'#255'333'#255'222'#255'000'#255'...'#255'---'#255'+++'#239'***'
+  +#15#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'kkk?kkk'#255'jjj'
+  +#255'hhh'#255'ggg'#255'eee'#255']h'#138#255'It'#245#255'Ds'#255#255'Ap'#255
+  +#255'>m'#255#255';j'#255#255'8g'#255#255'5d'#255#255'2a'#255#255'/_'#255#255
+  +',\'#255#255')Y'#255#255'%V'#255#255'"S'#255#255#31'P'#255#255#28'M'#255#255
+  +#25'J'#255#255#22'G'#255#255#22'E'#243#255'DDD'#255'BBB'#255'@@@'#255';>K'
+  +#255'6<U'#255';;;'#255':::'#255'888'#255'777'#255'555'#255'333'#255'222'#255
+  +'000'#255'...'#255'---?'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0'kkkkkk'#255'jjj'#255'hhh'#255'ggg'#255'eee'#255'^g'#129
+  +#255'Ks'#235#255'Ds'#255#255'Ap'#255#255'>m'#255#255';j'#255#255'8g'#255#255
+  +'5d'#255#255'2a'#255#255'/_'#255#255',\'#255#255')Y'#255#255'%V'#255#255'"S'
+  +#255#255#31'P'#255#255#28'M'#255#255#25'J'#255#255#22'G'#255#255'&E'#185#255
+  +'ADO'#255'.A'#137#255#13'<'#243#255#7'9'#255#255'!:'#157#255';;;'#255':::'
+  +#255'888'#255'777'#255'555'#255'333'#255'222'#255'000o'#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'kkk'#159
+  +'kkk'#255'jjj'#255'hhh'#255'ggg'#255'eee'#255'bem'#255'Sm'#186#255'Ds'#255
+  +#255'Ap'#255#255'>m'#255#255';j'#255#255'8g'#255#255'5d'#255#255'2a'#255#255
+  +'/_'#255#255',\'#255#255')Y'#255#255'%V'#255#255'"S'#255#255#31'P'#255#255#28
+  +'M'#255#255#25'J'#255#255#22'G'#255#255#22'E'#243#255#16'B'#255#255#13'?'#255
+  +#255#10'<'#255#255'#<'#159#255'==='#255';;;'#255':::'#255'888'#255'777'#255
+  +'555'#255'333'#159#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'kkk'#159'kkk'#255'jjj'#255'hh'
+  +'h'#255'ggg'#255'eee'#255'ccc'#255']e'#255'Mm'#205#255'Ap'#255#255'>m'#255
+  +#255';j'#255#255'8g'#255#255'5d'#255#255'2a'#255#255'/_'#255#255',\'#255#255
+  +')Y'#255#255'%V'#255#255'"S'#255#255#31'P'#255#255#28'M'#255#255#25'J'#255
+  +#255#22'G'#255#255#19'E'#255#255' B'#196#255'8Ae'#255'@@@'#255'???'#255'==='
+  +#255';;;'#255':::'#255'888'#255'777'#159#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0'kkkkkk'#255'jjj'#255'hhh'#255'ggg'#255'eee'#255'ccc'#255'bbb'#255
+  +']bt'#255'Nh'#185#255'Dj'#224#255';j'#255#255'8g'#255#255'5d'#255#255'2a'#255
+  +#255'/_'#255#255',\'#255#255')Y'#255#255'%V'#255#255'"S'#255#255#31'P'#255
+  +#255'%M'#221#255'.J'#175#255'AG^'#255'EEE'#255'DDD'#255'BBB'#255'@@@'#255'??'
+  +'?'#255'==='#255';;;'#255':::o'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0'kkkOkkk'#239'jjj'#255'hhh'#255'ggg'#255'eee'#255'ccc'#255'bbb'
+  +#255'```'#255'^^^'#255'[^g'#255'S_'#132#255'H`'#172#255'F^'#171#255'D\'#171
+  ,#255'AY'#170#255'?W'#169#255'=U'#168#255'EQ{'#255'KNY'#255'LLL'#255'JJJ'#255
+  +'III'#255'GGG'#255'EEE'#255'DDD'#255'BBB'#255'@@@'#255'???'#239'===?'#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'kkk'#15
+  +'kkk'#159'jjj'#255'hhh'#255'ggg'#255'eee'#255'ccc'#255'bbb'#255'```'#255'^^^'
+  +#255']]]'#255'[[['#255'YYY'#255'XXX'#255'VVV'#255'TTT'#255'SSS'#255'QQQ'#255
+  +'OOO'#255'NNN'#255'LLL'#255'JJJ'#255'III'#255'GGG'#255'EEE'#255'DDD'#255'BBB'
+  +#159'AAA'#15#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'kkk?jjj'#191'hhh'#255'ggg'#255'eee'#255
+  +'ccc'#255'bbb'#255'```'#255'^^^'#255']]]'#255'[[['#255'YYY'#255'XXX'#255'VVV'
+  +#255'TTT'#255'SSS'#255'QQQ'#255'OOO'#255'NNN'#255'LLL'#255'JJJ'#255'III'#255
+  +'GGG'#191'EEE?'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'iii'
+  +#31'hhh'#143'ggg'#239'eee'#255'ccc'#255'bbb'#255'```'#255'^^^'#255']]]'#255
+  +'[[['#255'YYY'#255'XXX'#255'VVV'#255'TTT'#255'SSS'#255'QQQ'#255'OOO'#255'NNN'
+  +#223'LLL'#143'JJJ'#31#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'fff/eeeccc'#175'bbb'#207'```'#255
+  +'^^^'#255']]]'#255'[[['#255'YYY'#255'XXX'#255'VVV'#207'TTT'#175'RRRQQQ/'#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#255#255#128#1#255
+  +#255#0#0#255#252#0#0'?'#255#0#0#255#240#0#0#15#255#0#0#255#192#0#0#3#255#0#0
+  +#255#128#0#0#1#255#0#0#255#0#0#0#0#255#0#0#254#0#0#0#0''#0#0#252#0#0#0#0'?'
+  +#0#0#248#0#0#0#0#31#0#0#240#0#0#0#0#15#0#0#224#0#0#0#0#7#0#0#224#0#0#0#0#7#0
+  +#0#192#0#0#0#0#3#0#0#192#0#0#0#0#3#0#0#128#0#0#0#0#1#0#0#128#0#0#0#0#1#0#0
+  +#128#0#0#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#128#0#0#0#0#1#0#0#128#0#0#0#0#1#0#0#128#0#0#0#0#1#0#0#192#0#0
+  +#0#0#3#0#0#192#0#0#0#0#3#0#0#224#0#0#0#0#7#0#0#224#0#0#0#0#7#0#0#240#0#0#0#0
+  +#15#0#0#248#0#0#0#0#31#0#0#252#0#0#0#0'?'#0#0#254#0#0#0#0''#0#0#255#0#0#0#0
+  +#255#0#0#255#128#0#0#1#255#0#0#255#192#0#0#3#255#0#0#255#240#0#0#15#255#0#0
+  +#255#252#0#0'?'#255#0#0#255#255#128#1#255#255#0#0'('#0#0#0' '#0#0#0'@'#0#0#0
+  +#1#0' '#0#0#0#0#0#128#16#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#28#28#28#31
+  +#26#26#26'o'#23#23#23#191#21#21#21#239#18#18#18#255#16#16#16#255#13#13#13#255
+  +#11#11#11#255#8#8#8#223#6#6#6#175#4#4#4'o'#3#3#3#31#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'$$$?!!!'#191#31#31#31#255#28#28#28
+  +#255#26#26#26#255#23#23#23#255#21#21#21#255#18#18#18#255#16#16#16#255#13#13
+  +#13#255#11#11#11#255#8#8#8#255#6#6#6#255#3#3#3#255#1#1#1#191#0#0#0'?'#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0'+++'#15')))'#175'&&&'#255'$$$'#255'!!!'#255#31
+  +#31#31#255#28#28#28#255#26#26#26#255#23#23#23#255#21#21#21#255#18#18#18#255
+  +#16#16#16#255#13#13#13#255#11#11#11#255#8#8#8#255#6#6#6#255#3#3#3#255#1#1#1
+  +#255#0#0#0#175#0#0#0#15#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'000?...'#239'+++'#255')))'#255'&&&'#255'$'
+  +'$$'#255'!!!'#255#31#31#31#255#16#21']'#255#0#9#171#255#0#5#165#255#0#2#159
+  +#255#0#0#154#255#1#1#136#255#4#4'e'#255#7#7'7'#255#8#8#8#255#6#6#6#255#3#3#3
+  +#255#1#1#1#255#0#0#0#239#0#0#0'/'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0'555_333'#255'000'#255'...'#255'+++'#255')))'#255
+  +'&&&'#255'$$$'#255'!!!'#255#23#27'E'#255#0#12#177#255#0#9#171#255#0#5#165#255
+  +#0#2#159#255#0#0#154#255#0#0#154#255#0#0#154#255#1#1#135#255#5#5'>'#255#6#6#6
+  +#255#3#3#3#255#1#1#1#255#0#0#0#255#0#0#0'_'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0':::?888'#255'555'#255'333'#255'000'#255'...'#255'+++'
+  +#255')))'#255'&&&'#255'$$$'#255#21#27'\'#255#0#15#184#255#0#12#177#255#0#9
+  +#171#255#0#5#165#255#0#2#159#255#0#0#154#255#0#0#154#255#0#0#154#255#0#0#154
+  +#255#1#1'u'#255#5#5#15#255#3#3#3#255#1#1#1#255#0#0#0#255#0#0#0'/'#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0'???'#31'<<<'#239':::'#255'888'#255'555'#255'333'
+  +#255'000'#255'...'#255'+++'#255')))'#255'&&&'#255#29'!A'#255#2#19#180#255#0
+  +#15#184#255#0#12#177#255#0#9#171#255#0#5#165#255#0#2#159#255#0#0#154#255#0#0
+  ,#154#255#0#0#154#255#0#0#154#255#0#0#144#255#4#4'!'#255#3#3#3#255#1#1#1#255#0
+  +#0#0#239#0#0#0#15#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'AAA'#191'???'#255'<<<'#255
+  +':::'#255'888'#255'555'#255'333'#255'000'#255'...'#255'+++'#255')))'#255'&&&'
+  +#255#29'!A'#255#21#27'\'#255#27#29'2'#255#14#20'f'#255#0#9#171#255#0#5#165
+  +#255#0#2#159#255#0#0#154#255#0#0#154#255#0#0#154#255#0#0#154#255#0#0#144#255
+  +#5#5#15#255#3#3#3#255#1#1#1#255#0#0#0#175#0#0#0#0#0#0#0#0#0#0#0#0'FFF?DDD'
+  +#255'AAA'#255'???'#255'<<<'#255':::'#255'888'#255'555'#255'333'#255'000'#255
+  +'...'#255'+++'#255')))'#255'&&&'#255'$$$'#255'!!!'#255#29#30'('#255#0#12#177
+  +#255#0#9#171#255#0#5#165#255#0#2#159#255#0#0#154#255#0#0#154#255#0#0#154#255
+  +#0#0#154#255#1#1'u'#255#6#6#6#255#3#3#3#255#1#1#1#255#0#0#0'?'#0#0#0#0#0#0#0
+  +#0'III'#191'FFF'#255'DDD'#255'AAA'#255'???'#255'<<<'#255':::'#255'888'#255'5'
+  +'55'#255'333'#255'000'#255'...'#255'+++'#255')))'#255'&&&'#255'$$$'#255#12#24
+  +#131#255#0#15#184#255#0#12#177#255#0#9#171#255#0#5#165#255#0#2#159#255#0#0
+  +#154#255#0#0#154#255#0#0#154#255#0#0#154#255#5#5'>'#255#6#6#6#255#3#3#3#255#1
+  +#1#1#191#0#0#0#0'NNN'#31'KKK'#255'III'#255'FFF'#255'DDD'#255'AAA'#255'4>c'
+  +#255#21'8'#194#255#3'2'#240#255#17'1'#187#255'+3Y'#255'333'#255'000'#255'...'
+  +#255'+++'#255')))'#255#21' n'#255#0#21#196#255#0#18#190#255#0#15#184#255#0#12
+  +#177#255#0#9#171#255#0#5#165#255#0#2#159#255#0#0#154#255#0#0#154#255#0#0#154
+  +#255#1#1#135#255#8#8#8#255#6#6#6#255#3#3#3#255#3#3#3#31'PPPoNNN'#255'KKK'#255
+  +'III'#255'FFF'#255'ADP'#255#15'>'#243#255#7':'#255#255#3'6'#254#255#0'2'#252
+  +#255#6'/'#222#255'555'#255'333'#255'000'#255'...'#255'+++'#255#28'$]'#255#0
+  +#24#202#255#0#21#196#255#0#18#190#255#0#15#184#255#0#12#177#255#0#9#171#255#0
+  +#5#165#255#0#2#159#255#0#0#154#255#0#0#154#255#0#0#154#255#7#7'7'#255#8#8#8
+  +#255#6#6#6#255#4#4#4'oSSS'#191'QQQ'#255'NNN'#255'KKK'#255'III'#255':Fu'#255
+  +#16'B'#255#255#12'>'#255#255#7':'#255#255#3'6'#254#255#0'2'#252#255')5h'#255
+  +'555'#255'333'#255'000'#255'...'#255'(*5'#255#15' '#145#255#0#24#202#255#0#21
+  +#196#255#0#18#190#255#0#15#184#255#0#12#177#255#0#9#171#255#0#5#165#255#13#14
+  +'H'#255#4#4'x'#255#0#0#154#255#4#4'e'#255#11#11#11#255#8#8#8#255#6#6#6#191'V'
+  +'VV'#239'SSS'#255'QQQ'#255'NNN'#255'KKK'#255'=Iw'#255#21'G'#255#255#16'B'#255
+  +#255#12'>'#255#255#7':'#255#255#3'6'#254#255'39R'#255'888'#255'555'#255'333'
+  +#255'000'#255'...'#255'+++'#255'&(3'#255#0#24#202#255#6#24#166#255#21#27'['
+  +#255#4#17#164#255#0#12#177#255#9#15'u'#255#23#23#23#255#16#16'7'#255#0#0#154
+  +#255#1#1#136#255#13#13#13#255#11#11#11#255#8#8#8#239'XXX'#255'VVV'#255'SSS'
+  +#255'QQQ'#255'NNN'#255'KKK'#255'"J'#221#255#21'G'#255#255#16'B'#255#255#12'>'
+  +#255#255#24';'#195#255'<<<'#255':::'#255'888'#255'555'#255'333'#255'000'#255
+  +'...'#255'&)@'#255#0#27#208#255#18#31'y'#255'$$$'#255#31' +'#255#21#26'N'#255
+  +#24#26'/'#255#26#26#26#255#22#22' '#255#8#9'j'#255#5#6'o'#255#16#16#16#255#13
+  +#13#13#255#11#11#11#255'[[['#255'XXX'#255'VVV'#255'SSS'#255'QQQ'#255'NNN'#255
+  +'HKW'#255'4J'#153#255'-F'#163#255'-C'#150#255'AAA'#255'???'#255'<<<'#255':::'
+  +#255'888'#255'555'#255'#/l'#255#23'*'#138#255#11'%'#177#255#0#30#215#255#10
+  +#31#167#255'&&&'#255'$$$'#255'!!!'#255#31#31#31#255#28#28#28#255#26#26#26#255
+  +#23#23#23#255#21#21#21#255#18#18#18#255#16#16#16#255#13#13#13#255']]]'#255'['
+  +'[['#255'XXX'#255'VVV'#255'SSS'#255'QQQ'#255'NNN'#255'KKK'#255'III'#255'FFF'
+  +#255'DDD'#255'AAA'#255'???'#255'<<<'#255':::'#255'17O'#255#0'+'#240#255#0'('
+  +#233#255#24'*'#137#255#11'$'#177#255'#)K'#255')))'#255'&&&'#255'$$$'#255'!!!'
+  +#255#31#31#31#255#28#28#28#255#26#26#26#255#23#23#23#255#21#21#21#255#18#18
+  +#18#255#16#16#16#255'```'#255']]]'#255'[[['#255'XXX'#255'VVV'#255'SSS'#255'Q'
+  +'QQ'#255'NNN'#255'KKK'#255'III'#255'FFF'#255'DDD'#255'AAA'#255'???'#255'<<<'
+  +#255'(7v'#255#0'.'#246#255#19'/'#170#255'333'#255'000'#255'...'#255'+++'#255
+  +')))'#255'&&&'#255'$$$'#255'!!!'#255#31#31#31#255#28#28#28#255#26#26#26#255
+  +#23#23#23#255#21#21#21#255#18#18#18#255'bbb'#239'```'#255']]]'#255'[[['#255
+  +'XXX'#255'VVV'#255'SSS'#255'QQQ'#255'NNN'#255'KKK'#255'III'#255'FFF'#255'DDD'
+  +#255'AAA'#255'???'#255'<<<'#255#14'3'#203#255#3'/'#234#255'$2p'#255'333'#255
+  +'000'#255'...'#255'+++'#255'!&H'#255#11#29#151#255#8#25#156#255#24#29'I'#255
+  +#31#31#31#255#28#28#28#255#26#26#26#255#23#23#23#255#21#21#21#239'ddd'#191'b'
+  +'bb'#255'```'#255']]]'#255'[[['#255'XXX'#255'VVV'#255'SSS'#255'QQQ'#255'NNN'
+  +#255'KKK'#255'III'#255'CFR'#255'>D['#255'AAA'#255'???'#255#31'9'#158#255#0'2'
+  +#252#255#3'/'#234#255'555'#255'333'#255'000'#255'...'#255#5' '#193#255#0#27
+  +#208#255#0#24#202#255#2#22#186#255#31' +'#255#31#31#31#255#28#28#28#255#26#26
+  +#26#255#23#23#23#191'fffoeee'#255'bbb'#255'```'#255']]]'#255'[[['#255'XXX'
+  +#255'VVV'#255'SSS'#255'QQQ'#255'NNN'#255'CLm'#255' J'#232#255#21'G'#255#255
+  +'$C'#184#255'*@'#148#255#7':'#255#255#3'6'#254#255#29'6'#155#255'888'#255'55'
+  +'5'#255'333'#255'000'#255#0'"'#221#255#0#30#215#255#0#27#208#255#0#24#202#255
+  +#29'!B'#255'!!!'#255#31#31#31#255#28#28#28#255#26#26#26'ohhh'#31'ggg'#255'ee'
+  ,'e'#255'bbb'#255'```'#255'[^g'#255'<h'#244#255'5e'#255#255'HZ'#149#255'SSS'
+  +#255'QQQ'#255'8Q'#167#255#30'O'#255#255#26'K'#255#255#21'G'#255#255#16'B'#255
+  +#255#12'>'#255#255'.={'#255'<<<'#255':::'#255'888'#255'555'#255'333'#255#12
+  +''''#182#255#0'"'#221#255#0#30#215#255#7#30#177#255'&&&'#255'$$$'#255'!!!'
+  +#255#31#31#31#255#28#28#28#31#0#0#0#0'iii'#191'ggg'#255'eee'#255'bbb'#255'In'
+  +#225#255'?n'#255#255':i'#255#255':c'#234#255'VVV'#255'SSS'#255'<T'#168#255'#'
+  +'T'#255#255#30'O'#255#255#26'K'#255#255#21'G'#255#255#16'B'#255#255'#?'#171
+  +#255'<?K'#255'<<<'#255':::'#255'888'#255'555'#255'333'#255#30',s'#255#26'(z'
+  +#255'(*6'#255')))'#255'&&&'#255'$$$'#255'!!!'#191#0#0#0#0#0#0#0#0'kkk?iii'
+  +#255'ggg'#255'eee'#255'Lr'#225#255'Cr'#255#255'?n'#255#255':i'#255#255'<b'
+  +#223#255'8_'#223#255',\'#255#255'''X'#255#255'#T'#255#255#30'O'#255#255#26'K'
+  +#255#255#21'G'#255#255#16'B'#255#255#12'>'#255#255#21';'#206#255'<<<'#255'::'
+  +':'#255'888'#255'555'#255'333'#255'000'#255'...'#255'+++'#255')))'#255'&&&'
+  +#255'$$$?'#0#0#0#0#0#0#0#0#0#0#0#0'kkk'#191'iii'#255'ggg'#255'agx'#255'It'
+  +#245#255'Cr'#255#255'?n'#255#255':i'#255#255'5e'#255#255'1a'#255#255',\'#255
+  +#255'''X'#255#255'#T'#255#255#30'O'#255#255#26'K'#255#255#21'G'#255#255#16'B'
+  +#255#255#18'>'#231#255'???'#255'<<<'#255':::'#255'888'#255'555'#255'333'#255
+  +'000'#255'...'#255'+++'#255')))'#191#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'kkk'#31
+  +'kkk'#239'iii'#255'ggg'#255'`h'#130#255'It'#245#255'Cr'#255#255'?n'#255#255
+  +':i'#255#255'5e'#255#255'1a'#255#255',\'#255#255'''X'#255#255'#T'#255#255#30
+  +'O'#255#255#26'K'#255#255#21'G'#255#255'.C'#149#255'AAA'#255'<?K'#255'9<H'
+  +#255':::'#255'888'#255'555'#255'333'#255'000'#255'...'#239'+++'#31#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'kkk?kkk'#255'iii'#255'ggg'#255'agx'#255'Lr'
+  +#225#255'Cr'#255#255'?n'#255#255':i'#255#255'5e'#255#255'1a'#255#255',\'#255
+  +#255'''X'#255#255'#T'#255#255#30'O'#255#255#26'K'#255#255#24'G'#243#255'.C'
+  +#149#255#15'>'#243#255#10':'#242#255'2;a'#255':::'#255'888'#255'555'#255'333'
+  +#255'000?'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'kkk_kkk'
+  +#255'iii'#255'ggg'#255'eee'#255'Vj'#167#255'Ep'#245#255'?n'#255#255':i'#255
+  +#255'5e'#255#255'1a'#255#255',\'#255#255'''X'#255#255'#T'#255#255#30'O'#255
+  +#255#26'K'#255#255#21'G'#255#255#20'B'#243#255'*@'#148#255'???'#255'<<<'#255
+  +':::'#255'888'#255'555_'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0'kkk?kkk'#239'iii'#255'ggg'#255'eee'#255'bbb'#255'Uf'#156
+  +#255'Jg'#194#255'>g'#234#255'5e'#255#255'1a'#255#255',\'#255#255'''X'#255#255
+  +'(S'#233#255'/M'#188#255'7J'#141#255'FFF'#255'DDD'#255'AAA'#255'???'#255'<<<'
+  +#239':::?'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0'kkk'#31'kkk'#191'iii'#255'ggg'#255'eee'#255'bbb'#255
+  +'```'#255']]]'#255'[[['#255'XXX'#255'VVV'#255'SSS'#255'QQQ'#255'NNN'#255'KKK'
+  +#255'III'#255'FFF'#255'DDD'#255'AAA'#191'???'#31#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0'kkk?iii'#191'ggg'#255'eee'#255'bbb'#255'```'#255']]]'#255'[[['#255
+  +'XXX'#255'VVV'#255'SSS'#255'QQQ'#255'NNN'#255'KKK'#255'III'#191'FFF?'#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'hhh'#31'fffoddd'
+  +#191'bbb'#239'```'#255']]]'#255'[[['#255'XXX'#255'VVV'#239'SSS'#191'PPPoNNN'
+  +#31#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#255#192#3#255#255#0#0#255#252#0#0'?'#248#0#0#31#240#0#0#15#224#0#0#7
+  +#192#0#0#3#192#0#0#3#128#0#0#1#128#0#0#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#128#0#0#1#128#0
+  +#0#1#192#0#0#3#192#0#0#3#224#0#0#7#240#0#0#15#248#0#0#31#252#0#0'?'#255#0#0
+  +#255#255#192#3#255'('#0#0#0#16#0#0#0' '#0#0#0#1#0' '#0#0#0#0#0'@'#4#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'###_'#29#29#29#175
+  +#24#24#24#255#19#19#19#255#14#14#14#255#9#9#9#255#5#5#5#175#1#1#1'_'#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'222'#31',,,'#191''''''''#255'"""'
+  +#255#23#26'9'#255#11#15'`'#255#8#9'W'#255#7#7'J'#255#7#7#26#255#4#4#4#255#0#0
+  +#0#191#0#0#0#15#0#0#0#0#0#0#0#0#0#0#0#0':::'#31'666'#239'111'#255',,,'#255
+  +''''''''#255#26#30'I'#255#0#12#179#255#0#6#167#255#0#1#156#255#0#0#154#255#2
+  +#2'c'#255#3#3#13#255#0#0#0#239#0#0#0#15#0#0#0#0#0#0#0#0'???'#207';;;'#255'66'
+  +'6'#255'111'#255',,,'#255'%&1'#255#11#23#141#255#7#16#140#255#0#6#167#255#0#1
+  +#156#255#0#0#154#255#1#1'~'#255#3#3#13#255#0#0#0#191#0#0#0#0'HHH_DDD'#255'??'
+  +'?'#255';;;'#255'666'#255'111'#255',,,'#255''''''''#255#26#30'I'#255#0#12#179
+  +#255#0#6#167#255#0#1#156#255#0#0#154#255#2#2'c'#255#4#4#4#255#1#1#1'_NNN'#175
+  +'III'#255'ADP'#255#18';'#219#255#1'3'#252#255'$3q'#255'111'#255',,,'#255#10
+  +#28#162#255#0#19#191#255#0#12#179#255#0#6#167#255#0#1#156#255#0#0#154#255#7#7
+  +#26#255#5#5#5#175'TTT'#255'OOO'#255'=Jw'#255#18'C'#255#255#8';'#255#255#19'5'
+  ,#192#255'666'#255'111'#255'!(V'#255#7#28#172#255#4#21#172#255#0#12#179#255#10
+  +#14'h'#255#4#4#130#255#7#7'J'#255#9#9#9#255'YYY'#255'TTT'#255'OOO'#255')J'
+  +#199#255#30'C'#208#255'5>c'#255';;;'#255'666'#255'$._'#255#8'"'#184#255#23'"'
+  +'f'#255#28#31'?'#255#27#28'&'#255#18#19':'#255#14#14'5'#255#14#14#14#255'^^^'
+  +#255'YYY'#255'TTT'#255'OOO'#255'III'#255'DDD'#255'???'#255'09_'#255#3','#229
+  +#255#31',s'#255'&*B'#255''''''''#255'"""'#255#29#29#29#255#24#24#24#255#19#19
+  +#19#255'ccc'#255'^^^'#255'YYY'#255'TTT'#255'OOO'#255'III'#255'>D['#255'???'
+  +#255#4'3'#240#255'!2}'#255'111'#255#30'(b'#255#0#25#204#255#18#27'h'#255#29
+  +#29#29#255#24#24#24#255'ggg'#175'ccc'#255'\_h'#255'H`'#171#255'OUi'#255'CP{'
+  +#255#27'L'#255#255#24'D'#231#255#15';'#231#255'09_'#255'666'#255#25'+'#138
+  +#255#0#31#216#255#14#30#142#255'"""'#255#29#29#29#175'jjj_hhh'#255'Ul'#177
+  +#255'@n'#255#255'?c'#212#255'<Z'#190#255'$T'#255#255#27'L'#255#255#21'C'#243
+  +#255'!='#170#255';;;'#255'666'#255'%.]'#255')+7'#255''''''''#255'###_'#0#0#0
+  +#0'jjj'#207'fiq'#255'Ms'#226#255'@n'#255#255'6f'#255#255'-]'#255#255'$T'#255
+  +#255#27'L'#255#255#24'C'#231#255'<?K'#255'7:G'#255'666'#255'111'#255',,,'#207
+  +#0#0#0#0#0#0#0#0'kkk'#31'jjj'#239'fiq'#255'Pp'#207#255'@n'#255#255'6f'#255
+  +#255'-]'#255#255'$T'#255#255#27'L'#255#255#24'C'#231#255' ='#171#255';;;'#255
+  +'666'#239'222'#31#0#0#0#0#0#0#0#0#0#0#0#0'kkk'#31'jjj'#207'hhh'#255'_ew'#255
+  +'Pe'#165#255'G_'#172#255'@X'#170#255';Q'#156#255'CJ`'#255'DDD'#255'???'#207
+  +':::'#31#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0'jjj_ggg'#175'ccc'
+  +#255'^^^'#255'YYY'#255'TTT'#255'NNN'#175'HHH_'#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#240#15#0#0#192#3#0#0#128#1#0#0#128#1#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0
+  +#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#128#1#0#0#128#1#0#0#192#3#0#0#240#15#0#0
+]);
+LazarusResources.Add('RemObjectsHtmlServerDocumentationCss','CSS',[
+  'body, table, tr, td'#13#10'{'#13#10'                                backgrou'
+  +'nd-color: #f7f7f7;'#13#10'                                margin: 0;'#13#10
+  +'                                padding: 0;'#13#10'                        '
+  +'        font-family: Verdana, Tahoma, Arial, Helvetica, sans serif;'#13#10
+  +'                                font-size: 10pt;'#13#10'}'#13#10'          '
+  +'              .header'#13#10'                        {'#13#10'             '
+  +'                   padding: 5px;'#13#10'                                bac'
+  +'kground-color: #c0c0c0;'#13#10'                                border-botto'
+  +'m: 5px solid #808080;'#13#10'                                font-size: 1.5'
+  +'em;'#13#10'                        }'#13#10'                        .body'
+  +#13#10'                        {'#13#10'                                padd'
+  +'ing: 5px;'#13#10'                        }'#13#10'                        .'
+  +'footer'#13#10'                        {'#13#10'                            '
+  +'    padding: 5px;'#13#10'                                border-top: 1px so'
+  +'lid #808080;'#13#10'                                font-size: 0.8em;'#13#10
+  +'                        }'#13#10'                        .section'#13#10'  '
+  +'                      {'#13#10'                            margin-left: 25p'
+  +'x;'#13#10'                            padding-left: 3px;'#13#10'           '
+  +'                 padding-top: 3px;'#13#10'                            paddi'
+  +'ng-bottom: 3px;'#13#10'                            border-left: 1px solid #'
+  +'b0b0b0;'#13#10'                            border-bottom: 1px solid #b0b0b0'
+  +';'#13#10'                        }'#13#10'                        .h1'#13#10
+  +'                        {'#13#10'                                font-size:'
+  +' 13pt;'#13#10'                            border-left: 1px solid #b0b0b0;'
+  +#13#10'                            border-bottom: 1px solid #b0b0b0;'#13#10
+  +'                        }'#13#10'                        .h2'#13#10'       '
+  +'                 {'#13#10'                                font-size: 13pt;'
+  +#13#10'                            border-left: 1px solid #b0b0b0;'#13#10'  '
+  +'                          border-bottom: 1px solid #b0b0b0;'#13#10'        '
+  +'                }'#13#10'p { margin-bottom: 0.75em; margin-top: 0; }'#13#10
+  +'.h1, .h2, .h3, .h4, h4'#13#10'{'#13#10'  margin-top: 1em;'#13#10'  margin-b'
+  +'ottom: 0;'#13#10'  padding-bottom: 0;'#13#10'  padding-left: 3px;'#13#10'  '
+  +'font-weight: bold;'#13#10'}'#13#10'a { text-decoration: none }'#13#10'h2 { '
+  +'font-size: 12pt; }'#13#10'h3 { font-size: 11pt; }'#13#10'h4 { font-size: 10'
+  +'pt; font-weight: normal; text-decoration: underline;}'#13#10'ul, ol { margi'
+  +'n-top: 0; margin-bottom: 0.75em; }'#13#10'pre { margin: 0 }'#13#10'pre, cod'
+  +'e'#13#10'{'#13#10'      font: 100% Monospace, Courier New, Courier;'#13#10
+  +'      color: #000066;'#13#10'}'#13#10'.spaced'#13#10'{'#13#10'  letter-spac'
+  +'ing: 1px;'#13#10'  color: #000060;'#13#10'}'#13#10'table { padding: 0; }'#13
+  +#10'tr { margin: 0; padding: 0; }'#13#10'td { margin: 0; }'#13#10'table, td '
+  +'{ border: 1px dashed #c0c0c0; }'#13#10
+]);
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROHtmlServerInfo.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROHtmlServerInfo.pas
new file mode 100644
index 0000000..23cddd6
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROHtmlServerInfo.pas	
@@ -0,0 +1,188 @@
+unit uROHtmlServerInfo;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  {$IFDEF FPC}LResources,{$ENDIF}
+  uRODLToXML, uRODL, uROServer, {uROClasses, }SysUtils, Classes;
+
+
+function GetResourceAsString(aName: string): Ansistring;
+function GetRodlServerInfo(const RootUrl: string; aRodl: TRODLLibrary; aDispatchers: TROMessageDispatchers): Ansistring;
+function GetRodlStyleSheet: Ansistring;
+function GetRodlWithStyleSheet(aRodl: TRODLLibrary; aStyleSheetUrl: string): AnsiString;
+procedure GetRodlFavIcon(dest: TStream);
+function GetRodlCss: Ansistring;
+function GetVersion: string;
+
+implementation
+
+uses
+  {$IFDEF MSWINDOWS}Windows, {$ENDIF}
+  uROHTTPDispatch;
+
+{$IFNDEF FPC}
+{$R uROHtmlServerInfo.res}
+{$ENDIF}
+
+type
+  TVersion = record
+    Major : word;
+    Minor : word;
+    Release : word;
+    Build : word;
+  end;
+
+
+function GetResourceAsString(aName: string): Ansistring;
+var
+  lRes: TResourceStream;
+begin
+  lRes := TResourceStream.Create(HInstance, aName, RT_RCDATA);
+  try
+    SetLength(Result, lRes.Size);
+    lRes.Read(pointer(Result)^, Length(Result));
+  finally
+    lRes.Free;
+  end;
+end;
+
+function GetRodlCss: Ansistring;
+begin
+  result := GetResourceAsString('RemObjectsHtmlServerDocumentationCss');
+end;
+
+function GetRodlWithStyleSheet(
+  aRodl: TRODLLibrary; aStyleSheetUrl: string): AnsiString;
+var
+  lRodlToXml: TRODLToXML;
+begin
+  lRodlToXml := TRODLToXML.Create(nil, '');
+  try
+    lRodlToXml.StyleSheet := aStyleSheetUrl;
+    lRodlToXml.Convert(aRodl);
+    Result := {$IFDEF UNICODE}UTF8Encode{$ENDIF} (lRodlToXml.Buffer.Text);
+  finally
+    lRodlToXml.Free;
+  end;
+end;
+
+function GetRodlServerInfo(const RootUrl: string; aRodl: TRODLLibrary; aDispatchers: TROMessageDispatchers): Ansistring;
+var
+  lUrl, lPath, s, r: string;
+  i: Integer;
+begin
+  s := '';
+  lUrl := RootUrl;
+  if lUrl = '' then lUrl := '/' else
+  if lUrl[Length(lUrl)] <> '/' then lUrl := lUrl + '/';
+
+
+  R := {$IFDEF UNICODE}UTF8ToString{$ENDIF} (GetResourceAsString('RemObjectsHtmlServerInfo'));
+  R := StringReplace(R, '%BASEPATH%', lUrl, [rfReplaceall]);
+  R := StringReplace(R, '%NAME%', aRodl.Name, [rfReplaceall]);
+  R := StringReplace(R, '%DOC%', aRodl.Documentation, [rfReplaceall]);
+
+  for i := 0 to aDispatchers.Count -1 do
+  begin
+    lPath := TROHTTPDispatcher(aDispatchers[i]).PathInfo;
+    if lPath = '' then continue;
+    if lPath[1] = '/' then Delete(lPath, 1, 1);
+    s := s + '<li><a href="' + lUrl + lPath	 + '">' +
+      lPath + '</a> <i>(' + aDispatchers[i].Message.ClassName +
+      ')</i></li>';
+  end;
+
+  R := StringReplace(R, '%DISPATCHERS%', s, [rfReplaceall]);
+  R := StringReplace(R, '%RO%', GetVersion(), [rfReplaceall]);
+
+  Result := {$IFDEF UNICODE}UTF8Encode{$ENDIF}(R);
+end;
+
+function GetRodlStyleSheet: Ansistring;
+begin
+  Result := GetResourceAsString('RemObjectsHtmlServerDocumentation');
+end;
+
+procedure GetRodlFavIcon(dest: TStream);
+var
+  fs: TResourceStream;
+begin
+  fs := TResourceStream.Create(HInstance, 'RemObjectsHtmlIcon', RT_RCDATA);
+  try
+    dest.CopyFrom(fs, fs.Size);
+  finally
+    fs.Free;
+  end;
+end;
+
+{$IFDEF MSWINDOWS}
+function GetFileVer(iFileName: string):TVersion;
+var whocares:dword;
+    Size:dword;
+    Data:pointer;
+    FixedData:pVSFixedFileInfo;
+begin
+  whocares:=0;
+  {$IFDEF FPC}
+  Data := nil;
+  {$ENDIF FPC}  
+  FixedData := nil;
+  Size := GetFileVersionInfoSize(pChar(iFileName), whocares);
+  if Size > 0 then begin
+    GetMem(Data,Size);
+    try
+      if GetFileVersionInfo(pChar(iFileName),0,Size,Data) then begin
+        Size := sizeof(TVSFixedFileInfo);
+        if VerQueryValue(Data,'\',pointer(FixedData),Size) then begin
+          result.Major := HiWord(FixedData^.dwFileVersionMS);
+          result.Minor := LoWord(FixedData^.dwFileVersionMS);
+          result.Release := HiWord(FixedData^.dwFileVersionLS);
+          result.Build := LoWord(FixedData^.dwFileVersionLS);
+        end;
+      end;
+    finally
+      FreeMem(Data);
+    end;
+  end;
+end;
+{$ENDIF}
+
+function GetVersion:string;
+{$IFDEF MSWINDOWS}
+var
+  Version:TVersion;
+{$ENDIF}
+begin
+{$IFDEF MSWINDOWS}
+  {$IFDEF FPC}
+   Version := GetFileVer(ParamStr(0));
+  {$ELSE}
+   Version := GetFileVer(GetModuleName(hInstance));
+  {$ENDIF}
+   result := 'v' + IntToStr(Version.Major)+'.'+IntToStr(Version.Minor)+'.'+
+             IntToStr(Version.Release)+'.'+IntToStr(Version.Build);
+{$ELSE}
+  Result:='';
+{$ENDIF}
+end;
+
+{$IFDEF FPC}
+initialization
+  {$I uROHtmlServerInfo.lrs}
+{$ENDIF FPC}
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROHtmlServerInfo.rc b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROHtmlServerInfo.rc
new file mode 100644
index 0000000..a7b245f
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROHtmlServerInfo.rc	
@@ -0,0 +1,4 @@
+RemObjectsHtmlServerDocumentation RCDATA DISCARDABLE "uROHtmlServerInfoRes.xsl"
+RemObjectsHtmlServerInfo RCDATA DISCARDABLE "uROHtmlServerInfoRes.html"
+RemObjectsHtmlIcon RCDATA DISCARDABLE "uROHtmlServerInfoRes.ico"
+RemObjectsHtmlServerDocumentationCss RCDATA DISCARDABLE "uROHtmlServerInfoRes.css"
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROHtmlServerInfo.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROHtmlServerInfo.res
new file mode 100644
index 0000000..ef67712
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROHtmlServerInfo.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROHtmlServerInfoRes.css b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROHtmlServerInfoRes.css
new file mode 100644
index 0000000..dcd3e5c
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROHtmlServerInfoRes.css	
@@ -0,0 +1,75 @@
+body, table, tr, td
+{
+                                background-color: #f7f7f7;
+                                margin: 0;
+                                padding: 0;
+                                font-family: Verdana, Tahoma, Arial, Helvetica, sans serif;
+                                font-size: 10pt;
+}
+                        .header
+                        {
+                                padding: 5px;
+                                background-color: #c0c0c0;
+                                border-bottom: 5px solid #808080;
+                                font-size: 1.5em;
+                        }
+                        .body
+                        {
+                                padding: 5px;
+                        }
+                        .footer
+                        {
+                                padding: 5px;
+                                border-top: 1px solid #808080;
+                                font-size: 0.8em;
+                        }
+                        .section
+                        {
+                            margin-left: 25px;
+                            padding-left: 3px;
+                            padding-top: 3px;
+                            padding-bottom: 3px;
+                            border-left: 1px solid #b0b0b0;
+                            border-bottom: 1px solid #b0b0b0;
+                        }
+                        .h1
+                        {
+                                font-size: 13pt;
+                            border-left: 1px solid #b0b0b0;
+                            border-bottom: 1px solid #b0b0b0;
+                        }
+                        .h2
+                        {
+                                font-size: 13pt;
+                            border-left: 1px solid #b0b0b0;
+                            border-bottom: 1px solid #b0b0b0;
+                        }
+p { margin-bottom: 0.75em; margin-top: 0; }
+.h1, .h2, .h3, .h4, h4
+{
+  margin-top: 1em;
+  margin-bottom: 0;
+  padding-bottom: 0;
+  padding-left: 3px;
+  font-weight: bold;
+}
+a { text-decoration: none }
+h2 { font-size: 12pt; }
+h3 { font-size: 11pt; }
+h4 { font-size: 10pt; font-weight: normal; text-decoration: underline;}
+ul, ol { margin-top: 0; margin-bottom: 0.75em; }
+pre { margin: 0 }
+pre, code
+{
+      font: 100% Monospace, Courier New, Courier;
+      color: #000066;
+}
+.spaced
+{
+  letter-spacing: 1px;
+  color: #000060;
+}
+table { padding: 0; }
+tr { margin: 0; padding: 0; }
+td { margin: 0; }
+table, td { border: 1px dashed #c0c0c0; }
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROHtmlServerInfoRes.html b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROHtmlServerInfoRes.html
new file mode 100644
index 0000000..de02e04
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROHtmlServerInfoRes.html	
@@ -0,0 +1,57 @@
+<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
+<html>
+	<head>
+		<title>%NAME% - RemObjects SDK for .NET %RO%</title>
+		<meta name="GENERATOR" content="RemObjects SDK for .NET {1}">
+		<style>
+			body
+			{
+				background-color: #f7f7f7;
+				margin: 0;
+				padding: 0;
+				font-family: Verdana, Tahoma, Arial, Helvetica, sans serif;
+				font-size: 10pt;
+			}
+			.header
+			{
+				padding: 5px;
+				background-color: #c0c0c0;
+				border-bottom: 5px solid #808080;
+				font-size: 1.5em;
+			}
+			.body
+			{
+				padding: 5px;
+			}
+			.footer
+			{
+				padding: 5px;
+				border-top: 1px solid #808080;
+				font-size: 0.8em;
+			}
+			.h2
+			{
+				font-weight: bold;
+			}
+		</style
+	</head>
+	<body>
+	<div class="header">
+		<img src="%BASEPATH%favicon.ico" style="padding-right: 5px;"/>%NAME%
+	</div>
+	<div class="body">
+		%DOC%
+		<p><a href="%BASEPATH%doc">View full documentation</a> | <a href="%BASEPATH%rodl">View RODL</a></p>
+    <p class="h2">Available Dispatchers:</p>
+		<ul>
+			%DISPATCHERS%
+		</ul>
+	</div>
+	<div class="footer">
+		RemObjects SDK for Delphi
+		RemObjects Software, LLC. <a href="http://www.remobjects.com">remobjects.com</a>.
+	</div>
+
+
+	</body>
+</html>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROHtmlServerInfoRes.ico b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROHtmlServerInfoRes.ico
new file mode 100644
index 0000000..282d455
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROHtmlServerInfoRes.ico differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROHtmlServerInfoRes.xsl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROHtmlServerInfoRes.xsl
new file mode 100644
index 0000000..114d13b
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROHtmlServerInfoRes.xsl	
@@ -0,0 +1,874 @@
+<?xml version="1.0"?>
+<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" version="1.0">
+  <xsl:output method="html"/>
+  <xsl:template match="/Library">
+    <html xmlns="http://www.w3.org/1999/xhtml">
+      <head>
+        <meta name="GENERATOR" content="XSL Rodl2Html.xsl"/>
+        <meta http-equiv="Content-Type" content="text/html"/>
+        <title>
+          <xsl:value-of select="@Name"/> documentation
+        </title>
+        <style>
+          <xsl:comment>
+            body, table, tr, td
+            {
+            background-color: #f7f7f7;
+            margin: 0;
+            padding: 0;
+            font-family: Verdana, Tahoma, Arial, Helvetica, sans serif;
+            font-size: 10pt;
+            }
+            .header
+            {
+            padding: 5px;
+            background-color: #c0c0c0;
+            border-bottom: 5px solid #808080;
+            font-size: 1.5em;
+            }
+            .body
+            {
+            padding: 5px;
+            }
+            .footer
+            {
+            padding: 5px;
+            border-top: 1px solid #808080;
+            font-size: 0.8em;
+            }
+            .section
+            {
+            margin-left: 25px;
+            padding-left: 3px;
+            padding-top: 3px;
+            padding-bottom: 3px;
+            border-left: 1px solid #b0b0b0;
+            border-bottom: 1px solid #b0b0b0;
+            }
+            .h1
+            {
+            font-size: 13pt;
+            border-left: 1px solid #b0b0b0;
+            border-bottom: 1px solid #b0b0b0;
+            }
+            .h2
+            {
+            font-size: 13pt;
+            border-left: 1px solid #b0b0b0;
+            border-bottom: 1px solid #b0b0b0;
+            }
+            p { margin-bottom: 0.75em; margin-top: 0; }
+            .h1, .h2, .h3, .h4, h4
+            {
+            margin-top: 1em;
+            margin-bottom: 0;
+            padding-bottom: 0;
+            padding-left: 3px;
+            font-weight: bold;
+            }
+            a { text-decoration: none }
+            h2 { font-size: 12pt; }
+            h3 { font-size: 11pt; }
+            h4 { font-size: 10pt; font-weight: normal; text-decoration: underline;}
+            ul, ol { margin-top: 0; margin-bottom: 0.75em; }
+            pre { margin: 0 }
+            pre, code
+            {
+            font: 100% Monospace, Courier New, Courier;
+            color: #000066;
+            }
+            .spaced
+            {
+            letter-spacing: 1px;
+            color: #000060;
+            }
+            table { padding: 0; }
+            tr { margin: 0; padding: 0; }
+            td { margin: 0; }
+            table, td { border: 1px dashed #c0c0c0; }
+          </xsl:comment>
+        </style>
+      </head>
+      <body>
+        <div class="header">
+          <img src="favicon.ico" style="padding-right: 5px;"/>
+          <xsl:value-of select="/Library/@Name"/>
+        </div>
+        <div class="body">
+          <a>
+            <xsl:attribute name="name"><xsl:value-of select="/Library/@Name"/></xsl:attribute>
+          </a>
+          <div class="h1">Table Of Contents</div>
+          <p>This document is split into the following sections:</p>
+          <ul>
+            <li>
+              <a>
+                <xsl:attribute name="href">#<xsl:value-of select="/Library/@Name"/>.Services</xsl:attribute>
+                Services
+              </a>
+            </li>
+            <li>
+              <a>
+                <xsl:attribute name="href">#<xsl:value-of select="/Library/@Name"/>.EventSinks</xsl:attribute>
+                Event sinks
+              </a>
+            </li>
+            <li>
+              <a>
+                <xsl:attribute name="href">#<xsl:value-of select="/Library/@Name"/>.Structs</xsl:attribute>
+                Structs
+              </a>
+            </li>
+            <li>
+              <a>
+                <xsl:attribute name="href">#<xsl:value-of select="/Library/@Name"/>.Enums</xsl:attribute>
+                Enums
+              </a>
+            </li>
+            <li>
+              <a>
+                <xsl:attribute name="href">#<xsl:value-of select="/Library/@Name"/>.Arrays</xsl:attribute>
+                Arrays
+              </a>
+            </li>
+            <li>
+              <a>
+                <xsl:attribute name="href">#<xsl:value-of select="/Library/@Name"/>.Exceptions</xsl:attribute>
+                Exceptions
+              </a>
+            </li>
+            <li>
+              <a>
+                <xsl:attribute name="href">#<xsl:value-of select="/Library/@Name"/>.Uses</xsl:attribute>
+                Used RODLs
+              </a>
+            </li>
+          </ul>
+
+          <p>
+            <b>Library Description:</b>
+            <pre>
+              <xsl:value-of select="/Library/Documentation"/>
+            </pre>
+          </p>
+
+          <xsl:call-template name="ServicesOverview"/>
+
+          <xsl:call-template name="EventSinksOverview"/>
+
+          <xsl:call-template name="StructsOverview"/>
+
+          <xsl:call-template name="EnumsOverview"/>
+
+          <xsl:call-template name="ArraysOverview"/>
+
+          <xsl:call-template name="ExceptionsOverview"/>
+
+          <xsl:call-template name="UsesOverview"/>
+        </div>
+        <div class="footer">
+          RemObjects Software, LLC. <a href="http://www.remobjects.com">remobjects.com</a>.
+        </div>
+      </body>
+    </html>
+  </xsl:template>
+
+  <xsl:template name="ServicesOverview" match="/Services">
+    <a>
+      <xsl:attribute name="name"><xsl:value-of select="/Library/@Name"/>.Services</xsl:attribute>
+    </a>
+    <div class="h1">Services</div>
+    <div class="section">
+      <p>
+        The following table lists the Services defined in "<xsl:value-of select="/Library/@Name"/>":
+      </p>
+      <table width="80%">
+        <xsl:for-each select="./Services/Service/Interfaces/Interface">
+          <tr>
+            <td valign="top" width="250">
+              <a>
+                <xsl:attribute name="href">#<xsl:value-of select="../../@Name"/></xsl:attribute>
+                <xsl:value-of select="../../@Name"/><xsl:if test="../../@Ancestor">(<xsl:value-of select="../../@Ancestor"/>)</xsl:if>
+              </a>
+            </td>
+            <td>
+              <pre>
+                <xsl:value-of select="../../Documentation"/>
+              </pre>
+            </td>
+          </tr>
+        </xsl:for-each>
+      </table>
+      <xsl:call-template name="ServicesMembers"/>
+    </div>
+  </xsl:template>
+
+  <xsl:template name="ServicesMembers" match="/Services">
+    <xsl:for-each select="./Services/Service/Interfaces/Interface">
+      <a>
+        <xsl:attribute name="name"><xsl:value-of select="../../@Name"/></xsl:attribute>
+      </a>
+      <div class="h2">
+        Service <i>
+          <xsl:value-of select="../../@Name"/>
+        </i>
+      </div>
+      <div class="section">
+        <p>
+          The following table lists the Operations defined in "<xsl:value-of select="../../@Name"/>":
+        </p>
+        <table width="80%">
+          <xsl:for-each select="./Operations/Operation">
+            <tr>
+              <td valign="top" width="250">
+                <a>
+                  <xsl:attribute name="href">#<xsl:value-of select="../../../../@Name"/>.<xsl:value-of select="@Name"/></xsl:attribute>
+                  <xsl:value-of select="@Name"/>
+                </a>
+              </td>
+              <td>
+                <pre>
+                  <xsl:value-of select="Documentation"/>
+                </pre>
+              </td>
+            </tr>
+          </xsl:for-each>
+        </table>
+        <xsl:call-template name="MemberDeclarations"/>
+      </div>
+    </xsl:for-each>
+  </xsl:template>
+
+  <xsl:template name="EventSinksOverview" match="/EventSinks">
+    <a>
+      <xsl:attribute name="name"><xsl:value-of select="/Library/@Name"/>.EventSinks</xsl:attribute>
+    </a>
+    <div class="h1">Event Sinks</div>
+    <div class="section">
+      <p>
+        The following table lists the Event Sinks defined in "<xsl:value-of select="/Library/@Name"/>":
+      </p>
+      <table width="80%">
+        <xsl:for-each select="./EventSinks/EventSink/Interfaces/Interface">
+          <tr>
+            <td valign="top" width="250">
+              <a>
+                <xsl:attribute name="href">#<xsl:value-of select="../../@Name"/></xsl:attribute>
+                <xsl:value-of select="../../@Name"/><xsl:if test="../../@Ancestor">(<xsl:value-of select="../../@Ancestor"/>)</xsl:if>
+              </a>
+            </td>
+            <td>
+              <pre>
+                <xsl:value-of select="../../Documentation"/>
+              </pre>
+            </td>
+          </tr>
+        </xsl:for-each>
+      </table>
+      <xsl:call-template name="EventSinksMembers"/>
+    </div>
+  </xsl:template>
+  <xsl:template name="EventSinksMembers" match="/EventSinks">
+    <xsl:for-each select="./EventSinks/EventSink/Interfaces/Interface">
+      <a>
+        <xsl:attribute name="name"><xsl:value-of select="../../@Name"/></xsl:attribute>
+      </a>
+      <div class="h2">
+        Event Sink <i>
+          <xsl:value-of select="../../@Name"/>
+        </i>
+      </div>
+      <div class="section">
+        <p>
+          The following table lists the Events defined in "<xsl:value-of select="../../@Name"/>":
+        </p>
+        <table width="80%">
+          <xsl:for-each select="./Operations/Operation">
+            <tr>
+              <td valign="top" width="250">
+                <a>
+                  <xsl:attribute name="href">#<xsl:value-of select="../../../../@Name"/>.<xsl:value-of select="@Name"/></xsl:attribute>
+                  <xsl:value-of select="@Name"/>
+                </a>
+              </td>
+              <td>
+                <pre>
+                  <xsl:value-of select="Documentation"/>
+                </pre>
+              </td>
+            </tr>
+          </xsl:for-each>
+        </table>
+        <xsl:call-template name="EventMemberDeclarations"/>
+      </div>
+    </xsl:for-each>
+  </xsl:template>
+
+
+  <xsl:template name="MemberDeclarations">
+    <xsl:for-each select="./Operations/Operation">
+      <a>
+        <xsl:attribute name="name"><xsl:value-of select="../../../../@Name"/>.<xsl:value-of select="@Name"/></xsl:attribute>
+      </a>
+      <h3>
+        Method <i>
+          <!--<xsl:value-of select="../../../../@Name"/>.-->
+          <xsl:value-of select="@Name"/>
+        </i>
+      </h3>
+      <p>
+        <pre>
+          <xsl:value-of select="Documentation"/>
+        </pre>
+      </p>
+      <xsl:apply-templates select="Parameters"/>
+    </xsl:for-each>
+  </xsl:template>
+  <xsl:template name="EventMemberDeclarations">
+    <xsl:for-each select="./Operations/Operation">
+      <a>
+        <xsl:attribute name="name"><xsl:value-of select="../../../../@Name"/>.<xsl:value-of select="@Name"/></xsl:attribute>
+      </a>
+      <h3>
+        Event <i>
+          <!--<xsl:value-of select="../../../../@Name"/>.-->
+          <xsl:value-of select="@Name"/>
+        </i>
+      </h3>
+      <p>
+        <pre>
+          <xsl:value-of select="@Documentation"/>
+        </pre>
+      </p>
+      <xsl:apply-templates select="Parameters"/>
+    </xsl:for-each>
+  </xsl:template>
+
+  <xsl:template match="Parameters">
+    <xsl:call-template name="Parameters"/>
+    <h4>Chrome Syntax:</h4>
+    <code>
+      <b>method </b>
+
+      <xsl:value-of select="../../../../../@Name"/>.<xsl:value-of select="../@Name"/>(<xsl:for-each select="Parameter[@Flag!='Result']">
+        <xsl:call-template name="Declaration">
+          <xsl:with-param name="Language" select="'Pascal'"/>
+        </xsl:call-template>
+      </xsl:for-each>)<xsl:for-each select="Parameter[@Flag='Result']">
+
+        <xsl:call-template name="Declaration">
+          <xsl:with-param name="Language" select="'Pascal'"/>
+        </xsl:call-template>
+
+      </xsl:for-each>;
+    </code>
+    <h4>C# Syntax:</h4>
+    <code>
+      <xsl:choose>
+        <xsl:when test="count(./Parameter[@Name='Result']) = 1">
+          public <xsl:value-of select="./Parameter[@Flag='Result']/@DataType"/><xsl:text> </xsl:text>
+        </xsl:when>
+        <xsl:otherwise>
+          public void
+        </xsl:otherwise>
+      </xsl:choose>
+      <xsl:value-of select="../../../../../@Name"/>.<xsl:value-of select="../@Name"/>(<xsl:for-each select="Parameter[@Flag!='Result']">
+        <xsl:call-template name="Declaration">
+          <xsl:with-param name="Language" select="'CSharp'"/>
+        </xsl:call-template>
+      </xsl:for-each>);
+    </code>
+
+    <!--<h3>Parameters</h3>
+		<xsl:call-template name="Parameters"/>
+		<h3>Return Value</h3>
+		<xsl:call-template name="ReturnValue"/>
+		<p>
+			<a>
+				<xsl:attribute name="href">#<xsl:value-of select="/Library/@Name"/></xsl:attribute>
+				<xsl:value-of select="/Library/@Name"/>
+			</a>
+			<xsl:text>
+				</xsl:text>
+			<a>
+				<xsl:attribute name="href">#<xsl:value-of select="../../../../../@Name"/></xsl:attribute>
+				<xsl:value-of select="../../../../../@Name"/>
+			</a>
+		</p>-->
+  </xsl:template>
+
+
+  <xsl:template name="Parameters">
+    <h4>Parameters:</h4>
+    <xsl:choose>
+      <xsl:when test="count(Parameter[@Name!='Result']) = 0">None.</xsl:when>
+      <xsl:otherwise>
+        <table xmlns="http://www.w3.org/1999/xhtml">
+          <tr>
+            <th>Flag</th>
+            <th>Name</th>
+            <th>Type</th>
+            <th>Description</th>
+          </tr>
+          <xsl:for-each select="Parameter[@Name!='Result']">
+            <tr>
+              <td>
+                <xsl:value-of select="@Flag"/>
+              </td>
+              <td>
+                <xsl:value-of select="@Name"/>
+              </td>
+              <td>
+                <xsl:value-of select="@DataType"/>
+              </td>
+              <td>
+                <pre>
+                  <xsl:value-of select="Documentation"/>
+                </pre>
+              </td>
+            </tr>
+          </xsl:for-each>
+        </table>
+      </xsl:otherwise>
+    </xsl:choose>
+  </xsl:template>
+
+
+
+  <xsl:template name="ReturnValue">
+    <xsl:choose>
+      <xsl:when test="count(Parameter[@Flag='Result']) = 0">None.</xsl:when>
+      <xsl:otherwise>
+        <xsl:for-each select="Parameter[@Flag='Result']">
+          <!-- the Result-comment -->
+          Dear RemObjects Team: Please add a Parameter documentation to your rodl-file!
+        </xsl:for-each>
+      </xsl:otherwise>
+    </xsl:choose>
+  </xsl:template>
+
+
+
+  <xsl:template name="Declaration">
+    <xsl:param name="Language"/>
+    <xsl:choose>
+      <xsl:when test="$Language='Pascal'">
+        <xsl:call-template name="GeneratePascalParameter"/>
+      </xsl:when>
+      <xsl:when test="$Language='CSharp'">
+        <xsl:call-template name="GenerateCSharpParameter"/>
+      </xsl:when>
+    </xsl:choose>
+  </xsl:template>
+
+
+  <xsl:template name="GeneratePascalParameter">
+    <xsl:choose>
+      <xsl:when test="position()=1 and @Flag != 'Result'">
+        <xsl:call-template name="FlagToSpec">
+          <xsl:with-param name="Flag" select="@Flag"/>
+        </xsl:call-template>
+        <xsl:value-of select="@Name"/>: <xsl:value-of select="@DataType"/>
+      </xsl:when>
+      <xsl:when test="@Flag = 'Result'">
+        : <xsl:value-of select="@DataType"/>
+      </xsl:when>
+      <xsl:when test="position()=last()">
+        ; <xsl:call-template name="FlagToSpec">
+          <xsl:with-param name="Flag" select="@Flag"/>
+        </xsl:call-template>
+        <xsl:value-of select="@Name"/>: <xsl:value-of select="@DataType"/>
+      </xsl:when>
+      <xsl:when test="position()>1">
+        ; <xsl:call-template name="FlagToSpec">
+          <xsl:with-param name="Flag" select="@Flag"/>
+        </xsl:call-template>
+        <xsl:value-of select="@Name"/>: <xsl:value-of select="@DataType"/>
+      </xsl:when>
+    </xsl:choose>
+  </xsl:template>
+
+
+
+  <xsl:template name="GenerateCSharpParameter">
+    <xsl:choose>
+      <xsl:when test="position()=1 and @Flag != 'Result'">
+        <xsl:call-template name="FlagToSpecCSharp">
+          <xsl:with-param name="Flag" select="@Flag"/>
+        </xsl:call-template>
+        <xsl:call-template name="DataTypeToCSharp">
+          <xsl:with-param name="DataType" select="@DataType"/>
+        </xsl:call-template>
+        <xsl:text> </xsl:text>
+        <xsl:value-of select="@Name"/>
+      </xsl:when>
+      <xsl:when test="position()=last()">
+        , <xsl:call-template name="FlagToSpecCSharp">
+          <xsl:with-param name="Flag" select="@Flag"/>
+        </xsl:call-template>
+        <xsl:call-template name="DataTypeToCSharp">
+          <xsl:with-param name="DataType" select="@DataType"/>
+        </xsl:call-template>
+        <xsl:text> </xsl:text>
+        <xsl:value-of select="@Name"/>
+      </xsl:when>
+      <xsl:when test="position()>1">
+        , <xsl:call-template name="FlagToSpecCSharp">
+          <xsl:with-param name="Flag" select="@Flag"/>
+        </xsl:call-template>
+        <xsl:call-template name="DataTypeToCSharp">
+          <xsl:with-param name="DataType" select="@DataType"/>
+        </xsl:call-template>
+        <xsl:text> </xsl:text>
+        <xsl:value-of select="@Name"/>
+      </xsl:when>
+    </xsl:choose>
+  </xsl:template>
+  <xsl:template name="FlagToSpec">
+    <xsl:param name="Flag"/>
+    <xsl:choose>
+      <xsl:when test="$Flag='In'">
+        <b>const </b>
+      </xsl:when>
+      <xsl:when test="$Flag='InOut'">
+        <b>var </b>
+      </xsl:when>
+      <xsl:otherwise/>
+    </xsl:choose>
+  </xsl:template>
+
+  <xsl:template name="DataTypeToCSharp">
+    <xsl:param name="DataType"/>
+    <xsl:choose>
+      <xsl:when test="$DataType='Integer'">
+        Int32
+      </xsl:when>
+      <xsl:when test="$DataType='Widestring'">
+        String
+      </xsl:when>
+      <xsl:otherwise>
+        <xsl:value-of select="$DataType"/>
+      </xsl:otherwise>
+    </xsl:choose>
+  </xsl:template>
+
+  <xsl:template name="FlagToSpecCSharp">
+    <xsl:param name="Flag"/>
+    <xsl:choose>
+      <xsl:when test="$Flag='In'">
+        <!--<b>const </b>-->
+      </xsl:when>
+      <xsl:when test="$Flag='InOut'">
+        <b>ref </b>
+      </xsl:when>
+      <xsl:when test="$Flag='Out'">
+        <b>out </b>
+      </xsl:when>
+      <xsl:otherwise/>
+    </xsl:choose>
+  </xsl:template>
+
+  <xsl:template name="StructsOverview" match="/Structs">
+    <a>
+      <xsl:attribute name="name"><xsl:value-of select="/Library/@Name"/>.Structs</xsl:attribute>
+    </a>
+    <div class="h1">Structs</div>
+    <div class="section">
+      <p>
+        The following table lists the Structs defined in "<xsl:value-of select="/Library/@Name"/>":
+      </p>
+      <table width="80%">
+        <xsl:for-each select="./Structs/Struct">
+          <tr>
+            <td valign="top" width="250">
+              <a>
+                <xsl:attribute name="href">#<xsl:value-of select="@Name"/></xsl:attribute>
+                <xsl:value-of select="@Name"/><xsl:if test="@Ancestor">(<xsl:value-of select="@Ancestor"/>)</xsl:if>
+              </a>
+            </td>
+            <td>
+              <pre>
+                <xsl:value-of select="Documentation"/>
+              </pre>
+            </td>
+          </tr>
+        </xsl:for-each>
+      </table>
+     <xsl:call-template name="StructsMembers"/>
+    </div>
+  </xsl:template>
+  
+   
+  <xsl:template name="StructsMembers" match="/Structs">
+    <xsl:for-each select="./Structs/Struct">
+      <a>
+        <xsl:attribute name="name"><xsl:value-of select="@Name"/></xsl:attribute>
+      </a>
+      <div class="h2">
+        Struct <i>
+          <xsl:value-of select="@Name"/>
+        </i>
+      </div>
+      <div class="section">
+        <p>
+          The following table lists the fields defined in "<xsl:value-of select="@Name"/>":
+        </p>
+        <table width="80%">
+		<tr>
+		
+		<th>Field</th>
+		<th>Data Type</th>
+		<th>Documentation</th>
+		</tr>
+          <xsl:for-each select="./Elements/Element">
+            <tr>
+              <td valign="top" width="250">
+                <a>
+                  <xsl:attribute name="href">#<xsl:value-of select="../../@Name"/>.<xsl:value-of select="@Name"/></xsl:attribute>
+                  <xsl:value-of select="@Name"/>
+                </a>
+              </td>
+		  <td>
+			<xsl:call-template name="LinkToDataType">
+			  <xsl:with-param name="DataType" select="@DataType"/>
+			</xsl:call-template>
+		  </td>
+              <td>
+                <pre>
+                  <xsl:value-of select="Documentation"/>
+                </pre>
+              </td>
+            </tr>
+          </xsl:for-each>
+        </table>
+        <xsl:call-template name="MemberDeclarations"/>
+      </div>
+    </xsl:for-each>
+  </xsl:template>
+  
+  <xsl:template name="LinkToDataType">
+    <xsl:param name="DataType"/>
+    <xsl:choose>
+      <xsl:when test="(count(/Library/Enums/Enum[@Name=$DataType]) = 1) or (count(/Library/Structs/Struct[@Name=$DataType]) = 1) or (count(/Library/Arrays/Array[@Name=$DataType]) = 1)">
+        <a>
+          <xsl:attribute name="href">#<xsl:value-of select="$DataType"/></xsl:attribute>
+          <xsl:value-of select="$DataType"/>
+        </a>
+      </xsl:when>
+      <xsl:otherwise>
+        <xsl:value-of select="$DataType"/>
+      </xsl:otherwise>
+    </xsl:choose>
+  </xsl:template>
+
+  <xsl:template name="EnumsOverview" match="/Enums">
+    <a>
+      <xsl:attribute name="name"><xsl:value-of select="/Library/@Name"/>.Enums</xsl:attribute>
+    </a>
+    <div class="h1">Enums</div>
+    <div class="section">
+      <p>
+        The following table lists the Enums defined in "<xsl:value-of select="/Library/@Name"/>":
+      </p>
+      <table width="80%">
+        <xsl:for-each select="./Enums/Enum">
+          <tr>
+            <td valign="top" width="250">
+              <a>
+                <xsl:attribute name="href">#<xsl:value-of select="@Name"/></xsl:attribute>
+                <xsl:value-of select="@Name"/>
+              </a>
+            </td>
+            <td>
+              <pre>
+                <xsl:value-of select="Documentation"/>
+              </pre>
+            </td>
+          </tr>
+        </xsl:for-each>
+      </table>
+          <xsl:call-template name="EnumsMembers"/>
+    </div>
+  </xsl:template>
+   
+  <xsl:template name="EnumsMembers" match="/Enums">
+    <xsl:for-each select="./Enums/Enum">
+    <a>
+      <xsl:attribute name="name"><xsl:value-of select="@Name"/></xsl:attribute>
+    </a>
+    <div class="h2">
+      Enum <i><xsl:value-of select="@Name"/></i>
+    </div>
+      <div class="section">
+        <p>
+          The following table lists the values defined in "<xsl:value-of select="@Name"/>":
+		  </p>
+    <table width="80%">
+      <tr vAlign="top">
+        <th>Value</th>
+        <th>Documentation</th>
+      </tr>
+      <xsl:for-each select="EnumValues/EnumValue">
+        <tr>
+          <td valign="top" width="250">
+		    <a>
+			<xsl:attribute name="name"><xsl:value-of select="../../@Name"/>.<xsl:value-of select="@Name"/></xsl:attribute>
+			</a>
+            <xsl:value-of select="@Name"/>
+          </td>
+			<td>
+              <pre>
+                <xsl:value-of select="Documentation"/>
+              </pre>
+            </td>
+        </tr>
+      </xsl:for-each>
+    </table>
+	</div>
+  </xsl:for-each>		
+  </xsl:template>
+
+  <xsl:template name="ArraysOverview" match="/Arrays">
+    <a>
+      <xsl:attribute name="name"><xsl:value-of select="/Library/@Name"/>.Arrays</xsl:attribute>
+    </a>
+    <div class="h1">Arrays</div>
+    <div class="section">
+
+      <p>
+        The following table lists the Arrays defined in "<xsl:value-of select="/Library/@Name"/>":
+      </p>
+      <table width="80%">
+      <tr vAlign="top">
+        <th>Array</th>
+        <th>Element Type</th>
+        <th>Documentation</th>
+      </tr>
+      <xsl:for-each select="./Arrays/Array">
+          <tr>
+            <td valign="top" width="250">
+              <a>
+                <xsl:attribute name="href">#<xsl:value-of select="@Name"/></xsl:attribute>
+                <xsl:value-of select="@Name"/>
+              </a>
+            </td>
+			<td>
+			<xsl:call-template name="LinkToDataType">
+            <xsl:with-param name="DataType" select="ElementType/@DataType"/>
+            </xsl:call-template>
+		   </td>
+            <td>
+              <pre>
+                <xsl:value-of select="Documentation"/>
+              </pre>
+            </td>
+          </tr>
+        </xsl:for-each>
+      </table>
+    </div>
+  </xsl:template>
+
+  <xsl:template name="ExceptionsOverview" match="/Exceptions">
+    <a>
+      <xsl:attribute name="name"><xsl:value-of select="/Library/@Name"/>.Exceptions</xsl:attribute>
+    </a>
+    <div class="h1">Exceptions</div>
+    <div class="section">
+      <p>
+        The following table lists the Exceptions defined in "<xsl:value-of select="/Library/@Name"/>":
+      </p>
+      <table width="80%">
+        <xsl:for-each select="./Exceptions/Exception">
+          <tr>
+            <td valign="top" width="250">
+               <a>
+                <xsl:attribute name="href">#<xsl:value-of select="@Name"/></xsl:attribute>
+                <xsl:value-of select="@Name"/><xsl:if test="@Ancestor">(<xsl:value-of select="@Ancestor"/>)</xsl:if>
+              </a>
+            </td>
+            <td>
+              <pre>
+                <xsl:value-of select="Documentation"/>
+              </pre>
+            </td>
+          </tr>
+        </xsl:for-each>
+      </table>
+          <xsl:call-template name="ExceptionsMembers"/>
+    </div>
+  </xsl:template>
+  
+  <xsl:template name="ExceptionsMembers" match="/Exceptions">
+    <xsl:for-each select="./Exceptions/Exception">
+    <a>
+      <xsl:attribute name="name"><xsl:value-of select="@Name"/></xsl:attribute>
+    </a>
+    <div class="h2">
+      Exception <i><xsl:value-of select="@Name"/></i>
+    </div>
+    <div class="section">
+        <p>
+          The following table lists the fields defined in "<xsl:value-of select="@Name"/>":
+        </p>
+		<table width="80%">
+		<tr>
+		
+		<th>Field</th>
+		<th>Data Type</th>
+		<th>Documentation</th>
+		</tr>
+		<xsl:for-each select="Elements/Element">
+		  <tr><td>
+			<xsl:value-of select="@Name"/>
+		  </td>
+		  <td>
+			<xsl:call-template name="LinkToDataType">
+			  <xsl:with-param name="DataType" select="@DataType"/>
+			</xsl:call-template>
+		  </td>
+		  <td>
+              <pre>
+                <xsl:value-of select="Documentation"/>
+              </pre>
+            </td>
+			</tr>
+		</xsl:for-each>
+		</table>
+	</div>
+  </xsl:for-each>
+  </xsl:template>
+
+
+  <xsl:template name="UsesOverview" match="/Uses">
+    <a>
+      <xsl:attribute name="name"><xsl:value-of select="/Library/@Name"/>.Uses</xsl:attribute>
+    </a>
+    <div class="h1">
+      Used RODL Files
+    </div>
+    <div class="section">
+      <p>
+        The following table lists the external RODL files used by library "<xsl:value-of select="/Library/@Name"/>":
+      </p>
+      <table width="80%">
+        <xsl:for-each select="./Uses/Use">
+          <tr>
+            <td valign="top" width="250" rowspan="2">
+              <xsl:value-of select="@Name"/>
+            </td>
+            <td>
+              <xsl:value-of select="@Rodl"/>
+            </td>
+          </tr>
+          <tr>
+            <td>
+              <pre>
+                <xsl:value-of select="Documentation"/>
+              </pre>
+            </td>
+          </tr>
+        </xsl:for-each>
+      </table>
+    </div>
+  </xsl:template>
+</xsl:stylesheet>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIcsAsyncSuperTcpServer.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIcsAsyncSuperTcpServer.pas
new file mode 100644
index 0000000..5306a44
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIcsAsyncSuperTcpServer.pas	
@@ -0,0 +1,1073 @@
+unit uROIcsAsyncSuperTcpServer;
+
+{$I RemObjects.inc}
+interface
+
+uses
+  Classes, Messages, SySutils, SyncObjs, Contnrs,
+  uROAsyncSuperTcpServer, uROAsyncSCHelpers, uROClientIntf, uROServerIntf,
+  uROThreadPool, uROSessions
+  {$IFDEF RemObjects_ICS_v5} , WSocket, WSocketS {$ENDIF}
+  {$IFDEF RemObjects_ICS_v6} , OverbyteIcsWSocket, OverbyteIcsWSocketS {$ENDIF}
+  ;
+
+type
+  // forward declarations
+  TROIcsTCPConnection = class;
+  TROAsyncSuperTcpServerSocketClient = class;
+
+  // A thread that reads messages for a given number of sockets
+  TROIcsMessagePumpThread = class(TROInitializedThread)
+  private
+    FAddedSocketsSection: TCriticalSection;
+    FRemovedSocketsSection: TCriticalSection;
+    FSockets: TObjectList;
+    FAddedSockets: TObjectList;
+    FRemovedSockets: TObjectList;
+
+    function GetSocket(Index: Integer): TCustomWSocket;
+    property Sockets[Index: Integer]: TCustomWSocket read GetSocket;
+
+    procedure InternalRemoveSocket(ASocket: TCustomWSocket);
+
+    procedure LockAddedSockets;
+    procedure UnlockAddedSockets;
+    procedure LockRemovedSockets;
+    procedure UnlockRemovedSockets;
+  public
+    constructor Create;
+    destructor Destroy; override;
+
+    procedure Execute; override;
+
+    procedure AddSocket(ASocket: TCustomWSocket);
+    procedure RemoveSocket(ASocket: TCustomWSocket);
+  end;
+
+  // A server socket
+  TROWSocketServer = class(TCustomWSocketServer)
+  protected
+    FMessagePumpThread: TROIcsMessagePumpThread;
+    
+    procedure WndProc(var MsgRec: TMessage); override;
+    procedure InternalClose(bShut : Boolean; Error : Word); override;
+    procedure TriggerClientConnect(Client : TWSocketClient; Error : Word); override;
+  public
+    constructor Create(AOwner: TComponent); override;
+    destructor Destroy; override;
+    procedure Listen; override;
+    property ClientCount;
+    property Client;
+  end;
+
+  // Server component
+  TROCustomIcsAsyncSuperTcpServer = class(TROBaseAsyncSuperTcpServer)
+  private
+    fPort: Integer;
+    FServerSocket: TROWSocketServer;
+    FWorkers: TObjectList;
+    fAutoRegisterSession: Boolean;
+
+    procedure SetPort(const Value: Integer);
+    procedure ServerSocketClientCreate(Sender: TObject; Client: TWSocketClient);
+    procedure ServerSocketClientConnect(Sender: TObject; Client: TWSocketClient; Error: Word);
+    procedure ServerSocketClientDisconnect(Sender: TObject; Client: TWSocketClient; Error: Word);
+    procedure ServerSocketBgException(Sender: TObject; E: Exception; var CanClose: Boolean);
+  protected
+    procedure IntSetActive(const Value: boolean); override;
+    function IntGetActive: boolean; override;
+
+    procedure Connect;
+    procedure Disconnect;
+  public
+    constructor Create(aOwner: TComponent); override;
+    destructor Destroy; override;
+
+    property Port: Integer read fPort write SetPort default 8095;
+    property ServerSocket: TROWSocketServer read FServerSocket;
+    property AutoRegisterSession: Boolean read fAutoRegisterSession write fAutoRegisterSession default true;
+  end;
+
+  TROIcsAsyncSuperTCPServer = class(TROCustomIcsAsyncSuperTcpServer)
+  published
+    property Port;
+    property AutoRegisterSession;
+  end;
+
+  // Server component worker
+  TROIcsAsyncSuperChannelWorker = class(TROAsyncSuperChannelWorker, IROTCPTransport, IROActiveEventServer)
+  private
+    FServer: TROCustomIcsAsyncSuperTcpServer;
+    FClient: TROAsyncSuperTcpServerSocketClient;
+    FEventManager: IROSessionsChangesListener;
+  protected
+    { IROTCPTransport }
+    function GetClientAddress : string;
+
+    { IROActiveEventServer }
+    procedure EventsRegistered(aSender : TObject; aClient: TGUID);
+    procedure DispatchEvent(anEventDataItem : TROEventData; aSessionReference : TGUID; aSender: TObject);
+
+    // overriden methods
+    procedure IncomingData(Id: Integer; aData: TByteArray); override;
+    procedure Connected; override;
+    procedure Disconnected(var RestartLoop: Boolean); override;
+  public
+    constructor Create(AServer: TROCustomIcsAsyncSuperTcpServer; AClient: TROAsyncSuperTcpServerSocketClient);
+    destructor Destroy; override;
+  end;
+
+  // Client socket
+  TROAsyncSuperTcpServerSocketClient = class(TWSocketClient)
+  private
+    FAbstractTCPConnection: TROIcsTCPConnection;
+    FWorker: TROIcsAsyncSuperChannelWorker;
+
+    FOnDisconnected: TROAsyncCallback;
+    FOnHaveIncompleteData: TROAsyncCallback;
+
+    FInternalReceiveBuffer: array of Byte;
+    FInternalReceivedBytes: Integer;
+
+    FRequestedReceiveBytes: Integer;
+    FReceiveBuffer: Pointer;
+    FReceivedBytes: Integer;
+    FReceiveCallback: TROAsyncCallback;
+
+    FSentBytes: Integer;
+    FSendCallback: TROAsyncCallback;
+
+    FError: Boolean;
+    FConnectCallback: TROAsyncCallback;
+    FDisconnectCallback: TROAsyncCallback;
+
+    FMessagePumpThread: TROIcsMessagePumpThread;
+
+    procedure ReceiveBytes;
+    function InternalReceive(Buffer : Pointer; BufferSize: Integer): Integer; 
+
+    procedure DoSendCallback;
+    procedure DoConnectCallback;
+    procedure DoDisconnectCallback;
+    procedure DoReceiveCallback;
+    procedure DoOnDisconnected;
+    procedure DoOnHaveIncompleteData;
+  protected
+    // overriden from TWSocket
+    procedure TriggerDataSent(Error: Word); override;
+    procedure TriggerSessionConnectedSpecial(Error : Word); override;
+    procedure TriggerSessionConnected(Error: Word); override;
+    procedure TriggerError; override;
+    function TriggerDataAvailable(Error: Word): Boolean; override;
+
+    // These ones are event handlers because there is no TriggerXXX for them
+    procedure HandleBgException(Sender: TObject; E: Exception; var CanClose: Boolean);
+  public
+    // overriden from TWSocket
+    procedure TriggerSessionClosed(Error: Word); override;
+    procedure StartConnection; override;
+
+    constructor Create(AOwner: TComponent); override;
+    destructor Destroy; override;
+
+    function GetAbstractTCPConnection: IROAbstractTCPConnection;
+  end;
+
+  IROAsyncICSSocket = interface
+  ['{969B866F-9487-4359-86A7-2B1B098D2D38}']
+    function GetSelf: TROIcsTCPConnection;
+  end;
+
+  // Class for interface
+  TROIcsTCPConnection = class(TInterfacedObject, IROAbstractTCPConnection, IROAsyncICSSocket)
+  private
+    FClientSocket: TROAsyncSuperTcpServerSocketClient;
+  protected
+    { IROAbstractTCPConnection }
+    procedure BeginReceive(aData: Pointer; aSize: Integer; aCallback: TROAsyncCallback);
+    procedure BeginSend(aData: Pointer; aSize: Integer; aCallback: TROAsyncCallback);
+
+    function EndReceive: Integer;
+    function EndSend: Integer;
+
+    procedure BeginDisconnect(aForce: Boolean; aCallback: TROAsyncCallback);
+    procedure EndDisconnect;
+
+    procedure BeginConnect(const aAdress: string; aPort: Integer; aCallback: TROAsyncCallback);
+    function EndConnect: Boolean;
+
+    procedure SetOnDisconnected(aCallback: TROAsyncCallback);
+    function GetOnDisconnected: TROAsyncCallback;
+
+    procedure SetOnHaveIncompleteData(aCallback: TROAsyncCallback);
+    function GetOnHaveIncompleteData: TROAsyncCallback;
+    function GetSelf: TROIcsTCPConnection;
+  public
+    constructor Create(ClientSocket: TROAsyncSuperTcpServerSocketClient);
+    destructor Destroy; override;
+  end;
+
+implementation
+
+uses
+  Math, Windows, Winsock, uROClasses, uROEventRepository, uROTypes;
+
+const
+  InternalReceiveBufferSize = 1024;  // Size in bytes of the internal receive buffer, for each client socket
+
+var
+  FServerSocketsMessagePump: TROIcsMessagePumpThread;
+  FClientSocketsMessagePump: TROIcsMessagePumpThread;
+
+function GetServerSocketMessagePump(ASocket: TCustomWSocket): TROIcsMessagePumpThread;
+begin
+  if not Assigned(FServerSocketsMessagePump) then
+    FServerSocketsMessagePump := TROIcsMessagePumpThread.Create;
+
+  Result := FServerSocketsMessagePump;
+//  Result.FForClients := False;
+  Result.AddSocket(ASocket);
+end;
+
+function GetClientSocketMessagePump(ASocket: TCustomWSocket): TROIcsMessagePumpThread;
+begin
+  if not Assigned(FClientSocketsMessagePump) then
+    FClientSocketsMessagePump := TROIcsMessagePumpThread.Create;
+
+  Result := FClientSocketsMessagePump;
+//  Result.FForClients := True;
+  Result.AddSocket(ASocket);
+end;
+
+{ TROWSocketServer }
+
+procedure TROWSocketServer.InternalClose(bShut: Boolean; Error: Word);
+var
+  I: Integer;
+begin
+  inherited InternalClose(bShut, Error);
+
+  // to mimick what Indy is doing, we disconnect all clients
+  for I := 0 to ClientCount - 1 do
+    Client[I].CloseDelayed;
+end;
+
+procedure TROWSocketServer.Listen;
+begin
+  inherited Listen;
+end;
+
+procedure TROWSocketServer.TriggerClientConnect(Client: TWSocketClient;
+  Error: Word);
+var
+  optval: Integer;
+  iStatus: Integer;
+begin
+  inherited TriggerClientConnect(Client, Error);
+
+  if wsoTcpNoDelay in FComponentOptions then
+  begin
+    optval := -1; { true, 0=false }
+    iStatus := WSocket_setsockopt(Client.HSocket, IPPROTO_TCP, TCP_NODELAY, @optval, SizeOf(optval));
+    if iStatus <> 0 then
+    begin
+      SocketError('setsockopt(IPPROTO_TCP, TCP_NODELAY)');
+      Exit;
+    end;
+  end;
+end;
+
+constructor TROWSocketServer.Create(AOwner: TComponent);
+begin
+  inherited Create(AOwner);
+
+  ComponentOptions := ComponentOptions + [wsoTcpNoDelay];
+end;
+
+destructor TROWSocketServer.Destroy;
+begin
+  inherited Destroy;
+
+  // Done after because the inherited Destroy might want to do some network cleanup
+  if Assigned(FMessagePumpThread) then
+    FMessagePumpThread.RemoveSocket(Self);
+end;
+
+procedure TROWSocketServer.WndProc(var MsgRec: TMessage);
+begin
+  inherited WndProc(MsgRec);
+end;
+
+{ TROCustomIcsAsyncSuperTcpServer }
+
+procedure TROCustomIcsAsyncSuperTcpServer.Connect;
+begin
+  // Assign properties here as Close clears them
+  FServerSocket.Port := IntToStr(fPort);
+  FServerSocket.Proto := 'tcp';
+  FServerSocket.Addr := '0.0.0.0';  // Listen on any interface 
+  FServerSocket.Listen;
+end;
+
+constructor TROCustomIcsAsyncSuperTcpServer.Create(aOwner: TComponent);
+begin
+  inherited Create(aOwner);
+
+  fPort := 8095;
+
+  FWorkers := TObjectList.Create;
+
+  FServerSocket := TROWSocketServer.Create(nil);
+  FServerSocket.ClientClass := TROAsyncSuperTcpServerSocketClient;
+  FServerSocket.Banner := '';
+  FServerSocket.BannerTooBusy := '';
+  FServerSocket.OnClientCreate := ServerSocketClientCreate;
+  FServerSocket.OnClientConnect := ServerSocketClientConnect;
+  FServerSocket.OnClientDisconnect := ServerSocketClientDisconnect;
+  FServerSocket.OnBgException := ServerSocketBgException;
+  FServerSocket.FMessagePumpThread := GetServerSocketMessagePump(FServerSocket);
+  fAutoRegisterSession:= False;
+end;
+
+destructor TROCustomIcsAsyncSuperTcpServer.Destroy;
+var
+  i: Integer;
+begin
+  for i := FWorkers.Count -1 downto 0 do begin
+    fWorkers[i] := nil;
+  end;
+  inherited Destroy;
+
+  // Done after because the inherited Destroy sets Active to False which
+  // tries to disconnect the socket
+  FServerSocket.Free;
+  FWorkers.Free;
+end;
+
+procedure TROCustomIcsAsyncSuperTcpServer.Disconnect;
+begin
+  FServerSocket.Close;
+end;
+
+function TROCustomIcsAsyncSuperTcpServer.IntGetActive: boolean;
+begin
+  Result := not (FServerSocket.State in [wsClosed, wsInvalidState]); 
+end;
+
+procedure TROCustomIcsAsyncSuperTcpServer.IntSetActive(const Value: boolean);
+begin
+  if Value <> Active then
+  begin
+    if fThreadPool = nil then begin
+      fThreadPool := TROThreadPool.Create(nil);
+      fOwnsThreadpool := true;
+    end;
+
+    if Value then
+      Connect
+    else
+      Disconnect;
+  end;
+end;
+
+// This handler is called when a listening (server) socket experienced a
+// background exception. Should normally never occurs.
+procedure TROCustomIcsAsyncSuperTcpServer.ServerSocketBgException(
+  Sender: TObject; E: Exception; var CanClose: Boolean);
+begin
+  raise EROException.CreateFmt('Server exception %s occured: %s', [E.ClassName, E.Message]);
+  CanClose := False;  // Let's hope server can still continue
+end;
+
+procedure TROCustomIcsAsyncSuperTcpServer.ServerSocketClientConnect(
+  Sender: TObject; Client: TWSocketClient; Error: Word);
+var
+  Worker: TROIcsAsyncSuperChannelWorker;
+begin
+  Worker := TROIcsAsyncSuperChannelWorker.Create(Self, Client as TROAsyncSuperTcpServerSocketClient);
+  Worker.DoSetup;
+  
+  FWorkers.Add(Worker);
+end;
+
+procedure TROCustomIcsAsyncSuperTcpServer.ServerSocketClientCreate(
+  Sender: TObject; Client: TWSocketClient);
+begin
+  TROAsyncSuperTcpServerSocketClient(Client).FMessagePumpThread := GetClientSocketMessagePump(Client);
+end;
+
+procedure TROCustomIcsAsyncSuperTcpServer.ServerSocketClientDisconnect(
+  Sender: TObject; Client: TWSocketClient; Error: Word);
+begin
+  // Wait for client to be actually disconnected before removing the worker
+  while Client.State <> wsClosed do
+    SleepEx(5, True);
+  
+  FWorkers.Remove((Client as TROAsyncSuperTcpServerSocketClient).FWorker);
+end;
+
+procedure TROCustomIcsAsyncSuperTcpServer.SetPort(const Value: Integer);
+begin
+  if fPort <> Value then
+  begin
+    fPort := Value;
+    FServerSocket.Port := IntToStr(fPort);
+  end;
+end;
+
+{ TROAsyncSuperTcpServerSocketClient }
+
+constructor TROAsyncSuperTcpServerSocketClient.Create(AOwner: TComponent);
+begin
+  inherited Create(AOwner);
+
+  // No receive loop so that when the "TriggerDataAvailable" code could not
+  // read all the data available, the message pump is not stopped and any other
+  // client socket associated to it continues to work.
+  ComponentOptions := ComponentOptions + [wsoNoReceiveLoop, wsoTcpNoDelay];
+
+  SetLength(FInternalReceiveBuffer, InternalReceiveBufferSize);
+  OnBgException := HandleBgException;
+end;
+
+destructor TROAsyncSuperTcpServerSocketClient.Destroy;
+begin
+  inherited Destroy;
+
+  // Done after because the inherited Destroy might want to do some network cleanup
+  if Assigned(FMessagePumpThread) then
+    FMessagePumpThread.RemoveSocket(Self);
+
+  if Assigned(FAbstractTCPConnection) then
+    FAbstractTCPConnection.FClientSocket := nil;  
+
+  SetLength(FInternalReceiveBuffer, 0);
+end;
+
+procedure TROAsyncSuperTcpServerSocketClient.DoConnectCallback;
+begin
+  if Assigned(FConnectCallback) then
+    FConnectCallback(GetAbstractTcpConnection);
+end;
+
+procedure TROAsyncSuperTcpServerSocketClient.DoDisconnectCallback;
+begin
+  if Assigned(FDisconnectCallback) then
+    FDisconnectCallback(GetAbstractTcpConnection);
+end;
+
+procedure TROAsyncSuperTcpServerSocketClient.DoOnDisconnected;
+begin
+  if Assigned(FOnDisconnected) then
+    FOnDisconnected(GetAbstractTcpConnection);
+end;
+
+procedure TROAsyncSuperTcpServerSocketClient.DoOnHaveIncompleteData;
+begin
+  if Assigned(FOnHaveIncompleteData) then
+    FOnHaveIncompleteData(GetAbstractTcpConnection);
+end;
+
+procedure TROAsyncSuperTcpServerSocketClient.DoReceiveCallback;
+begin
+  if Assigned(FReceiveCallback) then
+    FReceiveCallback(GetAbstractTcpConnection);
+end;
+
+procedure TROAsyncSuperTcpServerSocketClient.DoSendCallback;
+begin
+  if Assigned(FSendCallback) then
+    FSendCallback(GetAbstractTcpConnection);
+end;
+
+function TROAsyncSuperTcpServerSocketClient.GetAbstractTCPConnection: IROAbstractTCPConnection;
+begin
+  if not Assigned(FAbstractTCPConnection) then
+    FAbstractTCPConnection := TROIcsTCPConnection.Create(Self);
+    
+  Result := FAbstractTCPConnection;
+end;
+
+// This event handler is called when a client socket experience a background
+// exception. It is likely to occurs when client aborted connection and data
+// has not been sent yet.
+// Warning: This procedure is executed in worker thread context.
+procedure TROAsyncSuperTcpServerSocketClient.HandleBgException(Sender: TObject;
+  E: Exception; var CanClose: Boolean);
+begin
+  raise EROException.CreateFmt('Client exception %s occured: %s', [E.ClassName, E.Message]);
+  CanClose := True;  // kill client connection
+end;
+
+function TROAsyncSuperTcpServerSocketClient.InternalReceive(Buffer: Pointer;
+  BufferSize: Integer): Integer;
+begin
+  Result := Min(BufferSize, FInternalReceivedBytes);
+  if Result > 0 then
+  begin
+    // Copy bytes into destination buffer
+    CopyMemory(Buffer, FInternalReceiveBuffer, Result);
+
+    // Shift remaining bytes (if any) in the internal buffer.
+    Dec(FInternalReceivedBytes, Result);
+    if FInternalReceivedBytes > 0 then
+      MoveMemory(FInternalReceiveBuffer, @(FInternalReceiveBuffer[Result]), FInternalReceivedBytes);
+  end;
+end;
+
+procedure TROAsyncSuperTcpServerSocketClient.ReceiveBytes;
+var
+  ReadBytes: Integer;
+begin
+  if Assigned(FReceiveBuffer) then
+  begin
+    // Retrieve the bytes from the internal buffer, if any are available
+    ReadBytes := InternalReceive(FReceiveBuffer, FRequestedReceiveBytes - FReceivedBytes);
+    if ReadBytes >= 0 then
+    begin
+      Inc(FReceivedBytes, ReadBytes);
+      Inc(PByte(FReceiveBuffer), ReadBytes);
+      if FReceivedBytes >= FRequestedReceiveBytes then
+        DoReceiveCallback;
+    end;
+  end;
+end;
+
+procedure TROAsyncSuperTcpServerSocketClient.StartConnection;
+begin
+  inherited StartConnection;
+
+  DoConnectCallback;
+end;
+
+function TROAsyncSuperTcpServerSocketClient.TriggerDataAvailable(
+  Error: Word): Boolean;
+var
+  ReadBytes: Integer;
+begin
+  inherited TriggerDataAvailable(Error);
+
+  // Read the available data into our internal buffer if it can hold more data
+  if FInternalReceivedBytes < InternalReceiveBufferSize  then
+  begin
+    ReadBytes := Receive(@(FInternalReceiveBuffer[FInternalReceivedBytes]), InternalReceiveBufferSize - FInternalReceivedBytes);
+    if ReadBytes >= 0 then
+      Inc(FInternalReceivedBytes, ReadBytes);
+  end;
+
+  // Notify that we have data and immediately try to read them, the callback
+  // might have requested it already. Note that this last part is not strictly
+  // required as the message pump would do it, but it allows faster processing
+  // and less stress on the data buffer when transferring large chunks of data.
+  DoOnHaveIncompleteData;
+  ReceiveBytes;
+
+  // Return True to indicate that we have read the data.
+  Result := True;
+end;
+
+procedure TROAsyncSuperTcpServerSocketClient.TriggerDataSent(Error: Word);
+begin
+  inherited TriggerDataSent(Error);
+
+  DoSendCallback;
+end;
+
+procedure TROAsyncSuperTcpServerSocketClient.TriggerError;
+begin
+  inherited TriggerError;
+
+  FError := True;
+end;
+
+procedure TROAsyncSuperTcpServerSocketClient.TriggerSessionClosed(Error: Word);
+begin
+  // The inherited call will notify the server socket through messaging. So
+  // we do any cleanup before the server is notified as our cleanup must not
+  // be disturbed by the server doing its own cleanup.
+  DoDisconnectCallback;
+  DoOnDisconnected;
+  
+  inherited TriggerSessionClosed(Error);
+end;
+
+procedure TROAsyncSuperTcpServerSocketClient.TriggerSessionConnected(
+  Error: Word);
+begin
+  inherited TriggerSessionConnected(Error);
+end;
+
+procedure TROAsyncSuperTcpServerSocketClient.TriggerSessionConnectedSpecial(
+  Error: Word);
+begin
+  inherited TriggerSessionConnectedSpecial(Error);
+end;
+
+{ TROIcsAsyncSuperChannelWorker }
+
+procedure TROIcsAsyncSuperChannelWorker.Connected;
+var
+  data, rs: Binary;
+  evd: TROEventData;
+  i, len: Longint;
+  fl: boolean;
+begin
+  if assigned(FServer.OnClientConnected) then
+    FServer.OnClientConnected(Self, ClientID);
+  FServer.fClients.LockList;
+  try
+    i := FServer.GuidToClientMap.IndexOf(GUIDToString(ClientId));
+    if i = -1 then
+      FServer.GuidToClientMap.AddObject(GUIDToString(ClientId), Self)
+    else
+      FServer.GuidToClientMap.Objects[i] := Self;
+  finally
+    FServer.fClients.UnlockList;
+  end;
+  if FServer.EventRepository <> nil then
+  begin
+    if FServer.AutoRegisterSession then begin
+      fl := True;
+      FServer.EventRepository.AddSession(ClientID, Self);
+    end
+    else begin
+      fl := FServer.EventRepository.AddActiveListener(ClientID, Self);
+    end;
+    if fl then begin
+      rs := Binary.Create;
+      try
+        FServer.EventRepository.GetEventData(ClientID, rs);
+        rs.Position := 0;
+        if rs.Read(len, sizeof(len)) <> sizeof(len) then exit;
+        while true do begin
+          if rs.Read(len, sizeof(len)) <> sizeof(len) then break;
+          data := Binary.Create;
+          data.CopyFrom(rs, Len);
+          data.Position := 0;
+          evd := TROEventData.Create(data);
+          try
+            DispatchEvent(evd, ClientID, FServer.EventRepository);
+          finally
+            data.Free;
+          end;
+        end;
+      finally
+        rs.Free;
+      end;
+    end;
+  end;
+end;
+
+constructor TROIcsAsyncSuperChannelWorker.Create(
+  AServer: TROCustomIcsAsyncSuperTcpServer; AClient: TROAsyncSuperTcpServerSocketClient);
+begin
+  inherited Create(AClient.GetAbstractTCPConnection);
+
+  FServer := AServer;
+  FClient := AClient;
+
+  IsServer := True;
+  FServer.FClients.Add(self);
+  FClient.FWorker := Self;
+end;
+
+destructor TROIcsAsyncSuperChannelWorker.Destroy;
+begin
+  FServer.FClients.Remove(self);
+  inherited Destroy;
+end;
+
+procedure TROIcsAsyncSuperChannelWorker.Disconnected(var RestartLoop: Boolean);
+var
+  i: Integer;
+begin
+  if fEventManager <> nil then
+    fEventManager.SessionsChangedNotification(ClientID, saRemoveActiveListener, Self);
+  FServer.fClients.LockList;
+  try
+    i := FServer.GuidToClientMap.IndexOf(GUIDToString(ClientId));
+    if i <> -1 then
+    begin
+      if FServer.GuidToClientMap.Objects[i] = self then
+        FServer.GuidToClientMap.Delete(i);
+    end;
+  finally
+    FServer.fClients.UnlockList;
+  end;
+  if assigned(FServer.OnClientDisconnected) then FServer.OnClientDisconnected(Self, ClientID);
+end;
+
+procedure TROIcsAsyncSuperChannelWorker.DispatchEvent(
+  anEventDataItem: TROEventData; aSessionReference: TGUID; aSender: TObject);
+var
+  se: TSendEvent;
+begin
+  se := TSendEvent.Create(FServer, aSessionReference, TROEventRepository(aSender), anEventDataItem);
+  se.WorkerOverride := self;
+  if FServer.BlockingEvents then
+  begin
+    try
+      se.Callback(FServer.ThreadPool, nil);
+    except
+    end;
+    se.Free;
+  end
+  else
+  begin
+    FServer.ThreadPool.QueueItem(se);
+  end;
+end;
+
+procedure TROIcsAsyncSuperChannelWorker.EventsRegistered(aSender: TObject;
+  aClient: TGUID);
+var
+  lNew : IROSessionsChangesListener;
+begin
+  Supports(aSender, IROSessionsChangesListener, lNew);
+  if (fEventManager <> nil) and (lNew <> fEventManager) then
+  begin
+    fEventManager.SessionsChangedNotification(aClient, saRemoveActiveListener, Self);
+  end;
+  fEventManager := lNew;
+end;
+
+function TROIcsAsyncSuperChannelWorker.GetClientAddress: string;
+begin
+  if not (FClient.State in [wsInvalidState, wsConnecting, wsClosed]) then
+    Result := FClient.PeerAddr
+  else
+    Result := '';
+end;
+
+procedure TROIcsAsyncSuperChannelWorker.IncomingData(Id: Integer;
+  aData: uROAsyncSCHelpers.TByteArray);
+var
+  Stream: TMemoryStream;
+begin
+  Stream := TMemoryStream.Create;
+  try
+    Stream.Write(aData[0], Length(aData));
+    FServer.HasData(Id, Self, Stream);
+  except // only on failure
+    Stream.Free;
+    raise;
+  end;
+end;
+
+{ TMessagePumpThread }
+
+procedure TROIcsMessagePumpThread.AddSocket(ASocket: TCustomWSocket);
+begin
+  if not Assigned(ASocket) then
+    Exit;
+
+  // Detach from current thread
+  ASocket.ThreadDetach;
+  TWSocket(ASocket).MultiThreaded := True;
+
+  // Add socket to list of sockets waiting to be added
+  LockAddedSockets;
+  try
+    FAddedSockets.Add(ASocket);
+  finally
+    UnlockAddedSockets;
+  end;
+
+  // Wait for socket to be completely added
+  while FAddedSockets.Count > 0 do
+    SleepEx(1, True);
+end;
+
+constructor TROIcsMessagePumpThread.Create;
+begin
+  inherited Create(True);
+
+  FAddedSocketsSection := TCriticalSection.Create;
+  FRemovedSocketsSection := TCriticalSection.Create;
+
+  FSockets := TObjectList.Create(False);
+  FAddedSockets := TObjectList.Create(False);
+  FRemovedSockets := TObjectList.Create(False);
+
+  Resume;
+end;
+
+destructor TROIcsMessagePumpThread.Destroy;
+begin
+  inherited Destroy;
+
+  FSockets.Free;
+  FAddedSockets.Free;
+  FRemovedSockets.Free;
+
+  FAddedSocketsSection.Free;
+  FRemovedSocketsSection.Free;
+end;
+
+type
+  TAccessWSocket = class(TCustomWSocket);
+
+procedure TROIcsMessagePumpThread.Execute;
+var
+  MsgRec: TMsg;
+  I: Integer;
+  CurSocket: TCustomWSocket;
+  CanSleep: Boolean;
+begin
+  // Process messages until WM_QUIT has been received or Terminated set to True
+  repeat
+    CanSleep := True;
+
+    // Got a message? Process it and do it first in the loop as its processing
+    // can trigger code that adds sockets, removes some, requests bytes...
+    if PeekMessage(MsgRec, 0, 0, 0, PM_REMOVE) then
+    begin
+      TranslateMessage(MsgRec);
+      DispatchMessage(MsgRec);
+      CanSleep := False;
+    end;
+
+    // If new sockets are waiting, add them.
+    if FAddedSockets.Count > 0 then
+    begin
+      LockAddedSockets;
+      try
+        while FAddedSockets.Count > 0 do
+        begin
+          // Attach client socket to this thread and inform main thread via the
+          // removal of the socket from FAddedSockets.
+          TCustomWSocket(FAddedSockets[0]).ThreadAttach;
+
+          FSockets.Add(FAddedSockets[0]);
+          FAddedSockets.Delete(0);
+
+          // Now let main thread continue starting the connection. This little
+          // pause avoids race condition.
+          SleepEx(1, True);
+        end;
+      finally
+        UnlockAddedSockets;
+      end;
+      CanSleep := False;
+    end;
+
+    // If sockets must be removed, remove them 
+    if FRemovedSockets.Count > 0 then
+    begin
+      LockRemovedSockets;
+      try
+        while FRemovedSockets.Count > 0 do
+        begin
+          // Detach socket before removing it, which will notify main thread
+          // that the socket is cleanly detached.
+          InternalRemoveSocket(TCustomWSocket(FRemovedSockets[0]));
+          FRemovedSockets.Delete(0);
+
+          // Now let main thread continue closing the connection. This little
+          // pause avoids race condition.
+          SleepEx(1, True);
+        end;
+      finally
+        UnlockRemovedSockets;
+      end;
+      CanSleep := False;
+    end;
+
+    // A client socket might have received more bytes than what the worker
+    // class has requested at first, for instance received 6 and 5 were
+    // initially requested. Those 5 are read by the OnHaveIncompleteData
+    // callback, and analysed. This triggers the request for one more byte.
+    // But if we did not call ReceiveBytes here, this byte would never be read
+    // and would stay in the buffer in front of the next bytes received later
+    // on. Then the OnHaveIncompleteData done at that later time would trigger
+    // the request of N bytes and get this extra byte in front of them. This
+    // extra byte would then prevent the correct processing of the other bytes.
+    for I := 0 to FSockets.Count - 1 do
+    begin
+      CurSocket := Sockets[I];
+      if (CurSocket is TROAsyncSuperTcpServerSocketClient) and
+         (TROAsyncSuperTcpServerSocketClient(CurSocket).FInternalReceivedBytes > 0) then
+      begin
+        TROAsyncSuperTcpServerSocketClient(CurSocket).ReceiveBytes;
+        CanSleep := False;
+      end;
+    end;
+
+    // If no action was taken during this loop, then we can sleep. This way
+    // we do not have 100% CPU usage when idling but still process everything as
+    // fast as possible.
+    if CanSleep then
+    begin
+      SleepEx(1, True);
+    end;
+      
+  until Terminated or (MsgRec.message = WM_QUIT);
+
+  // Indicate to all sockets that they are terminated
+  for I := 0 to FSockets.Count - 1 do
+    TAccessWSocket(Sockets[I]).FTerminated := True;
+    
+  // Detach all remaining sockets
+  while FSockets.Count > 0 do
+    InternalRemoveSocket(Sockets[0]);
+  SleepEx(1, True);
+end;
+
+function TROIcsMessagePumpThread.GetSocket(Index: Integer): TCustomWSocket;
+begin
+  Result := FSockets[Index] as TCustomWSocket; 
+end;
+
+procedure TROIcsMessagePumpThread.InternalRemoveSocket(ASocket: TCustomWSocket);
+begin
+  if ASocket is TROWSocketServer then
+    TROWSocketServer(ASocket).FMessagePumpThread := nil;
+  if ASocket is TROAsyncSuperTcpServerSocketClient then
+    TROAsyncSuperTcpServerSocketClient(ASocket).FMessagePumpThread := nil;
+
+  ASocket.ThreadDetach;
+  FSockets.Remove(ASocket);
+end;
+
+procedure TROIcsMessagePumpThread.LockAddedSockets;
+begin
+  FAddedSocketsSection.Acquire;
+end;
+
+procedure TROIcsMessagePumpThread.LockRemovedSockets;
+begin
+  FRemovedSocketsSection.Acquire;
+end;
+
+procedure TROIcsMessagePumpThread.RemoveSocket(ASocket: TCustomWSocket);
+begin
+  // Removal must be done in the context of the thread to which the socket is attached
+  FRemovedSockets.Add(ASocket);
+
+  while FRemovedSockets.Count > 0 do
+    SleepEx(1, True);
+end;
+
+procedure TROIcsMessagePumpThread.UnlockAddedSockets;
+begin
+  FAddedSocketsSection.Release;
+end;
+
+procedure TROIcsMessagePumpThread.UnlockRemovedSockets;
+begin
+  FRemovedSocketsSection.Release;
+end;
+
+{ TROIcsTCPConnection }
+
+procedure TROIcsTCPConnection.BeginConnect(const aAdress: string;
+  aPort: Integer; aCallback: TROAsyncCallback);
+begin
+  FClientSocket.FConnectCallback := aCallback;
+  FClientSocket.Addr := aAdress;
+  FClientSocket.Port := IntToStr(aPort);
+  FClientSocket.Connect;
+end;
+
+procedure TROIcsTCPConnection.BeginDisconnect(aForce: Boolean;
+  aCallback: TROAsyncCallback);
+begin
+  FClientSocket.FDisconnectCallback := aCallback;
+  FClientSocket.CloseDelayed;
+end;
+
+procedure TROIcsTCPConnection.BeginReceive(aData: Pointer;
+  aSize: Integer; aCallback: TROAsyncCallback);
+begin
+  FClientSocket.FReceiveCallback := aCallback;
+  FClientSocket.FRequestedReceiveBytes := aSize;
+  FClientSocket.FReceiveBuffer := aData;
+  FClientSocket.FReceivedBytes := 0;
+end;
+
+procedure TROIcsTCPConnection.BeginSend(aData: Pointer;
+  aSize: Integer; aCallback: TROAsyncCallback);
+begin
+  FClientSocket.FSendCallback := aCallback;
+  FClientSocket.Send(aData, aSize);
+  FClientSocket.FSentBytes := aSize;
+end;
+
+constructor TROIcsTCPConnection.Create(
+  ClientSocket: TROAsyncSuperTcpServerSocketClient);
+begin
+  inherited Create;
+
+  FClientSocket := ClientSocket;
+end;
+
+destructor TROIcsTCPConnection.Destroy;
+begin
+  if Assigned(FClientSocket) then
+    FClientSocket.FAbstractTCPConnection := nil;
+  
+  inherited Destroy;
+end;
+
+function TROIcsTCPConnection.EndConnect: Boolean;
+begin
+  FClientSocket.FConnectCallback := nil;
+  Result := True;
+end;
+
+procedure TROIcsTCPConnection.EndDisconnect;
+begin
+  FClientSocket.FDisconnectCallback := nil;
+end;
+
+function TROIcsTCPConnection.EndReceive: Integer;
+begin
+  FClientSocket.FReceiveBuffer := nil;
+  FClientSocket.FReceiveCallback := nil;
+  Result := FClientSocket.FReceivedBytes;
+end;
+
+function TROIcsTCPConnection.EndSend: Integer;
+begin
+  FClientSocket.Flush;
+  FClientSocket.FSendCallback := nil;
+  Result := FClientSocket.FSentBytes;
+end;
+
+function TROIcsTCPConnection.GetOnDisconnected: TROAsyncCallback;
+begin
+  if Assigned(FClientSocket) then
+    Result := FClientSocket.FOnDisconnected;
+end;
+
+function TROIcsTCPConnection.GetOnHaveIncompleteData: TROAsyncCallback;
+begin
+  if Assigned(FClientSocket) then
+    Result := FClientSocket.FOnHaveIncompleteData;
+end;
+
+function TROIcsTCPConnection.GetSelf: TROIcsTCPConnection;
+begin
+  Result := Self;
+end;
+
+procedure TROIcsTCPConnection.SetOnDisconnected(aCallback: TROAsyncCallback);
+begin
+  if Assigned(FClientSocket) then
+    FClientSocket.FOnDisconnected := aCallback;
+end;
+
+procedure TROIcsTCPConnection.SetOnHaveIncompleteData(
+  aCallback: TROAsyncCallback);
+begin
+  if Assigned(FClientSocket) then
+    FClientSocket.FOnHaveIncompleteData := aCallback;
+end;
+
+initialization
+
+finalization
+  FServerSocketsMessagePump.Free;
+  FClientSocketsMessagePump.Free;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIdeOnly.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIdeOnly.pas
new file mode 100644
index 0000000..e97bb0f
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIdeOnly.pas	
@@ -0,0 +1,33 @@
+unit uROIdeOnly;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+implementation
+{$IFNDEF FPC}
+{$IFDEF WINDOWS}
+uses Forms, Dialogs;
+
+initialization
+  if (not Assigned(Application)) or
+     (not Assigned(Application.MainForm)) or
+     (Application.MainForm.ClassName <> 'TAppBuilder') then begin
+    ShowMessage('The RemObjects SDK Packages may only be used at designtime.');
+    Application.Terminate;
+  end;
+{$ENDIF WINDOWS}
+{$ENDIF FPC}
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIndyEmail.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIndyEmail.pas
new file mode 100644
index 0000000..90c8249
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIndyEmail.pas	
@@ -0,0 +1,79 @@
+unit uROIndyEmail;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Indy Components                                   }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes, IdSMTP;
+
+procedure SendMessage(aSmtpClient:TIdSmtp; aMessage:TStream; const aType,aMessageID:string; const aFrom,aTo:string);
+
+const
+  MESSAGE_FILE_EXTENSION = '.dat';
+
+implementation
+
+uses
+  {$IFDEF RemObjects_INDY10} IdAttachmentFile, {$ENDIF}
+  {$IFDEF MSWINDOWS} Windows,{$ENDIF}
+  SysUtils, IdMessage, uROClasses;
+
+procedure SendMessage(aSmtpClient:TIdSmtp; aMessage:TStream; const aType,aMessageID:string; const aFrom,aTo:string);
+var
+  lMessage:TIdMessage;
+  lTempFile:string;
+begin
+  lMessage := TIdMessage.Create(nil);
+  try
+    lMessage.From.Address := aFrom;
+    lMessage.Recipients.Add.Address := aTo;
+    lMessage.Subject := aType+' '+aMessageID;
+    lMessage.Body.Text := 'RemObjects SDK Email Channel. http://www.remobjects.com';
+    lMessage.Headers.Add('X-Mailer: RemObjects SDK Email Channel');
+
+    { This is SO lame. unfortunately Indy doesnt allow to send a stream without
+      major work & rewriting stuff. which we _will_ do later. }
+    lTempFile := GetTempPath+aMessageID+MESSAGE_FILE_EXTENSION;
+    try
+      with TFileStream.Create(lTempFile,fmCreate) do try
+        aMessage.Seek(0,soFromBeginning);
+        CopyFrom(aMessage,aMessage.Size);
+      finally
+        Free();
+      end;
+      {$IFDEF RemObjects_INDY10}
+      TIdAttachmentFile.Create(lMessage.MessageParts, lTempFile);
+      {$ELSE}
+      TIdAttachment.Create(lMessage.MessageParts, lTempFile);
+      {$ENDIF}
+
+      aSmtpClient.Connect();
+      try
+        aSmtpClient.Send(lMessage);
+      finally
+        aSmtpClient.Disconnect();
+      end;
+
+    finally
+      DeleteFile(lTempFile);
+    end;
+
+  finally
+    lMessage.Free();
+  end;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIndyEmailChannel.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIndyEmailChannel.pas
new file mode 100644
index 0000000..4a2ddf4
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIndyEmailChannel.pas	
@@ -0,0 +1,320 @@
+unit uROIndyEmailChannel;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Indy Components                                   }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes,
+  //IdBaseComponent,
+  {$IFDEF RemObjects_INDY10} IdAttachment, {$ENDIF}
+  uROClient, uROClientIntf, uROAsync, IdSMTP, IdPOP3;
+
+type
+  TROCustomEmailChannel = class(TROTransportChannel, IROTransport, IROAsyncTransportChannel)
+  private
+    fClientEmail: string;
+    fServerEmail: string;
+    fSmtpClient: TIdSMTP;
+    fPop3Client: TIdPOP3;
+    fDeleteOldResponses: boolean;
+    procedure SetSmtpClient(const Value: TIdSMTP);
+    function GetSmtpServerAddress: string;
+    procedure SetSmtpServerAddress(const Value: string);
+    procedure SetPopClient(const Value: TIdPOP3);
+    function GetPop3ServerAddress: string;
+    procedure SetPop3ServerAddress(const Value: string);
+    function GetPop3Password: string;
+    function GetPop3username: string;
+    procedure SetPop3password(const Value: string);
+    procedure SetPop3Username(const Value: string);
+  protected
+    { IROTransport }
+    function GetTransportObject: TObject; override;
+
+    { IROAsyncTransport }
+    function CheckStatus(const iMessageID:string):Boolean;
+    function InvokeRequest(aRequest:TStream; iGetResponse:boolean=true):string;
+    procedure RetrieveResponse(const aMessageID:string; aResponse:TStream);
+
+    procedure IntDispatch(aRequest, aResponse : TStream); override;
+
+  public
+    constructor Create(aOwner:TComponent); override;
+    destructor Destroy; override;
+
+  public { for publishing in descendand classes }
+    property Pop3ServerAddress:string read GetPop3ServerAddress write SetPop3ServerAddress;
+    property SmtpServerAddress:string read GetSmtpServerAddress write SetSmtpServerAddress;
+    property ServerEmail:string read fServerEmail write fServerEmail;
+    property ClientEmail:string read fClientEmail write fClientEmail;
+    property SmtpClient:TIdSMTP read fSmtpClient write SetSmtpClient;
+    property Pop3Client:TIdPOP3 read fPop3Client write SetPopClient;
+    property Pop3Username: string read GetPop3username write SetPop3Username;
+    property Pop3Password: string read GetPop3Password write SetPop3password;
+    property DeleteOldResponses:boolean read fDeleteOldResponses write fDeleteOldResponses default false;
+    procedure CheckProperties; override;
+  end;
+
+  TROEmailChannel = class(TROCustomEmailChannel)
+  published
+    property Pop3ServerAddress;
+    property SmtpServerAddress;
+    property ServerEmail;
+    property ClientEmail;
+    property SmtpClient;
+    property Pop3Client;
+    property Pop3Username;
+    property Pop3Password;
+    property DeleteOldResponses;
+  published
+    property SynchronizedProbing;
+    property OnSendStream;
+    property OnReceiveStream;
+    property ServerLocators;
+    property DispatchOptions;
+    property OnServerLocatorAssignment;
+    property ProbeServers;
+    property ProbeFrequency;
+    property OnBeforeProbingServers;
+    property OnAfterProbingServers;
+    property OnBeforeProbingServer;
+    property OnAfterProbingServer;
+    property OnLoginNeeded;
+  end;
+
+implementation
+
+uses
+  {$IFDEF MSWINDOWS} Windows,{$ENDIF}  
+  SysUtils, IdMessage, uROClasses, {$IFDEF RemObjects_INDY9}IdMessageCoder,{$ENDIF}
+  uROIndyEmail;
+
+{ TROCustomEmailChannel }
+
+constructor TROCustomEmailChannel.Create(aOwner: TComponent);
+begin
+  inherited;
+  fSmtpClient := TIdSMTP.Create(self);
+  fSmtpClient.Name := 'InternalSmtpClient';
+  fPop3Client := TIdPOP3.Create(self);
+  fPop3Client.Name := 'InternalPop3Client';
+  {$IFDEF VER140UP}
+  fSmtpClient.SetSubComponent(true);
+  fPop3Client.SetSubComponent(true);
+  {$ENDIF VER140UP}
+end;
+
+destructor TROCustomEmailChannel.Destroy;
+begin
+  FreeAndNil(fSmtpClient);
+  FreeAndNil(fPop3Client);
+  inherited;
+end;
+
+
+function TROCustomEmailChannel.GetTransportObject: TObject;
+begin
+  result := self;
+end;
+
+procedure TROCustomEmailChannel.SetSmtpClient(const Value: TIdSMTP);
+begin
+  fSmtpClient.Assign(Value);
+end;
+
+function TROCustomEmailChannel.GetSmtpServerAddress: string;
+begin
+  result := fSmtpClient.Host;
+end;
+
+procedure TROCustomEmailChannel.SetSmtpServerAddress(const Value: string);
+begin
+  fSmtpClient.Host := Value;
+end;
+
+procedure TROCustomEmailChannel.SetPopClient(const Value: TIdPOP3);
+begin
+  fPop3Client.Assign(Value);
+end;
+
+function TROCustomEmailChannel.GetPop3Password: string;
+begin
+  result := fPop3Client.Password;
+end;
+
+function TROCustomEmailChannel.GetPop3ServerAddress: string;
+begin
+  result := fPop3Client.Host;
+end;
+
+function TROCustomEmailChannel.GetPop3username: string;
+begin
+ {$IFDEF RemObjects_INDY8}
+  result := fPop3Client.UserId;
+ {$ELSE}
+  result := fPop3Client.Username;
+ {$ENDIF RemObjects_INDY8}
+end;
+
+procedure TROCustomEmailChannel.SetPop3password(const Value: string);
+begin
+  fPop3Client.Password := Value;
+end;
+
+procedure TROCustomEmailChannel.SetPop3ServerAddress(const Value: string);
+begin
+  fPop3Client.Host := Value;
+end;
+
+procedure TROCustomEmailChannel.SetPop3Username(const Value: string);
+begin
+ {$IFDEF RemObjects_INDY8}
+  fPop3Client.UserId := Value;
+ {$ELSE}
+  fPop3Client.Username := Value;
+ {$ENDIF RemObjects_INDY8}
+end;
+
+procedure TROCustomEmailChannel.IntDispatch(aRequest, aResponse: TStream);
+var
+  lMessageID:string;
+begin
+  lMessageID := InvokeRequest(aRequest);
+  while not CheckStatus(lMessageID) do Sleep(1000); //ToDo: this is a lame workaround to get synchronous requests running now.
+  RetrieveResponse(lMessageID,aResponse);
+end;
+
+function TROCustomEmailChannel.InvokeRequest(aRequest:TStream; iGetResponse:boolean=true):string;
+begin
+  CheckProperties;
+  try
+    if iGetResponse then result := NewGuidAsString() else  //for preventing warning in FPC
+    result := NewGuidAsString();
+    uROIndyEmail.SendMessage(fSmtpClient,aRequest,REQUEST_MESSAGE_PREFIX,result,ClientEmail,ServerEmail);
+  finally
+    aRequest.Free();
+  end;
+end;
+
+function TROCustomEmailChannel.CheckStatus(const iMessageID:string):Boolean;
+var
+  i:integer;
+  lMessage:TIdMessage;
+begin
+  CheckProperties;
+  result := false;
+  fPop3Client.Connect();
+  try
+    for i := 1 to fPop3Client.CheckMessages do begin
+      lMessage := TIdMessage.Create(fPop3Client);
+      try
+        if fPop3Client.RetrieveHeader(i,lMessage) and
+           (lMessage.Subject = RESPONSE_MESSAGE_PREFIX+' '+iMessageID) then begin
+          result := true;
+          exit;
+        end;
+      finally
+        FreeAndNil(lMessage);
+      end;
+    end;
+  finally
+    fPop3Client.Disconnect();
+  end;
+end;
+
+procedure TROCustomEmailChannel.RetrieveResponse(const aMessageID:string; aResponse:TStream);
+var
+  i,j:integer;
+  lMessage:TIdMessage;
+  lAttachment:TIdAttachment;
+  lTempFile:string;
+  lFileStream:TFileStream;
+  lSuccess:boolean;
+begin
+  lSuccess := false;
+  CheckProperties;
+  fPop3Client.Connect();
+  try
+    for i := 1 to fPop3Client.CheckMessages do begin
+      lMessage := TIdMessage.Create(fPop3Client);
+      try
+        if fPop3Client.RetrieveHeader(i,lMessage) then begin
+          if (lMessage.Subject = RESPONSE_MESSAGE_PREFIX+' '+aMessageID) then begin
+
+            fPop3Client.Retrieve(i,lMessage);
+            for j := 0 to lMessage.MessageParts.Count-1 do begin
+
+              if (lMessage.MessageParts[j] is TIdAttachment) then begin
+
+                lAttachment := TIdAttachment(lMessage.MessageParts[j]);
+                if lAttachment.Filename = aMessageID+MESSAGE_FILE_EXTENSION then begin
+                  lTempFile := GetTempPath+lAttachment.Filename;
+                  lAttachment.SaveToFile(lTempFile);
+                  try
+                    lFileStream := TFileStream.Create(lTempFile,fmOpenRead);
+                    try
+                      aResponse.CopyFrom(lFileStream,lFileStream.Size);
+                    finally
+                      lFileStream.Free();
+                    end;
+                  finally
+                    DeleteFile(lTempFile);
+                  end;
+                  lSuccess := true;
+
+                  fPop3Client.Delete(i);
+                  if not DeleteOldResponses then exit;
+                end;
+                if not lSuccess then RaiseError('Invalid Response email found for this communication: No response message attachment.');
+              end;
+            end;
+
+          end
+          else if DeleteOldResponses and (Pos(RESPONSE_MESSAGE_PREFIX+' ', lMessage.Subject) = 1) then begin
+            fPop3Client.Delete(i);
+          end;
+
+        end;
+      finally
+        FreeAndNil(lMessage);
+      end;
+    end;
+  finally
+    fPop3Client.Disconnect();
+  end;
+
+  if not lSuccess then
+    raise EROAsyncNoAnswerYet.Create('No Response email found for this communication, yet.');
+end;
+
+procedure TROCustomEmailChannel.CheckProperties;
+begin
+  inherited;
+  Check(Pop3ServerAddress = '', Name + '.Pop3ServerAddress must be set.');
+  Check(SmtpServerAddress = '', Name + '.SmtpServerAddress must be set.');
+  Check(ServerEmail = '', Name + '.ServerEmail must be set.');
+  Check(ClientEmail = '', Name + '.ClientEmail must be set.');
+  Check(Pop3Username = '', Name + '.Pop3Username must be set.');
+  Check(Pop3Password = '', Name + '.Pop3Password must be set.');
+end;
+
+initialization
+  RegisterTransportChannelClass(TROEmailChannel);
+
+finalization
+  UnRegisterTransportChannelClass(TROEmailChannel);
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIndyEmailServer.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIndyEmailServer.pas
new file mode 100644
index 0000000..b4e588d
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIndyEmailServer.pas	
@@ -0,0 +1,386 @@
+unit uROIndyEmailServer;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Indy Components                                   }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  {$IFDEF MSWINDOWS} Windows,{$ENDIF}
+  Classes,
+  {IdBaseComponent,} IdSMTP, IdPOP3,
+  {$IFDEF RemObjects_INDY10} IdAttachment, {$ENDIF}
+  uROClientIntf, uROServer, uROThread, {SyncObjs,} SysUtils;
+
+type
+  TROEmailServerThread = class;
+
+  TROExceptionEvent = procedure (aSender:TObject; aExceptionClass:TClass; const aExceptionMessage:string) of object;
+
+  TROCustomEmailServer = class(TROServer, IROTransport)
+  private
+    fServerEmail: string;
+    fSmtpClient: TIdSMTP;
+    fPop3Client: TIdPOP3;
+    fPop3CheckInterval: integer;
+    fWorkThread: TROEmailServerThread;
+    fOnException: TROExceptionEvent;
+    procedure SetSmtpClient(const Value: TIdSMTP);
+    function GetSmtpServerAddress: string;
+    procedure SetSmtpServerAddress(const Value: string);
+    procedure SetPopClient(const Value: TIdPOP3);
+    function GetPop3ServerAddress: string;
+    procedure SetPop3ServerAddress(const Value: string);
+    procedure SetPop3CheckInterval(const Value: integer);
+
+    procedure TriggerOnException(aExceptionClass:TClass; const aExceptionMessage:string);
+    function GetPop3Password: string;
+    function GetPop3username: string;
+    procedure SetPop3password(const Value: string);
+    procedure SetPop3Username(const Value: string);
+
+  public
+    constructor Create(aOwner:TComponent); override;
+    destructor Destroy; override;
+
+  protected
+    function GetTransportObject: TObject;
+    procedure IntSetActive(const Value: boolean); override;
+    function IntGetActive : boolean; override;
+
+  public { for publishing in descendand classes }
+    property Pop3ServerAddress:string read GetPop3ServerAddress write SetPop3ServerAddress;
+    property SmtpServerAddress:string read GetSmtpServerAddress write SetSmtpServerAddress;
+    property ServerEmail:string read fServerEmail write fServerEmail;
+    property SmtpClient:TIdSMTP read fSmtpClient write SetSmtpClient;
+    property Pop3Client:TIdPOP3 read fPop3Client write SetPopClient;
+    property Pop3Username: string read GetPop3username write SetPop3Username;
+    property Pop3Password: string read GetPop3Password write SetPop3password;
+    property Pop3CheckInterval:integer read fPop3CheckInterval write SetPop3CheckInterval default 60;
+    property OnException:TROExceptionEvent read fOnException write fOnException;
+    procedure CheckProperties; override;
+  end;
+
+  TROEmailServer = class(TROCustomEmailServer)
+    property Pop3ServerAddress;
+    property SmtpServerAddress;
+    property ServerEmail;
+    property SmtpClient;
+    property Pop3Client;
+    property Pop3Username;
+    property Pop3Password;
+    property Pop3CheckInterval;
+    property OnException;
+  end;
+
+  TROEmailServerThread = class(TROServerCheckMessageThread)
+  private
+    fSync_ExceptionClass:TClass;
+    fSync_aExceptionMessage:string;
+    procedure Sync_TriggerOnException(aExceptionClass:TClass; const aExceptionMessage:string);
+    procedure Synced_TriggerOnException;
+  protected
+    procedure CheckForMessages; override;
+    procedure ProcessMessage(aRequest:TStream; const aMessageID,aFrom:string);
+  public
+    constructor Create(aOwner:TROCustomEmailServer); reintroduce;
+  end;
+
+  TROEmailServerProcessMessageThread = class(TROThread)
+  private
+    fOwner:TROCustomEmailServer;
+    fRequest:TStream;
+    fMessageID:string;
+    fFrom:string;
+  protected
+    procedure Execute; override;
+  public
+    constructor Create(aOwner:TROCustomEmailServer; aRequest:TStream; const aMessageID,aFrom:string); reintroduce;
+    destructor Destroy; override;
+  end;
+
+implementation
+
+uses
+  IdMessage,
+  uROAsync, uROClasses, uROIndyEmail, uROServerIntf;
+
+{ TROCustomEmailServer }
+
+procedure TROCustomEmailServer.CheckProperties;
+begin
+  inherited;
+  if not (csDesigning in ComponentState) then begin
+    Check(Pop3ServerAddress = '', Name + '.Pop3ServerAddress must be set.');
+    Check(SmtpServerAddress = '', Name + '.SmtpServerAddress must be set.');
+    Check(ServerEmail = '', Name + '.ServerEmail must be set.');
+    Check(Pop3Username = '', Name + '.Pop3Username must be set.');
+    Check(Pop3Password = '', Name + '.Pop3Password must be set.');
+  end;
+end;
+
+constructor TROCustomEmailServer.Create(aOwner: TComponent);
+begin
+  inherited;
+  fSmtpClient := TIdSMTP.Create(self);
+  fSmtpClient.Name := 'InternalSmtpClient';
+  fPop3Client := TIdPOP3.Create(self);
+  fPop3Client.Name := 'InternalPop3Client';
+  Pop3CheckInterval := 60;
+  {$IFDEF VER140UP}
+  fSmtpClient.SetSubComponent(true);
+  fPop3Client.SetSubComponent(true);
+  {$ENDIF VER140UP}
+  fWorkThread := TROEmailServerThread.Create(self);
+end;
+
+destructor TROCustomEmailServer.Destroy;
+begin
+  fWorkThread.Free;
+  FreeAndNil(fSmtpClient);
+  FreeAndNil(fPop3Client);
+  inherited;
+end;
+
+function TROCustomEmailServer.GetPop3Password: string;
+begin
+  result := fPop3Client.Password;
+end;
+
+function TROCustomEmailServer.GetPop3ServerAddress: string;
+begin
+  result := fPop3Client.Host;
+end;
+
+function TROCustomEmailServer.GetPop3username: string;
+begin
+ {$IFDEF RemObjects_INDY8}
+  result := fPop3Client.UserId;
+ {$ELSE}
+  result := fPop3Client.Username;
+ {$ENDIF RemObjects_INDY8}
+end;
+
+function TROCustomEmailServer.GetSmtpServerAddress: string;
+begin
+  result := fSmtpClient.Host;
+end;
+
+function TROCustomEmailServer.GetTransportObject: TObject;
+begin
+  result := self;
+end;
+
+function TROCustomEmailServer.IntGetActive: boolean;
+begin
+  result := fWorkThread.Active;
+end;
+
+procedure TROCustomEmailServer.IntSetActive(const Value: boolean);
+begin
+  if Value then CheckProperties;
+  fWorkThread.Active := Value;
+end;
+
+procedure TROCustomEmailServer.SetPop3CheckInterval(const Value: integer);
+begin
+  fPop3CheckInterval := Value;
+end;
+
+procedure TROCustomEmailServer.SetPop3password(const Value: string);
+begin
+  fPop3Client.Password := Value;
+end;
+
+procedure TROCustomEmailServer.SetPop3ServerAddress(const Value: string);
+begin
+  fPop3Client.Host := Value;
+end;
+
+procedure TROCustomEmailServer.SetPop3Username(const Value: string);
+begin
+ {$IFDEF RemObjects_INDY8}
+  fPop3Client.UserId := Value;
+ {$ELSE}
+  fPop3Client.Username := Value;
+ {$ENDIF RemObjects_INDY8}
+end;
+
+procedure TROCustomEmailServer.SetPopClient(const Value: TIdPOP3);
+begin
+  fPop3Client.Assign(Value);
+end;
+
+procedure TROCustomEmailServer.SetSmtpClient(const Value: TIdSMTP);
+begin
+  fSmtpClient.Assign(Value);
+end;
+
+procedure TROCustomEmailServer.SetSmtpServerAddress(const Value: string);
+begin
+  fSmtpClient.Host := Value;
+end;
+
+procedure TROCustomEmailServer.TriggerOnException(aExceptionClass: TClass; const aExceptionMessage: string);
+begin
+  if Assigned(OnException) then
+    OnException(self, aExceptionClass, aExceptionMessage);
+end;
+
+{ TROEmailServerThread }
+
+constructor TROEmailServerThread.Create(aOwner:TROCustomEmailServer);
+begin
+  inherited Create('RemObjects Email Server Worker Thread',aOwner,aOwner.Pop3CheckInterval);
+end;
+
+procedure TROEmailServerThread.CheckForMessages;
+var
+  i,j:integer;
+  lMessage:TIdMessage;
+  lAttachment:TIdAttachment;
+  lTempFile:string;
+  lFileStream:TFileStream;
+  lRequest:TMemoryStream;
+  lMessageID:string;
+  lOwner:TROCustomEmailServer;
+begin
+  if Terminated then Exit;
+  try
+
+    lOwner := Owner as TROCustomEmailServer;
+
+    lOwner.Pop3Client.Connect();
+    try
+      for i := 1 to lOwner.Pop3Client.CheckMessages do begin
+        lMessage := TIdMessage.Create(lOwner.Pop3Client);
+        try
+          if lOwner.Pop3Client.RetrieveHeader(i,lMessage) then begin
+            if Pos(REQUEST_MESSAGE_PREFIX+' ',lMessage.Subject) = 1 then begin
+
+              lMessageID := lMessage.Subject;
+              Delete(lMessageID,1,Length(REQUEST_MESSAGE_PREFIX)+1);
+
+              lOwner.Pop3Client.Retrieve(i,lMessage);
+              for j := 0 to lMessage.MessageParts.Count-1 do begin
+
+                if (lMessage.MessageParts[j] is TIdAttachment) then begin
+
+                  lAttachment := TIdAttachment(lMessage.MessageParts[j]);
+                  if lAttachment.Filename = lMessageID+MESSAGE_FILE_EXTENSION then begin
+
+                    lRequest := TMemoryStream.Create();
+                    try
+
+                      lTempFile := GetTempPath+lAttachment.Filename;
+                      lAttachment.SaveToFile(lTempFile);
+                      try
+                        lFileStream := TFileStream.Create(lTempFile,fmOpenRead);
+                        try
+                          lRequest.CopyFrom(lFileStream,lFileStream.Size);
+                        finally
+                          lFileStream.Free();
+                        end;
+                      finally
+                        DeleteFile(lTempFile);
+                      end;
+                      ProcessMessage(lRequest,lMessageID,lMessage.From.Address);
+
+                    finally
+                      //lRequest will be freed by worker thread.
+                    end;
+
+                    lOwner.Pop3Client.Delete(i);
+                  end;
+                end;
+              end;
+
+            end;
+
+          end;
+        finally
+          FreeAndNil(lMessage);
+        end;
+      end;
+    finally
+      lOwner.Pop3Client.Disconnect();
+    end;
+
+  except
+    on E:Exception do begin
+      Sync_TriggerOnException(E.ClassType, E.Message);
+    end;
+  end;
+end;
+
+procedure TROEmailServerThread.ProcessMessage(aRequest: TStream; const aMessageID, aFrom: string);
+begin
+  TROEmailServerProcessMessageThread.Create(Owner as TROCustomEmailServer, aRequest, aMessageID, aFrom);
+end;
+
+procedure TROEmailServerThread.Sync_TriggerOnException(aExceptionClass:TClass; const aExceptionMessage:string);
+begin
+  if Terminated then exit;
+  fSync_ExceptionClass := aExceptionClass;
+  fSync_aExceptionMessage := aExceptionMessage;
+  Synchronize(Synced_TriggerOnException);
+end;
+
+procedure TROEmailServerThread.Synced_TriggerOnException;
+begin
+  (Owner as TROCustomEmailServer).TriggerOnException(fSync_ExceptionClass,fSync_aExceptionMessage);
+end;
+
+{ TROEmailServerProcessMessageThread }
+
+constructor TROEmailServerProcessMessageThread.Create(aOwner: TROCustomEmailServer; aRequest: TStream; const aMessageID, aFrom: string);
+begin
+  inherited Create(true,'TROEmailServer Message Processing Thread');
+  fOwner := aOwner;
+  fRequest := aRequest;
+  fMessageID := aMessageID;
+  fFrom := aFrom;
+  FreeOnTerminate := true;
+  Resume();
+end;
+
+destructor TROEmailServerProcessMessageThread.Destroy;
+begin
+  FreeAndNil(fRequest);
+  inherited;
+end;
+
+procedure TROEmailServerProcessMessageThread.Execute;
+var
+  lResponse:TStream;
+  lResponseOptions:TROResponseOptions;
+begin
+  inherited;
+
+  lResponse := TMemoryStream.Create();
+  try
+    fOwner.DispatchMessage(fOwner, fRequest, lResponse, lResponseOptions);
+    if not (roNoResponse in lResponseOptions) then begin
+      uROIndyEmail.SendMessage(fOwner.SmtpClient, lResponse, RESPONSE_MESSAGE_PREFIX, fMessageID, fOwner.ServerEmail, fFrom);
+    end;
+  finally
+    lResponse.Free();
+  end;
+end;
+
+initialization
+  RegisterServerClass(TROEmailServer);
+finalization
+  UnregisterServerClass(TROEmailServer);
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIndyHTTPChannel.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIndyHTTPChannel.pas
new file mode 100644
index 0000000..f3e26b7
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIndyHTTPChannel.pas	
@@ -0,0 +1,248 @@
+unit uROIndyHTTPChannel;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Indy Components                                   }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes, uROClientIntf, uROIndyTCPChannel, {IdTCPCLient,} IdHTTP;
+
+type
+  { TROIndyHTTPChannel }
+  TROIndyHTTPChannel = class(TROCustomIndyTCPChannel, IROTransport, IROTCPTransport, IROHTTPTransport)
+  private
+    fTargetURL: string;
+
+    function GetIndyClient: TIdHTTP;
+    procedure SocketConnected(Sender: TObject);
+
+  protected
+    procedure IntDispatch(aRequest, aResponse : TStream); override;
+    function CreateIndyClient : TIdTCPClientBaseClass; override;
+
+    { IROTCPTransport }
+    function GetClientAddress : string;
+
+    { IROHTTPTransport }
+    procedure SetHeaders(const aName, aValue : string);
+    function GetHeaders(const aName : string) : string;
+    function GetContentType : string;
+    procedure SetContentType(const aValue : string);
+    function GetUserAgent : string;
+    procedure SetUserAgent(const aValue : string);
+
+    procedure SetTargetURL(const Value: string);
+    function GetTargetURL: string;
+
+    function GetPathInfo : string;
+    function GetLocation : string;
+    function GetQueryString: String;
+    function GetQueryParameter(const aName: String): String;
+
+    procedure IntSetServerLocator(aServerLocator: TROServerLocator); override;
+  public
+    procedure SetPathInfo(const aValue: String);
+    procedure CheckProperties; override;
+  published
+    property IndyClient : TIdHTTP read GetIndyClient;
+
+    property TargetURL : string read GetTargetURL write SetTargetURL;
+    property KeepAlive;
+    property DisableNagle;
+  end;
+
+implementation
+
+uses
+  SysUtils, {IdException,} uROClient,
+  uRORes, uROHTTPTools, uROClasses, idstackconsts;
+
+{ TROIndyHTTPChannel }
+function TROIndyHTTPChannel.CreateIndyClient: TIdTCPClientBaseClass;
+begin
+  result := TIdHTTP.Create(Self);
+  TIdHTTP(result).Request.UserAgent := str_ProductName;
+  TIdIndy10HackClient(result).Port := 80;
+  TIdIndy10HackClient(result).Host := '127.0.0.1';
+  TIdIndy10HackClient(result).OnConnected := SocketConnected;
+  TargetURL := '';
+end;
+
+function TROIndyHTTPChannel.GetTargetURL: string;
+begin
+  result := fTargetURL;
+end;
+
+procedure TROIndyHTTPChannel.SetTargetURL(const Value: string);
+begin
+  fTargetURL := Trim(Value)
+end;
+
+function TROIndyHTTPChannel.GetIndyClient: TIdHTTP;
+begin
+  result := TIdHTTP(inherited IndyClient);
+end;
+
+procedure TROIndyHTTPChannel.IntDispatch(aRequest, aResponse : TStream);
+{$IFNDEF RemObjects_INDY8}
+var
+  lErrorResponse:Ansistring;
+{$ENDIF}
+begin
+  CheckProperties;
+  {$IFDEF DESIGNTIME}
+  {$IFDEF MSWINDOWS}
+  NoIndyAtDesigntime();
+  {$ENDIF MSWINDOWS}
+  {$ENDIF DESIGNTIME}
+
+  if GetHeaders('SOAPAction') <> '' then begin
+    SetHeaders('SOAPAction','');
+  end;
+
+  try
+    {$IFNDEF RemObjects_INDY8}
+    if KeepAlive then
+      IndyClient.HTTPOptions := IndyClient.HTTPOptions + [hoKeepOrigProtocol]
+    else
+      IndyClient.HTTPOptions := IndyClient.HTTPOptions - [];
+    {$ENDIF}
+    IndyClient.Post(TargetURL, aRequest, aResponse);
+  except
+    {$IFDEF RemObjects_INDY8}
+    raise
+    {$ELSE}
+    on E:EIdHTTPProtocolException do begin
+      {$IFDEF RemObjects_INDY9}
+      if E.ReplyErrorCode <> 500 then raise
+      {$ELSE}
+      if E.ErrorCode <> 500 then raise
+      {$ENDIF}
+
+      else begin
+        // Indy raises exceptions when HTTP headers contain HTTP/1.0 500 Internal Server Error
+        // We want to continue processing instead
+        aResponse.Size := 0; // Just in case
+        lErrorResponse := {$IFDEF UNICODE}WideStringToAnsiString{$ENDIF} (E.ErrorMessage);
+        aResponse.Write(lErrorResponse[1],Length(lErrorResponse));
+        aResponse.Seek(0,soFromBeginning);
+      end;
+    end
+    {$ENDIF}
+  end;
+end;
+
+function TROIndyHTTPChannel.GetHeaders(const aName: string): string;
+begin
+  {$IFDEF RemObjects_INDY8}
+  result := GetHeaderValue(IndyClient.Request.ExtraHeaders, aName);
+  {$ELSE}
+  result := GetHeaderValue(IndyClient.Request.RawHeaders, aName);
+  {$ENDIF}
+end;
+
+procedure TROIndyHTTPChannel.SetHeaders(const aName, aValue: string);
+begin
+  {$IFDEF RemObjects_INDY8}
+  SetHeaderValue(IndyClient.Request.ExtraHeaders, aName, aValue);
+  {$ELSE}
+  SetHeaderValue(IndyClient.Request.CustomHeaders, aName, aValue);
+  {$ENDIF}
+end;
+
+function TROIndyHTTPChannel.GetContentType: string;
+begin
+  result := IndyClient.Request.ContentType;
+end;
+
+procedure TROIndyHTTPChannel.SetContentType(const aValue: string);
+begin
+  IndyClient.Request.ContentType := aValue;
+end;
+
+function TROIndyHTTPChannel.GetUserAgent: string;
+begin
+  result := IndyClient.Request.UserAgent;
+end;
+
+procedure TROIndyHTTPChannel.SetUserAgent(const aValue: string);
+begin
+  IndyClient.Request.UserAgent := aValue;
+end;
+
+function TROIndyHTTPChannel.GetClientAddress: string;
+begin
+  result := '';
+end;
+
+function TROIndyHTTPChannel.GetPathInfo: string;
+begin
+  result := '';
+end;
+
+function TROIndyHTTPChannel.GetLocation: string;
+begin
+  result := ''
+end;
+
+function TROIndyHTTPChannel.GetQueryString: String;
+begin
+  result := '';
+end;
+
+procedure TROIndyHTTPChannel.SetPathInfo(const aValue: String);
+begin
+  // do nothing; server side only
+end;
+
+procedure TROIndyHTTPChannel.IntSetServerLocator(
+  aServerLocator: TROServerLocator);
+begin
+  TargetURL := aServerLocator.Host;
+end;
+
+procedure TROIndyHTTPChannel.CheckProperties;
+begin
+  inherited;
+  Check(TargetURL = '', Name + '.TargetURL must be set.');
+end;
+
+function TROIndyHTTPChannel.GetQueryParameter(const aName: String): String;
+begin
+  result := '';
+end;
+
+procedure TROIndyHTTPChannel.SocketConnected(Sender: TObject);
+begin
+  if DisableNagle then begin
+    {$IFDEF RemObjects_INDY8}
+    IndyClient.Binding.SetSockOpt(Id_IPPROTO_TCP, Id_TCP_NODELAY, PChar(@Id_SO_True), SizeOf(Id_SO_True));
+    {$ELSE}
+      {$IFDEF RemObjects_INDY9}
+      IndyClient.Socket.Binding.SetSockOpt(Id_IPPROTO_TCP, Id_TCP_NODELAY, PChar(@Id_SO_True), SizeOf(Id_SO_True));
+      {$ELSE}
+      IndyClient.Socket.Binding.SetSockOpt(Id_IPPROTO_TCP, Id_TCP_NODELAY, Id_SO_True);
+      {$ENDIF}
+    {$ENDIF}
+  end;
+end;
+
+initialization
+  RegisterTransportChannelClass(TROIndyHTTPChannel);
+
+finalization
+  UnRegisterTransportChannelClass(TROIndyHTTPChannel);
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIndyHTTPServer.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIndyHTTPServer.pas
new file mode 100644
index 0000000..169e30a
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIndyHTTPServer.pas	
@@ -0,0 +1,516 @@
+unit uROIndyHTTPServer;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Indy Components                                   }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+{TODO: Do like in the webmodule. Save a pointer to the user's OnCOmmandGet and fire it }
+
+interface
+
+uses
+  {$IFNDEF RemObjects_INDY8}IdCustomHTTPServer,{$ENDIF}
+  {$IFDEF RemObjects_INDY10}IdContext, {IdSocketHandle,}{$ELSE}IdThreadMgr,{$ENDIF}
+  Classes, uROServer, uROIndyTCPServer, {IdTCPServer,}
+  IdHTTPServer, uROClientIntf, idTCPServer, uROHTTPTools;
+
+type
+  { TIndyHTTPTransport }
+  TIndyHTTPTransport = class(TInterfacedObject, IROTransport, IROTCPTransport, IROHTTPTransport)
+  private
+    fRequestInfo: TIdHTTPRequestInfo;
+    fResponseInfo : TIdHTTPResponseInfo;
+    fOverriddenPathInfo : string;
+  protected
+    { IROHTTPTransport }
+    procedure SetHeaders(const aName, aValue : string);
+    function GetHeaders(const aName : string) : string;
+    function GetContentType : string;
+    procedure SetContentType(const aValue : string);
+    function GetUserAgent : string;
+    procedure SetUserAgent(const aValue : string);
+    function GetTargetURL : string;
+    procedure SetTargetURL(const aValue : string);
+
+    function GetPathInfo : string;
+    procedure SetPathInfo(const aValue: String);
+    function GetQueryString : string;
+    function GetQueryParameter(const aName: String): String;
+
+    function GetLocation : string;
+
+    { IROTransport }
+    function GetTransportObject : TObject;
+    function GetClientAddress : string;
+
+  public
+    constructor Create(aRequestInfo: TIdHTTPRequestInfo; aResponseInfo : TIdHTTPResponseInfo);
+
+    property RequestInfo: TIdHTTPRequestInfo read fRequestInfo;
+    property ResponseInfo : TIdHTTPResponseInfo read fResponseInfo;
+  end;
+
+  { TROIdHTTPServer }
+  TROIdHTTPServer = class(TIdHTTPServer)
+  private
+    function GetActive: boolean;
+
+  public
+    procedure IndySetActive(Value : boolean);
+
+  published
+    property Active : boolean read GetActive;
+  end;
+
+  { TROIndyHTTPServer }
+  TROIndyHTTPServer = class(TROCustomIndyTCPServer)
+  private
+    fServeRodl, fServeInfoPage: Boolean;
+    fSendExceptionsAs500: boolean;
+    fDisableNagle: Boolean;
+    fOnGetCustomClientAccessPolicy: TROCustomClientAccessPolicyMethod;
+    fSendClientAccessPolicyXml: TROClientAccessPolicyType;
+    function GetIndyServer: TROIdHTTPServer;
+
+  protected
+    procedure InternalServerConnect(AThread: {$IFDEF RemObjects_INDY10}TIdContext{$ELSE}TIdPeerThread{$ENDIF}); virtual;
+    procedure InternalServerCommandGet(AThread: TIdThreadClass;
+      RequestInfo: TIdHTTPRequestInfo; ResponseInfo: TIdHTTPResponseInfo); virtual;
+
+
+    function CreateIndyServer : TComponent; override;
+    procedure IntSetActive(const Value: boolean); override;
+    function IntGetActive : boolean; override;
+
+    function GetDispatchersClass : TROMessageDispatchersClass; override;
+
+    function GetKeepAlive: boolean; override;
+    procedure SetKeepAlive(const Value: boolean); override;
+
+    function GetDisableNagle: boolean; override;
+    procedure SetDisableNagle(const Value: boolean); override;
+
+  public
+    constructor Create(aComponent: TComponent); override;
+
+  published
+    property IndyServer : TROIdHTTPServer read GetIndyServer;
+    property Port:Integer read GetPort write SetPort;
+    property KeepAlive : boolean read GetKeepAlive write SetKeepAlive default false;
+    property ServeInfoPage : Boolean read fServeInfoPage write fServeInfoPage default true;
+    property ServeRodl : Boolean read fServeRodl write fServeRodl default true;
+    property SendExceptionsAs500: boolean read fSendExceptionsAs500 write fSendExceptionsAs500 default true;
+    property DisableNagle;
+    property OnGetRODLReader;
+    property OnGetCustomClientAccessPolicy: TROCustomClientAccessPolicyMethod read fOnGetCustomClientAccessPolicy write fOnGetCustomClientAccessPolicy;
+    property SendClientAccessPolicyXml: TROClientAccessPolicyType read fSendClientAccessPolicyXml write fSendClientAccessPolicyXml default captAllowNone;
+  end;
+
+implementation
+
+uses SysUtils, IdGlobal, uRORes, uROHTTPDispatch, uROServerIntf,
+  uROClient, uROHtmlServerInfo, uRODL, idstackconsts, uROClasses;
+
+{ TROIndyHTTPServer }
+constructor TROIndyHTTPServer.Create(aComponent: TComponent);
+begin
+  inherited;
+  fServeRodl := true;
+  fServeInfoPage := true;
+  fSendExceptionsAs500 := true;
+end;
+
+function TROIndyHTTPServer.CreateIndyServer: TComponent;
+begin
+  result := TROIdHTTPServer.Create(Self);//TIdHTTPServer.Create(Self);
+  TROIdHTTPServer(result).OnCommandGet := InternalServerCommandGet;
+  TROIdHTTPServer(result).OnConnect := InternalServerConnect;
+  TROIdHTTPServer(result).DefaultPort := 8099;
+end;
+
+function TROIndyHTTPServer.IntGetActive: boolean;
+begin
+  result := GetIndyServer.Active
+end;
+
+procedure TROIndyHTTPServer.IntSetActive(const Value: boolean);
+begin
+  {$IFDEF RemObjects_INDY10B}
+  if (Value) and (IndyServer.Bindings.Count = 0) then begin
+    with IndyServer.Bindings.Add do begin
+      Ip := '';
+      Port := Self.Port;
+      IPVersion := Id_IPv4;
+    end;
+  end;
+  {$ENDIF}
+  GetIndyServer.IndySetActive(Value);
+  if not Value
+    then IndyServer.Bindings.Clear;
+end;
+
+function TROIndyHTTPServer.GetIndyServer: TROIdHTTPServer;
+begin
+  //result := TROIdHTTPServer(inherited IndyServer);
+  result := TObject(inherited IndyServer) as TROIdHTTPServer;
+end;
+
+procedure TROIndyHTTPServer.InternalServerCommandGet(AThread: TIdThreadClass;
+  RequestInfo: TIdHTTPRequestInfo; ResponseInfo: TIdHTTPResponseInfo);
+
+  procedure WriteError(resp : TROBinaryMemoryStream);
+  begin
+    resp.WriteAnsiString('<font size="7">500 Invalid Path</font><br />'+{$IFDEF UNICODE}WideStringToAnsiString{$ENDIF}(err_CannotFindMessageDispatcher));
+  end;
+
+var req : TStream;
+    resp : TROBinaryMemoryStream;
+    transport : IROHTTPTransport;
+    ok : boolean;
+    disp : TROHTTPDispatcher;
+    root, sub: string;
+    {$IFNDEF RemObjects_INDY8}reqdata : string;{$ENDIF}
+    lIgnore: TROResponseOptions;
+    format: TDataFormat;
+    info: IRONamedModuleInfo;
+    lRodl: TRODLLibrary;
+    lPolicyContent: AnsiString;
+begin
+  if AThread = nil then req := nil else // for preventing warning in FPC
+  req := NIL;
+  format := '';
+  transport := TIndyHTTPTransport.Create(RequestInfo, ResponseInfo);
+
+  resp := TROBinaryMemoryStream.Create;
+  ok := false;
+  try
+    {$IFDEF RemObjects_INDY8}
+    req := TROBinaryMemoryStream.Create(RequestInfo.UnparsedParams);
+    {$ELSE}
+    { This was introduced to support URLs with parameters for partial WSDLs.
+      When a browser sends a URL such as "http://localhost:8099/SOAP?Service=TestService", Indy
+      puts the value "Service=TestService" in the UnparsedParams. This is not what we want as we
+      expect UnparsedParams as the data of the HTTP request. }
+    if RequestInfo.PostStream <> nil then begin
+       req := RequestInfo.PostStream;
+    end
+    else begin
+      if Length(RequestInfo.FormParams) = 0 then begin
+        if (RequestInfo.QueryParams=RequestInfo.UnparsedParams) then
+          reqdata := ''
+        else
+          reqdata := RequestInfo.UnparsedParams;
+      end else begin
+        reqdata := RequestInfo.FormParams;
+      end;
+      req := TROBinaryMemoryStream.Create({$IFDEF UNICODE}WideStringToAnsiString{$ENDIF}(reqdata));
+    end;
+    {$ENDIF}
+
+    root := transport.PathInfo;
+    if (root <> '') and (root[1] = '/') then delete(root, 1,1);
+    if pos('/', root) > 0 then
+    begin
+      sub := copy(root, pos('/', root)+1, maxint);
+      root := '/' + copy(root, 1, pos('/', root) - 1);
+    end else
+    begin
+      root := '/' + root;
+      sub := '';
+    end;
+
+    disp := TROHTTPMessageDispatchers(Dispatchers).GetDispatcherByPath(root) as TROHTTPDispatcher;
+
+    if disp <> nil then
+    begin
+      if (req.Size = 0) then begin
+        ok := fServeRodl;
+        if ok then
+          ok := IntDispatchMessage(disp, transport, req, resp, lIgnore)
+        else
+          WriteError(resp);
+      end else if (sub = '')  then
+        ok := IntDispatchMessage(disp, transport, req, resp, lIgnore)
+      else if (CompareText(sub, 'rodl') = 0) and fServeRodl then
+      begin
+        if copy(disp.PathInfo, 1, 1) = '/' then transport.PathInfo := disp.PathInfo else transport.PathInfo := '/'+disp.PathInfo;
+        GetRodl(resp, transport, format, GetRODLReader);
+        ResponseInfo.ContentType := format;
+        ok := true;
+      end else if Supports(disp.Message, IRONamedModuleInfo, info) and (CompareText(info.ModuleInfoName, sub) = 0) and fServeRodl then
+      begin
+        if copy(disp.PathInfo, 1, 1) = '/' then transport.PathInfo := disp.PathInfo else transport.PathInfo := '/'+disp.PathInfo;
+        info.GetModuleInfo(resp, transport, format);
+        ResponseInfo.ContentType := format;
+        ok := true;
+      end else
+      begin
+        ok := IntDispatchMessage(disp, transport, req, resp, lIgnore)
+      end;
+    end else if (CompareText(root, '/rodl') = 0) and (sub = '') and fServeRodl then
+    begin
+      GetRodl(resp, transport, format, GetRODLReader);
+      ok := true;
+    end else if fServeInfoPage and (CompareText(root, '/doc') = 0) then
+    begin
+      if sub = 'css' then
+      begin
+        resp.WriteAnsiString(GetRodlCss);
+        ResponseInfo.ContentType := 'text/css';
+        ok := true;
+      end else
+      if sub = 'xslt' then
+      begin
+        resp.WriteAnsiString(GetRodlStyleSheet);
+        ResponseInfo.ContentType := 'text/xml';
+        ok := true;
+      end else
+      if sub = '' then
+      begin
+        lRodl := GetRodlLibrary(GetRODLReader);
+        try
+          ResponseInfo.ContentType := 'text/xml';
+          resp.WriteAnsiString(GetRodlWithStyleSheet(lRodl, '/doc/xslt'));
+        finally
+          lRodl.Free;
+        end;
+        ok := true;
+      end else
+      begin
+        WriteError(resp);
+        ok := false;
+      end;
+    end else if fServeInfoPage and (CompareStr(root, '/favicon.ico') = 0) then
+    begin
+      GetRodlFavIcon(resp);
+      ResponseInfo.ContentType := 'image/x-icon';
+      ok := true;
+    end else if fServeInfoPage and (root = '/') then
+    begin
+      lrodl := GetRodlLibrary(GetRODLReader);
+      try
+        resp.WriteAnsiString(GetRodlServerInfo('/', lRodl, Dispatchers));
+      finally
+        lRodl.Free;
+      end;
+      ok := true;
+    end else
+    if CompareText(root, '/clientaccesspolicy.xml') = 0 then begin
+      case fSendClientAccessPolicyXml of
+        captAllowAll: begin
+          lPolicyContent := GetClientAccessPolicy;
+        end;
+        captCustom: begin
+          if Assigned(fOnGetCustomClientAccessPolicy) then
+            fOnGetCustomClientAccessPolicy(Self, lPolicyContent);
+        end;
+      end;
+      if lPolicyContent <> '' then begin
+        ResponseInfo.ContentType := 'text/xml';
+        resp.WriteAnsiString(lPolicyContent);
+      end;
+    end  else
+    begin
+      WriteError(resp);
+      ok := false;
+    end;
+
+    if ok or not fSendExceptionsAs500 then
+      ResponseInfo.ResponseNo := HTTP_OK
+    else
+      ResponseInfo.ResponseNo := HTTP_FAILED;
+
+    resp.Position:=0;
+    ResponseInfo.ContentStream := resp;
+  finally
+    {$IFDEF RemObjects_INDY8}
+    req.Free;
+    {$ELSE}
+    if req <> RequestInfo.PostStream then req.Free;
+    {$ENDIF}
+  end;
+end;
+
+
+function TROIndyHTTPServer.GetDispatchersClass : TROMessageDispatchersClass; 
+begin
+  result := TROHTTPMessageDispatchers
+end;
+
+function TROIndyHTTPServer.GetKeepAlive: Boolean;
+begin
+  {$IFDEF RemObjects_INDY8}
+  Result := false;
+  {$ELSE}
+  Result := IndyServer.KeepAlive;
+  {$ENDIF}
+end;
+
+procedure TROIndyHTTPServer.SetKeepAlive(const Value: Boolean);
+begin
+  {$IFDEF RemObjects_INDY8}
+  // keepalive not supported on Indy 8
+  {$ELSE}
+  IndyServer.KeepAlive := Value;
+  {$ENDIF}
+end;
+
+function TROIndyHTTPServer.GetDisableNagle: boolean;
+begin
+  result := fDisableNagle;
+end;
+
+procedure TROIndyHTTPServer.SetDisableNagle(const Value: boolean);
+begin
+  fDisableNagle := true;
+end;
+
+procedure TROIndyHTTPServer.InternalServerConnect(AThread: {$IFDEF RemObjects_INDY10}TIdContext{$ELSE}TIdPeerThread{$ENDIF});
+begin
+
+
+  if DisableNagle then begin
+    {$IFDEF RemObjects_INDY8}
+    AThread.Connection.Binding.SetSockOpt(Id_IPPROTO_TCP, Id_TCP_NODELAY, PChar(@Id_SO_True), SizeOf(Id_SO_True));
+    {$ELSE}
+      {$IFDEF RemObjects_INDY9}
+      AThread.Connection.Socket.Binding.SetSockOpt(Id_IPPROTO_TCP, Id_TCP_NODELAY, PChar(@Id_SO_True), SizeOf(Id_SO_True));
+      {$ELSE}
+      AThread.Connection.Socket.Binding.SetSockOpt(Id_IPPROTO_TCP, Id_TCP_NODELAY, Id_SO_True);
+      {$ENDIF}
+    {$ENDIF}
+  end;
+end;
+
+{ TIndyHTTPTransport }
+
+constructor TIndyHTTPTransport.Create(
+  aRequestInfo: TIdHTTPRequestInfo; aResponseInfo: TIdHTTPResponseInfo);
+begin
+  inherited Create;
+  fRequestInfo := aRequestInfo;
+  fResponseInfo := aResponseInfo;
+end;
+
+function TIndyHTTPTransport.GetClientAddress: string;
+begin
+  result := fRequestInfo.RemoteIP;
+end;
+
+function TIndyHTTPTransport.GetContentType: string;
+begin
+  result := fResponseInfo.ContentType;
+end;
+
+function TIndyHTTPTransport.GetHeaders(const aName: string): string;
+begin
+  {$IFDEF RemObjects_INDY8}
+  result := GetHeaderValue(fRequestInfo.Headers, aName);
+  {$ELSE}
+  result := GetHeaderValue(fRequestInfo.RawHeaders, aName);
+  {$ENDIF}
+end;
+
+function TIndyHTTPTransport.GetPathInfo: string;
+begin
+  if fOverriddenPathInfo <> '' then
+    result := fOverriddenPathInfo
+  else
+    result := RequestInfo.Document
+end;
+
+function TIndyHTTPTransport.GetLocation: string;
+begin
+  result := 'http://'+fRequestInfo.Host
+end;
+
+function TIndyHTTPTransport.GetTargetURL: string;
+begin
+  result := ''
+end;
+
+function TIndyHTTPTransport.GetTransportObject: TObject;
+begin
+  result := Self;
+end;
+
+function TIndyHTTPTransport.GetUserAgent: string;
+begin
+  result := fResponseInfo.ServerSoftware;
+end;
+
+procedure TIndyHTTPTransport.SetContentType(const aValue: string);
+begin
+  fResponseInfo.ContentType := aValue
+end;
+
+procedure TIndyHTTPTransport.SetHeaders(const aName,
+  aValue: string);
+begin
+  {$IFDEF RemObjects_INDY8}
+  SetHeaderValue(fResponseInfo.Headers, aName, aValue);
+  {$ELSE}
+  SetHeaderValue(fResponseInfo.RawHeaders, aName, aValue);
+  {$ENDIF}
+end;
+
+procedure TIndyHTTPTransport.SetTargetURL(const aValue: string);
+begin
+
+end;
+
+procedure TIndyHTTPTransport.SetUserAgent(const aValue: string);
+begin
+  fResponseInfo.ServerSoftware := aValue;
+end;
+
+function TIndyHTTPTransport.GetQueryString: string;
+begin
+  {$IFDEF RemObjects_INDY8}
+  result := '';
+  {$ELSE}
+  result := fRequestInfo.QueryParams;
+  {$ENDIF}
+end;
+
+procedure TIndyHTTPTransport.SetPathInfo(const aValue: String);
+begin
+  fOverriddenPathInfo := aValue;
+end;
+
+function TIndyHTTPTransport.GetQueryParameter(const aName: String): String;
+begin
+  {$IFDEF RemObjects_INDY8}
+  result := '';
+  {$ELSE}
+  result := fRequestInfo.Params.Values[aName];
+  {$ENDIF}
+end;
+
+{ TROIdHTTPServer }
+
+function TROIdHTTPServer.GetActive: boolean;
+begin
+  result := inherited Active
+end;
+
+procedure TROIdHTTPServer.IndySetActive(Value: boolean);
+begin
+  inherited Active := Value
+end;
+
+initialization
+  RegisterServerClass(TROIndyHTTPServer);
+finalization
+  UnregisterServerClass(TROIndyHTTPServer);
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIndySuperHttpChannel.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIndySuperHttpChannel.pas
new file mode 100644
index 0000000..0429a67
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIndySuperHttpChannel.pas	
@@ -0,0 +1,287 @@
+unit uROIndySuperHttpChannel;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Indy Components                                   }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes, SysUtils, uROClient, uROClientIntf,
+  {$IFDEF RemObjects_UseEncryption} uRoEncryption, {$ENDIF}
+  uROIndyTCPChannel, IdHTTP, uROBaseSuperHttpChannel, idstackconsts;
+
+type
+  TROIndySuperHTTPChannel = class(TROBaseSuperHttpChannel)
+  private
+    fClientWait,
+    fClientRequest: TIdHTTP;
+    fTargetUrl: String;
+    fDisableNagle: Boolean;
+  protected
+  { IROHTTPTransport }
+    procedure SocketConnectedRequest(Sender: TObject);
+    procedure SocketConnectedWait(Sender: TObject);
+    function GetClientAddress : string; override;
+    procedure SetHeaders(const aName, aValue : string); override;
+    function GetHeaders(const aName : string) : string; override;
+    function GetContentType : string; override;
+    procedure SetContentType(const aValue : string); override;
+    function GetUserAgent : string; override;
+    procedure SetUserAgent(const aValue : string); override;
+    function GetTargetURL : string; override;
+    procedure SetTargetURL(const aValue : string); override;
+    procedure SetPathInfo (const aValue : string); override;
+    function GetPathInfo : string; override;
+    function GetQueryString : string; override;
+    function GetLocation : string; override;
+    function GetQueryParameter(const aName: string): string; override;
+  protected
+    procedure CancelRequest(aWaitingThread: Boolean); override;
+    procedure DispatchHttpRequest(aWaitingThread: Boolean;
+      aRequest: TDynByteArray; out aResponse: TDynByteArray); override;
+  public
+    constructor Create(aOwner: TCOmponent); override;
+    destructor Destroy; override;
+    {$IFDEF FPC}
+    property SessionId;
+    {$ENDIF}
+  published
+    {$IFNDEF FPC}
+    property SessionId;
+    {$ENDIF}
+    property Active;
+    property MaxPackageSize;
+    property TargetUrl: String read fTargetUrl write fTargetUrl;
+    property ClientWait: TIdHTTP read fClientWait;
+    property ClientRequest: TIdHTTP read fClientRequest;
+    property RequestTimeout;
+    property ConnectTimeout;
+    property HttpRequestTimeout;
+    property DisableNagle: Boolean read fDisableNagle write fDisableNagle default true;
+
+    property DispatchOptions;
+    property ServerLocators;
+    property OnServerLocatorAssignment;
+  end;
+
+implementation
+uses
+  uRORes,uROHTTPTools;
+
+{ TROIndySuperHTTPChannel }
+
+procedure TROIndySuperHTTPChannel.SocketConnectedRequest(Sender: TObject);
+begin
+
+  if DisableNagle then begin
+    {$IFDEF RemObjects_INDY8}
+    fClientRequest.Binding.SetSockOpt(Id_IPPROTO_TCP, Id_TCP_NODELAY, PChar(@Id_SO_True), SizeOf(Id_SO_True));
+    {$ELSE}
+      {$IFDEF RemObjects_INDY9}
+      fClientRequest.Socket.Binding.SetSockOpt(Id_IPPROTO_TCP, Id_TCP_NODELAY, PChar(@Id_SO_True), SizeOf(Id_SO_True));
+      {$ELSE}
+      fClientRequest.Socket.Binding.SetSockOpt(Id_IPPROTO_TCP, Id_TCP_NODELAY, Id_SO_True);
+      {$ENDIF}
+    {$ENDIF}
+  end;
+end;
+procedure TROIndySuperHTTPChannel.SocketConnectedWait(Sender: TObject);
+begin
+
+  if DisableNagle then begin
+    {$IFDEF RemObjects_INDY8}
+    fClientWait.Binding.SetSockOpt(Id_IPPROTO_TCP, Id_TCP_NODELAY, PChar(@Id_SO_True), SizeOf(Id_SO_True));
+    {$ELSE}
+      {$IFDEF RemObjects_INDY9}
+      fClientWait.Socket.Binding.SetSockOpt(Id_IPPROTO_TCP, Id_TCP_NODELAY, PChar(@Id_SO_True), SizeOf(Id_SO_True));
+      {$ELSE}
+      fClientWait.Socket.Binding.SetSockOpt(Id_IPPROTO_TCP, Id_TCP_NODELAY, Id_SO_True);
+      {$ENDIF}
+    {$ENDIF}
+  end;
+end;
+
+procedure TROIndySuperHTTPChannel.CancelRequest(aWaitingThread: Boolean);
+var
+  lSock: TIdHTTP;
+begin
+  try
+    if aWaitingThread then lSock := fClientWait else lSock := fClientRequest;
+      {$IFDEF RemOBjects_INDY8}
+    lSock.Binding.CloseSocket();
+    {$ELSE}
+      {$IFDEF RemObjects_INDY10}
+      if assigned(lSock.Socket) and (lSock.Socket.Connected) then
+        lSock.Socket.Close;
+      {$ELSE}
+      lSock.DisconnectSocket;
+      {$ENDIF}
+    {$ENDIF}
+  except
+    // indy will release an exception when closing
+  end;
+end;
+
+{$IFDEF RemObjects_INDY10}
+type
+  TIdIndy10HackClient = class(TIdHTTP)
+  public
+    property OnConnected;
+  end;
+{$ELSE}
+type
+  TIdIndy10HackClient = TIdHTTP;
+{$ENDIF}
+
+constructor TROIndySuperHTTPChannel.Create(aOwner: TCOmponent);
+begin
+  inherited Create(aOwner);
+  fDisableNagle := true;
+  fClientWait := TIdHTTP.Create(nil);
+  TIdIndy10HackClient(fClientWait).OnConnected := SocketConnectedWait;
+  fClientWait.Request.UserAgent := str_ProductName;
+
+  fClientRequest := TIdHTTP.Create(nil);
+  TIdIndy10HackClient(fClientRequest).OnConnected := SocketConnectedRequest;
+  fClientRequest.Request.UserAgent := str_ProductName;
+
+  {$IFDEF DELPHI6UP}
+  fClientWait.SetSubComponent(TRUE);
+  {$ENDIF}
+    {$IFDEF DELPHI6UP}
+  fClientRequest.SetSubComponent(TRUE);
+  {$ENDIF}
+end;
+
+destructor TROIndySuperHTTPChannel.Destroy;
+begin
+  Active := false;
+  fClientWait.Free;
+  fClientRequest.Free;
+  inherited Destroy;
+end;
+
+procedure TROIndySuperHTTPChannel.DispatchHttpRequest(
+  aWaitingThread: Boolean; aRequest: TDynByteArray;
+  out aResponse: TDynByteArray);
+var
+  lClient: TIdHTTP;
+  lRequest, lResponse: TMemoryStream;
+begin
+  if aWaitingThread then lClient := fClientWait else lClient := fClientRequest;
+  lRequest:= TMemoryStream.Create;
+  lResponse := TMemoryStream.Create;
+  try
+    lRequest.Write(aRequest[0], Length(aRequest));
+    lRequest.Position := 0;
+    {$IFNDEF REMOBJECTS_INDY8}
+    lClient.ReadTimeout := HttpRequestTimeout;
+    {$ENDIF}
+    {$IFDEF RemObjects_INDY10}
+    lClient.ConnectTimeout := ConnectTimeout;
+    {$ENDIF}
+    lClient.Post(fTargetUrl, lRequest, lResponse);
+    SetLength(aResponse, lResponse.Size);
+    lResponse.Position := 0;
+    lResponse.Read(aResponse[0], Length(aResponse));
+  finally
+    lRequest.Free;
+    lResponse.Free;
+  end;
+end;
+
+function TROIndySuperHTTPChannel.GetClientAddress: string;
+begin
+  Result := '';
+end;
+
+function TROIndySuperHTTPChannel.GetContentType: string;
+begin
+  result := ClientRequest.Request.ContentType;
+end;
+
+function TROIndySuperHTTPChannel.GetHeaders(const aName: string): string;
+begin
+  {$IFDEF RemObjects_INDY8}
+  result := GetHeaderValue(ClientRequest.Request.ExtraHeaders, aName);
+  {$ELSE}
+  result := GetHeaderValue(ClientRequest.Request.RawHeaders, aName);
+  {$ENDIF}
+end;
+
+function TROIndySuperHTTPChannel.GetLocation: string;
+begin
+  Result := '';
+end;
+
+function TROIndySuperHTTPChannel.GetPathInfo: string;
+begin
+  Result := '';
+end;
+
+function TROIndySuperHTTPChannel.GetQueryParameter(
+  const aName: string): string;
+begin
+  result := '';
+end;
+
+function TROIndySuperHTTPChannel.GetQueryString: string;
+begin
+  Result := '';
+end;
+
+function TROIndySuperHTTPChannel.GetTargetURL: string;
+begin
+  result := fTargetURL;
+end;
+
+function TROIndySuperHTTPChannel.GetUserAgent: string;
+begin
+  result := ClientRequest.Request.UserAgent;
+end;
+
+procedure TROIndySuperHTTPChannel.SetContentType(const aValue: string);
+begin
+  ClientWait.Request.ContentType := aValue;
+  ClientRequest.Request.ContentType := aValue;
+end;
+
+procedure TROIndySuperHTTPChannel.SetHeaders(const aName, aValue: string);
+begin
+  {$IFDEF RemObjects_INDY8}
+  SetHeaderValue(ClientWait.Request.ExtraHeaders, aName, aValue);
+  SetHeaderValue(ClientRequest.Request.ExtraHeaders, aName, aValue);
+  {$ELSE}
+  SetHeaderValue(ClientWait.Request.CustomHeaders, aName, aValue);
+  SetHeaderValue(ClientRequest.Request.CustomHeaders, aName, aValue);
+  {$ENDIF}
+end;
+
+procedure TROIndySuperHTTPChannel.SetPathInfo(const aValue: string);
+begin
+  // do nothing; server side only
+end;
+
+procedure TROIndySuperHTTPChannel.SetTargetURL(const aValue: string);
+begin
+  fTargetURL := Trim(aValue)
+end;
+
+procedure TROIndySuperHTTPChannel.SetUserAgent(const aValue: string);
+begin
+  ClientWait.Request.UserAgent := aValue;
+  ClientRequest.Request.UserAgent := aValue;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIndyTCPChannel.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIndyTCPChannel.pas
new file mode 100644
index 0000000..9c31421
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIndyTCPChannel.pas	
@@ -0,0 +1,254 @@
+unit uROIndyTCPChannel;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Indy Components                                   }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes, uROClient, {IdBaseComponent,} uROClientIntf, IdTCPClient;
+
+type
+  {$IFDEF RemObjects_INDY10}
+  TIdTCPClientBaseClass = TIdTCPClientCustom;
+  TIdIndy10HackClient = class(TIdTCPClientCustom)
+  public
+    property Port;
+    property Host;
+    property OnConnected;
+  end;
+  {$ELSE}
+  TIdTCPClientBaseClass = TIdTcpClient;
+  TIdIndy10HackClient = TIdTcpClient;
+  {$ENDIF}
+
+  { TROCustomIndyTCPChannel }
+  TROCustomIndyTCPChannel = class(TROTransportChannel, IROTransport, IROTCPTransport)
+  private
+    fIndyClient : TIdTCPClientBaseClass;
+    fKeepAlive: boolean;
+    fDisableNagle: boolean;
+
+    function GetHost: string;
+    function GetPort: integer;
+    procedure SetHost(const Value: string);
+    procedure SetPort(const Value: integer);
+
+  protected
+    procedure IntDispatch(aRequest, aResponse : TStream); override;
+    procedure IntSetServerLocator(aServerLocator : TROServerLocator); override;
+
+    function CreateIndyClient: TIdTCPClientBaseClass; virtual;
+
+    {$IFDEF DESIGNTIME}
+    {$IFDEF MSWINDOWS}
+    procedure NoIndyAtDesigntime;
+    {$ENDIF MSWINDOWS}
+    {$ENDIF DESIGNTIME}
+    { IROTransport }
+    function GetTransportObject : TObject; override;
+
+    { IROTCPTransport }
+    function GetClientAddress : string;
+
+  public
+    constructor Create(aOwner : TComponent); override;
+
+    property Port : integer read GetPort write SetPort;
+    property Host : string read GetHost write SetHost;
+    property DisableNagle : boolean read fDisableNagle write fDisableNagle default FALSE;
+    property IndyClient : TIdTCPClientBaseClass read fIndyClient;
+    property KeepAlive : boolean read fKeepAlive write fKeepAlive default false;
+  published
+    property SynchronizedProbing;
+    property OnSendStream;
+    property OnReceiveStream;
+    property ServerLocators;
+    property DispatchOptions;
+    property OnServerLocatorAssignment;
+    property ProbeServers;
+    property ProbeFrequency;
+    property OnBeforeProbingServers;
+    property OnAfterProbingServers;
+    property OnBeforeProbingServer;
+    property OnAfterProbingServer;
+    property OnLoginNeeded;
+  end;
+
+  { TROIndyTCPChannel }
+  TROIndyTCPChannel = class(TROCustomIndyTCPChannel, IROTransport, IROTCPTransport)
+  private
+  protected
+
+  published
+    property Port;
+    property Host;
+    property DisableNagle;
+    property IndyClient;
+    property KeepAlive;
+  end;
+
+implementation
+
+uses
+  {$IFDEF RemObjects_INDY10}{IdStreamVCL,} {$ENDIF}
+  SysUtils, {uRORes,} {$IFDEF DESIGNTIME}uROClasses,{$ENDIF} idstackconsts;
+
+{ TROCustomIndyTCPChannel }
+
+constructor TROCustomIndyTCPChannel.Create(aOwner: TComponent);
+begin
+  inherited;
+  fIndyClient := CreateIndyClient;
+  fIndyClient.Name := 'InternalIndyClient';
+  {$IFDEF DELPHI6UP}
+  fIndyClient.SetSubComponent(TRUE);
+  {$ENDIF}
+end;
+
+function TROCustomIndyTCPChannel.CreateIndyClient: TIdTCPClientBaseClass;
+begin
+  result := TIdTCPClient.Create(Self);
+  TIdTCPClient(result).Port := 8090;
+  TIdTCPClient(result).Host := '127.0.0.1';
+end;
+
+function TROCustomIndyTCPChannel.GetClientAddress: string;
+begin
+{$IFDEF REMOBJECTS_INDY8}
+  if IndyClient.Binding <> nil then
+    Result := IndyClient.Binding.PeerIP
+  else
+    Result := '';
+{$ELSE}
+  if (IndyClient.Socket <> nil) and (IndyClient.Socket.Binding <> nil) then
+    Result := IndyClient.Socket.Binding.PeerIP
+  else
+    Result := '';
+{$ENDIF}
+end;
+
+function TROCustomIndyTCPChannel.GetTransportObject: TObject;
+begin
+  result := Self;
+end;
+
+procedure TROCustomIndyTCPChannel.IntSetServerLocator(
+  aServerLocator: TROServerLocator);
+begin
+  Host := aServerLocator.Host;
+  Port := aServerLocator.Port;
+end;
+
+procedure TROCustomIndyTCPChannel.IntDispatch(aRequest, aResponse: TStream);
+{$IFDEF RemObjects_INDY10A}
+var
+  lStream: TIdStreamVCL;
+{$ENDIF}
+begin
+  {$IFDEF DESIGNTIME}
+  {$IFDEF MSWINDOWS}
+  NoIndyAtDesigntime();
+  {$ENDIF MSWINDOWS}
+  {$ENDIF DESIGNTIME}
+
+  try
+    if not IndyClient.Connected then begin
+      IndyClient.Connect;
+      if DisableNagle then begin
+        {$IFDEF RemObjects_INDY8}
+        IndyClient.Binding.SetSockOpt(Id_IPPROTO_TCP, Id_TCP_NODELAY, PChar(@Id_SO_True), SizeOf(Id_SO_True));
+        {$ELSE}
+          {$IFDEF RemObjects_INDY9}
+          IndyClient.Socket.Binding.SetSockOpt(Id_IPPROTO_TCP, Id_TCP_NODELAY, PChar(@Id_SO_True), SizeOf(Id_SO_True));
+          {$ELSE}
+          IndyClient.Socket.Binding.SetSockOpt(Id_IPPROTO_TCP, Id_TCP_NODELAY, Id_SO_True);
+          {$ENDIF}
+        {$ENDIF}
+      end;
+    end;
+
+    {$IFDEF RemObjects_INDY10A}
+    lStream := TIdStreamVCL.Create(aRequest, false);
+    lStream.Position := 0;
+    try
+      IndyClient.IOHandler.Write(lStream, lStream.Size, TRUE);
+    finally
+      FreeAndNil(lStream);
+    end;
+    lStream := TIdStreamVCL.Create(aResponse, false);
+    try
+      IndyClient.IOHandler.ReadStream(lStream);
+    finally
+      FreeAndNil(lStream);
+    end;
+    {$ELSE}
+      aRequest.Position := 0;    
+      {$IFDEF RemObjects_INDY10B}
+      IndyClient.IOHandler.Write(aRequest, aRequest.Size, TRUE);
+      IndyClient.IOHandler.ReadStream(aResponse);
+      {$ELSE}
+      IndyClient.WriteStream(aRequest, TRUE, TRUE);
+      IndyClient.ReadStream(aResponse);
+      {$ENDIF}
+    {$ENDIF}
+  finally
+    if not KeepAlive
+      then IndyClient.Disconnect;
+  end;
+end;
+
+{$IFDEF DESIGNTIME}
+{$IFDEF MSWINDOWS}
+procedure TROCustomIndyTCPChannel.NoIndyAtDesigntime;
+begin
+  {$IFNDEF RemObjects_INDY_DESIGNTIME_FIX}
+  if csDesigning in ComponentState then
+    raise EROIDEProblem.Create('We''re sorry, but the '+ClassName+' cannot be used inside the Delphi IDE at designtime.'#13#13+
+                           'This is due to a Indy issue and outside of our control.'#13#13+
+                           'Please use TROWinInetHTTPChannel instead.'#13#13#13+
+                           'If your version if Indy is patched to fix this problem, please set the'#13+
+                           '"RemObjects_INDY_DESIGNTIME_FIX" define in RemObjects.inc and rebuild the package.');
+  {$ENDIF RemObjects_INDY_DESIGNTIME_FIX}
+end;
+{$ENDIF MSWINDOWS}
+{$ENDIF DESIGNTIME}
+
+function TROCustomIndyTCPChannel.GetHost: string;
+begin
+  result := TIdIndy10HackClient(IndyClient).Host;
+end;
+
+function TROCustomIndyTCPChannel.GetPort: integer;
+begin
+  result := TIdIndy10HackClient(IndyClient).Port;
+end;
+
+procedure TROCustomIndyTCPChannel.SetHost(const Value: string);
+begin
+  TIdIndy10HackClient(IndyClient).Host := Value;
+end;
+
+procedure TROCustomIndyTCPChannel.SetPort(const Value: integer);
+begin
+  TIdIndy10HackClient(IndyClient).Port := Value;
+end;
+
+initialization
+  RegisterTransportChannelClass(TROIndyTCPChannel);
+
+finalization
+  UnRegisterTransportChannelClass(TROIndyTCPChannel);
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIndyTCPServer.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIndyTCPServer.pas
new file mode 100644
index 0000000..5486476
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIndyTCPServer.pas	
@@ -0,0 +1,299 @@
+unit uROIndyTCPServer;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Indy Components                                   }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+{TODO: Do like in the webmodule. Save a pointer to the user's OnExecute and fire it }
+
+interface
+
+uses
+  {$IFDEF RemObjects_INDY10}IdContext, {$ELSE} IdThreadMgr,{$ENDIF}
+  Classes, uROServer, uROClientIntf, IdTCPServer, IdComponent;
+
+type
+  {$IFDEF RemObjects_INDY10}
+  TIdThreadClass = TIdContext;
+  {$ELSE}
+  TIdThreadClass = TIdPeerThread;
+  {$ENDIF}
+
+  { TIndyTCPConnectionTransport }
+  TIndyTCPConnectionTransport = class(TInterfacedObject, IROTransport, IROTCPTransport)
+  private
+    fThread: TIdThreadClass;
+
+  protected
+    { IROTransport }
+    function GetTransportObject : TObject;
+    function GetClientAddress : string;
+
+  public
+    constructor Create(aThread: TIdThreadClass);
+
+    property Thread : TIdThreadClass read fThread;
+  end;
+
+  { TROTIdTCPServer }
+  TROTIdTCPServer = class(TIdTCPServer)
+  private
+    function GetActive: boolean;
+
+  public
+    procedure IndySetActive(Value : boolean);
+
+  published
+    property Active : boolean read GetActive;
+  end;
+
+  { TROIndyTCPServer }
+  TROCustomIndyTCPServer = class(TROServer, IROTransport)
+  private
+    fIndyServer : TComponent;
+    fKeepAlive: boolean;
+    fDisableNagle: boolean;
+
+
+  protected
+    function GetIndyServer : TROTIdTCPServer;
+    function GetPort: Integer;
+    procedure SetPort(const Value: Integer);
+
+    function GetKeepAlive: boolean; virtual;
+    procedure SetKeepAlive(const Value: boolean); virtual;
+
+    function GetDisableNagle: boolean; virtual;
+    procedure SetDisableNagle(const Value: boolean); virtual;
+
+    function CreateIndyServer : TComponent; virtual;
+    procedure IntSetActive(const Value: boolean); override;
+    function IntGetActive : boolean; override;
+
+    procedure InternalOnExecute(AThread: TIdThreadClass);
+
+    { IROTransport }
+    function GetTransportObject : TObject;
+
+  public
+    constructor Create(aComponent : TComponent); override;
+
+    property IndyServer: TROTIdTCPServer read GetIndyServer;
+    property Port:Integer read GetPort write SetPort;
+    property DisableNagle : boolean read GetDisableNagle write SetDisableNagle default FALSE;
+    property KeepAlive : boolean read GetKeepAlive write SetKeepAlive default false;
+  end;
+
+  { TROIndyTCPServer }
+  TROIndyTCPServer = class(TROCustomIndyTCPServer, IROTransport)
+  published
+    property IndyServer;
+    property Port;
+    property DisableNagle;
+    property KeepAlive;
+  end;
+
+implementation
+
+uses SysUtils,
+     {$IFNDEF RemObjects_INDY8}IdIoHandlerSocket,{$ENDIF}
+     {$IFDEF RemObjects_INDY10}{IdStreamVCL,}{$ENDIF}
+     idstackconsts;
+
+{ TROCustomIndyTCPServer }
+
+constructor TROCustomIndyTCPServer.Create(aComponent: TComponent);
+begin
+  inherited;
+
+  fIndyServer := CreateIndyServer;
+  fIndyServer.Name := 'InternalIndyServer';
+  {$IFDEF DELPHI6UP}
+  fIndyServer.SetSubComponent(True);
+  {$ENDIF}
+end;
+
+function TROCustomIndyTCPServer.CreateIndyServer: TComponent;
+begin
+  result := TROTIdTCPServer.Create(Self);
+  TROTIdTCPServer(result).OnExecute := InternalOnExecute;
+  TROTIdTCPServer(result).DefaultPort := 8090;
+end;
+
+function TROCustomIndyTCPServer.GetIndyServer: TROTIdTCPServer;
+begin
+  result := TROTIdTCPServer(fIndyServer)
+end;
+
+procedure TROCustomIndyTCPServer.IntSetActive(const Value: boolean);
+begin
+  IndyServer.IndySetActive(Value);
+  if not Value
+    then IndyServer.Bindings.Clear;
+end;
+
+function TROCustomIndyTCPServer.IntGetActive : boolean;
+begin
+  result := IndyServer.Active
+end;
+
+procedure TROCustomIndyTCPServer.InternalOnExecute(AThread: TIdThreadClass);
+var
+  req, resp : TMemoryStream;
+  tcptransport : IROTCPTransport;
+  {$IFDEF RemObjects_INDY10A}
+  lStream: TIdStreamVCL;
+  {$ENDIF}
+begin
+  req := TMemoryStream.Create;
+  resp := TMemoryStream.Create;
+
+  tcptransport := TIndyTCPConnectionTransport.Create(aThread);
+
+  try
+    with AThread do begin
+      while AThread.Connection.Connected do
+      begin
+        if DisableNagle then begin
+          {$IFDEF RemObjects_INDY8}
+          Connection.Binding.SetSockOpt(Id_IPPROTO_TCP, Id_TCP_NODELAY, PChar(@Id_SO_True),  SizeOf(Id_SO_True));
+          {$ELSE}
+            {$IFDEF RemObjects_INDY9}
+            (Connection.IoHandler as TIdIoHandlerSocket).Binding.SetSockOpt(Id_IPPROTO_TCP, Id_TCP_NODELAY, PChar(@Id_SO_True),  SizeOf(Id_SO_True));
+            {$ELSE}
+            (Connection.IoHandler as TIdIoHandlerSocket).Binding.SetSockOpt(Id_IPPROTO_TCP, Id_TCP_NODELAY, Id_SO_True);
+            {$ENDIF}
+          {$ENDIF}
+        end;
+
+        {$IFDEF RemObjects_INDY10A}
+          lStream := TIdStreamVCL.Create(req, false);
+          try
+            Connection.IOHandler.ReadStream(lStream);
+          finally
+            FreeAndNil(lStream);
+          end;
+          req.Position := 0;
+          DispatchMessage(tcptransport, req, resp);
+          lStream := TIdStreamVCL.Create(resp, false);
+          try
+            Connection.IOHandler.Write(lStream, lStream.Size, TRUE);
+          finally
+            FreeAndNil(lStream);
+          end;
+
+        {$ELSE}
+          {$IFDEF RemObjects_INDY10B}
+            Connection.IOHandler.ReadStream(req);
+            req.Position := 0;
+            DispatchMessage(tcptransport, req, resp);
+            Connection.IOHandler.Write(resp, resp.Size, TRUE);
+          {$ELSE}
+            Connection.ReadStream(req);
+            req.Position := 0;
+            DispatchMessage(tcptransport, req, resp);
+            Connection.WriteStream(resp, TRUE, TRUE);
+          {$ENDIF}
+        {$ENDIF}
+
+        if not KeepAlive
+          then Connection.Disconnect
+        else
+        begin
+          resp.Position := 0;
+          req.Position := 0;
+          resp.Size := 0;
+          req.Size := 0;
+        end;
+      end;
+    end;
+  finally
+    req.Free;
+    resp.Free;
+  end;
+end;
+
+function TROCustomIndyTCPServer.GetTransportObject: TObject;
+begin
+  result := Self;
+end;
+
+function TROCustomIndyTCPServer.GetPort: Integer;
+begin
+  Result := IndyServer.DefaultPort;
+end;
+
+procedure TROCustomIndyTCPServer.SetPort(const Value:Integer);
+begin
+  IndyServer.DefaultPort := Value;
+end;
+
+function TROCustomIndyTCPServer.GetKeepAlive: boolean;
+begin
+  result := fKeepAlive
+end;
+
+procedure TROCustomIndyTCPServer.SetKeepAlive(const Value: boolean);
+begin
+  fKeepAlive := Value
+end;
+
+function TROCustomIndyTCPServer.GetDisableNagle: boolean;
+begin
+  result := fDisableNagle
+end;
+
+procedure TROCustomIndyTCPServer.SetDisableNagle(const Value: boolean);
+begin
+  fDisableNagle := Value
+end;
+
+{ TROTIdTCPServer }
+
+function TROTIdTCPServer.GetActive: boolean;
+begin
+  result := inherited Active;
+end;
+
+procedure TROTIdTCPServer.IndySetActive(Value: boolean);
+begin
+  inherited Active := Value
+end;
+
+{ TIndyTCPConnectionTransport }
+
+constructor TIndyTCPConnectionTransport.Create(aThread: TIdThreadClass);
+begin
+  inherited Create;
+  fThread := aThread;
+end;
+
+function TIndyTCPConnectionTransport.GetClientAddress: string;
+begin
+  {$IFDEF RemObjects_INDY8}
+  result := fThread.Connection.Binding.PeerIP
+  {$ELSE}
+  result := fThread.Connection.Socket.Binding.PeerIP
+  {$ENDIF}
+end;
+
+function TIndyTCPConnectionTransport.GetTransportObject: TObject;
+begin
+  result := Self;
+end;
+
+initialization
+  RegisterServerClass(TROIndyTCPServer);
+finalization
+  UnregisterServerClass(TROIndyTCPServer);
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIndyUDPChannel.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIndyUDPChannel.pas
new file mode 100644
index 0000000..a7eb35e
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIndyUDPChannel.pas	
@@ -0,0 +1,667 @@
+unit uROIndyUDPChannel;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Indy Components                                   }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Provided by Nico Schoemaker (nico.schoemaker@teamro.remobjects.com         }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses classes, SysUtils,SyncObjs,
+     IdUDPClient,
+     uROClient, uROClientIntf, uROAsyncResponseStorage, uROAsync, uROThread,
+     uROClasses;
+
+type
+
+  TROIndyUDPChannel = class;
+
+  TROUDPResponseThread = class(TROThread)
+  private
+    FChannel: TROIndyUDPChannel;
+    FCriticalSection: TCriticalSection;
+    FReqUID: String;
+  protected
+    FRetrys: Integer;
+    FRespReceived: Boolean;
+    procedure DoTimeOut;
+    procedure DoEnd;
+    procedure Execute;override;
+  public
+    property RequestUID: String read FReqUID;
+    property ReceivedResponse: Boolean read FRespReceived;
+    property Channel: TROIndyUDPChannel read FChannel;
+    property CriticalSection: TCriticalSection read FCriticalSection;
+
+    constructor Create(const aName: string; aChannel: TROIndyUDPChannel; aRequestUID: String);
+  end;
+
+  TROUDPResponseThreadClass = class of TROUDPResponseThread;
+
+  TROAsyncTimeOutEvent = procedure (aRequistUID: String) of object;
+
+  TROIndyUDPChannel = class(TROTransportChannel, IROTransport, IROTCPTransport,
+                            IROAsyncTransportChannel, IROAsyncResponseStorage)
+  private
+    fIndyClient: TIdUDPClient;
+    FRespStorage: TROSimpleAsyncResponseStorage;
+    FReqStorage: TROSimpleAsyncResponseStorage;
+    FRespBuffer: TStringList;
+    FRetrys: Integer;
+    FAsyncTimeOut: Integer;
+    FOnAsyncResponseTimeOut: TROAsyncTimeOutEvent;
+    FRunningThread: TROUDPResponseThread;
+    function GetHost: string;
+    function GetPort: integer;
+    procedure SetHost(const Value: string);
+    procedure SetPort(const Value: integer);
+  protected
+    FCriticalSection: TCriticalSection;
+    FIDSize: Integer;
+
+    { IROTransport }
+    function GetTransportObject : TObject; override;
+
+    { IROTCPTransport }
+    function GetClientAddress : string;
+
+    { IROAsyncTransportChannel }
+    function  InvokeRequest(aRequest:TStream; iGetResponse:boolean=true):string;virtual;
+    procedure RetrieveResponse(const iMessageID:string; aResponse:TStream);
+
+    procedure DoEndOfThread(Sender: TROUDPResponseThread);virtual;
+    procedure DoOnTerminateThread(Sender: TObject);virtual;
+    procedure DoAsyncThreadTimeOut(ReqUID: String);virtual;
+
+    procedure IntDispatch(aRequest, aResponse : TStream); override;
+    procedure IntSetServerLocator(aServerLocator: TROServerLocator); override;
+    procedure SendReq(aRequest: TStream;UID: String;AddToStorage: Boolean=true);virtual;
+    function  GetResponseThreadClass: TROUDPResponseThreadClass;virtual;
+
+    // Setters
+    procedure SetRetrys(const Value: Integer);
+    procedure SetAsyncTimeOut(const Value: Integer);
+    procedure SetOnAsyncResponseTimeOut(const Value: TROAsyncTimeOutEvent);
+
+    // Helpers
+    procedure CleanUpStorages;virtual;
+    function  GetNewMesgID: String;virtual;
+    function  StripID(var aResponse: AnsiString): AnsiString;
+    procedure CopyStream(aSource,aTarget: TStream);
+    function  CreateUDPClient : TIdUDPClient; virtual;
+    procedure AddRequestToStorage(aRequest: TStream;aRequestID: String);
+  public
+    property  ResponseStorage: TROSimpleAsyncResponseStorage read FRespStorage {$IFNDEF FPC} implements IROAsyncResponseStorage {$ENDIF};
+    {$IFDEF FPC} // implements does not work in FPC
+    procedure AddResp(aResp: TROResponseItem);
+    procedure RemoveResp(aResp: TROResponseItem);
+    procedure RemoveRespByUID(aUID: String);
+    procedure DeleteResp(Index: Integer);
+    function  GetResp(Index: Integer): TROResponseItem;
+    function  GetRespByUID(aUID: String): TROResponseItem; deprecated;
+    function  GetResponseByUID(aUID: String): TROResponseItem;
+    function  IndexOfResp(aResp: TROResponseItem): Integer;
+    function  CountOfResp: Integer;
+    procedure ClearStorage;
+
+    property  ResponseItem[Index: Integer]: TROResponseItem read GetResp;
+    {$ENDIF}
+
+    property  RequestStorage: TROSimpleAsyncResponseStorage read FReqStorage;
+    function  ReceiveResp(aTimeOut: Integer): Boolean;virtual;
+    function  CheckStatus(const iMessageID:string):boolean;
+
+    constructor Create(AOwner: TComponent);override;
+    Destructor Destroy;override;
+  published
+    property AsyncTimeOut: Integer read FAsyncTimeOut write SetAsyncTimeOut default 1000;
+    property OnAsyncResponseTimeOut: TROAsyncTimeOutEvent read FOnAsyncResponseTimeOut write SetOnAsyncResponseTimeOut;
+    property Retrys: Integer read FRetrys write SetRetrys;
+    property IndyClient : TIdUDPClient read fIndyClient;
+    property Port : integer read GetPort write SetPort;
+    property Host : string read GetHost write SetHost;
+  published
+    property SynchronizedProbing;
+    property OnSendStream;
+    property OnReceiveStream;
+    property ServerLocators;
+    property DispatchOptions;
+    property OnServerLocatorAssignment;
+    property ProbeServers;
+    property ProbeFrequency;
+    property OnBeforeProbingServers;
+    property OnAfterProbingServers;
+    property OnBeforeProbingServer;
+    property OnAfterProbingServer;
+    property OnLoginNeeded;
+  end;
+
+implementation
+
+uses {IdUDPBase,}IdGlobal;
+
+const //C_CLRBUFFER_TO = 50; // TimeOut reading the buffer for ClearRecvBuffer
+      C_READTIMEOUT = 'Time out reading server response %s.';
+      C_NORESPONSE  = 'Response %s is not available yet.';
+      C_EADDREQUEST = 'Parameters of AddRequestToStorage not Assigned';
+
+function  Strm_StreamToStr(aStream: TStream): AnsiString;
+var OldPos: Integer;
+begin
+  result := '';
+  if not(Assigned(aStream)) then
+    Exit;
+
+  OldPos := aStream.Position;
+  aStream.Position := 0;
+
+  SetLength(result, aStream.Size);
+  if (aStream.Size>0)
+    then aStream.Read(result[1], aStream.Size);
+
+  aStream.Position := OldPos;
+end;
+
+//------------------------------------------------------------------------------
+                                 { TROIndyUDPChannel }
+//------------------------------------------------------------------------------
+
+constructor TROIndyUDPChannel.Create(AOwner: TComponent);
+begin
+  inherited;
+  FCriticalSection := TCriticalSection.Create();
+  FIndyClient := CreateUDPClient;
+  FRespBuffer := TStringList.Create;
+  FRespStorage := TROSimpleAsyncResponseStorage.Create(Self);
+  FReqStorage := TROSimpleAsyncResponseStorage.Create(Self);
+
+  FRetrys := 5;
+  FAsyncTimeOut := 1000;
+
+  // In case the result of GetNewMesgID change's in the future
+  FIDSize := Length(GetNewMesgID);
+
+  {$IFDEF DELPHI6UP}
+  fIndyClient.SetSubComponent(TRUE);
+  {$ENDIF}
+end;
+
+destructor TROIndyUDPChannel.Destroy;
+begin
+  FreeAndNil(FCriticalSection);
+  FreeAndNil(FRespBuffer);
+
+  FreeAndNil(FRespStorage);
+  FreeAndNil(FReqStorage);
+
+  inherited;
+end;
+
+procedure TROIndyUDPChannel.CopyStream(aSource, aTarget: TStream);
+var lMs: TMemoryStream;
+    lPos: Integer;
+begin
+  if (not(Assigned(aSource))) or (not(Assigned(aTarget))) then
+    Exit;
+
+  lPos := aSource.Position;
+
+  try
+    if aTarget is TMemoryStream then
+    begin
+      TMemoryStream(aTarget).LoadFromStream(aSource);
+    end else
+    begin
+      lMs := TMemoryStream.Create;
+      try
+        lMs.LoadFromStream(aSource);
+        lMs.Position := 0;
+        lMs.SaveToStream(aTarget);
+      finally
+        lMs.Free;
+      end;
+    end;
+  finally
+    aSource.Position := lPos;
+  end;
+end;
+
+function TROIndyUDPChannel.CreateUDPClient: TIdUDPClient;
+begin
+  result := TIdUDPClient.Create(Self);
+  result.Port := 8090;
+  result.Name := 'InternalIndyClient';
+end;
+
+
+function TROIndyUDPChannel.GetClientAddress: string;
+begin
+  result := fIndyClient.Host;
+end;
+
+function TROIndyUDPChannel.GetTransportObject: TObject;
+begin
+  result := Self;
+end;
+
+{-----------------------------------------------------------------------------
+  Procedure: TROIndyUDPChannel.IntDispatch
+  Author:    Nico
+  Date:      22-apr-2003
+  Arguments: aRequest, aResponse: TStream
+  Result:    None
+  Called by the framework to send and receive a request/response
+  - Send's the request and add's it to the Request storage
+  - Recieive's the response and add's it to the Response storage
+  - Passes the response to aResponse
+
+-----------------------------------------------------------------------------}
+procedure TROIndyUDPChannel.IntDispatch(aRequest, aResponse: TStream);
+var lResp: TStream;
+    lRetry: Integer;
+    lUID: String;
+begin
+  lRetry := 0;
+
+  try
+    lUID := GetNewMesgID;
+    lResp := nil;
+    SendReq(aRequest,lUID);
+    repeat
+      if ReceiveResp(IndyClient.ReceiveTimeout) then
+      begin
+        if FRespStorage.GetRespByUID(lUID) <> nil then
+          lResp := FRespStorage.GetRespByUID(lUID).Response;
+      end;
+      inc(lRetry);
+    until (lRetry > Retrys) or (lResp <> nil);
+
+    if lRetry > Retrys then
+      raise Exception.Create(Format(C_READTIMEOUT,[lUID]));
+
+    CopyStream(lResp,aResponse);
+    aResponse.Position := 0;
+    FRespStorage.RemoveRespByUID(lUID);
+
+  finally
+    FReqStorage.RemoveRespByUID(lUID);
+    CleanUpStorages;
+  end;
+end;
+
+{-----------------------------------------------------------------------------
+  Procedure: TROIndyUDPChannel.AddRequestToStorage
+  Author:    Nico
+  Date:      22-apr-2003
+  Arguments: aRequest: TStream;aRequesID: String
+  Result:    None
+  Adds a request item to the RequestStorage
+-----------------------------------------------------------------------------}
+procedure TROIndyUDPChannel.AddRequestToStorage(aRequest: TStream;aRequestID: String);
+var lMs: TMemoryStream;
+    lReqItm: TROResponseItem;
+begin
+  if (not(Assigned(aRequest))) or (aRequestID = '') then
+    raise Exception.Create(C_EADDREQUEST);
+
+ FCriticalSection.Enter;
+ try
+   lMS := TMemoryStream.Create;
+   CopyStream(aRequest,lMs);
+   lReqItm := TROResponseItem.Create(lMS,aRequestID);
+   FReqStorage.AddResp(lReqItm);
+ finally
+   FCriticalSection.Leave;
+ end;
+end;
+
+{-----------------------------------------------------------------------------
+  Procedure: TROIndyUDPChannel.ReceiveResp
+  Author:    Nico
+  Date:      22-apr-2003
+  Arguments: None
+  Result:    Boolean
+  Recieves a single response and saves it in the ResponseStorage.
+-----------------------------------------------------------------------------}
+function TROIndyUDPChannel.ReceiveResp(aTimeOut: Integer): Boolean;
+var lBuf: AnsiString;
+    lID: String;
+    lResItm: TROResponseItem;
+    lResp: TROBinaryMemoryStream;
+    lIP: String;
+{$IFDEF RemObjects_INDY10}
+    lPort: TIDPort;
+    LBuffer : TIdBytes;
+    i: integer;
+{$ELSE}
+    lPort: Integer;
+{$ENDIF}
+begin
+  FCriticalSection.Enter;
+  try
+    result := False;
+    lPort := 0;
+    lIP := '';
+    {$IFDEF RemObjects_INDY10}
+    SetLength(LBuffer, IndyClient.BufferSize);
+    i:=IndyClient.ReceiveBuffer(LBuffer, lIP,lPort,aTimeOut);
+    SetLength(lBuf, i);
+    Move(lBuffer[0],pointer(lbuf)^,i);
+    {$ELSE}
+    lBuf := IndyClient.ReceiveString(lIP,lPort,aTimeOut);
+    {$ENDIF}
+    if lBuf <> '' then
+    begin
+      lID := {$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(StripID(lBuf));
+      lResp := TROBinaryMemoryStream.Create(lBuf);
+      lResItm := TROResponseItem.Create(lResp,lID);
+      lResItm.IP := lIP;
+      lResItm.Port := lPort;
+      FRespStorage.AddResp(lResItm);
+      result := True;
+    end;
+  finally
+    FCriticalSection.Leave;
+  end;
+end;
+
+procedure TROIndyUDPChannel.SendReq(aRequest: TStream;UID: String;AddToStorage: Boolean=true);
+var lReq: AnsiString;
+begin
+  lReq := Strm_StreamToStr(aRequest);
+  // Sends the Message identifier in front of the actual message
+  IndyClient.Send(UID+{$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(lReq));
+  if AddToStorage then
+    AddRequestToStorage(aRequest,UID);
+end;
+
+procedure TROIndyUDPChannel.SetRetrys(const Value: Integer);
+begin
+  FRetrys := Value;
+end;
+
+function TROIndyUDPChannel.GetNewMesgID: String;
+begin
+  result := NewGuidAsString;
+end;
+
+function TROIndyUDPChannel.GetResponseThreadClass: TROUDPResponseThreadClass;
+begin
+  result := TROUDPResponseThread;
+end;
+
+{-----------------------------------------------------------------------------
+  Procedure: TROIndyUDPChannel.StripIdentifier
+  Author:    Nico
+  Date:      18-apr-2003
+  Arguments: var aResponse: String
+  Result:    String
+  Strips the leading Identifier from the given response string and returns it.
+-----------------------------------------------------------------------------}
+function TROIndyUDPChannel.StripID(var aResponse: AnsiString): AnsiString;
+begin
+  if Length(aResponse) < FIDSize then
+    raise EROException.Create('Invalid UDP Packet received.');
+  result := Copy(aResponse,1,FIDSize);
+  Delete(aResponse,1,FIDSize);
+end;
+
+
+{-----------------------------------------------------------------------------
+  Procedure: TROIndyUDPChannel.CleanUpStorages
+  Author:    Nico
+  Date:      22-apr-2003
+  Arguments: None
+  Result:    None
+  Cleans up the Request and Response storages.
+  Any response without a request will be removed.
+-----------------------------------------------------------------------------}
+procedure TROIndyUDPChannel.CleanUpStorages;
+var i: Integer;
+    lRespUID: String;
+    lReqItm: TROResponseItem;
+begin
+  FCriticalSection.Enter;
+  try
+    // Remove respones that don't have a request present in the request-storage
+    for i := FRespStorage.CountOfResp-1 downto 0 do
+    begin
+      lRespUID := FRespStorage.ResponseItem[i].UID;
+      lReqItm  := FReqStorage.GetRespByUID(lRespUID);
+      if lReqItm = nil then
+        FRespStorage.DeleteResp(i);
+    end;
+  finally
+    FCriticalSection.Leave;
+  end;
+end;
+
+function TROIndyUDPChannel.CheckStatus(const iMessageID: string): boolean;
+begin
+  result := FRespStorage.GetRespByUID(iMessageID) <> nil;
+end;
+
+function TROIndyUDPChannel.InvokeRequest(aRequest: TStream; iGetResponse: boolean): string;
+var lRT: TROUDPResponseThread;
+    lName: String;
+begin
+  try
+    FCriticalSection.Enter;
+    try
+      result := '';
+      if FRunningThread <> nil then
+        raise EROChannelBusy.Create('Channel is busy.');
+
+      if not(Assigned(aRequest)) then
+        Exit;
+
+      result := GetNewMesgID;
+
+      if iGetResponse then
+      begin
+        SendReq(aRequest,result);
+        lName := GetResponseThreadClass.ClassName+' for reading of response %s';
+        lRT := GetResponseThreadClass.Create(Format(lName,[result]),Self,result);
+        lRT.OnTerminate := DoOnTerminateThread;
+        FRunningThread := lRT;
+        lRT.Resume;
+      end else
+        SendReq(aRequest,result,False);
+
+    finally
+      FCriticalSection.Leave;
+    end;
+  finally
+    aRequest.Free();
+  end;
+end;
+
+procedure TROIndyUDPChannel.RetrieveResponse(const iMessageID: string;aResponse: TStream);
+var lResItm: TROResponseItem;
+begin
+  FCriticalSection.Enter;
+  try
+    if not(Assigned(aResponse)) then
+      Exit;
+
+    if CheckStatus(iMessageID) then begin
+      lResItm := FRespStorage.GetRespByUID(iMessageID);
+      CopyStream(lResItm.Response,aResponse);
+      // Remove the response and request from the storage's
+      //FReqStorage.RemoveRespByUID(lResItm.UID);
+      FRespStorage.RemoveResp(lResItm);
+    end
+    else begin
+      raise EROAsyncNoAnswerYet.Create(Format(C_NORESPONSE,[iMessageID]));
+    end;
+  finally
+    FCriticalSection.Leave;
+  end;
+end;
+
+procedure TROIndyUDPChannel.DoEndOfThread(Sender: TROUDPResponseThread);
+begin
+  CleanUpStorages;
+end;
+
+procedure TROIndyUDPChannel.DoOnTerminateThread(Sender: TObject);
+begin
+  // Runs in the Main thread
+  FRunningThread := nil;
+end;
+
+procedure TROIndyUDPChannel.DoAsyncThreadTimeOut(ReqUID: String);
+begin
+  if Assigned(FOnAsyncResponseTimeOut) then
+    FOnAsyncResponseTimeOut(ReqUID);
+end;
+
+procedure TROIndyUDPChannel.SetOnAsyncResponseTimeOut(const Value: TROAsyncTimeOutEvent);
+begin
+  FOnAsyncResponseTimeOut := Value;
+end;
+
+procedure TROIndyUDPChannel.SetAsyncTimeOut(const Value: Integer);
+begin
+  FAsyncTimeOut := Value;
+  if FAsyncTimeOut < 0 then
+    FAsyncTimeOut := 0;
+end;
+
+{ TROUDPResponseThread }
+constructor TROUDPResponseThread.Create(const aName: string; aChannel: TROIndyUDPChannel; aRequestUID: String);
+begin
+  inherited Create(True,aName);
+  FreeOnTerminate := true;
+  FRespReceived := False;
+  FChannel := aChannel;
+  FReqUID := aRequestUID;
+  FRetrys := aChannel.Retrys;
+  FCriticalSection := FChannel.FCriticalSection;
+end;
+
+procedure TROUDPResponseThread.Execute;
+begin
+  inherited;
+
+  repeat
+    FChannel.ReceiveResp(FChannel.AsyncTimeOut);
+    Dec(FRetrys);
+  until (FRetrys < 1) or (FChannel.CheckStatus(FReqUID));
+
+  FRespReceived :=  FRetrys > 0;
+
+  if not FRespReceived
+  then Synchronize(DoTimeOut)
+  else Synchronize(DoEnd);
+
+end;
+
+procedure TROUDPResponseThread.DoTimeOut;
+begin
+  FChannel.DoAsyncThreadTimeOut(FReqUID);
+end;
+
+procedure TROUDPResponseThread.DoEnd;
+begin
+  FChannel.DoEndOfThread(Self);
+end;
+
+
+function TROIndyUDPChannel.GetHost: string;
+begin
+  result := IndyClient.Host
+end;
+
+function TROIndyUDPChannel.GetPort: integer;
+begin
+  result := IndyClient.Port
+end;
+
+procedure TROIndyUDPChannel.SetHost(const Value: string);
+begin
+  IndyClient.Host := Value
+end;
+
+procedure TROIndyUDPChannel.SetPort(const Value: integer);
+begin
+  IndyClient.Port := Value
+end;
+
+procedure TROIndyUDPChannel.IntSetServerLocator(
+  aServerLocator: TROServerLocator);
+begin
+  Host := aServerLocator.Host;
+  Port := aServerLocator.Port;
+end;
+
+{$IFDEF FPC}
+procedure TROIndyUDPChannel.AddResp(aResp: TROResponseItem);
+begin
+  FRespStorage.AddResp(aResp);
+end;
+
+procedure TROIndyUDPChannel.RemoveResp(aResp: TROResponseItem);
+begin
+  FRespStorage.RemoveResp(aResp);
+end;
+
+procedure TROIndyUDPChannel.RemoveRespByUID(aUID: String);
+begin
+  FRespStorage.RemoveRespByUID(aUID);
+end;
+
+procedure TROIndyUDPChannel.DeleteResp(Index: Integer);
+begin
+  FRespStorage.DeleteResp(Index);
+end;
+
+function  TROIndyUDPChannel.GetResp(Index: Integer): TROResponseItem;
+begin
+  Result:=FRespStorage.ResponseItem[Index];
+end;
+
+function  TROIndyUDPChannel.GetRespByUID(aUID: String): TROResponseItem;
+begin
+  Result:=FRespStorage.GetRespByUID(aUID);
+end;
+
+function  TROIndyUDPChannel.GetResponseByUID(aUID: String): TROResponseItem;
+begin
+  Result:=FRespStorage.GetRespByUID(aUID);
+end;
+
+function  TROIndyUDPChannel.IndexOfResp(aResp: TROResponseItem): Integer;
+begin
+  Result:=FRespStorage.IndexOfResp(aResp);
+end;
+
+function  TROIndyUDPChannel.CountOfResp: Integer;
+begin
+  Result:=FRespStorage.CountOfResp;
+end;
+
+procedure TROIndyUDPChannel.ClearStorage;
+begin
+  FRespStorage.ClearStorage;
+end;
+{$ENDIF FPC}
+
+initialization
+  RegisterTransportChannelClass(TROIndyUDPChannel);
+
+finalization
+  UnRegisterTransportChannelClass(TROIndyUDPChannel);
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIndyUDPServer.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIndyUDPServer.pas
new file mode 100644
index 0000000..6f6383e
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIndyUDPServer.pas	
@@ -0,0 +1,333 @@
+unit uROIndyUDPServer;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Indy Components                                   }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Provided by Nico Schoemaker (nico.schoemaker@teamro.remobjects.com         }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes,SysUtils,
+  IdUDPServer, IdSocketHandle, IdGlobal,
+  uROServer, uROClasses, uROClientIntf;
+
+
+type
+
+
+  TROIndyUDPServer = class;
+
+  TROIndyUDPTransport = class(TInterfacedObject, IROTransport, IROTCPTransport)
+  private
+    FBinding: TIdSocketHandle;
+    FServer: TROIndyUDPServer;
+  protected
+    function GetTransportObject : TObject;
+    function GetClientAddress : string;
+  public
+    property Binding: TIdSocketHandle read FBinding;
+    property Server: TROIndyUDPServer read FServer;
+
+    constructor Create(aServer: TROIndyUDPServer;aBinding: TIdSocketHandle);
+  end;
+
+  TROIndyUDPTransportclass = class of TROIndyUDPTransport;
+
+  TXPIdUDPServer = class(TIdUDPServer)
+  private
+    function GetActive: boolean; reintroduce;
+  public
+    procedure IndySetActive(Value : boolean);
+  published
+    property Active : boolean read GetActive;
+  end;
+
+  TROIndyUDPServer = class(TROServer, IROTransport)
+  private
+    FUDPSvr: TIdUDPServer;
+    FIDSize: Integer;
+
+    function GetIndyUDPServer: TXPIdUDPServer;
+    function GetPort: integer;
+    procedure SetPort(const Value: integer);
+  protected
+    function GetMessageID(aStream: TStream): AnsiString;
+    function FormatDispStream(aStream: TStream): TMemoryStream;
+
+    { TROServer }
+    procedure IntSetActive(const Value: boolean);override;
+    function  IntGetActive : boolean;override;
+
+    { IROTransport }
+    function GetTransportObject : TObject;
+    {$IFDEF RemObjects_INDY10C}
+    procedure InternalUDPRead(Sender: TIdUDPListenerThread; AData: TIdBytes; ABinding: TIdSocketHandle); virtual;
+    {$ELSE}
+    {$IFDEF RemObjects_INDY10}
+    procedure InternalUDPRead(Sender: TObject; AData: TIdBytes; ABinding: TIdSocketHandle); virtual;
+    {$ELSE}
+    procedure InternalUDPRead(Sender: TObject;AData: TStream;ABinding: TIdSocketHandle); virtual;
+    {$ENDIF}
+    {$ENDIF}
+    function  CreateUDPServer: TXPIdUDPServer;virtual;
+
+    function  GetTransportClass: TROIndyUDPTransportClass;virtual;
+  public
+    constructor Create(AOwner: TComponent);override;
+    destructor Destroy;override;
+  published
+    property IndyUDPServer: TXPIdUDPServer read GetIndyUDPServer;
+    property Port : integer read GetPort write SetPort;
+  end;
+
+implementation
+
+{ TROIndyUDPServer }
+
+constructor TROIndyUDPServer.Create(AOwner: TComponent);
+begin
+  inherited;
+  FUDPSvr := CreateUDPServer;
+  {$IFDEF DELPHI6UP}
+  FUDPSvr.SetSubComponent(TRUE);
+  {$ENDIF}
+end;
+
+function TROIndyUDPServer.CreateUDPServer: TXPIdUDPServer;
+begin
+  result := TXPIdUDPServer.Create(Self);
+  result.OnUDPRead := InternalUDPRead;
+  result.Name := 'InternalIndyServer';
+  result.DefaultPort := 8090;
+  // In case the result of NewGuidAsString change's in the future
+  FIDSize := Length(NewGuidAsString);
+end;
+
+destructor TROIndyUDPServer.Destroy;
+begin
+  inherited;
+end;
+
+function TROIndyUDPServer.GetIndyUDPServer: TXPIdUDPServer;
+begin
+ result := TXPIdUDPServer(FUDPSvr);
+end;
+function TROIndyUDPServer.GetPort: integer;
+begin
+  Result := IndyUDPServer.DefaultPort;
+end;
+
+procedure TROIndyUDPServer.SetPort(const Value: integer);
+begin
+  IndyUDPServer.DefaultPort := Value; 
+end;
+
+function TROIndyUDPServer.GetTransportClass: TROIndyUDPTransportClass;
+begin
+  result := TROIndyUDPTransport;
+end;
+
+function TROIndyUDPServer.GetTransportObject: TObject;
+begin
+  result := Self;
+end;
+
+{$IFDEF RemObjects_INDY10C}
+procedure TROIndyUDPServer.InternalUDPRead(Sender: TIdUDPListenerThread; AData: TIdBytes; ABinding: TIdSocketHandle);
+{$ELSE}
+{$IFDEF RemObjects_INDY10}
+procedure TROIndyUDPServer.InternalUDPRead(Sender: TObject; AData: TIdBytes; ABinding: TIdSocketHandle);
+{$ELSE}
+procedure TROIndyUDPServer.InternalUDPRead(Sender: TObject; AData: TStream; ABinding: TIdSocketHandle);
+{$ENDIF}
+{$ENDIF}
+var lResp: TROBinaryMemoryStream;
+    lReq: TMemoryStream;
+    lRespS: AnsiString;
+    lTransport: IROTCPTransport;
+    lMesgID: AnsiString;
+    lStream: TStream;
+{$IFDEF RemObjects_INDY10}
+    b : TIdBytes;
+{$ENDIF}
+begin
+  lResp := TROBinaryMemoryStream.Create('');
+  lReq := nil;
+  try
+    {$IFDEF RemObjects_INDY10}
+    lStream := TMemoryStream.Create();
+    WriteTIdBytesToStream(lStream, AData);
+    lStream.Position := 0;
+    try
+    {$ELSE}
+    lStream := AData;
+    {$ENDIF}
+
+    lMesgID := GetMessageID(lStream);
+    lReq := FormatDispStream(lStream);
+
+    if Assigned(lReq) then  // lReq becomes nil if not a valid (RO) AData Stream
+    begin
+      lTransport := GetTransportClass.Create(Self,ABinding);
+      DispatchMessage(lTransport, lReq, lResp);
+      lRespS := lMesgID+lResp.ToString;
+      {$IFDEF RemObjects_INDY10}
+      SetLength(b,Length(lRespS));
+      Move(pointer(lRespS)^, b[0], Length(lRespS));
+      ABinding.SendTo(ABinding.PeerIP, ABinding.PeerPort, b);
+      {$ELSE}
+      ABinding.SendTo(ABinding.PeerIP, ABinding.PeerPort, lRespS[1], Length(lRespS));
+      {$ENDIF}
+    end;
+
+    {$IFDEF RemObjects_INDY10}
+    finally
+      FreeAndNil(lStream);
+    end;
+    {$ENDIF}
+
+  finally
+    if Assigned(lReq) then
+      lReq.Free;
+    lResp.Free;
+  end;
+end;
+
+{-----------------------------------------------------------------------------
+  Procedure: TROIndyUDPServer.GetMessageID
+  Author:    Nico
+  Date:      19-apr-2003
+  Arguments: aStream: TStream
+  Result:    String
+  Extracts the included ID from the stream.
+  Returns a empty string if the method is not able to extract the ID.
+-----------------------------------------------------------------------------}
+function TROIndyUDPServer.GetMessageID(aStream: TStream): AnsiString;
+var lPos: Integer;
+begin
+  result := '';
+  if not(Assigned(aStream)) then
+    exit;
+  if aStream.Size < FIDSize then
+    Exit;
+
+  lPos := aStream.Position;
+  try
+    aStream.Position := 0;
+    SetLength(result,FIDSize);
+    aStream.ReadBuffer(result[1],FIDSize);
+  finally
+    aStream.Position := lPos;
+  end;
+end;
+
+{-----------------------------------------------------------------------------
+  Procedure: TROIndyUDPServer.FormatDispStream
+  Author:    Nico
+  Date:      19-apr-2003
+  Arguments: aStream: TStream
+  Result:    TStream
+  Constructs the given aStream back to a dispatchable RO stream.
+  This involves the removing of included ID, that is assumed to be present
+  in the given stream.If the method is not able to counstruct a dispatchable
+  stream the result will be nil.
+-----------------------------------------------------------------------------}
+function TROIndyUDPServer.FormatDispStream(aStream: TStream): TMemoryStream;
+var lBuf: AnsiString;
+    lPos: Integer;
+begin
+  result := nil;
+  if not(Assigned(aStream)) then
+    Exit;
+  if aStream.Size < FIDSize then
+    Exit;
+
+  lPos := aStream.Position;
+  // Initializa the result stream
+  result := TMemoryStream.Create;
+  try
+    try
+      TMemoryStream(result).SetSize(aStream.Size-FIDSize);
+
+      SetLength(lBuf,aStream.Size-FIDSize);
+      // Set the given stream pos on 1 byte after the prefixed ID
+      aStream.Position := FIDSize;
+      // Copy the contens without ID to the local buffer.
+      aStream.Read(lBuf[1],aStream.Size-FIDSize);
+      // Copy the contents of the buffer into the result stream
+      result.Position := 0;
+      result.Write(lBuf[1],aStream.Size-FIDSize);
+      result.Position := 0;
+    except
+      // Dont return the result stream
+      result.Free;
+      result := nil;
+      raise;
+    end;
+  finally
+    aStream.Position := lPos;
+  end;
+end;
+
+//------------------------------------------------------------------------------
+                           { TXPIdUDPServer }
+//------------------------------------------------------------------------------
+
+function TXPIdUDPServer.GetActive: boolean;
+begin
+  result := Inherited Active;
+end;
+
+procedure TXPIdUDPServer.IndySetActive(Value: boolean);
+begin
+  inherited Active := Value;
+end;
+
+function TROIndyUDPServer.IntGetActive: boolean;
+begin
+  result := FUDPSvr.Active;
+end;
+
+procedure TROIndyUDPServer.IntSetActive(const Value: boolean);
+begin
+  IndyUDPServer.IndySetActive(Value);
+end;
+
+//------------------------------------------------------------------------------
+                           { TROIndyUDPTransport }
+//------------------------------------------------------------------------------
+
+constructor TROIndyUDPTransport.Create(aServer: TROIndyUDPServer;aBinding: TIdSocketHandle);
+begin
+  FBinding := aBinding;
+  FServer  := aServer;
+end;
+
+function TROIndyUDPTransport.GetClientAddress: string;
+begin
+  result := FBinding.PeerIP;
+end;
+
+
+function TROIndyUDPTransport.GetTransportObject: TObject;
+begin
+  result := Self;
+end;
+
+initialization
+  RegisterServerClass(TROIndyUDPServer);
+finalization
+  UnregisterServerClass(TROIndyUDPServer);
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIpHttpServer.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIpHttpServer.pas
new file mode 100644
index 0000000..4aede7c
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIpHttpServer.pas	
@@ -0,0 +1,443 @@
+unit uROIpHttpServer;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Synapse Components                                }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes, uROServer, uROClientIntf, uIPAsyncSocket, uIPAsyncHttpServer, uIPHttpHeaders,
+  uROThreadPool, uROServerIntf, uRORes, uROClient, uROHtmlServerInfo, uRODL, uROHTTPTools;
+
+type
+  TROIpHTTPServer = class(TROServer)
+  private
+    fServeRodl, fServeInfoPage: Boolean;
+    fSendExceptionsAs500: boolean;
+    fServer: TIPAsyncHttpServer;
+    fThreadPool: TROThreadPool;
+    fOwnsThreadPool: Boolean;
+    fOnManualBindSocket: TNotifyEvent;
+    fOnGetCustomClientAccessPolicy: TROCustomClientAccessPolicyMethod;
+    fSendClientAccessPolicyXml: TROClientAccessPolicyType;
+    procedure SetThreadPool(const Value: TROThreadPool);
+  protected
+    procedure IntSetActive(const Value: boolean); override;
+    function IntGetActive : boolean; override;
+
+    function GetDispatchersClass : TROMessageDispatchersClass; override;
+
+
+    function GetPort: Integer;
+    procedure SetPort(const Value: Integer);
+    procedure IntRequest(Sender: TObject; aContext: IIPAsyncContext);
+  public
+    constructor Create(aComponent: TComponent); override;
+    destructor Destroy; override;
+
+    property Server: TIPAsyncHttpServer read fServer;
+  published
+    property Port:Integer read GetPort write SetPort;
+    property ServeInfoPage : Boolean read fServeInfoPage write fServeInfoPage default true;
+    property ServeRodl : Boolean read fServeRodl write fServeRodl default true;
+    property SendExceptionsAs500: boolean read fSendExceptionsAs500 write fSendExceptionsAs500 default true;
+    property OnGetRODLReader;
+
+    property ThreadPool: TROThreadPool read fThreadPool write SetThreadPool;
+
+    property OnManualBindSocket: TNotifyEvent read fOnManualBindSocket write fOnManualBindSocket;
+    property OnGetCustomClientAccessPolicy: TROCustomClientAccessPolicyMethod read fOnGetCustomClientAccessPolicy write fOnGetCustomClientAccessPolicy;
+    property SendClientAccessPolicyXml: TROClientAccessPolicyType read fSendClientAccessPolicyXml write fSendClientAccessPolicyXml default captAllowNone;
+  end;
+
+implementation
+uses
+  uROHTTPDispatch, TypInfo, SysUtils, uROIpTcpServer, uROClasses;
+
+type
+  TROIpHttpWorker = class(TInterfacedObject, IROThreadPoolCallback, IROTransport, IROTCPTransport, IROHTTPTransport)
+  private
+    fOwner: TROIpHTTPServer;
+    fContext: IIPAsyncContext;
+    fQueryData: TStringList;
+    function GetClientAddress: String;
+    function GetTransportObject: TObject;
+    function GetContentType: String;
+    function GetHeaders(const aName: String): String;
+    function GetLocation: String;
+    function GetPathInfo: String;
+    function GetQueryParameter(const aName: String): String;
+    function GetQueryString: String;
+    function GetTargetURL: String;
+    function GetUserAgent: String;
+    procedure SetContentType(const aValue: String);
+    procedure SetHeaders(const aName: String; const aValue: String);
+    procedure SetPathInfo(const aValue: String);
+    procedure SetTargetURL(const aValue: String);
+    procedure SetUserAgent(const aValue: String);
+  public
+    constructor Create(aOwner: TROIpHTTPServer; aContext: IIPAsyncContext);
+    destructor Destroy; override;
+    procedure Callback(Caller: TROThreadPool; aThread: TThread);
+  end;
+
+{ TROIpHTTPServer }
+
+constructor TROIpHTTPServer.Create(aComponent: TComponent);
+begin
+  inherited Create(aComponent);
+
+  fServer := TIPAsyncHttpServer.Create;
+  fServer.OnRequest := IntRequest;
+  fServer.Port := 8099;
+  fServeInfoPage := true;
+  fServeRodl := true;
+end;
+
+destructor TROIpHTTPServer.Destroy;
+begin
+  Active := false;
+  fServer.Free;
+  if fOwnsThreadPool then
+    fThreadPool.Free;
+  inherited Destroy;
+end;
+
+function TROIpHTTPServer.GetDispatchersClass: TROMessageDispatchersClass;
+begin
+  Result := TROHTTPMessageDispatchers;
+end;
+
+function TROIpHTTPServer.GetPort: Integer;
+begin
+  result := fServer.Port;
+end;
+
+function TROIpHTTPServer.IntGetActive: boolean;
+begin
+  result := fServer.Active;
+end;
+
+procedure TROIpHTTPServer.IntSetActive(const Value: boolean);
+begin
+  inherited;
+  if Value = fserver.Active then exit;
+  if Value then begin
+    fServer.OnManualBind := fOnManualBindSocket;
+    if fThreadPool = nil then begin
+      fThreadPool := TROThreadPool.Create(nil);
+      fOwnsThreadPool := true;
+    end;
+    fServer.Active := true;
+  end else begin
+    fServer.Active := false;
+    
+  end;
+end;
+
+procedure TROIpHTTPServer.SetPort(const Value: Integer);
+begin
+  fServer.Port := Value;
+end;
+
+procedure TROIpHTTPServer.SetThreadPool(const Value: TROThreadPool);
+begin
+  if fOwnsThreadPool then begin
+    FreeAndNil(fThreadPool);
+  end;
+  fOwnsThreadPool := false;
+  fThreadPool := Value;
+end;
+
+procedure TROIpHTTPServer.IntRequest(Sender: TObject;
+  aContext: IIPAsyncContext);
+begin
+  try
+    fThreadPool.QueueItem(TROIpHttpWorker.Create(self, aContext));
+  except
+    aContext.GetSelf.Disconnect;
+  end;
+end;
+
+
+{ TROIpHttpWorker }
+
+procedure TROIpHttpWorker.Callback(Caller: TROThreadPool;
+  aThread: TThread);
+
+  procedure WriteError(resp : TMemoryStream);
+  var
+    s: ansistring;
+  begin
+    s := '<font size="7">500 Invalid Path</font><br />'+{$IFDEF UNICODE}WideStringToAnsiString{$ENDIF}(err_CannotFindMessageDispatcher);
+    resp.Write(s[1], Length(s));
+  end;
+
+var
+  Req: TByteArrayWrapper;
+  lRodl: TRODLLibrary;
+  root,
+  sub: string;
+  data: TDynamicByteArray;
+  disp: TROHTTPDispatcher;
+  ok: Boolean;
+  resp: TMemoryStream;
+  lIgnore: TROResponseOptions;
+  s: ansistring;
+  s1: string;
+  info: IRONamedModuleInfo;
+  lPolicyContent: AnsiString;
+begin
+  req := TByteArrayWrapper.Create(TByteArray(fContext.RequestData));
+  resp := TMemoryStream.Create;
+  fcontext.Response.Headers.Values['Content-Type'] := fContext.Request.ContentType;
+  fcontext.Response.Code := 200;
+  fcontext.Response.Reason := 'OK';
+  ok := False;
+  try
+    root := fContext.Request.Path;
+    if Pos('?', Root) > 0 then Delete(Root, pos('/', root), MaxInt);
+    if (root <> '') and (root[1] = '/') then delete(root, 1,1);
+    if pos('/', root) > 0 then
+    begin
+      sub := copy(root, pos('/', root)+1, maxint);
+      root := '/' + copy(root, 1, pos('/', root) - 1);
+    end else
+    begin
+      root := '/' + root;
+      sub := '';
+    end;
+
+    disp := TROHTTPMessageDispatchers(fOwner.Dispatchers).GetDispatcherByPath(root) as TROHTTPDispatcher;
+
+    if disp <> nil then
+    begin
+      if (req.Size = 0) then begin
+        ok := fOwner.fServeRodl;
+        if ok then
+          ok := fOwner.IntDispatchMessage(disp, self, req, resp, lIgnore)
+        else begin
+          WriteError(resp);
+          SetContentType('text/html');
+        end;
+      end else if (sub = '')  then
+        ok := fOwner.IntDispatchMessage(disp, self, req, resp, lIgnore)
+      else if (CompareText(sub, 'rodl') = 0) and fOwner.fServeRodl then
+      begin
+        if copy(disp.PathInfo, 1, 1) = '/' then SetPathInfo(disp.PathInfo) else SetPathInfo('/'+disp.PathInfo);
+        GetRodl(resp, self, s1, fOwner.GetRODLReader);
+        SetContentType(s1);
+
+        ok := true;
+      end else if Supports(disp.Message, IRONamedModuleInfo, info) and (CompareText(info.ModuleInfoName, sub) = 0) and fOwner.fServeRodl then
+      begin
+        if copy(disp.PathInfo, 1, 1) = '/' then SEtPathInfo(disp.PathInfo) else SetPathInfo('/'+disp.PathInfo);
+        info.GetModuleInfo(resp, self, s1);
+        SetContentType(s1);
+        ok := true;
+      end else
+      begin
+        ok := fOwner.IntDispatchMessage(disp, self, req, resp, lIgnore)
+      end;
+    end else if (CompareText(root, '/rodl') = 0) and (sub = '') and fOwner.fServeRodl then
+    begin
+      GetRodl(resp, self, s1, fOwner.GetRODLReader);
+      SetContentType(s1);
+      ok := true;
+    end else if fOwner.fServeInfoPage and (CompareText(root, '/doc') = 0) then
+    begin
+      if sub = 'css' then
+      begin
+        s := GetRodlCss;
+        resp.Write(s[1], Length(s));
+        SetContentType('text/css');
+        ok := true;
+      end else
+      if sub = 'xslt' then
+      begin
+        s := GetRodlStyleSheet;
+        resp.Write(s[1], Length(s));
+        SetContentType('text/xml');
+        ok := true;
+      end else if sub = '' then
+      begin
+        lRodl := GetRodlLibrary(fOwner.GetRODLReader);
+        try
+          SetContentType('text/xml');
+          s := GetRodlWithStyleSheet(lRodl, '/doc/xslt');
+          resp.Write(s[1], Length(s));
+        finally
+          lRodl.Free;
+        end;
+        ok := true;
+      end else
+      begin
+        WriteError(resp);
+        ok := false;
+      end;
+    end else if fOwner.fServeInfoPage and (CompareStr(root, '/favicon.ico') = 0) then
+    begin
+      GetRodlFavIcon(resp);
+      SetContentType('image/x-icon');
+      ok := true;
+    end else if fOwner.fServeInfoPage and (root = '/') then
+    begin
+      lrodl := GetRodlLibrary(fOwner.GetRODLReader);
+      try
+        s := GetRodlServerInfo('/', lRodl, fOwner.Dispatchers);
+        resp.Write(s[1], Length(s));
+      finally
+        lRodl.Free;
+      end;
+      ok := true;
+    end else
+    if CompareText(root, '/clientaccesspolicy.xml') = 0 then begin
+      case fOwner.fSendClientAccessPolicyXml of
+        captAllowAll: begin
+          lPolicyContent := GetClientAccessPolicy;
+        end;
+        captCustom: begin
+          if Assigned(fOwner.fOnGetCustomClientAccessPolicy) then
+            fOwner.fOnGetCustomClientAccessPolicy(fOwner, lPolicyContent);
+        end;
+      end;
+      if lPolicyContent <> '' then begin
+        SetContentType('text/xml');
+        resp.Write(lPolicyContent[1], Length(lPolicyContent));
+      end;
+    end  else
+    begin
+      WriteError(resp);
+      ok := false;
+    end;
+
+    if not (ok or fOwner.fSendExceptionsAs500) then begin
+      fcontext.Response.Code := 500;
+      fcontext.Response.Reason := 'Internal Server Error';
+    end;
+  except
+  end;
+  req.Free;
+  try
+    SetLength(data, resp.Size);
+    resp.position := 0;
+    resp.Read(data[0], Length(data));
+    fContext.ResponseData := data;
+    fContext.SendResponse;
+  finally
+    resp.Free;
+  end;
+end;
+
+constructor TROIpHttpWorker.Create(aOwner: TROIpHTTPServer;
+  aContext: IIPAsyncContext);
+begin
+  inherited Create;
+  fOwner := aOwner;
+  fContext := aContext;
+end;
+
+destructor TROIpHttpWorker.Destroy;
+begin
+  fQueryData.Free;
+  inherited;
+end;
+
+function TROIpHttpWorker.GetClientAddress: String;
+begin
+  result := fContext.Request.ClientAddress;
+end;
+
+function TROIpHttpWorker.GetContentType: String;
+begin
+  result := fContext.Request.ContentType;
+end;
+
+function TROIpHttpWorker.GetHeaders(const aName: String): String;
+begin
+  result := fContext.Request.Headers.Values[aname];
+end;
+
+function TROIpHttpWorker.GetLocation: String;
+begin
+  Result := '';
+end;
+
+function TROIpHttpWorker.GetPathInfo: String;
+begin
+  result := '';
+end;
+
+function TROIpHttpWorker.GetQueryParameter(const aName: String): String;
+begin
+  if fQueryData = nil then begin
+    fQueryData := TStringList.Create;
+    fQueryData.Delimiter := '&';
+    fQueryData.DelimitedText := GetQueryString;
+  end;
+  result := fqueryData.Values[aName];
+end;
+
+function TROIpHttpWorker.GetQueryString: String;
+begin
+  result := fContext.Request.Path;
+  if Pos('?', result) = 0 then result := '' else
+    result := Copy(Result, Pos('?', result)+1, MaxInt);
+end;
+
+function TROIpHttpWorker.GetTargetURL: String;
+begin
+  result := '';
+end;
+
+function TROIpHttpWorker.GetTransportObject: TObject;
+begin
+  result := FOwner;
+end;
+
+function TROIpHttpWorker.GetUserAgent: String;
+begin
+  Result := fContext.Request.Headers.Values['User-Agent'];
+end;
+
+procedure TROIpHttpWorker.SetContentType(const aValue: String);
+begin
+  fContext.Response.Headers.Values['Content-Type'] := aValue;
+end;
+
+procedure TROIpHttpWorker.SetHeaders(const aName, aValue: String);
+begin
+  fContext.Response.Headers.Values[aName] := aValue;
+end;
+
+procedure TROIpHttpWorker.SetPathInfo(const aValue: String);
+begin
+end;
+
+procedure TROIpHttpWorker.SetTargetURL(const aValue: String);
+begin
+
+end;
+
+procedure TROIpHttpWorker.SetUserAgent(const aValue: String);
+begin
+  fContext.Response.Headers.Values['User-Agent'] := aValue;
+
+end;
+
+initialization
+  RegisterServerClass(TROIpHTTPServer);
+finalization
+  UnregisterServerClass(TROIpHTTPServer);
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIpSuperHttpServer.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIpSuperHttpServer.pas
new file mode 100644
index 0000000..96ecf6b
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIpSuperHttpServer.pas	
@@ -0,0 +1,219 @@
+unit uROIpSuperHttpServer;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Synapse Components                                }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+interface
+
+{$I RemObjects.inc}
+
+uses
+ SysUtils, Classes, uIPAsyncSocket, uIPAsyncHttpServer, uROServer,
+ uROBaseSuperHttpServer, uIPHttpHeaders;
+
+const
+  DefaultServerName = 'RemObjects SDK Super IpHttp Server for Delphi'; 
+
+type
+  TROIpSuperHTTPServer = class(TROBaseSuperHttpServer)
+  private
+    fSocket: TIPAsyncHttpServer;
+    fOnManualBindSocket: TNotifyEvent;
+    fOnUnknownRequest: TIPAsyncHttpRequestHandler;
+    fServerName: string;
+    function GetBindV4: Boolean;
+    function GetBindV6: Boolean;
+    function GetPort: Integer;
+    procedure SetBindV4(const Value: Boolean);
+    procedure SetPort(const Value: Integer);
+    procedure SetBindV6(const Value: Boolean);
+    function GetDisableNagle: Boolean;
+    procedure SetDisableNagle(const Value: Boolean);
+  protected
+    procedure CloseConnection(aConnection: IUnknown); override;
+    function HandleUnknownRequest(aTarget: IUnknown; arequest: TIPHttpRequestHeaders; aData: TDynamicByteArray): Boolean; override;
+    procedure SendResponse(aTarget: IUnknown; aHeaders: TIPHttpResponseHeaders; aData: TDynamicByteArray; UserData: IInterface);override;
+    procedure SetDefaultHeaders(aTarget: IUnknown; aHeaders: TIPHttpResponseHeaders); override;
+    procedure DoActivate; override;
+    procedure DoDeactivate; override;
+    procedure IntRequest(Sender: TObject; aContext: IIPAsyncContext);
+    procedure IntBeforeCleanupContext(Sender: TObject; aContext: IIPAsyncContext);
+    procedure IntResponseSent(Sender: TObject; aContext: IIPAsyncContext);
+    procedure IntResponseFailed(Sender: TObject; aContext: IIPAsyncContext);
+  public
+    constructor Create(aOwner: TComponent); override;
+    destructor Destroy; override;
+  published
+    property Port: Integer read GetPort write SetPort default 8099;
+    property BindV6: Boolean read GetBindV6 write SetBindV6 default false;
+    property BindV4: Boolean read GetBindV4 write SetBindV4 default true;
+    property ServerName: string read fServerName write FserverName;
+    property DisableNagle: Boolean read GetDisableNagle write SetDisableNagle default true;
+
+    property OnManualBindSocket: TNotifyEvent read fOnManualBindSocket write fOnManualBindSocket;
+    property OnUnknownRequest: TIPAsyncHttpRequestHandler read fOnUnknownRequest write fOnUnknownRequest;
+  end;
+
+implementation
+
+{ TROIpSuperHTTPServer }
+
+procedure TROIpSuperHTTPServer.CloseConnection(aConnection: IUnknown);
+begin
+  IIPAsyncContext(aConnection).GetSelf.Disconnect;
+end;
+
+constructor TROIpSuperHTTPServer.Create(aOwner: TComponent);
+begin
+  inherited Create(aOwner);
+  fSocket := TIPAsyncHttpServer.Create;
+  fServerName := DefaultServerName;
+  fSocket.OnRequest := IntRequest;
+  fSocket.OnBeforeCleanupContext := IntBeforeCleanupContext;
+  fSocket.OnResponseSent := IntResponseSent;
+  fSocket.OnResponseFailed := IntResponseFailed;
+  fSocket.Port := 8099;
+end;
+
+destructor TROIpSuperHTTPServer.Destroy;
+begin
+  FreeAndNil(fSocket);
+  inherited Destroy;
+end;
+
+procedure TROIpSuperHTTPServer.DoActivate;
+begin
+  inherited DoActivate;
+  fSocket.OnManualBind := fOnManualBindSocket;
+  fSocket.MaxPostData := MaxPackageSize + 1024;
+  fSocket.Active := true;
+end;
+
+procedure TROIpSuperHTTPServer.DoDeactivate;
+begin
+  if FSocket <> nil  then fSocket.Active := false;
+  inherited DoDeactivate;
+end;
+
+function TROIpSuperHTTPServer.GetBindV4: Boolean;
+begin
+  result := fsocket.BindV4;
+end;
+
+function TROIpSuperHTTPServer.GetBindV6: Boolean;
+begin
+  result := fsocket.BindV6;
+end;
+
+function TROIpSuperHTTPServer.GetPort: Integer;
+begin
+  result := fSocket.Port;
+end;
+
+function TROIpSuperHTTPServer.HandleUnknownRequest(aTarget: IUnknown;
+  arequest: TIPHttpRequestHeaders; aData: TDynamicByteArray): Boolean;
+begin
+  if assigned(fOnUnknownRequest) then begin
+    fOnUnknownRequest(self, IIPAsyncContext(aTarget));
+    result := true;
+  end else
+    result := false;
+end;
+
+procedure TROIpSuperHTTPServer.IntRequest(Sender: TObject;
+  aContext: IIPAsyncContext);
+begin
+  HandleRequest(acontext, aContext.Request, aContext.RequestData);
+end;
+
+
+procedure TROIpSuperHTTPServer.IntResponseFailed(Sender: TObject;
+  aContext: IIPAsyncContext);
+begin
+  ResponseFailed(IUnknown(aContext.UserData));
+end;
+
+procedure TROIpSuperHTTPServer.IntResponseSent(Sender: TObject;
+  aContext: IIPAsyncContext);
+begin
+  ResponseSucessful(IUnknown(aContext.UserData));
+end;
+
+procedure TROIpSuperHTTPServer.SendResponse(aTarget: IUnknown;
+  aHeaders: TIPHttpResponseHeaders; aData: TDynamicByteArray;
+  UserData: IInterface);
+var
+  p: Pointer;
+  lTarget: IIPAsyncContext;
+begin
+  lTarget := IIPAsyncContext(aTarget);
+  if aHeaders = nil then begin
+    SetDefaultHeaders(aTarget, lTarget.Response);
+    lTarget.Response.Headers.Values['Content-Type'] := 'application/octet-stream';
+  end else
+    lTarget.Response.Assign(aHeaders);
+  lTarget.ResponseData := aDAta;
+  p := nil;
+  IUnknown(P) := UserData;
+  lTarget.UserData := p;
+  lTarget.SendResponse;
+end;
+
+procedure TROIpSuperHTTPServer.IntBeforeCleanupContext(Sender: TObject;
+  aContext: IIPAsyncContext);
+var
+  p: Pointer;
+begin
+  p := aContext.UserData;
+  aContext.UserData := nil;
+  IUnknown(p) := nil;
+end;
+
+
+procedure TROIpSuperHTTPServer.SetBindV4(const Value: Boolean);
+begin
+  fSocket.BindV4 := VAlue;
+end;
+
+procedure TROIpSuperHTTPServer.SetDefaultHeaders(aTarget: IUnknown;
+  aHeaders: TIPHttpResponseHeaders);
+begin
+  aHeaders.Headers.Values['Server'] :=  fServerName;
+end;
+
+procedure TROIpSuperHTTPServer.SetPort(const Value: Integer);
+begin
+  fSocket.Port := Value;
+end;
+
+procedure TROIpSuperHTTPServer.SetBindV6(const Value: Boolean);
+begin
+  fSocket.BindV6 := Value;
+end;
+
+function TROIpSuperHTTPServer.GetDisableNagle: Boolean;
+begin
+  result := fSocket.DisableNagle;
+end;
+
+procedure TROIpSuperHTTPServer.SetDisableNagle(const Value: Boolean);
+begin
+  fSocket.DisableNagle := Value;
+end;
+
+initialization
+  RegisterServerClass(TROIpSuperHTTPServer);
+
+finalization
+  UnregisterServerClass(TROIpSuperHTTPServer);
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIpTcpServer.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIpTcpServer.pas
new file mode 100644
index 0000000..479e0f7
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROIpTcpServer.pas	
@@ -0,0 +1,451 @@
+unit uROIpTcpServer;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Synapse Components                                }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes, uROServer, uROClientIntf, uIPAsyncSocket,
+  uROThreadPool;
+
+type
+  TROIpTCPServer = class(TROServer)
+  private
+    fServeRodl: Boolean;
+    fSocket4,
+    fSocket6: TIPAsyncSocket;
+    fThreadPool: TROThreadPool;
+    fPort: Integer;
+    fOwnsThreadPool: Boolean;
+    fOnManualBindSocket: TNotifyEvent;
+    fActive: Boolean;
+    fBindV4,
+    fBindV6: Boolean;
+    fClients: TInterfaceList;
+    fMaxRequestsize: Integer;
+    fTimeout: Integer;
+    procedure cbAccept(aSender: TIPBaseAsyncSocket);
+    procedure SetThreadPool(const Value: TROThreadPool);
+    procedure DisconnectClients;
+  protected
+    procedure IntSetActive(const Value: boolean); override;
+    function IntGetActive : boolean; override;
+
+    function GetPort: Integer;
+    procedure SetPort(const Value: Integer);
+  public
+    constructor Create(aComponent: TComponent); override;
+    destructor Destroy; override;
+
+    property SocketV4: TIPAsyncSocket read fSocket4;
+    property SocketV6: TIPAsyncSocket read fSocket6;
+  published
+    property Port:Integer read GetPort write SetPort;
+    property BindV6: Boolean read fBindV6 write fBindV6 default false;
+    property BindV4: Boolean read fBindV4 write fBindV4 default true;
+    property ServeRodl : Boolean read fServeRodl write fServeRodl default true;
+    property OnGetRODLReader;
+    property MaxRequestSize: Integer read fMaxRequestSize write fMaxRequestSize default 5 * 1024 * 1024;
+    property Timeout: Integer read fTimeout write fTimeout default 120;
+
+    property ThreadPool: TROThreadPool read fThreadPool write SetThreadPool;
+
+    property OnManualBindSocket: TNotifyEvent read fOnManualBindSocket write fOnManualBindSocket;
+  end;
+  TByteArray = array of Byte;
+  TByteArrayWrapper = class(TStream)
+  private
+    fPosition: Integer;
+    fData: TByteArray;
+  protected
+{$IFDEF DELPHI7UP}
+    function GetSize: Int64; override;
+{$ENDIF}
+  public
+    constructor Create(const aData: TByteArray);
+    function Read(var Buffer; Count: Integer): Integer; override;
+    function Write(const Buffer; Count: Integer): Integer; override;
+    function Seek(Offset: Integer; Origin: Word): Integer; override;
+  end;
+
+
+implementation
+uses
+  uROHTTPTools, uROHTTPDispatch, SysUtils;
+type
+  TIPTCPContext = class;
+  IIPTCPContext = interface
+    ['{EC581981-DF92-4929-8480-D738E2519175}']
+    function GetSelf: TIPTCPContext;
+  end;
+  TIPTCPContext = class(TInterfacedObject, IIPTCPContext, IROTransport, IROTCPTransport)
+  private
+    fConnection: TIPBaseAsyncSocket;
+    fDisconnected: Boolean;
+    fOwner: TROIpTCPServer;
+    fRequestData: TByteArray;
+    fResponseData: TMemoryStream;
+    procedure cbDisconnect(sender: TIPBaseAsyncSocket);
+    procedure cbRequestSize(sender: TIPBaseAsyncSocket);
+    procedure cbRequest(sender: TIPBaseAsyncSocket);
+    procedure cbResponseSent(Sender: TIPBaseAsyncSocket);
+  public
+    constructor Create(aOwner: TROIpTCPServer; aConnection: TIPBaseAsyncSocket);
+    destructor Destroy; override;
+    procedure Disconnect;
+    procedure SendResponse;
+    function GetSelf: TIPTCPContext;
+    property Connection: TIPBaseAsyncSocket read fConnection write fConnection;
+    property Owner: TROIpTCPServer read fOwner;
+    property ResponseData: TMemoryStream read fResponseData;
+    function GetClientAddress: String;
+    function GetTransportObject: TObject;
+  end;
+
+
+{ TROIpTCPServer }
+
+constructor TROIpTCPServer.Create(aComponent: TComponent);
+begin
+  inherited Create(aComponent);
+  fMaxRequestsize := 5 * 1024 * 1024;
+  fPort := 8090;
+  fBindV4 := true;
+  fBindV6 := false;
+  fClients := TInterfaceList.Create;
+end;
+
+destructor TROIpTCPServer.Destroy;
+begin
+  Active := false;
+  fSocket4.Free;
+  fSocket6.Free;
+  fClients.Free;
+  if fOwnsThreadPool then
+    fThreadPool.Free;
+  inherited Destroy;
+end;
+
+function TROIpTCPServer.GetPort: Integer;
+begin
+  result := fPort;
+end;
+
+function TROIpTCPServer.IntGetActive: boolean;
+begin
+  result := fActive;
+end;
+
+procedure TROIpTCPServer.DisconnectClients;
+var
+  i: integer;
+  ctx: IIPTCPContext;
+begin
+  fClients.Lock;
+  try
+    for i := 0 to fClients.Count -1 do begin
+      ctx := IIPTCPContext(fClients[i]);
+      ctx.GetSelf.fOwner := nil;
+      ctx.GetSelf.Disconnect;
+    end;
+  finally
+    fClients.Unlock;
+  end;
+  fClients.Clear;
+end;
+
+
+procedure TROIpTCPServer.IntSetActive(const Value: boolean);
+begin
+  inherited;
+  if Value = fActive then exit;
+  fActive := value;
+  if Value then begin
+    if fThreadPool = nil then begin
+      fThreadPool := TROThreadPool.Create(nil);
+      fOwnsThreadPool := true;
+    end;
+    if fBindV4 then begin
+      fSocket4 := TIPAsyncSocket.Create(rsmTCPIP4);
+      if not assigned(fOnManualBindSocket) then
+        fSocket4.Bind('0.0.0.0', fPort);
+    end;
+    if fBindV6 then begin
+      fSocket6 := TIPAsyncSocket.Create(rsmTCPIP6);
+      if not assigned(fOnManualBindSocket) then
+        fSocket6.Bind('::', fPort);
+    end;
+    if assigned(fOnManualBindSocket) then fOnManualBindSocket(self);
+    if assigned(fSocket4) then begin
+      fSocket4.Listen(10);
+      fSocket4.BeginAccept(cbAccept);
+    end;
+    if assigned(fSocket6) then begin
+      fSocket6.Listen(10);
+      fSocket6.BeginAccept(cbAccept);
+    end;
+  end else begin
+    DisconnectClients;
+    fSocket4.Free;
+    fSocket6.Free;
+    fSocket4 := nil;
+    fSocket6 := nil;
+  end;
+end;
+
+procedure TROIpTCPServer.SetPort(const Value: Integer);
+begin
+  fPort := Value;
+end;
+
+procedure TROIpTCPServer.SetThreadPool(const Value: TROThreadPool);
+begin
+  if fOwnsThreadPool then begin
+    FreeAndNil(fThreadPool);
+  end;
+  fOwnsThreadPool := false;
+  fThreadPool := Value;
+end;
+
+procedure TROIpTCPServer.cbAccept(aSender: TIPBaseAsyncSocket);
+var
+  lSock: TIPBaseAsyncSocket;
+  lContext: IIPTCPContext;
+begin
+  try
+    lSock := aSender.EndAccept;
+  except
+    on e: EIPSocketError do
+      exit;
+      // We're shutting down, exit now.
+  end;
+  lContext := TIPTCPContext.Create(self, lSock);
+  lSock.NoDelay := true;
+  fClients.Add(lContext);
+  aSender.BeginAccept(cbAccept);
+end;
+
+{ TIPTCPContext }
+
+procedure TIPTCPContext.cbDisconnect(sender: TIPBaseAsyncSocket);
+var
+  lConn: TIPBaseAsyncSocket;
+begin
+  fDisconnected := true;
+  lConn := fConnection;
+  fConnection := nil;
+  if lConn <> nil then begin
+    lConn.EndDisconnect;
+    lConn.Free;
+  end;
+  if assigned(fOwner) then begin
+    fOwner.fClients.Remove(IIPTCPContext(self));
+  end;
+end;
+
+procedure TIPTCPContext.cbRequestSize(sender: TIPBaseAsyncSocket);
+var
+  lRequest: Integer;
+begin
+  if sender.EndReceive <> 4 then begin
+    cbDisconnect(sender);
+    exit;
+  end;
+  lRequest := fRequestData[3] or
+    (fRequestData[2] shl 8) or
+    (fRequestData[1] shl 16) or
+    (fRequestData[0] shl 24);
+  if lRequest > fOwner.MaxRequestSize then begin
+    cbDisconnect(sender);
+    exit;
+  end;
+  SetLength(fRequestData, lRequest);
+  fConnection.BeginReceive(@fRequestData[0], 0, lRequest, cbRequest);
+end;
+
+type
+  TIPTCPWorker = class(TInterfacedObject, IROThreadPoolCallback)
+  private
+    fContext: IIPTCPContext;
+  public
+    constructor Create(aContext: IIPTCPContext);
+    procedure Callback(Caller: TROThreadPool; aThread: TThread);
+  end;
+
+procedure TIPTCPContext.cbRequest(sender: TIPBaseAsyncSocket);
+begin
+  if sender.EndReceive <> Length(fRequestData) then begin
+    cbDisconnect(sender);
+    exit;
+  end;
+  try
+    fOwner.fThreadPool.QueueItem(TIPTCPWorker.Create(Self));
+  except
+    cbDisconnect(sender);
+    exit;
+  end;
+end;
+
+constructor TIPTCPContext.Create(aOwner: TROIpTCPServer;
+  aConnection: TIPBaseAsyncSocket);
+begin
+  fOwner := aOwner;
+  fConnection := aConnection;
+  fconnection.Buffered := true;
+  fConnection.OnTimeout := cbDisconnect;
+  fConnection.OnDisconnected := cbDisconnect;
+  fConnection.IdleTimeout := fOwner.Timeout;
+  SetLength(fRequestData, 4);
+  fResponseData := TMemoryStream.Create;
+  fConnection.BeginReceive(@fRequestData[0], 0, 4, cbRequestSize);
+end;
+
+destructor TIPTCPContext.Destroy;
+begin
+  fResponseData.Free;
+  inherited;
+end;
+
+procedure TIPTCPContext.Disconnect;
+begin
+  fDisconnected := true;
+
+ if assigned(fConnection) then
+    fConnection.BeginDisconnect(cbDisconnect);
+end;
+
+function TIPTCPContext.GetSelf: TIPTCPContext;
+begin
+  result := self;
+end;
+
+procedure TIPTCPContext.SendResponse;
+var
+  lLength: Integer;
+begin
+  lLength := fResponseData.Size;
+  fResponseData.Position := 0;
+  if fResponseData.Size < 1020 then begin
+    SetLength(fRequestData, 4 + fResponseData.Size);
+  end else
+    SetLength(fRequestData, 1024);
+  fRequestData[3] := Byte(lLength);
+  fRequestData[2] := Byte(Integer(lLength shr 8));
+  fRequestData[1] := Byte(Integer(lLength shr 16));
+  fRequestData[0] := Byte(Integer(lLength shr 24));
+  fResponseData.Read(fRequestData[4], Length(fRequestData)-4);
+  fConnection.BeginSend(@fRequestData[0], 0, Length(fRequestData), cbResponseSent);
+end;
+
+procedure TIPTCPContext.cbResponseSent(Sender: TIPBaseAsyncSocket);
+var
+  lLength: Integer;
+begin
+  if fConnection.EndSend <= 0 then begin
+    cbDisconnect(fConnection);
+    exit;
+  end;
+
+  lLength := fResponseData.Read(fRequestData[0], 1024);
+  if lLength = 0 then begin
+    if Length(fRequestData) < 4 then SetLength(fRequestData, 4);
+    fResponseData.Clear;
+    fConnection.BeginReceive(@fRequestData[0], 0, 4, cbRequestSize);
+  end else begin
+    fConnection.BeginSend(@fRequestData[0], 0, lLength, cbResponseSent);
+  end;
+end;
+
+function TIPTCPContext.GetClientAddress: String;
+begin
+  Result := fConnection.GetRemoteIp;
+end;
+
+function TIPTCPContext.GetTransportObject: TObject;
+begin
+  Result := fOwner;
+end;
+
+{ TIPTCPWorker }
+
+procedure TIPTCPWorker.Callback(Caller: TROThreadPool; aThread: TThread);
+var
+  lWrapper: TByteArrayWrapper;
+begin
+  lWrapper := TByteArrayWrapper.Create(fContext.GetSelf.fRequestData);
+  try
+    if (fContext.GetSelf.fOwner.ServeRodl) or ((lWrapper.Size <> 0) and (lWrapper.Size <> 4)) then
+      fContext.GetSelf.fOwner.DispatchMessage(fContext.GetSelf, lWrapper, fContext.GetSelf.ResponseData);
+    fContext.GetSelf.SendResponse;
+  except
+    // can't have exceptions escape
+  end;
+  lWrapper.Free;
+end;
+
+constructor TIPTCPWorker.Create(aContext: IIPTCPContext);
+begin
+  fContext := aContext;
+end;
+
+{ TByteArrayWrapper }
+
+constructor TByteArrayWrapper.Create(const aData: TByteArray);
+begin
+  inherited Create;
+  fData := aData;
+end;
+
+{$IFDEF DELPHI7UP}
+function TByteArrayWrapper.GetSize: Int64;
+begin
+  result := Length(fData);
+end;
+{$ENDIF}
+
+function TByteArrayWrapper.Read(var Buffer; Count: Integer): Integer;
+begin
+  if fPosition + Count > Length(fData) then
+    Count := Length(fData) - fPosition;
+  Move(fData[fPosition], Buffer, Count);
+  fPosition := fPosition + Count;
+  result := Count;
+end;
+
+function TByteArrayWrapper.Seek(Offset: Integer; Origin: Word): Integer;
+begin
+  case Origin of
+    soFromBeginning: fPosition := Offset;
+    soFromCurrent: fPosition := fPosition + Offset;
+    soFromEnd: fPosition := Length(fData) + Offset;
+  end;
+  if fPosition < 0 then fPosition := 0 else
+  if fPosition > Length(fData) then fPosition := Length(fData); 
+  result := fPosition;
+end;
+
+function TByteArrayWrapper.Write(const Buffer; Count: Integer): Integer;
+begin
+  {$IFDEF FPC}
+  Result := 0;
+  {$ENDIF}
+  raise Exception.Create('Not Implemented');
+end;
+
+initialization
+  RegisterServerClass(TROIpTCPServer);
+finalization
+  UnregisterServerClass(TROIpTCPServer);
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROJSONMessage.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROJSONMessage.pas
new file mode 100644
index 0000000..c45c235
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROJSONMessage.pas	
@@ -0,0 +1,927 @@
+unit uROJSONMessage;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes, SysUtils, TypInfo, uROTypes, uROHttpTools,
+  uROSerializer, uROClient, uROClientIntf, uROJSONParser;
+
+type
+  TROJSONMessage = class;
+  EROJSONSerializerException = class(Exception);
+  TROJSONSerializer = class(TROSerializer)
+  private
+    fOwner: TROJSONMessage;
+    fArrayIndex: Integer;
+    fNested: Boolean;
+
+    function IntReadObject(const aName: string): TROJSONValue;
+    procedure IntWriteObject(const aName: string; obj: Variant);
+
+  protected
+  Public
+    { Writers }
+    procedure WriteInteger(const aName : string; anOrdType : TOrdType; const Ref; ArrayElementId : integer = -1); override;
+    procedure WriteInt64(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+    procedure WriteEnumerated(const aName : string; anEnumTypeInfo : PTypeInfo; const Ref; ArrayElementId : integer = -1); override;
+    procedure WriteUTF8String(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+    procedure WriteAnsiString(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+    procedure WriteWideString(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+    procedure WriteDateTime(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+    procedure WriteDouble(const aName : string; aFloatType : TFloatType; const Ref; ArrayElementId : integer = -1); override;
+    procedure WriteVariant(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+    procedure WriteXml(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+    procedure WriteGuid(const aName: String; const Ref; ArrayElementId: Integer = -1); override;
+    procedure WriteDecimal(const aName: String; const Ref; ArrayElementId: Integer = -1); override;
+    procedure WriteBinary(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+    procedure WriteStruct(const aName : string; const Ref; aClass: TClass = nil; ArrayElementId : integer = -1); override;
+    procedure WriteArray(const aName : string; const Ref; aClass: TClass = nil; ArrayElementId : integer = -1); override;
+    procedure WriteException(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+
+    { Readers }
+    procedure ReadInteger(const aName : string; anOrdType : TOrdType; var Ref; ArrayElementId : integer = -1); override;
+    procedure ReadInt64(const aName : string; var Ref; ArrayElementId : integer = -1); override;
+    procedure ReadEnumerated(const aName : string; anEnumTypeInfo : PTypeInfo; var Ref; ArrayElementId : integer = -1); override;
+    procedure ReadUTF8String(const aName : string; var Ref; ArrayElementId : integer = -1; iMaxLength:integer=-1); override;
+    procedure ReadAnsiString(const aName : string; var Ref; ArrayElementId : integer = -1; iMaxLength:integer=-1); override;
+    procedure ReadWideString(const aName : string; var Ref; ArrayElementId : integer = -1; iMaxLength:integer=-1); override;
+    procedure ReadDateTime(const aName : string; var Ref; ArrayElementId : integer = -1); override;
+    procedure ReadDouble(const aName : string; aFloatType : TFloatType; var Ref; ArrayElementId : integer = -1); override;
+    procedure ReadVariant(const aName : string; var Ref; ArrayElementId : integer = -1); override;
+    procedure ReadXml(const aName : string; var Ref; ArrayElementId : integer = -1); override;
+    procedure ReadDecimal(const aName: String; var Ref; ArrayElementId: Integer = -1); override;
+    procedure ReadGuid(const aName: String; var Ref; ArrayElementId: Integer = -1); override;
+    procedure ReadBinary(const aName : string; var Ref; ArrayElementId : integer = -1); override;
+    function ReadStruct(const aName : string; aClass : TClass; var Ref; ArrayElementId : integer = -1): Boolean; override;
+    function ReadArray(const aName : string; aClass : TClass; var Ref; ArrayElementId : integer = -1): Boolean; override;
+    procedure ReadException(const aName : string; var Ref; ArrayElementId : integer = -1); override;
+  public
+    constructor Create(aOwner: TROJSONMessage);
+
+  end;
+
+  TROJSONMessage = class(TROMessage)
+  private
+    fIndent,
+    fWrapResult,
+    fParamsAsArray,
+    fHaveResult,
+    fSessionIdAsId: Boolean;
+    FCurrObject: TROJSONValue;
+    FRoot: TROJSONValue;
+    fMessageType: TMessageType;
+    fId: string;
+  protected
+    { Internals }
+    function ReadException: Exception; override;
+    procedure WriteException(aStream: TStream; anException: Exception); override;
+
+    function CreateSerializer: TROSerializer; override;
+
+    procedure IntInitializeMessage;
+    { IROMessage }
+    procedure Initialize(const aTransport: IROTransport; const anInterfaceName, aMessageName: string; aType: TMessageType); override;
+
+
+    procedure WriteToStream(aStream: TStream); override;
+    procedure ReadFromStream(aStream: TStream); override;
+    procedure InitializeExceptionMessage(const aTransport: IROTransport;
+      const aLibraryName: String; const anInterfaceName: String;
+      const aMessageName: String); override;
+    function GetMessageType: TMessageType; override;
+      
+  public
+    destructor Destroy; override;
+    procedure Assign(Source: TPersistent); override;
+    function IsValidMessage(aData: PAnsiChar; aLength: Integer): boolean; override;
+    property Id: string read fId write fId;
+  published
+    property SessionIdAsId: Boolean read fSessionIdAsId write fSessionIdAsId default false;
+    property WrapResult: Boolean read fWrapResult write fWrapResult default false;
+    property ParamsAsArray: Boolean read fParamsAsArray write fParamsAsArray default false;
+    property Indent: Boolean read fIndent write fIndent default false;
+  end;
+
+implementation
+uses
+  uROCompression, uROBinaryHelpers, FMTBcd, uROClasses, Variants, uROXmlIntf;
+{ TROJSONSerializer }
+
+{$IFDEF DELPHI7UP}
+const SOAPLocale = 1033;
+var SOAPFormatSettings : TFormatSettings;
+{$ENDIF DELPHI7}
+
+
+constructor TROJSONSerializer.Create(aOwner: TROJSONMessage);
+begin
+  fOwner := aOwner;
+end;
+
+function TROJSONSerializer.ReadArray(const aName: string; aClass: TClass;
+  var Ref; ArrayElementId: integer): Boolean;
+var
+  lItem: TROJSONValue;
+  lOld: TROJSONValue;
+begin
+  lOld := fOwner.FCurrObject;
+  result := true;
+  lItem := IntReadObject(aName);
+  if lItem = nil then begin
+    TROArray(Ref) := nil;
+    exit;
+  end;
+  TROArray(Ref) := TROArrayClass(aClass).Create;
+  TROArray(Ref).Resize(lItem.AsArray.Count);
+  fOwner.FCurrObject := lItem;
+  fArrayIndex := 0;
+  try
+    TROArray(Ref).ReadComplex(self);
+  finally
+    fOwner.FCurrObject := lOld;
+  end;
+end;
+
+function TROJSONSerializer.ReadStruct(const aName: string; aClass: TClass;
+  var Ref; ArrayElementId: integer): Boolean;
+var
+  lItem: TROJSONValue;
+  lSave: Boolean;
+  lOld: TROJSONValue;
+begin
+  lOld := fOwner.FCurrObject;
+  result := true;
+  lItem := IntReadObject(aName);
+  if lItem = nil then begin
+    TROComplexType(Ref) := nil;
+    exit;
+  end;
+  TROComplexType(Ref) := TROComplexTypeClass(aClass).Create;
+  lSave := fNested;
+  fNested := true;
+  fOwner.FCurrObject := lItem;
+  try
+    TROComplexType(Ref).ReadComplex(self);
+  finally
+    fNested := lSAve;
+    fOwner.FCurrObject := lOld;
+  end;
+end;
+
+procedure TROJSONSerializer.ReadException(const aName: string; var Ref;
+  ArrayElementId: integer);
+begin
+  // not used
+end;
+
+procedure TROJSONSerializer.WriteException(const aName: string; const Ref;
+  ArrayElementId: integer);
+begin
+  // not used
+end;
+
+procedure TROJSONSerializer.WriteArray(const aName: string; const Ref;
+  aClass: TClass; ArrayElementId: integer);
+var
+  lOld: TROJSONValue;
+begin
+  if TROComplexType(Ref) = nil then exit;
+  lOld := fOwner.FCurrObject;
+  try
+    if (fOwner.GetMessageType =mtResponse) and (not fOWner.fWrapResult) and (fOwner.FCurrObject = nil) then begin
+      if fOwner.fHaveResult then begin
+        raise EROJSONSerializerException.Create('Only one result allowed when WrapResult is false');
+      end;
+      fOwner.fHaveResult := true;
+      fOwner.FCurrObject := fOwner.FRoot.AsObject.AddArrayProperty('result');
+    end else begin
+      if fOwner.FCurrObject.ValueType = jdtArray then
+        fOwner.FCurrObject := fOwner.FCurrObject.AsArray.AddArrayValue()
+      else
+        fOwner.FCurrObject := fOwner.FCurrObject.AsObject.AddArrayProperty(aName);
+    end;
+    TROComplexType(Ref).WriteComplex(Self);
+  finally
+    fOwner.FCurrObject := lOld;
+  end;
+end;
+
+procedure TROJSONSerializer.WriteStruct(const aName: string; const Ref;
+  aClass: TClass; ArrayElementId: integer);
+var
+  lOld: TROJSONValue;
+begin
+  if TROComplexType(Ref) = nil then exit;
+  lOld := fOwner.FCurrObject;
+  try
+    if (fOwner.GetMessageType =mtResponse) and (not fOWner.fWrapResult) and (fOwner.FCurrObject = nil) then begin
+      if fOwner.fHaveResult then begin
+        raise EROJSONSerializerException.Create('Only one result allowed when WrapResult is false');
+      end;
+      fOwner.fHaveResult := true;
+      fOwner.FCurrObject := fOwner.FRoot.AsObject.AddObjectProperty('result');
+    end else begin
+      if fOwner.FCurrObject.ValueType = jdtArray then
+        fOwner.FCurrObject := fOwner.FCurrObject.AsArray.AddObject()
+      else
+        fOwner.FCurrObject := fOwner.FCurrObject.AsObject.AddObjectProperty(aName);
+    end;
+    TROComplexType(Ref).WriteComplex(Self);
+  finally
+    fOwner.FCurrObject := lOld;
+  end;
+end;
+
+
+function TROJSONSerializer.IntReadObject(
+  const aName: string): TROJSONValue;
+var
+  lArr: TROJSONArray;
+begin
+  if (fOwner.GetMessageType =mtResponse) and (not fOWner.fWrapResult) and (not fNested) then begin
+    if fOwner.fHaveResult then begin
+      result := nil;
+    end else begin
+      fOwner.fHaveResult := true;
+      result := fOwner.FCurrObject;
+    end;
+  end else if fOwner.FCurrObject.ValueType  = jdtArray then begin
+    lArr := fOwner.FCurrObject.ASArray;
+    if fArrayIndex < lArr.Count then begin
+      result := lArr[fArrayIndex];
+      inc(fArrayIndex);
+    end else
+      result := nil;
+  end else begin
+    result := fOwner.FCurrObject.AsObject.FindItem(aName);
+  end;
+end;
+
+procedure TROJSONSerializer.IntWriteObject(const aName: string;
+  obj: Variant);
+begin
+  if (fOwner.GetMessageType =mtResponse) and (not fOWner.fWrapResult) and (fOwner.FCurrObject = nil) then begin
+    if fOwner.fHaveResult then begin
+      raise EROJSONSerializerException.Create('Only one result allowed when WrapResult is false');
+    end;
+    fOwner.fHaveResult := true;
+    fOwner.FRoot.AsObject.AddVariantProperty('result', obj);
+  end else begin
+    if fOwner.FCurrObject.ValueType = jdtArray then
+      fOwner.FCurrObject.AsArray.AddVariantValue(obj)
+    else
+      fOwner.FCurrObject.AsObject.AddVariantProperty(aName, obj);
+  end;
+end;
+
+procedure TROJSONSerializer.ReadAnsiString(const aName: string; var Ref;
+  ArrayElementId, iMaxLength: integer);
+var
+  lItem: TROJSONValue;
+begin
+  lItem := IntReadObject(aName);
+  if lItem = nil then
+    String(ref) := ''
+  else
+    String(ref) := lItem.AsString;
+end;
+
+procedure TROJSONSerializer.ReadBinary(const aName: string; var Ref;
+  ArrayElementId: integer);
+var
+  obj: Binary absolute Ref;
+  lItem: TROJSONValue;
+  ss: TStringStream;
+begin
+  lItem := IntReadObject(aName);
+  if lItem = nil then Obj := nil else begin
+    obj:= Binary.Create;
+    ss := TStringStream.Create(lITem.AsString);
+    try
+      obj.Clear;
+      DecodeStream(ss, TMemoryStream(obj));
+      TMemoryStream(obj).Position := 0;
+    finally
+      ss.Free;
+    end;
+  end;
+end;
+
+function SOAPDateTimeToDateTime(const aSOAPDate : string; out Offset: Integer) : TDateTime;
+var year, month, day, hour, min, sec : word;
+  msec: double;
+ { ldummy,} i: Integer;
+  s: string;
+begin
+  // This probabily will all change. See W3C specs for date/time
+  case Length(aSOAPDate) of
+    10 : begin {yyyy-mm-dd}
+      year  := StrToInt(Copy(aSOAPDate,1,4));
+      month := StrToInt(Copy(aSOAPDate,6,2));
+      day   := StrToInt(Copy(aSOAPDate,9,2));
+      result := EncodeDate(year, month, day);
+    end;
+    8 : begin {hh:nn:ss}
+      hour  := StrToInt(Copy(aSOAPDate,1,2));
+      min   := StrToInt(Copy(aSOAPDate,4,2));
+      sec   := StrToInt(Copy(aSOAPDate,7,2));
+      result := EncodeTime(hour, min, sec, 0);
+    end;
+    else {SOAP_DateTimeFormatLength : } begin {yyyy-mm-ddThh:nn:ss}
+      year  := StrToInt(Copy(aSOAPDate,1,4));
+      month := StrToInt(Copy(aSOAPDate,6,2));
+      day   := StrToInt(Copy(aSOAPDate,9,2));
+      hour  := StrToInt(Copy(aSOAPDate,12,2));
+      min   := StrToInt(Copy(aSOAPDate,15,2));
+      sec   := StrToInt(Copy(aSOAPDate,18,2));
+      s := copy(aSOAPDate, 20, MaxInt);
+      if (Length(s) > 1) and (s[1] = '.') then begin
+        i := LastDelimiter('+-Z', s);
+        if i > 0 then begin
+          msec := StrToFloatDef('0'+DecimalSeparator+Copy(s, 2, i-2), 0);
+         // Val(Copy(s, 1, i -1), msec, ldummy);
+          delete(s, 1, i-1);
+        end else begin
+          msec := StrToFloatDef('0'+DecimalSeparator+copy(s, 2, MaxInt), 0);
+          //Val(s, msec, ldummy);
+          s := '';
+        end;
+        msec := msec * (1.0 / 60.0 / 60.0 / 24);
+      end else
+        msec := 0;
+
+      result := EncodeDate(year, month, day);
+      // The code below is required! Do not adjust
+      if (result<0) then begin
+        result := result-EncodeTime(hour, min, sec, 0);
+        result := result - msec;
+      end else begin
+        result := result+EncodeTime(hour, min, sec, 0);
+        result := result + msec;
+      end;
+      Offset := MaxInt;
+      if (Length(s) <> 0) and ((s[1] = 'z') or (s[1] = 'Z')) then Offset := 0 else
+      if (Length(s) > 0) and ((s[1] = '+') or (s[1] = '-')) then begin
+        if s[1] = '-' then i := -1 else i := 1;
+        Delete(s,1,1);
+        if pos(':', s) > 0 then begin
+          hour := StrToInt(copy(s,1,Pos(':', s)-1));
+          delete(s,1,pos(':', s));
+          min := StrToInt(s);
+        end else begin
+          hour := StrToInt(s);
+          min := 0;
+        end;
+
+        if i = -1 then
+          Offset := - (min + 60 * hour)
+        else
+          Offset := + (min + 60 * hour);
+      end;
+    end;
+  end;
+end;
+
+const
+  SOAP_DateTimeFormat       = 'yyyy-mm-dd"T"hh":"nn":"ss';
+
+  function DateTimeToSOAPDateTime(aDateTime : TDateTime) : string;
+begin
+  result := FormatDateTime(SOAP_DateTimeFormat, aDateTime);
+end;
+
+
+procedure TROJSONSerializer.ReadDateTime(const aName: string; var Ref;
+  ArrayElementId: integer);
+var
+  lItem: TROJSONValue;
+  lOffset: Integer;
+begin
+  lItem := IntReadObject(aName);
+  if lItem = nil then
+    raise EROJSONSerializerException.Create('Field not found');
+  TDateTime(Ref) := SOAPDateTimeToDateTime(lItem.AsString, lOffset);
+end;
+
+procedure TROJSONSerializer.ReadDecimal(const aName: String; var Ref;
+  ArrayElementId: Integer);
+var
+  lItem: TROJSONValue;
+  s: string;
+begin
+  lItem := IntReadObject(aName);
+  if lItem = nil then raise EROJSONSerializerException.Create('Field not found');
+  s := lItem.AsString;
+
+  if DecimalSeparator <> '.' then s := StringReplace(s, '.', DecimalSeparator, []);
+ Variant(Ref) := BCDToVariant(StrToBcd(s));
+end;
+
+function SOAPStrToFloat(const aString: string): Extended;
+begin
+  {$IFDEF DELPHI7UP}
+  Result := StrToFloat(aString,SOAPFormatSettings);// then
+  {$ELSE}
+  Result := StrToFloat(StringReplace(aString, '.', DecimalSeparator, []));
+  {$ENDIF}
+end;
+
+procedure TROJSONSerializer.ReadDouble(const aName: string;
+  aFloatType: TFloatType; var Ref; ArrayElementId: integer);
+var
+  lItem: TROJSONValue;
+  text: string;
+begin
+  lItem := IntReadObject(aName);
+  if lItem = nil then raise EROJSONSerializerException.Create('Field not found');
+  text := lItem.AsString;
+
+    {$IFNDEF DELPHI7UP}
+      if DecimalSeparator <> '.' then
+        ReplaceChar(text, ['.'], DecimalSeparator);
+    {$ELSE}
+    if DecimalSeparator <> SOAPFormatSettings.DecimalSeparator then
+       ReplaceChar(text, [DecimalSeparator], SOAPFormatSettings.DecimalSeparator);
+    {$ENDIF}
+    case aFloatType of
+      ftSingle : single(Ref) := SOAPStrToFloat(text);
+      ftDouble : double(Ref) := SOAPStrToFloat(text);
+      ftExtended : extended(Ref) := SOAPStrToFloat(text);
+      ftComp : comp(Ref) := {$IFDEF FPC}
+                              {$IFDEF cpu64}StrToInt64(text){$ELSE}StrToInt(text){$ENDIF}
+                            {$ELSE}
+                               SOAPStrToFloat(text)
+                            {$ENDIF};
+      ftCurr : currency(Ref) := SOAPStrToFloat(text);
+    end;
+end;
+
+procedure TROJSONSerializer.ReadEnumerated(const aName: string;
+  anEnumTypeInfo: PTypeInfo; var Ref; ArrayElementId: integer);
+var
+  lItem: TROJSONValue;
+  s: string;
+  lIndexInEnum: Integer;
+begin
+  lItem := IntReadObject(aName);
+  if lItem = nil then raise EROJSONSerializerException.Create('Field not found');
+  if anEnumTypeInfo = typeinfo(Boolean) then begin
+     if Boolean(lItem.VarValue) then byte(Ref) := 1 else byte(Ref) := 0;
+  end
+  else begin
+     s := lItem.AsString;
+     lIndexInEnum  := ROGetEnumValue(anEnumTypeInfo, s);
+     if lIndexInEnum = -1 then begin
+       lIndexInEnum  := ROGetEnumValue(anEnumTypeInfo, {$IFDEF UNICODE}UTF8ToString{$ENDIF}(anEnumTypeInfo.Name)+'_'+s);
+       if lIndexInEnum = -1 then
+          RaiseError(Format('The value "-1" for parameter "%s" of "%s" type is invalid', [aName, anEnumTypeInfo^.Name]));
+     end;
+     byte(Ref) := lIndexInEnum;
+  end;
+end;
+
+procedure TROJSONSerializer.ReadGuid(const aName: String; var Ref;
+  ArrayElementId: Integer);
+var
+  lItem: TROJSONValue;
+begin
+  lItem := IntReadObject(aName);
+  if lItem = nil then raise EROJSONSerializerException.Create('Field not found');
+  String(Ref) := lItem.AsString;
+  if Length(String(Ref)) > 0 then begin
+    if String(Ref)[1] <> '{' then String(Ref) := '{'+String(Ref)+'}';
+  end;
+end;
+
+procedure TROJSONSerializer.ReadInt64(const aName: string; var Ref;
+  ArrayElementId: integer);
+var
+  lItem: TROJSONValue;
+begin
+  lItem := IntReadObject(aName);
+  if lItem = nil then raise EROJSONSerializerException.Create('Field not found');
+  Int64(Ref) := StrToInt64(lITem.AsString);
+end;
+
+procedure TROJSONSerializer.ReadInteger(const aName: string;
+  anOrdType: TOrdType; var Ref; ArrayElementId: integer);
+var
+  lItem: TROJSONValue;
+begin
+  lItem := IntReadObject(aName);
+  if lItem = nil then raise EROJSONSerializerException.Create('Field not found');
+  case anOrdType of
+    otSByte,
+    otUByte : byte(Ref) := StrToInt(lItem.AsString);
+    otSWord,
+    otUWord : word(Ref) := StrToInt(lItem.AsString);
+    otSLong,
+    otULong : integer(Ref) := StrToInt(lItem.AsString);
+  end;
+end;
+
+procedure TROJSONSerializer.ReadUTF8String(const aName: string; var Ref;
+  ArrayElementId, iMaxLength: integer);
+var
+  lItem: TROJSONValue;
+begin
+  lItem := IntReadObject(aName);
+  if lItem = nil then
+    UTF8String(ref) := ''
+  else
+    UTF8String(ref) := UTF8Encode(lItem.AsString);
+end;
+
+procedure TROJSONSerializer.ReadVariant(const aName: string; var Ref;
+  ArrayElementId: integer);
+var
+  lItem: TROJSONValue;
+begin
+  lItem := IntReadObject(aName);
+  if lItem = nil then
+    Variant(Ref) := Null
+  else
+    Variant(ref) := lItem.VarValue;
+end;
+
+procedure TROJSONSerializer.ReadWideString(const aName: string; var Ref;
+  ArrayElementId, iMaxLength: integer);
+var
+  lItem: TROJSONValue;
+begin
+  lItem := IntReadObject(aName);
+  if lItem = nil then
+    WideString(ref) := ''
+  else
+    WideString(ref) := lItem.AsString;
+end;
+
+procedure TROJSONSerializer.ReadXml(const aName: string; var Ref;
+  ArrayElementId: integer);
+var
+  w: WideString;
+  doc: IXMLDocument;
+begin
+  ReadWideString(aName, w);
+   if w = '' then
+    IXMLNode(Ref) := nil
+  else begin
+    doc := NewROXmlDocument;
+    doc.New;
+    doc.XML := w;
+    IXMLNode(Ref) := doc.DocumentNode;
+  end;
+end;
+
+procedure TROJSONSerializer.WriteAnsiString(const aName: string; const Ref;
+  ArrayElementId: integer);
+var
+  w: AnsiString absolute Ref;
+begin
+  IntWriteObject(aName, w);
+end;
+
+procedure TROJSONSerializer.WriteBinary(const aName: string; const Ref;
+  ArrayElementId: integer);
+var
+  ss: TStringStream;
+begin
+  if Binary(Ref) <> nil then begin
+    ss := TStringStream.Create('');
+    try
+      Binary(Ref).Position := 0;
+      EncodeStream(Binary(Ref), ss);
+      IntWriteObject(aName, ss.DataString);
+    finally
+      ss.Free;
+    end;
+  end;
+end;
+
+procedure TROJSONSerializer.WriteDateTime(const aName: string; const Ref;
+  ArrayElementId: integer);
+begin
+  IntWriteObject(aName, DateTimeToSOAPDateTime(TDateTime(Ref)));
+end;
+
+procedure TROJSONSerializer.WriteDecimal(const aName: String; const Ref;
+  ArrayElementId: Integer);
+var
+  s: string;
+begin
+  s := BcdToStr(VariantToBCD(variant(Ref)));
+  if DecimalSeparator <> '.' then s := StringReplace(s, DecimalSeparator, '.', []); // delphi has no way to format a bcd with a specific format
+  IntWriteObject(aName, s);
+end;
+
+procedure TROJSONSerializer.WriteDouble(const aName: string;
+  aFloatType: TFloatType; const Ref; ArrayElementId: integer);
+var
+  text: string;
+begin
+  case aFloatType of
+    ftSingle   : begin
+      text := FloatToStr(single(Ref){$IFDEF DELPHI7UP},SOAPFormatSettings{$ENDIF});
+      {$IFNDEF DELPHI7UP}text := StringReplace(text, DecimalSeparator, '.', []);{$ENDIF}
+    end;
+    ftDouble   : begin
+      text := FloatToStr(double(Ref){$IFDEF DELPHI7UP},SOAPFormatSettings{$ENDIF});
+      {$IFNDEF DELPHI7UP}text := StringReplace(text, DecimalSeparator, '.', []);{$ENDIF}
+    end;
+    ftExtended : begin
+      text := FloatToStr(extended(Ref){$IFDEF DELPHI7UP},SOAPFormatSettings{$ENDIF});
+      {$IFNDEF DELPHI7UP}text := StringReplace(text, DecimalSeparator, '.', []);{$ENDIF}
+    end;
+    ftComp     : begin
+      text := FloatToStr(comp(Ref){$IFDEF DELPHI7UP},SOAPFormatSettings{$ENDIF});
+      {$IFNDEF DELPHI7UP}text := StringReplace(text, DecimalSeparator, '.', []);{$ENDIF}
+    end;
+    ftCurr     : begin
+      text := FloatToStr(currency(Ref){$IFDEF DELPHI7UP},SOAPFormatSettings{$ENDIF});
+      {$IFNDEF DELPHI7UP}text := StringReplace(text, DecimalSeparator, '.', []);{$ENDIF}
+    end;
+  end;
+  IntWriteObject(aName, text);
+end;
+
+procedure TROJSONSerializer.WriteEnumerated(const aName: string;
+  anEnumTypeInfo: PTypeInfo; const Ref; ArrayElementId: integer);
+var
+  val: string;
+begin
+  if (anEnumTypeInfo  = typeinfo(Boolean)) then
+    IntWriteObject(aName, Boolean(Ref))
+  else begin
+    val := ROGetEnumName(anEnumTypeInfo, Ord(byte(Ref)));
+    if (Length(val) > Length(anEnumTypeInfo.Name) + 2) and
+       (Copy(val, 1, Length(anEnumTypeInfo.Name) + 1) = {$IFDEF UNICODE}UTF8ToString{$ENDIF}(anEnumTypeInfo.Name) + '_') then begin
+      val := Copy(val, Length(anEnumTypeInfo.Name) + 2, MaxInt);
+    end;
+    IntWriteObject(aName, val);
+  end;
+end;
+
+procedure TROJSONSerializer.WriteGuid(const aName: String; const Ref;
+  ArrayElementId: Integer);
+var
+  s: string absolute Ref;
+begin
+  IntWriteObject(aName, s);
+end;
+
+procedure TROJSONSerializer.WriteInt64(const aName: string; const Ref;
+  ArrayElementId: integer);
+begin
+  IntWriteObject(aName, IntToStr(Int64(Ref)));
+end;
+
+procedure TROJSONSerializer.WriteInteger(const aName: string;
+  anOrdType: TOrdType; const Ref; ArrayElementId: integer);
+begin
+  case anOrdType of
+    otSByte: IntWriteObject(aName, IntToStr(ShortInt(Ref)));
+    otUByte: IntWriteObject(aName, IntToStr(Byte(Ref)));
+    otSWord: IntWriteObject(aName, IntToStr(SmallInt(Ref)));
+    otUWord: IntWriteObject(aName, IntToStr(Word(Ref)));
+    otSLong: IntWriteObject(aName, IntToStr(Integer(Ref)));
+    otULong: IntWriteObject(aName, IntToStr(Cardinal(Ref)));
+  end;
+end;
+
+procedure TROJSONSerializer.WriteUTF8String(const aName: string; const Ref;
+  ArrayElementId: integer);
+var
+  w: WideString;
+begin
+  w := UTF8ToString(UTF8String(Ref));
+  WriteWideString(aName, w);
+end;
+
+procedure TROJSONSerializer.WriteVariant(const aName: string; const Ref;
+  ArrayElementId: integer);
+begin
+  IntWriteObject(aName, Variant(Ref));
+end;
+
+procedure TROJSONSerializer.WriteWideString(const aName: string; const Ref;
+  ArrayElementId: integer);
+begin
+  IntWriteObject(aName, WideString(Ref));
+end;
+
+procedure TROJSONSerializer.WriteXml(const aName: string; const Ref;
+  ArrayElementId: integer);
+begin
+  if IXMLNode(Ref) <> nil then begin
+    IntWriteObject(aName, IXMLNode(Ref).XML);
+  end;
+end;
+
+{ TROJSONMessage }
+
+
+{ TROJSONMessage }
+
+function TROJSONMessage.CreateSerializer: TROSerializer;
+begin
+  result := TROJSONSerializer.Create(self);
+end;
+
+procedure TROJSONMessage.ReadFromStream(aStream: TStream);
+var
+  obj: TROJSONValue;
+  fId: string;
+begin
+  TROJSONSerializer(Serializer).fNested := False;
+  FreeAndNil(fRoot);
+  FRoot := TROJSONValue.Create(jdtObject);
+  FRoot.LoadFromStream(aStream);
+//  fCurrObject := FRoot.;
+  obj := fRoot.AsObject.FindItem('id');
+  if obj <> nil then begin
+    fId := VarToStrDef(obj.VarValue, '');
+    if (fSessionIdAsId) and (fId <> '') then
+      ClientID := StringToGUID(fId);
+    end;
+
+  obj := froot.AsObject.FindItem('method');
+  if obj <> Nil then begin
+   fMessageType := mtRequest;
+   InterfaceName := 'Default';
+   fId := Obj.AsString;
+    MessageName := fId;
+    if (Pos('.', fId) <> 0) then begin
+      InterfaceName := copy(fId, 1, pos('.', fId)-1);
+      MessageName := Copy(fId, pos('.', fId)+1, MAxInt);
+    end;
+    FCurrObject := FRoot.AsObject.FindItem('params');
+  end else begin
+    obj := FRoot.AsObject.FindItem('error');
+    if obj <> nil then begin
+      fMessageType := mtException;
+      fCurrObject := obj;
+    end
+    else begin
+      obj := fRoot.AsObject.FindItem('result');
+      if obj  = nil then begin
+        raise EROJSONSerializerException.Create('Unknown Json payload');
+      end;
+      fCurrObject := obj;
+      fMessageType := mtResponse;
+   end;
+  end;
+end;
+
+procedure TROJSONMessage.IntInitializeMessage;
+begin
+  TROJSONSerializer(Serializer).fNested := false;
+  FreeAndNil(fRoot);
+  FRoot := TROJSONValue.Create(jdtObject);
+  FRoot.AsObject.AddStringProperty('version', '1.1');
+  if fSessionIdAsId then begin
+    fId := GUIDToString(ClientID);
+    fRoot.AsObject.AddStringProperty('id', fId);
+  end;
+end;
+
+
+procedure TROJSONMessage.Initialize(const aTransport: IROTransport;
+  const anInterfaceName, aMessageName: string; aType: TMessageType);
+var
+  lMsgName: string;
+begin
+  fMessageType := aType;
+
+  SetHTTPInfo(aTransport, DataFormatXml);
+  if (anInterfaceName <> 'Default') and (anInterfaceName <> '') then
+    lMsgName := anInterfaceName+'.'+aMessageName
+  else
+    lMsgName := aMessageName;
+
+  IntInitializeMessage;
+  fHaveResult := false;
+  if fMessageType = mtException then
+    // do nothing
+  else if fMessageType = mtResponse then begin
+    if fWrapResult then begin
+      FCurrObject := FRoot.AsObject.AddObjectProperty('result');
+    end else
+      FCurrObject := nil;
+  end else begin
+    fRoot.AsObject.AddStringProperty('method',lMsgName);
+    if fParamsAsArray then
+      fCurrObject := FRoot.AsObject.AddArrayProperty('params')
+    else
+      FCurrObject := fRoot.AsObject.AddObjectProperty('params');
+  end;
+end;
+
+procedure TROJSONMessage.InitializeExceptionMessage(
+  const aTransport: IROTransport; const aLibraryName, anInterfaceName,
+  aMessageName: String);
+begin
+  inherited;
+  SetHTTPInfo(aTransport, DataFormatXml);
+end;
+
+
+function TROJSONMessage.ReadException: Exception;
+begin
+  if (FCurrObject = nil) or (FCurrObject.ValueType <> jdtObject) then
+    result := EROServerException.Create('Unknown exception')
+  else
+    result := EROException.Create(FCurrObject.AsObject.GetStringValueByName('message'));
+end;
+
+function TROJSONMessage.IsValidMessage(aData: PAnsiChar;
+  aLength: Integer): boolean;
+var
+  i: Integer;
+begin
+  for i := 0 to aLength -1 do begin
+    if aData[i] = '{' then begin
+     result := true;
+     exit;
+    end;
+    case adata[i] of
+      #32,
+      #9,
+      #13,
+      #10: continue;
+    else
+      result := false;
+      exit;
+    end;
+  end;
+  result := false;
+  exit;
+end;
+
+procedure TROJSONMessage.WriteException(aStream: TStream;
+  anException: Exception);
+var
+  err: TROJSONValue;
+begin
+  IntInitializeMessage();
+
+  err := FRoot.AsObject.AddObjectProperty('error');
+  err.AsObject.AddStringProperty('name', 'JsonRPCError');
+  err.AsObject.AddStringProperty('code', '1');
+  err.AsObject.AddStringProperty('message', anException.Message);
+  WriteToStream(aStream);
+end;
+
+procedure TROJSONMessage.WriteToStream(aStream: TStream);
+begin
+  if (fMessageType = mtResponse) and (not fWrapResult) and (not fHaveResult) then
+    FRoot.AsObject.AddNullProperty('result');
+
+  fRoot.SaveToStream(aStream);
+end;
+
+destructor TROJSONMessage.Destroy;
+begin
+  FRoot.Free;
+  inherited;
+end;
+
+function TROJSONMessage.GetMessageType: TMessageType;
+begin
+  result := fMessageType;
+end;
+
+procedure TROJSONMessage.Assign(Source: TPersistent);
+var src: TROJSONMessage;
+begin
+  inherited;
+  if Source is TROJSONMessage then begin
+     src := TROJSONMessage(Source);
+     AddServerExceptionPrefix := src.AddServerExceptionPrefix;
+     Indent := src.Indent;
+     ParamsAsArray := src.ParamsAsArray;
+     SessionIdAsId := src.SessionIdAsId;
+     WrapResult := src.WrapResult;
+  end;
+end;
+
+initialization
+  {$IFDEF DELPHI7UP}
+  GetLocaleFormatSettings(SOAPLocale,SOAPFormatSettings);
+  //ToDo: fix this for D6
+  {$ENDIF}
+  RegisterMessageClass(TROJSONMessage);
+end.
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROJSONParser.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROJSONParser.pas
new file mode 100644
index 0000000..776d81b
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROJSONParser.pas	
@@ -0,0 +1,1156 @@
+unit uROJSONParser;
+
+{$I RemObjects.inc}
+// code chars > 127 as \uXXXX
+{$DEFINE WRITE_ASCII_COMPATIBLE}
+{$DEFINE RaiseInvalidDataTypeException}
+interface
+uses
+  SysUtils, Classes;
+
+type
+  {$IFDEF UNICODE}
+    JSON_String = string;
+    JSON_Char   = Char;
+    JSON_PChar  = PChar;
+  {$ELSE}
+    JSON_String = Widestring;
+    JSON_Char   = WideChar;
+    JSON_PChar  = PWideChar;
+  {$ENDIF}
+
+  TROJSONDataType = (jdtNull, jdtString, jdtNumber, jdtObject, jdtArray, jdtBoolean);
+
+  TROJSONObject = class;
+  TROJSONArray = class;
+
+  TROJSONValue = class(TCollectionItem)
+  private
+    FValueType: TROJSONDataType;
+    FValue: Variant;
+    FObject: TCollection;
+    function GetAsObject: TROJSONObject;
+    function GetAsArray: TROJSONArray;
+    function GetAsBoolean: Boolean;
+    function GetAsNumber: Variant;
+    function GetAsString: JSON_String;
+    procedure SetAsObject(const Value: TROJSONObject);
+    procedure SetAsArray(const Value: TROJSONArray);
+    procedure SetAsString(const Value: JSON_String);
+    procedure SetAsBoolean(const Value: Boolean);
+    procedure SetAsNumber(const Value: Variant);
+    function GetVarValue: Variant;
+    procedure SetVarValue(const Value: Variant);
+  protected
+    Procedure IntSaveToStream(AStream: TStream);virtual;
+    Procedure IntLoadFromStream(AStream: TStream);virtual;
+  public
+    procedure Clear;
+    constructor Create(Collection: TCollection); overload;override; 
+    constructor Create(aType: TROJSONDataType); reintroduce; overload;
+    destructor Destroy; override;
+    Procedure SaveToStream(AStream: TStream; AUTF8Stream: boolean = True);
+    Procedure LoadFromStream(AStream: TStream; AUTF8Stream: boolean = True);
+    property ValueType: TROJSONDataType read FValueType;
+    property AsObject: TROJSONObject read GetAsObject write SetAsObject;
+    property ASArray: TROJSONArray read GetAsArray write SetAsArray;
+    property AsString: JSON_String read GetAsString write SetAsString;
+    property AsBoolean: Boolean read GetAsBoolean Write SetAsBoolean;
+    Property AsNumber: Variant read GetAsNumber write SetAsNumber;
+    procedure SetAsNull;
+    property VarValue: Variant read GetVarValue write SetVarValue;
+  end;
+
+  TROJSONProperty = class(TROJSONValue)
+  private
+    FName: JSON_String;
+    procedure SetName(const Value: JSON_String);
+  protected
+    Procedure IntSaveToStream(AStream: TStream);override;
+    Procedure IntLoadFromStream(AStream: TStream);override;
+  public
+    property Name: JSON_String read FName write SetName;
+  end;
+
+  TROJSONObject = class(TCollection)
+  private
+  protected
+    function GetItems(Index: Integer): TROJSONProperty;
+    procedure SetItems(Index: Integer; const Value: TROJSONProperty);
+    Procedure IntSaveToStream(AStream: TStream);
+    Procedure IntLoadFromStream(AStream: TStream);
+  public
+    constructor Create;
+    Procedure SaveToStream(AStream: TStream; AUTF8Stream: boolean = True);
+    Procedure LoadFromStream(AStream: TStream; AUTF8Stream: boolean = True);
+    property Items[Index: Integer] :TROJSONProperty read GetItems write SetItems; default;
+    function FindItem(const AName: JSON_String):TROJSONProperty;
+    function ItemByName(const AName: JSON_String):TROJSONProperty;
+    function IndexOf(const AName: JSON_String):integer;
+    function Add: TROJSONProperty;
+    function AddStringProperty(const AName, aValue: JSON_String): TROJSONProperty;
+    function AddArrayProperty(const AName: JSON_String): TROJSONProperty;
+    function AddObjectProperty(const AName: JSON_String): TROJSONProperty;
+    function AddNullProperty(const AName: JSON_String): TROJSONProperty;
+    function AddBooleanProperty(const AName: JSON_String; const AValue: Boolean): TROJSONProperty;
+    function AddNumberProperty(const AName: JSON_String; const AValue: Variant): TROJSONProperty;
+    function AddVariantProperty(const AName: JSON_String; const AValue: Variant): TROJSONProperty;
+    function GetArrayItemByName(const AName: JSON_String; ACreate: Boolean): TROJSONArray;
+    function GetObjectItemByName(const AName: JSON_String; ACreate: Boolean): TROJSONObject;
+    function GetStringValueByName(const AName: JSON_String): JSON_String;
+    function GetNumberValueByName(const AName: JSON_String): Variant;
+    function GetBooleanValueByName(const AName: JSON_String): Boolean;
+    function GetVariantValueByName(const AName: JSON_String): Variant;
+  end;
+
+  TROJSONArray = class(TCollection)
+  private
+  protected
+    function GetItems(Index: Integer): TROJSONValue;
+    procedure SetItems(Index: Integer; const Value: TROJSONValue);
+    Procedure IntSaveToStream(AStream: TStream);
+    Procedure IntLoadFromStream(AStream: TStream);
+  public
+    constructor Create;
+    function Add: TROJSONValue;
+    Procedure SaveToStream(AStream: TStream; AUTF8Stream: boolean = True);
+    Procedure LoadFromStream(AStream: TStream; AUTF8Stream: boolean = True);
+    property Items[Index: Integer] :TROJSONValue read GetItems write SetItems; default;
+    function FindObjectByStringValue(const AName, aValue: JSON_String): TROJSONObject;
+    function AddObject: TROJSONValue;
+    function AddStringValue(const AValue: JSON_String):TROJSONValue;
+    function AddNumberValue(const AValue: Variant):TROJSONValue;
+    function AddBooleanValue(const AValue: Boolean):TROJSONValue;
+    function AddNullValue:TROJSONValue;
+    function AddArrayValue:TROJSONValue;
+    function AddVariantValue(const AValue: Variant):TROJSONValue;
+  end;
+
+function JSON_ParseStream(AData: TStream; aUTF8Stream:Boolean = True):TROJSONValue;
+
+implementation
+
+uses Variants,uROBinaryHelpers, uROClasses;
+
+const
+  JSON_streamID     = 'stream';
+
+{$IFDEF DELPHI7UP}
+var
+  JSON_FormatSettings: TFormatSettings;
+{$ENDIF}
+
+function ReadNumber(AStream: TStream):Variant; forward;
+function ReadString(AStream: TStream):JSON_String;forward;
+function ReadChar(AStream: TStream;ASkipSpaces: Boolean=True):JSON_Char;forward;
+function ReadNextChar(AStream: TStream;ASkipSpaces: Boolean=True):JSON_Char;forward;
+
+procedure WriteChar(AStream: TStream;AChar :JSON_Char);forward;
+procedure WriteString(AStream: TStream; AValue: JSON_String); forward;
+procedure WriteIdent(AStream: TStream; AValue: JSON_String); forward;
+procedure WriteNumber(AStream: TStream; AValue: Variant); forward;
+
+function WriteVarianttoStreamObject(aValue: Variant):TROJSONObject;
+var
+  lStream:TMemoryStream;
+  i: integer;
+  lArray: TROJSONArray;
+begin
+  lStream:= BinaryFromVariant(aValue);
+  try
+    Result := TROJSONObject.Create;
+    lArray := Result.AddArrayProperty(JSON_streamID).ASArray;
+    For i := 0 to lStream.Size-1 do
+      lArray.AddNumberValue(PByteArray(lStream.Memory)^[i]);
+  finally
+    lStream.Free;
+  end;
+end;
+
+function ReadVariantFromStreamObject(AObject: TROJSONObject): Variant;
+var
+  lProp: TROJSONProperty;
+  lArray: TROJSONArray;
+  i: integer;
+  lStream: TMemoryStream;
+begin
+  Result:= Null;
+  lProp := AObject.FindItem(JSON_streamID);
+  if (lProp = nil) or (lProp.ValueType <> jdtArray) then Exit;
+  lArray := lProp.ASArray;
+  lStream:= TMemoryStream.Create;
+  try
+    lStream.Size := lArray.Count;
+    for i:=0 to lArray.Count-1 do
+      PByteArray(lStream.Memory)^[i]:= byte(lArray[i].GetAsNumber);
+    Result:= VariantFromBinary(lStream);
+  finally
+    lStream.Free;
+  end;
+end;
+
+Procedure JSON_Error_IncompatibleDataType;
+begin
+  raise Exception.Create('Incompatible datatype');
+end;
+
+
+Procedure JSON_Error_PropertyNotFound(AName: JSON_String);
+begin
+  raise Exception.Create(AName+' property not found.');
+end;
+
+Procedure JSON_Error(AStream: TStream);
+begin
+  if AStream <> nil then
+    raise Exception.Create('This stream is incompatible with JSON format. Position:'+IntToStr(AStream.Position))
+  else
+    raise Exception.Create('This stream is incompatible with JSON format');
+end;
+
+procedure WriteChar(AStream: TStream;AChar :JSON_Char);
+begin
+  AStream.WriteBuffer(AChar,SizeOf(JSON_Char));
+end;
+
+procedure WriteIdent(AStream: TStream; AValue: JSON_String);
+begin
+  AStream.WriteBuffer(pointer(aValue)^,SizeOf(JSON_Char)*Length(AValue));
+end;
+
+procedure WriteNumber(AStream: TStream; AValue: Variant);
+var
+  s: string;
+  c: char;
+begin
+  case VarType(AValue) of
+    varShortInt,
+    varSmallint,
+    varByte,
+    varWord,
+    varInteger: s:= IntToStr(AValue);
+    varLongWord,
+    varInt64: s := IntToStr(aValue);
+    {$IFNDEF FPC}
+    varDate,
+    varSingle,
+    {$IFDEF DELPHI7UP}
+    varDouble:  s:= FloatToStr(AValue,JSON_FormatSettings);
+    {$ELSE}
+    varDouble:  s:= StringReplace(FloatToStr(AValue), '.', DecimalSeparator, []);	
+    {$ENDIF}
+
+    {$IFDEF DELPHI7UP}
+    varCurrency: s:= CurrToStr(AValue,JSON_FormatSettings);
+    {$ELSE}
+    varCurrency: s:= StringReplace(CurrToStr(AValue), '.', DecimalSeparator, []);	
+    {$ENDIF}
+
+    {$ENDIF}
+  else
+    c:= DecimalSeparator;
+    try
+      DecimalSeparator := '.';
+      s:= VarToStr(AValue);
+    finally
+      DecimalSeparator := c;
+    end;
+  end;
+  WriteIdent(AStream,s);
+end;
+
+procedure WriteString(AStream: TStream; AValue: JSON_String);
+
+  procedure WriteTag(const WC: JSON_Char);
+  begin
+    WriteChar(AStream,'\');
+    WriteChar(AStream,wc);
+  end;
+
+var
+  i,j: integer;
+  s: string;
+begin
+  WriteChar(AStream, '"');
+  for i := 1 to Length(AValue)  do begin
+    case ord(AValue[i]) of
+      22 {"}  : WriteTag('"');
+      92 {\}  : WriteTag('\');
+      47 {/}  : WriteTag('/');
+      08      : WriteTag('b');
+      09      : WriteTag('t');
+      10      : WriteTag('n');
+      12      : WriteTag('f');
+      13      : WriteTag('r');
+      32, 33,
+      35..46,
+      48..91,
+      93..127
+      {$IFNDEF WRITE_ASCII_COMPATIBLE},128..$FFFF{$ENDIF}: WriteChar(AStream,AValue[i]);
+    else
+      WriteTag('u');
+      s := IntToHex(ord(AValue[i]),4);
+      for j:=1 to Length(s) do
+        WriteChar(AStream,JSON_Char(ord(s[j])));
+    end;
+  end;
+  WriteChar(AStream, '"');
+end;
+
+function ReadNumber(AStream: TStream):Variant;
+var
+  s: JSON_String;
+  s1: string;
+  lchar: JSON_Char;
+begin
+  Result:=Null;
+  s:='';
+  lchar := ReadChar(AStream);
+  while true do begin
+    if ord(lchar) in [43, 45,46, 48..57, 69, 101 {+-.0123456789Ee}] then begin
+      s := s+lchar;
+      AStream.ReadBuffer(lchar, SizeOf(lchar));
+    end
+    else begin
+      AStream.Seek(-SizeOf(JSON_Char),soFromCurrent);
+      Break;
+    end;
+  end;
+  s1 := s;
+  if (pos('.', s1) >0) or (pos('e', s1) >0) or (pos('E', s1) >0) then
+    {$IFDEF DELPHI7UP}
+    Result := StrToFloat(s1,JSON_FormatSettings)
+    {$ELSE}
+    Result := StrToFloat(StringReplace(s1, '.', DecimalSeparator, []))
+    {$ENDIF}
+
+  else
+    Result := StrToInt64(s1);
+end;
+
+function ReadChar(AStream: TStream;ASkipSpaces: Boolean=True):JSON_Char;
+var
+  f: boolean;
+begin
+  f := True;
+  {$IFDEF FPC}
+  Result:=#0;
+  {$ENDIF}
+  While F do begin
+    AStream.ReadBuffer(Result, SizeOf(Result));
+    f := ASkipSpaces and  (ord(Result) in [ord(' '), 10, 13, 9]);
+  end;
+end;
+
+function HexcodeToChar(AValue: JSON_String): JSON_Char;
+var
+  i,j,k: integer;
+begin
+  k:=0;
+  for i:= 1 to Length(aValue) do begin
+    j:= ord(AValue[i]);
+    case j  of
+      48..57: dec(j,48);
+      65..70: dec(j, 55);
+      97..120: dec(j, 87);
+    else
+      raise Exception.Create('can''t decode hex string:'''+aValue+'''');
+    end;
+    k:= k*16 + j;
+  end;
+  Result:= JSon_Char(k);
+end;
+
+function ReadString(AStream: TStream):JSON_String;
+var
+  LChar: JSON_Char;
+  s: JSON_String;
+begin
+  Result:='';
+  lchar := ReadChar(AStream,False);
+  while lChar <> '"' do begin
+    if lchar = '\' then begin
+      lchar:=ReadChar(AStream,False);
+           if lchar = 'n' then Result := Result + #0010
+      else if lchar = 'r' then Result := Result + #0013
+      else if lchar = 't' then Result := Result + #0009
+      else if lchar = '"' then Result := Result + lchar
+      else if lchar = '\' then Result := Result + lchar
+      else if lchar = '/' then Result := Result + lchar
+      else if lchar = 'u' then begin
+        SetLength(s, 4);
+        AStream.ReadBuffer(Pointer(s)^,4*sizeOf(JSON_Char));
+        Result:=Result + HexCodetoChar(s);
+      end
+      else if lchar = 'b' then Result := Result + #0008
+      else if lchar = 'f' then Result := Result + #0012
+      else JSON_Error(AStream);
+    end
+    else
+      Result := Result + lChar;
+    lchar := ReadChar(AStream,False);
+  end;
+end;
+
+
+function ReadNextChar(AStream: TStream;ASkipSpaces: Boolean=True):JSON_Char;
+var
+  p: int64;
+begin
+  p := AStream.Position;
+  try
+    Result := ReadChar(AStream, ASkipSpaces);
+  finally
+    AStream.Position := p;
+  end;
+end;
+
+{ TROJSONValue }
+
+
+procedure TROJSONValue.Clear;
+begin
+  if FValueType <> jdtNull then begin
+    if FValueType in [jdtObject, jdtArray] then FreeAndNil(FObject);
+    FValueType := jdtNull;
+    FValue := Null;
+  end;
+end;
+
+
+constructor TROJSONValue.Create(Collection: TCollection);
+begin
+  inherited;
+  FObject := nil;
+  FValueType := jdtNull;
+  FValue := Null;
+end;
+
+destructor TROJSONValue.Destroy;
+begin
+  Clear;
+  inherited;
+end;
+
+function TROJSONValue.GetAsArray: TROJSONArray;
+begin
+  if (FValueType = jdtArray) then
+    Result:= TROJSONArray(FObject)
+  else begin
+    {$IFDEF RaiseInvalidDataTypeException}
+    JSON_Error_IncompatibleDataType;
+    {$ENDIF}
+    Result := nil;
+  end;
+end;
+
+function TROJSONValue.GetAsBoolean: Boolean;
+begin
+  if FValueType = jdtBoolean then
+    Result := FValue
+  else begin
+    {$IFDEF RaiseInvalidDataTypeException}
+    JSON_Error_IncompatibleDataType;
+    {$ENDIF}
+    Result := False;
+  end;
+end;
+
+
+function TROJSONValue.GetAsNumber: Variant;
+begin
+  if FValueType = jdtNumber then
+    Result := FValue
+  else begin
+    {$IFDEF RaiseInvalidDataTypeException}
+    JSON_Error_IncompatibleDataType;
+    {$ENDIF}
+    Result := Null;
+  end;
+end;
+
+function TROJSONValue.GetAsObject: TROJSONObject;
+begin
+  if (FValueType = jdtObject) then
+    Result:= TROJSONObject(FObject)
+  else begin
+    {$IFDEF RaiseInvalidDataTypeException}
+    JSON_Error_IncompatibleDataType;
+    {$ENDIF}
+    Result := nil;
+  end;
+end;
+
+function TROJSONValue.GetAsString: JSON_String;
+begin
+  Result := FValue;
+end;
+
+function TROJSONValue.GetVarValue: Variant;
+begin
+  case FValueType of
+    jdtNull : Result:= Null;
+    jdtString: Result:= AsString;
+    jdtNumber: Result:= AsNumber;
+    jdtBoolean: Result := AsBoolean;
+    jdtArray: ;
+    jdtObject: Result := ReadVariantFromStreamObject(AsObject);
+  end;
+end;
+
+procedure TROJSONValue.IntLoadFromStream(AStream: TStream);
+var
+  lChar: JSON_Char;
+  s: JSON_String;
+begin
+  lChar := ReadNextChar(AStream);
+  if lChar = '"' then begin //string
+     ReadChar(AStream);
+     AsString:=ReadString(AStream);
+  end
+  else if lChar = '{' then begin //object
+    AsObject := TROJSONObject.Create;
+    AsObject.IntLoadFromStream(AStream);
+  end
+  else if lChar = '[' then begin // array
+    AsArray := TROJSONArray.Create;
+    AsArray.IntLoadFromStream(AStream);
+  end
+  else if lchar = 't' then begin //true
+    ReadChar(AStream);
+    SetLength(s, 3);
+    AStream.ReadBuffer(pointer(s)^, 3*sizeof(JSON_Char));
+    if s <> 'rue' then JSON_Error(AStream);
+    AsBoolean:=True;
+  end
+  else if lchar = 'f' then begin //false
+    ReadChar(AStream);
+    SetLength(s, 4);
+    AStream.ReadBuffer(pointer(s)^, 4*sizeof(JSON_Char));
+    if s <> 'alse' then JSON_Error(AStream);
+    AsBoolean:=False;
+  end
+  else if lchar = 'n' then begin //null
+    ReadChar(AStream);
+    SetLength(s, 3);
+    AStream.ReadBuffer(pointer(s)^, 3*sizeof(JSON_Char));
+    if s <> 'ull' then JSON_Error(AStream);
+    Clear;
+  end
+  else begin // number
+    AsNumber:= ReadNumber(AStream);
+  end
+end;
+
+procedure TROJSONValue.IntSaveToStream(AStream: TStream);
+begin
+  case FValueType of
+    jdtObject: AsObject.IntSaveToStream(AStream);
+    jdtArray:  ASArray.IntSaveToStream(AStream);
+    jdtNull: WriteIdent(AStream, 'null');
+    jdtBoolean: if GetAsBoolean then
+                  WriteIdent(AStream, 'true')
+                else
+                  WriteIdent(AStream, 'false');
+    jdtString: WriteString(AStream, AsString);
+    jdtNumber: WriteNumber(AStream, AsNumber);
+  end;
+end;
+
+procedure TROJSONValue.LoadFromStream(AStream: TStream; AUTF8Stream: boolean);
+var
+  lStream: TMemoryStream;
+  s: UTF8String;
+  w: JSON_String;
+  lPos: int64;
+begin
+  lpos := AStream.Position;
+  try
+    if AUTF8Stream then begin
+      lStream:= TMemoryStream.Create;
+      try
+        SetLength(s, AStream.Size - AStream.Position);
+        AStream.Read(pointer(s)^, Length(s));
+        if Copy(s,1,3) = UTF8String(#$EF#$BB#$BF) then delete(s,1,3);
+
+        w:= UTF8ToString(s);
+        s:='';
+        lStream.Size := Length(w)*SizeOf(JSON_Char);
+        Move(pointer(w)^,lStream.Memory^, lStream.Size);
+        w:='';
+        IntLoadFromStream(lStream);
+      finally
+        lStream.Free;
+      end;
+    end
+    else begin
+      IntLoadFromStream(AStream);
+    end;
+  except
+    AStream.Position:= lPos;
+    raise;
+  end;
+end;
+
+procedure TROJSONValue.SaveToStream(AStream: TStream; AUTF8Stream: boolean);
+var
+  lStream: TMemoryStream;
+  s: UTF8String;
+  w: JSON_String;
+begin
+  if AUTF8Stream then begin
+    lStream:= TMemoryStream.Create;
+    try
+      IntSaveToStream(lStream);
+      SetString(w, JSON_PChar(lStream.Memory), lStream.Size div SizeOf(JSON_Char));
+    finally
+      lStream.Free;
+    end;
+    s:=UTF8Encode(W);
+    w:='';
+    AStream.Write(pointer(s)^, Length(s));
+  end
+  else begin
+    IntSaveToStream(AStream);
+  end;
+end;
+
+procedure TROJSONValue.SetAsArray(const Value: TROJSONArray);
+begin
+  if (Value <> FObject) or (FValueType <> jdtArray) then begin
+    Clear;
+    if Value <> nil then begin
+      FObject := Value;
+      FValueType := jdtArray;
+    end;
+   end;
+end;
+
+procedure TROJSONValue.SetAsBoolean(const Value: Boolean);
+begin
+  if FValueType <> jdtBoolean then begin
+    Clear;
+    FValueType := jdtBoolean;
+  end;
+  FValue := Value;
+end;
+
+procedure TROJSONValue.SetAsNull;
+begin
+  Clear;
+end;
+
+procedure TROJSONValue.SetAsNumber(const Value: Variant);
+begin
+  if FValueType <> jdtNumber then begin
+    Clear;
+    FValueType := jdtNumber;
+  end;
+  FValue:= Value;
+end;
+
+procedure TROJSONValue.SetAsObject(const Value: TROJSONObject);
+begin
+  if (Value <> FObject) or (FValueType <> jdtObject) then begin
+    Clear;
+    if Value <> nil then begin
+      FObject := Value;
+      FValueType := jdtObject;
+    end;
+   end;
+end;
+
+procedure TROJSONValue.SetVarValue(const Value: Variant);
+begin
+  if VarIsNull(Value) or VarIsEmpty(Value) then SetAsNull
+  else if TVarData(Value).VType = varBoolean then AsBoolean := Value
+  else if VarIsStr(Value) then AsString := Value
+  else if VarIsNumeric(Value) or (TVarData(Value).VType = varDate) then AsNumber := Value
+  else AsObject := WriteVarianttoStreamObject(Value);
+end;
+
+constructor TROJSONValue.Create(aType: TROJSONDataType);
+begin
+  inherited Create(nil);
+  FObject := nil;
+  case aType of
+    jdtObject: FObject := TROJSONObject.Create;
+    jdtArray: FObject := TROJSONArray.Create;
+  end;
+  FValueType := aType;
+  FValue := Null;
+end;
+
+{ TROJSONProperty }
+
+
+procedure TROJSONValue.SetAsString(const Value: JSON_String);
+begin
+  if FValueType <> jdtString then begin
+    Clear;
+    FValueType := jdtString;
+  end;
+  FValue:= Value;
+end;
+
+{ TROJSONProperty }
+
+procedure TROJSONProperty.IntLoadFromStream(AStream: TStream);
+begin
+ // inherited;
+  if ReadChar(AStream) <> '"' then JSON_Error(AStream);
+  FName := ReadString(Astream);
+  if ReadChar(AStream) <> ':' then JSON_Error(AStream);
+  inherited IntLoadFromStream(AStream);
+end;
+
+procedure TROJSONProperty.IntSaveToStream(AStream: TStream);
+begin
+  WriteString(AStream,FName);
+  WriteChar(AStream,':');
+  inherited IntSaveToStream(Astream);
+end;
+
+procedure TROJSONProperty.SetName(const Value: JSON_String);
+begin
+  FName := Value;
+end;
+
+{ TROJSONObject }
+
+function TROJSONObject.Add: TROJSONProperty;
+begin
+  Result:=TROJSONProperty(inherited Add);
+end;
+
+function TROJSONObject.AddArrayProperty(
+  const AName: JSON_String): TROJSONProperty;
+begin
+  Result:=Add;
+  Result.Name := AName;
+  Result.ASArray := TROJSONArray.Create;
+end;
+
+function TROJSONObject.AddBooleanProperty(const AName: JSON_String;
+  const AValue: Boolean): TROJSONProperty;
+begin
+  Result:=Add;
+  Result.Name := AName;
+  Result.AsBoolean := AValue;
+end;
+
+function TROJSONObject.AddNullProperty(const AName: JSON_String): TROJSONProperty;
+begin
+  Result:=Add;
+  Result.Name := AName;
+  Result.SetAsNull;
+end;
+
+function TROJSONObject.AddNumberProperty(const AName: JSON_String;
+  const AValue: Variant): TROJSONProperty;
+begin
+  Result:=Add;
+  Result.Name := AName;
+  Result.AsNumber := AValue;
+end;
+
+function TROJSONObject.AddObjectProperty(
+  const AName: JSON_String): TROJSONProperty;
+begin
+  Result:=Add;
+  Result.Name := AName;
+  Result.AsObject := TROJSONObject.Create;
+end;
+
+function TROJSONObject.AddStringProperty(const AName,
+  aValue: JSON_String): TROJSONProperty;
+begin
+  Result:=Add;
+  Result.Name := AName;
+  Result.AsString := aValue;
+end;
+
+constructor TROJSONObject.Create;
+begin
+  inherited Create(TROJSONProperty);
+end;
+
+function TROJSONObject.GetArrayItemByName(const AName: JSON_String;
+  ACreate: Boolean): TROJSONArray;
+var
+  aItem : TROJSONProperty;
+begin
+  Result := nil;
+  aItem := FindItem(AName);
+  if (AItem = nil) and ACreate then
+    aItem := AddArrayProperty(Aname);
+
+  if aItem <> nil then begin
+    if aItem.ValueType = jdtArray then
+      result := aItem.ASArray
+    else
+      JSON_Error_IncompatibleDataType;
+  end;
+end;
+
+function TROJSONObject.FindItem(const AName: JSON_String): TROJSONProperty;
+var
+  i: integer;
+begin
+  i := IndexOf(AName);
+  if i = -1 then
+    Result := nil
+  else
+    Result := Items[i];  
+end;
+
+function TROJSONObject.IndexOf(const AName: JSON_String): integer;
+begin
+  For Result:= 0 to Count - 1 do
+    if Items[Result].Name = AName then Exit;
+  Result := -1;
+end;
+
+function TROJSONObject.GetItems(Index: Integer): TROJSONProperty;
+begin
+  Result:= TROJSONProperty(GetItem(Index));
+end;
+
+function TROJSONObject.GetObjectItemByName(const AName: JSON_String;
+  ACreate: Boolean): TROJSONObject;
+var
+  aItem : TROJSONProperty;
+begin
+  Result := nil;
+  aItem := FindItem(AName);
+  if (AItem = nil) and ACreate then begin
+    aItem := AddObjectProperty(AName);
+  end;
+  if aItem <> nil then begin
+    if aItem.ValueType = jdtObject then
+      result := aItem.AsObject
+    else
+      JSON_Error_IncompatibleDataType;
+  end;
+end;
+
+procedure TROJSONObject.IntLoadFromStream(AStream: TStream);
+var
+  AChar: JSON_Char;
+begin
+  if ReadChar(AStream ) = '{' then begin
+    AChar := ReadChar(AStream);
+    while AChar <> '}' do begin
+      if AChar = ',' then begin
+        AChar:= ReadChar(AStream);
+        continue;
+      end
+      else if AChar = '"' then begin
+        AStream.Seek( -SizeOf(JSON_Char), soFromCurrent);
+        TROJSONProperty(Add).IntLoadFromStream(AStream);
+      end
+      else
+        // only " and , supported here
+        JSON_Error(AStream);
+      AChar:= ReadChar(AStream);
+    end;
+  end
+  else begin
+    JSON_Error(AStream);
+  end;
+end;
+
+procedure TROJSONObject.IntSaveToStream(AStream: TStream);
+var
+  i: integer;
+begin
+  WriteChar(AStream, '{');
+  For i := 0 to Count -1 do begin
+    Items[i].IntSaveToStream(AStream);
+    if i <> Count -1 then WriteChar(AStream, ',');
+  end;
+  WriteChar(AStream, '}');
+end;
+
+procedure TROJSONObject.SaveToStream(AStream: TStream; AUTF8Stream: boolean);
+var
+  temp: TROJSONValue;
+begin
+  if AUTF8Stream then begin
+    temp:= TROJSONValue.Create(nil);
+    try
+      temp.AsObject := Self;
+      temp.SaveToStream(AStream,AUTF8Stream);
+    finally
+      temp.FValueType:= jdtNull; // for preventing freeing object
+      temp.Free;
+    end;
+  end
+  else begin
+    IntSaveToStream(AStream);
+  end;
+end;
+
+procedure TROJSONObject.SetItems(Index: Integer;
+  const Value: TROJSONProperty);
+begin
+  SetItem(Index, Value);
+end;
+
+function TROJSONObject.GetStringValueByName(
+  const AName: JSON_String): JSON_String;
+var
+  aItem : TROJSONProperty;
+begin
+  Result := '';
+  aItem := ItemByName(AName);
+  if aItem <> nil then begin
+    if aItem.ValueType = jdtString then
+      result := aItem.AsString
+    else
+      JSON_Error_IncompatibleDataType;
+  end;
+end;
+
+function TROJSONObject.GetBooleanValueByName(
+  const AName: JSON_String): Boolean;
+var
+  aItem : TROJSONProperty;
+begin
+  Result := False;
+  aItem := ItemByName(AName);
+  if aItem <> nil then begin
+    if aItem.ValueType = jdtBoolean then
+      result := aItem.AsBoolean
+    else
+      JSON_Error_IncompatibleDataType;
+  end;
+end;
+
+function TROJSONObject.GetNumberValueByName(
+  const AName: JSON_String): Variant;
+var
+  aItem : TROJSONProperty;
+begin
+  Result := Null;
+  aItem := ItemByName(AName);
+  if aItem <> nil then begin
+    if aItem.ValueType = jdtNumber then
+      result := aItem.AsNumber
+    else
+      JSON_Error_IncompatibleDataType;
+  end;
+end;
+
+function TROJSONObject.AddVariantProperty(const AName: JSON_String;
+  const AValue: Variant): TROJSONProperty;
+begin
+  Result:=Add;
+  Result.Name := AName;
+  Result.VarValue := AValue;
+end;
+
+function TROJSONObject.GetVariantValueByName(
+  const AName: JSON_String): Variant;
+var
+  aItem : TROJSONProperty;
+begin
+  Result := '';
+  aItem := ItemByName(AName);
+  if aItem <> nil then Result:= aItem.VarValue;
+end;
+
+function TROJSONObject.ItemByName(
+  const AName: JSON_String): TROJSONProperty;
+begin
+  Result := FindItem(AName);
+  if (Result = nil) then JSON_Error_PropertyNotFound(AName);
+end;
+
+procedure TROJSONObject.LoadFromStream(AStream: TStream; AUTF8Stream: boolean);
+var
+  temp: TROJSONValue;
+begin
+  if AUTF8Stream then begin
+    temp:= TROJSONValue.Create(nil);
+    try
+      temp.AsObject := Self;
+      temp.LoadFromStream(AStream,AUTF8Stream);
+    finally
+      temp.FValueType:= jdtNull; // for preventing freeing object
+      temp.Free;
+    end;
+  end
+  else begin
+    IntLoadFromStream(AStream);
+  end;
+end;
+
+{ TROJSONArray }
+
+function TROJSONArray.Add: TROJSONValue;
+begin
+  Result:= TROJSONValue(inherited Add);
+end;
+
+function TROJSONArray.AddArrayValue: TROJSONValue;
+begin
+  Result:=Add;
+  Result.ASArray:=TROJSONArray.Create;
+end;
+
+function TROJSONArray.AddBooleanValue(const AValue: Boolean): TROJSONValue;
+begin
+  Result:=Add;
+  Result.AsBoolean:= AValue;
+end;
+
+function TROJSONArray.AddNullValue: TROJSONValue;
+begin
+  Result:=Add;
+  Result.SetAsNull;
+end;
+
+function TROJSONArray.AddNumberValue(const AValue: Variant): TROJSONValue;
+begin
+  Result:=Add;
+  Result.AsNumber:= AValue;
+end;
+
+function TROJSONArray.AddObject: TROJSONValue;
+begin
+  Result:= Add;
+  Result.AsObject := TROJSONObject.Create;
+end;
+
+function TROJSONArray.AddStringValue(
+  const AValue: JSON_String): TROJSONValue;
+begin
+  Result:=Add;
+  Result.AsString:= AValue;
+end;
+
+function TROJSONArray.AddVariantValue(const AValue: Variant): TROJSONValue;
+begin
+  Result:=Add;
+  Result.VarValue := AValue;
+end;
+
+constructor TROJSONArray.Create;
+begin
+  inherited Create(TROJSONValue);
+end;
+
+function TROJSONArray.FindObjectByStringValue(const AName,
+  aValue: JSON_String): TROJSONObject;
+var
+  i: integer;
+  lProp: TROJSONProperty;
+begin
+  for i := 0 to Count-1 do begin
+    if (Items[i].ValueType = jdtObject) then begin
+     Result := Items[i].AsObject;
+     lProp := Result.FindItem(AName);
+     if (lProp <> nil) and (lProp.ValueType = jdtString) and (lProp.AsString = aValue) then  Exit;
+    end;
+  end;
+  Result := nil;
+end;
+
+function TROJSONArray.GetItems(Index: Integer): TROJSONValue;
+begin
+  Result:= TROJSONValue(GetItem(Index));
+end;
+
+procedure TROJSONArray.IntLoadFromStream(AStream: TStream);
+var
+  AChar: JSON_Char;
+begin
+  if ReadChar(AStream ) = '[' then begin
+    AChar := ReadChar(AStream);
+    while AChar <> ']' do begin
+      if AChar <> ',' then AStream.Seek( -SizeOf(JSON_Char), soFromCurrent);
+      TROJSONValue(Add).IntLoadFromStream(AStream);
+      AChar := ReadChar(AStream);
+    end;
+  end
+  else begin
+    JSON_Error(AStream);
+  end;
+end;
+
+procedure TROJSONArray.IntSaveToStream(AStream: TStream);
+var
+  i: integer;
+begin
+  WriteChar(AStream, '[');
+  For i := 0 to Count -1 do begin
+    Items[i].IntSaveToStream(AStream);
+    if i <> Count -1 then WriteChar(AStream, ',');
+  end;
+  WriteChar(AStream, ']');
+end;
+
+procedure TROJSONArray.LoadFromStream(AStream: TStream; AUTF8Stream: boolean);
+var
+  temp: TROJSONValue;
+begin
+  if AUTF8Stream then begin
+    temp:= TROJSONValue.Create(nil);
+    try
+      temp.ASArray := Self;
+      temp.LoadFromStream(AStream,AUTF8Stream);
+    finally
+      temp.FValueType:= jdtNull; // for preventing freeing object
+      temp.Free;
+    end;
+  end
+  else begin
+    IntLoadFromStream(AStream);
+  end;
+end;
+
+procedure TROJSONArray.SaveToStream(AStream: TStream; AUTF8Stream: boolean);
+var
+  temp: TROJSONValue;
+begin
+  if AUTF8Stream then begin
+    temp:= TROJSONValue.Create(nil);
+    try
+      temp.ASArray := Self;
+      temp.SaveToStream(AStream,AUTF8Stream);
+    finally
+      temp.FValueType:= jdtNull; // for preventing freeing object
+      temp.Free;
+    end;
+  end
+  else begin
+    IntSaveToStream(AStream);
+  end;
+end;
+
+procedure TROJSONArray.SetItems(Index: Integer; const Value: TROJSONValue);
+begin
+  SetItem(Index, Value);
+end;
+
+function JSON_ParseStream(AData: TStream;aUTF8Stream:Boolean):TROJSONValue;
+var
+  lpos : int64;
+begin
+  lpos := AData.Position;
+  try
+    Result := TROJSONValue.Create(nil);
+    Result.LoadFromStream(AData,aUTF8Stream);
+  except
+    AData.Position := lPos;
+    Raise;
+  end;
+end;
+
+{$IFDEF DELPHI7UP}
+initialization
+  JSON_FormatSettings.DecimalSeparator := '.';
+{$ENDIF}
+end.
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROLocalChannel.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROLocalChannel.pas
new file mode 100644
index 0000000..1ae9812
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROLocalChannel.pas	
@@ -0,0 +1,93 @@
+unit uROLocalChannel;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core components                                   }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes, uROClient, uROClientIntf, uROLocalServer;
+
+type
+  TROLocalChannel = class(TROTransportChannel)
+  private
+    fServerChannel: TROLocalServer;
+  protected
+    function GetTransportObject: TObject; override;
+    procedure IntDispatch(aRequest: TStream; aResponse: TStream); override;
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+  public
+    procedure CheckProperties; override;
+    constructor Create(aOwner : TComponent); override;
+  published
+    property ServerLocators;
+    property DispatchOptions;
+    property ServerChannel: TROLocalServer read fServerChannel write fServerChannel;
+    property OnLoginNeeded;
+    property OnSendStream;
+    property OnReceiveStream;
+  end;
+
+implementation
+uses
+  uROClasses;
+{ TROLocalChannel }
+
+procedure TROLocalChannel.CheckProperties;
+begin
+  inherited;
+  Check(ServerChannel = nil, Name + '.ServerChannel must be assigned.');
+  ServerChannel.CheckProperties;
+end;
+
+constructor TROLocalChannel.Create(aOwner: TComponent);
+begin
+  inherited;
+  ThreadSafe := true;
+end;
+
+function TROLocalChannel.GetTransportObject: TObject;
+begin
+  Result := self;
+end;
+
+procedure TROLocalChannel.IntDispatch(aRequest, aResponse: TStream);
+begin
+  CheckProperties;
+
+  {$IFDEF DESIGNTIME}
+  {$IFDEF MSWINDOWS}
+  if csDesigning in ComponentState then
+    raise EROIDEProblem.Create('We''re sorry, but the '+ClassName+' cannot be used inside the Delphi IDE at designtime.');
+  {$ENDIF MSWINDOWS}
+  {$ENDIF DESIGNTIME}
+
+  fServerChannel.SendRequest(aRequest, aResponse);
+end;
+
+procedure TROLocalChannel.Notification(AComponent: TComponent;
+  Operation: TOperation);
+begin
+  inherited;
+  if (Operation=opRemove) and
+     (AComponent=fServerChannel) then fServerChannel := NIL;
+end;
+
+initialization
+  RegisterTransportChannelClass(TROLocalChannel);
+
+finalization
+  UnRegisterTransportChannelClass(TROLocalChannel);
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROLocalServer.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROLocalServer.pas
new file mode 100644
index 0000000..eb57903
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROLocalServer.pas	
@@ -0,0 +1,64 @@
+unit uROLocalServer;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core components                                   }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes, uROServer, uROClientIntf, uROClasses;
+
+type
+  TROLocalServer = class(TROServer, IROTransport)
+  protected
+    procedure IntSetActive(const Value: Boolean); override;
+    function IntGetActive: Boolean; override;
+    function GetTransportObject: TObject;
+  public
+    procedure SendRequest(aRequeststream, aResponsestream: TStream);
+  published
+    property Active default True;
+  end;
+
+implementation
+
+
+{ TROLocalServer }
+
+function TROLocalServer.GetTransportObject: TObject;
+begin
+  result := self;
+end;
+
+function TROLocalServer.IntGetActive: Boolean;
+begin
+  result := true;
+end;
+
+procedure TROLocalServer.IntSetActive(const Value: Boolean);
+begin
+  // do nothing
+end;
+
+procedure TROLocalServer.SendRequest(aRequeststream,
+  aResponsestream: TStream);
+begin
+  DispatchMessage(self, aRequeststream, aResponsestream);
+end;
+
+initialization
+  RegisterServerClass(TROLocalServer);
+finalization
+  UnregisterServerClass(TROLocalServer);
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROMSXML2_TLB.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROMSXML2_TLB.pas
new file mode 100644
index 0000000..dd8b5e7
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROMSXML2_TLB.pas	
@@ -0,0 +1,3051 @@
+unit uROMSXML2_TLB;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up                                                  }
+{ platform: Win32                                                            }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{ NOTE: THIS UNIT WAS MANUALLY MODIFIED FROM THE IMPORTED VERSION,
+        FOR DELPHI 5 COMPATIBILITY AND TO NOT PULL IN MAJOR PARTS OF
+        THE VCL VIA OleServer (PULLS IN Controls/Forms) AND Graphics
+
+        ALSO, ALL dispinterface VERSIONS WERE REMOVED, FOR C++BUILDER
+        COMPATIBILITY IN BDS 2006 AND ABOVE} 
+
+{$I RemObjects.inc}
+
+// ************************************************************************ //
+// WARNING
+// The types declared in this file were generated from data read from a
+// Type Library. If this type library is explicitly or indirectly (via        
+// another type library referring to this type library) re-imported, or the   
+// 'Refresh' command of the Type Library Editor activated while editing the   
+// Type Library, the contents of this file will be regenerated and all        
+// manual modifications will be lost.                                         
+// ************************************************************************ //
+
+// PASTLWTR : 1.2
+// File generated on 8/18/2003 10:12:51 PM from Type Library described below.
+
+// ************************************************************************  //
+// Type Lib: C:\WINDOWS\system32\msxml4.dll (1)
+// LIBID: {F5078F18-C551-11D3-89B9-0000F81FE221}
+// LCID: 0
+// Helpfile: 
+// HelpString: Microsoft XML, v4.0
+// DepndLst: 
+//   (1) v2.0 stdole, (C:\WINDOWS\system32\stdole2.tlb)
+// Errors:
+//   Hint: Parameter 'type' of IXMLDOMNode.nodeType changed to 'type_'
+//   Hint: Member 'implementation' of 'IXMLDOMDocument' changed to 'implementation_'
+//   Hint: Parameter 'type' of IXMLDOMDocument.createNode changed to 'type_'
+//   Hint: Parameter 'var' of IXMLDOMSchemaCollection.add changed to 'var_'
+//   Hint: Symbol 'type' renamed to 'type_'
+//   Hint: Parameter 'type' of ISchemaElement.type changed to 'type_'
+//   Hint: Symbol 'type' renamed to 'type_'
+//   Hint: Parameter 'type' of ISchemaAttribute.type changed to 'type_'
+//   Hint: Symbol 'type' renamed to 'type_'
+//   Hint: Symbol 'type' renamed to 'type_'
+// ************************************************************************ //
+{$TYPEDADDRESS OFF} // Unit must be compiled without type-checked pointers. 
+
+{$IFDEF DELPHI6UP}
+{$WARN SYMBOL_PLATFORM OFF}
+{$WRITEABLECONST ON}
+{$IFDEF DELPHI7UP}
+{$VARPROPSETTER ON}
+{$ENDIF}
+{$ENDIF}
+
+interface
+
+uses Windows, ActiveX, Classes;
+  
+
+// *********************************************************************//
+// GUIDS declared in the TypeLibrary. Following prefixes are used:        
+//   Type Libraries     : LIBID_xxxx                                      
+//   CoClasses          : CLASS_xxxx                                      
+//   DISPInterfaces     : DIID_xxxx                                       
+//   Non-DISP interfaces: IID_xxxx                                        
+// *********************************************************************//
+const
+  // TypeLibrary Major and minor versions
+  MSXML2MajorVersion = 4;
+  MSXML2MinorVersion = 0;
+
+  LIBID_MSXML2: TGUID = '{F5078F18-C551-11D3-89B9-0000F81FE221}';
+
+  IID_IXMLDOMImplementation: TGUID = '{2933BF8F-7B36-11D2-B20E-00C04F983E60}';
+  IID_IXMLDOMNode: TGUID = '{2933BF80-7B36-11D2-B20E-00C04F983E60}';
+  IID_IXMLDOMNodeList: TGUID = '{2933BF82-7B36-11D2-B20E-00C04F983E60}';
+  IID_IXMLDOMNamedNodeMap: TGUID = '{2933BF83-7B36-11D2-B20E-00C04F983E60}';
+  IID_IXMLDOMDocument: TGUID = '{2933BF81-7B36-11D2-B20E-00C04F983E60}';
+  IID_IXMLDOMDocumentType: TGUID = '{2933BF8B-7B36-11D2-B20E-00C04F983E60}';
+  IID_IXMLDOMElement: TGUID = '{2933BF86-7B36-11D2-B20E-00C04F983E60}';
+  IID_IXMLDOMAttribute: TGUID = '{2933BF85-7B36-11D2-B20E-00C04F983E60}';
+  IID_IXMLDOMDocumentFragment: TGUID = '{3EFAA413-272F-11D2-836F-0000F87A7782}';
+  IID_IXMLDOMCharacterData: TGUID = '{2933BF84-7B36-11D2-B20E-00C04F983E60}';
+  IID_IXMLDOMText: TGUID = '{2933BF87-7B36-11D2-B20E-00C04F983E60}';
+  IID_IXMLDOMComment: TGUID = '{2933BF88-7B36-11D2-B20E-00C04F983E60}';
+  IID_IXMLDOMCDATASection: TGUID = '{2933BF8A-7B36-11D2-B20E-00C04F983E60}';
+  IID_IXMLDOMProcessingInstruction: TGUID = '{2933BF89-7B36-11D2-B20E-00C04F983E60}';
+  IID_IXMLDOMEntityReference: TGUID = '{2933BF8E-7B36-11D2-B20E-00C04F983E60}';
+  IID_IXMLDOMParseError: TGUID = '{3EFAA426-272F-11D2-836F-0000F87A7782}';
+  IID_IXMLDOMDocument2: TGUID = '{2933BF95-7B36-11D2-B20E-00C04F983E60}';
+  IID_IXMLDOMSchemaCollection: TGUID = '{373984C8-B845-449B-91E7-45AC83036ADE}';
+  IID_IXMLDOMNotation: TGUID = '{2933BF8C-7B36-11D2-B20E-00C04F983E60}';
+  IID_IXMLDOMEntity: TGUID = '{2933BF8D-7B36-11D2-B20E-00C04F983E60}';
+  IID_IXTLRuntime: TGUID = '{3EFAA425-272F-11D2-836F-0000F87A7782}';
+  IID_IXSLTemplate: TGUID = '{2933BF93-7B36-11D2-B20E-00C04F983E60}';
+  IID_IXSLProcessor: TGUID = '{2933BF92-7B36-11D2-B20E-00C04F983E60}';
+  IID_ISAXXMLReader: TGUID = '{A4F96ED0-F829-476E-81C0-CDC7BD2A0802}';
+  IID_ISAXEntityResolver: TGUID = '{99BCA7BD-E8C4-4D5F-A0CF-6D907901FF07}';
+  IID_ISAXContentHandler: TGUID = '{1545CDFA-9E4E-4497-A8A4-2BF7D0112C44}';
+  IID_ISAXLocator: TGUID = '{9B7E472A-0DE4-4640-BFF3-84D38A051C31}';
+  IID_ISAXAttributes: TGUID = '{F078ABE1-45D2-4832-91EA-4466CE2F25C9}';
+  IID_ISAXDTDHandler: TGUID = '{E15C1BAF-AFB3-4D60-8C36-19A8C45DEFED}';
+  IID_ISAXErrorHandler: TGUID = '{A60511C4-CCF5-479E-98A3-DC8DC545B7D0}';
+  IID_ISAXXMLFilter: TGUID = '{70409222-CA09-4475-ACB8-40312FE8D145}';
+  IID_ISAXLexicalHandler: TGUID = '{7F85D5F5-47A8-4497-BDA5-84BA04819EA6}';
+  IID_ISAXDeclHandler: TGUID = '{862629AC-771A-47B2-8337-4E6843C1BE90}';
+  IID_IVBSAXXMLReader: TGUID = '{8C033CAA-6CD6-4F73-B728-4531AF74945F}';
+  IID_IVBSAXEntityResolver: TGUID = '{0C05D096-F45B-4ACA-AD1A-AA0BC25518DC}';
+  IID_IVBSAXContentHandler: TGUID = '{2ED7290A-4DD5-4B46-BB26-4E4155E77FAA}';
+  IID_IVBSAXLocator: TGUID = '{796E7AC5-5AA2-4EFF-ACAD-3FAAF01A3288}';
+  IID_IVBSAXAttributes: TGUID = '{10DC0586-132B-4CAC-8BB3-DB00AC8B7EE0}';
+  IID_IVBSAXDTDHandler: TGUID = '{24FB3297-302D-4620-BA39-3A732D850558}';
+  IID_IVBSAXErrorHandler: TGUID = '{D963D3FE-173C-4862-9095-B92F66995F52}';
+  IID_IVBSAXXMLFilter: TGUID = '{1299EB1B-5B88-433E-82DE-82CA75AD4E04}';
+  IID_IVBSAXLexicalHandler: TGUID = '{032AAC35-8C0E-4D9D-979F-E3B702935576}';
+  IID_IVBSAXDeclHandler: TGUID = '{E8917260-7579-4BE1-B5DD-7AFBFA6F077B}';
+  IID_IMXWriter: TGUID = '{4D7FF4BA-1565-4EA8-94E1-6E724A46F98D}';
+  IID_IMXAttributes: TGUID = '{F10D27CC-3EC0-415C-8ED8-77AB1C5E7262}';
+  IID_IMXReaderControl: TGUID = '{808F4E35-8D5A-4FBE-8466-33A41279ED30}';
+  IID_IMXSchemaDeclHandler: TGUID = '{FA4BB38C-FAF9-4CCA-9302-D1DD0FE520DB}';
+  IID_ISchemaItem: TGUID = '{50EA08B3-DD1B-4664-9A50-C2F40F4BD79A}';
+  IID_ISchemaParticle: TGUID = '{50EA08B5-DD1B-4664-9A50-C2F40F4BD79A}';
+  IID_ISchemaElement: TGUID = '{50EA08B7-DD1B-4664-9A50-C2F40F4BD79A}';
+  IID_ISchema: TGUID = '{50EA08B4-DD1B-4664-9A50-C2F40F4BD79A}';
+  IID_ISchemaItemCollection: TGUID = '{50EA08B2-DD1B-4664-9A50-C2F40F4BD79A}';
+  IID_ISchemaStringCollection: TGUID = '{50EA08B1-DD1B-4664-9A50-C2F40F4BD79A}';
+  IID_ISchemaType: TGUID = '{50EA08B8-DD1B-4664-9A50-C2F40F4BD79A}';
+  IID_ISchemaComplexType: TGUID = '{50EA08B9-DD1B-4664-9A50-C2F40F4BD79A}';
+  IID_ISchemaAny: TGUID = '{50EA08BC-DD1B-4664-9A50-C2F40F4BD79A}';
+  IID_ISchemaModelGroup: TGUID = '{50EA08BB-DD1B-4664-9A50-C2F40F4BD79A}';
+  IID_IXMLDOMSchemaCollection2: TGUID = '{50EA08B0-DD1B-4664-9A50-C2F40F4BD79A}';
+  IID_ISchemaAttribute: TGUID = '{50EA08B6-DD1B-4664-9A50-C2F40F4BD79A}';
+  IID_ISchemaAttributeGroup: TGUID = '{50EA08BA-DD1B-4664-9A50-C2F40F4BD79A}';
+  IID_ISchemaIdentityConstraint: TGUID = '{50EA08BD-DD1B-4664-9A50-C2F40F4BD79A}';
+  IID_ISchemaNotation: TGUID = '{50EA08BE-DD1B-4664-9A50-C2F40F4BD79A}';
+  IID_IXMLElementCollection: TGUID = '{65725580-9B5D-11D0-9BFE-00C04FC99C8E}';
+  IID_IXMLDocument: TGUID = '{F52E2B61-18A1-11D1-B105-00805F49916B}';
+  IID_IXMLElement: TGUID = '{3F7F31AC-E15F-11D0-9C25-00C04FC99C8E}';
+  IID_IXMLDocument2: TGUID = '{2B8DE2FE-8D2D-11D1-B2FC-00C04FD915A9}';
+  IID_IXMLElement2: TGUID = '{2B8DE2FF-8D2D-11D1-B2FC-00C04FD915A9}';
+  IID_IXMLAttribute: TGUID = '{D4D4A0FC-3B73-11D1-B2B4-00C04FB92596}';
+  IID_IXMLError: TGUID = '{948C5AD3-C58D-11D0-9C0B-00C04FC99C8E}';
+  IID_IXMLDOMSelection: TGUID = '{AA634FC7-5888-44A7-A257-3A47150D3A0E}';
+  DIID_XMLDOMDocumentEvents: TGUID = '{3EFAA427-272F-11D2-836F-0000F87A7782}';
+  IID_IDSOControl: TGUID = '{310AFA62-0575-11D2-9CA9-0060B0EC3D39}';
+  IID_IXMLHTTPRequest: TGUID = '{ED8C108D-4349-11D2-91A4-00C04F7969E8}';
+  IID_IServerXMLHTTPRequest: TGUID = '{2E9196BF-13BA-4DD4-91CA-6C571F281495}';
+  IID_IServerXMLHTTPRequest2: TGUID = '{2E01311B-C322-4B0A-BD77-B90CFDC8DCE7}';
+  IID_IMXNamespacePrefixes: TGUID = '{C90352F4-643C-4FBC-BB23-E996EB2D51FD}';
+  IID_IVBMXNamespaceManager: TGUID = '{C90352F5-643C-4FBC-BB23-E996EB2D51FD}';
+  IID_IMXNamespaceManager: TGUID = '{C90352F6-643C-4FBC-BB23-E996EB2D51FD}';
+  CLASS_DOMDocument: TGUID = '{F6D90F11-9C73-11D3-B32E-00C04F990BB4}';
+  CLASS_DOMDocument26: TGUID = '{F5078F1B-C551-11D3-89B9-0000F81FE221}';
+  CLASS_DOMDocument30: TGUID = '{F5078F32-C551-11D3-89B9-0000F81FE221}';
+  CLASS_DOMDocument40: TGUID = '{88D969C0-F192-11D4-A65F-0040963251E5}';
+  CLASS_FreeThreadedDOMDocument: TGUID = '{F6D90F12-9C73-11D3-B32E-00C04F990BB4}';
+  CLASS_FreeThreadedDOMDocument26: TGUID = '{F5078F1C-C551-11D3-89B9-0000F81FE221}';
+  CLASS_FreeThreadedDOMDocument30: TGUID = '{F5078F33-C551-11D3-89B9-0000F81FE221}';
+  CLASS_FreeThreadedDOMDocument40: TGUID = '{88D969C1-F192-11D4-A65F-0040963251E5}';
+  CLASS_XMLSchemaCache: TGUID = '{373984C9-B845-449B-91E7-45AC83036ADE}';
+  CLASS_XMLSchemaCache26: TGUID = '{F5078F1D-C551-11D3-89B9-0000F81FE221}';
+  CLASS_XMLSchemaCache30: TGUID = '{F5078F34-C551-11D3-89B9-0000F81FE221}';
+  CLASS_XMLSchemaCache40: TGUID = '{88D969C2-F192-11D4-A65F-0040963251E5}';
+  CLASS_XSLTemplate: TGUID = '{2933BF94-7B36-11D2-B20E-00C04F983E60}';
+  CLASS_XSLTemplate26: TGUID = '{F5078F21-C551-11D3-89B9-0000F81FE221}';
+  CLASS_XSLTemplate30: TGUID = '{F5078F36-C551-11D3-89B9-0000F81FE221}';
+  CLASS_XSLTemplate40: TGUID = '{88D969C3-F192-11D4-A65F-0040963251E5}';
+  CLASS_DSOControl: TGUID = '{F6D90F14-9C73-11D3-B32E-00C04F990BB4}';
+  CLASS_DSOControl26: TGUID = '{F5078F1F-C551-11D3-89B9-0000F81FE221}';
+  CLASS_DSOControl30: TGUID = '{F5078F39-C551-11D3-89B9-0000F81FE221}';
+  CLASS_DSOControl40: TGUID = '{88D969C4-F192-11D4-A65F-0040963251E5}';
+  CLASS_XMLHTTP: TGUID = '{F6D90F16-9C73-11D3-B32E-00C04F990BB4}';
+  CLASS_XMLHTTP26: TGUID = '{F5078F1E-C551-11D3-89B9-0000F81FE221}';
+  CLASS_XMLHTTP30: TGUID = '{F5078F35-C551-11D3-89B9-0000F81FE221}';
+  CLASS_XMLHTTP40: TGUID = '{88D969C5-F192-11D4-A65F-0040963251E5}';
+  CLASS_ServerXMLHTTP: TGUID = '{AFBA6B42-5692-48EA-8141-DC517DCF0EF1}';
+  CLASS_ServerXMLHTTP30: TGUID = '{AFB40FFD-B609-40A3-9828-F88BBE11E4E3}';
+  CLASS_ServerXMLHTTP40: TGUID = '{88D969C6-F192-11D4-A65F-0040963251E5}';
+  CLASS_SAXXMLReader: TGUID = '{079AA557-4A18-424A-8EEE-E39F0A8D41B9}';
+  CLASS_SAXXMLReader30: TGUID = '{3124C396-FB13-4836-A6AD-1317F1713688}';
+  CLASS_SAXXMLReader40: TGUID = '{7C6E29BC-8B8B-4C3D-859E-AF6CD158BE0F}';
+  CLASS_MXXMLWriter: TGUID = '{FC220AD8-A72A-4EE8-926E-0B7AD152A020}';
+  CLASS_MXXMLWriter30: TGUID = '{3D813DFE-6C91-4A4E-8F41-04346A841D9C}';
+  CLASS_MXXMLWriter40: TGUID = '{88D969C8-F192-11D4-A65F-0040963251E5}';
+  CLASS_MXHTMLWriter: TGUID = '{A4C23EC3-6B70-4466-9127-550077239978}';
+  CLASS_MXHTMLWriter30: TGUID = '{853D1540-C1A7-4AA9-A226-4D3BD301146D}';
+  CLASS_MXHTMLWriter40: TGUID = '{88D969C9-F192-11D4-A65F-0040963251E5}';
+  CLASS_SAXAttributes: TGUID = '{4DD441AD-526D-4A77-9F1B-9841ED802FB0}';
+  CLASS_SAXAttributes30: TGUID = '{3E784A01-F3AE-4DC0-9354-9526B9370EBA}';
+  CLASS_SAXAttributes40: TGUID = '{88D969CA-F192-11D4-A65F-0040963251E5}';
+  CLASS_MXNamespaceManager: TGUID = '{88D969D5-F192-11D4-A65F-0040963251E5}';
+  CLASS_MXNamespaceManager40: TGUID = '{88D969D6-F192-11D4-A65F-0040963251E5}';
+  CLASS_XMLDocument: TGUID = '{CFC399AF-D876-11D0-9C10-00C04FC99C8E}';
+
+// *********************************************************************//
+// Declaration of Enumerations defined in Type Library                    
+// *********************************************************************//
+// Constants for enum tagDOMNodeType
+type
+  tagDOMNodeType = TOleEnum;
+const
+  NODE_INVALID = $00000000;
+  NODE_ELEMENT = $00000001;
+  NODE_ATTRIBUTE = $00000002;
+  NODE_TEXT = $00000003;
+  NODE_CDATA_SECTION = $00000004;
+  NODE_ENTITY_REFERENCE = $00000005;
+  NODE_ENTITY = $00000006;
+  NODE_PROCESSING_INSTRUCTION = $00000007;
+  NODE_COMMENT = $00000008;
+  NODE_DOCUMENT = $00000009;
+  NODE_DOCUMENT_TYPE = $0000000A;
+  NODE_DOCUMENT_FRAGMENT = $0000000B;
+  NODE_NOTATION = $0000000C;
+
+// Constants for enum _SOMITEMTYPE
+type
+  _SOMITEMTYPE = TOleEnum;
+const
+  SOMITEM_SCHEMA = $00001000;
+  SOMITEM_ATTRIBUTE = $00001001;
+  SOMITEM_ATTRIBUTEGROUP = $00001002;
+  SOMITEM_NOTATION = $00001003;
+  SOMITEM_IDENTITYCONSTRAINT = $00001100;
+  SOMITEM_KEY = $00001101;
+  SOMITEM_KEYREF = $00001102;
+  SOMITEM_UNIQUE = $00001103;
+  SOMITEM_ANYTYPE = $00002000;
+  SOMITEM_DATATYPE = $00002100;
+  SOMITEM_DATATYPE_ANYTYPE = $00002101;
+  SOMITEM_DATATYPE_ANYURI = $00002102;
+  SOMITEM_DATATYPE_BASE64BINARY = $00002103;
+  SOMITEM_DATATYPE_BOOLEAN = $00002104;
+  SOMITEM_DATATYPE_BYTE = $00002105;
+  SOMITEM_DATATYPE_DATE = $00002106;
+  SOMITEM_DATATYPE_DATETIME = $00002107;
+  SOMITEM_DATATYPE_DAY = $00002108;
+  SOMITEM_DATATYPE_DECIMAL = $00002109;
+  SOMITEM_DATATYPE_DOUBLE = $0000210A;
+  SOMITEM_DATATYPE_DURATION = $0000210B;
+  SOMITEM_DATATYPE_ENTITIES = $0000210C;
+  SOMITEM_DATATYPE_ENTITY = $0000210D;
+  SOMITEM_DATATYPE_FLOAT = $0000210E;
+  SOMITEM_DATATYPE_HEXBINARY = $0000210F;
+  SOMITEM_DATATYPE_ID = $00002110;
+  SOMITEM_DATATYPE_IDREF = $00002111;
+  SOMITEM_DATATYPE_IDREFS = $00002112;
+  SOMITEM_DATATYPE_INT = $00002113;
+  SOMITEM_DATATYPE_INTEGER = $00002114;
+  SOMITEM_DATATYPE_LANGUAGE = $00002115;
+  SOMITEM_DATATYPE_LONG = $00002116;
+  SOMITEM_DATATYPE_MONTH = $00002117;
+  SOMITEM_DATATYPE_MONTHDAY = $00002118;
+  SOMITEM_DATATYPE_NAME = $00002119;
+  SOMITEM_DATATYPE_NCNAME = $0000211A;
+  SOMITEM_DATATYPE_NEGATIVEINTEGER = $0000211B;
+  SOMITEM_DATATYPE_NMTOKEN = $0000211C;
+  SOMITEM_DATATYPE_NMTOKENS = $0000211D;
+  SOMITEM_DATATYPE_NONNEGATIVEINTEGER = $0000211E;
+  SOMITEM_DATATYPE_NONPOSITIVEINTEGER = $0000211F;
+  SOMITEM_DATATYPE_NORMALIZEDSTRING = $00002120;
+  SOMITEM_DATATYPE_NOTATION = $00002121;
+  SOMITEM_DATATYPE_POSITIVEINTEGER = $00002122;
+  SOMITEM_DATATYPE_QNAME = $00002123;
+  SOMITEM_DATATYPE_SHORT = $00002124;
+  SOMITEM_DATATYPE_STRING = $00002125;
+  SOMITEM_DATATYPE_TIME = $00002126;
+  SOMITEM_DATATYPE_TOKEN = $00002127;
+  SOMITEM_DATATYPE_UNSIGNEDBYTE = $00002128;
+  SOMITEM_DATATYPE_UNSIGNEDINT = $00002129;
+  SOMITEM_DATATYPE_UNSIGNEDLONG = $0000212A;
+  SOMITEM_DATATYPE_UNSIGNEDSHORT = $0000212B;
+  SOMITEM_DATATYPE_YEAR = $0000212C;
+  SOMITEM_DATATYPE_YEARMONTH = $0000212D;
+  SOMITEM_DATATYPE_ANYSIMPLETYPE = $000021FF;
+  SOMITEM_SIMPLETYPE = $00002200;
+  SOMITEM_COMPLEXTYPE = $00002400;
+  SOMITEM_PARTICLE = $00004000;
+  SOMITEM_ANY = $00004001;
+  SOMITEM_ANYATTRIBUTE = $00004002;
+  SOMITEM_ELEMENT = $00004003;
+  SOMITEM_GROUP = $00004100;
+  SOMITEM_ALL = $00004101;
+  SOMITEM_CHOICE = $00004102;
+  SOMITEM_SEQUENCE = $00004103;
+  SOMITEM_EMPTYPARTICLE = $00004104;
+  SOMITEM_NULL = $00000800;
+  SOMITEM_NULL_TYPE = $00002800;
+  SOMITEM_NULL_ANY = $00004801;
+  SOMITEM_NULL_ANYATTRIBUTE = $00004802;
+  SOMITEM_NULL_ELEMENT = $00004803;
+
+// Constants for enum _SCHEMADERIVATIONMETHOD
+type
+  _SCHEMADERIVATIONMETHOD = TOleEnum;
+const
+  SCHEMADERIVATIONMETHOD_EMPTY = $00000000;
+  SCHEMADERIVATIONMETHOD_SUBSTITUTION = $00000001;
+  SCHEMADERIVATIONMETHOD_EXTENSION = $00000002;
+  SCHEMADERIVATIONMETHOD_RESTRICTION = $00000004;
+  SCHEMADERIVATIONMETHOD_LIST = $00000008;
+  SCHEMADERIVATIONMETHOD_UNION = $00000010;
+  SCHEMADERIVATIONMETHOD_ALL = $000000FF;
+  SCHEMADERIVATIONMETHOD_NONE = $00000100;
+
+// Constants for enum _SCHEMATYPEVARIETY
+type
+  _SCHEMATYPEVARIETY = TOleEnum;
+const
+  SCHEMATYPEVARIETY_NONE = $FFFFFFFF;
+  SCHEMATYPEVARIETY_ATOMIC = $00000000;
+  SCHEMATYPEVARIETY_LIST = $00000001;
+  SCHEMATYPEVARIETY_UNION = $00000002;
+
+// Constants for enum _SCHEMAWHITESPACE
+type
+  _SCHEMAWHITESPACE = TOleEnum;
+const
+  SCHEMAWHITESPACE_NONE = $FFFFFFFF;
+  SCHEMAWHITESPACE_PRESERVE = $00000000;
+  SCHEMAWHITESPACE_REPLACE = $00000001;
+  SCHEMAWHITESPACE_COLLAPSE = $00000002;
+
+// Constants for enum _SCHEMAPROCESSCONTENTS
+type
+  _SCHEMAPROCESSCONTENTS = TOleEnum;
+const
+  SCHEMAPROCESSCONTENTS_NONE = $00000000;
+  SCHEMAPROCESSCONTENTS_SKIP = $00000001;
+  SCHEMAPROCESSCONTENTS_LAX = $00000002;
+  SCHEMAPROCESSCONTENTS_STRICT = $00000003;
+
+// Constants for enum _SCHEMACONTENTTYPE
+type
+  _SCHEMACONTENTTYPE = TOleEnum;
+const
+  SCHEMACONTENTTYPE_EMPTY = $00000000;
+  SCHEMACONTENTTYPE_TEXTONLY = $00000001;
+  SCHEMACONTENTTYPE_ELEMENTONLY = $00000002;
+  SCHEMACONTENTTYPE_MIXED = $00000003;
+
+// Constants for enum _SCHEMAUSE
+type
+  _SCHEMAUSE = TOleEnum;
+const
+  SCHEMAUSE_OPTIONAL = $00000000;
+  SCHEMAUSE_PROHIBITED = $00000001;
+  SCHEMAUSE_REQUIRED = $00000002;
+
+// Constants for enum tagXMLEMEM_TYPE
+type
+  tagXMLEMEM_TYPE = TOleEnum;
+const
+  XMLELEMTYPE_ELEMENT = $00000000;
+  XMLELEMTYPE_TEXT = $00000001;
+  XMLELEMTYPE_COMMENT = $00000002;
+  XMLELEMTYPE_DOCUMENT = $00000003;
+  XMLELEMTYPE_DTD = $00000004;
+  XMLELEMTYPE_PI = $00000005;
+  XMLELEMTYPE_OTHER = $00000006;
+
+// Constants for enum _SERVERXMLHTTP_OPTION
+type
+  _SERVERXMLHTTP_OPTION = TOleEnum;
+const
+  SXH_OPTION_URL = $FFFFFFFF;
+  SXH_OPTION_URL_CODEPAGE = $00000000;
+  SXH_OPTION_ESCAPE_PERCENT_IN_URL = $00000001;
+  SXH_OPTION_IGNORE_SERVER_SSL_CERT_ERROR_FLAGS = $00000002;
+  SXH_OPTION_SELECT_CLIENT_SSL_CERT = $00000003;
+
+// Constants for enum _SXH_SERVER_CERT_OPTION
+type
+  _SXH_SERVER_CERT_OPTION = TOleEnum;
+const
+  SXH_SERVER_CERT_IGNORE_UNKNOWN_CA = $00000100;
+  SXH_SERVER_CERT_IGNORE_WRONG_USAGE = $00000200;
+  SXH_SERVER_CERT_IGNORE_CERT_CN_INVALID = $00001000;
+  SXH_SERVER_CERT_IGNORE_CERT_DATE_INVALID = $00002000;
+  SXH_SERVER_CERT_IGNORE_ALL_SERVER_ERRORS = $00003300;
+
+// Constants for enum _SXH_PROXY_SETTING
+type
+  _SXH_PROXY_SETTING = TOleEnum;
+const
+  SXH_PROXY_SET_DEFAULT = $00000000;
+  SXH_PROXY_SET_PRECONFIG = $00000000;
+  SXH_PROXY_SET_DIRECT = $00000001;
+  SXH_PROXY_SET_PROXY = $00000002;
+
+type
+
+// *********************************************************************//
+// Forward declaration of types defined in TypeLibrary                    
+// *********************************************************************//
+  IXMLDOMImplementation = interface;
+  IXMLDOMNode = interface;
+  IXMLDOMNodeList = interface;
+  IXMLDOMNamedNodeMap = interface;
+  IXMLDOMDocument = interface;
+  IXMLDOMDocumentType = interface;
+  IXMLDOMElement = interface;
+  IXMLDOMAttribute = interface;
+  IXMLDOMDocumentFragment = interface;
+  IXMLDOMCharacterData = interface;
+  IXMLDOMText = interface;
+  IXMLDOMComment = interface;
+  IXMLDOMCDATASection = interface;
+  IXMLDOMProcessingInstruction = interface;
+  IXMLDOMEntityReference = interface;
+  IXMLDOMParseError = interface;
+  IXMLDOMDocument2 = interface;
+  IXMLDOMSchemaCollection = interface;
+  IXMLDOMNotation = interface;
+  IXMLDOMEntity = interface;
+  IXTLRuntime = interface;
+  IXSLTemplate = interface;
+  IXSLProcessor = interface;
+  ISAXXMLReader = interface;
+  ISAXEntityResolver = interface;
+  ISAXContentHandler = interface;
+  ISAXLocator = interface;
+  ISAXAttributes = interface;
+  ISAXDTDHandler = interface;
+  ISAXErrorHandler = interface;
+  ISAXXMLFilter = interface;
+  ISAXLexicalHandler = interface;
+  ISAXDeclHandler = interface;
+  IVBSAXXMLReader = interface;
+  IVBSAXEntityResolver = interface;
+  IVBSAXContentHandler = interface;
+  IVBSAXLocator = interface;
+  IVBSAXAttributes = interface;
+  IVBSAXDTDHandler = interface;
+  IVBSAXErrorHandler = interface;
+  IVBSAXXMLFilter = interface;
+  IVBSAXLexicalHandler = interface;
+  IVBSAXDeclHandler = interface;
+  IMXWriter = interface;
+  IMXAttributes = interface;
+  IMXReaderControl = interface;
+  IMXSchemaDeclHandler = interface;
+  ISchemaItem = interface;
+  ISchemaParticle = interface;
+  ISchemaElement = interface;
+  ISchema = interface;
+  ISchemaItemCollection = interface;
+  ISchemaStringCollection = interface;
+  ISchemaType = interface;
+  ISchemaComplexType = interface;
+  ISchemaAny = interface;
+  ISchemaModelGroup = interface;
+  IXMLDOMSchemaCollection2 = interface;
+  ISchemaAttribute = interface;
+  ISchemaAttributeGroup = interface;
+  ISchemaIdentityConstraint = interface;
+  ISchemaNotation = interface;
+  IXMLElementCollection = interface;
+  IXMLDocument = interface;
+  IXMLElement = interface;
+  IXMLDocument2 = interface;
+  IXMLElement2 = interface;
+  IXMLAttribute = interface;
+  IXMLError = interface;
+  IXMLDOMSelection = interface;
+  IDSOControl = interface;
+  IXMLHTTPRequest = interface;
+  IServerXMLHTTPRequest = interface;
+  IServerXMLHTTPRequest2 = interface;
+  IMXNamespacePrefixes = interface;
+  IVBMXNamespaceManager = interface;
+  IMXNamespaceManager = interface;
+
+// *********************************************************************//
+// Declaration of CoClasses defined in Type Library                       
+// (NOTE: Here we map each CoClass to its Default Interface)              
+// *********************************************************************//
+  DOMDocument = IXMLDOMDocument2;
+  DOMDocument26 = IXMLDOMDocument2;
+  DOMDocument30 = IXMLDOMDocument2;
+  DOMDocument40 = IXMLDOMDocument2;
+  FreeThreadedDOMDocument = IXMLDOMDocument2;
+  FreeThreadedDOMDocument26 = IXMLDOMDocument2;
+  FreeThreadedDOMDocument30 = IXMLDOMDocument2;
+  FreeThreadedDOMDocument40 = IXMLDOMDocument2;
+  XMLSchemaCache = IXMLDOMSchemaCollection;
+  XMLSchemaCache26 = IXMLDOMSchemaCollection;
+  XMLSchemaCache30 = IXMLDOMSchemaCollection;
+  XMLSchemaCache40 = IXMLDOMSchemaCollection2;
+  XSLTemplate = IXSLTemplate;
+  XSLTemplate26 = IXSLTemplate;
+  XSLTemplate30 = IXSLTemplate;
+  XSLTemplate40 = IXSLTemplate;
+  DSOControl = IDSOControl;
+  DSOControl26 = IDSOControl;
+  DSOControl30 = IDSOControl;
+  DSOControl40 = IDSOControl;
+  XMLHTTP = IXMLHTTPRequest;
+  XMLHTTP26 = IXMLHTTPRequest;
+  XMLHTTP30 = IXMLHTTPRequest;
+  XMLHTTP40 = IXMLHTTPRequest;
+  ServerXMLHTTP = IServerXMLHTTPRequest2;
+  ServerXMLHTTP30 = IServerXMLHTTPRequest2;
+  ServerXMLHTTP40 = IServerXMLHTTPRequest2;
+  SAXXMLReader = IVBSAXXMLReader;
+  SAXXMLReader30 = IVBSAXXMLReader;
+  SAXXMLReader40 = IVBSAXXMLReader;
+  MXXMLWriter = IMXWriter;
+  MXXMLWriter30 = IMXWriter;
+  MXXMLWriter40 = IMXWriter;
+  MXHTMLWriter = IMXWriter;
+  MXHTMLWriter30 = IMXWriter;
+  MXHTMLWriter40 = IMXWriter;
+  SAXAttributes = IMXAttributes;
+  SAXAttributes30 = IMXAttributes;
+  SAXAttributes40 = IMXAttributes;
+  MXNamespaceManager = IVBMXNamespaceManager;
+  MXNamespaceManager40 = IVBMXNamespaceManager;
+  XMLDocument = IXMLDocument2;
+
+
+// *********************************************************************//
+// Declaration of structures, unions and aliases.                         
+// *********************************************************************//
+  PWord1 = ^Word; {*}
+  PUserType1 = ^_xml_error; {*}
+
+  DOMNodeType = tagDOMNodeType; 
+  SOMITEMTYPE = _SOMITEMTYPE; 
+  SCHEMADERIVATIONMETHOD = _SCHEMADERIVATIONMETHOD; 
+  SCHEMATYPEVARIETY = _SCHEMATYPEVARIETY; 
+  SCHEMAWHITESPACE = _SCHEMAWHITESPACE; 
+  SCHEMAPROCESSCONTENTS = _SCHEMAPROCESSCONTENTS; 
+  SCHEMACONTENTTYPE = _SCHEMACONTENTTYPE; 
+  SCHEMAUSE = _SCHEMAUSE; 
+
+  _xml_error = packed record
+    _nLine: SYSUINT;
+    _pchBuf: WideString;
+    _cchBuf: SYSUINT;
+    _ich: SYSUINT;
+    _pszFound: WideString;
+    _pszExpected: WideString;
+    _reserved1: LongWord;
+    _reserved2: LongWord;
+  end;
+
+  XMLELEM_TYPE = tagXMLEMEM_TYPE; 
+  SERVERXMLHTTP_OPTION = _SERVERXMLHTTP_OPTION; 
+  SXH_SERVER_CERT_OPTION = _SXH_SERVER_CERT_OPTION; 
+  SXH_PROXY_SETTING = _SXH_PROXY_SETTING; 
+
+// *********************************************************************//
+// Interface: IXMLDOMImplementation
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {2933BF8F-7B36-11D2-B20E-00C04F983E60}
+// *********************************************************************//
+  IXMLDOMImplementation = interface(IDispatch)
+    ['{2933BF8F-7B36-11D2-B20E-00C04F983E60}']
+    function hasFeature(const feature: WideString; const version: WideString): WordBool; safecall;
+  end;
+
+// *********************************************************************//
+// Interface: IXMLDOMNode
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {2933BF80-7B36-11D2-B20E-00C04F983E60}
+// *********************************************************************//
+  IXMLDOMNode = interface(IDispatch)
+    ['{2933BF80-7B36-11D2-B20E-00C04F983E60}']
+    function Get_nodeName: WideString; safecall;
+    function Get_nodeValue: OleVariant; safecall;
+    procedure Set_nodeValue(value: OleVariant); safecall;
+    function Get_nodeType: DOMNodeType; safecall;
+    function Get_parentNode: IXMLDOMNode; safecall;
+    function Get_childNodes: IXMLDOMNodeList; safecall;
+    function Get_firstChild: IXMLDOMNode; safecall;
+    function Get_lastChild: IXMLDOMNode; safecall;
+    function Get_previousSibling: IXMLDOMNode; safecall;
+    function Get_nextSibling: IXMLDOMNode; safecall;
+    function Get_attributes: IXMLDOMNamedNodeMap; safecall;
+    function insertBefore(const newChild: IXMLDOMNode; refChild: OleVariant): IXMLDOMNode; safecall;
+    function replaceChild(const newChild: IXMLDOMNode; const oldChild: IXMLDOMNode): IXMLDOMNode; safecall;
+    function removeChild(const childNode: IXMLDOMNode): IXMLDOMNode; safecall;
+    function appendChild(const newChild: IXMLDOMNode): IXMLDOMNode; safecall;
+    function hasChildNodes: WordBool; safecall;
+    function Get_ownerDocument: IXMLDOMDocument; safecall;
+    function cloneNode(deep: WordBool): IXMLDOMNode; safecall;
+    function Get_nodeTypeString: WideString; safecall;
+    function Get_text: WideString; safecall;
+    procedure Set_text(const text: WideString); safecall;
+    function Get_specified: WordBool; safecall;
+    function Get_definition: IXMLDOMNode; safecall;
+    function Get_nodeTypedValue: OleVariant; safecall;
+    procedure Set_nodeTypedValue(typedValue: OleVariant); safecall;
+    function Get_dataType: OleVariant; safecall;
+    procedure Set_dataType(const dataTypeName: WideString); safecall;
+    function Get_xml: WideString; safecall;
+    function transformNode(const stylesheet: IXMLDOMNode): WideString; safecall;
+    function selectNodes(const queryString: WideString): IXMLDOMNodeList; safecall;
+    function selectSingleNode(const queryString: WideString): IXMLDOMNode; safecall;
+    function Get_parsed: WordBool; safecall;
+    function Get_namespaceURI: WideString; safecall;
+    function Get_prefix: WideString; safecall;
+    function Get_baseName: WideString; safecall;
+    procedure transformNodeToObject(const stylesheet: IXMLDOMNode; outputObject: OleVariant); safecall;
+    property nodeName: WideString read Get_nodeName;
+    property nodeValue: OleVariant read Get_nodeValue write Set_nodeValue;
+    property nodeType: DOMNodeType read Get_nodeType;
+    property parentNode: IXMLDOMNode read Get_parentNode;
+    property childNodes: IXMLDOMNodeList read Get_childNodes;
+    property firstChild: IXMLDOMNode read Get_firstChild;
+    property lastChild: IXMLDOMNode read Get_lastChild;
+    property previousSibling: IXMLDOMNode read Get_previousSibling;
+    property nextSibling: IXMLDOMNode read Get_nextSibling;
+    property attributes: IXMLDOMNamedNodeMap read Get_attributes;
+    property ownerDocument: IXMLDOMDocument read Get_ownerDocument;
+    property nodeTypeString: WideString read Get_nodeTypeString;
+    property text: WideString read Get_text write Set_text;
+    property specified: WordBool read Get_specified;
+    property definition: IXMLDOMNode read Get_definition;
+    property nodeTypedValue: OleVariant read Get_nodeTypedValue write Set_nodeTypedValue;
+    property xml: WideString read Get_xml;
+    property parsed: WordBool read Get_parsed;
+    property namespaceURI: WideString read Get_namespaceURI;
+    property prefix: WideString read Get_prefix;
+    property baseName: WideString read Get_baseName;
+  end;
+
+// *********************************************************************//
+// Interface: IXMLDOMNodeList
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {2933BF82-7B36-11D2-B20E-00C04F983E60}
+// *********************************************************************//
+  IXMLDOMNodeList = interface(IDispatch)
+    ['{2933BF82-7B36-11D2-B20E-00C04F983E60}']
+    function Get_item(index: Integer): IXMLDOMNode; safecall;
+    function Get_length: Integer; safecall;
+    function nextNode: IXMLDOMNode; safecall;
+    procedure reset; safecall;
+    function Get__newEnum: IUnknown; safecall;
+    property item[index: Integer]: IXMLDOMNode read Get_item; default;
+    property length: Integer read Get_length;
+    property _newEnum: IUnknown read Get__newEnum;
+  end;
+
+// *********************************************************************//
+// Interface: IXMLDOMNamedNodeMap
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {2933BF83-7B36-11D2-B20E-00C04F983E60}
+// *********************************************************************//
+  IXMLDOMNamedNodeMap = interface(IDispatch)
+    ['{2933BF83-7B36-11D2-B20E-00C04F983E60}']
+    function getNamedItem(const name: WideString): IXMLDOMNode; safecall;
+    function setNamedItem(const newItem: IXMLDOMNode): IXMLDOMNode; safecall;
+    function removeNamedItem(const name: WideString): IXMLDOMNode; safecall;
+    function Get_item(index: Integer): IXMLDOMNode; safecall;
+    function Get_length: Integer; safecall;
+    function getQualifiedItem(const baseName: WideString; const namespaceURI: WideString): IXMLDOMNode; safecall;
+    function removeQualifiedItem(const baseName: WideString; const namespaceURI: WideString): IXMLDOMNode; safecall;
+    function nextNode: IXMLDOMNode; safecall;
+    procedure reset; safecall;
+    function Get__newEnum: IUnknown; safecall;
+    property item[index: Integer]: IXMLDOMNode read Get_item; default;
+    property length: Integer read Get_length;
+    property _newEnum: IUnknown read Get__newEnum;
+  end;
+
+// *********************************************************************//
+// Interface: IXMLDOMDocument
+// Flags:     (4560) Hidden Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {2933BF81-7B36-11D2-B20E-00C04F983E60}
+// *********************************************************************//
+  IXMLDOMDocument = interface(IXMLDOMNode)
+    ['{2933BF81-7B36-11D2-B20E-00C04F983E60}']
+    function Get_doctype: IXMLDOMDocumentType; safecall;
+    function Get_implementation_: IXMLDOMImplementation; safecall;
+    function Get_documentElement: IXMLDOMElement; safecall;
+    procedure _Set_documentElement(const DOMElement: IXMLDOMElement); safecall;
+    function createElement(const tagName: WideString): IXMLDOMElement; safecall;
+    function createDocumentFragment: IXMLDOMDocumentFragment; safecall;
+    function createTextNode(const data: WideString): IXMLDOMText; safecall;
+    function createComment(const data: WideString): IXMLDOMComment; safecall;
+    function createCDATASection(const data: WideString): IXMLDOMCDATASection; safecall;
+    function createProcessingInstruction(const target: WideString; const data: WideString): IXMLDOMProcessingInstruction; safecall;
+    function createAttribute(const name: WideString): IXMLDOMAttribute; safecall;
+    function createEntityReference(const name: WideString): IXMLDOMEntityReference; safecall;
+    function getElementsByTagName(const tagName: WideString): IXMLDOMNodeList; safecall;
+    function createNode(type_: OleVariant; const name: WideString; const namespaceURI: WideString): IXMLDOMNode; safecall;
+    function nodeFromID(const idString: WideString): IXMLDOMNode; safecall;
+    function load(xmlSource: OleVariant): WordBool; safecall;
+    function Get_readyState: Integer; safecall;
+    function Get_parseError: IXMLDOMParseError; safecall;
+    function Get_url: WideString; safecall;
+    function Get_async: WordBool; safecall;
+    procedure Set_async(isAsync: WordBool); safecall;
+    procedure abort; safecall;
+    function loadXML(const bstrXML: WideString): WordBool; safecall;
+    procedure save(destination: OleVariant); safecall;
+    function Get_validateOnParse: WordBool; safecall;
+    procedure Set_validateOnParse(isValidating: WordBool); safecall;
+    function Get_resolveExternals: WordBool; safecall;
+    procedure Set_resolveExternals(isResolving: WordBool); safecall;
+    function Get_preserveWhiteSpace: WordBool; safecall;
+    procedure Set_preserveWhiteSpace(isPreserving: WordBool); safecall;
+    procedure Set_onreadystatechange(Param1: OleVariant); safecall;
+    procedure Set_ondataavailable(Param1: OleVariant); safecall;
+    procedure Set_ontransformnode(Param1: OleVariant); safecall;
+    property doctype: IXMLDOMDocumentType read Get_doctype;
+    property implementation_: IXMLDOMImplementation read Get_implementation_;
+    property documentElement: IXMLDOMElement read Get_documentElement write _Set_documentElement;
+    property readyState: Integer read Get_readyState;
+    property parseError: IXMLDOMParseError read Get_parseError;
+    property url: WideString read Get_url;
+    property async: WordBool read Get_async write Set_async;
+    property validateOnParse: WordBool read Get_validateOnParse write Set_validateOnParse;
+    property resolveExternals: WordBool read Get_resolveExternals write Set_resolveExternals;
+    property preserveWhiteSpace: WordBool read Get_preserveWhiteSpace write Set_preserveWhiteSpace;
+    property onreadystatechange: OleVariant write Set_onreadystatechange;
+    property ondataavailable: OleVariant write Set_ondataavailable;
+    property ontransformnode: OleVariant write Set_ontransformnode;
+  end;
+
+// *********************************************************************//
+// Interface: IXMLDOMDocumentType
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {2933BF8B-7B36-11D2-B20E-00C04F983E60}
+// *********************************************************************//
+  IXMLDOMDocumentType = interface(IXMLDOMNode)
+    ['{2933BF8B-7B36-11D2-B20E-00C04F983E60}']
+    function Get_name: WideString; safecall;
+    function Get_entities: IXMLDOMNamedNodeMap; safecall;
+    function Get_notations: IXMLDOMNamedNodeMap; safecall;
+    property name: WideString read Get_name;
+    property entities: IXMLDOMNamedNodeMap read Get_entities;
+    property notations: IXMLDOMNamedNodeMap read Get_notations;
+  end;
+
+// *********************************************************************//
+// Interface: IXMLDOMElement
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {2933BF86-7B36-11D2-B20E-00C04F983E60}
+// *********************************************************************//
+  IXMLDOMElement = interface(IXMLDOMNode)
+    ['{2933BF86-7B36-11D2-B20E-00C04F983E60}']
+    function Get_tagName: WideString; safecall;
+    function getAttribute(const name: WideString): OleVariant; safecall;
+    procedure setAttribute(const name: WideString; value: OleVariant); safecall;
+    procedure removeAttribute(const name: WideString); safecall;
+    function getAttributeNode(const name: WideString): IXMLDOMAttribute; safecall;
+    function setAttributeNode(const DOMAttribute: IXMLDOMAttribute): IXMLDOMAttribute; safecall;
+    function removeAttributeNode(const DOMAttribute: IXMLDOMAttribute): IXMLDOMAttribute; safecall;
+    function getElementsByTagName(const tagName: WideString): IXMLDOMNodeList; safecall;
+    procedure normalize; safecall;
+    property tagName: WideString read Get_tagName;
+  end;
+
+// *********************************************************************//
+// Interface: IXMLDOMAttribute
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {2933BF85-7B36-11D2-B20E-00C04F983E60}
+// *********************************************************************//
+  IXMLDOMAttribute = interface(IXMLDOMNode)
+    ['{2933BF85-7B36-11D2-B20E-00C04F983E60}']
+    function Get_name: WideString; safecall;
+    function Get_value: OleVariant; safecall;
+    procedure Set_value(attributeValue: OleVariant); safecall;
+    property name: WideString read Get_name;
+    property value: OleVariant read Get_value write Set_value;
+  end;
+
+// *********************************************************************//
+// Interface: IXMLDOMDocumentFragment
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {3EFAA413-272F-11D2-836F-0000F87A7782}
+// *********************************************************************//
+  IXMLDOMDocumentFragment = interface(IXMLDOMNode)
+    ['{3EFAA413-272F-11D2-836F-0000F87A7782}']
+  end;
+
+// *********************************************************************//
+// Interface: IXMLDOMCharacterData
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {2933BF84-7B36-11D2-B20E-00C04F983E60}
+// *********************************************************************//
+  IXMLDOMCharacterData = interface(IXMLDOMNode)
+    ['{2933BF84-7B36-11D2-B20E-00C04F983E60}']
+    function Get_data: WideString; safecall;
+    procedure Set_data(const data: WideString); safecall;
+    function Get_length: Integer; safecall;
+    function substringData(offset: Integer; count: Integer): WideString; safecall;
+    procedure appendData(const data: WideString); safecall;
+    procedure insertData(offset: Integer; const data: WideString); safecall;
+    procedure deleteData(offset: Integer; count: Integer); safecall;
+    procedure replaceData(offset: Integer; count: Integer; const data: WideString); safecall;
+    property data: WideString read Get_data write Set_data;
+    property length: Integer read Get_length;
+  end;
+
+// *********************************************************************//
+// Interface: IXMLDOMText
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {2933BF87-7B36-11D2-B20E-00C04F983E60}
+// *********************************************************************//
+  IXMLDOMText = interface(IXMLDOMCharacterData)
+    ['{2933BF87-7B36-11D2-B20E-00C04F983E60}']
+    procedure GhostMethod_IXMLDOMText_0_1; safecall;
+    procedure GhostMethod_IXMLDOMText_4_2; safecall;
+    procedure GhostMethod_IXMLDOMText_8_3; safecall;
+    procedure GhostMethod_IXMLDOMText_12_4; safecall;
+    procedure GhostMethod_IXMLDOMText_16_5; safecall;
+    procedure GhostMethod_IXMLDOMText_20_6; safecall;
+    procedure GhostMethod_IXMLDOMText_24_7; safecall;
+    procedure GhostMethod_IXMLDOMText_28_8; safecall;
+    procedure GhostMethod_IXMLDOMText_32_9; safecall;
+    procedure GhostMethod_IXMLDOMText_36_10; safecall;
+    procedure GhostMethod_IXMLDOMText_40_11; safecall;
+    procedure GhostMethod_IXMLDOMText_44_12; safecall;
+    procedure GhostMethod_IXMLDOMText_48_13; safecall;
+    procedure GhostMethod_IXMLDOMText_52_14; safecall;
+    procedure GhostMethod_IXMLDOMText_56_15; safecall;
+    procedure GhostMethod_IXMLDOMText_60_16; safecall;
+    procedure GhostMethod_IXMLDOMText_64_17; safecall;
+    procedure GhostMethod_IXMLDOMText_68_18; safecall;
+    procedure GhostMethod_IXMLDOMText_72_19; safecall;
+    procedure GhostMethod_IXMLDOMText_76_20; safecall;
+    procedure GhostMethod_IXMLDOMText_80_21; safecall;
+    procedure GhostMethod_IXMLDOMText_84_22; safecall;
+    procedure GhostMethod_IXMLDOMText_88_23; safecall;
+    procedure GhostMethod_IXMLDOMText_92_24; safecall;
+    procedure GhostMethod_IXMLDOMText_96_25; safecall;
+    procedure GhostMethod_IXMLDOMText_100_26; safecall;
+    procedure GhostMethod_IXMLDOMText_104_27; safecall;
+    procedure GhostMethod_IXMLDOMText_108_28; safecall;
+    procedure GhostMethod_IXMLDOMText_112_29; safecall;
+    procedure GhostMethod_IXMLDOMText_116_30; safecall;
+    procedure GhostMethod_IXMLDOMText_120_31; safecall;
+    procedure GhostMethod_IXMLDOMText_124_32; safecall;
+    procedure GhostMethod_IXMLDOMText_128_33; safecall;
+    procedure GhostMethod_IXMLDOMText_132_34; safecall;
+    procedure GhostMethod_IXMLDOMText_136_35; safecall;
+    procedure GhostMethod_IXMLDOMText_140_36; safecall;
+    procedure GhostMethod_IXMLDOMText_144_37; safecall;
+    procedure GhostMethod_IXMLDOMText_148_38; safecall;
+    procedure GhostMethod_IXMLDOMText_152_39; safecall;
+    procedure GhostMethod_IXMLDOMText_156_40; safecall;
+    procedure GhostMethod_IXMLDOMText_160_41; safecall;
+    procedure GhostMethod_IXMLDOMText_164_42; safecall;
+    procedure GhostMethod_IXMLDOMText_168_43; safecall;
+    procedure GhostMethod_IXMLDOMText_172_44; safecall;
+    procedure GhostMethod_IXMLDOMText_176_45; safecall;
+    procedure GhostMethod_IXMLDOMText_180_46; safecall;
+    procedure GhostMethod_IXMLDOMText_184_47; safecall;
+    procedure GhostMethod_IXMLDOMText_188_48; safecall;
+    procedure GhostMethod_IXMLDOMText_192_49; safecall;
+    procedure GhostMethod_IXMLDOMText_196_50; safecall;
+    procedure GhostMethod_IXMLDOMText_200_51; safecall;
+    function splitText(offset: Integer): IXMLDOMText; safecall;
+  end;
+
+// *********************************************************************//
+// Interface: IXMLDOMComment
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {2933BF88-7B36-11D2-B20E-00C04F983E60}
+// *********************************************************************//
+  IXMLDOMComment = interface(IXMLDOMCharacterData)
+    ['{2933BF88-7B36-11D2-B20E-00C04F983E60}']
+  end;
+
+// *********************************************************************//
+// Interface: IXMLDOMCDATASection
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {2933BF8A-7B36-11D2-B20E-00C04F983E60}
+// *********************************************************************//
+  IXMLDOMCDATASection = interface(IXMLDOMText)
+    ['{2933BF8A-7B36-11D2-B20E-00C04F983E60}']
+  end;
+
+// *********************************************************************//
+// Interface: IXMLDOMProcessingInstruction
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {2933BF89-7B36-11D2-B20E-00C04F983E60}
+// *********************************************************************//
+  IXMLDOMProcessingInstruction = interface(IXMLDOMNode)
+    ['{2933BF89-7B36-11D2-B20E-00C04F983E60}']
+    function Get_target: WideString; safecall;
+    function Get_data: WideString; safecall;
+    procedure Set_data(const value: WideString); safecall;
+    property target: WideString read Get_target;
+    property data: WideString read Get_data write Set_data;
+  end;
+
+// *********************************************************************//
+// Interface: IXMLDOMEntityReference
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {2933BF8E-7B36-11D2-B20E-00C04F983E60}
+// *********************************************************************//
+  IXMLDOMEntityReference = interface(IXMLDOMNode)
+    ['{2933BF8E-7B36-11D2-B20E-00C04F983E60}']
+  end;
+
+// *********************************************************************//
+// Interface: IXMLDOMParseError
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {3EFAA426-272F-11D2-836F-0000F87A7782}
+// *********************************************************************//
+  IXMLDOMParseError = interface(IDispatch)
+    ['{3EFAA426-272F-11D2-836F-0000F87A7782}']
+    function Get_errorCode: Integer; safecall;
+    function Get_url: WideString; safecall;
+    function Get_reason: WideString; safecall;
+    function Get_srcText: WideString; safecall;
+    function Get_line: Integer; safecall;
+    function Get_linepos: Integer; safecall;
+    function Get_filepos: Integer; safecall;
+    property errorCode: Integer read Get_errorCode;
+    property url: WideString read Get_url;
+    property reason: WideString read Get_reason;
+    property srcText: WideString read Get_srcText;
+    property line: Integer read Get_line;
+    property linepos: Integer read Get_linepos;
+    property filepos: Integer read Get_filepos;
+  end;
+
+// *********************************************************************//
+// Interface: IXMLDOMDocument2
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {2933BF95-7B36-11D2-B20E-00C04F983E60}
+// *********************************************************************//
+  IXMLDOMDocument2 = interface(IXMLDOMDocument)
+    ['{2933BF95-7B36-11D2-B20E-00C04F983E60}']
+    function Get_namespaces: IXMLDOMSchemaCollection; safecall;
+    function Get_schemas: OleVariant; safecall;
+    procedure _Set_schemas(otherCollection: OleVariant); safecall;
+    function validate: IXMLDOMParseError; safecall;
+    procedure setProperty(const name: WideString; value: OleVariant); safecall;
+    function getProperty(const name: WideString): OleVariant; safecall;
+    property namespaces: IXMLDOMSchemaCollection read Get_namespaces;
+    property schemas: OleVariant read Get_schemas write _Set_schemas;
+  end;
+
+// *********************************************************************//
+// Interface: IXMLDOMSchemaCollection
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {373984C8-B845-449B-91E7-45AC83036ADE}
+// *********************************************************************//
+  IXMLDOMSchemaCollection = interface(IDispatch)
+    ['{373984C8-B845-449B-91E7-45AC83036ADE}']
+    procedure add(const namespaceURI: WideString; var_: OleVariant); safecall;
+    function get(const namespaceURI: WideString): IXMLDOMNode; safecall;
+    procedure remove(const namespaceURI: WideString); safecall;
+    function Get_length: Integer; safecall;
+    function Get_namespaceURI(index: Integer): WideString; safecall;
+    procedure addCollection(const otherCollection: IXMLDOMSchemaCollection); safecall;
+    function Get__newEnum: IUnknown; safecall;
+    property length: Integer read Get_length;
+    property namespaceURI[index: Integer]: WideString read Get_namespaceURI; default;
+    property _newEnum: IUnknown read Get__newEnum;
+  end;
+
+// *********************************************************************//
+// Interface: IXMLDOMNotation
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {2933BF8C-7B36-11D2-B20E-00C04F983E60}
+// *********************************************************************//
+  IXMLDOMNotation = interface(IXMLDOMNode)
+    ['{2933BF8C-7B36-11D2-B20E-00C04F983E60}']
+    function Get_publicId: OleVariant; safecall;
+    function Get_systemId: OleVariant; safecall;
+    property publicId: OleVariant read Get_publicId;
+    property systemId: OleVariant read Get_systemId;
+  end;
+
+// *********************************************************************//
+// Interface: IXMLDOMEntity
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {2933BF8D-7B36-11D2-B20E-00C04F983E60}
+// *********************************************************************//
+  IXMLDOMEntity = interface(IXMLDOMNode)
+    ['{2933BF8D-7B36-11D2-B20E-00C04F983E60}']
+    function Get_publicId: OleVariant; safecall;
+    function Get_systemId: OleVariant; safecall;
+    function Get_notationName: WideString; safecall;
+    property publicId: OleVariant read Get_publicId;
+    property systemId: OleVariant read Get_systemId;
+    property notationName: WideString read Get_notationName;
+  end;
+
+// *********************************************************************//
+// Interface: IXTLRuntime
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {3EFAA425-272F-11D2-836F-0000F87A7782}
+// *********************************************************************//
+  IXTLRuntime = interface(IXMLDOMNode)
+    ['{3EFAA425-272F-11D2-836F-0000F87A7782}']
+    function uniqueID(const pNode: IXMLDOMNode): Integer; safecall;
+    function depth(const pNode: IXMLDOMNode): Integer; safecall;
+    function childNumber(const pNode: IXMLDOMNode): Integer; safecall;
+    function ancestorChildNumber(const bstrNodeName: WideString; const pNode: IXMLDOMNode): Integer; safecall;
+    function absoluteChildNumber(const pNode: IXMLDOMNode): Integer; safecall;
+    function formatIndex(lIndex: Integer; const bstrFormat: WideString): WideString; safecall;
+    function formatNumber(dblNumber: Double; const bstrFormat: WideString): WideString; safecall;
+    function formatDate(varDate: OleVariant; const bstrFormat: WideString; varDestLocale: OleVariant): WideString; safecall;
+    function formatTime(varTime: OleVariant; const bstrFormat: WideString; varDestLocale: OleVariant): WideString; safecall;
+  end;
+
+// *********************************************************************//
+// Interface: IXSLTemplate
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {2933BF93-7B36-11D2-B20E-00C04F983E60}
+// *********************************************************************//
+  IXSLTemplate = interface(IDispatch)
+    ['{2933BF93-7B36-11D2-B20E-00C04F983E60}']
+    procedure _Set_stylesheet(const stylesheet: IXMLDOMNode); safecall;
+    function Get_stylesheet: IXMLDOMNode; safecall;
+    function createProcessor: IXSLProcessor; safecall;
+    property stylesheet: IXMLDOMNode read Get_stylesheet write _Set_stylesheet;
+  end;
+
+// *********************************************************************//
+// Interface: IXSLProcessor
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {2933BF92-7B36-11D2-B20E-00C04F983E60}
+// *********************************************************************//
+  IXSLProcessor = interface(IDispatch)
+    ['{2933BF92-7B36-11D2-B20E-00C04F983E60}']
+    procedure Set_input(pVar: OleVariant); safecall;
+    function Get_input: OleVariant; safecall;
+    function Get_ownerTemplate: IXSLTemplate; safecall;
+    procedure setStartMode(const mode: WideString; const namespaceURI: WideString); safecall;
+    function Get_startMode: WideString; safecall;
+    function Get_startModeURI: WideString; safecall;
+    procedure Set_output(pOutput: OleVariant); safecall;
+    function Get_output: OleVariant; safecall;
+    function transform: WordBool; safecall;
+    procedure reset; safecall;
+    function Get_readyState: Integer; safecall;
+    procedure addParameter(const baseName: WideString; parameter: OleVariant;
+                           const namespaceURI: WideString); safecall;
+    procedure addObject(const obj: IDispatch; const namespaceURI: WideString); safecall;
+    function Get_stylesheet: IXMLDOMNode; safecall;
+    property input: OleVariant read Get_input write Set_input;
+    property ownerTemplate: IXSLTemplate read Get_ownerTemplate;
+    property startMode: WideString read Get_startMode;
+    property startModeURI: WideString read Get_startModeURI;
+    property output: OleVariant read Get_output write Set_output;
+    property readyState: Integer read Get_readyState;
+    property stylesheet: IXMLDOMNode read Get_stylesheet;
+  end;
+
+// *********************************************************************//
+// Interface: ISAXXMLReader
+// Flags:     (16) Hidden
+// GUID:      {A4F96ED0-F829-476E-81C0-CDC7BD2A0802}
+// *********************************************************************//
+  ISAXXMLReader = interface(IUnknown)
+    ['{A4F96ED0-F829-476E-81C0-CDC7BD2A0802}']
+    function getFeature(var pwchName: Word; out pvfValue: WordBool): HResult; stdcall;
+    function putFeature(var pwchName: Word; vfValue: WordBool): HResult; stdcall;
+    function getProperty(var pwchName: Word; out pvarValue: OleVariant): HResult; stdcall;
+    function putProperty(var pwchName: Word; varValue: OleVariant): HResult; stdcall;
+    function getEntityResolver(out ppResolver: ISAXEntityResolver): HResult; stdcall;
+    function putEntityResolver(const pResolver: ISAXEntityResolver): HResult; stdcall;
+    function getContentHandler(out ppHandler: ISAXContentHandler): HResult; stdcall;
+    function putContentHandler(const pHandler: ISAXContentHandler): HResult; stdcall;
+    function getDTDHandler(out ppHandler: ISAXDTDHandler): HResult; stdcall;
+    function putDTDHandler(const pHandler: ISAXDTDHandler): HResult; stdcall;
+    function getErrorHandler(out ppHandler: ISAXErrorHandler): HResult; stdcall;
+    function putErrorHandler(const pHandler: ISAXErrorHandler): HResult; stdcall;
+    function getBaseURL(out ppwchBaseUrl: PWord1): HResult; stdcall;
+    function putBaseURL(var pwchBaseUrl: Word): HResult; stdcall;
+    function getSecureBaseURL(out ppwchSecureBaseUrl: PWord1): HResult; stdcall;
+    function putSecureBaseURL(var pwchSecureBaseUrl: Word): HResult; stdcall;
+    function parse(varInput: OleVariant): HResult; stdcall;
+    function parseURL(var pwchUrl: Word): HResult; stdcall;
+  end;
+
+// *********************************************************************//
+// Interface: ISAXEntityResolver
+// Flags:     (16) Hidden
+// GUID:      {99BCA7BD-E8C4-4D5F-A0CF-6D907901FF07}
+// *********************************************************************//
+  ISAXEntityResolver = interface(IUnknown)
+    ['{99BCA7BD-E8C4-4D5F-A0CF-6D907901FF07}']
+    function resolveEntity(var pwchPublicId: Word; var pwchSystemId: Word; out pvarInput: OleVariant): HResult; stdcall;
+  end;
+
+// *********************************************************************//
+// Interface: ISAXContentHandler
+// Flags:     (16) Hidden
+// GUID:      {1545CDFA-9E4E-4497-A8A4-2BF7D0112C44}
+// *********************************************************************//
+  ISAXContentHandler = interface(IUnknown)
+    ['{1545CDFA-9E4E-4497-A8A4-2BF7D0112C44}']
+    function putDocumentLocator(const pLocator: ISAXLocator): HResult; stdcall;
+    function startDocument: HResult; stdcall;
+    function endDocument: HResult; stdcall;
+    function startPrefixMapping(var pwchPrefix: Word; cchPrefix: SYSINT; var pwchUri: Word; 
+                                cchUri: SYSINT): HResult; stdcall;
+    function endPrefixMapping(var pwchPrefix: Word; cchPrefix: SYSINT): HResult; stdcall;
+    function startElement(var pwchNamespaceUri: Word; cchNamespaceUri: SYSINT; 
+                          var pwchLocalName: Word; cchLocalName: SYSINT; var pwchQName: Word; 
+                          cchQName: SYSINT; const pAttributes: ISAXAttributes): HResult; stdcall;
+    function endElement(var pwchNamespaceUri: Word; cchNamespaceUri: SYSINT; 
+                        var pwchLocalName: Word; cchLocalName: SYSINT; var pwchQName: Word; 
+                        cchQName: SYSINT): HResult; stdcall;
+    function characters(var pwchChars: Word; cchChars: SYSINT): HResult; stdcall;
+    function ignorableWhitespace(var pwchChars: Word; cchChars: SYSINT): HResult; stdcall;
+    function processingInstruction(var pwchTarget: Word; cchTarget: SYSINT; var pwchData: Word; 
+                                   cchData: SYSINT): HResult; stdcall;
+    function skippedEntity(var pwchName: Word; cchName: SYSINT): HResult; stdcall;
+  end;
+
+// *********************************************************************//
+// Interface: ISAXLocator
+// Flags:     (16) Hidden
+// GUID:      {9B7E472A-0DE4-4640-BFF3-84D38A051C31}
+// *********************************************************************//
+  ISAXLocator = interface(IUnknown)
+    ['{9B7E472A-0DE4-4640-BFF3-84D38A051C31}']
+    function getColumnNumber(out pnColumn: SYSINT): HResult; stdcall;
+    function getLineNumber(out pnLine: SYSINT): HResult; stdcall;
+    function getPublicId(out ppwchPublicId: PWord1): HResult; stdcall;
+    function getSystemId(out ppwchSystemId: PWord1): HResult; stdcall;
+  end;
+
+// *********************************************************************//
+// Interface: ISAXAttributes
+// Flags:     (16) Hidden
+// GUID:      {F078ABE1-45D2-4832-91EA-4466CE2F25C9}
+// *********************************************************************//
+  ISAXAttributes = interface(IUnknown)
+    ['{F078ABE1-45D2-4832-91EA-4466CE2F25C9}']
+    function getLength(out pnLength: SYSINT): HResult; stdcall;
+    function getURI(nIndex: SYSINT; out ppwchUri: PWord1; out pcchUri: SYSINT): HResult; stdcall;
+    function getLocalName(nIndex: SYSINT; out ppwchLocalName: PWord1; out pcchLocalName: SYSINT): HResult; stdcall;
+    function getQName(nIndex: SYSINT; out ppwchQName: PWord1; out pcchQName: SYSINT): HResult; stdcall;
+    function getName(nIndex: SYSINT; out ppwchUri: PWord1; out pcchUri: SYSINT; 
+                     out ppwchLocalName: PWord1; out pcchLocalName: SYSINT; out ppwchQName: PWord1; 
+                     out pcchQName: SYSINT): HResult; stdcall;
+    function getIndexFromName(var pwchUri: Word; cchUri: SYSINT; var pwchLocalName: Word; 
+                              cchLocalName: SYSINT; out pnIndex: SYSINT): HResult; stdcall;
+    function getIndexFromQName(var pwchQName: Word; cchQName: SYSINT; out pnIndex: SYSINT): HResult; stdcall;
+    function getType(nIndex: SYSINT; out ppwchType: PWord1; out pcchType: SYSINT): HResult; stdcall;
+    function getTypeFromName(var pwchUri: Word; cchUri: SYSINT; var pwchLocalName: Word; 
+                             cchLocalName: SYSINT; out ppwchType: PWord1; out pcchType: SYSINT): HResult; stdcall;
+    function getTypeFromQName(var pwchQName: Word; cchQName: SYSINT; out ppwchType: PWord1; 
+                              out pcchType: SYSINT): HResult; stdcall;
+    function getValue(nIndex: SYSINT; out ppwchValue: PWord1; out pcchValue: SYSINT): HResult; stdcall;
+    function getValueFromName(var pwchUri: Word; cchUri: SYSINT; var pwchLocalName: Word; 
+                              cchLocalName: SYSINT; out ppwchValue: PWord1; out pcchValue: SYSINT): HResult; stdcall;
+    function getValueFromQName(var pwchQName: Word; cchQName: SYSINT; out ppwchValue: PWord1; 
+                               out pcchValue: SYSINT): HResult; stdcall;
+  end;
+
+// *********************************************************************//
+// Interface: ISAXDTDHandler
+// Flags:     (16) Hidden
+// GUID:      {E15C1BAF-AFB3-4D60-8C36-19A8C45DEFED}
+// *********************************************************************//
+  ISAXDTDHandler = interface(IUnknown)
+    ['{E15C1BAF-AFB3-4D60-8C36-19A8C45DEFED}']
+    function notationDecl(var pwchName: Word; cchName: SYSINT; var pwchPublicId: Word; 
+                          cchPublicId: SYSINT; var pwchSystemId: Word; cchSystemId: SYSINT): HResult; stdcall;
+    function unparsedEntityDecl(var pwchName: Word; cchName: SYSINT; var pwchPublicId: Word; 
+                                cchPublicId: SYSINT; var pwchSystemId: Word; cchSystemId: SYSINT; 
+                                var pwchNotationName: Word; cchNotationName: SYSINT): HResult; stdcall;
+  end;
+
+// *********************************************************************//
+// Interface: ISAXErrorHandler
+// Flags:     (16) Hidden
+// GUID:      {A60511C4-CCF5-479E-98A3-DC8DC545B7D0}
+// *********************************************************************//
+  ISAXErrorHandler = interface(IUnknown)
+    ['{A60511C4-CCF5-479E-98A3-DC8DC545B7D0}']
+    function error(const pLocator: ISAXLocator; var pwchErrorMessage: Word; hrErrorCode: HResult): HResult; stdcall;
+    function fatalError(const pLocator: ISAXLocator; var pwchErrorMessage: Word; 
+                        hrErrorCode: HResult): HResult; stdcall;
+    function ignorableWarning(const pLocator: ISAXLocator; var pwchErrorMessage: Word; 
+                              hrErrorCode: HResult): HResult; stdcall;
+  end;
+
+// *********************************************************************//
+// Interface: ISAXXMLFilter
+// Flags:     (16) Hidden
+// GUID:      {70409222-CA09-4475-ACB8-40312FE8D145}
+// *********************************************************************//
+  ISAXXMLFilter = interface(ISAXXMLReader)
+    ['{70409222-CA09-4475-ACB8-40312FE8D145}']
+    function getParent(out ppReader: ISAXXMLReader): HResult; stdcall;
+    function putParent(const pReader: ISAXXMLReader): HResult; stdcall;
+  end;
+
+// *********************************************************************//
+// Interface: ISAXLexicalHandler
+// Flags:     (16) Hidden
+// GUID:      {7F85D5F5-47A8-4497-BDA5-84BA04819EA6}
+// *********************************************************************//
+  ISAXLexicalHandler = interface(IUnknown)
+    ['{7F85D5F5-47A8-4497-BDA5-84BA04819EA6}']
+    function startDTD(var pwchName: Word; cchName: SYSINT; var pwchPublicId: Word; 
+                      cchPublicId: SYSINT; var pwchSystemId: Word; cchSystemId: SYSINT): HResult; stdcall;
+    function endDTD: HResult; stdcall;
+    function startEntity(var pwchName: Word; cchName: SYSINT): HResult; stdcall;
+    function endEntity(var pwchName: Word; cchName: SYSINT): HResult; stdcall;
+    function startCDATA: HResult; stdcall;
+    function endCDATA: HResult; stdcall;
+    function comment(var pwchChars: Word; cchChars: SYSINT): HResult; stdcall;
+  end;
+
+// *********************************************************************//
+// Interface: ISAXDeclHandler
+// Flags:     (16) Hidden
+// GUID:      {862629AC-771A-47B2-8337-4E6843C1BE90}
+// *********************************************************************//
+  ISAXDeclHandler = interface(IUnknown)
+    ['{862629AC-771A-47B2-8337-4E6843C1BE90}']
+    function elementDecl(var pwchName: Word; cchName: SYSINT; var pwchModel: Word; cchModel: SYSINT): HResult; stdcall;
+    function attributeDecl(var pwchElementName: Word; cchElementName: SYSINT; 
+                           var pwchAttributeName: Word; cchAttributeName: SYSINT; 
+                           var pwchType: Word; cchType: SYSINT; var pwchValueDefault: Word; 
+                           cchValueDefault: SYSINT; var pwchValue: Word; cchValue: SYSINT): HResult; stdcall;
+    function internalEntityDecl(var pwchName: Word; cchName: SYSINT; var pwchValue: Word; 
+                                cchValue: SYSINT): HResult; stdcall;
+    function externalEntityDecl(var pwchName: Word; cchName: SYSINT; var pwchPublicId: Word; 
+                                cchPublicId: SYSINT; var pwchSystemId: Word; cchSystemId: SYSINT): HResult; stdcall;
+  end;
+
+// *********************************************************************//
+// Interface: IVBSAXXMLReader
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {8C033CAA-6CD6-4F73-B728-4531AF74945F}
+// *********************************************************************//
+  IVBSAXXMLReader = interface(IDispatch)
+    ['{8C033CAA-6CD6-4F73-B728-4531AF74945F}']
+    function getFeature(const strName: WideString): WordBool; safecall;
+    procedure putFeature(const strName: WideString; fValue: WordBool); safecall;
+    function getProperty(const strName: WideString): OleVariant; safecall;
+    procedure putProperty(const strName: WideString; varValue: OleVariant); safecall;
+    function Get_entityResolver: IVBSAXEntityResolver; safecall;
+    procedure _Set_entityResolver(const oResolver: IVBSAXEntityResolver); safecall;
+    function Get_contentHandler: IVBSAXContentHandler; safecall;
+    procedure _Set_contentHandler(const oHandler: IVBSAXContentHandler); safecall;
+    function Get_dtdHandler: IVBSAXDTDHandler; safecall;
+    procedure _Set_dtdHandler(const oHandler: IVBSAXDTDHandler); safecall;
+    function Get_errorHandler: IVBSAXErrorHandler; safecall;
+    procedure _Set_errorHandler(const oHandler: IVBSAXErrorHandler); safecall;
+    function Get_baseURL: WideString; safecall;
+    procedure Set_baseURL(const strBaseURL: WideString); safecall;
+    function Get_secureBaseURL: WideString; safecall;
+    procedure Set_secureBaseURL(const strSecureBaseURL: WideString); safecall;
+    procedure parse(varInput: OleVariant); safecall;
+    procedure parseURL(const strURL: WideString); safecall;
+    property entityResolver: IVBSAXEntityResolver read Get_entityResolver write _Set_entityResolver;
+    property contentHandler: IVBSAXContentHandler read Get_contentHandler write _Set_contentHandler;
+    property dtdHandler: IVBSAXDTDHandler read Get_dtdHandler write _Set_dtdHandler;
+    property errorHandler: IVBSAXErrorHandler read Get_errorHandler write _Set_errorHandler;
+    property baseURL: WideString read Get_baseURL write Set_baseURL;
+    property secureBaseURL: WideString read Get_secureBaseURL write Set_secureBaseURL;
+  end;
+
+// *********************************************************************//
+// Interface: IVBSAXEntityResolver
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {0C05D096-F45B-4ACA-AD1A-AA0BC25518DC}
+// *********************************************************************//
+  IVBSAXEntityResolver = interface(IDispatch)
+    ['{0C05D096-F45B-4ACA-AD1A-AA0BC25518DC}']
+    function resolveEntity(var strPublicId: WideString; var strSystemId: WideString): OleVariant; safecall;
+  end;
+
+// *********************************************************************//
+// Interface: IVBSAXContentHandler
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {2ED7290A-4DD5-4B46-BB26-4E4155E77FAA}
+// *********************************************************************//
+  IVBSAXContentHandler = interface(IDispatch)
+    ['{2ED7290A-4DD5-4B46-BB26-4E4155E77FAA}']
+    procedure _Set_documentLocator(const Param1: IVBSAXLocator); safecall;
+    procedure startDocument; safecall;
+    procedure endDocument; safecall;
+    procedure startPrefixMapping(var strPrefix: WideString; var strURI: WideString); safecall;
+    procedure endPrefixMapping(var strPrefix: WideString); safecall;
+    procedure startElement(var strNamespaceURI: WideString; var strLocalName: WideString; 
+                           var strQName: WideString; const oAttributes: IVBSAXAttributes); safecall;
+    procedure endElement(var strNamespaceURI: WideString; var strLocalName: WideString; 
+                         var strQName: WideString); safecall;
+    procedure characters(var strChars: WideString); safecall;
+    procedure ignorableWhitespace(var strChars: WideString); safecall;
+    procedure processingInstruction(var strTarget: WideString; var strData: WideString); safecall;
+    procedure skippedEntity(var strName: WideString); safecall;
+  end;
+
+// *********************************************************************//
+// Interface: IVBSAXLocator
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {796E7AC5-5AA2-4EFF-ACAD-3FAAF01A3288}
+// *********************************************************************//
+  IVBSAXLocator = interface(IDispatch)
+    ['{796E7AC5-5AA2-4EFF-ACAD-3FAAF01A3288}']
+    function Get_columnNumber: SYSINT; safecall;
+    function Get_lineNumber: SYSINT; safecall;
+    function Get_publicId: WideString; safecall;
+    function Get_systemId: WideString; safecall;
+    property columnNumber: SYSINT read Get_columnNumber;
+    property lineNumber: SYSINT read Get_lineNumber;
+    property publicId: WideString read Get_publicId;
+    property systemId: WideString read Get_systemId;
+  end;
+
+// *********************************************************************//
+// Interface: IVBSAXAttributes
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {10DC0586-132B-4CAC-8BB3-DB00AC8B7EE0}
+// *********************************************************************//
+  IVBSAXAttributes = interface(IDispatch)
+    ['{10DC0586-132B-4CAC-8BB3-DB00AC8B7EE0}']
+    function Get_length: SYSINT; safecall;
+    function getURI(nIndex: SYSINT): WideString; safecall;
+    function getLocalName(nIndex: SYSINT): WideString; safecall;
+    function getQName(nIndex: SYSINT): WideString; safecall;
+    function getIndexFromName(const strURI: WideString; const strLocalName: WideString): SYSINT; safecall;
+    function getIndexFromQName(const strQName: WideString): SYSINT; safecall;
+    function getType(nIndex: SYSINT): WideString; safecall;
+    function getTypeFromName(const strURI: WideString; const strLocalName: WideString): WideString; safecall;
+    function getTypeFromQName(const strQName: WideString): WideString; safecall;
+    function getValue(nIndex: SYSINT): WideString; safecall;
+    function getValueFromName(const strURI: WideString; const strLocalName: WideString): WideString; safecall;
+    function getValueFromQName(const strQName: WideString): WideString; safecall;
+    property length: SYSINT read Get_length;
+  end;
+
+// *********************************************************************//
+// Interface: IVBSAXDTDHandler
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {24FB3297-302D-4620-BA39-3A732D850558}
+// *********************************************************************//
+  IVBSAXDTDHandler = interface(IDispatch)
+    ['{24FB3297-302D-4620-BA39-3A732D850558}']
+    procedure notationDecl(var strName: WideString; var strPublicId: WideString;
+                           var strSystemId: WideString); safecall;
+    procedure unparsedEntityDecl(var strName: WideString; var strPublicId: WideString;
+                                 var strSystemId: WideString; var strNotationName: WideString); safecall;
+  end;
+
+// *********************************************************************//
+// Interface: IVBSAXErrorHandler
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {D963D3FE-173C-4862-9095-B92F66995F52}
+// *********************************************************************//
+  IVBSAXErrorHandler = interface(IDispatch)
+    ['{D963D3FE-173C-4862-9095-B92F66995F52}']
+    procedure error(const oLocator: IVBSAXLocator; var strErrorMessage: WideString; 
+                    nErrorCode: Integer); safecall;
+    procedure fatalError(const oLocator: IVBSAXLocator; var strErrorMessage: WideString; 
+                         nErrorCode: Integer); safecall;
+    procedure ignorableWarning(const oLocator: IVBSAXLocator; var strErrorMessage: WideString; 
+                               nErrorCode: Integer); safecall;
+  end;
+
+// *********************************************************************//
+// Interface: IVBSAXXMLFilter
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {1299EB1B-5B88-433E-82DE-82CA75AD4E04}
+// *********************************************************************//
+  IVBSAXXMLFilter = interface(IDispatch)
+    ['{1299EB1B-5B88-433E-82DE-82CA75AD4E04}']
+    function Get_parent: IVBSAXXMLReader; safecall;
+    procedure _Set_parent(const oReader: IVBSAXXMLReader); safecall;
+    property parent: IVBSAXXMLReader read Get_parent write _Set_parent;
+  end;
+
+// *********************************************************************//
+// Interface: IVBSAXLexicalHandler
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {032AAC35-8C0E-4D9D-979F-E3B702935576}
+// *********************************************************************//
+  IVBSAXLexicalHandler = interface(IDispatch)
+    ['{032AAC35-8C0E-4D9D-979F-E3B702935576}']
+    procedure startDTD(var strName: WideString; var strPublicId: WideString;
+                       var strSystemId: WideString); safecall;
+    procedure endDTD; safecall;
+    procedure startEntity(var strName: WideString); safecall;
+    procedure endEntity(var strName: WideString); safecall;
+    procedure startCDATA; safecall;
+    procedure endCDATA; safecall;
+    procedure comment(var strChars: WideString); safecall;
+  end;
+
+// *********************************************************************//
+// Interface: IVBSAXDeclHandler
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {E8917260-7579-4BE1-B5DD-7AFBFA6F077B}
+// *********************************************************************//
+  IVBSAXDeclHandler = interface(IDispatch)
+    ['{E8917260-7579-4BE1-B5DD-7AFBFA6F077B}']
+    procedure elementDecl(var strName: WideString; var strModel: WideString); safecall;
+    procedure attributeDecl(var strElementName: WideString; var strAttributeName: WideString;
+                            var strType: WideString; var strValueDefault: WideString;
+                            var strValue: WideString); safecall;
+    procedure internalEntityDecl(var strName: WideString; var strValue: WideString); safecall;
+    procedure externalEntityDecl(var strName: WideString; var strPublicId: WideString;
+                                 var strSystemId: WideString); safecall;
+  end;
+
+// *********************************************************************//
+// Interface: IMXWriter
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {4D7FF4BA-1565-4EA8-94E1-6E724A46F98D}
+// *********************************************************************//
+  IMXWriter = interface(IDispatch)
+    ['{4D7FF4BA-1565-4EA8-94E1-6E724A46F98D}']
+    procedure Set_output(varDestination: OleVariant); safecall;
+    function Get_output: OleVariant; safecall;
+    procedure Set_encoding(const strEncoding: WideString); safecall;
+    function Get_encoding: WideString; safecall;
+    procedure Set_byteOrderMark(fWriteByteOrderMark: WordBool); safecall;
+    function Get_byteOrderMark: WordBool; safecall;
+    procedure Set_indent(fIndentMode: WordBool); safecall;
+    function Get_indent: WordBool; safecall;
+    procedure Set_standalone(fValue: WordBool); safecall;
+    function Get_standalone: WordBool; safecall;
+    procedure Set_omitXMLDeclaration(fValue: WordBool); safecall;
+    function Get_omitXMLDeclaration: WordBool; safecall;
+    procedure Set_version(const strVersion: WideString); safecall;
+    function Get_version: WideString; safecall;
+    procedure Set_disableOutputEscaping(fValue: WordBool); safecall;
+    function Get_disableOutputEscaping: WordBool; safecall;
+    procedure flush; safecall;
+    property output: OleVariant read Get_output write Set_output;
+    property encoding: WideString read Get_encoding write Set_encoding;
+    property byteOrderMark: WordBool read Get_byteOrderMark write Set_byteOrderMark;
+    property indent: WordBool read Get_indent write Set_indent;
+    property standalone: WordBool read Get_standalone write Set_standalone;
+    property omitXMLDeclaration: WordBool read Get_omitXMLDeclaration write Set_omitXMLDeclaration;
+    property version: WideString read Get_version write Set_version;
+    property disableOutputEscaping: WordBool read Get_disableOutputEscaping write Set_disableOutputEscaping;
+  end;
+
+// *********************************************************************//
+// Interface: IMXAttributes
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {F10D27CC-3EC0-415C-8ED8-77AB1C5E7262}
+// *********************************************************************//
+  IMXAttributes = interface(IDispatch)
+    ['{F10D27CC-3EC0-415C-8ED8-77AB1C5E7262}']
+    procedure addAttribute(const strURI: WideString; const strLocalName: WideString;
+                           const strQName: WideString; const strType: WideString;
+                           const strValue: WideString); safecall;
+    procedure addAttributeFromIndex(varAtts: OleVariant; nIndex: SYSINT); safecall;
+    procedure clear; safecall;
+    procedure removeAttribute(nIndex: SYSINT); safecall;
+    procedure setAttribute(nIndex: SYSINT; const strURI: WideString;
+                           const strLocalName: WideString; const strQName: WideString;
+                           const strType: WideString; const strValue: WideString); safecall;
+    procedure setAttributes(varAtts: OleVariant); safecall;
+    procedure setLocalName(nIndex: SYSINT; const strLocalName: WideString); safecall;
+    procedure setQName(nIndex: SYSINT; const strQName: WideString); safecall;
+    procedure setType(nIndex: SYSINT; const strType: WideString); safecall;
+    procedure setURI(nIndex: SYSINT; const strURI: WideString); safecall;
+    procedure setValue(nIndex: SYSINT; const strValue: WideString); safecall;
+  end;
+
+// *********************************************************************//
+// Interface: IMXReaderControl
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {808F4E35-8D5A-4FBE-8466-33A41279ED30}
+// *********************************************************************//
+  IMXReaderControl = interface(IDispatch)
+    ['{808F4E35-8D5A-4FBE-8466-33A41279ED30}']
+    procedure abort; safecall;
+    procedure resume; safecall;
+    procedure suspend; safecall;
+  end;
+
+// *********************************************************************//
+// Interface: IMXSchemaDeclHandler
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {FA4BB38C-FAF9-4CCA-9302-D1DD0FE520DB}
+// *********************************************************************//
+  IMXSchemaDeclHandler = interface(IDispatch)
+    ['{FA4BB38C-FAF9-4CCA-9302-D1DD0FE520DB}']
+    procedure schemaElementDecl(const oSchemaElement: ISchemaElement); safecall;
+  end;
+
+// *********************************************************************//
+// Interface: ISchemaItem
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {50EA08B3-DD1B-4664-9A50-C2F40F4BD79A}
+// *********************************************************************//
+  ISchemaItem = interface(IDispatch)
+    ['{50EA08B3-DD1B-4664-9A50-C2F40F4BD79A}']
+    function Get_name: WideString; safecall;
+    function Get_namespaceURI: WideString; safecall;
+    function Get_schema: ISchema; safecall;
+    function Get_id: WideString; safecall;
+    function Get_itemType: SOMITEMTYPE; safecall;
+    function Get_unhandledAttributes: IVBSAXAttributes; safecall;
+    function writeAnnotation(const annotationSink: IUnknown): WordBool; safecall;
+    property name: WideString read Get_name;
+    property namespaceURI: WideString read Get_namespaceURI;
+    property schema: ISchema read Get_schema;
+    property id: WideString read Get_id;
+    property itemType: SOMITEMTYPE read Get_itemType;
+    property unhandledAttributes: IVBSAXAttributes read Get_unhandledAttributes;
+  end;
+
+// *********************************************************************//
+// Interface: ISchemaParticle
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {50EA08B5-DD1B-4664-9A50-C2F40F4BD79A}
+// *********************************************************************//
+  ISchemaParticle = interface(ISchemaItem)
+    ['{50EA08B5-DD1B-4664-9A50-C2F40F4BD79A}']
+    procedure GhostMethod_ISchemaParticle_0_1; safecall;
+    procedure GhostMethod_ISchemaParticle_4_2; safecall;
+    procedure GhostMethod_ISchemaParticle_8_3; safecall;
+    procedure GhostMethod_ISchemaParticle_12_4; safecall;
+    procedure GhostMethod_ISchemaParticle_16_5; safecall;
+    procedure GhostMethod_ISchemaParticle_20_6; safecall;
+    procedure GhostMethod_ISchemaParticle_24_7; safecall;
+    procedure GhostMethod_ISchemaParticle_28_8; safecall;
+    procedure GhostMethod_ISchemaParticle_32_9; safecall;
+    procedure GhostMethod_ISchemaParticle_36_10; safecall;
+    procedure GhostMethod_ISchemaParticle_40_11; safecall;
+    procedure GhostMethod_ISchemaParticle_44_12; safecall;
+    procedure GhostMethod_ISchemaParticle_48_13; safecall;
+    procedure GhostMethod_ISchemaParticle_52_14; safecall;
+    function Get_minOccurs: OleVariant; safecall;
+    function Get_maxOccurs: OleVariant; safecall;
+    property minOccurs: OleVariant read Get_minOccurs;
+    property maxOccurs: OleVariant read Get_maxOccurs;
+  end;
+
+// *********************************************************************//
+// Interface: ISchemaElement
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {50EA08B7-DD1B-4664-9A50-C2F40F4BD79A}
+// *********************************************************************//
+  ISchemaElement = interface(ISchemaParticle)
+    ['{50EA08B7-DD1B-4664-9A50-C2F40F4BD79A}']
+    procedure GhostMethod_ISchemaElement_0_1; safecall;
+    procedure GhostMethod_ISchemaElement_4_2; safecall;
+    procedure GhostMethod_ISchemaElement_8_3; safecall;
+    procedure GhostMethod_ISchemaElement_12_4; safecall;
+    procedure GhostMethod_ISchemaElement_16_5; safecall;
+    procedure GhostMethod_ISchemaElement_20_6; safecall;
+    procedure GhostMethod_ISchemaElement_24_7; safecall;
+    procedure GhostMethod_ISchemaElement_28_8; safecall;
+    procedure GhostMethod_ISchemaElement_32_9; safecall;
+    procedure GhostMethod_ISchemaElement_36_10; safecall;
+    procedure GhostMethod_ISchemaElement_40_11; safecall;
+    procedure GhostMethod_ISchemaElement_44_12; safecall;
+    procedure GhostMethod_ISchemaElement_48_13; safecall;
+    procedure GhostMethod_ISchemaElement_52_14; safecall;
+    procedure GhostMethod_ISchemaElement_56_15; safecall;
+    procedure GhostMethod_ISchemaElement_60_16; safecall;
+    function Get_type_: ISchemaType; safecall;
+    function Get_scope: ISchemaComplexType; safecall;
+    function Get_defaultValue: WideString; safecall;
+    function Get_fixedValue: WideString; safecall;
+    function Get_isNillable: WordBool; safecall;
+    function Get_identityConstraints: ISchemaItemCollection; safecall;
+    function Get_substitutionGroup: ISchemaElement; safecall;
+    function Get_substitutionGroupExclusions: SCHEMADERIVATIONMETHOD; safecall;
+    function Get_disallowedSubstitutions: SCHEMADERIVATIONMETHOD; safecall;
+    function Get_isAbstract: WordBool; safecall;
+    function Get_isReference: WordBool; safecall;
+    property type_: ISchemaType read Get_type_;
+    property scope: ISchemaComplexType read Get_scope;
+    property defaultValue: WideString read Get_defaultValue;
+    property fixedValue: WideString read Get_fixedValue;
+    property isNillable: WordBool read Get_isNillable;
+    property identityConstraints: ISchemaItemCollection read Get_identityConstraints;
+    property substitutionGroup: ISchemaElement read Get_substitutionGroup;
+    property substitutionGroupExclusions: SCHEMADERIVATIONMETHOD read Get_substitutionGroupExclusions;
+    property disallowedSubstitutions: SCHEMADERIVATIONMETHOD read Get_disallowedSubstitutions;
+    property isAbstract: WordBool read Get_isAbstract;
+    property isReference: WordBool read Get_isReference;
+  end;
+
+// *********************************************************************//
+// Interface: ISchema
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {50EA08B4-DD1B-4664-9A50-C2F40F4BD79A}
+// *********************************************************************//
+  ISchema = interface(ISchemaItem)
+    ['{50EA08B4-DD1B-4664-9A50-C2F40F4BD79A}']
+    function Get_targetNamespace: WideString; safecall;
+    function Get_version: WideString; safecall;
+    function Get_types: ISchemaItemCollection; safecall;
+    function Get_elements: ISchemaItemCollection; safecall;
+    function Get_attributes: ISchemaItemCollection; safecall;
+    function Get_attributeGroups: ISchemaItemCollection; safecall;
+    function Get_modelGroups: ISchemaItemCollection; safecall;
+    function Get_notations: ISchemaItemCollection; safecall;
+    function Get_schemaLocations: ISchemaStringCollection; safecall;
+    property targetNamespace: WideString read Get_targetNamespace;
+    property version: WideString read Get_version;
+    property types: ISchemaItemCollection read Get_types;
+    property elements: ISchemaItemCollection read Get_elements;
+    property attributes: ISchemaItemCollection read Get_attributes;
+    property attributeGroups: ISchemaItemCollection read Get_attributeGroups;
+    property modelGroups: ISchemaItemCollection read Get_modelGroups;
+    property notations: ISchemaItemCollection read Get_notations;
+    property schemaLocations: ISchemaStringCollection read Get_schemaLocations;
+  end;
+
+// *********************************************************************//
+// Interface: ISchemaItemCollection
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {50EA08B2-DD1B-4664-9A50-C2F40F4BD79A}
+// *********************************************************************//
+  ISchemaItemCollection = interface(IDispatch)
+    ['{50EA08B2-DD1B-4664-9A50-C2F40F4BD79A}']
+    function Get_item(index: Integer): ISchemaItem; safecall;
+    function itemByName(const name: WideString): ISchemaItem; safecall;
+    function itemByQName(const name: WideString; const namespaceURI: WideString): ISchemaItem; safecall;
+    function Get_length: Integer; safecall;
+    function Get__newEnum: IUnknown; safecall;
+    property item[index: Integer]: ISchemaItem read Get_item; default;
+    property length: Integer read Get_length;
+    property _newEnum: IUnknown read Get__newEnum;
+  end;
+
+// *********************************************************************//
+// Interface: ISchemaStringCollection
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {50EA08B1-DD1B-4664-9A50-C2F40F4BD79A}
+// *********************************************************************//
+  ISchemaStringCollection = interface(IDispatch)
+    ['{50EA08B1-DD1B-4664-9A50-C2F40F4BD79A}']
+    function Get_item(index: Integer): WideString; safecall;
+    function Get_length: Integer; safecall;
+    function Get__newEnum: IUnknown; safecall;
+    property item[index: Integer]: WideString read Get_item; default;
+    property length: Integer read Get_length;
+    property _newEnum: IUnknown read Get__newEnum;
+  end;
+
+// *********************************************************************//
+// Interface: ISchemaType
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {50EA08B8-DD1B-4664-9A50-C2F40F4BD79A}
+// *********************************************************************//
+  ISchemaType = interface(ISchemaItem)
+    ['{50EA08B8-DD1B-4664-9A50-C2F40F4BD79A}']
+    function Get_baseTypes: ISchemaItemCollection; safecall;
+    function Get_final: SCHEMADERIVATIONMETHOD; safecall;
+    function Get_variety: SCHEMATYPEVARIETY; safecall;
+    function Get_derivedBy: SCHEMADERIVATIONMETHOD; safecall;
+    function isValid(const data: WideString): WordBool; safecall;
+    function Get_minExclusive: WideString; safecall;
+    function Get_minInclusive: WideString; safecall;
+    function Get_maxExclusive: WideString; safecall;
+    function Get_maxInclusive: WideString; safecall;
+    function Get_totalDigits: OleVariant; safecall;
+    function Get_fractionDigits: OleVariant; safecall;
+    function Get_length: OleVariant; safecall;
+    function Get_minLength: OleVariant; safecall;
+    function Get_maxLength: OleVariant; safecall;
+    function Get_enumeration: ISchemaStringCollection; safecall;
+    function Get_whitespace: SCHEMAWHITESPACE; safecall;
+    function Get_patterns: ISchemaStringCollection; safecall;
+    property baseTypes: ISchemaItemCollection read Get_baseTypes;
+    property final: SCHEMADERIVATIONMETHOD read Get_final;
+    property variety: SCHEMATYPEVARIETY read Get_variety;
+    property derivedBy: SCHEMADERIVATIONMETHOD read Get_derivedBy;
+    property minExclusive: WideString read Get_minExclusive;
+    property minInclusive: WideString read Get_minInclusive;
+    property maxExclusive: WideString read Get_maxExclusive;
+    property maxInclusive: WideString read Get_maxInclusive;
+    property totalDigits: OleVariant read Get_totalDigits;
+    property fractionDigits: OleVariant read Get_fractionDigits;
+    property length: OleVariant read Get_length;
+    property minLength: OleVariant read Get_minLength;
+    property maxLength: OleVariant read Get_maxLength;
+    property enumeration: ISchemaStringCollection read Get_enumeration;
+    property whitespace: SCHEMAWHITESPACE read Get_whitespace;
+    property patterns: ISchemaStringCollection read Get_patterns;
+  end;
+
+// *********************************************************************//
+// Interface: ISchemaComplexType
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {50EA08B9-DD1B-4664-9A50-C2F40F4BD79A}
+// *********************************************************************//
+  ISchemaComplexType = interface(ISchemaType)
+    ['{50EA08B9-DD1B-4664-9A50-C2F40F4BD79A}']
+    function Get_isAbstract: WordBool; safecall;
+    function Get_anyAttribute: ISchemaAny; safecall;
+    function Get_attributes: ISchemaItemCollection; safecall;
+    function Get_contentType: SCHEMACONTENTTYPE; safecall;
+    function Get_contentModel: ISchemaModelGroup; safecall;
+    function Get_prohibitedSubstitutions: SCHEMADERIVATIONMETHOD; safecall;
+    property isAbstract: WordBool read Get_isAbstract;
+    property anyAttribute: ISchemaAny read Get_anyAttribute;
+    property attributes: ISchemaItemCollection read Get_attributes;
+    property contentType: SCHEMACONTENTTYPE read Get_contentType;
+    property contentModel: ISchemaModelGroup read Get_contentModel;
+    property prohibitedSubstitutions: SCHEMADERIVATIONMETHOD read Get_prohibitedSubstitutions;
+  end;
+
+// *********************************************************************//
+// Interface: ISchemaAny
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {50EA08BC-DD1B-4664-9A50-C2F40F4BD79A}
+// *********************************************************************//
+  ISchemaAny = interface(ISchemaParticle)
+    ['{50EA08BC-DD1B-4664-9A50-C2F40F4BD79A}']
+    function Get_namespaces: ISchemaStringCollection; safecall;
+    function Get_processContents: SCHEMAPROCESSCONTENTS; safecall;
+    property namespaces: ISchemaStringCollection read Get_namespaces;
+    property processContents: SCHEMAPROCESSCONTENTS read Get_processContents;
+  end;
+
+// *********************************************************************//
+// Interface: ISchemaModelGroup
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {50EA08BB-DD1B-4664-9A50-C2F40F4BD79A}
+// *********************************************************************//
+  ISchemaModelGroup = interface(ISchemaParticle)
+    ['{50EA08BB-DD1B-4664-9A50-C2F40F4BD79A}']
+    function Get_particles: ISchemaItemCollection; safecall;
+    property particles: ISchemaItemCollection read Get_particles;
+  end;
+
+// *********************************************************************//
+// Interface: IXMLDOMSchemaCollection2
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {50EA08B0-DD1B-4664-9A50-C2F40F4BD79A}
+// *********************************************************************//
+  IXMLDOMSchemaCollection2 = interface(IXMLDOMSchemaCollection)
+    ['{50EA08B0-DD1B-4664-9A50-C2F40F4BD79A}']
+    procedure validate; safecall;
+    procedure Set_validateOnLoad(validateOnLoad: WordBool); safecall;
+    function Get_validateOnLoad: WordBool; safecall;
+    function getSchema(const namespaceURI: WideString): ISchema; safecall;
+    function getDeclaration(const node: IXMLDOMNode): ISchemaItem; safecall;
+    property validateOnLoad: WordBool read Get_validateOnLoad write Set_validateOnLoad;
+  end;
+
+// *********************************************************************//
+// Interface: ISchemaAttribute
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {50EA08B6-DD1B-4664-9A50-C2F40F4BD79A}
+// *********************************************************************//
+  ISchemaAttribute = interface(ISchemaItem)
+    ['{50EA08B6-DD1B-4664-9A50-C2F40F4BD79A}']
+    function Get_type_: ISchemaType; safecall;
+    function Get_scope: ISchemaComplexType; safecall;
+    function Get_defaultValue: WideString; safecall;
+    function Get_fixedValue: WideString; safecall;
+    function Get_use: SCHEMAUSE; safecall;
+    function Get_isReference: WordBool; safecall;
+    property type_: ISchemaType read Get_type_;
+    property scope: ISchemaComplexType read Get_scope;
+    property defaultValue: WideString read Get_defaultValue;
+    property fixedValue: WideString read Get_fixedValue;
+    property use: SCHEMAUSE read Get_use;
+    property isReference: WordBool read Get_isReference;
+  end;
+
+// *********************************************************************//
+// Interface: ISchemaAttributeGroup
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {50EA08BA-DD1B-4664-9A50-C2F40F4BD79A}
+// *********************************************************************//
+  ISchemaAttributeGroup = interface(ISchemaItem)
+    ['{50EA08BA-DD1B-4664-9A50-C2F40F4BD79A}']
+    function Get_anyAttribute: ISchemaAny; safecall;
+    function Get_attributes: ISchemaItemCollection; safecall;
+    property anyAttribute: ISchemaAny read Get_anyAttribute;
+    property attributes: ISchemaItemCollection read Get_attributes;
+  end;
+
+// *********************************************************************//
+// Interface: ISchemaIdentityConstraint
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {50EA08BD-DD1B-4664-9A50-C2F40F4BD79A}
+// *********************************************************************//
+  ISchemaIdentityConstraint = interface(ISchemaItem)
+    ['{50EA08BD-DD1B-4664-9A50-C2F40F4BD79A}']
+    function Get_selector: WideString; safecall;
+    function Get_fields: ISchemaStringCollection; safecall;
+    function Get_referencedKey: ISchemaIdentityConstraint; safecall;
+    property selector: WideString read Get_selector;
+    property fields: ISchemaStringCollection read Get_fields;
+    property referencedKey: ISchemaIdentityConstraint read Get_referencedKey;
+  end;
+
+// *********************************************************************//
+// Interface: ISchemaNotation
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {50EA08BE-DD1B-4664-9A50-C2F40F4BD79A}
+// *********************************************************************//
+  ISchemaNotation = interface(ISchemaItem)
+    ['{50EA08BE-DD1B-4664-9A50-C2F40F4BD79A}']
+    function Get_systemIdentifier: WideString; safecall;
+    function Get_publicIdentifier: WideString; safecall;
+    property systemIdentifier: WideString read Get_systemIdentifier;
+    property publicIdentifier: WideString read Get_publicIdentifier;
+  end;
+
+// *********************************************************************//
+// Interface: IXMLElementCollection
+// Flags:     (4432) Hidden Dual OleAutomation Dispatchable
+// GUID:      {65725580-9B5D-11D0-9BFE-00C04FC99C8E}
+// *********************************************************************//
+  IXMLElementCollection = interface(IDispatch)
+    ['{65725580-9B5D-11D0-9BFE-00C04FC99C8E}']
+    procedure Set_length(p: Integer); safecall;
+    function Get_length: Integer; safecall;
+    function Get__newEnum: IUnknown; safecall;
+    function item(var1: OleVariant; var2: OleVariant): IDispatch; safecall;
+    property length: Integer read Get_length write Set_length;
+    property _newEnum: IUnknown read Get__newEnum;
+  end;
+
+// *********************************************************************//
+// Interface: IXMLDocument
+// Flags:     (4432) Hidden Dual OleAutomation Dispatchable
+// GUID:      {F52E2B61-18A1-11D1-B105-00805F49916B}
+// *********************************************************************//
+  IXMLDocument = interface(IDispatch)
+    ['{F52E2B61-18A1-11D1-B105-00805F49916B}']
+    function Get_root: IXMLElement; safecall;
+    function Get_fileSize: WideString; safecall;
+    function Get_fileModifiedDate: WideString; safecall;
+    function Get_fileUpdatedDate: WideString; safecall;
+    function Get_url: WideString; safecall;
+    procedure Set_url(const p: WideString); safecall;
+    function Get_mimeType: WideString; safecall;
+    function Get_readyState: Integer; safecall;
+    function Get_charset: WideString; safecall;
+    procedure Set_charset(const p: WideString); safecall;
+    function Get_version: WideString; safecall;
+    function Get_doctype: WideString; safecall;
+    function Get_dtdURL: WideString; safecall;
+    function createElement(vType: OleVariant; var1: OleVariant): IXMLElement; safecall;
+    property root: IXMLElement read Get_root;
+    property fileSize: WideString read Get_fileSize;
+    property fileModifiedDate: WideString read Get_fileModifiedDate;
+    property fileUpdatedDate: WideString read Get_fileUpdatedDate;
+    property url: WideString read Get_url write Set_url;
+    property mimeType: WideString read Get_mimeType;
+    property readyState: Integer read Get_readyState;
+    property charset: WideString read Get_charset write Set_charset;
+    property version: WideString read Get_version;
+    property doctype: WideString read Get_doctype;
+    property dtdURL: WideString read Get_dtdURL;
+  end;
+
+// *********************************************************************//
+// Interface: IXMLElement
+// Flags:     (4432) Hidden Dual OleAutomation Dispatchable
+// GUID:      {3F7F31AC-E15F-11D0-9C25-00C04FC99C8E}
+// *********************************************************************//
+  IXMLElement = interface(IDispatch)
+    ['{3F7F31AC-E15F-11D0-9C25-00C04FC99C8E}']
+    function Get_tagName: WideString; safecall;
+    procedure Set_tagName(const p: WideString); safecall;
+    function Get_parent: IXMLElement; safecall;
+    procedure setAttribute(const strPropertyName: WideString; PropertyValue: OleVariant); safecall;
+    function getAttribute(const strPropertyName: WideString): OleVariant; safecall;
+    procedure removeAttribute(const strPropertyName: WideString); safecall;
+    function Get_children: IXMLElementCollection; safecall;
+    function Get_type_: Integer; safecall;
+    function Get_text: WideString; safecall;
+    procedure Set_text(const p: WideString); safecall;
+    procedure addChild(const pChildElem: IXMLElement; lIndex: Integer; lReserved: Integer); safecall;
+    procedure removeChild(const pChildElem: IXMLElement); safecall;
+    property tagName: WideString read Get_tagName write Set_tagName;
+    property parent: IXMLElement read Get_parent;
+    property children: IXMLElementCollection read Get_children;
+    property type_: Integer read Get_type_;
+    property text: WideString read Get_text write Set_text;
+  end;
+
+// *********************************************************************//
+// Interface: IXMLDocument2
+// Flags:     (4112) Hidden Dispatchable
+// GUID:      {2B8DE2FE-8D2D-11D1-B2FC-00C04FD915A9}
+// *********************************************************************//
+  IXMLDocument2 = interface(IDispatch)
+    ['{2B8DE2FE-8D2D-11D1-B2FC-00C04FD915A9}']
+    function Get_root(out p: IXMLElement2): HResult; stdcall;
+    function Get_fileSize(out p: WideString): HResult; stdcall;
+    function Get_fileModifiedDate(out p: WideString): HResult; stdcall;
+    function Get_fileUpdatedDate(out p: WideString): HResult; stdcall;
+    function Get_url(out p: WideString): HResult; stdcall;
+    function Set_url(const p: WideString): HResult; stdcall;
+    function Get_mimeType(out p: WideString): HResult; stdcall;
+    function Get_readyState(out pl: Integer): HResult; stdcall;
+    function Get_charset(out p: WideString): HResult; stdcall;
+    function Set_charset(const p: WideString): HResult; stdcall;
+    function Get_version(out p: WideString): HResult; stdcall;
+    function Get_doctype(out p: WideString): HResult; stdcall;
+    function Get_dtdURL(out p: WideString): HResult; stdcall;
+    function createElement(vType: OleVariant; var1: OleVariant; out ppElem: IXMLElement2): HResult; stdcall;
+    function Get_async(out pf: WordBool): HResult; stdcall;
+    function Set_async(pf: WordBool): HResult; stdcall;
+  end;
+
+// *********************************************************************//
+// Interface: IXMLElement2
+// Flags:     (4432) Hidden Dual OleAutomation Dispatchable
+// GUID:      {2B8DE2FF-8D2D-11D1-B2FC-00C04FD915A9}
+// *********************************************************************//
+  IXMLElement2 = interface(IDispatch)
+    ['{2B8DE2FF-8D2D-11D1-B2FC-00C04FD915A9}']
+    function Get_tagName: WideString; safecall;
+    procedure Set_tagName(const p: WideString); safecall;
+    function Get_parent: IXMLElement2; safecall;
+    procedure setAttribute(const strPropertyName: WideString; PropertyValue: OleVariant); safecall;
+    function getAttribute(const strPropertyName: WideString): OleVariant; safecall;
+    procedure removeAttribute(const strPropertyName: WideString); safecall;
+    function Get_children: IXMLElementCollection; safecall;
+    function Get_type_: Integer; safecall;
+    function Get_text: WideString; safecall;
+    procedure Set_text(const p: WideString); safecall;
+    procedure addChild(const pChildElem: IXMLElement2; lIndex: Integer; lReserved: Integer); safecall;
+    procedure removeChild(const pChildElem: IXMLElement2); safecall;
+    function Get_attributes: IXMLElementCollection; safecall;
+    property tagName: WideString read Get_tagName write Set_tagName;
+    property parent: IXMLElement2 read Get_parent;
+    property children: IXMLElementCollection read Get_children;
+    property type_: Integer read Get_type_;
+    property text: WideString read Get_text write Set_text;
+    property attributes: IXMLElementCollection read Get_attributes;
+  end;
+
+// *********************************************************************//
+// Interface: IXMLAttribute
+// Flags:     (4432) Hidden Dual OleAutomation Dispatchable
+// GUID:      {D4D4A0FC-3B73-11D1-B2B4-00C04FB92596}
+// *********************************************************************//
+  IXMLAttribute = interface(IDispatch)
+    ['{D4D4A0FC-3B73-11D1-B2B4-00C04FB92596}']
+    function Get_name: WideString; safecall;
+    function Get_value: WideString; safecall;
+    property name: WideString read Get_name;
+    property value: WideString read Get_value;
+  end;
+
+// *********************************************************************//
+// Interface: IXMLError
+// Flags:     (16) Hidden
+// GUID:      {948C5AD3-C58D-11D0-9C0B-00C04FC99C8E}
+// *********************************************************************//
+  IXMLError = interface(IUnknown)
+    ['{948C5AD3-C58D-11D0-9C0B-00C04FC99C8E}']
+    function GetErrorInfo(var pErrorReturn: _xml_error): HResult; stdcall;
+  end;
+
+// *********************************************************************//
+// Interface: IXMLDOMSelection
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {AA634FC7-5888-44A7-A257-3A47150D3A0E}
+// *********************************************************************//
+  IXMLDOMSelection = interface(IXMLDOMNodeList)
+    ['{AA634FC7-5888-44A7-A257-3A47150D3A0E}']
+    function Get_expr: WideString; safecall;
+    procedure Set_expr(const expression: WideString); safecall;
+    function Get_context: IXMLDOMNode; safecall;
+    procedure _Set_context(const ppNode: IXMLDOMNode); safecall;
+    function peekNode: IXMLDOMNode; safecall;
+    function matches(const pNode: IXMLDOMNode): IXMLDOMNode; safecall;
+    function removeNext: IXMLDOMNode; safecall;
+    procedure removeAll; safecall;
+    function clone: IXMLDOMSelection; safecall;
+    function getProperty(const name: WideString): OleVariant; safecall;
+    procedure setProperty(const name: WideString; value: OleVariant); safecall;
+    property expr: WideString read Get_expr write Set_expr;
+    property context: IXMLDOMNode read Get_context write _Set_context;
+  end;
+
+// *********************************************************************//
+// Interface: IDSOControl
+// Flags:     (4560) Hidden Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {310AFA62-0575-11D2-9CA9-0060B0EC3D39}
+// *********************************************************************//
+  IDSOControl = interface(IDispatch)
+    ['{310AFA62-0575-11D2-9CA9-0060B0EC3D39}']
+    function Get_XMLDocument: IXMLDOMDocument; safecall;
+    procedure Set_XMLDocument(const ppDoc: IXMLDOMDocument); safecall;
+    function Get_JavaDSOCompatible: Integer; safecall;
+    procedure Set_JavaDSOCompatible(fJavaDSOCompatible: Integer); safecall;
+    function Get_readyState: Integer; safecall;
+    property XMLDocument: IXMLDOMDocument read Get_XMLDocument write Set_XMLDocument;
+    property JavaDSOCompatible: Integer read Get_JavaDSOCompatible write Set_JavaDSOCompatible;
+    property readyState: Integer read Get_readyState;
+  end;
+
+// *********************************************************************//
+// Interface: IXMLHTTPRequest
+// Flags:     (4416) Dual OleAutomation Dispatchable
+// GUID:      {ED8C108D-4349-11D2-91A4-00C04F7969E8}
+// *********************************************************************//
+  IXMLHTTPRequest = interface(IDispatch)
+    ['{ED8C108D-4349-11D2-91A4-00C04F7969E8}']
+    procedure open(const bstrMethod: WideString; const bstrUrl: WideString; varAsync: OleVariant; 
+                   bstrUser: OleVariant; bstrPassword: OleVariant); safecall;
+    procedure setRequestHeader(const bstrHeader: WideString; const bstrValue: WideString); safecall;
+    function getResponseHeader(const bstrHeader: WideString): WideString; safecall;
+    function getAllResponseHeaders: WideString; safecall;
+    procedure send(varBody: OleVariant); safecall;
+    procedure abort; safecall;
+    function Get_status: Integer; safecall;
+    function Get_statusText: WideString; safecall;
+    function Get_responseXML: IDispatch; safecall;
+    function Get_responseText: WideString; safecall;
+    function Get_responseBody: OleVariant; safecall;
+    function Get_responseStream: OleVariant; safecall;
+    function Get_readyState: Integer; safecall;
+    procedure Set_onreadystatechange(const Param1: IDispatch); safecall;
+    property status: Integer read Get_status;
+    property statusText: WideString read Get_statusText;
+    property responseXML: IDispatch read Get_responseXML;
+    property responseText: WideString read Get_responseText;
+    property responseBody: OleVariant read Get_responseBody;
+    property responseStream: OleVariant read Get_responseStream;
+    property readyState: Integer read Get_readyState;
+    property onreadystatechange: IDispatch write Set_onreadystatechange;
+  end;
+
+// *********************************************************************//
+// Interface: IServerXMLHTTPRequest
+// Flags:     (4416) Dual OleAutomation Dispatchable
+// GUID:      {2E9196BF-13BA-4DD4-91CA-6C571F281495}
+// *********************************************************************//
+  IServerXMLHTTPRequest = interface(IXMLHTTPRequest)
+    ['{2E9196BF-13BA-4DD4-91CA-6C571F281495}']
+    procedure setTimeouts(resolveTimeout: Integer; connectTimeout: Integer; sendTimeout: Integer;
+                          receiveTimeout: Integer); safecall;
+    function waitForResponse(timeoutInSeconds: OleVariant): WordBool; safecall;
+    function getOption(option: SERVERXMLHTTP_OPTION): OleVariant; safecall;
+    procedure setOption(option: SERVERXMLHTTP_OPTION; value: OleVariant); safecall;
+  end;
+
+// *********************************************************************//
+// Interface: IServerXMLHTTPRequest2
+// Flags:     (4416) Dual OleAutomation Dispatchable
+// GUID:      {2E01311B-C322-4B0A-BD77-B90CFDC8DCE7}
+// *********************************************************************//
+  IServerXMLHTTPRequest2 = interface(IServerXMLHTTPRequest)
+    ['{2E01311B-C322-4B0A-BD77-B90CFDC8DCE7}']
+    procedure setProxy(proxySetting: SXH_PROXY_SETTING; varProxyServer: OleVariant;
+                       varBypassList: OleVariant); safecall;
+    procedure setProxyCredentials(const bstrUserName: WideString; const bstrPassword: WideString); safecall;
+  end;
+
+// *********************************************************************//
+// Interface: IMXNamespacePrefixes
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {C90352F4-643C-4FBC-BB23-E996EB2D51FD}
+// *********************************************************************//
+  IMXNamespacePrefixes = interface(IDispatch)
+    ['{C90352F4-643C-4FBC-BB23-E996EB2D51FD}']
+    function Get_item(index: Integer): WideString; safecall;
+    function Get_length: Integer; safecall;
+    function Get__newEnum: IUnknown; safecall;
+    property item[index: Integer]: WideString read Get_item; default;
+    property length: Integer read Get_length;
+    property _newEnum: IUnknown read Get__newEnum;
+  end;
+
+// *********************************************************************//
+// Interface: IVBMXNamespaceManager
+// Flags:     (4544) Dual NonExtensible OleAutomation Dispatchable
+// GUID:      {C90352F5-643C-4FBC-BB23-E996EB2D51FD}
+// *********************************************************************//
+  IVBMXNamespaceManager = interface(IDispatch)
+    ['{C90352F5-643C-4FBC-BB23-E996EB2D51FD}']
+    procedure Set_allowOverride(fOverride: WordBool); safecall;
+    function Get_allowOverride: WordBool; safecall;
+    procedure reset; safecall;
+    procedure pushContext; safecall;
+    procedure pushNodeContext(const contextNode: IXMLDOMNode; fDeep: WordBool); safecall;
+    procedure popContext; safecall;
+    procedure declarePrefix(const prefix: WideString; const namespaceURI: WideString); safecall;
+    function getDeclaredPrefixes: IMXNamespacePrefixes; safecall;
+    function getPrefixes(const namespaceURI: WideString): IMXNamespacePrefixes; safecall;
+    function getURI(const prefix: WideString): OleVariant; safecall;
+    function getURIFromNode(const strPrefix: WideString; const contextNode: IXMLDOMNode): OleVariant; safecall;
+    property allowOverride: WordBool read Get_allowOverride write Set_allowOverride;
+  end;
+
+// *********************************************************************//
+// Interface: IMXNamespaceManager
+// Flags:     (16) Hidden
+// GUID:      {C90352F6-643C-4FBC-BB23-E996EB2D51FD}
+// *********************************************************************//
+  IMXNamespaceManager = interface(IUnknown)
+    ['{C90352F6-643C-4FBC-BB23-E996EB2D51FD}']
+    function putAllowOverride(fOverride: WordBool): HResult; stdcall;
+    function getAllowOverride(out fOverride: WordBool): HResult; stdcall;
+    function reset: HResult; stdcall;
+    function pushContext: HResult; stdcall;
+    function pushNodeContext(const contextNode: IXMLDOMNode; fDeep: WordBool): HResult; stdcall;
+    function popContext: HResult; stdcall;
+    function declarePrefix(var prefix: Word; var namespaceURI: Word): HResult; stdcall;
+    function getDeclaredPrefix(nIndex: Integer; var pwchPrefix: Word; var pcchPrefix: SYSINT): HResult; stdcall;
+    function getPrefix(var pwszNamespaceURI: Word; nIndex: Integer; var pwchPrefix: Word; 
+                       var pcchPrefix: SYSINT): HResult; stdcall;
+    function getURI(var pwchPrefix: Word; const pContextNode: IXMLDOMNode; var pwchUri: Word; 
+                    var pcchUri: SYSINT): HResult; stdcall;
+  end;
+
+// *********************************************************************//
+// The Class CoDOMDocument provides a Create and CreateRemote method to          
+// create instances of the default interface IXMLDOMDocument2 exposed by              
+// the CoClass DOMDocument. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoDOMDocument = class
+    class function Create: IXMLDOMDocument2;
+    class function CreateRemote(const MachineName: string): IXMLDOMDocument2;
+  end;
+
+// *********************************************************************//
+// The Class CoDOMDocument26 provides a Create and CreateRemote method to          
+// create instances of the default interface IXMLDOMDocument2 exposed by              
+// the CoClass DOMDocument26. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoDOMDocument26 = class
+    class function Create: IXMLDOMDocument2;
+    class function CreateRemote(const MachineName: string): IXMLDOMDocument2;
+  end;
+
+// *********************************************************************//
+// The Class CoDOMDocument30 provides a Create and CreateRemote method to          
+// create instances of the default interface IXMLDOMDocument2 exposed by              
+// the CoClass DOMDocument30. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoDOMDocument30 = class
+    class function Create: IXMLDOMDocument2;
+    class function CreateRemote(const MachineName: string): IXMLDOMDocument2;
+  end;
+
+// *********************************************************************//
+// The Class CoDOMDocument40 provides a Create and CreateRemote method to          
+// create instances of the default interface IXMLDOMDocument2 exposed by              
+// the CoClass DOMDocument40. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoDOMDocument40 = class
+    class function Create: IXMLDOMDocument2;
+    class function CreateRemote(const MachineName: string): IXMLDOMDocument2;
+  end;
+
+// *********************************************************************//
+// The Class CoFreeThreadedDOMDocument provides a Create and CreateRemote method to          
+// create instances of the default interface IXMLDOMDocument2 exposed by              
+// the CoClass FreeThreadedDOMDocument. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoFreeThreadedDOMDocument = class
+    class function Create: IXMLDOMDocument2;
+    class function CreateRemote(const MachineName: string): IXMLDOMDocument2;
+  end;
+
+// *********************************************************************//
+// The Class CoFreeThreadedDOMDocument26 provides a Create and CreateRemote method to          
+// create instances of the default interface IXMLDOMDocument2 exposed by              
+// the CoClass FreeThreadedDOMDocument26. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoFreeThreadedDOMDocument26 = class
+    class function Create: IXMLDOMDocument2;
+    class function CreateRemote(const MachineName: string): IXMLDOMDocument2;
+  end;
+
+// *********************************************************************//
+// The Class CoFreeThreadedDOMDocument30 provides a Create and CreateRemote method to          
+// create instances of the default interface IXMLDOMDocument2 exposed by              
+// the CoClass FreeThreadedDOMDocument30. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoFreeThreadedDOMDocument30 = class
+    class function Create: IXMLDOMDocument2;
+    class function CreateRemote(const MachineName: string): IXMLDOMDocument2;
+  end;
+
+// *********************************************************************//
+// The Class CoFreeThreadedDOMDocument40 provides a Create and CreateRemote method to          
+// create instances of the default interface IXMLDOMDocument2 exposed by              
+// the CoClass FreeThreadedDOMDocument40. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoFreeThreadedDOMDocument40 = class
+    class function Create: IXMLDOMDocument2;
+    class function CreateRemote(const MachineName: string): IXMLDOMDocument2;
+  end;
+
+// *********************************************************************//
+// The Class CoXMLSchemaCache provides a Create and CreateRemote method to          
+// create instances of the default interface IXMLDOMSchemaCollection exposed by              
+// the CoClass XMLSchemaCache. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoXMLSchemaCache = class
+    class function Create: IXMLDOMSchemaCollection;
+    class function CreateRemote(const MachineName: string): IXMLDOMSchemaCollection;
+  end;
+
+// *********************************************************************//
+// The Class CoXMLSchemaCache26 provides a Create and CreateRemote method to          
+// create instances of the default interface IXMLDOMSchemaCollection exposed by              
+// the CoClass XMLSchemaCache26. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoXMLSchemaCache26 = class
+    class function Create: IXMLDOMSchemaCollection;
+    class function CreateRemote(const MachineName: string): IXMLDOMSchemaCollection;
+  end;
+
+// *********************************************************************//
+// The Class CoXMLSchemaCache30 provides a Create and CreateRemote method to          
+// create instances of the default interface IXMLDOMSchemaCollection exposed by              
+// the CoClass XMLSchemaCache30. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoXMLSchemaCache30 = class
+    class function Create: IXMLDOMSchemaCollection;
+    class function CreateRemote(const MachineName: string): IXMLDOMSchemaCollection;
+  end;
+
+// *********************************************************************//
+// The Class CoXMLSchemaCache40 provides a Create and CreateRemote method to          
+// create instances of the default interface IXMLDOMSchemaCollection2 exposed by              
+// the CoClass XMLSchemaCache40. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoXMLSchemaCache40 = class
+    class function Create: IXMLDOMSchemaCollection2;
+    class function CreateRemote(const MachineName: string): IXMLDOMSchemaCollection2;
+  end;
+
+// *********************************************************************//
+// The Class CoXSLTemplate provides a Create and CreateRemote method to          
+// create instances of the default interface IXSLTemplate exposed by              
+// the CoClass XSLTemplate. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoXSLTemplate = class
+    class function Create: IXSLTemplate;
+    class function CreateRemote(const MachineName: string): IXSLTemplate;
+  end;
+
+// *********************************************************************//
+// The Class CoXSLTemplate26 provides a Create and CreateRemote method to          
+// create instances of the default interface IXSLTemplate exposed by              
+// the CoClass XSLTemplate26. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoXSLTemplate26 = class
+    class function Create: IXSLTemplate;
+    class function CreateRemote(const MachineName: string): IXSLTemplate;
+  end;
+
+// *********************************************************************//
+// The Class CoXSLTemplate30 provides a Create and CreateRemote method to          
+// create instances of the default interface IXSLTemplate exposed by              
+// the CoClass XSLTemplate30. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoXSLTemplate30 = class
+    class function Create: IXSLTemplate;
+    class function CreateRemote(const MachineName: string): IXSLTemplate;
+  end;
+
+// *********************************************************************//
+// The Class CoXSLTemplate40 provides a Create and CreateRemote method to          
+// create instances of the default interface IXSLTemplate exposed by              
+// the CoClass XSLTemplate40. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoXSLTemplate40 = class
+    class function Create: IXSLTemplate;
+    class function CreateRemote(const MachineName: string): IXSLTemplate;
+  end;
+
+// *********************************************************************//
+// The Class CoDSOControl provides a Create and CreateRemote method to          
+// create instances of the default interface IDSOControl exposed by              
+// the CoClass DSOControl. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoDSOControl = class
+    class function Create: IDSOControl;
+    class function CreateRemote(const MachineName: string): IDSOControl;
+  end;
+
+// *********************************************************************//
+// The Class CoDSOControl26 provides a Create and CreateRemote method to          
+// create instances of the default interface IDSOControl exposed by              
+// the CoClass DSOControl26. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoDSOControl26 = class
+    class function Create: IDSOControl;
+    class function CreateRemote(const MachineName: string): IDSOControl;
+  end;
+
+// *********************************************************************//
+// The Class CoDSOControl30 provides a Create and CreateRemote method to          
+// create instances of the default interface IDSOControl exposed by              
+// the CoClass DSOControl30. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoDSOControl30 = class
+    class function Create: IDSOControl;
+    class function CreateRemote(const MachineName: string): IDSOControl;
+  end;
+
+// *********************************************************************//
+// The Class CoDSOControl40 provides a Create and CreateRemote method to          
+// create instances of the default interface IDSOControl exposed by              
+// the CoClass DSOControl40. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoDSOControl40 = class
+    class function Create: IDSOControl;
+    class function CreateRemote(const MachineName: string): IDSOControl;
+  end;
+
+// *********************************************************************//
+// The Class CoXMLHTTP provides a Create and CreateRemote method to          
+// create instances of the default interface IXMLHTTPRequest exposed by              
+// the CoClass XMLHTTP. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoXMLHTTP = class
+    class function Create: IXMLHTTPRequest;
+    class function CreateRemote(const MachineName: string): IXMLHTTPRequest;
+  end;
+
+// *********************************************************************//
+// The Class CoXMLHTTP26 provides a Create and CreateRemote method to          
+// create instances of the default interface IXMLHTTPRequest exposed by              
+// the CoClass XMLHTTP26. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoXMLHTTP26 = class
+    class function Create: IXMLHTTPRequest;
+    class function CreateRemote(const MachineName: string): IXMLHTTPRequest;
+  end;
+
+// *********************************************************************//
+// The Class CoXMLHTTP30 provides a Create and CreateRemote method to          
+// create instances of the default interface IXMLHTTPRequest exposed by              
+// the CoClass XMLHTTP30. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoXMLHTTP30 = class
+    class function Create: IXMLHTTPRequest;
+    class function CreateRemote(const MachineName: string): IXMLHTTPRequest;
+  end;
+
+// *********************************************************************//
+// The Class CoXMLHTTP40 provides a Create and CreateRemote method to          
+// create instances of the default interface IXMLHTTPRequest exposed by              
+// the CoClass XMLHTTP40. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoXMLHTTP40 = class
+    class function Create: IXMLHTTPRequest;
+    class function CreateRemote(const MachineName: string): IXMLHTTPRequest;
+  end;
+
+// *********************************************************************//
+// The Class CoServerXMLHTTP provides a Create and CreateRemote method to          
+// create instances of the default interface IServerXMLHTTPRequest2 exposed by              
+// the CoClass ServerXMLHTTP. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoServerXMLHTTP = class
+    class function Create: IServerXMLHTTPRequest2;
+    class function CreateRemote(const MachineName: string): IServerXMLHTTPRequest2;
+  end;
+
+// *********************************************************************//
+// The Class CoServerXMLHTTP30 provides a Create and CreateRemote method to          
+// create instances of the default interface IServerXMLHTTPRequest2 exposed by              
+// the CoClass ServerXMLHTTP30. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoServerXMLHTTP30 = class
+    class function Create: IServerXMLHTTPRequest2;
+    class function CreateRemote(const MachineName: string): IServerXMLHTTPRequest2;
+  end;
+
+// *********************************************************************//
+// The Class CoServerXMLHTTP40 provides a Create and CreateRemote method to          
+// create instances of the default interface IServerXMLHTTPRequest2 exposed by              
+// the CoClass ServerXMLHTTP40. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoServerXMLHTTP40 = class
+    class function Create: IServerXMLHTTPRequest2;
+    class function CreateRemote(const MachineName: string): IServerXMLHTTPRequest2;
+  end;
+
+// *********************************************************************//
+// The Class CoSAXXMLReader provides a Create and CreateRemote method to          
+// create instances of the default interface IVBSAXXMLReader exposed by              
+// the CoClass SAXXMLReader. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoSAXXMLReader = class
+    class function Create: IVBSAXXMLReader;
+    class function CreateRemote(const MachineName: string): IVBSAXXMLReader;
+  end;
+
+// *********************************************************************//
+// The Class CoSAXXMLReader30 provides a Create and CreateRemote method to          
+// create instances of the default interface IVBSAXXMLReader exposed by              
+// the CoClass SAXXMLReader30. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoSAXXMLReader30 = class
+    class function Create: IVBSAXXMLReader;
+    class function CreateRemote(const MachineName: string): IVBSAXXMLReader;
+  end;
+
+// *********************************************************************//
+// The Class CoSAXXMLReader40 provides a Create and CreateRemote method to          
+// create instances of the default interface IVBSAXXMLReader exposed by              
+// the CoClass SAXXMLReader40. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoSAXXMLReader40 = class
+    class function Create: IVBSAXXMLReader;
+    class function CreateRemote(const MachineName: string): IVBSAXXMLReader;
+  end;
+
+// *********************************************************************//
+// The Class CoMXXMLWriter provides a Create and CreateRemote method to          
+// create instances of the default interface IMXWriter exposed by              
+// the CoClass MXXMLWriter. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoMXXMLWriter = class
+    class function Create: IMXWriter;
+    class function CreateRemote(const MachineName: string): IMXWriter;
+  end;
+
+// *********************************************************************//
+// The Class CoMXXMLWriter30 provides a Create and CreateRemote method to          
+// create instances of the default interface IMXWriter exposed by              
+// the CoClass MXXMLWriter30. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoMXXMLWriter30 = class
+    class function Create: IMXWriter;
+    class function CreateRemote(const MachineName: string): IMXWriter;
+  end;
+
+// *********************************************************************//
+// The Class CoMXXMLWriter40 provides a Create and CreateRemote method to          
+// create instances of the default interface IMXWriter exposed by              
+// the CoClass MXXMLWriter40. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoMXXMLWriter40 = class
+    class function Create: IMXWriter;
+    class function CreateRemote(const MachineName: string): IMXWriter;
+  end;
+
+// *********************************************************************//
+// The Class CoMXHTMLWriter provides a Create and CreateRemote method to          
+// create instances of the default interface IMXWriter exposed by              
+// the CoClass MXHTMLWriter. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoMXHTMLWriter = class
+    class function Create: IMXWriter;
+    class function CreateRemote(const MachineName: string): IMXWriter;
+  end;
+
+// *********************************************************************//
+// The Class CoMXHTMLWriter30 provides a Create and CreateRemote method to          
+// create instances of the default interface IMXWriter exposed by              
+// the CoClass MXHTMLWriter30. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoMXHTMLWriter30 = class
+    class function Create: IMXWriter;
+    class function CreateRemote(const MachineName: string): IMXWriter;
+  end;
+
+// *********************************************************************//
+// The Class CoMXHTMLWriter40 provides a Create and CreateRemote method to          
+// create instances of the default interface IMXWriter exposed by              
+// the CoClass MXHTMLWriter40. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoMXHTMLWriter40 = class
+    class function Create: IMXWriter;
+    class function CreateRemote(const MachineName: string): IMXWriter;
+  end;
+
+// *********************************************************************//
+// The Class CoSAXAttributes provides a Create and CreateRemote method to          
+// create instances of the default interface IMXAttributes exposed by              
+// the CoClass SAXAttributes. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoSAXAttributes = class
+    class function Create: IMXAttributes;
+    class function CreateRemote(const MachineName: string): IMXAttributes;
+  end;
+
+// *********************************************************************//
+// The Class CoSAXAttributes30 provides a Create and CreateRemote method to          
+// create instances of the default interface IMXAttributes exposed by              
+// the CoClass SAXAttributes30. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoSAXAttributes30 = class
+    class function Create: IMXAttributes;
+    class function CreateRemote(const MachineName: string): IMXAttributes;
+  end;
+
+// *********************************************************************//
+// The Class CoSAXAttributes40 provides a Create and CreateRemote method to          
+// create instances of the default interface IMXAttributes exposed by              
+// the CoClass SAXAttributes40. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoSAXAttributes40 = class
+    class function Create: IMXAttributes;
+    class function CreateRemote(const MachineName: string): IMXAttributes;
+  end;
+
+// *********************************************************************//
+// The Class CoMXNamespaceManager provides a Create and CreateRemote method to          
+// create instances of the default interface IVBMXNamespaceManager exposed by              
+// the CoClass MXNamespaceManager. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoMXNamespaceManager = class
+    class function Create: IVBMXNamespaceManager;
+    class function CreateRemote(const MachineName: string): IVBMXNamespaceManager;
+  end;
+
+// *********************************************************************//
+// The Class CoMXNamespaceManager40 provides a Create and CreateRemote method to          
+// create instances of the default interface IVBMXNamespaceManager exposed by              
+// the CoClass MXNamespaceManager40. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoMXNamespaceManager40 = class
+    class function Create: IVBMXNamespaceManager;
+    class function CreateRemote(const MachineName: string): IVBMXNamespaceManager;
+  end;
+
+// *********************************************************************//
+// The Class CoXMLDocument provides a Create and CreateRemote method to          
+// create instances of the default interface IXMLDocument2 exposed by              
+// the CoClass XMLDocument. The functions are intended to be used by             
+// clients wishing to automate the CoClass objects exposed by the         
+// server of this typelibrary.                                            
+// *********************************************************************//
+  CoXMLDocument = class
+    class function Create: IXMLDocument2;
+    class function CreateRemote(const MachineName: string): IXMLDocument2;
+  end;
+
+implementation
+
+uses ComObj;
+
+class function CoDOMDocument.Create: IXMLDOMDocument2;
+begin
+  Result := CreateComObject(CLASS_DOMDocument) as IXMLDOMDocument2;
+end;
+
+class function CoDOMDocument.CreateRemote(const MachineName: string): IXMLDOMDocument2;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_DOMDocument) as IXMLDOMDocument2;
+end;
+
+class function CoDOMDocument26.Create: IXMLDOMDocument2;
+begin
+  Result := CreateComObject(CLASS_DOMDocument26) as IXMLDOMDocument2;
+end;
+
+class function CoDOMDocument26.CreateRemote(const MachineName: string): IXMLDOMDocument2;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_DOMDocument26) as IXMLDOMDocument2;
+end;
+
+class function CoDOMDocument30.Create: IXMLDOMDocument2;
+begin
+  Result := CreateComObject(CLASS_DOMDocument30) as IXMLDOMDocument2;
+end;
+
+class function CoDOMDocument30.CreateRemote(const MachineName: string): IXMLDOMDocument2;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_DOMDocument30) as IXMLDOMDocument2;
+end;
+
+class function CoDOMDocument40.Create: IXMLDOMDocument2;
+begin
+  Result := CreateComObject(CLASS_DOMDocument40) as IXMLDOMDocument2;
+end;
+
+class function CoDOMDocument40.CreateRemote(const MachineName: string): IXMLDOMDocument2;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_DOMDocument40) as IXMLDOMDocument2;
+end;
+
+class function CoFreeThreadedDOMDocument.Create: IXMLDOMDocument2;
+begin
+  Result := CreateComObject(CLASS_FreeThreadedDOMDocument) as IXMLDOMDocument2;
+end;
+
+class function CoFreeThreadedDOMDocument.CreateRemote(const MachineName: string): IXMLDOMDocument2;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_FreeThreadedDOMDocument) as IXMLDOMDocument2;
+end;
+
+class function CoFreeThreadedDOMDocument26.Create: IXMLDOMDocument2;
+begin
+  Result := CreateComObject(CLASS_FreeThreadedDOMDocument26) as IXMLDOMDocument2;
+end;
+
+class function CoFreeThreadedDOMDocument26.CreateRemote(const MachineName: string): IXMLDOMDocument2;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_FreeThreadedDOMDocument26) as IXMLDOMDocument2;
+end;
+
+class function CoFreeThreadedDOMDocument30.Create: IXMLDOMDocument2;
+begin
+  Result := CreateComObject(CLASS_FreeThreadedDOMDocument30) as IXMLDOMDocument2;
+end;
+
+class function CoFreeThreadedDOMDocument30.CreateRemote(const MachineName: string): IXMLDOMDocument2;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_FreeThreadedDOMDocument30) as IXMLDOMDocument2;
+end;
+
+class function CoFreeThreadedDOMDocument40.Create: IXMLDOMDocument2;
+begin
+  Result := CreateComObject(CLASS_FreeThreadedDOMDocument40) as IXMLDOMDocument2;
+end;
+
+class function CoFreeThreadedDOMDocument40.CreateRemote(const MachineName: string): IXMLDOMDocument2;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_FreeThreadedDOMDocument40) as IXMLDOMDocument2;
+end;
+
+class function CoXMLSchemaCache.Create: IXMLDOMSchemaCollection;
+begin
+  Result := CreateComObject(CLASS_XMLSchemaCache) as IXMLDOMSchemaCollection;
+end;
+
+class function CoXMLSchemaCache.CreateRemote(const MachineName: string): IXMLDOMSchemaCollection;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_XMLSchemaCache) as IXMLDOMSchemaCollection;
+end;
+
+class function CoXMLSchemaCache26.Create: IXMLDOMSchemaCollection;
+begin
+  Result := CreateComObject(CLASS_XMLSchemaCache26) as IXMLDOMSchemaCollection;
+end;
+
+class function CoXMLSchemaCache26.CreateRemote(const MachineName: string): IXMLDOMSchemaCollection;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_XMLSchemaCache26) as IXMLDOMSchemaCollection;
+end;
+
+class function CoXMLSchemaCache30.Create: IXMLDOMSchemaCollection;
+begin
+  Result := CreateComObject(CLASS_XMLSchemaCache30) as IXMLDOMSchemaCollection;
+end;
+
+class function CoXMLSchemaCache30.CreateRemote(const MachineName: string): IXMLDOMSchemaCollection;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_XMLSchemaCache30) as IXMLDOMSchemaCollection;
+end;
+
+class function CoXMLSchemaCache40.Create: IXMLDOMSchemaCollection2;
+begin
+  Result := CreateComObject(CLASS_XMLSchemaCache40) as IXMLDOMSchemaCollection2;
+end;
+
+class function CoXMLSchemaCache40.CreateRemote(const MachineName: string): IXMLDOMSchemaCollection2;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_XMLSchemaCache40) as IXMLDOMSchemaCollection2;
+end;
+
+class function CoXSLTemplate.Create: IXSLTemplate;
+begin
+  Result := CreateComObject(CLASS_XSLTemplate) as IXSLTemplate;
+end;
+
+class function CoXSLTemplate.CreateRemote(const MachineName: string): IXSLTemplate;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_XSLTemplate) as IXSLTemplate;
+end;
+
+class function CoXSLTemplate26.Create: IXSLTemplate;
+begin
+  Result := CreateComObject(CLASS_XSLTemplate26) as IXSLTemplate;
+end;
+
+class function CoXSLTemplate26.CreateRemote(const MachineName: string): IXSLTemplate;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_XSLTemplate26) as IXSLTemplate;
+end;
+
+class function CoXSLTemplate30.Create: IXSLTemplate;
+begin
+  Result := CreateComObject(CLASS_XSLTemplate30) as IXSLTemplate;
+end;
+
+class function CoXSLTemplate30.CreateRemote(const MachineName: string): IXSLTemplate;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_XSLTemplate30) as IXSLTemplate;
+end;
+
+class function CoXSLTemplate40.Create: IXSLTemplate;
+begin
+  Result := CreateComObject(CLASS_XSLTemplate40) as IXSLTemplate;
+end;
+
+class function CoXSLTemplate40.CreateRemote(const MachineName: string): IXSLTemplate;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_XSLTemplate40) as IXSLTemplate;
+end;
+
+class function CoDSOControl.Create: IDSOControl;
+begin
+  Result := CreateComObject(CLASS_DSOControl) as IDSOControl;
+end;
+
+class function CoDSOControl.CreateRemote(const MachineName: string): IDSOControl;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_DSOControl) as IDSOControl;
+end;
+
+class function CoDSOControl26.Create: IDSOControl;
+begin
+  Result := CreateComObject(CLASS_DSOControl26) as IDSOControl;
+end;
+
+class function CoDSOControl26.CreateRemote(const MachineName: string): IDSOControl;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_DSOControl26) as IDSOControl;
+end;
+
+class function CoDSOControl30.Create: IDSOControl;
+begin
+  Result := CreateComObject(CLASS_DSOControl30) as IDSOControl;
+end;
+
+class function CoDSOControl30.CreateRemote(const MachineName: string): IDSOControl;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_DSOControl30) as IDSOControl;
+end;
+
+class function CoDSOControl40.Create: IDSOControl;
+begin
+  Result := CreateComObject(CLASS_DSOControl40) as IDSOControl;
+end;
+
+class function CoDSOControl40.CreateRemote(const MachineName: string): IDSOControl;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_DSOControl40) as IDSOControl;
+end;
+
+class function CoXMLHTTP.Create: IXMLHTTPRequest;
+begin
+  Result := CreateComObject(CLASS_XMLHTTP) as IXMLHTTPRequest;
+end;
+
+class function CoXMLHTTP.CreateRemote(const MachineName: string): IXMLHTTPRequest;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_XMLHTTP) as IXMLHTTPRequest;
+end;
+
+class function CoXMLHTTP26.Create: IXMLHTTPRequest;
+begin
+  Result := CreateComObject(CLASS_XMLHTTP26) as IXMLHTTPRequest;
+end;
+
+class function CoXMLHTTP26.CreateRemote(const MachineName: string): IXMLHTTPRequest;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_XMLHTTP26) as IXMLHTTPRequest;
+end;
+
+class function CoXMLHTTP30.Create: IXMLHTTPRequest;
+begin
+  Result := CreateComObject(CLASS_XMLHTTP30) as IXMLHTTPRequest;
+end;
+
+class function CoXMLHTTP30.CreateRemote(const MachineName: string): IXMLHTTPRequest;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_XMLHTTP30) as IXMLHTTPRequest;
+end;
+
+class function CoXMLHTTP40.Create: IXMLHTTPRequest;
+begin
+  Result := CreateComObject(CLASS_XMLHTTP40) as IXMLHTTPRequest;
+end;
+
+class function CoXMLHTTP40.CreateRemote(const MachineName: string): IXMLHTTPRequest;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_XMLHTTP40) as IXMLHTTPRequest;
+end;
+
+class function CoServerXMLHTTP.Create: IServerXMLHTTPRequest2;
+begin
+  Result := CreateComObject(CLASS_ServerXMLHTTP) as IServerXMLHTTPRequest2;
+end;
+
+class function CoServerXMLHTTP.CreateRemote(const MachineName: string): IServerXMLHTTPRequest2;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_ServerXMLHTTP) as IServerXMLHTTPRequest2;
+end;
+
+class function CoServerXMLHTTP30.Create: IServerXMLHTTPRequest2;
+begin
+  Result := CreateComObject(CLASS_ServerXMLHTTP30) as IServerXMLHTTPRequest2;
+end;
+
+class function CoServerXMLHTTP30.CreateRemote(const MachineName: string): IServerXMLHTTPRequest2;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_ServerXMLHTTP30) as IServerXMLHTTPRequest2;
+end;
+
+class function CoServerXMLHTTP40.Create: IServerXMLHTTPRequest2;
+begin
+  Result := CreateComObject(CLASS_ServerXMLHTTP40) as IServerXMLHTTPRequest2;
+end;
+
+class function CoServerXMLHTTP40.CreateRemote(const MachineName: string): IServerXMLHTTPRequest2;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_ServerXMLHTTP40) as IServerXMLHTTPRequest2;
+end;
+
+class function CoSAXXMLReader.Create: IVBSAXXMLReader;
+begin
+  Result := CreateComObject(CLASS_SAXXMLReader) as IVBSAXXMLReader;
+end;
+
+class function CoSAXXMLReader.CreateRemote(const MachineName: string): IVBSAXXMLReader;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_SAXXMLReader) as IVBSAXXMLReader;
+end;
+
+class function CoSAXXMLReader30.Create: IVBSAXXMLReader;
+begin
+  Result := CreateComObject(CLASS_SAXXMLReader30) as IVBSAXXMLReader;
+end;
+
+class function CoSAXXMLReader30.CreateRemote(const MachineName: string): IVBSAXXMLReader;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_SAXXMLReader30) as IVBSAXXMLReader;
+end;
+
+class function CoSAXXMLReader40.Create: IVBSAXXMLReader;
+begin
+  Result := CreateComObject(CLASS_SAXXMLReader40) as IVBSAXXMLReader;
+end;
+
+class function CoSAXXMLReader40.CreateRemote(const MachineName: string): IVBSAXXMLReader;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_SAXXMLReader40) as IVBSAXXMLReader;
+end;
+
+class function CoMXXMLWriter.Create: IMXWriter;
+begin
+  Result := CreateComObject(CLASS_MXXMLWriter) as IMXWriter;
+end;
+
+class function CoMXXMLWriter.CreateRemote(const MachineName: string): IMXWriter;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_MXXMLWriter) as IMXWriter;
+end;
+
+class function CoMXXMLWriter30.Create: IMXWriter;
+begin
+  Result := CreateComObject(CLASS_MXXMLWriter30) as IMXWriter;
+end;
+
+class function CoMXXMLWriter30.CreateRemote(const MachineName: string): IMXWriter;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_MXXMLWriter30) as IMXWriter;
+end;
+
+class function CoMXXMLWriter40.Create: IMXWriter;
+begin
+  Result := CreateComObject(CLASS_MXXMLWriter40) as IMXWriter;
+end;
+
+class function CoMXXMLWriter40.CreateRemote(const MachineName: string): IMXWriter;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_MXXMLWriter40) as IMXWriter;
+end;
+
+class function CoMXHTMLWriter.Create: IMXWriter;
+begin
+  Result := CreateComObject(CLASS_MXHTMLWriter) as IMXWriter;
+end;
+
+class function CoMXHTMLWriter.CreateRemote(const MachineName: string): IMXWriter;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_MXHTMLWriter) as IMXWriter;
+end;
+
+class function CoMXHTMLWriter30.Create: IMXWriter;
+begin
+  Result := CreateComObject(CLASS_MXHTMLWriter30) as IMXWriter;
+end;
+
+class function CoMXHTMLWriter30.CreateRemote(const MachineName: string): IMXWriter;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_MXHTMLWriter30) as IMXWriter;
+end;
+
+class function CoMXHTMLWriter40.Create: IMXWriter;
+begin
+  Result := CreateComObject(CLASS_MXHTMLWriter40) as IMXWriter;
+end;
+
+class function CoMXHTMLWriter40.CreateRemote(const MachineName: string): IMXWriter;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_MXHTMLWriter40) as IMXWriter;
+end;
+
+class function CoSAXAttributes.Create: IMXAttributes;
+begin
+  Result := CreateComObject(CLASS_SAXAttributes) as IMXAttributes;
+end;
+
+class function CoSAXAttributes.CreateRemote(const MachineName: string): IMXAttributes;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_SAXAttributes) as IMXAttributes;
+end;
+
+class function CoSAXAttributes30.Create: IMXAttributes;
+begin
+  Result := CreateComObject(CLASS_SAXAttributes30) as IMXAttributes;
+end;
+
+class function CoSAXAttributes30.CreateRemote(const MachineName: string): IMXAttributes;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_SAXAttributes30) as IMXAttributes;
+end;
+
+class function CoSAXAttributes40.Create: IMXAttributes;
+begin
+  Result := CreateComObject(CLASS_SAXAttributes40) as IMXAttributes;
+end;
+
+class function CoSAXAttributes40.CreateRemote(const MachineName: string): IMXAttributes;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_SAXAttributes40) as IMXAttributes;
+end;
+
+class function CoMXNamespaceManager.Create: IVBMXNamespaceManager;
+begin
+  Result := CreateComObject(CLASS_MXNamespaceManager) as IVBMXNamespaceManager;
+end;
+
+class function CoMXNamespaceManager.CreateRemote(const MachineName: string): IVBMXNamespaceManager;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_MXNamespaceManager) as IVBMXNamespaceManager;
+end;
+
+class function CoMXNamespaceManager40.Create: IVBMXNamespaceManager;
+begin
+  Result := CreateComObject(CLASS_MXNamespaceManager40) as IVBMXNamespaceManager;
+end;
+
+class function CoMXNamespaceManager40.CreateRemote(const MachineName: string): IVBMXNamespaceManager;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_MXNamespaceManager40) as IVBMXNamespaceManager;
+end;
+
+class function CoXMLDocument.Create: IXMLDocument2;
+begin
+  Result := CreateComObject(CLASS_XMLDocument) as IXMLDocument2;
+end;
+
+class function CoXMLDocument.CreateRemote(const MachineName: string): IXMLDocument2;
+begin
+  Result := CreateRemoteComObject(MachineName, CLASS_XMLDocument) as IXMLDocument2;
+end;
+
+end.
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROMSXMLImpl.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROMSXMLImpl.pas
new file mode 100644
index 0000000..a9920c6
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROMSXMLImpl.pas	
@@ -0,0 +1,580 @@
+unit uROMSXMLImpl;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+
+{$I RemObjects.inc}
+
+interface
+
+uses Classes, ActiveX, uROMSXML2_TLB, uROXMLIntf, uROTypes;
+
+type TMSXMLVersion = (msxml26, msxml30, msxml40);
+     TMSXMLVersions = set of TMSXMLVersion;
+
+const MSXMLFileNames : array[TMSXMLVersion] of string = ('msxml2.dll', 'msxml3.dll', 'msxml4.dll');
+
+type { TROMSXMLNode }
+     TROMSXMLNode = class(TInterfacedObject, IXMLNode)
+     private
+       fNode : IXMLDOMNode;
+       fDoc : IXMLDocument;
+
+     protected
+       function GetName : UnicodeString;
+       function GetLocalName : UnicodeString;
+       function GetRef : pointer;
+
+       function GetParent : IXMLNode;
+
+       function GetValue : Variant;
+       procedure SetValue(const Value : Variant);
+
+       function GetXML : UnicodeString;
+
+       function GetAttributes(Index : integer) : IXMLNode;
+       function GetAttributeCount : integer;
+
+       function GetChildren(Index : integer) : IXMLNode;
+       function GetChildrenCount : integer;
+
+       function Add(const aNodeName : UnicodeString; aNameSpaceURI: UnicodeString = '') : IXMLNode;
+       function AddAttribute(const anAttributeName : UnicodeString; const anAttributeValue : Variant; aCreateResultNode: Boolean = True) : IXMLNode;
+       function AddXml(const Xml: UnicodeString): IXMLNode;
+
+       procedure Delete(Index : integer);
+       procedure Remove(const aNode : IXMLNode);
+
+       function GetNodeByName(const aNodeName : UnicodeString) : IXMLNode; // Returns NIL if none is found or exception. Up to you.
+       function GetNodeValue(const aNodeName : UnicodeString; const Default : Variant) : Variant;
+
+       function GetAttributeByName(const anAttributeName : UnicodeString) : IXMLNode;
+       function GetAttributeValue(const anAttributeName : UnicodeString; DefaultValue : Variant) : Variant;
+
+       function GetNodesByName(const aNodeName : UnicodeString) : IXMLNodeList; // Returns NIL if none are found or exception. Up to you.
+
+       function GetNodeByAttribute(const anAttributeName, anAttributeValue : UnicodeString) : IXMLNode;
+
+       function GetFirstChild: IXMLNode;
+       function GetNextSibling: IXMLNode;
+       function GetNamespaceURI: UnicodeString;
+       function GetDocument: IXMLDocument;
+
+
+     public
+       constructor Create(const aNode : IXMLDOMNode; aDoc: IXMLDocument);
+       destructor Destroy; override;
+     end;
+
+     { TROMSXMLNodeList }
+     TROMSXMLNodeList = class(TInterfacedObject, IXMLNodeLIst)
+     private
+       fNodeList : IXMLDOMNodeList;
+       fDoc: IXMLDocument;
+     protected
+       function GetNodes(Index : integer) : IXMLNode;
+       function GetCount : integer;
+
+     public
+       constructor Create(const aNodeList : IXMLDOMNodeList; aDoc: IXMLDocument);
+       destructor Destroy; override;
+     end;
+
+     { TROMSXMLDocument }
+     TROMSXMLDocument = class(TInterfacedObject, IXMLDocument)
+     private
+       fDocument : IXMLDOMDocument2;
+
+     protected
+       function GetDocumentNode : IXMLNode;
+
+       function GetEncoding : TXMLEncoding;
+
+       procedure New(aDocumentName : UnicodeString = ''; anEncoding : TXMLEncoding = xeUTF8);
+
+       procedure SaveToStream(aStream : TStream);
+       procedure SaveToFile(const aFileName : string);
+       procedure LoadFromStream(aStream : TStream);
+       procedure LoadFromFile(const aFileName : string);
+
+       function GetXML:UnicodeString;
+       procedure SetXML(const Value : UnicodeString);
+
+       function Transform(const aXSL: string): string;
+
+     public
+       constructor Create;
+       destructor Destroy; override;
+
+     end;
+
+var InstalledMSXMLVersions : TMSXMLVersions;
+
+implementation
+
+uses uRORes, uROClasses, SysUtils, ComObj, TYpInfo, Windows;
+
+{ TROMSXMLNode }
+
+constructor TROMSXMLNode.Create(const aNode : IXMLDOMNode; aDoc: IXMLDocument);
+begin
+  if not Assigned(aNode)
+    then RaiseError(err_DOMElementIsNIL, []);
+
+  inherited Create;
+
+  fNode := aNode;
+  fDoc := aDoc;
+end;
+
+destructor TROMSXMLNode.Destroy;
+begin
+  //fNode := NIL;
+  inherited;
+end;
+
+function TROMSXMLNode.Add(const aNodeName: UnicodeString; aNameSpaceURI: UnicodeString = ''): IXMLNode;
+var node : IXMLDOMNode;
+begin
+  if (aNameSpaceURI = '') and (GetNamespaceURI <> '') then aNameSpaceURI := GetNamespaceURI;
+  if aNameSpaceURI = '' then
+  begin
+    node := fNode.attributes.getNamedItem('xmlns');
+    if node <> nil then
+      node := fNode.ownerDocument.createNode(NODE_ELEMENT, aNodeName, node.text)
+    else
+      node := fNode.ownerDocument.createElement(aNodeName);
+  end
+  else
+    node := fNode.ownerDocument.createNode(NODE_ELEMENT, aNodeName, aNameSpaceURI);
+  fNode.appendChild(node);
+
+  result := TROMSXMLNode.Create(node, fDoc);
+end;
+
+procedure TROMSXMLNode.Delete(Index: integer);
+begin
+  fNode.removeChild(fNode.childNodes.item[Index])
+end;
+
+function TROMSXMLNode.GetAttributes(Index : integer): IXMLNode;
+begin
+  result := TROMSXMLNode.Create(fNode.attributes.item[Index], fDoc);
+end;
+
+function TROMSXMLNode.GetChildren(Index : integer): IXMLNode;
+begin
+  result := TROMSXMLNode.Create(fNode.childNodes.item[Index], fDoc)
+end;
+
+function TROMSXMLNode.GetName: UnicodeString;
+begin
+  result := fNode.nodeName
+end;
+
+function TROMSXMLNode.GetXML: UnicodeString;
+begin
+  result := fNode.XML;
+end;
+
+procedure TROMSXMLNode.Remove(const aNode: IXMLNode);
+begin
+  fNode.removeChild(IXMLDOMNode(aNode.Ref))
+end;
+
+function TROMSXMLNode.GetValue: Variant;
+begin
+  result := fNode.text
+end;
+
+procedure TROMSXMLNode.SetValue(const Value: Variant);
+begin
+  fNode.text := Value
+end;
+
+function TROMSXMLNode.GetNodeByName(const aNodeName: UnicodeString): IXMLNode;
+var //list : IXMLDOMNodeList;
+    node : IXMLDOMNode;
+begin
+  result := NIL;
+
+  node := fNode.selectSingleNode(aNodeName);
+
+  if (node<>NIL)
+    then result := TROMSXMLNode.Create(node, fDoc);
+end;
+
+function TROMSXMLNode.GetNodeByAttribute(const anAttributeName,
+  anAttributeValue: UnicodeString): IXMLNode;
+var i : integer;
+begin
+  result := NIL;
+  if fNode.attributes = nil then exit;
+  for i := 0 to (fNode.attributes.length-1) do
+    with fNode.attributes.item[i] do
+      if (nodeName=anAttributeName) and (nodeValue=anAttributeValue) then begin
+        result := TROMSXMLNode.Create(fNode.attributes.item[i], fDoc);
+        Exit;
+      end;
+end;
+
+function TROMSXMLNode.GetNodesByName(const aNodeName: UnicodeString): IXMLNodeList;
+var list : IXMLDOMNodeList;
+begin
+  result := NIL;
+
+  list := fNode.selectNodes(aNodeName);
+
+  if (list<>NIL) or (list.length>0)
+    then result := TROMSXMLNodeList.Create(list, fDoc);
+end;
+
+function TROMSXMLNode.GetAttributeByName(
+  const anAttributeName: UnicodeString): IXMLNode;
+var node : IXMLDOMNode;
+begin
+  result := NIL;
+  if fNode.attributes = nil then exit;
+  node := fNode.attributes.getNamedItem(anAttributeName);
+
+  if (node<>NIL)
+    then result := TROMSXMLNode.Create(node, fDoc);
+end;
+
+function TROMSXMLNode.GetRef: pointer;
+begin
+  result := pointer(fNode);
+end;
+
+function TROMSXMLNode.GetLocalName: UnicodeString;
+begin
+  result := fNode.baseName
+end;
+
+function TROMSXMLNode.AddAttribute(const anAttributeName : UnicodeString;
+  const anAttributeValue : Variant;aCreateResultNode: Boolean = True) : IXMLNode;
+var
+  attr : IXMLDOMAttribute;
+begin
+  attr := fNode.ownerDocument.createAttribute(anAttributeName);
+  attr.value := anAttributeValue;
+  fNode.attributes.setNamedItem(attr);
+  if aCreateResultNode then
+    result := TROMSXMLNode.Create(attr, fDoc)
+  else
+    result:=nil;
+end;
+
+function TROMSXMLNode.GetParent: IXMLNode;
+begin
+  result := NIL;
+  if (fNode.parentNode<>NIL)
+    then result := TROMSXMLNode.Create(fNode.parentNode, fDoc);
+end;
+
+function TROMSXMLNode.GetAttributeCount: integer;
+begin
+  result := fNode.attributes.length
+end;
+
+function TROMSXMLNode.GetChildrenCount: integer;
+begin
+  result := fNode.childNodes.length
+end;
+
+function TROMSXMLNode.GetAttributeValue(const anAttributeName: UnicodeString;
+  DefaultValue: Variant): Variant;
+var attr : IXMLNode;
+begin
+  attr := GetAttributeByName(anAttributeName);
+  if (attr<>NIL) then result := attr.Value
+                else result := DefaultValue;
+end;
+
+function TROMSXMLNode.GetNodeValue(const aNodeName: UnicodeString;
+  const Default: Variant): Variant;
+var node : IXMLNode;
+begin
+  node := GetNodeByName(aNodeName);
+  if (node=NIL) then result := Default
+                else result := node.Value;
+end;
+
+function TROMSXMLNode.GetFirstChild: IXMLNode;
+var
+  aNode: IXMLDOMNode;
+begin
+  aNode := fNode.firstChild;
+  if aNode <> nil then
+    Result := TROMSXMLNode.Create(aNode, fDoc)
+  else
+    Result := nil;
+end;
+
+function TROMSXMLNode.GetNextSibling: IXMLNode;
+var
+  aNode: IXMLDOMNode;
+begin
+  aNode := fNode.nextSibling;
+  if aNode <> nil then
+    Result := TROMSXMLNode.Create(aNode, fDoc)
+  else
+    Result := nil;
+end;
+
+function TROMSXMLNode.GetNamespaceURI: UnicodeString;
+begin
+  result := fNode.namespaceURI;
+end;
+
+function TROMSXMLNode.AddXml(const Xml: UnicodeString): IXMLNode;
+var
+  doc: TROMSXMLDocument;
+begin
+  doc := TROMSXMLDocument.Create;
+  try
+    doc.New();
+    doc.SetXML(Xml);
+    if doc.fDocument.documentElement <> nil then begin
+      result := TROMSXMLNode.Create(fNode.appendChild(doc.fDocument.documentElement), fDoc);
+    end else result := nil;
+  finally
+    doc.Free;
+  end;
+end;
+
+function TROMSXMLNode.GetDocument: IXMLDocument;
+begin
+  Result := fDoc;
+end;
+
+{ TROMSXMLNodeList }
+
+constructor TROMSXMLNodeList.Create(const aNodeList: IXMLDOMNodeList; aDoc: IXMLDocument);
+begin
+  if not Assigned(aNodeList)
+    then RaiseError(err_DOMElementIsNIL, []);
+
+  inherited Create;
+
+  fNodeList := aNodeList;
+  fDoc := aDoc;
+end;
+
+destructor TROMSXMLNodeList.Destroy;
+begin
+//  fNodeList := NIL;
+  inherited;
+end;
+
+function TROMSXMLNodeList.GetCount: integer;
+begin
+  result := fNodeList.length
+end;
+
+function TROMSXMLNodeList.GetNodes(Index: integer): IXMLNode;
+begin
+  result := TROMSXMLNode.Create(fNodeList.item[Index], fDoc)
+end;
+
+{ TROMSXMLDocument }
+
+constructor TROMSXMLDocument.Create;
+begin
+  inherited Create;
+  fDocument := NIL;
+end;
+
+destructor TROMSXMLDocument.Destroy;
+begin
+  fDocument := NIL;
+  inherited;
+end;
+
+function TROMSXMLDocument.GetDocumentNode: IXMLNode;
+begin
+  result := TROMSXMLNode.Create(fDocument.documentElement, self)
+end;
+
+function TROMSXMLDocument.GetEncoding: TXMLEncoding;
+begin
+  result := xeUTF8; // TODO: Complete the UTF8/16 differentiation.
+end;
+
+function TROMSXMLDocument.GetXml: UnicodeString;
+begin
+  result := fDocument.xml;
+end;
+
+procedure TROMSXMLDocument.LoadFromFile(const aFileName: string);
+begin
+  if not fDocument.load(aFileName)
+    then with fDocument.parseError do
+      RaiseError(err_CannotLoadXMLDocument, [Reason, Line, linePos]);
+end;
+
+procedure TROMSXMLDocument.LoadFromStream(aStream: TStream);
+var adapter : IStream;
+begin
+  aStream.Position := 0;
+  adapter := TStreamAdapter.Create(aStream, soReference);
+  fDocument.async := FALSE;
+  if not fDocument.load(adapter) then
+    with fDocument.parseError do
+      RaiseError(err_CannotLoadXMLDocument, [Reason, Line, linePos]);
+end;
+
+procedure TROMSXMLDocument.New(aDocumentName : UnicodeString = ''; anEncoding : TXMLEncoding = xeUTF8);
+var
+  lPi: IXMLDOMProcessingInstruction;
+begin
+{   !!! IMPORTANT !!!
+
+    If you get an exception saying "CoInitialize has not been called" make sure the unit
+    uROCOMInit.pas is included in *and* is the FIRST UNIT of your DPR file.
+
+    For example:
+
+       program NewProject;
+
+       uses
+         uROCOMInit, <--- HERE!!!
+         Forms,
+         [..]
+}  
+  if fDocument <> nil then begin
+    While fDocument.childNodes.length >0 do
+      fDocument.removeChild(fDocument.childNodes[0]);
+  end else
+
+  try
+    if msxml40 in InstalledMSXMLVersions
+      then fDocument := CoDOMDocument40.Create // See note above in case of an exception here
+
+    else if msxml30 in InstalledMSXMLVersions
+      then fDocument := CoDOMDocument30.Create // See note above in case of an exception here
+
+    else if msxml26 in InstalledMSXMLVersions
+      then fDocument := CoDOMDocument26.Create // See note above in case of an exception here
+
+      else RaiseError(err_NoXMLParsersAvailable, []);
+
+    fDocument.async := false;
+
+  except
+    on E:Exception do RaiseError(err_ErrorCreatingMsXmlDoc,[E.ClassName, E.Message]);
+    else raise;
+  end;
+
+  if (aDocumentName<>'')
+    then fDocument.documentElement := fDocument.createElement(aDocumentName);
+  if anEncoding = xeUTF8 then
+    lpi := fDocument.createProcessingInstruction('xml', 'version="1.0" encoding="utf-8"')
+  else
+    lpi := fDocument.createProcessingInstruction('xml', 'version="1.0" encoding="utf-16"');
+  fDocument.insertBefore(lpi, fDocument.childNodes[0]);
+  fDocument.preserveWhiteSpace := true;
+  fDocument.resolveExternals := false;
+  fDocument.validateOnParse := false;
+end;
+
+procedure TROMSXMLDocument.SaveToFile(const aFileName: string);
+begin
+  fDocument.save(aFileName);
+end;
+
+procedure TROMSXMLDocument.SaveToStream(aStream: TStream);
+var adapter : IStream;
+begin
+  adapter := TStreamAdapter.Create(aStream, soReference);
+  fDocument.save(adapter);
+end;
+
+function DetectMSXMLVersions : TMSXMLVersions;
+var
+    sysdir : array[0..199] of Char;
+    ver : TMSXMLVersion;
+begin
+  result := [];
+
+  GetSystemDirectory(sysdir, SizeOf(sysdir));
+  
+  for ver := Low(TMSXMLVersion) to High(TMSXMLVersion) do
+    if FileExists(IncludeTrailingPathDelimiter(sysdir)+MSXMLFileNames[ver])
+      then result := result+[ver];
+end;
+
+procedure TROMSXMLDocument.SetXML(const Value: UnicodeString);
+begin
+  if not fDocument.loadXML(Value) then
+    raise Exception.Create('Invalid input');
+end;
+
+const MSXMLDOM_Name = 'Msxml2.DOMDocument.3.0';
+
+function TROMSXMLDocument.Transform(const aXSL: string): string;
+var
+  XSLStylesheet: IXMLDOMDocument2;
+  XSLTemplate: IXSLTemplate;
+  XSLProcessor: IXSLProcessor;
+  adapter : IStream;
+  aStream: TROBinaryMemoryStream;
+begin
+  result := '';
+
+  XSLStylesheet := CoFreeThreadedDomDocument.Create;
+  XSLStylesheet.Async := FALSE;
+  if not XSLStylesheet.loadXML(aXSL)
+    then raise exception.create('Couldn''t load XSL stylesheet');
+
+  XSLTemplate := CoXSLTemplate.Create;
+  XSLTemplate._Set_stylesheet(XSLStylesheet);
+
+  XSLProcessor := XSLTemplate.createprocessor;
+  XSLProcessor.input := fDocument;
+
+  aStream := TROBinaryMemoryStream.Create('');
+  try
+    adapter := TStreamAdapter.Create(aStream, soReference);
+    XSLProcessor.output := adapter;
+    if XSLProcessor.Transform then begin
+      {$IFDEF UNICODE}
+      With TStringList.Create do try
+        aStream.Position:=0;
+        LoadFromStream(aStream);
+        Result := Text;
+      finally
+        Free;
+      end;
+      {$ELSE}
+      result := aStream.ToString;
+      {$ENDIF}
+    end;
+  finally
+    adapter:=nil;
+    aStream.Free;
+  end;
+end;
+
+initialization
+// Removed in favour of the unit uROCOMInit.pas which has to be added as first unit to the project's DPR
+// See http://www.devexpress.com/products/vcl/ewf/faq.asp#A8 for more info
+
+//  CoInitializeEx(nil, COINIT_MULTITHREADED or COINIT_SPEED_OVER_MEMORY);
+
+  InstalledMSXMLVersions := DetectMSXMLVersions;
+
+finalization
+//  CoUninitialize;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROMasterServerEventRepository.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROMasterServerEventRepository.pas
new file mode 100644
index 0000000..82c5cce
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROMasterServerEventRepository.pas	
@@ -0,0 +1,131 @@
+unit uROMasterServerEventRepository;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes, uROEventRepository, uROClientIntf, uROClient, uROTypes, ROMasterServerLibrary_Intf;
+
+type
+  { TROMasterServerEventRepository }
+  TROMasterServerEventRepository = class(TROEventRepository)
+  private
+    fChannel: TROTransportChannel;
+    fSessionManager : IROSessionManager;
+
+    procedure SetChannel(const Value: TROTransportChannel);
+    function GetSessionManager: IROSessionManager;
+
+  protected
+    procedure Notification(aComponent: TComponent; Operation: TOperation); override;
+
+    { Overrides }
+    procedure DoStoreEventData(SourceSessionID : TGUID; Data : Binary;
+                               const ExcludeSender: Boolean;
+                               const ExcludeSessionList: Boolean;
+                               const SessionList: String); override;
+    function DoGetEventData(SessionID : TGUID; var TargetStream : Binary) : integer; override;
+    procedure DoAddSession(aSessionID : TGUID); override;
+    procedure DoRemoveSession(aSessionID : TGUID); override;
+
+  public
+    constructor Create(aOwner : TComponent); override;
+    destructor Destroy; override;
+    procedure CheckProperties; override;
+    property SessionManager : IROSessionManager read GetSessionManager;
+
+  published
+    property Channel : TROTransportChannel read fChannel write SetChannel;
+
+  end;
+
+implementation
+
+uses
+  SysUtils, uROClasses;
+
+{ TROMasterServerEventRepository }
+
+procedure TROMasterServerEventRepository.CheckProperties;
+begin
+  Check(Channel = nil, Name + '.Channel must be assigned.');
+  Channel.CheckProperties;
+  inherited;
+end;
+
+constructor TROMasterServerEventRepository.Create(aOwner: TComponent);
+begin
+  inherited;
+end;
+
+destructor TROMasterServerEventRepository.Destroy;
+begin
+  inherited;
+end;
+
+procedure TROMasterServerEventRepository.DoAddSession(aSessionID: TGUID);
+begin
+  SessionManager.CreateSession(GUIDToAnsiString(aSessionID), NIL);
+end;
+
+function TROMasterServerEventRepository.DoGetEventData(SessionID: TGUID; var TargetStream: Binary): integer;
+begin
+  result := SessionManager.GetMessages(GUIDToAnsiString(SessionID), TargetStream);
+  TargetStream.Position := 0;
+end;
+
+procedure TROMasterServerEventRepository.DoRemoveSession(
+  aSessionID: TGUID);
+begin
+  SessionManager.DeleteSession(GUIDToAnsiString(aSessionID));
+end;
+
+procedure TROMasterServerEventRepository.DoStoreEventData(SourceSessionID : TGUID; Data : Binary;
+  const ExcludeSender: Boolean; const ExcludeSessionList: Boolean; const SessionList: String);
+begin
+  SessionManager.StoreMessage(GUIDToAnsiString(SourceSessionID), Data{, ExcludeSender, ExcludeSessionList, SessionList})
+end;
+
+function TROMasterServerEventRepository.GetSessionManager: IROSessionManager;
+begin
+  CheckProperties;
+  if (fSessionManager=NIL) then begin
+    fSessionManager := CoROSessionManager.Create(Message, Channel);
+  end;
+
+  result := fSessionManager;
+end;
+
+procedure TROMasterServerEventRepository.Notification(
+  aComponent: TComponent; Operation: TOperation);
+begin
+  inherited;
+
+  if (Operation<>opRemove) then Exit;
+
+  if (aComponent=fChannel) then fChannel := NIL;
+end;
+
+procedure TROMasterServerEventRepository.SetChannel(
+  const Value: TROTransportChannel);
+begin
+  if (fChannel=Value) then Exit;
+
+  fChannel := Value;
+  if (fChannel<>NIL) then fChannel.FreeNotification(Self);
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROMasterServerSessionManager.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROMasterServerSessionManager.pas
new file mode 100644
index 0000000..cf6db90
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROMasterServerSessionManager.pas	
@@ -0,0 +1,166 @@
+unit uROMasterServerSessionManager;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes, uROClient, uROSessions, uROBinMessage, uROTypes,
+  ROMasterServerLibrary_Intf;
+
+type
+  { TROMasterServerSessionManager }
+  TROMasterServerSessionManager = class(TROCustomSessionManager)
+  private
+    fBINMessage : TROBinMessage;
+    fChannel: TROTransportChannel;
+    fSessionManager : IROSessionManager;
+
+    procedure SetChannel(const Value: TROTransportChannel);
+    function GetSessionManager: IROSessionManager;
+
+  protected
+    procedure  Notification(AComponent: TComponent; Operation: TOperation); override;
+
+    { Overrides }
+    function DoFindSession(const aSessionID : TGUID; aUpdateTime: Boolean) : TROSession; override;
+    procedure DoDeleteSession(const aSessionID : TGUID; IsExpired : boolean); override;
+    procedure DoClearSessions(OnlyExpired : boolean); override;
+    function DoGetSessionCount : integer; override;
+    procedure DoReleaseSession(aSession : TROSession; NewSession : boolean); override;
+
+    property SessionManager : IROSessionManager read GetSessionManager;
+    property OnSessionDeleted;
+  public
+    constructor Create(aOwner : TComponent); override;
+    destructor Destroy; override;
+    procedure CheckProperties; override;
+  published
+    property Channel : TROTransportChannel read fChannel write SetChannel;
+
+  end;
+
+implementation
+
+uses
+  SysUtils, uROClasses, uRORes;
+
+{ TROMasterServerSessionManager }
+
+procedure TROMasterServerSessionManager.CheckProperties;
+begin
+  Check(Channel = nil, Name + '.Channel must be assigned.');
+  Channel.CheckProperties;
+end;
+
+constructor TROMasterServerSessionManager.Create(aOwner: TComponent);
+begin
+  inherited;
+
+  fBINMessage := TROBinMessage.Create(Self);
+  // in order to kill checktimer set interval to 0
+  Self.SessionCheckInterval := 0;
+end;
+
+destructor TROMasterServerSessionManager.Destroy;
+begin
+  inherited;
+end;
+
+procedure TROMasterServerSessionManager.DoClearSessions(
+  OnlyExpired: boolean);
+begin
+  // do nothing
+end;
+
+procedure TROMasterServerSessionManager.DoDeleteSession(
+  const aSessionID: TGUID; IsExpired: boolean);
+begin
+  SessionManager.DeleteSession(GUIDToAnsiString(aSessionID));
+end;
+
+function TROMasterServerSessionManager.DoFindSession(
+  const aSessionID: TGUID; aUpdateTime: Boolean): TROSession;
+var
+  usersession : TROUserSession;
+begin
+  result := NIL;
+  usersession := SessionManager.ReadSession(GUIDToAnsiString(aSessionID));
+  if (usersession<>NIL) then try
+    //result := TROSession.Create(aSessionID);
+    result := DoCreateSession(aSessionID);
+    result.Created := usersession.Created;
+    result.LastAccessed := usersession.LastAccessed;
+    result.LoadFromStream(usersession.Data, TRUE);
+  finally
+    usersession.Free;
+  end;
+end;
+
+function TROMasterServerSessionManager.DoGetSessionCount: integer;
+begin
+  result := SessionManager.GetSessionCount;
+end;
+
+procedure TROMasterServerSessionManager.DoReleaseSession(
+  aSession: TROSession; NewSession: boolean);
+var data : Binary;
+begin
+  data := Binary.Create;
+  try
+    aSession.SaveToStream(data, TRUE);
+
+    if NewSession
+      then SessionManager.CreateSession(GUIDToAnsiString(aSession.SessionID), data)
+      else SessionManager.UpdateSession(GUIDToAnsiString(aSession.SessionID), data);
+    aSession.Free();
+  finally
+    data.Free;
+  end;
+end;
+
+function TROMasterServerSessionManager.GetSessionManager: IROSessionManager;
+begin
+  CheckProperties;
+
+  if (fSessionManager=NIL) then begin
+    fSessionManager := CoROSessionManager.Create(fBINMessage, fChannel);
+  end;
+
+  result := fSessionManager;
+end;
+
+procedure TROMasterServerSessionManager.Notification(
+  AComponent: TComponent; Operation: TOperation);
+begin
+  inherited;
+
+  if (Operation<>opRemove) then Exit;
+
+  if (AComponent=fChannel)
+    then fChannel := NIL;
+end;
+
+procedure TROMasterServerSessionManager.SetChannel(
+  const Value: TROTransportChannel);
+begin
+  if (fChannel=Value) then Exit;
+
+  fChannel := Value;
+  fSessionManager := NIL;
+  if (fChannel<>NIL) then fChannel.FreeNotification(Self);
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRONamedPipeChannel.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRONamedPipeChannel.pas
new file mode 100644
index 0000000..6d9522b
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRONamedPipeChannel.pas	
@@ -0,0 +1,338 @@
+unit uRONamedPipeChannel;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Enterprise Library                                }
+{                                                                            }
+{ compiler: Delphi 5 and up                                                  }
+{ platform: Win32                                                            }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Provided by Robert Love (robert.love@teamro.remobjects.com)                }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+
+{$I RemObjects.inc}
+
+//TODO: Make sure with testing that client behaves well when server connection broken.
+
+interface
+
+uses
+  Classes, Sysutils, uROClient, uROClientIntf, uROClasses, uROTypes, Windows;
+
+type
+  TRONamedPipeChannel = class(TROTransportChannel,IROTransport)
+  private
+   fServerName: string;
+   fServerID: string;
+   FActive: Boolean;
+   FActivateOnDemand: Boolean;
+   procedure SetServerID(const Value: string);
+   procedure SetServerName(const Value: string);
+   procedure SetActive(const Value: Boolean);
+   procedure SetActivateOnDemand(const Value: Boolean);
+  protected
+   hPipe : THandle;
+
+   procedure IntDispatch(aRequest, aResponse : TStream); override;
+   function GetPipeName : string;  virtual;
+   procedure SendAndRecv(aRequest, aResponse : TStream); virtual;
+   function DataWaiting: Boolean; virtual;
+
+   { IROTransport }
+   function GetTransportObject : TObject; override;
+
+  public
+   constructor Create(Owner : TComponent); override;
+   destructor Destroy; override;
+   procedure Connect; virtual;
+   procedure Disconnect; virtual;
+   procedure CheckProperties; override;
+  published
+   property ActivateOnDemand : Boolean read FActivateOnDemand write SetActivateOnDemand default true;
+   property Active : Boolean read FActive write SetActive default false;
+   property ServerID : string read fServerID write SetServerID;
+   property ServerName : string read fServerName write SetServerName;
+  published
+   property SynchronizedProbing;
+   property OnSendStream;
+   property OnReceiveStream;
+   property ServerLocators;
+   property DispatchOptions;
+   property OnServerLocatorAssignment;
+   property ProbeServers;
+   property ProbeFrequency;
+   property OnBeforeProbingServers;
+   property OnAfterProbingServers;
+   property OnBeforeProbingServer;
+   property OnAfterProbingServer;
+   property OnLoginNeeded;
+  end;
+implementation
+{ TRONamedPipeChannel }
+
+procedure TRONamedPipeChannel.connect;
+var
+ dwmode : DWord;
+begin
+    hPipe := CreateFile(
+       pchar(GetPipeName),   // pipe name
+       GENERIC_READ or       // read and write access
+       GENERIC_WRITE,
+       0,              // no sharing
+       nil,            // no security attributes
+       OPEN_EXISTING,  // opens existing pipe
+       0,              // default attributes
+       0);             // no template file
+
+   FActive := not (hPipe= INVALID_HANDLE_VALUE);
+   if (GetLastError = ERROR_PIPE_BUSY) then
+    begin
+      // All pipe instances are busy, so wait for 20 seconds.
+      if (not WaitNamedPipe(pchar(GetPipeName), 20000) ) then
+       begin
+        FActive := False;
+        raise EROChannelBusy.Create('Named Pipe Server is Busy');
+       end;
+      hPipe := CreateFile(
+         pchar(GetPipeName),   // pipe name
+         GENERIC_READ or       // read and write access
+         GENERIC_WRITE,
+         0,              // no sharing
+         nil,            // no security attributes
+         OPEN_EXISTING,  // opens existing pipe
+         0,              // default attributes
+         0);             // no template file
+      FActive := not (hPipe= INVALID_HANDLE_VALUE);
+   end;
+   if Not FActive then RaiseLastOSError;
+
+   dwMode := PIPE_READMODE_MESSAGE;
+   if not SetNamedPipeHandleState(
+          hPipe,    // pipe handle
+          dwMode,  // new pipe mode
+          nil,      // don't set maximum bytes
+          nil)      // don't set maximum time
+     Then
+      begin
+       Disconnect;
+       raise Exception.Create('Unable to change to Message Read Mode');
+      end;
+end;
+
+procedure TRONamedPipeChannel.Disconnect;
+begin
+  CloseHandle(hPipe);
+  FActive := False;
+end;
+
+constructor TRONamedPipeChannel.Create(Owner: TComponent);
+begin
+ inherited Create(Owner);
+ FActivateOnDemand := true;
+ FActive := false;
+ FServerID := 'RONamedPipeServer';
+ fServerName := '.'; // localhost
+end;
+
+function TRONamedPipeChannel.GetTransportObject: TObject;
+begin
+ result := self;
+end;
+
+procedure TRONamedPipeChannel.IntDispatch(aRequest, aResponse: TStream);
+begin
+ if (Not FActive) and (Not FActivateOnDemand) then
+  raise Exception.Create('Operation can not be performed on a closed connection.');
+ if (Not Factive) then
+   Connect;
+ SendAndRecv(aRequest,aResponse);
+ if FActivateOnDemand then
+   Disconnect;
+end;
+
+function TRONamedPipeChannel.GetPipeName: string;
+begin
+  CheckProperties;
+  result := '\\' + fServerName + '\pipe\' + fServerID;
+end;
+
+procedure TRONamedPipeChannel.SendAndRecv(aRequest, aResponse: TStream);
+var
+ fBuf : PChar;
+ FSize : Integer;
+ fSuccess : BOOL;
+ FBytes   : DWord;
+ BufSize  : integer;
+begin
+  //  ViktorT changed
+  BufSize := 4096;
+  GetMem(fBuf, BufSize);
+
+  try
+    try
+      aRequest.Position := 0;
+      FSize := aRequest.Size;
+      //  Send Request size to recipient (server)
+      fSuccess := WriteFile(hPipe, FSize, sizeof(FSize), FBytes, nil);
+
+      if not FSuccess then
+        RaiseLastOSError;
+
+      while FSize > 0 do
+      begin
+        FBytes := aRequest.Read(fBuf^, BufSize);
+        dec(FSize, FBytes);
+        fSuccess := WriteFile(hPipe, fBuf^, FBytes, FBytes, nil);
+
+        if not FSuccess then
+          RaiseLastOSError;
+      end;
+
+      if not FSuccess then
+        RaiseLastOSError;
+
+      fSuccess := ReadFile(hPipe, FSize, sizeof(FSize), FBytes, nil);
+
+      if not FSuccess then
+        RaiseLastOSError;
+
+      while FSize > 0 do
+      begin
+        fSuccess := ReadFile(hPipe, fBuf^, BufSize, FBytes, nil);
+
+        if (not fSuccess) and (GetLastError <> ERROR_MORE_DATA) then
+          RaiseLastOSError;
+
+        if  FBytes > 0  then
+          aResponse.Write(fBuf^, FBytes);
+
+        dec(FSize, FBytes);
+      end;
+    except
+      on e: Exception do
+      begin
+        Factive := False;
+        CloseHandle(hPipe);
+      end;
+    end;
+  finally
+    FreeMem(fBuf);
+  end;
+(*
+ FSize := aRequest.Size;
+ GetMem(fBuf,FSize);
+ try
+   FillChar(fBuf^,FSize,0);
+   aRequest.Seek(0,soFromBeginning);
+   aRequest.ReadBuffer(fBuf[0],FSize);
+   // Send Buffer to Server
+   fSuccess := WriteFile(
+      hPipe,                  // pipe handle
+      fBuf[0],                // message
+      FSize,                  // message length
+      FBytes,                 // bytes written
+      nil) ;                  // not overlapped
+   if not FSuccess then
+   begin
+     //  ViktorT
+     Factive := False;
+     RaiseLastOSError;
+   end;
+   While Not DataWaiting do
+     Sleep(10);
+
+   while DataWaiting do
+    begin
+        // Read from the pipe.
+       fSuccess := ReadFile(
+          hPipe,          // pipe handle
+          fBuf[0],        // buffer to receive reply
+          fSize,          // size of buffer
+          FBytes,         // number of bytes read
+          nil);           // not overlapped
+       if (Not fSuccess) and (GetLastError <> ERROR_MORE_DATA) then
+       begin
+          //  ViktorT
+          Factive := False;
+          RaiseLastOSError;
+       end;
+       if Fbytes > 0 then
+          aResponse.WriteBuffer(FBuf[0],fBytes);
+     end;
+ finally
+  FreeMem(fBuf);
+ end; // finally
+*)
+end; // SendAndRecv
+
+
+function TRONamedPipeChannel.DataWaiting: Boolean;
+var
+ fSuccess : BOOL;
+ BytesAvail : Integer;
+begin
+  FSuccess := PeekNamedPipe(hPipe,nil,0,nil,@BytesAvail,nil);
+  if not FSuccess then
+  begin
+    //  ViktorT
+    Factive := False;
+    RaiseLastOSError;
+  end;
+  result := (BytesAvail >0);
+end; // DataWaiting
+
+
+procedure TRONamedPipeChannel.SetActivateOnDemand(const Value: Boolean);
+begin
+  FActivateOnDemand := Value;
+end;
+
+procedure TRONamedPipeChannel.SetActive(const Value: Boolean);
+begin
+ if FActive <> Value then
+  begin
+    if Value
+     then Connect
+     else Disconnect;
+  end;
+end;
+
+
+procedure TRONamedPipeChannel.SetServerID(const Value: string);
+begin
+  fServerID := Value;
+end;
+
+procedure TRONamedPipeChannel.SetServerName(const Value: string);
+begin
+  fServerName := Value;
+end;
+
+
+procedure TRONamedPipeChannel.CheckProperties;
+begin
+  Check(ServerID = '', Name+'.ServerID must be set.');
+  Check(ServerName = '', Name+'.ServerName must be set.');
+  inherited;
+end;
+
+destructor TRONamedPipeChannel.Destroy;
+begin
+  if FActive then begin
+    Disconnect;
+  end;
+  inherited;
+end;
+
+initialization
+  RegisterTransportChannelClass(TRONamedPipeChannel);
+
+finalization
+  UnRegisterTransportChannelClass(TRONamedPipeChannel);
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRONamedPipeServer.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRONamedPipeServer.pas
new file mode 100644
index 0000000..190edd2
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRONamedPipeServer.pas	
@@ -0,0 +1,482 @@
+unit uRONamedPipeServer;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Enterprise Library                                }
+{                                                                            }
+{ compiler: Delphi 5 and up                                                  }
+{ platform: Win32                                                            }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Provided by Robert Love (robert.love@teamro.remobjects.com)                }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+//TODO: Add OnFatalException Handler to send exception to main thread to be raised.
+
+interface
+
+{$WARN SYMBOL_DEPRECATED OFF} // This unit is only for Win32
+
+uses
+  Sysutils,Classes, Windows, Messages, uROClientIntf, uROServer, uROClasses, uROThread;
+
+const
+  PIPE_TIMEOUT = 1000;
+  BUFFER_SIZE  = 4096;
+
+type
+  TRONamedPipeServer = class;
+
+  TROPipeListenerThread = class(TROInitializedThread)
+  private
+    { Private declarations }
+    fPipename : string;
+    FList : TThreadList;
+    FServer : TRONamedPipeServer;
+    FFatalError: TObject;
+    hPipe : THandle;
+    procedure ConnectOnTerminate(Sender : TObject);
+    function GetPipename: String;
+    procedure SetPipeName(const Value: String);
+    procedure RaiseException;
+    procedure EmulateConnect;
+  protected
+    procedure Execute; override;
+    property PipeName : String read GetPipename write SetPipeName;
+    property ConnectList : TThreadList read FList;
+    property Server : TRONamedPipeServer read FServer Write FServer;
+    property FatalError : TObject read FFatalError write FFatalError;
+  end;
+
+  TROPipeConnectionThread = class(TROThread)
+  private
+    FPipeHandle: THandle;
+    fTransport : IROTransport;
+    FServer : TRONamedPipeServer;
+    FFatalError: TObject;
+    procedure Disconnect;
+    procedure RaiseException;
+  protected
+    procedure Execute; override;
+    property PipeHandle : THandle read FPipeHandle write FPipeHandle;
+    property Transport : IROTransport read FTransport write FTransport;
+    property Server : TRONamedPipeServer read FServer Write FServer;
+    property FatalError : TObject read FFatalError write FFatalError;
+  public
+    constructor Create(aCreateSuspended:Boolean);
+  end;
+
+  TRONamedPipeServer = class(TROServer, IROTransport)
+  private
+    fServerID: string;
+    fTransport : IROTransport;
+    FActive : Boolean;
+    FListener : TROPipeListenerThread;
+    FAllowEveryone : Boolean;
+  protected
+    { Internals }
+    procedure IntSetActive(const Value: boolean); override;
+    function IntGetActive : boolean; override;
+
+    procedure ActivateServer; virtual;
+    property Listener: TROPipeListenerThread read FListener;
+
+   { IROTransport }
+    function GetTransportObject : TObject;
+  public
+    constructor Create(aOwner : TComponent); override;
+    destructor Destroy; override;
+    procedure CheckProperties; override;
+  published
+    property ServerID : string read fServerID write fServerID;
+    property AllowEveryone : Boolean read FAllowEveryone write FAllowEveryone default false;
+  end;
+
+implementation
+
+procedure TROPipeListenerThread.ConnectOnTerminate(Sender: TObject);
+var
+ LL : TList;
+ id : Integer;
+begin
+ if Terminated then Exit;
+ LL := FList.LockList;
+ try
+ id := LL.IndexOf(sender);
+ if id >= 0 then
+   LL.Delete(id);
+ finally
+  FList.UnlockList;
+ end;
+end;
+
+procedure TROPipeListenerThread.EmulateConnect;
+var
+ i: cardinal;
+begin
+ if hPipe <> INVALID_HANDLE_VALUE then
+   CallNamedPipe(pchar(fPipeName), nil, 0, nil, 0, i, 10);
+end;
+
+{$IFDEF FPC}
+const
+  PIPE_UNLIMITED_INSTANCES = 255;
+{$ENDIF}
+
+procedure TROPipeListenerThread.Execute;
+var
+ fconnected : bool;
+ PC :  TROPipeConnectionThread;
+ LL : TList;
+ I  : Integer;
+ lSecurityDescriptor : _SECURITY_DESCRIPTOR;
+ lSecurityAttribute : SECURITY_ATTRIBUTES;
+begin
+ hPipe := INVALID_HANDLE_VALUE;
+ try
+  if FServer.AllowEveryone then begin
+    FillChar(lSecurityAttribute, sizeof(lSecurityAttribute), 0);
+    InitializeSecurityDescriptor(@lSecurityDescriptor, SECURITY_DESCRIPTOR_REVISION);
+    SetSecurityDescriptorDacl(@lSecurityDescriptor, true, nil, False);
+    lSecurityAttribute.nLength := sizeof(lSecurityAttribute);
+    lSecurityAttribute.bInheritHandle := True;
+    lSecurityAttribute.lpSecurityDescriptor := @lSecurityDescriptor;
+  end;
+  FList := TThreadList.Create;
+  try
+  While not Terminated do
+   begin
+     if FServer.AllowEveryone then begin
+      hPipe := CreateNamedPipe(
+          pchar(fPipeName),      // pipe name
+          PIPE_ACCESS_DUPLEX,       // read/write access
+          PIPE_TYPE_MESSAGE or      // message type pipe
+          PIPE_READMODE_BYTE or     // byte-read mode
+          PIPE_WAIT,                // blocking mode
+          PIPE_UNLIMITED_INSTANCES, // max. instances
+          BUFFER_SIZE,              // output buffer size
+          BUFFER_SIZE,              // input buffer size
+          PIPE_TIMEOUT,             // client time-out
+          @lSecurityAttribute);
+      end else begin
+      hPipe := CreateNamedPipe(
+          pchar(fPipeName),      // pipe name
+          PIPE_ACCESS_DUPLEX,       // read/write access
+          PIPE_TYPE_MESSAGE or      // message type pipe
+          PIPE_READMODE_BYTE or     // byte-read mode
+          PIPE_WAIT,                // blocking mode
+          PIPE_UNLIMITED_INSTANCES, // max. instances
+          BUFFER_SIZE,              // output buffer size
+          BUFFER_SIZE,              // input buffer size
+          PIPE_TIMEOUT,             // client time-out
+          nil);                     // no security attribute
+      end;
+
+      if (hPipe = INVALID_HANDLE_VALUE) then
+        RaiseLastOSError;
+
+      // Wait for the client to connect; if it succeeds,
+      // the function returns a nonzero value. If the function returns
+      // false, GetLastError should returns ERROR_PIPE_CONNECTED.
+      fConnected := ConnectNamedPipe(hPipe, nil);
+      if not fConnected then
+         fConnected := (GetLastError = ERROR_PIPE_CONNECTED);
+
+      if fConnected  and not Terminated then
+      begin
+          PC := TROPipeConnectionThread.create(true);
+          PC.PipeHandle := hPipe;
+          PC.Server := FServer;
+          PC.FreeOnTerminate := True;
+          PC.Resume;
+      end
+      else
+      begin
+        // The client could not connect, so close the pipe.
+         CloseHandle(hPipe);
+         hPipe := INVALID_HANDLE_VALUE;
+      end;
+   end;
+  finally
+   LL := FList.LockList;
+   try
+   // Terminate all client connections because if here then this thread is terminating
+   for I := 0 to LL.Count -1 do
+     TROPipeConnectionThread(LL.Items[I]).Terminate;
+   finally
+     FList.UnlockList;
+   end;
+   FList.Free;
+  end;
+ except
+   on e : TObject do
+    begin
+      FatalError := E;
+      // Make sure exception is raised in main thread.
+      Synchronize(RaiseException);
+    end;
+ end; // except
+end;
+
+function TROPipeListenerThread.GetPipename: String;
+begin
+ result := string(fPipeName);
+end;
+
+procedure TROPipeListenerThread.RaiseException;
+begin
+  raise FatalError;
+end;
+
+procedure TROPipeListenerThread.SetPipeName(const Value: String);
+begin
+ fPipeName := Value;
+end;
+
+{ TROPipeConnectionThread }
+
+constructor TROPipeConnectionThread.Create(aCreateSuspended:Boolean);
+begin
+  inherited Create(aCreateSuspended,'TROPipeConnectionThread');
+end;
+{
+function TROPipeConnectionThread.DataWaiting: Boolean;
+var
+ fSuccess : BOOL;
+ BytesAvail : Integer;
+begin
+  FSuccess := PeekNamedPipe(FPipeHandle,nil,0,nil,@BytesAvail,nil);
+  if not FSuccess then
+    RaiseLastWin32Error;
+  result := (BytesAvail >0);
+end;
+}
+procedure TROPipeConnectionThread.Disconnect;
+begin
+// Flush the pipe to allow the client to read the pipe's contents
+// before disconnecting. Then disconnect the pipe, and close the
+// handle to this pipe instance.
+   FlushFileBuffers(FPipeHandle);
+   DisconnectNamedPipe(FPipeHandle);
+   CloseHandle(FPipeHandle);
+end;
+
+procedure TROPipeConnectionThread.Execute;
+var
+ ReadStream,
+ WriteStream : TMemoryStream;
+ fBytesRead,fBytesWritten : DWORD;
+ fSuccess : BOOL;
+ fDataSize: integer;
+ fBuf: PChar;
+begin
+  GetMem(fBuf, BUFFER_SIZE);
+  readStream  := TMemoryStream.Create;
+  writeStream := nil;
+  try
+    try
+      While Not Terminated do
+      begin
+        // Read incomming Data
+        fSuccess := ReadFile(fPipeHandle, fDataSize, sizeof(fDataSize), fBytesRead, nil);
+
+        if Not fSuccess then
+          if  GetLastError = ERROR_BROKEN_PIPE then
+            //  The pipe has been ended
+            break
+          else
+            RaiseLastOSError;
+
+        while fDataSize > 0 do
+        begin
+          fSuccess := ReadFile(fPipeHandle, fBuf^, BUFFER_SIZE, fBytesRead, nil);
+
+          if (not fSuccess) and (GetLastError <> ERROR_MORE_DATA) then
+            RaiseLastOSError;
+
+          if  fBytesRead > 0  then
+            ReadStream.Write(fBuf^, fBytesRead);
+
+          dec(fDataSize, fBytesRead);
+        end;
+
+        if not FSuccess then
+          RaiseLastOSError;
+
+        if  ReadStream.Size > 0 then
+        begin
+          writeStream := TMemoryStream.Create;
+          ReadStream.Position := 0;
+          FServer.DispatchMessage(fServer.FTransport, ReadStream, writeStream);
+          ReadStream.Position := 0;
+          ReadStream.SetSize(0);
+          writeStream.Position := 0;
+          fDataSize := writeStream.Size;
+          fSuccess := WriteFile(fPipeHandle, fDataSize, sizeof(fDataSize), fBytesWritten, nil);
+
+          if not fSuccess then
+            RaiseLastOSError;
+
+          while fDataSize > 0 do
+          begin
+            fBytesRead := writeStream.Read(fBuf^, BUFFER_SIZE);
+            dec(fDataSize, fBytesRead);
+            fSuccess := WriteFile(fPipeHandle, fBuf^, fBytesRead, fBytesWritten, nil);
+
+            if not FSuccess then
+              RaiseLastOSError;
+          end;
+        end;
+      end;
+    except
+      on e: Exception do
+      begin
+        // Only expected message is a broken pipe and it should be ignored.
+        if not ((e is EWin32Error)
+          and ((EWin32Error(E).ErrorCode = ERROR_BROKEN_PIPE)
+               {or (EWin32Error(E).ErrorCode = ERROR_NO_DATA)})) then
+        begin
+          FatalError := E;
+          // Make sure exception is raised in main thread.
+          Synchronize(RaiseException);
+        end;
+      end;
+    end;
+  finally
+    FreeMem(fBuf);
+    ReadStream.Free;
+    WriteStream.Free;
+    Disconnect;
+    if FServer.FListener <> nil then fServer.FListener.ConnectOnTerminate(self);
+ end;
+(*
+    // Read incomming Data
+    // Empty incomming buffer into Stream
+    FSuccess := True;
+    while DataWaiting do
+     begin
+       fSuccess := ReadFile(fPipeHandle,ReadBuf,BUFFER_SIZE,fBytesRead,nil);
+       if (Not fSuccess) and (GetLastError <> ERROR_MORE_DATA) then
+         Break;
+       if (FBytesRead > 0) then
+          ReadStream.WriteBuffer(ReadBuf[0],fBytesRead);
+       if fSuccess then break;
+     end;
+    if Not FSuccess then
+     RaiseLastWIn32Error;
+    fIncommingData := (FSuccess and (ReadStream.Size > 0));
+    if FIncommingData then
+     begin
+       // Transport Data
+        WriteStream.Clear;
+        FServer.DispatchMessage(fServer.FTransport, Readstream, Writestream);
+        ReadStream.Clear;
+       // Write Contents from RO back out Pipe
+       fBytesRead := 1; //just to start loop
+       While FBytesRead > 0 do
+       begin
+         fBytesRead := WriteStream.Read(WriteBuf,BUFFER_SIZE);
+         if FBytesRead > 0 then
+          begin
+           fSuccess := WriteFile(FPipeHandle,WriteBuf,fBytesRead,fBytesWritten,nil);
+           if (not FSuccess) then
+              RaiseLastWin32Error;
+           end;
+       end;  // while FBytesRead > 0
+     end; // if FIncommingData
+   end; // while not terminated
+
+ finally
+   Disconnect;
+   ReadStream.Free;
+   WriteStream.Free;
+ end;
+except
+  on e: Exception do
+   begin
+   // Only expected message is a broken pipe and it should be ignored.
+    if not ((e is EWin32Error) and (EWin32Error(E).ErrorCode = ERROR_BROKEN_PIPE)) then
+     begin
+      FatalError := E;
+      // Make sure exception is raised in main thread.
+      Synchronize(RaiseException);
+     end;
+   end;
+end; //except
+*)
+end;
+
+
+procedure TROPipeConnectionThread.RaiseException;
+begin
+ raise FatalError;
+end;
+
+{ TRONamedPipeServer }
+
+procedure TRONamedPipeServer.ActivateServer;
+begin
+if FActive then
+ begin
+   CheckProperties;
+   FListener := TROPipeListenerThread.create(true);
+   FListener.PipeName := '\\.\pipe\'+ ServerID;
+   FListener.FreeOnTerminate := True;
+   FListener.Server := Self;
+   FListener.Resume;
+ end
+ else begin
+   FListener.Terminate;
+   FListener.EmulateConnect;
+ end;
+end;
+
+procedure TRONamedPipeServer.CheckProperties;
+begin
+  Check(ServerID = '', Name + '.ServerID must be set.');
+  inherited;
+end;
+
+constructor TRONamedPipeServer.Create(aOwner: TComponent);
+begin
+  inherited;
+  Supports(Self, IROTransport, fTransport);
+  fServerID := 'RONamedPipeServer';
+end;
+
+destructor TRONamedPipeServer.Destroy;
+begin
+  Active := False;
+  inherited;
+end;
+
+function TRONamedPipeServer.GetTransportObject: TObject;
+begin
+  result := Self;
+end;
+
+function TRONamedPipeServer.IntGetActive: boolean;
+begin
+   result := Factive;
+end;
+
+procedure TRONamedPipeServer.IntSetActive(const Value: boolean);
+begin
+ if Value <> FActive then
+  begin
+    FActive := Value;
+    if not (csDesigning in ComponentState) then
+      ActivateServer;
+  end;
+end;
+
+initialization
+  RegisterServerClass(TRONamedPipeServer);
+finalization
+  UnregisterServerClass(TRONamedPipeServer);
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROOpenXMLImpl.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROOpenXMLImpl.pas
new file mode 100644
index 0000000..dcb6f0e
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROOpenXMLImpl.pas	
@@ -0,0 +1,629 @@
+unit uROOpenXMLImpl;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses Classes, uROXDOM_2_3, Variants, uROXMLIntf;
+
+type
+     TROOpenXMLDocument = class;
+     { TROOpenXMLNode }
+     TROOpenXMLNode = class(TInterfacedObject, IXMLNode)
+     private
+       fNode : TDOMNode;
+       fDoc: TROOpenXMLDocument;
+       fDocIntf: IXMLDocument;
+       //function GetNodesByAttribute(const anAttributeName, anAttributeValue: widestring): IXMLNodeList;
+
+     protected
+       function GetName : UnicodeString;
+       function GetLocalName : UnicodeString;
+       function GetRef : pointer;
+       function GetParent : IXMLNode;
+
+       function GetValue : Variant;
+       procedure SetValue(const Value : Variant);
+
+       function GetasString: widestring;
+       procedure SetasString(const Value: widestring);
+
+       function GetXML : UnicodeString;
+
+       function GetAttributes(Index : integer) : IXMLNode;
+       function GetAttributeCount : integer;
+
+       function GetChildren(Index : integer) : IXMLNode;
+       function GetChildrenCount : integer;
+
+       function Add(const aNodeName : UnicodeString; aNameSpaceURI: UnicodeString = '') : IXMLNode;
+       function AddAttribute(const anAttributeName : UnicodeString; const anAttributeValue : Variant; aCreateResultNode: Boolean = True) : IXMLNode; overload;
+       function AddAttribute(const anAttributeName : UnicodeString; const anAttributeString: UnicodeString; aCreateResultNode: Boolean = True) : IXMLNode; overload;
+       function AddXml(const Xml: UnicodeString): IXMLNode;
+
+       procedure Delete(Index : integer);
+       procedure Remove(const aNode : IXMLNode);
+
+       function GetAttributeByName(const anAttributeName : UnicodeString) : IXMLNode;
+       function GetAttributeValue(const anAttributeName : UnicodeString; DefaultValue : Variant) : Variant;
+       function GetAttributeAsString(const anAttributeName : UnicodeString; DefaultValue : UnicodeString) : UnicodeString;
+
+       function GetNodeByName(const aNodeName : UnicodeString) : IXMLNode;
+       function GetNodeValue(const aNodeName : UnicodeString; const Default : Variant) : Variant;
+
+       function GetNodesByName(const aNodeName : UnicodeString) : IXMLNodeList;
+
+       function GetNodeByAttribute(const anAttributeName, anAttributeValue : UnicodeString) : IXMLNode;
+
+       function GetFirstChild: IXMLNode;
+       function GetNextSibling: IXMLNode;
+       function GetNamespaceURI: UnicodeString;
+       function GetDocument: IXMLDocument;
+
+     public
+       constructor Create(const aNode : TDOMNode; aDoc: TROOpenXMLDocument);
+       destructor Destroy; override;
+     end;
+
+     { TROOpenXMLNodeList }
+     TROOpenXMLNodeList = class(TInterfacedObject, IXMLNodeLIst)
+     private
+       fNodeList : TdomNodeList;
+       fDoc: TROOpenXMLDocument;
+
+     protected
+       function GetNodes(Index : integer) : IXMLNode;
+       function GetCount : integer;
+
+     public
+       constructor Create(const aNodeList : TdomNodeList; aDoc: TROOpenXMLDocument);
+     end;
+
+     { TROOpenXMLDocument }
+     TROOpenXMLDocument = class(TInterfacedObject, IXMLDocument)
+     private
+       fDocument : TDOMDocument;
+       fDOMImpl : TDomImplementation;
+
+     protected
+       function GetDocumentNode : IXMLNode;
+
+       function GetEncoding : TXMLEncoding;
+
+       procedure New(aDocumentName : UnicodeString = ''; anEncoding : TXMLEncoding = xeUTF8);
+
+       procedure SaveToStream(aStream : TStream);
+       procedure SaveToFile(const aFileName : string);
+       procedure LoadFromStream(aStream : TStream);
+       procedure LoadFromFile(const aFileName : string);
+       function GetXml:UnicodeString;
+       procedure SetXML(const Value : UnicodeString);
+
+       function Transform(const XSL : string) : string;
+     public
+       constructor Create;
+       destructor Destroy; override;
+
+     end;
+
+{ Misc. for OpenXML }
+function DOMNodeToString(aDOMNode : TdomNode; aDOMImplementation : TDomImplementation = NIL) : Ansistring;
+function DOMNodeToWidestring(aDOMNode : TdomNode; aDOMImplementation : TDomImplementation = NIL) : UnicodeString;
+
+implementation
+
+uses uRORes, uROClasses, SysUtils;
+
+function DOMNodeToString(aDOMNode : TdomNode; aDOMImplementation : TDomImplementation = NIL) : Ansistring;
+var domimpl : TDOMImplementation;
+    parser : TDomToXmlParser;
+begin
+  if (aDOMImplementation=NIL)
+    then domimpl := TDomImplementation.Create(NIL)
+    else domimpl := aDOMImplementation;
+
+  parser := TDomToXmlParser.Create(NIL);
+
+  try
+    parser.DOMImpl := domimpl;
+    parser.writeToString(aDOMNode, XMLEncodingStr[xeUTF8], result);
+  finally
+    parser.Free;
+    if (aDOMImplementation=NIL) then domimpl.Free;
+  end;
+end;
+
+function DOMNodeToWidestring(aDOMNode : TdomNode; aDOMImplementation : TDomImplementation = NIL) : UnicodeString;
+var domimpl : TDOMImplementation;
+    parser : TDomToXmlParser;
+begin
+  if (aDOMImplementation=NIL)
+    then domimpl := TDomImplementation.Create(NIL)
+    else domimpl := aDOMImplementation;
+
+  parser := TDomToXmlParser.Create(NIL);
+
+  try
+    parser.DOMImpl := domimpl;
+    parser.writeToWideString(aDOMNode, result);
+  finally
+    parser.Free;
+    if (aDOMImplementation=NIL) then domimpl.Free;
+  end;
+end;
+
+{ TROOpenXMLNode }
+
+constructor TROOpenXMLNode.Create(const aNode : TDOMNode; aDoc: TROOpenXMLDocument);
+begin
+  if not Assigned(aNode)
+    then RaiseError(err_DOMElementIsNIL, []);
+
+  inherited Create;
+
+  fDoc := adoc;
+  fDocIntf := fDoc;
+  fNode := aNode;
+end;
+
+destructor TROOpenXMLNode.Destroy;
+begin
+  fDocIntf := nil;
+  inherited;
+end;
+
+function TROOpenXMLNode.Add(const aNodeName: UnicodeString; aNameSpaceURI: UnicodeString = ''): IXMLNode;
+var node : TDOMNode;
+begin
+  if aNameSpaceURI = '' then
+    node := fNode.ownerDocument.createElement(aNodeName)
+  else
+    node := fNode.ownerDocument.createElementNS(aNameSpaceURI, aNodeName);
+  fNode.appendChild(node);
+
+  result := TROOpenXMLNode.Create(node, fDoc);
+end;
+
+procedure TROOpenXMLNode.Delete(Index: integer);
+begin
+  fNode.removeChild(fNode.childNodes.item(Index));
+end;
+
+function TROOpenXMLNode.GetAttributes(Index : integer): IXMLNode;
+begin
+  result := TROOpenXMLNode.Create(fNode.attributes.item(Index), fDoc);
+end;
+
+function TROOpenXMLNode.GetChildren(Index : integer): IXMLNode;
+begin
+  result := TROOpenXMLNode.Create(fNode.childNodes.item(Index), fDoc);
+end;
+
+function TROOpenXMLNode.GetName: UnicodeString;
+begin
+  result := fNode.nodeName;
+end;
+
+function TROOpenXMLNode.GetValue: Variant;
+begin
+  result := fNode.textContent;
+end;
+
+function TROOpenXMLNode.GetXML: UnicodeString;
+begin
+  Result := DOMNodeToWidestring(fNode, fdoc.fDOMImpl);
+end;
+
+procedure TROOpenXMLNode.Remove(const aNode: IXMLNode);
+begin
+  fNode.removeChild(TdomNode(aNode.Ref));
+end;
+
+procedure TROOpenXMLNode.SetValue(const Value: Variant);
+var textnode : TdomNode;
+begin
+  if (fNode.childNodes.length=1) and (fNode.childNodes.item(0).nodeName='#text')
+    then fNode.removeChild(fNode.childNodes.item(0));
+
+  textnode := fNode.ownerDocument.createTextNode(Value);
+  fNode.appendChild(textnode)
+end;
+
+function TROOpenXMLNode.GetasString: widestring;
+begin
+  Result:=fNode.textContent;
+end;
+
+procedure TROOpenXMLNode.SetasString(const Value: widestring);
+var textnode : TdomNode;
+begin
+  if (fNode.childNodes.length=1) and (fNode.childNodes.item(0).nodeName='#text')
+    then fNode.removeChild(fNode.childNodes.item(0));
+
+  textnode := fNode.ownerDocument.createTextNode(Value);
+  fNode.appendChild(textnode)
+end;
+
+
+function TROOpenXMLNode.GetNodeByName(const aNodeName: UnicodeString): IXMLNode;
+var i : integer;
+    nme : string;
+begin
+  result := NIL;
+
+  with fNode.childNodes do
+    for i := 0 to (length-1) do begin
+      nme := item(i).nodeName;
+      if (nme=aNodeName) then begin
+        result := TROOpenXMLNode.Create(item(i), fDoc);
+        Exit;
+      end;
+    end;
+end;
+
+{function TROOpenXMLNode.GetNodesByAttribute(const anAttributeName, anAttributeValue: widestring): IXMLNodeList;
+//var node : TdomNodeList;
+begin
+  RaiseError(err_NotImplemented, []);
+end;}
+
+function TROOpenXMLNode.GetNodesByName(const aNodeName: UnicodeString): IXMLNodeList;
+var //i : integer;
+    list : TdomNodeList;
+begin
+  result := NIL;
+
+  list := (fNode as TdomElement).getElementsByTagName(aNodeName);
+  if (list<>NIL)
+    then result := TROOpenXMLNodeList.Create(list, fDoc)
+end;
+
+function TROOpenXMLNode.GetAttributeCount: integer;
+begin
+  result := fNode.attributes.length
+end;
+
+function TROOpenXMLNode.GetChildrenCount: integer;
+begin
+  result := fNode.childNodes.length
+end;
+
+function TROOpenXMLNode.GetRef: pointer;
+begin
+  result := fNode;
+end;
+
+function TROOpenXMLNode.GetLocalName: UnicodeString;
+begin
+  result := fNode.nodeName
+end;
+
+function TROOpenXMLNode.AddAttribute(const anAttributeName : UnicodeString;
+  const anAttributeValue : Variant; aCreateResultNode: Boolean = True) : IXMLNode;
+var attr : TdomNode;
+begin
+  attr := fNode.ownerDocument.createAttribute(anAttributeName);
+  attr.nodeValue := anAttributeValue;
+  fNode.attributes.setNamedItem(attr);
+  if aCreateResultNode then
+    result := TROOpenXMLNode.Create(attr, fDoc)
+  else
+    result:=nil;
+end;
+
+function TROOpenXMLNode.AddAttribute(const anAttributeName: UnicodeString;
+  const anAttributeString: UnicodeString; aCreateResultNode: Boolean = True): IXMLNode;
+var attr : TdomNode;
+begin
+  attr := fNode.ownerDocument.createAttribute(anAttributeName);
+  attr.nodeValue := anAttributeString;
+  fNode.attributes.setNamedItem(attr);
+  if aCreateResultNode then
+    result := TROOpenXMLNode.Create(attr, fDoc)
+  else
+    result := nil;  
+end;
+
+function TROOpenXMLNode.GetParent: IXMLNode;
+begin
+  result := TROOpenXMLNode.Create(fNode.ParentNode, fdoc)
+end;
+
+function TROOpenXMLNode.GetAttributeByName(
+  const anAttributeName: UnicodeString): IXMLNode;
+var node : TDomNode;
+begin
+  result := NIL;
+  if fNode.attributes = nil then exit;
+  node := fNode.attributes.getNamedItem(anAttributeName);
+
+  if (node<>NIL)
+    then result := TROOpenXMLNode.Create(node, fDoc);
+end;
+
+function TROOpenXMLNode.GetNodeByAttribute(const anAttributeName,
+  anAttributeValue: UnicodeString): IXMLNode;
+var i : integer;
+begin
+  result := NIL;
+  if fNode.attributes = nil then exit;
+
+  for i := 0 to (fNode.attributes.length-1) do
+    with fNode.attributes.item(i) do
+      if (nodeName=anAttributeName) and (nodeValue=anAttributeValue) then begin
+        result := TROOpenXMLNode.Create(fNode.attributes.item(i), fDoc);
+        Exit;
+      end;
+end;
+
+function TROOpenXMLNode.GetAttributeValue(
+  const anAttributeName: UnicodeString; DefaultValue: Variant): Variant;
+var attr : IXMLNode;
+begin
+  attr := GetAttributeByName(anAttributeName);
+  if (attr<>NIL) then
+     result := attr.Value
+  else
+     result := DefaultValue;
+end;
+
+function TROOpenXMLNode.GetAttributeAsString(const anAttributeName: UnicodeString;
+  DefaultValue: UnicodeString): UnicodeString;
+var attr : IXMLNode;
+begin
+  attr := GetAttributeByName(anAttributeName);
+  if (attr<>NIL) then
+     result := attr.Value
+  else
+     result := DefaultValue;
+end;
+
+
+
+function TROOpenXMLNode.GetNodeValue(const aNodeName: UnicodeString;
+  const Default: Variant): Variant;
+var node : IXMLNode;
+begin
+  node := GetNodeByName(aNodeName);
+  if (node=NIL) then result := Default
+                else result := node.Value
+end;
+
+function TROOpenXMLNode.GetFirstChild: IXMLNode;
+var node : TDomNode;
+begin
+  result := NIL;
+  node := fNode.firstChild;
+
+  if (node<>NIL)
+    then result := TROOpenXMLNode.Create(node, fDoc);
+end;
+
+function TROOpenXMLNode.GetNextSibling: IXMLNode;
+var node : TDomNode;
+begin
+  result := NIL;
+  node := fNode.nextSibling;
+
+  if (node<>NIL)
+    then result := TROOpenXMLNode.Create(node, fDoc);
+end;
+
+function TROOpenXMLNode.GetNamespaceURI: UnicodeString;
+var
+  i: integer;
+  lValue: UnicodeString;
+begin
+  Result := fNode.namespaceURI;
+  if Result = '' then begin
+    lValue := 'xmlns';
+    if fNode.prefix <> '' then lValue:= lValue+':'+fNode.prefix;
+    for i:=0 to fNode.attributes.length - 1 do
+      if TDomAttr(fNode.attributes.item(i)).name = lValue then begin
+        Result := TDomAttr(fNode.attributes.item(i)).value;
+        Break;
+      end;
+  end;
+end;
+
+function TROOpenXMLNode.AddXml(const Xml: UnicodeString): IXMLNode;
+var
+  doc : TROOpenXMLDocument;
+begin
+  doc := TROOpenXMLDocument.Create;
+  try
+    doc.New();
+    doc.SetXML(Xml);
+    if doc.fDocument.documentElement <> nil then
+      result := TROOpenXMLNode.Create(fNode.appendChild(doc.fDocument.documentElement), fDoc)
+    else
+      result := nil;
+  finally
+    doc.Free;
+  end;
+end;
+
+function TROOpenXMLNode.GetDocument: IXMLDocument;
+begin
+  result := fDoc;
+end;
+
+{ TROOpenXMLNodeList }
+
+constructor TROOpenXMLNodeList.Create(const aNodeList: TdomNodeList; aDoc: TROOpenXMLDocument);
+begin
+  if not Assigned(aNodeList)
+    then RaiseError(err_DOMElementIsNIL, []);
+
+  inherited Create;
+
+  fDoc := aDoc;
+  fNodeList := aNodeList;
+end;
+
+function TROOpenXMLNodeList.GetCount: integer;
+begin
+  result := fNodeList.length
+end;
+
+function TROOpenXMLNodeList.GetNodes(Index: integer): IXMLNode;
+begin
+  result := TROOpenXMLNode.Create(fNodeList.item(Index), fDoc);
+end;
+
+{ TROOpenXMLDocument }
+
+constructor TROOpenXMLDocument.Create;
+begin
+  fDOMImpl := TDomImplementation.Create(NIL);
+  fDocument := fDOMImpl.createDocument('XMLDOC', NIL);
+end;
+
+destructor TROOpenXMLDocument.Destroy;
+begin
+  fDOMImpl.freeDocument(fDocument);
+  fDOMImpl.Free;
+
+  inherited;
+end;
+
+function TROOpenXMLDocument.GetDocumentNode: IXMLNode;
+begin
+  result := TROOpenXMLNode.Create(fDocument.documentElement, self)
+end;
+
+function TROOpenXMLDocument.GetEncoding: TXMLEncoding;
+begin
+  result := xeUTF8
+  { ToDo: for now, obtain the real encoding later ;-) }
+end;
+
+function TROOpenXMLDocument.GetXml: UnicodeString;
+var
+    parser : TDomToXmlParser;
+begin
+  parser := TDomToXmlParser.Create(NIL);
+
+  try
+    parser.DOMImpl := fDOMImpl;
+    parser.writeToWideString(fDocument.documentElement, result);
+  finally
+    parser.Free;
+  end;
+end;
+
+procedure TROOpenXMLDocument.LoadFromFile(const aFileName: string);
+var //domimpl : TDOMImplementation;
+    parser : TXmlToDomParser;
+begin
+  New('');
+  parser := TXmlToDomParser.Create(NIL);
+  try
+    parser.DOMImpl := fDOMImpl;
+
+    fDocument := parser.fileToDom(aFileName);
+  finally
+    parser.Free;
+  end;
+end;
+
+procedure TROOpenXMLDocument.LoadFromStream(aStream: TStream);
+var //domimpl : TDOMImplementation;
+    folddoc : TdomDocument;
+    parser : TXmlToDomParser;
+begin
+  New('');
+  parser := TXmlToDomParser.Create(NIL);
+  try
+    parser.DOMImpl := fDOMImpl;
+
+    fOldDoc := fdocument;
+    fDocument := parser.streamToDom(aStream);
+    fOldDoc.domImplementation.freeDocument(fOldDoc);
+  finally
+    parser.Free;
+  end;
+end;
+
+procedure TROOpenXMLDocument.New(aDocumentName : UnicodeString = ''; anEncoding : TXMLEncoding = xeUTF8);
+var docel : TdomNode;
+begin
+  fDocument.clear;
+  if (aDocumentName<>'') then begin
+    docel := fDocument.createElement(aDocumentName);
+    fDocument.appendChild(docel)
+  end;
+end;
+
+procedure TROOpenXMLDocument.SaveToFile(const aFileName: string);
+var //domimpl : TDOMImplementation;
+    parser : TDomToXmlParser;
+    fstream : TFileStream;
+begin
+  fstream := NIL;
+  parser := TDomToXmlParser.Create(NIL);
+
+  try
+    fstream := TFileStream.Create(aFileName, fmCreate);
+    parser.DOMImpl := fDOMImpl;
+
+    parser.writeToStream(fDocument.documentElement, 'UTF-8', fstream);
+  finally
+    parser.Free;
+    fstream.Free;
+  end;
+end;
+
+procedure TROOpenXMLDocument.SaveToStream(aStream: TStream);
+var //domimpl : TDOMImplementation;
+    parser : TDomToXmlParser;
+    //fstream : TFileStream;
+begin
+  //fstream := NIL;
+  parser := TDomToXmlParser.Create(NIL);
+
+  try
+    parser.DOMImpl := fDOMImpl;
+    parser.writeToStream(fDocument.documentElement, 'UTF-8', aStream);
+  finally
+    parser.Free;
+  end;
+end;
+
+procedure TROOpenXMLDocument.SetXML(const Value: UnicodeString);
+var
+  ss: TXmlToDomParser;
+  fOldDoc: TdomDocument;
+begin
+  New('');
+  ss := TXmlToDomParser.Create(NIL);
+  try
+    ss.DOMImpl := fDOMImpl;
+
+    fOldDoc := fdocument;
+    fDocument := ss.wideStringToDom(value);
+    fDOMImpl.freeDocument(fOldDoc);
+  finally
+    ss.Free;
+  end;
+end;
+
+function TROOpenXMLDocument.Transform(const XSL: string): string;
+begin
+  Result := '';
+  RaiseError(err_NotImplemented, []);
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROPleaseWaitForm.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROPleaseWaitForm.dfm
new file mode 100644
index 0000000..63d01db
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROPleaseWaitForm.dfm	
@@ -0,0 +1,103 @@
+object PleaseWaitForm: TPleaseWaitForm
+  Left = 336
+  Top = 344
+  BorderIcons = []
+  BorderStyle = bsDialog
+  Caption = 'RemObjects SDK'
+  ClientHeight = 41
+  ClientWidth = 542
+  Color = clBtnFace
+  ParentFont = True
+  OldCreateOrder = False
+  Position = poScreenCenter
+  OnHide = FormHide
+  OnShow = FormShow
+  PixelsPerInch = 96
+  TextHeight = 13
+  object lbl_Caption: TLabel
+    Left = 64
+    Top = 14
+    Width = 66
+    Height = 13
+    Caption = 'Please wait...'
+  end
+  object img_Logo: TImage
+    Left = 2
+    Top = 0
+    Width = 32
+    Height = 32
+    AutoSize = True
+    Center = True
+    Picture.Data = {
+      07544269746D617080080000424D800800000000000036040000280000002000
+      00002000000001000800010000004A040000C21E0000C21E0000000000000000
+      000000000000000080000080000000808000800000008000800080800000C0C0
+      C000C0DCC000F0CAA6000000000001010100030303000606060005050F000808
+      08000B0B0B000C0D0D000D0D0D00101010001212120014141400151515001717
+      17001A1A1A001C1C1C001F1F1F0004042100161620001D1E2800181A2F000707
+      370005053E00101037001B1D32001F202B002021210021212100242424002626
+      2600292929002B2B2B002E2E2E0026283300282A3500282A3600303030003333
+      3300323434003535350036383800383838003A3A3A003C3C3C003F3F3F000D0E
+      4800171B4500151A4E00181D490010155D00151B5B00151B5C001D2141001D21
+      42001C245D00262940002126480023294B0031374F00393C48003C3F4B002B33
+      5900333952000404650005066F0008096A000E14660001017500090F75000404
+      7800121F790015206E001E2C73001A287A00232F6C0029356800323B6100343E
+      630024327000283776002E3D7B003E4141003E445B003A4675003D4977004141
+      410042454500434545004444440046464600494949004B4B4B004A4C4C004E4E
+      4E004144500043465200484B5700515151005052520053535300565656005858
+      58005B5B5B005A5D5D005D5D5D005D5E5E00434C6D005B5E6700606060006262
+      620062646400656565006767670068696900686A6A006B6B6B00616778007171
+      710070727200727676007D7F7F0001018700010188000C188300000090000000
+      9A0000029F000B1D970008199C00172A8A00182A89000F2091001D369B001F39
+      9E000005A5000009AB000411A4000618A6000A1FA700000CB100000FB8000213
+      B400071EB1000216BA000012BE00132FAA000B24B1000C27B6001131BB00233F
+      AB00374A8D002A4094002E4395002D439600344A99002D46A3003851A7003C54
+      A8002443B8002F4DBC00485A950055669C0060688200566AA7000015C4000018
+      CA00001BD000001ED7000520C1000E33CB001538C200183BC300153BCE000022
+      DD00062FDE000028E900032FEA00123EE700002BF000002EF6000332F0000A3A
+      F2000F3EF3000032FC000336FE00073AFF000C3EFF00224ADD00385FDF003C62
+      DF001442F3001847F3001042FF001547FF001A4BFF001E4FFF00204AE8002853
+      E9002354FF002758FF002C5CFF003A63EA003E67EA003C68F4003161FF003565
+      FF003A69FF003F6EFF004A67C200496EE1004C72E1004570F5004974F5004372
+      FF007B8080007C81810080828200828484009095950093979700959B9B009CA1
+      A1009EA4A400A1A7A700A2A8A800A4A9A900A6ACAC00AEB5B500B0B6B600B1B8
+      B800B3BABA00B6BDBD00B7BEBE00BAC2C200BDC4C400C6CECE00F0FBFF00A4A0
+      A000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFF
+      FF000AF5000DEFE0612414131210246081EDF50009F5000008F50011E8661A19
+      181716141312100F0D0C30E6F50107F5000006F50015F4712726251A19181716
+      141312100F0D0C0B5BF3F59405F5000005F50017E93329282726251A3B919088
+      8784491F0F0D0C0B11EAF50004F5000004F5000FE42F2E2A2928272625389591
+      908887000287000883200D0C0B00E1F503F5000003F50011EB33312F2E2A2928
+      27263D96959190888700038700074D0E0C0B00EAF51902F5000002F50013F162
+      3433312F2E2A2928273E979695919088871A03870008861B0C0B11F3F5F50000
+      02F500147836353433312F2E2A2928273E3D224C9190888703870007860E0C0B
+      5BF5F5F500000017F5EC625F36353433312F2E2A29282726251D959190888720
+      038700064D0D0C0BE6F500000018F57C63625F36353433312F2E2A2928272685
+      96959190888703870005200D0C30F50000000019F2656463625F57B4BE9E472F
+      2E2A292851AE9A9695919088871B02870005830F0D0CEDF50000001AE5676564
+      6368C0C3C2C1B8312F2E2A2940AFAE9A969591908887028700041F0F0D810000
+      0020806B6765645DCAC4C3C2C155312F2E2A2C8DAFAE9A96959190374F874910
+      0F3200000020736D6B67655ECBCAC4C3C24833312F2E2A292BAF933C92954E17
+      218784121015000000206F6E6D6B6765C5CBCAC4B5353433312F2E2A41B05026
+      23391E181C4B4A13121000000020706F6E6D6B676AA4A5A35F3635343331548B
+      9CB1942726251A191817161413120000002072706F6E6D6B67656463625F3635
+      3444BCB98C9C43282726251A191817161413000000207672706F6E6D6B676564
+      63625F363559BD9B2F2E2A29282726251A1918171614000000207B7672706F6E
+      6D6B67656463625F3635B3BA582F2E2A2942898A3A1A19181724000000208277
+      7672706F6E6D6B676564695C5F368FC1BA312F2E2AB2B0AF99231A1918610000
+      0020E779777672706F6E6D6B6774CECBA8A1C3C28E33312F2EB7B1B0AF3F251A
+      19E000000020F37A79777675D5D7AA6D6BA6CDCCCBCAC45A353433312F9DB7B1
+      982726251AEF00000020F5E27A7977DBD9D8D36E6DA7D0CDCCCBCA9F46353433
+      312F52532D28272666F500000020F5EE7B7A79DCDFD9D8C7C6D2D1D0CDCCCBCA
+      C4B6353433312F2E2A292827E8F5000002F5001EE37B7A7EDEDFD9D8D7D6D2D1
+      D0CDCCCBCABB36353433312F2E2A296CF5F5000002F5001EF37F7B7AACDEDFD9
+      D8D7D6D2D1D0CDCCCBA25F46453433312F2E33F0F5F5000003F5001BEE7D7B7A
+      7EDCDFD9D8D7D6D2D1D0CDCCC9A2C0BF563433312FE9F52802F5000004F50019
+      EB7D7B7A79ADDDD9D8D7D6D2D1D0CDCCCBC8A136353433E4F52E03F5000005F5
+      0017EE7F7B7A7977ABDAD4D7D6D2D1CFA9A063625F3662EBF53504F5000006F5
+      0015F3E37B7A79777672706F6E6D6B676564636278F1F50005F5000008F50011
+      EEE27A79777672706F6E6D6B67657CECF52E07F500000AF5000DF3E7827B7672
+      706F7380E5F2F5D209F50001}
+    Transparent = True
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROPleaseWaitForm.lfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROPleaseWaitForm.lfm
new file mode 100644
index 0000000..0b8252c
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROPleaseWaitForm.lfm	
@@ -0,0 +1,32 @@
+object PleaseWaitForm: TPleaseWaitForm
+  Left = 314
+  Height = 41
+  Top = 327
+  Width = 542
+  HorzScrollBar.Page = 541
+  VertScrollBar.Page = 40
+  BorderIcons = []
+  BorderStyle = bsDialog
+  Caption = 'RemObjects SDK'
+  Font.Height = -11
+  Font.Name = 'Tahoma'
+  OnHide = FormHide
+  OnShow = FormShow
+  Position = poScreenCenter
+  object lbl_Caption: TLabel
+    Left = 64
+    Height = 19
+    Top = 14
+    Width = 87
+    Caption = 'Please wait...'
+    Color = clNone
+    ParentColor = False
+  end
+  object img_Logo: TImage
+    Left = 2
+    Height = 32
+    Width = 32
+    AutoSize = True
+    Center = True
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROPleaseWaitForm.lrs b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROPleaseWaitForm.lrs
new file mode 100644
index 0000000..c7f0416
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROPleaseWaitForm.lrs	
@@ -0,0 +1,13 @@
+{ This is an automatically generated lazarus resource file }
+
+LazarusResources.Add('TPleaseWaitForm','FORMDATA',[
+  'TPF0'#15'TPleaseWaitForm'#14'PleaseWaitForm'#4'Left'#3':'#1#6'Height'#2')'#3
+  +'Top'#3'G'#1#5'Width'#3#30#2#18'HorzScrollBar.Page'#3#29#2#18'VertScrollBar.'
+  +'Page'#2'('#11'BorderIcons'#11#0#11'BorderStyle'#7#8'bsDialog'#7'Caption'#6
+  +#14'RemObjects SDK'#11'Font.Height'#2#245#9'Font.Name'#6#6'Tahoma'#6'OnHide'
+  +#7#8'FormHide'#6'OnShow'#7#8'FormShow'#8'Position'#7#14'poScreenCenter'#0#6
+  +'TLabel'#11'lbl_Caption'#4'Left'#2'@'#6'Height'#2#19#3'Top'#2#14#5'Width'#2
+  +'W'#7'Caption'#6#14'Please wait...'#5'Color'#7#6'clNone'#11'ParentColor'#8#0
+  +#0#6'TImage'#8'img_Logo'#4'Left'#2#2#6'Height'#2' '#5'Width'#2' '#8'AutoSize'
+  +#9#6'Center'#9#0#0#0
+]);
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROPleaseWaitForm.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROPleaseWaitForm.pas
new file mode 100644
index 0000000..93278d7
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROPleaseWaitForm.pas	
@@ -0,0 +1,109 @@
+unit uROPleaseWaitForm;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Delphi IDE Integration                            }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  {$IFDEF MSWINDOWS}Windows,{$ENDIF}
+  Messages, SysUtils, Classes, Graphics, Controls, Forms,
+  {$IFDEF FPC} LResources, lmessages,{$ENDIF}
+  Dialogs, StdCtrls, ExtCtrls;
+
+type
+  TPleaseWaitForm = class(TForm)
+    lbl_Caption: TLabel;
+    img_Logo: TImage;
+    procedure FormShow(Sender: TObject);
+    procedure FormHide(Sender: TObject);
+  private
+   {$IFNDEF FPC}
+    fWindowList:pointer;
+   {$ENDIF}    
+  public
+    constructor Create(iOwner: TComponent; const iCaption:string=''; const iHeader:string=''; iBitmap:TBitmap=nil; iFreeBitmap:boolean=false); reintroduce;
+    procedure Show(const iCaption:string=''); reintroduce;
+    procedure Hide; reintroduce;
+  end;
+
+var
+  PleaseWaitForm: TPleaseWaitForm;
+
+implementation
+
+{$IFNDEF FPC}
+  {$R *.dfm}
+{$ENDIF}
+
+{ TPleaseWaitForm }
+
+constructor TPleaseWaitForm.Create(iOwner: TComponent; const iCaption:string=''; const iHeader:string=''; iBitmap:TBitmap=nil; iFreeBitmap:boolean=false);
+begin
+  inherited Create(iOwner);
+  if iHeader <> '' then Caption := iHeader;
+  lbl_Caption.Caption := iCaption;
+
+  if Assigned(iBitmap) then begin
+    img_Logo.Picture.Assign(iBitmap);
+    if iFreeBitmap then iBitmap.Free();
+  end;
+
+  img_Logo.Top := (ClientHeight-img_Logo.Height) div 2;
+  img_Logo.Left := img_Logo.Top;
+  lbl_Caption.Left := img_Logo.Width+ (img_Logo.Left*2);
+  ClientWidth := lbl_Caption.Left+lbl_Caption.Width+img_Logo.Left;
+end;
+
+procedure TPleaseWaitForm.Show(const iCaption:string='');
+begin
+  if iCaption <> '' then begin
+    lbl_Caption.Caption := iCaption;
+    ClientWidth := lbl_Caption.Left+lbl_Caption.Width+8;
+  end;
+  inherited Show();
+  Application.ProcessMessages();
+end;
+
+procedure TPleaseWaitForm.Hide;
+begin
+  inherited Hide();
+  Application.ProcessMessages();
+end;
+
+procedure TPleaseWaitForm.FormShow(Sender: TObject);
+begin
+{$IFDEF MSWINDOWS}
+  SendMessage(Handle, CM_ACTIVATE, 0, 0);
+{$ENDIF}  
+{$IFNDEF FPC}
+  fWindowList := DisableTaskWindows(0);
+{$ENDIF FPC}
+end;
+
+procedure TPleaseWaitForm.FormHide(Sender: TObject);
+begin
+{$IFDEF MSWINDOWS}
+  SendMessage(Handle, CM_DEACTIVATE, 0, 0);
+{$ENDIF}  
+{$IFNDEF FPC}
+  EnableTaskWindows(fWindowList);
+{$ENDIF FPC}
+end;
+
+initialization
+{$IFDEF FPC}
+  {$I uROPleaseWaitForm.lrs}
+{$ENDIF}  
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROPostMessage.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROPostMessage.pas
new file mode 100644
index 0000000..22ed80d
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROPostMessage.pas	
@@ -0,0 +1,1054 @@
+unit uROPostMessage;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes, SysUtils, TypInfo,
+  uROSerializer, uROClient, uROClientIntf, uROTypes, FMTBcd;
+
+type
+  TROPostMessageSerializer = class;
+
+  TROPostMessageBinaryType = (btInlineHex, btInlineBase64);
+
+  TROPostMessage = class(TROMessage)
+  private
+    fBinaryType: TROPostMessageBinaryType;
+    fMultiLine: Boolean;
+    procedure SetBinaryType(const Value: TROPostMessageBinaryType);
+  protected
+    { Internals }
+    function ReadException: Exception; override;
+    function CreateSerializer: TROSerializer; override;
+
+    { IROMessage }
+    procedure Initialize(const aTransport: IROTransport; const anInterfaceName, aMessageName: string; aType: TMessageType); override;
+    procedure WriteToStream(aStream: TStream); override;
+    procedure ReadFromStream(aStream: TStream); override;
+    procedure WriteException(aStream: TStream; anException: Exception); override;
+
+    function GetSerializer: TROPostMessageSerializer;
+    property Serializer: TROPostMessageSerializer read GetSerializer;
+    procedure InitObject; override;
+  public
+    procedure Assign(aSource: TPersistent); override;
+    function IsValidMessage(aData: PAnsiChar; aLength: Integer): boolean; override;
+  published
+    property BinaryType: TROPostMessageBinaryType read fBinaryType write SetBinaryType default btInlineHex;
+    property MultiLine: Boolean read fMultiLine write fMultiLine default True;
+  end;
+
+  TROPostMessageSerializer = class(TROSerializer)
+  private
+    fPrefixStack: TStringList;
+    fPrefix: String;
+    fMessage: TStringList;
+    fBinaryType: TROPostMessageBinaryType;
+    procedure PushPrefix(aNewPrefix:string; aArrayElementId: integer = -1);
+    procedure PopPrefix;
+    function AssemblePrefix(const aName: string; aArrayElementId: integer): string;
+  protected
+    procedure BeginWriteObject(const aName: string; aClass : TClass; anObject: TObject; var LevelRef : IUnknown;
+                                var IsValidType : boolean; out IsAssigned:Boolean; ArrayElementId : integer = -1); override;
+    procedure EndWriteObject(const aName: string; aClass : TClass; anObject: TObject; const LevelRef : IUnknown); override;
+    procedure CustomWriteObject(const aName : string; aClass : TClass; const Ref; ArrayElementId : integer = -1); override;
+    procedure CustomReadObject(const aName: string; aClass: TClass;var Ref; ArrayElementId: integer);override;
+    procedure BeginReadObject(const aName : string; aClass : TClass; var anObject : TObject; var LevelRef : IUnknown;
+                               var IsValidType : boolean; ArrayElementId : integer = -1); override;
+    procedure EndReadObject(const aName : string; aClass : TClass; var anObject : TObject; const LevelRef : IUnknown); override;
+  public
+    { Writers }
+     procedure WriteInteger(const aName : string; anOrdType : TOrdType; const Ref; ArrayElementId : integer = -1); override;
+     procedure WriteInt64(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+     procedure WriteEnumerated(const aName : string; anEnumTypeInfo : PTypeInfo; const Ref; ArrayElementId : integer = -1); override;
+     procedure WriteAnsiString(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+     procedure WriteUTF8String(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+     procedure WriteWideString(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+     procedure WriteDateTime(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+     procedure WriteDouble(const aName : string; aFloatType : TFloatType; const Ref; ArrayElementId : integer = -1); override;
+     procedure WriteVariant(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+     procedure WriteXml(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+     procedure WriteGuid(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+     procedure WriteDecimal(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+     procedure WriteBinary(const aName : string; const Ref; ArrayElementId : integer = -1);override;
+     procedure WriteStruct(const aName : string; const Ref; aClass: TClass = nil; ArrayElementId : integer = -1);override;
+     procedure WriteArray(const aName : string; const Ref; aClass: TClass = nil; ArrayElementId : integer = -1);override;
+     procedure WriteException(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+     { Readers }
+     procedure ReadInteger(const aName : string; anOrdType : TOrdType; var Ref; ArrayElementId : integer = -1); override;
+     procedure ReadInt64(const aName : string; var Ref; ArrayElementId : integer = -1); override;
+     procedure ReadEnumerated(const aName : string; anEnumTypeInfo : PTypeInfo; var Ref; ArrayElementId : integer = -1); override;
+     procedure ReadAnsiString(const aName : string; var Ref; ArrayElementId : integer = -1; iMaxLength:integer=-1); override;
+     procedure ReadUTF8String(const aName : string; var Ref; ArrayElementId : integer = -1; iMaxLength:integer=-1); override;
+     procedure ReadWideString(const aName : string; var Ref; ArrayElementId : integer = -1; iMaxLength:integer=-1); override;
+     procedure ReadDateTime(const aName : string; var Ref; ArrayElementId : integer = -1); override;
+     procedure ReadDouble(const aName : string; aFloatType : TFloatType; var Ref; ArrayElementId : integer = -1); override;
+     procedure ReadVariant(const aName : string; var Ref; ArrayElementId : integer = -1); override;
+     procedure ReadXml(const aName : string; var Ref; ArrayElementId : integer = -1); override;
+     procedure ReadGuid(const aName : string; var Ref; ArrayElementId : integer = -1); override;
+     procedure ReadDecimal(const aName : string; var Ref; ArrayElementId : integer = -1); override;
+     procedure ReadBinary(const aName : string; var Ref; ArrayElementId : integer = -1);override;
+     function ReadStruct(const aName : string; aClass : TClass; var Ref; ArrayElementId : integer = -1): Boolean; override;
+     function ReadArray(const aName : string; aClass : TClass; var Ref; ArrayElementId : integer = -1): Boolean; override;
+     procedure ReadException(const aName : string; var Ref; ArrayElementId : integer = -1); override;
+    property BinaryType: TROPostMessageBinaryType read fBinaryType write fBinaryType;
+  public
+    constructor Create();
+    destructor Destroy; override;
+
+    procedure Clear();
+    procedure LoadFromStream(aStream: TStream; aMultiLine: Boolean = True);
+    procedure SaveToStream(aStream: TStream; aMultiLine: Boolean = True);
+
+    procedure WriteItem(const aName: string; aString: string; aArrayElementId: integer = -1);
+    function ReadItem(const aName: string; aArrayElementId: integer = -1): string;
+
+    property Message: TStringList read fMessage write fMessage;
+    property Prefix: string read fPrefix write fPrefix;
+  end;
+
+{$IF defined(DELPHI7UP) or defined(FPC)}
+const PostLocale = 1033;
+var PostFormatSettings : TFormatSettings;
+{$IFEND}
+
+implementation
+
+uses
+  {$IFDEF DEBUG_REMOBJECTS_POSTMESSAGE}eDebugServer,{$ENDIF}
+  uRORes, uROClasses, uROCompression, uROBinaryHelpers, uROXmlIntf, Variants;
+
+const
+  PostDateTimeFormat = 'yyyy"-"mm"-"dd" "hh":"nn":"ss';
+//  PostDateTimeLength = 19;
+
+function PostStrToFloat(const aString: string): Extended;
+{$IF not defined(DELPHI7UP) and not defined(FPC)}
+var e: integer;
+{$IFEND}
+begin
+  {$IF defined(DELPHI7UP) or defined(FPC)}
+  Result := StrToFloat(aString,PostFormatSettings);// then
+  {$ELSE}
+  Val(aString, Result, e);
+  {$IFEND}
+end;
+
+{ HTTPEncode/HTTPDecode reproduced from HTTPApp.pas}
+{ 20080521 - updated from Tiburon sources}
+{$WARNINGS OFF}
+function HTTPEncode(const AStr: AnsiString): AnsiString;
+// The NoConversion set contains characters as specificed in RFC 1738 and
+// should not be modified unless the standard changes.
+const
+  NoConversion = ['A'..'Z','a'..'z','*','@','.','_','-',
+                  '0'..'9','$','!','''','(',')'];
+var
+  Sp, Rp: PAnsiChar;
+begin
+  SetLength(Result, Length(AStr) * 3);
+  Sp := PAnsiChar(AStr);
+  Rp := PAnsiChar(Result);
+  while Sp^ <> #0 do
+  begin
+    if Sp^ in NoConversion then
+      Rp^ := Sp^
+    else
+      if Sp^ = ' ' then
+        Rp^ := '+'
+      else
+      begin
+        FormatBuf(Rp^, 3, AnsiString('%%%.2x'), 6, [Ord(Sp^)]);
+        Inc(Rp,2);
+      end;
+    Inc(Rp);
+    Inc(Sp);
+  end;
+  SetLength(Result, Rp - PAnsiChar(Result));
+end;
+
+function HTTPDecode(const AStr: AnsiString): AnsiString;
+var
+  Sp, Rp, Cp: PAnsiChar;
+  S: String;
+begin
+  SetLength(Result, Length(AStr));
+  Sp := PAnsiChar(AStr);
+  Rp := PAnsiChar(Result);
+  Cp := Sp;
+  try
+    while Sp^ <> #0 do
+    begin
+      case Sp^ of
+        '+': Rp^ := ' ';
+        '%': begin
+               // Look for an escaped % (%%) or %<hex> encoded character
+               Inc(Sp);
+               if Sp^ = '%' then
+                 Rp^ := '%'
+               else
+               begin
+                 Cp := Sp;
+                 Inc(Sp);
+                 if (Cp^ <> #0) and (Sp^ <> #0) then
+                 begin
+                   S := '$' + Cp^ + Sp^;
+                   {$IFDEF UNICODE}
+                   Rp^ :=  AnsiChar(StrToInt(S));
+                   {$ELSE}
+                   Rp^ := Chr(StrToInt(S));
+                   {$ENDIF}
+                 end
+                 else
+                   raise Exception.CreateFmt('Error decoding character (%%XX) at position %d', [Cp - PAnsiChar(AStr)]);
+               end;
+             end;
+      else
+        Rp^ := Sp^;
+      end;
+      Inc(Rp);
+      Inc(Sp);
+    end;
+  except
+    on E:EConvertError do
+      raise EConvertError.CreateFmt('Invalid URL encoded character (%s) at position %d', [AnsiChar('%') + Cp^ + Sp^, Cp - PAnsiChar(AStr)])
+  end;
+  SetLength(Result, Rp - PAnsiChar(Result));
+end;
+{$WARNINGS ON}
+
+
+{ TROPostMessage }
+
+procedure TROPostMessage.Assign(aSource: TPersistent);
+begin
+  inherited;
+  if Assigned(aSource) then begin
+    BinaryType := TROPostMessage(aSource).BinaryType;
+    MultiLine := TROPostMessage(aSource).MultiLine;
+  end;
+end;
+
+procedure TROPostMessage.InitObject;
+begin
+  inherited;
+  fMultiLine := True;
+end;
+
+function TROPostMessage.CreateSerializer: TROSerializer;
+begin
+  result := TROPostMessageSerializer.Create();
+  TROPostMessageSerializer(result).BinaryType := BinaryType;
+end;
+
+function TROPostMessage.GetSerializer: TROPostMessageSerializer;
+begin
+  result := (inherited Serializer as TROPostMessageSerializer);
+end;
+
+function GuidToStr(aGuid: TGUID): String;
+begin
+    result := GUIDToString(aGuid);
+    result := copy(result, 2, length(result) - 2);
+end;
+
+procedure TROPostMessage.Initialize(const aTransport: IROTransport;
+  const anInterfaceName, aMessageName: string; aType: TMessageType);
+begin
+  inherited;
+  Serializer.Clear();
+  Serializer.WriteItem('__MessageType','Message');
+  Serializer.WriteItem('__InterfaceName',anInterfaceName);
+  Serializer.WriteItem('__MessageName',aMessageName);
+  Serializer.WriteItem('__ClientID', GuidToStr(Self.GetClientID()));
+end;
+
+function TROPostMessage.IsValidMessage(aData: PAnsiChar;
+  aLength: Integer): boolean;
+var
+  str: Ansistring;
+begin
+  SetString(str, aData, aLength);
+  Result := Pos(AnsiString('__MessageType='), str) > 0;
+end;
+
+function TROPostMessage.ReadException: Exception;
+var
+  lExceptionName, lMessage: string;
+begin
+  lExceptionName := Serializer.ReadItem('__ExceptionClass');
+  lMessage := Serializer.ReadItem('__ExceptionMessage');
+
+  result := CreateException(lExceptionName, lMessage);
+
+  if result.InheritsFrom(EROException)
+    then Serializer.Read('__Exception', result.ClassInfo, result); // Reads the other fields which have been properly serialized
+end;
+
+procedure TROPostMessage.ReadFromStream(aStream: TStream);
+var
+  lMessageType: string;
+  lClientID: string;
+begin
+  inherited;
+  {$IFDEF DEBUG_REMOBJECTS_POSTMESSAGE}
+  DebugServer.EnterMethod('TROPostMessage.ReadFromStream(stream=%x; position:$%x)', [integer(pointer(aStream)), aStream.Position]);
+  try
+    DebugServer.WriteHexDump('Incoming PostMessage stream:', aStream);
+    {$ENDIF DEBUG_REMOBJECTS_POSTMESSAGE}
+
+  Serializer.LoadFromStream(aStream, fMultiLine);
+
+  {$IFDEF DEBUG_REMOBJECTS_POSTMESSAGE}
+  DebugServer.Write('Incoming PostMessage', Serializer.Message);
+  {$ENDIF DEBUG_REMOBJECTS_POSTMESSAGE}
+
+  lClientID := Serializer.ReadItem('__ClientID');
+  if lClientID <> '' then
+    SetClientID(StringToGUID(Format('{%s}', [lClientID])));
+
+  lMessageType := Serializer.ReadItem('__MessageType');
+  if SameText(lMessageType,'Message') then begin
+
+    InterfaceName := Serializer.ReadItem('__InterfaceName');
+    MessageName := Serializer.ReadItem('__MessageName');
+
+  end
+  else if SameText(lMessageType, 'Exception') then begin
+    ProcessException();
+  end
+  else begin
+    raise EROException.CreateFmt(err_UnknownMessageType,[lMessageType]);
+  end;
+
+  {$IFDEF DEBUG_REMOBJECTS_POSTMESSAGE}
+  finally
+    DebugServer.ExitMethod('TROPostMessage.ReadFromStream(stream=%x; position:$%x)', [integer(pointer(aStream)), aStream.Position]);
+  end;
+  {$ENDIF DEBUG_REMOBJECTS_POSTMESSAGE}
+end;
+
+procedure TROPostMessage.SetBinaryType(
+  const Value: TROPostMessageBinaryType);
+begin
+  if fBinaryType <> Value then begin
+    fBinaryType := Value;
+    Serializer.BinaryType := Value;
+  end;
+end;
+
+procedure TROPostMessage.WriteException(aStream: TStream; anException: Exception);
+begin
+  Serializer.Clear();
+  Serializer.WriteItem('__MessageType','Exception');
+  Serializer.WriteItem('__ExceptionClass', anException.ClassName);
+  Serializer.WriteItem('__ExceptionMessage', anException.Message);
+
+  if (anException is EROException) then begin
+    Serializer.Write('__Exception', anException.ClassInfo, anException);
+  end;
+
+  WriteToStream(aStream);
+  inherited;
+end;
+
+procedure TROPostMessage.WriteToStream(aStream: TStream);
+begin
+  {$IFDEF DEBUG_REMOBJECTS_POSTMESSAGE}
+  DebugServer.Write('Outgoing PostMessage', Serializer.Message);
+  {$ENDIF DEBUG_REMOBJECTS_POSTMESSAGE}
+
+  Serializer.SaveToStream(aStream, MultiLine);
+  aStream.Seek(0, soFromBeginning);
+
+  inherited;
+  {$IFDEF DEBUG_REMOBJECTS_POSTMESSAGE}
+  DebugServer.WriteHexDump('Outgoing PostMessage stream:', aStream);
+  {$ENDIF DEBUG_REMOBJECTS_POSTMESSAGE}
+end;
+
+{ TROPostMessageSerializer }
+
+constructor TROPostMessageSerializer.Create;
+begin
+  fMessage := TStringList.Create();
+  fPrefixStack := TStringList.Create();
+end;
+
+destructor TROPostMessageSerializer.Destroy;
+begin
+  FreeAndNil(fMessage);
+  FreeAndNil(fPrefixStack);
+  inherited;
+end;
+
+procedure TROPostMessageSerializer.BeginReadObject(const aName: string;
+  aClass: TClass; var anObject: TObject; var LevelRef: IInterface;
+  var IsValidType: boolean; ArrayElementId: integer);
+var
+  lCount: Integer;
+  lIsAssigned: Boolean;
+  lActualClass: TROComplexTypeClass;
+  lClassname: string;
+begin
+  inherited;
+  lClassname := ReadItem(aName, ArrayElementID);
+
+  lIsAssigned := lClassname <> '';
+
+  PushPrefix(aName, ArrayElementId);
+
+  { ToDo -omh: MUCH this should be moved into common code in TROSerializer so ALL messages benbefit from it? }
+
+  if aClass.InheritsFrom(TROArray) then begin
+    if lIsAssigned then begin
+      anObject := aClass.Create();
+      ReadInteger('Count', otULong, lCount);
+      TROArray(anObject).Resize(lCount);
+    end;
+    IsValidType := true;
+  end
+  else if aClass.InheritsFrom(Binary) then begin
+    if not Assigned(anObject) then begin
+      if lIsAssigned then
+        anObject := Binary.Create;
+    end
+    else begin
+      if lIsAssigned then begin
+        (anObject as Binary).Size := 0;
+      end
+      else begin
+        anObject := nil;
+      end;
+    end;
+    IsValidType := true;
+  end
+  else if Assigned(anObject) and aClass.InheritsFrom(EROException) then begin
+    IsValidType := TRUE;
+  end
+  else begin
+    if lIsAssigned then begin
+
+      if IsValidType then begin
+        lActualClass := FindROClass(lClassname);
+        if not Assigned(lActualClass) then RaiseError(err_UnknownClassInStream,[lClassname,aClass.ClassName]);
+        if not lActualClass.InheritsFrom(aClass) then RaiseError(err_UnexpectedClassInStream,[lClassname,aClass.ClassName]);
+        anObject := lActualClass.Create;
+
+      end
+      else begin
+        RaiseError(str_InvalidClassTypeInStream,[lClassname]);
+      end;
+    end;
+  end;
+
+end;
+
+procedure TROPostMessageSerializer.EndReadObject(const aName: string; aClass: TClass; var anObject: TObject; const LevelRef: IInterface);
+begin
+  inherited;
+  PopPrefix();
+end;
+
+procedure TROPostMessageSerializer.BeginWriteObject(const aName: string;
+  aClass: TClass; anObject: TObject; var LevelRef: IInterface;
+  var IsValidType: boolean; out IsAssigned: Boolean;
+  ArrayElementId: integer);
+var
+  lCount: Integer;
+begin
+  inherited;
+  IsAssigned := Assigned(anObject);
+
+  if aClass.InheritsFrom(Binary) then
+    IsValidType := true;
+
+
+  if IsValidType and IsAssigned then
+    WriteItem(aName, anObject.ClassName, ArrayElementId)
+  else
+    WriteItem(aName, '', ArrayElementId);
+
+  PushPrefix(aName, ArrayElementId);
+
+  if IsAssigned and (anObject is TROArray) then begin
+    lCount := TROArray(anObject).Count;
+    WriteInteger('Count', otULong, lCount);
+  end;
+end;
+
+procedure TROPostMessageSerializer.EndWriteObject(const aName: string; aClass: TClass; anObject: TObject; const LevelRef: IInterface);
+begin
+  inherited;
+  PopPrefix();
+end;
+
+procedure TROPostMessageSerializer.ReadDateTime(const aName: string; var Ref; ArrayElementId: integer);
+var
+  year, month, day, hour, min, sec : word;
+  S: string;
+begin
+  s := ReadItem(aName, ArrayElementId);
+  if s = '' then begin
+    TDateTime(Ref) := 0;
+  end
+  else begin
+    if Length(s) <> 19 then
+      RaiseError('Invaild DateTime value %s in PostMessage ("%s")',[s]);
+
+    year  := StrToInt(Copy(s,1,4));
+    month := StrToInt(Copy(s,6,2));
+    day   := StrToInt(Copy(s,9,2));
+    hour  := StrToInt(Copy(s,12,2));
+    min   := StrToInt(Copy(s,15,2));
+    sec   := StrToInt(Copy(s,18,2));
+    TDateTime(Ref) := EncodeDate(year, month, day)+EncodeTime(hour, min, sec, 0);
+  end;
+end;
+
+procedure TROPostMessageSerializer.WriteDateTime(const aName: string; const Ref;
+  ArrayElementId: integer);
+begin
+  WriteItem(aName,FormatDateTime(PostDateTimeFormat,TDateTime(Ref)), ArrayElementId);
+end;
+
+procedure TROPostMessageSerializer.ReadDouble(const aName: string; aFloatType: TFloatType; var Ref; ArrayElementId: integer);
+var
+  text: string;
+begin
+  text := ReadItem(aName, ArrayElementId);
+  case aFloatType of
+    ftSingle : single(Ref) := PostStrToFloat(text);
+    ftDouble : double(Ref) := PostStrToFloat(text);
+    ftExtended : extended(Ref) := PostStrToFloat(text);
+    ftComp : comp(Ref) := {$IFDEF FPC}
+                            {$IFDEF cpu64}StrToInt64(text){$ELSE}StrToInt(text){$ENDIF}
+                          {$ELSE}
+                            PostStrToFloat(text)
+                          {$ENDIF};
+    ftCurr : currency(Ref) := PostStrToFloat(text);
+  end
+end;
+
+procedure TROPostMessageSerializer.WriteDouble(const aName: string; aFloatType: TFloatType; const Ref; ArrayElementId: integer);
+var
+  src: pointer;
+  text: string;
+begin
+  src := @Ref;
+  case aFloatType of
+    ftSingle   : begin
+      text := FloatToStr(single(src^){$IFDEF DELPHI7UP}, PostFormatSettings{$ENDIF});
+      {$IFNDEF DELPHI7UP}text := StringReplace(text, DecimalSeparator, '.', []);{$ENDIF}
+    end;
+    ftDouble   : begin
+      text := FloatToStr(double(src^){$IFDEF DELPHI7UP}, PostFormatSettings{$ENDIF});
+      {$IFNDEF DELPHI7UP}text := StringReplace(text, DecimalSeparator, '.', []);{$ENDIF}
+    end;
+    ftExtended : begin
+      text := FloatToStr(extended(src^){$IFDEF DELPHI7UP}, PostFormatSettings{$ENDIF});
+      {$IFNDEF DELPHI7UP}text := StringReplace(text, DecimalSeparator, '.', []);{$ENDIF}
+    end;
+    ftComp     : begin
+      text := FloatToStr(comp(src^){$IFDEF DELPHI7UP}, PostFormatSettings{$ENDIF});
+      {$IFNDEF DELPHI7UP}text := StringReplace(text, DecimalSeparator, '.', []);{$ENDIF}
+    end;
+    ftCurr     : begin
+      text := FloatToStr(currency(src^){$IFDEF DELPHI7UP}, PostFormatSettings{$ENDIF});
+      {$IFNDEF DELPHI7UP}text := StringReplace(text, DecimalSeparator, '.', []);{$ENDIF}
+    end;
+  end;
+  ReplaceChar(text,[','],'.'); { compensate for locales that use "," as decimal. }
+  WriteItem(aName,text,ArrayElementId);
+end;
+
+procedure TROPostMessageSerializer.ReadEnumerated(const aName: string; anEnumTypeInfo: PTypeInfo; var Ref; ArrayElementId: integer);
+var
+  value: Integer;
+  text: string;
+begin
+  text := ReadItem(aName, ArrayElementId);
+  value := ROGetEnumValue(anEnumTypeInfo, text);
+  byte(Ref) := value;
+end;
+
+procedure TROPostMessageSerializer.WriteEnumerated(const aName: string; anEnumTypeInfo: PTypeInfo; const Ref; ArrayElementId: integer);
+begin
+  WriteItem(aName,ROGetEnumName(anEnumTypeInfo, Ord(byte(Ref))), ArrayElementId);
+end;
+
+procedure TROPostMessageSerializer.ReadInt64(const aName: string; var Ref; ArrayElementId: integer);
+var
+  s: string;
+begin
+  s := ReadItem(aName, ArrayElementId);
+  Int64(Ref) := StrToInt64(s);
+end;
+
+procedure TROPostMessageSerializer.ReadInteger(const aName: string; anOrdType: TOrdType; var Ref; ArrayElementId: integer);
+var
+  s: string;
+begin
+  s := ReadItem(aName, ArrayElementId);
+  case anOrdType of
+    otSByte:smallint(ref) := StrToInt(s);
+    otUByte:byte(ref) := StrToInt(s);
+    otSWord:shortint(ref) := StrToInt(s);
+    otUWord:word(ref) := StrToInt(s);
+    otSLong:longint(ref) := StrToInt(s);
+    otULong:cardinal(ref) := StrToInt(s);
+  end;
+end;
+
+procedure TROPostMessageSerializer.ReadUTF8String(const aName: string; var Ref;
+  ArrayElementId, iMaxLength: integer);
+begin
+  UTF8String(ref) := UTF8String(HTTPDecode({$IFDEF UNICODE}UTF8Encode{$ENDIF}(ReadItem(aName, ArrayElementId))));
+end;
+
+procedure TROPostMessageSerializer.ReadWideString(const aName: string; var Ref;
+  ArrayElementId, iMaxLength: integer);
+begin
+  WideString(ref) := UTF8ToString(HTTPDecode({$IFDEF UNICODE}UTF8Encode{$ENDIF}(ReadItem(aName, ArrayElementId))));
+end;
+
+procedure TROPostMessageSerializer.WriteInt64(const aName: string; const Ref;
+  ArrayElementId: integer);
+begin
+  WriteItem(aName,IntToStr(Int64(ref)), ArrayElementId);
+end;
+
+procedure TROPostMessageSerializer.WriteInteger(const aName: string; anOrdType: TOrdType; const Ref; ArrayElementId: integer);
+var
+  s: string;
+begin
+  case anOrdType of
+    otSByte:s := IntToStr(smallint(ref));
+    otUByte:s := IntToStr(byte(ref));
+    otSWord:s := IntToStr(shortint(ref));
+    otUWord:s := IntToStr(word(ref));
+    otSLong:s := IntToStr(longint(ref));
+    otULong:s := IntToStr(cardinal(ref));
+  end;
+  WriteItem(aName,s, ArrayElementId);
+end;
+
+procedure TROPostMessageSerializer.WriteUTF8String(const aName: string; const Ref; ArrayElementId: integer);
+var
+  s: UTF8String;
+begin
+  s:=UTF8String(HTTPEncode(AnsiString(UTF8String(ref))));
+  WriteItem(aName, UTF8ToString(s), ArrayElementId);
+end;
+
+procedure TROPostMessageSerializer.WriteWideString(const aName: string; const Ref;
+  ArrayElementId: integer);
+begin
+  WriteItem(aName,{$IFDEF UNICODE}UTF8ToString{$ENDIF}(HTTPEncode(UTF8Encode(WideString(Ref)))), ArrayElementID);
+end;
+
+procedure TROPostMessageSerializer.Clear;
+begin
+  fMessage.Clear();
+  fPrefixStack.Clear();
+  fPrefix := '';
+end;
+
+procedure TROPostMessageSerializer.LoadFromStream(aStream: TStream; aMultiLine: Boolean = True);
+var
+  s: string;
+begin
+  if aMultiLine then
+    fMessage.LoadFromStream(aStream)
+  else begin
+    SetLength(s,aStream.Size);
+    aStream.ReadBuffer(Pointer(s)^, Length(s));
+    fMessage.Delimiter := '&';
+    fMessage.DelimitedText := s;
+  end;
+  if (fMessage.Count > 0) and (copy(fMessage[0], 1, 7) = 'rorocks') then
+    RaiseInvalidStreamError(err_InvalidHeaderEncrypted, [], aStream);
+
+  fPrefixStack.Clear();
+  fPrefix := '';
+end;
+
+procedure TROPostMessageSerializer.SaveToStream(aStream: TStream; aMultiLine: Boolean = True);
+var
+  s: string;
+begin
+  if not aMultiLine then begin
+    fMessage.Delimiter := '&';
+    s := fMessage.DelimitedText;
+    aStream.WriteBuffer(Pointer(s)^, Length(s));
+  end
+  else begin
+    fMessage.SaveToStream(aStream);
+  end;
+end;
+
+procedure TROPostMessageSerializer.PopPrefix;
+begin
+  if fPrefixStack.Count = 0 then
+    raise EROException.Create('Umatched call to PopPrefix');
+
+  Prefix := fPrefixStack[fPrefixStack.Count-1];
+  fPrefixStack.Delete(fPrefixStack.Count-1);
+end;
+
+procedure TROPostMessageSerializer.PushPrefix(aNewPrefix: string; aArrayElementId: integer = -1);
+begin
+  fPrefixStack.Add(Prefix);
+  Prefix := AssemblePrefix(aNewPrefix,aArrayElementId);
+end;
+
+procedure TROPostMessageSerializer.CustomReadObject(const aName: string; aClass: TClass; var Ref; ArrayElementId: integer);
+var
+  obj: TObject absolute Ref;
+begin
+  inherited;
+  if Assigned(obj) and (obj is Binary) then begin
+    ReadBinary('Value', Binary(obj), ArrayElementID);
+  end;
+end;
+
+procedure TROPostMessageSerializer.CustomWriteObject(const aName: string; aClass: TClass; const Ref; ArrayElementId: integer);
+var
+  obj: TObject absolute Ref;
+begin
+  inherited;
+  if Assigned(obj) and (obj is Binary) then begin
+    WriteBinary('Value', Binary(obj), ArrayElementID);
+  end;
+end;
+
+procedure TROPostMessageSerializer.ReadVariant(const aName: String; var Ref; ArrayElementId: Integer);
+var
+  lBinary: Binary;
+begin
+//  lBinary := Binary.Create();
+  ReadBinary(aName, lBinary, ArrayElementID);
+  if lBinary <> nil then
+    try
+      variant(Ref) := VariantFromBinary(lBinary);
+    finally
+      lBinary.Free();
+    end
+ else
+  variant(Ref) := Null;
+end;
+
+procedure TROPostMessageSerializer.WriteVariant(const aName: String; const Ref; ArrayElementId: Integer);
+var
+  lBinary: Binary;
+begin
+  lBinary := BinaryFromVariant(Variant(Ref));
+  try
+    WriteBinary(aName, lBinary, ArrayElementID);
+  finally
+    lBinary.Free();
+  end;
+end;
+
+function TROPostMessageSerializer.AssemblePrefix(const aName: string; aArrayElementId: integer):string;
+begin
+  if Prefix <> '' then begin
+    if aArrayElementID <> -1 then begin
+      result := Prefix+'['+IntToStr(aArrayElementID)+']';
+    end
+    else begin
+      result := Prefix+'.'+aName;
+    end;
+  end
+  else begin
+    result := aName;
+  end;
+end;
+
+procedure TROPostMessageSerializer.WriteItem(const aName: string; aString: string; aArrayElementId: integer = -1);
+begin
+  Message.Add(AssemblePrefix(aName, aArrayElementID)+'='+aString)
+end;
+
+function TROPostMessageSerializer.ReadItem(const aName: string; aArrayElementId: integer = -1):string;
+begin
+  result := Message.Values[AssemblePrefix(aName, aArrayElementId)];
+end;
+
+procedure TROPostMessageSerializer.ReadXml(const aName: String;
+  var Ref; ArrayElementId: Integer);
+var
+  s: WideString;
+  res: IXMLDocument;
+begin
+  ReadWideString(aName, s, ArrayElementID);
+  if s = '' then
+    IXmlNode(Ref) := nil
+  else begin
+    res := NewROXmlDocument;
+    Res.New;
+    Res.XML := s;
+    IXmlNode(Ref) := res.DocumentNode;
+  end;
+end;
+
+procedure TROPostMessageSerializer.WriteXml(const aName: String;
+  const Ref; ArrayElementId: Integer);
+var
+  s: WideString;
+begin
+  if IXMLNode(Ref) = nil then
+    S := ''
+  else
+    s := IXMLNode(Ref).XML;
+  WriteWideString(aName, s, ArrayElementId);
+end;
+
+procedure TROPostMessageSerializer.ReadDecimal(const aName: String;
+  var Ref; ArrayElementId: Integer);
+var
+  s: string;
+begin
+   ReadUTF8String(aName, s, ArrayElementId);
+   if DecimalSeparator <> '.' then s := StringReplace(s, '.', DecimalSeparator, []);
+   Variant(Ref) := BCDToVariant(StrToBcd(s));
+end;
+
+procedure TROPostMessageSerializer.ReadGuid(const aName: String; var Ref;
+  ArrayElementId: Integer);
+var
+  s: string;
+begin
+  ReadUTF8String(aName, s, ArrayElementId);
+  if Copy(s,1,1) <> '{' then s := '{'+s+'}';
+  string(Ref) := s;
+end;
+
+procedure TROPostMessageSerializer.WriteDecimal(const aName: String;
+  const Ref; ArrayElementId: Integer);
+var
+  s: string;
+begin
+  s := BcdToStr(VariantToBCD(variant(Ref)));
+  if DecimalSeparator <> '.' then s := StringReplace(s, DecimalSeparator, '.', []); // delphi has no way to format a bcd with a specific format
+  WriteUTF8String(aName, s, ArrayElementId);
+end;
+
+procedure TROPostMessageSerializer.WriteGuid(const aName: String;
+  const Ref; ArrayElementId: Integer);
+var
+  s: string;
+begin
+  s := GuidToString(StringToGUID(string(Ref)));
+  s := copy(s,2,length(s) -2); // remove curlies
+  WriteUTF8String(aName, s, ArrayElementId);
+end;
+
+procedure TROPostMessageSerializer.WriteBinary(const aName: string;
+  const Ref; ArrayElementId: integer);
+var
+  obj : Binary absolute Ref;
+  ss: TROBinaryMemoryStream;
+  s: AnsiString;
+begin
+  if Assigned(obj) then begin
+    WriteItem(aName, obj.ClassName, ArrayElementId);
+
+    PushPrefix(aName, ArrayElementId);
+    try
+      case BinaryType of
+        btInlineHex:begin
+            s := obj.ToHexString;
+          end;
+        btInlineBase64:begin
+            ss := TROBinaryMemoryStream.Create;
+            try
+              obj.Position := 0;
+              EncodeStream(obj, ss);
+              s := ss.ToString;
+            finally
+              ss.Free;
+            end;
+          end;
+      end;
+      WriteItem('Value',{$IFDEF UNICODE}AnsiStringToWideString{$ENDIF} (s), ArrayElementID);
+    finally
+      PopPrefix();
+    end;
+  end  
+  else
+    WriteItem(aName, '', ArrayElementId);
+end;
+
+procedure TROPostMessageSerializer.ReadBinary(const aName: string; var Ref;
+  ArrayElementId: integer);
+var
+  obj : Binary absolute Ref;
+  ss: TROBinaryMemoryStream;
+  s: AnsiString;
+begin
+  if ReadItem(aName, ArrayElementID) <> '' then begin
+    Obj := Binary.Create;
+    obj.Size := 0;
+    PushPrefix(aName, ArrayElementId);
+    s := {$IFDEF UNICODE}WideStringToAnsiString{$ENDIF} (ReadItem('Value', ArrayElementID));
+    PopPrefix;
+    case BinaryType of
+      btInlineHex: Obj.LoadFromString(StringFromHexStringAnsi(s));
+      btInlineBase64:begin
+        ss := TROBinaryMemoryStream.Create(s);
+        try
+          DecodeStream(ss, Obj);
+          Obj.Position := 0;
+        finally
+          ss.Free;
+        end;
+      end;
+    end;
+  end
+  else
+    obj:=nil;
+end;
+
+function TROPostMessageSerializer.ReadArray(const aName: string;
+  aClass: TClass; var Ref; ArrayElementId: integer): Boolean;
+var
+  obj : TROArray absolute Ref;
+  lCount: Integer;
+begin
+  Result:= ReadItem(aName, ArrayElementID) <> '';
+  if Result then begin
+    PushPrefix(aName, ArrayElementId);
+    obj := TROArray(aClass.Create());
+    ReadInteger('Count', otULong, lCount);
+    obj.Resize(lCount);
+    obj.ReadComplex(Self);
+    PopPrefix();
+  end;
+end;
+
+function TROPostMessageSerializer.ReadStruct(const aName: string;
+  aClass: TClass; var Ref; ArrayElementId: integer): Boolean;
+var
+  obj : TROComplexType absolute Ref;
+  lActualClass: TROComplexTypeClass;
+  lClassname: string;
+begin
+  lClassname := ReadItem(aName, ArrayElementID);
+  Result:=lClassname <> '';
+  if Result then begin
+    lActualClass := FindROClass(lClassname);
+    if not Assigned(lActualClass) then RaiseError(err_UnknownClassInStream,[lClassname,aClass.ClassName]);
+    if not lActualClass.InheritsFrom(aClass) then RaiseError(err_UnexpectedClassInStream,[lClassname,aClass.ClassName]);
+    obj := lActualClass.Create;
+    PushPrefix(aName, ArrayElementId);
+    Obj.ReadComplex(Self);
+    PopPrefix;
+  end;
+end;
+
+procedure TROPostMessageSerializer.WriteArray(const aName: string;
+  const Ref; aClass: TClass; ArrayElementId: integer);
+var
+  obj : TROArray absolute Ref;
+  lCount: Integer;
+begin
+  if Assigned(obj) then begin
+    WriteItem(aName, obj.ClassName, ArrayElementId);
+    PushPrefix(aName, ArrayElementId);
+    lCount := obj.Count;
+    WriteInteger('Count', otULong, lCount);
+    obj.WriteComplex(Self);
+    PopPrefix();
+  end
+  else
+    WriteItem(aName, '', ArrayElementId);
+end;
+
+procedure TROPostMessageSerializer.WriteStruct(const aName: string;
+  const Ref; aClass: TClass; ArrayElementId: integer);
+var
+  obj : TROComplexType absolute Ref;
+begin
+  if Assigned(obj) then begin
+    WriteItem(aName, obj.ClassName, ArrayElementId);
+    PushPrefix(aName, ArrayElementId);
+    obj.WriteComplex(Self);
+    PopPrefix();
+  end
+  else
+    WriteItem(aName, '', ArrayElementId);
+end;
+
+procedure TROPostMessageSerializer.ReadException(const aName: string;
+  var Ref; ArrayElementId: integer);
+var
+  obj: EROException absolute Ref;
+  lIsAssigned: Boolean;
+  lClassname: string;
+begin
+  lClassname := ReadItem(aName, ArrayElementID);
+  lIsAssigned := lClassname <> '';
+  PushPrefix(aName, ArrayElementId);
+  try
+    if lIsAssigned and Assigned(obj) then obj.ReadException(Self);
+  finally
+    PopPrefix;
+  end;
+end;
+
+procedure TROPostMessageSerializer.WriteException(const aName: string;
+  const Ref; ArrayElementId: integer);
+var
+  obj: EROException absolute Ref;
+begin
+  if Assigned(obj) then
+    WriteItem(aName, obj.ClassName, ArrayElementId)
+  else
+    WriteItem(aName, '', ArrayElementId);
+  PushPrefix(aName, ArrayElementId);
+  try
+    if Assigned(obj) then obj.WriteException(Self);
+  finally
+    PopPrefix;
+  end;
+end;
+
+procedure TROPostMessageSerializer.WriteAnsiString(const aName: string;
+  const Ref; ArrayElementId: integer);
+var
+  s: AnsiString;
+begin
+  s:=HTTPEncode(Ansistring(ref));
+  WriteItem(aName, UTF8ToString(s), ArrayElementId);
+end;
+
+procedure TROPostMessageSerializer.ReadAnsiString(const aName: string;
+  var Ref; ArrayElementId, iMaxLength: integer);
+begin
+  AnsiString(ref) := HTTPDecode({$IFDEF UNICODE}UTF8Encode{$ENDIF}(ReadItem(aName, ArrayElementId)));
+end;
+
+initialization
+  RegisterMessageClass(TROPostMessage);
+  {$IFDEF DELPHI7UP}
+  GetLocaleFormatSettings(PostLocale,PostFormatSettings);
+  {$ENDIF}
+
+end.
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROPoweredByRemObjectsButton.lrs b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROPoweredByRemObjectsButton.lrs
new file mode 100644
index 0000000..f6c8b2c
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROPoweredByRemObjectsButton.lrs	
@@ -0,0 +1,549 @@
+LazarusResources.Add('POWERED_BY_REMOBJECTS_CLIENT','BMP',[
+  'BMr'#28#0#0#0#0#0#0'6'#4#0#0'('#0#0#0#212#0#0#0'0'#0#0#0#1#0#8#0#1#0#0#0'<'
+  +#24#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#128#0#0#128#0#0#0#128
+  +#128#0#128#0#0#0#128#0#128#0#128#128#0#0#192#192#192#0#192#220#192#0#240#202
+  +#166#0#0#0#0#0#11#11#12#0#11#12#16#0#22#22#24#0#23#24'"'#0'###'#0' "-'#0'''('
+  +'-'#0'---'#0'0.-'#0'10/'#0'*,;'#0'888'#0'C;;'#0#21#25'I'#0#11#12'['#0#18#24
+  +'Y'#0#29'!A'#0'#+J'#0'79I'#0'+3Y'#0'39R'#0#9#17'z'#0#25'-v'#0')5h'#0'3<b'#0
+  +'=CY'#0';Gv'#0'GFG'#0'SKK'#0'[RO'#0'AEY'#0'NPY'#0'RRR'#0'YSS'#0'\\\'#0'hOM'#0
+  +'i[Z'#0'zjZ'#0'IMg'#0'JQm'#0'Y[d'#0'UZw'#0'\`o'#0'[a}'#0'ggg'#0'{ki'#0'~rk'#0
+  +'chx'#0'opt'#0'www'#0#167'B'#0#129'o`'#0#133'uo'#0#137'yv'#0#144'}x'#0#183
+  +#130':'#0#220#128#15#0#220#131#19#0#254#143#9#0#254#147#10#0#253#154#21#0#254
+  +#161#28#0#220#147'('#0#222#158'7'#0#231#147'*'#0#254#168''''#0#253#172'3'#0
+  +#254#181'8'#0#172#130'B'#0#177#131'A'#0#161#136'U'#0#184#154'W'#0#139#128'~'
+  +#0#145#131'|'#0#153#146'}'#0#175#157'm'#0#184#159'b'#0#164#153'v'#0#222#169
+  +'H'#0#201#164'X'#0#222#178'P'#0#225#175'O'#0#254#185'D'#0#231#169'Q'#0#201
+  +#172'd'#0#196#163'z'#0#211#170'v'#0#244#187'h'#0#255#193'G'#0#255#198'W'#0
+  +#222#198'x'#0#255#205'd'#0#255#210'h'#0#255#215'u'#0#255#225'z'#0#4#8#140#0
+  +#24'0'#137#0#0#7#169#0#0#13#180#0#27'9'#170#0#17'1'#187#0'7J'#141#0',B'#149#0
+  +'4J'#153#0'-F'#163#0':R'#167#0'/M'#188#0'HZ'#149#0'_d'#134#0'Uf'#156#0'`h'
+  +#135#0'y}'#139#0'jn'#146#0'jq'#152#0'uy'#159#0'Vj'#167#0'u{'#163#0#22'9'#197
+  +#0#6'/'#222#0#18'>'#231#0#7'9'#251#0'"J'#221#0'8_'#223#0'<b'#223#0#23'H'#254
+  +#0' J'#232#0'(S'#233#0'''X'#255#0'<e'#234#0'8g'#254#0'Jg'#194#0'In'#225#0'Lr'
+  +#225#0'Er'#250#0#131'~'#129#0'|'#128#143#0'|'#131#174#0''#136#182#0#128#128
+  +#128#0#140#134#133#0#129#131#139#0#139#139#139#0#150#140#136#0#156#147#139#0
+  +#152#151#152#0#163#154#151#0#169#162#158#0#128#140#186#0#139#146#188#0#169
+  +#169#169#0#180#170#168#0#177#176#175#0#173#175#188#0#182#182#182#0#186#182
+  +#187#0#186#186#186#0#226#187#136#0#203#183#164#0#197#187#186#0#218#192#154#0
+  +#237#218#140#0#255#222#129#0#254#228#136#0#251#234#152#0#255#240#153#0#248
+  +#238#163#0#255#246#170#0#138#148#196#0#147#155#205#0#148#157#209#0#149#160
+  +#201#0#157#166#219#0#162#173#220#0#175#184#220#0#184#186#211#0#158#172#232#0
+  +#160#174#227#0#169#175#230#0#162#176#229#0#169#176#231#0#166#180#232#0#169
+  +#177#235#0#179#187#236#0#169#183#246#0#169#184#246#0#172#188#249#0#176#190
+  +#249#0#192#186#192#0#189#194#236#0#183#193#241#0#189#197#242#0#176#192#249#0
+  +#185#198#250#0#189#201#249#0#195#195#195#0#202#196#196#0#206#201#199#0#196
+  +#197#201#0#203#203#203#0#213#201#198#0#217#209#204#0#207#207#208#0#213#207
+  +#208#0#211#211#211#0#220#215#215#0#219#219#219#0#224#221#221#0#246#226#201#0
+  +#199#204#239#0#197#204#242#0#204#209#242#0#201#211#250#0#209#213#243#0#214
+  +#217#242#0#219#222#244#0#211#218#249#0#216#223#250#0#226#222#224#0#219#225
+  +#250#0#226#226#226#0#235#230#229#0#230#231#234#0#235#235#235#0#226#229#245#0
+  +#229#232#246#0#234#236#246#0#224#229#250#0#229#233#249#0#234#237#249#0#239
+  +#240#247#0#239#241#248#0#243#243#243#0#252#247#246#0#243#244#249#0#250#250
+  +#250#0#240#251#255#0#164#160#160#0#128#128#128#0#0#0#255#0#0#255#0#0#0#255
+  +#255#0#255#0#0#0#255#0#255#0#255#255#0#0#255#255#255#0#212#0#0#0#1#0#28#7#18
+  +#166#1#216#8#245#1#227#8#195#12#194#1#222#7#245#1#233#19#166'+'#164#1#214#8
+  +#245#1#236#17#192#20#190#5#188#0#3#190#240#245#0#7#245#1#205#1#0#0#0#1#0#29#7
+  +#17#166#1#214#9#245#1#202#8#195#11#194#1#204#7#245#1#216#20#166'*'#164#1#242
+  +#7#245#0#3#244#193#192#0#17#192#20#190#5#188#1#199#8#245#1#232#1#0#0#0#1#0#30
+  +#7#15#166#0#3#208#242#245#0#7#245#0#3#239#196#195#0#8#195#10#194#1#226#7#245
+  +#1#214#21#166'('#164#1#212#8#245#1#221#20#192#20#190#5#188#1#224#8#245#1#0#0
+  +#0#1#0#31#7#13#166#0#3#7#233#245#0#7#245#0#3#244#203#195#0#10#195#9#194#1#226
+  +#7#245#1#209#22#166#13#164#0#6#152#0#15'+'#247#164#20#164#1#233#7#245#1#240
+  +#22#192#20#190#4#188#0#3#190#244#245#0#6#245#1#0#0#0#1#0' '#7#12#166#1#233#9
+  +#245#1#204#13#195#8#194#1#238#7#245#1#205#23#166#12#164#1'7'#3#0#0#3#11';'
+  +#164#0#18#164#1#205#8#245#1#219#23#192#20#190#4#188#1#223#7#245#1#0#0#0#1#0
+  +'!'#7#10#166#1#230#9#245#1#227#15#195#7#194#1#238#7#245#25#166#11#164#1';'#5
+  +#0#1#247#18#164#1#216#7#245#1#241#25#192#20#190#3#188#0#3#190#244#245#0#5#245
+  +#1#0#0#0#1#0'"'#7#8#166#1#215#9#245#1#238#17#195#6#194#7#245#1#242#26#166#12
+  +#164#1'&'#3#0#1'+'#18#164#1#242#7#245#1#220#26#192#20#190#3#188#1#224#6#245#1
+  +#0#0#0#1#0#17#7#0#20#160'<'#23#15#13#12#11#11#15#17#22'&+''&'#23#23'-'#162
+  +#166#4#166#1#214#9#245#0#3#241#196#195#0#7#195#1#186#3#158#1#186#5#195#5#194
+  +#7#245#1#233#12#166#1#247#2#152#1#247#11#166#2#164#1#162#2#152#7#164#1#11#2#0
+  +#1#18#6#164#1#160#3#152#1#160#6#164#0#7#205#245#209#166#166#216#245#0#2#245#1
+  +#193#3#192#2#148#1#180#4#192#0#4#148#147#179#192#11#192#2#159#20#190#2#188#1
+  +#193#6#245#1#0#0#0#1#0#15#7#0#5#155'&'#15#14#13#0#3#13#0#15#12#13#22#152#169
+  +#206#169#161#153'@9('#20#149#166#0#2#166#0#5#208#242#245#149#0#0#2#0#1#166#2
+  ,#245#0#3#244#183#0#0#2#0#1')'#3#195#0#3#147#21#0#0#4#0#0#6#14#147#195#195'4'
+  +#0#2#0#0#5#194#196#245#149#0#0#2#0#2#245#0#3#233'-'#0#0#2#0#6#166#0#3'7'#13#0
+  +#0#3#0#0#4#13'-'#162#166#4#166#1#18#2#0#0#3#149'-'#0#0#2#0#0#3#11'-'#164#0#4
+  +#164#1#18#3#0#4#164#0#3#149#18#0#0#4#0#0#3#13#149#164#0#2#164#0#4#160'-'#12#0
+  +#3#0#0#7#20#245#234#192#192'1'#0#0#3#0#2#148#1#16#4#0#0#4#12'1'#182#192#6#192
+  +#1#21#4#0#0#6#29#179#190#190'w'#0#3#0#0#4#16#29'}'#190#3#190#0#13#21#0#21#190
+  +#188#188#22#0#0#166#245#245#0#0#0#0#0#3#0#214#7#0#11#7#0#3#164'-'#15#0#3#15#1
+  +#14#4#13#0#8#23#207#233#231#213#247#150'@'#2'@'#0#11'A8'#22#160#166#208#242
+  +#245#245#149#0#0#2#0#1#166#2#245#0#3#204'y'#0#0#2#0#1#147#2#195#1'|'#8#0#1'|'
+  +#2#195#1'4'#3#0#0#5#194#204#245#149#0#0#2#0#2#245#0#3#230'-'#0#0#2#0#4#166#0
+  +#3#162#15#0#0#7#0#0#3#13#155#166#0#3#166#1#18#2#0#1#13#6#0#1'&'#4#164#1#18#3
+  +#0#3#164#1';'#8#0#1';'#2#164#0#3#160#15#0#0#5#0#0#6#23#245#220#192'w'#0#4#0#0
+  +#3#148''#0#0#6#0#1#16#7#192#0#11#13#0#16#16#0#0#12#182#190'4'#0#0#6#0#0#14
+  +#21#182#190#190#21#0#21#190#190'}'#0#0'-'#245#2#245#1#0#0#0#0#5#0#245#242#214
+  +#7#0#8#7#0#5#155#22#18#17#15#0#3#15#1#26#2'l'#0#18#25#149#243#242#217';<<;,/'
+  +'@T&'#149#205#242#245#2#245#1#149#3#0#0#6#166#245#222#195#21#0#2#0#0#4#186
+  +#195#158#0#3#0#1')'#2'4'#0#7'2'#16#178#195#195'4'#0#0#2#0#0#5#194#204#245#149
+  +#0#0#2#0#2#245#0#3#216'-'#0#166#2#0#4#166#1#20#4#0#2#18#1#11#3#0#0#3#11#162
+  +#166#164#2#166#1#18#4#0#0#3#15#18#0#188#3#0#1';'#3#164#1#18#3#0#2#164#1#152#4
+  +#0#1'&'#2'-'#0#7'+'#15#155#164#164#18#0#194#2#0#0#10#12';'#149';'#152#245#193
+  +#192#21#0#2#0#0#10#14#21#178#182#14'1'#148'4'#0#2#0#1''#6#192#0#31''#182
+  +#192#192#159#0#0'{'#190'4'#0#0#190#190#179'1'#0#0'$'#190#190#21#0#21#190#190
+  +#13#0#12#233#245#166#2#245#1#0#0#0#1#0#3#245#0#3#242#214#7#224#5#7#1#152#2#20
+  +#2#18#1#17#3#15#0#20#24'mlj&'#217#255#206'<'#210#157#161#157'''?9'#20#160#233
+  +#245#3#245#1#149#3#0#0#5#166#229#195#195#0#164#2#0#1#16#2#195#1')'#2#0#0#3#12
+  +#182#195#3#7#195#1'4'#3#0#0#5#195#204#245#149#0#7#2#0#2#245#0#3#216'-'#0#195
+  +#2#0#3#166#1'7'#3#0#0#7#15#247#166#166#162'&'#0#3#2#0#1'&'#3#166#1#18#3#0#1
+  +'7'#2#166#1#155#3#0#1#15#3#164#1#18#3#0#2#164#1'&'#2#0#0#3#11#247#164#227#6
+  +#164#1#247#3#0#0#3#15#233#245#164#3#245#1#244#2#192#3#0#0#3#14#182#192#241#6
+  +#192#1#182#3#0#1'4'#10#192#1#182#2#0#0#6'4'#190'4'#0#0#190#3#190#1#29#2#0#0
+  +#11#182#190#21#0#21#190'4'#0#0#152#245#164#3#245#1#0#0#0#1#0#5#245#0#3#242
+  +#214#7#192#2#7#1#247#2#22#2#20#2#18#1#17#2#15#0#19#26'm '#24#14#23#149';&/.8'
+  +'@'''''#19#149#233#245'-'#4#245#1#149#3#0#0#5#163#196#195#158#0#0#2#0#1'2'#2
+  +#195#1#14#2#0#1#31#7#158#2#195#1'4'#3#0#0#5#195#204#245#149#0#164#2#0#2#245#0
+  +#3#216'-'#0#0#2#0#3#166#1#13#3#0#1#247#5#166#1#13#3#0#1#247#2#166#1#18#3#0#4
+  +#166#1'&'#3#0#1#162#2#164#1#18#3#0#2#164#1#13#2#0#1#22#7#152#0#3#164';'#0#0#2
+  +#0#1#152#5#245#1#235#2#192#3#0#1#21#6#192#0#4#148')'#12#0#2#0#1''#8#192#0#11
+  +#182'{'#13#0#0''#192'4'#0#0#190#149#3#190#1#159#2#0#0#11'}'#190#21#0#0'w'#11
+  +#0#16#240#245#195#3#245#1#0#0#0#1#0#7#245#0#5#242#209#162'&'#22#0#2#22#2#20#2
+  +#18#0#20#17#15#27#26'&8'#145'</((''&'#23#23#15#12#11#228#245#5#245#1#149#3#0
+  +#1#158#2#196#1#31#3#0#1#178#2#195#11#0#0#4#158#195'4'#0#2#0#0#5#195#204#245
+  +#149#0#164#2#0#2#245#0#3#216'-'#0#3#2#0#2#166#1#155#3#0#1'&'#6#166#1'<'#3#0#1
+  +'<'#2#166#1#18#3#0#4#166#1'-'#3#0#1#152#2#164#1#18#3#0#2#164#11#0#0#3#152'-'
+  +#0#179#2#0#1#166#5#245#1#224#2#192#3#0#1#21#4#192#0#3#182#21#0#188#4#0#1#16#8
+  +#192#0#3'{'#12#0#3#2#0#1')'#2#192#1'4'#2#0#5#190#2#0#0#4'4'#190#21#0#4#0#0#3
+  +#147#235#245'@'#3#245#1#0#0#0#1#0#9#245#0#3'7'#23#22#0#3#22#2#20#2#18#0#19#17
+  +#15#23#162'9'#170#218#211#169#161#155#155#154#150'7'#23#13#23#245'4'#5#245#1
+  +#149#3#0#0#4')4'#21#0#2#0#1#21#3#195#11#0#0#4#158#195'4'#0#2#0#0#5#204#241
+  +#245#149#0#155#2#0#2#245#0#3#212'-'#0#13#2#0#2#166#1'<'#3#0#1'<'#6#166#1#247
+  +#3#0#1'+'#2#166#1#18#3#0#4#166#1'-'#3#0#1#152#2#164#1#18#3#0#2#164#11#0#0#3
+  +#152'7'#0#16#2#0#1#166#5#245#1#223#2#192#3#0#1#21#4#192#1#16#4#0#0#4#12'4'
+  +#182#192#6#192#1'w'#3#0#0#3#12'4'#192#0#2#192#1'4'#2#0#5#190#2#0#0#11'4'#190
+  +#21#0#13#0#0#29#190#225#245#26#3#245#1#0#0#0#1#0#8#245#0#5#212'&'#23#23#22'&'
+  +#3#22#2#20#2#18#0#20#17'+'#205'8DGHN]b'#167#168#169#198#165#156','#23#217#245
+  +#3#245#1#149#8#0#0#3#21#186#195'4'#2#195#1#21#2#0#1#31#3#158#1'y'#3#0#0#4#186
+  +#195'4'#0#2#0#1#216#2#245#1'-'#3#0#0#5#216#245#209'&'#0#3#2#0#2#166#1'-'#3#0
+  +#1#152#7#166#3#0#1#18#2#166#1#18#3#0#1#247#3#166#1#18#3#0#1#162#2#164#1#18#3
+  +#0#2#164#1#18#2#0#1#22#3#152#1'7'#3#0#0#3#160#155#0#192#2#0#1'-'#5#245#1#223
+  +#2#192#3#0#1#21#3#192#1#178#3#0#0#3#16''#192#182#9#192#0#5#13#0#12'{'#192#0
+  +#4#192#1'4'#2#0#4#190#1'}'#2#0#0#11'}'#190#21#0#21'4'#0#0#147#223#245#0#3#245
+  +#1#0#0#0#1#0#8#245#1'<'#2'&'#2#23#4#22#2#20#2#18#0#5'+'#212'?CE'#217#3'E'#0
+  +#11'FGHM^a'#168#206#155#22#245#245#3#245#1'<'#9#0#1'2'#3#195#1'|'#2#0#0#12#12
+  +#186#195#195#31#0#0#16#195#195'6'#0#2#0#0#4#20#162#247#0#3#0#0#4#20#166';'#0
+  +#2#0#1#20#2#166#1'-'#3#0#1#152#7#166#3#0#1#18#2#166#1#18#3#0#0#5#18#162#166
+  ,'7'#0#166#2#0#1#13#3#164#1#18#3#0#2#164#1';'#2#0#0#12#11#162#164#164#22#0#0
+  +#15#164#164#18#0#2#0#0#9#149#233#245#245#216#223#180#148#0#164#2#0#1#16#2#148
+  +#0#3#182#178#0#182#2#0#1''#2#192#0#3#182#178#192#192#6#192#2#0#1'4'#6#192#1
+  +'4'#2#0#1#192#2#190#0#15#182#16#0#0#182#190#21#0#21#182#16#0#12#185#245#245#3
+  +#245#1#0#0#0#1#0#7#245#1#230#4'&'#0#16#23'#'#128#131'o'#30#20#20#18','#216'A'
+  +'CFGH'#4'H'#1'G'#2'F'#0#5'GK`3'#245#19#2#245#0#3#244'6'#0#149#2#0#1'y'#2#158
+  +#1#31#3#0#1'4'#3#195#1#21#2#0#0#4#12#21#16#0#2#0#0#8#147#196#226#149#0#0#12#0
+  +#5#0#1#12#6#0#1'7'#2#166#1'<'#3#0#1'<'#6#166#1#162#3#0#1#22#2#166#1#18#10#0#0
+  +#6#149#166#164#164#18#0#2#0#3#164#1#18#2#0#0#4#11#18#15#0#2#0#1#149#2#164#0#3
+  +#155#11#0';'#5#0#0#4';'#223'4'#0#6#0#0#4#148#192#16#0#2#0#0#5#21#16#0')'#192
+  +#0#6#192#0#30#21#0#12'{'#147'44'#192#192'4'#0#0'441'#12#0#0'4'#190#190#21#0
+  +#21#190#159#0#0#17#245#3#245#1#0#0#0#0#4#0#222#241#245#4#245#0#3#162'''&&'#2
+  +'&'#0#3')'#130#131#18#2#131#0#12#129#22#20#20'-'#230'TDHLLM'#3'M'#2'L'#0#11
+  +'HGFB3'#245#245#244#203'6'#0#31#2#0#1#158#3#196#1#31#2#0#1#12#3#195#0#3#186
+  +#21#0#204#5#0#0#10'|'#226#244#245#149#0#0';'#20#0#3#0#0#4#20#233#20#0#3#0#0#6
+  +#15#162#166#166#155#0#2#0#1'&'#6#166#1#149#3#0#1'-'#2#166#1#18#3#0#1'&'#5#0#1
+  +'&'#3#166#0#3#164#18#0#0#2#0#3#164#0#3#162#18#0#0#5#0#1';'#4#164#0#3#247#15#0
+  +#0#4#0#0#4#20#223'4'#0#6#0#0#5#148#192#178#14#0'4'#4#0#1#14#7#192#0#3#159#12
+  +#0#0#3#0#1#13#2#192#1'4'#7#0#1'4'#3#190#0#10#21#0#21#190#190'4'#0#0';'#245#2
+  +#245#1#0#0#0#1#0#2#197#0#3#222#241#245#161#2#245#0#8#149'+''&&%'#135#131#3
+  +#131#0#11'"'#22#20'-'#233#153'ILMN]'#195#3']'#0#13'NMLHGB*'#245#245#222#196
+  +'6'#0#155#2#0#1#158#3#196#1'4'#3#0#1#158#4#195#0#8#158'2'#21#21'2'#184#241
+  +#245#2#245#1#166#2#149#0#15#166#245#247''''#23#152#233#245#216#149#22#20'7'
+  +#162#166#0#3#166#1#13#2#0#0#3#11#162#166#0#4#166#1#20#3#0#1#155#2#166#1#18#3
+  +#0#0#7#166'<'#22#18'&'#152#166#192#4#166#1';'#3'-'#5#164#0#7#152'+'#18#18'+'
+  +#247#164#0#4#164#0#12#208#245#162';'#23#23''''#152#223#148'4'#0#2#0#1#14#2'4'
+  +#1#180#2#192#0#8#182'|)'#21#29'4'#178#192#7#192#0#11#182'w)'#21'1{'#192#192
+  +#179'w4N'#3'4'#0#3#147#182#190#156#3#190#0#4'{4{'#190#2#190#0#7'4<'#149#233
+  +#245#245#0#21#0#0#1#0#3#197#0#13#202#226#244#245'-++''&%'#135#135#131#245#2
+  +#131#1#31#2#22#0#8'-'#244#154'IN]cd'#3'd'#0#13'c]NMHP*'#245#222#196#196'6'#0
+  +#0#2#0#1#158#3#196#1#21#3#0#0#3#182#196#195#0#5#195#0#3#204#238#245#22#13#245
+  +#0#3#242#212#166#3#9#166#1'<'#3#0#1'&'#4#166#1'<'#3#0#1#15#3#166#1#18#3#0#12
+  +#166#19#164#1#205#7#245#1#235#2#192#3#0#1#21'$'#192#11#190#1#236#4#245#1#0#0
+  +#0#1#0#5#197#0#14#202#226'-,++''&'#132#135#135#131#128#22#2#22#0#20'-'#245
+  +#156'J]ddfggfdd]NLP&'#222#196#2#196#1'6'#3#0#1')'#2'4'#1#16#3#0#1#14#3#196#3
+  +#195#0#3#202#237#245'2'#13#245#0#3#242#214#166#12#12#166#1#15#3#0#1#13#2'-'#1
+  +#20#4#0#1#152#3#166#1#18#3#0#11#166#1#152#2#15#1#152#17#164#6#245#0#9#216#241
+  +#192#192#16#0#0#21#192#18'$'#192#10#190#5#245#1#0#0#0#1#0#7#197#2'-'#1','#2
+  +'+'#0#17'''*rsq'#23#23#22#22'-'#255#156'Ydfgh'#15#3'h'#0#8'gfd]NP&'#196#3#196
+  +#1'6'#9#0#0#3#12#179#196#148#3#196#0#3#197#229#245#0#3#245#0#3';'#23#245#178
+  +#8#245#0#3#216#7#166'4'#13#166#0#3#162#15#0#192#8#0#1'<'#4#166#1#18#3#0#11
+  +#166#1#13#2#0#1#13#17#164#1#242#5#245#0#9#23#15#178#192#192#180'|w'#192#16'%'
+  +#192#8#190#1#199#5#245#1#0#0#0#1#0#7#197#3'-'#1','#2'+'#1''''#4'&'#2#23#0#20
+  +#22'-'#255#157'Ydgh'#172#173#173#172'hgfcNO'#23#196#3#196#1'6'#7#0#0#4#12')'
+  +#182#196#2#196#0#4#197#226#244#245#4#245#0#3#23#0#245#12#6#245#0#3#230#205
+  +#166'<'#16#166#0#3#162'-'#0#162#5#0#0#3#15#152#166#18#4#166#1#20#3#0#11#166#1
+  +#11#2#0#1#13#17#164#1#230#5#245#1#247#2#12#1#178'+'#192#7#190#1#221#5#245#1#0
+  +#0#0#1#0#7#197#4'-'#1','#2'+'#1''''#4'&'#2#23#0#19'-'#255#157'\fh'#172#173
+  +#174#175#174#172'hfdc='#22#196'4'#5#196#1#182#4#158#1#182#5#196#0#3#222#241
+  +#245#159#6#245#0#3#23#0#245#0#4#245#0#3#233#208#166#245#20#166#0#7#162#149'-'
+  +'-7'#155#166#3#6#166#1#20#3#0#11#166#1'<'#2#11#0#3'<'#166#164'L'#15#164#1#216
+  +#6#245#0#4#233#14#16#192'+'#192#6#190#1#235#5#245#1#0#0#0#1#0#7#197#1'7'#4'-'
+  +#1','#2'+'#1''''#4'&'#0#20#23'-'#255#161'[gi'#173#175#177#177#175#173'hgdcO'
+  +#22#196#14#196#0#3#204#239#245#166#8#245#0#8#23#0#245#245#166#205#209#166#6
+  +#166#2#152#22#166#0#4#155#152#155#166#11#166#1#162#2#152#1#162#5#166#0#4#162
+  +#152#247#164#12#164#0#4#162#155#216#245#5#245#0#4#165#0'|'#192'+'#192#4#190#1
+  +#192#6#245#1#0#0#0#1#0#7#197#0#3'z7-'#14#3'-'#1','#2'+'#1''''#2'&'#0#21')$-'
+  +#255#162'QR_e'#171#174#176#175#173'igdcP'#23#196#245#12#196#0#3#202#238#245#0
+  +#10#245#0#9#23#0#247#12#0#0#11'<'#166'+'#3#166#0#7'-'#11#0#0#11'7'#166#22#4
+  +#166#2#13#4#166#0#3#13#11#166']'#4#166#0#3#149#13#0'B'#2#0#0#7#11#152#166#152
+  +#0'-'#166#158#3#166#0#3#162'&'#0#158#3#0#1#22#3#166#1'-'#3#0#0#5#18#149#0#152
+  +#164#149#5#164#0#4#0'-+'#0#2#0#0#3#15#209#245#162#3#245#0#4#233#0#14#192','
+  +#192#3#190#1#221#6#245#1#0#0#0#1#0#7#197#1#159#2'7'#4'-'#1','#2'+'#0#23'''1'
+  +#136#135'-'#255#217#208#165#160#154#153'UUXVWZ\NO&'#196#12#10#196#0#3#203#229
+  ,#245#152#12#245#0#20#23#0#12#152#166#160#22#0#149#166#166'+'#0'+'#162#162'&'
+  +#0'-'#166#2#166#0#11#155#0#13#149#166#166#155#0#11#149#166'N'#2#166#0#13#149
+  +#0#22#247#166#166#149#247#166#152#0'-'#166#190#3#166#0#19#15#11'<'#166#166
+  +#247#149#166#166'7'#0'&'#162#162'&'#13#0#152#164#22#5#164#0#10#0#11#15#247
+  +#164#160#20#12#216#245#2#245#1#247#2#0#1#148'-'#192#2#190#1#240#6#245#1#0#0#0
+  +#1#0#7#197#1#191#3'7'#0#29'-3'#139#140'v++t'#135#135'$'#160#166#212#217#228
+  +#217#215#213#169#160#156#153'S90>'''#196#0#8#196#0#4#197#226#244#245#13#245#0
+  +#4#22#0#152#166#2#166#0#8#162#11#13#166#247#0#20#166#3#166#0#16#20#0#162#166
+  +#166'7'#13'&&'#166#166'7'#15#20'+'#166#2#166#2#13#7#166#0#4#152#0'-'#166#2
+  +#166#0#4'<'#0'<'#166#6#166#2#13#4#166#0#4#15#0#152#164#5#164#0#10#0#11#162
+  +#164#164#209#166#0'-'#245#2#245#2#20#0#3#17')'#192#237'-'#192#1#219#7#245#1#0
+  +#0#0#1#0#8#197#1#146#3'7'#0#22#142#144#140#139',+t'#138#135'nk!'#28#18#22'&,'
+  +'7<'#150#153#156#2#156#0#4#154'8'#20#196#8#196#1#204#14#245#0#5#233#205#20#0
+  +#166#0#4#166#0#7'&'#0#160'<'#0'<'#166'+'#3#166#0#21'<'#0#149#166#166#15#22'<'
+  +#11#166#166#15'+-'#13#166#166#247#0'+'#166'f'#6#166#0#4#152#0'-'#166#2#166#0
+  +#4'&'#0#162#166#5#166#0#4#155#0'+'#166#3#166#0#4'-'#0#152#164#5#164#0#3#0#18
+  +#164#7#3#164#1#242#2#15#2#245#0#7#209#0#152#151#0#187#192#18','#192#1#240#7
+  +#245#1#0#0#0#1#0#8#197#1#182#3'7'#1#143#2#144#0#4#140#134#133#138#2#138#4#135
+  +#0#15#131#128#22#22#20#17#17#15#17#17#20#22')'#179#196'+'#8#196#1#204#12#245
+  +#0#7#233#209#166#166#20#0#166'h'#4#166#0#7'-'#0#152'-'#0#152#166#196#3#166#0
+  +#21#152#0'-'#166#162#0'7'#162#0#149#247#0#149#155#0#155#166#152#0#13#20#0#5
+  +#20#0#5#166#152#0'-'#166'<'#2#166#0#3#20#0#18#162#5#18#0#5'<'#152#0'-'#166
+  +#166#3#166#0#4'-'#0#152#164#5#164#0#3#0#18#164#230#3#164#0#12#216#23#0#245
+  +#245'-'#0#216#216#0'|'#192'+'#192#1#221#8#245#1#0#0#0#1#0#9#197#1#146#2'7'#1
+  +':'#3#144#3#140#3#138#4#135#0#3#130#23#22#172#3#22#2#20#2#18#1'*'#12#196#10
+  +#245#0#3#242#214#166#196#3#166#0#3#20#0#166#245#4#166#0#7'-'#0#152'7'#0#152
+  +#166#208#3#166#0#21#152#0'7'#166'<'#0#155#166#22'+7'#11#166#166#11'+'#166#247
+  +#0#20'-'#11#3'-'#0#7#13#0#166#152#0'-'#166#245#2#166#0#3'&'#0'-'#192#3'-'#0#7
+  +'&'#0'-'#155#0'-'#166#0#3#166#0#5'-'#0#152#166#164'+'#4#164#0#3#0#18#164'-'#3
+  +#164#0#12#166#23#12#245#233#12''''#245#245#18#16#192'*'#192#0#3#193#244#245
+  +#239#6#245#1#242#1#0#0#0#0#3#0#202#197#166#7#197#0#6#191';77y'#144#2#144#3
+  +#140#3#138#3#135#0#5'q'#23#29#29#22#152#2#22#2#20#0#3#22#187#196#245#11#196#8
+  +#245#0#4#244#216#7#166#4#166#0#4#20#0#152#166#3#166#0#7#15#11#166#160#0'&'
+  +#166#14#3#166#0#21'&'#0#155#166#22#11#166#166'7'#15#22'&'#166#166#22#13#166
+  +#166#13#15#166#173#3#166#0#7#13#20#166#152#0#20#166#3#2#166#0#4'<'#0#149#166
+  +#2#166#0#7'<'#0#152#166#11#15#166#166#3#166#0#6'&'#0#152#166#166#164#3#164#0
+  +#4#0#11#162#164#2#164#0#13#162#0''''#245#247#0#247#245#245#152#0#180#192#152
+  +')'#192#1#235#8#245#1#212#1#0#0#0#1#0#2#202#8#197#1#182#3'7'#0#5':'#143#144
+  +#144#140#152#2#140#3#138#3#135#0#5'q'#130#131'#'#22#3#2#22#0#3#20#179#196#4
+  +#12#196#1#239#7#245#4#7#4#166#0'F'#20#11#15#160#166#166'-'#0'+'#166#166'&'#0
+  +#152#166#166#152#0#20#166#166#11#22#166#166#247#0#13'<'#166#166'<'#0#155#166
+  +#149#0'<'#166#166'<'#0'<'#166#152#0#11'-'#162#166#166#15#15#162#166#162#15#13
+  +#166#166'-'#0'-'#166#166#152#0#0#152#166#2#166#3#164#2#0#0#17'&'#162#164#162
+  +#22#0#160#245#23#12#233#245#245#216#0'3'#192#13'('#192#1#224#8#245#1#242#1
+  +#164#1#0#0#0#1#0#3#202#8#197#1#181#4'7'#1'~'#2#144#3#140#3#138#3#135#0#4#130
+  +'q'#23#22#2#22#1#148#14#196#1#238#7#245#1#208#4#7#3#166#2#20#0#22'-'#0#20#13
+  +#0#20#162#166#166#162#22#0#15#15#0#20#162#166#149#0'<'#166#2#166#0'!'#15#0
+  +#162#166#166#247#0'-'#166#166'-'#0#15#15#0'&'#166#166#152#0'<'#11#0#152#166
+  +#155#15#11#20#11#11#155#166'S'#2#166#0#9'&'#0#13#15#11#18#0#152#166#245#3#166
+  +#2#164#0#13#0#18'&'#11#18#11#0'+'#216#216#0'-'#245#166#3#245#0#4#20#12#200
+  +#192'&'#192#1#219#9#245#1#209#1#164#1#0#0#0#1#0#4#202#8#197#0#3#182';7'#166#3
+  +'7'#0#17'x'#141#139#140#140#138#138#137'up&&'#23#23'&'#179#196#10#14#196#1
+  +#226#7#245#1#209#5#7#2#166#2#155#0#6#166#160'7-'#155#166#5#166#1#155#2'-'#1
+  +#152#3#166#0#4#247#152#162#166#2#166#0#3#247#155#166'+'#3#166#0#3#152#155#166
+  +#18#2#166#0#5#247'7-'#155#166#156#2#166#0#7#162#152#162#162'<'#247#166#245#2
+  +#166#0#5#149'-<'#162#166#166#4#166#0#8#155'-7'#247'-'#0#152#166#4#166#0#14
+  +#164#0#18#164#155'--'#155#164#164#212#166#216#245#3#245#0#5#216#166#232#200
+  +#192#4'$'#192#1#219#9#245#1#230#2#164#1#0#0#0#1#0#5#202#8#197#0#3#191#146'7'
+  +#0#3'7'#4'-'#1','#2'+'#1''''#4'&'#0#3'5'#187#196#245#15#196#1#226#7#245#1#216
+  +#6#7'C'#166#0#4'-'#0#152#166#5#166#0#3#0#18#164#182#6#164#1#205#9#245#0#3#244
+  +#200#192#138'"'#192#1#219#9#245#0#5#242#166#164#164#0#15#0#0#1#0#6#202#9#197
+  +#0#3#182#146'7'#245#2'7'#4'-'#1','#2'+'#0#5'''&:'#180#196#0#17#196#1#204#7
+  +#245#1#230#7#7'B'#166#0#4'-'#0#152#166#5#166#0#3#0#18#164#155#7#164#1#214#10
+  +#245#1#220'!'#192#1#223#10#245#1#209#3#164#1#0#0#0#1#0#7#202#10#197#0#5#191
+  ,#159'z7-'#166#4'-'#0#4':'#148#189#197#2#197#17#196#1#202#7#245#1#233#8#7'A'
+  +#166#0#4'-'#0#152#166#5#166#0#3#0#18#164#245#8#164#1#230#10#245#0#3#225#195
+  +#192'7'#29#192#1#234#10#245#1#216#4#164#1#0#0#0#1#0#8#202#25#197#17#196#1#244
+  +#7#245#9#7'@'#166#0#4#152'-'#247#166#5#166#0#4'-<'#166#164#7#164#0#3#166#233
+  +#245#152#9#245#0#3#241#201#192#0#26#192#0#3#219#244#245'+'#9#245#1#228#5#164
+  +#1#0#0#0#1#0#9#202#25#197#16#196#1#238#7#245#1#208#9#7'L'#166#8#164#0#3#166
+  +#233#245#7#10#245#0#3#234#193#192#0#22#192#0#3#201#235#245#166#10#245#0#3#233
+  +#166#164#18#4#164#1#0#0#0#1#0#10#202#25#197#15#196#1#227#7#245#1#214#10#7'L'
+  +#166#8#164#0#3#166#233#245#0#11#245#0#3#234#201#192#166#18#192#0#3#220#235
+  +#245'7'#11#245#0#3#233#166#164#138#5#164#1#0#0#0#1#0#11#202#25#197#14#196#1
+  +#222#7#245#1#230#11#7'L'#166#8#164#0#3#166#233#245#166#12#245#0#4#241#224#201
+  +#192#11#192#0#5#193#220#225#244#245#14#12#245#0#3#228#166#164#166#6#164#1#0#0
+  +#0#1#0#12#202#25#197#13#196#1#204#7#245#1#233#12#7'L'#166#8#164#0#3#166#230
+  +#245#166#15#245#0#12#236#225#223#223#220#201#220#223#223#234#236#245#15#245#1
+  +#216#9#164#1#0#0#0#1#0#13#202#25#197#13#196#1#244#7#245#13#7'L'#166#9#164#1
+  +#216'('#245#0#3#242#212#164#152#9#164#1#0#0#0#1#0#14#202#25#197#12#196#1#238
+  +#7#245#1#212#13#7'L'#166#9#164#0#3#205#233#245#140'$'#245#0#3#233#7#164#130
+  +#10#164#1#0#0#0#212#0#0#1
+]);
+LazarusResources.Add('POWERED_BY_REMOBJECTS_SERVER','BMP',[
+  'BMR'#28#0#0#0#0#0#0'6'#4#0#0'('#0#0#0#212#0#0#0'0'#0#0#0#1#0#8#0#1#0#0#0#28
+  +#24#0#0#19#11#0#0#19#11#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#128#0#0#128#0#0#0#128
+  +#128#0#128#0#0#0#128#0#128#0#128#128#0#0#192#192#192#0#192#220#192#0#240#202
+  +#166#0#0#0#0#0#11#11#12#0#11#12#16#0#20#20#20#0#21#22#29#0#28#28#29#0'###'#0
+  +' "-'#0'''(-'#0'---'#0'*,;'#0'222'#0'67;'#0';;;'#0'?E?'#0#23#27'E'#0#16#21']'
+  +#0#21#27'\'#0#26#25'_'#0#29'!A'#0'47J'#0'59M'#0':=I'#0'+3Y'#0'39R'#0#28#29'k'
+  +#0')5h'#0'3<b'#0'(7v'#0'>D['#0':Fu'#0'=Iw'#0'DDD'#0'CDH'#0'IJK'#0'ADS'#0'DHW'
+  +#0'JMS'#0'@D['#0'JN]'#0'NPQ'#0'RRR'#0'\\\'#0'JMf'#0'CLm'#0'JNh'#0'JQm'#0'[]c'
+  +#0'WZk'#0'LL~'#0'UXu'#0'U\|'#0'\`o'#0'[a}'#0'ccc'#0'ghl'#0'jjj'#0'bfu'#0'onr'
+  +#0'aey'#0'jn}'#0'opt'#0'ttt'#0'zsu'#0'st{'#0'xwx'#0'{{{'#0#10#156#18#0';'#139
+  +'A'#0#0#1#156#0#0#5#165#0#3#8#164#0#0#9#171#0#0#12#177#0#0#15#184#0#2#19#180
+  +#0#17'1'#187#0'7J'#141#0',A'#148#0'4J'#153#0'-F'#163#0'<B'#166#0'8Q'#167#0'<'
+  +'T'#168#0'$C'#184#0'/M'#188#0'HZ'#149#0'_d'#132#0'_h'#141#0'Uf'#156#0'`h'#130
+  +#0'`i'#141#0'w{'#138#0'{'#141#0'jn'#146#0'jp'#149#0'js'#155#0'uy'#159#0'Vj'
+  +#167#0'uz'#161#0'u'#171#0#21'8'#194#0#24';'#195#0#6'/'#222#0#18'>'#231#0#3
+  +'2'#240#0#13'<'#242#0#1'4'#253#0#7':'#255#0#12'>'#255#0'"J'#221#0'8_'#223#0
+  +'<b'#223#0#20'B'#243#0#24'G'#243#0#19'E'#254#0#28'M'#255#0' J'#232#0'(S'#233
+  +#0'5Y'#227#0'#T'#255#0'''X'#255#0',\'#255#0'<e'#234#0'<h'#244#0'3c'#255#0'<k'
+  +#255#0'Jg'#194#0'In'#225#0'Lr'#225#0'Ep'#245#0'It'#245#0'Cr'#255#0''#128#129
+  +#0'|'#128#143#0'u'#128#173#0''#133#174#0''#134#178#0''#139#187#0#129#129
+  +#129#0#129#131#139#0#139#139#139#0#148#148#148#0#153#145#151#0#151#149#152#0
+  +#154#153#154#0#160#152#158#0#130#140#176#0#128#140#188#0#138#144#190#0#143
+  +#152#186#0#163#154#161#0#163#163#163#0#171#165#171#0#173#173#173#0#173#175
+  +#188#0#176#170#176#0#182#182#182#0#188#182#188#0#185#185#185#0#191#187#191#0
+  +#188#188#188#0#138#145#193#0#138#150#203#0#140#153#202#0#147#155#205#0#148
+  +#157#209#0#150#160#197#0#148#160#206#0#158#170#215#0#148#163#219#0#159#166
+  +#219#0#158#168#222#0#162#173#220#0#175#184#220#0#184#186#211#0#158#170#225#0
+  +#159#173#234#0#160#174#227#0#169#175#230#0#162#176#229#0#169#176#231#0#166
+  +#180#232#0#169#177#235#0#179#187#236#0#169#183#246#0#169#184#246#0#172#188
+  +#249#0#178#188#241#0#176#191#250#0#193#187#193#0#189#194#236#0#183#193#241#0
+  +#189#197#242#0#176#192#249#0#185#198#250#0#189#201#249#0#196#194#196#0#202
+  +#197#202#0#203#203#203#0#206#205#208#0#209#205#209#0#211#210#211#0#216#213
+  +#217#0#217#217#217#0#221#217#221#0#220#220#220#0#199#204#239#0#221#220#224#0
+  +#197#203#241#0#194#204#249#0#204#209#242#0#201#211#250#0#209#213#243#0#214
+  +#217#242#0#219#222#244#0#211#218#249#0#216#223#250#0#219#225#250#0#227#226
+  +#227#0#230#230#234#0#233#231#234#0#235#235#236#0#226#229#245#0#229#232#246#0
+  +#235#236#244#0#224#229#250#0#229#233#249#0#234#237#249#0#239#240#247#0#239
+  +#241#248#0#243#243#243#0#243#244#249#0#249#249#250#0#251#251#252#0#254#254
+  +#254#0#240#251#255#0#164#160#160#0#128#128#128#0#0#0#255#0#0#255#0#0#0#255
+  +#255#0#255#0#0#0#255#0#255#0#255#255#0#0#255#255#255#0#212#0#0#0#1#0#10#170
+  +'$'#171#1#214#8#243#1#227#8#196#12#195#1#222#7#243#1#231'%'#169#25#167#1#212
+  +#8#243#1#238#17#193#20#191#5#189#0#3#191#239#243#0#7#243#1#207#1#0#0#0#1#0#11
+  +#170'#'#171#1#212#9#243#1#204#8#196#11#195#1#206#7#243#1#214'&'#169#24#167#1
+  +#241#7#243#0#3#242#194#193#0#17#193#20#191#5#189#1#201#8#243#1#231#1#0#0#0#1
+  +#0#12#170'!'#171#0#3#208#241#243#0#7#243#0#3#238#197#196#0#8#196#10#195#1#226
+  +#7#243#1#212''''#169#22#167#1#211#8#243#1#221#20#193#20#191#5#189#1#224#8#243
+  +#1#0#0#0#1#0#13#170#31#171#0#3#7#232#243#0#7#243#0#3#242#205#196#0#10#196#9
+  +#195#1#226#7#243#1#209'#'#169#0#6#151#0#16'3'#162#167#20#167#1#232#7#243#1
+  +#239#22#193#20#191#4#189#0#3#191#242#243#0#6#243#1#0#0#0#1#0#14#170#30#171#1
+  +#232#9#243#1#220#13#196#8#195#1#237#7#243#1#207'#'#169#1'B'#3#0#0#3#11'H'#167
+  +#0#18#167#1#207#8#243#1#217#23#193#20#191#4#189#1#223#7#243#1#0#0#0#1#0#15
+  +#170#28#171#1#229#9#243#1#227#15#196#7#195#1#237#7#243'$'#169#1'H'#5#0#1#162
+  +#18#167#1#216#7#243#1#240#25#193#20#191#3#189#0#3#191#242#243#0#5#243#1#0#0#0
+  +#1#0#16#170#26#171#1#213#9#243#1#237#17#196#6#195#7#243#1#241'&'#169#1'*'#3#0
+  +#0#3'3'#169#167#0#16#167#1#241#7#243#1#219#26#193#20#191#3#189#1#224#6#243#1
+  +#0#0#0#1#0#17#170#0#18#163'K'#24#16#13#12#11#11#15#24'BK,'#24',,'#167#171#6
+  +#171#1#212#9#243#0#3#240#197#196#0#7#196#1#187#3#148#1#187#5#196#5#195#7#243
+  +#1#232#12#169#1#162#2#151#1#162#13#169#1#164#2#151#7#169#1#11#2#0#1#19#2#169
+  +#4#167#1#164#3#151#1#164#6#167#0#7#207#243#209#171#171#216#243#0#2#243#1#194
+  +#3#193#2#147#1#176#4#193#2#147#1#175#12#193#2#159#20#191#2#189#1#194#6#243#1
+  +#0#0#0#1#0#15#170#0#3#155','#15#0#2#15#3#13#1#12#3#11#0#7#13','#161',LL,'#0#2
+  +','#0#9#155#167#171#171#208#241#243'L'#0#0#2#0#1#171#2#243#0#3#242#183#0#0#2
+  +#0#1'0'#3#196#0#3'n'#20#0#0#4#0#0#6#14'n'#196#196'='#0#2#0#0#5#195#197#243'L'
+  +#0#0#2#0#2#243#0#3#232'4'#0#0#2#0#6#169#0#3'B'#13#0#0#3#0#0#4#13'4'#164#169#4
+  ,#169#1#19#2#0#0#3#248'4'#0#0#2#0#0#3#11'4'#169#0#4#169#1#19#3#0#3#169#0#4#167
+  +#248#19#0#4#0#0#3#13#248#167#0#2#167#0#4#164'4'#12#0#3#0#0#7#19#243#233#193
+  +#193'7'#0#3#3#0#2#147#1#17#4#0#0#4#12'7'#182#193#6#193#1#20#4#0#0#6#30#175
+  +#191#191'a'#0#3#0#0#4#17#30'k'#191#3#191#0#13#20#0#20#191#189#189#23#0#0#171
+  +#243#243#0#3#0#0#0#3#0#212#170#130#11#170#0#3#167'4'#16#0#2#16#3#15#3#13#0#8
+  +#12#11#15',@'#163',L'#4'L'#3','#0#6#208#241#243#243'L'#0#2#0#1#171#2#243#0#3
+  +#220'b'#0#239#2#0#1#145#2#196#1'j'#8#0#1'j'#2#196#1'='#3#0#0#5#195#206#243'L'
+  +#0#0#2#0#2#243#0#3#229'4'#0#0#2#0#4#169#0#3#164#16#0'W'#7#0#0#3#13#154#169'M'
+  +#3#169#1#19#2#0#1#13#6#0#1'*'#4#169#1#19#3#0#3#169#1'H'#8#0#1'H'#2#167#0#3
+  +#164#16#0'e'#5#0#0#6#24#243#219#193'a'#0#4#0#0#3#147'm'#0'r'#6#0#1#17#7#193#0
+  +#11#14#0#17#17#0#0#12#181#191'<'#0#0#6#0#0#14#20#181#191#191#20#0#20#191#191
+  +'k'#0#0'4'#243#2#243#1#0#0#0#0#5#0#243#241#212#170#0#8#170#0#5#155#22#19#18
+  +#16#0#2#16#0#13#15#26'RPOO'#28','#168','#166',L'#0#5'L'#0#4#152','#241#243#2
+  +#243#1'L'#3#0#0#6#171#243#222#196#20#0#2#0#0#4#187#196#148#0#3#0#1'0'#2'='#0
+  +#7'8'#17#173#196#196'='#0#0#2#0#0#5#195#206#243'L'#0#0#2#0#2#243#0#3#214'4'#0
+  +#0#2#0#4#169#1#19#4#0#2#19#1#11#3#0#0#3#11#164#169#196#2#169#1#19#4#0#0#3#16
+  +#19#0#167#3#0#1'H'#3#169#1#19#3#0#2#169#1#151#4#0#1'*'#2'4'#0#7'2'#16#152#167
+  +#167#19#0#170#2#0#0#10#12'DLD'#151#243#198#193#20#0#2#0#0#10#14#20#172#182#14
+  +'7m'#147'<'#0#2#0#1'm'#6#193#0#31'm'#181#193#193#159#0#0'h'#191'<'#0#0#191
+  +#191#175'5'#0#0'0'#191#191#20#0#20#191#191#14#0#12#232#243#0#2#243#1#0#0#0#1
+  +#0#3#243#0#3#241#212#170#211#5#170#1#151#2#21#2#19#1#18#3#16#0#20#25'SRQ#,'
+  +#168#168','#167',LMM;;L'#152','#243#3#243#1'L'#3#0#0#5#171#228#196#196#0#209
+  +#2#0#1#17#2#196#1'0'#2#0#0#3#12#180#196#243#7#196#1'='#3#0#0#5#196#206#243'L'
+  +#0#0#2#0#2#243#0#3#214'4'#0#170#2#0#3#169#1'B'#3#0#0#7#16#162#169#169#164'*'
+  +#0#207#2#0#1'*'#3#169#1#19#3#0#1'B'#2#169#1#154#3#0#1#16#3#169#1#19#3#0#2#169
+  +#1'*'#2#0#0#3#11#247#167#170#6#167#1#247#3#0#0#3#15#232#243#195#3#243#1#242#2
+  +#193#3#0#0#3#14#182#193#167#6#193#1#182#3#0#1'<'#10#193#1#181#2#0#0#6'<'#191
+  +'<'#0#0#191#3#191#1#30#2#0#0#11#181#191#20#0#20#191'<'#0#0#151#243#243#3#243
+  +#1#0#0#0#1#0#5#243#0#3#241#212#170#167#2#170#0#3#155#22#21#193#2#21#2#19#1#18
+  +#2#16#0#6#27'TS[,'#168#2#168#0#12','#170',LLNLEL'#152','#243#3#243#1'L'#3#0#0
+  +#5#165#197#196#148#0#197#2#0#1'8'#2#196#1#14#2#0#1#31#7#148#2#196#1'='#3#0#0
+  +#5#196#206#243'L'#0#169#2#0#2#243#0#3#214'4'#0#0#2#0#3#169#1#13#3#0#1#162#5
+  +#169#1#13#3#0#1#162#2#169#1#19#3#0#4#169#1'*'#3#0#1#164#2#169#1#19#3#0#2#169
+  +#1#13#2#0#1#23#7#151#0#3#167'H'#0#0#2#0#1#151#5#243#1#234#2#193#3#0#1#20#6
+  +#193#0#4#147'0'#12#0#2#0#1'm'#8#193#0#11#181'h'#14#0#0'm'#193'<'#0#0#191'L'#3
+  +#191#1#159#2#0#0#11'k'#191#20#0#0'a'#11#0#17#239#243#196#3#243#1#0#0#0#1#0#7
+  +#243#0#7#241#210#164'*'#23#22#21#5#2#21#2#19#0#7#18#16#29'UT,'#168'4'#3#168#0
+  +#4','#207',L'#5'L'#0#3#152','#243#4#3#243#1'L'#3#0#1#158#2#197#1#31#3#0#1#173
+  +#2#196#11#0#0#4#148#196'='#0#2#0#0#5#196#206#243'L'#0#248#2#0#2#243#0#3#214
+  +'4'#0#0#2#0#2#169#1#155#3#0#1'*'#6#169#1'H'#3#0#1'H'#2#169#1#19#3#0#4#169#1
+  +'4'#3#0#1#151#2#169#1#19#3#0#2#169#11#0#0#3#151'4'#0#0#2#0#1#171#5#243#1#224
+  +#2#193#3#0#1#20#4#193#0#3#182#20#0#171#4#0#1#17#8#193#0#3'h'#12#0#130#2#0#1
+  +'0'#2#193#1'<'#2#0#5#191#2#0#0#4'<'#191#20#0#4#0#0#3#146#234#243','#3#243#1#0
+  +#0#0#1#0#9#243#0#6'B'#24#23#23#22#21#2#21#2#19#0#6#18#16#29#27','#168#3#168#0
+  +#4','#210',L'#5'L'#0#3#152','#243#0#3#243#1'L'#3#0#0#4'0='#20#0#2#0#1#20#3
+  +#196#11#0#0#4#148#196'='#0#2#0#0#5#220#240#243'L'#0#13#2#0#2#243#0#3#210'4'#0
+  +#0#2#0#2#169#1'H'#3#0#1'H'#6#169#1#162#3#0#1'3'#2#169#1#19#3#0#4#169#1'4'#3#0
+  +#1#151#2#169#1#19#3#0#2#169#11#0#0#3#151'A'#0#0#2#0#1#171#5#243#1#223#2#193#3
+  +#0#1#20#4#193#1#17#4#0#0#4#12'<'#182#193#6#193#1'a'#3#0#0#3#12'<'#193#0#2#193
+  +#1'<'#2#0#5#191#2#0#0#11'<'#191#20#0#14#0#0#30#191#225#243','#3#243#1#0#0#0#1
+  +#0#8#243#0#8#210'*'#24#24#23#23#22#21#2#21#2#19#1#18#2#16#0#3','#170#168#0#2
+  +#168#0#4','#212',L'#5'L'#0#3#152','#243#0#3#243#1'L'#8#0#0#3#20#187#196#0#2
+  +#196#1#20#2#0#1#31#3#148#1'b'#3#0#0#4#187#196'='#0#2#0#1#216#2#243#1'4'#3#0#0
+  +#5#216#243#209'*'#0#19#2#0#2#169#1'4'#3#0#1#151#7#169#3#0#1#19#2#169#1#19#3#0
+  +#1#162#3#169#1#19#3#0#1#164#2#169#1#19#3#0#2#169#1#19#2#0#1#23#3#151#1'B'#3#0
+  +#0#3#164#152#0#147#2#0#1'4'#5#243#1#223#2#193#3#0#1#20#3#193#1#172#3#0#0#3#17
+  +'m'#193'5'#9#193#0#5#14#0#12'h'#193#191#4#193#1'<'#2#0#4#191#1'm'#2#0#0#11'k'
+  +#191#20#0#20'<'#0#0#146#223#243#151#3#243#1#0#0#0#1#0#8#243#1'H'#2'*'#2#24#2
+  +#23#1#22#3#21#2#19#0#11#18#16','#200#170#168#168','#214',L'#5#5'L'#0#3#152','
+  +#243#0#3#243#1'L'#9#0#1'8'#3#196#1'j'#2#0#0#12#12#187#196#196#31#0#0#17#196
+  +#196'?'#0#2#0#0#4#19#164#155#0#3#0#0#4#19#171'H'#0#2#0#1#19#2#169#1'4'#3#0#1
+  +#151#7#169#3#0#1#19#2#169#1#19#3#0#0#5#19#164#169'B'#0#16#2#0#1#13#3#169#1#19
+  +#3#0#2#169#1'H'#2#0#0#12#11#164#169#169#23#0#0#16#167#167#19#0#2#0#0#9'L'#232
+  +#243#243#216#223#176#147#0#167#2#0#1#17#2#147#0#3#182#172#0#181#2#0#1'm'#2
+  ,#193#0#3#182#172#193#191#6#193#2#0#1'<'#6#193#1'<'#2#0#1#193#2#191#0#15#181
+  +#17#0#0#181#191#20#0#20#181#17#0#12#185#243#167#3#243#1#0#0#0#1#0#7#243#1#229
+  +#2','#2'*'#0#20#24'%osV!'#21#21#19#19#18','#207#200#170#168','#218',L'#5'L'#0
+  +#3#152','#243#0#2#243#0#3#242'?'#0#197#2#0#1'e'#2#158#1#31#3#0#1'='#3#196#1
+  +#20#2#0#0#4#12#20#17#0#2#0#0#8'n'#197#226'L'#0#0#12#0#5#0#1#12#6#0#1'B'#2#169
+  +#1'H'#3#0#1'H'#6#169#1#164#3#0#1#23#2#169#1#19#10#0#1#248#3#169#1#19#3#0#3
+  +#169#1#19#2#0#0#4#11#19#16#0#2#0#1#248#2#167#0#3#152#11#0#243#5#0#0#4'D'#223
+  +'<'#0#6#0#0#4#147#193#17#0#2#0#0#5#20#17#0'0'#193'h'#6#193#0#30#20#0#12'h'
+  +#147'<<'#193#193'<'#0#0'<<5'#12#0#0'<'#191#191#20#0#20#191#159#0#0#18#243#3
+  +#243#1#0#0#0#0#4#0#222#240#243#4#243#0#12#164'2,,*-tvuuq'#21#2#21#2#19#0#9','
+  +#208#207#200#170','#229',L,'#5'L'#0#8#152','#243#243#242#205'='#0#2#0#1#158#3
+  +#197#1#31#2#0#1#12#3#196#0#3#187#20#0#5#5#0#0#10'j'#226#242#243'L'#0#0'D'#19
+  +#0#3#0#0#4#19#232#19#0#3#0#0#6#16#164#169#169#155#0#2#0#1'*'#6#169#1#248#3#0
+  +#1'4'#2#169#1#19#3#0#1'*'#5#0#1'*'#4#169#1#19#3#0#3#169#0#3#164#19#0#243#5#0
+  +#0#3'H'#169#167#20#2#167#0#3#162#15#0#171#4#0#0#4#19#223'<'#0#6#0#0#5#147#193
+  +#172#14#0#193#4#0#1#14#7#193#0#3#172#12#0#191#3#0#1#14#2#193#1'<'#7#0#1'<'#3
+  +#191#0#10#20#0#20#191#191'<'#0#0'D'#243#2#243#1#0#0#0#1#0#2#199#0#3#222#240
+  +#243#168#2#243#0#13'L32,,(}wvuu$'#21'L'#2#21#0#10#19','#210#208#207#200','
+  +#230',L'#5'L'#0#8#152','#243#243#222#197'='#0#2#0#1#158#3#197#1'='#3#0#1#158
+  +#4#196#0#8#148'8'#20#20'8'#184#240#243#2#243#1#171#2'L'#0#15#171#243#155'2'
+  +#24#151#232#243#216#248#23#19'B'#164#169#151#3#169#1#13#2#0#0#3#11#164#169#3
+  +#4#169#1#19#3#0#1#154#2#169#1#19#3#0#0#7#169'H'#23#19'*'#151#169#0#4#169#1'H'
+  +#3'4'#5#169#0#7#151'3'#19#19'3'#162#169#0#2#169#2#167#0#12#208#243#164'D'#24
+  +#24'2'#151#223#147'<'#0#2#0#1#14#2'<'#1#176#2#193#0#8#182'i0'#20#30'<'#172
+  +#193#7#193#0#11#182'a0'#20'7h'#193#193#175'a<'#3#3'<'#0#3#146#181#191#4#3#191
+  +#0#4'h<h'#191#2#191#0#7'<JL'#232#243#243#0#3#0#0#1#0#3#199#0#18#204#226#242
+  +#243'@332,)}}wvu"'#22#21#2#21#0#9','#212#210#208#207','#232','#150#169#2#150
+  +#1#152#2'L'#0#8#152','#243#222#197#197'='#0#2#0#1#158#3#197#1#20#3#0#0#3#180
+  +#197#196#19#5#196#0#3#206#237#243#0#13#243#0#3#241#210#171#0#3#171#6#169#1'H'
+  +#3#0#1'*'#4#169#1'H'#3#0#1#16#3#169#1#19#3#0#30#169#0#3#167#207#243'5'#6#243
+  +#1#234#2#193#3#0#1#20'$'#193#11#191#1#235#4#243#1#0#0#0#1#0#5#199#0#4#204#226
+  +'43'#2'3'#0#21'2,x}}wp'#23#23#22#21#21','#213#212#210#208','#232',L'#21#2'L'
+  +#1'D'#2#150#0#4#163','#222#197#2#197#1'='#3#0#1'0'#2'='#1#17#3#0#1#14#3#197#3
+  +#196#0#3#204#236#243#0#13#243#0#3#241#213#171#0#6#171#6#169#1#16#3#0#1#13#2
+  +'4'#1#19#4#0#1#151#3#169#1#19#3#0#11#169#1#151#2#16#1#151#16#169#1#167#6#243
+  +#0#9#216#240#193#193#17#0#0#20#193#164'$'#193#10#191#5#243#1#0#0#0#1#0#7#199
+  +#2'4'#3'3'#0#23'2/YZX'#24#24#23#23#22#21','#215#213#231#210','#235','#151#151
+  +#152'L'#223#2'L'#0#3#151','#197#17#3#197#1'='#9#0#0#3#12#173#197'm'#3#197#0#3
+  +#199#228#243#191#3#243#0#3'D'#24#243#193#8#243#0#3#214#7#171#191#8#171#5#169
+  +#0#3#164#16#0#0#8#0#1'H'#4#169#1#19#3#0#11#169#1#13#2#0#1#13#17#169#1#241#5
+  +#243#0#9#24#15#172#193#193#176'ia'#193#19'%'#193#8#191#1#201#5#243#1#0#0#0#1
+  +#0#7#199#3'4'#3'3'#1'2'#2','#2'*'#2#24#2#23#0#13'",'#229#232#155#212','#232
+  +',3@D'#151#4#2#151#0#3#162','#197#8#3#197#1'='#7#0#0#4#12'0'#180#197#2#197#0
+  +#4#199#226#242#243#4#243#0#3#24#0#243#164#6#243#0#3#229#207#171#19#11#171#5
+  +#169#0#3#164'4'#0#0#5#0#0#3#16#151#169#4#4#169#1#19#3#0#11#169#1#11#2#0#1#13
+  +#17#169#1#229#5#243#1#155#2#12#1#172'+'#193#7#191#1#221#5#243#1#0#0#0#1#0#7
+  +#199#1'@'#3'4'#3'3'#1'2'#2','#2'*'#2#24#0#19#23'&,'#230#152#156#213','#210
+  +#210#150'@224B'#152','#197#243#5#197#1#180#4#158#1#180#5#197#0#3#222#240#243
+  +'2'#6#243#0#3#24#0#243'u'#4#243#0#3#232#208#171#9#14#171#6#169#0#7#164#248'4'
+  +'4B'#155#169#8#6#169#1#19#3#0#11#169#1'H'#2#11#1'H'#17#169#1#214#6#243#0#4
+  +#232#15#17#193'+'#193#6#191#1#234#5#243#1#0#0#0#1#0#7#199#0#3'A@4'#232#2'4'#3
+  +'3'#1'2'#2','#2'*'#2#24#0#18#23','#232#152#229#255#166'33K'#163#212#170#143
+  +'4,,'#197#14#197#0#3#206#238#243#19#8#243#0#8#24#0#243#243#171#207#209#171#6
+  +#171#2#151#9#171#13#169#0#4#155#151#155#169#11#169#1#164#2#151#1#164#5#169#0
+  +#4#164#151#162#169#12#169#0#4#164#154#216#243#5#243#0#4#169#0'i'#193'+'#193#4
+  +#191#1#193#6#243#1#0#0#0#1#0#7#199#1'f'#2'@'#3'4'#3'3'#1'2'#2','#0#21'-'''#24
+  +#24','#241#232#255#231#229#215#170#154'D42B'#152#212','#197'w'#12#197#0#3#204
+  +#237#243#21#10#243#0#9#24#0#155#12#0#0#11'H'#171'L'#3#171#0#7'4'#11#0#0#11'B'
+  +#171#0#4#171#2#13#1#171#3#169#0#3#13#11#169#8#4#169#0#3#248#13#0#243#2#0#0#7
+  +#11#151#169#151#0'4'#169'2'#3#169#0#3#164'*'#0#19#3#0#1#23#3#169#1'4'#3#0#0#5
+  +#19#248#0#151#169#169#5#169#0#4#0'43'#0#2#0#0#3#15#209#243'H'#3#243#0#4#232#0
+  +#14#193','#193#3#191#1#221#6#243#1#0#0#0#1#0#7#199#1#160#3'@'#3'4'#3'3'#0#23
+  +'26}^X,'#242#255#235#241#232#230#214#208#168#163#153#153'I,j'#197#20#10#197
+  +#0#3#205#228#243#11#12#243#0#20#24#0#12#152#171#162#23#0#149#171#171'3'#0'3'
+  ,#164#164'*'#0'4'#171#2#171#0#11#155#0#13#149#171#169#155#0#11#248#169#3#2#169
+  +#0#13#248#0#23#162#169#169#248#162#169#151#0'4'#169'v'#3#169#0#19#16#11'H'
+  +#169#169#162#248#169#169'B'#0'*'#164#164'*'#13#0#151#169'L'#5#169#0#10#0#11
+  +#16#162#169#163#19#12#216#243#2#243#1#155#2#0#1#147'-'#193#2#191#1#239#6#243
+  +#1#0#0#0#1#0#7#199#0#3#192'A@'#171#2'@'#0#28'9'#134#135'`33\~~}},'#255#232
+  +#243#244#242#232#218#210#200#166#156',,'#15#182#197#8#197#0#4#199#226#242#243
+  +#13#243#0#4#23#0#151#171#2#171#0#8#164#11#14#171#162#0#19#171#3#171#0#16#19#0
+  +#164#171#171'B'#13'**'#171#171'B'#16#19'3'#169#2#169#2#13#7#169#0#4#151#0'4'
+  +#169#2#169#0#4'H'#0'H'#169#6#169#2#13#4#169#0#4#16#0#151#169#5#169#0#10#0#11
+  +#164#169#169#209#171#0'4'#243#2#243#2#19#0#3#18'0'#193#171'-'#193#1#217#7#243
+  +#1#0#0#0#1#0#8#199#0#31'gA@@'#138#136#136#133'33]'#130'~~}'#129',,'#231#244
+  +#242#232#218#211#200',,'#16#16'.'#197#164#9#197#1#206#14#243#0#5#232#207#19#0
+  +#171#199#4#171#0#7'+'#0#162'H'#0'H'#171#24#3#171#0#21'H'#0#149#171#171#16#23
+  +'H'#11#171#171#16'34'#13#169#169#162#0'3'#169#17#6#169#0#4#151#0'4'#169#2#169
+  +#0#4'*'#0#164#169#5#169#0#4#154#0'3'#169#3#169#0#4'4'#0#151#169#5#169#0#3#0
+  +#19#169#169#3#169#1#241#2#15#2#243#0#7#209#0#151#150#0#186#193#169','#193#1
+  +#239#7#243#1#0#0#0#1#0#8#199#0#19#179'BA@'#139#142#136#136'zy'#132#131#130'~'
+  +'~}}t,'#0#6','#2#19#0#4#18#16#173#197#9#197#1#206#12#243#0#7#232#209#171#171
+  +#19#0#171#212#4#171#0#7'4'#0#151'4'#0#151#171#3#3#171#0#21#151#0'4'#171#164#0
+  +'B'#164#0#149#162#0#149#155#0#155#169#151#0#13#19#243#5#19#0#5#169#151#0'4'
+  +#169#3#2#169#0#3#19#0#19#169#5#19#0#5'H'#151#0'4'#169#3#3#169#0#4'4'#0#151
+  +#169#5#169#0#3#0#19#169#0#3#169#0#12#214#24#0#243#243'4'#0#216#216#0'i'#193
+  +'+'#193#1#221#8#243#1#0#0#0#1#0#9#199#0#23#144'BAE'#141#142#136#136#135#135
+  +#132#131#130'~~}}r'#24#23#23#22#21#210#2#21#2#19#1'1'#12#197#10#243#0#3#241
+  +#212#171#158#3#171#0#3#19#0#171#240#4#171#0#7'4'#0#151'B'#0#151#171#243#3#171
+  +#0#21#151#0'B'#171'H'#0#155#171#23'3B'#11#171#171#11'3'#169#162#0#19'4'#0#3
+  +'4'#0#7#13#0#169#151#0'4'#169#214#2#169#0#3'*'#0'4'#193#3'4'#0#7'*'#0'4'#154
+  +#0'4'#169#0#3#169#0#4'4'#0#151#169#5#169#0#3#0#19#169'2'#3#169#0#12#171#24#12
+  +#243#232#12'2'#243#243#19#17#193'*'#193#0#3#194#242#243','#6#243#1#241#1#0#0
+  +#0#1#0#9#199#0#24#192'GBAd'#141#142#136#136#135#135#132#131#130'~~}X'#24'  '
+  +#23#22#21#2#21#0#3#22#186#197#169#11#197#8#243#0#4#242#216#7#171#4#171#0#4#19
+  +#0#151#171#3#171#0#7#16#11#171#162#0'+'#171#243#3#171#0#21'*'#0#155#171#23#11
+  +#171#171'B'#16#23'*'#171#171#23#13#169#169#13#16#169#24#3#169#0#7#13#19#169
+  +#151#0#19#169'2'#2#169#0#4'H'#0#248#169#2#169#0#7'H'#0#151#169#11#16#169#0#3
+  +#169#0#4'*'#0#151#169#5#169#0#4#0#11#164#169#2#169#0#13#164#0'2'#243#155#0
+  +#155#243#243#151#0#176#193#8')'#193#1#234#8#243#1#210#1#0#0#0#1#0#10#199#1
+  +#179#2'B'#0#24'AE'#139#142#136#136#135#135#132#131#130'~~|Xtt%'#23#22#21#21
+  +#174#197#12#197#1#238#7#243#1#7#7#171#0'F'#19#11#16#162#171#171'4'#0'3'#171
+  +#171'+'#0#151#171#171#151#0#19#171#171#11#23#171#171#162#0#13'H'#171#171'H'#0
+  +#155#169#248#0'H'#169#169'H'#0'H'#169#151#0#11'4'#164#169#169#16#16#164#169
+  +#164#16#13#169#169'4'#0'4'#169#169#151#0#0#151#169#5#169#2#0#0#17'*'#164#169
+  +#164#23#0#163#243#24#12#232#243#243#216#0':'#193#171'('#193#1#224#8#243#1#241
+  +#1#167#1#0#0#0#1#0#11#199#1#177#2'B'#0#22'A@l'#140#136#136#135#135#132#131
+  +#130'~~}{X'#24#23#23#22#157#197#13#197#1#237#7#243#1#208#7#171#2#19#0#22'4'#0
+  +#19#14#0#19#164#171#171#164#23#0#16#16#0#19#164#171#149#0'H'#171#2#171#0'!'
+  +#16#0#164#171#171#162#0'4'#169#169'4'#0#16#16#0'*'#169#169#151#0'H'#11#0#151
+  +#169#155#16#11#19#11#11#154#169'}'#2#169#0#9'*'#0#13#16#11#19#0#151#169','#5
+  +#169#0#13#0#19'*'#11#19#11#0'3'#214#216#0'4'#243#0#3#243#0#4#19#12#202#193'&'
+  +#193#1#217#9#243#1#209#1#167#1#0#0#0#1#0#12#199#0#23#179'GBA@@c'#137#133#135
+  +#135#132#131#128'_W**'#24#24'+'#175#197#0#14#197#1#226#7#243#1#209#7#171#2
+  +#155#0#6#171#162'B4'#155#171#5#171#1#155#2'4'#1#151#3#171#0#4#162#151#164#171
+  +#2#171#0#3#162#155#171#243#3#171#0#10#151#155#171#169#169#162'B4'#155#169#2
+  +#169#0#7#164#151#164#164'H'#162#169#129#2#169#0#5#248'4H'#164#169','#4#169#0
+  +#8#154'4B'#162'4'#0#151#169#5#169#0#13#0#19#169#154'44'#154#169#169#211#171
+  +#216#243'H'#3#243#0#5#216#171#230#202#193#171'$'#193#1#217#9#243#1#229#2#167
+  +#1#0#0#0#1#0#13#199#0#5#192#144'BA@'#169#2'@'#3'4'#3'3'#1'2'#2','#2'*'#0#3'>'
+  +#188#197#169#15#197#1#226#7#243#1#216'+'#171#30#169#0#4'4'#0#151#169#5#169#0
+  +#3#0#19#169#0#6#169#1#207#9#243#0#3#242#202#193#243'"'#193#1#217#9#243#0#5
+  +#241#169#167#167#0'@'#0#0#1#0#15#199#0#4#179'gA@'#2'@'#3'4'#3'3'#0#5'2,C'#178
+  +#197#197#17#197#1#206#7#243#1#229','#171#29#169#0#4'4'#0#151#169#5#169#0#3#0
+  +#19#169#151#7#169#1#212#10#243#1#219'!'#193#1#223#10#243#1#209#3#167#1#0#0#0
+  +#1#0#17#199#0#6#192#160'fA@4'#2'4'#0#5'9F'#157#190#199#0#2#199#17#197#1#199#7
+  +#243#1#232'-'#171#28#169#0#4'4'#0#151#169#5#169#0#3#0#19#169#0#8#169#1#229#10
+  +#243#0#3#225#198#193#216#29#193#1#233#10#243#1#216#4#167#1#0#0#0#1#0'!'#199
+  ,#17#197#1#242#7#243'.'#171#27#169#0#4#151'4'#162#169#5#169#0#3'4H'#169#22#8
+  +#169#0#3#171#232#243'1'#9#243#0#3#240#203#193#212#26#193#0#3#217#242#243#0#9
+  +#243#1#229#5#167#1#0#0#0#1#0'"'#199#16#197#1#237#7#243#1#208'.'#171'/'#169#0
+  +#3#171#232#243#171#10#243#0#3#233#198#193#0#22#193#0#3#203#234#243#151#10#243
+  +#0#3#232#169#167#3#4#167#1#0#0#0#1#0'#'#199#15#197#1#227#7#243#1#212'/'#171
+  +'/'#169#0#3#171#232#243#3#11#243#0#3#233#203#193#12#18#193#0#3#219#234#243
+  +#243#11#243#0#3#232#169#167#3#5#167#1#0#0#0#1#0'$'#199#14#197#1#222#7#243#1
+  +#229'0'#171'/'#169#0#3#171#232#243#135#12#243#0#4#240#224#203#193#11#193#0#5
+  +#194#219#225#242#243#3#12#243#0#3#229#169#167#243#6#167#1#0#0#0#0#3#0#204#199
+  +#0'#'#199#13#197#1#206#7#243#1#232'1'#171'/'#169#0#3#171#229#243#0#15#243#0
+  +#12#238#225#223#223#219#203#219#223#223#233#238#243#15#243#1#216#9#167#1#0#0
+  +#0#1#0#2#204'$'#199#13#197#1#242#7#243#1#7'1'#171'0'#169#1#214'('#243#0#3#241
+  +#210#167#169#9#167#1#0#0#0#1#0#3#204'$'#199#12#197#1#237#7#243#1#211'2'#171
+  +'0'#169#0#3#207#232#243#176'$'#243#0#3#231#170#167#243#10#167#1#0#0#0#212#0#0
+  +#1
+]);
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROPoweredByRemObjectsButton.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROPoweredByRemObjectsButton.pas
new file mode 100644
index 0000000..e6e43ae
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROPoweredByRemObjectsButton.pas	
@@ -0,0 +1,168 @@
+unit uROPoweredByRemObjectsButton;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  {$IFDEF FPC}LResources,{$ENDIF}
+  {$IFNDEF MSWINDOWS}
+  SysUtils, Classes {$IFDEF FPC}, Controls, Graphics {$ELSE}, QControls, QGraphics{$ENDIF};
+  {$ELSE}
+  //ToDo: sort those out!
+  Windows, SysUtils, Messages, Classes, Controls, Graphics, Forms, Dialogs,
+  Menus,  StdCtrls, ExtCtrls;
+  {$ENDIF}
+
+{$IFNDEF FPC}  
+  {$R uROPoweredByRemObjectsButton.res}
+{$ENDIF}
+
+type
+  TROPoweredByType = (atServer, atClient);
+
+  TROPoweredByRemObjectsButton = class(TGraphicControl)
+  private
+    fBitmap: TBitmap;
+    fApplicationType: TROPoweredByType;
+    function GetHeight: byte;
+    function GetWidth: byte;
+    procedure SetHeight(const Value: byte);
+    procedure SetWidth(const Value: byte);
+    procedure SetApplicationType(const Value: TROPoweredByType);
+    procedure UpdateBitmap;
+  protected
+    {$IFDEF MSWINDOWS}
+    procedure WMEraseBkgnd(var Msg: TWMEraseBkgnd); message WM_ERASEBKGND;
+    {$ENDIF}
+    property Bitmap: TBitmap read fBitmap;
+    procedure GetBitmap; virtual;
+  public
+    { Public declarations }
+    constructor Create(AOwner: TComponent); override;
+    destructor Destroy; override;
+    procedure Paint; override;
+    procedure Click; override;
+    procedure SetBounds(ALeft, ATop, AWidth, AHeight: Integer); override;
+  published
+    { Published properties and events }
+    property Height: byte read GetHeight Write SetHeight;
+    property Width: byte read GetWidth Write SetWidth;
+    property Anchors;
+    property ApplicationType: TROPoweredByType read fApplicationType write SetApplicationType default atServer;
+  end;  { TRoPoweredByRemObjectsButton }
+
+implementation
+
+{$IFDEF MSWINDOWS}
+uses ShellAPI;
+{$ENDIF MSWINDOWS}
+
+const
+  STR_POWERED_BY_REMOBJECTS_CLIENT = 'POWERED_BY_REMOBJECTS_CLIENT';
+  STR_POWERED_BY_REMOBJECTS_SERVER = 'POWERED_BY_REMOBJECTS_SERVER';
+
+constructor TRoPoweredByRemObjectsButton.Create(AOwner: TComponent);
+begin
+  inherited Create(AOwner);
+  fBitmap := TBitmap.Create();
+  UpdateBitmap();
+  SetBounds(Left, Top, -1, -1); { width/height get ignored anyway }
+  {$IFDEF MSWINDOWS}
+  Cursor := crHandPoint;
+  {$ENDIF MSWINDOWS}
+end;  { Create }
+
+destructor TRoPoweredByRemObjectsButton.Destroy;
+begin
+  FreeAndNil(fBitmap);
+  inherited Destroy;
+end;  { Destroy }
+
+procedure TRoPoweredByRemObjectsButton.Paint;
+begin
+  //inherited;
+  Canvas.Draw(0,0,fBitmap);
+end;
+
+procedure TRoPoweredByRemObjectsButton.Click;
+begin
+  {$IFDEF MSWINDOWS}
+  ShellExecute(0,'open','http://www.remobjects.com',nil,nil,SW_SHOWNORMAL);
+  {$ENDIF MSWINDOWS}
+end;
+
+
+procedure TRoPoweredByRemObjectsButton.SetBounds(ALeft, ATop, AWidth,
+  AHeight: Integer);
+begin
+  inherited SetBounds(ALeft,ATop,fBitmap.Width,fBitmap.Height);
+
+end;
+
+procedure TROPoweredByRemObjectsButton.SetApplicationType(const Value: TROPoweredByType);
+begin
+  if (fApplicationType <> Value) then begin
+    fApplicationType := Value;
+    UpdateBitmap;
+  end;
+end;
+
+procedure TROPoweredByRemObjectsButton.UpdateBitmap;
+begin
+  GetBitmap();
+  Invalidate;
+end;
+
+procedure TROPoweredByRemObjectsButton.GetBitmap;
+begin
+  case fApplicationType of
+    atServer: Bitmap.LoadFromResourceName(hInstance,STR_POWERED_BY_REMOBJECTS_SERVER);
+    atClient: Bitmap.LoadFromResourceName(hInstance,STR_POWERED_BY_REMOBJECTS_CLIENT);
+  end; { case }
+end;
+
+function TROPoweredByRemObjectsButton.GetHeight: byte;
+begin
+  result := inherited Height;
+end;
+
+function TROPoweredByRemObjectsButton.GetWidth: byte;
+begin
+  result := inherited Width;
+end;
+
+procedure TROPoweredByRemObjectsButton.SetHeight(const Value: byte);
+begin
+  { no-op, width is fixed }
+end;
+
+procedure TROPoweredByRemObjectsButton.SetWidth(const Value: byte);
+begin
+  { no-op, width is fixed }
+end;
+
+{$IFDEF MSWINDOWS}
+procedure TROPoweredByRemObjectsButton.WMEraseBkgnd(var Msg: TWMEraseBkgnd);
+begin
+  Msg.Result := 0;
+end;
+{$ENDIF}
+
+{$IFDEF FPC}
+initialization
+  {$I uROPoweredByRemObjectsButton.lrs}
+{$ENDIF}  
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROPoweredByRemObjectsButton.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROPoweredByRemObjectsButton.res
new file mode 100644
index 0000000..787836a
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROPoweredByRemObjectsButton.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRORemoteDataModule.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRORemoteDataModule.pas
new file mode 100644
index 0000000..adf5460
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRORemoteDataModule.pas	
@@ -0,0 +1,382 @@
+unit uRORemoteDataModule;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes,
+  {$IFDEF MSWINDOWS}Windows,{$ENDIF}
+  {$IFDEF DELPHI5}Forms,{$ENDIF}
+//  {$IFDEF FPC}Forms,{$ENDIF}
+  uROServerIntf, uROClientIntf, uROSessions, uROClasses, uROTypes, uROEventRepository, uROClient;
+
+type { Events }
+     TActivateEvent = procedure(const aClientID : TGUID; aSession : TROSession; const aMessage : IROMessage) of object;
+     TDeactivateEvent = procedure(const aClientID : TGUID; aSession : TROSession) of object;
+     TGetDispatchInfoEvent = procedure(const aTransport : IROTransport; const aMessage : IROMessage) of object;
+
+     TRegisterEventClientEvent = procedure(const aClientID : TGUID; const EventTypes : Ansistring) of object;
+
+     { TRORemoteDataModule }
+     TRORemoteDataModule = class(TDataModule, IROObjectActivation, IRODispatchNotifier, IROServerEventsBroker, IInterface, IROObjectRetainer)
+     private
+       fRefCount : integer;
+       fClientID: TGUID;
+       fOnActivate: TActivateEvent;
+       fOnDeactivate: TDeactivateEvent;
+       fSessionManager : TROCustomSessionManager;
+       fSession: TROSession;
+       fNewSession,
+       fRequiresSession,
+       fDestroySession : boolean;
+       fOnGetDispatchInfo: TGetDispatchInfoEvent;
+       fEventRepository: TROEventRepository;
+       fOnBeforeUnregisterEventClient: TRegisterEventClientEvent;
+       fOnBeforeRegisterEventClient: TRegisterEventClientEvent;
+       fTransport: IROTransport;
+
+       fRetainedObjects : TList;
+
+       procedure SetSessionManager(const Value: TROCustomSessionManager);
+       procedure SetEventRepository(const Value: TROEventRepository);
+       function GetSession: TROSession;
+       function GetEventRepository: TROEventRepository;
+
+     protected
+       { IInterface }
+       function QueryInterface(const IID: TGUID; out Obj): HResult; reintroduce; virtual; stdcall;
+       function _AddRef: Integer; virtual; stdcall;
+       function _Release: Integer; virtual; stdcall;
+
+       { IRODispatchNotifier }
+       procedure GetDispatchInfo(const aTransport : IROTransport; const aMessage : IROMessage); virtual;
+
+       { IROObjectActivation }
+       procedure _OnActivate(aClientID: TGUID; const aMessage : IROMessage);
+       procedure _OnDeactivate(aClientID: TGUID);
+       procedure IROObjectActivation.OnActivate = _OnActivate;
+       procedure IROObjectActivation.OnDeactivate = _OnDeactivate;
+
+       { IROServerEventsBroker }
+       procedure RegisterEventClient(const ClientID, EventTypes : Ansistring);
+       procedure UnregisterEventClient(const ClientID, EventTypes : Ansistring);
+       function GetEventsData(const ClientID : Ansistring; out EventsData : Binary) : integer;
+
+       { IROObjectRetainer  }
+       procedure RetainObject(const anObject : TObject);
+       function IsRetained(const anObject : TObject) : boolean;
+       procedure ReleaseObject(const anObject: TObject);
+
+       { Internal }
+       procedure DoOnActivate(aClientID: TGUID; const aMessage : IROMessage); virtual;
+       procedure DoOnDeactivate(aClientID: TGUID); virtual;
+       procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+       function CustomRequireSession(const aMessage : IROMessage) : boolean; virtual;
+
+      {$IFDEF DELPHI7UP}
+      procedure Synchronize(aMethod: TThreadMethod);
+      {$ENDIF DELPHI7UP}
+     public
+       constructor Create(aOwner : TComponent); override;
+       destructor Destroy; override;
+
+       procedure DestroySession;
+
+       property RefCount : integer read fRefCount;
+       property ClientID : TGUID read fClientID write fClientID;
+       property Transport: IROTransport read fTransport;
+       property Session : TROSession read GetSession;
+       property NewSession : boolean read fNewSession;
+
+     published
+       property RequiresSession : boolean read fRequiresSession write fRequiresSession default FALSE;
+       property SessionManager : TROCustomSessionManager read fSessionManager write SetSessionManager;
+       property EventRepository : TROEventRepository read GetEventRepository write SetEventRepository;
+
+       property OnActivate : TActivateEvent read fOnActivate write fOnActivate;
+       property OnDeactivate : TDeactivateEvent read fOnDeactivate write fOnDeactivate;
+
+       property OnBeforeRegisterEventClient : TRegisterEventClientEvent read fOnBeforeRegisterEventClient write fOnBeforeRegisterEventClient;
+       property OnBeforeUnregisterEventClient : TRegisterEventClientEvent read fOnBeforeUnregisterEventClient write fOnBeforeUnregisterEventClient;
+
+       property OnGetDispatchInfo : TGetDispatchInfoEvent read fOnGetDispatchInfo write fOnGetDispatchInfo;
+     end;
+
+     TRORemoteDataModuleClass = class of TRORemoteDataModule;
+
+implementation
+
+uses
+  SysUtils,
+  {$IFDEF DELPHI5}ComObj,{$ENDIF DELPHI5}
+  uRORes;
+
+constructor TRORemoteDataModule.Create(aOwner: TComponent);
+begin
+  inherited Create(aOwner);
+end;
+
+destructor TRORemoteDataModule.Destroy;
+begin
+  FreeAndNIL(fRetainedObjects);
+  inherited;
+end;
+
+function TRORemoteDataModule._AddRef: Integer;
+begin
+  if (csDesigning in ComponentState) then
+    result := -1
+  else
+    result := InterlockedIncrement(fRefCount);
+end;
+
+function TRORemoteDataModule._Release: Integer;
+begin
+  if (csDesigning in ComponentState) then begin
+    result := -1
+  end
+  else begin
+    result := InterlockedDecrement(fRefCount);
+    if (result=0)
+      then Destroy;
+  end;
+end;
+
+function TRORemoteDataModule.QueryInterface(const IID: TGUID;
+  out Obj): HResult;
+begin
+  result := inherited QueryInterface(IID, Obj);
+end;
+
+procedure TRORemoteDataModule._OnActivate(aClientID: TGUID; const aMessage : IROMessage);
+begin
+  fClientID := aClientID;
+
+  DoOnActivate(aClientID, aMessage); // Loads the session if a session manager is assigned
+
+  if Assigned(fOnActivate)
+    then fOnActivate(aClientID, fSession, aMessage);
+end;
+
+procedure TRORemoteDataModule._OnDeactivate(aClientID: TGUID);
+begin
+  if Assigned(fOnDeactivate)
+    then fOnDeactivate(aClientID, fSession);
+
+  DoOnDeactivate(aClientID); // Releases the session
+end;
+
+procedure TRORemoteDataModule.DoOnActivate(aClientID: TGUID; const aMessage : IROMessage);
+begin
+  if (csDesigning in ComponentState) then Exit;
+
+  fSession := NIL;
+  if not CustomRequireSession(aMessage) then Exit;
+
+  if Assigned(fSessionManager) then begin
+    fNewSession := FALSE;
+    fDestroySession := FALSE; // Resets the flags
+
+    fSession := fSessionManager.FindSession(aClientID);
+
+    if (fSession=NIL) then begin
+
+      if RequiresSession
+        then RaiseError(err_SessionNotFound, [GUIDToString(aClientID)], EROSessionNotFound)
+        else begin
+         // fSession := fSessionManager.CreateSession(aClientID);
+          fNewSession := TRUE;
+        end;
+    end;
+  end
+  else begin
+    if RequiresSession then
+      RaiseError('SessionManager required, but not assigned');
+  end;
+end;
+
+procedure TRORemoteDataModule.DoOnDeactivate(aClientID: TGUID);
+var
+  lSessionID: TGUID;
+begin
+  if (csDesigning in ComponentState) then Exit;
+
+  if Assigned(fSessionManager) and (fSession<>NIL) then begin
+
+    if fDestroySession then begin
+      if fNewSession then begin
+        fSessionManager.DeleteTemporarySession(fSession)
+      end
+      else begin
+        lSessionID := fSession.SessionID;
+        fSessionManager.ReleaseSession(fSession, false);
+        fSessionManager.DeleteSession(lSessionID, false);
+        fSession := nil;
+      end;
+    end
+    else begin
+      fSessionManager.ReleaseSession(fSession, fNewSession);
+    end;
+
+  end;
+  fTransport := nil;
+end;
+
+procedure TRORemoteDataModule.Notification(AComponent: TComponent;
+  Operation: TOperation);
+begin
+  inherited;
+
+  if (Operation=opRemove) then begin
+    if (AComponent=fSessionManager) then fSessionManager := NIL
+    else if (AComponent=fEventRepository) then fEventRepository := NIL;
+  end;
+end;
+
+procedure TRORemoteDataModule.DestroySession;
+begin
+  fDestroySession := TRUE;
+end;
+
+procedure TRORemoteDataModule.GetDispatchInfo(const aTransport: IROTransport; const aMessage: IROMessage);
+begin
+  if Assigned(fOnGetDispatchInfo) then
+    fOnGetDispatchInfo(aTransport, aMessage);
+  fTransport := aTransport;
+end;
+
+function TRORemoteDataModule.CustomRequireSession(const aMessage: IROMessage): boolean;
+begin
+  result := not Assigned(aMessage) or not SameText(aMessage.MessageName, 'GetDescriptor');
+end;
+
+procedure TRORemoteDataModule.SetSessionManager(
+  const Value: TROCustomSessionManager);
+begin
+  fSessionManager := Value;
+  if (fSessionManager<>NIL) then fSessionManager.FreeNotification(Self);
+end;
+
+{$IFDEF DELPHI7UP}
+procedure TRORemoteDataModule.Synchronize(aMethod: TThreadMethod);
+begin
+  TThread.Synchronize(nil, aMethod);
+end;
+{$ENDIF DELPHI7UP}
+
+function TRORemoteDataModule.GetEventsData(const ClientID: Ansistring; out EventsData: Binary): integer;
+begin
+  result := 0;
+  if (fEventRepository=NIL) then Exit;
+
+  EventsData := Binary.Create;
+  result := EventRepository.GetEventData(Session.SessionID, EventsData);
+end;
+
+procedure TRORemoteDataModule.RegisterEventClient(const ClientID, EventTypes: Ansistring);
+var
+  lActive: IROActiveEventServer;
+  lGuid: TGuid;
+begin
+  if Assigned(fOnBeforeRegisterEventClient) or Assigned(fEventRepository) then
+    lGuid := StringToGUID({$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(ClientID));
+  if Assigned(fOnBeforeRegisterEventClient) then
+    fOnBeforeRegisterEventClient(lGuid, EventTypes);
+
+  if assigned(fEventRepository) then begin
+    if Supports(fTransport, IROActiveEventServer, lActive) then
+      fEventRepository.AddSession(lGuid, lActive)
+    else
+      fEventRepository.AddSession(lGuid);
+  end;
+end;
+
+procedure TRORemoteDataModule.UnregisterEventClient(const ClientID, EventTypes: Ansistring);
+var
+  lGuid: TGuid;
+begin
+  if Assigned(fOnBeforeUnregisterEventClient) or Assigned(fEventRepository) then
+    lGuid := StringToGUID({$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(ClientID));
+  if Assigned(fOnBeforeUnregisterEventClient) then
+    fOnBeforeUnregisterEventClient(lGuid, EventTypes);
+
+  if assigned(fEventRepository) then
+    fEventRepository.RemoveSession(lGuid);
+end;
+
+procedure TRORemoteDataModule.SetEventRepository(const Value: TROEventRepository);
+begin
+  if (fEventRepository=Value) then Exit;
+
+  fEventRepository := Value;
+  if (fEventRepository<>NIL) then
+    fEventRepository.FreeNotification(Self);
+end;
+
+function TRORemoteDataModule.GetSession: TROSession;
+var errmsg : string;
+begin
+  if not (csDesigning in ComponentState) then begin
+    if (fSession = nil) and (not RequiresSession) and (SessionManager<>NIL) then
+       fSession:= fSessionManager.CreateSession(ClientID);
+    if (fSession=NIL) then begin
+      errmsg := 'The session has not been initialized.';
+      if SessionManager=NIL then errmsg := errmsg+' '+Name+'''s SessionManager property is set to NIL.';
+      raise EROException.Create(errmsg);
+    end;
+  end;
+
+  result := fSession;
+end;
+
+function TRORemoteDataModule.GetEventRepository: TROEventRepository;
+var errmsg : string;
+begin
+  if not (csDesigning in ComponentState) then begin
+    if (fEventRepository=NIL) then begin
+      errmsg := Name+'''s EventRepository property is not assigned';
+      raise EROException.Create(errmsg);
+    end;
+  end;
+
+  result := fEventRepository;
+end;
+
+function TRORemoteDataModule.IsRetained(const anObject: TObject): boolean;
+begin
+  result := (fRetainedObjects<>NIL) and (fRetainedObjects.IndexOf(anObject)>=0)
+end;
+
+procedure TRORemoteDataModule.RetainObject(const anObject: TObject);
+begin
+  // Only creates it if necessary
+  if (fRetainedObjects=NIL) then
+    fRetainedObjects := TList.Create;
+
+  fRetainedObjects.Add(anObject);
+end;
+
+procedure TRORemoteDataModule.ReleaseObject(const anObject: TObject);
+var idx : integer;
+begin
+  // Only creates it if necessary
+  if (fRetainedObjects=NIL) then Exit;
+
+  idx := fRetainedObjects.IndexOf(anObject);
+  if (idx>=0) then fRetainedObjects.Delete(idx);
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRORemoteService.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRORemoteService.pas
new file mode 100644
index 0000000..f80f7d7
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRORemoteService.pas	
@@ -0,0 +1,250 @@
+unit uRORemoteService;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes, SysUtils,
+  uROTypes, uROClasses, uROClient, uROClientIntf, uRODL;
+
+type
+  { TRORemoteService }
+  TRORemoteService = class(TROComponent)
+  private
+    fMessage: TROMessage;
+    fChannel: TROTransportChannel;
+    fRodlLibrary: TRODLLibrary;
+    fCacheRODL: boolean;
+    fServiceName: string;
+
+    procedure SetServiceName(const Value: string);
+    procedure SetCacheRODL(const Value: boolean);
+    procedure SetChannel(const Value: TROTransportChannel);
+    procedure SetMessage(const Value: TROMessage);
+
+    {$IFDEF DESIGNTIME}
+    procedure FixUpTargetURL;
+    {$ENDIF}
+
+  protected
+    // Internals
+    procedure Notification(aComponent: TComponent; Operation: TOperation); override;
+    function QueryInterface(const IID: TGUID; out Obj): HResult; override;
+
+  public
+    destructor Destroy; override;
+
+    procedure SetRODLLibrary(aLibrary: TRODLLibrary);
+    function GetRODLLibrary : TRODLLibrary; virtual;
+    function GetServiceNames(aIncludeAbstractServices:boolean=false): IROStrings;
+    function GetServiceMethods: IROStrings; virtual;
+
+    procedure CheckCanConnect(CheckServiceName: boolean = true);
+    procedure CheckProperties;
+
+  published
+    property Message : TROMessage read fMessage write SetMessage;
+    property Channel : TROTransportChannel read fChannel write SetChannel;
+    property ServiceName : string read fServiceName write SetServiceName;
+
+    property CacheRODL: boolean read fCacheRODL write SetCacheRODL default false;
+  end;
+
+implementation
+
+uses TypInfo, uRORes;
+
+{ TRORemoteService }
+destructor TRORemoteService.Destroy;
+begin
+  FreeAndNil(fRodlLibrary);
+  inherited;
+end;
+
+procedure TRORemoteService.CheckCanConnect(CheckServiceName : boolean = TRUE);
+begin
+  Check(Channel=NIL, Name+'.Channel must be assigned.');
+  Channel.CheckProperties;
+  Check(Message=NIL, Name+'.Message must be assigned.');
+  Message.CheckProperties;
+  if CheckServiceName then Check(ServiceName='', Name+'.ServiceName must be specified.');
+end;
+
+procedure TRORemoteService.CheckProperties;
+begin
+  CheckCanConnect(true);
+end;
+
+procedure TRORemoteService.Notification(aComponent: TComponent;
+  Operation: TOperation);
+begin
+  inherited;
+
+  if (Operation=opRemove) then begin
+    if (aComponent=fChannel) then fChannel := NIL
+    else if (aComponent=fMessage) then fMessage := NIL
+  end;
+end;
+
+{$IFDEF DESIGNTIME}
+procedure TRORemoteService.FixUpTargetURL;
+var http : IROHTTPTransport;
+    protocol : string;
+begin
+  if (fChannel<>NIL) and (fMessage<>NIL) then begin
+    if Supports(fChannel, IROHTTPTransport, http) then
+      if (http.TargetURL='') then begin
+        protocol := UpperCase(StringReplace(Copy(fMessage.ClassName, 4, MaxInt), 'Message', '', [rfIgnoreCase]));
+        http.TargetURL := 'http://localhost:8099/'+protocol;
+      end;
+    end;
+end;
+{$ENDIF}
+
+procedure TRORemoteService.SetChannel(const Value: TROTransportChannel);
+begin
+  fChannel := Value;
+  if (fChannel<>NIL) then begin
+    fChannel.FreeNotification(Self);
+    {$IFDEF DESIGNTIME}
+    if (csDesigning in ComponentState) then FixUpTargetURL;
+    {$ENDIF}
+  end;
+end;
+
+procedure TRORemoteService.SetMessage(const Value: TROMessage);
+begin
+  fMessage := Value;
+  if (fMessage<>NIL) then begin
+    fMessage.FreeNotification(Self);
+    {$IFDEF DESIGNTIME}
+    if (csDesigning in ComponentState) then FixUpTargetURL;
+    {$ENDIF}
+  end;
+end;
+
+{$IFDEF DELPHI5}
+const S_OK = 0;
+{$ENDIF}
+
+function TRORemoteService.QueryInterface(const IID: TGUID; out Obj): HResult;
+var //ref : IInterface;
+    proxyclass : TROProxyClass;
+    proxy : TROProxy;
+begin
+  result := inherited QueryInterface(IID, Obj);
+
+  if (result <> S_OK) then begin
+    proxyclass := FindProxyClass(IID, TRUE);
+
+    if (proxyclass=NIL) then Exit
+    else begin
+  	  CheckCanConnect(false);
+      proxy := proxyclass.Create(fMessage, fChannel);
+      proxy.GetInterface(IID, Obj);
+      result := S_OK;
+    end;
+  end;
+end;
+
+procedure TRORemoteService.SetCacheRODL(const Value: boolean);
+begin
+  fCacheRODL := Value;
+  if not fCacheRODL then
+    FreeAndNil(fRodlLibrary)
+end;
+
+function TRORemoteService.GetRODLLibrary: TRODLLibrary;
+var
+  lMetadataReader:IROMetadataReader;
+begin
+  if fCacheRODL and assigned(fRodlLibrary) then begin
+    result := fRodlLibrary;
+    exit;
+  end;
+
+  FreeAndNil(fRodlLibrary);
+  CheckCanConnect(False);
+//  if not Assigned(Channel) then raise EROUserError.Create(err_CannotReadRODLWithoutChannel);
+
+  if Supports(Channel,IROMetadataReader,lMetadataReader) then begin
+    lMetadataReader.RetrieveRODL(fRodlLibrary);
+    result := fRodlLibrary;
+  end
+  else begin
+    raise Exception.Create(err_ChannelDoesntSupportIROMetadataReader);
+  end;
+end;
+
+function TRORemoteService.GetServiceNames(aIncludeAbstractServices:boolean=false): IROStrings;
+var
+  lib : TRODLLibrary;
+  i : integer;
+begin
+  CheckCanConnect(FALSE);
+
+  result := NIL;
+  lib := GetRODLLibrary;
+  if Assigned(lib) then begin
+    result := NewROStrings;
+
+    for i := 0 to (lib.ServiceCount-1) do
+      if not lib.Services[i].IsFromUsedRodl then
+        if aIncludeAbstractServices or (not lib.Services[i].Abstract) then
+          result.Add(lib.Services[i].Info.Name);
+  end;
+end;
+
+procedure TRORemoteService.SetServiceName(const Value: string);
+begin
+  fServiceName := Trim(Value);
+end;
+
+function TRORemoteService.GetServiceMethods:IROStrings;
+var
+  lLibrary: TRODLLibrary;
+  lService: TRODLService;
+  i:integer;
+begin
+  lLibrary := GetRODLLibrary();
+  if not Assigned (lLibrary) then RaiseError('Library could not retrieved from server');
+  result := NewROStrings;
+
+  lService := lLibrary.FindService(ServiceName);
+  if not Assigned (lService) then RaiseError('Service "%s" not found in library');
+
+  while Assigned(lService) do begin
+    for i := 0 to lService.Default.Count-1 do begin
+      result.Add(lService.Default.Items[i].Info.Name);
+    end; { for }
+    if (lService.Ancestor <> '') then begin
+      lService := lLibrary.FindService(lService.Ancestor);
+    end
+    else begin
+      lService := nil;
+    end;
+  end;
+  (result.Strings as TStringList).Sort();
+end;
+
+procedure TRORemoteService.SetRODLLibrary(aLibrary: TRODLLibrary);
+begin
+  fRodlLibrary.Free;
+  fRodlLibrary := aLibrary;
+  fCacheRODL := true;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRORes.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRORes.pas
new file mode 100644
index 0000000..4b94187
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uRORes.pas	
@@ -0,0 +1,204 @@
+unit uRORes;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  {$IFDEF DOTNET}
+  Borland.Delphi.SysUtils;
+  {$ELSE}
+  Classes, SysUtils;
+  {$ENDIF DOTNET}
+
+{$IFDEF DOTNET}
+type TSessionID = string;
+{$ELSE}
+type TSessionID = TGUID;
+{$ENDIF DOTNET}
+
+const
+  str_Author      = 'RemObjects Software';
+  str_ProductName = 'RemObjects SDK';
+
+  res_RODLFile = 'RODLFILE';
+
+  CRLF = #13#10;
+
+  HTTPModuleInfoCommand = '/Info';
+
+resourcestring
+  // RODL
+  err_InvalidIndex        = 'Invalid index %d'; // Raised by the RODL classes to indicate an invalid entity index
+  err_InvalidType         = 'Invalid type "%s. Expected "%s""'; // Raised by TRODLComplexEntity.Add when trying to add an invalid class to the internal list
+  err_InvalidLibrary      = 'Invalid library'; // Raised by TRODLConverter.Convert when the library is NIL
+  err_InvalidStream       = 'Invalid stream'; // Raised by TRODLReader.Read when a NIL stream is passed
+  err_InvalidTargetEntity = 'Invalid TargetEntity "%s"'; // Raised by TRODLConverter.Convert when a call to ValidateTargetEntity fails
+  err_InvalidParamFlag    = 'Invalid Parameter Flag "%s"'; // Raised by XMLFlagNameToFlag (unit uRODLToXML) when the specified string is not in XMLFlagNames
+
+  err_InvalidStringLength = 'Stream read error: Invalid string length "%d"'; //
+  err_InvalidBinaryLength = 'Stream read error: Invalid binary length "%d"'; //
+  str_InvalidClassTypeInStream = 'Stream read error: Invalid class type encountered: "%s"';
+  err_ObjectExpectedInStream = 'Stream read error: Object expected, but nil found.';
+  err_UnexpectedEndOfStream = 'Unexpected end of stream.';
+
+  err_MessageClassMustImplementAssign = 'Please implement Assign() for your custom message class.';
+
+  err_InvalidInfo   = 'Invalid or incomplete info.'; // Raised by TRODLEntity.Validate when the internal Info property is not valid
+  err_RodlDuplicateName = 'Duplicate name.'; // Raised by TRODLComplexEntity.Validate when two items have the same name
+  err_RodlNoDataTypeSpecified = 'No data type specified.'; // Raised by TRODLComplexEntity.Validate when two items have the same name
+  err_RodlNoEnumValues = 'Enum does not contain any values.';
+  err_RodlNoStructElementsDefined = 'Struct does not contain any elements.';
+  err_RodlNoOperationsDefined = 'Service interface does not contain any elements.';
+  err_RodlUsedFileDoesNotExist = 'The referenced RODL file "%s" could not be found.';
+  err_RodlInvalidDataType = 'Invalid or undefined data type "%s".';
+  err_RodlStructCannotBeNested = 'Structs cannot recursively contain themselves.';
+  err_RodlInvalidAncestorType = 'Invalid or undefined ancestor type "%s".';
+  err_RodlItemExistsInAnsector = 'An item named "%s" already exists in ancestor "%s".';
+  err_RodlCircularReference = 'Circular reference detected between %s and %s';
+  err_RodlCircularityWarning = 'Contained items have been not checked for name duplicates in ancestors because of the ancestors'' circularity';
+
+  err_UnspecifiedRODLLocation = 'Unspecified RODL location';
+
+  str_ExceptionOnServer = 'An exception of type %s was raised on the server: %s';
+  str_ExceptionReraisedFromServer = 'An exception was raised on the server: %s';
+
+  err_AssignError = 'Cannot assign a "%s" to a "%s".';
+
+  // Message handling
+  err_InvalidRequestStream             = 'Invalid request stream (%d bytes)';
+  err_NILMessage                       = 'Message is NIL'; // Raised server side when a message passed to ProcessMessage is NIL
+  err_UnspecifiedInterface             = 'The message does not have an interface name'; // Raised server side when a message passed to ProcessMessage does not have a valid InterfaceName
+  err_UnspecifiedMessage               = 'The message does not have a name'; // Raised server side when a message passed to ProcessMessage does not have a valid MessageName
+  err_UnknownMethod                    = 'Unknown method %s for interface %s'; // Raised server side when a server interface does not have a method matching the message name   
+  err_ClassFactoryDidNotReturnInstance = 'Class factory did not return an instance of "%s"'; // Raised server side when a class factory returns a NIL reference. It should never happen
+  err_ParameterNotFound                = 'Parameter "%s" was not found';
+  err_AbstractService                  = 'Interface "%s" is declared as an abstract service.';
+
+  // Misc
+  err_NotImplemented                 = 'Not implemented'; // Not implemented error. Should never be happen
+  err_TypeNotSupported               = 'Type "%s" not supported'; // Raised by message classes when the typeinfo of the parameter being read/written is not supported
+  err_ClassFactoryNotFound           = 'Class factory for interface %s not found';
+  err_UnspecifiedTargetURL           = 'Unspecified TargetURL';
+  err_IROMessageNotSupported         = 'Class "%s" does not support IROMessage';
+  err_ClassAlreadyRegistered         = 'Class "%s" is already registered';
+  err_UnknownClass                   = 'Unknown class "%s"';
+  err_UnknownProxyInterface          = 'Unknown proxy interface "%s"';
+  err_UnknownTransportChannelClass   = 'Unknown transport channel class "%s"';
+  err_UnknownMessageClass            = 'Unknown message class "%s"';
+
+  err_DispatcherAlreadyAssigned       = 'Dispatcher for %s already assigned';
+  err_CannotFindMessageDispatcher     = 'Cannot find message dispatcher. Maybe there is no message component configured for the requested path?';
+  err_ServerOnlySupportsOneDispatcher = '%s servers only support one dispatcher';
+  err_UnhandledException              = 'Unhandled exception';
+
+  err_CannotReadRODLWithoutChannel = 'Cannot read RODL information without a channel';
+  err_CannotReadRODLWithoutRemoteService = 'Cannot read RODL information without a remote service';
+
+  err_CannotAssignClass               = 'Cannot Assign a "%s" to a "%s".';
+
+  err_ChannelBusy                     = 'Channel is busy. Try again later.';
+
+  err_DesignTimeProperty              = '%s is a designtime-only property';
+
+  // SOAP
+  err_ExpectedParameterNotFound = 'Expected parameter "%s" was not found.'; // Raised by TROSOAPMessage when an expected parameter was not found
+  err_AmbigousResponse          = 'Ambigous response. Expected one "%s" but %d were received'; // Raised by TROSOAPMessage when two parameters in a a SOAP Envelope have the same name
+  err_InvalidEnvelope           = 'Invalid SOAP Envelope. %s'; // Invalid SOAP envelope. The message is completed with additional information
+  err_InvalidData               = 'Cannot convert data for parameter "%s"'#13'Exception was "%s"'#13'Data was "%s".'; // Error converting the text of the parameter to a Delphi type
+
+  inf_InvalidEnvelopeNode   = 'SOAP Envelope node missing or not root.'; // The SOAP envelope does not match the SOAP specs by not providing an Envelope node
+  inf_AbsentBody            = 'SOAP envelope does not contain a Body.'; // The SOAP envelope does not contain a body
+  inf_AbsentMessage         = 'SOAP Body does not contain a message nor a fault'; // The body does not contain any sub node
+
+  err_ArrayIndexOutOfBounds = 'Array index out of bounds (%d).';
+
+  // BIN
+  err_InvalidHeader           = 'Invalid binary header. Either incompatible or not a binary message.';
+  err_InvalidHeaderEncrypted  = 'Invalid binary header. It seems that encryption is active on the other side of the communication, but not locally?';
+  err_UnknownClassInStream    = 'Unknown class "%s" found in stream.';
+  err_UnexpectedClassInStream = 'Unexpected class found in stream; class "%s" does not descend from "%s".';
+  err_InvalidDateTimeReadFromStream = 'Invalid DateTime read from Stream.';
+
+  // WinMessageChannel
+  err_CannotFindServer = 'Cannot find server "%s"';
+  err_MessagePropertyMustBeSet = 'Message property must be assigned for the server to be active';
+  err_WinMessageFailed = 'Communication with the WinMessage Server failed or timed out (Error Code %d)';
+
+  // WInINet channel
+  err_UnexpectedWinINetProblem = 'Unexpected error in WinInet HTTP Channel (%d)';
+  err_CommunicationWithServerTimedOut = 'Communication with the server timed out (after %sms)';
+
+  // BPDX Channels
+  err_CannotConnectToServer = 'Cannot connect to server "%s"';
+  err_ConnectionError = 'Connection error';
+
+  // Standard Class Factories
+  err_PoolSizeMustBe1orHigher = 'Pool Size must be 1 or higher';
+  err_NoFreeObjectsInPool = 'There are no free objects in the pool for %s, all %d instances are in use. Please try again later.';
+
+  // Misc
+  msg_NoMultipleDispatchers = 'Multiple message dispatchers not supported';
+  err_InvalidStorage = 'Invalid storage';
+  err_ErrorConvertingFloat = 'Error converting float "%s" at byte %d';
+
+  err_SessionNotFound = 'Session %s could not be found';
+
+  err_ChannelDoesntSupportIROMetadataReader = 'Channel does not support IROMetadataReader';
+
+  // Sessions
+  err_TooManySessions = 'Too many sessions. Try again in %d minute(s)';
+
+  // XML
+  err_DOMElementIsNIL  = 'DOMElement is NIL';
+  err_IndexOutOfBounds = 'Index out of bounds';
+  err_CannotLoadXMLDocument = 'Cannot load XML document.'#13'Reason: %s'#13'Line: %d'#13'Position: %d';
+  err_ErrorCreatingMsXmlDoc = 'Error creating MSXML Document class'#13#13'%s: %s';
+  err_NoXMLParsersAvailable = 'MSXML is not installed';
+
+  // Variant conversion
+  err_IDispatchMarshalingNotSupported = 'Marshaling of IDispatch (%d) type variants is not supported.';
+  err_UnsupportedVariantType = 'Unsupported variant type "%d"';
+  err_InvalidBinaryFormat = 'Invalid binary format for a variant';
+  err_VariantIsNotArray = 'Variant must be Array, but is %d';
+  err_InvalidVarArrayDimCount = 'Variant Array DimCount must be 1 but is %d';
+
+  // uRODL and similar collections (see uRODynamicRequest)
+  err_CannotFindParameter = 'Cannot find parameter %s';
+  err_CannotFindService = 'Cannot find service %s';
+  err_RODLResourceNotLoaded = 'RODL resource has not been loaded';
+
+  err_MayNotAddResult = 'Cannot add Result parameter to collection. Use AddResult instead';
+
+  //
+  err_OperationNameNeedsServiceName = 'Cannot set the OperationName without a ServiceName';
+  err_ServiceNameIsNotSet = 'ServiceName is not set';
+
+  err_EventReceivedNotConnectedToMessage = 'The event receiver must be connected to a message component first';
+  err_MessageNotAssigned = 'Message is NIL';
+
+  err_UnknownMessageType = 'Unknown message type "%s"';
+
+  err_MasterServerNeedsChannel = 'No Channel assigned to %s.';
+
+  err_StreamIsReadOnly = 'Stream is read-only.';
+
+  {$IFDEF DOTNET}
+  err_NotImplementedForDotNetYet = 'This function is not yet implemented for .NET yet.';
+  {$ENDIF DOTNET}
+
+implementation
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSCHelpers.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSCHelpers.pas
new file mode 100644
index 0000000..3ff9123
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSCHelpers.pas	
@@ -0,0 +1,954 @@
+unit uROSCHelpers;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Indy Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+uses
+  {$IFDEF MSWINDOWS}Windows,{$ENDIF} SysUtils, Classes, uROClasses, uROClient, uROClientIntf,
+  IdTCPConnection, uROServer , SyncObjs;
+
+type
+  EROTimeout = class(EROException);
+  TROAckState = (rNone, rAck, rNoAck);
+  IROPackageAck = interface
+    ['{89ABD257-42CB-4B4B-9BA6-3E5CED10605B}']
+    function GetEvent: TROEvent;
+    function GetAckNo: Integer;
+    function GetNoAckError: Integer;
+    procedure SetNoAckError(I: Integer);
+    function GetAckState: TROAckState;
+    procedure SetAckState(I: TROAckState);
+
+    property Event: TROEvent read GetEvent;
+    property AckNo: Integer read GetAckNo;
+    property NoAckError: Integer read GetNoAckError write SetNoAckError;
+    property AckState: TROAckState read GetAckState write SetAckState;
+
+    procedure RemoveFromList;
+  end;
+  TROSuperChannelWorker = class
+  private
+    fMaxPackageSize: Integer;
+    fIsServer: Boolean;
+    fConnection: TIdTCPConnection;
+    fWriteLock,
+    fInternalWriteLock: TCriticalSection;
+    fClientID: TGUID;
+    fLastId: Integer;
+    fConnected: Boolean;
+    fLastData: TDateTime;
+
+//    fAckWaitTimeout: Integer;
+    fOtherSideMaxPackageLen: Integer;
+    fWaitingAckList: TInterfaceList;
+    fRemoteSupportsOptions, fRemoteSkipAck, fSkipAck: Boolean;
+    fPingFrequency,
+    fPingTimeout: Integer;
+    procedure SetSkipAck(const Value: Boolean);
+    function Client_SendWelcome: Boolean;
+    function GetOtherSideMaxPackageLen: integer;
+  protected
+    property PingFrequency: Integer read fPingFrequency write fPingFrequency;
+    property PingTimeout: Integer read fPingTimeout write fPingTimeout;
+    property LastData: TDateTime read FLastData;
+    property IsServer: Boolean read fIsServer write fIsServer;
+    procedure Idle; virtual;
+    procedure Connected; virtual;
+    procedure SupportsOptions;
+    function ReadStream(aDest: TStream; aLen: Integer): Boolean;
+    procedure ProcessOption(Data: TStream);
+    procedure Disconnected(var RestartLoop: Boolean); virtual;
+    procedure IncomingData(Id: Integer; aData: TStream); virtual; abstract;
+    function IntSendData(Id: Integer; aData: TStream): IROPackageAck;
+    procedure SetAckDetails(Id: Integer; Oke: Boolean; ErrorNo: Integer); virtual;
+    procedure SendOptions(aData: UTF8String);
+    function GetDefaultResponse: string;virtual;
+  public
+    constructor Create(aConnection: TIdTCPConnection);
+    destructor Destroy; override;
+
+    property ClientID: TGuid read fClientID write fClientID;
+    property Connection: TIdTCPConnection read fConnection;
+
+    // to be called from a thread; will stay checking until disconnected
+    procedure DoExecute;
+
+    procedure Disconnect;
+
+    // Thread safe method
+    procedure SendError(Id: Integer; Error: Byte);
+    procedure BeginWriteLock;
+    function SendPackage(aData: TStream; Id: Integer = 0): IROPackageAck;
+    procedure EndWriteLock;
+    class procedure WaitForAck(pkg: IROPackageAck; Timeout: Integer = 60000);
+    function GenerateId: Integer;
+
+    // properties
+    property MaxPackageSize: Integer read fMaxPackageSize write fMaxPackageSize;
+    property IsConnected: Boolean read fConnected write fConnected;
+    property SkipAck: Boolean read fSkipAck write SetSkipAck;
+  end;
+
+const
+  ScCmdNoAck_MsgTooLarge = 0;
+  ScCmdNoAck_Timeout = 1;
+  scCmdNoAck_UnknownCommand = 2;
+  ScCmdNoAck_QueueFull = 3;
+  ScCmdNoAck_SupportsOptions = 255;
+
+
+implementation
+{$IFDEF RemObjects_INDY10}
+uses
+  IdIOHandler, IdGlobal, IdStackConsts, IdStack, IdSocketHandle;
+{$ENDIF}
+
+const
+  ScWelcome = 'ROSC10';
+
+//  ScCmdHello = 0;
+  {
+    Client:
+      'ROSC10'
+      [MyGuid] or [NullGuid]
+      MaxPackageLength: Int32;
+    Server:
+      'ROSC10'
+      [YourGuid] or [NewGuid]
+      MaxPackageLength: Int32;
+  }
+  ScCmdPackage = 1;
+  {
+    Request or Event Id: Int32; (Event < 0; Request/Response > 0)
+    Length: Int32;
+    Data: [...]
+  }
+  ScCmdAck = 2;
+  {
+    Id: Integer;
+  }
+  ScCmdNoAck = 3;
+  {
+    Id: Integer;
+    Error:
+      0 = Message too large
+      1 = Timeout
+  }
+
+  ScCmdPing = 4;
+  { Should be sent every 60 seconds by the client
+     RandomNumber: Integer;
+  }
+  ScCmdPong = 5;
+  { Reply to ping
+    OriginalRandomNumber: Integer;
+  }
+  ScCmdOptions = 6;
+  {
+    Length: Longint
+    Data: array of 0..Length -1 of byte
+    UTF8 encoded, seperated by #13
+  }
+
+
+
+type
+  TROPackageAck = class(TInterfacedObject, IROPackageAck)
+  private
+    fEvent: TROEvent;
+    fAckNo,
+    FAckNoError: Integer;
+    FAckState: TROAckState;
+    FOwner: TROSuperChannelWorker;
+  public
+    function GetEvent: TROEvent;
+    function GetAckNo: Integer;
+    function GetNoAckError: Integer;
+    procedure SetNoAckError(I: Integer);
+    function GetAckState: TROAckState;
+    procedure SetAckState(I: TROAckState);
+
+    constructor Create(aOwner: TROSuperChannelWorker; aId: Integer);
+    destructor Destroy; override;
+
+    procedure RemoveFromList;
+  end;
+
+{ TROSuperChannelWorker }
+
+constructor TROSuperChannelWorker.Create(aConnection: TIdTCPConnection);
+begin
+  inherited Create;
+  fPingFrequency := 60;
+  fPingTimeout := 90;
+  fConnection := aConnection;
+  fWriteLock := TCriticalSection.Create;
+  fInternalWriteLock := TCriticalSection.Create;
+  fMaxPackageSize := 10 * 1024 * 1024; // 10mb
+  fWaitingAckList:= TInterfaceList.Create;
+end;
+
+destructor TROSuperChannelWorker.Destroy;
+var
+  i: Integer;
+begin
+  BeginWriteLock;
+  try
+    fWaitingAckList.Lock;
+    try
+      for i := fWaitingAckList.Count -1 downto 0 do
+        IROPackageAck(fWaitingAckList[i]).RemoveFromList;
+    finally
+      fWaitingAckList.Unlock;
+    end;
+    fWaitingAckList.Free;
+    fInternalWriteLock.Free;
+    inherited Destroy;
+  finally
+    EndWriteLock;
+    fWriteLock.Free;
+  end;
+end;
+
+{$IFDEF RemObjects_INDY10}
+  type
+    TINDY10IdSocketHandle = class(TIdSocketHandle)
+    end;
+{$ENDIF}
+procedure TROSuperChannelWorker.Disconnect;
+begin
+  {$IFDEF RemOBjects_INDY8}
+  fConnection.Binding.CloseSocket();
+  {$ELSE}
+    {$IFDEF RemObjects_INDY10}
+    //if assigned(fConnection.Socket) and (fConnection.Socket.Connected) then
+    //fConnection.Socket.Close;
+    if assigned(fConnection.Socket) and (fConnection.Socket.Connected) and Assigned(fConnection.Socket.Binding) and (fConnection.Socket.Binding.Handle <> 0) then begin
+      GStack.Disconnect(fConnection.Socket.Binding.Handle);
+      TINDY10IdSocketHandle(fConnection.Socket.Binding).SetHandle(Id_INVALID_SOCKET);
+    end;
+    {$ELSE}
+    fConnection.DisconnectSocket;
+    {$ENDIF}
+  {$ENDIF}
+end;
+
+{$IFDEF RemObjects_INDY10}
+type
+  TIndy10IOHandlerHack = class(TIdIOHandler)
+  public
+    function ReadFromStack(ARaiseExceptionIfDisconnected: Boolean = True;
+     ATimeout: Integer = IdTimeoutDefault;
+     ARaiseExceptionOnTimeout: Boolean = True): Integer;
+  end;
+
+function TIndy10IOHandlerHack.ReadFromStack(ARaiseExceptionIfDisconnected: Boolean = True;
+     ATimeout: Integer = IdTimeoutDefault;
+     ARaiseExceptionOnTimeout: Boolean = True): Integer;
+begin
+  Result := ReadFromSource(ARaiseExceptionIfDisconnected, ATimeout, ARaiseExceptionOnTimeout)
+end;
+
+procedure Indy10ReadBuffer(aConnection: TIdTCPConnection; var Data; Len: Longint);
+var
+  LBytes: TidBytes;
+begin
+  SetLength(lBytes, Len);
+  aConnection.IOHandler.ReadBytes(LBytes, Len, False);
+  if Length(lBytes) <> len then raise exception.Create('Not enough data available');
+  Move(lBytes[0], Data, Len);
+end;
+procedure Indy10WriteBuffer(aConnection: TIdTCPConnection; const Data; Len: Longint);
+var
+  lBytes: TidBytes;
+begin
+  SetLength(lBytes, Len);
+  move(Data, lBytes[0], Len);
+  if aConnection.IOHandler <> nil then
+    aConnection.IOHandler.Write(lBytes);
+end;
+
+{$ENDIF}
+
+procedure TROSuperChannelWorker.Connected;
+var
+  b: array[0..5] of byte;
+begin
+  fConnected := True;
+  b[0] := ScCmdNoAck;
+  b[1] := 0;
+  b[2] := 0;
+  b[3] := 0;
+  b[4] := 0;
+  b[5] := ScCmdNoAck_SupportsOptions;
+  {$IFDEF RemObjects_INDY10}
+  Indy10WriteBuffer(fConnection, b, sizeof(b));
+  {$ELSE}
+  fConnection.WriteBuffer(b, sizeof(b));
+  {$ENDIF}
+end;
+
+
+procedure TROSuperChannelWorker.Disconnected(var RestartLoop: Boolean);
+begin
+  if RestartLoop then fConnected := False else //for preventing warnings in FPC
+  fConnected := False;
+end;
+
+procedure TROSuperChannelWorker.DoExecute;
+var
+  fLastPackage: DateTime;
+  lServerExpectAck: Integer;
+  lTmpId,
+  lTmpLen: Integer;
+  cmd: Byte;
+  Bl: array[0..5] of Byte;
+  lData: TMemoryStream;
+  lRetry: Boolean;
+begin
+  {$IFDEF RemObjects_INDY10}
+    fConnection.Socket.UseNagle := False;
+  {$ELSE}
+    lTmpId := 1; // Indy 8 and 9 have the UseNagle property too, but it doesn't do anything.
+    fConnection.{$IFDEF RemObjects_INDY9}Socket.{$ENDIF}Binding.SetSockOpt(6, 1, @lTmpId, 4);
+  {$ENDIF}
+  repeat
+    fRemoteSkipAck := false;
+    fRemoteSupportsOptions := false;
+    lServerExpectAck := 0;
+    try
+      if IsServer then
+      begin
+
+        if fConnection.{$IFDEF RemObjects_INDY10}IOHandler.{$ENDIF}ReadString(6) <> ScWelcome then
+        begin
+          fConnection.{$IFDEF RemObjects_INDY10}IOHandler.{$ENDIF}Write(GetDefaultResponse);
+          fConnection.Disconnect;
+          exit;
+        end;
+        {$IFDEF RemObjects_INDY10}
+        Indy10ReadBuffer(fConnection, fClientID, Sizeof(fClientID));
+        {$ELSE}
+        fConnection.ReadBuffer(fClientID, Sizeof(fClientID));
+        {$ENDIF}
+        if IsEqualGUID(fClientID, EmptyGUID) then
+          fClientID := NewGuid;
+        fOtherSideMaxPackageLen := fConnection.{$IFDEF RemObjects_INDY10}IOHandler.{$ENDIF}{$IFDEF RemObjects_INDY10C}ReadLongInt{$ELSE}ReadInteger{$ENDIF}(false);
+        fConnection.{$IFDEF RemObjects_INDY10}IOHandler.{$ENDIF}Write(ScWelcome);
+        {$IFDEF RemObjects_INDY10}
+        Indy10WriteBuffer(fConnection, fClientID, sizeof(FClientID));
+        {$ELSE}
+        fConnection.WriteBuffer(fClientID, sizeof(fClientID));
+        {$ENDIF}
+        fConnection.{$IFDEF RemObjects_INDY10}IOHandler.Write{$ELSE}WriteInteger{$ENDIF}(fMaxPackageSize, false);
+      end else begin
+       (*
+        fConnection.{$IFDEF RemObjects_INDY10}IOHandler.{$ENDIF}Write(ScWelcome);
+        {$IFDEF RemObjects_INDY10}
+        Indy10WriteBuffer(fConnection, fClientID, sizeof(FClientID));
+        {$ELSE}
+        fConnection.WriteBuffer(fClientID, sizeof(fClientID));
+        {$ENDIF}
+        fConnection.{$IFDEF RemObjects_INDY10}IOHandler.Write{$ELSE}WriteInteger{$ENDIF}(fMaxPackageSize, false);
+
+        if fConnection.{$IFDEF RemObjects_INDY10}IOHandler.{$ENDIF}ReadString(6) <> ScWelcome then
+        begin
+          fConnection.{$IFDEF RemObjects_INDY10}IOHandler.{$ENDIF}Write(GetDefaultResponse);
+          fConnection.Disconnect;
+          exit;
+        end;
+        {$IFDEF RemObjects_INDY10}
+        Indy10ReadBuffer(fConnection, fClientID, Sizeof(fClientID));
+        {$ELSE}
+        fConnection.ReadBuffer(fClientID, Sizeof(fClientID));
+        {$ENDIF}
+        fOtherSideMaxPackageLen := fConnection.{$IFDEF RemObjects_INDY10}IOHandler.{$ENDIF}{$IFDEF RemObjects_INDY10C}ReadLongInt{$ELSE}ReadInteger{$ENDIF}(false);
+        *)
+        if Client_SendWelcome then Exit;
+      end;
+      fLastPackage := Now;
+      Connected;
+
+      while fConnection.Connected do
+      begin
+        if fConnection.{$IFDEF RemObjects_INDY10}IOHandler.{$ENDIF}
+        {$IFDEF RemObjects_INDY8}CurrentReadBufferSize{$ELSE}InputBuffer.Size{$ENDIF} = 0 then // check for data
+          {$IFDEF RemObjects_INDY10}TIndy10IOHandlerHack(fConnection.IOHandler).ReadFromStack{$ELSE}fConnection.ReadFromStack{$ENDIF}(false, (fPingFrequency * 10 div 25) * 1000, {$IFDEF RemObjects_INDY8}true{$ELSE}false{$ENDIF});
+        if fConnection.{$IFDEF RemObjects_INDY10}IOHandler.{$ENDIF}
+        {$IFDEF RemObjects_INDY8}CurrentReadBufferSize{$ELSE}InputBuffer.Size{$ENDIF} > 0 then begin // we got data
+          fLastPackage := Now;
+          {$IFDEF RemObjects_INDY8}
+          fConnection.ReadBuffer(cmd, 1);
+          {$ELSE}
+          cmd := ord(fConnection.{$IFDEF RemObjects_INDY10}IOHandler.{$ENDIF}ReadChar);
+          {$ENDIF}
+          case cmd of
+            ScCmdPong:
+              begin
+                if fConnection.{$IFDEF RemObjects_INDY10}IOHandler.{$ENDIF}{$IFDEF RemObjects_INDY10C}ReadLongInt{$ELSE}ReadInteger{$ENDIF}(false) = lServerExpectAck then
+                begin
+                  lServerExpectAck  := 0;
+                end;
+              end;
+            ScCmdPing:
+              begin
+                Bl[0] := ScCmdPong;
+                lTmpId := fConnection.{$IFDEF RemObjects_INDY10}IOHandler.{$ENDIF}{$IFDEF RemObjects_INDY10C}ReadLongInt{$ELSE}ReadInteger{$ENDIF}(false);
+                Move(ltmpId, bl[1], 4);
+                fInternalWriteLock.Acquire;
+                try
+                {$IFDEF RemObjects_INDY10}
+                  Indy10WriteBuffer(fConnection, Bl, 5);
+                {$ELSE}
+                  fConnection.WriteBuffer(Bl, 5);
+                {$ENDIF}
+                finally
+                  fInternalWriteLock.Release;
+                end;
+              end;
+            ScCmdAck:
+              begin
+                lTmpId := fConnection.{$IFDEF RemObjects_INDY10}IOHandler.{$ENDIF}{$IFDEF RemObjects_INDY10C}ReadLongInt{$ELSE}ReadInteger{$ENDIF}(false);
+                SetAckDetails(lTmpId, true, 0);
+              end;
+            ScCmdNoAck:
+              begin
+                lTmpId := fConnection.{$IFDEF RemObjects_INDY10}IOHandler.{$ENDIF}{$IFDEF RemObjects_INDY10C}ReadLongInt{$ELSE}ReadInteger{$ENDIF}(false);
+                {$IFDEF RemObjects_INDY8}
+                  fConnection.ReadBuffer(cmd, 1);
+                {$ELSE}
+                  cmd := byte(fConnection.{$IFDEF RemObjects_INDY10}IOHandler.{$ENDIF}ReadChar);
+                {$ENDIF}
+                if cmd = ScCmdNoAck_SupportsOptions then
+                  SupportsOptions
+                else
+                SetAckDetails(lTmpId, false, cmd);
+              end;
+            ScCmdOptions:
+              begin
+                lTmpLen := fConnection.{$IFDEF RemObjects_INDY10}IOHandler.{$ENDIF}{$IFDEF RemObjects_INDY10C}ReadLongInt{$ELSE}ReadInteger{$ENDIF}(false);
+                if lTmpLen > fMaxPackageSize then
+                begin
+                  fInternalWriteLock.Acquire;
+                  try
+                    fConnection.{$IFDEF RemObjects_INDY10}IOHandler.{$ENDIF}Write(Chr(ScCmdNoAck)+#0#0#0#0+chr(ScCmdNoAck_MsgTooLarge));
+                  finally
+                    fInternalWriteLock.Release;
+                  end;
+                  fConnection.Disconnect;
+                  exit;
+                end else begin
+                  lData := TMemoryStream.Create;
+                  try
+                    if not ReadStream(lData, lTmpLen) then break;
+                    ProcessOption(lData);
+                  finally
+                    lData.Free; // only free when we failed to send the data to the queue
+                  end;
+                  fLastPackage := Now; // for packages that might take longer.
+                end;
+              end;
+            ScCmdPackage:
+              begin
+                fLastData := Now;
+                lTmpId := fConnection.{$IFDEF RemObjects_INDY10}IOHandler.{$ENDIF}{$IFDEF RemObjects_INDY10C}ReadLongInt{$ELSE}ReadInteger{$ENDIF}(false);
+                lTmpLen := fConnection.{$IFDEF RemObjects_INDY10}IOHandler.{$ENDIF}{$IFDEF RemObjects_INDY10C}ReadLongInt{$ELSE}ReadInteger{$ENDIF}(false);
+                if lTmpLen < 0 then
+                begin
+                fInternalWriteLock.Acquire;
+                    try
+                    fConnection.{$IFDEF RemObjects_INDY10}IOHandler.{$ENDIF}Write(Chr(ScCmdNoAck)+#0#0#0#0+chr(scCmdNoAck_UnknownCommand));
+                  finally
+                    fInternalWriteLock.Release;
+                  end;
+                  fConnection.Disconnect;
+                  exit;
+                end;
+                if lTmpLen > fMaxPackageSize then
+                begin
+                  fInternalWriteLock.Acquire;
+                  try
+                    fConnection.{$IFDEF RemObjects_INDY10}IOHandler.{$ENDIF}Write(Chr(ScCmdNoAck)+#0#0#0#0+chr(ScCmdNoAck_MsgTooLarge));
+                  finally
+                    fInternalWriteLock.Release;
+                  end;
+                  fConnection.Disconnect;
+                  exit;
+                end else begin
+                  lData := TMemoryStream.Create;
+                  try
+                    if not ReadStream(lData, lTmpLen) then break;
+                    lData.Seek(0, soFromBeginning);
+                    Self.IncomingData(lTmpId, lData);
+                  except
+                    lData.Free; // only free when we failed to send the data to the queue
+                    fInternalWriteLock.Acquire;
+                    try
+                      fConnection.{$IFDEF RemObjects_INDY10}IOHandler.{$ENDIF}Write(Chr(ScCmdNoAck));
+                      {$IFDEF RemObjects_INDY10}
+                      fConnection.IOHandler.Write(lTmpId, false);
+                      {$ELSE}
+                      fConnection.WriteInteger(lTmpId, false);
+                      {$ENDIF}
+                      fConnection.{$IFDEF RemObjects_INDY10}IOHandler.{$ENDIF}Write(Chr(ScCmdNoAck_QueueFull));
+                    finally
+                      fInternalWriteLock.Release;
+                    end;
+                  end;
+                  if not fRemoteSkipAck then begin
+                  fInternalWriteLock.Acquire;
+                  try
+                    bl[0] := ScCmdAck;
+                    Move(lTmpId, bl[1], 4);
+                    {$IFDEF RemObjects_INDY10}
+                      Indy10WriteBuffer(fConnection, Bl, 5);
+                    {$ELSE}
+                      fConnection.WriteBuffer(Bl, 5);
+                    {$ENDIF}
+                  finally
+                    fInternalWriteLock.Release;
+                    end;
+                  end;
+                  fLastPackage := Now; // for packages that might take longer.
+                end;
+              end;
+          end;
+        end else begin
+          Idle;
+          if IsServer then
+          begin
+            if ((Now - fLastPackage) > (PingTimeout * (1.0 / (24 * 60 * 60)))) and (fConnection.Connected) then
+            begin
+              fInternalWriteLock.Acquire;
+              try
+                fConnection.{$IFDEF RemObjects_INDY10}IOHandler.{$ENDIF}Write(Chr(ScCmdNoAck)+#0#0#0#0+chr(ScCmdNoAck_Timeout));
+                fConnection.Disconnect;
+              finally
+                fInternalWriteLock.Release;
+              end;
+              exit;
+            end;
+          end else
+          begin
+            if (lServerExpectAck <> 0) and (fConnection.Connected) then
+            begin
+              if (Now - fLastPackage) > (PingTimeout * (1.0 / (24 * 60 * 60))) then
+              begin
+                fInternalWriteLock.Acquire;
+                try
+                  fConnection.{$IFDEF RemObjects_INDY10}IOHandler.{$ENDIF}Write(Chr(ScCmdNoAck)+#0#0#0#0+chr(ScCmdNoAck_Timeout));
+                  fConnection.Disconnect;
+                finally
+                  fInternalWriteLock.Release;
+                end;
+                exit;
+              end;
+            end else begin
+              if (Now - fLastPackage) > (PingFrequency * (1.0 / (24 * 60 * 60))) then begin
+                lServerExpectAck := GetTickCount;
+                if lServerExpectAck = 0 then lServerExpectAck := 1;
+                bl[0] := ScCmdPing;
+                Move(lServerExpectAck, bl[1], 4);
+                fInternalWriteLock.Acquire;
+                try
+                  {$IFDEF RemObjects_INDY10}
+                    Indy10WriteBuffer(fConnection, Bl, 5);
+                  {$ELSE}
+                  fConnection.WriteBuffer(bl, 5);
+                  {$ENDIF}
+                finally
+                  fInternalWriteLock.Release;
+                end;
+              end;
+            end;
+          end;
+        end;
+      end;
+    except
+    end;
+    lRetry := false;
+    try
+      Disconnect;
+    except
+    end;
+    Disconnected(lRetry);
+  until not lRetry;
+end;
+
+function TROSuperChannelWorker.GenerateId: Integer;
+begin
+  fWriteLock.Acquire;
+  try
+    if IsServer then
+    begin
+      fLastId := fLastId - 1;
+      if fLastId > -1 then fLastId := -1;
+    end
+    else
+    begin
+      fLastId := fLastId + 1;
+      if fLastId < 1 then fLastId := 1;
+    end;
+    Result := fLastId;
+  finally
+    fWriteLock.Release;
+  end;
+end;
+
+procedure TROSuperChannelWorker.Idle;
+begin
+
+end;
+
+function TROSuperChannelWorker.IntSendData(Id: Integer; aData: TStream): IROPackageAck;
+var
+  Buffer: array[0.. 2047] of byte;
+  Len: Integer;
+begin
+  fLastData := Now;
+  Result := TROPackageAck.Create(Self, Id);
+  fWaitingAckList.Add(Result);
+  Buffer[0] := ScCmdPackage;
+  Move(Id, Buffer[1], 4);
+  Len := aData.Size;
+  Move(Len, Buffer[5], 4);
+
+  aData.Seek(0, soFromBeginning);
+
+  fInternalWriteLock.Acquire;
+  try
+    Len := aData.Read(Buffer[9], sizeof(Buffer) - 9);
+    {$IFDEF RemObjects_INDY10}
+    Indy10WriteBuffer(fConnection, Buffer, Len + 9);
+    {$ELSE}
+    fConnection.WriteBuffer(Buffer, Len + 9);
+    {$ENDIF}
+    if Len > 0 then begin
+      repeat
+        Len := aData.Read(Buffer[0], Sizeof(Buffer));
+        {$IFDEF RemObjects_INDY10}
+        Indy10WriteBuffer(fConnection, Buffer, Len);
+        {$ELSE}
+        fConnection.WriteBuffer(Buffer[0], Len);
+        {$ENDIF}
+        fLastData := Now;
+      until Len = 0;
+    end;
+  finally
+    fInternalWriteLock.Release;
+  end;
+end;
+
+procedure TROSuperChannelWorker.ProcessOption(Data: TStream);
+var
+  lCmd, lData: UTF8String;
+  lPos: Integer;
+begin
+  SetLength(lData, Data.Size);
+  Data.Position := 0;
+  Data.Read(lData[1], Length(lData));
+  lPos := Pos(AnsiChar(#13), lData);
+  if lPos = 0 then begin
+    lCmd := lData;
+    lData := '';
+  end else begin
+    lCmd := copy(lData, 1, lPos-1);
+    Delete(lData, 1, lPos);
+  end;
+  if lCmd = 'SKIPACK' then begin
+    fRemoteSkipAck := lData <> 'OFF';
+  end;
+end;
+
+procedure TROSuperChannelWorker.SendError(Id: Integer; Error: Byte);
+var
+  Buffer: array[0..5] of Byte;
+begin
+  buffer[0] := ScCmdNoAck;
+  Move(ID, Buffer[1], 4);
+  Buffer[5] := Error;
+  fInternalWriteLock.Acquire;
+  try
+    {$IFDEF RemObjects_INDY10}
+    Indy10WriteBuffer(fConnection, Buffer, 6);
+    {$ELSE}
+    fConnection.WriteBuffer(Buffer, 6);
+    {$ENDIF}
+  finally
+    fInternalWriteLock.Release;
+  end;
+end;
+
+procedure TROSuperChannelWorker.SendOptions(aData: UTF8String);
+var
+  Buffer: array of byte;
+  Len: Integer;
+begin
+  fWriteLock.Acquire;
+  try
+    fLastData := Now;
+    SetLength(Buffer, Length(aData)+5);
+    Buffer[0] := ScCmdOptions;
+    Len := Length(aData);
+    Move(Len, Buffer[1], 4);
+    Move(aData[1], Buffer[5], Length(aDAta));
+
+    fInternalWriteLock.Acquire;
+    try
+      {$IFDEF RemObjects_INDY10}
+      Indy10WriteBuffer(fConnection, Buffer[0], Length(Buffer));
+      {$ELSE}
+      fConnection.WriteBuffer(Buffer[0], Length(Buffer));
+      {$ENDIF}
+    finally
+      fInternalWriteLock.Release;
+    end;
+
+  finally
+    fWriteLock.Release;
+  end;
+end;
+
+function TROSuperChannelWorker.SendPackage(aData: TStream; Id: Integer = 0): IROPackageAck;
+begin
+  if GetOtherSideMaxPackageLen < aData.Size then begin
+    raise EROException.Create('Package too large');
+  end
+  else begin
+    fWriteLock.Acquire;
+    try
+      if Id = 0 then
+      begin
+        id := GenerateId;
+      end;
+      Result := IntSendData(Id, aData);
+    finally
+      fWriteLock.Release;
+    end;
+  end;
+end;
+
+procedure TROSuperChannelWorker.SetAckDetails(Id: Integer; Oke: Boolean;
+  ErrorNo: Integer);
+var
+  i: Integer;
+  rp: IROPackageAck;
+begin
+  fWaitingAckList.Lock;
+  try
+    for i := fWaitingAckList.Count -1 downto 0 do
+    begin
+      if IROPackageAck(fWaitingAckList[i]).AckNo = Id then
+      begin
+        rp := IROPackageAck(fWaitingAckList[i]);
+        rp.RemoveFromList;
+
+        rp.NoAckError := ErrorNo;
+        if Oke then
+          rp.AckState := rAck
+        else
+          rp.AckState := rNoAck;
+        rp.Event.SetEvent;
+        exit;
+      end;
+    end;
+  finally
+    fWaitingAckList.Unlock;
+  end;
+end;
+
+procedure TROSuperChannelWorker.SetSkipAck(const Value: Boolean);
+begin
+  fSkipAck := Value;
+end;
+
+procedure TROSuperChannelWorker.SupportsOptions;
+begin
+  if fSkipAck then SendOptions('SKIPACK'#13'ON');
+  fRemoteSupportsOptions := true;
+end;
+
+class procedure TROSuperChannelWorker.WaitForAck(pkg: IROPackageAck; Timeout: Integer = 60000);
+begin
+  try
+    if pkg.Event = nil then exit; // skipack
+
+    if pkg.Event.WaitFor(Timeout) <> wrSignaled then
+      raise EROTimeout.Create('Timeout');
+    if pkg.AckState <> rAck then
+    begin
+      case pkg.NoAckError of
+        ScCmdNoAck_MsgTooLarge: raise eROMessageTooLarge.Create('Message too large');
+      else
+        raise EROException.Create('Unknown error');
+      end;
+    end;
+  finally
+    pkg.RemoveFromList;
+  end;
+end;
+
+procedure TROSuperChannelWorker.BeginWriteLock;
+begin
+  fWriteLock.Acquire;
+end;
+
+procedure TROSuperChannelWorker.EndWriteLock;
+begin
+  fWriteLock.Release;
+end;
+
+function TROSuperChannelWorker.ReadStream(aDest: TStream; aLen: Integer): Boolean;
+var
+  Buf: array[0 .. 4096-1] of byte;
+  lRes: Integer;
+begin
+  aDest.Position := 0;
+  aDest.Size := 0;
+  while aLen > 0 do begin
+    lRes := aLen;
+    if lRes > sizeof(buf) then lRes := Sizeof(Buf);
+    {$IFDEF RemObjects_INDY10}
+    Indy10ReadBuffer(fConnection, Buf, lRes);
+    {$ELSE}
+    fConnection.ReadBuffer(Buf, lRes);
+    {$ENDIF}
+    aLen := aLen - lRes;
+    aDest.Write(Buf, lRes);
+    fLastData := now;
+  end;
+  Result := true;
+end;
+
+function TROSuperChannelWorker.GetDefaultResponse: string;
+begin
+  Result := 'ROSC:Invalid connection string';
+end;
+
+function TROSuperChannelWorker.Client_SendWelcome: Boolean;
+begin
+  Result:= False;
+  fConnection.{$IFDEF RemObjects_INDY10}IOHandler.{$ENDIF}Write(ScWelcome);
+  {$IFDEF RemObjects_INDY10}
+  Indy10WriteBuffer(fConnection, fClientID, sizeof(FClientID));
+  {$ELSE}
+  fConnection.WriteBuffer(fClientID, sizeof(fClientID));
+  {$ENDIF}
+  fConnection.{$IFDEF RemObjects_INDY10}IOHandler.Write{$ELSE}WriteInteger{$ENDIF}(fMaxPackageSize, false);
+
+  if fConnection.{$IFDEF RemObjects_INDY10}IOHandler.{$ENDIF}ReadString(6) <> ScWelcome then
+  begin
+    fConnection.{$IFDEF RemObjects_INDY10}IOHandler.{$ENDIF}Write(GetDefaultResponse);
+    fConnection.Disconnect;
+    Result := True;
+    exit;
+  end;
+  {$IFDEF RemObjects_INDY10}
+  Indy10ReadBuffer(fConnection, fClientID, Sizeof(fClientID));
+  {$ELSE}
+  fConnection.ReadBuffer(fClientID, Sizeof(fClientID));
+  {$ENDIF}
+  fOtherSideMaxPackageLen := fConnection.{$IFDEF RemObjects_INDY10}IOHandler.{$ENDIF}{$IFDEF RemObjects_INDY10C}ReadLongInt{$ELSE}ReadInteger{$ENDIF}(false);
+end;
+
+function TROSuperChannelWorker.GetOtherSideMaxPackageLen: integer;
+var
+  RestartLoop: boolean;
+begin
+  if (fOtherSideMaxPackageLen = 0) and not IsServer then begin
+    RestartLoop:= False;
+    Disconnected(RestartLoop);
+    Client_SendWelcome;
+  end;
+  Result := fOtherSideMaxPackageLen;
+end;
+
+{ TROPackageAck }
+
+constructor TROPackageAck.Create(aOwner: TROSuperChannelWorker; aId: Integer);
+begin
+  inherited Create;
+  if not (aOwner.fSkipAck and aOwner.fRemoteSupportsOptions) then
+  fEvent := TROEvent.Create(nil, true, false, '');
+  fAckNo := aId;
+  FOwner := aOwner;
+//  if FOwner <> nil then FOwner.fWaitingAckList.Add(Self as IROPackageAck);
+end;
+
+destructor TROPackageAck.Destroy;
+begin
+  fEvent.Free;
+  inherited;
+end;
+
+function TROPackageAck.GetAckNo: Integer;
+begin
+  result := fAckNo;
+end;
+
+function TROPackageAck.GetAckState: TROAckState;
+begin
+  Result := FAckState;
+end;
+
+function TROPackageAck.GetEvent: TROEvent;
+begin
+  Result := fEvent;
+end;
+
+function TROPackageAck.GetNoAckError: Integer;
+begin
+ Result := FAckNoError;
+end;
+
+{$ifndef fpc}
+function InterlockedExchangePointer(var Target: Pointer; Value: Pointer): Pointer;
+begin
+  Result := Pointer(InterlockedExchange(Integer(Target), Integer(Value)));
+end;
+{$else}
+function InterlockedExchangePointer(var Target: Pointer; Value: Pointer): Pointer;
+begin
+  {$IFDEF CPU64}
+  result := Pointer(InterlockedExchange64(PtrInt(target), PtrInt(value)));
+  {$ELSE}
+  result := Pointer(InterlockedExchange(PtrInt(target), PtrInt(value)));
+  {$ENDIF}
+end;
+{$endif}
+
+procedure TROPackageAck.RemoveFromList;
+var
+  lOwner: TROSuperChannelWorker;
+begin
+  lOwner := InterlockedExchangePointer(Pointer(FOwner), nil);
+  if lOwner <> nil then
+  begin
+    lOwner.fWaitingAckList.Remove(self as IROPackageAck);
+  //  lOwner := nil;
+  end;
+end;
+
+procedure TROPackageAck.SetAckState(I: TROAckState);
+begin
+  FAckState := I;
+end;
+
+procedure TROPackageAck.SetNoAckError(I: Integer);
+begin
+  FAckNoError := i;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSOAPMessage.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSOAPMessage.pas
new file mode 100644
index 0000000..4d6e034
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSOAPMessage.pas	
@@ -0,0 +1,1113 @@
+unit uROSOAPMessage;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes, Variants, uROClient, uROClientIntf, uROTypes, TypInfo, SysUtils, uROXMLIntf,
+  uROSerializer, uROXMLSerializer;
+
+type TAttribute = record
+       Name, Value : string;
+     end;
+
+const
+  EncodingStyle = 'http://schemas.xmlsoap.org/soap/encoding/';
+  EnvelopeStyle = 'http://schemas.xmlsoap.org/soap/envelope/';
+  TempURI = 'http://tempuri.org/';
+
+  Namespace_Env = 'env';
+
+  id_FaultCode   = 'faultcode';
+  id_FaultString = 'faultstring';
+  id_FaultActor  = 'faultactor';
+  id_FaultDetail = 'detail';
+  id_FaultCode12   = 'Code';
+  id_FaultString12 = 'Reason';
+  id_FaultDetail12 = 'Detail';
+
+  id_ClientID = 'ROClientID';
+
+  HeaderNameSpace = 'HNS';
+
+  Namespace_xsd = 'http://www.w3.org/2001/XMLSchema';
+  Namespace_xsi = 'http://www.w3.org/2001/XMLSchema-instance';
+  Namespace_soap11 = 'http://schemas.xmlsoap.org/soap/envelope/';
+  Namespace_soap12 = 'http://www.w3.org/2003/05/soap-envelope';
+  Namespace_soap12Alt = 'http://www.w3.org/2003/05/soap-envelope/';
+
+
+type
+  { Misc }
+  TROSOAPMessage = class;
+
+  TSOAPFaultEvent = procedure(const aFaultNode : IXMLNode;
+                              const aFaultCode, aFaultString, aFaultActor, aFaultDetail : string) of object;
+
+  TROEnvelopeCompleteEvent = procedure(Sender : TROSOAPMessage) of object;
+  TROAttributeWriteEvent = procedure(Sender : TROSOAPMessage; var AttributeName : string; var AttributeValue : variant; var CanWrite : boolean) of object;
+
+  { TROSOAPMessage }
+
+  IROSOAPMessage = interface(IROMessage)
+  ['{30F638D3-FD52-44D2-80D5-6A877F2877CE}']
+    function GetEnvNode : IXMLNode;
+    function GetBodyNode : IXMLNode;
+    function GetMessageNode: IXMLNode;
+    function GetFaultNode : IXMLNode;
+    function GetHeader : IXMLNode;
+    function GetLibraryName: string;
+
+    property EnvelopeNode : IXMLNode read GetEnvNode;
+    property BodyNode: IXMLNode read GetBodyNode;
+    property MessageNode: IXMLNode read GetMessageNode;
+    property FaultNode : IXMLNode read GetFaultNode;
+    property HeaderNode : IXMLNode read GetHeader;
+    property LibraryName: string read GetLibraryName;
+  end;
+
+  TROSoapMode = (sRPCEncoding, sRPCLiteral, sDocumentLiteral, sUnknown);
+  { TROSOAPMessage }
+  TROSOAPMessage = class(TROMessage, IROModuleInfo, IROSOAPMessage, IRONamedModuleInfo)
+  private
+    fXMLMessage : IXMLDocument;
+
+    fEnvNode,
+    fBodyNode,
+    fHeaderNode,
+    fMessageNode,
+    fFaultNode : IXMLNode;
+    fCustomLocation: string;
+
+    fOnSOAPFault: TSOAPFaultEvent;
+    fLibraryName: string;
+    fOnEnvelopeComplete: TROEnvelopeCompleteEvent;
+    fExceptionRemap: TStrings;
+
+    fSoapAction,
+    fServiceName,
+    fFaultNameSpace : string;
+    fOnWriteEnvelopeAttribute: TROAttributeWriteEvent;
+    fInputNamespace,
+    fOverrideInputName,
+    fOverrideOutputName: string;
+    fServerTargetNamespace, fTargetNamespace: string;
+    fTargetLocationWasSet: Boolean;
+    fOnAfterParseEnvelope,
+    fOnBeforeParseEnvelope: TNotifyEvent;
+    fNeedInit: Boolean;
+    fInitStr: string;
+
+    function ParseEnvelope : boolean;
+    function FindRemap(const s: string): string;
+    function GetHeader: IXMLNode;
+    function GetSerializationOptions: TROXMLSerializationOptions;
+    procedure SetSerializationOptions(const Value: TROXMLSerializationOptions);
+    procedure SetLibraryName(const Value: string);
+    function GetBodyNode: IXMLNode;
+    function GetEnvNode: IXMLNode;
+    function GetFaultNode: IXMLNode;
+    function GetMessageNode: IXMLNode;
+    function GetLibraryName: string;
+    function GetSoapMode: TROSoapMode;
+    procedure SetSoapMode(const Value: TROSoapMode);
+    function GetXMLMessage: IXMLDocument;
+  protected
+    { Internals }
+    procedure InitObject; override;
+    function CreateSerializer : TROSerializer; override;
+    function ReadException : Exception; override;
+    procedure WriteException(aStream : TStream; anException : Exception); override;
+
+    { IROMessage }
+    procedure Initialize(const aTransport : IROTransport; const anInterfaceName, aMessageName : string; aType: TMessageType); overload; override;
+    procedure Initialize(const aTransport : IROTransport; const aLibraryName, anInterfaceName, aMessageName : string; aType: TMessageType); overload; override;
+
+
+    procedure WriteAttribute(attrname: string; attrvalue: variant);
+    procedure Finalize; override;
+    procedure WriteToStream(aStream : TStream); override;
+    procedure ReadFromStream(aStream : TStream); override;
+
+    { IROModuleInfo }
+    procedure GetModuleInfo(aStream : TStream; const aTransport : IROTransport; var aFormat : TDataFormat); override;
+
+    function ModuleInfoName: string;
+    procedure InitializeExceptionMessage(const aTransport: IROTransport;
+      const aLibraryName: String; const anInterfaceName: String;
+      const aMessageName: String); override;
+
+    procedure SetAttributes(aTransport: IROTransport;
+      const aNames: array of String; const aValues: array of String); override;
+    procedure UnsetAttributes(aTransport: IROTransport);  override;
+    procedure InitializeRead(const aTransport: IROTransport); override;
+  public
+    destructor Destroy; override;
+
+    property EnvelopeNode : IXMLNode read GetEnvNode;
+    property BodyNode: IXMLNode read GetBodyNode;
+    property MessageNode: IXMLNode read GetMessageNode;
+    property FaultNode : IXMLNode read GetFaultNode;
+    property HeaderNode : IXMLNode read GetHeader;
+
+    procedure Assign(iSource:TPersistent); override;
+    property LibraryName : string read GetLibraryName write SetLibraryName;
+    function IsValidMessage(aData: PAnsiChar; aLength: Integer): boolean; override;
+  published
+    property CustomLocation : string read fCustomLocation write fCustomLocation;
+    property ServerTargetNamespace : string read fServerTargetNamespace write fServerTargetNamespace;
+    property SerializationOptions : TROXMLSerializationOptions read GetSerializationOptions write SetSerializationOptions;
+    property OnSOAPFault : TSOAPFaultEvent read fOnSOAPFault write fOnSOAPFault;
+    property OnEnvelopeComplete : TROEnvelopeCompleteEvent read fOnEnvelopeComplete write fOnEnvelopeComplete;
+    property OnWriteEnvelopeAttribute : TROAttributeWriteEvent read fOnWriteEnvelopeAttribute write fOnWriteEnvelopeAttribute;
+    property OnAfterParseEnvelope: TNotifyEvent read fOnAfterParseEnvelope write fOnAfterParseEnvelope;
+    property OnBeforeParseEnvelope: TNotifyEvent read fOnBeforeParseEnvelope write fOnBeforeParseEnvelope;
+    property SoapMode: TROSoapMode read GetSoapMode write SetSoapMode stored false;
+  end;
+
+
+implementation
+
+uses {$IFDEF DELPHI5}ComObj,{$ENDIF} // for StringToGuid and vice-versa
+     uRORes, uRODL, uRODLToXML, uRODLToWSDL, uROHTTPTools, uROClasses;
+
+{ TROSOAPMessage }
+procedure TROSOAPMessage.InitObject;
+begin
+  inherited;
+  fServerTargetNamespace := '';
+  fXMLMessage := NewROXmlDocument;
+  fNeedInit:= True;
+  fInitStr:=tag_Envelope;
+//  fXMLMessage.New(tag_Envelope);
+  fExceptionRemap := TStringList.Create;
+end;
+
+procedure TROSOAPMessage.Initialize(const aTransport : IROTransport; const anInterfaceName, aMessageName: string; aType: TMessageType);
+var
+  lInterfaceName,
+  lMessageName: String;
+  lHttp: IROHTTPTransport;
+begin
+  inherited;
+  fHeaderNode := nil;
+  fNeedInit:= True;
+  fInitStr:=ns_Envelope+ AnsiChar(':')+tag_Envelope;
+
+//  fXMLMessage.New(ns_Envelope+':'+tag_Envelope);
+  if fServerTargetNamespace = '' then begin
+    fServerTargetNamespace := GetServiceAttribute('', 'TargetNamespace');
+    if fServerTargetNamespace = '' then
+      fServerTargetNamespace := TempURI;
+  end;
+  if ((aType = mtResponse) or (aType = mtRequest)) and (fTargetNamespace = '') then begin
+    fTargetNamespace := fServerTargetNamespace;
+  end;
+  if (xsoDocument in SerializationOptions) then begin
+    if fInputNamespace <> '' then
+      lInterfaceName := fInputNamespace
+    else
+    if fTargetNamespace <> '' then
+      lInterfaceName := fTargetNamespace
+    else begin
+      if xsoDocument in SerializationOptions then
+        lInterfaceName := LibraryName
+      else
+      lInterfaceName := anInterfaceName;
+    end;
+  end else
+    lInterfaceName := LibraryName +'-'+InterfaceName;
+
+  if fSoapAction = '' then begin
+    fSoapAction :=Format('urn:%s-%s#%s', [LibraryName, anInterfaceName, aMessageName]);
+    if Supports(aTransport, IROHttpTransport, lHttp) then
+      lHttp.Headers['SOAPAction'] := '"'+fSoapAction +'"';
+  end;
+
+
+  if xsoSoap12 in SerializationOptions then begin
+    SetHTTPInfo(aTransport, 'application/soap+xml; charset=utf-8; action='+fSoapAction);
+  end else
+    SetHTTPInfo(aTransport, DataFormatXml);
+
+  fEnvNode := GetXMLMessage.DocumentNode;
+
+
+  WriteAttribute('xmlns:xsd', Namespace_xsd);
+  WriteAttribute('xmlns:xsi', Namespace_xsi);
+  WriteAttribute('xmlns:HNS', TempURI);
+  if not (xsoSendUntyped in SerializationOptions) then
+    WriteAttribute('xmlns:SOAP-ENC', EncodingStyle);
+  if xsoSoap12 in SerializationOptions then
+    WriteAttribute('xmlns:SOAP-ENV', Namespace_soap12)
+  else
+    WriteAttribute('xmlns:SOAP-ENV', Namespace_soap11);
+
+  { Sets variables for easier access in the other methods }
+  fHeaderNode := fEnvNode.Add(ns_Envelope+':'+tag_Header);
+
+  fBodyNode := fEnvNode.Add(ns_Envelope+':'+tag_Body);
+  if not (xsoDocument in SerializationOptions) then
+    fBodyNode.AddAttribute('SOAP-ENV:encodingStyle', EncodingStyle, False);
+  //fBodyNode.AddAttribute('xmlns:'+ns_Custom, 'urn:'+{TempURI}lInterfacename, False);
+  if (LibraryName = '') then LibraryName := 'DefaultLibrary';
+  if Pos(':', LibraryName) = 0 then LibraryName := 'urn:'+LibraryName;
+  fBodyNode.AddAttribute('xmlns:'+ns_Custom, LibraryName{TempURI}, False);
+
+  lMessageName := Unprefix(aMessageName); // when document & literal are true
+  if xsoDocument in SerializationOptions then begin
+    if (aType = mtRequest) then begin
+      if fOverrideInputName = '' then
+        lMessageName := anInterfaceName+'___'+lMessageName
+      else
+        lMessageName := fOverrideInputName;
+    end else if (aType = mtResponse) then begin
+      if fOverrideOutputName = '' then
+        lMessageName := anInterfaceName+'___'+lMessageName
+      else
+        lMessageName := fOverrideOutputName;
+    end;
+  end;
+
+  if Pos(':', lInterfaceName) = 0 then lInterfaceName := 'urn:'+lInterfaceName;
+
+  if not (xsoSendUntyped in SerializationOptions) then begin
+    if copy(lMessageName,1,4)='urn:' then Delete(lMessageName, 1,4);
+    fMessageNode := fBodyNode.Add('NS1:'+lMessageName);
+
+    fMessageNode.AddAttribute('xmlns:NS1', {'urn:' + } lInterfaceName, False);
+  end
+  else begin
+    (Serializer as TROXMLSerializer).CurrentNamespace := lInterfaceName;
+    fMessageNode := fBodyNode.Add((Serializer as TROXMLSerializer).Prefix+':'+lMessageName, lInterfaceName);
+
+//    fMessageNode.AddAttribute('xmlns', lInterfacename, False);
+  end;
+
+  (Serializer as TROXMLSerializer).SetStorageRef(pointer(fMessageNode));
+end;
+
+procedure TROSOAPMessage.Initialize(const aTransport: IROTransport;
+  const aLibraryName, anInterfaceName, aMessageName: string; aType: TMessageType);
+begin
+  LibraryName := aLibraryName;
+  Initialize(aTransport, anInterfaceName, aMessageName, aType);
+end;
+
+procedure TROSOAPMessage.Finalize;
+begin
+  inherited;
+  fSoapAction := '';
+end;
+function TROSOAPMessage.ReadException : Exception;
+var faultcode, faultstring, faultactor, faultdetail : string;
+    node, detailnode : IXMLNode;
+    lexceptclass, exceptfield, exnme : string;
+    tmp: Exception;
+    //isroexception : boolean;
+    exclass : ExceptionClass;
+begin
+  result := NIL;
+
+  if Assigned(fFaultNode) then begin
+    node := fFaultNode.GetNodeByName(id_FaultCode);
+    if not Assigned(node) then node := fFaultNode.GetNodeByName(id_FaultCode12);
+
+    if Assigned(node)
+      then faultcode := node.Value
+      else faultcode := '';
+
+    exnme := faultcode;
+
+    node := fFaultNode.GetNodeByName(id_FaultString);
+    if not Assigned(node) then node := FindChildNode(fFaultNode, id_FaultString, -1, true);
+    if not Assigned(node) then fFaultNode.GetNodeByName(id_FaultString12);
+    if not Assigned(node) then node := FindChildNode(fFaultNode, id_FaultString12, -1, true);
+    if Assigned(node) then faultstring := node.Value else faultstring := '';
+
+    node := fFaultNode.GetNodeByName(id_FaultActor);
+    if not Assigned(node) then node := FindChildNode(fFaultNode, id_FaultActor, -1, true);
+    if Assigned(node) then faultactor := node.Value else faultactor := '';
+
+    detailnode := fFaultNode.GetNodeByName(id_FaultDetail);
+    if not Assigned(detailnode) then detailnode := FindChildNode(fFaultNode, id_FaultDetail, -1, true);
+    if not Assigned(detailnode) then detailnode := fFaultNode.GetNodeByName(id_FaultDetail12);
+    if not Assigned(detailnode) then detailnode := FindChildNode(fFaultNode, id_FaultDetail12, -1, true);
+    if Assigned(detailnode) then faultdetail := detailnode.Value else faultdetail := '';
+
+    if Assigned(fOnSOAPFault)
+      then fOnSOAPFault(fFaultNode, faultcode, faultstring, faultactor, faultdetail);
+
+    if detailnode = nil then
+      node := nil
+    else
+      node := detailnode.FirstChild;
+    while (node <> nil) and (node.Name = '#text') do
+      node := node.NextSibling;
+    if node <> nil then
+      exceptfield := node.LocalName
+    else
+      exceptfield := name_Exception;
+
+    lexceptclass := fExceptionRemap.Values[exceptfield];
+    if lexceptclass <> '' then
+      result := CreateException(lexceptclass, faultstring)
+    else
+      result := CreateException(exnme, faultstring);
+
+    if Result <> nil then
+      exclass := ExceptionClass(result.ClassType)
+    else
+      exclass := nil;
+
+    if (exclass <> nil) and (exclass.InheritsFrom(EROException) and (detailnode<>NIL) and (detailnode.ChildrenCount > 0)) then begin
+      tmp := result;
+      // It must have a detail in which the fields of the exception are serialized
+      with TROXMLSerializer.Create(pointer(detailnode)) do try
+        SerializationOptions := self.SerializationOptions;
+        Read(exceptfield, result.ClassInfo, tmp);
+      finally
+        Free;
+      end;
+    end;
+  end;
+end;
+
+procedure TROSOAPMessage.WriteException(aStream : TStream; anException : Exception);
+var
+    fault, faultcode, faultstring, detail : IXMLNode;
+   
+begin
+  fHeaderNode := nil;
+  fNeedInit:=True;
+  fInitStr:=ns_Envelope+AnsiChar(':')+tag_Envelope;
+//  fXMLMessage.New(ns_Envelope+':'+tag_Envelope);
+//  if (aType = mtResponse) and (fTargetNamespace = '') then fTargetNamespace := fServerTargetNamespace;
+(*  if fInputNamespace <> '' then
+    lInterfaceName := fInputNamespace
+  else
+  if fTargetNamespace <> '' then
+    lInterfaceName := fTargetNamespace
+  else begin
+    if xsoDocument in SerializationOptions then
+      lInterfaceName := LibraryName
+    else
+    lInterfaceName := fTargetNamespace;
+  end;
+*)
+  if fServerTargetNamespace = '' then begin
+    fServerTargetNamespace := GetServiceAttribute('', 'TargetNamespace');
+    if fServerTargetNamespace = '' then
+      fServerTargetNamespace := TempURI;
+  end;
+
+  fEnvNode := GetXMLMessage.DocumentNode;
+
+  WriteAttribute('xmlns:xsd', Namespace_xsd);
+  WriteAttribute('xmlns:xsi', Namespace_xsi);
+  WriteAttribute('xmlns:HNS', TempURI);
+  if not (xsoSendUntyped in SerializationOptions) then
+    WriteAttribute('xmlns:SOAP-ENC', EncodingStyle);
+  if xsoSoap12 in SerializationOptions then
+    WriteAttribute('xmlns:SOAP-ENV', Namespace_soap12)
+  else
+    WriteAttribute('xmlns:SOAP-ENV', Namespace_soap11);
+
+  { Sets variables for easier access in the other methods }
+  fHeaderNode := fEnvNode.Add(ns_Envelope+':'+tag_Header);
+
+
+  fBodyNode := fEnvNode.Add(ns_Envelope+':'+tag_Body);
+  if not (xsoDocument in SerializationOptions) then fBodyNode.AddAttribute('SOAP-ENV:encodingStyle', EncodingStyle, False);
+  //fBodyNode.AddAttribute('xmlns:'+ns_Custom, 'urn:'+{TempURI}lInterfacename, False);
+  if (LibraryName = '') then LibraryName := 'DefaultLibrary';
+  if Pos(':', LibraryName) = 0 then LibraryName := 'urn:'+LibraryName;
+  fBodyNode.AddAttribute('xmlns:'+ns_Custom, LibraryName{TempURI}, False);
+
+  fault := fBodyNode.Add(ns_Envelope+':'+tag_Fault);
+
+  if xsoSoap12 in SerializationOptions then
+    faultcode := fault.Add(id_FaultCode12)
+  else
+    faultcode := fault.Add(id_FaultCode);
+  faultcode.Value := (anException.ClassName);
+
+  if xsoSoap12 in SerializationOptions then
+    faultstring := fault.Add(id_FaultString12)
+  else
+    faultstring := fault.Add(id_FaultString);
+  faultstring.Value := (anException.Message);
+  if (anException is EROException) then begin
+    detail := fault.Add(id_FaultDetail);
+    with TROXMLSerializer.Create(pointer(detail)) do try
+      if fServerTargetNamespace <> '' then
+        CurrentNamespace := fServerTargetNamespace;
+
+      SerializationOptions := self.SerializationOptions;
+      Write(name_Exception, anException.ClassInfo, anException);
+    finally
+      Free;
+    end;
+  end;
+
+  WriteToStream(aStream);
+  inherited;
+end;
+
+procedure TROSOAPMessage.ReadFromStream(aStream: TStream);
+var
+  encryptedheader: array[0..5] of char;
+begin
+  inherited;
+
+  aStream.Position := 0;
+
+  try
+    fInitStr:='';
+    fNeedInit:=True;
+//    fXMLMessage.New;
+
+    GetXMLMessage.LoadFromStream(aStream);
+
+  except
+    on e: Exception do begin
+      // If something went wrong we recreate it because fXMLMessage is expected to be instantiated.
+      fXMLMessage:=nil;
+      if (fXMLMessage=NIL)
+        then begin
+          fXMLMessage := NewROXmlDocument;
+          fInitStr:='';
+          fNeedInit:=True;
+          //fXMLMessage.New;
+        end;
+
+      aStream.Position := 0;
+      aStream.Read(encryptedheader, 6);
+      if (encryptedheader[0] = 'r') and (encryptedheader[1] = 'o') and
+        (encryptedheader[2] = 'r') and (encryptedheader[3] = 'o') and
+        (encryptedheader[4] = 'c') and (encryptedheader[5] = 'k') then
+      RaiseInvalidStreamError(err_InvalidHeaderEncrypted, [], aStream);
+
+      raise EROException.Create('Cannot parse SOAP error: '+e.Message);
+    end;
+  end;
+  if not ParseEnvelope then ProcessException; // In case there's one
+end;
+
+function TROSOAPMessage.ParseEnvelope : boolean;
+var localname,
+    namespace  : string;
+    i, k : integer;
+    item, item2 : IXMLNode;
+    cidnode : IXMLNode;
+begin
+
+  fBodyNode := NIL;
+  fHeaderNode := NIL;
+  fMessageNode := NIL;
+  fFaultNode := NIL;
+  fEnvNode := GetXMLMessage.DocumentNode;
+
+
+  if assigned(fOnBeforeParseEnvelope) then fOnBeforeParseEnvelope(self);
+  { Checks the document is non empty and that the main tag is a tag_Envelope (required by SOAP spec) }
+  SplitNodeName(fEnvNode, namespace, localname);
+  if (localname<>tag_Envelope)
+    then RaiseError(err_InvalidEnvelope, [inf_InvalidEnvelopeNode]);
+  if (fEnvNode.NamespaceURI = Namespace_soap12Alt) or (fEnvNode.NamespaceURI = Namespace_soap12) then
+    SerializationOptions := SerializationOptions + [xsoSoap12]
+  else
+    SerializationOptions := SerializationOptions - [xsoSoap12];
+
+  { Loads the nodes in the Body.
+    I am intentionally not picky in the position of BODY and HEADER tags. Specs say HEADER should be first if present and
+    BODY second. I just ignore this because requirement. It seems to be a totally useless detail. }
+
+  //SetClientID(EmptyGUID);
+
+  for i := 0 to (fEnvNode.ChildrenCount-1) do begin
+    item := fEnvNode.Children[i];
+
+    SplitNodeName(item, namespace, localname);
+    // Body
+    if (localname=tag_Body) then begin
+      fBodyNode := item;
+
+      { Loads the FAULT or BODY.
+        Althought the spec say you might have multiple BODY blocks I only consider one for now.
+        I might change this in the future if an issue arises with this decision.
+        If there ar multiple FAULTs or multiple BODYs the last one is the considered one }
+
+      for k := 0 to (fBodyNode.ChildrenCount-1) do begin
+        item2 := fBodyNode.Children[k];
+
+        SplitNodeName(item2, namespace, localname);
+        if (localname='#text') then Continue;
+
+        if (localname=tag_Fault) then begin
+          fFaultNameSpace := namespace;
+          fFaultNode := item2;
+          fMessageNode := fFaultNode;
+          Break;
+        end
+        else begin
+          fMessageNode := item2;
+          Break;
+        end;
+      end;
+    end
+
+    // Header
+    else if (localname=tag_Header) then begin
+      fHeaderNode := item;
+
+      for k := 0 to (fHeaderNode.ChildrenCount-1) do begin
+        cidnode := fHeaderNode.Children[k];
+        SplitNodeName(cidnode, namespace, localname);
+
+        if (localname = 'ROClientIDHeader') then begin
+          cidnode := FindChildNode(cidnode, 'ID', -1, true);
+          if (cidnode <> nil) and (VarToStr(cidnode.Value) <> '') then
+            SetClientID(StringToGuid(cidnode.Value));
+        end else
+        if (localname=id_ClientID) then begin
+          if (cidnode.Value<>'')
+            then SetClientID(StringToGUID(cidnode.Value));
+
+          Break;
+        end;
+      end;
+      //else SetClientID(EmptyGUID);
+    end;
+  end;
+
+  if not Assigned(fBodyNode) then RaiseError(err_InvalidEnvelope, [inf_AbsentBody]);
+  if not Assigned(fMessageNode) then RaiseError(err_InvalidEnvelope, [inf_AbsentMessage]);
+
+  // Determines the interface and message name
+
+  result := not Assigned(fFaultNode);
+  if result then begin
+    //xmlns:NS1="ITestService"
+//    if (fMessageNode.AttributeCount>0) then begin
+//      localname := '';
+//
+//      for i := 0 to (fMessageNode.AttributeCount-1) do
+//        if (Pos('urn:', fMessageNode.Attributes[i].Value)=1) then begin
+//          localname := fMessageNode.Attributes[i].Value;
+//          Break;
+//        end;
+//
+//      if (localname='')
+//        then localname := fMessageNode.Attributes[0].Value;
+//
+//      libraryname := Copy(localname, pos(':', localname) + 1, pos('-', localname) - 1 - pos(':', localname));
+//      Delete(localname, 1, Pos('-', localname)); // urn:SOAPLibrary-SOAPService
+//
+//      interfacename := localname;
+//    end;
+    MessageName := '';
+    LibraryName := '';
+    InterfaceName := fServiceName;
+
+    if fSoapAction <> '' then begin
+      localname := fSoapAction;
+      if localname[1] = '"' then deletE(Localname, 1,1);
+      if (localname <> '') and (localname[Length(LocalName)] = '"') then deletE(Localname, Length(LocalName),1);
+
+      if fServiceName <> '' then begin
+        MessageName := FindRemap(localname);
+        if MessageName <> '' then begin
+          LibraryName := fMessageNode.NamespaceURI;
+          if LibraryName = '' then
+            LibraryName:= fBodyNode.NamespaceURI;
+          if LibraryName = '' then
+            LibraryName := fEnvNode.NamespaceURI;
+        end;
+      end;
+
+      if MessageName = '' then begin
+        if pos(':', localname) <> 0 then delete(localname, 1, pos(':', localname));
+        if (pos('-', localname) > 0) and (pos('#', localname) > 0) then begin
+          LibraryName := copy(LocalName, 1, pos('-', LocalName) -1);
+          Delete(localname, 1, pos('-', localname));
+          InterfaceName := copy(LocalName, 1, pos('#', LocalName) -1);
+          Delete(localname, 1, pos('#', localname));
+          MessageName := localname;
+        end;
+      end;
+    end else
+    if (xsoDocument in SerializationOptions) and (pos('___', fMessageNode.LocalName) > 0) then begin
+      localname := fMessageNode.LocalName;
+
+      InterfaceName := copy(localname, 1, pos('___', localname)-1);
+      MessageName := copy(localname, pos('___', localname)+3, MaxInt);
+      LibraryName := fMessageNode.NamespaceURI;
+    end;
+
+
+    if (MessageName = '') or (InterfaceName = '') or (LibraryName = '') then begin
+      localname := '';
+
+    if copy(fMessageNode.NamespaceURI, 1, 4) = 'urn:' then
+      localname := Copy(fMessageNode.NamespaceURI, 5, Maxint)
+    else if copy(fBodyNode.NamespaceURI, 1, 4) = 'urn:' then
+      localname := Copy(fBodyNode.NamespaceURI, 5, Maxint)
+    else if copy(fEnvNode.NamespaceURI, 1, 4) = 'urn:' then
+      localname := Copy(fEnvNode.NamespaceURI, 5, Maxint)
+    else if copy(fMessageNode.NamespaceURI, 1, 4) = 'urn:' then
+      localname := Copy(fMessageNode.NamespaceURI, 5, Maxint);
+
+
+      if (localname='') and (fMessageNode.AttributeCount > 0)
+        then localname := fMessageNode.Attributes[0].Value;
+
+      libraryname := Copy(localname, pos(':', localname) + 1, pos('-', localname) - 1 - pos(':', localname));
+
+      InterfaceName := localname;
+      if (Pos('-', localname)>0) then begin
+        Delete(localname, 1, Pos('-', localname)); // urn:SOAPLibrary-SOAPService
+        InterfaceName := localname;
+      end
+      else begin
+        if localname <> '' then
+          InterfaceName := localname
+        else
+        if (fMessageNode.AttributeCount>0) // Tries to extract it from the node that contains the method name
+          then InterfaceName := fMessageNode.Attributes[0].Value;
+      end;
+
+      SplitNodeName(fMessageNode, namespace, localname);
+      if (xsoDocument in SerializationOptions) and (Pos('___', localname) > 0) then begin
+        InterfaceName := copy(localname, 1, Pos('___', localname)-1);
+        MessageName := Copy(localname, Pos('___', localname)+3, MaxInt);
+      end else begin
+        if (xsoDocument in SerializationOptions) and (Copy(localname, 1, Length(InterfaceName)+1) = InterfaceName+'_') then begin
+          Delete(localname, 1, Length(InterfaceName) + 1);
+          if copy(localname, Length(LocalName)-1, 2) = 'In' then
+            Delete(localname, Length(LocalName) -1, 2);
+          if copy(localname, Length(LocalName)-2, 3) = 'Out' then
+            Delete(localname, Length(LocalName) -2, 3);
+        end;
+        MessageName := localname;
+      end;
+      if fServiceName <> '' then InterfaceName := fServiceName;
+    end;
+
+    (Serializer as TROXMLSerializer).SetStorageRef(pointer(fMessageNode));
+
+    if assigned(fOnAfterParseEnvelope) then fOnAfterParseEnvelope(self);
+  end;
+end;
+
+procedure TROSOAPMessage.WriteToStream(aStream: TStream);
+begin
+  if xsoDocument in SerializationOptions then begin
+    with HeaderNode.Add('ROClientIDHeader') do begin
+      AddAttribute('SOAP-ENV:mustUnderstand', 0, False);
+      if (pos(':', LibraryName) <> 0) then
+        AddAttribute('xmlns', LibraryName, False)
+      else
+        AddAttribute('xmlns', 'urn:' + LibraryName, False);
+      Add('ID').Value := GUIDToString(GetClientID);
+    end;
+  end else begin
+    with HeaderNode.Add(HeaderNameSpace+':'+id_ClientID) do begin
+      AddAttribute('SOAP-ENV:mustUnderstand', 0, False);
+      Value := GUIDToString(GetClientID);
+    end;
+  end;
+
+  if Assigned(fOnEnvelopeComplete)
+    then fOnEnvelopeComplete(Self);
+
+  GetXMLMessage.SaveToStream(aStream);
+
+  inherited;
+end;
+
+procedure TROSOAPMessage.GetModuleInfo(aStream : TStream; const aTransport : IROTransport; var aFormat : TDataFormat);
+var lib : TRODLLIbrary;
+    wsdl : TRODLToWSDL;
+    http : IROHTTPTransport;
+    i : Integer;
+    s, targetservice : string;
+begin
+  lib := NIL;
+  targetservice := '';
+
+  inherited GetModuleInfo(aStream, aTransport, aFormat); // Sets ContentType for HTTP transports already
+
+  aFormat := DataFormatXml;
+
+  try
+    with TXMLToRODL.Create do try
+      lib := Read(aStream);
+    finally
+      Free;
+    end;
+
+    wsdl := TRODLToWSDL.Create(NIL);
+    try
+      if Supports(aTransport, IROHTTPTransport, http) then begin
+        targetservice := http.GetQueryParameter('service');
+      end;
+
+      if (Trim(CustomLocation)='') then begin
+        if (http<>NIL)
+          then wsdl.Location := http.Location+http.PathInfo;
+      end
+      else wsdl.Location := CustomLocation;
+      if (targetservice = '') and assigned(http) then begin
+        wsdl.TargetXsd := http.GetQueryParameter('xsd');
+      end;
+      wsdl.ExternalTypesAsReferences := xsoExternalTypesAsReferences in SerializationOptions;
+      wsdl.UseDocument := xsoDocument in SerializationOptions;
+      wsdl.UseLiteral := xsoSendUntyped in SerializationOptions;
+      wsdl.ShowClientId := xsoClientIdInWsdl in SerializationOptions;
+      if fServerTargetNamespace = '' then begin
+        fServerTargetNamespace := GetServiceAttribute('', 'TargetNamespace');
+        if fServerTargetNamespace = '' then
+          fServerTargetNamespace := TempURI;
+      end;
+      wsdl.TargetNamespace := ServerTargetNamespace;
+
+      if (lib.ServiceCount > 1) and (TargetService = '') and (xsoSplitServiceWsdls in SerializationOptions) then begin
+        aFormat := 'text/html';
+        aStream.Position := 0;
+        aStream.Size := 0;
+        s := '<html>'#13#10'<head>'#13#10'<title>'+lib.Name+'</title>'#13#10'</head>'#13#10'<body>'#13#10'<p><font size="7">';
+        s := s + lib.Name +'</font></p>'#13#10'<p>The following services are supported:</p><ul>';
+        for i := 0 to lib.ServiceCount -1 do
+          s := s + '<li><a href="'+fCustomLocation+'?service='+lib.Services[i].Name+'">'+lib.Services[i].Name+'</a></li>'#13#10;
+        s := s + '</ul></body></html>';
+        aStream.Write(s[1], length(s));
+        exit;
+      end;
+      http := NIL; // Clean up. Don't remove!
+
+      try
+      wsdl.Convert(lib, targetservice);
+      except
+        on e: Exception do begin
+          aFormat := 'text/html';
+          s := '<html><head><title>Error</title></head><body><font size=7>Error</font><br />An error occured generating WSDL: '+e.Message+'</body></html>';
+          aStream.Position := 0;
+          aStream.Size := 0;
+          aStream.Write(s[1], Length(S));
+          exit;
+        end;
+      end;
+      aStream.Position := 0;
+      aStream.Size := 0;
+      wsdl.Buffer.SaveToStream(aStream);
+    finally
+      wsdl.Free;
+    end;
+  finally
+    if Assigned(lib) then
+      lib.Free;
+  end;
+end;
+
+function TROSOAPMessage.GetHeader: IXMLNode;
+begin
+  // Services like the Amazon one just don't accept empty headers (or don't know how to handle them).
+  // Because of this I just create it on demand.
+
+  if (fHeaderNode=NIL) then begin
+    {fHeaderNode := fXMLMessage.createElement(tag_Header);
+    fEnvNode.insertBefore(fHeaderNode, fBodyNode);}
+    fHeaderNode := fEnvNode.Add(tag_Header);
+  end;
+
+  result := fHeaderNode;
+end;
+
+function TROSOAPMessage.CreateSerializer : TROSerializer;
+begin
+  result := TROXMLSerializer.Create(pointer(fMessageNode));
+end;
+
+function TROSOAPMessage.GetSerializationOptions: TROXMLSerializationOptions;
+begin
+  result := TROXMLSerializer(Serializer).SerializationOptions
+end;
+
+procedure TROSOAPMessage.SetSerializationOptions(
+  const Value: TROXMLSerializationOptions);
+begin
+  TROXMLSerializer(Serializer).SerializationOptions := Value
+end;
+
+procedure TROSOAPMessage.Assign(iSource: TPersistent);
+var lSource:TROSOAPMessage;
+begin
+  inherited;
+  if Assigned(iSource) then begin
+
+    if not (iSource is TROSOAPMessage) then RaiseError('Cannot Assign a %s t a %s',[ClassName,iSource.ClassName]);
+
+    lSource := (iSource as TROSOAPMessage);
+    self.CustomLocation := lSource.CustomLocation;
+    self.SerializationOptions := lSource.SerializationOptions;
+    self.OnSOAPFault := lSource.OnSOAPFault;
+    self.OnEnvelopeComplete := lSource.OnEnvelopeComplete;
+    self.OnWriteEnvelopeAttribute := lSource.OnWriteEnvelopeAttribute;
+    Self.OnAfterParseEnvelope := lSource.OnAfterParseEnvelope;
+    self.ServerTargetNamespace := lSource.ServerTargetNamespace;
+  end;
+end;
+
+procedure TROSOAPMessage.SetLibraryName(const Value: string);
+begin
+  fLibraryName := Value;
+end;
+
+function TROSOAPMessage.GetBodyNode: IXMLNode;
+begin
+  result := fBodyNode
+end;
+
+function TROSOAPMessage.GetEnvNode: IXMLNode;
+begin
+  result := fEnvNode
+end;
+
+function TROSOAPMessage.GetFaultNode: IXMLNode;
+begin
+  result := fFaultNode
+end;
+
+function TROSOAPMessage.GetMessageNode: IXMLNode;
+begin
+  result := fMessageNode
+end;
+
+function TROSOAPMessage.GetLibraryName: string;
+begin
+  result := fLibraryName
+end;
+
+destructor TROSOAPMessage.Destroy;
+begin
+  fExceptionRemap.Free;
+  inherited;
+end;
+
+function TROSOAPMessage.ModuleInfoName: string;
+begin
+  Result := 'wsdl';
+end;
+
+procedure TROSOAPMessage.InitializeExceptionMessage(
+  const aTransport: IROTransport; const aLibraryName, anInterfaceName,
+  aMessageName: String);
+begin
+  inherited;
+  SetHTTPInfo(aTransport, DataFormatXml);
+end;
+
+
+function TROSOAPMessage.IsValidMessage(aData: PAnsiChar;
+  aLength: Integer): boolean;
+var
+  str: AnsiString;
+begin
+  SetString(str, aData, aLength);
+  Result := Pos(ns_Envelope_tag_Envelope_Ansi, str) > 0;
+end;
+
+
+function TROSOAPMessage.GetSoapMode: TROSoapMode;
+begin
+  if xsoDocument in SerializationOptions then begin
+    if (xsoSendUntyped in SerializationOptions) and ([xsoWriteMultiRefArray, xsoWriteMultiRefObject, xsoEncodedXML] * SerializationOptions = []) then
+      result := sDocumentLiteral
+    else
+      result := sUnknown;
+  end else begin
+    if xsoSendUntyped in SerializationOptions then
+      result := sRPCLiteral
+    else
+      result := sRPCEncoding;
+  end;
+end;
+
+procedure TROSOAPMessage.SetSoapMode(const Value: TROSoapMode);
+begin
+  case Value of
+    sRPCEncoding:
+      begin
+        SerializationOptions := SerializationOptions - [xsoSendUntyped, xsoDocument];
+        SerializationOptions := SerializationOptions + [xsoWriteMultiRefArray, xsoWriteMultiRefObject, xsoEncodedXML];
+      end;
+    sRPCLiteral:
+      begin
+        SerializationOptions := SerializationOptions + [xsoSendUntyped];
+        SerializationOptions := SerializationOptions - [xsoWriteMultiRefArray, xsoWriteMultiRefObject, xsoEncodedXML, xsoDocument];
+      end;
+    sDocumentLiteral:
+      begin
+        SerializationOptions := SerializationOptions + [xsoSendUntyped, xsoDocument];
+        SerializationOptions := SerializationOptions - [xsoWriteMultiRefArray, xsoWriteMultiRefObject, xsoEncodedXML];
+      end;
+  end;
+end;
+
+procedure TROSOAPMessage.SetAttributes(aTransport: IROTransport;
+  const aNames, aValues: array of String);
+var
+  lStyle,
+  lUse,
+  lAction,
+  lTargetUrl: string;
+  aHttp: IROHTTPTransport;
+
+  i: Integer;
+begin
+  fTargetLocationWasSet := False;
+  for i := 0 to Length(aNames) -1 do begin
+    if copy(aNames[i], 1, 6) = 'fault_' then begin
+      fExceptionRemap.Add(copy(aNames[i], 7, MAxInt)+'='+avalues[I]);
+    end else
+    if aNames[i] = 'InputNamespace' then
+      fInputNamespace := aValues[i]
+    else if aNames[i] = 'Action' then
+      lAction := aValues[i]
+    else if aNames[i] = 'Location' then
+      lTargetUrl := aValues[i]
+    else if aNames[i] = 'Style' then
+      lStyle := aValues[i]
+    else if aNames[i] = 'Use' then
+      lUse := aValues[i]
+    else if aNames[i] = 'SOAPInputNameOverride' then
+      fOverrideInputName := aValues[i]
+    else if aNames[i] = 'SOAPOutputNameOverride' then
+      fOverrideOutputName := aValues[i]
+    else if aNames[i] = 'TargetNamespace' then
+      fTargetNamespace := aValues[i]
+    else if aNames[i] = 'Version' then begin
+      if (aValues[i] = '1.2') then
+        SerializationOptions := SerializationOptions + [xsoSoap12]
+      else
+        SerializationOptions := SerializationOptions - [xsoSoap12];
+    end;
+  end;
+  if (lUse = 'literal') then begin
+    if lStyle = 'document' then
+      SetSoapMode(sDocumentLiteral)
+    else if lStyle <> '' then
+      SetSoapMode(sRPCLiteral);
+  end else if lUse <> '' then begin
+    SetSoapMode(sRPCEncoding);
+  end;
+  if Supports(aTransport, IROHTTPTransport, aHttp) then begin
+    fTargetLocationWasSet := aHttp.TargetURL = '';
+    fSoapAction := lAction;
+      aHttp.Headers['SOAPAction'] := '"'+lAction+'"';
+    if fTargetLocationWasSet then
+      aHttp.TargetURL := lTargetUrl;
+  end;
+end;
+
+procedure TROSOAPMessage.UnsetAttributes(aTransport: IROTransport);
+var
+  aHttp: IROHTTPTransport;
+begin
+  fTargetNamespace := '';
+  fExceptionRemap.Clear;
+  fOverrideInputName := '';
+  fOverrideOutputName := '';
+  if fTargetLocationWasSet and Supports(aTransport, IROHTTPTransport, aHttp) then begin
+    aHttp.TargetURL := '';
+  end;
+end;
+
+procedure TROSOAPMessage.InitializeRead(const aTransport: IROTransport);
+var
+  lHttp: IROHTTPTransport;
+  lStrings: TStrings;
+begin
+  if Supports(aTransport, IROHTTPTransport, lHttp) then begin
+    fSoapAction := lHttp.Headers['SOAPAction'];
+    fServiceName := lHttp.GetQueryParameter('service');
+
+    lHttp := nil;
+  end
+  else begin
+    fSoapAction := '';
+    fServiceName := '';
+
+    lStrings := TStringList.Create;
+    try
+      lStrings.Delimiter := ' ';
+      lStrings.QuoteChar := '"';
+      lStrings.DelimitedText := GetHTTPInfo(aTransport);
+      fSoapAction := lStrings.Values['Action'];
+    finally
+      lStrings.Free;
+    end;
+  end;
+end;
+
+
+function TROSOAPMessage.FindRemap(const s: string): string;
+var
+  i: Integer;
+  lVal: string;
+  lList: TStrings;
+begin
+  result := '';
+  if fServiceName = '' then exit;
+  lList := GetServiceAttributes(fServiceName);
+  if lList = nil then exit;
+  for i := lList.Count -1 downto 0 do begin
+    lVal := lList[i];
+    if (copy(lVal,1,6) = 'remap_') and (Copy(lVal,pos('=', lVal)+1, MaxInt) = s) then begin
+      lVal := copy(lVal, 7, Pos('=', LvaL)-7);
+      result := lVal;
+    end;
+  end;
+end;
+
+
+function TROSOAPMessage.GetXMLMessage: IXMLDocument;
+begin
+  if fNeedInit then begin
+    fXMLMessage.New(fInitStr);
+    fNeedInit := False;
+  end;
+  Result:= fXMLMessage;
+end;
+
+procedure TROSOAPMessage.WriteAttribute(attrname: string; attrvalue: variant);
+var
+  canwrite: Boolean;
+begin
+  canwrite := TRUE;
+
+  if Name = 'xmlns:HNS' then attrvalue := ServerTargetNamespace;
+
+  if Assigned(fOnWriteEnvelopeAttribute) then fOnWriteEnvelopeAttribute(Self, attrname, attrvalue, canwrite);
+
+  if canwrite then fEnvNode.AddAttribute(attrname, attrvalue, False);
+end;
+
+initialization
+  RegisterMessageClass(TROSOAPMessage);
+
+end.
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSerializer.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSerializer.pas
new file mode 100644
index 0000000..3219383
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSerializer.pas	
@@ -0,0 +1,792 @@
+unit uROSerializer;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes, TypInfo,
+  uROClasses;
+
+const RO_ArrayItemName = 'item';
+      StreamClsName = AnsiString('Binary');
+
+type TROSerializer = class;
+
+     IROCustomStreamableType = interface
+     ['{BD8FB0B8-3F7E-4E6E-A9B1-80C3FF39878D}']
+       procedure Write(aSerializer: TROSerializer; const aName: string);
+       procedure Read(aSerializer: TROSerializer; const aName: string);
+     end;
+
+     IROCustomStreamableClass = interface(IROCustomStreamableType)
+     ['{10D1288B-D679-42E8-B4C0-5CA772647582}']
+       function GetTypeName: string;
+       procedure SetTypeName(const aValue:string);
+       property TypeName:string read GetTypeName write SetTypeName;
+
+       function CanImplementType(const aName: string):boolean;
+
+       procedure SetNull(aIsNull: boolean);
+       function IsNull: boolean;
+     end;
+
+     IROCustomStreamableEnum = interface
+     ['{5CE37B53-839A-48C4-89D7-8A0FDAFC2C4A}']
+       procedure SetValue(aValue: byte);
+       function GetValue: byte;
+       property Value: byte read GetValue write SetValue;
+
+       procedure Write(aSerializer: TROSerializer; const aName: string);
+       procedure Read(aSerializer: TROSerializer; const aName: string);
+     end;
+
+     IROCustomStreamableStruct = interface(IROCustomStreamableClass)
+     ['{0DAA29FE-2E54-477C-AA4B-996FBFE1F9A6}']
+     end;
+
+     IROCustomStreamableArray = interface(IROCustomStreamableClass)
+     ['{8B043EB4-F628-4581-884D-C636D9DDED0E}']
+       function GetCount: integer;
+       procedure SetCount(aElementCount: integer);
+       property Count: integer read GetCount write SetCount;
+
+     end;
+
+     IROObjectStreamExtender = interface
+     ['{2A73D437-FDFC-4765-BA9A-07FD5F61D991}']
+       procedure Write(aSerializer: TROSerializer);
+       procedure Read(aSerializer: TROSerializer);
+     end;
+
+     TROSerializer = class(TROBaseSerializer)
+     protected
+       { TROBaseSerializer }
+       procedure ReadObject(obj: TObject); override;
+       procedure WriteObject(obj: TObject);override;
+     protected
+       function GetRecordStrictOrder: Boolean; virtual;
+       function IsROCustomStreamable(aClass : TClass):Boolean; 
+       procedure BeginWriteObject(const aName: string; aClass : TClass; anObject: TObject; var LevelRef : IUnknown;
+                                  var IsValidType : boolean; out IsAssigned:Boolean; ArrayElementId : integer = -1); virtual;
+       procedure EndWriteObject(const aName: string; aClass : TClass; anObject: TObject; const LevelRef : IUnknown); virtual;
+       procedure CustomWriteObject(const aName : string; aClass : TClass; const Ref; ArrayElementId : integer = -1); virtual;
+       procedure CustomReadObject(const aName: string; aClass: TClass;var Ref; ArrayElementId: integer);virtual;
+       procedure BeginReadObject(const aName : string; aClass : TClass; var anObject : TObject; var LevelRef : IUnknown;
+                                 var IsValidType : boolean; ArrayElementId : integer = -1); virtual;
+       procedure EndReadObject(const aName : string; aClass : TClass; var anObject : TObject; const LevelRef : IUnknown); virtual;
+       procedure ReadROCustomStreamable(const aName : string; aClass : TClass; var Ref; ArrayElementId : integer = -1);
+       procedure WriteROCustomStreamable(const aName : string; aClass : TClass; const Ref; ArrayElementId : integer = -1);
+       { Internal }
+     public
+       { Writers }
+       procedure WriteInteger(const aName : string; anOrdType : TOrdType; const Ref; ArrayElementId : integer = -1); virtual; abstract;
+       procedure WriteInt64(const aName : string; const Ref; ArrayElementId : integer = -1); virtual; abstract;
+       procedure WriteEnumerated(const aName : string; anEnumTypeInfo : PTypeInfo; const Ref; ArrayElementId : integer = -1); virtual; abstract;
+       procedure WriteUTF8String(const aName : string; const Ref; ArrayElementId : integer = -1); virtual; abstract;
+       procedure WriteAnsiString(const aName : string; const Ref; ArrayElementId : integer = -1); virtual; abstract;
+       procedure WriteWideString(const aName : string; const Ref; ArrayElementId : integer = -1); virtual; abstract;
+       procedure WriteDateTime(const aName : string; const Ref; ArrayElementId : integer = -1); virtual; abstract;
+       procedure WriteDouble(const aName : string; aFloatType : TFloatType; const Ref; ArrayElementId : integer = -1); virtual; abstract;
+       procedure WriteVariant(const aName : string; const Ref; ArrayElementId : integer = -1); virtual; abstract;
+       procedure WriteXml(const aName : string; const Ref; ArrayElementId : integer = -1); virtual; abstract;
+       procedure WriteGuid(const aName : string; const Ref; ArrayElementId : integer = -1); virtual; abstract;
+       procedure WriteDecimal(const aName : string; const Ref; ArrayElementId : integer = -1); virtual; abstract;
+       procedure WriteBinary(const aName : string; const Ref; ArrayElementId : integer = -1);virtual; abstract;
+       procedure WriteStruct(const aName : string; const Ref; aClass: TClass = nil; ArrayElementId : integer = -1);virtual; abstract;
+       procedure WriteArray(const aName : string; const Ref; aClass: TClass = nil; ArrayElementId : integer = -1);virtual; abstract;
+       procedure WriteException(const aName : string; const Ref; ArrayElementId : integer = -1); virtual; abstract;
+       { Readers }
+       procedure ReadInteger(const aName : string; anOrdType : TOrdType; var Ref; ArrayElementId : integer = -1); virtual; abstract;
+       procedure ReadInt64(const aName : string; var Ref; ArrayElementId : integer = -1); virtual; abstract;
+       procedure ReadEnumerated(const aName : string; anEnumTypeInfo : PTypeInfo; var Ref; ArrayElementId : integer = -1); virtual; abstract;
+       procedure ReadUTF8String(const aName : string; var Ref; ArrayElementId : integer = -1; iMaxLength:integer=-1); virtual; abstract;
+       procedure ReadAnsiString(const aName : string; var Ref; ArrayElementId : integer = -1; iMaxLength:integer=-1); virtual; abstract;
+       procedure ReadWideString(const aName : string; var Ref; ArrayElementId : integer = -1; iMaxLength:integer=-1); virtual; abstract;
+       procedure ReadDateTime(const aName : string; var Ref; ArrayElementId : integer = -1); virtual; abstract;
+       procedure ReadDouble(const aName : string; aFloatType : TFloatType; var Ref; ArrayElementId : integer = -1); virtual; abstract;
+       procedure ReadVariant(const aName : string; var Ref; ArrayElementId : integer = -1); virtual; abstract;
+       procedure ReadXml(const aName : string; var Ref; ArrayElementId : integer = -1); virtual; abstract;
+       procedure ReadGuid(const aName : string; var Ref; ArrayElementId : integer = -1); virtual; abstract;
+       procedure ReadDecimal(const aName : string; var Ref; ArrayElementId : integer = -1); virtual; abstract;
+       procedure ReadBinary(const aName : string; var Ref; ArrayElementId : integer = -1);virtual; abstract;
+       function ReadStruct(const aName : string; aClass : TClass; var Ref; ArrayElementId : integer = -1): Boolean; virtual; abstract;
+       function ReadArray(const aName : string; aClass : TClass; var Ref; ArrayElementId : integer = -1): Boolean; virtual; abstract;
+       procedure ReadException(const aName : string; var Ref; ArrayElementId : integer = -1); virtual; abstract;
+     public
+       constructor Create();//aStorageRef: pointer); virtual;
+       destructor Destroy; override;
+
+       procedure Write(const aName : string; aTypeInfo : PTypeInfo; const Ref; ArrayElementId : integer = -1);
+       procedure Read(const aName : string; aTypeInfo : PTypeInfo; var Ptr; ArrayElementId : integer = -1); {$IFDEF DEBUG_REMOBJECTS}virtual;{$ENDIF}
+       function GetArrayElementName(anItemType : PTypeInfo; anItemReference: pointer): string; virtual;
+       property RecordStrictOrder: Boolean read GetRecordStrictOrder;
+       procedure ChangeClass(aClass: TClass); virtual;
+     end;
+
+     TROSerializerClass = class of TROSerializer;
+
+procedure ReadObjectFromSerializer(const ASerializer: TROSerializer; anObject : TObject);
+procedure WriteObjectToSerializer(const ASerializer: TROSerializer; anObject: TObject);
+implementation
+
+uses
+  Variants, RTLConsts,
+  uRORes, SysUtils, uROClient, uROTypes,
+  uROXMLIntf;
+
+function RO_GetIntfProp(Instance: TObject; const PropName: string): IInterface;
+{$IFDEF FPC}
+var
+  lPropInfo: PPropInfo;
+{$ENDIF}
+begin
+  {$IFDEF FPC}
+  lPropInfo := GetPropInfo(Instance, PropName);
+  if lPropInfo = nil then begin
+    Result:=nil;
+    exit;
+  end;
+
+  Result := IInterface(Pointer(PtrUInt(GetOrdProp(Instance, lPropInfo))));
+  {$ELSE}
+  Result := GetInterfaceProp(Instance, PropName);
+  {$ENDIF}
+end;
+
+
+procedure RO_SetIntfProp(Instance: TObject; const PropName: string; const Value: IInterface);
+{$IFDEF FPC}
+var
+  lPropInfo: PPropInfo;
+{$ENDIF}
+begin
+  {$IFDEF FPC}
+  lPropInfo := GetPropInfo(Instance, PropName);
+  if lPropInfo = nil then Exit;
+  if Value <> nil then Value._AddRef;
+  SetOrdProp(Instance, lPropInfo, PtrInt(Value));
+  {$ELSE}
+  SetInterfaceProp(Instance, PropName, Value);
+  {$ENDIF}
+end;
+
+
+{ TROSerializer }
+
+procedure TROSerializer.BeginReadObject(const aName: string;
+  aClass : TClass; var anObject: TObject; var LevelRef : IUnknown; var IsValidType : boolean; ArrayElementId : integer = -1);
+begin
+  //IsValidType := Assigned(anObject) or (anObject is TROComplexType);
+  {$IFDEF FPC}
+  if (aName <> '') or (anObject <> nil) or (LevelRef <> nil) or (ArrayElementId = 1) then
+      IsValidType := aClass.InheritsFrom(TROComplexType) or aClass.InheritsFrom(EROException) else // for preventing warning in FPC
+  {$ENDIF}
+  IsValidType := aClass.InheritsFrom(TROComplexType) or aClass.InheritsFrom(EROException)
+end;
+
+procedure TROSerializer.BeginWriteObject(const aName: string; aClass : TClass; anObject: TObject; var LevelRef : IUnknown; var IsValidType : boolean; out IsAssigned:Boolean; ArrayElementId : integer = -1);
+begin
+  //IsValidType := Assigned(anObject) or (anObject is TROComplexType);
+  {$IFDEF FPC}
+  if (aName <> '') or (anObject <> nil) or (LevelRef <> nil) or (ArrayElementId = 1)  then
+      IsValidType := aClass.InheritsFrom(TROComplexType) or aClass.InheritsFrom(EROException) else // for preventing warning in FPC
+  {$ENDIF}
+  IsValidType := aClass.InheritsFrom(TROComplexType) or aClass.InheritsFrom(EROException)
+end;
+
+constructor TROSerializer.Create;//(aStorageRef: pointer);
+begin
+  inherited Create;
+
+   {if (pointer(aStorageRef)<>NIL) and not SetStorageRef(aStorageRef)
+    then RaiseError(err_InvalidStorage, []);}
+end;
+
+procedure TROSerializer.CustomReadObject(const aName: string; aClass : TClass; var Ref;
+  ArrayElementId: integer);
+var obj : TObject absolute Ref;
+    i, cnt : integer;
+    itemref : pointer;
+    lCustomObject: IROCustomStreamableType;
+    f: Boolean;
+begin
+  {$IFDEF FPC}
+  if (aClass = nil) or (ArrayElementId=0) then f:=Assigned(Obj) else // for preventing warnings
+  {$ENDIF}
+  f:= Assigned(Obj);
+  if f then begin
+
+    { handle reading of arrays. any other custom types (like Streams) must
+      be handled by the base classes. }
+
+    if Obj.GetInterface(IROCustomStreamableType, lCustomObject) then begin
+      lCustomObject.Read(Self, aName);
+    end
+    else if (obj is TROArray) then with TROArray(obj) do begin
+      cnt := TROArray(obj).Count;
+      if (GetItemClass<>NIL) then begin
+        for i := 0 to (cnt-1) do begin
+          itemref := NIL;
+          Read(RO_ArrayItemName, GetItemType, itemref, i);
+          SetItemRef(i, itemref);
+        end;
+      end
+      else begin
+        for i := 0 to (cnt-1) do begin
+          itemref := GetItemRef(i);
+          Read(RO_ArrayItemName, GetItemType, itemref^, i);
+        end;
+      end;
+    end
+
+  end;
+end;
+
+procedure TROSerializer.CustomWriteObject(const aName: string; aClass : TClass; const Ref; ArrayElementId : integer = -1);
+var obj : TObject absolute Ref;
+    i : integer;
+    itemref : pointer;
+    lCustomObject: IROCustomStreamableType;
+    f: boolean;
+begin
+  {$IFDEF FPC}
+  if (aClass = nil) and (ArrayElementId <> -1) then f:=Assigned(obj) else // for preventing warnings
+  {$ENDIF}
+  f:=Assigned(obj);
+  if f then begin
+
+    { handle reading of arrays. any other custom types (like Streams) must
+      be handled by the base classes. }
+    if Obj.GetInterface(IROCustomStreamableType, lCustomObject) then begin
+      lCustomObject.Write(Self, aName);
+    end
+    else if (obj is TROArray) then with TROArray(obj) do begin
+      if (GetItemClass<>NIL) then begin
+        for i := 0 to (Count-1) do begin
+          itemref := GetItemRef(i);
+          Write(GetArrayElementName(GetItemType, itemref), GetItemType, itemref, i);
+          //Write(TObject(itemref).ClassName, GetItemType, itemref, i);
+        end;
+      end
+      else begin
+        for i := 0 to (Count-1) do begin
+          itemref := GetItemRef(i);
+          Write(GetArrayElementName(GetItemType, itemref), GetItemType, itemref^, i);
+          //Write(RO_ArrayItemName, GetItemType, itemref^, i);
+        end;
+      end;
+    end;
+
+  end;
+end;
+
+destructor TROSerializer.Destroy;
+begin
+  inherited;
+end;
+
+procedure TROSerializer.EndReadObject(const aName: string;
+  aClass : TClass; var anObject: TObject; const LevelRef : IUnknown);
+begin
+end;
+
+procedure TROSerializer.EndWriteObject(const aName: string;
+  aClass : TClass; anObject: TObject; const LevelRef : IUnknown);
+begin
+end;
+
+procedure TROSerializer.ReadROCustomStreamable(const aName: string; aClass : TClass; var Ref; ArrayElementId : integer = -1);
+var obj : TObject absolute Ref;
+    LevelRef : IUnknown;
+    validtype : boolean;
+begin
+  //obj := nil; { no matter what's passed in, we wanna start fresh }
+  {$IFDEF FPC}
+  validtype:=False;
+  levelref:=nil;
+  {$ENDIF}
+  BeginReadObject(aName, aClass, obj, levelref, validtype, ArrayElementId);
+
+  //if not Assigned(obj) then Exit; { we got outselves a nil object } // RaiseError(err_ObjectExpectedInStream, []);
+  if Assigned(obj) and (not validtype) then
+    raise EROUnknownType.CreateFmt(err_TypeNotSupported, [obj.ClassName]);
+
+  if Assigned(obj) then ReadObject(obj);
+
+  CustomReadObject(aName, aClass, obj, ArrayElementId);
+
+  EndReadObject(aName, aClass, obj, levelref);
+end;
+
+procedure TROSerializer.Write(const aName: string; aTypeInfo: PTypeInfo;
+  const Ref; ArrayElementId : integer = -1);
+begin
+  case aTypeInfo^.Kind of
+    {$IFDEF FPC}tkBool,{$ENDIF}
+    tkEnumeration : WriteEnumerated(aName, aTypeInfo, Ref, ArrayElementId);
+    tkInteger     : WriteInteger(aName, GetTypeData(aTypeInfo)^.OrdType, Ref, ArrayElementId);
+
+    tkFloat       : if (aTypeInfo=TypeInfo(TDateTime))
+                      then WriteDateTime(aName, Ref, ArrayElementId)
+                      else WriteDouble(aName, GetTypeData(aTypeInfo)^.FloatType, Ref, ArrayElementId);
+    {$IFDEF UNICODE}tkUString,{$ENDIF}
+    tkWString     : WriteWideString(aName, Ref, ArrayElementId);
+    tkLString,
+    {$IFDEF FPC}tkAString,{$ENDIF}
+    tkString      : if (aTypeInfo=TypeInfo(TGuidString)) then
+                      WriteGuid(aName, Ref, ArrayElementId)
+                    else if aTypeInfo = TypeInfo(UTF8String) then
+                      WriteUTF8String(aName, Ref, ArrayElementId)
+                    else
+                      WriteAnsiString(aName, Ref, ArrayElementId);
+    tkInt64       : WriteInt64(aName, Ref, ArrayElementId);
+
+    tkClass    : if GetTypeData(aTypeInfo).ClassType.InheritsFrom(TROArray) then
+                   WriteArray(aName, Ref,GetTypeData(aTypeInfo).ClassType, ArrayElementId)
+                 else if GetTypeData(aTypeInfo).ClassType.InheritsFrom(TROComplexType) then
+                   WriteStruct(aName, Ref, GetTypeData(aTypeInfo).ClassType, ArrayElementId)
+                 else if GetTypeData(aTypeInfo).ClassType.InheritsFrom(Binary) then
+                   WriteBinary(aName, Ref, ArrayElementId)
+                 else if GetTypeData(aTypeInfo).ClassType.InheritsFrom(Exception) then
+                   WriteException(aName, Ref, ArrayElementId)
+                 else
+                   raise EROUnknownType.CreateFmt(err_TypeNotSupported, [ROGetEnumName(TypeInfo(TTypeKind), Ord(aTypeInfo^.Kind))]);
+
+    tkVariant :   if aTypeInfo = TypeInfo(TDecimalVariant) then
+                    WriteDecimal(aName, Ref, ArrayElementId)
+                  else
+                    WriteVariant(aName, Ref, ArrayElementId);
+    tkInterface :
+      begin
+        if aTypeInfo = TypeInfo(IXmlNode) then begin
+          WriteXml(aName, Ref, ArrayElementId);
+        end else raise EROUnknownType.CreateFmt(err_TypeNotSupported, [ROGetEnumName(TypeInfo(TTypeKind), Ord(aTypeInfo^.Kind))]);
+      end;
+
+    else raise EROUnknownType.CreateFmt(err_TypeNotSupported, [ROGetEnumName(TypeInfo(TTypeKind), Ord(aTypeInfo^.Kind))]);
+  end;
+end;
+
+procedure TROSerializer.Read(const aName: string; aTypeInfo: PTypeInfo;
+  var Ptr; ArrayElementId : integer = -1);
+begin
+  case aTypeInfo^.Kind of
+    {$IFDEF FPC}tkBool,{$ENDIF}
+    tkEnumeration : ReadEnumerated(aName, aTypeInfo, byte(Ptr), ArrayElementId);
+    tkInteger  : ReadInteger(aName, GetTypeData(aTypeInfo)^.OrdType, Ptr, ArrayElementId);
+    tkInt64    : ReadInt64(aName, Ptr, ArrayElementId);
+
+    tkFloat    : if (aTypeInfo=TypeInfo(TDateTime))
+                   then ReadDateTime(aName, Ptr, ArrayElementId)
+                   else ReadDouble(aName, GetTypeData(aTypeInfo)^.FloatType, Ptr, ArrayElementId);
+    {$IFDEF UNICODE}tkUString,{$ENDIF}
+    tkWString  : ReadWideString(aName, Ptr, ArrayElementId);
+    tkLString,
+    {$IFDEF FPC}tkAString,{$ENDIF}
+    tkString   :
+                  if aTypeInfo = TypeInfo(TGuidString) then
+                    ReadGuid(aName, Ptr, ArrayElementId)
+                  else if aTypeInfo = TypeInfo(UTF8String) then
+                    ReadUTF8String(aName, Ptr, ArrayElementId)
+                  else
+                    ReadAnsiString(aName, Ptr, ArrayElementId);
+
+    tkClass    : if isROCustomStreamable(GetTypeData(aTypeInfo).ClassType) then
+                   ReadROCustomStreamable(aName, GetTypeData(aTypeInfo).ClassType, Ptr, ArrayElementId)
+                 else if GetTypeData(aTypeInfo).ClassType.InheritsFrom(TROArray) then
+                   ReadArray(aName, GetTypeData(aTypeInfo).ClassType, Ptr, ArrayElementId)
+                 else if GetTypeData(aTypeInfo).ClassType.InheritsFrom(TROComplexType) then
+                   ReadStruct(aName, GetTypeData(aTypeInfo).ClassType, Ptr, ArrayElementId)
+                 else if GetTypeData(aTypeInfo).ClassType.InheritsFrom(Binary) then
+                   ReadBinary(aName, Ptr, ArrayElementId)
+                 else if GetTypeData(aTypeInfo).ClassType.InheritsFrom(Exception) then
+                   ReadException(aName, Ptr, ArrayElementId)
+                 else
+                   raise EROUnknownType.CreateFmt(err_TypeNotSupported, [ROGetEnumName(TypeInfo(TTypeKind), Ord(aTypeInfo^.Kind))]);
+
+    tkVariant : if aTypeInfo = TypeInfo(TDecimalVariant) then
+                  ReadDecimal(aName, Ptr, ArrayElementId)
+                else
+                  ReadVariant(aName, Ptr, ArrayElementId);
+
+    tkInterface :
+      begin
+        if aTypeInfo = TypeInfo(IXmlNode) then begin
+          ReadXml(aName, Ptr, ArrayElementId);
+        end else raise EROUnknownType.CreateFmt(err_TypeNotSupported, [ROGetEnumName(TypeInfo(TTypeKind), Ord(aTypeInfo^.Kind))]);
+      end;
+    else RaiseError(err_TypeNotSupported, [ROGetEnumName(TypeInfo(TTypeKind), Ord(aTypeInfo^.Kind))]);
+  end;
+end;
+
+procedure TROSerializer.WriteROCustomStreamable(const aName: string; aClass : TClass; const Ref; ArrayElementId : integer = -1);
+var obj : TObject absolute Ref;
+    validtype, IsAssigned : boolean;
+    LevelRef : IUnknown;
+begin
+  {$IFDEF FPC}
+  validtype:=False;
+  levelref:=nil;
+  {$ENDIF}
+  BeginWriteObject(aName, aClass, obj, levelref, validtype, IsAssigned, ArrayElementId);
+  //if (not IsAssigned) or (not Assigned(obj)) then Exit; // no more streaming to do for a nil object.
+
+  if Assigned(obj) and (not validtype) then RaiseError(err_TypeNotSupported, [obj.ClassName]);
+  if Assigned(obj) then WriteObject(obj);
+  CustomWriteObject(aName, aClass, obj);
+
+  EndWriteObject(aName, aClass, obj, levelref);
+end;
+
+function TROSerializer.GetArrayElementName(anItemType: PTypeInfo; anItemReference: pointer): string;
+begin
+  {$IFDEF FPC}
+  if (anItemType = nil) and (anItemReference = nil) then result := RO_ArrayItemName else // for preventing warnings
+  {$ENDIF}
+  result := RO_ArrayItemName;
+end;
+
+function TROSerializer.GetRecordStrictOrder: Boolean;
+begin
+  Result := False;
+end;
+
+function TROSerializer.IsROCustomStreamable(aClass : TClass): Boolean;
+begin
+  Result:=Supports(aClass, IROCustomStreamableType);
+end;
+
+procedure ReadObjectFromSerializer(const ASerializer: TROSerializer; anObject : TObject);
+begin
+  ASerializer.ReadObject(anObject);
+end;
+
+procedure WriteObjectToSerializer(const ASerializer: TROSerializer; anObject: TObject);
+begin
+  ASerializer.WriteObject(anObject);
+end;
+
+procedure TROSerializer.ReadObject(obj: TObject);
+var
+    props : PPropList;
+    cnt, i : integer;
+    propInf: PPropInfo;
+
+    // Temporary variables
+    node : IXMLNode;
+    int64val : int64;
+    intval : integer;
+    enuval : byte;
+    dblval : double;
+    currval : Currency;
+    extval : Extended;
+    singleval : Single;
+    compval : Comp;
+    varval : variant;
+    datetimeval : TDateTime;
+    //extval : extended;
+    strval : string;
+    {$IFNDEF DELPHI5}wstrval : widestring;{$ENDIF}
+    objval : TObject;
+    lObjectStreamExtender:IROObjectStreamExtender;
+    lName: string;
+begin
+  if Assigned(obj) and (obj.ClassInfo <> nil) then begin
+    cnt := GetTypeData(obj.ClassInfo).PropCount;
+
+    if (cnt>0) then begin
+      {$IFDEF FPC}
+      props := nil;
+      {$ENDIF}
+      GetMem(props, cnt*SizeOf(PPropInfo));
+      try
+        cnt := GetPropList(PTypeInfo(obj.ClassInfo), tkProperties, props, not GetRecordStrictOrder);
+
+        for i := 0 to (cnt-1) do begin
+          lName :={$IFDEF UNICODE}UTF8ToString{$ENDIF}(props^[i]^.Name);  
+          with props^[i]^ do begin
+            case PropType^.Kind of
+              {$IFDEF FPC}tkBool,{$ENDIF}
+              tkEnumeration : begin
+                {$IFDEF FPC}enuval := 0;{$ENDIF}
+                ReadEnumerated(lName, PropType{$IFNDEF FPC}^{$ENDIF}, enuval);
+                SetOrdProp(obj, lName, enuval);
+              end;
+
+              tkInteger : begin
+                {$IFDEF FPC}intval := 0;{$ENDIF}
+                ReadInteger(lName, GetTypeData(PropType{$IFNDEF FPC}^{$ENDIF}).OrdType, intval);
+                SetOrdProp(obj, lName, intval);
+              end;
+
+              tkFloat : begin
+                if (PropType{$IFNDEF FPC}^{$ENDIF}=TypeInfo(TDateTime)) then begin
+                 {$IFDEF FPC}datetimeval := 0;{$ENDIF}
+                  ReadDateTime(lName, datetimeval);//, ArrayElementId);
+                  SetPropValue(obj, lName, datetimeval);
+                end
+                else case GetTypeData(PropType{$IFNDEF FPC}^{$ENDIF})^.FloatType of
+                  ftSingle   : begin
+                    {$IFDEF FPC}singleval := 0;{$ENDIF}
+                    ReadDouble(lName, GetTypeData(PropType{$IFNDEF FPC}^{$ENDIF})^.FloatType, singleval);
+                    SetFloatProp(obj, lName, singleval);
+                  end;
+                  ftDouble   : begin
+                    {$IFDEF FPC}dblval := 0;{$ENDIF}
+                    ReadDouble(lName, GetTypeData(PropType{$IFNDEF FPC}^{$ENDIF})^.FloatType, dblval);
+                    SetFloatProp(obj, lName, dblval);
+                  end;
+                  ftExtended : begin
+                    {$IFDEF FPC}extval := 0;{$ENDIF}
+                    ReadDouble(lName, GetTypeData(PropType{$IFNDEF FPC}^{$ENDIF})^.FloatType, extval);
+                    SetFloatProp(obj, lName, extval);
+                  end;
+                  ftComp     : begin
+                    {$IFDEF FPC}compval := 0;{$ENDIF}
+                    ReadDouble(lName, GetTypeData(PropType{$IFNDEF FPC}^{$ENDIF})^.FloatType, compval);
+                    SetFloatProp(obj, lName, compval);
+                  end;
+                  ftCurr     : begin
+                    {$IFDEF FPC}currval := 0;{$ENDIF}
+                    ReadDouble(lName, GetTypeData(PropType{$IFNDEF FPC}^{$ENDIF})^.FloatType, currval);
+                    SetFloatProp(obj, lName, currval);
+                  end;
+                end;
+              end;
+
+              tkLString,
+              {$IFDEF FPC}tkAString,{$ENDIF}
+              tkString : begin
+                {$IFDEF FPC}strval := '';{$ENDIF}
+                if PropType{$IFNDEF FPC}^{$ENDIF}=TypeInfo(TGuidString) then
+                  ReadGuid(lName, strval)
+                else
+                  ReadUTF8String(lName, strval);
+                SetStrProp(obj, lName, strval);
+              end;
+
+              tkInt64 : begin
+                {$IFDEF FPC}int64val := 0;{$ENDIF}
+                ReadInt64(lName, int64val);
+                SetInt64Prop(obj, lName, int64val);
+              end;
+               {$IFDEF DELPHI2009UP}tkUString,{$ENDIF}
+              tkWString : begin
+                {$IFDEF DELPHI5}
+                //RaiseError(err_TypeNotSupported, ['tkWString']);
+                ReadUTF8String(lName, strval);
+                SetStrProp(obj, lName, strval);
+                {$ELSE}
+                {$IFDEF FPC}wstrval := '';{$ENDIF}
+                ReadWideString(lName, wstrval);
+                propInf := GetPropInfo(obj, lName);
+                if propInf = nil then
+                  raise EPropertyError.CreateResFmt(@SUnknownProperty, [lName]);
+                SetWideStrProp(obj, propInf, wstrval);
+                {$ENDIF}
+              end;
+
+              tkVariant : begin
+                {$IFDEF FPC}varval := 0;{$ENDIF}
+                if (PropType{$IFNDEF FPC}^{$ENDIF}=TypeInfo(TDecimalVariant)) then
+                  ReadDecimal(lName, varval)
+                else
+                  ReadVariant(lName, varval);
+                SetVariantProp(obj, lName, varval);
+              end;
+
+              tkClass : begin
+                objval := nil;
+                Read(lName, PropType{$IFNDEF FPC}^{$ENDIF}, objval);
+                SetObjectProp(obj, lName, objval);
+              end;
+
+              tkInterface: begin
+                if PropType{$IFNDEF FPC}^{$ENDIF}=TypeInfo(IXmlNode) then begin
+                  {$IFDEF FPC} node:= nil; {$ENDIF}
+                  ReadXml(lName, node);
+                  RO_SetIntfProp(obj, lName, node);
+                end else raise EROUnknownType.CreateFmt(err_TypeNotSupported, [ROGetEnumName(TypeInfo(TTypeKind), Ord(props^[i].PropType^.Kind))])
+              end;
+              else raise EROUnknownType.CreateFmt(err_TypeNotSupported, [ROGetEnumName(TypeInfo(TTypeKind), Ord(props^[i].PropType^.Kind))])
+            end; { case }
+          end; { with }
+        end; { for }
+      finally
+        FreeMem(props, cnt*SizeOf(PPropInfo));
+      end;
+    end; { if Count > 0 }
+    if Obj.GetInterface(IROObjectStreamExtender, lObjectStreamExtender) then begin
+      lObjectStreamExtender.Read(Self);
+    end
+  end; { if Assigned }
+end;
+
+procedure TROSerializer.WriteObject(obj: TObject);
+var
+    props : PPropList;
+    cnt, i : integer;
+
+    // Temporary variables
+    int64val : int64;
+    intval : integer;
+    enuval : byte;
+    dblval : double;
+    currval : Currency;
+    extval : Extended;
+    singleval : Single;
+    datetimeval : TDateTime;
+    compval : Comp;
+    strval : string;
+    varval : Variant;
+    {$IFNDEF DELPHI5}wstrval : widestring;{$ENDIF}
+    objval : TObject;
+    pdata : PTypeData;
+    lObjectStreamExtender:IROObjectStreamExtender;
+    node: IXMLNode;
+    lName: string;
+begin
+  if (obj<>NIL) and (obj.ClassInfo<>NIL) then begin
+    pdata := GetTypeData(obj.ClassInfo);
+    if (pdata<>NIL) then begin
+      cnt := pdata .PropCount;
+      if (cnt>0) then begin
+        {$IFDEF FPC}props:= nil;{$ENDIF}
+        GetMem(props, cnt*SizeOf(PPropInfo));
+        try
+          cnt := GetPropList(PTypeInfo(obj.ClassInfo), tkProperties, props, not GetRecordStrictOrder);
+
+          for i := 0 to (cnt-1) do begin
+            lName :={$IFDEF UNICODE}UTF8ToString{$ENDIF}(props^[i]^.Name);
+            with props^[i]^ do
+              case PropType^.Kind of
+                {$IFDEF FPC}tkBool,{$ENDIF}
+                tkEnumeration : begin
+                  enuval := GetOrdProp(obj, lName);
+                  WriteEnumerated(lName, PropType{$IFNDEF FPC}^{$ENDIF}, enuval);
+                end;
+
+                tkInteger : begin
+                  intval := GetOrdProp(obj, lName);
+                  WriteInteger(lName, GetTypeData(PropType{$IFNDEF FPC}^{$ENDIF})^.OrdType, intval);
+                end;
+
+                tkFloat : begin
+                  if (PropType{$IFNDEF FPC}^{$ENDIF}=TypeInfo(TDateTime)) then begin
+                    datetimeval := GetPropValue(obj, lName);
+                    WriteDateTime(lName, datetimeval);
+                  end
+                  else case GetTypeData(PropType{$IFNDEF FPC}^{$ENDIF})^.FloatType of
+                    ftSingle   : begin
+                      singleval := GetFloatProp(obj, lName);
+                      WriteDouble(lName, GetTypeData(PropType{$IFNDEF FPC}^{$ENDIF})^.FloatType, singleval);
+                    end;
+                    ftDouble   : begin
+                      dblval := GetFloatProp(obj, lName);
+                      WriteDouble(lName, GetTypeData(PropType{$IFNDEF FPC}^{$ENDIF})^.FloatType, dblval);
+                    end;
+                    ftExtended : begin
+                      extval := GetFloatProp(obj, lName);
+                      WriteDouble(lName, GetTypeData(PropType{$IFNDEF FPC}^{$ENDIF})^.FloatType, extval);
+                    end;
+                    ftComp     : begin
+                      {$IFDEF FPC}
+                        {$IFDEF WIN64}
+                        compval := GetInt64Prop(obj, lName);
+                        WriteInt64(lName, compval);
+                        {$ELSE}
+                        compval := GetOrdProp(obj, lName);
+                        WriteInteger(lName,otSLong,compval);
+                        {$ENDIF}
+                      {$ELSE}
+                      compval := GetFloatProp(obj, lName);
+                      WriteDouble(lName, GetTypeData(PropType^)^.FloatType, compval);
+                      {$ENDIF}
+                    end;
+                    ftCurr     : begin
+                      currval := GetFloatProp(obj, lName);
+                      WriteDouble(lName, GetTypeData(PropType{$IFNDEF FPC}^{$ENDIF})^.FloatType, currval);
+                    end;
+                  end;
+                end;
+
+                tkLString,
+                {$IFDEF FPC}tkAString,{$ENDIF}
+                tkString : begin
+                  strval := GetStrProp(obj, lName);
+                  if  (PropType{$IFNDEF FPC}^{$ENDIF}=TypeInfo(TGuidString)) then
+                    WriteGuid(lName, strval)
+                  else
+                    WriteUTF8String(lName, strval);
+                end;
+
+                tkInt64 : begin
+                  int64val := GetInt64Prop(obj, lName);
+                  WriteInt64(lName, int64val);
+                end;
+                {$IFDEF DELPHI2009UP}tkUString,{$ENDIF}
+                tkWString : begin
+                  {$IFDEF DELPHI5}
+                  //RaiseError(err_TypeNotSupported, ['tkWString']);
+                  strval := GetStrProp(obj, lName);
+                  WriteUTF8String(lName, strval);
+                  {$ELSE}
+                  wstrval := GetWideStrProp(obj, lName);
+                  WriteWideString(lName, wstrval);
+                  {$ENDIF}
+                end;
+
+                tkVariant : begin
+                  varval := GetVariantProp(obj, lName);
+                  if (PropType{$IFNDEF FPC}^{$ENDIF}=TypeInfo(TDecimalVariant)) then
+                    WriteDecimal(lName, varval)
+                  else
+                    WriteVariant(lName, varval);
+                end;
+
+                tkClass : begin
+                  objval := GetObjectProp(obj, lName);
+                  Write(lName, PropType{$IFNDEF FPC}^{$ENDIF}, objval);
+                end;
+                tkInterface : begin
+                  if PropType{$IFNDEF FPC}^{$ENDIF}=TypeInfo(IXmlNode) then begin
+                 // if  props^[i] = TypeInfo(IXmlNode) then begin
+                    node := RO_GetIntfProp(obj, lName) as IXMLNode;
+                    WriteXml(lName, node);
+                  end else RaiseError(err_TypeNotSupported, [ROGetEnumName(TypeInfo(TTypeKind), Ord(props^[i].PropType^.Kind))])
+                end;
+
+                else RaiseError(err_TypeNotSupported, [ROGetEnumName(TypeInfo(TTypeKind), Ord(props^[i].PropType^.Kind))])
+              end;
+          end;
+        finally
+          FreeMem(props, cnt*SizeOf(PPropInfo));
+        end;
+      end;
+    end;
+    if Obj.GetInterface(IROObjectStreamExtender, lObjectStreamExtender) then begin
+      lObjectStreamExtender.Write(Self);
+    end
+  end;
+end;
+
+procedure TROSerializer.ChangeClass(aClass: TClass);
+begin
+  // Do nothing by default
+end;
+
+end.
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROServer.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROServer.pas
new file mode 100644
index 0000000..1039298
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROServer.pas	
@@ -0,0 +1,1241 @@
+unit uROServer;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes, SysUtils, //SyncObjs,
+  {$IFDEF REMOBJECTS_UseEncryption}uROEncryption, {$ENDIF}
+  uRORes, uROServerIntf, uROClient, uROClientIntf, uROClasses, uROTypes,
+  uROEventRepository;
+
+type
+  TROServer = class;
+
+  { TMessageInvokeMethod }
+  TMessageInvokeMethod = procedure(const anInstance: IInterface;
+    const aMessage: IROMessage;
+    const aTransport: IROTransport;
+    out oResponseOptions:TROResponseOptions) of object;
+
+  { TRORemotable }
+  TRORemotable = class(TInterfacedObject, IROObjectRetainer)
+  private
+    fRetainedObjects : TList;
+    
+  protected
+    {$IFDEF DELPHI7UP}
+    procedure Synchronize(aMethod: TThreadMethod);
+    {$ENDIF DELPHI7UP}
+
+    { IROObjectRetainer  }
+    procedure RetainObject(const anObject : TObject);
+    procedure ReleaseObject(const anObject : TObject);
+    function IsRetained(const anObject : TObject) : boolean;
+
+  public
+    constructor Create; virtual;
+    destructor Destroy; override;
+  end;
+
+  TRORemotableClass = class of TRORemotable;
+
+  { TROInvoker }
+  {$M+}
+  TROInvoker = class(TInterfacedObject, IROInvoker)
+  private
+
+  protected
+    FAbstract: Boolean;
+    function CustomHandleMessage(const aFactory: IROClassFactory;
+      const aMessage: IROMessage;
+      const aTransport: IROTransport;
+      out oResponseOptions: TROResponseOptions): boolean; virtual;
+
+    procedure BeforeInvoke(aMethodPtr: TMessageInvokeMethod;
+      const anInstance: IInterface;
+      const aFactory: IROClassFactory;
+      const aMessage: IROMessage;
+      const aTransport: IROTransport); virtual;
+
+    procedure AfterInvoke(aMethodPtr: TMessageInvokeMethod;
+      const anInstance: IInterface;
+      const aFactory: IROClassFactory;
+      const aMessage: IROMessage;
+      const aTransport: IROTransport;
+      anException: Exception); virtual;
+
+  public
+    constructor Create; virtual;
+    destructor Destroy; override;
+
+    function HandleMessage(const aFactory: IROClassFactory;
+      const aMessage: IROMessage;
+      const aTransport: IROTransport;
+      out oResponseOptions: TROResponseOptions): boolean;
+
+  published
+    { IROServerEventsBroker invocation - Ghost methods }
+    procedure Invoke_RegisterEventClient(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+    procedure Invoke_UnregisterEventClient(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+    procedure Invoke_RegisterClient(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+    procedure Invoke_UnregisterClient(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+    procedure Invoke_GetEventsData(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+  end;
+  {$M-}
+
+  TROInvokerClass = class of TROInvoker;
+
+  { TROClassFactory }
+  TRORemotableCreatorFunc = procedure(out anInstance: IInterface);
+
+  { TROMessageDispatcher }
+  TROMessageDispatchers = class;
+  TROMessageDispatcher = class(TCollectionItem)
+  private
+    fDispatchers: TROMessageDispatchers;
+    fMessage: TROMessage;
+    fEnabled: boolean;
+    fDummyName: string;
+
+    fMessageIntf: pointer;
+    fModuleInfoIntf: pointer;
+
+    function GetMessageIntf: IROMessage;
+    function GetModuleInfoIntf: IROModuleInfo;
+    function GetServer: TROServer;
+
+  protected
+    procedure SetMessage(const Value: TROMessage); virtual;
+    function GetDisplayName: string; override;
+
+    property Server:TROServer read GetServer;
+
+  public
+    constructor Create(aCollection: TCollection); override;
+    destructor Destroy; override;
+
+    procedure Assign(Source: TPersistent); override;
+
+    function ProcessMessage(const aTransport: IROTransport; aRequeststream, aResponsestream: TStream; out oResponseOptions: TROResponseOptions): boolean;
+    function CanHandleMessage(const aTransport: IROTransport; aRequeststream: TStream): boolean; virtual;
+
+    property MessageIntf: IROMessage read GetMessageIntf;
+    property ModuleIntf: IROModuleInfo read GetModuleInfoIntf;
+  published
+    property Name: string read GetDisplayName write fDummyName;
+    property Message: TROMessage read fMessage write SetMessage;
+    property Enabled: boolean read fEnabled write fEnabled;
+  end;
+
+  TROMessageDispatcherClass = class of TROMessageDispatcher;
+
+  { TROMessageDispatchers }
+
+  TROMessageDispatchers = class(TCollection)
+  private
+    fServer: TROServer;
+
+    function GetDispatcher(Index: integer): TROMessageDispatcher;
+
+  protected
+    function GetSupportsMultipleDispatchers: boolean; virtual;
+    function GetDispatcherClass: TROMessageDispatcherClass; virtual;
+    {$IFDEF DELPHI6UP}
+    procedure Notify(Item: TCollectionItem; Action: TCollectionNotification); override;
+    {$ENDIF DELPHI6UP}
+    property Server:TROServer read fServer;
+
+  public
+    constructor Create(aServer: TROServer); virtual;
+    destructor Destroy; override;
+
+    procedure CleanReferences(aMessage: TROMessage);
+    function FindDuplicate(aMessage: TROMessage): TROMessageDispatcher;
+    function FindDispatcher(const aTransport: IROTransport; aRequestStream: TStream): TROMessageDispatcher;
+
+    function DispatcherByName(const aName: string): TROMessageDispatcher;
+
+    property Dispatchers[Index: integer]: TROMessageDispatcher read GetDispatcher; default;
+    property SupportsMultipleDispatchers: boolean read GetSupportsMultipleDispatchers;
+  end;
+
+  TROMessageDispatchersClass = class of TROMessageDispatchers;
+
+  { TROServer }
+  TROGetRODLReader = procedure (Sender: TROServer; var aRODLReader: TROCustomRODLReader) of object;
+
+  {$IFDEF REMOBJECTS_UseEncryption}
+  TROServer = class(TROBaseConnection)
+  {$ELSE}
+  TROServer = class(TROComponent)
+  {$ENDIF}
+  private
+    fDoneAfterLoad,
+      fLoadActive: boolean;
+
+    fOnAfterServerDeactivate: TNotifyEvent;
+    fOnAfterServerActivate: TNotifyEvent;
+    fOnBeforeServerDeactivate: TNotifyEvent;
+    fOnBeforeServerActivate: TNotifyEvent;
+    fDispatchers: TROMessageDispatchers;
+    fOnReadFromStream: TStreamOperation;
+    fOnWriteToStream: TStreamOperation;
+    FOnGetRODLReader: TROGetRODLReader;
+    FDefaultResponse: string;
+       //fAsyncResponseStorage: TROAsyncResponseStorage;
+
+    function GetActive: boolean;
+    procedure SetActive(const Value: boolean);
+    procedure SetDispatchers(const Value: TROMessageDispatchers);
+       //procedure SetAsyncResponseStorage(const Value:TROAsyncResponseStorage);
+
+  private
+    procedure TriggerReadFromStream(iStream: TStream);
+    procedure TriggerWriteToStream(iStream: TStream);
+
+  protected
+    { Internals }
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+
+    procedure IntSetActive(const Value: boolean); virtual; abstract;
+    function IntGetActive: boolean; virtual; abstract;
+
+    procedure Loaded; override;
+
+    function GetDispatchersClass: TROMessageDispatchersClass; virtual;
+
+    function DispatchMessage(const aTransport: IROTransport; aRequeststream, aResponsestream: TStream): boolean; overload;
+    function DispatchMessage(const aTransport: IROTransport; aRequeststream, aResponsestream: TStream; out oResponseOptions: TROResponseOptions): boolean; overload;
+
+    function IntDispatchMessage(Dispatcher: TROMessageDispatcher; const aTransport: IROTransport; aRequeststream, aResponsestream: TStream; out oResponseOptions: TROResponseOptions): boolean;
+    property OnGetRODLReader: TROGetRODLReader read FOnGetRODLReader write FOnGetRODLReader;
+    function GetRODLReader: TROCustomRODLReader;
+    property DefaultResponse: string read FDefaultResponse write FDefaultResponse;
+  public
+    constructor Create(aOwner: TComponent); override;
+    destructor Destroy; override;
+    procedure CheckProperties; virtual;
+  published
+    property Active: boolean read GetActive write SetActive default false;
+    //property AsyncResponseStorage:TROAsyncResponseStorage read fAsyncResponseStorage write SetAsyncResponseStorage;
+
+    property Dispatchers: TROMessageDispatchers read fDispatchers write SetDispatchers;
+
+    property OnBeforeServerActivate: TNotifyEvent read fOnBeforeServerActivate write fOnBeforeServerActivate;
+    property OnAfterServerActivate: TNotifyEvent read fOnAfterServerActivate write fOnAfterServerActivate;
+    property OnBeforeServerDeactivate: TNotifyEvent read fOnBeforeServerDeactivate write fOnBeforeServerDeactivate;
+    property OnAfterServerDeactivate: TNotifyEvent read fOnAfterServerDeactivate write fOnAfterServerDeactivate;
+    property OnWriteToStream: TStreamOperation read fOnWriteToStream write fOnWriteToStream;
+    property OnReadFromStream: TStreamOperation read fOnReadFromStream write fOnReadFromStream;
+  end;
+
+  TROServerClass = class of TROServer;
+
+  TROClassFactory = class(TInterfacedObject, IROClassFactory)
+  private
+    fCreatorFunc: TRORemotableCreatorFunc;
+    fInterfaceName: string;
+    fInvoker: IROInvoker;
+    fInvokerClass: TROInvokerClass;
+
+  protected
+       { IROClassFactory }
+    procedure CreateInstance(const aClientID: TGUID; out anInstance: IInterface); virtual;
+    procedure ReleaseInstance(const aClientID: TGUID; var anInstance: IInterface); virtual;
+
+       {procedure ActivateInstance(const aClientID:TGUID; const anInstance:IInterface);
+       procedure DeactivateInstance(const aClientID:TGUID; const anInstance:IInterface);}
+
+    function GetInterfaceName: string;
+    function GetInvoker: IROInvoker;
+
+    property CreatorFunc: TRORemotableCreatorFunc read fCreatorFunc;
+
+  public
+    constructor Create(const anInterfaceName: string;
+      aCreatorFunc: TRORemotableCreatorFunc;
+      anInvokerClass: TROInvokerClass);
+    destructor Destroy; override;
+  end;
+
+  EROSendNoResponse = class(EROException);
+
+procedure ROSendNoResponse;
+
+function MainProcessMessage(
+  const aMessage: IROMessage;
+  const aTransport: IROTransport;
+  aRequestStream,
+  aResponseStream: TStream;
+  out oResponseOptions: TROResponseOptions): boolean;
+
+procedure RegisterClassFactory(const aClassFactory: IROClassFactory);
+procedure UnRegisterClassFactory(const aClassFactory: IROClassFactory);
+function GetClassFactory(const anInterfaceName: string): IROClassFactory;
+function FindClassFactory(const anInterfaceName: string): IROClassFactory; {$IFDEF VER140UP} deprecated; {$ENDIF} // Please use GetClassFactory. mh.
+function TryFindClassFactory(const anInterfaceName: string): IROClassFactory;
+function IsClassFactoryRegistered(const anInterfaceName: string):boolean;
+function GetClassFactoryNames:IROStrings;
+
+procedure RegisterServerClass(aROMessageClass: TROServerClass);
+procedure UnregisterServerClass(aROMessageClass: TROServerClass);
+function GetServerClass(Index: integer): TROServerClass;
+function GetServerClassCount: integer;
+
+procedure ReleaseClassFactories;
+implementation
+
+uses
+Contnrs;
+
+
+procedure ROSendNoResponse;
+begin
+  {
+    NOTE
+
+    This exception is expected to be raised if you use the ROSendNoResponse
+    function in your asynchronous/broadcast channels. YOu can safely ignore
+    when the Delphi IDE breaks on this line, and you can add it to the ist
+    of "Silent" exceptions under Tools|Debugger Options|Language Exceptions.
+  }
+  raise EROSendNoResponse.Create('');
+end;
+
+var
+  _ServerClasses: TClassList;
+
+procedure RegisterServerClass(aROMessageClass: TROServerClass);
+begin
+  _ServerClasses.Add(aROMessageClass);
+end;
+
+procedure UnregisterServerClass(aROMessageClass: TROServerClass);
+begin
+  _ServerClasses.Remove(aROMessageClass);
+end;
+
+function GetServerClass(Index: integer): TROServerClass;
+begin
+  result := TROServerClass(_ServerClasses[Index]);
+end;
+
+function GetServerClassCount: integer;
+begin
+  result := _ServerClasses.Count
+end;
+
+type
+  TROClassFactoryList = class(TInterfaceList)
+  private
+    function GetItems(Index: integer): IROClassFactory;
+  protected
+  public
+    function Add(aClassFactory: IROClassFactory): integer;
+    function GetClassFactoryByInterfaceName(const anInterfaceName: string): IROClassFactory;
+    function FindClassFactoryByInterfaceName(const anInterfaceName: string): IROClassFactory;
+    function GetNames:IROStrings;
+    property Items[Index: integer]: IROClassFactory read GetItems; default;
+  end;
+
+var
+  _ClassFactoryList: TROClassFactoryList;
+
+function ClassFactoryList: TROClassFactoryList;
+begin
+  if (_ClassFactoryList = nil) then _ClassFactoryList := TROClassFactoryList.Create;
+  result := _ClassFactoryList;
+end;
+
+function MainProcessMessage(const aMessage: IROMessage; const aTransport: IROTransport; aRequestStream, aResponseStream: TStream; out oResponseOptions: TROResponseOptions): boolean;
+var
+  factory: IROClassFactory;
+  moduleinfo: IROModuleInfo;
+  dataformat: TDataFormat;
+  http: IROHTTPTransport;
+begin
+  oResponseOptions := [];
+//  result := FALSE; // reenabled because of a compiler warning
+
+  try
+    if (aMessage = nil) then RaiseError(err_NILMessage, []);
+
+    case aRequestStream.Size of
+      // Metadata retrieval
+      MetadataRequestIDLength : begin
+        oResponseOptions := oResponseOptions + [roDontEncrypt];
+        DataFormat := 'text/xml';
+        if Supports(aMessage, IROModuleInfo, moduleinfo) then
+          moduleinfo.GetRodlInfo(aResponseStream, aTransport, dataformat)
+        else
+          RaiseError(err_InvalidRequestStream, [aRequestStream.Size]);
+        if supports(aTransport, IROHttpTransport, http) then
+          http.ContentType := dataformat;
+
+        result := TRUE;
+      end;
+      0 : begin
+        oResponseOptions := oResponseOptions + [roDontEncrypt];
+        DataFormat := 'text/xml';
+        if Supports(aMessage, IROModuleInfo, moduleinfo) then
+          moduleinfo.GetModuleInfo(aResponseStream, aTransport, dataformat)
+        else
+          RaiseError(err_InvalidRequestStream, [aRequestStream.Size]);
+        if supports(aTransport, IROHttpTransport, http) then
+          http.ContentType := dataformat;
+        result := TRUE;
+      end;
+
+      // Probing
+      ProbeRequestIDLength : begin
+        aResponseStream.Write(ProbeResponseID, ProbeResponseIDLength);
+        Result := TRUE;
+      end;
+
+      // Messages
+      else begin
+        aMessage.InitializeRead(aTransport);
+        aMessage.ReadFromStream(aRequestStream);
+
+        case aMessage.MessageType of
+          mtPoll: begin
+              if IsEqualGUID(aMessage.ClientID, EmptyGUID) then
+                raise EROServerException.Create('Poll messages may not be sent with empty Client ID.');
+
+              raise EROServerException.Create('.NET-style polling is not implemented in RO/Delphi, yet.');
+            end;
+
+          mtRequest, mtResponse: begin
+              if (aMessage.InterfaceName = '') then
+                RaiseError(err_UnspecifiedInterface, [])
+              else if (aMessage.MessageName = '') then
+                RaiseError(err_UnspecifiedMessage, [])
+              else if IsEqualGUID(aMessage.ClientID, EmptyGUID) then
+                aMessage.ClientID := NewGuid();
+
+              if IsEqualGUID(aMessage.ClientID, EmptyGUID) then
+                aMessage.ClientID := NewGuid();
+
+              factory := GetClassFactory(aMessage.InterfaceName);
+              result := factory.Invoker.HandleMessage(factory, aMessage, aTransport, oResponseOptions);
+
+              aMessage.WriteToStream(aResponseStream);
+            end;
+
+          else begin
+            raise EROServerException.CreateFmt('Unsupported messages type %d.', [integer(aMessage.MessageType)]);
+          end;
+
+        end;
+
+      end;
+    end;
+  except
+    on E: EROSendNoResponse do begin
+      result := FALSE;
+      oResponseOptions := oResponseOptions + [roNoResponse];
+      aMessage.InitializeExceptionMessage(aTransport, '', aMessage.InterfaceName, aMessage.MessageName);
+      aMessage.WriteException(aResponseStream, E);
+    end;
+    on E: Exception do begin
+      result := FALSE;
+      aMessage.InitializeExceptionMessage(aTransport, '', aMessage.InterfaceName, aMessage.MessageName);
+      aMessage.WriteException(aResponseStream, E);
+    end;
+  end;
+end;
+
+function GetClassFactory(const anInterfaceName: string): IROClassFactory;
+begin
+  result := ClassFactoryList.GetClassFactoryByInterfaceName(anInterfaceName);
+end;
+
+function FindClassFactory(const anInterfaceName: string): IROClassFactory;
+begin
+  result := ClassFactoryList.GetClassFactoryByInterfaceName(anInterfaceName);
+end;
+
+function TryFindClassFactory(const anInterfaceName: string): IROClassFactory;
+begin
+  result := ClassFactoryList.FindClassFactoryByInterfaceName(anInterfaceName);
+end;
+
+function IsClassFactoryRegistered(const anInterfaceName: string):boolean;
+begin
+  result := assigned(_ClassFactoryList) and assigned(ClassFactoryList.FindClassFactoryByInterfaceName(anInterfaceName));
+end;
+
+function GetClassFactoryNames:IROStrings;
+begin
+  result := ClassFactoryList.GetNames();
+end;
+
+procedure RegisterClassFactory(const aClassFactory: IROClassFactory);
+begin
+  ClassFactoryList.Add(aClassFactory);
+end;
+
+procedure UnRegisterClassFactory(const aClassFactory: IROClassFactory);
+begin
+  if assigned(_ClassFactoryList) then
+    _ClassFactoryList.Remove(aClassFactory);
+end;
+
+{ TROClassFactoryList }
+
+function TROClassFactoryList.Add(aClassFactory: IROClassFactory): integer;
+begin
+  { ToDo: make sure no other class factopry is registered yet, that serves
+          the same class name
+          http://www.remobjects.com/bugdb?bug=E14CD985-B996-45A3-B480-7C22F09093F5 }
+
+  result := inherited Add(aClassFactory);
+end;
+
+function TROClassFactoryList.GetClassFactoryByInterfaceName(const anInterfaceName: string): IROClassFactory;
+begin
+  result := FindClassFactoryByInterfaceName(anInterfaceName);
+  if not Assigned(result) then RaiseError(err_ClassFactoryNotFound, [anInterfaceName]);
+end;
+
+function TROClassFactoryList.FindClassFactoryByInterfaceName(const anInterfaceName: string): IROClassFactory;
+var
+  i:integer;
+begin
+  result := nil;
+  for i := 0 to (Count - 1) do
+    if (CompareText(anInterfaceName, Items[i].GetInterfaceName) = 0) then begin
+      result := Items[i];
+      Break;
+    end;
+end;
+
+function TROClassFactoryList.GetItems(Index: integer): IROClassFactory;
+begin
+  result := inherited Items[Index] as IROClassFactory
+end;
+
+function TROClassFactoryList.GetNames: IROStrings;
+var
+  i:integer;
+begin
+  result := NewROStrings();
+  for i := 0 to Count-1 do begin
+    Result.Add(Items[i].InterfaceName)
+  end;
+end;
+
+{ TROInvoker }
+
+constructor TROInvoker.Create;
+begin
+  inherited Create;
+  FAbstract := False;
+end;
+
+procedure TROInvoker.BeforeInvoke(aMethodPtr: TMessageInvokeMethod;
+  const anInstance: IInterface;
+  const aFactory: IROClassFactory;
+  const aMessage: IROMessage;
+  const aTransport: IROTransport);
+var
+  dispnotifier: IRODispatchNotifier;
+  objactivation: IROObjectActivation;
+  streamaccess : IROStreamAccess;
+  currpos : integer;
+begin
+  if (@aMethodPtr = nil) or (aFactory = nil) then streamaccess := NIL else // for preventing warnings in FPC
+  streamaccess := NIL;
+  currpos := -1; // introduced for a compiler warning...
+
+  if Supports(aMessage, IROStreamAccess, streamaccess)
+    then currpos := streamaccess.Stream.Position;
+
+  // This can be enanched by descendants
+  if Supports(anInstance, IROObjectActivation, objactivation) then begin
+    objactivation.OnActivate(aMessage.ClientID, aMessage);
+    if (streamaccess<>NIL)
+      then streamaccess.Stream.Position := currpos;
+  end;
+
+  if Supports(anInstance, IRODispatchNotifier, dispnotifier) then begin
+    dispnotifier.GetDispatchInfo(aTransport, aMessage);
+    if (streamaccess<>NIL)
+      then streamaccess.Stream.Position := currpos;
+  end;
+end;
+
+procedure TROInvoker.AfterInvoke(aMethodPtr: TMessageInvokeMethod;
+  const anInstance: IInterface;
+  const aFactory: IROClassFactory;
+  const aMessage: IROMessage;
+  const aTransport: IROTransport;
+  anException: Exception);
+var
+  objactivation: IROObjectActivation;
+begin
+  if (anInstance<>nil) or (@aMethodPtr <> nil) or (aMessage <> nil) or (aFactory <> nil) or (aTransport <> nil) or (anException <> nil) then // for preventing warnings in FPC
+  if Supports(anInstance, IROObjectActivation, objactivation) then begin
+    objactivation.OnDeactivate(aMessage.ClientID);
+  end;
+end;
+
+function TROInvoker.CustomHandleMessage(const aFactory: IROClassFactory;
+  const aMessage: IROMessage;
+  const aTransport: IROTransport;
+  out oResponseOptions: TROResponseOptions): boolean;
+var
+  mtd: TMessageInvokeMethod;
+  instance: IInterface;
+begin
+  result := FALSE;
+  if FAbstract then RaiseError(err_AbstractService, [aFactory.InterfaceName]);
+
+  mtd := nil;
+  instance := nil;
+
+  // The message is guaranteed not to be NIL and to have a name and an InterfaceName at this point
+  @mtd := MethodAddress('Invoke_' + aMessage.MessageName);
+  if (@mtd <> nil) then try
+    try
+      aFactory.CreateInstance(aMessage.ClientID, instance);
+
+      if (instance = nil) then RaiseError(err_ClassFactoryDidNotReturnInstance, [aMessage.InterfaceName]);
+
+      BeforeInvoke(mtd, instance, aFactory, aMessage, aTransport);
+      mtd(instance, aMessage, aTransport, oResponseOptions);
+      AfterInvoke(mtd, instance, aFactory, aMessage, aTransport, nil);
+
+      result := TRUE;
+    except
+      on E: Exception do begin
+        AfterInvoke(mtd, instance, aFactory, aMessage, aTransport, E);
+        raise;
+      end;
+    end;
+  finally
+    if (instance <> nil) then aFactory.ReleaseInstance(aMessage.ClientID, instance);
+  end
+  else
+    RaiseError(err_UnknownMethod, [aMessage.MessageName, aFactory.InterfaceName]);
+end;
+
+destructor TROInvoker.Destroy;
+begin
+  inherited;
+end;
+
+function TROInvoker.HandleMessage(const aFactory: IROClassFactory;
+  const aMessage: IROMessage;
+  const aTransport: IROTransport;
+  out oResponseOptions: TROResponseOptions): boolean;
+begin
+  result := CustomHandleMessage(aFactory, aMessage, aTransport, oResponseOptions);
+end;
+
+procedure TROInvoker.Invoke_RegisterEventClient(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ procedure RegisterEventClient(const ClientID: String; const EventTypes: String); }
+var
+  ClientID: AnsiString;
+  EventTypes: AnsiString;
+begin
+  EventTypes := '';
+  ClientID := '';
+  try
+    __Message.Read('ClientID', TypeInfo(AnsiString), ClientID, []);
+    __Message.Read('EventTypes', TypeInfo(AnsiString), EventTypes, []);
+
+    (__Instance as IROServerEventsBroker).RegisterEventClient(ClientID, EventTypes);
+
+    __Message.InitializeResponseMessage(__Transport, 'Library', 'Service', 'RegisterEventClientResponse');
+    __Message.Finalize;
+
+    __oResponseOptions := [roNoResponse];
+
+  finally
+  end;
+end;
+
+procedure TROInvoker.Invoke_UnregisterEventClient(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ procedure UnregisterEventClient(const ClientID: String; const EventTypes: String); }
+var
+  ClientID: AnsiString;
+  EventTypes: AnsiString;
+begin
+  EventTypes := '';
+  ClientID := '';
+  try
+    __Message.Read('ClientID', TypeInfo(AnsiString), ClientID, []);
+    __Message.Read('EventTypes', TypeInfo(AnsiString), EventTypes, []);
+
+    (__Instance as IROServerEventsBroker).UnregisterEventClient(ClientID, EventTypes);
+
+    __Message.InitializeResponseMessage(__Transport, 'Library', 'Service', 'UnregisterEventClientResponse');
+    __Message.Finalize;
+
+    __oResponseOptions := [roNoResponse];
+
+  finally
+  end;
+end;
+
+procedure TROInvoker.Invoke_GetEventsData(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function GetEventsData(const ClientID: String; out EventsData: Binary): Integer; }
+var
+  ClientID: AnsiString;
+  EventsData: Binary;
+  lResult: Integer;
+begin
+  __oResponseOptions := [];
+  ClientID := '';
+  EventsData := nil;
+  try
+    __Message.Read('ClientID', TypeInfo(AnsiString), ClientID, []);
+
+    lResult := (__Instance as IROServerEventsBroker).GetEventsData(ClientID, EventsData);
+
+    __Message.InitializeResponseMessage(__Transport, 'Library', 'Service', 'GetEventsDataResponse');
+    __Message.Write('Result', TypeInfo(Integer), lResult, []);
+    __Message.Write('EventsData', TypeInfo(Binary), EventsData, []);
+    __Message.Finalize;
+
+  finally
+    EventsData.Free;
+  end;
+end;
+
+procedure TROInvoker.Invoke_RegisterClient(const __Instance: IInterface;
+  const __Message: IROMessage; const __Transport: IROTransport;
+  out __oResponseOptions: TROResponseOptions);
+begin
+  Invoke_RegisterEventClient(__Instance, __Message, __Transport, __oResponseOptions);
+end;
+
+procedure TROInvoker.Invoke_UnregisterClient(const __Instance: IInterface;
+  const __Message: IROMessage; const __Transport: IROTransport;
+  out __oResponseOptions: TROResponseOptions);
+begin
+  Invoke_UnregisterEventClient(__Instance, __Message, __Transport, __oResponseOptions);
+end;
+
+{ TRORemotable }
+
+constructor TRORemotable.Create;
+begin
+  inherited;
+end;
+
+destructor TRORemotable.Destroy;
+begin
+  FreeAndNIL(fRetainedObjects);
+  inherited;
+end;
+
+{$IFDEF DELPHI7UP}
+
+procedure TRORemotable.Synchronize(aMethod: TThreadMethod);
+begin
+  TThread.Synchronize(nil, aMethod);
+end;
+{$ENDIF DELPHI7UP}
+
+function TRORemotable.IsRetained(const anObject: TObject): boolean;
+begin
+  result := (fRetainedObjects<>NIL) and (fRetainedObjects.IndexOf(anObject)>=0)
+end;
+
+procedure TRORemotable.RetainObject(const anObject: TObject);
+begin
+  // Only creates it if necessary
+  if (fRetainedObjects=NIL) then
+    fRetainedObjects := TList.Create;
+
+  fRetainedObjects.Add(anObject);
+end;
+
+procedure TRORemotable.ReleaseObject(const anObject: TObject);
+var idx : integer;
+begin
+  // Only creates it if necessary
+  if (fRetainedObjects=NIL) then Exit;
+
+  idx := fRetainedObjects.IndexOf(anObject);
+  if (idx>=0) then fRetainedObjects.Delete(idx);
+end;
+
+{ TROMessageDispatcher }
+
+constructor TROMessageDispatcher.Create(aCollection: TCollection);
+begin
+  inherited Create(aCollection);
+
+  fEnabled := TRUE;
+  fDispatchers := TROMessageDispatchers(aCollection);
+  fModuleInfoIntf := nil;
+  fMessageIntf := nil;
+end;
+
+destructor TROMessageDispatcher.Destroy;
+begin
+  fModuleInfoIntf := nil;
+  fMessageIntf := nil;
+  Message := nil;
+  inherited;
+end;
+
+function TROMessageDispatcher.ProcessMessage(const aTransport: IROTransport; aRequeststream, aResponsestream: TStream; out oResponseOptions: TROResponseOptions): boolean;
+var
+  lMessage: IROMessage;
+begin
+  lMessage := (MessageIntf as IROMessageCloneable).Clone();
+  result := MainProcessMessage(lMessage, aTransport, aRequeststream, aResponsestream, oResponseOptions);
+end;
+
+function TROMessageDispatcher.GetDisplayName: string;
+begin
+  if (fMessage = nil) then
+    result := '[Unassigned]'
+  else
+    result := fMessage.Name;
+end;
+
+function TROMessageDispatcher.GetMessageIntf: IROMessage;
+begin
+  result := IROMessage(fMessageIntf);
+end;
+
+function TROMessageDispatcher.GetModuleInfoIntf: IROModuleInfo;
+begin
+  result := IROModuleInfo(fModuleInfoIntf)
+end;
+
+procedure TROMessageDispatcher.SetMessage(const Value: TROMessage);
+var
+  ref: IROMessage;
+begin
+  if (Value = fMessage) then Exit;
+
+  if (Value <> nil) then begin
+    if (fDispatchers.FindDuplicate(Value) <> nil) then RaiseError(err_DispatcherAlreadyAssigned, [Value.Name]);
+    if not Value.GetInterface(IROMessage, ref) then RaiseError(err_IROMessageNotSupported, [Value.ClassName]);
+
+    fMessageIntf := pointer(ref);
+    Value.GetInterface(IROModuleInfo, fModuleInfoIntf);
+    Value.FreeNotification(Server);
+
+  end
+  else begin
+    fMessageIntf := nil;
+    fModuleInfoIntf := nil;
+  end;
+
+  fMessage := Value;
+end;
+
+function TROMessageDispatcher.CanHandleMessage(const aTransport: IROTransport; aRequeststream: TStream): boolean;
+begin
+  if (aTransport = nil) or (aRequeststream = nil) then result := fEnabled else // for preventing warnings in FPC
+  result := fEnabled;
+end;
+
+procedure TROMessageDispatcher.Assign(Source: TPersistent);
+var
+  SourceDispatcher: TROMessageDispatcher;
+begin
+  if Source is TROMessageDispatcher then begin
+    SourceDispatcher := TROMessageDispatcher(Source);
+    Name := SourceDispatcher.Name;
+    Message := SourceDispatcher.Message;
+    Enabled := SourceDispatcher.Enabled;
+  end
+  else
+    inherited Assign(Source);
+end;
+
+function TROMessageDispatcher.GetServer: TROServer;
+begin
+  result := fDispatchers.Server;
+end;
+
+{ TROMessageDispatchers }
+
+procedure TROMessageDispatchers.CleanReferences(aMessage: TROMessage);
+var
+  i: integer;
+begin
+  for i := 0 to (Count - 1) do
+    if (Dispatchers[i].Message = aMessage) then begin
+      Dispatchers[i].Message := nil;
+    end;
+end;
+
+constructor TROMessageDispatchers.Create(aServer: TROServer);
+begin
+  inherited Create(GetDispatcherClass);
+  fServer := aServer;
+end;
+
+destructor TROMessageDispatchers.Destroy;
+begin
+  inherited;
+end;
+
+function TROMessageDispatchers.FindDispatcher(const aTransport: IROTransport;
+  aRequestStream: TStream): TROMessageDispatcher;
+var
+  i: integer;
+begin
+  result := nil;
+
+  for i := 0 to (Count - 1) do
+    if Dispatchers[i].CanHandleMessage(aTransport, aRequestStream) then begin
+      result := Dispatchers[i];
+      Break;
+    end;
+end;
+
+function TROMessageDispatchers.DispatcherByName(
+  const aName: string): TROMessageDispatcher;
+var
+  i: integer;
+begin
+  result := nil;
+  for i := 0 to (Count - 1) do
+    if (CompareText(Dispatchers[i].Name, aName) = 0) then begin
+      result := Dispatchers[i];
+      Exit;
+    end;
+end;
+
+function TROMessageDispatchers.FindDuplicate(
+  aMessage: TROMessage): TROMessageDispatcher;
+var
+  i: integer;
+begin
+  result := nil;
+
+  for i := 0 to (Count - 1) do
+    if (Dispatchers[i].Message = aMessage) then begin
+      result := Dispatchers[i];
+      Exit;
+    end;
+end;
+
+function TROMessageDispatchers.GetDispatcher(
+  Index: integer): TROMessageDispatcher;
+begin
+  result := TROMessageDispatcher(inherited Items[Index]);
+end;
+
+function TROMessageDispatchers.GetDispatcherClass: TROMessageDispatcherClass;
+begin
+  result := TROMessageDispatcher;
+end;
+
+function TROMessageDispatchers.GetSupportsMultipleDispatchers: boolean;
+begin
+  result := FALSE;
+end;
+
+{$IFDEF DELPHI6UP}
+
+procedure TROMessageDispatchers.Notify(Item: TCollectionItem;
+  Action: TCollectionNotification);
+begin
+  inherited;
+  if (Action = cnAdded) then begin
+    if not SupportsMultipleDispatchers and (Count > 1) then begin
+
+      (*if (csDesigning in fServer.ComponentState) then begin
+        { TODO: This is really bad. I should probabily just make a component editor and control it in there.
+                The problem is that I cannot find a way to stop a TCollection.Add method gracefully.
+                After this method is called TCollection.InsertItem continues and invokes NotifyDesigner
+                passing Item. That will obviously fail since Item is being freed here... }
+        MessageDlg(Format(err_ServerOnlySupportsOneDispatcher+'.'+#13#10+
+                          'You can ignore the error that Delphi will raise in the IDE after you close this dialog.', [fServer.ClassName]), mtError, [mbOK], 0);
+      end;*)
+
+      FreeAndNIL(Item);
+      RaiseError(err_ServerOnlySupportsOneDispatcher, [])
+    end;
+  end;
+end;
+{$ENDIF DELPHI6UP}
+
+{ TROServer }
+
+constructor TROServer.Create(aOwner: TComponent);
+begin
+  inherited;
+  fDispatchers := GetDispatchersClass.Create(Self);
+end;
+
+destructor TROServer.Destroy;
+begin
+  fDispatchers.Free;
+  inherited;
+end;
+
+procedure TROServer.TriggerReadFromStream(iStream: TStream);
+begin
+  if Assigned(OnReadFromStream) then begin
+    iStream.Position := 0;
+    OnReadFromStream(iStream);
+    iStream.Position := 0;
+  end;
+end;
+
+procedure TROServer.TriggerWriteToStream(iStream: TStream);
+begin
+  if Assigned(OnWriteToStream) then begin
+    iStream.Position := 0;
+    OnWriteToStream(iStream);
+    iStream.Position := 0;
+  end;
+end;
+
+function TROServer.DispatchMessage(const aTransport: IROTransport; aRequeststream, aResponsestream: TStream): boolean;
+var
+  lIgnore: TROResponseOptions;
+begin
+  result := DispatchMessage(aTransport, aRequeststream, aResponsestream, lIgnore);
+end;
+
+function TROServer.DispatchMessage(const aTransport: IROTransport; aRequeststream, aResponsestream: TStream; out oResponseOptions: TROResponseOptions): boolean;
+var
+  dispatcher: TROMessageDispatcher;
+  excstr: string;
+begin
+  result := false;
+  try
+    {aRequeststream.Position := 0;
+    if Assigned(OnReadFromStream) then OnReadFromStream(aRequeststream);
+    aRequeststream.Position := 0;}
+
+    dispatcher := Dispatchers.FindDispatcher(aTransport, aRequeststream);
+
+    if (dispatcher = nil) then RaiseError(err_CannotFindMessageDispatcher, []); // Should never happen! If this happens there's no way to format the exception correctly
+
+    result := IntDispatchMessage(dispatcher, aTransport, aRequeststream, aResponsestream, oResponseOptions);
+
+  except
+    on E: Exception do begin
+      if (E.Message <> '') then
+        excstr := E.Message
+      else
+        excstr := err_UnhandledException;
+      aResponseStream.Write(excstr[1], Length(excstr));
+      TriggerWriteToStream(aResponsestream);
+    end;
+  end;
+
+  aResponsestream.Position := 0; // Just in case
+  {aResponsestream.Position := 0;
+  if Assigned(OnWriteToStream) then OnWriteToStream(aResponsestream);
+  aResponsestream.Position := 0;}
+end;
+
+function TROServer.GetActive: boolean;
+begin
+  result := IntGetActive;
+end;
+
+procedure TROServer.Loaded;
+begin
+  inherited;
+
+  IntSetActive(FALSE);
+  Active := fLoadActive;
+  fDoneAfterLoad := TRUE;
+end;
+
+procedure TROServer.Notification(AComponent: TComponent;
+  Operation: TOperation);
+begin
+  inherited;
+
+  if (Operation = opRemove) then begin
+    if (aComponent is TROMessage) then fDispatchers.CleanReferences(TROMessage(aComponent));
+    //if aComponent = AsyncResponseStorage then AsyncResponseStorage := nil;
+  end;
+end;
+
+procedure TROServer.SetActive(const Value: boolean);
+begin
+  if (csLoading in ComponentState) then begin
+    fDoneAfterLoad := FALSE;
+    fLoadActive := Value
+  end
+
+  else begin
+    if (Value = Active) then Exit;
+
+    case Value of
+      TRUE: if Assigned(fOnBeforeServerActivate) then fOnBeforeServerActivate(Self);
+      FALSE: if Assigned(fOnBeforeServerDeactivate) then fOnBeforeServerDeactivate(Self);
+    end;
+
+    IntSetActive(Value);
+
+    if (Value = Active) then begin
+      case Value of
+        TRUE: if Assigned(fOnAfterServerActivate) then fOnAfterServerActivate(Self);
+        FALSE: if Assigned(fOnAfterServerDeactivate) then fOnAfterServerDeactivate(Self);
+      end;
+    end;
+  end;
+end;
+
+procedure TROServer.SetDispatchers(const Value: TROMessageDispatchers);
+begin
+  fDispatchers := Value;
+end;
+
+function TROServer.GetDispatchersClass: TROMessageDispatchersClass;
+begin
+  result := TROMessageDispatchers;      // Default
+end;
+
+{procedure TROServer.SetAsyncResponseStorage(const Value:TROAsyncResponseStorage);
+begin
+  if fAsyncResponseStorage <> Value then begin
+    fAsyncResponseStorage := Value;
+    if Assigned(fAsyncResponseStorage) then fAsyncResponseStorage.FreeNotification(self);
+  end;
+end;}
+
+function TROServer.IntDispatchMessage(Dispatcher: TROMessageDispatcher;
+  const aTransport: IROTransport; aRequeststream, aResponsestream: TStream;
+  out oResponseOptions: TROResponseOptions): boolean;
+  {$IFDEF REMOBJECTS_UseEncryption}
+var
+  DEncRequest, DUnEncResponse: TMemoryStream;
+  {$ENDIF}
+begin
+  {$IFDEF REMOBJECTS_UseEncryption}
+  if Encryption.EncryptionMethod <> tetNone then begin
+    dEncRequest := TMemoryStream.Create;
+    dUnEncResponse := TMemoryStream.Create;
+    try
+      DoDecryption(aRequeststream, dEncRequest);
+      DEncRequest.Position := 0;
+      TriggerReadFromStream(dEncRequest);
+      result := dispatcher.ProcessMessage(aTransport, dEncRequest, dUnEncResponse, oResponseOptions); // This traps exception and cannot fail
+      TriggerWriteToStream(dUnEncResponse);
+      if roDontEncrypt in oResponseOptions then
+      begin
+        DUnEncResponse.Position := 0;
+        aResponsestream.CopyFrom(DUnEncResponse, DUnEncResponse.Size);
+        aResponsestream.Position := 0;
+      end else
+      DoEncryption(dUnEncResponse, aResponsestream);
+    finally
+      dEncRequest.Free;
+      dUnEncResponse.free;
+    end;
+  end
+  else
+  {$ENDIF}
+  begin
+    TriggerReadFromStream(aRequeststream);
+    result := dispatcher.ProcessMessage(aTransport, aRequeststream, aResponsestream, oResponseOptions); // This traps exception and cannot fail
+    TriggerWriteToStream(aResponsestream);
+  end;
+end;
+
+procedure TROServer.CheckProperties;
+begin
+// nothing
+end;
+
+function TROServer.GetRODLReader: TROCustomRODLReader;
+begin
+  Result:=nil;
+  if Assigned(FOnGetRODLReader) then FOnGetRODLReader(Self,Result);
+end;
+
+{ TROClassFactory }
+
+constructor TROClassFactory.Create(const anInterfaceName: string;
+  aCreatorFunc: TRORemotableCreatorFunc;
+  anInvokerClass: TROInvokerClass);
+begin
+  inherited Create;
+
+  fInvoker := nil;
+  fCreatorFunc := aCreatorFunc;
+  fInterfaceName := anInterfaceName;
+  fInvokerClass := anInvokerClass;
+
+  RegisterClassFactory(Self);
+end;
+
+destructor TROClassFactory.Destroy;
+begin
+  inherited;
+end;
+
+procedure TROClassFactory.CreateInstance(const aClientID: TGUID; out anInstance: IInterface);
+begin
+  fCreatorFunc(anInstance);
+end;
+
+function TROClassFactory.GetInterfaceName: string;
+begin
+  result := fInterfaceName
+end;
+
+function TROClassFactory.GetInvoker: IROInvoker;
+begin
+  if (fInvoker = nil) then fInvoker := fInvokerClass.Create; // Only creates it when really needed
+
+  result := fInvoker;
+end;
+
+procedure TROClassFactory.ReleaseInstance(const aClientID: TGUID; var anInstance: IInterface);
+begin
+  anInstance := nil;
+end;
+
+function FinalizeClasses: boolean;
+begin
+  if IsLibrary then ReleaseClassFactories;
+  result := True;
+end;
+
+procedure ReleaseClassFactories;
+begin
+  FreeAndNil(_ClassFactoryList);
+end;
+
+initialization
+  _ServerClasses := TClassList.Create;
+  _ClassFactoryList := nil;
+  {$IFNDEF DESIGNTIME}
+  AddTerminateProc(FinalizeClasses);
+  {$ENDIF DESIGNTIME}
+  RegisterExceptionClass(EROSendNoResponse);
+finalization
+  UnregisterExceptionClass(EROSendNoResponse);
+  FreeAndNil(_ServerClasses);
+  {$IFDEF DESIGNTIME}
+  ReleaseClassFactories;
+  {$ELSE}
+  if not IsLibrary then ReleaseClassFactories;
+  {$ENDIF DESIGNTIME}
+end.
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROServerIntf.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROServerIntf.pas
new file mode 100644
index 0000000..896dc65
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROServerIntf.pas	
@@ -0,0 +1,162 @@
+unit uROServerIntf;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  {$IFDEF MSWINDOWS}Windows, {$ENDIF}
+  {uRORes,} uROClientIntf, uROTypes, Classes, SysUtils;
+
+type
+  {$IFDEF DELPHI5}
+  { IInterface }
+  IInterface = IUnknown;
+  {$ENDIF}
+
+  IROClassFactory = interface;
+
+  TROResponseOption = (roNoResponse, roDontEncrypt);
+  TROResponseOptions = set of TROResponseOption;
+
+  { IROInvoker }
+  IROInvoker = interface
+  ['{6BF28A4D-1511-4FD0-83C0-0F0A23322ACC}']
+    function HandleMessage(const aFactory : IROClassFactory;
+                            const aMessage : IROMessage;
+                            const aTransport : IROTransport;
+                            out oResponseOptions: TROResponseOptions) : boolean;
+  end;
+
+  { IROClassFactory }
+  IROClassFactory = interface
+  ['{87580688-9994-4EB3-BDB9-E621ED52C3E9}']
+    procedure CreateInstance(const aClientID : TGUID; out anInstance : IInterface);
+    procedure ReleaseInstance(const aClientID: TGUID; var anInstance : IInterface);
+
+    function GetInterfaceName : string;
+    function GetInvoker : IROInvoker;
+
+    property InterfaceName : string read GetInterfaceName;
+    property Invoker : IROInvoker read GetInvoker;
+  end;
+
+  IROPooledClassFactory = interface(IROClassFactory)
+  ['{DB0C4A2B-CA2C-4CDA-A02C-289918B29FA3}']
+    procedure ClearPool;
+  end;
+
+  { IRODispatchNotifier }
+  IRODispatchNotifier = interface
+  ['{C3359706-83B8-4285-866C-D4DD5960B183}']
+    procedure GetDispatchInfo(const aTransport : IROTransport; const aMessage : IROMessage);
+  end;
+
+  { IRODestructorController }
+  IRODestructorController = interface
+  ['{D590AF9A-1029-450B-A8B7-0EC8A93DF7DC}']
+    function CanBeDestroyed : boolean;
+  end;
+
+  { IRODestructorControllerEx }
+  IRODestructorControllerEx = interface(IRODestructorController)
+  ['{2897DFAE-A466-4886-ADC3-9F0D7DD393A8}']
+    procedure SetCanBeDestroyed(Value : boolean);
+  end;
+
+  { IROObjectActivation }
+  IROObjectActivation = interface
+  ['{071ECDF1-A4B0-4333-93B4-EE1B8609FF80}']
+    procedure OnActivate(aClientID: TGUID; const aMessage : IROMessage);
+    procedure OnDeactivate(aClientID: TGUID);
+  end;
+
+  { IROObjectTimeout }
+  IROObjectTimeout = interface
+  ['{DC7FC0CB-D3C6-4CA7-8F71-57ECE1392594}']
+    procedure OnTimeout;
+  end;
+
+  { IROServerEventsBroker }
+  IROServerEventsBroker = interface
+    ['{5B6A3449-3B13-4B0A-B1FF-B2FAA18D57B1}']
+    procedure RegisterEventClient(const ClientID, EventTypes : Ansistring);
+    procedure UnregisterEventClient(const ClientID, EventTypes : Ansistring);
+
+    function GetEventsData(const ClientID : Ansistring; out EventsData : Binary) : integer;
+  end;
+
+  TROEventData = class;
+
+  IROActiveEventServer = interface
+    ['{DD0B0C09-2D17-46EA-8110-E7BEE9B8AB7B}']
+    procedure EventsRegistered(aSender : TObject; aClient: TGUID);
+    procedure DispatchEvent(anEventDataItem : TROEventData; aSessionReference : TGUID; aSender: TObject); // asender is TROEventRepository
+  end;
+
+  { TROEventData }
+  TROEventData = class
+  private
+    fData: TStream;
+    fRefCount: integer;
+//    fShouldRemoveFromOwner: Boolean;
+  protected
+  public
+    constructor Create(anEventDataStream : TMemoryStream);
+    destructor Destroy; override;
+
+    function AddRef : integer;
+    function RemoveRef : integer;
+//    property ShouldRemoveFromOwner: Boolean read fShouldRemoveFromOwner write fShouldRemoveFromOwner;
+
+    property Data : TStream read fData;
+  end;
+
+
+
+implementation
+{uses
+  uROClasses;}
+
+{ TROEventData }
+
+function TROEventData.AddRef : integer;
+begin
+  result := InterlockedIncrement(fRefCount);
+end;
+
+constructor TROEventData.Create(anEventDataStream : TMemoryStream);
+begin
+  inherited Create;
+  fRefCount := 1;
+//  fShouldRemoveFromOwner := true;
+  fData := TMemoryStream.Create;
+  anEventDataStream.Position := 0;
+  fData.CopyFrom(anEventDataStream, anEventDataStream.Size);
+end;
+
+destructor TROEventData.Destroy;
+begin
+  FreeAndNIL(fData);
+  inherited;
+end;
+
+function TROEventData.RemoveRef : integer;
+begin
+  result := InterlockedDecrement(fRefCount);
+end;
+
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROServerMultiMessage.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROServerMultiMessage.pas
new file mode 100644
index 0000000..54e85ae
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROServerMultiMessage.pas	
@@ -0,0 +1,425 @@
+unit uROServerMultiMessage;
+
+{$I RemObjects.inc}
+interface
+uses
+  SysUtils, Classes, TypInfo,
+  uROClientIntf, uROSerializer, uROClient;
+
+type
+  TROServerMultiMessage = class;
+  TROServerMultiMessageCollectionItem = class(TCollectionItem)
+  private
+    FMessage: TROMessage;
+    procedure SetMessage(const Value: TROMessage);
+  protected
+    function GetDisplayName: string; override;
+  public
+    procedure Assign(Source: TPersistent); override;
+  published
+    property Message: TROMessage read FMessage write SetMessage;
+  end;
+
+  TROServerMultiMessageCollection = class(TCollection)
+  private
+    FOwner: TROServerMultiMessage;
+    function GetItems(Index: integer): TROServerMultiMessageCollectionItem;
+  public
+    procedure Notify(Item: TCollectionItem; Action: TCollectionNotification); override;
+    constructor Create(aOwner: TROServerMultiMessage);
+    function FindItemByMessage(AMessage: TROMessage): TROServerMultiMessageCollectionItem;
+    property Items[Index: integer]: TROServerMultiMessageCollectionItem read GetItems; default;
+  end;
+
+  TROServerMultiMessage = class(TROMessage)
+  private
+    FSupportedMessages: TROServerMultiMessageCollection;
+    FDefaultMessage: TROMessage;
+    FDefaultMessageIndex: integer;
+    FNeedInitializeRead:boolean;
+    fTransport: IROTransport;
+    procedure DetectMessageFromStream(aStream: TStream);
+    procedure SetSupportedMessages(const Value: TROServerMultiMessageCollection);
+    function InternalIsValidMessage(aData: PAnsiChar; aLength: Integer): integer;
+    procedure SetDefaultMessageIndex(const Value: integer);
+    function intGetDefaultMessage:TROMessage;
+    function GetSupportedMessages: TROServerMultiMessageCollection;
+  protected
+    function GetClientID : TGUID; override;
+    procedure SetClientID(const Value : TGUID); override;
+    function DefaultMessage: IROMessage;
+    function QueryInterface(const IID: TGUID; out Obj): HResult; override; stdcall;
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+    { Internals }
+    function ReadException: Exception; override;
+    procedure InitObject; override;
+
+    function CreateSerializer: TROSerializer; override;
+
+    { IROMessage }
+    procedure Initialize(const aTransport: IROTransport; const anInterfaceName, aMessageName: string; aType: TMessageType); override;
+    procedure Initialize(const aTransport: IROTransport; const aLibraryName, anInterfaceName, aMessageName: string; aType: TMessageType); override;
+    procedure Finalize; override;
+
+{$IFDEF DOTNET}
+{$ELSE}
+    procedure Write(const aName: string; aTypeInfo: PTypeInfo; const Ptr; Attributes: TParamAttributes); override;
+    procedure Read(const aName: string; aTypeInfo: PTypeInfo; var Ptr; Attributes: TParamAttributes); override;
+{$ENDIF}
+
+    procedure WriteToStream(aStream: TStream); override;
+    procedure ReadFromStream(aStream: TStream); override;
+    procedure ReadFromStream(aStream: TStream; var aFreeStream: Boolean); override;
+    function GetMessageType: TMessageType; override;
+    procedure WriteException(aStream: TStream; anException: Exception); override;
+    procedure FreeStream; override;
+    procedure InitializeRead(const aTransport: IROTransport); override;
+  public
+    destructor Destroy; override;
+    procedure Assign(iSource: TPersistent); override;
+    procedure CheckProperties; override;
+    function IsValidMessage(aData: PAnsiChar; aLength: Integer): boolean; override;
+  published
+    property SupportedMessages: TROServerMultiMessageCollection read GetSupportedMessages write SetSupportedMessages;
+    property DefaultMessageIndex: integer read FDefaultMessageIndex write SetDefaultMessageIndex default -1;
+  end;
+
+implementation
+uses
+  uROClasses, uRORes;
+
+{ TROServerMultiMessage }
+
+procedure TROServerMultiMessage.Assign(iSource: TPersistent);
+begin
+  inherited;
+  if Assigned(iSource) then begin
+    if not (iSource is TROServerMultiMessage) then RaiseError('Cannot Assign a %s t a %s', [ClassName, iSource.ClassName]);
+    self.SupportedMessages := (iSource as TROServerMultiMessage).SupportedMessages;
+    Self.DefaultMessageIndex := (iSource as TROServerMultiMessage).DefaultMessageIndex;
+  end;
+end;
+
+procedure TROServerMultiMessage.CheckProperties;
+var
+  lMessage: TROMessage;
+begin
+  lMessage:= intGetDefaultMessage;
+  Check(lMessage = nil, Name + '. Can not detect default message'); //???
+  lMessage.CheckProperties;
+  inherited;
+end;
+
+function TROServerMultiMessage.CreateSerializer: TROSerializer;
+begin
+  Result := nil;
+end;
+
+function TROServerMultiMessage.DefaultMessage: IROMessage;
+begin
+  CheckProperties;
+  Result := intGetDefaultMessage;
+  if FNeedInitializeRead then begin
+    Result.InitializeRead(fTransport);
+    fTransport:=nil;
+    FNeedInitializeRead:= False;
+  end;
+end;
+
+destructor TROServerMultiMessage.Destroy;
+begin
+  FSupportedMessages.Free;
+  inherited;
+end;
+
+procedure TROServerMultiMessage.DetectMessageFromStream(aStream: TStream);
+const
+  BufSize = 100;
+var
+  i: integer;
+  buf: PAnsichar;
+  currentBufSize: int64;
+begin
+  FDefaultMessage := nil;
+  aStream.Position := 0;
+
+  if aStream.Size > bufsize then
+    currentBufSize := BufSize
+  else
+    currentBufSize := aStream.Size;
+
+  GetMem(buf, currentBufSize);
+  try
+    aStream.Read(buf^, currentBufSize);
+    if copy(AnsiString(Buf),1,6) = AnsiString('rorock') then RaiseInvalidStreamError(err_InvalidHeaderEncrypted, [], aStream);
+    i := InternalIsValidMessage(buf, currentBufSize);
+    if i <> -1 then FDefaultMessage := SupportedMessages[i].Message;
+    Check(intGetDefaultMessage = nil, Name + '. Can not find the valid Message for stream.' + sLineBreak +{$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(Ansistring(buf)));
+  finally
+    aStream.Position := 0;
+    FreeMem(buf);
+  end;
+end;
+
+procedure TROServerMultiMessage.Finalize;
+begin
+  DefaultMessage.Finalize;
+  inherited;
+end;
+
+procedure TROServerMultiMessage.FreeStream;
+begin
+  DefaultMessage.FreeStream;
+  inherited;
+end;
+
+function TROServerMultiMessage.GetClientID: TGUID;
+var
+  lMessage: TROMessage;
+begin
+  lMessage := intGetDefaultMessage;
+  if lMessage <> nil then
+    Result := lMessage.ClientID
+  else
+    Result := inherited GetClientID;
+end;
+
+function TROServerMultiMessage.GetMessageType: TMessageType;
+begin
+  Result := DefaultMessage.MessageType;
+end;
+
+procedure TROServerMultiMessage.Initialize(const aTransport: IROTransport;
+  const anInterfaceName, aMessageName: string; aType: TMessageType);
+begin
+  inherited Initialize(aTransport, anInterfaceName, aMessageName, aType);
+  DefaultMessage.Initialize(aTransport, anInterfaceName, aMessageName, aType);
+end;
+
+function TROServerMultiMessage.GetSupportedMessages: TROServerMultiMessageCollection;
+begin
+  if FSupportedMessages = nil then FSupportedMessages := TROServerMultiMessageCollection.Create(Self);
+  Result := FSupportedMessages;
+end;
+
+procedure TROServerMultiMessage.Initialize(const aTransport: IROTransport;
+  const aLibraryName, anInterfaceName, aMessageName: string;
+  aType: TMessageType);
+begin
+  inherited Initialize(aTransport, anInterfaceName, aMessageName, aType);
+  DefaultMessage.Initialize(aTransport, aLibraryName, anInterfaceName, aMessageName, aType);
+end;
+
+procedure TROServerMultiMessage.InitializeRead(
+  const aTransport: IROTransport);
+begin
+  inherited;
+  FNeedInitializeRead:=True;
+  fTransport := aTransport;
+end;
+
+procedure TROServerMultiMessage.InitObject;
+begin
+  inherited;
+  FDefaultMessageIndex := -1;
+  FNeedInitializeRead:=False;
+  fTransport := nil;
+end;
+
+function TROServerMultiMessage.InternalIsValidMessage(aData: PAnsiChar;
+  aLength: Integer): integer;
+begin
+  for Result := 0 to SupportedMessages.Count - 1 do
+    with SupportedMessages[Result] do
+      if (Message <> nil) and Message.IsValidMessage(aData, aLength) then Exit;
+  Result := -1;
+end;
+
+function TROServerMultiMessage.intGetDefaultMessage: TROMessage;
+begin
+  Result := FDefaultMessage;
+  if (Result = nil) and (FDefaultMessageIndex >=0) and (FDefaultMessageIndex < SupportedMessages.Count) then
+    Result := SupportedMessages[FDefaultMessageIndex].Message;
+end;
+
+function TROServerMultiMessage.IsValidMessage(aData: PAnsiChar;
+  aLength: Integer): boolean;
+begin
+  Result := InternalisValidMessage(aData, aLength) <> -1;
+end;
+
+procedure TROServerMultiMessage.Notification(AComponent: TComponent;
+  Operation: TOperation);
+var
+  item: TROServerMultiMessageCollectionItem;
+begin
+  inherited;
+  if (Operation = opRemove) then begin
+    if (AComponent is TROMessage) and (SupportedMessages.Count > 0) then begin
+      Item := SupportedMessages.FindItemByMessage(AComponent as TROMessage);
+      if Item <> nil then Item.Message := nil;
+    end;
+  end
+end;
+
+function TROServerMultiMessage.QueryInterface(const IID: TGUID;
+  out Obj): HResult;
+var
+  lMessage: TROMessage;
+begin
+  Result := inherited QueryInterface(IID, Obj);
+  if Result = E_NOINTERFACE then begin
+    lMessage:= intGetDefaultMessage;
+    if lMessage <> nil then Result := (lMessage as IROMessage).QueryInterface(IID, Obj);
+  end;
+end;
+
+procedure TROServerMultiMessage.Read(const aName: string;
+  aTypeInfo: PTypeInfo; var Ptr; Attributes: TParamAttributes);
+begin
+  DefaultMessage.Read(aName, aTypeInfo, Ptr, Attributes);
+  if Assigned(OnReadMessageParameter) then OnReadMessageParameter(Self, aName, aTypeInfo, pointer(Ptr), Attributes);
+end;
+
+function TROServerMultiMessage.ReadException: Exception;
+begin
+  // not called from ROServerMultiMessage
+  Result := nil;
+end;
+
+procedure TROServerMultiMessage.ReadFromStream(aStream: TStream);
+var
+  lMessage: IROMessage;
+begin
+  inherited;
+  DetectMessageFromStream(aStream);
+  lMessage := DefaultMessage;
+  lMessage.ReadFromStream(aStream);
+  InterfaceName := lMessage.InterfaceName;
+  MessageName := lMessage.MessageName;
+end;
+
+procedure TROServerMultiMessage.ReadFromStream(aStream: TStream;
+  var aFreeStream: Boolean);
+var
+  lMessage: IROMessage;
+begin
+  inherited;
+  DetectMessageFromStream(aStream);
+  lMessage := DefaultMessage;
+  lMessage.ReadFromStream(aStream, aFreeStream);
+  InterfaceName := lMessage.InterfaceName;
+  MessageName := lMessage.MessageName;
+end;
+
+procedure TROServerMultiMessage.SetClientID(const Value: TGUID);
+var
+  lMessage: TROMessage;
+begin
+  lMessage:= intGetDefaultMessage;
+  if lMessage <> nil then
+    lMessage.ClientID := Value
+  else
+    inherited SetClientID(Value);
+end;
+
+procedure TROServerMultiMessage.SetDefaultMessageIndex(
+  const Value: integer);
+begin
+  if Value >= SupportedMessages.Count then raise Exception.Create(err_IndexOutOfBounds);
+  FDefaultMessageIndex := Value;
+end;
+
+procedure TROServerMultiMessage.SetSupportedMessages(
+  const Value: TROServerMultiMessageCollection);
+begin
+  SupportedMessages.Assign(Value);
+end;
+
+procedure TROServerMultiMessage.Write(const aName: string;
+  aTypeInfo: PTypeInfo; const Ptr; Attributes: TParamAttributes);
+begin
+  if Assigned(OnWriteMessageParameter) then OnWriteMessageParameter(Self, aName, aTypeInfo, pointer(Ptr), Attributes);
+  DefaultMessage.Write(aName, aTypeInfo, Ptr, Attributes);
+end;
+
+procedure TROServerMultiMessage.WriteException(aStream: TStream;
+  anException: Exception);
+begin
+  DefaultMessage.WriteException(aStream, anException);
+  inherited;
+end;
+
+procedure TROServerMultiMessage.WriteToStream(aStream: TStream);
+begin
+  DefaultMessage.WriteToStream(aStream);
+  inherited;
+end;
+
+{ TROServerMultiMessageCollectionItem }
+
+procedure TROServerMultiMessageCollectionItem.Assign(Source: TPersistent);
+begin
+  if Source is TROServerMultiMessageCollectionItem then begin
+    Message := TROServerMultiMessageCollectionItem(Source).Message;
+  end
+  else
+    inherited Assign(Source);
+end;
+
+function TROServerMultiMessageCollectionItem.GetDisplayName: string;
+begin
+  if FMessage <> nil then
+    Result := FMessage.Name + ' (' + FMessage.ClassName + ')'
+  else
+    Result := '[Unassigned]';
+end;
+
+procedure TROServerMultiMessageCollectionItem.SetMessage(
+  const Value: TROMessage);
+begin
+  if (FMessage <> Value) then begin
+    if Value <> nil then Check(Value is TROServerMultiMessage, Value.Name + ' can not be used here.');
+    FMessage := Value;
+    if (FMessage <> nil) then FMessage.FreeNotification(TROServerMultiMessageCollection(inherited Collection).FOwner);
+  end;
+end;
+
+{ TROServerMultiMessageCollection }
+
+constructor TROServerMultiMessageCollection.Create(
+  aOwner: TROServerMultiMessage);
+begin
+  inherited Create(TROServerMultiMessageCollectionItem);
+  FOwner := aOwner;
+end;
+
+function TROServerMultiMessageCollection.FindItemByMessage(
+  AMessage: TROMessage): TROServerMultiMessageCollectionItem;
+var
+  i: integer;
+begin
+  Result := nil;
+  for i := 0 to Count - 1 do
+    if Items[i].Message = AMessage then begin
+      Result := Items[i];
+      Break;
+    end;
+end;
+
+function TROServerMultiMessageCollection.GetItems(
+  Index: integer): TROServerMultiMessageCollectionItem;
+begin
+  Result := TROServerMultiMessageCollectionItem(inherited Items[Index]);
+end;
+
+procedure TROServerMultiMessageCollection.Notify(Item: TCollectionItem;
+  Action: TCollectionNotification);
+begin
+  inherited;
+  if (Action = cnDeleting) and (FOwner <> nil) and (FOwner.FDefaultMessageIndex >= Count) then
+    FOwner.FDefaultMessageIndex:= Count-1;
+end;
+
+end.
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROServiceComponent.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROServiceComponent.pas
new file mode 100644
index 0000000..1c4fea4
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROServiceComponent.pas	
@@ -0,0 +1,27 @@
+unit uROServiceComponent {$IFNDEF FPC}deprecated{$ENDIF};
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  uRORemoteService;
+
+type
+  TROServiceComponent = TRORemoteService {$IFDEF DELPHI10UP}deprecated{$ENDIF};
+
+implementation
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSessions.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSessions.pas
new file mode 100644
index 0000000..2462596
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSessions.pas	
@@ -0,0 +1,1026 @@
+unit uROSessions;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  {$IFDEF VER140UP}Variants,{$ENDIF}
+  Classes, SysUtils, SyncObjs, uROClientIntf,
+  uROClient, uROClasses, uROTypes{, Contnrs};
+
+const DEFBUFFSIZE = 4096;
+
+type { Misc }
+     TROCustomSessionManager = class;
+
+     PVariantItem = ^TVariantItem;
+     TVariantItem = record
+       Name : string;
+       Value : Variant;
+     end;
+
+     { TROVariantList }
+     TROVariantList = class(TStringList)
+     private
+       function GetValueNames(Index: integer): string;
+       function GetValues(const aName: string): Variant;
+       procedure SetValues(const aName: string; const Value: Variant);
+       function GetItems(Index: integer): PVariantItem;
+       procedure SetValueNames(Index: integer; const Value: string);
+
+     protected
+     public
+       constructor Create;
+       destructor Destroy; override;
+
+       procedure Clear; override;
+       procedure Add(const aName : string; const aValue : Variant); reintroduce;
+
+       procedure Delete(const aName : string); reintroduce; overload;
+       procedure Delete(Index : integer); reintroduce; overload; 
+
+       property Values[const aName : string] : Variant read GetValues write SetValues; default;
+       property ValueNames[Index : integer] : string read GetValueNames write SetValueNames;
+       property Items[Index : integer] : PVariantItem read GetItems;
+     end;
+
+     { ToDo -cRO3: Add an *optional* Critical Section object to the session so the user
+       can easily make Sessions threadsafe (for access to the SAME session by multiple
+       threads/client-requests) if needed. This should remain turned off by default. }
+
+     { TROSession }
+     TROSession = class
+     private
+       fCreated: TDateTime;
+       fLastAccessed: TDateTime;
+       fSessionID: TGUID;
+       fValues : TROVariantList;
+
+     protected
+       function GetCount: integer; virtual;
+       function GetNames(Index: integer): string; virtual;
+       function GetValues(const Name: string): Variant; virtual;
+       procedure SetNames(Index: integer; const Value: string); virtual;
+       procedure SetValues(const Name: string; const Value: Variant); virtual;
+
+     public
+       constructor Create(const aSessionID : TGUID); virtual;
+       destructor Destroy; override;
+
+       procedure LoadFromStream(aStream : TStream; OnlyValues : boolean = FALSE); virtual;
+       procedure SaveToStream(aStream : TStream; OnlyValues : boolean = FALSE); virtual;
+
+       procedure SaveStruct(aStruct : TROComplexType);
+
+       property SessionID : TGUID read fSessionID;
+       property Created : TDateTime read fCreated write fCreated;
+       property LastAccessed : TDateTime read fLastAccessed write fLastAccessed;
+       property Values[const Name : string] : Variant read GetValues write SetValues; default;
+       property Names[Index : integer] : string read GetNames write SetNames;
+       property Count : integer read GetCount;
+     end;
+
+     TROSessionClass = class of TROSession;
+
+     { TROSessionList }
+     TROSessionList = class
+     private
+       fList: TStringList;
+
+       function GetCount: integer;
+       function GetSessions(Index: integer): TROSession;
+
+     protected
+     public
+       constructor Create;
+       destructor Destroy; override;
+
+       procedure Clear;
+
+       procedure Add(aSession: TROSession); overload;
+       function Add(aSessionId: TGUID): TROSession; overload;
+
+       procedure Delete(aIndex: integer);
+
+       function GetSessionIndex(aSessionId: TGUID): integer;
+       function SessionById(aSessionId: TGUID): TROSession;
+
+       property Sessions[Index: integer]: TROSession read GetSessions;
+       property Count: integer read GetCount;
+     end;
+
+     { TROCustomSessionManager }
+     TROMaxSessionsReachedEvent = procedure (var aFail: Boolean) of object;
+     TSessionEvent = procedure(const aSession : TROSession) of object;
+     TROSessionExceptionEvent = procedure (aSessionID : TGUID; anException: Exception; var aRetry: Boolean) of object;
+     TDeleteSessionEvent = procedure(const aSessionID : TGUID; IsExpired : boolean) of object;
+     TROCustomSessionCreationEvent = procedure (const aSessionID : TGUID; var Session : TROSession) of object;
+
+     TROSessionsActions = (saAdd, saDelete, saTmpSessionDelete, saRelease, saRemoveActiveListener);
+
+     IROSessionsChangesListener = interface ['{A964942D-699F-48FD-ADA5-1E4720E0150E}']
+       procedure SessionsChangedNotification(const aSessionID : TGUID; aSessionAction: TROSessionsActions; Sender: TObject);
+     end;
+
+     IROSessionsChangesNotifier = interface ['{71F4384A-0F8A-4783-863B-D61A3BD85E12}']
+       procedure RegisterSessionsChangesListener(aListener: IROSessionsChangesListener);
+       procedure UnRegisterSessionsChangesListener(aListener: IROSessionsChangesListener);
+     end;
+
+     TROCustomSessionManager = class(TROComponent, IROSessionsChangesNotifier)
+     private
+       fMaxSessions: integer;
+       fSessionDuration: integer;       
+       fClearing : boolean;
+       fOnSessionCreated: TSessionEvent;
+       fTimer : TROThreadTimer;
+       fSessionChangesListeners: TInterfaceList;
+       FOnBeforeDeleteSession: TDeleteSessionEvent;
+       fOnSessionDeleted: TDeleteSessionEvent;
+       fOnCustomCreateSession: TROCustomSessionCreationEvent;
+       fOnMaxSessionsReached: TROMaxSessionsReachedEvent;
+       fSessionCheckInterval: Integer;
+       fOnException: TROSessionExceptionEvent;
+       fInDeleteSession: Boolean;
+       procedure SetSessionCheckInterval(const Value: Integer);
+     protected
+       fCritical : TCriticalSection;
+     protected
+       { IROSessionsChangesNotifier }
+
+       procedure RegisterSessionsChangesListener(aListener: IROSessionsChangesListener); virtual;
+       procedure UnRegisterSessionsChangesListener(aListener: IROSessionsChangesListener); virtual;
+
+       procedure DoNotifySessionsChangesListener(const aSessionID : TGUID; aSessionAction: TROSessionsActions; Sender: TObject); virtual;
+
+       function DoCreateSession(const aSessionID : TGUID) : TROSession; virtual;
+       function DoCheckSessionIsExpired(aSession : TROSession) : boolean; virtual;
+
+       procedure DoTimerTick(CurrentTickCount : cardinal); virtual;
+
+       function DoFindSession(const aSessionID : TGUID; aUpdateTime: Boolean) : TROSession; virtual; abstract;
+       procedure DoDeleteSession(const aSessionID : TGUID; IsExpired : boolean); virtual; abstract;
+       procedure DoReleaseSession(aSession : TROSession; NewSession : boolean); virtual;
+       procedure DoClearSessions(OnlyExpired : boolean); virtual; abstract;
+       function DoGetSessionCount : integer; virtual; abstract;
+       procedure DoGetAllSessions(Dest: TStringList); virtual;
+
+       procedure Loaded; override;
+
+       procedure KillTimer;
+
+       property Clearing : boolean read fClearing;
+       property SessionDuration : integer read fSessionDuration write fSessionDuration default 15;
+       property SessionCheckInterval : Integer read fSessionCheckInterval write SetSessionCheckInterval default 15;
+     public
+       constructor Create(aOwner : TComponent); override;
+       destructor Destroy; override;
+
+       // Session management routines
+       function CreateSession(const aSessionID : TGUID) : TROSession;
+       function FindSession(const aSessionID : TGUID; aUpdateTime: Boolean = True) : TROSession;
+       procedure DeleteSession(const aSessionID : TGUID; IsExpired : boolean);
+       procedure DeleteTemporarySession(var Session : TROSession);
+       procedure ReleaseSession(var aSession : TROSession; NewSession : boolean);
+       procedure ClearSessions(OnlyExpired : boolean);
+       function CheckSessionIsExpired(aSession : TROSession) : boolean;
+       function GetSessionCount : integer;
+       procedure GetAllSessions(Dest: TStringList);
+       property Critical : TCriticalSection read fCritical;
+       procedure CheckProperties; virtual;
+     published
+       property OnMaxSessionsReached: TROMaxSessionsReachedEvent read fOnMaxSessionsReached write fOnMaxSessionsReached;
+       property MaxSessions : integer read fMaxSessions write fMaxSessions default -1;
+
+       property OnCustomCreateSession : TROCustomSessionCreationEvent read fOnCustomCreateSession write fOnCustomCreateSession;
+       property OnSessionCreated : TSessionEvent read fOnSessionCreated write fOnSessionCreated;
+       property OnBeforeDeleteSession: TDeleteSessionEvent read FOnBeforeDeleteSession write FOnBeforeDeleteSession;
+       property OnSessionDeleted : TDeleteSessionEvent read fOnSessionDeleted write fOnSessionDeleted;
+       property OnException : TROSessionExceptionEvent read fOnException write fOnException;
+     end;
+
+     { TROEventSessionManager }
+     TFindSessionEvent = procedure(const aSessionID : TGUID; out aSession: TROSession) of object;
+     TReleaseSessionEvent = procedure(var aSession : TROSession; NewSession : boolean) of object;
+     TClearSessionsEvent = procedure(SessionManager : TROCustomSessionManager; OnlyExpired : boolean) of object;
+     TGetSessionCountEvent = function(SessionManager : TROCustomSessionManager) : integer of object;
+     TGetAllSessionsEvent = procedure (SessionManager : TROCustomSessionManager; aDest: TStringList) of object;
+
+     TROEventSessionManager = class(TROCustomSessionManager)
+     private
+       fOnFindSession: TFindSessionEvent;
+       fOnDeleteSession: TDeleteSessionEvent;
+       fOnReleaseSession: TReleaseSessionEvent;
+       fOnClearSessions: TClearSessionsEvent;
+       fOnGetSessionCount: TGetSessionCountEvent;
+       fOnGetAllSessions: TGetAllSessionsEvent;
+
+     protected
+       function DoFindSession(const aSessionID : TGUID; aUpdateTime: Boolean) : TROSession; override;
+       procedure DoDeleteSession(const aSessionID : TGUID; IsExpired : boolean); override;
+       procedure DoReleaseSession(aSession : TROSession; NewSession : boolean); override;
+       procedure DoClearSessions(OnlyExpired : boolean); override;
+       function DoGetSessionCount : integer; override;
+       procedure DoGetAllSessions(Dest: TStringList); override;
+
+     public
+
+     published
+       property OnDeleteSession : TDeleteSessionEvent read fOnDeleteSession write fOnDeleteSession;
+       property OnFindSession : TFindSessionEvent read fOnFindSession write fOnFindSession;
+       property OnReleaseSession : TReleaseSessionEvent read fOnReleaseSession write fOnReleaseSession;
+       property OnClearSessions : TClearSessionsEvent read fOnClearSessions write fOnClearSessions;
+       property OnGetSessionCount : TGetSessionCountEvent read fOnGetSessionCount write fOnGetSessionCount;
+       property OnGetAllSessions: TGetAllSessionsEvent read fOnGetAllSessions write fOnGetAllSessions;
+       property SessionDuration;
+       property SessionCheckInterval;
+     end;
+
+     { TROInMemorySessionManager }
+     TROInMemorySessionManager = class(TROCustomSessionManager)
+     protected
+       fSessionList : TStringList;
+       function DoFindSession(const aSessionID : TGUID; aUpdateTime: Boolean) : TROSession; override;
+       procedure DoDeleteSession(const aSessionID : TGUID; IsExpired : boolean); override;
+       procedure DoClearSessions(OnlyExpired : boolean); override;
+       procedure DoReleaseSession(aSession : TROSession; NewSession : boolean); override;
+       function DoGetSessionCount : integer; override;
+       procedure DoGetAllSessions(Dest: TStringList); override;
+
+     public
+       constructor Create(aOwner : TComponent); override;
+       destructor Destroy; override;
+
+     published
+       property SessionDuration;
+       property SessionCheckInterval;
+     end;
+
+implementation
+
+uses
+  uRORes, uROBinaryHelpers,
+  {$IFDEF DELPHI5}
+  Windows, ComObj; { for StringToGuid in Delphi 5 }
+  {$ELSE}
+  DateUtils;
+  {$ENDIF DELPHI6UP}
+
+{ TROVariantList }
+constructor TROVariantList.Create;
+begin
+  inherited;
+
+  Sorted := TRUE;
+  Duplicates := dupError;
+end;
+
+destructor TROVariantList.Destroy;
+begin
+  Clear;
+
+  inherited;
+end;
+
+procedure TROVariantList.Add(const aName: string; const aValue: Variant);
+var 
+  item : PVariantItem;
+begin
+  New(Item);
+  try
+    inherited AddObject(aName, TObject(item));
+
+    item^.Name := aName;
+    item^.Value := aValue;
+  except
+    Dispose(item);
+    raise;
+  end;
+end;
+
+procedure TROVariantList.Delete(const aName: string);
+var 
+  idx : integer;
+begin
+  idx := IndexOf(aName);
+  if (idx>=0) then Delete(idx);
+end;
+
+function TROVariantList.GetItems(Index: integer): PVariantItem;
+begin
+  result := PVariantItem(inherited Objects[Index]);
+end;
+
+function TROVariantList.GetValueNames(Index: integer): string;
+begin
+  result := inherited Strings[Index]
+end;
+
+function TROVariantList.GetValues(const aName: string): Variant;
+var 
+  idx : integer;
+begin
+  idx := IndexOf(aName);
+  if (idx>=0) then 
+    result := PVariantItem(inherited Objects[idx])^.Value
+  else 
+    result := Null;
+end;
+
+procedure TROVariantList.SetValues(const aName: string;
+  const Value: Variant);
+var 
+  idx : integer;
+begin
+  idx := IndexOf(aName);
+  if (idx>=0) then 
+    PVariantItem(inherited Objects[idx])^.Value := Value
+  else 
+    Add(aName, Value);
+end;
+
+procedure TROVariantList.Clear;
+var 
+  i : integer;
+begin
+  for i := 0 to (Count-1) do
+    Dispose(PVariantItem(inherited Objects[i]));
+
+  inherited Clear;
+end;
+
+procedure TROVariantList.Delete(Index: integer);
+begin
+  Dispose(PVariantItem(Objects[Index]));
+  inherited Delete(Index);
+end;
+
+procedure TROVariantList.SetValueNames(Index: integer;
+  const Value: string);
+begin
+  inherited Strings[Index] := Value
+end;
+
+
+{ TROSession }
+
+constructor TROSession.Create(const aSessionID: TGUID);
+begin
+  inherited Create;
+
+  fValues := TROVariantList.Create;
+  fSessionID := aSessionID;
+  fCreated := Now;
+  fLastAccessed := Now;
+end;
+
+destructor TROSession.Destroy;
+begin
+  fValues.Free;
+  inherited;
+end;
+
+function TROSession.GetCount: integer;
+begin
+  result := fValues.Count
+end;
+
+function TROSession.GetNames(Index: integer): string;
+begin
+  result := fValues.ValueNames[Index]
+end;
+
+function TROSession.GetValues(const Name: string): Variant;
+begin
+  result := fValues.Values[Name]
+end;
+
+procedure TROSession.SetNames(Index: integer; const Value: string);
+begin
+  fValues.ValueNames[Index] := Value
+end;
+
+procedure TROSession.SetValues(const Name: string; const Value: Variant);
+begin
+  fValues[Name] := Value
+end;
+
+procedure TROSession.LoadFromStream(aStream: TStream; OnlyValues : boolean = FALSE);
+var 
+  i : integer;
+  nme : string;
+  val : Variant;
+begin
+  fValues.Clear;
+
+  Check((aStream=NIL), 'Invalid stream');
+  if (aStream.Size=0) then 
+    Exit 
+  else 
+    aStream.Position := 0;
+
+  if not OnlyValues then begin
+    fSessionID := StringToGUID(ReadVariantFromBinary(aStream));
+    fCreated := ReadVariantFromBinary(aStream);
+    fLastAccessed := ReadVariantFromBinary(aStream);
+  end;
+
+  val := ReadVariantFromBinary(aStream);
+
+  for i := 0 to Integer(Val) -1 do begin
+    nme := ReadVariantFromBinary(aStream);
+    val := ReadVariantFromBinary(aStream);
+
+    Values[nme] := val;
+  end;
+end;
+
+procedure TROSession.SaveToStream(aStream: TStream; OnlyValues : boolean = FALSE);
+var 
+  i : integer;
+begin
+  Check(aStream=NIL, 'Invalid stream');
+
+  aStream.Position := 0;
+
+  if not OnlyValues then begin
+    WriteVariantToBinary(GUIDToString(fSessionID), aStream);
+    WriteVariantToBinary(fCreated ,aStream);
+    WriteVariantToBinary(fLastAccessed ,aStream);
+  end;
+
+  WriteVariantToBinary(Count ,aStream);
+
+  for i := 0 to (Count-1) do begin
+    WriteVariantToBinary(fValues.ValueNames[i], aStream);
+    WriteVariantToBinary(fValues.Items[i]^.Value, aStream);
+  end;
+end;
+
+procedure TROSession.SaveStruct(aStruct: TROComplexType);
+var 
+  i : integer;
+begin
+  if aStruct=NIL then Exit;
+
+  for i := 0 to (aStruct.FieldCount-1) do begin
+    Values[aStruct.FieldName[i]] := aStruct.GetFieldValue(aStruct.FieldName[i]);
+  end;
+end;
+
+{ TROCustomSessionManager }
+
+constructor TROCustomSessionManager.Create(aOwner: TComponent);
+begin
+  inherited;
+
+  fClearing := FALSE;
+  fMaxSessions := -1;
+  fCritical := TCriticalSection.Create;
+  fSessionChangesListeners := TInterfaceList.Create;
+  fSessionDuration := 15;
+  fSessionCheckInterval := 15;
+end;
+
+destructor TROCustomSessionManager.Destroy;
+begin
+  // Doesn't clear any sessions here. If the session manager is an in-memory one that is done by the
+  // in-memory session manager destroyer, if this is a DB or an event driver one it might be used in a cluster
+  // so we cannot assume other servers don't need this info. It's user's responsibility to clear the expired
+  // sessions. Worst case in a DB the sessions will be cleared the enxt time this server is started.
+  
+  KillTimer;
+  fSessionChangesListeners.Clear;
+  fSessionChangesListeners.Free;
+  fCritical.Free;
+  
+  inherited;
+end;
+
+function TROCustomSessionManager.CheckSessionIsExpired(aSession: TROSession): boolean;
+begin
+  result := DoCheckSessionIsExpired(aSession)
+end;
+
+procedure TROCustomSessionManager.ClearSessions(OnlyExpired : boolean);
+var
+  lRetry: Boolean;
+begin
+  fCritical.Enter;
+  try
+    fClearing := TRUE;
+    lRetry := True;
+    while lRetry do begin
+      lRetry := False;
+      try
+      DoClearSessions(OnlyExpired);
+      except
+        on e: Exception do begin
+          if assigned(fOnException) then fOnException(EmptyGUID, e, lRetry);
+          if not lRetry then raise;
+        end;
+      end;
+    end;
+  finally
+    fClearing := FALSE;
+    fCritical.Leave;
+  end;
+end;
+
+function TROCustomSessionManager.CreateSession(const aSessionID: TGUID): TROSession;
+var
+  lRetry, lFail: Boolean;
+begin
+  if (GetSessionCount>=MaxSessions) and (MaxSessions>0) then begin
+    lFail := true;
+    if assigned(fOnMaxSessionsReached) then fOnMaxSessionsReached(lFail);
+    if lFail then RaiseError(err_TooManySessions, [SessionDuration]);
+  end;
+
+  Result := nil;
+  
+  lRetry := True;
+  while lRetry do begin
+    lRetry := False;
+    try
+      result := DoCreateSession(aSessionID);
+    except
+      on e: Exception do begin
+        if assigned(fOnException) then fOnException(aSessionID, e, lRetry);
+        if not lRetry then raise;
+      end;
+    end;
+  end;
+  DoNotifySessionsChangesListener(aSessionID, saAdd, nil);
+
+  if Assigned(fOnSessionCreated) then fOnSessionCreated(result);
+end;
+
+procedure TROCustomSessionManager.DeleteTemporarySession(var Session: TROSession);
+var 
+  id : TGUID;
+begin
+  fInDeleteSession:=True;
+  try
+    id := Session.SessionID;
+    if Assigned(FOnBeforeDeleteSession) then FOnBeforeDeleteSession(id, FALSE);
+
+    FreeAndNIL(Session);
+
+    DoNotifySessionsChangesListener(id, saTmpSessionDelete, nil);
+
+    if Assigned(fOnSessionDeleted) then fOnSessionDeleted(id, FALSE);
+  finally
+    fInDeleteSession:=False;
+  end;
+end;
+
+procedure TROCustomSessionManager.DeleteSession(const aSessionID: TGUID; IsExpired : boolean);
+var
+  lRetry: Boolean;
+begin
+  fInDeleteSession:=True;
+  try
+    if Assigned(FOnBeforeDeleteSession) then FOnBeforeDeleteSession(aSessionID, IsExpired);
+    if not Clearing then fCritical.Enter;
+    try
+      lRetry := True;
+      while lRetry do begin
+        lRetry := False;
+        try
+          DoDeleteSession(aSessionID, IsExpired);
+        except
+          on e: Exception do begin
+            if assigned(fOnException) then fOnException(aSessionID, e, lRetry);
+            if not lRetry then raise;
+          end;
+        end;
+      end;
+
+      DoNotifySessionsChangesListener(aSessionID, saDelete, nil);
+      if Assigned(fOnSessionDeleted) then fOnSessionDeleted(aSessionID, IsExpired);
+    finally
+      if not Clearing then fCritical.Leave;
+    end;
+  finally
+    fInDeleteSession:=False;
+  end;
+end;
+
+function TROCustomSessionManager.DoCheckSessionIsExpired(aSession: TROSession): boolean;
+var
+  elapsed : integer;
+begin
+  elapsed := MinutesBetween(aSession.LastAccessed, Now);
+  result := (SessionDuration>0) and (elapsed>=SessionDuration);
+end;
+
+function TROCustomSessionManager.DoCreateSession(
+  const aSessionID: TGUID): TROSession;
+begin
+  result := NIL;
+  if Assigned(fOnCustomCreateSession) then fOnCustomCreateSession(aSessionID, result);
+
+  if (result=NIL) then result := TROSession.Create(aSessionID);
+end;
+
+function TROCustomSessionManager.GetSessionCount: integer;
+var
+  lRetry: Boolean;
+begin
+  lRetry := True;
+  Result := 0;
+  while lRetry do begin
+    lRetry := False;
+    try
+      fCritical.Enter;
+      try
+        result := DoGetSessionCount;
+      finally
+        fCritical.Leave;
+      end;
+    except
+      on e: Exception do begin
+        if assigned(fOnException) then fOnException(EmptyGUID, e, lRetry);
+        if not lRetry then raise;
+      end;
+    end;
+  end;
+end;
+
+function TROCustomSessionManager.FindSession(
+  const aSessionID: TGUID; aUpdateTime: Boolean): TROSession;
+var
+  lRetry: Boolean;
+begin
+  lRetry := True;
+  Result := nil;
+  while lRetry do begin
+    lRetry := False;
+    try
+      fCritical.Enter;
+      try
+        result := DoFindSession(aSessionID, aUpdateTime);
+      finally
+        fCritical.Leave;
+      end;
+    except
+      on e: Exception do begin
+        if assigned(fOnException) then fOnException(aSessionID, e, lRetry);
+        if not lRetry then raise;
+      end;
+    end;
+  end;
+
+  if not fInDeleteSession then
+    if (result<>NIL) and CheckSessionIsExpired(result) then begin
+      DeleteSession(aSessionID, TRUE);
+      raise EROSessionExpired.Create('Session '+GUIDToString(aSessionID)+' is expired');
+    end;
+end;
+
+procedure TROCustomSessionManager.ReleaseSession(var aSession: TROSession; NewSession : boolean);
+var
+  id: TGUID;
+  lRetry: Boolean;
+begin
+  inherited;
+
+  if (aSession=NIL) then Exit;
+
+  fCritical.Enter;
+  try
+    id := aSession.SessionID;
+    lRetry := True;
+    while lRetry do begin
+      lRetry := False;
+      try
+        DoReleaseSession(aSession, NewSession);
+      except
+        on e: Exception do begin
+          if assigned(fOnException) then fOnException(aSession.SessionID, e, lRetry);
+          if not lRetry then raise;
+        end;
+      end;
+    end;
+    aSession := nil;
+  finally
+    fCritical.Leave;
+  end;
+  DoNotifySessionsChangesListener(id, saRelease, nil);
+end;
+
+procedure TROCustomSessionManager.DoTimerTick(CurrentTickCount: cardinal);
+begin
+  {$IFDEF FPC}
+  if CurrentTickCount = 0 then ClearSessions(TRUE) else // for preventing warnings in FPC
+  {$ENDIF FPC}
+  ClearSessions(TRUE); // Clears expired sessions
+end;
+
+procedure TROCustomSessionManager.KillTimer;
+begin
+  if not (csDesigning in ComponentState) then begin
+    while Clearing do Sleep(100); // If it's clearing sessions we don't want to interfere
+    fTimer.Free;
+    fTimer := nil;
+  end;
+end;
+
+procedure TROCustomSessionManager.DoReleaseSession(aSession: TROSession; NewSession : boolean);
+var
+  f: boolean;
+begin
+  {$IFDEF FPC}
+  if NewSession then f := (aSession <> NIL) else  // for preventing warnings in FPC
+  {$ENDIF FPC}
+  f := (aSession <> NIL);
+  if f then aSession.LastAccessed := Now;
+end;
+
+procedure TROCustomSessionManager.Loaded;
+begin
+  inherited;
+  SessionCheckInterval := fSessionCheckInterval;
+end;
+
+procedure TROCustomSessionManager.RegisterSessionsChangesListener(
+  aListener: IROSessionsChangesListener);
+begin
+  if fSessionChangesListeners.IndexOf(aListener) = -1 then fSessionChangesListeners.Add(aListener);
+end;
+
+procedure TROCustomSessionManager.UnRegisterSessionsChangesListener(
+  aListener: IROSessionsChangesListener);
+var
+  lIndex: Integer;
+begin
+  lIndex := fSessionChangesListeners.IndexOf(aListener);
+  if lIndex <> -1 then fSessionChangesListeners.Delete(lIndex);
+end;
+
+procedure TROCustomSessionManager.DoNotifySessionsChangesListener(const aSessionID : TGUID; aSessionAction: TROSessionsActions; Sender: TObject);
+var
+  i: Integer;
+begin
+  for i := 0 to fSessionChangesListeners.Count - 1 do begin
+    IROSessionsChangesListener(pointer(fSessionChangesListeners[i])).SessionsChangedNotification(aSessionID, aSessionAction, Sender);
+  end;
+end;
+
+procedure TROCustomSessionManager.GetAllSessions(Dest: TStringList);
+begin
+  fCritical.Enter;
+  try
+    DoGetAllSessions(Dest);
+  finally
+    fCritical.Leave;
+  end;
+end;
+
+procedure TROCustomSessionManager.DoGetAllSessions(Dest: TStringList);
+begin
+  // do nothing
+end;
+
+procedure TROCustomSessionManager.SetSessionCheckInterval(
+  const Value: Integer);
+begin
+  if not ((csDesigning in ComponentState) or (csLoading in ComponentState)) then begin
+    fTimer.Free;
+    fTimer := nil;
+
+    if (Value>0) then fTimer := TROThreadTimer.Create(DoTimerTick, Value*60000);
+  end;
+  fSessionCheckInterval := Value;
+end;
+
+procedure TROCustomSessionManager.CheckProperties;
+begin
+  // nothing
+end;
+
+{ TROEventSessionManager }
+procedure TROEventSessionManager.DoClearSessions;
+begin
+  if Assigned(fOnClearSessions) then fOnClearSessions(Self, OnlyExpired);
+end;
+
+procedure TROEventSessionManager.DoDeleteSession(const aSessionID: TGUID; IsExpired : boolean);
+begin
+  if Assigned(fOnDeleteSession) then fOnDeleteSession(aSessionID, IsExpired);
+end;
+
+function TROEventSessionManager.DoGetSessionCount: integer;
+begin
+  result := 0;
+  if Assigned(fOnGetSessionCount) then result := fOnGetSessionCount(Self);
+end;
+
+function TROEventSessionManager.DoFindSession(const aSessionID: TGUID; aUpdateTime: Boolean): TROSession;
+begin
+  result := nil;
+  if Assigned(fOnFindSession) then fOnFindSession(aSessionID, result);
+  if (result <> nil) and (aUpdateTime) then result.LastAccessed := Now;
+end;
+
+procedure TROEventSessionManager.DoReleaseSession(aSession: TROSession; NewSession : boolean);
+begin
+  inherited;
+  
+  if Assigned(fOnReleaseSession) then fOnReleaseSession(aSession, NewSession);
+end;
+
+procedure TROEventSessionManager.DoGetAllSessions(Dest: TStringList);
+begin
+  if assigned(fOnGetAllSessions) then fOnGetAllSessions(Self, Dest);
+end;
+
+{ TROInMemorySessionManager }
+
+constructor TROInMemorySessionManager.Create(aOwner: TComponent);
+begin
+  inherited;
+
+  fSessionList := TStringList.Create;
+  fSessionList.Duplicates := dupError;
+  fSessionList.Sorted := TRUE;
+end;
+
+destructor TROInMemorySessionManager.Destroy;
+begin
+  KillTimer;
+
+  // Clears all the sessions. This cannot be clustered so there's no point in keeping session info
+  ClearSessions(FALSE);
+
+  fSessionList.Free;
+
+  inherited;
+end;
+
+procedure TROInMemorySessionManager.DoClearSessions(OnlyExpired: boolean);
+var
+  i : integer;
+  lSessionID: TGUID;
+begin
+  if OnlyExpired then begin
+    for i := (fSessionList.Count-1) downto 0 do
+      if CheckSessionIsExpired(TROSession(fSessionList.Objects[i])) then begin
+        lSessionID := TROSession(fSessionList.Objects[i]).SessionID;
+        DeleteSession(lSessionID, TRUE);
+      end;
+  end
+  else begin
+    for i := (fSessionList.Count-1) downto 0 do begin
+      lSessionID := TROSession(fSessionList.Objects[i]).SessionID;
+      DeleteSession(lSessionID, FALSE);
+    end;
+  end;
+end;
+
+procedure TROInMemorySessionManager.DoDeleteSession(
+  const aSessionID: TGUID; IsExpired : boolean);
+var
+  idx : integer;
+  lSession: TObject;
+begin
+  if IsExpired then idx := fSessionList.IndexOf(GUIDToString(aSessionID)) else //for preventing warnings in FPC
+  idx := fSessionList.IndexOf(GUIDToString(aSessionID));
+
+  if (idx>=0) then begin
+    lSession := fSessionList.Objects[idx];
+    fSessionList.Delete(idx);
+    lSession.Free;
+  end;
+end;
+
+function TROInMemorySessionManager.DoGetSessionCount: integer;
+begin
+  result := fSessionList.Count
+end;
+
+function TROInMemorySessionManager.DoFindSession(const aSessionID: TGUID; aUpdateTime: Boolean): TROSession;
+var idx : integer;
+begin
+  result := nil;
+  idx := fSessionList.IndexOf(GUIDToString(aSessionID));
+  if (idx>=0) then result := TROSession(fSessionList.Objects[idx]);
+  if (result <> nil) and (aUpdateTime) then result.LastAccessed := Now;
+end;
+
+procedure TROInMemorySessionManager.DoReleaseSession(aSession: TROSession; NewSession : boolean);
+var id : string;
+begin
+  inherited;
+
+  if NewSession then begin
+    id := GUIDToString(aSession.SessionID);
+    if fSessionList.IndexOf(id) = -1 then
+      fSessionList.AddObject(id, aSession)
+    else
+      aSession.Free;
+  end;
+end;
+
+procedure TROInMemorySessionManager.DoGetAllSessions(Dest: TstringList);
+var
+  i: Integer;
+  currSession: TROSession;
+begin
+  for i := 0 to (fSessionList.Count-1) do begin
+    currSession := TROSession(fSessionList.Objects[i]);
+    if CheckSessionIsExpired(currSession) then Continue;
+    Dest.Add(GUIDToString(currSession.SessionID));
+  end;
+end;
+
+{ TROSessionList }
+constructor TROSessionList.Create;
+begin
+  inherited;
+
+  fList := TStringList.Create;
+  fList.Duplicates := dupError;
+  fList.Sorted := true;
+end;
+
+
+destructor TROSessionList.Destroy;
+begin
+  Clear;
+  FreeAndNIL(fList);
+  inherited;
+end;
+
+procedure TROSessionList.Add(aSession: TROSession);
+begin
+  fList.AddObject(GUIDToString(aSession.SessionID), aSession);
+end;
+
+procedure TROSessionList.Clear;
+var
+  i: integer;
+begin
+  for i := (fList.Count-1) downto 0 do
+    Delete(i);
+end;
+
+procedure TROSessionList.Delete(aIndex: integer);
+begin
+  fList.Objects[aIndex].Free;
+  fList.Delete(aIndex);
+end;
+
+function TROSessionList.GetCount: integer;
+begin
+  result := fList.Count;
+end;
+
+function TROSessionList.GetSessionIndex(aSessionId: TGUID): integer;
+begin
+  result := fList.IndexOf(GUIDToString(aSessionId))
+end;
+
+function TROSessionList.GetSessions(Index: integer): TROSession;
+begin
+  result := TROSession(fList.Objects[Index]);
+end;
+
+function TROSessionList.SessionById(aSessionId: TGUID): TROSession;
+var
+  idx: integer;
+begin
+  idx := GetSessionIndex(aSessionId);
+  result := Sessions[idx];
+end;
+
+function TROSessionList.Add(aSessionId: TGUID): TROSession;
+begin
+  result := TROSession.Create(aSessionId);
+  try
+    Add(result);
+  except
+    result.Free;
+    raise;
+  end;
+end;
+
+initialization
+  RegisterExceptionClass(EROSessionNotFound);
+finalization
+  UnregisterExceptionClass(EROSessionNotFound);
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROStreamSerializer.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROStreamSerializer.pas
new file mode 100644
index 0000000..7a1fa73
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROStreamSerializer.pas	
@@ -0,0 +1,1104 @@
+unit uROStreamSerializer;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+
+{$I RemObjects.inc}
+
+{$IFDEF DOTNET}
+{$MESSAGE error 'This unit will not be used in .NET, use RemObjects.SDK.StreamSerializer instead' }
+{$ENDIF}
+
+interface
+
+uses
+  {$IFDEF DEBUG_REMOBJECTS_BINMESSAGE_LOWLEVEL}eDebugServer,{$ENDIF}
+  Classes, SysUtils, TypInfo,
+   uROTypes, uROSerializer, FMTBcd;
+
+
+type
+  { TROStreamSerializer }
+  TROStreamSerializer = class(TROSerializer)
+  private
+    fStream : TStream;
+
+  protected
+    procedure BeginWriteObject(const aName: string; aClass : TClass; anObject: TObject; var LevelRef : IUnknown;
+                                var IsValidType : boolean; out IsAssigned:Boolean; ArrayElementId : integer = -1); override;
+    procedure EndWriteObject(const aName: string; aClass : TClass; anObject: TObject; const LevelRef : IUnknown); override;
+    procedure CustomWriteObject(const aName : string; aClass : TClass; const Ref; ArrayElementId : integer = -1); override;
+    procedure CustomReadObject(const aName: string; aClass: TClass;var Ref; ArrayElementId: integer);override;
+    procedure BeginReadObject(const aName : string; aClass : TClass; var anObject : TObject; var LevelRef : IUnknown;
+                               var IsValidType : boolean; ArrayElementId : integer = -1); override;
+    procedure EndReadObject(const aName : string; aClass : TClass; var anObject : TObject; const LevelRef : IUnknown); override;
+  Public
+    { Writers }
+    procedure WriteInteger(const aName : string; anOrdType : TOrdType; const Ref; ArrayElementId : integer = -1); override;
+    procedure WriteInt64(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+    procedure WriteEnumerated(const aName : string; anEnumTypeInfo : PTypeInfo; const Ref; ArrayElementId : integer = -1); override;
+    procedure WriteUTF8String(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+    procedure WriteAnsiString(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+    procedure WriteWideString(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+    procedure WriteDateTime(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+    procedure WriteDouble(const aName : string; aFloatType : TFloatType; const Ref; ArrayElementId : integer = -1); override;
+    procedure WriteVariant(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+    procedure WriteXml(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+    procedure WriteGuid(const aName: String; const Ref; ArrayElementId: Integer = -1); override;
+    procedure WriteDecimal(const aName: String; const Ref; ArrayElementId: Integer = -1); override;
+    procedure WriteBinary(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+    procedure WriteStruct(const aName : string; const Ref; aClass: TClass = nil; ArrayElementId : integer = -1); override;
+    procedure WriteArray(const aName : string; const Ref; aClass: TClass = nil; ArrayElementId : integer = -1); override;
+    procedure WriteException(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+
+    procedure WriteSafe8BitString(const aValue: Ansistring);
+    { Readers }
+    {$IFDEF DEBUG_REMOBJECTS_BINMESSAGE_LOWLEVEL}
+    procedure Read(const aName : string; aTypeInfo : PTypeInfo; var Ptr; ArrayElementId : integer = -1); override;
+    {$ENDIF DEBUG_REMOBJECTS_BINMESSAGE_LOWLEVEL}
+    procedure ReadInteger(const aName : string; anOrdType : TOrdType; var Ref; ArrayElementId : integer = -1); override;
+    procedure ReadInt64(const aName : string; var Ref; ArrayElementId : integer = -1); override;
+    procedure ReadEnumerated(const aName : string; anEnumTypeInfo : PTypeInfo; var Ref; ArrayElementId : integer = -1); override;
+    procedure ReadUTF8String(const aName : string; var Ref; ArrayElementId : integer = -1; iMaxLength:integer=-1); override;
+    procedure ReadAnsiString(const aName : string; var Ref; ArrayElementId : integer = -1; iMaxLength:integer=-1); override;
+    procedure ReadWideString(const aName : string; var Ref; ArrayElementId : integer = -1; iMaxLength:integer=-1); override;
+    procedure ReadDateTime(const aName : string; var Ref; ArrayElementId : integer = -1); override;
+    procedure ReadDouble(const aName : string; aFloatType : TFloatType; var Ref; ArrayElementId : integer = -1); override;
+    procedure ReadVariant(const aName : string; var Ref; ArrayElementId : integer = -1); override;
+    procedure ReadXml(const aName : string; var Ref; ArrayElementId : integer = -1); override;
+    procedure ReadDecimal(const aName: String; var Ref; ArrayElementId: Integer = -1); override;
+    procedure ReadGuid(const aName: String; var Ref; ArrayElementId: Integer = -1); override;
+    procedure ReadBinary(const aName : string; var Ref; ArrayElementId : integer = -1); override;
+    function ReadStruct(const aName : string; aClass : TClass; var Ref; ArrayElementId : integer = -1): Boolean; override;
+    function ReadArray(const aName : string; aClass : TClass; var Ref; ArrayElementId : integer = -1): Boolean; override;
+    procedure ReadException(const aName : string; var Ref; ArrayElementId : integer = -1); override;
+  public
+    procedure SetStorageRef(aStorageRef:TStream);
+    constructor Create(aStorageRef:TStream); virtual;
+
+  end;
+
+  { binary structuire for streaming DateTime to BinMessage, starting with format version 1.0.7 }
+  TDateTimeStructure = packed record
+    Year:Word;
+    Month:Byte;
+    Day:Byte;
+    Hour:Byte;
+    Minute:Byte;
+    Seconds:Byte;
+    MiliSeconds:word;
+  end;
+
+procedure ObjectToStream(anObject : TROComplexType; aStream : TStream);
+function StreamToObject(aStream : TStream) : TROComplexType;
+
+function StreamToVariant(Stream: TStream): {$IFDEF FPC}Variant;{$ELSE}OleVariant;{$ENDIF}
+procedure VariantToStream(const Data: {$IFDEF FPC}Variant;{$ELSE}OleVariant;{$ENDIF} Stream: TStream);
+
+implementation
+
+uses
+  {$IFDEF DEBUG_REMOBJECTS}eDebugServer,{$ENDIF}
+  {$IFDEF FPC} Variants, {$ENDIF}
+  {$IFDEF VER140UP} {$IFNDEF FPC}Variants,{$ENDIF} DateUtils, {$ENDIF}
+  uRORes, uROClient, uROClientIntf, uROBinaryHelpers, uROClasses,
+  uROXMLIntf{$IFNDEF MSWINDOWS}{$IFNDEF FPC}, ComObj{$ENDIF}{$ENDIF};
+
+
+function StreamToVariant(Stream: TStream): {$IFDEF FPC}Variant{$ELSE}OleVariant{$ENDIF};
+var p: Pointer;
+begin
+  Result := VarArrayCreate([0, Stream.Size - 1], varByte);
+  p := VarArrayLock(Result);
+  try
+    Stream.Position := 0; //start from beginning of stream
+    Stream.ReadBuffer(p^, Stream.Size);
+  finally
+    VarArrayUnlock(Result);
+  end;
+end;
+
+procedure VariantToStream(const Data: {$IFDEF FPC}Variant{$ELSE}OleVariant{$ENDIF}; Stream: TStream);
+var p: Pointer;
+begin
+  p := VarArrayLock(Data);
+  try
+    Stream.Write(p^, VarArrayHighBound(Data, 1) + 1); //assuming low bound = 0
+  finally
+    VarArrayUnlock(Data);
+  end;
+end;
+
+procedure ObjectToStream(anObject : TROComplexType; aStream : TStream);
+var clsname : ansistring;
+begin
+  with TROStreamSerializer.Create(aStream) do try
+    clsname := {$IFDEF UNICODE}UTF8Encode{$ENDIF}(anObject.ClassName);
+
+    Write('', TypeInfo(ansistring), clsname);
+    Write('', anObject.ClassInfo, anObject);
+  finally
+    Free;
+  end;
+end;
+
+function StreamToObject(aStream : TStream) : TROComplexType;
+var clsname : ansistring;
+    clsname2: string;
+    cls : TROComplexTypeClass;
+begin
+  result := nil;
+  with TROStreamSerializer.Create(aStream) do try
+    Read('', TypeInfo(ansistring), clsname);
+    clsname2 := {$IFDEF UNICODE}UTF8ToString{$ENDIF}(clsname);
+    cls := FindROClass(clsname2);
+    if (cls=NIL) then RaiseError(err_UnknownClass, [clsname2]);
+    Read('', cls.ClassInfo, result);
+  finally
+    Free;
+  end;
+end;
+
+{ TROStreamSerializer }
+
+constructor TROStreamSerializer.Create(aStorageRef: TStream);
+begin
+  inherited Create();
+  SetStorageRef(aStorageRef);
+end;
+
+procedure TROStreamSerializer.SetStorageRef(aStorageRef: TStream);
+begin
+  //result := TObject(aStorageRef) is TStream;
+  //if result then fStream := TStream(aStorageRef);
+  fStream := aStorageRef;
+end;
+
+procedure TROStreamSerializer.EndReadObject(const aName: string;
+  aClass : TClass; var anObject: TObject; const LevelRef : IUnknown);
+begin
+  inherited;
+  {$IFDEF DEBUG_REMOBJECTS_BINMESSAGE_LOWLEVEL}
+  DebugServer.Write('TROStreamSerializer.EndReadObject(name=%s, position before =$%x',[aName, fStream.Position]);
+  {$ENDIF DEBUG_REMOBJECTS_BINMESSAGE_LOWLEVEL}
+end;
+
+procedure TROStreamSerializer.EndWriteObject(const aName: string;
+  aClass : TClass; anObject: TObject; const LevelRef : IUnknown);
+begin
+  inherited;
+end;
+
+procedure TROStreamSerializer.ReadDateTime(const aName: string; var Ref; ArrayElementId : integer = -1);
+{var lDateTime:TDateTime absolute Ref;
+    lDateTimeStructure:TDateTimeStructure;
+    //m,d,h,n,s:Word;}
+begin
+  {$IFDEF DEBUG_REMOBJECTS_BINMESSAGE_LOWLEVEL}
+  DebugServer.Write('TROStreamSerializer.ReadDateTime(name=%s, position before =$%x, size=$%x',[aName, fStream.Position, SizeOf(TDateTime)]);
+  {$ENDIF DEBUG_REMOBJECTS_BINMESSAGE_LOWLEVEL}
+  ReadDouble(aName,ftDouble,Ref,-1);
+  {fStream.Read(lDateTimeStructure, SizeOf(TDateTimeStructure));
+  if not TryEncodeDateTime(lDateTimeStructure.Year, lDateTimeStructure.Month, lDateTimeStructure.Day,
+                             lDateTimeStructure.Hour, lDateTimeStructure.Minute, lDateTimeStructure.Seconds,
+                             lDateTimeStructure.MiliSeconds, lDateTime) then
+    RaiseError(err_InvalidDateTimeReadFromStream,[]);}
+end;
+
+procedure TROStreamSerializer.ReadEnumerated(const aName: string; anEnumTypeInfo: PTypeInfo; var Ref; ArrayElementId : integer = -1);
+var lInteger:Integer;
+begin
+  {$IFDEF DEBUG_REMOBJECTS_BINMESSAGE_LOWLEVEL}
+  DebugServer.Write('TROStreamSerializer.ReadEnumerated(name=%s, position before =$%x, size=$%x',[aName, fStream.Position, SizeOf(byte)]);
+  {$ENDIF DEBUG_REMOBJECTS_BINMESSAGE_LOWLEVEL}
+
+  fStream.ReadBuffer(lInteger, SizeOf(integer));
+  Byte(Ref) := lInteger and $FF;
+end;
+
+procedure TROStreamSerializer.ReadDouble(const aName: string;
+  aFloatType: TFloatType; var Ref; ArrayElementId : integer = -1);
+var sze : byte;
+    src : pointer;
+begin
+  src := @Ref;
+  sze := 0;
+  case aFloatType of
+    ftSingle : sze := SizeOf(single);
+    ftDouble : sze := SizeOf(double);
+    ftExtended : sze := SizeOf(extended);
+    ftComp : sze := SizeOf(comp);
+    ftCurr :sze := SizeOf(currency);
+  end;
+
+  {$IFDEF DEBUG_REMOBJECTS_BINMESSAGE_LOWLEVEL}
+  DebugServer.Write('TROStreamSerializer.ReadFloat(name=%s, position before =$%x, size=$%x',[aName, fStream.Position,sze]);
+  {$ENDIF DEBUG_REMOBJECTS_BINMESSAGE_LOWLEVEL}
+
+  fStream.ReadBuffer(src^, sze);
+end;
+
+procedure TROStreamSerializer.ReadInt64(const aName: string; var Ref; ArrayElementId : integer = -1);
+begin
+  {$IFDEF DEBUG_REMOBJECTS_BINMESSAGE_LOWLEVEL}
+  DebugServer.Write('TROStreamSerializer.ReadInt64(name=%s, position before =$%x, size=$%x',[aName, fStream.Position, SizeOf(Int64)]);
+  {$ENDIF DEBUG_REMOBJECTS_BINMESSAGE_LOWLEVEL}
+
+  fStream.ReadBuffer(Ref, SizeOf(Int64));
+end;
+
+procedure TROStreamSerializer.ReadInteger(const aName: string;
+  anOrdType: TOrdType; var Ref; ArrayElementId : integer = -1);
+var sze : byte;
+    src : pointer;
+begin
+  src := @Ref;
+  sze := 0;
+  case anOrdType of
+    otSByte,
+    otUByte : sze := SizeOf(byte);
+    otSWord,
+    otUWord : sze := SizeOf(word);
+    otSLong,
+    otULong : sze := SizeOf(integer);
+  end;
+  {$IFDEF DEBUG_REMOBJECTS_BINMESSAGE_LOWLEVEL}
+  DebugServer.Write('TROStreamSerializer.ReadInteger(name=%s, position before =$%x, size=$%x',[aName, fStream.Position,sze]);
+  {$ENDIF DEBUG_REMOBJECTS_BINMESSAGE_LOWLEVEL}
+  fStream.ReadBuffer(src^, sze);
+end;
+
+procedure TROStreamSerializer.ReadUTF8String(const aName: string; var Ref; ArrayElementId : integer = -1; iMaxLength:integer=-1);
+var sze : integer;
+begin
+
+  {$IFDEF DEBUG_REMOBJECTS_BINMESSAGE_LOWLEVEL}
+  DebugServer.Write('TROStreamSerializer.ReadString 1(name=%s, position before =$%x',[aName, fStream.Position]);
+  {$ENDIF DEBUG_REMOBJECTS_BINMESSAGE_LOWLEVEL}
+
+  fStream.ReadBuffer(sze, SizeOf(sze));
+  //ToDo: we need some code here to avoid hacker attachs with too long strings
+
+  {$IFDEF DEBUG_REMOBJECTS_BINMESSAGE_LOWLEVEL}
+  DebugServer.Write('TROStreamSerializer.ReadString 2(name=%s, position before =$%x, size=$%x',[aName, fStream.Position,sze]);
+  {$ENDIF DEBUG_REMOBJECTS_BINMESSAGE_LOWLEVEL}
+
+  if ((iMaxLength > -1) and (sze > iMaxLength)) or
+     (sze > fStream.Size) then
+    RaiseError(err_InvalidStringLength,[sze]);
+
+  if (sze>0) then begin
+    SetLength(UTF8String(Ref), sze);
+    fStream.ReadBuffer(UTF8String(Ref)[1], sze);
+  end
+  else string(Ref) := '';
+end;
+
+procedure TROStreamSerializer.ReadWideString(const aName: string; var Ref; ArrayElementId : integer = -1; iMaxLength:integer=-1);
+var sze : integer;
+begin
+  {$IFDEF DEBUG_REMOBJECTS_BINMESSAGE_LOWLEVEL}
+  DebugServer.Write('TROStreamSerializer.ReadWideString 1(name=%s, position before =$%x',[aName, fStream.Position]);
+  {$ENDIF DEBUG_REMOBJECTS_BINMESSAGE_LOWLEVEL}
+
+  fStream.ReadBuffer(sze, SizeOf(sze));
+
+  if ((iMaxLength > -1) and (sze > iMaxLength)) or
+     (sze*2 > fStream.Size) then
+    RaiseError(err_InvalidStringLength,[sze]);
+
+  {$IFDEF DEBUG_REMOBJECTS_BINMESSAGE_LOWLEVEL}
+  DebugServer.Write('TROStreamSerializer.ReadWideString 2(name=%s, position before =$%x, size=$%x, length=$%x',[aName, fStream.Position,sze,sze*2]);
+  {$ENDIF DEBUG_REMOBJECTS_BINMESSAGE_LOWLEVEL}
+
+  if (sze>0) then begin
+    SetLength(widestring(Ref), sze);
+    fStream.ReadBuffer(widestring(Ref)[1], sze*2);
+  end
+  else widestring(Ref) := '';
+end;
+
+procedure TROStreamSerializer.WriteDateTime(const aName: string; const Ref; ArrayElementId : integer = -1);
+{var lDateTime:TDateTime absolute Ref;
+    lDateTimeStructure:TDateTimeStructure;
+    m,d,h,n,s:Word;}
+begin
+  WriteDouble(aName,ftDouble,Ref,-1);
+  {DecodeDateTime(lDateTime,lDateTimeStructure.Year,m,d,h,n,s,lDateTimeStructure.MiliSeconds);
+  lDateTimeStructure.Month := m;
+  lDateTimeStructure.Day := d;
+  lDateTimeStructure.Hour := h;
+  lDateTimeStructure.Minute := n;
+  lDateTimeStructure.Seconds := s;
+  fStream.Write(lDateTimeStructure, SizeOf(TDateTimeStructure));}
+end;
+
+procedure TROStreamSerializer.WriteEnumerated(const aName: string; anEnumTypeInfo: PTypeInfo; const Ref; ArrayElementId : integer = -1);
+var lInteger:Integer;
+begin
+  lInteger := Byte(Ref);
+  fStream.Write(lInteger, SizeOf(integer));  // TODO: check enums bigger than a byte!
+end;
+
+procedure TROStreamSerializer.WriteDouble(const aName: string;
+  aFloatType: TFloatType; const Ref; ArrayElementId : integer = -1);
+var sze : byte;
+    src : pointer;
+begin
+  { ToDo: make sure a double is always marshaled in some .NET compatible format (IEEE).
+    Only differentiate between Double and Currency, convert all the rest to double.
+    Handle Currency as Int64. Also adjust WriteFloat appropriately. }
+
+  src := @Ref;
+  sze := 0;                                 
+  case aFloatType of
+    ftSingle   : sze := SizeOf(single);
+    ftDouble   : sze := SizeOf(double);
+    ftExtended : sze := SizeOf(extended);
+    ftComp     : sze := SizeOf(comp);
+    ftCurr     : sze := SizeOf(currency);
+  end;
+
+  fStream.Write(src^, sze);
+end;
+
+procedure TROStreamSerializer.WriteInt64(const aName: string; const Ref; ArrayElementId : integer = -1);
+begin
+  fStream.Write(Ref, SizeOf(Int64));
+end;
+
+procedure TROStreamSerializer.WriteInteger(const aName: string;
+  anOrdType: TOrdType; const Ref; ArrayElementId : integer = -1);
+var sze : byte;
+    src : pointer;
+begin
+  { ToDo: make sure a Integer is always marshaled as Int32 }
+
+  src := @Ref;
+  sze := 0;
+  case anOrdType of
+    otSByte,
+    otUByte : sze := SizeOf(byte);
+    otSWord,
+    otUWord : sze := SizeOf(word);
+    otSLong,
+    otULong : sze := SizeOf(integer);
+  end;
+
+  fStream.Write(src^, sze);
+end;
+
+procedure TROStreamSerializer.WriteSafe8BitString(const aValue: Ansistring);
+var
+  lLength:integer;
+  lWriteString: AnsiString;
+begin
+  lWriteString := aValue; // we assume it's safe 7bit ASCII
+
+  lLength := Length(lWriteString);
+  fStream.Write(lLength, SizeOf(lLength));
+  if (lLength > 0) then
+    fStream.Write(pointer(lWriteString)^, lLength);
+end;
+
+procedure TROStreamSerializer.WriteUTF8String(const aName: string; const Ref; ArrayElementId : integer = -1);
+var sze : integer;
+begin
+  sze := Length(UTF8String(Ref));
+  fStream.Write(sze, SizeOf(sze));
+  if (sze>0) then fStream.Write(UTF8String(Ref)[1], sze);
+end;
+
+procedure TROStreamSerializer.WriteWideString(const aName: string;
+  const Ref; ArrayElementId : integer = -1);
+var sze : integer;
+begin
+  sze := Length(widestring(Ref));
+  fStream.Write(sze, SizeOf(sze));
+  if (sze>0) then fStream.Write(widestring(Ref)[1], sze*2);
+end;
+
+procedure TROStreamSerializer.BeginReadObject(const aName: string; aClass : TClass; var anObject: TObject; var LevelRef : IUnknown; var IsValidType : boolean; ArrayElementId : integer = -1);
+var IsAssigned : ByteBool;
+    clsnme : string;
+    cnt : integer;
+
+    lActualClass:TROComplexTypeClass;
+    struct: IROCustomStreamableClass;
+
+begin
+  //IsValidType := false; check if we need to init this!?
+
+  inherited;
+
+  //fStream.Read(IsAssigned, SizeOf(IsAssigned));
+
+
+  { ToDo -omh: provide a hook here so the app can cleanly provide custom complx types to be used, instead of
+               relying on them being assigned by the caller (which is bad))
+
+               FindROClass should be ablt to provide this capability. }
+
+  { ToDo -omh: MUCH this should be moved into common code in TROSerializer so ALL messages benbefit from it? }
+
+  if Assigned(anObject) and (anObject.GetInterfaceEntry(IROCustomStreamableType) <> nil) then begin
+    if anObject.GetInterface(IROCustomStreamableArray, struct) then begin
+      fStream.ReadBuffer(IsAssigned, SizeOf(IsAssigned));
+      if IsAssigned then begin
+        ReadInteger('', otULong, cnt);
+        Struct.SetNull(false);
+        IROCustomStreamableArray(pointer(Struct)).Count := cnt;
+      end
+      else begin
+        struct.SetNull(true);
+      end;
+      IsValidType := True;
+    end
+    else if anObject.GetInterface(IROCustomStreamableStruct, struct) then begin
+      fStream.ReadBuffer(IsAssigned, SizeOf(IsAssigned));
+      if IsAssigned then begin
+        ReadUTF8String('', clsnme,-1,MAX_ITEM_NAME);
+        if not struct.CanImplementType(clsnme) then RaiseError(err_UnknownClassInStream,[clsnme,aClass.ClassName]);
+        Struct.SetNull(false);
+        Struct.TypeName := clsnme;
+      end
+      else begin
+        struct.SetNull(true);
+      end;
+      IsValidType := True;
+    end
+    else if anObject.GetInterface(IROCustomStreamableEnum, struct) then begin
+      IsValidType := True;
+    end;
+  end
+  else if aClass.InheritsFrom(TROArray) then begin
+    fStream.ReadBuffer(IsAssigned, SizeOf(IsAssigned));
+    if IsAssigned then begin
+      anObject := aClass.Create();
+      ReadInteger('', otULong, cnt);
+      TROArray(anObject).Resize(cnt);
+    end;
+    IsValidType := true;
+  end
+  else if aClass.InheritsFrom(TStream) then begin
+    fStream.ReadBuffer(IsAssigned, SizeOf(IsAssigned));
+    if not Assigned (anObject) then begin
+      if IsAssigned then 
+        anObject := TROBinaryMemoryStream.Create;
+    end
+    else begin
+      if IsAssigned then begin
+        (anObject as TStream).Seek(0, soFromBeginning);
+        (anObject as TStream).Size := 0;
+      end
+      else begin
+        anObject := nil;
+      end;
+    end;
+    IsValidType := TRUE;
+  end
+  else if Assigned(anObject) and aClass.InheritsFrom(EROException) then begin
+    // Doesn't need anything here. Just take the type as valid
+    IsValidType := TRUE;
+  end
+  else begin
+    fStream.ReadBuffer(IsAssigned, SizeOf(IsAssigned));
+    if IsAssigned then begin
+      {$IFDEF DEBUG_REMOBJECTS}
+      DebugServer.Write('fStream.Position before reading classname: $%x',[fStream.Position]);
+      {$ENDIF DEBUG_REMOBJECTS}
+
+      if IsValidType then begin
+        ReadUTF8String('', clsnme,-1,MAX_ITEM_NAME);
+
+        lActualClass := FindROClass(clsnme);
+        if not Assigned(lActualClass) then RaiseError(err_UnknownClassInStream,[clsnme,aClass.ClassName]);
+        if not lActualClass.InheritsFrom(aClass) then RaiseError(err_UnexpectedClassInStream,[clsnme,aClass.ClassName]);
+        anObject := lActualClass.Create;
+
+      end
+      else begin
+        RaiseError(str_InvalidClassTypeInStream,[clsnme]);
+      end;
+    end;
+  end;
+
+  {$IFDEF DEBUG_REMOBJECTS}
+  DebugServer.Write('fStream.Position: %d',[fStream.Position]);
+  if anObject = nil then DebugServer.Write('anObject is nil') else DebugServer.Write('anObject is assigned');
+  {$ENDIF DEBUG_REMOBJECTS}
+
+end;
+
+procedure TROStreamSerializer.BeginWriteObject(const aName: string; aClass : TClass; anObject: TObject;
+   var LevelRef : IUnknown; var IsValidType : boolean; out IsAssigned:Boolean; ArrayElementId : integer = -1);
+//var IsNIL : ByteBool;
+var clsnme : ansistring;
+    cnt : integer;
+    struct: IROCustomStreamableClass;
+
+begin
+  inherited;
+
+  if Assigned(anObject) and (aClass.GetInterfaceEntry(IROCustomStreamableType) <> nil) then begin
+    if anObject.GetInterface(IROCustomStreamableClass, struct) then
+      IsAssigned := not struct.IsNull
+    else
+      IsAssigned := true; { non-class-based types, like enums, are always assigned }
+  end
+  else begin
+    IsAssigned := Assigned(anObject);
+  end;
+
+  if IsAssigned then begin
+    if Assigned(anObject) and (anObject.GetInterfaceEntry(IROCustomStreamableType) <> nil) then begin
+      if anObject.GetInterface(IROCustomStreamableArray, struct) then begin
+        fStream.Write(IsAssigned, SizeOf(IsAssigned));
+        cnt := IROCustomStreamableArray(pointer(Struct)).Count;
+        WriteInteger('', otULong, cnt);
+        IsValidType := true; // Adds Custom Arrays as supported type
+      end
+      else if anObject.GetInterface(IROCustomStreamableStruct, struct) then begin
+        fStream.Write(IsAssigned, SizeOf(IsAssigned));
+        clsnme := {$IFDEF UNICODE}UTF8Encode{$ENDIF}(struct.TypeName);
+        WriteSafe8BitString(clsnme);
+        IsValidType := true; // Adds Custom structs as supported type
+      end
+      else if (anObject.GetInterfaceEntry(IROCustomStreamableEnum) <> nil) then begin
+        IsValidType := true; // Adds custom Enums as supported type. no header required.
+      end
+    end
+    else if aClass.InheritsFrom(TStream) then begin
+      fStream.Write(IsAssigned, SizeOf(IsAssigned));
+      clsnme := StreamClsName;
+      IsValidType := true; // Adds TStream as supported type
+    end
+    else if (anObject is TROArray) then begin
+      fStream.Write(IsAssigned, SizeOf(IsAssigned));
+      cnt := TROArray(anObject).Count;
+      WriteInteger('', otULong, cnt);
+      IsValidType := TRUE; // Adds Array as supported type
+    end
+    else if (anObject is EROException) then begin
+      // Doesn't need anything here. Just take the type as valid
+      IsValidType := TRUE;
+    end
+    else if IsValidType then begin
+      fStream.Write(IsAssigned, SizeOf(IsAssigned));
+      clsnme := {$IFDEF UNICODE}UTF8Encode{$ENDIF}(anObject.ClassName);
+      WriteSafe8BitString(clsnme);
+    end;
+  end
+  else begin
+    fStream.Write(IsAssigned, SizeOf(IsAssigned));
+  end;
+end;
+
+procedure TROStreamSerializer.CustomReadObject(const aName: string; aClass : TClass; var Ref; ArrayElementId: integer);
+var obj : TObject absolute Ref;
+    lSize:integer;
+begin
+  inherited;
+  if Assigned(Obj) then begin
+
+    if (obj is TMemoryStream) then begin
+      with TMemoryStream(obj) do begin // Created as TMemoryStream in BeginReadObject
+        ReadInteger('', otULong, lSize);
+        if lSize > 0 then begin
+
+          if (lSize > fStream.Size) then
+            RaiseError(err_InvalidStringLength,[lSize]);
+
+          SetSize(lSize); { don't set this until we have confirmed the stream size } 
+
+          if CopyFrom(fStream, lSize) <> lSize then
+            RaiseError(err_InvalidStringLength,[lSize]);
+
+          Position := 0;
+        end
+        else begin
+          SetSize(0);
+        end;
+      end;
+    end;
+
+  end;
+end;
+
+procedure TROStreamSerializer.CustomWriteObject(const aName: string; aClass : TClass; const Ref; ArrayElementId : integer = -1);
+var obj : TObject absolute Ref;
+    lSize:integer;
+begin
+  inherited;
+  if Assigned(obj) then begin
+
+    if (obj is TStream) then begin
+      with TStream(obj) do begin
+        lSize := Size;
+        fStream.Write(lSize, SizeOf(lSize));
+        if lSize > 0 then begin
+          Position := 0;
+          fStream.CopyFrom(TStream(obj), lSize);
+        end;
+      end;
+    end;
+
+  end;
+end;
+
+{$IFDEF DEBUG_REMOBJECTS_BINMESSAGE_LOWLEVEL}
+procedure TROStreamSerializer.Read(const aName: string;aTypeInfo: PTypeInfo; var Ptr; ArrayElementId: integer);
+begin
+  DebugServer.EnterMethod('TROStreamSerializer.Read("%s")',[aName]);
+  try try
+    DebugServer.WriteHexDump('Reading "'+aName+'" from message',fStream);
+    inherited;
+  except DebugServer.WriteException(); raise; end;
+  finally
+    DebugServer.ExitMethod('TROStreamSerializer.Read()');
+  end;
+end;
+{$ENDIF DEBUG_REMOBJECTS_BINMESSAGE_LOWLEVEL}
+
+procedure TROStreamSerializer.ReadVariant(const aName: string; var Ref; ArrayElementId: integer);
+var vtype, stringlen : integer;
+
+    lIntegerValue:integer;
+    {$IFNDEF DELPHI5}
+    lShortInt:shortint;
+    lSmallIntValue: smallint;
+    lInt64Value:Int64;
+    {$ENDIF DELPHI5}
+    lByteValue:byte;
+    lDoubleValue:double;
+    lSingleValue:single;
+    lCurrencyValue:currency;
+    lString: Ansistring;
+begin
+  fStream.ReadBuffer(vtype, SizeOf(integer));
+
+  { Array types }
+  if ((vtype and $2000)=$2000) then begin
+    case vtype of
+      $2011: Variant(Ref) := VariantBinaryFromBinary(fStream);
+      else Variant(Ref) := VariantArrayFromBinary(fStream, (vtype and $FFF));
+    end;
+    Exit; // Done!
+  end;
+
+  { Plain Types }
+  case vtype of
+    varEmpty:Variant(Ref) := Unassigned;
+    varNull:Variant(Ref) := Null;
+    varError:Variant(Ref) := EmptyParam;
+    {$IFNDEF DELPHI5}
+    varShortInt:begin
+      fStream.ReadBuffer(lShortInt, SizeOf(shortint));
+      Variant(Ref) := lShortInt;
+    end;
+    varSmallInt,varWord : begin
+      fStream.ReadBuffer(lSmallIntValue, SizeOf(lSmallIntValue));
+      Variant(Ref) := lSmallIntValue;
+    end;
+    {$ENDIF DELPHI5}
+    {$IFNDEF DELPHI5}
+    varLongWord,
+    {$ENDIF DELPHI5}
+    varInteger:begin
+      fStream.ReadBuffer(lIntegerValue, SizeOf(integer));
+      Variant(Ref) := lIntegerValue;
+    end;
+    varSingle:begin
+      fStream.ReadBuffer(lSingleValue, SizeOf(single));
+      Variant(Ref) := lSingleValue;
+    end;
+    varDouble:begin
+      fStream.ReadBuffer(lDoubleValue, SizeOf(double));
+      Variant(Ref) := lDoubleValue;
+    end;
+    varCurrency:begin
+      fStream.ReadBuffer(lCurrencyValue, SizeOf(currency));
+      Variant(Ref) := lcurrencyValue;
+    end;
+    varDate:begin
+      fStream.ReadBuffer(lDoubleValue, SizeOf(double));
+      Variant(Ref) := TDateTime(lDoubleValue);
+    end;
+    varBoolean:begin
+      fStream.ReadBuffer(lByteValue, SizeOf(integer));
+      Variant(Ref) := (lByteValue <> 0);
+    end;
+    varByte:begin
+      fStream.ReadBuffer(lByteValue, SizeOf(byte));
+      Variant(Ref) := lByteValue;
+    end;
+    {$IFNDEF DELPHI5}
+    varInt64:begin
+      fStream.ReadBuffer(lInt64Value, SizeOf(Int64));
+      Variant(Ref) := lInt64Value;
+    end;
+    {$ENDIF DELPHI5}
+    varString: begin
+      fStream.ReadBuffer(stringlen, SizeOf(integer));
+      SetLength(lString, stringlen);
+      if (stringlen>0)
+        then fStream.ReadBuffer(lString[1], stringlen);
+      Variant(Ref) := lString;
+    end;
+    varUString,
+    varOleStr: begin
+      fStream.ReadBuffer(stringlen, SizeOf(integer));
+      SetLength(lString, stringlen);
+      if (stringlen>0)
+        then fStream.ReadBuffer(lString[1], stringlen);
+      Variant(Ref) := UTF8ToString(lString);
+    end;
+    else NotSupported(Format(err_UnsupportedVariantType, [VarType(vtype)]));
+  end;    { case }
+end;
+
+procedure TROStreamSerializer.WriteVariant(const aName: string; const Ref;
+  ArrayElementId: integer);
+var vtype : integer;
+    varvalue : Variant;
+
+    lIntegerValue:integer;
+    {$IFNDEF DELPHI5}
+    lShortIntValue:shortint;
+    lSmallIntValue: Smallint;
+    lInt64Value:Int64;
+    {$ENDIF DELPHI5}
+    lByteValue:byte;
+    lDoubleValue:double;
+    lSingleValue:single;
+    lCurrencyValue:currency;
+    lStringValue:AnsiString;
+begin
+  varvalue := Variant(Ref);
+  vtype := VarType(Variant(Ref));
+
+  { Array types }
+  if ((vtype and $2000)=$2000) then begin
+    case vtype of
+      $2011: WriteVariantBinaryToBinary(varvalue, fStream); {8209; handle Array of Byte special. for now. }
+      else WriteVariantArrayToBinary(varvalue, fStream);
+    end;
+    Exit; // Done!
+  end;
+
+  { Simple types }
+  case vtype of
+    varEmpty,varNull,varError:begin { 0, 1, A }
+      fStream.Write(vtype, SizeOf(integer));
+    end;
+    {$IFNDEF DELPHI5}
+    varShortInt:begin { 2, 10, 12 }
+      lShortIntValue := varvalue;
+      fStream.Write(vtype, SizeOf(integer));
+      fStream.Write(lShortIntValue, SizeOf(shortint));
+    end;
+    varSmallInt,varWord : begin
+      lSmallIntValue := varvalue;
+      fStream.Write(vtype, SizeOf(integer));
+      fStream.Write(lSmallIntValue, SizeOf(lSmallIntValue));
+    end;
+    {$ENDIF DELPHI5}
+    {$IFNDEF DELPHI5}varLongWord,{$ENDIF DELPHI5}
+    varInteger:begin { 3, 13 }
+      lIntegerValue := varvalue;
+      fStream.Write(vtype, SizeOf(integer));
+      fStream.Write(lIntegerValue, SizeOf(integer));
+    end;
+    varSingle:begin { 4 }
+      lSingleValue := varvalue;
+      fStream.Write(vtype, SizeOf(integer));
+      fStream.Write(lSingleValue, SizeOf(single));
+    end;
+    varDouble, varDate:begin { 5, 7 }
+      lDoubleValue := varvalue;
+      fStream.Write(vtype, SizeOf(integer));
+      fStream.Write(lDoubleValue, SizeOf(double));
+    end;
+    varCurrency:begin { 6 }
+      lCurrencyValue := varvalue;
+      fStream.Write(vtype, SizeOf(integer));
+      fStream.Write(lCurrencyValue, SizeOf(currency));
+    end;
+    varBoolean:begin { B }
+      if varvalue then lByteValue := 1 else lByteValue := 0;
+      fStream.Write(vtype, SizeOf(integer));
+      fStream.Write(lByteValue, SizeOf(integer));
+    end;
+    varByte:begin { 11 }
+      lByteValue := varvalue;
+      fStream.Write(vtype, SizeOf(integer));
+      fStream.Write(lByteValue, SizeOf(byte));
+    end;
+    {$IFNDEF DELPHI5}
+    varInt64:begin { 14 }
+      lInt64Value := varvalue;
+      fStream.Write(vtype, SizeOf(integer));
+      fStream.Write(lInt64Value, SizeOf(Int64));
+    end;
+    {$ENDIF DELPHI5}
+    varString:begin { 100 }
+      lStringValue := VarToAnsiStr(varvalue);
+      lIntegerValue := Length(lStringValue);
+      fStream.Write(vtype, SizeOf(integer));
+      fStream.Write(lIntegerValue, SizeOf(integer));
+      if (lIntegerValue>0)
+        then fStream.Write(lStringValue[1],lIntegerValue)
+    end;
+    varUString, {258}
+    varOleStr:begin { 8 }
+      lStringValue := Utf8Encode(varvalue);
+      lIntegerValue := Length(lStringValue);
+      fStream.Write(vtype, SizeOf(integer));
+      fStream.Write(lIntegerValue, SizeOf(integer));
+      if (lIntegerValue>0)
+        then fStream.Write(lStringValue[1],lIntegerValue)
+    end;
+    else NotSupported(Format(err_UnsupportedVariantType, [VarType(varvalue)]));
+  end;
+end;
+
+procedure TROStreamSerializer.WriteXml(const aName : string; const Ref; ArrayElementId : integer = -1);
+var
+  w: Utf8String;
+begin
+  if IXmlNode(Ref) = nil then
+    W := ''
+  else
+    W := UTF8Encode(IXmlNode(Ref).XML);
+  WriteUTF8String(aname, w, ArrayElementId);
+end;
+
+procedure TROStreamSerializer.ReadXml(const aName : string; var Ref; ArrayElementId : integer = -1);
+var
+  w: Utf8String;
+  doc: IXMLDocument;
+begin
+  ReadUTF8String(aName, w, ArrayElementID);
+  if w = '' then
+    IXMLNode(Ref) := nil
+  else begin
+    doc := NewROXmlDocument;
+    doc.New;
+    Doc.XML := UTF8ToString(w);
+    IXMLNode(Ref) := doc.DocumentNode;
+  end;
+end;
+
+procedure TROStreamSerializer.WriteGuid(const aName: String; const Ref; ArrayElementId: Integer = -1);
+var
+  g: TGuid;
+begin
+  g := StringToGUID(TGuidString(Ref));
+  fStream.Write(g, sizeof(g));
+end;
+
+procedure TROStreamSerializer.WriteDecimal(const aName: String; const Ref; ArrayElementId: Integer = -1);
+var
+  dec: TDecimal;
+begin
+  dec := VariantToDecimal(Variant(Ref));
+  fStream.Write(dec, Sizeof(Dec));
+end;
+
+procedure TROStreamSerializer.ReadDecimal(const aName: String; var Ref; ArrayElementId: Integer = -1);
+var
+  d: TDecimal;
+begin
+  if fStream.Read(d, sizeof(d)) <> sizeof(d) then RaiseError(err_UnexpectedEndOfStream);
+  Variant(Ref) := DecimalToVariant(d);
+end;
+
+procedure TROStreamSerializer.ReadGuid(const aName: String; var Ref; ArrayElementId: Integer = -1);
+var
+  g: TGuid;
+begin
+  if fStream.Read(g, sizeof(g)) <> sizeof(g) then RaiseError(err_UnexpectedEndOfStream);
+  string(Ref) := GUIDToString(g);
+end;
+
+procedure TROStreamSerializer.WriteBinary(const aName: string; const Ref;
+  ArrayElementId: integer);
+var
+  obj: Binary absolute Ref;
+  lSize: cardinal;
+  isAssigned: Byte;
+begin
+  if Assigned(Obj) then IsAssigned := 1 else IsAssigned := 0;
+  fStream.WriteBuffer(isAssigned, SizeOf(IsAssigned));
+  if isAssigned <> 0 then begin
+    lSize := obj.Size;
+    WriteInteger('',otULong, lSize);
+    if lSize > 0 then begin
+      obj.Position := 0;
+      fStream.CopyFrom(obj, lSize);
+    end;
+  end;
+end;
+
+procedure TROStreamSerializer.ReadBinary(const aName: string; var Ref;
+  ArrayElementId: integer);
+var
+  obj: Binary absolute Ref;
+  lSize: cardinal;
+  IsAssigned : ByteBool;
+begin
+  fStream.ReadBuffer(IsAssigned, SizeOf(IsAssigned));
+  if IsAssigned then begin
+    obj := Binary.Create;
+    ReadInteger('', otULong, lSize);
+    if (lSize > fStream.Size) then RaiseError(err_InvalidStringLength,[lSize]);
+    obj.SetSize(lSize); { don't set this until we have confirmed the stream size }
+    if lSize > 0 then begin
+      if obj.CopyFrom(fStream, lSize) <> lSize then RaiseError(err_InvalidStringLength,[lSize]);
+      obj.Position := 0;
+    end;
+  end
+  else
+    obj:=nil;
+end;
+
+function TROStreamSerializer.ReadArray(const aName: string; aClass: TClass;
+  var Ref; ArrayElementId: integer): Boolean;
+var
+  obj: TROArray absolute Ref;
+  IsAssigned : ByteBool;
+  cnt : integer;
+begin
+  fStream.ReadBuffer(IsAssigned, SizeOf(IsAssigned));
+  Result:=IsAssigned;
+  if Result then begin
+    obj := TROArray(aClass.Create);
+    ReadInteger('', otULong, cnt);
+    obj.Resize(cnt);
+    obj.ReadComplex(self);
+  end
+  else
+    Obj:=nil;
+end;
+
+function TROStreamSerializer.ReadStruct(const aName: string;
+  aClass: TClass; var Ref; ArrayElementId: integer): Boolean;
+var
+  obj : TROComplexType absolute Ref;
+  IsAssigned : ByteBool;
+  clsnme : ansistring;
+  clsnme2: string;
+  lActualClass:TROComplexTypeClass;
+begin
+  fStream.ReadBuffer(IsAssigned, SizeOf(IsAssigned));
+  Result := IsAssigned;
+  if Result then begin
+    ReadUTF8String('', clsnme,-1,MAX_ITEM_NAME);
+    clsnme2 := {$IFDEF UNICODE}UTF8ToString{$ENDIF}(clsnme);
+    lActualClass := FindROClass(clsnme2);
+    if not Assigned(lActualClass) then RaiseError(err_UnknownClassInStream,[clsnme2,aClass.ClassName]);
+    if not lActualClass.InheritsFrom(aClass) then RaiseError(err_UnexpectedClassInStream,[clsnme2,aClass.ClassName]);
+    obj := lActualClass.Create;
+    obj.ReadComplex(self);
+  end
+  else
+    Obj:=nil;
+end;
+
+procedure TROStreamSerializer.WriteArray(const aName: string; const Ref; aClass: TClass; 
+  ArrayElementId: integer);
+//var IsNIL : ByteBool;
+var
+  obj : TROArray absolute Ref;
+  cnt : integer;
+  IsAssigned: Byte;
+begin
+  if Assigned(Obj) then IsAssigned := 1 else IsAssigned := 0;
+  fStream.Write(IsAssigned, SizeOf(IsAssigned));
+  if isAssigned <> 0 then begin
+    cnt := obj.Count;
+    WriteInteger('', otULong, cnt);
+    obj.WriteComplex(Self);
+  end;
+end;
+
+procedure TROStreamSerializer.WriteStruct(const aName: string; const Ref; aClass: TClass; 
+  ArrayElementId: integer);
+var
+  obj : TROComplexType absolute Ref;
+  clsnme : Ansistring;
+  IsAssigned: byte;
+begin
+  if Assigned(Obj) then IsAssigned := 1 else IsAssigned := 0;
+  fStream.Write(IsAssigned, SizeOf(IsAssigned));
+  if isAssigned <> 0 then begin
+    clsnme := {$IFDEF UNICODE}UTF8Encode{$ENDIF}(obj.ClassName);
+    WriteUTF8String('', clsnme);
+    obj.WriteComplex(Self);
+  end;
+end;
+
+procedure TROStreamSerializer.ReadException(const aName: string;
+  var Ref; ArrayElementId: integer);
+var
+  obj: EROException absolute Ref;
+begin
+  if Assigned(obj) then EROException(obj).ReadException(Self);
+end;
+
+procedure TROStreamSerializer.WriteException(const aName: string;
+  const Ref; ArrayElementId: integer);
+var
+  obj: EROException absolute Ref;
+begin
+  if Assigned(obj) then EROException(obj).WriteException(Self);
+end;
+
+procedure TROStreamSerializer.ReadAnsiString(const aName: string; var Ref;
+  ArrayElementId, iMaxLength: integer);
+var
+  sze : integer;
+begin
+
+  {$IFDEF DEBUG_REMOBJECTS_BINMESSAGE_LOWLEVEL}
+  DebugServer.Write('TROStreamSerializer.ReadString 1(name=%s, position before =$%x',[aName, fStream.Position]);
+  {$ENDIF DEBUG_REMOBJECTS_BINMESSAGE_LOWLEVEL}
+
+  fStream.ReadBuffer(sze, SizeOf(sze));
+  //ToDo: we need some code here to avoid hacker attachs with too long strings
+
+  {$IFDEF DEBUG_REMOBJECTS_BINMESSAGE_LOWLEVEL}
+  DebugServer.Write('TROStreamSerializer.ReadString 2(name=%s, position before =$%x, size=$%x',[aName, fStream.Position,sze]);
+  {$ENDIF DEBUG_REMOBJECTS_BINMESSAGE_LOWLEVEL}
+
+  if ((iMaxLength > -1) and (sze > iMaxLength)) or
+     (sze > fStream.Size) then
+    RaiseError(err_InvalidStringLength,[sze]);
+
+  if (sze>0) then begin
+    SetLength(AnsiString(Ref), sze);
+    fStream.ReadBuffer(AnsiString(Ref)[1], sze);
+  end
+  else string(Ref) := '';
+end;
+
+procedure TROStreamSerializer.WriteAnsiString(const aName: string;
+  const Ref; ArrayElementId: integer);
+var sze : integer;
+begin
+  sze := Length(AnsiString(Ref));
+  fStream.Write(sze, SizeOf(sze));
+  if (sze>0) then fStream.Write(AnsiString(Ref)[1], sze);
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROStreamUtils.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROStreamUtils.pas
new file mode 100644
index 0000000..15d08c1
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROStreamUtils.pas	
@@ -0,0 +1,386 @@
+unit uROStreamUtils;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Provided by Nico Schoemaker (nico.schoemaker@teamro.remobjects.com)        }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses Classes, SysUtils;
+
+// String support routines for streams
+
+function  Strm_HasHeader(aHeader: AnsiString; aStream: TStream): Boolean;
+function  Strm_PosFirst(aSubstr: Ansistring; aStream: TStream): Integer;
+function  Strm_PosLast(aSubstr: ansistring; aStream: TStream): Integer;
+function  Strm_StrCount(aSubstr: Ansistring; aStream: TStream): Integer;
+function  Strm_StrRangeCount(aSubstr: Ansistring; StartPos,EndPos: Integer; aStream: TStream): Integer;
+function  Strm_StrAtPos(aSubstr: Ansistring; aPos: Integer; aStream: TStream): Boolean;
+procedure Strm_InsertStr(aSubstr: Ansistring; aPos: Integer; aStream: TStream);
+function  Strm_StreamToStr(aStream: TStream): AnsiString;
+function  Strm_StreamRangeToStr(aStream: TStream; StartPos,EndPos: Integer): AnsiString;
+function  Strm_ReadPattern(aStream: TStream;aStartTag,aEndTag,aSeperator: AnsiString): TStringList;
+
+implementation
+
+uses
+  {$IFDEF DELPHI2009}AnsiStrings,{$ENDIF}
+  uROClasses;
+
+function Strm_HasHeader(aHeader: AnsiString;aStream: TStream): Boolean;
+var Buffer: AnsiChar;
+    Cntr: Integer;
+    BufferS: AnsiString;
+    OldPos: Integer;
+begin
+  result := false;
+
+  if aHeader = '' then
+    Exit;
+  if not(Assigned(aStream)) then
+    Exit;
+  if Length(aHeader) > aStream.Size then
+    Exit;
+
+  OldPos := aStream.Position;
+  aStream.Position := 0;
+  BufferS := '';
+  Buffer := #0;
+  // Read the first x bytes from the string and compare against the headertag
+  for Cntr := 1 to Length(aHeader) do
+  begin
+    aStream.Read(Buffer,1);
+    BufferS := BufferS + Buffer;
+  end;
+  result := BufferS = aHeader;
+
+  aStream.Position := OldPos;
+end;
+
+function Strm_PosFirst(aSubstr: Ansistring; aStream: TStream): Integer;
+var Buffer: AnsiChar;
+    BufS:   AnsiString;
+    i,x:    Integer;
+    pos:    Integer;
+    oldpos: Integer;
+    lenS:   Integer;
+begin
+  result := -1;
+
+  if aSubstr = '' then
+    Exit;
+  if not(Assigned(aStream)) then
+    Exit;
+
+  lenS := Length(aSubstr);
+
+  if lenS > aStream.Size then
+    Exit;
+
+  oldpos := aStream.Position;
+  aStream.Position := 0;
+  pos := 0;
+
+  for i := 0 to aStream.Size-1 do
+  begin
+
+    // Avoid reading beyond the stream size
+    if (aStream.Position+lenS) > aStream.Size then
+      Break;
+
+    BufS := '';
+    Buffer := #0;
+    // Read x bytes at once into the buffer to make a compare
+    for x := 1 to lenS do
+    begin
+      aStream.Read(Buffer,1);
+      BufS := BufS + Buffer;
+    end;
+
+    if UpperCase(BufS) = UpperCase(aSubstr) then
+    begin
+      result := pos;
+      break;
+    end;
+
+    inc(pos);
+    aStream.Position := pos;
+  end;
+
+  aStream.Position := oldpos;
+end;
+
+function  Strm_PosLast(aSubstr: Ansistring; aStream: TStream): Integer;
+var lenS:   Integer;
+    spos:   Integer;
+begin
+  result := -1;
+
+  if aSubstr = '' then
+    Exit;
+  if not(Assigned(aStream)) then
+    Exit;
+
+  lenS := Length(aSubstr);
+  spos := Strm_PosFirst(aSubstr,aStream);
+
+  if spos <> -1 then
+  begin
+    result := spos + lenS-1;
+  end;
+end;
+
+function Strm_StrAtPos(aSubstr: Ansistring; aPos: Integer; aStream: TStream): Boolean;
+var Buffer: AnsiChar;
+    BufS: AnsiString;
+    OldPos: Integer;
+    i: Integer;
+    lenS: Int64;
+begin
+  result := false;
+
+  if not(Assigned(aStream)) then
+    Exit;
+  if aSubstr = '' then
+    Exit;
+  lenS := Length(aSubstr);
+  if (aPos < 0) or ((aPos+lenS) > (aStream.Size)) then
+    Exit;
+  if lenS > aStream.Size then
+    Exit;
+
+  oldpos := aStream.Position;
+  aStream.Position := aPos;
+  Buffer := #0;
+  BufS := '';
+  for i := 1 to lenS do
+  begin
+    aStream.Read(Buffer,1);
+    BufS := BufS + Buffer;
+  end;
+
+  result := UpperCase(BufS) = UpperCase(aSubstr);
+
+  aStream.Position := OldPos;
+end;
+
+function Strm_StrCount(aSubstr: Ansistring; aStream: TStream): Integer;
+var OldPos: Integer;
+    i: Integer;
+    lenS: int64;
+begin
+  result := 0;
+
+  if not(Assigned(aStream)) then
+    Exit;
+  if aSubstr = '' then
+    Exit;
+  lenS := Length(aSubstr);
+  if lenS > aStream.Size then
+    Exit;
+
+  oldpos := aStream.Position;
+
+  for i := 0 to aStream.Size-1 do
+  begin
+    if (aStream.Position+lenS) > (aStream.Size) then
+      Break;
+
+    aStream.Position := i;
+    if Strm_StrAtPos(aSubstr, aStream.Position, aStream) then
+      Inc(Result);
+  end;
+
+  aStream.Position := OldPos;
+end;
+
+
+function Strm_StrRangeCount(aSubstr: Ansistring; StartPos,EndPos: Integer; aStream: TStream): Integer;
+var OldPos: Integer;
+    i: Integer;
+    lenS: Int64;
+begin
+  result := 0;
+
+  if not(Assigned(aStream)) then
+    Exit;
+  if aSubstr = '' then
+    Exit;
+
+  lenS := Length(aSubstr);
+  if lenS > aStream.Size then
+    Exit;
+
+  if (StartPos < 0) or ((StartPos+lenS) > (aStream.Size)) then
+    Exit;
+  if (EndPos < 0) or ((EndPos+lenS) > (aStream.Size)) then
+    Exit;
+  if (EndPos < StartPos) or (EndPos = StartPos) then
+    Exit;
+  if (StartPos+(lenS-1)) >= EndPos then
+    Exit;
+
+  oldpos := aStream.Position;
+
+  for i := StartPos to EndPos do
+  begin
+    aStream.Position := i;
+    if Strm_StrAtPos(aSubstr,i,aStream) then
+      Inc(Result);
+    if (i+(lenS-1)) > EndPos then
+      Break;
+  end;
+
+  aStream.Position := OldPos;
+end;
+
+function  Strm_ReadPattern(aStream: TStream;aStartTag,aEndTag,aSeperator: AnsiString): TStringList;
+var Buffer: AnsiChar;
+    BufS: AnsiString;
+    OldPos: Integer;
+    PosST: Int64;
+    lenST: integer;
+    lenET,PosET: Integer;
+    lenSP: Integer;
+begin
+  result := TStringList.Create;
+
+  if not(Assigned(aStream)) then
+    Exit;
+
+  if aStartTag = '' then
+    Exit;
+  if aEndTag = '' then
+    Exit;
+  if aSeperator = '' then
+    Exit;
+
+
+  oldpos := aStream.Position;
+  lenST := Length(aStartTag);
+  lenET := Length(aEndTag);
+  lenSP := Length(aSeperator);
+
+  PosST := Strm_PosFirst(aStartTag,aStream);
+  if (PosST+lenST+lenSP+lenET) >= aStream.Size then
+    Exit;
+
+  PosET := Strm_PosFirst(aEndTag,aStream);
+  if (PosET < PosST+lenST+lenSP) then
+    Exit;
+
+  // Start 1 byte after the starttag, include start of endtag
+  aStream.Position := (PosST+lenST);
+  BufS := '';
+  Buffer := #0;
+  while aStream.Position < PosET do
+  begin
+    if Strm_StrAtPos(aSeperator,aStream.Position,aStream) then
+    begin
+      // advance position 1 byte after the seperator
+      aStream.Position := aStream.Position + lenSP;
+      if BufS <> '' then
+      begin
+        Result.Add({$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(BufS));
+        BufS := '';
+      end;
+    end;
+
+    if Strm_StrAtPos(aEndTag,aStream.Position,aStream) then
+      Break;
+
+    aStream.Read(Buffer,1);
+    BufS := BufS + Buffer;
+  end;
+
+
+  aStream.Position := OldPos;
+end;
+
+function  Strm_StreamToStr(aStream: TStream): AnsiString;
+var OldPos: Integer;
+begin
+  result := '';
+  if not(Assigned(aStream)) then
+    Exit;
+
+  OldPos := aStream.Position;
+  aStream.Position := 0;
+
+  SetLength(result, aStream.Size);
+  if (aStream.Size>0)
+    then aStream.Read(result[1], aStream.Size);
+
+  aStream.Position := OldPos;
+end;
+
+function  Strm_StreamRangeToStr(aStream: TStream; StartPos,EndPos: Integer): AnsiString;
+var Buffer: AnsiChar;
+    OldPos: Integer;
+    i: Integer;
+begin
+  result := '';
+
+  if not(Assigned(aStream)) then
+    Exit;
+
+  OldPos := aStream.Position;
+
+  if (StartPos < 0) or (StartPos >= EndPos) then
+    Exit;
+  if (StartPos >= aStream.Size-1) or (EndPos > aStream.Size-1) then
+    Exit;
+
+  aStream.Position := 0;
+  Buffer := #0;
+  for i := StartPos to EndPos do
+  begin
+    aStream.Read(buffer,1);
+    Result := Result + Buffer;
+  end;
+
+  aStream.Position := OldPos;
+end;
+
+
+procedure Strm_InsertStr(aSubstr: Ansistring; aPos: Integer; aStream: TStream);
+var Buffer: AnsiChar;
+    BufS: AnsiString;
+    OldPos: Integer;
+    i: Integer;
+begin
+  if not(Assigned(aStream)) then
+    Exit;
+  if aSubstr = '' then
+    Exit;
+
+  if (aPos > (aStream.Size-1)) then
+    raise EROException.Create('Strm_InsertStr: invalid position '+IntToStr(aPos));
+
+  oldpos := aStream.Position;
+  BufS := Strm_StreamToStr(aStream);
+  Insert(aSubstr,BufS,aPos+1);
+  aStream.Position := 0;
+
+  for i := 1 to Length(BufS) do
+  begin
+    buffer := BufS[i];
+    aStream.Write(buffer,1);
+  end;
+
+  aStream.Position := OldPos;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSuperTCPChannel.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSuperTCPChannel.pas
new file mode 100644
index 0000000..146f898
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSuperTCPChannel.pas	
@@ -0,0 +1,997 @@
+unit uROSuperTCPChannel;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Indy Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+uses
+  SysUtils, Classes, uROClasses, uROClient, uROClientIntf, SyncObjs,
+  uROAsync,{$IFDEF RemObjects_UseEncryption} uRoEncryption, {$ENDIF}
+  IdTCPConnection, IdTCPClient, {$IFDEF MSWINDOWS}Windows, {$ENDIF}uROSCHelpers, uROThreadPool;
+
+type
+  TROCustomSuperTCPChannel = class;
+  TROSCClientWorker = class;
+  TROWaitingRequest = class
+  private
+    fEvent: TROEvent;
+    fFreeEvent: Boolean;
+    fId: Integer;
+    fResultData: TStream;
+    fResultErrorCode: Integer;
+  public
+    property Id: Integer read fId;
+    property Event: TROEvent read fEvent;
+    property Resultdata: TStream read fResultData write fResultData;
+    property ResultErrorCode: Integer read fResultErrorCode write fResultErrorCode;
+
+    constructor Create(Id: Integer); overload;
+    constructor Create(Id: Integer; Ev: TROEvent); overload;
+    destructor Destroy; override;
+  end;
+
+  TROPooledEvent = class(TInterfacedObject, IROThreadPoolCallback)
+  private
+    fData: TStream;
+    fOwner: TROCustomSuperTCPChannel;
+  protected
+    procedure Callback(Caller: TROThreadPool; Thread: TThread);
+  public
+    constructor Create(aData: TStream; aOwner: TROCustomSuperTCPChannel);
+    destructor Destroy; override;
+  end;
+
+  TROSCState = (scNotConnected, scConnecting, scConnected, scReconnecting);
+  TROSCAutoReconnectBehavior  = (sbBeforeServerLocators, sbAfterServerLocators, sbSwitchServerLocatorAfterFirstFailure);
+  TROCustomSuperTcpChannel = class(TROTransportChannel, IROTransport,
+    IROTCPTransport, IROActiveEventChannel, IROMultiThreadAwareChannel,
+    IROAsyncTransportChannel, IROActiveAsyncTransportChannel, IROTransportChannelEx)
+  private
+    fRequestTimeout: Integer;
+    fState: TROSCState;
+    fHost: string;
+    fPort: Integer;
+    fConnection: TIdTCPClient;
+    fActive: Boolean;
+    fOwnsEventThreadPool: Boolean;
+    fEventThreadPool: TROThreadPool;
+    fClient: TROSCClientWorker;
+    fWorkerThread: TThread;
+    fWaitingRequests: TThreadList;
+    fAutoReconnect: Boolean;
+    fEventReceiver: IROEventReceiver;
+    fConnectEvent: TROEvent;
+    fReconnectEvent: TROEvent;
+    fOnDisconnected: TNotifyEvent;
+    fOnConnected: TNotifyEvent;
+    fReconnectDelay: Integer;
+    fStoreActive: Boolean;
+    fPingSecs: Integer;
+    fAckWaitTimeout: Integer;
+    fIdleTimeoutMinutes: Integer;
+    fSynchronizeEvents: Boolean;
+    fConnectionWaitTimeout: Integer;
+    fAutoReconnectBehavior: TROSCAutoReconnectBehavior;
+    procedure SetHost(const Value: string);
+    procedure SetPort(const Value: Integer);
+    procedure SetActive(const Value: Boolean);
+    procedure SetEventThreadPool(const Value: TROThreadPool);
+    function GetClientID: TGUID;
+    procedure SetClientID(const Value: TGUID);
+    function GetMaxPackageSize: Longint;
+    procedure SetMaxPackageSize(val: longint);
+    function GetConnected: Boolean;
+    function GetSkipAck: Boolean;
+    procedure SetSkipAck(const Value: Boolean);
+    procedure SetPingSecs(const Value: Integer);
+    function InDestroyingState: Boolean;
+  protected
+    function InitServerLocator:Integer; override;
+    procedure ChangeServerLocator(var faultstartlocatoridx: integer; var aRetry: Boolean; const aException: Exception); override;
+    procedure Loaded; override;
+    function GetClientAddress: String;
+    function GetTransportObject: TObject; override;
+
+    procedure HasData(Id: Integer; aData: TStream);
+    procedure BeforeDispatch(aMessage: IROMessage); override;
+    procedure IntDispatch(aRequest, aResponse : TStream); override;
+    procedure IntSetServerLocator(aServerLocator: TROServerLocator); override;
+    procedure RegisterEventReceiver(aReceiver: IROEventReceiver);
+    procedure UnregisterEventReceiver(aReceiver: IROEventReceiver);
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+    function InvokeRequest(aRequest: TStream; aGetResponse: Boolean = True;
+      aEvent: TROEvent = nil): String; overload;
+    function InvokeRequest(aRequest:TStream; iGetResponse:boolean=true):string; overload;
+    function CheckStatus(const iMessageID: String): Boolean;
+    procedure RetrieveResponse(const iMessageID: String;
+      aResponse: TStream);
+  public
+    constructor Create(aOwner: TComponent); override;
+    destructor Destroy; override;
+    procedure WaitForActive(const Timeout: Integer);
+
+    property Host: string read fHost write SetHost;
+    property Port: Integer read fPort write SetPort default 8095;
+    property PingSecs: Integer read fPingSecs write SetPingSecs default 60;
+    property StoreActive: Boolean read fStoreActive write fStoreActive default True;
+    property Active: Boolean read fActive write SetActive  stored fStoreActive default False;
+    property Client: TIdTCPClient read fConnection;
+    property RequestTimeout: Integer read fRequestTimeout write fRequestTimeout default 60000;
+    property EventThreadPool: TROThreadPool read fEventThreadPool write SetEventThreadPool;
+    property AutoReconnect: Boolean read fAutoReconnect write fAutoReconnect default False;
+    property ReconnectDelay: Integer read fReconnectDelay write fReconnectDelay default 500;
+    property ClientID: TGUID read GetClientID write SetClientID;
+    property OnDisconnected: TNotifyEvent read fOnDisconnected write fOnDisconnected;
+    property MaxPackageSize: Integer read GetMaxPackageSize write SetMaxPackageSize default 10*1024*1024;
+    property OnConnected: TNotifyEvent read fOnConnected write fOnConnected;
+    property AckWaitTimeout: Integer read fAckWaitTimeout write fAckWaitTimeout default 10000;
+    property Connected: Boolean read GetConnected;
+    property IdleTimeoutMinutes: Integer read fIdleTimeoutMinutes write fIdleTimeoutMinutes default 0; // minutes
+    property SynchronizeEvents: Boolean read fSynchronizeEvents write fSynchronizeEvents default False;
+    property ConnectionWaitTimeout: Integer read fConnectionWaitTimeout write fConnectionWaitTimeout default 10000;
+    property SkipAck: Boolean read GetSkipAck write SetSkipAck default false;
+    property AutoReconnectBehavior: TROSCAutoReconnectBehavior read fAutoReconnectBehavior write fAutoReconnectBehavior default sbSwitchServerLocatorAfterFirstFailure;
+  end;
+
+  TROSuperTCPChannel = class(TROCustomSuperTcpChannel)
+  public
+  published
+    property Host;
+    property Port;
+    property Active;
+    property RequestTimeout;
+    property AutoReconnect;
+    property ReconnectDelay;
+    property OnDisconnected;
+    property OnConnected;
+    property StoreActive;
+    property MaxPackageSize;
+    property AckWaitTimeout;
+  	property SynchronizeEvents;
+    property ConnectionWaitTimeout;
+  published
+    property SynchronizedProbing;
+    property OnSendStream;
+    property OnReceiveStream;
+    property ServerLocators;
+    property DispatchOptions;
+    property OnServerLocatorAssignment;
+    property ProbeServers;
+    property ProbeFrequency;
+    property SkipAck;
+    property OnBeforeProbingServers;
+    property OnAfterProbingServers;
+    property OnBeforeProbingServer;
+    property OnAfterProbingServer;
+    property OnLoginNeeded;
+    property AutoReconnectBehavior;
+  end;
+
+  TROSCClientWorker = class(TROSuperChannelWorker)
+  private
+    fOwner: TROCustomSuperTCPChannel;
+    fSkipReconnect: Boolean;
+  protected
+    procedure Connected; override;
+    procedure Disconnected(var RestartLoop: Boolean); override;
+    procedure IncomingData(Id: Integer; aData: TStream); override;
+    procedure Idle; override;
+    procedure SetAckDetails(Id: Integer; Oke: Boolean; ErrorNo: Integer); override;
+  public
+    constructor Create(aOwner: TROCustomSuperTCPChannel; aConnection: TIdTCPConnection);
+    property Owner: TROCustomSuperTCPChannel read fOwner;
+  end;
+
+implementation
+
+type
+  TROClientThread = class(TROInitializedThread)
+  private
+    fChannel: TROSCClientWorker;
+    fConnecting: Boolean;
+  protected
+    procedure Execute; override;
+  public
+    constructor Create(aChannel: TROSCClientWorker);
+    property Connecting: Boolean read fConnecting;
+  end;
+
+{ TROCustomSuperTCPChannel }
+
+procedure TROCustomSuperTcpChannel.BeforeDispatch(aMessage: IROMessage);
+begin
+  inherited;
+  if not  fConnection.Connected then
+  begin
+    SetActive(false);
+    SetActive(true);
+  end;
+  fReconnectEvent.SetEvent;
+  if  fConnectEvent.WaitFor(fConnectionWaitTimeout) <> wrSignaled then raise EROException.Create('No connection available');
+  if aMessage <> nil then
+    aMessage.ClientID := fClient.ClientId;
+end;
+
+procedure TROCustomSuperTcpChannel.ChangeServerLocator(
+  var faultstartlocatoridx: integer; var aRetry: Boolean;
+  const aException: Exception);
+begin
+  // none
+end;
+
+function TROCustomSuperTcpChannel.CheckStatus(
+  const iMessageID: String): Boolean;
+var
+  i, id: Integer;
+  lList: TList;
+  lReq: TROWaitingRequest;
+begin
+  Result := False;
+  id := StrToInt(iMessageID);
+  lList := fWaitingRequests.LockList;
+  try
+    for i := lList.Count -1 downto 0 do begin
+      lReq := TROWaitingRequest(lList[i]);
+      if Lreq.Id = id then
+      begin
+        Result := (lReq.Resultdata <> nil) or (lReq.ResultErrorCode <> -1);
+        exit;
+      end;
+    end;
+  finally
+    fWaitingRequests.UnlockList;
+  end;
+end;
+
+constructor TROCustomSuperTCPChannel.Create(aOwner: TComponent);
+begin
+  inherited Create(aOwner);
+  fConnectEvent := TROEvent.create(nil, true, false, '');
+  fReconnectEvent := TROEvent.Create(nil, true, false, '');
+
+  fPingSecs := 60;
+  fWaitingRequests := TThreadList.Create;
+  fHost := 'localhost';
+  fPort := 8095;
+  fConnection := TIdTCPClient.Create(nil);
+  fClient := TROSCClientWorker.Create(Self, fConnection);
+  fRequestTimeout := 60000;
+  fAckWaitTimeout := 10000;
+  fReconnectDelay := 500;
+  fConnectionWaitTimeout := 10000;
+  fStoreActive := True;
+  ThreadSafe := True;
+  fAutoReconnectBehavior := sbSwitchServerLocatorAfterFirstFailure;
+end;
+
+
+destructor TROCustomSuperTCPChannel.Destroy;
+var
+  fw: TROClientThread;
+begin
+  if (fWorkerThread <> nil) then begin
+    fActive := False;
+    fw := TROClientThread(fWorkerThread);
+    fWorkerThread := nil;
+    fClient.Disconnect;
+    fw.Terminate;
+    fReconnectEvent.SetEvent;
+    fw.WaitFor;
+    FreeAndNil(fw);
+  end;
+  fClient.Free;
+  fConnection.Free;
+  fWaitingRequests.Free;
+  fConnectEvent.Free;
+  if fOwnsEventThreadPool then
+  begin
+    fEventThreadPool.Free;
+  end;
+  fEventReceiver := nil;
+  fReconnectEvent.Free;
+  inherited Destroy;
+end;
+
+function TROCustomSuperTcpChannel.InDestroyingState: Boolean;
+begin
+  Result:= csDestroying in ComponentState;
+end;
+
+function TROCustomSuperTCPChannel.GetClientAddress: String;
+begin
+{$IFDEF REMOBJECTS_INDY8}
+  if (fConnection.Binding <> nil) and (fConnection.Binding <> nil) then
+    Result := fConnection.Binding.PeerIP
+  else
+    Result := '';
+{$ELSE}
+  if (fConnection.Socket <> nil) and (fConnection.Socket.Binding <> nil) then
+    Result := fConnection.Socket.Binding.PeerIP
+  else
+    Result := '';
+{$ENDIF}
+end;
+
+function TROCustomSuperTcpChannel.GetClientID: TGUID;
+begin
+  Result := fClient.ClientID;
+end;
+
+function TROCustomSuperTcpChannel.GetConnected: Boolean;
+begin
+  result := fClient.IsConnected;
+end;
+
+function TROCustomSuperTcpChannel.GetMaxPackageSize: Longint;
+begin
+  result := fClient.MaxPackageSize;
+end;
+
+function TROCustomSuperTcpChannel.GetSkipAck: Boolean;
+begin
+  result := fClient.SkipAck;
+end;
+
+function TROCustomSuperTCPChannel.GetTransportObject: TObject;
+begin
+  Result := self;
+end;
+
+procedure TROCustomSuperTCPChannel.HasData(Id: Integer; aData: TStream);
+var
+  lList: TList;
+  i: Integer;
+  lReq: TROWaitingRequest;
+  lEvent: TROPooledEvent;
+  lEventIntf: IROThreadPoolCallback;
+begin
+  if Id < 0 then // got an event
+  begin
+    if fEventThreadPool = nil then raise EROException.Create('No thread pool assigned');
+    lEvent := TROPooledEvent.Create(aData, Self);
+    lEventIntf := lEvent;
+    try
+        fEventThreadPool.QueueItem(lEventIntf);
+    except
+      lEvent.fData := nil;
+      raise;
+    end;
+  end else
+  begin
+    lList := fWaitingRequests.LockList;
+    try
+      lReq := nil;
+      for i := lList.Count -1 downto 0 do
+      begin
+        if TROWaitingRequest(lList[i]).Id = Id then
+        begin
+          lReq := TROWaitingRequest(lList[i]);
+          break;
+        end;
+      end;
+      if lReq = nil then
+      begin
+        // Don't want a response
+        aData.Free;
+        exit;
+      end;
+      lReq.Resultdata := aData;
+      lReq.Event.SetEvent;
+    finally
+      fWaitingRequests.UnlockList;
+    end;
+  end;
+end;
+
+function TROCustomSuperTcpChannel.InitServerLocator: Integer;
+begin
+  Result:=-1;
+end;
+
+procedure TROCustomSuperTCPChannel.IntDispatch(aRequest,
+  aResponse: TStream);
+var
+  lId: Integer;
+  lReq: TROWaitingRequest;
+begin
+//  if (not fActive) then raise EROException.Create('Not connected');
+
+  lId := fClient.GenerateId;
+  lReq := TROWaitingRequest.Create(lId);
+  fWaitingRequests.Add(lReq);
+  try
+    TROSCClientWorker.WaitForAck(fClient.SendPackage(aRequest, lId), fAckWaitTimeout);
+    try
+      lReq.Event.WaitFor(fRequestTimeout);
+    finally
+      fWaitingRequests.Remove(lReq);
+    end;
+    if lReq.Resultdata = nil then begin
+      case lReq.fResultErrorCode of
+        ScCmdNoAck_MsgTooLarge: raise EROException.Create('Message from server too large');
+        ScCmdNoAck_QueueFull: raise EROException.Create('Server queue full');
+        else raise EROTimeout.Create('Timeout waiting for response');
+      end;
+    end;
+    lReq.Resultdata.Seek(0, soFromBeginning);
+    aResponse.CopyFrom(lReq.Resultdata, lReq.Resultdata.Size);
+  finally
+    lReq.Free;
+  end;
+end;
+
+procedure TROCustomSuperTCPChannel.IntSetServerLocator(
+  aServerLocator: TROServerLocator);
+begin
+  Host := aServerLocator.Host;
+  Port := aServerLocator.Port;
+end;
+
+function TROCustomSuperTcpChannel.InvokeRequest(aRequest: TStream;
+  aGetResponse: Boolean; aEvent: TROEvent): String;
+var
+  lId: Integer;
+  lReq: TROWaitingRequest;
+begin
+  lId := fClient.GenerateId;
+  if aGetResponse then begin
+    if aEvent = nil then
+      lReq := TROWaitingRequest.Create(lId)
+    else
+      lReq := TROWaitingRequest.Create(lId, aEvent);
+
+    fWaitingRequests.Add(lReq);
+  end;
+  fClient.SendPackage(aRequest, lId);
+  Result := IntToStr(lId);
+  aRequest.Free; // needs to be freed here
+end;
+
+function TROCustomSuperTcpChannel.InvokeRequest(aRequest: TStream;
+  iGetResponse: boolean): string;
+begin
+  Result := InvokeRequest(aRequest, iGetResponse, nil);
+end;
+
+procedure TROCustomSuperTCPChannel.Loaded;
+begin
+  inherited;
+  if fActive then
+  begin
+    fActive := false;
+    SetActive(true);
+  end;
+end;
+
+procedure TROCustomSuperTcpChannel.Notification(AComponent: TComponent;
+  Operation: TOperation);
+var
+  dummy: IROEventReceiver;
+begin
+  if (Operation = opRemove) then
+  begin
+    if (AComponent = fEventThreadPool) then
+      fEventThreadPool := nil;
+    if Supports(aComponent, IROEventReceiver, dummy) and (dummy = fEventReceiver) then
+      fEventReceiver := nil;
+  end;
+  inherited;
+end;
+
+procedure TROCustomSuperTcpChannel.RegisterEventReceiver(
+  aReceiver: IROEventReceiver);
+begin
+  if assigned(fEventReceiver) then
+    TComponent(fEventReceiver.GetObject).RemoveFreeNotification(Self);
+  fEventReceiver := aReceiver;
+  if assigned(fEventReceiver) then
+    TComponent(fEventReceiver.GetObject).FreeNotification(Self);
+end;
+
+procedure TROCustomSuperTcpChannel.RetrieveResponse(
+  const iMessageID: String; aResponse: TStream);
+var
+  i, id: Integer;
+  lList: TList;
+  lReq: TROWaitingRequest;
+
+begin
+  id := STrToInt(iMessageID);
+  lList := fWaitingRequests.LockList;
+  try
+    lReq := nil;
+    for i := lList.Count -1 downto 0 do begin
+      lReq := TROWaitingRequest(lList[i]);
+      if Lreq.Id = id then
+        break
+      else lReq := nil;
+    end;
+  finally
+    fWaitingRequests.UnlockList;
+  end;
+  if lReq = nil then
+    raise EROTimeout.Create('Unknown response id '+iMessageID);
+
+  try
+    if lReq.fEvent <> nil then
+      lReq.fEvent.WaitFor(fRequestTimeout);
+    if lReq.fResultData = nil then begin
+      case lReq.ResultErrorCode of
+        ScCmdNoAck_MsgTooLarge: raise EROException.Create('Message from server too large');
+        ScCmdNoAck_QueueFull: raise EROException.Create('Server queue full');
+        else raise EROTimeout.Create('Timeout waiting for response');
+      end;
+    end;
+    lREq.Resultdata.Seek(0, soFromBeginning);
+  {$IFDEF RemObjects_UseEncryption}
+    if Encryption.EncryptionMethod <> tetNone then
+      DoDecryption(lReq.Resultdata, aResponse)
+    else
+  {$ENDIF}
+      aResponse.CopyFrom(lReq.Resultdata, lReq.Resultdata.Size);
+    aResponse.Seek(0, soFromBeginning);
+  finally
+    fWaitingRequests.Remove(lReq);
+    lReq.Free;
+  end;
+end;
+
+procedure TROCustomSuperTCPChannel.SetActive(const Value: Boolean);
+var
+  fw: TThread;
+begin
+  if (fActive = value) then begin
+    if not fActive or (fState <> scNotConnected) then
+      Exit;
+  end;
+  fActive := value;
+  if ComponentState * [csLoading] = [] then
+  begin
+    if (fWorkerThread <> nil) then
+    begin
+      fw := fWorkerThread;
+      fWorkerThread := nil;
+      fClient.Disconnect;
+      TROClientThread(fw).Terminate;
+      fReconnectEvent.SetEvent; 
+      fw.WaitFor;
+      FreeAndNil(fw);
+      fState := scNotConnected;
+    end;
+    if fEventThreadPool = nil then
+    begin
+      EventThreadPool := TROThreadPool.Create(nil);
+      fOwnsEventThreadPool := true;
+    end;
+    if fActive then
+    begin
+      fReconnectEvent.SetEvent;
+      fConnectEvent.ResetEvent;
+      fState := scConnecting;
+      fWorkerThread := TROClientThread.Create(fClient);
+    end;
+  end;
+end;
+
+procedure TROCustomSuperTcpChannel.SetClientID(const Value: TGUID);
+begin
+  fClient.ClientID := Value;
+end;
+
+procedure TROCustomSuperTcpChannel.SetEventThreadPool(
+  const Value: TROThreadPool);
+begin
+  if fOwnsEventThreadPool then
+  begin
+    fEventThreadPool.Free;
+    fOwnsEventThreadPool := false;
+  end;
+  fEventThreadPool := Value;
+end;
+
+procedure TROCustomSuperTCPChannel.SetHost(const Value: string);
+begin
+  if fActive and (csLoading in ComponentState) then
+    raise Exception.Create('Client is active');
+  fHost := value;
+end;
+
+procedure TROCustomSuperTcpChannel.SetMaxPackageSize(val: Integer);
+begin
+  fClient.MaxPackageSize := Val;
+end;
+
+procedure TROCustomSuperTcpChannel.SetPingSecs(const Value: Integer);
+begin
+  if (Value < 10) or (Value > 60) then raise Exception.Create('PingSecs has to be between 10 and 60');
+  fPingSecs := Value;
+end;
+
+procedure TROCustomSuperTCPChannel.SetPort(const Value: Integer);
+begin
+  if fActive and (csLoading in ComponentState) then
+    raise Exception.Create('Client is active');
+  fPort := Value;
+end;
+
+procedure TROCustomSuperTcpChannel.SetSkipAck(const Value: Boolean);
+begin
+  fClient.SkipAck := Value;
+end;
+
+procedure TROCustomSuperTcpChannel.UnregisterEventReceiver(
+  aReceiver: IROEventReceiver);
+begin
+  if assigned(fEventReceiver) then
+    TComponent(fEventReceiver.GetObject).RemoveFreeNotification(Self);
+  if aReceiver <> nil then fEventReceiver := nil else //for preventing warnings in FPC
+  fEventReceiver := nil;
+end;
+
+type
+  TROSBEventTrigger = class(TInterfacedObject, IROThreadPoolCallback)
+  private
+    fEvent: TNotifyEvent;
+    fSender: TObject;
+    procedure Execute;
+  public
+    constructor Create(aSender: TObject; aEvent: TNotifyEvent);
+    procedure Callback(Caller: TROThreadPool; aThread: TThread);
+  end;
+
+procedure TROCustomSuperTcpChannel.WaitForActive(const Timeout: Integer);
+begin
+  SetActive(true);
+  if fConnectEvent.WaitFor(Timeout) <> wrSignaled then raise EROException.Create('No connection available');
+end;
+
+{ TROSCClientWorker }
+
+procedure TROSCClientWorker.Connected;
+begin
+  inherited;
+  fOwner.fState := scConnected;
+  fOwner.fConnectEvent.SetEvent;
+  if assigned(fOwner.fOnConnected) then begin
+    if fOwner.fSynchronizeEvents then
+      fOwner.fEventThreadPool.QueueItem(TROSBEventTrigger.Create(fOwner, fOwner.fOnconnected))
+    else
+      fOwner.fOnconnected(fOwner);
+  end;
+end;
+
+constructor TROSCClientWorker.Create(aOwner: TROCustomSuperTCPChannel;
+  aConnection: TIdTCPConnection);
+begin
+  fOwner := aOwner;
+  inherited Create(aConnection);
+  PingFrequency := fOwner.fPingSecs;
+  PingTimeout := PingFrequency * 15 div 10;
+end;
+
+procedure TROSCClientWorker.Disconnected(var RestartLoop: Boolean);
+// restartloop is false by default
+
+  function CanUseServerLocators: boolean;
+  var
+    i: integer;
+  begin
+    Result := False;
+    if (doFaultTolerant in fOwner.DispatchOptions) then begin
+      For i:=0 to fOwner.ServerLocators.Count -1 do
+        if (fOwner.ServerLocators.Items[i].Enabled) then begin
+          Result:=True;
+          Break;
+        end;
+    end;
+  end;
+
+   procedure SetHostAndPort;
+   begin
+     fOwner.fConnection.Host := fOwner.fHost;
+     fOwner.fConnection.Port := fOwner.fPort;
+   end;
+
+var
+  lIndex: integer;
+  lRet: boolean;
+  lAutoReconnectFailed: boolean;
+begin
+  inherited;
+
+  try
+    fOwner.fConnection.Disconnect;
+  except
+  end;
+  if assigned(fOwner.fOnDisconnected) then begin
+    if fOwner.fSynchronizeEvents then
+      fOwner.fEventThreadPool.QueueItem(TROSBEventTrigger.Create(fOwner, fOwner.fOnDisconnected))
+    else
+      fOwner.fOnDisconnected(fOwner);
+  end;
+  if fOwner.fActive and (fOwner.fAutoReconnect or CanUseServerLocators) and not fOwner.InDestroyingState and not fSkipReconnect then begin
+    fOwner.fState := scReconnecting
+  end
+  else begin
+    fOwner.fState := scNotConnected;
+    fOwner.fActive := false;
+    fOwner.fConnectEvent.ResetEvent;
+    exit;
+  end;
+
+  fOwner.fReconnectEvent.ResetEvent;
+  fOwner.fConnectEvent.ResetEvent;
+  lIndex := -1;
+  lRet := True;
+  lAutoReconnectFailed:=False;
+  while lRet and fOwner.fActive and (fOwner.fAutoReconnect or CanUseServerLocators) and not fOwner.InDestroyingState and not fSkipReconnect do
+  begin
+    fOwner.fReconnectEvent.WaitFor(fOwner.fReconnectDelay); // don't want to create a tight loop
+    try
+      fOwner.fReconnectEvent.ResetEvent;
+      fOwner.fConnection.Connect;
+      RestartLoop := True;
+      Break;
+    except
+      // we failed, retry in a few
+      on E: Exception do begin
+        lRet:= False;
+        if (fOwner.AutoReconnectBehavior = sbAfterServerLocators)  or
+           (lAutoReconnectFailed and (fOwner.AutoReconnectBehavior = sbSwitchServerLocatorAfterFirstFailure)) then begin
+           fOwner.intChangeServerLocator(lIndex,lRet,e);
+          if lRet then SetHostAndPort;
+        end;
+
+        if not lRet and Owner.AutoReconnect then begin
+           lRet := true;
+           lAutoReconnectFailed := True;
+        end;
+
+        if not lRet and ((fOwner.AutoReconnectBehavior = sbBeforeServerLocators) or
+          (not lAutoReconnectFailed and (fOwner.AutoReconnectBehavior = sbSwitchServerLocatorAfterFirstFailure)))then begin
+          fOwner.intChangeServerLocator(lIndex,lRet,e);
+          if lRet then SetHostAndPort;
+        end;
+
+      end;
+    end;
+  end;
+  if RestartLoop then
+    fOwner.fState := scConnecting
+  else begin
+    fowner.fState := scNotConnected;
+    fOwner.fActive := false;
+    fOwner.fConnectEvent.ResetEvent;
+  end;
+end;
+
+procedure TROSCClientWorker.Idle;
+begin
+  IF fOwner.IdleTimeoutMinutes > 0 then begin
+    if Now > LastData + ((1.0 / 24 / 60) * fOwner.IdleTimeoutMinutes) then begin
+      Disconnect;
+      fSkipReconnect := true;
+    end;
+  end;
+
+end;
+
+procedure TROSCClientWorker.IncomingData(Id: Integer; aData: TStream);
+begin
+  fOwner.HasData(id, aData);
+end;
+
+procedure TROSCClientWorker.SetAckDetails(Id: Integer; Oke: Boolean;
+  ErrorNo: Integer);
+var
+  lList: TList;
+  i: Integer;
+  lReq: TROWaitingRequest;
+begin
+  if Oke then begin
+    inherited;
+    exit;
+  end;
+  lList := FOwner.fWaitingRequests.LockList;
+  try
+    lReq := nil;
+    for i := lList.Count -1 downto 0 do
+    begin
+      if TROWaitingRequest(lList[i]).Id = Id then
+      begin
+        lReq := TROWaitingRequest(lList[i]);
+        break;
+      end;
+    end;
+    if lReq = nil then
+      inherited
+    else begin
+      lReq.fResultErrorCode := ErrorNo;
+      lReq.Event.SetEvent;
+    end;
+  finally
+    fOwner.fWaitingRequests.UnlockList;
+  end;
+end;
+
+{ TROClientThread }
+
+constructor TROClientThread.Create(aChannel: TROSCClientWorker);
+begin
+  inherited Create(True);
+  fChannel := aChannel;
+  FreeOnTerminate := false;
+  Resume;
+end;
+
+procedure TROClientThread.Execute;
+
+   procedure SetHostAndPort;
+   begin
+     TIdTCPClient(fChannel.Connection).Host := fChannel.Owner.fHost;
+     TIdTCPClient(fChannel.Connection).Port := fChannel.Owner.fPort;
+   end;
+
+var
+  lRet: Boolean;
+  fIndex: integer;
+  lAutoReconnectFailed: boolean;
+begin
+  fChannel.fOwner.fReconnectEvent.ResetEvent;
+  if (fChannel.Owner.AutoReconnectBehavior = sbBeforeServerLocators) then
+    fIndex := fChannel.Owner.intInitServerLocator
+  else
+    fIndex := -2;
+  SetHostAndPort;
+  lRet := true;
+  fConnecting := True;
+  lAutoReconnectFailed := False;
+  while lRet do begin
+    lRet := false;
+    try
+      TIdTCPClient(fChannel.Connection).Connect;
+      lAutoReconnectFailed := False;
+    except
+      on e: Exception do begin
+        // if autoreconnect is failed in 1st time, try to use ServerLocator
+        if (fChannel.Owner.AutoReconnectBehavior = sbAfterServerLocators)  or
+           (lAutoReconnectFailed and (fChannel.Owner.AutoReconnectBehavior = sbSwitchServerLocatorAfterFirstFailure)) then begin
+          if fIndex  = -2 then begin
+            fIndex := fChannel.Owner.intInitServerLocator;
+            lRet := True;
+          end
+          else
+           fChannel.fOwner.intChangeServerLocator(fIndex,lRet,e);
+          if lRet then SetHostAndPort;
+        end;
+
+
+        if not lRet and fChannel.Owner.AutoReconnect and not fChannel.fOwner.InDestroyingState then begin
+           lRet := true;
+           lAutoReconnectFailed := True;
+           fChannel.fOwner.fReconnectEvent.WaitFor(fChannel.fOwner.fReconnectDelay);
+           fChannel.fOwner.fReconnectEvent.ResetEvent;
+        end;
+
+        if not lRet and ((fChannel.Owner.AutoReconnectBehavior = sbBeforeServerLocators) or
+          (not lAutoReconnectFailed and (fChannel.Owner.AutoReconnectBehavior = sbSwitchServerLocatorAfterFirstFailure)))then begin
+          if fIndex  = -2 then begin
+            fIndex := fChannel.Owner.intInitServerLocator;
+            lRet := True;
+          end
+          else
+            fChannel.fOwner.intChangeServerLocator(fIndex,lRet,e);
+          if lRet then SetHostAndPort;
+        end;
+
+//        if assigned(fChannel.Owner.OnException) then fChannel.Owner.OnException(fChannel.Owner, e, lRet);
+        if not lRet then begin
+          fConnecting := False;
+          exit;
+        end;
+      end;
+    end;
+
+  end;
+  fChannel.DoExecute;
+end;
+
+{ TROWaitingRequest }
+
+constructor TROWaitingRequest.Create(Id: Integer);
+begin
+  inherited Create;
+  fId := Id;
+  fEvent := TROEvent.Create(nil, true, false, '');
+  fFreeEvent := True;
+  fResultErrorCode := -1;
+end;
+
+constructor TROWaitingRequest.Create(Id: Integer; Ev: TROEvent);
+begin
+  inherited Create;
+  fId := Id;
+  fEvent := ev;
+  fResultErrorCode := -1;
+end;
+
+destructor TROWaitingRequest.Destroy;
+begin
+  fResultData.Free;
+  if fFreeEvent then
+    fEvent.Free;
+  inherited Destroy;
+end;
+
+{ TROPooledEvent }
+
+procedure TROPooledEvent.Callback(Caller: TROThreadPool; Thread: TThread);
+begin
+  if fOwner.fEventReceiver <> nil then
+  begin
+    {$IFDEF FPC}
+    if caller <> nil then fOwner.fEventReceiver.Dispatch(fData, Thread) else // for preventing warning in FPC
+    {$ENDIF}
+    fOwner.fEventReceiver.Dispatch(fData, Thread);
+  end;
+end;
+
+constructor TROPooledEvent.Create(aData: TStream;
+  aOwner: TROCustomSuperTCPChannel);
+begin
+  inherited Create;
+  fOwner := aOwner;
+  fData := aData;
+end;
+
+destructor TROPooledEvent.Destroy;
+begin
+  fData.Free;
+  inherited Destroy;
+end;
+
+{ TROSBEventTrigger }
+
+procedure TROSBEventTrigger.Callback(Caller: TROThreadPool;
+  aThread: TThread);
+begin
+  try
+    if Caller <> nil then TROClientThread(aThread).Synchronize(Execute) else // for preventing warning in FPC
+    TROClientThread(aThread).Synchronize(Execute);
+  except
+    // exceptions cannot pass back to the pool
+  end;
+end;
+
+constructor TROSBEventTrigger.Create(aSender: TObject;
+  aEvent: TNotifyEvent);
+begin
+  inherited Create;
+  fSender := aSender;
+  fEvent := aEvent;
+end;
+
+procedure TROSBEventTrigger.Execute;
+begin
+  if assigned(fEvent) then
+    fEvent(fSender);
+end;
+
+initialization
+  RegisterTransportChannelClass(TROSuperTCPChannel);
+
+finalization
+  UnRegisterTransportChannelClass(TROSuperTCPChannel);
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSuperTCPServer.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSuperTCPServer.pas
new file mode 100644
index 0000000..249c589
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSuperTCPServer.pas	
@@ -0,0 +1,574 @@
+unit uROSuperTCPServer;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Indy Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+uses
+  SysUtils, Classes, uROClasses, uROClient, uROClientIntf, uROServerIntf,
+  uROSessions,IdTCPConnection, IdTCPServer, uROServer{$IFDEF MSWINDOWS}, Windows{$ENDIF}, 
+  uROSCHelpers, uROThreadPool{$IFDEF RemObjects_INDY10}, IdContext{$ENDIF}, uROEventRepository;
+
+type
+  TROSCServerWorker = class;
+  TROConnectionEvent = procedure (aChannel: IROTransport; const aGuid: TGuid) of object;
+  TROCustomSuperTcpServer = class(TROServer)
+  private
+    fIndyServer: TIdTCPServer;
+    fActive: Boolean;
+    fPort: Integer;
+    fAckWaitTimeout: Integer;
+    fMaxPackageSize: Integer;
+    fGuidToClientMap: TStringList;
+    fClients: TThreadList;
+    fOwnsThreadPool: Boolean;
+    fThreadPool: TROThreadPool;
+    fSkipAck: Boolean;
+    fEventRepository: TROEventRepository;
+    fBlockingEvents: Boolean;
+    fOnClientConnected: TROConnectionEvent;
+    fOnClientDisconnected: TROConnectionEvent;
+    fAutoRegisterSession: boolean;
+    procedure IntExecute(AThread: {$IFDEF RemObjects_INDY10}TIdContext{$ELSE}TIdPeerThread{$ENDIF});
+    procedure SetPort(const Value: Integer);
+    procedure SetThreadPool(const Value: TROThreadPool);
+  protected
+    function IntGetActive: Boolean; override;
+    procedure IntSetActive(const Value: Boolean); override;
+
+    procedure Loaded; override;
+    procedure HasData(Id: Integer; aClient: TROSCServerWorker; aData: TStream);
+
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+    procedure DispatchEvent(anEventDataItem : TROEventData; aSessionReference : TGUID; aSender: TObject);
+  public
+    constructor Create(aOwner: TComponent); override;
+    destructor Destroy; override;
+    property Port: Integer read fPort write SetPort default 8095;
+    property AckWaitTimeout: Integer read fAckWaitTimeout write fAckWaitTimeout default 10000;
+    property MaxPackageSize: Integer read fMaxPackageSize write fMaxPackageSize default 10*1024*1024;
+    property SkipAck: Boolean read fSkipAck write fSkipAck default false;
+
+    property Server: TIdTcpServer read fIndyServer;
+    property ThreadPool: TROThreadPool read fThreadPool write SetThreadPool;
+    property EventRepository: TROEventRepository read fEventRepository write fEventRepository;
+    property BlockingEvents: Boolean read fBlockingEvents write fBlockingEvents default False;
+    property OnClientConnected: TROConnectionEvent read fOnClientConnected write fOnClientConnected;
+    property OnClientDisconnected: TROConnectionEvent read fOnClientDisconnected write fOnClientDisconnected;
+    property AutoRegisterSession: Boolean read fAutoRegisterSession write fAutoRegisterSession default true;
+  end;
+
+  TROSuperTCPServer = class(TROCustomSuperTcpServer)
+  published
+    property Port;
+    property SkipAck;
+    property AckWaitTimeout;
+    property MaxPackageSize;
+    property EventRepository;
+    property BlockingEvents;
+    property OnClientConnected;
+    property OnClientDisconnected;
+    property DefaultResponse;
+    property AutoRegisterSession;
+  end;
+
+  TROSCServerWorker = class(TROSuperChannelWorker, IUnknown, IROTransport,
+  IROTCPTransport, IROActiveEventServer)
+  private
+    fOwner: TROCustomSuperTcpServer;
+    fEventManager: IROSessionsChangesListener;
+    fRefCount: Integer;
+  protected
+    function QueryInterface(const IID: TGUID; out Obj): HResult; stdcall;
+    function _AddRef: Integer; stdcall;
+    function _Release: Integer; stdcall;
+    function GetClientAddress : string;
+    function GetTransportObject : TObject;
+    procedure IncomingData(Id: Integer; aData: TStream); override;
+    procedure Connected; override;
+    procedure Disconnected(var RestartLoop: Boolean); override;
+    procedure EventsRegistered(aSender : TObject; aClient: TGUID);
+    procedure DispatchEvent(anEventDataItem : TROEventData; aSessionReference : TGUID; aSender: TObject);
+    function GetDefaultResponse: string; override;
+  public
+    constructor Create(aOwner: TROCustomSuperTcpServer; aConnection: TIdTCPConnection);
+    destructor Destroy; override;
+
+    property Owner: TROCustomSuperTcpServer read fOwner;
+  end;
+  TROInvokerQueueItem = class(TInterfacedObject, IROThreadPoolCallback)
+  private
+    fData: TStream;
+    fId: Integer;
+    fCaller: TROCustomSuperTcpServer;
+    FClient: TROSCServerWorker;
+  public
+    constructor Create(aCaller: TROCustomSuperTcpServer; aClient: TROSCServerWorker; Id: Integer; aData: TStream);
+    procedure Callback(Caller: TROThreadPool; Thread: TThread);
+    destructor Destroy; override;
+  end;
+
+implementation
+uses
+  uROTypes;
+
+{ TROCustomSuperTcpServer }
+
+constructor TROCustomSuperTcpServer.Create(aOwner: TComponent);
+begin                                                   
+  inherited Create(aOwner);
+  fClients := TThreadList.Create;
+  fPort := 8095;
+  AckWaitTimeout := 10000;
+  fMaxPackageSize := 10 * 1024 * 1024;
+  fIndyServer := TIdTCPServer.Create(nil);
+  fIndyServer.OnExecute := IntExecute;
+  fGuidToClientMap := TStringList.Create;
+  fGuidToClientMap.Sorted := true;
+  DefaultResponse := 'ROSC:Invalid connection string';
+  fAutoRegisterSession := True;
+end;
+
+destructor TROCustomSuperTcpServer.Destroy;
+begin
+  Active := False;
+  fGuidToClientMap.Free;
+  fIndyServer.Active := False;
+  fIndyServer.Free;
+  fClients.Free;
+  if fOwnsThreadPool then
+    fThreadPool.Free;
+  inherited Destroy;
+end;
+
+procedure TROCustomSuperTcpServer.HasData(Id: Integer; aClient: TROSCServerWorker; aData: TStream);
+var
+  lItem: IROThreadPoolCallback;
+  lOrg: TROInvokerQueueItem;
+begin
+  lOrg := TROInvokerQueueItem.Create(Self, aClient, Id, aData);
+  lItem := lOrg;
+  try
+    fThreadPool.QueueItem(lItem);
+  except
+    aClient.SendError(Id, ScCmdNoAck_QueueFull);
+    lOrg.fData := nil; // caller will free it on exceptions
+    raise;
+  end;
+end;
+
+type
+  TSendEvent = class(TInterfacedObject, IROThreadPoolCallback)
+  private
+    fStream: TROEventData;
+    fOwner: TROCustomSuperTcpServer;
+    fWorkerOverride: IROTransport;
+    fClientGuid: TGUID;
+    fSender: TROEventRepository;
+  protected
+    procedure Callback(Caller: TROThreadPool; Thread: TThread);
+  public
+    constructor Create(aOwner: TROCustomSuperTcpServer; aClientGuid: TGUID; aSender: TROEventRepository; aData: TROEventData);
+    property WorkerOverride: IROTransport read fWorkerOverride write fWorkerOverride;
+
+    destructor Destroy; override;
+  end;
+
+procedure TROCustomSuperTcpServer.Notification(AComponent: TComponent; Operation: TOperation);
+begin
+  if (Operation = opRemove) then begin
+    if AComponent = fThreadPool then
+      fThreadPool := nil;
+    if AComponent = fEventRepository then
+      fEventRepository := nil;
+  end;
+  inherited;
+end;
+
+procedure TROCustomSuperTcpServer.DispatchEvent(anEventDataItem : TROEventData; aSessionReference : TGUID; aSender: TObject);
+var
+  i: Integer;
+  aref: IROSessionsChangesListener;
+  se: IROThreadPoolCallback;
+begin
+  fClients.LockList;
+  try
+    i := fGuidToClientMap.IndexOf(GUIDToString(aSessionReference));
+    if i = -1 then begin
+      if fEventRepository <> nil then begin
+        if Supports(fEventRepository, IROSessionsChangesListener, aref) then
+          aref.SessionsChangedNotification(aSessionReference, saRemoveActiveListener, nil);
+        fEventRepository.StoreEventData(EmptyGUID, Binary(anEventDataItem.Data), false, false, GUIDToString(aSessionReference));
+        if anEventDataItem.RemoveRef = 0 then anEventDataItem.Free;
+        exit;
+      end;
+    end;
+  finally
+    fClients.UnlockList;
+  end;
+  se := TSendEvent.Create(Self, aSessionReference, TROEventRepository(aSender), anEventDataItem);
+  if BlockingEvents then
+    se.Callback(fThreadPool, nil)
+  else
+    fThreadPool.QueueItem(se);
+end;
+
+procedure TROCustomSuperTcpServer.IntExecute(AThread: {$IFDEF RemObjects_INDY10}TIdContext{$ELSE}TIdPeerThread{$ENDIF});
+var
+  fChannel: TROSCServerWorker;
+begin
+  fChannel := TROSCServerWorker.Create(Self, AThread.Connection);
+  fChannel.MaxPackageSize:= Self.MaxPackageSize;
+  fClients.Add(fChannel);
+  try
+    fChannel.DoExecute;
+  finally
+    fClients.Remove(fChannel);
+    fChannel.Free;
+  end;
+end;
+
+function TROCustomSuperTcpServer.IntGetActive: Boolean;
+begin
+  Result := fActive;
+end;
+
+procedure TROCustomSuperTcpServer.IntSetActive(const Value: Boolean);
+begin
+  fActive := Value;
+  if ComponentState * [csDesigning, csLoading] = [] then
+  begin
+    if fThreadPool = nil then
+    begin
+      fThreadPool := TROThreadPool.Create(nil);
+      fOwnsThreadPool := true;
+    end;
+    fIndyServer.Active := false;
+    if fActive then
+    begin
+      fIndyServer.Bindings.DefaultPort := fPort;
+      fIndyServer.Active := true;
+    end;
+  end;
+end;
+
+procedure TROCustomSuperTcpServer.Loaded;
+begin
+  inherited;
+  IntSetActive(fActive);
+end;
+
+procedure TROCustomSuperTcpServer.SetPort(const Value: Integer);
+begin
+  fPort := Value;
+  if fActive then
+  begin
+    IntSetActive(False);
+    IntSetActive(True);
+  end;
+end;
+
+procedure TROCustomSuperTcpServer.SetThreadPool(const Value: TROThreadPool);
+begin
+  if fOwnsThreadPool then
+  begin
+    fOwnsThreadPool := false;
+    fThreadPool.Free;
+  end;
+  fThreadPool := Value;
+end;
+
+
+{ TROSCServerWorker }
+
+constructor TROSCServerWorker.Create(aOwner: TROCustomSuperTcpServer;
+  aConnection: TIdTCPConnection);
+begin
+  fOwner := aOwner;
+  inherited Create(aConnection);
+  IsServer := true;
+  SkipAck := fOwner.Skipack;
+end;
+
+destructor TROSCServerWorker.Destroy;
+begin
+  while fRefCount > 0 do
+    Sleep(500); // we might have events still waiting.
+  inherited Destroy;
+end;
+
+function TROSCServerWorker.QueryInterface(const IID: TGUID; out Obj): HResult; stdcall;
+begin
+  if GetInterface(IID, Obj) then
+    Result := 0
+  else
+    Result := E_NOINTERFACE;
+end;
+
+function TROSCServerWorker._AddRef: Integer; stdcall;
+begin
+  result := InterlockedIncrement(fRefCount);
+end;
+
+function TROSCServerWorker._Release: Integer; stdcall;
+begin
+  result := InterlockedDecrement(fRefCount);
+end;
+
+function TROSCServerWorker.GetClientAddress : string;
+begin
+{$IFDEF REMOBJECTS_INDY8}
+  if (Connection.Binding <> nil) then
+    Result := Connection.Binding.PeerIP
+  else
+    Result := '';
+{$ELSE}
+  if (Connection.Socket <> nil) and (Connection.Socket.Binding <> nil) then
+    Result := Connection.Socket.Binding.PeerIP
+  else
+    Result := '';
+{$ENDIF}
+end;
+
+function TROSCServerWorker.GetTransportObject : TObject;
+begin
+  Result := Self;
+end;
+
+procedure TROSCServerWorker.IncomingData(Id: Integer; aData: TStream);
+begin
+  fOwner.HasData(Id, Self, aData);
+end;
+
+procedure TROSCServerWorker.Connected;
+var
+  data, rs: Binary;
+  evd: TROEventData;
+  i, len: Longint;
+  fl: boolean;
+begin
+  Len:=0;
+  if assigned(fOwner.fOnClientConnected) then fOwner.fOnClientConnected(Self, ClientID);
+  fOwner.fClients.LockList;
+  try
+    i := fOwner.fGuidToClientMap.IndexOf(GUIDToString(ClientId));
+    if i = -1 then
+      fOwner.fGuidToClientMap.AddObject(GUIDToString(ClientId), Self)
+    else
+      fOwner.fGuidToClientMap.Objects[i] := Self;
+  finally
+    fOwner.fClients.UnlockList;
+  end;
+  if fOwner.fEventRepository <> nil then
+  begin
+    if fOwner.AutoRegisterSession then begin
+      fl := True;
+      fOwner.fEventRepository.AddSession(ClientID, Self);
+    end
+    else begin
+      fl := fOwner.fEventRepository.AddActiveListener(ClientID, Self);
+    end;
+    if fl then begin
+      rs := Binary.Create;
+      try
+        fOwner.fEventRepository.GetEventData(ClientID, rs);
+        rs.Position := 0;
+        if rs.Read(len, sizeof(len)) <> sizeof(len) then exit;
+        while true do begin
+          if rs.Read(len, sizeof(len)) <> sizeof(len) then break;
+          data := Binary.Create;
+          data.CopyFrom(rs, Len);
+          data.Position := 0;
+          evd := TROEventData.Create(data);
+          try
+            DispatchEvent(evd, ClientID, fOwner.fEventRepository);
+          finally
+            data.Free;
+          end;
+        end;
+      finally
+        rs.Free;
+      end;
+    end;
+  end;
+end;
+
+procedure TROSCServerWorker.Disconnected(var RestartLoop: Boolean);
+var
+  i: Integer;
+begin
+  if fEventManager <> nil then
+    fEventManager.SessionsChangedNotification(ClientID, saRemoveActiveListener, Self);
+  if RestartLoop then fOwner.fClients.LockList else // for preventing warnings in FPC
+  fOwner.fClients.LockList;
+  try
+    i := fOwner.fGuidToClientMap.IndexOf(GUIDToString(ClientId));
+    if i <> -1 then
+    begin
+      if fOwner.fGuidToClientMap.Objects[i] = self then
+        fOwner.fGuidToClientMap.Delete(i);
+    end;
+  finally
+    fOwner.fClients.UnlockList;
+  end;
+  if assigned(fOwner.fOnClientDisconnected) then fOwner.fOnClientDisconnected(Self, ClientID);
+end;
+
+procedure TROSCServerWorker.EventsRegistered(aSender : TObject; aClient: TGUID);
+var
+  lNew : IROSessionsChangesListener;
+begin
+  Supports(aSender, IROSessionsChangesListener, lNew);
+  if (fEventManager <> nil) and (lNew <> fEventManager) then begin
+    fEventManager.SessionsChangedNotification(aClient, saRemoveActiveListener, Self);
+  end;
+  fEventManager := lNew;
+end;
+
+procedure TROSCServerWorker.DispatchEvent(anEventDataItem : TROEventData; aSessionReference : TGUID; aSender: TObject);
+var
+  se: TSendEvent;
+begin
+  se := TSendEvent.Create(fOwner, aSessionReference, TROEventRepository(aSender), anEventDataItem);
+  se.WorkerOverride := self;
+  if fOwner.BlockingEvents then begin
+    try
+    se.Callback(fOwner.ThreadPool, nil);
+    except
+    end;
+    se.Free;
+  end else
+    fOwner.ThreadPool.QueueItem(se);
+end;
+
+function TROSCServerWorker.GetDefaultResponse: string;
+begin
+  Result:= fOwner.DefaultResponse;
+end;
+
+procedure TSendEvent.Callback(Caller: TROThreadPool; Thread: TThread);
+var
+  ms: TROConstantMemoryStream;
+  i: Integer;
+  wak: IROPackageAck;
+  ass: IROActiveEventServer;
+  obj: TROSCServerWorker;
+  aRef: IROSessionsChangesListener;
+begin
+  if (Caller = nil) or (Thread = nil) then   obj := nil else // for preventing warnings in FPC
+  obj := nil;
+  ms := TROConstantMemoryStream.Create(TROConstantMemoryStream(fStream.Data));
+  try
+    try
+      fOwner.fClients.LockList;
+      try
+        i := fOwner.fGuidToClientMap.IndexOf(GUIDToString(fClientGuid));
+        if i = -1 then exit;
+        if fWorkerOverride <> nil then
+          obj := TROSCServerWorker(fWorkerOverride.GetTransportObject)
+        else
+          obj := TROSCServerWorker(fOwner.fGuidToClientMap.Objects[i]);
+        wak := obj.SendPackage(ms, 0);
+        if not Supports(obj, IROSessionsChangesListener, ass) then ass := nil;
+      finally
+        fOwner.fClients.UnlockList;
+      end;
+      TROSCServerWorker.WaitForAck(wak, fOwner.fAckWaitTimeout);
+    except
+      if fOwner.fEventRepository <> nil then begin
+        if Supports(fOwner.fEventRepository, IROSessionsChangesListener, aref) then
+          aref.SessionsChangedNotification(fClientGuid, saRemoveActiveListener, obj);
+        fOwner.fEventRepository.StoreEventData(EmptyGUID, ms, false, false, GUIDToString(fClientGuid));
+        exit;
+      end;
+    end;
+  finally
+    ms.Free;
+  end;
+end;
+
+constructor TSendEvent.Create(aOwner: TROCustomSuperTcpServer; aClientGuid: TGUID; aSender: TROEventRepository; aData: TROEventData);
+begin
+  inherited Create;
+  fStream := aData;
+  fSender := aSender;
+  fClientGuid := aClientGuid;
+  fOwner := aOwner;
+end;
+
+destructor TSendEvent.Destroy;
+begin
+  if fStream.RemoveRef = 0 then
+    fStream.Free;
+  inherited Destroy;
+end;
+
+{ TROInvokerQueueItem }
+
+procedure TROInvokerQueueItem.Callback(Caller: TROThreadPool; Thread: TThread);
+var
+  lResponse: TMemoryStream;
+  l: TList;
+  lClient: IROTransport;
+begin
+  if (Thread = nil) or (Caller = nil) then lResponse := TMemoryStream.Create else // for preventing warning in FPC
+  lResponse := TMemoryStream.Create;
+  try
+    lClient:= FClient;
+    try
+      fCaller.DispatchMessage(lClient, fData, lResponse);
+    finally
+      lClient := nil;
+    end;
+    lResponse.Seek(0, soFromBeginning);
+    l := fCaller.fClients.LockList;
+    try
+      if l.IndexOf(FClient) = -1 then exit;
+        FClient.BeginWriteLock;
+    finally
+      fCaller.fClients.UnlockList;
+    end;
+    try
+      if lResponse.Size > FClient.MaxPackageSize then
+        FClient.SendError(fId, ScCmdNoAck_MsgTooLarge)
+      else
+        FClient.SendPackage(lResponse, fId).RemoveFromList; //  we're not going to wait
+    finally
+      FClient.EndWriteLock;
+    end;
+  finally
+    lResponse.Free;
+  end;
+end;
+
+constructor TROInvokerQueueItem.Create(aCaller: TROCustomSuperTcpServer; aClient: TROSCServerWorker; Id: Integer; aData: TStream);
+begin
+  inherited Create;
+  fCaller := aCaller;
+  fId := Id;
+  fData := aData;
+  fClient := aClient;
+end;
+
+destructor TROInvokerQueueItem.Destroy;
+begin
+  fData.Free;
+  inherited Destroy;
+end;
+
+initialization
+  RegisterServerClass(TROSuperTCPServer);
+finalization
+  UnregisterServerClass(TROSuperTCPServer);
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSynapseHTTPChannel.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSynapseHTTPChannel.pas
new file mode 100644
index 0000000..61685e2
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSynapseHTTPChannel.pas	
@@ -0,0 +1,238 @@
+unit uROSynapseHTTPChannel;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ Provided by Carlo Kok (carlokok@teamro.com)                                }
+{ Requires the Synapse TCP/IP Library available at http://www.ararat.cz/synapse }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  {vcl:} Classes, uROClientIntf, uROClient, uROClasses,
+  {Synapse:} httpsend, blcksock, synsock;
+
+type
+  TROSynapseHTTPChannel = class(TROTransportChannel, IROTransport, IROTCPTransport, IROHTTPTransport)
+  private
+    fhttp: THTTPSend;
+    fDisableNagle: Boolean;
+    fTargetURL: string;
+    function GetKeepAlive: Boolean;
+    procedure SetKeepAlive(const Value: Boolean);
+  protected
+    procedure IntDispatch(aRequest, aResponse: TStream); override;
+    procedure IntSetServerLocator(aServerLocator : TROServerLocator); override;
+    { IROTransport }
+    function GetTransportObject : TObject; override;
+    { IROTCPTransport }
+    function GetClientAddress: string;
+
+    { IROHTTPTransport }
+    procedure SetHeaders(const aName, aValue: string);
+    function GetHeaders(const aName: string): string;
+    function GetContentType: string;
+    procedure SetContentType(const aValue: string);
+    function GetUserAgent: string;
+    procedure SetUserAgent(const aValue: string);
+
+    procedure SetTargetURL(const Value: string);
+    function GetTargetURL: string;
+
+    function GetQueryString : string;
+    function GetPathInfo: string;
+    function GetLocation: string;
+    procedure SetPathInfo(const aValue: String);
+    function GetQueryParameter(const aName: String): String;
+    procedure SocketOnAfterConnect(Sender: TObject);
+
+  public
+    property http: THTTPSend read fhttp;
+    constructor Create(AOwner: TComponent); override;
+    destructor Destroy; override;
+    procedure CheckProperties; override;
+
+  published
+    property TargetURL: string read GetTargetURL write SetTargetURL;
+    property KeepAlive: Boolean read GetKeepAlive write SetKeepAlive;
+  published
+    property DisableNagle: Boolean read fDisableNagle write fDisableNagle default true;
+    property SynchronizedProbing;
+    property OnSendStream;
+    property OnReceiveStream;
+    property ServerLocators;
+    property DispatchOptions;
+    property OnServerLocatorAssignment;
+    property ProbeServers;
+    property ProbeFrequency;
+    property OnBeforeProbingServers;
+    property OnAfterProbingServers;
+    property OnBeforeProbingServer;
+    property OnAfterProbingServer;
+    property OnLoginNeeded;
+  end;
+
+implementation
+
+uses
+  {vcl:} SysUtils;
+
+{ TROSynapseHTTPChannel }
+
+function TROSynapseHTTPChannel.GetTargetURL: string;
+begin
+  result := fTargetURL;
+end;
+
+function TROSynapseHTTPChannel.GetTransportObject: TObject;
+begin
+  Result := Self;
+end;
+
+procedure TROSynapseHTTPChannel.SetTargetURL(const Value: string);
+begin
+  fTargetURL := Trim(Value)
+end;
+
+procedure TROSynapseHTTPChannel.IntDispatch(aRequest, aResponse: TStream);
+begin
+  CheckProperties;
+  fhttp.Headers.Clear;
+  fhttp.Document.Position := 0;
+  fhttp.Document.Size := 0;
+  fhttp.Document.CopyFrom(aRequest, 0);
+  if fhttp.KeepAlive then
+    fhttp.Headers.Add('Connection: keep-alive');
+  if not fhttp.HTTPMethod('POST', TargetURL) then
+    raise EROException.Create('Unable to connect to remote server');
+  aResponse.CopyFrom(http.Document, 0);
+end;
+
+procedure TROSynapseHTTPChannel.IntSetServerLocator(
+  aServerLocator: TROServerLocator);
+begin
+  TargetURL := aServerLocator.Host;
+end;
+
+function TROSynapseHTTPChannel.GetHeaders(const aName: string): string;
+begin
+  Result := fhttp.Headers.Values[aName];
+end;
+
+procedure TROSynapseHTTPChannel.SetHeaders(const aName, aValue: string);
+begin
+  fhttp.Headers.Values[aName] := aValue;
+end;
+
+function TROSynapseHTTPChannel.GetContentType: string;
+begin
+  Result := fhttp.MimeType;
+end;
+
+procedure TROSynapseHTTPChannel.SetContentType(const aValue: string);
+begin
+  fhttp.MimeType := aValue;
+end;
+
+function TROSynapseHTTPChannel.GetUserAgent: string;
+begin
+  Result := fhttp.UserAgent;
+end;
+
+procedure TROSynapseHTTPChannel.SetUserAgent(const aValue: string);
+begin
+  fhttp.UserAgent := aValue;
+end;
+
+function TROSynapseHTTPChannel.GetClientAddress: string;
+begin
+  result := '';
+end;
+
+function TROSynapseHTTPChannel.GetPathInfo: string;
+begin
+  result := '';
+end;
+
+function TROSynapseHTTPChannel.GetLocation: string;
+begin
+  result := ''
+end;
+
+function TROSynapseHTTPChannel.GetKeepAlive: Boolean;
+begin
+  Result := fhttp.KeepAlive;
+end;
+
+procedure TROSynapseHTTPChannel.SetKeepAlive(const Value: Boolean);
+begin
+  fhttp.KeepAlive := Value;
+end;
+
+constructor TROSynapseHTTPChannel.Create(AOwner: TComponent);
+begin
+  inherited Create(AOwner);
+  fDisableNagle := true;
+  fhttp := THTTPSend.Create;
+  fhttp.Sock.OnAfterConnect := SocketOnAfterConnect;
+  fhttp.Protocol := '1.1';
+  fhttp.Status100 := False;
+end;
+
+destructor TROSynapseHTTPChannel.Destroy;
+begin
+  fhttp.Free;
+  inherited Destroy;
+end;
+
+function TROSynapseHTTPChannel.GetQueryString: string;
+begin
+  result := ''
+end;
+
+procedure TROSynapseHTTPChannel.SetPathInfo(const aValue: String);
+begin
+  // Do nothing; server only
+end;
+
+procedure TROSynapseHTTPChannel.CheckProperties;
+begin
+  Check(TargetURL = '', Name + '.TargetURL must be set.');
+  inherited;
+end;
+
+
+function TROSynapseHTTPChannel.GetQueryParameter(
+  const aName: String): String;
+begin
+  result := '';
+end;
+
+procedure TROSynapseHTTPChannel.SocketOnAfterConnect(Sender: TObject);
+var
+  lTmpVal: Integer;
+begin
+  if fDisableNagle then begin
+    lTmpVal := 1;
+    SetSockOpt(fhttp.Sock.Socket, 6, 1, @lTmpVal, 4);
+  end;
+end;
+
+initialization
+  RegisterTransportChannelClass(TROSynapseHTTPChannel);
+
+finalization
+  UnRegisterTransportChannelClass(TROSynapseHTTPChannel);
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSynapseSCHelpers.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSynapseSCHelpers.pas
new file mode 100644
index 0000000..36bc439
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSynapseSCHelpers.pas	
@@ -0,0 +1,821 @@
+unit uROSynapseSCHelpers;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Indy Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+uses
+  SysUtils, Classes, uROClasses, uROClient, uROClientIntf,
+  synsock, blcksock {$IFDEF MSWINDOWS}, Windows {$ENDIF}, SyncObjs;
+
+type
+  EROSynapseTimeout = class(EROException);
+  TROSynapseAckState = (rNone, rAck, rNoAck);
+  IROSynapsePackageAck = interface
+    ['{89ABD257-42CB-4B4B-9BA6-3E5CED10605B}']
+    function GetEvent: TROEvent;
+    function GetAckNo: Integer;
+    function GetNoAckError: Integer;
+    procedure SetNoAckError(I: Integer);
+    function GetAckState: TROSynapseAckState;
+    procedure SetAckState(I: TROSynapseAckState);
+
+    property Event: TROEvent read GetEvent;
+    property AckNo: Integer read GetAckNo;
+    property NoAckError: Integer read GetNoAckError write SetNoAckError;
+    property AckState: TROSynapseAckState read GetAckState write SetAckState;
+
+    procedure RemoveFromList;
+  end;
+  TROSynSuperChannelWorker = class
+  private
+    fMaxPackageSize: Integer;
+    fIsServer: Boolean;
+    fConnection: TTCPBlockSocket;
+    fWriteLock,
+    fInternalWriteLock: TCriticalSection;
+    fClientID: TGUID;
+    fLastId: Integer;
+    fConnected: Boolean;
+    fLastData: TDateTime;
+
+//    fAckWaitTimeout: Integer;
+    fOtherSideMaxPackageLen: Integer;
+    fWaitingAckList: TInterfaceList;
+    fRemoteSupportsOptions, fRemoteSkipAck, fSkipAck: Boolean;
+    fPingFrequency,
+    fPingTimeout: Integer;
+    procedure SetSkipAck(const Value: Boolean);
+    function ReadStream(aDest: TStream; aLen: Integer): Boolean;
+    function Client_SendWelcome: Boolean;
+    function GetOtherSideMaxPackageLen: integer;
+  protected
+    property PingFrequency: Integer read fPingFrequency write fPingFrequency;
+    property PingTimeout: Integer read fPingTimeout write fPingTimeout;
+    property LastData: TDateTime read FLastData;
+    property IsServer: Boolean read fIsServer write fIsServer;
+    procedure Idle; virtual;
+    procedure Connected; virtual;
+    procedure SupportsOptions;
+    procedure ProcessOption(Data: TStream);
+    procedure Disconnected(var RestartLoop: Boolean); virtual;
+    procedure IncomingData(Id: Integer; aData: TStream); virtual; abstract;
+    function IntSendData(Id: Integer; aData: TStream): IROSynapsePackageAck;
+    procedure SetAckDetails(Id: Integer; Oke: Boolean; ErrorNo: Integer); virtual;
+    procedure SendOptions(aData: UTF8String);
+    function GetDefaultResponse: string; virtual;
+  public
+    constructor Create(aConnection: TTCPBlockSocket);
+    destructor Destroy; override;
+
+    property ClientID: TGuid read fClientID write fClientID;
+    property Connection: TTCPBlockSocket read fConnection;
+
+    // to be called from a thread; will stay checking until disconnected
+    procedure DoExecute;
+
+    procedure Disconnect;
+
+    // Thread safe method
+    procedure SendError(Id: Integer; Error: Byte);
+    procedure BeginWriteLock;
+    function SendPackage(aData: TStream; Id: Integer = 0): IROSynapsePackageAck;
+    procedure EndWriteLock;
+    class procedure WaitForAck(pkg: IROSynapsePackageAck; Timeout: Integer = 60000);
+    function GenerateId: Integer;
+
+    // properties
+    property MaxPackageSize: Integer read fMaxPackageSize write fMaxPackageSize;
+    property IsConnected: Boolean read fConnected write fConnected;
+    property SkipAck: Boolean read fSkipAck write SetSkipAck;
+  end;
+
+const
+  ScCmdNoAck_MsgTooLarge = 0;
+  ScCmdNoAck_Timeout = 1;
+  scCmdNoAck_UnknownCommand = 2;
+  ScCmdNoAck_QueueFull = 3;
+  ScCmdNoAck_SupportsOptions = 255;
+
+
+implementation
+const
+  ScWelcome = 'ROSC10';
+
+//  ScCmdHello = 0;
+  {
+    Client:
+      'ROSC10'
+      [MyGuid] or [NullGuid]
+      MaxPackageLength: Int32;
+    Server:
+      'ROSC10'
+      [YourGuid] or [NewGuid]
+      MaxPackageLength: Int32;
+  }
+  ScCmdPackage = 1;
+  {
+    Request or Event Id: Int32; (Event < 0; Request/Response > 0)
+    Length: Int32;
+    Data: [...]
+  }
+  ScCmdAck = 2;
+  {
+    Id: Integer;
+  }
+  ScCmdNoAck = 3;
+  {
+    Id: Integer;
+    Error:
+      0 = Message too large
+      1 = Timeout
+  }
+
+  ScCmdPing = 4;
+  { Should be sent every 60 seconds by the client
+     RandomNumber: Integer;
+  }
+  ScCmdPong = 5;
+  { Reply to ping
+    OriginalRandomNumber: Integer;
+  }
+  ScCmdOptions = 6;
+  {
+    Length: Longint
+    Data: array of 0..Length -1 of byte
+    UTF8 encoded, seperated by #13
+  }
+
+
+
+type
+  TROSynPackageAck = class(TInterfacedObject, IROSynapsePackageAck)
+  private
+    fEvent: TROEvent;
+    fAckNo,
+    FAckNoError: Integer;
+    FAckState: TROSynapseAckState;
+    FOwner: TROSynSuperChannelWorker;
+  public
+    function GetEvent: TROEvent;
+    function GetAckNo: Integer;
+    function GetNoAckError: Integer;
+    procedure SetNoAckError(I: Integer);
+    function GetAckState: TROSynapseAckState;
+    procedure SetAckState(I: TROSynapseAckState);
+
+    constructor Create(aOwner: TROSynSuperChannelWorker; aId: Integer);
+    destructor Destroy; override;
+
+    procedure RemoveFromList;
+  end;
+
+{ TROSynSuperChannelWorker }
+
+constructor TROSynSuperChannelWorker.Create(aConnection: TTCPBlockSocket);
+begin
+  inherited Create;
+  fPingFrequency := 60;
+  fPingTimeout := 90;
+  fConnection := aConnection;
+  fWriteLock := TCriticalSection.Create;
+  fInternalWriteLock := TCriticalSection.Create;
+  fMaxPackageSize := 10 * 1024 * 1024; // 1mb
+  fWaitingAckList:= TInterfaceList.Create;
+
+end;
+
+destructor TROSynSuperChannelWorker.Destroy;
+var
+  i: Integer;
+begin
+  BeginWriteLock;
+  try
+    fWaitingAckList.Lock;
+    try
+      for i := fWaitingAckList.Count -1 downto 0 do
+        IROSynapsePackageAck(fWaitingAckList[i]).RemoveFromList;
+    finally
+      fWaitingAckList.Unlock;
+    end;
+    fWaitingAckList.Free;
+    fInternalWriteLock.Free;
+    inherited Destroy;
+  finally
+    EndWriteLock;
+    fWriteLock.Free;
+  end;
+end;
+
+procedure TROSynSuperChannelWorker.Disconnect;
+begin
+  fConnection.CloseSocket;
+end;
+
+
+procedure TROSynSuperChannelWorker.Connected;
+var
+  b: array[0..5] of byte;
+begin
+  fConnected := True;
+  b[0] := ScCmdNoAck;
+  b[1] := 0;
+  b[2] := 0;
+  b[3] := 0;
+  b[4] := 0;
+  b[5] := ScCmdNoAck_SupportsOptions;
+  fConnection.SendBuffer(@b[0], sizeof(b));
+end;
+
+
+procedure TROSynSuperChannelWorker.Disconnected(var RestartLoop: Boolean);
+begin
+  if RestartLoop then fConnected := False else //for preventing warnings in FPC
+  fConnected := False;
+end;
+
+function TROSynSuperChannelWorker.ReadStream(aDest: TStream; aLen: Integer): Boolean;
+var
+  Buf: array[0 .. 4096-1] of byte;
+  lRes: Integer;
+begin
+  aDest.Position := 0;
+  aDest.Size := 0;
+  while aLen > 0 do begin
+    lRes := aLen;
+    if lRes > sizeof(buf) then lRes := Sizeof(Buf);
+    lRes := fConnection.RecvBufferEx(@Buf[0], lRes, fPingFrequency * 1000);
+    aLen := aLen - lRes;
+    if lRes = 0 then begin Result := false; exit; end;
+    aDest.Write(Buf, lRes);
+    fLastData := now;
+  end;
+  Result := true;
+end;
+
+
+procedure TROSynSuperChannelWorker.DoExecute;
+var
+  fLastPackage: DateTime;
+  lServerExpectAck: Integer;
+  lTmpId,
+  lTmpLen: Integer;
+  cmd: Byte;
+  Bl: array[0..5] of Byte;
+  lData: TMemoryStream;
+  lRetry: Boolean;
+begin
+  lTmpId := 1;
+  SetSockOpt(fConnection.Socket, 6, 1, @lTmpId, 4); // Nagle bit
+   repeat
+    fRemoteSkipAck := false;
+    fRemoteSupportsOptions := false;
+    lServerExpectAck := 0;
+    try
+      if IsServer then
+      begin
+
+        if fConnection.RecvBufferStr(6, fPingTimeout * 1000) <> ScWelcome then
+        begin
+          fConnection.SendString(GetDefaultResponse);
+          fConnection.CloseSocket;
+          exit;
+        end;
+        fConnection.RecvBufferEx(@fClientID, Sizeof(fClientID), fPingTimeout * 1000);
+        if IsEqualGUID(fClientID, EmptyGUID) then
+          fClientID := NewGuid;
+        fOtherSideMaxPackageLen := fConnection.RecvInteger(fPingTimeout * 1000);
+        fConnection.SendString(ScWelcome);
+        fConnection.SendBuffer(@fClientID, sizeof(fClientID));
+        fConnection.SendInteger(fMaxPackageSize);
+      end else begin
+        if Client_SendWelcome then Exit;
+        {
+        fConnection.SendString(ScWelcome);
+        fConnection.SendBuffer(@fClientID, sizeof(fClientID));
+        fConnection.SendInteger(fMaxPackageSize);
+
+        if fConnection.RecvBufferStr(6, fPingTimeout * 1000) <> ScWelcome then
+        begin
+          fConnection.SendString(GetDefaultResponse);
+          fConnection.CloseSocket;
+          exit;
+        end;
+        fConnection.RecvBufferEx(@fClientID, Sizeof(fClientID), fPingTimeout * 1000);
+        fOtherSideMaxPackageLen := fConnection.RecvInteger(fPingTimeout * 1000);
+        }
+      end;
+      fLastPackage := Now;
+      Connected;
+
+      while true do
+      begin
+        if fConnection.RecvBufferEx(@cmd, 1,  fPingFrequency * 1000) = 1 then begin
+          fLastPackage := Now;
+          case cmd of
+            ScCmdPong:
+              begin
+                if fConnection.RecvInteger(fPingTimeout * 1000) = lServerExpectAck then
+                begin
+                  lServerExpectAck  := 0;
+                end;
+              end;
+            ScCmdPing:
+              begin
+                Bl[0] := ScCmdPong;
+                lTmpId := fConnection.RecvInteger(fPingTimeout * 1000);
+                Move(ltmpId, bl[1], 4);
+                fInternalWriteLock.Acquire;
+                try
+                  fConnection.SendBuffer(@bl, 5);
+                finally
+                  fInternalWriteLock.Release;
+                end;
+              end;
+            ScCmdAck:
+              begin
+                lTmpId := fConnection.RecvInteger(fPingTimeout * 1000);
+                SetAckDetails(lTmpId, true, 0);
+              end;
+            ScCmdNoAck:
+              begin
+                lTmpId := fConnection.RecvInteger(fPingTimeout * 1000);
+                cmd := fConnection.RecvByte(fPingTimeout * 1000);
+                if cmd = ScCmdNoAck_SupportsOptions then
+                  SupportsOptions
+                else
+                  SetAckDetails(lTmpId, false, cmd);
+              end;
+            ScCmdOptions:
+              begin
+                lTmpLen := fconnection.RecvInteger(fPingTimeout * 1000);
+                if lTmpLen > fMaxPackageSize then
+                begin
+                  fInternalWriteLock.Acquire;
+                  try
+                    fConnection.SendString(Chr(ScCmdNoAck)+#0#0#0#0+chr(ScCmdNoAck_MsgTooLarge));
+                  finally
+                    fInternalWriteLock.Release;
+                  end;
+                  fConnection.CloseSocket;
+                  exit;
+                end else begin
+                  lData := TMemoryStream.Create;
+                  try
+                    if not ReadStream(lData, lTmpLen) then break;
+                    ProcessOption(lData);
+                  finally
+                    lData.Free; 
+                  end;
+                  fLastPackage := Now; // for packages that might take longer.
+                end;
+              end;
+            ScCmdPackage:
+              begin
+                fLastData := Now;
+                lTmpId := fConnection.RecvInteger(fPingTimeout * 1000);
+                lTmpLen := fConnection.RecvInteger(fPingTimeout * 1000);
+                if lTmpLen < 0 then
+                begin
+                fInternalWriteLock.Acquire;
+                    try
+                    fConnection.SendString(Chr(ScCmdNoAck)+#0#0#0#0+chr(scCmdNoAck_UnknownCommand));
+                  finally
+                    fInternalWriteLock.Release;
+                  end;
+                  fConnection.CloseSocket;
+                  exit;
+                end;
+                if lTmpLen > fMaxPackageSize then
+                begin
+                  fInternalWriteLock.Acquire;
+                  try
+                    fConnection.SendString(Chr(ScCmdNoAck)+#0#0#0#0+chr(ScCmdNoAck_MsgTooLarge));
+                  finally
+                    fInternalWriteLock.Release;
+                  end;
+                  fConnection.CloseSocket;
+                  exit;
+                end else begin
+                  lData := TMemoryStream.Create;
+                  try
+                    if not ReadStream(lData, lTmpLen) then break;
+                    lData.Seek(0, soFromBeginning);
+                    Self.IncomingData(lTmpId, lData);
+                  except
+                    lData.Free; // only free when we failed to send the data to the queue
+                    fInternalWriteLock.Acquire;
+                    try
+                      fConnection.SendByte(ScCmdNoAck);
+                      fConnection.SendInteger(lTmpId);
+                      fConnection.SendByte(ScCmdNoAck_QueueFull);
+                    finally
+                      fInternalWriteLock.Release;
+                    end;
+                  end;
+                  if not fRemoteSkipAck then begin
+                  fInternalWriteLock.Acquire;
+                  try
+                    bl[0] := ScCmdAck;
+                    Move(lTmpId, bl[1], 4);
+                    fConnection.SendBuffer(@Bl, 5);
+                  finally
+                    fInternalWriteLock.Release;
+                    end;
+                  end;
+                  fLastPackage := Now; // for packages that might take longer.
+                end;
+              end;
+          end;
+        end else begin
+          if fConnection.LastError <> WSAETIMEDOUT then begin
+            fConnection.CloseSocket;
+            Break; // disconnected
+          end;
+          Idle;
+          if IsServer then
+          begin
+            if ((Now - fLastPackage) > (PingTimeout * (1.0 / (24 * 60 * 60)))) then
+            begin
+              fInternalWriteLock.Acquire;
+              try
+                fConnection.SendString(Chr(ScCmdNoAck)+#0#0#0#0+chr(ScCmdNoAck_Timeout));
+                fConnection.CloseSocket;
+              finally
+                fInternalWriteLock.Release;
+              end;
+              exit;
+            end;
+          end else
+          begin
+            if (lServerExpectAck <> 0)  then
+            begin
+              if (Now - fLastPackage) > (PingTimeout * (1.0 / (24 * 60 * 60))) then
+              begin
+                fInternalWriteLock.Acquire;
+                try
+                  fConnection.SendString(Chr(ScCmdNoAck)+#0#0#0#0+chr(ScCmdNoAck_Timeout));
+                  fConnection.CloseSocket;
+                finally
+                  fInternalWriteLock.Release;
+                end;
+                exit;
+              end;
+            end else begin
+              if (Now - fLastPackage) > (PingFrequency * (1.0 / (24 * 60 * 60))) then begin
+                lServerExpectAck := GetTickCount;
+                if lServerExpectAck = 0 then lServerExpectAck := 1;
+                bl[0] := ScCmdPing;
+                Move(lServerExpectAck, bl[1], 4);
+                fInternalWriteLock.Acquire;
+                try
+                  fConnection.SendBuffer(@bl, 5);
+                finally
+                  fInternalWriteLock.Release;
+                end;
+              end;
+            end;
+          end;
+        end;
+      end;
+    except
+    end;
+    lRetry := false;
+    try
+      Disconnect;
+    except
+    end;
+    Disconnected(lRetry);
+  until not lRetry;
+end;
+
+function TROSynSuperChannelWorker.GenerateId: Integer;
+begin
+  fWriteLock.Acquire;
+  try
+    if IsServer then
+    begin
+      fLastId := fLastId - 1;
+      if fLastId > -1 then fLastId := -1;
+    end
+    else
+    begin
+      fLastId := fLastId + 1;
+      if fLastId < 1 then fLastId := 1;
+    end;
+    Result := fLastId;
+  finally
+    fWriteLock.Release;
+  end;
+end;
+
+procedure TROSynSuperChannelWorker.Idle;
+begin
+
+end;
+
+function TROSynSuperChannelWorker.IntSendData(Id: Integer; aData: TStream): IROSynapsePackageAck;
+var
+  Buffer: array[0.. 2047] of byte;
+  Len: Integer;
+begin
+  fLastData := Now;
+  Result := TROSynPackageAck.Create(Self, Id);
+  fWaitingAckList.Add(Result);
+  Buffer[0] := ScCmdPackage;
+  Move(Id, Buffer[1], 4);
+  Len := aData.Size;
+  Move(Len, Buffer[5], 4);
+
+  aData.Seek(0, soFromBeginning);
+
+  fInternalWriteLock.Acquire;
+  try
+    Len := aData.Read(Buffer[9], sizeof(Buffer) - 9);
+    fConnection.SendBuffer(@Buffer, Len + 9);
+    if Len > 0 then begin
+      repeat
+        Len := aData.Read(Buffer[0], Sizeof(Buffer));
+        fConnection.SendBuffer(@Buffer[0], Len);
+        fLastData := Now;
+      until Len = 0;
+    end;
+  finally
+    fInternalWriteLock.Release;
+  end;
+end;
+
+procedure TROSynSuperChannelWorker.ProcessOption(Data: TStream);
+var
+  lCmd, lData: AnsiString;
+  lPos: Integer;
+begin
+  SetLength(lData, Data.Size);
+  Data.Position := 0;
+  Data.Read(lData[1], Length(lData));
+  lPos := Pos(AnsiChar(#13), lData);
+  if lPos = 0 then begin
+    lCmd := lData;
+    lData := '';
+  end else begin
+    lCmd := copy(lData, 1, lPos-1);
+    Delete(lData, 1, lPos);
+  end;
+  if lCmd = 'SKIPACK' then begin
+    fRemoteSkipAck := lData <> 'OFF';
+  end;
+end;
+
+procedure TROSynSuperChannelWorker.SendError(Id: Integer; Error: Byte);
+var
+  Buffer: array[0..5] of Byte;
+begin
+  buffer[0] := ScCmdNoAck;
+  Move(ID, Buffer[1], 4);
+  Buffer[5] := Error;
+  fInternalWriteLock.Acquire;
+  try
+    fConnection.SendBuffer(@Buffer, 6);
+  finally
+    fInternalWriteLock.Release;
+  end;
+end;
+
+procedure TROSynSuperChannelWorker.SendOptions(aData: UTF8String);
+var
+  Buffer: array of byte;
+  Len: Integer;
+begin
+  fWriteLock.Acquire;
+  try
+    fLastData := Now;
+    SetLength(Buffer, Length(aData)+5);
+    Buffer[0] := ScCmdOptions;
+    Len := Length(aData);
+    Move(Len, Buffer[1], 4);
+    Move(aData[1], Buffer[5], Length(aDAta));
+
+    fInternalWriteLock.Acquire;
+    try
+      fConnection.SendBuffer(@Buffer[0], Length(Buffer));
+  finally
+    fInternalWriteLock.Release;
+  end;
+
+  finally
+    fWriteLock.Release;
+  end;
+end;
+
+function TROSynSuperChannelWorker.SendPackage(aData: TStream; Id: Integer = 0): IROSynapsePackageAck;
+begin
+  if GetOtherSideMaxPackageLen < aData.Size then begin
+    raise EROException.Create('Package too large');
+  end
+  else begin
+    fWriteLock.Acquire;
+    try
+      if Id = 0 then
+      begin
+        id := GenerateId;
+      end;
+      Result := IntSendData(Id, aData);
+    finally
+      fWriteLock.Release;
+    end;
+  end;
+end;
+
+procedure TROSynSuperChannelWorker.SetAckDetails(Id: Integer; Oke: Boolean;
+  ErrorNo: Integer);
+var
+  i: Integer;
+  rp: IROSynapsePackageAck;
+begin
+  fWaitingAckList.Lock;
+  try
+    for i := fWaitingAckList.Count -1 downto 0 do
+    begin
+      if IROSynapsePackageAck(fWaitingAckList[i]).AckNo = Id then
+      begin
+        rp := IROSynapsePackageAck(fWaitingAckList[i]);
+        rp.RemoveFromList;
+
+        rp.NoAckError := ErrorNo;
+        if Oke then
+          rp.AckState := rAck
+        else
+          rp.AckState := rNoAck;
+        rp.Event.SetEvent;
+        exit;
+      end;
+    end;
+  finally
+    fWaitingAckList.Unlock;
+  end;
+end;
+
+procedure TROSynSuperChannelWorker.SetSkipAck(const Value: Boolean);
+begin
+  fSkipAck := Value;
+end;
+
+procedure TROSynSuperChannelWorker.SupportsOptions;
+begin
+  if fSkipAck then SendOptions('SKIPACK'#13'ON');
+  fRemoteSupportsOptions := true;
+end;
+
+class procedure TROSynSuperChannelWorker.WaitForAck(pkg: IROSynapsePackageAck; Timeout: Integer = 60000);
+begin
+  try
+    if pkg.Event = nil then exit; // skipack
+
+    if pkg.Event.WaitFor(Timeout) <> wrSignaled then
+      raise EROSynapseTimeout.Create('Timeout');
+    if pkg.AckState <> rAck then
+    begin
+      case pkg.NoAckError of
+        ScCmdNoAck_MsgTooLarge: raise eROMessageTooLarge.Create('Message too large');
+      else
+        raise EROException.Create('Unknown error');
+      end;
+    end;
+  finally
+    pkg.RemoveFromList;
+  end;
+end;
+
+procedure TROSynSuperChannelWorker.BeginWriteLock;
+begin
+  fWriteLock.Acquire;
+end;
+
+procedure TROSynSuperChannelWorker.EndWriteLock;
+begin
+  fWriteLock.Release;
+end;
+
+function TROSynSuperChannelWorker.GetDefaultResponse: string;
+begin
+  Result := 'ROSC:Invalid connection string';
+end;
+
+function TROSynSuperChannelWorker.Client_SendWelcome:Boolean;
+begin
+  Result:= False;
+  fConnection.SendString(ScWelcome);
+  fConnection.SendBuffer(@fClientID, sizeof(fClientID));
+  fConnection.SendInteger(fMaxPackageSize);
+
+  if fConnection.RecvBufferStr(6, fPingTimeout * 1000) <> ScWelcome then
+  begin
+    fConnection.SendString(GetDefaultResponse);
+    fConnection.CloseSocket;
+    Result:=True;
+    exit;
+  end;
+  fConnection.RecvBufferEx(@fClientID, Sizeof(fClientID), fPingTimeout * 1000);
+  fOtherSideMaxPackageLen := fConnection.RecvInteger(fPingTimeout * 1000);
+end;
+
+function TROSynSuperChannelWorker.GetOtherSideMaxPackageLen: integer;
+var
+  RestartLoop: boolean;
+begin
+  if (fOtherSideMaxPackageLen = 0) and not IsServer then begin
+    RestartLoop:= False;
+    Disconnected(RestartLoop);
+    Client_SendWelcome;
+  end;
+  Result := fOtherSideMaxPackageLen;
+end;
+
+{ TROSynPackageAck }
+
+constructor TROSynPackageAck.Create(aOwner: TROSynSuperChannelWorker; aId: Integer);
+begin
+  inherited Create;
+  if not (aOwner.fSkipAck and aOwner.fRemoteSupportsOptions) then
+  fEvent := TROEvent.Create(nil, true, false, '');
+  fAckNo := aId;
+  FOwner := aOwner;
+//  if FOwner <> nil then FOwner.fWaitingAckList.Add(Self as IROSynapsePackageAck);
+end;
+
+destructor TROSynPackageAck.Destroy;
+begin
+  fEvent.Free;
+  inherited;
+end;
+
+function TROSynPackageAck.GetAckNo: Integer;
+begin
+  result := fAckNo;
+end;
+
+function TROSynPackageAck.GetAckState: TROSynapseAckState;
+begin
+  Result := FAckState;
+end;
+
+function TROSynPackageAck.GetEvent: TROEvent;
+begin
+  Result := fEvent;
+end;
+
+function TROSynPackageAck.GetNoAckError: Integer;
+begin
+ Result := FAckNoError;
+end;
+
+{$ifndef fpc}
+function InterlockedExchangePointer(var Target: Pointer; Value: Pointer): Pointer;
+begin
+  Result := Pointer(InterlockedExchange(Integer(Target), Integer(Value)));
+end;
+{$else}
+function InterlockedExchangePointer(var Target: Pointer; Value: Pointer): Pointer;
+begin
+  {$IFDEF CPU64}
+  result := Pointer(InterlockedExchange64(PtrInt(target), PtrInt(value)));
+  {$ELSE}
+  result := Pointer(InterlockedExchange(PtrInt(target), PtrInt(value)));
+  {$ENDIF}
+end;
+{$endif}
+
+procedure TROSynPackageAck.RemoveFromList;
+var
+  lOwner: TROSynSuperChannelWorker;
+begin
+  lOwner := InterlockedExchangePointer(Pointer(FOwner), nil);
+  if lOwner <> nil then
+  begin
+    lOwner.fWaitingAckList.Remove(self as IROSynapsePackageAck);
+  //  lOwner := nil;
+  end;
+end;
+
+procedure TROSynPackageAck.SetAckState(I: TROSynapseAckState);
+begin
+  FAckState := I;
+end;
+
+procedure TROSynPackageAck.SetNoAckError(I: Integer);
+begin
+  FAckNoError := i;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSynapseServerSocket.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSynapseServerSocket.pas
new file mode 100644
index 0000000..c1f8e79
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSynapseServerSocket.pas	
@@ -0,0 +1,208 @@
+unit uROSynapseServerSocket;
+
+{$I RemObjects.inc}
+
+interface
+uses
+  SysUtils, Classes, blcksock, synsock, uROThreadPool;
+
+type
+  TRONewSocketEvent = function (Sender: TObject; aSock: TSocket): TTCPBlockSocket of object;
+  TRONewConnection = procedure (Sender: TObject; aSocket: TTCPBlockSocket) of object;
+  TROSynapseServerSocket = class
+  private
+    fSock: TTCPBlockSocket;
+    fActive: Boolean;
+    fMaxThreads: Integer;
+    fThreads: TThreadList;
+    fListenThread: TThread;
+    fBindList: TStrings;
+    fOnNewSocket: TRONewSocketEvent;
+    fOnNewConnection: TRONewConnection;
+    fPort: Integer;
+    procedure SetActive(aValue: Boolean);
+  protected
+
+  public
+    constructor Create;
+    destructor Destroy; override;
+
+    property OnNewSocket: TRONewSocketEvent read fOnNewSocket write fOnNewSocket; // to be used to say setup ssl
+    property OnNewConnection: TRONewConnection read fOnNewConnection write fOnNewConnection;
+
+    property Active: Boolean read fActive write SetActive;
+    property Sock: TTCPBlockSocket read fSock;
+    property MaxThreads: Integer read fMaxThreads write fMaxThreads;
+    property BindList: TStrings read fBindList;
+    property Port: Integer read fPort write fPort; // for when the bindlist is empty
+  end;
+
+implementation
+uses
+  uROClasses;
+
+type
+  TSynapseListenThread = class(TROInitializedThread)
+  private
+    fOwner: TROSynapseServerSocket;
+  public
+    constructor Create(aOwner: TROSynapseServerSocket);
+    procedure Execute; override;
+  end;
+  TSynapseClientThread = class(TROInitializedThread)
+  private
+    fOwner: TROSynapseServerSocket;
+    fSock: TTCPBlockSocket;
+  protected
+    procedure Execute; override;
+  public
+    constructor Create(aOwner: TROSynapseServerSocket; aSock: TTCPBlockSocket);
+    procedure Close;
+    destructor Destroy; override;
+  end;
+
+{ TROSynapseServerSocket }
+
+constructor TROSynapseServerSocket.Create;
+begin
+  fSock := TTCPBlockSocket.Create;
+  fThreads := TThreadList.Create;
+  fMaxThreads := 100;
+  fBindList := TStringList.Create;
+end;
+
+destructor TROSynapseServerSocket.Destroy;
+var
+  i: Integer;
+  lList: TList;
+begin
+  lList := fThreads.LockList;
+  try
+    for i := 0 to lList.Count -1 do begin
+      TSynapseClientThread(lList[i]).Close;
+    end;
+  finally
+    fThreads.UnlockList;
+  end;
+  Sleep(10);
+  while true do begin
+    if fThreads.LockList.Count = 0 then begin
+      fThreads.UnlockList;
+      break;
+    end;
+    fThreads.UnlockList;
+    Sleep(10);
+  end;
+
+  Active := false;
+  fThreads.Free;
+  fBindList.Free;
+  fSock.Free;
+
+  inherited Destroy;
+end;
+
+procedure TROSynapseServerSocket.SetActive(aValue: Boolean);
+var
+  i: Integer;
+  s1,s2: string;
+begin
+  if fActive = aValue then exit;
+  if aValue then begin
+    fSock.CreateSocket;
+    if fBindList.Count = 0 then
+      fSock.Bind('0.0.0.0', IntTostr(fPort))
+    else begin
+      for i := 0 to fBindList.Count -1 do begin
+        s2 := fBindList[i];
+        s1 := copy(s2, 1, pos(':', s2) -1);
+        Delete(s2, 1, pos(':', s2));
+      end;
+      fSock.Bind(s1,s2);
+    end;
+    fSock.Listen;
+    fListenThread := TSynapseListenThread.Create(self);
+  end else begin
+    fSock.CloseSocket;
+    fListenThread.Free;
+    fListenThread := nil;
+  end;
+  fActive := aValue;
+end;
+
+{ TSynapseListenThread }
+
+constructor TSynapseListenThread.Create(aOwner: TROSynapseServerSocket);
+begin
+  inherited Create(True);
+  fOwner := aOwner;
+  FreeOnTerminate := false;
+  resume;
+end;
+
+
+procedure TSynapseListenThread.Execute;
+var
+  lSock: TSocket;
+  lList: TList;
+  lRealSock: TTCPBlockSocket;
+begin
+  while not Terminated do begin
+    lSock := fOwner.fSock.Accept;
+    if (lSock = 0) or (lSock = INVALID_SOCKET) then break;
+    lList := fOwner.fThreads.LockList;
+    try
+      if lList.Count >= fOwner.fMaxThreads then begin
+        CloseSocket(lSock);
+      end else begin
+        if @fOwner.fOnNewSocket <> nil then
+          lRealSock := fOwner.fOnNewSocket(fOwner, lSock)
+        else begin
+          lRealSock := TTCPBlockSocket.Create;
+          lRealSock.Socket := lSock;
+        end;
+        if lRealSock = nil then begin
+          CloseSocket(lSock);
+        end else begin
+          lList.Add(TSynapseClientThread.Create(fOwner, lRealSock));
+        end;
+      end;
+    finally
+      fOwner.fThreads.UnlockList;
+    end;
+  end;
+end;
+
+{ TSynapseClientThread }
+
+procedure TSynapseClientThread.Close;
+begin
+  fSock.AbortSocket;
+  terminate;
+end;
+
+constructor TSynapseClientThread.Create(aOwner: TROSynapseServerSocket;
+  aSock: TTCPBlockSocket);
+begin
+  inherited Create(True);
+  fOwner := aOwner;
+  fSock := aSock;
+//  fOwner.fThreads.Add(Self);
+  FreeOnTerminate := true;
+  Resume;
+end;
+
+destructor TSynapseClientThread.Destroy;
+begin
+  fOwner.fThreads.Remove(Self);
+  fSock.Free;
+  inherited;
+end;
+
+procedure TSynapseClientThread.Execute;
+begin
+  if @fOwner.fOnNewConnection <> nil then
+    fOwner.fOnNewConnection(fOwner, fSock);
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSynapseSuperHttpChannel.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSynapseSuperHttpChannel.pas
new file mode 100644
index 0000000..471b415
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSynapseSuperHttpChannel.pas	
@@ -0,0 +1,243 @@
+unit uROSynapseSuperHttpChannel;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Indy Components                                   }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes, SysUtils, uROClient, uROClientIntf, uROAsync, uROClasses, SyncObjs,
+  {$IFDEF RemObjects_UseEncryption} uROEncryption, {$ENDIF}uROThreadPool,
+  httpsend, uROBaseSuperHttpChannel, synsock;
+
+type
+  TROSynapseSuperHTTPChannel  = class(TROBaseSuperHttpChannel)
+  private
+    fClientWait,
+    fClientRequest: THTTPSend;
+    fDisableNagle: Boolean;
+    fTargetUrl: String;
+    procedure SocketOnAfterConnectRequest(Sender: TObject);
+    procedure SocketOnAfterConnectWait(Sender: TObject);
+  protected
+  { IROHTTPTransport }
+    function GetClientAddress : string; override;
+    procedure SetHeaders(const aName, aValue : string); override;
+    function GetHeaders(const aName : string) : string; override;
+    function GetContentType : string; override;
+    procedure SetContentType(const aValue : string); override;
+    function GetUserAgent : string; override;
+    procedure SetUserAgent(const aValue : string); override;
+    function GetTargetURL : string; override;
+    procedure SetTargetURL(const aValue : string); override;
+    procedure SetPathInfo (const aValue : string); override;
+    function GetPathInfo : string; override;
+    function GetQueryString : string; override;
+    function GetLocation : string; override;
+    function GetQueryParameter(const aName: string): string; override;
+  protected
+    procedure CancelRequest(aWaitingThread: Boolean); override;
+    procedure DispatchHttpRequest(aWaitingThread: Boolean;
+      aRequest: TDynByteArray; out aResponse: TDynByteArray); override;
+  public
+    constructor Create(aOwner: TCOmponent); override;
+    destructor Destroy; override;
+
+    property ClientWait: THTTPSend read fClientWait;
+    property ClientRequest: THTTPSend read fClientRequest;
+    {$IFDEF FPC}
+    property SessionId;
+    {$ENDIF}
+  published
+    {$IFNDEF FPC}
+    property SessionId;
+    {$ENDIF}    
+    property Active;
+    property MaxPackageSize;
+    property TargetUrl: String read fTargetUrl write fTargetUrl;
+    property RequestTimeout;
+    property ConnectTimeout;
+    property HttpRequestTimeout;
+
+    property DispatchOptions;
+    property ServerLocators;
+    property OnServerLocatorAssignment;
+    property DisableNagle: Boolean read fDisableNagle write fDisableNagle default true;
+  end;
+
+implementation
+uses
+  uRORes;
+
+{ TROSynapseSuperHTTPChannel  }
+
+procedure TROSynapseSuperHTTPChannel.CancelRequest(aWaitingThread: Boolean);
+var
+  lSock: THTTPSend;
+begin
+  try
+    if aWaitingThread then lSock := fClientWait else lSock := fClientRequest;
+    lSock.Abort;
+    if lSock.Sock <> nil then
+      lSock.Sock.CloseSocket;
+  except
+    // indy will release an exception when closing
+  end;
+end;
+
+constructor TROSynapseSuperHTTPChannel.Create(aOwner: TCOmponent);
+begin
+  inherited Create(aOwner);
+  fDisableNagle := true;
+
+  fClientWait := THttpSend.Create;
+  fClientWait.UserAgent := str_ProductName;
+  fClientWait.Protocol := '1.1';
+  fClientWait.Status100 := False;
+  fClientWait.Sock.OnAfterConnect := SocketOnAfterConnectWait;
+
+
+  fClientRequest := THTTPSend.Create;
+  fClientRequest.UserAgent := str_ProductName;
+  fClientRequest.Protocol := '1.1';
+  fClientRequest.Status100 := False;
+  fClientRequest.Sock.OnAfterConnect := SocketOnAfterConnectRequest;
+
+end;
+
+procedure TROSynapseSuperHTTPChannel.SocketOnAfterConnectWait(Sender: TObject);
+var
+  lTmpVal: Integer;
+begin
+  if fDisableNagle then begin
+    lTmpVal := 1;
+    SetSockOpt(fClientWait.Sock.Socket, 6, 1, @lTmpVal, 4);
+  end;
+end;
+
+procedure TROSynapseSuperHTTPChannel.SocketOnAfterConnectRequest(Sender: TObject);
+var
+  lTmpVal: Integer;
+begin
+  if fDisableNagle then begin
+    lTmpVal := 1;
+    SetSockOpt(fClientRequest.Sock.Socket, 6, 1, @lTmpVal, 4);
+  end;
+end;
+
+destructor TROSynapseSuperHTTPChannel.Destroy;
+begin
+  Active := false;
+  fClientWait.Free;
+  fClientRequest.Free;
+  inherited Destroy;
+end;
+
+procedure TROSynapseSuperHTTPChannel.DispatchHttpRequest(
+  aWaitingThread: Boolean; aRequest: TDynByteArray;
+  out aResponse: TDynByteArray);
+var
+  lClient: THTTPSend;
+begin
+  if aWaitingThread then lClient := fClientWait else lClient := fClientRequest;
+  lClient.Headers.Clear;
+  lClient.Document.Position := 0;
+  lClient.Document.Size := 0;
+  lClient.Document.Write(aRequest[0], Length(aRequest));
+  if lClient.KeepAlive then
+    lClient.Headers.Add('Connection: keep-alive');
+  if not lClient.HTTPMethod('POST', fTargetUrl) then
+    raise EROException.Create('Unable to connect to remote server');
+  SetLength(aResponse, lClient.Document.Size);
+  lClient.Document.Position := 0;
+  lClient.Document.Read(aResponse[0], length(aResponse));
+end;
+
+function TROSynapseSuperHTTPChannel.GetClientAddress: string;
+begin
+  result := '';
+end;
+
+function TROSynapseSuperHTTPChannel.GetContentType: string;
+begin
+  Result := ClientRequest.MimeType;
+end;
+
+function TROSynapseSuperHTTPChannel.GetHeaders(
+  const aName: string): string;
+begin
+  Result := ClientRequest.Headers.Values[aName];
+end;
+
+function TROSynapseSuperHTTPChannel.GetLocation: string;
+begin
+  result := '';
+end;
+
+function TROSynapseSuperHTTPChannel.GetPathInfo: string;
+begin
+  result := '';
+end;
+
+function TROSynapseSuperHTTPChannel.GetQueryParameter(
+  const aName: string): string;
+begin
+  result := '';
+end;
+
+function TROSynapseSuperHTTPChannel.GetQueryString: string;
+begin
+  result := '';
+end;
+
+function TROSynapseSuperHTTPChannel.GetTargetURL: string;
+begin
+  result := fTargetURL;
+end;
+
+function TROSynapseSuperHTTPChannel.GetUserAgent: string;
+begin
+  Result := ClientRequest.UserAgent;
+end;
+
+procedure TROSynapseSuperHTTPChannel.SetContentType(const aValue: string);
+begin
+  ClientWait.MimeType := aValue;
+  ClientRequest.MimeType := aValue;  
+end;
+
+procedure TROSynapseSuperHTTPChannel.SetHeaders(const aName,
+  aValue: string);
+begin
+  ClientWait.Headers.Values[aName] := aValue;
+  ClientRequest.Headers.Values[aName] := aValue;
+end;
+
+procedure TROSynapseSuperHTTPChannel.SetPathInfo(const aValue: string);
+begin
+  // Do nothing; server only
+end;
+
+procedure TROSynapseSuperHTTPChannel.SetTargetURL(const aValue: string);
+begin
+  fTargetURL := Trim(aValue)
+end;
+
+procedure TROSynapseSuperHTTPChannel.SetUserAgent(const aValue: string);
+begin
+  ClientWait.UserAgent := aValue;
+  ClientRequest.UserAgent := aValue;  
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSynapseSuperTCPChannel.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSynapseSuperTCPChannel.pas
new file mode 100644
index 0000000..0248b06
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSynapseSuperTCPChannel.pas	
@@ -0,0 +1,872 @@
+unit uROSynapseSuperTCPChannel;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Indy Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+uses
+  SysUtils, Classes, uROClasses, uROClient, uROClientIntf, SyncObjs, uROAsync,
+  {$IFDEF RemObjects_UseEncryption} uROEncryption, {$ENDIF}
+  blcksock, {$IFDEF MSWINDOWS}Windows, {$ENDIF}uROSynapseSCHelpers, uROThreadPool;
+
+type
+  TROSynapseCustomSuperTCPChannel = class;
+  TROSynapseSCClientWorker = class;
+  TROSynapseWaitingRequest = class
+  private
+    fEvent: TROEvent;
+    fFreeEvent: Boolean;
+    fId: Integer;
+    fResultData: TStream;
+    fResultErrorCode: Integer;
+  public
+    property Id: Integer read fId;
+    property Event: TROEvent read fEvent;
+    property Resultdata: TStream read fResultData write fResultData;
+    property ResultErrorCode: Integer read fResultErrorCode write fResultErrorCode;
+
+    constructor Create(Id: Integer); overload;
+    constructor Create(Id: Integer; Ev: TROEvent); overload;
+    destructor Destroy; override;
+  end;
+
+  TROSynapsePooledEvent = class(TInterfacedObject, IROThreadPoolCallback)
+  private
+    fData: TStream;
+    fOwner: TROSynapseCustomSuperTCPChannel;
+  protected
+    procedure Callback(Caller: TROThreadPool; Thread: TThread);
+  public
+    constructor Create(aData: TStream; aOwner: TROSynapseCustomSuperTCPChannel);
+    destructor Destroy; override;
+  end;
+  TROSCState = (scNotConnected, scConnecting, scConnected, scReconnecting);
+  TROSynapseCustomSuperTCPChannel = class(TROTransportChannel, IROTransport,
+    IROTCPTransport, IROActiveEventChannel, IROMultiThreadAwareChannel,
+    IROAsyncTransportChannel, IROActiveAsyncTransportChannel, IROTransportChannelEx)
+  private
+    fRequestTimeout: Integer;
+    fState: TROSCState;
+    fHost: string;
+    fPort: Integer;
+    fConnection: TTCPBlockSocket;
+    fActive: Boolean;
+    fOwnsEventThreadPool: Boolean;
+    fEventThreadPool: TROThreadPool;
+    fClient: TROSynapseSCClientWorker;
+    fWorkerThread: TThread;
+    fWaitingRequests: TThreadList;
+    fAutoReconnect: Boolean;
+    fEventReceiver: IROEventReceiver;
+    fConnectEvent: TROEvent;
+    fReconnectEvent: TROEvent;
+    fOnDisconnected: TNotifyEvent;
+    fOnConnected: TNotifyEvent;
+    fReconnectDelay: Integer;
+    fStoreActive: Boolean;
+    fPingSecs: Integer;
+    fAckWaitTimeout: Integer;
+    fIdleTimeoutMinutes: Integer;
+    fSynchronizeEvents: Boolean;
+    fConnectionWaitTimeout: Integer;
+    procedure SetHost(const Value: string);
+    procedure SetPort(const Value: Integer);
+    procedure SetActive(const Value: Boolean);
+    procedure SetEventThreadPool(const Value: TROThreadPool);
+    function GetClientID: TGUID;
+    procedure SetClientID(const Value: TGUID);
+    function GetMaxPackageSize: Longint;
+    procedure SetMaxPackageSize(val: longint);
+    function GetConnected: Boolean;
+    function GetSkipAck: Boolean;
+    procedure SetSkipAck(const Value: Boolean);
+    procedure SetPingSecs(const Value: Integer);
+    function InDestroyingState: Boolean;    
+  protected
+    procedure Loaded; override;
+    function GetClientAddress: String;
+    function GetTransportObject: TObject; override;
+
+    procedure HasData(Id: Integer; aData: TStream);
+    procedure BeforeDispatch(aMessage: IROMessage); override;
+    procedure IntDispatch(aRequest, aResponse : TStream); override;
+    procedure IntSetServerLocator(aServerLocator: TROServerLocator); override;
+    procedure RegisterEventReceiver(aReceiver: IROEventReceiver);
+    procedure UnregisterEventReceiver(aReceiver: IROEventReceiver);
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+    function InvokeRequest(aRequest: TStream; aGetResponse: Boolean = True;
+      aEvent: TROEvent = nil): String; overload;
+    function InvokeRequest(aRequest:TStream; iGetResponse:boolean=true):string; overload;
+    function CheckStatus(const iMessageID: String): Boolean;
+    procedure RetrieveResponse(const iMessageID: String;
+      aResponse: TStream);
+  public
+    constructor Create(aOwner: TComponent); override;
+    destructor Destroy; override;
+    procedure WaitForActive(const Timeout: Integer);
+
+    property Host: string read fHost write SetHost;
+    property Port: Integer read fPort write SetPort default 8095;
+    property PingSecs: Integer read fPingSecs write SetPingSecs default 60;
+    property StoreActive: Boolean read fStoreActive write fStoreActive default True;
+    property Active: Boolean read fActive write SetActive  stored fStoreActive default False;
+    property Client: TTCPBlockSocket read fConnection;
+    property RequestTimeout: Integer read fRequestTimeout write fRequestTimeout default 60000;
+    property EventThreadPool: TROThreadPool read fEventThreadPool write SetEventThreadPool;
+    property AutoReconnect: Boolean read fAutoReconnect write fAutoReconnect default False;
+    property ReconnectDelay: Integer read fReconnectDelay write fReconnectDelay default 500;
+    property ClientID: TGUID read GetClientID write SetClientID;
+    property OnDisconnected: TNotifyEvent read fOnDisconnected write fOnDisconnected;
+    property MaxPackageSize: Integer read GetMaxPackageSize write SetMaxPackageSize default 10*1024*1024;
+    property OnConnected: TNotifyEvent read fOnConnected write fOnConnected;
+    property AckWaitTimeout: Integer read fAckWaitTimeout write fAckWaitTimeout default 10000;
+    property Connected: Boolean read GetConnected;
+    property IdleTimeoutMinutes: Integer read fIdleTimeoutMinutes write fIdleTimeoutMinutes default 0; // minutes
+    property SynchronizeEvents: Boolean read fSynchronizeEvents write fSynchronizeEvents default False;
+    property ConnectionWaitTimeout: Integer read fConnectionWaitTimeout write fConnectionWaitTimeout default 10000;
+    property SkipAck: Boolean read GetSkipAck write SetSkipAck default false;
+  end;
+
+  TROSynapseSuperTCPChannel = class(TROSynapseCustomSuperTCPChannel)
+  public
+  published
+    property Host;
+    property Port;
+    property Active;
+    property RequestTimeout;
+    property AutoReconnect;
+    property ReconnectDelay;
+    property OnDisconnected;
+    property OnConnected;
+    property StoreActive;
+    property MaxPackageSize;
+    property AckWaitTimeout;
+  	property SynchronizeEvents;
+    property ConnectionWaitTimeout;
+  published
+    property SynchronizedProbing;
+    property OnSendStream;
+    property OnReceiveStream;
+    property ServerLocators;
+    property DispatchOptions;
+    property OnServerLocatorAssignment;
+    property ProbeServers;
+    property ProbeFrequency;
+    property SkipAck;    
+    property OnBeforeProbingServers;
+    property OnAfterProbingServers;
+    property OnBeforeProbingServer;
+    property OnAfterProbingServer;
+    property OnLoginNeeded;
+  end;
+
+  TROSynapseSCClientWorker = class(TROSynSuperChannelWorker)
+  private
+    fOwner: TROSynapseCustomSuperTCPChannel;
+    fSkipReconnect: Boolean;
+  protected
+    procedure Connected; override;
+    procedure Disconnected(var RestartLoop: Boolean); override;
+    procedure IncomingData(Id: Integer; aData: TStream); override;
+    procedure Idle; override;
+    procedure SetAckDetails(Id: Integer; Oke: Boolean; ErrorNo: Integer); override;
+  public
+    constructor Create(aOwner: TROSynapseCustomSuperTCPChannel; aConnection: TTCPBlockSocket);
+    property Owner: TROSynapseCustomSuperTCPChannel read fOwner;
+  end;
+
+implementation
+
+type
+  TROSynapseClientThread = class(TROInitializedThread)
+  private
+    fChannel: TROSynapseSCClientWorker;
+    fConnecting: Boolean;
+  protected
+    procedure Execute; override;
+  public
+    constructor Create(aChannel: TROSynapseSCClientWorker);
+    property Connecting: Boolean read fConnecting;
+  end;
+
+{ TROSynapseCustomSuperTCPChannel }
+
+procedure TROSynapseCustomSuperTCPChannel.BeforeDispatch(aMessage: IROMessage);
+begin
+  inherited;
+  if not fActive then
+  begin
+    SetActive(true);
+  end;
+  fReconnectEvent.SetEvent;
+  if  fConnectEvent.WaitFor(fConnectionWaitTimeout) <> wrSignaled then raise EROException.Create('No connection available');
+  if aMessage <> nil then
+    aMessage.ClientID := fClient.ClientId;
+end;
+
+function TROSynapseCustomSuperTCPChannel.CheckStatus(
+  const iMessageID: String): Boolean;
+var
+  i, id: Integer;
+  lList: TList;
+  lReq: TROSynapseWaitingRequest;
+begin
+  Result := False;
+  id := StrToInt(iMessageID);
+  lList := fWaitingRequests.LockList;
+  try
+    for i := lList.Count -1 downto 0 do begin
+      lReq := TROSynapseWaitingRequest(lList[i]);
+      if Lreq.Id = id then
+      begin
+        Result := (lReq.Resultdata <> nil) or (lReq.ResultErrorCode <> -1);
+        exit;
+      end;
+    end;
+  finally
+    fWaitingRequests.UnlockList;
+  end;
+end;
+
+constructor TROSynapseCustomSuperTCPChannel.Create(aOwner: TComponent);
+begin
+  inherited Create(aOwner);
+  fConnectEvent := TROEvent.create(nil, true, false, '');
+  fReconnectEvent := TROEvent.Create(nil, true, false, '');
+
+  fPingSecs := 60;
+  fWaitingRequests := TThreadList.Create;
+  fHost := 'localhost';
+  fPort := 8095;
+  fConnection := TTCPBlockSocket.Create;
+  fClient := TROSynapseSCClientWorker.Create(Self, fConnection);
+  fRequestTimeout := 60000;
+  fAckWaitTimeout := 10000;
+  fReconnectDelay := 500;
+  fConnectionWaitTimeout := 10000;
+  fStoreActive := True;
+  ThreadSafe := True;
+end;
+
+
+destructor TROSynapseCustomSuperTCPChannel.Destroy;
+var
+  fw: TROSynapseClientThread;
+begin
+  if (fWorkerThread <> nil) then begin
+    fActive := False;
+    fw := TROSynapseClientThread(fWorkerThread);
+    fWorkerThread := nil;
+    fClient.Disconnect;
+    fw.Terminate;
+    fReconnectEvent.SetEvent;
+    fw.WaitFor;
+    FreeAndNil(fw);
+  end;
+  fClient.Free;
+  fConnection.Free;
+  fWaitingRequests.Free;
+  fConnectEvent.Free;
+  if fOwnsEventThreadPool then
+  begin
+    fEventThreadPool.Free;
+  end;
+  fEventReceiver := nil;
+  fReconnectEvent.Free;
+  inherited Destroy;
+end;
+
+function TROSynapseCustomSuperTCPChannel.GetClientAddress: String;
+begin
+  Result := fConnection.GetRemoteSinIP;
+end;
+
+function TROSynapseCustomSuperTCPChannel.GetClientID: TGUID;
+begin
+  Result := fClient.ClientID;
+end;
+
+function TROSynapseCustomSuperTCPChannel.GetConnected: Boolean;
+begin
+  result := fClient.IsConnected;
+end;
+
+function TROSynapseCustomSuperTCPChannel.GetMaxPackageSize: Longint;
+begin
+  result := fClient.MaxPackageSize;
+end;
+
+function TROSynapseCustomSuperTCPChannel.GetSkipAck: Boolean;
+begin
+  result := fClient.SkipAck;
+end;
+
+function TROSynapseCustomSuperTCPChannel.GetTransportObject: TObject;
+begin
+  Result := self;
+end;
+
+procedure TROSynapseCustomSuperTCPChannel.HasData(Id: Integer; aData: TStream);
+var
+  lList: TList;
+  i: Integer;
+  lReq: TROSynapseWaitingRequest;
+  lEvent: TROSynapsePooledEvent;
+  lEventIntf: IROThreadPoolCallback;
+begin
+  if Id < 0 then // got an event
+  begin
+    if fEventThreadPool = nil then raise EROException.Create('No thread pool assigned');
+    lEvent := TROSynapsePooledEvent.Create(aData, Self);
+    lEventIntf := lEvent;
+    try
+        fEventThreadPool.QueueItem(lEventIntf);
+    except
+      lEvent.fData := nil;
+      raise;
+    end;
+  end else
+  begin
+    lList := fWaitingRequests.LockList;
+    try
+      lReq := nil;
+      for i := lList.Count -1 downto 0 do
+      begin
+        if TROSynapseWaitingRequest(lList[i]).Id = Id then
+        begin
+          lReq := TROSynapseWaitingRequest(lList[i]);
+          break;
+        end;
+      end;
+      if lReq = nil then
+      begin
+        // Don't want a response
+        aData.Free;
+        exit;
+      end;
+      lReq.Resultdata := aData;
+      lReq.Event.SetEvent;
+    finally
+      fWaitingRequests.UnlockList;
+    end;
+  end;
+end;
+
+function TROSynapseCustomSuperTCPChannel.InDestroyingState: Boolean;
+begin
+  Result:= csDestroying in ComponentState;
+end;
+
+procedure TROSynapseCustomSuperTCPChannel.IntDispatch(aRequest,
+  aResponse: TStream);
+var
+  lId: Integer;
+  lReq: TROSynapseWaitingRequest;
+begin
+//  if (not fActive) then raise EROException.Create('Not connected');
+  lId := fClient.GenerateId;
+  lReq := TROSynapseWaitingRequest.Create(lId);
+  try
+    fWaitingRequests.Add(lReq);
+    try
+      TROSynapseSCClientWorker.WaitForAck(fClient.SendPackage(aRequest, lId), fAckWaitTimeout);
+      lReq.Event.WaitFor(fRequestTimeout);
+    finally
+      fWaitingRequests.Remove(lReq);
+    end;
+    if lReq.Resultdata = nil then begin
+      case lReq.fResultErrorCode of
+        ScCmdNoAck_MsgTooLarge: raise EROException.Create('Message from server too large');
+        ScCmdNoAck_QueueFull: raise EROException.Create('Server queue full');
+        else raise EROSynapseTimeout.Create('Timeout waiting for response');
+      end;
+    end;
+    lReq.Resultdata.Seek(0, soFromBeginning);
+    aResponse.CopyFrom(lReq.Resultdata, lReq.Resultdata.Size);
+  finally
+    lReq.Free;
+  end;
+end;
+
+procedure TROSynapseCustomSuperTCPChannel.IntSetServerLocator(
+  aServerLocator: TROServerLocator);
+begin
+  Host := aServerLocator.Host;
+  Port := aServerLocator.Port;
+end;
+
+function TROSynapseCustomSuperTCPChannel.InvokeRequest(aRequest: TStream;
+  aGetResponse: Boolean; aEvent: TROEvent): String;
+var
+  lId: Integer;
+  lReq: TROSynapseWaitingRequest;
+begin
+  lId := fClient.GenerateId;
+  if aGetResponse then begin
+    if aEvent = nil then
+      lReq := TROSynapseWaitingRequest.Create(lId)
+    else
+      lReq := TROSynapseWaitingRequest.Create(lId, aEvent);
+
+    fWaitingRequests.Add(lReq);
+  end;
+  fClient.SendPackage(aRequest, lId);
+  Result := IntToStr(lId);
+  aRequest.Free; // needs to be freed here
+end;
+
+function TROSynapseCustomSuperTCPChannel.InvokeRequest(aRequest: TStream;
+  iGetResponse: boolean): string;
+begin
+  Result := InvokeRequest(aRequest, iGetResponse, nil);
+end;
+
+procedure TROSynapseCustomSuperTCPChannel.Loaded;
+begin
+  inherited;
+  if fActive then
+  begin
+    fActive := false;
+    SetActive(true);
+  end;
+end;
+
+procedure TROSynapseCustomSuperTCPChannel.Notification(AComponent: TComponent;
+  Operation: TOperation);
+var
+  dummy: IROEventReceiver;
+begin
+  if (Operation = opRemove) then
+  begin
+    if (AComponent = fEventThreadPool) then
+      fEventThreadPool := nil;
+    if Supports(aComponent, IROEventReceiver, dummy) and (dummy = fEventReceiver) then
+      fEventReceiver := nil;
+  end;
+  inherited;
+end;
+
+procedure TROSynapseCustomSuperTCPChannel.RegisterEventReceiver(
+  aReceiver: IROEventReceiver);
+begin
+  if assigned(fEventReceiver) then
+    TComponent(fEventReceiver.GetObject).RemoveFreeNotification(Self);
+  fEventReceiver := aReceiver;
+  if assigned(fEventReceiver) then
+    TComponent(fEventReceiver.GetObject).FreeNotification(Self);
+end;
+
+procedure TROSynapseCustomSuperTCPChannel.RetrieveResponse(
+  const iMessageID: String; aResponse: TStream);
+var
+  i, id: Integer;
+  lList: TList;
+  lReq: TROSynapseWaitingRequest;
+
+begin
+  id := STrToInt(iMessageID);
+  lList := fWaitingRequests.LockList;
+  try
+    lReq := nil;
+    for i := lList.Count -1 downto 0 do begin
+      lReq := TROSynapseWaitingRequest(lList[i]);
+      if Lreq.Id = id then
+        break
+      else lReq := nil;
+    end;
+  finally
+    fWaitingRequests.UnlockList;
+  end;
+  if lReq = nil then
+    raise EROSynapseTimeout.Create('Unknown response id '+iMessageID);
+
+  try
+    if lReq.fEvent <> nil then
+      lReq.fEvent.WaitFor(fRequestTimeout);
+    if lReq.fResultData = nil then begin
+      case lReq.ResultErrorCode of
+        ScCmdNoAck_MsgTooLarge: raise EROException.Create('Message from server too large');
+        ScCmdNoAck_QueueFull: raise EROException.Create('Server queue full');
+        else raise EROSynapseTimeout.Create('Timeout waiting for response');
+      end;
+    end;
+    lREq.Resultdata.Seek(0, soFromBeginning);
+  {$IFDEF RemObjects_UseEncryption}
+    if Encryption.EncryptionMethod <> tetNone then
+      DoDecryption(lReq.Resultdata, aResponse)
+    else
+  {$ENDIF}
+      aResponse.CopyFrom(lReq.Resultdata, lReq.Resultdata.Size);
+    aResponse.Seek(0, soFromBeginning);
+  finally
+    fWaitingRequests.Remove(lReq);
+    lReq.Free;
+  end;
+end;
+
+procedure TROSynapseCustomSuperTCPChannel.SetActive(const Value: Boolean);
+var
+  fw: TThread;
+begin
+  if (fActive = value) then begin
+    if not fActive or (fState <> scNotConnected) then
+      Exit;
+  end;
+  fActive := value;
+  if ComponentState * [csLoading] = [] then
+  begin
+    if (fWorkerThread <> nil) then
+    begin
+      fw := fWorkerThread;
+      fWorkerThread := nil;
+      fClient.Disconnect;
+      TROSynapseClientThread(fw).Terminate;
+      fReconnectEvent.SetEvent; 
+      fw.WaitFor;
+      FreeAndNil(fw);
+      fState := scNotConnected;
+    end;
+    if fEventThreadPool = nil then
+    begin
+      EventThreadPool := TROThreadPool.Create(nil);
+      fOwnsEventThreadPool := true;
+    end;
+    if fActive then
+    begin
+      fReconnectEvent.SetEvent;
+      fConnectEvent.ResetEvent;
+      fState := scConnecting;
+      fWorkerThread := TROSynapseClientThread.Create(fClient);
+    end;
+  end;
+end;
+
+procedure TROSynapseCustomSuperTCPChannel.SetClientID(const Value: TGUID);
+begin
+  fClient.ClientID := Value;
+end;
+
+procedure TROSynapseCustomSuperTCPChannel.SetEventThreadPool(
+  const Value: TROThreadPool);
+begin
+  if fOwnsEventThreadPool then
+  begin
+    fEventThreadPool.Free;
+    fOwnsEventThreadPool := false;
+  end;
+  fEventThreadPool := Value;
+end;
+
+procedure TROSynapseCustomSuperTCPChannel.SetHost(const Value: string);
+begin
+  if fActive and (csLoading in ComponentState) then
+    raise Exception.Create('Client is active');
+  fHost := value;
+end;
+
+procedure TROSynapseCustomSuperTCPChannel.SetMaxPackageSize(val: Integer);
+begin
+  fClient.MaxPackageSize := Val;
+end;
+
+procedure TROSynapseCustomSuperTCPChannel.SetPingSecs(const Value: Integer);
+begin
+  if (Value < 10) or (Value > 60) then raise Exception.Create('PingSecs has to be between 10 and 60');
+  fPingSecs := Value;
+end;
+
+procedure TROSynapseCustomSuperTCPChannel.SetPort(const Value: Integer);
+begin
+  if fActive and (csLoading in ComponentState) then
+    raise Exception.Create('Client is active');
+  fPort := Value;
+end;
+
+procedure TROSynapseCustomSuperTCPChannel.SetSkipAck(const Value: Boolean);
+begin
+  fClient.SkipAck := Value;
+end;
+
+procedure TROSynapseCustomSuperTCPChannel.UnregisterEventReceiver(
+  aReceiver: IROEventReceiver);
+begin
+  if assigned(fEventReceiver) then
+    TComponent(fEventReceiver.GetObject).RemoveFreeNotification(Self);
+  if aReceiver <> nil then fEventReceiver := nil else //for preventing warnings in FPC
+  fEventReceiver := nil;
+end;
+
+type
+  TROSBEventTrigger = class(TInterfacedObject, IROThreadPoolCallback)
+  private
+    fEvent: TNotifyEvent;
+    fSender: TObject;
+    procedure Execute;
+  public
+    constructor Create(aSender: TObject; aEvent: TNotifyEvent);
+    procedure Callback(Caller: TROThreadPool; aThread: TThread);
+  end;
+
+procedure TROSynapseCustomSuperTCPChannel.WaitForActive(const Timeout: Integer);
+begin
+  SetActive(true);
+  if fConnectEvent.WaitFor(Timeout) <> wrSignaled then raise EROException.Create('No connection available');
+end;
+
+{ TROSynapseSCClientWorker }
+
+procedure TROSynapseSCClientWorker.Connected;
+begin
+  inherited;
+  fOwner.fState := scConnected;
+  fOwner.fConnectEvent.SetEvent;
+  if assigned(fOwner.fOnConnected) then begin
+    if fOwner.fSynchronizeEvents then
+      fOwner.fEventThreadPool.QueueItem(TROSBEventTrigger.Create(fOwner, fOwner.fOnconnected))
+    else
+      fOwner.fOnconnected(fOwner);
+  end;
+end;
+
+constructor TROSynapseSCClientWorker.Create(aOwner: TROSynapseCustomSuperTCPChannel;
+  aConnection: TTCPBlockSocket);
+begin
+  fOwner := aOwner;
+  inherited Create(aConnection);
+  PingFrequency := fOwner.fPingSecs;
+  PingTimeout := PingFrequency * 15 div 10;
+end;
+
+procedure TROSynapseSCClientWorker.Disconnected(var RestartLoop: Boolean);
+// restartloop is false by default
+begin
+  inherited;
+
+  try
+    fOwner.fConnection.CloseSocket;
+  except
+  end;
+  if assigned(fOwner.fOnDisconnected) then begin
+    if fOwner.fSynchronizeEvents then
+      fOwner.fEventThreadPool.QueueItem(TROSBEventTrigger.Create(fOwner, fOwner.fOnDisconnected))
+    else
+      fOwner.fOnDisconnected(fOwner);
+  end;
+  if fOwner.fActive and fOwner.fAutoReconnect and not fOwner.InDestroyingState and not fSkipReconnect then
+    fOwner.fState := scReconnecting
+  else begin
+    fOwner.fState := scNotConnected;
+    fOwner.fActive := false;
+    fOwner.fConnectEvent.ResetEvent;
+    exit;
+  end;
+
+  fOwner.fReconnectEvent.ResetEvent;
+  fOwner.fConnectEvent.ResetEvent;
+  while fOwner.fActive and fOwner.fAutoReconnect and not fOwner.InDestroyingState and not fSkipReconnect do
+  begin
+    fOwner.fReconnectEvent.WaitFor(fOwner.fReconnectDelay); // don't want to create a tight loop
+    try
+      fOwner.fReconnectEvent.ResetEvent;
+
+      fOwner.fConnection.Connect(fOwner.Host, inttostr(fOwner.fPort));
+      RestartLoop := True;
+      Break;
+    except
+      // we failed, retry in a few
+    end;
+  end;
+  if RestartLoop then
+    fOwner.fState := scConnecting
+  else begin
+    fowner.fState := scNotConnected;
+    fOwner.fActive := false;
+    fOwner.fConnectEvent.ResetEvent;
+  end;
+end;
+
+procedure TROSynapseSCClientWorker.Idle;
+begin
+  IF fOwner.IdleTimeoutMinutes > 0 then begin
+    if Now > LastData + ((1.0 / 24 / 60) * fOwner.IdleTimeoutMinutes) then begin
+      Disconnect;
+      fSkipReconnect := true;
+    end;
+  end;
+
+end;
+
+procedure TROSynapseSCClientWorker.IncomingData(Id: Integer; aData: TStream);
+begin
+  fOwner.HasData(id, aData);
+end;
+
+procedure TROSynapseSCClientWorker.SetAckDetails(Id: Integer; Oke: Boolean;
+  ErrorNo: Integer);
+var
+  lList: TList;
+  i: Integer;
+  lReq: TROSynapseWaitingRequest;
+begin
+  if Oke then begin
+    inherited;
+    exit;
+  end;
+  lList := FOwner.fWaitingRequests.LockList;
+  try
+    lReq := nil;
+    for i := lList.Count -1 downto 0 do
+    begin
+      if TROSynapseWaitingRequest(lList[i]).Id = Id then
+      begin
+        lReq := TROSynapseWaitingRequest(lList[i]);
+        break;
+      end;
+    end;
+    if lReq = nil then
+      inherited
+    else begin
+      lReq.fResultErrorCode := ErrorNo;
+      lReq.Event.SetEvent;
+    end;
+  finally
+    fOwner.fWaitingRequests.UnlockList;
+  end;
+end;
+
+{ TROSynapseClientThread }
+
+constructor TROSynapseClientThread.Create(aChannel: TROSynapseSCClientWorker);
+begin
+  inherited Create(True);
+  fChannel := aChannel;
+  FreeOnTerminate := false;
+  Resume;
+end;
+
+procedure TROSynapseClientThread.Execute;
+var
+  lRet: Boolean;
+begin
+  fChannel.fOwner.fReconnectEvent.ResetEvent;
+  lRet := true;
+  fConnecting := True;
+  while lRet do begin
+    lRet := false;
+    try
+      fChannel.Connection.Connect(fChannel.fOwner.fHost, inttostr(fChannel.fOwner.fPort));
+    except
+      on e: Exception do begin
+        if fChannel.Owner.AutoReconnect and not fChannel.fOwner.InDestroyingState then begin
+           lRet := true;
+           fChannel.fOwner.fReconnectEvent.WaitFor(fChannel.fOwner.fReconnectDelay);
+           fChannel.fOwner.fReconnectEvent.ResetEvent;
+        end;
+        if assigned(fChannel.Owner.OnException) then fChannel.Owner.OnException(fChannel.Owner, e, lRet);
+        if not lRet then begin
+          fConnecting := False;
+          exit;
+        end;
+      end;
+    end;
+  end;
+  fChannel.DoExecute;
+end;
+
+{ TROSynapseWaitingRequest }
+
+constructor TROSynapseWaitingRequest.Create(Id: Integer);
+begin
+  inherited Create;
+  fId := Id;
+  fEvent := TROEvent.Create(nil, true, false, '');
+  fFreeEvent := True;
+  fResultErrorCode := -1;
+end;
+
+constructor TROSynapseWaitingRequest.Create(Id: Integer; Ev: TROEvent);
+begin
+  inherited Create;
+  fId := Id;
+  fEvent := ev;
+  fResultErrorCode := -1;
+end;
+
+destructor TROSynapseWaitingRequest.Destroy;
+begin
+  fResultData.Free;
+  if fFreeEvent then
+    fEvent.Free;
+  inherited Destroy;
+end;
+
+{ TROSynapsePooledEvent }
+
+procedure TROSynapsePooledEvent.Callback(Caller: TROThreadPool; Thread: TThread);
+begin
+  if fOwner.fEventReceiver <> nil then
+  begin
+    if caller <> nil then fOwner.fEventReceiver.Dispatch(fData, Thread) else // for preventing warning in FPC
+    fOwner.fEventReceiver.Dispatch(fData, Thread);
+  end;
+end;
+
+constructor TROSynapsePooledEvent.Create(aData: TStream;
+  aOwner: TROSynapseCustomSuperTCPChannel);
+begin
+  inherited Create;
+  fOwner := aOwner;
+  fData := aData;
+end;
+
+destructor TROSynapsePooledEvent.Destroy;
+begin
+  fData.Free;
+  inherited Destroy;
+end;
+
+{ TROSBEventTrigger }
+
+procedure TROSBEventTrigger.Callback(Caller: TROThreadPool;
+  aThread: TThread);
+begin
+  try
+    if Caller <> nil then TROSynapseClientThread(aThread).Synchronize(Execute) else // for preventing warning in FPC
+    TROSynapseClientThread(aThread).Synchronize(Execute);
+  except
+    // exceptions cannot pass back to the pool
+  end;
+end;
+
+constructor TROSBEventTrigger.Create(aSender: TObject;
+  aEvent: TNotifyEvent);
+begin
+  inherited Create;
+  fSender := aSender;
+  fEvent := aEvent;
+end;
+
+procedure TROSBEventTrigger.Execute;
+begin
+  if assigned(fEvent) then
+    fEvent(fSender);
+end;
+
+initialization
+  RegisterTransportChannelClass(TROSynapseSuperTCPChannel);
+
+finalization
+  UnRegisterTransportChannelClass(TROSynapseSuperTCPChannel);
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSynapseSuperTCPServer.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSynapseSuperTCPServer.pas
new file mode 100644
index 0000000..1142165
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROSynapseSuperTCPServer.pas	
@@ -0,0 +1,568 @@
+unit uROSynapseSuperTCPServer;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Indy Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+uses
+  SysUtils, Classes, uROClasses, uROClient, uROClientIntf, uROServerIntf,
+  uROSessions, blcksock, uROServer{$IFDEF MSWINDOWS}, Windows{$ENDIF}, uROSynapseSCHelpers,
+  uROThreadPool, uROEventRepository, uROSynapseServerSocket;
+
+type
+  TROSynapseSCServerWorker = class;
+  TROSynapseConnectionEvent = procedure (aChannel: IROTransport; const aGuid: TGuid) of object;
+  TROSynapseCustomSuperTcpServer = class(TROServer)
+  private
+    fIndyServer: TROSynapseServerSocket;
+    fActive: Boolean;
+    fPort: Integer;
+    fAckWaitTimeout: Integer;
+    fMaxPackageSize: Integer;
+    fGuidToClientMap: TStringList;
+    fClients: TThreadList;
+    fOwnsThreadPool: Boolean;
+    fThreadPool: TROThreadPool;
+    fSkipAck: Boolean;
+    fEventRepository: TROEventRepository;
+    fBlockingEvents: Boolean;
+    fOnClientConnected: TROSynapseConnectionEvent;
+    fOnClientDisconnected: TROSynapseConnectionEvent;
+    fAutoRegisterSession: Boolean;
+    procedure IntExecute(Sender: TObject; aSock: TTCPBlockSocket);
+    procedure SetPort(const Value: Integer);
+    procedure SetThreadPool(const Value: TROThreadPool);
+  protected
+    function IntGetActive: Boolean; override;
+    procedure IntSetActive(const Value: Boolean); override;
+
+    procedure Loaded; override;
+    procedure HasData(Id: Integer; aClient: TROSynapseSCServerWorker; aData: TStream);
+
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+    procedure DispatchEvent(anEventDataItem : TROEventData; aSessionReference : TGUID; aSender: TObject);
+  public
+    constructor Create(aOwner: TComponent); override;
+    destructor Destroy; override;
+
+    property Port: Integer read fPort write SetPort default 8095;
+    property AckWaitTimeout: Integer read fAckWaitTimeout write fAckWaitTimeout default 10000;
+    property MaxPackageSize: Integer read fMaxPackageSize write fMaxPackageSize default 10*1024*1024;
+    property SkipAck: Boolean read fSkipAck write fSkipAck default false;
+
+    property Server: TROSynapseServerSocket read fIndyServer;
+    property ThreadPool: TROThreadPool read fThreadPool write SetThreadPool;
+    property EventRepository: TROEventRepository read fEventRepository write fEventRepository;
+    property BlockingEvents: Boolean read fBlockingEvents write fBlockingEvents default False;
+    property OnClientConnected: TROSynapseConnectionEvent read fOnClientConnected write fOnClientConnected;
+    property OnClientDisconnected: TROSynapseConnectionEvent read fOnClientDisconnected write fOnClientDisconnected;
+    property AutoRegisterSession: Boolean read fAutoRegisterSession write fAutoRegisterSession default true;
+  end;
+
+  TROSynapseSuperTCPServer = class(TROSynapseCustomSuperTcpServer)
+  published
+    property Port;
+    property SkipAck;
+    property AckWaitTimeout;
+    property MaxPackageSize;
+    property EventRepository;
+    property BlockingEvents;
+    property OnClientConnected;
+    property OnClientDisconnected;
+    property DefaultResponse;
+    property AutoRegisterSession;
+  end;
+
+  TROSynapseSCServerWorker = class(TROSynSuperChannelWorker, IUnknown, IROTransport,
+  IROTCPTransport, IROActiveEventServer)
+  private
+    fOwner: TROSynapseCustomSuperTcpServer;
+    fEventManager: IROSessionsChangesListener;
+    fRefCount: Integer;
+  protected
+    function QueryInterface(const IID: TGUID; out Obj): HResult; stdcall;
+    function _AddRef: Integer; stdcall;
+    function _Release: Integer; stdcall;
+    function GetClientAddress : string;
+    function GetTransportObject : TObject;
+    procedure IncomingData(Id: Integer; aData: TStream); override;
+    procedure Connected; override;
+    procedure Disconnected(var RestartLoop: Boolean); override;
+    procedure EventsRegistered(aSender : TObject; aClient: TGUID);
+    procedure DispatchEvent(anEventDataItem : TROEventData; aSessionReference : TGUID; aSender: TObject);
+    function GetDefaultResponse: string; override;
+  public
+    constructor Create(aOwner: TROSynapseCustomSuperTcpServer; aConnection: TTCPBlockSocket);
+    destructor Destroy; override;
+
+    property Owner: TROSynapseCustomSuperTcpServer read fOwner;
+  end;
+  TROSynapseInvokerQueueItem = class(TInterfacedObject, IROThreadPoolCallback)
+  private
+    fData: TStream;
+    fId: Integer;
+    fCaller: TROSynapseCustomSuperTcpServer;
+    FClient: TROSynapseSCServerWorker;
+  public
+    constructor Create(aCaller: TROSynapseCustomSuperTcpServer; aClient: TROSynapseSCServerWorker; Id: Integer; aData: TStream);
+    procedure Callback(Caller: TROThreadPool; Thread: TThread);
+    destructor Destroy; override;
+  end;
+
+implementation
+uses
+  uROTypes;
+
+{ TROSynapseCustomSuperTcpServer }
+
+constructor TROSynapseCustomSuperTcpServer.Create(aOwner: TComponent);
+begin                                                   
+  inherited Create(aOwner);
+  fClients := TThreadList.Create;
+  fPort := 8095;
+  AckWaitTimeout := 10000;
+  fMaxPackageSize := 10 * 1024 * 1024;
+  fIndyServer := TROSynapseServerSocket.Create;
+  fIndyServer.OnNewConnection := IntExecute;
+  fGuidToClientMap := TStringList.Create;
+  fGuidToClientMap.Sorted := true;
+  DefaultResponse := 'ROSC:Invalid connection string';
+  fAutoRegisterSession := True; 
+end;
+
+destructor TROSynapseCustomSuperTcpServer.Destroy;
+begin
+  Active := False;
+  fGuidToClientMap.Free;
+  fIndyServer.Active := False;
+  fIndyServer.Free;
+  fClients.Free;
+  if fOwnsThreadPool then
+    fThreadPool.Free;
+  inherited Destroy;
+end;
+
+procedure TROSynapseCustomSuperTcpServer.HasData(Id: Integer; aClient: TROSynapseSCServerWorker; aData: TStream);
+var
+  lItem: IROThreadPoolCallback;
+  lOrg: TROSynapseInvokerQueueItem;
+begin
+  lOrg := TROSynapseInvokerQueueItem.Create(Self, aClient, Id, aData);
+  lItem := lOrg;
+  try
+    fThreadPool.QueueItem(lItem);
+  except
+    aClient.SendError(Id, ScCmdNoAck_QueueFull);
+    lOrg.fData := nil; // caller will free it on exceptions
+    raise;
+  end;
+end;
+
+type
+  TSynapseSendEvent = class(TInterfacedObject, IROThreadPoolCallback)
+  private
+    fStream: TROEventData;
+    fOwner: TROSynapseCustomSuperTcpServer;
+    fWorkerOverride: IROTransport;
+    fClientGuid: TGUID;
+    fSender: TROEventRepository;
+  protected
+    procedure Callback(Caller: TROThreadPool; Thread: TThread);
+  public
+    constructor Create(aOwner: TROSynapseCustomSuperTcpServer; aClientGuid: TGUID; aSender: TROEventRepository; aData: TROEventData);
+    property WorkerOverride: IROTransport read fWorkerOverride write fWorkerOverride;
+
+    destructor Destroy; override;
+  end;
+
+procedure TROSynapseCustomSuperTcpServer.Notification(AComponent: TComponent; Operation: TOperation);
+begin
+  if (Operation = opRemove) then begin
+    if AComponent = fThreadPool then
+      fThreadPool := nil;
+    if AComponent = fEventRepository then
+      fEventRepository := nil;
+  end;
+  inherited;
+end;
+
+procedure TROSynapseCustomSuperTcpServer.DispatchEvent(anEventDataItem : TROEventData; aSessionReference : TGUID; aSender: TObject);
+var
+  i: Integer;
+  aref: IROSessionsChangesListener;
+  se: IROThreadPoolCallback;
+begin
+  fClients.LockList;
+  try
+    i := fGuidToClientMap.IndexOf(GUIDToString(aSessionReference));
+    if i = -1 then begin
+      if fEventRepository <> nil then begin
+        if Supports(fEventRepository, IROSessionsChangesListener, aref) then
+          aref.SessionsChangedNotification(aSessionReference, saRemoveActiveListener, nil);
+        fEventRepository.StoreEventData(EmptyGUID, Binary(anEventDataItem.Data), false, false, GUIDToString(aSessionReference));
+        if anEventDataItem.RemoveRef = 0 then anEventDataItem.Free;
+        exit;
+      end;
+    end;
+  finally
+    fClients.UnlockList;
+  end;
+  se := TSynapseSendEvent.Create(Self, aSessionReference, TROEventRepository(aSender), anEventDataItem);
+  if BlockingEvents then
+    se.Callback(fThreadPool, nil)
+  else
+    fThreadPool.QueueItem(se);
+end;
+
+procedure TROSynapseCustomSuperTcpServer.IntExecute(sender: TObject; aSock: TTCPBlockSocket);
+var
+  fChannel: TROSynapseSCServerWorker;
+begin
+  fChannel := TROSynapseSCServerWorker.Create(Self, aSock);
+  fChannel.MaxPackageSize:= Self.MaxPackageSize;
+  fClients.Add(fChannel);
+  try
+    fChannel.DoExecute;
+  finally
+    fClients.Remove(fChannel);
+    fChannel.Free;
+  end;
+end;
+
+function TROSynapseCustomSuperTcpServer.IntGetActive: Boolean;
+begin
+  Result := fActive;
+end;
+
+procedure TROSynapseCustomSuperTcpServer.IntSetActive(const Value: Boolean);
+begin
+  fActive := Value;
+  if ComponentState * [csDesigning, csLoading] = [] then
+  begin
+    if fThreadPool = nil then
+    begin
+      fThreadPool := TROThreadPool.Create(nil);
+      fOwnsThreadPool := true;
+    end;
+    fIndyServer.Active := false;
+    if fActive then
+    begin
+      fIndyServer.Port := fPort; 
+      fIndyServer.Active := true;
+    end;
+  end;
+end;
+
+procedure TROSynapseCustomSuperTcpServer.Loaded;
+begin
+  inherited;
+  IntSetActive(fActive);
+end;
+
+procedure TROSynapseCustomSuperTcpServer.SetPort(const Value: Integer);
+begin
+  fPort := Value;
+  if fActive then
+  begin
+    IntSetActive(False);
+    IntSetActive(True);
+  end;
+end;
+
+procedure TROSynapseCustomSuperTcpServer.SetThreadPool(const Value: TROThreadPool);
+begin
+  if fOwnsThreadPool then
+  begin
+    fOwnsThreadPool := false;
+    fThreadPool.Free;
+  end;
+  fThreadPool := Value;
+end;
+
+
+{ TROSynapseSCServerWorker }
+
+constructor TROSynapseSCServerWorker.Create(aOwner: TROSynapseCustomSuperTcpServer;
+  aConnection: TTCPBlockSocket);
+begin
+  fOwner := aOwner;
+  inherited Create(aConnection);
+  IsServer := true;
+  SkipAck := fOwner.Skipack;
+end;
+
+destructor TROSynapseSCServerWorker.Destroy;
+begin
+  while fRefCount > 0 do
+    Sleep(10); // we might have events still waiting.
+  inherited Destroy;
+end;
+
+function TROSynapseSCServerWorker.QueryInterface(const IID: TGUID; out Obj): HResult; stdcall;
+begin
+  if GetInterface(IID, Obj) then
+    Result := 0
+  else
+    Result := E_NOINTERFACE;
+end;
+
+function TROSynapseSCServerWorker._AddRef: Integer; stdcall;
+begin
+  result := InterlockedIncrement(fRefCount);
+end;
+
+function TROSynapseSCServerWorker._Release: Integer; stdcall;
+begin
+  result := InterlockedDecrement(fRefCount);
+end;
+
+function TROSynapseSCServerWorker.GetClientAddress : string;
+begin
+  Result := Connection.GetRemoteSinIP;
+end;
+
+function TROSynapseSCServerWorker.GetTransportObject : TObject;
+begin
+  Result := Self;
+end;
+
+procedure TROSynapseSCServerWorker.IncomingData(Id: Integer; aData: TStream);
+begin
+  fOwner.HasData(Id, Self, aData);
+end;
+
+procedure TROSynapseSCServerWorker.Connected;
+var
+  data, rs: Binary;
+  evd: TROEventData;
+  i, len: Longint;
+  fl: boolean;
+begin
+  Len:=0;
+  if assigned(fOwner.fOnClientConnected) then fOwner.fOnClientConnected(Self, ClientID);
+  fOwner.fClients.LockList;
+  try
+    i := fOwner.fGuidToClientMap.IndexOf(GUIDToString(ClientId));
+    if i = -1 then
+      fOwner.fGuidToClientMap.AddObject(GUIDToString(ClientId), Self)
+    else
+      fOwner.fGuidToClientMap.Objects[i] := Self;
+  finally
+    fOwner.fClients.UnlockList;
+  end;
+  if fOwner.fEventRepository <> nil then
+  begin
+    if fOwner.AutoRegisterSession then begin
+      fl := True;
+      fOwner.fEventRepository.AddSession(ClientID, Self);
+    end
+    else begin
+      fl := fOwner.fEventRepository.AddActiveListener(ClientID, Self);
+    end;
+    if fl then begin
+      rs := Binary.Create;
+      try
+        fOwner.fEventRepository.GetEventData(ClientID, rs);
+        rs.Position := 0;
+        if rs.Read(len, sizeof(len)) <> sizeof(len) then exit;
+        while true do begin
+          if rs.Read(len, sizeof(len)) <> sizeof(len) then break;
+          data := Binary.Create;
+          data.CopyFrom(rs, Len);
+          data.Position := 0;
+          evd := TROEventData.Create(data);
+          try
+            DispatchEvent(evd, ClientID, fOwner.fEventRepository);
+          finally
+            data.Free;
+          end;
+        end;
+      finally
+        rs.Free;
+      end;
+    end;
+  end;
+end;
+
+procedure TROSynapseSCServerWorker.Disconnected(var RestartLoop: Boolean);
+var
+  i: Integer;
+begin
+  if fEventManager <> nil then
+    fEventManager.SessionsChangedNotification(ClientID, saRemoveActiveListener, Self);
+  if RestartLoop then fOwner.fClients.LockList else // for preventing warnings in FPC
+  fOwner.fClients.LockList;
+  try
+    i := fOwner.fGuidToClientMap.IndexOf(GUIDToString(ClientId));
+    if i <> -1 then
+    begin
+      if fOwner.fGuidToClientMap.Objects[i] = self then
+        fOwner.fGuidToClientMap.Delete(i);
+    end;
+  finally
+    fOwner.fClients.UnlockList;
+  end;
+  if assigned(fOwner.fOnClientDisconnected) then fOwner.fOnClientDisconnected(Self, ClientID);
+end;
+
+procedure TROSynapseSCServerWorker.EventsRegistered(aSender : TObject; aClient: TGUID);
+var
+  lNew : IROSessionsChangesListener;
+begin
+  Supports(aSender, IROSessionsChangesListener, lNew);
+  if (fEventManager <> nil) and (lNew <> fEventManager) then begin
+    fEventManager.SessionsChangedNotification(aClient, saRemoveActiveListener, Self);
+  end;
+  fEventManager := lNew;
+end;
+
+procedure TROSynapseSCServerWorker.DispatchEvent(anEventDataItem : TROEventData; aSessionReference : TGUID; aSender: TObject);
+var
+  se: TSynapseSendEvent;
+begin
+  se := TSynapseSendEvent.Create(fOwner, aSessionReference, TROEventRepository(aSender), anEventDataItem);
+  se.WorkerOverride := self;
+  if fOwner.BlockingEvents then begin
+    try
+    se.Callback(fOwner.ThreadPool, nil);
+    except
+    end;
+    se.Free;
+  end else
+    fOwner.ThreadPool.QueueItem(se);
+end;
+
+
+procedure TSynapseSendEvent.Callback(Caller: TROThreadPool; Thread: TThread);
+var
+  ms: TROConstantMemoryStream;
+  i: Integer;
+  wak: IROSynapsePackageAck;
+  ass: IROActiveEventServer;
+  obj: TROSynapseSCServerWorker;
+  aRef: IROSessionsChangesListener;
+begin
+  if (Caller = nil) or (Thread = nil) then   obj := nil else // for preventing warnings in FPC
+  obj := nil;
+  ms := TROConstantMemoryStream.Create(TROConstantMemoryStream(fStream.Data));
+  try
+    try
+      fOwner.fClients.LockList;
+      try
+        i := fOwner.fGuidToClientMap.IndexOf(GUIDToString(fClientGuid));
+        if i = -1 then exit;
+        if fWorkerOverride <> nil then
+          obj := TROSynapseSCServerWorker(fWorkerOverride.GetTransportObject)
+        else
+          obj := TROSynapseSCServerWorker(fOwner.fGuidToClientMap.Objects[i]);
+        wak := obj.SendPackage(ms, 0);
+        if not Supports(obj, IROSessionsChangesListener, ass) then ass := nil;
+      finally
+        fOwner.fClients.UnlockList;
+      end;
+      TROSynapseSCServerWorker.WaitForAck(wak, fOwner.fAckWaitTimeout);
+    except
+      if fOwner.fEventRepository <> nil then begin
+        if Supports(fOwner.fEventRepository, IROSessionsChangesListener, aref) then
+          aref.SessionsChangedNotification(fClientGuid, saRemoveActiveListener, obj);
+        fOwner.fEventRepository.StoreEventData(EmptyGUID, ms, false, false, GUIDToString(fClientGuid));
+        exit;
+      end;
+    end;
+  finally
+    ms.Free;
+  end;
+end;
+
+constructor TSynapseSendEvent.Create(aOwner: TROSynapseCustomSuperTcpServer; aClientGuid: TGUID; aSender: TROEventRepository; aData: TROEventData);
+begin
+  inherited Create;
+  fStream := aData;
+  fSender := aSender;
+  fClientGuid := aClientGuid;
+  fOwner := aOwner;
+end;
+
+destructor TSynapseSendEvent.Destroy;
+begin
+  if fStream.RemoveRef = 0 then
+    fStream.Free;
+  inherited Destroy;
+end;
+
+function TROSynapseSCServerWorker.GetDefaultResponse: string;
+begin
+  Result:= FOwner.DefaultResponse;
+end;
+
+{ TROSynapseInvokerQueueItem }
+
+procedure TROSynapseInvokerQueueItem.Callback(Caller: TROThreadPool; Thread: TThread);
+var
+  lResponse: TMemoryStream;
+  l: TList;
+  lClient: IROTransport;
+begin
+  if (Thread = nil) or (Caller = nil) then lResponse := TMemoryStream.Create else // for preventing warning in FPC
+  lResponse := TMemoryStream.Create;
+  try
+    lClient := FClient;
+    try
+      fCaller.DispatchMessage(lClient, fData, lResponse);
+    finally
+      lClient := nil;
+    end;
+    lResponse.Seek(0, soFromBeginning);
+    l := fCaller.fClients.LockList;
+    try
+      if l.IndexOf(FClient) = -1 then exit;
+        FClient.BeginWriteLock;
+        InterlockedIncrement(FClient.fRefCount);
+    finally
+      fCaller.fClients.UnlockList;
+    end;
+    try
+      if lResponse.Size > FClient.MaxPackageSize then
+        FClient.SendError(fId, ScCmdNoAck_MsgTooLarge)
+      else
+        FClient.SendPackage(lResponse, fId).RemoveFromList; //  we're not going to wait
+    finally
+      InterlockedDecrement(fClient.fRefCount);
+      FClient.EndWriteLock;
+    end;
+  finally
+    lResponse.Free;
+  end;
+end;
+
+constructor TROSynapseInvokerQueueItem.Create(aCaller: TROSynapseCustomSuperTcpServer; aClient: TROSynapseSCServerWorker; Id: Integer; aData: TStream);
+begin
+  inherited Create;
+  fCaller := aCaller;
+  fId := Id;
+  fData := aData;
+  fClient := aClient;
+end;
+
+destructor TROSynapseInvokerQueueItem.Destroy;
+begin
+  fData.Free;
+  inherited Destroy;
+end;
+
+initialization
+  RegisterServerClass(TROSynapseSuperTCPServer);
+finalization
+  UnregisterServerClass(TROSynapseSuperTCPServer);
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROThread.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROThread.pas
new file mode 100644
index 0000000..de975f8
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROThread.pas	
@@ -0,0 +1,220 @@
+unit uROThread;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  {$IFDEF MSWINDOWS}Windows, {$ENDIF}
+  Classes, uROClasses;
+
+type
+  TROThread = class(TROInitializedThread)
+  private
+    {$IFDEF MSWINDOWS}
+    fName:string;
+    fFreeWaiting: TObject; // TROEvent
+    fIsTerminated: Boolean;
+    {$ENDIF MSWINDOWS}
+  protected
+    {$IFDEF MSWINDOWS}
+    procedure SetName(const iName:string);
+    property Name:string read fName;
+    procedure DoTerminate; override;
+    {$ENDIF MSWINDOWS}
+    procedure Execute; override;
+  public
+    constructor Create(iCreateSuspended:Boolean; const iName:string='');
+    procedure TerminateWaitFor; virtual;
+    {$IFDEF MSWINDOWS}
+    function WaitFor: DWord; reintroduce;
+    {$IFNDEF FPC}
+    procedure Free; reintroduce; // Windows limitation workaround
+    {$ENDIF}
+    {$ENDIF MSWINDOWS}
+  end;
+
+  TROServerCheckMessageThread = class(TROThread)
+  private
+    fActive: boolean;
+    fInterval:integer;
+    fEvent:TObject;
+    procedure SetActive(const Value: boolean);
+  private
+    fOwner:TComponent;
+  protected
+    procedure Execute; override;
+    procedure CheckForMessages; virtual; abstract;
+    property Owner:TComponent read fOwner;
+  public
+    constructor Create(aName:string; aOwner:TComponent; iInterval:integer); reintroduce;
+    destructor Destroy; override;
+    procedure TerminateWaitFor; override;
+    property Active:boolean read fActive write SetActive;
+  end;
+
+implementation
+
+uses
+  SysUtils;
+
+{$IFDEF MSWINDOWS}
+type
+  TThreadNameInfo = record
+    FType: LongWord;     // must be 0x1000
+    FName: PChar;        // pointer to name (in user address space)
+    FThreadID: LongWord; // thread ID (-1 indicates caller thread)
+    FFlags: LongWord;    // reserved for future use, must be zero
+  end;
+{$ENDIF}
+
+{ TROThread }
+
+constructor TROThread.Create(iCreateSuspended:Boolean; const iName:string='');
+begin
+  {$IFDEF MSWINDOWS}
+  fName := iName;
+  {$ENDIF MSWINDOWS}
+  inherited Create(iCreateSuspended)
+end;
+
+{$IFDEF MSWINDOWS}
+procedure TROThread.SetName(const iName:string);
+var
+  ThreadNameInfo: TThreadNameInfo;
+begin
+  if iName <> '' then begin
+    ThreadNameInfo.FType := $1000;
+    ThreadNameInfo.FName := PChar(iName);
+    ThreadNameInfo.FThreadID := $FFFFFFFF;
+    ThreadNameInfo.FFlags := 0;
+    try
+      //
+      // This exception is EXPECTED to be raised when creating a named thread in
+      // the debugger. You can safely ignore it and continue running the program.
+      //
+      RaiseException( $406D1388, 0, sizeof(ThreadNameInfo) div sizeof(LongWord), @ThreadNameInfo );
+    except
+    end;
+  end;
+end;
+{$ENDIF}
+
+procedure TROThread.Execute;
+begin
+  {$IFDEF RemObjects_SetThreadName}
+  SetName(fName);
+  {$ENDIF RemObjects_SetThreadName}
+end;
+
+procedure TROThread.TerminateWaitFor;
+begin
+  Terminate;
+  WaitFor();
+end;
+
+{$IFDEF MSWINDOWS}
+
+function TROThread.WaitFor: DWord;
+var
+  lEvent: TROEvent;
+begin
+  result := 0;
+  if fIsTerminated then exit;
+  lEvent := TROEvent.Create(nil, false, false, '');
+  try
+    fFreeWaiting := lEvent;
+    Terminate;
+    while Suspended do Resume;
+    while not Terminated do lEvent.WaitFor(500);  //lEvent.WaitFor(INFINITE);
+    sleep(10); // make sure it's actually terminated
+    fFreeWaiting := nil;
+  finally
+    lEvent.Free;
+  end;
+end;
+
+{$IFNDEF FPC}
+procedure TROThread.Free;
+begin
+  if self = nil then exit;
+  if ModuleIsLib then begin
+    // Windows doesn't return from EndThread until DllMain, so waitfor never returns either.
+    if fIsTerminated then
+      Destroy
+    else begin
+      FreeOnTerminate := true;
+      WaitFor;
+    end;
+  end else
+    Destroy;
+end;
+{$ENDIF}
+
+procedure TROThread.DoTerminate;
+begin
+  inherited;
+  fIsTerminated := true;
+  if fFreeWaiting <> nil then
+    TROEvent(fFreeWaiting).SetEvent;
+end;
+{$ENDIF MSWINDOWS}
+
+
+{ TROServerCheckMessageThread }
+
+constructor TROServerCheckMessageThread.Create(aName:string; aOwner:TComponent; iInterval:integer);
+begin
+  inherited Create(true,aName);
+  fInterval := iInterval;
+  fOwner := aOwner;
+  fEvent := TROEvent.Create(nil,false,false,'');
+  Resume;
+end;
+
+destructor TROServerCheckMessageThread.Destroy;
+begin
+  TerminateWaitFor();
+  FreeAndNil(fEvent);
+  inherited;
+end;
+
+procedure TROServerCheckMessageThread.TerminateWaitFor;
+begin
+  Resume();
+  TROEvent(fEvent).SetEvent();
+  inherited;
+end;
+
+procedure TROServerCheckMessageThread.Execute;
+begin
+  inherited;
+  while not Terminated do begin
+    if not fActive then Suspend();
+    CheckForMessages();
+    if Terminated then break;
+    TROEvent(fEvent).WaitFor(fInterval*1000); { Interval is in seocnds, we need miliseconds. }
+  end;
+end;
+
+procedure TROServerCheckMessageThread.SetActive(const Value: boolean);
+begin
+  if fActive <> Value then begin
+    fActive := Value;
+    if Active then Resume();
+  end;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROThreadPool.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROThreadPool.pas
new file mode 100644
index 0000000..c947a13
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROThreadPool.pas	
@@ -0,0 +1,300 @@
+unit uROThreadPool;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+uses
+  SysUtils, Classes, {SyncObjs,}
+  uROClasses
+  {$IFDEF MSWINDOWS}, Windows{$ENDIF}
+  {$IFNDEF MSWINDOWS}, unixtype,baseunix, pthreads{$ENDIF}
+  ;
+
+type                                                         // syncobjs
+  TROSemaphore = class;
+  TROThreadPool = class;
+
+  IROThreadPoolCallback = interface
+  ['{0F3386BB-0B6E-4070-93D5-BAA5CD287608}']
+    procedure Callback(Caller: TROThreadPool; aThread: TThread);
+  end;
+
+  TROPooledThread = class(TROInitializedThread)
+  private
+    fOwner: TROThreadPool;
+  public
+    constructor Create(aOwner: TROThreadPool);
+    destructor Destroy; override;
+
+    procedure Execute; override;
+
+    procedure Synchronize(Method: TThreadMethod); // protected
+
+    procedure Stop;
+  end;
+
+  TROThreadPool = class(TComponent)
+  private
+    fMaxThreads,
+    fMaxQueue,
+    fPoolThreads,
+    fWorkingCount,
+    fThreadCount: Integer;
+    fSemaphore: TROSemaphore;
+    fQueue: TInterfaceList;
+    fThreads: TThreadList;
+  public
+    constructor Create(AOwner: TComponent); override;
+    destructor Destroy; override;
+
+    function GetCurrQueueSize: Integer;
+
+    procedure QueueItem(Callback: IROThreadPoolCallback);
+  published
+    property MaxQueue: Integer read fMaxQueue write fMaxQueue;
+    property PoolThreads: Integer read fPoolThreads write fPoolThreads;
+    property MaxThreads: Integer read FMaxThreads write fMaxThreads;
+  end;
+
+  TROSemaphore = class
+  private
+{$IFNDEF MSWINDOWS}
+    fHandle: TSemaphore;
+    fFreed: Boolean;
+{$ENDIF}
+{$IFDEF MSWINDOWS}
+    fHandle: THandle;
+{$ENDIF}
+  public
+    constructor Create;
+    destructor Destroy; override;
+
+    procedure CloseHandle;
+
+    procedure Release(Count: Integer); overload;
+    procedure Release; overload; 
+    function WaitFor(Timeout: Cardinal): Boolean;
+  end;
+
+
+implementation
+
+{ TROPooledThread }
+
+constructor TROPooledThread.Create(aOwner: TROThreadPool);
+begin
+  inherited Create(true);
+  FreeOnTerminate := True;
+  fOwner := aOwner;
+  fOwner.fThreads.Add(Self);
+  Resume;
+end;
+
+destructor TROPooledThread.Destroy;
+begin
+  Stop;
+  fOwner.fThreads.Remove(Self);
+  inherited Destroy;
+end;
+
+procedure TROPooledThread.Execute;
+var
+  lCurrentItem: IROThreadPoolCallback;
+  lUnk: IUnknown;
+begin
+  FreeOnTerminate := True;
+
+  while not Terminated do begin
+    if not fOwner.fSemaphore.WaitFor(Cardinal(-1)) then exit;
+    fOwner.fQueue.Lock;
+    try
+      if fOwner.fQueue.Count > 0 then begin
+        lUnk := fOwner.fQueue[0];
+        lCurrentItem := lUnk as IROThreadPoolCallback;
+        lUnk := nil; // delphi will keep a temp var in memory too long if we don't create it ourselves
+        fOwner.fQueue.Delete(0);
+      end
+      else
+        lCurrentItem := nil;
+    finally
+      fOwner.fQueue.Unlock;
+    end;
+
+    if lCurrentItem <> nil then begin
+      InterlockedIncrement(fOwner.fWorkingCount);
+      try
+        lCurrentItem.Callback(fOwner, Self);
+      except
+        // we cannot let exceptions escape
+      end;
+      InterlockedDecrement(fOwner.fWorkingCount);
+      lCurrentItem := nil;
+    end;
+  end;
+end;
+
+procedure TROPooledThread.Stop;
+begin
+  Terminate;
+end;
+
+procedure TROPooledThread.Synchronize(Method: TThreadMethod);
+begin
+  inherited Synchronize(Method);
+end;
+
+{ TROThreadPool }
+
+constructor TROThreadPool.Create(AOwner: TComponent);
+begin
+  inherited Create(aOwner);
+  fSemaphore := TROSemaphore.Create;
+  fQueue := TInterfaceList.Create;
+  fThreads := TThreadList.Create;
+  fMaxQueue := 50;
+  fMaxThreads := 10;
+  fPoolThreads := 5;
+end;
+
+destructor TROThreadPool.Destroy;
+var
+  i: Integer;
+  lList: TList;
+begin
+  lList := fThreads.LockList;
+  try
+    for i := lList.Count -1 downto 0 do
+      TROPooledThread(lList[i]).Stop;
+    fSemaphore.Release(lList.Count +1);
+  finally
+    fThreads.UnlockList;
+  end;
+
+  while true do begin
+    lList := fThreads.LockList;
+    try
+      if lList.Count = 0 then break;
+    finally
+      fThreads.UnlockList;
+    end;
+    Sleep(integer(50));
+  end;
+
+  fSemaphore.Free;
+  fThreads.Free;
+  fQueue.Free;
+  inherited Destroy;                        
+end;
+
+function TROThreadPool.GetCurrQueueSize: Integer;
+begin
+  result := fQueue.Count;
+end;
+
+procedure TROThreadPool.QueueItem(Callback: IROThreadPoolCallback);
+var
+  lUsage: Integer;
+begin
+  fQueue.Lock;
+  try
+    lUsage := fQueue.Count + fWorkingCount + 1;
+    if lUsage >= fMaxQueue * fMaxThreads then
+      raise EROException.Create('Not enough threads available for request');
+    if fThreadCount > fPoolThreads then lUsage := lUsage div 2; // we only need
+    if (lUsage >= fThreadCount) and (fThreadCount < fMaxThreads) then begin
+      fThreadCount := fThreadCount + 1;
+      fThreads.Add(TROPooledThread.Create(self));
+    end;
+    fQueue.Add(Callback);
+    fSemaphore.Release;
+  finally
+    fQueue.Unlock;
+  end;
+end;
+
+{ TROSemaphore }
+
+procedure TROSemaphore.CloseHandle;
+begin
+{$IFDEF MSWINDOWS}
+  if fHandle <> 0 then begin
+    Windows.CloseHandle(fHandle);
+    fHandle := 0;
+  end;
+{$ENDIF}
+{$IFNDEF MSWINDOWS}
+  if fFreed then exit;
+  fFreed := true;
+  sem_destroy(fHandle);
+{$ENDIF}
+end;
+
+constructor TROSemaphore.Create;
+begin
+  inherited Create;
+{$IFNDEF MSWINDOWS}
+  sem_init(fHandle,{$IFDEF FPC}0{$ELSE}false{$ENDIF}, 0);
+{$ENDIF}
+{$IFDEF MSWINDOWS}
+  fHandle := CreateSemaphore(nil, 0, MaxInt -1, nil);
+{$ENDIF}
+end;
+
+destructor TROSemaphore.Destroy;
+begin
+  CloseHandle;
+  inherited;
+end;
+
+procedure TROSemaphore.Release(Count: Integer);
+begin
+{$IFDEF MSWINDOWS}
+  ReleaseSemaphore(fHandle, Count, nil);
+{$ENDIF}
+{$IFNDEF MSWINDOWS}
+  while Count > 0 do begin
+    Count := count -1;
+    Release;
+  end;
+{$ENDIF}
+end;
+
+procedure TROSemaphore.Release;
+begin
+{$IFDEF MSWINDOWS}
+  ReleaseSemaphore(fHandle, 1, nil);
+{$ENDIF}
+{$IFNDEF MSWINDOWS}
+  sem_Post(fHandle);
+{$ENDIF}
+end;
+
+function TROSemaphore.WaitFor(Timeout: Cardinal): Boolean;
+{$IFNDEF MSWINDOWS}
+var
+  inttimeout: Timespec;
+{$ENDIF}
+begin
+{$IFDEF MSWINDOWS}
+  result := WaitForSingleObject(fHandle, Timeout) = WAIT_OBJECT_0;
+{$ENDIF}
+{$IFNDEF MSWINDOWS}
+  inttimeout.tv_sec := fptime + (timeout div 1000);
+  inttimeout.tv_nsec := (timeout mod 1000);
+  result := sem_timedwait(fHandle, inttimeout) = 0;
+{$ENDIF}
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROTypes.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROTypes.pas
new file mode 100644
index 0000000..2e23939
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROTypes.pas	
@@ -0,0 +1,1177 @@
+unit uROTypes;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes, TypInfo, 
+  uRODL, uROClasses, SysUtils;
+
+// begin from uROClasses
+const
+  rtInteger = uROClasses.rtInteger deprecated;
+  rtDateTime = uROClasses.rtDateTime deprecated;
+  rtDouble = uROClasses.rtDouble deprecated;
+  rtCurrency = uROClasses.rtCurrency deprecated;
+  rtWidestring = uROClasses.rtWidestring deprecated;
+  rtString = uROClasses.rtString deprecated;
+  rtInt64 = uROClasses.rtInt64 deprecated;
+  rtBoolean = uROClasses.rtBoolean deprecated;
+  rtVariant = uROClasses.rtVariant deprecated;
+  rtBinary = uROClasses.rtBinary deprecated;
+  rtXML = uROClasses.rtXML deprecated;
+  rtGuid = uROClasses.rtGuid deprecated;
+  rtDecimal = uROClasses.rtDecimal deprecated;
+  rtUTF8String = uROClasses.rtUTF8String deprecated;
+  rtXsDateTime = uROClasses.rtXsDateTime deprecated;
+  rtUserDefined = uROClasses.rtUserDefined deprecated;
+
+var
+  DataTypeNames: DataTypeNames_Array deprecated; //uROClasses.DataTypeNames;
+  DataTypeRemapping :DataTypeRemapping_Array deprecated;// uROClasses.DataTypeRemapping;
+
+type
+  TRODataType = uROClasses.TRODataType;
+  TRODataTypeMapping = uROClasses.TRODataTypeMapping;
+// end from uROClasses
+
+type
+     {$IFNDEF UNICODE}
+     UnicodeString = WideString;
+     {$ENDIF}
+
+     // Utf8String is already defined in system.pas and declared as "Utf8String = string;" in d6-bds2007 and as  "Utf8String = AnsiString;" in tiburon
+     {$IFDEF CBUILDER}
+     Utf8String = UTF8String;
+     {$ENDIF}
+     Guid = type string;
+     TGuidString = Guid;
+     Decimal = type Variant;
+     TDecimalVariant = Decimal;
+
+const
+      SimpleTypes = tkProperties;
+
+      PasFlagNames : array[TRODLParamFlag] of string =
+        ('const', 'out', 'var', 'result');
+
+      BoolStr : array[boolean] of string = ('false','true');
+
+type { Forwards }
+     TROComplexType = class;
+     TROComplexTypeClass = class of TROComplexType;
+
+     { TROComplexType }
+     //TROComplexType = class(TPersistent)
+     TROComplexType = class(TCollectionItem)
+     private
+       fFieldCount : integer;
+       fFieldList : PPropList;
+
+       function GetFieldCount: integer;
+       function GetFieldInfo(Index: integer): PTypeInfo;
+       function GetFieldName(Index: integer): string;
+       function GetContentAsXml: String;
+       function GetContentAsStrings: TStrings;
+       function GetContentAsString: String;
+
+     protected
+       procedure FreeInternalProperties; virtual;
+
+     public
+       constructor Create; reintroduce; overload; virtual;
+       constructor Create(aCollection : TCollection); overload; override;
+       procedure ReadComplex(ASerializer: TObject); virtual;
+       procedure WriteComplex(ASerializer: TObject); virtual;
+
+       destructor Destroy; override;
+
+       procedure GetFieldNames(aList : TStrings);
+
+       procedure SetFieldValue(const aFieldName : string; const aValue : Variant);
+       function GetFieldValue(const aFieldName : string) : Variant;
+
+       procedure SmartAssign(Source : TPersistent; TypeKinds: TTypeKinds = SimpleTypes);
+
+       procedure AssignTo(iDest:TPersistent); override;
+       procedure Assign(iSource:TPersistent); override;
+
+       class function GetAttributeCount: Integer; virtual;
+       class function GetAttributeName(aIndex: Integer): string; virtual;
+       class function GetAttributeValue(aIndex: Integer): string; virtual;
+
+       function Clone:TROComplexType;
+
+       property FieldName[Index : integer] : string read GetFieldName;
+       property FieldInfo[Index : integer] : PTypeInfo read GetFieldInfo;
+       property FieldCount : integer read GetFieldCount;
+       property ContentAsXml : String read GetContentAsXml;
+       property ContentAsString : String read GetContentAsString;
+     end;
+
+     { TROArray }
+     TROArray = class(TROComplexType)
+     private
+       function GetContentAsXml(): String;
+       function GetContentAsStrings(): TStrings;
+
+     protected
+       function GetCount : integer; virtual; abstract;
+
+     public
+       destructor Destroy; override;
+       class function GetItemType : PTypeInfo; virtual; {$IFNDEF DELPHI10UP}abstract;{$ENDIF}
+       class function GetItemClass : TClass; virtual;
+       class function GetItemSize : integer; virtual; {$IFNDEF DELPHI10UP}abstract;{$ENDIF}
+       function GetItemRef(Index : integer) : pointer; virtual; abstract;
+       procedure SetItemRef(Index: integer; Ref : pointer); virtual;
+       procedure Resize(ElementCount : integer); virtual; abstract;
+       procedure ReadComplex(ASerializer: TObject); override;
+       procedure WriteComplex(ASerializer: TObject); override;
+       procedure Delete(Index : integer); virtual; abstract;
+       procedure Clear; virtual; abstract;
+       function Clone: TROArray;
+
+       function Search(const aPropertyName : string;
+                       const aPropertyValue : Variant;
+                       StartFrom : integer = 0;
+                       Options : TROSearchOptions = [soIgnoreCase]) : TCollectionItem;
+       function GetIndex(const aPropertyName : string;
+                         const aPropertyValue : Variant;
+                         StartFrom : integer = 0;
+                         Options : TROSearchOptions = [soIgnoreCase]) : integer; virtual;
+
+       property Count : integer read GetCount;
+       property ContentAsXml: String read GetContentAsXml;
+     end;
+     TROArrayClass = class of TROArray;
+
+
+     Binary = uROClasses.TROBinaryMemoryStream; { Alias for the TMemoryStream type }
+     TROBinaryMemoryStream = uROClasses.TROBinaryMemoryStream;
+     BinaryClass = class of Binary;
+
+     {$IFDEF DELPHI10UP}
+     EROAbstractMethodCalled = class(EROException);
+     {$ENDIF}
+    { XsDateTime }
+    XsDateTime = class(TROComplexType)
+    private
+      fDateTime: TDateTime;
+      fTimeZoneOffset: Integer;
+      function GetWriteTimeZone: Boolean;
+      procedure SetWriteTimeZone(const Value: Boolean);
+    public
+      procedure Assign(iSource: TPersistent); override;
+      procedure ReadComplex(ASerializer: TObject); override;
+      procedure WriteComplex(ASerializer: TObject); override;
+      property WriteTimeZone: Boolean read GetWriteTimeZone write SetWriteTimeZone;
+
+      constructor Create(aDateTime: TDateTime; aTimeZone: Integer = MaxInt);
+      {$IFDEF MSWINDOWS}
+      function AsLocalDateTime: TDateTime;
+      function AsUTCDateTime: TDateTime;
+      {$ENDIF}
+    published
+      property DateTime:TDateTime read fDateTime write fDateTime;
+      property TimeZoneOffset:Integer read fTimeZoneOffset write fTimeZoneOffset;
+    end;
+
+{$WARN SYMBOL_DEPRECATED OFF}
+function StrToDataType(const aString : string) : TRODataType; deprecated;
+{$WARN SYMBOL_DEPRECATED ON}
+procedure SmartAssign(aSource, aDestination : TPersistent; TypeKinds: TTypeKinds = SimpleTypes);
+
+function IsSimpleType(const aTypeName:string; aLibrary:TRODLLibrary):boolean;
+
+function IsStruct(var aTypeName : string; aLibrary : TRODLLibrary) : boolean;
+function IsArray(var aTypeName : string; aLibrary : TRODLLibrary) : boolean; overload;
+function IsArray(var aTypeName : string; aLibrary : TRODLLibrary; out oElementType:string) : boolean; overload;
+function IsEnum(var aTypeName : string; aLibrary : TRODLLibrary) : boolean;
+
+function IsImplementedAsClass(const aTypeName : string; aLibrary : TRODLLibrary) : boolean;
+function IsUserDefinedType(var aTypeName:string; aLibrary:TRODLLibrary):boolean;
+
+function GetFullyQualifiedTypeName(const aTypeName:string; aLibrary:TRODLLibrary; const iDefault:string):string;
+
+function IsInputFlag(Flag : TRODLParamFlag) : boolean;
+function IsOutputFlag(Flag : TRODLParamFlag) : boolean;
+
+procedure RegisterROClass(aComplexTypeClass : TROComplexTypeClass);
+procedure UnregisterROClass(aComplexTypeClass : TROComplexTypeClass);
+function FindROClass(const aClassName: string):  TROComplexTypeClass;
+function FindROArray(const anItemClassName: string):  TROArrayClass;
+function GetComplexTypes: TList;
+{$IFDEF MSWINDOWS}
+function GetUTCOffset: Integer;
+function LocalDateTimeToUtc(dt: TDateTime): TDateTime;
+function UtcDateTimeToLocal(dt: TDateTime): TDateTime;
+{$ENDIF}
+implementation
+
+uses
+  {$IFDEF MSWINDOWS}Windows, {$ENDIF}
+  {$IFDEF REMOBJECTS_TRIAL}
+  Forms, Dialogs,
+  {$ENDIF REMOBJECTS_TRIAL}
+  Variants, uRORes, uROSerializer;
+
+var _ComplexTypes : TList;
+
+procedure RegisterROClass(aComplexTypeClass : TROComplexTypeClass);
+var clsname: string;
+begin
+  with _ComplexTypes do
+    while (IndexOf(aComplexTypeClass)=-1) do begin
+      clsname := aComplexTypeClass.ClassName;
+
+      if GetClass(clsname) <> nil then
+        RaiseError(err_ClassAlreadyRegistered, [clsname]);
+
+      Add(aComplexTypeClass);
+    end;
+end;
+
+procedure UnregisterROClass(aComplexTypeClass : TROComplexTypeClass);
+begin
+  _ComplexTypes.Remove(aComplexTypeClass);
+end;
+
+function FindROClass(const aClassName: string): TROComplexTypeClass;
+var i: Integer;
+begin
+  result := NIL;
+
+  with _ComplexTypes do
+    for i := 0 to (Count-1) do begin
+      if (CompareText(TClass(Items[i]).ClassName, aClassName)=0) then begin
+        result := TROComplexTypeClass(Items[I]);
+        Exit;
+      end;
+    end;
+end;
+
+function FindROArray(const anItemClassName: string):  TROArrayClass;
+var i: Integer;
+    itmn, cn : string;
+begin
+  result := NIL;
+
+  with _ComplexTypes do
+    for i := 0 to (Count-1) do begin
+      cn := TROComplexTypeClass(Items[i]).ClassParent.ClassName;
+      if (cn='TROArray') then begin
+        itmn := {$IFDEF UNICODE}UTF8ToString{$ENDIF}(TROArrayClass(Items[i]).GetItemType^.Name);
+        if (CompareText(itmn, anItemClassName)=0) then begin
+          result := TROArrayClass(Items[I]);
+          Exit;
+        end;
+      end;
+  end;
+end;
+
+function GetComplexTypes: TList;
+begin
+  result := _ComplexTypes;
+end;
+
+procedure SmartAssign(aSource, aDestination : TPersistent; TypeKinds: TTypeKinds = SimpleTypes);
+var props : PPropList;
+    cnt, i : integer;
+    subsource, subdest : TPersistent;
+    lName: String;
+begin
+  cnt := GetTypeData(aSource.ClassInfo).PropCount;
+  if (cnt=0) then Exit;
+  {$IFDEF FPC}
+  Props := nil;
+  {$ENDIF}
+  GetMem(props, cnt*SizeOf(PPropInfo));
+  try
+    cnt := GetPropList(aSource.ClassInfo, TypeKinds, props);
+
+    for i := 0 to (cnt-1) do begin
+      with props^[i]^ do begin
+        lName := {$IFDEF UNICODE}UTF8ToString{$ENDIF}(Name);
+        if (PropType^.Kind=tkClass) then begin
+          subdest := TPersistent(GetObjectProp(aDestination, lName));
+          if (subdest=NIL) then Continue;
+
+          subsource := TPersistent(GetObjectProp(aSource, lName)); // RO properties are necessarily TPersistents
+          if (subsource<>NIL)
+            then subdest.Assign(subsource);
+        end
+        else SetPropValue(aDestination, lName, GetPropValue(aSource, lName, FALSE));
+      end;
+    end;
+  finally
+    FreeMem(props, cnt*SizeOf(PPropInfo));
+  end;
+end;
+
+{$WARN SYMBOL_DEPRECATED OFF}
+function StrToDataType(const aString : string) : TRODataType;
+begin
+  Result := uROClasses.StrToDataType(aString);
+end;
+{$WARN SYMBOL_DEPRECATED ON}
+
+function IsInputFlag(Flag : TRODLParamFlag) : boolean;
+begin
+  result := Flag in [fIn, fInOut]
+end;
+
+function IsOutputFlag(Flag : TRODLParamFlag) : boolean;
+begin
+  result := Flag in [fOut, fInOut, fResult]
+end;
+
+function IsSimpleType(const aTypeName:string; aLibrary:TRODLLibrary):boolean;
+{var dt : TRODataType;}
+begin
+  result := not IsImplementedAsClass(aTypeName,aLibrary);
+  {for dt := Low(DataTypeNames) to High(DataTypeNames) do begin
+    result := (CompareText(aTypeName, DataTypeNames[dt])=0);
+    if result then Break;
+  end;}
+end;
+
+function IsUserDefinedType(var aTypeName:string; aLibrary:TRODLLibrary):boolean;
+begin
+  result := IsStruct(aTypeName, aLibrary) or
+            IsEnum(aTypeName, aLibrary) or
+            IsArray(aTypeName, aLibrary);
+end;
+
+function GetFullyQualifiedTypeName(const aTypeName:string; aLibrary:TRODLLibrary; const iDefault:string):string;
+var i : integer;
+begin
+  for i := 0 to (aLibrary.Count-1) do
+    with aLibrary.Items[i] do
+      if (CompareText(aLibrary.Items[i].Info.Name, aTypeName)=0) then begin
+        if IsFromUsedRodl then
+          result := LocatedInRodlUse.LoadedRodlLibraryName + '_Intf.' + Info.Name
+        else
+          result := iDefault+'.'+Info.Name;
+        exit;
+      end;
+  result := iDefault+'.'+aTypeName;
+end;
+
+function IsStruct(var aTypeName : string; aLibrary : TRODLLibrary) : boolean;
+var i : integer;
+begin
+  result := FALSE;
+  for i := 0 to (aLibrary.StructCount-1) do
+    if (CompareText(aLibrary.Structs[i].Info.Name, aTypeName)=0) then begin
+      aTypeName := aLibrary.Structs[i].Info.Name;
+      result := TRUE;
+      Exit;
+    end
+end;
+
+function IsEnum(var aTypeName : string; aLibrary : TRODLLibrary) : boolean;
+var i : integer;
+begin
+  result := FALSE;
+  for i := 0 to (aLibrary.EnumCount-1) do
+    if (CompareText(aLibrary.Enums[i].Info.Name, aTypeName)=0) then begin
+      aTypeName := aLibrary.Enums[i].Info.Name;
+      result := TRUE;
+      Exit;
+    end
+end;
+
+function IsArray(var aTypeName : string; aLibrary : TRODLLibrary) : boolean;
+var i : integer;
+begin
+  result := FALSE;
+  for i := 0 to (aLibrary.ArrayCount-1) do
+    if (CompareText(aLibrary.Arrays[i].Info.Name, aTypeName)=0) then begin
+      aTypeName := aLibrary.Arrays[i].Info.Name;
+      result := TRUE;
+      Exit;
+    end
+end;
+
+function IsArray(var aTypeName : string; aLibrary : TRODLLibrary; out oElementType:string) : boolean;
+var i : integer;
+begin
+  result := FALSE;
+  for i := 0 to (aLibrary.ArrayCount-1) do
+    if (CompareText(aLibrary.Arrays[i].Info.Name, aTypeName)=0) then begin
+      oElementType := aLibrary.Arrays[i].ElementType;
+      aTypeName := aLibrary.Arrays[i].Info.Name;
+      result := TRUE;
+      Exit;
+    end
+end;
+
+
+function IsImplementedAsClass(const aTypeName:string; aLibrary:TRODLLibrary):boolean;
+var
+  lTypeName:string;
+begin
+  lTypeName := aTypeName;
+  result := (CompareText(lTypeName, uROClasses.DataTypeNames[uROClasses.rtBinary]) = 0) or //'Binary'
+            IsStruct(lTypeName, aLibrary) or
+            IsArray(lTypeName, aLibrary);
+end;
+
+{ TROComplexType }
+
+procedure TROComplexType.Assign(iSource:TPersistent);
+begin
+  if not (iSource is TROComplexType) then inherited Assign(iSource);
+{
+  if not (iSource.InheritsFrom(ClassType)) then
+    inherited Assign(iSource);
+}
+end;
+
+procedure TROComplexType.AssignTo(iDest: TPersistent);
+begin
+  inherited;
+end;
+
+function TROComplexType.Clone: TROComplexType;
+begin
+  Result := ClassType.Create() as TROComplexType;
+  Result.Assign(self);
+end;
+
+constructor TROComplexType.Create;
+begin
+{
+  inherited Create(NIL);
+  fFieldCount := -1;
+  fFieldList := NIL;
+}
+  Create(nil);  
+end;
+
+constructor TROComplexType.Create(aCollection: TCollection);
+begin
+  inherited Create(aCollection);
+  fFieldCount := -1;
+  fFieldList := NIL;
+end;
+
+destructor TROComplexType.Destroy;
+begin
+  FreeInternalProperties;
+
+  if (fFieldCount<>-1) and (fFieldList<>NIL)
+    then FreeMem(fFieldList, fFieldCount*SizeOf(PPropInfo));
+
+  inherited;
+end;
+
+procedure TROComplexType.FreeInternalProperties;
+var props : PPropList;
+    cnt, i : integer;
+    sub : TObject;
+begin
+  cnt := GetTypeData(ClassInfo).PropCount;
+  if (cnt=0) then Exit;
+  {$IFDEF FPC}
+  props := nil;
+  {$ENDIF}
+  GetMem(props, cnt*SizeOf(PPropInfo));
+  try
+    cnt := GetPropList(ClassInfo, [tkClass], props);
+
+    for i := 0 to (cnt-1) do begin
+      with props^[i]^ do
+        if (PropType^.Kind=tkClass) then begin
+          sub := GetObjectProp(Self, {$IFDEF UNICODE}UTF8ToString{$ENDIF}(Name));
+          sub.Free;
+        end;
+    end;
+  finally
+    FreeMem(props, cnt*SizeOf(PPropInfo));
+  end;
+end;
+
+function TROComplexType.GetFieldCount: integer;
+begin
+  if (fFieldCount=-1) then begin
+    fFieldCount := GetTypeData(ClassInfo).PropCount;
+    if (fFieldCount>0) then begin
+      GetMem(fFieldList, fFieldCount*SizeOf(PPropInfo));
+      GetPropList(PTypeInfo(ClassInfo), tkProperties, fFieldList);
+    end;
+  end;
+
+  result := fFieldCount;
+end;
+
+function TROComplexType.GetFieldInfo(Index: integer): PTypeInfo;
+begin
+  result := NIL;
+  if (Index<FieldCount)
+    then result := fFieldList[Index]^.PropType{$IFNDEF FPC}^{$ENDIF};
+end;
+
+function TROComplexType.GetFieldName(Index: integer): string;
+begin
+  if (Index<FieldCount) then
+    result := {$IFDEF UNICODE}UTF8ToString{$ENDIF}(fFieldList^[Index]^.Name)
+  else
+    Result := '';  
+end;
+
+// AlexK: 0001837: Contents logging for TROComplexType items
+function TROComplexType.GetContentAsStrings: TStrings;
+var
+  fieldNames: TStringList;
+  i: integer;
+  typeKind: TTypeKind;
+  subItem: TROComplexType;
+  tmpStr: TStrings;
+
+    function makeIndent(value: String): String; overload;
+  begin
+    Result := StringOfChar(' ', 2) + value;
+  end;
+
+  function makeIndent(indent: integer; value: String): String; overload;
+  begin
+    Result := StringOfChar(' ', 2*indent) + value;
+  end;
+
+  function makeIndent(value: TStrings): TStrings; overload;
+  var i: Integer;
+  begin
+    for i := 0 to value.count - 1 do
+      value[i] := makeindent(value[i]);
+    result := value;
+  end;
+
+  function makeIndent(indent: integer; value: TStrings): TStrings; overload;
+  var i: Integer;
+  begin
+    for i := 0 to value.count - 1 do
+      value[i] := makeindent(indent, value[i]);
+    result := value;
+  end;
+
+
+begin
+  result := TStringList.Create();
+  fieldNames := TStringList.Create();
+
+  Self.GetFieldNames(fieldNames);
+  try
+      result.Add(Format('structure %s', [Self.ClassName]));
+      for i := 0 to Self.FieldCount - 1 do begin
+        typeKind := Self.GetFieldInfo(i)^.Kind;
+        if typeKind <> tkClass then begin
+
+          result.Add(
+            makeIndent(
+              Format(
+                'field%d %s: %s = %s',
+                [
+                  i + 1,
+                  fieldNames[i],
+                  Self.GetFieldInfo(i)^.Name,
+                  VarToStr(Self.GetFieldValue(fieldNames[i]))
+                ]
+              )
+            )
+          );
+
+
+        end else begin
+          subItem := TROComplexType(
+            GetObjectProp(
+              Self,
+              fieldNames[i],
+              TROComplexType
+            )
+          );
+
+          if not Assigned(subItem) then continue;
+          if (subItem is TROArray) then begin
+
+            result.Add(
+              makeIndent(
+                Format(
+                  'field%d %s',
+                  [
+                    i + 1,
+                    fieldNames[i]
+                  ]
+                )
+              )
+            );
+
+            tmpStr := (subItem as TROArray).GetContentAsStrings();
+            result.AddStrings(
+              makeIndent(2, tmpStr)
+            );
+            tmpStr.Free;
+
+            result.Add(
+              makeIndent('end')
+            );
+
+
+          end else begin
+
+            result.Add(
+              makeIndent(
+                Format(
+                  'field%d %s',
+                  [
+                    i + 1,
+                    fieldNames[i]
+                  ]
+                )
+              )
+            );
+
+            tmpStr := (subItem as TROComplexType).GetContentAsStrings();
+            result.AddStrings(
+              makeIndent(2, tmpStr)
+            );
+            tmpStr.Free;
+
+            result.Add(
+              makeIndent('end')
+            );
+          end;
+        end;
+      end;
+
+      result.Add('end');// Structure
+
+  finally
+    fieldNames.Free();
+  end;
+end;
+
+function TROComplexType.GetContentAsString: String;
+var sl:TStrings;
+begin
+  sl := Self.GetContentAsStrings();
+  result :=  sl.Text;
+  sl.Free();
+end;
+
+function TROComplexType.GetContentAsXml: String;
+var
+  fieldNames: TStringList;
+  i: integer;
+  typeKind: TTypeKind;
+  subItem: TROComplexType;
+begin
+  fieldNames := TStringList.Create();
+
+  Self.GetFieldNames(fieldNames);
+  try
+      result := Format('<struct name=%s>', [Self.ClassName]);
+      for i := 0 to Self.FieldCount - 1 do begin
+        typeKind := Self.GetFieldInfo(i)^.Kind;
+        if typeKind <> tkClass then begin
+
+          result := result +
+            Format('<field name=%s type=%s>%s</field>',
+              [fieldNames[i], Self.GetFieldInfo(i)^.Name, VarToStr(Self.GetFieldValue(fieldNames[i]))]
+            );
+
+
+        end else begin
+          subItem := TROComplexType(
+            GetObjectProp(
+              Self,
+              fieldNames[i],
+              TROComplexType
+            )
+          );
+
+          if not Assigned(subItem) then continue;
+          if (subItem is TROArray) then begin
+
+            result := result +
+              Format('<field name=%s type=%s>%s</field>',
+                [
+                  fieldNames[i],
+                  Self.GetFieldInfo(i)^.Name,
+                  (subItem as TROArray).ContentAsXml
+                ]
+              );
+
+
+          end else
+
+            result := result +
+              Format('<field name=%s type=%s>%s</field>',
+                [
+                  fieldNames[i],
+                  Self.GetFieldInfo(i)^.Name,
+                  (subItem as TROComplexType).GetContentAsXml()
+                ]
+              );
+        end;
+      end;
+      result := result + '</struct>';
+
+  finally
+    fieldNames.Free();
+  end;
+end;
+
+procedure TROComplexType.GetFieldNames(aList: TStrings);
+var count:    integer;
+    data:     PTypeData;
+    i:        integer;
+    info:     PTypeInfo;
+    propList: PPropList;
+begin
+  aList.Clear;
+
+  info := ClassInfo;
+  data := GetTypeData(info);
+  {$IFDEF FPC}
+  propList := nil;
+  {$ENDIF}
+  GetMem(propList, data^.PropCount * SizeOf(PPropInfo));
+  try
+    count := GetPropList(info, tkProperties,  propList);
+
+    for i := 0 to (count-1) do aList.Add({$IFDEF UNICODE}UTF8ToString{$ENDIF}(propList^[i]^.Name));
+
+  finally
+    FreeMem(propList, data^.PropCount * SizeOf(PPropInfo));
+  end;
+end;
+
+function TROComplexType.GetFieldValue(const aFieldName: string): Variant;
+begin
+  if (aFieldName<>'') then result := GetPropValue(Self, aFieldName)
+                      else result := '';
+end;
+
+procedure TROComplexType.SetFieldValue(const aFieldName: string;
+  const aValue: Variant);
+begin
+  if (aFieldName<>'')
+    then SetPropValue(Self, aFieldName, aValue);
+end;
+
+procedure TROComplexType.SmartAssign(Source: TPersistent;
+  TypeKinds: TTypeKinds);
+begin
+  uROTypes.SmartAssign(Source, Self, TypeKinds);
+end;
+
+
+
+procedure TROComplexType.ReadComplex(ASerializer: TObject);
+begin
+  ReadObjectFromSerializer(TROSerializer(ASerializer),Self);
+end;
+
+procedure TROComplexType.WriteComplex(ASerializer: TObject);
+begin
+  WriteObjectToSerializer(TROSerializer(ASerializer),Self);
+end;
+
+class function TROComplexType.GetAttributeCount: Integer;
+begin
+  result := 0;
+end;
+
+class function TROComplexType.GetAttributeName(aIndex: Integer): string;
+begin
+  {$IFDEF FPC}
+  if aIndex = 0 then result := '' else // for preventing warning in FPC
+  {$ENDIF}
+  result := '';
+end;
+
+class function TROComplexType.GetAttributeValue(aIndex: Integer): string;
+begin
+  {$IFDEF FPC}
+  if aIndex = 0 then result := '' else // for preventing warning in FPC
+  {$ENDIF}
+  result := '';
+end;
+
+{ TROArray }
+destructor TROArray.Destroy;
+begin
+  Clear;
+
+  inherited;
+end;
+
+function TROArray.Clone: TROArray;
+begin
+  Result := ClassType.Create() as TROArray;
+  Result.Assign(self);
+end;
+
+class function TROArray.GetItemClass : TClass;
+begin
+  result := nil;
+end;
+
+{$IFDEF DELPHI10UP}
+class function TROArray.GetItemType : PTypeInfo;
+begin
+  raise EROAbstractMethodCalled.Create('Abstract method called: TROArray.GetItemType.');
+end;
+
+class function TROArray.GetItemSize : integer;
+begin
+  raise EROAbstractMethodCalled.Create('Abstract method called: TROArray.GetItemSize.');
+end;
+{$ENDIF DELPHI10UP}
+
+procedure TROArray.SetItemRef(Index: integer; Ref: pointer);
+begin
+  { NOOP. MUST be overwritten for arrays of non-simple types }
+end;
+
+function TROArray.GetIndex(const aPropertyName: string;
+  const aPropertyValue: Variant; StartFrom: integer;
+  Options: TROSearchOptions): integer;
+var i : integer;
+    val : Variant;
+    curritem : TObject;
+begin
+  result := -1;
+
+  for i := StartFrom to (Count-1) do begin
+    curritem := GetItemRef(i);
+    if (curritem=NIL) then Continue;
+
+    val := GetPropValue(curritem, aPropertyName, FALSE);
+
+    if (soIgnoreCase in Options) then begin
+      if (VarToStr(val)=VarToStr(aPropertyValue)) then begin
+        result := i;
+        Exit;
+      end;
+    end
+    else begin
+      if (val=aPropertyValue) then begin
+        result := i;
+        Exit;
+      end;
+    end;
+  end;
+end;
+
+function TROArray.GetContentAsXml(): String;
+var
+  i: integer;
+  pPtr: Pointer;
+  iTypeInfo: PTypeInfo;
+  s: String;
+begin
+
+    iTypeInfo:= Self.GetItemType;
+    result := Format('<array name=%s type=%s>', [Self.ClassName, iTypeInfo.Name]);
+    s := Self.ClassName;
+    if (s = 'StringArrayField') then begin
+    end;
+    for i:=0 to Self.Count - 1 do begin
+      pPtr:= Self.GetItemRef(i);
+      case iTypeInfo.Kind of
+        tkWString:
+          result := result + Format('<item id=%d>%s</item>', [i + 1, WideString(pPtr^)]);
+        tkInteger:
+          result := result + Format('<item id=%d>%d</item>', [i + 1, Integer(pPtr^)]);
+        tkLString:
+          result := result + Format('<item id=%d>%s</item>', [i + 1, String(pPtr^)]);
+        tkClass: begin
+          if TObject(pPtr) is TROArray then begin
+            result := result + Format('<item id=%d>%s</item>', [i + 1, TROArray(pPtr).ContentAsXml]);
+          end else begin
+            if (TObject(pPtr) is TROComplexType) then begin
+              result := result + Format('<item id=%d>%s</item>', [i + 1, (TObject(pPtr) as TROComplexType).ContentAsXml]);
+            end;
+          end;
+        end;
+        // other kind of tkxxx should be implemented
+      end;
+    end;
+    result := result + '</array>';
+end;
+
+function TROArray.GetContentAsStrings(): TStrings;
+var
+  i: integer;
+  pPtr: Pointer;
+  iTypeInfo: PTypeInfo;
+
+  function makeIndent(value: String): String; overload;
+  begin
+    Result := StringOfChar(' ', 2) + value;
+  end;
+
+  function makeIndent(indent: integer; value: String): String; overload;
+  begin
+    Result := StringOfChar(' ', 2*indent) + value;
+  end;
+
+  function makeIndent(value: TStrings): TStrings; overload;
+  var i: Integer;
+  begin
+    for i := 0 to value.count - 1 do
+      value[i] := makeindent(value[i]);
+    result := value;
+  end;
+
+  function makeIndent(indent: integer; value: TStrings): TStrings; overload;
+  var i: Integer;
+  begin
+    for i := 0 to value.count - 1 do
+      value[i] := makeindent(indent, value[i]);
+    result := value;
+  end;
+
+begin
+    result := TStringList.Create();
+    iTypeInfo:= Self.GetItemType;
+    result.Add(Format('%s:%s', [Self.ClassName, iTypeInfo.Name]));
+    for i:=0 to Self.Count - 1 do begin
+      pPtr:= Self.GetItemRef(i);
+      case iTypeInfo.Kind of
+        tkWString:
+          result.Add(makeIndent(Format('item%d=%s', [i + 1, WideString(pPtr^)])));
+
+        tkInteger:
+          result.Add(makeIndent(Format('item%d=%d', [i + 1, Integer(pPtr^)])));
+
+        tkLString:
+          result.Add(makeIndent(Format('item%d=%s', [i + 1, String(pPtr^)])));
+
+        tkFloat:
+          result.Add(makeIndent(Format('item%d=%f', [i + 1, Double(pPtr^)])));
+
+        tkChar:
+           result.Add(makeIndent(Format('item%d=%s', [i + 1, String(pPtr^)])));
+
+        tkClass: begin
+          if TObject(pPtr) is TROArray then begin
+            result.Add(makeIndent(Format('item%d=array1', [i])));
+            result.AddStrings(makeIndent(2, TROArray(pPtr).GetContentAsStrings()));
+          end else begin
+            if (TObject(pPtr) is TROComplexType) then begin
+              result.Add(makeIndent(Format('item%d=structure1', [i])));
+              result.AddStrings(makeIndent(2,(TObject(pPtr) as TROComplexType).GetContentAsStrings()));
+            end;
+          end;
+        end;
+        // other kind of tkxxx should be implemented
+      end;
+    end;
+end;
+
+function TROArray.Search(const aPropertyName : string;
+  const aPropertyValue : Variant; StartFrom : integer = 0;
+  Options : TROSearchOptions = [soIgnoreCase]) : TCollectionItem;
+var idx : integer;
+begin
+  idx := GetIndex(aPropertyName, aPropertyValue, StartFrom, Options);
+  if (idx>=0)
+    then result := GetItemRef(idx)
+    else result := NIL;
+end;
+
+
+procedure TROArray.ReadComplex(ASerializer: TObject);
+var
+  i : integer;
+  itemref : pointer;
+begin
+  inherited;
+  if (GetItemClass<>NIL) then begin
+    for i := 0 to (Count-1) do begin
+      itemref := NIL;
+      TROSerializer(ASerializer).Read(TROSerializer(ASerializer).GetArrayElementName(GetItemType, itemref), GetItemType, itemref, i);
+      SetItemRef(i, itemref);
+    end;
+  end
+  else begin
+    for i := 0 to (Count-1) do begin
+      itemref := GetItemRef(i);
+      TROSerializer(ASerializer).Read(TROSerializer(ASerializer).GetArrayElementName(GetItemType, itemref), GetItemType, itemref^, i);
+    end;
+  end;
+end;
+
+procedure TROArray.WriteComplex(ASerializer: TObject);
+var
+  i : integer;
+  itemref : pointer;
+begin
+  inherited;
+  if (GetItemClass<>NIL) then begin
+    for i := 0 to (Count-1) do begin
+      itemref := GetItemRef(i);
+      TROSerializer(ASerializer).Write(TROSerializer(ASerializer).GetArrayElementName(GetItemType, itemref), GetItemType, itemref, i);
+    end;
+  end
+  else begin
+    for i := 0 to (Count-1) do begin
+      itemref := GetItemRef(i);
+      TROSerializer(ASerializer).Write(TROSerializer(ASerializer).GetArrayElementName(GetItemType, itemref), GetItemType, itemref^, i);
+    end;
+  end;
+end;
+
+{$IFDEF RemObjects_Trial}
+{$INCLUDE RemObjects_Trial.inc}
+{$ENDIF RemObjects_Trial}
+
+{ XsDateTime }
+
+procedure XsDateTime.Assign(iSource: TPersistent);
+var lSource: XsDateTime;
+begin
+  inherited Assign(iSource);
+  if (iSource is XsDateTime) then begin
+    lSource := XsDateTime(iSource);
+    DateTime := lSource.DateTime;
+    TimeZoneOffset := lSource.TimeZoneOffset;
+  end;
+end;
+
+procedure XsDateTime.ReadComplex(ASerializer: TObject);
+var
+  l_DateTime: TDateTime;
+  l_TimeZoneOffset: Integer;
+begin
+  if TROSerializer(ASerializer).RecordStrictOrder then begin
+    l_DateTime := DateTime;
+    TROSerializer(ASerializer).ReadDateTime('DateTime', l_DateTime);
+    DateTime := l_DateTime;
+    l_TimeZoneOffset := TimeZoneOffset;
+    TROSerializer(ASerializer).ReadInteger('TimeZoneOffset', otSLong, l_TimeZoneOffset);
+    TimeZoneOffset := l_TimeZoneOffset;
+  end
+  else begin
+    l_DateTime := DateTime;
+    TROSerializer(ASerializer).ReadDateTime('DateTime', l_DateTime);
+    DateTime := l_DateTime;
+    l_TimeZoneOffset := TimeZoneOffset;
+    TROSerializer(ASerializer).ReadInteger('TimeZoneOffset', otSLong, l_TimeZoneOffset);
+    TimeZoneOffset := l_TimeZoneOffset;
+  end;
+end;
+
+procedure XsDateTime.WriteComplex(ASerializer: TObject);
+var
+  l_DateTime: TDateTime;
+  l_TimeZoneOffset: Integer;
+begin
+  if TROSerializer(ASerializer).RecordStrictOrder then begin
+    TROSerializer(ASerializer).ChangeClass(XsDateTime);
+    l_DateTime := DateTime;
+    TROSerializer(ASerializer).WriteDateTime('DateTime', l_DateTime);
+    l_TimeZoneOffset := TimeZoneOffset;
+    TROSerializer(ASerializer).WriteInteger('TimeZoneOffset', otSLong, l_TimeZoneOffset);
+  end
+  else begin
+    l_DateTime := DateTime;
+    TROSerializer(ASerializer).WriteDateTime('DateTime', l_DateTime);
+    l_TimeZoneOffset := TimeZoneOffset;
+    TROSerializer(ASerializer).WriteInteger('TimeZoneOffset', otSLong, l_TimeZoneOffset);
+  end;
+end;
+
+constructor XsDateTime.Create(aDateTime: TDateTime; aTimeZone: Integer);
+begin
+  fDateTime := aDateTime;
+  fTimeZoneOffset := aTimeZone;
+end;
+
+{$IFDEF MSWINDOWS}
+function XsDateTime.AsLocalDateTime: TDateTime;
+begin
+  if WriteTimeZone then begin
+    result := fDateTime - ((1.0 / 1440.0) * (fTimeZoneOffset - GetUTCOffset));
+  end else
+    result := fDateTime;
+end;
+
+function XsDateTime.AsUTCDateTime: TDateTime;
+begin
+  if WriteTimeZone then begin
+    result := fDateTime - ((1.0 / 1440.0) * fTimeZoneOffset);
+  end else
+    result := fDateTime; // no way to determine the offset here
+end;
+{$ENDIF}
+
+
+function XsDateTime.GetWriteTimeZone: Boolean;
+begin
+  result := fTimeZoneOffset <> MaxInt;
+end;
+
+procedure XsDateTime.SetWriteTimeZone(const Value: Boolean);
+begin
+  if Value then begin
+    if fTimeZoneOffset = MaxInt then fTimeZoneOffset := 0;
+  end else begin
+    fTimeZoneOffset := MaxInt;
+  end;
+end;
+
+{$IFDEF MSWINDOWS}
+function GetUTCOffset: Integer;
+var
+  lInfo: TIME_ZONE_INFORMATION;
+begin
+  case GetTimeZoneInformation(lInfo) of
+    TIME_ZONE_ID_DAYLIGHT: result := lInfo.Bias + lInfo.DaylightBias;
+    TIME_ZONE_ID_STANDARD: result := lInfo.Bias + lInfo.StandardBias;
+  else
+    result := lInfo.Bias;
+  end;
+end;
+
+
+function LocalDateTimeToUtc(dt: TDateTime): TDateTime;
+begin
+  result := dt - (GetUTCOffset * (1.0 / (1440.0)));
+end;
+
+function UtcDateTimeToLocal(dt: TDateTime): TDateTime;
+begin
+  result := dt + (GetUTCOffset * (1.0 / (1440.0)));
+end;
+{$ENDIF}
+initialization
+  {$IFDEF RemObjects_Trial}
+  Check();
+  {$ENDIF RemObjects_Trial}
+  _ComplexTypes := TList.Create;
+  {$WARN SYMBOL_DEPRECATED OFF}
+  DataTypeNames:= uROClasses.DataTypeNames;
+  DataTypeRemapping :=uROClasses.DataTypeRemapping;
+  {$WARN SYMBOL_DEPRECATED ON}
+finalization
+  _ComplexTypes.Free;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROUnicodeConv.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROUnicodeConv.pas
new file mode 100644
index 0000000..59f6af2
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROUnicodeConv.pas	
@@ -0,0 +1,3666 @@
+unit uROUnicodeConv;
+
+// UnicodeConv 2.0.0
+// Unicode Converter Library 2.0.0
+// Delphi 3/4/5/6 and Kylix Implementation
+//
+// Copyright (c) 2002 by Dieter Köhler
+// ("http://www.philo.de/xml/")
+//
+// Definitions:
+// - "Package" refers to the collection of files distributed by
+//   the Copyright Holder, and derivatives of that collection of
+//   files created through textual modification.
+// - "Standard Version" refers to such a Package if it has not
+//   been modified, or has been modified in accordance with the
+//   wishes of the Copyright Holder.
+// - "Copyright Holder" is whoever is name in the copyright or
+//   copyrights for the package.
+// - "You" is you, if you're thinking about copying or distributing
+//   this Package.
+//
+// Permission is hereby granted, free of charge, to any person
+// obtaining a copy of this software and associated documentation
+// files (the "Package"), to deal in the Package without restriction,
+// including without limitation the rights to use, copy, modify,
+// merge, publish, distribute, sublicense, and/or sell copies of the
+// Package, and to permit persons to whom the Package is furnished
+// to do so, subject to the following conditions:
+//
+// The above copyright notice and this permission notice shall be
+// included in all copies or substantial portions of the Package.
+//
+// You may modify your copy of this Package in any way, provided
+// that you insert a prominent notice in each changed file stating
+// how and when you changed a file, and provided that you do at
+// least one of the following:
+//
+// a) allow the Copyright Holder to include your modifications in
+// the Standard Version of the Package.
+//
+// b) use the modified Package only within your corporation or
+// organization.
+//
+// c) rename any non standard executables, units, and classes so
+// the names do not conflict with standard executables, units, and
+// classes, and provide a separate manual page that clearly documents
+// how it differs from the standard version.
+//
+// d) make other distribution arrangements with the Copyright Holder.
+//
+// The name of the Copyright Holder may not be used to endorse or
+// promote products derived from this Package without specific prior
+// written permission.
+//
+// THE PACKAGE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+// EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+// MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
+// IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
+// CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
+// TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
+// PACKAGE OR THE USE OR OTHER DEALINGS IN THE PACKAGE.
+
+interface
+{$I RemObjects.inc}
+uses
+  SysUtils, Classes;
+
+type
+  TdomEncodingType = (etUnknown,etUTF8,etUTF16BE,etUTF16LE,etLatin1,
+                      etLatin2,etLatin3,etLatin4,etCyrillic,etArabic,
+                      etGreek,etHebrew,etLatin5,etLatin6,etLatin7,
+                      etLatin8,etLatin9,etKOI8R,etcp10000_MacRoman,
+                      etWindows1250,etWindows1251,etWindows1252);
+
+  EConversionStream = class(EStreamError);
+
+  TConversionStream = class(TStream)
+  private
+    FTarget: TStream;
+    FConvertCount: longint;
+    FConvertBufP: pointer;
+    FConvertBufSize: longint;
+  protected
+    function convertReadBuffer(const buffer; count: longint): longint; virtual;
+    function convertWriteBuffer(const buffer; count: longint): longint; virtual;
+    procedure setConvertBufSize(newSize: longint); virtual;
+  public
+    constructor Create(target: TStream);
+    destructor Destroy; override;
+    function Read(var buffer; count: longint): longint; override;
+    function Write(const buffer; count: longint): longint; override;
+    function Seek(offset: longint; origin: word): longint; override;
+    procedure FreeConvertBuffer;
+    property Target: TStream read FTarget;
+    property ConvertBufP: pointer read FConvertBufP;
+    property ConvertCount: longint read FConvertCount;
+    property ConvertBufSize: longint read FConvertBufSize;
+  end;
+
+  TUTF16BEToUTF8Stream = class(TConversionStream)
+  private
+    FExpandLF: boolean;
+  protected
+    function convertWriteBuffer(const buffer; count: longint): longint; override;
+  public
+    property expandLF: boolean read FExpandLF write FExpandLF;
+  end;
+
+function StrToEncoding(const S: String): TdomEncodingType;
+
+function SingleByteEncodingToUTF16Char(const P: AnsiChar; const Encoding: TdomEncodingType): WideChar;
+
+function Iso8859_1ToUTF16Char(const P: AnsiChar): WideChar;
+function Iso8859_2ToUTF16Char(const P: AnsiChar): WideChar;
+function Iso8859_3ToUTF16Char(const P: AnsiChar): WideChar;
+function Iso8859_4ToUTF16Char(const P: AnsiChar): WideChar;
+function Iso8859_5ToUTF16Char(const P: AnsiChar): WideChar;
+function Iso8859_6ToUTF16Char(const P: AnsiChar): WideChar;
+function Iso8859_7ToUTF16Char(const P: AnsiChar): WideChar;
+function Iso8859_8ToUTF16Char(const P: AnsiChar): WideChar;
+function Iso8859_9ToUTF16Char(const P: AnsiChar): WideChar;
+function Iso8859_10ToUTF16Char(const P: AnsiChar): WideChar;
+function Iso8859_13ToUTF16Char(const P: AnsiChar): WideChar;
+function Iso8859_14ToUTF16Char(const P: AnsiChar): WideChar;
+function Iso8859_15ToUTF16Char(const P: AnsiChar): WideChar;
+function KOI8_RToUTF16Char(const P: AnsiChar): WideChar;
+function cp10000_MacRomanToUTF16Char(const P: AnsiChar): WideChar;
+function cp1250ToUTF16Char(const P: AnsiChar): WideChar;
+function cp1251ToUTF16Char(const P: AnsiChar): WideChar;
+function cp1252ToUTF16Char(const P: AnsiChar): WideChar;
+function Iso8859_1ToUTF16Str(const S: AnsiString): wideString;
+function Iso8859_2ToUTF16Str(const S: AnsiString): wideString;
+function Iso8859_3ToUTF16Str(const S: AnsiString): wideString;
+function Iso8859_4ToUTF16Str(const S: AnsiString): wideString;
+function Iso8859_5ToUTF16Str(const S: AnsiString): wideString;
+function Iso8859_6ToUTF16Str(const S: AnsiString): wideString;
+function Iso8859_7ToUTF16Str(const S: AnsiString): wideString;
+function Iso8859_8ToUTF16Str(const S: AnsiString): wideString;
+function Iso8859_9ToUTF16Str(const S: AnsiString): wideString;
+function Iso8859_10ToUTF16Str(const S: AnsiString): wideString;
+function Iso8859_13ToUTF16Str(const S: AnsiString): wideString;
+function Iso8859_14ToUTF16Str(const S: AnsiString): wideString;
+function Iso8859_15ToUTF16Str(const S: AnsiString): wideString;
+function KOI8_RToUTF16Str(const S: AnsiString): wideString;
+function cp10000_MacRomanToUTF16Str(const S: AnsiString): wideString;
+function cp1250ToUTF16Str(const S: AnsiString): wideString;
+function cp1251ToUTF16Str(const S: AnsiString): wideString;
+function cp1252ToUTF16Str(const S: AnsiString): wideString;
+function UTF8ToUTF16BEStr(const S: AnsiString): wideString;
+function UTF16BEToUTF8Str(const ws: wideString;
+                          const expandLF: boolean): AnsiString;
+
+function UTF16To7BitASCIIChar(const P: wideChar): Ansichar;
+function UTF16ToIso8859_1Char(const P: wideChar): Ansichar;
+function UTF16To7BitASCIIStr(const S: wideString): Ansistring;
+function UTF16ToIso8859_1Str(const S: wideString): Ansistring;
+
+function UTF16HighSurrogate(const value: integer): WideChar;
+function UTF16LowSurrogate(const value: integer): WideChar;
+function UTF16SurrogateToInt(const highSurrogate, lowSurrogate: WideChar): integer;
+function IsUTF16HighSurrogate(const S: WideChar): boolean;
+function IsUTF16LowSurrogate(const S: WideChar): boolean;
+
+type
+  ECSMIBException = Exception;
+
+  TCSMIBChangingEvent = procedure (Sender: TObject;
+                                   NewEnum: integer;
+                                   var AllowChange: Boolean) of object;
+
+  TCSMIB = class (TComponent)
+  protected
+    FEnum: integer;
+    FIgnoreInvalidEnum: boolean;
+    FOnChanging: TCSMIBChangingEvent;
+    FOnChange: TNotifyEvent;
+    procedure DoChange(Sender: TObject); virtual;
+    procedure DoChanging(Sender: TObject;
+                                 NewEnum: integer;
+                                 var AllowChange: Boolean); virtual;
+    function GetPrfMIMEName: string; virtual;
+    function GetAlias(i: integer): string; virtual;
+    function GetAliasCount: integer; virtual;
+    procedure SetEnum(const Value: integer); virtual;
+    procedure SetOnChange(const Value: TNotifyEvent); virtual;
+    procedure SetOnChanging(const Value: TCSMIBChangingEvent); virtual;
+  public
+    constructor Create(AOwner: TComponent); override;
+    function IsValidEnum(const Value: integer): boolean; virtual;
+    function SetToAlias(const S: string): boolean; virtual;
+    property Alias[i: integer]: string read GetAlias;
+    property AliasCount: integer read GetAliasCount;
+    property PreferredMIMEName: string read GetPrfMIMEName;
+  published
+    property OnChange: TNotifyEvent read FOnChange write SetOnChange;
+    property OnChanging: TCSMIBChangingEvent read FOnChanging write SetOnChanging;
+    property Enum: integer read FEnum write SetEnum;
+    property IgnoreInvalidEnum: boolean read FIgnoreInvalidEnum write FIgnoreInvalidEnum;
+  end;
+
+
+{procedure Register;}
+
+implementation
+uses
+  uROClasses;
+{procedure Register;
+begin
+  RegisterComponents('XML', [TCSMIB]);
+end;}
+
+resourcestring
+  SOddSizeInvalid = 'Odd size not valid for WideString';
+  STargetNil      = 'Must have a target stream';
+
+
+// +++++++++++++++++++++++++ TConversionStream +++++++++++++++++++++++++
+//                     - Provided by Karl Waclawek -
+// This is an input/output stream for other streams.
+// Purpose: transform data as they are written to or read from a target
+//          stream.
+constructor TConversionStream.create(Target: TStream);
+begin
+  if Target = nil then raise EConversionStream.create(STargetNil);
+  inherited create;
+  FTarget := Target;
+end;
+
+destructor TConversionStream.destroy;
+begin
+  FreeMem(FConvertBufP);
+  inherited destroy;
+end;
+
+function TConversionStream.Seek(Offset: longint; Origin: Word): longint;
+begin
+  Result := 0;  // Seek makes no sense here
+end;
+
+function TConversionStream.ConvertReadBuffer(const Buffer; Count: longint): longint;
+// Performs the actual conversion of the data in Buffer (read buffer);
+// the result of the conversion must be written to ConvertBufB }
+begin
+  Result := 0; //do nothing, override in descendants
+end;
+
+function TConversionStream.ConvertWriteBuffer(const Buffer; Count: longint): longint;
+// Performs the actual conversion of the data in Buffer (write buffer);
+// the result of the conversion must be written to ConvertBufB }
+begin
+  Result := 0; //do nothing, override in descendants
+end;
+
+function TConversionStream.Read(var Buffer; Count: longint): longint;
+// Reads Count bytes from target stream into Buffer;
+// converts those bytes and stores the result in ConvertBufP;
+// ConvertCount indicates the amount of bytes converted.
+begin
+  Result := Target.Read(Buffer, Count);
+  FConvertCount := ConvertReadBuffer(Buffer, Result);
+end;
+
+function TConversionStream.Write(const Buffer; Count: longint): longint;
+// Converts Count bytes from Buffer into ConvertBufP;
+// ConvertCount indicates the amount of bytes converted;
+// if not all converted bytes could be written to the target stream,
+// then this returns the negative of the number of bytes actually written.
+begin
+  Result := Count;
+  FConvertCount := ConvertWriteBuffer(Buffer, Result);
+  Count := Target.Write(FConvertBufP^, FConvertCount);
+  //if not all converted data could be written, return the negative
+  //count of the data actually written. This avoids having Result
+  //being the same as Count by coincidence
+  if Count <> FConvertCount then Result := -Count;
+end;
+
+procedure TConversionStream.FreeConvertBuffer;
+begin
+  ReallocMem(FConvertBufP, 0);
+  FConvertBufSize := 0;
+end;
+
+procedure TConversionStream.SetConvertBufSize(NewSize: Integer);
+begin
+  ReallocMem(FConvertBufP, NewSize);
+  FConvertBufSize := NewSize;
+end;
+
+
+// ++++++++++++++++++++++++++ TUTF16BEToUTF8Stream +++++++++++++++++++++++
+function TUTF16BEToUTF8Stream.ConvertWriteBuffer(const Buffer;
+                                                       Count: Integer): longint;
+// Converts an UTF-16BE stream into an UTF-8 encoded stream
+// (and expands LF to CR+LF if its protected expandLF property
+// is 'true').
+//  - This function was provided by Ernst van der Pols -
+//  - expandLF parameter added by Dieter Köhler -
+//  - converted for stream processing by Karl Waclawek -
+type
+  TWideCharBuf = array[0..(MaxInt shr 1) - 1] of WideChar;
+var
+  InIndx, OutIndx: longint;
+  Wc: WideChar;
+  InBuf: TWideCharBuf absolute Buffer;
+
+  procedure IncBufSize(BufSize: longint);
+    var
+      Delta: longint;
+    begin
+    Inc(BufSize);
+    Delta := BufSize shr 2;
+    if Delta < 8 then Delta := 8;
+    BufSize := ((BufSize + Delta) shr 2) shl 2; //make it multiple of 4
+    setConvertBufSize(BufSize);
+    end;
+
+  procedure UCS4CodeToUTF8String(Code: longint);
+    const
+      MaxCode: array[0..5] of longint = ($7F,$7FF,$FFFF,$1FFFFF,$3FFFFFF,$7FFFFFFF);
+      FirstByte: array[0..5] of Byte = (0,$C0,$E0,$F0,$F8,$FC);
+    var
+      Mo, Indx, StartIndx: longint;
+    begin
+    Mo := 0;			// get number of bytes
+    while ((Code > MaxCode[Mo]) and (Mo < 5)) do Inc(Mo);
+    StartIndx := OutIndx;
+    OutIndx := StartIndx + Mo;
+    if OutIndx >= ConvertBufSize then IncBufSize(OutIndx);
+    for Indx := OutIndx downto StartIndx + 1 do	// fill bytes from rear end
+      begin
+      PChar(FConvertBufP)[Indx] := Char($80 or (Code and $3F));
+      Code := Code shr 6;
+      end;
+    PChar(FConvertBufP)[StartIndx] := Char(FirstByte[Mo] or Code); // fill first byte
+    end;
+
+begin
+  Result := 0;
+  if Count = 0 then Exit;
+  if Odd(Count) then raise EConversionStream.create(SOddSizeInvalid);
+  Count := Count shr 1;  //for initial size, assume all low ASCII chars
+  if Count > ConvertBufSize then setConvertBufSize(Count);
+  OutIndx := -1;	// keep track of end position
+  InIndx := 0;
+  if InBuf[0] = #$feff then Inc(InIndx);  // Test for BOM
+
+  while InIndx < Count do begin
+    Wc := InBuf[InIndx];
+    case Word(Wc) of
+      $0020..$007F,$0009,$000D:	// plain ASCII
+        begin
+        Inc(OutIndx);
+        if OutIndx >= ConvertBufSize then IncBufSize(OutIndx);
+        PChar(FConvertBufP)[OutIndx]:= Char(Wc);
+        end;
+      $000A:	// LF --> CR+LF
+        if ExpandLF then
+          begin
+          Inc(OutIndx, 2);
+          if OutIndx >= ConvertBufSize then IncBufSize(OutIndx);
+          PChar(FConvertBufP)[OutIndx - 1] := Chr(13);
+          PChar(FConvertBufP)[OutIndx] := Chr(10);
+          end
+        else
+          begin
+          Inc(OutIndx);
+          if OutIndx >= ConvertBufSize then IncBufSize(OutIndx);
+          PChar(FConvertBufP)[OutIndx] := Chr(10);
+          end;
+      $D800..$DBFF:	// high surrogate
+        begin
+        Inc(InIndx);
+        if (InIndx < (Count - 1)) and (Word(InBuf[InIndx]) >= $DC00)
+          and (Word(InBuf[InIndx]) <= $DFFF) then
+          begin
+          Inc(OutIndx);
+          UCS4CodeToUTF8String(Utf16SurrogateToInt(Wc, InBuf[InIndx]));
+          end
+        else
+          raise EConvertError.CreateFmt(
+            'High surrogate %4.4X without low surrogate.',[Word(Wc)]);
+        end;
+      $DC00..$DFFF:	// low surrogate
+        begin
+        Inc(InIndx);
+        if (InIndx < (Count - 1)) and (Word(InBuf[InIndx]) >= $D800)
+          and (Word(InBuf[InIndx]) <= $DBFF) then
+          begin
+          Inc(OutIndx);
+          UCS4CodeToUTF8String(Utf16SurrogateToInt(InBuf[InIndx], Wc));
+          end
+        else
+          raise EConvertError.CreateFmt(
+            'Low surrogate %4.4X without high surrogate.',[Word(Wc)]);
+        end;
+      $0080..$D7FF,$E000..$FFFD:
+        begin
+        Inc(OutIndx);
+        UCS4CodeToUTF8String(Word(Wc));
+        end;
+    end; {case ...}
+    Inc(InIndx);
+  end; { while ...}
+  Result := OutIndx + 1;
+end;
+
+
+// +++++++++++++++++++ encoding detection functions +++++++++++++++++++++
+
+function StrToEncoding(const S: String): TdomEncodingType;
+var
+  csmib: TCSMIB;
+begin
+  if (CompareText(S,'cp10000_MacRoman') = 0)
+    then begin result:= etcp10000_MacRoman; exit; end;
+
+  csmib:= TCSMIB.Create(nil);
+  try
+    if csmib.SetToAlias(S) then begin
+      case csmib.Enum of
+        4: result:= etLatin1;
+        5: result:= etLatin2;
+        6: result:= etLatin3;
+        7: result:= etLatin4;
+        8: result:= etCyrillic;
+        9: result:= etArabic;
+        10: result:= etGreek;
+        11: result:= etHebrew;
+        12: result:= etLatin5;
+        13: result:= etLatin6;
+        106: result:= etUTF8;
+        109: result:= etLatin7;
+        110: result:= etLatin8;
+        111: result:= etLatin9;
+        1013,1015: result:= etUTF16BE;
+        1014: result:= etUTF16LE;
+        2084: result:= etKOI8R;
+        2250: result:= etWindows1250;
+        2251: result:= etWindows1251;
+        2252: result:= etWindows1252;
+      else
+        result:= etUnknown;
+      end;
+    end else result:= etUnknown;
+  finally
+    csmib.free;
+  end;
+end;
+
+
+// ++++++++++++++++++++++ conversion functions ++++++++++++++++++++++++
+
+function SingleByteEncodingToUTF16Char(const P: AnsiChar; const Encoding: TdomEncodingType):WideChar;
+begin
+  case Encoding of
+    etLatin1:   result:= Iso8859_1ToUTF16Char(P);
+    etLatin2:   result:= Iso8859_2ToUTF16Char(P);
+    etLatin3:   result:= Iso8859_3ToUTF16Char(P);
+    etLatin4:   result:= Iso8859_4ToUTF16Char(P);
+    etCyrillic: result:= Iso8859_5ToUTF16Char(P);
+    etArabic:   result:= Iso8859_6ToUTF16Char(P);
+    etGreek:    result:= Iso8859_7ToUTF16Char(P);
+    etHebrew:   result:= Iso8859_8ToUTF16Char(P);
+    etLatin5:   result:= Iso8859_9ToUTF16Char(P);
+    etLatin6:   result:= Iso8859_10ToUTF16Char(P);
+    etLatin7:   result:= Iso8859_13ToUTF16Char(P);
+    etLatin8:   result:= Iso8859_14ToUTF16Char(P);
+    etLatin9:   result:= Iso8859_15ToUTF16Char(P);
+    etKOI8R:    result:= KOI8_RToUTF16Char(P);
+    etcp10000_MacRoman: result:= cp10000_MacRomanToUTF16Char(P);
+    etWindows1250:   result:= cp1250ToUTF16Char(P);
+    etWindows1251:   result:= cp1251ToUTF16Char(P);
+    etWindows1252:   result:= cp1252ToUTF16Char(P);
+  else
+    raise EConvertError.Create('Invalid encoding type specified');
+  end;
+end;
+
+function Iso8859_1ToUTF16Char(const P: AnsiChar):WideChar;
+begin
+  result:= WideChar(ord(P));
+end;
+
+function Iso8859_2ToUTF16Char(const P: AnsiChar):WideChar;
+begin
+  case ord(p) of
+    $a1: result:= #$0104;  // LATIN CAPITAL LETTER A WITH OGONEK
+    $a2: result:= #$02d8;  // BREVE
+    $a3: result:= #$0141;  // LATIN CAPITAL LETTER L WITH STROKE
+    $a5: result:= #$0132;  // LATIN CAPITAL LETTER L WITH CARON
+    $a6: result:= #$015a;  // LATIN CAPITAL LETTER S WITH ACUTE
+    $a9: result:= #$0160;  // LATIN CAPITAL LETTER S WITH CARON
+    $aa: result:= #$015e;  // LATIN CAPITAL LETTER S WITH CEDILLA
+    $ab: result:= #$0164;  // LATIN CAPITAL LETTER T WITH CARON
+    $ac: result:= #$0179;  // LATIN CAPITAL LETTER Z WITH ACUTE
+    $ae: result:= #$017d;  // LATIN CAPITAL LETTER Z WITH CARON
+    $af: result:= #$017b;  // LATIN CAPITAL LETTER Z WITH DOT ABOVE
+    $b1: result:= #$0105;  // LATIN SMALL LETTER A WITH OGONEK
+    $b2: result:= #$02db;  // OGONEK
+    $b3: result:= #$0142;  // LATIN SMALL LETTER L WITH STROKE
+    $b5: result:= #$013e;  // LATIN SMALL LETTER L WITH CARON
+    $b6: result:= #$015b;  // LATIN SMALL LETTER S WITH ACUTE
+    $b7: result:= #$02c7;  // CARON
+    $b9: result:= #$0161;  // LATIN SMALL LETTER S WITH CARON
+    $ba: result:= #$015f;  // LATIN SMALL LETTER S WITH CEDILLA
+    $bb: result:= #$0165;  // LATIN SMALL LETTER T WITH CARON
+    $bc: result:= #$017a;  // LATIN SMALL LETTER Z WITH ACUTE
+    $bd: result:= #$02dd;  // DOUBLE ACUTE ACCENT
+    $be: result:= #$017e;  // LATIN SMALL LETTER Z WITH CARON
+    $bf: result:= #$017c;  // LATIN SMALL LETTER Z WITH DOT ABOVE
+    $c0: result:= #$0154;  // LATIN CAPITAL LETTER R WITH ACUTE
+    $c3: result:= #$0102;  // LATIN CAPITAL LETTER A WITH BREVE
+    $c5: result:= #$0139;  // LATIN CAPITAL LETTER L WITH ACUTE
+    $c6: result:= #$0106;  // LATIN CAPITAL LETTER C WITH ACUTE
+    $c8: result:= #$010c;  // LATIN CAPITAL LETTER C WITH CARON
+    $ca: result:= #$0118;  // LATIN CAPITAL LETTER E WITH OGONEK
+    $cc: result:= #$011a;  // LATIN CAPITAL LETTER E WITH CARON
+    $cf: result:= #$010e;  // LATIN CAPITAL LETTER D WITH CARON
+    $d0: result:= #$0110;  // LATIN CAPITAL LETTER D WITH STROKE
+    $d1: result:= #$0143;  // LATIN CAPITAL LETTER N WITH ACUTE
+    $d2: result:= #$0147;  // LATIN CAPITAL LETTER N WITH CARON
+    $d5: result:= #$0150;  // LATIN CAPITAL LETTER O WITH DOUBLE ACUTE
+    $d8: result:= #$0158;  // LATIN CAPITAL LETTER R WITH CARON
+    $d9: result:= #$016e;  // LATIN CAPITAL LETTER U WITH RING ABOVE
+    $db: result:= #$0170;  // LATIN CAPITAL LETTER U WITH WITH DOUBLE ACUTE
+    $de: result:= #$0162;  // LATIN CAPITAL LETTER T WITH CEDILLA
+    $e0: result:= #$0155;  // LATIN SMALL LETTER R WITH ACUTE
+    $e3: result:= #$0103;  // LATIN SMALL LETTER A WITH BREVE
+    $e5: result:= #$013a;  // LATIN SMALL LETTER L WITH ACUTE
+    $e6: result:= #$0107;  // LATIN SMALL LETTER C WITH ACUTE
+    $e8: result:= #$010d;  // LATIN SMALL LETTER C WITH CARON
+    $ea: result:= #$0119;  // LATIN SMALL LETTER E WITH OGONEK
+    $ec: result:= #$011b;  // LATIN SMALL LETTER E WITH CARON
+    $ef: result:= #$010f;  // LATIN SMALL LETTER D WITH CARON
+    $f0: result:= #$0111;  // LATIN SMALL LETTER D WITH STROKE
+    $f1: result:= #$0144;  // LATIN SMALL LETTER N WITH ACUTE
+    $f2: result:= #$0148;  // LATIN SMALL LETTER N WITH CARON
+    $f5: result:= #$0151;  // LATIN SMALL LETTER O WITH DOUBLE ACUTE
+    $f8: result:= #$0159;  // LATIN SMALL LETTER R WITH CARON
+    $f9: result:= #$016f;  // LATIN SMALL LETTER U WITH RING ABOVE
+    $fb: result:= #$0171;  // LATIN SMALL LETTER U WITH WITH DOUBLE ACUTE
+    $fe: result:= #$0163;  // LATIN SMALL LETTER T WITH CEDILLA
+    $ff: result:= #$02d9;  // DOT ABOVE
+  else
+    result:= WideChar(ord(P));
+  end;
+end;
+
+function Iso8859_3ToUTF16Char(const P: AnsiChar):WideChar;
+begin
+  case ord(P) of
+    $a1: result:= #$0126;  // LATIN CAPITAL LETTER H WITH STROKE
+    $a2: result:= #$02d8;  // BREVE
+    $a5: raise EConvertError.CreateFmt('Invalid ISO-8859-3 sequence "%s"',[P]);
+    $a6: result:= #$0124;  // LATIN CAPITAL LETTER H WITH CIRCUMFLEX
+    $a9: result:= #$0130;  // LATIN CAPITAL LETTER I WITH DOT ABOVE
+    $aa: result:= #$015e;  // LATIN CAPITAL LETTER S WITH CEDILLA
+    $ab: result:= #$011e;  // LATIN CAPITAL LETTER G WITH BREVE
+    $ac: result:= #$0134;  // LATIN CAPITAL LETTER J WITH CIRCUMFLEX
+    $ae: raise EConvertError.CreateFmt('Invalid ISO-8859-3 sequence "%s"',[P]);
+    $af: result:= #$017b;  // LATIN CAPITAL LETTER Z WITH DOT
+    $b1: result:= #$0127;  // LATIN SMALL LETTER H WITH STROKE
+    $b6: result:= #$0125;  // LATIN SMALL LETTER H WITH CIRCUMFLEX
+    $b9: result:= #$0131;  // LATIN SMALL LETTER DOTLESS I
+    $ba: result:= #$015f;  // LATIN SMALL LETTER S WITH CEDILLA
+    $bb: result:= #$011f;  // LATIN SMALL LETTER G WITH BREVE
+    $bc: result:= #$0135;  // LATIN SMALL LETTER J WITH CIRCUMFLEX
+    $be: raise EConvertError.CreateFmt('Invalid ISO-8859-3 sequence "%s"',[P]);
+    $bf: result:= #$017c;  // LATIN SMALL LETTER Z WITH DOT
+    $c3: raise EConvertError.CreateFmt('Invalid ISO-8859-3 sequence "%s"',[P]);
+    $c5: result:= #$010a;  // LATIN CAPITAL LETTER C WITH DOT ABOVE
+    $c6: result:= #$0108;  // LATIN CAPITAL LETTER C WITH CIRCUMFLEX
+    $d0: raise EConvertError.CreateFmt('Invalid ISO-8859-3 sequence "%s"',[P]);
+    $d5: result:= #$0120;  // LATIN CAPITAL LETTER G WITH DOT ABOVE
+    $d8: result:= #$011c;  // LATIN CAPITAL LETTER G WITH CIRCUMFLEX
+    $dd: result:= #$016c;  // LATIN CAPITAL LETTER U WITH BREVE
+    $de: result:= #$015c;  // LATIN CAPITAL LETTER S WITH CIRCUMFLEX
+    $e3: raise EConvertError.CreateFmt('Invalid ISO-8859-3 sequence "%s"',[P]);
+    $e5: result:= #$010b;  // LATIN SMALL LETTER C WITH DOT ABOVE
+    $e6: result:= #$0109;  // LATIN SMALL LETTER C WITH CIRCUMFLEX
+    $f0: raise EConvertError.CreateFmt('Invalid ISO-8859-3 sequence "%s"',[P]);
+    $f5: result:= #$0121;  // LATIN SMALL LETTER G WITH DOT ABOVE
+    $f8: result:= #$011d;  // LATIN SMALL LETTER G WITH CIRCUMFLEX
+    $fd: result:= #$016d;  // LATIN SMALL LETTER U WITH BREVE
+    $fe: result:= #$015d;  // LATIN SMALL LETTER S WITH CIRCUMFLEX
+    $ff: result:= #$02d9;  // DOT ABOVE
+  else
+    result:= WideChar(ord(P));
+  end;
+end;
+
+function Iso8859_4ToUTF16Char(const P: AnsiChar):WideChar;
+begin
+  case ord(P) of
+    $a1: result:= #$0104;  // LATIN CAPITAL LETTER A WITH OGONEK
+    $a2: result:= #$0138;  // LATIN SMALL LETTER KRA
+    $a3: result:= #$0156;  // LATIN CAPITAL LETTER R WITH CEDILLA
+    $a5: result:= #$0128;  // LATIN CAPITAL LETTER I WITH TILDE
+    $a6: result:= #$013b;  // LATIN CAPITAL LETTER L WITH CEDILLA
+    $a9: result:= #$0160;  // LATIN CAPITAL LETTER S WITH CARON
+    $aa: result:= #$0112;  // LATIN CAPITAL LETTER E WITH MACRON
+    $ab: result:= #$0122;  // LATIN CAPITAL LETTER G WITH CEDILLA
+    $ac: result:= #$0166;  // LATIN CAPITAL LETTER T WITH STROKE
+    $ae: result:= #$017d;  // LATIN CAPITAL LETTER Z WITH CARON
+    $b1: result:= #$0105;  // LATIN SMALL LETTER A WITH OGONEK
+    $b2: result:= #$02db;  // OGONEK
+    $b3: result:= #$0157;  // LATIN SMALL LETTER R WITH CEDILLA
+    $b5: result:= #$0129;  // LATIN SMALL LETTER I WITH TILDE
+    $b6: result:= #$013c;  // LATIN SMALL LETTER L WITH CEDILLA
+    $b7: result:= #$02c7;  // CARON
+    $b9: result:= #$0161;  // LATIN SMALL LETTER S WITH CARON
+    $ba: result:= #$0113;  // LATIN SMALL LETTER E WITH MACRON
+    $bb: result:= #$0123;  // LATIN SMALL LETTER G WITH CEDILLA
+    $bc: result:= #$0167;  // LATIN SMALL LETTER T WITH STROKE
+    $bd: result:= #$014a;  // LATIN CAPITAL LETTER ENG
+    $be: result:= #$017e;  // LATIN SMALL LETTER Z WITH CARON
+    $bf: result:= #$014b;  // LATIN SMALL LETTER ENG
+    $c0: result:= #$0100;  // LATIN CAPITAL LETTER A WITH MACRON
+    $c7: result:= #$012e;  // LATIN CAPITAL LETTER I WITH OGONEK
+    $c8: result:= #$010c;  // LATIN CAPITAL LETTER C WITH CARON
+    $ca: result:= #$0118;  // LATIN CAPITAL LETTER E WITH OGONEK
+    $cc: result:= #$0116;  // LATIN CAPITAL LETTER E WITH DOT ABOVE
+    $cf: result:= #$012a;  // LATIN CAPITAL LETTER I WITH MACRON
+    $d0: result:= #$0110;  // LATIN CAPITAL LETTER D WITH STROKE
+    $d1: result:= #$0145;  // LATIN CAPITAL LETTER N WITH CEDILLA
+    $d2: result:= #$014c;  // LATIN CAPITAL LETTER O WITH MACRON
+    $d3: result:= #$0136;  // LATIN CAPITAL LETTER K WITH CEDILLA
+    $d9: result:= #$0172;  // LATIN CAPITAL LETTER U WITH OGONEK
+    $dd: result:= #$0168;  // LATIN CAPITAL LETTER U WITH TILDE
+    $de: result:= #$016a;  // LATIN CAPITAL LETTER U WITH MACRON
+    $e0: result:= #$0101;  // LATIN SMALL LETTER A WITH MACRON
+    $e7: result:= #$012f;  // LATIN SMALL LETTER I WITH OGONEK
+    $e8: result:= #$010d;  // LATIN SMALL LETTER C WITH CARON
+    $ea: result:= #$0119;  // LATIN SMALL LETTER E WITH OGONEK
+    $ec: result:= #$0117;  // LATIN SMALL LETTER E WITH DOT ABOVE
+    $ef: result:= #$012b;  // LATIN SMALL LETTER I WITH MACRON
+    $f0: result:= #$0111;  // LATIN SMALL LETTER D WITH STROKE
+    $f1: result:= #$0146;  // LATIN SMALL LETTER N WITH CEDILLA
+    $f2: result:= #$014d;  // LATIN SMALL LETTER O WITH MACRON
+    $f3: result:= #$0137;  // LATIN SMALL LETTER K WITH CEDILLA
+    $f9: result:= #$0173;  // LATIN SMALL LETTER U WITH OGONEK
+    $fd: result:= #$0169;  // LATIN SMALL LETTER U WITH TILDE
+    $fe: result:= #$016b;  // LATIN SMALL LETTER U WITH MACRON
+    $ff: result:= #$02d9;  // DOT ABOVE
+  else
+    result:= WideChar(ord(P));
+  end;
+end;
+
+function Iso8859_5ToUTF16Char(const P: AnsiChar):WideChar;
+begin
+  case ord(P) of
+    $00..$a0,$ad:
+      result:= WideChar(ord(P));
+    $f0: result:= #$2116;  // NUMERO SIGN
+    $fd: result:= #$00a7;  // SECTION SIGN
+  else
+    result:= WideChar(ord(P)+$0360);
+  end;
+end;
+
+function Iso8859_6ToUTF16Char(const P: AnsiChar):WideChar;
+begin
+  case ord(P) of
+    $00..$a0,$a4,$ad:
+      result:= WideChar(ord(P));
+    $ac,$bb,$bf,$c1..$da,$e0..$f2:
+      result:= WideChar(ord(P)+$0580);
+  else
+    raise EConvertError.CreateFmt('Invalid ISO-8859-6 sequence "%s"',[P]);
+  end;
+end;
+
+function Iso8859_7ToUTF16Char(const P: AnsiChar):WideChar;
+begin
+  case ord(P) of
+    $00..$a0,$a6..$a9,$ab..$ad,$b0..$b3,$b7,$bb,$bd:
+      result:= WideChar(ord(P));
+    $a1: result:= #$2018;  // LEFT SINGLE QUOTATION MARK
+    $a2: result:= #$2019;  // RIGHT SINGLE QUOTATION MARK
+    $af: result:= #$2015;  // HORIZONTAL BAR
+    $d2,$ff: raise EConvertError.CreateFmt('Invalid ISO-8859-7 sequence "%s"',[P]);
+  else
+    result:= WideChar(ord(P)+$02d0);
+  end;
+end;
+
+function Iso8859_8ToUTF16Char(const P: AnsiChar):WideChar;
+begin
+  case ord(P) of
+    $00..$a0,$a2..$a9,$ab..$ae,$b0..$b9,$bb..$be:
+      result:= WideChar(ord(P));
+    $aa: result:= #$00d7;  // MULTIPLICATION SIGN
+    $af: result:= #$203e;  // OVERLINE
+    $ba: result:= #$00f7;  // DIVISION SIGN
+    $df: result:= #$2017;  // DOUBLE LOW LINE
+    $e0..$fa:
+      result:= WideChar(ord(P)+$04e0);
+  else
+    raise EConvertError.CreateFmt('Invalid ISO-8859-8 sequence "%s"',[P]);
+  end;
+end;
+
+function Iso8859_9ToUTF16Char(const P: AnsiChar):WideChar;
+begin
+  case ord(P) of
+    $d0: result:= #$011e;  // LATIN CAPITAL LETTER G WITH BREVE
+    $dd: result:= #$0130;  // LATIN CAPITAL LETTER I WITH DOT ABOVE
+    $de: result:= #$015e;  // LATIN CAPITAL LETTER S WITH CEDILLA
+    $f0: result:= #$011f;  // LATIN SMALL LETTER G WITH BREVE
+    $fd: result:= #$0131;  // LATIN SMALL LETTER I WITH DOT ABOVE
+    $fe: result:= #$015f;  // LATIN SMALL LETTER S WITH CEDILLA
+  else
+    result:= WideChar(ord(P));
+  end;
+end;
+
+function Iso8859_10ToUTF16Char(const P: AnsiChar):WideChar;
+begin
+  case ord(P) of
+    $a1: result:= #$0104;  // LATIN CAPITAL LETTER A WITH OGONEK
+    $a2: result:= #$0112;  // LATIN CAPITAL LETTER E WITH MACRON
+    $a3: result:= #$0122;  // LATIN CAPITAL LETTER G WITH CEDILLA
+    $a4: result:= #$012a;  // LATIN CAPITAL LETTER I WITH MACRON
+    $a5: result:= #$0128;  // LATIN CAPITAL LETTER I WITH TILDE
+    $a6: result:= #$0136;  // LATIN CAPITAL LETTER K WITH CEDILLA
+    $a8: result:= #$013b;  // LATIN CAPITAL LETTER L WITH CEDILLA
+    $a9: result:= #$0110;  // LATIN CAPITAL LETTER D WITH STROKE
+    $aa: result:= #$0160;  // LATIN CAPITAL LETTER S WITH CARON
+    $ab: result:= #$0166;  // LATIN CAPITAL LETTER T WITH STROKE
+    $ac: result:= #$017d;  // LATIN CAPITAL LETTER Z WITH CARON
+    $ae: result:= #$016a;  // LATIN CAPITAL LETTER U WITH MACRON
+    $af: result:= #$014a;  // LATIN CAPITAL LETTER ENG
+    $b1: result:= #$0105;  // LATIN SMALL LETTER A WITH OGONEK
+    $b2: result:= #$0113;  // LATIN SMALL LETTER E WITH MACRON
+    $b3: result:= #$0123;  // LATIN SMALL LETTER G WITH CEDILLA
+    $b4: result:= #$012b;  // LATIN SMALL LETTER I WITH MACRON
+    $b5: result:= #$0129;  // LATIN SMALL LETTER I WITH TILDE
+    $b6: result:= #$0137;  // LATIN SMALL LETTER K WITH CEDILLA
+    $b8: result:= #$013c;  // LATIN SMALL LETTER L WITH CEDILLA
+    $b9: result:= #$0111;  // LATIN SMALL LETTER D WITH STROKE
+    $ba: result:= #$0161;  // LATIN SMALL LETTER S WITH CARON
+    $bb: result:= #$0167;  // LATIN SMALL LETTER T WITH STROKE
+    $bc: result:= #$017e;  // LATIN SMALL LETTER Z WITH CARON
+    $bd: result:= #$2015;  // HORIZONTAL BAR
+    $be: result:= #$016b;  // LATIN SMALL LETTER U WITH MACRON
+    $bf: result:= #$014b;  // LATIN SMALL LETTER ENG
+    $c0: result:= #$0100;  // LATIN CAPITAL LETTER A WITH MACRON
+    $c7: result:= #$012e;  // LATIN CAPITAL LETTER I WITH OGONEK
+    $c8: result:= #$010c;  // LATIN CAPITAL LETTER C WITH CARON
+    $ca: result:= #$0118;  // LATIN CAPITAL LETTER E WITH OGONEK
+    $cc: result:= #$0116;  // LATIN CAPITAL LETTER E WITH DOT ABOVE
+    $d1: result:= #$0145;  // LATIN CAPITAL LETTER N WITH CEDILLA
+    $d2: result:= #$014c;  // LATIN CAPITAL LETTER O WITH MACRON
+    $d7: result:= #$0168;  // LATIN CAPITAL LETTER U WITH TILDE
+    $d9: result:= #$0172;  // LATIN CAPITAL LETTER U WITH OGONEK
+    $e0: result:= #$0101;  // LATIN SMALL LETTER A WITH MACRON
+    $e7: result:= #$012f;  // LATIN SMALL LETTER I WITH OGONEK
+    $e8: result:= #$010d;  // LATIN SMALL LETTER C WITH CARON
+    $ea: result:= #$0119;  // LATIN SMALL LETTER E WITH OGONEK
+    $ec: result:= #$0117;  // LATIN SMALL LETTER E WITH DOT ABOVE
+    $f1: result:= #$0146;  // LATIN SMALL LETTER N WITH CEDILLA
+    $f2: result:= #$014d;  // LATIN SMALL LETTER O WITH MACRON
+    $f7: result:= #$0169;  // LATIN SMALL LETTER U WITH TILDE
+    $f9: result:= #$0173;  // LATIN SMALL LETTER U WITH OGONEK
+    $ff: result:= #$0138;  // LATIN SMALL LETTER KRA
+  else
+    result:= WideChar(ord(P));
+  end;
+end;
+
+function Iso8859_13ToUTF16Char(const P: AnsiChar):WideChar;
+begin
+  case ord(P) of
+    $a1: result:= #$201d;  // RIGHT DOUBLE QUOTATION MARK
+    $a5: result:= #$201e;  // DOUBLE LOW-9 QUOTATION MARK
+    $a8: result:= #$00d8;  // LATIN CAPITAL LETTER O WITH STROKE
+    $aa: result:= #$0156;  // LATIN CAPITAL LETTER R WITH CEDILLA
+    $af: result:= #$00c6;  // LATIN CAPITAL LETTER AE
+    $b4: result:= #$201c;  // LEFT DOUBLE QUOTATION MARK
+    $b8: result:= #$00f8;  // LATIN SMALL LETTER O WITH STROKE
+    $ba: result:= #$0157;  // LATIN SMALL LETTER R WITH CEDILLA
+    $bf: result:= #$00e6;  // LATIN SMALL LETTER AE
+    $c0: result:= #$0104;  // LATIN CAPITAL LETTER A WITH OGONEK
+    $c1: result:= #$012e;  // LATIN CAPITAL LETTER I WITH OGONEK
+    $c2: result:= #$0100;  // LATIN CAPITAL LETTER A WITH MACRON
+    $c3: result:= #$0106;  // LATIN CAPITAL LETTER C WITH ACUTE
+    $c6: result:= #$0118;  // LATIN CAPITAL LETTER E WITH OGONEK
+    $c7: result:= #$0112;  // LATIN CAPITAL LETTER E WITH MACRON
+    $c8: result:= #$010c;  // LATIN CAPITAL LETTER C WITH CARON
+    $ca: result:= #$0179;  // LATIN CAPITAL LETTER Z WITH ACUTE
+    $cb: result:= #$0116;  // LATIN CAPITAL LETTER E WITH DOT ABOVE
+    $cc: result:= #$0122;  // LATIN CAPITAL LETTER G WITH CEDILLA
+    $cd: result:= #$0136;  // LATIN CAPITAL LETTER K WITH CEDILLA
+    $ce: result:= #$012a;  // LATIN CAPITAL LETTER I WITH MACRON
+    $cf: result:= #$013b;  // LATIN CAPITAL LETTER L WITH CEDILLA
+    $d0: result:= #$0160;  // LATIN CAPITAL LETTER S WITH CARON
+    $d1: result:= #$0143;  // LATIN CAPITAL LETTER N WITH ACUTE
+    $d2: result:= #$0145;  // LATIN CAPITAL LETTER N WITH CEDILLA
+    $d4: result:= #$014c;  // LATIN CAPITAL LETTER O WITH MACRON
+    $d8: result:= #$0172;  // LATIN CAPITAL LETTER U WITH OGONEK
+    $d9: result:= #$0141;  // LATIN CAPITAL LETTER L WITH STROKE
+    $da: result:= #$015a;  // LATIN CAPITAL LETTER S WITH ACUTE
+    $db: result:= #$016a;  // LATIN CAPITAL LETTER U WITH MACRON
+    $dd: result:= #$017b;  // LATIN CAPITAL LETTER Z WITH DOT ABOVE
+    $de: result:= #$017d;  // LATIN CAPITAL LETTER Z WITH CARON
+    $e0: result:= #$0105;  // LATIN SMALL LETTER A WITH OGONEK
+    $e1: result:= #$012f;  // LATIN SMALL LETTER I WITH OGONEK
+    $e2: result:= #$0101;  // LATIN SMALL LETTER A WITH MACRON
+    $e3: result:= #$0107;  // LATIN SMALL LETTER C WITH ACUTE
+    $e6: result:= #$0119;  // LATIN SMALL LETTER E WITH OGONEK
+    $e7: result:= #$0113;  // LATIN SMALL LETTER E WITH MACRON
+    $e8: result:= #$010d;  // LATIN SMALL LETTER C WITH CARON
+    $ea: result:= #$017a;  // LATIN SMALL LETTER Z WITH ACUTE
+    $eb: result:= #$0117;  // LATIN SMALL LETTER E WITH DOT ABOVE
+    $ec: result:= #$0123;  // LATIN SMALL LETTER G WITH CEDILLA
+    $ed: result:= #$0137;  // LATIN SMALL LETTER K WITH CEDILLA
+    $ee: result:= #$012b;  // LATIN SMALL LETTER I WITH MACRON
+    $ef: result:= #$013c;  // LATIN SMALL LETTER L WITH CEDILLA
+    $f0: result:= #$0161;  // LATIN SMALL LETTER S WITH CARON
+    $f1: result:= #$0144;  // LATIN SMALL LETTER N WITH ACUTE
+    $f2: result:= #$0146;  // LATIN SMALL LETTER N WITH CEDILLA
+    $f4: result:= #$014d;  // LATIN SMALL LETTER O WITH MACRON
+    $f8: result:= #$0173;  // LATIN SMALL LETTER U WITH OGONEK
+    $f9: result:= #$0142;  // LATIN SMALL LETTER L WITH STROKE
+    $fa: result:= #$015b;  // LATIN SMALL LETTER S WITH ACUTE
+    $fb: result:= #$016b;  // LATIN SMALL LETTER U WITH MACRON
+    $fd: result:= #$017c;  // LATIN SMALL LETTER Z WITH DOT ABOVE
+    $fe: result:= #$017e;  // LATIN SMALL LETTER Z WITH CARON
+    $ff: result:= #$2019;  // RIGHT SINGLE QUOTATION MARK
+  else
+    result:= WideChar(ord(P));
+  end;
+end;
+
+function Iso8859_14ToUTF16Char(const P: AnsiChar):WideChar;
+begin
+  case ord(P) of
+    $a1: result:= #$1e02;  // LATIN CAPITAL LETTER B WITH DOT ABOVE
+    $a2: result:= #$1e03;  // LATIN SMALL LETTER B WITH DOT ABOVE
+    $a4: result:= #$010a;  // LATIN CAPITAL LETTER C WITH DOT ABOVE
+    $a5: result:= #$010b;  // LATIN SMALL LETTER C WITH DOT ABOVE
+    $a6: result:= #$1e0a;  // LATIN CAPITAL LETTER D WITH DOT ABOVE
+    $a8: result:= #$1e80;  // LATIN CAPITAL LETTER W WITH GRAVE
+    $aa: result:= #$1e82;  // LATIN CAPITAL LETTER W WITH ACUTE
+    $ab: result:= #$1e0b;  // LATIN SMALL LETTER D WITH DOT ABOVE
+    $ac: result:= #$1ef2;  // LATIN CAPITAL LETTER Y WITH GRAVE
+    $af: result:= #$0178;  // LATIN CAPITAL LETTER Y WITH DIAERESIS
+    $b0: result:= #$1e1e;  // LATIN CAPITAL LETTER F WITH DOT ABOVE
+    $b1: result:= #$1e1f;  // LATIN SMALL LETTER F WITH DOT ABOVE
+    $b2: result:= #$0120;  // LATIN CAPITAL LETTER G WITH DOT ABOVE
+    $b3: result:= #$0121;  // LATIN SMALL LETTER G WITH DOT ABOVE
+    $b4: result:= #$1e40;  // LATIN CAPITAL LETTER M WITH DOT ABOVE
+    $b5: result:= #$1e41;  // LATIN SMALL LETTER M WITH DOT ABOVE
+    $b7: result:= #$1e56;  // LATIN CAPITAL LETTER P WITH DOT ABOVE
+    $b8: result:= #$1e81;  // LATIN SMALL LETTER W WITH GRAVE
+    $b9: result:= #$1e57;  // LATIN SMALL LETTER P WITH DOT ABOVE
+    $ba: result:= #$1e83;  // LATIN SMALL LETTER W WITH ACUTE
+    $bb: result:= #$1e60;  // LATIN CAPITAL LETTER S WITH DOT ABOVE
+    $bc: result:= #$1ef3;  // LATIN SMALL LETTER Y WITH GRAVE
+    $bd: result:= #$1e84;  // LATIN CAPITAL LETTER W WITH DIAERESIS
+    $be: result:= #$1e85;  // LATIN SMALL LETTER W WITH DIAERESIS
+    $bf: result:= #$1e61;  // LATIN SMALL LETTER S WITH DOT ABOVE
+    $d0: result:= #$0174;  // LATIN CAPITAL LETTER W WITH CIRCUMFLEX
+    $d7: result:= #$1e6a;  // LATIN CAPITAL LETTER T WITH DOT ABOVE
+    $de: result:= #$0176;  // LATIN CAPITAL LETTER Y WITH CIRCUMFLEX
+    $f0: result:= #$0175;  // LATIN SMALL LETTER W WITH CIRCUMFLEX
+    $f7: result:= #$1e6b;  // LATIN SMALL LETTER T WITH DOT ABOVE
+    $fe: result:= #$0177;  // LATIN SMALL LETTER Y WITH CIRCUMFLEX
+  else
+    result:= WideChar(ord(P));
+  end;
+end;
+
+function Iso8859_15ToUTF16Char(const P: AnsiChar):WideChar;
+begin
+  case ord(P) of
+    $a4: result:= #$20ac;  // EURO SIGN
+    $a6: result:= #$00a6;  // LATIN CAPITAL LETTER S WITH CARON
+    $a8: result:= #$0161;  // LATIN SMALL LETTER S WITH CARON
+    $b4: result:= #$017d;  // LATIN CAPITAL LETTER Z WITH CARON
+    $b8: result:= #$017e;  // LATIN SMALL LETTER Z WITH CARON
+    $bc: result:= #$0152;  // LATIN CAPITAL LIGATURE OE
+    $bd: result:= #$0153;  // LATIN SMALL LIGATURE OE
+    $be: result:= #$0178;  // LATIN CAPITAL LETTER Y WITH DIAERESIS
+  else
+    result:= WideChar(ord(P));
+  end;
+end;
+
+function KOI8_RToUTF16Char(const P: AnsiChar):WideChar;
+begin
+  case ord(P) of
+    $80: result:= #$2500;  // BOX DRAWINGS LIGHT HORIZONTAL
+    $81: result:= #$2502;  // BOX DRAWINGS LIGHT VERTICAL
+    $82: result:= #$250c;  // BOX DRAWINGS LIGHT DOWN AND RIGHT
+    $83: result:= #$2510;  // BOX DRAWINGS LIGHT DOWN AND LEFT
+    $84: result:= #$2514;  // BOX DRAWINGS LIGHT UP AND RIGHT
+    $85: result:= #$2518;  // BOX DRAWINGS LIGHT UP AND LEFT
+    $86: result:= #$251c;  // BOX DRAWINGS LIGHT VERTICAL AND RIGHT
+    $87: result:= #$2524;  // BOX DRAWINGS LIGHT VERTICAL AND LEFT
+    $88: result:= #$252c;  // BOX DRAWINGS LIGHT DOWN AND HORIZONTAL
+    $89: result:= #$2534;  // BOX DRAWINGS LIGHT UP AND HORIZONTAL
+    $8a: result:= #$253c;  // BOX DRAWINGS LIGHT VERTICAL AND HORIZONTAL
+    $8b: result:= #$2580;  // UPPER HALF BLOCK
+    $8c: result:= #$2584;  // LOWER HALF BLOCK
+    $8d: result:= #$2588;  // FULL BLOCK
+    $8e: result:= #$258c;  // LEFT HALF BLOCK
+    $8f: result:= #$2590;  // RIGHT HALF BLOCK
+    $90: result:= #$2591;  // LIGHT SHADE
+    $91: result:= #$2592;  // MEDIUM SHADE
+    $92: result:= #$2593;  // DARK SHADE
+    $93: result:= #$2320;  // TOP HALF INTEGRAL
+    $94: result:= #$25a0;  // BLACK SQUARE
+    $95: result:= #$2219;  // BULLET OPERATOR
+    $96: result:= #$221a;  // SQUARE ROOT
+    $97: result:= #$2248;  // ALMOST EQUAL TO
+    $98: result:= #$2264;  // LESS-THAN OR EQUAL TO
+    $99: result:= #$2265;  // GREATER-THAN OR EQUAL TO
+    $9a: result:= #$00a0;  // NO-BREAK SPACE
+    $9b: result:= #$2321;  // BOTTOM HALF INTEGRAL
+    $9c: result:= #$00b0;  // DEGREE SIGN
+    $9d: result:= #$00b2;  // SUPERSCRIPT TWO
+    $9e: result:= #$00b7;  // MIDDLE DOT
+    $9f: result:= #$00f7;  // DIVISION SIGN
+    $a0: result:= #$2550;  // BOX DRAWINGS DOUBLE HORIZONTAL
+    $a1: result:= #$2551;  // BOX DRAWINGS DOUBLE VERTICAL
+    $a2: result:= #$2552;  // BOX DRAWINGS DOWN SINGLE AND RIGHT DOUBLE
+    $a3: result:= #$0451;  // CYRILLIC SMALL LETTER IO
+    $a4: result:= #$2553;  // BOX DRAWINGS DOWN DOUBLE AND RIGHT SINGLE
+    $a5: result:= #$2554;  // BOX DRAWINGS DOUBLE DOWN AND RIGHT
+    $a6: result:= #$2555;  // BOX DRAWINGS DOWN SINGLE AND LEFT DOUBLE
+    $a7: result:= #$2556;  // BOX DRAWINGS DOWN DOUBLE AND LEFT SINGLE
+    $a8: result:= #$2557;  // BOX DRAWINGS DOUBLE DOWN AND LEFT
+    $a9: result:= #$2558;  // BOX DRAWINGS UP SINGLE AND RIGHT DOUBLE
+    $aa: result:= #$2559;  // BOX DRAWINGS UP DOUBLE AND RIGHT SINGLE
+    $ab: result:= #$255a;  // BOX DRAWINGS DOUBLE UP AND RIGHT
+    $ac: result:= #$255b;  // BOX DRAWINGS UP SINGLE AND LEFT DOUBLE
+    $ad: result:= #$255c;  // BOX DRAWINGS UP DOUBLE AND LEFT SINGLE
+    $ae: result:= #$255d;  // BOX DRAWINGS DOUBLE UP AND LEFT
+    $af: result:= #$255e;  // BOX DRAWINGS VERTICAL SINGLE AND RIGHT DOUBLE
+    $b0: result:= #$255f;  // BOX DRAWINGS VERTICAL DOUBLE AND RIGHT SINGLE
+    $b1: result:= #$2560;  // BOX DRAWINGS DOUBLE VERTICAL AND RIGHT
+    $b2: result:= #$2561;  // BOX DRAWINGS VERTICAL SINGLE AND LEFT DOUBLE
+    $b3: result:= #$0401;  // CYRILLIC CAPITAL LETTER IO
+    $b4: result:= #$2562;  // BOX DRAWINGS VERTICAL DOUBLE AND LEFT SINGLE
+    $b5: result:= #$2563;  // BOX DRAWINGS DOUBLE VERTICAL AND LEFT
+    $b6: result:= #$2564;  // BOX DRAWINGS DOWN SINGLE AND HORIZONTAL DOUBLE
+    $b7: result:= #$2565;  // BOX DRAWINGS DOWN DOUBLE AND HORIZONTAL SINGLE
+    $b8: result:= #$2566;  // BOX DRAWINGS DOUBLE DOWN AND HORIZONTAL
+    $b9: result:= #$2567;  // BOX DRAWINGS UP SINGLE AND HORIZONTAL DOUBLE
+    $ba: result:= #$2568;  // BOX DRAWINGS UP DOUBLE AND HORIZONTAL SINGLE
+    $bb: result:= #$2569;  // BOX DRAWINGS DOUBLE UP AND HORIZONTAL
+    $bc: result:= #$256a;  // BOX DRAWINGS VERTICAL SINGLE AND HORIZONTAL DOUBLE
+    $bd: result:= #$256b;  // BOX DRAWINGS VERTICAL DOUBLE AND HORIZONTAL SINGLE
+    $be: result:= #$256c;  // BOX DRAWINGS DOUBLE VERTICAL AND HORIZONTAL
+    $bf: result:= #$00a9;  // COPYRIGHT SIGN
+    $c0: result:= #$044e;  // CYRILLIC SMALL LETTER YU
+    $c1: result:= #$0430;  // CYRILLIC SMALL LETTER A
+    $c2: result:= #$0431;  // CYRILLIC SMALL LETTER BE
+    $c3: result:= #$0446;  // CYRILLIC SMALL LETTER TSE
+    $c4: result:= #$0434;  // CYRILLIC SMALL LETTER DE
+    $c5: result:= #$0435;  // CYRILLIC SMALL LETTER IE
+    $c6: result:= #$0444;  // CYRILLIC SMALL LETTER EF
+    $c7: result:= #$0433;  // CYRILLIC SMALL LETTER GHE
+    $c8: result:= #$0445;  // CYRILLIC SMALL LETTER HA
+    $c9: result:= #$0438;  // CYRILLIC SMALL LETTER I
+    $ca: result:= #$0439;  // CYRILLIC SMALL LETTER SHORT I
+    $cb: result:= #$043a;  // CYRILLIC SMALL LETTER KA
+    $cc: result:= #$043b;  // CYRILLIC SMALL LETTER EL
+    $cd: result:= #$043c;  // CYRILLIC SMALL LETTER EM
+    $ce: result:= #$043d;  // CYRILLIC SMALL LETTER EN
+    $cf: result:= #$043e;  // CYRILLIC SMALL LETTER O
+    $d0: result:= #$043f;  // CYRILLIC SMALL LETTER PE
+    $d1: result:= #$044f;  // CYRILLIC SMALL LETTER YA
+    $d2: result:= #$0440;  // CYRILLIC SMALL LETTER ER
+    $d3: result:= #$0441;  // CYRILLIC SMALL LETTER ES
+    $d4: result:= #$0442;  // CYRILLIC SMALL LETTER TE
+    $d5: result:= #$0443;  // CYRILLIC SMALL LETTER U
+    $d6: result:= #$0436;  // CYRILLIC SMALL LETTER ZHE
+    $d7: result:= #$0432;  // CYRILLIC SMALL LETTER VE
+    $d8: result:= #$044c;  // CYRILLIC SMALL LETTER SOFT SIGN
+    $d9: result:= #$044b;  // CYRILLIC SMALL LETTER YERU
+    $da: result:= #$0437;  // CYRILLIC SMALL LETTER ZE
+    $db: result:= #$0448;  // CYRILLIC SMALL LETTER SHA
+    $dc: result:= #$044d;  // CYRILLIC SMALL LETTER E
+    $dd: result:= #$0449;  // CYRILLIC SMALL LETTER SHCHA
+    $de: result:= #$0447;  // CYRILLIC SMALL LETTER CHE
+    $df: result:= #$044a;  // CYRILLIC SMALL LETTER HARD SIGN
+    $e0: result:= #$042e;  // CYRILLIC CAPITAL LETTER YU
+    $e1: result:= #$0410;  // CYRILLIC CAPITAL LETTER A
+    $e2: result:= #$0411;  // CYRILLIC CAPITAL LETTER BE
+    $e3: result:= #$0426;  // CYRILLIC CAPITAL LETTER TSE
+    $e4: result:= #$0414;  // CYRILLIC CAPITAL LETTER DE
+    $e5: result:= #$0415;  // CYRILLIC CAPITAL LETTER IE
+    $e6: result:= #$0424;  // CYRILLIC CAPITAL LETTER EF
+    $e7: result:= #$0413;  // CYRILLIC CAPITAL LETTER GHE
+    $e8: result:= #$0425;  // CYRILLIC CAPITAL LETTER HA
+    $e9: result:= #$0418;  // CYRILLIC CAPITAL LETTER I
+    $ea: result:= #$0419;  // CYRILLIC CAPITAL LETTER SHORT I
+    $eb: result:= #$041a;  // CYRILLIC CAPITAL LETTER KA
+    $ec: result:= #$041b;  // CYRILLIC CAPITAL LETTER EL
+    $ed: result:= #$041c;  // CYRILLIC CAPITAL LETTER EM
+    $ee: result:= #$041d;  // CYRILLIC CAPITAL LETTER EN
+    $ef: result:= #$041e;  // CYRILLIC CAPITAL LETTER O
+    $f0: result:= #$041f;  // CYRILLIC CAPITAL LETTER PE
+    $f1: result:= #$042f;  // CYRILLIC CAPITAL LETTER YA
+    $f2: result:= #$0420;  // CYRILLIC CAPITAL LETTER ER
+    $f3: result:= #$0421;  // CYRILLIC CAPITAL LETTER ES
+    $f4: result:= #$0422;  // CYRILLIC CAPITAL LETTER TE
+    $f5: result:= #$0423;  // CYRILLIC CAPITAL LETTER U
+    $f6: result:= #$0416;  // CYRILLIC CAPITAL LETTER ZHE
+    $f7: result:= #$0412;  // CYRILLIC CAPITAL LETTER VE
+    $f8: result:= #$042c;  // CYRILLIC CAPITAL LETTER SOFT SIGN
+    $f9: result:= #$042b;  // CYRILLIC CAPITAL LETTER YERU
+    $fa: result:= #$0417;  // CYRILLIC CAPITAL LETTER ZE
+    $fb: result:= #$0428;  // CYRILLIC CAPITAL LETTER SHA
+    $fc: result:= #$042d;  // CYRILLIC CAPITAL LETTER E
+    $fd: result:= #$0429;  // CYRILLIC CAPITAL LETTER SHCHA
+    $fe: result:= #$0427;  // CYRILLIC CAPITAL LETTER CHE
+    $ff: result:= #$042a;  // CYRILLIC CAPITAL LETTER HARD SIGN
+  else
+    result:= WideChar(ord(P));
+  end;
+end;
+
+function cp10000_MacRomanToUTF16Char(const P: AnsiChar):WideChar;
+begin
+  case ord(P) of
+    $80: result:= #$00c4;  // LATIN CAPITAL LETTER A WITH DIAERESIS
+    $81: result:= #$00c5;  // LATIN CAPITAL LETTER A WITH RING ABOVE
+    $82: result:= #$00c7;  // LATIN CAPITAL LETTER C WITH CEDILLA
+    $83: result:= #$00c9;  // LATIN CAPITAL LETTER E WITH ACUTE
+    $84: result:= #$00d1;  // LATIN CAPITAL LETTER N WITH TILDE
+    $85: result:= #$00d6;  // LATIN CAPITAL LETTER O WITH DIAERESIS
+    $86: result:= #$00dc;  // LATIN CAPITAL LETTER U WITH DIAERESIS
+    $87: result:= #$00e1;  // LATIN SMALL LETTER A WITH ACUTE
+    $88: result:= #$00e0;  // LATIN SMALL LETTER A WITH GRAVE
+    $89: result:= #$00e2;  // LATIN SMALL LETTER A WITH CIRCUMFLEX
+    $8a: result:= #$00e4;  // LATIN SMALL LETTER A WITH DIAERESIS
+    $8b: result:= #$00e3;  // LATIN SMALL LETTER A WITH TILDE
+    $8c: result:= #$00e5;  // LATIN SMALL LETTER A WITH RING ABOVE
+    $8d: result:= #$00e7;  // LATIN SMALL LETTER C WITH CEDILLA
+    $8e: result:= #$00e9;  // LATIN SMALL LETTER E WITH ACUTE
+    $8f: result:= #$00e8;  // LATIN SMALL LETTER E WITH GRAVE
+    $90: result:= #$00ea;  // LATIN SMALL LETTER E WITH CIRCUMFLEX
+    $91: result:= #$00eb;  // LATIN SMALL LETTER E WITH DIAERESIS
+    $92: result:= #$00ed;  // LATIN SMALL LETTER I WITH ACUTE
+    $93: result:= #$00ec;  // LATIN SMALL LETTER I WITH GRAVE
+    $94: result:= #$00ee;  // LATIN SMALL LETTER I WITH CIRCUMFLEX
+    $95: result:= #$00ef;  // LATIN SMALL LETTER I WITH DIAERESIS
+    $96: result:= #$00f1;  // LATIN SMALL LETTER N WITH TILDE
+    $97: result:= #$00f3;  // LATIN SMALL LETTER O WITH ACUTE
+    $98: result:= #$00f2;  // LATIN SMALL LETTER O WITH GRAVE
+    $99: result:= #$00f4;  // LATIN SMALL LETTER O WITH CIRCUMFLEX
+    $9a: result:= #$00f6;  // LATIN SMALL LETTER O WITH DIAERESIS
+    $9b: result:= #$00f5;  // LATIN SMALL LETTER O WITH TILDE
+    $9c: result:= #$00fa;  // LATIN SMALL LETTER U WITH ACUTE
+    $9d: result:= #$00f9;  // LATIN SMALL LETTER U WITH GRAVE
+    $9e: result:= #$00fb;  // LATIN SMALL LETTER U WITH CIRCUMFLEX
+    $9f: result:= #$00fc;  // LATIN SMALL LETTER U WITH DIAERESIS
+    $a0: result:= #$2020;  // DAGGER
+    $a1: result:= #$00b0;  // DEGREE SIGN
+    $a4: result:= #$00a7;  // SECTION SIGN
+    $a5: result:= #$2022;  // BULLET
+    $a6: result:= #$00b6;  // PILCROW SIGN
+    $a7: result:= #$00df;  // LATIN SMALL LETTER SHARP S
+    $a8: result:= #$00ae;  // REGISTERED SIGN
+    $aa: result:= #$2122;  // TRADE MARK SIGN
+    $ab: result:= #$00b4;  // ACUTE ACCENT
+    $ac: result:= #$00a8;  // DIAERESIS
+    $ad: result:= #$2260;  // NOT EQUAL TO
+    $ae: result:= #$00c6;  // LATIN CAPITAL LIGATURE AE
+    $af: result:= #$00d8;  // LATIN CAPITAL LETTER O WITH STROKE
+    $b0: result:= #$221e;  // INFINITY
+    $b2: result:= #$2264;  // LESS-THAN OR EQUAL TO
+    $b3: result:= #$2265;  // GREATER-THAN OR EQUAL TO
+    $b4: result:= #$00a5;  // YEN SIGN
+    $b6: result:= #$2202;  // PARTIAL DIFFERENTIAL
+    $b7: result:= #$2211;  // N-ARY SUMMATION
+    $b8: result:= #$220f;  // N-ARY PRODUCT
+    $b9: result:= #$03c0;  // GREEK SMALL LETTER PI
+    $ba: result:= #$222b;  // INTEGRAL
+    $bb: result:= #$00aa;  // FEMININE ORDINAL INDICATOR
+    $bc: result:= #$00ba;  // MASCULINE ORDINAL INDICATOR
+    $bd: result:= #$2126;  // OHM SIGN
+    $be: result:= #$00e6;  // LATIN SMALL LIGATURE AE
+    $bf: result:= #$00f8;  // LATIN SMALL LETTER O WITH STROKE
+    $c0: result:= #$00bf;  // INVERTED QUESTION MARK
+    $c1: result:= #$00a1;  // INVERTED EXCLAMATION MARK
+    $c2: result:= #$00ac;  // NOT SIGN
+    $c3: result:= #$221a;  // SQUARE ROOT
+    $c4: result:= #$0192;  // LATIN SMALL LETTER F WITH HOOK
+    $c5: result:= #$2248;  // ALMOST EQUAL TO
+    $c6: result:= #$2206;  // INCREMENT
+    $c7: result:= #$00ab;  // LEFT-POINTING DOUBLE ANGLE QUOTATION MARK
+    $c8: result:= #$00bb;  // RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK
+    $c9: result:= #$2026;  // HORIZONTAL ELLIPSIS
+    $ca: result:= #$00a0;  // NO-BREAK SPACE
+    $cb: result:= #$00c0;  // LATIN CAPITAL LETTER A WITH GRAVE
+    $cc: result:= #$00c3;  // LATIN CAPITAL LETTER A WITH TILDE
+    $cd: result:= #$00d5;  // LATIN CAPITAL LETTER O WITH TILDE
+    $ce: result:= #$0152;  // LATIN CAPITAL LIGATURE OE
+    $cf: result:= #$0153;  // LATIN SMALL LIGATURE OE
+    $d0: result:= #$2013;  // EN DASH
+    $d1: result:= #$2014;  // EM DASH
+    $d2: result:= #$201c;  // LEFT DOUBLE QUOTATION MARK
+    $d3: result:= #$201d;  // RIGHT DOUBLE QUOTATION MARK
+    $d4: result:= #$2018;  // LEFT SINGLE QUOTATION MARK
+    $d5: result:= #$2019;  // RIGHT SINGLE QUOTATION MARK
+    $d6: result:= #$00f7;  // DIVISION SIGN
+    $d7: result:= #$25ca;  // LOZENGE
+    $d8: result:= #$00ff;  // LATIN SMALL LETTER Y WITH DIAERESIS
+    $d9: result:= #$0178;  // LATIN CAPITAL LETTER Y WITH DIAERESIS
+    $da: result:= #$2044;  // FRACTION SLASH
+    $db: result:= #$00a4;  // CURRENCY SIGN
+    $dc: result:= #$2039;  // SINGLE LEFT-POINTING ANGLE QUOTATION MARK
+    $dd: result:= #$203a;  // SINGLE RIGHT-POINTING ANGLE QUOTATION MARK
+    $de: result:= #$fb01;  // LATIN SMALL LIGATURE FI
+    $df: result:= #$fb02;  // LATIN SMALL LIGATURE FL
+    $e0: result:= #$2021;  // DOUBLE DAGGER
+    $e1: result:= #$00b7;  // MIDDLE DOT
+    $e2: result:= #$201a;  // SINGLE LOW-9 QUOTATION MARK
+    $e3: result:= #$201e;  // DOUBLE LOW-9 QUOTATION MARK
+    $e4: result:= #$2030;  // PER MILLE SIGN
+    $e5: result:= #$00c2;  // LATIN CAPITAL LETTER A WITH CIRCUMFLEX
+    $e6: result:= #$00ca;  // LATIN CAPITAL LETTER E WITH CIRCUMFLEX
+    $e7: result:= #$00c1;  // LATIN CAPITAL LETTER A WITH ACUTE
+    $e8: result:= #$00cb;  // LATIN CAPITAL LETTER E WITH DIAERESIS
+    $e9: result:= #$00c8;  // LATIN CAPITAL LETTER E WITH GRAVE
+    $ea: result:= #$00cd;  // LATIN CAPITAL LETTER I WITH ACUTE
+    $eb: result:= #$00ce;  // LATIN CAPITAL LETTER I WITH CIRCUMFLEX
+    $ec: result:= #$00cf;  // LATIN CAPITAL LETTER I WITH DIAERESIS
+    $ed: result:= #$00cc;  // LATIN CAPITAL LETTER I WITH GRAVE
+    $ee: result:= #$00d3;  // LATIN CAPITAL LETTER O WITH ACUTE
+    $ef: result:= #$00d4;  // LATIN CAPITAL LETTER O WITH CIRCUMFLEX
+    $f0: raise EConvertError.CreateFmt('Invalid cp10000_MacRoman sequence "%s"',[P]);
+    $f1: result:= #$00d2;  // LATIN CAPITAL LETTER O WITH GRAVE
+    $f2: result:= #$00da;  // LATIN CAPITAL LETTER U WITH ACUTE
+    $f3: result:= #$00db;  // LATIN CAPITAL LETTER U WITH CIRCUMFLEX
+    $f4: result:= #$00d9;  // LATIN CAPITAL LETTER U WITH GRAVE
+    $f5: result:= #$0131;  // LATIN SMALL LETTER DOTLESS I
+    $f6: result:= #$02c6;  // MODIFIER LETTER CIRCUMFLEX ACCENT
+    $f7: result:= #$02dc;  // SMALL TILDE
+    $f8: result:= #$00af;  // MACRON
+    $f9: result:= #$02d8;  // BREVE
+    $fa: result:= #$02d9;  // DOT ABOVE
+    $fb: result:= #$02da;  // RING ABOVE
+    $fc: result:= #$00b8;  // CEDILLA
+    $fd: result:= #$02dd;  // DOUBLE ACUTE ACCENT
+    $fe: result:= #$02db;  // OGONEK
+    $ff: result:= #$02c7;  // CARON
+  else
+    result:= WideChar(ord(P));
+  end;
+end;
+
+function cp1250ToUTF16Char(const P: AnsiChar):WideChar;
+// This function was provided by Miloslav Skácel
+const
+  sInvalidWindows1250Sequence = 'Invalid Windows-1250 sequence "%s"';
+begin
+  case ord(p) of
+    // NOT USED
+    $81,$83,$88,$90,$98:
+      raise EConvertError.CreateFmt(sInvalidWindows1250Sequence,[P]);
+    $80: result:= #$20ac;  // EURO SIGN
+    $82: Result:= #$201a;  // SINGLE LOW-9 QUOTATION MARK
+    $84: Result:= #$201e;  // DOUBLE LOW-9 QUOTATION MARK
+    $85: Result:= #$2026;  // HORIZONTAL ELLIPSIS
+    $86: Result:= #$2020;  // DAGGER
+    $87: Result:= #$2021;  // DOUBLE DAGGER
+    $89: Result:= #$2030;  // PER MILLE SIGN
+    $8a: Result:= #$0160;  // LATIN CAPITAL LETTER S WITH CARON
+    $8b: Result:= #$2039;  // SINGLE LEFT-POINTING ANGLE QUOTATION MARK
+    $8c: Result:= #$015a;  // LATIN CAPITAL LETTER S WITH ACUTE
+    $8d: Result:= #$0164;  // LATIN CAPITAL LETTER T WITH CARON
+    $8e: Result:= #$017d;  // LATIN CAPITAL LETTER Z WITH CARON
+    $8f: Result:= #$0179;  // LATIN CAPITAL LETTER Z WITH ACUTE
+    $91: Result:= #$2018;  // LEFT SINGLE QUOTATION MARK
+    $92: Result:= #$2019;  // RIGHT SINGLE QUOTATION MARK
+    $93: Result:= #$201c;  // LEFT DOUBLE QUOTATION MARK
+    $94: Result:= #$201d;  // RIGHT DOUBLE QUOTATION MARK
+    $95: Result:= #$2022;  // BULLET
+    $96: Result:= #$2013;  // EN-DASH
+    $97: Result:= #$2014;  // EM-DASH
+    $99: Result:= #$2122;  // TRADE MARK SIGN
+    $9a: Result:= #$0161;  // LATIN SMALL LETTER S WITH CARON
+    $9b: Result:= #$203a;  // SINGLE RIGHT-POINTING ANGLE QUOTATION MARK
+    $9c: Result:= #$015b;  // LATIN SMALL LETTER S WITH ACUTE
+    $9d: Result:= #$0165;  // LATIN SMALL LETTER T WITH CARON
+    $9e: Result:= #$017e;  // LATIN SMALL LETTER Z WITH CARON
+    $9f: Result:= #$017a;  // LATIN SMALL LETTER Z WITH ACUTE
+    $a0: Result:= #$00a0;  // NO-BREAK SPACE
+    $a1: Result:= #$02c7;  // CARON
+    $a2: Result:= #$02d8;  // BREVE
+    $a3: Result:= #$0141;  // LATIN CAPITAL LETTER L WITH STROKE
+    $a4: Result:= #$00a4;  // CURRENCY SIGN
+    $a5: Result:= #$0104;  // LATIN CAPITAL LETTER A WITH OGONEK
+    $a6: Result:= #$00a6;  // BROKEN BAR
+    $a7: Result:= #$00a7;  // SECTION SIGN
+    $a8: Result:= #$00a8;  // DIAERESIS
+    $a9: Result:= #$00a9;  // COPYRIGHT SIGN
+    $aa: Result:= #$015e;  // LATIN CAPITAL LETTER S WITH CEDILLA
+    $ab: Result:= #$00ab;  // LEFT-POINTING DOUBLE ANGLE QUOTATION MARK
+    $ac: Result:= #$00ac;  // NOT SIGN
+    $ad: Result:= #$00ad;  // SOFT HYPHEN
+    $ae: Result:= #$00ae;  // REGISTERED SIGN
+    $af: Result:= #$017b;  // LATIN CAPITAL LETTER Z WITH DOT ABOVE
+    $b0: Result:= #$00b0;  // DEGREE SIGN
+    $b1: Result:= #$00b1;  // PLUS-MINUS SIGN
+    $b2: Result:= #$02db;  // OGONEK
+    $b3: Result:= #$0142;  // LATIN SMALL LETTER L WITH STROKE
+    $b4: Result:= #$00b4;  // ACUTE ACCENT
+    $b5: Result:= #$00b5;  // MIKRO SIGN
+    $b6: Result:= #$00b6;  // PILCROW SIGN
+    $b7: Result:= #$00b7;  // MIDDLE DOT
+    $b8: Result:= #$00b8;  // CEDILLA
+    $b9: Result:= #$0105;  // LATIN SMALL LETTER A WITH OGONEK
+    $ba: Result:= #$015f;  // LATIN SMALL LETTER S WITH CEDILLA
+    $bb: Result:= #$00bb;  // RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK
+    $bc: Result:= #$013d;  // LATIN CAPITAL LETTER L WITH CARON
+    $bd: Result:= #$02dd;  // DOUBLE ACUTE ACCENT
+    $be: Result:= #$013e;  // LATIN SMALL LETTER L WITH CARON
+    $bf: Result:= #$017c;  // LATIN SMALL LETTER Z WITH DOT ABOVE
+    $c0: Result:= #$0154;  // LATIN CAPITAL LETTER R WITH ACUTE
+    $c1: Result:= #$00c1;  // LATIN CAPITAL LETTER A WITH ACUTE
+    $c2: Result:= #$00c2;  // LATIN CAPITAL LETTER A WITH CIRCUMFLEX
+    $c3: Result:= #$0102;  // LATIN CAPITAL LETTER A WITH BREVE
+    $c4: Result:= #$00c4;  // LATIN CAPITAL LETTER A WITH DIAERESIS
+    $c5: Result:= #$0139;  // LATIN CAPITAL LETTER L WITH ACUTE
+    $c6: Result:= #$0106;  // LATIN CAPITAL LETTER C WITH ACUTE
+    $c7: Result:= #$00c7;  // LATIN CAPITAL LETTER C WITH CEDILLA
+    $c8: Result:= #$010c;  // LATIN CAPITAL LETTER C WITH CARON
+    $c9: Result:= #$00c9;  // LATIN CAPITAL LETTER E WITH ACUTE
+    $ca: Result:= #$0118;  // LATIN CAPITAL LETTER E WITH OGONEK
+    $cb: Result:= #$00cb;  // LATIN CAPITAL LETTER E WITH DIAERESIS
+    $cc: Result:= #$011a;  // LATIN CAPITAL LETTER E WITH CARON
+    $cd: Result:= #$00cd;  // LATIN CAPITAL LETTER I WITH ACUTE
+    $ce: Result:= #$00ce;  // LATIN CAPITAL LETTER I WITH CIRCUMFLEX
+    $cf: Result:= #$010e;  // LATIN CAPITAL LETTER D WITH CARON
+    $d0: Result:= #$0110;  // LATIN CAPITAL LETTER D WITH STROKE
+    $d1: Result:= #$0143;  // LATIN CAPITAL LETTER N WITH ACUTE
+    $d2: Result:= #$0147;  // LATIN CAPITAL LETTER N WITH CARON
+    $d3: Result:= #$00d3;  // LATIN CAPITAL LETTER O WITH ACUTE
+    $d4: Result:= #$00d4;  // LATIN CAPITAL LETTER O WITH CIRCUMFLEX
+    $d5: Result:= #$0150;  // LATIN CAPITAL LETTER O WITH DOUBLE ACUTE
+    $d6: Result:= #$00d6;  // LATIN CAPITAL LETTER O WITH DIAERESIS
+    $d7: Result:= #$00d7;  // MULTIPLICATION SIGN
+    $d8: Result:= #$0158;  // LATIN CAPITAL LETTER R WITH CARON
+    $d9: Result:= #$016e;  // LATIN CAPITAL LETTER U WITH RING ABOVE
+    $da: Result:= #$00da;  // LATIN CAPITAL LETTER U WITH ACUTE
+    $db: Result:= #$0170;  // LATIN CAPITAL LETTER U WITH WITH DOUBLE ACUTE
+    $dc: Result:= #$00dc;  // LATIN CAPITAL LETTER U WITH DIAERESIS
+    $dd: Result:= #$00dd;  // LATIN CAPITAL LETTER Y WITH ACUTE
+    $de: Result:= #$0162;  // LATIN CAPITAL LETTER T WITH CEDILLA
+    $df: Result:= #$00df;  // LATIN SMALL LETTER SHARP S
+    $e0: Result:= #$0155;  // LATIN SMALL LETTER R WITH ACUTE
+    $e1: Result:= #$00e1;  // LATIN SMALL LETTER A WITH ACUTE
+    $e2: Result:= #$00e2;  // LATIN SMALL LETTER A WITH CIRCUMFLEX
+    $e3: Result:= #$0103;  // LATIN SMALL LETTER A WITH BREVE
+    $e4: Result:= #$00e4;  // LATIN SMALL LETTER A WITH DIAERESIS
+    $e5: Result:= #$013a;  // LATIN SMALL LETTER L WITH ACUTE
+    $e6: Result:= #$0107;  // LATIN SMALL LETTER C WITH ACUTE
+    $e7: Result:= #$00e7;  // LATIN SMALL LETTER C WITH CEDILLA
+    $e8: Result:= #$010d;  // LATIN SMALL LETTER C WITH CARON 100D
+    $e9: Result:= #$00e9;  // LATIN SMALL LETTER E WITH ACUTE
+    $ea: Result:= #$0119;  // LATIN SMALL LETTER E WITH OGONEK
+    $eb: Result:= #$00eb;  // LATIN SMALL LETTER E WITH DIAERESIS
+    $ec: Result:= #$011b;  // LATIN SMALL LETTER E WITH CARON
+    $ed: Result:= #$00ed;  // LATIN SMALL LETTER I WITH ACUTE
+    $ee: Result:= #$00ee;  // LATIN SMALL LETTER I WITH CIRCUMFLEX
+    $ef: Result:= #$010f;  // LATIN SMALL LETTER D WITH CARON
+    $f0: Result:= #$0111;  // LATIN SMALL LETTER D WITH STROKE
+    $f1: Result:= #$0144;  // LATIN SMALL LETTER N WITH ACUTE
+    $f2: Result:= #$0148;  // LATIN SMALL LETTER N WITH CARON
+    $f3: Result:= #$00f3;  // LATIN SMALL LETTER O WITH ACUTE
+    $f4: Result:= #$00f4;  // LATIN SMALL LETTER O WITH CIRCUMFLEX
+    $f5: Result:= #$0151;  // LATIN SMALL LETTER O WITH DOUBLE ACUTE
+    $f6: Result:= #$00f6;  // LATIN SMALL LETTER O WITH DIAERESIS
+    $f7: Result:= #$00f7;  // DIVISION SIGN
+    $f8: Result:= #$0159;  // LATIN SMALL LETTER R WITH CARON
+    $f9: Result:= #$016f;  // LATIN SMALL LETTER U WITH RING ABOVE
+    $fa: Result:= #$00fa;  // LATIN SMALL LETTER U WITH ACUTE
+    $fb: Result:= #$0171;  // LATIN SMALL LETTER U WITH WITH DOUBLE ACUTE
+    $fc: Result:= #$00fc;  // LATIN SMALL LETTER U WITH DIAERESIS
+    $fd: Result:= #$00fd;  // LATIN SMALL LETTER Y WITH ACUTE
+    $fe: Result:= #$0163;  // LATIN SMALL LETTER T WITH CEDILLA
+    $ff: Result:= #$02d9;  // DOT ABOVE
+  else
+    Result:= WideChar(ord(P));
+  end;
+end;
+
+function cp1251ToUTF16Char(const P: AnsiChar):WideChar;
+begin
+  case ord(P) of
+    $80: result:= #$0402;  // CYRILLIC CAPITAL LETTER DJE
+    $81: result:= #$0403;  // CYRILLIC CAPITAL LETTER GJE
+    $82: result:= #$201a;  // SINGLE LOW-9 QUOTATION MARK
+    $83: result:= #$0453;  // CYRILLIC SMALL LETTER GJE
+    $84: result:= #$201e;  // DOUBLE LOW-9 QUOTATION MARK
+    $85: result:= #$2026;  // HORIZONTAL ELLIPSIS
+    $86: result:= #$2020;  // DAGGER
+    $87: result:= #$2021;  // DOUBLE DAGGER
+    $88: result:= #$20ac;  // EURO SIGN
+    $89: result:= #$2030;  // PER MILLE SIGN
+    $8a: result:= #$0409;  // CYRILLIC CAPITAL LETTER LJE
+    $8b: result:= #$2039;  // SINGLE LEFT-POINTING ANGLE QUOTATION MARK
+    $8c: result:= #$040a;  // CYRILLIC CAPITAL LETTER NJE
+    $8d: result:= #$040c;  // CYRILLIC CAPITAL LETTER KJE
+    $8e: result:= #$040b;  // CYRILLIC CAPITAL LETTER TSHE
+    $8f: result:= #$040f;  // CYRILLIC CAPITAL LETTER DZHE
+    $90: result:= #$0452;  // CYRILLIC SMALL LETTER DJE
+    $91: result:= #$2018;  // LEFT SINGLE QUOTATION MARK
+    $92: result:= #$2019;  // RIGHT SINGLE QUOTATION MARK
+    $93: result:= #$201c;  // LEFT DOUBLE QUOTATION MARK
+    $94: result:= #$201d;  // RIGHT DOUBLE QUOTATION MARK
+    $95: result:= #$2022;  // BULLET
+    $96: result:= #$2013;  // EN DASH
+    $97: result:= #$2014;  // EM DASH
+    $98: raise EConvertError.CreateFmt('Invalid cp1251 sequence "%s"',[P]);
+    $99: result:= #$2122;  // TRADE MARK SIGN
+    $9a: result:= #$0459;  // CYRILLIC SMALL LETTER LJE
+    $9b: result:= #$203a;  // SINGLE RIGHT-POINTING ANGLE QUOTATION MARK
+    $9c: result:= #$045a;  // CYRILLIC SMALL LETTER NJE
+    $9d: result:= #$045c;  // CYRILLIC SMALL LETTER KJE
+    $9e: result:= #$045b;  // CYRILLIC SMALL LETTER TSHE
+    $9f: result:= #$045f;  // CYRILLIC SMALL LETTER DZHE
+    $a0: result:= #$00a0;  // NO-BREAK SPACE
+    $a1: result:= #$040e;  // CYRILLIC CAPITAL LETTER SHORT U
+    $a2: result:= #$045e;  // CYRILLIC SMALL LETTER SHORT U
+    $a3: result:= #$0408;  // CYRILLIC CAPITAL LETTER JE
+    $a4: result:= #$00a4;  // CURRENCY SIGN
+    $a5: result:= #$0490;  // CYRILLIC CAPITAL LETTER GHE WITH UPTURN
+    $a8: result:= #$0401;  // CYRILLIC CAPITAL LETTER IO
+    $aa: result:= #$0404;  // CYRILLIC CAPITAL LETTER UKRAINIAN IE
+    $af: result:= #$0407;  // CYRILLIC CAPITAL LETTER YI
+    $b2: result:= #$0406;  // CYRILLIC CAPITAL LETTER BYELORUSSIAN-UKRAINIAN I
+    $b3: result:= #$0456;  // CYRILLIC SMALL LETTER BYELORUSSIAN-UKRAINIAN I
+    $b4: result:= #$0491;  // CYRILLIC SMALL LETTER GHE WITH UPTURN
+    $b8: result:= #$0451;  // CYRILLIC SMALL LETTER IO
+    $b9: result:= #$2116;  // NUMERO SIGN
+    $ba: result:= #$0454;  // CYRILLIC SMALL LETTER UKRAINIAN IE
+    $bc: result:= #$0458;  // CYRILLIC SMALL LETTER JE
+    $bd: result:= #$0405;  // CYRILLIC CAPITAL LETTER DZE
+    $be: result:= #$0455;  // CYRILLIC SMALL LETTER DZE
+    $bf: result:= #$0457;  // CYRILLIC SMALL LETTER YI
+    $c0..$ff:
+      result:= WideChar(ord(P)+$350);
+  else
+    result:= WideChar(ord(P));
+  end;
+end;
+
+function cp1252ToUTF16Char(const P: AnsiChar):WideChar;
+// Provided by Olaf Lösken.
+// Info taken from
+// ftp://ftp.unicode.org/Public/MAPPINGS/VENDORS/MICSFT/WINDOWS/CP1252.TXT
+const
+  sInvalidWindows1252Sequence = 'Invalid Windows-1252 sequence "%s"';
+begin
+  case ord(p) of
+    $80 : result:= #$20AC; //EUROSIGN
+    $81 : raise EConvertError.CreateFmt(sInvalidWindows1252Sequence,[P]);
+    $82 : result:= #$201A; //SINGLE LOW-9 QUOTATION MARK
+    $83 : result:= #$0192; //ATIN SMALL LETTER F WITH HOOK
+    $84 : result:= #$201E; //DOUBLE LOW-9 QUOTATION MARK
+    $85 : result:= #$2026; //HORIZONTAL ELLIPSIS
+    $86 : result:= #$2020; //DAGGER
+    $87 : result:= #$2021; //DOUBLE DAGGER
+    $88 : result:= #$02C6; //MODIFIER LETTER CIRCUMFLEX ACCENT
+    $89 : result:= #$2030; //PER MILLE SIGN
+    $8A : result:= #$0160; //LATIN CAPITAL LETTER S WITH CARON
+    $8B : result:= #$2039; //SINGLE LEFT-POINTING ANGLE QUOTATION MARK
+    $8C : result:= #$0152; //LATIN CAPITAL LIGATURE OE
+    $8D : raise EConvertError.CreateFmt(sInvalidWindows1252Sequence,[P]);
+    $8E : result:= #$017D; //LATIN CAPITAL LETTER Z WITH CARON
+    $8F : raise EConvertError.CreateFmt(sInvalidWindows1252Sequence,[P]);
+    $90 : raise EConvertError.CreateFmt(sInvalidWindows1252Sequence,[P]);
+    $91 : result:= #$2018; //LEFT SINGLE QUOTATION MARK
+    $92 : result:= #$2019; //RIGHT SINGLE QUOTATION MARK
+    $93 : result:= #$201C; //LEFT DOUBLE QUOTATION MARK
+    $94 : result:= #$201D; //RIGHT DOUBLE QUOTATION MARK
+    $95 : result:= #$2022; //BULLET
+    $96 : result:= #$2013; //EN DASH
+    $97 : result:= #$2014; //EM DASH
+    $98 : result:= #$02DC; //SMALL TILDE
+    $99 : result:= #$2122; //TRADE MARK SIGN
+    $9A : result:= #$0161; //LATIN SMALL LETTER S WITH CARON
+    $9B : result:= #$203A; //SINGLE RIGHT-POINTING ANGLE QUOTATION MARK
+    $9C : result:= #$0153; //LATIN SMALL LIGATURE OE
+    $9D : raise EConvertError.CreateFmt(sInvalidWindows1252Sequence,[P]);
+    $9E : result:= #$017E; //LATIN SMALL LETTER Z WITH CARON
+    $9F : result:= #$0178; //LATIN CAPITAL LETTER Y WITH D
+  else
+    Result:= WideChar(ord(P));
+  end;
+end;
+
+function Iso8859_1ToUTF16Str(const s: Ansistring): wideString;
+// Converts an ISO-8859-1 string into an UTF-16 wideString.
+// No special conversions (e.g. on line breaks) are done.
+var
+  i,j: integer;
+begin
+  j:= length(s);
+  setLength(Result,j);
+  for i:= 1 to j do
+    Result[i]:=Iso8859_1ToUTF16Char(s[i]);
+end;
+
+function Iso8859_2ToUTF16Str(const s: Ansistring): wideString;
+// Converts an ISO-8859-2 string into an UTF-16 wideString.
+// No special conversions (e.g. on line breaks) are done.
+var
+  i,j: integer;
+begin
+  j:= length(s);
+  setLength(Result,j);
+  for i:= 1 to j do
+    Result[i]:=Iso8859_2ToUTF16Char(s[i]);
+end;
+
+function Iso8859_3ToUTF16Str(const s: Ansistring): wideString;
+// Converts an ISO-8859-3 string into an UTF-16 wideString.
+// No special conversions (e.g. on line breaks) are done.
+var
+  i,j: integer;
+begin
+  j:= length(s);
+  setLength(Result,j);
+  for i:= 1 to j do
+    Result[i]:=Iso8859_3ToUTF16Char(s[i]);
+end;
+
+function Iso8859_4ToUTF16Str(const s: Ansistring): wideString;
+// Converts an ISO-8859-4 string into an UTF-16 wideString.
+// No special conversions (e.g. on line breaks) are done.
+var
+  i,j: integer;
+begin
+  j:= length(s);
+  setLength(Result,j);
+  for i:= 1 to j do
+    Result[i]:=Iso8859_4ToUTF16Char(s[i]);
+end;
+
+function Iso8859_5ToUTF16Str(const s: Ansistring): wideString;
+// Converts an ISO-8859-5 string into an UTF-16 wideString.
+// No special conversions (e.g. on line breaks) are done.
+var
+  i,j: integer;
+begin
+  j:= length(s);
+  setLength(Result,j);
+  for i:= 1 to j do
+    Result[i]:=Iso8859_5ToUTF16Char(s[i]);
+end;
+
+function Iso8859_6ToUTF16Str(const s: Ansistring): wideString;
+// Converts an ISO-8859-6 string into an UTF-16 wideString.
+// No special conversions (e.g. on line breaks) are done.
+var
+  i,j: integer;
+begin
+  j:= length(s);
+  setLength(Result,j);
+  for i:= 1 to j do
+    Result[i]:=Iso8859_6ToUTF16Char(s[i]);
+end;
+
+function Iso8859_7ToUTF16Str(const s: Ansistring): wideString;
+// Converts an ISO-8859-7 string into an UTF-16 wideString.
+// No special conversions (e.g. on line breaks) are done.
+var
+  i,j: integer;
+begin
+  j:= length(s);
+  setLength(Result,j);
+  for i:= 1 to j do
+    Result[i]:=Iso8859_7ToUTF16Char(s[i]);
+end;
+
+function Iso8859_8ToUTF16Str(const s: Ansistring): wideString;
+// Converts an ISO-8859-8 string into an UTF-16 wideString.
+// No special conversions (e.g. on line breaks) are done.
+var
+  i,j: integer;
+begin
+  j:= length(s);
+  setLength(Result,j);
+  for i:= 1 to j do
+    Result[i]:=Iso8859_8ToUTF16Char(s[i]);
+end;
+
+function Iso8859_9ToUTF16Str(const s: Ansistring): wideString;
+// Converts an ISO-8859-9 string into an UTF-16 wideString.
+// No special conversions (e.g. on line breaks) are done.
+var
+  i,j: integer;
+begin
+  j:= length(s);
+  setLength(Result,j);
+  for i:= 1 to j do
+    Result[i]:=Iso8859_9ToUTF16Char(s[i]);
+end;
+
+function Iso8859_10ToUTF16Str(const s: Ansistring): wideString;
+// Converts an ISO-8859-10 string into an UTF-16 wideString.
+// No special conversions (e.g. on line breaks) are done.
+var
+  i,j: integer;
+begin
+  j:= length(s);
+  setLength(Result,j);
+  for i:= 1 to j do
+    Result[i]:=Iso8859_10ToUTF16Char(s[i]);
+end;
+
+function Iso8859_13ToUTF16Str(const s: Ansistring): wideString;
+// Converts an ISO-8859-13 string into an UTF-16 wideString.
+// No special conversions (e.g. on line breaks) are done.
+var
+  i,j: integer;
+begin
+  j:= length(s);
+  setLength(Result,j);
+  for i:= 1 to j do
+    Result[i]:=Iso8859_13ToUTF16Char(s[i]);
+end;
+
+function Iso8859_14ToUTF16Str(const s: Ansistring): wideString;
+// Converts an ISO-8859-14 string into an UTF-16 wideString.
+// No special conversions (e.g. on line breaks) are done.
+var
+  i,j: integer;
+begin
+  j:= length(s);
+  setLength(Result,j);
+  for i:= 1 to j do
+    Result[i]:=Iso8859_14ToUTF16Char(s[i]);
+end;
+
+function Iso8859_15ToUTF16Str(const s: Ansistring): wideString;
+// Converts an ISO-8859-15 string into an UTF-16 wideString.
+// No special conversions (e.g. on line breaks) are done.
+var
+  i,j: integer;
+begin
+  j:= length(s);
+  setLength(Result,j);
+  for i:= 1 to j do
+    Result[i]:=Iso8859_15ToUTF16Char(s[i]);
+end;
+
+function KOI8_RToUTF16Str(const s: Ansistring): wideString;
+// Converts an KOI8-R string into an UTF-16 wideString.
+// No special conversions (e.g. on line breaks) are done.
+var
+  i,j: integer;
+begin
+  j:= length(s);
+  setLength(Result,j);
+  for i:= 1 to j do
+    Result[i]:=KOI8_RToUTF16Char(s[i]);
+end;
+
+function cp10000_MacRomanToUTF16Str(const s: Ansistring): wideString;
+// Converts an cp10000_MacRoman string into an UTF-16 wideString.
+// No special conversions (e.g. on line breaks) are done.
+var
+  i,j: integer;
+begin
+  j:= length(s);
+  setLength(Result,j);
+  for i:= 1 to j do
+    Result[i]:=cp10000_MacRomanToUTF16Char(s[i]);
+end;
+
+function cp1250ToUTF16Str(const s: Ansistring): wideString;
+// Converts an cp1250 string into an UTF-16 wideString.
+// No special conversions (e.g. on line breaks) are done.
+var
+  i,j: integer;
+begin
+  j:= length(s);
+  setLength(Result,j);
+  for i:= 1 to j do
+    Result[i]:=cp1250ToUTF16Char(s[i]);
+end;
+
+function cp1251ToUTF16Str(const s: Ansistring): wideString;
+// Converts an cp1251 string into an UTF-16 wideString.
+// No special conversions (e.g. on line breaks) are done.
+var
+  i,j: integer;
+begin
+  j:= length(s);
+  setLength(Result,j);
+  for i:= 1 to j do
+    Result[i]:=cp1251ToUTF16Char(s[i]);
+end;
+
+function cp1252ToUTF16Str(const s: Ansistring): wideString;
+// Converts an cp1252 string into an UTF-16 wideString.
+// No special conversions (e.g. on line breaks) are done.
+var
+  i,j: integer;
+begin
+  j:= length(s);
+  setLength(Result,j);
+  for i:= 1 to j do
+    Result[i]:=cp1252ToUTF16Char(s[i]);
+end;
+
+function UTF8ToUTF16BEStr(const s: Ansistring): wideString;
+// Converts an UTF-8 string into an UTF-16 wideString.
+// No special conversions (e.g. on line breaks) and
+// no XML-char checking are done.
+// - This function was provided by Ernst van der Pols -
+// - and slightly modified by Dieter Köhler -
+const
+  MaxCode: array[1..6] of integer = ($7F,$7FF,$FFFF,$1FFFFF,$3FFFFFF,$7FFFFFFF);
+var
+  i, j, CharSize, mask, ucs4: integer;
+  c, first: Ansichar;
+begin
+  setLength(Result,Length(s)+1); // assume no or little above-ASCII-chars
+  j:=0;                          // keep track of actual length
+  i:=0;
+  while i<length(s) do
+  begin
+    Inc(i); c:=s[i];
+    if ord(c)>=$80 then         // UTF-8 sequence
+    begin
+      CharSize:=1;
+      first:=c; mask:=$40; ucs4:=ord(c);
+      if (ord(c) and $C0<>$C0) then
+        raise EConvertError.CreateFmt('Invalid UTF-8 sequence %2.2X',[ord(c)]);
+      while (mask and ord(first)<>0) do
+      begin
+        // read next character of stream
+        if i=length(s) then
+          raise EConvertError.CreateFmt('Aborted UTF-8 sequence "%s"',[Copy(s,i-CharSize,CharSize)]);
+        Inc(i); c:=s[i];
+        if (ord(c) and $C0<>$80) then
+          raise EConvertError.CreateFmt('Invalid UTF-8 sequence $%2.2X',[ord(c)]);
+        ucs4:=(ucs4 shl 6) or (ord(c) and $3F); // add bits to result
+        Inc(CharSize);  // increase sequence length
+        mask:=mask shr 1;    // adjust mask
+      end;
+      if (CharSize>6) then   // no 0 bit in sequence header 'first'
+        raise EConvertError.CreateFmt('Invalid UTF-8 sequence "%s"',[Copy(s,i-CharSize,CharSize)]);
+      ucs4:=ucs4 and MaxCode[CharSize]; // dispose of header bits
+      // check for invalid sequence as suggested by RFC2279
+      if ((CharSize>1) and (ucs4<=MaxCode[CharSize-1])) then
+        raise EConvertError.CreateFmt('Invalid UTF-8 encoding "%s"',[Copy(s,i-CharSize,CharSize)]);
+      // convert non-ASCII UCS-4 to UTF-16 if possible
+      case ucs4 of
+      $00000080..$0000D7FF,$0000E000..$0000FFFD:
+        begin
+          Inc(j); Result[j]:=WideChar(ord(c));
+        end;
+      $0000D800..$0000DFFF,$0000FFFE,$0000FFFF:
+        raise EConvertError.CreateFmt('Invalid UCS-4 character $%8.8X',[ucs4]);
+      $00010000..$0010FFFF:
+        begin
+          // add high surrogate to content as if it was processed earlier
+          Inc(j); Result[j]:= Utf16HighSurrogate(ucs4);  // assign high surrogate
+          Inc(j); Result[j]:= Utf16LowSurrogate(ucs4);   // assign low surrogate
+        end;
+      else // out of UTF-16 range
+        raise EConvertError.CreateFmt('Cannot convert $%8.8X to UTF-16',[ucs4]);
+      end;
+    end
+    else        // ASCII char
+    begin
+      Inc(j); Result[j]:=WideChar(ord(c));
+    end;
+  end;
+  setLength(Result,j); // set to correct length
+end;
+
+function UTF16BEToUTF8Str(const ws: wideString;
+                          const expandLF: boolean): AnsiString;
+var
+  StringStr: TROBinaryMemoryStream;
+  UTF16To8: TUTF16BEToUTF8Stream;
+begin
+  StringStr := TROBinaryMemoryStream.create;
+  try
+    UTF16To8 := TUTF16BEToUTF8Stream.create(StringStr);
+    try
+      UTF16To8.ExpandLF := expandLF;
+      UTF16To8.WriteBuffer(pointer(ws)^, Length(ws) shl 1);
+    finally
+      UTF16To8.Free;
+    end;
+    Result := StringStr.ToString;
+  finally
+    StringStr.Free;
+  end;
+end;
+
+function UTF16To7BitASCIIChar(const P: wideChar): Ansichar;
+begin
+  case ord(p) of
+    $00..$7f: result:= Ansichar(ord(p));
+  else
+    raise EConvertError.CreateFmt('Invalid 7BitASCII sequence "%s"',[P]);
+  end;
+end;
+
+function UTF16ToIso8859_1Char(const P: wideChar): Ansichar;
+begin
+  case ord(p) of
+    $00..$ff: result:= Ansichar(ord(p));
+  else
+   raise EConvertError.CreateFmt('Invalid ISO-8859-1 sequence "%s"',[P]);
+  end;
+end;
+
+function UTF16To7BitASCIIStr(const S: wideString): Ansistring;
+var
+  i,j,start: integer;
+  encType: TdomEncodingType;
+begin
+  j:= length(s);
+  start:= 1;
+  encType:= etUTF16BE;
+  if j > 0 then begin
+    // Byte order mark?
+    if s[1] = #$feff then start:= 2
+    else if s[1] = #$fffe then begin start:= 2; encType:= etUTF16LE; end;
+  end;
+  setLength(Result,j-start+1);
+  if encType = etUTF16BE
+    then for i:= start to j do Result[i]:= UTF16To7BitASCIIChar(s[i])
+    else for i:= start to j do Result[i]:= UTF16To7BitASCIIChar(wideChar(Swap(ord(s[i]))));
+end;
+
+function UTF16ToIso8859_1Str(const S: wideString): Ansistring;
+var
+  i,j,start: integer;
+  encType: TdomEncodingType;
+begin
+  j:= length(s);
+  start:= 1;
+  encType:= etUTF16BE;
+  if j > 0 then begin
+    // Byte order mark?
+    if s[1] = #$feff then start:= 2
+    else if s[1] = #$fffe then begin start:= 2; encType:= etUTF16LE; end;
+  end;
+  setLength(Result,j-start+1);
+  if encType = etUTF16BE
+    then for i:= start to j do Result[i]:= UTF16ToIso8859_1Char(s[i])
+    else for i:= start to j do Result[i]:= UTF16ToIso8859_1Char(wideChar(Swap(ord(s[i]))));
+end;
+
+function Utf16HighSurrogate(const value: integer): WideChar;
+var
+  value2: word;
+begin
+  value2:= ($D7C0 + ( value shr 10 ));
+  Result:= WideChar(value2);
+end;
+
+function Utf16LowSurrogate(const value: integer): WideChar;
+var
+  value2: word;
+begin
+  value2:= ($DC00 XOR (value AND $3FF));
+  Result:= WideChar(value2);
+end;
+
+function Utf16SurrogateToInt(const highSurrogate, lowSurrogate: WideChar): integer;
+begin
+  Result:=  ( (word(highSurrogate) -  $D7C0) shl 10 )
+          + (  word(lowSurrogate) XOR $DC00  );
+end;
+
+function IsUtf16HighSurrogate(const S: WideChar): boolean;
+begin
+  Case Word(S) of
+    $D800..$DBFF: result:= true;
+  else
+    result:= false;
+  end;
+end;
+
+function IsUtf16LowSurrogate(const S: WideChar): boolean;
+begin
+  Case Word(S) of
+    $DC00..$DFFF: result:= true;
+  else
+    result:= false;
+  end;
+end;
+
+
+
+{ TCSMIB }
+
+constructor TCSMIB.Create(AOwner: TComponent);
+begin
+  inherited;
+  Enum:= 3;
+end;
+
+procedure TCSMIB.DoChange(Sender: TObject);
+begin
+  if assigned(FOnChange)
+    then FOnChange(Sender);
+end;
+
+procedure TCSMIB.DoChanging(Sender: TObject; NewEnum: integer;
+  var AllowChange: Boolean);
+begin
+  if assigned(FOnChanging)
+    then FOnChanging(Sender,NewEnum,AllowChange);
+end;
+
+function TCSMIB.GetAlias(i: integer): string;
+begin
+  case FEnum of
+    3: case i of
+      0: result:= 'ANSI_X3.4-1968';
+      1: result:= 'iso-ir-6';
+      2: result:= 'ANSI_X3.4-1986';
+      3: result:= 'ISO_646.irv:1991';
+      4: result:= 'ASCII';
+      5: result:= 'ISO646-US';
+      6: result:= 'US-ASCII';
+      7: result:= 'us';
+      8: result:= 'IBM367';
+      9: result:= 'cp367';
+      10: result:= 'csASCII';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    4: case i of
+      0: result:= 'ISO_8859-1:1987';
+      1: result:= 'iso-ir-100';
+      2: result:= 'ISO_8859-1';
+      3: result:= 'ISO-8859-1';
+      4: result:= 'latin1';
+      5: result:= 'l1';
+      6: result:= 'IBM819';
+      7: result:= 'CP819';
+      8: result:= 'csISOLatin1';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    5: case i of
+      0: result:= 'ISO_8859-2:1987';
+      1: result:= 'iso-ir-101';
+      2: result:= 'ISO_8859-2';
+      3: result:= 'ISO-8859-2';
+      4: result:= 'latin2';
+      5: result:= 'l2';
+      6: result:= 'csISOLatin2';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    6: case i of
+      0: result:= 'ISO_8859-3:1988';
+      1: result:= 'iso-ir-109';
+      2: result:= 'ISO_8859-3';
+      3: result:= 'ISO-8859-3';
+      4: result:= 'latin3';
+      5: result:= 'l3';
+      6: result:= 'csISOLatin3';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    7: case i of
+      0: result:= 'ISO_8859-4:1988';
+      1: result:= 'iso-ir-110';
+      2: result:= 'ISO_8859-4';
+      3: result:= 'ISO-8859-4';
+      4: result:= 'latin4';
+      5: result:= 'l4';
+      6: result:= 'csISOLatin4';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    8: case i of
+      0: result:= 'ISO_8859-5:1988';
+      1: result:= 'iso-ir-144';
+      2: result:= 'ISO_8859-5';
+      3: result:= 'ISO-8859-5';
+      4: result:= 'cyrillic';
+      5: result:= 'csISOLatinCyrillic';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    9: case i of
+      0: result:= 'ISO_8859-6:1987';
+      1: result:= 'iso-ir-127';
+      2: result:= 'ISO_8859-6';
+      3: result:= 'ISO-8859-6';
+      4: result:= 'ECMA-114';
+      5: result:= 'ASMO-708';
+      6: result:= 'arabic';
+      7: result:= 'csISOLatinArabic';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    10: case i of
+      0: result:= 'ISO_8859-7:1987';
+      1: result:= 'iso-ir-126';
+      2: result:= 'ISO_8859-7';
+      3: result:= 'ISO-8859-7';
+      4: result:= 'ELOT_928';
+      5: result:= 'ECMA-118';
+      6: result:= 'greek';
+      7: result:= 'greek8';
+      8: result:= 'csISOLatinGreek';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    11: case i of
+      0: result:= 'ISO_8859-8:1988';
+      1: result:= 'iso-ir-138';
+      2: result:= 'ISO_8859-8';
+      3: result:= 'ISO-8859-8';
+      4: result:= 'hebrew';
+      5: result:= 'csISOLatinHebrew';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    12: case i of
+      0: result:= 'ISO_8859-9:1989';
+      1: result:= 'iso-ir-148';
+      2: result:= 'ISO_8859-9';
+      3: result:= 'ISO-8859-9';
+      4: result:= 'latin5';
+      5: result:= 'l5';
+      6: result:= 'csISOLatin5';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    13: case i of
+      0: result:= 'ISO_8859-10';
+      1: result:= 'iso-ir-157';
+      2: result:= 'l6';
+      3: result:= 'ISO-8859-10:1992';
+      4: result:= 'csISOLatin6';
+      5: result:= 'latin6';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    14: case i of
+      0: result:= 'ISO_6937-2-add';
+      1: result:= 'iso-ir-142';
+      2: result:= 'csISOTextComm';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    15: case i of
+      0: result:= 'JIS_X0201';
+      1: result:= 'X0201';
+      2: result:= 'csHalfWidthKatakana';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    16: case i of
+      0: result:= 'JIS_Encoding';
+      1: result:= 'csJISEncoding';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    17: case i of
+      0: result:= 'Shift_JIS';
+      1: result:= 'MS_Kanji';
+      2: result:= 'csShiftJIS';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    18: case i of
+      0: result:= 'Extended_UNIX_Code_Packed_Format_for_Japanese';
+      1: result:= 'csEUCPPkdFmtJapanese';
+      2: result:= 'EUC-JP';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    19: case i of
+      0: result:= 'Extended_UNIX_Code_Fixed_Width_for_Japanese';
+      1: result:= 'csEUCFixWidJapanese';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    20: case i of
+      0: result:= 'BS_4730';
+      1: result:= 'iso-ir-4';
+      2: result:= 'ISO646-GB';
+      3: result:= 'gb';
+      4: result:= 'uk';
+      5: result:= 'csISO4UnitedKingdom';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    21: case i of
+      0: result:= 'SEN_850200_C';
+      1: result:= 'iso-ir-11';
+      2: result:= 'ISO646-SE2';
+      3: result:= 'se2';
+      4: result:= 'csISO11SwedishForNames';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    22: case i of
+      0: result:= 'IT';
+      1: result:= 'iso-ir-15';
+      2: result:= 'ISO646-IT';
+      3: result:= 'csISO15Italian';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    23: case i of
+      0: result:= 'ES';
+      1: result:= 'iso-ir-17';
+      2: result:= 'ISO646-ES';
+      3: result:= 'csISO17Spanish';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    24: case i of
+      0: result:= 'DIN_66003';
+      1: result:= 'iso-ir-21';
+      2: result:= 'de';
+      3: result:= 'ISO646-DE';
+      4: result:= 'csISO21German';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    25: case i of
+      0: result:= 'NS_4551-1';
+      1: result:= 'iso-ir-60';
+      2: result:= 'ISO646-NO';
+      3: result:= 'no';
+      4: result:= 'csISO60Danish-Norwegian';
+      5: result:= 'csISO60Norwegian1';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    26: case i of
+      0: result:= 'NF_Z_62-010';
+      1: result:= 'iso-ir-69';
+      2: result:= 'ISO646-FR';
+      3: result:= 'fr';
+      4: result:= 'csISO69French';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    27: case i of
+      0: result:= 'ISO-10646-UTF-1';
+      1: result:= 'csISO10646UTF1';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    28: case i of
+      0: result:= 'ISO_646.basic:1983';
+      1: result:= 'ref';
+      2: result:= 'csISO646basic1983';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    29: case i of
+      0: result:= 'INVARIANT';
+      1: result:= 'csINVARIANT';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    30: case i of
+      0: result:= 'ISO_646.irv:1983';
+      1: result:= 'iso-ir-2';
+      2: result:= 'irv';
+      3: result:= 'csISO2Int1RefVersion';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    31: case i of
+      0: result:= 'NATS-SEFI';
+      1: result:= 'iso-ir-8-1';
+      2: result:= 'csNATSSEFI';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    32: case i of
+      0: result:= 'NATS-SEFI-ADD';
+      1: result:= 'iso-ir-8-2';
+      2: result:= 'csNATSSEFIADD';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    33: case i of
+      0: result:= 'NATS-DANO';
+      1: result:= 'iso-ir-9-1';
+      2: result:= 'csNATSDANO';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    34: case i of
+      0: result:= 'NATS-DANO-ADD';
+      1: result:= 'iso-ir-9-2';
+      2: result:= 'csNATSDANOADD';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    35: case i of
+      0: result:= 'SEN_850200_B';
+      1: result:= 'iso-ir-10';
+      2: result:= 'FI';
+      3: result:= 'ISO646-FI';
+      4: result:= 'ISO646-SE';
+      5: result:= 'se';
+      6: result:= 'csISO10Swedish';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    36: case i of
+      0: result:= 'KS_C_5601-1987';
+      1: result:= 'iso-ir-149';
+      2: result:= 'KS_C_5601-1989';
+      3: result:= 'KSC_5601';
+      4: result:= 'korean';
+      5: result:= 'csKSC56011987';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    37: case i of
+      0: result:= 'ISO-2022-KR';
+      1: result:= 'csISO2022KR';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    38: case i of
+      0: result:= 'EUC-KR';
+      1: result:= 'csEUCKR';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    39: case i of
+      0: result:= 'ISO-2022-JP';
+      1: result:= 'csISO2022JP';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    40: case i of
+      0: result:= 'ISO-2022-JP-2';
+      1: result:= 'csISO2022JP2';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    41: case i of
+      0: result:= 'JIS_C6220-1969-jp';
+      1: result:= 'JIS_C6220-1969';
+      2: result:= 'iso-ir-13';
+      3: result:= 'katakana';
+      4: result:= 'x0201-7';
+      5: result:= 'csISO13JISC6220jp';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    42: case i of
+      0: result:= 'JIS_C6220-1969-ro';
+      1: result:= 'iso-ir-14';
+      2: result:= 'jp';
+      3: result:= 'ISO646-JP';
+      4: result:= 'csISO14JISC6220ro';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    43: case i of
+      0: result:= 'PT';
+      1: result:= 'iso-ir-16';
+      2: result:= 'ISO646-PT';
+      3: result:= 'csISO16Portuguese';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    44: case i of
+      0: result:= 'greek7-old';
+      1: result:= 'iso-ir-18';
+      2: result:= 'csISO18Greek7Old';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    45: case i of
+      0: result:= 'latin-greek';
+      1: result:= 'iso-ir-19';
+      2: result:= 'csISO19LatinGreek';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    46: case i of
+      0: result:= 'NF_Z_62-010_(1973)';
+      1: result:= 'iso-ir-25';
+      2: result:= 'ISO646-FR1';
+      3: result:= 'csISO25French';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    47: case i of
+      0: result:= 'Latin-greek-1';
+      1: result:= 'iso-ir-27';
+      2: result:= 'csISO27LatinGreek1';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    48: case i of
+      0: result:= 'ISO_5427';
+      1: result:= 'iso-ir-37';
+      2: result:= 'csISO5427Cyrillic';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    49: case i of
+      0: result:= 'JIS_C6226-1978';
+      1: result:= 'iso-ir-42';
+      2: result:= 'csISO42JISC62261978';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    50: case i of
+      0: result:= 'BS_viewdata';
+      1: result:= 'iso-ir-47';
+      2: result:= 'csISO47BSViewdata';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    51: case i of
+      0: result:= 'INIS';
+      1: result:= 'iso-ir-49';
+      2: result:= 'csISO49INIS';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    52: case i of
+      0: result:= 'INIS-8';
+      1: result:= 'iso-ir-50';
+      2: result:= 'csISO50INIS8';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    53: case i of
+      0: result:= 'INIS-cyrillic';
+      1: result:= 'iso-ir-51';
+      2: result:= 'csISO51INISCyrillic';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    54: case i of
+      0: result:= 'ISO_5427:1981';
+      1: result:= 'iso-ir-54';
+      2: result:= 'ISO5427Cyrillic1981';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    55: case i of
+      0: result:= 'ISO_5428:1980';
+      1: result:= 'iso-ir-55';
+      2: result:= 'csISO5428Greek';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    56: case i of
+      0: result:= 'GB_1988-80';
+      1: result:= 'iso-ir-57';
+      2: result:= 'cn';
+      3: result:= 'ISO646-CN';
+      4: result:= 'csISO57GB1988';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    57: case i of
+      0: result:= 'GB_2312-80';
+      1: result:= 'iso-ir-58';
+      2: result:= 'chinese';
+      3: result:= 'csISO58GB231280';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    58: case i of
+      0: result:= 'NS_4551-2';
+      1: result:= 'ISO646-NO2';
+      2: result:= 'iso-ir-61';
+      3: result:= 'no2';
+      4: result:= 'csISO61Norwegian2';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    59: case i of
+      0: result:= 'videotex-suppl';
+      1: result:= 'iso-ir-70';
+      2: result:= 'csISO70VideotexSupp1';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    60: case i of
+      0: result:= 'PT2';
+      1: result:= 'iso-ir-84';
+      2: result:= 'ISO646-PT2';
+      3: result:= 'csISO84Portuguese2';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    61: case i of
+      0: result:= 'ES2';
+      1: result:= 'iso-ir-85';
+      2: result:= 'ISO646-ES2';
+      3: result:= 'csISO85Spanish2';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    62: case i of
+      0: result:= 'MSZ_7795.3';
+      1: result:= 'iso-ir-86';
+      2: result:= 'ISO646-HU';
+      3: result:= 'hu';
+      4: result:= 'csISO86Hungarian';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    63: case i of
+      0: result:= 'JIS_C6226-1983';
+      1: result:= 'iso-ir-87';
+      2: result:= 'x0208';
+      3: result:= 'JIS_X0208-1983';
+      4: result:= 'csISO87JISX0208';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    64: case i of
+      0: result:= 'greek7';
+      1: result:= 'iso-ir-88';
+      2: result:= 'csISO88Greek7';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    65: case i of
+      0: result:= 'ASMO_449';
+      1: result:= 'ISO_9036';
+      2: result:= 'arabic7';
+      3: result:= 'iso-ir-89';
+      4: result:= 'csISO89ASMO449';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    66: case i of
+      0: result:= 'iso-ir-90';
+      1: result:= 'csISO90';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    67: case i of
+      0: result:= 'JIS_C6229-1984-a';
+      1: result:= 'iso-ir-91';
+      2: result:= 'jp-ocr-a';
+      3: result:= 'csISO91JISC62291984a';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    68: case i of
+      0: result:= 'JIS_C6229-1984-b';
+      1: result:= 'iso-ir-92';
+      2: result:= 'ISO646-JP-OCR-B';
+      3: result:= 'jp-ocr-b';
+      4: result:= 'csISO92JISC62291984b';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    69: case i of
+      0: result:= 'JIS_C6229-1984-b-add';
+      1: result:= 'iso-ir-93';
+      2: result:= 'jp-ocr-b-add';
+      3: result:= 'csISO93JISC62291984badd';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    70: case i of
+      0: result:= 'JIS_C6229-1984-hand';
+      1: result:= 'iso-ir-94';
+      2: result:= 'jp-ocr-hand';
+      3: result:= 'csISO94JISC62291984hand';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    71: case i of
+      0: result:= 'JIS_C6229-1984-hand-add';
+      1: result:= 'iso-ir-95';
+      2: result:= 'jp-ocr-hand-add';
+      3: result:= 'csISO95JISC62291984handadd';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    72: case i of
+      0: result:= 'JIS_C6229-1984-kana';
+      1: result:= 'iso-ir-96';
+      2: result:= 'jp-ocr-hand';
+      3: result:= 'csISO96JISC62291984kana';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    73: case i of
+      0: result:= 'ISO_2033-1983';
+      1: result:= 'iso-ir-98';
+      2: result:= 'e13b';
+      3: result:= 'csISO2033';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    74: case i of
+      0: result:= 'ANSI_X3.110-1983';
+      1: result:= 'iso-ir-99';
+      2: result:= 'CSA_T500-1983';
+      3: result:= 'NAPLPS';
+      4: result:= 'csISO99NAPLPS';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    75: case i of
+      0: result:= 'T.61-7bit';
+      1: result:= 'iso-ir-102';
+      2: result:= 'csISO102T617bit';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    76: case i of
+      0: result:= 'T.61-8bit';
+      1: result:= 'T.61';
+      2: result:= 'iso-ir-103';
+      3: result:= 'csISO103T618bit';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    77: case i of
+      0: result:= 'ECMA-cyrillic';
+      1: result:= 'iso-ir-111';
+      2: result:= 'csISO111ECMACyrillic';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    78: case i of
+      0: result:= 'CSA_Z243.4-1985-1';
+      1: result:= 'iso-ir-121';
+      2: result:= 'ISO646-CA';
+      3: result:= 'csa7-1';
+      4: result:= 'ca';
+      5: result:= 'csISO121Canadian1';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    79: case i of
+      0: result:= 'CSA_Z243.4-1985-2';
+      1: result:= 'iso-ir-122';
+      2: result:= 'ISO646-CA2';
+      3: result:= 'csa7-2';
+      4: result:= 'csISO122Canadian2';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    80: case i of
+      0: result:= 'CSA_Z243.4-1985-gr';
+      1: result:= 'iso-ir-123';
+      2: result:= 'csISO123CSAZ24341985gr';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    81: case i of
+      0: result:= 'ISO_8859-6-E';
+      1: result:= 'csISO88596E';
+      2: result:= 'ISO-8859-6-E';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    82: case i of
+      0: result:= 'ISO_8859-6-I';
+      1: result:= 'csISO88596I';
+      2: result:= 'ISO-8859-6-I';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    83: case i of
+      0: result:= 'T.101-G2';
+      1: result:= 'iso-ir-128';
+      2: result:= 'csISO128T101G2';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    84: case i of
+      0: result:= 'ISO_8859-8-E';
+      1: result:= 'csISO88598E';
+      2: result:= 'ISO-8859-8-E';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    85: case i of
+      0: result:= 'ISO_8859-8-I';
+      1: result:= 'csISO88598I';
+      2: result:= 'ISO-8859-8-I';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    86: case i of
+      0: result:= 'CSN_369103';
+      1: result:= 'iso-ir-139';
+      2: result:= 'csISO139CSN369103';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    87: case i of
+      0: result:= 'JUS_I.B1.002';
+      1: result:= 'iso-ir-141';
+      2: result:= 'ISO646-YU';
+      3: result:= 'js';
+      4: result:= 'yu';
+      5: result:= 'csISO141JUSIB1002';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    88: case i of
+      0: result:= 'IEC_P27-1';
+      1: result:= 'iso-ir-143';
+      2: result:= 'csISO143IECP271';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    89: case i of
+      0: result:= 'JUS_I.B1.003-serb';
+      1: result:= 'iso-ir-146';
+      2: result:= 'serbian';
+      3: result:= 'csISO146Serbian';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    90: case i of
+      0: result:= 'JUS_I.B1.003-mac';
+      1: result:= 'macedonian';
+      2: result:= 'iso-ir-147';
+      3: result:= 'csISO147Macedonian';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    91: case i of
+      0: result:= 'greek-ccitt';
+      1: result:= 'iso-ir-150';
+      2: result:= 'csISO150';
+      3: result:= 'csISO150GreekCCITT';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    92: case i of
+      0: result:= 'NC_NC00-10:81';
+      1: result:= 'cuba';
+      2: result:= 'iso-ir-151';
+      3: result:= 'ISO646-CU';
+      4: result:= 'csISO151Cuba';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    93: case i of
+      0: result:= 'ISO_6937-2-25';
+      1: result:= 'iso-ir-152';
+      2: result:= 'csISO6937Add';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    94: case i of
+      0: result:= 'GOST_19768-74';
+      1: result:= 'ST_SEV_358-88';
+      2: result:= 'iso-ir-153';
+      3: result:= 'csISO153GOST1976874';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    95: case i of
+      0: result:= 'ISO_8859-supp';
+      1: result:= 'iso-ir-154';
+      2: result:= 'latin1-2-5';
+      3: result:= 'csISO8859Supp';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    96: case i of
+      0: result:= 'ISO_10367-box';
+      1: result:= 'iso-ir-155';
+      2: result:= 'csISO10367Box';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    97: case i of
+      0: result:= 'latin-lap';
+      1: result:= 'lap';
+      2: result:= 'iso-ir-158';
+      3: result:= 'csISO158Lap';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    98: case i of
+      0: result:= 'JIS_X0212-1990';
+      1: result:= 'x0212';
+      2: result:= 'iso-ir-159';
+      3: result:= 'csISO159JISX02121990';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    99: case i of
+      0: result:= 'DS_2089';
+      1: result:= 'DS2089';
+      2: result:= 'ISO646-DK';
+      3: result:= 'dk';
+      4: result:= 'csISO646Danish';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    100: case i of
+      0: result:= 'us-dk';
+      1: result:= 'csUSDK';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    101: case i of
+      0: result:= 'dk-us';
+      1: result:= 'csDKUS';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    102: case i of
+      0: result:= 'KSC5636';
+      1: result:= 'ISO646-KR';
+      2: result:= 'csKSC5636';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    103: case i of
+      0: result:= 'UNICODE-1-1-UTF-7';
+      1: result:= 'csUnicode11UTF7';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    104: case i of
+      0: result:= 'ISO-2022-CN';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    105: case i of
+      0: result:= 'ISO-2022-CN-EXT';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    106: case i of
+      0: result:= 'UTF-8';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    109: case i of
+      0: result:= 'ISO-8859-13';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    110: case i of
+      0: result:= 'ISO-8859-14';
+      1: result:= 'iso-ir-199';
+      2: result:= 'ISO_8859-14:1998';
+      3: result:= 'ISO_8859-14';
+      4: result:= 'latin8';
+      5: result:= 'iso-celtic';
+      6: result:= 'l8';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    111: case i of
+      0: result:= 'ISO-8859-15';
+      1: result:= 'ISO_8869-15';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    112: case i of
+      0: result:= 'ISO-8859-16';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    1000: case i of
+      0: result:= 'ISO-10646-UCS-2';
+      1: result:= 'csUnicode';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    1001: case i of
+      0: result:= 'ISO-10646-UCS-4';
+      1: result:= 'csUCS4';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    1002: case i of
+      0: result:= 'ISO-10646-UCS-Basic';
+      1: result:= 'csUnicodeASCII';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    1003: case i of
+      0: result:= 'ISO-10646-Unicode-Latin1';
+      1: result:= 'csUnicodeLatin1';
+      2: result:= 'ISO-10646';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    1004: case i of
+      0: result:= 'ISO-10646-J-1';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    1005: case i of
+      0: result:= 'ISO-Unicode-IBM-1261';
+      1: result:= 'csUnicodeIBM1261';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    1006: case i of
+      0: result:= 'ISO-Unicode-IBM-1268';
+      1: result:= 'csUnicodeIBM1268';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    1007: case i of
+      0: result:= 'ISO-Unicode-IBM-1276';
+      1: result:= 'csUnicodeIBM1276';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    1008: case i of
+      0: result:= 'ISO-Unicode-IBM-1264';
+      1: result:= 'csUnicodeIBM1264';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    1009: case i of
+      0: result:= 'ISO-Unicode-IBM-1265';
+      1: result:= 'csUnicodeIBM1265';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    1010: case i of
+      0: result:= 'UNICODE-1-1';
+      1: result:= 'csUnicode11';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    1011: case i of
+      0: result:= 'SCSU';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    1012: case i of
+      0: result:= 'UTF-7';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    1013: case i of
+      0: result:= 'UTF-16BE';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    1014: case i of
+      0: result:= 'UTF-16LE';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    1015: case i of
+      0: result:= 'UTF-16';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2000: case i of
+      0: result:= 'ISO-8859-1-Windows-3.0-Latin-1';
+      1: result:= 'csWindows30Latin1';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2001: case i of
+      0: result:= 'ISO-8859-1-Windows-3.1-Latin-1';
+      1: result:= 'csWindows31Latin1';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2002: case i of
+      0: result:= 'ISO-8859-2-Windows-Latin-2';
+      1: result:= 'csWindows31Latin2';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2003: case i of
+      0: result:= 'ISO-8859-9-Windows-Latin-5';
+      1: result:= 'csWindows31Latin5';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2004: case i of
+      0: result:= 'hp-roman8';
+      1: result:= 'roman8';
+      2: result:= 'r8';
+      3: result:= 'csHPRoman8';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2005: case i of
+      0: result:= 'Adobe-Standard-Encoding';
+      1: result:= 'csAdobeStandardEncoding';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2006: case i of
+      0: result:= 'Ventura-US';
+      1: result:= 'csVenturaUS';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2007: case i of
+      0: result:= 'Ventura-International';
+      1: result:= 'csVenturaInternational';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2008: case i of
+      0: result:= 'DEC-MCS';
+      1: result:= 'dec';
+      2: result:= 'csDECMCS';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2009: case i of
+      0: result:= 'IBM850';
+      1: result:= 'cp850';
+      2: result:= '850';
+      3: result:= 'csPC850Multilingual';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2010: case i of
+      0: result:= 'IBM852';
+      1: result:= 'cp852';
+      2: result:= '852';
+      3: result:= 'csPCp852';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2011: case i of
+      0: result:= 'IBM437';
+      1: result:= 'cp437';
+      2: result:= '437';
+      3: result:= 'csPC8CodePage437';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2012: case i of
+      0: result:= 'PC8-Danish-Norwegian';
+      1: result:= 'csPC8DanishNorwegian';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2013: case i of
+      0: result:= 'IBM862';
+      1: result:= 'cp862';
+      2: result:= '862';
+      3: result:= 'csPC862LatinHebrew';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2014: case i of
+      0: result:= 'PC8-Turkish';
+      1: result:= 'csPC8Turkish';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2015: case i of
+      0: result:= 'IBM-Symbols';
+      1: result:= 'csIBMSymbols';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2016: case i of
+      0: result:= 'IBM-Thai';
+      1: result:= 'csIBMThai';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2017: case i of
+      0: result:= 'HP-Legal';
+      1: result:= 'csHPLegal';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2018: case i of
+      0: result:= 'HP-Pi-font';
+      1: result:= 'csHPPiFont';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2019: case i of
+      0: result:= 'HP-Math8';
+      1: result:= 'csHPMath8';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2020: case i of
+      0: result:= 'Adobe-Symbol-Encoding';
+      1: result:= 'csHPPSMath';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2021: case i of
+      0: result:= 'HP-DeskTop';
+      1: result:= 'csHPDesktop';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2022: case i of
+      0: result:= 'Ventura-Math';
+      1: result:= 'csVenturaMath';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2023: case i of
+      0: result:= 'Microsoft-Publishing';
+      1: result:= 'csMicrosoftPublishing';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2024: case i of
+      0: result:= 'Windows-31J';
+      1: result:= 'csWindows31J';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2025: case i of
+      0: result:= 'GB2312';
+      1: result:= 'csGB2312';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2026: case i of
+      0: result:= 'Big5';
+      1: result:= 'csBig5';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2027: case i of
+      0: result:= 'macintosh';
+      1: result:= 'mac';
+      2: result:= 'csMacintosh';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2028: case i of
+      0: result:= 'IBM037';
+      1: result:= 'cp037';
+      2: result:= 'ebcdic-cp-us';
+      3: result:= 'ebcdic-cp-ca';
+      4: result:= 'ebcdic-cp-wt';
+      5: result:= 'ebcdic-cp-nl';
+      6: result:= 'csIBM037';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2029: case i of
+      0: result:= 'IBM038';
+      1: result:= 'EBCDIC-INT';
+      2: result:= 'cp038';
+      3: result:= 'csIBM038';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2030: case i of
+      0: result:= 'IBM273';
+      1: result:= 'CP273';
+      2: result:= 'csIBM273';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2031: case i of
+      0: result:= 'IBM274';
+      1: result:= 'EBCDIC-BE';
+      2: result:= 'CP274';
+      3: result:= 'csIBM274';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2032: case i of
+      0: result:= 'IBM275';
+      1: result:= 'EBCDIC-BR';
+      2: result:= 'cp275';
+      3: result:= 'csIBM275';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2033: case i of
+      0: result:= 'IBM277';
+      1: result:= 'EBCDIC-CP-DK';
+      2: result:= 'EBCDIC-CP-NO';
+      3: result:= 'csIBM277';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2034: case i of
+      0: result:= 'IBM278';
+      1: result:= 'CP278';
+      2: result:= 'ebcdic-cp-fi';
+      3: result:= 'ebcdic-cp-se';
+      4: result:= 'csIBM278';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2035: case i of
+      0: result:= 'IBM280';
+      1: result:= 'CP280';
+      2: result:= 'ebcdic-cp-it';
+      3: result:= 'csIBM280';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2036: case i of
+      0: result:= 'IBM281';
+      1: result:= 'EBCDIC-JP-E';
+      2: result:= 'cp281';
+      3: result:= 'csIBM281';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2037: case i of
+      0: result:= 'IBM284';
+      1: result:= 'CP284';
+      2: result:= 'ebcdic-cp-es';
+      3: result:= 'csIBM284';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2038: case i of
+      0: result:= 'IBM285';
+      1: result:= 'CP285';
+      2: result:= 'ebcdic-cp-gb';
+      3: result:= 'csIBM285';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2039: case i of
+      0: result:= 'IBM290';
+      1: result:= 'cp290';
+      2: result:= 'EBCDIC-JP-kana';
+      3: result:= 'csIBM290';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2040: case i of
+      0: result:= 'IBM297';
+      1: result:= 'cp297';
+      2: result:= 'ebcdic-cp-fr';
+      3: result:= 'csIBM297';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2041: case i of
+      0: result:= 'IBM420';
+      1: result:= 'cp420';
+      2: result:= 'ebcdic-cp-ar1';
+      3: result:= 'csIBM420';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2042: case i of
+      0: result:= 'IBM423';
+      1: result:= 'cp423';
+      2: result:= 'ebcdic-cp-gr';
+      3: result:= 'csIBM423';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2043: case i of
+      0: result:= 'IBM424';
+      1: result:= 'cp424';
+      2: result:= 'ebcdic-cp-he';
+      3: result:= 'csIBM424';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2044: case i of
+      0: result:= 'IBM500';
+      1: result:= 'CP500';
+      2: result:= 'ebcdic-cp-be';
+      3: result:= 'ebcdic-cp-ch';
+      4: result:= 'csIBM500';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2045: case i of
+      0: result:= 'IBM851';
+      1: result:= 'cp851';
+      2: result:= '851';
+      3: result:= 'csIBM851';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2046: case i of
+      0: result:= 'IBM855';
+      1: result:= 'cp855';
+      2: result:= '855';
+      3: result:= 'csIBM855';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2047: case i of
+      0: result:= 'IBM857';
+      1: result:= 'cp857';
+      2: result:= '857';
+      3: result:= 'csIBM857';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2048: case i of
+      0: result:= 'IBM860';
+      1: result:= 'cp860';
+      2: result:= '860';
+      3: result:= 'csIBM860';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2049: case i of
+      0: result:= 'IBM861';
+      1: result:= 'cp861';
+      2: result:= '861';
+      3: result:= 'cp-is';
+      4: result:= 'csIBM861';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2050: case i of
+      0: result:= 'IBM863';
+      1: result:= 'cp863';
+      2: result:= '863';
+      3: result:= 'csIBM863';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2051: case i of
+      0: result:= 'IBM864';
+      1: result:= 'cp864';
+      2: result:= 'csIBM864';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2052: case i of
+      0: result:= 'IBM865';
+      1: result:= 'cp865';
+      2: result:= '865';
+      3: result:= 'csIBM865';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2053: case i of
+      0: result:= 'IBM868';
+      1: result:= 'CP868';
+      2: result:= 'cp-ar';
+      3: result:= 'csIBM868';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2054: case i of
+      0: result:= 'IBM869';
+      1: result:= 'cp869';
+      2: result:= '869';
+      3: result:= 'cp-gr';
+      4: result:= 'csIBM869';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2055: case i of
+      0: result:= 'IBM870';
+      1: result:= 'CP870';
+      2: result:= 'ebcdic-cp-roece';
+      3: result:= 'ebcdic-cp-yu';
+      4: result:= 'csIBM870';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2056: case i of
+      0: result:= 'IBM871';
+      1: result:= 'CP871';
+      2: result:= 'ebcdic-cp-is';
+      3: result:= 'csIBM871';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2057: case i of
+      0: result:= 'IBM880';
+      1: result:= 'cp880';
+      2: result:= 'EBCDIC-Cyrillic';
+      3: result:= 'csIBM880';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2058: case i of
+      0: result:= 'IBM891';
+      1: result:= 'cp891';
+      2: result:= 'csIBM891';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2059: case i of
+      0: result:= 'IBM903';
+      1: result:= 'cp903';
+      2: result:= 'csIBM903';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2060: case i of
+      0: result:= 'IBM904';
+      1: result:= 'cp904';
+      2: result:= '904';
+      3: result:= 'csIBM904';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2061: case i of
+      0: result:= 'IBM905';
+      1: result:= 'CP905';
+      2: result:= 'ebcdic-cp-tr';
+      3: result:= 'csIBM905';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2062: case i of
+      0: result:= 'IBM918';
+      1: result:= 'CP918';
+      2: result:= 'ebcdic-cp-ar2';
+      3: result:= 'csIBM918';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2063: case i of
+      0: result:= 'IBM1026';
+      1: result:= 'CP1026';
+      2: result:= 'csIBM1026';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2064: case i of
+      0: result:= 'EBCDIC-AT-DE';
+      1: result:= 'csIBMEBCDICATDE';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2065: case i of
+      0: result:= 'EBCDIC-AT-DE-A';
+      1: result:= 'csIBMEBCDICATDEA';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2066: case i of
+      0: result:= 'EBCDIC-CA-FR';
+      1: result:= 'csIBMEBCDICCAFR';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2067: case i of
+      0: result:= 'EBCDIC-DK-NO';
+      1: result:= 'csIBMEBCDICDKNO';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2068: case i of
+      0: result:= 'EBCDIC-DK-NO-A';
+      1: result:= 'csIBMEBCDICDKNOA';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2069: case i of
+      0: result:= 'EBCDIC-FI-SE';
+      1: result:= 'csIBMEBCDICFISE';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2070: case i of
+      0: result:= 'EBCDIC-FI-SE-A';
+      1: result:= 'csIBMEBCDICFISEA';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2071: case i of
+      0: result:= 'EBCDIC-FR';
+      1: result:= 'csIBMEBCDICFR';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2072: case i of
+      0: result:= 'EBCDIC-IT';
+      1: result:= 'csIBMEBCDICIT';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2073: case i of
+      0: result:= 'EBCDIC-PT';
+      1: result:= 'csIBMEBCDICPT';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2074: case i of
+      0: result:= 'EBCDIC-ES';
+      1: result:= 'csIBMEBCDICES';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2075: case i of
+      0: result:= 'EBCDIC-ES-A';
+      1: result:= 'csIBMEBCDICESA';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2076: case i of
+      0: result:= 'EBCDIC-ES-S';
+      1: result:= 'csIBMEBCDICESS';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2077: case i of
+      0: result:= 'EBCDIC-UK';
+      1: result:= 'csIBMEBCDICUK';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2078: case i of
+      0: result:= 'EBCDIC-US';
+      1: result:= 'csIBMEBCDICUS';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2079: case i of
+      0: result:= 'UNKNOWN-8BIT';
+      1: result:= 'csUnkown8Bit';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2080: case i of
+      0: result:= 'MNEMONIC';
+      1: result:= 'csMnemonic';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2081: case i of
+      0: result:= 'MNEM';
+      1: result:= 'csMnem';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2082: case i of
+      0: result:= 'VISCII';
+      1: result:= 'csVISCII';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2083: case i of
+      0: result:= 'VIQR';
+      1: result:= 'csVIQR';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2084: case i of
+      0: result:= 'KOI8-R';
+      1: result:= 'csKOI8R';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2085: case i of
+      0: result:= 'HZ-GB-2312';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2086: case i of
+      0: result:= 'IBM866';
+      1: result:= 'cp866';
+      2: result:= '866';
+      3: result:= 'csIBM866';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2087: case i of
+      0: result:= 'IBM775';
+      1: result:= 'cp775';
+      2: result:= 'csPC775Baltic';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2088: case i of
+      0: result:= 'KOI8-U';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2089: case i of
+      0: result:= 'IBM00858';
+      1: result:= 'CCSID00858';
+      2: result:= 'CP00858';
+      3: result:= 'PC-Multilingual-850+euro';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2090: case i of
+      0: result:= 'IBM00924';
+      1: result:= 'CCSID00924';
+      2: result:= 'CP00924';
+      3: result:= 'ebcdic-Latin9--euro';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2091: case i of
+      0: result:= 'IBM01140';
+      1: result:= 'CCSID01140';
+      2: result:= 'CP01140';
+      3: result:= 'ebcdic-us-37+euro';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2092: case i of
+      0: result:= 'IBM01141';
+      1: result:= 'CCSID01141';
+      2: result:= 'CP01141';
+      3: result:= 'ebcdic-de-273+euro';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2093: case i of
+      0: result:= 'IBM01142';
+      1: result:= 'CCSID01142';
+      2: result:= 'CP01142';
+      3: result:= 'ebcdic-dk-277+euro';
+      4: result:= 'ebcdic-no-277+euro';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2094: case i of
+      0: result:= 'IBM01143';
+      1: result:= 'CCSID01143';
+      2: result:= 'CP01143';
+      3: result:= 'ebcdic-fi-278+euro';
+      4: result:= 'ebcdic-se-278+euro';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2095: case i of
+      0: result:= 'IBM01144';
+      1: result:= 'CCSID01144';
+      2: result:= 'CP01144';
+      3: result:= 'ebcdic-it-280+euro';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2096: case i of
+      0: result:= 'IBM01145';
+      1: result:= 'CCSID01145';
+      2: result:= 'CP01145';
+      3: result:= 'ebcdic-es-284+euro';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2097: case i of
+      0: result:= 'IBM01146';
+      1: result:= 'CCSID01146';
+      2: result:= 'CP01146';
+      3: result:= 'ebcdic-gb-285+euro';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2098: case i of
+      0: result:= 'IBM01147';
+      1: result:= 'CCSID01147';
+      2: result:= 'CP01147';
+      3: result:= 'ebcdic-fr-297+euro';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2099: case i of
+      0: result:= 'IBM01148';
+      1: result:= 'CCSID01148';
+      2: result:= 'CP01148';
+      3: result:= 'ebcdic-international-500+euro';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2100: case i of
+      0: result:= 'IBM01149';
+      1: result:= 'CCSID01149';
+      2: result:= 'CP01149';
+      3: result:= 'ebcdic-is-871+euro';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2101: case i of
+      0: result:= 'Big5-HKSCS';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2250: case i of
+      0: result:= 'windows-1250';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2251: case i of
+      0: result:= 'windows-1251';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2252: case i of
+      0: result:= 'windows-1252';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2253: case i of
+      0: result:= 'windows-1253';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2254: case i of
+      0: result:= 'windows-1254';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2255: case i of
+      0: result:= 'windows-1255';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2256: case i of
+      0: result:= 'windows-1256';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2257: case i of
+      0: result:= 'windows-1257';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2258: case i of
+      0: result:= 'windows-1258';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+    2259: case i of
+      0: result:= 'TIS-620';
+    else
+      raise ECSMIBException.Create('Invalid MIB number');
+    end;
+  else
+    raise ECSMIBException.Create('Invalid MIB number');
+  end;
+end;
+
+function TCSMIB.GetAliasCount: integer;
+begin
+  case FEnum of
+    104..106,109,112,1004,1011..1015,2085,2088,2101,2250..2259: result:= 1;
+    16,19,27,29,37..40,66,100..101,103,111,1000..1002,1005..1010,2000..2003,2005..2007,2012,2014..2026,2064..2084: result:= 2;
+    14..15,17..18,28,31..34,44..45,47..55,59,64,72,75,77,80..86,88,93,96,102,1003,2008,2027,2030,2051,2058..2059,2063,2087: result:= 3;
+    22..23,30,43,46,57,60..61,67,69..71,73,76,89..91,94..95,97..98,2004,2009..2011,2013,2029,2031..2033,2035..2043,2045..2048,2050,2052..2053,2056..2057,2060..2062,2086,2089..2092,2095..2100: result:= 4;
+    21,24,26,42,56,58,62..63,65,68,74,79,92,99,2034,2044,2049,2054..2055,2093..2094: result:= 5;
+    8,11,13,20,25,36,41,78,87: result:= 6;
+    5..7,12,35,110,2028: result:= 7;
+    9: result:= 8;
+    4,10: result:= 9;
+    3: result:= 11;
+  else
+    raise ECSMIBException.Create('Invalid MIB number');
+  end;
+end;
+
+function TCSMIB.GetPrfMIMEName: string;
+begin
+  case FEnum of
+  13,17,37..40,2025..2026,2084: result:= Alias[0];
+  18,82,84..85: result:= Alias[2];
+  4..12: result:= Alias[3];
+  3: result:= Alias[6];
+  else
+    result:= '';
+  end;
+end;
+
+function TCSMIB.IsValidEnum(const Value: integer): boolean;
+begin
+  case Value of
+    3..106,109..112,1000..1015,2000..2101,2250..2259:
+      result:= true;
+  else
+    result:= false;
+  end;
+end;
+
+procedure TCSMIB.SetEnum(const Value: integer);
+var
+  AllowChange: boolean;
+begin
+  if IsValidEnum(Value) then begin
+    if FEnum = Value then exit;
+    AllowChange:= True;
+    DoChanging(self,Value,AllowChange);
+    if AllowChange then begin
+      FEnum:= Value;
+      DoChange(self);
+    end;
+  end else if not IgnoreInvalidEnum then begin
+    raise ECSMIBException.Create('Invalid MIB number');
+  end;
+end;
+
+procedure TCSMIB.SetOnChange(const Value: TNotifyEvent);
+begin
+  FOnChange := Value;
+end;
+
+procedure TCSMIB.SetOnChanging(const Value: TCSMIBChangingEvent);
+begin
+  FOnChanging := Value;
+end;
+
+function TCSMIB.SetToAlias(const S: string): boolean;
+var
+  i,j,oldEnum: integer;
+begin
+  result:= true;
+  oldEnum:= Enum;
+  for i:= 3 to 106 do begin
+    Enum:= i;
+    for j:= 0 to pred(AliasCount) do begin
+      if CompareText(Alias[j],S) = 0 then exit;
+    end;
+  end;
+  for i:= 109 to 112 do begin
+    Enum:= i;
+    for j:= 0 to pred(AliasCount) do begin
+      if CompareText(Alias[j],S) = 0 then exit;
+    end;
+  end;
+  for i:= 1000 to 1015 do begin
+    Enum:= i;
+    for j:= 0 to pred(AliasCount) do begin
+      if CompareText(Alias[j],S) = 0 then exit;
+    end;
+  end;
+  for i:= 2000 to 2101 do begin
+    Enum:= i;
+    for j:= 0 to pred(AliasCount) do begin
+      if CompareText(Alias[j],S) = 0 then exit;
+    end;
+  end;
+  for i:= 2250 to 2259 do begin
+    Enum:= i;
+    for j:= 0 to pred(AliasCount) do begin
+      if CompareText(Alias[j],S) = 0 then exit;
+    end;
+  end;
+  result:= false;
+  Enum:= oldEnum;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROWebBrokerServer.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROWebBrokerServer.pas
new file mode 100644
index 0000000..0f6e82e
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROWebBrokerServer.pas	
@@ -0,0 +1,492 @@
+unit uROWebBrokerServer;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes, HTTPApp, uROClientIntf, uROServer, uROHTTPTools;
+
+type
+  { TROWebBrokerServer }
+  TROWebBrokerServer = class(TROServer, IROTransport, IROTCPTransport, IROHTTPTransport)
+  private
+    fUserBeforeDispatch : THTTPMethodEvent;
+    fActions : TWebActionItems;
+
+    fActive : boolean;
+    fTransportIntf : IROHTTPTransport;
+
+    fRequest : TWebRequest;
+    fResponse : TWebResponse;
+    fSendExceptionsAs500: boolean;
+    fOverridePathInfo : string;
+    fServeInfoPage: Boolean;
+    fServeRodl: Boolean;
+
+    
+    fOnGetCustomClientAccessPolicy: TROCustomClientAccessPolicyMethod;
+    fSendClientAccessPolicyXml: TROClientAccessPolicyType;
+
+    function ReadRequestStream(aRequest : TWebRequest): TStream;
+    function GetRequest: TWebRequest;
+    function GetResponse: TWebResponse;
+    function IsWebModuleAction(const aPathInfo: ansistring) : boolean;
+
+  protected
+    procedure ReplaceBeforeDispatch(aOwner : TComponent; aNewHandler : THTTPMethodEvent); virtual;
+
+    function GetDispatchersClass : TROMessageDispatchersClass; override;
+
+    procedure Loaded; override;
+    procedure IntSetActive(const Value: boolean); override;
+    function IntGetActive : boolean; override;
+
+    { IROTransport }
+    function GetTransportObject : TObject;
+
+    { IROTCPTransport }
+    function GetClientAddress : string;
+
+    { IROHTTPTransport }
+    procedure SetHeaders(const aName, aValue : string);
+    function GetHeaders(const aName : string) : string;
+    function GetContentType : string;
+    procedure SetContentType(const aValue : string);
+    function GetUserAgent : string;
+    procedure SetUserAgent(const aValue : string);
+    function GetTargetURL : string;
+    procedure SetTargetURL(const aValue : string);
+    function GetPathInfo : string;
+    procedure SetPathInfo (const aValue : string);
+    function GetLocation : string;
+    function GetQueryString : string;
+    function GetQueryParameter(const aName: String): String;
+  public
+    constructor Create(aOwner : TComponent); override;
+    destructor Destroy; override;
+
+    property Request : TWebRequest read GetRequest;
+    property Response : TWebResponse read GetResponse;
+
+  published
+    procedure IntOnBeforeDispatch(Sender: TObject;
+                                  Request: TWebRequest;
+                                  Response: TWebResponse; var Handled: Boolean); virtual;
+    property SendExceptionsAs500: boolean read fSendExceptionsAs500 write fSendExceptionsAs500 default true;
+    property ServeInfoPage : Boolean read fServeInfoPage write fServeInfoPage default true;
+    property ServeRodl : Boolean read fServeRodl write fServeRodl default true;
+    property OnGetRODLReader;
+    property OnGetCustomClientAccessPolicy: TROCustomClientAccessPolicyMethod read fOnGetCustomClientAccessPolicy write fOnGetCustomClientAccessPolicy;
+    property SendClientAccessPolicyXml: TROClientAccessPolicyType read fSendClientAccessPolicyXml write fSendClientAccessPolicyXml default captAllowNone;
+  end;
+
+implementation
+
+uses TypInfo, uRORes,  SysUtils, {$IFDEF DELPHI2009UP}AnsiStrings,{$ENDIF}uROHTTPDispatch, uROServerIntf,
+  uROClient, uROHtmlServerInfo, uRODL, uROClasses;
+
+type
+  // See TROWebBrokerServer.Loaded This is for EWF support.
+  IInterfaceComponentReference = interface
+    ['{E28B1858-EC86-4559-8FCD-6B4F824151ED}']
+    function GetComponent: TComponent;
+  end;
+
+{ TROWebBrokerServer }
+
+constructor TROWebBrokerServer.Create(aOwner: TComponent);
+begin
+  inherited;
+
+  fActive := TRUE;
+  fActions := NIL;
+  fServeInfoPage := true;
+  fServeRodl := true;
+  fSendExceptionsAs500 := true;
+  Supports(Self, IROTransport, fTransportIntf);
+end;
+
+destructor TROWebBrokerServer.Destroy;
+begin
+  fTransportIntf := NIL;
+
+  inherited;
+end;
+
+procedure TROWebBrokerServer.Loaded;
+var dispatchactions : IUnknown;
+    icref : IInterfaceComponentReference;
+begin
+  inherited;
+
+  if not (csDesigning in ComponentState) then begin
+    ReplaceBeforeDispatch(Owner, IntOnBeforeDispatch);
+
+    if Owner is TWebModule
+      then fActions := TWebActionItems(GetObjectProp(Owner, 'Actions'))
+      else try
+        { This is for EWF. I don't want to set a dependency to the EWF units.
+          This component has to stay WebBroker and EWF neutral since, in the end, we are
+          dealing with web broker actions. This solves the problem. }
+
+        {$IFDEF DELPHI6UP}
+        if IsPublishedProp(Owner, 'DispatchActions')
+          then dispatchactions := GetInterfaceProp(Owner, 'DispatchActions')
+          else Exit;
+        {$ENDIF DELPHI6UP}
+
+        if (dispatchactions<>NIL) then begin
+          if Supports(dispatchactions, IInterfaceComponentReference, icref) then begin
+            fActions := TWebActionItems(GetObjectProp(icref.GetComponent, 'Actions'));
+          end;
+        end;
+      except
+        //ToDo: do we really want to catch this exception and display a DIAOG??
+        on E:Exception do begin
+          //showmessage(e.message);
+          fActions := NIL;
+        end;
+      end;
+  end;
+end;
+
+function TROWebBrokerServer.IntGetActive: boolean;
+begin
+  result := fActive;
+end;
+
+procedure TROWebBrokerServer.IntSetActive(const Value: boolean);
+begin
+  fActive := Value;
+end;
+
+function TROWebBrokerServer.ReadRequestStream(aRequest : TWebRequest): TStream;
+var s : ansistring;
+    t : ansistring;
+    i : integer;
+begin
+  s := {$IFDEF DELPHI2009UP}aRequest.RawContent{$ELSE}aRequest.Content{$ENDIF};
+  i := aRequest.ContentLength-Length(s);
+
+  while (i>0) do begin
+    t := aRequest.ReadString(I);
+    s := S+T;
+    i := i-Length(t);
+  end;
+
+  result := TROBinaryMemoryStream.Create(s);
+end;
+
+function TROWebBrokerServer.IsWebModuleAction(const aPathInfo: ansistring) : boolean;
+var
+  i : integer;
+  lpathinfo : string;
+begin
+  result := FALSE;
+  if (fActions=NIL) then Exit;
+  lpathinfo := {$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(aPathInfo);
+  for i := 0 to (fActions.Count-1) do
+    if (CompareText(fActions[i].PathInfo, lPathInfo)=0) then begin
+      result := TRUE;
+      Exit;
+    end;
+end;
+
+procedure TROWebBrokerServer.IntOnBeforeDispatch(Sender: TObject;
+  Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
+
+  procedure WriteError(responsestream : TROBinaryMemoryStream);
+  begin
+    responsestream.WriteAnsiString('<font size="7">500 Invalid Path</font><br />'+{$IFDEF UNICODE}WideStringToAnsiString{$ENDIF}(err_CannotFindMessageDispatcher));
+  end;
+
+var requeststream : TStream;
+    responsestream : TROBinaryMemoryStream;
+    root: ansistring;
+    sub : string;
+    disp: TROHTTPDispatcher;
+    lIgnore: TROResponseOptions;
+    format: TDataFormat;
+    info: IRONamedModuleInfo;
+    ok : boolean;
+    lRodl: TRODLLibrary;
+    lPolicyContent: AnsiString;
+begin
+  requeststream := NIL;
+  responsestream := NIL;
+
+  fRequest := Request;
+  fResponse := Response;
+  ok := false;
+  // Executes the user's event handler
+  if Assigned(fUserBeforeDispatch)
+    then fUserBeforeDispatch(Sender, Request, Response, Handled);
+
+  // Processes the message if not handled already
+  root := request.PathInfo;
+  if not Handled and not IsWebModuleAction(root) then begin
+    try
+      responsestream := TROBinaryMemoryStream.Create;
+      requeststream := ReadRequestStream(Request);
+
+      if (root <> '') and (root[1] = '/') then delete(root, 1,1);
+      if pos(AnsiChar('/'), root) > 0 then
+      begin
+        sub :={$IFDEF UNICODE}AnsiStringToWideString{$ENDIF} (copy(root, pos(AnsiChar('/'), root)+1, maxint));
+        root := '/' + copy(root, 1, pos(AnsiChar('/'), root) - 1);
+      end else
+      begin
+        root := '/' + root;
+        sub := '';
+      end;
+
+      disp := TROHTTPMessageDispatchers(Dispatchers).GetDispatcherByPath({$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(root)) as TROHTTPDispatcher;
+
+      if disp <> nil then
+      begin
+        if (requeststream.Size = 0) then begin
+          ok := fServeRodl;
+          if ok then
+            ok := IntDispatchMessage(disp, fTransportIntf, requeststream, responsestream, lIgnore)
+          else
+            WriteError(responsestream);
+        end else if (sub = '')  then
+          ok := IntDispatchMessage(disp, fTransportIntf, requeststream, responsestream, lIgnore)
+        else if (CompareText(sub, 'rodl') = 0) and fServeRodl then
+        begin
+          if copy(disp.PathInfo, 1, 1) = '/' then fTransportIntf.PathInfo := disp.PathInfo else fTransportIntf.PathInfo := '/'+disp.PathInfo;
+          GetRodl(responsestream, fTransportIntf, format, GetRODLReader);
+          ok := true;
+        end else if Supports(disp.Message, IRONamedModuleInfo, info) and
+                    (CompareText(info.ModuleInfoName, sub) = 0) and fServeRodl then
+        begin
+          if copy(disp.PathInfo, 1, 1) = '/' then fTransportIntf.PathInfo := disp.PathInfo else fTransportIntf.PathInfo := '/'+disp.PathInfo;
+          info.GetModuleInfo(responsestream, fTransportIntf, format);
+          ok := true;
+        end else
+        begin
+          ok := IntDispatchMessage(disp, fTransportIntf, requeststream, responsestream, lIgnore)
+        end;
+      end else if (CompareText(root, AnsiString('/rodl')) = 0) and (sub = '') and fServeRodl then
+      begin
+        GetRodl(responsestream, fTransportIntf, format, GetRODLReader);
+        ok := true;
+      end else if fServeInfoPage and (CompareText(root, AnsiString('/doc')) = 0) then
+      begin
+        if sub = 'css' then
+        begin
+          responsestream.WriteAnsistring(GetRodlCss);
+          Response.ContentType := 'text/css';
+          ok := true;
+        end else
+        if sub = 'xslt' then
+        begin
+          responsestream.WriteAnsiString(GetRodlStyleSheet);
+          Response.ContentType := 'text/xml';
+          ok := true;
+        end else if sub = '' then
+        begin
+          lRodl := GetRodlLibrary(GetRODLReader);
+          try
+            Response.ContentType := 'text/xml';
+            responsestream.WriteAnsiString(GetRodlWithStyleSheet(lRodl, {$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(fRequest.ScriptName) + '/doc/xslt'));
+          finally
+            lRodl.Free;
+          end;
+          ok := true;
+        end else
+        begin
+          WriteError(responsestream);
+          ok := false;
+        end;
+      end else if fServeInfoPage and (CompareStr(root, AnsiString('/favicon.ico')) = 0) then
+      begin
+        GetRodlFavIcon(responsestream);
+        Response.ContentType := 'image/x-icon';
+        ok := true;
+      end else if fServeInfoPage and (root = '/') then
+      begin
+        lrodl := GetRodlLibrary(GetRODLReader);
+        try
+          responsestream.WriteAnsiString(GetRodlServerInfo({$IFDEF UNICODE}UTF8ToString{$ENDIF}(fRequest.ScriptName), lRodl, Dispatchers));
+        finally
+          lRodl.Free;
+        end;
+        ok := true;
+      end else
+      if CompareText(root, AnsiString('/clientaccesspolicy.xml')) = 0 then begin
+        case fSendClientAccessPolicyXml of
+          captAllowAll: begin
+            lPolicyContent := GetClientAccessPolicy;
+          end;
+          captCustom: begin
+            if Assigned(fOnGetCustomClientAccessPolicy) then
+              fOnGetCustomClientAccessPolicy(Self, lPolicyContent);
+          end;
+        end;
+        if lPolicyContent <> '' then begin
+          Response.ContentType := 'text/xml';
+          responsestream.WriteAnsiString(lPolicyContent);
+        end;
+      end  else
+      begin
+        WriteError(responsestream);
+        ok := false;
+      end;
+
+      if ok or not fSendExceptionsAs500 then
+        Response.StatusCode := HTTP_OK
+      else
+        Response.StatusCode := HTTP_FAILED;
+
+    finally
+      requeststream.Free;
+      Handled := TRUE;
+
+      responsestream.Position := 0;
+      Response.ContentStream := responsestream;
+    end;
+  end;
+end;
+
+function TROWebBrokerServer.GetRequest: TWebRequest;
+begin
+  result := fRequest;
+end;
+
+function TROWebBrokerServer.GetResponse: TWebResponse;
+begin
+  result := fResponse;
+end;
+
+function TROWebBrokerServer.GetClientAddress: string;
+begin
+  result := {$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(fRequest.RemoteAddr);
+end;
+
+function TROWebBrokerServer.GetContentType: string;
+begin
+  result := {$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(Response.ContentType)
+end;
+
+function TROWebBrokerServer.GetHeaders(const aName: string): string;
+begin
+  Result := {$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(Request.GetFieldByName({$IFDEF UNICODE}WideStringToAnsiString{$ENDIF}(aName)));
+end;
+
+function TROWebBrokerServer.GetTargetURL: string;
+begin
+    result := ''
+end;
+
+function TROWebBrokerServer.GetTransportObject: TObject;
+begin
+  result := Self;
+end;
+
+function TROWebBrokerServer.GetUserAgent: string;
+begin
+  result := str_ProductName
+end;
+
+procedure TROWebBrokerServer.SetContentType(const aValue: string);
+begin
+  Response.ContentType :={$IFDEF UNICODE}WideStringToAnsiString{$ENDIF}(aValue);
+end;
+
+procedure TROWebBrokerServer.SetHeaders(const aName, aValue: string);
+begin
+  SetHeaderValue(Response.CustomHeaders, aName, aValue);
+end;
+
+procedure TROWebBrokerServer.SetPathInfo(const aValue: string);
+begin
+  fOverridePathInfo := aValue;
+  // ignore?
+end;
+
+procedure TROWebBrokerServer.SetTargetURL(const aValue: string);
+begin
+
+end;
+
+procedure TROWebBrokerServer.SetUserAgent(const aValue: string);
+begin
+  
+end;
+
+procedure TROWebBrokerServer.ReplaceBeforeDispatch(aOwner: TComponent;
+  aNewHandler: THTTPMethodEvent);
+// Do not change the sequance of these names. It's important for EWF.
+const EventHandlerNames : array[0..1] of string = ('OnBeforeDispatch', 'BeforeDispatch');
+var pinfo : PPropInfo;
+    i     : integer;
+    myevent : THTTPMethodEvent;
+    mtd,
+    mtd2  : TMethod;
+    s     : string;
+begin
+  for i := 0 to High(EventHandlerNames) do begin
+    s := EventHandlerNames[i];
+    pinfo := GetPropInfo(Owner, s);
+
+    if (pinfo<>NIL) then begin
+      myevent := IntOnBeforeDispatch;
+      mtd := TMethod(myevent);  // <--- I have to pass through a local variable. Cannot type caet directly... Go figure!
+
+      mtd2 := GetMethodProp(Owner, pinfo);
+      SetMethodProp(Owner, pinfo, mtd);
+
+      TMethod(fUserBeforeDispatch) := mtd2;
+      Exit;
+    end;
+  end;
+  //TWebModule(aOwner).BeforeDispatch := aNewHandler;
+end;
+
+function TROWebBrokerServer.GetPathInfo: string;
+begin
+  if fOverridePathInfo <> '' then
+    result := fOverridePathInfo
+  else
+    result := {$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(Request.PathInfo)
+end;
+
+function TROWebBrokerServer.GetDispatchersClass: TROMessageDispatchersClass;
+begin
+  result := TROHTTPMessageDispatchers;
+end;
+
+function TROWebBrokerServer.GetLocation: string;
+begin
+  result := 'http://'+{$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(fRequest.Host+fRequest.URL);
+end;
+
+function TROWebBrokerServer.GetQueryString: string;
+begin
+  result := {$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(fRequest.Query);
+end;
+
+function TROWebBrokerServer.GetQueryParameter(const aName: String): String;
+begin
+  result := fRequest.QueryFields.Values[aName];
+end;
+
+initialization
+  RegisterServerClass(TROWebBrokerServer);
+finalization
+  UnregisterServerClass(TROWebBrokerServer);
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROWinInetHttpChannel.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROWinInetHttpChannel.pas
new file mode 100644
index 0000000..edb6229
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROWinInetHttpChannel.pas	
@@ -0,0 +1,804 @@
+unit uROWinInetHttpChannel;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up                                                 }
+{ platform: Win32                                                            }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes, WinInet,
+  uRORes, uROClient, uROClientIntf, Windows;
+
+const
+  DEFAULT_TIMEOUT = 1000 * 60 * 10; // default value = 10 Minutes
+
+type
+  { TLogin }
+  TROLogin = class(TPersistent)
+  private
+     fUsername,
+     fPassword: string;
+  public
+    procedure Assign(Source: TPersistent); override;
+
+  published
+    property Username:string read fUsername write fUsername;
+    property Password:string read fPassword write fPassword;
+  end;
+
+  TAfterAttemptConnectEvent = procedure (Sender: TObject; var aAttemptConnectResult: DWORD) of object;
+  TWinInetAfterOpenRequestEvent = procedure (Sender: TObject; aHandle: HINTERNET) of object;
+  { TROWinInetHTTPChannel }
+  TROWinInetAccessType = (atPreconfig,atDirect,atProxy,atPreconfig_with_no_autoproxy);
+  TROWinInetHTTPChannel = class(TROTransportChannel, IROTransport, IROTCPTransport, IROHTTPTransport)
+  private
+    fUserAgent:String;
+    fTargetUrl:string;
+    fStoreConnected:boolean;
+    fKeepConnection:boolean;
+
+    fHeaders: String;
+
+    fInetConnect: HINTERNET;
+    fInetRoot: HINTERNET;
+    fUrlScheme: Integer;
+    fUrlHost: string;
+    fUrlSite: string;
+    fUrlPort: Integer;
+    fLogin: TROLogin;
+    fAfterConnect: TNotifyEvent;
+    fTrustInvalidCA: boolean;  // True means disable check for valid SSL/PCT-based certificates.
+    fTimeOut: integer;         // Request TimeOut value.
+    fAttemptToConnect: Boolean;
+    fInitializeAutoProxy: Boolean;
+    fOnAfterAttemptConnect: TAfterAttemptConnectEvent;
+    fOnBeforeOpenRequest: TNotifyEvent;
+    fOnAfterOpenRequest: TWinInetAfterOpenRequestEvent;
+    fOnBeforeOpenConnection: TNotifyEvent;
+    fProxyLogin: TROLogin;
+    FAccessType: TROWinInetAccessType;
+    procedure SetConnected(iValue:boolean);
+    function GetConnected:boolean;
+    procedure SetLogin(const Value: TROLogin);
+
+    function SendData(iData:TStream):hInternet;
+
+    procedure Check(Error: Boolean);
+    procedure ReceiveData(iRequest:hInternet; ioData:TStream);
+
+    function AllowInvalidCA(InetConnect: HINTERNET; dwInetStatus: DWord): DWord;
+    function CheckInetError(InetConnect: HINTERNET; dwInetStatus: DWord): DWord;
+    procedure SetProxyLogin(const Value: TROLogin);
+    procedure SetAccessType(const Value: TROWinInetAccessType);
+  protected
+    procedure IntDispatch(aRequest, aResponse : TStream); override;
+    procedure IntSetServerLocator(aServerLocator : TROServerLocator); override;
+
+    { IROTransport }
+    function GetTransportObject : TObject; override;
+
+    { IROTCPTransport }
+    function GetClientAddress : string;
+
+    { IROHTTPTransport }
+    procedure SetHeaders(const aName, aValue : string);
+    function GetHeaders(const aName : string) : string;
+    function GetContentType : string;
+    procedure SetContentType(const aValue : string);
+    function GetUserAgent : string;
+    procedure SetUserAgent(const aValue : string);
+
+    procedure SetTargetURL(const Value: string);
+    function GetTargetURL:string;
+
+    function GetPathInfo : string;
+    function GetLocation : string;
+    function GetQueryString: String;
+    procedure SetPathInfo(const aValue: String);
+    function GetQueryParameter(const aName: String): String;
+
+    procedure TriggerAfterConnect;
+
+  public
+    constructor Create(AOwner: TComponent); override;
+    destructor Destroy; override;
+    procedure CheckProperties; override;
+
+    procedure Assign(aSource : TPersistent); override;
+
+    property InetConnect: HINTERNET read fInetConnect;
+    property InetRoot: HINTERNET read fInetRoot;
+  published
+    property UserAgent:string read GetUserAgent write SetUserAgent;
+
+    property TargetURL : string read fTargetURL write SetTargetURL;
+    property Login:TROLogin read fLogin write SetLogin;
+    property StoreConnected:boolean read fStoreConnected write fStoreConnected default false;
+    property Connected:boolean read GetConnected write SetConnected stored fStoreConnected default false;
+    property KeepConnection:boolean read fKeepConnection write fKeepConnection default false;
+
+    property ProxyLogin: TROLogin read fProxyLogin write SetProxyLogin;
+
+    property Timeout: Integer read fTimeout write fTimeout default DEFAULT_TIMEOUT;
+    property AfterConnect:TNotifyEvent read fAfterConnect Write fAfterConnect;
+    property AttemptToConnect: Boolean read fAttemptToConnect write fAttemptToConnect default true;
+    property OnAfterOpenRequest: TWinInetAfterOpenRequestEvent read fOnAfterOpenRequest write fOnAfterOpenRequest;
+    property OnBeforeOpenRequest: TNotifyEvent read fOnBeforeOpenRequest write fOnBeforeOpenRequest;
+    property OnBeforeOpenConnection: TNotifyEvent read fOnBeforeOpenConnection write fOnBeforeOpenConnection;
+    property OnProgress;
+    property OnAfterAttemptConnect: TAfterAttemptConnectEvent read FOnAfterAttemptConnect write FOnAfterAttemptConnect;
+    property InitializeAutoProxy: Boolean read fInitializeAutoProxy write fInitializeAutoProxy default false;
+    property AccessType: TROWinInetAccessType read FAccessType write SetAccessType default atPreconfig;
+  published
+    property SynchronizedProbing;
+    property OnSendStream;
+    property OnReceiveStream;
+    property ServerLocators;
+    property DispatchOptions;
+    property OnServerLocatorAssignment;
+    property ProbeServers;
+    property ProbeFrequency;
+    property OnBeforeProbingServers;
+    property OnAfterProbingServers;
+    property OnBeforeProbingServer;
+    property OnAfterProbingServer;
+    property OnLoginNeeded;
+  end;
+
+resourcestring
+  sxInvalidURLformat = 'Invalid URL format';
+  
+implementation
+
+uses SysUtils, uROHTTPTools, uROClasses;
+
+const
+  INTERNET_ERROR_MASK_COMBINED_SEC_CERT                 = $2;
+  const_WinInetErrorCode_MIN                            = INTERNET_ERROR_BASE + 1;
+  const_WinInetErrorCode_MAX                            = ERROR_INTERNET_FAILED_DUETOSECURITYCHECK;
+
+  ERROR_INTERNET_FORTEZZA_LOGIN_NEEDED                  = (INTERNET_ERROR_BASE + 54);
+  ERROR_INTERNET_SEC_CERT_ERRORS                        = (INTERNET_ERROR_BASE + 55);
+  ERROR_INTERNET_SEC_CERT_NO_REV                        = (INTERNET_ERROR_BASE + 56);
+  ERROR_INTERNET_SEC_CERT_REV_FAILED                    = (INTERNET_ERROR_BASE + 57);
+  ERROR_INTERNET_CONNECTION_ABORTED                     = (INTERNET_ERROR_BASE + 30);
+
+{ TROWinInetHTTPChannel }
+
+procedure TROWinInetHTTPChannel.Check(Error: Boolean);
+var ErrCode:integer;
+    S:string;
+begin
+  ErrCode := getlasterror;
+  if Error and (ErrCode <> 0) then begin
+    SetLength(S, 256);
+    if FormatMessage(FORMAT_MESSAGE_FROM_HMODULE, Pointer(GetModuleHandle('wininet.dll')), ErrCode, 0, PChar(S), Length(S), nil) > 0 then begin;
+      SetLength(S, StrLen(PChar(S)));
+      while (Length(S) > 0) and CharInSet(S[Length(S)], [#10, #13]) do SetLength(S, Length(S) - 1);
+      raise EROException.Create(S);
+    end
+    else begin
+      raise EROException.CreateFmt(err_UnexpectedWinINetProblem,[ErrCode]);
+    end;
+
+  end;
+end;
+
+constructor TROWinInetHTTPChannel.Create(AOwner: TComponent);
+begin
+  inherited;
+  fTimeOut := DEFAULT_TIMEOUT;
+  UserAgent := str_ProductName;
+  fLogin := TROLogin.Create();
+  fProxyLogin := TROLogin.Create;
+  fAttemptToConnect  := true;
+  fAccessType := atPreconfig;
+end;
+
+destructor TROWinInetHTTPChannel.Destroy;
+begin
+  Connected := false;
+  FreeAndNil(fLogin);
+  fProxyLogin.Free;
+  inherited;
+end;
+
+function TROWinInetHTTPChannel.GetConnected: boolean;
+begin
+  result := Assigned(fInetConnect);
+end;
+
+function TROWinInetHTTPChannel.GetContentType: string;
+begin
+  result := GetHeaders(id_ContentType);
+end;
+
+procedure TROWinInetHTTPChannel.SetContentType(const aValue: string);
+begin
+  SetHeaders(id_ContentType,aValue);
+end;
+
+function TROWinInetHTTPChannel.GetHeaders(const aName: string): string;
+begin
+end;
+
+procedure TROWinInetHTTPChannel.SetHeaders(const aName, aValue: string);
+begin
+  if aValue = '' then exit;
+  if fHeaders <> '' then fHeaders := fHeaders+#13#10;
+  fHeaders := fHeaders+aName+': '+aValue;
+end;
+
+function TROWinInetHTTPChannel.GetClientAddress: string;
+begin
+  result := '';
+end;
+
+function TROWinInetHTTPChannel.GetLocation: string;
+begin
+  result := '';
+end;
+
+function TROWinInetHTTPChannel.GetPathInfo: string;
+begin
+  result := '';
+end;
+
+function TROWinInetHTTPChannel.GetTargetURL: string;
+begin
+  result := fTargetUrl;
+end;
+
+function TROWinInetHTTPChannel.GetUserAgent: string;
+begin
+  result := fUserAgent;
+end;
+
+procedure TROWinInetHTTPChannel.SetUserAgent(const aValue: string);
+begin
+  if UserAgent <> aValue then
+    fUserAgent := aValue;
+end;
+
+procedure TROWinInetHTTPChannel.SetLogin(const Value: TROLogin);
+begin
+  fLogin.Assign(Value);
+end;
+
+procedure TROWinInetHTTPChannel.IntDispatch(aRequest, aResponse: TStream);
+var lRequest:hInternet;
+begin
+  CheckProperties;
+  Connected := true;
+  try
+    lRequest := SendData(aRequest);
+    try
+      ReceiveData(lRequest,aResponse);
+    finally
+      InternetCloseHandle(lRequest);
+    end;
+  finally
+    if not KeepConnection then Connected := false;
+  end;
+end;
+
+function TROWinInetHTTPChannel.SendData(iData: TStream):hInternet;
+var
+   RetVal: DWORD;
+   bRes: Boolean;
+ 
+   procedure _Check;
+   begin
+     if not bRes then begin
+       RetVal := GetLastError;
+       if (RetVal > const_WinInetErrorCode_MIN) and (RetVal < const_WinInetErrorCode_MAX) then begin
+         if (RetVal = ERROR_INTERNET_SEC_CERT_ERRORS) or
+            (RetVal = ERROR_INTERNET_INVALID_CA) or
+            (RetVal = ERROR_INTERNET_SEC_CERT_CN_INVALID) or
+            (RetVal = ERROR_INTERNET_SEC_CERT_DATE_INVALID) or
+            (RetVal = ERROR_INTERNET_SEC_CERT_REV_FAILED) then begin
+           RetVal := AllowInvalidCA(Result, RetVal);
+           // MODIFIED BY TRINET
+           RetVal := ERROR_RETRY;
+           // MODIFIED BY TRINET END
+           bRes := True;
+         end else if (RetVal = ERROR_INTERNET_CLIENT_AUTH_CERT_NEEDED) then begin
+           { you are accessing Secure Socket Layer (SSL)-protected resource
+             on a Web server that requires a valid client certificate. }
+           RetVal := CheckInetError(Result, RetVal);
+           bRes := True;
+           // MODIFIED BY TRINET
+           RetVal := ERROR_RETRY;
+           // MODIFIED BY TRINET END
+         end else if (RetVal = HTTP_STATUS_DENIED)
+                  or (RetVal = HTTP_STATUS_PAYMENT_REQ) then begin
+           RetVal := CheckInetError(Result, RetVal);
+           // MODIFIED BY TRINET
+           RetVal := ERROR_RETRY;
+           // MODIFIED BY TRINET END
+           bRes := True;
+         end else if (RetVal = ERROR_INTERNET_CONNECTION_ABORTED) then begin
+//         slavad
+//           RetVal := ERROR_RETRY;
+           RetVal := ERROR_CANCELLED;
+//           slavad
+           bRes := True;
+         end;
+       end;
+     end else begin
+       RetVal := CheckInetError(Result, GetLastError);
+     end;
+     Check(not bRes);
+   end;
+ 
+const
+   bufsize = 64*1024; //32kb
+var
+   lHeaders: string;
+   Flags: DWord;
+   AcceptTypes: array of PChar;
+   Mask: DWORD;
+   buf: Pointer;
+   lTotalsize: cardinal;
+   lCurSize: cardinal;
+   lSendSize,lwrittensize: cardinal;
+   intbuf: INTERNET_BUFFERS;
+   lStreamSize: integer;
+begin
+   SetLength(AcceptTypes, 2);
+ 
+   TriggerProgress(ptStart, pdSending, 0, iData.Size);
+ 
+   AcceptTypes[0] := PChar('application/octet-stream');
+   AcceptTypes[1] := nil;
+ 
+   Flags := INTERNET_FLAG_NO_CACHE_WRITE;
+ 
+   if KeepConnection then Flags := Flags or INTERNET_FLAG_KEEP_CONNECTION;
+   if fURLScheme = INTERNET_SCHEME_HTTPS then begin
+     Flags := Flags or INTERNET_FLAG_SECURE;
+     if fTrustInvalidCA then begin
+       Flags := Flags or INTERNET_FLAG_IGNORE_CERT_CN_INVALID
+                      or INTERNET_FLAG_IGNORE_CERT_DATE_INVALID;
+     end;
+   end;
+ 
+   if assigned(fOnBeforeOpenRequest) then
+     fOnBeforeOpenRequest(Self);
+ 
+   result := HttpOpenRequest(FInetConnect, 'POST', PChar(fURLSite), nil, 
+nil, Pointer(AcceptTypes), Flags, Integer(Self));
+   Check(not Assigned(result));
+ 
+   if assigned(fOnAfterOpenRequest) then
+     fOnAfterOpenRequest(Self, result);
+ 
+   { Time Out }
+   if fTimeOut > 0 then begin
+     InternetSetOption(Result, INTERNET_OPTION_RECEIVE_TIMEOUT, 
+@fTimeOut, SizeOf(fTimeOut));
+     InternetSetOption(FInetConnect, INTERNET_OPTION_RECEIVE_TIMEOUT, 
+@fTimeOut, SizeOf(fTimeOut));
+ 
+     InternetSetOption(Result, INTERNET_OPTION_SEND_TIMEOUT, @fTimeOut, 
+SizeOf(fTimeOut));
+     InternetSetOption(FInetConnect, INTERNET_OPTION_SEND_TIMEOUT, 
+@fTimeOut, SizeOf(fTimeOut));
+   end;
+ 
+   { Certificates Errors }
+   Mask := INTERNET_ERROR_MASK_COMBINED_SEC_CERT;
+   InternetSetOption(FInetConnect, INTERNET_OPTION_ERROR_MASK, @Mask, 
+SizeOf(Mask));
+   // MODIFIED BY TRINET
+ 
+   lStreamSize:=iData.Size;
+   GetMem(buf, bufsize);
+   try
+     RetVal := ERROR_RETRY;
+     while RetVal=ERROR_RETRY do
+     begin
+       iData.Position := 0;
+ 
+       FillChar(intbuf, sizeof(INTERNET_BUFFERS),0);
+       intbuf.dwStructSize := sizeof(INTERNET_BUFFERS);
+       intbuf.lpcszHeader:= PChar(fHeaders);
+       intbuf.dwHeadersLength:= Length(fHeaders);
+       intbuf.dwBufferTotal:=lStreamSize;
+ 
+       lSendSize := 0;
+       lTotalsize:= iData.Size;
+       bRes:= HttpSendRequestEx(Result, @intbuf,nil, 0, 0);
+       _Check;
+       if RetVal=ERROR_RETRY then continue;
+       while lTotalsize > 0 do begin
+         if lTotalsize > bufsize then
+           lCurSize := bufsize
+         else
+           lCurSize := lTotalsize;
+         iData.Read(buf^,lCurSize);
+         inc(lSendSize, lCurSize);
+         dec(lTotalsize,lCurSize);
+         while true do begin
+           lHeaders := fHeaders;
+           fHeaders := '';
+           while lCurSize > 0 do begin
+             bRes := InternetWriteFile(Result,buf,lcursize, lwrittensize);
+             if not bRes and (lwrittensize <> lcursize) and (lwrittensize<>0) then begin
+               Dec(lCurSize,lwrittensize);
+               Move( (PAnsichar(buf)+lwrittensize)^ ,buf^, lCurSize);
+             end
+             else begin
+               Break;
+             end;
+           end;
+
+           _Check;
+           case RetVal of
+             ERROR_SUCCESS:  begin
+               SetLastError(ERROR_SUCCESS);
+               Break;
+             end;
+             ERROR_CANCELLED: SysUtils.Abort;
+             ERROR_INTERNET_FORCE_RETRY: {Retry the operation};
+           end;
+         end;
+         TriggerProgress(ptInProgress, pdSending, lSendSize, lStreamSize);
+       end;
+       bres:= HttpEndRequest(Result,nil,0,0);
+       _Check;
+     end;
+   finally
+     Freemem(buf);
+   end;
+   // MODIFIED BY TRINET - END
+   TriggerProgress(ptDone, pdSending, 0, lStreamSize);
+end;
+
+procedure TROWinInetHTTPChannel.ReceiveData(iRequest:hInternet; ioData:TStream);
+const MaxStatusText     : Integer = 4096;
+var
+  Size, Status, Len, Index: DWord;
+  S:string;
+
+  lpszData: PAnsiChar;	// buffer for the data
+  dwSize: DWORD;	// size of the data available
+  dwDownloaded: DWORD;	// size of the downloaded data
+
+  lTotalSize,lReceivedSize:dword;
+begin
+  Len := SizeOf(Status);
+  Index := 0;
+
+  { Get Status Code }
+  if not HttpQueryInfo(iRequest, HTTP_QUERY_STATUS_CODE or HTTP_QUERY_FLAG_NUMBER,
+                       @Status, Len, Index) then RaiseLastOSError();
+
+  { Throw Exception is StatusCode >= 300 BUT not 500. SOAP faulty envelopes comes with that set }
+  if (Status >= 300) and (Status <> 500) then begin
+    Index := 0;
+    Size := MaxStatusText;
+    SetLength(S, Size);
+    if HttpQueryInfo(iRequest, HTTP_QUERY_STATUS_TEXT, @S[1], Size, Index) then begin
+      SetLength(S, Size);
+      raise EROException.CreateFmt('%s (%d)', [S, Status]);
+    end;
+  end;
+
+  Index := 0;
+  { get total size }
+  if not HttpQueryInfo(iRequest, HTTP_QUERY_CONTENT_LENGTH or HTTP_QUERY_FLAG_NUMBER, @lTotalSize, Len, Index) then begin
+    { do not raise an exception when there is no "Content-Length" value in result header }
+    if GetLastError <> ERROR_HTTP_HEADER_NOT_FOUND then begin
+      RaiseLastOSError(); //TotalSize = 0;//
+    end else begin
+      SetLastError(0);
+      lTotalSize := 0;
+    end;
+  end;
+
+  TriggerProgress(ptStart, pdReceiving, 0, lTotalSize);
+
+  lReceivedSize := 0;
+  dwSize := 0;
+  dwDownloaded := 0;
+    while (true) do begin
+      // The call to InternetQueryDataAvailable determines the amount of data available to download.
+      while (not InternetQueryDataAvailable(iRequest, dwSize, 0, 0))
+      and (GetLastError = ERROR_IO_PENDING) do begin
+        Sleep(1);
+      end;
+
+      // Allocates a buffer of the size returned by InternetQueryDataAvailable
+      GetMem(lpszData, dwSize + 1);
+      try
+        // Reads the data from the HINTERNET handle.
+        while (not InternetReadFile(iRequest, lpszData, dwSize, dwDownloaded))
+        and (GetLastError = ERROR_IO_PENDING) do begin
+          Sleep(1);
+        end;
+        if (GetLastError >= const_WinInetErrorCode_MIN) and (GetLastError <= const_WinInetErrorCode_MAX) then begin
+          Check(True);
+        end;
+        if GetLastError <> 0 then begin
+          // Adds a null terminator to the end of the data buffer
+          lpszData[dwDownloaded] := #0;
+        end;
+
+        ioData.Write(lpszData[0], dwDownloaded);
+        Inc(lReceivedSize, dwDownloaded);
+      finally
+        FreeMem(lpszData);
+      end;
+
+      TriggerProgress(ptInProgress, pdReceiving, lReceivedSize, lTotalSize);
+
+      // Check the size of the remaining data. If it is zero, break.
+      if (dwDownloaded = 0) then begin
+        break;
+      end;
+    end;
+
+  ioData.seek(0, soFromBeginning);
+
+  TriggerProgress(ptDone, pdReceiving, 0,0);
+end;
+
+function TROWinInetHTTPChannel.AllowInvalidCA(InetConnect: HINTERNET; dwInetStatus: DWord): DWord;
+var
+  dwError: integer;
+  lppvData: pointer;
+  SECURITY_FLAGS: integer;
+  lpszDataSize: cardinal;
+  CertRevocation: boolean;
+  BRes: Boolean;
+begin
+  Result := ERROR_CANCELLED;
+  if (dwInetStatus = ERROR_INTERNET_SEC_CERT_ERRORS) or
+     (dwInetStatus = ERROR_INTERNET_INVALID_CA) or
+     (dwInetStatus = ERROR_INTERNET_SEC_CERT_CN_INVALID) or
+     (dwInetStatus = ERROR_INTERNET_SEC_CERT_DATE_INVALID) or
+     (dwInetStatus = ERROR_INTERNET_SEC_CERT_REV_FAILED) then begin
+    CertRevocation := (dwInetStatus = ERROR_INTERNET_SEC_CERT_REV_FAILED);
+    if CertRevocation or not fTrustInvalidCA then begin
+      dwError := InternetErrorDlg(GetDesktopWindow(), InetConnect, dwInetStatus,
+        FLAGS_ERROR_UI_FILTER_FOR_ERRORS or FLAGS_ERROR_UI_FLAGS_CHANGE_OPTIONS or
+        FLAGS_ERROR_UI_FLAGS_GENERATE_DATA, lppvData);
+      bRes := (dwError = ERROR_INTERNET_FORCE_RETRY) or (dwError = ERROR_SUCCESS);
+    end else begin
+      bRes := True;
+    end;
+    if bRes then begin
+      try
+        InternetQueryOption(InetConnect, INTERNET_OPTION_SECURITY_FLAGS, @SECURITY_FLAGS, lpszDataSize);
+        if CertRevocation then begin
+          SECURITY_FLAGS := SECURITY_FLAGS or SECURITY_FLAG_IGNORE_REVOCATION;
+        end else begin
+          SECURITY_FLAGS := SECURITY_FLAGS or SECURITY_FLAG_IGNORE_CERT_CN_INVALID
+                                           or SECURITY_FLAG_IGNORE_CERT_DATE_INVALID
+                                           or SECURITY_FLAG_IGNORE_UNKNOWN_CA;
+        end;
+        InternetSetOption(InetConnect, INTERNET_OPTION_SECURITY_FLAGS, @SECURITY_FLAGS, lpszDataSize);
+      except
+        dwError := InternetErrorDlg(GetDesktopWindow(), InetConnect, dwInetStatus,
+          FLAGS_ERROR_UI_FILTER_FOR_ERRORS or FLAGS_ERROR_UI_FLAGS_CHANGE_OPTIONS or
+          FLAGS_ERROR_UI_FLAGS_GENERATE_DATA, lppvData);
+        bRes := (dwError = ERROR_INTERNET_FORCE_RETRY) or (dwError = ERROR_SUCCESS);
+      end;
+    end;
+    if not CertRevocation then begin
+      FTrustInvalidCA := bRes;
+    end;
+    if bRes then begin
+      Result := ERROR_INTERNET_FORCE_RETRY;
+    end;
+  end;
+end;
+
+function TROWinInetHTTPChannel.CheckInetError(InetConnect: HINTERNET; dwInetStatus: DWord): DWord;
+var
+  lppvData: pointer;
+begin
+  Result := InternetErrorDlg(GetDesktopWindow(), InetConnect, dwInetStatus,
+     FLAGS_ERROR_UI_FILTER_FOR_ERRORS or FLAGS_ERROR_UI_FLAGS_CHANGE_OPTIONS or
+      FLAGS_ERROR_UI_FLAGS_GENERATE_DATA, lppvData);
+end;
+
+procedure TROWinInetHTTPChannel.TriggerAfterConnect;
+begin
+  if Assigned(AfterConnect) then AfterConnect(self);
+end;
+
+
+function InternetInitializeAutoProxyDll(dwReserved: DWord): LongBool; stdcall; external 'WinInet.dll';
+var
+  AutoProxyCalled: Boolean = False;
+
+procedure TROWinInetHTTPChannel.SetConnected(iValue: boolean);
+var
+  lAccessType:Integer;
+  lAttemptConnect: DWORD;
+begin
+  if iValue and not GetConnected then begin
+
+    {if Length(Proxy) > 0 then
+      AccessType := INTERNET_OPEN_TYPE_PROXY
+    else}
+    case FAccessType of
+      atDirect:                      lAccessType := INTERNET_OPEN_TYPE_DIRECT;
+      atProxy:                       lAccessType := INTERNET_OPEN_TYPE_PROXY;
+      atPreconfig_with_no_autoproxy: lAccessType := INTERNET_OPEN_TYPE_PRECONFIG_WITH_NO_AUTOPROXY;
+    else
+      //atPreconfig
+      lAccessType := INTERNET_OPEN_TYPE_PRECONFIG;
+    end;
+
+    if fInitializeAutoProxy then begin
+      if not AutoProxyCalled then begin
+        InternetInitializeAutoProxyDll(0);
+        AutoProxyCalled := true;
+      end;
+    end;
+
+
+    fInetRoot := InternetOpen(PChar(UserAgent), lAccessType, nil, nil, 0);//PChar(Proxy)}, PChar(ProxyByPass), 0);
+
+
+    if assigned(fOnBeforeOpenConnection) then
+      fOnBeforeOpenConnection(self);
+
+    if fAttemptToConnect then begin
+      lAttemptConnect := InternetAttemptConnect(0);
+      if assigned(FOnAfterAttemptConnect) then
+        FOnAfterAttemptConnect(self, lAttemptConnect);
+      if lAttemptConnect <> ERROR_SUCCESS then SysUtils.Abort;
+    end;
+
+    Check(not Assigned(FInetRoot));
+    try
+      FInetConnect := InternetConnect(FInetRoot, PChar(FURLHost), FURLPort, PChar(Login.UserName), PChar(Login.Password), INTERNET_SERVICE_HTTP, 0, Cardinal(Self));
+      Check(not Assigned(FInetConnect));
+      TriggerAfterConnect();
+    except
+      InternetCloseHandle(FInetRoot);
+      FInetRoot := nil;
+      raise;
+    end;
+
+    if fProxyLogin.Username <> '' then begin
+      InternetSetOption(fInetConnect, INTERNET_OPTION_PROXY_USERNAME, @fProxyLogin.Username[1], Length(fProxyLogin.Username));
+      InternetSetOption(fInetConnect, INTERNET_OPTION_PROXY_USERNAME, @fProxyLogin.Password[1], Length(fProxyLogin.Password));
+    end;
+  end
+  else if not iValue then begin
+    if Assigned(FInetConnect) then InternetCloseHandle(FInetConnect);
+    FInetConnect := nil;
+    if Assigned(FInetRoot) then InternetCloseHandle(FInetRoot);
+    FInetRoot := nil;
+  end;
+end;
+
+procedure TROWinInetHTTPChannel.SetTargetURL(const Value: string);
+var URLComp:TURLComponents;
+    p:PChar;
+begin
+  if Targeturl <> Value then begin
+    fTargetUrl := Value;
+
+    if fTargetUrl <> '' then begin
+      FillChar(URLComp, SizeOf(URLComp), 0);
+      URLComp.dwStructSize := SizeOf(URLComp);
+      URLComp.dwSchemeLength := 1;
+      URLComp.dwHostNameLength := 1;
+      URLComp.dwURLPathLength := 1;
+      InternetCrackUrl(PChar(fTargetUrl), 0, 0, URLComp);
+      if not (URLComp.nScheme in [INTERNET_SCHEME_HTTP, INTERNET_SCHEME_HTTPS]) then
+        raise EROException.Create(sxInvalidURLformat);
+      FURLScheme := URLComp.nScheme;
+      FURLPort := URLComp.nPort;
+      p := PChar(fTargetUrl);
+      FURLHost := Copy(fTargetUrl, URLComp.lpszHostName - p + 1, URLComp.dwHostNameLength);
+      FURLSite := Copy(fTargetUrl, URLComp.lpszUrlPath - p + 1, URLComp.dwURLPathLength);
+    end
+    else begin
+      fURLPort := 0;
+      fURLHost := '';
+      fURLSite := '';
+      fURLScheme := 0;
+    end;
+
+  end;
+end;
+
+function TROWinInetHTTPChannel.GetTransportObject: TObject;
+begin
+  result := self;
+end;
+
+procedure TROWinInetHTTPChannel.IntSetServerLocator(aServerLocator: TROServerLocator);
+begin
+  TargetURL := aServerLocator.Host;
+end;
+
+function TROWinInetHTTPChannel.GetQueryString: String;
+begin
+  result := ''
+end;
+
+procedure TROWinInetHTTPChannel.SetPathInfo(const aValue: String);
+begin
+  // do nothing
+end;
+
+procedure TROWinInetHTTPChannel.CheckProperties;
+begin
+  uROClasses.Check(TargetURL = '', Name + '.TargetURL must be set.');
+  inherited;
+end;
+
+procedure TROWinInetHTTPChannel.Assign(aSource: TPersistent);
+var
+  lSource: TROWinInetHTTPChannel;
+begin
+  inherited;
+
+  if (aSource is TROWinInetHTTPChannel) then begin
+    lSource := TROWinInetHTTPChannel(aSource);
+
+    UserAgent := lSource.UserAgent;
+    TargetURL := lSource.TargetURL;
+    Login.Assign(lSource.Login);
+    StoreConnected := lSource.StoreConnected;
+    Connected := lSource.Connected;
+    KeepConnection := lSource.KeepConnection;
+    AfterConnect := lSource.AfterConnect;
+    OnProgress := lSource.OnProgress;
+  end;
+end;
+
+
+procedure TROWinInetHTTPChannel.SetProxyLogin(const Value: TROLogin);
+begin
+  fProxyLogin.Assign(Value);
+end;
+
+function TROWinInetHTTPChannel.GetQueryParameter(
+  const aName: String): String;
+begin
+  result := '';
+end;
+
+procedure TROWinInetHTTPChannel.SetAccessType(const Value: TROWinInetAccessType);
+begin
+  if connected then raise EROException.Create(Self.Name+': you can''t change AccessType in connected state');
+  FAccessType := Value;
+end;
+
+{ TROLogin }
+
+procedure TROLogin.Assign(Source: TPersistent);
+begin
+  if (Source is TROLogin) then begin
+    Username := TROLogin(Source).Username;
+    Password := TROLogin(Source).Password;
+  end
+  else inherited;
+end;
+
+initialization
+  RegisterTransportChannelClass(TROWinInetHTTPChannel);
+
+finalization
+  UnRegisterTransportChannelClass(TROWinInetHTTPChannel);
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROWinMessageChannel.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROWinMessageChannel.pas
new file mode 100644
index 0000000..5721cbb
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROWinMessageChannel.pas	
@@ -0,0 +1,277 @@
+unit uROWinMessageChannel;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+{$I RemObjects.inc}
+
+interface
+
+{$WARN SYMBOL_DEPRECATED OFF} // This unit is only for Win32
+
+uses
+  Classes, uROClient, uROClientIntf, Forms, Messages, Windows, uROEventRepository;
+
+type { TROWinMessageChannel }
+     TROWinMessageChannel = class(TROTransportChannel, IROActiveEventChannel)
+     private
+       fServerHandle, fWindowHandle : HWND;
+       fResponseRef : TStream;
+       fStartServer: boolean;
+       fServerID: string;
+       fFileName: string;
+       fParameters: string;
+       fDefaultDirectory: string;
+       fDelay: word;
+       fActiveEvents: Boolean;
+       fActiveGuid: TGUID;
+
+       procedure WndProc(var Msg: TMessage);
+       procedure SetFileName(const Value: string);
+       procedure SetServerID(const Value: string);
+
+     protected
+       fEventReceiver: IROEventReceiver;
+       procedure IntDispatch(aRequest, aResponse : TStream); override;
+       procedure RegisterEventReceiver(aReceiver: IROEventReceiver);
+       procedure UnregisterEventReceiver(aReceiver: IROEventReceiver);
+       function QueryInterface(const IID: TGUID; out Obj): HRESULT; override; stdcall;
+       procedure BeforeDispatch(aMessage: IROMessage); override;
+       procedure OpenServer;
+     public
+       constructor Create(aOwner : TComponent); override;
+       destructor Destroy; override;
+       procedure CheckProperties; override;
+     published
+       property StartServer : boolean read fStartServer write fStartServer default false;
+       property FileName : string read fFileName write SetFileName;
+       property Parameters : string read fParameters write fParameters;
+       property DefaultDirectory : string read fDefaultDirectory write fDefaultDirectory;
+       property ServerID : string read fServerID write SetServerID;
+       property Delay : word read fDelay write fDelay default 0;
+
+       property ActiveEvents: Boolean read fActiveEvents write fActiveEvents default False;
+       property ActiveGuid: TGUID read fActiveGuid write fActiveGuid;
+     published
+       property SynchronizedProbing;
+       property OnSendStream;
+       property OnReceiveStream;
+       property ServerLocators;
+       property DispatchOptions;
+       property OnServerLocatorAssignment;
+       property ProbeServers;
+       property ProbeFrequency;
+       property OnBeforeProbingServers;
+       property OnAfterProbingServers;
+       property OnBeforeProbingServer;
+       property OnAfterProbingServer;
+       property OnLoginNeeded;
+     end;
+
+implementation
+
+uses Dialogs, SysUtils, ShellAPI, uRORes, uROClasses;
+
+{
+  0 = Message Request/Response
+  1 = Event back
+  2 = Register me (guid arg)
+  3 = Unregister me (guid arg)
+}
+
+{ TROWinMessageChannel }
+
+procedure TROWinMessageChannel.BeforeDispatch(aMessage: IROMessage);
+begin
+  inherited;
+  if fActiveEvents then begin
+    if IsEqualGUID(fActiveGuid, EmptyGUID) then
+      fActiveGuid := NewGuid;
+    aMessage.ClientID := fActiveGuid;
+  end;
+end;
+
+procedure TROWinMessageChannel.CheckProperties;
+begin
+  Check(ServerID = '', Name + '.ServerID must be set.');
+  inherited;
+end;
+
+constructor TROWinMessageChannel.Create(aOwner: TComponent);
+begin
+  inherited;
+
+  // Removed the check to make the component usable also at design time
+  // There's no apparent problem with this
+  {if not (csDesigning in ComponentState)
+    then }fWindowHandle := AllocateHWnd(WndProc)
+    //else fWindowHandle := 0;
+
+  {Timeout := 30000; { ms }
+end;
+
+destructor TROWinMessageChannel.Destroy;
+begin
+  if (fWindowHandle>0)
+    then DeallocateHWnd(fWindowHandle);
+  inherited;
+end;
+
+procedure TROWinMessageChannel.IntDispatch(aRequest, aResponse: TStream);
+var memstream : TMemoryStream;
+    CDS : TCopyDataStruct;
+    freememstream : boolean;
+    //dwResult:Cardinal;
+begin
+  freememstream := not (aRequest is TMemoryStream);
+  fResponseRef := aResponse;
+
+  // Locates the server window
+  OpenServer;
+
+  if not freememstream then begin
+    memstream := TMemoryStream(aRequest)
+  end
+  else begin
+    memstream := TMemoryStream.Create;
+    memstream.LoadFromStream(aRequest);
+  end;
+
+  memstream.Position := 0;
+  try
+    CDS.dwData := 0;
+    CDS.cbData := memstream.Size;
+    CDS.lpData := memstream.Memory;
+
+    SendMessage(fServerHandle, WM_COPYDATA, fWindowHandle, Integer(@CDS));
+    {if SendMessageTimeout(handle,WM_COPYDATA,fWindowHandle,Integer(@CDS),
+                           SMTO_ABORTIFHUNG or SMTO_NORMAL,fTimeout,dwResult) = 0 then
+        RaiseError(err_WinMessageFailed,[GetLastError()]);}
+
+  finally
+    if freememstream then memstream.Free;
+    fResponseRef := nil;
+  end;
+end;
+
+procedure TROWinMessageChannel.OpenServer;
+begin
+  CheckProperties;
+  fServerHandle := FindWindow(NIL, PChar(ServerID));
+  if (fServerHandle=0) then begin
+    // Starts it
+    if StartServer then begin
+      ShellExecute(0, 'open', PChar(FileName), PChar(Parameters), PChar(DefaultDirectory), SW_NORMAL);
+      Sleep(Delay);
+
+      fServerHandle := FindWindow(NIL, PChar(ServerID));
+    end;
+  end;
+
+  if (fServerHandle=0) then RaiseError(err_CannotFindServer, [ServerID]);
+end;
+
+function TROWinMessageChannel.QueryInterface(const IID: TGUID;
+  out Obj): HRESULT;
+begin
+  if (IsEqualGUID(IROActiveEventChannel, iid)) and (not fActiveEvents) then begin
+    Result := E_NOINTERFACE;
+  end else
+    result := inherited QueryInterface(IID, Obj);
+end;
+
+procedure TROWinMessageChannel.RegisterEventReceiver(
+  aReceiver: IROEventReceiver);
+var
+  CDS : TCopyDataStruct;
+begin
+  fEventReceiver := aReceiver;
+  if fEventReceiver <> nil then begin
+    if IsEqualGUID(fActiveGuid, EmptyGUID) then
+      fActiveGuid := NewGuid;
+
+    OpenServer;
+
+    CDS.dwData := 2;
+    CDS.cbData := sizeof(fActiveGuid);
+    CDS.lpData := @fActiveGuid;
+
+    SendMessage(fServerHandle, WM_COPYDATA, fWindowHandle, Integer(@CDS));
+  end;
+end;
+
+procedure TROWinMessageChannel.SetFileName(const Value: string);
+begin
+  fFileName := Value;
+end;
+
+procedure TROWinMessageChannel.SetServerID(const Value: string);
+begin
+  fServerID := Value;
+end;
+
+procedure TROWinMessageChannel.UnregisterEventReceiver(
+  aReceiver: IROEventReceiver);
+var
+ CDS: TCopyDataStruct;
+begin
+  if fEventReceiver <> nil then begin
+    if IsEqualGUID(fActiveGuid, EmptyGUID) then
+      fActiveGuid := NewGuid;
+
+    OpenServer;
+
+    CDS.dwData := 3;
+    CDS.cbData := sizeof(fActiveGuid);
+    CDS.lpData := @fActiveGuid;
+
+    SendMessage(fServerHandle, WM_COPYDATA, fWindowHandle, Integer(@CDS));
+  end;
+  fEventReceiver := nil;
+end;
+
+procedure TROWinMessageChannel.WndProc(var Msg: TMessage);
+var WMMsg : TWMCopyData absolute Msg;
+  lTmpStream: TMemoryStream;
+begin
+  with Msg do
+    case Msg of
+      WM_COPYDATA  : begin
+        case WMMsg.CopyDataStruct.dwData of
+          0: begin
+            if fResponseRef = nil then exit;
+            fResponseRef.Write(WMMsg.CopyDataStruct.lpData^, WMMsg.CopyDataStruct.cbData);
+            fResponseRef.Position := 0;
+          end;
+          1: begin
+            if fEventReceiver <> nil then begin
+              lTmpStream := TMemoryStream.Create;
+              try
+                lTmpStream.Write(WMMsg.CopyDataStruct.lpData^, WMMsg.CopyDataStruct.cbData);
+                lTmpStream.Position := 0;
+                fEventReceiver.Dispatch(lTmpStream, nil);
+              finally
+                lTmpStream.Free;
+              end;
+            end;
+          end;
+        end;
+      end;
+      else result := DefWindowProc(FWindowHandle, Msg, wParam, lParam);
+    end;
+end;
+
+initialization
+  RegisterTransportChannelClass(TROWinMessageChannel);
+
+finalization
+  UnRegisterTransportChannelClass(TROWinMessageChannel);
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROWinMessageServer.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROWinMessageServer.pas
new file mode 100644
index 0000000..f26d68c
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROWinMessageServer.pas	
@@ -0,0 +1,232 @@
+unit uROWinMessageServer;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes, Windows, Messages, uROClientIntf, uROServer, uROEventRepository, uROServerIntf;
+
+type { TROWinMessageServer }
+     TROWinMessageServer = class(TROServer, IROTransport, IROActiveEventServer)
+     private
+       fWindowHandle : HWND;
+       fServerID     : string;
+       fTransport    : IROTransport;
+       fActiveEventRepository : TROEventRepository;
+       fActiveEventMap: TStringList;
+
+       procedure WndProc(var Msg: TMessage);
+       procedure DispatchEvent(anEventDataItem: TROEventData; aSessionReference: TGUID; aSender: TObject);
+       procedure EventsRegistered(aSender: TObject; aClient: TGUID);
+     protected
+       { Internals }
+       procedure IntSetActive(const Value: boolean); override;
+       function IntGetActive : boolean; override;
+
+       { IROTransport }
+       function GetTransportObject : TObject;
+       function QueryInterface(const IID: TGUID; out Obj): HRESULT; override; stdcall;
+
+     public
+       constructor Create(aOwner : TComponent); override;
+       destructor Destroy; override;
+       procedure CheckProperties; override;
+     published
+       property ServerID : string read fServerID write fServerID;
+       property ActiveEventRepository : TROEventRepository read fActiveEventRepository write fActiveEventRepository;
+     end;
+
+implementation
+
+uses Forms, Controls, SysUtils, uRORes, uROClasses;
+
+var
+  ROWindowClass: TWndClass = (
+    style: 0;
+    lpfnWndProc: @DefWindowProc;
+    cbClsExtra: 0;
+    cbWndExtra: 0;
+    hInstance: 0;
+    hIcon: 0;
+    hCursor: 0;
+    hbrBackground: 0;
+    lpszMenuName: nil;
+    lpszClassName: 'ROUtilWindow');
+
+function AllocateHWnd(const aWindowName : string; Method: TWndMethod): HWND;
+var tmpclass: TWndClass;
+    isclsregistered: Boolean;
+begin
+  ROWindowClass.hInstance := HInstance;
+  isclsregistered := GetClassInfo(HInstance, ROWindowClass.lpszClassName, tmpclass);
+
+  if not isclsregistered or (tmpclass.lpfnWndProc <> @DefWindowProc) then begin
+    if isclsregistered then Windows.UnregisterClass(ROWindowClass.lpszClassName, HInstance);
+    Windows.RegisterClass(ROWindowClass);
+  end;
+
+  Result := CreateWindowEx(WS_EX_TOOLWINDOW, ROWindowClass.lpszClassName,
+    PChar(aWindowName), WS_POPUP {!0}, 0, 0, 0, 0, 0, 0, HInstance, nil);
+
+  if Assigned(Method)
+    then SetWindowLong(Result, GWL_WNDPROC, Longint({$IFDEF DELPHI6UP}Classes.{$ENDIF}MakeObjectInstance(Method)));
+end;
+
+{ TROWinMessageServer }
+
+constructor TROWinMessageServer.Create(aOwner: TComponent);
+begin
+  inherited;
+  Supports(Self, IROTransport, fTransport);
+  fWindowHandle := 0;
+  fActiveEventMap := TStringList.Create;
+end;
+
+destructor TROWinMessageServer.Destroy;
+begin
+  if (fWindowHandle>1) then {$IFDEF DELPHI6UP}Classes.{$ENDIF}DeallocateHWnd(fWindowHandle);
+  fActiveEventMap.Free;
+  inherited;
+end;
+
+procedure TROWinMessageServer.WndProc(var Msg: TMessage);
+var WMMsg : TWMCopyData absolute Msg;
+    requeststream,
+    responsestream : TMemoryStream;
+    CDS: TCopyDataStruct;
+    s: string;
+    i: Integer;
+begin
+  requeststream := NIL;
+  responsestream := NIL;
+
+  with Msg do
+    case Msg of
+      WM_COPYDATA  : try
+        case WMMsg.CopyDataStruct.dwData of
+          0: begin
+            requeststream := TMemoryStream.Create;
+            responsestream := TMemoryStream.Create;
+
+            requeststream.Write(WMMsg.CopyDataStruct.lpData^, WMMsg.CopyDataStruct.cbData);
+            requeststream.Position := 0;
+
+            //ProcessMessage(MessageIntf, fTransport, requeststream, responsestream);
+            DispatchMessage(fTransport, requeststream, responsestream);
+
+            CDS.dwData := 0;
+            CDS.cbData := responsestream.Size;
+            CDS.lpData := responsestream.Memory;
+
+            SendMessage(WMMsg.From, WM_COPYDATA, 0, Integer(@CDS));
+          end;
+          2:
+            begin
+              if WMMsg.CopyDataStruct.cbData = sizeof(TGuid) then begin
+                s := GuidToString(PGuid(WMMsg.CopyDataStruct.lpData)^);
+                fActiveEventMap.Values[s] := IntToStr(WMMsg.From);
+                if assigned(fActiveEventRepository) then
+                  fActiveEventRepository.AddSession(PGuid(WMMsg.CopyDataStruct.lpData)^, Self)
+              end;
+            end;
+          3:
+            begin
+              if WMMsg.CopyDataStruct.cbData = sizeof(TGuid) then begin
+                s := GuidToString(PGuid(WMMsg.CopyDataStruct.lpData)^);
+                i := fActiveEventMap.IndexOfName(s);
+                if i <> -1 then
+                  fActiveEventMap.Delete(i);
+                if assigned(fActiveEventRepository) then
+                  fActiveEventRepository.RemoveSession(PGuid(WMMsg.CopyDataStruct.lpData)^);
+              end;
+            end;
+        end;
+      finally
+        responsestream.Free;
+        requeststream.Free;
+      end;
+      else result := DefWindowProc(FWindowHandle, Msg, wParam, lParam);
+    end;
+end;
+
+function TROWinMessageServer.IntGetActive: boolean;
+begin
+  result := (fWindowHandle>0);
+end;
+
+procedure TROWinMessageServer.IntSetActive(const Value: boolean);
+begin
+  if Value then begin
+    if not (csDesigning in ComponentState)
+      then begin
+        CheckProperties;
+        fWindowHandle := AllocateHWnd(ServerID, WndProc);
+      end  
+      else fWindowHandle := 1; // To save the property value
+  end
+  else begin
+    if (fWindowHandle>0) then begin
+      if (fWindowHandle>1) then {$IFDEF DELPHI6UP}Classes.{$ENDIF}DeallocateHWnd(fWindowHandle);
+      fWindowHandle := 0;
+    end;
+  end;
+end;
+
+function TROWinMessageServer.GetTransportObject: TObject;
+begin
+  result := Self;
+end;
+
+function TROWinMessageServer.QueryInterface(const IID: TGUID;
+  out Obj): HRESULT;
+begin
+  if IsEqualGUID(IROActiveEventServer, IID) and not assigned(fActiveEventRepository) then
+    result := E_NOINTERFACE
+  else
+    result := inherited QueryInterface(IID, Obj) 
+end;
+
+procedure TROWinMessageServer.DispatchEvent(anEventDataItem: TROEventData;
+  aSessionReference: TGUID; aSender: TObject);
+var
+  lHandle: HWND;
+  cds: TCopyDataStruct;
+begin
+  lHandle := StrToIntDef(fActiveEventMap.Values[GUIDToString(aSessionReference)], 0);
+  if lHandle = 0 then exit; // doesn't exist.
+  CDS.dwData := 1;
+  CDS.cbData := TMemoryStream(anEventDataItem.Data).Size;
+  CDS.lpData := TMemoryStream(anEventDataItem.Data).Memory;
+
+  SendMessage(lHandle, WM_COPYDATA, 0, Integer(@CDS));
+end;
+
+procedure TROWinMessageServer.EventsRegistered(aSender: TObject;
+  aClient: TGUID);
+begin
+
+end;
+
+procedure TROWinMessageServer.CheckProperties;
+begin
+  Check(ServerID = '', Name + '.ServerID must be set.');
+  inherited;
+end;
+
+initialization
+  RegisterServerClass(TROWinMessageServer);
+finalization
+  UnregisterServerClass(TROWinMessageServer);
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROXDOM_2_3.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROXDOM_2_3.pas
new file mode 100644
index 0000000..5dc82c6
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROXDOM_2_3.pas	
@@ -0,0 +1,33227 @@
+unit uROXDOM_2_3;
+
+// XDOM 2.3.28
+// Extended Document Object Model 2.3.28
+// Delphi 3/4/5/6 and Kylix Implementation
+//
+// Copyright (c) 1999-2002 by Dieter Köhler
+// ("http://www.philo.de/xml/")
+//
+// Definitions:
+// - "Package" refers to the collection of files distributed by
+//   the Copyright Holder, and derivatives of that collection of
+//   files created through textual modification.
+// - "Standard Version" refers to such a Package if it has not
+//   been modified, or has been modified in accordance with the
+//   wishes of the Copyright Holder.
+// - "Copyright Holder" is whoever is name in the copyright or
+//   copyrights for the package.
+// - "You" is you, if you're thinking about copying or distributing
+//   this Package.
+//
+// Permission is hereby granted, free of charge, to any person
+// obtaining a copy of this software and associated documentation
+// files (the "Package"), to deal in the Package without restriction,
+// including without limitation the rights to use, copy, modify,
+// merge, publish, distribute, sublicense, and/or sell copies of the
+// Package, and to permit persons to whom the Package is furnished
+// to do so, subject to the following conditions:
+//
+// The above copyright notice and this permission notice shall be
+// included in all copies or substantial portions of the Package.
+//
+// You may modify your copy of this Package in any way, provided
+// that you insert a prominent notice in each changed file stating
+// how and when you changed a file, and provided that you do at
+// least one of the following:
+//
+// a) allow the Copyright Holder to include your modifications in
+// the Standard Version of the Package.
+//
+// b) use the modified Package only within your corporation or
+// organization.
+//
+// c) rename any non standard executables, units, and classes so
+// the names do not conflict with standard executables, units, and
+// classes, and provide a separate manual page that clearly documents
+// how it differs from the standard version.
+//
+// d) make other distribution arrangements with the Copyright Holder.
+//
+// The name of the Copyright Holder may not be used to endorse or
+// promote products derived from this Package without specific prior
+// written permission.
+//
+// THE PACKAGE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+// EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+// MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.
+// IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY
+// CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT,
+// TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE
+// PACKAGE OR THE USE OR OTHER DEALINGS IN THE PACKAGE.
+
+{$I RemObjects.inc}
+{$HINTS OFF}
+
+interface
+uses
+  uROUnicodeConv, // This version of XDOM needs the Unicode Converter Library 2.x,
+               // available at "http://www.philo.de/xml/"
+  Math, SysUtils, Classes, variants;
+
+type
+  {$IFNDEF UNICODE}
+  UnicodeString = WideString;
  {$ENDIF}

+  EDomException = class(Exception);
+
+  EIndex_Size_Err = class(EdomException);
+  EDomstring_Size_Err = class(EdomException);
+  EHierarchy_Request_Err = class(EdomException);
+  EWrong_Document_Err = class(EdomException);
+  EInvalid_Character_Err = class(EdomException);
+  ENo_Data_Allowed_Err = class(EdomException);
+  ENo_Modification_Allowed_Err = class(EdomException);
+  ENot_Found_Err = class(EdomException);
+  ENot_Supported_Err = class(EdomException);
+  EInuse_Attribute_Err = class(EdomException);
+  EInvalid_State_Err = class(EdomException);
+  ESyntax_Err = class(EdomException);
+  EInvalid_Modification_Err = class(EdomException);
+  ENamespace_Err = class(EdomException);
+  EInvalid_Access_Err = class(EdomException);
+  EInuse_Node_Err = class(EdomException);
+  EInuse_Content_Model_Err = class(EdomException);
+  EInuse_AttributeDefinition_Err = class(EdomException);
+  ENo_External_Entity_Allowed_Err = class(EdomException);
+  EUnknown_Document_Format_Err = class(EdomException);
+
+  EDomASException = class(EdomException);
+  EDuplicate_Name_Err = class(EDomASException);
+  ENo_AS_Available = class(EDomASException);
+  EType_Err = class(EDomASException);
+  EValidation_Err = class(EDomASException);
+  EWrong_MIME_Type_Err = class(EDomASException);
+
+  EWrong_ASModel_Err = class(EDomASException);  // xxx Replace this!
+
+  EParserException = class(EdomException);
+
+  EXPath_Exception = class(EdomException);
+  EXPath_Invalid_Expression_Err = class(EXPath_Exception);
+  EXPath_Type_Err = class(EXPath_Exception);
+
+
+  TXmlErrorType = (
+
+    // Remark: The order and number of this error types is perhaps going to
+    //         change in future XDOM versions.  So, if possible, do refer to
+    //         error types by using the constants below, but avoid using
+    //         their numerical equivalents!
+
+    ET_NONE, // No Error
+
+    ET_DOUBLE_ATTDEF,
+    ET_DOUBLE_ENTITY_DECL,
+    ET_DOUBLE_PARAMETER_ENTITY_DECL,
+    ET_UNUSABLE_ENTITY_DECL,
+
+    ET_ATTRIBUTE_DEFAULT_TYPE_MISMATCH,
+    ET_ATTRIBUTE_DEFINITION_NOT_FOUND,
+    ET_ATTRIBUTE_TYPE_MISMATCH,
+    ET_DUPLICATE_ELEMENT_TYPE_DECL,
+    ET_DUPLICATE_ENUMERATION_TOKEN,
+    ET_DUPLICATE_ID_ON_ELEMENT_TYPE,
+    ET_DUPLICATE_ID_VALUE,
+    ET_DUPLICATE_NAME_IN_MIXED_CONTENT,
+    ET_DUPLICATE_NOTATION_DECL,
+    ET_DUPLICATE_NOTATION_ON_ELEMENT_TYPE,
+    ET_DUPLICATE_NOTATION_TOKEN,
+    ET_DUPLICATE_TOKENS,
+    ET_FIXED_ATTRIBUTE_MISMATCH,
+    ET_ID_NEITHER_IMPLIED_NOR_REQUIRED,
+    ET_ELEMENT_DECLARED_EMPTY_HAS_CONTENT,
+    ET_ELEMENT_TYPE_DECL_NOT_FOUND,
+    ET_ELEMENT_WITH_ILLEGAL_ELEMENT_CONTENT,
+    ET_ELEMENT_WITH_ILLEGAL_MIXED_CONTENT,
+    ET_ENTITY_DECL_NOT_FOUND,
+    ET_EXTERNAL_SUBSET_NOT_FOUND,
+    ET_NONDETERMINISTIC_ELEMENT_CONTENT_MODEL,
+    ET_NOTATION_ON_EMPTY_ELEMENT,
+    ET_PARAMETER_ENTITY_DECL_NOT_FOUND,
+    ET_REQUIRED_ATTRIBUTE_NOT_FOUND,
+    ET_TARGET_ID_VALUE_NOT_FOUND,
+    ET_TARGET_UNPARSED_ENTITY_NOT_FOUND,
+    ET_UNDECLARED_NOTATION_NAME,
+    ET_UNRESOLVABLE_ENTITY_REFERENCE,
+    ET_UNRESOLVABLE_PARAMETER_ENTITY_REFERENCE,
+    ET_WRONG_DECL_OF_PREDEFINED_ENTITY,
+    ET_WRONG_ROOT_ELEMENT_TYPE,
+
+    ET_ATTRIBUTE_VALUE_REFERS_TO_EXTERNAL_ENTITY,
+    ET_DOUBLE_ATTRIBUTE_NAME,
+    ET_DOUBLE_EQUALITY_SIGN,
+    ET_DOUBLE_ROOT_ELEMENT,
+    ET_INVALID_ATTRIBUTE_NAME,
+    ET_INVALID_ATTRIBUTE_VALUE,
+    ET_INVALID_CDATA_SECTION,
+    ET_INVALID_CHARACTER,
+    ET_INVALID_CHARREF,
+    ET_INVALID_COMMENT,
+    ET_INVALID_ELEMENT_NAME,
+    ET_INVALID_ENTITY_NAME,
+    ET_INVALID_PROCESSING_INSTRUCTION,
+    ET_INVALID_PUBID_LITERAL,
+    ET_INVALID_SYSTEM_LITERAL,
+    ET_INVALID_TEXT_DECL,
+    ET_INVALID_XML_DECL,
+    ET_LT_IN_ATTRIBUTE_VALUE,
+    ET_MISSING_END_TAG,
+    ET_MISSING_EQUALITY_SIGN,
+    ET_MISSING_QUOTATION_MARK,
+    ET_MISSING_START_TAG,
+    ET_MISSING_WHITE_SPACE,
+    ET_NOT_IN_ROOT,
+    ET_NO_PROPER_MARKUP_REFERENCED,
+    ET_RECURSIVE_REFERENCE,
+    ET_REFERENCE_TO_UNPARSED_ENTITY,
+    ET_WRONG_ORDER,
+
+    ET_DOUBLE_DOCTYPE,
+    ET_INVALID_ATTRIBUTE_DECL,
+    ET_INVALID_CONDITIONAL_SECTION,
+    ET_INVALID_DOCTYPE,
+    ET_INVALID_ELEMENT_DECL,
+    ET_INVALID_ENTITY_DECL,
+    ET_INVALID_NOTATION_DECL,
+    ET_UNKNOWN_DECL_TYPE,
+
+    ET_INVALID_NAMESPACE_URI,
+    ET_INVALID_PREFIX,
+    ET_INVALID_QUALIFIED_NAME,
+    ET_NAMESPACE_URI_NOT_FOUND,
+    ET_WRONG_PREFIX_MAPPING_NESTING,
+
+    ET_ENCODING_NOT_SUPPORTED
+  );
+
+  TXmlErrorTypes = set of TXmlErrorType;
+
+const
+  ET_WARNINGS: TXmlErrorTypes = [
+    ET_NONE, // Included in ET_WARNINGS to ease calculations.
+    ET_DOUBLE_ATTDEF,
+    ET_DOUBLE_ENTITY_DECL,
+    ET_DOUBLE_PARAMETER_ENTITY_DECL,
+    ET_UNUSABLE_ENTITY_DECL
+  ];
+
+  ET_ERRORS: TXmlErrorTypes = [
+    ET_ATTRIBUTE_DEFAULT_TYPE_MISMATCH,
+    ET_ATTRIBUTE_DEFINITION_NOT_FOUND,
+    ET_ATTRIBUTE_TYPE_MISMATCH,
+    ET_DUPLICATE_ELEMENT_TYPE_DECL,
+    ET_DUPLICATE_ENUMERATION_TOKEN,
+    ET_DUPLICATE_ID_ON_ELEMENT_TYPE,
+    ET_DUPLICATE_ID_VALUE,
+    ET_DUPLICATE_NAME_IN_MIXED_CONTENT,
+    ET_DUPLICATE_NOTATION_DECL,
+    ET_DUPLICATE_NOTATION_ON_ELEMENT_TYPE,
+    ET_DUPLICATE_NOTATION_TOKEN,
+    ET_DUPLICATE_TOKENS,
+    ET_ELEMENT_DECLARED_EMPTY_HAS_CONTENT,
+    ET_ELEMENT_TYPE_DECL_NOT_FOUND,
+    ET_ELEMENT_WITH_ILLEGAL_ELEMENT_CONTENT,
+    ET_ELEMENT_WITH_ILLEGAL_MIXED_CONTENT,
+    ET_ENTITY_DECL_NOT_FOUND,
+    ET_EXTERNAL_SUBSET_NOT_FOUND,
+    ET_FIXED_ATTRIBUTE_MISMATCH,
+    ET_ID_NEITHER_IMPLIED_NOR_REQUIRED,
+    ET_NONDETERMINISTIC_ELEMENT_CONTENT_MODEL,
+    ET_NOTATION_ON_EMPTY_ELEMENT,
+    ET_PARAMETER_ENTITY_DECL_NOT_FOUND,
+    ET_REQUIRED_ATTRIBUTE_NOT_FOUND,
+    ET_TARGET_ID_VALUE_NOT_FOUND,
+    ET_TARGET_UNPARSED_ENTITY_NOT_FOUND,
+    ET_UNDECLARED_NOTATION_NAME,
+    ET_UNRESOLVABLE_ENTITY_REFERENCE,
+    ET_UNRESOLVABLE_PARAMETER_ENTITY_REFERENCE,
+    ET_WRONG_DECL_OF_PREDEFINED_ENTITY,
+    ET_WRONG_ROOT_ELEMENT_TYPE
+  ];
+
+  ET_FATAL_ERRORS: TXmlErrorTypes = [
+    ET_ATTRIBUTE_VALUE_REFERS_TO_EXTERNAL_ENTITY,
+    ET_DOUBLE_ATTRIBUTE_NAME,
+    ET_DOUBLE_EQUALITY_SIGN,
+    ET_DOUBLE_ROOT_ELEMENT,
+    ET_INVALID_ATTRIBUTE_NAME,
+    ET_INVALID_ATTRIBUTE_VALUE,
+    ET_INVALID_CDATA_SECTION,
+    ET_INVALID_CHARACTER,
+    ET_INVALID_CHARREF,
+    ET_INVALID_COMMENT,
+    ET_INVALID_ELEMENT_NAME,
+    ET_INVALID_ENTITY_NAME,
+    ET_INVALID_PROCESSING_INSTRUCTION,
+    ET_INVALID_PUBID_LITERAL,
+    ET_INVALID_SYSTEM_LITERAL,
+    ET_INVALID_TEXT_DECL,
+    ET_INVALID_XML_DECL,
+    ET_LT_IN_ATTRIBUTE_VALUE,
+    ET_MISSING_END_TAG,
+    ET_MISSING_EQUALITY_SIGN,
+    ET_MISSING_QUOTATION_MARK,
+    ET_MISSING_START_TAG,
+    ET_MISSING_WHITE_SPACE,
+    ET_NOT_IN_ROOT,
+    ET_NO_PROPER_MARKUP_REFERENCED,
+    ET_RECURSIVE_REFERENCE,
+    ET_REFERENCE_TO_UNPARSED_ENTITY,
+    ET_WRONG_ORDER,
+
+    ET_DOUBLE_DOCTYPE,
+    ET_INVALID_ATTRIBUTE_DECL,
+    ET_INVALID_CONDITIONAL_SECTION,
+    ET_INVALID_DOCTYPE,
+    ET_INVALID_ELEMENT_DECL,
+    ET_INVALID_ENTITY_DECL,
+    ET_INVALID_NOTATION_DECL,
+    ET_UNKNOWN_DECL_TYPE,
+
+    ET_INVALID_NAMESPACE_URI,
+    ET_INVALID_PREFIX,
+    ET_INVALID_QUALIFIED_NAME,
+    ET_NAMESPACE_URI_NOT_FOUND,
+    ET_WRONG_PREFIX_MAPPING_NESTING,
+
+    ET_ENCODING_NOT_SUPPORTED
+  ];
+
+  ET_DOCTYPE_FATAL_ERRORS: TXmlErrorTypes = [
+    ET_INVALID_DOCTYPE,
+    ET_DOUBLE_DOCTYPE,
+    ET_INVALID_ATTRIBUTE_DECL,
+    ET_INVALID_CONDITIONAL_SECTION,
+    ET_INVALID_ELEMENT_DECL,
+    ET_INVALID_ENTITY_DECL,
+    ET_INVALID_NOTATION_DECL,
+    ET_UNKNOWN_DECL_TYPE
+  ];
+
+  ET_NAMESPACE_FATAL_ERRORS: TXmlErrorTypes = [
+    ET_INVALID_NAMESPACE_URI,
+    ET_INVALID_PREFIX,
+    ET_INVALID_QUALIFIED_NAME,
+    ET_NAMESPACE_URI_NOT_FOUND,
+    ET_WRONG_PREFIX_MAPPING_NESTING
+  ];
+
+type
+  TIso639LanguageCode = ( iso639_aa, // Afar
+                          iso639_ab, // Abkhazian
+                          iso639_af, // Afrikaans
+                          iso639_am, // Amharic
+                          iso639_ar, // Arabic
+                          iso639_as, // Assamese
+                          iso639_ay, // Aymara
+                          iso639_az, // Azerbaijani
+
+                          iso639_ba, // Bashkir
+                          iso639_be, // Byelorussian
+                          iso639_bg, // Bulgarian
+                          iso639_bh, // Bihari
+                          iso639_bi, // Bislama
+                          iso639_bn, // Bengali; Bangla
+                          iso639_bo, // Tibetan
+                          iso639_br, // Breton
+
+                          iso639_ca, // Catalan
+                          iso639_co, // Corsican
+                          iso639_cs, // Czech
+                          iso639_cy, // Welsh
+
+                          iso639_da, // Danish
+                          iso639_de, // German
+                          iso639_dz, // Bhutani
+
+                          iso639_el, // Greek
+                          iso639_en, // English
+                          iso639_eo, // Esperanto
+                          iso639_es, // Spanish
+                          iso639_et, // Estonian
+                          iso639_eu, // Basque
+
+                          iso639_fa, // Persian
+                          iso639_fi, // Finnish
+                          iso639_fj, // Fiji
+                          iso639_fo, // Faeroese
+                          iso639_fr, // French
+                          iso639_fy, // Frisian
+
+                          iso639_ga, // Irish
+                          iso639_gd, // Scots Gaelic
+                          iso639_gl, // Galician
+                          iso639_gn, // Guarani
+                          iso639_gu, // Gujarati
+
+                          iso639_ha, // Hausa
+                          iso639_hi, // Hindi
+                          iso639_hr, // Croatian
+                          iso639_hu, // Hungarian
+                          iso639_hy, // Armenian
+
+                          iso639_ia, // Interlingua
+                          iso639_ie, // Interlingue
+                          iso639_ik, // Inupiak
+                          iso639_in, // Indonesian
+                          iso639_is, // Icelandic
+                          iso639_it, // Italian
+                          iso639_iw, // Hebrew
+
+                          iso639_ja, // Japanese
+                          iso639_ji, // Yiddish
+                          iso639_jw, // Javanese
+
+                          iso639_ka, // Georgian
+                          iso639_kk, // Kazakh
+                          iso639_kl, // Greenlandic
+                          iso639_km, // Cambodian
+                          iso639_kn, // Kannada
+                          iso639_ko, // Korean
+                          iso639_ks, // Kashmiri
+                          iso639_ku, // Kurdish
+                          iso639_ky, // Kirghiz
+
+                          iso639_la, // Latin
+                          iso639_ln, // Lingala
+                          iso639_lo, // Laothian
+                          iso639_lt, // Lithuanian
+                          iso639_lv, // Latvian; Lettish
+
+                          iso639_mg, // Malagasy
+                          iso639_mi, // Maori
+                          iso639_mk, // Macedonian
+                          iso639_ml, // Malayalam
+                          iso639_mn, // Mongolian
+                          iso639_mo, // Moldavian
+                          iso639_mr, // Marathi
+                          iso639_ms, // Malay
+                          iso639_mt, // Maltese
+                          iso639_my, // Burmese
+
+                          iso639_na, // Nauru
+                          iso639_ne, // Nepali
+                          iso639_nl, // Dutch
+                          iso639_no, // Norwegian
+
+                          iso639_oc, // Occitan
+                          iso639_om, // Afan; Oromo
+                          iso639_or, // Oriya
+
+                          iso639_pa, // Punjabi
+                          iso639_pl, // Polish
+                          iso639_ps, // Pashto; Pushto
+                          iso639_pt, // Portuguese
+
+                          iso639_qu, // Quechua
+
+                          iso639_rm, // Rhaeto-Romance
+                          iso639_rn, // Kirundi
+                          iso639_ro, // Romanian
+                          iso639_ru, // Russian
+                          iso639_rw, // Kinyarwanda
+
+                          iso639_sa, // Sanskrit
+                          iso639_sd, // Sindhi
+                          iso639_sg, // Sangro
+                          iso639_sh, // Serbo-Croatian
+                          iso639_si, // Singhalese
+                          iso639_sk, // Slovak
+                          iso639_sl, // Slovenian
+                          iso639_sm, // Samoan
+                          iso639_sn, // Shona
+                          iso639_so, // Somali
+                          iso639_sq, // Albanian
+                          iso639_sr, // Serbian
+                          iso639_ss, // Siswati
+                          iso639_st, // Sesotho
+                          iso639_su, // Sundanese
+                          iso639_sv, // Swedish
+                          iso639_sw, // Swahili
+
+                          iso639_ta, // Tamil
+                          iso639_te, // Tegulu
+                          iso639_tg, // Tajik
+                          iso639_th, // Thai
+                          iso639_ti, // Tigrinya
+                          iso639_tk, // Turkmen
+                          iso639_tl, // Tagalog
+                          iso639_tn, // Setswana
+                          iso639_to, // Tonga
+                          iso639_tr, // Turkish
+                          iso639_ts, // Tsonga
+                          iso639_tt, // Tatar
+                          iso639_tw, // Twi
+
+                          iso639_uk, // Ukrainian
+                          iso639_ur, // Urdu
+                          iso639_uz, // Uzbek
+
+                          iso639_vi, // Vietnamese
+                          iso639_vo, // Volapuk
+
+                          iso639_wo, // Wolof
+
+                          iso639_xh, // Xhosa
+
+                          iso639_yo, // Yoruba
+
+                          iso639_zh, // Chinese
+                          iso639_zu  // Zulu
+                         );
+
+  TIso639LanguageCodeSet = set of TIso639LanguageCode;
+
+  TdomNodeType = (ntUnknown,
+                  ntElement_Node,
+                  ntAttribute_Node,
+                  ntText_Node,
+                  ntCDATA_Section_Node,
+                  ntEntity_Reference_Node,
+                  ntEntity_Node,
+                  ntProcessing_Instruction_Node,
+                  ntComment_Node,
+                  ntDocument_Node,
+                  ntDocument_Type_Node,
+                  ntDocument_Fragment_Node,
+                  ntNotation_Node,
+                  ntXPath_Namespace_Node);
+
+  TdomWhatToShow = set of TdomNodeType;
+
+const
+  SHOW_ALL: TdomWhatToShow = [ntElement_Node .. High(TDomNodeType)];
+  AS_UNBOUND = High(integer);
+
+type
+  TdomXPathResultType = ( XPATH_BOOLEAN_TYPE,
+                          XPATH_NODE_SNAPSHOT_TYPE,
+                          XPATH_NUMBER_TYPE,
+                          XPATH_STRING_TYPE
+                        );
+
+  TdomXPathResultTypes = set of TdomXPathResultType;
+
+const
+  XPATH_ANY_TYPE: TdomXPathResultTypes = [XPATH_BOOLEAN_TYPE .. High(TdomXPathResultType)];
+
+type
+  TdomNodeTypeSet = set of TdomNodeType;
+
+  TdomPieceType = (xmlProcessingInstruction,xmlXmlDeclaration,          // xxx xmlXmlDeclaration necessary?
+                   xmlTextDeclaration,xmlComment,xmlCDATA,xmlPCDATA,    // xxx xmlTextDeclaration necessary?
+                   xmlDoctype,xmlStartTag,xmlEndTag,xmlEmptyElementTag,
+                   xmlCharRef,xmlEntityRef,xmlParameterEntityRef,
+                   xmlEntityDecl,xmlElementDecl,xmlAttributeDecl,
+                   xmlNotationDecl,xmlCondSection,xmlUnknown);
+
+  TdomTreePosition = set of ( Tree_Position_Ancestor,
+                              Tree_Position_Descendant,
+                              Tree_Position_Disconnected,
+                              Tree_Position_Equivalent,
+                              Tree_Position_Following,
+                              Tree_Position_Preceding,
+                              Tree_Position_Same_Node );
+
+  TdomEntityResolveOption = (erReplace,erExpand);
+
+  TdomContentspecType = (ctEmpty,ctAny,ctMixed,ctChildren);
+
+  TdomEntityType = (etExternal_Entity,etInternal_Entity);
+
+  TdomFilterResult = (filter_accept,filter_reject,filter_skip);
+
+  TdomFilenameToUriOptions = set of (fuSetLocalhost,fuPlainColon);
+
+  TdomNode = class;
+  TdomAttr = class;
+  TdomElement = class;
+  TdomDocument = class;
+  TdomDocumentType = class;
+  TdomEntity = class;
+  TdomNotation = class;
+  TdomNodeList = class;
+
+  TdomAbstractView = class;
+
+  TdomMediaList = class;
+
+  TXmlSourceCodePiece = class;
+
+  TdomDocumentClass = class of TdomDocument;
+
+  PdomDocumentFormat = ^TdomDocumentFormat;
+
+  TdomDocumentFormat = record
+    DocumentClass: TdomDocumentClass;
+    NamespaceUri:  UnicodeString;
+    QualifiedName: UnicodeString;
+    next:          PdomDocumentFormat;
+  end;
+
+  TdomWideStringItem = record
+    FString: UnicodeString;
+    FObject: TObject;
+  end;
+
+  PdomWideStringItemList = ^TdomWideStringItemList;
+  TdomWideStringItemList = array[0..MaxListSize]  of TdomWideStringItem;
+
+  TdomWideStringList = class(TPersistent)
+  private
+    FCapacity: integer;
+    FCount: integer;
+    FDuplicates: TDuplicates;
+    FList: PdomWideStringItemList;
+    FSorted: boolean;
+    FUpdateCount: integer;
+    FOnChange: TNotifyEvent;
+    FOnChanging: TNotifyEvent;
+    procedure exchangeItems(index1,
+                            index2: integer);
+    procedure grow;
+    procedure insertItem(index: integer;
+                         const s: UnicodeString;
+                         AObject: TObject);
+    procedure quickSort(l,
+                        r: integer);
+    procedure setSorted(const value: boolean);
+  protected
+    procedure changed; virtual;
+    procedure changing; virtual;
+    procedure error(const msg: string;
+                    data: integer);
+    function get(index: integer): UnicodeString; virtual;
+    function getCapacity: integer; virtual;
+    function getCount: integer; virtual;
+    function getObject(index: integer): TObject; virtual;
+    procedure put(index: integer;
+                  const s: UnicodeString); virtual;
+    procedure putObject(index: integer;
+                        aObject: TObject); virtual;
+    procedure setCapacity(newCapacity: integer); virtual;
+    procedure setUpdateState(updating: boolean); virtual;
+  public
+    destructor destroy; override;
+    function add(s: UnicodeString): integer; virtual;
+    function addObject(s: UnicodeString; AObject: TObject): integer; virtual;
+    procedure addWideStrings(strings: TdomWideStringList); virtual;
+    procedure append(s: UnicodeString); virtual;
+    procedure assign(source: TPersistent); override;
+    procedure beginUpdate; virtual;
+    procedure clear; virtual;
+    procedure Delete(index: integer); virtual;
+    procedure endUpdate; virtual;
+    procedure exchange(index1, index2: integer); virtual;
+    function find(const s: UnicodeString;
+                    var index: integer): boolean; virtual;
+    function indexOf(const s: UnicodeString): integer; virtual;
+    procedure insert(index: integer; const s: UnicodeString); virtual;
+    procedure insertObject(index: integer; const s: UnicodeString; AObject: TObject); virtual;
+    procedure sort; virtual;
+    property capacity: integer read getCapacity write setCapacity;
+    property count: integer read getCount;
+    property duplicates: TDuplicates read FDuplicates write FDuplicates;
+    property objects[index: integer]: TObject read getObject write putObject;
+    property sorted: boolean read FSorted write setSorted;
+    property wideStrings[index: integer]: UnicodeString read get write put; default;
+    property OnChange: TNotifyEvent read FOnChange write FOnChange;
+    property OnChanging: TNotifyEvent read FOnChanging write FOnChanging;
+  end;
+
+  TdomNameValueList = class(TPersistent)
+  private
+    FNames: TdomWideStringList;
+    FValues: TdomWideStringList;
+    procedure error(const msg: string;
+                    data: integer);
+    function getLength: integer; virtual;
+    function getCapacity: integer; virtual;
+    function getDuplicates: TDuplicates;
+    function getName(index: integer): UnicodeString; virtual;
+    function getObject(index: integer): TObject; virtual;
+    function getValue(index: integer): UnicodeString; virtual;
+    procedure putObject(index: integer;
+                        aObject: TObject); virtual;
+    procedure setCapacity(const value: integer); virtual;
+    procedure setDuplicates(const value: TDuplicates);
+    procedure setSorted(const Value: boolean);
+    function getSorted: boolean;
+  public
+    constructor create;
+    destructor destroy; override;
+    function add(const name,
+                       value: UnicodeString): integer; virtual;
+    function addObject(const name,
+                       value: UnicodeString;
+                       AObject: TObject): integer; virtual;
+    procedure addNameValueList(const nvl: TdomNameValueList); virtual;
+    procedure assign(source: TPersistent); override;
+    procedure clear; virtual;
+    procedure Delete(const index: integer); virtual;
+    procedure exchange(const index1,
+                             index2: integer); virtual;
+    function indexOf(const name,
+                           value: UnicodeString): integer; virtual;
+    function indexOfName(const name: UnicodeString): integer; virtual;
+    procedure insert(const index: integer;
+                     const name,
+                           value: UnicodeString); virtual;
+    function find(const name,
+                        value: UnicodeString;
+                    var index: integer): boolean; virtual;
+    function findOfName(const name: UnicodeString;
+                          var index: integer): boolean; virtual;
+    procedure sort; virtual;
+    property capacity: integer read getCapacity write setCapacity;
+    property duplicates: TDuplicates read getDuplicates write setDuplicates;
+    property length: integer read getLength;
+    property names[index: integer]: UnicodeString read getName;
+    property objects[index: integer]: TObject read getObject write putObject;
+    property sorted: boolean read getSorted write setSorted;
+    property values[index: integer]: UnicodeString read getValue;
+  end;
+
+  TdomNameValueTree = class(TdomNameValueList)
+  private
+    FParentTree: TdomNameValueTree;
+    function getChild(index: integer): TdomNameValueTree;
+  public
+    destructor Destroy; override;
+    function addChild(const name,
+                            value: UnicodeString;
+                      const child: TdomNameValueTree): integer; virtual;
+    function addChildObject(const name,
+                                  value: UnicodeString;
+                            const child: TdomNameValueTree;
+                            const AObject: TObject): integer; virtual;
+    procedure assign(source: TPersistent); override;
+    procedure clear; override;
+    procedure Delete(const index: integer); override;
+    function hasChild(const index: integer): boolean; virtual;
+    function indexOfChild(const child: TdomNameValueTree): integer; virtual;
+    procedure insertChild(const index: integer;
+                          const name,
+                                value: UnicodeString;
+                          const child: TdomNameValueTree); virtual;
+    function isDescendantOf(const nvtree: TdomNameValueTree): boolean; virtual;
+    function replaceChild(const index: integer;
+                          const newChild: TdomNameValueTree): TdomNameValueTree; virtual;
+    property children[index: integer]: TdomNameValueTree read getChild;
+    property parentTree: TdomNameValueTree read FParentTree;
+  end;
+
+  TdomCustomStr = class
+  private
+    FActualLen: integer;
+    FCapacity: integer;
+    FContent: UnicodeString;
+  protected
+    function getWideChars(indx: integer): wideChar; virtual;
+    procedure setWideChars(indx: integer;
+                           ch: wideChar); virtual;
+  public
+    constructor create;
+    procedure addWideChar(const ch: wideChar); virtual;
+    procedure addWideString(const s: UnicodeString); virtual;
+    function  endsWith(const s: UnicodeString): boolean; virtual;
+    function  isEqual(const s: UnicodeString): boolean; virtual;
+    procedure reset; virtual;                                   // xxx rename this into 'clear'?
+    function  startsWith(const s: UnicodeString): boolean; virtual;
+    function  value: UnicodeString; virtual;
+              // Since calling the value function involves time
+              // consuming string copying, always use one of the
+              // other TdomCustomStr access functions, if possible,
+              // e.g. wideChars[index] instead of value[index],
+              // isEqual[s] instead of (value = s), or
+              // length instead of length(value).
+    property  length: integer read FActualLen;
+    property  wideChars[indx: integer]: wideChar read getWideChars write setWideChars; default;
+  end;
+
+  TdomWideStringStream = class(TStream)
+  private
+    FDataStringP: PAnsiChar;
+    FSize: longint;
+    FCapacity: longint;
+    FPosition: longint;
+  protected
+    procedure setCapacity(newCapacity: longint); virtual;
+    procedure setSize(newSize: longint); override;
+    procedure setStringPosition(value: longint);
+    function getStringPosition: longint;
+    procedure setStringLength(value: longint);
+    function getStringLength: longint;
+    function getDataString: UnicodeString;
+  public
+    constructor createFromString(const aString: UnicodeString);
+    destructor destroy; override;
+    function read(var buffer; count: longint): longint; override;
+    function readString(count: longint): UnicodeString;
+    function seek(offset: longint; origin: word): longint; override;
+    function write(const buffer; count: longint): longint; override;
+    procedure writeString(const aString: UnicodeString);
+    property capacity: longint read FCapacity write setCapacity;
+    property stringLength: longint read getStringLength write setStringLength;
+    property stringPosition: longint read getStringPosition write setStringPosition;
+    property dataString: UnicodeString read getDataString;
+  end;
+
+  TIso639Info = class(TPersistent)
+  private
+    function codeToName_en(value: TIso639LanguageCode): UnicodeString;
+    function nameToCode_en(value: UnicodeString): TIso639LanguageCode;
+  protected
+    FAppendSymbolToName: boolean;
+    FNameLanguage: TIso639LanguageCode;
+    FSupportedLanguages: TIso639LanguageCodeSet;
+    procedure assignTo(dest: TPersistent); override;
+    procedure setNameLanguage(const value: TIso639LanguageCode); virtual;
+  public
+    constructor create;
+    function codeToName(const value: TIso639LanguageCode): UnicodeString; virtual;
+    function codeToSymbol(const value: TIso639LanguageCode): UnicodeString; virtual;
+    function nameToCode(const value: UnicodeString): TIso639LanguageCode; virtual;
+    function symbolToCode(const value: UnicodeString): TIso639LanguageCode; virtual;
+    property appendSymbolToName: boolean read FAppendSymbolToName write FAppendSymbolToName default false;
+    property nameLanguage: TIso639LanguageCode read FNameLanguage write setNameLanguage default iso639_en;
+    property supportedLanguages: TIso639LanguageCodeSet read FSupportedLanguages;
+  end;
+
+  TdomCMNodeList          = class;
+  TdomCMObject            = class;
+  TdomCMEntity            = class;
+  TdomCMExternalObject    = class;
+  TdomCMInternalObject    = class;
+  TdomError               = class;
+  TdomXPathExpression     = class;
+  TdomXPathNSResolver     = class;
+  TdomXPathResult         = class;
+  TdomXPathSnapshotResult = class;
+
+  TXmlParserAction = (paFail,paRetry,paOK);
+
+  TdomNewLineType = (nltCRLF,ntlCR,ntlLF);
+
+  TdomAttrChange = ( AC_ADDITION,
+                     AC_MODIFICATION,
+                     AC_REMOVAL);
+
+  TdomAttrModifiedDocEvent = procedure(sender: TObject;
+                                       modifiedDoc: TdomDocument;
+                                       modifiedNode: TdomNode;
+                                       attrChange: TdomAttrChange;
+                                       prevValue,
+                                       newValue: UnicodeString;
+                                       relatedAttr: TdomAttr) of object;
+
+  TdomAttrModifiedEvent = procedure(sender: TObject;
+                                    modifiedNode: TdomNode;
+                                    attrChange: TdomAttrChange;
+                                    prevValue,
+                                    newValue: UnicodeString;
+                                    relatedAttr: TdomAttr) of object;
+
+  TdomCharacterDataModifiedDocEvent = procedure(sender: TObject;
+                                                modifiedDoc: TdomDocument;
+                                                modifiedNode: TdomNode;
+                                                prevValue,
+                                                newValue: UnicodeString) of object;
+
+  TdomCharacterDataModifiedEvent = procedure(sender: TObject;
+                                             modifiedNode: TdomNode;
+                                             prevValue,
+                                             newValue: UnicodeString) of object;
+
+  TdomNodeModifiedDocEvent = procedure(sender: TObject;
+                                       modifiedDoc: TdomDocument;
+                                       modifiedNode: TdomNode) of object;
+
+  TdomNodeModifiedEvent = procedure(sender: TObject;
+                                    modifiedNode: TdomNode) of object;
+
+  TXmlParserEvent = procedure(      sender: TObject;
+                              const parentSystemId: UnicodeString;
+                                var publicId,
+                                    systemId: UnicodeString;
+                                var stream: TStream;
+                                var action: TXmlParserAction) of object;
+
+  TdomErrorEvent = procedure(    sender: TObject;
+                                 error: TdomError;
+                             var go: boolean) of object;
+
+  TDomImplementation = class (TComponent)
+  private
+    FOnError: TdomErrorEvent;
+    FOnExternalParsedEntity: TXmlParserEvent;
+    FOnAttrModified: TdomAttrModifiedDocEvent;
+    FOnCharacterDataModified: TdomCharacterDataModifiedDocEvent;
+    FOnNodeRemoved: TdomNodeModifiedDocEvent;
+    FOnNodeInserted: TdomNodeModifiedDocEvent;
+  protected
+    FCreatedCMExternalObjects: TdomCMNodeList;
+    FCreatedCMInternalObjects: TdomCMNodeList;
+    FCreatedCMObjects: TdomCMNodeList;
+    FCreatedDocuments: TdomNodeList;
+    FCreatedDocumentTypes: TdomNodeList;
+    FCreatedCMExternalObjectsListing: TList;
+    FCreatedCMInternalObjectsListing: TList;
+    FCreatedCMObjectsListing: TList;
+    FCreatedDocumentsListing: TList;
+    FCreatedDocumentTypesListing: TList;
+    procedure doAttrModified(modifiedDoc: TdomDocument;
+                             modifiedNode: TdomNode;
+                             attrChange: TdomAttrChange;
+                             prevValue,
+                             newValue: UnicodeString;
+                             relatedAttr: TdomAttr); virtual;
+    procedure doCharacterDataModified(modifiedDoc: TdomDocument;
+                                      modifiedNode: TdomNode;
+                                      prevValue,
+                                      newValue: UnicodeString); virtual;
+    procedure doError(    sender: TObject;
+                          error: TdomError;
+                      var go: boolean); virtual;
+    procedure doExternalParsedEntity(    parentSystemId: UnicodeString;
+                                     var publicId,
+                                         systemId: UnicodeString;
+                                     var stream: TStream;
+                                     var action: TXmlParserAction); virtual;
+    procedure doNodeInserted(modifiedDoc: TdomDocument;
+                             modifiedNode: TdomNode); virtual;
+    procedure doNodeRemoved(modifiedDoc: TdomDocument;
+                            modifiedNode: TdomNode); virtual;
+    function getCMExternalObjects: TdomCMNodeList; virtual;
+    function getCMInternalObjects: TdomCMNodeList; virtual;
+    function getCMObjects: TdomCMNodeList; virtual;
+    function getDocuments: TdomNodeList; virtual;
+    function getDocumentTypes: TdomNodeList; virtual;
+    function getXdomVersion: UnicodeString; virtual;
+  public
+    constructor create(aOwner: TComponent); override;
+    destructor destroy; override;
+    procedure clear; virtual;
+    function createCMExternalObject(const pubId,
+                                          sysId: UnicodeString): TdomCMExternalObject; virtual;
+    function createCMInternalObject(const pubId,
+                                          sysId: UnicodeString): TdomCMInternalObject; virtual;
+    function createCMObject(const sysId: UnicodeString): TdomCMObject; virtual;
+    function createDocument(const aname: UnicodeString;
+                                  doctype: TdomDocumentType): TdomDocument; virtual;
+    function createDocumentNS(const namespaceURI,
+                                    qualifiedName: UnicodeString;
+                                    doctype: TdomDocumentType): TdomDocument; virtual;
+
+{
+  The following two methods have been removed from this version of
+  the XDOM, but will be reintroduced in a future release.
+
+    function createDocumentType(const name,
+                                      publicId,
+                                      systemId,
+                                      intSubset: UnicodeString): TdomDocumentType; virtual;
+    function createDocumentTypeNS(const qualifiedName,
+                                        publicId,
+                                        systemId,
+                                        intSubset: UnicodeString): TdomDocumentType; virtual;
+}
+
+    procedure freeCMExternalObject(var arg: TdomCMExternalObject); virtual;
+    procedure freeCMInternalObject(var arg: TdomCMInternalObject); virtual;
+    procedure freeCMObject(var arg: TdomCMObject); virtual;
+    procedure freeDocument(var doc: TdomDocument); virtual;
+    procedure freeDocumentType(var docType: TdomDocumentType); virtual;
+    function hasFeature(const feature,
+                              version: UnicodeString): boolean; virtual;
+    function getDocumentClass(const aNamespaceUri,
+                                    aQualifiedName: UnicodeString): TdomDocumentClass; virtual;
+    function handleError(const sender: TObject;
+                         const error: TdomError): boolean; virtual;
+    class procedure registerDocumentFormat(const aNamespaceUri,
+                                                 aQualifiedName: UnicodeString;
+                                                 aDocumentClass: TdomDocumentClass); virtual;
+    function supportsDocumentFormat(const aNamespaceUri,
+                                          aQualifiedName: UnicodeString): boolean; virtual;
+    class procedure unregisterDocumentClass(const aDocumentClass: TdomDocumentClass); virtual;
+    property cmExternalObjects: TdomCMNodeList read getCMExternalObjects;
+    property cmInternalObjects: TdomCMNodeList read getCMInternalObjects;
+    property cmObjects: TdomCMNodeList read getCMObjects;
+    property documents: TdomNodeList read getDocuments;
+    property documentTypes: TdomNodeList read getDocumentTypes;
+    property xdomVersion: UnicodeString read getXdomVersion;
+  published
+    property OnAttrModified:          TdomAttrModifiedDocEvent read FOnAttrModified write FOnAttrModified;
+    property OnCharacterDataModified: TdomCharacterDataModifiedDocEvent read FOnCharacterDataModified write FOnCharacterDataModified;
+    property OnError:                 TdomErrorEvent read FOnError write FOnError;
+    property OnExternalParsedEntity:  TXmlParserEvent read FOnExternalParsedEntity write FOnExternalParsedEntity;
+    property OnNodeInserted:          TdomNodeModifiedDocEvent read FOnNodeInserted write FOnNodeInserted;
+    property OnNodeRemoved:           TdomNodeModifiedDocEvent read FOnNodeRemoved write FOnNodeRemoved;
+  end;
+
+  TdomNodeFilter = class
+  public
+    function acceptNode(const n: TdomNode): TdomFilterResult; virtual; abstract;
+  end;
+
+  TdomTreeWalker = class
+  private
+    FCurrentNode: TdomNode;
+    FExpandEntityReferences: boolean;
+    FFilter: TdomNodeFilter;
+    FRoot: TdomNode;
+    FWhatToShow: TdomWhatToShow;
+  protected
+    function findFirstChild(const oldNode: TdomNode): TdomNode; virtual;
+    function findLastChild(const oldNode: TdomNode): TdomNode; virtual;
+    function findNextNode(oldNode: TdomNode): TdomNode; virtual;
+    function findNextSibling(const oldNode: TdomNode): TdomNode; virtual;
+    function findParentNode(const oldNode: TdomNode): TdomNode; virtual;
+    function findPreviousNode(const oldNode: TdomNode): TdomNode; virtual;
+    function findPreviousSibling(const oldNode: TdomNode): TdomNode; virtual;
+    procedure setCurrentNode(const node: TdomNode); virtual;
+    procedure setExpandEntityReferences(const value: boolean); virtual;  // Derived classes can move this method to the public section to allow write access.
+    procedure setFilter(const value: TdomNodeFilter); virtual;           // Derived classes can move this method to the public section to allow write access.
+    procedure setRoot(const node: TdomNode); virtual;                    // Derived classes can move this method to the public section to allow write access.
+    procedure setWhatToShow(const value: TdomWhatToShow); virtual;       // Derived classes can move this method to the public section to allow write access.
+  public
+    constructor create(const root: TdomNode;
+                       const whatToShow: TdomWhatToShow;
+                       const nodeFilter: TdomNodeFilter;
+                       const entityReferenceExpansion: boolean); virtual;
+    function parentNode: TdomNode; virtual;
+    function firstChild: TdomNode; virtual;
+    function lastChild: TdomNode; virtual;
+    function previousSibling: TdomNode; virtual;
+    function nextSibling: TdomNode; virtual;
+    function nextNode: TdomNode; virtual;
+    function previousNode: TdomNode; virtual;
+    property currentNode: TdomNode read FCurrentNode write setCurrentNode;
+    property expandEntityReferences: boolean read FExpandEntityReferences;
+    property filter: TdomNodeFilter read FFilter;
+    property root: TdomNode read FRoot;
+    property whatToShow: TdomWhatToShow read FWhatToShow;
+  end;
+
+  TdomPosition = (posBefore,posAfter);
+
+  TdomNodeIterator = class
+  private
+    FRoot: TdomNode;
+    FReferenceNode: TdomNode;
+    FPosition: TdomPosition; // Position of the Iterator relativ to FReferenceNode
+    FWhatToShow: TdomWhatToShow;
+    FExpandEntityReferences: boolean;
+    FFilter: TdomNodeFilter;
+    FInvalid: boolean;
+  protected
+    procedure findNewReferenceNode(const nodeToRemove: TdomNode); virtual; // To be called if the current FReferenceNode is being removed
+    function findNextNode(oldNode: TdomNode): TdomNode; virtual;
+    function findPreviousNode(const oldNode: TdomNode): TdomNode; virtual;
+  public
+    constructor create(const root: TdomNode;
+                       const whatToShow: TdomWhatToShow;
+                       const nodeFilter: TdomNodeFilter;
+                       const entityReferenceExpansion: boolean); virtual;
+    procedure detach; virtual;
+    function nextNode: TdomNode; virtual;
+    function previousNode: TdomNode; virtual;
+    property expandEntityReferences: boolean read FExpandEntityReferences;
+    property filter: TdomNodeFilter read FFilter;
+    property root: TdomNode read FRoot;
+    property whatToShow: TdomWhatToShow read FWhatToShow;
+  end;
+
+  TdomNodeList = class
+  private
+    FNodeList: TList;
+  protected
+    function getLength: integer; virtual;
+    function indexOf(const node: TdomNode): integer; virtual;
+  public
+    constructor create(const nodeList: TList);
+    function item(const index: integer): TdomNode; virtual;
+    property length: integer read getLength;
+  end;
+
+  TdomElementsNodeList = class(TdomNodeList)
+  private
+    FQueryName: UnicodeString;
+    FStartElement: TdomNode;
+  protected
+    function getLength: integer; override;
+  public
+    function indexOf(const node: TdomNode): integer; override;
+    function item(const index: integer): TdomNode; override;
+    constructor create(const queryName: UnicodeString;
+                       const startElement: TdomNode); virtual;
+  end;
+
+  TdomElementsNodeListNS = class(TdomNodeList)
+  private
+    FQueryNamespaceURI: UnicodeString;
+    FQueryLocalName: UnicodeString;
+    FStartElement: TdomNode;
+  protected
+    function getLength: integer; override;
+  public
+    function indexOf(const node: TdomNode): integer; override;
+    function item(const index: integer): TdomNode; override;
+    constructor create(const queryNamespaceURI,
+                             queryLocalName: UnicodeString;
+                       const startElement: TdomNode); virtual;
+  end;
+
+  TdomSpecialNodeList = class(TdomNodeList)
+  protected
+    FAllowedNodeTypes: TDomNodeTypeSet;
+    function getLength: integer; override;
+    function getNamedIndex(const name: UnicodeString): integer; virtual;
+    function getNamedItem(const name: UnicodeString): TdomNode; virtual;
+  public
+    constructor create(const nodeList: TList;
+                       const allowedNTs: TDomNodeTypeSet); virtual;
+    function indexOf(const node: TdomNode): integer; override;
+    function item(const index: integer): TdomNode; override;
+  end;
+
+  TdomNamedNodeMap = class(TdomNodeList)
+  private
+    FIsReadonly: boolean;
+    FNamespaceAware: boolean;
+    FOwner: TdomNode;     // The owner document.
+    FOwnerNode: TdomNode; // The node to which the map is attached to.
+    function getNamespaceAware: boolean; virtual;
+    function getOwnerNode: TdomNode; virtual;
+    procedure setNamespaceAware(const value: boolean); virtual;
+  protected
+    FAllowedNodeTypes: TDomNodeTypeSet;
+    function getNamedIndex(const name: UnicodeString): integer; virtual;
+    function removeItem(const arg: TdomNode): TdomNode; virtual;
+    procedure setIsReadonly(const value: boolean); virtual;
+  public
+    constructor create(const aOwner,
+                             aOwnerNode: TdomNode;
+                       const nodeList: TList;
+                       const allowedNTs: TDomNodeTypeSet); virtual;
+    function getNamedItem(const name: UnicodeString): TdomNode; virtual;
+    function getNamedItemNS(const namespaceURI,
+                                  localName: UnicodeString): TdomNode; virtual;
+    function removeNamedItem(const name: UnicodeString): TdomNode; virtual;
+    function removeNamedItemNS(const namespaceURI,
+                                     localName: UnicodeString): TdomNode; virtual;
+    function setNamedItem(const arg: TdomNode): TdomNode; virtual;
+    function setNamedItemNS(const arg: TdomNode): TdomNode; virtual;
+    property isReadonly: boolean read FIsReadonly;
+    property namespaceAware: boolean read getNamespaceAware write setNamespaceAware default false;
+    property ownerNode: TdomNode read getOwnerNode;
+  end;
+
+  TdomLocator = class;
+
+  TdomNode = class
+  private
+    FNodeName: UnicodeString;
+    FNodeValue: UnicodeString;
+    FNodeType: TdomNodeType;
+    FNodeList: TdomNodeList;
+    FNodeListing: TList;
+    FDocument: TdomDocument;
+    FParentNode: TdomNode;
+    FIsNamespaceNode: boolean;
+    FIsReadonly: boolean;
+
+    FOnAttrModified: TdomAttrModifiedEvent;
+    FOnCharacterDataModified: TdomCharacterDataModifiedEvent;
+    FOnNodeInserted: TdomNodeModifiedEvent;
+    FOnNodeInsertedIntoDocument: TdomNodeModifiedEvent;
+    FOnNodeRemoved: TdomNodeModifiedEvent;
+    FOnNodeRemovedFromDocument: TdomNodeModifiedEvent;
+
+    procedure makeChildrenReadonly; virtual;
+    function refersToExternalEntity: boolean; virtual;
+    function hasEntRef(const entName: UnicodeString): boolean; virtual;
+  protected
+    FAllowedChildTypes: set of TDomNodeType;
+    FLocalName: UnicodeString;
+    FNamespaceURI: UnicodeString;
+    FPrefix: UnicodeString;
+    procedure doAttrModified(originalTarget: TdomNode;
+                             attrChange: TdomAttrChange;
+                             prevValue,
+                             newValue: UnicodeString;
+                             relatedAttr: TdomAttr); virtual;
+    procedure doCharacterDataModified(originalTarget: TdomNode;
+                                      prevValue,
+                                      newValue: UnicodeString); virtual;
+    procedure doNodeInserted(originalTarget: TdomNode); virtual;
+    procedure doNodeInsertedIntoDocument(originalTarget: TdomNode); virtual;
+    procedure doNodeRemoved(originalTarget: TdomNode); virtual;
+    procedure doNodeRemovedFromDocument(originalTarget: TdomNode); virtual;
+    function getAttributes: TdomNamedNodeMap; virtual;
+    function getBaseUri: UnicodeString; virtual;
+    function getChildNodes: TdomNodeList; virtual;
+    function getDocument: TdomDocument; virtual;
+    function getFirstChild: TdomNode; virtual;
+    function getNextSibling: TdomNode; virtual;
+    function getNodeName: UnicodeString; virtual;
+    function getNodeValue: UnicodeString; virtual;
+    function getNodeType: TdomNodeType; virtual;
+    function getLastChild: TdomNode; virtual;
+    function getParentNode: TdomNode; virtual;
+    function getPreviousSibling: TdomNode; virtual;
+    function getTextContent: UnicodeString; virtual;
+    function getXPathStringValue: UnicodeString; virtual;
+    function sendErrorNotification(const xmlErrorType: TXmlErrorType;
+                                   const relNode: TdomNode): boolean; virtual;
+    procedure setIsReadonly(const value: boolean); virtual;
+    procedure setNodeValue(const value: UnicodeString); virtual;
+    procedure setPrefix(const value: UnicodeString); virtual;
+    function validate2: boolean; virtual;
+    function validateIDREFS: boolean; virtual;
+  public
+    constructor create(const aOwner: TdomDocument);
+    destructor destroy; override;
+    function  appendChild(const newChild: TdomNode): TdomNode; virtual;
+    procedure clear; virtual;
+    function  cloneNode(const deep: boolean): TdomNode; virtual;
+    function  compareTreePosition(const other: TdomNode): TdomTreePosition; virtual;
+    function  evaluate(const expression: UnicodeString): TdomXPathResult; virtual;
+    function  findFirstChildElement: TdomElement; virtual;
+    function  findLastChildElement: TdomElement; virtual;
+    function  findNextSiblingElement: TdomElement; virtual;
+    function  findParentElement: TdomElement; virtual;
+    function  findPreviousSiblingElement: TdomElement; virtual;
+    function  getFirstChildElement(const name: UnicodeString): TdomElement; virtual;
+    function  getFirstChildElementNS(const namespaceURI,
+                                           localName: UnicodeString): TdomElement; virtual;
+    function  getLastChildElement(const name: UnicodeString): TdomElement; virtual;
+    function  getLastChildElementNS(const namespaceURI,
+                                          localName: UnicodeString): TdomElement; virtual;
+    function  getNextSiblingElement(const name: UnicodeString): TdomElement; virtual;
+    function  getNextSiblingElementNS(const namespaceURI,
+                                            localName: UnicodeString): TdomElement; virtual;
+    function  getParentElement(const name: UnicodeString): TdomElement; virtual;
+    function  getParentElementNS(const namespaceURI,
+                                       localName: UnicodeString): TdomElement; virtual;
+    function  getPreviousSiblingElement(const name: UnicodeString): TdomElement; virtual;
+    function  getPreviousSiblingElementNS(const namespaceURI,
+                                                localName: UnicodeString): TdomElement; virtual;
+    function  hasChildNodes: boolean; virtual;
+    function  insertBefore(const newChild,
+                                 refChild: TdomNode): TdomNode; virtual;
+    function  isAncestor(const AncestorNode: TdomNode): boolean; virtual;
+    procedure normalize; virtual;
+    function  removeChild(const oldChild: TdomNode): TdomNode; virtual;
+    function  replaceChild(const newChild,
+                                 oldChild: TdomNode): TdomNode; virtual;
+    function  resolveEntityReferences(const opt: TdomEntityResolveOption): boolean; virtual;
+    function  supports(const feature,
+                             version: UnicodeString): boolean; virtual;
+    property attributes:       TdomNamedNodeMap read getAttributes;
+    property baseUri:          UnicodeString       read getBaseUri;
+    property childNodes:       TdomNodeList     read getChildNodes;
+    property firstChild:       TdomNode         read getFirstChild;
+    property isNamespaceNode:  boolean          read FIsNamespaceNode;
+    property isReadonly:       boolean          read FIsReadonly;
+    property lastChild:        TdomNode         read getLastChild;
+    property localName:        UnicodeString       read FLocalName;
+    property namespaceURI:     UnicodeString       read FNamespaceURI;
+    property nextSibling:      TdomNode         read getNextSibling;
+    property nodeName:         UnicodeString       read getNodeName;
+    property nodeType:         TdomNodeType     read getNodeType;
+    property nodeValue:        UnicodeString       read getNodeValue write setNodeValue;
+    property ownerDocument:    TdomDocument     read getDocument;
+    property parentNode:       TdomNode         read getParentNode;
+    property previousSibling:  TdomNode         read getPreviousSibling;
+    property prefix:           UnicodeString       read FPrefix write setPrefix;
+    property textContent:      UnicodeString       read getTextContent;
+    property XPathStringValue: UnicodeString       read getXPathStringValue;
+
+    property onAttrModified:             TdomAttrModifiedEvent read FOnAttrModified write FOnAttrModified;
+    property onCharacterDataModified:    TdomCharacterDataModifiedEvent read FOnCharacterDataModified write FOnCharacterDataModified;
+    property onNodeInserted:             TdomNodeModifiedEvent read FOnNodeInserted write FOnNodeInserted;
+    property onNodeInsertedIntoDocument: TdomNodeModifiedEvent read FOnNodeInsertedIntoDocument write FOnNodeInsertedIntoDocument;
+    property onNodeRemoved:              TdomNodeModifiedEvent read FOnNodeRemoved write FOnNodeRemoved;
+    property onNodeRemovedFromDocument:  TdomNodeModifiedEvent read FOnNodeRemovedFromDocument write FOnNodeRemovedFromDocument;
+  end;
+
+  TdomCharacterData = class (TdomNode)
+  private
+    function getData: UnicodeString; virtual;
+    procedure setData(const Value: UnicodeString); virtual;
+    function getLength: integer; virtual;
+  public
+    constructor create(const aOwner: TdomDocument); virtual;
+    function substringData(const offset,
+                                 count: integer): UnicodeString; virtual;
+    procedure appendData(const arg: UnicodeString); virtual;
+    procedure insertData(const offset: integer;
+                         const arg: UnicodeString); virtual;
+    procedure deleteData(const offset,
+                               count: integer); virtual;
+    procedure replaceData(const offset,
+                                count: integer;
+                          const arg: UnicodeString); virtual;
+    property data: UnicodeString read getData write setData;
+    property length: integer read getLength;
+  end;
+
+  TdomAttr = class (TdomNode)
+  private
+    FOwnerElement: TdomElement;
+    FSpecified: boolean;
+  protected
+    function getLiteralValue: UnicodeString; virtual;
+    function getName: UnicodeString; virtual;
+    function getNextSibling: TdomNode; override;
+    function getNodeValue: UnicodeString; override;
+    function getOwnerElement: TdomElement; virtual;
+    function getParentNode: TdomNode; override;
+    function getPreviousSibling: TdomNode; override;
+    function getSpecified: boolean; virtual;
+    function getValue: UnicodeString; virtual;
+    procedure setNodeValue(const value: UnicodeString); override;
+    procedure setValue(const value: UnicodeString); virtual;
+    function validate2: boolean; override;
+    function validateIDREFS: boolean; override;
+  public
+    constructor create(const aOwner: TdomDocument;
+                       const name: UnicodeString;
+                       const spcfd: boolean);
+    constructor createNS(const aOwner: TdomDocument;
+                         const anamespaceURI,
+                               qualifiedName: UnicodeString;
+                         const spcfd: boolean);
+    procedure normalize; override;
+    function  resolveEntityReferences(const opt: TdomEntityResolveOption): boolean; override;
+    property literalValue: UnicodeString read getLiteralValue;
+    property name: UnicodeString read getName;
+    property ownerElement: TdomElement read getOwnerElement;
+    property specified: boolean read getSpecified;
+    property value: UnicodeString read getValue write setValue;
+  end;
+
+  TdomElement = class (TdomNode)
+  private
+    FCreatedElementsNodeLists: TList;
+    FCreatedElementsNodeListNSs: TList;
+    FAttributeListing: TList;
+    FAttributeList: TdomNamedNodeMap;
+  protected
+    procedure setIsReadonly(const value: boolean); override;
+    procedure setNodeValue(const value: UnicodeString); override;
+    function validate2: boolean; override;
+    function validateIDREFS: boolean; override;
+  public
+    constructor create(const aOwner: TdomDocument;
+                       const tagName: UnicodeString);
+    constructor createNS(const aOwner: TdomDocument;
+                         const anamespaceURI,
+                               qualifiedName: UnicodeString);
+    destructor destroy; override;
+    function getTagName: UnicodeString; virtual;
+    function getAttributes: TdomNamedNodeMap; override;
+    function getAttribute(const name: UnicodeString): UnicodeString; virtual;
+    function setAttribute(const name,
+                                value: UnicodeString): TdomAttr; virtual;
+    function removeAttribute(const name: UnicodeString): TdomAttr; virtual;
+    function getAttributeNode(const name: UnicodeString): TdomAttr; virtual;
+    function setAttributeNode(const newAttr: TdomAttr): TdomAttr; virtual;
+    function removeAttributeNode(const oldAttr: TdomAttr): TdomAttr; virtual;
+    function resolveEntityReferences(const opt: TdomEntityResolveOption): boolean; override;
+    function getElementsByTagName(const name: UnicodeString): TdomNodeList; virtual;
+    function getAttributeNS(const anamespaceURI,
+                                  alocalName: UnicodeString): UnicodeString; virtual;
+    function setAttributeNS(const anamespaceURI,
+                                  qualifiedName,
+                                  value: UnicodeString): TdomAttr; virtual;
+    function removeAttributeNS(const anamespaceURI,
+                                     alocalName: UnicodeString): TdomAttr; virtual;
+    function getAttributeNodeNS(const anamespaceURI,
+                                      alocalName: UnicodeString): TdomAttr; virtual;
+    function setAttributeNodeNS(const newAttr: TdomAttr): TdomAttr; virtual;
+    function getElementsByTagNameNS(const anamespaceURI,
+                                          alocalName: UnicodeString): TdomNodeList; virtual;
+    function hasAttribute(const aname: UnicodeString): boolean; virtual;
+    function hasAttributeNS(const anamespaceURI,
+                                  alocalName: UnicodeString): boolean; virtual;
+    procedure normalize; override;
+    property tagName: UnicodeString read getTagName;
+  end;
+
+  TdomText = class (TdomCharacterData)
+  protected
+    function getIsWhitespaceInElementContent: boolean; virtual;
+    function validate2: boolean; override;
+  public
+    constructor create(const aOwner: TdomDocument); override;
+    function splitText(const offset: integer): TdomText; virtual;
+    property isWhitespaceInElementContent: boolean read getIsWhitespaceInElementContent;
+  end;
+
+  TdomComment = class (TdomCharacterData)
+  protected
+    function validate2: boolean; override;
+  public
+    constructor create(const aOwner: TdomDocument); override;
+  end;
+
+  TdomProcessingInstruction = class (TdomNode)
+  private
+    function getTarget: UnicodeString; virtual;
+    function getData: UnicodeString; virtual;
+    procedure setData(const value: UnicodeString); virtual;
+  protected
+    function validate2: boolean; override;
+  public
+    constructor create(const aOwner: TdomDocument;
+                       const targ: UnicodeString); virtual;
+    property target: UnicodeString read getTarget;
+    property data: UnicodeString read getData write setData;
+  end;
+
+  TdomCDATASection = class (TdomText)
+  protected
+    function validate2: boolean; override;
+  public
+    constructor create(const aOwner: TdomDocument); override;
+  end;
+
+  TdomDocumentType = class (TdomNode)
+  private
+    FInternalSubset: UnicodeString;
+    FPublicId: UnicodeString;
+    FSystemId: UnicodeString;
+    FEntitiesListing: TList;
+    FEntitiesList: TdomNamedNodeMap;
+    FNotationsListing: TList;
+    FNotationsList: TdomNamedNodeMap;
+  protected
+    function getEntities: TdomNamedNodeMap; virtual;
+    function getInternalSubset: UnicodeString; virtual;
+    function getName: UnicodeString; virtual;
+    function getNotations: TdomNamedNodeMap; virtual;
+    function getPublicId: UnicodeString; virtual;
+    function getSystemId: UnicodeString; virtual;
+    procedure setNodeValue(const value: UnicodeString); override;
+    function validate2: boolean; override;
+  public
+    constructor create(const aOwner: TdomDocument;
+                       const name,
+                             pubId,
+                             sysId,
+                             intSubset: UnicodeString); virtual;
+    destructor  destroy; override;
+    property entities: TdomNamedNodeMap read getEntities;
+    property internalSubset: UnicodeString read getInternalSubset;
+    property name: UnicodeString read getName;
+    property notations: TdomNamedNodeMap read getNotations;
+    property publicId: UnicodeString read getPublicId;
+    property systemId: UnicodeString read getSystemId;
+  end;
+
+  TdomNotation = class (TdomNode)
+  private
+    FPublicId: UnicodeString;
+    FSystemId: UnicodeString;
+  protected
+    function getPublicId: UnicodeString; virtual;
+    function getSystemId: UnicodeString; virtual;
+    procedure setNodeValue(const value: UnicodeString); override;
+  public
+    constructor create(const aOwner: TdomDocument;
+                       const name,
+                             pubId,
+                             sysId: UnicodeString); virtual;
+    property publicId: UnicodeString read getPublicId;
+    property systemId: UnicodeString read getSystemId;
+  end;
+
+  TdomEntity = class (TdomNode)
+  private
+    FEncoding: UnicodeString;
+    FNotationName: UnicodeString;
+    FPublicId: UnicodeString;
+    FSystemId: UnicodeString;
+    FVersion: UnicodeString;
+  protected
+    function  getNotationName: UnicodeString; virtual;
+    procedure setNodeValue(const value: UnicodeString); override;
+  public
+    constructor create(const aOwner: TdomDocument;
+                       const name,
+                             pubId,
+                             sysId,
+                             notaName: UnicodeString); virtual;
+    function insertBefore(const newChild,
+                                refChild: TdomNode): TdomNode; override;
+    function replaceChild(const newChild,
+                                oldChild: TdomNode): TdomNode; override;
+    function appendChild(const newChild: TdomNode): TdomNode; override;
+    property encoding: UnicodeString read FEncoding write FEncoding;
+    property notationName: UnicodeString read getNotationName;
+    property publicId: UnicodeString read FPublicId;
+    property systemId: UnicodeString read FSystemId;
+    property version: UnicodeString read FVersion write FVersion;
+  end;
+
+  TdomEntityReference = class (TdomNode)
+  protected
+    function expand: boolean; virtual;
+    function getCorrespondingCMEntity: TdomCMEntity; virtual;
+    function getRefersToPredefinedEntity: boolean; virtual;
+    procedure setNodeValue(const value: UnicodeString); override;
+    function validate2: boolean; override;
+  public
+    constructor create(const aOwner: TdomDocument;
+                       const name: UnicodeString); virtual;
+    function cloneNode(const deep: boolean): TdomNode; override;
+    function  resolveEntityReferences(const opt: TdomEntityResolveOption): boolean; override;
+    property correspondingCMEntity: TdomCMEntity read getCorrespondingCMEntity;
+    property refersToPredefinedEntity: boolean read getRefersToPredefinedEntity;
+  end;
+
+  TdomDocumentFragment = class (TdomNode)
+  protected
+    procedure setNodeValue(const value: UnicodeString); override;
+  public
+    constructor create(const aOwner: TdomDocument); virtual;
+  end;
+
+  TdomXPathNamespace = class (TdomNode)
+  private
+    FOwnerElement: TdomElement;
+  protected
+    function getDocument: TdomDocument; override;
+    function getOwnerElement: TdomElement; virtual;
+  public
+    constructor create(const aOwnerElement: TdomElement;
+                       const anamespaceUri,
+                             aprefix: UnicodeString); virtual;
+    property ownerElement: TdomElement read getOwnerElement;
+  end;
+
+  TdomDocument = class (TdomNode)
+  private
+    FBaseUri: UnicodeString;
+    FCMInternal: TdomCMObject;
+    FCreatedNodes: TList;
+    FCreatedNodeIterators: TList;
+    FCreatedTreeWalkers: TList;
+    FCreatedElementsNodeLists: TList;
+    FCreatedElementsNodeListNSs: TList;
+    FCreatedExpressions: TList;
+    FCreatedNSResolvers: TList;
+    FDefaultView: TdomAbstractView;
+    FDOMImpl: TDomImplementation;
+    FEncoding: UnicodeString;
+    FIDs: TdomWideStringList;
+    FModified: boolean;
+    FStandalone: UnicodeString;
+    FSystemId: UnicodeString;
+    FVersion: UnicodeString;
+    procedure findNewReferenceNodes(const nodeToRemove: TdomNode); virtual;
+  protected
+    function createEntity(const name,
+                                pubId,
+                                sysId,
+                                notaName: UnicodeString): TdomEntity; virtual;
+    function createNotation(const name,
+                                  pubId,
+                                  sysId: UnicodeString): TdomNotation; virtual;
+    procedure doAttrModified(originalTarget: TdomNode;
+                             attrChange: TdomAttrChange;
+                             prevValue,
+                             newValue: UnicodeString;
+                             relatedAttr: TdomAttr); override;
+    procedure doCharacterDataModified(originalTarget: TdomNode;
+                                      prevValue,
+                                      newValue: UnicodeString); override;
+    procedure doNodeInserted(originalTarget: TdomNode); override;
+    procedure doNodeRemoved(originalTarget: TdomNode); override;
+    function  getBaseUri: UnicodeString; override;
+    function  getDoctype: TdomDocumentType; virtual;
+    function  getDocumentElement: TdomElement; virtual;
+    procedure initDoc(const tagName: UnicodeString); virtual;
+    procedure initDocNS(const anamespaceURI,
+                              aqualifiedName: UnicodeString); virtual;
+    procedure setNodeValue(const value: UnicodeString); override;
+    function  validateIDREFS: boolean; override;
+  public
+    constructor create(const aOwner: TDomImplementation); virtual;
+    destructor destroy; override;
+    function appendChild(const newChild: TdomNode): TdomNode; override;
+    procedure clear; override;
+    procedure clearInvalidNodeIterators; virtual;
+    function createAttribute(const name: UnicodeString): TdomAttr; virtual;
+    function createAttributeNS(const anamespaceURI,
+                                     aqualifiedName: UnicodeString): TdomAttr; virtual;
+    function createCDATASection(const data: UnicodeString): TdomCDATASection; virtual;
+    function createComment(const data: UnicodeString): TdomComment; virtual;
+    function createDocumentFragment: TdomDocumentFragment; virtual;
+    function createDocumentType(const aname,
+                                      pubId,
+                                      sysId,
+                                      intSubset: UnicodeString): TdomDocumentType; virtual;
+    function createElement(const tagName: UnicodeString): TdomElement; virtual;
+    function createElementNS(const anamespaceURI,
+                                   aqualifiedName: UnicodeString): TdomElement; virtual;
+    function createEntityReference(const name: UnicodeString): TdomEntityReference; virtual;
+    function createExpression(const expression: UnicodeString;
+                              const resolver: TdomXPathNSResolver): TdomXPathExpression; virtual;
+    function createNodeIterator(const root: TdomNode;
+                                      whatToShow: TdomWhatToShow;
+                                      nodeFilter: TdomNodeFilter;
+                                      entityReferenceExpansion: boolean): TdomNodeIterator; virtual;
+    function createNSResolver(const nodeResolver: TdomNode): TdomXPathNSResolver; virtual;
+    function createProcessingInstruction(const targ,
+                                               data : UnicodeString): TdomProcessingInstruction; virtual;
+    function createTextNode(const data: UnicodeString): TdomText; virtual;
+    function createTreeWalker(const root: TdomNode;
+                                    whatToShow: TdomWhatToShow;
+                                    nodeFilter: TdomNodeFilter;
+                                    entityReferenceExpansion: boolean): TdomTreeWalker; virtual;
+    procedure freeAllNodes(var node: TdomNode); virtual;
+    procedure freeExpression(var expression: TdomXPathExpression); virtual;
+    procedure freeNSResolver(var resolver: TdomXPathNSResolver); virtual;
+    procedure freeTreeWalker(var treeWalker: TdomTreeWalker); virtual;
+    function getElementById(const elementId: UnicodeString): TdomElement; virtual;
+    function getElementsByTagName(const tagName: UnicodeString): TdomNodeList; virtual;
+    function getElementsByTagNameNS(const anamespaceURI,
+                                          alocalName: UnicodeString): TdomNodeList; virtual;
+    function importNode(const importedNode: TdomNode;
+                        const deep: boolean): TdomNode; virtual;
+    function insertBefore(const newChild,
+                                refChild: TdomNode): TdomNode; override;
+    function removeContentModel: TdomCMObject; virtual;
+    function replaceChild(const newChild,
+                                oldChild: TdomNode): TdomNode; override;
+    procedure setBaseUri(const value: UnicodeString); virtual;
+    function setContentModel(const arg: TdomCMObject): TdomCMObject; virtual;
+    function validate(const opt: TdomEntityResolveOption): boolean; virtual;
+    property contentModel: TdomCMObject read FCMInternal;
+    property defaultView: TdomAbstractView read FDefaultView;
+    property doctype: TdomDocumentType read getDoctype;
+    property documentElement: TdomElement read getDocumentElement;
+    property domImplementation: TdomImplementation read FDomImpl;
+    property encoding: UnicodeString read FEncoding write FEncoding;
+    property IDs: TdomWideStringList read FIDs;
+    property modified: boolean read FModified write FModified;
+    property standalone: UnicodeString read FStandalone write FStandalone;
+    property systemId: UnicodeString read FSystemId write FSystemId;
+    property version: UnicodeString read FVersion write FVersion;
+  end;
+
+  TdomCMNode = class;
+
+  TXmlInputSource = class;
+
+  TdomSeverity = (DOM_SEVERITY_WARNING,
+                  DOM_SEVERITY_ERROR,
+                  DOM_SEVERITY_FATAL_ERROR);
+
+  TdomError = class
+  protected
+    FCode:       UnicodeString;
+    FLanguage: TIso639LanguageCode;
+    FLocation: TdomLocator;
+    FRelatedException: TXmlErrorType;
+    FSupportedLanguages: TIso639LanguageCodeSet;
+    function getDutchErrorStr: UnicodeString; virtual;
+    function getEnglishErrorStr: UnicodeString; virtual;
+    function getFrenchErrorStr: UnicodeString; virtual;
+    function getGermanErrorStr: UnicodeString; virtual;
+    function getItalianErrorStr: UnicodeString; virtual;
+    function getPolishErrorStr: UnicodeString; virtual;
+    function getPortugueseErrorStr: UnicodeString; virtual;
+    function getSpanishErrorStr: UnicodeString; virtual;
+    procedure setLanguage(const value: TIso639LanguageCode); virtual;
+    function getMessage: UnicodeString; virtual;
+    function getSeverity: TdomSeverity; virtual;
+  public
+    constructor create(const errorType: TXmlErrorType;
+                       const startLine,
+                             startColumn,
+                             endLine,
+                             endColumn,
+                             offs: integer;
+                       const uriStr: UnicodeString;
+                       const rCMNode: TdomCMNode;
+                       const rNode: TdomNode;
+                       const code: UnicodeString); virtual;
+    constructor createFromLocator(const errorType: TXmlErrorType;
+                                  const location: TdomLocator;
+                                  const code: UnicodeString); virtual;
+    destructor destroy; override;
+    property code: UnicodeString read FCode;
+    property language: TIso639LanguageCode read FLanguage write setLanguage default iso639_en;
+    property location: TdomLocator read FLocation;
+    property relatedException: TXmlErrorType read FRelatedException;
+    property message: UnicodeString read getMessage;
+    property severity: TdomSeverity read getSeverity;
+    property supportedLanguages: TIso639LanguageCodeSet read FSupportedLanguages;
+  end;
+
+  TdomLocator = class
+  protected
+    FColumnNumber:      integer;
+    FOffset:            integer;
+    FStartColumnNumber: integer;
+    FStartLineNumber:   integer;
+    FLineNumber:        integer;
+    FRelatedCMNode:     TdomCMNode;
+    FRelatedNode:       TdomNode;
+    FUri:               UnicodeString;
+    function getColumnNumber: integer; virtual;
+    function getLineNumber: integer; virtual;
+    function getOffset: integer; virtual;
+    function getRelatedCMNode: TdomCMNode; virtual;
+    function getRelatedNode: TdomNode; virtual;
+    function getStartColumnNumber: integer; virtual;
+    function getStartLineNumber: integer; virtual;
+    function getUri: UnicodeString; virtual;
+  public
+    constructor create(const startLine,
+                             startColumn,
+                             endLine,
+                             endColumn,
+                             offset: integer;
+                       const uri: UnicodeString;
+                       const rCMNode: TdomCMNode;
+                       const rNode: TdomNode);
+    property columnNumber: integer read getColumnNumber;
+    property lineNumber: integer read getLineNumber;
+    property offset: integer read getOffset;
+    property relatedCMNode: TdomCMNode read getRelatedCMNode;
+    property relatedNode: TdomNode read getRelatedNode;
+    property startColumnNumber: integer read getStartColumnNumber;
+    property startLineNumber: integer read getStartLineNumber;
+    property uri: UnicodeString read getUri;
+  end;
+
+  TdomInputSourceLocator = class(TdomLocator)
+  protected
+    FInputSource: TXmlInputSource;
+    FTabWidth: integer;
+    function getOffset: integer; override;
+    function getUri: UnicodeString; override;
+    procedure evaluate(const s: WideChar); virtual;
+    procedure setStartMark; virtual; // This procedure is called by a Content Handler
+                                     // to indicate that the properties startLineNumber
+                                     // and startColumnNumber shall be set to the current
+                                     // lineNumber and columnNumber.
+  public
+    constructor create(const inputSource: TXmlInputSource;
+                       const startLine,
+                             startColumn,
+                             endLine,
+                             endColumn,
+                             tabWidthValue: integer); virtual;
+    property tabWidth: integer read FTabWidth;
+  end;
+
+// Abstract Schema
+
+  TdomASConstraintType = (AS_NO_VALUE_CONSTRAINT,
+                          AS_DEFAULT_VALUE_CONSTRAINT,
+                          AS_FIXED_VALUE_CONSTRAINT);
+
+  TdomASContentType = (AS_EMPTY,
+                       AS_ANY,
+                       AS_MIXED,
+                       AS_ELEMENTS);
+
+  TdomASDataType = (AS_STRING_DATATYPE,
+                    AS_BOOLEAN_DATATYPE,
+                    AS_FLOAT_DATATYPE,
+                    AS_DOUBLE_DATATYPE,
+                    AS_DECIMAL_DATATYPE,
+                    AS_HEXBINARY_DATATYPE,
+                    AS_BASE64BINARY_DATATYPE,
+                    AS_ANYURI_DATATYPE,
+                    AS_QNAME_DATATYPE,
+                    AS_DURATION_DATATYPE,
+                    AS_DATETIME_DATATYPE,
+                    AS_DATE_DATATYPE,
+                    AS_TIME_DATATYPE,
+                    AS_YEARMONTH_DATATYPE,
+                    AS_YEAR_DATATYPE,
+                    AS_MONTHDAY_DATATYPE,
+                    AS_DAY_DATATYPE,
+                    AS_MONTH_DATATYPE,
+                    AS_NOTATION_DATATYPE,
+                    AS_ID_DATATYPE,
+                    AS_IDREF_DATATYPE,
+                    AS_IDREFS_DATATYPE,
+                    AS_ENTITY_DATATYPE,
+                    AS_ENTITIES_DATATYPE,
+                    AS_NMTOKEN_DATATYPE,
+                    AS_NMTOKENS_DATATYPE,
+                    AS_SIMPLE_DATATYPE,
+                    AS_DERIVED_DATATYPE,
+                    AS_COMPLEX_DATATYPE);
+
+  TdomASEntityType = (AS_INTERNAL_ENTITY,
+                      AS_EXTERNAL_ENTITY);
+
+  TdomASListOperator = (AS_SEQUENCE,
+                        AS_CHOICE,
+                        AS_NONE);
+
+  TdomASModelType = (AS_EXTERNAL_SUBSET,
+                     AS_INTERNAL_SUBSET,
+                     AS_NOT_USED);
+
+  TdomASObjectType = (AS_UNKNOWN,
+                      AS_ATTRIBUTE_DECLARATION,
+                      AS_CONTENTMODEL,
+                      AS_ELEMENT_DECLARATION,
+                      AS_ENTITY_DECLARATION,
+                      AS_MODEL,
+                      AS_NOTATION_DECLARATION);
+
+  TdomASObjectTypeSet = set of TdomASObjectType;
+
+  TdomASModel = class;
+
+  TdomASObject = class
+  protected
+    FASObjectName: UnicodeString;
+    FASObjectType: TdomASObjectType;
+    FInuse: boolean;
+    FLocalName: UnicodeString;
+    FNamespaceURI: UnicodeString;
+    FOwnerAsModel: TdomASModel;
+    FPrefix: UnicodeString;
+    procedure setPrefix(const value: UnicodeString); virtual;
+  public
+    constructor create(const aOwner: TdomASModel);
+    property ASObjectName: UnicodeString read FASObjectName;
+    property ASObjectType: TdomASObjectType read FASObjectType;
+    property localName:    UnicodeString read FLocalName;
+    property namespaceURI: UnicodeString read FNamespaceURI;
+    property ownerASModel: TdomASModel read FOwnerAsModel;
+    property prefix:       UnicodeString read FPrefix write setPrefix;
+  end;
+
+  TdomASObjectList = class
+  private
+    FNodeList: TList;
+  protected
+    procedure clear;
+    function appendASNode(const newNode: TdomASObject): TdomASObject; virtual;
+    procedure Delete(const index: integer); virtual;
+    function indexOf(const node: TdomASObject): integer; virtual;
+    function insertBefore(const newNode,
+                                refNode: TdomASObject): TdomASObject; virtual;
+    function getLength: integer; virtual;
+    function removeASNode(const oldNode: TdomASObject): TdomASObject; virtual;
+  public
+    constructor create;
+    destructor destroy; override;
+    function item(const index: integer): TdomASObject; virtual;
+    property length: integer read getLength;
+  end;
+
+  TdomASNamedObjectMap = class
+  protected
+    FNamespaceAware: boolean;
+    FNodeList: TList;
+    FOwnerAsModel: TdomASModel;
+    function getLength: integer; virtual;
+    function removeNamedItem(const name: UnicodeString): TdomASObject; virtual;
+    function removeNamedItemNS(const namespaceURI,
+                                     localName: UnicodeString): TdomASObject; virtual;
+    function setNamedItem(const arg: TdomASObject): TdomASObject; virtual;
+    function setNamedItemNS(const arg: TdomASObject): TdomASObject; virtual;
+  public
+    constructor create(const aOwner: TdomASModel;
+                       const namespaceAware: boolean);
+    destructor destroy; override;
+    function getNamedItem(const name: UnicodeString): TdomASObject; virtual;
+    function getNamedItemNS(const namespaceURI,
+                                  localName: UnicodeString): TdomASObject; virtual;
+    function item(const index: integer): TdomASObject; virtual;
+    property length: integer read getLength;
+    property isNamespaceAware: boolean read FNamespaceAware;
+    property ownerASModel: TdomASModel read FOwnerAsModel;
+  end;
+
+  TdomASAttributeDeclaration = class(TdomASObject)
+  private
+    FAttrType: TdomASDataType;
+    FAttrValue: UnicodeString;
+    FConstraintType: TdomASConstraintType;
+    FEnumAttr: TdomWideStringList;
+    function getIsNamespaceAware: boolean;
+  public
+    constructor create(const aOwner: TdomASModel;
+                       const name: UnicodeString);
+    constructor createNS(const aOwner: TdomASModel;
+                         const anamespaceURI,
+                               qualifiedName: UnicodeString);
+    destructor destroy; override;
+    property attrType: TdomASDataType read FAttrType write FAttrType default AS_STRING_DATATYPE;
+    property attrValue: UnicodeString read FAttrValue write FAttrValue;
+    property constraintType: TdomASConstraintType read FConstraintType write FConstraintType default AS_NO_VALUE_CONSTRAINT;
+    property enumAttr: TdomWideStringList read FEnumAttr;
+    property isNamespaceAware: boolean read getIsNamespaceAware;
+  end;
+
+  TdomASContentModel = class(TdomASObject)
+  protected
+    FListOperator: TdomASListOperator;
+    FMaxOccurs: integer;
+    FMinOccurs: integer;
+    FSubModels: TdomASObjectList;
+  public
+    constructor create(const aOwner: TdomASModel);
+    destructor destroy; override;
+    function appendASNode(const newNode: TdomASObject): TdomASObject; virtual;
+    function insertBefore(const newNode,
+                                refNode: TdomASObject): TdomASObject; virtual;
+    function removeASNode(const oldNode: TdomASObject): TdomASObject; virtual;
+    property listOperator: TdomASListOperator read FListOperator write FListOperator default AS_CHOICE;
+    property maxOccurs: integer read FMaxOccurs write FMaxOccurs default AS_UNBOUND;
+    property minOccurs: integer read FMinOccurs write FMinOccurs default 0;
+    property subModels: TdomASObjectList read FSubModels;
+  end;
+
+  TdomASElementDeclaration = class(TdomASObject)
+  protected
+    FAttributeDeclarations: TdomASNamedObjectMap;
+    FContentModel: TdomASContentModel;
+    FContentType: TdomASContentType;
+    FElementType: TdomASDataType;
+    FIsPCDataOnly: boolean;
+    FStrictMixedContent: boolean;
+    function getIsNamespaceAware: boolean;
+  public
+    constructor create(const aOwner: TdomASModel;
+                       const name: UnicodeString);
+    constructor createNS(const aOwner: TdomASModel;
+                         const anamespaceURI,
+                               qualifiedName: UnicodeString);
+    destructor destroy; override;
+    function addASAttributeDecl(const arg: TdomASAttributeDeclaration): boolean; virtual;
+    function removeASAttributeDeclaration(const arg: TdomASAttributeDeclaration): TdomASAttributeDeclaration; virtual;
+    property attributeDecls: TdomASNamedObjectMap read FAttributeDeclarations;
+    property contentModel: TdomASContentModel read FContentModel;
+    property contentType: TdomASContentType read FContentType write FContentType default AS_MIXED;
+    property elementType: TdomASDataType read FElementType write FElementType default AS_STRING_DATATYPE;
+    property isNamespaceAware: boolean read getIsNamespaceAware;
+    property isPCDataOnly: boolean read FIsPCDataOnly write FIsPCDataOnly default false;
+    property strictMixedContent: boolean read FStrictMixedContent write FStrictMixedContent default false;
+  end;
+
+  TdomASEntityDeclaration = class(TdomASObject)
+  protected
+    FEntityType: TdomASEntityType;
+    FPublicId: UnicodeString;
+    FEntityValue: UnicodeString;
+    FSystemId: UnicodeString;
+    FNotationName: UnicodeString;
+  public
+    constructor create(const aOwner: TdomASModel;
+                       const name: UnicodeString);
+    property entityType: TdomASEntityType read FEntityType write FEntityType default AS_INTERNAL_ENTITY;
+    property entityValue: UnicodeString read FEntityValue write FEntityValue;
+    property notationName: UnicodeString read FNotationName write FNotationName;
+    property publicId: UnicodeString read FPublicId write FPublicId;
+    property systemId: UnicodeString read FSystemId write FSystemId;
+  end;
+
+  TdomASNotationDeclaration = class(TdomASObject)
+  protected
+    FNotationName: UnicodeString;
+    FPublicId: UnicodeString;
+    FSystemId: UnicodeString;
+  public
+    constructor create(const aOwner: TdomASModel;
+                       const name,
+                             pubId,
+                             sysId: UnicodeString);
+    constructor createNS(const aOwner: TdomASModel;
+                         const anamespaceURI,
+                               qualifiedName,
+                               pubId,
+                               sysId: UnicodeString);
+    property publicId: UnicodeString read FPublicId;
+    property systemId: UnicodeString read FSystemId;
+  end;
+
+  TdomASModel = class (TdomASObject)
+  protected
+    FAttributeDeclarations: TdomASNamedObjectMap;
+    FContentModelDeclarations: TdomASNamedObjectMap;
+    FCreatedASNodes: TdomASObjectList;
+    FDomImpl: TDomImplementation;
+    FElementDeclarations: TdomASNamedObjectMap;
+    FEntityDeclarations: TdomASNamedObjectMap;
+    FNamespaceAware: boolean;
+    FNotationDeclarations: TdomASNamedObjectMap;
+    FHint: UnicodeString;
+    FLocation: UnicodeString;
+    FUsage: TdomASModelType;
+    function getContainer: boolean; virtual;
+  public
+    constructor create(const aOwner: TDomImplementation;
+                       const namespaceAware: boolean); virtual;
+    destructor destroy; override;
+    function addNamedASElementDeclaration(const arg: TdomASElementDeclaration): boolean; virtual;
+    function addNamedASEntityDeclaration(const arg: TdomASEntityDeclaration): boolean; virtual;
+    function addNamedASNotationDeclaration(const arg: TdomASNotationDeclaration): boolean; virtual;
+    procedure clear; virtual;
+    function createASAttributeDeclaration(const anamespaceURI,
+                                                qualifiedName: UnicodeString): TdomASAttributeDeclaration;
+    function createASContentModel: TdomASContentModel;
+    function createASElementDeclaration(const anamespaceURI,
+                                              qualifiedName: UnicodeString): TdomASElementDeclaration;
+    function createASEntityDeclaration(const name: UnicodeString): TdomASEntityDeclaration;
+    function createASNotationDeclaration(const name,
+                                               pubId,
+                                               sysId: UnicodeString): TdomASNotationDeclaration;
+    procedure freeAllASObjects(var obj: TdomASObject); virtual;
+    function getNamedASElementDeclaration(const anamespaceURI,
+                                                name: UnicodeString): TdomASElementDeclaration; virtual;
+    function getNamedASEntityDeclaration(const name: UnicodeString): TdomASEntityDeclaration; virtual;
+    function getNamedASNotationDeclaration(const anamespaceURI,
+                                                 name: UnicodeString): TdomASNotationDeclaration; virtual;
+    function removeNamedASElementDeclaration(const anamespaceURI,
+                                                   name: UnicodeString): TdomASElementDeclaration; virtual;
+    function removeNamedASEntityDeclaration(const name: UnicodeString): TdomASEntityDeclaration; virtual;
+    function removeNamedASNotationDeclaration(const anamespaceURI,
+                                                    name: UnicodeString): TdomASNotationDeclaration; virtual;
+    property attributeDecls: TdomASNamedObjectMap read FAttributeDeclarations;
+    property container: boolean read getContainer;
+    property contentModelDecls: TdomASNamedObjectMap read FContentModelDeclarations;
+    property elementDecls: TdomASNamedObjectMap read FElementDeclarations;
+    property entityDecls: TdomASNamedObjectMap read FEntityDeclarations;
+    property hint: UnicodeString read FHint write FHint;
+    property isNamespaceAware: boolean read FNamespaceAware;
+    property location: UnicodeString read FLocation write FLocation;
+    property notationDecls: TdomASNamedObjectMap read FNotationDeclarations;
+    property usage: TdomASModelType read FUsage;
+  end;
+
+// Content Model
+
+  TdomCMNodeType = (ctUnknown,
+                    ctProcessingInstruction,
+                    ctComment,
+                    ctObject,
+                    ctFragment,
+                    ctExternalObject,
+                    ctInternalObject,
+                    ctAttribute,
+                    ctNotation,
+                    ctEntity,
+                    ctParameterEntityReference,
+                    ctEntityDeclaration,
+                    ctParameterEntityDeclaration,
+                    ctElementTypeDeclaration,
+                    ctSequenceParticle,
+                    ctChoiceParticle,
+                    ctPcdataChoiceParticle,
+                    ctElementParticle,
+                    ctAttributeList,
+                    ctAttributeDefinition,
+                    ctNotationDeclaration,
+                    ctNameParticle,
+                    ctNmtokenParticle);
+
+  TdomCMNodeTypeSet = set of TdomCMNodeType;
+
+  TdomCustomCMObject = class;
+  TdomCMParameterEntityReference = class;
+  TdomCMEntityDeclaration = class;
+  TdomCMElementParticle = class;
+  TdomCMNameParticle = class;
+  TdomCMNmtokenParticle = class;
+  TdomCMElementTypeDeclaration = class;
+  TdomCMParameterEntityDeclaration = class;
+  TdomCMFragment = class;
+  TdomCMNotationDeclaration = class;
+  TdomCMAttrDefinition = class;
+  TdomCMAttrList = class;
+  TdomCMChoiceParticle = class;
+  TdomCMAttribute = class;
+  TdomCMNotation = class;
+  TdomCMPcdataChoiceParticle = class;
+  TdomCMSequenceParticle = class;
+
+  TdomCMNodeList = class
+  private
+    FCMNodeList: TList;
+    function getLength: integer; virtual;
+  protected
+    function indexOf(const node: TdomCMNode): integer; virtual;
+  public
+    function item(const index: integer): TdomCMNode; virtual;
+    constructor create(const CMNodeList: TList);
+    property length: integer read getLength;
+  end;
+
+  TdomNamedCMNodeMap = class(TdomCMNodeList)
+  private
+    FOwner: TdomCMNode;     // The owner content model.
+    FOwnerNode: TdomCMNode; // The node to which the map is attached to.
+    FIsReadonly: boolean;
+    function getOwnerNode: TdomCMNode; virtual;
+  protected
+    FAllowedNodeTypes: TDomCMNodeTypeSet;
+    function getNamedIndex(const name: UnicodeString): integer; virtual;
+    function removeItem(const arg: TdomCMNode): TdomCMNode; virtual;
+    procedure setIsReadonly(const value: boolean); virtual;
+  public
+    constructor create(const aOwner,
+                             aOwnerNode: TdomCMNode;
+                       const nodeList: TList;
+                       const allowedNTs: TDomCMNodeTypeSet); virtual;
+    function getNamedItem(const name: UnicodeString): TdomCMNode; virtual;
+    function setNamedItem(const arg: TdomCMNode): TdomCMNode; virtual;
+    function removeNamedItem(const name: UnicodeString): TdomCMNode; virtual;
+    property isReadonly: boolean read FIsReadonly;
+    property ownerNode: TdomCMNode read getOwnerNode;
+  end;
+
+  TdomNamedCMAttributeMap = class
+  private
+    FOwner: TdomCMObject;     // The owner document.
+    FCMAttributesList: TList;
+    function getLength: integer; virtual;
+  public
+    constructor create(const aOwner: TdomCMObject);
+    destructor destroy; override;
+    function item(const index: integer): TdomCMAttribute; virtual;
+    function getNamedItem(const elementName,
+                                attributeName: UnicodeString): TdomCMAttribute; virtual;
+    function appendNamedItem(const arg: TdomCMAttribute): boolean; virtual;
+    function removeLastItem: TdomCMAttribute; virtual;
+    property length: integer read getLength;
+    property ownerContentModel: TdomCMObject read FOwner;
+  end;
+
+  TdomNamedCMEntityMap = class
+  private
+    FOwner: TdomCMObject;     // The owner document.
+    FCMEntitiesList: TList;
+    function getLength: integer; virtual;
+  public
+    constructor create(const aOwner: TdomCMObject);
+    destructor destroy; override;
+    function item(const index: integer): TdomCMEntity; virtual;
+    function getNamedItem(const name: UnicodeString): TdomCMEntity; virtual;
+    function appendNamedItem(const arg: TdomCMEntity): boolean; virtual;
+    function removeLastItem: TdomCMEntity; virtual;
+    property length: integer read getLength;
+    property ownerContentModel: TdomCMObject read FOwner;
+  end;
+
+  TdomCMNode = class
+  private
+    FNodeName: UnicodeString;
+    FNodeValue: UnicodeString;
+    FNodeType: TdomCMNodeType;
+    FCMNodeList: TdomCMNodeList;
+    FCMNodeListing: TList;
+    FCMObject: TdomCustomCMObject;
+    FParentNode: TdomCMNode;
+    FIsReadonly: boolean;
+    function getCMNodeType: TdomCMNodeType; virtual;
+    function getCMObject: TdomCustomCMObject; virtual;
+    function getParentNode: TdomCMNode; virtual;
+    function getChildNodes: TdomCMNodeList; virtual;
+    function getFirstChild: TdomCMNode; virtual;
+    function getLastChild: TdomCMNode; virtual;
+    function getNextSibling: TdomCMNode; virtual;
+    function getNodeName: UnicodeString; virtual;
+    function getNodeValue: UnicodeString; virtual;
+    function getPreviousSibling: TdomCMNode; virtual;
+    procedure makeChildrenReadonly; virtual;
+    procedure setNodeValue(const value: UnicodeString); virtual;
+  protected
+    FAllowedChildTypes: set of TDomCMNodeType;
+    function sendErrorNotification(const xmlErrorType: TXmlErrorType;
+                                   const relCMNode: TdomCMNode): boolean; virtual;
+    procedure setIsReadonly(const value: boolean); virtual;
+    function validate: boolean; virtual;
+  public
+    constructor create(const aOwner: TdomCustomCMObject);
+    destructor destroy; override;
+    procedure clear; virtual;
+    function insertBefore(const newChild,
+                                refChild: TdomCMNode): TdomCMNode; virtual;
+    function replaceChild(const newChild,
+                                oldChild: TdomCMNode): TdomCMNode; virtual;
+    function removeChild(const oldChild: TdomCMNode): TdomCMNode; virtual;
+    function appendChild(const newChild: TdomCMNode): TdomCMNode; virtual;
+    function hasChildNodes: boolean; virtual;
+    function cloneNode(const deep: boolean): TdomCMNode; virtual;
+    function isAncestor(const ancestorNode: TdomCMNode): boolean; virtual;
+    property childNodes:      TdomCMNodeList     read getChildNodes;
+    property firstChild:      TdomCMNode         read getFirstChild;
+    property isReadonly:      boolean            read FIsReadonly;
+    property lastChild:       TdomCMNode         read getLastChild;
+    property nextSibling:     TdomCMNode         read getNextSibling;
+    property nodeName:        UnicodeString         read getNodeName;
+    property nodeType:        TdomCMNodeType     read getCMNodeType;
+    property nodeValue:       UnicodeString         read getNodeValue write setNodeValue;
+    property ownerCMObject:   TdomCustomCMObject read getCMObject;
+    property parentNode:      TdomCMNode         read getParentNode;
+    property previousSibling: TdomCMNode         read getPreviousSibling;
+  end;
+
+  TdomCMComment = class (TdomCMNode)
+  private
+    function getData: UnicodeString; virtual;
+    procedure setData(const value: UnicodeString); virtual;
+    function getLength: integer; virtual;
+  protected
+    function validate: boolean; override;
+  public
+    constructor create(const aOwner: TdomCustomCMObject); virtual;
+    function substringData(const offset,
+                                 count: integer):UnicodeString; virtual;
+    procedure appendData(const arg: UnicodeString); virtual;
+    procedure insertData(const offset: integer;
+                         const arg: UnicodeString); virtual;
+    procedure deleteData(const offset,
+                               count: integer); virtual;
+    procedure replaceData(const offset,
+                                count: integer;
+                          const arg: UnicodeString); virtual;
+    property data: UnicodeString read getData write setData;
+    property length: integer read getLength;
+  end;
+
+  TdomCMProcessingInstruction = class (TdomCMNode)
+  private
+    function getTarget: UnicodeString; virtual;
+    function getData: UnicodeString; virtual;
+    procedure setData(const value: UnicodeString); virtual;
+  protected
+    function validate: boolean; override;
+  public
+    constructor create(const aOwner: TdomCustomCMObject;
+                       const targ: UnicodeString); virtual;
+    property target: UnicodeString read getTarget;
+    property data: UnicodeString read getData write setData;
+  end;
+
+  TdomCustomCMObject = class (TdomCMNode)
+  private
+    FCreatedNodes: TList;
+    FDomImpl: TDomImplementation;
+    FSystemId: UnicodeString;
+    procedure setNodeValue(const value: UnicodeString); override;
+  protected
+    function duplicateCMNode(const node: TdomCMNode): TdomCMNode; virtual;
+  public
+    constructor create(const aOwner: TdomImplementation;
+                       const sysId: UnicodeString);
+    destructor destroy; override;
+    function createCMAttributeDefinition(const name,
+                                               attType,
+                                               defaultDecl,
+                                               attValue: UnicodeString) : TdomCMAttrDefinition; virtual;
+    function createCMAttributeList(const name: UnicodeString): TdomCMAttrList; virtual;
+    function createCMChoiceParticle(const freq: UnicodeString): TdomCMChoiceParticle; virtual;
+    function createCMComment(const data: UnicodeString): TdomCMComment; virtual;
+    function createCMElementParticle(const name,
+                                           freq: UnicodeString): TdomCMElementParticle; virtual;
+    function createCMElementTypeDeclaration(const name: UnicodeString;
+                                            const ContspecType: TdomContentspecType): TdomCMElementTypeDeclaration; virtual;
+    function createCMExtEntityDeclaration(const name,
+                                                pubId,
+                                                sysId: UnicodeString): TdomCMEntityDeclaration; virtual;
+    function createCMExtParameterEntityDeclaration(const name,
+                                                         pubId,
+                                                         sysId: UnicodeString): TdomCMParameterEntityDeclaration; virtual;
+    function createCMExtUnparsedEntityDeclaration(const name,
+                                                        pubId,
+                                                        sysId,
+                                                        notaName: UnicodeString): TdomCMEntityDeclaration; virtual;
+    function createCMFragment: TdomCMFragment; virtual;
+    function createCMIntEntityDeclaration(const name,
+                                                entityValue: UnicodeString): TdomCMEntityDeclaration; virtual;
+    function createCMIntParameterEntityDeclaration(const name,
+                                                         entityValue: UnicodeString): TdomCMParameterEntityDeclaration; virtual;
+    function createCMNameParticle(const name: UnicodeString): TdomCMNameParticle; virtual;
+    function createCMNmtokenParticle(const name: UnicodeString): TdomCMNmtokenParticle; virtual;
+    function createCMNotationDeclaration(const name,
+                                               pubId,
+                                               sysId: UnicodeString): TdomCMNotationDeclaration; virtual;
+    function createCMParameterEntityReference(const name: UnicodeString): TdomCMParameterEntityReference; virtual;
+    function createCMPcdataChoiceParticle: TdomCMPcdataChoiceParticle; virtual;
+    function createCMProcessingInstruction(const targ,
+                                                 data : UnicodeString): TdomCMProcessingInstruction; virtual;
+    function createCMSequenceParticle(const freq: UnicodeString): TdomCMSequenceParticle; virtual;
+    procedure freeAllCMNodes(var CMNode: TdomCMNode); virtual;
+    procedure getValueOfPE(const name: UnicodeString;
+                             var value: UnicodeString;
+                             var error: TXmlErrorType); virtual;
+    function hasPEDeclaration(const name: UnicodeString): boolean; virtual;
+    property domImplementation: TdomImplementation read FDomImpl;
+    property systemId: UnicodeString read FSystemId write FSystemId;
+  end;
+
+  TdomCMObject = class (TdomCustomCMObject)
+  private
+    FAssociatedDocument: TdomDocument;
+    FAttributesList: TdomNamedCMAttributeMap;
+    FCMExternal: TdomCMExternalObject;
+    FCMInternal: TdomCMInternalObject;
+    FEntitiesList: TdomNamedCMEntityMap;
+    FNotationsList: TdomNamedCMNodeMap;
+    FNotationsListing: TList;
+    FElementTypesList: TdomNamedCMNodeMap;
+    FElementTypesListing: TList;
+    procedure clearAttributes;
+    procedure clearElementTypes;
+    procedure clearEntities;
+    procedure clearNotations;
+  protected
+    function createCMAttribute(const elementName,
+                                     attributeName,
+                                     attType,
+                                     defaultDecl,
+                                     attValue: UnicodeString): TdomCMAttribute; virtual;
+    function createCMExtParsedEntity(const name,
+                                           pubId,
+                                           sysId: UnicodeString): TdomCMEntity; virtual;
+    function createCMExtUnparsedEntity(const name,
+                                             pubId,
+                                             sysId,
+                                             notaName: UnicodeString): TdomCMEntity; virtual;
+    function createCMIntEntity(const name,
+                                     literalValue: UnicodeString): TdomCMEntity; virtual;
+    function createCMNotation(const name,
+                                    pubId,
+                                    sysId: UnicodeString): TdomCMNotation; virtual;
+    function duplicateCMNode(const node: TdomCMNode): TdomCMNode; override;
+    function prepareCM: boolean; virtual;
+    function setPredefinedEntities: boolean; virtual;
+  public
+    constructor create(const aOwner: TdomImplementation;
+                       const sysId: UnicodeString); virtual;
+    destructor destroy; override;
+    procedure clear; override;
+    function prepare: boolean; virtual;
+    function removeExternalCM: TdomCMExternalObject; virtual;
+    function removeInternalCM: TdomCMInternalObject; virtual;
+    function setExternalCM(const arg: TdomCMExternalObject): TdomCMExternalObject; virtual;
+    function setInternalCM(const arg: TdomCMInternalObject): TdomCMInternalObject; virtual;
+    function validate: boolean; override;
+    property associatedDocument: TdomDocument read FAssociatedDocument;
+    property attributes: TdomNamedCMAttributeMap read FAttributesList;
+    property elementTypes: TdomNamedCMNodeMap read FElementTypesList;
+    property entities: TdomNamedCMEntityMap read FEntitiesList;
+    property externalCM: TdomCMExternalObject read FCMExternal;
+    property internalCM: TdomCMInternalObject read FCMInternal;
+    property notations: TdomNamedCMNodeMap read FNotationsList;
+  end;
+
+  TdomCustomCMIEObject = class (TdomCustomCMObject)
+  protected
+    FAssociatedContentModel: TdomCMObject;
+    FPublicId: UnicodeString;
+    function validate: boolean; override;
+  public
+    constructor create(const aOwner: TdomImplementation;
+                       const pubId,
+                             sysId: UnicodeString);
+    property associatedContentModel: TdomCMObject read FAssociatedContentModel;
+    property publicId: UnicodeString read FPublicId write FPublicId;
+  end;
+
+  TdomCMInternalObject = class (TdomCustomCMIEObject)
+  public
+    constructor create(const aOwner: TdomImplementation;
+                       const pubId,
+                             sysId: UnicodeString);
+  end;
+
+  TdomCMExternalObject = class (TdomCustomCMIEObject)
+  protected
+    FEncoding: UnicodeString;
+    FVersion: UnicodeString;
+  public
+    constructor create(const aOwner: TdomImplementation;
+                       const pubId,
+                             sysId: UnicodeString);
+    property encoding: UnicodeString read FEncoding write FEncoding;
+    property version: UnicodeString read FVersion write FVersion;
+  end;
+
+  TdomCMNotationDeclaration = class (TdomCMNode)
+  private
+    FPublicId: UnicodeString;
+    FSystemId: UnicodeString;
+    function getPublicId: UnicodeString; virtual;
+    function getSystemId: UnicodeString; virtual;
+    procedure setNodeValue(const value: UnicodeString); override;
+  protected
+    function validate: boolean; override;
+  public
+    constructor create(const aOwner: TdomCustomCMObject;
+                       const name,
+                             pubId,
+                             sysId: UnicodeString); virtual;
+    property publicId: UnicodeString read getPublicId;
+    property systemId: UnicodeString read getSystemId;
+  end;
+
+  TdomCMElementTypeDeclaration = class (TdomCMNode)
+  private
+    FContentspec: TdomContentspecType;
+    function getContentspec: UnicodeString; virtual;
+    function getContentspecType: TdomContentspecType; virtual;
+    procedure setNodeValue(const value: UnicodeString); override;
+  protected
+    function validate: boolean; override;
+  public
+    constructor create(const aOwner: TdomCustomCMObject;
+                       const name: UnicodeString;
+                       const contspecType: TdomContentspecType); virtual;
+    function appendChild(const newChild: TdomCMNode): TdomCMNode; override;
+    function insertBefore(const newChild,
+                                refChild: TdomCMNode): TdomCMNode; override;
+    property contentspec: UnicodeString read getContentspec;
+    property contentspecType: TdomContentspecType read getContentspecType;
+  end;
+
+  TdomCMAttrList = class(TdomCMNode)
+  protected
+    function validate: boolean; override;
+  public
+    constructor create(const aOwner: TdomCustomCMObject;
+                       const name: UnicodeString); virtual;
+  end;
+
+  TdomCMAttrDefinition = class(TdomCMNode)
+  private
+    FAttributeType: UnicodeString;
+    FDefaultDeclaration: UnicodeString;
+    FParentAttributeList: TdomCMAttrList;
+    function getAttributeType: UnicodeString; virtual;
+    function getDefaultDeclaration: UnicodeString; virtual;
+    procedure setNodeValue(const value: UnicodeString); override;
+  protected
+    function validate: boolean; override;
+  public
+    constructor create(const aOwner: TdomCustomCMObject;
+                       const name,
+                             attType,
+                             defaultDecl,
+                             attValue: UnicodeString); virtual;
+    property attributeType: UnicodeString read getAttributeType;
+    property defaultDeclaration: UnicodeString read getDefaultDeclaration;
+  end;
+
+  TdomCMParticle = class (TdomCMNode)
+  private
+    FFrequency: UnicodeString;
+    function contentModelTest2(const source,
+                                     rest: TdomWideStringList;
+                               const freq: UnicodeString;
+                                 var isNonDeterministic: boolean): boolean; virtual;
+    function contentModelTest(const source,
+                                    rest: TdomWideStringList;
+                                var isNonDeterministic: boolean): boolean; virtual;
+    function  getFrequency: UnicodeString; virtual;
+    procedure setFrequency(const freq: UnicodeString); virtual;
+    procedure setNodeValue(const value: UnicodeString); override;
+    procedure writeCode(stream: TStream); virtual; abstract;
+  public
+    constructor create(const aOwner: TdomCustomCMObject;
+                       const freq: UnicodeString);
+    property frequency: UnicodeString read getFrequency;
+  end;
+
+  TdomCMSequenceParticle = class (TdomCMParticle)
+  private
+    function contentModelTest2(const source,
+                                     rest: TdomWideStringList;
+                               const freq: UnicodeString;
+                                 var isNonDeterministic: boolean): boolean; override;
+    procedure writeCode(stream: TStream); override;
+  protected
+    function validate: boolean; override;
+  public
+    constructor create(const aOwner: TdomCustomCMObject;
+                       const freq: UnicodeString); virtual;
+  end;
+
+  TdomCMChoiceParticle = class (TdomCMParticle)
+  private
+    function contentModelTest2(const source,
+                                     rest: TdomWideStringList;
+                               const freq: UnicodeString;
+                                 var isNonDeterministic: boolean): boolean; override;
+    procedure writeCode(stream: TStream); override;
+  protected
+    function validate: boolean; override;
+  public
+    constructor create(const aOwner: TdomCustomCMObject;
+                       const freq: UnicodeString); virtual;
+  end;
+
+  TdomCMPcdataChoiceParticle = class (TdomCMParticle)
+  private
+    function contentModelTest(const source,
+                                    rest: TdomWideStringList;
+                                var isNonDeterministic: boolean): boolean; override;
+    procedure setFrequency(const freq: UnicodeString); override;
+    procedure writeCode(stream: TStream); override;
+  protected
+    function validate: boolean; override;
+  public
+    constructor create(const aOwner: TdomCustomCMObject;
+                       const freq: UnicodeString); virtual;
+    function elementDefined(const elementName: UnicodeString): boolean;
+  end;
+
+  TdomCMElementParticle = class (TdomCMParticle)
+  private
+    function contentModelTest2(const source,
+                                     rest: TdomWideStringList;
+                               const freq: UnicodeString;
+                                 var isNonDeterministic: boolean): boolean; override;
+    procedure writeCode(stream: TStream); override;
+  protected
+    function validate: boolean; override;
+  public
+    constructor create(const aOwner: TdomCustomCMObject;
+                       const name,
+                             freq: UnicodeString); virtual;
+  end;
+
+  TdomCMNameParticle = class (TdomCMNode)
+  private
+    procedure setNodeValue(const value: UnicodeString); override;
+  protected
+    function validate: boolean; override;
+  public
+    constructor create(const aOwner: TdomCustomCMObject;
+                       const name: UnicodeString); virtual;
+  end;
+
+  TdomCMNmtokenParticle = class (TdomCMNode)
+  private
+    procedure setNodeValue(const value: UnicodeString); override;
+  protected
+    function validate: boolean; override;
+  public
+    constructor create(const aOwner: TdomCustomCMObject;
+                       const name: UnicodeString); virtual;
+  end;
+
+  TdomCMAttribute = class (TdomCMNode)
+  private
+    FAttributeName: UnicodeString;
+    FAttributeType: UnicodeString;
+    FDefaultDeclaration: UnicodeString;
+    FElementName: UnicodeString;
+    procedure setNodeValue(const value: UnicodeString); override;
+  public
+    constructor create(const aOwner: TdomCustomCMObject;
+                       const elementName,
+                             attributeName,
+                             attType,
+                             defaultDecl,
+                             attValue: UnicodeString); virtual;
+    property attributeName: UnicodeString read FAttributeName;
+    property attributeType: UnicodeString read FAttributeType;
+    property defaultDeclaration: UnicodeString read FDefaultDeclaration;
+    property elementName: UnicodeString read FElementName;
+  end;
+
+  TdomCMNotation = class (TdomCMNode)
+  private
+    FPublicId: UnicodeString;
+    FSystemId: UnicodeString;
+  public
+    constructor create(const aOwner: TdomCustomCMObject;
+                       const name,
+                             pubId,
+                             sysId: UnicodeString); virtual;
+    property publicId: UnicodeString read FPublicId;
+    property systemId: UnicodeString read FSystemId;
+  end;
+
+  TdomCMEntity = class (TdomCMNode)
+  private
+    FEncoding: UnicodeString;
+    FEntityType: TdomEntityType;
+    FIsParsedEntity: boolean;
+    FLiteralValue: UnicodeString;
+    FNotationName: UnicodeString;
+    FPublicId: UnicodeString;
+    FSystemId: UnicodeString;
+    function refersToXyz(const allowUnresolvableEntities: boolean;
+                         const previousEntities: TdomWideStringList;
+                         const whatToTest: integer): boolean;
+    procedure calculateLiteralValue(const S: UnicodeString);
+    procedure setNodeValue(const value: UnicodeString); override;
+  protected
+    FReplacementText: UnicodeString;
+    FIsUnusable: boolean;  // xxx can be problematic! 
+    FIsResolved: boolean;
+    function getIsUnusable: boolean; virtual;
+    function getLiteralValue: UnicodeString; virtual;
+    function getNormalizedValue: UnicodeString; virtual;
+    function getReplacementText: UnicodeString; virtual;
+    function refersToItself(const allowUnresolvableEntities: boolean): boolean; virtual;
+    function refersToExternalEntity(const allowUnresolvableEntities: boolean): boolean; virtual;
+    function refersToUnparsedEntity(const allowUnresolvableEntities: boolean): boolean; virtual;
+    function refersToUnusableEntity(const allowUnresolvableEntities: boolean): boolean; virtual;
+  public
+    constructor create(const aOwner: TdomCustomCMObject;
+                       const name,
+                             litValue: UnicodeString); virtual;
+    constructor createExtParsed(const aOwner: TdomCustomCMObject;
+                                const name,
+                                      pubId,
+                                      sysId: UnicodeString); virtual;
+    constructor createExtUnparsed(const aOwner: TdomCustomCMObject;
+                                  const name,
+                                        pubId,
+                                        sysId,
+                                        notaName: UnicodeString); virtual;
+    function resolve: boolean; virtual;
+    property encoding: UnicodeString read FEncoding write FEncoding;
+    property entityType: TdomEntityType read FEntityType;
+    property isParsedEntity: boolean read FIsParsedEntity;
+    property isResolved: boolean read FIsResolved;
+    property isUnusable: boolean read getIsUnusable;
+    property literalValue: UnicodeString read getLiteralValue;
+    property normalizedValue: UnicodeString read getNormalizedValue;
+    property notationName: UnicodeString read FNotationName;
+    property publicId: UnicodeString read FPublicId;
+    property replacementText: UnicodeString read getReplacementText;
+    property systemId: UnicodeString read FSystemId;
+  end;
+
+  TdomCustomCMEntDecl = class (TdomCMNode)
+  private
+    FEntityType: TdomEntityType;
+    FPublicId: UnicodeString;
+    FSystemId: UnicodeString;
+    function getEntityType: TdomEntityType; virtual;
+    function getPublicId: UnicodeString; virtual;
+    function getSystemId: UnicodeString; virtual;
+  public
+    constructor create(const aOwner: TdomCustomCMObject;
+                       const name,
+                             litValue: UnicodeString); virtual;
+    constructor createExtParsed(const aOwner: TdomCustomCMObject;
+                                const name,
+                                      pubId,
+                                      sysId: UnicodeString); virtual;
+    function insertBefore(const newChild,
+                                refChild: TdomCMNode): TdomCMNode; override;
+    function replaceChild(const newChild,
+                                oldChild: TdomCMNode): TdomCMNode; override;
+    function appendChild(const newChild: TdomCMNode): TdomCMNode; override;
+    property entityType: TdomEntityType read getEntityType;
+    property publicId: UnicodeString read getPublicId;
+    property systemId: UnicodeString read getSystemId;
+  end;
+
+  TdomCMEntityDeclaration = class (TdomCustomCMEntDecl)
+  private
+    FIsParsedEntity: boolean;
+    FNotationName: UnicodeString;
+  protected
+    function validate: boolean; override;
+  public
+    constructor create(const aOwner: TdomCustomCMObject;
+                       const name,
+                             litValue: UnicodeString); override;
+    constructor createExtParsed(const aOwner: TdomCustomCMObject;
+                                const name,
+                                      pubId,
+                                      sysId: UnicodeString); override;
+    constructor createExtUnparsed(const aOwner: TdomCustomCMObject;
+                                  const name,
+                                        pubId,
+                                        sysId,
+                                        notaName: UnicodeString); virtual;
+    property isParsedEntity: boolean read FIsParsedEntity;
+    property notationName: UnicodeString read FNotationName;
+  end;
+
+  TdomCMParameterEntityDeclaration = class (TdomCustomCMEntDecl)
+  protected
+    function validate: boolean; override;
+  public
+    constructor create(const aOwner: TdomCustomCMObject;
+                       const name,
+                             litValue: UnicodeString); override;
+    constructor createExtParsed(const aOwner: TdomCustomCMObject;
+                                const name,
+                                      pubId,
+                                      sysId: UnicodeString); override;
+  end;
+
+  TdomCMParameterEntityReference = class (TdomCMNode)
+  private
+    procedure setNodeValue(const value: UnicodeString); override;
+  protected
+    function validate: boolean; override;
+  public
+    constructor create(const aOwner: TdomCustomCMObject;
+                       const name: UnicodeString); virtual;
+  end;
+
+  TdomCMFragment = class (TdomCMNode)
+  private
+    procedure setNodeValue(const value: UnicodeString); override;
+  public
+    constructor create(const aOwner: TdomCustomCMObject); virtual;
+  end;
+
+
+// Views
+
+  TdomAbstractView = class
+  protected
+    FDocument: TdomDocument;
+  public
+    property document: TdomDocument read FDocument;
+  end;
+
+  TdomStyleSheet = class
+  private
+    function getStyleSheetType: UnicodeString; virtual; abstract;
+    function getDisabled: boolean; virtual; abstract;
+    procedure setDisabled(const value: boolean); virtual; abstract;
+    function getOwnerNode: TdomNode; virtual; abstract;
+    function getParentStyleSheet: TdomStyleSheet; virtual; abstract;
+    function getHref: UnicodeString; virtual; abstract;
+    function getTitle: UnicodeString; virtual; abstract;
+    function getMedia: TdomMediaList; virtual; abstract;
+  public
+    property styleSheetType: UnicodeString read getStyleSheetType;
+    property disabled: boolean read getDisabled write setDisabled;
+    property ownerNode: TdomNode read getOwnerNode;
+    property parentStyleSheet: TdomStyleSheet read getParentStyleSheet;
+    property href: UnicodeString read getHref;
+    property title: UnicodeString read getTitle;
+    property media: TdomMediaList read getMedia;
+  end;
+
+  TdomMediaList = class
+  private
+    function getCssText: UnicodeString; virtual; abstract;
+    procedure setCssText(const value: UnicodeString); virtual; abstract;
+    function getLength: integer; virtual; abstract;
+  public
+    function item(const index: integer): TdomStyleSheet; virtual; abstract;
+    procedure Delete(const oldMedium: UnicodeString); virtual; abstract;
+    procedure append(const newMedium: UnicodeString); virtual; abstract;
+    property length: integer read getLength;
+    property cssText: UnicodeString read getCssText write setCssText;
+  end;
+
+  TdomStyleSheetList = class
+  private
+    function getLength: integer; virtual; abstract;
+  public
+    function item(const index: integer): TdomStyleSheet; virtual; abstract;
+    property length: integer read getLength;
+  end;
+
+  TdomDocumentStyle = class
+  private
+    function getStyleSheets: TdomStyleSheetList; virtual; abstract;
+  public
+    property styleSheets: TdomStyleSheetList read getStyleSheets;
+  end;
+
+  TXmlSourceCode = class (TList)
+  private
+    procedure calculatePieceOffset(const startItem: integer); virtual;
+    function  getNameOfFirstTag: UnicodeString; virtual;
+  public
+    function  add(Item: Pointer): integer;
+    procedure clear; {$ifdef ver100} virtual; {$else} override; {$endif}
+      // ifdef... is necessary because TList.clear is static in Delphi 3
+      // (=ver100), but dynamic in later versions.
+    procedure clearAndFree; virtual;
+    procedure Delete(index: integer);
+    procedure exchange(index1, index2: integer);
+    function  getPieceAtPos(pos: integer): TXmlSourceCodePiece;
+    procedure insert(index: integer; item: pointer);
+    procedure move(curIndex, newIndex: integer);
+    procedure pack;
+    function  remove(Item: Pointer): integer;
+    procedure sort(Compare: TListSortCompare);
+    property  nameOfFirstTag: UnicodeString read getNameOfFirstTag;
+  end;
+
+  TXmlSourceCodePiece = class
+  private
+    FPieceType: TdomPieceType;
+    FText: UnicodeString;
+    FOffset: integer;
+    FOwner: TXmlSourceCode;
+  public
+    constructor create(const pt: TdomPieceType); virtual;
+    property pieceType: TdomPieceType read FPieceType;
+    property text: UnicodeString read FText write FText;
+    property offset: integer read FOffset;
+    property ownerSourceCode: TXmlSourceCode read FOwner;
+  end;
+
+
+{Parser}
+
+  TdomStandalone = ( STANDALONE_YES,
+                     STANDALONE_NO,
+                     STANDALONE_UNSPECIFIED);
+
+  TdomXMLDeclType = ( DT_UNKNOWN,
+                      DT_XML_DECLARATION,
+                      DT_TEXT_DECLARATION,
+                      DT_XML_OR_TEXT_DECLARATION,
+                      DT_UNSPECIFIED );
+
+  TXmlInputSource = class
+  private
+    FDeclType: TdomXMLDeclType;
+    FEncoding: TdomEncodingType;
+    FEncodingName: UnicodeString;
+    FHasMalformedDecl: boolean;
+    FLastCharWasCR: boolean;
+    FLastUcs4: integer;      // Buffer storage for UTF-8 surrogates
+    FLocator: TdomInputSourceLocator;
+    FPublicId: UnicodeString;
+    FStandalone: TdomStandalone;
+    FStartPosition: integer;
+    FStream: TStream;
+    FSystemId: UnicodeString;
+    FVersionNumber: UnicodeString;
+    function evaluateXmlOrTextDecl(const tabWidthValue: integer;
+                                     out declType: TdomXMLDeclType;
+                                     out encodingType: TdomEncodingType;
+                                     out versionInfo,
+                                         encName: UnicodeString;
+                                     out standalone: TdomStandalone;
+                                     out lineOffset,
+                                         columnOffset: integer): boolean;
+  protected
+    function getStreamAsWideString: UnicodeString; virtual;
+    function getNextWideChar2(var dest: wideChar;
+                              const enc: TdomEncodingType;
+                              const locator: TdomInputSourceLocator): boolean; virtual;
+  public
+    constructor create(const stream: TStream;
+                       const publicId,
+                             systemId: UnicodeString;
+                       const tabWidthValue: integer); virtual;
+    destructor destroy; override;
+    function getNextWideChar(var dest: wideChar): boolean; virtual;
+    property declType: TdomXMLDeclType read FDeclType;
+    property encoding: TdomEncodingType read FEncoding;
+    property encodingName: UnicodeString read FEncodingName;
+    property hasMalformedDecl: boolean read FHasMalformedDecl;
+    property locator: TdomInputSourceLocator read FLocator;
+    property publicId: UnicodeString read FPublicId;
+    property standalone: TdomStandalone read FStandalone;
+    property stream: TStream read FStream;
+    property streamAsWideString: UnicodeString read getStreamAsWideString;
+    property systemId: UnicodeString read FSystemId;
+    property versionNumber: UnicodeString read FVersionNumber;
+  end;
+
+  TXmlCustomParser = class;
+  TXmlToDomParser = class;
+  TXmlCustomReader = class;
+  TXmlStandardDocReader = class;
+  TXmlStandardDtdReader = class;
+
+  TXmlProcessorEvent1 = procedure(reader: TXmlCustomReader;
+                                  locator: TdomLocator) of object;
+
+  TXmlProcessorEvent2 = procedure(reader: TXmlCustomReader;
+                                  locator: TdomLocator;
+                                  var data: UnicodeString) of object;
+
+  TXmlProcessorEvent3 = procedure(reader: TXmlCustomReader;
+                                  locator: TdomLocator;
+                                  var targ,
+                                      data : UnicodeString) of object;
+
+  TXmlProcessorEvent4 = procedure(reader: TXmlCustomReader;
+                                  locator: TdomLocator;
+                                  var namespaceURI,
+                                      tagName: UnicodeString) of object;
+
+  TXmlProcessorEvent5 = procedure(reader: TXmlCustomReader;
+                                  locator: TdomLocator;
+                                  var namespaceURI,
+                                      tagName: UnicodeString;
+                                      attributes: TdomNameValueList) of object;
+
+  TXmlProcessorEvent6 = procedure(reader: TXmlCustomReader;
+                                  locator: TdomLocator;
+                                  var name,
+                                      pubId,
+                                      sysId,
+                                      data: UnicodeString) of object;
+
+  TXmlProcessorEvent7 = procedure(reader: TXmlCustomReader;
+                                  locator: TdomLocator;
+                                  var prefix,
+                                      uri: UnicodeString) of object;
+
+  TXmlProcessorEvent8 = procedure(reader: TXmlCustomReader;
+                                  locator: TdomLocator;
+                                  var version,
+                                      encDl,
+                                      sdDl: UnicodeString) of object;
+
+  TXmlProcessorEvent9 = procedure(reader: TXmlCustomReader;
+                                  locator: TdomLocator;
+                                  var name,
+                                      attType,
+                                      bracket,
+                                      defaultDecl,
+                                      attValue: UnicodeString) of object;
+
+  TXmlProcessorEvent10 = procedure(reader: TXmlCustomReader;
+                                   locator: TdomLocator;
+                                   var includeStmt,
+                                       data: UnicodeString) of object;
+
+  TXmlProcessorEvent11 = procedure(reader: TXmlCustomReader;
+                                   locator: TdomLocator;
+                                   var name,
+                                       data: UnicodeString) of object;
+
+  TXmlProcessorEvent12 = procedure(reader: TXmlCustomReader;
+                                   locator: TdomLocator;
+                                   var name,
+                                       entityValue,
+                                       pubId,
+                                       sysId,
+                                       notaName: UnicodeString) of object;
+
+  TXmlProcessorEvent13 = procedure(reader: TXmlCustomReader;
+                                   locator: TdomLocator;
+                                   var name,
+                                       pubId,
+                                       sysId: UnicodeString) of object;
+
+  TXmlProcessorEvent14 = procedure(reader: TXmlCustomReader;
+                                   locator: TdomLocator;
+                                   var name,
+                                       entityValue,
+                                       pubId,
+                                       sysId: UnicodeString) of object;
+
+  TXmlProcessorEvent15 = procedure(reader: TXmlCustomReader;
+                                   locator: TdomLocator;
+                                   var version,
+                                       encDl: UnicodeString) of object;
+
+  TXmlProcessorEvent16 = procedure(reader: TXmlCustomReader;
+                                   locator: TdomLocator;
+                                   var version,
+                                       encDl: UnicodeString;
+                                   var sdDl: TdomStandalone) of object;
+
+  TXmlCustomHandler = class(TComponent)
+  protected
+    FOnComment: TXmlProcessorEvent2;
+    FOnCDATA: TXmlProcessorEvent2;
+    FOnCharRef: TXmlProcessorEvent2;
+    FOnDoctype: TXmlProcessorEvent6;
+    FOnEndDocument: TXmlProcessorEvent1;
+    FOnEndElement: TXmlProcessorEvent4;
+    FOnEndPrefixMapping: TXmlProcessorEvent2;
+    FOnEntityRef: TXmlProcessorEvent2;
+    FOnPCDATA: TXmlProcessorEvent2;
+    FOnProcessingInstruction: TXmlProcessorEvent3;
+    FOnSkippedEntity: TXmlProcessorEvent2;
+    FOnStartDocument: TXmlProcessorEvent16;
+    FOnStartElement: TXmlProcessorEvent5;
+    FOnStartPrefixMapping: TXmlProcessorEvent7;
+    FOnAttributeDefinition: TXmlProcessorEvent9;
+    FOnConditionalSection: TXmlProcessorEvent10;
+    FOnDtdComment: TXmlProcessorEvent2;
+    FOnDtdProcessingInstruction: TXmlProcessorEvent3;
+    FOnElementTypeDeclaration: TXmlProcessorEvent11;
+    FOnEndAttListDeclaration: TXmlProcessorEvent1;
+    FOnEndExtDtd: TXmlProcessorEvent1;
+    FOnEndIntDtd: TXmlProcessorEvent1;
+    FOnEntityDeclaration: TXmlProcessorEvent12;
+    FOnNotationDeclaration: TXmlProcessorEvent13;
+    FOnParameterEntityDeclaration: TXmlProcessorEvent14;
+    FOnParameterEntityRef: TXmlProcessorEvent2;
+    FOnStartAttListDeclaration: TXmlProcessorEvent2;
+    FOnStartExtDtd: TXmlProcessorEvent15;
+    FOnStartIntDtd: TXmlProcessorEvent1;
+    function sendErrorNotification(const target: TXmlCustomReader;
+                                   const xmlErrorType: TXmlErrorType;
+                                   const location: TdomLocator;
+                                   const code: UnicodeString): boolean; virtual;
+  public
+    function CDATA(const sender: TXmlCustomReader;
+                   const locator: TdomLocator;
+                         data: UnicodeString): boolean; virtual; abstract;
+    function charRef(const sender: TXmlCustomReader;
+                     const locator: TdomLocator;
+                           data: UnicodeString): boolean; virtual; abstract;
+    function comment(const sender: TXmlCustomReader;
+                     const locator: TdomLocator;
+                           data: UnicodeString): boolean; virtual; abstract;
+    function doctype(const sender: TXmlCustomReader;
+                     const locator: TdomLocator;
+                           aname,
+                           pubId,
+                           sysId,
+                           data: UnicodeString): boolean; virtual; abstract;
+    function endDocument(const sender: TXmlCustomReader;
+                         const locator: TdomLocator): boolean; virtual; abstract;
+    function endElement(const sender: TXmlCustomReader;
+                        const locator: TdomLocator;
+                              namespaceURI,
+                              tagName: UnicodeString): boolean; virtual; abstract;
+    function endPrefixMapping(const sender: TXmlCustomReader;
+                              const locator: TdomLocator;
+                                    prefix: UnicodeString): boolean; virtual; abstract;
+    function entityRef(const sender: TXmlCustomReader;
+                       const locator: TdomLocator;
+                             aname: UnicodeString): boolean; virtual; abstract;
+    function PCDATA(const sender: TXmlCustomReader;
+                    const locator: TdomLocator;
+                          data: UnicodeString): boolean; virtual; abstract;
+    function processingInstruction(const sender: TXmlCustomReader;
+                                   const locator: TdomLocator;
+                                         targ,
+                                         data : UnicodeString): boolean; virtual; abstract;
+    function skippedEntity(const sender: TXmlCustomReader;
+                           const locator: TdomLocator;
+                                 aname: UnicodeString): boolean; virtual; abstract;
+    function startDocument(const sender: TXmlCustomReader;
+                           const locator: TdomLocator;
+                                 version,
+                                 encName: UnicodeString;
+                                 sdDl: TdomStandalone): boolean; virtual; abstract;
+    function startElement(const sender: TXmlCustomReader;
+                          const locator: TdomLocator;
+                                namespaceURI,
+                                tagName: UnicodeString;
+                                attributes: TdomNameValueList): boolean; virtual; abstract;
+    function startPrefixMapping(const sender: TXmlCustomReader;
+                                const locator: TdomLocator;
+                                      prefix,
+                                      uri: UnicodeString): boolean; virtual; abstract;
+    function attributeDefinition(const sender: TXmlCustomReader;
+                                 const locator: TdomLocator;
+                                       aname,
+                                       attType,
+                                       bracket,
+                                       defaultDecl,
+                                       attValue: UnicodeString): boolean; virtual; abstract;
+    function conditionalSection(const sender: TXmlCustomReader;
+                                const locator: TdomLocator;
+                                      includeStmt,
+                                      data: UnicodeString): boolean; virtual; abstract;
+    function DTDcomment(const sender: TXmlCustomReader;
+                        const locator: TdomLocator;
+                              data: UnicodeString): boolean; virtual; abstract;
+    function DTDprocessingInstruction(const sender: TXmlCustomReader;
+                                      const locator: TdomLocator;
+                                            targ,
+                                            data : UnicodeString): boolean; virtual; abstract;
+    function elementTypeDeclaration(const sender: TXmlCustomReader;
+                                    const locator: TdomLocator;
+                                          aname,
+                                          data: UnicodeString): boolean; virtual; abstract;
+    function endAttListDeclaration(const sender: TXmlCustomReader;
+                                   const locator: TdomLocator): boolean; virtual; abstract;
+    function endExtDtd(const sender: TXmlCustomReader;
+                       const locator: TdomLocator): boolean; virtual; abstract;
+    function endIntDtd(const sender: TXmlCustomReader;
+                       const locator: TdomLocator): boolean; virtual; abstract;
+    function entityDeclaration(const sender: TXmlCustomReader;
+                               const locator: TdomLocator;
+                                     aname,
+                                     entityValue,
+                                     pubId,
+                                     sysId,
+                                     notaName: UnicodeString): boolean; virtual; abstract;
+    function notationDeclaration(const sender: TXmlCustomReader;
+                                 const locator: TdomLocator;
+                                       aname,
+                                       pubId,
+                                       sysId: UnicodeString): boolean; virtual; abstract;
+    function parameterEntityDeclaration(const sender: TXmlCustomReader;
+                                        const locator: TdomLocator;
+                                              aname,
+                                              entityValue,
+                                              pubId,
+                                              sysId: UnicodeString): boolean; virtual; abstract;
+    function parameterEntityRef(const sender: TXmlCustomReader;
+                                const locator: TdomLocator;
+                                      aname: UnicodeString): boolean; virtual; abstract;
+    function startAttListDeclaration(const sender: TXmlCustomReader;
+                                     const locator: TdomLocator;
+                                           aname: UnicodeString): boolean; virtual; abstract;
+    function startExtDtd(const sender: TXmlCustomReader;
+                         const locator: TdomLocator;
+                               version,
+                               encName: UnicodeString): boolean; virtual; abstract;
+    function startIntDtd(const sender: TXmlCustomReader;
+                         const locator: TdomLocator): boolean; virtual; abstract;
+    function resolvePE(    PEReferenceName: UnicodeString;
+                       var PEValue: UnicodeString;
+                       var error: TXmlErrorType): boolean; virtual; abstract;
+    procedure notifyReset; virtual; abstract;
+  published
+    property OnAttributeDefinition: TXmlProcessorEvent9 read FOnAttributeDefinition write FOnAttributeDefinition;
+    property OnCDATA: TXmlProcessorEvent2 read FOnCDATA write FOnCDATA;
+    property OnCharRef: TXmlProcessorEvent2 read FOnCharRef write FOnCharRef;
+    property OnComment: TXmlProcessorEvent2 read FOnComment write FOnComment;
+    property OnConditionalSection: TXmlProcessorEvent10 read FOnConditionalSection write FOnConditionalSection;
+    property OnDoctype: TXmlProcessorEvent6 read FOndoctype write FOndoctype;
+    property OnDtdComment: TXmlProcessorEvent2 read FOnDtdComment write FOnDtdComment;
+    property OnDtdProcessingInstruction: TXmlProcessorEvent3 read FOnDtdProcessingInstruction write FOnDtdProcessingInstruction;
+    property OnElementTypeDeclaration: TXmlProcessorEvent11 read FOnElementTypeDeclaration write FOnElementTypeDeclaration;
+    property OnEndAttListDeclaration: TXmlProcessorEvent1 read FOnEndAttListDeclaration write FOnEndAttListDeclaration;
+    property OnEndDocument: TXmlProcessorEvent1 read FOnEndDocument write FOnEndDocument;
+    property OnEndElement: TXmlProcessorEvent4 read FOnEndElement write FOnEndElement;
+    property OnEndExtDtd: TXmlProcessorEvent1 read FOnEndExtDtd write FOnEndExtDtd;
+    property OnEndIntDtd: TXmlProcessorEvent1 read FOnEndIntDtd write FOnEndIntDtd;
+    property OnEndPrefixMapping: TXmlProcessorEvent2 read FOnEndPrefixMapping write FOnEndPrefixMapping;
+    property OnEntityDeclaration: TXmlProcessorEvent12 read FOnEntityDeclaration write FOnEntityDeclaration;
+    property OnEntityRef: TXmlProcessorEvent2 read FOnEntityRef write FOnEntityRef;
+    property OnNotationDeclaration: TXmlProcessorEvent13 read FOnNotationDeclaration write FOnNotationDeclaration;
+    property OnParameterEntityDeclaration: TXmlProcessorEvent14 read FOnParameterEntityDeclaration write FOnParameterEntityDeclaration;
+    property OnParameterEntityRef: TXmlProcessorEvent2 read FOnParameterEntityRef write FOnParameterEntityRef;
+    property OnPCDATA: TXmlProcessorEvent2 read FOnPCDATA write FOnPCDATA;
+    property OnProcessingInstruction: TXmlProcessorEvent3 read FOnProcessingInstruction write FOnProcessingInstruction;
+    property OnSkippedEntity: TXmlProcessorEvent2 read FOnSkippedEntity write FOnSkippedEntity;
+    property OnStartAttListDeclaration: TXmlProcessorEvent2 read FOnStartAttListDeclaration write FOnStartAttListDeclaration;
+    property OnStartDocument: TXmlProcessorEvent16 read FOnStartDocument write FOnStartDocument;
+    property OnStartElement: TXmlProcessorEvent5 read FOnStartElement write FOnStartElement;
+    property OnStartExtDtd: TXmlProcessorEvent15 read FOnStartExtDtd write FOnStartExtDtd;
+    property OnStartIntDtd: TXmlProcessorEvent1 read FOnStartIntDtd write FOnStartIntDtd;
+    property OnStartPrefixMapping: TXmlProcessorEvent7 read FOnStartPrefixMapping write FOnStartPrefixMapping;
+  end;
+
+  TXmlStandardHandler = class(TXmlCustomHandler)
+  protected
+    FNextHandler: TXmlCustomHandler;
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+  public
+    function CDATA(const sender: TXmlCustomReader;
+                   const locator: TdomLocator;
+                         data: UnicodeString): boolean; override;
+    function charRef(const sender: TXmlCustomReader;
+                     const locator: TdomLocator;
+                           data: UnicodeString): boolean; override;
+    function comment(const sender: TXmlCustomReader;
+                     const locator: TdomLocator;
+                           data: UnicodeString): boolean; override;
+    function doctype(const sender: TXmlCustomReader;
+                     const locator: TdomLocator;
+                           aname,
+                           pubId,
+                           sysId,
+                           data: UnicodeString): boolean; override;
+    function endDocument(const sender: TXmlCustomReader;
+                         const locator: TdomLocator): boolean; override;
+    function endElement(const sender: TXmlCustomReader;
+                        const locator: TdomLocator;
+                              namespaceURI,
+                              tagName: UnicodeString): boolean; override;
+    function endPrefixMapping(const sender: TXmlCustomReader;
+                              const locator: TdomLocator;
+                                    prefix: UnicodeString): boolean; override;
+    function entityRef(const sender: TXmlCustomReader;
+                       const locator: TdomLocator;
+                             aname: UnicodeString): boolean; override;
+    function PCDATA(const sender: TXmlCustomReader;
+                    const locator: TdomLocator;
+                          data: UnicodeString): boolean; override;
+    function processingInstruction(const sender: TXmlCustomReader;
+                                   const locator: TdomLocator;
+                                         targ,
+                                         data : UnicodeString): boolean; override;
+    function skippedEntity(const sender: TXmlCustomReader;
+                           const locator: TdomLocator;
+                                 aname: UnicodeString): boolean; override;
+    function startDocument(const sender: TXmlCustomReader;
+                           const locator: TdomLocator;
+                                 version,
+                                 encName: UnicodeString;
+                                 sdDl: TdomStandalone): boolean; override;
+    function startElement(const sender: TXmlCustomReader;
+                          const locator: TdomLocator;
+                                namespaceURI,
+                                tagName: UnicodeString;
+                                attributes: TdomNameValueList): boolean; override;
+    function startPrefixMapping(const sender: TXmlCustomReader;
+                                const locator: TdomLocator;
+                                      prefix,
+                                      uri: UnicodeString): boolean; override;
+    function attributeDefinition(const sender: TXmlCustomReader;
+                                 const locator: TdomLocator;
+                                       aname,
+                                       attType,
+                                       bracket,
+                                       defaultDecl,
+                                       attValue: UnicodeString): boolean; override;
+    function conditionalSection(const sender: TXmlCustomReader;
+                                const locator: TdomLocator;
+                                      includeStmt,
+                                      data: UnicodeString): boolean; override;
+    function DTDcomment(const sender: TXmlCustomReader;
+                        const locator: TdomLocator;
+                              data: UnicodeString): boolean; override;
+    function DTDprocessingInstruction(const sender: TXmlCustomReader;
+                                      const locator: TdomLocator;
+                                            targ,
+                                            data : UnicodeString): boolean; override;
+    function elementTypeDeclaration(const sender: TXmlCustomReader;
+                                    const locator: TdomLocator;
+                                          aname,
+                                          data: UnicodeString): boolean; override;
+    function endAttListDeclaration(const sender: TXmlCustomReader;
+                                   const locator: TdomLocator): boolean; override;
+    function endExtDtd(const sender: TXmlCustomReader;
+                       const locator: TdomLocator): boolean; override;
+    function endIntDtd(const sender: TXmlCustomReader;
+                       const locator: TdomLocator): boolean; override;
+    function entityDeclaration(const sender: TXmlCustomReader;
+                               const locator: TdomLocator;
+                                     aname,
+                                     entityValue,
+                                     pubId,
+                                     sysId,
+                                     notaName: UnicodeString): boolean; override;
+    function notationDeclaration(const sender: TXmlCustomReader;
+                                 const locator: TdomLocator;
+                                       aname,
+                                       pubId,
+                                       sysId: UnicodeString): boolean; override;
+    function parameterEntityDeclaration(const sender: TXmlCustomReader;
+                                        const locator: TdomLocator;
+                                              aname,
+                                              entityValue,
+                                              pubId,
+                                              sysId: UnicodeString): boolean; override;
+    function parameterEntityRef(const sender: TXmlCustomReader;
+                                const locator: TdomLocator;
+                                      aname: UnicodeString): boolean; override;
+    function startAttListDeclaration(const sender: TXmlCustomReader;
+                                     const locator: TdomLocator;
+                                           aname: UnicodeString): boolean; override;
+    function startExtDtd(const sender: TXmlCustomReader;
+                         const locator: TdomLocator;
+                               version,
+                               encName: UnicodeString): boolean; override;
+    function startIntDtd(const sender: TXmlCustomReader;
+                         const locator: TdomLocator): boolean; override;
+    function resolvePE(    PEReferenceName: UnicodeString;
+                       var PEValue: UnicodeString;
+                       var error: TXmlErrorType): boolean; override;
+    procedure notifyReset; override;
+  published
+    property NextHandler: TXmlCustomHandler read FNextHandler write FNextHandler;
+  end;
+
+  TXmlDistributor = class;
+
+  TXmlHandlerItem = class(TCollectionItem)
+  protected
+    FXmlHandler: TXmlCustomHandler;
+    function getXmlHandler: TXmlCustomHandler;
+    procedure setXmlHandler(Value: TXmlCustomHandler);
+  public
+    procedure Assign(Source: TPersistent); override;
+  published
+    property XmlHandler: TXmlCustomHandler read getXmlHandler write setXmlHandler;
+  end;
+
+  TXmlHandlers = class(TCollection)
+  private
+    FDistributor: TXmlDistributor;
+  protected
+    function GetItem(Index: Integer): TXmlHandlerItem; virtual;
+    procedure SetItem(Index: Integer; Value: TXmlHandlerItem); virtual;
+    function GetOwner: TPersistent; override;
+  public
+    constructor Create(Distributor: TXmlDistributor);
+    function Add: TXmlHandlerItem;
+    procedure Assign(Source: TPersistent); override;
+    function FindHandlerItem(AHandler: TXmlCustomHandler): TXmlHandlerItem;
+    property Distributor: TXmlDistributor read FDistributor;
+    property Items[Index: Integer]: TXmlHandlerItem read GetItem write SetItem; default;
+  end;
+
+  TXmlDistributor = class(TXmlCustomHandler)
+  private
+    procedure readData(Reader: TReader);
+    procedure writeData(Writer: TWriter);
+  protected
+    FNextHandlers: TXmlHandlers;
+    procedure DefineProperties(Filer: TFiler); override;
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+    procedure setNextHandlers(const value: TXmlHandlers);
+  public
+    constructor create(AOwner: TComponent); override;
+    destructor destroy; override;
+    function CDATA(const sender: TXmlCustomReader;
+                   const locator: TdomLocator;
+                         data: UnicodeString): boolean; override;
+    function charRef(const sender: TXmlCustomReader;
+                     const locator: TdomLocator;
+                           data: UnicodeString): boolean; override;
+    function comment(const sender: TXmlCustomReader;
+                     const locator: TdomLocator;
+                           data: UnicodeString): boolean; override;
+    function doctype(const sender: TXmlCustomReader;
+                     const locator: TdomLocator;
+                           aname,
+                           pubId,
+                           sysId,
+                           data: UnicodeString): boolean; override;
+    function endDocument(const sender: TXmlCustomReader;
+                         const locator: TdomLocator): boolean; override;
+    function endElement(const sender: TXmlCustomReader;
+                        const locator: TdomLocator;
+                              namespaceURI,
+                              tagName: UnicodeString): boolean; override;
+    function endPrefixMapping(const sender: TXmlCustomReader;
+                              const locator: TdomLocator;
+                                    prefix: UnicodeString): boolean; override;
+    function entityRef(const sender: TXmlCustomReader;
+                       const locator: TdomLocator;
+                             aname: UnicodeString): boolean; override;
+    function PCDATA(const sender: TXmlCustomReader;
+                    const locator: TdomLocator;
+                          data: UnicodeString): boolean; override;
+    function processingInstruction(const sender: TXmlCustomReader;
+                                   const locator: TdomLocator;
+                                         targ,
+                                         data : UnicodeString): boolean; override;
+    function skippedEntity(const sender: TXmlCustomReader;
+                           const locator: TdomLocator;
+                                 aname: UnicodeString): boolean; override;
+    function startDocument(const sender: TXmlCustomReader;
+                           const locator: TdomLocator;
+                                 version,
+                                 encName: UnicodeString;
+                                 sdDl: TdomStandalone): boolean; override;
+    function startElement(const sender: TXmlCustomReader;
+                          const locator: TdomLocator;
+                                namespaceURI,
+                                tagName: UnicodeString;
+                                attributes: TdomNameValueList): boolean; override;
+    function startPrefixMapping(const sender: TXmlCustomReader;
+                                const locator: TdomLocator;
+                                      prefix,
+                                      uri: UnicodeString): boolean; override;
+    function attributeDefinition(const sender: TXmlCustomReader;
+                                 const locator: TdomLocator;
+                                       aname,
+                                       attType,
+                                       bracket,
+                                       defaultDecl,
+                                       attValue: UnicodeString): boolean; override;
+    function conditionalSection(const sender: TXmlCustomReader;
+                                const locator: TdomLocator;
+                                      includeStmt,
+                                      data: UnicodeString): boolean; override;
+    function DTDcomment(const sender: TXmlCustomReader;
+                        const locator: TdomLocator;
+                              data: UnicodeString): boolean; override;
+    function DTDprocessingInstruction(const sender: TXmlCustomReader;
+                                      const locator: TdomLocator;
+                                            targ,
+                                            data : UnicodeString): boolean; override;
+    function elementTypeDeclaration(const sender: TXmlCustomReader;
+                                    const locator: TdomLocator;
+                                          aname,
+                                          data: UnicodeString): boolean; override;
+    function endAttListDeclaration(const sender: TXmlCustomReader;
+                                   const locator: TdomLocator): boolean; override;
+    function endExtDtd(const sender: TXmlCustomReader;
+                       const locator: TdomLocator): boolean; override;
+    function endIntDtd(const sender: TXmlCustomReader;
+                       const locator: TdomLocator): boolean; override;
+    function entityDeclaration(const sender: TXmlCustomReader;
+                               const locator: TdomLocator;
+                                     aname,
+                                     entityValue,
+                                     pubId,
+                                     sysId,
+                                     notaName: UnicodeString): boolean; override;
+    function notationDeclaration(const sender: TXmlCustomReader;
+                                 const locator: TdomLocator;
+                                       aname,
+                                       pubId,
+                                       sysId: UnicodeString): boolean; override;
+    function parameterEntityDeclaration(const sender: TXmlCustomReader;
+                                        const locator: TdomLocator;
+                                              aname,
+                                              entityValue,
+                                              pubId,
+                                              sysId: UnicodeString): boolean; override;
+    function parameterEntityRef(const sender: TXmlCustomReader;
+                                const locator: TdomLocator;
+                                      aname: UnicodeString): boolean; override;
+    function startAttListDeclaration(const sender: TXmlCustomReader;
+                                     const locator: TdomLocator;
+                                           aname: UnicodeString): boolean; override;
+    function startExtDtd(const sender: TXmlCustomReader;
+                         const locator: TdomLocator;
+                               version,
+                               encDl: UnicodeString): boolean; override;
+    function startIntDtd(const sender: TXmlCustomReader;
+                         const locator: TdomLocator): boolean; override;
+    function resolvePE(    PEReferenceName: UnicodeString;
+                       var PEValue: UnicodeString;
+                       var error: TXmlErrorType): boolean; override;
+    procedure notifyReset; override;
+  published
+    property NextHandlers: TXmlHandlers read FNextHandlers write setNextHandlers;
+  end;
+
+  TXmlCustomDTDHandler = class(TXmlStandardHandler)
+  public
+    function CDATA(const sender: TXmlCustomReader;
+                   const locator: TdomLocator;
+                         data: UnicodeString): boolean; override;
+    function charRef(const sender: TXmlCustomReader;
+                     const locator: TdomLocator;
+                           data: UnicodeString): boolean; override;
+    function comment(const sender: TXmlCustomReader;
+                     const locator: TdomLocator;
+                           data: UnicodeString): boolean; override;
+    function doctype(const sender: TXmlCustomReader;
+                     const locator: TdomLocator;
+                           aname,
+                           pubId,
+                           sysId,
+                           data: UnicodeString): boolean; override;
+    function endDocument(const sender: TXmlCustomReader;
+                         const locator: TdomLocator): boolean; override;
+    function endElement(const sender: TXmlCustomReader;
+                        const locator: TdomLocator;
+                              namespaceURI,
+                              tagName: UnicodeString): boolean; override;
+    function endPrefixMapping(const sender: TXmlCustomReader;
+                              const locator: TdomLocator;
+                                    prefix: UnicodeString): boolean; override;
+    function entityRef(const sender: TXmlCustomReader;
+                       const locator: TdomLocator;
+                             aname: UnicodeString): boolean; override;
+    function PCDATA(const sender: TXmlCustomReader;
+                    const locator: TdomLocator;
+                          data: UnicodeString): boolean; override;
+    function processingInstruction(const sender: TXmlCustomReader;
+                                   const locator: TdomLocator;
+                                         targ,
+                                         data : UnicodeString): boolean; override;
+    function skippedEntity(const sender: TXmlCustomReader;
+                           const locator: TdomLocator;
+                                 aname: UnicodeString): boolean; override;
+    function startDocument(const sender: TXmlCustomReader;
+                           const locator: TdomLocator;
+                                 version,
+                                 encName: UnicodeString;
+                                 sdDl: TdomStandalone): boolean; override;
+    function startElement(const sender: TXmlCustomReader;
+                          const locator: TdomLocator;
+                                namespaceURI,
+                                tagName: UnicodeString;
+                                attributes: TdomNameValueList): boolean; override;
+    function startPrefixMapping(const sender: TXmlCustomReader;
+                                const locator: TdomLocator;
+                                      prefix,
+                                      uri: UnicodeString): boolean; override;
+  end;
+
+  TXmlCustomContentHandler = class(TXmlStandardHandler)
+  public
+    function attributeDefinition(const sender: TXmlCustomReader;
+                                 const locator: TdomLocator;
+                                       aname,
+                                       attType,
+                                       bracket,
+                                       defaultDecl,
+                                       attValue: UnicodeString): boolean; override;
+    function conditionalSection(const sender: TXmlCustomReader;
+                                const locator: TdomLocator;
+                                      includeStmt,
+                                      data: UnicodeString): boolean; override;
+    function DTDcomment(const sender: TXmlCustomReader;
+                        const locator: TdomLocator;
+                              data: UnicodeString): boolean; override;
+    function DTDprocessingInstruction(const sender: TXmlCustomReader;
+                                      const locator: TdomLocator;
+                                            targ,
+                                            data : UnicodeString): boolean; override;
+    function elementTypeDeclaration(const sender: TXmlCustomReader;
+                                    const locator: TdomLocator;
+                                          aname,
+                                          data: UnicodeString): boolean; override;
+    function endAttListDeclaration(const sender: TXmlCustomReader;
+                                   const locator: TdomLocator): boolean; override;
+    function endExtDtd(const sender: TXmlCustomReader;
+                       const locator: TdomLocator): boolean; override;
+    function endIntDtd(const sender: TXmlCustomReader;
+                       const locator: TdomLocator): boolean; override;
+    function entityDeclaration(const sender: TXmlCustomReader;
+                               const locator: TdomLocator;
+                                     aname,
+                                     entityValue,
+                                     pubId,
+                                     sysId,
+                                     notaName: UnicodeString): boolean; override;
+    function notationDeclaration(const sender: TXmlCustomReader;
+                                 const locator: TdomLocator;
+                                       aname,
+                                       pubId,
+                                       sysId: UnicodeString): boolean; override;
+    function parameterEntityDeclaration(const sender: TXmlCustomReader;
+                                        const locator: TdomLocator;
+                                              aname,
+                                              entityValue,
+                                              pubId,
+                                              sysId: UnicodeString): boolean; override;
+    function parameterEntityRef(const sender: TXmlCustomReader;
+                                const locator: TdomLocator;
+                                      aname: UnicodeString): boolean; override;
+    function startAttListDeclaration(const sender: TXmlCustomReader;
+                                     const locator: TdomLocator;
+                                           aname: UnicodeString): boolean; override;
+    function startExtDtd(const sender: TXmlCustomReader;
+                         const locator: TdomLocator;
+                               version,
+                               encDl: UnicodeString): boolean; override;
+    function startIntDtd(const sender: TXmlCustomReader;
+                         const locator: TdomLocator): boolean; override;
+  end;
+
+  TXmlCustomReader = class(TComponent)
+  private
+    FDOMImpl: TDomImplementation;
+    FNextHandler: TXmlStandardHandler;
+    procedure setDomImpl(const impl: TDomImplementation);
+  protected
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+    function sendErrorNotification(const xmlErrorType: TXmlErrorType;
+                                   const location: TdomLocator;
+                                   const code: UnicodeString): boolean; virtual;
+  public
+    constructor create(AOwner: TComponent); override;
+  published
+    property DOMImpl: TDomImplementation read FDomImpl write setDomImpl;
+    property NextHandler: TXmlStandardHandler read FNextHandler write FNextHandler;
+  end;
+
+  TXmlWFTestContentHandler = class(TXmlCustomContentHandler)
+  protected
+    FIsActive: boolean;
+    FDoctypeFound: boolean;
+    FRootFound: boolean;
+    FTestRootFound: boolean;
+    FTagStack: TdomWideStringList;
+  public
+    constructor create(AOwner: TComponent); override;
+    destructor destroy; override;
+    function CDATA(const sender: TXmlCustomReader;
+                   const locator: TdomLocator;
+                         data: UnicodeString): boolean; override;
+    function charRef(const sender: TXmlCustomReader;
+                     const locator: TdomLocator;
+                           data: UnicodeString): boolean; override;
+    function comment(const sender: TXmlCustomReader;
+                     const locator: TdomLocator;
+                           data: UnicodeString): boolean; override;
+    function doctype(const sender: TXmlCustomReader;
+                     const locator: TdomLocator;
+                           aname,
+                           pubId,
+                           sysId,
+                           data: UnicodeString): boolean; override;
+    function endDocument(const sender: TXmlCustomReader;
+                         const locator: TdomLocator): boolean; override;
+    function endElement(const sender: TXmlCustomReader;
+                        const locator: TdomLocator;
+                              namespaceURI,
+                              tagName: UnicodeString): boolean; override;
+    function endPrefixMapping(const sender: TXmlCustomReader;
+                              const locator: TdomLocator;
+                                    prefix: UnicodeString): boolean; override;
+    function entityRef(const sender: TXmlCustomReader;
+                       const locator: TdomLocator;
+                             aname: UnicodeString): boolean; override;
+    function PCDATA(const sender: TXmlCustomReader;
+                    const locator: TdomLocator;
+                          data: UnicodeString): boolean; override;
+    function processingInstruction(const sender: TXmlCustomReader;
+                                   const locator: TdomLocator;
+                                         targ,
+                                         data : UnicodeString): boolean; override;
+    function skippedEntity(const sender: TXmlCustomReader;
+                           const locator: TdomLocator;
+                                 aname: UnicodeString): boolean; override;
+    function startDocument(const sender: TXmlCustomReader;
+                           const locator: TdomLocator;
+                                 version,
+                                 encName: UnicodeString;
+                                 sdDl: TdomStandalone): boolean; override;
+    function startElement(const sender: TXmlCustomReader;
+                          const locator: TdomLocator;
+                                namespaceURI,
+                                tagName: UnicodeString;
+                                attributes: TdomNameValueList): boolean; override;
+    function startPrefixMapping(const sender: TXmlCustomReader;
+                                const locator: TdomLocator;
+                                      prefix,
+                                      uri: UnicodeString): boolean; override;
+    procedure notifyReset; override;
+    property isActive: boolean read FIsActive;
+    property testRootFound: boolean read FTestRootFound write FTestRootFound default true;
+  end;
+
+  TXmlWFTestDTDHandler = class(TXmlCustomDtdHandler)
+  protected
+    FAttListDeclActive: boolean;
+    FExtDtdIsActive: boolean;
+    FIntDtdIsActive: boolean;
+  public
+    constructor create(AOwner: TComponent); override;
+    destructor destroy; override;
+    function attributeDefinition(const sender: TXmlCustomReader;
+                                 const locator: TdomLocator;
+                                       aname,
+                                       attType,
+                                       bracket,
+                                       defaultDecl,
+                                       attValue: UnicodeString): boolean; override;
+    function conditionalSection(const sender: TXmlCustomReader;
+                                const locator: TdomLocator;
+                                      includeStmt,
+                                      data: UnicodeString): boolean; override;
+    function DTDcomment(const sender: TXmlCustomReader;
+                        const locator: TdomLocator;
+                              data: UnicodeString): boolean; override;
+    function DTDprocessingInstruction(const sender: TXmlCustomReader;
+                                      const locator: TdomLocator;
+                                            targ,
+                                            data : UnicodeString): boolean; override;
+    function elementTypeDeclaration(const sender: TXmlCustomReader;
+                                    const locator: TdomLocator;
+                                          aname,
+                                          data: UnicodeString): boolean; override;
+    function endAttListDeclaration(const sender: TXmlCustomReader;
+                                   const locator: TdomLocator): boolean; override;
+    function endExtDtd(const sender: TXmlCustomReader;
+                       const locator: TdomLocator): boolean; override;
+    function endIntDtd(const sender: TXmlCustomReader;
+                       const locator: TdomLocator): boolean; override;
+    function entityDeclaration(const sender: TXmlCustomReader;
+                               const locator: TdomLocator;
+                                     aname,
+                                     entityValue,
+                                     pubId,
+                                     sysId,
+                                     notaName: UnicodeString): boolean; override;
+    function notationDeclaration(const sender: TXmlCustomReader;
+                                 const locator: TdomLocator;
+                                       aname,
+                                       pubId,
+                                       sysId: UnicodeString): boolean; override;
+    function parameterEntityDeclaration(const sender: TXmlCustomReader;
+                                        const locator: TdomLocator;
+                                              aname,
+                                              entityValue,
+                                              pubId,
+                                              sysId: UnicodeString): boolean; override;
+    function parameterEntityRef(const sender: TXmlCustomReader;
+                                const locator: TdomLocator;
+                                      aname: UnicodeString): boolean; override;
+    function startAttListDeclaration(const sender: TXmlCustomReader;
+                                     const locator: TdomLocator;
+                                           aname: UnicodeString): boolean; override;
+    function startExtDtd(const sender: TXmlCustomReader;
+                         const locator: TdomLocator;
+                               version,
+                               encName: UnicodeString): boolean; override;
+    function startIntDtd(const sender: TXmlCustomReader;
+                         const locator: TdomLocator): boolean; override;
+    procedure notifyReset; override;
+    property extDtdIsActive: boolean read FExtDtdIsActive;
+    property intDtdIsActive: boolean read FIntDtdIsActive;
+  end;
+
+  TXmlDocBuilder = class(TXmlCustomContentHandler)
+  private
+    FBuildNamespaceTree: boolean;
+  protected
+    FRefNode: TdomNode;
+    FPrefixUriList: TdomNameValueList;
+  public
+    constructor create(AOwner: TComponent); override;
+    destructor destroy; override;
+    function CDATA(const sender: TXmlCustomReader;
+                   const locator: TdomLocator;
+                         data: UnicodeString): boolean; override;
+    function charRef(const sender: TXmlCustomReader;
+                     const locator: TdomLocator;
+                           data: UnicodeString): boolean; override;
+    function comment(const sender: TXmlCustomReader;
+                     const locator: TdomLocator;
+                           data: UnicodeString): boolean; override;
+    function doctype(const sender: TXmlCustomReader;
+                     const locator: TdomLocator;
+                           aname,
+                           pubId,
+                           sysId,
+                           data: UnicodeString): boolean; override;
+    function endDocument(const sender: TXmlCustomReader;
+                         const locator: TdomLocator): boolean; override;
+    function endElement(const sender: TXmlCustomReader;
+                        const locator: TdomLocator;
+                              namespaceURI,
+                              tagName: UnicodeString): boolean; override;
+    function endPrefixMapping(const sender: TXmlCustomReader;
+                               const locator: TdomLocator;
+                                     prefix: UnicodeString): boolean; override;
+    function entityRef(const sender: TXmlCustomReader;
+                       const locator: TdomLocator;
+                             aname: UnicodeString): boolean; override;
+    function PCDATA(const sender: TXmlCustomReader;
+                    const locator: TdomLocator;
+                          data: UnicodeString): boolean; override;
+    function processingInstruction(const sender: TXmlCustomReader;
+                                   const locator: TdomLocator;
+                                         targ,
+                                         data : UnicodeString): boolean; override;
+    function skippedEntity(const sender: TXmlCustomReader;
+                           const locator: TdomLocator;
+                                 aname: UnicodeString): boolean; override;
+    function startDocument(const sender: TXmlCustomReader;
+                           const locator: TdomLocator;
+                                 version,
+                                 encName: UnicodeString;
+                                 sdDl: TdomStandalone): boolean; override;
+    function startElement(const sender: TXmlCustomReader;
+                          const locator: TdomLocator;
+                                namespaceURI,
+                                tagName: UnicodeString;
+                                attributes: TdomNameValueList): boolean; override;
+    function startPrefixMapping(const sender: TXmlCustomReader;
+                                const locator: TdomLocator;
+                                      prefix,
+                                      uri: UnicodeString): boolean; override;
+    procedure notifyReset; override;
+    property referenceNode: TdomNode read FRefNode write FRefNode;
+  published
+    property BuildNamespaceTree: boolean read FBuildNamespaceTree write FBuildNamespaceTree default false;
+  end;
+
+  TXmlDtdBuilder = class(TXmlCustomContentHandler)
+  protected
+    FExtDtdIsActive: boolean;
+    FIntDtdIsActive: boolean;
+    FReferenceExtCM: TdomCMExternalObject;
+    FReferenceIntCM: TdomCMInternalObject;
+    FRefNode: TdomCMNode;
+    procedure resolveCharRefsAndPERefs(const s: UnicodeString;
+                                         var result: UnicodeString;
+                                         var error: boolean); virtual;
+    procedure insertMixedContent(const sender: TXmlCustomReader;
+                                 const refNode: TdomCMNode;
+                                 const contSpec: UnicodeString); virtual;
+    procedure insertChildrenContent(const sender: TXmlCustomReader;
+                                    const refNode: TdomCMNode;
+                                    const contSpec: UnicodeString); virtual;
+    procedure insertNotationOrEnumerationContent(const sender: TXmlCustomReader;
+                                                 const refCMAttrDefinition: TdomCMAttrDefinition;
+                                                 const contSpec: UnicodeString); virtual;
+    function getExtContentModel: TdomCMExternalObject; virtual;
+    function getIntContentModel: TdomCMInternalObject; virtual;
+    procedure setExtContentModel(const cm: TdomCMExternalObject); virtual;
+    procedure setIntContentModel(const cm: TdomCMInternalObject); virtual;
+  public
+    constructor create(AOwner: TComponent); override;
+    function attributeDefinition(const sender: TXmlCustomReader;
+                                 const locator: TdomLocator;
+                                       aname,
+                                       attType,
+                                       bracket,
+                                       defaultDecl,
+                                       attValue: UnicodeString): boolean; override;
+    function conditionalSection(const sender: TXmlCustomReader;
+                                const locator: TdomLocator;
+                                      includeStmt,
+                                      data: UnicodeString): boolean; override;
+    function DTDcomment(const sender: TXmlCustomReader;
+                        const locator: TdomLocator;
+                              data: UnicodeString): boolean; override;
+    function DTDprocessingInstruction(const sender: TXmlCustomReader;
+                                      const locator: TdomLocator;
+                                            targ,
+                                            data : UnicodeString): boolean; override;
+    function elementTypeDeclaration(const sender: TXmlCustomReader;
+                                    const locator: TdomLocator;
+                                          aname,
+                                          data: UnicodeString): boolean; override;
+    function endAttListDeclaration(const sender: TXmlCustomReader;
+                                   const locator: TdomLocator): boolean; override;
+    function endExtDtd(const sender: TXmlCustomReader;
+                       const locator: TdomLocator): boolean; override;
+    function endIntDtd(const sender: TXmlCustomReader;
+                       const locator: TdomLocator): boolean; override;
+    function entityDeclaration(const sender: TXmlCustomReader;
+                               const locator: TdomLocator;
+                                     aname,
+                                     entityValue,
+                                     pubId,
+                                     sysId,
+                                     notaName: UnicodeString): boolean; override;
+    function notationDeclaration(const sender: TXmlCustomReader;
+                                 const locator: TdomLocator;
+                                       aname,
+                                       pubId,
+                                       sysId: UnicodeString): boolean; override;
+    function parameterEntityDeclaration(const sender: TXmlCustomReader;
+                                        const locator: TdomLocator;
+                                              aname,
+                                              entityValue,
+                                              pubId,
+                                              sysId: UnicodeString): boolean; override;
+    function parameterEntityRef(const sender: TXmlCustomReader;
+                                const locator: TdomLocator;
+                                      aname: UnicodeString): boolean; override;
+    function startAttListDeclaration(const sender: TXmlCustomReader;
+                                     const locator: TdomLocator;
+                                           aname: UnicodeString): boolean; override;
+    function startExtDtd(const sender: TXmlCustomReader;
+                         const locator: TdomLocator;
+                               version,
+                               encName: UnicodeString): boolean; override;
+    function startIntDtd(const sender: TXmlCustomReader;
+                         const locator: TdomLocator): boolean; override;
+    function resolvePE(    PEReferenceName: UnicodeString;
+                       var PEValue: UnicodeString;
+                       var error: TXmlErrorType): boolean; override;
+    procedure notifyReset; override;
+    property extContentModel: TdomCMExternalObject read getExtContentModel write setExtContentModel;
+    property extDtdIsActive: boolean read FExtDtdIsActive;
+    property intContentModel: TdomCMInternalObject read getIntContentModel write setIntContentModel;
+    property intDtdIsActive: boolean read FIntDtdIsActive;
+  end;
+
+  TXmlCMBuilder = class(TXmlCustomContentHandler)
+  protected
+    FContentModel: TdomCMObject;
+    FCurrentAttListName: UnicodeString;
+    FIsActive: boolean;
+    procedure CDataNormalization(const s: UnicodeString;
+                                   var result: UnicodeString;
+                                   var error: boolean); virtual;
+    function getContentModel: TdomCMObject; virtual;
+    procedure insertMixedContent(const sender: TXmlCustomReader;
+                                 const refNode: TdomCMNode;
+                                 const contSpec: UnicodeString); virtual;
+    procedure insertChildrenContent(const sender: TXmlCustomReader;
+                                    const refNode: TdomCMNode;
+                                    const contSpec: UnicodeString); virtual;
+    procedure insertNotationOrEnumerationContent(const sender: TXmlCustomReader;
+                                                 const refCMAttribute: TdomCMAttribute;
+                                                 const contSpec: UnicodeString); virtual;
+    procedure resolveCharRefsAndPERefs(const s: UnicodeString;
+                                         var result: UnicodeString;
+                                         var error: boolean); virtual;
+    procedure setContentModel(const cm: TdomCMObject); virtual;
+  public
+    constructor create(AOwner: TComponent); override;
+    function attributeDefinition(const sender: TXmlCustomReader;
+                                 const locator: TdomLocator;
+                                       aname,
+                                       attType,
+                                       bracket,
+                                       defaultDecl,
+                                       attValue: UnicodeString): boolean; override;
+    function conditionalSection(const sender: TXmlCustomReader;
+                                const locator: TdomLocator;
+                                      includeStmt,
+                                      data: UnicodeString): boolean; override;
+    function DTDcomment(const sender: TXmlCustomReader;
+                        const locator: TdomLocator;
+                              data: UnicodeString): boolean; override;
+    function DTDprocessingInstruction(const sender: TXmlCustomReader;
+                                      const locator: TdomLocator;
+                                            targ,
+                                            data : UnicodeString): boolean; override;
+    function elementTypeDeclaration(const sender: TXmlCustomReader;
+                                    const locator: TdomLocator;
+                                          aname,
+                                          data: UnicodeString): boolean; override;
+    function endAttListDeclaration(const sender: TXmlCustomReader;
+                                   const locator: TdomLocator): boolean; override;
+    function endExtDtd(const sender: TXmlCustomReader;
+                       const locator: TdomLocator): boolean; override;
+    function endIntDtd(const sender: TXmlCustomReader;
+                       const locator: TdomLocator): boolean; override;
+    function entityDeclaration(const sender: TXmlCustomReader;
+                               const locator: TdomLocator;
+                                     aname,
+                                     literalValue,
+                                     pubId,
+                                     sysId,
+                                     notaName: UnicodeString): boolean; override;
+    function notationDeclaration(const sender: TXmlCustomReader;
+                                 const locator: TdomLocator;
+                                       aname,
+                                       pubId,
+                                       sysId: UnicodeString): boolean; override;
+    function parameterEntityRef(const sender: TXmlCustomReader;
+                                const locator: TdomLocator;
+                                      aname: UnicodeString): boolean; override;
+    function startAttListDeclaration(const sender: TXmlCustomReader;
+                                     const locator: TdomLocator;
+                                           aname: UnicodeString): boolean; override;
+    function startExtDtd(const sender: TXmlCustomReader;
+                         const locator: TdomLocator;
+                               version,
+                               encName: UnicodeString): boolean; override;
+    function startIntDtd(const sender: TXmlCustomReader;
+                         const locator: TdomLocator): boolean; override;
+    function resolvePE(    PEReferenceName: UnicodeString;
+                       var PEValue: UnicodeString;
+                       var error: TXmlErrorType): boolean; override;
+    procedure notifyReset; override;
+    property contentModel: TdomCMObject read getContentModel write setContentModel;
+    property isActive: boolean read FIsActive;
+  end;
+
+  TXmlStreamBuilder = class(TXmlStandardHandler)
+  private
+    FCurrentEncodingType: TdomEncodingType;
+    FDefaultEncoding: UnicodeString;
+    FDefaultEncodingType: TdomEncodingType;
+    FDestination: TStream;
+    FNewLine: TdomNewLineType;
+    procedure setDefaultEncoding(const value: UnicodeString);
+    procedure setDestination(const value: TStream);
+    procedure setNewLine(const value: TdomNewLineType);
+  protected
+    function writeWideString(const sender: TXmlCustomReader;
+                             const locator: TdomLocator;
+                             const xmlStrg: UnicodeString): boolean; virtual;
+    function writeWideStrings(const sender: TXmlCustomReader;
+                              const locator: TdomLocator;
+                              const xmlStrgs: array of UnicodeString): boolean; virtual;
+  public
+    constructor create(aOwner: TComponent); override;
+    function CDATA(const sender: TXmlCustomReader;
+                   const locator: TdomLocator;
+                         data: UnicodeString): boolean; override;
+    function charRef(const sender: TXmlCustomReader;
+                     const locator: TdomLocator;
+                           data: UnicodeString): boolean; override;
+    function comment(const sender: TXmlCustomReader;
+                     const locator: TdomLocator;
+                           data: UnicodeString): boolean; override;
+    function doctype(const sender: TXmlCustomReader;
+                     const locator: TdomLocator;
+                           aname,
+                           pubId,
+                           sysId,
+                           data: UnicodeString): boolean; override;
+    function endDocument(const sender: TXmlCustomReader;
+                         const locator: TdomLocator): boolean; override;
+    function endElement(const sender: TXmlCustomReader;
+                        const locator: TdomLocator;
+                              namespaceURI,
+                              tagName: UnicodeString): boolean; override;
+    function endPrefixMapping(const sender: TXmlCustomReader;
+                              const locator: TdomLocator;
+                                    prefix: UnicodeString): boolean; override;
+    function entityRef(const sender: TXmlCustomReader;
+                       const locator: TdomLocator;
+                             aname: UnicodeString): boolean; override;
+    function PCDATA(const sender: TXmlCustomReader;
+                    const locator: TdomLocator;
+                          data: UnicodeString): boolean; override;
+    function processingInstruction(const sender: TXmlCustomReader;
+                                   const locator: TdomLocator;
+                                         targ,
+                                         data : UnicodeString): boolean; override;
+    function skippedEntity(const sender: TXmlCustomReader;
+                           const locator: TdomLocator;
+                                 aname: UnicodeString): boolean; override;
+    function startDocument(const sender: TXmlCustomReader;
+                           const locator: TdomLocator;
+                                 version,
+                                 encName: UnicodeString;
+                                 sdDl: TdomStandalone): boolean; override;
+    function startElement(const sender: TXmlCustomReader;
+                          const locator: TdomLocator;
+                                namespaceURI,
+                                tagName: UnicodeString;
+                                attributes: TdomNameValueList): boolean; override;
+    function startPrefixMapping(const sender: TXmlCustomReader;
+                                const locator: TdomLocator;
+                                      prefix,
+                                      uri: UnicodeString): boolean; override;
+    function attributeDefinition(const sender: TXmlCustomReader;
+                                 const locator: TdomLocator;
+                                       aname,
+                                       attType,
+                                       bracket,
+                                       defaultDecl,
+                                       attValue: UnicodeString): boolean; override;
+    function conditionalSection(const sender: TXmlCustomReader;
+                                const locator: TdomLocator;
+                                      includeStmt,
+                                      data: UnicodeString): boolean; override;
+    function DTDcomment(const sender: TXmlCustomReader;
+                        const locator: TdomLocator;
+                              data: UnicodeString): boolean; override;
+    function DTDprocessingInstruction(const sender: TXmlCustomReader;
+                                      const locator: TdomLocator;
+                                            targ,
+                                            data : UnicodeString): boolean; override;
+    function elementTypeDeclaration(const sender: TXmlCustomReader;
+                                    const locator: TdomLocator;
+                                          aname,
+                                          data: UnicodeString): boolean; override;
+    function endAttListDeclaration(const sender: TXmlCustomReader;
+                                   const locator: TdomLocator): boolean; override;
+    function endExtDtd(const sender: TXmlCustomReader;
+                       const locator: TdomLocator): boolean; override;
+    function endIntDtd(const sender: TXmlCustomReader;
+                       const locator: TdomLocator): boolean; override;
+    function entityDeclaration(const sender: TXmlCustomReader;
+                               const locator: TdomLocator;
+                                     aname,
+                                     entityValue,
+                                     pubId,
+                                     sysId,
+                                     notaName: UnicodeString): boolean; override;
+    function notationDeclaration(const sender: TXmlCustomReader;
+                                 const locator: TdomLocator;
+                                       aname,
+                                       pubId,
+                                       sysId: UnicodeString): boolean; override;
+    function parameterEntityDeclaration(const sender: TXmlCustomReader;
+                                        const locator: TdomLocator;
+                                              aname,
+                                              entityValue,
+                                              pubId,
+                                              sysId: UnicodeString): boolean; override;
+    function parameterEntityRef(const sender: TXmlCustomReader;
+                                const locator: TdomLocator;
+                                      aname: UnicodeString): boolean; override;
+    function startAttListDeclaration(const sender: TXmlCustomReader;
+                                     const locator: TdomLocator;
+                                           aname: UnicodeString): boolean; override;
+    function startExtDtd(const sender: TXmlCustomReader;
+                         const locator: TdomLocator;
+                               version,
+                               encName: UnicodeString): boolean; override;
+    function startIntDtd(const sender: TXmlCustomReader;
+                         const locator: TdomLocator): boolean; override;
+    function resolvePE(    PEReferenceName: UnicodeString;
+                       var PEValue: UnicodeString;
+                       var error: TXmlErrorType): boolean; override;
+    procedure notifyReset; override;
+    property currentEncodingType: TdomEncodingType read FCurrentEncodingType;
+    property defaultEncoding: UnicodeString read FDefaultEncoding write SetDefaultEncoding;
+    property defaultEncodingType: TdomEncodingType read FDefaultEncodingType;
+    property destination: TStream read FDestination write setDestination;
+  published
+    property newLine: TdomNewLineType read FNewLine write setNewLine default nltCRLF;
+  end;
+
+  TXmlStandardDocReader = class (TXmlCustomReader)
+  protected
+    FPrefixMapping: boolean;
+    FPrefixMappingStack: TList;
+    FSuppressXmlns: boolean;
+    function analyzeElement(const locator: TdomLocator;
+                            const source: UnicodeString;
+                              out tagName: UnicodeString;
+                            const attributes: TdomNameValueList): boolean; virtual;
+    procedure clearPrefixMappingStack; virtual;
+    function writeProcessingInstruction(const locator: TdomLocator;
+                                        const content: UnicodeString): boolean; virtual;
+    function writeComment(const locator: TdomLocator;
+                          const content: UnicodeString): boolean; virtual;
+    function writeCDATA(const locator: TdomLocator;
+                        const content: UnicodeString): boolean; virtual;
+    function writePCDATA(const locator: TdomLocator;
+                         const content: UnicodeString): boolean; virtual;
+    function writeStartDocument(const locator: TdomLocator;
+                                      version,
+                                      encName: UnicodeString;
+                                      sdDl: TdomStandalone): boolean; virtual;
+    function writeStartElement(const locator: TdomLocator;
+                               const content: UnicodeString;
+                                 out tagName: UnicodeString): boolean; virtual;
+    function writeStartPrefixMapping(const locator: TdomLocator;
+                                           prefix,
+                                           uri: UnicodeString): boolean; virtual;
+    function writeEndDocument(const locator: TdomLocator): boolean; virtual;
+    function writeEndElement(const locator: TdomLocator;
+                             const content: UnicodeString): boolean; virtual;
+    function writeEndPrefixMapping(const locator: TdomLocator;
+                                         prefix: UnicodeString): boolean; virtual;
+    function writeEmptyElement(const locator: TdomLocator;
+                               const content: UnicodeString): boolean; virtual;
+    function writeCharRef(const locator: TdomLocator;
+                          const content: UnicodeString): boolean; virtual;
+    function writeEntityRef(const locator: TdomLocator;
+                            const content: UnicodeString): boolean; virtual;
+    function writeDoctype(const locator: TdomLocator;
+                          const content: UnicodeString): boolean; virtual;
+  public
+    constructor create(AOwner: TComponent); override;
+    destructor destroy; override;
+    function  parse(const inputSource: TXmlInputSource):boolean; virtual;
+  published
+    property PrefixMapping: boolean read FPrefixMapping write FPrefixMapping;
+    property SuppressXmlns: boolean read FSuppressXmlns write FSuppressXmlns;
+  end;
+
+  TXmlStandardDtdReader = class (TXmlCustomReader)
+  private
+    function findNextAttDef(const Decl: UnicodeString;
+                              var aname,
+                                  attType,
+                                  Bracket,
+                                  defaultDecl,
+                                  attValue,
+                                  Rest: UnicodeString): boolean;
+  protected
+    function includeAsPE(const inputSource: TXmlInputSource;
+                           var s: UnicodeString): boolean; virtual;
+    function includeInLiteral(const inputSource: TXmlInputSource;
+                                var s: UnicodeString): boolean; virtual;
+    function writeConditionalSection(const locator: TdomLocator;
+                                     const content: UnicodeString): boolean; virtual;
+    function writeDTDProcessingInstruction(const locator: TdomLocator;
+                                           const content: UnicodeString): boolean; virtual;
+    function writeDTDComment(const locator: TdomLocator;
+                             const content: UnicodeString): boolean; virtual;
+    function writeParameterEntityRef(const locator: TdomLocator;
+                                     const content: UnicodeString): boolean; virtual;
+    function writeEntityDeclaration(const locator: TdomLocator;
+                                    const content: UnicodeString): boolean; virtual;
+    function writeElementDeclaration(const locator: TdomLocator;
+                                     const content: UnicodeString): boolean; virtual;
+    function writeAttributeDeclaration(const locator: TdomLocator;
+                                       const content: UnicodeString): boolean; virtual;
+    function writeNotationDeclaration(const locator: TdomLocator;
+                                      const content: UnicodeString): boolean; virtual;
+    function writeStartExtDtd(const locator: TdomLocator;
+                                    version,
+                                    encName: UnicodeString): boolean; virtual;
+    function writeStartIntDtd(const locator: TdomLocator): boolean; virtual;
+  public
+    function  parseExternalSubset(const inputSource: TXmlInputSource):boolean; virtual;
+    function  parseInternalSubset(const inputSource: TXmlInputSource):boolean; virtual;
+  end;
+
+  TXmlCustomDomReader = class (TXmlCustomReader)
+  protected
+    FPrefixMapping: boolean;
+    FSuppressXmlns: boolean;
+    function parseloop(const sourceNode: TdomNode): boolean; virtual;
+    function writeCDATA(const locator: TdomLocator;
+                        const content: UnicodeString): boolean; virtual;
+    function writeCharRef(const locator: TdomLocator;
+                          const content: UnicodeString): boolean; virtual;
+    function writeComment(const locator: TdomLocator;
+                          const content: UnicodeString): boolean; virtual;
+    function writeDoctype(const locator: TdomLocator;
+                          const aname,
+                                publicId,
+                                systemId,
+                                intSubset: UnicodeString): boolean; virtual;
+    function writeEmptyElement(const locator: TdomLocator;
+                               const tagName: UnicodeString;
+                               const attributeList: TdomNameValueList): boolean; virtual;
+    function writeEndDocument(const locator: TdomLocator): boolean; virtual;
+    function writeEndElement(const locator: TdomLocator;
+                             const tagName: UnicodeString): boolean; virtual;
+    function writeEndPrefixMapping(const locator: TdomLocator;
+                                         prefix: UnicodeString): boolean; virtual;
+    function writeEntityRef(const locator: TdomLocator;
+                            const entityName: UnicodeString): boolean; virtual;
+    function writePCDATA(const locator: TdomLocator;
+                         const content: UnicodeString): boolean; virtual;
+    function writeProcessingInstruction(const locator: TdomLocator;
+                                        const targ,
+                                              attribSequence : UnicodeString): boolean; virtual;
+    function writeStartDocument(const locator: TdomLocator;
+                                      version,
+                                      encName: UnicodeString;
+                                      sdDl: TdomStandalone): boolean; virtual;
+    function writeStartElement(const locator: TdomLocator;
+                               const tagName: UnicodeString;
+                               const attributeList: TdomNameValueList): boolean; virtual;
+    function writeStartPrefixMapping(const locator: TdomLocator;
+                                           prefix,
+                                           uri: UnicodeString): boolean; virtual;
+    property PrefixMapping: boolean read FPrefixMapping write FPrefixMapping;
+    property SuppressXmlns: boolean read FSuppressXmlns write FSuppressXmlns;
+  public
+    constructor create(AOwner: TComponent); override;
+  end;
+
+  TXmlStandardDomReader = class (TXmlCustomDomReader)
+  public
+    function  parse(const sourceNode: TdomNode): boolean; virtual;
+  published
+   property PrefixMapping;
+   property SuppressXmlns;
+  end;
+
+  TXmlStandardCMReader = class (TXmlCustomReader)
+  protected
+    function writeAttributeDefinition(const locator: TdomLocator;
+                                            aname,
+                                            attType,
+                                            bracket,
+                                            defaultDecl,
+                                            attValue: UnicodeString): boolean; virtual;
+    function writeDTDComment(const locator: TdomLocator;
+                                   content: UnicodeString): boolean; virtual;
+    function writeDTDProcessingInstruction(const locator: TdomLocator;
+                                                 targ,
+                                                 attribSequence : UnicodeString): boolean; virtual;
+    function writeElementTypeDeclaration(const locator: TdomLocator;
+                                               aname,
+                                               data: UnicodeString): boolean; virtual;
+    function writeEndAttListDeclaration(const locator: TdomLocator): boolean; virtual;
+    function writeEndExtDtd(const locator: TdomLocator): boolean; virtual;
+    function writeEndIntDtd(const locator: TdomLocator): boolean; virtual;
+    function writeEntityDeclaration(const locator: TdomLocator;
+                                          aname,
+                                          entityValue,
+                                          pubId,
+                                          sysId,
+                                          notaName: UnicodeString): boolean; virtual;
+    function writeNotationDeclaration(const locator: TdomLocator;
+                                            aname,
+                                            pubId,
+                                            sysId: UnicodeString): boolean; virtual;
+    function writeParameterEntityRef(const locator: TdomLocator;
+                                           content: UnicodeString): boolean; virtual;
+    function writeStartAttListDeclaration(const locator: TdomLocator;
+                                                aname: UnicodeString): boolean; virtual;
+    function writeStartExtDtd(const locator: TdomLocator;
+                                    version,
+                                    encName: UnicodeString): boolean; virtual;
+    function writeStartIntDtd(const locator: TdomLocator): boolean; virtual;
+    function parseloop(const sourceCMNode: TdomCMNode): boolean; virtual;
+  public
+    function  parse(const sourceCMNode: TdomCMNode): boolean; virtual;
+  end;
+
+  TXmlCustomParser = class (TComponent)
+  private
+    FDOMImpl: TDomImplementation;
+  protected
+    procedure setDomImpl(const impl: TDomImplementation); virtual;
+    procedure Notification(AComponent: TComponent; Operation: TOperation); override;
+  published
+    constructor create(aOwner: TComponent); override;
+    property DOMImpl: TDomImplementation read FDOMImpl write setDomImpl;
+  end;
+
+  TXmlCMAnalyzer = class (TXmlCustomParser)
+  protected
+    FCMReader: TXmlStandardCMReader;
+    FCMBuilder: TXmlCMBuilder;  // xxx will be replaced by TXmlASBuilder in the future.
+    FDtdReader: TXmlStandardDtdReader;
+    procedure setDomImpl(const impl: TDomImplementation); override;
+  public
+    constructor create(aOwner: TComponent); override;
+    destructor destroy; override;
+    function analyzeCM(const source: TdomCustomCMIEObject;
+                       const target: TdomCMObject): boolean; virtual;
+    procedure analyzeIntDTDStr(      str: UnicodeString;
+                               const target: TdomCMObject); virtual;
+  end;
+
+  TXmlToDomParser = class (TXmlCustomParser)
+  protected
+    FDtdBuilder: TXmlDtdBuilder;
+    FDtdReader:  TXmlStandardDtdReader;
+    FDocBuilder: TXmlDocBuilder;
+    FDocReader:  TXmlStandardDocReader;
+    FTabWidth: integer;
+    FWFTestContentHandler: TXmlWFTestContentHandler;
+    FWFTestDtdHandler: TXmlWFTestDtdHandler;
+    procedure doExternalSubset(const parentSystemId: UnicodeString;
+                                 var publicId,
+                                     systemId: UnicodeString;
+                                 var stream: TStream;
+                                 var action: TXmlParserAction); virtual;
+    function processDocFile(const pubId,
+                                  sysId: UnicodeString): boolean; virtual;
+    function processDocSourceCode(const intDtdSourceCode: TXmlSourceCode;
+                                  const pubId,
+                                        sysId: UnicodeString): boolean; virtual;
+    function processDocStream(const stream: TStream;
+                              const pubId,
+                                    sysId: UnicodeString): boolean; virtual;
+    function processDocString(const str: ansiString;
+                              const pubId,
+                                    sysId: UnicodeString): boolean; virtual;
+    function processDocWideString(str: UnicodeString;
+                                  const pubId,
+                                        sysId: UnicodeString): boolean; virtual;
+    function processDtd(const doc: TdomDocument): boolean; virtual;
+    function processExtDtdFile(const pubId,
+                                     sysId: UnicodeString): boolean; virtual;
+    function processExtDtdSourceCode(const intDtdSourceCode: TXmlSourceCode;
+                                     const pubId,
+                                           sysId: UnicodeString): boolean; virtual;
+    function processExtDtdStream(const stream: TStream;
+                                 const pubId,
+                                       sysId: UnicodeString): boolean; virtual;
+    function processExtDtdString(const str: AnsiString;
+                                 const pubId,
+                                       sysId: UnicodeString): boolean; virtual;
+    function processExtDtdWideString(str: UnicodeString;
+                                     const pubId,
+                                           sysId: UnicodeString): boolean; virtual;
+    function processIntDtdFile(const pubId,
+                                     sysId: UnicodeString): boolean; virtual;
+    function processIntDtdSourceCode(const intDtdSourceCode: TXmlSourceCode;
+                                     const pubId,
+                                           sysId: UnicodeString): boolean; virtual;
+    function processIntDtdStream(const stream: TStream;
+                                 const pubId,
+                                       sysId: UnicodeString): boolean; virtual;
+    function processIntDtdString(const str: AnsiString;
+                                 const pubId,
+                                       sysId: UnicodeString): boolean; virtual;
+    function processIntDtdWideString(str: UnicodeString;
+                                     const pubId,
+                                           sysId: UnicodeString): boolean; virtual;
+    function sendErrorNotification(const xmlErrorType: TXmlErrorType): boolean; virtual;
+    procedure setDomImpl(const impl: TDomImplementation); override;
+    procedure setTabWidth(const value: integer); virtual;
+  public
+    constructor create(aOwner: TComponent); override;
+    procedure docSourceCodeToDom(const docSourceCode: TXmlSourceCode;
+                                 const pubId,
+                                       sysId: UnicodeString;
+                                 const refNode: TdomNode); virtual;
+    procedure docStreamToDom(const stream: TStream;
+                             const pubId,
+                                   sysId: UnicodeString;
+                             const refNode: TdomNode); virtual;
+    procedure docStringToDom(const Str: Ansistring;
+                             const pubId,
+                                   sysId: UnicodeString;
+                             const refNode: TdomNode); virtual;
+    procedure docWideStringToDom(      str: UnicodeString;
+                                 const pubId,
+                                       sysId: UnicodeString;
+                                 const refNode: TdomNode); virtual;
+    procedure extDtdSourceCodeToDom(const ExtDtdSourceCode: TXmlSourceCode;
+                                    const pubId,
+                                          sysId: UnicodeString;
+                                    const refNode: TdomCMNode); virtual;
+    procedure extDtdStreamToDom(const stream: TStream;
+                                const pubId,
+                                      sysId: UnicodeString;
+                                const refNode: TdomCMNode); virtual;
+    procedure extDtdStringToDom(const str: Ansistring;
+                                const pubId,
+                                      sysId: UnicodeString;
+                                const refNode: TdomCMNode); virtual;
+    procedure extDtdWideStringToDom(      str: UnicodeString;
+                                    const pubId,
+                                          sysId: UnicodeString;
+                                    const refNode: TdomCMNode); virtual;
+    procedure intDtdSourceCodeToDom(const IntDtdSourceCode: TXmlSourceCode;
+                                    const pubId,
+                                          sysId: UnicodeString;
+                                    const refNode: TdomCMNode); virtual;
+    procedure intDtdStreamToDom(const stream: TStream;
+                                const pubId,
+                                      sysId: UnicodeString;
+                                const refNode: TdomCMNode); virtual;
+    procedure intDtdStringToDom(const str: Ansistring;
+                                const pubId,
+                                      sysId: UnicodeString;
+                                const refNode: TdomCMNode); virtual;
+    procedure intDtdWideStringToDom(      str: UnicodeString;
+                                    const pubId,
+                                          sysId: UnicodeString;
+                                    const refNode: TdomCMNode); virtual;
+    function fileToDom(const filename: TFileName): TdomDocument; virtual;
+    function sourceCodeToDom(const sc: TXmlSourceCode): TdomDocument; virtual;
+    function streamToDom(const stream: TStream): TdomDocument; virtual;
+    function stringToDom(const str: AnsiString): TdomDocument; virtual;
+    function wideStringToDom(str: UnicodeString): TdomDocument; virtual;
+  published
+    property TabWidth: integer read FTabWidth write setTabWidth default 1;
+  end;
+
+  TDomToXmlParser = class (TXmlCustomParser)
+  protected
+    FStreamBuilder: TXmlStreamBuilder;
+    FDomReader:  TXmlStandardDomReader;
+    function getNewLine: TdomNewLineType; virtual;
+    procedure setNewLine(const value: TdomNewLineType); virtual;
+  public
+    constructor create(aOwner: TComponent); override;
+    function writeToStream(const wnode: TdomNode;
+                           const encoding: UnicodeString;
+                           const destination: TStream): boolean; virtual;
+    function writeToString(const wnode: TdomNode;
+                           const encoding: UnicodeString;
+                             out S: Ansistring): boolean; virtual;
+    function writeToWideString(const wnode: TdomNode;
+                                 out S: UnicodeString): boolean; virtual;
+  published
+    property newLine: TdomNewLineType read getNewLine write setNewLine;
+  end;
+
+  TCMToXmlParser = class (TXmlCustomParser)
+  protected
+    FStreamBuilder: TXmlStreamBuilder;
+    FCMReader:  TXmlStandardCMReader;
+    function getNewLine: TdomNewLineType; virtual;
+    procedure setNewLine(const value: TdomNewLineType); virtual;
+  public
+    constructor create(aOwner: TComponent); override;
+    function writeToStream(const wnode: TdomCMNode;
+                           const encoding: UnicodeString;
+                           const destination: TStream): boolean; virtual;
+    function writeToString(const wnode: TdomCMNode;
+                           const encoding: UnicodeString;
+                             out S: Ansistring): boolean; virtual;
+    function writeToWideString(const wnode: TdomCMNode;
+                                 out S: UnicodeString): boolean; virtual;
+  published
+    property newLine: TdomNewLineType read getNewLine write setNewLine;
+  end;
+
+{DOM XPath}
+  TdomXPathTokenType = ( XPATH_LEFT_PARENTHESIS_TOKEN,
+                         XPATH_RIGHT_PARENTHESIS_TOKEN,
+                         XPATH_LEFT_SQUARE_BRACKET_TOKEN,
+                         XPATH_RIGHT_SQUARE_BRACKET_TOKEN,
+                         XPATH_SINGLE_DOT_TOKEN,
+                         XPATH_DOUBLE_DOT_TOKEN,
+                         XPATH_COMMERCIAL_AT_TOKEN,
+                         XPATH_COMMA_TOKEN,
+                         XPATH_DOUBLE_COLON_TOKEN,
+                         XPATH_NAME_TEST_TOKEN,
+                         XPATH_NODE_TYPE_COMMENT_TOKEN,
+                         XPATH_NODE_TYPE_TEXT_TOKEN,
+                         XPATH_NODE_TYPE_PI_TOKEN,
+                         XPATH_NODE_TYPE_NODE_TOKEN,
+                         XPATH_AND_OPERATOR_TOKEN,
+                         XPATH_OR_OPERATOR_TOKEN,
+                         XPATH_MOD_OPERATOR_TOKEN,
+                         XPATH_DIV_OPERATOR_TOKEN,
+                         XPATH_MULTIPLY_OPERATOR_TOKEN,
+                         XPATH_SLASH_OPERATOR_TOKEN,
+                         XPATH_SHEFFER_STROKE_OPERATOR_TOKEN,
+                         XPATH_PLUS_OPERATOR_TOKEN,
+                         XPATH_MINUS_OPERATOR_TOKEN,
+                         XPATH_IS_EQUAL_OPERATOR_TOKEN,
+                         XPATH_IS_NOT_EQUAL_OPERATOR_TOKEN,
+                         XPATH_LESS_THAN_OPERATOR_TOKEN,
+                         XPATH_LESS_THAN_OR_EQUAL_OPERATOR_TOKEN,
+                         XPATH_GREATER_THAN_OPERATOR_TOKEN,
+                         XPATH_GREATER_THAN_OR_EQUAL_OPERATOR_TOKEN,
+                         XPATH_FUNCTION_NAME_TOKEN,
+                         XPATH_AXIS_NAME_ANCESTOR_TOKEN,
+                         XPATH_AXIS_NAME_ANCESTOR_OR_SELF_TOKEN,
+                         XPATH_AXIS_NAME_ATTRIBUTE_TOKEN,
+                         XPATH_AXIS_NAME_CHILD_TOKEN,
+                         XPATH_AXIS_NAME_DESCENDANT_TOKEN,
+                         XPATH_AXIS_NAME_DESCENDANT_OR_SELF_TOKEN,
+                         XPATH_AXIS_NAME_FOLLOWING_TOKEN,
+                         XPATH_AXIS_NAME_FOLLOWING_SIBLING_TOKEN,
+                         XPATH_AXIS_NAME_NAMESPACE_TOKEN,
+                         XPATH_AXIS_NAME_PARENT_TOKEN,
+                         XPATH_AXIS_NAME_PRECEDING_TOKEN,
+                         XPATH_AXIS_NAME_PRECEDING_SIBLING_TOKEN,
+                         XPATH_AXIS_NAME_SELF_TOKEN,
+                         XPATH_LITERAL_TOKEN,
+                         XPATH_NUMBER_TOKEN,
+                         XPATH_VARIABLE_REFERENCE_TOKEN,
+                         XPATH_END_OF_TEXT_TOKEN,
+                         XPATH_INVALID_TOKEN
+                       );
+
+  TdomXPathAxisType = ( XPATH_FORWARD_AXIS, XPATH_REVERSE_AXIS );
+
+  TdomXPathSyntaxNode = class;
+
+  TdomXPathSyntaxNodeStack = class
+  private
+    FNodeList: TList;
+  protected
+    function getLength: integer; virtual;
+  public
+    constructor create; virtual;
+    destructor destroy; override;
+    procedure clear; virtual;
+    function peek(offset: integer): TdomXPathSyntaxNode; virtual;
+    function pop: TdomXPathSyntaxNode; virtual;
+    function push(node: TdomXPathSyntaxNode): TdomXPathSyntaxNode; virtual;
+    property length: integer read getLength;
+  end;
+
+  TdomXPathSyntaxNode = class
+  protected
+    FLeft: TdomXPathSyntaxNode;
+    FRight: TdomXPathSyntaxNode;
+    FValue: UnicodeString;
+  public
+    constructor create(const value: UnicodeString); virtual;
+    destructor destroy; override;
+    function evaluate(const contextNode: TdomNode;
+                      const oldResult: TdomXPathResult;
+                      const resolver: TdomXPathNSResolver): TdomXPathResult; virtual;
+    property left: TdomXPathSyntaxNode read FLeft write FLeft;
+    property right: TdomXPathSyntaxNode read FRight write FRight;
+    property value: UnicodeString read FValue;
+  end;
+
+  // Cf. XPath 1.0, prod. [2].
+  TdomXPathAbsoluteLocationPath = class(TdomXPathSyntaxNode)
+  end;
+
+  // Cf. XPath 1.0, prod. [4].
+  TdomXPathStep = class(TdomXPathSyntaxNode)
+  public
+    function addStep(const step: TdomXPathStep): boolean; virtual;
+    function evaluate(const contextNode: TdomNode;
+                      const oldResult: TdomXPathResult;
+                      const resolver: TdomXPathNSResolver): TdomXPathResult; override;
+    function evaluate2(const oldSnapshotResult: TdomXPathSnapshotResult;
+                       const resolver: TdomXPathNSResolver): TdomXPathSnapshotResult; virtual;
+  end;
+
+  // Cf. XPath 1.0, prod. [6].
+  // This class is only used as a common ancestor of the axis name classes below.
+  TdomXPathCustomAxisName = class(TdomXPathSyntaxNode)
+  protected
+    FAxisType: TdomXPathAxisType;
+    FPrincipalNodeType: TdomNodeType;
+    function getAxisNodeSnapshot(const contextNode: TdomNode): TdomXPathSnapshotResult; virtual; abstract;
+  public
+    constructor create(const avalue: UnicodeString); override;
+    function evaluate(const contextNode: TdomNode;
+                      const oldResult: TdomXPathResult;
+                      const resolver: TdomXPathNSResolver): TdomXPathResult; override;
+    function evaluate2(const oldSnapshotResult: TdomXPathSnapshotResult;
+                       const resolver: TdomXPathNSResolver): TdomXPathSnapshotResult; virtual;
+    property axisType: TdomXPathAxisType read FAxisType;
+  end;
+
+  // Cf. XPath 1.0, prod. [6].
+  TdomXPathAxisNameAncestor = class(TdomXPathCustomAxisName)
+  protected
+    function getAxisNodeSnapshot(const contextNode: TdomNode): TdomXPathSnapshotResult; override;
+  public
+    constructor create(const avalue: UnicodeString); override;
+  end;
+
+  // Cf. XPath 1.0, prod. [6].
+  TdomXPathAxisNameAncestorOrSelf = class(TdomXPathCustomAxisName)
+  protected
+    function getAxisNodeSnapshot(const contextNode: TdomNode): TdomXPathSnapshotResult; override;
+  public
+    constructor create(const avalue: UnicodeString); override;
+  end;
+
+  // Cf. XPath 1.0, prod. [6].
+  TdomXPathAxisNameAttribute = class(TdomXPathCustomAxisName)
+  protected
+    function getAxisNodeSnapshot(const contextNode: TdomNode): TdomXPathSnapshotResult; override;
+  public
+    constructor create(const avalue: UnicodeString); override;
+  end;
+
+  // Cf. XPath 1.0, prod. [6].
+  TdomXPathAxisNameChild = class(TdomXPathCustomAxisName)
+  protected
+    function getAxisNodeSnapshot(const contextNode: TdomNode): TdomXPathSnapshotResult; override;
+  end;
+
+  // Cf. XPath 1.0, prod. [6].
+  TdomXPathAxisNameDescendant = class(TdomXPathCustomAxisName)
+  protected
+    function getAxisNodeSnapshot(const contextNode: TdomNode): TdomXPathSnapshotResult; override;
+  end;
+
+  // Cf. XPath 1.0, prod. [6].
+  TdomXPathAxisNameDescendantOrSelf = class(TdomXPathCustomAxisName)
+  protected
+    function getAxisNodeSnapshot(const contextNode: TdomNode): TdomXPathSnapshotResult; override;
+  end;
+
+  // Cf. XPath 1.0, prod. [6].
+  TdomXPathAxisNameFollowing = class(TdomXPathCustomAxisName)
+  protected
+    function getAxisNodeSnapshot(const contextNode: TdomNode): TdomXPathSnapshotResult; override;
+  end;
+
+  // Cf. XPath 1.0, prod. [6].
+  TdomXPathAxisNameFollowingSibling = class(TdomXPathCustomAxisName)
+  protected
+    function getAxisNodeSnapshot(const contextNode: TdomNode): TdomXPathSnapshotResult; override;
+  end;
+
+  // Cf. XPath 1.0, prod. [6].
+  TdomXPathAxisNameNamespace = class(TdomXPathCustomAxisName)
+  protected
+    function getAxisNodeSnapshot(const contextNode: TdomNode): TdomXPathSnapshotResult; override;
+  public
+    constructor create(const avalue: UnicodeString); override;
+  end;
+
+  // Cf. XPath 1.0, prod. [6].
+  TdomXPathAxisNameParent = class(TdomXPathCustomAxisName)
+  protected
+    function getAxisNodeSnapshot(const contextNode: TdomNode): TdomXPathSnapshotResult; override;
+  end;
+
+  // Cf. XPath 1.0, prod. [6].
+  TdomXPathAxisNamePreceding = class(TdomXPathCustomAxisName)
+  protected
+    function getAxisNodeSnapshot(const contextNode: TdomNode): TdomXPathSnapshotResult; override;
+  public
+    constructor create(const avalue: UnicodeString); override;
+  end;
+
+  // Cf. XPath 1.0, prod. [6].
+  TdomXPathAxisNamePrecedingSibling = class(TdomXPathCustomAxisName)
+  protected
+    function getAxisNodeSnapshot(const contextNode: TdomNode): TdomXPathSnapshotResult; override;
+  public
+    constructor create(const avalue: UnicodeString); override;
+  end;
+
+  // Cf. XPath 1.0, prod. [6].
+  TdomXPathAxisNameSelf = class(TdomXPathCustomAxisName)
+  protected
+    function getAxisNodeSnapshot(const contextNode: TdomNode): TdomXPathSnapshotResult; override;
+  end;
+
+  // Cf. XPath 1.0, prod. [7].
+  TdomXPathNodeTest = class(TdomXPathSyntaxNode)
+  public
+    function evaluate(const contextNode: TdomNode;
+                      const oldResult: TdomXPathResult;
+                      const resolver: TdomXPathNSResolver): TdomXPathResult; override;
+    function evaluate2(const oldsnapshotResult: TdomXPathSnapshotResult;
+                       const principalNodeType: TdomNodeType;
+                       const resolver: TdomXPathNSResolver): TdomXPathSnapshotResult; virtual;
+  end;
+
+  // Cf. XPath 1.0, prod. [8].
+  TdomXPathPredicate = class(TdomXPathSyntaxNode)
+  public
+    function evaluate(const contextNode: TdomNode;
+                      const oldResult: TdomXPathResult;
+                      const resolver: TdomXPathNSResolver): TdomXPathResult; override;
+    function evaluate2(const oldSnapshotResult: TdomXPathSnapshotResult;
+                       const resolver: TdomXPathNSResolver): TdomXPathSnapshotResult; virtual;
+  end;
+
+  // Cf. XPath 1.0, prod. [14].
+  TdomXPathExpr = class(TdomXPathSyntaxNode)
+  end;
+
+  // Cf. XPath 1.0, prod. [15].
+  TdomXPathPrimaryExpr = class(TdomXPathSyntaxNode)
+  end;
+
+  // Cf. XPath 1.0, prod. [16].
+  TdomXPathFunctionCall = class(TdomXPathSyntaxNode)
+  public
+    function evaluate(const contextNode: TdomNode;
+                      const oldResult: TdomXPathResult;
+                      const resolver: TdomXPathNSResolver): TdomXPathResult; override;
+  end;
+
+  // Cf. XPath 1.0, prod. [17].
+  TdomXPathArgument = class(TdomXPathSyntaxNode)
+  end;
+
+  // Cf. XPath 1.0, prod. [18].
+  TdomXPathUnionExpr = class(TdomXPathSyntaxNode)
+  public
+    function evaluate(const contextNode: TdomNode;
+                      const oldResult: TdomXPathResult;
+                      const resolver: TdomXPathNSResolver): TdomXPathResult; override;
+  end;
+
+  // Cf. XPath 1.0, prod. [19].
+  TdomXPathPathExpr = class(TdomXPathSyntaxNode)
+  public
+    function addStep(const step: TdomXPathStep): boolean; virtual;
+    function evaluate(const contextNode: TdomNode;
+                      const oldResult: TdomXPathResult;
+                      const resolver: TdomXPathNSResolver): TdomXPathResult; override;
+  end;
+
+  // Cf. XPath 1.0, prod. [20].
+  TdomXPathFilterExpr = class(TdomXPathSyntaxNode)
+  public
+    function evaluate(const contextNode: TdomNode;
+                      const oldResult: TdomXPathResult;
+                      const resolver: TdomXPathNSResolver): TdomXPathResult; override;
+  end;
+
+  // Cf. XPath 1.0, prod. [21].
+  TdomXPathOrExpr = class(TdomXPathSyntaxNode)
+  public
+    function evaluate(const contextNode: TdomNode;
+                      const oldResult: TdomXPathResult;
+                      const resolver: TdomXPathNSResolver): TdomXPathResult; override;
+  end;
+
+  // Cf. XPath 1.0, prod. [22].
+  TdomXPathAndExpr = class(TdomXPathSyntaxNode)
+  public
+    function evaluate(const contextNode: TdomNode;
+                      const oldResult: TdomXPathResult;
+                      const resolver: TdomXPathNSResolver): TdomXPathResult; override;
+  end;
+
+  // Cf. XPath 1.0, prod. [23].
+  TdomXPathIsEqualExpr = class(TdomXPathSyntaxNode)
+    function evaluate(const contextNode: TdomNode;
+                      const oldResult: TdomXPathResult;
+                      const resolver: TdomXPathNSResolver): TdomXPathResult; override;
+  end;
+
+  // Cf. XPath 1.0, prod. [23].
+  TdomXPathIsNotEqualExpr = class(TdomXPathSyntaxNode)
+  public
+    function evaluate(const contextNode: TdomNode;
+                      const oldResult: TdomXPathResult;
+                      const resolver: TdomXPathNSResolver): TdomXPathResult; override;
+  end;
+
+  // Cf. XPath 1.0, prod. [24].
+  TdomXPathLessThanExpr = class(TdomXPathSyntaxNode)
+  public
+    function evaluate(const contextNode: TdomNode;
+                      const oldResult: TdomXPathResult;
+                      const resolver: TdomXPathNSResolver): TdomXPathResult; override;
+  end;
+
+  // Cf. XPath 1.0, prod. [24].
+  TdomXPathLessThanOrEqualExpr = class(TdomXPathSyntaxNode)
+    function evaluate(const contextNode: TdomNode;
+                      const oldResult: TdomXPathResult;
+                      const resolver: TdomXPathNSResolver): TdomXPathResult; override;
+  end;
+
+  // Cf. XPath 1.0, prod. [24].
+  TdomXPathGreaterThanExpr = class(TdomXPathSyntaxNode)
+  public
+    function evaluate(const contextNode: TdomNode;
+                      const oldResult: TdomXPathResult;
+                      const resolver: TdomXPathNSResolver): TdomXPathResult; override;
+  end;
+
+  // Cf. XPath 1.0, prod. [24].
+  TdomXPathGreaterThanOrEqualExpr = class(TdomXPathSyntaxNode)
+  public
+    function evaluate(const contextNode: TdomNode;
+                      const oldResult: TdomXPathResult;
+                      const resolver: TdomXPathNSResolver): TdomXPathResult; override;
+  end;
+
+  // Cf. XPath 1.0, prod. [25].
+  TdomXPathPlusExpr = class(TdomXPathSyntaxNode)
+  public
+    function evaluate(const contextNode: TdomNode;
+                      const oldResult: TdomXPathResult;
+                      const resolver: TdomXPathNSResolver): TdomXPathResult; override;
+  end;
+
+  // Cf. XPath 1.0, prod. [25].
+  TdomXPathMinusExpr = class(TdomXPathSyntaxNode)
+  public
+    function evaluate(const contextNode: TdomNode;
+                      const oldResult: TdomXPathResult;
+                      const resolver: TdomXPathNSResolver): TdomXPathResult; override;
+  end;
+
+  // Cf. XPath 1.0, prod. [26].
+  TdomXPathMultiplyExpr = class(TdomXPathSyntaxNode)
+  public
+    function evaluate(const contextNode: TdomNode;
+                      const oldResult: TdomXPathResult;
+                      const resolver: TdomXPathNSResolver): TdomXPathResult; override;
+  end;
+
+  // Cf. XPath 1.0, prod. [26].
+  TdomXPathDivExpr = class(TdomXPathSyntaxNode)
+  public
+    function evaluate(const contextNode: TdomNode;
+                      const oldResult: TdomXPathResult;
+                      const resolver: TdomXPathNSResolver): TdomXPathResult; override;
+  end;
+
+  // Cf. XPath 1.0, prod. [26].
+  TdomXPathModExpr = class(TdomXPathSyntaxNode)
+  public
+    function evaluate(const contextNode: TdomNode;
+                      const oldResult: TdomXPathResult;
+                      const resolver: TdomXPathNSResolver): TdomXPathResult; override;
+  end;
+
+  // Cf. XPath 1.0, prod. [27].
+  TdomXPathUnaryExpr = class(TdomXPathSyntaxNode)
+  public
+    function evaluate(const contextNode: TdomNode;
+                      const oldResult: TdomXPathResult;
+                      const resolver: TdomXPathNSResolver): TdomXPathResult; override;
+  end;
+
+  // Cf. XPath 1.0, prod. [28].
+  TdomXPathLeftParenthesis = class(TdomXPathSyntaxNode)
+  end;
+
+  // Cf. XPath 1.0, prod. [28].
+  TdomXPathRightParenthesis = class(TdomXPathSyntaxNode)
+  end;
+
+  // Cf. XPath 1.0, prod. [28].
+  TdomXPathLeftSquareBracket = class(TdomXPathSyntaxNode)
+  end;
+
+  // Cf. XPath 1.0, prod. [28].
+  TdomXPathRightSquareBracket = class(TdomXPathSyntaxNode)
+  end;
+
+  // Cf. XPath 1.0, prod. [28].
+  TdomXPathSingleDot = class(TdomXPathSyntaxNode)
+  end;
+
+  // Cf. XPath 1.0, prod. [28].
+  TdomXPathDoubleDot = class(TdomXPathSyntaxNode)
+  end;
+
+  // Cf. XPath 1.0, prod. [28].
+  TdomXPathCommercialAt = class(TdomXPathSyntaxNode)
+  end;
+
+  // Cf. XPath 1.0, prod. [28].
+  TdomXPathComma = class(TdomXPathSyntaxNode)
+  end;
+
+  // Cf. XPath 1.0, prod. [28].
+  TdomXPathDoubleColon = class(TdomXPathSyntaxNode)
+  end;
+
+  // Cf. XPath 1.0, prod. [29].
+  TdomXPathLiteral = class(TdomXPathSyntaxNode)
+  public
+    function evaluate(const contextNode: TdomNode;
+                      const oldResult: TdomXPathResult;
+                      const resolver: TdomXPathNSResolver): TdomXPathResult; override;
+  end;
+
+  // Cf. XPath 1.0, prod. [30].
+  TdomXPathNumber = class(TdomXPathSyntaxNode)
+  public
+    function evaluate(const contextNode: TdomNode;
+                      const oldResult: TdomXPathResult;
+                      const resolver: TdomXPathNSResolver): TdomXPathResult; override;
+  end;
+
+  // Cf. XPath 1.0, prod. [32].
+  TdomXPathSlashOperator = class(TdomXPathSyntaxNode)
+  end;
+
+  // Cf. XPath 1.0, prod. [32].
+  TdomXPathShefferStrokeOperator = class(TdomXPathSyntaxNode)
+  end;
+
+  // Cf. XPath 1.0, prod. [32].
+  TdomXPathPlusOperator = class(TdomXPathSyntaxNode)
+  end;
+
+  // Cf. XPath 1.0, prod. [32].
+  TdomXPathMinusOperator = class(TdomXPathSyntaxNode)
+  end;
+
+  // Cf. XPath 1.0, prod. [32].
+  TdomXPathIsEqualOperator = class(TdomXPathSyntaxNode)
+  end;
+
+  // Cf. XPath 1.0, prod. [32].
+  TdomXPathIsNotEqualOperator = class(TdomXPathSyntaxNode)
+  end;
+
+  // Cf. XPath 1.0, prod. [32].
+  TdomXPathLessThanOperator = class(TdomXPathSyntaxNode)
+  end;
+
+  // Cf. XPath 1.0, prod. [32].
+  TdomXPathLessThanOrEqualOperator = class(TdomXPathSyntaxNode)
+  end;
+
+  // Cf. XPath 1.0, prod. [32].
+  TdomXPathGreaterThanOperator = class(TdomXPathSyntaxNode)
+  end;
+
+  // Cf. XPath 1.0, prod. [32].
+  TdomXPathGreaterThanOrEqualOperator = class(TdomXPathSyntaxNode)
+  end;
+
+  // Cf. XPath 1.0, prod. [33].
+  TdomXPathAndOperator = class(TdomXPathSyntaxNode)
+  end;
+
+  // Cf. XPath 1.0, prod. [33].
+  TdomXPathOrOperator = class(TdomXPathSyntaxNode)
+  end;
+
+  // Cf. XPath 1.0, prod. [33].
+  TdomXPathModOperator = class(TdomXPathSyntaxNode)
+  end;
+
+  // Cf. XPath 1.0, prod. [33].
+  TdomXPathDivOperator = class(TdomXPathSyntaxNode)
+  end;
+
+  // Cf. XPath 1.0, prod. [34].
+  TdomXPathMultiplyOperator = class(TdomXPathSyntaxNode)
+  end;
+
+  // Cf. XPath 1.0, prod. [35].
+  TdomXPathFunctionName = class(TdomXPathSyntaxNode)
+  end;
+
+  // Cf. XPath 1.0, prod. [36].
+  TdomXPathVariableReference = class(TdomXPathSyntaxNode)
+  public
+    function evaluate(const contextNode: TdomNode;
+                      const oldResult: TdomXPathResult;
+                      const resolver: TdomXPathNSResolver): TdomXPathResult; override;
+  end;
+
+  // Cf. XPath 1.0, prod. [37].
+  TdomXPathNameTest = class(TdomXPathSyntaxNode)
+  protected
+    FPrefix: UnicodeString;
+    FLocalName: UnicodeString;
+  public
+    constructor create(const avalue: UnicodeString); override;
+    function evaluate(const contextNode: TdomNode;
+                      const oldResult: TdomXPathResult;
+                      const resolver: TdomXPathNSResolver): TdomXPathResult; override;
+    function evaluate2(const oldSnapshotResult: TdomXPathSnapshotResult;
+                       const principalNodeType: TdomNodeType;
+                       const resolver: TdomXPathNSResolver): TdomXPathSnapshotResult; virtual;
+  end;
+
+  // Cf. XPath 1.0, prod. [38].
+  TdomXPathNodeTypeComment = class(TdomXPathSyntaxNode)
+  public
+    function evaluate(const contextNode: TdomNode;
+                      const oldResult: TdomXPathResult;
+                      const resolver: TdomXPathNSResolver): TdomXPathResult; override;
+    function evaluate2(const oldSnapshotResult: TdomXPathSnapshotResult): TdomXPathSnapshotResult; virtual;
+  end;
+
+  // Cf. XPath 1.0, prod. [38].
+  TdomXPathNodeTypeNode = class(TdomXPathSyntaxNode)
+  end;
+
+  // Cf. XPath 1.0, prod. [38].
+  TdomXPathNodeTypePI = class(TdomXPathSyntaxNode)
+  public
+    function evaluate(const contextNode: TdomNode;
+                      const oldResult: TdomXPathResult;
+                      const resolver: TdomXPathNSResolver): TdomXPathResult; override;
+    function evaluate2(const oldSnapshotResult: TdomXPathSnapshotResult): TdomXPathSnapshotResult; virtual;
+  end;
+
+  // Cf. XPath 1.0, prod. [38].
+  TdomXPathNodeTypeText = class(TdomXPathSyntaxNode)
+  public
+    function evaluate(const contextNode: TdomNode;
+                      const oldResult: TdomXPathResult;
+                      const resolver: TdomXPathNSResolver): TdomXPathResult; override;
+    function evaluate2(const oldSnapshotResult: TdomXPathSnapshotResult): TdomXPathSnapshotResult; virtual;
+  end;
+
+  TdomXPathSlashStatus = ( SL_NO_DOUBLE_SLASH,
+                           SL_XPATH_AXIS_NAME_DESCENDANT_OR_SELF_TOKEN_FOLLOWS,
+                           SL_XPATH_DOUBLE_COLON_TOKEN_FOLLOWS,
+                           SL_XPATH_NODE_TYPE_NODE_TOKEN_FOLLOWS,
+                           SL_XPATH_LEFT_PARENTHESIS_FOLLOWS,
+                           SL_XPATH_RIGHT_PARENTHESIS_FOLLOWS,
+                           SL_XPATH_SLASH_OPERATOR_TOKEN_FOLLLOWS );
+
+  TdomXPathTokenizer = class
+  protected
+    FCacheIsActive: boolean;
+    FDoubleSlashStatus: TdomXPathSlashStatus;
+    FExpression: UnicodeString;
+    FLastSymbol: TdomXPathTokenType;
+    FPosition: integer;
+    FPositionCache: integer;
+    FSymbolCache: TdomXPathTokenType;
+    FValueCache: UnicodeString;
+    function doubleColonFollows: boolean; virtual;
+    function getNextWideChar(out s: wideChar): boolean; virtual;
+    function leftParanthesisFollows: boolean; virtual;
+    function lookAheadNextWideChar(out s: wideChar): boolean; virtual;
+  public
+    constructor create(const expression: UnicodeString;
+                       const xpathVersion: UnicodeString); virtual;
+    function isFollowing(const symbol: TdomXPathTokenType): boolean; virtual;
+    procedure read(out symbol: TdomXPathTokenType;
+                   out value: UnicodeString;
+                   out position: integer); virtual;
+    procedure reset; virtual;
+  end;
+
+  TdomXPathExpression = class
+  protected
+    FIsPrepared: boolean;           // Indicates whether the syntax tree has already been build.
+    FIsValid: boolean;              // Indicates whether there was a syntax error found during preparation.
+    FExpression: UnicodeString;        // Holds the expression to be evaluated.
+    FOwnerDocument: TdomDocument;   // The Document that created this XPath Expression.
+    FResolver: TdomXPathNSResolver; // Points to the namespace resolver to be used.
+    FSyntaxTree: TdomXPathExpr;     // Holds the root node of the XPath syntax tree if the expression was valid.
+    function createSyntaxNode(const symbol: TdomXPathTokenType;
+                              const value: UnicodeString): TdomXPathSyntaxNode; virtual;
+  public
+    constructor create(const aOwner: TdomDocument;
+                       const expression: UnicodeString;
+                       const resolver: TdomXPathNSResolver); virtual;
+    function evaluate(const contextNode: TdomNode;
+                      const typeCodes: TdomXPathResultTypes;
+                      const oldResult: TdomXPathResult): TdomXPathResult; virtual;
+    function prepare: boolean; virtual;
+  end;
+
+  TdomXPathNSResolver = class
+  protected
+    FPrefixUriList: TdomNameValueList;
+  public
+    constructor create(const resolverNode: TdomNode); virtual;
+    destructor destroy;  override;
+    function lookupNamespaceURI(const prefix: UnicodeString): UnicodeString; virtual;
+  end;
+
+  TdomXPathResult = class
+  protected
+    FResultType: TdomXPathResultType;
+  public
+    property resultType: TdomXPathResultType read FResultType;
+  end;
+
+  TdomXPathSnapshotResult = class(TdomXPathResult)
+  protected
+    FAxisType: TdomXPathAxisType;
+    FList: TList;
+    procedure add(const node: TdomNode); virtual;
+    procedure addSnapshotResult(const ir: TdomXPathSnapshotResult); virtual;
+    procedure addSubtree(const node: TdomNode); virtual;
+    procedure delete(const index: integer); virtual;
+    function getSnapshotLength: integer; virtual;
+    procedure setAxisType(const value: TdomXPathAxisType); virtual;
+    property axisType: TdomXPathAxisType read FAxisType write setAxisType default XPATH_FORWARD_AXIS;
+  public
+    constructor create; virtual;
+    destructor destroy; override;
+    function snapshotItem(const index: integer): TdomNode; virtual;
+    property snapshotLength: integer read getSnapshotLength;
+  end;
+
+  TdomXPathBooleanResult = class(TdomXPathResult)
+  protected
+    FBooleanValue: boolean;
+  public
+    constructor create(const aBooleanValue: boolean); virtual;
+    property booleanValue: boolean read FBooleanValue;
+  end;
+
+  TdomXPathNumberResult = class(TdomXPathResult)
+  protected
+    FNumberValue: double;
+  public
+    constructor create(const aNumberValue: double); virtual;
+    property numberValue: double read FNumberValue;
+  end;
+
+  TdomXPathStringResult = class(TdomXPathResult)
+  protected
+    FStringValue: UnicodeString;
+  public
+    constructor create(const aStringValue: UnicodeString); virtual;
+    property stringValue: UnicodeString read FStringValue;
+  end;
+
+// XPathFunctions
+function XPathBooleanFunc(const oldResult: TdomXPathResult): TdomXPathBooleanResult;
+function XPathNumberFunc(const oldResult: TdomXPathResult): TdomXPathNumberResult;
+function XPathStringFunc(const oldResult: TdomXPathResult): TdomXPathStringResult;
+
+// UnicodeString Handling Routines
+function trimWhitespace(S: UnicodeString): UnicodeString;
+function trimWhitespaceLeft(S: UnicodeString): UnicodeString;
+function trimWhitespaceRight(S: UnicodeString): UnicodeString;
+
+// Routines for XML Namespace Processing
+function xmlExtractPrefix(const qualifiedName: UnicodeString): UnicodeString;
+function xmlExtractLocalName(const qualifiedName: UnicodeString): UnicodeString;
+function xmlExtractPrefixAndLocalName(const qualifiedName: UnicodeString;
+                                        out prefix,
+                                            localName: UnicodeString): boolean;
+
+// Routines for Testing XML Rules
+function isXmlChar(const S: WideChar): boolean;
+function IsXmlWhiteSpace(const S: WideChar): boolean;
+function isXmlLetter(const S: WideChar): boolean;
+function isXmlBaseChar(const S: WideChar): boolean;
+function isXmlIdeographic(const S: WideChar): boolean;
+function isXmlCombiningChar(const S: WideChar): boolean;
+function isXmlDigit(const S: WideChar): boolean;
+function isXmlExtender(const S: WideChar): boolean;
+function isXmlNameChar(const S: WideChar): boolean;
+function isXmlPubidChar(const S: WideChar): boolean;
+
+function isXmlChars(const S: UnicodeString): boolean;
+function isXmlS(const S: UnicodeString): boolean;
+function isXmlName(const S: UnicodeString): boolean;
+function isXmlNames(const S: UnicodeString): boolean;
+function isXmlNmtoken(const S: UnicodeString): boolean;
+function isXmlNmtokens(const S: UnicodeString): boolean;
+function isXmlCharRef(const S: UnicodeString): boolean;
+function isXmlEntityRef(const S: UnicodeString): boolean;
+function isXmlPEReference(const S: UnicodeString): boolean;
+function isXmlReference(const S: UnicodeString): boolean;
+function isXmlEntityValue(const S: UnicodeString): boolean;
+function isXmlEntityValueChars(const S: UnicodeString): boolean;
+function isXmlAttValue(const S: UnicodeString): boolean;
+function isXmlSystemLiteral(const S: UnicodeString): boolean;
+function isXmlSystemChars(const S: UnicodeString): boolean;
+function isXmlPubidLiteral(const S: UnicodeString): boolean;
+function isXmlPubidChars(const S: UnicodeString): boolean;
+function isXmlComment(const S: UnicodeString): boolean;
+function isXmlCData(const S: UnicodeString): boolean;
+function isXmlCharData(const S: UnicodeString): boolean;
+function isXmlPITarget(const S: UnicodeString): boolean;
+function isXmlVersionNumChar(const S: WideChar): boolean;
+function isXmlVersionNum(const S: UnicodeString): boolean;
+function isXmlEncNameLeadingChar(const s: WideChar): boolean;
+function isXmlEncNameFollowingChar(const s: WideChar): boolean;
+function isXmlEncName(const S: UnicodeString): boolean;
+function isXmlStringType(const S: UnicodeString): boolean;
+function isXmlTokenizedType(const S: UnicodeString): boolean;
+
+function isXmlNCNameChar(const s: WideChar): boolean;
+function isXmlNCName(const S: UnicodeString): boolean;
+function isXmlDefaultAttName(const S: UnicodeString): boolean;
+function isXmlPrefixedAttName(const S: UnicodeString): boolean;
+function isXmlNSAttName(const S: UnicodeString): boolean;
+function isXmlLocalPart(const S: UnicodeString): boolean;
+function isXmlPrefix(const S: UnicodeString): boolean;
+function isXmlQName(const S: UnicodeString): boolean;
+
+// Character Encoding Conversion
+function resolveCharRefs(const S: UnicodeString): UnicodeString;
+function xmlIntToCharRef(const value: integer): UnicodeString;
+function xmlCharRefToInt(const S: UnicodeString): integer;
+function xmlCharRefToStr(const S: UnicodeString): UnicodeString;
+function xmlStrToCharRef(const S: UnicodeString): UnicodeString;
+
+// Augmented Backus-Naur Form (ABNF) Core Rules (cf. RFC 2234, 6.1)
+function isAbnfALPHAWideChar(c: wideChar): boolean;
+function isAbnfBITWideChar(c: wideChar): boolean;
+function isAbnfCHARWideChar(c: wideChar): boolean;
+function isAbnfCRWideChar(c: wideChar): boolean;
+function isAbnfCRLFWideStr(s: UnicodeString): boolean;
+function isAbnfCTLWideChar(c: wideChar): boolean;
+function isAbnfDIGITWideChar(c: wideChar): boolean;
+function isAbnfDQUOTEWideChar(c: wideChar): boolean;
+function isAbnfHEXDIGWideChar(c: wideChar): boolean;
+function isAbnfHTABWideChar(c: wideChar): boolean;
+function isAbnfLFWideChar(c: wideChar): boolean;
+function isAbnfLWSPWideStr(s: UnicodeString): boolean;
+function isAbnfOCTETWideChar(c: wideChar): boolean;
+function isAbnfSPWideChar(c: wideChar): boolean;
+function isAbnfVCHARWideChar(c: wideChar): boolean;
+function isAbnfWSPWideChar(c: wideChar): boolean;
+
+function isAbnfALPHAChar(c: Ansichar): boolean;
+function isAbnfBITChar(c: AnsiChar): boolean;
+function isAbnfCHARChar(c: AnsiChar): boolean;
+function isAbnfCRChar(c: AnsiChar): boolean;
+function isAbnfCRLFStr(s: AnsiString): boolean;
+function isAbnfCTLChar(c: AnsiChar): boolean;
+function isAbnfDIGITChar(c: AnsiChar): boolean;
+function isAbnfDQUOTEChar(c: AnsiChar): boolean;
+function isAbnfHEXDIGChar(c: AnsiChar): boolean;
+function isAbnfHTABChar(c: AnsiChar): boolean;
+function isAbnfLFChar(c: AnsiChar): boolean;
+function isAbnfLWSPStr(s: AnsiString): boolean;
+function isAbnfOCTETChar(c: AnsiChar): boolean;
+function isAbnfSPChar(c: AnsiChar): boolean;
+function isAbnfVCHARChar(c: AnsiChar): boolean;
+function isAbnfWSPChar(c: AnsiChar): boolean;
+
+// URI Rules (cf. RFC 2396, App. A)
+function isUriURI_referenceWideStr(s: UnicodeString): boolean;
+function isUriAbsoluteURIWideStr(s: UnicodeString): boolean;
+function isUriRelativeURIWideStr(s: UnicodeString): boolean;
+function isUriHier_partWideStr(s: UnicodeString): boolean;
+function isUriOpaque_partWideStr(s: UnicodeString): boolean;
+function isUriNet_pathWideStr(s: UnicodeString): boolean;
+function isUriAbs_pathWideStr(s: UnicodeString): boolean;
+function isUriRel_pathWideStr(s: UnicodeString): boolean;
+function isUriRel_segmentWideStr(s: UnicodeString): boolean;
+function isUriSchemeWideStr(s: UnicodeString): boolean;
+function isUriAuthorityWideStr(s: UnicodeString): boolean;
+function isUriReg_nameWideStr(s: UnicodeString): boolean;
+function isUriServerWideStr(s: UnicodeString): boolean;
+function isUriUserinfoWideStr(s: UnicodeString): boolean;
+function isUriHostPortWideStr(s: UnicodeString): boolean;
+function isUriHostWideStr(s: UnicodeString): boolean;
+function isUriHostnameWideStr(s: UnicodeString): boolean;
+function isUriDomainlabelWideStr(s: UnicodeString): boolean;
+function isUriToplabelWideStr(s: UnicodeString): boolean;
+function isUriIPv4addressWideStr(s: UnicodeString): boolean;
+function isUriPortWideStr(s: UnicodeString): boolean;
+function isUriPathWideStr(s: UnicodeString): boolean;
+function isUriPath_segmentsWideStr(s: UnicodeString): boolean;
+function isUriSegmentWideStr(s: UnicodeString): boolean;
+function isUriParamWideStr(s: UnicodeString): boolean;
+function isUriQueryWideStr(s: UnicodeString): boolean;
+function isUriFragmentWideStr(s: UnicodeString): boolean;
+function isUriUricWideStr(s: UnicodeString): boolean;
+function isUriReservedWideChar(c: wideChar): boolean;
+function isUriUnreservedWideChar(c: wideChar): boolean;
+function isUriMarkWideChar(c: wideChar): boolean;
+function isUriHexWideChar(c: wideChar): boolean;
+function isUriAlphanumWideChar(c: wideChar): boolean;
+function isUriAlphaWideChar(c: wideChar): boolean;
+function isUriDigitWideChar(c: wideChar): boolean;
+
+function isUriURI_referenceStr(s: AnsiString): boolean;
+function isUriAbsoluteURIStr(s: AnsiString): boolean;
+function isUriRelativeURIStr(s: AnsiString): boolean;
+function isUriHier_partStr(s: AnsiString): boolean;
+function isUriOpaque_partStr(s: AnsiString): boolean;
+function isUriNet_pathStr(s: AnsiString): boolean;
+function isUriAbs_pathStr(s: AnsiString): boolean;
+function isUriRel_pathStr(s: AnsiString): boolean;
+function isUriRel_segmentStr(s: AnsiString): boolean;
+function isUriSchemeStr(s: AnsiString): boolean;
+function isUriAuthorityStr(s: AnsiString): boolean;
+function isUriReg_nameStr(s: AnsiString): boolean;
+function isUriServerStr(s: AnsiString): boolean;
+function isUriUserinfoStr(s: AnsiString): boolean;
+function isUriHostPortStr(s: AnsiString): boolean;
+function isUriHostStr(s: AnsiString): boolean;
+function isUriHostnameStr(s: AnsiString): boolean;
+function isUriDomainlabelStr(s: AnsiString): boolean;
+function isUriToplabelStr(s: AnsiString): boolean;
+function isUriIPv4addressStr(s: AnsiString): boolean;
+function isUriPortStr(s: AnsiString): boolean;
+function isUriPathStr(s: AnsiString): boolean;
+function isUriPath_segmentsStr(s: AnsiString): boolean;
+function isUriSegmentStr(s: AnsiString): boolean;
+function isUriParamStr(s: AnsiString): boolean;
+function isUriQueryStr(s: AnsiString): boolean;
+function isUriFragmentStr(s: AnsiString): boolean;
+function isUriUricStr(s: AnsiString): boolean;
+function isUriReservedChar(c: AnsiChar): boolean;
+function isUriUnreservedChar(c: AnsiChar): boolean;
+function isUriMarkChar(c: AnsiChar): boolean;
+function isUriHexChar(c: AnsiChar): boolean;
+function isUriAlphanumChar(c: AnsiChar): boolean;
+function isUriAlphaChar(c: AnsiChar): boolean;
+function isUriDigitChar(c: AnsiChar): boolean;
+
+
+function filenameToUriStr(const path: TFilename;
+                          const opt: TdomFilenameToUriOptions): string;
+function filenameToUriWideStr(const path: TFilename;
+                              const opt: TdomFilenameToUriOptions): UnicodeString;
+function resolveRelativeUriStr(const baseUri,
+                                     relUri: Ansistring;
+                                 var resultUri: Ansistring): boolean;
+function resolveRelativeUriWideStr(const baseUri,
+                                         relUri: UnicodeString;
+                                     var resultUri: UnicodeString): boolean;
+function uriStrToFilename(const uri: Ansistring;
+                            var path: TFilename;
+                            var authority,
+                                query,
+                                fragment: Ansistring): boolean;
+function uriWideStrToFilename(const uri: UnicodeString;
+                                var path: TFilename;
+                                var authority,
+                                    query,
+                                    fragment: Ansistring): boolean;
+
+type
+  TUriStrAnalyzer = class
+  protected
+    FUriAuthority: AnsiString;
+    FUriFragment: AnsiString;
+    FUriQuery: AnsiString;
+    FUriPath: AnsiString;
+    FUriScheme: AnsiString;
+    FHasUriAuthority: boolean;
+    FHasUriFragment: boolean;
+    FHasUriQuery: boolean;
+    FHasUriScheme: boolean;
+    function getUriReference: Ansistring; virtual;
+  public
+    constructor create;
+    function setUriAuthority(const Value: AnsiString;
+                             const isDefined: boolean): boolean; virtual;
+    function setUriFragment(const Value: AnsiString;
+                            const isDefined: boolean): boolean; virtual;
+    function setUriPath(const Value: AnsiString): boolean; virtual;
+    function setUriQuery(const Value: AnsiString;
+                         const isDefined: boolean): boolean; virtual;
+    function setUriReference(const Value: Ansistring): boolean; virtual;
+    function setUriScheme(const Value: AnsiString;
+                          const isDefined: boolean): boolean; virtual;
+    property HasUriAuthority: boolean read FHasUriAuthority;
+    property HasUriFragment: boolean read FHasUriFragment;
+    property HasUriQuery: boolean read FHasUriQuery;
+    property HasUriScheme: boolean read FHasUriScheme;
+    property UriAuthority: Ansistring read FUriAuthority;
+    property UriFragment: AnsiString read FUriFragment;
+    property UriPath: AnsiString read FUriPath;
+    property UriQuery: AnsiString read FUriQuery;
+    property UriReference: Ansistring read getUriReference;
+    property UriScheme: AnsiString read FUriScheme;
+  end;
+
+  TUriWideStrAnalyzer = class
+  protected
+    FUriAuthority: UnicodeString;
+    FUriFragment: UnicodeString;
+    FUriQuery: UnicodeString;
+    FUriPath: UnicodeString;
+    FUriScheme: UnicodeString;
+    FHasUriAuthority: boolean;
+    FHasUriFragment: boolean;
+    FHasUriQuery: boolean;
+    FHasUriScheme: boolean;
+    function getUriReference: UnicodeString; virtual;
+  public
+    constructor create;
+    function setUriAuthority(const Value: UnicodeString;
+                             const isDefined: boolean): boolean; virtual;
+    function setUriFragment(const Value: UnicodeString;
+                            const isDefined: boolean): boolean; virtual;
+    function setUriPath(const Value: UnicodeString): boolean; virtual;
+    function setUriQuery(const Value: UnicodeString;
+                         const isDefined: boolean): boolean; virtual;
+    function setUriReference(const Value: UnicodeString): boolean; virtual;
+    function setUriScheme(const Value: UnicodeString;
+                          const isDefined: boolean): boolean; virtual;
+    property HasUriAuthority: boolean read FHasUriAuthority;
+    property HasUriFragment: boolean read FHasUriFragment;
+    property HasUriQuery: boolean read FHasUriQuery;
+    property HasUriScheme: boolean read FHasUriScheme;
+    property UriAuthority: UnicodeString read FUriAuthority;
+    property UriFragment: UnicodeString read FUriFragment;
+    property UriPath: UnicodeString read FUriPath;
+    property UriQuery: UnicodeString read FUriQuery;
+    property UriReference: UnicodeString read getUriReference;
+    property UriScheme: UnicodeString read FUriScheme;
+  end;
+
+procedure xmlAnalyseEntityDef(    source: UnicodeString;
+                              var entityValue,
+                                  systemLiteral,
+                                  pubidLiteral,
+                                  nDataName: UnicodeString;
+                              var error: boolean);
+
+procedure xmlAnalyseNotationDecl(const decl: UnicodeString;
+                                   var systemLiteral,
+                                       pubidLiteral: UnicodeString;
+                                   var error: boolean);
+
+procedure xmlAnalysePCDATA(source: UnicodeString;
+                           var lines: TdomWideStringList);
+
+function xmlAnalysePubSysId(const publicId,
+                                  systemId,
+                                  notaName: UnicodeString): UnicodeString;
+
+procedure xmlAnalyseTag(const source: UnicodeString;
+                          var tagName,
+                              attribSequence: UnicodeString);
+
+procedure xmlIsolateQuote(    source: UnicodeString;
+                          var content,
+                              rest: UnicodeString;
+                          var quoteType: WideChar;
+                          var error: boolean);
+
+function xmlNormalizeLineBreaks(const source :UnicodeString): UnicodeString;
+
+function xmlReplaceQuotes(const source: UnicodeString): UnicodeString;
+
+function xmlTrunc(const source: UnicodeString): UnicodeString;
+
+procedure xmlTruncAngularBrackets(const source: UnicodeString;
+                                    var content: UnicodeString;
+                                    var error: boolean);
+
+procedure xmlTruncRoundBrackets(const source: UnicodeString;
+                                  var content: UnicodeString;
+                                  var error: boolean);
+
+procedure writeWideString(stream: TStream; const xmlStrg: UnicodeString);
+
+procedure writeWideStrings(stream: TStream; const xmlStrgs: array of UnicodeString);
+
+procedure writeWideChars(stream: TStream; const xmlChars: array of wideChar);
+
+var
+  domDocumentFormatList: PdomDocumentFormat = nil;
+
+
+implementation
+uses
+  {$IFDEF DELPHI2009UP}AnsiStrings,{$ENDIF}
+  uROClasses;
+
+resourcestring
+  SCannotReadOddPos    = 'Cannot read UnicodeString from odd byte position';
+  SCannotWriteOddPos   = 'Cannot write UnicodeString to odd byte position';
+  SCapacityLessSize    = 'Capacity cannot be less than size';
+  SOddSizeInvalid      = 'Odd size not valid for UnicodeString';
+  SNegativeSizeInvalid = 'Negative stream size invalid';
+  SOddPosInvalid       = 'Odd byte position not valid for UnicodeString';
+
+function xmlNormalizeLineBreaks(const source :UnicodeString): UnicodeString;
+const
+  CR: WideChar  = #13;
+  LF: WideChar  = #10;
+  CRLF: UnicodeString = #13#10;
+var
+  nPos: integer;
+begin
+  Result:= source;
+
+  // CR+LF --> LF
+  repeat
+    nPos := Pos(CRLF, Result);
+    if nPos > 0 then
+      Delete(Result, nPos, 1);
+  until nPos = 0;
+
+  // CR --> LF
+  repeat
+    nPos := Pos(CR, Result);
+    if nPos > 0 then
+      Result[nPos] := LF;
+  until nPos = 0;
+end;
+
+
+procedure xmlAnalysePCDATA(Source: UnicodeString;
+                           var Lines: TdomWideStringList);
+// 'Source': The PCDATA-Sequence to be analyzed.
+// 'Lines':  Returns the content of PCDATA in singles lines containing
+//           only whitespace or only characters without whitespace.
+var
+  i: integer;
+  Line: string;
+begin
+  i:= 0;
+  Lines.clear;
+  while i < length(Source) do
+  begin
+
+    // No White-space?
+    Line:= '';
+    while i < length(Source) do
+    begin
+      inc(i);
+      if IsXmlWhiteSpace(Source[i]) then begin dec(i); break; end;
+      Line:= Line + Source[i];
+    end;
+    if Line <> '' then Lines.Add(Line);
+
+    // White-space?
+    Line:= '';
+    while i < length(Source) do
+    begin
+      inc(i);
+      if not IsXmlWhiteSpace(Source[i]) then begin dec(i); break; end;
+      Line:= Line + Source[i];
+    end;
+    if Line <> '' then Lines.Add(Line);
+
+  end;
+end;
+
+procedure xmlAnalyseTag(const source: UnicodeString;
+                        var tagName,
+                            AttribSequence: UnicodeString);
+// 'Source': The tag, to be analyzed.
+// 'tagName': Returns the namen of the tag.
+// 'AttribSequence': Returns the Attributes, if existing.
+var
+  i,j,sourceLength : integer;
+begin
+  sourceLength:= length(Source);  // buffer storage to increase performance
+
+  // Evaluate tagName:
+  i:= 1;
+  while i <= sourceLength do begin
+    if IsXmlWhiteSpace(Source[i]) then break;
+    inc(i);
+  end;
+
+  tagName:= copy(Source,1,i-1);
+
+  // Evaluate Attributes:
+  while i < sourceLength do begin
+    inc(i);
+    if not IsXmlWhiteSpace(Source[i]) then break;
+  end;
+  j:= length(Source);
+  while j >= i do begin
+    if not IsXmlWhiteSpace(Source[j]) then break;
+    dec(j);
+  end;
+
+  AttribSequence:= copy(Source,i,j-i+1);
+end;
+
+procedure XMLAnalyseEntityDef(    Source: UnicodeString;
+                              var entityValue,
+                                  SystemLiteral,
+                                  PubidLiteral,
+                                  NDataName: UnicodeString;
+                              var Error: boolean);
+// 'Source': The entity definition to be analyzed.
+// 'entityValue','SystemLiteral','PubidLiteral','NDataName':
+//    Return the respective values, if declared.
+// 'Error': Returns 'true', if the entity definition is not well-formed.
+const
+  SQ: WideChar = #39; // code of '
+  DQ: WideChar = #34; // code of "
+var
+  dummy: UnicodeString;
+  i: integer;
+  intro: UnicodeString;
+  rest: UnicodeString;
+  QuoteType: WideChar;
+  PubidLit: UnicodeString;  // = ''
+  SystemLit: UnicodeString; // = ''
+begin
+  QuoteType:= #0;
+  rest := '';
+  SystemLit := '';
+  PubidLit := '';;
+  entityValue:= '';
+  SystemLiteral:= '';
+  PubidLiteral:= '';
+  NDataName:= '';
+  Error:= false;
+  if Length(Source) < 2 then begin Error:= true; exit; end;
+
+  // Remove leading white space:
+  i:= 1;
+  while i <= length(Source) do begin
+    if not IsXmlWhiteSpace(Source[i]) then break;
+    inc(i);
+  end;
+  if i >= Length(Source) then begin Error:= true; exit; end;
+  dummy:= copy(Source,i,Length(Source)-i+1);
+  Source:= dummy; // Necessary, because of Delphi's problem when copying WideStrings.
+  if (Source[1] = SQ) or (Source[1] = DQ) then begin
+    XMLIsolateQuote(Source,entityValue,rest,QuoteType,Error);
+    if Error then exit;
+    if rest <> '' then begin Error:= true; exit; end;
+    if not isXmlEntityValueChars(entityValue)
+      then begin Error:= true; exit; end;
+  end else begin
+    intro:= copy(Source,1,6);
+    if (intro = 'SYSTEM') or (intro = 'PUBLIC') then begin
+      Dummy:= copy(Source,7,Length(Source)-6);
+      Source:= dummy; // Necessary, because of Delphi's problem when copying WideStrings.
+      if Source = '' then begin Error:= true; exit; end;
+      if not IsXmlWhiteSpace(Source[1]) then begin Error:= true; exit; end;
+
+      if (intro = 'SYSTEM') then begin
+        XMLIsolateQuote(Source,SystemLit,Source,QuoteType,Error);
+        if Error then exit;
+      end else begin
+        XMLIsolateQuote(Source,PubidLit,Source,QuoteType,Error);
+        if Error then exit;
+        if not isXmlPubidChars(PubidLit)
+          then begin Error:= true; exit; end;
+        XMLIsolateQuote(Source,SystemLit,Source,QuoteType,Error);
+        if Error then exit;
+      end;
+
+      if Source <> '' then begin
+        if copy(Source,1,5) = 'NDATA' then begin
+          dummy:= copy(Source,6,Length(Source)-5);
+          Source:= XmlTrunc(dummy); // Necessary, because of Delphi's problem when copying WideStrings.
+          if IsXmlName(Source)
+            then NDataName:= Source
+            else begin Error:= true; exit; end;
+        end else begin Error:= true; exit; end;
+      end;
+
+    end else begin Error:= true; exit; end;
+    SystemLiteral:= SystemLit;
+    PubidLiteral:= PubidLit;
+  end; {if (Source[1] ... }
+end;
+
+
+procedure XMLAnalyseNotationDecl(const Decl: UnicodeString;
+                                   var SystemLiteral,
+                                       PubidLiteral: UnicodeString;
+                                   var Error: boolean);
+// 'Source': The notation declaration to be analyzed.
+// 'SystemLiteral','PubidLiteral','NDataName':
+//    Return the respective values, if declared.
+// 'Error': Returns 'true', if the notation declaration is not well-formed.
+var
+  dummy: UnicodeString;
+  intro: UnicodeString;
+  PubidLit: UnicodeString;   // = ''
+  QuoteType: WideChar;
+  Source: UnicodeString;
+  SystemLit: UnicodeString;  // = ''
+begin
+  SystemLiteral:= '';
+  PubidLiteral:= '';
+  Error:= false;
+  if Length(Decl) < 2 then begin Error:= true; exit; end;
+
+  Source:= XMLTrunc(Decl);
+  intro:= copy(Source,1,6);
+
+  if (intro<>'SYSTEM') and (intro<>'PUBLIC') then begin Error:= true; exit; end;
+
+  Dummy:= copy(Source,7,Length(Source)-6);
+  Source:= dummy; // Necessary, because of Delphi's problem when copying WideStrings.
+  if Source = '' then begin Error:= true; exit; end;
+  if not IsXmlWhiteSpace(Source[1]) then begin Error:= true; exit; end;
+
+  if (intro = 'SYSTEM') then begin
+    XMLIsolateQuote(Source,SystemLit,dummy,QuoteType,Error);
+    if Error then exit;
+    if dummy <> '' then begin Error:= true; exit; end;
+  end else begin
+    XMLIsolateQuote(Source,PubidLit,dummy,QuoteType,Error);
+    Source:= dummy;
+    if Error then exit;
+    if not isXmlPubidChars(PubidLit)
+      then begin Error:= true; exit; end;
+    if Source <> '' then begin
+      if not IsXmlSystemLiteral(Source) then begin Error:= true; exit; end;
+      SystemLit:= copy(Source,2,length(Source)-2);
+    end;
+  end;
+
+  SystemLiteral:= SystemLit;
+  PubidLiteral:= PubidLit;
+end;
+
+function xmlReplaceQuotes(const source: UnicodeString): UnicodeString;
+// This function replaces all single and double quotes
+// with their respective character references.
+var
+  i: integer;
+  content: TdomCustomStr;
+begin
+  result:= '';
+  content:= TdomCustomStr.create;
+  try
+    for i:= 1 to length(source) do begin
+      case ord(source[i]) of
+        39: content.addWideString('&#39;'); // Single quote
+        34: content.addWideString('&#34;'); // Double quote
+      else
+        content.addWideChar(source[i]);
+      end;
+    end;
+    Result:= content.value;
+  finally
+    content.free;
+  end;
+end;
+
+function xmlTrunc(const source: UnicodeString): UnicodeString;
+// This function removes all white space at the beginning
+// or end of 'Source'.
+var
+  i: integer;
+begin
+  result:= '';
+  i:= 1;
+  while i <= length(Source) do begin
+    if not IsXmlWhiteSpace(Source[i]) then break;
+    inc(i);
+  end;
+  if i > length(Source) then exit;
+  result:= copy(Source,i,Length(Source)-i+1);
+  i:= length(Result);
+  while i > 0 do begin
+    if not IsXmlWhiteSpace(Result[i]) then break;
+    dec(i);
+  end;
+  if i = 0
+    then result:= ''
+    else result:= copy(result,1,i);
+end;
+
+function XMLTruncSpace(const Source: UnicodeString): UnicodeString;
+// This function removes all spaces (#$20) at the beginning
+// or end of 'Source'.
+const
+  SPACE: WideChar  = #$20;
+var
+  i,startIndex,endIndex: integer;
+begin
+  startIndex:= length(source)+1;
+  endIndex:= 0;
+  for i:= 1 to length(source) do begin
+    if not (Source[i] = SPACE) then begin
+      startIndex:= i;
+      break;
+    end;
+  end;
+  for i:= length(source) downto startIndex do begin
+    if not (Source[i] = SPACE) then begin
+      endIndex:= i;
+      break;
+    end;
+  end;
+  result:= copy(Source,startIndex,endIndex-startIndex+1);
+end;
+
+procedure XMLTruncAngularBrackets(const Source: UnicodeString;
+                                    var content: UnicodeString;
+                                    var Error: boolean);
+{Die Prozedur entfernt evtl. vorhandenen White-Space am Anfang und
+ Ende von 'Source', prüft dann, ob der verbleibende UnicodeString durch
+ eckige KLammern -- '[' und ']' -- eingerahmt wird. Ist dies der Fall,
+ wird der Klammer-Inhalt in 'content' zurückgegeben und 'Error' wird
+ auf 'false' gesetzt. Ist dies nicht der Fall, gibt 'content' einen leeren
+ UnicodeString ('') zurück und 'Error' wird auf 'true' gesetzt.}
+var
+  BracketStr: UnicodeString;
+begin
+  content:= '';
+  BracketStr:= XMLTrunc(Source);
+  if length(BracketStr) < 2 then begin Error:= true; exit; end;
+  if (BracketStr[1] <> '[') or (BracketStr[length(BracketStr)] <> ']')
+    then Error:= true
+    else begin
+      content:= copy(BracketStr,2,Length(BracketStr)-2);
+      Error:= false;
+    end;
+end;
+
+procedure XMLTruncRoundBrackets(const Source: UnicodeString;
+                                  var content: UnicodeString;
+                                  var Error: boolean);
+{Die Prozedur entfernt evtl. vorhandenen White-Space am Anfang und Ende
+ von 'Source', prüft dann, ob der verbleibende UnicodeString durch runde
+ KLammern -- '(' und ')' -- eingerahmt wird. Ist dies der Fall, wird vom
+ Klammer-Inhalt erneut evtl. vorhandener Leerraum am Anfang und Ende
+ entfernt und das Ergebnis in 'content' zurückgegeben sowie 'Error' auf
+ 'false' gesetzt. Ist dies nicht der Fall, gibt 'content' einen leeren
+ UnicodeString ('') zurück und 'Error' wird auf 'true' gesetzt.}
+var
+  BracketStr: UnicodeString;
+begin
+  content:= '';
+  BracketStr:= XMLTrunc(Source);
+  if length(BracketStr) < 2 then begin Error:= true; exit; end;
+  if (BracketStr[1] <> '(') or (BracketStr[length(BracketStr)] <> ')')
+    then Error:= true
+    else begin
+      content:= XMLTrunc(copy(BracketStr,2,Length(BracketStr)-2));
+      Error:= false;
+    end;
+end;
+
+procedure xmlIsolateQuote(    Source: UnicodeString;
+                          var content,
+                              rest: UnicodeString;
+                          var QuoteType: WideChar;
+                          var Error: boolean);
+{Analysiert einen UnicodeString ('Source'):  Führender White-Space wird
+ abgeschnitten, danach wird ein in einfache oder doppelte Anführungs-
+ zeichen gesetzter Text (der auch leer sein kann) erwartet, dessen Inhalt
+ in 'content' zurückgegeben wird.  Falls ein Zeichen in 'content' kein
+ legales XML-Zeichen ist, wird 'Error = true' zurückgegen. 'QuoteType'
+ gibt den Wert der Anführungszeichen zurück (#39; für einfache und #34;
+ für doppelte Anführungszeichen).  Wird nach dem Entfernen des führenden
+ White-Spaces kein Anführungszeichen gefunden oder fehlt das
+ korrespondierende Schlußzeichen, wird die Routine abgebrochen und 'Error
+ = true' zurückgegeben. Anschließend wird überprüft, ob direkt nach dem
+ Schlußzeichen etwas anderes als White-Space folgt (bzw. der UnicodeString
+ zuende ist).  Falls etwas anderes folgt, wird 'Error = true' zurückgegeben.
+ Falls nicht, wird bis zum nächsten Nicht-White-Space-Zeichen gesucht und
+ der Rest des WideStrings in 'rest' zurückgegeben. Für alle Fälle, in denen
+ 'Error = true' zurückgegen wird, werden 'content' und 'rest' als leer
+ ('') und 'QuoteType' als #0; zurückgegeben.}
+const
+  SQ: WideChar = #39; // code of '
+  DQ: WideChar = #34; // code of "
+var
+  i,quotepos: integer;
+  dummy: UnicodeString;
+begin
+  content:= '';
+  rest:= '';
+  if Length(Source) < 2 then begin Error:= true; exit; end;
+  Error:= false;
+
+  {White-space am Anfang entfernen:}
+  i:= 1;
+  while (i <= length(Source)) do begin
+    if not IsXmlWhiteSpace(Source[i]) then break;
+    inc(i);
+  end;
+  if i >= Length(Source) then begin Error:= true; exit; end;
+  Dummy:= copy(Source,i,Length(Source)-i+1);
+  Source:= dummy; {Diese umständliche Zuweisung ist wegen Delphi-Problem von WideStrings bei copy nötig}
+  QuoteType:= Source[1];
+  if (QuoteType <> SQ) and (QuoteType <> DQ)
+    then begin QuoteType:= #0; Error:= true; exit; end;
+  Dummy:= Copy(Source,2,Length(Source)-1);
+  Source:= dummy; {Diese umständliche Zuweisung ist wegen Delphi-Problem von WideStrings bei copy nötig}
+  QuotePos:= Pos(UnicodeString(QuoteType),Source);
+  if QuotePos = 0 then begin QuoteType:= #0; Error:= true; exit; end;
+  if Length(Source) > QuotePos then
+    if not IsXmlWhiteSpace(Source[QuotePos+1])
+      then begin QuoteType:= #0; Error:= true; exit; end; // No White-Space after quotation mark
+  content:= Copy(Source,1,QuotePos-1);
+  if not isXmlChars(content) then begin content:= ''; QuoteType:= #0; Error:= true; exit; end;
+  // Strip White-Space:
+  i:= QuotePos + 1;
+  while (i <= length(Source)) do begin
+    if not IsXmlWhiteSpace(Source[i]) then break;
+    inc(i);
+  end;
+  if i <= Length(Source) then rest:= copy(Source,i,Length(Source)-i+1);
+end;
+
+function xmlAnalysePubSysId(const publicId,
+                                  systemId,
+                                  notaName: UnicodeString): UnicodeString;
+const
+  SQ: UnicodeString = #39; // code of '
+  DQ: UnicodeString = #34; // code of "
+var
+  qm: UnicodeString;
+begin
+  result:= '';
+  if not isXmlName(notaName)
+    then EConvertError.CreateFmt('%S is not a valid notaName value.',[notaName]);;
+  if isXmlSystemLiteral(concat(DQ,systemId,DQ))
+    then qm:= DQ
+    else if IsXMLSystemLiteral(concat(SQ,systemId,SQ))
+      then qm:= SQ
+      else EConvertError.CreateFmt('%S is not a valid systemId value.',[systemId]);;
+  if not isXmlPubidChars(publicId)
+    then EConvertError.CreateFmt('%S is not a valid publicId value.',[publicId]);;
+  if publicId = '' then begin
+    result:= concat(result,UnicodeString(' SYSTEM '),qm,systemId,qm,UnicodeString(' '));
+  end else begin
+    if systemId = '' then begin
+      result:= concat(result,UnicodeString(' PUBLIC "'),publicId,UnicodeString('" '));
+    end else begin
+      result:= concat(result,UnicodeString(' PUBLIC "'),publicId,UnicodeString('" '),qm,systemId,qm,UnicodeString(' '));
+    end;
+  end; {if ...}
+  if notaName <> ''
+   then result:= concat(result,UnicodeString('NDATA '),notaName,UnicodeString(' '));
+end;
+
+function trimWhitespace(S: UnicodeString): UnicodeString;
+var
+  i, l: integer;
+begin
+  l:= Length(S);
+  i:= 1;
+  while (i <= l) and IsXmlWhiteSpace(S[i]) do inc(i);
+  if i > l then
+    result:= ''
+  else begin
+    while IsXmlWhiteSpace(S[l]) do dec(l);
+    result:= copy(S,i,l-i+1);
+  end;
+end;
+
+function trimWhitespaceLeft(S: UnicodeString): UnicodeString;
+var
+  i, l: integer;
+begin
+  l:= Length(S);
+  i:= 1;
+  while (i <= l) and IsXmlWhiteSpace(S[i]) do inc(i);
+  result:= copy(s,i,Maxint);
+end;
+
+function trimWhitespaceRight(S: UnicodeString): UnicodeString;
+var
+  i: integer;
+begin
+  i:= Length(S);
+  while (i > 0) and IsXmlWhiteSpace(S[i]) do dec(I);
+  result:= copy(s,1,i);
+end;
+
+
+function xmlExtractPrefix(const qualifiedName: UnicodeString): UnicodeString;
+var
+  colonpos: integer;
+  localpart: UnicodeString;  // = 0
+  prefix: UnicodeString;     // = 0
+begin
+  colonpos:= pos(':',qualifiedName);
+  if colonpos = 0
+    then localpart:= qualifiedName
+    else begin
+      prefix:= copy(qualifiedName,1,colonpos-1);
+      localpart:= copy(qualifiedName,colonpos+1,length(qualifiedName)-colonpos);
+      if not IsXmlPrefix(prefix)
+        then raise EInvalid_Character_Err.create('Invalid character error.');
+    end;
+  if not IsXmlLocalPart(localpart)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  result:= prefix;
+end;
+
+function xmlExtractLocalName(const qualifiedName: UnicodeString): UnicodeString;
+var
+  colonpos: integer;
+  prefix,localpart: UnicodeString;
+begin
+  colonpos:= pos(':',qualifiedName);
+  if colonpos = 0
+    then localpart:= qualifiedName
+    else begin
+      prefix:= copy(qualifiedName,1,colonpos-1);
+      localpart:= copy(qualifiedName,colonpos+1,length(qualifiedName)-colonpos);
+      if not IsXmlPrefix(prefix)
+        then raise EInvalid_Character_Err.create('Invalid character error.');
+  end;
+  if not IsXmlLocalPart(localpart)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  result:= localpart;
+end;
+
+function xmlExtractPrefixAndLocalName(const qualifiedName: UnicodeString;
+                                        out prefix,
+                                            localName: UnicodeString): boolean;
+var
+  colonpos: integer;
+begin
+  colonpos:= pos(':',qualifiedName);
+  if colonpos = 0 then begin
+      prefix:= '';
+      if IsXmlLocalPart(qualifiedName) then begin
+        localName:= qualifiedName;
+        result:= true;
+      end else begin
+        localName:= '';
+        result:= false;
+      end;
+    end else begin
+      prefix:= copy(qualifiedName,1,colonpos-1);
+      localName:= copy(qualifiedName,colonpos+1,length(qualifiedName)-colonpos);
+      if IsXmlPrefix(prefix) and IsXmlLocalPart(localName) then begin
+        result:= true;
+      end else begin
+        prefix:= '';
+        localName:= '';
+        result:= false;
+      end;
+  end;
+end;
+
+function IsXmlChar(const S: WideChar): boolean;
+begin
+  case Word(S) of
+    $0009,$000A,$000D,$0020..$D7FF,$E000..$FFFD, // Unicode below $FFFF
+    $D800..$DBFF, // High surrogate of Unicode character [$10000..$10FFFF]
+    $DC00..$DFFF: // Low surrogate of Unicode character [$10000..$10FFFF]
+    result:= true;
+  else
+    result:= false;
+  end;
+end;
+
+function IsXmlWhiteSpace(const S: WideChar): boolean;
+begin
+  Case Word(S) of
+    $0009,$000A,$000D,$0020:
+    result:= true;
+  else
+    result:= false;
+  end;
+end;
+
+function IsXmlLetter(const S: WideChar): boolean;
+begin
+  Result:= IsXmlIdeographic(S) or IsXmlBaseChar(S);
+end;
+
+function IsXmlBaseChar(const S: WideChar): boolean;
+begin
+  Case Word(S) of
+    $0041..$005a,$0061..$007a,$00c0..$00d6,$00d8..$00f6,$00f8..$00ff,
+    $0100..$0131,$0134..$013E,$0141..$0148,$014a..$017e,$0180..$01c3,
+    $01cd..$01f0,$01f4..$01f5,$01fa..$0217,$0250..$02a8,$02bb..$02c1,
+    $0386,$0388..$038a,$038c,$038e..$03a1,$03a3..$03ce,$03D0..$03D6,
+    $03DA,$03DC,$03DE,$03E0,$03E2..$03F3,$0401..$040C,$040E..$044F,
+    $0451..$045C,$045E..$0481,$0490..$04C4,$04C7..$04C8,$04CB..$04CC,
+    $04D0..$04EB,$04EE..$04F5,$04F8..$04F9,$0531..$0556,$0559,
+    $0561..$0586,$05D0..$05EA,$05F0..$05F2,$0621..$063A,$0641..$064A,
+    $0671..$06B7,$06BA..$06BE,$06C0..$06CE,$06D0..$06D3,$06D5,
+    $06E5..$06E6,$0905..$0939,$093D,$0958..$0961,$0985..$098C,
+    $098F..$0990,$0993..$09A8,$09AA..$09B0,$09B2,$09B6..$09B9,
+    $09DC..$09DD,$09DF..$09E1,$09F0..$09F1,$0A05..$0A0A,$0A0F..$0A10,
+    $0A13..$0A28,$0A2A..$0A30,$0A32..$0A33,$0A35..$0A36,$0A38..$0A39,
+    $0A59..$0A5C,$0A5E,$0A72..$0A74,$0A85..$0A8B,$0A8D,$0A8F..$0A91,
+    $0A93..$0AA8,$0AAA..$0AB0,$0AB2..$0AB3,$0AB5..$0AB9,$0ABD,$0AE0,
+    $0B05..$0B0C,$0B0F..$0B10,$0B13..$0B28,$0B2A..$0B30,$0B32..$0B33,
+    $0B36..$0B39,$0B3D,$0B5C..$0B5D,$0B5F..$0B61,$0B85..$0B8A,
+    $0B8E..$0B90,$0B92..$0B95,$0B99..$0B9A,$0B9C,$0B9E..$0B9F,
+    $0BA3..$0BA4,$0BA8..$0BAA,$0BAE..$0BB5,$0BB7..$0BB9,$0C05..$0C0C,
+    $0C0E..$0C10,$0C12..$0C28,$0C2A..$0C33,$0C35..$0C39,$0C60..$0C61,
+    $0C85..$0C8C,$0C8E..$0C90,$0C92..$0CA8,$0CAA..$0CB3,$0CB5..$0CB9,
+    $0CDE,$0CE0..$0CE1,$0D05..$0D0C,$0D0E..$0D10,$0D12..$0D28,
+    $0D2A..$0D39,$0D60..$0D61,$0E01..$0E2E,$0E30,$0E32..$0E33,
+    $0E40..$0E45,$0E81..$0E82,$0E84,$0E87..$0E88,$0E8A,$0E8D,
+    $0E94..$0E97,$0E99..$0E9F,$0EA1..$0EA3,$0EA5,$0EA7,$0EAA..$0EAB,
+    $0EAD..$0EAE,$0EB0,$0EB2..$0EB3,$0EBD,$0EC0..$0EC4,$0F40..$0F47,
+    $0F49..$0F69,$10A0..$10C5,$10D0..$10F6,$1100,$1102..$1103,
+    $1105..$1107,$1109,$110B..$110C,$110E..$1112,$113C,$113E,$1140,
+    $114C,$114E,$1150,$1154..$1155,$1159,$115F..$1161,$1163,$1165,
+    $1167,$1169,$116D..$116E,$1172..$1173,$1175,$119E,$11A8,$11AB,
+    $11AE..$11AF,$11B7..$11B8,$11BA,$11BC..$11C2,$11EB,$11F0,$11F9,
+    $1E00..$1E9B,$1EA0..$1EF9,$1F00..$1F15,$1F18..$1F1D,$1F20..$1F45,
+    $1F48..$1F4D,$1F50..$1F57,$1F59,$1F5B,$1F5D,$1F5F..$1F7D,
+    $1F80..$1FB4,$1FB6..$1FBC,$1FBE,$1FC2..$1FC4,$1FC6..$1FCC,
+    $1FD0..$1FD3,$1FD6..$1FDB,$1FE0..$1FEC,$1FF2..$1FF4,$1FF6..$1FFC,
+    $2126,$212A..$212B,$212E,$2180..$2182,$3041..$3094,$30A1..$30FA,
+    $3105..$312C,$AC00..$d7a3:
+    result:= true;
+  else
+    result:= false;
+  end;
+end;
+
+function IsXmlIdeographic(const S: WideChar): boolean;
+begin
+  Case Word(S) of
+    $4E00..$9FA5,$3007,$3021..$3029:
+    result:= true;
+  else
+    result:= false;
+  end;
+end;
+
+function IsXmlCombiningChar(const S: WideChar): boolean;
+begin
+  Case Word(S) of
+    $0300..$0345,$0360..$0361,$0483..$0486,$0591..$05A1,$05A3..$05B9,
+    $05BB..$05BD,$05BF,$05C1..$05C2,$05C4,$064B..$0652,$0670,
+    $06D6..$06DC,$06DD..$06DF,$06E0..$06E4,$06E7..$06E8,$06EA..$06ED,
+    $0901..$0903,$093C,$093E..$094C,$094D,$0951..$0954,$0962..$0963,
+    $0981..$0983,$09BC,$09BE,$09BF,$09C0..$09C4,$09C7..$09C8,
+    $09CB..$09CD,$09D7,$09E2..$09E3,$0A02,$0A3C,$0A3E,$0A3F,
+    $0A40..$0A42,$0A47..$0A48,$0A4B..$0A4D,$0A70..$0A71,$0A81..$0A83,
+    $0ABC,$0ABE..$0AC5,$0AC7..$0AC9,$0ACB..$0ACD,$0B01..$0B03,$0B3C,
+    $0B3E..$0B43,$0B47..$0B48,$0B4B..$0B4D,$0B56..$0B57,$0B82..$0B83,
+    $0BBE..$0BC2,$0BC6..$0BC8,$0BCA..$0BCD,$0BD7,$0C01..$0C03,
+    $0C3E..$0C44,$0C46..$0C48,$0C4A..$0C4D,$0C55..$0C56,$0C82..$0C83,
+    $0CBE..$0CC4,$0CC6..$0CC8,$0CCA..$0CCD,$0CD5..$0CD6,$0D02..$0D03,
+    $0D3E..$0D43,$0D46..$0D48,$0D4A..$0D4D,$0D57,$0E31,$0E34..$0E3A,
+    $0E47..$0E4E,$0EB1,$0EB4..$0EB9,$0EBB..$0EBC,$0EC8..$0ECD,
+    $0F18..$0F19,$0F35,$0F37,$0F39,$0F3E,$0F3F,$0F71..$0F84,
+    $0F86..$0F8B,$0F90..$0F95,$0F97,$0F99..$0FAD,$0FB1..$0FB7,$0FB9,
+    $20D0..$20DC,$20E1,$302A..$302F,$3099,$309A:
+    result:= true;
+  else
+    result:= false;
+  end;
+end;
+
+function IsXmlDigit(const S: WideChar): boolean;
+begin
+  Case Word(S) of
+    $0030..$0039,$0660..$0669,$06F0..$06F9,$0966..$096F,$09E6..$09EF,
+    $0A66..$0A6F,$0AE6..$0AEF,$0B66..$0B6F,$0BE7..$0BEF,$0C66..$0C6F,
+    $0CE6..$0CEF,$0D66..$0D6F,$0E50..$0E59,$0ED0..$0ED9,$0F20..$0F29:
+    result:= true;
+  else
+    result:= false;
+  end;
+end;
+
+function IsXmlExtender(const S: WideChar): boolean;
+begin
+  Case Word(S) of
+    $00B7,$02D0,$02D1,$0387,$0640,$0E46,$0EC6,$3005,$3031..$3035,
+    $309D..$309E,$30FC..$30FE:
+    result:= true;
+  else
+    result:= false;
+  end;
+end;
+
+function IsXmlNameChar(const S: WideChar): boolean;
+begin
+  if IsXmlLetter(S) or IsXmlDigit(S) or IsXmlCombiningChar(S)
+    or IsXmlExtender(S) or (S='.') or (S='-') or (S='_') or (S=':')
+    then Result:= true
+    else Result:= false;
+end;
+
+function IsXmlPubidChar(const S: WideChar): boolean;
+begin
+  if (S=#$20) or (S=#$D) or (S=#$A) or
+     ((S>='a') and (S<='z')) or
+     ((S>='A') and (S<='Z')) or
+     ((S>='0') and (S<='9')) or
+     (S='-') or (S=#$27) or (S='(') or (S=')') or (S='+') or (S=',') or
+     (S='.') or (S='/') or (S=':') or (S='=') or (S=WideChar('?')) or (S=';') or
+     (S='!') or (S='*') or (S='#') or (S='@') or (S='$') or (S='_') or
+     (S='%')
+    then Result:= true
+    else Result:= false;
+end;
+
+function isXmlChars(const S: UnicodeString): boolean;
+var
+  i,l: integer;
+  sChar: wideChar;
+begin
+  result:= true;
+  i:= 0;
+  l:= length(S);
+  while i < l do begin
+    inc(i);
+    sChar:= S[i];
+    case Word(sChar) of
+      $0009,$000A,$000D,$0020..$D7FF,$E000..$FFFD: // Unicode below $FFFF
+        ; // do nothing.
+      $D800..$DBFF: // High surrogate of Unicode character [$10000..$10FFFF]
+        begin
+          if i = l
+            then begin result:= false; break; end; // End of UnicodeString --> No low surrogate found
+          inc(i);
+          sChar:= S[i];
+          if not IsUtf16LowSurrogate(sChar)
+            then begin result:= false; break; end; // No low surrogate found
+        end;
+    else
+      begin result:= false; break; end;
+    end; {case ...}
+  end; {while ...}
+end;
+
+function IsXmlS(const S: UnicodeString): boolean;
+var
+  i: integer;
+begin
+  if Length(S) = 0 then begin Result:= false; exit; end;
+  Result:= true;
+  for i:= 1 to length(S) do
+    if not IsXmlWhiteSpace((PWideChar(S)+i-1)^)
+      then begin Result:= false; exit; end;
+end;
+
+function IsXmlName(const S: UnicodeString): boolean;
+var
+  i: integer;
+begin
+  Result:= true;
+  if Length(S) = 0 then begin Result:= false; exit; end;
+  if not ( IsXmlLetter(PWideChar(S)^)
+           or (PWideChar(S)^ = '_')
+           or (PWideChar(S)^ = ':')   )
+    then begin Result:= false; exit; end;
+  for i:= 2 to length(S) do
+    if not IsXmlNameChar((PWideChar(S)+i-1)^)
+      then begin Result:= false; exit; end;
+end;
+
+function IsXmlNames(const S: UnicodeString): boolean;
+const
+  SPACE: WideChar  = #$20;
+var
+  i,j: integer;
+  namesStr: UnicodeString;
+begin
+  Result:= true;
+  namesStr:= concat(S,UnicodeString(SPACE));
+  j:= 1;
+  for i:= 1 to length(namesStr) do begin
+    if namesStr[i] = SPACE then begin
+      if not IsXmlName(copy(namesStr,j,i-j))
+        then begin Result:= false; exit; end;
+      j:= i+1;
+    end;
+  end;
+end;
+
+function IsXmlNmtoken(const S: UnicodeString): boolean;
+var
+  i: integer;
+begin
+  Result:= true;
+  if length(S) = 0 then begin Result:= false; exit; end;
+  for i:= 1 to length(S) do
+    if not IsXmlNameChar((PWideChar(S)+i-1)^)
+      then begin Result:= false; exit; end;
+end;
+
+function IsXmlNmtokens(const S: UnicodeString): boolean;
+const
+  SPACE: WideChar  = #$20;
+var
+  i,j: integer;
+  NmtokensStr: UnicodeString;
+begin
+  Result:= true;
+  NmtokensStr:= concat(S,UnicodeString(SPACE));
+  j:= 1;
+  for i:= 1 to length(NmtokensStr) do begin
+    if NmtokensStr[i] = SPACE then begin
+      if not IsXmlNmtoken(copy(NmtokensStr,j,i-j))
+        then begin Result:= false; exit; end;
+      j:= i+1;
+    end;
+  end;
+end;
+
+function IsXmlCharRef(const S: UnicodeString): boolean;
+var
+  i: integer;
+  SChar: widechar;
+begin
+  Result:= true;
+  if copy(S,length(S),1) <> ';' then begin result:= false; exit; end;
+  if copy(S,1,3) = '&#x' then begin
+    if Length(S) < 5 then begin Result:= false; exit; end;
+    for i:= 4 to length(S)-1 do begin
+      SChar:= WideChar((PWideChar(S)+i-1)^);
+      if not ( (SChar >= '0') and (SChar <= '9') )
+         and not ( (SChar >= 'a') and (SChar <= 'f') )
+         and not ( (SChar >= 'A') and (SChar <= 'F') )
+        then begin Result:= false; exit; end;
+    end;
+  end else begin
+    if Length(S) < 4 then begin Result:= false; exit; end;
+    if copy(S,1,2) <> '&#' then begin Result:= false; exit; end;
+    for i:= 3 to length(S)-1 do begin
+      SChar:= WideChar((PWideChar(S)+i-1)^);
+      if not ( (SChar >= '0') and (SChar <= '9') )
+        then begin Result:= false; exit; end;
+    end;
+  end;
+end;
+
+function IsXmlEntityRef(const S: UnicodeString): boolean;
+begin
+  if pos('&',S) <> 1 then begin result:= false; exit; end;
+  if copy(S,length(S),1) <> ';' then begin result:= false; exit; end;
+  Result:= IsXmlName(copy(S,2,length(S)-2));
+end;
+
+function IsXmlPEReference(const S: UnicodeString): boolean;
+begin
+  if pos('%',S) <> 1 then begin result:= false; exit; end;
+  if copy(S,length(S),1) <> ';' then begin result:= false; exit; end;
+  Result:= IsXmlName(copy(S,2,length(S)-2));
+end;
+
+function isXmlReference(const S: UnicodeString): boolean;
+begin
+  if IsXmlEntityRef(s) or IsXmlCharRef(s)
+    then result:= true
+    else result:= false;
+end;
+
+function isXmlEntityValue(const S: UnicodeString): boolean;
+const
+  sQuote: widechar  = #$0027;
+  dQuote: widechar  = '"';
+var
+  i,j,indexpos: integer;
+  SChar, SChar2, ForbittenQuote: widechar;
+begin
+  Result:= true;
+  if Length(S) < 2 then begin Result:= false; exit; end;
+  if (S[length(S)] = sQuote) and (S[1] = sQuote) {single quotes}
+    then ForbittenQuote:= sQuote
+    else if (S[length(S)] = dQuote) and (S[1] = dQuote) {double quotes}
+      then ForbittenQuote:= dQuote
+      else begin Result:= false; exit; end;
+
+  i:= 2;
+  while i < length(S) do begin
+    SChar:= WideChar((PWideChar(S)+i-1)^);
+    if IsUtf16LowSurrogate(sChar) then begin Result:= false; exit; end;
+    if IsUtf16HighSurrogate(SChar) then begin
+      if i+1 = length(s) then begin Result:= false; exit; end;
+      inc(i);
+      SChar:= WideChar((PWideChar(S)+i-1)^);
+      if not IsUtf16LowSurrogate(SChar) then begin Result:= false; exit; end;
+    end;
+    if not IsXmlChar(sChar) then begin Result:= false; exit; end;
+    if SChar = ForbittenQuote then begin Result:= false; exit; end;
+    if SChar = '%' then begin {PEReference?}
+      indexpos:= -1;
+      for j:= i+1 to length(S)-1 do begin
+        SChar2:= WideChar((PWideChar(S)+j-1)^);
+        if SChar2 = ';' then begin indexpos:= j; break; end;
+      end;
+      if indexpos = -1 then begin Result:= false; exit; end;
+      if not IsXmlPEReference(copy(S,i,j-i+1)) then begin Result:= false; exit; end;
+      i:= j;
+    end;
+    if SChar = '&' then begin {Reference?}
+      indexpos:= -1;
+      for j:= i+1 to length(S)-1 do begin
+        SChar2:= WideChar((PWideChar(S)+j-1)^);
+        if SChar2 = ';' then begin indexpos:= j; break; end;
+      end;
+      if indexpos = -1 then begin Result:= false; exit; end;
+      if not IsXmlReference(copy(S,i,j-i+1)) then begin Result:= false; exit; end;
+      i:= j;
+    end;
+    inc(i);
+  end;
+end;
+
+function isXmlEntityValueChars(const S: UnicodeString): boolean;
+// Returns 'true' if S consists only of legal XML characters and
+// legal XML references and there are either only single or only
+// double quotation marks in S, or if S is an empty UnicodeString.
+// Otherwise 'false' is returned.
+const
+  SEMICOLON: WideChar = #$3B;  // ';'
+var
+  firstCharPos,i,l: integer;
+  sChar: wideChar;
+  dqFound,sqFound: boolean;
+begin
+  result:= true;
+  dqFound:= false;
+  sqFound:= false;
+  i:= 0;
+  l:= length(S);
+  while i < l do begin
+    inc(i);
+    sChar:= S[i];
+    case Word(sChar) of
+      $0022: // Double quote (")
+        if sqFound
+          then begin result:= false; exit; end
+          else dqFound:= true;
+      $0026: // Ampersand (&)
+        begin
+          result:= false;
+          firstCharPos:= i;
+          while i < l do begin
+            inc(i);
+            sChar:= S[i];
+            if sChar = SEMICOLON then begin
+              if IsXmlReference(copy(S,firstCharPos,i-firstCharPos+1))
+                then begin result:= true; break end
+                else exit;
+            end; {if ...}
+          end; {while ...}
+        end;
+      // xxx What about % ?
+      $0027: // Single quote (')
+        if dqFound
+          then begin result:= false; exit; end
+          else sqFound:= true;
+      $0009,$000A,$000D,$0020,$0021,$0023..$0025,$0028..$D7FF,$E000..$FFFD: // Unicode below $FFFF
+        ; // do nothing.
+      $D800..$DBFF: // High surrogate of Unicode character [$10000..$10FFFF]
+        begin
+          if i = l
+            then begin result:= false; exit; end; // End of UnicodeString --> No low surrogate found
+          inc(i);
+          sChar:= S[i];
+          if not IsUtf16LowSurrogate(sChar)
+            then begin result:= false; exit; end; // No low surrogate found
+        end;
+    else
+      begin result:= false; exit; end;
+    end; {case ...}
+  end; {while ...}
+end;
+
+function isXmlAttValue(const S: UnicodeString): boolean;
+const
+  sQuote: widechar  = #$0027;
+  dQuote: widechar  = '"';
+var
+  i,j,indexpos: integer;
+  SChar, SChar2, ForbittenQuote: widechar;
+begin
+  Result:= true;
+  if Length(S) < 2 then begin Result:= false; exit; end;
+  if (S[length(S)] = sQuote) and (S[1] = sQuote) {single quotes}
+    then ForbittenQuote:= sQuote
+    else if (S[length(S)] = dQuote) and (S[1] = dQuote) {double quotes}
+      then ForbittenQuote:= dQuote
+      else begin Result:= false; exit; end;
+
+  i:= 2;
+  while i < length(S) do begin
+    SChar:= WideChar((PWideChar(S)+i-1)^);
+    if IsUtf16LowSurrogate(sChar) then begin Result:= false; exit; end;
+    if IsUtf16HighSurrogate(SChar) then begin
+      if i+1 = length(s) then begin Result:= false; exit; end;
+      inc(i);
+      SChar:= WideChar((PWideChar(S)+i-1)^);
+      if not IsUtf16LowSurrogate(SChar) then begin Result:= false; exit; end;
+    end;
+    if not IsXmlChar(sChar) then begin Result:= false; exit; end;
+    if SChar = ForbittenQuote then begin Result:= false; exit; end;
+    if SChar = '<' then begin Result:= false; exit; end;
+    if SChar = '&' then begin {Reference?}
+      indexpos:= -1;
+      for j:= i+1 to length(S)-1 do begin
+        SChar2:= WideChar((PWideChar(S)+j-1)^);
+        if SChar2 = ';' then begin indexpos:= j; break; end;
+      end;
+      if indexpos = -1 then begin Result:= false; exit; end;
+      if not IsXmlReference(copy(S,i,j-i+1)) then begin Result:= false; exit; end;
+      i:= j;
+    end;
+    inc(i);
+  end;
+end;
+
+function IsXmlSystemLiteral(const S: UnicodeString): boolean;
+const
+  sQuote: widechar  = #$0027;
+  dQuote: widechar  = '"';
+var
+  i,l: integer;
+  SChar, ForbittenQuote: widechar;
+begin
+  Result:= true;
+  if Length(S) < 2 then begin Result:= false; exit; end;
+  if (S[length(S)] = sQuote) and (S[1] = sQuote) {single quotes}
+    then ForbittenQuote:= sQuote
+    else if (S[length(S)] = dQuote) and (S[1] = dQuote) {double quotes}
+      then ForbittenQuote:= dQuote
+      else begin Result:= false; exit; end;
+
+  i:= 1;
+  l:= length(S)-1;
+  while i < l do begin
+    inc(i);
+    SChar:= WideChar((PWideChar(S)+i-1)^);
+    if IsUtf16LowSurrogate(sChar) then begin Result:= false; exit; end;
+    if IsUtf16HighSurrogate(SChar) then begin
+      if i+1 = length(s) then begin Result:= false; exit; end;
+      inc(i);
+      SChar:= WideChar((PWideChar(S)+i-1)^);
+      if not IsUtf16LowSurrogate(SChar) then begin Result:= false; exit; end;
+    end else if not IsXmlChar(sChar) then begin Result:= false; exit; end;
+    if SChar = ForbittenQuote then begin Result:= false; exit; end;
+  end;
+end;
+
+function isXmlSystemChars(const S: UnicodeString): boolean;
+// Returns 'true' if all characters in S are legal XML characters
+// and there are either only single or only double quotation marks
+// in S, or if S is an empty UnicodeString.
+// Otherwise 'false' is returned.
+var
+  i,l: integer;
+  sChar: wideChar;
+  dqFound,sqFound: boolean;
+begin
+  result:= true;
+  dqFound:= false;
+  sqFound:= false;
+  i:= 0;
+  l:= length(S);
+  while i < l do begin
+    inc(i);
+    sChar:= S[i];
+    case Word(sChar) of
+      $0022: // Double quote (")
+        if sqFound
+          then begin result:= false; break; end
+          else dqFound:= true;
+      $0027: // Single quote (')
+        if dqFound
+          then begin result:= false; break; end
+          else sqFound:= true;
+      $0009,$000A,$000D,$0020,$0021,$0023..$0026,$0028..$D7FF,$E000..$FFFD: // Unicode below $FFFF
+        ; // do nothing.
+      $D800..$DBFF: // High surrogate of Unicode character [$10000..$10FFFF]
+        begin
+          if i = l
+            then begin result:= false; break; end; // End of UnicodeString --> No low surrogate found
+          inc(i);
+          sChar:= S[i];
+          if not IsUtf16LowSurrogate(sChar)
+            then begin result:= false; break; end; // No low surrogate found
+        end;
+    else
+      begin result:= false; break; end;
+    end; {case ...}
+  end; {while ...}
+end;
+
+function IsXmlPubidLiteral(const S: UnicodeString): boolean;
+const
+  SQ: WideChar = #39; // code of '
+  DQ: WideChar = #34; // code of "
+var
+  i: integer;
+  SChar: widechar;
+begin
+  Result:= true;
+  if Length(S) < 2 then begin Result:= false; exit; end;
+  if (S[length(S)] = SQ) and (S[1] = SQ) then begin // single quotes
+    for i:= 2 to length(S)-1 do begin
+      SChar:= WideChar((PWideChar(S)+i-1)^);
+      if (SChar = SQ) or not IsXmlPubidChar(SChar)
+        then begin Result:= false; exit; end;
+    end;
+  end else if (S[length(S)] = DQ) and (S[1] = DQ) then begin // double quotes
+    for i:= 2 to length(S)-1 do begin
+      SChar:= WideChar((PWideChar(S)+i-1)^);
+      if not IsXmlPubidChar(SChar) then begin Result:= false; exit; end;
+    end;
+  end else begin Result:= false; exit; end;
+end;
+
+function isXmlPubidChars(const S: UnicodeString): boolean;
+// Returns 'true' if all characters in S belong to the XML PubidChar class
+// (see XML 1.0, 2nd ed., prod. [13], or if S is an empty UnicodeString.
+// Otherwise 'false' is returned.
+var
+  i: integer;
+  SChar: widechar;
+begin
+  Result:= true;
+  for i:= 1 to length(S) do begin
+    SChar:= WideChar((PWideChar(S)+i-1)^);
+    if not IsXmlPubidChar(SChar) then begin Result:= false; exit; end;
+  end;
+end;
+
+function IsXmlComment(const S: UnicodeString): boolean;
+var
+  i,lengthS: integer;
+  SChar: wideChar;
+  S2: UnicodeString;
+begin
+  Result:= true;
+  lengthS:= length(S);
+  if lengthS < 7 then begin result:= false; exit; end;
+  if copy(S,1,4) <> '<!--' then begin result:= false; exit; end;
+  if copy(S,lengthS-2,3) <> '-->' then begin result:= false; exit; end;
+  if lengthS = 7 then exit;  // Empty comment --> ok.
+  SChar:= WideChar((PWideChar(S)+lengthS-4)^);
+  if SChar = '-'
+    then begin result:= false; exit; end;
+  S2:= copy(S,5,lengthS-7);
+  if pos(UnicodeString('--'),S2) > 0 then begin result:= false; exit; end;
+  i:= 0;
+  while i < pred(length(S2)) do begin
+    inc(i);
+    SChar:= S2[i];
+    if IsUtf16LowSurrogate(sChar) then begin Result:= false; exit; end;
+    if IsUtf16HighSurrogate(SChar) then begin
+      if i = length(S2) then begin Result:= false; exit; end;
+      inc(i);
+      SChar:= S2[i];
+      if not IsUtf16LowSurrogate(SChar) then begin Result:= false; exit; end;
+    end;
+    if not IsXmlChar(sChar) then begin Result:= false; exit; end;
+  end;
+end;
+
+function IsXmlCData(const S: UnicodeString): boolean;
+var
+  i: integer;
+  SChar: wideChar;
+begin
+  Result:= true;
+  if pos(UnicodeString(']]>'),S) > 0 then begin result:= false; exit; end;
+  i:= 0;
+  while i < length(S) do begin
+    inc(i);
+    SChar:= S[i];
+    if IsUtf16LowSurrogate(sChar) then begin Result:= false; exit; end;
+    if IsUtf16HighSurrogate(SChar) then begin
+      if i = length(s) then begin Result:= false; exit; end;
+      inc(i);
+      SChar:= S[i];
+      if not IsUtf16LowSurrogate(SChar) then begin Result:= false; exit; end;
+    end;
+    if not IsXmlChar(sChar) then begin Result:= false; exit; end;
+  end;
+end;
+
+function IsXmlCharData(const S: UnicodeString): boolean;
+var
+  i: integer;
+  SChar: wideChar;
+begin
+  Result:= true;
+  i:= 0;
+  while i < length(S) do begin
+    inc(i);
+    SChar:= S[i];
+    if IsUtf16LowSurrogate(sChar) then begin Result:= false; exit; end;
+    if IsUtf16HighSurrogate(SChar) then begin
+      if i = length(s) then begin Result:= false; exit; end;
+      inc(i);
+      SChar:= S[i];
+      if not IsUtf16LowSurrogate(SChar) then begin Result:= false; exit; end;
+    end;
+    if not IsXmlChar(sChar) then begin Result:= false; exit; end;
+    if SChar = '<' then begin Result:= false; exit; end;
+    if SChar = '&' then begin Result:= false; exit; end;
+  end;
+end;
+
+function IsXmlPITarget(const S: UnicodeString): boolean;
+begin
+  Result:= IsXmlName(S);
+  if length(S) = 3 then
+    if ((S[1] = 'X') or (S[1] = 'x')) and
+       ((S[2] = 'M') or (S[2] = 'm')) and
+       ((S[3] = 'L') or (S[3] = 'l'))
+      then Result:= false;
+end;
+
+function isXmlVersionNumChar(const s: WideChar): boolean;
+begin
+  if ( ((s >= 'a') and (s <= 'z')) or
+       ((s >= 'A') and (s <= 'Z')) or
+       ((s >= '0') and (s <= '9')) or
+       (s = '_') or (s = '.') or
+       (s = ':') or (s = '-')  )
+    then result:= true
+    else result:= false;
+end;
+
+function IsXmlVersionNum(const S: UnicodeString): boolean;
+var
+  i: integer;
+begin
+  Result:= true;
+  if Length(S) = 0 then begin Result:= false; exit; end;
+  for i:= 1 to length(S) do begin
+    if not isXmlVersionNumChar(S[i])
+      then begin Result:= false; exit; end;
+  end;
+end;
+
+function isXmlEncNameLeadingChar(const s: WideChar): boolean;
+begin
+  if ( ((s >= 'a') and (s <= 'z')) or
+       ((s >= 'A') and (s <= 'Z')) )
+    then result:= true
+    else result:= false;
+end;
+
+function isXmlEncNameFollowingChar(const s: WideChar): boolean;
+begin
+  if ( ((s >= 'a') and (s <= 'z')) or
+       ((s >= 'A') and (s <= 'Z')) or
+       ((s >= '0') and (s <= '9')) or
+       (s = '.') or (s = '_') or (s = '-')  )
+    then result:= true
+    else result:= false;
+end;
+
+function IsXmlEncName(const S: UnicodeString): boolean;
+var
+  i: integer;
+begin
+  result:= true;
+  if length(S) = 0 then begin result:= false; exit; end;
+  if not isXmlEncNameLeadingChar(S[1])
+    then begin result:= false; exit; end;
+  for i:= 2 to length(S) do begin
+    if not isXmlEncNameFollowingChar(S[i])
+      then begin result:= false; exit; end;
+  end;
+end;
+
+function IsXmlStringType(const S: UnicodeString): boolean;
+begin
+  if S = 'CDATA'
+    then Result:= true
+    else Result:= false;
+end;
+
+function IsXmlTokenizedType(const S: UnicodeString): boolean;
+begin
+  if (S='ID') or (S='IDREF') or (S='IDREFS') or (S='ENTITY') or
+     (S='ENTITIES') or (S='NMTOKEN') or (S='NMTOKENS')
+    then Result:= true
+    else Result:= false;
+end;
+
+function IsXmlNCNameChar(const s: WideChar): boolean;
+begin
+  if IsXmlLetter(S) or IsXmlDigit(S) or IsXmlCombiningChar(S)
+    or IsXmlExtender(S) or (S='.') or (S='-') or (S='_')
+    then Result:= true
+    else Result:= false;
+end;
+
+function IsXmlNCName(const S: UnicodeString): boolean;
+var
+  i: integer;
+begin
+  Result:= true;
+  if Length(S) = 0 then begin Result:= false; exit; end;
+  if not ( IsXmlLetter(PWideChar(S)^)
+           or (PWideChar(S)^ = '_')   )
+    then begin Result:= false; exit; end;
+  for i:= 2 to length(S) do
+    if not IsXmlNCNameChar(S[i])
+      then begin Result:= false; exit; end;
+end;
+
+function IsXmlDefaultAttName(const S: UnicodeString): boolean;
+begin
+  if S = 'xmlns'
+    then Result:= true
+    else Result:= false;
+end;
+
+function IsXmlPrefixedAttName(const S: UnicodeString): boolean;
+var
+  piece: UnicodeString;
+begin
+  if copy(S,1,6) = 'xmlns:' then begin
+    piece:= copy(S,7,length(S)-6);
+    Result:= IsXmlNCName(piece);
+  end else Result:= false;
+end;
+
+function IsXmlNSAttName(const S: UnicodeString): boolean;
+begin
+  Result:= (IsXmlPrefixedAttName(S) or IsXmlDefaultAttName(S));
+end;
+
+function IsXmlLocalPart(const S: UnicodeString): boolean;
+begin
+  Result:= IsXmlNCName(S);
+end;
+
+function IsXmlPrefix(const S: UnicodeString): boolean;
+begin
+  Result:= IsXmlNCName(S);
+end;
+
+function IsXmlQName(const S: UnicodeString): boolean;
+var
+  colonpos: integer;
+  prefix,localpart: UnicodeString;
+begin
+  colonpos:= pos(':',S);
+  if colonpos = 0
+    then result:= IsXmlLocalPart(S)
+    else begin
+      prefix:= copy(S,1,colonpos-1);
+      localpart:= copy(S,colonpos+1,length(S)-colonpos);
+      result:= IsXmlPrefix(prefix) and IsXmlLocalPart(localpart);
+  end;
+end;
+
+function ResolveCharRefs(const S: UnicodeString): UnicodeString;
+var
+  i,j,indexpos: integer;
+  SChar, SChar2: widechar;
+  ref: UnicodeString;
+  content: TdomCustomStr;
+begin
+  result:= '';
+  content:= TdomCustomStr.create;
+  try
+    i:= 1;
+    while i <= length(S) do begin
+      SChar:= WideChar((PWideChar(S)+i-1)^);
+      if IsUtf16LowSurrogate(sChar)
+        then raise EConvertError.CreateFmt('%S must not start with a UTF-16 low surrogate.',[S]);
+      if IsUtf16HighSurrogate(SChar) then begin
+        if i+1 > length(s)
+          then raise EConvertError.CreateFmt('%S must not end with a UTF-16 high surrogate.',[S]);
+        inc(i);
+        content.addWideChar(SChar);
+        SChar:= WideChar((PWideChar(S)+i-1)^);
+        if not IsUtf16LowSurrogate(SChar)
+          then raise EConvertError.CreateFmt('%S contains an UTF-16 high surrogate without its corresponding low surrogate.',[S]);
+      end;
+      if not IsXmlChar(sChar)
+        then raise EConvertError.CreateFmt('%S contains an invalid character.',[S]);
+      if SChar = '&' then begin {Reference?}
+        indexpos:= -1;
+        for j:= i+1 to length(S) do begin
+          SChar2:= WideChar((PWideChar(S)+j-1)^);
+          if SChar2 = ';' then begin indexpos:= j; break; end;
+        end;
+        if indexpos = -1
+          then raise EConvertError.CreateFmt('%S contains an ''&'' without a '';''.',[S]);
+        ref:= copy(S,i,j-i+1);
+        if IsXmlEntityRef(ref) then begin
+          content.addWideString(ref);
+        end else if IsXmlCharRef(ref) then begin
+          content.addWideString(XmlCharRefToStr(ref));
+        end else raise EConvertError.CreateFmt('%S contains an invalid reference.',[S]);
+        i:= j;
+      end else content.addWideChar(SChar);
+      inc(i);
+    end; {while ...}
+    Result:= content.value;
+  finally
+    content.free;
+  end;
+end;
+
+function XmlIntToCharRef(const value: integer): UnicodeString;
+begin
+  Result:= concat('&#',intToStr(value),';');
+end;
+
+function XmlCharRefToInt(const S: UnicodeString): integer;
+var
+  value: word;
+begin
+  if not IsXmlCharRef(S)
+    then raise EConvertError.CreateFmt('%S is not a valid XmlCharRef value.',[S]);
+  if S[3] = 'x'
+    then Result:= StrToInt(concat('$',copy(S,4,length(S)-4))) // Hex
+    else Result:= StrToInt(copy(S,3,length(S)-3));            // Dec
+  if Result > $10FFFF
+    then raise EConvertError.CreateFmt('%S is not a valid XmlCharRef value.',[S]);
+  if Result < $10000 then begin
+    value:= Result;
+    if not IsXmlChar(WideChar(value))
+      then raise EConvertError.CreateFmt('%S is not a valid XmlCharRef value.',[S]);
+    case result of
+      $D800..$DBFF, // Reserved for high surrogate of Unicode character [$10000..$10FFFF]
+      $DC00..$DFFF: // Reserved for low surrogate of Unicode character [$10000..$10FFFF]
+      raise EConvertError.CreateFmt('%S is not a valid XmlCharRef value.',[S]);
+    end; {case ...}
+  end; {if ...}
+end;
+
+function XmlCharRefToStr(const S: UnicodeString): UnicodeString;
+var
+  value: integer;
+  smallValue: word;
+begin
+  value:= XmlCharRefToInt(S);
+  if value < $10000 then begin
+    smallValue:= value;
+    Result:= UnicodeString(WideChar(smallValue));
+  end else
+    Result:= concat(UnicodeString(Utf16HighSurrogate(value)),
+                    UnicodeString(Utf16LowSurrogate(value)));
+end;
+
+function XmlStrToCharRef(const S: UnicodeString): UnicodeString;
+var
+  SChar,LowSur: widechar;
+  i: integer;
+begin
+  result:= '';
+  i:= 0;
+  while i < length(S) do begin
+    inc(i);
+    SChar:= S[i];
+    if not isXmlChar(SChar)
+      then raise EConvertError.CreateFmt('String contains invalid character %S.',[S]);
+    if isUtf16LowSurrogate(SChar)
+      then raise EConvertError.CreateFmt('Low surrogate %S without high surrogate.',[S]);
+    if isUtf16HighSurrogate(SChar) then begin
+      if i+1 = length(s)
+        then raise EConvertError.CreateFmt('High surrogate %S without low surrogate at end of string.',[S]);
+      inc(i);
+      lowSur:= S[i];
+      if not IsUtf16LowSurrogate(lowSur)
+        then raise EConvertError.CreateFmt('High surrogate %S without low surrogate.',[S]);
+      result:= concat(result,XmlIntToCharRef(Utf16SurrogateToInt(SChar,lowSur)));
+    end else begin
+      result:= concat(result,XmlIntToCharRef(ord(SChar)));
+    end;
+  end; {for ...}
+end;
+
+function isAbnfALPHAWideChar(c: wideChar): boolean;
+begin
+  case word(c) of
+    $0041..$005A,$0061..$007A:
+    result:= true;
+  else
+    result:= false;
+  end;
+end;
+
+function isAbnfBITWideChar(c: wideChar): boolean;
+begin
+  if (c = '0') or (c = '1')
+    then result:= true
+    else result:= false;
+end;
+
+function isAbnfCHARWideChar(c: wideChar): boolean;
+begin
+  case word(c) of
+    $0001..$007F:
+    result:= true;
+  else
+    result:= false;
+  end;
+end;
+
+function isAbnfCRWideChar(c: wideChar): boolean;
+begin
+  if c = #$0D
+    then result:= true
+    else result:= false;
+end;
+
+function isAbnfCRLFWideStr(s: UnicodeString): boolean;
+begin
+  if s = #$0D#$0A
+    then result:= true
+    else result:= false;
+end;
+
+function isAbnfCTLWideChar(c: wideChar): boolean;
+begin
+  case word(c) of
+    $0000..$001F,$007F:
+    result:= true;
+  else
+    result:= false;
+  end;
+end;
+
+function isAbnfDIGITWideChar(c: wideChar): boolean;
+begin
+  case word(c) of
+    $0030..$0039:
+    result:= true;
+  else
+    result:= false;
+  end;
+end;
+
+function isAbnfDQUOTEWideChar(c: wideChar): boolean;
+begin
+  if c = #$22
+    then result:= true
+    else result:= false;
+end;
+
+function isAbnfHEXDIGWideChar(c: wideChar): boolean;
+begin
+  case word(c) of
+    $0030..$0039,$0041..$0046:
+    result:= true;
+  else
+    result:= false;
+  end;
+end;
+
+function isAbnfHTABWideChar(c: wideChar): boolean;
+begin
+  if c = #$09
+    then result:= true
+    else result:= false;
+end;
+
+function isAbnfLFWideChar(c: wideChar): boolean;
+begin
+  if c = #$0A
+    then result:= true
+    else result:= false;
+end;
+
+function isAbnfLWSPWideStr(s: UnicodeString): boolean;
+var
+  i,l: integer;
+begin
+  l:= length(s);
+  if l = 0
+    then begin result:= false; exit; end
+    else result:= true;
+  i:= 0;
+  while i < l do begin
+    inc(i);
+    case word(s[i]) of
+      $0020,$0009:; // SP or TAB --> Do nothing, because everthing is alright
+      $000D: begin  // CR --> Look for LF
+        if i = l then begin result:= false; exit; end;
+        inc(i);
+        if s[i] <> #$0A then begin result:= false; exit; end;
+      end;
+    else begin
+      result:= false;
+      exit;
+      end;
+    end;
+  end;
+end;
+
+function isAbnfOCTETWideChar(c: wideChar): boolean;
+begin
+  case word(c) of
+    $0000..$00ff:
+    result:= true;
+  else
+    result:= false;
+  end;
+end;
+
+function isAbnfSPWideChar(c: wideChar): boolean;
+begin
+  if c = #$20
+    then result:= true
+    else result:= false;
+end;
+
+function isAbnfVCHARWideChar(c: wideChar): boolean;
+begin
+  case word(c) of
+    $0021..$007E:
+    result:= true;
+  else
+    result:= false;
+  end;
+end;
+
+function isAbnfWSPWideChar(c: wideChar): boolean;
+begin
+  case word(c) of
+    $0020,$0009:
+    result:= true;
+  else
+    result:= false;
+  end;
+end;
+
+function isAbnfALPHAChar(c: Ansichar): boolean;
+begin
+  case byte(c) of
+    $41..$5A,$61..$7A:
+    result:= true;
+  else
+    result:= false;
+  end;
+end;
+
+function isAbnfBITChar(c: Ansichar): boolean;
+begin
+  if (c = AnsiChar('0')) or (c = AnsiChar('1'))
+    then result:= true
+    else result:= false;
+end;
+
+function isAbnfCHARChar(c: Ansichar): boolean;
+begin
+  case byte(c) of
+    $01..$7F:
+    result:= true;
+  else
+    result:= false;
+  end;
+end;
+
+function isAbnfCRChar(c: Ansichar): boolean;
+begin
+  if c = AnsiChar(#$0D)
+    then result:= true
+    else result:= false;
+end;
+
+function isAbnfCRLFStr(s: Ansistring): boolean;
+begin
+  if s = AnsiString(#$0D#$0A)
+    then result:= true
+    else result:= false;
+end;
+
+function isAbnfCTLChar(c: Ansichar): boolean;
+begin
+  case byte(c) of
+    $00..$1F,$7F:
+    result:= true;
+  else
+    result:= false;
+  end;
+end;
+
+function isAbnfDIGITChar(c: Ansichar): boolean;
+begin
+  case byte(c) of
+    $30..$39:
+    result:= true;
+  else
+    result:= false;
+  end;
+end;
+
+function isAbnfDQUOTEChar(c: Ansichar): boolean;
+begin
+  if c = AnsiChar(#$22)
+    then result:= true
+    else result:= false;
+end;
+
+function isAbnfHEXDIGChar(c: Ansichar): boolean;
+begin
+  case byte(c) of
+    $30..$39,$41..$46:
+    result:= true;
+  else
+    result:= false;
+  end;
+end;
+
+function isAbnfHTABChar(c: AnsiChar): boolean;
+begin
+  if c = AnsiChar(#$09)
+    then result:= true
+    else result:= false;
+end;
+
+function isAbnfLFChar(c: AnsiChar): boolean;
+begin
+  if c = AnsiChar(#$0A)
+    then result:= true
+    else result:= false;
+end;
+
+function isAbnfLWSPStr(s: Ansistring): boolean;
+var
+  i,l: integer;
+begin
+  l:= length(s);
+  if l = 0
+    then begin result:= false; exit; end
+    else result:= true;
+  i:= 0;
+  while i < l do begin
+    inc(i);
+    case byte(s[i]) of
+      $20,$09:; // SP or TAB --> Do nothing, because everthing is alright
+      $0D: begin  // CR --> Look for LF
+        if i = l then begin result:= false; exit; end;
+        inc(i);
+        if s[i] <> AnsiChar(#$0A) then begin result:= false; exit; end;
+      end;
+    else begin
+      result:= false;
+      exit;
+      end;
+    end;
+  end;
+end;
+
+function isAbnfOCTETChar(c: AnsiChar): boolean;
+begin
+  case byte(c) of
+    $00..$ff:
+    result:= true;
+  else
+    result:= false;
+  end;
+end;
+
+function isAbnfSPChar(c: AnsiChar): boolean;
+begin
+  if c = AnsiChar(#$20)
+    then result:= true
+    else result:= false;
+end;
+
+function isAbnfVCHARChar(c: AnsiChar): boolean;
+begin
+  case byte(c) of
+    $21..$7E:
+    result:= true;
+  else
+    result:= false;
+  end;
+end;
+
+function isAbnfWSPChar(c: AnsiChar): boolean;
+begin
+  case byte(c) of
+    $20,$09:
+    result:= true;
+  else
+    result:= false;
+  end;
+end;
+
+function isUriURI_referencewideStr(s: UnicodeString): boolean;
+var
+  dcPos: integer;
+  s1: string;
+begin
+  dcPos:= pos('#',s);
+  if dcPos > 0 then begin
+    s1:= copy(s,1,dcPos-1);
+    result:= (   isUriAbsoluteURIwideStr(s1)
+              or isUriRelativeURIwideStr(s1)
+              or (s1 = '') )
+              and isUriFragmentwideStr(copy(s,dcPos+1,length(s)-dcPos));
+  end else
+    result:= isUriAbsoluteURIwideStr(s) or isUriRelativeURIwideStr(s) or (s = '');
+end;
+
+function isUriAbsoluteURIwideStr(s: UnicodeString): boolean;
+var
+  colonPos: integer;
+  s1: string;
+begin
+  colonPos:= pos(':',s);
+  if colonPos > 0 then begin
+    s1:= copy(s,colonPos+1,length(s)-colonPos);
+    result:= isUriSchemewideStr(copy(s,1,colonPos-1)) and
+             ( isUriHier_partwideStr(s1) or isUriOpaque_partwideStr(s1) );
+  end else result:= false;
+end;
+
+function isUriRelativeURIwideStr(s: UnicodeString): boolean;
+var
+  qmPos: integer;
+  s1: string;
+begin
+  qmPos:= pos(#63,s);
+  if qmPos > 0 then begin
+    s1:= copy(s,1,qmPos-1);
+    result:= (   isUriNet_pathwideStr(s1)
+              or isUriAbs_pathwideStr(s1)
+              or isUriRel_pathwideStr(s1) )
+              and isUriQuerywideStr(copy(s,qmPos+1,length(s)-qmPos));
+  end else
+    result:= isUriNet_pathwideStr(s) or isUriAbs_pathwideStr(s) or isUriRel_pathwideStr(s);
+end;
+
+function isUriHier_partwideStr(s: UnicodeString): boolean;
+var
+  qmPos: integer;
+  s1: string;
+begin
+  qmPos:= pos(#63,s);
+  if qmPos > 0 then begin
+    s1:= copy(s,1,qmPos-1);
+    result:= (   isUriNet_pathwideStr(s1)
+              or isUriAbs_pathwideStr(s1) )
+              and isUriQuerywideStr(copy(s,qmPos+1,length(s)-qmPos));
+  end else
+    result:= isUriNet_pathwideStr(s) or isUriAbs_pathwideStr(s);
+end;
+
+function isUriOpaque_partwideStr(s: UnicodeString): boolean;
+begin
+  if s = '' then begin result:= false; exit; end;
+  if s[1] = '/' then begin result:= false; exit; end;
+  result:= isUriUricwideStr(s);
+end;
+
+function isUriNet_pathwideStr(s: UnicodeString): boolean;
+var
+  slashPos: integer;
+begin
+  if copy(s,1,2) <> '//' then begin result:= false; exit; end;
+  s:= copy(s,3,length(s)-2);
+  slashPos:= pos('/',s);
+  if slashPos > 0 then begin
+    result:= isUriAuthoritywideStr(copy(s,1,slashPos-1)) and isUriAbs_pathwideStr(copy(s,slashPos,length(s)-slashPos+1));
+  end else
+    result:= isUriAuthoritywideStr(s);
+end;
+
+function isUriAbs_pathwideStr(s: UnicodeString): boolean;
+begin
+  if s = '' then begin result:= false; exit; end;
+  if s[1] <> '/' then begin result:= false; exit; end;
+  result:= isUriPath_segmentswideStr(copy(s,2,length(s)-1));
+end;
+
+function isUriRel_pathwideStr(s: UnicodeString): boolean;
+var
+  slashPos: integer;
+begin
+  slashPos:= pos('/',s);
+  if slashPos > 0 then begin
+    result:= isUriRel_segmentwideStr(copy(s,1,slashPos-1)) and isUriAbs_pathwideStr(copy(s,slashPos,length(s)-slashPos+1));
+  end else
+    result:= isUriRel_segmentwideStr(s);
+end;
+
+function isUriRel_segmentwideStr(s: UnicodeString): boolean;
+var
+  i,l: integer;
+begin
+  l:= length(s);
+  if l = 0 then begin result:= false; exit; end;
+  result:= true;
+  i:= 0;
+  while i < l do begin
+    inc(i);
+    if s[i] = '%' then begin
+      if i = l then begin result:= false; exit; end;
+      inc(i);
+      if not isUriHexWideChar(s[i]) then begin result:= false; exit; end;
+      if i = l then begin result:= false; exit; end;
+      inc(i);
+      if not isUriHexWideChar(s[i]) then begin result:= false; exit; end;
+    end else if not ( isUriUnreservedWideChar(s[i])
+                      or (s[i] = ';') or (s[i] = '@') or (s[i] = '&')
+                      or (s[i] = '=') or (s[i] = '+') or (s[i] = '$')
+                      or (s[i] = ',') )
+      then begin result:= false; exit; end;
+  end;
+end;
+
+function isUriSchemewideStr(s: UnicodeString): boolean;
+var
+  i,l: integer;
+begin
+  l:= length(s);
+  if l = 0 then begin result:= false; exit; end;
+  if not isAbnfALPHAWideChar(s[1]) then begin result:= false; exit; end;
+  result:= true;
+  for i:= 2 to l do
+    if not (    isAbnfALPHAWideChar(s[i])
+             or isAbnfDIGITWideChar(s[i])
+             or (s[i] = '+')
+             or (s[i] = '-')
+             or (s[i] = '.')
+           )
+      then begin result:= false; exit; end;
+end;
+
+function isUriAuthoritywideStr(s: UnicodeString): boolean;
+begin
+  result:= isUriServerwideStr(s) or isUriReg_namewideStr(s);
+end;
+
+function isUriReg_namewideStr(s: UnicodeString): boolean;
+var
+  i,l: integer;
+begin
+  l:= length(s);
+  if l = 0 then begin result:= false; exit; end;
+  result:= true;
+  i:= 0;
+  while i < l do begin
+    inc(i);
+    if s[i] = '%' then begin
+      if i = l then begin result:= false; exit; end;
+      inc(i);
+      if not isUriHexWideChar(s[i]) then begin result:= false; exit; end;
+      if i = l then begin result:= false; exit; end;
+      inc(i);
+      if not isUriHexWideChar(s[i]) then begin result:= false; exit; end;
+    end else if not ( isUriUnreservedWideChar(s[i])
+                      or (s[i] = '$') or (s[i] = ',') or (s[i] = ';')
+                      or (s[i] = ':') or (s[i] = '@') or (s[i] = '&')
+                      or (s[i] = '=') or (s[i] = '+') )
+      then begin result:= false; exit; end;
+  end;
+end;
+
+function isUriServerwideStr(s: UnicodeString): boolean;
+var
+  atPos,l: integer;
+begin
+  l:= length(s);
+  if l = 0 then begin result:= true; exit; end;
+  atPos:= pos('@',s);
+  if atPos > 0 then begin
+    result:= isUriUserinfowideStr(copy(s,1,atPos-1)) and isUriHostportwideStr(copy(s,atPos+1,l-atPos));
+  end else
+    result:= isUriHostportwideStr(s);
+end;
+
+function isUriUserinfowideStr(s: UnicodeString): boolean;
+var
+  i,l: integer;
+begin
+  l:= length(s);
+  result:= true;
+  if l = 0 then exit;
+  i:= 0;
+  while i < l do begin
+    inc(i);
+    if s[i] = '%' then begin
+      if i = l then begin result:= false; exit; end;
+      inc(i);
+      if not isUriHexWideChar(s[i]) then begin result:= false; exit; end;
+      if i = l then begin result:= false; exit; end;
+      inc(i);
+      if not isUriHexWideChar(s[i]) then begin result:= false; exit; end;
+    end else if not ( isUriUnreservedWideChar(s[i])
+                      or (s[i] = ';') or (s[i] = ':') or (s[i] = '&')
+                      or (s[i] = '=') or (s[i] = '+') or (s[i] = '$')
+                      or (s[i] = ',') )
+      then begin result:= false; exit; end;
+  end;
+end;
+
+function isUriHostPortwideStr(s: UnicodeString): boolean;
+var
+  colonPos: integer;
+begin
+  colonPos:= pos(':',s);
+  if colonPos > 0 then begin
+    result:= isUriHostwideStr(copy(s,1,colonPos-1)) and isUriPortwideStr(copy(s,colonPos+1,length(s)-colonPos));
+  end else
+    result:= isUriHostwideStr(s);
+end;
+
+function isUriHostwideStr(s: UnicodeString): boolean;
+begin
+  result:= isUriHostnamewideStr(s) or isUriIPv4addresswideStr(s);
+end;
+
+function isUriHostnamewideStr(s: UnicodeString): boolean;
+var
+  i,l: integer;
+begin
+  l:= length(s);
+  if l = 0 then begin result:= false; exit; end;
+  result:= true;
+  if s[l] = '.' then dec(l);
+  i:= l;
+  while i > 0 do begin
+    if s[i] = '.' then break;
+    dec(i);
+  end;
+  if not isUriToplabelwideStr(copy(s,i+1,l-i))
+    then begin result:= false; exit; end;
+  while i > 0 do begin
+    l:= i;
+    if s[l] = '.' then dec(l);
+    i:= l;
+    while i > 0 do begin
+      if s[i] = '.' then break;
+      dec(i);
+    end;
+    if not isUriDomainlabelwideStr(copy(s,i+1,l-i))
+      then begin result:= false; exit; end;
+  end;
+end;
+
+function isUriDomainlabelwideStr(s: UnicodeString): boolean;
+var
+  i,l: integer;
+begin
+  l:= length(s);
+  if l = 0 then begin result:= false; exit; end;
+  if not ( isUriAlphanumWideChar(s[1]) and isUriAlphanumWideChar(s[l]) )
+    then begin result:= false; exit; end;
+  result:= true;
+  i:= 1;
+  while i < l do begin
+    inc(i);
+    if not (isUriAlphanumWideChar(s[i]) or (s[i] = '-') )
+       then begin result:= false; exit; end;
+  end;
+end;
+
+function isUriToplabelwideStr(s: UnicodeString): boolean;
+var
+  i,l: integer;
+begin
+  l:= length(s);
+  if l = 0 then begin result:= false; exit; end;
+  if not ( isUriAlphaWideChar(s[1]) and isUriAlphanumWideChar(s[l]) )
+    then begin result:= false; exit; end;
+  result:= true;
+  i:= 1;
+  while i < l do begin
+    inc(i);
+    if not (isUriAlphanumWideChar(s[i]) or (s[i] = '-') )
+       then begin result:= false; exit; end;
+  end;
+end;
+
+function isUriIPv4addresswideStr(s: UnicodeString): boolean;
+var
+  digitNo,colonNo,i,l: integer;
+  digitFound: boolean;
+begin
+  result:= false;
+  l:= length(s);
+  i:= 0;
+  digitNo:= 0;
+  colonNo:= 0;
+  digitFound:= false;
+  while i < l do begin
+    if isUriDigitWideChar(s[i]) then begin
+      if not digitFound then begin
+        digitFound:= true;
+        inc(digitNo);
+      end;
+    end else if s[i] = '.' then begin
+      if not digitFound then exit;
+      digitFound:= false;
+      inc(colonNo);
+    end else exit;
+  end;
+  if (colonNo = 3) and (digitNo = 4) then result:= true;
+end;
+
+function isUriPortwideStr(s: UnicodeString): boolean;
+var
+  i,l: integer;
+begin
+  result:= true;
+  l:= length(s);
+  for i:= 1 to l do
+    if not isUriDigitWideChar(s[i]) then begin result:= false; exit; end;
+end;
+
+function isUriPathwideStr(s: UnicodeString): boolean;
+begin
+  if isUriAbs_pathwideStr(s) or isUriOpaque_partwideStr(s) or (s = '')
+    then result:= true
+    else result:= false;
+end;
+
+function isUriPath_segmentswideStr(s: UnicodeString): boolean;
+var
+  i,l: integer;
+begin
+  l:= length(s);
+  result:= true;
+  if l = 0 then exit;
+  i:= 0;
+  while i < l do begin
+    inc(i);
+    if s[i] = '%' then begin
+      if i = l then begin result:= false; exit; end;
+      inc(i);
+      if not isUriHexWideChar(s[i]) then begin result:= false; exit; end;
+      if i = l then begin result:= false; exit; end;
+      inc(i);
+      if not isUriHexWideChar(s[i]) then begin result:= false; exit; end;
+    end else if not ( isUriUnreservedWideChar(s[i])
+                      or (s[i] = ':') or (s[i] = '@') or (s[i] = '&')
+                      or (s[i] = '=') or (s[i] = '+') or (s[i] = '$')
+                      or (s[i] = ',') or (s[i] = ';') or (s[i] = '/') )
+      then begin result:= false; exit; end;
+  end;
+end;
+
+function isUriSegmentwideStr(s: UnicodeString): boolean;
+var
+  i,l: integer;
+begin
+  l:= length(s);
+  result:= true;
+  if l = 0 then exit;
+  i:= 0;
+  while i < l do begin
+    inc(i);
+    if s[i] = '%' then begin
+      if i = l then begin result:= false; exit; end;
+      inc(i);
+      if not isUriHexWideChar(s[i]) then begin result:= false; exit; end;
+      if i = l then begin result:= false; exit; end;
+      inc(i);
+      if not isUriHexWideChar(s[i]) then begin result:= false; exit; end;
+    end else if not ( isUriUnreservedWideChar(s[i])
+                      or (s[i] = ':') or (s[i] = '@') or (s[i] = '&')
+                      or (s[i] = '=') or (s[i] = '+') or (s[i] = '$')
+                      or (s[i] = ',') or (s[i] = ';') )
+      then begin result:= false; exit; end;
+  end;
+end;
+
+function isUriParamwideStr(s: UnicodeString): boolean;
+var
+  i,l: integer;
+begin
+  l:= length(s);
+  result:= true;
+  if l = 0 then exit;
+  i:= 0;
+  while i < l do begin
+    inc(i);
+    if s[i] = '%' then begin
+      if i = l then begin result:= false; exit; end;
+      inc(i);
+      if not isUriHexWideChar(s[i]) then begin result:= false; exit; end;
+      if i = l then begin result:= false; exit; end;
+      inc(i);
+      if not isUriHexWideChar(s[i]) then begin result:= false; exit; end;
+    end else if not ( isUriUnreservedWideChar(s[i])
+                      or (s[i] = ':') or (s[i] = '@') or (s[i] = '&')
+                      or (s[i] = '=') or (s[i] = '+') or (s[i] = '$')
+                      or (s[i] = ',') )
+      then begin result:= false; exit; end;
+  end;
+end;
+
+function isUriQuerywideStr(s: UnicodeString): boolean;
+begin
+  if s = ''
+    then result:= true
+    else result:= isUriUricwideStr(s);
+end;
+
+function isUriFragmentwideStr(s: UnicodeString): boolean;
+begin
+  if s = ''
+    then result:= true
+    else result:= isUriUricwideStr(s);
+end;
+
+function isUriUricwideStr(s: UnicodeString): boolean;
+var
+  i,l: integer;
+begin
+  l:= length(s);
+  if l = 0
+    then begin result:= false; exit; end
+    else result:= true;
+  i:= 0;
+  while i < l do begin
+    inc(i);
+    if s[i] = '%' then begin
+      if i = l then begin result:= false; exit; end;
+      inc(i);
+      if not isUriHexWideChar(s[i]) then begin result:= false; exit; end;
+      if i = l then begin result:= false; exit; end;
+      inc(i);
+      if not isUriHexWideChar(s[i]) then begin result:= false; exit; end;
+    end else if not ( isUriReservedWideChar(s[i]) or isUriUnreservedWideChar(s[i]) )
+      then begin result:= false; exit; end;
+  end;
+end;
+
+function isUriReservedWideChar(c: wideChar): boolean;
+begin
+  if (c=';') or (c='/') or (c=#63) or (c=':') or (c='@') or (c='&') or
+     (c='=') or (c='+') or (c='$') or (c=',')
+    then result:= true
+    else result:= false;
+end;
+
+function isUriUnreservedWideChar(c: wideChar): boolean;
+begin
+  if isUriAlphanumWideChar(c) or isUriMarkWideChar(c)
+    then result:= true
+    else result:= false;
+end;
+
+function isUriMarkWideChar(c: wideChar): boolean;
+begin
+  if (c='-') or (c='_') or (c='.') or (c='!') or (c='~') or (c='*') or
+     (c=#39) or (c='(') or (c=')')
+    then result:= true
+    else result:= false;
+end;
+
+function isUriHexWideChar(c: wideChar): boolean;
+begin
+  case word(c) of
+    $0030..$0039,$0041..$0046,$0061..$0066:  // 0..9 , A..F , a..f
+    result:= true;
+  else
+    result:= false;
+  end;
+end;
+
+function isUriAlphanumWideChar(c: wideChar): boolean;
+begin
+  case word(c) of
+    $0030..$0039,$0041..$005A,$0061..$007A:
+    result:= true;
+  else
+    result:= false;
+  end;
+end;
+
+function isUriAlphaWideChar(c: wideChar): boolean;
+begin
+  case word(c) of
+    $0041..$005A,$0061..$007A:
+    result:= true;
+  else
+    result:= false;
+  end;
+end;
+
+function isUriDigitWideChar(c: wideChar): boolean;
+begin
+  case word(c) of
+    $0030..$0039:
+    result:= true;
+  else
+    result:= false;
+  end;
+end;
+
+function isUriURI_referenceStr(s: Ansistring): boolean;
+var
+  dcPos: integer;
+  s1: Ansistring;
+begin
+  dcPos:= pos(AnsiChar('#'),s);
+  if dcPos > 0 then begin
+    s1:= copy(s,1,dcPos-1);
+    result:= (   isUriAbsoluteURIStr(s1)
+              or isUriRelativeURIStr(s1)
+              or (s1 = '') )
+              and isUriFragmentStr(copy(s,dcPos+1,length(s)-dcPos));
+  end else
+    result:= isUriAbsoluteURIStr(s) or isUriRelativeURIStr(s) or (s = '');
+end;
+
+function isUriAbsoluteURIStr(s: Ansistring): boolean;
+var
+  colonPos: integer;
+  s1: Ansistring;
+begin
+  colonPos:= pos(AnsiChar(':'),s);
+  if colonPos > 0 then begin
+    s1:= copy(s,colonPos+1,length(s)-colonPos);
+    result:= isUriSchemeStr(copy(s,1,colonPos-1)) and
+             ( isUriHier_partStr(s1) or isUriOpaque_partStr(s1) );
+  end else result:= false;
+end;
+
+function isUriRelativeURIStr(s: Ansistring): boolean;
+var
+  qmPos: integer;
+  s1: Ansistring;
+begin
+  qmPos:= pos(AnsiChar('?'),s);
+  if qmPos > 0 then begin
+    s1:= copy(s,1,qmPos-1);
+    result:= (   isUriNet_pathStr(s1)
+              or isUriAbs_pathStr(s1)
+              or isUriRel_pathStr(s1) )
+              and isUriQueryStr(copy(s,qmPos+1,length(s)-qmPos));
+  end else
+    result:= isUriNet_pathStr(s) or isUriAbs_pathStr(s) or isUriRel_pathStr(s);
+end;
+
+function isUriHier_partStr(s: Ansistring): boolean;
+var
+  qmPos: integer;
+  s1: Ansistring;
+begin
+  qmPos:= pos(AnsiChar('?'),s);
+  if qmPos > 0 then begin
+    s1:= copy(s,1,qmPos-1);
+    result:= (   isUriNet_pathStr(s1)
+              or isUriAbs_pathStr(s1) )
+              and isUriQueryStr(copy(s,qmPos+1,length(s)-qmPos));
+  end else
+    result:= isUriNet_pathStr(s) or isUriAbs_pathStr(s);
+end;
+
+function isUriOpaque_partStr(s: Ansistring): boolean;
+begin
+  if s = '' then begin result:= false; exit; end;
+  if s[1] = AnsiChar('/') then begin result:= false; exit; end;
+  result:= isUriUricStr(s);
+end;
+
+function isUriNet_pathStr(s: Ansistring): boolean;
+var
+  slashPos: integer;
+begin
+  if copy(s,1,2) <> AnsiString('//') then begin result:= false; exit; end;
+  s:= copy(s,3,length(s)-2);
+  slashPos:= pos(AnsiChar('/'),s);
+  if slashPos > 0 then begin
+    result:= isUriAuthorityStr(copy(s,1,slashPos-1)) and isUriAbs_pathStr(copy(s,slashPos,length(s)-slashPos+1));
+  end else
+    result:= isUriAuthorityStr(s);
+end;
+
+function isUriAbs_pathStr(s: AnsiString): boolean;
+begin
+  if s = '' then begin result:= false; exit; end;
+  if s[1] <> AnsiChar('/') then begin result:= false; exit; end;
+  result:= isUriPath_segmentsStr(copy(s,2,length(s)-1));
+end;
+
+function isUriRel_pathStr(s: Ansistring): boolean;
+var
+  slashPos: integer;
+begin
+  slashPos:= pos(AnsiChar('/'),s);
+  if slashPos > 0 then begin
+    result:= isUriRel_segmentStr(copy(s,1,slashPos-1)) and isUriAbs_pathStr(copy(s,slashPos,length(s)-slashPos+1));
+  end else
+    result:= isUriRel_segmentStr(s);
+end;
+
+function isUriRel_segmentStr(s: Ansistring): boolean;
+var
+  i,l: integer;
+begin
+  l:= length(s);
+  if l = 0 then begin result:= false; exit; end;
+  result:= true;
+  i:= 0;
+  while i < l do begin
+    inc(i);
+    if s[i] = AnsiChar('%') then begin
+      if i = l then begin result:= false; exit; end;
+      inc(i);
+      if not isUriHexChar(s[i]) then begin result:= false; exit; end;
+      if i = l then begin result:= false; exit; end;
+      inc(i);
+      if not isUriHexChar(s[i]) then begin result:= false; exit; end;
+    end else if not ( isUriUnreservedChar(s[i])
+                      or (s[i] = AnsiChar(';')) or (s[i] = AnsiChar('@')) or (s[i] = AnsiChar('&'))
+                      or (s[i] = AnsiChar('=')) or (s[i] = AnsiChar('+')) or (s[i] = AnsiChar('$'))
+                      or (s[i] = AnsiChar(',')) )
+      then begin result:= false; exit; end;
+  end;
+end;
+
+function isUriSchemeStr(s: Ansistring): boolean;
+var
+  i,l: integer;
+begin
+  l:= length(s);
+  if l = 0 then begin result:= false; exit; end;
+  if not isAbnfALPHAChar(s[1]) then begin result:= false; exit; end;
+  result:= true;
+  for i:= 2 to l do
+    if not (    isAbnfALPHAChar(s[i])
+             or isAbnfDIGITChar(s[i])
+             or (s[i] = AnsiChar('+'))
+             or (s[i] = AnsiChar('-'))
+             or (s[i] = AnsiChar('.'))
+           )
+      then begin result:= false; exit; end;
+end;
+
+function isUriAuthorityStr(s: Ansistring): boolean;
+begin
+  result:= isUriServerStr(s) or isUriReg_nameStr(s);
+end;
+
+function isUriReg_nameStr(s: Ansistring): boolean;
+var
+  i,l: integer;
+begin
+  l:= length(s);
+  if l = 0 then begin result:= false; exit; end;
+  result:= true;
+  i:= 0;
+  while i < l do begin
+    inc(i);
+    if s[i] = AnsiChar('%') then begin
+      if i = l then begin result:= false; exit; end;
+      inc(i);
+      if not isUriHexChar(s[i]) then begin result:= false; exit; end;
+      if i = l then begin result:= false; exit; end;
+      inc(i);
+      if not isUriHexChar(s[i]) then begin result:= false; exit; end;
+    end else if not ( isUriUnreservedChar(s[i])
+                      or (s[i] = AnsiChar('$')) or (s[i] = AnsiChar(',')) or (s[i] = AnsiChar(';'))
+                      or (s[i] = AnsiChar(':')) or (s[i] = AnsiChar('@')) or (s[i] = AnsiChar('&'))
+                      or (s[i] = AnsiChar('=')) or (s[i] = AnsiChar('+')) )
+      then begin result:= false; exit; end;
+  end;
+end;
+
+function isUriServerStr(s: Ansistring): boolean;
+var
+  atPos,l: integer;
+begin
+  l:= length(s);
+  if l = 0 then begin result:= true; exit; end;
+  atPos:= pos(AnsiChar('@'),s);
+  if atPos > 0 then begin
+    result:= isUriUserinfoStr(copy(s,1,atPos-1)) and isUriHostportStr(copy(s,atPos+1,l-atPos));
+  end else
+    result:= isUriHostportStr(s);
+end;
+
+function isUriUserinfoStr(s: Ansistring): boolean;
+var
+  i,l: integer;
+begin
+  l:= length(s);
+  result:= true;
+  if l = 0 then exit;
+  i:= 0;
+  while i < l do begin
+    inc(i);
+    if s[i] = '%' then begin
+      if i = l then begin result:= false; exit; end;
+      inc(i);
+      if not isUriHexChar(s[i]) then begin result:= false; exit; end;
+      if i = l then begin result:= false; exit; end;
+      inc(i);
+      if not isUriHexChar(s[i]) then begin result:= false; exit; end;
+    end else if not ( isUriUnreservedChar(s[i])
+                      or (s[i] = ';') or (s[i] = ':') or (s[i] = '&')
+                      or (s[i] = '=') or (s[i] = '+') or (s[i] = '$')
+                      or (s[i] = ',') )
+      then begin result:= false; exit; end;
+  end;
+end;
+
+function isUriHostPortStr(s: ansistring): boolean;
+var
+  colonPos: integer;
+begin
+  colonPos:= pos(AnsiChar(':'),s);
+  if colonPos > 0 then begin
+    result:= isUriHostStr(copy(s,1,colonPos-1)) and isUriPortStr(copy(s,colonPos+1,length(s)-colonPos));
+  end else
+    result:= isUriHostStr(s);
+end;
+
+function isUriHostStr(s: Ansistring): boolean;
+begin
+  result:= isUriHostnameStr(s) or isUriIPv4addressStr(s);
+end;
+
+function isUriHostnameStr(s: Ansistring): boolean;
+var
+  i,l: integer;
+begin
+  l:= length(s);
+  if l = 0 then begin result:= false; exit; end;
+  result:= true;
+  if s[l] = '.' then dec(l);
+  i:= l;
+  while i > 0 do begin
+    if s[i] = '.' then break;
+    dec(i);
+  end;
+  if not isUriToplabelStr(copy(s,i+1,l-i))
+    then begin result:= false; exit; end;
+  while i > 0 do begin
+    l:= i;
+    if s[l] = '.' then dec(l);
+    i:= l;
+    while i > 0 do begin
+      if s[i] = '.' then break;
+      dec(i);
+    end;
+    if not isUriDomainlabelStr(copy(s,i+1,l-i))
+      then begin result:= false; exit; end;
+  end;
+end;
+
+function isUriDomainlabelStr(s: Ansistring): boolean;
+var
+  i,l: integer;
+begin
+  l:= length(s);
+  if l = 0 then begin result:= false; exit; end;
+  if not ( isUriAlphanumChar(s[1]) and isUriAlphanumChar(s[l]) )
+    then begin result:= false; exit; end;
+  result:= true;
+  i:= 1;
+  while i < l do begin
+    inc(i);
+    if not (isUriAlphanumChar(s[i]) or (s[i] = '-') )
+       then begin result:= false; exit; end;
+  end;
+end;
+
+function isUriToplabelStr(s: Ansistring): boolean;
+var
+  i,l: integer;
+begin
+  l:= length(s);
+  if l = 0 then begin result:= false; exit; end;
+  if not ( isUriAlphaChar(s[1]) and isUriAlphanumChar(s[l]) )
+    then begin result:= false; exit; end;
+  result:= true;
+  i:= 1;
+  while i < l do begin
+    inc(i);
+    if not (isUriAlphanumChar(s[i]) or (s[i] = '-') )
+       then begin result:= false; exit; end;
+  end;
+end;
+
+function isUriIPv4addressStr(s: Ansistring): boolean;
+var
+  digitNo,colonNo,i,l: integer;
+  digitFound: boolean;
+begin
+  result:= false;
+  l:= length(s);
+  i:= 0;
+  digitNo:= 0;
+  colonNo:= 0;
+  digitFound:= false;
+  while i < l do begin
+    if isUriDigitChar(s[i]) then begin
+      if not digitFound then begin
+        digitFound:= true;
+        inc(digitNo);
+      end;
+    end else if s[i] = '.' then begin
+      if not digitFound then exit;
+      digitFound:= false;
+      inc(colonNo);
+    end else exit;
+  end;
+  if (colonNo = 3) and (digitNo = 4) then result:= true;
+end;
+
+function isUriPortStr(s: Ansistring): boolean;
+var
+  i,l: integer;
+begin
+  result:= true;
+  l:= length(s);
+  for i:= 1 to l do
+    if not isUriDigitChar(s[i]) then begin result:= false; exit; end;
+end;
+
+function isUriPathStr(s: Ansistring): boolean;
+begin
+  if isUriAbs_pathStr(s) or isUriOpaque_partStr(s) or (s = '')
+    then result:= true
+    else result:= false;
+end;
+
+function isUriPath_segmentsStr(s: Ansistring): boolean;
+var
+  i,l: integer;
+begin
+  l:= length(s);
+  result:= true;
+  if l = 0 then exit;
+  i:= 0;
+  while i < l do begin
+    inc(i);
+    if s[i] = '%' then begin
+      if i = l then begin result:= false; exit; end;
+      inc(i);
+      if not isUriHexChar(s[i]) then begin result:= false; exit; end;
+      if i = l then begin result:= false; exit; end;
+      inc(i);
+      if not isUriHexChar(s[i]) then begin result:= false; exit; end;
+    end else if not ( isUriUnreservedChar(s[i])
+                      or (s[i] = ':') or (s[i] = '@') or (s[i] = '&')
+                      or (s[i] = '=') or (s[i] = '+') or (s[i] = '$')
+                      or (s[i] = ',') or (s[i] = ';') or (s[i] = '/') )
+      then begin result:= false; exit; end;
+  end;
+end;
+
+function isUriSegmentStr(s: Ansistring): boolean;
+var
+  i,l: integer;
+begin
+  l:= length(s);
+  result:= true;
+  if l = 0 then exit;
+  i:= 0;
+  while i < l do begin
+    inc(i);
+    if s[i] = '%' then begin
+      if i = l then begin result:= false; exit; end;
+      inc(i);
+      if not isUriHexChar(s[i]) then begin result:= false; exit; end;
+      if i = l then begin result:= false; exit; end;
+      inc(i);
+      if not isUriHexChar(s[i]) then begin result:= false; exit; end;
+    end else if not ( isUriUnreservedChar(s[i])
+                      or (s[i] = ':') or (s[i] = '@') or (s[i] = '&')
+                      or (s[i] = '=') or (s[i] = '+') or (s[i] = '$')
+                      or (s[i] = ',') or (s[i] = ';') )
+      then begin result:= false; exit; end;
+  end;
+end;
+
+function isUriParamStr(s: Ansistring): boolean;
+var
+  i,l: integer;
+begin
+  l:= length(s);
+  result:= true;
+  if l = 0 then exit;
+  i:= 0;
+  while i < l do begin
+    inc(i);
+    if s[i] = '%' then begin
+      if i = l then begin result:= false; exit; end;
+      inc(i);
+      if not isUriHexChar(s[i]) then begin result:= false; exit; end;
+      if i = l then begin result:= false; exit; end;
+      inc(i);
+      if not isUriHexChar(s[i]) then begin result:= false; exit; end;
+    end else if not ( isUriUnreservedChar(s[i])
+                      or (s[i] = ':') or (s[i] = '@') or (s[i] = '&')
+                      or (s[i] = '=') or (s[i] = '+') or (s[i] = '$')
+                      or (s[i] = ',') )
+      then begin result:= false; exit; end;
+  end;
+end;
+
+function isUriQueryStr(s: Ansistring): boolean;
+begin
+  if s = ''
+    then result:= true
+    else result:= isUriUricStr(s);
+end;
+
+function isUriFragmentStr(s: Ansistring): boolean;
+begin
+  if s = ''
+    then result:= true
+    else result:= isUriUricStr(s);
+end;
+
+function isUriUricStr(s: Ansistring): boolean;
+var
+  i,l: integer;
+begin
+  l:= length(s);
+  if l = 0
+    then begin result:= false; exit; end
+    else result:= true;
+  i:= 0;
+  while i < l do begin
+    inc(i);
+    if s[i] = '%' then begin
+      if i = l then begin result:= false; exit; end;
+      inc(i);
+      if not isUriHexChar(s[i]) then begin result:= false; exit; end;
+      if i = l then begin result:= false; exit; end;
+      inc(i);
+      if not isUriHexChar(s[i]) then begin result:= false; exit; end;
+    end else if not ( isUriReservedChar(s[i]) or isUriUnreservedChar(s[i]) )
+      then begin result:= false; exit; end;
+  end;
+end;
+
+function isUriReservedChar(c: AnsiChar): boolean;
+begin
+  if (c=';') or (c='/') or (c='?') or (c=':') or (c='@') or (c='&') or
+     (c='=') or (c='+') or (c='$') or (c=',')
+    then result:= true
+    else result:= false;
+end;
+
+function isUriUnreservedChar(c: Ansichar): boolean;
+begin
+  if isUriAlphanumChar(c) or isUriMarkChar(c)
+    then result:= true
+    else result:= false;
+end;
+
+function isUriMarkChar(c: Ansichar): boolean;
+begin
+  if (c='-') or (c='_') or (c='.') or (c='!') or (c='~') or (c='*') or
+     (c=#39) or (c='(') or (c=')')
+    then result:= true
+    else result:= false;
+end;
+
+function isUriHexChar(c: Ansichar): boolean;
+begin
+  case byte(c) of
+    $30..$39,$41..$46,$61..$66:  // 0..9 , A..F , a..f
+    result:= true;
+  else
+    result:= false;
+  end;
+end;
+
+function isUriAlphanumChar(c: Ansichar): boolean;
+begin
+  case byte(c) of
+    $30..$39,$41..$5A,$61..$7A:
+    result:= true;
+  else
+    result:= false;
+  end;
+end;
+
+function isUriAlphaChar(c: Ansichar): boolean;
+begin
+  case byte(c) of
+    $41..$5A,$61..$7A:
+    result:= true;
+  else
+    result:= false;
+  end;
+end;
+
+function isUriDigitChar(c: Ansichar): boolean;
+begin
+  case byte(c) of
+    $30..$39:
+    result:= true;
+  else
+    result:= false;
+  end;
+end;
+
+function Ansi_LastDelimiter(const Delimiters, S: Ansistring): Integer;
+var
  P: PAnsiChar;
begin
  Result := Length(S);
  P := PAnsiChar(Delimiters);
  while Result > 0 do
  begin
    if (S[Result] <> #0) and (StrScan(P, S[Result]) <> nil) then
      if (ByteType(S, Result) = mbTrailByte) then
        Dec(Result)
      else
        Exit;
    Dec(Result);
  end;
end;

+
+function resolveRelativeUriStr(const baseUri,
+                                     relUri: ansistring;
+                                 var resultUri: ansistring): boolean;
+var
+  BaseUriAnalyzer,RelUriAnalyzer: TUriStrAnalyzer;
+  i,slashPos,queryIndex: integer;
+  pathBuffer: Ansistring;
+  segments: TStringList;
+begin
+  resultUri:= '';
+  BaseUriAnalyzer:= TUriStrAnalyzer.create;
+  RelUriAnalyzer:= TUriStrAnalyzer.create;
+  try
+    result:= BaseUriAnalyzer.setUriReference(baseUri);
+    result:= (RelUriAnalyzer.setUriReference(relUri) and result);
+    result:= ((BaseUriAnalyzer.HasUriScheme or RelUriAnalyzer.HasUriScheme) and result);
+    if not result then exit;  // baseUri is not an absolute URI reference, or baseUri or relUri is maleformed
+    with RelUriAnalyzer do begin
+      if (UriPath = '') and not ( HasUriScheme or HasUriAuthority or HasUriQuery) then begin
+        // Same document reference detected
+        BaseUriAnalyzer.setUriFragment(UriFragment,HasUriFragment);
+        resultUri:= BaseUriAnalyzer.UriReference;
+        exit;
+      end;
+      if HasUriScheme then begin
+        // relUri is an absolute URI --> we are done.
+        resultUri:= relUri;
+        exit;
+      end;
+      // inherit scheme:
+      setUriScheme(BaseUriAnalyzer.UriScheme,BaseUriAnalyzer.HasUriScheme);
+      if not HasUriAuthority then begin
+        // inherit authority:
+        setUriAuthority(BaseUriAnalyzer.UriAuthority,BaseUriAnalyzer.HasUriAuthority);
+        if not (copy(UriPath,1,1) = '/') then begin
+          // analyze paths:
+          { TODO -oek -cUnicode : bad performance: need to create ansi version of TStringList }
+          segments:= TStringList.create;
+          try
+            slashPos:= Ansi_LastDelimiter(AnsiChar('/'),BaseUriAnalyzer.UriPath);
+            if slashPos > 0
+              then pathBuffer:= copy(BaseUriAnalyzer.UriPath,2,slashPos-1) // Copy path without last segment and first character which is always '/'
+              else pathBuffer:= '';
+            pathBuffer:= concat(pathBuffer,UriPath);
+            with segments do begin
+              // cut pathBuffer into segments:
+              slashPos:= pos(AnsiChar('/'),pathBuffer);
+              while slashPos > 0 do begin
+                Add({$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(copy(pathBuffer,1,slashPos-1)));
+                pathBuffer:= copy(pathBuffer,slashPos+1,length(pathBuffer)-slashPos);
+                slashPos:= pos(AnsiChar('/'),pathBuffer);
+              end; {while ...}
+              Add({$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(pathBuffer));
+              if (pathBuffer = '..') or (pathBuffer = '.')
+                then Add(''); // Necessary to preserve ending '/' under some circumstances
+              // remove '.' segments:
+              queryIndex:= IndexOf('.');
+              while queryIndex > -1 do begin
+                Delete(queryIndex);
+                queryIndex:= IndexOf('.');
+              end;
+              // remove '<segment>/..' segments:
+              queryIndex:= IndexOf('..');
+              while queryIndex > 0 do begin
+                Delete(queryIndex);
+                Delete(pred(queryIndex));
+                queryIndex:= IndexOf('..');
+              end;
+              // test for maleformed path:
+              if count > 0
+                then if strings[0] = '..' then begin
+                  result:= false;
+                  exit;
+                end;
+              pathBuffer:= '';
+              for i:= 0 to pred(count) do
+                pathBuffer:= pathBuffer + AnsiChar('/') +{$IFDEF UNICODE}WideStringToAnsiString{$ENDIF} (strings[i]);
+              setUriPath(pathBuffer);
+            end; {with segments ...}
+          finally
+            segments.free;
+          end;
+        end; {if not (copy(UriPath,1,1) = '/') ...}
+      end; {if not HasAuthorityScheme ...}
+      resultUri:= UriReference;
+    end; {with RelUriAnalyzer ...}
+  finally
+    BaseUriAnalyzer.free;
+    RelUriAnalyzer.free;
+  end;
+end;
+
+function resolveRelativeUriWideStr(const baseUri,
+                                         relUri: UnicodeString;
+                                     var resultUri: UnicodeString): boolean;
+var
+  BaseUriAnalyzer,RelUriAnalyzer: TUriWideStrAnalyzer;
+  i,slashPos,queryIndex: integer;
+  pathBuffer: UnicodeString;
+  segments: TdomWideStringList;
+begin
+  resultUri:= '';
+  BaseUriAnalyzer:= TUriWideStrAnalyzer.create;
+  RelUriAnalyzer:= TUriWideStrAnalyzer.create;
+  try
+    result:= BaseUriAnalyzer.setUriReference(baseUri);
+    result:= (RelUriAnalyzer.setUriReference(relUri) and result);
+    result:= ( (BaseUriAnalyzer.HasUriScheme or RelUriAnalyzer.HasUriScheme) and result);
+    if not result then exit;  // baseUri is not an absolute URI reference, or baseUri or relUri is maleformed
+    with RelUriAnalyzer do begin
+      if (UriPath = '') and not ( HasUriScheme or HasUriAuthority or HasUriQuery) then begin
+        // Same document reference detected
+        BaseUriAnalyzer.setUriFragment(UriFragment,HasUriFragment);
+        resultUri:= BaseUriAnalyzer.UriReference;
+        exit;
+      end;
+      if HasUriScheme then begin
+        // relUri is an absolute URI --> we are done.
+        resultUri:= relUri;
+        exit;
+      end;
+      // inherit scheme:
+      setUriScheme(BaseUriAnalyzer.UriScheme,BaseUriAnalyzer.HasUriScheme);
+      if not HasUriAuthority then begin
+        // inherit authority:
+        setUriAuthority(BaseUriAnalyzer.UriAuthority,BaseUriAnalyzer.HasUriAuthority);
+        if not (copy(UriPath,1,1) = '/') then begin
+          // analyze paths:
+          segments:= TdomWideStringList.create;
+          try
+            slashPos:= SysUtils.LastDelimiter('/',BaseUriAnalyzer.UriPath);
+            if slashPos > 0
+              then pathBuffer:= copy(BaseUriAnalyzer.UriPath,2,slashPos-1) // Copy path without last segment and first character which is always '/'
+              else pathBuffer:= '';
+            pathBuffer:= concat(pathBuffer,UriPath);
+            with segments do begin
+              // cut pathBuffer into segments:
+              slashPos:= pos('/',pathBuffer);
+              while slashPos > 0 do begin
+                Add(copy(pathBuffer,1,slashPos-1));
+                pathBuffer:= copy(pathBuffer,slashPos+1,length(pathBuffer)-slashPos);
+                slashPos:= pos('/',pathBuffer);
+              end; {while ...}
+              Add(pathBuffer);
+              if (pathBuffer = '..') or (pathBuffer = '.')
+                then Add(''); // Necessary to preserve ending '/' under some circumstances
+              // remove '.' segments:
+              queryIndex:= IndexOf('.');
+              while queryIndex > -1 do begin
+                Delete(queryIndex);
+                queryIndex:= IndexOf('.');
+              end;
+              // remove '<segment>/..' segments:
+              queryIndex:= IndexOf('..');
+              while queryIndex > 0 do begin
+                Delete(queryIndex);
+                Delete(pred(queryIndex));
+                queryIndex:= IndexOf('..');
+              end;
+              // test for maleformed path:
+              if count > 0
+                then if wideStrings[0] = '..' then begin
+                  result:= false;
+                  exit;
+                end;
+              pathBuffer:= '';
+              for i:= 0 to pred(count) do
+                pathBuffer:= concat(pathBuffer,'/',wideStrings[i]);
+              setUriPath(pathBuffer);
+            end; {with segments ...}
+          finally
+            segments.free;
+          end;
+        end; {if not (copy(UriPath,1,1) = '/') ...}
+      end; {if not HasAuthorityScheme ...}
+      resultUri:= UriReference;
+    end; {with RelUriAnalyzer ...}
+  finally
+    BaseUriAnalyzer.free;
+    RelUriAnalyzer.free;
+  end;
+end;
+
+function FilenameToUriStr(const path: TFilename;
+                          const opt: TdomFilenameToUriOptions): string;
+var
+  i,l: integer;
+begin
+  if fuSetLocalhost in opt
+    then result:= 'file://localhost'
+    else  result:= 'file://';
+  l:= length(path);
+  if l > 0 then begin
+    // add leading '/':
+    result:= concat(result,'/');
+    i:= 1;
+    while i <= l do begin
+      case byte(path[i]) of
+        // A-z      a-z      0-9    !    '()*    -   .   _   ~
+        $41..$5A,$61..$7A,$30..$39,$21,$27..$2a,$2d,$2e,$5f,$7e:
+          result:= concat(result,path[i]);
+        // special treatment for colons (':'):
+        $3a:
+          if fuPlainColon in opt
+            then result:= concat(result,':')
+            else result:= concat(result,'%3a');
+        // translate '\' to '/':
+        $5c:
+          result:= concat(result,'/');
+      else
+        // calculate escape sequence:
+        result:= concat(result,'%',IntToHex(byte(path[i]),2));
+      end;
+      inc(i);
+    end; {while ...}
+  end; {if ...}
+end;
+
+function FilenameToUriWideStr(const path: TFilename;
+                              const opt: TdomFilenameToUriOptions): UnicodeString;
+var
+  i,l: integer;
+begin
+  if fuSetLocalhost in opt
+    then result:= 'file://localhost'
+    else  result:= 'file://';
+  l:= length(path);
+  if l > 0 then begin
+    // add leading '/':
+    result:= concat(result,'/');
+    i:= 1;
+    while i <= l do begin
+      case byte(path[i]) of
+        // A-z      a-z      0-9    !    '()*    -   .   _   ~
+        $41..$5A,$61..$7A,$30..$39,$21,$27..$2a,$2d,$2e,$5f,$7e:
+          result:= concat(result,UnicodeString(wideChar(byte(path[i]))));
+        // special treatment for colons (':'):
+        $3a:
+          if fuPlainColon in opt
+            then result:= concat(result,':')
+            else result:= concat(result,'%3a');
+        // translate '\' to '/':
+        $5c:
+          result:= concat(result,'/');
+      else
+        // calculate escape sequence:
+        result:= concat(result,'%',IntToHex(byte(path[i]),2));
+      end;
+      inc(i);
+    end; {while ...}
+  end; {if ...}
+end;
+
+function Ansi_StrToInt(const S: Ansistring): Integer;
+begin
+  Result := StrToInt({$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(s));
+end;
+
+function UriStrToFilename(const uri: Ansistring;
+                            var path: TFilename;
+                            var authority,
+                                query,
+                                fragment: Ansistring): boolean;
+var
+  UriAnalyzer: TUriStrAnalyzer;
+  pathBuffer: Ansistring;  // Used to increase performance
+  i,l: integer;
+  lPath: ansistring;
+begin
+  lPath:= '';
+  query:= '';
+  fragment:= '';
+  result:= false;
+  UriAnalyzer:= TUriStrAnalyzer.create;
+  try
+    with UriAnalyzer do begin
+      if setUriReference(uri) then begin
+        if UpperCase(UriScheme) = 'FILE' then begin
+          result:= true;
+          pathBuffer:= UriPath;
+          l:= length(pathBuffer);
+          if l > 0 then begin
+            // remove leading '/':
+            dec(l);
+            pathBuffer:= copy(pathBuffer,2,l);
+            i:= 1;
+            while i <= l do begin
+              if pathBuffer[i] = '%' then begin
+                // resolve escape sequence:
+                lPath:= lPath + Ansichar(Ansi_StrToInt(AnsiChar('x') + pathBuffer[i+1] + pathBuffer[i+2]));
+                i:= i+2;
+              end else if pathBuffer[i] = '/' then begin
+                // translate '/' to '\':
+                lPath:= lPath + '\';
+              end else lPath:= lPath + pathBuffer[i];
+              inc(i);
+            end; {while ...}
+          end; {if ...}
+          authority:= UriAuthority;
+          if HasUriQuery
+            then query:= AnsiChar('?') + UriQuery;
+          if HasUriFragment
+            then fragment:= AnsiChar('#') + UriFragment;
+        end; {if ...}
+      end; {if ...}
+    end; {with ...}
+  finally
+    UriAnalyzer.free;
+    Path := {$IFDEF UNICODE}AnsiStringToWideString {$ENDIF}(lPath);
+  end;
+end;
+
+function UriWideStrToFilename(const uri: UnicodeString;
+                                var path: TFilename;
+                                var authority,
+                                    query,
+                                    fragment: Ansistring): boolean;
+var
+  UriAnalyzer: TUriStrAnalyzer;
+  pathBuffer: Ansistring; // Used to increase performance
+  uri2: Ansistring;
+  i,l: integer;
+  lPath : AnsiString;
+begin
+  lPath:= '';
+  query:= '';
+  fragment:= '';
+  result:= false;
+  try
+    uri2:= UTF16To7BitASCIIStr(uri)
+  except
+    uri2:= '';
+  end;
+  UriAnalyzer:= TUriStrAnalyzer.create;
+  try
+    with UriAnalyzer do begin
+      if setUriReference(uri2) then begin
+        if UpperCase(UriScheme) = 'FILE' then begin
+          result:= true;
+          pathBuffer:= UriPath;
+          l:= length(pathBuffer);
+          if l > 0 then begin
+            // remove leading '/':
+            dec(l);
+            pathBuffer:= copy(pathBuffer,2,l);
+            i:= 1;
+            while i <= l do begin
+              if pathBuffer[i] = '%' then begin
+                // resolve escape sequence:
+                lPath:= lPath + Ansichar(Ansi_StrToInt(AnsiChar('x') + pathBuffer[i+1] + pathBuffer[i+2]));
+                i:= i+2;
+              end else if pathBuffer[i] = '/' then begin
+                // translate '/' to '\':
+                lPath:= lPath+ AnsiChar('\');
+              end else lPath:= lPath + pathBuffer[i];
+              inc(i);
+            end; {while ...}
+          end; {if ...}
+          authority:= UriAuthority;
+          if HasUriQuery
+            then query:= AnsiChar('?') + UriQuery;
+          if HasUriFragment
+            then fragment:= AnsiChar('#') +UriFragment;
+        end; {if ...}
+      end; {if ...}
+    end; {with ...}
+  finally
+    UriAnalyzer.free;
+    Path := {$IFDEF UNICODE}AnsiStringToWideString {$ENDIF}(lPath);
+  end;
+end;
+
+procedure writeWideChars(stream: TStream; const XMLChars: array of WideChar);
+begin
+  stream.WriteBuffer(XMLChars, SizeOf(XMLChars));
+end;
+
+procedure writeWideString(stream: TStream; const XMLStrg: UnicodeString);
+begin
+  stream.WriteBuffer(pointer(XMLStrg)^, Length(XMLStrg) shl 1);
+end;
+
+procedure writeWideStrings(stream: TStream; const XMLStrgs: array of UnicodeString);
+var
+  Indx: longint;
+begin
+  for Indx := 0 to High(XMLStrgs) do
+    stream.WriteBuffer(pointer(XMLStrgs[Indx])^, Length(XMLStrgs[Indx]) shl 1);
+end;
+
+function XPathBooleanFunc(const oldResult: TdomXPathResult): TdomXPathBooleanResult;
+begin
+  if not assigned(oldResult)
+    then raise ENot_Supported_Err.create('Not supported error.');
+  case oldResult.resultType of
+    XPATH_NUMBER_TYPE: begin
+      if TdomXPathNumberResult(oldResult).numberValue = 0 then begin  // xxx NaN ?
+        oldResult.free;
+        result:= TdomXPathBooleanResult.create(false);
+      end else begin
+        oldResult.free;
+        result:= TdomXPathBooleanResult.create(true);
+      end;
+    end;
+    XPATH_NODE_SNAPSHOT_TYPE: begin
+      if TdomXPathSnapshotResult(oldResult).snapshotLength > 0 then begin
+        oldResult.free;
+        result:= TdomXPathBooleanResult.create(true);
+      end else begin
+        oldResult.free;
+        result:= TdomXPathBooleanResult.create(false);
+      end;
+    end;
+    XPATH_STRING_TYPE: begin
+      if length(TdomXPathStringResult(oldResult).stringValue) > 0 then begin
+        oldResult.free;
+        result:= TdomXPathBooleanResult.create(true);
+      end else begin
+        oldResult.free;
+        result:= TdomXPathBooleanResult.create(false);
+      end;
+    end;
+    XPATH_BOOLEAN_TYPE: result:= (oldResult as TdomXPathBooleanResult);
+  else
+    oldResult.free;
+    raise ENot_Supported_Err.create('Not supported error.');
+  end;
+end;
+
+function XPathNumberFunc(const oldResult: TdomXPathResult): TdomXPathNumberResult;
+var
+  stringResult: TdomXPathStringResult;
+
+  function convertXPathStringType(const oldResult: TdomXPathStringResult): TdomXPathNumberResult;
+  begin
+    try
+      result:= TdomXPathNumberResult.create(StrToFloat(oldResult.stringValue));
+    except
+      result:= TdomXPathNumberResult.create(0);
+       // xxx Not XPath conformant, because we must use NaN.
+    end;
+    oldResult.free;
+  end;
+
+begin
+  if not assigned(oldResult)
+    then raise ENot_Supported_Err.create('Not supported error.');
+  case oldResult.resultType of
+    XPATH_NUMBER_TYPE:
+      result:= (oldResult as TdomXPathNumberResult);
+    XPATH_NODE_SNAPSHOT_TYPE: begin
+      stringResult:= XPathStringFunc(oldResult);
+      result:= convertXPathStringType(stringResult);
+    end;
+    XPATH_STRING_TYPE:
+      result:= convertXPathStringType(TdomXPathStringResult(oldResult));
+    XPATH_BOOLEAN_TYPE: begin
+      if TdomXPathBooleanResult(oldResult).booleanValue
+        then result:= TdomXPathNumberResult.create(1)
+        else result:= TdomXPathNumberResult.create(0);
+      oldResult.free;
+    end;
+  else
+    oldResult.free;
+    raise ENot_Supported_Err.create('Not supported error.');
+  end;
+end;
+
+function XPathStringFunc(const oldResult: TdomXPathResult): TdomXPathStringResult;
+begin
+  if not assigned(oldResult)
+    then raise ENot_Supported_Err.create('Not supported error.');
+  case oldResult.resultType of
+    XPATH_NUMBER_TYPE: begin
+      result:= TdomXPathStringResult.create(FloatToStr(TdomXPathNumberResult(oldResult).numberValue));
+      // xxx Not XPath conformant, because FloatToStr uses limited digits.
+      oldResult.free;
+    end;
+    XPATH_NODE_SNAPSHOT_TYPE: begin
+      if TdomXPathSnapshotResult(oldResult).snapshotLength = 0 then begin
+        result:= TdomXPathStringResult.create('');
+        oldResult.free;
+      end else begin
+        result:= TdomXPathStringResult.create(TdomXPathSnapshotResult(oldResult).snapshotItem(0).XPathStringValue);
+        oldResult.free;
+      end;
+    end;
+    XPATH_STRING_TYPE:
+      result:= (oldResult as TdomXPathStringResult);
+    XPATH_BOOLEAN_TYPE: begin
+      if TdomXPathBooleanResult(oldResult).booleanValue
+        then result:= TdomXPathStringResult.create('true')
+        else result:= TdomXPathStringResult.create('false');
+      oldResult.free;
+    end;
+  else
+    oldResult.free;
+    raise ENot_Supported_Err.create('Not supported error.');
+  end;
+end;
+
+
+// ++++++++++++++++++++++++++ TUriStrAnalyzer +++++++++++++++++++++++++++
+constructor TUriStrAnalyzer.create;
+begin
+  setUriReference('');
+end;
+
+function TUriStrAnalyzer.getUriReference: Ansistring;
+begin
+  result:= '';
+  if FHasUriScheme
+    then result:= result + FUriScheme+ AnsiChar(':');
+  if FHasUriAuthority
+    then result:= result+ AnsiString('//')+FUriAuthority;
+  result:= concat(result,FUriPath);
+  if FHasUriQuery
+    then result:= result + AnsiChar('?')+UriQuery;
+  if FHasUriFragment
+    then result:= result + AnsiChar('#') + FUriFragment;
+end;
+
+function TUriStrAnalyzer.setUriAuthority(const Value: Ansistring;
+                                         const isDefined: boolean): boolean;
+begin
+  result:= true;
+  FHasUriAuthority:= isDefined;
+  if isDefined then begin
+    if isUriAuthorityStr(Value)
+      then FUriAuthority:= value
+      else begin FUriAuthority:= ''; result:= false; end;
+  end else FUriAuthority:= '';
+end;
+
+function TUriStrAnalyzer.setUriFragment(const Value: Ansistring;
+                                        const isDefined: boolean): boolean;
+begin
+  result:= true;
+  FHasUriFragment:= isDefined;
+  if isDefined then begin
+    if isUriFragmentStr(Value)
+      then FUriFragment:= value
+      else begin FUriFragment:= ''; result:= false; end;
+  end else FUriFragment:= '';
+end;
+
+function TUriStrAnalyzer.setUriPath(const Value: Ansistring): boolean;
+begin
+  result:= isUriPathStr(Value);
+  if result
+    then FUriPath:= value
+    else FUriPath:= '';
+end;
+
+function TUriStrAnalyzer.setUriQuery(const Value: Ansistring;
+                                     const isDefined: boolean): boolean;
+begin
+  result:= true;
+  FHasUriQuery:= isDefined;
+  if isDefined then begin
+    if isUriQueryStr(Value)
+      then FUriQuery:= value
+      else begin FUriQuery:= ''; result:= false; end;
+  end else FUriQuery:= '';
+end;
+
+function TUriStrAnalyzer.setUriReference(const Value: Ansistring): boolean;
+var
+  colonPos,dcPos,qmPos,slashPos: integer;
+  s: Ansistring;
+begin
+  colonPos:= pos(AnsiChar(':'),value);
+  result:= setUriScheme(copy(value,1,colonPos-1),(colonPos > 0));
+  s:= copy(value,colonPos+1,length(value)-colonPos);
+
+  dcPos:= pos(AnsiChar('#'),s);
+  if dcPos > 0 then begin
+    result:= (setUriFragment(copy(s,dcPos+1,length(s)-dcPos),true) and result);
+    s:= copy(s,1,dcPos-1);
+  end else setUriFragment('',false);
+
+  qmPos:= pos(AnsiChar('?'),s);
+  if qmPos > 0 then begin
+    result:= (setUriQuery(copy(s,qmPos+1,length(s)-qmPos),true) and result);
+    s:= copy(s,1,qmPos-1);
+  end else setUriQuery('',false);
+
+  if copy(s,1,2) = AnsiString('//') then begin
+    s:= copy(s,3,length(s)-2);
+    slashPos:= pos(AnsiChar('/'),s);
+    if slashPos > 0 then begin
+      result:= (setUriAuthority(copy(s,1,slashPos-1),true) and result);
+      s:= copy(s,slashPos,length(s)-slashPos+1);
+    end else begin
+      result:= (setUriAuthority(s,true) and result);
+      s:= '';
+    end;
+  end else setUriAuthority('',false);
+
+  result:= setUriPath(s) and result;
+
+  if not result then setUriReference('');
+end;
+
+function TUriStrAnalyzer.setUriScheme(const Value: Ansistring;
+                                      const isDefined: boolean): boolean;
+begin
+  result:= true;
+  FHasUriScheme:= isDefined;
+  if isDefined then begin
+    if isUriSchemeStr(Value)
+      then FUriScheme:= value
+      else begin FUriScheme:= ''; result:= false; end;
+  end else FUriScheme:= '';
+end;
+
+
+
+// ++++++++++++++++++++++++ TUriWideStrAnalyzer +++++++++++++++++++++++++
+constructor TUriWideStrAnalyzer.create;
+begin
+  setUriReference('');
+end;
+
+function TUriWideStrAnalyzer.getUriReference: UnicodeString;
+begin
+  result:= '';
+  if FHasUriScheme
+    then result:= concat(result,FUriScheme,':');
+  if FHasUriAuthority
+    then result:= concat(result,'//',FUriAuthority);
+  result:= concat(result,FUriPath);
+  if FHasUriQuery
+    then result:= concat(result,#63,FUriQuery);
+  if FHasUriFragment
+    then result:= concat(result,'#',FUriFragment);
+end;
+
+function TUriWideStrAnalyzer.setUriAuthority(const Value: UnicodeString;
+                                             const isDefined: boolean): boolean;
+begin
+  result:= true;
+  FHasUriAuthority:= isDefined;
+  if isDefined then begin
+    if isUriAuthorityWideStr(Value)
+      then FUriAuthority:= value
+      else begin FUriAuthority:= ''; result:= false; end;
+  end else FUriAuthority:= '';
+end;
+
+function TUriWideStrAnalyzer.setUriFragment(const Value: UnicodeString;
+                                            const isDefined: boolean): boolean;
+begin
+  result:= true;
+  FHasUriFragment:= isDefined;
+  if isDefined then begin
+    if isUriFragmentWideStr(Value)
+      then FUriFragment:= value
+      else begin FUriFragment:= ''; result:= false; end;
+  end else FUriFragment:= '';
+end;
+
+function TUriWideStrAnalyzer.setUriPath(const Value: UnicodeString): boolean;
+begin
+  result:= isUriPathWideStr(Value);
+  if result
+    then FUriPath:= value
+    else FUriPath:= '';
+end;
+
+function TUriWideStrAnalyzer.setUriQuery(const Value: UnicodeString;
+                                         const isDefined: boolean): boolean;
+begin
+  result:= true;
+  FHasUriQuery:= isDefined;
+  if isDefined then begin
+    if isUriQueryWideStr(Value)
+      then FUriQuery:= value
+      else begin FUriQuery:= ''; result:= false; end;
+  end else FUriQuery:= '';
+end;
+
+function TUriWideStrAnalyzer.setUriReference(const Value: UnicodeString): boolean;
+var
+  colonPos,dcPos,qmPos,slashPos: integer;
+  s: UnicodeString;
+begin
+  colonPos:= pos(':',value);
+  result:= setUriScheme(copy(value,1,colonPos-1),(colonPos > 0));
+  s:= copy(value,colonPos+1,length(value)-colonPos);
+
+  dcPos:= pos('#',s);
+  if dcPos > 0 then begin
+    result:= (setUriFragment(copy(s,dcPos+1,length(s)-dcPos),true) and result);
+    s:= copy(s,1,dcPos-1);
+  end else setUriFragment('',false);
+
+  qmPos:= pos('?',s);
+  if qmPos > 0 then begin
+    result:= (setUriQuery(copy(s,qmPos+1,length(s)-qmPos),true) and result);
+    s:= copy(s,1,qmPos-1);
+  end else setUriQuery('',false);
+
+  if copy(s,1,2) = '//' then begin
+    s:= copy(s,3,length(s)-2);
+    slashPos:= pos('/',s);
+    if slashPos > 0 then begin
+      result:= (setUriAuthority(copy(s,1,slashPos-1),true) and result);
+      s:= copy(s,slashPos,length(s)-slashPos+1);
+    end else begin
+      result:= (setUriAuthority(s,true) and result);
+      s:= '';
+    end;
+  end else setUriAuthority('',false);
+
+  result:= setUriPath(s) and result;
+
+  if not result then setUriReference('');
+end;
+
+function TUriWideStrAnalyzer.setUriScheme(const Value: UnicodeString;
+                                          const isDefined: boolean): boolean;
+begin
+  result:= true;
+  FHasUriScheme:= isDefined;
+  if isDefined then begin
+    if isUriSchemeWideStr(Value)
+      then FUriScheme:= value
+      else begin FUriScheme:= ''; result:= false; end;
+  end else FUriScheme:= '';
+end;
+
+
+
+// +++++++++++++++++++++++++ TdomNameValueList +++++++++++++++++++++++++
+constructor TdomNameValueList.create;
+begin
+  inherited create;
+  FNames:= TdomWideStringList.create;
+  FValues:= TdomWideStringList.create;
+end;
+
+destructor TdomNameValueList.destroy;
+begin
+  FNames.free;
+  FValues.free;
+  inherited destroy;
+end;
+
+procedure TdomNameValueList.error(const msg: string;
+                                  data: integer);
+{$IFNDEF FPC}
+  function ReturnAddr: Pointer;
+  asm
+          MOV     EAX,[EBP+4]
+  end;
+{$ENDIF}
+begin
+{$IFDEF FPC}
+  raise EStringListError.CreateFmt(Msg, [Data]);
+{$ELSE}
+  raise EStringListError.CreateFmt(Msg, [Data]) at ReturnAddr;
+{$ENDIF}
+end;
+
+
+function TdomNameValueList.getLength: integer;
+begin
+  result:= FNames.Count;
+end;
+
+function TdomNameValueList.getCapacity: integer;
+begin
+  result:= FNames.Capacity;
+end;
+
+function TdomNameValueList.getDuplicates: TDuplicates;
+begin
+  result:= FNames.duplicates;
+end;
+
+function TdomNameValueList.getName(index: integer): UnicodeString;
+begin
+  result:= FNames[index];
+end;
+
+function TdomNameValueList.getSorted: boolean;
+begin
+  result:= FNames.sorted;
+end;
+
+function TdomNameValueList.getObject(index: integer): TObject;
+begin
+  result:= FValues.objects[integer(FNames.objects[index])];
+end;
+
+function TdomNameValueList.getValue(index: integer): UnicodeString;
+begin
+  result:= FValues[integer(FNames.objects[index])];
+end;
+
+procedure TdomNameValueList.putObject(index: integer; aObject: TObject);
+begin
+  FValues.objects[integer(FNames.objects[index])]:= aObject;
+end;
+
+procedure TdomNameValueList.setCapacity(const value: integer);
+begin
+  FNames.Capacity:= value;
+  FValues.Capacity:= value;
+end;
+
+procedure TdomNameValueList.setDuplicates(const value: TDuplicates);
+begin
+  FNames.duplicates:= value;
+end;
+
+procedure TdomNameValueList.setSorted(const Value: boolean);
+begin
+  FNames.sorted:= value;
+end;
+
+function TdomNameValueList.add(const name,
+                                     value: UnicodeString): integer;
+var
+  valueIndex: {$IFDEF cpu64}UINT64{$ELSE}Integer{$ENDIF};
+begin
+  valueIndex:= FValues.Add(value);
+  result:= FNames.addObject(name,Tobject(pointer(valueIndex)));
+end;
+
+procedure TdomNameValueList.addNameValueList(const nvl: TdomNameValueList);
+var
+  i: integer;
+begin
+  with nvl do
+    for i:= 0 to pred(length) do
+      self.addObject(names[i],values[i],objects[i]);
+end;
+
+function TdomNameValueList.addObject(const name,
+                                           value: UnicodeString;
+                                           AObject: TObject): integer;
+var
+  valueIndex: {$IFDEF cpu64}UInt64{$ELSE}Integer{$ENDIF};
+begin
+  valueIndex:= FValues.addObject(value,AObject);
+  result:= FNames.addObject(name,Tobject(pointer(valueIndex)));
+end;
+
+procedure TdomNameValueList.assign(source: TPersistent);
+begin
+  if source is TdomNameValueList then begin
+    if source = self then exit;
+    clear;
+    addNameValueList(TdomNameValueList(source));
+    exit;
+  end;
+  inherited assign(Source);
+end;
+
+procedure TdomNameValueList.clear;
+begin
+  FNames.clear;
+  FValues.clear;
+end;
+
+procedure TdomNameValueList.Delete(const index: integer);
+begin
+  FNames.Delete(index);
+end;
+
+procedure TdomNameValueList.exchange(const index1,
+                                           index2: integer);
+begin
+  FNames.exchange(index1,index2);
+end;
+
+function TdomNameValueList.indexOf(const name,
+                                         value: UnicodeString): integer;
+var
+  i: integer;
+begin
+  result:= -1;
+  for i:= 0 to pred(FNames.count) do begin
+    if FNames[i] = name then
+      if FValues[integer(FNames.objects[i])] = value then begin
+        result:= i;
+        exit;
+      end;
+  end;
+end;
+
+function TdomNameValueList.indexOfName(const name: UnicodeString): integer;
+begin
+  result:= FNames.IndexOf(name);
+end;
+
+procedure TdomNameValueList.insert(const index: integer;
+                                   const name,
+                                         value: UnicodeString);
+var
+  valueIndex: {$IFDEF cpu64}UInt64{$ELSE}Integer{$ENDIF};
+begin
+  valueIndex:= FValues.Add(value);
+  FNames.insertObject(index,name,Tobject(pointer(valueIndex)));
+end;
+
+function TdomNameValueList.find(const name,
+                                      value: UnicodeString;
+                                  var index: integer): boolean;
+begin
+  if FNames.duplicates = dupAccept then begin
+    index:= indexOf(name,value);
+    result:= (index > -1);
+  end else begin
+    result:= FNames.find(name,index);
+    if result then begin
+      if FValues[integer(FNames.objects[index])] <> value then begin
+        index:= -1;
+        result:= false;
+      end;
+    end;
+  end;
+end;
+
+function TdomNameValueList.findOfName(const name: UnicodeString;
+                                        var index: integer): boolean;
+begin
+  result:= FNames.find(name,index);
+end;
+
+procedure TdomNameValueList.sort;
+begin
+  FNames.sort;
+end;
+
+
+
+//++++++++++++++++++++++++ TdomNameValueTree +++++++++++++++++++++++++++
+destructor TdomNameValueTree.Destroy;
+var
+  index: integer;
+begin
+  if assigned(FParentTree)
+    then FParentTree.replaceChild(FParentTree.indexOfChild(self),nil);
+  for index:= 0 to pred(FNames.count) do
+    children[index].free;
+  inherited;
+end;
+
+function TdomNameValueTree.addChild(const name,
+                                          value: UnicodeString;
+                                    const child: TdomNameValueTree): integer;
+begin
+  result:= addChildObject(name,value,child,nil);
+end;
+
+function TdomNameValueTree.addChildObject(const name, value: UnicodeString;
+  const child: TdomNameValueTree; const AObject: TObject): integer;
+begin
+  if assigned(child) then begin
+    if assigned(child.FParentTree)
+      then error('Child name-value tree is in use elsewhere', 0);
+    if isDescendantOf(child)
+      then error('Circular reference', 0);
+    result:= self.addObject(name,value,AObject);
+    FValues.objects[integer(FNames.objects[result])]:= child;
+    child.FParentTree:= self;
+  end else result:= addObject(name,value,AObject);
+end;
+
+procedure TdomNameValueTree.assign(source: TPersistent);
+var
+  i: integer;
+  newNameValueTree: TdomNameValueTree;
+begin
+  if source is TdomNameValueTree then begin
+    if source = self then exit;
+    clear;
+    with TdomNameValueTree(source) do
+      for i:= 0 to pred(length) do begin
+        if hasChild(i) then begin
+          newNameValueTree:= TdomNameValueTree.create;
+          self.addChildObject(names[i],values[i],newNameValueTree,objects[i]);
+          newNameValueTree.assign(children[i]);
+        end else self.addObject(names[i],values[i],objects[i]);
+      end;
+    exit;
+  end;
+  inherited assign(Source);
+end;
+
+procedure TdomNameValueTree.clear;
+var
+  index: integer;
+  subtree: TdomNameValueTree;
+begin
+  for index:= 0 to pred(FNames.count) do begin
+    subtree:= children[index];
+    if assigned(subtree) then
+      with subtree do begin
+        FParentTree:= nil;
+        free;
+      end;
+  end;
+  inherited;
+end;
+
+procedure TdomNameValueTree.Delete(const index: integer);
+var
+  subtree: TdomNameValueTree;
+begin
+  subtree:= children[index];
+  if assigned(subtree) then
+    with subtree do begin
+      FParentTree:= nil;
+      free;
+    end;
+  inherited;
+end;
+
+function TdomNameValueTree.getChild(index: integer): TdomNameValueTree;
+begin
+  result:= TdomNameValueTree(FValues.objects[integer(FNames.objects[index])]);
+end;
+
+function TdomNameValueTree.hasChild(const index: integer): boolean;
+begin
+  result:= assigned(FValues.objects[integer(FNames.objects[index])]);
+end;
+
+function TdomNameValueTree.indexOfChild(const child: TdomNameValueTree): integer;
+var
+  i: integer;
+begin
+  result:= -1;
+  for i:= 0 to pred(FNames.count) do begin
+    if FValues.objects[integer(FNames.objects[i])] = child then begin
+      result:= i;
+      exit;
+    end;
+  end;
+end;
+
+procedure TdomNameValueTree.insertChild(const index: integer;
+                                        const name,
+                                              value: UnicodeString;
+                                        const child: TdomNameValueTree);
+begin
+  if assigned(child) then begin
+    if assigned(child.FParentTree)
+      then error('Child name-value tree is in use elsewhere', 0);
+    if isDescendantOf(child)
+      then error('Circular reference', 0);
+    insert(index,name,value);
+    FValues.objects[integer(FNames.objects[index])]:= child;
+    child.FParentTree:= self;
+  end else insert(index,name,value);
+end;
+
+function TdomNameValueTree.isDescendantOf(const nvtree: TdomNameValueTree): boolean;
+var
+  tree: TdomNameValueTree;
+begin
+  tree:= self;
+  result:= false;
+  while assigned(tree) do begin
+    tree:= tree.parentTree;
+    if tree = nvtree
+      then begin result:= true; exit; end;
+  end;
+end;
+
+function TdomNameValueTree.replaceChild(const index: integer;
+                                        const newChild: TdomNameValueTree): TdomNameValueTree;
+begin
+  if assigned(newChild) then begin
+    if assigned(newChild.FParentTree)
+      then error('Child name-value tree is in use elsewhere', 0);
+    if isDescendantOf(newChild)
+      then error('Circular reference', 0);
+    result:= children[index];
+    if assigned(result)
+      then result.FParentTree:= nil;
+    FValues.objects[integer(FNames.objects[index])]:= newChild;
+    newChild.FParentTree:= self;
+  end else begin
+    result:= children[index];
+    if assigned(result)
+      then result.FParentTree:= nil;
+    FValues.objects[integer(FNames.objects[index])]:= nil;
+  end;
+end;
+
+
+
+//++++++++++++++++++++++++++ TdomCustomStr +++++++++++++++++++++++++++++
+constructor TdomCustomStr.create;
+begin
+  inherited;
+  reset;
+end;
+
+function TdomCustomStr.getWideChars(indx: integer): wideChar;
+begin
+  result:= FContent[indx];
+end;
+
+procedure TdomCustomStr.setWideChars(indx: integer;
+                                     ch: wideChar);
+begin
+  FContent[indx]:= ch;
+end;
+
+procedure TdomCustomStr.addWideChar(const Ch: wideChar);
+begin
+  if FActualLen = FCapacity then begin  // Grow
+    FCapacity:= FCapacity + FCapacity div 4;
+    setLength(FContent,FCapacity);
+  end;
+  Inc(FActualLen);
+  FContent[FActualLen]:= Ch;
+end;
+
+procedure TdomCustomStr.addWideString(const s: UnicodeString);
+var
+  i,l: integer;
+begin
+  l:= system.length(s);
+  while FActualLen+l > FCapacity do begin  // Grow
+    FCapacity:= FCapacity + FCapacity div 4;
+    setLength(Fcontent,FCapacity);
+  end;
+  Inc(FActualLen,l);
+  for i:= 1 to l do
+    FContent[FActualLen-l+i]:= WideChar(s[i]);
+end;
+
+function  TdomCustomStr.endsWith(const s: UnicodeString): boolean;
+var
+  i,offset,sLength: integer;
+begin
+  sLength:= system.length(s);
+  offset:= FActualLen-sLength;
+  if (offset < 0) or (sLength = 0)
+    then begin result:= false; exit; end;
+  i:= 1;
+  repeat
+    result := FContent[i+offset] = s[i];
+    Inc(i);
+  until (not result) or (i > sLength);
+end;
+
+function  TdomCustomStr.isEqual(const s: UnicodeString): boolean;
+var
+  i,sLength: integer;
+begin
+  sLength:= system.length(s);
+  if FActualLen <> sLength
+    then begin result:= false; exit; end;
+  if sLength = 0
+    then begin result:= true; exit; end;
+  i:= 1;
+  repeat
+    result := FContent[i] = s[i];
+    Inc(i);
+  until (not result) or (i > sLength);
+end;
+
+procedure TdomCustomStr.reset;
+begin
+  FCapacity:= 64;
+  setLength(FContent,FCapacity);
+  FActualLen:= 0;
+end;
+
+function  TdomCustomStr.startsWith(const s: UnicodeString): boolean;
+var
+  i,sLength: integer;
+begin
+  sLength:= system.length(s);
+  if (FActualLen < sLength) or (sLength = 0)
+    then begin result:= false; exit; end;
+  i:= 1;
+  repeat
+    result := FContent[i] = s[i];
+    Inc(i);
+  until (not result) or (i > sLength);
+end;
+
+function TdomCustomStr.value: UnicodeString;
+begin
+  Result:= Copy(FContent,1,FActualLen);
+end;
+
+
+
+// ++++++++++++++++++++++++ TdomWideStringList ++++++++++++++++++++++++
+// The code of this class is based on Delphi's TStringList class
+
+destructor TdomWideStringList.destroy;
+begin
+  FOnChange := nil;
+  FOnChanging := nil;
+  inherited destroy;
+  if FCount <> 0 then Finalize(FList^[0], FCount);
+  FCount := 0;
+  SetCapacity(0);
+end;
+
+function TdomWideStringList.add(s: UnicodeString): integer;
+begin
+  Result:= AddObject(S, nil);
+end;
+
+function TdomWideStringList.addObject(s: UnicodeString;
+                                      aObject: TObject): integer;
+begin
+  if not Sorted then
+    Result:= FCount
+  else
+    if Find(S, Result) then
+      case Duplicates of
+        dupIgnore: Exit;
+        dupError: Error('String list does not allow duplicates', 0);
+      end;
+  InsertItem(Result, S, AObject);
+end;
+
+procedure TdomWideStringList.addWideStrings(strings: TdomWideStringList);
+var
+  i: integer;
+begin
+  beginUpdate;
+  try
+    for i:= 0 to pred(strings.count) do
+      addObject(strings[i],strings.objects[i]);
+  finally
+    endUpdate;
+  end;
+end;
+
+procedure TdomWideStringList.append(s: UnicodeString);
+begin
+  add(S);
+end;
+
+procedure TdomWideStringList.assign(source: TPersistent);
+begin
+  if source is TdomWideStringList then begin
+    if source = self then exit;
+    beginUpdate;
+    try
+      clear;
+      addWideStrings(TdomWideStringList(source));
+    finally
+      endUpdate;
+    end;
+    exit;
+  end;
+  inherited assign(Source);
+end;
+
+procedure TdomWideStringList.beginUpdate;
+
+begin
+  if FUpdateCount = 0 then setUpdateState(True);
+  inc(FUpdateCount);
+end;
+
+procedure TdomWideStringList.changed;
+begin
+  if (FUpdateCount = 0) and Assigned(FOnChange) then FOnChange(Self);
+end;
+
+procedure TdomWideStringList.changing;
+begin
+  if (FUpdateCount = 0) and Assigned(FOnChanging) then FOnChanging(Self);
+end;
+
+procedure TdomWideStringList.clear;
+begin
+  if FCount <> 0 then
+  begin
+    Changing;
+    Finalize(FList^[0], FCount);
+    FCount := 0;
+    SetCapacity(0);
+    Changed;
+  end;
+end;
+
+procedure TdomWideStringList.Delete(index: integer);
+begin
+  if (Index < 0) or (Index >= FCount) then Error('List index out of bounds (%d)', Index);
+  Changing;
+  Finalize(FList^[Index]);
+  Dec(FCount);
+  if Index < FCount then
+    System.Move(FList^[Index + 1], FList^[Index],
+      (FCount - Index) * SizeOf(TdomWideStringItem));
+  Changed;
+end;
+
+procedure TdomWideStringList.endUpdate;
+begin
+  dec(FUpdateCount);
+  if FUpdateCount = 0 then setUpdateState(False);
+end;
+
+procedure TdomWideStringList.error(const msg: string;
+                                   data: integer);
+{$IFNDEF FPC}
+  function ReturnAddr: Pointer;
+  asm
+          MOV     EAX,[EBP+4]
+  end;
+{$ENDIF}
+begin
+{$IFDEF FPC}
+  raise EStringListError.CreateFmt(msg, [Data]);
+{$ELSE}
+  raise EStringListError.CreateFmt(Msg, [Data]) at ReturnAddr;
+{$ENDIF}
+end;
+
+procedure TdomWideStringList.exchange(index1,
+                                      index2: integer);
+begin
+  if (Index1 < 0) or (Index1 >= FCount) then Error('List index out of bounds (%d)', Index1);
+  if (Index2 < 0) or (Index2 >= FCount) then Error('List index out of bounds (%d)', Index2);
+  Changing;
+  ExchangeItems(Index1, Index2);
+  Changed;
+end;
+
+procedure TdomWideStringList.exchangeItems(index1,
+                                           index2: integer);
+var
+  Temp: {$IFDEF cpu64}UInt64{$ELSE}Integer{$ENDIF cpu64};
+  Item1, Item2: ^TdomWideStringItem;
+begin
+  Item1 := @FList^[Index1];
+  Item2 := @FList^[Index2];
+  Temp := {$IFDEF cpu64}UInt64{$ELSE}Integer{$ENDIF cpu64}(Item1^.FString);
+  {$IFDEF cpu64}UInt64{$ELSE}Integer{$ENDIF cpu64}(Item1^.FString) := {$IFDEF cpu64}UInt64{$ELSE}Integer{$ENDIF cpu64}(Item2^.FString);
+  {$IFDEF cpu64}UInt64{$ELSE}Integer{$ENDIF cpu64}(Item2^.FString) := Temp;
+  Temp := {$IFDEF cpu64}UInt64{$ELSE}Integer{$ENDIF cpu64}(Item1^.FObject);
+  {$IFDEF cpu64}UInt64{$ELSE}Integer{$ENDIF cpu64}(Item1^.FObject) := {$IFDEF cpu64}UInt64{$ELSE}Integer{$ENDIF cpu64}(Item2^.FObject);
+  {$IFDEF cpu64}UInt64{$ELSE}Integer{$ENDIF cpu64}(Item2^.FObject) := Temp;
+end;
+
+function TdomWideStringList.find(const s: UnicodeString;
+                                   var index: Integer): boolean;
+var
+  L, H, I, C: Integer;
+begin
+  Result := False;
+  L := 0;
+  H := FCount - 1;
+  while L <= H do
+  begin
+    I := (L + H) shr 1;
+    C := CompareText(FList^[I].FString, S);
+    if C < 0 then L := I + 1 else
+    begin
+      H := I - 1;
+      if C = 0 then
+      begin
+        Result := True;
+        if Duplicates <> dupAccept then L := I;
+      end;
+    end;
+  end;
+  Index := L;
+end;
+
+function TdomWideStringList.get(index: integer): UnicodeString;
+begin
+  if (Index < 0) or (Index >= FCount) then Error('List index out of bounds (%d)', Index);
+  Result := FList^[Index].FString;
+end;
+
+function TdomWideStringList.getCapacity: Integer;
+begin
+  Result := FCapacity;
+end;
+
+function TdomWideStringList.getCount: Integer;
+begin
+  Result := FCount;
+end;
+
+function TdomWideStringList.getObject(index: integer): TObject;
+begin
+  if (Index < 0) or (Index >= FCount) then Error('List index out of bounds (%d)', Index);
+  Result := FList^[Index].FObject;
+end;
+
+procedure TdomWideStringList.grow;
+var
+  Delta: Integer;
+begin
+  if FCapacity > 64 then Delta := FCapacity div 4 else
+    if FCapacity > 8 then Delta := 16 else
+      Delta := 4;
+  SetCapacity(FCapacity + Delta);
+end;
+
+function TdomWideStringList.indexOf(const s: UnicodeString): integer;
+begin
+  if not Sorted then begin
+    for Result:= 0 to GetCount - 1 do
+      if CompareText(Get(Result), S) = 0 then exit;
+    Result := -1;
+  end else
+    if not Find(S, Result) then result := -1;
+end;
+
+procedure TdomWideStringList.insert(index: integer;
+                                    const s: UnicodeString);
+begin
+  InsertObject(Index, S, nil);
+end;
+
+procedure TdomWideStringList.insertObject(index: integer;
+                                          const s: UnicodeString;
+                                          AObject: TObject);
+begin
+  if Sorted then Error('Operation not allowed on sorted string list', 0);
+  if (Index < 0) or (Index > FCount) then Error('List index out of bounds (%d)', Index);
+  InsertItem(Index, S, AObject);
+end;
+
+procedure TdomWideStringList.insertItem(index: integer;
+                                        const s: UnicodeString;
+                                        AObject: TObject);
+begin
+  Changing;
+  if FCount = FCapacity then Grow;
+  if Index < FCount then
+    System.Move(FList^[Index], FList^[Index + 1],
+      (FCount - Index) * SizeOf(TdomWideStringItem));
+  with FList^[Index] do
+  begin
+    Pointer(FString) := nil;
+    FObject := AObject;
+    FString := S;
+  end;
+  Inc(FCount);
+  Changed;
+end;
+
+procedure TdomWideStringList.put(index: integer;
+                                 const s: UnicodeString);
+begin
+  if Sorted then Error('Operation not allowed on sorted string list', 0);
+  if (Index < 0) or (Index >= FCount) then Error('List index out of bounds (%d)', Index);
+  Changing;
+  FList^[Index].FString := S;
+  Changed;
+end;
+
+procedure TdomWideStringList.putObject(index: integer;
+                                       aObject: TObject);
+begin
+  if (Index < 0) or (Index >= FCount) then Error('List index out of bounds (%d)', Index);
+  Changing;
+  FList^[Index].FObject := AObject;
+  Changed;
+end;
+
+procedure TdomWideStringList.quickSort(l,
+                                       r: integer);
+var
+  I, J: Integer;
+  P: UnicodeString;
+begin
+  repeat
+    I := L;
+    J := R;
+    P := FList^[(L + R) shr 1].FString;
+    repeat
+      while CompareText(FList^[I].FString, P) < 0 do Inc(I);
+      while CompareText(FList^[J].FString, P) > 0 do Dec(J);
+      if I <= J then
+      begin
+        ExchangeItems(I, J);
+        Inc(I);
+        Dec(J);
+      end;
+    until I > J;
+    if L < J then
+      QuickSort(L, J);
+    L := I;
+  until I >= R;
+end;
+
+procedure TdomWideStringList.setCapacity(newCapacity: integer);
+begin
+  ReallocMem(FList, NewCapacity * SizeOf(TdomWideStringItem));
+  FCapacity := NewCapacity;
+end;
+
+procedure TdomWideStringList.setSorted(const value: boolean);
+begin
+  if FSorted <> Value then begin
+    if Value then Sort;
+    FSorted := Value;
+  end;
+end;
+
+procedure TdomWideStringList.setUpdateState(updating: boolean);
+begin
+  if Updating then Changing else Changed;
+end;
+
+procedure TdomWideStringList.sort;
+begin
+  if not sorted and (FCount > 1) then begin
+    changing;
+    quickSort(0, FCount - 1);
+    changed;
+  end;
+end;
+
+
+
+// +++++++++++++++++++++++ TdomWideStringStream +++++++++++++++++++++++
+//                     - Provided by Karl Waclawek -
+// This is a stream interface for widestrings.
+// Purpose: avoid excessive memory re-allocations that occur with
+//          wideStrings because they are not reference counted.
+//  Note: when the dataString property is accesses, the complete
+//        UnicodeString will be copied out.
+
+constructor TdomWideStringStream.CreateFromString(const aString: UnicodeString);
+begin
+  inherited create;
+  setSize(Length(aString) * SizeOf(WideChar));
+  Move(pointer(aString)^, FDataStringP^, FSize);
+end;
+
+destructor TdomWideStringStream.destroy;
+begin
+  FreeMem(FDataStringP);
+  inherited destroy;
+end;
+
+function TdomWideStringStream.GetDataString: UnicodeString;
+begin
+  setLength(Result, StringLength);
+  Move(FDataStringP^, pointer(Result)^, FSize);
+end;
+
+function TdomWideStringStream.Read(var Buffer; Count: longint): longint;
+begin
+  Result := FSize - FPosition;
+  if Result > Count then Result := Count;
+  Move((FDataStringP + FPosition)^, Buffer, Result);
+  Inc(FPosition, Result);
+end;
+
+function TdomWideStringStream.Write(const Buffer; Count: longint): longint;
+var
+  NewPos: longint;
+begin
+  Result := Count;
+  NewPos := FPosition + Result;
+  if NewPos > FSize
+    then setSize(((NewPos + 1) * 2) * 2); //next larger even value
+  Move(Buffer, (FDataStringP + FPosition)^, Result);
+  FPosition := NewPos;
+end;
+
+function TdomWideStringStream.Seek(Offset: longint; Origin: Word): longint;
+begin
+  case Origin of
+    soFromBeginning: FPosition := Offset;
+    soFromCurrent: FPosition := FPosition + Offset;
+    soFromEnd: FPosition := FSize - Offset;
+  end;
+  if FPosition > FSize then FPosition := FSize
+  else if FPosition < 0 then FPosition := 0;
+  Result := FPosition;
+end;
+
+function TdomWideStringStream.ReadString(Count: longint): UnicodeString;
+// Reads Count WideChars from stream and returns them as UnicodeString.
+var
+  Len: longint;
+begin
+  if Odd(FPosition) then raise EReadError.create(SCannotReadOddPos);
+  Len := (FSize - FPosition) shr 1;
+  if Len > Count then Len := Count;
+  setLength(Result, Len);
+  Read(pointer(Result)^, Len shl 1);
+end;
+
+procedure TdomWideStringStream.WriteString(const aString: UnicodeString);
+// Writes aString into stream, starting at StringPosition, overwriting
+// existing characters and extending the stream if necessary.
+begin
+  if Odd(FPosition) then raise EWriteError.create(SCannotWriteOddPos);
+  Write(pointer(aString)^, Length(aString) shl 1);
+end;
+
+procedure TdomWideStringStream.SetCapacity(NewCapacity: longint);
+// sets stream capacity in bytes.
+begin
+  if NewCapacity < FSize then raise EStreamError.create(SCapacityLessSize);
+  ReallocMem(FDataStringP, NewCapacity);
+  FCapacity := NewCapacity;
+end;
+
+procedure TdomWideStringStream.SetSize(NewSize: longint);
+// sets stream size in bytes.
+var
+  Delta: longint;
+begin
+  if Odd(NewSize) then raise EStreamError.create(SOddSizeInvalid);
+  if NewSize > Capacity then begin
+    Delta := NewSize shr 2;
+    if Delta < 8 then Delta := 8;
+    setCapacity(((NewSize + Delta) shr 2) shl 2); //make it a multiple of 4
+  end else
+    if NewSize < 0 then raise EStreamError.create(SNegativeSizeInvalid);
+  FSize := NewSize;
+  if FPosition > FSize then FPosition := FSize;
+end;
+
+procedure TdomWideStringStream.SetStringPosition(value: longint);
+// sets string position in terms of WideChars.
+begin
+  Position := (value - 1) shl 1;
+end;
+
+function TdomWideStringStream.GetStringPosition: longint;
+// ets string position in terms of WideChars.
+begin
+  if Odd(Position) then raise EStreamError.create(SOddPosInvalid);
+  Result := (Position shr 1) + 1;
+end;
+
+procedure TdomWideStringStream.SetStringLength(value: longint);
+// sets string length in terms of WideChars.
+begin
+  setSize(value shl 1);
+end;
+
+function TdomWideStringStream.GetStringLength: longint;
+// gets string length in terms of WideChars.
+begin
+  Result := FSize shr 1;
+end;
+
+
+
+//++++++++++++++++++++++++++++ TIso639Info ++++++++++++++++++++++++++++
+constructor TIso639Info.create;
+begin
+  inherited create;
+  FSupportedLanguages:= [iso639_en];
+  FNameLanguage:= iso639_en;
+  FAppendSymbolToName:= false;
+end;
+
+procedure TIso639Info.assignTo(dest: TPersistent);
+var
+  i: {$IFDEF cpu64}UInt64{$ELSE}Integer{$ENDIF};
+begin
+  if dest is TStrings then begin
+
+    with TStrings(dest) do begin
+      beginUpdate;
+      try
+        clear;
+        try
+          for i:= ord(low(TIso639LanguageCode)) to ord(high(TIso639LanguageCode)) do
+            addObject({$IFNDEF UNICODE}UTF16To7BitASCIIStr{$ENDIF}(codeToName(TIso639LanguageCode(i))),TObject(pointer(i)));
+        except
+          clear;
+          raise;
+        end;
+      finally
+        endUpdate;
+      end;
+    end;
+
+  end else if dest is TdomWideStringList then begin
+
+    with TdomWideStringList(dest) do begin
+      beginUpdate;
+      try
+        clear;
+        try
+          for i:= ord(low(TIso639LanguageCode)) to ord(high(TIso639LanguageCode)) do
+            addObject(codeToName(TIso639LanguageCode(i)),tobject(pointer(i)));
+        except
+          clear;
+          raise;
+        end;
+      finally
+        endUpdate;
+      end;
+    end;
+
+  end else inherited assignTo(dest);
+end;
+
+function TIso639Info.codeToName(const value: TIso639LanguageCode): UnicodeString;
+begin
+  case nameLanguage of
+    iso639_en: result:= codeToName_en(value);
+  else
+    raise ENot_Supported_Err.create('Not supported error.');
+  end;
+end;
+
+function TIso639Info.codeToName_en(value: TIso639LanguageCode): UnicodeString;
+begin
+  if value = iso639_aa then result:= 'Afar'
+  else if value = iso639_ab then result:= 'Abkhazian'
+  else if value = iso639_af then result:= 'Afrikaans'
+  else if value = iso639_am then result:= 'Amharic'
+  else if value = iso639_ar then result:= 'Arabic'
+  else if value = iso639_as then result:= 'Assamese'
+  else if value = iso639_ay then result:= 'Aymara'
+  else if value = iso639_az then result:= 'Azerbaijani'
+  else if value = iso639_ba then result:= 'Bashkir'
+  else if value = iso639_be then result:= 'Byelorussian'
+  else if value = iso639_bg then result:= 'Bulgarian'
+  else if value = iso639_bh then result:= 'Bihari'
+  else if value = iso639_bi then result:= 'Bislama'
+  else if value = iso639_bn then result:= 'Bengali; Bangla'
+  else if value = iso639_bo then result:= 'Tibetan'
+  else if value = iso639_br then result:= 'Breton'
+  else if value = iso639_ca then result:= 'Catalan'
+  else if value = iso639_co then result:= 'Corsican'
+  else if value = iso639_cs then result:= 'Czech'
+  else if value = iso639_cy then result:= 'Welsh'
+  else if value = iso639_da then result:= 'Danish'
+  else if value = iso639_de then result:= 'German'
+  else if value = iso639_dz then result:= 'Bhutani'
+  else if value = iso639_el then result:= 'Greek'
+  else if value = iso639_en then result:= 'English'
+  else if value = iso639_eo then result:= 'Esperanto'
+  else if value = iso639_es then result:= 'Spanish'
+  else if value = iso639_et then result:= 'Estonian'
+  else if value = iso639_eu then result:= 'Basque'
+  else if value = iso639_fa then result:= 'Persian'
+  else if value = iso639_fi then result:= 'Finnish'
+  else if value = iso639_fj then result:= 'Fiji'
+  else if value = iso639_fo then result:= 'Faeroese'
+  else if value = iso639_fr then result:= 'French'
+  else if value = iso639_fy then result:= 'Frisian'
+  else if value = iso639_ga then result:= 'Irish'
+  else if value = iso639_gd then result:= 'Scots Gaelic'
+  else if value = iso639_gl then result:= 'Galician'
+  else if value = iso639_gn then result:= 'Guarani'
+  else if value = iso639_gu then result:= 'Gujarati'
+  else if value = iso639_ha then result:= 'Hausa'
+  else if value = iso639_hi then result:= 'Hindi'
+  else if value = iso639_hr then result:= 'Croatian'
+  else if value = iso639_hu then result:= 'Hungarian'
+  else if value = iso639_hy then result:= 'Armenian'
+  else if value = iso639_ia then result:= 'Interlingua'
+  else if value = iso639_ie then result:= 'Interlingue'
+  else if value = iso639_ik then result:= 'Inupiak'
+  else if value = iso639_in then result:= 'Indonesian'
+  else if value = iso639_is then result:= 'Icelandic'
+  else if value = iso639_it then result:= 'Italian'
+  else if value = iso639_iw then result:= 'Hebrew'
+  else if value = iso639_ja then result:= 'Japanese'
+  else if value = iso639_ji then result:= 'Yiddish'
+  else if value = iso639_jw then result:= 'Javanese'
+  else if value = iso639_ka then result:= 'Georgian'
+  else if value = iso639_kk then result:= 'Kazakh'
+  else if value = iso639_kl then result:= 'Greenlandic'
+  else if value = iso639_km then result:= 'Cambodian'
+  else if value = iso639_kn then result:= 'Kannada'
+  else if value = iso639_ko then result:= 'Korean'
+  else if value = iso639_ks then result:= 'Kashmiri'
+  else if value = iso639_ku then result:= 'Kurdish'
+  else if value = iso639_ky then result:= 'Kirghiz'
+  else if value = iso639_la then result:= 'Latin'
+  else if value = iso639_ln then result:= 'Lingala'
+  else if value = iso639_lo then result:= 'Laothian'
+  else if value = iso639_lt then result:= 'Lithuanian'
+  else if value = iso639_lv then result:= 'Latvian; Lettish'
+  else if value = iso639_mg then result:= 'Malagasy'
+  else if value = iso639_mi then result:= 'Maori'
+  else if value = iso639_mk then result:= 'Macedonian'
+  else if value = iso639_ml then result:= 'Malayalam'
+  else if value = iso639_mn then result:= 'Mongolian'
+  else if value = iso639_mo then result:= 'Moldavian'
+  else if value = iso639_mr then result:= 'Marathi'
+  else if value = iso639_ms then result:= 'Malay'
+  else if value = iso639_mt then result:= 'Maltese'
+  else if value = iso639_my then result:= 'Burmese'
+  else if value = iso639_na then result:= 'Nauru'
+  else if value = iso639_ne then result:= 'Nepali'
+  else if value = iso639_nl then result:= 'Dutch'
+  else if value = iso639_no then result:= 'Norwegian'
+  else if value = iso639_oc then result:= 'Occitan'
+  else if value = iso639_om then result:= 'Afan; Oromo'
+  else if value = iso639_or then result:= 'Oriya'
+  else if value = iso639_pa then result:= 'Punjabi'
+  else if value = iso639_pl then result:= 'Polish'
+  else if value = iso639_ps then result:= 'Pashto; Pushto'
+  else if value = iso639_pt then result:= 'Portuguese'
+  else if value = iso639_qu then result:= 'Quechua'
+  else if value = iso639_rm then result:= 'Rhaeto-Romance'
+  else if value = iso639_rn then result:= 'Kirundi'
+  else if value = iso639_ro then result:= 'Romanian'
+  else if value = iso639_ru then result:= 'Russian'
+  else if value = iso639_rw then result:= 'Kinyarwanda'
+  else if value = iso639_sa then result:= 'Sanskrit'
+  else if value = iso639_sd then result:= 'Sindhi'
+  else if value = iso639_sg then result:= 'Sangro'
+  else if value = iso639_sh then result:= 'Serbo-Croatian'
+  else if value = iso639_si then result:= 'Singhalese'
+  else if value = iso639_sk then result:= 'Slovak'
+  else if value = iso639_sl then result:= 'Slovenian'
+  else if value = iso639_sm then result:= 'Samoan'
+  else if value = iso639_sn then result:= 'Shona'
+  else if value = iso639_so then result:= 'Somali'
+  else if value = iso639_sq then result:= 'Albanian'
+  else if value = iso639_sr then result:= 'Serbian'
+  else if value = iso639_ss then result:= 'Siswati'
+  else if value = iso639_st then result:= 'Sesotho'
+  else if value = iso639_su then result:= 'Sundanese'
+  else if value = iso639_sv then result:= 'Swedish'
+  else if value = iso639_sw then result:= 'Swahili'
+  else if value = iso639_ta then result:= 'Tamil'
+  else if value = iso639_te then result:= 'Tegulu'
+  else if value = iso639_tg then result:= 'Tajik'
+  else if value = iso639_th then result:= 'Thai'
+  else if value = iso639_ti then result:= 'Tigrinya'
+  else if value = iso639_tk then result:= 'Turkmen'
+  else if value = iso639_tl then result:= 'Tagalog'
+  else if value = iso639_tn then result:= 'Setswana'
+  else if value = iso639_to then result:= 'Tonga'
+  else if value = iso639_tr then result:= 'Turkish'
+  else if value = iso639_ts then result:= 'Tsonga'
+  else if value = iso639_tt then result:= 'Tatar'
+  else if value = iso639_tw then result:= 'Twi'
+  else if value = iso639_uk then result:= 'Ukrainian'
+  else if value = iso639_ur then result:= 'Urdu'
+  else if value = iso639_uz then result:= 'Uzbek'
+  else if value = iso639_vi then result:= 'Vietnamese'
+  else if value = iso639_vo then result:= 'Volapuk'
+  else if value = iso639_wo then result:= 'Wolof'
+  else if value = iso639_xh then result:= 'Xhosa'
+  else if value = iso639_yo then result:= 'Yoruba'
+  else if value = iso639_zh then result:= 'Chinese'
+  else if value = iso639_zu then result:= 'Zulu'
+  ;
+
+  if FAppendSymbolToName
+    then result:= concat(result,' [',codeToSymbol(value),']');
+end;
+
+function TIso639Info.codeToSymbol(const value: TIso639LanguageCode): UnicodeString;
+begin
+  if value = iso639_aa then result:= 'aa' // Afar
+  else if value = iso639_ab then result:= 'ab' // Abkhazian
+  else if value = iso639_af then result:= 'af' // Afrikaans
+  else if value = iso639_am then result:= 'am' // Amharic
+  else if value = iso639_ar then result:= 'ar' // Arabic
+  else if value = iso639_as then result:= 'as' // Assamese
+  else if value = iso639_ay then result:= 'ay' // Aymara
+  else if value = iso639_az then result:= 'az' // Azerbaijani
+  else if value = iso639_ba then result:= 'ba' // Bashkir
+  else if value = iso639_be then result:= 'be' // Byelorussian
+  else if value = iso639_bg then result:= 'bg' // Bulgarian
+  else if value = iso639_bh then result:= 'bh' // Bihari
+  else if value = iso639_bi then result:= 'bi' // Bislama
+  else if value = iso639_bn then result:= 'bn' // Bengali; Bangla
+  else if value = iso639_bo then result:= 'bo' // Tibetan
+  else if value = iso639_br then result:= 'br' // Breton
+  else if value = iso639_ca then result:= 'ca' // Catalan
+  else if value = iso639_co then result:= 'co' // Corsican
+  else if value = iso639_cs then result:= 'cs' // Czech
+  else if value = iso639_cy then result:= 'cy' // Welsh
+  else if value = iso639_da then result:= 'da' // Danish
+  else if value = iso639_de then result:= 'de' // German
+  else if value = iso639_dz then result:= 'dz' // Bhutani
+  else if value = iso639_el then result:= 'el' // Greek
+  else if value = iso639_en then result:= 'en' // English
+  else if value = iso639_eo then result:= 'eo' // Esperanto
+  else if value = iso639_es then result:= 'es' // Spanish
+  else if value = iso639_et then result:= 'et' // Estonian
+  else if value = iso639_eu then result:= 'eu' // Basque
+  else if value = iso639_fa then result:= 'fa' // Persian
+  else if value = iso639_fi then result:= 'fi' // Finnish
+  else if value = iso639_fj then result:= 'fj' // Fiji
+  else if value = iso639_fo then result:= 'fo' // Faeroese
+  else if value = iso639_fr then result:= 'fr' // French
+  else if value = iso639_fy then result:= 'fy' // Frisian
+  else if value = iso639_ga then result:= 'ga' // Irish
+  else if value = iso639_gd then result:= 'gd' // Scots Gaelic
+  else if value = iso639_gl then result:= 'gl' // Galician
+  else if value = iso639_gn then result:= 'gn' // Guarani
+  else if value = iso639_gu then result:= 'gu' // Gujarati
+  else if value = iso639_ha then result:= 'ha' // Hausa
+  else if value = iso639_hi then result:= 'hi' // Hindi
+  else if value = iso639_hr then result:= 'hr' // Croatian
+  else if value = iso639_hu then result:= 'hu' // Hungarian
+  else if value = iso639_hy then result:= 'hy' // Armenian
+  else if value = iso639_ia then result:= 'ia' // Interlingua
+  else if value = iso639_ie then result:= 'ie' // Interlingue
+  else if value = iso639_ik then result:= 'ik' // Inupiak
+  else if value = iso639_in then result:= 'in' // Indonesian
+  else if value = iso639_is then result:= 'is' // Icelandic
+  else if value = iso639_it then result:= 'it' // Italian
+  else if value = iso639_iw then result:= 'iw' // Hebrew
+  else if value = iso639_ja then result:= 'ja' // Japanese
+  else if value = iso639_ji then result:= 'ji' // Yiddish
+  else if value = iso639_jw then result:= 'jw' // Javanese
+  else if value = iso639_ka then result:= 'ka' // Georgian
+  else if value = iso639_kk then result:= 'kk' // Kazakh
+  else if value = iso639_kl then result:= 'kl' // Greenlandic
+  else if value = iso639_km then result:= 'km' // Cambodian
+  else if value = iso639_kn then result:= 'kn' // Kannada
+  else if value = iso639_ko then result:= 'ko' // Korean
+  else if value = iso639_ks then result:= 'ks' // Kashmiri
+  else if value = iso639_ku then result:= 'ku' // Kurdish
+  else if value = iso639_ky then result:= 'ky' // Kirghiz
+  else if value = iso639_la then result:= 'la' // Latin
+  else if value = iso639_ln then result:= 'ln' // Lingala
+  else if value = iso639_lo then result:= 'lo' // Laothian
+  else if value = iso639_lt then result:= 'lt' // Lithuanian
+  else if value = iso639_lv then result:= 'lv' // Latvian; Lettish
+  else if value = iso639_mg then result:= 'mg' // Malagasy
+  else if value = iso639_mi then result:= 'mi' // Maori
+  else if value = iso639_mk then result:= 'mk' // Macedonian
+  else if value = iso639_ml then result:= 'ml' // Malayalam
+  else if value = iso639_mn then result:= 'mn' // Mongolian
+  else if value = iso639_mo then result:= 'mo' // Moldavian
+  else if value = iso639_mr then result:= 'mr' // Marathi
+  else if value = iso639_ms then result:= 'ms' // Malay
+  else if value = iso639_mt then result:= 'mt' // Maltese
+  else if value = iso639_my then result:= 'my' // Burmese
+  else if value = iso639_na then result:= 'na' // Nauru
+  else if value = iso639_ne then result:= 'ne' // Nepali
+  else if value = iso639_nl then result:= 'nl' // Dutch
+  else if value = iso639_no then result:= 'no' // Norwegian
+  else if value = iso639_oc then result:= 'oc' // Occitan
+  else if value = iso639_om then result:= 'om' // Afan; Oromo
+  else if value = iso639_or then result:= 'or' // Oriya
+  else if value = iso639_pa then result:= 'pa' // Punjabi
+  else if value = iso639_pl then result:= 'pl' // Polish
+  else if value = iso639_ps then result:= 'ps' // Pashto; Pushto
+  else if value = iso639_pt then result:= 'pt' // Portuguese
+  else if value = iso639_qu then result:= 'qu' // Quechua
+  else if value = iso639_rm then result:= 'rm' // Rhaeto-Romance
+  else if value = iso639_rn then result:= 'rn' // Kirundi
+  else if value = iso639_ro then result:= 'ro' // Romanian
+  else if value = iso639_ru then result:= 'ru' // Russian
+  else if value = iso639_rw then result:= 'rw' // Kinyarwanda
+  else if value = iso639_sa then result:= 'sa' // Sanskrit
+  else if value = iso639_sd then result:= 'sd' // Sindhi
+  else if value = iso639_sg then result:= 'sg' // Sangro
+  else if value = iso639_sh then result:= 'sh' // Serbo-Croatian
+  else if value = iso639_si then result:= 'si' // Singhalese
+  else if value = iso639_sk then result:= 'sk' // Slovak
+  else if value = iso639_sl then result:= 'sl' // Slovenian
+  else if value = iso639_sm then result:= 'sm' // Samoan
+  else if value = iso639_sn then result:= 'sn' // Shona
+  else if value = iso639_so then result:= 'so' // Somali
+  else if value = iso639_sq then result:= 'sq' // Albanian
+  else if value = iso639_sr then result:= 'sr' // Serbian
+  else if value = iso639_ss then result:= 'ss' // Siswati
+  else if value = iso639_st then result:= 'st' // Sesotho
+  else if value = iso639_su then result:= 'su' // Sundanese
+  else if value = iso639_sv then result:= 'sv' // Swedish
+  else if value = iso639_sw then result:= 'sw' // Swahili
+  else if value = iso639_ta then result:= 'ta' // Tamil
+  else if value = iso639_te then result:= 'te' // Tegulu
+  else if value = iso639_tg then result:= 'tg' // Tajik
+  else if value = iso639_th then result:= 'th' // Thai
+  else if value = iso639_ti then result:= 'ti' // Tigrinya
+  else if value = iso639_tk then result:= 'tk' // Turkmen
+  else if value = iso639_tl then result:= 'tl' // Tagalog
+  else if value = iso639_tn then result:= 'tn' // Setswana
+  else if value = iso639_to then result:= 'to' // Tonga
+  else if value = iso639_tr then result:= 'tr' // Turkish
+  else if value = iso639_ts then result:= 'ts' // Tsonga
+  else if value = iso639_tt then result:= 'tt' // Tatar
+  else if value = iso639_tw then result:= 'tw' // Twi
+  else if value = iso639_uk then result:= 'uk' // Ukrainian
+  else if value = iso639_ur then result:= 'ur' // Urdu
+  else if value = iso639_uz then result:= 'uz' // Uzbek
+  else if value = iso639_vi then result:= 'vi' // Vietnamese
+  else if value = iso639_vo then result:= 'vo' // Volapuk
+  else if value = iso639_wo then result:= 'wo' // Wolof
+  else if value = iso639_xh then result:= 'xh' // Xhosa
+  else if value = iso639_yo then result:= 'yo' // Yoruba
+  else if value = iso639_zh then result:= 'zh' // Chinese
+  else if value = iso639_zu then result:= 'zu' // Zulu
+  ;
+end;
+
+function TIso639Info.nameToCode(const value: UnicodeString): TIso639LanguageCode;
+begin
+  case nameLanguage of
+    iso639_en: result:= nameToCode_en(value);
+  else
+    raise ENot_Supported_Err.create('Not supported error.');
+  end;
+end;
+
+function TIso639Info.nameToCode_en(value: UnicodeString): TIso639LanguageCode;
+var
+  i,j: integer;
+  dummy: UnicodeString;
+begin
+  i:= pos(';',value);
+  if i > 0 then begin
+    dummy:= copy(value,1,i-1);
+    value:= dummy;
+  end else begin
+    j:= pos('[',value);
+    if j > 1 then begin
+      if value[j] = ' ' then begin
+        dummy:= copy(value,1,j-2);
+        value:= dummy;
+      end;
+    end;
+  end;
+
+  if value = 'Afar' then result:= iso639_aa 
+  else if value = 'Abkhazian' then result:= iso639_ab
+  else if value = 'Afrikaans' then result:= iso639_af
+  else if value = 'Amharic' then result:= iso639_am
+  else if value = 'Arabic' then result:= iso639_ar
+  else if value = 'Assamese' then result:= iso639_as
+  else if value = 'Aymara' then result:= iso639_ay
+  else if value = 'Azerbaijani' then result:= iso639_az
+  else if value = 'Bashkir' then result:= iso639_ba
+  else if value = 'Byelorussian' then result:= iso639_be
+  else if value = 'Bulgarian' then result:= iso639_bg
+  else if value = 'Bihari' then result:= iso639_bh
+  else if value = 'Bislama' then result:= iso639_bi
+  else if value = 'Bengali' then result:= iso639_bn
+  else if value = 'Bangla' then result:= iso639_bn
+  else if value = 'Tibetan' then result:= iso639_bo
+  else if value = 'Breton' then result:= iso639_br
+  else if value = 'Catalan' then result:= iso639_ca
+  else if value = 'Corsican' then result:= iso639_co
+  else if value = 'Czech' then result:= iso639_cs
+  else if value = 'Welsh' then result:= iso639_cy
+  else if value = 'Danish' then result:= iso639_da
+  else if value = 'German' then result:= iso639_de
+  else if value = 'Bhutani' then result:= iso639_dz
+  else if value = 'Greek' then result:= iso639_el
+  else if value = 'English' then result:= iso639_en
+  else if value = 'Esperanto' then result:= iso639_eo
+  else if value = 'Spanish' then result:= iso639_es
+  else if value = 'Estonian' then result:= iso639_et
+  else if value = 'Basque' then result:= iso639_eu
+  else if value = 'Persian' then result:= iso639_fa
+  else if value = 'Finnish' then result:= iso639_fi
+  else if value = 'Fiji' then result:= iso639_fj
+  else if value = 'Faeroese' then result:= iso639_fo
+  else if value = 'French' then result:= iso639_fr
+  else if value = 'Frisian' then result:= iso639_fy
+  else if value = 'Irish' then result:= iso639_ga
+  else if value = 'Scots Gaelic' then result:= iso639_gd
+  else if value = 'Galician' then result:= iso639_gl
+  else if value = 'Guarani' then result:= iso639_gn
+  else if value = 'Gujarati' then result:= iso639_gu
+  else if value = 'Hausa' then result:= iso639_ha
+  else if value = 'Hindi' then result:= iso639_hi
+  else if value = 'Croatian' then result:= iso639_hr
+  else if value = 'Hungarian' then result:= iso639_hu
+  else if value = 'Armenian' then result:= iso639_hy
+  else if value = 'Interlingua' then result:= iso639_ia
+  else if value = 'Interlingue' then result:= iso639_ie
+  else if value = 'Inupiak' then result:= iso639_ik
+  else if value = 'Indonesian' then result:= iso639_in
+  else if value = 'Icelandic' then result:= iso639_is
+  else if value = 'Italian' then result:= iso639_it
+  else if value = 'Hebrew' then result:= iso639_iw
+  else if value = 'Japanese' then result:= iso639_ja
+  else if value = 'Yiddish' then result:= iso639_ji
+  else if value = 'Javanese' then result:= iso639_jw
+  else if value = 'Georgian' then result:= iso639_ka
+  else if value = 'Kazakh' then result:= iso639_kk
+  else if value = 'Greenlandic' then result:= iso639_kl
+  else if value = 'Cambodian' then result:= iso639_km
+  else if value = 'Kannada' then result:= iso639_kn
+  else if value = 'Korean' then result:= iso639_ko
+  else if value = 'Kashmiri' then result:= iso639_ks
+  else if value = 'Kurdish' then result:= iso639_ku
+  else if value = 'Kirghiz' then result:= iso639_ky
+  else if value = 'Latin' then result:= iso639_la
+  else if value = 'Lingala' then result:= iso639_ln
+  else if value = 'Laothian' then result:= iso639_lo
+  else if value = 'Lithuanian' then result:= iso639_lt
+  else if value = 'Latvian' then result:= iso639_lv
+  else if value = 'Lettish' then result:= iso639_lv
+  else if value = 'Malagasy' then result:= iso639_mg
+  else if value = 'Maori' then result:= iso639_mi
+  else if value = 'Macedonian' then result:= iso639_mk
+  else if value = 'Malayalam' then result:= iso639_ml
+  else if value = 'Mongolian' then result:= iso639_mn
+  else if value = 'Moldavian' then result:= iso639_mo
+  else if value = 'Marathi' then result:= iso639_mr
+  else if value = 'Malay' then result:= iso639_ms
+  else if value = 'Maltese' then result:= iso639_mt
+  else if value = 'Burmese' then result:= iso639_my
+  else if value = 'Nauru' then result:= iso639_na
+  else if value = 'Nepali' then result:= iso639_ne
+  else if value = 'Dutch' then result:= iso639_nl
+  else if value = 'Norwegian' then result:= iso639_no
+  else if value = 'Occitan' then result:= iso639_oc
+  else if value = 'Afan' then result:= iso639_om
+  else if value = 'Oromo' then result:= iso639_om
+  else if value = 'Oriya' then result:= iso639_or
+  else if value = 'Punjabi' then result:= iso639_pa
+  else if value = 'Polish' then result:= iso639_pl
+  else if value = 'Pashto' then result:= iso639_ps
+  else if value = 'Pushto' then result:= iso639_ps
+  else if value = 'Portuguese' then result:= iso639_pt
+  else if value = 'Quechua' then result:= iso639_qu
+  else if value = 'Rhaeto-Romance' then result:= iso639_rm
+  else if value = 'Kirundi' then result:= iso639_rn
+  else if value = 'Romanian' then result:= iso639_ro
+  else if value = 'Russian' then result:= iso639_ru
+  else if value = 'Kinyarwanda' then result:= iso639_rw
+  else if value = 'Sanskrit' then result:= iso639_sa
+  else if value = 'Sindhi' then result:= iso639_sd
+  else if value = 'Sangro' then result:= iso639_sg
+  else if value = 'Serbo-Croatian' then result:= iso639_sh
+  else if value = 'Singhalese' then result:= iso639_si
+  else if value = 'Slovak' then result:= iso639_sk
+  else if value = 'Slovenian' then result:= iso639_sl
+  else if value = 'Samoan' then result:= iso639_sm
+  else if value = 'Shona' then result:= iso639_sn
+  else if value = 'Somali' then result:= iso639_so
+  else if value = 'Albanian' then result:= iso639_sq
+  else if value = 'Serbian' then result:= iso639_sr
+  else if value = 'Siswati' then result:= iso639_ss
+  else if value = 'Sesotho' then result:= iso639_st
+  else if value = 'Sundanese' then result:= iso639_su
+  else if value = 'Swedish' then result:= iso639_sv
+  else if value = 'Swahili' then result:= iso639_sw
+  else if value = 'Tamil' then result:= iso639_ta
+  else if value = 'Tegulu' then result:= iso639_te
+  else if value = 'Tajik' then result:= iso639_tg
+  else if value = 'Thai' then result:= iso639_th
+  else if value = 'Tigrinya' then result:= iso639_ti
+  else if value = 'Turkmen' then result:= iso639_tk
+  else if value = 'Tagalog' then result:= iso639_tl
+  else if value = 'Setswana' then result:= iso639_tn
+  else if value = 'Tonga' then result:= iso639_to
+  else if value = 'Turkish' then result:= iso639_tr
+  else if value = 'Tsonga' then result:= iso639_ts
+  else if value = 'Tatar' then result:= iso639_tt
+  else if value = 'Twi' then result:= iso639_tw
+  else if value = 'Ukrainian' then result:= iso639_uk
+  else if value = 'Urdu' then result:= iso639_ur
+  else if value = 'Uzbek' then result:= iso639_uz
+  else if value = 'Vietnamese' then result:= iso639_vi
+  else if value = 'Volapuk' then result:= iso639_vo
+  else if value = 'Wolof' then result:= iso639_wo
+  else if value = 'Xhosa' then result:= iso639_xh
+  else if value = 'Yoruba' then result:= iso639_yo
+  else if value = 'Chinese' then result:= iso639_zh
+  else if value = 'Zulu' then result:= iso639_zu
+  else raise EConvertError.Create('Invalid ISO 639 language name');
+end;
+
+procedure TIso639Info.setNameLanguage(const value: TIso639LanguageCode);
+begin
+  if not (value in FSupportedLanguages)
+    then raise ENot_Supported_Err.create('Not supported error.');
+end;
+
+function TIso639Info.symbolToCode(const value: UnicodeString): TIso639LanguageCode;
+begin
+  if value = 'aa' then result:= iso639_aa // Afar
+  else if value = 'ab' then result:= iso639_ab // Abkhazian
+  else if value = 'af' then result:= iso639_af // Afrikaans
+  else if value = 'am' then result:= iso639_am // Amharic
+  else if value = 'ar' then result:= iso639_ar // Arabic
+  else if value = 'as' then result:= iso639_as // Assamese
+  else if value = 'ay' then result:= iso639_ay // Aymara
+  else if value = 'az' then result:= iso639_az // Azerbaijani
+  else if value = 'ba' then result:= iso639_ba // Bashkir
+  else if value = 'be' then result:= iso639_be // Byelorussian
+  else if value = 'bg' then result:= iso639_bg // Bulgarian
+  else if value = 'bh' then result:= iso639_bh // Bihari
+  else if value = 'bi' then result:= iso639_bi // Bislama
+  else if value = 'bn' then result:= iso639_bn // Bengali; Bangla
+  else if value = 'bo' then result:= iso639_bo // Tibetan
+  else if value = 'br' then result:= iso639_br // Breton
+  else if value = 'ca' then result:= iso639_ca // Catalan
+  else if value = 'co' then result:= iso639_co // Corsican
+  else if value = 'cs' then result:= iso639_cs // Czech
+  else if value = 'cy' then result:= iso639_cy // Welsh
+  else if value = 'da' then result:= iso639_da // Danish
+  else if value = 'de' then result:= iso639_de // German
+  else if value = 'dz' then result:= iso639_dz // Bhutani
+  else if value = 'el' then result:= iso639_el // Greek
+  else if value = 'en' then result:= iso639_en // English
+  else if value = 'eo' then result:= iso639_eo // Esperanto
+  else if value = 'es' then result:= iso639_es // Spanish
+  else if value = 'et' then result:= iso639_et // Estonian
+  else if value = 'eu' then result:= iso639_eu // Basque
+  else if value = 'fa' then result:= iso639_fa // Persian
+  else if value = 'fi' then result:= iso639_fi // Finnish
+  else if value = 'fj' then result:= iso639_fj // Fiji
+  else if value = 'fo' then result:= iso639_fo // Faeroese
+  else if value = 'fr' then result:= iso639_fr // French
+  else if value = 'fy' then result:= iso639_fy // Frisian
+  else if value = 'ga' then result:= iso639_ga // Irish
+  else if value = 'gd' then result:= iso639_gd // Scots Gaelic
+  else if value = 'gl' then result:= iso639_gl // Galician
+  else if value = 'gn' then result:= iso639_gn // Guarani
+  else if value = 'gu' then result:= iso639_gu // Gujarati
+  else if value = 'ha' then result:= iso639_ha // Hausa
+  else if value = 'hi' then result:= iso639_hi // Hindi
+  else if value = 'hr' then result:= iso639_hr // Croatian
+  else if value = 'hu' then result:= iso639_hu // Hungarian
+  else if value = 'hy' then result:= iso639_hy // Armenian
+  else if value = 'ia' then result:= iso639_ia // Interlingua
+  else if value = 'ie' then result:= iso639_ie // Interlingue
+  else if value = 'ik' then result:= iso639_ik // Inupiak
+  else if value = 'in' then result:= iso639_in // Indonesian
+  else if value = 'is' then result:= iso639_is // Icelandic
+  else if value = 'it' then result:= iso639_it // Italian
+  else if value = 'iw' then result:= iso639_iw // Hebrew
+  else if value = 'ja' then result:= iso639_ja // Japanese
+  else if value = 'ji' then result:= iso639_ji // Yiddish
+  else if value = 'jw' then result:= iso639_jw // Javanese
+  else if value = 'ka' then result:= iso639_ka // Georgian
+  else if value = 'kk' then result:= iso639_kk // Kazakh
+  else if value = 'kl' then result:= iso639_kl // Greenlandic
+  else if value = 'km' then result:= iso639_km // Cambodian
+  else if value = 'kn' then result:= iso639_kn // Kannada
+  else if value = 'ko' then result:= iso639_ko // Korean
+  else if value = 'ks' then result:= iso639_ks // Kashmiri
+  else if value = 'ku' then result:= iso639_ku // Kurdish
+  else if value = 'ky' then result:= iso639_ky // Kirghiz
+  else if value = 'la' then result:= iso639_la // Latin
+  else if value = 'ln' then result:= iso639_ln // Lingala
+  else if value = 'lo' then result:= iso639_lo // Laothian
+  else if value = 'lt' then result:= iso639_lt // Lithuanian
+  else if value = 'lv' then result:= iso639_lv // Latvian; Lettish
+  else if value = 'mg' then result:= iso639_mg // Malagasy
+  else if value = 'mi' then result:= iso639_mi // Maori
+  else if value = 'mk' then result:= iso639_mk // Macedonian
+  else if value = 'ml' then result:= iso639_ml // Malayalam
+  else if value = 'mn' then result:= iso639_mn // Mongolian
+  else if value = 'mo' then result:= iso639_mo // Moldavian
+  else if value = 'mr' then result:= iso639_mr // Marathi
+  else if value = 'ms' then result:= iso639_ms // Malay
+  else if value = 'mt' then result:= iso639_mt // Maltese
+  else if value = 'my' then result:= iso639_my // Burmese
+  else if value = 'na' then result:= iso639_na // Nauru
+  else if value = 'ne' then result:= iso639_ne // Nepali
+  else if value = 'nl' then result:= iso639_nl // Dutch
+  else if value = 'no' then result:= iso639_no // Norwegian
+  else if value = 'oc' then result:= iso639_oc // Occitan
+  else if value = 'om' then result:= iso639_om // Afan; Oromo
+  else if value = 'or' then result:= iso639_or // Oriya
+  else if value = 'pa' then result:= iso639_pa // Punjabi
+  else if value = 'pl' then result:= iso639_pl // Polish
+  else if value = 'ps' then result:= iso639_ps // Pashto; Pushto
+  else if value = 'pt' then result:= iso639_pt // Portuguese
+  else if value = 'qu' then result:= iso639_qu // Quechua
+  else if value = 'rm' then result:= iso639_rm // Rhaeto-Romance
+  else if value = 'rn' then result:= iso639_rn // Kirundi
+  else if value = 'ro' then result:= iso639_ro // Romanian
+  else if value = 'ru' then result:= iso639_ru // Russian
+  else if value = 'rw' then result:= iso639_rw // Kinyarwanda
+  else if value = 'sa' then result:= iso639_sa // Sanskrit
+  else if value = 'sd' then result:= iso639_sd // Sindhi
+  else if value = 'sg' then result:= iso639_sg // Sangro
+  else if value = 'sh' then result:= iso639_sh // Serbo-Croatian
+  else if value = 'si' then result:= iso639_si // Singhalese
+  else if value = 'sk' then result:= iso639_sk // Slovak
+  else if value = 'sl' then result:= iso639_sl // Slovenian
+  else if value = 'sm' then result:= iso639_sm // Samoan
+  else if value = 'sn' then result:= iso639_sn // Shona
+  else if value = 'so' then result:= iso639_so // Somali
+  else if value = 'sq' then result:= iso639_sq // Albanian
+  else if value = 'sr' then result:= iso639_sr // Serbian
+  else if value = 'ss' then result:= iso639_ss // Siswati
+  else if value = 'st' then result:= iso639_st // Sesotho
+  else if value = 'su' then result:= iso639_su // Sundanese
+  else if value = 'sv' then result:= iso639_sv // Swedish
+  else if value = 'sw' then result:= iso639_sw // Swahili
+  else if value = 'ta' then result:= iso639_ta // Tamil
+  else if value = 'te' then result:= iso639_te // Tegulu
+  else if value = 'tg' then result:= iso639_tg // Tajik
+  else if value = 'th' then result:= iso639_th // Thai
+  else if value = 'ti' then result:= iso639_ti // Tigrinya
+  else if value = 'tk' then result:= iso639_tk // Turkmen
+  else if value = 'tl' then result:= iso639_tl // Tagalog
+  else if value = 'tn' then result:= iso639_tn // Setswana
+  else if value = 'to' then result:= iso639_to // Tonga
+  else if value = 'tr' then result:= iso639_tr // Turkish
+  else if value = 'ts' then result:= iso639_ts // Tsonga
+  else if value = 'tt' then result:= iso639_tt // Tatar
+  else if value = 'tw' then result:= iso639_tw // Twi
+  else if value = 'uk' then result:= iso639_uk // Ukrainian
+  else if value = 'ur' then result:= iso639_ur // Urdu
+  else if value = 'uz' then result:= iso639_uz // Uzbek
+  else if value = 'vi' then result:= iso639_vi // Vietnamese
+  else if value = 'vo' then result:= iso639_vo // Volapuk
+  else if value = 'wo' then result:= iso639_wo // Wolof
+  else if value = 'xh' then result:= iso639_xh // Xhosa
+  else if value = 'yo' then result:= iso639_yo // Yoruba
+  else if value = 'zh' then result:= iso639_zh // Chinese
+  else if value = 'zu' then result:= iso639_zu // Zulu
+  else raise EConvertError.Create('Invalid ISO 639 language symbol');
+end;
+
+
+
+//+++++++++++++++++++++++ TdomImplementation ++++++++++++++++++++++++++
+constructor TdomImplementation.create(aOwner: TComponent);
+begin
+  inherited create(aOwner);
+  FCreatedCMObjectsListing:= TList.create;
+  FCreatedCMObjects:= TdomCMNodeList.create(FCreatedCMObjectsListing);
+  FCreatedDocumentsListing:= TList.create;
+  FCreatedDocuments:= TdomNodeList.create(FCreatedDocumentsListing);
+  FCreatedDocumentTypesListing:= TList.create;
+  FCreatedDocumentTypes:= TdomNodeList.create(FCreatedDocumentTypesListing);
+  FCreatedCMExternalObjectsListing:= TList.create;
+  FCreatedCMExternalObjects:= TdomCMNodeList.create(FCreatedCMExternalObjectsListing);
+  FCreatedCMInternalObjectsListing:= TList.create;
+  FCreatedCMInternalObjects:= TdomCMNodeList.create(FCreatedCMInternalObjectsListing);
+end;
+
+destructor TdomImplementation.destroy;
+begin
+  clear;
+  FCreatedCMObjectsListing.free;
+  FCreatedCMObjects.free;
+  FCreatedDocumentsListing.free;
+  FCreatedDocuments.free;
+  FCreatedDocumentTypesListing.free;
+  FCreatedDocumentTypes.free;
+  FCreatedCMExternalObjectsListing.free;
+  FCreatedCMExternalObjects.free;
+  FCreatedCMInternalObjectsListing.free;
+  FCreatedCMInternalObjects.free;
+  inherited destroy;
+end;
+
+procedure TdomImplementation.clear;
+var
+  i: integer;
+begin
+  for i:= 0 to FCreatedDocumentsListing.count-1 do begin
+    TdomDocument(FCreatedDocumentsListing[i]).clear; // destroys all child nodes, nodeIterators and treeWalkers
+    TdomDocument(FCreatedDocumentsListing[i]).free;
+    FCreatedDocumentsListing[i]:= nil;
+  end;
+  FCreatedDocumentsListing.pack;
+  FCreatedDocumentsListing.Capacity:= FCreatedDocumentsListing.Count;
+
+  for i:= 0 to FCreatedDocumentTypesListing.count-1 do begin
+    TdomDocumentType(FCreatedDocumentTypesListing[i]).free;
+    FCreatedDocumentTypesListing[i]:= nil;
+  end;
+  FCreatedDocumentTypesListing.pack;
+  FCreatedDocumentTypesListing.Capacity:= FCreatedDocumentTypesListing.Count;
+
+  for i:= 0 to FCreatedCMExternalObjectsListing.count-1 do begin
+    TdomCMExternalObject(FCreatedCMExternalObjectsListing[i]).free;
+    FCreatedCMExternalObjectsListing[i]:= nil;
+  end;
+  FCreatedCMExternalObjectsListing.pack;
+  FCreatedCMExternalObjectsListing.Capacity:= FCreatedCMExternalObjectsListing.Count;
+
+  for i:= 0 to FCreatedCMInternalObjectsListing.count-1 do begin
+    TdomCMInternalObject(FCreatedCMInternalObjectsListing[i]).free;
+    FCreatedCMInternalObjectsListing[i]:= nil;
+  end;
+  FCreatedCMInternalObjectsListing.pack;
+  FCreatedCMInternalObjectsListing.Capacity:= FCreatedCMInternalObjectsListing.Count;
+
+  for i:= 0 to FCreatedCMObjectsListing.count-1 do begin
+    TdomCMObject(FCreatedCMObjectsListing[i]).free;
+    FCreatedCMObjectsListing[i]:= nil;
+  end;
+  FCreatedCMObjectsListing.pack;
+  FCreatedCMObjectsListing.Capacity:= FCreatedCMObjectsListing.Count;
+end;
+
+function TdomImplementation.createCMExternalObject(const pubId,
+                                                         sysId: UnicodeString): TdomCMExternalObject;
+begin
+  Result:= TdomCMExternalObject.create(self,pubId,sysId);
+  FCreatedCMExternalObjectsListing.add(Result);
+end;
+
+function TdomImplementation.createCMInternalObject(const pubId,
+                                                         sysId: UnicodeString): TdomCMInternalObject;
+begin
+  Result:= TdomCMInternalObject.create(self,pubId,sysId);
+  FCreatedCMInternalObjectsListing.add(Result);
+end;
+
+function TdomImplementation.createCMObject(const sysId: UnicodeString): TdomCMObject;
+begin
+  Result:= TdomCMObject.create(self,sysId);
+  FCreatedCMObjectsListing.add(Result);
+end;
+
+function TdomImplementation.createDocument(const aname: UnicodeString;
+                                                 doctype: TdomDocumentType): TdomDocument;
+begin
+  if assigned(doctype) then
+    if documentTypes.IndexOf(doctype) = -1
+      then raise EWrong_Document_Err.create('Wrong document error.');
+  if not IsXmlName(aname)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  if SupportsDocumentFormat('',aname)
+    then Result:= getDocumentClass('',aname).create(self)
+    else Result:= TdomDocument.create(self);
+  FCreatedDocumentsListing.add(Result);
+  if assigned(doctype) then begin
+    FCreatedDocumentTypes.FNodeList.Remove(doctype);
+    doctype.FDocument:= Result;
+    Result.appendChild(doctype);
+  end;
+  Result.InitDoc(aname);
+end;
+
+function TdomImplementation.createDocumentNS(const namespaceURI,
+                                                   qualifiedName: UnicodeString;
+                                                   doctype: TdomDocumentType): TdomDocument;
+var
+  prfx, localName: UnicodeString;
+begin
+  if assigned(doctype) then
+    if documentTypes.IndexOf(doctype) = -1
+      then raise EWrong_Document_Err.create('Wrong document error.');
+  if not xmlExtractPrefixAndLocalName(qualifiedName,prfx,localName) then begin
+    if not IsXmlName(qualifiedName)
+      then raise EInvalid_Character_Err.create('Invalid character error.')
+      else raise ENamespace_Err.create('Namespace error.');
+  end;
+  if ( ((prfx = 'xmlns') or (qualifiedName = 'xmlns'))
+    and not (namespaceURI = 'http://www.w3.org/2000/xmlns/') )
+      then raise ENamespace_Err.create('Namespace error.');
+  if (namespaceURI = '') and (prfx <> '')
+    then raise ENamespace_Err.create('Namespace error.');
+  if (prfx = 'xml') and (namespaceURI <> 'http://www.w3.org/XML/1998/namespace')
+    then raise ENamespace_Err.create('Namespace error.');
+  if SupportsDocumentFormat(namespaceURI,qualifiedName)
+    then Result:= getDocumentClass(namespaceURI,qualifiedName).create(self)
+    else Result:= TdomDocument.create(self);
+  FCreatedDocuments.FNodeList.add(Result);
+  if assigned(doctype) then begin
+    FCreatedDocumentTypes.FNodeList.Remove(doctype);
+    doctype.FDocument:= Result;
+    Result.appendChild(doctype);
+  end;
+  Result.InitDocNS(namespaceURI,qualifiedName);
+end;
+
+{
+  The following two methods have been removed from this version of
+  the XDOM, but will be reintroduced in a further release.
+
+function TdomImplementation.createDocumentType(const name,
+                                                     publicId,
+                                                     systemId,
+                                                     intSubset: UnicodeString): TdomDocumentType;
+begin
+  if not IsXmlName(name)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  Result:= TdomDocumentType.create(nil,name,publicId,systemId,intSubset);
+  FCreatedDocumentTypes.FNodeList.add(Result);
+end;
+
+function TdomImplementation.createDocumentTypeNS(const qualifiedName,
+                                                       publicId,
+                                                       systemId,
+                                                       intSubset: UnicodeString): TdomDocumentType;
+begin
+  if not IsXmlName(qualifiedName)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  if not IsXmlQName(qualifiedName)
+    then raise ENamespace_Err.create('Namespace error.');
+  Result:= TdomDocumentType.create(nil,qualifiedName,publicId,systemId,intSubset);
+  FCreatedDocumentTypes.FNodeList.add(Result);
+end;
+ }
+
+procedure TdomImplementation.freeCMExternalObject(var arg: TdomCMExternalObject);
+var
+  index: integer;
+  dummyArg: TdomCMExternalObject;
+begin
+  if not assigned(arg) then exit;
+  dummyArg:= arg;
+  index:= FCreatedCMExternalObjectsListing.IndexOf(arg);
+  if index = -1
+    then raise ENot_Found_Err.create('External content model not found error.');
+  // remove the content model from its associated content models:
+  if assigned(arg.associatedContentModel)
+    then arg.associatedContentModel.removeExternalCM;
+  // free the external content model itself:
+  FCreatedCMExternalObjectsListing.Delete(index);
+  dummyArg.free; // Use dummyArg here, because the call to removeExternalCM
+                 // can set the FCMInternal field of the document being
+                 // processed in TdomImplementation.FreeDocument to nil.
+                 // Since arg is a var parameter, it will be set to nil, and
+                 // will not be freed at the end of the procedure.
+  arg:= nil;
+end;
+
+procedure TdomImplementation.freeCMInternalObject(var arg: TdomCMInternalObject);
+var
+  index: integer;
+  dummyArg: TdomCMInternalObject;
+begin
+  if not assigned(arg) then exit;
+  dummyArg:= arg;
+  index:= FCreatedCMInternalObjectsListing.indexOf(arg);
+  if index = -1
+    then raise ENot_Found_Err.create('Internal content model not found error.');
+  // remove the content model from its associated content model:
+  if assigned(arg.associatedContentModel)
+    then arg.associatedContentModel.removeInternalCM;
+  // free the Internal content model itself:
+  FCreatedCMInternalObjectsListing.Delete(index);
+  dummyArg.free; // Use dummyArg here, because the call to removeInternalCM
+                 // can set the FCMInternal field of the document being
+                 // processed in TdomImplementation.FreeDocument to nil.
+                 // Since arg is a var parameter, it will be set to nil, and
+                 // will not be freed at the end of the procedure.
+  arg:= nil;
+end;
+
+procedure TdomImplementation.freeCMObject(var arg: TdomCMObject);
+var
+  index: integer;
+  dummyArg: TdomCMObject;
+begin
+  if not assigned(arg) then exit;
+  dummyArg:= arg;
+  index:= FCreatedCMObjectsListing.IndexOf(arg);
+  if index = -1
+    then raise ENot_Found_Err.create('Content model not found error.');
+  // remove associated content models
+  arg.removeExternalCM;
+  arg.removeInternalCM;
+  // remove the content model from its associated document:
+  if assigned(arg.associatedDocument)
+    then arg.associatedDocument.removeContentModel;
+  // free the content model itself:
+  FCreatedCMObjectsListing.Delete(index);
+  dummyArg.free; // Use dummyArg here, because the call to removeContentModel
+                 // can set the FCMInternal field of the document being
+                 // processed in TdomImplementation.FreeDocument to nil.
+                 // Since arg is a var parameter, it will be set to nil, and
+                 // will not be freed at the end of the procedure.
+  arg:= nil;
+end;
+
+procedure TdomImplementation.freeDocument(var doc: TdomDocument);
+var
+  index: integer;
+begin
+  if not assigned(doc) then exit;
+  index:= FCreatedDocumentsListing.IndexOf(doc);
+  if index = -1
+    then raise ENot_Found_Err.create('Document not found error.');
+  // free the content model associated with the document:
+  if assigned(doc.FCMInternal) then FreeCMObject(doc.FCMInternal);
+  // free all child nodes, nodeIterators and treeWalkers:
+  doc.clear;
+  // free the document itself:
+  FCreatedDocumentsListing.Delete(index);
+  doc.free;
+  doc:= nil;
+end;
+
+procedure TdomImplementation.freeDocumentType(var docType: TdomDocumentType);
+var
+  index: integer;
+begin
+  if not assigned(docType) then exit;
+  index:= FCreatedDocumentTypesListing.IndexOf(docType);
+  if index = -1
+    then raise ENot_Found_Err.create('DocumentType not found error.');
+  FCreatedDocumentTypesListing.Delete(index);
+  docType.free;
+  docType:= nil;
+end;
+
+function TdomImplementation.getCMObjects: TdomCMNodeList;
+begin
+  result:= FCreatedCMObjects;
+end;
+
+function TdomImplementation.getDocuments: TdomNodeList;
+begin
+  Result:= FCreatedDocuments;
+end;
+
+function TdomImplementation.getDocumentTypes: TdomNodeList;
+begin
+  Result:= FCreatedDocumentTypes;
+end;
+
+procedure TDomImplementation.doAttrModified(modifiedDoc: TdomDocument;
+                                            modifiedNode: TdomNode;
+                                            attrChange: TdomAttrChange;
+                                            prevValue,
+                                            newValue: UnicodeString;
+                                            relatedAttr: TdomAttr);
+begin
+  if assigned(FOnAttrModified)
+    then FOnAttrModified(self,modifiedDoc,modifiedNode,attrChange,prevValue,newValue,relatedAttr);
+end;
+
+procedure TDomImplementation.doCharacterDataModified(modifiedDoc: TdomDocument;
+                                                     modifiedNode: TdomNode;
+                                                     prevValue,
+                                                     newValue: UnicodeString);
+begin
+  if assigned(FOnCharacterDataModified)
+    then FOnCharacterDataModified(self,modifiedDoc,modifiedNode,prevValue,newValue);
+end;
+
+procedure TdomImplementation.doError(    sender: TObject;
+                                         error: TdomError;
+                                     var go: boolean);
+begin
+  case error.severity of
+    DOM_SEVERITY_WARNING, DOM_SEVERITY_ERROR: go:= true;
+    DOM_SEVERITY_FATAL_ERROR: go:= false;
+  end;
+  if assigned(FOnError)
+    then FOnError(sender,error,go);
+end;
+
+procedure TDomImplementation.doExternalParsedEntity(parentSystemId: UnicodeString;
+                                                    var publicId,
+                                                        systemId: UnicodeString;
+                                                    var stream: TStream;
+                                                    var action: TXmlParserAction);
+begin
+  if assigned(FOnExternalParsedEntity) then
+    repeat
+      FOnExternalParsedEntity(self,parentSystemId,publicId,systemId,stream,action);
+    until action <> paRetry;
+end;
+
+procedure TDomImplementation.doNodeInserted(modifiedDoc: TdomDocument;
+                                            modifiedNode: TdomNode);
+begin
+  if assigned(FOnNodeInserted)
+    then FOnNodeInserted(self,modifiedDoc,modifiedNode);
+end;
+
+procedure TDomImplementation.doNodeRemoved(modifiedDoc: TdomDocument;
+                                           modifiedNode: TdomNode);
+begin
+  if assigned(FOnNodeRemoved)
+    then FOnNodeRemoved(self,modifiedDoc,modifiedNode);
+end;
+
+function TdomImplementation.getCMExternalObjects: TdomCMNodeList;
+begin
+  result:= FCreatedCMExternalObjects;
+end;
+
+function TdomImplementation.getCMInternalObjects: TdomCMNodeList;
+begin
+  result:= FCreatedCMInternalObjects;
+end;
+
+function TDomImplementation.getXdomVersion: UnicodeString;
+begin
+  result:= '2.3.27';
+end;
+
+function TdomImplementation.hasFeature(const feature,
+                                             version: UnicodeString): boolean;
+var
+  VersionStr: string;
+begin
+  Result:= false;
+  VersionStr:= WideCharToString(PWideChar(feature));
+  if (WideCharToString(PWideChar(version))='1.0')
+    or (WideCharToString(PWideChar(version))='')
+  then begin
+    if (CompareText(VersionStr,'XML')=0)
+       then Result:= true;
+  end else begin
+    if (WideCharToString(PWideChar(version))='2.0')
+      then begin
+        if (CompareText(VersionStr,'XML')=0)
+           then Result:= true;
+        if (CompareText(VersionStr,'VIEWS')=0)
+           then Result:= true;
+        if (CompareText(VersionStr,'TRAVERSAL')=0)
+           then Result:= true;
+    end else begin
+      if version = ''
+        then begin
+          if (CompareText(VersionStr,'XML')=0)
+             then Result:= true;
+          if (CompareText(VersionStr,'VIEWS')=0)
+             then Result:= true;
+          if (CompareText(VersionStr,'TRAVERSAL')=0)
+             then Result:= true;
+      end;  {if ... }
+    end;  {if ... else ...}
+  end; {if ... else ...}
+end;
+
+function TdomImplementation.GetDocumentClass(const aNamespaceUri,
+                                                   aQualifiedName: UnicodeString): TdomDocumentClass;
+var
+  aDocFormat: PdomDocumentFormat;
+begin
+  aDocFormat := domDocumentFormatList;
+  while aDocFormat <> nil do
+    with aDocFormat^ do begin
+      if (aNamespaceUri = aNamespaceUri) and (aQualifiedName = qualifiedName) then begin
+        Result:= DocumentClass;
+        exit;
+      end else aDocFormat := next;
+    end;
+  raise EUnknown_Document_Format_Err.create('Unknown document format yet');
+end;
+
+function TDomImplementation.handleError(const sender: TObject;
+                                        const error: TdomError): boolean;
+begin
+  if not assigned(error)
+    then raise ENot_Supported_Err.create('Not supported error.');
+  doError(sender,error,result);
+end;
+
+class procedure TdomImplementation.RegisterDocumentFormat(const aNamespaceUri,
+                                                                aQualifiedName: UnicodeString;
+                                                                aDocumentClass: TdomDocumentClass);
+var
+  newRec: PdomDocumentFormat;
+begin
+  if aQualifiedName = 'default'
+    then raise EInvalid_Access_Err.create('Illegal Parameter Error: Attempt to set the reserved Document Format "default".');
+  new(newRec);
+  with newRec^ do begin
+    documentClass:= aDocumentClass;
+    NamespaceUri:= aNamespaceUri;
+    qualifiedName:= aQualifiedName;
+    next:= domDocumentFormatList;
+  end;
+  domDocumentFormatList:= newRec;
+end;
+
+function TdomImplementation.SupportsDocumentFormat(const aNamespaceUri,
+                                                         aQualifiedName: UnicodeString): boolean;
+var
+  aDocFormat: PdomDocumentFormat;
+begin
+  Result:= false;
+  aDocFormat:= domDocumentFormatList;
+  while aDocFormat <> nil do
+    with aDocFormat^ do begin
+      if (aNamespaceUri = NamespaceUri) and (aQualifiedName = qualifiedName) then begin
+        Result:= true;
+        exit;
+      end else aDocFormat := next;
+    end;
+end;
+
+class procedure TdomImplementation.UnregisterDocumentClass(const aDocumentClass: TdomDocumentClass);
+var
+  aDocFormat,oldRec,previous: PdomDocumentFormat;
+begin
+  previous:= nil;
+  aDocFormat := domDocumentFormatList;
+  while aDocFormat <> nil do
+    with aDocFormat^ do begin
+      if aDocumentClass = DocumentClass then begin
+        oldRec:= aDocFormat;
+        if assigned(previous)
+          then previous^.next:= next
+          else domDocumentFormatList := next;
+        previous:= aDocFormat;
+        aDocFormat := next;
+        Dispose(oldRec);
+      end else begin
+        previous:= aDocFormat;
+        aDocFormat := next;
+      end;
+    end; {with ...}
+end;
+
+
+
+//++++++++++++++++++++++++++++ TdomTreeWalker +++++++++++++++++++++++++++++++
+constructor TdomTreeWalker.create(const Root: TdomNode;
+                                  const WhatToShow: TdomWhatToShow;
+                                  const NodeFilter: TdomNodeFilter;
+                                  const EntityReferenceExpansion: boolean);
+begin
+  if not assigned(Root)
+    then raise ENot_Supported_Err.create('Not supported error.');
+  inherited create;
+  FWhatToShow:= WhatToShow;
+  FFilter:= NodeFilter;
+  FExpandEntityReferences:= EntityReferenceExpansion;
+  FRoot:= Root;
+  FCurrentNode:= Root;
+end;
+
+procedure TdomTreeWalker.SetCurrentNode(const node: TdomNode);
+begin
+  if not assigned(node)
+    then raise ENot_Supported_Err.create('Not supported error.');
+  FCurrentNode:= node;
+end;
+
+procedure TdomTreeWalker.setExpandEntityReferences(const value: boolean);
+begin
+  FExpandEntityReferences:= value;
+end;
+
+procedure TdomTreeWalker.setFilter(const value: TdomNodeFilter);
+begin
+  FFilter:= value;
+end;
+
+procedure TdomTreeWalker.setRoot(const node: TdomNode);
+begin
+  if not assigned(node)
+    then raise ENot_Supported_Err.create('Not supported error.');
+  FRoot:= node;
+end;
+
+procedure TdomTreeWalker.setWhatToShow(const value: TdomWhatToShow);
+begin
+  FWhatToShow:= value;
+end;
+
+function TdomTreeWalker.FindNextSibling(const oldNode: TdomNode): TdomNode;
+var
+  accept: TdomFilterResult;
+  newNode: TdomNode;
+begin
+  Result:= nil;
+  if oldNode = root then exit;
+  newNode:= oldNode.NextSibling;
+  if assigned(newNode) then begin
+    if newNode.NodeType in FWhatToShow then begin
+      if assigned(FFilter)
+        then accept:= FFilter.acceptNode(newNode)
+        else accept:= filter_accept;
+    end else accept:= filter_skip;
+    case accept of
+      filter_reject:
+        Result:= FindNextSibling(newNode);
+      filter_skip:
+        begin
+          Result:= FindFirstChild(newNode);
+          if not assigned(result)
+            then Result:= FindNextSibling(newNode);
+        end;
+      filter_accept:
+        Result:= newNode;
+    end; {case ...}
+  end else begin
+    if not assigned(oldNode.parentNode)
+      then begin result:= nil; exit; end; // TreeWalker.root not found!
+    if oldNode.parentNode.NodeType in FWhatToShow then begin
+      if assigned(FFilter)
+        then accept:= FFilter.acceptNode(oldNode.parentNode)
+        else accept:= filter_accept;
+    end else accept:= filter_skip;
+    case accept of
+      filter_reject, filter_skip:
+        Result:= FindNextSibling(oldNode.parentNode);
+      filter_accept:
+        Result:= nil;
+    end; {case ...}
+  end;
+end;
+
+function TdomTreeWalker.FindPreviousSibling(const OldNode: TdomNode): TdomNode;
+var
+  accept: TdomFilterResult;
+  newNode: TdomNode;
+begin
+  Result:= nil;
+  if OldNode = root then exit;
+  newNode:= oldNode.PreviousSibling;
+  if assigned(newNode) then begin
+    if newNode.NodeType in FWhatToShow then begin
+      if assigned(FFilter)
+        then accept:= FFilter.acceptNode(newNode)
+        else accept:= filter_accept;
+    end else accept:= filter_skip;
+    case accept of
+      filter_reject:
+        Result:= FindPreviousSibling(newNode);
+      filter_skip:
+        begin
+          Result:= FindLastChild(newNode);
+          if not assigned(result)
+            then Result:= FindPreviousSibling(newNode);
+        end;
+      filter_accept:
+        Result:= newNode;
+    end; {case ...}
+  end else begin
+    if not assigned(oldNode.parentNode)
+      then begin result:= nil; exit; end; // TreeWalker.root not found!
+    if oldNode.parentNode.NodeType in FWhatToShow then begin
+      if assigned(FFilter)
+        then accept:= FFilter.acceptNode(oldNode.parentNode)
+        else accept:= filter_accept;
+    end else accept:= filter_skip;
+    case accept of
+      filter_reject, filter_skip:
+        Result:= FindPreviousSibling(oldNode.parentNode);
+      filter_accept:
+        Result:= nil;
+    end; {case ...}
+  end;
+end;
+
+function TdomTreeWalker.FindParentNode(const OldNode: TdomNode): TdomNode;
+var
+  accept: TdomFilterResult;
+begin
+  Result:= nil;
+  if OldNode = root then exit;
+  Result:= OldNode.ParentNode;
+  if not assigned(Result)
+    then begin result:= nil; exit; end; // TreeWalker.root not found!
+  if Result.NodeType in FWhatToShow then begin
+    if assigned(FFilter)
+      then accept:= FFilter.acceptNode(Result)
+      else accept:= filter_accept;
+  end else accept:= filter_skip;
+  case accept of
+    filter_reject, filter_skip:
+      Result:= FindParentNode(Result);
+  end;
+end;
+
+function TdomTreeWalker.FindFirstChild(const oldNode: TdomNode): TdomNode;
+var
+  i: integer;
+  newNode: TdomNode;
+  accept: TdomFilterResult;
+begin
+  Result:= nil;
+  if (oldNode.nodeType = ntEntity_Reference_Node) and not FExpandEntityReferences
+    then exit;
+  for i:= 0 to pred(oldnode.childNodes.length) do begin
+    newNode:= oldnode.childNodes.item(i);
+    if newNode.NodeType in FWhatToShow then begin
+      if assigned(FFilter)
+        then accept:= FFilter.acceptNode(newNode)
+        else accept:= filter_accept;
+    end else accept:= filter_skip;
+    case accept of
+      filter_skip:
+        Result:= FindFirstChild(newNode);
+      filter_accept:
+        Result:= newNode;
+    end; {case ...}
+    if assigned(result) then break;
+  end; {for ...}
+end;
+
+function TdomTreeWalker.FindLastChild(const OldNode: TdomNode): TdomNode;
+var
+  i: integer;
+  newNode: TdomNode;
+  accept: TdomFilterResult;
+begin
+  Result:= nil;
+  if (oldNode.nodeType = ntEntity_Reference_Node) and not FExpandEntityReferences
+    then exit;
+  for i:= pred(oldnode.childNodes.length) downto 0 do begin
+    newNode:= oldnode.childNodes.item(i);
+    if newNode.NodeType in FWhatToShow then begin
+      if assigned(FFilter)
+        then accept:= FFilter.acceptNode(newNode)
+        else accept:= filter_accept;
+    end else accept:= filter_skip;
+    case accept of
+      filter_skip:
+        Result:= FindLastChild(newNode);
+      filter_accept:
+        Result:= newNode;
+    end; {case ...}
+    if assigned(result) then break;
+  end; {for ...}
+end;
+
+function TdomTreeWalker.FindNextNode(OldNode: TdomNode): TdomNode;
+var
+  newNode: TdomNode;
+begin
+  Result:= FindFirstChild(oldNode);
+  if OldNode = root then exit;
+  if not assigned(Result)
+    then Result:= FindNextSibling(oldNode);
+  while not assigned(Result) do begin
+    newNode:= FindParentNode(oldNode);
+    if not assigned(newNode) then exit;  // No next node.
+    Result:= FindNextSibling(newNode);
+    oldNode:= newNode;
+  end;
+end;
+
+function TdomTreeWalker.FindPreviousNode(const OldNode: TdomNode): TdomNode;
+var
+  newNode: TdomNode;
+begin
+  Result:= nil;
+  if OldNode = root then exit;
+  Result:= FindPreviousSibling(oldNode);
+  if assigned(Result) then begin
+    newNode:= FindLastChild(Result);
+    if assigned(newNode) then result:= newNode;
+  end else
+    result:= FindParentNode(oldNode);
+end;
+
+function TdomTreeWalker.parentNode: TdomNode;
+begin
+  Result:= FindParentNode(FCurrentNode);
+  if assigned(Result) then FCurrentNode:= Result;
+end;
+
+function TdomTreeWalker.firstChild: TdomNode;
+begin
+  Result:= FindFirstChild(FCurrentNode);
+  if assigned(Result) then FCurrentNode:= Result;
+end;
+
+function TdomTreeWalker.lastChild: TdomNode;
+begin
+  Result:= FindLastChild(FCurrentNode);
+  if assigned(Result) then FCurrentNode:= Result;
+end;
+
+function TdomTreeWalker.previousSibling: TdomNode;
+begin
+  Result:= FindPreviousSibling(FCurrentNode);
+  if assigned(Result) then FCurrentNode:= Result;
+end;
+
+function TdomTreeWalker.nextSibling: TdomNode;
+begin
+  Result:= FindNextSibling(FCurrentNode);
+  if assigned(Result) then FCurrentNode:= Result;
+end;
+
+function TdomTreeWalker.previousNode: TdomNode;
+begin
+  Result:= FindPreviousNode(FCurrentNode);
+  if assigned(Result) then FCurrentNode:= Result;
+end;
+
+function TdomTreeWalker.nextNode: TdomNode;
+begin
+  Result:= FindNextNode(FCurrentNode);
+  if assigned(Result) then FCurrentNode:= Result;
+end;
+
+
+
+//++++++++++++++++++++++++++++ TdomNodeIterator +++++++++++++++++++++++++++++++
+constructor TdomNodeIterator.create(const Root: TdomNode;
+                                    const WhatToShow: TdomWhatToShow;
+                                    const nodeFilter: TdomNodeFilter;
+                                    const EntityReferenceExpansion: boolean);
+begin
+  if not assigned(Root)
+    then raise ENot_Supported_Err.create('Not supported error.');
+  inherited create;
+  FRoot:= root;
+  FWhatToShow:= WhatToShow;
+  FFilter:= NodeFilter;
+  FExpandEntityReferences:= EntityReferenceExpansion;
+  FReferenceNode:= Root;
+  FInvalid:= false;
+  FPosition:= posBefore;
+end;
+
+procedure TdomNodeIterator.FindNewReferenceNode(const nodeToRemove: TdomNode);
+var
+  newRefNode: TdomNode;
+  newPosition: TdomPosition;
+begin
+  newRefNode:= nil;
+  newPosition:= FPosition;
+  case FPosition of
+    posBefore: begin
+      newRefNode:= nodeToRemove.NextSibling;
+      if not assigned(newRefNode) then begin
+        newRefNode:= FindPreviousNode(nodeToRemove);
+        newPosition:= posAfter;
+      end;
+    end;
+    posAfter: begin
+      newRefNode:= nodeToRemove.NextSibling;
+      if not assigned(newRefNode) then begin
+        newRefNode:= FindPreviousNode(nodeToRemove);
+        newPosition:= posBefore;
+      end;
+    end;
+  end; {case ...}
+  if assigned(newRefNode) then begin
+    FReferenceNode:= newRefNode;
+    FPosition:= newPosition;
+  end;
+end;
+
+procedure TdomNodeIterator.detach;
+begin
+  FReferenceNode:= nil;
+  FInvalid:= true;
+end;
+
+function TdomNodeIterator.FindNextNode(OldNode: TdomNode): TdomNode;
+var
+  newNode: TdomNode;
+begin
+  with OldNode do
+    if HasChildNodes
+      and ( FExpandEntityReferences or (nodeType <> ntEntity_Reference_Node) )
+      then result:= FirstChild
+      else result:= NextSibling;
+  while not assigned(Result) do begin
+    newNode:= oldNode.ParentNode;
+    if not assigned(newNode) then exit;  // No next node.
+    Result:= newNode.NextSibling;
+    oldNode:= newNode;
+  end;
+end;
+
+function TdomNodeIterator.FindPreviousNode(const OldNode: TdomNode): TdomNode;
+var
+  newNode: TdomNode;
+begin
+  with OldNode do begin
+    result:= PreviousSibling;
+    if assigned(result) then begin
+      newNode:= result;
+      while assigned(newNode) do begin
+        result:= newNode;
+        newNode:= newNode.LastChild;
+      end;
+    end else result:= ParentNode;
+  end;
+end;
+
+function TdomNodeIterator.NextNode: TdomNode;
+var
+  accept: TdomFilterResult;
+  newNode: TdomNode;
+begin
+  newNode:= nil;
+  if FInvalid
+    then raise EInvalid_State_Err.create('Invalid state error.');
+  case FPosition of
+    posBefore: begin
+      FPosition:= posAfter;
+      newNode:= FReferenceNode;
+    end;
+    posAfter: begin
+      newNode:= FindNextNode(FReferenceNode);
+    end;
+  end;
+  repeat
+    accept:= filter_accept;
+    if assigned(newNode) then begin
+      if newNode.NodeType in FWhatToShow then begin
+        if assigned(FFilter)
+          then accept:= FFilter.acceptNode(newNode);
+      end else accept:= filter_skip;
+      if not (accept = filter_accept)
+        then newNode:= FindNextNode(newNode);
+    end;
+  until accept = filter_accept;
+  if assigned(newNode) then
+    if not (newNode.IsAncestor(root) or (newNode = root)) then
+      if (FReferenceNode.IsAncestor(root) or (FReferenceNode = root)) then newNode:= nil;
+  if assigned(newNode) then FReferenceNode:= newNode;
+  Result:= newNode;
+end;
+
+function TdomNodeIterator.PreviousNode: TdomNode;
+var
+  accept: TdomFilterResult;
+  newNode: TdomNode;
+begin
+  newNode:= nil;
+  if FInvalid
+    then raise EInvalid_State_Err.create('Invalid state error.');
+  case FPosition of
+    posBefore: begin
+      newNode:= FindPreviousNode(FReferenceNode);
+    end;
+    posAfter: begin
+      FPosition:= posBefore;
+      newNode:= FReferenceNode;
+    end;
+  end;
+  repeat
+    accept:= filter_accept;
+    if assigned(newNode) then begin
+      if newNode.NodeType in FWhatToShow then begin
+        if assigned(FFilter)
+          then accept:= FFilter.acceptNode(newNode);
+      end else accept:= filter_skip;
+      if not (accept = filter_accept)
+        then newNode:= FindPreviousNode(newNode);
+    end;
+  until accept = filter_accept;
+  if assigned(newNode) then
+    if not (newNode.IsAncestor(root) or (newNode = root)) then
+      if (FReferenceNode.IsAncestor(root) or (FReferenceNode = root)) then newNode:= nil;
+  if assigned(newNode) then FReferenceNode:= newNode;
+  Result:= newNode;
+end;
+
+
+
+//++++++++++++++++++++++++++++ TdomNodeList +++++++++++++++++++++++++++++++
+constructor TdomNodeList.create(const nodeList: TList);
+begin
+  inherited create;
+  FNodeList:= nodeList;
+end;
+
+function TdomNodeList.getLength: integer;
+begin
+  Result:= FNodeList.count;
+end;
+
+function TdomNodeList.indexOf(const node: TdomNode): integer;
+begin
+  Result:= FNodeList.IndexOf(node);
+end;
+
+function TdomNodeList.item(const index: integer): TdomNode;
+begin
+  if (index < 0) or (index >= FNodeList.Count)
+    then result:= nil
+    else result:= TdomNode(FNodeList.List^[Index]);
+end;
+
+
+
+//++++++++++++++++++++++++ TdomElementsNodeList ++++++++++++++++++++++++++
+constructor TdomElementsNodeList.create(const QueryName: UnicodeString;
+                                        const StartElement: TdomNode);
+begin
+  inherited create(nil);
+  FQueryName:= QueryName;
+  FStartElement:= StartElement;
+end;
+
+function TdomElementsNodeList.GetLength: integer;
+var
+  AktNode,NewNode: TdomNode;
+  Level: integer;
+begin
+  Result:= 0;
+  if not assigned(FStartElement) then exit;
+  Level:= 0;
+  AktNode:= FStartElement;
+  if AktNode.NodeType = ntElement_Node then
+    if (AktNode.NodeName = FQueryName) or (FQueryName = '*') then
+      inc(Result);
+  repeat
+    if AktNode.HasChildNodes
+      then begin NewNode:= AktNode.FirstChild; inc(Level); end
+      else NewNode:= AktNode.NextSibling;
+    while not assigned(NewNode) do begin
+      dec(Level);
+      if Level < 1 then break;
+      AktNode:= AktNode.ParentNode;
+      NewNode:= AktNode.NextSibling;
+    end;
+    if Level < 1 then break;
+    AktNode:= NewNode;
+    if AktNode.NodeType = ntElement_Node then
+      if (AktNode.NodeName = FQueryName) or (FQueryName = '*') then
+        inc(Result);
+  until Level < 1;
+end;
+
+function TdomElementsNodeList.IndexOf(const node: TdomNode): integer;
+var
+  AktNode,NewNode: TdomNode;
+  Level,i: integer;
+begin
+  Result:= -1;
+  if not assigned(FStartElement) then exit;
+  if not (node is TdomNode) then exit;
+  if node.NodeType <> ntElement_Node then exit;
+  i:= -1;
+  Level:= 0;
+  AktNode:= FStartElement;
+  repeat
+    if AktNode.HasChildNodes
+      then begin NewNode:= AktNode.FirstChild; inc(Level); end
+      else NewNode:= AktNode.NextSibling;
+    while not assigned(NewNode) do begin
+      dec(Level);
+      if Level < 1 then break;
+      AktNode:= AktNode.ParentNode;
+      NewNode:= AktNode.NextSibling;
+    end;
+    if Level < 1 then break;
+    AktNode:= NewNode;
+    if AktNode.NodeType = ntElement_Node then
+      if (AktNode.NodeName = FQueryName) or (FQueryName = '*') then begin
+        inc(i);
+        if AktNode = node then begin Result:= i; break; end;
+      end;
+  until Level < 1;
+end;
+
+function TdomElementsNodeList.Item(const index: integer): TdomNode;
+var
+  AktNode,NewNode: TdomNode;
+  Level,i: integer;
+begin
+  Result:= nil;
+  if not assigned(FStartElement) then exit;
+  if (index < 0) then exit;
+  i:= -1;
+  Level:= 0;
+  AktNode:= FStartElement;
+  repeat
+    if AktNode.HasChildNodes
+      then begin NewNode:= AktNode.FirstChild; inc(Level); end
+      else NewNode:= AktNode.NextSibling;
+    while not assigned(NewNode) do begin
+      dec(Level);
+      if Level < 1 then break;
+      AktNode:= AktNode.ParentNode;
+      NewNode:= AktNode.NextSibling;
+    end;
+    if Level < 1 then break;
+    AktNode:= NewNode;
+    if AktNode.NodeType = ntElement_Node then
+      if (AktNode.NodeName = FQueryName) or (FQueryName = '*') then begin
+        inc(i);
+        if i = index then begin Result:= AktNode; break; end;
+      end;
+  until Level < 1;
+end;
+
+
+
+//+++++++++++++++++++++TdomElementsNodeListNS ++++++++++++++++++++++++++
+constructor TdomElementsNodeListNS.create(const QueryNamespaceURI,
+                                                QueryLocalName: UnicodeString;
+                                          const StartElement: TdomNode);
+begin
+  inherited create(nil);
+  FQueryNamespaceURI:= QueryNamespaceURI;
+  FQueryLocalName:= QueryLocalName;
+  FStartElement:= StartElement;
+end;
+
+function TdomElementsNodeListNS.GetLength: integer;
+var
+  AktNode,NewNode: TdomNode;
+  Level: integer;
+begin
+  Result:= 0;
+  if not assigned(FStartElement) then exit;
+  Level:= 0;
+  AktNode:= FStartElement;
+  repeat
+    if AktNode.HasChildNodes
+      then begin NewNode:= AktNode.FirstChild; inc(Level); end
+      else NewNode:= AktNode.NextSibling;
+    while not assigned(NewNode) do begin
+      dec(Level);
+      if Level < 1 then break;
+      AktNode:= AktNode.ParentNode;
+      NewNode:= AktNode.NextSibling;
+    end;
+    if Level < 1 then break;
+    AktNode:= NewNode;
+    if AktNode.NodeType = ntElement_Node then
+      if ((AktNode.namespaceURI = FQueryNamespaceURI) or (FQueryNamespaceURI = '*'))
+        and ((AktNode.localName = FQueryLocalName) or (FQueryLocalName = '*'))
+          then inc(Result);
+  until Level < 1;
+end;
+
+function TdomElementsNodeListNS.IndexOf(const node: TdomNode): integer;
+var
+  AktNode,NewNode: TdomNode;
+  Level,i: integer;
+begin
+  Result:= -1;
+  if not assigned(FStartElement) then exit;
+  if not (node is TdomNode) then exit;
+  if node.NodeType <> ntElement_Node then exit;
+  i:= -1;
+  Level:= 0;
+  AktNode:= FStartElement;
+  repeat
+    if AktNode.HasChildNodes
+      then begin NewNode:= AktNode.FirstChild; inc(Level); end
+      else NewNode:= AktNode.NextSibling;
+    while not assigned(NewNode) do begin
+      dec(Level);
+      if Level < 1 then break;
+      AktNode:= AktNode.ParentNode;
+      NewNode:= AktNode.NextSibling;
+    end;
+    if Level < 1 then break;
+    AktNode:= NewNode;
+    if AktNode.NodeType = ntElement_Node then
+      if ((AktNode.namespaceURI = FQueryNamespaceURI) or (FQueryNamespaceURI = '*'))
+        and ((AktNode.localName = FQueryLocalName) or (FQueryLocalName = '*'))
+          then begin
+            inc(i);
+            if AktNode = node then begin Result:= i; break; end;
+          end;
+  until Level < 1;
+end;
+
+function TdomElementsNodeListNS.Item(const index: integer): TdomNode;
+var
+  AktNode,NewNode: TdomNode;
+  Level,i: integer;
+begin
+  Result:= nil;
+  if not assigned(FStartElement) then exit;
+  if (index < 0) then exit;
+  i:= -1;
+  Level:= 0;
+  AktNode:= FStartElement;
+  repeat
+    if AktNode.HasChildNodes
+      then begin NewNode:= AktNode.FirstChild; inc(Level); end
+      else NewNode:= AktNode.NextSibling;
+    while not assigned(NewNode) do begin
+      dec(Level);
+      if Level < 1 then break;
+      AktNode:= AktNode.ParentNode;
+      NewNode:= AktNode.NextSibling;
+    end;
+    if Level < 1 then break;
+    AktNode:= NewNode;
+    if AktNode.NodeType = ntElement_Node then
+      if ((AktNode.namespaceURI = FQueryNamespaceURI) or (FQueryNamespaceURI = '*'))
+        and ((AktNode.localName = FQueryLocalName) or (FQueryLocalName = '*'))
+          then begin
+            inc(i);
+            if i = index then begin Result:= AktNode; break; end;
+          end;
+  until Level < 1;
+end;
+
+
+
+//++++++++++++++++++++++++ TdomSpecialNodeList ++++++++++++++++++++++++++
+constructor TdomSpecialNodeList.create(const nodeList: TList;
+                                       const allowedNTs: TDomNodeTypeSet);
+begin
+  inherited create(nodeList);
+  FAllowedNodeTypes:= allowedNTs;
+end;
+
+function TdomSpecialNodeList.GetLength: integer;
+var
+  i: integer;
+begin
+  Result:= 0;
+  for i:= 0 to FNodeList.count-1 do
+    if TdomNode(FNodeList[i]).NodeType in FAllowedNodeTypes
+      then inc(Result);
+end;
+
+function TdomSpecialNodeList.IndexOf(const node: TdomNode): integer;
+var
+  i: integer;
+begin
+  Result:= -1;
+  if not (node.NodeType in FAllowedNodeTypes) then exit;
+  for i:= 0 to FNodeList.count-1 do begin
+    if TdomNode(FNodeList[i]).NodeType in FAllowedNodeTypes
+      then inc(Result);
+    if TdomNode(FNodeList[i]) = node
+      then begin Result:= i; break; end;
+  end;
+end;
+
+function TdomSpecialNodeList.Item(const index: integer): TdomNode;
+var
+  i,j: integer;
+begin
+  Result:= nil;
+  j:= -1;
+  if (index < 0) or (index > FNodeList.count-1) then exit;
+  for i:= 0 to FNodeList.count-1 do begin
+    if TdomNode(FNodeList[i]).NodeType in FAllowedNodeTypes
+      then inc(j);
+    if j = index then begin Result:= TdomNode(FNodeList[i]); break; end;
+  end;
+end;
+
+function TdomSpecialNodeList.GetNamedIndex(const name: UnicodeString): integer;
+var
+  i,j: integer;
+begin
+  result:= -1;
+  j:= -1;
+  for i:= 0 to FNodeList.count-1 do
+    if TdomNode(FNodeList[i]).NodeType in FAllowedNodeTypes then begin
+      inc(j);
+      if (TdomNode(FNodeList[i]).NodeName = name)
+        then begin Result:= j; break; end;
+    end;
+end;
+
+function TdomSpecialNodeList.GetNamedItem(const name: UnicodeString): TdomNode;
+var
+  i: integer;
+begin
+  result:= nil;
+  for i:= 0 to FNodeList.count-1 do
+    if (TdomNode(FNodeList[i]).NodeName = name)
+      and (TdomNode(FNodeList[i]).NodeType in FAllowedNodeTypes) then begin
+      Result:= TdomNode(FNodeList[i]);
+      break;
+    end;
+end;
+
+
+//+++++++++++++++++++++++++ TdomNamedNodeMap +++++++++++++++++++++++++++++
+constructor TdomNamedNodeMap.create(const aOwner,
+                                          aOwnerNode: TdomNode;
+                                    const nodeList: TList;
+                                    const allowedNTs: TDomNodeTypeSet);
+begin
+  inherited create(nodeList);
+  FOwner:= aOwner;
+  FOwnerNode:= aOwnerNode;
+  FAllowedNodeTypes:= allowedNTs;
+  FNamespaceAware:= false;
+  FIsReadonly:= false;
+end;
+
+function TdomNamedNodeMap.getOwnerNode: TdomNode;
+begin
+  Result:= FOwnerNode;
+end;
+
+function TdomNamedNodeMap.getNamespaceAware: boolean;
+begin
+  Result:= FNamespaceAware;
+end;
+
+procedure TdomNamedNodeMap.setNamespaceAware(const value: boolean);
+begin
+  if FNodeList.count > 0
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  FNamespaceAware:= value;
+end;
+
+function TdomNamedNodeMap.RemoveItem(const arg: TdomNode): TdomNode;
+begin
+  if isReadonly
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  if FNodeList.IndexOf(arg) = -1
+    then raise ENot_Found_Err.create('Node not found error.');
+  Result:= arg;
+  FNodeList.Remove(arg);
+  Result.FParentNode:= nil;
+end;
+
+procedure TdomNamedNodeMap.setIsReadonly(const value: boolean);
+begin
+  FIsReadonly:= value;
+end;
+
+function TdomNamedNodeMap.GetNamedIndex(const name: UnicodeString): integer;
+var
+  i: integer;
+begin
+  if FNamespaceAware then raise ENamespace_Err.create('Namespace error.');
+  result:= -1;
+  for i:= 0 to FNodeList.count-1 do
+    if (TdomNode(FNodeList[i]).NodeName = name)
+      and (TdomNode(FNodeList[i]).NodeType in FAllowedNodeTypes) then begin
+      Result:= i;
+      break;
+    end;
+end;
+
+function TdomNamedNodeMap.GetNamedItem(const name: UnicodeString): TdomNode;
+var
+  i: integer;
+begin
+  if FNamespaceAware then raise ENamespace_Err.create('Namespace error.');
+  result:= nil;
+  for i:= 0 to FNodeList.count-1 do
+    if (TdomNode(FNodeList[i]).NodeName = name)
+      and (TdomNode(FNodeList[i]).NodeType in FAllowedNodeTypes) then begin
+      Result:= TdomNode(FNodeList[i]);
+      break;
+    end;
+end;
+
+function TdomNamedNodeMap.SetNamedItem(const arg: TdomNode): TdomNode;
+begin
+  if isReadonly
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  if FNamespaceAware then raise ENamespace_Err.create('Namespace error.');
+  if FOwner.OwnerDocument <> arg.OwnerDocument
+    then raise EWrong_Document_Err.create('Wrong document error.');
+  if not (arg.NodeType in FAllowedNodeTypes)
+    then raise EHierarchy_Request_Err.create('Hierarchy request error.');
+  if assigned(arg.parentNode)
+    then raise EInuse_Node_Err.create('Inuse node error.');
+  if arg.NodeType = ntAttribute_Node
+    then if assigned((arg as TdomAttr).OwnerElement)
+      then if (arg as TdomAttr).OwnerElement <> FOwnerNode
+        then raise EInuse_Attribute_Err.create('Inuse attribute error.');
+  if assigned(GetNamedItem(arg.NodeName))
+    then Result:= RemoveNamedItem(arg.NodeName)
+    else Result:= nil;
+  FNodeList.Add(arg);
+  arg.FParentNode:= nil;
+  if (arg.NodeType = ntAttribute_Node)
+    and (FOwnerNode.NodeType = ntElement_Node)
+    then (arg as TdomAttr).FownerElement:= TdomElement(FOwnerNode);
+end;
+
+function TdomNamedNodeMap.RemoveNamedItem(const name: UnicodeString): TdomNode;
+begin
+  if isReadonly
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  if FNamespaceAware then raise ENamespace_Err.create('Namespace error.');
+  Result:= getNamedItem(name);
+  if not assigned(Result)
+    then raise ENot_Found_Err.create('Node not found error.');
+  FNodeList.Remove(Result);
+  if Result.NodeType = ntAttribute_Node
+    then (Result as TdomAttr).FownerElement:= nil;
+end;
+
+function TdomNamedNodeMap.GetNamedItemNS(const namespaceURI,
+                                               localName: UnicodeString): TdomNode;
+var
+  i: integer;
+begin
+  if not FNamespaceAware then raise ENamespace_Err.create('Namespace error.');
+  result:= nil;
+  for i:= 0 to FNodeList.count-1 do
+    if (TdomNode(FNodeList[i]).namespaceURI = namespaceURI)
+      and (TdomNode(FNodeList[i]).localName = localName)
+      and (TdomNode(FNodeList[i]).NodeType in FAllowedNodeTypes) then begin
+      Result:= TdomNode(FNodeList[i]);
+      break;
+    end;
+end;
+
+function TdomNamedNodeMap.SetNamedItemNS(const arg: TdomNode): TdomNode;
+begin
+  if isReadonly
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  if not FNamespaceAware then raise ENamespace_Err.create('Namespace error.');
+  if FOwner.OwnerDocument <> arg.OwnerDocument
+    then raise EWrong_Document_Err.create('Wrong document error.');
+  if not (arg.NodeType in FAllowedNodeTypes)
+    then raise EHierarchy_Request_Err.create('Hierarchy request error.');
+  if assigned(arg.parentNode)
+    then raise EInuse_Node_Err.create('Inuse node error.');
+  if arg.NodeType = ntAttribute_Node
+    then if assigned((arg as TdomAttr).OwnerElement)
+      then if (arg as TdomAttr).OwnerElement <> FOwnerNode
+        then raise EInuse_Attribute_Err.create('Inuse attribute error.');
+  if assigned(GetNamedItemNS(arg.namespaceURI,arg.localName))
+    then Result:= RemoveNamedItemNS(arg.namespaceURI,arg.localName)
+    else Result:= nil;
+  FNodeList.Add(arg);
+  if (arg.NodeType = ntAttribute_Node)
+    and (FOwnerNode.NodeType = ntElement_Node)
+    then (arg as TdomAttr).FownerElement:= TdomElement(FOwnerNode);
+end;
+
+function TdomNamedNodeMap.RemoveNamedItemNS(const namespaceURI,
+                                                  localName: UnicodeString): TdomNode;
+begin
+  if isReadonly
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  if not FNamespaceAware then raise ENamespace_Err.create('Namespace error.');
+  Result:= getNamedItemNS(namespaceURI,localName);
+  if not assigned(Result)
+    then raise ENot_Found_Err.create('Node not found error.');
+  FNodeList.Remove(Result);
+  if Result.NodeType = ntAttribute_Node
+    then (Result as TdomAttr).FownerElement:= nil;
+end;
+
+
+
+//++++++++++++++++++++++++++++++ TdomNode +++++++++++++++++++++++++++++++++
+constructor TdomNode.create(const aOwner: TdomDocument);
+begin
+  inherited create;
+  FDocument:= aOwner;
+  FParentNode:= nil;
+  FNodeListing:= TList.create;
+  FNodeList:= TdomNodeList.create(FNodeListing);
+  FNodeName:= '';
+  FNodeValue:= '';
+  FLocalName:= '';
+  FNamespaceURI:= '';
+  FPrefix:= '';
+  FNodeType:= ntUnknown;
+  FAllowedChildTypes:= [ntElement_Node,
+                        ntText_Node,
+                        ntCDATA_Section_Node,
+                        ntEntity_Reference_Node,
+                        ntProcessing_Instruction_Node,
+                        ntComment_Node,
+                        ntDocument_Type_Node,
+                        ntDocument_Fragment_Node,
+                        ntNotation_Node];
+  FIsReadonly:= false;
+  FIsNamespaceNode:= false;
+end;
+
+destructor TdomNode.destroy;
+begin
+  FNodeListing.free;
+  FNodeList.free;
+  inherited destroy;
+end;
+
+procedure TdomNode.clear;
+var
+  oldChild: TdomNode;
+begin
+  if isReadonly
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  while hasChildNodes do begin
+    firstChild.setIsReadonly(false);
+    oldChild:= removeChild(firstChild);
+    ownerDocument.FreeAllNodes(oldChild);
+  end;
+end;
+
+procedure TdomNode.makeChildrenReadonly;
+var
+  i: integer;
+begin
+  with childnodes do
+    for i:= 0 to pred(length) do
+      with item(i) do begin
+        item(i).setIsReadonly(true);
+        item(i).makeChildrenReadonly;
+      end;
+end;
+
+function TdomNode.RefersToExternalEntity: boolean;
+// Returns 'true', if one the TdomNode's children or grandchildren
+// (not the TdomNode itself!) is an TdomEntityReference node refering
+// directly or indirectly to an external Entity.  Otherwise it returns
+// 'false'.  If the target of a TdomEntityReference cannot be detected
+// this TdomEntityReference counts NOT as refering to an external Entity.
+var
+  i: integer;
+  node: TdomNode;
+  contmod: TdomCMObject;
+  ent: TdomCMEntity;
+begin
+  result:= false;
+  contmod:= OwnerDocument.contentModel;
+  if not assigned(contmod) then exit;
+  for i:= 0 to pred(childnodes.length) do begin
+    node:= childnodes.item(i);
+    case node.nodeType of
+      ntEntity_Reference_Node: begin
+        ent:= contMod.Entities.getNamedItem(node.nodeName);
+        if assigned(ent) then result:= ent.refersToExternalEntity(true);
+      end;
+    else
+      result:= node.RefersToExternalEntity;
+    end; {case ...}
+    if result then exit;
+  end; {for ...}
+end;
+
+function TdomNode.HasEntRef(const EntName: UnicodeString): boolean;
+var
+  i: integer;
+begin
+  result:= false;
+  for i:= 0 to pred(childnodes.length) do
+    with childnodes.item(i) do
+      if (nodeType = ntEntity_Reference_Node)
+          and (nodeName = EntName)
+        then result:= true
+        else if HasEntRef(EntName) then begin result:= true; exit; end;
+end;
+
+function TdomNode.GetNodeName: UnicodeString;
+begin
+  Result:= FNodeName;
+end;
+
+function TdomNode.GetNodeValue: UnicodeString;
+begin
+  Result:= FNodeValue;
+end;
+
+procedure TdomNode.SetNodeValue(const value: UnicodeString);
+begin
+  if isReadonly
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  FNodeValue:= value;
+end;
+
+function TdomNode.GetNodeType: TdomNodeType;
+begin
+  Result:= FNodeType;
+end;
+
+function TdomNode.GetAttributes: TdomNamedNodeMap;
+begin
+  Result:= nil;
+end;
+
+function TdomNode.GetParentNode: TdomNode;
+begin
+  Result:= FParentNode;
+end;
+
+function TdomNode.GetDocument: TdomDocument;
+begin
+  Result:= FDocument;
+end;
+
+function TdomNode.getTextContent: UnicodeString;
+var
+  childType: TdomNodeType;
+  childItem: TdomNode;
+  i,cl: integer;
+begin
+  case nodeType of
+    ntElement_Node,ntEntity_Reference_Node,ntEntity_Node,ntDocument_Fragment_Node: begin
+      result:= '';
+      cl:= pred(childnodes.length);
+      for i:= 0 to cl do begin
+        childItem:= childnodes.item(i);
+        childType:= childItem.nodeType;
+        if (childType <> ntComment_Node) and (childType <> ntProcessing_Instruction_Node)
+          then result:= concat(result,childItem.textContent);
+      end;
+    end;
+    ntAttribute_Node,ntText_Node,ntCDATA_Section_Node,ntComment_Node,ntProcessing_Instruction_Node:
+      result:= nodeValue;
+  else
+    result:= '';
+  end;
+end;
+
+function TdomNode.getXPathStringValue: UnicodeString;
+begin
+  case nodeType of
+    ntElement_Node:
+      result:= textContent;
+    ntAttribute_Node,ntComment_Node,ntProcessing_Instruction_Node:
+      result:= nodeValue;
+    ntCDATA_Section_Node,ntEntity_Reference_Node,ntText_Node:
+      if assigned(parentNode)
+        then result:= parentNode.textContent
+        else result:= textContent; 
+    ntDocument_Node:
+      if assigned(TdomDocument(self).documentElement)
+        then result:= TdomDocument(self).documentElement.textContent;
+    ntXPath_Namespace_Node:
+      result:= namespaceUri;
+  else
+    result:= '';
+  end;
+end;
+
+procedure TdomNode.SetPrefix(const value: UnicodeString);
+begin
+  if not IsXmlName(value)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  if isReadonly
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  if not IsXmlPrefix(value)
+    then raise ENamespace_Err.create('Namespace error.');
+  if namespaceURI = ''
+    then raise ENamespace_Err.create('Namespace error.');
+  if (value = 'xml') and (namespaceURI <> 'http://www.w3.org/XML/1998/namespace')
+    then raise ENamespace_Err.create('Namespace error.');
+  if self.NodeType = ntAttribute_Node then begin
+    if (value = 'xmlns')
+      and not (namespaceURI ='http://www.w3.org/2000/xmlns/')
+        then raise ENamespace_Err.create('Namespace error.');
+    if NodeName = 'xmlns'
+      then raise ENamespace_Err.create('Namespace error.');
+  end;
+  FPrefix:= value;
+  FNodeName:= concat(value,':',localName);
+end;
+
+procedure TdomNode.doAttrModified(originalTarget: TdomNode;
+                                  attrChange: TdomAttrChange;
+                                  prevValue,
+                                  newValue: UnicodeString;
+                                  relatedAttr: TdomAttr);
+begin
+  try
+    if assigned(FOnAttrModified)
+      then FOnAttrModified(self,originalTarget,attrChange,prevValue,newValue,relatedAttr);
+  finally
+    if assigned(FParentNode)
+      then FParentNode.doAttrModified(originalTarget,attrChange,prevValue,newValue,relatedAttr);
+  end;
+end;
+
+procedure TdomNode.doCharacterDataModified(originalTarget: TdomNode;
+                                           prevValue,
+                                           newValue: UnicodeString);
+begin
+  try
+    if assigned(FOnCharacterDataModified)
+      then FOnCharacterDataModified(self,originalTarget,prevValue,newValue);
+  finally
+    if assigned(FParentNode)
+      then FParentNode.doCharacterDataModified(originalTarget,prevValue,newValue);
+  end;
+end;
+
+procedure TdomNode.doNodeInserted(originalTarget: TdomNode);
+begin
+  try
+    if assigned(FOnNodeInserted)
+      then FOnNodeInserted(self,originalTarget);
+  finally
+    if assigned(FParentNode)
+      then FParentNode.doNodeInserted(originalTarget);
+  end;
+end;
+
+procedure TdomNode.doNodeInsertedIntoDocument(originalTarget: TdomNode);
+var
+  i: integer;
+begin
+  try
+    if assigned(FOnNodeInsertedIntoDocument)
+      then FOnNodeInsertedIntoDocument(self,originalTarget);
+  finally
+    for i:= 0 to pred(childNodes.length) do
+      childNodes.item(i).doNodeInsertedIntoDocument(originalTarget);
+  end;
+end;
+
+procedure TdomNode.doNodeRemoved(originalTarget: TdomNode);
+begin
+  try
+    if assigned(FOnNodeRemoved)
+      then FOnNodeRemoved(self,originalTarget);
+  finally
+    if assigned(FParentNode)
+      then FParentNode.doNodeRemoved(originalTarget);
+  end;
+end;
+
+procedure TdomNode.doNodeRemovedFromDocument(originalTarget: TdomNode);
+var
+  i: integer;
+begin
+  try
+    if assigned(FOnNodeRemovedFromDocument)
+      then FOnNodeRemovedFromDocument(self,originalTarget);
+  finally
+    for i:= 0 to pred(childNodes.length) do
+      childNodes.item(i).doNodeRemovedFromDocument(originalTarget);
+  end;
+end;
+
+function TdomNode.getBaseUri: UnicodeString;
+var
+  attr: TdomAttr;
+  UriAnalyzer: TUriWideStrAnalyzer;
+  uri1,uri2: UnicodeString;
+begin
+  case nodeType of
+  ntElement_Node: begin
+    if TdomElement(self).attributes.namespaceAware
+      then attr:= TdomElement(self).getAttributeNodeNS('http://www.w3.org/XML/1998/namespace','base')
+      else attr:= TdomElement(self).getAttributeNode('xml:base');
+    if assigned(attr) then begin
+
+      uri1:= attr.value;
+      UriAnalyzer:= TUriWideStrAnalyzer.create;
+      try
+        UriAnalyzer.setUriReference(uri1);
+        if UriAnalyzer.HasUriScheme then begin
+          // absolute URI --> we are done
+          result:= attr.value;
+        end else begin
+          uri2:= attr.baseUri;
+          resolveRelativeUriWideStr(uri2,uri1,result);
+        end;
+      finally
+        UriAnalyzer.free;
+      end;
+
+    end else begin
+      if assigned(parentNode)
+        then result:= parentNode.baseUri
+        else result:= '';
+    end; {if ... else ...}
+  end;
+  ntText_Node,ntCDATA_Section_Node,ntEntity_Reference_Node,
+  ntProcessing_Instruction_Node,ntComment_Node,ntDocument_Type_Node:
+    if assigned(parentNode)
+      then result:= parentNode.baseUri
+      else result:= '';
+  ntAttribute_Node: begin
+    result:= '';
+    if assigned(TdomAttr(self).ownerElement) then begin
+      if ( (namespaceURI = 'http://www.w3.org/XML/1998/namespace') and ( localName = 'base') )
+         or ( (namespaceURI = '') and ( nodeName = 'xml:base') ) then begin
+        if assigned(TdomAttr(self).ownerElement.parentNode)
+          then result:= TdomAttr(self).ownerElement.parentNode.baseUri;
+      end else begin
+        if assigned(TdomAttr(self).ownerElement)
+          then result:= TdomAttr(self).ownerElement.baseUri;
+      end;
+    end;
+  end;
+  ntEntity_Node,ntNotation_Node:
+    result:= ownerDocument.baseUri;
+  else
+    result:= '';
+  end;
+end;
+
+function TdomNode.sendErrorNotification(const xmlErrorType: TXmlErrorType;
+                                        const relNode: TdomNode): boolean;
+// Used to centralize code for sending error notifications to the DomImplementation.
+// Usually used during validation.
+var
+  domImpl: TDomImplementation;
+  error: TdomError;
+  uri: UnicodeString;
+begin
+  if assigned(ownerDocument) then begin
+    domImpl:= ownerDocument.domImplementation;
+    uri:= ownerDocument.systemId;
+  end else domImpl:= nil;
+
+  error:= TdomError.create(xmlErrorType,-1,-1,-1,-1,-1,uri,nil,relNode,'');
+  try
+    if assigned(domImpl) then begin
+      result:= domImpl.handleError(domImpl,error);
+    end else if error.severity = DOM_SEVERITY_FATAL_ERROR
+      then result:= false
+      else result:= true;
+  finally
+    error.free;
+  end;
+end;
+
+procedure TdomNode.setIsReadonly(const value: boolean);
+begin
+  FIsReadonly:= value;
+end;
+
+function TdomNode.GetChildNodes: TdomNodeList;
+begin
+  Result:= FNodeList;
+end;
+
+function TdomNode.GetFirstChild: TdomNode;
+begin
+  if FNodeListing.count = 0
+    then Result:= nil
+    else Result:= TdomNode(FNodeListing.First);
+end;
+
+function TdomNode.GetLastChild: TdomNode;
+begin
+  if FNodeListing.count = 0
+    then Result:= nil
+    else Result:= TdomNode(FNodeListing.Last);
+end;
+
+function TdomNode.GetPreviousSibling: TdomNode;
+begin
+  if assigned(ParentNode)
+    then Result:= ParentNode.ChildNodes.Item(ParentNode.ChildNodes.IndexOf(Self)-1)
+    else Result:= nil;
+end;
+
+function TdomNode.GetNextSibling: TdomNode;
+begin
+  if assigned(ParentNode)
+    then Result:= ParentNode.ChildNodes.Item(ParentNode.ChildNodes.IndexOf(Self)+1)
+    else Result:= nil;
+end;
+
+function TdomNode.insertBefore(const newChild,
+                                     refChild: TdomNode): TdomNode;
+begin
+  if not assigned(newChild)
+    then raise ENot_Supported_Err.create('Not supported error.');
+  if not (newChild.NodeType in FAllowedChildTypes)
+    then raise EHierarchy_Request_Err.create('Hierarchy request error.');
+  if OwnerDocument <> newChild.OwnerDocument
+    then raise EWrong_Document_Err.create('Wrong document error.');
+  if IsAncestor(newChild) or (newChild = self) or (newChild = refChild ) // Test for circularity
+    then raise EHierarchy_Request_Err.create('Hierarchy request error.');
+  if isReadonly
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  if assigned(newChild.ParentNode)
+    then if newChild.ParentNode.isReadonly
+      then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  if assigned(refChild) then
+    if FNodeListing.IndexOf(refChild) = -1
+      then raise ENot_Found_Err.create('Node not found error.');
+  Result:= newChild;
+  if NewChild is TdomDocumentFragment then begin
+    while NewChild.HasChildNodes do
+      insertBefore(newChild.ChildNodes.Item(0),refChild)
+  end else begin
+    if assigned(newChild.parentNode)
+      then newChild.parentNode.RemoveChild(newChild);
+    if assigned(refChild)
+      then FNodeListing.Insert(FNodeListing.IndexOf(refChild),newChild)
+      else FNodeListing.Add(newChild);
+    with newChild do begin
+      FParentNode:= self;
+      doNodeInserted(newChild);
+      doNodeInsertedIntoDocument(newChild);
+    end;
+  end;
+end;
+
+function TdomNode.appendChild(const newChild: TdomNode): TdomNode;
+begin
+  if not assigned(newChild)
+    then raise ENot_Supported_Err.create('Not supported error.');
+  if not (newChild.NodeType in FAllowedChildTypes)
+    then raise EHierarchy_Request_Err.create('Hierarchy request error.');
+  if OwnerDocument <> newChild.OwnerDocument
+    then raise EWrong_Document_Err.create('Wrong document error.');
+  if IsAncestor(newChild) or (newChild = self)  // Test for circularity
+    then raise EHierarchy_Request_Err.create('Hierarchy request error.');
+  if isReadonly
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  if assigned(newChild.ParentNode)
+    then if newChild.ParentNode.isReadonly
+      then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  Result:= newChild;
+  if NewChild is TdomDocumentFragment then
+    while NewChild.HasChildNodes do
+      appendChild(newChild.ChildNodes.Item(0))
+  else begin
+    if assigned(newChild.parentNode)
+      then newChild.parentNode.RemoveChild(newChild);
+    FNodeListing.Add(newChild);
+    with newChild do begin
+      FParentNode:= self;
+      doNodeInserted(newChild);
+      doNodeInsertedIntoDocument(newChild);
+    end;
+  end;
+end;
+
+function TdomNode.removeChild(const oldChild: TdomNode): TdomNode;
+begin
+  if not assigned(oldChild)
+    then raise ENot_Supported_Err.create('Not supported error.');
+  if isReadonly
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  if FNodeListing.IndexOf(oldChild) = -1
+    then raise ENot_Found_Err.create('Node not found error.');
+  with oldChild do begin
+    doNodeRemoved(oldChild);
+    doNodeRemovedFromDocument(oldChild);
+  end;
+  OwnerDocument.FindNewReferenceNodes(oldChild);
+  Result:= oldChild;
+  FNodeListing.Remove(oldChild);
+  OldChild.FParentNode:= nil;
+end;
+
+function TdomNode.replaceChild(const newChild,
+                                     oldChild: TdomNode): TdomNode;
+var
+  refChild: TdomNode;
+begin
+  if not ( assigned(newChild) and assigned(oldChild) )
+    then raise ENot_Supported_Err.create('Not supported error.');
+  if not (newChild.NodeType in FAllowedChildTypes)
+    then raise EHierarchy_Request_Err.create('Hierarchy request error.');
+  if OwnerDocument <> newChild.OwnerDocument
+    then raise EWrong_Document_Err.create('Wrong document error.');
+  if IsAncestor(newChild) or (newChild = self) // Test for circularity
+    then raise EHierarchy_Request_Err.create('Hierarchy request error.');
+  if isReadonly
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  if assigned(newChild.ParentNode)
+    then if newChild.ParentNode.isReadonly
+      then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  if FNodeListing.IndexOf(oldChild) = -1
+    then raise ENot_Found_Err.create('Node not found error.');
+  Result:= oldChild;
+  if newChild = oldChild then exit;
+  if assigned(newChild.parentNode)
+    then newChild.parentNode.RemoveChild(newChild);
+  refChild:= oldChild.NextSibling;
+  RemoveChild(oldChild);
+  if assigned(refChild)
+    then insertBefore(newChild,refChild)
+    else appendChild(newChild);
+end;
+
+function TdomNode.hasChildNodes: boolean;
+begin
+  if FNodeListing.count = 0
+    then result:= false
+    else result:= true;
+end;
+
+function TdomNode.cloneNode(const deep: boolean): TdomNode;
+begin
+  result:= ownerDocument.importNode(self,deep);
+end;
+
+function TdomNode.compareTreePosition(const other: TdomNode): TdomTreePosition;
+
+  procedure buildAncestorList(node: TdomNode;
+                              const ancestors: TList);
+  begin
+    ancestors.clear;
+    while true do begin
+      ancestors.insert(0,node);
+      if assigned(node.parentNode) then begin
+        node:= node.parentNode;
+      end else begin
+        if node.nodeType = ntAttribute_Node then begin
+          if assigned(TdomAttr(node).ownerElement)
+            then node:= TdomAttr(node).ownerElement
+            else break;
+        end else break;
+      end; {if ... else ...}
+    end; {while ...}
+  end;
+
+var
+  selfAncestors, otherAncestors: TList;
+  i: integer;
+//  nodes: TdomNodeList;
+begin
+  if not assigned(other)
+    then raise ENot_Supported_Err.create('Not supported error.');
+  if other = self then begin
+    result:= [Tree_Position_Equivalent,Tree_Position_Same_Node];
+    exit;
+  end;
+
+  selfAncestors:= TList.create;
+  otherAncestors:= TList.create;
+  try
+    buildAncestorList(self,selfAncestors);
+    buildAncestorList(other,otherAncestors);
+
+    // Disconnected?
+    if selfAncestors[0] <> otherAncestors[0] then begin
+      result:= [Tree_Position_Disconnected];
+      exit;
+    end;
+
+    // Reduce list to the last common ancestor:
+    selfAncestors.Add(nil);   // Add stop-nil
+    otherAncestors.Add(nil);  // Add stop-nil
+    while selfAncestors[1] = otherAncestors[1] do begin
+      selfAncestors.Delete(0);
+      otherAncestors.Delete(0);
+      // Remark: No run over, because 'self' and 'other' are not identical.
+    end;
+
+    // Is 'other' ancestor?
+    if otherAncestors.count = 2 then begin // Remark: 2, because 'other' and nil are in the list.
+      result:= [Tree_Position_Ancestor,Tree_Position_Preceding];
+      exit;
+    end;
+
+    // Is 'other' descendant?
+    if selfAncestors.count = 2 then begin
+      result:= [Tree_Position_Descendant,Tree_Position_Following];
+      exit;
+    end;
+
+    // Attributes involved?
+    if (TdomNode(selfAncestors[1]).nodeType = ntAttribute_Node) then begin
+      if (TdomNode(otherAncestors[1]).nodeType = ntAttribute_Node)
+        then result:= [Tree_Position_Equivalent]
+        else result:= [Tree_Position_Following];
+      exit;
+    end;
+    if (TdomNode(otherAncestors[1]).nodeType = ntAttribute_Node) then begin
+      result:= [Tree_Position_Preceding];
+      exit;
+    end;
+
+    with TdomNode(selfAncestors[0]).childNodes do
+    begin
+    // No Attributes.  Determine the order of the nodes.
+      for i:= 0 to pred(length) do begin
+        if item(i) = TObject(selfAncestors[1]) then begin
+          result:= [Tree_Position_Following];
+          exit;
+        end;
+        if item(i) = TObject(otherAncestors[1]) then begin
+          result:= [Tree_Position_Preceding];
+          exit;
+        end;
+      end;
+    end;
+
+  finally
+    selfAncestors.free;
+    otherAncestors.free;
+  end;
+end;
+
+function TdomNode.evaluate(const expression: UnicodeString): TdomXPathResult;
+var
+  nsResolver: TdomXPathNSResolver;
+  XPathExpression: TdomXPathExpression;
+begin
+  nsResolver:= ownerDocument.createNSResolver(self);
+  try
+    XPathExpression:= ownerDocument.createExpression(expression,nsResolver);
+    try
+      result:= XPathExpression.evaluate(self,XPATH_ANY_TYPE,nil);
+    finally
+      ownerDocument.freeExpression(XPathExpression);
+    end;
+  finally
+    ownerDocument.freeNSResolver(nsResolver);
+  end;
+end;
+
+function TdomNode.findFirstChildElement: TdomElement;
+var
+  nodeToTest: TdomNode;
+begin
+  result:= nil;
+  nodeToTest:= firstChild;
+  while assigned(nodeToTest) do begin
+    if nodeToTest.nodeType = ntElement_Node then begin
+      result:= (nodeToTest as TdomElement);
+      exit;
+    end;
+    nodeToTest:= nodeToTest.nextSibling;
+  end;
+end;
+
+function TdomNode.findLastChildElement: TdomElement;
+var
+  nodeToTest: TdomNode;
+begin
+  result:= nil;
+  nodeToTest:= lastChild;
+  while assigned(nodeToTest) do begin
+    if nodeToTest.nodeType = ntElement_Node then begin
+      result:= (nodeToTest as TdomElement);
+      exit;
+    end;
+    nodeToTest:= nodeToTest.previousSibling;
+  end;
+end;
+
+function TdomNode.findNextSiblingElement: TdomElement;
+var
+  nodeToTest: TdomNode;
+begin
+  result:= nil;
+  nodeToTest:= nextSibling;
+  while assigned(nodeToTest) do begin
+    if nodeToTest.nodeType = ntElement_Node then begin
+      result:= (nodeToTest as TdomElement);
+      exit;
+    end;
+    nodeToTest:= nodeToTest.nextSibling;
+  end;
+end;
+
+function TdomNode.findParentElement: TdomElement;
+var
+  nodeToTest: TdomNode;
+begin
+  result:= nil;
+  nodeToTest:= parentNode;
+  while assigned(nodeToTest) do begin
+    if nodeToTest.nodeType = ntElement_Node then begin
+      result:= (nodeToTest as TdomElement);
+      exit;
+    end;
+    nodeToTest:= nodeToTest.parentNode;
+  end;
+end;
+
+function TdomNode.findPreviousSiblingElement: TdomElement;
+var
+  nodeToTest: TdomNode;
+begin
+  result:= nil;
+  nodeToTest:= previousSibling;
+  while assigned(nodeToTest) do begin
+    if nodeToTest.nodeType = ntElement_Node then begin
+      result:= (nodeToTest as TdomElement);
+      exit;
+    end;
+    nodeToTest:= nodeToTest.previousSibling;
+  end;
+end;
+
+function TdomNode.getFirstChildElement(const name: UnicodeString): TdomElement;
+var
+  nodeToTest: TdomNode;
+begin
+  result:= nil;
+  nodeToTest:= firstChild;
+  while assigned(nodeToTest) do begin
+    if (nodeToTest.nodeType = ntElement_Node) and (nodeToTest.nodeName = name) then begin
+      result:= (nodeToTest as TdomElement);
+      exit;
+    end;
+    nodeToTest:= nodeToTest.nextSibling;
+  end;
+end;
+
+function TdomNode.getFirstChildElementNS(const namespaceURI,
+                                               localName: UnicodeString): TdomElement;
+var
+  nodeToTest: TdomNode;
+begin
+  result:= nil;
+  nodeToTest:= firstChild;
+  while assigned(nodeToTest) do begin
+    if (nodeToTest.nodeType = ntElement_Node)
+      and (nodeToTest.namespaceURI = namespaceURI)
+      and (nodeToTest.localName = localName)
+      then begin
+      result:= (nodeToTest as TdomElement);
+      exit;
+    end;
+    nodeToTest:= nodeToTest.nextSibling;
+  end;
+end;
+
+function TdomNode.getLastChildElement(const name: UnicodeString): TdomElement;
+var
+  nodeToTest: TdomNode;
+begin
+  result:= nil;
+  nodeToTest:= lastChild;
+  while assigned(nodeToTest) do begin
+    if (nodeToTest.nodeType = ntElement_Node) and (nodeToTest.nodeName = name) then begin
+      result:= (nodeToTest as TdomElement);
+      exit;
+    end;
+    nodeToTest:= nodeToTest.previousSibling;
+  end;
+end;
+
+function TdomNode.getLastChildElementNS(const namespaceURI,
+                                              localName: UnicodeString): TdomElement;
+var
+  nodeToTest: TdomNode;
+begin
+  result:= nil;
+  nodeToTest:= lastChild;
+  while assigned(nodeToTest) do begin
+    if (nodeToTest.nodeType = ntElement_Node)
+      and (nodeToTest.namespaceURI = namespaceURI)
+      and (nodeToTest.localName = localName)
+      then begin
+      result:= (nodeToTest as TdomElement);
+      exit;
+    end;
+    nodeToTest:= nodeToTest.previousSibling;
+  end;
+end;
+
+function TdomNode.getNextSiblingElement(const name: UnicodeString): TdomElement;
+var
+  nodeToTest: TdomNode;
+begin
+  result:= nil;
+  nodeToTest:= nextSibling;
+  while assigned(nodeToTest) do begin
+    if (nodeToTest.nodeType = ntElement_Node) and (nodeToTest.nodeName = name) then begin
+      result:= (nodeToTest as TdomElement);
+      exit;
+    end;
+    nodeToTest:= nodeToTest.nextSibling;
+  end;
+end;
+
+function TdomNode.getNextSiblingElementNS(const namespaceURI,
+                                                localName: UnicodeString): TdomElement;
+var
+  nodeToTest: TdomNode;
+begin
+  result:= nil;
+  nodeToTest:= nextSibling;
+  while assigned(nodeToTest) do begin
+    if (nodeToTest.nodeType = ntElement_Node)
+      and (nodeToTest.namespaceURI = namespaceURI)
+      and (nodeToTest.localName = localName)
+      then begin
+      result:= (nodeToTest as TdomElement);
+      exit;
+    end;
+    nodeToTest:= nodeToTest.nextSibling;
+  end;
+end;
+
+function TdomNode.getParentElement(const name: UnicodeString): TdomElement;
+var
+  nodeToTest: TdomNode;
+begin
+  result:= nil;
+  nodeToTest:= parentNode;
+  while assigned(nodeToTest) do begin
+    if (nodeToTest.nodeType = ntElement_Node) and (nodeToTest.nodeName = name) then begin
+      result:= (nodeToTest as TdomElement);
+      exit;
+    end;
+    nodeToTest:= nodeToTest.parentNode;
+  end;
+end;
+
+function TdomNode.getParentElementNS(const namespaceURI,
+                                           localName: UnicodeString): TdomElement;
+var
+  nodeToTest: TdomNode;
+begin
+  result:= nil;
+  nodeToTest:= parentNode;
+  while assigned(nodeToTest) do begin
+    if (nodeToTest.nodeType = ntElement_Node)
+      and (nodeToTest.namespaceURI = namespaceURI)
+      and (nodeToTest.localName = localName)
+      then begin
+      result:= (nodeToTest as TdomElement);
+      exit;
+    end;
+    nodeToTest:= nodeToTest.parentNode;
+  end;
+end;
+
+function TdomNode.getPreviousSiblingElement(const name: UnicodeString): TdomElement;
+var
+  nodeToTest: TdomNode;
+begin
+  result:= nil;
+  nodeToTest:= previousSibling;
+  while assigned(nodeToTest) do begin
+    if (nodeToTest.nodeType = ntElement_Node) and (nodeToTest.nodeName = name) then begin
+      result:= (nodeToTest as TdomElement);
+      exit;
+    end;
+    nodeToTest:= nodeToTest.previousSibling;
+  end;
+end;
+
+function TdomNode.getPreviousSiblingElementNS(const namespaceURI,
+                                                    localName: UnicodeString): TdomElement;
+var
+  nodeToTest: TdomNode;
+begin
+  result:= nil;
+  nodeToTest:= previousSibling;
+  while assigned(nodeToTest) do begin
+    if (nodeToTest.nodeType = ntElement_Node)
+      and (nodeToTest.namespaceURI = namespaceURI)
+      and (nodeToTest.localName = localName)
+      then begin
+      result:= (nodeToTest as TdomElement);
+      exit;
+    end;
+    nodeToTest:= nodeToTest.previousSibling;
+  end;
+end;
+
+function TdomNode.isAncestor(const AncestorNode: TdomNode): boolean;
+var
+  NewAncestor: TdomNode;
+  List1: TList;
+begin
+  Result:= false;
+  NewAncestor:= ParentNode;
+  List1:= TList.create;
+  List1.clear;
+  try
+    while assigned(NewAncestor) do begin
+      {Ciculation test:}
+      if List1.IndexOf(NewAncestor) > -1
+        then raise EHierarchy_Request_Err.create('Hierarchy request error.');
+      List1.Add(NewAncestor);
+      if NewAncestor = AncestorNode then begin Result:= true; break; end;
+      NewAncestor:= NewAncestor.ParentNode;
+    end;
+  finally
+    List1.free;
+  end;
+end;
+
+procedure TdomNode.normalize;
+var
+  i: integer;
+begin
+  for i:= 0 to ChildNodes.Length-1 do
+    ChildNodes.Item(i).normalize;
+end;
+
+function TdomNode.supports(const feature,
+                                 version: UnicodeString): boolean;
+var
+  VersionStr: string;
+begin
+  Result:= false;
+  VersionStr:= WideCharToString(PWideChar(feature));
+  if (WideCharToString(PWideChar(version))='1.0')
+    or (WideCharToString(PWideChar(version))='')
+  then begin
+    if (CompareText(VersionStr,'XML')=0)
+       then Result:= true;
+  end else begin
+    if (WideCharToString(PWideChar(version))='2.0')
+      then begin
+        if (CompareText(VersionStr,'XML')=0)
+           then Result:= true;
+    end; {if ...}
+  end; {if ... else ...}
+end;
+
+function TdomNode.validate2: boolean;
+begin
+  Result := False;
+  raise ENot_Supported_Err.create('Not supported error.');
+end;
+
+function TdomNode.validateIDREFS: boolean;
+begin
+  Result := False;
+  raise ENot_Supported_Err.create('Not supported error.');
+end;
+
+function TdomNode.resolveEntityReferences(const opt: TdomEntityResolveOption): boolean;
+var
+  i: integer;
+  ok: boolean;
+begin
+  result:= true;
+  for i:= 0 to pred(ChildNodes.Length) do begin
+    ok:= ChildNodes.Item(i).resolveEntityReferences(opt);
+    if not ok then result:= false;
+  end;
+end;
+
+
+
+//+++++++++++++++++++++++++ TdomCharacterData ++++++++++++++++++++++++++++
+constructor TdomCharacterData.create(const aOwner: TdomDocument);
+begin
+  inherited create(aOwner);
+  FAllowedChildTypes:= [];
+end;
+
+function TdomCharacterData.getData: UnicodeString;
+begin
+  Result:= NodeValue;
+end;
+
+procedure TdomCharacterData.setData(const value: UnicodeString);
+var
+  prevValue: UnicodeString;
+begin
+  prevValue:= NodeValue;
+  NodeValue:= value;
+  doCharacterDataModified(self,prevValue,value);
+end;
+
+function TdomCharacterData.getLength: integer;
+begin
+  Result:= System.Length(Data);
+end;
+
+function TdomCharacterData.substringData(const offset,
+                                               count: integer):UnicodeString;
+var
+  len: integer;
+begin
+  if(offset < 0) or (offset > Length) or (count < 0)
+    then raise EIndex_Size_Err.create('Index size error.');
+  // Make sure, that the length of the UnicodeString is not
+  // exeeded, when using count and offset:
+  len:= Length-Offset;
+  if count < len then len:= count;
+  setString(Result,PWideChar(Data)+Offset,len);
+end;
+
+procedure TdomCharacterData.appendData(const arg: UnicodeString);
+begin
+  if isReadonly
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  Data:= concat(Data,arg);
+end;
+
+procedure TdomCharacterData.insertData(const offset: integer;
+                                       const arg: UnicodeString);
+begin
+  ReplaceData(offset,0,arg);
+end;
+
+procedure TdomCharacterData.deleteData(const offset,
+                                             count: integer);
+begin
+  ReplaceData(offset,count,'');
+end;
+
+procedure TdomCharacterData.replaceData(const offset,
+                                              count: integer;
+                                        const arg: UnicodeString);
+var
+  len: integer;
+  Data1,Data2:UnicodeString;
+begin
+  if isReadonly
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  if (offset < 0) or (offset > Length) or (count < 0)
+    then raise EIndex_Size_Err.create('Index size error.');
+  // Make sure, that the length of the UnicodeString is not
+  // exeeded, when using count and offset:
+  len:= Length-Offset;
+  if count < len then len:= count;
+  Data1:= SubstringData(0,offset);
+  Data2:= SubstringData(offset+len,Length-offset-len);
+  Data:= concat(Data1,arg,Data2);
+end;
+
+
+
+// +++++++++++++++++++++++++++++ TdomAttr +++++++++++++++++++++++++++++
+constructor TdomAttr.create(const aOwner: TdomDocument;
+                            const name: UnicodeString;
+                            const spcfd: boolean);
+begin
+  if not IsXmlName(name)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  inherited create(aOwner);
+  FNodeName:= name;
+  FNodeValue:= '';
+  FNodeType:= ntAttribute_Node;
+  FOwnerElement:= nil;
+  FSpecified:= Spcfd;
+  FAllowedChildTypes:= [ntText_Node,
+                        ntEntity_Reference_Node,
+                        ntDocument_Fragment_Node];
+end;
+
+constructor TdomAttr.createNS(const aOwner: TdomDocument;
+                              const anamespaceURI,
+                                    qualifiedName: UnicodeString;
+                              const spcfd: boolean);
+var
+  locName,prfx: UnicodeString;
+begin
+  if not xmlExtractPrefixAndLocalName(qualifiedName,prfx,locName) then begin
+    if not IsXmlName(qualifiedName)
+      then raise EInvalid_Character_Err.create('Invalid character error.')
+      else raise ENamespace_Err.create('Namespace error.');
+  end;
+  if ( ((prfx = 'xmlns') or (qualifiedName = 'xmlns'))
+    and not (namespaceURI ='http://www.w3.org/2000/xmlns/') )
+      then raise ENamespace_Err.create('Namespace error.');
+  if (namespaceURI = '') and (prfx <> '')
+    then raise ENamespace_Err.create('Namespace error.');
+  if (prfx = 'xml') and (namespaceURI <> 'http://www.w3.org/XML/1998/namespace')
+    then raise ENamespace_Err.create('Namespace error.');
+  inherited create(aOwner);
+  FNodeName:= qualifiedName;
+  FNamespaceURI:= namespaceURI;
+  FPrefix:= prfx;
+  FLocalName:= locName;
+  FIsNamespaceNode:= true;
+  FNodeValue:= '';
+  FNodeType:= ntAttribute_Node;
+  FOwnerElement:= nil;
+  FSpecified:= Spcfd;
+  FAllowedChildTypes:= [ntText_Node,
+                        ntEntity_Reference_Node,
+                        ntDocument_Fragment_Node];
+end;
+
+procedure TdomAttr.normalize;
+var
+  PrevNode, CurrentNode: TdomNode;
+  i: integer;
+begin
+  {normalize text:}
+  PrevNode:= nil;
+  i:= ChildNodes.Length;
+  while i>0 do
+  begin
+    Dec(i);
+    CurrentNode:= ChildNodes.Item(i);
+    if (CurrentNode.NodeType = ntText_Node) then
+      begin
+         if (Assigned(PrevNode)) and (PrevNode.NodeType = ntText_Node) then
+         begin
+            (CurrentNode as TdomText).AppendData((PrevNode as TdomText).Data);
+            removeChild(PrevNode);
+            PrevNode.OwnerDocument.FreeAllNodes(PrevNode);
+         end;
+      end
+    else  // no text node, then normalize
+      CurrentNode.normalize;
+    PrevNode:=CurrentNode;
+  end;
+end;
+
+function TdomAttr.GetName: UnicodeString;
+begin
+  Result:= NodeName;
+end;
+
+function TdomAttr.GetSpecified: boolean;
+begin
+  Result:= FSpecified;
+end;
+
+function TdomAttr.GetNodeValue: UnicodeString;
+begin
+  Result:= getValue;
+end;
+
+function TdomAttr.getLiteralValue: UnicodeString;
+var
+  i, j: integer;
+  child: TdomNode;
+  content: TdomCustomStr;
+  textData: UnicodeString;
+begin
+  content:= TdomCustomStr.create;
+  try
+    for i:= 0 to pred(childNodes.length) do begin
+      child:= childNodes.item(i);
+      case child.NodeType of
+        ntText_Node:
+        begin
+          textData:= (child as TdomText).data;
+          for j:= 1 to length(textData) do begin
+            case ord(textData[j]) of
+                38: content.addWideString('&amp;');  // Ampersand ('&')
+                34: content.addWideString('&quot;'); // Double quote ('"')
+                60: content.addWideString('&lt;');   // Less than ('<')
+            else
+              content.addWideChar(textData[j]);
+            end;
+          end;
+        end;
+        ntEntity_Reference_Node: begin
+          content.addWideChar('&');
+          content.addWideString(child.nodeName);
+          content.addWideChar(';');
+        end;
+      end;
+    end; {for ...}
+    result:= content.value;
+  finally
+    content.free;
+  end;
+end;
+
+procedure TdomAttr.SetNodeValue(const value: UnicodeString);
+begin
+  setValue(value);
+end;
+
+function TdomAttr.GetValue: UnicodeString;
+  procedure FurtherAttrNormalization(var S: UnicodeString);
+  const
+    DOUBLESPACE: UnicodeString = #$20#$20;
+  var
+    nPos: integer;
+    dummy: UnicodeString;
+  begin
+    repeat
+      nPos := Pos(DOUBLESPACE, S);
+      if nPos > 0 then
+        Delete(S, nPos, 1);
+    until nPos = 0;
+    dummy:= S;
+    s:= XMLTruncSpace(dummy);
+  end;
+var
+  i: integer;
+  EntName: UnicodeString;
+  Entity: TdomCMEntity;
+  CMAttr: TdomCMAttribute;
+  child: TdomNode;
+begin
+  Result:='';
+  for i:= 0 to ChildNodes.Length -1 do begin
+    child:= ChildNodes.item(i);
+    case child.NodeType of
+      ntText_Node:
+        Result:= Concat(Result,(child as TdomText).Data);
+      ntEntity_Reference_Node: begin
+        Entity:= nil;
+        EntName:= (child as TdomEntityReference).NodeName;
+        if (EntName='lt') then begin
+          Result:= Concat(Result,UnicodeString('&#60;'))
+        end else if (EntName='gt') then begin
+          Result:= Concat(Result,#62)
+        end else if (EntName='amp') then begin
+          Result:= Concat(Result,UnicodeString('&#38;'))
+        end else if (EntName='apos') then begin
+          Result:= Concat(Result,#39)
+        end else if (EntName='quot') then begin
+          Result:= Concat(Result,#34)
+        end else begin
+          if assigned(OwnerDocument) then
+            if assigned(OwnerDocument.contentModel) then
+              Entity:= OwnerDocument.contentModel.entities.getNamedItem(EntName);
+          if assigned(Entity) then begin
+            Result:= Concat(Result,Entity.normalizedValue)
+          end else raise EConvertError.create('Invalid entity reference error.');
+        end;
+      end;
+    end;
+  end; {for ...}
+
+  // Further attribute normalization:
+  if assigned(OwnerElement) then
+    if assigned(OwnerDocument) then
+      if assigned(OwnerDocument.contentModel) then begin
+        CMAttr:= OwnerDocument.contentModel.attributes.getNamedItem(OwnerElement.nodeName,nodename);
+        if assigned(CMAttr) then
+          if not IsXmlStringType(CMAttr.attributeType)
+            then FurtherAttrNormalization(result);
+      end;
+end;
+
+procedure TdomAttr.SetValue(const value: UnicodeString);
+var
+  newTextNode: TdomText;
+  oldChild: TdomNode;
+  prevValue: UnicodeString;
+begin
+  if isReadonly
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  prevValue:= nodeValue;
+  while HasChildNodes do begin
+    FirstChild.setIsReadonly(false);
+    oldChild:= RemoveChild(FirstChild);
+    ownerDocument.FreeAllNodes(oldChild);
+  end;
+  newTextNode:= OwnerDocument.CreateTextNode(value);
+  appendChild(newTextNode);
+  if assigned(FOwnerElement)
+    then FOwnerElement.doAttrModified(FOwnerElement,AC_MODIFICATION,prevValue,value,self);
+end;
+
+function TdomAttr.GetOwnerElement: TdomElement;
+begin
+  Result:= FOwnerElement;
+end;
+
+function TdomAttr.GetParentNode: TdomNode;
+begin
+  Result:= nil;
+end;
+
+function TdomAttr.GetPreviousSibling: TdomNode;
+begin
+  Result:= nil;
+end;
+
+function TdomAttr.GetNextSibling: TdomNode;
+begin
+  Result:= nil;
+end;
+
+function TdomAttr.validate2: boolean;
+
+  function isValidENTITY(const entitiesList: TdomNamedCMEntityMap;
+                         const entityValue: UnicodeString): boolean;
+  begin
+    if not assigned(entitiesList.getNamedItem(entityValue)) then begin
+      result:= false;
+      sendErrorNotification(ET_TARGET_UNPARSED_ENTITY_NOT_FOUND,self);
+    end else result:= true;
+  end;
+
+const
+  SPACE: WideChar  = #$20;
+  LT:    WideChar  = #60;  // '<'
+var
+  i,startIndex,indexCount: integer;
+  ok, typeMismatch: boolean;
+  attriValue, AType: UnicodeString;
+  Attri: TdomCMAttribute;
+begin
+  result:= true;
+
+  try
+    attriValue:= value;
+  except
+    // VC: Entity declared (XML 1.0, § 4.1)
+    result:= false;
+    sendErrorNotification(ET_ENTITY_DECL_NOT_FOUND,self);
+    exit; // Necessary because 'attriValue' will be used again in the next tests.
+  end;
+
+  // WFC: No < in Attribute Values (XML 1.0, § 3.1)
+  if pos(LT,attriValue) > 0 then begin
+    result:= false;
+    sendErrorNotification(ET_LT_IN_ATTRIBUTE_VALUE,self);
+  end;
+
+  // WFC: No External Entity Reference (XML 1.0, § 3.1)
+  if refersToExternalEntity then begin
+    result:= false;
+    sendErrorNotification(ET_ATTRIBUTE_VALUE_REFERS_TO_EXTERNAL_ENTITY,self);
+  end;
+
+  // VC: Attribute value Type (XML 1.0, § 3.1)
+  if assigned(OwnerDocument.contentModel) and assigned(OwnerElement) then begin
+    Attri:= (OwnerDocument.contentModel.attributes.GetNamedItem(OwnerElement.NodeName,NodeName) as TdomCMAttribute);
+    if not assigned(Attri) then begin
+      result:= false;
+      sendErrorNotification(ET_ATTRIBUTE_DEFINITION_NOT_FOUND,self);
+    end else begin
+      AType:= Attri.AttributeType;
+      TypeMismatch:= false;
+      If AType = '' then begin
+        ok:= false;
+        with attri do begin
+          for i:= 0 to pred(ChildNodes.length) do begin
+            if ChildNodes.item(i).NodeName = attriValue then begin
+              ok:= true;
+              break;
+            end;
+          end;
+        end; {with ...}
+        TypeMismatch:= not ok; // VC: Enumaration (XML 1.0, § 3.3.1)
+      end else
+      if AType = 'ID' then begin
+        if not isXMLName(attriValue)
+          then TypeMismatch:= true; // VC: Entity (XML 1.0, § 3.3.1)
+        try
+          OwnerDocument.IDs.addObject(attriValue,self);
+        except  // VC: ID (XML 1.0, § 3.3.1)
+          on EStringListError do begin
+            result:= false;
+            sendErrorNotification(ET_DUPLICATE_ID_VALUE,self);
+          end;
+        end;
+      end else
+      if AType = 'ENTITY' then begin
+        // VC: Entity (XML 1.0, § 3.3.1)
+        if not isXMLName(attriValue) then begin
+          TypeMismatch:= true
+        end else begin
+          if not isValidEntity(ownerDocument.contentModel.entities,attriValue)
+            then result:= false;
+        end;
+      end else
+      if AType = 'ENTITIES' then begin
+        // VC: Entity (XML 1.0, § 3.3.1)
+        if not isXMLNames(attriValue) then begin
+          TypeMismatch:= true;
+        end else begin
+          startIndex:= 1; indexCount:= 0;
+          for i:= 1 to length(attriValue) do begin
+            if attriValue[i] = SPACE then begin
+              if not isValidEntity(ownerDocument.contentModel.entities,copy(attriValue,startIndex,IndexCount)) then result:= false;
+              startIndex:= succ(i);
+              indexCount:= 0;
+            end else inc(indexCount);
+          end;
+          if not isValidEntity(ownerDocument.contentModel.entities,copy(attriValue,startIndex,IndexCount)) then result:= false;
+        end;
+      end else
+      if AType = 'NMTOKEN' then begin
+        if not isXmlNmtoken(attriValue)
+          then TypeMismatch:= true; // VC: name Token (XML 1.0, § 3.3.1)
+      end else
+      if AType = 'NMTOKENS' then begin
+        if not isXmlNmtokens(attriValue)
+          then TypeMismatch:= true; // VC: name Token (XML 1.0, § 3.3.1)
+      end;
+
+      if TypeMismatch then begin
+        result:= false;
+        sendErrorNotification(ET_ATTRIBUTE_TYPE_MISMATCH,self);
+      end;
+
+    end;
+  end else begin
+    result:= false;
+    sendErrorNotification(ET_ATTRIBUTE_DEFINITION_NOT_FOUND,self);
+  end; {if assigned(OwnerDocument.contentModel) ... else ... end}
+
+end;
+
+function TdomAttr.validateIDREFS: boolean;
+  function isValidIDREF(const idList: TdomWideStringList;
+                        const idrefValue: UnicodeString): boolean;
+  var
+    dummyIndex: integer;
+  begin
+    if not idList.find(idrefValue,dummyIndex) then begin
+      result:= false;
+      sendErrorNotification(ET_TARGET_ID_VALUE_NOT_FOUND,self);
+    end else result:= true;
+  end;
+
+const
+  SPACE: WideChar  = #$20;
+var
+  i, startIndex, indexCount: integer;
+  attrivalue, AType: UnicodeString;
+  TypeMismatch: boolean;
+  Attri: TdomCMAttribute;
+begin
+  result:= true;
+
+  try
+    attriValue:= value;
+  except
+    // VC: Entity declared (XML 1.0, § 4.1)
+    result:= false;
+    sendErrorNotification(ET_ENTITY_DECL_NOT_FOUND,self);
+    exit; // Necessary because 'attriValue' would instead be used again in the next tests.
+  end;
+
+  // VC: IDREF (XML 1.0, § 3.3.1)
+  TypeMismatch:= false;
+  if assigned(OwnerDocument.contentModel) and assigned(OwnerElement) then begin
+    Attri:= (OwnerDocument.contentModel.attributes.GetNamedItem(OwnerElement.NodeName,NodeName) as TdomCMAttribute);
+    AType:= Attri.AttributeType;
+    if AType = 'IDREF' then begin
+      if not isXMLName(attriValue)
+        then TypeMismatch:= true
+        else begin
+          if not isValidIDREF(ownerDocument.IDs,attriValue) then result:= false;
+        end;
+    end else
+    if AType = 'IDREFS' then begin
+      if not isXMLNames(attriValue)
+        then TypeMismatch:= true
+        else begin
+          startIndex:= 1; indexCount:= 0;
+          for i:= 1 to length(attriValue) do begin
+            if attriValue[i] = SPACE then begin
+              if not isValidIDREF(ownerDocument.IDs,copy(attriValue,startIndex,IndexCount)) then result:= false;
+              startIndex:= succ(i);
+              indexCount:= 0;
+            end else inc(indexCount);
+          end;
+          if not isValidIDREF(ownerDocument.IDs,copy(attriValue,startIndex,IndexCount)) then result:= false;
+        end;
+    end;
+  end;
+
+  if TypeMismatch then begin
+    result:= false;
+    sendErrorNotification(ET_ATTRIBUTE_TYPE_MISMATCH,self);
+  end;
+
+end;
+
+function TdomAttr.resolveEntityReferences(const opt: TdomEntityResolveOption): boolean;
+var
+  i: integer;
+  s, childName: UnicodeString;
+  child: TdomNode;
+  cmEnt: TdomCMEntity;
+  parser: TXmlToDomParser;
+begin
+  result:= true;
+  parser:= TXmlToDomParser.create(nil);
+  try
+    case opt of
+      erReplace: begin
+        try
+          S:= literalValue;
+          clear;
+          if S <> '' then parser.docWideStringToDom(S,'','',self);
+        except
+          result:= false;
+        end;
+      end;
+      erExpand: begin  // xxx Shouldn't that be removed at all ???
+        for i:= 0 to pred(childnodes.length) do begin
+          child:= childnodes.item(i);
+          if child.nodeType = ntEntity_Reference_Node then begin
+            child.clear;
+            cmEnt:= (child as TdomEntityReference).correspondingCMEntity;
+            if assigned(cmEnt) then begin
+              try
+                S:= cmEnt.normalizedValue;
+                if S <> '' then parser.docWideStringToDom(S,'','',child);
+              except
+                result:= false;
+              end;
+            end else begin
+              childName:= child.nodeName;
+              if (childName='lt') then begin
+                child.appendChild(ownerDocument.CreateTextNode(#60))
+              end else if (childName='gt') then begin
+                child.appendChild(ownerDocument.CreateTextNode(#62))
+              end else if (childName='amp') then begin
+                child.appendChild(ownerDocument.CreateTextNode(#38))
+              end else if (childName='apos') then begin
+                child.appendChild(ownerDocument.CreateTextNode(#39))
+              end else if (childName='quot') then begin
+                child.appendChild(ownerDocument.CreateTextNode(#34))
+              end else result:= false;
+            end; {if assigned(cmEnt) ...}
+    // xxx setting the readonly property is missing here!
+          end;
+        end;
+      end;
+    end;
+  finally
+    parser.free;
+  end;
+end;
+
+
+
+//++++++++++++++++++++++++++++ TdomElement ++++++++++++++++++++++++++++++++
+constructor TdomElement.create(const aOwner: TdomDocument;
+                               const tagName: UnicodeString);
+begin
+  if not IsXmlName(tagName)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  inherited create(aOwner);
+  FNodeName:= tagName;
+  FNodeValue:= '';
+  FNodeType:= ntElement_Node;
+  FAttributeListing:= TList.create;
+  FCreatedElementsNodeLists:= TList.create;
+  FCreatedElementsNodeListNSs:= TList.create;
+  FAttributeList:= TdomNamedNodeMap.create(aOwner,self,FAttributeListing,[ntAttribute_Node]);
+  FAllowedChildTypes:= [ntElement_Node,
+                        ntText_Node,
+                        ntCDATA_Section_Node,
+                        ntEntity_Reference_Node,
+                        ntProcessing_Instruction_Node,
+                        ntComment_Node,
+                        ntDocument_Fragment_Node];
+end;
+
+constructor TdomElement.createNS(const aOwner: TdomDocument;
+                                 const anamespaceURI,
+                                       qualifiedName: UnicodeString);
+var
+  locName,prfx: UnicodeString;
+begin
+  if not xmlExtractPrefixAndLocalName(qualifiedName,prfx,locName) then begin
+    if not IsXmlName(qualifiedName)
+      then raise EInvalid_Character_Err.create('Invalid character error.')
+      else raise ENamespace_Err.create('Namespace error.');
+  end;
+  if (anamespaceURI = '') and (prfx <> '')
+    then raise ENamespace_Err.create('Namespace error.');
+  if (prfx = 'xml') and (anamespaceURI <> 'http://www.w3.org/XML/1998/namespace')
+    then raise ENamespace_Err.create('Namespace error.');
+  inherited create(aOwner);
+  FNodeName:= qualifiedName;
+  FNamespaceURI:= anamespaceURI;
+  FPrefix:= prfx;
+  FLocalName:= locName;
+  FIsNamespaceNode:= true;
+  FNodeValue:= '';
+  FNodeType:= ntElement_Node;
+  FAttributeListing:= TList.create;
+  FCreatedElementsNodeLists:= TList.create;
+  FCreatedElementsNodeListNSs:= TList.create;
+  FAttributeList:= TdomNamedNodeMap.create(aOwner,self,FAttributeListing,[ntAttribute_Node]);
+  FAllowedChildTypes:= [ntElement_Node,
+                        ntText_Node,
+                        ntCDATA_Section_Node,
+                        ntEntity_Reference_Node,
+                        ntProcessing_Instruction_Node,
+                        ntComment_Node,
+                        ntDocument_Fragment_Node];
+end;
+
+destructor TdomElement.destroy;
+var
+  i: integer;
+begin
+  FAttributeList.free;
+  FAttributeListing.free;
+  if assigned(FCreatedElementsNodeLists)
+    then for i := 0 to pred(FCreatedElementsNodeLists.Count) do
+      TdomElementsNodeList(FCreatedElementsNodeLists[i]).free;
+  if assigned(FCreatedElementsNodeListNSs)
+    then for i := 0 to pred(FCreatedElementsNodeListNSs.Count) do
+      TdomElementsNodeListNS(FCreatedElementsNodeListNSs[i]).free;
+  FCreatedElementsNodeLists.free;
+  FCreatedElementsNodeListNSs.free;
+  inherited destroy;
+end;
+
+procedure TdomElement.setNodeValue(const value: UnicodeString);
+begin
+end;
+
+procedure TdomElement.setIsReadonly(const value: boolean);
+begin
+  inherited setIsReadonly(value);
+  Attributes.setIsReadonly(value);
+end;
+
+function TdomElement.getTagName: UnicodeString;
+begin
+  Result:= NodeName;
+end;
+
+function TdomElement.getAttributes: TdomNamedNodeMap;
+begin
+  Result:= FAttributeList;
+end;
+
+function TdomElement.getAttribute(const name: UnicodeString): UnicodeString;
+begin
+  if Attributes.NamespaceAware
+    then raise ENamespace_Err.create('Namespace error.');
+  if not assigned(GetAttributeNode(name))
+    then result:= ''
+    else result:= (Attributes.GetNamedItem(name) as TdomAttr).value;
+end;
+
+function TdomElement.setAttribute(const name,
+                                        value: UnicodeString): TdomAttr;
+var
+  Attr: TdomAttr;
+begin
+  if isReadonly
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  if Attributes.NamespaceAware
+    then raise ENamespace_Err.create('Namespace error.');
+  Attr:= getAttributeNode(name);
+  if assigned(Attr) then begin
+    Attr.value:= value;
+    Result:= nil;
+  end else begin
+    Result:= OwnerDocument.CreateAttribute(name);
+    Result.value:= value;
+    setAttributeNode(Result);
+  end;
+end;
+
+function TdomElement.removeAttribute(const name: UnicodeString): TdomAttr;
+begin
+  if isReadonly
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  if Attributes.NamespaceAware
+    then raise ENamespace_Err.create('Namespace error.');
+  if not assigned(GetAttributeNode(name))
+    then ENot_Found_Err.create('Node not found error.');
+  Result:= RemoveAttributeNode(GetAttributeNode(name));
+end;
+
+function TdomElement.getAttributeNode(const name: UnicodeString): TdomAttr;
+begin
+  if Attributes.NamespaceAware
+    then raise ENamespace_Err.create('Namespace error.');
+  Result:= TdomAttr(Attributes.GetNamedItem(name));
+end;
+
+function TdomElement.setAttributeNode(const newAttr: TdomAttr): TdomAttr;
+var
+  OldAttr: TdomAttr;
+begin
+  if isReadonly
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  if Attributes.NamespaceAware
+    then raise ENamespace_Err.create('Namespace error.');
+  if OwnerDocument <> newAttr.OwnerDocument
+    then raise EWrong_Document_Err.create('Wrong document error.');
+  if assigned(newAttr.parentNode) and not (newAttr.OwnerElement = self)
+    then raise EInuse_Attribute_Err.create('Inuse attribute error.');
+  Result:= nil;
+  if not (newAttr.OwnerElement = self) then begin
+    OldAttr:= (Attributes.GetNamedItem(newAttr.name) as TdomAttr);
+    if assigned(OldAttr) then Result:= RemoveAttributeNode(OldAttr);
+    Attributes.SetNamedItem(newAttr);
+    doAttrModified(self,AC_ADDITION,'',newAttr.value,newAttr);
+  end;
+end;
+
+function TdomElement.removeAttributeNode(const oldAttr: TdomAttr): TdomAttr;
+begin
+  if isReadonly
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  if Attributes.indexof(oldAttr) = -1
+    then raise ENot_Found_Err.create('Node not found error.');
+  Attributes.RemoveItem(oldAttr);
+  oldAttr.FOwnerElement:= nil;
+  Result:= oldAttr;
+  doAttrModified(self,AC_REMOVAL,oldAttr.value,'',oldAttr);
+end;
+
+function TdomElement.getElementsByTagName(const name: UnicodeString): TdomNodeList;
+var
+  i: integer;
+begin
+  for i:= 0 to FCreatedElementsNodeLists.Count - 1 do
+    if TdomElementsNodeList(FCreatedElementsNodeLists[i]).FQueryName = name
+      then begin Result:= TdomElementsNodeList(FCreatedElementsNodeLists[i]); exit; end;
+  Result:= TdomElementsNodeList.create(name,self);
+  FCreatedElementsNodeLists.add(Result);
+end;
+
+function TdomElement.getAttributeNS(const anamespaceURI,
+                                          alocalName: UnicodeString): UnicodeString;
+begin
+  if not Attributes.NamespaceAware
+    then raise ENamespace_Err.create('Namespace error.');
+  if not assigned(GetAttributeNodeNS(anamespaceURI,alocalName))
+    then result:= ''
+    else result:= (Attributes.GetNamedItemNS(anamespaceURI,alocalName) as TdomAttr).value;
+end;
+
+function TdomElement.setAttributeNS(const anamespaceURI,
+                                          qualifiedName,
+                                          value: UnicodeString): TdomAttr;
+var
+  Attr: TdomAttr;
+  prfx, alocalname: UnicodeString;
+begin
+  if isReadonly
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  if not Attributes.NamespaceAware
+    then raise ENamespace_Err.create('Namespace error.');
+  if not xmlExtractPrefixAndLocalName(qualifiedName,prfx,alocalName) then begin
+    if not IsXmlName(qualifiedName)
+      then raise EInvalid_Character_Err.create('Invalid character error.')
+      else raise ENamespace_Err.create('Namespace error.');
+  end;
+  if ( ((prfx = 'xmlns') or (qualifiedName = 'xmlns'))
+    and not (anamespaceURI ='http://www.w3.org/2000/xmlns/') )
+      then raise ENamespace_Err.create('Namespace error.');
+  if (namespaceURI = '') and (prfx <> '')
+    then raise ENamespace_Err.create('Namespace error.');
+  if (prfx = 'xml') and (anamespaceURI <> 'http://www.w3.org/XML/1998/namespace')
+    then raise ENamespace_Err.create('Namespace error.');
+  Attr:= getAttributeNodeNS(anamespaceURI,alocalName);
+  if assigned(Attr) then begin
+    Attr.FNodeName:= qualifiedName;
+    Attr.value:= value;
+    Result:= nil;
+  end else begin
+    Result:= OwnerDocument.CreateAttributeNS(anamespaceURI,qualifiedName);
+    Result.value:= value;
+    setAttributeNodeNS(Result);
+  end;
+end;
+
+function TdomElement.removeAttributeNS(const anamespaceURI,
+                                             alocalName: UnicodeString): TdomAttr;
+begin
+  if isReadonly
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  if not Attributes.NamespaceAware
+    then raise ENamespace_Err.create('Namespace error.');
+  if not assigned(GetAttributeNodeNS(anamespaceURI,alocalName))
+    then ENot_Found_Err.create('Node not found error.');
+  Result:= RemoveAttributeNode(GetAttributeNodeNS(anamespaceURI,alocalName));
+end;
+
+function TdomElement.getAttributeNodeNS(const anamespaceURI,
+                                              alocalName: UnicodeString): TdomAttr;
+begin
+  if not Attributes.NamespaceAware
+    then raise ENamespace_Err.create('Namespace error.');
+  Result:= TdomAttr(Attributes.GetNamedItemNS(anamespaceURI,alocalName));
+end;
+
+function TdomElement.setAttributeNodeNS(const newAttr: TdomAttr): TdomAttr;
+var
+  OldAttr: TdomAttr;
+begin
+  if isReadonly
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  if not Attributes.NamespaceAware
+    then raise ENamespace_Err.create('Namespace error.');
+  if OwnerDocument <> newAttr.OwnerDocument
+    then raise EWrong_Document_Err.create('Wrong document error.');
+  if assigned(newAttr.parentNode) and not (newAttr.OwnerElement = self)
+    then raise EInuse_Attribute_Err.create('Inuse attribute error.');
+  Result:= nil;
+  if not (newAttr.OwnerElement = self) then begin
+    OldAttr:= (Attributes.GetNamedItemNS(newAttr.namespaceURI,newAttr.localName) as TdomAttr);
+    if assigned(OldAttr) then Result:= RemoveAttributeNode(OldAttr);
+    Attributes.SetNamedItemNS(newAttr);
+    doAttrModified(self,AC_ADDITION,'',newAttr.value,newAttr);
+  end;
+end;
+
+function TdomElement.getElementsByTagNameNS(const anamespaceURI,
+                                                  alocalName: UnicodeString): TdomNodeList;
+var
+  i: integer;
+  nl: TdomElementsNodeListNS;
+begin
+  for i:= 0 to FCreatedElementsNodeListNSs.Count - 1 do begin
+    nl:= TdomElementsNodeListNS(FCreatedElementsNodeListNSs[i]);
+    if (nl.FQueryNamespaceURI = anamespaceURI) and (nl.FQueryLocalName = alocalName)
+      then begin Result:= nl; exit; end;
+  end;
+  Result:= TdomElementsNodeListNS.create(anamespaceURI,alocalName,self);
+  FCreatedElementsNodeListNSs.add(Result);
+end;
+
+function TdomElement.hasAttribute(const aname: UnicodeString): boolean;
+begin
+  Result:= assigned(Attributes.GetNamedItem(aname));
+end;
+
+function TdomElement.hasAttributeNS(const anamespaceURI,
+                                          alocalName: UnicodeString): boolean;
+begin
+  Result:= assigned(Attributes.GetNamedItemNS(anamespaceURI,alocalName));
+end;
+
+procedure TdomElement.normalize;
+var
+  PrevNode, CurrentNode: TdomNode;
+  i: integer;
+begin
+  {normalize text:}
+  PrevNode:=nil;
+  i:=ChildNodes.Length;
+  while i>0 do
+  begin
+    Dec(i);
+    CurrentNode:=ChildNodes.Item(i);
+    if (CurrentNode.NodeType = ntText_Node) then
+      begin
+         if (Assigned(PrevNode)) and (PrevNode.NodeType = ntText_Node) then
+         begin
+            (CurrentNode as TdomText).AppendData((PrevNode as TdomText).Data);
+            removeChild(PrevNode);
+            PrevNode.OwnerDocument.FreeAllNodes(PrevNode);
+         end;
+      end
+    else  // no text node, then normalize
+      CurrentNode.normalize;
+    PrevNode:=CurrentNode;
+  end;
+
+  {normalize attributes:}
+  for i:= 0 to attributes.Length-1 do
+    attributes.item(i).normalize;
+end;
+
+function TdomElement.validate2: boolean;
+var
+  i: integer;
+  ok: boolean;
+  contentModelOk: boolean;
+  EType: TdomCMElementTypeDeclaration;
+  PcdataChoice: TdomCMPcdataChoiceParticle;
+  particle: TdomCMParticle;
+  elementnames,rest: TdomWideStringList;
+  cm: TdomCMObject;
+  attri: TdomCMAttribute;
+  newAttr, textAttr: TdomAttr;
+  treeWalker: TdomTreeWalker;
+  nodeToTest: TdomNode;
+  isNonDeterministic: boolean;
+begin
+  result:= true;
+  cm:= OwnerDocument.contentModel;
+
+  if assigned(cm) then begin
+
+    // VC: Element Valid (XML 1.0, § 3)
+    EType:= (cm.elementTypes.GetNamedItem(NodeName) as TdomCMElementTypeDeclaration);
+    if not assigned(EType) then begin
+      result:= false;
+      sendErrorNotification(ET_ELEMENT_TYPE_DECL_NOT_FOUND,self);
+    end else begin
+      treeWalker:= ownerDocument.CreateTreeWalker(self,
+                                                  // Hide entity reference nodes:
+                                                  [ntElement_Node,
+                                                  ntAttribute_Node,
+                                                  ntText_Node,
+                                                  ntCDATA_Section_Node,
+                                                  ntEntity_Node,
+                                                  ntProcessing_Instruction_Node,
+                                                  ntComment_Node,
+                                                  ntDocument_Node,
+                                                  ntDocument_Type_Node,
+                                                  ntDocument_Fragment_Node,
+                                                  ntNotation_Node],
+                                                  nil,
+                                                  true);
+      try
+        case EType.ContentspecType of
+          ctEmpty: begin
+            nodeToTest:= treeWalker.firstChild;
+            while assigned(nodeToTest) do begin
+              if not ( (nodeToTest.nodeType = ntText_Node) and (nodeToTest.nodeValue = '') ) then begin
+                result:= false;
+                sendErrorNotification(ET_ELEMENT_DECLARED_EMPTY_HAS_CONTENT,self);
+                break;
+              end;
+              nodeToTest:= treeWalker.nextSibling;
+            end; {while ...}
+          end;
+          ctChildren: begin
+            elementnames:= TdomWideStringList.create;
+            rest:= TdomWideStringList.create;
+            try
+              ok:= true;
+              nodeToTest:= treeWalker.firstChild;
+              while assigned(nodeToTest) do begin
+                with nodeToTest do begin
+                  case nodeType of
+                    ntElement_Node:
+                      elementnames.Add(NodeName);
+                    ntText_Node:
+                      if not (IsXmlS(nodeValue) or (nodeValue = '')) then begin
+                        ok:= false;
+                        break;
+                      end;
+                    ntProcessing_Instruction_Node,ntComment_Node:; // Do nothing --> node accepted.
+                    else begin
+                      ok:= false;
+                      break;
+                    end;
+                  end; {case ...}
+                end; {with ...}
+                nodeToTest:= treeWalker.nextSibling;
+              end; {while ...}
+              if ok then begin
+                particle:= EType.firstChild as TdomCMParticle;
+                contentModelOk:= particle.contentModelTest(elementnames,rest,isNonDeterministic);
+                if isNonDeterministic then begin
+                  result:= false;
+                  sendErrorNotification(ET_NONDETERMINISTIC_ELEMENT_CONTENT_MODEL,self);
+                end else ok:= contentModelOk and (rest.Count = 0);
+              end; {if ok ...}
+            finally
+              elementnames.free;
+              rest.free;
+            end;
+            if not ok then begin
+              result:= false;
+              sendErrorNotification(ET_ELEMENT_WITH_ILLEGAL_ELEMENT_CONTENT,self);
+            end; {if ...}
+          end;
+          ctMixed: begin
+            PcdataChoice:= EType.firstChild as TdomCMPcdataChoiceParticle;
+            nodeToTest:= treeWalker.firstChild;
+            while assigned(nodeToTest) do begin
+              ok:= true;
+              with nodeToTest do begin
+                case nodeType of
+                  ntElement_Node:
+                    if assigned(PcdataChoice) then begin
+                      if not PcdataChoice.elementDefined(NodeName)
+                        then ok:= false;
+                    end else ok:= false;
+                  ntText_Node,ntProcessing_Instruction_Node,ntComment_Node:; // Do nothing --> node accepted.
+                  else
+                    ok:= false;
+                end; {case ...}
+                if not ok then begin
+                  result:= false;
+                  sendErrorNotification(ET_ELEMENT_WITH_ILLEGAL_MIXED_CONTENT,self);
+                end; {if ...}
+              end; {with ...}
+              nodeToTest:= treeWalker.nextSibling;
+            end; {while ...}
+          end;
+        end; {case ...}
+      finally
+        ownerDocument.freeTreeWalker(TreeWalker);
+      end; {try ...}
+    end; {if not assigned(EType) ... else ... end}
+
+    with cm.attributes do begin
+      for i:= 0 to pred(length) do begin
+        attri:= item(i);
+        if attri.elementName = nodeName then begin
+          if attri.defaultDeclaration = '#REQUIRED' then begin
+            // VC: Required Attribute (XML 1.0, § 3.3.2)
+            if not hasAttribute(attri.attributeName) then begin
+              result:= false;
+              sendErrorNotification(ET_REQUIRED_ATTRIBUTE_NOT_FOUND,self);
+            end;
+          end else begin
+
+            textAttr:= self.GetAttributeNode(attri.attributeName);
+            if assigned(textAttr) then begin
+              // VC: Fixed Attribute Default (XML 1.0, § 3.3.2)
+              if attri.defaultDeclaration = '#FIXED' then begin
+                if attri.NodeValue <> textAttr.value then begin
+                  result:= false;
+                  sendErrorNotification(ET_FIXED_ATTRIBUTE_MISMATCH,self);
+                end;
+              end;
+            end else begin
+              // set default attributes:
+              if not (attri.defaultDeclaration = '#IMPLIED') then begin
+                newAttr:= OwnerDocument.CreateAttribute(attri.AttributeName);
+                newAttr.value:= attri.NodeValue;
+                newAttr.FSpecified:= false;
+                self.SetAttributeNode(newAttr);
+              end;
+            end;
+
+          end;
+        end; {if attri.elementName ...}
+      end; {for ...}
+    end; {with ...}
+
+  end else begin
+    result:= false;
+    sendErrorNotification(ET_ELEMENT_TYPE_DECL_NOT_FOUND,self);
+  end; {if assigned(cm) ... else ... end}
+
+  // validate child attributes:
+  for i:= 0 to pred(attributes.length) do
+    if not attributes.item(i).validate2
+      then result:= false;
+
+  // validate child nodes:
+  for i:= 0 to pred(childnodes.length) do
+    if not childnodes.item(i).validate2
+      then result:= false;
+
+end;
+
+function TdomElement.validateIDREFS: boolean;
+var
+  i: integer;
+begin
+  result:= true;
+  for i:= 0 to pred(attributes.length) do
+    if not attributes.Item(i).validateIDREFS
+      then result:= false;
+end;
+
+function TdomElement.resolveEntityReferences(const opt: TdomEntityResolveOption): boolean;
+var
+  i: integer;
+  ok,hasEntRefs: boolean;
+  S, childName: UnicodeString;
+  child: TdomNode;
+  docFrag: TdomDocumentFragment;
+  ReplText: TdomText;
+  cmEnt: TdomCMEntity;
+  parser: TXmlToDomParser;
+begin
+  result:= true;
+
+  for i:= 0 to pred(attributes.Length) do begin
+    ok:= attributes.Item(i).resolveEntityReferences(opt);
+    if not ok then result:= false;
+  end;
+
+  case opt of
+    erReplace: begin
+      parser:= TXmlToDomParser.create(nil);
+      try
+        parser.DOMImpl:= ownerDocument.domImplementation;
+        hasEntRefs:= false;
+        i:= 0;
+        while i < ChildNodes.Length do begin
+          child:= ChildNodes.Item(i);
+          if child.nodeType = ntEntity_Reference_Node then begin
+            hasEntRefs:= true;
+            cmEnt:= (child as TdomEntityReference).correspondingCMEntity;
+            if assigned(cmEnt) then begin
+              try
+                S:= cmEnt.replacementText;
+                docFrag:= ownerDocument.CreateDocumentFragment;
+                try
+                  if S <> '' then parser.docWideStringToDom(S,'','',docFrag);
+                  replaceChild(docFrag,child);
+                  ownerDocument.FreeAllNodes(child);
+                  dec(i); // Necessary, if an empty entity was referenced.
+                finally
+                  ownerDocument.FreeAllNodes(TdomNode(docFrag));
+                end;
+              except
+                result:= false;
+              end;
+            end else begin
+              childName:= child.nodeName;
+              if (childName='lt') then begin
+                ReplText:= ownerDocument.CreateTextNode(#60);
+                replaceChild(ReplText,child);
+                ownerDocument.FreeAllNodes(child);
+              end else if (childName='gt') then begin
+                ReplText:= ownerDocument.CreateTextNode(#62);
+                replaceChild(ReplText,child);
+                ownerDocument.FreeAllNodes(child);
+              end else if (childName='amp') then begin
+                ReplText:= ownerDocument.CreateTextNode(#38);
+                replaceChild(ReplText,child);
+                ownerDocument.FreeAllNodes(child);
+              end else if (childName='apos') then begin
+                ReplText:= ownerDocument.CreateTextNode(#39);
+                replaceChild(ReplText,child);
+                ownerDocument.FreeAllNodes(child);
+              end else if (childName='quot') then begin
+                ReplText:= ownerDocument.CreateTextNode(#34);
+                replaceChild(ReplText,child);
+                ownerDocument.FreeAllNodes(child);
+              end else result:= false;
+            end; {if assigned(cmEnt) ...}
+          end else child.resolveEntityReferences(opt);
+          inc(i);
+        end; {while ...}
+      finally
+        parser.free;
+      end;
+      if hasEntRefs then normalize;
+    end;
+    erExpand: begin
+      for i:= 0 to pred(ChildNodes.Length) do begin
+        child:= ChildNodes.Item(i);
+        if child.nodeType = ntEntity_Reference_Node then begin
+          ok:= (child as TdomEntityReference).expand;
+          if not ok then result:= false;
+        end else child.resolveEntityReferences(opt);
+      end; {for ...}
+    end;
+  end;
+end;
+
+
+
+//+++++++++++++++++++++++++++++ TdomText +++++++++++++++++++++++++++++++++
+constructor TdomText.create(const aOwner: TdomDocument);
+begin
+  inherited create(aOwner);
+  FNodeName:= '#text';
+  FNodeValue:= '';
+  FNodeType:= ntText_Node;
+  FAllowedChildTypes:= [];
+end;
+
+function TdomText.getIsWhitespaceInElementContent: boolean;
+var
+  cm: TdomCMObject;
+  EType: TdomCMElementTypeDeclaration;
+  pNode: TdomNode;
+begin
+  result:= false;
+  if not (isXMLS(nodeValue) or (nodeValue = '')) then exit;
+  cm:= OwnerDocument.contentModel;
+  if assigned(cm) then begin
+    pNode:= parentNode;
+    while assigned(pNode) do begin
+      case pNode.nodeType of
+        ntElement_Node: begin
+          EType:= (cm.elementTypes.GetNamedItem(pNode.NodeName) as TdomCMElementTypeDeclaration);
+          if assigned(EType)
+            then if EType.ContentspecType = ctChildren
+              then result:= true;
+          break;
+        end;
+        ntEntity_Reference_Node:
+          pNode:= pNode.parentNode;
+      else
+        break;
+      end; {case ...}
+    end; {while ...}
+  end; {if ...}
+end;
+
+function TdomText.validate2: boolean;
+begin
+  result:= true;
+end;
+
+function TdomText.SplitText(const offset: integer): TdomText;
+begin
+  if isReadonly
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  if(offset < 0) or (offset > Length)
+    then raise EIndex_Size_Err.create('Index size error.');
+  Result:= OwnerDocument.CreateTextNode(SubstringData(offset,length-offset));
+  DeleteData(offset,length-offset);
+  if assigned(ParentNode) then ParentNode.insertBefore(Result,self.NextSibling);
+end;
+
+
+
+//++++++++++++++++++++++++++++ TdomComment +++++++++++++++++++++++++++++++
+constructor TdomComment.create(const aOwner: TdomDocument);
+begin
+  inherited create(aOwner);
+  FNodeName:= '#comment';
+  FNodeValue:= '';
+  FNodeType:= ntComment_Node;
+  FAllowedChildTypes:= [];
+end;
+
+function TdomComment.validate2: boolean;
+begin
+  result:= true;
+end;
+
+
+
+//+++++++++++++++++++++ TdomProcessingInstruction +++++++++++++++++++++++++
+constructor TdomProcessingInstruction.create(const aOwner: TdomDocument;
+                                             const targ: UnicodeString);
+begin
+  if not IsXmlPITarget(targ)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  inherited create(aOwner);
+  FNodeName:= targ;
+  FNodeValue:= '';
+  FNodeType:= ntProcessing_Instruction_Node;
+  FAllowedChildTypes:= [];
+end;
+
+function TdomProcessingInstruction.validate2: boolean;
+begin
+  result:= true;
+end;
+
+function TdomProcessingInstruction.getTarget: UnicodeString;
+begin
+  Result:= FNodeName;
+end;
+
+function TdomProcessingInstruction.getData: UnicodeString;
+begin
+  Result:= FNodeValue;
+end;
+
+procedure TdomProcessingInstruction.setData(const value: UnicodeString);
+var
+  prevValue: UnicodeString;
+begin
+  prevValue:= NodeValue;
+  NodeValue:= value;
+  doCharacterDataModified(self,prevValue,value);
+end;
+
+
+
+//++++++++++++++++++++++++++ TdomCDATASection +++++++++++++++++++++++++++++
+constructor TdomCDATASection.create(const aOwner: TdomDocument);
+begin
+  inherited create(aOwner);
+  FNodeName:= '#cdata-section';
+  FNodeValue:= '';
+  FNodeType:= ntCDATA_Section_Node;
+end;
+
+function TdomCDATASection.validate2: boolean;
+begin
+  result:= true;
+end;
+
+
+
+//++++++++++++++++++++++++++ TdomDocumentType +++++++++++++++++++++++++++++
+constructor TdomDocumentType.create(const aOwner: TdomDocument;
+                                    const name,
+                                          pubId,
+                                          sysId,
+                                          IntSubset: UnicodeString);
+begin
+  inherited create(aOwner);
+  FNodeValue:= '';
+  FNodeName:= name;
+  FPublicId:= pubId;
+  FSystemId:= sysId;
+  FInternalSubset:= IntSubset;
+  FNodeType:= ntDocument_Type_Node;
+  FAllowedChildTypes:= [];
+  FEntitiesListing:= TList.create;
+  FEntitiesList:= TdomNamedNodeMap.create(aOwner,self,FEntitiesListing,[ntEntity_Node]);
+  FNotationsListing:= TList.create;
+  FNotationsList:= TdomNamedNodeMap.create(aOwner,self,FNotationsListing,[ntNotation_Node]);
+end;
+
+destructor TdomDocumentType.destroy;
+begin
+  FEntitiesListing.free;
+  FEntitiesList.free;
+  FNotationsListing.free;
+  FNotationsList.free;
+  inherited destroy;
+end;
+
+function TdomDocumentType.validate2: boolean;
+begin
+  result:= true;
+end;
+
+function TdomDocumentType.GetEntities: TdomNamedNodeMap;
+begin
+  Result:= FEntitiesList;
+end;
+
+function TdomDocumentType.GetInternalSubset: UnicodeString;
+begin
+  Result:= FInternalSubset;
+end;
+
+function TdomDocumentType.GetName: UnicodeString;
+begin
+  Result:= NodeName;
+end;
+
+function TdomDocumentType.GetNotations: TdomNamedNodeMap;
+begin
+  Result:= FNotationsList;
+end;
+
+function TdomDocumentType.GetPublicId: UnicodeString;
+begin
+  Result:= FPublicId;
+end;
+
+function TdomDocumentType.GetSystemId: UnicodeString;
+begin
+  Result:= FSystemId;
+end;
+
+procedure TdomDocumentType.SetNodeValue(const value: UnicodeString);
+begin
+end;
+
+
+
+//++++++++++++++++++++++++++ TdomNotation ++++++++++++++++++++++++++++++
+constructor TdomNotation.create(const aOwner: TdomDocument;
+                                const name,
+                                      pubId,
+                                      sysId: UnicodeString);
+begin
+  if not IsXmlName(name)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  if not isXmlSystemChars(sysId)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  if not isXmlPubidChars(publicId)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  inherited create(aOwner);
+  FNodeName:= name;
+  FNodeValue:= '';
+  FPublicId:= pubId;
+  FSystemId:= sysId;
+  FNodeType:= ntNotation_Node;
+  FAllowedChildTypes:= [];
+end;
+
+procedure TdomNotation.SetNodeValue(const value: UnicodeString);
+begin
+  // Do nothing.
+end;
+
+function TdomNotation.GetPublicId: UnicodeString;
+begin
+  Result:= FPublicId;
+end;
+
+function TdomNotation.GetSystemId: UnicodeString;
+begin
+  Result:= FSystemId;
+end;
+
+
+
+//+++++++++++++++++++++++++++ TdomEntity +++++++++++++++++++++++++++++++++
+constructor TdomEntity.create(const aOwner: TdomDocument;
+                              const name,
+                                    pubId,
+                                    sysId,
+                                    notaName: UnicodeString);
+begin
+  if not IsXmlName(name)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  if not isXmlSystemChars(sysId)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  if not isXmlPubidChars(pubId)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  inherited create(aOwner);
+  FNodeName:= name;
+  FNotationName:= notaName;
+  FNodeType:= ntEntity_Node;
+  FPublicId:= pubId;
+  FSystemId:= sysId;
+  FEncoding:= '';
+  FVersion:= '';
+  FAllowedChildTypes:= [ntElement_Node,
+                        ntProcessing_Instruction_Node,
+                        ntComment_Node,
+                        ntText_Node,
+                        ntCDATA_Section_Node,
+                        ntEntity_Reference_Node,
+                        ntDocument_Fragment_Node];
+end;
+
+function TdomEntity.GetNotationName: UnicodeString;
+begin
+  Result:= FNotationName;
+end;
+
+procedure TdomEntity.SetNodeValue(const value: UnicodeString);
+begin
+  // Do nothing
+end;
+
+function TdomEntity.insertBefore(const newChild,
+                                       refChild: TdomNode): TdomNode;
+begin
+  if (publicId <> '') or (systemId <> '')
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  Result:= inherited insertBefore(newChild,refChild);
+end;
+
+function TdomEntity.replaceChild(const newChild,
+                                       oldChild: TdomNode): TdomNode;
+begin
+  if (publicId <> '') or (systemId <> '')
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  Result:= inherited replaceChild(newChild,oldChild);
+end;
+
+function TdomEntity.appendChild(const newChild: TdomNode): TdomNode;
+begin
+  if (publicId <> '') or (systemId <> '')
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  Result:= inherited appendChild(newChild);
+end;
+
+
+
+//++++++++++++++++++++++++ TdomEntityReference +++++++++++++++++++++++++
+constructor TdomEntityReference.create(const aOwner: TdomDocument;
+                                       const name: UnicodeString);
+begin
+  if not IsXmlName(name)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  inherited create(aOwner);
+  FNodeName:= name;
+  FNodeValue:= '';
+  FNodeType:= ntEntity_Reference_Node;
+  FAllowedChildTypes:= [ntElement_Node,
+                        ntText_Node,
+                        ntCDATA_Section_Node,
+                        ntEntity_Reference_Node,
+                        ntProcessing_Instruction_Node,
+                        ntComment_Node,
+                        ntDocument_Fragment_Node];
+end;
+
+function TdomEntityReference.getCorrespondingCMEntity: TdomCMEntity;
+var
+  cm: TdomCMObject;
+begin
+  cm:= ownerDocument.contentModel;
+  if assigned(cm)
+    then result:= cm.Entities.getNamedItem(NodeName)
+    else result:= nil;
+end;
+
+function TdomEntityReference.getRefersToPredefinedEntity: boolean;
+begin
+  if (nodeName = 'lt') or
+     (nodeName = 'gt') or
+     (nodeName = 'amp') or
+     (nodeName = 'apos') or
+     (nodeName = 'quot')
+  then result:= true
+  else result:= false;
+end;
+
+function TdomEntityReference.expand: boolean;
+// Resolves the replacement text of the entity reference by the value of
+// its correspondingCMEntity or by a default entity respectivly.
+// Returns 'true' if successful, otherwise 'false'.
+var
+  S: UnicodeString;
+  cmEnt: TdomCMEntity;
+  parser: TXmlToDomParser;
+begin
+  result:= true;
+  parser:= TXmlToDomParser.create(nil);
+  try
+    parser.DOMImpl:= ownerDocument.domImplementation;
+    clear;
+    cmEnt:= correspondingCMEntity;
+    if assigned(cmEnt) then begin
+      try
+        S:= cmEnt.replacementText;
+        if S <> '' then parser.docWideStringToDom(S,'','',self);
+        // xxx setting the readonly property is missing here!
+      except
+        result:= false;
+      end;
+    end else begin
+      if (nodeName='lt') then begin
+        appendChild(ownerDocument.CreateTextNode(#60))
+      end else if (nodeName='gt') then begin
+        appendChild(ownerDocument.CreateTextNode(#62))
+      end else if (nodeName='amp') then begin
+        appendChild(ownerDocument.CreateTextNode(#38))
+      end else if (nodeName='apos') then begin
+        appendChild(ownerDocument.CreateTextNode(#39))
+      end else if (nodeName='quot') then begin
+        appendChild(ownerDocument.CreateTextNode(#34))
+      end else result:= false;
+    end; {if assigned(cmEnt) ...}
+    // xxx setting the readonly property is missing here!
+  finally
+    parser.free;
+  end;
+end;
+
+function TdomEntityReference.validate2: boolean;
+var
+  ent: TdomCMEntity;
+  i: integer;
+begin
+  result:= true;
+
+  if not refersToPredefinedEntity then begin
+
+    // VC: Entity declared (XML 1.0, § 4.1)
+    ent:= getCorrespondingCMEntity;
+    if not assigned(ent) then begin
+      result:= false;
+      sendErrorNotification(ET_ENTITY_DECL_NOT_FOUND,self);
+      exit;
+    end;
+
+    if ent.isParsedEntity then begin
+
+      if not ent.resolve then begin
+        result:= false;
+        sendErrorNotification(ET_UNRESOLVABLE_ENTITY_REFERENCE,self);
+        exit;
+      end;
+
+      // WFC: Parsed Entity (XML 1.0, § 4.1)
+      if ent.refersToUnparsedEntity(true) then begin
+        result:= false;
+        sendErrorNotification(ET_REFERENCE_TO_UNPARSED_ENTITY,self);
+      end;
+
+      // WFC: No Recursion (XML 1.0, § 4.1)
+      if ent.RefersToItself(true) then begin
+        result:= false;
+        sendErrorNotification(ET_RECURSIVE_REFERENCE,self);
+      end;
+
+      // WFC: Well-Formed Parsed Entities (XML 1.0, § 4.3.2)
+      if ent.isUnusable then begin
+        result:= false;
+        sendErrorNotification(ET_NO_PROPER_MARKUP_REFERENCED,self);
+      end; {if ...}
+
+    end;
+
+  end; {if not refersToPredefinedEntity ...}
+
+  // validate child nodes:
+  for i:= 0 to pred(childnodes.length) do
+    if not childnodes.item(i).validate2
+      then result:= false;
+
+end;
+
+procedure TdomEntityReference.SetNodeValue(const value: UnicodeString);
+begin
+  // Do nothing.
+end;
+
+function TdomEntityReference.CloneNode(const deep: boolean): TdomNode;
+begin
+  result:= inherited cloneNode(deep);
+  makeChildrenReadonly;
+end;
+
+function  TdomEntityReference.resolveEntityReferences(const opt: TdomEntityResolveOption): boolean;
+begin
+  result:= true;
+end;
+
+
+
+//++++++++++++++++++++++++ TdomDocumentFragment +++++++++++++++++++++++++++
+constructor TdomDocumentFragment.create(const aOwner: TdomDocument);
+begin
+  inherited create(aOwner);
+  FNodeName:= '#document-fragment';
+  FNodeValue:= '';
+  FNodeType:= ntDocument_Fragment_Node;
+  FAllowedChildTypes:= [ntElement_Node,
+                        ntText_Node,
+                        ntCDATA_Section_Node,
+                        ntEntity_Reference_Node,
+                        ntProcessing_Instruction_Node,
+                        ntComment_Node,
+                        ntDocument_Type_Node,       // xxx not DOM conformant.  Delete?
+                        ntDocument_Fragment_Node];
+end;
+
+procedure TdomDocumentFragment.SetNodeValue(const value: UnicodeString);
+begin
+end;
+
+
+
+//+++++++++++++++++++++++++ TdomXPathNamespace ++++++++++++++++++++++++++++
+constructor TdomXPathNamespace.create(const aOwnerElement: TdomElement;
+                                      const anamespaceUri,
+                                            aprefix: UnicodeString);
+begin
+  if not ( IsXmlPrefix(aprefix) or (aprefix = '') )
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  if ( (aprefix = 'xmlns') and not (anamespaceURI = 'http://www.w3.org/2000/xmlns/') )
+    then raise ENamespace_Err.create('Namespace error.');
+  if (anamespaceURI = '') and (aprefix <> '')
+    then raise ENamespace_Err.create('Namespace error.');
+  if (aprefix = 'xml') and (anamespaceURI <> 'http://www.w3.org/XML/1998/namespace')
+    then raise ENamespace_Err.create('Namespace error.');
+  FOwnerElement:= aOwnerElement;
+  FIsReadonly:= true;
+  FNodeType:= ntXPath_Namespace_Node;
+  FNodeName:= aprefix;
+  FPrefix:= aprefix;
+  FNamespaceURI:= anamespaceUri;
+end;
+
+function TdomXPathNamespace.getDocument: TdomDocument;
+begin
+  result:= FOwnerElement.ownerDocument;
+end;
+
+function TdomXPathNamespace.getOwnerElement: TdomElement;
+begin
+  result:= FOwnerElement;
+end;
+
+
+
+//++++++++++++++++++++++++++++ TdomDocument +++++++++++++++++++++++++++++++
+constructor TdomDocument.create(const aOwner: TDomImplementation);
+begin
+  inherited create(self);
+  FDomImpl:= aOwner;
+  FNodeName:= '#document';
+  FNodeValue:= '';
+  FNodeType:= ntDocument_Node;
+  FEncoding:= '';
+  FStandalone:= '';
+  FSystemId:= '';
+  FVersion:= '';
+  FBaseUri:= '';
+  FModified:= false;
+  FCMInternal:= nil;
+  FDefaultView:= nil;
+  FCreatedNodes:= TList.create;
+  FCreatedNodeIterators:= TList.create;
+  FCreatedTreeWalkers:= TList.create;
+  FCreatedElementsNodeLists:= TList.create;
+  FCreatedElementsNodeListNSs:= TList.create;
+  FCreatedExpressions:= TList.create;
+  FCreatedNSResolvers:= TList.create;
+  FIDs:= TdomWideStringList.create;
+  FIDs.Sorted:= true;
+  FIDs.Duplicates:= dupError;
+  FAllowedChildTypes:= [ntElement_Node,
+                        ntProcessing_Instruction_Node,
+                        ntComment_Node,
+                        ntDocument_Type_Node,
+                        ntDocument_Fragment_Node];
+end;
+
+destructor TdomDocument.destroy;
+begin
+  clear;
+  FCreatedNodes.Free;
+  FCreatedNodeIterators.Free;
+  FCreatedTreeWalkers.Free;
+  FCreatedElementsNodeLists.free;
+  FCreatedElementsNodeListNSs.free;
+  FCreatedExpressions.free;
+  FCreatedNSResolvers.free;
+  FIDs.free;
+  inherited destroy;
+end;
+
+procedure TdomDocument.SetNodeValue(const value: UnicodeString);
+begin
+  // Do nothing.
+end;
+
+procedure TdomDocument.FindNewReferenceNodes(const NodeToRemove: TdomNode);
+var
+  i: integer;
+  refNode, refRoot: TdomNode;
+begin
+  for i:= 0 to FCreatedNodeIterators.count-1 do begin
+    refNode:= TdomNodeIterator(FCreatedNodeIterators[i]).FReferenceNode;
+    if (refNode = NodeToRemove) or refNode.IsAncestor(NodeToRemove) then begin
+      refRoot:= TdomNodeIterator(FCreatedNodeIterators[i]).root;
+      if NodeToRemove.IsAncestor(refRoot)
+        then TdomNodeIterator(FCreatedNodeIterators[i]).FindNewReferenceNode(NodeToRemove);
+    end;
+  end;
+end;
+
+procedure TdomDocument.clear;
+var
+  i : integer;
+begin
+  FNodeListing.clear;
+  for i := 0 to FCreatedNodes.Count - 1 do
+    TdomNode(FCreatedNodes[i]).free;
+  FCreatedNodes.Clear;
+  for i := 0 to FCreatedNodeIterators.Count - 1 do
+    TdomNodeIterator(FCreatedNodeIterators[i]).free;
+  FCreatedNodeIterators.Clear;
+  for i := 0 to FCreatedTreeWalkers.Count - 1 do
+    TdomTreeWalker(FCreatedTreeWalkers[i]).Free;
+  FCreatedTreeWalkers.Clear;
+  for i := 0 to FCreatedElementsNodeLists.Count - 1 do
+    TdomElementsNodeList(FCreatedElementsNodeLists[i]).free;
+  FCreatedElementsNodeLists.Clear;
+  for i := 0 to FCreatedElementsNodeListNSs.Count - 1 do
+    TdomElementsNodeListNS(FCreatedElementsNodeListNSs[i]).free;
+  FCreatedElementsNodeListNSs.Clear;
+  for i := 0 to FCreatedNSResolvers.Count - 1 do
+    TdomXPathNSResolver(FCreatedNSResolvers[i]).Free;
+  FCreatedNSResolvers.Clear;
+  for i:= 0 to FCreatedExpressions.count-1 do
+    TdomXPathExpression(FCreatedExpressions[i]).free;
+  FCreatedExpressions.Clear;
+end;
+
+procedure TdomDocument.ClearInvalidNodeIterators;
+var
+  i: integer;
+begin
+  for i:= 0 to FCreatedNodeIterators.count-1 do
+  if TdomNodeIterator(FCreatedNodeIterators[i]).FInvalid then begin
+    TdomNodeIterator(FCreatedNodeIterators[i]).free;
+    FCreatedNodeIterators[i]:= nil;
+  end;
+  FCreatedNodeIterators.pack;
+  FCreatedNodeIterators.Capacity:= FCreatedNodeIterators.Count;
+end;
+
+function TdomDocument.createEntity(const name,
+                                         pubId,
+                                         sysId,
+                                         notaName: UnicodeString): TdomEntity;
+begin
+  result:= TdomEntity.create(self,name,pubId,sysId,notaName);
+  FCreatedNodes.add(result);
+end;
+
+function TdomDocument.createNotation(const name,
+                                           pubId,
+                                           sysId: UnicodeString): TdomNotation;
+begin
+  result:= TdomNotation.create(self,name,pubId,sysId);
+  FCreatedNodes.add(result);
+end;
+
+function TdomDocument.importNode(const importedNode: TdomNode;
+                                 const deep: boolean): TdomNode;
+var
+  cm: TdomCMObject;
+  i: integer;
+  newChild: TdomNode;
+  attri: TdomCMAttribute;
+  newAttr, oldAttr, textAttr: TdomAttr;
+  nsAware: boolean;
+begin
+  if not assigned(importedNode)
+    then raise ENot_Supported_Err.create('Not supported error.');
+  case importedNode.NodeType of
+    ntAttribute_Node:
+      begin
+        with importedNode do
+          if isNamespaceNode
+            then result:= createAttributeNS(namespaceURI,nodeName)
+            else result:= createAttribute(nodeName);
+        Result.FNodeValue:= FNodeValue;
+        // duplicate the text of the attribute node:
+        for i:= 0 to pred(importedNode.ChildNodes.Length) do begin
+          newChild:= importNode(importedNode.ChildNodes.Item(i),true);
+          Result.appendChild(newChild);
+        end;
+      end;
+    ntCDATA_Section_Node:
+      Result:= createCDATASection((importedNode as TdomCDATASection).Data);
+    ntComment_Node:
+      Result:= createComment((importedNode as TdomComment).Data);
+    ntDocument_Fragment_Node:
+      begin
+        Result:= createDocumentFragment;
+        if deep then for i:= 0 to pred(importedNode.ChildNodes.Length) do begin
+          newChild:= importNode(importedNode.ChildNodes.Item(i),true);
+          Result.appendChild(newChild);
+        end;
+      end;
+    ntElement_Node:
+      begin
+        with importedNode do
+          if isNamespaceNode
+            then result:= createElementNS(namespaceURI,nodeName)
+            else result:= createElement(nodeName);
+        nsAware:= importedNode.attributes.namespaceAware;
+        Result.attributes.namespaceAware:= nsAware;
+        // Duplicating specified attributes:
+        if nsAware then begin
+          for i:= 0 to importedNode.attributes.Length-1 do begin
+            oldAttr:= TdomAttr(importedNode.attributes.Item(i));
+            if oldAttr.specified then begin
+              newChild:= importNode(oldAttr,true);
+              (result as TdomElement).setAttributeNodeNS((newChild as TdomAttr));
+            end;
+          end; {for i:= 0 to ...}
+        end else begin
+          for i:= 0 to importedNode.attributes.Length-1 do begin
+            oldAttr:= TdomAttr(importedNode.attributes.Item(i));
+            if oldAttr.specified then begin
+              newChild:= importNode(oldAttr,true);
+              (result as TdomElement).setAttributeNode((newChild as TdomAttr));
+            end;
+          end; {for i:= 0 to ...}
+        end; {if ... else ...}
+        // Adding default attributes:
+        cm:= OwnerDocument.contentModel;
+        if assigned(cm) then begin
+          with cm.attributes do begin
+            for i:= 0 to pred(length) do begin
+              attri:= item(i);
+              if attri.elementName = (result as TdomElement).nodeName then begin
+                if (attri.defaultDeclaration <> '#REQUIRED')
+                  and (attri.defaultDeclaration <> '#IMPLIED') then begin
+                  textAttr:= (result as TdomElement).getAttributeNode(attri.attributeName);
+                  if not assigned(textAttr) then begin
+                    newAttr:= OwnerDocument.CreateAttribute(attri.AttributeName);
+                    newAttr.value:= attri.NodeValue;
+                    newAttr.FSpecified:= false;
+                    (result as TdomElement).SetAttributeNode(newAttr);
+                  end; {if not ...}
+                end; {if ...}
+              end; {if ...}
+            end; {with ...}
+          end; {if assigned(cm) ...}
+        end; {for i:= 0 to ...}
+        // Duplicating child nodes:
+        if deep then for i:= 0 to pred(importedNode.ChildNodes.Length) do begin
+          newChild:= importNode(importedNode.ChildNodes.Item(i),true);
+          Result.appendChild(newChild);
+        end;
+      end;
+    ntEntity_Node:
+      with (importedNode as TdomEntity) do begin
+        result:= createEntity(nodeName,publicId,systemId,notationName);
+        (result as TdomEntity).encoding:= encoding;
+        (result as TdomEntity).version:= version;
+        if deep then for i:= 0 to pred(childNodes.length) do begin
+          newChild:= importNode(childNodes.Item(i),true);
+          result.appendChild(newChild);
+        end;
+      end;
+    ntEntity_Reference_Node:
+      begin
+        Result:= createEntityReference(importedNode.NodeName);
+        (result as TdomEntityReference).expand;
+      end;
+    ntNotation_Node:
+      with (importedNode as TdomEntity) do begin
+        result:= createNotation(nodeName,publicId,systemId);
+      end;
+    ntProcessing_Instruction_Node:
+        Result:= createProcessingInstruction((importedNode as TdomProcessingInstruction).target,
+                                             (importedNode as TdomProcessingInstruction).data);
+    ntText_Node:
+      Result:= createTextNode((importedNode as TdomText).Data);
+  else
+    raise ENot_Supported_Err.create('Not supported error.');
+  end;
+end;
+
+procedure TdomDocument.doAttrModified(originalTarget: TdomNode;
+                                      attrChange: TdomAttrChange;
+                                      prevValue,
+                                      newValue: UnicodeString;
+                                      relatedAttr: TdomAttr);
+begin
+  FModified:= true;
+  try
+    inherited;
+  finally
+    if assigned(FParentNode)
+      then domImplementation.doAttrModified(self,originalTarget,attrChange,prevValue,newValue,relatedAttr);
+  end;
+end;
+
+procedure TdomDocument.doCharacterDataModified(originalTarget: TdomNode;
+                                               prevValue,
+                                               newValue: UnicodeString);
+begin
+  FModified:= true;
+  try
+    inherited;
+  finally
+    if assigned(FParentNode)
+      then domImplementation.doCharacterDataModified(self,originalTarget,prevValue,newValue);
+  end;
+end;
+
+procedure TdomDocument.doNodeInserted(originalTarget: TdomNode);
+begin
+  FModified:= true;
+  try
+    inherited;
+  finally
+    if assigned(FParentNode)
+      then domImplementation.doNodeInserted(self,originalTarget);
+  end;
+end;
+
+procedure TdomDocument.doNodeRemoved(originalTarget: TdomNode);
+begin
+  FModified:= true;
+  try
+    inherited;
+  finally
+    if assigned(FParentNode)
+      then domImplementation.doNodeRemoved(self,originalTarget);
+  end;
+end;
+
+function TdomDocument.getBaseUri: UnicodeString;
+begin
+  result:= FBaseUri;
+end;
+
+procedure TdomDocument.InitDoc(const tagName: UnicodeString);
+begin
+  if not IsXmlName(tagName)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  if assigned (DocumentElement)
+    then raise EHierarchy_Request_Err.create('Hierarchy request error.');
+  appendChild(CreateElement(tagName));
+end;
+
+procedure TdomDocument.InitDocNS(const anamespaceURI,
+                                       aqualifiedName: UnicodeString);
+var
+  prfx, alocalName: UnicodeString;
+begin
+  if not IsXmlName(aqualifiedName)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  if not xmlExtractPrefixAndLocalName(aqualifiedName,prfx,alocalName) then begin
+    if not IsXmlName(aqualifiedName)
+      then raise EInvalid_Character_Err.create('Invalid character error.')
+      else raise ENamespace_Err.create('Namespace error.');
+  end;
+  if ( ((prfx = 'xmlns') or (aqualifiedName = 'xmlns'))
+    and not (anamespaceURI ='http://www.w3.org/2000/xmlns/') )
+      then raise ENamespace_Err.create('Namespace error.');
+  if (anamespaceURI = '') and (prfx <> '')
+    then raise ENamespace_Err.create('Namespace error.');
+  if (prfx = 'xml') and (anamespaceURI <> 'http://www.w3.org/XML/1998/namespace')
+    then raise ENamespace_Err.create('Namespace error.');
+  if assigned (DocumentElement)
+    then raise EHierarchy_Request_Err.create('Hierarchy request error.');
+  appendChild(CreateElementNS(anamespaceURI,aqualifiedName));
+end;
+
+function  TdomDocument.removeContentModel: TdomCMObject;
+begin
+  if assigned(FCMInternal)
+    then FCMInternal.FAssociatedDocument:= nil;
+  result:= FCMInternal;
+  FCMInternal:= nil;
+end;
+
+procedure TdomDocument.setBaseUri(const value: UnicodeString);
+var
+  uri: Ansistring;
+begin
+  try
+    uri:= UTF16To7BitASCIIStr(value);
+  except
+    raise ESyntax_Err.create('Syntax error.');
+  end;
+  if not isUriAbsoluteURIStr(uri)
+    then raise ESyntax_Err.create('Syntax error.');
+  FBaseUri:= value;
+end;
+
+function TdomDocument.setContentModel(const arg: TdomCMObject): TdomCMObject;
+begin
+  result:= removeContentModel;
+  if assigned(arg)
+    then if assigned(arg.associatedDocument)
+      then raise EInuse_Content_Model_Err.create('Inuse content model error.');
+  FCMInternal:= arg;
+  arg.FAssociatedDocument:= self;
+end;
+
+function TdomDocument.GetDoctype: TdomDocumentType;
+var
+  Child: TdomNode;
+begin
+  Result:= nil;
+  Child:= getFirstChild;
+  while assigned(Child) do begin
+    if Child.NodeType = ntDocument_Type_Node then begin
+      Result:= (Child as TdomDocumentType);
+      break;
+    end;
+    Child:= Child.NextSibling;
+  end;
+end;
+
+function TdomDocument.GetDocumentElement: TdomElement;
+var
+  Child: TdomNode;
+begin
+  Result:= nil;
+  Child:= getFirstChild;
+  while assigned(Child) do begin
+    if Child.NodeType = ntElement_Node then begin
+      Result:= (Child as TdomElement);
+      break;
+    end;
+    Child:= Child.NextSibling;
+  end;
+end;
+
+function TdomDocument.CreateElement(const tagName: UnicodeString): TdomElement;
+begin
+  Result:= TdomElement.create(self,tagName);
+  FCreatedNodes.add(Result);
+end;
+
+function TdomDocument.CreateElementNS(const anamespaceURI,
+                                            aqualifiedName: UnicodeString): TdomElement;
+begin
+  Result:= TdomElement.createNS(self,anamespaceURI,aqualifiedName);
+  FCreatedNodes.add(Result);
+  Result.attributes.namespaceAware:= true;
+end;
+
+function TdomDocument.CreateDocumentFragment: TdomDocumentFragment;
+begin
+  Result:= TdomDocumentFragment.create(self);
+  FCreatedNodes.add(Result);
+end;
+
+function TdomDocument.CreateTextNode(const Data: UnicodeString): TdomText;
+begin
+  Result:= TdomText.create(self);
+  Result.Data:= Data;
+  FCreatedNodes.add(Result);
+end;
+
+function TdomDocument.CreateComment(const Data: UnicodeString): TdomComment;
+begin
+  Result:= TdomComment.create(self);
+  Result.Data:= Data;
+  FCreatedNodes.add(Result);
+end;
+
+function TdomDocument.CreateCDATASection(const Data: UnicodeString): TdomCDATASection;
+begin
+  Result:= TdomCDATASection.create(self);
+  Result.Data:= Data;
+  FCreatedNodes.add(Result);
+end;
+
+function TdomDocument.CreateProcessingInstruction(const targ,
+                                                        Data : UnicodeString): TdomProcessingInstruction;
+begin
+  Result:= TdomProcessingInstruction.create(self,targ);
+  Result.Data:= Data;
+  FCreatedNodes.add(Result);
+end;
+
+function TdomDocument.CreateAttribute(const name: UnicodeString): TdomAttr;
+begin
+  Result:= TdomAttr.create(self,name,true);
+  FCreatedNodes.add(Result);
+end;
+
+function TdomDocument.CreateAttributeNS(const anamespaceURI,
+                                              aqualifiedName: UnicodeString): TdomAttr;
+begin
+  Result:= TdomAttr.createNS(self,anamespaceURI,aqualifiedName,true);
+  FCreatedNodes.add(Result);
+end;
+
+function TdomDocument.CreateEntityReference(const name: UnicodeString): TdomEntityReference;
+begin
+  Result:= TdomEntityReference.create(self,name);
+  FCreatedNodes.add(Result);
+end;
+
+function TdomDocument.createExpression(const expression: UnicodeString;
+                                       const resolver: TdomXPathNSResolver): TdomXPathExpression;
+begin
+  result:= TdomXPathExpression.create(self,expression,resolver);
+  FCreatedExpressions.add(result);
+end;
+
+function TdomDocument.CreateDocumentType(const aname,
+                                               pubId,
+                                               sysId,
+                                               IntSubset: UnicodeString): TdomDocumentType;
+begin
+  Result:= TdomDocumentType.create(self,aname,pubId,sysId,IntSubset);
+  FCreatedNodes.add(Result);
+end;
+
+procedure TdomDocument.freeAllNodes(var node: TdomNode);
+var
+  index: integer;
+  oldChild: TdomNode;
+  oldAttr: TdomAttr;
+begin
+  if not assigned(node) then exit;
+  if node.OwnerDocument <> Self
+    then raise EWrong_Document_Err.create('Wrong document error.');
+  if node = Self
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  if assigned(node.ParentNode)
+    then raise EInuse_Node_Err.create('Inuse node error.');
+  if node.NodeType = ntAttribute_Node then
+    if assigned((node as TdomAttr).OwnerElement)
+      then raise EInuse_Attribute_Err.create('Inuse attribute error.');
+      // xxx notations ?
+  while node.HasChildNodes do begin
+    node.FirstChild.setIsReadonly(false);
+    oldChild:= node.RemoveChild(node.FirstChild);
+    node.OwnerDocument.FreeAllNodes(oldChild);
+  end;
+  case node.NodeType of
+    ntElement_Node:
+    while node.Attributes.Length > 0 do begin
+      oldAttr:= (node.Attributes.item(0) as TdomAttr);
+      oldAttr.setIsReadonly(false);
+      (node as TdomElement).RemoveAttributeNode(oldAttr);
+      node.OwnerDocument.FreeAllNodes(TdomNode(oldAttr));
+    end;
+  end; {case ...}
+  index:= FCreatedNodes.IndexOf(node);
+  node.free;
+  FCreatedNodes.Delete(index);
+  node:= nil;
+end;
+
+procedure TdomDocument.freeExpression(var expression: TdomXPathExpression);
+var
+  index: integer;
+begin
+  if not assigned(expression) then exit;
+  index:= FCreatedExpressions.IndexOf(expression);
+  if index = -1
+    then raise EWrong_Document_Err.create('Wrong document error.');
+  FCreatedExpressions.delete(index);
+  expression.free;
+  expression:= nil;
+end;
+
+procedure TdomDocument.freeNSResolver(var resolver: TdomXPathNSResolver);
+var
+  index: integer;
+begin
+  if not assigned(resolver) then exit;
+  index:= FCreatedNSResolvers.IndexOf(resolver);
+  if index = -1
+    then raise EWrong_Document_Err.create('Wrong document error.');
+  FCreatedNSResolvers.Delete(index);
+  resolver.free;
+  resolver:= nil;
+end;
+
+procedure TdomDocument.freeTreeWalker(var TreeWalker: TdomTreeWalker);
+var
+  TreeWalkerIndex: integer;
+begin
+  if not assigned(TreeWalker) then exit;
+  TreeWalkerIndex:= FCreatedTreeWalkers.IndexOf(TreeWalker);
+  if TreeWalkerIndex = -1
+    then raise EWrong_Document_Err.create('Wrong document error.');
+  FCreatedTreeWalkers.Delete(TreeWalkerIndex);
+  TreeWalker.free;
+  TreeWalker:= nil;
+end;
+
+function TdomDocument.GetElementById(const elementId: UnicodeString): TdomElement;
+begin
+  result:= nil;
+end;
+
+function TdomDocument.GetElementsByTagName(const tagName: UnicodeString): TdomNodeList;
+var
+  i: integer;
+begin
+  for i:= 0 to FCreatedElementsNodeLists.Count - 1 do
+    if TdomElementsNodeList(FCreatedElementsNodeLists[i]).FQueryName = tagName
+      then begin Result:= TdomElementsNodeList(FCreatedElementsNodeLists[i]); exit; end;
+  Result:= TdomElementsNodeList.create(tagName,self);
+  FCreatedElementsNodeLists.add(Result);
+end;
+
+function TdomDocument.GetElementsByTagNameNS(const anamespaceURI,
+                                                   alocalName: UnicodeString): TdomNodeList;
+var
+  i: integer;
+  nl: TdomElementsNodeListNS;
+begin
+  for i:= 0 to FCreatedElementsNodeListNSs.Count - 1 do begin
+    nl:= TdomElementsNodeListNS(FCreatedElementsNodeListNSs[i]);
+    if (nl.FQueryNamespaceURI = anamespaceURI) and (nl.FQueryLocalName = alocalName)
+      then begin Result:= nl; exit; end;
+  end;
+  Result:= TdomElementsNodeListNS.create(anamespaceURI,alocalName,self);
+  FCreatedElementsNodeListNSs.add(Result);
+end;
+
+function TdomDocument.insertBefore(const newChild,
+                                         refChild: TdomNode): TdomNode;
+begin
+  if not assigned(newChild)
+    then raise ENot_Supported_Err.create('Not supported error.');
+  case newChild.NodeType of
+    ntElement_Node: begin
+      if assigned(DocType) then begin
+        if DocType.NodeName <> newChild.NodeName
+          then raise EInvalid_Character_Err.create('Invalid character error.');
+        if ChildNodes.IndexOf(DocType) >= ChildNodes.IndexOf(refChild)
+          then raise EHierarchy_Request_Err.create('Hierarchy request error.');
+      end;
+      if assigned(DocumentElement)
+        then raise EHierarchy_Request_Err.create('Hierarchy request error.');
+      Result:= inherited insertBefore(newChild,refChild);
+      end;
+    ntDocument_Type_Node: begin
+      if assigned(DocumentElement) then begin
+        if DocumentElement.NodeName <> newChild.NodeName
+          then raise EInvalid_Character_Err.create('Invalid character error.');
+        if ChildNodes.IndexOf(DocumentElement) < ChildNodes.IndexOf(refChild)
+          then raise EHierarchy_Request_Err.create('Hierarchy request error.');
+      end;
+      if assigned(DocType)
+        then raise EHierarchy_Request_Err.create('Hierarchy request error.');
+      Result:= inherited insertBefore(newChild,refChild);
+      end;
+    ntProcessing_Instruction_Node,ntComment_Node,ntDocument_Fragment_Node:
+      Result:= inherited insertBefore(newChild,refChild);
+  else
+    raise EHierarchy_Request_Err.create('Hierarchy request error.');
+  end;
+end;
+
+function TdomDocument.replaceChild(const newChild,
+                                         oldChild: TdomNode): TdomNode;
+begin
+  if not ( assigned(newChild) and assigned(oldChild) )
+    then raise ENot_Supported_Err.create('Not supported error.');
+  case newChild.NodeType of
+    ntElement_Node: begin
+      if assigned(DocumentElement) and (DocumentElement <> oldChild)
+        then raise EHierarchy_Request_Err.create('Hierarchy request error.');
+      if assigned(DocType) then
+        if DocType.NodeName <> newChild.NodeName
+          then raise EInvalid_Character_Err.create('Invalid character error.');
+      Result:= inherited replaceChild(newChild,oldChild);
+      end;
+    ntDocument_Type_Node: begin
+      if assigned(DocType) and (DocType <> oldChild)
+        then raise EHierarchy_Request_Err.create('Hierarchy request error.');
+      if assigned(DocumentElement)
+        then if DocumentElement.NodeName <> newChild.NodeName
+          then raise EInvalid_Character_Err.create('Invalid character error.');
+      Result:= inherited replaceChild(newChild,oldChild);
+      end;
+    ntProcessing_Instruction_Node,ntComment_Node,
+    ntDocument_Fragment_Node:
+      Result:= inherited replaceChild(newChild,oldChild);
+  else
+    raise EHierarchy_Request_Err.create('Hierarchy request error.');
+  end;
+end;
+
+function TdomDocument.appendChild(const newChild: TdomNode): TdomNode;
+begin
+  if not assigned(newChild)
+    then raise ENot_Supported_Err.create('Not supported error.');
+  case newChild.NodeType of
+    ntElement_Node: begin
+      if assigned(DocumentElement)
+        then raise EHierarchy_Request_Err.create('Hierarchy request error.');
+      Result:= inherited appendChild(newChild);
+      end;
+    ntDocument_Type_Node: begin
+      if assigned(Doctype) or assigned(DocumentElement)
+        then raise EHierarchy_Request_Err.create('Hierarchy request error.');
+      Result:= inherited appendChild(newChild);
+      end;
+    ntProcessing_Instruction_Node,ntComment_Node,
+    ntDocument_Fragment_Node:
+      Result:= inherited appendChild(newChild);
+  else
+    raise EHierarchy_Request_Err.create('Hierarchy request error.');
+  end;
+end;
+
+function TdomDocument.CreateNodeIterator(const root: TdomNode;
+                                               whatToShow: TdomWhatToShow;
+                                               nodeFilter: TdomNodeFilter;
+                                               entityReferenceExpansion: boolean): TdomNodeIterator;
+begin
+  Result:= TdomNodeIterator.create(root,whatToShow,nodeFilter,entityReferenceExpansion);
+  FCreatedNodeIterators.add(Result);
+end;
+
+function TdomDocument.CreateTreeWalker(const root: TdomNode;
+                                             whatToShow: TdomWhatToShow;
+                                             nodeFilter: TdomNodeFilter;
+                                             entityReferenceExpansion: boolean): TdomTreeWalker;
+begin;
+  Result:= TdomTreeWalker.create(root,whatToShow,nodeFilter,entityReferenceExpansion);
+  FCreatedTreeWalkers.add(Result);
+end;
+
+function TdomDocument.CreateNSResolver(const nodeResolver: TdomNode): TdomXPathNSResolver;
+begin;
+  Result:= TdomXPathNSResolver.create(nodeResolver);
+  FCreatedNSResolvers.add(Result);
+end;
+
+function TdomDocument.validate(const opt: TdomEntityResolveOption): boolean;
+var
+  i: integer;
+  ok: boolean;
+begin
+  result:= true;
+
+  if not assigned(documentElement)
+    then raise EValidation_Err.create('Validation Error: Root not found.');
+
+  if assigned(docType) then begin
+    if assigned(contentModel)
+      then if not contentModel.validate
+        then result:= false;
+  end;
+
+  ok:= resolveEntityReferences(opt);
+  if not ok then begin
+    result:= false;
+    sendErrorNotification(ET_UNRESOLVABLE_ENTITY_REFERENCE,self);
+  end;
+
+  // VC: Root Element Type (XML 1.0, § 2.8)
+  if assigned(docType) then begin
+    if docType.name <> documentElement.NodeName then begin
+      result:= false;
+      sendErrorNotification(ET_WRONG_ROOT_ELEMENT_TYPE,self);
+    end;
+  end;
+
+  IDs.clear;
+  for i:= 0 to pred(childnodes.length) do begin
+    if not childnodes.item(i).validate2
+      then result:= false;
+  end;
+  if not result then IDs.clear
+  else begin
+    // VC: IDREF (XML 1.0, § 3.3.1)
+    // Second parse only for IDREF and IDREFS:
+    if not validateIDREFs
+      then result:= false;
+  end;
+end;
+
+function TdomDocument.validateIDREFS: boolean;
+begin
+  result:= documentElement.validateIDREFS;
+end;
+
+
+
+//+++++++++++++++++++++++++ TdomASObjectList +++++++++++++++++++++++++++++
+constructor TdomASObjectList.create;
+begin
+  inherited create;
+  FNodeList:= TList.create;
+end;
+
+destructor TdomASObjectList.destroy;
+begin
+  FNodeList.free;
+  inherited;
+end;
+
+procedure TdomASObjectList.clear;
+begin
+  FNodeList.clear;
+end;
+
+function TdomASObjectList.appendASNode(const newNode: TdomASObject): TdomASObject;
+begin
+  FNodeList.Add(newNode);
+  result:= newNode;
+end;
+
+procedure TdomASObjectList.Delete(const index: integer);
+begin
+  FNodeList.Delete(index);
+end;
+
+function TdomASObjectList.indexOf(const node: TdomASObject): integer;
+begin
+  result:= FNodeList.indexOf(node);
+end;
+
+function TdomASObjectList.getLength: integer;
+begin
+  Result:= FNodeList.count;
+end;
+
+function TdomASObjectList.insertBefore(const newNode,
+                                           refNode: TdomASObject): TdomASObject;
+begin
+  Result:= newNode;
+  with FNodeList do
+    if assigned(refNode)
+      then insert(indexOf(refNode),newNode)
+      else add(newNode);
+end;
+
+function TdomASObjectList.removeASNode(const oldNode: TdomASObject): TdomASObject;
+begin
+  Result:= oldNode;
+  FNodeList.Remove(oldNode);
+end;
+
+function TdomASObjectList.item(const index: integer): TdomASObject;
+begin
+  if (index < 0) or (index + 1 > FNodeList.count)
+    then Result:= nil
+    else Result:= TdomASObject(FNodeList.Items[index]);
+end;
+
+
+
+//+++++++++++++++++++++++++ TdomASNamedObjectMap +++++++++++++++++++++++++
+constructor TdomASNamedObjectMap.create(const aOwner: TdomASModel;
+                                      const namespaceAware: boolean);
+begin
+  inherited create;
+  FOwnerAsModel:= aOwner;
+  FNamespaceAware:= namespaceAware;
+  FNodeList:= TList.create;
+  FNamespaceAware:= false;
+end;
+
+destructor TdomASNamedObjectMap.destroy;
+begin
+  FNodeList.free;
+  inherited;
+end;
+
+function TdomASNamedObjectMap.getLength: integer;
+begin
+  Result:= FNodeList.count;
+end;
+
+function TdomASNamedObjectMap.GetNamedItem(const name: UnicodeString): TdomASObject;
+var
+  i: integer;
+begin
+  if FNamespaceAware then raise ENamespace_Err.create('Namespace error.');
+  result:= nil;
+  for i:= 0 to pred(FNodeList.count) do
+    if (TdomASObject(FNodeList[i]).ASObjectName = name) then begin
+      Result:= TdomASObject(FNodeList[i]);
+      break;
+    end;
+end;
+
+function TdomASNamedObjectMap.GetNamedItemNS(const namespaceURI,
+                                                     localName: UnicodeString): TdomASObject;
+var
+  i: integer;
+begin
+  if not FNamespaceAware then raise ENamespace_Err.create('Namespace error.');
+  result:= nil;
+  for i:= 0 to pred(FNodeList.count) do
+    if (TdomASObject(FNodeList[i]).namespaceURI = namespaceURI)
+      and (TdomASObject(FNodeList[i]).localName = localName) then begin
+      Result:= TdomASObject(FNodeList[i]);
+      break;
+    end;
+end;
+
+function TdomASNamedObjectMap.item(const index: integer): TdomASObject;
+begin
+  if (index < 0) or (index + 1 > FNodeList.count)
+    then Result:= nil
+    else Result:= TdomASObject(FNodeList.Items[index]);
+end;
+
+function TdomASNamedObjectMap.RemoveNamedItem(const name: UnicodeString): TdomASObject;
+begin
+  if FNamespaceAware then raise ENamespace_Err.create('Namespace error.');
+  Result:= getNamedItem(name);
+  if not assigned(Result)
+    then raise ENot_Found_Err.create('Not found error.');
+  FNodeList.Remove(Result);
+  Result.FInuse:= false;
+end;
+
+function TdomASNamedObjectMap.RemoveNamedItemNS(const namespaceURI,
+                                                 localName: UnicodeString): TdomASObject;
+begin
+  if not FNamespaceAware then raise ENamespace_Err.create('Namespace error.');
+  Result:= getNamedItemNS(namespaceURI,localName);
+  if not assigned(Result)
+    then raise ENot_Found_Err.create('Node not found error.');
+  FNodeList.Remove(Result);
+  Result.FInuse:= false;
+end;
+
+function TdomASNamedObjectMap.SetNamedItem(const arg: TdomASObject): TdomASObject;
+begin
+  if FNamespaceAware then raise ENamespace_Err.create('Namespace error.');
+  if FOwnerAsModel <> arg.OwnerASModel
+    then raise EWrong_ASModel_Err.create('Wrong abstract schema model error.');
+  if arg.FInuse
+    then raise EInuse_Node_Err.create('Inuse node error.');
+  if assigned(GetNamedItem(arg.ASObjectName))
+    then Result:= RemoveNamedItem(arg.ASObjectName)
+    else Result:= nil;
+  FNodeList.Add(arg);
+  Result.FInuse:= true;
+end;
+
+function TdomASNamedObjectMap.SetNamedItemNS(const arg: TdomASObject): TdomASObject;
+begin
+  if not FNamespaceAware then raise ENamespace_Err.create('Namespace error.');
+  if FOwnerAsModel <> arg.OwnerASModel
+    then raise EWrong_ASModel_Err.create('Wrong abstract schema model error.');
+  if arg.FInuse
+    then raise EInuse_Node_Err.create('Inuse node error.');
+  if assigned(GetNamedItemNS(arg.namespaceURI,arg.localName))
+    then Result:= RemoveNamedItemNS(arg.namespaceURI,arg.localName)
+    else Result:= nil;
+  FNodeList.Add(arg);
+  Result.FInuse:= true;
+end;
+
+
+
+//+++++++++++++++++++++++++++ TdomASObject +++++++++++++++++++++++++++++++
+constructor TdomASObject.create(const aOwner: TdomASModel);
+begin
+  inherited create;
+  FOwnerAsModel:= aOwner;
+  FInuse:= false;
+end;
+
+procedure TdomASObject.setPrefix(const value: UnicodeString);
+begin
+  if not IsXmlName(value)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  if not IsXmlPrefix(value)
+    then raise ENamespace_Err.create('Namespace error.');
+  if namespaceURI = ''
+    then raise ENamespace_Err.create('Namespace error.');
+  if (value = 'xml') and (namespaceURI <> 'http://www.w3.org/XML/1998/namespace')
+    then raise ENamespace_Err.create('Namespace error.');
+  if FASObjectType = AS_ATTRIBUTE_DECLARATION then begin
+    if (value = 'xmlns')
+      and not (namespaceURI ='http://www.w3.org/2000/xmlns/')
+        then raise ENamespace_Err.create('Namespace error.');
+    if FASObjectName = 'xmlns'
+      then raise ENamespace_Err.create('Namespace error.');
+  end;
+  FPrefix:= value;
+  FASObjectName:= concat(value,':',localName);
+end;
+
+
+
+//+++++++++++++++++++++++++++ TdomASContentModel +++++++++++++++++++++++++++
+constructor TdomASContentModel.create(const aOwner: TdomASModel);
+begin
+  inherited create(aOwner);
+  FASObjectType:= AS_CONTENTMODEL;
+  FSubModels:= TdomASObjectList.create;
+  FListOperator:= AS_CHOICE;
+  FMaxOccurs:= AS_UNBOUND;
+  FMinOccurs:= 0;
+end;
+
+destructor TdomASContentModel.destroy;
+begin
+  FSubModels.free;
+  inherited;
+end;
+
+function TdomASContentModel.appendASNode(const newNode: TdomASObject): TdomASObject;
+begin
+  with newNode do begin
+    if FASObjectType = AS_CONTENTMODEL then begin
+      if FInuse then raise EInuse_Node_Err.create('Inuse node error.');
+      FInuse:= true;
+    end;
+  end;
+  result:= FSubModels.appendASNode(newNode);
+end;
+
+function TdomASContentModel.insertBefore(const newNode,
+                                           refNode: TdomASObject): TdomASObject;
+begin
+  with newNode do begin
+    if FASObjectType = AS_CONTENTMODEL then begin
+      if FInuse then raise EInuse_Node_Err.create('Inuse node error.');
+      FInuse:= true;
+    end;
+  end;
+  result:= FSubModels.insertBefore(newNode,refNode);
+end;
+
+function TdomASContentModel.removeASNode(const oldNode: TdomASObject): TdomASObject;
+begin
+  if FSubModels.indexof(oldNode) = -1
+    then raise ENot_Found_Err.create('Node not found error.');
+  with oldNode do
+    if FASObjectType = AS_CONTENTMODEL then FInuse:= false;
+  result:= FSubModels.removeASNode(oldNode);
+end;
+
+
+
+//++++++++++++++++++++++ TdomASAttributeDeclaration ++++++++++++++++++++++
+constructor TdomASAttributeDeclaration.create(const aOwner: TdomASModel;
+                                              const name: UnicodeString);
+begin
+  if not IsXmlName(name)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  inherited create(aOwner);
+  FASObjectName:= name;
+  FASObjectType:= AS_ATTRIBUTE_DECLARATION;
+  FAttrType:= AS_STRING_DATATYPE;
+  FAttrValue:= '';
+  FConstraintType:= AS_NO_VALUE_CONSTRAINT;
+  FEnumAttr:= TdomWideStringList.create;
+end;
+
+constructor TdomASAttributeDeclaration.createNS(const aOwner: TdomASModel;
+                                                const anamespaceURI,
+                                                       qualifiedName: UnicodeString);
+var
+  locName,prfx: UnicodeString;
+begin
+  if not xmlExtractPrefixAndLocalName(qualifiedName,prfx,locName) then begin
+    if not IsXmlName(qualifiedName)
+      then raise EInvalid_Character_Err.create('Invalid character error.')
+      else raise ENamespace_Err.create('Namespace error.');
+  end;
+  if ( ((prfx = 'xmlns') or (qualifiedName = 'xmlns'))
+    and not (anamespaceURI ='http://www.w3.org/2000/xmlns/') )
+      then raise ENamespace_Err.create('Namespace error.');
+  if (anamespaceURI = '') and (prfx <> '')
+    then raise ENamespace_Err.create('Namespace error.');
+  if (prfx = 'xml') and (anamespaceURI <> 'http://www.w3.org/XML/1998/namespace')
+    then raise ENamespace_Err.create('Namespace error.');
+  create(aOwner,qualifiedName);
+  FNamespaceURI:= anamespaceURI;
+  FPrefix:= prfx;
+  FLocalName:= locName;
+end;
+
+destructor TdomASAttributeDeclaration.destroy;
+begin
+  FEnumAttr.free;
+  inherited;
+end;
+
+function TdomASAttributeDeclaration.getIsNamespaceAware: boolean;
+begin
+  result:= FOwnerAsModel.isNamespaceAware;
+end;
+
+
+
+
+//++++++++++++++++++++++++ TdomASEntityDeclaration +++++++++++++++++++++++
+constructor TdomASEntityDeclaration.create(const aOwner: TdomASModel;
+                                           const name: UnicodeString);
+begin
+  if not IsXmlName(name)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  inherited create(aOwner);
+  FASObjectType:= AS_ENTITY_DECLARATION;
+  FEntityType:= AS_INTERNAL_ENTITY;
+  FEntityValue:= '';
+  FNotationName:= '';
+  FPublicId:= '';
+  FSystemId:= '';
+end;
+
+
+
+//+++++++++++++++++++++++ TdomASNotationDeclaration ++++++++++++++++++++++
+constructor TdomASNotationDeclaration.create(const aOwner: TdomASModel;
+                                             const name,
+                                                   pubId,
+                                                   sysId: UnicodeString);
+begin
+  if not IsXmlName(name)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  inherited create(aOwner);
+  FASObjectType:= AS_NOTATION_DECLARATION;
+  FNotationName:= name;
+  FPublicId:= pubId;
+  FSystemId:= sysId;
+end;
+
+constructor TdomASNotationDeclaration.createNS(const aOwner: TdomASModel;
+                                               const anamespaceURI,
+                                                     qualifiedName,
+                                                     pubId,
+                                                     sysId: UnicodeString);
+var
+  locName,prfx: UnicodeString;
+begin
+  if not xmlExtractPrefixAndLocalName(qualifiedName,prfx,locName) then begin
+    if not IsXmlName(qualifiedName)
+      then raise EInvalid_Character_Err.create('Invalid character error.')
+      else raise ENamespace_Err.create('Namespace error.');
+  end;
+  if (anamespaceURI = '') and (prfx <> '')
+    then raise ENamespace_Err.create('Namespace error.');
+  if (prfx = 'xml') and (anamespaceURI <> 'http://www.w3.org/XML/1998/namespace')
+    then raise ENamespace_Err.create('Namespace error.');
+  create(aOwner,qualifiedName,pubId,sysId);
+  FNamespaceURI:= anamespaceURI;
+  FPrefix:= prfx;
+  FLocalName:= locName;
+end;
+
+
+
+//+++++++++++++++++++++++ TdomASElementDeclaration +++++++++++++++++++++++
+constructor TdomASElementDeclaration.create(const aOwner: TdomASModel;
+                                            const name: UnicodeString);
+begin
+  if not IsXmlName(name)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  inherited create(aOwner);
+  FASObjectType:= AS_ELEMENT_DECLARATION;
+  FASObjectName:= name;
+  FAttributeDeclarations:= TdomASNamedObjectMap.create(aOwner,aOwner.FNamespaceAware);
+  FContentModel:= aOwner.createASContentModel;
+  FContentModel.FInuse:= true;
+  FContentType:= AS_MIXED;
+  FElementType:= AS_STRING_DATATYPE;
+  FIsPCDataOnly:= false;
+  FStrictMixedContent:= false;
+end;
+
+constructor TdomASElementDeclaration.createNS(const aOwner: TdomASModel;
+                                              const anamespaceURI,
+                                                    qualifiedName: UnicodeString);
+var
+  locName,prfx: UnicodeString;
+begin
+  if not xmlExtractPrefixAndLocalName(qualifiedName,prfx,locName) then begin
+    if not IsXmlName(qualifiedName)
+      then raise EInvalid_Character_Err.create('Invalid character error.')
+      else raise ENamespace_Err.create('Namespace error.');
+  end;
+  if (anamespaceURI = '') and (prfx <> '')
+    then raise ENamespace_Err.create('Namespace error.');
+  if (prfx = 'xml') and (anamespaceURI <> 'http://www.w3.org/XML/1998/namespace')
+    then raise ENamespace_Err.create('Namespace error.');
+  create(aOwner,qualifiedName);
+  FNamespaceURI:= anamespaceURI;
+  FPrefix:= prfx;
+  FLocalName:= locName;
+end;
+
+destructor TdomASElementDeclaration.destroy;
+begin
+  FAttributeDeclarations.free;
+  inherited;
+end;
+
+function TdomASElementDeclaration.getIsNamespaceAware: boolean;
+begin
+  result:= FOwnerAsModel.isNamespaceAware;
+end;
+
+function TdomASElementDeclaration.addASAttributeDecl(const arg: TdomASAttributeDeclaration): boolean;
+begin
+  if arg.ownerASModel <> ownerASModel
+    then raise EWrong_ASModel_Err.create('Wrong abstract schema model error.');
+  if arg.FInuse then raise EInuse_Node_Err.create('Inuse node error.');
+  if isNamespaceAware then begin
+    if assigned(FAttributeDeclarations.getNamedItemNS(arg.namespaceURI,arg.localName)) then begin
+      result:= false;
+    end else begin
+      FAttributeDeclarations.setNamedItemNS(arg);
+      arg.FInuse:= true;
+      result:= true;
+    end;
+  end else begin
+    if assigned(FAttributeDeclarations.getNamedItem(arg.ASObjectName)) then begin
+      result:= false;
+    end else begin
+      FAttributeDeclarations.setNamedItem(arg);
+      arg.FInuse:= true;
+      result:= true;
+    end;
+  end;
+end;
+
+function TdomASElementDeclaration.removeASAttributeDeclaration(const arg: TdomASAttributeDeclaration): TdomASAttributeDeclaration;
+begin
+  if arg.ownerASModel <> ownerASModel
+    then raise EWrong_ASModel_Err.create('Wrong abstract schema model error.');
+  if isNamespaceAware then begin
+    if arg = FAttributeDeclarations.getNamedItemNS(arg.namespaceURI,arg.localName) then begin
+      result:= (FAttributeDeclarations.removeNamedItemNS(arg.namespaceURI,arg.localName) as TdomASAttributeDeclaration);
+      result.FInuse:= false;
+    end else result:= nil;
+  end else begin
+    if arg = FAttributeDeclarations.getNamedItem(arg.ASObjectName) then begin
+      result:= (FAttributeDeclarations.removeNamedItem(arg.ASObjectName) as TdomASAttributeDeclaration);
+      result.FInuse:= false;
+    end else result:= nil;
+  end;
+end;
+
+
+
+//+++++++++++++++++++++++++++++ TdomASModel +++++++++++++++++++++++++++++
+constructor TdomASModel.create(const aOwner: TDomImplementation;
+                               const namespaceAware: boolean);
+begin
+  inherited create(nil);
+  FDomImpl:= aOwner;
+  FNamespaceAware:= namespaceAware;
+  FASObjectType:= AS_MODEL;
+  FAttributeDeclarations:= TdomASNamedObjectMap.create(self,namespaceAware);
+  FContentModelDeclarations:= TdomASNamedObjectMap.create(self,namespaceAware);
+  FElementDeclarations:= TdomASNamedObjectMap.create(self,namespaceAware);
+  FEntityDeclarations:= TdomASNamedObjectMap.create(self,false);
+  FNotationDeclarations:= TdomASNamedObjectMap.create(self,false);
+  FCreatedASNodes:= TdomASObjectList.create;
+end;
+
+destructor TdomASModel.destroy;
+begin
+  clear;
+  FAttributeDeclarations.free;
+  FContentModelDeclarations.free;
+  FElementDeclarations.free;
+  FEntityDeclarations.free;
+  FNotationDeclarations.free;
+  FCreatedASNodes.free;
+  inherited;
+end;
+
+function TdomASModel.getContainer: boolean;
+begin
+  result:= (usage in [AS_EXTERNAL_SUBSET,AS_NOT_USED]);
+  // xxx and the container is simply a container of other TdomASModels.
+end;
+
+function TdomASModel.addNamedASElementDeclaration(const arg: TdomASElementDeclaration): boolean;
+begin
+  if arg.OwnerASModel <> self
+    then raise EWrong_ASModel_Err.create('Wrong abstract schema model error.');
+  if isNamespaceAware then begin
+    if assigned(FElementDeclarations.getNamedItemNS(arg.namespaceURI,arg.localName)) then begin
+      result:= false;
+    end else begin
+      FElementDeclarations.setNamedItemNS(arg);
+      result:= true;
+    end;
+  end else begin
+    if assigned(FElementDeclarations.getNamedItem(arg.ASObjectName)) then begin
+      result:= false;
+    end else begin
+      FElementDeclarations.setNamedItem(arg);
+      result:= true;
+    end;
+  end;
+end;
+
+function TdomASModel.addNamedASEntityDeclaration(const arg: TdomASEntityDeclaration): boolean;
+begin
+  if arg.OwnerASModel <> self
+    then raise EWrong_ASModel_Err.create('Wrong abstract schema model error.');
+  if assigned(FEntityDeclarations.getNamedItem(arg.ASObjectName)) then begin
+    result:= false;
+  end else begin
+    FEntityDeclarations.setNamedItem(arg);
+    result:= true;
+  end;
+end;
+
+function TdomASModel.addNamedASNotationDeclaration(const arg: TdomASNotationDeclaration): boolean;
+begin
+  if arg.OwnerASModel <> self
+    then raise EWrong_ASModel_Err.create('Wrong abstract schema model error.');
+  if isNamespaceAware then begin
+    if assigned(FNotationDeclarations.getNamedItemNS(arg.namespaceURI,arg.localName)) then begin
+      result:= false;
+    end else begin
+      FNotationDeclarations.setNamedItemNS(arg);
+      result:= true;
+    end;
+  end else begin
+    if assigned(FNotationDeclarations.getNamedItem(arg.ASObjectName)) then begin
+      result:= false;
+    end else begin
+      FNotationDeclarations.setNamedItem(arg);
+      result:= true;
+    end;
+  end;
+end;
+
+procedure TdomASModel.clear;
+var
+  i: integer;
+begin
+  for i := 0 to pred(FCreatedASNodes.length) do
+    TdomASObject(FCreatedASNodes.item(i)).free;
+  FCreatedASNodes.clear;
+end;
+
+function TdomASModel.createASAttributeDeclaration(const anamespaceURI,
+                                                        qualifiedName: UnicodeString): TdomASAttributeDeclaration;
+begin
+  if isNamespaceAware
+    then result:= TdomASAttributeDeclaration.createNS(self,anamespaceURI,qualifiedName)
+    else result:= TdomASAttributeDeclaration.create(self,qualifiedName);
+  FCreatedASNodes.appendASNode(result);
+end;
+
+function TdomASModel.createASContentModel: TdomASContentModel;
+begin
+  result:= TdomASContentModel.create(self);
+  FCreatedASNodes.appendASNode(result);
+end;
+
+function TdomASModel.createASElementDeclaration(const anamespaceURI,
+                                                      qualifiedName: UnicodeString): TdomASElementDeclaration;
+begin
+  if isNamespaceAware
+    then result:= TdomASElementDeclaration.createNS(self,anamespaceURI,qualifiedName)
+    else result:= TdomASElementDeclaration.create(self,qualifiedName);
+  FCreatedASNodes.appendASNode(result);
+end;
+
+function TdomASModel.createASEntityDeclaration(const name: UnicodeString): TdomASEntityDeclaration;
+begin
+  result:= TdomASEntityDeclaration.create(self,name);
+  FCreatedASNodes.appendASNode(result);
+end;
+
+function TdomASModel.createASNotationDeclaration(const name,
+                                                       pubId,
+                                                       sysId: UnicodeString): TdomASNotationDeclaration;
+begin
+  result:= TdomASNotationDeclaration.create(self,name,pubId,sysId);
+  FCreatedASNodes.appendASNode(result);
+end;
+
+procedure TdomASModel.freeAllASObjects(var obj: TdomASObject);
+var
+  index: integer;
+  oldASAttrDecl,oldASChildren: TdomASObject;
+  subModelASObject: TdomASObject;
+begin
+  if not assigned(obj) then exit;
+  if obj.OwnerASModel <> self
+    then raise EWrong_ASModel_Err.create('Wrong abstract schema model error.');
+  if obj.FInuse
+    then raise EInuse_Node_Err.create('Inuse obj error.');
+
+  case obj.ASObjectType of
+    AS_ELEMENT_DECLARATION: begin
+      with (obj as TdomASElementDeclaration) do begin
+        with attributeDecls do begin
+          for index:= 0 to pred(length) do begin
+            oldASAttrDecl:= item(index);
+            oldASAttrDecl.FInuse:= false;
+            FreeAllASObjects(oldASAttrDecl);
+          end; {for ...}
+        end; {with ...}
+        oldASChildren:= contentModel;
+        oldASChildren.FInuse:= false;
+        FreeAllASObjects(oldASChildren);
+      end; {with ...}
+    end;
+    AS_CONTENTMODEL: begin
+      with (obj as TdomASContentModel).SubModels do begin
+        for index:= 0 to pred(length) do begin
+          subModelASObject:= item(index);
+          if subModelASObject.ASObjectType = AS_CONTENTMODEL then begin
+            subModelASObject.FInuse:= false;
+            FreeAllASObjects(subModelASObject);
+          end;
+        end; {for ...}
+      end {with ...}
+    end;
+  end; {case ...}
+
+  index:= FCreatedASNodes.IndexOf(obj);
+  obj.free;
+  FCreatedASNodes.Delete(index);
+  obj:= nil;
+end;
+
+function TdomASModel.getNamedASElementDeclaration(const anamespaceURI,
+                                                        name: UnicodeString): TdomASElementDeclaration;
+begin
+  if isNamespaceAware
+    then result:= (FElementDeclarations.getNamedItemNS(anamespaceURI,name) as TdomASElementDeclaration)
+    else result:= (FElementDeclarations.getNamedItem(name) as TdomASElementDeclaration);
+end;
+
+function TdomASModel.getNamedASEntityDeclaration(const name: UnicodeString): TdomASEntityDeclaration;
+begin
+  result:= (FEntityDeclarations.getNamedItem(name) as TdomASEntityDeclaration);
+end;
+
+function TdomASModel.getNamedASNotationDeclaration(const anamespaceURI,
+                                                         name: UnicodeString): TdomASNotationDeclaration;
+begin
+  if isNamespaceAware
+    then result:= (FNotationDeclarations.getNamedItemNS(anamespaceURI,name) as TdomASNotationDeclaration)
+    else result:= (FNotationDeclarations.getNamedItem(name) as TdomASNotationDeclaration);
+end;
+
+function TdomASModel.removeNamedASElementDeclaration(const anamespaceURI,
+                                                           name: UnicodeString): TdomASElementDeclaration;
+begin
+  if isNamespaceAware
+    then result:= (FElementDeclarations.removeNamedItemNS(anamespaceURI,name) as TdomASElementDeclaration)
+    else result:= (FElementDeclarations.removeNamedItem(name) as TdomASElementDeclaration);
+end;
+
+function TdomASModel.removeNamedASEntityDeclaration(const name: UnicodeString): TdomASEntityDeclaration;
+begin
+  result:= (FEntityDeclarations.removeNamedItem(name) as TdomASEntityDeclaration);
+end;
+
+function TdomASModel.removeNamedASNotationDeclaration(const anamespaceURI,
+                                                            name: UnicodeString): TdomASNotationDeclaration;
+begin
+  if isNamespaceAware
+    then result:= (FNotationDeclarations.removeNamedItemNS(anamespaceURI,name) as TdomASNotationDeclaration)
+    else result:= (FNotationDeclarations.removeNamedItem(name) as TdomASNotationDeclaration);
+end;
+
+
+
+//+++++++++++++++++++++++++ TdomCMNodeList +++++++++++++++++++++++++++++
+constructor TdomCMNodeList.create(const CMNodeList: TList);
+begin
+  inherited create;
+  FCMNodeList:= CMNodeList;
+end;
+
+function TdomCMNodeList.GetLength: integer;
+begin
+  Result:= FCMNodeList.count;
+end;
+
+function TdomCMNodeList.IndexOf(const node: TdomCMNode): integer;
+begin
+  Result:= FCMNodeList.IndexOf(node);
+end;
+
+function TdomCMNodeList.Item(const index: integer): TdomCMNode;
+begin
+  if (index < 0) or (index + 1 > FCMNodeList.count)
+    then Result:= nil
+    else Result:= TdomCMNode(FCMNodeList.Items[index]);
+end;
+
+
+//+++++++++++++++++++++++ TdomNamedCMNodeMap +++++++++++++++++++++++++++
+constructor TdomNamedCMNodeMap.create(const aOwner,
+                                            aOwnerNode: TdomCMNode;
+                                      const nodeList: TList;
+                                      const allowedNTs: TDomCMNodeTypeSet);
+begin
+  inherited create(nodeList);
+  FOwner:= aOwner;
+  FOwnerNode:= aOwnerNode;
+  FAllowedNodeTypes:= allowedNTs;
+  FIsReadonly:= false;
+end;
+
+function TdomNamedCMNodeMap.getOwnerNode: TdomCMNode;
+begin
+  Result:= FOwnerNode;
+end;
+
+function TdomNamedCMNodeMap.RemoveItem(const arg: TdomCMNode): TdomCMNode;
+begin
+  if isReadonly
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  if FCMNodeList.IndexOf(arg) = -1
+    then raise ENot_Found_Err.create('Node not found error.');
+  Result:= arg;
+  FCMNodeList.Remove(arg);
+  Result.FParentNode:= nil;
+end;
+
+procedure TdomNamedCMNodeMap.setIsReadonly(const value: boolean);
+begin
+  FIsReadonly:= value;
+end;
+
+function TdomNamedCMNodeMap.GetNamedIndex(const name: UnicodeString): integer;
+var
+  i: integer;
+begin
+  result:= -1;
+  for i:= 0 to FCMNodeList.count-1 do
+    if (TdomCMNode(FCMNodeList[i]).NodeName = name)
+      and (TdomCMNode(FCMNodeList[i]).NodeType in FAllowedNodeTypes) then begin
+      Result:= i;
+      break;
+    end;
+end;
+
+function TdomNamedCMNodeMap.GetNamedItem(const name: UnicodeString): TdomCMNode;
+var
+  i: integer;
+begin
+  result:= nil;
+  for i:= 0 to FCMNodeList.count-1 do
+    if (TdomCMNode(FCMNodeList[i]).NodeName = name)
+      and (TdomCMNode(FCMNodeList[i]).NodeType in FAllowedNodeTypes) then begin
+      Result:= TdomCMNode(FCMNodeList[i]);
+      break;
+    end;
+end;
+
+function TdomNamedCMNodeMap.SetNamedItem(const arg: TdomCMNode): TdomCMNode;
+begin
+  if isReadonly
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  if FOwner.OwnerCMObject <> arg.OwnerCMObject
+    then raise EWrong_Document_Err.create('Wrong document error.');
+  if not (arg.NodeType in FAllowedNodeTypes)
+    then raise EHierarchy_Request_Err.create('Hierarchy request error.');
+  if assigned(arg.parentNode)
+    then raise EInuse_Node_Err.create('Inuse node error.');
+  if assigned(GetNamedItem(arg.NodeName))
+    then Result:= RemoveNamedItem(arg.NodeName)
+    else Result:= nil;
+  FCMNodeList.Add(arg);
+  arg.FParentNode:= nil;
+end;
+
+function TdomNamedCMNodeMap.RemoveNamedItem(const name: UnicodeString): TdomCMNode;
+begin
+  if isReadonly
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  Result:= getNamedItem(name);
+  if not assigned(Result)
+    then raise ENot_Found_Err.create('Node not found error.');
+  FCMNodeList.Remove(Result);
+end;
+
+
+
+// ++++++++++++++++++++++ TdomNamedCMAttributeMap ++++++++++++++++++++++
+constructor TdomNamedCMAttributeMap.create(const aOwner: TdomCMObject);
+begin
+  inherited create;
+  FOwner:= aOwner;
+  FCMAttributesList:= TList.create;
+end;
+
+destructor TdomNamedCMAttributeMap.destroy;
+begin
+  FCMAttributesList.free;
+  inherited destroy;
+end;
+
+function TdomNamedCMAttributeMap.GetLength: integer;
+begin
+  result:= FCMAttributesList.count;
+end;
+
+function TdomNamedCMAttributeMap.item(const index: integer): TdomCMAttribute;
+begin
+  if (index < 0) or (index + 1 > FCMAttributesList.count)
+    then Result:= nil
+    else Result:= TdomCMAttribute(FCMAttributesList.Items[index]);
+end;
+
+function TdomNamedCMAttributeMap.GetNamedItem(const elementName,
+                                                    attributeName: UnicodeString): TdomCMAttribute;
+var
+  i: integer;
+  cmAttr: TdomCMAttribute;
+begin
+  result:= nil;
+  for i:= 0 to FCMAttributesList.count-1 do begin
+    cmAttr:= TdomCMAttribute(FCMAttributesList[i]);
+    if (cmAttr.elementName = elementName) and (cmAttr.attributeName = attributeName)
+      then begin Result:= cmAttr; break; end;
+  end;
+end;
+
+function TdomNamedCMAttributeMap.appendNamedItem(const arg: TdomCMAttribute): boolean;
+begin
+  if FOwner.OwnerCMObject <> arg.OwnerCMObject
+    then raise EWrong_Document_Err.create('Wrong document error.');
+  if assigned(arg.parentNode)
+    then raise EInuse_Node_Err.create('Inuse node error.');
+  if assigned(GetNamedItem(arg.elementName,arg.attributeName)) then begin
+    result:= false;
+  end else begin
+    result:= true;
+    FCMAttributesList.Add(arg);
+    arg.FParentNode:= FOwner;
+    arg.FCMObject:= FOwner;
+  end; {if ...}
+end;
+
+function TdomNamedCMAttributeMap.removeLastItem: TdomCMAttribute;
+begin
+  with FCMAttributesList do begin
+    result:= TdomCMAttribute(Last);
+    if not assigned(result)
+      then raise ENot_Found_Err.create('Node not found error.');
+    remove(Last);
+  end;
+  Result.FCMObject:= nil;
+  Result.FParentNode:= nil;
+end;
+
+
+
+// +++++++++++++++++++++++ TdomNamedCMEntityMap +++++++++++++++++++++++
+constructor TdomNamedCMEntityMap.create(const aOwner: TdomCMObject);
+begin
+  inherited create;
+  FOwner:= aOwner;
+  FCMEntitiesList:= TList.create;
+end;
+
+destructor TdomNamedCMEntityMap.destroy;
+begin
+  FCMEntitiesList.free;
+  inherited destroy;
+end;
+
+function TdomNamedCMEntityMap.GetLength: integer;
+begin
+  result:= FCMEntitiesList.count;
+end;
+
+function TdomNamedCMEntityMap.item(const index: integer): TdomCMEntity;
+begin
+  if (index < 0) or (index + 1 > FCMEntitiesList.count)
+    then Result:= nil
+    else Result:= TdomCMEntity(FCMEntitiesList.Items[index]);
+end;
+
+function TdomNamedCMEntityMap.GetNamedItem(const name: UnicodeString): TdomCMEntity;
+var
+  i: integer;
+begin
+  result:= nil;
+  for i:= 0 to FCMEntitiesList.count-1 do
+    if (TdomCMEntity(FCMEntitiesList[i]).NodeName = name) then begin
+      Result:= TdomCMEntity(FCMEntitiesList[i]);
+      break;
+    end;
+end;
+
+function TdomNamedCMEntityMap.appendNamedItem(const arg: TdomCMEntity): boolean;
+begin
+  if FOwner.OwnerCMObject <> arg.OwnerCMObject
+    then raise EWrong_Document_Err.create('Wrong document error.');
+  if assigned(arg.parentNode)
+    then raise EInuse_Node_Err.create('Inuse node error.');
+  if assigned(GetNamedItem(arg.NodeName)) then begin
+    result:= false;
+  end else begin
+    // Append 'arg':
+    result:= true;
+    FCMEntitiesList.Add(arg);
+    arg.FParentNode:= FOwner;
+  end; {if ...}
+end;
+
+function TdomNamedCMEntityMap.removeLastItem: TdomCMEntity;
+begin
+  with FCMEntitiesList do begin
+    result:= TdomCMEntity(Last);
+    if not assigned(result)
+      then raise ENot_Found_Err.create('Node not found error.');
+    remove(Last);
+  end;
+  Result.FParentNode:= nil;
+end;
+
+
+
+//+++++++++++++++++++++++++++ TdomCMNode +++++++++++++++++++++++++++++++
+constructor TdomCMNode.create(const aOwner: TdomCustomCMObject);
+begin
+  inherited create;
+  FCMObject:= aOwner;
+  FParentNode:= nil;
+  FCMNodeListing:= TList.create;
+  FCMNodeList:= TdomCMNodeList.create(FCMNodeListing);
+  FNodeName:= '';
+  FNodeValue:= '';
+  FNodeType:= ctUnknown;
+  FAllowedChildTypes:= [];
+  FIsReadonly:= false;
+end;
+
+destructor TdomCMNode.destroy;
+begin
+  FCMNodeListing.free;
+  FCMNodeList.free;
+  inherited destroy;
+end;
+
+procedure TdomCMNode.clear;
+var
+  oldCMChild: TdomCMNode;
+begin
+  if isReadonly
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  while hasChildNodes do begin
+    firstChild.setIsReadonly(false);
+    oldCMChild:= removeChild(firstChild);
+    OwnerCMObject.FreeAllCMNodes(oldCMChild);
+  end;
+end;
+
+procedure TdomCMNode.makeChildrenReadonly;
+var
+  i: integer;
+begin
+  with childnodes do
+    for i:= 0 to pred(length) do
+      with item(i) do begin
+        item(i).setIsReadonly(true);
+        item(i).makeChildrenReadonly;
+      end;
+end;
+
+function TdomCMNode.GetNodeName: UnicodeString;
+begin
+  Result:= FNodeName;
+end;
+
+function TdomCMNode.GetNodeValue: UnicodeString;
+begin
+  Result:= FNodeValue;
+end;
+
+procedure TdomCMNode.SetNodeValue(const value: UnicodeString);
+begin
+  if isReadonly = true
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  FNodeValue:= value;
+end;
+
+function TdomCMNode.GetCMNodeType: TdomCMNodeType;
+begin
+  Result:= FNodeType;
+end;
+
+function TdomCMNode.GetParentNode: TdomCMNode;
+begin
+  Result:= FParentNode;
+end;
+
+function TdomCMNode.GetCMObject: TdomCustomCMObject;
+begin
+  Result:= FCMObject;
+end;
+
+function TdomCMNode.validate: boolean;
+begin
+  Result := False;
+  raise ENot_Supported_Err.create('Not supported error.');
+end;
+
+function TdomCMNode.sendErrorNotification(const xmlErrorType: TXmlErrorType;
+                                          const relCMNode: TdomCMNode): boolean;
+// Used to centralize code for sending error notifications to the DomImplementation.
+// Usually used during validation.
+var
+  domImpl: TDomImplementation;
+  error: TdomError;
+begin
+  if assigned(ownerCMObject)
+    then domImpl:= ownerCMObject.domImplementation
+    else domImpl:= nil;
+
+  error:= TdomError.create(xmlErrorType,-1,-1,-1,-1,-1,'',relCMNode,nil,'');
+  try
+    if assigned(domImpl) then begin
+      result:= domImpl.handleError(domImpl,error);
+    end else if error.severity = DOM_SEVERITY_FATAL_ERROR
+      then result:= false
+      else result:= true;
+  finally
+    error.free;
+  end;
+end;
+
+function TdomCMNode.getChildNodes: TdomCMNodeList;
+begin
+  Result:= FCMNodeList;
+end;
+
+function TdomCMNode.getFirstChild: TdomCMNode;
+begin
+  if FCMNodeListing.count = 0
+    then Result:= nil
+    else Result:= TdomCMNode(FCMNodeListing.First);
+end;
+
+function TdomCMNode.getLastChild: TdomCMNode;
+begin
+  if FCMNodeListing.count = 0
+    then Result:= nil
+    else Result:= TdomCMNode(FCMNodeListing.Last);
+end;
+
+function TdomCMNode.getNextSibling: TdomCMNode;
+begin
+  if assigned(ParentNode)
+    then Result:= ParentNode.ChildNodes.Item(ParentNode.ChildNodes.IndexOf(Self)+1)
+    else Result:= nil;
+end;
+
+function TdomCMNode.getPreviousSibling: TdomCMNode;
+begin
+  if assigned(ParentNode)
+    then Result:= ParentNode.ChildNodes.Item(ParentNode.ChildNodes.IndexOf(Self)-1)
+    else Result:= nil;
+end;
+
+procedure TdomCMNode.setIsReadonly(const value: boolean);
+begin
+  FIsReadonly:= value;
+end;
+
+function TdomCMNode.insertBefore(const newChild,
+                                       refChild: TdomCMNode): TdomCMNode;
+begin
+  if not assigned(newChild)
+    then raise ENot_Supported_Err.create('Not supported error.');
+  if not (newChild.NodeType in FAllowedChildTypes)
+    then raise EHierarchy_Request_Err.create('Hierarchy request error.');
+  if OwnerCMObject <> newChild.OwnerCMObject
+    then raise EWrong_Document_Err.create('Wrong document error.');
+  if isAncestor(newChild) or (newChild = self) or (newChild = refChild ) // Test for circularity
+    then raise EHierarchy_Request_Err.create('Hierarchy request error.');
+  if isReadonly
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  if assigned(newChild.ParentNode)
+    then if newChild.ParentNode.isReadonly
+      then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  if assigned(refChild) then
+    if FCMNodeListing.IndexOf(refChild) = -1
+      then raise ENot_Found_Err.create('Node not found error.');
+  Result:= newChild;
+  if NewChild is TdomCMFragment
+    then while NewChild.HasChildNodes do
+      insertBefore(newChild.ChildNodes.Item(0),refChild)
+    else begin
+      if assigned(newChild.parentNode) then newChild.parentNode.RemoveChild(newChild);
+      if assigned(refChild)
+        then FCMNodeListing.Insert(FCMNodeListing.IndexOf(refChild),newChild)
+        else FCMNodeListing.Add(newChild);
+      NewChild.FParentNode:= self;
+    end;
+end;
+
+function TdomCMNode.replaceChild(const newChild,
+                                       oldChild: TdomCMNode): TdomCMNode;
+var
+  refChild: TdomCMNode;
+begin
+  if not ( assigned(newChild) and assigned(oldChild) )
+    then raise ENot_Supported_Err.create('Not supported error.');
+  if not (newChild.NodeType in FAllowedChildTypes)
+    then raise EHierarchy_Request_Err.create('Hierarchy request error.');
+  if OwnerCMObject <> newChild.OwnerCMObject
+    then raise EWrong_Document_Err.create('Wrong document error.');
+  if IsAncestor(newChild) or (newChild = self) // Test for circularity
+    then raise EHierarchy_Request_Err.create('Hierarchy request error.');
+  if isReadonly
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  if assigned(newChild.ParentNode)
+    then if newChild.ParentNode.isReadonly
+      then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  if FCMNodeListing.IndexOf(oldChild) = -1
+    then raise ENot_Found_Err.create('Node not found error.');
+  Result:= oldChild;
+  if newChild = oldChild then exit;
+  if assigned(newChild.parentNode) then newChild.parentNode.RemoveChild(newChild);
+  refChild:= oldChild.NextSibling;
+  RemoveChild(oldChild);
+  if assigned(refChild)
+    then insertBefore(newChild,refChild)
+    else appendChild(newChild);
+end;
+
+function TdomCMNode.removeChild(const oldChild: TdomCMNode): TdomcmNode;
+begin
+  if not assigned(oldChild)
+    then raise ENot_Supported_Err.create('Not supported error.');
+  if isReadonly
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  if FCMNodeListing.IndexOf(oldChild) = -1
+    then raise ENot_Found_Err.create('Node not found error.');
+  Result:= oldChild;
+  FCMNodeListing.Remove(oldChild);
+  OldChild.FParentNode:= nil;
+end;
+
+function TdomCMNode.appendChild(const newChild: TdomCMNode): TdomCMNode;
+begin
+  if not assigned(newChild)
+    then raise ENot_Supported_Err.create('Not supported error.');
+  if not (newChild.NodeType in FAllowedChildTypes)
+    then raise EHierarchy_Request_Err.create('Hierarchy request error.');
+  if OwnerCMObject <> newChild.OwnerCMObject
+    then raise EWrong_Document_Err.create('Wrong document error.');
+  // Test for circularity:
+  if IsAncestor(newChild) or (newChild = self)
+    then raise EHierarchy_Request_Err.create('Hierarchy request error.');
+  if isReadonly
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  if assigned(newChild.ParentNode)
+    then if newChild.ParentNode.isReadonly
+      then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  Result:= newChild;
+  if NewChild is TdomCMFragment then
+    while NewChild.HasChildNodes do
+      appendChild(newChild.ChildNodes.Item(0))
+  else begin
+    if assigned(newChild.parentNode) then newChild.parentNode.RemoveChild(newChild);
+    FCMNodeListing.Add(newChild);
+    NewChild.FParentNode:= self;
+  end;
+end;
+
+function TdomCMNode.HasChildNodes: boolean;
+begin
+  if FCMNodeListing.count = 0
+    then result:= false
+    else result:= true;
+end;
+
+function TdomCMNode.CloneNode(const deep: boolean): TdomCmNode;
+var
+  newChildNode: TdomCMNode;
+  i: integer;
+begin
+  Result:= OwnerCMObject.DuplicateCMNode(self);
+  if deep then for i:= 0 to ChildNodes.Length-1 do
+  begin
+    newChildNode:= ChildNodes.Item(i).CloneNode(true);
+    Result.appendChild(newChildNode);
+  end;
+end;
+
+function TdomCMNode.IsAncestor(const AncestorNode: TdomCMNode): boolean;
+var
+  NewAncestor: TdomCMNode;
+  List1: TList;
+begin
+  Result:= false;
+  NewAncestor:= ParentNode;
+  List1:= TList.create;
+  List1.clear;
+  try
+    while assigned(NewAncestor) do begin
+      {Ciculation test:}
+      if List1.IndexOf(NewAncestor) > -1
+        then raise EHierarchy_Request_Err.create('Hierarchy request error.');
+      List1.Add(NewAncestor);
+      if NewAncestor = AncestorNode then begin Result:= true; break; end;
+      NewAncestor:= NewAncestor.ParentNode;
+    end;
+  finally
+    List1.free;
+  end;
+end;
+
+
+
+// +++++++++++++++++++++++++++ TdomCMComment +++++++++++++++++++++++++++
+constructor TdomCMComment.create(const aOwner: TdomCustomCMObject);
+begin
+  inherited create(aOwner);
+  FNodeName:= '#comment';
+  FNodeValue:= '';
+  FNodeType:= ctComment;
+  FAllowedChildTypes:= [];
+end;
+
+function TdomCMComment.GetData: UnicodeString;
+begin
+  Result:= NodeValue;
+end;
+
+procedure TdomCMComment.SetData(const value: UnicodeString);
+begin
+  if isReadonly
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  NodeValue:= value;
+end;
+
+function TdomCMComment.GetLength: integer;
+begin
+  Result:= System.Length(Data);
+end;
+
+function TdomCMComment.SubstringData(const offset,
+                                           count: integer):UnicodeString;
+var
+  len: integer;
+begin
+  if(offset < 0) or (offset > Length) or (count < 0)
+    then raise EIndex_Size_Err.create('Index size error.');
+  // Make sure, that the length of the UnicodeString is not
+  // exeeded, when using count and offset:
+  len:= Length-Offset;
+  if count < len then len:= count;
+  setString(Result,PWideChar(Data)+Offset,len);
+end;
+
+procedure TdomCMComment.AppendData(const arg: UnicodeString);
+begin
+  Data:= concat(Data,arg);
+end;
+
+procedure TdomCMComment.InsertData(const offset: integer;
+                                   const arg: UnicodeString);
+begin
+  ReplaceData(offset,0,arg);
+end;
+
+procedure TdomCMComment.DeleteData(const offset,
+                                         count: integer);
+begin
+  ReplaceData(offset,count,'');
+end;
+
+procedure TdomCMComment.replaceData(const offset,
+                                          count: integer;
+                                    const arg: UnicodeString);
+var
+  len: integer;
+  Data1,Data2:UnicodeString;
+begin
+  if(offset < 0) or (offset > Length) or (count < 0)
+    then raise EIndex_Size_Err.create('Index size error.');
+  // Make sure, that the length of the UnicodeString is not
+  // exeeded, when using count and offset:
+  len:= Length-Offset;
+  if count < len then len:= count;
+  Data1:= SubstringData(0,offset);
+  Data2:= SubstringData(offset+len,Length-offset-len);
+  Data:= concat(Data1,arg,Data2);
+end;
+
+function TdomCMComment.validate: boolean;
+begin
+  result:= true;
+end;
+
+
+//++++++++++++++++++ TdomCMProcessingInstruction +++++++++++++++++++++++
+constructor TdomCMProcessingInstruction.create(const aOwner: TdomCustomCMObject;
+                                               const targ: UnicodeString);
+begin
+  if not IsXmlPITarget(targ)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  inherited create(aOwner);
+  FNodeName:= targ;
+  FNodeValue:= '';
+  FNodeType:= ctProcessingInstruction;
+  FAllowedChildTypes:= [];
+end;
+
+function TdomCMProcessingInstruction.GetTarget: UnicodeString;
+begin
+  Result:= FNodeName;
+end;
+
+function TdomCMProcessingInstruction.GetData: UnicodeString;
+begin
+  Result:= FNodeValue;
+end;
+
+procedure TdomCMProcessingInstruction.SetData(const value: UnicodeString);
+begin
+  if isReadonly
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  FNodeValue:= value;
+end;
+
+function TdomCMProcessingInstruction.validate: boolean;
+begin
+  result:= true;
+end;
+
+
+
+// +++++++++++++++++++++++++ TdomCustomCMObject ++++++++++++++++++++++++
+constructor TdomCustomCMObject.create(const aOwner: TdomImplementation;
+                                      const sysId: UnicodeString);
+begin
+  inherited create(self);
+  FDomImpl:= aOwner;
+  FNodeValue:= '';
+  FCreatedNodes:= TList.create;
+  FSystemId:= sysId;
+  FAllowedChildTypes:= [];
+end;
+
+destructor TdomCustomCMObject.destroy;
+var
+  i: integer;
+begin
+  for i := 0 to pred(FCreatedNodes.Count) do
+    TdomCMNode(FCreatedNodes[i]).free;
+  FCreatedNodes.free;
+  inherited destroy;
+end;
+
+procedure TdomCustomCMObject.SetNodeValue(const value: UnicodeString);
+begin
+end;
+
+function TdomCustomCMObject.CreateCMAttributeDefinition(const name,
+                                                              attType,
+                                                              defaultDecl,
+                                                              attValue: UnicodeString) : TdomCMAttrDefinition;
+begin
+  Result:= TdomCMAttrDefinition.create(self,name,attType,defaultDecl,attValue);
+  FCreatedNodes.add(Result);
+end;
+
+function TdomCustomCMObject.CreateCMAttributeList(const name: UnicodeString): TdomCMAttrList;
+begin
+  Result:= TdomCMAttrList.create(self,name);
+  FCreatedNodes.add(Result);
+end;
+
+function TdomCustomCMObject.CreateCMChoiceParticle(const freq: UnicodeString): TdomCMChoiceParticle;
+begin
+  Result:= TdomCMChoiceParticle.create(self,freq);
+  FCreatedNodes.add(Result);
+end;
+
+function TdomCustomCMObject.CreateCMComment(const Data: UnicodeString): TdomCMComment;
+begin
+  Result:= TdomCMComment.create(self);
+  Result.Data:= Data;
+  FCreatedNodes.add(Result);
+end;
+
+function TdomCustomCMObject.CreateCMElementParticle(const name,
+                                                          freq: UnicodeString): TdomCMElementParticle;
+begin
+  Result:= TdomCMElementParticle.create(self,name,freq);
+  FCreatedNodes.add(Result);
+end;
+
+function TdomCustomCMObject.CreateCMElementTypeDeclaration(const name: UnicodeString;
+                                                           const contspecType: TdomContentspecType): TdomCMElementTypeDeclaration;
+begin
+  Result:= TdomCMElementTypeDeclaration.create(self,name,contspecType);
+  FCreatedNodes.add(Result);
+end;
+
+function TdomCustomCMObject.createCMExtEntityDeclaration(const name,
+                                                               pubId,
+                                                               sysId: UnicodeString): TdomCMEntityDeclaration;
+begin
+  Result:= TdomCMEntityDeclaration.createExtParsed(self,name,pubId,sysId);
+  FCreatedNodes.add(Result);
+end;
+
+function TdomCustomCMObject.createCMExtParameterEntityDeclaration(const name,
+                                                                        pubId,
+                                                                        sysId: UnicodeString): TdomCMParameterEntityDeclaration;
+begin
+  Result:= TdomCMParameterEntityDeclaration.createExtParsed(self,name,pubId,sysId);
+  FCreatedNodes.add(Result);
+end;
+
+function TdomCustomCMObject.createCMExtUnparsedEntityDeclaration(const name,
+                                                                       pubId,
+                                                                       sysId,
+                                                                       notaName: UnicodeString): TdomCMEntityDeclaration;
+begin
+  Result:= TdomCMEntityDeclaration.createExtUnparsed(self,name,pubId,sysId,notaName);
+  FCreatedNodes.add(Result);
+end;
+
+function TdomCustomCMObject.CreateCMFragment: TdomCMFragment;
+begin
+  Result:= TdomCMFragment.create(self);
+  FCreatedNodes.add(Result);
+end;
+
+function TdomCustomCMObject.createCMIntEntityDeclaration(const name,
+                                                               entityValue: UnicodeString): TdomCMEntityDeclaration;
+begin
+  Result:= TdomCMEntityDeclaration.create(self,name,entityValue);
+  FCreatedNodes.add(Result);
+end;
+
+function TdomCustomCMObject.createCMIntParameterEntityDeclaration(const name,
+                                                                        entityValue: UnicodeString): TdomCMParameterEntityDeclaration;
+begin
+  Result:= TdomCMParameterEntityDeclaration.create(self,name,entityValue);
+  FCreatedNodes.add(Result);
+end;
+
+function TdomCustomCMObject.CreateCMNameParticle(const name: UnicodeString): TdomCMNameParticle;
+begin
+  Result:= TdomCMNameParticle.create(self,name);
+  FCreatedNodes.add(Result);
+end;
+
+function TdomCustomCMObject.CreateCMNmtokenParticle(const name: UnicodeString): TdomCMNmtokenParticle;
+begin
+  Result:= TdomCMNmtokenParticle.create(self,name);
+  FCreatedNodes.add(Result);
+end;
+
+function TdomCustomCMObject.CreateCMNotationDeclaration(const name,
+                                                              pubId,
+                                                              sysId: UnicodeString): TdomCMNotationDeclaration;
+begin
+  Result:= TdomCMNotationDeclaration.create(self,name,pubId,sysId);
+  FCreatedNodes.add(Result);
+end;
+
+function TdomCustomCMObject.CreateCMParameterEntityReference(const name: UnicodeString): TdomCMParameterEntityReference;
+begin
+  Result:= TdomCMParameterEntityReference.create(self,name);
+  FCreatedNodes.add(Result);
+end;
+
+function TdomCustomCMObject.CreateCMPcdataChoiceParticle: TdomCMPcdataChoiceParticle;
+begin
+  Result:= TdomCMPcdataChoiceParticle.create(self,'*');
+  FCreatedNodes.add(Result);
+end;
+
+function TdomCustomCMObject.CreateCMProcessingInstruction(const targ,
+                                                                Data : UnicodeString): TdomCMProcessingInstruction;
+begin
+  Result:= TdomCMProcessingInstruction.create(self,targ);
+  Result.Data:= Data;
+  FCreatedNodes.add(Result);
+end;
+
+function TdomCustomCMObject.CreateCMSequenceParticle(const freq: UnicodeString): TdomCMSequenceParticle;
+begin
+  Result:= TdomCMSequenceParticle.create(self,freq);
+  FCreatedNodes.add(Result);
+end;
+
+function TdomCustomCMObject.DuplicateCMNode(const node: TdomCMNode): TdomCMNode;
+// Creates a new CMNode of the same type and properties than 'Node',
+// except that the new CMNode has no parent and no child nodes.
+var
+  i: integer;
+  newChild: TdomCMNode;
+begin
+  case node.NodeType of
+    ctUnknown:
+      raise ENot_Supported_Err.create('Not supported error.');
+    ctParameterEntityReference:
+      begin
+        Result:= CreateCMParameterEntityReference((node as TdomCMParameterEntityReference).NodeName);
+        Result.FNodeValue:= FNodeValue;
+      end;
+    ctEntityDeclaration:
+      if (node as TdomCMEntityDeclaration).isParsedEntity then begin
+        if (node as TdomCMEntityDeclaration).entityType = etExternal_Entity then begin
+          Result:= CreateCMExtEntityDeclaration((node as TdomCMEntityDeclaration).NodeName,
+                                                (node as TdomCMEntityDeclaration).publicId,
+                                                (node as TdomCMEntityDeclaration).systemId);
+        end else begin
+          Result:= CreateCMIntEntityDeclaration((node as TdomCMEntityDeclaration).NodeName,
+                                                (node as TdomCMEntityDeclaration).NodeValue);
+        end;
+      end else begin
+        Result:= createCMExtUnparsedEntityDeclaration((node as TdomCMEntityDeclaration).NodeName,
+                                                      (node as TdomCMEntityDeclaration).publicId,
+                                                      (node as TdomCMEntityDeclaration).systemId,
+                                                      (node as TdomCMEntityDeclaration).notationName);
+      end;
+    ctParameterEntityDeclaration:
+      if (node as TdomCMParameterEntityDeclaration).entityType = etExternal_Entity then begin
+        Result:= CreateCMExtParameterEntityDeclaration((node as TdomCMParameterEntityDeclaration).NodeName,
+                                                       (node as TdomCMParameterEntityDeclaration).publicId,
+                                                       (node as TdomCMParameterEntityDeclaration).systemId);
+      end else begin
+        Result:= CreateCMIntParameterEntityDeclaration((node as TdomCMParameterEntityDeclaration).NodeName,
+                                                       (node as TdomCMParameterEntityDeclaration).NodeValue);
+      end;
+    ctProcessingInstruction:
+        Result:= CreateCMProcessingInstruction((node as TdomCMProcessingInstruction).Target,
+                                               (node as TdomCMProcessingInstruction).Data);
+    ctComment:
+      Result:= CreateCMComment((node as TdomCMComment).Data);
+    ctObject:
+      Result:= TdomCMObject.create((node as TdomCMObject).FDomImpl,
+                                   (node as TdomCMObject).systemId);
+    ctExternalObject:
+      Result:= TdomCMExternalObject.create((node as TdomCMExternalObject).FDomImpl,
+                                           (node as TdomCMExternalObject).FPublicId,
+                                           (node as TdomCMExternalObject).FSystemId);
+    ctInternalObject:
+      Result:= TdomCMInternalObject.create((node as TdomCMInternalObject).FDomImpl,
+                                           (node as TdomCMInternalObject).FPublicId,
+                                           (node as TdomCMInternalObject).FSystemId);
+    ctFragment:
+      Result:= CreateCMFragment;
+    ctNotationDeclaration:
+      Result:= CreateCMNotationDeclaration((node as TdomCMNotationDeclaration).NodeName,
+                                           (node as TdomCMNotationDeclaration).publicId,
+                                           (node as TdomCMNotationDeclaration).systemId);
+    ctElementTypeDeclaration:
+      Result:= CreateCMElementTypeDeclaration((node as TdomCMElementTypeDeclaration).NodeName,
+                                              (node as TdomCMElementTypeDeclaration).contentspecType);
+    ctSequenceParticle:
+      Result:= CreateCMSequenceParticle((node as TdomCMSequenceParticle).Frequency);
+    ctPcdataChoiceParticle:
+      Result:= CreateCMPcdataChoiceParticle;
+    ctChoiceParticle:
+      Result:= CreateCMChoiceParticle((node as TdomCMChoiceParticle).Frequency);
+    ctElementParticle:
+      Result:= CreateCMElementParticle((node as TdomCMElementParticle).NodeName,
+                                       (node as TdomCMElementParticle).Frequency);
+    ctAttributeList: begin
+      Result:= CreateCMAttributeList((node as TdomCMAttrList).NodeName);
+      {duplicate attribute definitions:}
+      for i:= 0 to pred(node.ChildNodes.Length) do begin
+        NewChild:= DuplicateCMNode(node.ChildNodes.Item(i));
+        Result.appendChild(NewChild);
+      end;
+      end;
+    ctAttributeDefinition: begin
+      Result:= CreateCMAttributeDefinition((node as TdomCMAttrDefinition).NodeName,
+                                           (node as TdomCMAttrDefinition).AttributeType,
+                                           (node as TdomCMAttrDefinition).DefaultDeclaration,
+                                           (node as TdomCMAttrDefinition).NodeValue);
+      {duplicate the children of the attribute definition node:}
+      for i:= 0 to node.ChildNodes.Length-1 do begin
+        newChild:= DuplicateCMNode(node.ChildNodes.Item(i));
+        Result.appendChild(newChild);
+      end;
+      end;
+    ctNameParticle:
+      Result:= CreateCMNameParticle((node as TdomCMNameParticle).NodeName);
+    ctNmtokenParticle:
+      Result:= CreateCMNmtokenParticle((node as TdomCMNmtokenParticle).NodeName);
+  else
+    raise ENot_Supported_Err.create('Not supported error.');
+  end;
+end;
+
+procedure TdomCustomCMObject.FreeAllCMNodes(var CMNode: TdomCMNode);
+var
+  index: integer;
+  oldChild: TdomCMNode;
+begin
+  if not assigned(CMNode) then exit;
+  if CMNode.OwnerCMObject <> Self
+    then raise EWrong_Document_Err.create('Wrong document error.');
+  if CMNode = Self
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  if assigned(CMNode.ParentNode)
+    then raise EInuse_Node_Err.create('Inuse node error.');
+  while CMnode.HasChildNodes do begin
+    CMnode.FirstChild.setIsReadonly(false);
+    oldChild:= CMnode.RemoveChild(CMnode.FirstChild);
+    CMnode.OwnerCMObject.FreeAllCMNodes(oldChild);
+  end;
+  index:= FCreatedNodes.IndexOf(CMNode);
+  CMNode.free;
+  FCreatedNodes.Delete(index);
+  CMNode:= nil;
+end;
+
+procedure TdomCustomCMObject.getValueOfPE(const name: UnicodeString;
+                                            var value: UnicodeString;
+                                            var error: TXmlErrorType);
+var
+  InputSrc: TXmlInputSource;
+  stream: TStream;
+  PId,SId: UnicodeString;
+  action: TXmlParserAction;
+  i: integer;
+begin
+  value:= '';
+  error:= ET_PARAMETER_ENTITY_DECL_NOT_FOUND;
+  for i:= 0 to pred(FCreatedNodes.Count) do begin
+    if TdomCMNode(FCreatedNodes[i]).nodeType = ctParameterEntityDeclaration then begin
+      with TdomCMParameterEntityDeclaration(FCreatedNodes[i]) do begin
+        if nodeName = name then begin
+          if entityType = etInternal_Entity then begin
+
+            value:= nodeValue;
+            error:= ET_NONE;
+            exit;
+
+          end else begin
+
+            // Resolve value of external parsed entity:
+            if not ( (publicId = '') and (systemId = '')) then begin
+              stream:= nil;
+              PId:= publicId;
+              SId:= systemId;
+              action:= paFail;
+              try
+                if assigned(domImplementation)
+                  then domImplementation.doExternalParsedEntity(self.systemId,PId,SId,stream,action);
+                if action = paFail then begin
+                  error:= ET_UNRESOLVABLE_PARAMETER_ENTITY_REFERENCE;
+                  exit;
+                end else begin
+
+                  // convert external entity value to UTF-16BE:
+                  if assigned(stream) then begin
+                    InputSrc:= TXmlInputSource.create(stream,PId,SId,1);
+                    try
+                      if InputSrc.hasMalformedDecl
+                       or not ( InputSrc.declType in [ DT_TEXT_DECLARATION,
+                                                       DT_XML_OR_TEXT_DECLARATION,
+                                                       DT_UNSPECIFIED] )
+                      then begin
+                        value:= '';
+                        error:= ET_INVALID_TEXT_DECL;
+                      end else begin
+                        value:= InputSrc.streamAsWideString;
+                        error:= ET_NONE;
+                      end; {if ... else ...}
+                      exit;
+                    finally
+                      InputSrc.free;
+                    end; {try}
+                  end;
+
+                  error:= ET_NONE;
+                  exit;
+
+                end; {if ... else ...}
+              finally
+                if assigned(stream) then stream.free;
+              end;
+            end;
+
+          end;
+        end;
+      end;
+    end;
+  end;
+end;
+
+function TdomCustomCMObject.hasPEDeclaration(const name: UnicodeString): boolean;
+var
+  i: integer;
+begin
+  result:= false;
+  for i:= 0 to pred(FCreatedNodes.Count) do
+    with TdomCMNode(FCreatedNodes[i]) do
+      if nodeType = ctParameterEntityDeclaration then
+        if nodeName = name then begin
+          result:= true;
+          exit;
+        end;
+end;
+
+
+
+// ++++++++++++++++++++++++++++ TdomCMObject +++++++++++++++++++++++++++
+constructor TdomCMObject.create(const aOwner: TdomImplementation;
+                                const sysId: UnicodeString);
+begin
+  inherited;
+  FNodeName:= '#cm-object';
+  FNodeType:= ctObject;
+  FAllowedChildTypes:= [];
+  FAssociatedDocument:= nil;
+  FCMExternal:= nil;
+  FCMInternal:= nil;
+  FNotationsListing:= TList.create;
+  FNotationsList:= TdomNamedCMNodeMap.create(self,self,FNotationsListing,[ctNotation]);
+  FElementTypesListing:= TList.create;
+  FElementTypesList:= TdomNamedCMNodeMap.create(self,self,FElementTypesListing,[ctElementTypeDeclaration]);
+  FAttributesList:= TdomNamedCMAttributeMap.create(self);
+  FEntitiesList:= TdomNamedCMEntityMap.create(self);
+  setPredefinedEntities;
+end;
+
+destructor TdomCMObject.destroy;
+begin
+  FAttributesList.free;
+  FEntitiesList.free;
+  FNotationsListing.free;
+  FNotationsList.free;
+  FElementTypesListing.free;
+  FElementTypesList.free;
+  inherited destroy;
+end;
+
+procedure TdomCMObject.clear;
+begin
+  clearAttributes;
+  clearElementtypes;
+  clearEntities;
+  clearNotations;
+  inherited clear;
+end;
+
+procedure TdomCMObject.clearAttributes;
+var
+  removedAttribute: TdomCMAttribute;
+begin
+  while attributes.length > 0 do begin
+    removedAttribute:= attributes.removeLastItem;
+    FCreatedNodes.remove(removedAttribute);
+    removedAttribute.free;
+  end;
+end;
+
+procedure TdomCMObject.clearElementTypes;
+var
+  i: integer;
+begin
+  for i:= pred(FElementTypesListing.count) downto 0 do
+    FCreatedNodes.remove(FElementTypesListing[i]);
+  FElementTypesListing.clear;
+end;
+
+procedure TdomCMObject.clearEntities;
+var
+  removedEntity: TdomCMEntity;
+begin
+  while Entities.length > 0 do begin
+    removedEntity:= Entities.removeLastItem;
+    FCreatedNodes.remove(removedEntity);
+    removedEntity.free;
+  end;
+end;
+
+procedure TdomCMObject.clearNotations;
+var
+  i: integer;
+begin
+  for i:= pred(FNotationsListing.count) downto 0 do
+    FCreatedNodes.remove(FNotationsListing[i]);
+  FNotationsListing.clear;
+end;
+
+function TdomCMObject.duplicateCMNode(const node: TdomCMNode): TdomCMNode;
+begin
+  case node.NodeType of
+    ctAttribute:
+      result:= createCMAttribute((node as TdomCMAttribute).elementName,
+                                 (node as TdomCMAttribute).attributeName,
+                                 (node as TdomCMAttribute).attributeType,
+                                 (node as TdomCMAttribute).defaultDeclaration,
+                                 (node as TdomCMAttribute).NodeValue);
+    ctEntity:
+      if (node as TdomCMEntity).entityType = etInternal_Entity then begin
+        result:= createCMIntEntity((node as TdomCMEntity).nodeName,
+                                   (node as TdomCMEntity).literalValue);
+      end else begin
+        if (node as TdomCMEntity).isParsedEntity
+          then result:= createCMExtParsedEntity((node as TdomCMEntity).nodeName,
+                                                (node as TdomCMEntity).publicId,
+                                                (node as TdomCMEntity).systemId)
+          else result:= createCMExtUnparsedEntity((node as TdomCMEntity).nodeName,
+                                                  (node as TdomCMEntity).publicId,
+                                                  (node as TdomCMEntity).systemId,
+                                                  (node as TdomCMEntity).notationName);
+      end;
+    ctNotation:
+      result:= createCMNotation((node as TdomCMNotation).NodeName,
+                                (node as TdomCMNotation).publicId,
+                                (node as TdomCMNotation).systemId);
+  else
+    result:= inherited DuplicateCMNode(node);
+  end;
+end;
+
+function TdomCMObject.createCMAttribute(const elementName,
+                                              attributeName,
+                                              attType,
+                                              defaultDecl,
+                                              attValue: UnicodeString): TdomCMAttribute;
+begin
+  Result:= TdomCMAttribute.create(self,elementName,attributeName,attType,defaultDecl,attValue);
+  FCreatedNodes.add(Result);
+end;
+
+function TdomCMObject.createCMExtParsedEntity(const name,
+                                                    pubId,
+                                                    sysId: UnicodeString): TdomCMEntity;
+begin
+  Result:= TdomCMEntity.createExtParsed(self,name,pubId,sysId);
+  FCreatedNodes.add(Result);
+end;
+
+function TdomCMObject.createCMExtUnparsedEntity(const name,
+                                                      pubId,
+                                                      sysId,
+                                                      notaName: UnicodeString): TdomCMEntity;
+begin
+  Result:= TdomCMEntity.createExtUnparsed(self,name,pubId,sysId,notaName);
+  FCreatedNodes.add(Result);
+end;
+
+function TdomCMObject.createCMIntEntity(const name,
+                                              literalValue: UnicodeString): TdomCMEntity;
+begin
+  Result:= TdomCMEntity.create(self,name,literalValue);
+  FCreatedNodes.add(Result);
+end;
+
+function TdomCMObject.CreateCMNotation(const name,
+                                             pubId,
+                                             sysId: UnicodeString): TdomCMNotation;
+begin
+  Result:= TdomCMNotation.create(self,name,pubId,sysId);
+  FCreatedNodes.add(Result);
+end;
+
+function TdomCMObject.setPredefinedEntities: boolean;
+
+  function testGtAposQuot(const entName,
+                                litVal,
+                                CdataVal: UnicodeString): boolean;
+  var
+    newEntity, oldEntity: TdomCMEntity;
+    ok: boolean;
+  begin
+    result:= true;
+    oldEntity:= Entities.GetNamedItem(entName);
+    if assigned(oldEntity) then begin
+      try
+        ok:= (oldEntity.replacementText = CdataVal);
+      except
+        ok:= false;
+      end;
+      if not ok then begin
+        sendErrorNotification(ET_WRONG_DECL_OF_PREDEFINED_ENTITY,oldEntity);
+        result:= false;
+      end;
+    end else begin
+      newEntity:= CreateCMIntEntity(entName,litVal);
+      Entities.appendNamedItem(newEntity);
+    end;
+  end;
+
+  function testLtAmp(const entName,
+                           litVal: UnicodeString;
+                     const charValue: integer): boolean;
+  var
+    newEntity, oldEntity: TdomCMEntity;
+    ok: boolean;
+  begin
+    result:= true;
+    oldEntity:= Entities.GetNamedItem(entName);
+    if assigned(oldEntity) then begin
+      try
+        ok:= (XmlCharRefToInt(oldEntity.replacementText) = charValue);
+      except
+        ok:= false;
+      end;
+      if not ok then begin
+        sendErrorNotification(ET_WRONG_DECL_OF_PREDEFINED_ENTITY,oldEntity);
+        result:= false;
+      end;
+    end else begin
+      newEntity:= CreateCMIntEntity(entName,litVal);
+      Entities.appendNamedItem(newEntity);
+    end;
+  end;
+
+begin
+  result:= true;
+  if not testLtAmp('lt','&#38;#60;',60)
+    then result:= false;
+  if not testGtAposQuot('gt','&#62;',#62)
+    then result:= false;
+  if not testLtAmp('amp','&#38;#38;',38)
+    then result:= false;
+  if not testGtAposQuot('apos','&#39;',#39)
+    then result:= false;
+  if not testGtAposQuot('quot','&#34;',#34)
+    then result:= false;
+end;
+
+function TdomCMObject.prepareCM: boolean;
+var
+  dtdAnalyzer: TXmlCMAnalyzer;
+begin
+  result:= true;
+
+  clearEntities;
+  clearAttributes;
+  clearElementTypes;
+  clearNotations;
+
+  dtdAnalyzer:= TXmlCMAnalyzer.create(nil);
+  try
+    dtdAnalyzer.DOMImpl:= domImplementation;
+    if assigned(internalCM)
+      then result:= dtdAnalyzer.analyzeCM(internalCM,self);
+    if result and assigned(externalCM)
+      then result:= dtdAnalyzer.analyzeCM(externalCM,self);
+  finally
+    dtdAnalyzer.free;
+  end;
+
+  if result
+    then result:= setPredefinedEntities;
+
+  if not result then begin
+    clearEntities;
+    clearAttributes;
+    clearElementTypes;
+    clearNotations;
+  end;
+end;
+
+function TdomCMObject.prepare: boolean;
+begin
+  result:= prepareCM;
+end;
+
+function  TdomCMObject.removeExternalCM: TdomCMExternalObject;
+begin
+  result:= FCMExternal;
+  if assigned(FCMExternal)
+    then FCMExternal.FAssociatedContentModel:= nil;
+  FCMExternal:= nil;
+end;
+
+function TdomCMObject.setExternalCM(const arg: TdomCMExternalObject): TdomCMExternalObject;
+begin
+  if assigned(arg)
+    then if assigned(arg.associatedContentModel)
+      then raise EInuse_Content_Model_Err.create('Inuse content model error.');
+  result:= removeExternalCM;
+  FCMExternal:= arg;
+  arg.FAssociatedContentModel:= self;
+end;
+
+function  TdomCMObject.removeInternalCM: TdomCMInternalObject;
+begin
+  result:= FCMInternal;
+  if assigned(FCMInternal)
+    then FCMInternal.FAssociatedContentModel:= nil;
+  FCMInternal:= nil;
+end;
+
+function TdomCMObject.setInternalCM(const arg: TdomCMInternalObject): TdomCMInternalObject;
+begin
+  if assigned(arg)
+    then if assigned(arg.associatedContentModel)
+      then raise EInuse_Content_Model_Err.create('Inuse content model error.');
+  result:= removeInternalCM;
+  FCMInternal:= arg;
+  arg.FAssociatedContentModel:= self;
+end;
+
+function TdomCMObject.validate: boolean;
+var
+  i,j: integer;
+  goOn, ok, typeMismatch: boolean;
+  idNames, notationNames, notationTokens, enumerationTokens: TdomWideStringList;
+  AType: UnicodeString;
+  Attri: TdomCMAttribute;
+  EType: TdomCMElementTypeDeclaration;
+begin
+  result:= true;
+  if not prepareCM then begin
+    result:= false;
+    exit;
+  end;
+
+  if assigned(internalCM) then begin
+    if not internalCM.validate then begin
+      result:= false;
+      exit;
+    end;
+  end;
+
+  if assigned(externalCM) then begin
+    if not externalCM.validate then begin
+      result:= false;
+      exit;
+    end;
+  end;
+
+  for i:= 0 to pred(entities.length) do begin
+    with entities.item(i) do begin
+
+      resolve; // xxx necessary here?
+
+      // VC: Notation Declared (XML 1.0, § 4.2.2)
+      if not isParsedEntity then
+        if notations.GetNamedIndex(notationName) = -1 then begin
+          result:= false;
+          goOn:= sendErrorNotification(ET_UNDECLARED_NOTATION_NAME,entities.item(i));
+          if not goOn then exit;
+        end;
+
+    end; {with ...}
+  end; {for ...}
+
+  IdNames:= TdomWideStringList.create;
+  IdNames.Sorted:= true;
+  IdNames.Duplicates:= dupError;
+  NotationNames:= TdomWideStringList.create;
+  NotationNames.Sorted:= true;
+  NotationNames.Duplicates:= dupError;
+  NotationTokens:= TdomWideStringList.create;
+  NotationTokens.Sorted:= true;
+  NotationTokens.Duplicates:= dupError;
+  EnumerationTokens:= TdomWideStringList.create;
+  EnumerationTokens.Sorted:= true;
+  EnumerationTokens.Duplicates:= dupError;
+  try
+    for i:= 0 to pred(attributes.length) do begin
+      Attri:= attributes.item(i);
+      AType:= Attri.AttributeType;
+      TypeMismatch:= false;
+      if  AType = 'ID' then begin
+
+        // VC: One ID per Element Type (XML 1.0, § 3.3.1)
+        try
+          IdNames.Add(Attri.ElementName)
+        except  // xxx not elegant
+          result:= false;
+          goOn:= sendErrorNotification(ET_DUPLICATE_ID_ON_ELEMENT_TYPE,Attri);
+          if not goOn then exit;
+        end;
+
+      end else if AType = 'NOTATION' then begin
+
+        NotationTokens.clear;
+
+        for j:= 0 to pred(Attri.childnodes.length) do begin
+
+          // VC: Notation Attributes (XML 1.0, § 3.3.1)
+          if notations.GetNamedIndex(Attri.childnodes.item(j).NodeName) = -1 then begin
+            result:= false;
+            goOn:= sendErrorNotification(ET_UNDECLARED_NOTATION_NAME,Attri.childnodes.item(j));
+            if not goOn then exit;
+          end;
+
+          // VC: No Duplicate Tokens (XML 1.0, 2nd ed., erratum 2)
+          try
+            NotationTokens.Add(Attri.childnodes.item(j).NodeName)
+          except  // xxx not elegant
+            result:= false;
+            goOn:= sendErrorNotification(ET_DUPLICATE_NOTATION_TOKEN,Attri.childnodes.item(j));
+            if not goOn then exit;
+          end;
+
+        end; {for ...}
+
+        // VC: One Notation per Element Type (XML 1.0, § 3.3.1)
+        try
+          NotationNames.Add(Attri.ElementName)
+        except  // xxx not elegant
+          result:= false;
+          goOn:= sendErrorNotification(ET_DUPLICATE_NOTATION_ON_ELEMENT_TYPE,Attri);
+          if not goOn then exit;
+        end;
+
+        // VC: No Notation on Empty Element (XML 1.0, § 3.3.1)
+        EType:= (elementTypes.GetNamedItem(Attri.ElementName) as TdomCMElementTypeDeclaration);
+        if assigned(EType) then begin
+          if EType.ContentspecType = ctEmpty then begin
+            result:= false;
+            goOn:= sendErrorNotification(ET_NOTATION_ON_EMPTY_ELEMENT,Attri);
+            if not goOn then exit;
+          end;
+        end;
+
+      end else
+
+      if AType = '' then begin
+        if attri.NodeValue <> '' then begin
+          ok:= false;
+          EnumerationTokens.clear;
+          with attri do begin
+            for j:= 0 to pred(ChildNodes.length) do begin
+              if ChildNodes.item(j).NodeName = NodeValue then begin
+                ok:= true;
+                break;
+              end;
+
+              // VC: No Duplicate Tokens (XML 1.0, 2nd ed., erratum 2)
+              try
+                EnumerationTokens.Add(childnodes.item(j).NodeName)
+              except  // xxx not elegant
+                result:= false;
+                goOn:= sendErrorNotification(ET_DUPLICATE_ENUMERATION_TOKEN,childnodes.item(j));
+                if not goOn then exit;
+              end;
+              if not result then break;
+
+            end;
+          end; {with ...}
+          TypeMismatch:= not ok; // VC: Enumeration (XML 1.0, § 3.3.1)
+        end; {if ...}
+      end else
+      if AType = 'IDREF' then begin
+        if not (isXMLName(attri.NodeValue) or (attri.NodeValue = ''))
+          then TypeMismatch:= true; // VC: IDREF (XML 1.0, § 3.3.1)
+      end else
+      if AType = 'IDREFS' then begin
+        if not (isXMLNames(attri.NodeValue) or (attri.NodeValue = ''))
+          then TypeMismatch:= true; // VC: IDREF (XML 1.0, § 3.3.1)
+      end else
+      if AType = 'ENTITY' then begin
+        if not (isXMLName(attri.NodeValue) or (attri.NodeValue = ''))
+          then TypeMismatch:= true; // VC: Entity (XML 1.0, § 3.3.1)
+      end else
+      if AType = 'ENTITIES' then begin
+        if not (isXMLNames(attri.NodeValue) or (attri.NodeValue = ''))
+          then TypeMismatch:= true; // VC: Entity (XML 1.0, § 3.3.1)
+      end else
+      if AType = 'NMTOKEN' then begin
+        if not (isXmlNmtoken(attri.NodeValue) or (attri.NodeValue = ''))
+          then TypeMismatch:= true; // VC: name Token (XML 1.0, § 3.3.1)
+      end else
+      if AType = 'NMTOKENS' then begin
+        if not (isXmlNmtokens(attri.NodeValue) or (attri.NodeValue = ''))
+          then TypeMismatch:= true; // VC: name Token (XML 1.0, § 3.3.1)
+      end;
+
+      if TypeMismatch then begin
+        result:= false;
+        goOn:= sendErrorNotification(ET_ATTRIBUTE_DEFAULT_TYPE_MISMATCH,attri);
+        if not goOn then exit;
+      end;
+
+    end; {for ...}
+  finally
+    IdNames.free;
+    NotationNames.free;
+    NotationTokens.free;
+    EnumerationTokens.free;
+  end;
+
+end;
+
+
+
+// +++++++++++++++++++++++ TdomCustomCMIEObject +++++++++++++++++++++++
+constructor TdomCustomCMIEObject.create(const aOwner: TdomImplementation;
+                                        const pubId,
+                                              sysId: UnicodeString);
+begin
+  inherited create(aOwner,sysId);
+  FPublicId:= pubId;
+  FAssociatedContentModel:= nil;
+end;
+
+function TdomCustomCMIEObject.validate: boolean;
+var
+  i: integer;
+begin
+  result:= true;
+  for i:= 0 to pred(childnodes.length) do begin
+    if not childnodes.item(i).validate then begin
+      result:= false;
+      exit;
+    end;
+  end;
+end;
+
+
+
+// +++++++++++++++++++++++ TdomCMInternalObject +++++++++++++++++++++++
+constructor TdomCMInternalObject.create(const aOwner: TdomImplementation;
+                                        const pubId,
+                                              sysId: UnicodeString);
+begin
+  inherited create(aOwner,pubId,sysId);
+  FNodeName:= '#cm-internal-object';
+  FNodeType:= ctInternalObject;
+  FAllowedChildTypes:= [ctAttributeList,
+                        ctComment,
+                        ctElementTypeDeclaration,
+                        ctEntityDeclaration,
+                        ctNotationDeclaration,
+                        ctParameterEntityDeclaration,
+                        ctParameterEntityReference,
+                        ctProcessingInstruction];
+end;
+
+
+
+// ++++++++++++++++++++++++ TdomCMExternalObject +++++++++++++++++++++++
+constructor TdomCMExternalObject.create(const aOwner: TdomImplementation;
+                                        const pubId,
+                                              sysId: UnicodeString);
+begin
+  inherited create(aOwner,pubId,sysId);
+  FNodeName:= '#cm-external-object';
+  FNodeType:= ctExternalObject;
+  FEncoding:= '';
+  FVersion:= '';
+  FAllowedChildTypes:= [ctAttributeList,
+                        ctComment,
+                        ctElementTypeDeclaration,
+                        ctEntityDeclaration,
+                        ctNotationDeclaration,
+                        ctParameterEntityDeclaration,
+                        ctParameterEntityReference,
+                        ctProcessingInstruction];
+end;
+
+
+
+// ++++++++++++++++++ TdomCMNotationDeclaration ++++++++++++++++++++++++
+constructor TdomCMNotationDeclaration.create(const aOwner: TdomCustomCMObject;
+                                             const name,
+                                                   pubId,
+                                                   sysId: UnicodeString);
+begin
+  if not IsXmlName(name)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  if not isXmlSystemChars(sysId)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  if not isXmlPubidChars(pubId)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  inherited create(aOwner);
+  FNodeName:= name;
+  FNodeValue:= '';
+  FPublicId:= pubId;
+  FSystemId:= sysId;
+  FNodeType:= ctNotationDeclaration;
+  FAllowedChildTypes:= [];
+end;
+
+procedure TdomCMNotationDeclaration.SetNodeValue(const value: UnicodeString);
+begin
+end;
+
+function TdomCMNotationDeclaration.GetPublicId: UnicodeString;
+begin
+  Result:= FPublicId;
+end;
+
+function TdomCMNotationDeclaration.GetSystemId: UnicodeString;
+begin
+  Result:= FSystemId;
+end;
+
+function TdomCMNotationDeclaration.validate: boolean;
+begin
+  result:= true;
+end;
+
+
+
+// +++++++++++++++++ TdomCMElementTypeDeclaration +++++++++++++++++++++++
+constructor TdomCMElementTypeDeclaration.create(const aOwner: TdomCustomCMObject;
+                                                const name: UnicodeString;
+                                                const contspecType: TdomContentspecType);
+begin
+  if not IsXmlName(name)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  inherited create(aOwner);
+  FNodeName:= name;
+  FNodeType:= ctElementTypeDeclaration;
+  FContentspec:= contspecType;
+  case contspecType of
+    ctEmpty,ctAny: FAllowedChildTypes:= [];
+    ctMixed:       FAllowedChildTypes:= [ctPcdataChoiceParticle];
+    ctChildren:    FAllowedChildTypes:= [ctSequenceParticle,
+                                         ctChoiceParticle];
+  end;
+end;
+
+function TdomCMElementTypeDeclaration.GetContentspec: UnicodeString;
+var
+  XMLStream: TdomWideStringStream;
+begin
+  XMLStream := TdomWideStringStream.create;
+  try
+    case ContentSpecType of
+      ctEmpty: writeWideString(XMLStream, 'EMPTY ');
+      ctAny:   writeWideString(XMLStream, 'ANY ');
+      ctMixed, ctChildren: (ChildNodes.Item(0) as TdomCMParticle).writeCode(XMLStream);
+    end; {case ...}
+    Result := XMLStream.DataString;
+  finally
+    XMLStream.Free;
+  end;
+end;
+
+function TdomCMElementTypeDeclaration.GetContentspecType: TdomContentspecType;
+begin
+  Result:= FContentspec;
+end;
+
+procedure TdomCMElementTypeDeclaration.SetNodeValue(const value: UnicodeString);
+begin
+end;
+
+function TdomCMElementTypeDeclaration.appendChild(const newChild: TdomCMNode): TdomCMNode;
+begin
+  if (contentspecType = ctEmpty) or (contentspecType = ctAny)
+    or (hasChildNodes and (FirstChild <> newChild))
+      then raise ENot_Supported_Err.create('Not supported error.');
+  result:= inherited appendChild(newChild);
+end;
+
+function TdomCMElementTypeDeclaration.insertBefore(const newChild,
+                                                         refChild: TdomCMNode): TdomCMNode;
+begin
+  if (contentspecType = ctEmpty) or (contentspecType = ctAny)
+    or (hasChildNodes and (FirstChild <> newChild))
+      then raise ENot_Supported_Err.create('Not supported error.');
+  result:= inherited insertBefore(newChild,refChild);
+end;
+
+function TdomCMElementTypeDeclaration.validate: boolean;
+var
+  i: integer;
+begin
+  result:= true;
+  for i:= 0 to pred(childnodes.length) do begin
+    if not childnodes.item(i).validate then begin
+      result:= false;
+      exit;
+    end;
+  end;
+end;
+
+
+
+// +++++++++++++++++++++++ TdomCMAttrList ++++++++++++++++++++++++++++++
+constructor TdomCMAttrList.create(const aOwner: TdomCustomCMObject;
+                                  const name: UnicodeString);
+begin
+  if not IsXmlName(name)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  inherited create(aOwner);
+  FNodeName:= name;
+  FNodeType:= ctAttributeList;
+  FAllowedChildTypes:= [ctAttributeDefinition];
+end;
+
+function TdomCMAttrList.validate: boolean;
+var
+  i: integer;
+begin
+  result:= true;
+  for i:= 0 to pred(childnodes.length) do begin
+    if not childnodes.item(i).validate then begin
+      result:= false;
+      exit;
+    end;
+  end;
+end;
+
+
+// ++++++++++++++++++++ TdomCMAttrDefinition ++++++++++++++++++++++++++
+constructor TdomCMAttrDefinition.create(const aOwner: TdomCustomCMObject;
+                                        const name,
+                                              attType,
+                                              defaultDecl,
+                                              attValue: UnicodeString);
+const
+  sQuote: UnicodeString  = #$0027;
+  dQuote: UnicodeString  = '"';
+begin
+  if not IsXmlName(name)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  if not ( (attType='') or (attType='NOTATION') or
+    IsXmlStringType(attType) or IsXmlTokenizedType(attType) )
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  if not ( (defaultDecl = '#REQUIRED') or (defaultDecl = '#IMPLIED') or
+           (defaultDecl = '#FIXED') or (defaultDecl = '') )
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  if ((defaultDecl = '#REQUIRED') or (defaultDecl = '#IMPLIED'))
+    and (attValue <> '')
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  if not ( IsXMLAttValue(concat(dQuote,attValue,dQuote)) or
+    IsXMLAttValue(concat(sQuote,attValue,sQuote)) )
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  inherited create(aOwner);
+  FNodeName:= name;
+  FAttributeType:= attType;
+  FDefaultDeclaration:= defaultDecl;
+  FNodeValue:= attValue;
+  FNodeType:= ctAttributeDefinition;
+  FParentAttributeList:= nil;
+  FAllowedChildTypes:= [];
+  if attType = ''
+    then FAllowedChildTypes:= [ctNmtokenParticle];
+  if attType = 'NOTATION'
+    then FAllowedChildTypes:= [ctNameParticle];
+end;
+
+function TdomCMAttrDefinition.validate: boolean;
+var
+  i: integer;
+  particleNames: TdomWideStringList;
+begin
+  result:= true;
+
+  // VC: ID Attribute Default (XML 1.0, § 3.3.1)
+  if (AttributeType = 'ID') and not
+    ( (DefaultDeclaration = '#REQUIRED') or (DefaultDeclaration = '#IMPLIED') ) then begin
+    result:= false;
+    sendErrorNotification(ET_ID_NEITHER_IMPLIED_NOR_REQUIRED,self);
+  end;
+
+  // VC: No Duplicate Tokens (XML 1.0, 2nd Ed., Erratum 2)
+  if hasChildNodes then begin
+    particleNames:= TdomWideStringList.create;
+    particleNames.Sorted:= true;
+    particleNames.Duplicates:= dupError;
+    try
+      for i:= 0 to pred(childnodes.length) do begin
+        try
+          particleNames.Add(childnodes.item(i).nodeName);
+        except  // xxx not elegant
+          result:= false;
+          sendErrorNotification(ET_DUPLICATE_TOKENS,childnodes.item(i));
+          break;
+        end; {try ... except ...}
+      end; {for ...}
+    finally
+      particleNames.free;
+    end;
+  end;
+
+end;
+
+function TdomCMAttrDefinition.GetAttributeType: UnicodeString;
+begin
+  Result:= FAttributeType;
+end;
+
+function TdomCMAttrDefinition.GetDefaultDeclaration: UnicodeString;
+begin
+  Result:= FDefaultDeclaration;
+end;
+
+procedure TdomCMAttrDefinition.SetNodeValue(const value: UnicodeString);
+begin
+end;
+
+
+
+// +++++++++++++++++++++++++ TdomCMParticle ++++++++++++++++++++++++++++
+constructor TdomCMParticle.create(const aOwner: TdomCustomCMObject;
+                                  const freq: UnicodeString);
+begin
+  if not ( (freq = '') or (freq = UnicodeString('?')) or (freq = '*') or (freq = '+') )
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  inherited create(aOwner);
+  FNodeType:= ctUnknown;
+  FAllowedChildTypes:= [];
+  FFrequency:= freq;
+end;
+
+function TdomCMParticle.contentModelTest2(const source,
+                                                rest: TdomWideStringList;
+                                          const freq: UnicodeString;
+                                            var isNonDeterministic: boolean): boolean;
+begin
+  Result := False;
+  raise EParserException.create('Parser exception in TdomCMParticle.contentModelTest');
+end;
+
+function TdomCMParticle.contentModelTest(const source,
+                                               rest: TdomWideStringList;
+                                           var isNonDeterministic: boolean): boolean;
+var
+  rest2: TdomWideStringList;
+begin
+  result:= false;
+  isNonDeterministic:= false;
+  if Frequency = '' then begin
+    result:= contentModelTest2(source,rest,'',isNonDeterministic);
+  end else if Frequency = '?' then begin
+    result:= contentModelTest2(source,rest,'?',isNonDeterministic);
+  end else if Frequency = '+' then begin
+    result:= contentModelTest2(source,rest,'',isNonDeterministic);
+    if result then begin
+      rest2:= TdomWideStringList.create;
+      try
+        while rest.Count > 0 do begin
+          if not contentModelTest2(rest,rest2,'',isNonDeterministic) then break;
+          rest.assign(rest2);
+        end;
+      finally
+        rest2.free;
+      end;
+    end;
+  end else if Frequency = '*' then begin
+    result:= contentModelTest2(source,rest,'?',isNonDeterministic);
+    if result then begin
+      rest2:= TdomWideStringList.create;
+      try
+        while rest.Count > 0 do begin
+          if not contentModelTest2(rest,rest2,'',isNonDeterministic) then break;
+          rest.assign(rest2);
+        end;
+      finally
+        rest2.free;
+      end;
+    end;
+  end;
+  if isNonDeterministic then result:= false;
+end;
+
+function TdomCMParticle.GetFrequency: UnicodeString;
+begin
+  Result:= FFrequency;
+end;
+
+procedure TdomCMParticle.SetFrequency(const freq: UnicodeString);
+begin
+  if not ( (freq = '') or (freq = UnicodeString('?')) or (freq = '*') or (freq = '+') )
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  FFrequency:= freq;
+end;
+
+procedure TdomCMParticle.SetNodeValue(const value: UnicodeString);
+begin
+end;
+
+
+
+// ++++++++++++++++++++++ TdomCMSequenceParticle +++++++++++++++++++++++
+constructor TdomCMSequenceParticle.create(const aOwner: TdomCustomCMObject;
+                                          const freq: UnicodeString);
+begin
+  inherited create(aOwner,freq);
+  FNodeName:= '#sequence-particle';
+  FNodeType:= ctSequenceParticle;
+  FAllowedChildTypes:= [ctSequenceParticle,
+                        ctChoiceParticle,
+                        ctElementParticle];
+end;
+
+function TdomCMSequenceParticle.contentModelTest2(const source,
+                                                        rest: TdomWideStringList;
+                                                  const freq: UnicodeString;
+                                                    var isNonDeterministic: boolean): boolean;
+var
+  i: integer;
+  source2,rest2: TdomWideStringList;
+  ok: boolean;
+begin
+  isNonDeterministic:= false;
+  rest.Assign(source);
+  result:= false;
+  source2:= TdomWideStringList.create;
+  rest2:= TdomWideStringList.create;
+  try
+    source2.Assign(source);
+    ok:= false;
+    for i:= 0 to pred(childnodes.length) do begin
+      ok:= (childnodes.item(i) as TdomCMParticle).contentModelTest(source2,rest2,isNonDeterministic);
+      if not ok then break;
+      source2.Assign(rest2);
+    end;
+    if freq = '' then begin
+      if ok then begin
+        rest.assign(rest2);
+        result:= true;
+      end else result:= false;
+    end else if freq = '?' then begin
+      if ok then rest.assign(rest2);
+      result:= true;
+    end;
+  finally
+    source2.free;
+    rest2.free;
+  end;
+  if isNonDeterministic
+    then result:= false;
+end;
+
+procedure TdomCMSequenceParticle.writeCode(stream: TStream);
+var
+  i: integer;
+begin
+  if not HasChildNodes
+    then raise ENot_Supported_Err.create('Not supported error.');
+  writeWideChars(stream, ['(']);
+  for i:= 0 to childnodes.length-1 do begin
+    if i > 0 then writeWideChars(stream, [',', ' ']);
+    (ChildNodes.item(i) as TdomCMParticle).writeCode(stream);
+  end;
+  writeWideChars(stream, [')']);
+  writeWideString(stream, Frequency);
+end;
+
+function TdomCMSequenceParticle.validate: boolean;
+begin
+  result:= true;
+end;
+
+
+
+//++++++++++++++++++++++ TdomChoiceParticle ++++++++++++++++++++++++++++
+constructor TdomCMChoiceParticle.create(const aOwner: TdomCustomCMObject;
+                                        const freq: UnicodeString);
+begin
+  inherited create(aOwner,freq);
+  FNodeName:= '#choice-particle';
+  FNodeType:= ctChoiceParticle;
+  FAllowedChildTypes:= [ctSequenceParticle,
+                        ctChoiceParticle,
+                        ctElementParticle];
+end;
+
+function TdomCMChoiceParticle.contentModelTest2(const source,
+                                                      rest: TdomWideStringList;
+                                                const freq: UnicodeString;
+                                                var   isNonDeterministic: boolean): boolean;
+var
+  i: integer;
+  rest3,rest2: TdomWideStringList;
+  okNumber: integer;
+begin
+  isNonDeterministic:= false;
+  rest.Assign(source);
+  result:= false;
+  rest3:= TdomWideStringList.create;
+  rest2:= TdomWideStringList.create;
+  try
+    okNumber:= 0;
+    for i:= 0 to pred(childnodes.length) do begin
+      if (childnodes.item(i) as TdomCMParticle).contentModelTest(source,rest2,isNonDeterministic) then begin
+        inc(okNumber);
+        if okNumber > 1 then begin
+          isNonDeterministic:= true;
+          break;
+        end;
+        rest3.assign(rest2);
+      end else if isNonDeterministic then break;
+    end;
+    if freq = '' then begin
+      if okNumber = 1 then begin
+        rest.assign(rest3);
+        result:= true;
+      end else result:= false;
+    end else if freq = '?' then begin
+      if okNumber = 1 then rest.assign(rest3);
+      result:= true;
+    end;
+  finally
+    rest3.free;
+    rest2.free;
+  end;
+  if isNonDeterministic
+    then result:= false;
+end;
+
+procedure TdomCMChoiceParticle.writeCode(stream: TStream);
+var
+  i: integer;
+begin
+  if not HasChildNodes
+    then raise ENot_Supported_Err.create('Not supported error.');
+  writeWideChars(stream, ['(']);
+  for i:= 0 to childnodes.length-1 do begin
+    if i > 0 then writeWideChars(stream, [' ', '|', ' ']);
+    (ChildNodes.item(i) as TdomCMParticle).writeCode(stream);
+  end;
+  writeWideChars(stream, [')']);
+  writeWideString(stream, Frequency);
+end;
+
+function TdomCMChoiceParticle.validate: boolean;
+begin
+  result:= true;
+end;
+
+
+
+// +++++++++++++++++++ TdomCMPcdataChoiceParticle ++++++++++++++++++++++
+constructor TdomCMPcdataChoiceParticle.create(const aOwner: TdomCustomCMObject;
+                                              const freq: UnicodeString);
+begin
+  if freq <> '*'
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  inherited create(aOwner,freq);
+  FNodeName:= '#pcdata-choice-particle';
+  FNodeType:= ctPcdataChoiceParticle;
+  FAllowedChildTypes:= [ctElementParticle];
+end;
+
+function TdomCMPcdataChoiceParticle.contentModelTest(const source,
+                                                           rest: TdomWideStringList;
+                                                       var isNonDeterministic: boolean): boolean;
+begin
+  Result := False;
+  raise EParserException.create('Parser exception in TdomCMParticle.contentModelTest');
+end;
+
+procedure TdomCMPcdataChoiceParticle.SetFrequency(const freq: UnicodeString);
+begin
+  if freq <> '*'
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  FFrequency:= freq;
+end;
+
+procedure TdomCMPcdataChoiceParticle.writeCode(stream: TStream);
+var
+  i: integer;
+begin
+  writeWideString(stream, '( #PCDATA');
+  for i:= 0 to childnodes.length-1 do begin
+    writeWideChars(stream, [' ', '|', ' ']);
+    (ChildNodes.item(i) as TdomCMParticle).writeCode(stream);
+  end;
+  writeWideChars(stream, [' ', ')']);
+  writeWideString(stream, Frequency);
+end;
+
+function TdomCMPcdataChoiceParticle.elementDefined(const elementName: UnicodeString): boolean;
+var
+  i: integer;
+begin
+  if not IsXmlName(elementName)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  result:= false;
+  for i:= 0 to pred(childnodes.length) do begin
+    if childnodes.item(i).nodeName = elementName then begin
+      result:= true;
+      exit;
+    end;
+  end;
+end;
+
+function TdomCMPcdataChoiceParticle.validate: boolean;
+var
+  i: integer;
+  particleNames: TdomWideStringList;
+begin
+  result:= true;
+  particleNames:= TdomWideStringList.create;
+  particleNames.Sorted:= true;
+  particleNames.Duplicates:= dupError;
+  try
+    for i:= 0 to pred(childnodes.length) do begin
+      try
+        particleNames.Add(childnodes.item(i).nodeName);
+      except  // xxx not elegant
+        result:= false;
+        sendErrorNotification(ET_DUPLICATE_NAME_IN_MIXED_CONTENT,childnodes.item(i));
+        break;
+      end; {try ... except ...}
+    end; {for ...}
+  finally
+    particleNames.free;
+  end;
+end;
+
+
+
+// +++++++++++++++++++++ TdomCMElementParticle +++++++++++++++++++++++++
+constructor TdomCMElementParticle.create(const aOwner: TdomCustomCMObject;
+                                         const name,
+                                               freq: UnicodeString);
+begin
+  if not isXmlName(name)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  inherited create(aOwner,freq);
+  FNodeName:= name;
+  FNodeType:= ctElementParticle;
+  FAllowedChildTypes:= [];
+end;
+
+function TdomCMElementParticle.contentModelTest2(const source,
+                                                       rest: TdomWideStringList;
+                                                 const freq: UnicodeString;
+                                                   var isNonDeterministic: boolean): boolean;
+begin
+  isNonDeterministic:= false;
+  result:= false;
+  rest.Assign(source);
+  if freq = '' then begin
+    if rest.Count = 0 then exit;
+    if rest[0] = nodeName then begin
+      rest.Delete(0);
+      result:= true;
+    end else result:= false;
+  end else if freq = '?' then begin
+    result:= true;
+    if rest.Count = 0 then exit;
+    if rest[0] = nodeName then rest.Delete(0);
+  end;
+end;
+
+procedure TdomCMElementParticle.writeCode(stream: TStream);
+begin
+  writeWideStrings(stream, [NodeName, Frequency]);
+end;
+
+function TdomCMElementParticle.validate: boolean;
+begin
+  result:= true;
+end;
+
+
+
+// +++++++++++++++++++++++ TdomCMNameParticle ++++++++++++++++++++++++++
+constructor TdomCMNameParticle.create(const aOwner: TdomCustomCMObject;
+                                      const name: UnicodeString);
+begin
+  if not isXmlName(name)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  inherited create(aOwner);
+  FNodeName:= name;
+  FNodeType:= ctNameParticle;
+  FAllowedChildTypes:= [];
+end;
+
+procedure TdomCMNameParticle.SetNodeValue(const value: UnicodeString);
+begin
+end;
+
+function TdomCMNameParticle.validate: boolean;
+begin
+  result:= true;
+end;
+
+
+
+// +++++++++++++++++++++ TdomCMNmtokenParticle +++++++++++++++++++++++++
+constructor TdomCMNmtokenParticle.create(const aOwner: TdomCustomCMObject;
+                                         const name: UnicodeString);
+begin
+  if not isXmlNmtoken(name)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  inherited create(aOwner);
+  FNodeName:= name;
+  FNodeType:= ctNmtokenParticle;
+  FAllowedChildTypes:= [];
+end;
+
+procedure TdomCMNmtokenParticle.SetNodeValue(const value: UnicodeString);
+begin
+end;
+
+function TdomCMNmtokenParticle.validate: boolean;
+begin
+  result:= true;
+end;
+
+
+
+// ++++++++++++++++++++++++++ TdomCMAttribute ++++++++++++++++++++++++++
+constructor TdomCMAttribute.create(const aOwner: TdomCustomCMObject;
+                                   const elementName,
+                                         attributeName,
+                                         attType,
+                                         defaultDecl,
+                                         attValue: UnicodeString);
+
+  procedure FurtherAttrNormalization(var S: UnicodeString);
+  const
+    DOUBLESPACE: UnicodeString = #$20#$20;
+  var
+    dummy: UnicodeString;
+    nPos: integer;
+  begin
+    repeat
+      nPos := Pos(DOUBLESPACE, S);
+      if nPos > 0 then
+        Delete(S, nPos, 1);
+    until nPos = 0;
+    dummy:= S;
+    s:= XMLTruncSpace(dummy);
+  end;
+
+const
+  sQuote: UnicodeString  = #$0027;
+  dQuote: UnicodeString  = '"';
+var
+  normalizedAttValue: UnicodeString;
+begin
+  if not IsXmlName(attributeName)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  if not IsXmlName(elementName)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  if not ( (attType='') or (attType='NOTATION') or
+    IsXmlStringType(attType) or IsXmlTokenizedType(attType) )
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  if not ( (defaultDecl = '#REQUIRED') or (defaultDecl = '#IMPLIED') or
+           (defaultDecl = '#FIXED') or (defaultDecl = '') )
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  if ((defaultDecl = '#REQUIRED') or (defaultDecl = '#IMPLIED'))
+    and (attValue <> '')
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  normalizedAttValue:= attValue;
+  if not IsXmlStringType(attType)
+    then FurtherAttrNormalization(normalizedAttValue);
+  if not ( IsXMLAttValue(concat(dQuote,normalizedAttValue,dQuote)) or
+    IsXMLAttValue(concat(sQuote,normalizedAttValue,sQuote)) )
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  inherited create(aOwner);
+  FAttributeName:= attributeName;
+  FElementName:= elementName;
+  FNodeName:= '#cm-attribute';
+  FNodeType:= ctAttribute;
+  FAttributeType:= attType;
+  FDefaultDeclaration:= defaultDecl;
+  FNodeValue:= normalizedAttValue;
+  FAllowedChildTypes:= [];
+  if attType = ''
+    then FAllowedChildTypes:= [ctNmtokenParticle];
+  if attType = 'NOTATION'
+    then FAllowedChildTypes:= [ctNameParticle];
+end;
+
+procedure TdomCMAttribute.setNodeValue(const value: UnicodeString);
+begin
+end;
+
+
+
+
+// ++++++++++++++++++++++++++ TdomCMNotation ++++++++++++++++++++++++++
+constructor TdomCMNotation.create(const aOwner: TdomCustomCMObject;
+                                  const name,
+                                        pubId,
+                                        sysId: UnicodeString);
+begin
+  if not IsXmlName(name)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  if not isXmlSystemChars(sysId)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  if not isXmlPubidChars(pubId)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  inherited create(aOwner);
+  FNodeName:= name;
+  FNodeValue:= '';
+  FPublicId:= pubId;
+  FSystemId:= sysId;
+  FNodeType:= ctNotation;
+  FAllowedChildTypes:= [];
+end;
+
+
+
+// +++++++++++++++++++++++++++++ TdomCMEntity +++++++++++++++++++++++++++++
+constructor TdomCMEntity.create(const aOwner: TdomCustomCMObject;
+                                const name,
+                                      litValue: UnicodeString);
+begin
+  if not isXmlName(name)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  inherited create(aOwner);
+  FAllowedChildTypes:= [];
+  FEncoding:= '';  // xxx Set this on create?
+  FEntityType:= etInternal_Entity;
+  FIsParsedEntity:= true;
+  FIsResolved:= false;
+  FIsUnusable:= false;
+  FLiteralValue:= '';
+  FNodeName:= name;
+  FNodeValue:= '';
+  FNodeType:= ctEntity;
+  FNotationName:= '';
+  FPublicId:= '';
+  FReplacementText:= '';
+  FSystemId:= '';
+
+  calculateLiteralValue(litValue); // sets replacement text, too.
+end;
+
+constructor TdomCMEntity.createExtParsed(const aOwner: TdomCustomCMObject;
+                                         const name,
+                                               pubId,
+                                               sysId: UnicodeString);
+begin
+  if not isXmlName(name)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  if not isXmlPubidChars(pubId)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  if not isXmlSystemChars(sysId)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  inherited create(aOwner);
+  FAllowedChildTypes:= [];
+  FEncoding:= '';  // xxx Set this on create?
+  FEntityType:= etExternal_Entity;
+  FIsParsedEntity:= true;
+  FIsResolved:= false;
+  FIsUnusable:= false;
+  FLiteralValue:= '';
+  FNodeName:= name;
+  FNodeValue:= '';
+  FNodeType:= ctEntity;
+  FNotationName:= '';
+  FPublicId:= pubId;
+  FReplacementText:= '';
+  FSystemId:= sysId;
+end;
+
+constructor TdomCMEntity.createExtUnparsed(const aOwner: TdomCustomCMObject;
+                                           const name,
+                                                 pubId,
+                                                 sysId,
+                                                 notaName: UnicodeString);
+begin
+  if not isXmlName(name)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  if not isXmlPubidChars(pubId)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  if not isXmlSystemChars(sysId)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  if not isXmlName(notaName)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  inherited create(aOwner);
+  FAllowedChildTypes:= [];
+  FEncoding:= '';  // xxx Set this on create?
+  FEntityType:= etExternal_Entity;
+  FIsParsedEntity:= false;
+  FIsResolved:= false;
+  FIsUnusable:= false;
+  FLiteralValue:= '';
+  FNodeName:= name;
+  FNodeValue:= '';
+  FNodeType:= ctEntity;
+  FNotationName:= notaName;
+  FPublicId:= pubId;
+  FReplacementText:= '';
+  FSystemId:= sysId;
+end;
+
+function TdomCMEntity.refersToXyz(const allowUnresolvableEntities: boolean;
+                                  const previousEntities: TdomWideStringList;
+                                  const whatToTest: integer): boolean;
+// Recursivly tests, whether the TdomCMEntity is an external entity
+// (whatToTest = 1), an unparsed entity (whatToTest = 2), or an unusable
+// (whatToTest = 3).
+// To just traverse all resolved entity references in order to test
+// for circular references, 'whatToTest' must be set to 0.
+const
+  AMP:       WideChar = #$26;  // '&'
+  SEMICOLON: WideChar = #$3B;  // ';'
+var
+  i: integer;
+  SChar: widechar;
+  refName,S: UnicodeString;
+  dereferencedEntity: TdomCMEntity;
+  updatedEntities: TdomWideStringList;
+  ampActive: boolean;
+begin
+  case whatToTest of
+    0: Result:= false;
+    1: result:= (entityType = etExternal_Entity);
+    2: result:= not FIsParsedEntity;
+    3: result:= FIsUnusable;
+  else
+    raise ESyntax_Err.create('Syntax error in TdomCMEntity.refersToXyz');
+  end;
+  if result then exit;
+  S:= ReplacementText;
+  i:= 1;
+  ampActive:= false;
+  refName:= '';
+  while i <= length(S) do begin
+    SChar:= WideChar((PWideChar(S)+i-1)^);
+    if ampActive then begin
+      if SChar = SEMICOLON then begin
+        if IsXmlName(refName) then begin
+          if (previousEntities.indexOf(refName) = -1) then begin
+            dereferencedEntity:= (ownerCMObject as TdomCMObject).Entities.getNamedItem(refName);
+            if not assigned(dereferencedEntity) then begin
+              if not allowUnresolvableEntities
+                then if not ( (refName='lt') or (refName='gt') or (refName='amp') or (refName='apos') or (refName='quot'))
+                  then raise EConvertError.CreateFmt('&%S; cannot be resolved.',[refName]);
+            end else begin
+              updatedEntities:= TdomWideStringList.create;
+              try
+                updatedEntities.Assign(previousEntities);
+                updatedEntities.Add(refName);
+                Result:= dereferencedEntity.refersToXyz(allowUnresolvableEntities,updatedEntities,whatToTest);
+              finally
+                updatedEntities.free;
+              end;
+            end;
+          end else begin
+            if whatToTest = 0
+              then result:= true;  // circular reference
+          end;
+          if result then exit;
+        end;
+        ampActive:= false;
+        refName:= '';
+      end else refName:= concat(refName,UnicodeString(SChar));
+    end else begin
+      if SChar = AMP then ampActive:= true;
+    end;
+    inc(i);
+  end; {while ...}
+end;
+
+procedure TdomCMEntity.calculateLiteralValue(const S: UnicodeString);
+const
+  AMP:       WideChar = #$26;  // '&'
+  SEMICOLON: WideChar = #$3B;  // ';'
+var
+  i,j,indexpos: integer;
+  SChar, SChar2: widechar;
+  ref: UnicodeString;
+  content: TdomCustomStr;
+  parser: TXmlToDomParser;
+  dummyDoc: TdomDocument;
+begin
+  if not isParsedEntity
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+
+  // Calculate replacment text
+  content:= TdomCustomStr.create;
+  try
+    i:= 1;
+    while i <= length(S) do begin
+      SChar:= WideChar((PWideChar(S)+i-1)^);
+      if IsUtf16LowSurrogate(sChar)
+        then raise EInvalid_Character_Err.CreateFmt('%S must not start with a UTF-16 low surrogate.',[S]);
+      if IsUtf16HighSurrogate(SChar) then begin
+        if i+1 > length(s)
+          then raise EInvalid_Character_Err.CreateFmt('%S must not end with a UTF-16 high surrogate.',[S]);
+        inc(i);
+        SChar:= WideChar((PWideChar(S)+i-1)^);
+        if not IsUtf16LowSurrogate(SChar)
+          then raise EInvalid_Character_Err.CreateFmt('%S contains an UTF-16 high surrogate without its corresponding low surrogate.',[S]);
+      end;
+      if not IsXmlChar(sChar)
+        then raise EInvalid_Character_Err.CreateFmt('%S contains an invalid character.',[S]);
+      if (entityType = etInternal_Entity) and (SChar = AMP) then begin // Reference?
+        indexpos:= -1;
+        for j:= i+1 to length(S) do begin
+          SChar2:= WideChar((PWideChar(S)+j-1)^);
+          if SChar2 = SEMICOLON then begin indexpos:= j; break; end;
+        end;
+        if indexpos = -1
+          then raise EInvalid_Character_Err.CreateFmt('%S contains an ''&'' without a '';''.',[S]);
+        ref:= copy(S,i,j-i+1);
+        if not (IsXmlEntityRef(ref) or IsXmlCharRef(ref))
+          then raise EInvalid_Character_Err.CreateFmt('%S contains an invalid reference.',[S]);
+        if (entityType = etInternal_Entity) and isXmlCharRef(ref)
+          then content.addWideString(XmlCharRefToStr(ref))
+          else content.addWideString(ref);
+        i:= j;
+      end else content.addWideChar(SChar);
+      inc(i);
+    end; {while ...}
+
+    FReplacementText:= content.value;
+    FLiteralValue:= S;
+    FIsResolved:= true;
+
+  finally
+    content.free;
+  end;
+
+  // IsUnusable?
+  if FReplacementText <> '' then begin
+    parser:= TXmlToDomParser.create(nil);
+    try
+      parser.domImpl:= OwnerCMObject.domImplementation;
+      dummyDoc:= OwnerCMObject.domImplementation.createDocument('dummy',nil);
+      try
+        parser.docWideStringToDom(FReplacementText,'','',dummyDoc.documentElement);
+      except
+        FIsUnusable:= true;
+      end; {try ...}
+      OwnerCMObject.domImplementation.FreeDocument(dummyDoc);
+    finally
+      parser.free;
+    end; {try ...}
+  end; {if ...}
+end;
+
+procedure TdomCMEntity.setNodeValue(const value: UnicodeString);
+begin
+end;
+
+function TdomCMEntity.getIsUnusable: boolean;
+begin
+  if isParsedEntity and (FEntityType = etExternal_Entity)
+    then calculateLiteralValue(literalValue);
+  result:= refersToUnusableEntity(true);
+end;
+
+function TdomCMEntity.getLiteralValue: UnicodeString;
+begin
+  if not isParsedEntity
+    then raise EConvertError.CreateFmt('&%S; is an unparsed entity.',[Nodename]);
+  if not resolve
+    then raise EConvertError.create('Entity cannot be resolved.');
+  result:= FLiteralValue;
+end;
+
+function TdomCMEntity.getNormalizedValue: UnicodeString;
+const
+  TAB:       WideChar = #$9;   // Horizontal Tabulation
+  LF:        WideChar = #$A;   // Line Feed
+  CR:        WideChar = #$D;   // Carriage Return
+  SPACE:     WideChar = #$20;  // ' '
+  AMP:       WideChar = #$26;  // '&'
+  SEMICOLON: WideChar = #$3B;  // ';'
+var
+  i,j: integer;
+  SChar, SChar2: widechar;
+  ref,derefText,S: UnicodeString;
+  content: TdomCustomStr;
+  dereferencedEntity: TdomCMEntity;
+begin
+  if not isParsedEntity
+    then raise EConvertError.CreateFmt('&%S; is an unparsed entity.',[Nodename]);
+  if entityType = etExternal_Entity
+    then raise EConvertError.CreateFmt('&%S; is an external entity.',[Nodename]);
+  result:= '';
+  S:= ReplacementText;
+  content:= TdomCustomStr.create;
+  try
+    i:= 1;
+    while i <= length(S) do begin
+      SChar:= WideChar((PWideChar(S)+i-1)^);
+      if (SChar = TAB) or (SChar = LF) or (SChar = CR) // White space?
+        then content.addWideChar(SPACE)
+      else if SChar = AMP then begin                   // Reference?
+        for j:= i+1 to length(S) do begin
+          SChar2:= WideChar((PWideChar(S)+j-1)^);
+          if SChar2 = SEMICOLON then break;            // End of Reference?
+        end;
+        // Test for indexpos = -1 is not necessary here, because of the previous test in calculateReplacementText().
+        ref:= copy(S,i,j-i+1);
+        if IsXmlEntityRef(ref) then begin
+          dereferencedEntity:= (ownerCMObject as TdomCMObject).Entities.getNamedItem(copy(ref,2,length(ref)-2));
+          if not assigned(dereferencedEntity)
+            then raise EConvertError.CreateFmt('&%S; refers to an undeclared entity.',[Nodename]);
+          if dereferencedEntity.entityType = etExternal_Entity
+            then raise EConvertError.CreateFmt('&%S; refers to an external entity.',[Nodename]);
+          if dereferencedEntity = self
+            then raise EConvertError.CreateFmt('&%S; refers to itself.',[Nodename]);
+          derefText:= dereferencedEntity.normalizedValue; // Whether dereferencedEntity is assigned was tested in 'refersToUnparsedEntity'
+          content.addWideString(derefText);
+        end else // Test for IsXmlCharRef is not necessary here, because of the previous test in calculateReplacementText().
+          content.addWideString(XmlCharRefToStr(ref));
+        i:= j;
+      end else content.addWideChar(SChar);
+      inc(i);
+    end; {while ...}
+    Result:= content.value;
+  finally
+    content.free;
+  end;
+end;
+
+function TdomCMEntity.getReplacementText: UnicodeString;
+begin
+  if not isParsedEntity
+    then raise EConvertError.CreateFmt('&%S; is an unparsed entity.',[Nodename]);
+  if not resolve
+    then raise EConvertError.create('Invalid entity reference error.');
+  result:= FReplacementText;
+end;
+
+function TdomCMEntity.refersToItself(const allowUnresolvableEntities: boolean): boolean;
+// This procedure just traverses through all entity references in
+// order to test for circular references.  If a circular reference is
+// found, the called subroutine 'refersToXyz' raises an EConvertError.
+var
+  previousEntities: TdomWideStringList;
+begin
+  result:= false;
+  previousEntities:= TdomWideStringList.create;
+  try
+    try
+      result:= refersToXyz(allowUnresolvableEntities,previousEntities,0);
+    except
+      raise EConvertError.create('Invalid entity reference error.');
+    end;
+  finally
+    previousEntities.free;
+  end;
+end;
+
+function TdomCMEntity.refersToExternalEntity(const allowUnresolvableEntities: boolean): boolean;
+// This function returns 'true', if a node refers directly or
+// indirectly to an external Entity.
+var
+  previousEntities: TdomWideStringList;
+begin
+  result:= false;
+  previousEntities:= TdomWideStringList.create;
+  try
+    try
+      result:= refersToXyz(allowUnresolvableEntities,previousEntities,1);
+    except
+      raise EConvertError.create('Invalid entity reference error.');
+    end;
+  finally
+    previousEntities.free;
+  end;
+end;
+
+function TdomCMEntity.refersToUnparsedEntity(const allowUnresolvableEntities: boolean): boolean;
+// This function returns 'true', if a node refers directly or
+// indirectly to an unparsed Entity.
+var
+  previousEntities: TdomWideStringList;
+begin
+  result:= false;
+  previousEntities:= TdomWideStringList.create;
+  try
+    try
+      result:= refersToXyz(allowUnresolvableEntities,previousEntities,2);
+    except
+      raise EConvertError.create('Invalid entity reference error.');
+    end;
+  finally
+    previousEntities.free;
+  end;
+end;
+
+function TdomCMEntity.refersToUnusableEntity(const allowUnresolvableEntities: boolean): boolean;
+// This function returns 'true', if a node refers directly or
+// indirectly to an Entity marked as unusable (such as declared
+// e.g. by <!ENTITY foo "<">), or if the node itself is unusable.
+var
+  previousEntities: TdomWideStringList;
+begin
+  result:= false;
+  previousEntities:= TdomWideStringList.create;
+  try
+    try
+      result:= refersToXyz(allowUnresolvableEntities,previousEntities,3);
+    except
+      raise EConvertError.create('Invalid entity reference error.');
+    end;
+  finally
+    previousEntities.free;
+  end;
+end;
+
+function TdomCMEntity.resolve: boolean;
+var
+  action: TXmlParserAction;
+  litValue,PId,SId: UnicodeString;
+  inputSrc: TXmlInputSource;
+  stream: TStream;
+begin
+  // xxx resolvement of unparsed entities missing!
+  if not isResolved then begin
+    result:= false;
+    if isParsedEntity and (FEntityType = etExternal_Entity) then begin
+
+      stream:= nil;
+      PId:= publicId;
+      SId:= systemId;
+      if assigned(ownerCMObject)
+        then if assigned(ownerCMObject.domImplementation)
+          then ownerCMObject.domImplementation.doExternalParsedEntity(ownerCMObject.systemId,PId,SId,stream,action);
+      if (action <> paFail) and assigned(stream) then begin
+        try
+          // convert external entity value to UTF-16BE:
+          InputSrc:= TXmlInputSource.create(stream,'','',1);
+          try
+            if InputSrc.hasMalformedDecl
+             or not ( InputSrc.declType in [ DT_TEXT_DECLARATION,
+                                             DT_XML_OR_TEXT_DECLARATION,
+                                             DT_UNSPECIFIED] )
+            then result:= false
+            else begin
+              litValue:= InputSrc.streamAsWideString;
+              calculateLiteralValue(litValue);
+              result:= true;
+            end; {if ... else ...}
+          finally
+            InputSrc.free;
+          end; {try}
+        finally
+          stream.free;
+        end;
+      end; {if ...}
+
+    end; {if ...}
+  end else result:= true;
+end;
+
+
+
+// ++++++++++++++++++++++++ TdomCustomCMEntDecl ++++++++++++++++++++++++++
+constructor TdomCustomCMEntDecl.create(const aOwner: TdomCustomCMObject;
+                                       const name,
+                                             litValue: UnicodeString);
+begin
+  if not isXmlName(name)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  inherited create(aOwner);
+  FAllowedChildTypes:= [];
+  FEntityType:= etInternal_Entity;
+  FNodeName:= name;
+  FNodeValue:= litValue;
+  FPublicId:= '';
+  FSystemId:= '';
+end;
+
+constructor TdomCustomCMEntDecl.createExtParsed(const aOwner: TdomCustomCMObject;
+                                                const name,
+                                                      pubId,
+                                                      sysId: UnicodeString);
+begin
+  if not isXmlName(name)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  if not isXmlSystemChars(sysId)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  if not isXmlPubidChars(pubId)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  inherited create(aOwner);
+  FNodeName:= name;
+  FPublicId:= pubId;
+  FSystemId:= sysId;
+  FEntityType:= etExternal_Entity
+end;
+
+function TdomCustomCMEntDecl.insertBefore(const newChild,
+                                               refChild: TdomCMNode): TdomCMNode;
+begin
+  if (publicId <> '') or (systemId <> '')
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  Result:= inherited insertBefore(newChild,refChild);
+end;
+
+function TdomCustomCMEntDecl.replaceChild(const newChild,
+                                                oldChild: TdomCMNode): TdomCMNode;
+begin
+  if (publicId <> '') or (systemId <> '')
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  Result:= inherited replaceChild(newChild,oldChild);
+end;
+
+function TdomCustomCMEntDecl.appendChild(const newChild: TdomCMNode): TdomCMNode;
+begin
+  if (publicId <> '') or (systemId <> '')
+    then raise ENo_Modification_Allowed_Err.create('No modification allowed error.');
+  Result:= inherited appendChild(newChild);
+end;
+
+function TdomCustomCMEntDecl.GetPublicId: UnicodeString;
+begin
+  Result:= FPublicId;
+end;
+
+function TdomCustomCMEntDecl.GetSystemId: UnicodeString;
+begin
+  Result:= FSystemId;
+end;
+
+function TdomCustomCMEntDecl.GetEntityType: TdomEntityType;
+begin
+  result:= FEntityType;
+end;
+
+
+
+// +++++++++++++++++++++ TdomCMEntityDeclaration +++++++++++++++++++++++
+constructor TdomCMEntityDeclaration.create(const aOwner: TdomCustomCMObject;
+                                           const name,
+                                                 litValue: UnicodeString);
+begin
+  inherited;
+  FIsParsedEntity:= true;
+  FIsReadonly:= true;
+  FNodeType:= ctEntityDeclaration;
+  FNotationName:= '';
+end;
+
+constructor TdomCMEntityDeclaration.createExtParsed(const aOwner: TdomCustomCMObject;
+                                                    const name,
+                                                          pubId,
+                                                          sysId: UnicodeString);
+begin
+  inherited;
+  FEntityType:= etExternal_Entity;
+  FIsParsedEntity:= true;
+  FIsReadonly:= true;
+  FNodeType:= ctEntityDeclaration;
+  FNotationName:= '';
+end;
+
+constructor TdomCMEntityDeclaration.createExtUnparsed(const aOwner: TdomCustomCMObject;
+                                                      const name,
+                                                            pubId,
+                                                            sysId,
+                                                            notaName: UnicodeString);
+begin
+  if not IsXMLName(notaName)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  inherited  createExtParsed(aOwner,name,pubId,sysId);
+  FEntityType:= etExternal_Entity;
+  FIsParsedEntity:= false;
+  FIsReadonly:= true;
+  FNodeType:= ctEntityDeclaration;
+  FNotationName:= notaName;
+end;
+
+function TdomCMEntityDeclaration.validate: boolean;
+begin
+  result:= true;
+end;
+
+
+
+// ++++++++++++++++ TdomCMParameterEntityDeclaration +++++++++++++++++++
+constructor TdomCMParameterEntityDeclaration.create(const aOwner: TdomCustomCMObject;
+                                                    const name,
+                                                          litValue: UnicodeString);
+begin
+  inherited;
+  FIsReadonly:= true;
+  FNodeType:= ctParameterEntityDeclaration;
+end;
+
+constructor TdomCMParameterEntityDeclaration.createExtParsed(const aOwner: TdomCustomCMObject;
+                                                             const name,
+                                                                   pubId,
+                                                                   sysId: UnicodeString);
+begin
+  inherited;
+  FEntityType:= etExternal_Entity;
+  FIsReadonly:= true;
+  FNodeType:= ctParameterEntityDeclaration;
+end;
+
+function TdomCMParameterEntityDeclaration.validate: boolean;
+begin
+  result:= true;
+end;
+
+
+
+// +++++++++++++++++++ TdomCMParameterEntityReference +++++++++++++++++++
+constructor TdomCMParameterEntityReference.create(const aOwner: TdomCustomCMObject;
+                                                  const name: UnicodeString);
+begin
+  if not IsXmlName(name)
+    then raise EInvalid_Character_Err.create('Invalid character error.');
+  inherited create(aOwner);
+  FNodeName:= name;
+  FNodeValue:= '';
+  FNodeType:= ctParameterEntityReference;
+  FAllowedChildTypes:= [];
+end;
+
+procedure TdomCMParameterEntityReference.SetNodeValue(const value: UnicodeString);
+begin
+end;
+
+function TdomCMParameterEntityReference.validate: boolean;
+var
+  i: integer;
+begin
+  result:= true;
+  for i:= 0 to pred(childnodes.length) do begin  // xxx necessary?
+    if not childnodes.item(i).validate then begin
+      result:= false;
+      exit;
+    end;
+  end;
+end;
+
+
+
+// ++++++++++++++++++++++++ TdomCMFragment +++++++++++++++++++++++++++++
+constructor TdomCMFragment.create(const aOwner: TdomCustomCMObject);
+begin
+  inherited create(aOwner);
+  FNodeName:= '#cm-fragment';
+  FNodeValue:= '';
+  FNodeType:= ctFragment;
+end;
+
+procedure TdomCMFragment.SetNodeValue(const value: UnicodeString);
+begin
+  // Do nothing.
+end;
+
+
+
+// +++++++++++++++++++++++++++ TXmlSourceCode ++++++++++++++++++++++++++
+procedure TXmlSourceCode.calculatePieceOffset(const startItem: integer);
+var
+  os, i: integer;
+begin
+  if (startItem < count) and (startItem >= 0) then begin
+    if startItem = 0
+      then os:= 0
+      else begin
+        if not assigned(Items[startItem-1])
+          then begin
+            pack;
+            exit;
+          end else with TXmlSourceCodePiece(Items[startItem-1]) do
+            os:= FOffset + length(FText);
+      end;
+    for i:= startItem to count -1 do
+      if not assigned(Items[i])
+        then begin
+          pack;
+          exit;
+        end else with TXmlSourceCodePiece(Items[i]) do begin
+          FOffset:= os;
+          os:= os + length(FText);
+        end;
+  end; {if ...}
+end;
+
+function TXmlSourceCode.getNameOfFirstTag: UnicodeString;
+var
+  i,j,k: integer;
+begin
+  result:= '';
+  for i:= 0 to count -1 do
+    if assigned(Items[i]) then
+      with TXmlSourceCodePiece(Items[i]) do
+        if (pieceType = xmlStartTag) or (pieceType = xmlEmptyElementTag) then begin
+          if pieceType = xmlStartTag
+            then k:= length(text)-1
+            else k:= length(text)-2;
+          j:= 1;
+          while j < k do begin
+            inc(j);
+            if IsXmlWhiteSpace(text[j]) then break;
+            Result:= concat(Result,UnicodeString(WideChar(text[j])));
+          end;
+          exit;
+        end;
+end;
+
+function TXmlSourceCode.Add(Item: pointer): Integer;
+begin
+  if assigned(Item) then begin
+    if not assigned(TXmlSourceCodePiece(Item).FOwner)
+      then TXmlSourceCodePiece(Item).FOwner:= self
+      else Error('Inuse source code piece error.',-1);
+  end else Error('Item not assigned error.',-1);
+  Result:= inherited Add(Item);
+  calculatePieceOffset(Result);
+end;
+
+procedure TXmlSourceCode.Clear;
+var
+  i: integer;
+begin
+  for i:= 0 to count -1 do
+    if assigned(Items[i]) then
+      with TXmlSourceCodePiece(Items[i]) do begin
+        FOffset:= 0;
+        FOwner:= nil;
+      end;
+  inherited clear;
+end;
+
+procedure TXmlSourceCode.ClearAndFree;
+var
+  i: integer;
+begin
+  for i:= 0 to count -1 do
+    if assigned(Items[i]) then TXmlSourceCodePiece(Items[i]).free;
+  inherited clear;
+end;
+
+procedure TXmlSourceCode.Delete(Index: Integer);
+begin
+  if assigned(Items[index]) then
+    with TXmlSourceCodePiece(Items[index]) do begin
+      FOffset:= 0;
+      FOwner:= nil;
+    end;
+  inherited Delete(index);
+  calculatePieceOffset(Index);
+end;
+
+procedure TXmlSourceCode.Exchange(Index1, Index2: Integer);
+var
+  nr: integer;
+begin
+  nr:= MinIntValue([Index1,Index2]);
+  inherited Exchange(Index1,Index2);
+  calculatePieceOffset(nr);
+end;
+
+function TXmlSourceCode.GetPieceAtPos(pos: integer): TXmlSourceCodePiece;
+var
+  i: integer;
+begin
+  // xxx This search routine is not optimized.
+  Result:= nil;
+  if pos < 1 then exit;
+  for i:= 0 to count -1 do
+    if not assigned(Items[i]) then begin
+      pack;
+      Result:= getPieceAtPos(pos);
+    end else with TXmlSourceCodePiece(Items[i]) do begin
+      if (FOffset + length(FText)) >= pos then begin
+        Result:= TXmlSourceCodePiece(Items[i]);
+        exit;
+      end;
+    end;
+end;
+
+procedure TXmlSourceCode.Insert(Index: Integer; Item: pointer);
+begin
+  if assigned(Item) then begin
+    if not assigned(TXmlSourceCodePiece(Item).FOwner)
+      then TXmlSourceCodePiece(Item).FOwner:= self
+      else Error('Inuse source code piece error.',-1);
+  end else Error('Item not assigned error.',-1);
+  inherited Insert(Index,item);
+  calculatePieceOffset(index);
+end;
+
+procedure TXmlSourceCode.Move(CurIndex, NewIndex: Integer);
+var
+  nr: integer;
+begin
+  nr:= MinIntValue([CurIndex,NewIndex]);
+  inherited Move(CurIndex, NewIndex);
+  calculatePieceOffset(nr);
+end;
+
+procedure TXmlSourceCode.Pack;
+begin
+  inherited pack;
+  calculatePieceOffset(0);
+end;
+
+function TXmlSourceCode.Remove(Item: pointer): Integer;
+var
+  nr: integer;
+begin
+  nr:= IndexOf(Item);
+  result:= inherited Remove(Item);
+  if assigned(Items[nr]) then
+    with TXmlSourceCodePiece(Item) do begin
+      FOffset:= 0;
+      FOwner:= nil;
+    end;
+  calculatePieceOffset(nr);
+end;
+
+procedure TXmlSourceCode.Sort(Compare: TListSortCompare);
+begin
+  inherited Sort(Compare);
+  calculatePieceOffset(0);
+end;
+
+
+
+// ++++++++++++++++++++++++ TXmlSourceCodePiece ++++++++++++++++++++++++
+constructor TXmlSourceCodePiece.create(const pt: TdomPieceType);
+begin
+  FPieceType:= pt;
+  Ftext:= '';
+  FOffset:= 0;
+  FOwner:= nil;
+end;
+
+
+
+// ++++++++++++++++++++++++++ TXmlInputSource ++++++++++++++++++++++++++
+constructor TXmlInputSource.create(const stream: TStream;
+                                   const publicId,
+                                         systemId: UnicodeString;
+                                   const tabWidthValue: integer);
+var
+  line, column: integer;
+begin
+  if not assigned(stream)
+    then raise EStreamError.create('Stream not specified.');
+  inherited create;
+  FLastUcs4:= 0;
+  FLastCharWasCR:= false;
+  FStream:= stream;
+  FPublicId:= publicId;
+  FSystemId:= systemId;
+  FHasMalformedDecl:=
+    not evaluateXmlOrTextDecl( tabWidthValue,
+                               FDeclType,
+                               FEncoding,
+                               FVersionNumber,
+                               FEncodingName,
+                               FStandalone,
+                               line,
+                               column );
+  FStartPosition:= FStream.Position;
+  FLocator:= TdomInputSourceLocator.create(self,line,column,line,column,tabWidthValue);
+end;
+
+destructor TXmlInputSource.destroy;
+begin
+  FLocator.free;
+  inherited destroy;
+end;
+
+function TXmlInputSource.evaluateXmlOrTextDecl(const tabWidthValue: integer;
+                                                 out declType: TdomXMLDeclType;
+                                                 out encodingType: TdomEncodingType;
+                                                 out versionInfo,
+                                                     encName: UnicodeString;
+                                                 out standalone: TdomStandalone;
+                                                 out lineOffset,
+                                                     columnOffset: integer): boolean;
+var
+  BOM_Offset: integer;  // Byte order mark offset
+  ch: wideChar;
+  encType: TdomEncodingType;
+  loc: TdomInputSourceLocator;
+  qm: wideChar;
+  str1: wideChar;
+begin
+  result:= true;
+  declType:= DT_UNKNOWN;
+  encName:= '';
+  versionInfo:= '';
+  standalone:= STANDALONE_UNSPECIFIED;
+  lineOffset:= 0;
+  columnOffset:= 0;
+
+  try
+    FStream.ReadBuffer(str1,2);
+    case ord(str1) of
+      $feff: begin encodingType:= etUTF16BE; BOM_Offset:= 2; end;
+      $fffe: begin encodingType:= etUTF16LE; BOM_Offset:= 2; end;
+    else
+      encodingType:= etUTF8;
+      BOM_Offset:= 0;
+      FStream.seek(0,soFromBeginning);
+    end;
+  except
+    on EReadError do begin
+      encodingType:= etUTF8;
+      FStream.seek(0,soFromBeginning);
+      declType:= DT_UNSPECIFIED;
+      exit;
+    end;
+  end; {try ...}
+
+  try
+    loc:= TdomInputSourceLocator.create(self,1,1,1,1,tabWidthValue);
+    try
+      if getNextWideChar2(ch,encodingType,loc)
+        and ( ord(ch) = $003c )  // '<'
+        and getNextWideChar2(ch,encodingType,loc)
+        and ( ord(ch) = $003f )  // '?'
+        and getNextWideChar2(ch,encodingType,loc)
+        and ( ord(ch) = $0078 )  // 'x'
+        and getNextWideChar2(ch,encodingType,loc)
+        and ( ord(ch) = $006d )  // 'm'
+        and getNextWideChar2(ch,encodingType,loc)
+        and ( ord(ch) = $006c )  // 'l'
+      then begin // Does the stream start with '<?xml'?
+
+        declType:= DT_XML_OR_TEXT_DECLARATION;
+
+        if getNextWideChar2(ch,encodingType,loc) then begin
+
+          // Skip Whitespace:
+          while IsXmlWhiteSpace(ch) do
+            if not getNextWideChar2(ch,encodingType,loc) then begin
+              result:= false;
+              exit;
+            end;
+
+          // versionInfo:
+          if ( ord(ch) = $0076 ) then begin // 'v'
+            if getNextWideChar2(ch,encodingType,loc)
+              and ( ord(ch) = $0065 )  // 'e'
+              and getNextWideChar2(ch,encodingType,loc)
+              and ( ord(ch) = $0072 )  // 'r'
+              and getNextWideChar2(ch,encodingType,loc)
+              and ( ord(ch) = $0073 )  // 's'
+              and getNextWideChar2(ch,encodingType,loc)
+              and ( ord(ch) = $0069 )  // 'i'
+              and getNextWideChar2(ch,encodingType,loc)
+              and ( ord(ch) = $006f )  // 'o'
+              and getNextWideChar2(ch,encodingType,loc)
+              and ( ord(ch) = $006e )  // 'n'
+            then begin
+
+              if not getNextWideChar2(ch,encodingType,loc) then begin
+                result:= false;
+                exit;
+              end;
+
+              // Skip Whitespace:
+              while IsXmlWhiteSpace(ch) do
+                if not getNextWideChar2(ch,encodingType,loc) then begin
+                  result:= false;
+                  exit;
+                end;
+
+              if not ( ord(ch) = $003d ) then begin  // '='
+                result:= false;
+                exit;
+              end;
+
+              if not getNextWideChar2(ch,encodingType,loc) then begin
+                result:= false;
+                exit;
+              end;
+
+              // Skip Whitespace:
+              while IsXmlWhiteSpace(ch) do
+                if not getNextWideChar2(ch,encodingType,loc) then begin
+                  result:= false;
+                  exit;
+                end;
+
+              if not ( ( ord(ch) = $0022 ) or ( ord(ch) = $0027 ) ) then begin  // '"' or '''
+                result:= false;
+                exit;
+              end;
+
+              qm:= ch;
+
+              // Get version number:
+              if not getNextWideChar2(ch,encodingType,loc) then begin
+                result:= false;
+                exit;
+              end;
+              if isXmlVersionNumChar(ch) then begin
+                versionInfo:= ch;
+              end else begin
+                result:= false;
+                exit;
+              end;
+              if not getNextWideChar2(ch,encodingType,loc) then begin
+                result:= false;
+                exit;
+              end;
+              while isXmlVersionNumChar(ch) do begin
+                versionInfo:= concat(versionInfo,UnicodeString(ch));
+                if not getNextWideChar2(ch,encodingType,loc) then begin
+                  result:= false;
+                  exit;
+                end;
+              end;
+
+              if ch <> qm then begin  // Is the first quotation mark of the same type as the second?
+                result:= false;
+                exit;
+              end;
+
+              if not getNextWideChar2(ch,encodingType,loc) then begin
+                result:= false;
+                exit;
+              end;
+
+              // Skip Whitespace:
+              while IsXmlWhiteSpace(ch) do
+                if not getNextWideChar2(ch,encodingType,loc) then begin
+                  result:= false;
+                  exit;
+                end;
+
+            end else begin
+              result:= false;
+              exit;
+            end; {if ... else ...}
+          end else declType:= DT_TEXT_DECLARATION;
+
+          // EncodingDecl:
+          if ( ord(ch) = $0065 ) then begin // 'e'
+            if getNextWideChar2(ch,encodingType,loc)
+              and ( ord(ch) = $006e )  // 'n'
+              and getNextWideChar2(ch,encodingType,loc)
+              and ( ord(ch) = $0063 )  // 'c'
+              and getNextWideChar2(ch,encodingType,loc)
+              and ( ord(ch) = $006f )  // 'o'
+              and getNextWideChar2(ch,encodingType,loc)
+              and ( ord(ch) = $0064 )  // 'd'
+              and getNextWideChar2(ch,encodingType,loc)
+              and ( ord(ch) = $0069 )  // 'i'
+              and getNextWideChar2(ch,encodingType,loc)
+              and ( ord(ch) = $006e )  // 'n'
+              and getNextWideChar2(ch,encodingType,loc)
+              and ( ord(ch) = $0067 )  // 'g'
+            then begin
+
+              if not getNextWideChar2(ch,encodingType,loc) then begin
+                result:= false;
+                exit;
+              end;
+
+              // Skip Whitespace:
+              while IsXmlWhiteSpace(ch) do
+                if not getNextWideChar2(ch,encodingType,loc) then begin
+                  result:= false;
+                  exit;
+                end;
+
+              if not ( ord(ch) = $003d ) then begin  // '='
+                result:= false;
+                exit;
+              end;
+
+              if not getNextWideChar2(ch,encodingType,loc) then begin
+                result:= false;
+                exit;
+              end;
+
+              // Skip Whitespace:
+              while IsXmlWhiteSpace(ch) do
+                if not getNextWideChar2(ch,encodingType,loc) then begin
+                  result:= false;
+                  exit;
+                end;
+
+              if not ( ( ord(ch) = $0022 ) or ( ord(ch) = $0027 ) ) then begin  // '"' or '''
+                result:= false;
+                exit;
+              end;
+
+              qm:= ch;
+
+              // Get encoding name value:
+              if not getNextWideChar2(ch,encodingType,loc) then begin
+                result:= false;
+                exit;
+              end;
+              if isXmlEncNameLeadingChar(ch) then begin
+                encName:= ch;
+              end else begin
+                result:= false;
+                exit;
+              end;
+              if not getNextWideChar2(ch,encodingType,loc) then begin
+                result:= false;
+                exit;
+              end;
+              while isXmlEncNameFollowingChar(ch) do begin
+                encName:= concat(encName,UnicodeString(ch));
+                if not getNextWideChar2(ch,encodingType,loc) then begin
+                  result:= false;
+                  exit;
+                end;
+              end;
+
+              if ch <> qm then begin  // Is the first quotation mark of the same type as the second?
+                result:= false;
+                exit;
+              end;
+
+              if not getNextWideChar2(ch,encodingType,loc) then begin
+                result:= false;
+                exit;
+              end;
+
+              // Skip Whitespace:
+              while IsXmlWhiteSpace(ch) do
+                if not getNextWideChar2(ch,encodingType,loc) then begin
+                  result:= false;
+                  exit;
+                end;
+
+            end else begin
+              result:= false;
+              exit;
+            end; {if ... else ...}
+          end else begin
+            if declType = DT_TEXT_DECLARATION then begin
+              result:= false;
+              exit;
+            end else declType:= DT_XML_DECLARATION;
+          end; {if ... else ...}
+
+          // SDDecl:
+          if ( ord(ch) = $0073 ) then begin // 's'
+            if getNextWideChar2(ch,encodingType,loc)
+              and ( ord(ch) = $0074 )  // 't'
+              and getNextWideChar2(ch,encodingType,loc)
+              and ( ord(ch) = $0061 )  // 'a'
+              and getNextWideChar2(ch,encodingType,loc)
+              and ( ord(ch) = $006e )  // 'n'
+              and getNextWideChar2(ch,encodingType,loc)
+              and ( ord(ch) = $0064 )  // 'd'
+              and getNextWideChar2(ch,encodingType,loc)
+              and ( ord(ch) = $0061 )  // 'a'
+              and getNextWideChar2(ch,encodingType,loc)
+              and ( ord(ch) = $006c )  // 'l'
+              and getNextWideChar2(ch,encodingType,loc)
+              and ( ord(ch) = $006f )  // 'o'
+              and getNextWideChar2(ch,encodingType,loc)
+              and ( ord(ch) = $006e )  // 'n'
+              and getNextWideChar2(ch,encodingType,loc)
+              and ( ord(ch) = $0065 )  // 'e'
+            then begin
+
+              if declType = DT_TEXT_DECLARATION then begin
+                result:= false;
+                exit;
+              end else declType:= DT_XML_DECLARATION;
+
+              if not getNextWideChar2(ch,encodingType,loc) then begin
+                result:= false;
+                exit;
+              end;
+
+              // Skip Whitespace:
+              while IsXmlWhiteSpace(ch) do
+                if not getNextWideChar2(ch,encodingType,loc) then begin
+                  result:= false;
+                  exit;
+                end;
+
+              if not ( ord(ch) = $003d ) then begin  // '='
+                result:= false;
+                exit;
+              end;
+
+              if not getNextWideChar2(ch,encodingType,loc) then begin
+                result:= false;
+                exit;
+              end;
+
+              // Skip Whitespace:
+              while IsXmlWhiteSpace(ch) do
+                if not getNextWideChar2(ch,encodingType,loc) then begin
+                  result:= false;
+                  exit;
+                end;
+
+              if not ( ( ord(ch) = $0022 ) or ( ord(ch) = $0027 ) ) then begin  // '"' or '''
+                result:= false;
+                exit;
+              end;
+
+              qm:= ch;
+
+              // Get standalone document declaration value:
+              if not getNextWideChar2(ch,encodingType,loc) then begin
+                result:= false;
+                exit;
+              end;
+              case ord(ch) of
+                $0079: begin // 'y'
+                  if getNextWideChar2(ch,encodingType,loc)
+                    and ( ord(ch) = $0065 )  // 'e'
+                    and getNextWideChar2(ch,encodingType,loc)
+                    and ( ord(ch) = $0073 )  // 's'
+                    and getNextWideChar2(ch,encodingType,loc)
+                    then begin
+                      standalone:= STANDALONE_YES;
+                    end else begin
+                      result:= false;
+                      exit;
+                    end;
+                end;
+                $006e: begin // 'n'
+                  if getNextWideChar2(ch,encodingType,loc)
+                    and ( ord(ch) = $006f )  // 'o'
+                    and getNextWideChar2(ch,encodingType,loc)
+                    then begin
+                      standalone:= STANDALONE_NO;
+                    end else begin
+                      result:= false;
+                      exit;
+                    end;
+                end;
+              else
+                result:= false;
+                exit;
+              end; {case ...}
+
+              if ch <> qm then begin  // Is the first quotation mark of the same type as the second?
+                result:= false;
+                exit;
+              end;
+
+              if not getNextWideChar2(ch,encodingType,loc) then begin
+                result:= false;
+                exit;
+              end;
+
+              // Skip Whitespace:
+              while IsXmlWhiteSpace(ch) do
+                if not getNextWideChar2(ch,encodingType,loc) then begin
+                  result:= false;
+                  exit;
+                end;
+
+            end else begin
+              result:= false;
+              exit;
+            end; {if ... else ...}
+          end; {if ...}
+
+          // '?>':
+          if    ( ord(ch) = $003f ) // '?'
+            and getNextWideChar2(ch,encodingType,loc)
+            and ( ord(ch) = $003e )  // '>'
+          then begin
+
+            // Calculate encodingType:
+            encType:= StrToEncoding({$IFDEF UNICODE}AnsiStringToWideString{$ENDIF}(UTF16To7BitASCIIStr(encName)));
+            if encType <> etUnknown
+              then encodingType:= encType;
+
+          end else result:= false;
+
+        end else result:= false;
+
+      end else begin
+        declType:= DT_UNSPECIFIED;
+        FStream.seek(BOM_Offset,soFromBeginning);  // Set the stream position directly behind the byte order mark. 
+      end;
+
+    finally
+      lineOffset:= loc.lineNumber;
+      columnOffset:= loc.columnNumber;
+      loc.free;
+    end; {try ...}
+  except
+    result:= false;
+    FStream.seek(BOM_Offset,soFromBeginning);
+  end; {try ...}
+end;
+
+function TXmlInputSource.getNextWideChar2(var dest: wideChar;
+                                          const enc: TdomEncodingType;
+                                          const locator: TdomInputSourceLocator): boolean;
+const
+  CR: WideChar  = #13;
+  LF: WideChar  = #10;
+  MaxCode: array[1..6] of integer = ($7F,$7FF,$FFFF,$1FFFFF,$3FFFFFF,$7FFFFFFF);
+var
+  str0, first: AnsiChar;
+  CharSize, ucs4, mask: integer;
+begin
+  if stream.Position < stream.size
+    then result:= true
+    else begin result:= false; exit; end;
+  case Enc of
+    etUTF8: begin
+      if FLastUcs4>=$10000 then begin
+        // Output low surrogate
+        dest:=Utf16LowSurrogate(FLastUcs4);
+        FLastUcs4:= 0;
+      end else begin
+        stream.ReadBuffer(str0,1);
+        if ord(str0)>=$80 then	// UTF-8 sequence
+        begin
+          CharSize:=1;
+          first:=str0; mask:=$40; ucs4:=ord(str0);
+          if (ord(str0) and $C0<>$C0) then
+            raise EConvertError.CreateFmt('Invalid UTF-8 sequence at position %d',[stream.Position-1]);
+          while (mask and ord(first)<>0) do
+          begin
+            // read next character of stream
+            if stream.Position=stream.size then
+              raise EConvertError.CreateFmt('Aborted UTF-8 sequence at position %d',[stream.Position]);
+            stream.ReadBuffer(str0,1);
+            if (ord(str0) and $C0<>$80) then
+              raise EConvertError.CreateFmt('Invalid UTF-8 sequence at position %d',[stream.Position-1]);
+            ucs4:=(ucs4 shl 6) or (ord(str0) and $3F); // add bits to result
+            Inc(CharSize);	// increase sequence length
+            mask:=mask shr 1;	// adjust mask
+          end;
+          if (CharSize>6) then	// no 0 bit in sequence header 'first'
+              raise EConvertError.CreateFmt('Invalid UTF-8 sequence at position %d',[stream.Position-1]);
+          ucs4:=ucs4 and MaxCode[CharSize];	// dispose of header bits
+          // check for invalid sequence as suggested by RFC2279
+          if ((CharSize>1) and (ucs4<=MaxCode[CharSize-1])) then
+              raise EConvertError.CreateFmt('Invalid UTF-8 encoding at position %d',[stream.Position-1]);
+          if (ucs4>=$10000) then
+          begin
+            // Buffer storage of the ucs4 value for output of the
+            // low surrogate at the next function call
+            FLastUcs4:= ucs4;
+            // Output high surrogate
+            dest:=Utf16HighSurrogate(ucs4);
+          end
+          else
+            dest:= WideChar(ord(ucs4));
+        end
+        else
+          dest:= WideChar(ord(str0));
+      end; {if FLastUcs4 ... else ...}
+    end;
+    etUTF16BE: begin
+      stream.ReadBuffer(dest,2);
+    end;
+    etUTF16LE: begin
+      stream.ReadBuffer(dest,2);
+      dest:= wideChar(Swap(ord(dest)));
+    end;
+  else
+    stream.ReadBuffer(str0,1);
+    dest:= SingleByteEncodingToUTF16Char(str0,Enc);
+  end; {case ...}
+
+  // normalize CRLF or a single CR to LF:
+  if (dest = LF) and FLastCharWasCR then begin
+    FLastCharWasCR:= false;
+    result:= getNextWideChar2(dest,enc,locator);
+  end else begin
+    if dest = CR then begin
+      FLastCharWasCR:= true;
+      dest:= LF;
+    end else FLastCharWasCR:= false;
+    if assigned(locator) then locator.evaluate(dest);
+  end;
+
+end;
+
+function TXmlInputSource.getNextWideChar(var dest: wideChar): boolean;
+begin
+  try
+    result:= getNextWideChar2(dest,FEncoding,FLocator);
+  except
+    on EConvertError do begin
+      result:= true;
+      dest:= #0;  // #0 is not a legal XML character. So it is suitable
+                  // to indicate a malformed character in the source.
+      if assigned(locator) then locator.evaluate(#0);
+    end;
+  end;
+end;
+
+function TXmlInputSource.getStreamAsWideString: UnicodeString;
+var
+  oldPosition: longint;
+  oldFLastUcs4: integer;
+  oldFLastCharWasCR: boolean;
+  content: TdomCustomStr;
+  str1: WideChar;
+begin
+  try
+    oldPosition:= FStream.Position;
+    oldFLastUcs4:= FLastUcs4;
+    oldFLastCharWasCR:= FLastCharWasCR;
+    content:= TdomCustomStr.create;
+    try
+      FStream.seek(FStartPosition,soFromBeginning);
+      while getNextWideChar2(str1,FEncoding,nil) do begin
+        content.addWideChar(str1)
+      end;
+      result:= content.value;
+    finally
+      content.free;
+      FLastUcs4:= oldFLastUcs4;
+      FLastCharWasCR:= oldFLastCharWasCR;
+      FStream.seek(oldPosition,soFromBeginning);
+    end;
+  except
+    raise EConvertError.create('Invalid character code error.');
+  end;
+end;
+
+
+
+// ++++++++++++++++++++++++++ TdomError ++++++++++++++++++++++++++
+constructor TdomError.create(const errorType: TXmlErrorType;
+                             const startLine,
+                                   startColumn,
+                                   endLine,
+                                   endColumn,
+                                   offs: integer;
+                             const uriStr: UnicodeString;
+                             const rCMNode: TdomCMNode;
+                             const rNode: TdomNode;
+                             const code: UnicodeString);
+begin
+  inherited create;
+  FLanguage:= iso639_en;
+  FSupportedLanguages:= [ iso639_de, // German
+                          iso639_en, // English
+                          iso639_es, // Spanish
+                          iso639_fr, // French
+                          iso639_it, // Italian
+                          iso639_nl, // Dutch
+                          iso639_pl, // Polish
+                          iso639_pt  // Portuguese
+                        ];
+  FRelatedException:= errorType;
+  FCode:= Code;
+  FLocation:= TdomLocator.create(startLine,startColumn,endLine,endColumn,offs,UriStr,rCMNode,rNode);
+end;
+
+constructor TdomError.createFromLocator(const errorType: TXmlErrorType;
+                                        const location: TdomLocator;
+                                        const code: UnicodeString);
+begin
+  if assigned(location) then
+    with location do
+      self.create(errorType,
+                  startLineNumber,
+                  startColumnNumber,
+                  lineNumber,
+                  columnNumber,
+                  offset,
+                  uri,
+                  relatedCMNode,
+                  relatedNode,
+                  code)
+   else create(errorType,0,0,0,0,-1,'',nil,nil,code);
+end;
+
+destructor TdomError.destroy;
+begin
+  FLocation.free;
+  inherited;
+end;
+
+function TdomError.getSeverity: TdomSeverity;
+begin
+  if FRelatedException in ET_FATAL_ERRORS
+    then result:= DOM_SEVERITY_FATAL_ERROR
+  else if FRelatedException in ET_ERRORS
+    then result:= DOM_SEVERITY_ERROR
+  else result:= DOM_SEVERITY_WARNING;
+end;
+
+function TdomError.getDutchErrorStr: UnicodeString;
+// - This function was provided by Erik van der Poll,
+// Incore Automatisering b.v., Amsterdam -
+var
+  ErrorTypeStr,DocStr,ErrorStr1,ErrorStr2: string;
+begin
+  case severity of
+    DOM_SEVERITY_FATAL_ERROR: ErrorTypeStr:='FATALE FOUT ';
+    DOM_SEVERITY_ERROR: ErrorTypeStr:='FOUT ';
+    DOM_SEVERITY_WARNING: ErrorTypeStr:='WAARSCHUWING: ';
+  end;
+
+  with FLocation do begin
+    DocStr:= concat('in document ',uri,' ');
+    if lineNumber = -1 then ErrorStr1:= ''
+    else if startLineNumber = lineNumber then begin
+      if startColumnNumber = columnNumber
+        then FmtStr(ErrorStr1,'in regel %d, positie %d',[lineNumber,columnNumber])
+        else FmtStr(ErrorStr1,'in regel %d, tussen positie %d en %d',[lineNumber,startColumnNumber,columnNumber]);
+    end else begin
+      FmtStr(ErrorStr1,'tussen regel %d, positie %d en regel %d, positie %d',[startLineNumber,startColumnNumber,lineNumber,columnNumber]);
+    end;
+  end;
+
+  case FRelatedException of
+    ET_INVALID_ELEMENT_NAME:
+      ErrorStr2:= 'Onjuiste element naam';
+    ET_DOUBLE_ROOT_ELEMENT:
+      ErrorStr2:= 'Dubbel begin element';
+    ET_DOUBLE_DOCTYPE:
+      ErrorStr2:= 'Dubbele document type declaratie (DTD)';
+    ET_INVALID_ATTRIBUTE_NAME:
+      ErrorStr2:= 'Onjuiste attribuut name';
+    ET_INVALID_ATTRIBUTE_VALUE:
+      ErrorStr2:= 'Onjuiste attribuut waarde';
+    ET_DOUBLE_ATTRIBUTE_NAME:
+      ErrorStr2:= 'Dubbele attribuut name in een element';
+    ET_INVALID_ENTITY_NAME:
+      ErrorStr2:= 'Onjuiste entiteit naam';
+    ET_INVALID_PROCESSING_INSTRUCTION:
+      ErrorStr2:= 'Onjuiste verwerkings code';
+    ET_INVALID_XML_DECL:
+      ErrorStr2:= 'Onuiste XML declaratie';
+    ET_INVALID_CHARREF:
+      ErrorStr2:= 'Onjuiste karakter referentie';
+    ET_MISSING_QUOTATION_MARK:
+      ErrorStr2:= 'Aanhalingstekens ontbreken';
+    ET_MISSING_EQUALITY_SIGN:
+      ErrorStr2:= 'Is-teken ontbreekt';
+    ET_DOUBLE_EQUALITY_SIGN:
+      ErrorStr2:= 'Dubbel is-teken';
+    ET_MISSING_WHITE_SPACE:
+      ErrorStr2:= 'Ontbrekende spaties';
+    ET_MISSING_START_TAG:
+      ErrorStr2:= 'Eind-tag zonder begin-tag';
+    ET_MISSING_END_TAG:
+      ErrorStr2:= 'Eind-tag ontbreekt';
+    ET_INVALID_CHARACTER:
+      ErrorStr2:= 'Onjuist karakter';
+    ET_NOT_IN_ROOT:
+      ErrorStr2:= 'Tekst buiten het begin element';
+    ET_INVALID_DOCTYPE:
+      ErrorStr2:= 'Onjuiste documenttype declaratie';
+    ET_WRONG_ORDER:
+      ErrorStr2:= 'Volgorde fout';
+    ET_UNKNOWN_DECL_TYPE:
+      ErrorStr2:= 'Onbekend declaratie type';
+    ET_INVALID_ENTITY_DECL:
+      ErrorStr2:= 'Onjuiste entiteits declaratie';
+    ET_INVALID_ELEMENT_DECL:
+      ErrorStr2:= 'Onjuiste element declaratie';
+    ET_INVALID_ATTRIBUTE_DECL:
+      ErrorStr2:= 'Onjuiste attribuut declaratie';
+    ET_INVALID_NOTATION_DECL:
+      ErrorStr2:= 'Onjuiste notatie declaratie';
+    ET_INVALID_CONDITIONAL_SECTION:
+      ErrorStr2:= 'Onjuiste conditionele sectie';
+    ET_INVALID_TEXT_DECL:
+      ErrorStr2:= 'Onjuiste tekst declaratie';
+    ET_LT_IN_ATTRIBUTE_VALUE:
+      ErrorStr2:= '''<'' in de vervangingstekst van een attribuut waarde';
+    ET_ATTRIBUTE_VALUE_REFERS_TO_EXTERNAL_ENTITY:
+      ErrorStr2:= 'Attribuut waarde verwijst naar externe entiteit';
+    ET_RECURSIVE_REFERENCE:
+      ErrorStr2:= 'ET_RECURSIVE_REFERENCE';
+    ET_REFERENCE_TO_UNPARSED_ENTITY:
+      ErrorStr2:= 'Referentie naar een niet ingelezen entiteit';
+    ET_NO_PROPER_MARKUP_REFERENCED:
+      ErrorStr2:= 'Referentie naar een entiteit zonder juiste opmaak';
+    ET_INVALID_COMMENT:
+      ErrorStr2:= 'Fout in commentaar';
+    ET_INVALID_CDATA_SECTION:
+      ErrorStr2:= 'Onjuiste CDATA sectie';
+    ET_INVALID_SYSTEM_LITERAL:
+      ErrorStr2:= 'Onjuiste systeem tekst';
+    ET_INVALID_PUBID_LITERAL:
+      ErrorStr2:= 'Onjuiste publieke tekst';
+    ET_INVALID_QUALIFIED_NAME:
+      ErrorStr2:= 'ET_INVALID_QUALIFIED_NAME';
+    ET_INVALID_PREFIX:
+      ErrorStr2:= 'ET_INVALID_PREFIX';
+    ET_INVALID_NAMESPACE_URI:
+      ErrorStr2:= 'ET_INVALID_NAMESPACE_URI';
+    ET_NAMESPACE_URI_NOT_FOUND:
+      ErrorStr2:= 'ET_NAMESPACE_URI_NOT_FOUND';
+    ET_WRONG_PREFIX_MAPPING_NESTING:
+      ErrorStr2:= 'ET_WRONG_PREFIX_MAPPING_NESTING';
+    ET_ENCODING_NOT_SUPPORTED:
+      ErrorStr2:= 'ET_ENCODING_NOT_SUPPORTED';
+    ET_DOUBLE_ATTDEF:
+      ErrorStr2:= 'Dubbele attribuut definitie';
+    ET_DOUBLE_ENTITY_DECL:
+      ErrorStr2:= 'Dubbele entiteit declaratie';
+    ET_DOUBLE_PARAMETER_ENTITY_DECL:
+      ErrorStr2:= 'Dubbele parameter entiteit declaratie';
+    ET_UNUSABLE_ENTITY_DECL:
+      ErrorStr2:= 'Onbruikbare entiteit gedefinieerd';
+    ET_ENTITY_DECL_NOT_FOUND:
+      ErrorStr2:= 'Ontbrekende entiteit declaratie';
+    ET_DUPLICATE_ELEMENT_TYPE_DECL:
+      ErrorStr2:= 'Dubbele element type declaratie';
+    ET_DUPLICATE_NAME_IN_MIXED_CONTENT:
+      ErrorStr2:= 'Naam komt meer keren voor in gemengde inhoud';
+    ET_DUPLICATE_ID_ON_ELEMENT_TYPE:
+      ErrorStr2:= 'Dubbel ID attribuut binnen hetzelfde element type';
+    ET_UNDECLARED_NOTATION_NAME:
+      ErrorStr2:= 'Niet gedefinieerde notatie naam';
+    ET_DUPLICATE_NOTATION_ON_ELEMENT_TYPE:
+      ErrorStr2:= 'Dubbel notatie attribuut binnen hetzelfde element type';
+    ET_DUPLICATE_NOTATION_TOKEN:
+      ErrorStr2:= 'ET_DUPLICATE_NOTATION_TOKEN';
+    ET_NOTATION_ON_EMPTY_ELEMENT:
+      ErrorStr2:= 'Notatie attribuut definitie voor een leeg element type';
+    ET_DUPLICATE_ENUMERATION_TOKEN:
+      ErrorStr2:= 'ET_DUPLICATE_ENUMERATION_TOKEN';
+    ET_ATTRIBUTE_TYPE_MISMATCH:
+      ErrorStr2:= 'Attribuut type en attribuut waarde komen niet overeen';
+    ET_DUPLICATE_TOKENS:
+      ErrorStr2:= 'Tokens meermalen gedefinieerd';
+    ET_ID_NEITHER_IMPLIED_NOR_REQUIRED:
+      ErrorStr2:= 'ID attribuut is niet gedefinieerd als #IMPLIED of #REQUIRED';
+    ET_WRONG_ROOT_ELEMENT_TYPE:
+      ErrorStr2:= 'Type van begin element komt niet overeen met de naam van de document type declaratie';
+    ET_ELEMENT_TYPE_DECL_NOT_FOUND:
+      ErrorStr2:= 'Element type declaratie niet gevonden';
+    ET_ELEMENT_DECLARED_EMPTY_HAS_CONTENT:
+      ErrorStr2:= 'Element met definitie EMPTY is niet leeg';
+    ET_ELEMENT_WITH_ILLEGAL_MIXED_CONTENT:
+      ErrorStr2:= 'Inhoud van een element met gemengde inhoud komt niet overeen met de declaratie';
+    ET_ELEMENT_WITH_ILLEGAL_ELEMENT_CONTENT:
+      ErrorStr2:= 'Inhoud van een element met element inhoud komt niet overeen met de declaratie';
+    ET_NONDETERMINISTIC_ELEMENT_CONTENT_MODEL:
+      ErrorStr2:= 'Inhoud element model is niet deterministisch';
+    ET_DUPLICATE_NOTATION_DECL:
+      ErrorStr2:= 'Dubbele notatie declaratie';
+    ET_ATTRIBUTE_DEFINITION_NOT_FOUND:
+      ErrorStr2:= 'Attribuut definitie niet gevonden';
+    ET_REQUIRED_ATTRIBUTE_NOT_FOUND:
+      ErrorStr2:= 'Verplicht attribuut niet gevonden';
+    ET_FIXED_ATTRIBUTE_MISMATCH:
+      ErrorStr2:= 'Gedefinieerde waarde en werkelijke waarde van een vast attribuut komen niet overeen';
+    ET_ATTRIBUTE_DEFAULT_TYPE_MISMATCH:
+      ErrorStr2:= 'Attribuut type en attribuut default waarde komen niet overeen';
+    ET_DUPLICATE_ID_VALUE:
+      ErrorStr2:= 'Dubbele ID waarde';
+    ET_TARGET_ID_VALUE_NOT_FOUND:
+      ErrorStr2:= 'IDREF of IDREFS waarde verwijst naar een niet bestaande ID waarde';
+    ET_TARGET_UNPARSED_ENTITY_NOT_FOUND:
+      ErrorStr2:= 'ENTITY of ENTITIES waarde verwijst naar een niet bestaande entiteit';
+    ET_WRONG_DECL_OF_PREDEFINED_ENTITY:
+      ErrorStr2:= 'Foute declaratie voor een voorgedefinieerde entiteit';
+    ET_UNRESOLVABLE_ENTITY_REFERENCE:
+      ErrorStr2:= 'Niet oplosbare entiteit referentie';
+    ET_UNRESOLVABLE_PARAMETER_ENTITY_REFERENCE:
+      ErrorStr2:= 'Niet oplosbare parameter entiteit referentie';
+    ET_EXTERNAL_SUBSET_NOT_FOUND:
+      ErrorStr2:= 'Externe subset van de DTD niet gevonden';
+    ET_PARAMETER_ENTITY_DECL_NOT_FOUND:
+      ErrorStr2:= 'Parameter entiteit declaratie niet gevonden';
+  else
+    ErrorStr2:= 'Fout in broncode';
+  end; {case ...}
+  result:= {$IFNDEF UNICODE}Iso8859_1ToUTF16Str{$ENDIF}(ErrorTypeStr+DocStr+ErrorStr1+' -- '+ErrorStr2);
+end;
+
+function TdomError.getEnglishErrorStr: UnicodeString;
+var
+  ErrorTypeStr,DocStr,ErrorStr1,ErrorStr2: string;
+begin
+  case severity of
+    DOM_SEVERITY_FATAL_ERROR: ErrorTypeStr:='FATAL ERROR ';
+    DOM_SEVERITY_ERROR: ErrorTypeStr:='ERROR ';
+    DOM_SEVERITY_WARNING: ErrorTypeStr:='WARNING: ';
+  end;
+
+  with FLocation do begin
+    DocStr:= concat('in document ',uri,' ');
+    if lineNumber = -1 then ErrorStr1:= ''
+    else if startLineNumber = lineNumber then begin
+      if startColumnNumber = columnNumber
+        then FmtStr(ErrorStr1,'in line %d, position %d',[lineNumber,columnNumber])
+        else FmtStr(ErrorStr1,'in line %d, between position %d and %d',[lineNumber,startColumnNumber,columnNumber]);
+    end else begin
+      FmtStr(ErrorStr1,'between line %d, position %d and line %d, position %d',[startLineNumber,startColumnNumber,lineNumber,columnNumber]);
+    end;
+  end;
+
+  case FRelatedException of
+    ET_INVALID_ELEMENT_NAME:
+      ErrorStr2:= 'Invalid element name';
+    ET_DOUBLE_ROOT_ELEMENT:
+      ErrorStr2:= 'Double root element';
+    ET_DOUBLE_DOCTYPE:
+      ErrorStr2:= 'Double document type declaration (DTD)';
+    ET_INVALID_ATTRIBUTE_NAME:
+      ErrorStr2:= 'Invalid attribute name';
+    ET_INVALID_ATTRIBUTE_VALUE:
+      ErrorStr2:= 'Invalid attribute value';
+    ET_DOUBLE_ATTRIBUTE_NAME:
+      ErrorStr2:= 'Double attribute name in one element';
+    ET_INVALID_ENTITY_NAME:
+      ErrorStr2:= 'Invalid entity name';
+    ET_INVALID_PROCESSING_INSTRUCTION:
+      ErrorStr2:= 'Invalid processing instruction';
+    ET_INVALID_XML_DECL:
+      ErrorStr2:= 'Invalid XML declaration';
+    ET_INVALID_CHARREF:
+      ErrorStr2:= 'Invalid character reference';
+    ET_MISSING_QUOTATION_MARK:
+      ErrorStr2:= 'Missing quotation marks';
+    ET_MISSING_EQUALITY_SIGN:
+      ErrorStr2:= 'Missing equality sign';
+    ET_DOUBLE_EQUALITY_SIGN:
+      ErrorStr2:= 'Double equality sign';
+    ET_MISSING_WHITE_SPACE:
+      ErrorStr2:= 'Missing white-space';
+    ET_MISSING_START_TAG:
+      ErrorStr2:= 'End-tag without start-tag';
+    ET_MISSING_END_TAG:
+      ErrorStr2:= 'Missing end-tag';
+    ET_INVALID_CHARACTER:
+      ErrorStr2:= 'Invalid character';
+    ET_NOT_IN_ROOT:
+      ErrorStr2:= 'Character(s) outside the root-element';
+    ET_INVALID_DOCTYPE:
+      ErrorStr2:= 'Invalid doctype declaration';
+    ET_WRONG_ORDER:
+      ErrorStr2:= 'Wrong order';
+    ET_UNKNOWN_DECL_TYPE:
+      ErrorStr2:= 'Unknown declaration type';
+    ET_INVALID_ENTITY_DECL:
+      ErrorStr2:= 'Invalid entity declaration';
+    ET_INVALID_ELEMENT_DECL:
+      ErrorStr2:= 'Invalid element declaration';
+    ET_INVALID_ATTRIBUTE_DECL:
+      ErrorStr2:= 'Invalid attribute declaration';
+    ET_INVALID_NOTATION_DECL:
+      ErrorStr2:= 'Invalid notation declaration';
+    ET_INVALID_CONDITIONAL_SECTION:
+      ErrorStr2:= 'Invalid conditional section';
+    ET_INVALID_TEXT_DECL:
+      ErrorStr2:= 'Invalid text declaration';
+    ET_LT_IN_ATTRIBUTE_VALUE:
+      ErrorStr2:= '''<'' in the replacement text of an attribute value';
+    ET_ATTRIBUTE_VALUE_REFERS_TO_EXTERNAL_ENTITY:
+      ErrorStr2:= 'Attribute value refers to external entity';
+    ET_RECURSIVE_REFERENCE:
+      ErrorStr2:= 'Recursive reference found';
+    ET_REFERENCE_TO_UNPARSED_ENTITY:
+      ErrorStr2:= 'Reference to an unparsed entity';
+    ET_NO_PROPER_MARKUP_REFERENCED:
+      ErrorStr2:= 'Reference to an entity containing no proper markup';
+    ET_INVALID_COMMENT:
+      ErrorStr2:= 'Invalid comment';
+    ET_INVALID_CDATA_SECTION:
+      ErrorStr2:= 'Invalid CDATA section';
+    ET_INVALID_SYSTEM_LITERAL:
+      ErrorStr2:= 'Invalid system literal';
+    ET_INVALID_PUBID_LITERAL:
+      ErrorStr2:= 'Invalid pubid literal';
+    ET_INVALID_QUALIFIED_NAME:
+      ErrorStr2:= 'Invalid qualified name';
+    ET_INVALID_PREFIX:
+      ErrorStr2:= 'Invalid prefix';
+    ET_INVALID_NAMESPACE_URI:
+      ErrorStr2:= 'Invalid namespace URI';
+    ET_NAMESPACE_URI_NOT_FOUND:
+      ErrorStr2:= 'Namespace URI not found';
+    ET_WRONG_PREFIX_MAPPING_NESTING:
+      ErrorStr2:= 'Wrong prefix mapping nesting';
+    ET_ENCODING_NOT_SUPPORTED:
+      ErrorStr2:= 'Encoding not supported';
+    ET_DOUBLE_ATTDEF:
+      ErrorStr2:= 'Double attribute defintion';
+    ET_DOUBLE_ENTITY_DECL:
+      ErrorStr2:= 'Double entity declaration';
+    ET_DOUBLE_PARAMETER_ENTITY_DECL:
+      ErrorStr2:= 'Double parameter entity declaration';
+    ET_UNUSABLE_ENTITY_DECL:
+      ErrorStr2:= 'Unusable entity declared';
+    ET_ENTITY_DECL_NOT_FOUND:
+      ErrorStr2:= 'Entity declaration not found';
+    ET_DUPLICATE_ELEMENT_TYPE_DECL:
+      ErrorStr2:= 'Double element type declaration';
+    ET_DUPLICATE_NAME_IN_MIXED_CONTENT:
+      ErrorStr2:= 'Duplicate name in mixed content';
+    ET_DUPLICATE_ID_ON_ELEMENT_TYPE:
+      ErrorStr2:= 'Duplicate ID attribute on the same element type declared';
+    ET_UNDECLARED_NOTATION_NAME:
+      ErrorStr2:= 'Undeclared notation name';
+    ET_DUPLICATE_NOTATION_ON_ELEMENT_TYPE:
+      ErrorStr2:= 'Duplicate notation attribute on the same element type declared';
+    ET_DUPLICATE_NOTATION_TOKEN:
+      ErrorStr2:= 'Duplicate notation token';
+    ET_NOTATION_ON_EMPTY_ELEMENT:
+      ErrorStr2:= 'Notation attribute on an empty element type declared';
+    ET_DUPLICATE_ENUMERATION_TOKEN:
+      ErrorStr2:= 'Duplicate enumeration token';
+    ET_ATTRIBUTE_TYPE_MISMATCH:
+      ErrorStr2:= 'Attribute type and attribute value do not match';
+    ET_DUPLICATE_TOKENS:
+      ErrorStr2:= 'Duplicate tokens declared';
+    ET_ID_NEITHER_IMPLIED_NOR_REQUIRED:
+      ErrorStr2:= 'ID attribute is neither declared as #IMPLIED nor as #REQUIRED';
+    ET_WRONG_ROOT_ELEMENT_TYPE:
+      ErrorStr2:= 'Type of root element does not match name of document type declaration';
+    ET_ELEMENT_TYPE_DECL_NOT_FOUND:
+      ErrorStr2:= 'Element type declaration not found';
+    ET_ELEMENT_DECLARED_EMPTY_HAS_CONTENT:
+      ErrorStr2:= 'Element declared EMPTY is not empty';
+    ET_ELEMENT_WITH_ILLEGAL_MIXED_CONTENT:
+      ErrorStr2:= 'Content of an element with mixed content does not match the declaration';
+    ET_ELEMENT_WITH_ILLEGAL_ELEMENT_CONTENT:
+      ErrorStr2:= 'Content of an element with element content does not match the declaration';
+    ET_NONDETERMINISTIC_ELEMENT_CONTENT_MODEL:
+      ErrorStr2:= 'Content model of an element is not deterministic';
+    ET_DUPLICATE_NOTATION_DECL:
+      ErrorStr2:= 'Duplicate notation declaration';
+    ET_ATTRIBUTE_DEFINITION_NOT_FOUND:
+      ErrorStr2:= 'Attribute definition not found';
+    ET_REQUIRED_ATTRIBUTE_NOT_FOUND:
+      ErrorStr2:= 'Required attribute not found';
+    ET_FIXED_ATTRIBUTE_MISMATCH:
+      ErrorStr2:= 'Declared value and actual value of a fixed attribute do not match';
+    ET_ATTRIBUTE_DEFAULT_TYPE_MISMATCH:
+      ErrorStr2:= 'Attribute type and attribute default do not match';
+    ET_DUPLICATE_ID_VALUE:
+      ErrorStr2:= 'Duplicate ID value';
+    ET_TARGET_ID_VALUE_NOT_FOUND:
+      ErrorStr2:= 'IDREF or IDREFS value refers to a non-existent target ID value';
+    ET_TARGET_UNPARSED_ENTITY_NOT_FOUND:
+      ErrorStr2:= 'ENTITY or ENTITIES value refers to a non-existent target unparsed entity';
+    ET_WRONG_DECL_OF_PREDEFINED_ENTITY:
+      ErrorStr2:= 'Wrong declaration of a predefined entity';
+    ET_UNRESOLVABLE_ENTITY_REFERENCE:
+      ErrorStr2:= 'Unresolvable entity reference';
+    ET_UNRESOLVABLE_PARAMETER_ENTITY_REFERENCE:
+      ErrorStr2:= 'Unresolvable parameter entity reference';
+    ET_EXTERNAL_SUBSET_NOT_FOUND:
+      ErrorStr2:= 'External subset of the DTD not found';
+    ET_PARAMETER_ENTITY_DECL_NOT_FOUND:
+      ErrorStr2:= 'Parameter entity declaration not found';
+  else
+    ErrorStr2:= 'Invalid source-code';
+  end; {case ...}
+
+  result:= {$IFNDEF UNICODE}Iso8859_1ToUTF16Str{$ENDIF}(ErrorTypeStr + DocStr + ErrorStr1 + ' -- ' + ErrorStr2);
+end;
+
+function TdomError.getFrenchErrorStr: UnicodeString;
+// - This function was provided by Bernard Eblin -
+var
+  ErrorTypeStr,DocStr,ErrorStr1,ErrorStr2: string;
+begin
+  case severity of
+    DOM_SEVERITY_FATAL_ERROR: ErrorTypeStr:='ERREUR FATALE ';
+    DOM_SEVERITY_ERROR: ErrorTypeStr:='ERREUR ';
+    DOM_SEVERITY_WARNING: ErrorTypeStr:='ATTENTION: ';
+  end;
+
+  with FLocation do begin
+    DocStr:= concat('dans le document ',uri,' ');
+    if lineNumber = -1 then ErrorStr1:= ''
+    else if startLineNumber = lineNumber then begin
+      if startColumnNumber = columnNumber
+        then FmtStr(ErrorStr1,'à la ligne %d, position %d',[lineNumber,columnNumber])
+        else FmtStr(ErrorStr1,'à la ligne %d, entre la position %d et %d',[lineNumber,startColumnNumber,columnNumber]);
+    end else begin
+      FmtStr(ErrorStr1,'entre la ligne %d, position %d et la ligne %d, position %d',[startLineNumber,startColumnNumber,lineNumber,columnNumber]);
+    end;
+  end;
+
+  case FRelatedException of
+    ET_INVALID_ELEMENT_NAME:
+      ErrorStr2:= 'Nom d'';élément invalide';
+    ET_DOUBLE_ROOT_ELEMENT:
+      ErrorStr2:= 'Double élément racine';
+    ET_DOUBLE_DOCTYPE:
+      ErrorStr2:= 'Double déclaration de type de document (DTD)';
+    ET_INVALID_ATTRIBUTE_NAME:
+      ErrorStr2:= 'Nom d'';attribut invalide';
+    ET_INVALID_ATTRIBUTE_VALUE:
+      ErrorStr2:= 'Valeur d'';attribut invalide';
+    ET_DOUBLE_ATTRIBUTE_NAME:
+      ErrorStr2:= 'Double nom d'';atribut dans un élément';
+    ET_INVALID_ENTITY_NAME:
+      ErrorStr2:= 'Nom d'';entité invalide';
+    ET_INVALID_PROCESSING_INSTRUCTION:
+      ErrorStr2:= 'Instruction de commande invalide';
+    ET_INVALID_XML_DECL:
+      ErrorStr2:= 'Déclaration XML invalide';
+    ET_INVALID_CHARREF:
+      ErrorStr2:= 'Référence de caractère invalide';
+    ET_MISSING_QUOTATION_MARK:
+      ErrorStr2:= 'Apostrophe (''): manquant';
+    ET_MISSING_EQUALITY_SIGN:
+      ErrorStr2:= 'Signe égale manquant';
+    ET_DOUBLE_EQUALITY_SIGN:
+      ErrorStr2:= 'Double signe égale';
+    ET_MISSING_WHITE_SPACE:
+      ErrorStr2:= 'Espace manquant';
+    ET_MISSING_START_TAG:
+      ErrorStr2:= 'Tag de fin sans tag de début';
+    ET_MISSING_END_TAG:
+      ErrorStr2:= 'Tag de fin manquant';
+    ET_INVALID_CHARACTER:
+      ErrorStr2:= 'Caractère invalide';
+    ET_NOT_IN_ROOT:
+      ErrorStr2:= 'Caractère(s) en dehors de l'';élément racine';
+    ET_INVALID_DOCTYPE:
+      ErrorStr2:= 'Déclaration de type de document invalide';
+    ET_WRONG_ORDER:
+      ErrorStr2:= 'Mauvais ordre';
+    ET_UNKNOWN_DECL_TYPE:
+      ErrorStr2:= 'Déclaration de type inconnue';
+    ET_INVALID_ENTITY_DECL:
+      ErrorStr2:= 'Déclaration d'';entité invalide';
+    ET_INVALID_ELEMENT_DECL:
+      ErrorStr2:= 'Déclaration d'';élément invalide';
+    ET_INVALID_ATTRIBUTE_DECL:
+      ErrorStr2:= 'Déclaration d'';attribut invalide';
+    ET_INVALID_NOTATION_DECL:
+      ErrorStr2:= 'Déclaration de notation invalide';
+    ET_INVALID_CONDITIONAL_SECTION:
+      ErrorStr2:= 'Section conditionnelle invalide';
+    ET_INVALID_TEXT_DECL:
+      ErrorStr2:= 'Déclaration de texte invalide';
+    ET_LT_IN_ATTRIBUTE_VALUE:
+      ErrorStr2:= 'ET_LT_IN_ATTRIBUTE_VALUE';
+    ET_ATTRIBUTE_VALUE_REFERS_TO_EXTERNAL_ENTITY:
+      ErrorStr2:= 'ET_ATTRIBUTE_VALUE_REFERS_TO_EXTERNAL_ENTITY';
+    ET_RECURSIVE_REFERENCE:
+      ErrorStr2:= 'ET_RECURSIVE_REFERENCE';
+    ET_REFERENCE_TO_UNPARSED_ENTITY:
+      ErrorStr2:= 'ET_REFERENCE_TO_UNPARSED_ENTITY';
+    ET_NO_PROPER_MARKUP_REFERENCED:
+      ErrorStr2:= 'ET_NO_PROPER_MARKUP_REFERENCED';
+    ET_INVALID_COMMENT:
+      ErrorStr2:= 'ET_INVALID_COMMENT';
+    ET_INVALID_CDATA_SECTION:
+      ErrorStr2:= 'ET_INVALID_CDATA_SECTION';
+    ET_INVALID_SYSTEM_LITERAL:
+      ErrorStr2:= 'ET_INVALID_SYSTEM_LITERAL';
+    ET_INVALID_PUBID_LITERAL:
+      ErrorStr2:= 'ET_INVALID_PUBID_LITERAL';
+    ET_INVALID_QUALIFIED_NAME:
+      ErrorStr2:= 'ET_INVALID_QUALIFIED_NAME';
+    ET_INVALID_PREFIX:
+      ErrorStr2:= 'ET_INVALID_PREFIX';
+    ET_INVALID_NAMESPACE_URI:
+      ErrorStr2:= 'ET_INVALID_NAMESPACE_URI';
+    ET_NAMESPACE_URI_NOT_FOUND:
+      ErrorStr2:= 'ET_NAMESPACE_URI_NOT_FOUND';
+    ET_WRONG_PREFIX_MAPPING_NESTING:
+      ErrorStr2:= 'ET_WRONG_PREFIX_MAPPING_NESTING';
+    ET_ENCODING_NOT_SUPPORTED:
+      ErrorStr2:= 'ET_ENCODING_NOT_SUPPORTED';
+    ET_DOUBLE_ATTDEF:
+      ErrorStr2:= 'ET_DOUBLE_ATTDEF';
+    ET_DOUBLE_ENTITY_DECL:
+      ErrorStr2:= 'Double déclaration d'';entité';
+    ET_DOUBLE_PARAMETER_ENTITY_DECL:
+      ErrorStr2:= 'Double déclaration d'';entité paramètre';
+    ET_UNUSABLE_ENTITY_DECL:
+      ErrorStr2:= 'ET_UNUSABLE_ENTITY_DECL';
+    ET_ENTITY_DECL_NOT_FOUND:
+      ErrorStr2:= 'ET_ENTITY_DECL_NOT_FOUND';
+    ET_DUPLICATE_ELEMENT_TYPE_DECL:
+      ErrorStr2:= 'ET_DUPLICATE_ELEMENT_TYPE_DECL';
+    ET_DUPLICATE_NAME_IN_MIXED_CONTENT:
+      ErrorStr2:= 'ET_DUPLICATE_NAME_IN_MIXED_CONTENT';
+    ET_DUPLICATE_ID_ON_ELEMENT_TYPE:
+      ErrorStr2:= 'ET_DUPLICATE_ID_ON_ELEMENT_TYPE';
+    ET_UNDECLARED_NOTATION_NAME:
+      ErrorStr2:= 'ET_UNDECLARED_NOTATION_NAME';
+    ET_DUPLICATE_NOTATION_ON_ELEMENT_TYPE:
+      ErrorStr2:= 'ET_DUPLICATE_NOTATION_ON_ELEMENT_TYPE';
+    ET_DUPLICATE_NOTATION_TOKEN:
+      ErrorStr2:= 'ET_DUPLICATE_NOTATION_TOKEN';
+    ET_NOTATION_ON_EMPTY_ELEMENT:
+      ErrorStr2:= 'ET_NOTATION_ON_EMPTY_ELEMENT';
+    ET_DUPLICATE_ENUMERATION_TOKEN:
+      ErrorStr2:= 'ET_DUPLICATE_ENUMERATION_TOKEN';
+    ET_ATTRIBUTE_TYPE_MISMATCH:
+      ErrorStr2:= 'ET_ATTRIBUTE_TYPE_MISMATCH';
+    ET_DUPLICATE_TOKENS:
+      ErrorStr2:= 'ET_DUPLICATE_TOKENS';
+    ET_ID_NEITHER_IMPLIED_NOR_REQUIRED:
+      ErrorStr2:= 'ET_ID_NEITHER_IMPLIED_NOR_REQUIRED';
+    ET_WRONG_ROOT_ELEMENT_TYPE:
+      ErrorStr2:= 'ET_WRONG_ROOT_ELEMENT_TYPE';
+    ET_ELEMENT_TYPE_DECL_NOT_FOUND:
+      ErrorStr2:= 'ET_ELEMENT_TYPE_DECL_NOT_FOUND';
+    ET_ELEMENT_DECLARED_EMPTY_HAS_CONTENT:
+      ErrorStr2:= 'ET_ELEMENT_DECLARED_EMPTY_HAS_CONTENT';
+    ET_ELEMENT_WITH_ILLEGAL_MIXED_CONTENT:
+      ErrorStr2:= 'ET_ELEMENT_WITH_ILLEGAL_MIXED_CONTENT';
+    ET_ELEMENT_WITH_ILLEGAL_ELEMENT_CONTENT:
+      ErrorStr2:= 'ET_ELEMENT_WITH_ILLEGAL_ELEMENT_CONTENT';
+    ET_NONDETERMINISTIC_ELEMENT_CONTENT_MODEL:
+      ErrorStr2:= 'ET_NONDETERMINISTIC_ELEMENT_CONTENT_MODEL';
+    ET_DUPLICATE_NOTATION_DECL:
+      ErrorStr2:= 'Double déclaration de notation';
+    ET_ATTRIBUTE_DEFINITION_NOT_FOUND:
+      ErrorStr2:= 'ET_ATTRIBUTE_DEFINITION_NOT_FOUND';
+    ET_REQUIRED_ATTRIBUTE_NOT_FOUND:
+      ErrorStr2:= 'ET_REQUIRED_ATTRIBUTE_NOT_FOUND';
+    ET_FIXED_ATTRIBUTE_MISMATCH:
+      ErrorStr2:= 'ET_FIXED_ATTRIBUTE_MISMATCH';
+    ET_ATTRIBUTE_DEFAULT_TYPE_MISMATCH:
+      ErrorStr2:= 'ET_ATTRIBUTE_DEFAULT_TYPE_MISMATCH';
+    ET_DUPLICATE_ID_VALUE:
+      ErrorStr2:= 'ET_DUPLICATE_ID_VALUE';
+    ET_TARGET_ID_VALUE_NOT_FOUND:
+      ErrorStr2:= 'ET_TARGET_ID_VALUE_NOT_FOUND';
+    ET_TARGET_UNPARSED_ENTITY_NOT_FOUND:
+      ErrorStr2:= 'ET_TARGET_UNPARSED_ENTITY_NOT_FOUND';
+    ET_WRONG_DECL_OF_PREDEFINED_ENTITY:
+      ErrorStr2:= 'ET_WRONG_DECL_OF_PREDEFINED_ENTITY';
+    ET_UNRESOLVABLE_ENTITY_REFERENCE:
+      ErrorStr2:= 'ET_UNRESOLVABLE_ENTITY_REFERENCE';
+    ET_UNRESOLVABLE_PARAMETER_ENTITY_REFERENCE:
+      ErrorStr2:= 'ET_UNRESOLVABLE_PARAMETER_ENTITY_REFERENCE';
+    ET_EXTERNAL_SUBSET_NOT_FOUND:
+      ErrorStr2:= 'ET_EXTERNAL_SUBSET_NOT_FOUND';
+    ET_PARAMETER_ENTITY_DECL_NOT_FOUND:
+      ErrorStr2:= 'ET_PARAMETER_ENTITY_DECL_NOT_FOUND';
+  else
+    ErrorStr2:= 'Code source invalide';
+  end; {case ...}
+
+  result:= {$IFNDEF UNICODE}Iso8859_1ToUTF16Str{$ENDIF}(ErrorTypeStr + DocStr + ErrorStr1+' -- '+ErrorStr2);
+end;
+
+function TdomError.getGermanErrorStr: UnicodeString;
+var
+  DocStr,ErrorTypeStr,ErrorStr1,ErrorStr2: string;
+begin
+  case severity of
+    DOM_SEVERITY_FATAL_ERROR: ErrorTypeStr:='KRITISCHER FEHLER ';
+    DOM_SEVERITY_ERROR: ErrorTypeStr:='FEHLER ';
+    DOM_SEVERITY_WARNING: ErrorTypeStr:='WARNUNG: ';
+  end;
+
+  with FLocation do begin
+    DocStr:= concat('im Dokument ',uri,' ');
+    if lineNumber = -1 then ErrorStr1:= ''
+    else if startLineNumber = lineNumber then begin
+      if startColumnNumber = columnNumber
+        then FmtStr(ErrorStr1,'in Zeile %d, Position %d',[lineNumber,columnNumber])
+        else FmtStr(ErrorStr1,'in Zeile %d, zwischen Position %d und %d',[lineNumber,startColumnNumber,columnNumber]);
+    end else begin
+      FmtStr(ErrorStr1,'zwischen Zeile %d, Position %d und Zeile %d, Position %d',[startLineNumber,startColumnNumber,lineNumber,columnNumber]);
+    end;
+  end;
+
+  case FRelatedException of
+    ET_INVALID_ELEMENT_NAME:
+      ErrorStr2:= 'Ungültiger Element-name';
+    ET_DOUBLE_ROOT_ELEMENT:
+      ErrorStr2:= 'Doppeltes Wurzel-Element';
+    ET_DOUBLE_DOCTYPE:
+      ErrorStr2:= 'Doppelte Dokument-Typ-Deklaration (DTD)';
+    ET_INVALID_ATTRIBUTE_NAME:
+      ErrorStr2:= 'Ungültiger Attribut-name';
+    ET_INVALID_ATTRIBUTE_VALUE:
+      ErrorStr2:= 'Ungültiger Attribut-Wert';
+    ET_DOUBLE_ATTRIBUTE_NAME:
+      ErrorStr2:= 'Doppelter Attributname in einem Element';
+    ET_INVALID_ENTITY_NAME:
+      ErrorStr2:= 'Ungültiger Entität-name';
+    ET_INVALID_PROCESSING_INSTRUCTION:
+      ErrorStr2:= 'Ungültige Processing-Instruction';
+    ET_INVALID_XML_DECL:
+      ErrorStr2:= 'Ungültige XML-Deklaration';
+    ET_INVALID_CHARREF:
+      ErrorStr2:= 'Ungültige Zeichen-Referenz';
+    ET_MISSING_QUOTATION_MARK:
+      ErrorStr2:= 'Fehlende Anführungszeichen';
+    ET_MISSING_EQUALITY_SIGN:
+      ErrorStr2:= 'Fehlendes Gleichheitszeichen';
+    ET_DOUBLE_EQUALITY_SIGN:
+      ErrorStr2:= 'Doppeltes Gleichheitszeichen';
+    ET_MISSING_WHITE_SPACE:
+      ErrorStr2:= 'Fehlender Leerraum';
+    ET_MISSING_START_TAG:
+      ErrorStr2:= 'End-Tag ohne Start-Tag';
+    ET_MISSING_END_TAG:
+      ErrorStr2:= 'Fehlendes End-Tag';
+    ET_INVALID_CHARACTER:
+      ErrorStr2:= 'Ungültiges Zeichen';
+    ET_NOT_IN_ROOT:
+      ErrorStr2:= 'Zeichen außerhalb des Wurzel-Elements';
+    ET_INVALID_DOCTYPE:
+      ErrorStr2:= 'Ungültige Dokumenttyp-Deklaration';
+    ET_WRONG_ORDER:
+      ErrorStr2:= 'Falsche Reihenfolge';
+    ET_UNKNOWN_DECL_TYPE:
+      ErrorStr2:= 'Unbekannter Deklarationstyp';
+    ET_INVALID_ENTITY_DECL:
+      ErrorStr2:= 'Ungültige Entität-Deklaration';
+    ET_INVALID_ELEMENT_DECL:
+      ErrorStr2:= 'Ungültige Element-Deklaration';
+    ET_INVALID_ATTRIBUTE_DECL:
+      ErrorStr2:= 'Ungültige Attribut-Deklaration';
+    ET_INVALID_NOTATION_DECL:
+      ErrorStr2:= 'Ungültige Notations-Deklaration';
+    ET_INVALID_CONDITIONAL_SECTION:
+      ErrorStr2:= 'Ungültiger bedingter Abschnitt';
+    ET_INVALID_TEXT_DECL:
+      ErrorStr2:= 'Ungültige Text-Deklaration';
+    ET_LT_IN_ATTRIBUTE_VALUE:
+      ErrorStr2:= '''<'' im Ersetzungstext eines Attributwertes';
+    ET_ATTRIBUTE_VALUE_REFERS_TO_EXTERNAL_ENTITY:
+      ErrorStr2:= 'Attribut-Wert verweist auf eine externe Entität';
+    ET_RECURSIVE_REFERENCE:
+      ErrorStr2:= 'Rekursive Referenz gefunden';
+    ET_REFERENCE_TO_UNPARSED_ENTITY:
+      ErrorStr2:= 'Referenz auf eine nicht analysierte Entität';
+    ET_NO_PROPER_MARKUP_REFERENCED:
+      ErrorStr2:= 'Referenz auf eine Entität mit ungültigen Markierunszeichen';
+    ET_INVALID_COMMENT:
+      ErrorStr2:= 'Ungültiger Kommentar';
+    ET_INVALID_CDATA_SECTION:
+      ErrorStr2:= 'Ungültiger CDATA-Abschnitt';
+    ET_INVALID_SYSTEM_LITERAL:
+      ErrorStr2:= 'Ungültiges System-Literal';
+    ET_INVALID_PUBID_LITERAL:
+      ErrorStr2:= 'Ungültiges Pubid-Literal';
+    ET_INVALID_QUALIFIED_NAME:
+      ErrorStr2:= 'Ungültiger qualifizierter Name';
+    ET_INVALID_PREFIX:
+      ErrorStr2:= 'Ungültiges Prefix';
+    ET_INVALID_NAMESPACE_URI:
+      ErrorStr2:= 'Ungültiger Namensraum-URI';
+    ET_NAMESPACE_URI_NOT_FOUND:
+      ErrorStr2:= 'Namensraum-URI nicht gefunden';
+    ET_WRONG_PREFIX_MAPPING_NESTING:
+      ErrorStr2:= 'Falsche Prefix-Verschachtelung';
+    ET_ENCODING_NOT_SUPPORTED:
+      ErrorStr2:= 'Nicht-unterstütze Zeichencodierung';
+    ET_DOUBLE_ATTDEF:
+      ErrorStr2:= 'Doppelte Attribut-Defintion';
+    ET_DOUBLE_ENTITY_DECL:
+      ErrorStr2:= 'Doppelte Entität-Deklaration';
+    ET_DOUBLE_PARAMETER_ENTITY_DECL:
+      ErrorStr2:= 'Doppelte Parameter-Entität-Deklaration';
+    ET_UNUSABLE_ENTITY_DECL:
+      ErrorStr2:= 'Unbrauchbare Entität deklariert';
+    ET_ENTITY_DECL_NOT_FOUND:
+      ErrorStr2:= 'Entität-Declaration nicht gefunden';
+    ET_DUPLICATE_ELEMENT_TYPE_DECL:
+      ErrorStr2:= 'Doppelte Element-Typ-Deklaration';
+    ET_DUPLICATE_NAME_IN_MIXED_CONTENT:
+      ErrorStr2:= 'Doppelter Name in gemischtem Inhalt';
+    ET_DUPLICATE_ID_ON_ELEMENT_TYPE:
+      ErrorStr2:= 'ID-Attribut mehrfach für denselben Element-Typ deklariert';
+    ET_UNDECLARED_NOTATION_NAME:
+      ErrorStr2:= 'Notationsname nicht deklariert';
+    ET_DUPLICATE_NOTATION_ON_ELEMENT_TYPE:
+      ErrorStr2:= 'Notationsattribut mehrfach für denselben Element-Typ deklariert';
+    ET_DUPLICATE_NOTATION_TOKEN:
+      ErrorStr2:= 'Doppelte Notationstokens';
+    ET_NOTATION_ON_EMPTY_ELEMENT:
+      ErrorStr2:= 'Notationsattribut für einen leeren Element-Typ deklariert';
+    ET_DUPLICATE_ENUMERATION_TOKEN:
+      ErrorStr2:= 'Doppeltes Aufzählungstoken';
+    ET_ATTRIBUTE_TYPE_MISMATCH:
+      ErrorStr2:= 'Attribut-Typ und Attribut-Wert stimmen nicht überein';
+    ET_DUPLICATE_TOKENS:
+      ErrorStr2:= 'Token mehrfach deklariert';
+    ET_ID_NEITHER_IMPLIED_NOR_REQUIRED:
+      ErrorStr2:= 'ID-Attribut ist weder als #IMPLIED noch als #REQUIRED deklariert';
+    ET_WRONG_ROOT_ELEMENT_TYPE:
+      ErrorStr2:= 'Typ des Wurzelelements entspricht nicht der Angabe in der Dokumenttyp-Deklaration';
+    ET_ELEMENT_TYPE_DECL_NOT_FOUND:
+      ErrorStr2:= 'Elementtyp-Deklaration nicht gefunden';
+    ET_ELEMENT_DECLARED_EMPTY_HAS_CONTENT:
+      ErrorStr2:= 'Als EMPTY deklariertes Element ist nicht leer';
+    ET_ELEMENT_WITH_ILLEGAL_MIXED_CONTENT:
+      ErrorStr2:= 'Inhalt eines Elements gemischten Inhalts entspricht nicht der Deklaration';
+    ET_ELEMENT_WITH_ILLEGAL_ELEMENT_CONTENT:
+      ErrorStr2:= 'Inhalt eines Elements mit Element-Inhalt entspricht nicht der Deklaration';
+    ET_NONDETERMINISTIC_ELEMENT_CONTENT_MODEL:
+      ErrorStr2:= 'Inhaltsmodell eines Elements ist nicht deterministisch';
+    ET_DUPLICATE_NOTATION_DECL:
+      ErrorStr2:= 'Doppelte Notationsdeklaration';
+    ET_ATTRIBUTE_DEFINITION_NOT_FOUND:
+      ErrorStr2:= 'Attribut-Definition nicht gefunden';
+    ET_REQUIRED_ATTRIBUTE_NOT_FOUND:
+      ErrorStr2:= 'Als "#REQUIRED" deklariertes Attribut nicht gefunden';
+    ET_FIXED_ATTRIBUTE_MISMATCH:
+      ErrorStr2:= 'Werte eines als "#FIXED" deklarierten Attributs entspricht nicht der Deklaration';
+    ET_ATTRIBUTE_DEFAULT_TYPE_MISMATCH:
+      ErrorStr2:= 'Attribut-Typ und Attribut-Vorgabe stimmen nicht überein';
+    ET_DUPLICATE_ID_VALUE:
+      ErrorStr2:= 'ID-Wert mehrfach verwendet';
+    ET_TARGET_ID_VALUE_NOT_FOUND:
+      ErrorStr2:= 'Ein IDREF- bzw. IDREFS-Attribute verweist auf ein nicht vorhandenes Ziel';
+    ET_TARGET_UNPARSED_ENTITY_NOT_FOUND:
+      ErrorStr2:= 'Ein ENTITY- bzw. ENTITIES-Attribute verweist auf eine nicht analysierte Entität, die nicht deklariert wurde';
+    ET_WRONG_DECL_OF_PREDEFINED_ENTITY:
+      ErrorStr2:= 'Falsche Deklaration einer vordefinierten Entität';
+    ET_UNRESOLVABLE_ENTITY_REFERENCE:
+      ErrorStr2:= 'Nicht auflösbare Entitäten-Referenz';
+    ET_UNRESOLVABLE_PARAMETER_ENTITY_REFERENCE:
+      ErrorStr2:= 'Nicht auflösbare Parameter-Entitäten-Referenz';
+    ET_EXTERNAL_SUBSET_NOT_FOUND:
+      ErrorStr2:= 'Externe Teilmenge der DTD nicht gefunden';
+    ET_PARAMETER_ENTITY_DECL_NOT_FOUND:
+      ErrorStr2:= 'Parameter-Entität-Deklaration nicht gefunden';
+  else
+    ErrorStr2:= 'Ungültiger Quellcode';
+  end; {case ...}
+
+  result:= {$IFNDEF UNICODE}Iso8859_1ToUTF16Str{$ENDIF}(concat(ErrorTypeStr,DocStr,ErrorStr1,' -- ',ErrorStr2));
+end;
+
+function TdomError.getItalianErrorStr: UnicodeString;
+// - This function was provided by Massimo Maria Ghisalberti -
+var
+  ErrorTypeStr,DocStr,ErrorStr1,ErrorStr2: string;
+begin
+  case severity of
+    DOM_SEVERITY_FATAL_ERROR: ErrorTypeStr:='ERRORE CRITICO ';
+    DOM_SEVERITY_ERROR: ErrorTypeStr:='ERRORE ';
+    DOM_SEVERITY_WARNING: ErrorTypeStr:='ATTENZIONE: ';
+  end;
+
+  with FLocation do begin
+    DocStr:= concat('nel documento ',uri,' ');
+    if lineNumber = -1 then ErrorStr1:= ''
+    else if startLineNumber = lineNumber then begin
+      if startColumnNumber = columnNumber
+        then FmtStr(ErrorStr1,'nella linea %d, posizione %d',[lineNumber,columnNumber])
+        else FmtStr(ErrorStr1,'nella linea %d, tra la posizione %d e %d',[lineNumber,startColumnNumber,columnNumber]);
+    end else begin
+      FmtStr(ErrorStr1,'tra la linea %d, posizione %d e la linea %d, posizione %d',[startLineNumber,startColumnNumber,lineNumber,columnNumber]);
+    end;
+  end;
+
+  case FRelatedException of
+    ET_INVALID_ELEMENT_NAME:
+      ErrorStr2:= 'Nome elemento non valido';
+    ET_DOUBLE_ROOT_ELEMENT:
+      ErrorStr2:= 'Elemento radice duplicato';
+    ET_DOUBLE_DOCTYPE:
+      ErrorStr2:= 'Dichiarazione del tipo di documento (DTD) duplicata';
+    ET_INVALID_ATTRIBUTE_NAME:
+      ErrorStr2:= 'Nome attributo non valido';
+    ET_INVALID_ATTRIBUTE_VALUE:
+      ErrorStr2:= 'Valore attributo non valido';
+    ET_DOUBLE_ATTRIBUTE_NAME:
+      ErrorStr2:= 'Nome dell''attributo duplicato in un elemento';
+    ET_INVALID_ENTITY_NAME:
+      ErrorStr2:= 'Nome entità non valido';
+    ET_INVALID_PROCESSING_INSTRUCTION:
+      ErrorStr2:= 'Istruzione di processo non valida';
+    ET_INVALID_XML_DECL:
+      ErrorStr2:= 'Dichiarazione XML non valida';
+    ET_INVALID_CHARREF:
+      ErrorStr2:= 'Riferimento a carattere non valida';
+    ET_MISSING_QUOTATION_MARK:
+      ErrorStr2:= 'Virgolette mancanti';
+    ET_MISSING_EQUALITY_SIGN:
+      ErrorStr2:= 'Segno di uguale mancante';
+    ET_DOUBLE_EQUALITY_SIGN:
+      ErrorStr2:= 'Segno di uguale duplicato';
+    ET_MISSING_WHITE_SPACE:
+      ErrorStr2:= 'Spazio mancante';
+    ET_MISSING_START_TAG:
+      ErrorStr2:= 'Tag finale senza tag iniziale';
+    ET_MISSING_END_TAG:
+      ErrorStr2:= 'Tag finale mancante';
+    ET_INVALID_CHARACTER:
+      ErrorStr2:= 'Carattere non valido';
+    ET_NOT_IN_ROOT:
+      ErrorStr2:= 'Carattere(i) oltre l''elemento radice';
+    ET_INVALID_DOCTYPE:
+      ErrorStr2:= 'Dichiarazione del tipo di documento non valida';
+    ET_WRONG_ORDER:
+      ErrorStr2:= 'Ordine errato';
+    ET_UNKNOWN_DECL_TYPE:
+      ErrorStr2:= 'Dichiarazione di tipo sconosciuta';
+    ET_INVALID_ENTITY_DECL:
+      ErrorStr2:= 'Dichiarazione di entità non valida';
+    ET_INVALID_ELEMENT_DECL:
+      ErrorStr2:= 'Dichiarazione di elemento non valida';
+    ET_INVALID_ATTRIBUTE_DECL:
+      ErrorStr2:= 'Dichiarazione di attributo non valida';
+    ET_INVALID_NOTATION_DECL:
+      ErrorStr2:= 'Dichiarazione di notazione non valida';
+    ET_INVALID_CONDITIONAL_SECTION:
+      ErrorStr2:= 'Sezione condizionale non valida';
+    ET_INVALID_TEXT_DECL:
+      ErrorStr2:= 'Dichiarazione di testo non valida';
+    ET_LT_IN_ATTRIBUTE_VALUE:
+      ErrorStr2:= 'Tovato il carattere ''<'' nel valore di un attributo';
+    ET_ATTRIBUTE_VALUE_REFERS_TO_EXTERNAL_ENTITY:
+      ErrorStr2:= 'Il valore dell''attributo si riferisce ad un''entità esterna';
+    ET_RECURSIVE_REFERENCE:
+      ErrorStr2:= 'ET_RECURSIVE_REFERENCE';
+    ET_REFERENCE_TO_UNPARSED_ENTITY:
+      ErrorStr2:= 'Riferimento ad una entità non analizzata';
+    ET_NO_PROPER_MARKUP_REFERENCED:
+      ErrorStr2:= 'Riferimento ad una entità senza un marcatore adeguato';
+    ET_INVALID_COMMENT:
+      ErrorStr2:= 'ET_INVALID_COMMENT';
+    ET_INVALID_CDATA_SECTION:
+      ErrorStr2:= 'ET_INVALID_CDATA_SECTION';
+    ET_INVALID_SYSTEM_LITERAL:
+      ErrorStr2:= 'ET_INVALID_SYSTEM_LITERAL';
+    ET_INVALID_PUBID_LITERAL:
+      ErrorStr2:= 'ET_INVALID_PUBID_LITERAL';
+    ET_INVALID_QUALIFIED_NAME:
+      ErrorStr2:= 'ET_INVALID_QUALIFIED_NAME';
+    ET_INVALID_PREFIX:
+      ErrorStr2:= 'ET_INVALID_PREFIX';
+    ET_INVALID_NAMESPACE_URI:
+      ErrorStr2:= 'ET_INVALID_NAMESPACE_URI';
+    ET_NAMESPACE_URI_NOT_FOUND:
+      ErrorStr2:= 'ET_NAMESPACE_URI_NOT_FOUND';
+    ET_WRONG_PREFIX_MAPPING_NESTING:
+      ErrorStr2:= 'ET_WRONG_PREFIX_MAPPING_NESTING';
+    ET_ENCODING_NOT_SUPPORTED:
+      ErrorStr2:= 'ET_ENCODING_NOT_SUPPORTED';
+    ET_DOUBLE_ATTDEF:
+      ErrorStr2:= 'Definizione di attibuto duplicata';
+    ET_DOUBLE_ENTITY_DECL:
+      ErrorStr2:= 'Dichiarazione di entità duplicata';
+    ET_DOUBLE_PARAMETER_ENTITY_DECL:
+      ErrorStr2:= 'Dichiarazione di entità con parametri duplicati';
+    ET_UNUSABLE_ENTITY_DECL:
+      ErrorStr2:= 'Entità dichiarata non utilizzabile';
+    ET_ENTITY_DECL_NOT_FOUND:
+      ErrorStr2:= 'Dichiarazione di entità non trovata';
+    ET_DUPLICATE_ELEMENT_TYPE_DECL:
+      ErrorStr2:= 'Dichiarazione di tipo dell''elemento duplicata';
+    ET_DUPLICATE_NAME_IN_MIXED_CONTENT:
+      ErrorStr2:= 'Nome duplicato in un contenuto misto';
+    ET_DUPLICATE_ID_ON_ELEMENT_TYPE:
+      ErrorStr2:= 'Attributo ID duplicato nella stessa dichiarazione di tipo di elemento';
+    ET_UNDECLARED_NOTATION_NAME:
+      ErrorStr2:= 'Nome di notazione non dichiarato';
+    ET_DUPLICATE_NOTATION_ON_ELEMENT_TYPE:
+      ErrorStr2:= 'Attributo di notazione duplicato nello stessa dichiarazione di tipo di elemento';
+    ET_DUPLICATE_NOTATION_TOKEN:
+      ErrorStr2:= 'ET_DUPLICATE_NOTATION_TOKEN';
+    ET_NOTATION_ON_EMPTY_ELEMENT:
+      ErrorStr2:= 'Attributo di notazione nella dichiarazione di tipo di elemento vuoto';
+    ET_DUPLICATE_ENUMERATION_TOKEN:
+      ErrorStr2:= 'ET_DUPLICATE_ENUMERATION_TOKEN';
+    ET_ATTRIBUTE_TYPE_MISMATCH:
+      ErrorStr2:= 'L''attributo di tipo e il valore non coincidono';
+    ET_DUPLICATE_TOKENS:
+      ErrorStr2:= 'Dichiarazione duplicata di token';
+    ET_ID_NEITHER_IMPLIED_NOR_REQUIRED:
+      ErrorStr2:= 'L''attributo ID non è stato dichiarato come #IMPLIED né come #REQUIRED';
+    ET_WRONG_ROOT_ELEMENT_TYPE:
+      ErrorStr2:= 'Il tipo dell''elemento radice non coincide con il nome della dichiarazione di tipo del documento';
+    ET_ELEMENT_TYPE_DECL_NOT_FOUND:
+      ErrorStr2:= 'Dichiarazione del tipo dell''elemento non trovata';
+    ET_ELEMENT_DECLARED_EMPTY_HAS_CONTENT:
+      ErrorStr2:= 'L''elemento dichiarato vuoto non lo è';
+    ET_ELEMENT_WITH_ILLEGAL_MIXED_CONTENT:
+      ErrorStr2:= 'Il contenuto di un elemento con contenuto misto non coincide con la dichiarazione';
+    ET_ELEMENT_WITH_ILLEGAL_ELEMENT_CONTENT:
+      ErrorStr2:= 'Il contenuto di un elemento che contiene elementi non coincide con la dichiarazione';
+    ET_NONDETERMINISTIC_ELEMENT_CONTENT_MODEL:
+      ErrorStr2:= 'Il modello di contenuto di un elemento non è deterministico';
+    ET_DUPLICATE_NOTATION_DECL:
+      ErrorStr2:= 'Dichiarazione di notazione duplicata';
+    ET_ATTRIBUTE_DEFINITION_NOT_FOUND:
+      ErrorStr2:= 'Definizione di attributo non trovata';
+    ET_REQUIRED_ATTRIBUTE_NOT_FOUND:
+      ErrorStr2:= 'Attributo richiesto non trovato';
+    ET_FIXED_ATTRIBUTE_MISMATCH:
+      ErrorStr2:= 'Il valore dichiarato e quello attuale di un attributo fisso non coincidono';
+    ET_ATTRIBUTE_DEFAULT_TYPE_MISMATCH:
+      ErrorStr2:= 'Il tipo di un attributo ed il suo predefinito non coincidono';
+    ET_DUPLICATE_ID_VALUE:
+      ErrorStr2:= 'Valore ID duplicato';
+    ET_TARGET_ID_VALUE_NOT_FOUND:
+      ErrorStr2:= 'Il valore IDREF o IDREFS si riferisce ad un valore ID inesistente';
+    ET_TARGET_UNPARSED_ENTITY_NOT_FOUND:
+      ErrorStr2:= 'Il valore ENTITY o ENTITIES si riferisce ad una entità non analizzata non esistente';
+    ET_WRONG_DECL_OF_PREDEFINED_ENTITY:
+      ErrorStr2:= 'Dichiarazione di entità predefinita errata';
+    ET_UNRESOLVABLE_ENTITY_REFERENCE:
+      ErrorStr2:= 'Riferimento non risolvibile ad una entità';
+    ET_UNRESOLVABLE_PARAMETER_ENTITY_REFERENCE:
+      ErrorStr2:= 'Riferimento non risolvibile ad una entità con parametri';
+    ET_EXTERNAL_SUBSET_NOT_FOUND:
+      ErrorStr2:= 'ET_EXTERNAL_SUBSET_NOT_FOUND';
+    ET_PARAMETER_ENTITY_DECL_NOT_FOUND:
+      ErrorStr2:= 'ET_PARAMETER_ENTITY_DECL_NOT_FOUND';
+  else
+    ErrorStr2:= 'Codice sorgente non valido';
+  end; {case ...}
+  result:= {$IFNDEF UNICODE}Iso8859_1ToUTF16Str{$ENDIF}(concat(ErrorTypeStr,DocStr,ErrorStr1,' -- ',ErrorStr2));
+end;
+
+function TdomError.getPolishErrorStr: UnicodeString;
+// - This function was provided by Piotr Kuczynski -
+var
+  ErrorTypeStr,DocStr,ErrorStr1,ErrorStr2: string;
+begin
+  case severity of
+    DOM_SEVERITY_FATAL_ERROR: ErrorTypeStr:='FATALNY B£¥D ';
+    DOM_SEVERITY_ERROR: ErrorTypeStr:='B£¥D ';
+    DOM_SEVERITY_WARNING: ErrorTypeStr:='OSTRZE¯ENIE: ';
+  end;
+
+  with FLocation do begin
+    DocStr:= concat('w dokumencie ',uri,' ');
+    if lineNumber = -1 then ErrorStr1:= ''
+    else if startLineNumber = lineNumber then begin
+      if startColumnNumber = columnNumber
+        then FmtStr(ErrorStr1,'w linii %d, znak %d',[lineNumber,columnNumber])
+        else FmtStr(ErrorStr1,'w linii %d, pomiêdzy znakiem %d i %d',[lineNumber,startColumnNumber,columnNumber]);
+    end else begin
+      FmtStr(ErrorStr1,'pomiêdzy lini¹ %d, znak %d i lini¹ %d, znak %d',[startLineNumber,startColumnNumber,lineNumber,columnNumber]);
+    end;
+  end;
+
+  case FRelatedException of
+    ET_INVALID_ELEMENT_NAME:
+      ErrorStr2:= 'Niew³aœciwa nazwa elementu';
+    ET_DOUBLE_ROOT_ELEMENT:
+      ErrorStr2:= 'Podwójnie zdefiniowany korzeñ';
+    ET_DOUBLE_DOCTYPE:
+      ErrorStr2:= 'Podwójna deklaracja typu dokumentu (DTD)';
+    ET_INVALID_ATTRIBUTE_NAME:
+      ErrorStr2:= 'Niew³aœciwa nazwa atrybutu';
+    ET_INVALID_ATTRIBUTE_VALUE:
+      ErrorStr2:= 'Niew³aœciwa wartoœæ atrybutu';
+    ET_DOUBLE_ATTRIBUTE_NAME:
+      ErrorStr2:= 'Powtarzaj¹ca siê nazwa atrybutu';
+    ET_INVALID_ENTITY_NAME:
+      ErrorStr2:= 'Niew³aœciwa nazwa encji';
+    ET_INVALID_PROCESSING_INSTRUCTION:
+      ErrorStr2:= 'Niew³aœciwa instrukcja przetwarzania';
+    ET_INVALID_XML_DECL:
+      ErrorStr2:= 'Niew³aœciwa deklaracja XML';
+    ET_INVALID_CHARREF:
+      ErrorStr2:= 'Niew³aœciwy znak w odwo³aniu';
+    ET_MISSING_QUOTATION_MARK:
+      ErrorStr2:= 'Brakuj¹cy cudzys³ów';
+    ET_MISSING_EQUALITY_SIGN:
+      ErrorStr2:= 'Brakuj¹cy znak równoœci';
+    ET_DOUBLE_EQUALITY_SIGN:
+      ErrorStr2:= 'Podwójny znak równoœci';
+    ET_MISSING_WHITE_SPACE:
+      ErrorStr2:= 'Brakuj¹cy znak spacji';
+    ET_MISSING_START_TAG:
+      ErrorStr2:= 'Znacznik zamykaj¹cy bez znacznika otwieraj¹cego';
+    ET_MISSING_END_TAG:
+      ErrorStr2:= 'Brakuj¹cy znacznik zamykaj¹cy';
+    ET_INVALID_CHARACTER:
+      ErrorStr2:= 'Niew³aœciwy znak';
+    ET_NOT_IN_ROOT:
+      ErrorStr2:= 'Znak(i) umieszczone poza zasiêgiem korzenia';
+    ET_INVALID_DOCTYPE:
+      ErrorStr2:= 'Niew³aœciwa deklaracja typu dokumentu';
+    ET_WRONG_ORDER:
+      ErrorStr2:= 'Niew³aœciwa kolejnoœæ';
+    ET_UNKNOWN_DECL_TYPE:
+      ErrorStr2:= 'Nieznany typ deklaracji';
+    ET_INVALID_ENTITY_DECL:
+      ErrorStr2:= 'Niew³aœciwa deklaracja encji';
+    ET_INVALID_ELEMENT_DECL:
+      ErrorStr2:= 'Niew³aœciwa deklaracja elementu';
+    ET_INVALID_ATTRIBUTE_DECL:
+      ErrorStr2:= 'Niew³aœciwa deklaracja atrybutu';
+    ET_INVALID_NOTATION_DECL:
+      ErrorStr2:= 'Niew³aœciwa deklaracja notacji';
+    ET_INVALID_CONDITIONAL_SECTION:
+      ErrorStr2:= 'Niew³aœciwa sekcja warunkowa';
+    ET_INVALID_TEXT_DECL:
+      ErrorStr2:= 'Niew³aœciwa deklaracja tekstu';
+    ET_LT_IN_ATTRIBUTE_VALUE:
+      ErrorStr2:= 'Znak ''<'' wystêpuj¹cy w zmienianej wartoœci atrybutu';
+    ET_ATTRIBUTE_VALUE_REFERS_TO_EXTERNAL_ENTITY:
+      ErrorStr2:= 'Wartoœæ atrybutu odwo³uje siê do zewnêtrznej encji';
+    ET_RECURSIVE_REFERENCE:
+      ErrorStr2:= 'ET_RECURSIVE_REFERENCE';
+    ET_REFERENCE_TO_UNPARSED_ENTITY:
+      ErrorStr2:= 'Odwo³anie do encji, która nie by³a jeszcze parsowana';
+    ET_NO_PROPER_MARKUP_REFERENCED:
+      ErrorStr2:= 'Odwo³anie do encji zawieraj¹cej niew³aœciwy znacznik';
+    ET_INVALID_COMMENT:
+      ErrorStr2:= 'ET_INVALID_COMMENT';
+    ET_INVALID_CDATA_SECTION:
+      ErrorStr2:= 'ET_INVALID_CDATA_SECTION';
+    ET_INVALID_SYSTEM_LITERAL:
+      ErrorStr2:= 'ET_INVALID_SYSTEM_LITERAL';
+    ET_INVALID_PUBID_LITERAL:
+      ErrorStr2:= 'ET_INVALID_PUBID_LITERAL';
+    ET_INVALID_QUALIFIED_NAME:
+      ErrorStr2:= 'ET_INVALID_QUALIFIED_NAME';
+    ET_INVALID_PREFIX:
+      ErrorStr2:= 'ET_INVALID_PREFIX';
+    ET_INVALID_NAMESPACE_URI:
+      ErrorStr2:= 'ET_INVALID_NAMESPACE_URI';
+    ET_NAMESPACE_URI_NOT_FOUND:
+      ErrorStr2:= 'ET_NAMESPACE_URI_NOT_FOUND';
+    ET_WRONG_PREFIX_MAPPING_NESTING:
+      ErrorStr2:= 'ET_WRONG_PREFIX_MAPPING_NESTING';
+    ET_ENCODING_NOT_SUPPORTED:
+      ErrorStr2:= 'ET_ENCODING_NOT_SUPPORTED';
+    ET_DOUBLE_ATTDEF:
+      ErrorStr2:= 'Podwójna definicja atrybutu';
+    ET_DOUBLE_ENTITY_DECL:
+      ErrorStr2:= 'Podwójna deklaracja encji';
+    ET_DOUBLE_PARAMETER_ENTITY_DECL:
+      ErrorStr2:= 'Podwójna deklaracja encji parametrycznej';
+    ET_UNUSABLE_ENTITY_DECL:
+      ErrorStr2:= 'Nieu¿ywana deklaracja encji';
+    ET_ENTITY_DECL_NOT_FOUND:
+      ErrorStr2:= 'Brakuj¹ca deklaracja encji';
+    ET_DUPLICATE_ELEMENT_TYPE_DECL:
+      ErrorStr2:= 'Podwójna deklaracja typu elementu';
+    ET_DUPLICATE_NAME_IN_MIXED_CONTENT:
+      ErrorStr2:= 'Podwójna nazwa w mieszanej zawartoœci';
+    ET_DUPLICATE_ID_ON_ELEMENT_TYPE:
+      ErrorStr2:= 'Zadeklarowany podwójny atrybut ID dla elementów tego samego typu';
+    ET_UNDECLARED_NOTATION_NAME:
+      ErrorStr2:= 'Nie zadeklarowana nazwa notacji';
+    ET_DUPLICATE_NOTATION_ON_ELEMENT_TYPE:
+      ErrorStr2:= 'Zadeklarowany podwójny atrybut notacji dla elementów tego samego typu';
+    ET_DUPLICATE_NOTATION_TOKEN:
+      ErrorStr2:= 'ET_DUPLICATE_NOTATION_TOKEN';
+    ET_NOTATION_ON_EMPTY_ELEMENT:
+      ErrorStr2:= 'Atrybut notacji zadeklarowany dla elementu typu pusty';
+    ET_DUPLICATE_ENUMERATION_TOKEN:
+      ErrorStr2:= 'ET_DUPLICATE_ENUMERATION_TOKEN';
+    ET_ATTRIBUTE_TYPE_MISMATCH:
+      ErrorStr2:= 'Typ atrybutu i wartoœæ atrybutu nie pasuj¹ do siebie';
+    ET_DUPLICATE_TOKENS:
+      ErrorStr2:= 'Zadeklarowane dwa identyczne tokeny';
+    ET_ID_NEITHER_IMPLIED_NOR_REQUIRED:
+      ErrorStr2:= 'Atrybut ID nie jest zadeklarowany ani jako #IMPLIED ani #REQUIRED';
+    ET_WRONG_ROOT_ELEMENT_TYPE:
+      ErrorStr2:= 'Typ korzenia nie pasuje do nazwy z deklaracji typu dokumentu';
+    ET_ELEMENT_TYPE_DECL_NOT_FOUND:
+      ErrorStr2:= 'Nie znaleziona deklaracja typu elementu';
+    ET_ELEMENT_DECLARED_EMPTY_HAS_CONTENT:
+      ErrorStr2:= 'Element zadeklarowany jako EMPTY nie jest pusty';
+    ET_ELEMENT_WITH_ILLEGAL_MIXED_CONTENT:
+      ErrorStr2:= 'Zawartoœæ elementu o mieszanej zawartoœci nie pasuje do deklaracji';
+    ET_ELEMENT_WITH_ILLEGAL_ELEMENT_CONTENT:
+      ErrorStr2:= 'Zawartoœæ elementu, zawieraj¹cego element, nie pasuje do deklaracji';
+    ET_NONDETERMINISTIC_ELEMENT_CONTENT_MODEL:
+      ErrorStr2:= 'Model zawartoœci elementu jest niedeterministyczny';
+    ET_DUPLICATE_NOTATION_DECL:
+      ErrorStr2:= 'Podwójna deklaracja notacji';
+    ET_ATTRIBUTE_DEFINITION_NOT_FOUND:
+      ErrorStr2:= 'Definicja atrybutu nie zosta³a znaleziona';
+    ET_REQUIRED_ATTRIBUTE_NOT_FOUND:
+      ErrorStr2:= 'Wymagany atrybut nie zosta³ znaleziony';
+    ET_FIXED_ATTRIBUTE_MISMATCH:
+      ErrorStr2:= 'Zadeklarowana i bie¿¹ca wartoœæ sta³ego atrybutu nie pasuja do siebie';
+    ET_ATTRIBUTE_DEFAULT_TYPE_MISMATCH:
+      ErrorStr2:= 'Typ atrybutu i jego wartoœæ domyœlna nie pasuj¹ do siebie';
+    ET_DUPLICATE_ID_VALUE:
+      ErrorStr2:= 'Podwójna wartoœæ ID';
+    ET_TARGET_ID_VALUE_NOT_FOUND:
+      ErrorStr2:= 'Wartoœæ IDREF lub IDREFS odwo³uje siê do wartoœci ID nieistniej¹cego elementu';
+    ET_TARGET_UNPARSED_ENTITY_NOT_FOUND:
+      ErrorStr2:= 'Wartoœæ ENTITY lub ENTITIES odwo³uje siê do niesparsowanej encji, która nie istnieje';
+    ET_WRONG_DECL_OF_PREDEFINED_ENTITY:
+      ErrorStr2:= 'Niew³aœciwa deklaracja predefiniowanej encji';
+    ET_UNRESOLVABLE_ENTITY_REFERENCE:
+      ErrorStr2:= 'Nierozwi¹zywalna referencja do encji';
+    ET_UNRESOLVABLE_PARAMETER_ENTITY_REFERENCE:
+      ErrorStr2:= 'Nierozwi¹zywalna referencja encji parametrycznej';
+    ET_EXTERNAL_SUBSET_NOT_FOUND:
+      ErrorStr2:= 'Zewnêtrzny podzbiór DTD nie zosta³ znaleziony';
+    ET_PARAMETER_ENTITY_DECL_NOT_FOUND:
+      ErrorStr2:= 'ET_PARAMETER_ENTITY_DECL_NOT_FOUND';
+  else
+    ErrorStr2:= 'Niew³aœciwy kod Ÿród³owy';
+  end; {case ...}
+
+  result:= {$IFNDEF UNICODE}cp1250ToUTF16Str{$ENDIF}(concat(ErrorTypeStr,DocStr,ErrorStr1,' -- ',ErrorStr2));
+end;
+
+function TdomError.getPortugueseErrorStr: UnicodeString;
+// - This function was provided by Ricardo Albuquerque -
+var
+  ErrorTypeStr,DocStr,ErrorStr1,ErrorStr2: string;
+begin
+  case severity of
+    DOM_SEVERITY_FATAL_ERROR: ErrorTypeStr:='ERRO FATAL ';
+    DOM_SEVERITY_ERROR: ErrorTypeStr:='ERRO ';
+    DOM_SEVERITY_WARNING: ErrorTypeStr:='ATENÇÃO: ';
+  end;
+
+  with FLocation do begin
+    DocStr:= concat('no documento ',uri,' ');
+    if lineNumber = -1 then ErrorStr1:= ''
+    else if startLineNumber = lineNumber then begin
+      if startColumnNumber = columnNumber
+        then FmtStr(ErrorStr1,'na linha %d, posição %d',[lineNumber,columnNumber])
+        else FmtStr(ErrorStr1,'na linha %d, entre posição %d e %d',[lineNumber,startColumnNumber,columnNumber]);
+    end else begin
+      FmtStr(ErrorStr1,'entre linha %d, posição %d e linha %d, posição %d',[startLineNumber,startColumnNumber,lineNumber,columnNumber]);
+    end;
+  end;
+
+  case FRelatedException of
+    ET_INVALID_ELEMENT_NAME:
+      ErrorStr2:= 'Nome de elemento inválido';
+    ET_DOUBLE_ROOT_ELEMENT:
+      ErrorStr2:= 'Elemento raiz duplicado';
+    ET_DOUBLE_DOCTYPE:
+      ErrorStr2:= 'Definição de tipo de documento(DTD) duplicado';
+    ET_INVALID_ATTRIBUTE_NAME:
+      ErrorStr2:= 'Nome de atributo inválido';
+    ET_INVALID_ATTRIBUTE_VALUE:
+      ErrorStr2:= 'valor de atributo inválido';
+    ET_DOUBLE_ATTRIBUTE_NAME:
+      ErrorStr2:= 'Nome de atributo duplicado em um elemento';
+    ET_INVALID_ENTITY_NAME:
+      ErrorStr2:= 'Nome de entidade inválida';
+    ET_INVALID_PROCESSING_INSTRUCTION:
+      ErrorStr2:= 'Instrução de processamento inválida';
+    ET_INVALID_XML_DECL:
+      ErrorStr2:= 'Declaração XML inválida';
+    ET_INVALID_CHARREF:
+      ErrorStr2:= 'Referência a caracter invalida';
+    ET_MISSING_QUOTATION_MARK:
+      ErrorStr2:= 'Aspas faltando';
+    ET_MISSING_EQUALITY_SIGN:
+      ErrorStr2:= 'Sinal de igualdade faltando';
+    ET_DOUBLE_EQUALITY_SIGN:
+      ErrorStr2:= 'Sinal de igualdade duplicado';
+    ET_MISSING_WHITE_SPACE:
+      ErrorStr2:= 'Espaço em branco faltando';
+    ET_MISSING_START_TAG:
+      ErrorStr2:= 'Marca de fim sem marca de início ';
+    ET_MISSING_END_TAG:
+      ErrorStr2:= 'Marca de fim faltando';
+    ET_INVALID_CHARACTER:
+      ErrorStr2:= 'Caracter inválido';
+    ET_NOT_IN_ROOT:
+      ErrorStr2:= 'Caracter(es) fora do elemento raiz';
+    ET_INVALID_DOCTYPE:
+      ErrorStr2:= 'Declaração de tipo de documento inválida';
+    ET_WRONG_ORDER:
+      ErrorStr2:= 'Ordem errada';
+    ET_UNKNOWN_DECL_TYPE:
+      ErrorStr2:= 'Tipo de declaração inválida';
+    ET_INVALID_ENTITY_DECL:
+      ErrorStr2:= 'Declaração de entidade inválida';
+    ET_INVALID_ELEMENT_DECL:
+      ErrorStr2:= 'Declaração de elemento inválido';
+    ET_INVALID_ATTRIBUTE_DECL:
+      ErrorStr2:= 'Declaração de atributo inválido';
+    ET_INVALID_NOTATION_DECL:
+      ErrorStr2:= 'Declaração de notação inválida';
+    ET_INVALID_CONDITIONAL_SECTION:
+      ErrorStr2:= 'Seção condicional inválida';
+    ET_INVALID_TEXT_DECL:
+      ErrorStr2:= 'Declaração de texto inválido';
+    ET_LT_IN_ATTRIBUTE_VALUE:
+      ErrorStr2:= 'Encontrado o caracter ''<'' no valor do atributo';
+    ET_ATTRIBUTE_VALUE_REFERS_TO_EXTERNAL_ENTITY:
+      ErrorStr2:= 'O valor do atributo se refere a uma entidade externa';
+    ET_RECURSIVE_REFERENCE:
+      ErrorStr2:= 'ET_RECURSIVE_REFERENCE';
+    ET_REFERENCE_TO_UNPARSED_ENTITY:
+      ErrorStr2:= 'Referência a uma entidade não analisada';
+    ET_NO_PROPER_MARKUP_REFERENCED:
+      ErrorStr2:= 'Referência a uma entidade contendo marcação imprópria';
+    ET_INVALID_COMMENT:
+      ErrorStr2:= 'ET_INVALID_COMMENT';
+    ET_INVALID_CDATA_SECTION:
+      ErrorStr2:= 'ET_INVALID_CDATA_SECTION';
+    ET_INVALID_SYSTEM_LITERAL:
+      ErrorStr2:= 'ET_INVALID_SYSTEM_LITERAL';
+    ET_INVALID_PUBID_LITERAL:
+      ErrorStr2:= 'ET_INVALID_PUBID_LITERAL';
+    ET_INVALID_QUALIFIED_NAME:
+      ErrorStr2:= 'ET_INVALID_QUALIFIED_NAME';
+    ET_INVALID_PREFIX:
+      ErrorStr2:= 'ET_INVALID_PREFIX';
+    ET_INVALID_NAMESPACE_URI:
+      ErrorStr2:= 'ET_INVALID_NAMESPACE_URI';
+    ET_NAMESPACE_URI_NOT_FOUND:
+      ErrorStr2:= 'ET_NAMESPACE_URI_NOT_FOUND';
+    ET_WRONG_PREFIX_MAPPING_NESTING:
+      ErrorStr2:= 'ET_WRONG_PREFIX_MAPPING_NESTING';
+    ET_ENCODING_NOT_SUPPORTED:
+      ErrorStr2:= 'ET_ENCODING_NOT_SUPPORTED';
+    ET_DOUBLE_ATTDEF:
+      ErrorStr2:= 'Definição de atributo duplicada';
+    ET_DOUBLE_ENTITY_DECL:
+      ErrorStr2:= 'Declaração de entidade duplicada';
+    ET_DOUBLE_PARAMETER_ENTITY_DECL:
+      ErrorStr2:= 'Declaração de entidade paramétrica duplicada';
+    ET_UNUSABLE_ENTITY_DECL:
+      ErrorStr2:= 'Entidade inutilizável declarada';
+    ET_ENTITY_DECL_NOT_FOUND:
+      ErrorStr2:= 'Faltando declaração de entidade';
+    ET_DUPLICATE_ELEMENT_TYPE_DECL:
+      ErrorStr2:= 'Declaração do tipo do elemento duplicada';
+    ET_DUPLICATE_NAME_IN_MIXED_CONTENT:
+      ErrorStr2:= 'Nome duplicado no conteúdo misto';
+    ET_DUPLICATE_ID_ON_ELEMENT_TYPE:
+      ErrorStr2:= 'Atributo ID duplicado na mesma declaração de tipo de elemento';
+    ET_UNDECLARED_NOTATION_NAME:
+      ErrorStr2:= 'Nome de anotação não declarado';
+    ET_DUPLICATE_NOTATION_ON_ELEMENT_TYPE:
+      ErrorStr2:= 'Atributo de Anotação duplicado na mesma declaração de tipo de elemento';
+    ET_DUPLICATE_NOTATION_TOKEN:
+      ErrorStr2:= 'ET_DUPLICATE_NOTATION_TOKEN';
+    ET_NOTATION_ON_EMPTY_ELEMENT:
+      ErrorStr2:= 'Atributo de anotação em uma declaração de tipo de elemento vazia';
+    ET_DUPLICATE_ENUMERATION_TOKEN:
+      ErrorStr2:= 'ET_DUPLICATE_ENUMERATION_TOKEN';
+    ET_ATTRIBUTE_TYPE_MISMATCH:
+      ErrorStr2:= 'Tipo de atributo e valor de atributo não coincidem';
+    ET_DUPLICATE_TOKENS:
+      ErrorStr2:= 'Declaração de ''tokens'' duplicada';
+    ET_ID_NEITHER_IMPLIED_NOR_REQUIRED:
+      ErrorStr2:= 'Atributo ID não foi declarado como #IMPLIED nem como #REQUIRED';
+    ET_WRONG_ROOT_ELEMENT_TYPE:
+      ErrorStr2:= 'O tipo de elemento raiz não tem o mesmo nome que a declaração do tipo de documento';
+    ET_ELEMENT_TYPE_DECL_NOT_FOUND:
+      ErrorStr2:= 'Declaração de tipo de elemento não encontrada';
+    ET_ELEMENT_DECLARED_EMPTY_HAS_CONTENT:
+      ErrorStr2:= 'Elemento declarado como ''EMPTY'' não está vazio';
+    ET_ELEMENT_WITH_ILLEGAL_MIXED_CONTENT:
+      ErrorStr2:= 'O conteúdo de um elemento com conteúdo misto não coincide com sua declaração';
+    ET_ELEMENT_WITH_ILLEGAL_ELEMENT_CONTENT:
+      ErrorStr2:= 'O conteúdo de um elemento com conteúdo de elemento não coincide com sua declaração';
+    ET_NONDETERMINISTIC_ELEMENT_CONTENT_MODEL:
+      ErrorStr2:= 'O modelo de conteúdo de um elemento não é determinante';
+    ET_DUPLICATE_NOTATION_DECL:
+      ErrorStr2:= 'Declaração de anotação duplicada';
+    ET_ATTRIBUTE_DEFINITION_NOT_FOUND:
+      ErrorStr2:= 'Definição de atributo não encontrada';
+    ET_REQUIRED_ATTRIBUTE_NOT_FOUND:
+      ErrorStr2:= 'Atributo requerido não encontrado';
+    ET_FIXED_ATTRIBUTE_MISMATCH:
+      ErrorStr2:= 'O valor declarado e o valor atual de um atributo fixo não coincidem';
+    ET_ATTRIBUTE_DEFAULT_TYPE_MISMATCH:
+      ErrorStr2:= 'O tipo de atributo e o atributo por definição não coincidem';
+    ET_DUPLICATE_ID_VALUE:
+      ErrorStr2:= 'Valor de ID duplicado';
+    ET_TARGET_ID_VALUE_NOT_FOUND:
+      ErrorStr2:= 'O valor de IDREF ou IDREFS se refere a um valor de ID não existente';
+    ET_TARGET_UNPARSED_ENTITY_NOT_FOUND:
+      ErrorStr2:= 'O valor de ENTITY ou ENTITIES se refere a uma entidade não existente';
+    ET_WRONG_DECL_OF_PREDEFINED_ENTITY:
+      ErrorStr2:= 'Declaração errônea de uma entidade pré-definida';
+    ET_UNRESOLVABLE_ENTITY_REFERENCE:
+      ErrorStr2:= 'Referência a entidade impossível de resolver';
+    ET_EXTERNAL_SUBSET_NOT_FOUND:
+      ErrorStr2:= 'ET_EXTERNAL_SUBSET_NOT_FOUND';
+    ET_PARAMETER_ENTITY_DECL_NOT_FOUND:
+      ErrorStr2:= 'ET_PARAMETER_ENTITY_DECL_NOT_FOUND';
+  else
+    ErrorStr2:= 'Código fonte inválido';
+  end; {case ...}
+
+  result:= {$IFNDEF UNICODE}Iso8859_1ToUTF16Str{$ENDIF}(concat(ErrorTypeStr,DocStr,ErrorStr1,' -- ',ErrorStr2));
+end;
+
+function TdomError.getSpanishErrorStr: UnicodeString;
+// - This function was provided by Pedro de Paz -
+var
+  ErrorTypeStr,DocStr,ErrorStr1,ErrorStr2: string;
+begin
+  case severity of
+    DOM_SEVERITY_FATAL_ERROR: ErrorTypeStr:='ERROR FATAL ';
+    DOM_SEVERITY_ERROR: ErrorTypeStr:='ERROR ';
+    DOM_SEVERITY_WARNING: ErrorTypeStr:='AVISO: ';
+  end;
+
+  with FLocation do begin
+    DocStr:= concat('en el documento ',uri,' ');
+    if lineNumber = -1 then ErrorStr1:= ''
+    else if startLineNumber = lineNumber then begin
+      if startColumnNumber = columnNumber
+        then FmtStr(ErrorStr1,'en la linea %d, posición %d',[lineNumber,columnNumber])
+        else FmtStr(ErrorStr1,'en la linea %d, entre las posiciones %d y %d',[lineNumber,startColumnNumber,columnNumber]);
+    end else begin
+      FmtStr(ErrorStr1,'entre la linea %d, posición %d y la linea %d, posición %d',[startLineNumber,startColumnNumber,lineNumber,columnNumber]);
+    end;
+  end;
+
+  case FRelatedException of
+    ET_INVALID_ELEMENT_NAME:
+      ErrorStr2:= 'Nombre de elemento no válido';
+    ET_DOUBLE_ROOT_ELEMENT:
+      ErrorStr2:= 'Elemento raiz duplicado';
+    ET_DOUBLE_DOCTYPE:
+      ErrorStr2:= 'Declaración de tipo de documento (DTD) duplicada';
+    ET_INVALID_ATTRIBUTE_NAME:
+      ErrorStr2:= 'Nombre de atributo no válido';
+    ET_INVALID_ATTRIBUTE_VALUE:
+      ErrorStr2:= 'Valor de atributo no válido';
+    ET_DOUBLE_ATTRIBUTE_NAME:
+      ErrorStr2:= 'Atributo duplicado en un elemento';
+    ET_INVALID_ENTITY_NAME:
+      ErrorStr2:= 'Nombre de entidad no válida';
+    ET_INVALID_PROCESSING_INSTRUCTION:
+      ErrorStr2:= 'Instrucción de proceso no válida';
+    ET_INVALID_XML_DECL:
+      ErrorStr2:= 'Declaración XML no válida';
+    ET_INVALID_CHARREF:
+      ErrorStr2:= 'Referencia a caracter no válida';
+    ET_MISSING_QUOTATION_MARK:
+      ErrorStr2:= 'No se encontraron comillas';
+    ET_MISSING_EQUALITY_SIGN:
+      ErrorStr2:= 'No se encontró simbolo de igualdad';
+    ET_DOUBLE_EQUALITY_SIGN:
+      ErrorStr2:= 'Signo de igualdad duplicado';
+    ET_MISSING_WHITE_SPACE:
+      ErrorStr2:= 'No se encontró espacio en blanco';
+    ET_MISSING_START_TAG:
+      ErrorStr2:= 'Tag final sin tag de inicio';
+    ET_MISSING_END_TAG:
+      ErrorStr2:= 'Tag de inicio sin tag final';
+    ET_INVALID_CHARACTER:
+      ErrorStr2:= 'Caracter no válido';
+    ET_NOT_IN_ROOT:
+      ErrorStr2:= 'Caracter(es) fuera del elemento raiz';
+    ET_INVALID_DOCTYPE:
+      ErrorStr2:= 'Declaración de tipo de documento no válida';
+    ET_WRONG_ORDER:
+      ErrorStr2:= 'Orden equivocado';
+    ET_UNKNOWN_DECL_TYPE:
+      ErrorStr2:= 'Tipo de declaración desconocida';
+    ET_INVALID_ENTITY_DECL:
+      ErrorStr2:= 'Declaración de entidad no válida';
+    ET_INVALID_ELEMENT_DECL:
+      ErrorStr2:= 'Declaración de elemento no válida';
+    ET_INVALID_ATTRIBUTE_DECL:
+      ErrorStr2:= 'Declaración de atributo no válida';
+    ET_INVALID_NOTATION_DECL:
+      ErrorStr2:= 'Declaración de anotación no válida';
+    ET_INVALID_CONDITIONAL_SECTION:
+      ErrorStr2:= 'Sección condicional no válida';
+    ET_INVALID_TEXT_DECL:
+      ErrorStr2:= 'Declaración de texto no válida';
+    ET_LT_IN_ATTRIBUTE_VALUE:
+      ErrorStr2:= 'Encontrado caracter ''<'' en valor de atributo';
+    ET_ATTRIBUTE_VALUE_REFERS_TO_EXTERNAL_ENTITY:
+      ErrorStr2:= 'Valor de atributo apuntando a una entidad externa';
+    ET_RECURSIVE_REFERENCE:
+      ErrorStr2:= 'ET_RECURSIVE_REFERENCE';
+    ET_REFERENCE_TO_UNPARSED_ENTITY:
+      ErrorStr2:= 'Referencia a una entidad no analizada';
+    ET_NO_PROPER_MARKUP_REFERENCED:
+      ErrorStr2:= 'Referencia a una entidad que contiene un ''markup'' no adecuado';
+    ET_INVALID_COMMENT:
+      ErrorStr2:= 'ET_INVALID_COMMENT';
+    ET_INVALID_CDATA_SECTION:
+      ErrorStr2:= 'ET_INVALID_CDATA_SECTION';
+    ET_INVALID_SYSTEM_LITERAL:
+      ErrorStr2:= 'ET_INVALID_SYSTEM_LITERAL';
+    ET_INVALID_PUBID_LITERAL:
+      ErrorStr2:= 'ET_INVALID_PUBID_LITERAL';
+    ET_INVALID_QUALIFIED_NAME:
+      ErrorStr2:= 'ET_INVALID_QUALIFIED_NAME';
+    ET_INVALID_PREFIX:
+      ErrorStr2:= 'ET_INVALID_PREFIX';
+    ET_INVALID_NAMESPACE_URI:
+      ErrorStr2:= 'ET_INVALID_NAMESPACE_URI';
+    ET_NAMESPACE_URI_NOT_FOUND:
+      ErrorStr2:= 'ET_NAMESPACE_URI_NOT_FOUND';
+    ET_WRONG_PREFIX_MAPPING_NESTING:
+      ErrorStr2:= 'ET_WRONG_PREFIX_MAPPING_NESTING';
+    ET_ENCODING_NOT_SUPPORTED:
+      ErrorStr2:= 'ET_ENCODING_NOT_SUPPORTED';
+    ET_DOUBLE_ATTDEF:
+      ErrorStr2:= 'Definición de atributo duplicada';
+    ET_DOUBLE_ENTITY_DECL:
+      ErrorStr2:= 'Declaración de entidad duplicada';
+    ET_DOUBLE_PARAMETER_ENTITY_DECL:
+      ErrorStr2:= 'Declaración de entidad con parametros duplicados';
+    ET_UNUSABLE_ENTITY_DECL:
+      ErrorStr2:= 'Declaración de entidad no utilizable';
+    ET_ENTITY_DECL_NOT_FOUND:
+      ErrorStr2:= 'No existe declaración de entidad';
+    ET_DUPLICATE_ELEMENT_TYPE_DECL:
+      ErrorStr2:= 'Duplicada declaración de tipo de elemento';
+    ET_DUPLICATE_NAME_IN_MIXED_CONTENT:
+      ErrorStr2:= 'Nombre duplicado en contenido mezclado';
+    ET_DUPLICATE_ID_ON_ELEMENT_TYPE:
+      ErrorStr2:= 'Atributo ID duplicado en la misma declaración de tipo de elemento';
+    ET_UNDECLARED_NOTATION_NAME:
+      ErrorStr2:= 'Nombre de anotación no declarado';
+    ET_DUPLICATE_NOTATION_ON_ELEMENT_TYPE:
+      ErrorStr2:= 'Atributo de anotación duplicado en la misma declaración de tipo de elemento';
+    ET_DUPLICATE_NOTATION_TOKEN:
+      ErrorStr2:= 'ET_DUPLICATE_NOTATION_TOKEN';
+    ET_NOTATION_ON_EMPTY_ELEMENT:
+      ErrorStr2:= 'Atributo de anotación en una declaración de tipo de elemento vacia';
+    ET_DUPLICATE_ENUMERATION_TOKEN:
+      ErrorStr2:= 'ET_DUPLICATE_ENUMERATION_TOKEN';
+    ET_ATTRIBUTE_TYPE_MISMATCH:
+      ErrorStr2:= 'Tipo de atributo y valor de atributo no coinciden';
+    ET_DUPLICATE_TOKENS:
+      ErrorStr2:= 'Declaración de ''tokens'' duplicada';
+    ET_ID_NEITHER_IMPLIED_NOR_REQUIRED:
+      ErrorStr2:= 'Atributo ID no ha sido declarado como #IMPLIED ni como #REQUIRED';
+    ET_WRONG_ROOT_ELEMENT_TYPE:
+      ErrorStr2:= 'El tipo del elemento raiz no tiene el mismo nombre que la declaración del tipo de documento';
+    ET_ELEMENT_TYPE_DECL_NOT_FOUND:
+      ErrorStr2:= 'Declaración de tipo de elemento no encontrada';
+    ET_ELEMENT_DECLARED_EMPTY_HAS_CONTENT:
+      ErrorStr2:= 'Elemento declarado como ''EMPTY'' no esta vacio';
+    ET_ELEMENT_WITH_ILLEGAL_MIXED_CONTENT:
+      ErrorStr2:= 'El contenido de un elemento con contenido mezclado no coincide con su declaración';
+    ET_ELEMENT_WITH_ILLEGAL_ELEMENT_CONTENT:
+      ErrorStr2:= 'El contenido de un elemento con contenido de elemento no coincide con su declaración';
+    ET_NONDETERMINISTIC_ELEMENT_CONTENT_MODEL:
+      ErrorStr2:= 'El modelo de contenido de un elemento no es determinante';
+    ET_DUPLICATE_NOTATION_DECL:
+      ErrorStr2:= 'Declaración de anotación duplicada';
+    ET_ATTRIBUTE_DEFINITION_NOT_FOUND:
+      ErrorStr2:= 'Definición de atributo no encontrada';
+    ET_REQUIRED_ATTRIBUTE_NOT_FOUND:
+      ErrorStr2:= 'Atributo requerido no encontrado';
+    ET_FIXED_ATTRIBUTE_MISMATCH:
+      ErrorStr2:= 'El valor declarado y el valor actual de un atributo fijo no coincide';
+    ET_ATTRIBUTE_DEFAULT_TYPE_MISMATCH:
+      ErrorStr2:= 'El tipo de atributo y el atributo por defecto no coincide';
+    ET_DUPLICATE_ID_VALUE:
+      ErrorStr2:= 'Valor de ID duplicado';
+    ET_TARGET_ID_VALUE_NOT_FOUND:
+      ErrorStr2:= 'El valor de IDREF o IDREFS apunta a un valor de ID no existente';
+    ET_TARGET_UNPARSED_ENTITY_NOT_FOUND:
+      ErrorStr2:= 'El valor de ENTITY o ENTITIES apunta a una entidad no existente';
+    ET_WRONG_DECL_OF_PREDEFINED_ENTITY:
+      ErrorStr2:= 'DEclaración erronea de una entidad predefinida';
+    ET_UNRESOLVABLE_ENTITY_REFERENCE:
+      ErrorStr2:= 'Referencia a entidad imposible de resolver';
+    ET_EXTERNAL_SUBSET_NOT_FOUND:
+      ErrorStr2:= 'ET_EXTERNAL_SUBSET_NOT_FOUND';
+    ET_PARAMETER_ENTITY_DECL_NOT_FOUND:
+      ErrorStr2:= 'ET_PARAMETER_ENTITY_DECL_NOT_FOUND';
+  else
+    ErrorStr2:= 'Codigo fuente no válido';
+  end; {case ...}
+
+  result:= {$IFNDEF UNICODE}Iso8859_1ToUTF16Str{$ENDIF}(concat(ErrorTypeStr,DocStr,ErrorStr1,' -- ',ErrorStr2));
+end;
+
+procedure TdomError.setLanguage(const value: TIso639LanguageCode);
+begin
+  if not (value in FSupportedLanguages)
+    then raise ENot_Supported_Err.create('Not supported error.');
+  FLanguage:= value;
+end;
+
+function TdomError.getMessage: UnicodeString;
+begin
+  Result:= '';
+
+  case FLanguage of
+    iso639_de: result:= getGermanErrorStr;
+    iso639_en: result:= getEnglishErrorStr;
+    iso639_es: result:= getSpanishErrorStr;
+    iso639_fr: result:= getFrenchErrorStr;
+    iso639_it: result:= getItalianErrorStr;
+    iso639_nl: result:= getDutchErrorStr;
+    iso639_pl: result:= getPolishErrorStr;
+    iso639_pt: result:= getPortugueseErrorStr;
+  else
+    exit;
+  end;
+
+  if FCode = ''
+    then Result:= concat(Result,'.')
+    else Result:= concat(Result,': ',FCode);
+end;
+
+
+
+// ++++++++++++++++++++++++ TdomLocator ++++++++++++++++++++++++
+constructor TdomLocator.create(const startLine,
+                                     startColumn,
+                                     endLine,
+                                     endColumn,
+                                     offset: integer;
+                               const uri: UnicodeString;
+                               const rCMNode: TdomCMNode;
+                               const rNode: TdomNode);
+begin
+  inherited create;
+  FStartLineNumber:=   startLine;
+  FStartColumnNumber:= startColumn;
+  FLineNumber:=        endLine;
+  FColumnNumber:=      endColumn;
+  FOffset:=            offset;
+  FUri:=               uri;
+  FRelatedCMNode:=     rCMNode;
+  FRelatedNode:=       rNode;
+end;
+
+function TdomLocator.getColumnNumber: integer;
+begin
+  Result:= FColumnNumber;
+end;
+
+function TdomLocator.getLineNumber: integer;
+begin
+  Result:= FLineNumber;
+end;
+
+function TdomLocator.getOffset: integer;
+begin
+  Result:= FOffset;
+end;
+
+function TdomLocator.getRelatedCMNode: TdomCMNode;
+begin
+  Result:= FRelatedCMNode;
+end;
+
+function TdomLocator.getRelatedNode: TdomNode;
+begin
+  Result:= FRelatedNode;
+end;
+
+function TdomLocator.getStartColumnNumber: integer;
+begin
+  Result:= FStartColumnNumber;
+end;
+
+function TdomLocator.getStartLineNumber: integer;
+begin
+  Result:= FStartLineNumber;
+end;
+
+function TdomLocator.getUri: UnicodeString;
+begin
+  Result:= FUri;
+end;
+
+
+
+// ++++++++++++++++++++ TdomInputSourceLocator ++++++++++++++++++++
+constructor TdomInputSourceLocator.create(const inputSource: TXmlInputSource;
+                                          const startLine,
+                                                startColumn,
+                                                endLine,
+                                                endColumn,
+                                                tabWidthValue: integer);
+begin
+  inherited create(startLine,startColumn,endLine,endColumn,-1,'',nil,nil);
+  FInputSource:= inputSource;
+  FTabWidth:= tabWidthValue;
+end;
+
+function TdomInputSourceLocator.getOffset: integer;
+begin
+  Result:= -1;
+  if assigned(FInputSource) then
+    with FInputSource do
+      if assigned(stream)
+        then result:= stream.Position;
+end;
+
+function TdomInputSourceLocator.getUri: UnicodeString;
+begin
+  if assigned(FInputSource)
+    then result:= FInputSource.systemId
+    else result:= '';
+end;
+
+procedure TdomInputSourceLocator.evaluate(const s: WideChar);
+const
+  TAB: WideChar = #9;
+  LF:  WideChar = #10;
+begin
+  if s = LF then begin
+    inc(FLineNumber);
+    FColumnNumber:= 0;
+  end else if s = TAB then begin
+    inc(FColumnNumber,tabWidth);
+  end else inc(FColumnNumber);
+end;
+
+procedure TdomInputSourceLocator.setStartMark;
+begin
+  FStartColumnNumber:= FColumnNumber;
+  FStartLineNumber:=   FLineNumber;
+end;
+
+
+
+// ++++++++++++++++++++++++++++ TXmlCustomHandler ++++++++++++++++++++++++++++
+function TXmlCustomHandler.sendErrorNotification(const target: TXmlCustomReader;
+                                                 const xmlErrorType: TXmlErrorType;
+                                                 const location: TdomLocator;
+                                                 const code: UnicodeString): boolean;
+begin
+  if assigned(target) then begin
+    result:= target.sendErrorNotification(xmlErrorType,location,code);
+  end else begin
+    if xmlErrorType in ET_FATAL_ERRORS
+      then result:= false
+      else result:= true;
+  end;
+end;
+
+
+
+// +++++++++++++++++++++++++++ TXmlStandardHandler +++++++++++++++++++++++++++
+procedure TXmlStandardHandler.Notification(AComponent: TComponent; operation: TOperation);
+begin
+  inherited notification(AComponent,Operation);
+  if (Operation = opRemove) and (AComponent = FNextHandler)
+    then FNextHandler:= nil;
+end;
+
+function TXmlStandardHandler.CDATA(const sender: TXmlCustomReader;
+                                   const locator: TdomLocator;
+                                         data: UnicodeString): boolean;
+begin
+  if assigned(FOnCDATA) then FOnCDATA(sender,locator,data);
+  if assigned(nextHandler)
+    then result:= nextHandler.CDATA(sender,locator,data)
+    else result:= true;
+end;
+
+function TXmlStandardHandler.charRef(const sender: TXmlCustomReader;
+                                     const locator: TdomLocator;
+                                           data: UnicodeString): boolean;
+begin
+  if assigned(FOnCharRef) then FOnCharRef(sender,locator,data);
+  if assigned(nextHandler)
+    then result:= nextHandler.charRef(sender,locator,data)
+    else result:= true;
+end;
+
+function TXmlStandardHandler.comment(const sender: TXmlCustomReader;
+                                     const locator: TdomLocator;
+                                           data: UnicodeString): boolean;
+begin
+  if assigned(FOnComment) then FOnComment(sender,locator,data);
+  if assigned(nextHandler)
+    then result:= nextHandler.comment(sender,locator,data)
+    else result:= true;
+end;
+
+function TXmlStandardHandler.doctype(const sender: TXmlCustomReader;
+                                     const locator: TdomLocator;
+                                           aname,
+                                           pubId,
+                                           sysId,
+                                           data: UnicodeString): boolean;
+begin
+  if assigned(FOnDoctype) then FOnDoctype(sender,locator,aname,pubId,sysId,data);
+  if assigned(nextHandler)
+    then result:= nextHandler.doctype(sender,locator,aname,pubId,sysId,data)
+    else result:= true;
+end;
+
+function TXmlStandardHandler.endDocument(const sender: TXmlCustomReader;
+                                         const locator: TdomLocator): boolean;
+begin
+  if assigned(FOnEndDocument) then FOnEndDocument(sender,locator);
+  if assigned(nextHandler)
+    then result:= nextHandler.endDocument(sender,locator)
+    else result:= true;
+end;
+
+function TXmlStandardHandler.endElement(const sender: TXmlCustomReader;
+                                        const locator: TdomLocator;
+                                              namespaceURI,
+                                              tagName: UnicodeString): boolean;
+begin
+  if assigned(FOnEndElement) then FOnEndElement(sender,locator,namespaceURI,tagName);
+  if assigned(nextHandler)
+    then result:= nextHandler.endElement(sender,locator,namespaceURI,tagName)
+    else result:= true;
+end;
+
+function TXmlStandardHandler.endPrefixMapping(const sender: TXmlCustomReader;
+                                              const locator: TdomLocator;
+                                                    prefix: UnicodeString): boolean;
+begin
+  if assigned(FOnEndPrefixMapping) then FOnEndPrefixMapping(sender,locator,prefix);
+  if assigned(nextHandler)
+    then result:= nextHandler.endPrefixMapping(sender,locator,prefix)
+    else result:= true;
+end;
+
+function TXmlStandardHandler.entityRef(const sender: TXmlCustomReader;
+                                       const locator: TdomLocator;
+                                             aname: UnicodeString): boolean;
+begin
+  if assigned(FOnEntityRef) then FOnEntityRef(sender,locator,aname);
+  if assigned(nextHandler)
+    then result:= nextHandler.entityRef(sender,locator,aname)
+    else result:= true;
+end;
+
+function TXmlStandardHandler.PCDATA(const sender: TXmlCustomReader;
+                                    const locator: TdomLocator;
+                                          data: UnicodeString): boolean;
+begin
+  if assigned(FOnPCDATA) then FOnPCDATA(sender,locator,data);
+  if assigned(nextHandler)
+    then result:= nextHandler.PCDATA(sender,locator,data)
+    else result:= true;
+end;
+
+function TXmlStandardHandler.processingInstruction(const sender: TXmlCustomReader;
+                                                   const locator: TdomLocator;
+                                                         targ,
+                                                         data : UnicodeString): boolean;
+begin
+  if assigned(FOnProcessingInstruction) then FOnProcessingInstruction(sender,locator,targ,data);
+  if assigned(nextHandler)
+    then result:= nextHandler.processingInstruction(sender,locator,targ,data)
+    else result:= true;
+end;
+
+function TXmlStandardHandler.skippedEntity(const sender: TXmlCustomReader;
+                                           const locator: TdomLocator;
+                                                 aname: UnicodeString): boolean;
+begin
+  if assigned(FOnSkippedEntity) then FOnSkippedEntity(sender,locator,aname);
+  if assigned(nextHandler)
+    then result:= nextHandler.skippedEntity(sender,locator,aname)
+    else result:= true;
+end;
+
+function TXmlStandardHandler.startDocument(const sender: TXmlCustomReader;
+                                           const locator: TdomLocator;
+                                                 version,
+                                                 encName: UnicodeString;
+                                                 sdDl: TdomStandalone): boolean;
+begin
+  if assigned(FOnStartDocument) then FOnStartDocument(sender,locator,version,encName,sdDl);
+  if assigned(nextHandler)
+    then result:= nextHandler.startDocument(sender,locator,version,encName,sdDl)
+    else result:= true;
+end;
+
+function TXmlStandardHandler.startElement(const sender: TXmlCustomReader;
+                                          const locator: TdomLocator;
+                                                namespaceURI,
+                                                tagName: UnicodeString;
+                                                attributes: TdomNameValueList): boolean;
+begin
+  if assigned(FOnStartElement) then FOnStartElement(sender,locator,namespaceURI,tagName,attributes);
+  if assigned(nextHandler)
+    then result:= nextHandler.startElement(sender,locator,namespaceURI,tagName,attributes)
+    else result:= true;
+end;
+
+function TXmlStandardHandler.startPrefixMapping(const sender: TXmlCustomReader;
+                                                const locator: TdomLocator;
+                                                      prefix,
+                                                      uri: UnicodeString): boolean;
+begin
+  if assigned(FOnStartPrefixMapping) then FOnStartPrefixMapping(sender,locator,prefix,uri);
+  if assigned(nextHandler)
+    then result:= nextHandler.startPrefixMapping(sender,locator,prefix,uri)
+    else result:= true;
+end;
+
+function TXmlStandardHandler.attributeDefinition(const sender: TXmlCustomReader;
+                                                 const locator: TdomLocator;
+                                                       aname,
+                                                       attType,
+                                                       bracket,
+                                                       defaultDecl,
+                                                       attValue: UnicodeString): boolean;
+begin
+  if assigned(FOnAttributeDefinition) then FOnAttributeDefinition(sender,locator,aname,attType,bracket,defaultDecl,attValue);
+  if assigned(nextHandler)
+    then result:= nextHandler.attributeDefinition(sender,locator,aname,attType,bracket,defaultDecl,attValue)
+    else result:= true;
+end;
+
+function TXmlStandardHandler.conditionalSection(const sender: TXmlCustomReader;
+                                                const locator: TdomLocator;
+                                                      includeStmt,
+                                                      data: UnicodeString): boolean;
+begin
+  if assigned(FOnConditionalSection) then FOnConditionalSection(sender,locator,includeStmt,data);
+  if assigned(nextHandler)
+    then result:= nextHandler.conditionalSection(sender,locator,includeStmt,data)
+    else result:= true;
+end;
+
+function TXmlStandardHandler.DTDcomment(const sender: TXmlCustomReader;
+                                        const locator: TdomLocator;
+                                              data: UnicodeString): boolean;
+begin
+  if assigned(FOnDtdComment) then FOnDtdComment(sender,locator,data);
+  if assigned(nextHandler)
+    then result:= nextHandler.DTDcomment(sender,locator,data)
+    else result:= true;
+end;
+
+function TXmlStandardHandler.DTDprocessingInstruction(const sender: TXmlCustomReader;
+                                                      const locator: TdomLocator;
+                                                            targ,
+                                                            data : UnicodeString): boolean;
+begin
+  if assigned(FOnDtdProcessingInstruction) then FOnDtdProcessingInstruction(sender,locator,targ,data);
+  if assigned(nextHandler)
+    then result:= nextHandler.DTDprocessingInstruction(sender,locator,targ,data)
+    else result:= true;
+end;
+
+function TXmlStandardHandler.elementTypeDeclaration(const sender: TXmlCustomReader;
+                                                    const locator: TdomLocator;
+                                                          aname,
+                                                          data: UnicodeString): boolean;
+begin
+  if assigned(FOnElementTypeDeclaration) then FOnElementTypeDeclaration(sender,locator,aname,data);
+  if assigned(nextHandler)
+    then result:= nextHandler.elementTypeDeclaration(sender,locator,aname,data)
+    else result:= true;
+end;
+
+function TXmlStandardHandler.endAttListDeclaration(const sender: TXmlCustomReader;
+                                                   const locator: TdomLocator): boolean;
+begin
+  if assigned(FOnEndAttListDeclaration) then FOnEndAttListDeclaration(sender,locator);
+  if assigned(nextHandler)
+    then result:= nextHandler.endAttListDeclaration(sender,locator)
+    else result:= true;
+end;
+
+function TXmlStandardHandler.endExtDtd(const sender: TXmlCustomReader;
+                                       const locator: TdomLocator): boolean;
+begin
+  if assigned(FOnEndExtDtd) then FOnEndExtDtd(sender,locator);
+  if assigned(nextHandler)
+    then result:= nextHandler.endExtDtd(sender,locator)
+    else result:= true;
+end;
+
+function TXmlStandardHandler.endIntDtd(const sender: TXmlCustomReader;
+                                       const locator: TdomLocator): boolean;
+begin
+  if assigned(FOnendIntDtd) then FOnendIntDtd(sender,locator);
+  if assigned(nextHandler)
+    then result:= nextHandler.endIntDtd(sender,locator)
+    else result:= true;
+end;
+
+function TXmlStandardHandler.entityDeclaration(const sender: TXmlCustomReader;
+                                               const locator: TdomLocator;
+                                                     aname,
+                                                     entityValue,
+                                                     pubId,
+                                                     sysId,
+                                                     notaName: UnicodeString): boolean;
+begin
+  if assigned(FOnEntityDeclaration) then FOnEntityDeclaration(sender,locator,aname,entityValue,pubId,sysId,notaName);
+  if assigned(nextHandler)
+    then result:= nextHandler.entityDeclaration(sender,locator,aname,entityValue,pubId,sysId,notaName)
+    else result:= true;
+end;
+
+function TXmlStandardHandler.notationDeclaration(const sender: TXmlCustomReader;
+                                                 const locator: TdomLocator;
+                                                       aname,
+                                                       pubId,
+                                                       sysId: UnicodeString): boolean;
+begin
+  if assigned(FOnNotationDeclaration) then FOnNotationDeclaration(sender,locator,aname,pubId,sysId);
+  if assigned(nextHandler)
+    then result:= nextHandler.notationDeclaration(sender,locator,aname,pubId,sysId)
+    else result:= true;
+end;
+
+function TXmlStandardHandler.parameterEntityDeclaration(const sender: TXmlCustomReader;
+                                                        const locator: TdomLocator;
+                                                              aname,
+                                                              entityValue,
+                                                              pubId,
+                                                              sysId: UnicodeString): boolean;
+begin
+  if assigned(FOnParameterEntityDeclaration) then FOnParameterEntityDeclaration(sender,locator,aname,entityValue,pubId,sysId);
+  if assigned(nextHandler)
+    then result:= nextHandler.parameterEntityDeclaration(sender,locator,aname,entityValue,pubId,sysId)
+    else result:= true;
+end;
+
+function TXmlStandardHandler.parameterEntityRef(const sender: TXmlCustomReader;
+                                                const locator: TdomLocator;
+                                                      aname: UnicodeString): boolean;
+begin
+  if assigned(FOnParameterEntityRef) then FOnParameterEntityRef(sender,locator,aname);
+  if assigned(nextHandler)
+    then result:= nextHandler.parameterEntityRef(sender,locator,aname)
+    else result:= true;
+end;
+
+function TXmlStandardHandler.startAttListDeclaration(const sender: TXmlCustomReader;
+                                                     const locator: TdomLocator;
+                                                           aname: UnicodeString): boolean;
+begin
+  if assigned(FOnStartAttListDeclaration) then FOnStartAttListDeclaration(sender,locator,aname);
+  if assigned(nextHandler)
+    then result:= nextHandler.startAttListDeclaration(sender,locator,aname)
+    else result:= true;
+end;
+
+function TXmlStandardHandler.startExtDtd(const sender: TXmlCustomReader;
+                                         const locator: TdomLocator;
+                                               version,
+                                               encName: UnicodeString): boolean;
+begin
+  if assigned(FOnstartExtDtd) then FOnstartExtDtd(sender,locator,version,encName);
+  if assigned(nextHandler)
+    then result:= nextHandler.startExtDtd(sender,locator,version,encName)
+    else result:= true;
+end;
+
+function TXmlStandardHandler.startIntDtd(const sender: TXmlCustomReader;
+                                         const locator: TdomLocator): boolean;
+begin
+  if assigned(FOnstartIntDtd) then FOnstartIntDtd(sender,locator);
+  if assigned(nextHandler)
+    then result:= nextHandler.startIntDtd(sender,locator)
+    else result:= true;
+end;
+
+function TXmlStandardHandler.resolvePE(    PEReferenceName: UnicodeString;
+                                       var PEValue: UnicodeString;
+                                       var error: TXmlErrorType): boolean;
+begin
+  if assigned(nextHandler)
+    then result:= nextHandler.resolvePE(PEReferenceName,PEValue,error)
+    else begin
+      PEValue:= '';
+      error:= ET_UNRESOLVABLE_PARAMETER_ENTITY_REFERENCE;
+      result:= true;
+    end;
+end;
+
+procedure TXmlStandardHandler.notifyReset;
+begin
+  if assigned(nextHandler) then nextHandler.notifyReset;
+end;
+
+
+
+// +++++++++++++++++++++++++++++ TXmlHandlerItem +++++++++++++++++++++++++++++
+function TXmlHandlerItem.getXmlHandler: TXmlCustomHandler;
+begin
+  Result := FXmlHandler;
+end;
+
+procedure TXmlHandlerItem.setXmlHandler(Value: TXmlCustomHandler);
+begin
+  FXmlHandler:= Value;
+end;
+
+procedure TXmlHandlerItem.Assign(Source: TPersistent);
+begin
+  if Source is TXmlHandlerItem
+    then XmlHandler:= TXmlHandlerItem(Source).XmlHandler
+    else inherited Assign(Source);
+end;
+
+
+// +++++++++++++++++++++++++++++++ TXmlHandlers ++++++++++++++++++++++++++++++
+constructor TXmlHandlers.Create(Distributor: TXmlDistributor);
+begin
+  inherited create(TXmlHandlerItem);
+  FDistributor:= Distributor;
+end;
+
+function TXmlHandlers.GetItem(Index: Integer): TXmlHandlerItem;
+begin
+  result:= TXmlHandlerItem(inherited GetItem(Index));
+end;
+
+procedure TXmlHandlers.SetItem(Index: Integer; Value: TXmlHandlerItem);
+begin
+  inherited SetItem(Index, Value);
+end;
+
+function TXmlHandlers.GetOwner: TPersistent;
+begin
+  result:= FDistributor;
+end;
+
+function TXmlHandlers.Add: TXmlHandlerItem;
+begin
+  result:= TXmlHandlerItem(inherited Add);
+end;
+
+procedure TXmlHandlers.Assign(Source: TPersistent);
+var
+  i: integer;
+begin
+  if Source = self then exit;
+  if Source is TStrings then begin
+    clear;
+    with TStrings(Source) do
+      for i:= 0 to pred(count) do
+        if assigned(Objects[i])
+          then if Objects[i] is TXmlCustomHandler
+            then self.add.XmlHandler:= TXmlCustomHandler(Objects[i]);
+  end else inherited Assign(Source);
+end;
+
+function TXmlHandlers.FindHandlerItem(AHandler: TXmlCustomHandler): TXmlHandlerItem;
+var
+  i: integer;
+begin
+  for i:= 0 to pred(count) do
+  begin
+    result := TXmlHandlerItem(inherited getItem(i));
+    if result.FXmlHandler = AHandler then exit;
+  end;
+  result:= nil;
+end;
+
+
+
+// +++++++++++++++++++++++++++++ TXmlDistributor +++++++++++++++++++++++++++++
+constructor TXmlDistributor.create(AOwner: TComponent);
+begin
+  inherited create(AOwner);
+  FNextHandlers:= TXmlHandlers.create(self);
+end;
+
+destructor TXmlDistributor.destroy;
+begin
+  FNextHandlers.free;
+  inherited destroy;
+end;
+
+procedure TXmlDistributor.readData(Reader: TReader);
+begin
+  Reader.ReadCollection(nextHandlers);
+end;
+
+procedure TXmlDistributor.writeData(Writer: TWriter);
+begin
+  Writer.WriteCollection(nextHandlers);
+end;
+
+procedure TXmlDistributor.DefineProperties(Filer: TFiler);
+begin
+  inherited DefineProperties(Filer);
+  Filer.DefineProperty('NextHandlers',readData,writeData,true);
+end;
+
+procedure TXmlDistributor.Notification(AComponent: TComponent; operation: TOperation);
+var
+  handlerItem: TXmlHandlerItem;
+begin
+  inherited notification(AComponent,Operation);
+  if not (csDestroying in ComponentState) and (Operation = opRemove) then begin
+    if (AComponent is TXmlCustomHandler) then  begin
+      handlerItem := nextHandlers.FindHandlerItem(TXmlCustomHandler(AComponent));
+      if handlerItem <> nil then handlerItem.XmlHandler:= nil;
+    end;
+  end;
+end;
+
+procedure TXmlDistributor.setNextHandlers(const value: TXmlHandlers);
+begin
+  FNextHandlers.Assign(Value);
+end;
+
+function TXmlDistributor.CDATA(const sender: TXmlCustomReader;
+                               const locator: TdomLocator;
+                                     data: UnicodeString): boolean;
+var
+  i: integer;
+begin
+  if assigned(FOnCDATA) then FOnCDATA(sender,locator,data);
+  result:= true;
+  with nextHandlers do begin
+    for i:= 0 to pred(count) do begin
+      if not assigned(items[i].XmlHandler) then continue;
+      result:= items[i].XmlHandler.CDATA(sender,locator,data);
+      if not result then break;
+    end;
+  end;
+end;
+
+function TXmlDistributor.charRef(const sender: TXmlCustomReader;
+                                 const locator: TdomLocator;
+                                       data: UnicodeString): boolean;
+var
+  i: integer;
+begin
+  if assigned(FOnCharRef) then FOnCharRef(sender,locator,data);
+  result:= true;
+  with nextHandlers do begin
+    for i:= 0 to pred(count) do begin
+      if not assigned(items[i].XmlHandler) then continue;
+      result:= items[i].XmlHandler.charRef(sender,locator,data);
+      if not result then break;
+    end;
+  end;
+end;
+
+function TXmlDistributor.comment(const sender: TXmlCustomReader;
+                                 const locator: TdomLocator;
+                                       data: UnicodeString): boolean;
+var
+  i: integer;
+begin
+  if assigned(FOnComment) then FOnComment(sender,locator,data);
+  result:= true;
+  with nextHandlers do begin
+    for i:= 0 to pred(count) do begin
+      if not assigned(items[i].XmlHandler) then continue;
+      result:= items[i].XmlHandler.comment(sender,locator,data);
+      if not result then break;
+    end;
+  end;
+end;
+
+function TXmlDistributor.doctype(const sender: TXmlCustomReader;
+                                 const locator: TdomLocator;
+                                       aname,
+                                       pubId,
+                                       sysId,
+                                       data: UnicodeString): boolean;
+var
+  i: integer;
+begin
+  if assigned(FOnDoctype) then FOnDoctype(sender,locator,aname,pubId,sysId,data);
+  result:= true;
+  with nextHandlers do begin
+    for i:= 0 to pred(count) do begin
+      if not assigned(items[i].XmlHandler) then continue;
+      result:= items[i].XmlHandler.doctype(sender,locator,aname,pubId,sysId,data);
+      if not result then break;
+    end;
+  end;
+end;
+
+function TXmlDistributor.endDocument(const sender: TXmlCustomReader;
+                                         const locator: TdomLocator): boolean;
+var
+  i: integer;
+begin
+  if assigned(FOnEndDocument) then FOnEndDocument(sender,locator);
+  result:= true;
+  with nextHandlers do begin
+    for i:= 0 to pred(count) do begin
+      if not assigned(items[i].XmlHandler) then continue;
+      result:= items[i].XmlHandler.endDocument(sender,locator);
+      if not result then break;
+    end;
+  end;
+end;
+
+function TXmlDistributor.endElement(const sender: TXmlCustomReader;
+                                    const locator: TdomLocator;
+                                          namespaceURI,
+                                          tagName: UnicodeString): boolean;
+var
+  i: integer;
+begin
+  if assigned(FOnEndElement) then FOnEndElement(sender,locator,namespaceURI,tagName);
+  result:= true;
+  with nextHandlers do begin
+    for i:= 0 to pred(count) do begin
+      if not assigned(items[i].XmlHandler) then continue;
+      result:= items[i].XmlHandler.endElement(sender,locator,namespaceURI,tagName);
+      if not result then break;
+    end;
+  end;
+end;
+
+function TXmlDistributor.endPrefixMapping(const sender: TXmlCustomReader;
+                                          const locator: TdomLocator;
+                                                prefix: UnicodeString): boolean;
+var
+  i: integer;
+begin
+  if assigned(FOnEndPrefixMapping) then FOnEndPrefixMapping(sender,locator,prefix);
+  result:= true;
+  with nextHandlers do begin
+    for i:= 0 to pred(count) do begin
+      if not assigned(items[i].XmlHandler) then continue;
+      result:= items[i].XmlHandler.endPrefixMapping(sender,locator,prefix);
+      if not result then break;
+    end;
+  end;
+end;
+
+function TXmlDistributor.entityRef(const sender: TXmlCustomReader;
+                                   const locator: TdomLocator;
+                                         aname: UnicodeString): boolean;
+var
+  i: integer;
+begin
+  if assigned(FOnEntityRef) then FOnEntityRef(sender,locator,aname);
+  result:= true;
+  with nextHandlers do begin
+    for i:= 0 to pred(count) do begin
+      if not assigned(items[i].XmlHandler) then continue;
+      result:= items[i].XmlHandler.entityRef(sender,locator,aname);
+      if not result then break;
+    end;
+  end;
+end;
+
+function TXmlDistributor.PCDATA(const sender: TXmlCustomReader;
+                                const locator: TdomLocator;
+                                     data: UnicodeString): boolean;
+var
+  i: integer;
+begin
+  if assigned(FOnPCDATA) then FOnPCDATA(sender,locator,data);
+  result:= true;
+  with nextHandlers do begin
+    for i:= 0 to pred(count) do begin
+      if not assigned(items[i].XmlHandler) then continue;
+      result:= items[i].XmlHandler.PCDATA(sender,locator,data);
+      if not result then break;
+    end;
+  end;
+end;
+
+function TXmlDistributor.processingInstruction(const sender: TXmlCustomReader;
+                                               const locator: TdomLocator;
+                                                     targ,
+                                                     data : UnicodeString): boolean;
+var
+  i: integer;
+begin
+  if assigned(FOnProcessingInstruction) then FOnProcessingInstruction(sender,locator,targ,data);
+  result:= true;
+  with nextHandlers do begin
+    for i:= 0 to pred(count) do begin
+      if not assigned(items[i].XmlHandler) then continue;
+      result:= items[i].XmlHandler.processingInstruction(sender,locator,targ,data);
+      if not result then break;
+    end;
+  end;
+end;
+
+function TXmlDistributor.skippedEntity(const sender: TXmlCustomReader;
+                                       const locator: TdomLocator;
+                                             aname: UnicodeString): boolean;
+var
+  i: integer;
+begin
+  if assigned(FOnSkippedEntity) then FOnSkippedEntity(sender,locator,aname);
+  result:= true;
+  with nextHandlers do begin
+    for i:= 0 to pred(count) do begin
+      if not assigned(items[i].XmlHandler) then continue;
+      result:= items[i].XmlHandler.skippedEntity(sender,locator,aname);
+      if not result then break;
+    end;
+  end;
+end;
+
+function TXmlDistributor.startDocument(const sender: TXmlCustomReader;
+                                       const locator: TdomLocator;
+                                             version,
+                                             encName: UnicodeString;
+                                             sdDl: TdomStandalone): boolean;
+var
+  i: integer;
+begin
+  if assigned(FOnStartDocument) then FOnStartDocument(sender,locator,version,encName,sdDl);
+  result:= true;
+  with nextHandlers do begin
+    for i:= 0 to pred(count) do begin
+      if not assigned(items[i].XmlHandler) then continue;
+      result:= items[i].XmlHandler.startDocument(sender,locator,version,encName,sdDl);
+      if not result then break;
+    end;
+  end;
+end;
+
+function TXmlDistributor.startElement(const sender: TXmlCustomReader;
+                                      const locator: TdomLocator;
+                                            namespaceURI,
+                                            tagName: UnicodeString;
+                                            attributes: TdomNameValueList): boolean;
+var
+  i: integer;
+begin
+  if assigned(FOnStartElement) then FOnStartElement(sender,locator,namespaceURI,tagName,attributes);
+  result:= true;
+  with nextHandlers do begin
+    for i:= 0 to pred(count) do begin
+      if not assigned(items[i].XmlHandler) then continue;
+      result:= items[i].XmlHandler.startElement(sender,locator,namespaceURI,tagName,attributes);
+      if not result then break;
+    end;
+  end;
+end;
+
+function TXmlDistributor.startPrefixMapping(const sender: TXmlCustomReader;
+                                            const locator: TdomLocator;
+                                                  prefix,
+                                                  uri: UnicodeString): boolean;
+var
+  i: integer;
+begin
+  if assigned(FOnStartPrefixMapping) then FOnStartPrefixMapping(sender,locator,prefix,uri);
+  result:= true;
+  with nextHandlers do begin
+    for i:= 0 to pred(count) do begin
+      if not assigned(items[i].XmlHandler) then continue;
+      result:= items[i].XmlHandler.startPrefixMapping(sender,locator,prefix,uri);
+      if not result then break;
+    end;
+  end;
+end;
+
+function TXmlDistributor.attributeDefinition(const sender: TXmlCustomReader;
+                                             const locator: TdomLocator;
+                                                   aname,
+                                                   attType,
+                                                   bracket,
+                                                   defaultDecl,
+                                                   attValue: UnicodeString): boolean;
+var
+  i: integer;
+begin
+  if assigned(FOnAttributeDefinition) then FOnAttributeDefinition(sender,locator,aname,attType,bracket,defaultDecl,attValue);
+  result:= true;
+  with nextHandlers do begin
+    for i:= 0 to pred(count) do begin
+      if not assigned(items[i].XmlHandler) then continue;
+      result:= items[i].XmlHandler.attributeDefinition(sender,locator,aname,attType,bracket,defaultDecl,attValue);
+      if not result then break;
+    end;
+  end;
+end;
+
+function TXmlDistributor.conditionalSection(const sender: TXmlCustomReader;
+                                            const locator: TdomLocator;
+                                                  includeStmt,
+                                                  data: UnicodeString): boolean;
+var
+  i: integer;
+begin
+  if assigned(FOnConditionalSection) then FOnConditionalSection(sender,locator,includeStmt,data);
+  result:= true;
+  with nextHandlers do begin
+    for i:= 0 to pred(count) do begin
+      if not assigned(items[i].XmlHandler) then continue;
+      result:= items[i].XmlHandler.conditionalSection(sender,locator,includeStmt,data);
+      if not result then break;
+    end;
+  end;
+end;
+
+function TXmlDistributor.DTDcomment(const sender: TXmlCustomReader;
+                                    const locator: TdomLocator;
+                                          data: UnicodeString): boolean;
+var
+  i: integer;
+begin
+  if assigned(FOnDtdComment) then FOnDtdComment(sender,locator,data);
+  result:= true;
+  with nextHandlers do begin
+    for i:= 0 to pred(count) do begin
+      if not assigned(items[i].XmlHandler) then continue;
+      result:= items[i].XmlHandler.DTDcomment(sender,locator,data);
+      if not result then break;
+    end;
+  end;
+end;
+
+function TXmlDistributor.DTDprocessingInstruction(const sender: TXmlCustomReader;
+                                                  const locator: TdomLocator;
+                                                        targ,
+                                                        data : UnicodeString): boolean;
+var
+  i: integer;
+begin
+  if assigned(FOnDtdProcessingInstruction) then FOnDtdProcessingInstruction(sender,locator,targ,data);
+  result:= true;
+  with nextHandlers do begin
+    for i:= 0 to pred(count) do begin
+      if not assigned(items[i].XmlHandler) then continue;
+      result:= items[i].XmlHandler.DTDprocessingInstruction(sender,locator,targ,data);
+      if not result then break;
+    end;
+  end;
+end;
+
+function TXmlDistributor.elementTypeDeclaration(const sender: TXmlCustomReader;
+                                                const locator: TdomLocator;
+                                                      aname,
+                                                      data: UnicodeString): boolean;
+var
+  i: integer;
+begin
+  if assigned(FOnElementTypeDeclaration) then FOnElementTypeDeclaration(sender,locator,aname,data);
+  result:= true;
+  with nextHandlers do begin
+    for i:= 0 to pred(count) do begin
+      if not assigned(items[i].XmlHandler) then continue;
+      result:= items[i].XmlHandler.elementTypeDeclaration(sender,locator,aname,data);
+      if not result then break;
+    end;
+  end;
+end;
+
+function TXmlDistributor.endAttListDeclaration(const sender: TXmlCustomReader;
+                                                   const locator: TdomLocator): boolean;
+var
+  i: integer;
+begin
+  if assigned(FOnEndAttListDeclaration) then FOnEndAttListDeclaration(sender,locator);
+  result:= true;
+  with nextHandlers do begin
+    for i:= 0 to pred(count) do begin
+      if not assigned(items[i].XmlHandler) then continue;
+      result:= items[i].XmlHandler.endAttListDeclaration(sender,locator);
+      if not result then break;
+    end;
+  end;
+end;
+
+function TXmlDistributor.endExtDtd(const sender: TXmlCustomReader;
+                                   const locator: TdomLocator): boolean;
+var
+  i: integer;
+begin
+  if assigned(FOnEndExtDtd) then FOnEndExtDtd(sender,locator);
+  result:= true;
+  with nextHandlers do begin
+    for i:= 0 to pred(count) do begin
+      if not assigned(items[i].XmlHandler) then continue;
+      result:= items[i].XmlHandler.endExtDtd(sender,locator);
+      if not result then break;
+    end;
+  end;
+end;
+
+function TXmlDistributor.endIntDtd(const sender: TXmlCustomReader;
+                                   const locator: TdomLocator): boolean;
+var
+  i: integer;
+begin
+  if assigned(FOnendIntDtd) then FOnendIntDtd(sender,locator);
+  result:= true;
+  with nextHandlers do begin
+    for i:= 0 to pred(count) do begin
+      if not assigned(items[i].XmlHandler) then continue;
+      result:= items[i].XmlHandler.endIntDtd(sender,locator);
+      if not result then break;
+    end;
+  end;
+end;
+
+function TXmlDistributor.entityDeclaration(const sender: TXmlCustomReader;
+                                           const locator: TdomLocator;
+                                                 aname,
+                                                 entityValue,
+                                                 pubId,
+                                                 sysId,
+                                                 notaName: UnicodeString): boolean;
+var
+  i: integer;
+begin
+  if assigned(FOnEntityDeclaration) then FOnEntityDeclaration(sender,locator,aname,entityValue,pubId,sysId,notaName);
+  result:= true;
+  with nextHandlers do begin
+    for i:= 0 to pred(count) do begin
+      if not assigned(items[i].XmlHandler) then continue;
+      result:= items[i].XmlHandler.entityDeclaration(sender,locator,aname,entityValue,pubId,sysId,notaName);
+      if not result then break;
+    end;
+  end;
+end;
+
+function TXmlDistributor.notationDeclaration(const sender: TXmlCustomReader;
+                                             const locator: TdomLocator;
+                                                   aname,
+                                                   pubId,
+                                                   sysId: UnicodeString): boolean;
+var
+  i: integer;
+begin
+  if assigned(FOnNotationDeclaration) then FOnNotationDeclaration(sender,locator,aname,pubId,sysId);
+  result:= true;
+  with nextHandlers do begin
+    for i:= 0 to pred(count) do begin
+      if not assigned(items[i].XmlHandler) then continue;
+      result:= items[i].XmlHandler.notationDeclaration(sender,locator,aname,pubId,sysId);
+      if not result then break;
+    end;
+  end;
+end;
+
+function TXmlDistributor.parameterEntityDeclaration(const sender: TXmlCustomReader;
+                                                    const locator: TdomLocator;
+                                                          aname,
+                                                          entityValue,
+                                                          pubId,
+                                                          sysId: UnicodeString): boolean;
+var
+  i: integer;
+begin
+  if assigned(FOnParameterEntityDeclaration) then FOnParameterEntityDeclaration(sender,locator,aname,entityValue,pubId,sysId);
+  result:= true;
+  with nextHandlers do begin
+    for i:= 0 to pred(count) do begin
+      if not assigned(items[i].XmlHandler) then continue;
+      result:= items[i].XmlHandler.parameterEntityDeclaration(sender,locator,aname,entityValue,pubId,sysId);
+      if not result then break;
+    end;
+  end;
+end;
+
+function TXmlDistributor.parameterEntityRef(const sender: TXmlCustomReader;
+                                            const locator: TdomLocator;
+                                                  aname: UnicodeString): boolean;
+var
+  i: integer;
+begin
+  if assigned(FOnParameterEntityRef) then FOnParameterEntityRef(sender,locator,aname);
+  result:= true;
+  with nextHandlers do begin
+    for i:= 0 to pred(count) do begin
+      if not assigned(items[i].XmlHandler) then continue;
+      result:= items[i].XmlHandler.parameterEntityRef(sender,locator,aname);
+      if not result then break;
+    end;
+  end;
+end;
+
+function TXmlDistributor.startAttListDeclaration(const sender: TXmlCustomReader;
+                                                 const locator: TdomLocator;
+                                                       aname: UnicodeString): boolean;
+var
+  i: integer;
+begin
+  if assigned(FOnStartAttListDeclaration) then FOnStartAttListDeclaration(sender,locator,aname);
+  result:= true;
+  with nextHandlers do begin
+    for i:= 0 to pred(count) do begin
+      if not assigned(items[i].XmlHandler) then continue;
+      result:= items[i].XmlHandler.startAttListDeclaration(sender,locator,aname);
+      if not result then break;
+    end;
+  end;
+end;
+
+function TXmlDistributor.startExtDtd(const sender: TXmlCustomReader;
+                                     const locator: TdomLocator;
+                                           version,
+                                           encDl: UnicodeString): boolean;
+var
+  i: integer;
+begin
+  if assigned(FOnStartExtDtd) then FOnStartExtDtd(sender,locator,version,encDl);
+  result:= true;
+  with nextHandlers do begin
+    for i:= 0 to pred(count) do begin
+      if not assigned(items[i].XmlHandler) then continue;
+      result:= items[i].XmlHandler.startExtDtd(sender,locator,version,encDl);
+      if not result then break;
+    end;
+  end;
+end;
+
+function TXmlDistributor.startIntDtd(const sender: TXmlCustomReader;
+                                     const locator: TdomLocator): boolean;
+var
+  i: integer;
+begin
+  if assigned(FOnstartIntDtd) then FOnstartIntDtd(sender,locator);
+  result:= true;
+  with nextHandlers do begin
+    for i:= 0 to pred(count) do begin
+      if not assigned(items[i].XmlHandler) then continue;
+      result:= items[i].XmlHandler.startIntDtd(sender,locator);
+      if not result then break;
+    end;
+  end;
+end;
+
+function TXmlDistributor.resolvePE(    PEReferenceName: UnicodeString;
+                                   var PEValue: UnicodeString;
+                                   var error: TXmlErrorType): boolean;
+var
+  i: integer;
+begin
+  result:= true;
+  PEValue:= '';
+  error:= ET_UNRESOLVABLE_PARAMETER_ENTITY_REFERENCE;
+  with nextHandlers do begin
+    for i:= 0 to pred(count) do begin
+      if not assigned(items[i].XmlHandler) then continue;
+      result:= items[i].XmlHandler.resolvePE(PEReferenceName,PEValue,error);
+      if (error = ET_NONE) or not result then break;
+    end;
+  end;
+end;
+
+procedure TXmlDistributor.notifyReset;
+var
+  i: integer;
+begin
+  with nextHandlers do begin
+    for i:= 0 to pred(count) do begin
+      if assigned(items[i].XmlHandler)
+        then items[i].XmlHandler.notifyReset;
+    end;
+  end;
+end;
+
+
+
+// +++++++++++++++++++++++++++ TXmlCustomDTDHandler +++++++++++++++++++++++++++
+function TXmlCustomDtdHandler.comment(const sender: TXmlCustomReader;
+                                      const locator: TdomLocator;
+                                            data: UnicodeString): boolean;
+begin
+  Result := False;
+  raise EParserException.create('Parser error.');
+end;
+
+function TXmlCustomDtdHandler.CDATA(const sender: TXmlCustomReader;
+                                    const locator: TdomLocator;
+                                          data: UnicodeString): boolean;
+begin
+  Result := False;
+  raise EParserException.create('Parser error.');
+end;
+
+function TXmlCustomDtdHandler.charRef(const sender: TXmlCustomReader;
+                                      const locator: TdomLocator;
+                                            data: UnicodeString): boolean;
+begin
+  Result := False;
+  raise EParserException.create('Parser error.');
+end;
+
+function TXmlCustomDtdHandler.doctype(const sender: TXmlCustomReader;
+                                      const locator: TdomLocator;
+                                            aname,
+                                            pubId,
+                                            sysId,
+                                            data: UnicodeString): boolean;
+begin
+  Result := False;
+  raise EParserException.create('Parser error.');
+end;
+
+function TXmlCustomDtdHandler.endDocument(const sender: TXmlCustomReader;
+                                          const locator: TdomLocator): boolean;
+begin
+  Result := False;
+  raise EParserException.create('Parser error.');
+end;
+
+function TXmlCustomDtdHandler.endElement(const sender: TXmlCustomReader;
+                                         const locator: TdomLocator;
+                                               namespaceURI,
+                                               tagName: UnicodeString): boolean;
+begin
+  Result := False;
+  raise EParserException.create('Parser error.');
+end;
+
+function TXmlCustomDtdHandler.endPrefixMapping(const sender: TXmlCustomReader;
+                                               const locator: TdomLocator;
+                                                     prefix: UnicodeString): boolean;
+begin
+  Result := False;
+  raise EParserException.create('Parser error.');
+end;
+
+function TXmlCustomDtdHandler.entityRef(const sender: TXmlCustomReader;
+                                        const locator: TdomLocator;
+                                              aname: UnicodeString): boolean;
+begin
+  Result := False;
+  raise EParserException.create('Parser error.');
+end;
+
+function TXmlCustomDtdHandler.PCDATA(const sender: TXmlCustomReader;
+                                     const locator: TdomLocator;
+                                           data: UnicodeString): boolean;
+begin
+  Result := False;
+  raise EParserException.create('Parser error.');
+end;
+
+function TXmlCustomDtdHandler.processingInstruction(const sender: TXmlCustomReader;
+                                                    const locator: TdomLocator;
+                                                          targ,
+                                                          data : UnicodeString): boolean;
+begin
+  Result := False;
+  raise EParserException.create('Parser error.');
+end;
+
+function TXmlCustomDtdHandler.skippedEntity(const sender: TXmlCustomReader;
+                                            const locator: TdomLocator;
+                                                  aname: UnicodeString): boolean;
+begin
+  Result := False;
+  raise EParserException.create('Parser error.');
+end;
+
+function TXmlCustomDtdHandler.startDocument(const sender: TXmlCustomReader;
+                                            const locator: TdomLocator;
+                                                  version,
+                                                  encName: UnicodeString;
+                                                  sdDl: TdomStandalone): boolean;
+begin
+  Result := False;
+  raise EParserException.create('Parser error.');
+end;
+
+function TXmlCustomDtdHandler.startElement(const sender: TXmlCustomReader;
+                                           const locator: TdomLocator;
+                                                 namespaceURI,
+                                                 tagName: UnicodeString;
+                                                 attributes: TdomNameValueList): boolean;
+begin
+  Result := False;
+  raise EParserException.create('Parser error.');
+end;
+
+function TXmlCustomDtdHandler.startPrefixMapping(const sender: TXmlCustomReader;
+                                                 const locator: TdomLocator;
+                                                       prefix,
+                                                       uri: UnicodeString): boolean;
+begin
+  Result := False;
+  raise EParserException.create('Parser error.');
+end;
+
+
+
+// +++++++++++++++++++++++++ TXmlCustomContentHandler +++++++++++++++++++++++++
+function TXmlCustomContentHandler.attributeDefinition(const sender: TXmlCustomReader;
+                                                      const locator: TdomLocator;
+                                                            aname,
+                                                            attType,
+                                                            bracket,
+                                                            defaultDecl,
+                                                            attValue: UnicodeString): boolean;
+begin
+  Result := False;
+  raise EParserException.create('Parser error.');
+end;
+
+function TXmlCustomContentHandler.conditionalSection(const sender: TXmlCustomReader;
+                                                     const locator: TdomLocator;
+                                                           includeStmt,
+                                                           data: UnicodeString): boolean;
+begin
+  Result := False;
+  raise EParserException.create('Parser error.');
+end;
+
+function TXmlCustomContentHandler.DTDcomment(const sender: TXmlCustomReader;
+                                             const locator: TdomLocator;
+                                                   data: UnicodeString): boolean;
+begin
+  Result := False;
+  raise EParserException.create('Parser error.');
+end;
+
+function TXmlCustomContentHandler.DTDprocessingInstruction(const sender: TXmlCustomReader;
+                                                           const locator: TdomLocator;
+                                                                 targ,
+                                                                 data : UnicodeString): boolean;
+begin
+  Result := False;
+  raise EParserException.create('Parser error.');
+end;
+
+function TXmlCustomContentHandler.elementTypeDeclaration(const sender: TXmlCustomReader;
+                                                         const locator: TdomLocator;
+                                                               aname,
+                                                               data: UnicodeString): boolean;
+begin
+  Result := False;
+  raise EParserException.create('Parser error.');
+end;
+
+function TXmlCustomContentHandler.endAttListDeclaration(const sender: TXmlCustomReader;
+                                                        const locator: TdomLocator): boolean;
+begin
+  Result := False;
+  raise EParserException.create('Parser error.');
+end;
+
+function TXmlCustomContentHandler.endExtDtd(const sender: TXmlCustomReader;
+                                           const locator: TdomLocator): boolean;
+begin
+  Result := False;
+  raise EParserException.create('Parser error.');
+end;
+
+function TXmlCustomContentHandler.endIntDtd(const sender: TXmlCustomReader;
+                                            const locator: TdomLocator): boolean;
+begin
+  Result := False;
+  raise EParserException.create('Parser error.');
+end;
+
+function TXmlCustomContentHandler.entityDeclaration(const sender: TXmlCustomReader;
+                                                    const locator: TdomLocator;
+                                                          aname,
+                                                          entityValue,
+                                                          pubId,
+                                                          sysId,
+                                                          notaName: UnicodeString): boolean;
+begin
+  Result := False;
+  raise EParserException.create('Parser error.');
+end;
+
+function TXmlCustomContentHandler.notationDeclaration(const sender: TXmlCustomReader;
+                                                      const locator: TdomLocator;
+                                                            aname,
+                                                            pubId,
+                                                            sysId: UnicodeString): boolean;
+begin
+  Result := False;
+  raise EParserException.create('Parser error.');
+end;
+
+function TXmlCustomContentHandler.parameterEntityDeclaration(const sender: TXmlCustomReader;
+                                                             const locator: TdomLocator;
+                                                                   aname,
+                                                                   entityValue,
+                                                                   pubId,
+                                                                   sysId: UnicodeString): boolean;
+begin
+  Result := False;
+  raise EParserException.create('Parser error.');
+end;
+
+function TXmlCustomContentHandler.parameterEntityRef(const sender: TXmlCustomReader;
+                                                     const locator: TdomLocator;
+                                                           aname: UnicodeString): boolean;
+begin
+  Result := False;
+  raise EParserException.create('Parser error.');
+end;
+
+function TXmlCustomContentHandler.startAttListDeclaration(const sender: TXmlCustomReader;
+                                                          const locator: TdomLocator;
+                                                                aname: UnicodeString): boolean;
+begin
+  Result := False;
+  raise EParserException.create('Parser error.');
+end;
+
+function TXmlCustomContentHandler.startExtDtd(const sender: TXmlCustomReader;
+                                              const locator: TdomLocator;
+                                                    version,
+                                                    encDl: UnicodeString): boolean;
+begin
+  Result := False;
+  raise EParserException.create('Parser error.');
+end;
+
+function TXmlCustomContentHandler.startIntDtd(const sender: TXmlCustomReader;
+                                              const locator: TdomLocator): boolean;
+begin
+  Result := False;
+  raise EParserException.create('Parser error.');
+end;
+
+
+
+// +++++++++++++++++++++++++ TXmlCustomReader ++++++++++++++++++++++++++
+constructor TXmlCustomReader.create(AOwner: TComponent);
+begin
+  inherited;
+  FDOMImpl:= nil;
+  FNextHandler:= nil;
+end;
+
+procedure TXmlCustomReader.setDomImpl(const impl: TDomImplementation);
+begin
+  FDOMImpl:= impl;
+  if assigned(impl)
+    then impl.FreeNotification(Self);
+end;
+
+procedure TXmlCustomReader.Notification(AComponent: TComponent; Operation: TOperation);
+begin
+  inherited Notification(AComponent,Operation);
+  if Operation = opRemove then begin
+    if AComponent = FNextHandler then FNextHandler:= nil;
+    if AComponent = FDOMImpl then FDOMImpl:= nil;
+  end;
+end;
+
+function TXmlCustomReader.sendErrorNotification(const xmlErrorType: TXmlErrorType;
+                                                const location: TdomLocator;
+                                                const code: UnicodeString): boolean;
+var
+  error: TdomError;
+begin
+  error:= TdomError.createFromLocator(xmlErrorType,location,code);
+  try
+    if assigned(FDomImpl) then begin
+      result:= FDomImpl.handleError(self,error);
+    end else if error.severity = DOM_SEVERITY_FATAL_ERROR
+      then result:= false
+      else result:= true;
+
+    if not result
+      then if assigned(nextHandler) then nextHandler.notifyReset;
+  finally
+    error.free;
+  end;
+end;
+
+
+
+// +++++++++++++++++++++++ TXmlWFTestContentHandler +++++++++++++++++++++++
+constructor TXmlWFTestContentHandler.create(AOwner: TComponent);
+begin
+  inherited create(AOwner);
+  FIsActive:= false;
+  FDoctypeFound:= false;
+  FRootFound:= false;
+  FTestRootFound:= true;
+  FTagStack:= TdomWideStringList.Create;
+end;
+
+destructor TXmlWFTestContentHandler.destroy;
+begin
+  FTagStack.free;
+  inherited destroy;
+end;
+
+function TXmlWFTestContentHandler.CDATA(const sender: TXmlCustomReader;
+                                        const locator: TdomLocator;
+                                              data: UnicodeString): boolean;
+begin
+  if assigned(FOnCDATA) then FOnCDATA(sender,locator,data);
+  if not FIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+
+  if not IsXmlCData(data) then begin
+    result:= sendErrorNotification(sender,ET_INVALID_CDATA_SECTION,locator,'');
+  end;
+
+  if (not FRootFound) and FTestRootFound and result then begin
+    result:= sendErrorNotification(sender,ET_NOT_IN_ROOT,locator,data);
+  end;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.CDATA(sender,locator,data);
+end;
+
+function TXmlWFTestContentHandler.charRef(const sender: TXmlCustomReader;
+                                          const locator: TdomLocator;
+                                                data: UnicodeString): boolean;
+begin
+  if assigned(FOnCharRef) then FOnCharRef(sender,locator,data);
+  if not FIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+
+  try
+    XmlCharRefToStr(data);
+  except
+    on EConvertError do begin
+      result:= sendErrorNotification(sender,ET_INVALID_CHARREF,locator,data);
+    end;
+  end;
+
+  if (not FRootFound) and FTestRootFound and result then begin
+    result:= sendErrorNotification(sender,ET_NOT_IN_ROOT,locator,data);
+  end;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.charRef(sender,locator,data);
+end;
+
+function TXmlWFTestContentHandler.comment(const sender: TXmlCustomReader;
+                                          const locator: TdomLocator;
+                                                data: UnicodeString): boolean;
+var
+  dataLength: integer;
+begin
+  if assigned(FOnComment) then FOnComment(sender,locator,data);
+  if not FIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+
+  if pos(UnicodeString('--'),data) > 0 then begin
+    result:= sendErrorNotification(sender,ET_INVALID_COMMENT,locator,'--');
+  end else begin
+    dataLength:= length(data);
+    if dataLength > 0
+      then if WideChar(data[dataLength]) = '-' then begin
+        result:= sendErrorNotification(sender,ET_INVALID_COMMENT,locator,'-');
+      end;
+  end;
+
+  if result then begin
+    if not IsXmlChars(data) then begin
+      result:= sendErrorNotification(sender,ET_INVALID_CHARACTER,locator,data);
+    end;
+  end;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.comment(sender,locator,data);
+end;
+
+function TXmlWFTestContentHandler.doctype(const sender: TXmlCustomReader;
+                                          const locator: TdomLocator;
+                                                aname,
+                                                pubId,
+                                                sysId,
+                                                data: UnicodeString): boolean;
+begin
+  if assigned(FOnDoctype) then FOnDoctype(sender,locator,aname,pubId,sysId,data);
+  if not FIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+
+  if FDoctypeFound then begin
+    result:= sendErrorNotification(sender,ET_DOUBLE_DOCTYPE,locator,data);
+  end;
+
+  FDoctypeFound:= true;
+
+  if result then begin
+    if FRootFound then begin
+      result:= sendErrorNotification(sender,ET_WRONG_ORDER,locator,data);
+    end;
+  end;
+
+  if result then begin
+    if not (isXmlName(aname) and isXmlPubidChars(pubId) and isXmlSystemChars(sysId) ) then begin
+      result:= sendErrorNotification(sender,ET_INVALID_DOCTYPE,locator,data);
+    end;
+  end;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.doctype(sender,locator,aname,pubId,sysId,data);
+end;
+
+function TXmlWFTestContentHandler.endDocument(const sender: TXmlCustomReader;
+                                              const locator: TdomLocator): boolean;
+begin
+  if assigned(FOnEndDocument) then FOnEndDocument(sender,locator);
+  if not FIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+  FIsActive:= false;
+
+  if FTagStack.Count > 0 then begin
+    result:= sendErrorNotification(sender,ET_MISSING_END_TAG,locator,'');
+  end;
+
+  if (not FRootFound) and FTestRootFound and result then begin
+    result:= sendErrorNotification(sender,ET_NOT_IN_ROOT,locator,'');
+  end;
+
+  FDoctypeFound:= false;
+  FRootFound:= false;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.endDocument(sender,locator);
+end;
+
+function TXmlWFTestContentHandler.endElement(const sender: TXmlCustomReader;
+                                             const locator: TdomLocator;
+                                                   namespaceURI,
+                                                   tagName: UnicodeString): boolean;
+var
+  lastItemIndex: integer;
+begin
+  if assigned(FOnEndElement) then FOnEndElement(sender,locator,namespaceURI,tagName);
+  if not FIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+
+  if not IsXmlName(tagName) then begin
+    result:= sendErrorNotification(sender,ET_INVALID_ELEMENT_NAME,locator,tagname);
+  end;
+
+  if result then begin
+    lastItemIndex:= pred(FTagStack.Count);
+    if lastItemIndex = -1 then begin
+      result:= sendErrorNotification(sender,ET_MISSING_START_TAG,locator,tagname);
+    end else begin
+      if FTagStack[lastItemIndex] = tagname
+        then FTagStack.Delete(lastItemIndex)
+        else begin
+          result:= sendErrorNotification(sender,ET_MISSING_START_TAG,locator,tagname);
+        end;
+    end;
+  end;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.endElement(sender,locator,namespaceURI,tagName);
+end;
+
+function TXmlWFTestContentHandler.endPrefixMapping(const sender: TXmlCustomReader;
+                                                   const locator: TdomLocator;
+                                                         prefix: UnicodeString): boolean;
+begin
+  if assigned(FOnEndPrefixMapping) then FOnEndPrefixMapping(sender,locator,prefix);
+  if assigned(nextHandler)
+    then result:= nextHandler.endPrefixMapping(sender,locator,prefix)
+    else result:= true;
+end;
+
+function TXmlWFTestContentHandler.entityRef(const sender: TXmlCustomReader;
+                                            const locator: TdomLocator;
+                                                  aname: UnicodeString): boolean;
+begin
+  if assigned(FOnEntityRef) then FOnEntityRef(sender,locator,aname);
+  if not FIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+
+  if not IsXmlName(aname) then begin
+    result:= sendErrorNotification(sender,ET_INVALID_ENTITY_NAME,locator,aname);
+  end;
+
+  if (not FRootFound) and FTestRootFound and result then begin
+    result:= sendErrorNotification(sender,ET_NOT_IN_ROOT,locator,'&' + name +';');
+  end;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.entityRef(sender,locator,aname);
+end;
+
+function TXmlWFTestContentHandler.PCDATA(const sender: TXmlCustomReader;
+                                         const locator: TdomLocator;
+                                               data: UnicodeString): boolean;
+begin
+  if assigned(FOnPCDATA) then FOnPCDATA(sender,locator,data);
+  if not FIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+
+  if not IsXmlCharData(data) then begin
+    result:= sendErrorNotification(sender,ET_INVALID_CHARACTER,locator,data);
+  end;
+
+  if (not FRootFound) and (not IsXmlS(data)) and FTestRootFound and result then begin
+    result:= sendErrorNotification(sender,ET_NOT_IN_ROOT,locator,data);
+  end;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.PCDATA(sender,locator,data);
+end;
+
+function TXmlWFTestContentHandler.processingInstruction(const sender: TXmlCustomReader;
+                                                        const locator: TdomLocator;
+                                                              targ,
+                                                              data : UnicodeString): boolean;
+begin
+  if assigned(FOnProcessingInstruction) then FOnProcessingInstruction(sender,locator,targ,data);
+  if not FIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+
+  if not IsXmlPITarget(targ) then begin
+    result:= sendErrorNotification(sender,ET_INVALID_PROCESSING_INSTRUCTION,locator,targ);
+  end else begin
+    if pos(UnicodeString('?>'),data) > 0 then begin
+      result:= sendErrorNotification(sender,ET_INVALID_PROCESSING_INSTRUCTION,locator,'?>');
+    end;
+  end;
+
+  if result then begin
+    if not IsXmlChars(data) then begin
+      result:= sendErrorNotification(sender,ET_INVALID_CHARACTER,locator,data);
+    end;
+  end;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.processingInstruction(sender,locator,targ,data);
+end;
+
+function TXmlWFTestContentHandler.skippedEntity(const sender: TXmlCustomReader;
+                                                const locator: TdomLocator;
+                                                      aname: UnicodeString): boolean;
+begin
+  if assigned(FOnSkippedEntity) then FOnSkippedEntity(sender,locator,aname);
+  if not FIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.skippedEntity(sender,locator,aname);
+end;
+
+function TXmlWFTestContentHandler.startDocument(const sender: TXmlCustomReader;
+                                                const locator: TdomLocator;
+                                                      version,
+                                                      encName: UnicodeString;
+                                                      sdDl: TdomStandalone): boolean;
+begin
+  if assigned(FOnStartDocument) then FOnStartDocument(sender,locator,version,encName,sdDl);
+  if FIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+  FTagStack.Clear;
+  FIsActive:= true;
+  FDoctypeFound:= false;
+  FRootFound:= false;
+  if not ( ( IsXmlEncName(encName) or (encName = '') ) and
+           ( IsXmlVersionNum(version) or (version = '') )  )
+  then begin
+    result:= sendErrorNotification(sender,ET_INVALID_XML_DECL,locator,'');
+  end;
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.startDocument(sender,locator,version,encName,sdDl);
+end;
+
+function TXmlWFTestContentHandler.startElement(const sender: TXmlCustomReader;
+                                               const locator: TdomLocator;
+                                                     namespaceURI,
+                                                     tagName: UnicodeString;
+                                                     attributes: TdomNameValueList): boolean;
+var
+  i,j: integer;
+  name,value,text,characRef: UnicodeString;
+  isEntity: boolean;
+begin
+  if assigned(FOnStartElement) then FOnStartElement(sender,locator,namespaceURI,tagName,attributes);
+  if not FIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+
+  if not IsXmlName(tagName) then begin
+    result:= sendErrorNotification(sender,ET_INVALID_ELEMENT_NAME,locator,tagname);
+  end;
+
+  if (FTagStack.Count = 0) and FTestRootFound and FRootFound and result then begin
+    result:= sendErrorNotification(sender,ET_DOUBLE_ROOT_ELEMENT,locator,tagname);
+  end;
+
+  FRootFound:= true;
+  FTagStack.Add(tagname);
+
+  if result then begin
+    for i:= 0 to pred(attributes.length) do begin
+      value:= attributes.values[i];
+      name:= attributes.names[i];
+
+      if attributes.indexOfName(name) <> i then begin
+        result:= sendErrorNotification(sender,ET_INVALID_ELEMENT_NAME,locator,name);
+        if not result then break;
+      end;
+
+      if not IsXmlName(name) then begin
+        result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_NAME,locator,value);
+        if not result then break;
+      end;
+
+      if pos('&',value) = 0 then begin
+        if not IsXmlCharData(value) then begin
+          result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_VALUE,locator,value);
+          if not result then break;
+        end;
+      end else begin
+        isEntity:= false;
+        text:= '';
+        for j:= 1 to Length(value) do begin
+          if IsEntity then begin
+            if value[j] = ';' then begin
+              if text[1] = '#' then begin // CharRef
+                try
+                  CharacRef:= concat(UnicodeString('&'),text,UnicodeString(';'));
+                  //v:= XmlCharRefToStr(CharacRef);
+                except
+                  on EConvertError do begin
+                    result:= sendErrorNotification(sender,ET_INVALID_CHARREF,locator,CharacRef);
+                    if not result then break;
+                  end;
+                end; {try}
+              end else begin  // EntityRef
+                if not IsXmlName(text) then begin
+                  result:= sendErrorNotification(sender,ET_INVALID_ENTITY_NAME,locator,text);
+                  if not result then break;
+                end;
+              end;
+              text:= '';
+              IsEntity:= false;
+            end else Text:= concat(text,UnicodeString(value[j]));
+          end else begin
+            if value[j] = '&' then begin
+              IsEntity:= true;
+            end else if (value[j] = '<') or not IsXmlChar(value[j]) then begin
+              result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_VALUE,locator,value);
+              if not result then break;
+            end;
+          end; {if ...}
+        end; {for ...}
+
+        // invalid attribute value?
+        if result then begin
+          if IsEntity then begin
+            result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_VALUE,locator,value);
+          end; {if ...}
+        end; {if ...}
+
+      end; {if ...}
+    end;
+  end; {if result ...}
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.startElement(sender,locator,namespaceURI,tagName,attributes);
+end;
+
+function TXmlWFTestContentHandler.startPrefixMapping(const sender: TXmlCustomReader;
+                                                     const locator: TdomLocator;
+                                                           prefix,
+                                                           uri: UnicodeString): boolean;
+begin
+  if assigned(FOnStartPrefixMapping) then FOnStartPrefixMapping(sender,locator,prefix,uri);
+  if assigned(nextHandler)
+    then result:= nextHandler.startPrefixMapping(sender,locator,prefix,uri)
+    else result:= true;
+end;
+
+procedure TXmlWFTestContentHandler.notifyReset;
+begin
+  FIsActive:= false;
+  FDoctypeFound:= false;
+  FRootFound:= false;
+  FTagStack.clear;
+  if assigned(nextHandler) then nextHandler.notifyReset;
+end;
+
+
+
+// +++++++++++++++++++++++++ TXmlWFTestDTDHandler +++++++++++++++++++++++++
+constructor TXmlWFTestDTDHandler.create(AOwner: TComponent);
+begin
+  inherited;
+  FAttListDeclActive:= false;
+  FExtDtdIsActive:= false;
+  FIntDtdIsActive:= false;
+end;
+
+destructor TXmlWFTestDTDHandler.destroy;
+begin
+  inherited;
+end;
+
+function TXmlWFTestDTDHandler.attributeDefinition(const sender: TXmlCustomReader;
+                                                  const locator: TdomLocator;
+                                                        aname,
+                                                        attType,
+                                                        bracket,
+                                                        defaultDecl,
+                                                        attValue: UnicodeString): boolean;
+begin
+  if assigned(FOnAttributeDefinition) then FOnAttributeDefinition(sender,locator,aname,attType,bracket,defaultDecl,attValue);
+  if not (FExtDtdIsActive or FIntDtdIsActive) then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+
+  if not FAttListDeclActive then begin
+    result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_DECL,locator,'');
+  end;
+
+  if result then begin
+    if not IsXmlName(aname) then begin
+      result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_DECL,locator,'');
+    end;
+  end;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.attributeDefinition(sender,locator,aname,attType,bracket,defaultDecl,attValue);
+end;
+
+function TXmlWFTestDTDHandler.conditionalSection(const sender: TXmlCustomReader;
+                                                 const locator: TdomLocator;
+                                                       includeStmt,
+                                                       data: UnicodeString): boolean;
+begin
+  if assigned(FOnConditionalSection) then FOnConditionalSection(sender,locator,includeStmt,data);
+  if not (FExtDtdIsActive or FIntDtdIsActive) then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+
+  if FAttListDeclActive then begin
+    result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_DECL,locator,'');
+  end;
+
+  if result then begin
+    if FIntDtdIsActive or ( not ((IncludeStmt = 'INCLUDE') or (IncludeStmt = 'IGNORE')) ) then begin
+      result:= sendErrorNotification(sender,ET_INVALID_CONDITIONAL_SECTION,locator,name);
+    end;
+  end;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.conditionalSection(sender,locator,includeStmt,data);
+end;
+
+function TXmlWFTestDTDHandler.DTDcomment(const sender: TXmlCustomReader;
+                                         const locator: TdomLocator;
+                                               data: UnicodeString): boolean;
+var
+  dataLength: integer;
+begin
+  if assigned(FOnDTDcomment) then FOnDTDcomment(sender,locator,data);
+  if not (FExtDtdIsActive or FIntDtdIsActive) then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+  if FAttListDeclActive then begin
+    result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_DECL,locator,'');
+  end;
+
+
+  if pos(UnicodeString('--'),data) > 0 then begin
+    result:= sendErrorNotification(sender,ET_INVALID_COMMENT,locator,'--');
+  end else begin
+    dataLength:= length(data);
+    if dataLength > 0
+      then if WideChar(data[dataLength]) = '-' then begin
+        result:= sendErrorNotification(sender,ET_INVALID_COMMENT,locator,'-');
+      end;
+  end;
+
+  if result then begin
+    if not IsXmlChars(data) then begin
+      result:= sendErrorNotification(sender,ET_INVALID_CHARACTER,locator,data);
+    end;
+  end;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.DTDcomment(sender,locator,data);
+end;
+
+function TXmlWFTestDTDHandler.DTDprocessingInstruction(const sender: TXmlCustomReader;
+                                                       const locator: TdomLocator;
+                                                             targ,
+                                                             data: UnicodeString): boolean;
+begin
+  if assigned(FOnDTDprocessingInstruction) then FOnDTDprocessingInstruction(sender,locator,targ,data);
+  if not (FExtDtdIsActive or FIntDtdIsActive) then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+  if FAttListDeclActive then begin
+    result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_DECL,locator,'');
+  end;
+  
+  if not IsXmlPITarget(targ) then begin
+    result:= sendErrorNotification(sender,ET_INVALID_PROCESSING_INSTRUCTION,locator,targ);
+  end else begin
+    if pos(UnicodeString('?>'),data) > 0 then begin
+      result:= sendErrorNotification(sender,ET_INVALID_PROCESSING_INSTRUCTION,locator,'?>');
+    end;
+  end;
+
+  if result and not IsXmlChars(data) then begin
+    result:= sendErrorNotification(sender,ET_INVALID_CHARACTER,locator,data);
+  end;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.DTDprocessingInstruction(sender,locator,targ,data);
+end;
+
+function TXmlWFTestDTDHandler.elementTypeDeclaration(const sender: TXmlCustomReader;
+                                                     const locator: TdomLocator;
+                                                           aname,
+                                                           data: UnicodeString): boolean;
+begin
+  if assigned(FOnElementTypeDeclaration) then FOnElementTypeDeclaration(sender,locator,aname,data);
+  if not (FExtDtdIsActive or FIntDtdIsActive) then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+  if FAttListDeclActive then begin
+    result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_DECL,locator,'');
+  end;
+
+  if result and not IsXmlName(aname) then begin
+    result:= sendErrorNotification(sender,ET_INVALID_ELEMENT_DECL,locator,name);
+  end;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.elementTypeDeclaration(sender,locator,aname,data);
+end;
+
+function TXmlWFTestDTDHandler.endAttListDeclaration(const sender: TXmlCustomReader;
+                                                    const locator: TdomLocator): boolean;
+begin
+  if assigned(FOnEndAttListDeclaration) then FOnEndAttListDeclaration(sender,locator);
+  if not (FExtDtdIsActive or FIntDtdIsActive) then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+
+  if not FAttListDeclActive then begin
+    result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_DECL,locator,'');
+  end;
+  
+  FAttListDeclActive:= false;
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.endAttListDeclaration(sender,locator);
+end;
+
+function TXmlWFTestDTDHandler.endExtDtd(const sender: TXmlCustomReader;
+                                        const locator: TdomLocator): boolean;
+begin
+  if assigned(FOnEndExtDtd) then FOnEndExtDtd(sender,locator);
+  if FIntDtdIsActive or not FextDtdIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+  FExtDtdIsActive:= false;
+  if FAttListDeclActive then begin
+    result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_DECL,locator,'');
+  end;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.endExtDtd(sender,locator);
+end;
+
+function TXmlWFTestDTDHandler.endIntDtd(const sender: TXmlCustomReader;
+                                        const locator: TdomLocator): boolean;
+begin
+  if assigned(FOnEndIntDtd) then FOnEndIntDtd(sender,locator);
+  if FExtDtdIsActive or not FIntDtdIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+  FIntDtdIsActive:= false;
+  if FAttListDeclActive then begin
+    result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_DECL,locator,'');
+  end;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.endIntDtd(sender,locator);
+end;
+
+function TXmlWFTestDTDHandler.entityDeclaration(const sender: TXmlCustomReader;
+                                                const locator: TdomLocator;
+                                                      aname,
+                                                      entityValue,
+                                                      pubId,
+                                                      sysId,
+                                                      notaName: UnicodeString): boolean;
+var
+  error: boolean;
+begin
+  if assigned(FOnEntityDeclaration) then FOnEntityDeclaration(sender,locator,aname,entityValue,pubId,sysId,notaName);
+  if not (FExtDtdIsActive or FIntDtdIsActive) then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+  if FAttListDeclActive then begin
+    result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_DECL,locator,'');
+  end;
+
+  if result then begin
+    error:= false;
+    if not IsXmlName(aname)
+      then error:= true;
+    if entityValue <> '' then begin
+      if not IsXmlEntityValueChars(entityValue)
+        then error:= true;
+      if not ( (pubId = '') and (sysId = '') )
+        then error:= true;
+    end;
+    if not isXmlSystemChars(sysId)
+      then error:= true;
+    if not isXmlPubidChars(pubId)
+      then error:= true;
+    if error then begin
+      result:= sendErrorNotification(sender,ET_INVALID_ENTITY_DECL,locator,aname);
+    end;
+  end;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.entityDeclaration(sender,locator,name,entityValue,pubId,sysId,notaName);
+end;
+
+function TXmlWFTestDTDHandler.notationDeclaration(const sender: TXmlCustomReader;
+                                                  const locator: TdomLocator;
+                                                        aname,
+                                                        pubId,
+                                                        sysId: UnicodeString): boolean;
+var
+  error: boolean;
+begin
+  if assigned(FOnNotationDeclaration) then FOnNotationDeclaration(sender,locator,aname,pubId,sysId);
+  if not (FExtDtdIsActive or FIntDtdIsActive) then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+  if FAttListDeclActive then begin
+    result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_DECL,locator,'');
+  end;
+  
+  if result then begin
+    error:= false;
+    if not IsXmlName(aname)
+      then error:= true;
+    if not isXmlSystemChars(sysId)
+      then error:= true;
+    if not isXmlPubidChars(pubId)
+      then error:= true;
+    if error then begin
+      result:= sendErrorNotification(sender,ET_INVALID_NOTATION_DECL,locator,aname);
+    end;
+  end;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.notationDeclaration(sender,locator,aname,pubId,sysId);
+end;
+
+function TXmlWFTestDTDHandler.parameterEntityDeclaration(const sender: TXmlCustomReader;
+                                                         const locator: TdomLocator;
+                                                               aname,
+                                                               entityValue,
+                                                               pubId,
+                                                               sysId: UnicodeString): boolean;
+var
+  error: boolean;
+begin
+  if assigned(FOnParameterEntityDeclaration) then FOnParameterEntityDeclaration(sender,locator,aname,entityValue,pubId,sysId);
+  if not (FExtDtdIsActive or FIntDtdIsActive) then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+  if FAttListDeclActive then begin
+    result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_DECL,locator,'');
+  end;
+  
+  if result then begin
+    error:= false;
+    if not IsXmlName(aname)
+      then error:= true;
+    if entityValue <> '' then begin
+      if not IsXmlEntityValueChars(entityValue)
+        then error:= true;
+      if not ( (pubId = '') and (sysId = '') )
+        then error:= true;
+    end;
+    if not isXmlSystemChars(sysId)
+      then error:= true;
+    if not isXmlPubidChars(pubId)
+      then error:= true;
+    if error then begin
+      result:= sendErrorNotification(sender,ET_INVALID_ENTITY_DECL,locator,aname);
+    end;
+  end;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.parameterEntityDeclaration(sender,locator,aname,entityValue,pubId,sysId);
+end;
+
+function TXmlWFTestDTDHandler.parameterEntityRef(const sender: TXmlCustomReader;
+                                                 const locator: TdomLocator;
+                                                       aname: UnicodeString): boolean;
+begin
+  if assigned(FOnParameterEntityRef) then FOnParameterEntityRef(sender,locator,aname);
+  if not (FExtDtdIsActive or FIntDtdIsActive) then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+  if FAttListDeclActive then begin
+    result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_DECL,locator,'');
+  end;
+  
+  if result and not IsXmlName(aname) then begin
+    result:= sendErrorNotification(sender,ET_INVALID_ENTITY_NAME,locator,aname);
+  end;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.parameterEntityRef(sender,locator,aname);
+end;
+
+function TXmlWFTestDTDHandler.startAttListDeclaration(const sender: TXmlCustomReader;
+                                                      const locator: TdomLocator;
+                                                            aname: UnicodeString): boolean;
+begin
+  if assigned(FOnStartAttListDeclaration) then FOnStartAttListDeclaration(sender,locator,aname);
+  if not (FExtDtdIsActive or FIntDtdIsActive) then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+  if FAttListDeclActive or not IsXmlName(aname) then begin
+    result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_DECL,locator,'');
+  end;
+
+  FAttListDeclActive:= true;
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.startAttListDeclaration(sender,locator,aname);
+end;
+
+function TXmlWFTestDTDHandler.startExtDtd(const sender: TXmlCustomReader;
+                                          const locator: TdomLocator;
+                                                version,
+                                                encName: UnicodeString): boolean;
+begin
+  if assigned(FOnStartExtDtd) then FOnStartExtDtd(sender,locator,version,encName);
+  if FIntDtdIsActive or FExtDtdIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+  FExtDtdIsActive:= true;
+
+  if not ( ( IsXmlEncName(encName) or (encName = '') ) and
+           ( IsXmlVersionNum(version) or (version = '') )  )
+  then begin
+    result:= sendErrorNotification(sender,ET_INVALID_TEXT_DECL,locator,'');
+  end;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.startExtDtd(sender,locator,version,encName);
+end;
+
+function TXmlWFTestDTDHandler.startIntDtd(const sender: TXmlCustomReader;
+                                          const locator: TdomLocator): boolean;
+begin
+  if assigned(FOnStartIntDtd) then FOnStartIntDtd(sender,locator);
+  if FIntDtdIsActive or FExtDtdIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+  FIntDtdIsActive:= true;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.startIntDtd(sender,locator);
+end;
+
+procedure TXmlWFTestDTDHandler.notifyReset;
+begin
+  FAttListDeclActive:= false;
+  FExtDtdIsActive:= false;
+  FIntDtdIsActive:= false;
+  if assigned(nextHandler) then nextHandler.notifyReset;
+end;
+
+
+
+// ++++++++++++++++++++++++++++ TXmlDocBuilder ++++++++++++++++++++++++++++
+constructor TXmlDocBuilder.create(AOwner: TComponent);
+begin
+  inherited create(AOwner);
+  FRefNode:= nil;
+  FBuildNamespaceTree:= false;
+  FPrefixUriList:= TdomNameValueList.create;
+end;
+
+destructor TXmlDocBuilder.destroy;
+begin
+  FPrefixUriList.free;
+  inherited destroy;
+end;
+
+function TXmlDocBuilder.CDATA(const sender: TXmlCustomReader;
+                              const locator: TdomLocator;
+                                    data: UnicodeString): boolean;
+var
+  newCData: TdomCDATASection;
+begin
+  if assigned(FOnCDATA) then FOnCDATA(sender,locator,data);
+  result:= true;
+  if assigned(FRefNode) then begin
+    try
+      newCData:= FRefNode.OwnerDocument.CreateCDATASection(data);
+      try
+        FRefNode.appendChild(newCData);
+      except
+        if assigned(newCData.ParentNode)
+          then newCData.ParentNode.RemoveChild(newCData);
+        FRefNode.OwnerDocument.FreeAllNodes(TdomNode(newCData));
+        raise;
+      end; {try ...}
+    except
+      result:= sendErrorNotification(sender,ET_INVALID_CDATA_SECTION,locator,data);
+    end; {try ...}
+  end; {if assigned(FRefNode) ...}
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.CDATA(sender,locator,data);
+end;
+
+function TXmlDocBuilder.charRef(const sender: TXmlCustomReader;
+                                const locator: TdomLocator;
+                                      data: UnicodeString): boolean;
+var
+  newText: TdomText;
+  previousNode: TdomNode;
+  value: UnicodeString;
+  previousNodeIsText: boolean;
+begin
+  if assigned(FOnCharRef) then FOnCharRef(sender,locator,data);
+  result:= true;
+  if assigned(FRefNode) then begin
+
+    try
+      value:= XmlCharRefToStr(data);
+    except
+      result:= sendErrorNotification(sender,ET_INVALID_CHARACTER,locator,data);
+    end;
+
+    if result then begin
+      previousNode:= FRefNode.LastChild;
+      if assigned(previousNode) then begin
+        if (previousNode.NodeType = ntText_Node)
+          then previousNodeIsText:= true
+          else previousNodeIsText:= false;
+      end else previousNodeIsText:= false;
+
+      if previousNodeIsText
+        then (previousNode as TdomText).appendData(value)
+        else begin
+          try
+            newText:= FRefNode.OwnerDocument.CreateTextNode(value);
+            try
+              FRefNode.appendChild(newText);
+            except
+              if assigned(newText.ParentNode)
+                then newText.ParentNode.RemoveChild(newText);
+              FRefNode.OwnerDocument.FreeAllNodes(TdomNode(newText));
+              raise;
+            end; {try ...}
+          except
+            result:= sendErrorNotification(sender,ET_INVALID_CHARREF,locator,data);
+          end; {try ...}
+        end;
+    end; {if not assgined ...}
+  end; {if assigned(FRefNode) ...}
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.charRef(sender,locator,data);
+end;
+
+function TXmlDocBuilder.comment(const sender: TXmlCustomReader;
+                                const locator: TdomLocator;
+                                      data: UnicodeString): boolean;
+var
+  newComment: TdomComment;
+begin
+  if assigned(FOnComment) then FOnComment(sender,locator,data);
+  result:= true;
+  if assigned(FRefNode) then begin
+    try
+      newComment:= FRefNode.OwnerDocument.CreateComment(data);
+      try
+        FRefNode.appendChild(newComment);
+      except
+        if assigned(newComment.ParentNode)
+          then newComment.ParentNode.RemoveChild(newComment);
+        FRefNode.OwnerDocument.FreeAllNodes(TdomNode(newComment));
+        raise;
+      end; {try ...}
+    except
+      result:= sendErrorNotification(sender,ET_INVALID_COMMENT,locator,data);
+    end; {try ...}
+  end; {if assigned(FRefNode) ...}
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.comment(sender,locator,data);
+end;
+
+function TXmlDocBuilder.doctype(const sender: TXmlCustomReader;
+                                const locator: TdomLocator;
+                                      aname,
+                                      pubId,
+                                      sysId,
+                                      data: UnicodeString): boolean;
+var
+  newDocType: TdomDocumentType;
+begin
+  if assigned(FOnDoctype) then FOnDoctype(sender,locator,aname,pubId,sysId,data);
+  result:= true;
+  if assigned(FRefNode) then begin
+    try
+      newDocType:= FRefNode.OwnerDocument.CreateDocumentType(aname,pubId,sysId,data);
+      try
+        FRefNode.appendChild(newDocType);
+      except
+        if assigned(newDocType.ParentNode)
+          then newDocType.ParentNode.RemoveChild(newDocType);
+        FRefNode.OwnerDocument.FreeAllNodes(TdomNode(newDocType));
+        raise;
+      end; {try ...}
+    except
+      result:= sendErrorNotification(sender,ET_INVALID_DOCTYPE,locator,data);
+    end; {try ...}
+  end; {if assigned(FRefNode) ...}
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.doctype(sender,locator,aname,pubId,sysId,data);
+end;
+
+function TXmlDocBuilder.endDocument(const sender: TXmlCustomReader;
+                                    const locator: TdomLocator): boolean;
+begin
+  if assigned(FOnEndDocument) then FOnEndDocument(sender,locator);
+  // notifications of endDocument are being ignored.
+  result:= true;
+  if assigned(nextHandler)
+    then result:= nextHandler.endDocument(sender,locator);
+end;
+
+function TXmlDocBuilder.endElement(const sender: TXmlCustomReader;
+                                   const locator: TdomLocator;
+                                         namespaceURI,
+                                         tagName: UnicodeString): boolean;
+begin
+  if assigned(FOnEndElement) then FOnEndElement(sender,locator,namespaceURI,tagName);
+  result:= true;
+  if assigned(FRefNode) then begin
+    // xxx Evaluate 'FBuildNamespaceTree' and 'namespaceURI' here, too?
+    if not ( (FRefNode.nodeType = ntElement_Node) and (tagName = FRefNode.NodeName) ) then begin
+      result:= sendErrorNotification(sender,ET_MISSING_START_TAG,locator,tagname);
+    end else FRefNode:= FRefNode.ParentNode;
+  end;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.endElement(sender,locator,namespaceURI,tagName);
+end;
+
+function TXmlDocBuilder.endPrefixMapping(const sender: TXmlCustomReader;
+                                         const locator: TdomLocator;
+                                               prefix: UnicodeString): boolean;
+var
+  l: integer;
+begin
+  if assigned(FOnEndPrefixMapping) then FOnEndPrefixMapping(sender,locator,prefix);
+
+  l:= pred(FPrefixUriList.length);
+  if l = -1 then begin
+    result:= sendErrorNotification(sender,ET_WRONG_PREFIX_MAPPING_NESTING,locator,prefix);
+  end else begin
+    if FPrefixUriList.names[l] <> prefix then begin
+      result:= sendErrorNotification(sender,ET_WRONG_PREFIX_MAPPING_NESTING,locator,prefix);
+    end else begin
+      FPrefixUriList.Delete(l);
+      result:= true;
+    end;
+  end;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.endPrefixMapping(sender,locator,prefix);
+end;
+
+function TXmlDocBuilder.entityRef(const sender: TXmlCustomReader;
+                                  const locator: TdomLocator;
+                                        aname: UnicodeString): boolean;
+var
+  newEntityRef: TdomEntityReference;
+begin
+  if assigned(FOnEntityRef) then FOnEntityRef(sender,locator,aname);
+  result:= true;
+  if assigned(FRefNode) then begin
+    try
+      newEntityRef:= FRefNode.OwnerDocument.CreateEntityReference(aname);
+      try
+        FRefNode.appendChild(newEntityRef);
+      except
+        if assigned(newEntityRef.ParentNode)
+          then newEntityRef.ParentNode.RemoveChild(newEntityRef);
+        FRefNode.OwnerDocument.FreeAllNodes(TdomNode(newEntityRef));
+        raise;
+      end; {try ...}
+    except
+      result:= sendErrorNotification(sender,ET_INVALID_ENTITY_NAME,locator,aname);
+    end; {try ...}
+  end; {if assigned(FRefNode) ...}
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.entityRef(sender,locator,aname);
+end;
+
+function TXmlDocBuilder.PCDATA(const sender: TXmlCustomReader;
+                               const locator: TdomLocator;
+                                     data: UnicodeString): boolean;
+var
+  newPcdata: TdomText;
+begin
+  if assigned(FOnPCDATA) then FOnPCDATA(sender,locator,data);
+  result:= true;
+  if assigned(FRefNode) then begin
+
+    if (FRefNode.NodeType = ntDocument_Node) then begin
+      if not IsXmlS(data) then begin
+        result:= sendErrorNotification(sender,ET_INVALID_ENTITY_NAME,locator,name);
+      end;
+    end else begin
+      if assigned(FRefNode.LastChild) and (FRefNode.LastChild.NodeType = ntText_Node)
+        then (FRefNode.LastChild as TdomText).appendData(data)
+        else begin
+          try
+            newPcdata:= FRefNode.OwnerDocument.CreateTextNode(data);
+            try
+              FRefNode.appendChild(newPcdata);
+            except
+              if assigned(newPcdata.ParentNode)
+                then newPcdata.ParentNode.RemoveChild(newPcdata);
+              FRefNode.OwnerDocument.FreeAllNodes(TdomNode(newPcdata));
+              raise;
+            end; {try ...}
+          except
+            result:= sendErrorNotification(sender,ET_INVALID_CHARACTER,locator,data);
+          end; {try ...}
+        end;
+    end; {if (FRefNode.NodeType = ntDocument_Node) then ... else ...}
+  end; {if assigned(FRefNode) ...}
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.PCDATA(sender,locator,data);
+end;
+
+function TXmlDocBuilder.processingInstruction(const sender: TXmlCustomReader;
+                                              const locator: TdomLocator;
+                                                    targ,
+                                                    data : UnicodeString): boolean;
+var
+  newPI: TdomProcessingInstruction;
+begin
+  if assigned(FOnProcessingInstruction) then FOnProcessingInstruction(sender,locator,targ,data);
+  result:= true;
+  if assigned(FRefNode) then begin
+    try
+      newPI:= FRefNode.OwnerDocument.CreateProcessingInstruction(targ,data);
+      try
+        FRefNode.appendChild(newPI);
+      except
+        if assigned(newPI.ParentNode)
+          then newPI.ParentNode.RemoveChild(newPI);
+        FRefNode.OwnerDocument.FreeAllNodes(TdomNode(newPI));
+        raise;
+      end;
+    except
+      result:= sendErrorNotification(sender,ET_INVALID_PROCESSING_INSTRUCTION,locator,targ);
+    end;
+  end; {if assigned(FRefNode) ...}
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.processingInstruction(sender,locator,targ,data);
+end;
+
+function TXmlDocBuilder.skippedEntity(const sender: TXmlCustomReader;
+                                      const locator: TdomLocator;
+                                            aname: UnicodeString): boolean;
+begin
+  if assigned(FOnSkippedEntity) then FOnSkippedEntity(sender,locator,aname);
+  // notifications through skippedEntity() are being ignored.
+  result:= true;
+  if assigned(nextHandler)
+    then result:= nextHandler.skippedEntity(sender,locator,aname);
+end;
+
+function TXmlDocBuilder.startDocument(const sender: TXmlCustomReader;
+                                      const locator: TdomLocator;
+                                            version,
+                                            encName: UnicodeString;
+                                            sdDl: TdomStandalone): boolean;
+begin
+  if assigned(FOnStartDocument) then FOnStartDocument(sender,locator,version,encName,sdDl);
+  FPrefixUriList.clear;
+  result:= true;
+
+  if assigned(FRefNode) then begin
+    if (FRefNode.nodeType = ntDocument_Node) then begin
+      if assigned(locator)      // xxx evaluate version, encName and sdDl, too?
+        then (FRefNode as TdomDocument).systemId:= locator.uri
+        else (FRefNode as TdomDocument).systemId:= '';
+    end;
+  end;
+
+  if assigned(nextHandler)
+    then result:= nextHandler.startDocument(sender,locator,version,encName,sdDl);
+end;
+
+function TXmlDocBuilder.startElement(const sender: TXmlCustomReader;
+                                     const locator: TdomLocator;
+                                           namespaceURI,
+                                           tagName: UnicodeString;
+                                           attributes: TdomNameValueList): boolean;
+type
+  TKindOfToken = (IS_EMPTY,IS_TEXT,IS_REFSTART,IS_CHARREF,IS_ENTITYREF);
+var
+  newElement: TdomElement;
+  i,j: integer;
+  prfx,localName,elementNsUri,AttrNsUri,name,value: UnicodeString;
+  Attri: TdomAttr;
+  pfxFound: boolean;
+  kindOfToken: TKindOfToken;
+  text, reference: TdomCustomStr;
+begin
+  if assigned(FOnStartElement) then FOnStartElement(sender,locator,namespaceURI,tagName,attributes);
+  result:= true;
+  elementNsUri:= '';
+  if FBuildNamespaceTree then begin
+    if xmlExtractPrefixAndLocalName(tagName,prfx,localName) then begin
+      pfxFound:= false;
+      with FPrefixUriList do begin
+        for i:= pred(FPrefixUriList.length) downto 0 do
+          if FPrefixUriList.names[i] = prfx then begin
+            elementNsUri:= FPrefixUriList.values[i];
+            pfxFound:= true;
+            break;
+          end;
+      end; {with ...}
+      if not pfxFound and (prfx <> '') then begin
+        result:= sendErrorNotification(sender,ET_NAMESPACE_URI_NOT_FOUND,locator,tagname);
+      end;
+    end else begin
+      result:= sendErrorNotification(sender,ET_INVALID_QUALIFIED_NAME,locator,tagname);
+    end; {if ... else ...}
+  end; {if FBuildNamespaceTree ...}
+
+  if result then begin
+    if assigned(FRefNode) then begin
+      try
+        if FBuildNamespaceTree
+          then newElement:= FRefNode.OwnerDocument.CreateElementNS(elementNsUri,tagName)
+          else newElement:= FRefNode.OwnerDocument.CreateElement(tagName);
+      except // xxx not elegant.
+        result:= sendErrorNotification(sender,ET_INVALID_ELEMENT_NAME,locator,tagname);
+        exit;
+      end;
+
+      // Compute attributes:
+      text:= TdomCustomStr.create;
+      reference:= TdomCustomStr.create;
+      try
+
+        try
+          for i:= 0 to pred(attributes.length) do begin
+            value:= attributes.values[i];
+            name:= attributes.names[i];
+            prfx:= '';
+            attrNsUri:= '';
+
+            if FBuildNamespaceTree then begin
+              if xmlExtractPrefixAndLocalName(name,prfx,localName) then begin
+                if name = 'xmlns' then begin
+                  attrNsUri:= 'http://www.w3.org/2000/xmlns/';
+                end else begin
+                  if prfx = '' then begin
+                    attrNsUri:= '';
+                  end else if prfx = 'xml' then begin
+                    attrNsUri:= 'http://www.w3.org/XML/1998/namespace';
+                  end else if prfx = 'xmlns' then begin
+                    attrNsUri:= 'http://www.w3.org/2000/xmlns/';
+                  end else begin
+                    pfxFound:= false;
+                    with FPrefixUriList do begin
+                      for j:= pred(FPrefixUriList.length) downto 0 do begin
+                        if FPrefixUriList.names[j] = prfx then begin
+                          attrNsUri:= FPrefixUriList.values[j];
+                          pfxFound:= true;
+                          break;
+                        end; {if ...}
+                      end; {for ...}
+                    end; {with ...}
+                    if not pfxFound then begin
+                      result:= sendErrorNotification(sender,ET_NAMESPACE_URI_NOT_FOUND,locator,name);
+                      exit; 
+                    end; {if not pfxFound ...}
+                  end; {if prfx = '' ... else ...}
+                end; {if name = 'xmlns' ...}
+              end else begin
+                result:= sendErrorNotification(sender,ET_INVALID_QUALIFIED_NAME,locator,name);
+                exit;
+              end; {if... else ...}
+            end; {if FBuildNamespaceTree ...}
+
+            if result then begin
+
+              if not IsXmlName(name) then begin
+                result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_NAME,locator,name);
+                exit;
+              end; {if ...}
+
+              if FBuildNamespaceTree then begin
+                Attri:= newElement.OwnerDocument.CreateAttributeNS(attrNsUri,name);
+                newElement.SetAttributeNodeNS(Attri);
+              end else begin
+                Attri:= newElement.OwnerDocument.CreateAttribute(name);
+                newElement.SetAttributeNode(Attri);
+              end;
+
+              kindOfToken:= IS_EMPTY;
+              text.reset;
+              for j:= 1 to length(value) do begin
+                case kindOfToken of
+                  IS_TEXT:
+                    if value[j] = '&'
+                      then kindOfToken:= IS_REFSTART
+                      else text.addWideChar(value[j]);
+                  IS_REFSTART:
+                    if value[j] = '#' then begin
+                      reference.reset;
+                      reference.addWideString('&#');
+                      kindOfToken:= IS_CHARREF;
+                    end else begin
+                      if text.length > 0
+                        then Attri.appendChild(newElement.OwnerDocument.CreateTextNode(text.value));
+                      kindOfToken:= IS_ENTITYREF;
+                      reference.reset;
+                      reference.addWideChar(value[j]);
+                    end;
+                  IS_CHARREF:
+                    if value[j] = ';' then begin
+                      reference.addWideChar(';');
+                      text.addWideString(XmlCharRefToStr(reference.value));
+                      kindOfToken:= IS_TEXT;
+                    end else reference.addWideString(value[j]);
+                  IS_ENTITYREF:
+                    if value[j] = ';' then begin
+                      Attri.appendChild(newElement.OwnerDocument.CreateEntityReference(reference.value));
+                      kindOfToken:= IS_EMPTY;
+                      text.reset;
+                    end else reference.addWideString(value[j]);
+                  IS_EMPTY:
+                    if value[j] = '&' then begin
+                      kindOfToken:= IS_REFSTART;
+                    end else begin
+                      kindOfToken:= IS_TEXT;
+                      text.addWideString(value[j]);
+                    end;
+                end; {case ...}
+              end; {for ...}
+              case kindOfToken of
+                IS_TEXT:
+                  Attri.appendChild(newElement.OwnerDocument.CreateTextNode(text.value));
+                IS_REFSTART, IS_CHARREF, IS_ENTITYREF: begin
+                  result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_VALUE,locator,name);
+                  exit;
+                end; {if ...}
+              end; {case ...}
+
+            end;
+          end;
+          if assigned(newElement)
+            then FRefNode.appendChild(newElement);
+        except
+          if assigned(newElement.ParentNode)
+            then newElement.ParentNode.RemoveChild(newElement);
+          FRefNode.OwnerDocument.FreeAllNodes(TdomNode(newElement));
+          result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_VALUE,locator,value);
+        end; {try ...}
+
+      finally
+        text.Free;
+        reference.Free;
+      end;
+
+      if assigned(newElement)
+        then FRefNode:= newElement;
+    end; {if assigned(FRefNode) ...}
+  end; {if result ...}
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.startElement(sender,locator,namespaceURI,tagName,attributes);
+end;
+
+function TXmlDocBuilder.startPrefixMapping(const sender: TXmlCustomReader;
+                                           const locator: TdomLocator;
+                                                 prefix,
+                                                 uri: UnicodeString): boolean;
+const
+  sQuote: UnicodeString  = #$0027;
+  dQuote: UnicodeString  = '"';
+begin
+  if assigned(FOnStartPrefixMapping) then FOnStartPrefixMapping(sender,locator,prefix,uri);
+  result:= true;
+  if ( (prefix = 'xmlns') and (uri <> 'http://www.w3.org/2000/xmlns/') )
+    or ( (prefix <> '') and not isXmlPrefix(prefix) ) then begin
+    result:= sendErrorNotification(sender,ET_INVALID_PREFIX,locator,prefix);
+  end else begin
+    if not ( IsXMLAttValue(concat(dQuote,uri,dQuote)) or
+      IsXMLAttValue(concat(sQuote,uri,sQuote)) )
+    then begin
+      result:= sendErrorNotification(sender,ET_INVALID_NAMESPACE_URI,locator,uri);
+    end else FPrefixUriList.add(prefix,uri);
+  end;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.startPrefixMapping(sender,locator,prefix,uri)
+end;
+
+procedure TXmlDocBuilder.notifyReset;
+begin
+  FPrefixUriList.clear;
+  if assigned(nextHandler) then nextHandler.notifyReset;
+end;
+
+
+
+// ++++++++++++++++++++++++++ TXmlDtdBuilder +++++++++++++++++++++++++++
+constructor TXmlDtdBuilder.create(AOwner: TComponent);
+begin
+  inherited create(AOwner);
+  FReferenceExtCM:= nil;
+  FReferenceIntCM:= nil;
+  FRefNode:= nil;
+  FExtDtdIsActive:= false;
+  FIntDtdIsActive:= false;
+end;
+
+function TXmlDtdBuilder.resolvePE(    PEReferenceName: UnicodeString;
+                                  var PEValue: UnicodeString;
+                                  var error: TXmlErrorType): boolean;
+
+begin
+  if not (FExtDtdIsActive or FIntDtdIsActive) then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+  intContentModel.getValueOfPE(PEReferenceName,PEValue,error);
+  if error <> ET_NONE   // xxx Is this correct?  What happens if there is an error?
+    then extContentModel.getValueOfPE(PEReferenceName,PEValue,error);
+end;
+
+procedure TXmlDtdBuilder.ResolveCharRefsAndPERefs(const s: UnicodeString;
+                                                    var result: UnicodeString;
+                                                    var error: boolean);
+var
+  i,j,indexpos: integer;
+  SChar, SChar2: widechar;
+  name,ref,value: UnicodeString;
+  content: TdomCustomStr;
+  errType: TXmlErrorType;
+begin
+  Result:= '';
+  Error:= false;
+  content:= TdomCustomStr.create;
+  try
+    i:= 1;
+    while i <= length(S) do begin
+      SChar:= WideChar((PWideChar(S)+i-1)^);
+      if IsUtf16LowSurrogate(sChar)
+        then raise EConvertError.CreateFmt('%S must not start with a UTF-16 low surrogate.',[S]);
+      if IsUtf16HighSurrogate(SChar) then begin
+        if i+1 > length(s)
+          then raise EConvertError.CreateFmt('%S must not end with a UTF-16 high surrogate.',[S]);
+        inc(i);
+        content.addWideChar(SChar);
+        SChar:= WideChar((PWideChar(S)+i-1)^);
+        if not IsUtf16LowSurrogate(SChar)
+          then raise EConvertError.CreateFmt('%S contains an UTF-16 high surrogate without its corresponding low surrogate.',[S]);
+      end;
+      if not IsXmlChar(sChar)
+        then raise EConvertError.CreateFmt('%S contains an invalid character.',[S]);
+      if SChar = '&' then begin {Reference?}
+        indexpos:= -1;
+        for j:= i+1 to length(S) do begin
+          SChar2:= WideChar((PWideChar(S)+j-1)^);
+          if SChar2 = ';' then begin indexpos:= j; break; end;
+        end;
+        if indexpos = -1
+          then raise EConvertError.CreateFmt('%S contains an ''&'' without a '';''.',[S]);
+        ref:= copy(S,i,j-i+1);
+        if IsXmlEntityRef(ref) then begin
+          content.addWideString(ref);
+        end else if IsXmlCharRef(ref) then begin
+          content.addWideString(XmlCharRefToStr(ref));
+        end else raise EConvertError.CreateFmt('%S contains an invalid reference.',[S]);
+        i:= j;
+      end else if SChar = '%' then begin // PEReference?
+        indexpos:= -1;
+        for j:= i+1 to length(S) do begin
+          SChar2:= WideChar((PWideChar(S)+j-1)^);
+          if SChar2 = ';' then begin indexpos:= j; break; end;
+        end;
+        if indexpos = -1
+          then raise EConvertError.CreateFmt('%S contains an ''%'' without a '';''.',[S]);
+        ref:= copy(S,i,j-i+1);
+        if IsXmlPEReference(ref) then begin
+          name:= copy(ref,2,length(ref)-2);
+          resolvePE(name,value,errType);
+          if errType <> ET_NONE
+            then raise EConvertError.CreateFmt('%S contains an invalid parameter entity reference.',[S]);
+          content.addWideString(value);
+        end else raise EConvertError.CreateFmt('%S contains an invalid parameter entity reference.',[S]);
+        i:= j;
+      end else content.addWideChar(SChar);
+      inc(i);
+    end; {while ...}
+    Result:= content.value;
+  finally
+    content.free;
+  end;
+end;
+
+procedure TXmlDtdBuilder.insertMixedContent(const sender: TXmlCustomReader;
+                                            const refNode: TdomCMNode;
+                                            const contSpec: UnicodeString);
+var
+  freq, dummy, content,piece: UnicodeString;
+  separator: integer;
+  Error: boolean;
+  newNode: TdomCMNode;
+begin
+  content:= XMLTrunc(contSpec);
+  freq:= '';
+  if (content[length(content)] = '*') then begin
+    freq:= '*';
+    dummy:= copy(content,1,length(content)-1);
+    content:= dummy;
+  end;
+  if length(content) = 0
+    then raise EParserException.create('Parser error.');
+  if wideChar(content[length(content)]) <> ')'
+    then raise EParserException.create('Parser error.');
+  XMLTruncRoundBrackets(content,dummy,Error);
+  if Error or (dummy = '')
+    then raise EParserException.create('Parser error.');
+  content:= dummy;
+  newNode:= refNode.appendChild(refNode.OwnerCMObject.CreateCMPcdataChoiceParticle);
+  if content = '#PCDATA' then exit;
+  if freq = '' then raise EParserException.create('Parser error.');
+  separator:= pos(UnicodeString('|'),content);
+  if separator = 0 then raise EParserException.create('Parser error.');
+  dummy:= XMLTrunc(copy(content,separator+1,length(content)-separator));
+  content:= dummy;
+  while content <> '' do begin
+    separator:= pos(UnicodeString('|'),content);
+    if separator = 0 then begin
+      piece:= content;
+      content:= '';
+    end else begin
+      piece:= XMLTrunc(copy(content,1,separator-1));
+      dummy:= XMLTrunc(copy(content,separator+1,length(content)-separator));
+      content:= dummy;
+      if content = '' then raise EParserException.create('Parser error.');
+    end; {if ...}
+    if not IsXmlName(piece) then raise EParserException.create('Parser error.');
+    newNode.appendChild(newNode.OwnerCMObject.CreateCMElementParticle(piece,''));
+  end; {while ...}
+end;
+
+procedure TXmlDtdBuilder.insertChildrenContent(const sender: TXmlCustomReader;
+                                               const refNode: TdomCMNode;
+                                               const contSpec: UnicodeString);
+var
+  piece,dummy,content,freq: UnicodeString;
+  SeparatorChar: WideChar;
+  j,i,bracketNr: integer;
+  newNode: TdomCMNode;
+  Error: boolean;
+begin
+  content:= XMLTrunc(contSpec);
+  freq:= '';
+  if (content[length(content)] = WideChar('?')) or
+     (content[length(content)] = WideChar('*')) or
+     (content[length(content)] = WideChar('+')) then begin
+    freq:= content[length(content)];
+    dummy:= copy(content,1,length(content)-1);
+    content:= dummy;
+  end;
+  if length(content) = 0
+    then raise EParserException.create('Parser error.');
+  if wideChar(content[length(content)]) <> ')'
+    then raise EParserException.create('Parser error.');
+  XMLTruncRoundBrackets(content,dummy,Error);
+  if Error or (dummy = '')
+    then raise EParserException.create('Parser error.');
+  content:= dummy;
+
+  bracketNr:= 0;
+  SeparatorChar:= ',';
+  for i:= 1 to length(content) do begin
+    if (content[i] = ',') and (bracketNr = 0) then begin
+      SeparatorChar:= ',';
+      break;
+    end; {if ...}
+    if (content[i] = '|') and (bracketNr = 0) then begin
+      SeparatorChar:= '|';
+      break;
+    end; {if ...}
+    if content[i] = '(' then inc(bracketNr);
+    if content[i] = ')' then begin
+      if bracketNr = 0 then raise EParserException.create('Parser error.');
+      dec(bracketNr);
+    end;
+  end; {for ...}
+
+  if SeparatorChar = ','
+    then newNode:= refNode.appendChild(refNode.OwnerCMObject.CreateCMSequenceParticle(freq))
+    else newNode:= refNode.appendChild(refNode.OwnerCMObject.CreateCMChoiceParticle(freq));
+
+  bracketNr:= 0;
+  i:= 0;
+  j:= 1;
+  while i < length(content) do begin
+    inc(i);
+    if content[i] = '(' then inc(bracketNr);
+    if content[i] = ')' then begin
+      if bracketNr = 0 then raise EParserException.create('Parser error.');
+      dec(bracketNr);
+    end;
+    if ((content[i] = SeparatorChar) and (bracketNr = 0)) or
+       (i = length(content)) then begin
+      if bracketNr > 0 then raise EParserException.create('Parser error.');
+      if i = length(content)
+        then piece:= XmlTrunc(copy(content,j,i+1-j))
+        else piece:= XmlTrunc(copy(content,j,i-j));
+      j:= i+1;
+
+      if piece[1] = '(' then begin
+        insertChildrenContent(sender,NewNode,piece);
+      end else begin
+        freq:= '';
+        if (piece[length(piece)] = wideChar('?')) or
+           (piece[length(piece)] = wideChar('*')) or
+           (piece[length(piece)] = wideChar('+')) then begin
+          freq:= piece[length(piece)];
+          dummy:= copy(piece,1,length(piece)-1);
+          piece:= dummy;
+        end;
+        if not IsXmlName(piece)
+          then raise EParserException.create('Parser error.');
+        NewNode.appendChild(refNode.OwnerCMObject.CreateCMElementParticle(piece,freq));
+      end; {if ...}
+
+    end; {if ...}
+  end; {while ...}
+
+end;
+
+procedure TXmlDtdBuilder.insertNotationOrEnumerationContent(const sender: TXmlCustomReader;
+                                                            const refCMAttrDefinition: TdomCMAttrDefinition;
+                                                            const contSpec: UnicodeString);
+var
+  dummy,content,piece: UnicodeString;
+  separator: integer;
+  Error: boolean;
+begin
+  XMLTruncRoundBrackets(contSpec,content,Error);
+  if Error or (content = '')
+    then raise EParserException.create('Parser error.');
+  while content <> '' do begin
+    separator:= pos(UnicodeString('|'),content);
+    if separator = 0 then begin
+      piece:= content;
+      content:= '';
+    end else begin
+      piece:= XMLTrunc(copy(content,1,separator-1));
+      dummy:= XMLTrunc(copy(content,separator+1,length(content)-separator));
+      content:= dummy;
+      if content = '' then raise EParserException.create('Parser error.');
+    end; {if ...}
+    if refCMAttrDefinition.attributeType = 'NOTATION' then begin
+      if not IsXmlName(piece) then raise EParserException.create('Parser error.');
+      refCMAttrDefinition.appendChild(refCMAttrDefinition.OwnerCMObject.CreateCMNameParticle(piece));
+    end else begin
+      if not IsXmlNmtoken(piece) then raise EParserException.create('Parser error.');
+      refCMAttrDefinition.appendChild(refCMAttrDefinition.OwnerCMObject.CreateCMNmtokenParticle(piece));
+    end;
+  end; {while ...}
+end;
+
+function TXmlDtdBuilder.getExtContentModel: TdomCMExternalObject;
+begin
+  Result:= FReferenceExtCM;
+end;
+
+function TXmlDtdBuilder.getIntContentModel: TdomCMInternalObject;
+begin
+  Result:= FReferenceIntCM;
+end;
+
+procedure TXmlDtdBuilder.setExtContentModel(const cm: TdomCMExternalObject);
+begin
+  if FExtDtdIsActive
+    then raise EParserException.Create('TXmlDtdBuilder -- external DTD is active.');
+  FReferenceExtCM:= cm;
+end;
+
+procedure TXmlDtdBuilder.setIntContentModel(const cm: TdomCMInternalObject);
+begin
+  if FIntDtdIsActive
+    then raise EParserException.Create('TXmlDtdBuilder -- internal DTD is active.');
+  FReferenceIntCM:= cm;
+end;
+
+function TXmlDtdBuilder.attributeDefinition(const sender: TXmlCustomReader;
+                                            const locator: TdomLocator;
+                                                  aname,
+                                                  attType,
+                                                  bracket,
+                                                  defaultDecl,
+                                                  attValue: UnicodeString): boolean;
+var
+  newAttDef: TdomCMAttrDefinition;
+begin
+  if assigned(FOnAttributeDefinition) then FOnAttributeDefinition(sender,locator,aname,attType,bracket,defaultDecl,attValue);
+  if not (FExtDtdIsActive or FIntDtdIsActive) then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+
+  if assigned(FRefNode) then begin
+    if not (FRefNode.nodeType = ctAttributeList) then begin
+      result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_DECL,locator,aname);
+    end else begin
+      try
+        newAttDef:= FRefNode.OwnerCMObject.CreateCMAttributeDefinition(aname,attType,defaultDecl,attValue);
+        try
+          if Bracket <> ''
+            then insertNotationOrEnumerationContent(sender,newAttDef,Bracket);
+            // xxx no well-formedness testing is performed for 'Bracket'
+          FRefNode.appendChild(newAttDef);
+        except
+          if assigned(newAttDef.ParentNode)
+            then newAttDef.ParentNode.RemoveChild(newAttDef);
+          FRefNode.OwnerCMObject.FreeAllCMNodes(TdomCMNode(newAttDef));
+          raise;
+        end; {try ...}
+      except
+        result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_DECL,locator,aname);
+      end; {try ...}
+    end; {if ... else ...}
+  end;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.attributeDefinition(sender,locator,aname,attType,bracket,defaultDecl,attValue);
+end;
+
+function TXmlDtdBuilder.DTDcomment(const sender: TXmlCustomReader;
+                                   const locator: TdomLocator;
+                                         data: UnicodeString): boolean;
+var
+  newComment: TdomCMComment;
+begin
+  if assigned(FOnDTDcomment) then FOnDTDcomment(sender,locator,data);
+  if not (FExtDtdIsActive or FIntDtdIsActive) then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+  if assigned(FRefNode) then begin
+    try
+      newComment:= FRefNode.OwnerCMObject.CreateCMComment(data);
+      try
+        FRefNode.appendChild(newComment);
+      except
+        if assigned(newComment.ParentNode)
+          then newComment.ParentNode.RemoveChild(newComment);
+        FRefNode.OwnerCMObject.FreeAllCMNodes(TdomCMNode(newComment));
+        raise;
+      end; {try ...}
+    except
+      result:= sendErrorNotification(sender,ET_INVALID_COMMENT,locator,data);
+    end; {try ...}
+  end; {if assigned(FRefNode) ...}
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.DTDcomment(sender,locator,data);
+end;
+
+function TXmlDtdBuilder.conditionalSection(const sender: TXmlCustomReader;
+                                           const locator: TdomLocator;
+                                                 includeStmt,
+                                                 data: UnicodeString): boolean;
+var
+  parser: TXmlToDomParser;
+begin
+  if assigned(FOnConditionalSection) then FOnConditionalSection(sender,locator,includeStmt,data);
+  if not (FExtDtdIsActive or FIntDtdIsActive) then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+
+  if assigned(FRefNode) then begin
+    try
+      if (IncludeStmt = 'INCLUDE') and (data <> '') then begin
+        parser:= TXmlToDomParser.create(sender);
+        parser.domImpl:= FRefNode.OwnerCMObject.domImplementation;
+        try
+          if assigned(locator)
+            then parser.extDtdWideStringToDom(data,'',locator.uri,FRefNode)
+            else parser.extDtdWideStringToDom(data,'','',FRefNode);
+        finally
+          parser.free;
+        end; {try ...}
+      end; {if ...}
+    except
+      result:= sendErrorNotification(sender,ET_INVALID_CONDITIONAL_SECTION,locator,name);
+    end; {try ...}
+  end; {if ...}
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.conditionalSection(sender,locator,includeStmt,data);
+end;
+
+function TXmlDtdBuilder.elementTypeDeclaration(const sender: TXmlCustomReader;
+                                               const locator: TdomLocator;
+                                                     aname,
+                                                     data: UnicodeString): boolean;
+var
+  contSpec: UnicodeString;
+  contspecType: TdomContentspecType;
+  newElementTypeDecl: TdomCMElementTypeDeclaration;
+begin
+  if assigned(FOnElementTypeDeclaration) then FOnElementTypeDeclaration(sender,locator,aname,data);
+  if not (FExtDtdIsActive or FIntDtdIsActive) then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+
+  if assigned(FRefNode) then begin
+
+    contSpec:= XMLTrunc(data);
+    contspecType:= ctChildren;
+    if contSpec = 'EMPTY'
+      then contspecType:= ctEmpty
+      else if contSpec = 'ANY'
+        then contspecType:= ctAny
+        else if pos(UnicodeString('#PCDATA'),contSpec) > 0
+          then contspecType:= ctMixed;
+    try
+      newElementTypeDecl:= FRefNode.OwnerCMObject.CreateCMElementTypeDeclaration(aname,contspecType);
+      try
+        FRefNode.appendChild(newElementTypeDecl);
+      except
+        if assigned(newElementTypeDecl.ParentNode)
+          then newElementTypeDecl.ParentNode.RemoveChild(newElementTypeDecl);
+        FRefNode.OwnerCMObject.FreeAllCMNodes(TdomCMNode(newElementTypeDecl));
+        raise;
+      end; {try ...}
+      try
+        case contspecType of
+          ctMixed: insertMixedContent(sender,newElementTypeDecl,contSpec);
+          ctChildren: insertChildrenContent(sender,newElementTypeDecl,contSpec);
+        end; {case ...}
+      except
+        FRefNode.RemoveChild(newElementTypeDecl);
+        FRefNode.OwnerCMObject.FreeAllCMNodes(TdomCMNode(newElementTypeDecl));
+        raise;
+      end; {try ...}
+    except
+      result:= sendErrorNotification(sender,ET_INVALID_ELEMENT_DECL,locator,aname);
+    end; {try ...}
+  end; {if ...}
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.elementTypeDeclaration(sender,locator,aname,data);
+end;
+
+function TXmlDtdBuilder.endAttListDeclaration(const sender: TXmlCustomReader;
+                                              const locator: TdomLocator): boolean;
+begin
+  if assigned(FOnEndAttListDeclaration) then FOnEndAttListDeclaration(sender,locator);
+  if not (FExtDtdIsActive or FIntDtdIsActive) then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+
+  if assigned(FRefNode) then begin
+    if not (FRefNode.nodeType = ctAttributeList) then begin
+      result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_DECL,locator,'');
+    end else FRefNode:= FRefNode.ParentNode;
+  end;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.endAttListDeclaration(sender,locator);
+end;
+
+function TXmlDtdBuilder.endExtDtd(const sender: TXmlCustomReader;
+                                  const locator: TdomLocator): boolean;
+begin
+  if assigned(FOnEndExtDtd) then FOnEndExtDtd(sender,locator);
+  if FIntDtdIsActive or not FExtDtdIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+  FExtDtdIsActive:= false;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.endExtDtd(sender,locator);
+end;
+
+function TXmlDtdBuilder.endIntDtd(const sender: TXmlCustomReader;
+                                  const locator: TdomLocator): boolean;
+begin
+  if assigned(FOnEndIntDtd) then FOnEndIntDtd(sender,locator);
+  if FExtDtdIsActive or not FIntDtdIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+  FIntDtdIsActive:= false;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.endIntDtd(sender,locator);
+end;
+
+function TXmlDtdBuilder.entityDeclaration(const sender: TXmlCustomReader;
+                                          const locator: TdomLocator;
+                                                aname,
+                                                entityValue,
+                                                pubId,
+                                                sysId,
+                                                notaName: UnicodeString): boolean;
+var
+  newEntDecl: TdomCMEntityDeclaration;
+begin
+  if assigned(FOnEntityDeclaration) then FOnEntityDeclaration(sender,locator,aname,entityValue,pubId,sysId,notaName);
+  if not (FExtDtdIsActive or FIntDtdIsActive) then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+
+  if assigned(FRefNode) then begin
+
+    try
+      if (pubId = '') and (sysId = '') and (notaName = '') then begin
+        newEntDecl:= FRefNode.OwnerCMObject.CreateCMIntEntityDeclaration(aname,entityValue);
+      end else begin
+        if notaName = ''
+          then newEntDecl:= FRefNode.OwnerCMObject.CreateCMExtEntityDeclaration(aname,pubId,sysId)
+          else newEntDecl:= FRefNode.OwnerCMObject.CreateCMExtUnparsedEntityDeclaration(aname,pubId,sysId,notaName);
+      end;
+      try
+        FRefNode.appendChild(newEntDecl);
+      except
+        if assigned(newEntDecl) then begin
+          if assigned(newEntDecl.ParentNode)
+            then newEntDecl.ParentNode.RemoveChild(newEntDecl);
+          FRefNode.OwnerCMObject.FreeAllCMNodes(TdomCMNode(newEntDecl));
+        end;
+        raise;
+      end; {try ...}
+    except
+      result:= sendErrorNotification(sender,ET_INVALID_ENTITY_DECL,locator,aname);
+    end; {try ...}
+
+  end; {if ...}
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.entityDeclaration(sender,locator,aname,entityValue,pubId,sysId,notaName);
+end;
+
+function TXmlDtdBuilder.notationDeclaration(const sender: TXmlCustomReader;
+                                            const locator: TdomLocator;
+                                                  aname,
+                                                  pubId,
+                                                  sysId: UnicodeString): boolean;
+var
+  newNotaDecl: TdomCMNotationDeclaration;
+begin
+  if assigned(FOnNotationDeclaration) then FOnNotationDeclaration(sender,locator,aname,pubId,sysId);
+  if not (FExtDtdIsActive or FIntDtdIsActive) then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+
+  if assigned(FRefNode) then begin
+    try
+      newNotaDecl:= FRefNode.OwnerCMObject.CreateCMNotationDeclaration(aname,pubId,sysId);
+      try
+        FRefNode.appendChild(newNotaDecl);
+      except
+        if assigned(newNotaDecl) then begin
+          if assigned(newNotaDecl.ParentNode)
+            then newNotaDecl.ParentNode.RemoveChild(newNotaDecl);
+          FRefNode.OwnerCMObject.FreeAllCMNodes(TdomCMNode(newNotaDecl));
+        end;
+        raise;
+      end; {try ...}
+    except
+      result:= sendErrorNotification(sender,ET_INVALID_NOTATION_DECL,locator,aname);
+    end; {try ...}
+  end; {if ...}
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.notationDeclaration(sender,locator,aname,pubId,sysId);
+end;
+
+function TXmlDtdBuilder.parameterEntityDeclaration(const sender: TXmlCustomReader;
+                                                   const locator: TdomLocator;
+                                                         aname,
+                                                         entityValue,
+                                                         pubId,
+                                                         sysId: UnicodeString): boolean;
+var
+  newParamEntDecl: TdomCMParameterEntityDeclaration;
+begin
+  if assigned(FOnParameterEntityDeclaration) then FOnParameterEntityDeclaration(sender,locator,aname,entityValue,pubId,sysId);
+  if not (FExtDtdIsActive or FIntDtdIsActive) then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+
+  if FExtDtdIsActive then begin
+    if extContentModel.hasPEDeclaration(aname)
+      then result:= sendErrorNotification(sender,ET_DOUBLE_PARAMETER_ENTITY_DECL,locator,aname);
+  end else if FIntDtdIsActive then begin
+    if intContentModel.hasPEDeclaration(aname)
+      then result:= sendErrorNotification(sender,ET_DOUBLE_PARAMETER_ENTITY_DECL,locator,aname);
+  end;
+
+  if result then begin
+    if assigned(FRefNode) then begin
+      try
+        if (pubId = '') and (sysId = '')
+          then newParamEntDecl:= FRefNode.OwnerCMObject.CreateCMIntParameterEntityDeclaration(aname,entityValue)
+          else newParamEntDecl:= FRefNode.OwnerCMObject.CreateCMExtParameterEntityDeclaration(aname,pubId,sysId);
+        try
+          FRefNode.appendChild(newParamEntDecl);
+        except
+          if assigned(newParamEntDecl) then begin
+            if assigned(newParamEntDecl.ParentNode)
+              then newParamEntDecl.ParentNode.RemoveChild(newParamEntDecl);
+            FRefNode.OwnerCMObject.FreeAllCMNodes(TdomCMNode(newParamEntDecl));
+          end;
+          raise;
+        end; {try ...}
+      except
+        result:= sendErrorNotification(sender,ET_INVALID_ENTITY_DECL,locator,aname);
+      end; {try ...}
+    end; {if ...}
+  end; {if ...}
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.parameterEntityDeclaration(sender,locator,aname,entityValue,pubId,sysId);
+end;
+
+function TXmlDtdBuilder.parameterEntityRef(const sender: TXmlCustomReader;
+                                           const locator: TdomLocator;
+                                                 aname: UnicodeString): boolean;
+const
+  SPACE: UnicodeString  = #$0020;
+var
+  error: TXmlErrorType;
+  error2: boolean;
+  newParamEntRef: TdomCMParameterEntityReference;
+  parser: TXmlToDomParser;
+  replText, value: UnicodeString;
+begin
+  if assigned(FOnParameterEntityRef) then FOnParameterEntityRef(sender,locator,aname);
+  if not (FExtDtdIsActive or FIntDtdIsActive) then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+
+  if assigned(FRefNode) then begin
+
+    if FIntDtdIsActive then begin
+      newParamEntRef:= FRefNode.OwnerCMObject.CreateCMParameterEntityReference(aname);
+      try
+        FRefNode.appendChild(newParamEntRef);
+      except
+        if assigned(newParamEntRef.ParentNode)
+          then newParamEntRef.ParentNode.RemoveChild(newParamEntRef);
+        FRefNode.OwnerCMObject.FreeAllCMNodes(TdomCMNode(newParamEntRef));
+        result:= sendErrorNotification(sender,ET_INVALID_ENTITY_NAME,locator,aname);
+      end; {try ...}
+    end;
+
+    if FExtDtdIsActive then begin
+      resolvePE(aname,value,error);
+      if error = ET_NONE then begin
+        try
+          ResolveCharRefsAndPERefs(value,replText,error2);
+        except
+          error2:= true;
+        end;
+        if error2 then begin
+          result:= sendErrorNotification(sender,ET_INVALID_ENTITY_DECL,locator,aname);
+        end else begin
+
+          try
+            parser:= TXmlToDomParser.create(sender);
+            parser.domImpl:= FRefNode.OwnerCMObject.domImplementation;
+            try
+              if assigned(locator)
+                then parser.extDtdWideStringToDom(concat(SPACE,replText,SPACE),'',locator.uri,FRefNode)
+                else parser.extDtdWideStringToDom(concat(SPACE,replText,SPACE),'','',FRefNode);
+                     // SPACE is required by XML 1.0 Spec, § 4.4.8
+            finally
+              parser.free;
+            end; {try ...}
+          except
+            result:= sendErrorNotification(sender,ET_INVALID_ENTITY_NAME,locator,aname);
+          end; {try ...}
+
+        end; {if ... else ...}
+      end else begin
+        result:= sendErrorNotification(sender,error,locator,aname);
+      end;
+    end; {if FExtDtdIsActive ...}
+
+  end; {if ...}
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.parameterEntityRef(sender,locator,aname);
+end;
+
+function TXmlDtdBuilder.DTDprocessingInstruction(const sender: TXmlCustomReader;
+                                                 const locator: TdomLocator;
+                                                       targ,
+                                                       data : UnicodeString): boolean;
+var
+  newPI: TdomCMProcessingInstruction;
+begin
+  if assigned(FOnDTDprocessingInstruction) then FOnDTDprocessingInstruction(sender,locator,targ,data);
+  if not (FExtDtdIsActive or FIntDtdIsActive) then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+
+  if assigned(FRefNode) then begin
+    try
+      newPI:= FRefNode.OwnerCMObject.CreateCMProcessingInstruction(targ,data);
+      try
+        FRefNode.appendChild(newPI);
+      except
+        if assigned(newPI.ParentNode)
+          then newPI.ParentNode.RemoveChild(newPI);
+        FRefNode.OwnerCMObject.FreeAllCMNodes(TdomCMNode(newPI));
+        raise;
+      end;
+    except
+      result:= sendErrorNotification(sender,ET_INVALID_PROCESSING_INSTRUCTION,locator,targ);
+    end;
+  end; {if assigned(FRefNode) ...}
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.DTDprocessingInstruction(sender,locator,targ,data);
+end;
+
+function TXmlDtdBuilder.startAttListDeclaration(const sender: TXmlCustomReader;
+                                                const locator: TdomLocator;
+                                                      aname: UnicodeString): boolean;
+var
+  newAttList: TdomCMAttrList;
+begin
+  if assigned(FOnStartAttListDeclaration) then FOnStartAttListDeclaration(sender,locator,aname);
+  if not (FExtDtdIsActive or FIntDtdIsActive) then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+
+  if assigned(FRefNode) then begin
+    try
+      newAttList:= FRefNode.OwnerCMObject.CreateCMAttributeList(aname);
+      try
+        FRefNode.appendChild(newAttList);
+      except
+        if assigned(newAttList.ParentNode)
+          then newAttList.ParentNode.RemoveChild(newAttList);
+        FRefNode.OwnerCMObject.FreeAllCMNodes(TdomCMNode(newAttList));
+        raise;
+      end; {try ...}
+    except
+      result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_DECL,locator,aname);
+    end; {try ...}
+    FRefNode:= newAttList;
+
+  end; {if ...}
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.startAttListDeclaration(sender,locator,aname);
+end;
+
+function TXmlDtdBuilder.startExtDtd(const sender: TXmlCustomReader;
+                                    const locator: TdomLocator;
+                                          version,
+                                          encName: UnicodeString): boolean;
+begin
+  if assigned(FOnStartExtDtd) then FOnStartExtDtd(sender,locator,version,encName);
+  if FIntDtdIsActive or FExtDtdIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+  FExtDtdIsActive:= true;
+
+  FRefNode:= FReferenceExtCM;
+  if assigned(FReferenceExtCM) then begin
+    FReferenceExtCM.publicId:= '';
+    if assigned(locator)
+      then FReferenceExtCM.systemId:= locator.uri
+      else FReferenceExtCM.systemId:= '';
+    FReferenceExtCM.version:= version;
+    FReferenceExtCM.encoding:= encName;
+  end;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.startExtDtd(sender,locator,version,encName);
+end;
+
+function TXmlDtdBuilder.startIntDtd(const sender: TXmlCustomReader;
+                                    const locator: TdomLocator): boolean;
+begin
+  if assigned(FOnStartIntDtd) then FOnStartIntDtd(sender,locator);
+  if FIntDtdIsActive or FExtDtdIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+  FIntDtdIsActive:= true;
+
+  FRefNode:= FReferenceIntCM;
+  if assigned(FReferenceIntCM) then begin
+    if assigned(locator)
+      then FReferenceIntCM.publicId:= ''
+      else FReferenceIntCM.systemId:= locator.uri;
+  end;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.startIntDtd(sender,locator);
+end;
+
+procedure TXmlDtdBuilder.notifyReset;
+begin
+  FRefNode:= nil;
+  FExtDtdIsActive:= false;
+  FIntDtdIsActive:= false;
+  if assigned(nextHandler) then nextHandler.notifyReset;
+end;
+
+
+
+// ++++++++++++++++++++++++++ TXmlCMBuilder +++++++++++++++++++++++++++
+constructor TXmlCMBuilder.create(AOwner: TComponent);
+begin
+  inherited create(AOwner);
+  FContentModel:= nil;
+  FIsActive:= false;
+end;
+
+procedure TXmlCMBuilder.CDataNormalization(const s: UnicodeString;
+                                             var result: UnicodeString;
+                                             var error: boolean);
+const
+  TAB:       WideChar = #$9;   // Horizontal Tabulation
+  LF:        WideChar = #$A;   // Line Feed
+  CR:        WideChar = #$D;   // Carriage Return
+  SPACE:     WideChar = #$20;  // ' '
+var
+  i,j,indexpos: integer;
+  SChar, SChar2: widechar;
+  name,ref: UnicodeString;
+  content: TdomCustomStr;
+  Entity: TdomCMEntity;
+begin
+  Result:= '';
+  Error:= false;
+  content:= TdomCustomStr.create;
+  try
+    i:= 1;
+    while i <= length(S) do begin
+      SChar:= WideChar((PWideChar(S)+i-1)^);
+      if IsUtf16LowSurrogate(sChar)
+        then raise EConvertError.CreateFmt('%S must not start with a UTF-16 low surrogate.',[S]);
+      if IsUtf16HighSurrogate(SChar) then begin
+        if i+1 > length(s)
+          then raise EConvertError.CreateFmt('%S must not end with a UTF-16 high surrogate.',[S]);
+        inc(i);
+        content.addWideChar(SChar);
+        SChar:= WideChar((PWideChar(S)+i-1)^);
+        if not IsUtf16LowSurrogate(SChar)
+          then raise EConvertError.CreateFmt('%S contains an UTF-16 high surrogate without its corresponding low surrogate.',[S]);
+      end;
+      if not IsXmlChar(sChar)
+        then raise EConvertError.CreateFmt('%S contains an invalid character.',[S]);
+      if SChar = '&' then begin // Reference?
+        indexpos:= -1;
+        for j:= i+1 to length(S) do begin
+          SChar2:= WideChar((PWideChar(S)+j-1)^);
+          if SChar2 = ';' then begin indexpos:= j; break; end;
+        end;
+        if indexpos = -1
+          then raise EConvertError.CreateFmt('%S contains an ''&'' without a '';''.',[S]);
+        ref:= copy(S,i,j-i+1);
+        if IsXmlEntityRef(ref) then begin
+          name:= copy(ref,2,length(ref)-2);
+          Entity:= FContentModel.Entities.GetNamedItem(name);
+          if assigned(Entity) then begin
+            try
+              content.addWideString(Entity.normalizedValue);
+            except
+              error:= true;
+            end;
+          end else begin
+            content.addWideString(ref);
+            error:= true;
+          end;
+        end else if IsXmlCharRef(ref) then begin
+          content.addWideString(XmlCharRefToStr(ref));
+        end else raise EConvertError.CreateFmt('%S contains an invalid reference.',[S]);
+        i:= j;
+      end else if (SChar = TAB) or (SChar = LF) or (SChar = CR) // White space?
+        then content.addWideChar(SPACE)
+        else content.addWideChar(SChar);
+      inc(i);
+    end; {while ...}
+    Result:= content.value;
+  finally
+    content.free;
+  end;
+end;
+
+function TXmlCMBuilder.getContentModel: TdomCMObject;
+begin
+  Result:= FContentModel;
+end;
+
+procedure TXmlCMBuilder.insertMixedContent(const sender: TXmlCustomReader;
+                                            const refNode: TdomCMNode;
+                                            const contSpec: UnicodeString);
+var
+  freq, dummy, content,piece: UnicodeString;
+  separator: integer;
+  Error: boolean;
+  newNode: TdomCMNode;
+begin
+  content:= XMLTrunc(contSpec);
+  freq:= '';
+  if (content[length(content)] = '*') then begin
+    freq:= '*';
+    dummy:= copy(content,1,length(content)-1);
+    content:= dummy;
+  end;
+  if length(content) = 0
+    then raise EParserException.create('Parser error.');
+  if wideChar(content[length(content)]) <> ')'
+    then raise EParserException.create('Parser error.');
+  XMLTruncRoundBrackets(content,dummy,Error);
+  if Error or (dummy = '')
+    then raise EParserException.create('Parser error.');
+  content:= dummy;
+  newNode:= refNode.appendChild(refNode.OwnerCMObject.CreateCMPcdataChoiceParticle);
+  if content = '#PCDATA' then exit;
+  if freq = '' then raise EParserException.create('Parser error.');
+  separator:= pos(UnicodeString('|'),content);
+  if separator = 0 then raise EParserException.create('Parser error.');
+  dummy:= XMLTrunc(copy(content,separator+1,length(content)-separator));
+  content:= dummy;
+  while content <> '' do begin
+    separator:= pos(UnicodeString('|'),content);
+    if separator = 0 then begin
+      piece:= content;
+      content:= '';
+    end else begin
+      piece:= XMLTrunc(copy(content,1,separator-1));
+      dummy:= XMLTrunc(copy(content,separator+1,length(content)-separator));
+      content:= dummy;
+      if content = '' then raise EParserException.create('Parser error.');
+    end; {if ...}
+    if not IsXmlName(piece) then raise EParserException.create('Parser error.');
+    newNode.appendChild(newNode.OwnerCMObject.CreateCMElementParticle(piece,''));
+  end; {while ...}
+end;
+
+procedure TXmlCMBuilder.insertChildrenContent(const sender: TXmlCustomReader;
+                                               const refNode: TdomCMNode;
+                                               const contSpec: UnicodeString);
+var
+  piece,dummy,content,freq: UnicodeString;
+  SeparatorChar: WideChar;
+  j,i,bracketNr: integer;
+  newNode: TdomCMNode;
+  Error: boolean;
+begin
+  content:= XMLTrunc(contSpec);
+  freq:= '';
+  if (content[length(content)] = WideChar('?')) or
+     (content[length(content)] = WideChar('*')) or
+     (content[length(content)] = WideChar('+')) then begin
+    freq:= content[length(content)];
+    dummy:= copy(content,1,length(content)-1);
+    content:= dummy;
+  end;
+  if length(content) = 0
+    then raise EParserException.create('Parser error.');
+  if wideChar(content[length(content)]) <> ')'
+    then raise EParserException.create('Parser error.');
+  XMLTruncRoundBrackets(content,dummy,Error);
+  if Error or (dummy = '')
+    then raise EParserException.create('Parser error.');
+  content:= dummy;
+
+  bracketNr:= 0;
+  SeparatorChar:= ',';
+  for i:= 1 to length(content) do begin
+    if (content[i] = ',') and (bracketNr = 0) then begin
+      SeparatorChar:= ',';
+      break;
+    end; {if ...}
+    if (content[i] = '|') and (bracketNr = 0) then begin
+      SeparatorChar:= '|';
+      break;
+    end; {if ...}
+    if content[i] = '(' then inc(bracketNr);
+    if content[i] = ')' then begin
+      if bracketNr = 0 then raise EParserException.create('Parser error.');
+      dec(bracketNr);
+    end;
+  end; {for ...}
+
+  if SeparatorChar = ','
+    then newNode:= refNode.appendChild(refNode.OwnerCMObject.CreateCMSequenceParticle(freq))
+    else newNode:= refNode.appendChild(refNode.OwnerCMObject.CreateCMChoiceParticle(freq));
+
+  bracketNr:= 0;
+  i:= 0;
+  j:= 1;
+  while i < length(content) do begin
+    inc(i);
+    if content[i] = '(' then inc(bracketNr);
+    if content[i] = ')' then begin
+      if bracketNr = 0 then raise EParserException.create('Parser error.');
+      dec(bracketNr);
+    end;
+    if ((content[i] = SeparatorChar) and (bracketNr = 0)) or
+       (i = length(content)) then begin
+      if bracketNr > 0 then raise EParserException.create('Parser error.');
+      if i = length(content)
+        then piece:= XmlTrunc(copy(content,j,i+1-j))
+        else piece:= XmlTrunc(copy(content,j,i-j));
+      j:= i+1;
+
+      if piece[1] = '(' then begin
+        insertChildrenContent(sender,NewNode,piece);
+      end else begin
+        freq:= '';
+        if (piece[length(piece)] = wideChar('?')) or
+           (piece[length(piece)] = wideChar('*')) or
+           (piece[length(piece)] = wideChar('+')) then begin
+          freq:= piece[length(piece)];
+          dummy:= copy(piece,1,length(piece)-1);
+          piece:= dummy;
+        end;
+        if not IsXmlName(piece)
+          then raise EParserException.create('Parser error.');
+        NewNode.appendChild(refNode.OwnerCMObject.CreateCMElementParticle(piece,freq));
+      end; {if ...}
+
+    end; {if ...}
+  end; {while ...}
+
+end;
+
+procedure TXmlCMBuilder.insertNotationOrEnumerationContent(const sender: TXmlCustomReader;
+                                                           const refCMAttribute: TdomCMAttribute;
+                                                           const contSpec: UnicodeString);
+var
+  dummy,content,piece: UnicodeString;
+  separator: integer;
+  Error: boolean;
+begin
+  XMLTruncRoundBrackets(contSpec,content,Error);
+  if Error or (content = '')
+    then raise EParserException.create('Parser error.');
+  while content <> '' do begin
+    separator:= pos(UnicodeString('|'),content);
+    if separator = 0 then begin
+      piece:= content;
+      content:= '';
+    end else begin
+      piece:= XMLTrunc(copy(content,1,separator-1));
+      dummy:= XMLTrunc(copy(content,separator+1,length(content)-separator));
+      content:= dummy;
+      if content = '' then raise EParserException.create('Parser error.');
+    end; {if ...}
+    if refCMAttribute.attributeType = 'NOTATION' then begin
+      if not IsXmlName(piece) then raise EParserException.create('Parser error.');
+      refCMAttribute.appendChild(refCMAttribute.OwnerCMObject.CreateCMNameParticle(piece));
+    end else begin
+      if not IsXmlNmtoken(piece) then raise EParserException.create('Parser error.');
+      refCMAttribute.appendChild(refCMAttribute.OwnerCMObject.CreateCMNmtokenParticle(piece));
+    end;
+  end; {while ...}
+end;
+
+procedure TXmlCMBuilder.resolveCharRefsAndPERefs(const s: UnicodeString;
+                                                   var result: UnicodeString;
+                                                   var error: boolean);
+var
+  i,j,indexpos: integer;
+  SChar, SChar2: widechar;
+  name,ref,value: UnicodeString;
+  content: TdomCustomStr;
+  errType: TXmlErrorType;
+begin
+  Result:= '';
+  Error:= false;
+  content:= TdomCustomStr.create;
+  try
+    i:= 1;
+    while i <= length(S) do begin
+      SChar:= WideChar((PWideChar(S)+i-1)^);
+      if IsUtf16LowSurrogate(sChar)
+        then raise EConvertError.CreateFmt('%S must not start with a UTF-16 low surrogate.',[S]);
+      if IsUtf16HighSurrogate(SChar) then begin
+        if i+1 > length(s)
+          then raise EConvertError.CreateFmt('%S must not end with a UTF-16 high surrogate.',[S]);
+        inc(i);
+        content.addWideChar(SChar);
+        SChar:= WideChar((PWideChar(S)+i-1)^);
+        if not IsUtf16LowSurrogate(SChar)
+          then raise EConvertError.CreateFmt('%S contains an UTF-16 high surrogate without its corresponding low surrogate.',[S]);
+      end;
+      if not IsXmlChar(sChar)
+        then raise EConvertError.CreateFmt('%S contains an invalid character.',[S]);
+      if SChar = '&' then begin {Reference?}
+        indexpos:= -1;
+        for j:= i+1 to length(S) do begin
+          SChar2:= WideChar((PWideChar(S)+j-1)^);
+          if SChar2 = ';' then begin indexpos:= j; break; end;
+        end;
+        if indexpos = -1
+          then raise EConvertError.CreateFmt('%S contains an ''&'' without a '';''.',[S]);
+        ref:= copy(S,i,j-i+1);
+        if IsXmlEntityRef(ref) then begin
+          content.addWideString(ref);
+        end else if IsXmlCharRef(ref) then begin
+          content.addWideString(XmlCharRefToStr(ref));
+        end else raise EConvertError.CreateFmt('%S contains an invalid reference.',[S]);
+        i:= j;
+      end else if SChar = '%' then begin {PEReference?}
+        indexpos:= -1;
+        for j:= i+1 to length(S) do begin
+          SChar2:= WideChar((PWideChar(S)+j-1)^);
+          if SChar2 = ';' then begin indexpos:= j; break; end;
+        end;
+        if indexpos = -1
+          then raise EConvertError.CreateFmt('%S contains an ''%'' without a '';''.',[S]);
+        ref:= copy(S,i,j-i+1);
+        if IsXmlPEReference(ref) then begin
+          name:= copy(ref,2,length(ref)-2);
+          resolvePE(name,value,errType);
+          if errType <> ET_NONE
+            then raise EConvertError.CreateFmt('%S contains an invalid parameter entity reference.',[S]);
+          content.addWideString(value);
+        end else raise EConvertError.CreateFmt('%S contains an invalid parameter entity reference.',[S]);
+        i:= j;
+      end else content.addWideChar(SChar);
+      inc(i);
+    end; {while ...}
+    Result:= content.value;
+  finally
+    content.free;
+  end;
+end;
+
+procedure TXmlCMBuilder.setContentModel(const cm: TdomCMObject);
+begin
+  if FIsActive
+    then raise EParserException.Create('TXmlCMBuilder -- Content Model is active.');
+  FContentModel:= cm;
+end;
+
+function TXmlCMBuilder.resolvePE(    PEReferenceName: UnicodeString;
+                                 var PEValue: UnicodeString;
+                                 var error: TXmlErrorType): boolean;
+begin
+  if not FIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+  FContentModel.getValueOfPE(PEReferenceName,PEValue,error);
+end;
+
+function TXmlCMBuilder.attributeDefinition(const sender: TXmlCustomReader;
+                                           const locator: TdomLocator;
+                                                 aname,
+                                                 attType,
+                                                 bracket,
+                                                 defaultDecl,
+                                                 attValue: UnicodeString): boolean;
+const
+  LT: WideChar  = #60;  // '<'
+var
+  error: boolean;
+  newCMAttribute: TdomCMAttribute;
+  replText: UnicodeString;
+begin
+  if assigned(FOnAttributeDefinition)
+    then FOnAttributeDefinition(sender,locator,aname,attType,bracket,defaultDecl,attValue);
+  if not FIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+  if assigned(FContentModel) then begin
+    if FCurrentAttListName = '' then begin
+      result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_DECL,locator,aname);
+    end else begin
+
+      if assigned(FContentModel.attributes.GetNamedItem(FCurrentAttListName,aname)) then begin
+        result:= sendErrorNotification(sender,ET_DOUBLE_ATTDEF,locator,aname);
+      end else begin
+        try
+          CDataNormalization(attValue,replText,error);
+        except
+          result:= sendErrorNotification(sender,ET_INVALID_ENTITY_DECL,locator,attValue);
+        end; {try ...}
+
+        if result and error then begin
+          result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_DECL,locator,aname);
+        end;
+
+        // WFC: No < in Attribute Values (XML 1.0, § 3.3.2)
+        if result and (pos(LT,replText) > 0) then begin
+          result:= sendErrorNotification(sender,ET_LT_IN_ATTRIBUTE_VALUE,locator,aname);
+        end;
+
+        if result then begin
+          newCMAttribute:= FContentModel.CreateCMAttribute(FCurrentAttListName,aname,attType,defaultDecl,replText);
+          try
+            if Bracket <> ''
+              then insertNotationOrEnumerationContent(sender,newCMAttribute,Bracket);
+              // xxx no well-formedness testing is performed for 'Bracket'
+          except
+            FContentModel.FreeAllCMNodes(TdomCMNode(newCMAttribute));
+            result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_DECL,locator,aname);
+          end; {try ...}
+          if assigned(newCMAttribute)
+            then FContentModel.Attributes.appendNamedItem(newCMAttribute);
+        end; {if ...}
+      end; {if ... else ...}
+    end; {if ... else ...}
+  end; {if ...}
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.attributeDefinition(sender,locator,aname,attType,bracket,defaultDecl,attValue);
+end;
+
+function TXmlCMBuilder.DTDcomment(const sender: TXmlCustomReader;
+                                   const locator: TdomLocator;
+                                         data: UnicodeString): boolean;
+begin
+  if assigned(FOnDTDcomment) then FOnDTDcomment(sender,locator,data);
+  if not FIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+
+  if assigned(FContentModel) and (FCurrentAttListName <> '') then begin
+    result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_DECL,locator,'');
+  end; {if ...}
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.DTDcomment(sender,locator,data);
+end;
+
+function TXmlCMBuilder.conditionalSection(const sender: TXmlCustomReader;
+                                           const locator: TdomLocator;
+                                                 includeStmt,
+                                                 data: UnicodeString): boolean;
+begin
+  if assigned(FOnConditionalSection) then FOnConditionalSection(sender,locator,includeStmt,data);
+  if not FIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+
+  if assigned(FContentModel) and (FCurrentAttListName <> '') then begin
+    result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_DECL,locator,'');
+  end; {if ...}
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.conditionalSection(sender,locator,includeStmt,data);
+end;
+
+function TXmlCMBuilder.elementTypeDeclaration(const sender: TXmlCustomReader;
+                                               const locator: TdomLocator;
+                                                     aname,
+                                                     data: UnicodeString): boolean;
+var
+  contSpec: UnicodeString;
+  contspecType: TdomContentspecType;
+  newElementTypeDecl: TdomCMElementTypeDeclaration;
+begin
+  if assigned(FOnElementTypeDeclaration) then FOnElementTypeDeclaration(sender,locator,aname,data);
+  if not FIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+  if assigned(FContentModel) then begin
+    if FCurrentAttListName <> '' then begin
+      result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_DECL,locator,'');
+    end else if not IsXmlName(aname) then begin
+      result:= sendErrorNotification(sender,ET_INVALID_ELEMENT_DECL,locator,aname);
+    end else if assigned(FContentModel.elementTypes.GetNamedItem(aname)) then begin
+      result:= sendErrorNotification(sender,ET_DUPLICATE_ELEMENT_TYPE_DECL,locator,aname);
+    end else begin
+      contSpec:= XMLTrunc(data);
+      contspecType:= ctChildren;
+      if contSpec = 'EMPTY'
+        then contspecType:= ctEmpty
+        else if contSpec = 'ANY'
+          then contspecType:= ctAny
+          else if pos(UnicodeString('#PCDATA'),contSpec) > 0
+            then contspecType:= ctMixed;
+      try
+        newElementTypeDecl:= FContentModel.CreateCMElementTypeDeclaration(aname,contspecType);
+        try
+          case contspecType of
+            ctMixed: insertMixedContent(sender,newElementTypeDecl,contSpec);
+            ctChildren: insertChildrenContent(sender,newElementTypeDecl,contSpec);
+          end; {case ...}
+          FContentModel.elementTypes.setNamedItem(newElementTypeDecl);
+        except
+          FContentModel.FreeAllCMNodes(TdomCMNode(newElementTypeDecl));
+          raise;
+        end; {try ...}
+      except
+        result:= sendErrorNotification(sender,ET_INVALID_ELEMENT_DECL,locator,aname);
+      end; {try ...}
+    end;
+  end; {if ...}
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.elementTypeDeclaration(sender,locator,aname,data);
+end;
+
+function TXmlCMBuilder.endAttListDeclaration(const sender: TXmlCustomReader;
+                                             const locator: TdomLocator): boolean;
+begin
+  if assigned(FOnEndAttListDeclaration) then FOnEndAttListDeclaration(sender,locator);
+  if not FIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+  if assigned(FContentModel) then begin
+    if FCurrentAttListName = '' then begin
+      result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_DECL,locator,FCurrentAttListName);
+    end;
+    FCurrentAttListName:= '';
+  end; {if ...}
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.endAttListDeclaration(sender,locator);
+end;
+
+function TXmlCMBuilder.endExtDtd(const sender: TXmlCustomReader;
+                                 const locator: TdomLocator): boolean;
+begin
+  if assigned(FOnEndExtDtd) then FOnEndExtDtd(sender,locator);
+  if not FIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+  if assigned(FContentModel) then begin
+    if FCurrentAttListName <> '' then begin
+      result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_DECL,locator,'');
+    end else begin
+      FIsActive:= false;
+    end;
+  end; {if ...}
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.endExtDtd(sender,locator);
+end;
+
+function TXmlCMBuilder.endIntDtd(const sender: TXmlCustomReader;
+                                  const locator: TdomLocator): boolean;
+begin
+  if assigned(FOnEndExtDtd) then FOnEndExtDtd(sender,locator);
+  if not FIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+  if assigned(FContentModel) then begin
+    if FCurrentAttListName <> '' then begin
+      result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_DECL,locator,'');
+    end else begin
+      FIsActive:= false;
+    end;
+  end; {if ...}
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.endExtDtd(sender,locator);
+end;
+
+function TXmlCMBuilder.entityDeclaration(const sender: TXmlCustomReader;
+                                         const locator: TdomLocator;
+                                               aname,
+                                               literalValue,
+                                               pubId,
+                                               sysId,
+                                               notaName: UnicodeString): boolean;
+var
+  newEntity: TdomCMEntity;
+begin
+  if assigned(FOnEntityDeclaration) then FOnEntityDeclaration(sender,locator,aname,literalValue,pubId,sysId,notaName);
+  if not FIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+  if assigned(FContentModel) then begin
+    if FCurrentAttListName <> '' then begin
+      result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_DECL,locator,'');
+    end else begin
+
+      if assigned(FContentModel.Entities.GetNamedItem(aname)) then begin
+        result:= sendErrorNotification(sender,ET_DOUBLE_ENTITY_DECL,locator,aname);
+      end else begin
+        if notaName = '' then begin
+          if (pubId = '') and (sysId = '') then begin
+
+            // Entity is internal
+            newEntity:= FContentModel.createCMIntEntity(aname,literalValue);
+            FContentModel.Entities.appendNamedItem(newEntity);
+            if newEntity.isUnusable
+              then result:= sendErrorNotification(sender,ET_UNUSABLE_ENTITY_DECL,locator,aname);
+
+          end else begin
+
+            // Entity is external parsed
+            newEntity:= FContentModel.createCMExtParsedEntity(aname,pubId,sysId);
+            FContentModel.Entities.appendNamedItem(newEntity);
+
+          end; {if ... else ...}
+        end else begin
+
+          // Entity is external unparsed
+          newEntity:= FContentModel.createCMExtUnparsedEntity(aname,pubId,sysId,notaName);
+          FContentModel.Entities.appendNamedItem(newEntity);
+
+        end; {if notaName <> '' ... else ...}
+      end; {if assigned ... else ...}
+
+    end; {if ... else ...}
+  end; {if ...}
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.entityDeclaration(sender,locator,aname,literalValue,pubId,sysId,notaName);
+end;
+
+function TXmlCMBuilder.notationDeclaration(const sender: TXmlCustomReader;
+                                            const locator: TdomLocator;
+                                                  aname,
+                                                  pubId,
+                                                  sysId: UnicodeString): boolean;
+var
+  newNotation: TdomCMNotation;
+begin
+  if assigned(FOnNotationDeclaration) then FOnNotationDeclaration(sender,locator,aname,pubId,sysId);
+  if not FIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+  if assigned(FContentModel) then begin
+    if FCurrentAttListName <> '' then begin
+      result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_DECL,locator,'');
+    end else begin
+      if assigned(FContentModel.Notations.GetNamedItem(aname)) then begin
+        result:= sendErrorNotification(sender,ET_DUPLICATE_NOTATION_DECL,locator,aname);
+      end else begin
+        try
+          newNotation:= FContentModel.CreateCMNotation(aname,pubId,sysId);
+          FContentModel.Notations.SetNamedItem(newNotation);
+        except
+          result:= sendErrorNotification(sender,ET_INVALID_NOTATION_DECL,locator,aname);
+        end; {try ...}
+      end;
+    end; {if ...}
+  end; {if ...}
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.notationDeclaration(sender,locator,aname,pubId,sysId);
+end;
+
+function TXmlCMBuilder.parameterEntityRef(const sender: TXmlCustomReader;
+                                          const locator: TdomLocator;
+                                                aname: UnicodeString): boolean;
+// const SPACE: UnicodeString  = #$0020;
+var
+  dtdAnalyzer: TXmlCMAnalyzer;
+  error: TXmlErrorType;
+  error2: boolean;
+  replText,value: UnicodeString;
+begin
+  if assigned(FOnParameterEntityRef) then FOnParameterEntityRef(sender,locator,aname);
+  if not FIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+  if assigned(FContentModel) then begin
+    if FCurrentAttListName <> '' then begin
+      result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_DECL,locator,'');
+    end else begin
+
+      resolvePE(aname,value,error);
+      if error = ET_NONE then begin
+
+        try
+          ResolveCharRefsAndPERefs(value,replText,error2);
+          if error2 then begin
+            result:= sendErrorNotification(sender,ET_ENTITY_DECL_NOT_FOUND,locator,aname);
+          end else begin
+            dtdAnalyzer:= TXmlCMAnalyzer.create(nil);
+            if assigned(sender)
+              then dtdAnalyzer.DOMImpl:= sender.domImpl;
+            try
+              try
+                dtdAnalyzer.analyzeIntDTDStr(replText,FContentModel);
+              finally
+                dtdAnalyzer.free;
+              end;
+            except
+              result:= sendErrorNotification(sender,ET_INVALID_ENTITY_NAME,locator,aname);
+            end;
+          end;
+        except
+          result:= sendErrorNotification(sender,ET_ENTITY_DECL_NOT_FOUND,locator,aname);
+        end; {try ...}
+
+      end else begin
+        result:= sendErrorNotification(sender,error,locator,aname);
+      end;
+
+    end; {if ... else ...}
+  end; {if ...}
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.parameterEntityRef(sender,locator,aname);
+end;
+
+function TXmlCMBuilder.DTDprocessingInstruction(const sender: TXmlCustomReader;
+                                                const locator: TdomLocator;
+                                                      targ,
+                                                      data : UnicodeString): boolean;
+begin
+  if assigned(FOnDTDprocessingInstruction) then FOnDTDprocessingInstruction(sender,locator,targ,data);
+  if not FIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+  if assigned(FContentModel) and (FCurrentAttListName <> '') then begin
+    result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_DECL,locator,'');
+  end;
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.DTDprocessingInstruction(sender,locator,targ,data);
+end;
+
+function TXmlCMBuilder.startAttListDeclaration(const sender: TXmlCustomReader;
+                                               const locator: TdomLocator;
+                                                     aname: UnicodeString): boolean;
+begin
+  if assigned(FOnStartAttListDeclaration) then FOnStartAttListDeclaration(sender,locator,aname);
+  if not FIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+  if assigned(FContentModel) then begin
+    if FCurrentAttListName <> '' then begin
+      result:= sendErrorNotification(sender,ET_INVALID_ATTRIBUTE_DECL,locator,FCurrentAttListName);
+    end else begin
+      FCurrentAttListName:= aname;
+    end; {if ... else ...}
+  end; {if ...}
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.startAttListDeclaration(sender,locator,aname);
+end;
+
+function TXmlCMBuilder.startExtDtd(const sender: TXmlCustomReader;
+                                   const locator: TdomLocator;
+                                         version,
+                                         encName: UnicodeString): boolean;
+begin
+  if assigned(FOnStartExtDtd) then FOnStartExtDtd(sender,locator,version,encName);
+  if FIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+  FCurrentAttListName:= '';
+  FIsActive:= true;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.startExtDtd(sender,locator,version,encName);
+end;
+
+function TXmlCMBuilder.startIntDtd(const sender: TXmlCustomReader;
+                                   const locator: TdomLocator): boolean;
+begin
+  if assigned(FOnStartIntDtd) then FOnStartIntDtd(sender,locator);
+  if FIsActive then begin
+    raise EParserException.create('Internal Parser Exception');
+  end;
+  result:= true;
+  FCurrentAttListName:= '';
+  FIsActive:= true;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.startIntDtd(sender,locator);
+end;
+
+procedure TXmlCMBuilder.notifyReset;
+begin
+  FCurrentAttListName:= '';
+  FIsActive:= false;
+  if assigned(nextHandler) then nextHandler.notifyReset;
+end;
+
+
+
+// ++++++++++++++++++++++++ TXmlStreamBuilder ++++++++++++++++++++++++++
+constructor TXmlStreamBuilder.create(aOwner: TComponent);
+begin
+  inherited;
+  FCurrentEncodingType:= etUTF8;
+  FDefaultEncodingType:= etUTF8;
+  FNewLine:= nltCRLF;
+end;
+
+procedure TXmlStreamBuilder.setDefaultEncoding(const value: UnicodeString);
+var
+  newEncodingType: TdomEncodingType;
+begin
+  if FDefaultEncoding = value then exit;
+  newEncodingType:= StrToEncoding(value);
+  case newEncodingType of
+    etLatin1,etUTF8,etUTF16BE: begin
+      FDefaultEncodingType:= newEncodingType;
+      FDefaultEncoding:= value;
+      FCurrentEncodingType:= newEncodingType;
+    end;
+  else
+    raise ENot_Supported_Err.create('Encoding not supported error.');
+  end;
+end;
+
+procedure TXmlStreamBuilder.setDestination(const value: TStream);
+begin
+  FDestination:= value;
+end;
+
+procedure TXmlStreamBuilder.setNewLine(const value: TdomNewLineType);
+begin
+  FNewLine:= value;
+end;
+
+function TXmlStreamBuilder.writeWideString(const sender: TXmlCustomReader;
+                                           const locator: TdomLocator;
+                                           const xmlStrg: UnicodeString): boolean;
+const
+  CR_char: Ansichar  = #13;
+  LF_char: Ansichar  = #10;
+  CRLF_str: Ansistring = #13#10;
+var
+  S: Ansistring;
+  C: AnsiChar;
+  WC: WideChar;
+  highSurrogate, lowSurrogate: WideChar;
+  i: integer;
+begin
+  if not assigned(destination)
+    then raise EParserException.create('Destination stream not specified');
+
+  result:= true;
+
+  case FCurrentEncodingType of
+
+    etUTF8:
+      try
+        S:= UTF16BEToUTF8Str(xmlStrg,false);
+        destination.writeBuffer(pointer(S)^, Length(S));
+      except
+        sendErrorNotification(sender,ET_INVALID_CHARACTER,locator,xmlStrg);
+        result:= false;
+        exit;
+      end;
+
+    etUTF16BE: destination.writeBuffer(pointer(XMLStrg)^, Length(XMLStrg) shl 1);
+
+    etLatin1:
+      begin
+        i:= 1;
+        while i <= length(XMLStrg) do begin
+          WC:= XMLStrg[i];
+          case Word(WC) of
+          $000A: // LF
+            case FNewLine of
+              nltCRLF: destination.writeBuffer(pointer(CRLF_str)^,2);
+              ntlCR: destination.writeBuffer(CR_char,1);
+              ntlLF: destination.writeBuffer(LF_char,1);
+            end;
+          $D800..$DBFF: // High surrogate of Unicode character [$10000..$10FFFF]
+            begin
+              if i = length(XMLStrg) then begin // End of UnicodeString --> No low surrogate found
+                sendErrorNotification(sender,ET_INVALID_CHARACTER,locator,xmlStrg);
+                result:= false;
+                exit;
+              end;
+              highSurrogate:= XMLStrg[i];
+              inc(i);
+              lowSurrogate:= XMLStrg[i];
+              if not IsUtf16LowSurrogate(lowSurrogate) then begin // No low surrogate found
+                sendErrorNotification(sender,ET_INVALID_CHARACTER,locator,xmlStrg);
+                result:= false;
+                exit;
+              end;
+
+              S:=UTF8Encode('&#x'+IntToHex(UTF16SurrogateToInt(highSurrogate,lowSurrogate),1)+';');
+              destination.writeBuffer(pointer(S)^, Length(S));
+
+            end;
+          $DC00..$DFFF: // low surrogate
+            begin
+              sendErrorNotification(sender,ET_INVALID_CHARACTER,locator,xmlStrg);
+              result:= false;
+              exit;
+            end;
+          else
+            try
+              C:= UTF16ToIso8859_1Char(WC);
+              destination.writeBuffer(C,1);
+            except
+              on EConvertError do begin
+                S:= {$IFDEF UNICODE}WideStringToAnsiString{$ENDIF}('&#x' + IntToHex(word(WC),1) + ';');
+                destination.writeBuffer(pointer(S)^, Length(S));
+              end;
+            end;
+          end; {case ...}
+          inc(i);
+        end; {while ...}
+      end;
+
+  end; {case ...}
+end;
+
+function TXmlStreamBuilder.writeWideStrings(const sender: TXmlCustomReader;
+                                            const locator: TdomLocator;
+                                            const xmlStrgs: array of UnicodeString): boolean;
+var
+  i: longint;
+begin
+  result:= true;
+  for i:= 0 to High(xmlStrgs) do begin
+    result:= writeWideString(sender,locator,xmlStrgs[i]);
+    if not result then exit;
+  end;
+end;
+
+function TXmlStreamBuilder.CDATA(const sender: TXmlCustomReader;
+                                 const locator: TdomLocator;
+                                       data: UnicodeString): boolean;
+begin
+  if assigned(FOnCDATA) then FOnCDATA(sender,locator,data);
+
+  result:= writeWideStrings(sender,locator,['<![CDATA[', data, ']]>']);
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.CDATA(sender,locator,data);
+end;
+
+function TXmlStreamBuilder.charRef(const sender: TXmlCustomReader;
+                                   const locator: TdomLocator;
+                                         data: UnicodeString): boolean;
+begin
+  if assigned(FOnCharRef) then FOnCharRef(sender,locator,data);
+
+  //result:= writeWideStrings(sender,locator,['<![CDATA[', data, ']]>']); AleF 
+  result:= writeWideStrings(sender,locator,[data]);
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.charRef(sender,locator,data);
+end;
+
+function TXmlStreamBuilder.comment(const sender: TXmlCustomReader;
+                                   const locator: TdomLocator;
+                                         data: UnicodeString): boolean;
+begin
+  if assigned(FOnComment) then FOnComment(sender,locator,data);
+
+  result:= writeWideStrings(sender,locator,['<!--', data, '-->']);
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.comment(sender,locator,data);
+end;
+
+function TXmlStreamBuilder.doctype(const sender: TXmlCustomReader;
+                                   const locator: TdomLocator;
+                                         aname,
+                                         pubId,
+                                         sysId,
+                                         data: UnicodeString): boolean;
+begin
+  if assigned(FOnDoctype) then FOnDoctype(sender,locator,aname,pubId,sysId,data);
+
+  result:= writeWideStrings(sender,locator, ['<!DOCTYPE ', aname,' ']);
+  if result and ((pubId <> '') or (sysId <> '')) then
+    result:= writeWideString(sender,locator, xmlAnalysePubSysId(pubId,sysId,''));
+  if result and (Length(data) = 0)
+    then result:= writeWideString(sender,locator,'>')
+    else result:= writeWideStrings(sender,locator, ['[',data,']>']);
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.doctype(sender,locator,aname,pubId,sysId,data);
+end;
+
+function TXmlStreamBuilder.endDocument(const sender: TXmlCustomReader;
+                                       const locator: TdomLocator): boolean;
+begin
+  if assigned(FOnEndDocument) then FOnEndDocument(sender,locator);
+
+  FCurrentEncodingType:= defaultEncodingType;
+
+  if assigned(nextHandler)
+    then result:= nextHandler.endDocument(sender,locator)
+    else result:= true;
+end;
+
+function TXmlStreamBuilder.endElement(const sender: TXmlCustomReader;
+                                      const locator: TdomLocator;
+                                            namespaceURI,
+                                            tagName: UnicodeString): boolean;
+begin
+  if assigned(FOnEndElement) then FOnEndElement(sender,locator,namespaceURI,tagName);
+
+  result:= writeWideStrings(sender,locator,['</', tagName, '>']);
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.endElement(sender,locator,namespaceURI,tagName);
+end;
+
+function TXmlStreamBuilder.endPrefixMapping(const sender: TXmlCustomReader;
+                                            const locator: TdomLocator;
+                                                  prefix: UnicodeString): boolean;
+begin
+  if assigned(FOnEndPrefixMapping) then FOnEndPrefixMapping(sender,locator,prefix);
+  if assigned(nextHandler)
+    then result:= nextHandler.endPrefixMapping(sender,locator,prefix)
+    else result:= true;
+end;
+
+function TXmlStreamBuilder.entityRef(const sender: TXmlCustomReader;
+                                     const locator: TdomLocator;
+                                           aname: UnicodeString): boolean;
+begin
+  if assigned(FOnEntityRef) then FOnEntityRef(sender,locator,aname);
+
+  result:= writeWideStrings(sender,locator,['&', aname, ';']);
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.entityRef(sender,locator,aname);
+end;
+
+function TXmlStreamBuilder.PCDATA(const sender: TXmlCustomReader;
+                                  const locator: TdomLocator;
+                                        data: UnicodeString): boolean;
+var
+  i: integer;
+  content: TdomCustomStr;
+  modifiedData: UnicodeString;
+begin
+  if assigned(FOnPCDATA) then FOnPCDATA(sender,locator,data);
+
+  content:= TdomCustomStr.create;
+  try
+    for i:= 1 to length(data) do begin
+      case ord(data[i]) of
+{        38: content.addWideString('&#38');//amp;'); // Ampersand ('&')
+        60: content.addWideString('&#60');//lt;');  // Less than ('<')
+        62: content.addWideString('&#62');//gt;');  // Greater than ('>')
+        13: content.addWideString('&#xD;'); // Carriage Return (CR)}
+{        38: content.addWideString('&#38;'); // Ampersand ('&')
+        60: content.addWideString('&#60;'); // Less than ('<')
+        62: content.addWideString('&#62;'); // Greater than ('>')
+        13: content.addWideString('&#xD;'); // Carriage Return (CR)}
+        38: content.addWideString('&amp;'); // Ampersand ('&')
+        60: content.addWideString('&lt;'); // Less than ('<')
+        62: content.addWideString('&gt;'); // Greater than ('>')
+        13: content.addWideString('&#xD;'); // Carriage Return (CR)
+      else
+        content.addWideChar(data[i]);
+      end;
+    end;
+    modifiedData:= content.value;
+  finally
+    content.free;
+  end;
+
+  result:= writeWideString(sender,locator,modifiedData);
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.PCDATA(sender,locator,data);
+end;
+
+function TXmlStreamBuilder.processingInstruction(const sender: TXmlCustomReader;
+                                                 const locator: TdomLocator;
+                                                       targ,
+                                                       data : UnicodeString): boolean;
+begin
+  if assigned(FOnProcessingInstruction) then FOnProcessingInstruction(sender,locator,targ,data);
+
+  if data = ''
+    then result:= writeWideStrings(sender,locator,['<?', targ, '?>'])
+    else result:= writeWideStrings(sender,locator,['<?', targ, ' ', data, '?>']);
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.processingInstruction(sender,locator,targ,data);
+end;
+
+function TXmlStreamBuilder.skippedEntity(const sender: TXmlCustomReader;
+                                         const locator: TdomLocator;
+                                               aname: UnicodeString): boolean;
+begin
+  if assigned(FOnSkippedEntity) then FOnSkippedEntity(sender,locator,aname);
+  if assigned(nextHandler)
+    then result:= nextHandler.skippedEntity(sender,locator,aname)
+    else result:= true;
+end;
+
+function TXmlStreamBuilder.startDocument(const sender: TXmlCustomReader;
+                                         const locator: TdomLocator;
+                                               version,
+                                               encName: UnicodeString;
+                                               sdDl: TdomStandalone): boolean;
+const
+  BOM: UnicodeString = #$feff; // UTF-16BE Byte order mark
+var
+  newEncodingType: TdomEncodingType;
+begin
+  if assigned(FOnStartDocument) then FOnStartDocument(sender,locator,version,encName,sdDl);
+
+  result:= true;
+  if defaultEncoding = '' then begin
+    newEncodingType:= StrToEncoding(encName);
+  end else begin
+    encName:= defaultEncoding;
+    newEncodingType:= defaultEncodingType;
+  end;
+  
+  case newEncodingType of
+    etLatin1,etUTF8,etUTF16BE: begin
+      FCurrentEncodingType:= newEncodingType;
+
+      if CurrentEncodingType = etUTF16BE
+        then result:= writeWideString(sender,locator,BOM);
+
+      if result and (version = '')
+        then result:= writeWideString(sender,locator,'<?xml version="1.0"')
+        else result:= writeWideStrings(sender,locator,['<?xml version="',version,'"']);
+      if result and (encName <> '')
+        then result:= writeWideStrings(sender,locator,[' encoding="',encName,'"']);
+      if result then
+        case sdDl of
+          STANDALONE_YES: result:= writeWideStrings(sender,locator,[' standalone="yes"']);
+          STANDALONE_NO: result:= writeWideStrings(sender,locator,[' standalone="no"']);
+        end;
+      if result
+        then writeWideStrings(sender,locator,['?','>',#10]);
+
+    end;
+  else
+    sendErrorNotification(sender,ET_ENCODING_NOT_SUPPORTED,locator,encName);
+    result:= false;
+  end;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.startDocument(sender,locator,version,encName,sdDl);
+end;
+
+function TXmlStreamBuilder.startElement(const sender: TXmlCustomReader;
+                                        const locator: TdomLocator;
+                                              namespaceURI,
+                                              tagName: UnicodeString;
+                                              attributes: TdomNameValueList): boolean;
+var
+  i: integer;
+begin
+  if assigned(FOnStartElement) then FOnStartElement(sender,locator,namespaceURI,tagName,attributes);
+
+  result:= writeWideStrings(sender,locator,['<', tagName]);
+
+  for i:= 0 to pred(attributes.length) do begin
+    if not result then break;
+    result:= writeWideStrings(sender,locator,[' ',attributes.names[i],'="',attributes.values[i],'"']);
+  end;
+
+  if result
+    then result:= writeWideString(sender,locator,'>');
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.startElement(sender,locator,namespaceURI,tagName,attributes);
+end;
+
+function TXmlStreamBuilder.startPrefixMapping(const sender: TXmlCustomReader;
+                                              const locator: TdomLocator;
+                                                    prefix,
+                                                    uri: UnicodeString): boolean;
+begin
+  if assigned(FOnStartPrefixMapping) then FOnStartPrefixMapping(sender,locator,prefix,uri);
+  if assigned(nextHandler)
+    then result:= nextHandler.startPrefixMapping(sender,locator,prefix,uri)
+    else result:= true;
+end;
+
+function TXmlStreamBuilder.attributeDefinition(const sender: TXmlCustomReader;
+                                               const locator: TdomLocator;
+                                                     aname,
+                                                     attType,
+                                                     bracket,
+                                                     defaultDecl,
+                                                     attValue: UnicodeString): boolean;
+const
+  SQ: WideChar = #39; // code of '
+  DQ: WideChar = #34; // code of "
+begin
+  if assigned(FOnAttributeDefinition) then FOnAttributeDefinition(sender,locator,aname,attType,bracket,defaultDecl,attValue);
+
+  result:= writeWideStrings(sender, locator, ['          ', aname, #9]);
+  if result and (Length(attType) > 0)
+    then result:= writeWideStrings(sender, locator, [attType, #9]);
+  if result and (Length(bracket) > 0)
+    then result:= writeWideString(sender, locator, bracket);
+  if result and (Length(defaultDecl) > 0)
+    then result:= writeWideStrings(sender, locator, [#9, defaultDecl]);
+  if result and ((Length(defaultDecl) = 0) or (defaultDecl = UnicodeString('#FIXED'))) then begin
+    if Pos(DQ, attValue) > 0
+      then result:= writeWideStrings(sender, locator, [#9, SQ, attValue, SQ, #10])
+      else result:= writeWideStrings(sender, locator, [#9, DQ, attValue, DQ, #10]);
+  end;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.attributeDefinition(sender,locator,aname,attType,bracket,defaultDecl,attValue);
+end;
+
+function TXmlStreamBuilder.conditionalSection(const sender: TXmlCustomReader;
+                                              const locator: TdomLocator;
+                                                    includeStmt,
+                                                    data: UnicodeString): boolean;
+begin
+  if assigned(FOnConditionalSection) then FOnConditionalSection(sender,locator,includeStmt,data);
+
+  result:= writeWideStrings(sender,locator,['<![',includeStmt,'[',data,']]>']);
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.conditionalSection(sender,locator,includeStmt,data);
+end;
+
+function TXmlStreamBuilder.DTDcomment(const sender: TXmlCustomReader;
+                                      const locator: TdomLocator;
+                                            data: UnicodeString): boolean;
+begin
+  if assigned(FOnDtdComment) then FOnDtdComment(sender,locator,data);
+
+  result:= writeWideStrings(sender,locator,[#10'<!--', data, '-->']);
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.DTDcomment(sender,locator,data);
+end;
+
+function TXmlStreamBuilder.DTDprocessingInstruction(const sender: TXmlCustomReader;
+                                                    const locator: TdomLocator;
+                                                          targ,
+                                                          data : UnicodeString): boolean;
+begin
+  if assigned(FOnDtdProcessingInstruction) then FOnDtdProcessingInstruction(sender,locator,targ,data);
+
+  if data = ''
+    then result:= writeWideStrings(sender,locator,[#10'<?', targ, '?>'])
+    else result:= writeWideStrings(sender,locator,[#10'<?', targ, ' ', data, '?>']);
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.DTDprocessingInstruction(sender,locator,targ,data);
+end;
+
+function TXmlStreamBuilder.elementTypeDeclaration(const sender: TXmlCustomReader;
+                                                  const locator: TdomLocator;
+                                                        aname,
+                                                        data: UnicodeString): boolean;
+begin
+  if assigned(FOnElementTypeDeclaration) then FOnElementTypeDeclaration(sender,locator,aname,data);
+
+  result:= writeWideStrings(sender, locator, [#10'<!ELEMENT ', aname, #9, data, '>']);
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.elementTypeDeclaration(sender,locator,aname,data);
+end;
+
+function TXmlStreamBuilder.endAttListDeclaration(const sender: TXmlCustomReader;
+                                                 const locator: TdomLocator): boolean;
+begin
+  if assigned(FOnEndAttListDeclaration) then FOnEndAttListDeclaration(sender,locator);
+
+  result:= writeWideString(sender,locator,'>');
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.endAttListDeclaration(sender,locator);
+end;
+
+function TXmlStreamBuilder.endExtDtd(const sender: TXmlCustomReader;
+                                     const locator: TdomLocator): boolean;
+begin
+  if assigned(FOnEndExtDtd) then FOnEndExtDtd(sender,locator);
+
+  FCurrentEncodingType:= etUnknown;
+
+  if assigned(nextHandler)
+    then result:= nextHandler.endExtDtd(sender,locator)
+    else result:= true;
+end;
+
+function TXmlStreamBuilder.endIntDtd(const sender: TXmlCustomReader;
+                                     const locator: TdomLocator): boolean;
+begin
+  if assigned(FOnendIntDtd) then FOnendIntDtd(sender,locator);
+
+  FCurrentEncodingType:= etUnknown;
+
+  if assigned(nextHandler)
+    then result:= nextHandler.endIntDtd(sender,locator)
+    else result:= true;
+end;
+
+function TXmlStreamBuilder.entityDeclaration(const sender: TXmlCustomReader;
+                                             const locator: TdomLocator;
+                                                   aname,
+                                                   entityValue,
+                                                   pubId,
+                                                   sysId,
+                                                   notaName: UnicodeString): boolean;
+const
+  SQ: WideChar = #39; // code of '
+  DQ: WideChar = #34; // code of "
+begin
+  if assigned(FOnEntityDeclaration) then FOnEntityDeclaration(sender,locator,aname,entityValue,pubId,sysId,notaName);
+
+  result:= writeWideStrings(sender, locator, [#10'<!ENTITY ', aname, #9]);
+  if result then begin
+    if ((pubId = '') and (sysId = '')) then begin
+      if Pos(DQ, entityValue) > 0
+        then result:= writeWideStrings(sender, locator, [SQ, entityValue, SQ])
+        else result:= writeWideStrings(sender, locator, [DQ, entityValue, DQ]);
+    end else begin
+      if pubId = '' then begin
+        if Pos(DQ, sysId) > 0
+          then result:= writeWideStrings(sender, locator, ['SYSTEM ', SQ, sysId, SQ])
+          else result:= writeWideStrings(sender, locator, ['SYSTEM ', DQ, sysId, DQ]);
+      end else begin
+        if sysId = '' then begin
+          result:= writeWideStrings(sender, locator, [' PUBLIC "',pubId,'"']);
+        end else begin
+          if Pos(DQ, sysId) > 0
+            then result:= writeWideStrings(sender, locator, ['PUBLIC "', pubId, '" ', SQ, sysId, SQ])
+            else result:= writeWideStrings(sender, locator, ['PUBLIC "', pubId, '" "', sysId, '"']);
+        end;
+      end; {if ...}
+      if result and (notaName <> '')
+       then result:= writeWideStrings(sender, locator, [' NDATA ',notaName]);
+    end;
+  end;
+  if result
+    then result:= writeWideString(sender, locator, '>');
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.entityDeclaration(sender,locator,aname,entityValue,pubId,sysId,notaName);
+end;
+
+function TXmlStreamBuilder.notationDeclaration(const sender: TXmlCustomReader;
+                                               const locator: TdomLocator;
+                                                     aname,
+                                                     pubId,
+                                                     sysId: UnicodeString): boolean;
+const
+  SQ: WideChar = #39; // code of '
+  DQ: WideChar = #34; // code of "
+begin
+  if assigned(FOnNotationDeclaration) then FOnNotationDeclaration(sender,locator,aname,pubId,sysId);
+
+  result:= writeWideStrings(sender, locator, [#10'<!NOTATION ', aname, #9]);
+  if result then begin
+    if pubId = '' then begin
+      if Pos(DQ, sysId) > 0
+        then result:= writeWideStrings(sender, locator, ['SYSTEM ', SQ, sysId, SQ])
+        else result:= writeWideStrings(sender, locator, ['SYSTEM ', DQ, sysId, DQ]);
+    end else begin
+      if sysId = '' then begin
+        result:= writeWideStrings(sender, locator, [' PUBLIC "',pubId,'"']);
+      end else begin
+        if Pos(DQ, sysId) > 0
+          then result:= writeWideStrings(sender, locator, ['PUBLIC "', pubId, '" ', SQ, sysId, SQ])
+          else result:= writeWideStrings(sender, locator, ['PUBLIC "', pubId, '" "', sysId, '"']);
+      end;
+    end; {if ...}
+  end;
+  if result
+    then result:= writeWideString(sender, locator, '>');
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.notationDeclaration(sender,locator,aname,pubId,sysId);
+end;
+
+function TXmlStreamBuilder.parameterEntityDeclaration(const sender: TXmlCustomReader;
+                                                      const locator: TdomLocator;
+                                                            aname,
+                                                            entityValue,
+                                                            pubId,
+                                                            sysId: UnicodeString): boolean;
+const
+  SQ: WideChar = #39; // code of '
+  DQ: WideChar = #34; // code of "
+begin
+  if assigned(FOnParameterEntityDeclaration) then FOnParameterEntityDeclaration(sender,locator,aname,entityValue,pubId,sysId);
+
+  result:= writeWideStrings(sender, locator, [#10'<!ENTITY % ', aname, #9]);
+  if result then begin
+    if ((pubId = '') and (sysId = '')) then begin
+      if Pos(DQ, entityValue) > 0
+        then result:= writeWideStrings(sender, locator, [SQ, entityValue, SQ])
+        else result:= writeWideStrings(sender, locator, [DQ, entityValue, DQ]);
+    end else begin
+      if pubId = '' then begin
+        if Pos(DQ, sysId) > 0
+          then result:= writeWideStrings(sender, locator, ['SYSTEM ', SQ, sysId, SQ])
+          else result:= writeWideStrings(sender, locator, ['SYSTEM ', DQ, sysId, DQ]);
+      end else begin
+        if sysId = '' then begin
+          result:= writeWideStrings(sender, locator, [' PUBLIC "',pubId,'"']);
+        end else begin
+          if Pos(DQ, sysId) > 0
+            then result:= writeWideStrings(sender, locator, ['PUBLIC "', pubId, '" ', SQ, sysId, SQ])
+            else result:= writeWideStrings(sender, locator, ['PUBLIC "', pubId, '" "', sysId, '"']);
+        end;
+      end; {if ...}
+    end;
+  end;
+  if result
+    then result:= writeWideString(sender, locator, '>');
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.parameterEntityDeclaration(sender,locator,aname,entityValue,pubId,sysId);
+end;
+
+function TXmlStreamBuilder.parameterEntityRef(const sender: TXmlCustomReader;
+                                              const locator: TdomLocator;
+                                                    aname: UnicodeString): boolean;
+begin
+  if assigned(FOnParameterEntityRef) then FOnParameterEntityRef(sender,locator,aname);
+
+  result:= writeWideStrings(sender, locator, [#10'%',aname,';']);
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.parameterEntityRef(sender,locator,aname);
+end;
+
+function TXmlStreamBuilder.startAttListDeclaration(const sender: TXmlCustomReader;
+                                                   const locator: TdomLocator;
+                                                         aname: UnicodeString): boolean;
+begin
+  if assigned(FOnStartAttListDeclaration) then FOnStartAttListDeclaration(sender,locator,aname);
+
+  result:= writeWideStrings(sender,locator,[#10'<!ATTLIST ', aname, #10]);
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.startAttListDeclaration(sender,locator,aname);
+end;
+
+function TXmlStreamBuilder.startExtDtd(const sender: TXmlCustomReader;
+                                       const locator: TdomLocator;
+                                             version,
+                                             encName: UnicodeString): boolean;
+const
+  BOM: UnicodeString = #$feff; // UTF-16BE Byte order mark
+var
+  newEncodingType: TdomEncodingType;
+begin
+  if assigned(FOnstartExtDtd) then FOnstartExtDtd(sender,locator,version,encName);
+
+  result:= true;
+  if defaultEncoding = '' then begin
+    newEncodingType:= StrToEncoding(encName);
+  end else begin
+    encName:= defaultEncoding;
+    newEncodingType:= defaultEncodingType;
+  end;
+
+  case newEncodingType of
+    etLatin1,etUTF8,etUTF16BE: begin
+      FCurrentEncodingType:= newEncodingType;
+
+      if CurrentEncodingType = etUTF16BE
+        then result:= writeWideString(sender,locator,BOM);
+
+      if result and (version = '')
+        then result:= writeWideString(sender,locator,'<?xml version="1.0"')
+        else result:= writeWideStrings(sender,locator,['<?xml version="',version,'"']);
+      if result and (encName <> '')
+        then result:= writeWideStrings(sender,locator,[' encoding="',encName,'"']);
+      if result
+        then writeWideString(sender,locator,'?>');
+
+    end;
+  else
+    sendErrorNotification(sender,ET_ENCODING_NOT_SUPPORTED,locator,encName);
+    result:= false;
+  end;
+
+  if result
+    then if assigned(nextHandler)
+      then result:= nextHandler.startExtDtd(sender,locator,version,encName);
+end;
+
+function TXmlStreamBuilder.startIntDtd(const sender: TXmlCustomReader;
+                                       const locator: TdomLocator): boolean;
+begin
+  if assigned(FOnstartIntDtd) then FOnstartIntDtd(sender,locator);
+
+  FCurrentEncodingType:= defaultEncodingType;
+
+  if assigned(nextHandler)
+    then result:= nextHandler.startIntDtd(sender,locator)
+    else result:= true;
+end;
+
+function TXmlStreamBuilder.resolvePE(    PEReferenceName: UnicodeString;
+                                     var PEValue: UnicodeString;
+                                     var error: TXmlErrorType): boolean;
+begin
+  if assigned(nextHandler)
+    then result:= nextHandler.resolvePE(PEReferenceName,PEValue,error)
+    else begin
+      PEValue:= '';
+      error:= ET_UNRESOLVABLE_PARAMETER_ENTITY_REFERENCE;
+      result:= true;
+    end;
+end;
+
+procedure TXmlStreamBuilder.notifyReset;
+begin
+  FCurrentEncodingType:= etUnknown;
+  if assigned(nextHandler) then nextHandler.notifyReset;
+end;
+
+
+
+// ++++++++++++++++++++++ TXmlStandardDocReader ++++++++++++++++++++++++
+constructor TXmlStandardDocReader.create(AOwner: TComponent);
+begin
+  inherited create(AOwner);
+  suppressXmlns:= false;
+  prefixMapping:= true;
+  FPrefixMappingStack:= TList.Create;
+end;
+
+destructor TXmlStandardDocReader.destroy;
+begin
+  clearPrefixMappingStack;
+  FPrefixMappingStack.free;
+  inherited destroy;
+end;
+
+function TXmlStandardDocReader.analyzeElement(const locator: TdomLocator;
+                                              const source: UnicodeString;
+                                                out tagName: UnicodeString;
+                                              const attributes: TdomNameValueList): boolean;
+// 'Source': The element, to be analyzed.
+// 'tagName': Returns the namen of the element.
+// 'attributes': Returns a list of attributes, if existing.
+const
+  NULL:  WideChar = #0; // end of UnicodeString mark
+//  TAB:   WideChar = #9;
+//  LF:    WideChar = #10;
+//  CR:    WideChar = #13;
+//  SPACE: WideChar = #32;
+  SQ:    WideChar = #39;  // code of '
+  DQ:    WideChar = #34;  // code of "
+  EQ:    WideChar = #61;  // code of =
+var
+  head,tail: PWideChar;
+  attrName,attrValue: UnicodeString;
+  quotationMark: WideChar;
+begin
+  result:= true;
+  attributes.clear;
+  head:= PWideChar(source);
+  tail:= head;
+  while not IsXmlWhiteSpace(tail^) and (tail^ <> NULL) do
+    inc(tail);
+  setString(tagName,head,tail-head);
+
+  head:= tail;
+  while head^ <> NULL do begin
+    while IsXmlWhiteSpace(head^) and (head^ <> NULL) do
+      inc(head);
+    if head^ <> NULL then begin
+      tail:= head;
+      while not IsXmlWhiteSpace(tail^) and (tail^ <> NULL) and (tail^ <> EQ) do
+      //while not IsXmlWhiteSpace(tail^) and not (tail^ in [NULL,EQ]) do
+        inc(tail);
+      setString(attrName,head,tail-head);
+
+      head:= tail;
+      while IsXmlWhiteSpace(head^) and (head^ <> NULL) do
+        inc(head);
+      if head^ <> EQ then begin
+        result:= sendErrorNotification(ET_MISSING_EQUALITY_SIGN,locator,'');
+        exit;
+      end;
+      inc(head);
+      while IsXmlWhiteSpace(head^) and (head^ <> NULL) do
+        inc(head);
+      if (head^ <> SQ) and (head^ <> DQ) then begin
+      // if not (head^ in [SQ,DQ]) then begin
+        result:= sendErrorNotification(ET_MISSING_QUOTATION_MARK,locator,'');
+        exit;
+      end;
+      quotationMark:= WideChar(head^);
+      inc(head);
+      tail:= head;
+
+      while (tail^ <> NULL) and (tail^ <> quotationMark) do
+      // while not (tail^ in [NULL,quotationMark]) do
+        inc(tail);
+      if tail^ = NULL then begin
+        result:= sendErrorNotification(ET_MISSING_QUOTATION_MARK,locator,'');
+        exit;
+      end;
+      setString(attrValue,head,tail-head);
+
+      if attributes.indexOfName(attrName) > -1 then begin
+        result:= sendErrorNotification(ET_DOUBLE_ATTRIBUTE_NAME,locator,'');
+        exit;
+      end;
+      attributes.add(attrName,attrValue);
+
+      head:= tail;
+      inc(head);
+      if not IsXmlWhiteSpace(head^) and (head^ <> NULL) then begin
+        result:= sendErrorNotification(ET_MISSING_WHITE_SPACE,locator,'');
+        exit;
+      end;
+    end; {if ...}
+  end; {while ...}
+end;
+
+procedure TXmlStandardDocReader.clearPrefixMappingStack;
+begin
+  with FPrefixMappingStack do begin
+    while count > 0 do begin
+      TdomNameValueList(last).free;
+      delete(pred(count));
+    end;
+  end;
+end;
+
+function TXmlStandardDocReader.writeProcessingInstruction(const locator: TdomLocator;
+                                                          const content: UnicodeString): boolean;
+var
+  TargetName,AttribSequence: UnicodeString;
+begin
+  XMLAnalyseTag(content,TargetName,AttribSequence);
+  if assigned(NextHandler)
+    then result:= NextHandler.ProcessingInstruction(self,locator,TargetName,AttribSequence)
+    else result:= true;
+end;
+
+function TXmlStandardDocReader.writeComment(const locator: TdomLocator;
+                                            const content: UnicodeString): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.comment(self,locator,content)
+    else result:= true;
+end;
+
+function TXmlStandardDocReader.writeCDATA(const locator: TdomLocator;
+                                          const content: UnicodeString): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.cdata(self,locator,content)
+    else result:= true;
+end;
+
+function TXmlStandardDocReader.writeCharRef(const locator: TdomLocator;
+                                            const content: UnicodeString): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.charRef(self,locator,content)
+    else result:= true;
+end;
+
+function TXmlStandardDocReader.writePCDATA(const locator: TdomLocator;
+                                           const content: UnicodeString): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.pcdata(self,locator,content)
+    else result:= true;
+end;
+
+function TXmlStandardDocReader.writeStartDocument(const locator: TdomLocator;
+                                                        version,
+                                                        encName: UnicodeString;
+                                                        sdDl: TdomStandalone): boolean;
+begin
+  clearPrefixMappingStack;
+  if assigned(NextHandler)
+    then result:= NextHandler.startDocument(self,locator,version,encName,sdDl)
+    else result:= true;
+end;
+
+function TXmlStandardDocReader.writeStartElement(const locator: TdomLocator;
+                                                 const content: UnicodeString;
+                                                   out tagName: UnicodeString): boolean;
+var
+  attrList: TdomNameValueList;
+  attributeList: TdomNameValueList;
+  pfxUriList: TdomNameValueList;
+  i: integer;
+  suppressThisAttr: boolean;
+begin
+  attrList:= TdomNameValueList.create;
+  try
+    result:= analyzeElement(locator,content,tagName,attrList);
+    if result then begin
+      if assigned(NextHandler) then begin
+
+        attributeList:= TdomNameValueList.create;
+        try
+          pfxUriList:= TdomNameValueList.create;
+          FPrefixMappingStack.Add(pfxUriList);
+
+          with attrList do begin
+            for i:= 0 to pred(length) do begin
+              suppressThisAttr:= false;
+              if FPrefixMapping or FSuppressXmlns then begin
+                if IsXmlDefaultAttName(names[i]) then begin
+                  suppressThisAttr:= FSuppressXmlns;
+                  pfxUriList.add('',values[i]);
+                end else if IsXmlPrefixedAttName(names[i]) then begin
+                  suppressThisAttr:= FSuppressXmlns;
+                  pfxUriList.add(xmlExtractLocalName(names[i]),values[i]);
+                end;
+              end;
+              if not suppressThisAttr then attributeList.add(names[i],values[i]);
+            end; {for ...}
+          end; {with ...}
+
+          if FPrefixMapping then
+            with pfxUriList do
+              for i:= 0 to pred(length) do begin
+                result:= writeStartPrefixMapping(locator,names[i],values[i]);
+                if not result then break;
+              end;
+
+          result:= NextHandler.startElement(self,locator,'',tagName,attributeList)
+
+        finally
+          attributeList.free;
+        end;
+
+      end else result:= true;
+    end;
+  finally
+    attrList.free;
+  end;
+end;
+
+function TXmlStandardDocReader.writeStartPrefixMapping(const locator: TdomLocator;
+                                                             prefix,
+                                                             uri: UnicodeString): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.startPrefixMapping(self,locator,prefix,uri)
+    else result:= true;
+end;
+
+function TXmlStandardDocReader.writeEndDocument(const locator: TdomLocator): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.endDocument(self,locator)
+    else result:= true;
+end;
+
+function TXmlStandardDocReader.writeEndElement(const locator: TdomLocator;
+                                               const content: UnicodeString): boolean;
+var
+  pfxUriList: TdomNameValueList;
+  i: integer;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.endElement(self,locator,'',content)
+    else result:= true;
+
+  with FPrefixMappingStack do begin
+    if count > 0 then begin
+      pfxUriList:= last;
+      delete(pred(count));
+      try
+        if FPrefixMapping then
+          with pfxUriList do
+            for i:= pred(length) downto 0 do begin
+              if not result then break;
+              result:= writeEndPrefixMapping(locator,names[i]);
+            end;
+      finally
+        pfxUriList.free;
+      end;
+    end;
+  end;
+end;
+
+function TXmlStandardDocReader.writeEndPrefixMapping(const locator: TdomLocator;
+                                                           prefix: UnicodeString): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.endPrefixMapping(self,locator,prefix)
+    else result:= true;
+end;
+
+function TXmlStandardDocReader.writeEmptyElement(const locator: TdomLocator;
+                                                 const content: UnicodeString): boolean;
+var
+  tagName: UnicodeString;
+begin
+  result:= writeStartElement(locator,content,tagName);
+  if result
+    then result:= writeEndElement(locator,tagName);
+end;
+
+function TXmlStandardDocReader.writeEntityRef(const locator: TdomLocator;
+                                              const content: UnicodeString): boolean;
+var
+  EntityName: UnicodeString;
+begin
+  EntityName:= copy(content,2,length(content)-2);
+
+  if (EntityName='lt') then begin
+    Result:= writeCharRef(locator, '&#60;');
+    Exit;
+  end else if (EntityName='gt') then begin
+    Result:= writeCharRef(locator, '&#62;');
+    Exit;
+  end else if (EntityName='amp') then begin
+    Result:= writeCharRef(locator, '&#38;');
+    Exit;
+  end else if (EntityName='apos') then begin
+    Result:= writeCharRef(locator, '&#39;');
+    Exit;
+  end else if (EntityName='quot') then begin
+    Result:= writeCharRef(locator, '&#34;');
+    Exit;
+  end;
+
+  if assigned(NextHandler)
+    then result:= NextHandler.EntityRef(self,locator,EntityName)
+    else result:= true;
+end;
+
+function TXmlStandardDocReader.writeDoctype(const locator: TdomLocator;
+                                            const content: UnicodeString): boolean;
+var
+  DeclAnfg: integer;
+  ExternalId,intro,name,SystemLiteral,PubidLiteral: UnicodeString;
+  NakedContent,data,dummy1,dummy2: UnicodeString;
+  Error: boolean;
+begin
+  result:= true;
+  if (copy(content,1,9) <> '<!DOCTYPE')
+    or (content[length(content)] <> '>')
+    or (not IsXmlWhiteSpace(content[10])) then begin
+    result:= sendErrorNotification(ET_INVALID_DOCTYPE,locator,'');
+  end else begin
+    NakedContent:= XmlTrunc(copy(content,11,length(content)-11));
+    DeclAnfg:= Pos(UnicodeString('['),NakedContent);
+    if DeclAnfg = 0 then begin
+      intro:= NakedContent;
+      Data:= '';
+    end else begin
+      intro:= copy(NakedContent,1,DeclAnfg-1);
+      dummy1:= copy(NakedContent,DeclAnfg,length(NakedContent)-DeclAnfg+1);
+      XMLTruncAngularBrackets(dummy1,data,error); {Diese umständliche Zuweisung ist wegen Delphi-Problem von WideStrings bei copy nötig}
+      if error then begin
+        result:= sendErrorNotification(ET_INVALID_DOCTYPE,locator,'');
+      end; {if ...}
+    end; {if ...}
+
+    if result then begin
+      XMLAnalyseTag(intro,name,ExternalId);
+      if not IsXmlName(name) then begin
+        result:= sendErrorNotification(ET_INVALID_DOCTYPE,locator,'');
+      end else begin
+
+        dummy1:= XmlTrunc(ExternalId);
+        ExternalId:= dummy1; {Diese umständliche Zuweisung ist wegen der Verwendung von WideStrings nötig}
+        if ExternalId <> '' then begin
+          XMLAnalyseEntityDef(ExternalId,dummy1,SystemLiteral,PubidLiteral,dummy2,Error);
+          if Error or (dummy1 <> '') or (dummy2 <> '') then begin
+            result:= sendErrorNotification(ET_INVALID_DOCTYPE,locator,'');
+          end; {if ...}
+        end;
+
+        if result
+          then if assigned(NextHandler)
+            then result:= NextHandler.doctype(self,locator,name,PubidLiteral,SystemLiteral,Data);
+
+      end; {if ... else ...}
+    end; {if ...}
+  end; {if ... else ...}
+end;
+
+function TXmlStandardDocReader.parse(const inputSource: TXmlInputSource): boolean;
+const
+//  CR: WideChar  = #13;
+//  LF: WideChar  = #10;
+  QM: WideChar  = '?';
+//  ampCode: word = 38; // code of &
+//  gtCode: word = 60; // code of <
+  SingleQuote: WideChar = #39; // code of '
+  DoubleQuote: WideChar = #34; // code of "
+  NUMBERSIGN: WideChar = #35;  // code of #
+  SOLIDUS: WideChar = #47;     // code of /
+  PISTART: UnicodeString = '<?';
+  PIEND: UnicodeString = '?>';
+  COMMENTSTART: UnicodeString = '<!--';
+  CDATASTART: UnicodeString = '<![CDATA[';
+  DOCTYPESTART: UnicodeString = '<!DOCTYPE';
+var
+  l,offset: integer;
+  str1: WideChar;
+  dummy,invalidStr,subEndMarker,SubStartMarker: UnicodeString;
+  SingleQuoteOpen,DoubleQuoteOpen,BracketOpened: boolean;
+  pieceType: TdomPieceType;
+  content: TdomCustomStr;
+begin
+  PieceType:= xmlUnknown;
+  subEndMarker:= '';
+  subStartMarker:= '';
+  SingleQuoteOpen:= false;
+  DoubleQuoteOpen:= false;
+  BracketOpened:= false;
+  result:= true;
+  content:= TdomCustomStr.create;
+  try
+
+    with inputSource do
+      writeStartDocument(locator,versionNumber,encodingName,standalone);
+    while InputSource.getNextWideChar(str1) do begin
+      if not result then break;
+      if not IsXmlChar(str1) then begin
+        content.addWideChar(str1);
+        inputsource.locator.setStartMark;
+        if str1 = #0
+          then invalidStr:= ''
+          else invalidStr:= UnicodeString(str1);
+        result:= sendErrorNotification(ET_INVALID_CHARACTER,inputSource.locator,invalidStr);
+      end;
+
+      case PieceType of
+
+        xmlPCData: begin
+          if str1 = '<' then begin
+            result:= writePCDATA(inputSource.Locator,content.value);
+            content.reset;
+            PieceType:= xmlStartTag;
+            inputsource.locator.setStartMark;
+          end else
+          if str1 = '&' then begin
+            result:= writePCDATA(inputSource.Locator,content.value);
+            content.reset;
+            PieceType:= xmlEntityRef;
+            inputsource.locator.setStartMark;
+          end;
+          content.AddWideChar(Str1);
+        end;
+
+        xmlEntityRef: begin
+          content.AddWideChar(str1);
+          if str1 = ';' then begin
+            if content[2] = NUMBERSIGN
+              then result:= writeCharRef(inputSource.Locator,content.value)
+              else result:= writeEntityRef(inputSource.Locator,content.value);
+            content.reset;
+            PieceType:= xmlUnknown;
+          end;
+        end;
+
+        xmlStartTag: begin
+          content.AddWideChar(str1);
+          case content.length of
+            2: if content.startsWith(PISTART) then PieceType:= xmlProcessingInstruction;
+            4: if content.startsWith(COMMENTSTART) then PieceType:= xmlComment;
+            9: if content.startsWith(CDATASTART) then begin
+                 PieceType:= xmlCDATA;
+               end else
+               if content.startsWith(DOCTYPESTART) then begin
+                 PieceType:= xmlDoctype;
+                 subEndMarker:= '';
+                 subStartMarker:= '';
+                 BracketOpened:= false;
+               end;
+          end;
+
+          // Count quotation marks:
+          if (str1 = SingleQuote) and (not DoubleQuoteOpen) then begin
+            SingleQuoteOpen:= not SingleQuoteOpen;
+          end else if (str1 = DoubleQuote) and (not SingleQuoteOpen) then begin
+            DoubleQuoteOpen:= not DoubleQuoteOpen;
+          end else if str1 = '>' then begin
+            if (not DoubleQuoteOpen) and (not SingleQuoteOpen) then begin
+              if content[2] = SOLIDUS then begin
+                l:= content.length;
+                offset:= 3;
+                // eliminate white-space after tag name:
+                while (l-offset > 0) and IsXmlWhiteSpace(content[l-offset+2]) do
+                  inc(offset);
+                result:= writeEndElement(inputSource.Locator,copy(content.value,3,l-offset))
+              end else begin if content[content.length-1] = SOLIDUS
+                then result:= writeEmptyElement(inputSource.Locator,copy(content.value,2,content.length-3))
+                else result:= writeStartElement(inputSource.Locator,copy(content.value,2,content.length-2),dummy);
+              end;
+              content.reset;
+              PieceType:= xmlUnknown;
+            end;
+          end;
+        end;
+
+        xmlProcessingInstruction: begin
+          content.addWideChar(str1);
+          if str1 = '>' then
+            if content[content.length-1] = QM then begin
+              result:= writeProcessingInstruction(inputSource.Locator,copy(content.value,3,content.length-4));
+              content.reset;
+              PieceType:= xmlUnknown;
+            end;
+        end;
+
+        xmlComment: begin
+          content.AddWideChar(str1);
+          if str1 = '>' then
+            if content[content.length-1] = '-' then
+              if content[content.length-2] = '-' then
+                if content.length > 6 then begin
+                  result:= writeComment(inputSource.Locator,copy(content.value,5,content.length-7));
+                  content.reset;
+                  PieceType:= xmlUnknown;
+                end;
+        end;
+
+        xmlCDATA: begin
+          content.AddWideChar(str1);
+          if str1 = '>' then
+            if content[content.length-1] = ']' then
+              if content[content.length-2] = ']' then begin
+                result:= writeCDATA(inputSource.Locator,copy(content.value,10,content.length-12));
+                content.reset;
+                PieceType:= xmlUnknown;
+              end;
+        end;
+
+        xmlDoctype: begin
+          content.AddWideChar(str1);
+          if (SubEndMarker = '') then begin
+
+            if (str1 = SingleQuote) and (not DoubleQuoteOpen) then begin
+              SingleQuoteOpen := not SingleQuoteOpen;
+            end else if (str1 = DoubleQuote) and (not SingleQuoteOpen) then begin
+              DoubleQuoteOpen := not DoubleQuoteOpen;
+            end;
+
+            if BracketOpened then begin
+              if not (SingleQuoteOpen or DoubleQuoteOpen) then begin
+                if str1 = '<' then begin
+                  SubStartMarker:= '<';
+                end else if (str1 = '!') and (SubStartMarker = '<') then begin
+                  SubStartMarker:= '<!';
+                end else if (str1 = QM) and (SubStartMarker = '<') then begin
+                  SubStartMarker:= '';
+                  SubEndMarker:= PIEND;
+                end else if (str1 = '-') and (SubStartMarker = '<!')then begin
+                  SubStartMarker:= '<!-';
+                end else if (str1 = '-') and (SubStartMarker = '<!-')then begin
+                  SubStartMarker:= '';
+                  SubEndMarker:= '-->';
+                end else if SubStartMarker <> '' then begin
+                  SubStartMarker:= '';
+                end;
+                if (str1 = ']')
+                  and (not SingleQuoteOpen)
+                  and (not DoubleQuoteOpen)
+                  then BracketOpened:= false;
+              end; {if not ...}
+            end else begin {if BracketOpened ... }
+              if (str1 = '[')
+                and (not SingleQuoteOpen)
+                and (not DoubleQuoteOpen) then BracketOpened:= true;
+            end; {if BracketOpened ... else ...}
+
+          end else begin; {if (SubEndMarker = '') ...}
+            if content.endsWith(SubEndMarker) then SubEndMarker:= '';
+          end; {if (SubEndMarker = '') ... else ...}
+
+          if (not DoubleQuoteOpen)
+            and (not SingleQuoteOpen)
+            and (not BracketOpened)
+            and (SubEndMarker = '')
+            and (str1 = '>')
+            then begin
+              result:= writeDoctype(inputSource.Locator,content.value);
+              content.reset;
+              PieceType:= xmlUnknown;
+            end;
+        end; {xmlDoctype: ...}
+
+        xmlUnknown: begin
+          if str1 = '<' then PieceType:= xmlStartTag
+          else if str1 = '&' then PieceType:= xmlEntityRef
+          else PieceType:= xmlPCData;
+          content.AddWideChar(Str1);
+          inputsource.locator.setStartMark;
+        end;
+
+      end; {case ...}
+    end; {while ...}
+
+    if result
+      then if content.length > 0
+        then if PieceType= xmlPCData
+          then result:= writePCDATA(inputSource.Locator,content.value)
+          else result:= sendErrorNotification(ET_INVALID_CHARACTER,inputSource.locator,content.value);
+
+    if result
+      then result:= writeEndDocument(inputSource.Locator);
+
+  finally
+    clearPrefixMappingStack;
+    content.free;
+  end; {try}
+end;
+
+
+
+// +++++++++++++++++++++ TXmlStandardDtdReader +++++++++++++++++++++
+function TXmlStandardDtdReader.findNextAttDef(const decl: UnicodeString;
+                                                var aname,
+                                                    attType,
+                                                    bracket,
+                                                    defaultDecl,
+                                                    attValue,
+                                                    rest: UnicodeString): boolean;
+// Return value: 'false' if a wellformedness error occured; 'true' otherwise.
+var
+  i,j: integer;
+  FindBracket, FindDefaultDecl, FindAttValue: boolean;
+  QuoteType: WideChar;
+begin
+  result:= true;
+
+  attType:= '';
+  attValue:= '';
+  bracket:= '';
+  findAttValue:= false;
+  findBracket:= false;
+  findDefaultDecl:= false;
+  defaultDecl:= '';
+  aname:= '';
+  rest:= '';
+
+  if Length(Decl) = 0
+    then begin result:= false; exit; end;
+  i:= 1;
+
+  {White-space?}
+  while IsXmlWhiteSpace(Decl[i]) do begin
+    inc(i);
+    if i > length(Decl)
+      then begin result:= false; exit; end;
+  end;
+  j:= i;
+
+  {name?}
+  while not IsXmlWhiteSpace(Decl[i]) do begin
+    inc(i);
+    if i > length(Decl)
+      then begin result:= false; exit; end;
+  end;
+  aname:= copy(Decl,j,i-j);
+
+  {White-space?}
+  while IsXmlWhiteSpace(Decl[i]) do begin
+    inc(i);
+    if i > length(Decl)
+      then begin result:= false; exit; end;
+  end;
+  j:= i;
+
+  if Decl[j] = '(' then FindBracket:= true;
+
+  {attType?}
+  if not FindBracket then begin
+    while not IsXmlWhiteSpace(Decl[i]) do begin
+      inc(i);
+      if i > length(Decl)
+        then begin result:= false; exit; end;
+    end;
+    attType:= copy(Decl,j,i-j);
+    if attType = 'NOTATION' then FindBracket:= true;
+
+    {White-space?}
+    while IsXmlWhiteSpace(Decl[i]) do begin
+      inc(i);
+      if i > length(Decl)
+        then begin result:= false; exit; end;
+    end;
+    j:= i;
+  end; {if ...}
+
+  {Bracket?}
+  if FindBracket then begin
+    if Decl[j] <> '('
+      then begin result:= false; exit; end;
+    while not (Decl[i] = ')') do begin
+      inc(i);
+      if i >= length(Decl)
+        then begin result:= false; exit; end;
+    end;
+    Bracket:= copy(Decl,j,i-j+1);
+
+    {White-space?}
+    inc(i);
+    if not IsXmlWhiteSpace(Decl[i])
+      then begin result:= false; exit; end;
+    while IsXmlWhiteSpace(Decl[i]) do begin
+      inc(i);
+      if i > length(Decl)
+        then begin result:= false; exit; end;
+    end;
+    j:= i;
+  end; {if ...}
+
+  if Decl[j] = '#'
+    then FindDefaultDecl:= true
+    else FindAttValue:= true;
+
+  {defaultDecl?}
+  if FindDefaultDecl then begin
+    while not IsXmlWhiteSpace(Decl[i]) do begin
+      inc(i);
+      if i > length(Decl) then break;
+    end; {while ...}
+    defaultDecl:= copy(Decl,j,i-j);
+    if defaultDecl = '#FIXED' then begin
+      FindAttValue:= true;
+      {White-space?}
+      if i > length(Decl)
+        then begin result:= false; exit; end;
+      while IsXmlWhiteSpace(Decl[i]) do begin
+        inc(i);
+        if i > length(Decl)
+          then begin result:= false; exit; end;
+      end; {while ...}
+      j:= i;
+    end; {if ...}
+  end; {if ...}
+
+  {attValue?}
+  if FindAttValue then begin
+    if i = length(Decl)
+      then begin result:= false; exit; end;
+    QuoteType:= Decl[i];
+    if not ( (QuoteType = '"') or (QuoteType = #$0027))
+      then begin result:= false; exit; end;
+    inc(i);
+    while not (Decl[i] = QuoteType) do begin
+      inc(i);
+      if i > length(Decl)
+        then begin result:= false; exit; end;
+    end; {while ...}
+    attValue:= copy(Decl,j+1,i-j-1);
+    inc(i);
+  end; {if ...}
+
+  Rest:= copy(Decl,i,length(Decl)-i+1);
+end;
+
+function TXmlStandardDtdReader.includeAsPE(const inputSource: TXmlInputSource;
+                                             var s: UnicodeString): boolean;
+begin
+  result:= includeInLiteral(inputSource,s);
+  s:= concat(#$20,s,#$20);
+end;
+
+function TXmlStandardDtdReader.includeInLiteral(const inputSource: TXmlInputSource;
+                                                  var s: UnicodeString): boolean;
+var
+  str1: WideChar;
+  PEName: TdomCustomStr;
+  errType: TXmlErrorType;
+  invalidStr: UnicodeString;
+begin
+  s:= '';
+  result:= true;
+  PEName:= TdomCustomStr.create;
+  try
+
+    while InputSource.getNextWideChar(str1) do begin
+
+      if not IsXmlChar(str1) then begin
+        inputsource.locator.setStartMark;
+        if str1 = #0
+          then invalidStr:= ''
+          else invalidStr:= UnicodeString(str1);
+        result:= sendErrorNotification(ET_INVALID_CHARACTER,inputSource.locator,invalidStr);
+        exit;
+      end;
+
+      if str1 = ';' then begin // End of PE reference found.
+        errType:= ET_UNRESOLVABLE_PARAMETER_ENTITY_REFERENCE;
+        if assigned(NextHandler)
+          then result:= NextHandler.resolvePE(PEName.value,s,errType);
+        if errType <> ET_NONE then begin
+          s:= concat('%',PEName.value,';');
+          result:= (sendErrorNotification(errType,inputSource.locator,PEName.value) and result);
+        end;
+        exit;
+      end;
+
+      PEName.addWideChar(str1);
+
+      if ( (PEName.length = 1) and not ( IsXmlLetter(str1) or (str1 = '_') or (str1 = ':') ) )
+        or ( (PEName.length > 1) and not IsXmlNameChar(str1) )
+        then break;
+
+    end; {while ...}
+
+    s:= concat('%',PEName.value);
+
+  finally
+    PEName.free;
+  end;
+end;
+
+function TXmlStandardDtdReader.WriteConditionalSection(const locator: TdomLocator;
+                                                       const content: UnicodeString): boolean;
+var
+  declaration: UnicodeString;
+  IncludeStmt: UnicodeString;
+  i,nr1,nr2: longint;
+begin
+  nr1:= 0;
+  nr2:= 0;
+  for i:= 1 to length(content) do begin
+    if content[i] = '[' then begin
+      if nr1 = 0 then nr1:= i else nr2:= i;
+    end;
+    if nr2 > 0 then break;
+  end;
+  if nr2 = 0 then begin
+    result:= sendErrorNotification(ET_INVALID_CONDITIONAL_SECTION,locator,'');
+    exit;
+  end;
+  if (copy(content,1,3) <> '<![') then begin
+    result:= sendErrorNotification(ET_INVALID_CONDITIONAL_SECTION,locator,'');
+    exit;
+  end;
+  if (copy(content,length(content)-2,3) <> ']]>') then begin
+    result:= sendErrorNotification(ET_INVALID_CONDITIONAL_SECTION,locator,'');
+    exit;
+  end;
+
+  IncludeStmt:= XmlTrunc(copy(content,4,nr2-4));
+
+  if not ( IsXmlPEReference(IncludeStmt)
+           or (IncludeStmt = 'INCLUDE')
+           or (IncludeStmt = 'IGNORE') ) then begin
+    result:= sendErrorNotification(ET_INVALID_CONDITIONAL_SECTION,locator,'');
+    exit;
+  end;
+
+  declaration:= XmlTrunc(copy(content,nr2+1,length(content)-nr2-3));
+
+  if assigned(NextHandler)
+    then result:= NextHandler.conditionalSection(self,locator,IncludeStmt,declaration)
+    else result:= true;
+end;
+
+function TXmlStandardDtdReader.WriteDTDProcessingInstruction(const locator: TdomLocator;
+                                                             const content: UnicodeString): boolean;
+var
+  TargetName,AttribSequence: UnicodeString;
+begin
+  XMLAnalyseTag(content,TargetName,AttribSequence);
+  if assigned(NextHandler)
+    then result:= NextHandler.DTDProcessingInstruction(self,locator,TargetName,AttribSequence)
+    else result:= true;
+end;
+
+function TXmlStandardDtdReader.WriteDTDComment(const locator: TdomLocator;
+                                               const content: UnicodeString): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.DTDcomment(self,locator,content)
+    else result:= true;
+end;
+
+function TXmlStandardDtdReader.WriteParameterEntityRef(const locator: TdomLocator;
+                                                       const content: UnicodeString): boolean;
+var
+  entityName: UnicodeString;
+begin
+  entityName:= copy(content,2,length(content)-2);
+  if assigned(NextHandler)
+    then result:= NextHandler.parameterEntityRef(self,locator,entityName)
+    else result:= true;
+end;
+
+function TXmlStandardDtdReader.WriteEntityDeclaration(const locator: TdomLocator;
+                                                      const content: UnicodeString): boolean;
+var
+  DeclCorpus,DeclName,EntityDef,entityValue,SystemLiteral,PubidLiteral,NDataName: UnicodeString;
+  DeclTypus: TDomCMNodeType;
+  dummy: UnicodeString;
+  Error: boolean;
+begin
+  result:= true;
+  if (copy(content,1,8) <> '<!ENTITY')
+    or (content[length(content)] <> '>')
+    or (length(content) < 14)
+    or (not IsXmlWhiteSpace(content[9])) then begin
+      result:= sendErrorNotification(ET_INVALID_ENTITY_DECL,locator,'');
+    exit;
+  end;
+
+  DeclCorpus:= XMLTrunc(copy(content,10,length(content)-10));
+  if DeclCorpus[1] = '%' then begin
+    if not IsXmlWhiteSpace(DeclCorpus[2]) then begin
+      result:= sendErrorNotification(ET_INVALID_ENTITY_DECL,locator,'');
+      exit;
+    end;
+    dummy:= XMLTrunc(copy(DeclCorpus,2,length(DeclCorpus)-1));
+    DeclCorpus:= dummy;
+    DeclTypus:= ctParameterEntityDeclaration;
+  end else DeclTypus:= ctEntityDeclaration;
+  XMLAnalyseTag(DeclCorpus,DeclName,EntityDef);
+  XMLAnalyseEntityDef(EntityDef,entityValue,SystemLiteral,PubidLiteral,NDataName,Error);
+  if Error then begin
+    result:= sendErrorNotification(ET_INVALID_ENTITY_DECL,locator,'');
+    exit;
+  end;
+  if (DeclTypus = ctParameterEntityDeclaration) and (NDataName <> '') then begin
+    result:= sendErrorNotification(ET_INVALID_ENTITY_DECL,locator,'');
+    exit;
+  end;
+
+  if result
+    then if assigned(NextHandler) then begin
+      case DeclTypus of
+        ctEntityDeclaration:
+          NextHandler.entityDeclaration(self,locator,DeclName,entityValue,PubidLiteral,SystemLiteral,NDataName);
+        ctParameterEntityDeclaration:
+          NextHandler.parameterentityDeclaration(self,locator,DeclName,entityValue,PubidLiteral,SystemLiteral);
+      end; {case ...}
+    end; {if ...}
+end;
+
+function TXmlStandardDtdReader.WriteElementDeclaration(const locator: TdomLocator;
+                                                       const content: UnicodeString): boolean;
+var
+  DeclCorpus,DeclName,contSpec: UnicodeString;
+begin
+  if length(content) < 16 then begin
+    result:= sendErrorNotification(ET_INVALID_ELEMENT_DECL,locator,'');
+    exit;
+  end;
+  if (copy(content,1,9) <> '<!ELEMENT')
+     or (content[length(content)] <> '>')
+     or (not IsXmlWhiteSpace(content[10])) then begin
+    result:= sendErrorNotification(ET_INVALID_ELEMENT_DECL,locator,'');
+    exit;
+  end;
+  DeclCorpus:= XMLTrunc(copy(content,11,length(content)-11));
+  XMLAnalyseTag(DeclCorpus,DeclName,contSpec);
+  if assigned(NextHandler)
+    then result:= NextHandler.elementTypeDeclaration(self,locator,DeclName,contSpec)
+    else result:= true;
+end;
+
+function TXmlStandardDtdReader.WriteAttributeDeclaration(const locator: TdomLocator;
+                                                         const content: UnicodeString): boolean;
+var
+  declCorpus,declName,contSpec: UnicodeString;
+  dummy,AttDefName,attType,Bracket,defaultDecl,attValue,Rest: UnicodeString;
+  ok: boolean;
+begin
+  result:= true;
+  if length(Content) < 12 then begin
+    result:= sendErrorNotification(ET_INVALID_ATTRIBUTE_DECL,locator,content);
+    exit;
+  end;
+  if (copy(Content,1,9) <> '<!ATTLIST')
+     or (Content[length(Content)] <> '>')
+     or (not IsXmlWhiteSpace(Content[10])) then begin
+    result:= sendErrorNotification(ET_INVALID_ATTRIBUTE_DECL,locator,content);
+    exit;
+  end;
+
+  DeclCorpus:= XMLTrunc(copy(Content,11,length(Content)-11));
+  XMLAnalyseTag(DeclCorpus,DeclName,contSpec);
+
+  if assigned(NextHandler) then begin
+    result:= NextHandler.startAttListDeclaration(self,locator,DeclName);
+  end;
+
+  if result then begin
+    dummy:= XMLTrunc(contSpec);
+    contSpec:= dummy;
+
+    while contSpec <> '' do begin
+      ok:= findNextAttDef(contSpec,AttDefName,attType,Bracket,
+                          defaultDecl,attValue,Rest);
+      if ok then begin
+        if assigned(NextHandler) then begin
+          result:= NextHandler.attributeDefinition(self,locator,attDefName,attType,bracket,
+                                                   defaultDecl,attValue);
+          if not result then break;
+        end;
+      end else begin
+        result:= sendErrorNotification(ET_INVALID_ATTRIBUTE_DECL,locator,content);
+        break;
+      end;
+      contSpec:= Rest;
+    end; {while ...}
+
+  end; {if ...}
+
+  if result
+    then if assigned(NextHandler)
+      then result:= NextHandler.endAttListDeclaration(self,locator);
+end;
+
+function TXmlStandardDtdReader.WriteNotationDeclaration(const locator: TdomLocator;
+                                                        const content: UnicodeString): boolean;
+var
+  DeclCorpus,DeclName,contSpec,SystemLiteral,PubidLiteral: UnicodeString;
+  Error: boolean;
+begin
+  if length(Content) < 22 then begin
+    result:= sendErrorNotification(ET_INVALID_NOTATION_DECL,locator,'');
+    exit;
+  end;
+  if (copy(Content,1,10) <> '<!NOTATION')
+     or (Content[length(Content)] <> '>')
+     or (not IsXmlWhiteSpace(Content[11])) then begin
+    result:= sendErrorNotification(ET_INVALID_NOTATION_DECL,locator,'');
+    exit;
+  end;
+  DeclCorpus:= XMLTrunc(copy(Content,12,length(Content)-12));
+  XMLAnalyseTag(DeclCorpus,DeclName,contSpec);
+  XMLAnalyseNotationDecl(contSpec,SystemLiteral,PubidLiteral,Error);
+  if Error then begin
+    result:= sendErrorNotification(ET_INVALID_NOTATION_DECL,locator,'');
+    exit;
+  end;
+  if assigned(NextHandler)
+    then result:= NextHandler.notationDeclaration(self,locator,DeclName,PubidLiteral,SystemLiteral)
+    else result:= true;
+end;
+
+function TXmlStandardDtdReader.writeStartExtDtd(const locator: TdomLocator;
+                                                      version,
+                                                      encName: UnicodeString): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.startExtDtd(self,locator,version,encName)
+    else result:= true;
+end;
+
+function TXmlStandardDtdReader.writeStartIntDtd(const locator: TdomLocator): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.startIntDtd(self,locator)
+    else result:= true;
+end;
+
+function TXmlStandardDtdReader.parseExternalSubset(const inputSource: TXmlInputSource):boolean;
+const
+//  CR: WideChar  = #13;
+//  LF: WideChar  = #10;
+  QM: WideChar  = '?';
+  SingleQuote: WideChar = #39; // code of '
+  DoubleQuote: WideChar = #34; // code of "
+  PISTART: UnicodeString = '<?';
+//  TEXTDECLSTART: UnicodeString = '<?xml';
+  CONTSECTSTART: UnicodeString = '<![';
+  COMMENTSTART: UnicodeString = '<!--';
+  ENTITYSTART: UnicodeString = '<!ENTITY';
+  ELEMENTSTART: UnicodeString = '<!ELEMENT';
+  ATTLISTSTART: UnicodeString = '<!ATTLIST';
+  NOTATIONSTART: UnicodeString = '<!NOTATION';
+var
+  str1: WideChar;
+  entityDeclValue,dummy,invalidStr: UnicodeString;
+  SingleQuoteOpen,DoubleQuoteOpen: boolean;
+  commentActive,includeStatementFinished: boolean;
+  i: integer;
+  PieceType: TdomPieceType;
+  content: TdomCustomStr;
+  condSectCounter: longint;
+begin
+  PieceType:= xmlUnknown;
+  SingleQuoteOpen:= false;
+  DoubleQuoteOpen:= false;
+  commentActive:= false;
+  includeStatementFinished:= false;
+  condSectCounter:= 0;
+  result:= true;
+  content:= TdomCustomStr.create;
+  try
+
+    with inputSource do
+      writeStartExtDtd(locator,versionNumber,encodingName);
+    while InputSource.getNextWideChar(str1) do begin
+      if not result then break;
+      if not IsXmlChar(str1) then begin
+        content.addWideChar(str1);
+        inputsource.locator.setStartMark;
+        if str1 = #0
+          then invalidStr:= ''
+          else invalidStr:= UnicodeString(str1);
+        result:= sendErrorNotification(ET_INVALID_CHARACTER,inputSource.locator,invalidStr);
+      end;
+
+      case PieceType of
+
+        xmlParameterEntityRef: begin
+          content.addWideChar(str1);
+          if str1 = ';' then begin
+            result:= WriteParameterEntityRef(inputSource.Locator,content.value);
+            content.reset;
+            PieceType:= xmlUnknown;
+          end;
+        end;
+
+        xmlStartTag: begin
+          content.addWideChar(str1);
+          case content.length of
+            2: if content.startsWith(PISTART) then PieceType:= xmlProcessingInstruction;
+            3: if content.startsWith(CONTSECTSTART) then begin
+                 PieceType:= xmlCondSection;
+                 condSectCounter:= 1;
+                 commentActive:= false;
+                 includeStatementFinished:= false;
+               end;
+            4: if content.startsWith(COMMENTSTART) then PieceType:= xmlComment;
+            8: if content.startsWith(ENTITYSTART) then PieceType:= xmlEntityDecl;
+            9: if content.startsWith(ELEMENTSTART) then PieceType:= xmlElementDecl
+               else if content.startsWith(ATTLISTSTART) then PieceType:= xmlAttributeDecl;
+           10: if content.startsWith(NOTATIONSTART) then PieceType:= xmlNotationDecl;
+          end;
+
+        end;
+
+        xmlProcessingInstruction: begin
+          content.addWideChar(str1);
+          if str1 = '>' then
+            if content[content.length-1] = QM then begin
+              if result then begin
+                result:= writeDTDProcessingInstruction(inputSource.Locator,copy(content.value,3,content.length-4));
+                content.reset;
+                PieceType:= xmlUnknown;
+              end;
+            end;
+        end;
+
+        xmlCondSection: begin
+          if includeStatementFinished then begin
+            content.addWideChar(str1);
+            if str1 = '[' then begin
+              if content[content.length-1] = '!' then
+                if content[content.length-2] = '<' then
+                  if not commentActive then inc(condSectCounter);
+            end else if str1 = '>' then begin
+              if content[content.length-1] = ']' then
+                if content[content.length-2] = ']' then
+                  if not commentActive then dec(condSectCounter);
+            end; {if str1 = '[' ... else ...}
+
+            if commentActive then begin
+              if str1 = '>' then
+                if content[content.length-1] = '-' then
+                  if content[content.length-2] = '-' then
+                    if not ( (content[content.length-3] = '!')
+                             and (content[content.length-4] = '<') ) then
+                      if not ( (content[content.length-3] = '-')
+                                and (content[content.length-4] = '!')
+                                and (content[content.length-5] = '<') )
+                        then commentActive:= false;
+            end else begin
+              if str1 = '-' then
+                if content[content.length-1] = '-' then
+                  if content[content.length-2] = '!' then
+                    if content[content.length-3] = '<'
+                      then commentActive:= true;
+            end; {if commentActive ... else ...}
+
+            if condSectCounter = 0 then begin
+              result:= WriteConditionalSection(inputSource.Locator,content.value);
+              content.reset;
+              PieceType:= xmlUnknown;
+            end; {if ...}
+
+          end else begin {if includeStatementFinished ... }
+            if str1 = '['
+              then includeStatementFinished:= true;
+            if str1 = '%' then begin
+              if includeAsPE(inputSource,dummy) then begin
+                for i:= 0 to pred(length(dummy)) do begin
+                  if dummy[i] = '[' then begin
+                    includeStatementFinished:= true;
+                    break;
+                  end; {if ...}
+                 end; {for ...}
+                content.addWideString(dummy);
+              end else result:= sendErrorNotification(ET_UNRESOLVABLE_PARAMETER_ENTITY_REFERENCE,inputSource.locator,concat(content.value,'%'));
+            end else content.addWideChar(str1);
+          end; {if includeStatementFinished ... else ...}
+        end;
+
+        xmlComment: begin
+          content.addWideChar(str1);
+          if str1 = '>' then
+            if content[content.Length-1] = '-' then
+              if content[content.Length-2] = '-' then
+                if content.length > 6 then begin
+                  result:= WriteDTDComment(inputSource.Locator,copy(content.value,5,content.length-7));
+                  content.reset;
+                  PieceType:= xmlUnknown;
+                end;
+        end;
+
+        xmlEntityDecl,xmlNotationDecl: begin
+          if not (DoubleQuoteOpen or SingleQuoteOpen) then begin
+            if str1 = '%' then begin
+              if includeAsPE(inputSource,dummy)
+                then content.addWideString(dummy)
+                else result:= sendErrorNotification(ET_UNRESOLVABLE_PARAMETER_ENTITY_REFERENCE,inputSource.locator,concat(content.value,'%'));
+            end else content.addWideChar(str1);
+          end else begin
+            if (PieceType = xmlEntityDecl) and (str1 = '%') then begin
+                // XML 1.0, § 4.4.5: "When ... a parameter entity
+                // reference appears in a literal entity value, its
+                // replacement text is processed in place of the
+                // reference itself as though it were part of the
+                // document at the location the reference was
+                // recognized, except that ...
+              result:= includeInLiteral(inputSource,entityDeclValue);
+              content.addWideString(
+                // ... a single or double quote character in the
+                // replacement text is always treated as a normal
+                // data character and will not terminate the literal."
+                xmlReplaceQuotes(entityDeclValue)
+                );
+            end else content.addWideChar(str1);
+          end;
+
+          if (str1 = SingleQuote) and (not DoubleQuoteOpen) then begin
+            SingleQuoteOpen := not SingleQuoteOpen;
+          end else if (str1 = DoubleQuote) and (not SingleQuoteOpen) then begin
+            DoubleQuoteOpen := not DoubleQuoteOpen;
+          end;
+
+          if (not DoubleQuoteOpen)
+            and (not SingleQuoteOpen)
+            and (str1 = '>')
+          then begin
+            if pieceType = xmlEntityDecl
+              then result:= WriteEntityDeclaration(inputSource.Locator,content.value)
+              else result:= WriteNotationDeclaration(inputSource.Locator,content.value);
+            content.reset;
+            PieceType:= xmlUnknown;
+          end;
+
+        end;
+
+        xmlAttributeDecl: begin
+
+          if not (DoubleQuoteOpen or SingleQuoteOpen) then begin
+            if str1 = '%' then begin
+              if includeAsPE(inputSource,dummy)
+                then content.addWideString(dummy)
+                else result:= sendErrorNotification(ET_UNRESOLVABLE_PARAMETER_ENTITY_REFERENCE,inputSource.locator,concat(content.value,'%'));
+            end else content.addWideChar(str1);
+          end else content.addWideChar(str1);
+
+          if (str1 = SingleQuote) and (not DoubleQuoteOpen) then begin
+            SingleQuoteOpen := not SingleQuoteOpen;
+          end else if (str1 = DoubleQuote) and (not SingleQuoteOpen) then begin
+            DoubleQuoteOpen := not DoubleQuoteOpen;
+          end;
+
+          if str1 = '>' then begin
+            result:= WriteAttributeDeclaration(inputSource.Locator,content.value);
+            content.reset;
+            PieceType:= xmlUnknown;
+          end;
+
+        end;
+
+        xmlElementDecl: begin
+          if str1 = '%' then begin
+            if includeAsPE(inputSource,dummy)
+              then content.addWideString(dummy)
+              else result:= sendErrorNotification(ET_UNRESOLVABLE_PARAMETER_ENTITY_REFERENCE,inputSource.locator,concat(content.value,'%'));
+          end else content.addWideChar(str1);
+          if str1 = '>' then begin
+            result:= WriteElementDeclaration(inputSource.Locator,content.value);
+            content.reset;
+            PieceType:= xmlUnknown;
+          end;
+        end;
+
+        xmlUnknown: begin
+          if str1 = '<' then begin
+            PieceType:= xmlStartTag;
+            content.addWideChar(str1);
+            inputsource.locator.setStartMark;
+          end else
+          if str1 = '%' then begin
+            PieceType:= xmlParameterEntityRef;
+            content.addWideChar(str1);
+            inputsource.locator.setStartMark;
+          end else
+          if not IsXmlWhiteSpace(str1) then begin
+            result:= sendErrorNotification(ET_INVALID_CHARACTER,inputSource.locator,content.value);
+          end;
+        end;
+
+      end; {case ...}
+    end; {while ...}
+
+    if result then begin
+      if (content.length > 0) and not IsXmlS(content.value) then begin
+        result:= sendErrorNotification(ET_UNKNOWN_DECL_TYPE,inputSource.locator,content.value);
+      end;
+    end;
+
+    if result
+      then if assigned(NextHandler)
+        then result:= NextHandler.endExtDtd(self,inputSource.locator);
+
+  finally
+    content.free;
+  end;
+end;
+
+function TXmlStandardDtdReader.parseInternalSubset(const inputSource: TXmlInputSource):boolean;
+const
+//  CR: WideChar  = #13;
+//  LF: WideChar  = #10;
+  QM: WideChar  = '?';
+  SingleQuote: WideChar = #39; // code of '
+  DoubleQuote: WideChar = #34; // code of "
+  PISTART: UnicodeString = '<?';
+  COMMENTSTART: UnicodeString = '<!--';
+  ENTITYSTART: UnicodeString = '<!ENTITY';
+  ELEMENTSTART: UnicodeString = '<!ELEMENT';
+  ATTLISTSTART: UnicodeString = '<!ATTLIST';
+  NOTATIONSTART: UnicodeString = '<!NOTATION';
+var
+  str1: WideChar;
+  SingleQuoteOpen,DoubleQuoteOpen: boolean;
+  PieceType: TdomPieceType;
+  content: TdomCustomStr;
+  invalidStr: UnicodeString;
+begin
+  PieceType:= xmlUnknown;
+  SingleQuoteOpen:= false;
+  DoubleQuoteOpen:= false;
+  result:= true;
+  content:= TdomCustomStr.create;
+  try
+
+    writeStartIntDtd(inputSource.locator);
+    while InputSource.getNextWideChar(str1) do begin
+      if not result then break;
+      if not IsXmlChar(str1) then begin
+        content.addWideChar(str1);
+        inputsource.locator.setStartMark;
+        if str1 = #0
+          then invalidStr:= ''
+          else invalidStr:= UnicodeString(str1);
+        result:= sendErrorNotification(ET_INVALID_CHARACTER,inputSource.locator,invalidStr);
+      end;
+
+      case PieceType of
+
+        xmlParameterEntityRef: begin
+          content.addWideChar(str1);
+          if str1 = ';' then begin
+            result:= WriteParameterEntityRef(inputSource.Locator,content.value);
+            content.reset;
+            PieceType:= xmlUnknown;
+          end;
+        end;
+
+        xmlStartTag: begin
+          content.addWideChar(str1);
+          case content.length of
+            2: if content.startsWith(PISTART) then PieceType:= xmlProcessingInstruction;
+            4: if content.startsWith(COMMENTSTART) then PieceType:= xmlComment;
+            8: if content.startsWith(ENTITYSTART) then PieceType:= xmlEntityDecl;
+            9: if content.startsWith(ELEMENTSTART) then PieceType:= xmlElementDecl
+               else if content.startsWith(ATTLISTSTART) then PieceType:= xmlAttributeDecl;
+           10: if content.startsWith(NOTATIONSTART) then PieceType:= xmlNotationDecl;
+          end;
+
+        end;
+
+        xmlProcessingInstruction: begin
+          content.addWideChar(str1);
+          if str1 = '>' then
+            if content[content.Length-1] = QM then begin
+              result:= WriteDTDProcessingInstruction(inputSource.Locator,copy(content.value,3,content.length-4));
+              content.reset;
+              PieceType:= xmlUnknown;
+            end;
+        end;
+
+        xmlComment: begin
+          content.addWideChar(str1);
+          if str1 = '>' then
+            if content[content.Length-1] = '-' then
+              if content[content.Length-2] = '-' then
+                if content.length > 6 then begin
+                  result:= WriteDTDComment(inputSource.Locator,copy(content.value,5,content.length-7));
+                  content.reset;
+                  PieceType:= xmlUnknown;
+                end;
+        end;
+
+        xmlEntityDecl,xmlNotationDecl: begin
+          content.addWideChar(str1);
+
+          if (str1 = SingleQuote) and (not DoubleQuoteOpen) then begin
+            SingleQuoteOpen := not SingleQuoteOpen;
+          end else if (str1 = DoubleQuote) and (not SingleQuoteOpen) then begin
+            DoubleQuoteOpen := not DoubleQuoteOpen;
+          end;
+
+          if (not DoubleQuoteOpen)
+            and (not SingleQuoteOpen)
+            and (str1 = '>')
+            then begin
+              if pieceType = xmlEntityDecl
+                then result:= WriteEntityDeclaration(inputSource.Locator,content.value)
+                else result:= WriteNotationDeclaration(inputSource.Locator,content.value);
+              content.reset;
+              PieceType:= xmlUnknown;
+            end;
+        end;
+
+        xmlAttributeDecl: begin
+          content.addWideChar(str1);
+          if str1 = '>' then begin
+            result:= WriteAttributeDeclaration(inputSource.Locator,content.value);
+            content.reset;
+            PieceType:= xmlUnknown;
+          end;
+        end;
+
+        xmlElementDecl: begin
+          content.addWideChar(str1);
+          if str1 = '>' then begin
+            result:= WriteElementDeclaration(inputSource.Locator,content.value);
+            content.reset;
+            PieceType:= xmlUnknown;
+          end;
+        end;
+
+        xmlUnknown: begin
+          if str1 = '<' then begin
+            PieceType:= xmlStartTag;
+            content.addWideChar(str1);
+            inputsource.locator.setStartMark;
+          end else
+          if str1 = '%' then begin
+            PieceType:= xmlParameterEntityRef;
+            content.addWideChar(str1);
+            inputsource.locator.setStartMark;
+          end else
+          if not IsXmlWhiteSpace(str1) then begin
+            result:= sendErrorNotification(ET_INVALID_CHARACTER,inputSource.locator,content.value);
+          end;
+        end;
+
+      end; {case ...}
+    end; {while ...}
+
+    if result then begin
+      if (content.length > 0) and not IsXmlS(content.value) then begin
+        result:= sendErrorNotification(ET_UNKNOWN_DECL_TYPE,inputSource.locator,content.value);
+      end;
+    end;
+
+    if result
+      then if assigned(NextHandler)
+        then result:= NextHandler.endIntDtd(self,inputSource.locator);
+
+  finally
+    content.free;
+  end;
+end;
+
+
+
+// ++++++++++++++++++++++++ TXmlCustomDomReader ++++++++++++++++++++++++
+constructor TXmlCustomDomReader.create(AOwner: TComponent);
+begin
+  inherited create(AOwner);
+  suppressXmlns:= false;
+  prefixMapping:= true;
+end;
+
+function TXmlCustomDomReader.parseloop(const sourceNode: TDomNode): boolean;
+var
+  i: integer;
+  attributeList: TdomNameValueList;
+  pfxUriList: TdomNameValueList;
+  snSystemId, versionNumber: UnicodeString;
+  suppressThisAttr: boolean;
+  loc: TdomLocator;
+
+  function writeWhileCheckingForAMPAndLT(const locator: TdomLocator;
+                                         const source: UnicodeString): boolean;
+  var
+    i: integer;
+    content: TdomCustomStr;
+  begin
+    result:= true;
+    content:= TdomCustomStr.create;
+    try
+      for i:= 1 to length(source) do begin
+        case ord(source[i]) of
+        {  60: begin  // LT
+            result:= WritePCDATA(locator,content.value);
+            if not result then break;
+            result:= WriteCharRef(locator,'&#60;');
+            if not result then break;
+            content.reset;
+          end;
+          38: begin // AMP
+            result:= WritePCDATA(locator,content.value);
+            if not result then break;
+            result:= WriteCharRef(locator,'&#38;');
+            if not result then break;
+            content.reset;
+          end;}
+
+          60: begin  // LT
+            result:= WritePCDATA(locator,content.value);
+            if not result then break;
+            result:= WriteCharRef(locator,'&lt;');
+            if not result then break;
+            content.reset;
+          end;
+          38: begin // AMP
+            result:= WritePCDATA(locator,content.value);
+            if not result then break;
+            result:= WriteCharRef(locator,'&amp;');
+            if not result then break;
+            content.reset;
+          end;
+
+        else
+          content.addWideChar(source[i]);
+        end;
+      end;
+      if content.length > 0
+        then if result
+          then result:= WritePCDATA(locator,content.value);
+    finally
+      content.free;
+    end;
+  end;
+
+begin
+  result:= true;
+  with sourceNode do
+    if assigned(sourceNode.ownerDocument)
+      then snSystemId:= sourceNode.ownerDocument.systemId
+      else snSystemId:= '';
+  loc:= TdomLocator.create(-1,-1,-1,-1,-1,snSystemId,nil,sourceNode);
+  try
+    case sourceNode.nodeType of
+      ntElement_Node: begin
+        attributeList:= TdomNameValueList.create;
+        pfxUriList:= TdomNameValueList.create;
+        try
+          for i:= 0 to pred(sourceNode.attributes.length) do
+            with (sourceNode.attributes.item(i) as TdomAttr) do begin
+              suppressThisAttr:= false;
+              if FPrefixMapping or FSuppressXmlns then begin
+                if IsXmlDefaultAttName(nodeName) then begin
+                  suppressThisAttr:= FSuppressXmlns;
+                  pfxUriList.add('',literalValue);
+                end else if IsXmlPrefixedAttName(nodeName) then begin
+                  suppressThisAttr:= FSuppressXmlns;
+                  pfxUriList.add(xmlExtractLocalName(nodeName),literalValue);
+                end;
+              end;
+              if not suppressThisAttr then attributeList.add(nodeName,literalValue);
+            end;
+          if FPrefixMapping then
+            with pfxUriList do
+              for i:= 0 to pred(length) do begin
+                result:= writeStartPrefixMapping(loc,names[i],values[i]);
+                if not result then break;
+              end;
+          if result then begin
+            if sourceNode.hasChildNodes then begin
+              result:= WriteStartElement(loc,sourceNode.nodeName,attributeList);
+              if result then begin
+                for i:= 0  to pred(sourceNode.childNodes.length) do begin
+                  result:= parseloop(sourceNode.childNodes.item(i));
+                  if not result then break;
+                end;
+              end;
+              if result
+                then result:= WriteEndElement(loc,sourceNode.nodeName);
+            end else result:= WriteEmptyElement(loc,sourceNode.nodeName,attributeList);
+            if FPrefixMapping then
+              with pfxUriList do
+                for i:= pred(length) downto 0 do begin
+                  if not result then break;
+                  result:= writeEndPrefixMapping(loc,names[i]);
+                end;
+          end;
+        finally
+          attributeList.free;
+          pfxUriList.free;
+        end;
+      end;
+      ntText_Node:
+        result:= writeWhileCheckingForAMPAndLT(loc,sourceNode.nodeValue);
+      ntCDATA_Section_Node:
+        result:= WriteCDATA(loc,sourceNode.nodeValue);
+      ntEntity_Reference_Node:
+        result:= WriteEntityRef(loc,sourceNode.nodeName);
+      ntProcessing_Instruction_Node:
+        result:= WriteProcessingInstruction(loc,sourceNode.nodeName,sourceNode.nodeValue);
+      ntComment_Node:
+        result:= WriteComment(loc,sourceNode.nodeValue);
+      ntDocument_Node: begin
+        versionNumber:= (sourceNode as TdomDocument).version;
+        if versionNumber = '' then  versionNumber:= '1.0';  // xxx necessary?
+        result:= writeStartDocument(loc,
+                                    versionNumber,
+                                    (sourceNode as TdomDocument).encoding,
+                                    STANDALONE_UNSPECIFIED);
+        if result then begin
+          for i:= 0  to pred(sourceNode.childNodes.length) do begin
+            result:= parseloop(sourceNode.childNodes.item(i));
+            if not result then break;
+          end;
+        end;
+        if result
+          then result:= writeEndDocument(loc);
+      end;
+      ntDocument_Type_Node:
+        result:= WriteDoctype(loc,sourceNode.nodeName,
+                              (sourceNode as TdomDocumentType).publicId,
+                              (sourceNode as TdomDocumentType).systemId,
+                              (sourceNode as TdomDocumentType).internalSubset);
+      else
+        result:= true;  // xxx raise an exception instead?
+    end;
+  finally
+    loc.free;
+  end;
+end;
+
+function TXmlCustomDomReader.WriteCDATA(const locator: TdomLocator;
+                                        const content: UnicodeString): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.cdata(self,locator,content)
+    else result:= true;
+end;
+
+function TXmlCustomDomReader.WriteCharRef(const locator: TdomLocator;
+                                          const content: UnicodeString): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.charRef(self,locator,content)
+    else result:= true;
+end;
+
+function TXmlCustomDomReader.WriteComment(const locator: TdomLocator;
+                                          const content: UnicodeString): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.comment(self,locator,content)
+    else result:= true;
+end;
+
+function TXmlCustomDomReader.WriteDoctype(const locator: TdomLocator;
+                                          const aname,
+                                                publicId,
+                                                systemId,
+                                                intSubset: UnicodeString): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.doctype(self,locator,aname,publicId,systemId,intSubset)
+    else result:= true;
+end;
+
+function TXmlCustomDomReader.WriteEmptyElement(const locator: TdomLocator;
+                                               const tagName: UnicodeString;
+                                               const attributeList: TdomNameValueList): boolean;
+begin
+  if assigned(NextHandler) then begin
+    result:= NextHandler.startElement(self,locator,'',tagName,attributeList);
+    if result
+      then result:= NextHandler.endElement(self,locator,'',tagName);
+  end else result:= true;
+end;
+
+function TXmlCustomDomReader.writeEndDocument(const locator: TdomLocator): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.endDocument(self,locator)
+    else result:= true;
+end;
+
+function TXmlCustomDomReader.WriteEndElement(const locator: TdomLocator;
+                                             const tagName: UnicodeString): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.endElement(self,locator,'',tagName)
+    else result:= true;
+end;
+
+function TXmlCustomDomReader.writeEndPrefixMapping(const locator: TdomLocator;
+                                                         prefix: UnicodeString): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.endPrefixMapping(self,locator,prefix)
+    else result:= true;
+end;
+
+function TXmlCustomDomReader.WriteEntityRef(const locator: TdomLocator;
+                                            const entityName: UnicodeString): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.EntityRef(self,locator,entityName)
+    else result:= true;
+end;
+
+function TXmlCustomDomReader.WritePCDATA(const locator: TdomLocator;
+                                         const content: UnicodeString): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.pcdata(self,locator,content)
+    else result:= true;
+end;
+
+function TXmlCustomDomReader.WriteProcessingInstruction(const locator: TdomLocator;
+                                                        const targ,
+                                                              attribSequence : UnicodeString): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.ProcessingInstruction(self,locator,targ,attribSequence)
+    else result:= true;
+end;
+
+function TXmlCustomDomReader.writeStartDocument(const locator: TdomLocator;
+                                                      version,
+                                                      encName: UnicodeString;
+                                                      sdDl: TdomStandalone): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.startDocument(self,locator,version,encName,sdDl)
+    else result:= true;
+end;
+
+function TXmlCustomDomReader.WriteStartElement(const locator: TdomLocator;
+                                               const tagName: UnicodeString;
+                                               const attributeList: TdomNameValueList): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.startElement(self,locator,'',tagName,attributeList)
+    else result:= true;
+end;
+
+function TXmlCustomDomReader.writeStartPrefixMapping(const locator: TdomLocator;
+                                                           prefix,
+                                                           uri: UnicodeString): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.startPrefixMapping(self,locator,prefix,uri)
+    else result:= true;
+end;
+
+
+
+// +++++++++++++++++++++++ TXmlStandardDomReader +++++++++++++++++++++++
+function TXmlStandardDomReader.parse(const sourceNode: TDomNode): boolean;
+begin
+  result:= parseloop(sourceNode);
+end;
+
+
+
+// +++++++++++++++++++++++ TXmlStandardCMReader +++++++++++++++++++++++
+function TXmlStandardCMReader.writeAttributeDefinition(const locator: TdomLocator;
+                                                             aname,
+                                                             attType,
+                                                             bracket,
+                                                             defaultDecl,
+                                                             attValue: UnicodeString): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.attributeDefinition(self,locator,aname,attType,bracket,defaultDecl,attValue)
+    else result:= true;
+end;
+
+function TXmlStandardCMReader.writeDTDComment(const locator: TdomLocator;
+                                                    content: UnicodeString): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.DTDComment(self,locator,content)
+    else result:= true;
+end;
+
+function TXmlStandardCMReader.writeDTDProcessingInstruction(const locator: TdomLocator;
+                                                                  targ,
+                                                                  attribSequence : UnicodeString): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.DTDProcessingInstruction(self,locator,targ,attribSequence)
+    else result:= true;
+end;
+
+function TXmlStandardCMReader.writeElementTypeDeclaration(const locator: TdomLocator;
+                                                                aname,
+                                                                data: UnicodeString): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.elementTypeDeclaration(self,locator,aname,data)
+    else result:= true;
+end;
+
+function TXmlStandardCMReader.writeEndAttListDeclaration(const locator: TdomLocator): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.endAttListDeclaration(self,locator)
+    else result:= true;
+end;
+
+function TXmlStandardCMReader.writeEndExtDtd(const locator: TdomLocator): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.endExtDtd(self,locator)
+    else result:= true;
+end;
+
+function TXmlStandardCMReader.writeEndIntDtd(const locator: TdomLocator): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.endIntDtd(self,locator)
+    else result:= true;
+end;
+
+function TXmlStandardCMReader.writeEntityDeclaration(const locator: TdomLocator;
+                                                           aname,
+                                                           entityValue,
+                                                           pubId,
+                                                           sysId,
+                                                           notaName: UnicodeString): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.entityDeclaration(self,locator,aname,entityValue,pubId,sysId,notaName)
+    else result:= true;
+end;
+
+function TXmlStandardCMReader.writeNotationDeclaration(const locator: TdomLocator;
+                                                             aname,
+                                                             pubId,
+                                                             sysId: UnicodeString): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.notationDeclaration(self,locator,aname,pubId,sysId)
+    else result:= true;
+end;
+
+function TXmlStandardCMReader.writeParameterEntityRef(const locator: TdomLocator;
+                                                            content: UnicodeString): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.parameterEntityRef(self,locator,content)
+    else result:= true;
+end;
+
+function TXmlStandardCMReader.writeStartAttListDeclaration(const locator: TdomLocator;
+                                                                 aname: UnicodeString): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.startAttListDeclaration(self,locator,aname)
+    else result:= true;
+end;
+
+function TXmlStandardCMReader.writeStartExtDtd(const locator: TdomLocator;
+                                                     version,
+                                                     encName: UnicodeString): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.startExtDtd(self,locator,version,encName)
+    else result:= true;
+end;
+
+function TXmlStandardCMReader.writeStartIntDtd(const locator: TdomLocator): boolean;
+begin
+  if assigned(NextHandler)
+    then result:= NextHandler.startIntDtd(self,locator)
+    else result:= true;
+end;
+
+function TXmlStandardCMReader.parseloop(const sourceCMNode: TdomCMNode): boolean;
+var
+  i: integer;
+  snSystemId: UnicodeString;
+  versionNumber: UnicodeString;
+  loc: TdomLocator;
+
+  function getBracket(CMAttrDef: TdomCMAttrDefinition): UnicodeString;
+  var
+    k: integer;
+    content: TdomCustomStr;
+  begin
+    if CMAttrDef.hasChildNodes then begin
+      content:= TdomCustomStr.create;
+      try
+        with content do begin
+          addWideChar('(');
+          with CMAttrDef.ChildNodes do begin
+            for k:= 0 to pred(Length) do begin
+              // Write Sheffer stroke to separate TdomCMNameParticle or TdomCMNmtokenParticle names:
+              if k > 0 then addWideString(' | ');
+              // Write TdomCMNameParticle or TdomCMNmtokenParticle name:
+              addWideString(item(k).nodeName);
+            end;
+          end;
+          addWideChar(')');
+          result:= content.value;
+        end;
+      finally
+        content.free;
+      end;
+    end else result:= '';
+  end;
+
+begin
+  with sourceCMNode do begin
+    case NodeType of
+    ctExternalObject: snSystemId:= (sourceCMNode as TdomCMExternalObject).systemId;
+    ctInternalObject: snSystemId:= (sourceCMNode as TdomCMInternalObject).systemId;
+    else
+      if assigned(FCMObject)
+        then snSystemId:= FCMObject.systemId
+        else snSystemId:= '';
+    end; {case ...}
+  end; {with ...}
+
+  loc:= TdomLocator.create(-1,-1,-1,-1,-1,snSystemId,sourceCMNode,nil);
+  try
+    case sourceCMNode.NodeType of
+      ctAttributeList:
+        begin
+          result:= writeStartAttListDeclaration(loc,sourceCMNode.NodeName);
+          if result then begin
+            with TdomCMAttrList(sourceCMNode).childnodes do begin
+              for i:= 0 to pred(length) do begin
+                result:= writeAttributeDefinition(loc,
+                                                  Item(i).nodeName,
+                                                  (Item(i) as TdomCMAttrDefinition).AttributeType,
+                                                  getBracket(Item(i) as TdomCMAttrDefinition),
+                                                  (Item(i) as TdomCMAttrDefinition).DefaultDeclaration,
+                                                  Item(i).NodeValue);
+                if not result then break;
+              end; {for ...}
+            end; {with ...}
+          end; {if ...}
+          if result
+            then result:= writeEndAttListDeclaration(loc);
+        end;
+      ctComment:
+        result:= writeDTDComment(loc,
+                                 (sourceCMNode as TdomCMComment).data);
+      ctElementTypeDeclaration:
+        result:= writeElementTypeDeclaration(loc,
+                                             sourceCMNode.nodeName,
+                                             (sourceCMNode as TdomCMElementTypeDeclaration).Contentspec);
+      ctEntityDeclaration:
+        result:= writeEntityDeclaration(loc,
+                                        sourceCMNode.nodeName,
+                                        sourceCMNode.nodeValue,
+                                        (sourceCMNode as TdomCMEntityDeclaration).publicId,
+                                        (sourceCMNode as TdomCMEntityDeclaration).systemId,
+                                        (sourceCMNode as TdomCMEntityDeclaration).notationName);
+      ctExternalObject: begin
+        versionNumber:= (sourceCMNode as TdomCMExternalObject).version;
+        if versionNumber = '' then  versionNumber:= '1.0';  // xxx necessary?
+        result:= writeStartExtDTD(loc,
+                                  versionNumber,
+                                  (sourceCMNode as TdomCMExternalObject).encoding);
+        if result then begin
+          for i:= 0  to pred(sourceCMNode.childNodes.length) do begin
+            result:= parseloop(sourceCMNode.childNodes.item(i));
+            if not result then break;
+          end;
+        end;
+        if result
+          then result:= writeEndExtDTD(loc);
+      end;
+      ctInternalObject: begin
+        result:= writeStartIntDTD(loc);
+        if result then begin
+          for i:= 0  to pred(sourceCMNode.childNodes.length) do begin
+            result:= parseloop(sourceCMNode.childNodes.item(i));
+            if not result then break;
+          end;
+        end;
+        if result
+          then result:= writeEndIntDTD(loc);
+      end;
+      ctNotationDeclaration:
+        result:= writeNotationDeclaration(loc,
+                                          sourceCMNode.nodeName,
+                                          (sourceCMNode as TdomCMNotationDeclaration).publicId,
+                                          (sourceCMNode as TdomCMNotationDeclaration).systemId);
+      ctParameterEntityDeclaration:
+        result:= true; // do nothing 
+      ctParameterEntityReference:
+        result:= writeParameterEntityRef(loc,
+                                         sourceCMNode.NodeName);
+      ctProcessingInstruction:
+        result:= writeDTDProcessingInstruction(loc,
+                                               (sourceCMNode as TdomCMProcessingInstruction).target,
+                                               (sourceCMNode as TdomCMProcessingInstruction).data);
+      else
+        result:= true;  // xxx raise an exception instead?
+    end; {case ...}
+
+  finally
+    loc.free;
+  end;
+end;
+
+function TXmlStandardCMReader.parse(const sourceCMNode: TdomCMNode): boolean;
+begin
+  result:= parseloop(sourceCMNode);
+end;
+
+
+
+// +++++++++++++++++++++++++ TXmlCustomParser +++++++++++++++++++++++++
+constructor TXmlCustomParser.create(aOwner: TComponent);
+begin
+  inherited;
+  FDOMImpl:= nil;
+end;
+
+procedure TXmlCustomParser.setDomImpl(const impl: TDomImplementation);
+begin
+  FDOMImpl:= impl;
+  if assigned(impl)
+    then impl.FreeNotification(Self);
+end;
+
+procedure TXmlCustomParser.Notification(AComponent: TComponent; Operation: TOperation);
+begin
+  inherited Notification(AComponent,Operation);
+  if (Operation = opRemove) and (AComponent = FDomImpl)
+    then FDomImpl:= nil;
+end;
+
+
+
+// ++++++++++++++++++++++++++ TXmlCMAnalyzer ++++++++++++++++++++++++++
+constructor TXmlCMAnalyzer.create(aOwner: TComponent);
+begin
+  inherited;
+  FCMBuilder:= TXmlCMBuilder.create(self);  // xxx will be replaced by TXmlASBuilder in the future.
+  FCMReader:= TXmlStandardCMReader.create(self);
+  FCMReader.NextHandler:= FCMBuilder;
+  FCMReader.DOMImpl:= FDOMImpl;
+  FDtdReader:= TXmlStandardDtdReader.create(self);
+  FDtdReader.NextHandler:= FCMBuilder;
+  FDtdReader.DOMImpl:= FDOMImpl;
+end;
+
+destructor TXmlCMAnalyzer.destroy;
+begin
+  FCMReader.free;
+  FCMBuilder.free; // xxx will be replaced by TXmlASBuilder in the future.
+  FDtdReader.free;
+  inherited;
+end;
+
+procedure TXmlCMAnalyzer.setDomImpl(const impl: TDomImplementation);
+begin
+  inherited;
+  FCMReader.DOMImpl:= impl;
+  FDtdReader.DOMImpl:= impl;
+end;
+
+function TXmlCMAnalyzer.analyzeCM(const source: TdomCustomCMIEObject;
+                                  const target: TdomCMObject): boolean;
+begin
+  FCMBuilder.contentModel:= target;
+  result:= FCMReader.parse(source);
+end;
+
+procedure TXmlCMAnalyzer.analyzeIntDTDStr(      str: UnicodeString;
+                                          const target: TdomCMObject);
+var
+  WStrStream: TdomWideStringStream;
+  InputSrc: TXmlInputSource;
+begin
+  FCMBuilder.FContentModel:= target;
+  if str = '' then exit;
+  if str[1] <> #$feff
+    then str:= concat(UnicodeString(#$feff),str);
+  WStrStream:= TdomWideStringStream.createFromString(str);
+  try
+    InputSrc:= TXmlInputSource.create(WStrStream,'','',1);
+    try
+      // Note: Testing for illegal XML or Text Declaration is not necessary here.
+      if not FDtdReader.parseInternalSubset(InputSrc)
+        then raise EParserException.create('Parser error.');  // xxx ???
+    finally
+      InputSrc.free;
+    end; {try}
+  finally
+    WStrStream.free;
+  end; {try}
+end;
+
+
+
+{ TXmlToDomParser }
+constructor TXmlToDomParser.create(aOwner: TComponent);
+// Note: If you derive your own parser class from TXmlToDomParser
+// which is calling the inherited create constructor of TXmlToDomParser
+// you should take care of freeing the Handlers, Builders and Readers
+// created here which are not longer of use. Code example:
+//
+// type TMyParser = class(TXmlToDomParser)  ...
+// type TMyXMLReader = class(TXmlStandardDocReader) ...
+//
+// constructor TMyParser.create(aOwner:TComponent);
+// begin
+//   Inherited create(aOwner);
+//   FDocReader.free;
+//   FDocReader:= TMyXMLReader.create;
+//   FDocXMLReader.NextHandler:= FWFTestContentHandler;
+// end;
+begin
+  inherited;
+
+  FDocReader:= TXmlStandardDocReader.create(self);
+  FWFTestContentHandler:= TXmlWFTestContentHandler.create(self);
+  FDocBuilder:= TXmlDocBuilder.create(self);
+  FDtdReader:= TXmlStandardDtdReader.create(self);
+  FWFTestDtdHandler:= TXmlWFTestDtdHandler.create(self);
+  FDtdBuilder:= TXmlDtdBuilder.create(self);
+
+  FDocReader.DOMImpl:= FDOMImpl;
+  FDtdReader.DOMImpl:= FDOMImpl;
+
+  FDocReader.NextHandler:= FWFTestContentHandler;
+  FWFTestContentHandler.NextHandler:= FDocBuilder;
+  FDtdReader.NextHandler:= FWFTestDtdHandler;
+  FWFTestDtdHandler.NextHandler:= FDtdBuilder;
+
+  FTabWidth:= 1;
+end;
+
+procedure TXmlToDomParser.doExternalSubset(const parentSystemId: UnicodeString;
+                                             var publicId,
+                                                 systemId: UnicodeString;
+                                             var stream: TStream;
+                                             var action: TXmlParserAction);
+begin
+  action:= paFail;
+  if assigned(FDOMImpl)
+    then FDOMImpl.doExternalParsedEntity(parentSystemId,publicId,systemId,stream,action);
+end;
+
+function TXmlToDomParser.processDocFile(const pubId,
+                                              sysId: UnicodeString): boolean;
+var
+  MStream: TMemoryStream;
+begin
+  if sysId = ''
+    then raise EAccessViolation.create('Filename not specified.');
+  MStream:= TMemoryStream.create;
+  try
+    MStream.LoadFromFile(sysId);
+    result:= processDocStream(MStream,pubId,sysId);
+  finally
+    MStream.free;
+  end; {try}
+end;
+
+function TXmlToDomParser.processDocSourceCode(const intDtdSourceCode: TXmlSourceCode;
+                                              const pubId,
+                                                    sysId: UnicodeString): boolean;
+var
+  content: TdomCustomStr;
+  i: integer;
+begin
+  if not assigned(intDtdSourceCode) then raise EAccessViolation.create('Stream not specified.');
+  content:= TdomCustomStr.create;
+  try
+    for i:= 0 to intDtdSourceCode.Count -1 do
+      content.addWideString(TXmlSourceCodePiece(intDtdSourceCode[i]).text);
+    result:= processDocWideString(content.value,pubId,sysId);
+  finally
+    content.free;
+  end;
+end;
+
+function TXmlToDomParser.processDocStream(const stream: TStream;
+                                          const pubId,
+                                                sysId: UnicodeString): boolean;
+var
+  InputSrc: TXmlInputSource;
+begin
+  if not assigned(stream) then raise EAccessViolation.create('Stream not specified.');
+  InputSrc:= TXmlInputSource.create(stream,pubId,sysId,FTabWidth);
+  try
+    if InputSrc.hasMalformedDecl
+     or not ( InputSrc.declType in [ DT_XML_DECLARATION,
+                                     DT_XML_OR_TEXT_DECLARATION,
+                                     DT_UNSPECIFIED] )
+    then begin
+      sendErrorNotification(ET_INVALID_XML_DECL);
+      result:= false;
+    end else result:= FDocReader.parse(InputSrc);
+  finally
+    InputSrc.free;
+  end; {try}
+end;
+
+function TXmlToDomParser.processDocString(const str: AnsiString;
+                                          const pubId,
+                                                sysId: UnicodeString): boolean;
+var
+  StrStream: TROBinaryMemoryStream;
+begin
+  if str = '' then raise EAccessViolation.create('Empty string.');
+  StrStream:= TROBinaryMemoryStream.Create(str);
+  try
+    result:= processDocStream(StrStream,pubId,sysId);
+  finally
+    StrStream.free;
+  end; {try}
+end;
+
+function TXmlToDomParser.processDocWideString(str: UnicodeString;
+                                              const pubId,
+                                                    sysId: UnicodeString): boolean;
+var
+  WStrStream: TdomWideStringStream;
+begin
+  if str = '' then raise EAccessViolation.create('Empty string.');
+  if str[1] <> #$feff
+    then  str:= concat(UnicodeString(#$feff),str);
+  WStrStream:= TdomWideStringStream.createFromString(str);
+  try
+    result:= processDocStream(WStrStream,pubId,sysId);
+  finally
+    WStrStream.free;
+  end; {try}
+end;
+
+function TXmlToDomParser.processDtd(const doc: TdomDocument): boolean;
+var
+  PId,SId: UnicodeString;
+  extDtdStream: TStream;
+  action: TXmlParserAction;
+  intSubsetData,intSubsetPubId,intSubsetSysId,extSubsetPubId,extSubsetSysId: UnicodeString;
+begin
+  result:= true;
+  if not assigned(doc) then exit;
+  if not assigned(doc.doctype) then exit;
+
+  intSubsetPubId:= '';                          // xxx Delete this ???
+  intSubsetSysId:= doc.systemId;
+  with doc.doctype do begin
+    intSubsetData:= internalSubset;
+    extSubsetPubId:= publicId;
+    extSubsetSysId:= systemId;
+  end;
+
+  // Evaluate internal subset:
+  if intSubsetData <> '' then begin
+    result:= processIntDtdWideString(intSubsetData,intSubsetPubId,intSubsetSysId);
+    if not result then exit;  // error while parsing?
+  end;
+
+  // xxx Make external content model evaluation optional?
+  // xxx Evaluation of standalone! 
+
+  // Evaluate external subset:
+  if (extSubsetPubId <> '') or (extSubsetSysId <> '') then begin
+    extDtdStream:= nil;
+    PId:= extSubsetPubId;
+    SId:= extSubsetSysId;
+    try
+      doExternalSubset(intSubsetSysId,PId,SId,extDtdStream,action);
+      if action = paFail then begin
+        sendErrorNotification(ET_EXTERNAL_SUBSET_NOT_FOUND);
+        result:= false;
+        exit;
+      end;
+      if assigned(extDtdStream)
+        then result:= processExtDtdStream(extDtdStream,PId,SId);
+    finally
+      if assigned(extDtdStream)
+        then extDtdStream.free;
+    end; {try ... finally ...}
+  end; {if (extSubsetPubId <> '') ...}
+
+end;
+
+function TXmlToDomParser.processExtDtdFile(const pubId,
+                                                 sysId: UnicodeString): boolean;
+var
+  MStream: TMemoryStream;
+begin
+  if sysId = ''
+    then raise EAccessViolation.create('Filename not specified.');
+  MStream:= TMemoryStream.create;
+  try
+    MStream.LoadFromFile(sysId);
+    result:= processExtDtdStream(MStream,pubId,sysId);
+  finally
+    MStream.free;
+  end; {try}
+end;
+
+function TXmlToDomParser.processExtDtdSourceCode(const intDtdSourceCode: TXmlSourceCode;
+                                                 const pubId,
+                                                       sysId: UnicodeString): boolean;
+var
+  content: TdomCustomStr;
+  i: integer;
+begin
+  if not assigned(intDtdSourceCode) then raise EAccessViolation.create('Stream not specified.');
+  content:= TdomCustomStr.create;
+  try
+    for i:= 0 to pred(intDtdSourceCode.Count) do
+      content.addWideString(TXmlSourceCodePiece(intDtdSourceCode[i]).text);
+    result:= processExtDtdWideString(content.value,pubId,sysId);
+  finally
+    content.free;
+  end;
+end;
+
+function TXmlToDomParser.processExtDtdStream(const stream: TStream;
+                                             const pubId,
+                                                   sysId: UnicodeString): boolean;
+var
+  InputSrc: TXmlInputSource;
+begin
+  if not assigned(stream) then raise EAccessViolation.create('Stream not specified.');
+  InputSrc:= TXmlInputSource.create(stream,pubId,sysId,FTabWidth);
+  try
+    if InputSrc.hasMalformedDecl
+     or not ( InputSrc.declType in [ DT_TEXT_DECLARATION,
+                                     DT_XML_OR_TEXT_DECLARATION,
+                                     DT_UNSPECIFIED] )
+    then begin
+      sendErrorNotification(ET_INVALID_TEXT_DECL);
+      result:= false;
+    end else result:= FDtdReader.parseExternalSubset(InputSrc);
+  finally
+    InputSrc.free;
+  end; {try}
+end;
+
+function TXmlToDomParser.processExtDtdString(const str: AnsiString;
+                                             const pubId,
+                                                   sysId: UnicodeString): boolean;
+var
+  StrStream: TROBinaryMemoryStream;
+begin
+  if str = '' then raise EAccessViolation.create('Empty string.');
+  StrStream:= TROBinaryMemoryStream.create(str);
+  try
+    result:= processExtDtdStream(StrStream,pubId,sysId);
+  finally
+    StrStream.free;
+  end; {try}
+end;
+
+function TXmlToDomParser.processExtDtdWideString(str: UnicodeString;
+                                                 const pubId,
+                                                 sysId: UnicodeString): boolean;
+var
+  WStrStream: TdomWideStringStream;
+begin
+  if str = '' then raise EAccessViolation.create('Empty string.');
+  if str[1] <> #$feff
+    then  str:= concat(UnicodeString(#$feff),str);
+  WStrStream:= TdomWideStringStream.createFromString(str);
+  try
+    result:= processExtDtdStream(WStrStream,pubId,sysId);
+  finally
+    WStrStream.free;
+  end; {try}
+end;
+
+function TXmlToDomParser.processIntDtdFile(const pubId,
+                                                 sysId: UnicodeString): boolean;
+var
+  MStream: TMemoryStream;
+begin
+  if sysId = ''
+    then raise EAccessViolation.create('Filename not specified.');
+  MStream:= TMemoryStream.create;
+  try
+    MStream.LoadFromFile(sysId);
+    result:= processIntDtdStream(MStream,pubId,sysId);
+  finally
+    MStream.free;
+  end; {try}
+end;
+
+function TXmlToDomParser.processIntDtdSourceCode(const intDtdSourceCode: TXmlSourceCode;
+                                                 const pubId,
+                                                       sysId: UnicodeString): boolean;
+var
+  content: TdomCustomStr;
+  i: integer;
+begin
+  if not assigned(intDtdSourceCode) then raise EAccessViolation.create('Stream not specified.');
+  content:= TdomCustomStr.create;
+  try
+    for i:= 0 to pred(intDtdSourceCode.Count) do
+      content.addWideString(TXmlSourceCodePiece(intDtdSourceCode[i]).text);
+    result:= processIntDtdWideString(content.value,pubId,sysId);
+  finally
+    content.free;
+  end;
+end;
+
+function TXmlToDomParser.processIntDtdStream(const stream: TStream;
+                                             const pubId,
+                                                   sysId: UnicodeString): boolean;
+var
+  InputSrc: TXmlInputSource;
+begin
+  if not assigned(stream) then raise EAccessViolation.create('Stream not specified.');
+  InputSrc:= TXmlInputSource.create(stream,pubId,sysId,FTabWidth);
+  try
+    if InputSrc.hasMalformedDecl
+     or not ( InputSrc.declType in [ DT_TEXT_DECLARATION,
+                                     DT_XML_OR_TEXT_DECLARATION,
+                                     DT_UNSPECIFIED] )
+    then begin
+      sendErrorNotification(ET_INVALID_TEXT_DECL);
+      result:= false;
+    end else result:= FDtdReader.parseInternalSubset(InputSrc);
+  finally
+    InputSrc.free;
+  end;
+end;
+
+function TXmlToDomParser.processIntDtdString(const str: AnsiString;
+                                             const pubId,
+                                                   sysId: UnicodeString): boolean;
+var
+  StrStream: TROBinaryMemoryStream;
+begin
+  if str = '' then raise EAccessViolation.create('Empty string.');
+  StrStream:= TROBinaryMemoryStream.create(str);
+  try
+    result:= processIntDtdStream(StrStream,pubId,sysId);
+  finally
+    StrStream.free;
+  end; {try}
+end;
+
+function TXmlToDomParser.processIntDtdWideString(str: UnicodeString;
+                                                 const pubId,
+                                                       sysId: UnicodeString): boolean;
+var
+  WStrStream: TdomWideStringStream;
+begin
+  if str = '' then raise EAccessViolation.create('Empty string.');
+  if str[1] <> #$feff
+    then  str:= concat(UnicodeString(#$feff),str);
+  WStrStream:= TdomWideStringStream.createFromString(str);
+  try
+    result:= processIntDtdStream(WStrStream,pubId,sysId);
+  finally
+    WStrStream.free;
+  end; {try}
+end;
+
+function TXmlToDomParser.sendErrorNotification(const xmlErrorType: TXmlErrorType): boolean;
+var
+  error: TdomError;
+begin
+  error:= TdomError.createFromLocator(xmlErrorType,nil,'');
+  try
+    if assigned(FDomImpl) then begin
+      result:= FDomImpl.handleError(self,error);
+    end else if error.severity = DOM_SEVERITY_FATAL_ERROR
+      then result:= false
+      else result:= true;
+  finally
+    error.free;
+  end;
+end;
+
+procedure TXmlToDomParser.setDomImpl(const impl: TDomImplementation);
+begin
+  inherited;
+  FDocReader.DOMImpl:= impl;
+  FDtdReader.DOMImpl:= impl;
+end;
+
+procedure TXmlToDomParser.setTabWidth(const value: integer);
+begin
+  FTabWidth:= value;
+end;
+
+procedure TXmlToDomParser.docSourceCodeToDom(const docSourceCode: TXmlSourceCode;
+                                             const pubId,
+                                                   sysId: UnicodeString;
+                                             const refNode: TdomNode);
+begin
+  FDocBuilder.referenceNode:= refNode;
+  if refNode is TdomDocument
+    then FWFTestContentHandler.testRootFound:= true
+    else FWFTestContentHandler.testRootFound:= false;
+  if not processDocSourceCode(docSourceCode,pubId,sysId)
+    then raise EParserException.create('Parser error.');
+end;
+
+procedure TXmlToDomParser.docStreamToDom(const stream: TStream;
+                                         const pubId,
+                                               sysId: UnicodeString;
+                                         const refNode: TdomNode);
+begin
+  FDocBuilder.referenceNode:= refNode;
+  if refNode is TdomDocument
+    then FWFTestContentHandler.testRootFound:= true
+    else FWFTestContentHandler.testRootFound:= false;
+  if not processDocStream(stream,pubId,sysId)
+    then raise EParserException.create('Parser error.');
+end;
+
+procedure TXmlToDomParser.docStringToDom(const str: Ansistring;
+                                         const pubId,
+                                               sysId: UnicodeString;
+                                         const refNode: TdomNode);
+begin
+  FDocBuilder.referenceNode:= refNode;
+  if refNode is TdomDocument
+    then FWFTestContentHandler.testRootFound:= true
+    else FWFTestContentHandler.testRootFound:= false;
+  if not processDocString(str,pubId,sysId)
+    then raise EParserException.create('Parser error.');
+end;
+
+procedure TXmlToDomParser.docWideStringToDom(      str: UnicodeString;
+                                             const pubId,
+                                                   sysId: UnicodeString;
+                                             const refNode: TdomNode);
+begin
+  FDocBuilder.referenceNode:= refNode;
+  if refNode is TdomDocument
+    then FWFTestContentHandler.testRootFound:= true
+    else FWFTestContentHandler.testRootFound:= false;
+  if not processDocWideString(str,pubId,sysId)
+    then raise EParserException.create('Parser error.');
+end;
+
+procedure TXmlToDomParser.extDtdSourceCodeToDom(const ExtDtdSourceCode: TXmlSourceCode;
+                                                const pubId,
+                                                      sysId: UnicodeString;
+                                                const refNode: TdomCMNode);
+begin
+  FDtdBuilder.extContentModel:= (refNode as TdomCMExternalObject);
+  if not processExtDtdSourceCode(ExtDtdSourceCode,pubId,sysId)
+    then raise EParserException.create('Parser error.');
+end;
+
+procedure TXmlToDomParser.extDtdStreamToDom(const stream: TStream;
+                                            const pubId,
+                                                  sysId: UnicodeString;
+                                            const refNode: TdomCMNode);
+begin
+  FDtdBuilder.extContentModel:= (refNode as TdomCMExternalObject);
+  if not processExtDtdStream(Stream,pubId,sysId)
+    then raise EParserException.create('Parser error.');
+end;
+
+procedure TXmlToDomParser.extDtdStringToDom(const str: Ansistring;
+                                            const pubId,
+                                                  sysId: UnicodeString;
+                                            const refNode: TdomCMNode);
+begin
+  FDtdBuilder.extContentModel:= (refNode as TdomCMExternalObject);
+  if not processExtDtdString(str,pubId,sysId)
+    then raise EParserException.create('Parser error.');
+end;
+
+procedure TXmlToDomParser.extDtdWideStringToDom(      str: UnicodeString;
+                                                const pubId,
+                                                      sysId: UnicodeString;
+                                                const refNode: TdomCMNode);
+begin
+  FDtdBuilder.extContentModel:= (refNode as TdomCMExternalObject);
+  if not processExtDtdWideString(str,pubId,sysId)
+    then raise EParserException.create('Parser error.');
+end;
+
+procedure TXmlToDomParser.intDtdSourceCodeToDom(const intDtdSourceCode: TXmlSourceCode;
+                                                const pubId,
+                                                      sysId: UnicodeString;
+                                                const refNode: TdomCMNode);
+begin
+  FDtdBuilder.intContentModel:= (refNode as TdomCMInternalObject);
+  if not processIntDtdSourceCode(intDtdSourceCode,pubId,sysId)
+    then raise EParserException.create('Parser error.');
+end;
+
+procedure TXmlToDomParser.intDtdStreamToDom(const stream: TStream;
+                                            const pubId,
+                                                  sysId: UnicodeString;
+                                            const refNode: TdomCMNode);
+begin
+  FDtdBuilder.intContentModel:= (refNode as TdomCMInternalObject);
+  if not processIntDtdStream(stream,pubId,sysId)
+    then raise EParserException.create('Parser error.');
+end;
+
+procedure TXmlToDomParser.intDtdStringToDom(const str: Ansistring;
+                                            const pubId,
+                                                  sysId: UnicodeString;
+                                            const refNode: TdomCMNode);
+begin
+  FDtdBuilder.intContentModel:= (refNode as TdomCMInternalObject);
+  if not processIntDtdString(str,pubId,sysId)
+    then raise EParserException.create('Parser error.');
+end;
+
+procedure TXmlToDomParser.intDtdWideStringToDom(      str: UnicodeString;
+                                                const pubId,
+                                                      sysId: UnicodeString;
+                                                const refNode: TdomCMNode);
+begin
+  FDtdBuilder.intContentModel:= (refNode as TdomCMInternalObject);
+  if not processIntDtdWideString(str,pubId,sysId)
+    then raise EParserException.create('Parser error.');
+end;
+
+function TXmlToDomParser.fileToDom(const filename: TFileName): TdomDocument;
+var
+  cmObj: TdomCMObject;
+  intCMObj: TdomCMInternalObject;
+  extCMObj: TdomCMExternalObject;
+begin
+  if not assigned(FDOMImpl)
+    then raise EAccessViolation.create('DOMImplementation not specified.');
+  if Filename = ''
+    then raise EAccessViolation.create('Filename not specified.');
+  result:= FDOMImpl.createDocument('dummy',nil);
+  result.clear;    // Delete the dummy root element
+  cmObj:= FDOMImpl.createCMObject(filename);
+  intCMObj:= FDOMImpl.createCMInternalObject('','');
+  extCMObj:= FDOMImpl.createCMExternalObject('','');
+  cmObj.setInternalCM(intCMObj);
+  cmObj.setExternalCM(extCMObj);
+  result.setContentModel(cmObj);
+  try
+    FDocBuilder.referenceNode:= result;
+    FDtdBuilder.extContentModel:= result.contentModel.externalCM;
+    FDtdBuilder.intContentModel:= result.contentModel.internalCM;
+    if not processDocFile('',filename)
+      then raise EParserException.create('Parser error.');
+    if not processDtd(result)
+      then raise EParserException.create('Parser error.');
+  except
+    FDOMImpl.FreeCMExternalObject(extCMObj);
+    FDOMImpl.FreeCMInternalObject(intCMObj);
+    FDOMImpl.freeCMObject(cmObj);
+    FDOMImpl.freeDocument(result);
+    raise;
+  end;
+  FDocBuilder.referenceNode:= nil;
+  FDtdBuilder.extContentModel:= nil;
+  FDtdBuilder.intContentModel:= nil;
+end;
+
+function TXmlToDomParser.sourceCodeToDom(const sc: TXmlSourceCode): TdomDocument;
+var
+  content: TdomCustomStr;
+  i: integer;
+begin
+  if not assigned(sc)
+    then raise EAccessViolation.create('TXmlSourceCode not specified.');
+  content:= TdomCustomStr.create;
+  try
+    for i:= 0 to pred(sc.count) do
+      content.addWideString(TXmlSourceCodePiece(sc[i]).text);
+    result:= wideStringToDom(content.value);
+  finally
+    content.free;
+  end;
+end;
+
+function TXmlToDomParser.streamToDom(const stream: TStream): TdomDocument;
+var
+  cmObj: TdomCMObject;
+  intCMObj: TdomCMInternalObject;
+  extCMObj: TdomCMExternalObject;
+begin
+  if not assigned(FDOMImpl) then raise EAccessViolation.create('DOMImplementation not specified.');
+  if not assigned(stream) then raise EAccessViolation.create('Stream not specified.');
+  result:= FDOMImpl.createDocument('dummy',nil);
+  result.clear;    // Delete the dummy root element
+  cmObj:= FDOMImpl.createCMObject('');
+  intCMObj:= FDOMImpl.createCMInternalObject('','');
+  extCMObj:= FDOMImpl.createCMExternalObject('','');
+  cmObj.setInternalCM(intCMObj);
+  cmObj.setExternalCM(extCMObj);
+  result.setContentModel(cmObj);
+  try
+    FDocBuilder.referenceNode:= result;
+    FDtdBuilder.extContentModel:= result.contentModel.externalCM;
+    FDtdBuilder.intContentModel:= result.contentModel.internalCM;
+    if not processDocStream(stream,'','')
+      then raise EParserException.create('Parser error.');
+    if not processDtd(result)
+      then raise EParserException.create('Parser error.');
+  except
+    FDOMImpl.FreeCMExternalObject(extCMObj);
+    FDOMImpl.FreeCMInternalObject(intCMObj);
+    FDOMImpl.freeCMObject(cmObj);
+    FDOMImpl.freeDocument(result);
+    raise;
+  end;
+  FDocBuilder.referenceNode:= nil;
+  FDtdBuilder.extContentModel:= nil;
+  FDtdBuilder.intContentModel:= nil;
+end;
+
+function TXmlToDomParser.stringToDom(const str: AnsiString): TdomDocument;
+var
+  cmObj: TdomCMObject;
+  intCMObj: TdomCMInternalObject;
+  extCMObj: TdomCMExternalObject;
+begin
+  if not assigned(FDOMImpl) then raise EAccessViolation.create('DOMImplementation not specified.');
+  result:= FDOMImpl.createDocument('dummy',nil);
+  result.clear;    // Delete the dummy root element
+  cmObj:= FDOMImpl.createCMObject('');
+  intCMObj:= FDOMImpl.createCMInternalObject('','');
+  extCMObj:= FDOMImpl.createCMExternalObject('','');
+  cmObj.setInternalCM(intCMObj);
+  cmObj.setExternalCM(extCMObj);
+  result.setContentModel(cmObj);
+  try
+    FDocBuilder.referenceNode:= result;
+    FDtdBuilder.extContentModel:= result.contentModel.externalCM;
+    FDtdBuilder.intContentModel:= result.contentModel.internalCM;
+    if not processDocString(str,'','')
+      then raise EParserException.create('Parser error.');
+    if not processDtd(result)
+      then raise EParserException.create('Parser error.');
+  except
+    FDOMImpl.FreeCMExternalObject(extCMObj);
+    FDOMImpl.FreeCMInternalObject(intCMObj);
+    FDOMImpl.freeCMObject(cmObj);
+    FDOMImpl.freeDocument(result);
+    raise;
+  end;
+  FDocBuilder.referenceNode:= nil;
+  FDtdBuilder.extContentModel:= nil;
+  FDtdBuilder.intContentModel:= nil;
+end;
+
+function TXmlToDomParser.wideStringToDom(str: UnicodeString): TdomDocument;
+var
+  cmObj: TdomCMObject;
+  intCMObj: TdomCMInternalObject;
+  extCMObj: TdomCMExternalObject;
+begin
+  if not assigned(FDOMImpl) then raise EAccessViolation.create('DOMImplementation not specified.');
+  result:= FDOMImpl.createDocument('dummy',nil);
+  result.clear;    // Delete the dummy root element
+  cmObj:= FDOMImpl.createCMObject('');
+  intCMObj:= FDOMImpl.createCMInternalObject('','');
+  extCMObj:= FDOMImpl.createCMExternalObject('','');
+  cmObj.setInternalCM(intCMObj);
+  cmObj.setExternalCM(extCMObj);
+  result.setContentModel(cmObj);
+  try
+    FDocBuilder.referenceNode:= result;
+    FDtdBuilder.extContentModel:= result.contentModel.externalCM;
+    FDtdBuilder.intContentModel:= result.contentModel.internalCM;
+    if not processDocWideString(str,'','')
+      then raise EParserException.create('Parser error.');
+    if not processDtd(result)
+      then raise EParserException.create('Parser error.');
+  except
+    FDOMImpl.FreeCMExternalObject(extCMObj);
+    FDOMImpl.FreeCMInternalObject(intCMObj);
+    FDOMImpl.freeCMObject(cmObj);
+    FDOMImpl.freeDocument(result);
+    raise;
+  end;
+  FDocBuilder.referenceNode:= nil;
+  FDtdBuilder.extContentModel:= nil;
+  FDtdBuilder.intContentModel:= nil;
+end;
+
+
+
+{ TDomToXmlParser }
+
+constructor TDomToXmlParser.create(aOwner: TComponent);
+begin
+  inherited;
+
+  FDomReader:= TXmlStandardDomReader.create(self);
+  FStreamBuilder:= TXmlStreamBuilder.create(self);
+
+  FDomReader.NextHandler:= FStreamBuilder;
+end;
+
+function TDomToXmlParser.getNewLine: TdomNewLineType;
+begin
+  result:= FStreamBuilder.newLine;
+end;
+
+procedure TDomToXmlParser.setNewLine(const value: TdomNewLineType);
+begin
+  FStreamBuilder.newLine:= value;
+end;
+
+function TDomToXmlParser.writeToStream(const wnode: TdomNode;
+                                       const encoding: UnicodeString;
+                                       const destination: TStream): boolean;
+begin
+  if not assigned(FDOMImpl)
+    then raise EAccessViolation.create('DOMImplementation not specified.');
+  if not assigned(destination)
+    then raise EAccessViolation.create('Destination stream not specified.');
+  if not assigned(wnode)
+    then raise EAccessViolation.create('Source node not specified.');
+
+  FDomReader.DOMImpl:= FDOMImpl;
+  FStreamBuilder.destination:= destination;
+  FStreamBuilder.defaultEncoding:= encoding;  // Raises an ENot_Supported_Err, if the specified encoding is not supported
+  result:= FDomReader.parse(wnode);
+end;
+
+function TDomToXmlParser.writeToString(const wnode: TdomNode;
+                                       const encoding: UnicodeString;
+                                         out S: Ansistring): boolean;
+var
+  xmlStream: TROBinaryMemoryStream;
+begin
+  case StrToEncoding(encoding) of
+    etUTF16BE, etUTF16LE: raise ENot_Supported_Err.create('Encoding not supported error.');
+  end;
+
+  xmlStream:= TROBinaryMemoryStream.create('');
+  try
+    result:= writeToStream(wnode,encoding,xmlStream);
+    S:= xmlStream.ToString;
+  finally
+    xmlStream.free;
+  end;
+end;
+
+function TDomToXmlParser.writeToWideString(const wnode: TdomNode;
+                                             out S: UnicodeString): boolean;
+var
+  xmlStream: TdomWideStringStream;
+begin
+  xmlStream:= TdomWideStringStream.create;
+  try
+    result:= writeToStream(wnode,'UTF-16BE',xmlStream);
+    S:= xmlStream.dataString;
+  finally
+    xmlStream.free;
+  end;
+end;
+
+
+
+{ TCMToXmlParser }
+
+constructor TCMToXmlParser.create(aOwner: TComponent);
+begin
+  inherited;
+
+  FCMReader:= TXmlStandardCMReader.create(self);
+  FStreamBuilder:= TXmlStreamBuilder.create(self);
+
+  FCMReader.NextHandler:= FStreamBuilder;
+end;
+
+function TCMToXmlParser.getNewLine: TdomNewLineType;
+begin
+  result:= FStreamBuilder.newLine;
+end;
+
+procedure TCMToXmlParser.setNewLine(const value: TdomNewLineType);
+begin
+  FStreamBuilder.newLine:= value;
+end;
+
+function TCMToXmlParser.writeToStream(const wnode: TdomCMNode;
+                                      const encoding: UnicodeString;
+                                      const destination: TStream): boolean;
+begin
+  if not assigned(FDOMImpl)
+    then raise EAccessViolation.create('DOMImplementation not specified.');
+  if not assigned(destination)
+    then raise EAccessViolation.create('Destination stream not specified.');
+  if not assigned(wnode)
+    then raise EAccessViolation.create('Source node not specified.');
+
+  FCMReader.DOMImpl:= FDOMImpl;
+  FStreamBuilder.destination:= destination;
+  FStreamBuilder.defaultEncoding:= encoding;  // Raises an ENot_Supported_Err, if the specified encoding is not supported
+  result:= FCMReader.parse(wnode);
+end;
+
+function TCMToXmlParser.writeToString(const wnode: TdomCMNode;
+                                      const encoding: UnicodeString;
+                                        out S: Ansistring): boolean;
+var
+  xmlStream: TROBinaryMemoryStream;
+begin
+  case StrToEncoding(encoding) of
+    etUTF16BE, etUTF16LE: raise ENot_Supported_Err.create('Encoding not supported error.');
+  end;
+
+  xmlStream:= TROBinaryMemoryStream.create('');
+  try
+    result:= writeToStream(wnode,encoding,xmlStream);
+    S:= xmlStream.ToString;
+  finally
+    xmlStream.free;
+  end;
+end;
+
+function TCMToXmlParser.writeToWideString(const wnode: TdomCMNode;
+                                            out S: UnicodeString): boolean;
+var
+  xmlStream: TdomWideStringStream;
+begin
+  xmlStream:= TdomWideStringStream.create;
+  try
+    result:= writeToStream(wnode,'UTF-16BE',xmlStream);
+    S:= xmlStream.dataString;
+  finally
+    xmlStream.free;
+  end;
+end;
+
+
+
+{ TdomXPathSyntaxNodeStack }
+
+constructor TdomXPathSyntaxNodeStack.create;
+begin
+  inherited;
+  FNodeList:= TList.create;
+end;
+
+destructor TdomXPathSyntaxNodeStack.destroy;
+begin
+  clear;
+  FNodeList.free;
+  inherited;
+end;
+
+procedure TdomXPathSyntaxNodeStack.clear;
+var
+  i: integer;
+begin
+  for i:= 0 to pred(FNodeList.Count) do
+    TdomXPathSyntaxNode(FNodeList[i]).free;
+end;
+
+function TdomXPathSyntaxNodeStack.getLength: integer;
+begin
+  result:= FNodeList.count;
+end;
+
+function TdomXPathSyntaxNodeStack.peek(offset: integer): TdomXPathSyntaxNode;
+var
+  index: integer;
+begin
+  index:= pred(FNodeList.count)-offset;
+  if (index < 0) or (index >= FNodeList.count)
+    then result:= nil
+    else result:= TdomXPathSyntaxNode(FNodeList.List^[index]);
+end;
+
+function TdomXPathSyntaxNodeStack.pop: TdomXPathSyntaxNode;
+begin
+  result:= FNodeList[pred(FNodeList.count)];
+  FNodeList.delete(pred(FNodeList.count));
+end;
+
+function TdomXPathSyntaxNodeStack.push(node: TdomXPathSyntaxNode): TdomXPathSyntaxNode;
+begin
+  result:= TdomXPathSyntaxNode(FNodeList.add(node));
+end;
+
+{ TdomXPathSyntaxNode }
+
+constructor TdomXPathSyntaxNode.create(const value: UnicodeString);
+begin
+  FLeft:= nil;
+  FRight:= nil;
+  FValue:= value;
+end;
+
+destructor TdomXPathSyntaxNode.destroy;
+begin
+  if assigned (FLeft) then FLeft.free;
+  if assigned (FRight) then FRight.free;
+  inherited;
+end;
+
+function TdomXPathSyntaxNode.evaluate(const contextNode: TdomNode;
+                                      const oldResult: TdomXPathResult;
+                                      const resolver: TdomXPathNSResolver): TdomXPathResult;
+begin
+  // By default pass the evaluation to the left child XPath syntax node.
+  // If none is present then raise an exception.
+  if assigned(left) then begin
+    result:= left.evaluate(contextNode,oldResult,resolver);
+  end else begin
+    if assigned(oldResult) then oldResult.free;
+    raise ENot_Supported_Err.create('Not supported error.');
+  end;
+end;
+
+{ TdomXPathStep }
+
+function TdomXPathStep.addStep(const step: TdomXPathStep): boolean;
+begin
+  if not assigned(right) then begin
+    right:= step;
+    result:= true;
+  end else begin
+    if right is TdomXPathStep
+      then result:= TdomXPathStep(right).addStep(step)
+      else result:= false;
+  end;
+end;
+
+function TdomXPathStep.evaluate(const contextNode: TdomNode;
+                                const oldResult: TdomXPathResult;
+                                const resolver: TdomXPathNSResolver): TdomXPathResult;
+begin
+  Result := nil;
+  if assigned(oldResult) then oldResult.Free;
+  raise ENot_Supported_Err.create('Not supported error.');
+  // Remark: To evaluate a Step the evaluate2 function must be used.
+end;
+
+function TdomXPathStep.evaluate2(const oldSnapshotResult: TdomXPathSnapshotResult;
+                                 const resolver: TdomXPathNSResolver): TdomXPathSnapshotResult;
+var
+  newResult: TdomXPathSnapshotResult;
+begin
+  if not assigned(oldSnapshotResult)
+    then raise EXPath_Type_Err.create('XPath type error.');
+  if left is TdomXPathCustomAxisName then begin
+
+    if oldSnapshotResult.snapshotLength > 0 then begin
+      newResult:= TdomXPathCustomAxisName(left).evaluate2(oldSnapshotResult,resolver);
+      if right is TdomXPathStep
+        then result:= TdomXPathStep(right).evaluate2(newResult,resolver)
+        else result:= newResult;
+    end else result:= oldSnapshotResult;
+    
+  end else raise EXPath_Type_Err.create('XPath type error.');
+end;
+
+{ TdomXPathCustomAxisName }
+
+constructor TdomXPathCustomAxisName.create(const avalue: UnicodeString);
+begin
+  inherited;
+  FAxisType:= XPATH_FORWARD_AXIS;
+  FPrincipalNodeType:= ntElement_Node;
+end;
+
+function TdomXPathCustomAxisName.evaluate(const contextNode: TdomNode;
+                                          const oldResult: TdomXPathResult;
+                                          const resolver: TdomXPathNSResolver): TdomXPathResult;
+begin
+  Result := nil;
+  if assigned(oldResult) then oldResult.Free;
+  raise ENot_Supported_Err.create('Not supported error.');
+  // Remark: To evaluate an AxisName the evaluate2 function must be used.
+end;
+
+function TdomXPathCustomAxisName.evaluate2(const oldSnapshotResult: TdomXPathSnapshotResult;
+                                           const resolver: TdomXPathNSResolver): TdomXPathSnapshotResult;
+var
+  i: integer;
+  n: TdomNode;
+  axisNodeSnapshot,inputSnapshot,nodeTestSnapshot: TdomXPathSnapshotResult;
+
+  function evaluatePredicate(const snapshot: TdomXPathSnapshotResult):TdomXPathSnapshotResult;
+  begin
+    if assigned(right) then begin
+      if right is TdomXPathPredicate then begin
+        if snapshot.snapshotLength > 0
+          then result:= TdomXPathPredicate(right).evaluate2(snapshot,resolver)
+          else result:= snapshot;
+      end else begin
+        snapshot.free;
+        raise EXPath_Type_Err.create('XPath type error.');
+      end;
+    end else result:= snapshot;
+  end;
+
+  function evaluateNodeTest(const snapshot: TdomXPathSnapshotResult):TdomXPathSnapshotResult;
+  begin
+    if assigned(left) then begin
+      if left is TdomXPathNodeTest then begin
+        if snapshot.snapshotLength > 0
+          then result:= TdomXPathNodeTest(left).evaluate2(snapshot,FPrincipalNodeType,resolver)
+          else result:= snapshot;
+      end else begin
+        snapshot.free;
+        raise EXPath_Type_Err.create('XPath type error.');
+      end;
+    end else raise EXPath_Type_Err.create('XPath type error.');
+  end;
+
+begin
+  if not assigned(oldSnapshotResult)
+    then raise EXPath_Type_Err.create('XPath type error.');
+  try
+    result:= TdomXPathSnapshotResult.create;
+    result.axisType:= axisType;
+    try
+      with oldSnapshotResult do begin
+        for i:= 0 to pred(snapshotLength) do begin
+          n:= snapshotItem(i);
+          if assigned(n) then begin
+            inputSnapshot:= getAxisNodeSnapshot(n);
+            nodeTestSnapshot:= evaluateNodeTest(inputSnapshot);
+            axisNodeSnapshot:= evaluatePredicate(nodeTestSnapshot);
+            result.addSnapshotResult(axisNodeSnapshot);
+          end;
+        end;
+      end;
+    except
+      result.free;
+      raise;
+    end;
+  finally
+    oldSnapshotResult.free;
+  end;
+end;
+
+{ TdomXPathAxisNameAncestor }
+
+constructor TdomXPathAxisNameAncestor.create(const avalue: UnicodeString);
+begin
+  inherited;
+  FAxisType:= XPATH_REVERSE_AXIS;
+end;
+
+function TdomXPathAxisNameAncestor.getAxisNodeSnapshot(const contextNode: TdomNode): TdomXPathSnapshotResult;
+var
+  n: TdomNode;
+begin
+  result:= TdomXPathSnapshotResult.create;
+  result.axisType:= axisType;
+  if assigned(contextNode) then begin
+    case contextNode.nodeType of
+      ntElement_Node,ntText_Node,ntCDATA_Section_Node,ntEntity_Reference_Node,
+      ntProcessing_Instruction_Node,ntComment_Node:
+        n:= contextNode.parentNode;
+      ntAttribute_Node:
+        n:= TdomAttr(contextNode).ownerElement;
+      ntXPath_Namespace_Node:
+        n:= TdomXPathNamespace(contextNode).ownerElement;
+    else
+      n:= nil;
+    end;
+    while assigned(n) do begin
+      result.add(n);
+      n:= n.parentNode;
+    end;
+  end;
+end;
+
+{ TdomXPathAxisNameAncestorOrSelf }
+
+constructor TdomXPathAxisNameAncestorOrSelf.create(const avalue: UnicodeString);
+begin
+  inherited;
+  FAxisType:= XPATH_REVERSE_AXIS;
+end;
+
+function TdomXPathAxisNameAncestorOrSelf.getAxisNodeSnapshot(const contextNode: TdomNode): TdomXPathSnapshotResult;
+var
+  n: TdomNode;
+begin
+  result:= TdomXPathSnapshotResult.create;
+  result.axisType:= axisType;
+  if assigned(contextNode) then begin
+    result.add(contextNode);
+    case contextNode.nodeType of
+      ntElement_Node,ntText_Node,ntCDATA_Section_Node,ntEntity_Reference_Node,
+      ntProcessing_Instruction_Node,ntComment_Node:
+        n:= contextNode.parentNode;
+      ntAttribute_Node:
+        n:= TdomAttr(contextNode).ownerElement;
+      ntXPath_Namespace_Node:
+        n:= TdomXPathNamespace(contextNode).ownerElement;
+    else
+      n:= nil;
+    end;
+    while assigned(n) do begin
+      result.add(n);
+      n:= n.parentNode;
+    end;
+  end;
+end;
+
+{ TdomXPathAxisNameAttribute }
+
+constructor TdomXPathAxisNameAttribute.create(const avalue: UnicodeString);
+begin
+  inherited;
+  FPrincipalNodeType:= ntAttribute_Node;
+end;
+
+function TdomXPathAxisNameAttribute.getAxisNodeSnapshot(const contextNode: TdomNode): TdomXPathSnapshotResult;
+var
+  i: integer;
+begin
+  // xxx Namespace definition attributes must be left out!
+  result:= TdomXPathSnapshotResult.create;
+  result.axisType:= axisType;
+  if assigned(contextNode) then
+    with contextNode do
+      if nodeType = ntElement_Node then
+        with attributes do
+          for i:= 0 to pred(length) do
+            result.add(item(i));
+end;
+
+{ TdomXPathAxisNameChild }
+
+function TdomXPathAxisNameChild.getAxisNodeSnapshot(const contextNode: TdomNode): TdomXPathSnapshotResult;
+var
+  i: integer;
+begin
+  result:= TdomXPathSnapshotResult.create;
+  result.axisType:= axisType;
+  if assigned(contextNode) then
+    with contextNode.childNodes do
+      for i:= 0 to pred(length) do
+        result.add(item(i));
+end;
+
+{ TdomXPathAxisNameDescendant }
+
+function TdomXPathAxisNameDescendant.getAxisNodeSnapshot(const contextNode: TdomNode): TdomXPathSnapshotResult;
+var
+  n: TdomNode;
+begin
+  result:= TdomXPathSnapshotResult.create;
+  result.axisType:= axisType;
+  if assigned(contextNode) then begin
+    with contextNode.ownerDocument.createNodeIterator(contextNode,
+                                                      [ ntElement_Node,
+                                                        ntText_Node,
+                                                        ntCDATA_Section_Node,
+                                                        ntEntity_Reference_Node,
+                                                        ntProcessing_Instruction_Node,
+                                                        ntComment_Node ],
+                                                      nil,
+                                                      false) do begin
+      n:= NextNode;
+      if n = contextNode then n:= NextNode;
+      while assigned(n) do begin
+        result.add(n);
+        n:= NextNode;
+      end;
+      detach;
+    end;
+    contextNode.ownerDocument.clearInvalidNodeIterators;
+  end;
+end;
+
+{ TdomXPathAxisNameDescendantOrSelf }
+
+function TdomXPathAxisNameDescendantOrSelf.getAxisNodeSnapshot(const contextNode: TdomNode): TdomXPathSnapshotResult;
+var
+  n: TdomNode;
+begin
+  result:= TdomXPathSnapshotResult.create;
+  result.axisType:= axisType;
+  if assigned(contextNode) then begin
+    with contextNode.ownerDocument.createNodeIterator(contextNode,
+                                                      [ ntElement_Node,
+                                                        ntText_Node,
+                                                        ntCDATA_Section_Node,
+                                                        ntEntity_Reference_Node,
+                                                        ntProcessing_Instruction_Node,
+                                                        ntComment_Node,
+                                                        ntDocument_Node ],
+                                                      nil,
+                                                      false) do begin
+      n:= NextNode;
+      while assigned(n) do begin
+        result.add(n);
+        n:= NextNode;
+      end;
+      detach;
+    end;
+    contextNode.ownerDocument.clearInvalidNodeIterators;
+  end;
+end;
+
+{ TdomXPathAxisNameFollowing }
+
+function TdomXPathAxisNameFollowing.getAxisNodeSnapshot(const contextNode: TdomNode): TdomXPathSnapshotResult;
+var
+  p,q: TdomNode;
+begin
+  result:= TdomXPathSnapshotResult.create;
+  result.axisType:= axisType;
+  if assigned(contextNode) then begin
+    case contextNode.nodeType of
+      ntElement_Node,ntText_Node,ntCDATA_Section_Node,ntEntity_Reference_Node,
+      ntProcessing_Instruction_Node,ntComment_Node: begin
+        q:= contextNode;
+        p:= contextNode.nextSibling;
+        while assigned(p) do begin
+          if not ( ( (q.nodeType = ntText_Node) or
+                     (q.nodeType = ntCDATA_Section_Node) or
+                     (q.nodeType = ntEntity_Reference_Node) ) and
+                   ( (p.nodeType = ntText_Node) or
+                     (p.nodeType = ntCDATA_Section_Node) or
+                     (p.nodeType = ntEntity_Reference_Node) ) )
+          then result.addSubtree(p);
+          q:= p;
+          p.nextSibling;
+        end;
+      end;
+    end;
+  end;
+end;
+
+{ TdomXPathAxisNameFollowingSibling }
+
+function TdomXPathAxisNameFollowingSibling.getAxisNodeSnapshot(const contextNode: TdomNode): TdomXPathSnapshotResult;
+var
+  p,q: TdomNode;
+begin
+  result:= TdomXPathSnapshotResult.create;
+  result.axisType:= axisType;
+  if assigned(contextNode) then begin
+    case contextNode.nodeType of
+      ntElement_Node,ntText_Node,ntCDATA_Section_Node,ntEntity_Reference_Node,
+      ntProcessing_Instruction_Node,ntComment_Node: begin
+        q:= contextNode;
+        p:= contextNode.nextSibling;
+        while assigned(p) do begin
+          if not ( ( (q.nodeType = ntText_Node) or
+                     (q.nodeType = ntCDATA_Section_Node) or
+                     (q.nodeType = ntEntity_Reference_Node) ) and
+                   ( (p.nodeType = ntText_Node) or
+                     (p.nodeType = ntCDATA_Section_Node) or
+                     (p.nodeType = ntEntity_Reference_Node) ) )
+          then result.add(p);
+          q:= p;
+          p.nextSibling;
+        end;
+      end;
+    end;
+  end;
+end;
+
+{ TdomXPathAxisNameNamespace }
+
+constructor TdomXPathAxisNameNamespace.create(const avalue: UnicodeString);
+begin
+  inherited;
+  FPrincipalNodeType:= ntXPath_Namespace_Node;
+end;
+
+function TdomXPathAxisNameNamespace.getAxisNodeSnapshot(const contextNode: TdomNode): TdomXPathSnapshotResult;
+begin
+  Result := nil;
+  raise ENot_Supported_Err.create('Not supported error.');
+  // xxx Add support for namespace nodes in a later version.
+end;
+
+{ TdomXPathAxisNameParent }
+
+function TdomXPathAxisNameParent.getAxisNodeSnapshot(const contextNode: TdomNode): TdomXPathSnapshotResult;
+var
+  n: TdomNode;
+begin
+  result:= TdomXPathSnapshotResult.create;
+  result.axisType:= axisType;
+  if assigned(contextNode) then begin
+    case contextNode.nodeType of
+      ntElement_Node,ntText_Node,ntCDATA_Section_Node,ntEntity_Reference_Node,
+      ntProcessing_Instruction_Node,ntComment_Node:
+        n:= contextNode.parentNode;
+      ntAttribute_Node:
+        n:= TdomAttr(contextNode).ownerElement;
+      ntXPath_Namespace_Node:
+        n:= TdomXPathNamespace(contextNode).ownerElement;
+    else
+      n:= nil;
+    end;
+    if assigned(n)
+      then result.add(n);
+  end;
+end;
+
+{ TdomXPathAxisNamePreceding }
+
+constructor TdomXPathAxisNamePreceding.create(const avalue: UnicodeString);
+begin
+  inherited;
+  FAxisType:= XPATH_REVERSE_AXIS;
+end;
+
+function TdomXPathAxisNamePreceding.getAxisNodeSnapshot(const contextNode: TdomNode): TdomXPathSnapshotResult;
+var
+  n: TdomNode;
+
+  procedure addPreceding(const snapshot: TdomXPathSnapshotResult;
+                         const node: TdomNode);
+  var
+    p,q: TdomNode;
+  begin
+    case node.nodeType of
+      ntElement_Node,ntText_Node,ntCDATA_Section_Node,ntEntity_Reference_Node,
+      ntProcessing_Instruction_Node,ntComment_Node: begin
+        p:= node.previousSibling;
+        while assigned(p) do begin
+          q:= p.previousSibling;
+          if assigned(q) then begin
+            if not ( ( (p.nodeType = ntText_Node) or
+                       (p.nodeType = ntCDATA_Section_Node) or
+                       (p.nodeType = ntEntity_Reference_Node) ) and
+                     ( (q.nodeType = ntText_Node) or
+                       (q.nodeType = ntCDATA_Section_Node) or
+                       (q.nodeType = ntEntity_Reference_Node) ) )
+            then snapshot.addSubtree(p);
+            p:= q;
+          end else begin
+            snapshot.addSubtree(p);
+            break;
+          end;
+        end;
+      end;
+    end;
+  end;
+
+begin
+  result:= TdomXPathSnapshotResult.create;
+  result.axisType:= axisType;
+  if assigned(contextNode) then begin
+    addPreceding(result,contextNode);
+    case contextNode.nodeType of
+      ntElement_Node,ntText_Node,ntCDATA_Section_Node,ntEntity_Reference_Node,
+      ntProcessing_Instruction_Node,ntComment_Node:
+        n:= contextNode.parentNode;
+      ntAttribute_Node:
+        n:= TdomAttr(contextNode).ownerElement;
+      ntXPath_Namespace_Node:
+        n:= TdomXPathNamespace(contextNode).ownerElement;
+    else
+      n:= nil;
+    end;
+    while assigned(n) do begin
+      addPreceding(result,n);
+      n:= n.parentNode;
+    end;
+  end;
+end;
+
+{ TdomXPathAxisNamePrecedingSibling }
+
+constructor TdomXPathAxisNamePrecedingSibling.create(const avalue: UnicodeString);
+begin
+  inherited;
+  FAxisType:= XPATH_REVERSE_AXIS;
+end;
+
+function TdomXPathAxisNamePrecedingSibling.getAxisNodeSnapshot(const contextNode: TdomNode): TdomXPathSnapshotResult;
+var
+  p,q: TdomNode;
+begin
+  result:= TdomXPathSnapshotResult.create;
+  result.axisType:= axisType;
+  if assigned(contextNode) then begin
+    case contextNode.nodeType of
+      ntElement_Node,ntText_Node,ntCDATA_Section_Node,ntEntity_Reference_Node,
+      ntProcessing_Instruction_Node,ntComment_Node: begin
+        p:= contextNode.previousSibling;
+        while assigned(p) do begin
+          q:= p.previousSibling;
+          if assigned(q) then begin
+            if not ( ( (p.nodeType = ntText_Node) or
+                       (p.nodeType = ntCDATA_Section_Node) or
+                       (p.nodeType = ntEntity_Reference_Node) ) and
+                     ( (q.nodeType = ntText_Node) or
+                       (q.nodeType = ntCDATA_Section_Node) or
+                       (q.nodeType = ntEntity_Reference_Node) ) )
+            then result.add(p);
+            p:= q;
+          end else begin
+            result.add(p);
+            break;
+          end;
+        end;
+      end;
+    end;
+  end;
+end;
+
+{ TdomXPathAxisNameSelf }
+
+function TdomXPathAxisNameSelf.getAxisNodeSnapshot(const contextNode: TdomNode): TdomXPathSnapshotResult;
+begin
+  result:= TdomXPathSnapshotResult.create;
+  result.axisType:= axisType;
+  if assigned(contextNode)
+    then result.add(contextNode);
+end;
+
+{ TdomXPathNodeTest }
+
+function TdomXPathNodeTest.evaluate(const contextNode: TdomNode;
+                                    const oldResult: TdomXPathResult;
+                                    const resolver: TdomXPathNSResolver): TdomXPathResult;
+begin
+  Result := nil;
+  if assigned(oldResult) then oldResult.Free;
+  raise ENot_Supported_Err.create('Not supported error.');
+  // Remark: To evaluate a NodeTest the evaluate2 function must be used.
+end;
+
+function TdomXPathNodeTest.evaluate2(const oldSnapshotResult: TdomXPathSnapshotResult;
+                                     const principalNodeType: TdomNodeType;
+                                     const resolver: TdomXPathNSResolver): TdomXPathSnapshotResult;
+begin
+  if not assigned(oldSnapshotResult)
+    then raise EXPath_Type_Err.create('XPath type error.');
+
+  if left is TdomXPathNameTest then begin
+    result:= TdomXPathNameTest(left).evaluate2(oldSnapshotResult,principalNodeType,resolver);
+  end else if left is TdomXPathNodeTypeComment then begin
+    result:= TdomXPathNodeTypeComment(left).evaluate2(oldSnapshotResult);
+  end else if left is TdomXPathNodeTypeText then begin
+    result:= TdomXPathNodeTypeText(left).evaluate2(oldSnapshotResult);
+  end else if left is TdomXPathNodeTypePI then begin
+    result:= TdomXPathNodeTypePI(left).evaluate2(oldSnapshotResult);
+  end else if left is TdomXPathNodeTypeNode then begin
+    result:= oldSnapshotResult;
+  end else begin
+    oldSnapshotResult.free;
+    raise EXPath_Type_Err.create('XPath type error.');
+  end;
+end;
+
+{ TdomXPathPredicate }
+
+function TdomXPathPredicate.evaluate(const contextNode: TdomNode;
+                                     const oldResult: TdomXPathResult;
+                                     const resolver: TdomXPathNSResolver): TdomXPathResult;
+begin
+  Result := nil;
+  if assigned(oldResult) then oldResult.Free;
+  raise ENot_Supported_Err.create('Not supported error.');
+  // Remark: To evaluate a NodeTest the evaluate2 function must be used.
+end;
+
+function TdomXPathPredicate.evaluate2(const oldSnapshotResult: TdomXPathSnapshotResult;
+                                      const resolver: TdomXPathNSResolver): TdomXPathSnapshotResult;
+var
+  newContextNode: TdomNode;
+  nextPredicateResult: TdomXPathSnapshotResult;
+  predicateResult: TdomXPathResult;
+  predicateResultAsBoolean: TdomXPathBooleanResult;
+  contextPosition: integer;
+begin
+  if not assigned(oldSnapshotResult)
+    then raise EXPath_Type_Err.create('XPath type error.');
+  if not (left is TdomXPathExpr) then begin
+    oldSnapshotResult.free;
+    raise EXPath_Type_Err.create('XPath type error.');
+  end;
+
+  try
+    result:= TdomXPathSnapshotResult.create;
+    result.axisType:= oldSnapshotResult.axisType;
+    with oldSnapshotResult do begin
+      for contextPosition:= 1 to snapshotLength do begin
+        newContextNode:= snapshotitem(pred(contextPosition));
+        try
+          predicateResult:= TdomXPathExpr(left).evaluate(newContextNode,nil,resolver);
+          if predicateResult is TdomXPathNumberResult then begin
+            if TdomXPathNumberResult(predicateResult).numberValue = contextPosition
+              then result.add(newContextNode);
+            predicateResult.free;
+          end else begin
+            predicateResultAsBoolean:= XPathBooleanFunc(predicateResult);
+            if predicateResultAsBoolean.booleanValue
+              then result.add(newContextNode);
+            predicateResultAsBoolean.free;
+          end;
+        except
+          result.free;
+          raise;
+        end;
+      end;
+    end;
+
+    if assigned(right) then begin
+      if right is TdomXPathPredicate then begin
+        nextPredicateResult:= TdomXPathPredicate(right).evaluate2(result,resolver);
+        result:= nextPredicateResult;
+      end else begin
+        result.free;
+        raise EXPath_Type_Err.create('XPath type error.');
+      end;
+    end;
+
+  finally
+    oldSnapshotResult.free;
+  end;
+end;
+
+{ TdomXPathFunctionCall }
+
+function TdomXPathFunctionCall.evaluate(const contextNode: TdomNode;
+                                        const oldResult: TdomXPathResult;
+                                        const resolver: TdomXPathNSResolver): TdomXPathResult;
+begin
+  Result := nil;
+  if assigned(oldResult) then oldResult.Free;
+  raise ENot_Supported_Err.create('Not supported error.');
+  // xxx Support for function calls missing.
+end;
+
+{ TdomXPathUnionExpr }
+
+function TdomXPathUnionExpr.evaluate(const contextNode: TdomNode;
+                                     const oldResult: TdomXPathResult;
+                                     const resolver: TdomXPathNSResolver): TdomXPathResult;
+var
+  leftSnapshotResult: TdomXPathSnapshotResult;
+begin
+  if assigned(oldResult) then oldResult.Free;
+
+  if (left is TdomXPathUnionExpr) and
+     (right is TdomXPathPathExpr)
+  then begin
+
+    leftSnapshotResult:= TdomXPathSnapshotResult(left.evaluate(contextNode,nil,resolver));
+    leftSnapshotResult.axisType:= XPATH_FORWARD_AXIS;
+    try
+      result:= right.evaluate(contextNode,nil,resolver);
+      TdomXPathSnapshotResult(result).addSnapshotResult(leftSnapshotResult);
+    finally
+      leftSnapshotResult.free;
+    end;
+
+  end else begin
+    result:= inherited evaluate(contextNode,nil,resolver);
+    if result is TdomXPathSnapshotResult
+      then TdomXPathSnapshotResult(result).axisType:= XPATH_FORWARD_AXIS;
+  end;
+end;
+
+{ TdomXPathPathExpr }
+
+function TdomXPathPathExpr.addStep(const step: TdomXPathStep): boolean;
+begin
+  if not assigned(right) then begin
+    right:= step;
+    result:= true;
+  end else begin
+    if right is TdomXPathStep
+      then result:= TdomXPathStep(right).addStep(step)
+      else result:= false;
+  end;
+end;
+
+function TdomXPathPathExpr.evaluate(const contextNode: TdomNode;
+                                    const oldResult: TdomXPathResult;
+                                    const resolver: TdomXPathNSResolver): TdomXPathResult;
+var
+  newResult: TdomXPathResult;
+begin
+  if assigned(oldResult) then oldResult.Free;
+  if left is TdomXPathFilterExpr then begin
+    // Filter expression plus optional relative location path:
+    newResult:= TdomXPathFilterExpr(left).evaluate(contextNode,nil,resolver);
+    if right is TdomXPathStep then begin
+      if not (newResult is TdomXPathSnapshotResult) then begin
+        newResult.free;
+        raise EXPath_Type_Err.create('XPath type error.');
+      end;
+      result:= TdomXPathStep(right).evaluate2(TdomXPathSnapshotResult(newResult),resolver);
+    end else result:= newResult;
+  end else if left is TdomXPathAbsoluteLocationPath then begin
+    // Absolute location path:
+    if not assigned(contextNode)
+      then raise EXPath_Type_Err.create('XPath type error.');
+    if not assigned(contextNode.ownerDocument)
+      then raise EXPath_Type_Err.create('XPath type error.');
+    newResult:= TdomXPathSnapshotResult.create;
+    TdomXPathSnapshotResult(newResult).add(contextNode.ownerDocument);
+    if right is TdomXPathStep
+      then result:= TdomXPathStep(right).evaluate2(TdomXPathSnapshotResult(newResult),resolver)
+      else result:= newResult;
+  end else begin
+    // Relative location path:
+    if not (right is TdomXPathStep)
+      then raise EXPath_Type_Err.create('XPath type error.');
+    if not assigned(contextNode)
+      then raise EXPath_Type_Err.create('XPath type error.');
+    newResult:= TdomXPathSnapshotResult.create;
+    TdomXPathSnapshotResult(newResult).add(contextNode);
+    result:= TdomXPathStep(right).evaluate2(TdomXPathSnapshotResult(newResult),resolver)
+  end;
+end;
+
+{ TdomXPathFilterExpr }
+
+function TdomXPathFilterExpr.evaluate(const contextNode: TdomNode;
+                                      const oldResult: TdomXPathResult;
+                                      const resolver: TdomXPathNSResolver): TdomXPathResult;
+var
+  newResult: TdomXPathResult;
+begin
+  if assigned(oldResult) then oldResult.Free;
+  if (left is TdomXPathFilterExpr) and
+     (right is TdomXPathPredicate)
+  then begin
+    // Filter expression plus predicate:
+    newResult:= TdomXPathFilterExpr(left).evaluate(contextNode,nil,resolver);
+    if not (newResult is TdomXPathSnapshotResult) then begin
+      newResult.free;
+      raise EXPath_Type_Err.create('XPath type error.');
+    end;
+
+    // A predicate filters the node-set with respect to the child axis,
+    // so the axis always has to be a forward axis, no matter what axis
+    // the previous expression required:
+    if newResult is TdomXPathSnapshotResult
+      then TdomXPathSnapshotResult(newResult).axisType:= XPATH_FORWARD_AXIS;
+
+    result:= TdomXPathPredicate(right).evaluate2(TdomXPathSnapshotResult(newResult),resolver);
+  end else if (left is TdomXPathPrimaryExpr) and not assigned(right) then begin
+    // PrimaryExpr:
+    result:= TdomXPathPrimaryExpr(left).evaluate(contextNode.ownerDocument.documentElement,nil,resolver);
+  end else raise EXPath_Type_Err.create('XPath type error.');
+end;
+
+{ TdomXPathOrExpr }
+
+function TdomXPathOrExpr.evaluate(const contextNode: TdomNode;
+                                  const oldResult: TdomXPathResult;
+                                  const resolver: TdomXPathNSResolver): TdomXPathResult;
+var
+  booleanResult: TdomXPathBooleanResult;
+begin
+  if assigned(oldResult) then oldResult.Free;
+  if (left is TdomXPathOrExpr) and (right is TdomXPathAndExpr) then begin
+    booleanResult:= XPathBooleanFunc(left.evaluate(contextNode,nil,resolver));
+    if booleanResult.booleanValue then begin
+      result:= booleanResult;
+    end else begin
+      booleanResult.free;
+      result:= XPathBooleanFunc(right.evaluate(contextNode,nil,resolver));
+    end;
+  end else result:= inherited evaluate(contextNode,oldResult,resolver);
+end;
+
+{ TdomXPathAndExpr }
+
+function TdomXPathAndExpr.evaluate(const contextNode: TdomNode;
+                                   const oldResult: TdomXPathResult;
+                                   const resolver: TdomXPathNSResolver): TdomXPathResult;
+var
+  booleanResult: TdomXPathBooleanResult;
+begin
+  if assigned(oldResult) then oldResult.Free;
+  if (left is TdomXPathOrExpr) and (right is TdomXPathAndExpr) then begin
+    booleanResult:= XPathBooleanFunc(left.evaluate(contextNode,nil,resolver));
+    if not booleanResult.booleanValue then begin
+      result:= booleanResult;
+    end else begin
+      booleanResult.free;
+      result:= XPathBooleanFunc(right.evaluate(contextNode,nil,resolver));
+    end;
+  end else result:= inherited evaluate(contextNode,oldResult,resolver);
+end;
+
+{ TdomXPathIsEqualExpr }
+
+function TdomXPathIsEqualExpr.evaluate(const contextNode: TdomNode;
+                                       const oldResult: TdomXPathResult;
+                                       const resolver: TdomXPathNSResolver): TdomXPathResult;
+var
+  leftResult,rightResult,swapResult: TdomXPathResult;
+  stringResult: TdomXPathStringResult;
+  leftBoolean,rightBoolean: TdomXPathBooleanResult;
+  leftNumber,rightNumber: TdomXPathNumberResult;
+  leftString,rightString: TdomXPathStringResult;
+  leftResultString: UnicodeString;
+  i,j: integer;
+begin
+  if assigned(oldResult) then oldResult.Free;
+  result:= nil;
+  if ( (left is TdomXPathIsEqualExpr) or
+       (left is TdomXPathIsNotEqualExpr) ) and
+     ( (right is TdomXPathLessThanExpr) or
+       (right is TdomXPathLessThanOrEqualExpr) or
+       (right is TdomXPathGreaterThanExpr) or
+       (right is TdomXPathGreaterThanOrEqualExpr) )
+  then begin
+    leftResult:= left.evaluate(contextNode,nil,resolver);
+    try
+      rightResult:= right.evaluate(contextNode,nil,resolver);
+      try
+
+        // Make sure, that if at least one set takes part in the comparision,
+        // it is assigned to rightResult:
+        if rightResult is TdomXPathSnapshotResult then begin
+          swapResult:= leftResult;
+          leftResult:= rightResult;
+          rightResult:= swapResult;
+        end;
+
+        if leftResult is TdomXPathSnapshotResult then begin
+          if rightResult is TdomXPathSnapshotResult then begin
+            for i:= 0 to pred(TdomXPathSnapshotResult(leftResult).snapshotLength) do begin
+              leftResultString:= TdomXPathSnapshotResult(leftResult).snapshotItem(i).XPathStringValue;
+              for j:= 0 to pred(TdomXPathSnapshotResult(rightResult).snapshotLength) do begin
+                if TdomXPathSnapshotResult(rightResult).snapshotItem(j).XPathStringValue = leftResultString then begin
+                  result:= TdomXPathBooleanResult.create(true);
+                  exit;
+                end;
+              end;
+            end;
+            result:= TdomXPathBooleanResult.create(false);
+            exit;
+          end else if (rightResult is TdomXPathNumberResult) or
+                      (rightResult is TdomXPathBooleanResult) or
+                      (rightResult is TdomXPathStringResult)
+          then begin
+            stringResult:= XPathStringFunc(rightResult);
+            for i:= 0 to pred(TdomXPathSnapshotResult(leftResult).snapshotLength) do begin
+              if TdomXPathSnapshotResult(leftResult).snapshotItem(i).XPathStringValue = stringResult.stringValue then begin
+                result:= TdomXPathBooleanResult.create(true);
+                rightResult:= stringResult;  // Re-assignment is required for correct freeing the TdomXPathResult below.
+                exit;
+              end;
+            end;
+            result:= TdomXPathBooleanResult.create(false);
+            rightResult:= stringResult;  // Re-assignment is required for correct freeing the TdomXPathResult below.
+            exit;
+          end;
+        end else if (leftResult is TdomXPathBooleanResult) or
+                    (rightResult is TdomXPathBooleanResult)
+        then begin
+          leftBoolean:= XPathBooleanFunc(leftResult);
+          rightBoolean:= XPathBooleanFunc(rightResult);
+          if leftBoolean.booleanValue = rightBoolean.booleanValue
+            then result:= TdomXPathBooleanResult.create(true)
+            else result:= TdomXPathBooleanResult.create(false);
+          leftResult:= leftBoolean;    // Re-assignment is required for correct
+          rightResult:= rightBoolean;  // freeing the TdomXPathResult below.
+        end else if (leftResult is TdomXPathNumberResult) or
+                    (rightResult is TdomXPathNumberResult)
+        then begin
+          leftNumber:= XPathNumberFunc(leftResult);
+          rightNumber:= XPathNumberFunc(rightResult);
+          if leftNumber.numberValue = rightNumber.numberValue
+            then result:= TdomXPathBooleanResult.create(true)
+            else result:= TdomXPathBooleanResult.create(false);
+          leftResult:= leftNumber;    // Re-assignment is required for correct
+          rightResult:= rightNumber;  // freeing the TdomXPathResult below.
+        end else begin
+          leftString:= XPathStringFunc(leftResult);
+          rightString:= XPathStringFunc(rightResult);
+          if leftString.stringValue = rightString.stringValue
+            then result:= TdomXPathBooleanResult.create(true)
+            else result:= TdomXPathBooleanResult.create(false);
+          leftResult:= leftString;    // Re-assignment is required for correct
+          rightResult:= rightString;  // freeing the TdomXPathResult below.
+        end;
+
+      finally
+        rightResult.free;
+      end;
+    finally
+      leftResult.free;
+    end;
+  end else result:= inherited evaluate(contextNode,oldResult,resolver);
+end;
+
+{ TdomXPathIsNotEqualExpr }
+
+function TdomXPathIsNotEqualExpr.evaluate(const contextNode: TdomNode;
+                                          const oldResult: TdomXPathResult;
+                                          const resolver: TdomXPathNSResolver): TdomXPathResult;
+var
+  leftResult,rightResult,swapResult: TdomXPathResult;
+  stringResult: TdomXPathStringResult;
+  leftBoolean,rightBoolean: TdomXPathBooleanResult;
+  leftNumber,rightNumber: TdomXPathNumberResult;
+  leftString,rightString: TdomXPathStringResult;
+  leftResultString: UnicodeString;
+  i,j: integer;
+begin
+  if assigned(oldResult) then oldResult.Free;
+  result:= nil;
+  if ( (left is TdomXPathIsEqualExpr) or
+       (left is TdomXPathIsNotEqualExpr) ) and
+     ( (right is TdomXPathLessThanExpr) or
+       (right is TdomXPathLessThanOrEqualExpr) or
+       (right is TdomXPathGreaterThanExpr) or
+       (right is TdomXPathGreaterThanOrEqualExpr) )
+  then begin
+    leftResult:= left.evaluate(contextNode,nil,resolver);
+    try
+      rightResult:= right.evaluate(contextNode,nil,resolver);
+      try
+
+        // Make sure, that if at least one set takes part in the comparision,
+        // it is assigned to rightResult:
+        if rightResult is TdomXPathSnapshotResult then begin
+          swapResult:= leftResult;
+          leftResult:= rightResult;
+          rightResult:= swapResult;
+        end;
+
+        if leftResult is TdomXPathSnapshotResult then begin
+          if rightResult is TdomXPathSnapshotResult then begin
+            for i:= 0 to pred(TdomXPathSnapshotResult(leftResult).snapshotLength) do begin
+              leftResultString:= TdomXPathSnapshotResult(leftResult).snapshotItem(i).XPathStringValue;
+              for j:= 0 to pred(TdomXPathSnapshotResult(rightResult).snapshotLength) do begin
+                if TdomXPathSnapshotResult(rightResult).snapshotItem(j).XPathStringValue <> leftResultString then begin
+                  result:= TdomXPathBooleanResult.create(true);
+                  exit;
+                end;
+              end;
+            end;
+            result:= TdomXPathBooleanResult.create(false);
+            exit;
+          end else if (rightResult is TdomXPathNumberResult) or
+                      (rightResult is TdomXPathBooleanResult) or
+                      (rightResult is TdomXPathStringResult)
+          then begin
+            stringResult:= XPathStringFunc(rightResult);
+            for i:= 0 to pred(TdomXPathSnapshotResult(leftResult).snapshotLength) do begin
+              if TdomXPathSnapshotResult(leftResult).snapshotItem(i).XPathStringValue <> stringResult.stringValue then begin
+                result:= TdomXPathBooleanResult.create(true);
+                rightResult:= stringResult;  // Re-assignment is required for correct freeing the TdomXPathResult below.
+                exit;
+              end;
+            end;
+            result:= TdomXPathBooleanResult.create(false);
+            rightResult:= stringResult;  // Re-assignment is required for correct freeing the TdomXPathResult below.
+            exit;
+          end;
+        end else if (leftResult is TdomXPathBooleanResult) or
+                    (rightResult is TdomXPathBooleanResult)
+        then begin
+          leftBoolean:= XPathBooleanFunc(leftResult);
+          rightBoolean:= XPathBooleanFunc(rightResult);
+          if leftBoolean.booleanValue <> rightBoolean.booleanValue
+            then result:= TdomXPathBooleanResult.create(true)
+            else result:= TdomXPathBooleanResult.create(false);
+          leftResult:= leftBoolean;    // Re-assignment is required for correct
+          rightResult:= rightBoolean;  // freeing the TdomXPathResult below.
+        end else if (leftResult is TdomXPathNumberResult) or
+                    (rightResult is TdomXPathNumberResult)
+        then begin
+          leftNumber:= XPathNumberFunc(leftResult);
+          rightNumber:= XPathNumberFunc(rightResult);
+          if leftNumber.numberValue <> rightNumber.numberValue
+            then result:= TdomXPathBooleanResult.create(true)
+            else result:= TdomXPathBooleanResult.create(false);
+          leftResult:= leftNumber;    // Re-assignment is required for correct
+          rightResult:= rightNumber;  // freeing the TdomXPathResult below.
+        end else begin
+          leftString:= XPathStringFunc(leftResult);
+          rightString:= XPathStringFunc(rightResult);
+          if leftString.stringValue <> rightString.stringValue
+            then result:= TdomXPathBooleanResult.create(true)
+            else result:= TdomXPathBooleanResult.create(false);
+          leftResult:= leftString;    // Re-assignment is required for correct
+          rightResult:= rightString;  // freeing the TdomXPathResult below.
+        end;
+
+      finally
+        rightResult.free;
+      end;
+    finally
+      leftResult.free;
+    end;
+  end else result:= inherited evaluate(contextNode,oldResult,resolver);
+end;
+
+{ TdomXPathLessThanExpr }
+
+function TdomXPathLessThanExpr.evaluate(const contextNode: TdomNode;
+                                        const oldResult: TdomXPathResult;
+                                        const resolver: TdomXPathNSResolver): TdomXPathResult;
+var
+  leftResult,rightResult: TdomXPathResult;
+  stringResult: TdomXPathStringResult;
+  leftNumber,rightNumber: TdomXPathNumberResult;
+  leftResultString: UnicodeString;
+  i,j: integer;
+begin
+  if assigned(oldResult) then oldResult.Free;
+  if ( (left is TdomXPathLessThanExpr) or
+       (left is TdomXPathLessThanOrEqualExpr) or
+       (left is TdomXPathGreaterThanExpr) or
+       (left is TdomXPathGreaterThanOrEqualExpr) ) and
+     ( (right is TdomXPathPlusExpr) or
+       (right is TdomXPathMinusExpr) )
+  then begin
+    leftResult:= left.evaluate(contextNode,nil,resolver);
+    try
+      rightResult:= right.evaluate(contextNode,nil,resolver);
+      try
+
+        if (leftResult is TdomXPathSnapshotResult) and
+           (rightResult is TdomXPathSnapshotResult)
+        then begin
+          for i:= 0 to pred(TdomXPathSnapshotResult(leftResult).snapshotLength) do begin
+            leftResultString:= TdomXPathSnapshotResult(leftResult).snapshotItem(i).XPathStringValue;
+            for j:= 0 to pred(TdomXPathSnapshotResult(rightResult).snapshotLength) do begin
+              if TdomXPathSnapshotResult(rightResult).snapshotItem(j).XPathStringValue < leftResultString then begin
+                result:= TdomXPathBooleanResult.create(true);
+                exit;
+              end;
+            end;
+          end;
+          result:= TdomXPathBooleanResult.create(false);
+          exit;
+        end else if (leftResult is TdomXPathSnapshotResult) and
+                    ( (rightResult is TdomXPathNumberResult) or
+                      (rightResult is TdomXPathBooleanResult) or
+                      (rightResult is TdomXPathStringResult) )
+        then begin
+          stringResult:= XPathStringFunc(rightResult);
+          for i:= 0 to pred(TdomXPathSnapshotResult(leftResult).snapshotLength) do begin
+            if TdomXPathSnapshotResult(leftResult).snapshotItem(i).XPathStringValue < stringResult.stringValue then begin
+              result:= TdomXPathBooleanResult.create(true);
+              rightResult:= stringResult;  // Re-assignment is required for correct freeing the TdomXPathResult below.
+              exit;
+            end;
+          end;
+          result:= TdomXPathBooleanResult.create(false);
+          rightResult:= stringResult;  // Re-assignment is required for correct freeing the TdomXPathResult below.
+          exit;
+        end else if ( (leftResult is TdomXPathNumberResult) or
+                      (leftResult is TdomXPathBooleanResult) or
+                      (leftResult is TdomXPathStringResult) ) and
+                    (rightResult is TdomXPathSnapshotResult)
+        then begin
+          stringResult:= XPathStringFunc(leftResult);
+          for i:= 0 to pred(TdomXPathSnapshotResult(rightResult).snapshotLength) do begin
+            if stringResult.stringValue < TdomXPathSnapshotResult(rightResult).snapshotItem(i).XPathStringValue then begin
+              result:= TdomXPathBooleanResult.create(true);
+              leftResult:= stringResult;  // Re-assignment is required for correct freeing the TdomXPathResult below.
+              exit;
+            end;
+          end;
+          result:= TdomXPathBooleanResult.create(false);
+          leftResult:= stringResult;  // Re-assignment is required for correct freeing the TdomXPathResult below.
+          exit;
+        end else begin
+          leftNumber:= XPathNumberFunc(leftResult);
+          rightNumber:= XPathNumberFunc(rightResult);
+          if leftNumber.numberValue < rightNumber.numberValue
+            then result:= TdomXPathBooleanResult.create(true)
+            else result:= TdomXPathBooleanResult.create(false);
+          leftResult:= leftNumber;    // Re-assignment is required for correct
+          rightResult:= rightNumber;  // freeing the TdomXPathResult below.
+        end;
+
+      finally
+        rightResult.free;
+      end;
+    finally
+      leftResult.free;
+    end;
+  end else result:= inherited evaluate(contextNode,oldResult,resolver);
+end;
+
+{ TdomXPathLessThanOrEqualExpr }
+
+function TdomXPathLessThanOrEqualExpr.evaluate(const contextNode: TdomNode;
+                                               const oldResult: TdomXPathResult;
+                                               const resolver: TdomXPathNSResolver): TdomXPathResult;
+var
+  leftResult,rightResult: TdomXPathResult;
+  stringResult: TdomXPathStringResult;
+  leftNumber,rightNumber: TdomXPathNumberResult;
+  leftResultString: UnicodeString;
+  i,j: integer;
+begin
+  if assigned(oldResult) then oldResult.Free;
+  if ( (left is TdomXPathLessThanExpr) or
+       (left is TdomXPathLessThanOrEqualExpr) or
+       (left is TdomXPathGreaterThanExpr) or
+       (left is TdomXPathGreaterThanOrEqualExpr) ) and
+     ( (right is TdomXPathPlusExpr) or
+       (right is TdomXPathMinusExpr) )
+  then begin
+    leftResult:= left.evaluate(contextNode,nil,resolver);
+    try
+      rightResult:= right.evaluate(contextNode,nil,resolver);
+      try
+
+        if (leftResult is TdomXPathSnapshotResult) and
+           (rightResult is TdomXPathSnapshotResult)
+        then begin
+          for i:= 0 to pred(TdomXPathSnapshotResult(leftResult).snapshotLength) do begin
+            leftResultString:= TdomXPathSnapshotResult(leftResult).snapshotItem(i).XPathStringValue;
+            for j:= 0 to pred(TdomXPathSnapshotResult(rightResult).snapshotLength) do begin
+              if TdomXPathSnapshotResult(rightResult).snapshotItem(j).XPathStringValue <= leftResultString then begin
+                result:= TdomXPathBooleanResult.create(true);
+                exit;
+              end;
+            end;
+          end;
+          result:= TdomXPathBooleanResult.create(false);
+          exit;
+        end else if (leftResult is TdomXPathSnapshotResult) and
+                    ( (rightResult is TdomXPathNumberResult) or
+                      (rightResult is TdomXPathBooleanResult) or
+                      (rightResult is TdomXPathStringResult) )
+        then begin
+          stringResult:= XPathStringFunc(rightResult);
+          for i:= 0 to pred(TdomXPathSnapshotResult(leftResult).snapshotLength) do begin
+            if TdomXPathSnapshotResult(leftResult).snapshotItem(i).XPathStringValue <= stringResult.stringValue then begin
+              result:= TdomXPathBooleanResult.create(true);
+              rightResult:= stringResult;  // Re-assignment is required for correct freeing the TdomXPathResult below.
+              exit;
+            end;
+          end;
+          result:= TdomXPathBooleanResult.create(false);
+          rightResult:= stringResult;  // Re-assignment is required for correct freeing the TdomXPathResult below.
+          exit;
+        end else if ( (leftResult is TdomXPathNumberResult) or
+                      (leftResult is TdomXPathBooleanResult) or
+                      (leftResult is TdomXPathStringResult) ) and
+                    (rightResult is TdomXPathSnapshotResult)
+        then begin
+          stringResult:= XPathStringFunc(leftResult);
+          for i:= 0 to pred(TdomXPathSnapshotResult(rightResult).snapshotLength) do begin
+            if stringResult.stringValue <= TdomXPathSnapshotResult(rightResult).snapshotItem(i).XPathStringValue then begin
+              result:= TdomXPathBooleanResult.create(true);
+              leftResult:= stringResult;  // Re-assignment is required for correct freeing the TdomXPathResult below.
+              exit;
+            end;
+          end;
+          result:= TdomXPathBooleanResult.create(false);
+          leftResult:= stringResult;  // Re-assignment is required for correct freeing the TdomXPathResult below.
+          exit;
+        end else begin
+          leftNumber:= XPathNumberFunc(leftResult);
+          rightNumber:= XPathNumberFunc(rightResult);
+          if leftNumber.numberValue <= rightNumber.numberValue
+            then result:= TdomXPathBooleanResult.create(true)
+            else result:= TdomXPathBooleanResult.create(false);
+          leftResult:= leftNumber;    // Re-assignment is required for correct
+          rightResult:= rightNumber;  // freeing the TdomXPathResult below.
+        end;
+
+      finally
+        rightResult.free;
+      end;
+    finally
+      leftResult.free;
+    end;
+  end else result:= inherited evaluate(contextNode,oldResult,resolver);
+end;
+
+{ TdomXPathGreaterThanExpr }
+
+function TdomXPathGreaterThanExpr.evaluate(const contextNode: TdomNode;
+                                           const oldResult: TdomXPathResult;
+                                           const resolver: TdomXPathNSResolver): TdomXPathResult;
+var
+  leftResult,rightResult: TdomXPathResult;
+  stringResult: TdomXPathStringResult;
+  leftNumber,rightNumber: TdomXPathNumberResult;
+  leftResultString: UnicodeString;
+  i,j: integer;
+begin
+  if assigned(oldResult) then oldResult.Free;
+  if ( (left is TdomXPathLessThanExpr) or
+       (left is TdomXPathLessThanOrEqualExpr) or
+       (left is TdomXPathGreaterThanExpr) or
+       (left is TdomXPathGreaterThanOrEqualExpr) ) and
+     ( (right is TdomXPathPlusExpr) or
+       (right is TdomXPathMinusExpr) )
+  then begin
+    leftResult:= left.evaluate(contextNode,nil,resolver);
+    try
+      rightResult:= right.evaluate(contextNode,nil,resolver);
+      try
+
+        if (leftResult is TdomXPathSnapshotResult) and
+           (rightResult is TdomXPathSnapshotResult)
+        then begin
+          for i:= 0 to pred(TdomXPathSnapshotResult(leftResult).snapshotLength) do begin
+            leftResultString:= TdomXPathSnapshotResult(leftResult).snapshotItem(i).XPathStringValue;
+            for j:= 0 to pred(TdomXPathSnapshotResult(rightResult).snapshotLength) do begin
+              if TdomXPathSnapshotResult(rightResult).snapshotItem(j).XPathStringValue > leftResultString then begin
+                result:= TdomXPathBooleanResult.create(true);
+                exit;
+              end;
+            end;
+          end;
+          result:= TdomXPathBooleanResult.create(false);
+          exit;
+        end else if (leftResult is TdomXPathSnapshotResult) and
+                    ( (rightResult is TdomXPathNumberResult) or
+                      (rightResult is TdomXPathBooleanResult) or
+                      (rightResult is TdomXPathStringResult) )
+        then begin
+          stringResult:= XPathStringFunc(rightResult);
+          for i:= 0 to pred(TdomXPathSnapshotResult(leftResult).snapshotLength) do begin
+            if TdomXPathSnapshotResult(leftResult).snapshotItem(i).XPathStringValue > stringResult.stringValue then begin
+              result:= TdomXPathBooleanResult.create(true);
+              rightResult:= stringResult;  // Re-assignment is required for correct freeing the TdomXPathResult below.
+              exit;
+            end;
+          end;
+          result:= TdomXPathBooleanResult.create(false);
+          rightResult:= stringResult;  // Re-assignment is required for correct freeing the TdomXPathResult below.
+          exit;
+        end else if ( (leftResult is TdomXPathNumberResult) or
+                      (leftResult is TdomXPathBooleanResult) or
+                      (leftResult is TdomXPathStringResult) ) and
+                    (rightResult is TdomXPathSnapshotResult)
+        then begin
+          stringResult:= XPathStringFunc(leftResult);
+          for i:= 0 to pred(TdomXPathSnapshotResult(rightResult).snapshotLength) do begin
+            if stringResult.stringValue > TdomXPathSnapshotResult(rightResult).snapshotItem(i).XPathStringValue then begin
+              result:= TdomXPathBooleanResult.create(true);
+              leftResult:= stringResult;  // Re-assignment is required for correct freeing the TdomXPathResult below.
+              exit;
+            end;
+          end;
+          result:= TdomXPathBooleanResult.create(false);
+          leftResult:= stringResult;  // Re-assignment is required for correct freeing the TdomXPathResult below.
+          exit;
+        end else begin
+          leftNumber:= XPathNumberFunc(leftResult);
+          rightNumber:= XPathNumberFunc(rightResult);
+          if leftNumber.numberValue > rightNumber.numberValue
+            then result:= TdomXPathBooleanResult.create(true)
+            else result:= TdomXPathBooleanResult.create(false);
+          leftResult:= leftNumber;    // Re-assignment is required for correct
+          rightResult:= rightNumber;  // freeing the TdomXPathResult below.
+        end;
+
+      finally
+        rightResult.free;
+      end;
+    finally
+      leftResult.free;
+    end;
+  end else result:= inherited evaluate(contextNode,oldResult,resolver);
+end;
+
+{ TdomXPathGreaterThanOrEqualExpr }
+
+function TdomXPathGreaterThanOrEqualExpr.evaluate(const contextNode: TdomNode;
+                                                  const oldResult: TdomXPathResult;
+                                                  const resolver: TdomXPathNSResolver): TdomXPathResult;
+var
+  leftResult,rightResult: TdomXPathResult;
+  stringResult: TdomXPathStringResult;
+  leftNumber,rightNumber: TdomXPathNumberResult;
+  leftResultString: UnicodeString;
+  i,j: integer;
+begin
+  if assigned(oldResult) then oldResult.Free;
+  if ( (left is TdomXPathLessThanExpr) or
+       (left is TdomXPathLessThanOrEqualExpr) or
+       (left is TdomXPathGreaterThanExpr) or
+       (left is TdomXPathGreaterThanOrEqualExpr) ) and
+     ( (right is TdomXPathPlusExpr) or
+       (right is TdomXPathMinusExpr) )
+  then begin
+    leftResult:= left.evaluate(contextNode,nil,resolver);
+    try
+      rightResult:= right.evaluate(contextNode,nil,resolver);
+      try
+
+        if (leftResult is TdomXPathSnapshotResult) and
+           (rightResult is TdomXPathSnapshotResult)
+        then begin
+          for i:= 0 to pred(TdomXPathSnapshotResult(leftResult).snapshotLength) do begin
+            leftResultString:= TdomXPathSnapshotResult(leftResult).snapshotItem(i).XPathStringValue;
+            for j:= 0 to pred(TdomXPathSnapshotResult(rightResult).snapshotLength) do begin
+              if TdomXPathSnapshotResult(rightResult).snapshotItem(j).XPathStringValue >= leftResultString then begin
+                result:= TdomXPathBooleanResult.create(true);
+                exit;
+              end;
+            end;
+          end;
+          result:= TdomXPathBooleanResult.create(false);
+          exit;
+        end else if (leftResult is TdomXPathSnapshotResult) and
+                    ( (rightResult is TdomXPathNumberResult) or
+                      (rightResult is TdomXPathBooleanResult) or
+                      (rightResult is TdomXPathStringResult) )
+        then begin
+          stringResult:= XPathStringFunc(rightResult);
+          for i:= 0 to pred(TdomXPathSnapshotResult(leftResult).snapshotLength) do begin
+            if TdomXPathSnapshotResult(leftResult).snapshotItem(i).XPathStringValue >= stringResult.stringValue then begin
+              result:= TdomXPathBooleanResult.create(true);
+              rightResult:= stringResult;  // Re-assignment is required for correct freeing the TdomXPathResult below.
+              exit;
+            end;
+          end;
+          result:= TdomXPathBooleanResult.create(false);
+          rightResult:= stringResult;  // Re-assignment is required for correct freeing the TdomXPathResult below.
+          exit;
+        end else if ( (leftResult is TdomXPathNumberResult) or
+                      (leftResult is TdomXPathBooleanResult) or
+                      (leftResult is TdomXPathStringResult) ) and
+                    (rightResult is TdomXPathSnapshotResult)
+        then begin
+          stringResult:= XPathStringFunc(leftResult);
+          for i:= 0 to pred(TdomXPathSnapshotResult(rightResult).snapshotLength) do begin
+            if stringResult.stringValue >= TdomXPathSnapshotResult(rightResult).snapshotItem(i).XPathStringValue then begin
+              result:= TdomXPathBooleanResult.create(true);
+              leftResult:= stringResult;  // Re-assignment is required for correct freeing the TdomXPathResult below.
+              exit;
+            end;
+          end;
+          result:= TdomXPathBooleanResult.create(false);
+          leftResult:= stringResult;  // Re-assignment is required for correct freeing the TdomXPathResult below.
+          exit;
+        end else begin
+          leftNumber:= XPathNumberFunc(leftResult);
+          rightNumber:= XPathNumberFunc(rightResult);
+          if leftNumber.numberValue >= rightNumber.numberValue
+            then result:= TdomXPathBooleanResult.create(true)
+            else result:= TdomXPathBooleanResult.create(false);
+          leftResult:= leftNumber;    // Re-assignment is required for correct
+          rightResult:= rightNumber;  // freeing the TdomXPathResult below.
+        end;
+
+      finally
+        rightResult.free;
+      end;
+    finally
+      leftResult.free;
+    end;
+  end else result:= inherited evaluate(contextNode,oldResult,resolver);
+end;
+
+{ TdomXPathPlusExpr }
+
+function TdomXPathPlusExpr.evaluate(const contextNode: TdomNode;
+                                    const oldResult: TdomXPathResult;
+                                    const resolver: TdomXPathNSResolver): TdomXPathResult;
+var
+  leftNumber,rightNumber: TdomXPathNumberResult;
+begin
+  if assigned(oldResult) then oldResult.Free;
+  if ( (left is TdomXPathPlusExpr) or
+       (left is TdomXPathMinusExpr) ) and
+     ( (right is TdomXPathMultiplyExpr) or
+       (right is TdomXPathDivExpr) or
+       (right is TdomXPathModExpr) )
+  then begin
+    leftNumber:= XPathNumberFunc(left.evaluate(contextNode,nil,resolver));
+    try
+      rightNumber:= XPathNumberFunc(right.evaluate(contextNode,nil,resolver));
+      try
+        result:= TdomXPathNumberResult.create(leftNumber.numberValue + rightNumber.numberValue);
+      finally
+        rightNumber.Free;
+      end;
+    finally
+      leftNumber.free;
+    end;
+  end else result:= inherited evaluate(contextNode,oldResult,resolver);
+end;
+
+{ TdomXPathMinusExpr }
+
+function TdomXPathMinusExpr.evaluate(const contextNode: TdomNode;
+                                     const oldResult: TdomXPathResult;
+                                     const resolver: TdomXPathNSResolver): TdomXPathResult;
+var
+  leftNumber,rightNumber: TdomXPathNumberResult;
+begin
+  if assigned(oldResult) then oldResult.Free;
+  if ( (left is TdomXPathPlusExpr) or
+       (left is TdomXPathMinusExpr) ) and
+     ( (right is TdomXPathMultiplyExpr) or
+       (right is TdomXPathDivExpr) or
+       (right is TdomXPathModExpr) )
+  then begin
+    leftNumber:= XPathNumberFunc(left.evaluate(contextNode,nil,resolver));
+    try
+      rightNumber:= XPathNumberFunc(right.evaluate(contextNode,nil,resolver));
+      try
+        result:= TdomXPathNumberResult.create(leftNumber.numberValue - rightNumber.numberValue);
+      finally
+        rightNumber.Free;
+      end;
+    finally
+      leftNumber.free;
+    end;
+  end else result:= inherited evaluate(contextNode,oldResult,resolver);
+end;
+
+{ TdomXPathMultiplyExpr }
+
+function TdomXPathMultiplyExpr.evaluate(const contextNode: TdomNode;
+                                        const oldResult: TdomXPathResult;
+                                        const resolver: TdomXPathNSResolver): TdomXPathResult;
+var
+  leftNumber,rightNumber: TdomXPathNumberResult;
+begin
+  if assigned(oldResult) then oldResult.Free;
+  if ( (left is TdomXPathMultiplyExpr) or
+       (left is TdomXPathDivExpr) or
+       (left is TdomXPathModExpr) ) and
+       (right is TdomXPathUnaryExpr)
+  then begin
+    leftNumber:= XPathNumberFunc(left.evaluate(contextNode,nil,resolver));
+    try
+      rightNumber:= XPathNumberFunc(right.evaluate(contextNode,nil,resolver));
+      try
+        result:= TdomXPathNumberResult.create(leftNumber.numberValue * rightNumber.numberValue);
+      finally
+        rightNumber.Free;
+      end;
+    finally
+      leftNumber.free;
+    end;
+  end else result:= inherited evaluate(contextNode,oldResult,resolver);
+end;
+
+{ TdomXPathDivExpr }
+
+function TdomXPathDivExpr.evaluate(const contextNode: TdomNode;
+                                   const oldResult: TdomXPathResult;
+                                   const resolver: TdomXPathNSResolver): TdomXPathResult;
+var
+  leftNumber,rightNumber: TdomXPathNumberResult;
+begin
+  result:= nil;  // Necessary to avoid compiler warning "Return value ... might be undefined."
+  if assigned(oldResult) then oldResult.Free;
+  if ( (left is TdomXPathMultiplyExpr) or
+       (left is TdomXPathDivExpr) or
+       (left is TdomXPathModExpr) ) and
+       (right is TdomXPathUnaryExpr)
+  then begin
+    leftNumber:= XPathNumberFunc(left.evaluate(contextNode,nil,resolver));
+    try
+      rightNumber:= XPathNumberFunc(right.evaluate(contextNode,nil,resolver));
+      try
+        if rightNumber.numberValue = 0
+          then raise EXPath_Type_Err.create('XPath type error.');  // xxx Replace this by NaN !!!!!!
+        result:= TdomXPathNumberResult.create(leftNumber.numberValue / rightNumber.numberValue);
+      finally
+        rightNumber.Free;
+      end;
+    finally
+      leftNumber.free;
+    end;
+  end else result:= inherited evaluate(contextNode,oldResult,resolver);
+end;
+
+{ TdomXPathModExpr }
+
+function TdomXPathModExpr.evaluate(const contextNode: TdomNode;
+                                   const oldResult: TdomXPathResult;
+                                   const resolver: TdomXPathNSResolver): TdomXPathResult;
+var
+  leftNumber,rightNumber: TdomXPathNumberResult;
+begin
+  result:= nil;  // Necessary to avoid compiler warning "Return value ... might be undefined."
+  if assigned(oldResult) then oldResult.Free;
+  if ( (left is TdomXPathMultiplyExpr) or
+       (left is TdomXPathDivExpr) or
+       (left is TdomXPathModExpr) ) and
+       (right is TdomXPathUnaryExpr)
+  then begin
+    leftNumber:= XPathNumberFunc(left.evaluate(contextNode,nil,resolver));
+    try
+      rightNumber:= XPathNumberFunc(right.evaluate(contextNode,nil,resolver));
+      try
+        if rightNumber.numberValue = 0
+          then raise EXPath_Type_Err.create('XPath type error.');  // xxx Replace this by NaN !!!!!!
+        result:= TdomXPathNumberResult.create(leftNumber.numberValue - trunc(leftNumber.numberValue / rightNumber.numberValue) * rightNumber.numberValue);
+      finally
+        rightNumber.Free;
+      end;
+    finally
+      leftNumber.free;
+    end;
+  end else result:= inherited evaluate(contextNode,oldResult,resolver);
+end;
+
+{ TdomXPathUnaryExpr }
+
+function TdomXPathUnaryExpr.evaluate(const contextNode: TdomNode;
+                                     const oldResult: TdomXPathResult;
+                                     const resolver: TdomXPathNSResolver): TdomXPathResult;
+var
+  Number: TdomXPathNumberResult;
+begin
+  if assigned(oldResult) then oldResult.Free;
+  if (left is TdomXPathMultiplyOperator) and
+     (right is TdomXPathUnaryExpr)
+  then begin
+    Number:= XPathNumberFunc(left.evaluate(contextNode,nil,resolver));
+    try
+      result:= TdomXPathNumberResult.create(-(Number.numberValue)) // xxx Negative 0 as required by IEEE 754 is not supported here.
+    finally
+      Number.Free;
+    end;
+  end else result:= inherited evaluate(contextNode,oldResult,resolver);
+end;
+
+{ TdomXPathLiteral }
+
+function TdomXPathLiteral.evaluate(const contextNode: TdomNode;
+                                   const oldResult: TdomXPathResult;
+                                   const resolver: TdomXPathNSResolver): TdomXPathResult;
+begin
+  if assigned(oldResult) then oldResult.Free;
+  result:= TdomXPathStringResult.create(value);
+end;
+
+{ TdomXPathNumber }
+
+function TdomXPathNumber.evaluate(const contextNode: TdomNode;
+                                  const oldResult: TdomXPathResult;
+                                  const resolver: TdomXPathNSResolver): TdomXPathResult;
+begin
+  if assigned(oldResult) then oldResult.Free;
+  result:= TdomXPathNumberResult.create(StrToFloat(value));
+end;
+
+{ TdomXPathVariableReference }
+
+function TdomXPathVariableReference.evaluate(const contextNode: TdomNode;
+                                             const oldResult: TdomXPathResult;
+                                             const resolver: TdomXPathNSResolver): TdomXPathResult;
+begin
+  Result := nil;
+  if assigned(oldResult) then oldResult.Free;
+  raise ENot_Supported_Err.create('Not supported error.');
+  // xxx Add support for variable references in a later version.
+end;
+
+{ TdomXPathNameTest }
+
+constructor TdomXPathNameTest.create(const avalue: UnicodeString);
+begin
+  inherited;
+  if avalue = '*' then begin
+    FPrefix:= '';
+    FLocalName:= '*';
+  end else if value[length(avalue)] = '*' then begin
+    FPrefix:= copy(avalue,1,length(avalue)-2);
+    FLocalName:= '*';
+  end else begin
+    FPrefix:= xmlExtractPrefix(avalue);
+    FLocalName:= xmlExtractLocalName(avalue);
+  end;
+end;
+
+function TdomXPathNameTest.evaluate(const contextNode: TdomNode;
+                                    const oldResult: TdomXPathResult;
+                                    const resolver: TdomXPathNSResolver): TdomXPathResult;
+begin
+  Result := nil;
+  if assigned(oldResult) then oldResult.Free;
+  raise ENot_Supported_Err.create('Not supported error.');
+  // Remark: To evaluate a NameTest the evaluate2 function must be used.
+end;
+
+function TdomXPathNameTest.evaluate2(const oldSnapshotResult: TdomXPathSnapshotResult;
+                                     const principalNodeType: TdomNodeType;
+                                     const resolver: TdomXPathNSResolver): TdomXPathSnapshotResult;
+var
+  valueNamespaceUri: UnicodeString;
+  i: integer;
+begin
+  if not assigned(oldSnapshotResult)
+    then raise EXPath_Type_Err.create('XPath type error.');
+
+  if FPrefix <> '' then begin
+    if FPrefix = 'xmlns' then begin
+      valueNamespaceUri:= 'http://www.w3.org/2000/xmlns/';
+    end else if FPrefix = 'xml' then begin
+      valueNamespaceUri:= 'http://www.w3.org/XML/1998/namespace';
+    end else begin
+      if not assigned(resolver) then begin
+        oldSnapshotResult.free;
+        raise ENamespace_Err.Create('Namespace resolver not specified.');
+      end;
+      valueNamespaceUri:= resolver.lookupNamespaceURI(FPrefix);
+      if valueNamespaceUri = '' then begin
+        oldSnapshotResult.free;
+        raise ENamespace_Err.CreateFmt('Namespace URI of prefix ''%S'' not found.',[FPrefix]);
+      end;
+    end;
+  end else valueNamespaceUri:= '';
+
+  with oldSnapshotResult do begin
+    i:= pred(snapshotLength);
+    while i >= 0 do begin
+      if snapshotItem(i).nodeType <> principalNodeType then begin
+        delete(i);
+      end else if value <> '*' then begin
+        if FLocalName = '*' then begin
+          if snapshotItem(i).prefix <> FPrefix
+            then delete(i);
+        end else begin
+          if (snapshotItem(i).prefix <> FPrefix) or
+             (snapshotItem(i).localName <> FLocalName)
+            then delete(i);
+        end;
+      end;
+      dec(i);
+    end;
+  end;
+
+  result:= oldSnapshotResult;
+end;
+
+{ TdomXPathNodeTypeComment }
+
+function TdomXPathNodeTypeComment.evaluate(const contextNode: TdomNode;
+                                           const oldResult: TdomXPathResult;
+                                           const resolver: TdomXPathNSResolver): TdomXPathResult;
+begin
+  Result := nil;
+  if assigned(oldResult) then oldResult.Free;
+  raise ENot_Supported_Err.create('Not supported error.');
+  // Remark: To evaluate a Comment the evaluate2 function must be used.
+end;
+
+function TdomXPathNodeTypeComment.evaluate2(const oldSnapshotResult: TdomXPathSnapshotResult): TdomXPathSnapshotResult;
+var
+  i: integer;
+begin
+  if not assigned(oldSnapshotResult)
+    then raise EXPath_Type_Err.create('XPath type error.');
+
+  with oldSnapshotResult do begin
+    i:= pred(snapshotLength);
+    while i >= 0 do begin
+      if snapshotItem(i).nodeType <> ntComment_Node
+        then delete(i);
+      dec(i);
+    end;
+  end;
+
+  result:= oldSnapshotResult;
+end;
+
+{ TdomXPathNodeTypePI }
+
+function TdomXPathNodeTypePI.evaluate(const contextNode: TdomNode;
+                                      const oldResult: TdomXPathResult;
+                                      const resolver: TdomXPathNSResolver): TdomXPathResult;
+begin
+  Result := nil;
+  if assigned(oldResult) then oldResult.Free;
+  raise ENot_Supported_Err.create('Not supported error.');
+  // Remark: To evaluate a PI the evaluate2 function must be used.
+end;
+
+function TdomXPathNodeTypePI.evaluate2(const oldSnapshotResult: TdomXPathSnapshotResult): TdomXPathSnapshotResult;
+var
+  i: integer;
+begin
+  if not assigned(oldSnapshotResult)
+    then raise EXPath_Type_Err.create('XPath type error.');
+
+  if assigned(left) then begin
+    if left is TdomXPathLiteral then begin
+      with oldSnapshotResult do begin
+        i:= pred(snapshotLength);
+        while i >= 0 do begin
+          with snapshotItem(i) do
+            if (nodeType <> ntProcessing_Instruction_Node) or
+               (nodeValue <> TdomXPathLiteral(left).value)
+              then delete(i);
+          dec(i);
+        end;
+      end;
+    end else begin
+      oldSnapshotResult.free;
+      raise EXPath_Type_Err.create('XPath type error.');
+    end;
+  end else begin
+    with oldSnapshotResult do begin
+      i:= pred(snapshotLength);
+      while i >= 0 do begin
+        if snapshotItem(i).nodeType <> ntProcessing_Instruction_Node
+          then delete(i);
+        dec(i);
+      end;
+    end;
+  end;
+
+  result:= oldSnapshotResult;
+end;
+
+{ TdomXPathNodeTypeText }
+
+function TdomXPathNodeTypeText.evaluate(const contextNode: TdomNode;
+                                        const oldResult: TdomXPathResult;
+                                        const resolver: TdomXPathNSResolver): TdomXPathResult;
+begin
+  Result := nil;
+  if assigned(oldResult) then oldResult.Free;
+  raise ENot_Supported_Err.create('Not supported error.');
+  // Remark: To evaluate a Text the evaluate2 function must be used.
+end;
+
+function TdomXPathNodeTypeText.evaluate2(const oldSnapshotResult: TdomXPathSnapshotResult): TdomXPathSnapshotResult;
+var
+  i: integer;
+begin
+  if not assigned(oldSnapshotResult)
+    then raise EXPath_Type_Err.create('XPath type error.');
+
+  with oldSnapshotResult do begin
+    i:= pred(snapshotLength);
+    while i >= 0 do begin
+      if not (snapshotItem(i).nodeType in [ntText_Node, ntCDATA_Section_Node, ntEntity_Reference_Node] )
+        then delete(i);
+      dec(i);
+    end;
+  end;
+
+  result:= oldSnapshotResult;
+end;
+
+{ TdomXPathTokenizer }
+
+constructor TdomXPathTokenizer.create(const expression: UnicodeString;
+                                      const xpathVersion: UnicodeString);
+begin
+  if xpathVersion <> '1.0'
+    then raise ENot_Supported_Err.CreateFmt('XPath version "%S" not supproted.',[xpathVersion]);
+  FExpression:= expression;
+  FLastSymbol:= XPATH_INVALID_TOKEN;  // Use XPATH_INVALID_TOKEN as a dummy value
+  FPosition:= 0;
+  FDoubleSlashStatus:= SL_NO_DOUBLE_SLASH;
+  FPositionCache:= 0;
+  FSymbolCache:= XPATH_INVALID_TOKEN;
+  FValueCache:= '';
+  FCacheIsActive:= false;
+end;
+
+function TdomXPathTokenizer.doubleColonFollows: boolean;
+var
+  i: integer;
+begin
+  result:= false;
+  for i:= FPosition+1 to pred(length(FExpression)) do begin
+    if FExpression[i] = #$3a then begin
+      if FExpression[i+1] = #$3a
+        then result:= true;
+      exit;
+    end;
+    if not isXmlWhiteSpace(FExpression[i]) then exit;
+  end;
+end;
+
+function TdomXPathTokenizer.getNextWideChar(out s: wideChar): boolean;
+begin
+  if FPosition = length(FExpression) then begin
+    s:= #0;
+    result:= false;
+  end else begin
+    inc(FPosition);
+    s:= FExpression[FPosition];
+    result:= true;
+  end;
+end;
+
+function TdomXPathTokenizer.isFollowing(const symbol: TdomXPathTokenType): boolean;
+begin
+  if not FCacheIsActive then begin
+    read(FSymbolCache,FValueCache,FPositionCache);
+    FCacheIsActive:= true;
+  end;
+  if FSymbolCache = symbol
+    then result:= true
+    else result:= false;
+end;
+
+function TdomXPathTokenizer.leftParanthesisFollows: boolean;
+var
+  i: integer;
+begin
+  result:= false;
+  for i:= FPosition+1 to length(FExpression) do begin
+    if FExpression[i] = #$28 then begin
+      result:= true;
+      exit;
+    end;
+    if not isXmlWhiteSpace(FExpression[i]) then exit;
+  end;
+end;
+
+function TdomXPathTokenizer.lookAheadNextWideChar(out s: wideChar): boolean;
+begin
+  if FPosition = length(FExpression) then begin
+    s:= #0;
+    result:= false;
+  end else begin
+    s:= FExpression[FPosition+1];
+    result:= true;
+  end;
+end;
+
+procedure TdomXPathTokenizer.read(out symbol: TdomXPathTokenType;
+                                  out value: UnicodeString;
+                                  out position: integer);
+var
+  S: WideChar;
+  L: WideChar;
+  DecimalPointFound: boolean;
+begin
+  if FCacheIsActive then begin
+    symbol:= FSymbolCache;
+    value:= FValueCache;
+    position:= FPositionCache;
+    FCacheIsActive:= false;
+    exit;
+  end;
+  case FDoubleSlashStatus of
+    SL_NO_DOUBLE_SLASH: begin
+      repeat
+        if not getNextWideChar(S) then begin
+          // End of text:
+          symbol:= XPATH_END_OF_TEXT_TOKEN;
+          value:= '';
+          position:= -1;
+          exit;
+        end;
+      until not isXmlWhiteSpace(S);
+
+      case ord(S) of
+        $28: begin // '('
+          symbol:= XPATH_LEFT_PARENTHESIS_TOKEN;
+          FLastSymbol:= XPATH_LEFT_PARENTHESIS_TOKEN;
+          value:= '';
+          position:= FPosition;
+        end;
+        $29: begin // ')'
+          symbol:= XPATH_RIGHT_PARENTHESIS_TOKEN;
+          FLastSymbol:= XPATH_RIGHT_PARENTHESIS_TOKEN;
+          value:= '';
+          position:= FPosition;
+        end;
+        $5b: begin // '['
+          symbol:= XPATH_LEFT_SQUARE_BRACKET_TOKEN;
+          FLastSymbol:= XPATH_LEFT_SQUARE_BRACKET_TOKEN;
+          value:= '';
+          position:= FPosition;
+        end;
+        $5d: begin // ']'
+          symbol:= XPATH_RIGHT_SQUARE_BRACKET_TOKEN;
+          FLastSymbol:= XPATH_RIGHT_SQUARE_BRACKET_TOKEN;
+          value:= '';
+          position:= FPosition;
+        end;
+        $40: begin // '@'
+          symbol:= XPATH_COMMERCIAL_AT_TOKEN;
+          FLastSymbol:= XPATH_COMMERCIAL_AT_TOKEN;
+          value:= '';
+          position:= FPosition;
+        end;
+        $2c: begin // ','
+          symbol:= XPATH_COMMA_TOKEN;
+          FLastSymbol:= XPATH_COMMA_TOKEN;
+          value:= '';
+          position:= FPosition;
+        end;
+        $3a: begin // ':'
+          lookAheadNextWideChar(L);
+          if L = #$3a then begin // '::'
+            inc(FPosition);
+            symbol:= XPATH_DOUBLE_COLON_TOKEN;
+            FLastSymbol:= XPATH_DOUBLE_COLON_TOKEN;
+            value:= '';
+            position:= FPosition;
+          end else begin
+            symbol:= XPATH_INVALID_TOKEN;
+            FLastSymbol:= XPATH_INVALID_TOKEN;
+            value:= ':';
+            position:= FPosition;
+          end;
+        end;
+        $7c: begin // '|'
+          symbol:= XPATH_SHEFFER_STROKE_OPERATOR_TOKEN;
+          FLastSymbol:= XPATH_SHEFFER_STROKE_OPERATOR_TOKEN;
+          value:= '';
+          position:= FPosition;
+        end;
+        $2b: begin // '+'
+          symbol:= XPATH_PLUS_OPERATOR_TOKEN;
+          FLastSymbol:= XPATH_PLUS_OPERATOR_TOKEN;
+          value:= '';
+          position:= FPosition;
+        end;
+        $2d: begin // '-'
+          symbol:= XPATH_MINUS_OPERATOR_TOKEN;
+          FLastSymbol:= XPATH_MINUS_OPERATOR_TOKEN;
+          value:= '';
+          position:= FPosition;
+        end;
+        $3d: begin // '='
+          symbol:= XPATH_IS_EQUAL_OPERATOR_TOKEN;
+          FLastSymbol:= XPATH_IS_EQUAL_OPERATOR_TOKEN;
+          value:= '';
+          position:= FPosition;
+        end;
+        $21: begin // '!'
+          lookAheadNextWideChar(L);
+          if L = #$3d then begin // '!='
+            inc(FPosition);
+            symbol:= XPATH_IS_NOT_EQUAL_OPERATOR_TOKEN;
+            FLastSymbol:= XPATH_IS_NOT_EQUAL_OPERATOR_TOKEN;
+            value:= '';
+            position:= FPosition;
+          end else begin
+            symbol:= XPATH_INVALID_TOKEN;
+            FLastSymbol:= XPATH_INVALID_TOKEN;
+            value:= '!';
+            position:= FPosition;
+          end;
+        end;
+        $2f: begin // '/'
+          lookAheadNextWideChar(L);
+          if L = #$2f then begin // '//'
+            inc(FPosition);
+            FDoubleSlashStatus:= SL_XPATH_AXIS_NAME_DESCENDANT_OR_SELF_TOKEN_FOLLOWS;
+          end;
+          symbol:= XPATH_SLASH_OPERATOR_TOKEN;
+          FLastSymbol:= XPATH_SLASH_OPERATOR_TOKEN;
+          value:= '';
+          position:= FPosition;
+        end;
+        $3c: begin // '<'
+          lookAheadNextWideChar(L);
+          if L = #$3d then begin // '<='
+            inc(FPosition);
+            symbol:= XPATH_LESS_THAN_OR_EQUAL_OPERATOR_TOKEN;
+            FLastSymbol:= XPATH_LESS_THAN_OR_EQUAL_OPERATOR_TOKEN;
+          end else begin
+            symbol:= XPATH_LESS_THAN_OPERATOR_TOKEN;
+            FLastSymbol:= XPATH_LESS_THAN_OPERATOR_TOKEN;
+          end;
+          value:= '';
+          position:= FPosition;
+        end;
+        $3e: begin // '>'
+          lookAheadNextWideChar(L);
+          if L = #$3d then begin // '>='
+            inc(FPosition);
+            symbol:= XPATH_GREATER_THAN_OR_EQUAL_OPERATOR_TOKEN;
+            FLastSymbol:= XPATH_GREATER_THAN_OR_EQUAL_OPERATOR_TOKEN;
+          end else begin
+            symbol:= XPATH_GREATER_THAN_OPERATOR_TOKEN;
+            FLastSymbol:= XPATH_GREATER_THAN_OPERATOR_TOKEN;
+          end;
+          value:= '';
+          position:= FPosition;
+        end;
+        $2e: begin // '.'
+          lookAheadNextWideChar(L);
+          case ord(L) of
+            $2e: begin // '..'
+              inc(FPosition);
+              symbol:= XPATH_DOUBLE_DOT_TOKEN;
+              FLastSymbol:= XPATH_DOUBLE_DOT_TOKEN;
+              value:= '';
+              position:= FPosition;
+            end;
+            $30..$39: begin // Digit
+              value:= '.';
+              repeat
+                inc(FPosition);
+                value:= concat(value,UnicodeString(L));
+                lookAheadNextWideChar(L);
+              until not (ord(L) in [$30..$39]);
+              symbol:= XPATH_NUMBER_TOKEN;
+              FLastSymbol:= XPATH_NUMBER_TOKEN;
+              position:= FPosition;
+            end;
+          else // '.'
+            symbol:= XPATH_SINGLE_DOT_TOKEN;
+            FLastSymbol:= XPATH_SINGLE_DOT_TOKEN;
+            value:= '';
+            position:= FPosition;
+          end; {case ... else}
+        end;
+        $30..$39: begin // Digit
+          value:= S;
+          DecimalPointFound:= false;
+          if lookAheadNextWideChar(S) then begin
+            while (ord(S) in [$30..$39]) or ((S = #$2e) and not DecimalPointFound) do begin
+              inc(FPosition);
+              value:= concat(value,UnicodeString(S));
+              if S = #$2e then DecimalPointFound:= true;
+              lookAheadNextWideChar(S);
+            end;
+          end;
+          symbol:= XPATH_NUMBER_TOKEN;
+          FLastSymbol:= XPATH_NUMBER_TOKEN;
+          position:= FPosition;
+        end;
+        $22: begin // '"'
+          value:= '';
+          if not getNextWideChar(S) then begin
+            symbol:= XPATH_INVALID_TOKEN;
+            FLastSymbol:= XPATH_INVALID_TOKEN;
+            position:= FPosition;
+            exit;
+          end;
+          while S <> #$22 do begin
+            value:= concat(value,UnicodeString(S));
+            if not getNextWideChar(S) then begin
+              symbol:= XPATH_INVALID_TOKEN;
+              FLastSymbol:= XPATH_INVALID_TOKEN;
+              position:= FPosition;
+              exit;
+            end;
+          end;
+          symbol:= XPATH_LITERAL_TOKEN;
+          FLastSymbol:= XPATH_LITERAL_TOKEN;
+          position:= FPosition;
+        end;
+        $27: begin // '"'
+          value:= '';
+          if not getNextWideChar(S) then begin
+            symbol:= XPATH_INVALID_TOKEN;
+            FLastSymbol:= XPATH_INVALID_TOKEN;
+            position:= FPosition;
+            exit;
+          end;
+          while S <> #$27 do begin
+            value:= concat(value,UnicodeString(S));
+            if not getNextWideChar(S) then begin
+              symbol:= XPATH_INVALID_TOKEN;
+              FLastSymbol:= XPATH_INVALID_TOKEN;
+              position:= FPosition;
+              exit;
+            end;
+          end;
+          symbol:= XPATH_LITERAL_TOKEN;
+          FLastSymbol:= XPATH_LITERAL_TOKEN;
+          position:= FPosition;
+        end;
+        $24: begin // '$'
+          if not lookAheadNextWideChar(S) then begin
+            symbol:= XPATH_INVALID_TOKEN;
+            FLastSymbol:= XPATH_INVALID_TOKEN;
+            position:= FPosition;
+            exit;
+          end;
+          if not ( IsXmlLetter(S) or ( S = #$5f ) ) then begin  // Letter or '_'?
+            symbol:= XPATH_INVALID_TOKEN;
+            FLastSymbol:= XPATH_INVALID_TOKEN;
+            position:= FPosition;
+            value:= UnicodeString(S);
+            exit;
+          end;
+          value:= '';
+          while IsXmlNCNameChar(S) do begin
+            inc(FPosition);
+            value:= concat(value,UnicodeString(S));
+            if not lookAheadNextWideChar(S)
+              then break;
+          end;
+          if S = #$3a then begin // ':' ?
+            inc(FPosition);
+            if not lookAheadNextWideChar(S) then begin
+              symbol:= XPATH_INVALID_TOKEN;
+              FLastSymbol:= XPATH_INVALID_TOKEN;
+              position:= FPosition;
+              value:= concat(value,':');
+              exit;
+            end;
+            if S = #$3a then begin // '::' ?
+              dec(FPosition);
+            end else begin
+              value:= concat(value,':');
+              if not ( IsXmlLetter(S) or ( S = #$5f ) ) then begin  // Letter or '_'?
+                symbol:= XPATH_INVALID_TOKEN;
+                FLastSymbol:= XPATH_INVALID_TOKEN;
+                position:= FPosition;
+                value:= concat(value,UnicodeString(S));
+                exit;
+              end;
+              while IsXmlNCNameChar(S) do begin
+                inc(FPosition);
+                value:= concat(value,UnicodeString(S));
+                if not self.lookAheadNextWideChar(S)
+                  then break;
+              end;
+            end;
+          end;
+          symbol:= XPATH_VARIABLE_REFERENCE_TOKEN;
+          FLastSymbol:= XPATH_VARIABLE_REFERENCE_TOKEN;
+          position:= FPosition;
+        end;
+        $2a: begin // '*'
+          if FLastSymbol in [ XPATH_LEFT_PARENTHESIS_TOKEN,
+                              XPATH_LEFT_SQUARE_BRACKET_TOKEN,
+                              XPATH_COMMERCIAL_AT_TOKEN,
+                              XPATH_COMMA_TOKEN,
+                              XPATH_DOUBLE_COLON_TOKEN,
+                              XPATH_AND_OPERATOR_TOKEN,
+                              XPATH_OR_OPERATOR_TOKEN,
+                              XPATH_MOD_OPERATOR_TOKEN,
+                              XPATH_DIV_OPERATOR_TOKEN,
+                              XPATH_MULTIPLY_OPERATOR_TOKEN,
+                              XPATH_SLASH_OPERATOR_TOKEN,
+                              XPATH_SHEFFER_STROKE_OPERATOR_TOKEN,
+                              XPATH_PLUS_OPERATOR_TOKEN,
+                              XPATH_MINUS_OPERATOR_TOKEN,
+                              XPATH_IS_EQUAL_OPERATOR_TOKEN,
+                              XPATH_IS_NOT_EQUAL_OPERATOR_TOKEN,
+                              XPATH_LESS_THAN_OPERATOR_TOKEN,
+                              XPATH_LESS_THAN_OR_EQUAL_OPERATOR_TOKEN,
+                              XPATH_GREATER_THAN_OPERATOR_TOKEN,
+                              XPATH_GREATER_THAN_OR_EQUAL_OPERATOR_TOKEN,
+                              XPATH_INVALID_TOKEN  // = no preceding token
+                            ]
+          then begin
+            symbol:= XPATH_NAME_TEST_TOKEN;
+            FLastSymbol:= XPATH_NAME_TEST_TOKEN;
+            value:= '*';
+          end else begin
+            symbol:= XPATH_MULTIPLY_OPERATOR_TOKEN;
+            FLastSymbol:= XPATH_MULTIPLY_OPERATOR_TOKEN;
+            value:= '';
+          end;
+          position:= FPosition;
+        end;
+      else  {case ...}
+
+        // Parse NCName:
+        if not ( IsXmlLetter(S) or ( S = #$5f ) ) then begin  // Letter or '_'?
+          symbol:= XPATH_INVALID_TOKEN;
+          FLastSymbol:= XPATH_INVALID_TOKEN;
+          position:= FPosition;
+          value:= UnicodeString(S);
+          exit;
+        end;
+        value:= '';
+        dec(FPosition);
+        while IsXmlNCNameChar(S) do begin
+          inc(FPosition);
+          value:= concat(value,UnicodeString(S));
+          if not lookAheadNextWideChar(S)
+            then break;
+        end;
+
+        if not ( FLastSymbol in [ XPATH_LEFT_PARENTHESIS_TOKEN,
+                                  XPATH_LEFT_SQUARE_BRACKET_TOKEN,
+                                  XPATH_COMMERCIAL_AT_TOKEN,
+                                  XPATH_COMMA_TOKEN,
+                                  XPATH_DOUBLE_COLON_TOKEN,
+                                  XPATH_AND_OPERATOR_TOKEN,
+                                  XPATH_OR_OPERATOR_TOKEN,
+                                  XPATH_MOD_OPERATOR_TOKEN,
+                                  XPATH_DIV_OPERATOR_TOKEN,
+                                  XPATH_MULTIPLY_OPERATOR_TOKEN,
+                                  XPATH_SLASH_OPERATOR_TOKEN,
+                                  XPATH_SHEFFER_STROKE_OPERATOR_TOKEN,
+                                  XPATH_PLUS_OPERATOR_TOKEN,
+                                  XPATH_MINUS_OPERATOR_TOKEN,
+                                  XPATH_IS_EQUAL_OPERATOR_TOKEN,
+                                  XPATH_IS_NOT_EQUAL_OPERATOR_TOKEN,
+                                  XPATH_LESS_THAN_OPERATOR_TOKEN,
+                                  XPATH_LESS_THAN_OR_EQUAL_OPERATOR_TOKEN,
+                                  XPATH_GREATER_THAN_OPERATOR_TOKEN,
+                                  XPATH_GREATER_THAN_OR_EQUAL_OPERATOR_TOKEN,
+                                  XPATH_INVALID_TOKEN  // = no preceding token
+                                ] )
+        then begin
+          if value = 'and' then begin
+            symbol:= XPATH_AND_OPERATOR_TOKEN;
+            FLastSymbol:= XPATH_AND_OPERATOR_TOKEN;
+            value:= '';
+          end else if value = 'or' then begin
+            symbol:= XPATH_OR_OPERATOR_TOKEN;
+            FLastSymbol:= XPATH_OR_OPERATOR_TOKEN;
+            value:= '';
+          end else if value = 'mod' then begin
+            symbol:= XPATH_MOD_OPERATOR_TOKEN;
+            FLastSymbol:= XPATH_MOD_OPERATOR_TOKEN;
+            value:= '';
+          end else if value = 'div' then begin
+            symbol:= XPATH_DIV_OPERATOR_TOKEN;
+            FLastSymbol:= XPATH_DIV_OPERATOR_TOKEN;
+            value:= '';
+          end else begin
+            symbol:= XPATH_INVALID_TOKEN;
+            FLastSymbol:= XPATH_INVALID_TOKEN;
+          end;
+          position:= FPosition;
+          exit;
+        end;
+
+        if doubleColonFollows then begin
+          if value = 'ancestor' then begin
+            symbol:= XPATH_AXIS_NAME_ANCESTOR_TOKEN;
+            FLastSymbol:= XPATH_AXIS_NAME_ANCESTOR_TOKEN;
+            value:= '';
+          end else if value = 'ancestor-or-self' then begin
+            symbol:= XPATH_AXIS_NAME_ANCESTOR_OR_SELF_TOKEN;
+            FLastSymbol:= XPATH_AXIS_NAME_ANCESTOR_OR_SELF_TOKEN;
+            value:= '';
+          end else if value = 'attribute' then begin
+            symbol:= XPATH_AXIS_NAME_ATTRIBUTE_TOKEN;
+            FLastSymbol:= XPATH_AXIS_NAME_ATTRIBUTE_TOKEN;
+            value:= '';
+          end else if value = 'child' then begin
+            symbol:= XPATH_AXIS_NAME_CHILD_TOKEN;
+            FLastSymbol:= XPATH_AXIS_NAME_CHILD_TOKEN;
+            value:= '';
+          end else if value = 'descendant' then begin
+            symbol:= XPATH_AXIS_NAME_DESCENDANT_TOKEN;
+            FLastSymbol:= XPATH_AXIS_NAME_DESCENDANT_TOKEN;
+            value:= '';
+          end else if value = 'descendant-or-self' then begin
+            symbol:= XPATH_AXIS_NAME_DESCENDANT_OR_SELF_TOKEN;
+            FLastSymbol:= XPATH_AXIS_NAME_DESCENDANT_OR_SELF_TOKEN;
+            value:= '';
+          end else if value = 'following' then begin
+            symbol:= XPATH_AXIS_NAME_FOLLOWING_TOKEN;
+            FLastSymbol:= XPATH_AXIS_NAME_FOLLOWING_TOKEN;
+            value:= '';
+          end else if value = 'following-sibling' then begin
+            symbol:= XPATH_AXIS_NAME_FOLLOWING_SIBLING_TOKEN;
+            FLastSymbol:= XPATH_AXIS_NAME_FOLLOWING_SIBLING_TOKEN;
+            value:= '';
+          end else if value = 'namespace' then begin
+            symbol:= XPATH_AXIS_NAME_NAMESPACE_TOKEN;
+            FLastSymbol:= XPATH_AXIS_NAME_NAMESPACE_TOKEN;
+            value:= '';
+          end else if value = 'parent' then begin
+            symbol:= XPATH_AXIS_NAME_PARENT_TOKEN;
+            FLastSymbol:= XPATH_AXIS_NAME_PARENT_TOKEN;
+            value:= '';
+          end else if value = 'preceding' then begin
+            symbol:= XPATH_AXIS_NAME_PRECEDING_TOKEN;
+            FLastSymbol:= XPATH_AXIS_NAME_PRECEDING_TOKEN;
+          end else if value = 'preceding-sibling' then begin
+            symbol:= XPATH_AXIS_NAME_PRECEDING_SIBLING_TOKEN;
+            FLastSymbol:= XPATH_AXIS_NAME_PRECEDING_SIBLING_TOKEN;
+            value:= '';
+          end else if value = 'self' then begin
+            symbol:= XPATH_AXIS_NAME_SELF_TOKEN;
+            FLastSymbol:= XPATH_AXIS_NAME_SELF_TOKEN;
+            value:= '';
+          end else begin
+            symbol:= XPATH_INVALID_TOKEN;
+            FLastSymbol:= XPATH_INVALID_TOKEN;
+            value:= '';
+          end;
+          position:= FPosition;
+          exit;
+        end;
+
+        if S = #$3a then begin // ':' ?
+          inc(FPosition);
+          if not lookAheadNextWideChar(S) then begin
+            symbol:= XPATH_INVALID_TOKEN;
+            FLastSymbol:= XPATH_INVALID_TOKEN;
+            position:= FPosition;
+            value:= concat(value,':');
+            exit;
+          end;
+          if S = #$3a then begin // '::' ?
+            dec(FPosition);
+          end else begin
+            value:= concat(value,':');
+            if not ( IsXmlLetter(S) or ( S = #$5f ) ) then begin  // Letter or '_'?
+              if S = #$2a then begin // '*
+                symbol:= XPATH_NAME_TEST_TOKEN;
+                FLastSymbol:= XPATH_NAME_TEST_TOKEN;
+              end else begin
+                symbol:= XPATH_INVALID_TOKEN;
+                FLastSymbol:= XPATH_INVALID_TOKEN;
+              end;
+              inc(FPosition);
+              position:= FPosition;
+              value:= concat(value,UnicodeString(S));
+              exit;
+            end;
+            while IsXmlNCNameChar(S) do begin
+              inc(FPosition);
+              value:= concat(value,UnicodeString(S));
+              if not self.lookAheadNextWideChar(S)
+                then break;
+            end;
+          end;
+        end;
+
+        if leftParanthesisFollows then begin
+          if value = 'comment' then begin
+            symbol:= XPATH_NODE_TYPE_COMMENT_TOKEN;
+            FLastSymbol:= XPATH_NODE_TYPE_COMMENT_TOKEN;
+            value:= '';
+          end else if value = 'text' then begin
+            symbol:= XPATH_NODE_TYPE_TEXT_TOKEN;
+            FLastSymbol:= XPATH_NODE_TYPE_TEXT_TOKEN;
+            value:= '';
+          end else if value = 'processing-instruction' then begin
+            symbol:= XPATH_NODE_TYPE_PI_TOKEN;
+            FLastSymbol:= XPATH_NODE_TYPE_PI_TOKEN;
+            value:= '';
+          end else if value = 'node' then begin
+            symbol:= XPATH_NODE_TYPE_NODE_TOKEN;
+            FLastSymbol:= XPATH_NODE_TYPE_NODE_TOKEN;
+            value:= '';
+          end else begin
+            symbol:= XPATH_FUNCTION_NAME_TOKEN;
+            FLastSymbol:= XPATH_FUNCTION_NAME_TOKEN;
+          end;
+        end else begin
+          symbol:= XPATH_NAME_TEST_TOKEN;
+          FLastSymbol:= XPATH_NAME_TEST_TOKEN;
+        end;
+        position:= FPosition;
+
+      end; {case ... else ...}
+
+    end;
+    SL_XPATH_AXIS_NAME_DESCENDANT_OR_SELF_TOKEN_FOLLOWS: begin
+      symbol:= XPATH_AXIS_NAME_DESCENDANT_OR_SELF_TOKEN;
+      // FLastSymbol:= XPATH_AXIS_NAME_DESCENDANT_OR_SELF_TOKEN;
+      // FLastSymbol will never be evaluated, so we do not need to set it.
+      position:= FPosition;
+      value:= '';
+      FDoubleSlashStatus:= SL_XPATH_DOUBLE_COLON_TOKEN_FOLLOWS;
+    end;
+    SL_XPATH_DOUBLE_COLON_TOKEN_FOLLOWS: begin
+      symbol:= XPATH_DOUBLE_COLON_TOKEN;
+      // FLastSymbol:= XPATH_DOUBLE_COLON_TOKEN;
+      // FLastSymbol will never be evaluated, so we do not need to set it.
+      position:= FPosition;
+      value:= '';
+      FDoubleSlashStatus:= SL_XPATH_NODE_TYPE_NODE_TOKEN_FOLLOWS;
+    end;
+    SL_XPATH_NODE_TYPE_NODE_TOKEN_FOLLOWS: begin
+      symbol:= XPATH_NODE_TYPE_NODE_TOKEN;
+      // FLastSymbol:= XPATH_NODE_TYPE_NODE_TOKEN;
+      // FLastSymbol will never be evaluated, so we do not need to set it.
+      position:= FPosition;
+      value:= '';
+      FDoubleSlashStatus:= SL_XPATH_LEFT_PARENTHESIS_FOLLOWS;
+    end;
+    SL_XPATH_LEFT_PARENTHESIS_FOLLOWS: begin
+      symbol:= XPATH_LEFT_PARENTHESIS_TOKEN;
+      // FLastSymbol:= XPATH_LEFT_PARENTHESIS_TOKEN;
+      // FLastSymbol will never be evaluated, so we do not need to set it.
+      position:= FPosition;
+      value:= '';
+      FDoubleSlashStatus:= SL_XPATH_RIGHT_PARENTHESIS_FOLLOWS;
+    end;
+    SL_XPATH_RIGHT_PARENTHESIS_FOLLOWS: begin
+      symbol:= XPATH_RIGHT_PARENTHESIS_TOKEN;
+      // FLastSymbol:= XPATH_RIGHT_PARENTHESIS_TOKEN;
+      // FLastSymbol will never be evaluated, so we do not need to set it.
+      position:= FPosition;
+      value:= '';
+      FDoubleSlashStatus:= SL_XPATH_SLASH_OPERATOR_TOKEN_FOLLLOWS;
+    end;
+    SL_XPATH_SLASH_OPERATOR_TOKEN_FOLLLOWS: begin
+      symbol:= XPATH_SLASH_OPERATOR_TOKEN;
+      FLastSymbol:= XPATH_SLASH_OPERATOR_TOKEN;
+      position:= FPosition;
+      value:= '';
+      FDoubleSlashStatus:= SL_NO_DOUBLE_SLASH;
+    end;
+  end; {case FDoubleSlashStatus ...}
+end;
+
+procedure TdomXPathTokenizer.reset;
+begin
+  FCacheIsActive:= false;
+  FLastSymbol:= XPATH_INVALID_TOKEN;  // Use XPATH_INVALID_TOKEN as a dummy value
+  FPosition:= 0;
+  FDoubleSlashStatus:= SL_NO_DOUBLE_SLASH;
+end;
+
+{ TdomXPathExpression }
+
+constructor TdomXPathExpression.create(const aOwner: TdomDocument;
+                                       const expression: UnicodeString;
+                                       const resolver: TdomXPathNSResolver);
+begin
+  FExpression:= expression;
+  FIsPrepared:= false;
+  FIsValid:= false;
+  FOwnerDocument:= aOwner;
+  FResolver:= resolver;
+  FSyntaxTree:= nil;
+end;
+
+function TdomXPathExpression.createSyntaxNode(const symbol: TdomXPathTokenType;
+                                              const value: UnicodeString): TdomXPathSyntaxNode;
+begin
+  case symbol of
+    XPATH_LEFT_PARENTHESIS_TOKEN:
+      result:= TdomXPathLeftParenthesis.create(value);
+    XPATH_RIGHT_PARENTHESIS_TOKEN:
+      result:= TdomXPathRightParenthesis.create(value);
+    XPATH_LEFT_SQUARE_BRACKET_TOKEN:
+      result:= TdomXPathLeftSquareBracket.create(value);
+    XPATH_RIGHT_SQUARE_BRACKET_TOKEN:
+      result:= TdomXPathRightSquareBracket.create(value);
+    XPATH_SINGLE_DOT_TOKEN:
+      result:= TdomXPathSingleDot.create(value);
+    XPATH_DOUBLE_DOT_TOKEN:
+      result:= TdomXPathDoubleDot.create(value);
+    XPATH_COMMERCIAL_AT_TOKEN:
+      result:= TdomXPathCommercialAt.create(value);
+    XPATH_COMMA_TOKEN:
+      result:= TdomXPathComma.create(value);
+    XPATH_DOUBLE_COLON_TOKEN:
+      result:= TdomXPathDoubleColon.create(value);
+    XPATH_NAME_TEST_TOKEN:
+      result:= TdomXPathNameTest.create(value);
+    XPATH_NODE_TYPE_COMMENT_TOKEN:
+      result:= TdomXPathNodeTypeComment.create(value);
+    XPATH_NODE_TYPE_TEXT_TOKEN:
+      result:= TdomXPathNodeTypeText.create(value);
+    XPATH_NODE_TYPE_PI_TOKEN:
+      result:= TdomXPathNodeTypePI.create(value);
+    XPATH_NODE_TYPE_NODE_TOKEN:
+      result:= TdomXPathNodeTypeNode.create(value);
+    XPATH_AND_OPERATOR_TOKEN:
+      result:= TdomXPathAndOperator.create(value);
+    XPATH_OR_OPERATOR_TOKEN:
+      result:= TdomXPathOrOperator.create(value);
+    XPATH_MOD_OPERATOR_TOKEN:
+      result:= TdomXPathModOperator.create(value);
+    XPATH_DIV_OPERATOR_TOKEN:
+      result:= TdomXPathDivOperator.create(value);
+    XPATH_MULTIPLY_OPERATOR_TOKEN:
+      result:= TdomXPathMultiplyOperator.create(value);
+    XPATH_SLASH_OPERATOR_TOKEN:
+      result:= TdomXPathSlashOperator.create(value);
+    XPATH_SHEFFER_STROKE_OPERATOR_TOKEN:
+      result:= TdomXPathShefferStrokeOperator.create(value);
+    XPATH_PLUS_OPERATOR_TOKEN:
+      result:= TdomXPathPlusOperator.create(value);
+    XPATH_MINUS_OPERATOR_TOKEN:
+      result:= TdomXPathMinusOperator.create(value);
+    XPATH_IS_EQUAL_OPERATOR_TOKEN:
+      result:= TdomXPathIsEqualOperator.create(value);
+    XPATH_IS_NOT_EQUAL_OPERATOR_TOKEN:
+      result:= TdomXPathIsNotEqualOperator.create(value);
+    XPATH_LESS_THAN_OPERATOR_TOKEN:
+      result:= TdomXPathLessThanOperator.create(value);
+    XPATH_LESS_THAN_OR_EQUAL_OPERATOR_TOKEN:
+      result:= TdomXPathLessThanOrEqualOperator.create(value);
+    XPATH_GREATER_THAN_OPERATOR_TOKEN:
+      result:= TdomXPathGreaterThanOperator.create(value);
+    XPATH_GREATER_THAN_OR_EQUAL_OPERATOR_TOKEN:
+      result:= TdomXPathGreaterThanOrEqualOperator.create(value);
+    XPATH_FUNCTION_NAME_TOKEN:
+      result:= TdomXPathFunctionName.create(value);
+    XPATH_AXIS_NAME_ANCESTOR_TOKEN:
+      result:= TdomXPathAxisNameAncestor.create(value);
+    XPATH_AXIS_NAME_ANCESTOR_OR_SELF_TOKEN:
+      result:= TdomXPathAxisNameAncestorOrSelf.create(value);
+    XPATH_AXIS_NAME_ATTRIBUTE_TOKEN:
+      result:= TdomXPathAxisNameAttribute.create(value);
+    XPATH_AXIS_NAME_CHILD_TOKEN:
+      result:= TdomXPathAxisNameChild.create(value);
+    XPATH_AXIS_NAME_DESCENDANT_TOKEN:
+      result:= TdomXPathAxisNameDescendant.create(value);
+    XPATH_AXIS_NAME_DESCENDANT_OR_SELF_TOKEN:
+      result:= TdomXPathAxisNameDescendantOrSelf.create(value);
+    XPATH_AXIS_NAME_FOLLOWING_TOKEN:
+      result:= TdomXPathAxisNameFollowing.create(value);
+    XPATH_AXIS_NAME_FOLLOWING_SIBLING_TOKEN:
+      result:= TdomXPathAxisNameFollowingSibling.create(value);
+    XPATH_AXIS_NAME_NAMESPACE_TOKEN:
+      result:= TdomXPathAxisNameNamespace.create(value);
+    XPATH_AXIS_NAME_PARENT_TOKEN:
+      result:= TdomXPathAxisNameParent.create(value);
+    XPATH_AXIS_NAME_PRECEDING_TOKEN:
+      result:= TdomXPathAxisNamePreceding.create(value);
+    XPATH_AXIS_NAME_PRECEDING_SIBLING_TOKEN:
+      result:= TdomXPathAxisNamePrecedingSibling.create(value);
+    XPATH_AXIS_NAME_SELF_TOKEN:
+      result:= TdomXPathAxisNameSelf.create(value);
+    XPATH_LITERAL_TOKEN:
+      result:= TdomXPathLiteral.create(value);
+    XPATH_NUMBER_TOKEN:
+      result:= TdomXPathNumber.create(value);
+    XPATH_VARIABLE_REFERENCE_TOKEN:
+      result:= TdomXPathVariableReference.create(value);
+  else
+    result:= nil;
+  end;
+end;
+
+function TdomXPathExpression.evaluate(const contextNode: TdomNode;
+                                      const typeCodes: TdomXPathResultTypes;
+                                      const oldResult: TdomXPathResult): TdomXPathResult;
+var
+  dummyResult: TdomXPathResult;
+begin
+  if contextnode.ownerDocument <> FOwnerDocument then begin
+    if assigned(oldResult) then oldResult.free;
+    raise EWrong_Document_Err.create('Wrong document error.');
+  end;
+  if ( (contextNode.nodeType = ntText_Node) and (contextNode.nodeValue = '') ) or
+     not (contextNode.nodeType in [ ntElement_Node,
+                                    ntAttribute_Node,
+                                    ntText_Node,
+                                    ntCDATA_Section_Node,
+                                    ntProcessing_Instruction_Node,
+                                    ntComment_Node,
+                                    ntDocument_Node,
+                                    ntXPath_Namespace_Node ] )
+  then begin
+    if assigned(oldResult) then oldResult.free;
+    raise ENot_Supported_Err.create('Not supported error.');
+  end;
+  if prepare then begin
+    result:= FSyntaxTree.evaluate(contextNode,oldResult,FResolver);
+    if not(result.resultType in typeCodes) then begin
+      if XPATH_BOOLEAN_TYPE in typeCodes then begin
+        dummyResult:= result;
+        result:= XPathBooleanFunc(dummyResult);
+      end else if XPATH_NUMBER_TYPE in typeCodes then begin
+        dummyResult:= result;
+        result:= XPathNumberFunc(dummyResult);
+      end else if XPATH_STRING_TYPE in typeCodes then begin
+        dummyResult:= result;
+        result:= XPathStringFunc(dummyResult);
+      end else begin
+        result.free;
+        raise EXPath_Type_Err.create('XPath type error.');
+      end;
+    end;
+  end else begin
+    if assigned(oldResult) then oldResult.free;
+    raise EXPath_Invalid_Expression_Err.create('Invalid XPath expression error.');
+  end;
+end;
+
+function TdomXPathExpression.prepare: boolean;
+var
+  position: integer;
+  stack: TdomXPathSyntaxNodeStack;
+  symbol: TdomXPathTokenType;
+  tokenizer: TdomXPathTokenizer;
+  value: UnicodeString;
+  axisNode: TdomXPathSyntaxNode;
+  lastSyntaxNode: TdomXPathSyntaxNode;
+  newSyntaxNode: TdomXPathSyntaxNode;
+  nodeTestNode: TdomXPathSyntaxNode;
+  lastArgument: TdomXPathArgument;
+  newArgument: TdomXPathArgument;
+  nodeTypePI: TdomXPathSyntaxNode;
+  PILiteral: TdomXPathSyntaxNode;
+begin
+  if not FIsPrepared then begin
+    tokenizer:= TdomXPathTokenizer.create(FExpression,'1.0');
+    try
+      stack:= TdomXPathSyntaxNodeStack.create;
+      try
+        repeat
+          tokenizer.read(symbol,value,position);
+          case symbol of
+          XPATH_END_OF_TEXT_TOKEN, XPATH_INVALID_TOKEN: break;
+          else
+            lastSyntaxNode:= createSyntaxNode(symbol,value);
+            repeat
+              // -- if lastSyntaxNode is TdomXPathAbsoluteLocationPath then ... --
+              // (TdomXPathAbsoluteLocationPath will not appear in this loop,
+              // so we leave it out here.)
+              if lastSyntaxNode is TdomXPathAndExpr then begin
+                if tokenizer.isFollowing(XPATH_SHEFFER_STROKE_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_MULTIPLY_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_DIV_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_MOD_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_PLUS_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_MINUS_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_LESS_THAN_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_LESS_THAN_OR_EQUAL_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_GREATER_THAN_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_GREATER_THAN_OR_EQUAL_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_IS_EQUAL_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_IS_NOT_EQUAL_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_AND_OPERATOR_TOKEN)
+                then begin
+                  // Operator of higher precedence is following, so we postpone building the expression.
+                  stack.push(lastSyntaxNode);
+                  break;
+                end;
+                if (stack.peek(0) is TdomXPathOrOperator) and
+                   ( (stack.peek(1) is TdomXPathOrExpr) )
+                then begin
+                  // XPath 1.0, prod. [21]:
+                  stack.pop.free;
+                  newSyntaxNode:= TdomXPathOrExpr.create(''); // Create OrExpr.
+                  newSyntaxNode.left:= stack.pop;             // Append OrExpr.
+                  newSyntaxNode.right:= lastSyntaxNode;       // Append AndExpr.
+                  lastSyntaxNode:= newSyntaxNode;
+                end else begin
+                  // XPath 1.0, prod. [21]:
+                  newSyntaxNode:= TdomXPathOrExpr.create(''); // Create OrExpr.
+                  newSyntaxNode.left:= lastSyntaxNode;        // Append AndExpr.
+                  lastSyntaxNode:= newSyntaxNode;
+                end;
+              end else if (lastSyntaxNode is TdomXPathAndOperator) or
+                       // (lastSyntaxNode is TdomXPathArgument) or  // TdomXPathArgument will not appear in this loop, so we leave it out here.
+                          (lastSyntaxNode is TdomXPathComma) or
+                          (lastSyntaxNode is TdomXPathCommercialAt) or
+                          (lastSyntaxNode is TdomXPathCustomAxisName)
+              then begin
+                stack.push(lastSyntaxNode);
+                break;
+              end else if (lastSyntaxNode is TdomXPathDivExpr) or
+                          (lastSyntaxNode is TdomXPathModExpr) or
+                          (lastSyntaxNode is TdomXPathMultiplyExpr)
+              then begin
+                if tokenizer.isFollowing(XPATH_SHEFFER_STROKE_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_MULTIPLY_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_DIV_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_MOD_OPERATOR_TOKEN)
+                then begin
+                  // Operator of higher precedence is following, so we postpone building the expression.
+                  stack.push(lastSyntaxNode);
+                  break;
+                end;
+                if (stack.peek(0) is TdomXPathPlusOperator) and
+                   ( (stack.peek(1) is TdomXPathPlusExpr) or
+                     (stack.peek(1) is TdomXPathMinusExpr) )
+                then begin
+                  // XPath 1.0, prod. [25]:
+                  stack.pop.free;
+                  newSyntaxNode:= TdomXPathPlusExpr.create(''); // Create PlusExpr.
+                  newSyntaxNode.left:= stack.pop;               // Append AdditiveExpr.
+                  newSyntaxNode.right:= lastSyntaxNode;         // Append MultiplicativeExpr.
+                  lastSyntaxNode:= newSyntaxNode;
+                end else if (stack.peek(0) is TdomXPathMinusOperator) and
+                   ( (stack.peek(1) is TdomXPathPlusExpr) or
+                     (stack.peek(1) is TdomXPathMinusExpr) )
+                then begin
+                  // XPath 1.0, prod. [25]:
+                  stack.pop.free;
+                  newSyntaxNode:= TdomXPathMinusExpr.create(''); // Create MinusExpr.
+                  newSyntaxNode.left:= stack.pop;               // Append AdditiveExpr.
+                  newSyntaxNode.right:= lastSyntaxNode;         // Append MultiplicativeExpr.
+                  lastSyntaxNode:= newSyntaxNode;
+                end else begin
+                  // XPath 1.0, prod. [25]:
+                  newSyntaxNode:= TdomXPathPlusExpr.create(''); // Create PlusExpr.
+                  newSyntaxNode.left:= lastSyntaxNode;          // Append MultiplicativeExpr.
+                  lastSyntaxNode:= newSyntaxNode;
+                end;
+              end else if (lastSyntaxNode is TdomXPathDivOperator) or
+                          (lastSyntaxNode is TdomXPathDoubleColon)
+              then begin
+                stack.push(lastSyntaxNode);
+                break;
+              end else if lastSyntaxNode is TdomXPathDoubleDot then begin
+                // XPath 1.0, prod. [12]:
+                lastSyntaxNode.free;
+                lastSyntaxNode:= TdomXPathStep.create('');
+                lastSyntaxNode.left:= TdomXPathAxisNameParent.create('');
+                lastSyntaxNode.left.left:= TdomXPathNodeTest.create('');
+                lastSyntaxNode.left.left.left:= TdomXPathNodeTypeNode.create('');
+              end else if lastSyntaxNode is TdomXPathExpr then begin
+                stack.push(lastSyntaxNode);
+                break;
+              end else if lastSyntaxNode is TdomXPathFilterExpr then begin
+                // XPath 1.0, prod. [19]:
+                if tokenizer.isFollowing(XPATH_SLASH_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_LEFT_SQUARE_BRACKET_TOKEN)
+                then begin
+                  // A Slash or Predicate is following, so we postpone building the PathExpr.
+                  stack.push(lastSyntaxNode);
+                  break;
+                end;
+                newSyntaxNode:= TdomXPathPathExpr.create(''); // Create PathExpr.
+                newSyntaxNode.left:= lastSyntaxNode;          // Append FilterExpr.
+                lastSyntaxNode:= newSyntaxNode;
+              end else if lastSyntaxNode is TdomXPathFunctionCall then begin
+                // XPath 1.0, prod. [15]:
+                newSyntaxNode:= TdomXPathPrimaryExpr.create(''); // Create PrimaryExpr.
+                newSyntaxNode.left:= lastSyntaxNode;             // Append FunctionCall.
+                lastSyntaxNode:= newSyntaxNode;
+              end else if lastSyntaxNode is TdomXPathFunctionName then begin
+                stack.push(lastSyntaxNode);
+                break;
+              end else if (lastSyntaxNode is TdomXPathGreaterThanExpr) or
+                          (lastSyntaxNode is TdomXPathGreaterThanOrEqualExpr) or
+                          (lastSyntaxNode is TdomXPathLessThanExpr) or
+                          (lastSyntaxNode is TdomXPathLessThanOrEqualExpr)
+              then begin
+                if tokenizer.isFollowing(XPATH_SHEFFER_STROKE_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_MULTIPLY_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_DIV_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_MOD_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_PLUS_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_MINUS_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_LESS_THAN_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_LESS_THAN_OR_EQUAL_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_GREATER_THAN_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_GREATER_THAN_OR_EQUAL_OPERATOR_TOKEN)
+                then begin
+                  // Operator of higher precedence is following, so we postpone building the expression.
+                  stack.push(lastSyntaxNode);
+                  break;
+                end;
+                if (stack.peek(0) is TdomXPathIsEqualOperator) and
+                   ( (stack.peek(1) is TdomXPathIsEqualExpr) or
+                     (stack.peek(1) is TdomXPathIsNotEqualExpr) )
+                then begin
+                  // XPath 1.0, prod. [23]:
+                  stack.pop.free;
+                  newSyntaxNode:= TdomXPathIsEqualExpr.create(''); // Create IsEqualExpr.
+                  newSyntaxNode.left:= stack.pop;                  // Append EqualityExpr.
+                  newSyntaxNode.right:= lastSyntaxNode;            // Append RelationalExpr.
+                  lastSyntaxNode:= newSyntaxNode;
+                end else if (stack.peek(0) is TdomXPathIsNotEqualOperator) and
+                   ( (stack.peek(1) is TdomXPathIsEqualExpr) or
+                     (stack.peek(1) is TdomXPathIsNotEqualExpr) )
+                then begin
+                  // XPath 1.0, prod. [23]:
+                  stack.pop.free;
+                  newSyntaxNode:= TdomXPathIsNotEqualExpr.create(''); // Create IsNotEqualExpr.
+                  newSyntaxNode.left:= stack.pop;                     // Append EqualityExpr.
+                  newSyntaxNode.right:= lastSyntaxNode;               // Append RelationalExpr.
+                  lastSyntaxNode:= newSyntaxNode;
+                end else begin
+                  // XPath 1.0, prod. [23]:
+                  newSyntaxNode:= TdomXPathIsEqualExpr.create(''); // Create IsEqualExpr.
+                  newSyntaxNode.left:= lastSyntaxNode;             // Append RelationalExpr.
+                  lastSyntaxNode:= newSyntaxNode;
+                end;
+              end else if (lastSyntaxNode is TdomXPathGreaterThanOperator) or
+                          (lastSyntaxNode is TdomXPathGreaterThanOrEqualOperator)
+              then begin
+                stack.push(lastSyntaxNode);
+                break;
+              end else if (lastSyntaxNode is TdomXPathIsEqualExpr) or
+                          (lastSyntaxNode is TdomXPathIsNotEqualExpr)
+              then begin
+                if tokenizer.isFollowing(XPATH_SHEFFER_STROKE_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_MULTIPLY_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_DIV_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_MOD_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_PLUS_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_MINUS_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_LESS_THAN_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_LESS_THAN_OR_EQUAL_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_GREATER_THAN_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_GREATER_THAN_OR_EQUAL_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_IS_EQUAL_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_IS_NOT_EQUAL_OPERATOR_TOKEN)
+                then begin
+                  // Operator of higher precedence is following, so we postpone building the expression.
+                  stack.push(lastSyntaxNode);
+                  break;
+                end;
+                if (stack.peek(0) is TdomXPathAndOperator) and
+                   ( (stack.peek(1) is TdomXPathAndExpr) )
+                then begin
+                  // XPath 1.0, prod. [22]:
+                  stack.pop.free;
+                  newSyntaxNode:= TdomXPathAndExpr.create(''); // Create AndExpr.
+                  newSyntaxNode.left:= stack.pop;              // Append AndExpr.
+                  newSyntaxNode.right:= lastSyntaxNode;        // Append EqualityExpr.
+                  lastSyntaxNode:= newSyntaxNode;
+                end else begin
+                  // XPath 1.0, prod. [22]:
+                  newSyntaxNode:= TdomXPathAndExpr.create(''); // Create AndExpr.
+                  newSyntaxNode.left:= lastSyntaxNode;         // Append EqualityExpr.
+                  lastSyntaxNode:= newSyntaxNode;
+                end;
+              end else if (lastSyntaxNode is TdomXPathIsEqualOperator) or
+                          (lastSyntaxNode is TdomXPathIsNotEqualOperator) or
+                          (lastSyntaxNode is TdomXPathLeftParenthesis) or
+                          (lastSyntaxNode is TdomXPathLeftSquareBracket) or
+                          (lastSyntaxNode is TdomXPathLessThanOperator) or
+                          (lastSyntaxNode is TdomXPathLessThanOrEqualOperator)
+              then begin
+                stack.push(lastSyntaxNode);
+                break;
+              end else if lastSyntaxNode is TdomXPathLiteral then begin
+                if (stack.peek(0) is TdomXPathLeftParenthesis) and
+                   (stack.peek(1) is TdomXPathNodeTypePI) and
+                   tokenizer.isFollowing(XPATH_RIGHT_PARENTHESIS_TOKEN)
+                then begin
+                  // Literal is part of a processing-instruction node test,
+                  // so we postpone building the expression.
+                  stack.push(lastSyntaxNode);
+                  break;
+                end else begin
+                  // XPath 1.0, prod. [15]:
+                  newSyntaxNode:= TdomXPathPrimaryExpr.create(''); // Create PrimaryExpr.
+                  newSyntaxNode.left:= lastSyntaxNode;             // Append Literal.
+                  lastSyntaxNode:= newSyntaxNode;
+                end;
+              end else if (lastSyntaxNode is TdomXPathMinusExpr) or
+                          (lastSyntaxNode is TdomXPathPlusExpr)
+              then begin
+                if tokenizer.isFollowing(XPATH_SHEFFER_STROKE_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_MULTIPLY_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_DIV_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_MOD_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_PLUS_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_MINUS_OPERATOR_TOKEN)
+                then begin
+                  // Operator of higher precedence is following, so we postpone building the expression.
+                  stack.push(lastSyntaxNode);
+                  break;
+                end;
+                if (stack.peek(0) is TdomXPathLessThanOperator) and
+                   ( (stack.peek(1) is TdomXPathLessThanExpr) or
+                     (stack.peek(1) is TdomXPathLessThanOrEqualExpr) or
+                     (stack.peek(1) is TdomXPathGreaterThanExpr) or
+                     (stack.peek(1) is TdomXPathGreaterThanOrEqualExpr) )
+                then begin
+                  // XPath 1.0, prod. [24]:
+                  stack.pop.free;
+                  newSyntaxNode:= TdomXPathLessThanExpr.create(''); // Create LessThanExpr.
+                  newSyntaxNode.left:= stack.pop;                   // Append RelationalExpr.
+                  newSyntaxNode.right:= lastSyntaxNode;             // Append AdditiveExpr.
+                  lastSyntaxNode:= newSyntaxNode;
+                end else if (stack.peek(0) is TdomXPathLessThanOrEqualOperator) and
+                   ( (stack.peek(1) is TdomXPathLessThanExpr) or
+                     (stack.peek(1) is TdomXPathLessThanOrEqualExpr) or
+                     (stack.peek(1) is TdomXPathGreaterThanExpr) or
+                     (stack.peek(1) is TdomXPathGreaterThanOrEqualExpr) )
+                then begin
+                  // XPath 1.0, prod. [24]:
+                  stack.pop.free;
+                  newSyntaxNode:= TdomXPathLessThanOrEqualExpr.create(''); // Create LessThanOrEqualExpr.
+                  newSyntaxNode.left:= stack.pop;                          // Append RelationalExpr.
+                  newSyntaxNode.right:= lastSyntaxNode;                    // Append AdditiveExpr.
+                  lastSyntaxNode:= newSyntaxNode;
+                end else if (stack.peek(0) is TdomXPathGreaterThanOperator) and
+                   ( (stack.peek(1) is TdomXPathLessThanExpr) or
+                     (stack.peek(1) is TdomXPathLessThanOrEqualExpr) or
+                     (stack.peek(1) is TdomXPathGreaterThanExpr) or
+                     (stack.peek(1) is TdomXPathGreaterThanOrEqualExpr) )
+                then begin
+                  // XPath 1.0, prod. [24]:
+                  stack.pop.free;
+                  newSyntaxNode:= TdomXPathGreaterThanExpr.create(''); // Create GreaterThanExpr.
+                  newSyntaxNode.left:= stack.pop;                      // Append RelationalExpr.
+                  newSyntaxNode.right:= lastSyntaxNode;                // Append AdditiveExpr.
+                  lastSyntaxNode:= newSyntaxNode;
+                end else if (stack.peek(0) is TdomXPathGreaterThanOrEqualOperator) and
+                   ( (stack.peek(1) is TdomXPathLessThanExpr) or
+                     (stack.peek(1) is TdomXPathLessThanOrEqualExpr) or
+                     (stack.peek(1) is TdomXPathGreaterThanExpr) or
+                     (stack.peek(1) is TdomXPathGreaterThanOrEqualExpr) )
+                then begin
+                  // XPath 1.0, prod. [24]:
+                  stack.pop.free;
+                  newSyntaxNode:= TdomXPathGreaterThanOrEqualExpr.create(''); // Create GreaterThanOrEqualExpr.
+                  newSyntaxNode.left:= stack.pop;                             // Append RelationalExpr.
+                  newSyntaxNode.right:= lastSyntaxNode;                       // Append AdditiveExpr.
+                  lastSyntaxNode:= newSyntaxNode;
+                end else begin
+                  // XPath 1.0, prod. [24]:
+                  newSyntaxNode:= TdomXPathLessThanExpr.create(''); // Create LessThanExpr.
+                  newSyntaxNode.left:= lastSyntaxNode;              // Append AdditiveExpr.
+                  lastSyntaxNode:= newSyntaxNode;
+                end;
+              end else if (lastSyntaxNode is TdomXPathMinusOperator) or
+                          (lastSyntaxNode is TdomXPathModOperator) or
+                          (lastSyntaxNode is TdomXPathMultiplyOperator)
+              then begin
+                stack.push(lastSyntaxNode);
+                break;
+              end else if lastSyntaxNode is TdomXPathNameTest then begin
+                // XPath 1.0, prod. [7]:
+                newSyntaxNode:= TdomXPathNodeTest.create('');  // Create NodeTest.
+                newSyntaxNode.left:= lastSyntaxNode;           // Append NameTest.
+                lastSyntaxNode:= newSyntaxNode;
+              end else if lastSyntaxNode is TdomXPathNodeTest then begin
+                // XPath 1.0, prod. [4]:
+                if tokenizer.isFollowing(XPATH_LEFT_SQUARE_BRACKET_TOKEN) then begin
+                  // A Predicate is following, so we postpone building the Step.
+                  stack.push(lastSyntaxNode);
+                  break;
+                end;
+                if stack.peek(0) is TdomXPathDoubleColon then begin
+                  if stack.peek(1) is TdomXPathCustomAxisName then begin
+                    stack.pop.free;
+                    newSyntaxNode:= stack.pop;
+                    newSyntaxNode.left:= lastSyntaxNode;       // Append NodeTest to AxisName.
+                    lastSyntaxNode:= TdomXPathStep.create(''); // Create Step.
+                    lastSyntaxNode.left:= newSyntaxNode;       // Append AxisName to Step.
+                  end else begin
+                    // Malformed XPath Expression.  We are parsing it anyway ...
+                    stack.push(lastSyntaxNode);
+                    break;
+                  end;
+                end else if stack.peek(0) is TdomXPathCommercialAt then begin
+                  // XPath 1.0, prod. [13]:
+                  stack.pop.free;
+                  newSyntaxNode:= TdomXPathAxisNameAttribute.create('');
+                  newSyntaxNode.left:= lastSyntaxNode;       // Append NodeTest to AxisName.
+                  lastSyntaxNode:= TdomXPathStep.create(''); // Create Step.
+                  lastSyntaxNode.left:= newSyntaxNode;       // Append AxisName to Step.
+                end else begin
+                  // XPath 1.0, prod. [13]:
+                  newSyntaxNode:= TdomXPathAxisNameChild.create('');
+                  newSyntaxNode.left:= lastSyntaxNode;       // Append NodeTest to AxisName.
+                  lastSyntaxNode:= TdomXPathStep.create(''); // Create Step.
+                  lastSyntaxNode.left:= newSyntaxNode;       // Append AxisName to Step.
+                end;
+              end else if (lastSyntaxNode is TdomXPathNodeTypeComment) or
+                          (lastSyntaxNode is TdomXPathNodeTypeNode) or
+                          (lastSyntaxNode is TdomXPathNodeTypePI) or
+                          (lastSyntaxNode is TdomXPathNodeTypeText)
+              then begin
+                stack.push(lastSyntaxNode);
+                break;
+              end else if lastSyntaxNode is TdomXPathNumber then begin
+                // XPath 1.0, prod. [15]:
+                newSyntaxNode:= TdomXPathPrimaryExpr.create(''); // Create PrimaryExpr.
+                newSyntaxNode.left:= lastSyntaxNode;             // Append Number.
+                lastSyntaxNode:= newSyntaxNode;
+              end else if lastSyntaxNode is TdomXPathOrExpr then begin
+                if tokenizer.isFollowing(XPATH_SHEFFER_STROKE_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_MULTIPLY_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_DIV_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_MOD_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_PLUS_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_MINUS_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_LESS_THAN_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_LESS_THAN_OR_EQUAL_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_GREATER_THAN_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_GREATER_THAN_OR_EQUAL_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_IS_EQUAL_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_IS_NOT_EQUAL_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_AND_OPERATOR_TOKEN) or
+                   tokenizer.isFollowing(XPATH_OR_OPERATOR_TOKEN)
+                then begin
+                  // Operator of higher precedence is following, so we postpone building the expression.
+                  stack.push(lastSyntaxNode);
+                  break;
+                end;
+                // XPath 1.0, prod. [14]:
+                newSyntaxNode:= TdomXPathExpr.create(''); // Create Expr.
+                newSyntaxNode.left:= lastSyntaxNode;      // Append OrExpr.
+                lastSyntaxNode:= newSyntaxNode;
+              end else if lastSyntaxNode is TdomXPathOrOperator then begin
+                stack.push(lastSyntaxNode);
+                break;
+              end else if lastSyntaxNode is TdomXPathPathExpr then begin
+                // XPath 1.0, prod. [18]:
+                if tokenizer.isFollowing(XPATH_SLASH_OPERATOR_TOKEN) then begin
+                  // A Slash is following, so we postpone building the TdomXPathUnionExpr.
+                  stack.push(lastSyntaxNode);
+                  break;
+                end;
+                if (stack.peek(0) is TdomXPathShefferStrokeOperator) and
+                   (stack.peek(1) is TdomXPathUnionExpr)
+                then begin
+                  stack.pop.free;
+                  newSyntaxNode:= TdomXPathUnionExpr.create(''); // Create UnionExpr.
+                  newSyntaxNode.left:= stack.pop;                // Append UnionExpr.
+                  newSyntaxNode.right:= lastSyntaxNode;          // Append PathExpr.
+                  lastSyntaxNode:= newSyntaxNode;
+                end else begin
+                  newSyntaxNode:= TdomXPathUnionExpr.create(''); // Create UnionExpr.
+                  newSyntaxNode.left:= lastSyntaxNode;           // Append PathExpr.
+                  lastSyntaxNode:= newSyntaxNode;
+                end;
+              end else if lastSyntaxNode is TdomXPathPlusOperator then begin
+                stack.push(lastSyntaxNode);
+                break;
+              end else if lastSyntaxNode is TdomXPathPredicate then begin
+                if stack.peek(0) is TdomXPathFilterExpr then begin
+                  // XPath 1.0, prod. [20]:
+                  newSyntaxNode:= TdomXPathFilterExpr.create('');
+                  newSyntaxNode.left:= stack.pop;
+                  newSyntaxNode.right:= lastSyntaxNode;
+                  lastSyntaxNode:= newSyntaxNode;
+                end else begin
+                  // XPath 1.0, prod. [4]:
+                  if tokenizer.isFollowing(XPATH_LEFT_SQUARE_BRACKET_TOKEN) then begin
+                    // Another Predicate is following, so we postpone building the Step.
+                    stack.push(lastSyntaxNode);
+                    break;
+                  end;
+                  if stack.peek(0) is TdomXPathPredicate then begin
+                    newSyntaxNode:= stack.pop;
+                    newSyntaxNode.right:= lastSyntaxNode;
+                    lastSyntaxNode:= newSyntaxNode;
+                  end else if stack.peek(0) is TdomXPathNodeTest then begin
+                    if stack.peek(1) is TdomXPathDoubleColon then begin
+                      if stack.peek(2) is TdomXPathCustomAxisName then begin
+                        nodeTestNode:= stack.pop; // Pop the NodeTest from the stack.
+                        stack.pop.free;           // Pop and delete the DoubleColon.
+                        axisNode:= stack.pop;     // Pop the AxisName from the stack.
+                        axisNode.left:= nodeTestNode;              // Append NodeTest to AxisName.
+                        axisNode.right:= lastSyntaxNode;           // Append Predicate to AxisName.
+                        lastSyntaxNode:= TdomXPathStep.create(''); // Create Step.
+                        lastSyntaxNode.left:= axisNode;            // Append AxisName to Step.
+                      end else begin
+                        // Malformed XPath Expression.  We are parsing it anyway ...
+                        stack.push(lastSyntaxNode);
+                        break;
+                      end;
+                    end else if stack.peek(1) is TdomXPathCommercialAt then begin
+                      // XPath 1.0, prod. [13]:
+                      nodeTestNode:= stack.pop;                         // Pop the NodeTest from the stack.
+                      stack.pop.free;                                   // Pop and delete the DoubleColon.
+                      axisNode:= TdomXPathAxisNameAttribute.create(''); // Create attribute axis AxisName.
+                      axisNode.left:= nodeTestNode;              // Append NodeTest to AxisName.
+                      axisNode.right:= lastSyntaxNode;           // Append Predicate to AxisName.
+                      lastSyntaxNode:= TdomXPathStep.create(''); // Create Step.
+                      lastSyntaxNode.left:= axisNode;            // Append AxisName to Step.
+                    end else begin
+                      // XPath 1.0, prod. [13]:
+                      nodeTestNode:= stack.pop;                      // Pop the NodeTest from the stack.
+                      axisNode:= TdomXPathAxisNameChild.create('');  // Create child axis AxisName.
+                      axisNode.left:= nodeTestNode;              // Append NodeTest to AxisName.
+                      axisNode.right:= lastSyntaxNode;           // Append Predicate to AxisName.
+                      lastSyntaxNode:= TdomXPathStep.create(''); // Create Step.
+                      lastSyntaxNode.left:= axisNode;            // Append AxisName to Step.
+                    end;
+                  end else begin
+                    // Malformed XPath Expression.  We are parsing it anyway ...
+                    stack.push(lastSyntaxNode);
+                    break;
+                  end;
+                end;
+              end else if lastSyntaxNode is TdomXPathPrimaryExpr then begin
+                // XPath 1.0, prod. [20]:
+                newSyntaxNode:= TdomXPathFilterExpr.create(''); // Create FilterExpr.
+                newSyntaxNode.left:= lastSyntaxNode;            // Append PrimaryExpr.
+                lastSyntaxNode:= newSyntaxNode;
+              end else if lastSyntaxNode is TdomXPathRightParenthesis then begin
+                // XPath 1.0, prod. [7]:
+                if (stack.peek(0) is TdomXPathLeftParenthesis) and
+                   ( (stack.peek(1) is TdomXPathNodeTypeComment) or
+                     (stack.peek(1) is TdomXPathNodeTypeNode) or
+                     (stack.peek(1) is TdomXPathNodeTypePI) or
+                     (stack.peek(1) is TdomXPathNodeTypeText) )
+                then begin
+                  lastSyntaxNode.free;
+                  lastSyntaxNode:= TdomXPathNodeTest.create('');
+                  stack.pop.free;
+                  lastSyntaxNode.left:= stack.pop;
+                end else if (stack.peek(0) is TdomXPathLiteral) and
+                            (stack.peek(1) is TdomXPathLeftParenthesis) and
+                            (stack.peek(2) is TdomXPathNodeTypePI)
+                then begin
+                  lastSyntaxNode.free;
+                  lastSyntaxNode:= TdomXPathNodeTest.create(''); // Create NodeTest
+                  PILiteral:= stack.pop;
+                  stack.pop.free;                                // Remove LeftParenthesist from stack.
+                  nodeTypePI:= stack.pop;
+                  nodeTypePI.left:= PILiteral;                   // Append Literal to NodeTypePI
+                  lastSyntaxNode.left:= nodeTypePI;              // Append NodeTypePI to NodeTest
+                end else if (stack.peek(0) is TdomXPathExpr) and
+                            (stack.peek(1) is TdomXPathLeftParenthesis) and
+                            not (stack.peek(2) is TdomXPathFunctionName)
+                then begin
+                  // XPath 1.0, prod. [15]:
+                  lastSyntaxNode.free;
+                  lastSyntaxNode:= TdomXPathPrimaryExpr.create(''); // Create PrimaryExpr
+                  lastSyntaxNode.left:= stack.pop;                  // Append Expr
+                  stack.pop.free;                                   // Remove LeftParenthesist from stack.
+                end else if (stack.peek(0) is TdomXPathLeftParenthesis) and
+                            (stack.peek(1) is TdomXPathFunctionName)
+                then begin
+                  // XPath 1.0, prod. [16]:
+                  stack.pop.free;
+                  lastSyntaxNode.free;
+                  lastSyntaxNode:= TdomXPathFunctionCall.create(''); // Create FunctionCall.
+                  lastSyntaxNode.left:= stack.pop;                   // Append FunctionName.
+                end else begin
+                  // XPath 1.0, prod. [16]:
+                  lastArgument:= nil;
+                  while (stack.peek(0) is TdomXPathExpr) and
+                        (stack.peek(1) is TdomXPathComma)
+                  do begin
+                    newArgument:= TdomXPathArgument.create(''); // Create Argument.
+                    newArgument.left:= stack.pop;               // Append Expr.
+                    newArgument.right:= lastArgument;           // Append last Argument (if any).
+                    lastArgument:= newArgument;
+                    stack.pop.free;
+                  end;
+                  if (stack.peek(0) is TdomXPathExpr) and
+                     (stack.peek(1) is TdomXPathLeftParenthesis) and
+                     (stack.peek(2) is TdomXPathFunctionName)
+                  then begin
+                    newArgument:= TdomXPathArgument.create('');        // Create Argument.
+                    newArgument.left:= stack.pop;                      // Append Expr.
+                    newArgument.right:= lastArgument;                  // Append last Argument (if any).
+                    stack.pop.free;
+                    lastSyntaxNode.free;
+                    lastSyntaxNode:= TdomXPathFunctionCall.create(''); // Create FunctionCall.
+                    lastSyntaxNode.left:= stack.pop;                   // Append FunctionName.
+                    lastSyntaxNode.right:= newArgument;                // Append Argument.
+                  end else begin
+                    // Malformed XPath Expression.  We are parsing it anyway ...
+                    if assigned(lastArgument)
+                      then stack.push(lastArgument);
+                    stack.push(lastSyntaxNode);
+                    break;
+                  end;
+                end;
+              end else if lastSyntaxNode is TdomXPathRightSquareBracket then begin
+                // XPath 1.0, prod. [8] and [9]:
+                if (stack.peek(0) is TdomXPathExpr) and
+                   (stack.peek(1) is TdomXPathLeftSquareBracket)
+                then begin
+                  lastSyntaxNode.free;
+                  lastSyntaxNode:= TdomXPathPredicate.create(''); // Create Predicate.
+                  lastSyntaxNode.left:= stack.pop;                // Append Expr.
+                  stack.pop.free;                                 // Remove LeftSquareBracket from stack.
+                end else begin
+                  // Malformed XPath Expression.  We are parsing it anyway ...
+                  stack.push(lastSyntaxNode);
+                  break;
+                end;
+              end else if lastSyntaxNode is TdomXPathShefferStrokeOperator then begin
+                if stack.peek(0) is TdomXPathPathExpr then begin
+                  newSyntaxNode:= TdomXPathUnionExpr.create(''); // Create UnionExpr.
+                  newSyntaxNode.left:= stack.pop;                // Append PathExpr from stack.
+                  stack.push(newSyntaxNode);                     // Push the UnionExpr on the stack.
+                  stack.push(lastSyntaxNode);                    // Push the ShefferStrokeOperator on the stack.
+                  break;
+                end else begin
+                  // Malformed XPath Expression.  We are parsing it anyway ...
+                  stack.push(lastSyntaxNode);
+                  break;
+                end;
+              end else if lastSyntaxNode is TdomXPathSingleDot then begin
+                // XPath 1.0, prod. [12]:
+                lastSyntaxNode.free;
+                lastSyntaxNode:= TdomXPathStep.create('');                        // Create Step.
+                lastSyntaxNode.left:= TdomXPathAxisNameSelf.create('');           // Create and append AxisName to Step.
+                lastSyntaxNode.left.left:= TdomXPathNodeTest.create('');          // Create and append NodeTest to AxisName.
+                lastSyntaxNode.left.left.left:= TdomXPathNodeTypeNode.create(''); // Create and append NodeType to NodeTest.
+              end else if lastSyntaxNode is TdomXPathSlashOperator then begin
+                // XPath 1.0, prod. [2]:
+                if ( (not assigned(stack.peek(0))) or
+                     (stack.peek(0) is TdomXPathShefferStrokeOperator) ) and
+                   ( tokenizer.isFollowing(XPATH_END_OF_TEXT_TOKEN) or
+                     tokenizer.isFollowing(XPATH_SHEFFER_STROKE_OPERATOR_TOKEN)    )
+                then begin
+                  lastSyntaxNode.free;
+                  lastSyntaxNode:= TdomXPathPathExpr.create('');                  // Create PathExpr.
+                  lastSyntaxNode.left:= TdomXPathAbsoluteLocationPath.create(''); // Create and append AbsolutLocationPath.
+                end else begin
+                  stack.push(lastSyntaxNode);
+                  break;
+                end;
+              end else if lastSyntaxNode is TdomXPathStep then begin
+                // XPath 1.0, prod. [3] and [19]:
+                if stack.peek(0) is TdomXPathSlashOperator then begin
+                  if stack.peek(1) is TdomXPathFilterExpr then begin
+                    stack.pop.free;
+                    newSyntaxNode:= TdomXPathPathExpr.create(''); // Create PathExpr.
+                    newSyntaxNode.left:= stack.pop;               // Append FilterExpr to PathExpr.
+                    newSyntaxNode.right:= lastSyntaxNode;         // Append Step to PathExpr.
+                    lastSyntaxNode:= newSyntaxNode;
+                  end else if stack.peek(1) is TdomXPathPathExpr then begin
+                    stack.pop.free;
+                    if TdomXPathPathExpr(stack.peek(0)).addStep(TdomXPathStep(lastSyntaxNode)) then begin
+                      lastSyntaxNode:= stack.pop;
+                    end else begin
+                      // Malformed XPath Expression.  We are parsing it anyway ...
+                      stack.push(lastSyntaxNode);
+                      break;
+                    end;
+                  end else if (not assigned(stack.peek(1)) ) or
+                              (stack.peek(1) is TdomXPathShefferStrokeOperator)
+                  then begin
+                    // XPath 1.0, prod. [2]:
+                    stack.pop.free;
+                    newSyntaxNode:= TdomXPathPathExpr.create('');                  // Create PathExpr.
+                    newSyntaxNode.left:= TdomXPathAbsoluteLocationPath.create(''); // Create and append AbsolutLocationPath.
+                    newSyntaxNode.right:= lastSyntaxNode;                          // Append Step.
+                    lastSyntaxNode:= newSyntaxNode;
+                  end else begin
+                    // Malformed XPath Expression.  We are parsing it anyway ...
+                    stack.push(lastSyntaxNode);
+                    break;
+                  end;
+                end else begin
+                  newSyntaxNode:= TdomXPathPathExpr.create(''); // Create PathExpr.
+                  newSyntaxNode.right:= lastSyntaxNode;         // Append Step to PathExpr.
+                  lastSyntaxNode:= newSyntaxNode;
+                end;
+              end else if lastSyntaxNode is TdomXPathUnaryExpr then begin
+                if tokenizer.isFollowing(XPATH_SHEFFER_STROKE_OPERATOR_TOKEN) then begin
+                  // Operator of higher precedence is following, so we postpone building the expression.
+                  stack.push(lastSyntaxNode);
+                  break;
+                end;
+                if (stack.peek(0) is TdomXPathMinusOperator) and not (
+                     (stack.peek(1) is TdomXPathPlusExpr) or
+                     (stack.peek(1) is TdomXPathMinusExpr) or
+                     (stack.peek(1) is TdomXPathMultiplyExpr) or
+                     (stack.peek(1) is TdomXPathDivExpr) or
+                     (stack.peek(1) is TdomXPathModExpr) or
+                     (stack.peek(1) is TdomXPathUnaryExpr) or
+                     (stack.peek(1) is TdomXPathUnionExpr)  )
+                then begin
+                  // XPath 1.0, prod. [27]:
+                  newSyntaxNode:= TdomXPathUnaryExpr.create(''); // Create UnaryExpr.
+                  newSyntaxNode.left:= stack.pop;                // Append MinusOperator.
+                  newSyntaxNode.right:= lastSyntaxNode;          // Append UnaryExpr.
+                  lastSyntaxNode:= newSyntaxNode;
+                end else if (stack.peek(0) is TdomXPathMultiplyOperator) and
+                   ( (stack.peek(1) is TdomXPathMultiplyExpr) or
+                     (stack.peek(1) is TdomXPathDivExpr) or
+                     (stack.peek(1) is TdomXPathModExpr) )
+                then begin
+                  // XPath 1.0, prod. [26]:
+                  stack.pop.free;
+                  newSyntaxNode:= TdomXPathMultiplyExpr.create(''); // Create MultiplyExpr.
+                  newSyntaxNode.left:= stack.pop;                   // Append MultiplicativeExpr.
+                  newSyntaxNode.right:= lastSyntaxNode;             // Append UnaryExpr.
+                  lastSyntaxNode:= newSyntaxNode;
+                end else if (stack.peek(0) is TdomXPathDivOperator) and
+                   ( (stack.peek(1) is TdomXPathMultiplyExpr) or
+                     (stack.peek(1) is TdomXPathDivExpr) or
+                     (stack.peek(1) is TdomXPathModExpr) )
+                then begin
+                  // XPath 1.0, prod. [26]:
+                  stack.pop.free;
+                  newSyntaxNode:= TdomXPathDivExpr.create(''); // Create DivExpr.
+                  newSyntaxNode.left:= stack.pop;              // Append MultiplicativeExpr.
+                  newSyntaxNode.right:= lastSyntaxNode;        // Append UnaryExpr.
+                  lastSyntaxNode:= newSyntaxNode;
+                end else if (stack.peek(0) is TdomXPathModOperator) and
+                   ( (stack.peek(1) is TdomXPathMultiplyExpr) or
+                     (stack.peek(1) is TdomXPathDivExpr) or
+                     (stack.peek(1) is TdomXPathModExpr) )
+                then begin
+                  // XPath 1.0, prod. [26]:
+                  stack.pop.free;
+                  newSyntaxNode:= TdomXPathModExpr.create(''); // Create ModExpr.
+                  newSyntaxNode.left:= stack.pop;              // Append MultiplicativeExpr.
+                  newSyntaxNode.right:= lastSyntaxNode;        // Append UnaryExpr.
+                  lastSyntaxNode:= newSyntaxNode;
+                end else begin
+                  // XPath 1.0, prod. [26]:
+                  newSyntaxNode:= TdomXPathMultiplyExpr.create(''); // Create MultiplyExpr.
+                  newSyntaxNode.left:= lastSyntaxNode;              // Append UnaryExpr.
+                  lastSyntaxNode:= newSyntaxNode;
+                end;
+              end else if lastSyntaxNode is TdomXPathUnionExpr then begin
+                // XPath 1.0, prod. [27]:
+                if tokenizer.isFollowing(XPATH_SHEFFER_STROKE_OPERATOR_TOKEN) then begin
+                  // A Sheffer's Stroke is following, so we postpone building the UnaryExpr.
+                  stack.push(lastSyntaxNode);
+                  break;
+                end;
+                newSyntaxNode:= TdomXPathUnaryExpr.create(''); // Create UnaryExpr.
+                newSyntaxNode.left:= lastSyntaxNode;           // Append the UnionExpr.
+                lastSyntaxNode:= newSyntaxNode;
+              end else if lastSyntaxNode is TdomXPathVariableReference then begin
+                // XPath 1.0, prod. [15]:
+                newSyntaxNode:= TdomXPathPrimaryExpr.create(''); // Create PrimaryExpr.
+                newSyntaxNode.left:= lastSyntaxNode;             // Append VariableReference.
+                lastSyntaxNode:= newSyntaxNode;
+              end;
+            until false;
+          end; {case ... else ...}
+        until false;
+
+        if assigned(FSyntaxTree) then FSyntaxTree.free;  // Free the old syntax tree, if any.
+        FIsPrepared:= true;
+
+        // Is the syntax tree valid, i.e. does the evaluation reach the end of the text
+        // and does the stack hold exactly one root node of type TdomXPathExpr?
+        if (symbol =  XPATH_END_OF_TEXT_TOKEN) and
+           (stack.length = 1) and
+           (stack.peek(0) is TdomXPathExpr)
+        then begin
+          FIsValid:= true;
+          FSyntaxTree:= TdomXPathExpr(stack.pop);
+        end else begin
+          FIsValid:= false;
+          FSyntaxTree:= nil;
+        end;
+
+      finally
+        stack.free;
+      end;
+    finally
+      tokenizer.free;
+    end;
+  end;
+  result:= FIsValid;
+end;
+
+{ TdomXPathNSResolver }
+
+constructor TdomXPathNSResolver.create(const resolverNode: TdomNode);
+var
+  node: TdomNode;
+  i: integer;
+begin
+  FPrefixUriList:= TdomNameValueList.create;
+  with FPrefixUriList do begin
+    Sorted:= true;
+    Duplicates:= dupIgnore;
+  end;
+  node:= resolverNode;
+  while assigned(node) do begin
+    with node do begin
+      if nodeType = ntElement_Node then begin
+        with attributes do begin
+          for i:= 0 to pred(length) do
+            with TdomAttr(item(i)) do
+              if (namespaceURI = 'http://www.w3.org/2000/xmlns/')
+                then if not (localName = 'xmlns')
+                  then FPrefixUriList.add(localName,nodeValue);
+        end; {with ...}
+      end; {if ...}
+      node:= parentNode;
+    end; {with ...}
+  end; {while ...}
+end;
+
+destructor TdomXPathNSResolver.destroy;
+begin
+  FPrefixUriList.free;
+  inherited;
+end;
+
+function TdomXPathNSResolver.lookupNamespaceURI(const prefix: UnicodeString): UnicodeString;
+var
+  index: integer;
+begin
+  index:= FPrefixUriList.indexOfName(prefix);
+  if index > -1
+    then result:= FPrefixUriList.names[index]
+    else result:= '';
+end;
+
+{ TdomXPathSnapshotResult }
+
+constructor TdomXPathSnapshotResult.create;
+begin
+  FAxisType:= XPATH_FORWARD_AXIS;
+  FList:= TList.create;
+  FResultType:= XPATH_NODE_SNAPSHOT_TYPE;
+end;
+
+destructor TdomXPathSnapshotResult.destroy;
+begin
+  FList.free;
+  inherited;
+end;
+
+procedure TdomXPathSnapshotResult.add(const node: TdomNode);
+begin
+  FList.Add(node);
+end;
+
+procedure TdomXPathSnapshotResult.addSnapshotResult(const ir: TdomXPathSnapshotResult);
+// Merges two sorted snapshotResult objects.
+var
+  i,x,y: integer;
+  treePosition: TdomTreePosition;
+  equivalentItems: TList;
+begin
+  ir.axisType:= axisType;
+  x:= 0;
+  y:= 0;
+  equivalentItems:= TList.create;
+  try
+
+    if axisType = XPATH_FORWARD_AXIS then begin
+      while (x < snapshotLength) and (y < ir.snapshotLength) do begin
+        treePosition:= snapshotItem(x).compareTreePosition(ir.snapshotItem(y));
+        if (Tree_Position_Same_Node in treePosition) then begin
+          inc(y);
+        end else if (Tree_Position_Equivalent in treePosition) then begin
+          equivalentItems.Add(ir.snapshotItem(y));
+          inc(y);
+        end else if (Tree_Position_Following in treePosition) then begin
+          inc(x);
+          for i:= pred(equivalentItems.Count) downto 0 do
+            if (Tree_Position_Same_Node in snapshotItem(x).compareTreePosition(equivalentItems[i]))
+              then equivalentItems.delete(i);
+        end else if (Tree_Position_Disconnected in treePosition) then begin
+          for i:= 0 to pred(equivalentItems.Count) do begin
+            FList.insert(x,equivalentItems[i]);
+            equivalentItems.delete(i);
+            inc(x);
+          end;
+          inc(x);
+        end else begin
+          for i:= 0 to pred(equivalentItems.Count) do begin
+            FList.insert(x,equivalentItems[i]);
+            equivalentItems.delete(i);
+            inc(x);
+          end;
+          FList.insert(x,ir.snapshotItem(y));
+          inc(x);
+          inc(y);
+        end;
+      end;
+    end else begin
+      while (x < snapshotLength) and (y < ir.snapshotLength) do begin
+        treePosition:= snapshotItem(x).compareTreePosition(ir.snapshotItem(y));
+        if (Tree_Position_Same_Node in treePosition) then begin
+          inc(y);
+        end else if (Tree_Position_Equivalent in treePosition) then begin
+          equivalentItems.Add(ir.snapshotItem(y));
+          inc(y);
+        end else if (Tree_Position_Preceding in treePosition) then begin
+          inc(x);
+          for i:= pred(equivalentItems.Count) downto 0 do
+            if (Tree_Position_Same_Node in snapshotItem(x).compareTreePosition(equivalentItems[i]))
+              then equivalentItems.delete(i);
+        end else if (Tree_Position_Disconnected in treePosition) then begin
+          for i:= 0 to pred(equivalentItems.Count) do begin
+            FList.insert(x,equivalentItems[i]);
+            equivalentItems.delete(i);
+            inc(x);
+          end;
+          inc(x);
+        end else begin
+          for i:= 0 to pred(equivalentItems.Count) do begin
+            FList.insert(x,equivalentItems[i]);
+            equivalentItems.delete(i);
+            inc(x);
+          end;
+          FList.insert(x,ir.snapshotItem(y));
+          inc(x);
+          inc(y);
+        end;
+      end;
+    end;
+
+    inc(x);
+    while (equivalentItems.Count > 0) and (x < snapshotLength) do begin
+      if not (Tree_Position_Equivalent in snapshotItem(x).compareTreePosition(equivalentItems[0])) then begin
+        for i:= 0 to pred(equivalentItems.Count) do begin
+          FList.insert(x,equivalentItems[i]);
+          equivalentItems.delete(i);
+        end;
+      end;
+      for i:= pred(equivalentItems.Count) downto 0 do
+        if (Tree_Position_Same_Node in snapshotItem(x).compareTreePosition(equivalentItems[i]))
+          then equivalentItems.delete(i);
+      inc(x);
+    end;
+
+    for i:= 0 to pred(equivalentItems.Count) do
+      FList.add(equivalentItems[i]);
+
+    if y < ir.snapshotLength then
+      for i:= y to pred(ir.snapshotLength) do
+        FList.add(ir.snapshotItem(i));
+
+  finally
+    equivalentItems.free;
+  end;
+end;
+
+procedure TdomXPathSnapshotResult.addSubtree(const node: TdomNode);
+// Adds 'node' and its subtree, excluding attributes.
+var
+  n: TdomNode;
+  bufferList: TList;
+  i: integer;
+begin
+  if axisType = XPATH_FORWARD_AXIS then begin
+    if assigned(node) then begin
+      with node.ownerDocument.createNodeIterator( node,
+                                                  [ ntElement_Node,
+                                                    ntText_Node,
+                                                    ntCDATA_Section_Node,
+                                                    ntEntity_Reference_Node,
+                                                    ntProcessing_Instruction_Node,
+                                                    ntComment_Node,
+                                                    ntDocument_Node ],
+                                                  nil,
+                                                  false ) do begin
+        n:= NextNode;
+        while assigned(n) do begin
+          FList.add(n);
+          n:= NextNode;
+        end;
+        detach;
+      end;
+      node.ownerDocument.clearInvalidNodeIterators;
+    end;
+  end else begin
+    if assigned(node) then begin
+      bufferList:= TList.create;
+      try
+        with node.ownerDocument.createNodeIterator( node,
+                                                    [ ntElement_Node,
+                                                      ntText_Node,
+                                                      ntCDATA_Section_Node,
+                                                      ntEntity_Reference_Node,
+                                                      ntProcessing_Instruction_Node,
+                                                      ntComment_Node,
+                                                      ntDocument_Node ],
+                                                    nil,
+                                                    false ) do begin
+          n:= NextNode;
+          while assigned(n) do begin
+            bufferList.add(n);
+            n:= NextNode;
+          end;
+          detach;
+        end;
+        node.ownerDocument.clearInvalidNodeIterators;
+
+        for i:= pred(bufferList.count) downto 0 do
+          FList.add(bufferList[i]);
+
+      finally
+        bufferList.free;
+      end;
+    end;
+  end;
+end;
+
+procedure TdomXPathSnapshotResult.delete(const index: integer);
+begin
+  FList.delete(index);
+end;
+
+function TdomXPathSnapshotResult.getSnapshotLength: integer;
+begin
+  result:= FList.count;
+end;
+
+procedure TdomXPathSnapshotResult.setAxisType(const value: TdomXPathAxisType);
+var
+  item: Pointer;
+  index1,index2,j: integer;
+begin
+  If FAxisType <> value then begin
+    FAxisType:= value;
+    j:= pred(FList.Count);
+    for index1:= 0 to ( j div 2) do begin
+      index2:= j - index1;
+      item:= FList.List^[index1];
+      FList.List^[index1]:= FList.List^[index2];
+      FList.List^[index2]:= item;
+    end;
+  end;
+end;
+
+function TdomXPathSnapshotResult.snapshotItem(const index: integer): TdomNode;
+begin
+  if (index < 0) or (index >= FList.Count)
+    then result:= nil
+    else result:= TdomNode(FList.List^[index]);
+end;
+
+{ TdomXPathBooleanResult }
+
+constructor TdomXPathBooleanResult.create(const aBooleanValue: boolean);
+begin
+  FBooleanValue:= aBooleanValue;
+  FResultType:= XPATH_BOOLEAN_TYPE;
+end;
+
+{ TdomXPathNumberResult }
+
+constructor TdomXPathNumberResult.create(const aNumberValue: double);
+begin
+  FNumberValue:= aNumberValue;
+  FResultType:= XPATH_NUMBER_TYPE;
+end;
+
+{ TdomXPathStringResult }
+
+constructor TdomXPathStringResult.create(const aStringValue: UnicodeString);
+begin
+  FStringValue:= aStringValue;
+  FResultType:= XPATH_STRING_TYPE;
+end;
+
+end.
+
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROXMLIntf.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROXMLIntf.pas
new file mode 100644
index 0000000..a599dde
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROXMLIntf.pas	
@@ -0,0 +1,172 @@
+unit uROXMLIntf;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses Classes, uROTypes;
+
+type
+  { Misc. }
+  TXMLEncoding = (xeUTF8, xeUTF16); // Some are missing...
+  {$IFNDEF UNICODE}
+  UnicodeString = WideString;
+  {$ENDIF}
+
+const
+  XMLEncodingStr : array[TXMLEncoding] of UnicodeString = ('UTF8', 'UTF16');
+  XMLBooleans: array[boolean] of string = ('false', 'true');
+
+type
+  { Forward declarations }
+  IXMLNodeList = interface;
+  IXMLDocument = interface;
+
+  { IXMLNode }
+  IXMLNode = interface
+  ['{8E0508D5-EFC0-4E1F-9BC5-2CBE3536D008}']
+    function GetName : UnicodeString;
+    function GetLocalName : UnicodeString;
+
+    function GetRef : pointer;
+
+    function GetParent : IXMLNode;
+
+    function GetValue : Variant;
+    procedure SetValue(const Value : Variant);
+
+    function GetXML : UnicodeString;
+
+    function GetAttributes(Index : integer) : IXMLNode;
+    function GetAttributeCount : integer;
+
+    function GetChildren(Index : integer) : IXMLNode;
+    function GetChildrenCount : integer;
+
+    function Add(const aNodeName : UnicodeString; aNameSpaceURI: UnicodeString = '') : IXMLNode;
+    function AddXml(const Xml: UnicodeString): IXMLNode;
+    function AddAttribute(const anAttributeName : UnicodeString; const anAttributeValue : Variant; aCreateResultNode: Boolean = True) : IXMLNode;
+
+    procedure Delete(Index : integer);
+    procedure Remove(const aNode : IXMLNode);
+
+    function GetNodeByName(const aNodeName : UnicodeString) : IXMLNode; // Returns NIL if none is found or exception. Up to you.
+    function GetNodeValue(const aNodeName : UnicodeString; const Default : Variant) : Variant;
+
+    function GetAttributeByName(const anAttributeName : UnicodeString) : IXMLNode;
+    function GetAttributeValue(const anAttributeName : UnicodeString; DefaultValue : Variant) : Variant;
+
+    function GetNodesByName(const aNodeName : UnicodeString) : IXMLNodeList; // Returns NIL if none are found or exception. Up to you.
+
+    function GetNodeByAttribute(const anAttributeName, anAttributeValue : UnicodeString) : IXMLNode; // Returns NIL if none are found or exception. Up to you.
+
+    function GetFirstChild: IXMLNode;
+    function GetNextSibling: IXMLNode;
+    
+    function GetNamespaceURI: UnicodeString;
+
+    function GetDocument: IXMLDocument;
+
+    property Name : UnicodeString read GetName; // When one is creates it MUST have a name
+    property LocalName : UnicodeString read GetLocalName;
+    property NamespaceURI : UnicodeString read GetNamespaceURI;
+    property Value : Variant read GetValue write SetValue; // Only possible if there are no children.
+
+    property Attributes[Index : integer] : IXMLNode read GetAttributes; // NIL if it has no attributes. I am open to other solutions
+    property AttributeCount : integer read GetAttributeCount;
+
+    property Children[Index : integer] : IXMLNode read GetChildren; // NIL if it has no children. I am open to other solutions
+    property ChildrenCount : integer read GetChildrenCount;
+
+    property FirstChild: IXMLNode read GetFirstChild;
+    property NextSibling: IXMLNode read GetNextSibling;
+
+    property XML : UnicodeString read GetXML;
+    property Ref : pointer read GetRef;
+    property Parent : IXMLNode read GetParent;
+    property Document : IXMLDocument read GetDocument;
+  end;
+
+  IXMLNodeList = interface
+  ['{C5393D52-8CB1-4E36-9A8D-25396C3C6716}']
+    function GetNodes(Index : integer) : IXMLNode;
+    function GetCount : integer;
+
+    property Nodes[Index : integer] : IXMLNode read GetNodes; default;
+    property Count : integer read GetCount;
+  end;
+
+  { IXMLDocument }
+  IXMLDocument = interface
+  ['{61715E40-F8D5-4A7E-A01B-80114EF35428}']
+    function GetDocumentNode : IXMLNode;
+
+    function GetEncoding : TXMLEncoding;
+
+    procedure New(aDocumentName : UnicodeString = ''; anEncoding : TXMLEncoding = xeUTF8); // Once the encoding is set cannot be changed
+
+    procedure SaveToStream(aStream : TStream);
+    procedure SaveToFile(const aFileName : string);
+    procedure LoadFromStream(aStream : TStream);
+    procedure LoadFromFile(const aFileName : string);
+    function GetXML : UnicodeString;
+    procedure SetXML(const Value : UnicodeString);
+
+    function Transform(const XSL : string) : string;
+
+    property Encoding : TXMLEncoding read GetEncoding;
+    property DocumentNode : IXMLNode read GetDocumentNode; // NIL until New is called. New frees everything each time is called
+    property XML : UnicodeString read GetXML write SetXML;
+  end;
+
+function NewROXmlDocument : IXMLDocument;
+function SelectNodeLocal(aParent: IXMLNode; const aLocalName: string): IXMLNode;
+
+implementation
+
+{$IFDEF RemObjects_MSXML}
+uses uROMSXMLImpl;
+{$ENDIF}
+{$IFDEF RemObjects_OpenXML}
+uses uROOpenXMLImpl;
+{$ENDIF}
+
+function SelectNodeLocal(aParent: IXMLNode; const aLocalName: string): IXMLNode;
+var
+  i: Integer;
+  lnode: IXMLNode;
+begin
+  result := nil;
+  if aParent = nil then exit;
+  for i := 0 to aParent.ChildrenCount -1 do begin
+    lnode := aParent.Children[i];
+    if lnode.LocalName = aLocalName then begin
+      result := lnode;
+      exit;
+    end;
+  end;
+end;
+
+function NewROXmlDocument : IXMLDocument;
+begin
+  {$IFDEF RemObjects_OpenXML}
+  result := TROOpenXMLDocument.Create;
+  {$ENDIF}
+  {$IFDEF RemObjects_MSXML}
+  result := TROMSXMLDocument.Create;
+  {$ENDIF}
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROXMLSerializer.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROXMLSerializer.pas
new file mode 100644
index 0000000..2df429d
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROXMLSerializer.pas	
@@ -0,0 +1,2198 @@
+unit uROXMLSerializer;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes, uROSerializer, TypInfo, uROXMLIntf, uROTypes, SysUtils, FMTBcd;
+
+const
+  // SOAP specifics
+  tag_Envelope = 'Envelope';
+  tag_Body     = 'Body';
+  tag_Header   = 'Header';
+  tag_Fault    = 'Fault';
+
+  ns_Envelope = 'SOAP-ENV';
+  ns_Envelope_tag_Envelope_Ansi: AnsiString = 'SOAP-ENV:Envelope';
+  ns_Standard = 'xs';
+  ns_Custom   = 'ro';
+  ns_xsi      = 'xsi';
+  ns_xsd      = 'xsd';
+
+  tag_HRef = 'href';
+  tag_Nil  = 'xsi:nil';
+  tag_NilValue  = 'true';
+  tag_Id   = 'id';
+  tag_text = '#text';
+
+  // Misc
+  SOAP_DecimalSeperator  = '.';
+  SOAP_BoolValues: array [Boolean] of  string = ('false', 'true');
+
+  SOAP_DateFormat       = 'yyyy-mm-dd';
+  SOAP_DateFormatLength = 10;
+
+  SOAP_DateTimeFormat       = 'yyyy-mm-dd"T"hh":"nn":"ss';
+  SOAP_DateTimeFormatLength = 19;
+
+  SOAP_TimeFormat       = 'hh":"nn":"ss';
+  SOAP_TimeFormatLength = 8;
+
+  // Data types signatures
+  dts_Array        = 'SOAP-ENC:Array';
+  dts_Array2        = 'soapenc:Array';
+  dts_base64Binary = 'base64Binary';
+
+
+type
+  { Misc }
+  TROXMLSerializationOption = (
+    xsoWriteMultiRefArray, // for literal, use false
+    xsoWriteMultiRefObject,  // for literal, use false
+    xsoSendUntyped,  // for literal, use true
+    xsoStrictStructureFieldOrder,
+    xsoIgnoreStructureType,
+    xsoEncodedXML, // for literal, use false
+    xsoClientIdInWsdl,
+    xsoDocument, // for document, use true; if both doc & literal are true it uses wrapped arguments
+    xsoSplitServiceWsdls,
+    xsoExternalTypesAsReferences, // This will emit "import" references to external resources in the wsdl and namespace references in the body of messages.
+    xsoSoap12
+    );
+
+  TROXMLSerializationOptions = set of TROXMLSerializationOption;
+
+  TXMLSerializationOption = TROXMLSerializationOption {$IFDEF DELPHI10UP}deprecated{$ENDIF};
+  TXMLSerializationOptions = TROXMLSerializationOptions {$IFDEF DELPHI10UP}deprecated{$ENDIF};
+
+  { TROXMLSerializer }
+  TROXMLSerializer = class(TROSerializer)
+  private
+    fNode: IXMLNode;
+    fPrefixMap: TStrings;
+    fPrefix: string;
+    fCurrentNamespace: string;
+    fSerializationOptions: TROXMLSerializationOptions;
+
+    fBodyNode : IXMLNode;
+    fMaxRef : integer;
+    fRespNode : IXMLNode;
+    fOverrideNextName,
+    fArrayElementName : string;
+
+    function BodyNode : IXMLNode;
+    function FindNode(const aName: string; ArrayElementId : integer): boolean;
+    function GetObject(const aName: string; ArrayElementId : integer): IXMLNode;
+    function FindSoapReference(subnode: IXMLNode): IXMLNode;
+    function AddNode(aCurrent: IXmlNode; const aName: string; aIsArray: Boolean): IXMLNode;
+    procedure SetCurrentNamespace(const Value: string);
+  protected
+    { Internal }
+    function GetRecordStrictOrder: Boolean; override;
+       procedure BeginWriteObject(const aName: string; aClass : TClass; anObject: TObject; var LevelRef : IUnknown;
+                                  var IsValidType : boolean; out IsAssigned:Boolean; ArrayElementId : integer = -1); override;
+       procedure EndWriteObject(const aName: string; aClass : TClass; anObject: TObject; const LevelRef : IUnknown); override;
+       procedure CustomWriteObject(const aName : string; aClass : TClass; const Ref; ArrayElementId : integer = -1); override;
+       procedure CustomReadObject(const aName: string; aClass: TClass;var Ref; ArrayElementId: integer);override;
+       procedure BeginReadObject(const aName : string; aClass : TClass; var anObject : TObject; var LevelRef : IUnknown;
+                                 var IsValidType : boolean; ArrayElementId : integer = -1); override;
+       procedure EndReadObject(const aName : string; aClass : TClass; var anObject : TObject; const LevelRef : IUnknown); override;  public
+    { Writers }
+    procedure WriteInteger(const aName : string; anOrdType : TOrdType; const Ref; ArrayElementId : integer = -1); override;
+    procedure WriteInt64(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+    procedure WriteEnumerated(const aName : string; anEnumTypeInfo : PTypeInfo; const Ref; ArrayElementId : integer = -1); override;
+    procedure WriteUTF8String(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+    procedure WriteAnsiString(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+    procedure WriteWideString(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+    procedure WriteDateTime(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+    procedure WriteDouble(const aName : string; aFloatType : TFloatType; const Ref; ArrayElementId : integer = -1); override;
+    procedure WriteVariant(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+    procedure WriteDecimal(const aName: String; const Ref; ArrayElementId: Integer = -1); override;
+    procedure WriteGuid(const aName: String; const Ref; ArrayElementId: Integer = -1); override;
+    procedure WriteXml(const aName: String; const Ref; ArrayElementId: Integer = -1); override;
+    procedure WriteBinary(const aName : string; const Ref; ArrayElementId : integer = -1);override;
+    procedure WriteStruct(const aName : string; const Ref; aClass: TClass = nil; ArrayElementId : integer = -1);override;
+    procedure WriteArray(const aName : string; const Ref; aClass: TClass = nil; ArrayElementId : integer = -1);override;
+    procedure WriteXSDateTime(const aName : string; Ref: XsDateTime; ArrayElementId : integer = -1);
+
+    procedure WriteException(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+
+    { Readers }
+    procedure ReadInteger(const aName : string; anOrdType : TOrdType; var Ref; ArrayElementId : integer = -1); override;
+    procedure ReadInt64(const aName : string; var Ref; ArrayElementId : integer = -1); override;
+    procedure ReadEnumerated(const aName : string; anEnumTypeInfo : PTypeInfo; var Ref; ArrayElementId : integer = -1); override;
+    procedure ReadUTF8String(const aName : string; var Ref; ArrayElementId : integer = -1; iMaxLength:integer=-1); override;
+    procedure ReadAnsiString(const aName : string; var Ref; ArrayElementId : integer = -1; iMaxLength:integer=-1); override;
+    procedure ReadWideString(const aName : string; var Ref; ArrayElementId : integer = -1; iMaxLength:integer=-1); override;
+    procedure ReadDateTime(const aName : string; var Ref; ArrayElementId : integer = -1); override;
+    procedure ReadDouble(const aName : string; aFloatType : TFloatType; var Ref; ArrayElementId : integer = -1); override;
+    procedure ReadVariant(const aName : string; var Ref; ArrayElementId : integer = -1); override;
+    procedure ReadDecimal(const aName: String; var Ref; ArrayElementId: Integer = -1); override;
+    procedure ReadGuid(const aName: String; var Ref; ArrayElementId: Integer = -1); override;
+    procedure ReadXml(const aName: String; var Ref; ArrayElementId: Integer = -1); override;
+    procedure ReadBinary(const aName : string; var Ref; ArrayElementId : integer = -1);override;
+    function ReadStruct(const aName : string; aClass : TClass; var Ref; ArrayElementId : integer = -1): Boolean; override;
+    function ReadArray(const aName : string; aClass : TClass; var Ref; ArrayElementId : integer = -1): Boolean; override;
+    procedure ReadException(const aName : string; var Ref; ArrayElementId : integer = -1); override;
+    function ReadXsDateTime(const aName: string; ArrayElementId : integer = -1): XsDateTime;
+    procedure ChangeClass(aClass: TClass); override;
+  public
+    constructor Create(aStorageRef:pointer);
+    destructor Destroy; override;
+
+    property CurrentNamespace: string read fCurrentNamespace write SetCurrentNamespace;
+    property Prefix: string read fPrefix;
+    property PrefixMap: TStrings read fPrefixMap;
+
+    procedure SetStorageRef(aStorageRef:pointer);
+    function GetArrayElementName(anItemType : PTypeInfo; anItemReference: pointer): string; override;
+
+    property SerializationOptions : TROXMLSerializationOptions read fSerializationOptions write fSerializationOptions;
+  end;
+
+const
+  RESERVED_WORD_PREFIX = '___';
+
+function  Unprefix(const AStr: String; const APrefix: String = RESERVED_WORD_PREFIX): String;
+
+function XMLToObject(const someXML : string) : TROComplexType;
+function ObjectToXML(anObject : TROComplexType;
+                     const anObjectName : string = '') : string;
+
+procedure SplitNodeName(const aNode : IXMLNode; out aNameSpace, aLocalName : string);
+
+function SOAPDateTimeToDateTime(const aSOAPDate  : string) : TDateTime; overload;
+function SOAPDateTimeToDateTime(const aSOAPDate  : string; out Offset: Integer) : TDateTime; overload;
+function DateTimeToSOAPDateTime(aDateTime : TDateTime) : string;
+
+function ExtractServerURL(const aFullURL : string) : string;
+
+function SOAPStrToFloat(const aString: string): Extended;
+
+//function AddXMLChildNode(aParent : IXMLNode; const aName : string; const aNamespace: WideString = '') : IXMLNode;
+function AddXMLAttribute(aNode : IXMLNode; const aName: string; const aValue : WideString; aCreateResultNode: Boolean = True) : IXMLNode;
+procedure AddXMLTextValue(aNode : IXMLNode; const aValue : WideString);
+
+function FindChildNode(aParent : IXMLNode; const aName : string; StartFrom : integer; IsOnlyLocalName : boolean = FALSE) : IXMLNode;
+function FindChildNodeByAttribute(aParent : IXMLNode; const anAttributeName, anAttributeValue : string) : IXMLNode;
+function FindParentNode(aNode : IXMLNode; const aName : string; IsOnlyLocalName : boolean = FALSE) : IXMLNode;
+function FindAttribute(aNode : IXMLNode; const aName : string; IsOnlyLocalName : boolean = FALSE) : IXMLNode;
+function GetXMLTextValue(aNode : IXMLNode) : widestring;
+
+{$IFDEF DELPHI7UP}
+const SOAPLocale = 1033;
+var SOAPFormatSettings : TFormatSettings;
+{$ENDIF DELPHI7}
+
+implementation
+
+uses
+  {$IFDEF MSWINDOWS}Windows, {$ENDIF}
+  Math, uRORes, uROCompression, uROClasses, Variants, uROBinaryHelpers;
+
+procedure IsAnonymous(aStruct: TROComplexTypeClass; var aAnonymous, aNillable: Boolean);
+var
+  i: Integer;
+begin
+  aAnonymous := False;
+  aNillable := FAlse;
+  if astruct = nil then exit;
+  for i := 0 to aStruct.GetAttributeCount -1 do begin
+    if astruct.GetAttributeName(i) = 'Anonymous' then
+      aAnonymous := astruct.GetAttributeValue(i) = '1'
+    else if astruct.GetAttributeName(i) = 'Nillable' then
+      aNillable := astruct.GetAttributeValue(i) = '1';
+  end;
+end;
+
+function ExceptionIsAnonymous(aStruct: EROException): Boolean;
+var
+  i: Integer;
+begin
+  result := False;
+  if astruct = nil then exit;
+  for i := 0 to aStruct.GetAttributeCount -1 do begin
+    if astruct.GetAttributeName(i) = 'Anonymous' then
+      result := astruct.GetAttributeValue(i) = '1'
+  end;
+end;
+
+
+function ObjectToXML(anObject : TROComplexType;
+                     const anObjectName : string = '') : string;
+var //objname : string;
+    doc : IXMLDocument;
+begin
+  result := '';
+
+//  if (anObjectName='') then objname := 'Object' else objname := anObjectName;
+
+  doc := NewROXmlDocument;
+  doc.New(anObject.ClassName);
+
+  with TROXMLSerializer.Create(pointer(doc.DocumentNode)) do try
+  //with TROXMLSerializer.Create(doc.DocumentNode) do try
+    SerializationOptions := [xsoSendUntyped];
+    Write(anObject.ClassName, anObject.ClassInfo, anObject);
+
+   {$IFDEF RemObjects_OpenXML}
+    result := doc.XML;   //mej - OpenXML seems to not behave the same way as MSDOM
+   {$ELSE}
+    result := doc.DocumentNode.XML;
+   {$ENDIF}
+
+  finally
+    Free;
+  end;
+end;
+
+function XMLToObject(const someXML : string) : TROComplexType;
+var clsname : string;
+    cls : TROComplexTypeClass;
+    doc : IXMLDocument;
+    ss : TStringStream;
+begin
+  ss := TStringStream.Create(someXML);
+  ss.Position := 0;
+  try
+    doc := NewROXmlDocument;
+    doc.New;
+    doc.LoadFromStream(ss);
+  finally
+    ss.Free;
+  end;
+  clsname := doc.DocumentNode.Name;
+  cls := FindROClass(clsname);
+
+  if (cls=NIL) then RaiseError(err_UnknownClass, [clsname]);
+
+  with TROXMLSerializer.Create(pointer(doc.DocumentNode)) do try
+  //with TROXMLSerializer.Create(doc.DocumentNode) do try
+    Read(clsname, cls.ClassInfo, result);
+  finally
+    Free;
+  end;
+end;
+
+procedure SplitName(const aName : string; out aNameSpace, aLocalName : string);
+var idx : integer;
+begin
+  aNameSpace := '';
+  if (aName='') then begin
+    aLocalName := '';
+    Exit;
+  end
+  else aLocalName := aName;
+
+  idx := Pos(':', aName);
+  if (idx>0) then begin
+    aNameSpace := Copy(aName, 1, idx-1);
+    aLocalName := Copy(aName, idx+1, Length(aName)-idx);
+  end;
+end;
+
+// Required for a bug in OpenXML which never assigns correctly LocalName
+procedure SplitNodeName(const aNode : IXMLNode; out aNameSpace, aLocalName : string);
+begin
+//  SplitName(aNode.nodeName, aNameSpace, aLocalName)
+  SplitName(aNode.Name, aNameSpace, aLocalName)
+end;
+
+function SOAPStrToFloat(const aString: string): Extended;
+begin
+  {$IFDEF DELPHI7UP}
+  Result := StrToFloat(aString,SOAPFormatSettings);// then
+  {$ELSE}
+  Result := StrToFloat(StringReplace(aString, '.', DecimalSeparator, []));
+  {$ENDIF}
+    //RaiseError(err_ErrorConvertingFloat, [aString]);
+  //Val(aString, Result, e);
+  //if (e<>0) then RaiseError(err_ErrorConvertingFloat, [aString, e]);
+end;
+
+function SOAPDateTimeToDateTime(const aSOAPDate : string) : TDateTime;
+var
+  lOffset: Integer;
+begin
+  result := SOAPDateTimeToDateTime(aSoapDate, lOffset);
+  if lOffset <> MaxInt then 
+  Result := Result + ((60.0 * lOffset) * (1.0 / 86400.0));
+end;
+
+function SOAPDateTimeToDateTime(const aSOAPDate : string; out Offset: Integer) : TDateTime;
+var year, month, day, hour, min, sec : word;
+  msec: double;
+ { ldummy,} i: Integer;
+  s: string;
+begin
+  // This probabily will all change. See W3C specs for date/time
+  case Length(aSOAPDate) of
+    SOAP_DateFormatLength : begin {yyyy-mm-dd}
+      year  := StrToInt(Copy(aSOAPDate,1,4));
+      month := StrToInt(Copy(aSOAPDate,6,2));
+      day   := StrToInt(Copy(aSOAPDate,9,2));
+      result := EncodeDate(year, month, day);
+    end;
+    SOAP_TimeFormatLength : begin {hh:nn:ss}
+      hour  := StrToInt(Copy(aSOAPDate,1,2));
+      min   := StrToInt(Copy(aSOAPDate,4,2));
+      sec   := StrToInt(Copy(aSOAPDate,7,2));
+      result := EncodeTime(hour, min, sec, 0);
+    end;
+    else {SOAP_DateTimeFormatLength : } begin {yyyy-mm-ddThh:nn:ss}
+      year  := StrToInt(Copy(aSOAPDate,1,4));
+      month := StrToInt(Copy(aSOAPDate,6,2));
+      day   := StrToInt(Copy(aSOAPDate,9,2));
+      hour  := StrToInt(Copy(aSOAPDate,12,2));
+      min   := StrToInt(Copy(aSOAPDate,15,2));
+      sec   := StrToInt(Copy(aSOAPDate,18,2));
+      s := copy(aSOAPDate, 20, MaxInt);
+      if (Length(s) > 1) and (s[1] = '.') then begin
+        i := LastDelimiter('+-Z', s);
+        if i > 0 then begin
+          msec := StrToFloatDef('0'+DecimalSeparator+Copy(s, 2, i-2), 0);
+         // Val(Copy(s, 1, i -1), msec, ldummy);
+          delete(s, 1, i-1);
+        end else begin
+          msec := StrToFloatDef('0'+DecimalSeparator+copy(s, 2, MaxInt), 0);
+          //Val(s, msec, ldummy);
+          s := '';
+        end;
+        msec := msec * (1.0 / 60.0 / 60.0 / 24);
+      end else
+        msec := 0;
+
+      result := EncodeDate(year, month, day);
+      // The code below is required! Do not adjust
+      if (result<0) then begin
+        result := result-EncodeTime(hour, min, sec, 0);
+        result := result - msec;
+      end else begin
+        result := result+EncodeTime(hour, min, sec, 0);
+        result := result + msec;
+      end;
+      Offset := MaxInt;
+      if (Length(s) <> 0) and ((s[1] = 'z') or (s[1] = 'Z')) then Offset := 0 else
+      if (Length(s) > 0) and ((s[1] = '+') or (s[1] = '-')) then begin
+        if s[1] = '-' then i := -1 else i := 1;
+        Delete(s,1,1);
+        if pos(':', s) > 0 then begin
+          hour := StrToInt(copy(s,1,Pos(':', s)-1));
+          delete(s,1,pos(':', s));
+          min := StrToInt(s);
+        end else begin
+          hour := StrToInt(s);
+          min := 0;
+        end;
+
+        if i = -1 then
+          Offset := - (min + 60 * hour)
+        else
+          Offset := + (min + 60 * hour);
+      end;
+    end;
+  end;
+end;
+
+function DateTimeToSOAPDateTime(aDateTime : TDateTime) : string;
+begin
+  result := FormatDateTime(SOAP_DateTimeFormat, aDateTime);
+end;
+
+function ExtractServerURL(const aFullURL : string) : string;
+const ProtocolID = 'http://';
+var p : integer;
+begin
+  result := Trim(StringReplace(aFullURL, ProtocolID, '', [rfReplaceAll, rfIgnoreCase]));
+  p := LastDelimiter('/', result);
+  if (p>0)
+    then result := ProtocolID+Copy(result, 1, p)
+    else result := ProtocolID+result;
+end;
+
+(*function AddXMLChildNode(aParent : IXMLNode; const aName : string; const aNamespace: WideString = '') : IXMLNode;
+begin
+  {result := aParent.ownerDocument.createElement(aName);
+  aParent.appendChild(result);}
+  result := aParent.Add(aName, aNamespace)
+end;*)
+
+function AddXMLAttribute(aNode : IXMLNode; const aName: string; const aValue : WideString; aCreateResultNode: Boolean = True) : IXMLNode;
+begin
+  {result := aNode.ownerDocument.createAttribute(aName);
+  result.nodeValue := aValue;
+  aNode.attributes.setNamedItem(result);}
+  result := aNode.AddAttribute(aName, aValue, aCreateResultNode);
+end;
+
+procedure AddXMLTextValue(aNode : IXMLNode; const aValue : widestring);
+begin
+  //aNode.appendChild(aNode.ownerDocument.createTextNode(aValue));
+  aNode.Value := aValue
+end;
+
+function FindParentNode(aNode : IXMLNode; const aName : string; IsOnlyLocalName : boolean = FALSE) : IXMLNode;
+var ns, locname : string;
+    parent : IXMLNode;
+begin
+  result := NIL;
+  while (aNode.Parent<>NIL) do begin
+    parent := aNode.Parent;
+
+    if IsOnlyLocalName then begin
+      SplitNodeName(parent, ns, locname);
+      if (CompareText(locname, aName)=0) then begin
+        result := parent;
+        Exit;
+      end;
+    end
+    else if (parent.Name=aName) then begin
+      result := parent;
+      Exit;
+    end;
+
+    aNode := parent;
+  end;
+end;
+
+function FindChildNode(aParent : IXMLNode; const aName : string; StartFrom : integer; IsOnlyLocalName : boolean = FALSE) : IXMLNode;
+var i, startidx  : integer;
+    locname, ns : string;
+    item : IXMLNode;
+begin
+  result := NIL;
+
+  with aParent do begin
+    // fix for arrays. I was always using the first item...
+    if (StartFrom>=0) then startidx := StartFrom
+                      else startidx := 0;
+                      
+    for i := startidx to (childrenCount-1) do begin
+      item := Children[i];
+                         
+      if IsOnlyLocalName then begin
+        SplitNodeName(item, ns, locname);
+
+        if (CompareText(locname, aName)=0) then begin // I am ignoring XML case sensitivity here...
+          result := item;
+          Exit;
+        end;
+
+        // Moved down by AleF. This "patch" actually breaks regular webservices
+        // processing. Let's keep it here as an extreme measure for Amazon alike web services
+        {if (ns = '') and SameText(locname, 'return') then begin
+          Result := FindChildNode(item, aName, StartFrom, IsOnlyLocalName);
+          Exit;
+        end;}
+      end
+      else begin
+        if (item.Name=aName) then begin
+          result := item;
+          Exit;
+        end;
+      end
+    end
+  end;
+end;
+
+function FindChildNodeByAttribute(aParent : IXMLNode; const anAttributeName, anAttributeValue : string) : IXMLNode;
+var i : integer;
+    //attr : IXMLNode;
+    item, item2 : IXMLNode;
+    //list : IXMLNodeList;
+begin
+  result := NIL;
+
+  with aParent do
+    for i := 0 to (ChildrenCount-1) do begin
+      item := Children[i];
+      item2 := item.GetNodeByAttribute(anAttributeName, anAttributeValue);
+
+      if (item2<>NIL) then begin
+        result := item;
+        Exit;
+      end;
+    end
+end;
+
+function FindAttribute(aNode : IXMLNode; const aName : string; IsOnlyLocalName : boolean = FALSE) : IXMLNode;
+//var i : integer;
+    //locname, ns : string;
+begin
+  result := NIL;
+  result := aNode.GetAttributeByName(aName);
+
+  {with aNode do
+    for i := 0 to (AttributeCount-1) do begin
+      if IsOnlyLocalName then begin
+        SplitNodeName(attributes.item(i), ns, locname);
+        if (locname=aName) then begin
+          result := attributes.item(i);
+          Exit;
+        end;
+      end
+      else begin
+        if (attributes.item(i).nodeName=aName) then begin
+          result := attributes.item(i);
+          Exit;
+        end;
+      end
+    end}
+end;
+
+function GetXMLTextValue(aNode : IXMLNode) : WideString;
+//var textnode : IXMLNode;
+begin
+  //textnode := aNode.childNodes.item(0);
+  {if Assigned(textnode) and (textnode.hasChildNodes) and (textnode.nodeName='#text')
+    then result := textnode.textContent
+    else result := '';}
+  result := aNode.Value
+end;
+
+function SameText(A, B : string) : boolean;
+begin
+  result := CompareText(a,b)=0
+end;
+
+function TypeInfoNameToSOAPType(aTypeInfo : PTypeInfo) : string;
+begin
+  case aTypeInfo^.Kind of
+    {$IFDEF FPC}tkBool,{$ENDIF}
+    tkEnumeration : begin
+      if (aTypeInfo=TypeInfo(boolean))
+        then result := ns_xsd+':boolean'
+        else result := ns_Custom+':'+{$IFDEF UNICODE}UTF8ToString{$ENDIF}(aTypeInfo^.Name);
+    end;
+    tkInteger  : begin
+      case GetTypeData(aTypeInfo)^.OrdType of
+        otSByte : result := ns_xsd+':byte';
+        otUByte : result := ns_xsd+':unsignedByte';
+        otSWord : result := ns_xsd+':short';
+        otUWord : result := ns_xsd+':unsignedShort';
+        otSLong : result := ns_xsd+':int';
+        otULong : result := ns_xsd+':unsignedInt';
+      end;
+    end;
+    tkInt64    : result := ns_xsd+':long';
+                 // TODO: this wont work for DateTime's inside records or arrays
+    tkFloat    : if (aTypeInfo=TypeInfo(TDateTime)) then result := ns_xsd+':dateTime'
+                 else begin
+                    case GetTypeData(aTypeInfo)^.FloatType of
+                      ftSingle   : result := ns_xsd+':float';
+                      ftDouble   : result := ns_xsd+':double';
+                      ftExtended : result := ns_xsd+':double';
+                      ftComp     : result := ns_xsd+':double';
+                      ftCurr     : result := ns_xsd+':double';
+                    end;
+                 end;
+    tkWString,
+    tkLString,
+    tkString   : result := ns_xsd+':string';
+
+    tkClass    :
+      begin
+        if aTypeInfo = typeinfo(Binary) then
+          result := ns_xsd+':'+dts_base64Binary
+        else
+          result := ns_Custom+':'+{$IFDEF UNICODE}UTF8ToString{$ENDIF}(aTypeInfo^.Name);
+      end;
+    tkVariant:
+      begin
+        if aTypeInfo = typeinfo(TDecimalVariant) then result := ns_xsd+':decimal' else
+          result := ns_xsd+':anyType';
+      end;
+    tkInterface:
+      result := ns_xsd+':any';
+  end;
+
+end;
+
+function VarTypeNameToSOAPType(aVarType : TVarType) : string;
+begin
+  result := '';
+  case aVarType of
+    varBoolean  : result := ns_xsd+':boolean';
+    varInteger  : result := ns_xsd+':int';
+    varWord     : result := ns_xsd+':unsignedShort';
+    varSmallInt : result := ns_xsd+':short';
+    varByte     : result := ns_xsd+':unsignedByte';
+    varShortInt : result := ns_xsd+':byte';
+    varSingle   : result := ns_xsd+':float';
+    varDouble,
+    varCurrency : result := ns_xsd+':double';
+    varDate     : result := ns_xsd+':dateTime';
+    varUString,
+    varOleStr,
+    varString   : result := ns_xsd+':string';
+    varLongWord : result := ns_xsd+':unsignedInt';
+    varInt64    : result := ns_xsd+':long';
+    varEmpty,
+    varNull: result := ns_xsd+':null';
+  else
+    if aVarType = VarFMTBcd then
+      result := ns_xsd +':decimal'
+    else
+      result := ns_Custom+':unknown';
+  end;
+end;
+
+function  Unprefix(const AStr, APrefix: String): String;
+var
+  L: Integer;
+begin
+  L := Length(APrefix);
+  if StrLIComp(PChar(AStr), PChar(APrefix), Min(Length(AStr), L)) = 0 then
+    Result :=Copy(AStr, L + 1, MaxInt)
+  else
+    Result := AStr;
+end;
+
+{ TROXMLSerializer }
+constructor TROXMLSerializer.Create(aStorageRef: pointer);
+begin
+  inherited Create;
+  SetStorageRef(aStorageRef);
+  fPrefixMap := TStringList.Create;
+//  fSerializationOptions := [xsoWriteMultiRefArray, xsoWriteMultiRefObject];
+  fSerializationOptions := [xsoSendUntyped, xsoStrictStructureFieldOrder, xsoDocument, xsoSplitServiceWsdls];
+end;
+
+{$IFDEF DELPHI5}
+function Supports(const Instance: IUnknown; const Intf: TGUID): Boolean; overload;
+var lDummyInst:IUnknown;
+begin
+  result := Supports(Instance, Intf, lDummyInst);
+end;
+{$ENDIF DELPHI5}
+
+procedure TROXMLSerializer.SetStorageRef(aStorageRef : pointer);
+begin
+  fNode := nil;
+  if Supports(IUnknown(aStorageRef), IXMLNode) then begin
+    //RaiseError('TROXMLSerializer: Not a valid IXMLNode reference',[]);
+    fBodyNode := NIL;
+    fRespNode := NIL;
+    fMaxRef := 0;
+    fNode := IXMLNode(aStorageRef);
+  end;
+  {fNode := aStorageRef;}
+end;
+
+procedure TROXMLSerializer.EndReadObject(const aName: string;
+  aClass : TClass; var anObject: TObject; const LevelRef : IUnknown);
+begin
+  fNode := IXMLNode(pointer(LevelRef));   
+end;
+
+procedure TROXMLSerializer.EndWriteObject(const aName: string;
+  aClass : TClass; anObject: TObject; const LevelRef : IUnknown);
+begin
+  fNode := IXMLNode(pointer(LevelRef));
+end;
+
+procedure TROXMLSerializer.ReadDateTime(const aName: string; var Ref; ArrayElementId : integer = -1);
+var subnode : IXMLNode;
+begin
+  subnode := GetObject(aName, ArrayElementId);
+
+  subnode := FindSoapReference(subnode);
+
+  if (subnode<>NIL)
+    then TDateTime(Ref) := SOAPDateTimeToDateTime(GetXMLTextValue(subnode))
+    else TDateTime(Ref) := 0;
+    //else RaiseError(err_ParameterNotFound, [aName]);
+end;
+
+procedure TROXMLSerializer.ReadEnumerated(const aName: string;
+  anEnumTypeInfo: PTypeInfo; var Ref; ArrayElementId : integer = -1);
+var subnode : IXMLNode;
+    s: string;
+    lTypeName : shortstring;
+    lIndexInEnum: Integer;
+begin
+  subnode := GetObject(aName, ArrayElementId);
+
+  subnode := FindSoapReference(subnode);
+
+  if (subnode<>NIL)
+    then begin
+      s := GetXMLTextValue(subnode);
+      lIndexInEnum  := ROGetEnumValue(anEnumTypeInfo, s);
+      if lIndexInEnum = -1 then begin
+        lIndexInEnum  := ROGetEnumValue(anEnumTypeInfo, {$IFDEF UNICODE}UTF8ToString{$ENDIF}(anEnumTypeInfo.Name)+'_'+s);
+        if lIndexInEnum = -1 then begin
+          lTypeName := anEnumTypeInfo^.Name;
+          if anEnumTypeInfo = typeinfo(Boolean) then begin
+            if s = '1' then begin
+              byte(Ref) := 1;
+              exit;
+            end
+            else if s = '0' then begin
+              byte(Ref) := 0;
+              exit;
+            end;
+          end;
+          RaiseError(Format('The value "-1" for parameter "%s" of "%s" type is invalid', [aName, lTypeName]));
+        end;
+      end;
+      byte(Ref) := lIndexInEnum;
+    end else begin
+      byte(Ref) := 0;
+    end;
+    //else RaiseError(err_ParameterNotFound, [aName]);
+end;
+
+procedure TROXMLSerializer.ReadDouble(const aName: string;
+  aFloatType: TFloatType; var Ref; ArrayElementId : integer = -1);
+var
+  subnode : IXMLNode;
+  text: string;
+begin
+  subnode := GetObject(aName, ArrayElementId);
+
+  subnode := FindSoapReference(subnode);
+
+  if (subnode<>NIL) then begin
+    text := GetXMLTextValue(subnode);
+
+    {$IFNDEF DELPHI7UP}
+      if DecimalSeparator <> '.' then
+        ReplaceChar(text, ['.'], DecimalSeparator);
+    {$ENDIF}
+
+    case aFloatType of
+      ftSingle : single(Ref) := SOAPStrToFloat(text);
+      ftDouble : double(Ref) := SOAPStrToFloat(text);
+      ftExtended : extended(Ref) := SOAPStrToFloat(text);
+      ftComp : comp(Ref) := {$IFDEF FPC}
+                              {$IFDEF cpu64}StrToInt64(text){$ELSE}StrToInt(text){$ENDIF}
+                            {$ELSE}
+                               SOAPStrToFloat(text)
+                            {$ENDIF};
+      ftCurr : currency(Ref) := SOAPStrToFloat(text);
+    end;
+  end else begin
+    case aFloatType of
+      ftSingle : single(Ref) := 0;
+      ftDouble : double(Ref) := 0;
+      ftExtended : extended(Ref) := 0;
+      ftComp : comp(Ref) := 0;
+      ftCurr : currency(Ref) := 0;
+    end;
+  end;
+  //else RaiseError(err_ParameterNotFound, [aName]);
+end;
+
+procedure TROXMLSerializer.ReadInt64(const aName: string; var Ref; ArrayElementId : integer = -1);
+var subnode : IXMLNode;
+begin
+  subnode := GetObject(aName, ArrayElementId);
+
+  subnode := FindSoapReference(subnode);
+
+  if (subnode<>NIL)
+    then int64(Ref) := StrToInt64(GetXMLTextValue(subnode))
+    else int64(Ref) := int64(0);
+    //else RaiseError(err_ParameterNotFound, [aName]);
+end;
+
+procedure TROXMLSerializer.ReadInteger(const aName: string;
+  anOrdType: TOrdType; var Ref; ArrayElementId : integer = -1);
+var subnode : IXMLNode;
+begin
+  subnode := GetObject(aName, ArrayElementId);
+  subnode := FindSoapReference(subnode);
+
+  if (subnode<>NIL) then
+    case anOrdType of
+      otSByte,
+      otUByte : byte(Ref) := StrToInt(GetXMLTextValue(subnode));
+      otSWord,
+      otUWord : word(Ref) := StrToInt(GetXMLTextValue(subnode));
+      otSLong,
+      otULong : integer(Ref) := StrToInt(GetXMLTextValue(subnode));
+    end
+  else
+    case anOrdType of
+      otSByte,
+      otUByte : byte(Ref) := 0;
+      otSWord,
+      otUWord : word(Ref) := 0;
+      otSLong,
+      otULong : integer(Ref) := 0;
+    end
+  //else RaiseError(err_ParameterNotFound, [aName]);
+end;
+
+procedure TROXMLSerializer.ReadUTF8String(const aName: string; var Ref; ArrayElementId : integer = -1; iMaxLength:integer=-1);
+var subnode : IXMLNode;
+begin
+  subnode := GetObject(aName, ArrayElementId);
+
+  subnode := FindSoapReference(subnode);
+
+  if (subnode<>NIL) then
+    Utf8string(Ref) := UTF8Encode(GetXMLTextValue(subnode))
+  else
+    Utf8string(Ref) := '';
+    //else RaiseError(err_ParameterNotFound, [aName]);
+end;
+
+procedure TROXMLSerializer.ReadWideString(const aName: string; var Ref; ArrayElementId : integer = -1; iMaxLength:integer=-1);
+var subnode : IXMLNode;
+begin
+  subnode := GetObject(aName, ArrayElementId);
+
+  subnode := FindSoapReference(subnode);
+
+  if (subnode<>NIL) then
+    widestring(Ref) := GetXMLTextValue(subnode)
+  else
+    widestring(Ref) := '';
+    //else RaiseError(err_ParameterNotFound, [aName]);
+end;
+
+procedure TROXMLSerializer.WriteDateTime(const aName: string; const Ref; ArrayElementId : integer = -1);
+var newnode : IXMLNode;
+begin
+  newnode := AddNode(fNode, Unprefix(aName), ArrayElementId <> -1);
+  if not (xsoSendUntyped in SerializationOptions) then
+    AddXMLAttribute(newnode, 'xsi:type', 'xsd:dateTime', False);
+  AddXMLTextValue(newnode, DateTimeToSOAPDateTime(TDateTime(Ref)));
+end;
+
+procedure TROXMLSerializer.WriteEnumerated(const aName: string;
+  anEnumTypeInfo: PTypeInfo; const Ref; ArrayElementId : integer = -1);
+var newnode : IXMLNode;
+    isbool : boolean;
+    val : string;
+    lEnumName: String;
+begin
+  newnode := AddNode(fNode, Unprefix(aName), ArrayElementId <> -1);
+  isbool := (anEnumTypeInfo.Name='Boolean');
+
+  lEnumName := {$IFDEF UNICODE}UTF8ToString{$ENDIF}(anEnumTypeInfo^.Name);
+  if not (xsoSendUntyped in SerializationOptions) then begin
+    if isbool
+      then AddXMLAttribute(newnode, 'xsi:type', 'xsd:boolean', False)
+      else AddXMLAttribute(newnode, 'xsi:type', ns_Custom+':'+lEnumName, False);
+  end;
+
+  val := ROGetEnumName(anEnumTypeInfo, Ord(byte(Ref)));
+  if (Length(val) > Length(lEnumName) + 2) and
+     (Copy(val, 1, Length(lEnumName) + 1) = lEnumName + '_') then begin
+    val := Copy(val, Length(lEnumName) + 2, MaxInt);
+  end;
+  if isbool then val := LowerCase(val);
+
+  AddXMLTextValue(newnode, val); // TODO: check enums bigger than a byte!
+end;
+
+procedure TROXMLSerializer.WriteDouble(const aName: string;
+  aFloatType: TFloatType; const Ref; ArrayElementId : integer = -1);
+var src : pointer;
+    text, dtype : string;
+    newnode : IXMLNode;
+begin
+  src := @Ref;
+  case aFloatType of
+    ftSingle   : begin
+      text := FloatToStr(single(src^){$IFDEF DELPHI7UP},SOAPFormatSettings{$ENDIF});
+      {$IFNDEF DELPHI7UP}text := StringReplace(text, DecimalSeparator, '.', []);{$ENDIF}
+      dtype := 'float';
+    end;
+    ftDouble   : begin
+      text := FloatToStr(double(src^){$IFDEF DELPHI7UP},SOAPFormatSettings{$ENDIF});
+      {$IFNDEF DELPHI7UP}text := StringReplace(text, DecimalSeparator, '.', []);{$ENDIF}
+      dtype := 'double';
+    end;
+    ftExtended : begin
+      text := FloatToStr(extended(src^){$IFDEF DELPHI7UP},SOAPFormatSettings{$ENDIF});
+      {$IFNDEF DELPHI7UP}text := StringReplace(text, DecimalSeparator, '.', []);{$ENDIF}
+      dtype := 'double';
+    end;
+    ftComp     : begin
+      text := FloatToStr(comp(src^){$IFDEF DELPHI7UP},SOAPFormatSettings{$ENDIF});
+      {$IFNDEF DELPHI7UP}text := StringReplace(text, DecimalSeparator, '.', []);{$ENDIF}
+      dtype := 'double';
+    end;
+    ftCurr     : begin
+      text := FloatToStr(currency(src^){$IFDEF DELPHI7UP},SOAPFormatSettings{$ENDIF});
+      {$IFNDEF DELPHI7UP}text := StringReplace(text, DecimalSeparator, '.', []);{$ENDIF}
+      dtype := 'double';
+    end;
+  end;
+
+  newnode := AddNode(fNode, Unprefix(aName), ArrayElementId <> -1);
+  if not (xsoSendUntyped in SerializationOptions) then
+    AddXMLAttribute(newnode, 'xsi:type', 'xsd:'+dtype, False);
+  AddXMLTextValue(newnode, text);
+end;
+
+procedure TROXMLSerializer.WriteInt64(const aName: string; const Ref; ArrayElementId : integer = -1);
+var src : pointer;
+    text : string;
+    newnode : IXMLNode;
+begin
+  src := @Ref;
+  text := IntToStr(int64(src^));
+
+  newnode := AddNode(fNode, Unprefix(aName), ArrayElementId <> -1);
+  if not (xsoSendUntyped in SerializationOptions) then
+    AddXMLAttribute(newnode, 'xsi:type', 'xsd:long', False);
+  AddXMLTextValue(newnode, text);
+end;
+
+procedure TROXMLSerializer.WriteInteger(const aName: string;
+  anOrdType: TOrdType; const Ref; ArrayElementId : integer = -1);
+var src : pointer;
+    text, dtype : string;
+    newnode : IXMLNode;
+begin
+  src := @Ref;
+  case anOrdType of
+    otSByte : begin
+      text := IntToStr(shortint(src^));
+      dtype := 'byte';
+    end;
+    otUByte : begin
+      text := IntToStr(byte(src^));
+      dtype := 'unsignedByte';
+    end;
+    otSWord : begin
+      text := IntToStr(smallint(src^));
+      dtype := 'short';
+    end;
+    otUWord : begin
+      text := IntToStr(word(src^));
+      dtype := 'unsignedShort';
+    end;
+    otSLong : begin
+      text := IntToStr(integer(src^));
+      dtype := 'int';
+    end;
+    otULong : begin
+      text := IntToStr(integer(src^));
+      dtype := 'unsignedInt';
+    end;
+  end;
+
+  newnode := AddNode(fNode, Unprefix(aName), ArrayElementId <> -1);
+  if not (xsoSendUntyped in SerializationOptions) then
+    AddXMLAttribute(newnode, 'xsi:type', 'xsd:'+dtype, False);
+  AddXMLTextValue(newnode, text);
+end;
+
+procedure TROXMLSerializer.WriteUTF8String(const aName: string; const Ref; ArrayElementId : integer = -1);
+var newnode : IXMLNode;
+begin
+  newnode := AddNode(fNode, Unprefix(aName), ArrayElementId <> -1);
+  if not (xsoSendUntyped in SerializationOptions) then
+    AddXMLAttribute(newnode, 'xsi:type', 'xsd:string', False);
+  AddXMLTextValue(newnode, UTF8ToString(UTF8String(Ref)));
+end;
+
+procedure TROXMLSerializer.WriteWideString(const aName: string; const Ref; ArrayElementId : integer = -1);
+var newnode : IXMLNode;
+begin
+  newnode := AddNode(fNode, Unprefix(aName), ArrayElementId <> -1);
+  if not (xsoSendUntyped in SerializationOptions) then
+    AddXMLAttribute(newnode, 'xsi:type', 'xsd:string', False);
+  AddXMLTextValue(newnode, WideString(Ref));
+
+  newnode.Value := newnode.Value;
+end;
+
+procedure TROXMLSerializer.BeginReadObject(const aName: string;
+  aClass : TClass; var anObject: TObject; var LevelRef : IUnknown; var IsValidType : boolean; ArrayElementId : integer = -1);
+var cnt : integer;
+    lNilAttr, hrefattr : IXMLNode;
+    id : string;
+    clsnme, namespc, clstype : string;
+    lActualClass : TROComplexTypeClass;
+begin
+  inherited;
+
+  if fRespNode = nil then
+    fRespNode := fNode;
+
+  LevelRef := fNode;
+
+  fnode := GetObject(aName, ArrayElementId);
+
+  fnode := FindSoapReference(fnode);
+
+  if (fNode=NIL) then begin
+    // No such node found
+    anObject := NIL;
+    Exit;
+  end;
+
+  lNilAttr := fNode.GetAttributeByName(tag_Nil);
+  if Assigned(lNilAttr) and (lNilAttr.Value = tag_NilValue) then begin
+    anObject := NIL;
+    Exit;
+  end;
+
+  hrefattr := fNode.GetAttributeByName(tag_HRef);
+  if (hrefattr<>NIL) then begin
+    id := Copy(hrefattr.Value, 2, Length(hrefattr.Value)); // Removes the '#'
+    fNode := FindChildNodeByAttribute(BodyNode, tag_Id, id);
+    if fNode = nil then
+      fNode := FindChildNodeByAttribute(fRespNode, tag_Id, id);
+  end;
+
+  if aClass.InheritsFrom(TStream) then begin
+    anObject := TROBinaryMemoryStream.Create;
+    IsValidType := TRUE;
+  end
+
+  else if aClass.InheritsFrom(EROException) then begin
+    // Does nothing here
+    IsValidType := TRUE;
+  end
+
+  else if IsValidType then begin
+    clstype := VarToStr(fNode.GetAttributeValue('xsi:type', aClass.ClassName));
+    if (clstype = dts_Array) or (clstype = dts_Array2) then begin
+      //For arrays this attribute does't contain actual class name.
+      anObject := TROComplexTypeClass(aClass).Create;
+    end else begin
+      if xsoIgnoreStructureType in fSerializationOptions then begin
+        anObject := TROComplexTypeClass(aClass).Create;
+      end
+      else begin
+        SplitName(clstype, namespc, clsnme);
+        lActualClass := FindROClass(clsnme);
+
+        if not Assigned(lActualClass) then RaiseError(err_UnknownClassInStream,[clsnme]);
+        if not lActualClass.InheritsFrom(aClass) then RaiseError(err_UnexpectedClassInStream,[clsnme,aClass.ClassName]);
+        anObject := lActualClass.Create;
+      end;
+    end;
+
+    if (anObject is TROArray) then begin
+      cnt := fNode.ChildrenCount;
+      TROArray(anObject).Resize(cnt);
+    end;
+  end;
+end;
+
+function GetNamespace(aClass: TClass; aInst: Tobject): string;
+var
+  i: Integer;
+begin
+  if aInst is TROComplexType then aClass := aInst.ClassType;
+  if (aClass <> nil) and (aClass.InheritsFrom(TROComplexType)) or (aClass = TROComplexType) then begin
+    for i := TROComplexTypeClass(aClass).GetAttributeCount -1 downto 0 do begin
+      if TROComplexTypeClass(aClass).GetAttributeName(i) = 'ImportedFromNamespace' then begin
+        result := TROComplexTypeClass(aClass).GetAttributeValue(i);
+        exit;
+      end;
+    end;
+  end;
+  result := '';
+end;
+
+procedure TROXMLSerializer.BeginWriteObject(const aName: string;
+  aClass : TClass; anObject: TObject; var LevelRef : IUnknown; var IsValidType : boolean; out IsAssigned:Boolean; ArrayElementId : integer = -1);
+var id : string;
+    refnode : IXMLNode;
+  //  xsiattr : IXMLNode;
+    lName: String;
+begin
+  lName := Unprefix(aName);
+
+  inherited BeginWriteObject(lName, aClass, anObject, LevelRef, IsValidType, IsAssigned, ArrayElementId);
+
+  if fRespNode = nil then
+    fRespNode := fNode;
+
+  IsAssigned := Assigned(anObject);
+
+  if aClass.InheritsFrom(TStream) then begin
+    LevelRef := fNode;
+    fNode := AddNode(fNode, lName, ArrayElementId <> -1);
+
+    if Assigned(anObject) then begin
+      if not (xsoSendUntyped in SerializationOptions) then
+        {xsiattr :=} AddXMLAttribute(fNode, 'xsi:type', 'xsd:'+dts_base64Binary, False);
+      IsValidType := TRUE;
+    end
+    else begin
+      AddXMLAttribute(fNode, tag_Nil, tag_NilValue, False);
+    end;
+  end
+  else if IsValidType then begin // It is then a TROComplexType
+
+    LevelRef := fNode;
+
+    if ((aClass.InheritsFrom(TROArray) and (xsoWriteMultiRefArray in SerializationOptions)) or
+      (not aClass.InheritsFrom(TROArray)) and (xsoWriteMultiRefObject in SerializationOptions)) then begin
+
+      if Assigned(anObject) then begin
+        id := IntToStr(fMaxRef);
+        Inc(fMaxRef);
+
+        {refnode := fNode;
+
+        fNode := AddXMLChildNode(fRespNode, ns_Custom+':'+anObject.ClassName);
+        AddXMLAttribute(fNode, tag_Id, id, False);
+
+        refnode := AddXMLChildNode(refnode, lName);
+        AddXMLAttribute(refnode, tag_href, '#'+id, False);}
+
+        refnode := AddNode(fNode, lName, ArrayElementId <> -1);
+        AddXMLAttribute(refnode, tag_href, '#'+id, False);
+
+        fNode := AddNode(BodyNode, ns_Custom+':'+anObject.ClassName, ArrayElementId <> -1);
+        AddXMLAttribute(fNode, tag_Id, id, False);
+
+        if not (xsoSendUntyped in SerializationOptions) then
+          if (anObject is TROArray) then begin
+            {xsiattr :=} AddXMLAttribute(fNode, 'xsi:type', dts_Array, False);
+            //id := ns_Custom+':'+anObject.ClassName+'['+IntToStr(TROArray(anObject).Count)+']';
+            id :=  TypeInfoNameToSOAPType(TROArray(anObject).GetItemType)+'['+IntToStr(TROArray(anObject).Count)+']';
+            AddXMLAttribute(fNode, 'SOAP-ENC:arrayType', id, False);
+          end
+          else {xsiattr :=} AddXMLAttribute(fNode, 'xsi:type', ns_Custom+':'+anObject.ClassName, False);
+      end
+      else begin
+        refnode := AddNode(fNode, lName, ArrayElementId <> -1);
+        AddXMLAttribute(refnode, tag_Nil, tag_NilValue, False);
+      end;
+    end
+
+    else begin
+      fNode := AddNode(fNode, lName, ArrayElementId <> -1);
+
+      if not (xsoSendUntyped in SerializationOptions) then begin
+        if (anObject is TROArray) then begin
+          {xsiattr :=} AddXMLAttribute(fNode, 'xsi:type', dts_Array, False);
+          //id := ns_Custom+':'+anObject.ClassName+'['+IntToStr(TROArray(anObject).Count)+']';
+          id :=  TypeInfoNameToSOAPType(TROArray(anObject).GetItemType)+'['+IntToStr(TROArray(anObject).Count)+']';
+          AddXMLAttribute(fNode, 'SOAP-ENC:arrayType', id, False);
+        end
+        else {xsiattr :=} AddXMLAttribute(fNode, 'xsi:type', ns_Custom+':'+anObject.ClassName, False);
+      end
+    end
+  end;
+
+  //if (fNode<>NIL) and not IsAssigned
+    //then AddXMLAttribute(fNode, 'xsi:nil', 'true', False);
+end;
+
+procedure TROXMLSerializer.CustomReadObject(const aName: string;
+  aClass : TClass; var Ref; ArrayElementId: integer);
+var obj : TObject absolute Ref;
+    ss : TStringStream;
+begin
+  inherited;
+  if Assigned(obj) then begin
+
+    if (obj is TStream) then begin
+      ss := TStringStream.Create(fNode.Value);
+      try
+        DecodeStream(ss, TMemoryStream(obj));
+        TMemoryStream(obj).Position := 0;
+      finally
+        ss.Free;
+      end;
+    end;
+
+  end;
+end;
+
+procedure TROXMLSerializer.CustomWriteObject(const aName: string;
+  aClass : TClass; const Ref; ArrayElementId : integer = -1);
+var obj : TObject absolute Ref;
+    ss : TStringStream;
+begin
+  inherited CustomWriteObject(Unprefix(aName), aClass, Ref, ArrayElementId);
+  if Assigned(obj) then begin
+
+    if (obj is TStream) then begin
+      ss := TStringStream.Create('');
+      try
+        TStream(obj).Position := 0;
+        EncodeStream(TStream(obj), ss);
+        AddXMLTextValue(fNode, ss.DataString);
+      finally
+        ss.Free;
+      end;
+    end;
+
+  end;
+end;
+
+function TROXMLSerializer.BodyNode: IXMLNode;
+begin
+  if (fBodyNode=NIL) then fBodyNode := FindParentNode(fNode, tag_Body, TRUE);
+  result := fBodyNode;
+end;
+
+procedure TROXMLSerializer.ReadVariant(const aName: string; var Ref;
+  ArrayElementId: integer);
+var s,
+    vartypestr,
+    varnamespcstr : string;
+    subnode : IXMLNode;
+
+    lIntegerValue:integer;
+    {$IFNDEF DELPHI5}
+    lShortIntValue:shortint;
+    lSmallIntValue: Smallint;
+    //lInt64Value:Int64;
+    {$ENDIF DELPHI5}
+    lByteValue:byte;
+    lBoolValue: boolean;
+    lDoubleValue:double;
+    lSingleValue:single;
+    //lCurrencyValue:currency;
+    lWordValue : word;
+    lStringValue: widestring;
+    lDateTimeValue : TDateTime;
+begin
+  subnode := GetObject(aName, ArrayElementId);
+
+  subnode := FindSoapReference(subnode);
+
+  if (subnode<>NIL) then begin
+    // Determines the type of the value, if specified. Defaults to string.
+    s := subnode.GetAttributeValue('xsi:empty', '');
+    if s = '1' then begin
+      Variant(ref) := Unassigned;
+      exit;
+    end;
+    s := subnode.GetAttributeValue('xsi:null', '');
+    if s = '1' then begin
+      Variant(ref) := null
+    end
+    else begin
+      s := subnode.GetAttributeValue('xsi:type', 'xsd:string');
+      SplitName(s, varnamespcstr, vartypestr);
+
+      // Returns the right type of variant
+      if SameText(vartypestr, 'string') then begin
+        ReadWideString(aName, lStringValue, ArrayElementId);
+        Variant(Ref) := lStringValue;
+      end
+
+      else if SameText(vartypestr, 'float') then begin
+        ReadDouble(aName, ftSingle, lSingleValue, ArrayElementId);
+        Variant(Ref) := lSingleValue;
+      end
+
+      else if SameText(vartypestr, 'double') then begin
+        ReadDouble(aName, ftDouble, lDoubleValue, ArrayElementId);
+        Variant(Ref) := lDoubleValue;
+      end
+
+      else if SameText(vartypestr, 'byte') then begin
+        ReadInteger(aName, otSByte, lShortIntValue, ArrayElementId);
+        Variant(Ref) := lShortIntValue;
+      end
+
+      else if SameText(vartypestr, 'unsignedByte') then begin
+        ReadInteger(aName, otUByte, lByteValue, ArrayElementId);
+        Variant(Ref) := lByteValue;
+      end
+
+      else if SameText(vartypestr, 'short') then begin
+        ReadInteger(aName, otSWord, lSmallIntValue, ArrayElementId);
+        Variant(Ref) := lSmallIntValue;
+      end
+
+      else if SameText(vartypestr, 'unsignedShort') then begin
+        ReadInteger(aName, otUWord, lWordValue, ArrayElementId);
+        Variant(Ref) := lWordValue;
+      end
+
+      else if (SameText(vartypestr, 'int') or SameText(vartypestr, 'unsignedInt')) then begin
+        ReadInteger(aName, otSLong, lIntegerValue, ArrayElementId);
+        Variant(Ref) := lIntegerValue;
+      end
+
+      else if SameText(vartypestr, 'boolean') then begin
+        ReadEnumerated(aName, TypeInfo(boolean), lBoolValue, ArrayElementId);
+        Variant(Ref) := lBoolValue;
+      end
+
+      else if SameText(vartypestr, 'dateTime') then begin
+        ReadDateTime(aName, lDateTimeValue, ArrayElementId);
+        Variant(Ref) := lDateTimeValue;
+      end
+    end;
+  end
+  else RaiseError(err_ParameterNotFound, [aName]);
+end;
+
+procedure TROXMLSerializer.WriteVariant(const aName: string; const Ref;
+  ArrayElementId: integer);
+var vtype : integer;
+    varvalue : Variant;
+
+    lIntegerValue:integer;
+    {$IFNDEF DELPHI5}
+    lShortIntValue:shortint;
+    lSmallIntValue: Smallint;
+    //lInt64Value:Int64;
+    {$ENDIF DELPHI5}
+    lByteValue:byte;
+    lBoolValue: boolean;
+    lDoubleValue:double;
+    lSingleValue:single;
+    lCurrencyValue:currency;
+    lWideString: widestring;
+    newnode: IXMLNode;
+begin
+  varvalue := Variant(Ref);
+  vtype := VarType(Variant(Ref));
+
+  { Simple types }
+  case vtype of
+    varEmpty:
+      begin
+        newnode := AddNode(fNode, Unprefix(aName), ArrayElementId <> -1);
+        AddXMLAttribute(newnode, 'xsi:empty', '1', False);
+      end;
+    varNull,varError:begin
+      newnode := AddNode(fNode, Unprefix(aName), ArrayElementId <> -1);
+      AddXMLAttribute(newnode, 'xsi:null', '1', False);
+    end;
+    {$IFNDEF DELPHI5}
+    varShortInt:begin { 2, 10, 12 }
+      lShortIntValue := varvalue;
+      WriteInteger(aName, otSByte, lShortIntValue, ArrayElementId);
+    end;
+    varSmallInt,
+    varWord : begin
+      lSmallIntValue := varvalue;
+      WriteInteger(aName, otSWord, lSmallIntValue, ArrayElementId); // Suspicious... This might be wrong
+    end;
+    {$ENDIF DELPHI5}
+    {$IFNDEF DELPHI5}varLongWord,{$ENDIF DELPHI5}
+    varInteger:begin { 3, 13 }
+      lIntegerValue := varvalue;
+      WriteInteger(aName, otSLong, lIntegerValue, ArrayElementId);
+    end;
+    varSingle:begin { 4 }
+      lSingleValue := varvalue;
+      WriteDouble(aName, ftSingle, lSingleValue, ArrayElementId);
+    end;
+    varDouble:begin { 5 }
+      lDoubleValue := varvalue;
+      WriteDouble(aName, ftDouble, lDoubleValue, ArrayElementId);
+    end;
+    varDate:begin { 7 } // This must be handled differently in SOAP!
+      lDoubleValue := varvalue;
+      WriteDateTime(aName, lDoubleValue, ArrayElementId);
+    end;
+    varCurrency:begin { 6 }
+      lCurrencyValue := varvalue;
+      WriteDouble(aName, ftCurr, lCurrencyValue, ArrayElementId);
+    end;
+    varBoolean:begin { B }
+      lBoolValue:= varvalue;
+      WriteEnumerated(aName, TypeInfo(boolean), lBoolValue, ArrayElementId);
+    end;
+    varByte:begin { 11 }
+      lByteValue := varvalue;
+      WriteInteger(aName, otUByte, lByteValue, ArrayElementId);
+    end;
+    {$IFNDEF DELPHI5}
+(*    varInt64:begin { 14 }
+      NotSupported('');
+    end;*)
+    {$ENDIF DELPHI5}
+    varOleStr,varString,varUString:begin { 8, 100, 258 }
+      lWideString := varvalue;
+      WriteWideString(aName, lWideString, ArrayElementId);
+    end;
+    else NotSupported(Format(err_UnsupportedVariantType, [VarType(varvalue)]));
+  end;
+end;
+
+function TROXMLSerializer.GetArrayElementName(
+  anItemType: PTypeInfo; anItemReference: pointer): string;
+var tn: string;
+begin
+  case anItemType.Kind of
+    tkClass   : begin
+        if anItemReference = nil then result := UTF8ToString(anItemType^.Name) else result := TObject(anItemReference).ClassName;
+      end;
+    tkVariant :
+      begin
+        tn := VarTypeNameToSOAPType(VarType(Variant(anItemReference^)));
+        result := Copy(tn, Pos(':', tn)+1, MaxInt);
+      end;
+    else begin
+      tn := TypeInfoNameToSOAPType(anItemType);
+      result := Copy(tn, Pos(':', tn)+1, MaxInt);
+    end;
+  end;
+end;
+
+function TROXMLSerializer.GetRecordStrictOrder: Boolean;
+begin
+  Result := xsoStrictStructureFieldOrder in fSerializationOptions;
+end;
+
+function TROXMLSerializer.FindSoapReference(subnode: IXMLNode): IXMLNode;
+var
+  hrefattr: IXMLNode;
+  id: string;
+begin
+  result := subnode;
+  if subnode = nil then
+    exit;
+  hrefattr := subnode.GetAttributeByName(tag_HRef);
+  if (hrefattr<>NIL) then begin
+    id := Copy(hrefattr.Value, 2, Length(hrefattr.Value)); // Removes the '#'
+    while subnode <> nil do begin
+      result := FindChildNodeByAttribute(subnode, tag_Id, id);
+      if result <> nil then break;
+      subnode := subnode.Parent;
+    end;
+  end;
+end;
+
+function TROXMLSerializer.GetObject(const aName: string; ArrayElementId : integer): IXMLNode;
+var
+  lName: string;
+  c, i: Integer;
+begin
+  if fOverrideNextName <> '' then
+    lName := fOverrideNextName
+  else
+    lName := aName;
+  if (ArrayElementId>=0) then begin
+    c := -1;
+    if fArrayElementName <> '' then begin
+      for i := 0 to fNode.ChildrenCount -1 do begin
+        if fNode.Children[i].LocalName = fArrayElementName then begin
+          inc(c);
+          if c = ArrayElementId then begin
+            result := fNode.Children[i];
+            exit;
+          end;
+        end;
+      end;
+    end else begin
+      for i := 0 to fNode.ChildrenCount -1 do begin
+        if (fNode.Children[i].LocalName <> tag_text) and (fNode.Children[i].Name <> tag_text)  then begin
+          inc(c);
+          if c = ArrayElementId then begin
+            result := fNode.Children[i];
+            exit;
+          end;
+        end;
+      end;
+    end;
+  end
+
+  else result := FindChildNode(fNode, Unprefix(lName), ArrayElementId,TRUE);
+end;
+
+procedure TROXMLSerializer.ReadXml(const aName: String; var Ref;
+  ArrayElementId: Integer);
+var
+  w: WideString;
+  doc: IXMLDocument;
+  node: IXMLNode;
+begin
+  node := GetObject(aName, ArrayElementID);
+  if (xsoEncodedXML in SerializationOptions) or (node = nil) or (node.FirstChild = nil) or (Node.FirstChild.name = tag_text) then begin
+    ReadWideString(aName, w, ArrayElementId);
+    if w = '' then
+      IXMLNode(Ref) := nil
+    else begin
+      doc := NewROXmlDocument;
+      doc.New;
+      doc.XML := w;
+      IXMLNode(Ref) := doc.DocumentNode;
+    end;
+  end else begin
+    if node = nil then IXMLNode(Ref) := nil else begin
+      node := Node.FirstChild;
+      if node = nil then begin
+        IXMLNode(Ref) := nil;
+      end else begin
+        doc := NewROXmlDocument;
+        doc.New;
+        doc.XML := node.XML;
+        IXMLNode(Ref) := doc.DocumentNode;
+      end;
+    end;
+  end;
+end;
+
+procedure TROXMLSerializer.WriteXml(const aName: String; const Ref;
+  ArrayElementId: Integer);
+var
+  w: WideString;
+  newnode: IXMLNode;
+begin
+  if (xsoEncodedXML in SerializationOptions) then begin
+    if IXMLNode(Ref) = nil then
+      w := ''
+    else
+      w := IXMLNode(Ref).XML;
+    WriteWideString(aName, w, ArrayElementId);
+  end else begin
+    newnode := AddNode(fNode, Unprefix(aName), ArrayElementId <> -1);
+    if IXMLNode(Ref) <> nil then begin
+      newnode.AddXml(IXMLNode(Ref).XML);
+    end;
+  end;
+end;
+
+procedure TROXMLSerializer.ReadDecimal(const aName: String; var Ref;
+  ArrayElementId: Integer);
+var
+  s: string;
+begin
+   ReadUTF8String(aName, s, ArrayElementId);
+   if DecimalSeparator <> '.' then s := StringReplace(s, '.', DecimalSeparator, []);
+   Variant(Ref) := BCDToVariant(StrToBcd(s));
+end;
+
+procedure TROXMLSerializer.ReadGuid(const aName: String; var Ref;
+  ArrayElementId: Integer);
+var
+  s: string;
+begin
+  ReadUTF8String(aName, s, ArrayElementId);
+  if Copy(s,1,1) <> '{' then s := '{'+s+'}';
+  string(Ref) := s;
+end;
+
+procedure TROXMLSerializer.WriteDecimal(const aName: String; const Ref;
+  ArrayElementId: Integer);
+var
+  s: string;
+begin
+  s := BcdToStr(VariantToBCD(variant(Ref)));
+  if DecimalSeparator <> '.' then s := StringReplace(s, DecimalSeparator, '.', []); // delphi has no way to format a bcd with a specific format
+  WriteUTF8String(aName, s, ArrayElementId);
+end;
+
+procedure TROXMLSerializer.WriteGuid(const aName: String; const Ref;
+  ArrayElementId: Integer);
+var
+  s: string;
+begin
+  s := GuidToString(StringToGUID(string(Ref)));
+  s := copy(s,2,length(s) -2); // remove curlies
+  WriteUTF8String(aName, s, ArrayElementId);
+end;
+
+procedure TROXMLSerializer.ReadBinary(const aName: string; var Ref;
+  ArrayElementId: integer);
+var
+  obj : Binary absolute Ref;
+  ss : TStringStream;
+  LevelRef: IXMLNode;
+begin
+  LevelRef := fNode;
+  try
+    if FindNode(aName, ArrayElementId) then begin
+      obj:= Binary.Create;
+      ss := TStringStream.Create(fNode.Value);
+      try
+        obj.Clear;
+        DecodeStream(ss, TMemoryStream(obj));
+        TMemoryStream(obj).Position := 0;
+      finally
+        ss.Free;
+      end;
+    end
+    else
+      Obj := nil;
+  finally
+    fNode := LevelRef;
+  end;
+end;
+
+procedure TROXMLSerializer.WriteBinary(const aName: string; const Ref;
+  ArrayElementId: integer);
+var
+  obj : Binary absolute Ref;
+  ss : TStringStream;
+  LevelRef: IXMLNode;
+begin
+  LevelRef := fNode;
+//BeginWriteObject
+{ TODO -oek : BeginWriteObject }
+  if (obj = nil) and (xsoSendUntyped in SerializationOptions) then exit;
+  fNode := AddNode(fNode, Unprefix(aName), ArrayElementId <> -1);
+  if Assigned(obj) then begin
+    if not (xsoSendUntyped in SerializationOptions) then  AddXMLAttribute(fNode, 'xsi:type', 'xsd:'+dts_base64Binary, False);
+    ss := TStringStream.Create('');
+    try
+      obj.Position := 0;
+      EncodeStream(obj, ss);
+      AddXMLTextValue(fNode, ss.DataString);
+    finally
+      ss.Free;
+    end;
+  end
+  else
+    AddXMLAttribute(fNode, tag_Nil, tag_NilValue, False);
+  fNode := LevelRef;
+end;
+
+procedure TROXMLSerializer.WriteArray(const aName: string; const Ref; aClass: TClass;
+  ArrayElementId: integer);
+var
+  obj : TROArray absolute Ref;
+  LevelRef: IXmlNode;
+  id : string;
+  lAnon, lDummy: Boolean;
+  refnode : IXMLNode;
+  //xsiattr : IXMLNode;
+  lSaveName, lName: String;
+begin
+  IsAnonymous(TROComplexTypeClass(aClass), lAnon, lDummy);
+  LevelRef := fNode;
+  try
+    lName := Unprefix(aName);
+    if fRespNode = nil then fRespNode := fNode;
+    LevelRef := fNode;
+    lSaveName := fArrayElementName;
+    if lAnon then begin
+      fArrayElementName := aName;
+    end else begin
+      if (xsoWriteMultiRefArray in SerializationOptions) then begin
+        if Assigned(obj) then begin
+          id := IntToStr(fMaxRef);
+          Inc(fMaxRef);
+
+          refnode := AddNode(fNode, lName, ArrayElementId <> -1);
+          AddXMLAttribute(refnode, tag_href, '#'+id, False);
+
+          fNode := AddNode(BodyNode, ns_Custom+':'+obj.ClassName, ArrayElementId <> -1);
+          AddXMLAttribute(fNode, tag_Id, id, False);
+
+          if not (xsoSendUntyped in SerializationOptions) then begin
+            {xsiattr :=} AddXMLAttribute(fNode, 'xsi:type', dts_Array, False);
+            id :=  TypeInfoNameToSOAPType(obj.GetItemType)+'['+IntToStr(obj.Count)+']';
+            AddXMLAttribute(fNode, 'SOAP-ENC:arrayType', id, False);
+          end;
+        end
+        else begin
+          refnode := AddNode(fNode, lName, ArrayElementId <> -1);
+          AddXMLAttribute(refnode, tag_Nil, tag_NilValue, False);
+        end;
+      end
+      else begin
+        fNode := AddNode(fNode, lName, ArrayElementId <> -1);
+        if not (xsoSendUntyped in SerializationOptions) then begin
+          {xsiattr :=} AddXMLAttribute(fNode, 'xsi:type', dts_Array, False);
+          id :=  TypeInfoNameToSOAPType(obj.GetItemType)+'['+IntToStr(obj.Count)+']';
+          AddXMLAttribute(fNode, 'SOAP-ENC:arrayType', id, False);
+        end
+      end;
+      fArrayElementName := '';
+    end;
+    if Assigned(Obj) then begin
+      Obj.WriteComplex(Self);
+    end;
+    fArrayElementName := lSaveName;
+  finally
+    fNode := IXMLNode(LevelRef);
+  end;
+end;
+
+procedure TROXMLSerializer.WriteStruct(const aName: string; const Ref; aClass: TClass;
+  ArrayElementId: integer);
+var
+  obj : TROComplexType absolute Ref;
+  LevelRef: IXmlNode;
+  id : string;
+  lAnon, lNil: Boolean;
+  refnode : IXMLNode;
+  //xsiattr : IXMLNode;
+  lSaveNs, lName: String;
+begin
+  LevelRef:=fNode;
+  if (aclass = XsDateTime) and (XsDateTime(Obj) <> nil) then begin
+    WriteXsDateTime(aName, XsDateTime(Obj), ArrayElementId);
+    exit;
+  end;
+  try
+    IsAnonymous(TROComplexTypeClass(aClass), lAnon, lNil);
+    lName := Unprefix(aName);
+    if fRespNode = nil then fRespNode := fNode;
+    LevelRef := fNode;
+    if (xsoWriteMultiRefObject in SerializationOptions)  then begin
+      if Assigned(obj) then begin
+        id := IntToStr(fMaxRef);
+        Inc(fMaxRef);
+        refnode := AddNode(fNode, lName, ArrayElementId <> -1);
+        AddXMLAttribute(refnode, tag_href, '#'+id, False);
+        fNode := AddNode(BodyNode, ns_Custom+':'+obj.ClassName, ArrayElementId <> -1);
+        AddXMLAttribute(fNode, tag_Id, id, False);
+        if not (xsoSendUntyped in SerializationOptions) then
+          {xsiattr :=} AddXMLAttribute(fNode, 'xsi:type', ns_Custom+':'+obj.ClassName, False);
+      end
+      else begin
+        if lNil then begin
+          refnode := AddNode(fNode, lName, ArrayElementId <> -1);
+          AddXMLAttribute(refnode, tag_Nil, tag_NilValue, False);
+        end;
+      end;
+    end
+    else begin
+      if Assigned(obj) then begin
+        if not lAnon then begin
+          fNode := AddNode(fNode, lName, ArrayElementId <> -1);
+          if not (xsoSendUntyped in SerializationOptions) then
+            {xsiattr :=} AddXMLAttribute(fNode, 'xsi:type', ns_Custom+':'+obj.ClassName, False);
+        end else
+          fOverrideNextName := lName;
+      end else begin
+        if lNil then begin
+          if not (xsoSendUntyped in SerializationOptions) then
+            {xsiattr :=} AddXMLAttribute(fNode, 'xsi:type', ns_Custom+':'+obj.ClassName, False);
+          refnode := AddNode(fNode, lName, ArrayElementId <> -1);
+          AddXMLAttribute(refnode, tag_Nil, tag_NilValue, False);
+        end;
+      end;
+    end;
+    lSaveNs := CurrentNamespace;
+    if (obj <> nil) and (xsoExternalTypesAsReferences in SerializationOptions) then
+      CurrentNamespace := GetNamespace(TObject(Obj).ClassType, TObject(obj));
+    if Assigned(Obj) then begin
+      Obj.WriteComplex(Self);
+    end;
+    CurrentNamespace := lSaveNs;
+    if fOverrideNextName = lName then
+      fOverrideNextName := '';
+  finally
+    fNode := LevelRef;
+  end;
+end;
+
+function TROXMLSerializer.ReadArray(const aName: string; aClass: TClass;
+  var Ref; ArrayElementId: integer): Boolean;
+var
+  obj : TROArray absolute Ref;
+  LevelRef: IXmlNode;
+  i, cnt : integer;
+  lNilAttr, hrefattr : IXMLNode;
+  id : string;
+  clsnme, namespc, clstype : string;
+  lActualClass : TROArrayClass;
+  lAnon, lDummy: Boolean;
+begin
+  IsAnonymous(TROComplexTypeClass(aclass), lAnon, lDummy);
+  Result := False;
+  LevelRef := fNode;
+  try
+    clsnme := fArrayElementName;
+    if lAnon then begin
+      if fOverrideNextName <> '' then fArrayElementName := fOverrideNextName else fArrayElementName := aName;
+      cnt := 0;
+      for i := 0 to fNode.ChildrenCount - 1 do begin
+        if fNode.Children[i].LocalName = fArrayElementName then inc(cnt);
+      end;
+
+    end else begin
+      if fRespNode = nil then fRespNode := fNode;
+      fnode := GetObject(aName, ArrayElementId);
+      fnode := FindSoapReference(fnode);
+      if (fNode=NIL) then begin
+        // No such node found
+        Obj := NIL;
+        Exit;
+      end;
+
+      lNilAttr := fNode.GetAttributeByName(tag_Nil);
+      if Assigned(lNilAttr) and (lNilAttr.Value = tag_NilValue) then begin
+        obj := NIL;
+        Exit;
+      end;
+
+      hrefattr := fNode.GetAttributeByName(tag_HRef);
+      if (hrefattr<>NIL) then begin
+        id := Copy(hrefattr.Value, 2, Length(hrefattr.Value)); // Removes the '#'
+        fNode := FindChildNodeByAttribute(BodyNode, tag_Id, id);
+        if fNode = nil then fNode := FindChildNodeByAttribute(fRespNode, tag_Id, id);
+      end;
+
+      clstype := VarToStr(fNode.GetAttributeValue('xsi:type', aClass.ClassName));
+      if (clstype = dts_Array) or (clstype = dts_Array2) then begin
+        //For arrays this attribute does't contain actual class name.
+        obj := TROArrayClass(aClass).Create;
+      end else begin
+        if xsoIgnoreStructureType in fSerializationOptions then begin
+          obj := TROArrayClass(aClass).Create;
+        end
+        else begin
+          SplitName(clstype, namespc, clsnme);
+          lActualClass := TROArrayClass(FindROClass(clsnme));
+
+          if not Assigned(lActualClass) then RaiseError(err_UnknownClassInStream,[clsnme]);
+          if not lActualClass.InheritsFrom(aClass) then RaiseError(err_UnexpectedClassInStream,[clsnme,aClass.ClassName]);
+          Obj := lActualClass.Create;
+        end;
+      end;
+      cnt := 0;
+      for i := 0 to fNode.ChildrenCount - 1 do begin
+        if (fNode.Children[i].LocalName <> tag_text) and (fNode.Children[i].Name <> tag_text) then inc(cnt);
+      end;
+      clsnme := fArrayElementName;
+      fArrayElementName := '';
+    end;
+    Obj.Resize(cnt);
+    obj.ReadComplex(Self);
+    fArrayElementName := clsnme;
+  finally
+    fNode := LevelRef;
+  end;
+end;
+
+function TROXMLSerializer.ReadStruct(const aName: string; aClass: TClass;
+  var Ref; ArrayElementId: integer): Boolean;
+var
+  obj : TROComplexType absolute Ref;
+  LevelRef: IXmlNode;
+  lNilAttr, hrefattr : IXMLNode;
+  id : string;
+  lAnon, lNil: Boolean;
+  clsnme, namespc, clstype : string;
+  lActualClass : TROComplexTypeClass;
+begin
+  Result:=False;
+  if aClass = XsDateTime then begin
+    XsDateTime(ref) := ReadXsDateTime(aName, ArrayElementId);
+    exit;
+  end;
+  LevelRef:=fNode;
+  try
+    if fRespNode = nil then fRespNode := fNode;
+    fnode := GetObject(aName, ArrayElementId);
+    fnode := FindSoapReference(fnode);
+    if (fNode=NIL) then begin
+      // No such node found
+      obj := NIL;
+      Exit;
+    end;
+
+    lNilAttr := fNode.GetAttributeByName(tag_Nil);
+    if Assigned(lNilAttr) and (lNilAttr.Value = tag_NilValue) then begin
+      obj := NIL;
+      Exit;
+    end;
+
+    hrefattr := fNode.GetAttributeByName(tag_HRef);
+    if (hrefattr<>NIL) then begin
+      id := Copy(hrefattr.Value, 2, Length(hrefattr.Value)); // Removes the '#'
+      fNode := FindChildNodeByAttribute(BodyNode, tag_Id, id);
+      if fNode = nil then
+        fNode := FindChildNodeByAttribute(fRespNode, tag_Id, id);
+    end;
+
+    clstype := VarToStr(fNode.GetAttributeValue('xsi:type', aClass.ClassName));
+    if (clstype = dts_Array) or (clstype = dts_Array2) then begin
+      //For arrays this attribute does't contain actual class name.
+      obj := TROComplexTypeClass(aClass).Create;
+    end else begin
+      if xsoIgnoreStructureType in fSerializationOptions then begin
+        obj := TROComplexTypeClass(aClass).Create;
+      end
+      else begin
+        SplitName(clstype, namespc, clsnme);
+        lActualClass := FindROClass(clsnme);
+
+        if not Assigned(lActualClass) then RaiseError(err_UnknownClassInStream,[clsnme]);
+        if not lActualClass.InheritsFrom(aClass) then RaiseError(err_UnexpectedClassInStream,[clsnme,aClass.ClassName]);
+        obj := lActualClass.Create;
+      end;
+    end;
+    IsAnonymous(TROComplexTypeClass(aClass), lAnon, lNil);
+    if lAnon then begin
+      fNode := LevelRef; // We support both so lNil can be ignored;
+      fOverrideNextName := aName;
+    end;
+    Obj.ReadComplex(Self);
+    if lAnon then
+      fOverrideNextName := '';
+  finally
+    fNode := LevelRef;
+  end;
+end;
+
+function TROXMLSerializer.FindNode(const aName: string;
+  ArrayElementId: integer): Boolean;
+var
+  lNilAttr, hrefattr : IXMLNode;
+  id : string;
+begin
+  Result:=False;
+  if fRespNode = nil then fRespNode := fNode;
+  fnode := FindSoapReference(GetObject(aName, ArrayElementId));
+
+  if (fNode=NIL) then exit; // No such node found
+
+  lNilAttr := fNode.GetAttributeByName(tag_Nil);
+  if Assigned(lNilAttr) and (lNilAttr.Value = tag_NilValue) then Exit;
+
+  Result := True;
+  hrefattr := fNode.GetAttributeByName(tag_HRef);
+  if (hrefattr<>NIL) then begin
+    id := Copy(hrefattr.Value, 2, Length(hrefattr.Value)); // Removes the '#'
+    fNode := FindChildNodeByAttribute(BodyNode, tag_Id, id);
+    if fNode = nil then fNode := FindChildNodeByAttribute(fRespNode, tag_Id, id);
+  end;
+end;
+
+procedure TROXMLSerializer.ReadException(const aName: string; var Ref;
+  ArrayElementId: integer);
+var
+  obj: EROException absolute Ref;
+  LevelRef,
+  lNilAttr, hrefattr : IXMLNode;
+  id : string;
+begin
+  if fRespNode = nil then fRespNode := fNode;
+
+  LevelRef := fNode;
+  try
+    if ExceptionIsAnonymous(obj) then begin
+      Obj.ReadException(Self);
+    end else begin
+      fnode := GetObject(aName, ArrayElementId);
+
+      fnode := FindSoapReference(fnode);
+
+      if (fNode=NIL) then begin
+        // No such node found
+        obj := NIL;
+        Exit;
+      end;
+
+      lNilAttr := fNode.GetAttributeByName(tag_Nil);
+      if Assigned(lNilAttr) and (lNilAttr.Value = tag_NilValue) then begin
+        obj := NIL;
+        Exit;
+      end;
+
+      hrefattr := fNode.GetAttributeByName(tag_HRef);
+      if (hrefattr<>NIL) then begin
+        id := Copy(hrefattr.Value, 2, Length(hrefattr.Value)); // Removes the '#'
+        fNode := FindChildNodeByAttribute(BodyNode, tag_Id, id);
+        if fNode = nil then fNode := FindChildNodeByAttribute(fRespNode, tag_Id, id);
+      end;
+      Obj.ReadException(Self);
+    end;
+  finally
+    fNode := LevelRef;
+  end;
+end;
+
+procedure TROXMLSerializer.WriteException(const aName: string; const Ref;
+  ArrayElementId: integer);
+var
+  obj: EROException absolute Ref;
+  LevelRef: IXMLNode;
+  lName, lOrgNs, lNamespace: string;
+  lAnon: Boolean;
+  i: Integer;
+begin
+  if fRespNode = nil then fRespNode := fNode;
+  LevelRef := fNode;
+  try
+    lAnon := false;
+    lNamespace := '';
+    lName := aName;
+    if Obj <> nil then begin
+      for i := 0 to obj.GetAttributeCount -1 do begin
+        if obj.GetAttributeName(i) = 'ElementName' then
+          lName := obj.GetAttributeValue(i)
+        else if obj.GetAttributeName(i) = 'ElementNamespace' then
+          lNamespace := obj.GetAttributeValue(i)
+        else if obj.GetAttributeName(i) = 'Anonymous' then
+         lAnon := true;
+      end;
+    end;
+    lOrgNs := CurrentNamespace;
+    if lNamespace <> '' then begin
+      CurrentNamespace := lNamespace;
+    end;
+    if not lAnon then begin
+      fNode := AddNode(fNode, Unprefix(lName), ArrayElementId <> -1);
+      if not (xsoSendUntyped in SerializationOptions) then
+        AddXMLAttribute(fNode, 'xsi:type', ns_Custom+':'+obj.ClassName, False);
+    end;
+    if Assigned(obj) then Obj.WriteException(Self);
+    if lOrgns <> '' then
+      CurrentNamespace := lOrgns;
+  finally
+    fNode := LevelRef;
+  end;
+end;
+
+function TROXMLSerializer.AddNode(aCurrent: IXmlNode; const aName: string; aIsArray: Boolean): IXMLNode;
+var
+  lName: string;
+begin
+  if (aIsArray) and (fArrayElementName <> '') then begin
+    lName := fArrayElementName
+  end else
+  if fOverrideNextName <> '' then begin
+    lName := fOverrideNextName;
+    fOverrideNextName := '';
+  end else
+    lName := aName;
+
+  if Prefix <> '' then
+    result := aCurrent.Add(Prefix+':'+lName, fCurrentNamespace)
+  else
+    result := aCurrent.Add(lName, fCurrentNamespace);
+end;
+
+destructor TROXMLSerializer.Destroy;
+begin
+  fPrefixMap.Free;
+  inherited;
+end;
+
+procedure TROXMLSerializer.SetCurrentNamespace(const Value: string);
+var
+  i: Integer;
+  lPar: IXMLNode;
+begin
+  if (Value = '') then exit;
+  fCurrentNamespace := Value;
+  i := fPrefixMap.IndexOf(Value);
+  if i = -1 then begin
+    i := fPrefixMap.Add(Value);
+    if fNode <> nil then begin
+      lPar := fnode.Document.DocumentNode;
+      if lPar <> nil then begin
+        lPar.AddAttribute('xmlns:'+'v'+IntToStr(i+1), Value, False);
+      end;
+    end;
+  end;
+  fPrefix := 'v'+IntToStr(i+1);
+end;
+
+procedure TROXMLSerializer.ChangeClass(aClass: TClass);
+var
+  i: Integer;
+begin
+  if aClass.InheritsFrom(EROException) then begin
+    for i := 0 to EROExceptionClass(aclass).GetAttributeCount -1 do begin
+      if EROExceptionClass(aclass).GetAttributeName(i) = 'ElementNamespace' then begin
+        SetCurrentNamespace(EROExceptionClass(aclass).GetAttributeValue(i));
+      end;
+    end;
+  end else if aClass.InheritsFrom(TROComplexType) then begin
+    for i := 0 to TROComplexTypeClass(aclass).GetAttributeCount -1 do begin
+      if TROComplexTypeClass(aclass).GetAttributeName(i) = 'ElementNamespace' then begin
+        SetCurrentNamespace(TROComplexTypeClass(aclass).GetAttributeValue(i));
+      end;
+    end;
+  end;
+end;
+
+procedure TROXMLSerializer.ReadAnsiString(const aName: string; var Ref;
+  ArrayElementId, iMaxLength: integer);
+var
+  subnode : IXMLNode;
+begin
+  subnode := GetObject(aName, ArrayElementId);
+
+  subnode := FindSoapReference(subnode);
+
+  if (subnode<>NIL) then begin
+    Ansistring(Ref) := WideStringToAnsiString(GetXMLTextValue(subnode))
+  end
+  else
+    Ansistring(Ref) := '';
+    //else RaiseError(err_ParameterNotFound, [aName]);
+end;
+
+procedure TROXMLSerializer.WriteAnsiString(const aName: string; const Ref;
+  ArrayElementId: integer);
+var
+  newnode : IXMLNode;
+begin
+  newnode := AddNode(fNode, Unprefix(aName), ArrayElementId <> -1);
+  if not (xsoSendUntyped in SerializationOptions) then
+    AddXMLAttribute(newnode, 'xsi:type', 'xsd:string', False);
+  AddXMLTextValue(newnode,  AnsiStringToWideString(Ansistring(Ref)));
+end;
+
+procedure TROXMLSerializer.WriteXSDateTime(const aName: string;
+  Ref: XsDateTime; ArrayElementId : integer = -1);
+var newnode : IXMLNode;
+  s: string;
+begin
+  newnode := AddNode(fNode, Unprefix(aName), ArrayElementId <> -1);
+  if not (xsoSendUntyped in SerializationOptions) then
+    AddXMLAttribute(newnode, 'xsi:type', 'xsd:dateTime', False);
+  s := DateTimeToSOAPDateTime(ref.DateTime);
+  if Ref.WriteTimeZone then begin
+    if ref.TimeZoneOffset = 0 then
+      s := s + 'Z'
+    else begin
+      if ref.TimeZoneOffset < 0 then
+        s := s + '-'
+      else
+        s := s + '+';
+      if Abs(ref.TimeZoneOffset div 60) < 10 then
+        s := s + '0'+IntToStr(Abs(ref.TimeZoneOffset) div 60) +':'
+      else
+        s := s + IntToStr(Abs(ref.TimeZoneOffset) div 60) +':';
+      if (abs(ref.TimeZoneOffset) mod 60) < 10 then
+        s := s +'0' + IntToStr(abs(ref.TimeZoneOffset) mod 60)
+      else
+        s := s + IntToStr(abs(ref.TimeZoneOffset) mod 60);
+      end;
+  end;
+  AddXMLTextValue(newnode, s);
+end;
+
+function TROXMLSerializer.ReadXsDateTime(const aName: string; ArrayElementId : integer = -1): XsDateTime;
+var subnode : IXMLNode;
+  lOffset: Integer;
+begin
+  subnode := GetObject(aName, ArrayElementId);
+
+  subnode := FindSoapReference(subnode);
+
+  if subnode.GetAttributeValue(tag_Nil, '0') = '1' then begin
+    result := nil;
+    exit;
+  end;
+
+  if (subnode<>NIL) then begin
+    Result := XsDateTime.Create(SOAPDateTimeToDateTime(GetXMLTextValue(subnode), lOffset));
+    Result.TimeZoneOffset := lOffset;
+  end else
+    result := nil;
+end;
+
+initialization
+  {$IFDEF DELPHI7UP}
+  GetLocaleFormatSettings(SOAPLocale,SOAPFormatSettings);
+  //ToDo: fix this for D6
+  {$ENDIF}
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROXmlRpcMessage.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROXmlRpcMessage.pas
new file mode 100644
index 0000000..46a927d
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Source/uROXmlRpcMessage.pas	
@@ -0,0 +1,1401 @@
+unit uROXmlRpcMessage;
+
+{----------------------------------------------------------------------------}
+{ RemObjects SDK Library - Core Library                                      }
+{                                                                            }
+{ compiler: Delphi 5 and up, Kylix 2 and up                                  }
+{ platform: Win32, Linux                                                     }
+{                                                                            }
+{ (c)opyright RemObjects Software. all rights reserved.                      }
+{                                                                            }
+{ Using this code requires a valid license of the RemObjects SDK             }
+{ which can be obtained at http://www.remobjects.com.                        }
+{----------------------------------------------------------------------------}
+
+{$I RemObjects.inc}
+
+interface
+
+uses
+  Classes, SysUtils, TypInfo, uROClasses, uROTypes, uROHttpTools,
+  uROSerializer, uROClient, uROClientIntf, uROXmlIntf, uRoRes, FMTBcd;
+
+type
+  TROSimpleXmlWriter = class;
+  EROXmlRcpSerializerException = class(Exception);
+  TROXmlRpcType = (XRpcRequest, XRpcResponse, XRpcFaultResponse);
+  TROXmlRpcState = (XrsParam, XrsArray, Xrsstruct);
+
+  TROXmlRpcSerializer = class(TROSerializer)
+  private
+    fCurrState: TROXmlRpcState;
+    fDocument: IXMLDocument;
+    fStateCount: Integer;
+    fStates: array of TROXmlRpcState;
+    fType: TROXmlRpcType;
+    fMethodName: string;
+    fCurrentParamElement: IXMLNode;
+    fWriter: TROSimpleXmlWriter;
+    procedure PushState(aKind: TROXmlRpcState);
+    function PopState: TROXmlRpcState;
+
+    procedure BeginValue(aName: string);
+    procedure EndValue;
+
+    function StructGetMember(aRoot: IXMLNode; const aName: string; aRaiseException: Boolean): IXMLNode;
+    function GetValueNodecontentsForName(const aName: string): IXMLNode;
+  protected
+    procedure BeginWriteObject(const aName: string; aClass : TClass; anObject: TObject; var LevelRef : IUnknown;
+                                var IsValidType : boolean; out IsAssigned:Boolean; ArrayElementId : integer = -1); override;
+    procedure EndWriteObject(const aName: string; aClass : TClass; anObject: TObject; const LevelRef : IUnknown); override;
+    procedure CustomWriteObject(const aName : string; aClass : TClass; const Ref; ArrayElementId : integer = -1); override;
+    procedure CustomReadObject(const aName: string; aClass: TClass;var Ref; ArrayElementId: integer);override;
+    procedure BeginReadObject(const aName : string; aClass : TClass; var anObject : TObject; var LevelRef : IUnknown;
+                               var IsValidType : boolean; ArrayElementId : integer = -1); override;
+    procedure EndReadObject(const aName : string; aClass : TClass; var anObject : TObject; const LevelRef : IUnknown); override;
+  public
+     { Writers }
+     procedure WriteInteger(const aName : string; anOrdType : TOrdType; const Ref; ArrayElementId : integer = -1); override;
+     procedure WriteInt64(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+     procedure WriteEnumerated(const aName : string; anEnumTypeInfo : PTypeInfo; const Ref; ArrayElementId : integer = -1); override;
+     procedure WriteUTF8String(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+     procedure WriteAnsiString(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+     procedure WriteWideString(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+     procedure WriteDateTime(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+     procedure WriteDouble(const aName : string; aFloatType : TFloatType; const Ref; ArrayElementId : integer = -1); override;
+     procedure WriteVariant(const aName : string; const Ref; ArrayElementId : integer = -1); override;
+     procedure WriteXml(const aName: String; const Ref; ArrayElementId: Integer = -1); override;
+     procedure WriteGuid(const aName: String; const Ref; ArrayElementId: Integer = -1); override;
+     procedure WriteDecimal(const aName: String; const Ref; ArrayElementId: Integer = -1); override;
+     procedure WriteBinary(const aName : string; const Ref; ArrayElementId : integer = -1);override;
+     procedure WriteStruct(const aName : string; const Ref; aClass: TClass = nil; ArrayElementId : integer = -1); override;
+     procedure WriteArray(const aName : string; const Ref; aClass: TClass = nil; ArrayElementId : integer = -1); override;
+     procedure WriteException(const aName : string; const Ref; ArrayElementId : integer = -1); overload; override;
+     { Readers }
+     procedure ReadInteger(const aName : string; anOrdType : TOrdType; var Ref; ArrayElementId : integer = -1); override;
+     procedure ReadInt64(const aName : string; var Ref; ArrayElementId : integer = -1); override;
+     procedure ReadEnumerated(const aName : string; anEnumTypeInfo : PTypeInfo; var Ref; ArrayElementId : integer = -1); override;
+     procedure ReadUTF8String(const aName : string; var Ref; ArrayElementId : integer = -1; iMaxLength:integer=-1); override;
+     procedure ReadAnsiString(const aName : string; var Ref; ArrayElementId : integer = -1; iMaxLength:integer=-1); override;
+     procedure ReadWideString(const aName : string; var Ref; ArrayElementId : integer = -1; iMaxLength:integer=-1); override;
+     procedure ReadDateTime(const aName : string; var Ref; ArrayElementId : integer = -1); override;
+     procedure ReadDouble(const aName : string; aFloatType : TFloatType; var Ref; ArrayElementId : integer = -1); override;
+     procedure ReadVariant(const aName : string; var Ref; ArrayElementId : integer = -1); override;
+     procedure ReadXml(const aName: String; var Ref; ArrayElementId: Integer = -1); override;
+     procedure ReadDecimal(const aName: String; var Ref; ArrayElementId: Integer = -1); override;
+     procedure ReadGuid(const aName: String; var Ref; ArrayElementId: Integer = -1); override;
+     procedure ReadBinary(const aName : string; var Ref; ArrayElementId : integer = -1);override;
+     function ReadStruct(const aName : string; aClass : TClass; var Ref; ArrayElementId : integer = -1): Boolean; override;
+     function ReadArray(const aName : string; aClass : TClass; var Ref; ArrayElementId : integer = -1): Boolean; override;
+     procedure ReadException(const aName : string; var Ref; ArrayElementId : integer = -1); overload;override;
+  public
+    constructor Create;
+    destructor Destroy; override;
+
+    procedure InitializeWrite(aType: TROXmlRpcType; aMethodName: string);
+    procedure InitializeRead(aStream: TStream);
+
+    property aType: TROXmlRpcType read fType write fType;
+    property aMethodName: string read fMethodName write fMethodName;
+
+    procedure WriteToStream(aStream: TStream);
+
+    procedure WriteException(aCode: Integer; aMsg: string);reintroduce;overload;
+    procedure ReadException(var aCode: Integer; var aMsg: string);reintroduce;overload;
+  end;
+
+  TROXmlRpcMessage = class(TROMessage)
+  protected
+    { Internals }
+    function ReadException: Exception; override;
+    procedure WriteException(aStream: TStream; anException: Exception); override;
+
+    function CreateSerializer: TROSerializer; override;
+
+    { IROMessage }
+    procedure Initialize(const aTransport: IROTransport; const anInterfaceName, aMessageName: string; aType: TMessageType); override;
+
+
+    procedure WriteToStream(aStream: TStream); override;
+    procedure ReadFromStream(aStream: TStream); override;
+    procedure InitializeExceptionMessage(const aTransport: IROTransport;
+      const aLibraryName: String; const anInterfaceName: String;
+      const aMessageName: String); override;
+  public
+    function IsValidMessage(aData: PAnsiChar; aLength: Integer): boolean; override;
+  end;
+  TROSimpleXmlWriter = class
+  private
+    fElementStack: TStrings;
+    fOutput: TMemoryStream;
+    fFinished: Boolean;
+
+    procedure WriteRawAnsiString(const s: Ansistring);
+    procedure WriteRawString(const s: string);
+  public
+    procedure WriteStartElement(const aElementName: string);
+    procedure WriteEndElement;
+
+    procedure WriteString(const aValue: WideString);
+    procedure WriteAnsiString(const aValue: AnsiString);
+
+    procedure SaveToStream(aDest: TStream);
+
+    constructor Create;
+    destructor Destroy; override;
+
+    property Finished: Boolean read fFinished;
+  end;
+
+function StringToCurrInvariant(const aValue: string): Currency;
+function CurrToStringInvariant(aValue: Currency): String;
+
+implementation
+uses
+  uROCompression, DateUtils, StrUtils, uROBinaryHelpers;
+
+function FirstNonText(node: IXMLNode): IXMLNode;
+begin
+  Result := Node;
+  while (Result <> nil) and (copy(Result.Name, 1, 1) = '#') do
+    Result := Result.NextSibling;
+end;
+
+function StringToCurrInvariant(const aValue: string): Currency;
+var
+  s: string;
+  i: Integer;
+  Res: Int64;
+begin
+  s := aValue;
+  i := Pos('.', s);
+  if i = 0 then begin
+    s := s + '.0000';
+  end
+  else begin
+    if Length(s) - i < 4 then
+      s := s + StringOfChar('0', 4 - (Length(s) - i))
+    else if Length(s) - i > 4 then
+      Delete(s, i + 5, MaxInt);
+  end;
+  Delete(s, i, 1); 
+  Res := StrToInt64(s);
+  Move(Res, Result, 8);
+end;
+
+function CurrToStringInvariant(aValue: Currency): string;
+var
+  Val: Int64;
+begin
+  Move(aValue, Val, 8);
+  Result := IntToStr(Val); // we need it locale independent and without any thousand seperators
+  if Length(Result) <= 4 then
+    Result := StringOfChar('0', 5 - Length(Result)) + Result;
+  Insert('.', Result, Length(Result) - 3);
+end;
+
+{ TROXmlRpcMessage }
+
+function TROXmlRpcMessage.CreateSerializer: TROSerializer;
+begin
+  result := TROXmlRpcSerializer.Create;
+end;
+
+procedure TROXmlRpcMessage.Initialize(const aTransport: IROTransport;
+  const anInterfaceName, aMessageName: string; aType: TMessageType);
+begin
+  inherited;
+  SetHTTPInfo(aTransport, DataFormatXml);
+  case aType of
+    mtRequest: TROXmlRpcSerializer(Serializer).InitializeWrite(XRpcRequest, anInterfaceName + '.' + aMessageName);
+    mtResponse: TROXmlRpcSerializer(Serializer).InitializeWrite(XRpcResponse, anInterfaceName + '.' + aMessageName);
+    mtException: TROXmlRpcSerializer(Serializer).InitializeWrite(XRpcFaultResponse, anInterfaceName + '.' + aMessageName)
+  else
+    raise EROXmlRcpSerializerException.Create('Unsupported request type');
+  end
+end;
+
+procedure TROXmlRpcMessage.InitializeExceptionMessage(
+  const aTransport: IROTransport; const aLibraryName, anInterfaceName,
+  aMessageName: String);
+begin
+  inherited;
+  SetHTTPInfo(aTransport, DataFormatXml);
+end;
+
+function TROXmlRpcMessage.IsValidMessage(aData: PAnsiChar;
+  aLength: Integer): boolean;
+var
+  str: AnsiString;
+begin
+  SetString(str, aData, aLength);
+  Result :=
+    (Pos(AnsiString('<methodRequest>'), str) > 0) or
+    (Pos(AnsiString('<methodCall>'), str) > 0) or
+    (Pos(AnsiString('<methodResponse>'), str) > 0);
+end;
+
+function TROXmlRpcMessage.ReadException: Exception;
+var
+  lCode: Integer;
+  lMsg: string;
+  cl: string;
+  idx: Integer;
+begin
+  TROXmlRpcSerializer(Serializer).ReadException(lCode, lMsg);
+  case lCode of
+    -32700, -32701, -32702, -32600, -32603, -32300:
+    begin
+     Result := EROXmlRcpSerializerException.Create(lMsg);
+     exit;
+    end;
+  end;
+  idx := Pos(': ', lMsg);
+  if (idx = 0) or (idx > Pos(' ', lMsg)) then begin
+    result := Exception.Create(lMsg);
+    exit;
+  end;
+  cl := Copy(lMsg, 1, Idx -1);
+  Delete(lMsg, 1, Idx + 1);
+
+  result := CreateException(cl, lMsg);
+
+  // Reads the other fields which have been properly serialized
+  //if result.InheritsFrom(EROException) then
+    //EROException(Result).Read(Serializer);
+end;
+
+procedure TROXmlRpcMessage.ReadFromStream(aStream: TStream);
+var
+  s: string;
+  encryptedheader: array[0..5] of char;
+begin
+  inherited;
+  aStream.Position := 0;
+
+  try
+    TROXmlRpcSerializer(Serializer).InitializeRead(aStream);
+  except
+    aStream.Position := 0;
+    aStream.Read(encryptedheader, 6);
+    if (encryptedheader[0] = 'r') and (encryptedheader[1] = 'o') and
+      (encryptedheader[2] = 'r') and (encryptedheader[3] = 'o') and
+      (encryptedheader[4] = 'c') and (encryptedheader[5] = 'k') then
+      RaiseInvalidStreamError(err_InvalidHeaderEncrypted, [], aStream);
+    raise;
+  end;
+  if TROXmlRpcSerializer(Serializer).aType = XRpcFaultResponse then
+    ProcessException
+  else begin
+    s := TROXmlRpcSerializer(Serializer).aMethodName;
+    if pos('.', s) = 0 then
+      MessageName := s
+    else begin
+      MessageName := copy(s, pos('.', s) + 1, MaxInt);
+      InterfaceName := copy(s, 1, pos('.', s) - 1);
+    end;
+  end;
+end;
+
+procedure TROXmlRpcMessage.WriteException(aStream: TStream;
+  anException: Exception);
+begin
+  inherited;
+  TROXmlRpcSerializer(Serializer).InitializeWrite(XRpcFaultResponse, '');
+  if anException is EROXmlRcpSerializerException then
+    TROXmlRpcSerializer(Serializer).WriteException(-32600, anException.Message)
+  else
+    TROXmlRpcSerializer(Serializer).WriteException(1, anException.ClassName+': '+anException.Message);
+//  if anException is EROException then EROException(anException).Write(Serializer);
+  TROXmlRpcSerializer(Serializer).WriteToStream(aStream);
+end;
+
+procedure TROXmlRpcMessage.WriteToStream(aStream: TStream);
+begin
+  TROXmlRpcSerializer(Serializer).WriteToStream(aStream);
+  inherited;
+end;
+
+{ TROXmlRpcSerializer }
+
+constructor TROXmlRpcSerializer.Create;
+begin
+  inherited Create;
+end;
+
+procedure TROXmlRpcSerializer.InitializeWrite(aType: TROXmlRpcType; aMethodName: string);
+begin
+  ftype := aType;
+  fMethodName := aMethodName;
+  if fWriter <> nil then fWriter.Free; 
+  fWriter := TROSimpleXmlWriter.Create;
+  case aType of
+    XRpcFaultResponse:
+      begin
+        fWriter.WriteStartElement('methodResponse');
+        fWriter.WriteStartElement('fault');
+        fCurrState := XrsArray;
+      end;
+    XRpcResponse:
+      begin
+        fWriter.WriteStartElement('methodResponse');
+        fWriter.WriteStartElement('params');
+      end;
+   XRpcRequest:
+     begin
+       fWriter.WriteStartElement('methodCall');
+       fWriter.WriteStartElement('methodName');
+       fWriter.WriteString(fMethodName);
+       fWriter.WriteEndElement();
+       fWriter.WriteStartElement('params');
+     end;
+  end;
+end;
+
+procedure TROXmlRpcSerializer.CustomWriteObject(const aName: string;
+  aClass: TClass; const Ref; ArrayElementId: integer);
+var
+  anObject: TObject absolute Ref;
+  lTemp: Binary;
+begin
+  if anObject is TStream then begin
+    lTemp := Binary.Create;
+    try
+      TStream(anObject).Seek(0, soFromBeginning);
+      EncodeStream(TStream(anObject), lTemp);
+      fWriter.WriteAnsiString(lTemp.ToString);
+    finally
+      lTemp.Free;
+    end;
+  end else
+    inherited;
+end;
+
+procedure TROXmlRpcSerializer.BeginWriteObject(const aName: string;
+  aClass: TClass; anObject: TObject; var LevelRef: IInterface;
+  var IsValidType: boolean; out IsAssigned: Boolean;
+  ArrayElementId: integer);
+begin
+  if aClass <> nil then
+    inherited;
+
+  if not assigned(anObject) then raise EROXmlRcpSerializerException.Create('Nil objects not supported by xmlrpc');
+
+  IsAssigned := True;
+
+  BeginValue(aName);
+
+  if anObject is TStream then begin
+    fWriter.WriteStartElement('base64');
+    // write binary
+    IsValidType := true; // Adds streams/binaries as supported type
+  end else if anObject is TROArray then begin
+    fWriter.WriteStartElement('array');
+    PushState(XrsArray);
+    fWriter.WriteStartElement('data');
+    IsValidType := true; // Adds Array as supported type
+  end
+  else if anObject is TROComplexType then begin
+    fWriter.WriteStartElement('struct');
+    PushState(Xrsstruct);
+    IsValidType := true;
+  end;
+end;
+
+procedure TROXmlRpcSerializer.EndWriteObject(const aName: string;
+  aClass: TClass; anObject: TObject; const LevelRef: IInterface);
+begin
+  if anObject is TStream then begin
+    fWriter.WriteEndElement;
+  end else if anObject is TROArray then begin
+    fWriter.WriteEndElement;
+    fWriter.WriteEndElement;
+    if PopState <> xrsArray then raise EROXmlRcpSerializerException.Create('Invalid state');
+  end
+  else if anObject is TROComplexType then begin
+    if PopState <> Xrsstruct then raise EROXmlRcpSerializerException.Create('Invalid state');
+    fWriter.WriteEndElement;
+  end;
+
+  EndValue;
+end;
+
+procedure TROXmlRpcSerializer.WriteDateTime(const aName: string; const Ref;
+  ArrayElementId: integer);
+begin
+  BeginValue(aName);
+  fWriter.WriteStartElement('dateTime.iso8601');
+  fWriter.WriteString(FormatDateTime('yyyymmdd"T"hh:nn:ss', DateTime(Ref)));
+  fWriter.WriteEndElement;
+  EndValue;
+end;
+
+procedure TROXmlRpcSerializer.WriteEnumerated(const aName: string;
+  anEnumTypeInfo: PTypeInfo; const Ref; ArrayElementId: integer);
+begin
+  BeginValue(aName);
+  if anEnumTypeInfo.Name = 'Boolean' then
+  begin
+    fWriter.WriteStartElement('boolean');
+    if boolean(Ref) then
+      fWriter.WriteAnsiString(AnsiChar('1'))
+    else
+      fWriter.WriteAnsiString(AnsiChar('0'));
+    fWriter.WriteEndElement;
+  end else
+  begin
+    fWriter.WriteStartElement('string');
+    fWriter.WriteString(ROGetEnumName(anEnumTypeInfo, Ord(byte(Ref))));
+    fWriter.WriteEndElement;
+  end;
+  EndValue;
+end;
+
+procedure TROXmlRpcSerializer.WriteDouble(const aName: string;
+  aFloatType: TFloatType; const Ref; ArrayElementId: integer);
+var
+  s: string;
+begin
+  // Str doesn't use the locale settings
+  case aFloatType of
+    ftSingle: s := FloatToStr(Single(Ref));
+    ftDouble: s := FloatToStr(Double(Ref));
+    ftExtended: s := FloatToStr(Extended(Ref));
+    ftComp: s := FloatToStr(Comp(Ref));
+    ftCurr:
+      begin
+        s :=CurrToStringInvariant(currency(Ref));
+        WriteUTF8String(aName, s);
+        exit;
+      end;
+  end;
+  s := StringReplace(s, DecimalSeparator, '.', []);
+  BeginValue(aName);
+  fWriter.WriteStartElement('double');
+  fWriter.WriteString(s);
+  fWriter.WriteEndElement();
+  EndValue();
+end;
+
+procedure TROXmlRpcSerializer.WriteInt64(const aName: string; const Ref;
+  ArrayElementId: integer);
+begin
+  BeginValue(aName);
+  fWriter.WriteStartElement('string'); // no way around
+  fWriter.WriteString(IntToStr(Int64(ref)));
+  fWriter.WriteEndElement();
+  EndValue();
+end;
+
+procedure TROXmlRpcSerializer.WriteInteger(const aName: string;
+  anOrdType: TOrdType; const Ref; ArrayElementId: integer);
+var
+  aIntVal: Integer;
+begin
+  case anOrdType of
+    otSByte: aIntVal := ShortInt(Ref);
+    otUByte: aIntVal := Byte(Ref);
+    otSWord: aIntVal := SmallInt(Ref);
+    otUWord: aIntVal := Word(Ref);
+    otSLong: aIntVal := Integer(Ref);
+    otULong: aIntVal := Cardinal(Ref);
+  else
+    aIntVal := 0; 
+  end;
+  BeginValue(aName);
+  fWriter.WriteStartElement('i4');
+  fWriter.WriteString(IntToStr(aIntVal));
+  fWriter.WriteEndElement();
+  EndValue();
+end;
+
+procedure TROXmlRpcSerializer.WriteUTF8String(const aName: string; const Ref;
+  ArrayElementId: integer);
+begin
+  BeginValue(aName);
+  fWriter.WriteStartElement('string');
+  fWriter.WriteAnsiString(AnsiString(UTF8String(Ref)));
+  fWriter.WriteEndElement;
+  EndValue;
+end;
+
+procedure TROXmlRpcSerializer.WriteToStream(aStream: TStream);
+begin
+  if fWriter = nil then begin
+    fWriter:= TROSimpleXmlWriter.Create;
+    if fDocument <> nil then fWriter.WriteRawAnsiString(UTF8Encode(fDocument.XML));
+    fWriter.fFinished := True;
+  end
+  else begin
+    if not fWriter.Finished then
+    begin
+      fWriter.WriteEndElement(); // params/fault
+      fWriter.WriteEndElement(); // methodRequest/methodRespones
+    end;
+  end;
+  fWriter.SaveToStream(aStream);
+end;
+
+procedure TROXmlRpcSerializer.WriteVariant(const aName: string; const Ref;
+  ArrayElementId: integer);
+begin
+  raise EROXmlRcpSerializerException.Create('Variants not supported by xmlrpc');
+end;
+
+procedure TROXmlRpcSerializer.WriteWideString(const aName: string;
+  const Ref; ArrayElementId: integer);
+begin
+  BeginValue(aName);
+  fWriter.WriteStartElement('string');
+  fWriter.WriteString(WideString(Ref));
+  fWriter.WriteEndElement;
+  EndValue;
+end;
+
+procedure TROXmlRpcSerializer.WriteException(aCode: Integer; aMsg: string);
+var
+  lmsg: UTF8String;
+begin
+  BeginValue('');
+  fWriter.WriteStartElement('struct');
+  PushState(Xrsstruct);
+  WriteInteger('faultCode', otSLong, aCode);
+  lmsg:=UTF8Encode(aMsg);
+  WriteUTF8String('faultString',lmsg);
+  if PopState <> Xrsstruct then raise EROXmlRcpSerializerException.Create('Invalid state');
+  fWriter.WriteEndElement;
+  EndValue;
+end;
+
+procedure TROXmlRpcSerializer.InitializeRead(aStream: TStream);
+var
+  el, tmp: IXMLNode;
+begin
+  fDocument := NewROXmlDocument;
+  fDocument.New;
+  fDocument.LoadFromStream(aStream);
+  if (fDocument.DocumentNode.Name = 'methodRequest') or (fDocument.DocumentNode.Name = 'methodCall') then
+    fType := XRpcRequest
+  else if fDocument.DocumentNode.Name = 'methodResponse' then
+    fType :=  XRpcResponse
+  else
+    raise EROXmlRcpSerializerException.Create('Invalid xmlrpc document');
+
+  el := fDocument.DocumentNode;
+  if fType = xrpcRequest then begin
+    tmp := el.GetNodeByName('methodName');
+    if tmp = nil then raise EROXmlRcpSerializerException.Create('Invalid xmlrpc document');
+    fMethodName := tmp.Value;
+    tmp := el.GetNodeByName('params');
+    if tmp = nil then raise EROXmlRcpSerializerException.Create('Invalid xmlrpc document');
+    fCurrentParamElement := FirstNonText(tmp.FirstChild);
+  end else begin
+    tmp := el.GetNodeByName('fault');
+    if tmp = nil then begin
+      tmp := el.GetNodeByName('params');
+      if tmp = nil then raise EROXmlRcpSerializerException.Create('Invalid xmlrpc document');
+      tmp := FirstNonText(tmp.FirstChild);
+    end
+    else
+      fType := XRpcFaultResponse;
+    fCurrentParamElement := tmp;
+  end;
+end;
+
+
+function TROXmlRpcSerializer.StructGetMember(aRoot: IXMLNode; const aName: string; aRaiseException: Boolean): IXMLNode;
+var
+  i: Integer;
+  tmp: IXMLNode;
+begin
+  for i := 0 to aRoot.ChildrenCount -1 do
+  begin
+    Result := aRoot.Children[i];
+    tmp := Result.GetNodeByName('name');
+    if (tmp <> nil) and (tmp.Value = aName) then begin
+      Result := result.GetNodeByName('value');
+      if (Result = nil) and aRaiseException then EROXmlRcpSerializerException.Create('Unknown node: '+aName);
+      exit;
+    end;
+  end;
+  if (Result = nil) and aRaiseException then EROXmlRcpSerializerException.Create('Unknown node: '+aName);
+  result := nil;
+end;
+
+procedure TROXmlRpcSerializer.ReadException(var aCode: Integer; var aMsg: string);
+var
+  tmp, val: IXMLNode;
+begin
+  tmp := fCurrentParamElement.GetNodeByName('value');
+  if tmp = nil then raise EROXmlRcpSerializerException.Create('Invalid xmlrpc exception');
+  tmp := tmp.GetNodeByName('struct');
+  if tmp = nil then raise EROXmlRcpSerializerException.Create('Invalid xmlrpc exception');
+
+  val := StructGetMember(tmp, 'faultCode', true);
+  val := val.GetNodeByName('i4');
+  if val = nil then raise EROXmlRcpSerializerException.Create('Invalid xmlrpc exception');
+  acode := val.Value;
+
+  val := StructGetMember(tmp, 'faultString', true);
+  val := val.GetNodeByName('string');
+  if val = nil then raise EROXmlRcpSerializerException.Create('Invalid xmlrpc exception');
+  aMsg := val.Value;
+end;
+
+procedure TROXmlRpcSerializer.BeginReadObject(const aName: string;
+  aClass: TClass; var anObject: TObject; var LevelRef: IInterface;
+  var IsValidType: boolean; ArrayElementId: integer);
+var
+  el: IXMLNode;
+begin
+  if aClass.InheritsFrom(TStream) then begin
+    anObject := TROBinaryMemoryStream.Create;
+    IsValidType := true;
+  end
+  else if aclass.InheritsFrom(TROArray) then begin
+    anObject := TROComplexTypeClass(aClass).Create;
+    IsValidType := true;
+  end
+  else if aclass.InheritsFrom(TROComplexType) then begin
+    anObject := TROComplexTypeClass(aClass).Create;
+    el :=GetValueNodeContentsForName(aName);
+    if (el = nil) or (el.Name <> 'struct') then raise EROXmlRcpSerializerException.Create('Not a struct');
+    PushState(Xrsstruct);
+    fCurrentParamElement := el;
+    IsValidType := true;
+  end else
+    IsValidType := false;
+end;
+
+procedure TROXmlRpcSerializer.CustomReadObject(const aName: string;
+  aClass: TClass; var Ref; ArrayElementId: integer);
+var
+  obj: TObject absolute ref;
+  el,
+  tmp: IXMLNode;
+  ci: Integer;
+  itemref: Pointer;
+  tmpstream: Binary;
+begin
+  if obj is TROArray then begin
+    el := GetValueNodeContentsForName(aName);
+    if el.Name <> 'array' then raise EROXmlRcpSerializerException.Create('Not at array');
+    el := FirstNonText(el.FirstChild);
+    if el.Name <> 'data' then raise EROXmlRcpSerializerException.Create('Not an array');
+    tmp := fCurrentParamElement;
+    fCurrentParamElement := FirstNonText(el.FirstChild);
+    PushState(XrsArray);
+    ci := 0;
+    TROArray(obj).Resize(el.ChildrenCount); // might differ if there are junk entries
+    while fCurrentParamElement <> nil do begin
+      if TROArray(obj).GetItemClass <> nil then begin
+        itemref := nil;
+        Read(RO_ArrayItemName, TROArray(obj).GetItemType, itemref, ci);
+        TROArray(obj).SetItemRef(ci, itemref);
+      end else begin
+        itemref := TROArray(obj).GetItemRef(ci);
+        Read(RO_ArrayItemName, TROArray(obj).GetItemType, itemref^, ci);
+      end;
+      inc(ci);
+    end;
+    if ci <> el.ChildrenCount then TROArray(obj).Resize(ci);
+    if PopState <> XrsArray then raise EROXmlRcpSerializerException.Create('Invalid state');
+    fCurrentParamElement := tmp;
+  end else if obj is TStream then begin
+    el := GetValueNodecontentsForName(aName);
+    if el.Name <> 'base64' then raise EROXmlRcpSerializerException.Create('Not a base64 block');
+    tmpstream := TROBinaryMemoryStream.Create(UTF8Encode(el.Value));
+    try
+      DecodeStream(tmpstream, TStream(obj));
+      TStream(obj).Position := 0;
+    finally
+      tmpstream.Free;
+    end;
+  end else
+    inherited;
+end;
+
+procedure TROXmlRpcSerializer.EndReadObject(const aName: string;
+  aClass: TClass; var anObject: TObject; const LevelRef: IInterface);
+var
+  el: IXMLNode;
+begin
+  if aclass.InheritsFrom(TROComplexType) and not (aClass.InheritsFrom(TStream) or aclass.InheritsFrom(TROArray)) then begin
+    el := fCurrentParamElement;
+    if (el = nil) or (el.Name <> 'struct') or (PopState() <> Xrsstruct)then raise EROXmlRcpSerializerException.Create('Invalid state');
+    case fCurrState of
+      XrsArray:
+        el := el.Parent;
+      XrsParam:
+        el := el.Parent.Parent;
+      Xrsstruct:
+        el := el.Parent.Parent.Parent;
+    end;
+    fCurrentParamElement := FirstNonText(el.NextSibling);
+  end
+end;
+
+procedure TROXmlRpcSerializer.ReadDateTime(const aName: string; var Ref;
+  ArrayElementId: integer);
+var
+  el: IXMLNode;
+  s: string;
+  h,m,sec: Integer;
+begin
+  el := GetValueNodeContentsForName(aName);
+  if el = nil then
+  begin
+    DateTime(ref) := 0.0;
+    exit;
+  end;
+  if el.Name <> 'dateTime.iso8601' then raise EROXmlRcpSerializerException.Create('Not a datetime');
+  s := el.Value;
+  if (Length(s) <> 17) or (s[9] <> 'T') then raise EROXmlRcpSerializerException.Create('Invalid date format');
+  DateTime(ref) := EncodeDate(
+    StrToInt(copy(s,1,4)), //yyyy
+    StrToInt(copy(s,5,2)), //mm
+    StrToInt(copy(s,7,2))); //dd
+    // skip the T
+  delete(s,1,9);
+  h := StrToInt(copy(s,1,2)); //hh
+  delete(s,1,2);
+  if copy(s,1,1) = ':' then delete(s,1,1);
+  m := StrToInt(copy(s,1,2)); //nn
+  delete(s,1,2);
+  if copy(s,1,1) = ':' then delete(s,1,1);
+  sec := StrToInt(copy(s,1,2)); //ss
+  DateTime(ref) := DateTime(ref) + EncodeTime(H, M, Sec, 0)
+end;
+
+procedure TROXmlRpcSerializer.ReadEnumerated(const aName: string;
+  anEnumTypeInfo: PTypeInfo; var Ref; ArrayElementId: integer);
+var
+  enumval: Integer;
+  s: string;
+  el: IXMLNode;
+begin
+  if anEnumTypeInfo.Name = 'Boolean' then begin
+  el := GetValueNodeContentsForName(aName);
+  if el = nil then
+  begin
+    byte(ref) := 0;
+    exit;
+  end;
+//    if el = nil then raise EROXmlRcpSerializerException.Create('Not a boolean');
+    if el.Name <> 'boolean' then raise EROXmlRcpSerializerException.Create('Not a boolean');
+    if (el.Value = '1') or (el.Value = 'true') then
+      enumval := 1
+    else
+      enumval := 0;
+  end else begin
+    ReadUTF8String(aName, s);
+    if s = '' then
+    begin
+      byte(Ref) := 0;
+      exit;
+    end;
+    enumval := ROGetEnumValue(anEnumTypeInfo, s);
+    if enumval < 0 then
+      raise EROXmlRcpSerializerException.Create('Unknown value "'+ s +'" for enum "'+UTF8ToString(anEnumTypeInfo^.Name)+'"');
+  end;
+  byte(Ref) := enumval;
+end;
+
+procedure TROXmlRpcSerializer.ReadDouble(const aName: string;
+  aFloatType: TFloatType; var Ref; ArrayElementId: integer);
+var
+  d: Double;
+  el: IXMLNode;
+  c: Integer;
+  s: string;
+begin
+  if aFloatType = ftCurr then
+  begin
+    ReadUTF8String(aName, s);
+    if s = '' then
+    begin
+      Currency(Ref) := 0;
+      exit;
+    end;
+    Currency(Ref) := StringToCurrInvariant(s);
+    exit;
+  end;
+  el := GetValueNodeContentsForName(aName);
+  if el = nil then
+  begin
+  case aFloatType of
+      ftSingle: Single(Ref) := 0.0;
+      ftDouble: Double(Ref) := 0.0;
+      ftExtended: Extended(Ref) := 0.0;
+      ftComp:     Comp(Ref) := {$IFDEF FPC}
+                                  {$IFDEF cpu64}Int64(0){$ELSE}Integer(0){$ENDIF}
+                               {$ELSE}
+                                  0.0
+                               {$ENDIF};
+    end;
+    exit;
+  end;
+  if el.Name <> 'double' then raise EROXmlRcpSerializerException.Create('Not a double');
+
+  Val(el.Value, d, c);
+  if c <> 0 then raise EROXmlRcpSerializerException.Create('Invalid float format');
+
+  case aFloatType of
+    ftSingle: Single(Ref) := d;
+    ftDouble: Double(Ref) := d;
+    ftExtended: Extended(Ref) := d;
+    ftComp:     Comp(Ref) := {$IFDEF FPC}
+                                {$IFDEF cpu64}StrToInt64(el.Value){$ELSE}StrToInt(el.Value){$ENDIF}
+                             {$ELSE}
+                                d
+                             {$ENDIF};
+  end;
+end;
+
+procedure TROXmlRpcSerializer.ReadInt64(const aName: string; var Ref;
+  ArrayElementId: integer);
+var
+  s: string;
+begin
+  ReadUTF8String(aName, s);
+  if s = '' then Int64(Ref) := 0
+  else Int64(Ref) := StrToInt64(s);
+end;
+
+procedure TROXmlRpcSerializer.ReadInteger(const aName: string;
+  anOrdType: TOrdType; var Ref; ArrayElementId: integer);
+var
+  el: IXMLNode;
+  aVal: Integer;
+begin
+  el := GetValueNodeContentsForName(aName);
+  if el = nil then
+    aVal := 0
+  else
+  begin
+    if (el.Name <> 'i4') and (el.Name <> 'int') then raise EROXmlRcpSerializerException.Create('Not an integer');
+    aVal := StrToInt(el.Value);
+  end;
+  case anOrdType of
+    otSByte: ShortInt(Ref) := aVal;
+    otUByte: Byte(Ref) := aVal;
+    otSWord: SmallInt(Ref) := aVal;
+    otUWord: Word(Ref) := aVal;
+    otSLong: Longint(Ref) := aVal;
+    otULong: Cardinal(Ref) := aVal;
+  end;
+end;
+
+procedure TROXmlRpcSerializer.ReadUTF8String(const aName: string; var Ref;
+  ArrayElementId, iMaxLength: integer);
+var
+  el: IXMLNode;
+begin
+  el := GetValueNodeContentsForName(aName);
+  if el = nil then
+  begin
+    UTF8String(ref) := '';
+    exit;
+  end;
+  if el.Name <> 'string' then raise EROXmlRcpSerializerException.Create('Not a string');
+  UTF8String(Ref) := UTF8Encode(el.Value);
+end;
+
+procedure TROXmlRpcSerializer.ReadVariant(const aName: string; var Ref;
+  ArrayElementId: integer);
+begin
+  raise EROXmlRcpSerializerException.Create('Variants not supported by xmlrpc');
+end;
+
+procedure TROXmlRpcSerializer.ReadWideString(const aName: string; var Ref;
+  ArrayElementId, iMaxLength: integer);
+var
+  el: IXMLNode;
+begin
+  el := GetValueNodeContentsForName(aName);
+  if el = nil then
+  begin
+    WideString(Ref) := '';
+    exit;
+  end;
+  if el.Name <> 'string' then raise EROXmlRcpSerializerException.Create('Not a string');
+  WideString(Ref) := el.Value;
+end;
+
+
+destructor TROXmlRpcSerializer.Destroy;
+begin
+  fWriter.Free;
+  inherited Destroy;
+end;
+
+function TROXmlRpcSerializer.PopState: TROXmlRpcState;
+begin
+  if fStateCount = 0 then raise EROXmlRcpSerializerException.Create('Invalid state');
+  Dec(fStateCount);
+  Result := fCurrState;
+  fCurrState := fStates[fStatecount];
+end;
+
+procedure TROXmlRpcSerializer.PushState(aKind: TROXmlRpcState);
+begin
+  if fStateCount = Length(fStates) then
+    SetLength(fStates, Length(FStates) + 4);
+  fStates[fStateCount] := fCurrState;
+  Inc(FStateCount);
+  fCurrState := aKind;
+end;
+
+procedure TROXmlRpcSerializer.BeginValue(aName: string);
+begin
+  case fCurrState of
+    XrsParam: fWriter.WriteStartElement('param');
+    Xrsstruct:
+      begin
+        fWriter.WriteStartElement('member');
+        fWriter.WriteStartElement('name');
+        fWriter.WriteString(aName);
+        fWriter.WriteEndElement;
+      end;
+  end;
+  fWriter.WriteStartElement('value');
+end;
+
+procedure TROXmlRpcSerializer.EndValue;
+begin
+  fWriter.WriteEndElement;
+  case fCurrState of
+    XrsParam,
+    Xrsstruct:
+      fWriter.WriteEndElement; 
+  end;
+end;
+
+function TROXmlRpcSerializer.GetValueNodecontentsForName(
+  const aName: string): IXMLNode;
+begin
+  if fCurrentParamElement = nil then raise EROXmlRcpSerializerException.Create('Invalid state');
+  case fCurrState of
+    XrsArray:
+      begin
+        Result := FirstNonText(fCurrentParamElement.FirstChild);
+        fCurrentParamElement := FirstNonText(fCurrentParamElement.NextSibling);
+      end;
+    XrsParam:
+      begin
+        Result := FirstNonText(fCurrentParamElement.FirstChild);
+        if result = nil then raise EROXmlRcpSerializerException.Create('Invalid state');
+        if result.Name = 'value' then Result := FirstNonText(Result.FirstChild);
+        fCurrentParamElement := FirstNonText(fCurrentParamElement.NextSibling);
+      end;
+    Xrsstruct:
+      begin
+        Result := fCurrentParamElement;
+        if result = nil then raise EROXmlRcpSerializerException.Create('Invalid state');
+        Result := StructGetMember(Result, aName, True);
+        if Result <> nil then Result := FirstNonText(Result.FirstChild);
+      end;
+  end;
+end;
+
+procedure TROXmlRpcSerializer.ReadXml(const aName: String; var Ref;
+  ArrayElementId: Integer);
+var
+  s: WideString;
+  res: IXMLDocument;
+begin
+  ReadWideString(aName, s, ArrayElementID);
+  if s = '' then
+    IXmlNode(Ref) := nil
+  else begin
+    res := NewROXmlDocument;
+    Res.New;
+    Res.XML := s;
+    IXmlNode(Ref) := res.DocumentNode;
+  end;
+end;
+
+procedure TROXmlRpcSerializer.WriteXml(const aName: String; const Ref;
+  ArrayElementId: Integer);
+var
+  s: WideString;
+begin
+  if IXMLNode(Ref) = nil then
+    S := ''
+  else
+    s := IXMLNode(Ref).XML;
+  WriteWideString(aName, s, ArrayElementId);
+end;
+
+procedure TROXmlRpcSerializer.ReadDecimal(const aName: String; var Ref;
+  ArrayElementId: Integer);
+var
+  s: string;
+begin
+   ReadUTF8String(aName, s, ArrayElementId);
+   if DecimalSeparator <> '.' then s := StringReplace(s, '.', DecimalSeparator, []);
+   Variant(Ref) := BCDToVariant(StrToBcd(s));
+end;
+
+procedure TROXmlRpcSerializer.ReadGuid(const aName: String; var Ref;
+  ArrayElementId: Integer);
+var
+  s: string;
+begin
+  ReadUTF8String(aName, s, ArrayElementId);
+  if s = '' then s := '{00000000-0000-0000-0000-000000000000}';
+  if Copy(s,1,1) <> '{' then s := '{'+s+'}';
+  string(Ref) := s;
+end;
+
+procedure TROXmlRpcSerializer.WriteDecimal(const aName: String; const Ref;
+  ArrayElementId: Integer);
+var
+  s: string;
+begin
+  s := BcdToStr(VariantToBCD(variant(Ref)));
+  if DecimalSeparator <> '.' then s := StringReplace(s, DecimalSeparator, '.', []); // delphi has no way to format a bcd with a specific format
+  WriteUTF8String(aName, s, ArrayElementId);
+end;
+
+procedure TROXmlRpcSerializer.WriteGuid(const aName: String; const Ref;
+  ArrayElementId: Integer);
+var
+  s: string;
+begin
+  s := GuidToString(StringToGUID(string(Ref)));
+  s := copy(s,2,length(s) -2); // remove curlies
+  WriteUTF8String(aName, s, ArrayElementId);
+end;
+
+
+procedure TROXmlRpcSerializer.ReadBinary(const aName: string; var Ref;
+  ArrayElementId: integer);
+var
+  obj: Binary absolute ref;
+  el: IXMLNode;
+  tmpstream: Binary;
+begin
+  el := GetValueNodecontentsForName(aName);
+  if el = nil then
+  begin
+    Obj := nil;
+    exit;
+  end;
+  if el.Name <> 'base64' then raise EROXmlRcpSerializerException.Create('Not a base64 block');
+  Obj := TROBinaryMemoryStream.Create;
+  tmpstream := TROBinaryMemoryStream.Create(UTF8Encode(el.Value));
+  try
+    DecodeStream(tmpstream, obj);
+    obj.Position := 0;
+  finally
+    tmpstream.Free;
+  end;
+end;
+
+
+procedure TROXmlRpcSerializer.WriteBinary(const aName: string; const Ref;
+  ArrayElementId: integer);
+var
+  obj: Binary absolute Ref;
+  lTemp: Binary;
+begin
+  if not assigned(obj) then raise EROXmlRcpSerializerException.Create('Nil objects not supported by xmlrpc');
+  BeginValue(aName);
+  fWriter.WriteStartElement('base64');
+  // write binary
+  lTemp := Binary.Create;
+  try
+    obj.Seek(0, soFromBeginning);
+    EncodeStream(obj, lTemp);
+    fWriter.WriteAnsiString(lTemp.ToString);
+  finally
+    lTemp.Free;
+  end;
+  // endwriteobject
+  fWriter.WriteEndElement;
+  EndValue;
+end;
+
+
+function TROXmlRpcSerializer.ReadArray(const aName: string; aClass: TClass;
+  var Ref; ArrayElementId: integer): Boolean;
+var
+  obj : TROArray absolute Ref;
+  el,
+  tmp: IXMLNode;
+//  ci: Integer;
+//  itemref: Pointer;
+begin
+  Result:=True;
+  obj := TROArrayClass(aClass).Create;
+  el := GetValueNodeContentsForName(aName);
+  if el = nil then
+  begin
+    obj := nil;
+    exit;
+  end;
+  if el.Name <> 'array' then raise EROXmlRcpSerializerException.Create('Not at array');
+  el := FirstNonText(el.FirstChild);
+  if el.Name <> 'data' then raise EROXmlRcpSerializerException.Create('Not an array');
+  tmp := fCurrentParamElement;
+  fCurrentParamElement := FirstNonText(el.FirstChild);
+  PushState(XrsArray);
+
+  obj.Resize(el.ChildrenCount); // might differ if there are junk entries
+(*
+  ci := 0;
+  while fCurrentParamElement <> nil do begin
+    if obj.GetItemClass <> nil then begin
+      itemref := nil;
+      Read(RO_ArrayItemName, obj.GetItemType, itemref, ci);
+      obj.SetItemRef(ci, itemref);
+    end else begin
+      itemref := obj.GetItemRef(ci);
+      Read(RO_ArrayItemName, obj.GetItemType, itemref^, ci);
+    end;
+    inc(ci);
+  end;
+  if ci <> el.ChildrenCount then obj.Resize(ci);
+*)
+  obj.ReadComplex(Self);
+  if PopState <> XrsArray then raise EROXmlRcpSerializerException.Create('Invalid state');
+  fCurrentParamElement := tmp;
+end;
+
+function TROXmlRpcSerializer.ReadStruct(const aName: string;
+  aClass: TClass; var Ref; ArrayElementId: integer): Boolean;
+var
+  obj : TROComplexType absolute Ref;
+  el: IXMLNode;
+begin
+  Result:=True;
+  obj := TROComplexTypeClass(aClass).Create;
+  el :=GetValueNodeContentsForName(aName);
+  if el = nil then
+  begin
+    obj := nil;
+    exit;
+  end;
+//  if (el = nil) or (el.Name <> 'struct') then raise EROXmlRcpSerializerException.Create('Not a struct');
+  if el.Name <> 'struct' then raise EROXmlRcpSerializerException.Create('Not a struct');
+  PushState(Xrsstruct);
+  fCurrentParamElement := el;
+  Obj.ReadComplex(Self);
+  el := fCurrentParamElement;
+  if (el = nil) or (el.Name <> 'struct') or (PopState() <> Xrsstruct)then raise EROXmlRcpSerializerException.Create('Invalid state');
+  case fCurrState of
+    XrsArray:
+      el := el.Parent;
+    XrsParam:
+      el := el.Parent.Parent;
+    Xrsstruct:
+      el := el.Parent.Parent.Parent;
+  end;
+  if fCurrState = Xrsstruct then
+    fCurrentParamElement := el
+  else
+    fCurrentParamElement := FirstNonText(el.NextSibling);
+end;
+
+procedure TROXmlRpcSerializer.WriteArray(const aName: string; const Ref; aClass: TClass; 
+  ArrayElementId: integer);
+var
+  obj : TROArray absolute Ref;
+begin
+  if not assigned(obj) then raise EROXmlRcpSerializerException.Create('Nil objects not supported by xmlrpc');
+  BeginValue(aName);
+  fWriter.WriteStartElement('array');
+  PushState(XrsArray);
+  fWriter.WriteStartElement('data');
+  obj.WriteComplex(Self);
+  fWriter.WriteEndElement;
+  fWriter.WriteEndElement;
+  if PopState <> xrsArray then raise EROXmlRcpSerializerException.Create('Invalid state');
+  EndValue;
+end;
+
+procedure TROXmlRpcSerializer.WriteStruct(const aName: string; const Ref; aClass: TClass; 
+  ArrayElementId: integer);
+var
+  obj : TROComplexType absolute Ref;
+begin
+  if not assigned(obj) then raise EROXmlRcpSerializerException.Create('Nil objects not supported by xmlrpc');
+  BeginValue(aName);
+  fWriter.WriteStartElement('struct');
+  PushState(Xrsstruct);
+  obj.WriteComplex(Self);
+  if PopState <> Xrsstruct then raise EROXmlRcpSerializerException.Create('Invalid state');
+  fWriter.WriteEndElement;
+  EndValue;
+end;
+
+procedure TROXmlRpcSerializer.ReadException(const aName: string; var Ref;
+  ArrayElementId: integer);
+begin
+// not used
+end;
+
+procedure TROXmlRpcSerializer.WriteException(const aName: string;
+  const Ref; ArrayElementId: integer);
+begin
+// not used
+end;
+
+procedure TROXmlRpcSerializer.WriteAnsiString(const aName: string;
+  const Ref; ArrayElementId: integer);
+begin
+  BeginValue(aName);
+  fWriter.WriteStartElement('string');
+  fWriter.WriteString(AnsiStringToWideString(AnsiString(Ref)));
+  fWriter.WriteEndElement;
+  EndValue;
+end;
+
+procedure TROXmlRpcSerializer.ReadAnsiString(const aName: string; var Ref;
+  ArrayElementId, iMaxLength: integer);
+var
+  el: IXMLNode;
+begin
+  el := GetValueNodeContentsForName(aName);
+//  if el = nil then raise EROXmlRcpSerializerException.Create('Not a string');
+  if el = nil then
+  begin
+    AnsiString(Ref) := '';
+    exit;
+  end;
+  if el.Name <> 'string' then raise EROXmlRcpSerializerException.Create('Not a string');
+  AnsiString(Ref) := VarToAnsiStr(el.Value);
+end;
+
+{ TROSimpleXmlWriter }
+
+constructor TROSimpleXmlWriter.Create;
+begin
+  inherited Create;
+  fElementStack := TStringList.Create;
+  fOutput := TMemoryStream.Create;
+end;
+
+destructor TROSimpleXmlWriter.Destroy;
+begin
+  fOutput.Free;
+  fElementStack.Free;
+  inherited;
+end;
+
+procedure TROSimpleXmlWriter.SaveToStream(aDest: TStream);
+begin
+  if not fFinished then raise EROXmlRcpSerializerException.Create('XmlDocument not finished yet');
+  fOutput.Position := 0;
+  fOutput.SaveToStream(aDest);
+end;
+
+
+procedure TROSimpleXmlWriter.WriteAnsiString(const aValue: AnsiString);
+var
+  lInputValue: AnsiString;
+  lCurrPos, i: Integer;
+  lRealString: AnsiString;
+begin
+  lInputValue := aValue;
+  if fFinished then raise EROXmlRcpSerializerException.Create('XmlDocument already finished');
+  if fElementStack.Count = 0 then raise EROXmlRcpSerializerException.Create('Root element missing');
+  SetLength(lRealString, Length(lInputValue) + 16);
+  lCurrPos := 0;
+  for i :=  1 to length(lInputValue) do
+  begin
+    case lInputValue[i] of
+      '<':
+        begin
+          if lCurrPos + 4 > Length(lRealString) then
+            SetLength(lRealString, lCurrPos + 16 + 4);
+          lRealString[lCurrPos + 1] := '&';
+          lRealString[lCurrPos + 2] := 'l';
+          lRealString[lCurrPos + 3] := 't';
+          lRealString[lCurrPos + 4] := ';';
+          inc(lCurrPos, 4);
+        end;
+      '>':
+        begin
+          if lCurrPos + 4 > Length(lRealString) then
+            SetLength(lRealString, lCurrPos + 16 + 4);
+          lRealString[lCurrPos + 1] := '&';
+          lRealString[lCurrPos + 2] := 'g';
+          lRealString[lCurrPos + 3] := 't';
+          lRealString[lCurrPos + 4] := ';';
+          inc(lCurrPos, 4);
+        end;
+      '&':
+        begin
+          if lCurrPos + 5 > Length(lRealString) then
+            SetLength(lRealString, lCurrPos + 16 + 5);
+          lRealString[lCurrPos + 1] := '&';
+          lRealString[lCurrPos + 2] := 'a';
+          lRealString[lCurrPos + 3] := 'm';
+          lRealString[lCurrPos + 4] := 'p';
+          lRealString[lCurrPos + 5] := ';';
+          inc(lCurrPos, 5);
+        end;
+      '"':
+        begin
+          if lCurrPos + 6 > Length(lRealString) then
+            SetLength(lRealString, lCurrPos + 16 + 6);
+          lRealString[lCurrPos + 1] := '&';
+          lRealString[lCurrPos + 2] := 'q';
+          lRealString[lCurrPos + 3] := 'u';
+          lRealString[lCurrPos + 4] := 'o';
+          lRealString[lCurrPos + 5] := 't';
+          lRealString[lCurrPos + 6] := ';';
+          inc(lCurrPos, 6);
+        end;
+      else
+      begin
+        if lCurrPos + 1 > Length(lRealString) then
+          SetLength(lRealString, lCurrPos + 16 + 1);
+        Inc(lCurrPos);
+        lRealString[lCurrPos] := lInputValue[i];
+      end;
+    end;
+  end;
+  SetLength(lRealString, lCurrPos);
+  WriteRawAnsiString(lRealString);
+end;
+
+procedure TROSimpleXmlWriter.WriteEndElement;
+begin
+  if fFinished then raise EROXmlRcpSerializerException.Create('XmlDocument already finished');
+  if fElementStack.Count = 0 then raise EROXmlRcpSerializerException.Create('Root element missing');
+  WriteRawString('</' + fElementStack[fElementStack.Count -1] + '>');
+  fElementStack.Delete(fElementStack.Count -1);
+  if fElementStack.Count = 0 then fFinished := true;
+end;
+
+procedure TROSimpleXmlWriter.WriteRawAnsiString(const s: Ansistring);
+begin
+  if s <> '' then
+    fOutput.Write(s[1], Length(s));
+end;
+
+procedure TROSimpleXmlWriter.WriteRawString(const s: string);
+begin
+  WriteRawAnsiString(UTF8Encode(s));
+end;
+
+procedure TROSimpleXmlWriter.WriteStartElement(const aElementName: string);
+begin
+  if fFinished then raise EROXmlRcpSerializerException.Create('XmlDocument already finished');
+  fElementStack.Add(aElementName);
+  WriteRawString('<' + aElementName + '>');
+end;
+
+procedure TROSimpleXmlWriter.WriteString(const aValue: WideString);
+begin
+  WriteAnsiString(UTF8Encode(aValue));
+end;
+
+initialization
+  RegisterMessageClass(TROXmlRpcMessage);
+finalization
+  UnregisterMessageClass(TROXmlRpcMessage);
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/$svclibname.rodl b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/$svclibname.rodl
new file mode 100644
index 0000000..08a3a3a
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/$svclibname.rodl	
@@ -0,0 +1,25 @@
+<Library Name="$SVCLIBNAME" UID="$NEWID" Documentation="">
+   <Services>
+      <Service Name="$SVCNAME" UID="$NEWID">
+        <Interfaces>
+           <Interface Name="Default" UID="$NEWID" Documentation="Service $SVCNAME. This service has been automatically generated using the RODL template you can find in the Templates directory.">
+      <Operations>
+         <Operation Name="Sum" UID="$NEWID" Documentation="">
+      <Parameters>
+         <Parameter Name="A" DataType="Integer" Flag="In" />
+         <Parameter Name="B" DataType="Integer" Flag="In" />
+         <Parameter Name="Result" DataType="Integer" Flag="Result" />
+      </Parameters>
+         </Operation>
+         <Operation Name="GetServerTime" UID="$NEWID" Documentation="">
+      <Parameters>
+         <Parameter Name="Result" DataType="DateTime" Flag="Result" />
+      </Parameters>
+         </Operation>
+      </Operations>
+
+           </Interface> 
+        </Interfaces>
+      </Service>
+   </Services>
+</Library>
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/Config.ini b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/Config.ini
new file mode 100644
index 0000000..305a6ad
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/Config.ini	
@@ -0,0 +1,6 @@
+[Project Generation]
+SvcLibName=NewLibrary
+SvcName=NewService
+PrjName=NewProject
+PrjDir=
+CreateClientAndGroup=TRUE
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/$LIBRARYNAME.RODL b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/$LIBRARYNAME.RODL
new file mode 100644
index 0000000..4de5a25
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/$LIBRARYNAME.RODL	
@@ -0,0 +1,15 @@
+<Library Name="$LIBRARYNAME" UID="$NEWID">
+  <Services>
+    <Service Name="$SVCNAME" UID="$NEWID" Ancestor="DataAbstractService">
+      <Interfaces>
+         <Interface Name="Default" UID="$NEWID">
+            <Operations>
+            </Operations>
+         </Interface>
+      </Interfaces>
+    </Service>
+  </Services>
+  <Uses>
+     <Use Name="DataAbstract" UID="$NEWID" Rodl="$(Data Abstract for Delphi)\Source\DataAbstract4.RODL" />
+  </Uses>
+</Library>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/$PRJNAME.dpr b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/$PRJNAME.dpr
new file mode 100644
index 0000000..552810c
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/$PRJNAME.dpr	
@@ -0,0 +1,23 @@
+program $PRJNAME;
+
+{#ROGEN:$LIBRARYNAME.RODL} // RemObjects SDK: Careful, do not remove!
+
+uses
+  uROComInit,
+  Forms,
+  MidasLib,
+  fMainForm in 'fMainForm.pas' {Form1},
+  $SERVICENAME_Impl in '$SERVICENAME_Impl.pas' {$SERVICENAME: TDARemoteService},
+  fServerDataModule in 'fServerDataModule.pas' {ServerDataModule: TDataModule},
+  fClientDataModule in 'fClientDataModule.pas' {ClientDataModule: TDataModule};
+
+{$R *.res}
+{$R RODLFile.res}
+
+begin
+  Application.Initialize;
+  Application.CreateForm(TForm1, Form1);
+  Application.CreateForm(TServerDataModule, ServerDataModule);
+  Application.CreateForm(TClientDataModule, ClientDataModule);
+  Application.Run;
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/$PRJNAME.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/$PRJNAME.res
new file mode 100644
index 0000000..dc22e33
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/$PRJNAME.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/$SERVICENAME_Impl.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/$SERVICENAME_Impl.dfm
new file mode 100644
index 0000000..78e0cb2
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/$SERVICENAME_Impl.dfm	
@@ -0,0 +1,23 @@
+object $SERVICENAME: T$SERVICENAME
+  AcquireConnection = True
+  OldCreateOrder = True
+  ServiceSchema = Schema
+  ServiceDataStreamer = DataStreamer
+  SessionManager = ServerDataModule.SessionManager
+  Left = 357
+  Top = 213
+  Height = 212
+  Width = 216
+  object DataStreamer: TDABin2DataStreamer
+    Left = 32
+    Top = 8
+  end
+  object Schema: TDASchema
+    ConnectionManager = ServerDataModule.ConnectionManager
+    DataDictionary = ServerDataModule.DataDictionary
+    Datasets = <>
+    Commands = <>
+    Left = 32
+    Top = 56
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/$SERVICENAME_Impl.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/$SERVICENAME_Impl.pas
new file mode 100644
index 0000000..4c0b493
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/$SERVICENAME_Impl.pas	
@@ -0,0 +1,37 @@
+unit $SERVICENAME_Impl;
+
+interface
+
+uses
+  {vcl:} Classes, SysUtils, 
+  {RemObjects:} uROClientIntf, uROTypes, uROServer, uROServerIntf, uROSessions, uRORemoteDataModule,
+  {Data Abstract:} uDAClasses, uDADataTable, uDABin2DataStreamer, uDAInterfaces, uDABusinessProcessor,
+  {Ancestor Implementation:} DataAbstractService_Impl,
+  {Used RODLs:} DataAbstract4_Intf,
+  {Generated:} $LIBRARYNAME_Intf;
+
+type
+  { T$SERVICENAME }
+  T$SERVICENAME = class(TDataAbstractService, I$SERVICENAME)
+    DataStreamer: TDABin2DataStreamer;
+    Schema: TDASchema;
+  private
+  protected
+    { I$SERVICENAME methods }
+  end;
+
+implementation
+
+{$R *.dfm}
+uses
+  {Generated:} $LIBRARYNAME_Invk, fServerDataModule;
+
+procedure Create_$SERVICENAME(out anInstance: IUnknown);
+begin
+  anInstance := T$SERVICENAME.Create(nil);
+end;
+
+initialization
+  TROClassFactory.Create('$SERVICENAME', Create_$SERVICENAME, T$SERVICENAME_Invoker);
+finalization
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/Icon.ico b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/Icon.ico
new file mode 100644
index 0000000..18b790e
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/Icon.ico differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/Info.ini b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/Info.ini
new file mode 100644
index 0000000..d84647a
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/Info.ini	
@@ -0,0 +1,6 @@
+[Information]
+Name=Local Application
+Description=Client and Server in one application
+FixedServer=TROLocalServer
+AllowClient=0
+Wizard=DAGuideWizard-Local
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/fClientDataModule.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/fClientDataModule.dfm
new file mode 100644
index 0000000..92d84df
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/fClientDataModule.dfm	
@@ -0,0 +1,35 @@
+object ClientDataModule: TClientDataModule
+  OldCreateOrder = False
+  Left = 439
+  Top = 220
+  Height = 300
+  Width = 300
+  object ROMessage: TRO$MSGCLSNAME
+    Left = 40
+    Top = 8
+  end
+  object ROChannel: TROLocalChannel
+    ServerLocators = <>
+    DispatchOptions = []
+    ServerChannel = ServerDataModule.ROServer
+    Left = 40
+    Top = 52
+  end
+  object RemoteService: TRORemoteService
+    Message = ROMessage
+    Channel = ROChannel
+    ServiceName = '$SERVICENAME'
+    Left = 40
+    Top = 96
+  end
+  object DataStreamer: TDABin2DataStreamer
+    Left = 40
+    Top = 140
+  end
+  object RemoteDataAdapter: TDARemoteDataAdapter
+    Left = 40
+    Top = 184
+    DataStreamer = DataStreamer
+    RemoteService = RemoteService
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/fClientDataModule.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/fClientDataModule.pas
new file mode 100644
index 0000000..190417f
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/fClientDataModule.pas	
@@ -0,0 +1,32 @@
+unit fClientDataModule;
+
+interface
+
+uses
+  {vcl:} SysUtils, Classes, DB, DBClient, 
+  {RemObjects:} uROClient, uROClientIntf, uRORemoteService, $MESSAGEUNIT, uROLocalChannel,
+  {Data Abstract:} uDADataTable, uDABINAdapter, uDAInterfaces, uDABin2DataStreamer, uDARemoteDataAdapter;
+
+type
+  TClientDataModule = class(TDataModule)
+    ROMessage: TRO$MSGCLSNAME;
+    ROChannel: TROLocalChannel;
+    RemoteService: TRORemoteService;
+    DataStreamer: TDABin2DataStreamer;
+    RemoteDataAdapter: TDARemoteDataAdapter;
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+var
+  ClientDataModule: TClientDataModule;
+
+implementation
+
+uses fServerDataModule;
+
+{$R *.dfm}
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/fMainForm.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/fMainForm.dfm
new file mode 100644
index 0000000..f7ffb67
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/fMainForm.dfm	
@@ -0,0 +1,24 @@
+object Form1: TForm1
+  Left = 192
+  Top = 114
+  Width = 236
+  Height = 99
+  Caption = 'Data Abstract Local Application'
+  Color = clBtnFace
+  Font.Charset = DEFAULT_CHARSET
+  Font.Color = clWindowText
+  Font.Height = -11
+  Font.Style = []
+  ParentFont = True
+  OldCreateOrder = False
+  PixelsPerInch = 96
+  TextHeight = 13
+  object DAPoweredByDataAbstractButton1: TDAPoweredByDataAbstractButton
+    Left = 8
+    Top = 8
+    Width = 212
+    Height = 48
+    Cursor = crHandPoint
+    ApplicationType = atClient
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/fMainForm.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/fMainForm.pas
new file mode 100644
index 0000000..0c2d4a2
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/fMainForm.pas	
@@ -0,0 +1,28 @@
+unit fMainForm;
+
+interface
+
+uses
+  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
+  Dialogs, uDAPoweredByDataAbstractButton;
+
+type
+  TForm1 = class(TForm)
+    DAPoweredByDataAbstractButton1: TDAPoweredByDataAbstractButton;
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+var
+  Form1: TForm1;
+
+implementation
+  
+uses
+  fClientDataModule;
+  
+{$R *.dfm}
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/fServerDataModule.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/fServerDataModule.dfm
new file mode 100644
index 0000000..e3f1196
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/fServerDataModule.dfm	
@@ -0,0 +1,58 @@
+object ServerDataModule: TServerDataModule
+  OldCreateOrder = False
+  Left = 362
+  Top = 208
+  Height = 207
+  Width = 352
+  object ROMessage: TRO$MSGCLSNAME
+    Left = 32
+    Top = 8
+  end
+  object ROServer: TROLocalServer
+    Active = True
+    Dispatchers = <
+      item
+        Name = 'ROMessage'
+        Message = ROMessage
+        Enabled = True
+      end>
+    Left = 32
+    Top = 56
+  end
+  object ConnectionManager: TDAConnectionManager
+    MaxPoolSize = 10
+    PoolTimeoutSeconds = 60
+    PoolBehaviour = pbWait
+    WaitIntervalSeconds = 1
+    Connections = <>
+    DriverManager = DriverManager
+    PoolingEnabled = True
+    Left = 136
+    Top = 56
+  end
+  object DriverManager: TDADriverManager
+    DriverDirectory = '%SYSTEM%\'
+    AutoLoad = False
+    TraceActive = False
+    TraceFlags = []
+    Left = 136
+    Top = 10
+  end
+  object ADODriver: TDAADODriver
+    Left = 256
+    Top = 8
+  end
+  object IBXDriver: TDAIBXDriver
+    Left = 256
+    Top = 56
+  end
+  object DataDictionary: TDADataDictionary
+    Fields = <>
+    Left = 32
+    Top = 104
+  end
+  object SessionManager: TROInMemorySessionManager
+    Left = 136
+    Top = 104
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/fServerDataModule.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/fServerDataModule.pas
new file mode 100644
index 0000000..6e5e590
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/LOCAL/fServerDataModule.pas	
@@ -0,0 +1,35 @@
+unit fServerDataModule;
+
+interface
+
+uses
+  SysUtils, Classes, uROClient, uROServer, uROLocalServer,
+  $MESSAGEUNIT,
+  uDAEngine, uDADriverManager, uDAClasses, uROSessions,
+  uDAIBXDriver, uDAADODriver;
+
+
+type
+  TServerDataModule = class(TDataModule)
+    ROMessage: TRO$MSGCLSNAME;
+    ROServer: TROLocalServer;
+    ConnectionManager: TDAConnectionManager;
+    DriverManager: TDADriverManager;
+    ADODriver: TDAADODriver;
+    IBXDriver: TDAIBXDriver;
+    DataDictionary: TDADataDictionary;
+    SessionManager: TROInMemorySessionManager;
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+var
+  ServerDataModule: TServerDataModule;
+
+implementation
+
+{$R *.dfm}
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/$LIBRARYNAME.RODL b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/$LIBRARYNAME.RODL
new file mode 100644
index 0000000..4de5a25
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/$LIBRARYNAME.RODL	
@@ -0,0 +1,15 @@
+<Library Name="$LIBRARYNAME" UID="$NEWID">
+  <Services>
+    <Service Name="$SVCNAME" UID="$NEWID" Ancestor="DataAbstractService">
+      <Interfaces>
+         <Interface Name="Default" UID="$NEWID">
+            <Operations>
+            </Operations>
+         </Interface>
+      </Interfaces>
+    </Service>
+  </Services>
+  <Uses>
+     <Use Name="DataAbstract" UID="$NEWID" Rodl="$(Data Abstract for Delphi)\Source\DataAbstract4.RODL" />
+  </Uses>
+</Library>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/$PRJNAME.dpr b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/$PRJNAME.dpr
new file mode 100644
index 0000000..1c43250
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/$PRJNAME.dpr	
@@ -0,0 +1,27 @@
+program $PRJNAME;
+
+{#ROGEN:$LIBRARYNAME.RODL} // RemObjects SDK: Careful, do not remove!
+
+uses
+  uROComInit,
+  uROComboService,
+  Forms,
+  fServerForm in 'fServerForm.pas' {ServerForm},
+  $SERVICENAME_Impl in '$SERVICENAME_Impl.pas' {$SERVICENAME: TDARemoteService},
+  fServerDataModule in 'fServerDataModule.pas' {ServerDataModule: TDataModule};
+
+{$R *.res}
+{$R RODLFile.res}
+
+begin
+  if ROStartService('$PRJNAME', '$PRJNAME') then begin
+    ROService.CreateForm(TServerDataModule, ServerDataModule);
+    ROService.Run;
+    Exit;
+  end;
+
+  Application.Initialize;
+  Application.CreateForm(TServerDataModule, ServerDataModule);
+  Application.CreateForm(TServerForm, ServerForm);
+  Application.Run;
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/$PRJNAME.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/$PRJNAME.res
new file mode 100644
index 0000000..dc22e33
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/$PRJNAME.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/$SERVICENAME_Impl.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/$SERVICENAME_Impl.dfm
new file mode 100644
index 0000000..78e0cb2
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/$SERVICENAME_Impl.dfm	
@@ -0,0 +1,23 @@
+object $SERVICENAME: T$SERVICENAME
+  AcquireConnection = True
+  OldCreateOrder = True
+  ServiceSchema = Schema
+  ServiceDataStreamer = DataStreamer
+  SessionManager = ServerDataModule.SessionManager
+  Left = 357
+  Top = 213
+  Height = 212
+  Width = 216
+  object DataStreamer: TDABin2DataStreamer
+    Left = 32
+    Top = 8
+  end
+  object Schema: TDASchema
+    ConnectionManager = ServerDataModule.ConnectionManager
+    DataDictionary = ServerDataModule.DataDictionary
+    Datasets = <>
+    Commands = <>
+    Left = 32
+    Top = 56
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/$SERVICENAME_Impl.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/$SERVICENAME_Impl.pas
new file mode 100644
index 0000000..4c0b493
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/$SERVICENAME_Impl.pas	
@@ -0,0 +1,37 @@
+unit $SERVICENAME_Impl;
+
+interface
+
+uses
+  {vcl:} Classes, SysUtils, 
+  {RemObjects:} uROClientIntf, uROTypes, uROServer, uROServerIntf, uROSessions, uRORemoteDataModule,
+  {Data Abstract:} uDAClasses, uDADataTable, uDABin2DataStreamer, uDAInterfaces, uDABusinessProcessor,
+  {Ancestor Implementation:} DataAbstractService_Impl,
+  {Used RODLs:} DataAbstract4_Intf,
+  {Generated:} $LIBRARYNAME_Intf;
+
+type
+  { T$SERVICENAME }
+  T$SERVICENAME = class(TDataAbstractService, I$SERVICENAME)
+    DataStreamer: TDABin2DataStreamer;
+    Schema: TDASchema;
+  private
+  protected
+    { I$SERVICENAME methods }
+  end;
+
+implementation
+
+{$R *.dfm}
+uses
+  {Generated:} $LIBRARYNAME_Invk, fServerDataModule;
+
+procedure Create_$SERVICENAME(out anInstance: IUnknown);
+begin
+  anInstance := T$SERVICENAME.Create(nil);
+end;
+
+initialization
+  TROClassFactory.Create('$SERVICENAME', Create_$SERVICENAME, T$SERVICENAME_Invoker);
+finalization
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/Icon.ico b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/Icon.ico
new file mode 100644
index 0000000..017fa49
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/Icon.ico differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/Info.ini b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/Info.ini
new file mode 100644
index 0000000..52dfadc
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/Info.ini	
@@ -0,0 +1,6 @@
+[Information]
+Name=Combo Server
+Description=Data Abstract VCL Based Combo Server
+InvalidServers=TROWebBrokerServer,TROLocalServer,TROWinMessageServer
+DefaultServer=TROIndyHTTPServer
+Wizard=DAGuideWizard
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/_Client/$PRJNAMEClient.dpr b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/_Client/$PRJNAMEClient.dpr
new file mode 100644
index 0000000..f1357b8
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/_Client/$PRJNAMEClient.dpr	
@@ -0,0 +1,17 @@
+program $PRJNAMEClient;
+
+uses
+  uROComInit,
+  Forms,
+  MidasLib,
+  fClientForm in 'fClientForm.pas' {ClientForm},
+  fClientDataModule in 'fClientDataModule.pas' {ClientDataModule: TDAClientDataModule};
+
+{$R *.res}
+
+begin
+  Application.Initialize;
+  Application.CreateForm(TClientDataModule, ClientDataModule);
+  Application.CreateForm(TClientForm, ClientForm);
+  Application.Run;
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/_Client/$PRJNAMEClient.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/_Client/$PRJNAMEClient.res
new file mode 100644
index 0000000..a8142cb
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/_Client/$PRJNAMEClient.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/_Client/$PRJNAMEGroup.bpg b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/_Client/$PRJNAMEGroup.bpg
new file mode 100644
index 0000000..b93564d
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/_Client/$PRJNAMEGroup.bpg	
@@ -0,0 +1,21 @@
+#------------------------------------------------------------------------------
+VERSION = BWS.01
+#------------------------------------------------------------------------------
+!ifndef ROOT
+ROOT = $(MAKEDIR)\..
+!endif
+#------------------------------------------------------------------------------
+MAKE = $(ROOT)\bin\make.exe -$(MAKEFLAGS) -f$**
+DCC = $(ROOT)\bin\dcc32.exe $**
+BRCC = $(ROOT)\bin\brcc32.exe $**
+#------------------------------------------------------------------------------
+PROJECTS = $PRJNAME.exe $PRJNAMEClient.exe 
+#------------------------------------------------------------------------------
+default: $(PROJECTS)
+#------------------------------------------------------------------------------
+
+$PRJNAME.exe: $PRJNAME.dpr
+  $(DCC)
+
+$PRJNAMEClient.exe: $PRJNAMEClient.dpr
+  $(DCC)
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/_Client/fClientDataModule.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/_Client/fClientDataModule.dfm
new file mode 100644
index 0000000..e214225
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/_Client/fClientDataModule.dfm	
@@ -0,0 +1,32 @@
+object ClientDataModule: TClientDataModule
+  OldCreateOrder = True
+  Left = 439
+  Top = 220
+  Height = 300
+  Width = 300
+  object Channel: TRO$CHNCLSNAME
+    Left = 40
+    Top = 8
+  end
+  object Message: TRO$MSGCLSNAME
+    Left = 40
+    Top = 52
+  end
+  object RemoteService: TRORemoteService
+    Message = Message
+    Channel = Channel
+    ServiceName = '$SERVICENAME'
+    Left = 40
+    Top = 96
+  end
+  object DataStreamer: TDABin2DataStreamer
+    Left = 40
+    Top = 140
+  end
+  object RemoteDataAdapter: TDARemoteDataAdapter
+    Left = 40
+    Top = 184
+    DataStreamer = DataStreamer
+    RemoteService = RemoteService
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/_Client/fClientDataModule.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/_Client/fClientDataModule.pas
new file mode 100644
index 0000000..22ae607
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/_Client/fClientDataModule.pas	
@@ -0,0 +1,30 @@
+unit fClientDataModule;
+
+interface
+
+uses 
+  {vcl:} SysUtils, Classes, DB, DBClient, 
+  {RemObjects:} uROClient, uROClientIntf, uRORemoteService, $MESSAGEUNIT, $CHANNELUNIT, 
+  {Data Abstract:} uDADataTable, uDABin2DataStreamer, uDAInterfaces, uDARemoteDataAdapter;
+
+type
+  TClientDataModule = class(TDataModule)
+    Message: TRO$MSGCLSNAME;
+    Channel: TRO$CHNCLSNAME;
+    RemoteService: TRORemoteService;
+    DataStreamer: TDABin2DataStreamer;
+    RemoteDataAdapter: TDARemoteDataAdapter;
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+var
+  ClientDataModule: TClientDataModule;
+
+implementation
+
+{$R *.dfm}
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/_Client/fClientForm.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/_Client/fClientForm.dfm
new file mode 100644
index 0000000..4fc26ce
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/_Client/fClientForm.dfm	
@@ -0,0 +1,17 @@
+object ClientForm: TClientForm
+  Left = 372
+  Top = 277
+  Width = 334
+  Height = 207
+  Caption = 'Data Abstract Client'
+  Color = clBtnFace
+  Font.Charset = DEFAULT_CHARSET
+  Font.Color = clWindowText
+  Font.Height = -11
+  Font.Style = []
+  ParentFont = True
+  OldCreateOrder = False
+  Position = poScreenCenter
+  PixelsPerInch = 96
+  TextHeight = 13
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/_Client/fClientForm.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/_Client/fClientForm.pas
new file mode 100644
index 0000000..c79fedc
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/_Client/fClientForm.pas	
@@ -0,0 +1,27 @@
+unit fClientForm;
+
+interface
+
+uses
+  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls,
+  uROClient, uROClientIntf, uRORemoteService, uROBinMessage;
+
+type
+  TClientForm = class(TForm)
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+var
+  ClientForm: TClientForm;
+
+implementation
+
+uses
+  fClientDataModule;  
+  
+{$R *.dfm}
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/fServerDataModule.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/fServerDataModule.dfm
new file mode 100644
index 0000000..12f39a8
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/fServerDataModule.dfm	
@@ -0,0 +1,58 @@
+object ServerDataModule: TServerDataModule
+  OldCreateOrder = False
+  OnCreate = DataModuleCreate
+  Left = 362
+  Top = 208
+  Height = 207
+  Width = 352
+  object Server: TRO$SRVCLSNAME
+    Dispatchers = <
+      item
+        Name = 'Message'
+        Message = Message
+        Enabled = True
+      end>
+    Left = 32
+    Top = 8
+  end
+  object Message: TRO$MSGCLSNAME
+    Left = 32
+    Top = 56
+  end
+  object ConnectionManager: TDAConnectionManager
+    MaxPoolSize = 10
+    PoolTimeoutSeconds = 60
+    PoolBehaviour = pbWait
+    WaitIntervalSeconds = 1
+    Connections = <>
+    DriverManager = DriverManager
+    PoolingEnabled = True
+    Left = 136
+    Top = 56
+  end
+  object DriverManager: TDADriverManager
+    DriverDirectory = '%SYSTEM%\'
+    AutoLoad = False
+    TraceActive = False
+    TraceFlags = []
+    Left = 136
+    Top = 10
+  end
+  object ADODriver: TDAADODriver
+    Left = 256
+    Top = 8
+  end
+  object IBXDriver: TDAIBXDriver
+    Left = 256
+    Top = 56
+  end
+  object DataDictionary: TDADataDictionary
+    Fields = <>
+    Left = 32
+    Top = 104
+  end
+  object SessionManager: TROInMemorySessionManager
+    Left = 136
+    Top = 104
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/fServerDataModule.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/fServerDataModule.pas
new file mode 100644
index 0000000..82fe052
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/fServerDataModule.pas	
@@ -0,0 +1,42 @@
+unit fServerDataModule;
+
+interface
+
+uses
+  SysUtils, Classes,
+  uROClient, uROPoweredByRemObjectsButton, uROClientIntf, uROServer,
+  $MESSAGEUNIT, $SERVERUNIT,
+  uDAEngine, uDADriverManager, uDAClasses, uROSessions,
+  uDAIBXDriver, uDAADODriver;
+
+type
+  TServerDataModule = class(TDataModule)
+    Server: TRO$SRVCLSNAME;
+    Message: TRO$MSGCLSNAME;
+    ConnectionManager: TDAConnectionManager;
+    DriverManager: TDADriverManager;
+    ADODriver: TDAADODriver;
+    IBXDriver: TDAIBXDriver;
+    DataDictionary: TDADataDictionary;
+    SessionManager: TROInMemorySessionManager;
+    
+    procedure DataModuleCreate(Sender: TObject);
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+var
+  ServerDataModule: TServerDataModule;
+
+implementation
+
+{$R *.dfm}
+
+procedure TServerDataModule.DataModuleCreate(Sender: TObject);
+begin
+  Server.Active := true;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/fServerForm.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/fServerForm.dfm
new file mode 100644
index 0000000..77cfe95
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/fServerForm.dfm	
@@ -0,0 +1,23 @@
+object ServerForm: TServerForm
+  Left = 372
+  Top = 277
+  BorderStyle = bsDialog
+  Caption = 'Data Abstract Server'
+  ClientHeight = 64
+  ClientWidth = 228
+  Color = clBtnFace
+  Font.Charset = DEFAULT_CHARSET
+  Font.Color = clWindowText
+  Font.Height = -11
+  Font.Style = []
+  ParentFont = True
+  OldCreateOrder = False
+  Position = poScreenCenter
+  PixelsPerInch = 96
+  TextHeight = 13
+  object DAPoweredByDataAbstractButton1: TDAPoweredByDataAbstractButton
+    Left = 8
+    Top = 8
+    Cursor = crHandPoint
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/fServerForm.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/fServerForm.pas
new file mode 100644
index 0000000..08fb16d
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXE/fServerForm.pas	
@@ -0,0 +1,25 @@
+unit fServerForm;
+
+interface
+
+uses
+  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls,
+  uDAPoweredByDataAbstractButton;
+
+type
+  TServerForm = class(TForm)
+    DAPoweredByDataAbstractButton1: TDAPoweredByDataAbstractButton;
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+var
+  ServerForm: TServerForm;
+
+implementation
+
+{$R *.dfm}
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/$LIBRARYNAME.RODL b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/$LIBRARYNAME.RODL
new file mode 100644
index 0000000..2d14cdf
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/$LIBRARYNAME.RODL	
@@ -0,0 +1,15 @@
+<Library Name="$LIBRARYNAME" UID="$NEWID">
+  <Services>
+    <Service Name="$SVCNAME" UID="$NEWID" Ancestor="DARemoteService">
+      <Interfaces>
+         <Interface Name="Default" UID="$NEWID">
+            <Operations>
+            </Operations>
+         </Interface>
+      </Interfaces>
+    </Service>
+  </Services>
+  <Uses>
+     <Use Name="DataAbstract" UID="$NEWID" Rodl="$(Data Abstract for Delphi)\Source\DataAbstract3.RODL" />
+  </Uses>
+</Library>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/$PRJNAME.dpr b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/$PRJNAME.dpr
new file mode 100644
index 0000000..1c43250
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/$PRJNAME.dpr	
@@ -0,0 +1,27 @@
+program $PRJNAME;
+
+{#ROGEN:$LIBRARYNAME.RODL} // RemObjects SDK: Careful, do not remove!
+
+uses
+  uROComInit,
+  uROComboService,
+  Forms,
+  fServerForm in 'fServerForm.pas' {ServerForm},
+  $SERVICENAME_Impl in '$SERVICENAME_Impl.pas' {$SERVICENAME: TDARemoteService},
+  fServerDataModule in 'fServerDataModule.pas' {ServerDataModule: TDataModule};
+
+{$R *.res}
+{$R RODLFile.res}
+
+begin
+  if ROStartService('$PRJNAME', '$PRJNAME') then begin
+    ROService.CreateForm(TServerDataModule, ServerDataModule);
+    ROService.Run;
+    Exit;
+  end;
+
+  Application.Initialize;
+  Application.CreateForm(TServerDataModule, ServerDataModule);
+  Application.CreateForm(TServerForm, ServerForm);
+  Application.Run;
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/$PRJNAME.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/$PRJNAME.res
new file mode 100644
index 0000000..dc22e33
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/$PRJNAME.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/$SERVICENAME_Impl.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/$SERVICENAME_Impl.dfm
new file mode 100644
index 0000000..df335a5
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/$SERVICENAME_Impl.dfm	
@@ -0,0 +1,23 @@
+object $SERVICENAME: T$SERVICENAME
+  AcquireConnection = True
+  OldCreateOrder = True
+  ServiceSchema = Schema
+  ServiceAdapter = DataStreamer
+  SessionManager = ServerDataModule.SessionManager
+  Left = 357
+  Top = 213
+  Height = 212
+  Width = 216
+  object DataStreamer: TDABin2DataStreamer
+    Left = 32
+    Top = 8
+  end
+  object Schema: TDASchema
+    ConnectionManager = ServerDataModule.ConnectionManager
+    DataDictionary = ServerDataModule.DataDictionary
+    Datasets = <>
+    Commands = <>
+    Left = 32
+    Top = 56
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/$SERVICENAME_Impl.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/$SERVICENAME_Impl.pas
new file mode 100644
index 0000000..753e437
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/$SERVICENAME_Impl.pas	
@@ -0,0 +1,37 @@
+unit $SERVICENAME_Impl;
+
+interface
+
+uses
+  {vcl:} Classes, SysUtils, 
+  {RemObjects:} uROClientIntf, uROTypes, uROServer, uROServerIntf, uROSessions, uRORemoteDataModule,
+  {Data Abstract:} uDAClasses, uDADataTable, uDABin2DataStreamer, uDAInterfaces, uDABusinessProcessor,
+  {Ancestor Implementation:} DARemoteService_Impl,
+  {Used RODLs:} DataAbstract3_Intf,
+  {Generated:} $LIBRARYNAME_Intf;
+
+type
+  { T$SERVICENAME }
+  T$SERVICENAME = class(TDARemoteService, I$SERVICENAME)
+    DataStreamer: TDABin2DataStreamer;
+    Schema: TDASchema;
+  private
+  protected
+    { I$SERVICENAME methods }
+  end;
+
+implementation
+
+{$R *.dfm}
+uses
+  {Generated:} $LIBRARYNAME_Invk, fServerDataModule;
+
+procedure Create_$SERVICENAME(out anInstance: IUnknown);
+begin
+  anInstance := T$SERVICENAME.Create(nil);
+end;
+
+initialization
+  TROClassFactory.Create('$SERVICENAME', Create_$SERVICENAME, T$SERVICENAME_Invoker);
+finalization
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/Icon.ico b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/Icon.ico
new file mode 100644
index 0000000..84d303f
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/Icon.ico differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/Info.ini b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/Info.ini
new file mode 100644
index 0000000..352a2ad
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/Info.ini	
@@ -0,0 +1,5 @@
+[Information]
+Name=v3.0 Legacy Server
+Description=Data Abstract Server based on the legacy v3.0 interface
+InvalidServers=TROWebBrokerServer,TROLocalServer,TROWinMessageServer
+DefaultServer=TROIndyHTTPServer
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/_CLIENT/$PRJNAMEClient.dpr b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/_CLIENT/$PRJNAMEClient.dpr
new file mode 100644
index 0000000..f1357b8
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/_CLIENT/$PRJNAMEClient.dpr	
@@ -0,0 +1,17 @@
+program $PRJNAMEClient;
+
+uses
+  uROComInit,
+  Forms,
+  MidasLib,
+  fClientForm in 'fClientForm.pas' {ClientForm},
+  fClientDataModule in 'fClientDataModule.pas' {ClientDataModule: TDAClientDataModule};
+
+{$R *.res}
+
+begin
+  Application.Initialize;
+  Application.CreateForm(TClientDataModule, ClientDataModule);
+  Application.CreateForm(TClientForm, ClientForm);
+  Application.Run;
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/_CLIENT/$PRJNAMEClient.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/_CLIENT/$PRJNAMEClient.res
new file mode 100644
index 0000000..a8142cb
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/_CLIENT/$PRJNAMEClient.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/_CLIENT/$PRJNAMEGroup.bpg b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/_CLIENT/$PRJNAMEGroup.bpg
new file mode 100644
index 0000000..b93564d
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/_CLIENT/$PRJNAMEGroup.bpg	
@@ -0,0 +1,21 @@
+#------------------------------------------------------------------------------
+VERSION = BWS.01
+#------------------------------------------------------------------------------
+!ifndef ROOT
+ROOT = $(MAKEDIR)\..
+!endif
+#------------------------------------------------------------------------------
+MAKE = $(ROOT)\bin\make.exe -$(MAKEFLAGS) -f$**
+DCC = $(ROOT)\bin\dcc32.exe $**
+BRCC = $(ROOT)\bin\brcc32.exe $**
+#------------------------------------------------------------------------------
+PROJECTS = $PRJNAME.exe $PRJNAMEClient.exe 
+#------------------------------------------------------------------------------
+default: $(PROJECTS)
+#------------------------------------------------------------------------------
+
+$PRJNAME.exe: $PRJNAME.dpr
+  $(DCC)
+
+$PRJNAMEClient.exe: $PRJNAMEClient.dpr
+  $(DCC)
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/_CLIENT/fClientDataModule.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/_CLIENT/fClientDataModule.dfm
new file mode 100644
index 0000000..70b97fb
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/_CLIENT/fClientDataModule.dfm	
@@ -0,0 +1,120 @@
+object ClientDataModule: TClientDataModule
+  OldCreateOrder = True
+  Left = 439
+  Top = 220
+  Height = 300
+  Width = 300
+  object Channel: TRO$CHNCLSNAME
+    Left = 40
+    Top = 8
+  end
+  object Message: TRO$MSGCLSNAME
+    Left = 40
+    Top = 52
+  end
+  object RemoteService: TRORemoteService
+    Message = Message
+    Channel = Channel
+    ServiceName = '$SERVICENAME'
+    Left = 40
+    Top = 96
+  end
+  object DataStreamer: TDABin2DataStreamer
+    Left = 40
+    Top = 140
+  end
+  object RemoteDataAdapter: TDARemoteDataAdapter
+    GetSchemaCall.RemoteService = RemoteService
+    GetSchemaCall.MethodName = 'GetDatasetSchema'
+    GetSchemaCall.Params = <
+      item
+        Name = 'aFilter'
+        DataType = rtString
+        Flag = fIn
+      end
+      item
+        Name = 'aDatasetName'
+        DataType = rtString
+        Flag = fIn
+      end
+      item
+        Name = 'Result'
+        DataType = rtBinary
+        Flag = fResult
+      end>
+    GetSchemaCall.Default = False
+    GetSchemaCall.IncomingSchemaParameter = 'Result'
+    GetSchemaCall.OutgoingFilterParameter = 'aDatasetName'
+    GetDataCall.RemoteService = RemoteService
+    GetDataCall.MethodName = 'GetDatasetData'
+    GetDataCall.Params = <
+      item
+        Name = 'DatasetName'
+        DataType = rtString
+        Flag = fIn
+      end
+      item
+        Name = 'Params'
+        DataType = rtString
+        Flag = fIn
+      end
+      item
+        Name = 'IncludeSchema'
+        DataType = rtBoolean
+        Flag = fIn
+      end
+      item
+        Name = 'MaxRecords'
+        DataType = rtInteger
+        Flag = fIn
+      end
+      item
+        Name = 'Result'
+        DataType = rtBinary
+        Flag = fResult
+      end>
+    GetDataCall.Default = False
+    GetDataCall.OutgoingTableNamesParameter = 'DatasetName'
+    GetDataCall.OutgoingTableRequestInfosParameter = 'aTableRequestInfoArray'
+    GetDataCall.IncomingDataParameter = 'Result'
+    GetDataCall.OutgoingParamsParameter = 'Params'
+    GetDataCall.OutgoingIncludeSchemaParameter = 'IncludeSchema'
+    GetDataCall.OutgoingMaxRecordsParameter = 'MaxRecords'
+    UpdateDataCall.RemoteService = RemoteService
+    UpdateDataCall.MethodName = 'UpdateData'
+    UpdateDataCall.Params = <
+      item
+        Name = 'Delta'
+        DataType = rtBinary
+        Flag = fIn
+      end
+      item
+        Name = 'Result'
+        DataType = rtBinary
+        Flag = fResult
+      end>
+    UpdateDataCall.Default = False
+    UpdateDataCall.OutgoingDeltaParameter = 'Delta'
+    UpdateDataCall.IncomingDeltaParameter = 'Result'
+    GetScriptsCall.RemoteService = RemoteService
+    GetScriptsCall.MethodName = 'GetDatasetScripts'
+    GetScriptsCall.Params = <
+      item
+        Name = 'DatasetNames'
+        DataType = rtString
+        Flag = fIn
+      end
+      item
+        Name = 'Result'
+        DataType = rtString
+        Flag = fResult
+      end>
+    GetScriptsCall.Default = False
+    GetScriptsCall.OutgoingTableNamesParameter = 'DatasetNames'
+    GetScriptsCall.IncomingScriptParameter = 'Result'
+    Left = 40
+    Top = 184
+    DataStreamer = DataStreamer
+    RemoteService = RemoteService
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/_CLIENT/fClientDataModule.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/_CLIENT/fClientDataModule.pas
new file mode 100644
index 0000000..22ae607
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/_CLIENT/fClientDataModule.pas	
@@ -0,0 +1,30 @@
+unit fClientDataModule;
+
+interface
+
+uses 
+  {vcl:} SysUtils, Classes, DB, DBClient, 
+  {RemObjects:} uROClient, uROClientIntf, uRORemoteService, $MESSAGEUNIT, $CHANNELUNIT, 
+  {Data Abstract:} uDADataTable, uDABin2DataStreamer, uDAInterfaces, uDARemoteDataAdapter;
+
+type
+  TClientDataModule = class(TDataModule)
+    Message: TRO$MSGCLSNAME;
+    Channel: TRO$CHNCLSNAME;
+    RemoteService: TRORemoteService;
+    DataStreamer: TDABin2DataStreamer;
+    RemoteDataAdapter: TDARemoteDataAdapter;
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+var
+  ClientDataModule: TClientDataModule;
+
+implementation
+
+{$R *.dfm}
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/_CLIENT/fClientForm.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/_CLIENT/fClientForm.dfm
new file mode 100644
index 0000000..4fc26ce
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/_CLIENT/fClientForm.dfm	
@@ -0,0 +1,17 @@
+object ClientForm: TClientForm
+  Left = 372
+  Top = 277
+  Width = 334
+  Height = 207
+  Caption = 'Data Abstract Client'
+  Color = clBtnFace
+  Font.Charset = DEFAULT_CHARSET
+  Font.Color = clWindowText
+  Font.Height = -11
+  Font.Style = []
+  ParentFont = True
+  OldCreateOrder = False
+  Position = poScreenCenter
+  PixelsPerInch = 96
+  TextHeight = 13
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/_CLIENT/fClientForm.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/_CLIENT/fClientForm.pas
new file mode 100644
index 0000000..c79fedc
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/_CLIENT/fClientForm.pas	
@@ -0,0 +1,27 @@
+unit fClientForm;
+
+interface
+
+uses
+  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls,
+  uROClient, uROClientIntf, uRORemoteService, uROBinMessage;
+
+type
+  TClientForm = class(TForm)
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+var
+  ClientForm: TClientForm;
+
+implementation
+
+uses
+  fClientDataModule;  
+  
+{$R *.dfm}
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/fServerDataModule.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/fServerDataModule.dfm
new file mode 100644
index 0000000..2cdf891
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/fServerDataModule.dfm	
@@ -0,0 +1,58 @@
+object ServerDataModule: TServerDataModule
+  OldCreateOrder = False
+  OnCreate = DataModuleCreate
+  Left = 362
+  Top = 208
+  Height = 207
+  Width = 352
+  object Server: TRO$SRVCLSNAME
+    Dispatchers = <
+      item
+        Name = 'Message'
+        Message = Message
+        Enabled = True
+      end>
+    Left = 32
+    Top = 8
+  end
+  object Message: TRO$MSGCLSNAME
+    Left = 34
+    Top = 56
+  end
+  object ConnectionManager: TDAConnectionManager
+    MaxPoolSize = 10
+    PoolTimeoutSeconds = 60
+    PoolBehaviour = pbWait
+    WaitIntervalSeconds = 1
+    Connections = <>
+    DriverManager = DriverManager
+    PoolingEnabled = True
+    Left = 136
+    Top = 56
+  end
+  object DriverManager: TDADriverManager
+    DriverDirectory = '%SYSTEM%\'
+    AutoLoad = False
+    TraceActive = False
+    TraceFlags = []
+    Left = 136
+    Top = 10
+  end
+  object ADODriver: TDAADODriver
+    Left = 256
+    Top = 8
+  end
+  object IBXDriver: TDAIBXDriver
+    Left = 256
+    Top = 56
+  end
+  object DataDictionary: TDADataDictionary
+    Fields = <>
+    Left = 32
+    Top = 104
+  end
+  object SessionManager: TROInMemorySessionManager
+    Left = 136
+    Top = 104
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/fServerDataModule.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/fServerDataModule.pas
new file mode 100644
index 0000000..82fe052
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/fServerDataModule.pas	
@@ -0,0 +1,42 @@
+unit fServerDataModule;
+
+interface
+
+uses
+  SysUtils, Classes,
+  uROClient, uROPoweredByRemObjectsButton, uROClientIntf, uROServer,
+  $MESSAGEUNIT, $SERVERUNIT,
+  uDAEngine, uDADriverManager, uDAClasses, uROSessions,
+  uDAIBXDriver, uDAADODriver;
+
+type
+  TServerDataModule = class(TDataModule)
+    Server: TRO$SRVCLSNAME;
+    Message: TRO$MSGCLSNAME;
+    ConnectionManager: TDAConnectionManager;
+    DriverManager: TDADriverManager;
+    ADODriver: TDAADODriver;
+    IBXDriver: TDAIBXDriver;
+    DataDictionary: TDADataDictionary;
+    SessionManager: TROInMemorySessionManager;
+    
+    procedure DataModuleCreate(Sender: TObject);
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+var
+  ServerDataModule: TServerDataModule;
+
+implementation
+
+{$R *.dfm}
+
+procedure TServerDataModule.DataModuleCreate(Sender: TObject);
+begin
+  Server.Active := true;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/fServerForm.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/fServerForm.dfm
new file mode 100644
index 0000000..77cfe95
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/fServerForm.dfm	
@@ -0,0 +1,23 @@
+object ServerForm: TServerForm
+  Left = 372
+  Top = 277
+  BorderStyle = bsDialog
+  Caption = 'Data Abstract Server'
+  ClientHeight = 64
+  ClientWidth = 228
+  Color = clBtnFace
+  Font.Charset = DEFAULT_CHARSET
+  Font.Color = clWindowText
+  Font.Height = -11
+  Font.Style = []
+  ParentFont = True
+  OldCreateOrder = False
+  Position = poScreenCenter
+  PixelsPerInch = 96
+  TextHeight = 13
+  object DAPoweredByDataAbstractButton1: TDAPoweredByDataAbstractButton
+    Left = 8
+    Top = 8
+    Cursor = crHandPoint
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/fServerForm.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/fServerForm.pas
new file mode 100644
index 0000000..08fb16d
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLEXEv3/fServerForm.pas	
@@ -0,0 +1,25 @@
+unit fServerForm;
+
+interface
+
+uses
+  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls,
+  uDAPoweredByDataAbstractButton;
+
+type
+  TServerForm = class(TForm)
+    DAPoweredByDataAbstractButton1: TDAPoweredByDataAbstractButton;
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+var
+  ServerForm: TServerForm;
+
+implementation
+
+{$R *.dfm}
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/$LIBRARYNAME.RODL b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/$LIBRARYNAME.RODL
new file mode 100644
index 0000000..92ae093
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/$LIBRARYNAME.RODL	
@@ -0,0 +1,23 @@
+<Library Name="$LIBRARYNAME" UID="$NEWID">
+  <Services>
+    <Service Name="$SVCNAME" UID="$NEWID" Ancestor="DataAbstractService">
+      <Interfaces>
+         <Interface Name="Default" UID="$NEWID">
+            <Operations>
+            </Operations>
+         </Interface>
+      </Interfaces>
+    </Service>
+    <Service Name="LoginService" UID="$NEWID" Ancestor="SimpleLoginService">
+      <Interfaces>
+        <Interface Name="Default" UID="$NEWID">
+          <Operations>
+          </Operations>
+        </Interface>
+      </Interfaces>
+    </Service>
+  </Services>
+  <Uses>
+     <Use Name="DataAbstract" UID="$NEWID" Rodl="$(Data Abstract for Delphi)\Source\DataAbstract4.RODL" />
+  </Uses>
+</Library>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/$PRJNAME.dpr b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/$PRJNAME.dpr
new file mode 100644
index 0000000..a379b08
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/$PRJNAME.dpr	
@@ -0,0 +1,28 @@
+program $PRJNAME;
+
+{#ROGEN:$LIBRARYNAME.RODL} // RemObjects SDK: Careful, do not remove!
+
+uses
+  uROComInit,
+  uROComboService,
+  Forms,
+  fServerForm in 'fServerForm.pas' {ServerForm},
+  $SERVICENAME_Impl in '$SERVICENAME_Impl.pas' {$SERVICENAME: TDARemoteService},
+  fServerDataModule in 'fServerDataModule.pas' {ServerDataModule: TDataModule},
+  LoginService_Impl in 'LoginService_Impl.pas' {LoginService: TSimpleLoginService};
+
+{$R *.res}
+{$R RODLFile.res}
+
+begin
+  if ROStartService('$PRJNAME', '$PRJNAME') then begin
+    ROService.CreateForm(TServerDataModule, ServerDataModule);
+    ROService.Run;
+    Exit;
+  end;
+
+  Application.Initialize;
+  Application.CreateForm(TServerDataModule, ServerDataModule);
+  Application.CreateForm(TServerForm, ServerForm);
+  Application.Run;
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/$PRJNAME.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/$PRJNAME.res
new file mode 100644
index 0000000..dc22e33
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/$PRJNAME.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/$SERVICENAME_Impl.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/$SERVICENAME_Impl.dfm
new file mode 100644
index 0000000..a0a5f35
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/$SERVICENAME_Impl.dfm	
@@ -0,0 +1,24 @@
+object $SERVICENAME: T$SERVICENAME
+  AcquireConnection = True
+  OldCreateOrder = True
+  RequiresSession = True
+  ServiceSchema = Schema
+  ServiceDataStreamer = DataStreamer
+  SessionManager = ServerDataModule.SessionManager
+  Left = 357
+  Top = 213
+  Height = 212
+  Width = 216
+  object DataStreamer: TDABin2DataStreamer
+    Left = 32
+    Top = 8
+  end
+  object Schema: TDASchema
+    ConnectionManager = ServerDataModule.ConnectionManager
+    DataDictionary = ServerDataModule.DataDictionary
+    Datasets = <>
+    Commands = <>
+    Left = 32
+    Top = 56
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/$SERVICENAME_Impl.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/$SERVICENAME_Impl.pas
new file mode 100644
index 0000000..4c0b493
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/$SERVICENAME_Impl.pas	
@@ -0,0 +1,37 @@
+unit $SERVICENAME_Impl;
+
+interface
+
+uses
+  {vcl:} Classes, SysUtils, 
+  {RemObjects:} uROClientIntf, uROTypes, uROServer, uROServerIntf, uROSessions, uRORemoteDataModule,
+  {Data Abstract:} uDAClasses, uDADataTable, uDABin2DataStreamer, uDAInterfaces, uDABusinessProcessor,
+  {Ancestor Implementation:} DataAbstractService_Impl,
+  {Used RODLs:} DataAbstract4_Intf,
+  {Generated:} $LIBRARYNAME_Intf;
+
+type
+  { T$SERVICENAME }
+  T$SERVICENAME = class(TDataAbstractService, I$SERVICENAME)
+    DataStreamer: TDABin2DataStreamer;
+    Schema: TDASchema;
+  private
+  protected
+    { I$SERVICENAME methods }
+  end;
+
+implementation
+
+{$R *.dfm}
+uses
+  {Generated:} $LIBRARYNAME_Invk, fServerDataModule;
+
+procedure Create_$SERVICENAME(out anInstance: IUnknown);
+begin
+  anInstance := T$SERVICENAME.Create(nil);
+end;
+
+initialization
+  TROClassFactory.Create('$SERVICENAME', Create_$SERVICENAME, T$SERVICENAME_Invoker);
+finalization
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/Icon.ico b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/Icon.ico
new file mode 100644
index 0000000..34b76bf
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/Icon.ico differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/Info.ini b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/Info.ini
new file mode 100644
index 0000000..44d08cb
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/Info.ini	
@@ -0,0 +1,6 @@
+[Information]
+Name=Simple Login Server
+Description=Data Abstract VCL Based Combo Server with Simple Login
+InvalidServers=TROWebBrokerServer,TROLocalServer,TROWinMessageServer
+DefaultServer=TROIndyHTTPServer
+Wizard=DAGuideWizard
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/LoginService_Impl.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/LoginService_Impl.dfm
new file mode 100644
index 0000000..19a75f0
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/LoginService_Impl.dfm	
@@ -0,0 +1,10 @@
+object LoginService: TLoginService
+  OldCreateOrder = True
+  SessionManager = ServerDataModule.SessionManager
+  OnLogout = LoginServiceLogout
+  OnLogin = LoginServiceLogin
+  Left = 200
+  Top = 200
+  Height = 300
+  Width = 300
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/LoginService_Impl.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/LoginService_Impl.pas
new file mode 100644
index 0000000..2e00a8a
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/LoginService_Impl.pas	
@@ -0,0 +1,88 @@
+unit LoginService_Impl;
+
+{----------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project .                               }
+{                                                                            }
+{ This is where you are supposed to code the implementation of your objects. }
+{----------------------------------------------------------------------------}
+
+interface
+
+uses
+  {vcl:} Classes, SysUtils, 
+  {RemObjects:} uROClientIntf, uROTypes, uROServer, uROServerIntf, uROSessions,
+  {Ancestor Implementation:} SimpleLoginService_Impl,
+  {Used RODLs:} DataAbstract4_Intf,
+  {Generated:} $LIBRARYNAME_Intf;
+
+type
+  { TLoginService }
+  TLoginService = class(TSimpleLoginService, ILoginService)
+    procedure LoginServiceLogout(Sender: TObject);
+    procedure LoginServiceLogin(Sender: TObject; aUserID,
+      aPassword: Utf8String; out aUserInfo: UserInfo;
+      var aLoginSuccessful: Boolean);
+  private
+  protected
+    { ILoginService methods }
+  end;
+
+implementation
+
+{$R *.dfm}
+uses
+  {Generated:}$LIBRARYNAME_Invk, fServerDataModule;
+
+procedure Create_LoginService(out anInstance : IUnknown);
+begin
+  anInstance := TLoginService.Create(nil);
+end;
+
+{ LoginService }
+
+procedure TLoginService.LoginServiceLogin(Sender: TObject; aUserID,
+  aPassword: Utf8String; out aUserInfo: UserInfo;
+  var aLoginSuccessful: Boolean);
+begin
+  // This is where your Login logic should be implemented. A default implementation has been added
+  // for you.
+
+  // If you application does not require sending back a UserInfo structure, you can set
+  // aUserInfo to nil, indtead of returning a new instance.
+
+  // If you require a more complex UserInfo structure (i.e. MyCompanyUserInfo), simply add
+  // a new struct to the file WindowsFormsServer1.RODL and set its ancestor to UserInfo. You will then
+  // be able to marshal your new custom class back to the client by reassigning the aEA.UserInfo property.
+
+  // myInfo = new MyCompanyUserInfo();
+  // myInfo.City = "London";
+  // myInfo.Address = "213 Smith Road";
+  // myInfo.Age = 32;
+  // aUserInfo = myInfo;
+
+  aLoginSuccessful := aUserID = aPassword;
+
+  if aLoginSuccessful then begin
+    aUserInfo := UserInfo.Create;
+    aUserInfo.SessionID := GuidToString(ClientID);
+    aUserInfo.UserID := aUserID;
+
+    Session['UserID'] := aUserID;
+  end
+  else begin
+    DestroySession;
+  end;
+end;
+
+procedure TLoginService.LoginServiceLogout(Sender: TObject);
+begin
+  DestroySession;
+end;
+
+initialization
+  TROClassFactory.Create('LoginService', Create_LoginService, TLoginService_Invoker);
+
+finalization
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/_CLIENT/$PRJNAMEClient.dpr b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/_CLIENT/$PRJNAMEClient.dpr
new file mode 100644
index 0000000..82934b3
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/_CLIENT/$PRJNAMEClient.dpr	
@@ -0,0 +1,18 @@
+program $PRJNAMEClient;
+
+uses
+  uROComInit,
+  Forms,
+  MidasLib,
+  fClientForm in 'fClientForm.pas' {ClientForm},
+  fClientDataModule in 'fClientDataModule.pas' {ClientDataModule: TDAClientDataModule},
+  fLoginForm in 'fLoginForm.pas' {LoginForm};
+
+{$R *.res}
+
+begin
+  Application.Initialize;
+  Application.CreateForm(TClientDataModule, ClientDataModule);
+  Application.CreateForm(TClientForm, ClientForm);
+  Application.Run;
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/_CLIENT/$PRJNAMEClient.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/_CLIENT/$PRJNAMEClient.res
new file mode 100644
index 0000000..a8142cb
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/_CLIENT/$PRJNAMEClient.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/_CLIENT/$PRJNAMEGroup.bpg b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/_CLIENT/$PRJNAMEGroup.bpg
new file mode 100644
index 0000000..b93564d
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/_CLIENT/$PRJNAMEGroup.bpg	
@@ -0,0 +1,21 @@
+#------------------------------------------------------------------------------
+VERSION = BWS.01
+#------------------------------------------------------------------------------
+!ifndef ROOT
+ROOT = $(MAKEDIR)\..
+!endif
+#------------------------------------------------------------------------------
+MAKE = $(ROOT)\bin\make.exe -$(MAKEFLAGS) -f$**
+DCC = $(ROOT)\bin\dcc32.exe $**
+BRCC = $(ROOT)\bin\brcc32.exe $**
+#------------------------------------------------------------------------------
+PROJECTS = $PRJNAME.exe $PRJNAMEClient.exe 
+#------------------------------------------------------------------------------
+default: $(PROJECTS)
+#------------------------------------------------------------------------------
+
+$PRJNAME.exe: $PRJNAME.dpr
+  $(DCC)
+
+$PRJNAMEClient.exe: $PRJNAMEClient.dpr
+  $(DCC)
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/_CLIENT/fClientDataModule.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/_CLIENT/fClientDataModule.dfm
new file mode 100644
index 0000000..e214225
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/_CLIENT/fClientDataModule.dfm	
@@ -0,0 +1,32 @@
+object ClientDataModule: TClientDataModule
+  OldCreateOrder = True
+  Left = 439
+  Top = 220
+  Height = 300
+  Width = 300
+  object Channel: TRO$CHNCLSNAME
+    Left = 40
+    Top = 8
+  end
+  object Message: TRO$MSGCLSNAME
+    Left = 40
+    Top = 52
+  end
+  object RemoteService: TRORemoteService
+    Message = Message
+    Channel = Channel
+    ServiceName = '$SERVICENAME'
+    Left = 40
+    Top = 96
+  end
+  object DataStreamer: TDABin2DataStreamer
+    Left = 40
+    Top = 140
+  end
+  object RemoteDataAdapter: TDARemoteDataAdapter
+    Left = 40
+    Top = 184
+    DataStreamer = DataStreamer
+    RemoteService = RemoteService
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/_CLIENT/fClientDataModule.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/_CLIENT/fClientDataModule.pas
new file mode 100644
index 0000000..ce6e532
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/_CLIENT/fClientDataModule.pas	
@@ -0,0 +1,31 @@
+unit fClientDataModule;
+
+interface
+
+uses 
+  {vcl:} SysUtils, Classes, DB, DBClient, 
+  {RemObjects:} uROClient, uROClientIntf, uRORemoteService, $MESSAGEUNIT, $CHANNELUNIT, 
+  {Data Abstract:} uDADataTable, uDABINAdapter, uDAInterfaces,
+  uDADataStreamer, uDARemoteDataAdapter;
+
+type
+  TClientDataModule = class(TDataModule)
+    Message: TRO$MSGCLSNAME;
+    Channel: TRO$CHNCLSNAME;
+    RemoteService: TRORemoteService;
+    DataStreamer: TDABin2DataStreamer;
+    RemoteDataAdapter: TDARemoteDataAdapter;
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+var
+  ClientDataModule: TClientDataModule;
+
+implementation
+
+{$R *.dfm}
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/_CLIENT/fClientForm.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/_CLIENT/fClientForm.dfm
new file mode 100644
index 0000000..df91fc4
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/_CLIENT/fClientForm.dfm	
@@ -0,0 +1,19 @@
+object ClientForm: TClientForm
+  Left = 372
+  Top = 277
+  Width = 334
+  Height = 207
+  Caption = 'Data Abstract Client'
+  Color = clBtnFace
+  Font.Charset = DEFAULT_CHARSET
+  Font.Color = clWindowText
+  Font.Height = -11
+  Font.Style = []
+  ParentFont = True
+  OldCreateOrder = False
+  Position = poScreenCenter
+  OnDestroy = FormDestroy
+  OnShow = FormShow
+  PixelsPerInch = 96
+  TextHeight = 13
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/_CLIENT/fClientForm.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/_CLIENT/fClientForm.pas
new file mode 100644
index 0000000..ef777f6
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/_CLIENT/fClientForm.pas	
@@ -0,0 +1,74 @@
+unit fClientForm;
+
+interface
+
+uses
+  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls,
+  uROClient, uROClientIntf, uRORemoteService, uROBinMessage,
+  DataAbstract4_Intf, $LIBRARYNAME_Intf;
+
+type
+  TClientForm = class(TForm)
+    procedure FormDestroy(Sender: TObject);
+    procedure FormShow(Sender: TObject);
+  private
+    fLoggedIn: Boolean;
+    fUserInfo: UserInfo;
+    fLogin: ILoginService;
+  protected
+    function Login: Boolean;
+    procedure Logout;
+  public
+    { Public declarations }
+  end;
+
+var
+  ClientForm: TClientForm;
+
+implementation
+
+uses
+  fLoginForm, fClientDataModule;
+
+{$R *.dfm}
+
+procedure TClientForm.FormShow(Sender: TObject);
+begin
+  fLogin := CoLoginService.Create(ClientDataModule.Message, ClientDataModule.Channel); 
+  if not Login then
+    Application.Terminate;
+end;
+
+procedure TClientForm.FormDestroy(Sender: TObject);
+begin
+  Logout;
+end;
+
+function TClientForm.Login: Boolean;
+var
+  fLoginForm: TLoginForm;
+begin
+  fLoginForm := TLoginForm.Create(nil);
+  try
+    FreeAndNil(fUserInfo);
+    while fLoginForm.ShowModal = mrOk do begin
+      fLoggedIn := fLogin.Login(fLoginForm.edUsername.Text,
+                  fLoginForm.edPassword.Text, fUserInfo);
+      Result := fLoggedIn;
+      if Result then exit;
+    end;
+    Result := False;
+  finally
+    fLoginForm.Free;
+  end;
+end;
+
+procedure TClientForm.Logout;
+begin
+  if fLoggedIn then begin
+    fLogin.Logout();
+    fLoggedIn := false;
+  end;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/_CLIENT/fLoginForm.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/_CLIENT/fLoginForm.dfm
new file mode 100644
index 0000000..09a7bf9
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/_CLIENT/fLoginForm.dfm	
@@ -0,0 +1,75 @@
+object LoginForm: TLoginForm
+  Left = 408
+  Top = 136
+  ActiveControl = edUsername
+  BorderStyle = bsDialog
+  Caption = 'Login'
+  ClientHeight = 101
+  ClientWidth = 374
+  Color = clBtnFace
+  Font.Charset = DEFAULT_CHARSET
+  Font.Color = clWindowText
+  Font.Height = -11
+  Font.Name = 'Tahoma'
+  Font.Style = []
+  OldCreateOrder = False
+  Position = poMainFormCenter
+  OnCreate = FormCreate
+  PixelsPerInch = 96
+  TextHeight = 13
+  object Label1: TLabel
+    Left = 8
+    Top = 15
+    Width = 56
+    Height = 13
+    Caption = '&User Name:'
+    FocusControl = edUsername
+  end
+  object Label2: TLabel
+    Left = 8
+    Top = 42
+    Width = 50
+    Height = 13
+    Caption = '&Password:'
+    FocusControl = edPassword
+  end
+  object edUsername: TEdit
+    Left = 80
+    Top = 12
+    Width = 286
+    Height = 21
+    TabOrder = 0
+    OnChange = edPasswordChange
+  end
+  object edPassword: TEdit
+    Left = 80
+    Top = 39
+    Width = 286
+    Height = 21
+    PasswordChar = '*'
+    TabOrder = 1
+    OnChange = edPasswordChange
+  end
+  object bOk: TButton
+    Left = 210
+    Top = 68
+    Width = 75
+    Height = 25
+    Anchors = [akRight, akBottom]
+    Caption = 'OK'
+    Default = True
+    ModalResult = 1
+    TabOrder = 2
+  end
+  object bCancel: TButton
+    Left = 291
+    Top = 68
+    Width = 75
+    Height = 25
+    Anchors = [akRight, akBottom]
+    Cancel = True
+    Caption = 'Cancel'
+    ModalResult = 2
+    TabOrder = 3
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/_CLIENT/fLoginForm.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/_CLIENT/fLoginForm.pas
new file mode 100644
index 0000000..67e0279
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/_CLIENT/fLoginForm.pas	
@@ -0,0 +1,45 @@
+unit fLoginForm;
+
+interface
+
+uses
+  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
+  Dialogs, StdCtrls;
+
+type
+  TLoginForm = class(TForm)
+    Label1: TLabel;
+    Label2: TLabel;
+    edUsername: TEdit;
+    edPassword: TEdit;
+    bOk: TButton;
+    bCancel: TButton;
+    procedure edPasswordChange(Sender: TObject);
+    procedure FormCreate(Sender: TObject);
+  private
+    procedure ValidateInput;
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+implementation
+
+{$R *.dfm}
+
+procedure TLoginForm.edPasswordChange(Sender: TObject);
+begin
+  ValidateInput;
+end;
+
+procedure TLoginForm.FormCreate(Sender: TObject);
+begin
+  ValidateInput;
+end;
+
+procedure TLoginForm.ValidateInput;
+begin
+  bOk.Enabled := (edUsername.Text <> '') and (edPassword.Text <> '');
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/fServerDataModule.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/fServerDataModule.dfm
new file mode 100644
index 0000000..2cdf891
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/fServerDataModule.dfm	
@@ -0,0 +1,58 @@
+object ServerDataModule: TServerDataModule
+  OldCreateOrder = False
+  OnCreate = DataModuleCreate
+  Left = 362
+  Top = 208
+  Height = 207
+  Width = 352
+  object Server: TRO$SRVCLSNAME
+    Dispatchers = <
+      item
+        Name = 'Message'
+        Message = Message
+        Enabled = True
+      end>
+    Left = 32
+    Top = 8
+  end
+  object Message: TRO$MSGCLSNAME
+    Left = 34
+    Top = 56
+  end
+  object ConnectionManager: TDAConnectionManager
+    MaxPoolSize = 10
+    PoolTimeoutSeconds = 60
+    PoolBehaviour = pbWait
+    WaitIntervalSeconds = 1
+    Connections = <>
+    DriverManager = DriverManager
+    PoolingEnabled = True
+    Left = 136
+    Top = 56
+  end
+  object DriverManager: TDADriverManager
+    DriverDirectory = '%SYSTEM%\'
+    AutoLoad = False
+    TraceActive = False
+    TraceFlags = []
+    Left = 136
+    Top = 10
+  end
+  object ADODriver: TDAADODriver
+    Left = 256
+    Top = 8
+  end
+  object IBXDriver: TDAIBXDriver
+    Left = 256
+    Top = 56
+  end
+  object DataDictionary: TDADataDictionary
+    Fields = <>
+    Left = 32
+    Top = 104
+  end
+  object SessionManager: TROInMemorySessionManager
+    Left = 136
+    Top = 104
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/fServerDataModule.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/fServerDataModule.pas
new file mode 100644
index 0000000..82fe052
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/fServerDataModule.pas	
@@ -0,0 +1,42 @@
+unit fServerDataModule;
+
+interface
+
+uses
+  SysUtils, Classes,
+  uROClient, uROPoweredByRemObjectsButton, uROClientIntf, uROServer,
+  $MESSAGEUNIT, $SERVERUNIT,
+  uDAEngine, uDADriverManager, uDAClasses, uROSessions,
+  uDAIBXDriver, uDAADODriver;
+
+type
+  TServerDataModule = class(TDataModule)
+    Server: TRO$SRVCLSNAME;
+    Message: TRO$MSGCLSNAME;
+    ConnectionManager: TDAConnectionManager;
+    DriverManager: TDADriverManager;
+    ADODriver: TDAADODriver;
+    IBXDriver: TDAIBXDriver;
+    DataDictionary: TDADataDictionary;
+    SessionManager: TROInMemorySessionManager;
+    
+    procedure DataModuleCreate(Sender: TObject);
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+var
+  ServerDataModule: TServerDataModule;
+
+implementation
+
+{$R *.dfm}
+
+procedure TServerDataModule.DataModuleCreate(Sender: TObject);
+begin
+  Server.Active := true;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/fServerForm.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/fServerForm.dfm
new file mode 100644
index 0000000..77cfe95
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/fServerForm.dfm	
@@ -0,0 +1,23 @@
+object ServerForm: TServerForm
+  Left = 372
+  Top = 277
+  BorderStyle = bsDialog
+  Caption = 'Data Abstract Server'
+  ClientHeight = 64
+  ClientWidth = 228
+  Color = clBtnFace
+  Font.Charset = DEFAULT_CHARSET
+  Font.Color = clWindowText
+  Font.Height = -11
+  Font.Style = []
+  ParentFont = True
+  OldCreateOrder = False
+  Position = poScreenCenter
+  PixelsPerInch = 96
+  TextHeight = 13
+  object DAPoweredByDataAbstractButton1: TDAPoweredByDataAbstractButton
+    Left = 8
+    Top = 8
+    Cursor = crHandPoint
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/fServerForm.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/fServerForm.pas
new file mode 100644
index 0000000..08fb16d
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLLOGINEXE/fServerForm.pas	
@@ -0,0 +1,25 @@
+unit fServerForm;
+
+interface
+
+uses
+  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls,
+  uDAPoweredByDataAbstractButton;
+
+type
+  TServerForm = class(TForm)
+    DAPoweredByDataAbstractButton1: TDAPoweredByDataAbstractButton;
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+var
+  ServerForm: TServerForm;
+
+implementation
+
+{$R *.dfm}
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/$LIBRARYNAME.RODL b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/$LIBRARYNAME.RODL
new file mode 100644
index 0000000..7aae775
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/$LIBRARYNAME.RODL	
@@ -0,0 +1,23 @@
+<Library Name="$LIBRARYNAME" UID="$NEWID">
+  <Services>
+    <Service Name="$SVCNAME" UID="$NEWID" Ancestor="DataAbstractService">
+      <Interfaces>
+         <Interface Name="Default" UID="$NEWID">
+            <Operations>
+            </Operations>
+         </Interface>
+      </Interfaces>
+    </Service>
+    <Service Name="LoginService" UID="$NEWID" Ancestor="MultiDbLoginServiceV5">
+      <Interfaces>
+        <Interface Name="Default" UID="$NEWID">
+          <Operations>
+          </Operations>
+        </Interface>
+      </Interfaces>
+    </Service>
+  </Services>
+  <Uses>
+     <Use Name="DataAbstract" UID="$NEWID" Rodl="$(Data Abstract for Delphi)\Source\DataAbstract4.RODL" />
+  </Uses>
+</Library>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/$PRJNAME.dpr b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/$PRJNAME.dpr
new file mode 100644
index 0000000..a379b08
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/$PRJNAME.dpr	
@@ -0,0 +1,28 @@
+program $PRJNAME;
+
+{#ROGEN:$LIBRARYNAME.RODL} // RemObjects SDK: Careful, do not remove!
+
+uses
+  uROComInit,
+  uROComboService,
+  Forms,
+  fServerForm in 'fServerForm.pas' {ServerForm},
+  $SERVICENAME_Impl in '$SERVICENAME_Impl.pas' {$SERVICENAME: TDARemoteService},
+  fServerDataModule in 'fServerDataModule.pas' {ServerDataModule: TDataModule},
+  LoginService_Impl in 'LoginService_Impl.pas' {LoginService: TSimpleLoginService};
+
+{$R *.res}
+{$R RODLFile.res}
+
+begin
+  if ROStartService('$PRJNAME', '$PRJNAME') then begin
+    ROService.CreateForm(TServerDataModule, ServerDataModule);
+    ROService.Run;
+    Exit;
+  end;
+
+  Application.Initialize;
+  Application.CreateForm(TServerDataModule, ServerDataModule);
+  Application.CreateForm(TServerForm, ServerForm);
+  Application.Run;
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/$PRJNAME.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/$PRJNAME.res
new file mode 100644
index 0000000..dc22e33
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/$PRJNAME.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/$SERVICENAME_Impl.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/$SERVICENAME_Impl.dfm
new file mode 100644
index 0000000..8c5db56
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/$SERVICENAME_Impl.dfm	
@@ -0,0 +1,25 @@
+object $SERVICENAME: T$SERVICENAME
+  AcquireConnection = True
+  OldCreateOrder = True
+  RequiresSession = True
+  ServiceSchema = Schema
+  ServiceDataStreamer = DataStreamer
+  SessionManager = ServerDataModule.SessionManager
+  BeforeAcquireConnection = DataAbstractServiceBeforeAcquireConnection
+  Left = 357
+  Top = 213
+  Height = 212
+  Width = 216
+  object DataStreamer: TDABin2DataStreamer
+    Left = 32
+    Top = 8
+  end
+  object Schema: TDASchema
+    ConnectionManager = ServerDataModule.ConnectionManager
+    DataDictionary = ServerDataModule.DataDictionary
+    Datasets = <>
+    Commands = <>
+    Left = 32
+    Top = 56
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/$SERVICENAME_Impl.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/$SERVICENAME_Impl.pas
new file mode 100644
index 0000000..d4a6cc0
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/$SERVICENAME_Impl.pas	
@@ -0,0 +1,45 @@
+unit $SERVICENAME_Impl;
+
+interface
+
+uses
+  {vcl:} Classes, SysUtils, Variants,
+  {RemObjects:} uROClientIntf, uROTypes, uROServer, uROServerIntf, uROSessions, uRORemoteDataModule,
+  {Data Abstract:} uDAClasses, uDADataTable, uDABin2DataStreamer, uDAInterfaces, uDABusinessProcessor,
+  {Ancestor Implementation:} DataAbstractService_Impl,
+  {Used RODLs:} DataAbstract4_Intf,
+  {Generated:} $LIBRARYNAME_Intf;
+
+type
+  { T$SERVICENAME }
+  T$SERVICENAME = class(TDataAbstractService, I$SERVICENAME)
+    DataStreamer: TDABin2DataStreamer;
+    Schema: TDASchema;
+    procedure DataAbstractServiceBeforeAcquireConnection(aSender: TObject; var aConnectionName: string);
+  private
+  protected
+    { I$SERVICENAME methods }
+  end;
+
+implementation
+
+{$R *.dfm}
+uses
+  {Generated:} $LIBRARYNAME_Invk, fServerDataModule;
+
+procedure Create_$SERVICENAME(out anInstance: IUnknown);
+begin
+  anInstance := T$SERVICENAME.Create(nil);
+end;
+
+{ T$SERVICENAME }
+
+procedure T$SERVICENAME.DataAbstractServiceBeforeAcquireConnection(aSender: TObject; var aConnectionName: string);
+begin
+  aConnectionName := VarToStr(Session['ConnectionName']);
+end;
+
+initialization
+  TROClassFactory.Create('$SERVICENAME', Create_$SERVICENAME, T$SERVICENAME_Invoker);
+finalization
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/Icon.ico b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/Icon.ico
new file mode 100644
index 0000000..34b76bf
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/Icon.ico differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/Info.ini b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/Info.ini
new file mode 100644
index 0000000..26cfb42
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/Info.ini	
@@ -0,0 +1,6 @@
+[Information]
+Name=MultiDb Login Server
+Description=Data Abstract VCL Based Combo Server with MultiDb Login
+InvalidServers=TROWebBrokerServer,TROLocalServer,TROWinMessageServer
+DefaultServer=TROIndyHTTPServer
+Wizard=DAGuideWizard
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/LoginService_Impl.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/LoginService_Impl.dfm
new file mode 100644
index 0000000..14e8935
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/LoginService_Impl.dfm	
@@ -0,0 +1,11 @@
+object LoginService: TLoginService
+  OldCreateOrder = True
+  ConnectionManager = ServerDataModule.ConnectionManager
+  SessionManager = ServerDataModule.SessionManager
+  OnLogout = LoginServiceLogout
+  OnLogin = LoginServiceLogin
+  Left = 200
+  Top = 200
+  Height = 300
+  Width = 300
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/LoginService_Impl.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/LoginService_Impl.pas
new file mode 100644
index 0000000..c0cafe7
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/LoginService_Impl.pas	
@@ -0,0 +1,91 @@
+unit LoginService_Impl;
+
+{----------------------------------------------------------------------------}
+{ This unit was automatically generated by the RemObjects SDK after reading  }
+{ the RODL file associated with this project .                               }
+{                                                                            }
+{ This is where you are supposed to code the implementation of your objects. }
+{----------------------------------------------------------------------------}
+
+interface
+
+uses
+  {vcl:} Classes, SysUtils, 
+  {RemObjects:} uROClientIntf, uROTypes, uROServer, uROServerIntf, uROSessions,
+  {Ancestor Implementation:} MultiDbLoginServiceV5_Impl,
+  {Used RODLs:} DataAbstract4_Intf,
+  {Generated:} $LIBRARYNAME_Intf;
+
+type
+  { TLoginService }
+  TLoginService = class(TMultiDbLoginServiceV5, ILoginService)
+    procedure LoginServiceLogout(Sender: TObject);
+    procedure LoginServiceLogin(Sender: TObject; aUserID,
+      aPassword: Utf8String; aConnectionName: Utf8String; out aUserInfo: UserInfo;
+      var aLoginSuccessful: Boolean);
+  private
+  protected
+    { ILoginService methods }
+  end;
+
+implementation
+
+{$R *.dfm}
+uses
+  {Generated:}$LIBRARYNAME_Invk, fServerDataModule;
+
+procedure Create_LoginService(out anInstance : IUnknown);
+begin
+  anInstance := TLoginService.Create(nil);
+end;
+
+{ LoginService }
+
+procedure TLoginService.LoginServiceLogin(Sender: TObject; aUserID,
+  aPassword: Utf8String; aConnectionName: Utf8String; out aUserInfo: UserInfo;
+  var aLoginSuccessful: Boolean);
+begin
+  // This is where your Login logic should be implemented. A default implementation has been added
+  // for you.
+
+  // If you application does not require sending back a UserInfo structure, you can set
+  // aUserInfo to nil, indtead of returning a new instance.
+
+  // If you require a more complex UserInfo structure (i.e. MyCompanyUserInfo), simply add
+  // a new struct to the file WindowsFormsServer1.RODL and set its ancestor to UserInfo. You will then
+  // be able to marshal your new custom class back to the client by reassigning the aEA.UserInfo property.
+
+  // myInfo = new MyCompanyUserInfo();
+  // myInfo.City = "London";
+  // myInfo.Address = "213 Smith Road";
+  // myInfo.Age = 32;
+  // aUserInfo = myInfo;
+
+  aLoginSuccessful := aUserID = aPassword;
+
+  if aLoginSuccessful then begin
+    aUserInfo := UserInfo.Create;
+    aUserInfo.SessionID := GuidToString(ClientID);
+    aUserInfo.UserID := aUserID;
+
+    Session['UserID'] := aUserID;
+
+    // store connection name for use in data service
+    Session['ConnectionName'] := aConnectionName;
+  end
+  else begin
+    DestroySession;
+  end;
+end;
+
+procedure TLoginService.LoginServiceLogout(Sender: TObject);
+begin
+  DestroySession;
+end;
+
+initialization
+  TROClassFactory.Create('LoginService', Create_LoginService, TLoginService_Invoker);
+
+finalization
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/_CLIENT/$PRJNAMEClient.dpr b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/_CLIENT/$PRJNAMEClient.dpr
new file mode 100644
index 0000000..82934b3
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/_CLIENT/$PRJNAMEClient.dpr	
@@ -0,0 +1,18 @@
+program $PRJNAMEClient;
+
+uses
+  uROComInit,
+  Forms,
+  MidasLib,
+  fClientForm in 'fClientForm.pas' {ClientForm},
+  fClientDataModule in 'fClientDataModule.pas' {ClientDataModule: TDAClientDataModule},
+  fLoginForm in 'fLoginForm.pas' {LoginForm};
+
+{$R *.res}
+
+begin
+  Application.Initialize;
+  Application.CreateForm(TClientDataModule, ClientDataModule);
+  Application.CreateForm(TClientForm, ClientForm);
+  Application.Run;
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/_CLIENT/$PRJNAMEClient.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/_CLIENT/$PRJNAMEClient.res
new file mode 100644
index 0000000..a8142cb
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/_CLIENT/$PRJNAMEClient.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/_CLIENT/$PRJNAMEGroup.bpg b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/_CLIENT/$PRJNAMEGroup.bpg
new file mode 100644
index 0000000..b93564d
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/_CLIENT/$PRJNAMEGroup.bpg	
@@ -0,0 +1,21 @@
+#------------------------------------------------------------------------------
+VERSION = BWS.01
+#------------------------------------------------------------------------------
+!ifndef ROOT
+ROOT = $(MAKEDIR)\..
+!endif
+#------------------------------------------------------------------------------
+MAKE = $(ROOT)\bin\make.exe -$(MAKEFLAGS) -f$**
+DCC = $(ROOT)\bin\dcc32.exe $**
+BRCC = $(ROOT)\bin\brcc32.exe $**
+#------------------------------------------------------------------------------
+PROJECTS = $PRJNAME.exe $PRJNAMEClient.exe 
+#------------------------------------------------------------------------------
+default: $(PROJECTS)
+#------------------------------------------------------------------------------
+
+$PRJNAME.exe: $PRJNAME.dpr
+  $(DCC)
+
+$PRJNAMEClient.exe: $PRJNAMEClient.dpr
+  $(DCC)
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/_CLIENT/fClientDataModule.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/_CLIENT/fClientDataModule.dfm
new file mode 100644
index 0000000..e214225
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/_CLIENT/fClientDataModule.dfm	
@@ -0,0 +1,32 @@
+object ClientDataModule: TClientDataModule
+  OldCreateOrder = True
+  Left = 439
+  Top = 220
+  Height = 300
+  Width = 300
+  object Channel: TRO$CHNCLSNAME
+    Left = 40
+    Top = 8
+  end
+  object Message: TRO$MSGCLSNAME
+    Left = 40
+    Top = 52
+  end
+  object RemoteService: TRORemoteService
+    Message = Message
+    Channel = Channel
+    ServiceName = '$SERVICENAME'
+    Left = 40
+    Top = 96
+  end
+  object DataStreamer: TDABin2DataStreamer
+    Left = 40
+    Top = 140
+  end
+  object RemoteDataAdapter: TDARemoteDataAdapter
+    Left = 40
+    Top = 184
+    DataStreamer = DataStreamer
+    RemoteService = RemoteService
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/_CLIENT/fClientDataModule.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/_CLIENT/fClientDataModule.pas
new file mode 100644
index 0000000..bc371f4
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/_CLIENT/fClientDataModule.pas	
@@ -0,0 +1,31 @@
+unit fClientDataModule;
+
+interface
+
+uses 
+  {vcl:} SysUtils, Classes, DB, DBClient, 
+  {RemObjects:} uROClient, uROClientIntf, uRORemoteService, $MESSAGEUNIT, $CHANNELUNIT, 
+  {Data Abstract:} uDADataTable, uDABin2DataStreamer, uDAInterfaces,
+  uDADataStreamer, uDARemoteDataAdapter;
+
+type
+  TClientDataModule = class(TDataModule)
+    Message: TRO$MSGCLSNAME;
+    Channel: TRO$CHNCLSNAME;
+    RemoteService: TRORemoteService;
+    DataStreamer: TDABin2DataStreamer;
+    RemoteDataAdapter: TDARemoteDataAdapter;
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+var
+  ClientDataModule: TClientDataModule;
+
+implementation
+
+{$R *.dfm}
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/_CLIENT/fClientForm.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/_CLIENT/fClientForm.dfm
new file mode 100644
index 0000000..df91fc4
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/_CLIENT/fClientForm.dfm	
@@ -0,0 +1,19 @@
+object ClientForm: TClientForm
+  Left = 372
+  Top = 277
+  Width = 334
+  Height = 207
+  Caption = 'Data Abstract Client'
+  Color = clBtnFace
+  Font.Charset = DEFAULT_CHARSET
+  Font.Color = clWindowText
+  Font.Height = -11
+  Font.Style = []
+  ParentFont = True
+  OldCreateOrder = False
+  Position = poScreenCenter
+  OnDestroy = FormDestroy
+  OnShow = FormShow
+  PixelsPerInch = 96
+  TextHeight = 13
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/_CLIENT/fClientForm.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/_CLIENT/fClientForm.pas
new file mode 100644
index 0000000..8f1b111
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/_CLIENT/fClientForm.pas	
@@ -0,0 +1,85 @@
+unit fClientForm;
+
+interface
+
+uses
+  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls,
+  uROClient, uROClientIntf, uRORemoteService, uROBinMessage,
+  DataAbstract4_Intf, $LIBRARYNAME_Intf;
+
+type
+  TClientForm = class(TForm)
+    procedure FormDestroy(Sender: TObject);
+    procedure FormShow(Sender: TObject);
+  private
+    fLoggedIn: Boolean;
+    fUserInfo: UserInfo;
+    fLogin: ILoginService;
+  protected
+    function Login: Boolean;
+    procedure Logout;
+  public
+    { Public declarations }
+  end;
+
+var
+  ClientForm: TClientForm;
+
+implementation
+
+uses
+  fLoginForm, fClientDataModule;
+
+{$R *.dfm}
+
+procedure TClientForm.FormShow(Sender: TObject);
+begin
+  fLogin := CoLoginService.Create(ClientDataModule.Message, ClientDataModule.Channel); 
+  if not Login then
+    Application.Terminate;
+end;
+
+procedure TClientForm.FormDestroy(Sender: TObject);
+begin
+  Logout;
+end;
+
+function TClientForm.Login: Boolean;
+var
+  fLoginForm: TLoginForm;
+  lNames: StringArray;
+  i: integer;  
+begin
+  fLoginForm := TLoginForm.Create(nil);
+  try
+    FreeAndNil(fUserInfo);
+    lNames := fLogin.GetConnectionNames;
+    try
+      for i:=0 to lNames.Count-1 do
+        fLoginForm.edDatabaseName.Items.Add(Utf8ToAnsi(lNames.Items[i]));
+    finally
+      lNames.Free;
+    end;
+    i := fLoginForm.edDatabaseName.Items.IndexOf(Utf8ToAnsi(fLogin.GetDefaultConnectionName));
+    if i > -1 then fLoginForm.edDatabaseName.ItemIndex := i;   
+    while fLoginForm.ShowModal = mrOk do begin
+      fLoggedIn := fLogin.Login(fLoginForm.edUsername.Text,
+                  fLoginForm.edPassword.Text, fLoginForm.edDatabaseName.Text, fUserInfo);
+      Result := fLoggedIn;
+      if Result then exit;
+    end;
+    Result := False;
+  finally
+    fLoginForm.Free;
+  end;
+end;
+
+procedure TClientForm.Logout;
+begin
+  if fLoggedIn then begin
+    fLogin.Logout();
+    fLoggedIn := false;
+  end;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/_CLIENT/fLoginForm.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/_CLIENT/fLoginForm.dfm
new file mode 100644
index 0000000..9b375ca
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/_CLIENT/fLoginForm.dfm	
@@ -0,0 +1,93 @@
+object LoginForm: TLoginForm
+  Left = 408
+  Top = 136
+  ActiveControl = edUsername
+  BorderStyle = bsDialog
+  Caption = 'Login'
+  ClientHeight = 128
+  ClientWidth = 374
+  Color = clBtnFace
+  Font.Charset = DEFAULT_CHARSET
+  Font.Color = clWindowText
+  Font.Height = -11
+  Font.Name = 'Tahoma'
+  Font.Style = []
+  OldCreateOrder = False
+  Position = poMainFormCenter
+  OnCreate = FormCreate
+  PixelsPerInch = 96
+  TextHeight = 13
+  object Label1: TLabel
+    Left = 8
+    Top = 15
+    Width = 56
+    Height = 13
+    Caption = '&User Name:'
+    FocusControl = edUsername
+  end
+  object Label2: TLabel
+    Left = 8
+    Top = 42
+    Width = 50
+    Height = 13
+    Caption = '&Password:'
+    FocusControl = edPassword
+  end
+  object Label3: TLabel
+    Left = 8
+    Top = 69
+    Width = 50
+    Height = 13
+    Caption = '&Database:'
+    FocusControl = edDatabaseName
+  end
+  object edUsername: TEdit
+    Left = 80
+    Top = 12
+    Width = 286
+    Height = 21
+    TabOrder = 0
+    OnChange = edPasswordChange
+  end
+  object edPassword: TEdit
+    Left = 80
+    Top = 39
+    Width = 286
+    Height = 21
+    PasswordChar = '*'
+    TabOrder = 1
+    OnChange = edPasswordChange
+  end
+  object bOk: TButton
+    Left = 210
+    Top = 95
+    Width = 75
+    Height = 25
+    Anchors = [akRight, akBottom]
+    Caption = 'OK'
+    Default = True
+    ModalResult = 1
+    TabOrder = 2
+  end
+  object bCancel: TButton
+    Left = 291
+    Top = 95
+    Width = 75
+    Height = 25
+    Anchors = [akRight, akBottom]
+    Cancel = True
+    Caption = 'Cancel'
+    ModalResult = 2
+    TabOrder = 3
+  end
+  object edDatabaseName: TComboBox
+    Left = 80
+    Top = 66
+    Width = 286
+    Height = 21
+    Style = csDropDownList    
+    ItemHeight = 13
+    TabOrder = 4
+    OnChange = edPasswordChange
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/_CLIENT/fLoginForm.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/_CLIENT/fLoginForm.pas
new file mode 100644
index 0000000..df186ef
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/_CLIENT/fLoginForm.pas	
@@ -0,0 +1,47 @@
+unit fLoginForm;
+
+interface
+
+uses
+  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
+  Dialogs, StdCtrls;
+
+type
+  TLoginForm = class(TForm)
+    Label1: TLabel;
+    Label2: TLabel;
+    Label3: TLabel;
+    edUsername: TEdit;
+    edPassword: TEdit;
+    edDatabaseName: TComboBox;
+    bOk: TButton;
+    bCancel: TButton;
+    procedure edPasswordChange(Sender: TObject);
+    procedure FormCreate(Sender: TObject);
+  private
+    procedure ValidateInput;
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+implementation
+
+{$R *.dfm}
+
+procedure TLoginForm.edPasswordChange(Sender: TObject);
+begin
+  ValidateInput;
+end;
+
+procedure TLoginForm.FormCreate(Sender: TObject);
+begin
+  ValidateInput;
+end;
+
+procedure TLoginForm.ValidateInput;
+begin
+  bOk.Enabled := (edUsername.Text <> '') and (edPassword.Text <> '');
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/fServerDataModule.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/fServerDataModule.dfm
new file mode 100644
index 0000000..2cdf891
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/fServerDataModule.dfm	
@@ -0,0 +1,58 @@
+object ServerDataModule: TServerDataModule
+  OldCreateOrder = False
+  OnCreate = DataModuleCreate
+  Left = 362
+  Top = 208
+  Height = 207
+  Width = 352
+  object Server: TRO$SRVCLSNAME
+    Dispatchers = <
+      item
+        Name = 'Message'
+        Message = Message
+        Enabled = True
+      end>
+    Left = 32
+    Top = 8
+  end
+  object Message: TRO$MSGCLSNAME
+    Left = 34
+    Top = 56
+  end
+  object ConnectionManager: TDAConnectionManager
+    MaxPoolSize = 10
+    PoolTimeoutSeconds = 60
+    PoolBehaviour = pbWait
+    WaitIntervalSeconds = 1
+    Connections = <>
+    DriverManager = DriverManager
+    PoolingEnabled = True
+    Left = 136
+    Top = 56
+  end
+  object DriverManager: TDADriverManager
+    DriverDirectory = '%SYSTEM%\'
+    AutoLoad = False
+    TraceActive = False
+    TraceFlags = []
+    Left = 136
+    Top = 10
+  end
+  object ADODriver: TDAADODriver
+    Left = 256
+    Top = 8
+  end
+  object IBXDriver: TDAIBXDriver
+    Left = 256
+    Top = 56
+  end
+  object DataDictionary: TDADataDictionary
+    Fields = <>
+    Left = 32
+    Top = 104
+  end
+  object SessionManager: TROInMemorySessionManager
+    Left = 136
+    Top = 104
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/fServerDataModule.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/fServerDataModule.pas
new file mode 100644
index 0000000..82fe052
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/fServerDataModule.pas	
@@ -0,0 +1,42 @@
+unit fServerDataModule;
+
+interface
+
+uses
+  SysUtils, Classes,
+  uROClient, uROPoweredByRemObjectsButton, uROClientIntf, uROServer,
+  $MESSAGEUNIT, $SERVERUNIT,
+  uDAEngine, uDADriverManager, uDAClasses, uROSessions,
+  uDAIBXDriver, uDAADODriver;
+
+type
+  TServerDataModule = class(TDataModule)
+    Server: TRO$SRVCLSNAME;
+    Message: TRO$MSGCLSNAME;
+    ConnectionManager: TDAConnectionManager;
+    DriverManager: TDADriverManager;
+    ADODriver: TDAADODriver;
+    IBXDriver: TDAIBXDriver;
+    DataDictionary: TDADataDictionary;
+    SessionManager: TROInMemorySessionManager;
+    
+    procedure DataModuleCreate(Sender: TObject);
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+var
+  ServerDataModule: TServerDataModule;
+
+implementation
+
+{$R *.dfm}
+
+procedure TServerDataModule.DataModuleCreate(Sender: TObject);
+begin
+  Server.Active := true;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/fServerForm.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/fServerForm.dfm
new file mode 100644
index 0000000..77cfe95
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/fServerForm.dfm	
@@ -0,0 +1,23 @@
+object ServerForm: TServerForm
+  Left = 372
+  Top = 277
+  BorderStyle = bsDialog
+  Caption = 'Data Abstract Server'
+  ClientHeight = 64
+  ClientWidth = 228
+  Color = clBtnFace
+  Font.Charset = DEFAULT_CHARSET
+  Font.Color = clWindowText
+  Font.Height = -11
+  Font.Style = []
+  ParentFont = True
+  OldCreateOrder = False
+  Position = poScreenCenter
+  PixelsPerInch = 96
+  TextHeight = 13
+  object DAPoweredByDataAbstractButton1: TDAPoweredByDataAbstractButton
+    Left = 8
+    Top = 8
+    Cursor = crHandPoint
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/fServerForm.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/fServerForm.pas
new file mode 100644
index 0000000..08fb16d
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/DA/VCLMULTIDBLOGINEXE/fServerForm.pas	
@@ -0,0 +1,25 @@
+unit fServerForm;
+
+interface
+
+uses
+  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls,
+  uDAPoweredByDataAbstractButton;
+
+type
+  TServerForm = class(TForm)
+    DAPoweredByDataAbstractButton1: TDAPoweredByDataAbstractButton;
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+var
+  ServerForm: TServerForm;
+
+implementation
+
+{$R *.dfm}
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache/$PRJNAME.dpr b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache/$PRJNAME.dpr
new file mode 100644
index 0000000..6ba717c
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache/$PRJNAME.dpr	
@@ -0,0 +1,21 @@
+library $PRJNAME;
+
+{#ROGEN:$SVCLIBNAME.rodl} // RemObjects: Careful, do not remove!
+
+uses
+  uROComInit,
+  WebBroker,
+  ApacheApp,
+  Unit1 in 'Unit1.pas' {WebModule1: TWebModule};
+
+{$R *.RES}
+{$R RODLFile.RES} // RemObjects: Careful, do not remove!
+
+exports
+  apache_module name '$PRJNAME_module';
+
+begin
+  Application.Initialize;
+  Application.CreateForm(TWebModule1, WebModule1);
+  Application.Run;
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache/$PRJNAME.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache/$PRJNAME.res
new file mode 100644
index 0000000..78dee1f
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache/$PRJNAME.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache/Icon.ico b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache/Icon.ico
new file mode 100644
index 0000000..064bbbf
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache/Icon.ico differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache/Info.ini b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache/Info.ini
new file mode 100644
index 0000000..6716baa
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache/Info.ini	
@@ -0,0 +1,5 @@
+[Information]
+Name=Apache 1.0 DSO Server
+Description=Apache 1 Shared Module (DSO) Server Project
+MinimumVersion=6
+FixedServer=TROWebBrokerServer
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache/Unit1.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache/Unit1.dfm
new file mode 100644
index 0000000..620a86e
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache/Unit1.dfm	
@@ -0,0 +1,23 @@
+object WebModule1: TWebModule1
+  OldCreateOrder = False
+  Actions = <>
+  Left = 522
+  Top = 415
+  Height = 308
+  Width = 462
+  object ROMessage: TRO$MSGCLSNAME
+    Left = 24
+    Top = 16
+  end
+  object ROServer: TRO$SRVCLSNAME
+    Active = True
+    Dispatchers = <
+      item
+        Name = 'ROMessage'
+        Message = ROMessage
+        Enabled = True
+      end>
+    Left = 56
+    Top = 8
+  end
+end
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache/Unit1.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache/Unit1.pas
new file mode 100644
index 0000000..9360375
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache/Unit1.pas	
@@ -0,0 +1,26 @@
+unit Unit1;
+
+interface
+
+uses
+  SysUtils, Classes, HTTPApp, uROClient, 
+  uROClientIntf, $MESSAGEUNIT, uROServer, $SERVERUNIT;
+
+type
+  TWebModule1 = class(TWebModule)
+    ROMessage: TRO$MSGCLSNAME;
+    ROServer: TRO$SRVCLSNAME;
+  private
+
+  public
+
+  end;
+
+var
+  WebModule1: TWebModule1;
+
+implementation
+
+{$R *.DFM}
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache2/$PRJNAME.dpr b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache2/$PRJNAME.dpr
new file mode 100644
index 0000000..607fd92
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache2/$PRJNAME.dpr	
@@ -0,0 +1,21 @@
+library $PRJNAME;
+
+{#ROGEN:$SVCLIBNAME.rodl} // RemObjects: Careful, do not remove!
+
+uses
+  uROComInit,
+  WebBroker,
+  ApacheTwoApp,
+  Unit1 in 'Unit1.pas' {WebModule1: TWebModule};
+
+{$R *.RES}
+{$R RODLFile.RES} // RemObjects: Careful, do not remove!
+
+exports
+  apache_module name '$PRJNAME_module';
+
+begin
+  Application.Initialize;
+  Application.CreateForm(TWebModule1, WebModule1);
+  Application.Run;
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache2/$PRJNAME.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache2/$PRJNAME.res
new file mode 100644
index 0000000..78dee1f
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache2/$PRJNAME.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache2/Icon.ico b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache2/Icon.ico
new file mode 100644
index 0000000..064bbbf
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache2/Icon.ico differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache2/Info.ini b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache2/Info.ini
new file mode 100644
index 0000000..0faac96
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache2/Info.ini	
@@ -0,0 +1,5 @@
+[Information]
+Name=Apache 2.0 DSO Server
+Description=Apache 2 Shared Module (DSO) Server Project
+MinimumVersion=7
+FixedServer=TROWebBrokerServer
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache2/Unit1.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache2/Unit1.dfm
new file mode 100644
index 0000000..620a86e
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache2/Unit1.dfm	
@@ -0,0 +1,23 @@
+object WebModule1: TWebModule1
+  OldCreateOrder = False
+  Actions = <>
+  Left = 522
+  Top = 415
+  Height = 308
+  Width = 462
+  object ROMessage: TRO$MSGCLSNAME
+    Left = 24
+    Top = 16
+  end
+  object ROServer: TRO$SRVCLSNAME
+    Active = True
+    Dispatchers = <
+      item
+        Name = 'ROMessage'
+        Message = ROMessage
+        Enabled = True
+      end>
+    Left = 56
+    Top = 8
+  end
+end
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache2/Unit1.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache2/Unit1.pas
new file mode 100644
index 0000000..9360375
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Apache2/Unit1.pas	
@@ -0,0 +1,26 @@
+unit Unit1;
+
+interface
+
+uses
+  SysUtils, Classes, HTTPApp, uROClient, 
+  uROClientIntf, $MESSAGEUNIT, uROServer, $SERVERUNIT;
+
+type
+  TWebModule1 = class(TWebModule)
+    ROMessage: TRO$MSGCLSNAME;
+    ROServer: TRO$SRVCLSNAME;
+  private
+
+  public
+
+  end;
+
+var
+  WebModule1: TWebModule1;
+
+implementation
+
+{$R *.DFM}
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/COMBOEXE/$PRJNAME.dpr b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/COMBOEXE/$PRJNAME.dpr
new file mode 100644
index 0000000..021a9f3
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/COMBOEXE/$PRJNAME.dpr	
@@ -0,0 +1,26 @@
+program $PRJNAME;
+
+{#ROGEN:$SVCLIBNAME.rodl} // RemObjects: Careful, do not remove!
+
+uses
+  uROComInit,
+  uROComboService,
+  Forms,
+  fServerDataModule in 'fServerDataModule.pas' {ServerDataModule: TDataModule},
+  fServerForm in 'fServerForm.pas' {ServerForm};
+
+{$R *.res}
+{$R RODLFile.res}
+
+begin
+  if ROStartService('$PRJNAME', '$PRJNAME') then begin
+    ROService.CreateForm(TServerDataModule, ServerDataModule);
+    ROService.Run;
+    Exit;
+  end;
+
+  Application.Initialize;
+  Application.CreateForm(TServerDataModule, ServerDataModule);
+  Application.CreateForm(TServerForm, ServerForm);
+  Application.Run;
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/COMBOEXE/$PRJNAME.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/COMBOEXE/$PRJNAME.res
new file mode 100644
index 0000000..78dee1f
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/COMBOEXE/$PRJNAME.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/COMBOEXE/Icon.ico b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/COMBOEXE/Icon.ico
new file mode 100644
index 0000000..1cd8625
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/COMBOEXE/Icon.ico differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/COMBOEXE/Info.ini b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/COMBOEXE/Info.ini
new file mode 100644
index 0000000..0d315fe
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/COMBOEXE/Info.ini	
@@ -0,0 +1,5 @@
+[Information]
+Name=Combo Service/Standalone
+Description=Combo Standalone Server
+InvalidServers=TROWebBrokerServer,TROWinMessageServer,TROLocalServer
+DefaultServer=TROIndyHTTPServer
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/COMBOEXE/fServerDataModule.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/COMBOEXE/fServerDataModule.dfm
new file mode 100644
index 0000000..5ff5054
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/COMBOEXE/fServerDataModule.dfm	
@@ -0,0 +1,23 @@
+object ServerDataModule: TServerDataModule
+  OldCreateOrder = False
+  OnCreate = DataModuleCreate
+  Left = 475
+  Top = 159
+  Height = 189
+  Width = 292
+  object ROMessage: TRO$MSGCLSNAME
+    Left = 40
+    Top = 8
+  end
+  object ROServer: TRO$SRVCLSNAME
+    Active = False
+    Dispatchers = <
+      item
+        Name = 'ROMessage'
+        Message = ROMessage
+        Enabled = True
+      end>
+    Left = 90
+    Top = 8
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/COMBOEXE/fServerDataModule.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/COMBOEXE/fServerDataModule.pas
new file mode 100644
index 0000000..6ff6fc6
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/COMBOEXE/fServerDataModule.pas	
@@ -0,0 +1,33 @@
+unit fServerDataModule;
+
+interface
+
+uses
+  SysUtils, Classes, uROClient, uROServer, uROIndyTCPServer,
+  uROPoweredByRemObjectsButton, uROClientIntf, uROClasses,
+  $MESSAGEUNIT, $SERVERUNIT;
+
+type
+  TServerDataModule = class(TDataModule)
+    ROMessage: TRO$MSGCLSNAME;
+    ROServer: TRO$SRVCLSNAME;
+    procedure DataModuleCreate(Sender: TObject);
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+var
+  ServerDataModule: TServerDataModule;
+
+implementation
+
+{$R *.dfm}
+
+procedure TServerDataModule.DataModuleCreate(Sender: TObject);
+begin
+  ROServer.Active := TRUE;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/COMBOEXE/fServerForm.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/COMBOEXE/fServerForm.dfm
new file mode 100644
index 0000000..269fda2
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/COMBOEXE/fServerForm.dfm	
@@ -0,0 +1,25 @@
+object ServerForm: TServerForm
+  Left = 372
+  Top = 277
+  BorderStyle = bsDialog
+  Caption = 'RemObjects Server'
+  ClientHeight = 64
+  ClientWidth = 228
+  Color = clBtnFace
+  Font.Charset = DEFAULT_CHARSET
+  Font.Color = clWindowText
+  Font.Height = -11
+  Font.Style = []
+  ParentFont = True
+  OldCreateOrder = False
+  Position = poScreenCenter
+  PixelsPerInch = 96
+  TextHeight = 13
+  object RoPoweredByRemObjectsButton1: TROPoweredByRemObjectsButton
+    Left = 8
+    Top = 8
+    Width = 212
+    Height = 48
+    Cursor = crHandPoint
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/COMBOEXE/fServerForm.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/COMBOEXE/fServerForm.pas
new file mode 100644
index 0000000..131f03d
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/COMBOEXE/fServerForm.pas	
@@ -0,0 +1,26 @@
+unit fServerForm;
+
+interface
+
+uses
+  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls,
+  uROClient, uROPoweredByRemObjectsButton, uROClientIntf, uROServer, uROClasses;
+
+type
+  TServerForm = class(TForm)
+    RoPoweredByRemObjectsButton1: TRoPoweredByRemObjectsButton;
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+var
+  ServerForm: TServerForm;
+
+implementation
+
+
+{$R *.dfm}
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/CONSOLE/$PRJNAME.dpr b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/CONSOLE/$PRJNAME.dpr
new file mode 100644
index 0000000..1d8214d
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/CONSOLE/$PRJNAME.dpr	
@@ -0,0 +1,31 @@
+program $PRJNAME;
+
+{$APPTYPE CONSOLE}
+{#ROGEN:$SVCLIBNAME.rodl} // RemObjects: Careful, do not remove!
+
+uses
+  uROComInit,
+  uROServer,
+  $MESSAGEUNIT, 
+  $SERVERUNIT;
+
+{$R *.res}
+{$R RODLFile.res}
+
+var 
+  ROMessage: TRO$MSGCLSNAME;
+  ROServer: TRO$SRVCLSNAME;
+begin
+  Writeln('RemObjects SDK for Delphi - Command Line Server');
+  ROMessage := TRO$MSGCLSNAME.Create(nil);
+  ROServer := TRO$SRVCLSNAME.Create(nil);
+  TROMessageDispatcher(ROServer.Dispatchers.Add).Message := ROMessage;
+  try
+    ROServer.Active := true;
+    WriteLn('Server is active, press Enter to stop.');
+    Readln;
+  finally
+    ROServer.Free;
+    ROMessage.Free;
+  end;
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/CONSOLE/$PRJNAME.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/CONSOLE/$PRJNAME.res
new file mode 100644
index 0000000..78dee1f
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/CONSOLE/$PRJNAME.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/CONSOLE/Icon.ico b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/CONSOLE/Icon.ico
new file mode 100644
index 0000000..a19ef58
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/CONSOLE/Icon.ico differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/CONSOLE/Info.ini b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/CONSOLE/Info.ini
new file mode 100644
index 0000000..435f675
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/CONSOLE/Info.ini	
@@ -0,0 +1,5 @@
+[Information]
+Name=Command Line Server
+Description=Command Line Based Standalone Server
+InvalidServers=TROWebBrokerServer,TROLocalServer
+DefaultServer=TROIndyHTTPServer
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Cgi/$PRJNAME.dpr b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Cgi/$PRJNAME.dpr
new file mode 100644
index 0000000..96f5739
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Cgi/$PRJNAME.dpr	
@@ -0,0 +1,19 @@
+program  $PRJNAME;
+
+{$APPTYPE CONSOLE}
+{#ROGEN:$SVCLIBNAME.rodl} // RemObjects: Careful, do not remove!
+
+uses
+  uROComInit,
+  WebBroker,
+  CGIApp,
+  Unit1 in 'Unit1.pas' {WebModule1: TWebModule};
+
+{$R *.RES}
+{$R RODLFile.RES} // RemObjects: Careful, do not remove!
+
+begin
+  Application.Initialize;
+  Application.CreateForm(TWebModule1, WebModule1);
+  Application.Run;
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Cgi/$PRJNAME.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Cgi/$PRJNAME.res
new file mode 100644
index 0000000..78dee1f
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Cgi/$PRJNAME.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Cgi/Icon.ico b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Cgi/Icon.ico
new file mode 100644
index 0000000..a19ef58
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Cgi/Icon.ico differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Cgi/Info.ini b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Cgi/Info.ini
new file mode 100644
index 0000000..1369427
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Cgi/Info.ini	
@@ -0,0 +1,4 @@
+[Information]
+Name=CGI Server
+Description=CGI Server Project
+FixedServer=TROWebBrokerServer
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Cgi/Unit1.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Cgi/Unit1.dfm
new file mode 100644
index 0000000..620a86e
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Cgi/Unit1.dfm	
@@ -0,0 +1,23 @@
+object WebModule1: TWebModule1
+  OldCreateOrder = False
+  Actions = <>
+  Left = 522
+  Top = 415
+  Height = 308
+  Width = 462
+  object ROMessage: TRO$MSGCLSNAME
+    Left = 24
+    Top = 16
+  end
+  object ROServer: TRO$SRVCLSNAME
+    Active = True
+    Dispatchers = <
+      item
+        Name = 'ROMessage'
+        Message = ROMessage
+        Enabled = True
+      end>
+    Left = 56
+    Top = 8
+  end
+end
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Cgi/Unit1.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Cgi/Unit1.pas
new file mode 100644
index 0000000..9360375
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Cgi/Unit1.pas	
@@ -0,0 +1,26 @@
+unit Unit1;
+
+interface
+
+uses
+  SysUtils, Classes, HTTPApp, uROClient, 
+  uROClientIntf, $MESSAGEUNIT, uROServer, $SERVERUNIT;
+
+type
+  TWebModule1 = class(TWebModule)
+    ROMessage: TRO$MSGCLSNAME;
+    ROServer: TRO$SRVCLSNAME;
+  private
+
+  public
+
+  end;
+
+var
+  WebModule1: TWebModule1;
+
+implementation
+
+{$R *.DFM}
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/ClxExe/$PRJNAME.dpr b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/ClxExe/$PRJNAME.dpr
new file mode 100644
index 0000000..c61f188
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/ClxExe/$PRJNAME.dpr	
@@ -0,0 +1,17 @@
+program $PRJNAME;
+
+{#ROGEN:$SVCLIBNAME.rodl} // RemObjects: Careful, do not remove!
+
+uses
+  uROComInit,
+  QForms,
+  fServerForm in 'fServerForm.pas' {ServerForm};
+
+{$R *.res}
+{$R RODLFile.res}
+
+begin
+  Application.Initialize;
+  Application.CreateForm(TServerForm, ServerForm);
+  Application.Run;
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/ClxExe/$PRJNAME.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/ClxExe/$PRJNAME.res
new file mode 100644
index 0000000..78dee1f
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/ClxExe/$PRJNAME.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/ClxExe/Icon.ico b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/ClxExe/Icon.ico
new file mode 100644
index 0000000..7c265d0
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/ClxExe/Icon.ico differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/ClxExe/Info.ini b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/ClxExe/Info.ini
new file mode 100644
index 0000000..52e14a9
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/ClxExe/Info.ini	
@@ -0,0 +1,6 @@
+[Information]
+Name=CLX Standalone
+Description=CLX-Based Standalone Server
+InvalidServers=TROWebBrokerServer,TROWinMessageServer,TRONamedPipeServer,TROWinInetHTTPChannel,TROLocalServer
+MaximumVersion=7
+DefaultServer=TROIndyHTTPServer
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/ClxExe/fServerForm.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/ClxExe/fServerForm.pas
new file mode 100644
index 0000000..7809ff2
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/ClxExe/fServerForm.pas	
@@ -0,0 +1,28 @@
+unit fServerForm;
+
+interface
+
+uses
+  SysUtils, Types, Classes, Variants, 
+  QTypes, QGraphics, QControls, QForms, QDialogs, QStdCtrls, 
+  uROClient, uROPoweredByRemObjectsButton, uROClientIntf, uROServer, 
+  $MESSAGEUNIT, $SERVERUNIT;
+
+type
+  TServerForm = class(TForm)
+    ROMessage: TRO$MSGCLSNAME;
+    ROServer: TRO$SRVCLSNAME;
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+var
+  ServerForm: TServerForm;
+
+implementation
+
+{$R *.xfm}
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/ClxExe/fServerForm.xfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/ClxExe/fServerForm.xfm
new file mode 100644
index 0000000..f2b5b8d
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/ClxExe/fServerForm.xfm	
@@ -0,0 +1,26 @@
+object ServerForm: TServerForm
+  Left = 227
+  Top = 213
+  Width = 403
+  Height = 207
+  Caption = 'RemObjects Server'
+  Color = clBackground
+  PixelsPerInch = 96
+  TextHeight = 13
+  TextWidth = 6
+  object ROMessage: TRO$MSGCLSNAME
+    Left = 36
+    Top = 8
+  end
+  object ROServer: TRO$SRVCLSNAME
+    Active = False
+    Dispatchers = <
+      item
+        Name = 'ROMessage'
+        Message = ROMessage
+        Enabled = True
+      end>
+    Left = 8
+    Top = 8
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/DLL/$PRJNAME.dpr b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/DLL/$PRJNAME.dpr
new file mode 100644
index 0000000..95eaf93
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/DLL/$PRJNAME.dpr	
@@ -0,0 +1,34 @@
+library $PRJNAME;
+
+{#ROGEN:$SVCLIBNAME.rodl} // RemObjects: Careful, do not remove!
+
+uses
+  uROComInit,
+  Windows,
+  uRODLLServer, // Do not remove! Creates the instance of the DLL server
+  $MESSAGEUNIT;
+
+{$R *.RES}
+{$R RODLFile.RES} // RemObjects: Careful, do not remove!
+
+
+var $MSGCLSNAME : TRO$MSGCLSNAME;
+
+procedure ROProc(Reason:integer);
+begin
+  case Reason of
+    DLL_PROCESS_ATTACH: begin
+      $MSGCLSNAME := TRO$MSGCLSNAME.Create();
+      RegisterMessage($MSGCLSNAME);
+    end;
+
+    DLL_PROCESS_DETACH: begin
+      $MSGCLSNAME.Free;
+    end;
+  end
+end;
+
+begin
+  DLLProc:=@ROProc;
+  ROProc(DLL_PROCESS_ATTACH)
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/DLL/$PRJNAME.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/DLL/$PRJNAME.res
new file mode 100644
index 0000000..78dee1f
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/DLL/$PRJNAME.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/DLL/Icon.ico b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/DLL/Icon.ico
new file mode 100644
index 0000000..0de5912
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/DLL/Icon.ico differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/DLL/Info.ini b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/DLL/Info.ini
new file mode 100644
index 0000000..0418cc0
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/DLL/Info.ini	
@@ -0,0 +1,5 @@
+[Information]
+Name=DLL Server
+Description=RemObjects DLL Server Project
+FixedServer=TRODLLServer
+FixedChannel=DllChannel
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Isapi/$PRJNAME.dpr b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Isapi/$PRJNAME.dpr
new file mode 100644
index 0000000..f50edc5
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Isapi/$PRJNAME.dpr	
@@ -0,0 +1,30 @@
+library $PRJNAME;
+
+{#ROGEN:$SVCLIBNAME.rodl} // RemObjects: Careful, do not remove!
+
+uses
+  uROComInit,
+  ActiveX,
+  ComObj,
+  WebBroker,
+  ISAPIApp,
+  Unit1 in 'Unit1.pas' {WebModule1: TWebModule};
+
+{$R *.RES}
+{$R RODLFile.RES} // RemObjects: Careful, do not remove!
+
+{
+  Important note: if you have Delphi 6 you should add the unit ISAPIThreadPool to the above list
+}
+
+exports
+  GetExtensionVersion,
+  HttpExtensionProc,
+  TerminateExtension;
+
+begin
+  CoInitFlags := COINIT_MULTITHREADED;
+  Application.Initialize;
+  Application.CreateForm(TWebModule1, WebModule1);
+  Application.Run;
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Isapi/$PRJNAME.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Isapi/$PRJNAME.res
new file mode 100644
index 0000000..78dee1f
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Isapi/$PRJNAME.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Isapi/Icon.ico b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Isapi/Icon.ico
new file mode 100644
index 0000000..064bbbf
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Isapi/Icon.ico differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Isapi/Info.ini b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Isapi/Info.ini
new file mode 100644
index 0000000..ae18167
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Isapi/Info.ini	
@@ -0,0 +1,4 @@
+[Information]
+Name=ISAPI/NSAPI Server
+Description=ISAPI/NSAPI Server Project
+FixedServer=TROWebBrokerServer
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Isapi/Unit1.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Isapi/Unit1.dfm
new file mode 100644
index 0000000..620a86e
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Isapi/Unit1.dfm	
@@ -0,0 +1,23 @@
+object WebModule1: TWebModule1
+  OldCreateOrder = False
+  Actions = <>
+  Left = 522
+  Top = 415
+  Height = 308
+  Width = 462
+  object ROMessage: TRO$MSGCLSNAME
+    Left = 24
+    Top = 16
+  end
+  object ROServer: TRO$SRVCLSNAME
+    Active = True
+    Dispatchers = <
+      item
+        Name = 'ROMessage'
+        Message = ROMessage
+        Enabled = True
+      end>
+    Left = 56
+    Top = 8
+  end
+end
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Isapi/Unit1.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Isapi/Unit1.pas
new file mode 100644
index 0000000..9360375
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Isapi/Unit1.pas	
@@ -0,0 +1,26 @@
+unit Unit1;
+
+interface
+
+uses
+  SysUtils, Classes, HTTPApp, uROClient, 
+  uROClientIntf, $MESSAGEUNIT, uROServer, $SERVERUNIT;
+
+type
+  TWebModule1 = class(TWebModule)
+    ROMessage: TRO$MSGCLSNAME;
+    ROServer: TRO$SRVCLSNAME;
+  private
+
+  public
+
+  end;
+
+var
+  WebModule1: TWebModule1;
+
+implementation
+
+{$R *.DFM}
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/LOCAL/$PRJNAME.dpr b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/LOCAL/$PRJNAME.dpr
new file mode 100644
index 0000000..f5789b6
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/LOCAL/$PRJNAME.dpr	
@@ -0,0 +1,20 @@
+program $PRJNAME;
+
+{#ROGEN:$SVCLIBNAME.rodl} // RemObjects: Careful, do not remove!
+
+uses
+  Forms,
+  fMainForm in 'fMainForm.pas' {Form1},
+  fServerDataModule in 'fServerDataModule.pas' {ServerDataModule: TDataModule},
+  fClientDataModule in 'fClientDataModule.pas' {ClientDataModule: TDataModule};
+
+{$R *.res}
+{$R RODLFile.res}
+
+begin
+  Application.Initialize;
+  Application.CreateForm(TForm1, Form1);
+  Application.CreateForm(TServerDataModule, ServerDataModule);
+  Application.CreateForm(TClientDataModule, ClientDataModule);
+  Application.Run;
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/LOCAL/$PRJNAME.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/LOCAL/$PRJNAME.res
new file mode 100644
index 0000000..dc22e33
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/LOCAL/$PRJNAME.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/LOCAL/Icon.ico b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/LOCAL/Icon.ico
new file mode 100644
index 0000000..10af842
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/LOCAL/Icon.ico differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/LOCAL/Info.ini b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/LOCAL/Info.ini
new file mode 100644
index 0000000..3015715
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/LOCAL/Info.ini	
@@ -0,0 +1,5 @@
+[Information]
+Name=Local Application
+Description=CLient and Server in one application
+FixedServer=TROLocalServer
+AllowClient=0
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/LOCAL/fClientDataModule.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/LOCAL/fClientDataModule.dfm
new file mode 100644
index 0000000..18de835
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/LOCAL/fClientDataModule.dfm	
@@ -0,0 +1,18 @@
+object ClientDataModule: TClientDataModule
+  OldCreateOrder = False
+  Left = 448
+  Top = 111
+  Height = 150
+  Width = 215
+  object ROMessage: TRO$MSGCLSNAME
+    Left = 24
+    Top = 8
+  end
+  object ROChannel: TROLocalChannel
+    ServerLocators = <>
+    DispatchOptions = []
+    ServerChannel = ServerDataModule.ROServer
+    Left = 24
+    Top = 56
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/LOCAL/fClientDataModule.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/LOCAL/fClientDataModule.pas
new file mode 100644
index 0000000..430a7dc
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/LOCAL/fClientDataModule.pas	
@@ -0,0 +1,27 @@
+unit fClientDataModule;
+
+interface
+
+uses
+  SysUtils, Classes, uROClient, uROLocalChannel, $MESSAGEUNIT;
+
+type
+  TClientDataModule = class(TDataModule)
+    ROMessage: TRO$MSGCLSNAME;
+    ROChannel: TROLocalChannel;
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+var
+  ClientDataModule: TClientDataModule;
+
+implementation
+
+uses fServerDataModule;
+
+{$R *.dfm}
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/LOCAL/fMainForm.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/LOCAL/fMainForm.dfm
new file mode 100644
index 0000000..e62d56b
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/LOCAL/fMainForm.dfm	
@@ -0,0 +1,24 @@
+object Form1: TForm1
+  Left = 192
+  Top = 114
+  Width = 236
+  Height = 99
+  Caption = 'Form1'
+  Color = clBtnFace
+  Font.Charset = DEFAULT_CHARSET
+  Font.Color = clWindowText
+  Font.Height = -11
+  Font.Style = []
+  ParentFont = True
+  OldCreateOrder = False
+  PixelsPerInch = 96
+  TextHeight = 13
+  object ROPoweredByRemObjectsButton1: TROPoweredByRemObjectsButton
+    Left = 8
+    Top = 8
+    Width = 212
+    Height = 48
+    Cursor = crHandPoint
+    ApplicationType = atClient
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/LOCAL/fMainForm.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/LOCAL/fMainForm.pas
new file mode 100644
index 0000000..7fee2ee
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/LOCAL/fMainForm.pas	
@@ -0,0 +1,25 @@
+unit fMainForm;
+
+interface
+
+uses
+  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
+  Dialogs, uROPoweredByRemObjectsButton;
+
+type
+  TForm1 = class(TForm)
+    ROPoweredByRemObjectsButton1: TROPoweredByRemObjectsButton;
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+var
+  Form1: TForm1;
+
+implementation
+
+{$R *.dfm}
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/LOCAL/fServerDataModule.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/LOCAL/fServerDataModule.dfm
new file mode 100644
index 0000000..663afc2
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/LOCAL/fServerDataModule.dfm	
@@ -0,0 +1,22 @@
+object ServerDataModule: TServerDataModule
+  OldCreateOrder = False
+  Left = 192
+  Top = 114
+  Height = 150
+  Width = 215
+  object ROMessage: TRO$MSGCLSNAME
+    Left = 24
+    Top = 8
+  end
+  object ROServer: TROLocalServer
+    Active = True
+    Dispatchers = <
+      item
+        Name = 'ROMessage'
+        Message = ROMessage
+        Enabled = True
+      end>
+    Left = 24
+    Top = 56
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/LOCAL/fServerDataModule.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/LOCAL/fServerDataModule.pas
new file mode 100644
index 0000000..bec1807
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/LOCAL/fServerDataModule.pas	
@@ -0,0 +1,26 @@
+unit fServerDataModule;
+
+interface
+
+uses
+  SysUtils, Classes, uROClient, uROServer, uROLocalServer,
+  $MESSAGEUNIT;
+
+type
+  TServerDataModule = class(TDataModule)
+    ROMessage: TRO$MSGCLSNAME;
+    ROServer: TROLocalServer;
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+var
+  ServerDataModule: TServerDataModule;
+
+implementation
+
+{$R *.dfm}
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Service/$PRJNAME.dpr b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Service/$PRJNAME.dpr
new file mode 100644
index 0000000..6ad6a63
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Service/$PRJNAME.dpr	
@@ -0,0 +1,17 @@
+program $PRJNAME;
+
+{#ROGEN:$SVCLIBNAME.rodl} // RemObjects: Careful, do not remove!
+
+uses
+  uROComInit,
+  SvcMgr,
+  Unit1 in 'Unit1.pas' {Service1: TService};
+
+{$R *.RES}
+{$R RODLFile.res}
+
+begin
+  Application.Initialize;
+  Application.CreateForm(TService1, Service1);
+  Application.Run;
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Service/$PRJNAME.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Service/$PRJNAME.res
new file mode 100644
index 0000000..78dee1f
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Service/$PRJNAME.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Service/Icon.ico b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Service/Icon.ico
new file mode 100644
index 0000000..e68604d
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Service/Icon.ico differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Service/Info.ini b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Service/Info.ini
new file mode 100644
index 0000000..9c6511a
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Service/Info.ini	
@@ -0,0 +1,5 @@
+[Information]
+Name=Windows Service
+Description=NT Service Application
+InvalidServers=TROWebBrokerServer,TROWinMessageServer,TROLocalServer
+DefaultServer=TROIndyHTTPServer
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Service/Unit1.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Service/Unit1.dfm
new file mode 100644
index 0000000..0099b32
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Service/Unit1.dfm	
@@ -0,0 +1,27 @@
+object Service1: TService1
+  OldCreateOrder = False
+  DisplayName = 'Service1'
+  OnContinue = ServiceContinue
+  OnPause = ServicePause
+  OnStart = ServiceStart
+  OnStop = ServiceStop
+  Left = 623
+  Top = 222
+  Height = 150
+  Width = 215
+  object ROMessage: TRO$MSGCLSNAME
+    Left = 64
+    Top = 88
+  end
+  object ROServer: TRO$SRVCLSNAME
+    Active = False
+    Dispatchers = <
+      item
+        Name = 'ROMessage'
+        Message = ROMessage
+        Enabled = True
+      end>
+    Left = 56
+    Top = 8
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Service/Unit1.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Service/Unit1.pas
new file mode 100644
index 0000000..6c01421
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/Service/Unit1.pas	
@@ -0,0 +1,61 @@
+unit Unit1;
+
+interface
+
+uses
+  Windows, Messages, SysUtils, Classes, Graphics, Controls, SvcMgr, Dialogs,
+  uROClient, uROClientIntf, uROServer, $MESSAGEUNIT, $SERVERUNIT;
+
+type
+  TService1 = class(TService)
+    ROMessage: TRO$MSGCLSNAME;
+    ROServer: TRO$SRVCLSNAME;
+    procedure ServiceStart(Sender: TService; var Started: Boolean);
+    procedure ServiceStop(Sender: TService; var Stopped: Boolean);
+    procedure ServicePause(Sender: TService; var Paused: Boolean);
+    procedure ServiceContinue(Sender: TService; var Continued: Boolean);
+  private
+    { Private declarations }
+  public
+    function GetServiceController: TServiceController; override;
+    { Public declarations }
+  end;
+
+var
+  Service1: TService1;
+
+implementation
+
+{$R *.dfm}
+
+procedure ServiceController(CtrlCode: DWord); stdcall;
+begin
+  Service1.Controller(CtrlCode);
+end;
+
+function TService1.GetServiceController: TServiceController;
+begin
+  Result := ServiceController;
+end;
+
+procedure TService1.ServiceStart(Sender:TService; var Started:Boolean);
+begin
+  RoServer.Active := true;
+end;
+
+procedure TService1.ServiceStop(Sender:TService; var Stopped:Boolean);
+begin
+  RoServer.Active := false;
+end;
+
+procedure TService1.ServicePause(Sender:TService; var Paused:Boolean);
+begin
+  RoServer.Active := false;
+end;
+
+procedure TService1.ServiceContinue(Sender:TService; var Continued:Boolean);
+begin
+  RoServer.Active := true;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/VclExe/$PRJNAME.dpr b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/VclExe/$PRJNAME.dpr
new file mode 100644
index 0000000..6502fa9
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/VclExe/$PRJNAME.dpr	
@@ -0,0 +1,17 @@
+program $PRJNAME;
+
+{#ROGEN:$SVCLIBNAME.rodl} // RemObjects: Careful, do not remove!
+
+uses
+  uROComInit,
+  Forms,
+  fServerForm in 'fServerForm.pas' {ServerForm};
+
+{$R *.res}
+{$R RODLFile.res}
+
+begin
+  Application.Initialize;
+  Application.CreateForm(TServerForm, ServerForm);
+  Application.Run;
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/VclExe/$PRJNAME.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/VclExe/$PRJNAME.res
new file mode 100644
index 0000000..78dee1f
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/VclExe/$PRJNAME.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/VclExe/Icon.ico b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/VclExe/Icon.ico
new file mode 100644
index 0000000..7c265d0
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/VclExe/Icon.ico differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/VclExe/Info.ini b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/VclExe/Info.ini
new file mode 100644
index 0000000..41db4ba
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/VclExe/Info.ini	
@@ -0,0 +1,5 @@
+[Information]
+Name=VCL Standalone
+Description=VCL Based Standalone Server
+InvalidServers=TROWebBrokerServer,TROLocalServer
+DefaultServer=TROIndyHTTPServer
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/VclExe/fServerForm.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/VclExe/fServerForm.dfm
new file mode 100644
index 0000000..fde06c3
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/VclExe/fServerForm.dfm	
@@ -0,0 +1,39 @@
+object ServerForm: TServerForm
+  Left = 372
+  Top = 277
+  BorderStyle = bsDialog
+  Caption = 'RemObjects Server'
+  ClientHeight = 64
+  ClientWidth = 228
+  Color = clBtnFace
+  Font.Charset = DEFAULT_CHARSET
+  Font.Color = clWindowText
+  Font.Height = -11
+  Font.Style = []
+  Position = poScreenCenter
+  ParentFont = True
+  OldCreateOrder = False
+  OnCreate = FormCreate
+  PixelsPerInch = 96
+  TextHeight = 13
+  object ROMessage: TRO$MSGCLSNAME
+    Left = 36
+    Top = 8
+  end
+  object ROServer: TRO$SRVCLSNAME
+    Active = False
+    Dispatchers = <
+      item
+        Name = 'ROMessage'
+        Message = ROMessage
+        Enabled = True
+      end>
+    Left = 8
+    Top = 8
+  end
+  object RoPoweredByRemObjectsButton1: TRoPoweredByRemObjectsButton
+    Left = 8
+    Top = 8
+    Cursor = crHandPoint
+  end
+end
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/VclExe/fServerForm.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/VclExe/fServerForm.pas
new file mode 100644
index 0000000..df805df
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/RO/VclExe/fServerForm.pas	
@@ -0,0 +1,35 @@
+unit fServerForm;
+
+interface
+
+uses
+  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls,
+  uROClient, uROPoweredByRemObjectsButton, uROClientIntf, uROServer,
+  $MESSAGEUNIT, $SERVERUNIT;
+
+type
+  TServerForm = class(TForm)
+    RoPoweredByRemObjectsButton1: TRoPoweredByRemObjectsButton;
+    ROMessage: TRO$MSGCLSNAME;
+    ROServer: TRO$SRVCLSNAME;
+    procedure FormCreate(Sender: TObject);
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+var
+  ServerForm: TServerForm;
+
+implementation
+
+
+{$R *.dfm}
+
+procedure TServerForm.FormCreate(Sender: TObject);
+begin
+  ROServer.Active := true;
+end;
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/TemplateOptions.ini b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/TemplateOptions.ini
new file mode 100644
index 0000000..3cd8a3d
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/TemplateOptions.ini	
@@ -0,0 +1,18 @@
+[ServerToChannelMapping]
+IndyHTTPServer=WinInetHTTPChannel
+BPDXHTTPServer=WinInetHTTPChannel
+WebBrokerServer=WinInetHTTPChannel
+BPDXTCPServer=IndyTCPChannel
+IpSuperHTTPServer=SynapseSuperHTTPChannel
+IpTCPServer=IndyTCPChannel
+IpHTTPServer=SynapseHTTPChannel
+
+[Class Factories]
+By Request=TROClassFactory
+Singleton Object=TROSingletonClassFactory
+Pooled Object=TROPooledClassFactory
+Per Client=TROPerCLientClassFactory
+
+[ComponentToUnitMapping]
+EmailChannel=uROIndyEmailChannel
+EmailServer=uROIndyEmailServer
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/_BDS/Client/$PRJNAMEClient.bdsproj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/_BDS/Client/$PRJNAMEClient.bdsproj
new file mode 100644
index 0000000..b543c93
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/_BDS/Client/$PRJNAMEClient.bdsproj	
@@ -0,0 +1,173 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+  <PersonalityInfo>
+    <Option>
+      <Option Name="Personality">Delphi.Personality</Option>
+      <Option Name="ProjectType"></Option>
+      <Option Name="Version">1.0</Option>
+      <Option Name="GUID">$NEWID</Option>
+    </Option>
+  </PersonalityInfo>
+  <Delphi.Personality>
+    <Source>
+      <Source Name="MainSource">$PRJNAMEClient.dpr</Source>
+    </Source>
+    <FileVersion>
+      <FileVersion Name="Version">7.0</FileVersion>
+    </FileVersion>
+    <Compiler>
+      <Compiler Name="A">8</Compiler>
+      <Compiler Name="B">0</Compiler>
+      <Compiler Name="C">1</Compiler>
+      <Compiler Name="D">1</Compiler>
+      <Compiler Name="E">0</Compiler>
+      <Compiler Name="F">0</Compiler>
+      <Compiler Name="G">1</Compiler>
+      <Compiler Name="H">1</Compiler>
+      <Compiler Name="I">1</Compiler>
+      <Compiler Name="J">0</Compiler>
+      <Compiler Name="K">0</Compiler>
+      <Compiler Name="L">1</Compiler>
+      <Compiler Name="M">0</Compiler>
+      <Compiler Name="N">1</Compiler>
+      <Compiler Name="O">1</Compiler>
+      <Compiler Name="P">1</Compiler>
+      <Compiler Name="Q">0</Compiler>
+      <Compiler Name="R">0</Compiler>
+      <Compiler Name="S">0</Compiler>
+      <Compiler Name="T">0</Compiler>
+      <Compiler Name="U">0</Compiler>
+      <Compiler Name="V">1</Compiler>
+      <Compiler Name="W">0</Compiler>
+      <Compiler Name="X">1</Compiler>
+      <Compiler Name="Y">1</Compiler>
+      <Compiler Name="Z">1</Compiler>
+      <Compiler Name="ShowHints">True</Compiler>
+      <Compiler Name="ShowWarnings">True</Compiler>
+      <Compiler Name="UnitAliases">WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;</Compiler>
+      <Compiler Name="NamespacePrefix"></Compiler>
+      <Compiler Name="GenerateDocumentation">False</Compiler>
+      <Compiler Name="DefaultNamespace"></Compiler>
+      <Compiler Name="SymbolDeprecated">True</Compiler>
+      <Compiler Name="SymbolLibrary">True</Compiler>
+      <Compiler Name="SymbolPlatform">True</Compiler>
+      <Compiler Name="SymbolExperimental">True</Compiler>
+      <Compiler Name="UnitLibrary">True</Compiler>
+      <Compiler Name="UnitPlatform">True</Compiler>
+      <Compiler Name="UnitDeprecated">True</Compiler>
+      <Compiler Name="UnitExperimental">True</Compiler>
+      <Compiler Name="HResultCompat">True</Compiler>
+      <Compiler Name="HidingMember">True</Compiler>
+      <Compiler Name="HiddenVirtual">True</Compiler>
+      <Compiler Name="Garbage">True</Compiler>
+      <Compiler Name="BoundsError">True</Compiler>
+      <Compiler Name="ZeroNilCompat">True</Compiler>
+      <Compiler Name="StringConstTruncated">True</Compiler>
+      <Compiler Name="ForLoopVarVarPar">True</Compiler>
+      <Compiler Name="TypedConstVarPar">True</Compiler>
+      <Compiler Name="AsgToTypedConst">True</Compiler>
+      <Compiler Name="CaseLabelRange">True</Compiler>
+      <Compiler Name="ForVariable">True</Compiler>
+      <Compiler Name="ConstructingAbstract">True</Compiler>
+      <Compiler Name="ComparisonFalse">True</Compiler>
+      <Compiler Name="ComparisonTrue">True</Compiler>
+      <Compiler Name="ComparingSignedUnsigned">True</Compiler>
+      <Compiler Name="CombiningSignedUnsigned">True</Compiler>
+      <Compiler Name="UnsupportedConstruct">True</Compiler>
+      <Compiler Name="FileOpen">True</Compiler>
+      <Compiler Name="FileOpenUnitSrc">True</Compiler>
+      <Compiler Name="BadGlobalSymbol">True</Compiler>
+      <Compiler Name="DuplicateConstructorDestructor">True</Compiler>
+      <Compiler Name="InvalidDirective">True</Compiler>
+      <Compiler Name="PackageNoLink">True</Compiler>
+      <Compiler Name="PackageThreadVar">True</Compiler>
+      <Compiler Name="ImplicitImport">True</Compiler>
+      <Compiler Name="HPPEMITIgnored">True</Compiler>
+      <Compiler Name="NoRetVal">True</Compiler>
+      <Compiler Name="UseBeforeDef">True</Compiler>
+      <Compiler Name="ForLoopVarUndef">True</Compiler>
+      <Compiler Name="UnitNameMismatch">True</Compiler>
+      <Compiler Name="NoCFGFileFound">True</Compiler>
+      <Compiler Name="MessageDirective">True</Compiler>
+      <Compiler Name="ImplicitVariants">True</Compiler>
+      <Compiler Name="UnicodeToLocale">True</Compiler>
+      <Compiler Name="LocaleToUnicode">True</Compiler>
+      <Compiler Name="ImagebaseMultiple">True</Compiler>
+      <Compiler Name="SuspiciousTypecast">True</Compiler>
+      <Compiler Name="PrivatePropAccessor">True</Compiler>
+      <Compiler Name="UnsafeType">False</Compiler>
+      <Compiler Name="UnsafeCode">False</Compiler>
+      <Compiler Name="UnsafeCast">False</Compiler>
+      <Compiler Name="OptionTruncated">True</Compiler>
+      <Compiler Name="WideCharReduced">True</Compiler>
+      <Compiler Name="DuplicatesIgnored">True</Compiler>
+    </Compiler>
+    <Linker>
+      <Linker Name="MapFile">0</Linker>
+      <Linker Name="OutputObjs">0</Linker>
+      <Linker Name="ConsoleApp">1</Linker>
+      <Linker Name="DebugInfo">False</Linker>
+      <Linker Name="RemoteSymbols">False</Linker>
+      <Linker Name="GenerateDRC">False</Linker>
+      <Linker Name="MinStackSize">16384</Linker>
+      <Linker Name="MaxStackSize">1048576</Linker>
+      <Linker Name="ImageBase">4194304</Linker>
+      <Linker Name="ExeDescription"></Linker>
+    </Linker>
+    <Directories>
+      <Directories Name="OutputDir"></Directories>
+      <Directories Name="UnitOutputDir"></Directories>
+      <Directories Name="PackageDLLOutputDir"></Directories>
+      <Directories Name="PackageDCPOutputDir"></Directories>
+      <Directories Name="SearchPath"></Directories>
+      <Directories Name="Packages"></Directories>
+      <Directories Name="Conditionals"></Directories>
+      <Directories Name="DebugSourceDirs"></Directories>
+      <Directories Name="UsePackages">False</Directories>
+    </Directories>
+    <Parameters>
+      <Parameters Name="RunParams"></Parameters>
+      <Parameters Name="HostApplication"></Parameters>
+      <Parameters Name="Launcher"></Parameters>
+      <Parameters Name="UseLauncher">False</Parameters>
+      <Parameters Name="DebugCWD"></Parameters>
+      <Parameters Name="RemoteHost"></Parameters>
+      <Parameters Name="RemotePath"></Parameters>
+      <Parameters Name="RemoteLauncher"></Parameters>
+      <Parameters Name="RemoteCWD"></Parameters>
+      <Parameters Name="RemoteDebug">False</Parameters>
+    </Parameters>
+    <Language>
+      <Language Name="ActiveLang"></Language>
+      <Language Name="ProjectLang">$00000000</Language>
+      <Language Name="RootDir"></Language>
+    </Language>
+    <VersionInfo>
+      <VersionInfo Name="IncludeVerInfo">False</VersionInfo>
+      <VersionInfo Name="AutoIncBuild">False</VersionInfo>
+      <VersionInfo Name="MajorVer">1</VersionInfo>
+      <VersionInfo Name="MinorVer">0</VersionInfo>
+      <VersionInfo Name="Release">0</VersionInfo>
+      <VersionInfo Name="Build">0</VersionInfo>
+      <VersionInfo Name="Debug">False</VersionInfo>
+      <VersionInfo Name="PreRelease">False</VersionInfo>
+      <VersionInfo Name="Special">False</VersionInfo>
+      <VersionInfo Name="Private">False</VersionInfo>
+      <VersionInfo Name="DLL">False</VersionInfo>
+      <VersionInfo Name="Locale">1033</VersionInfo>
+      <VersionInfo Name="CodePage">1252</VersionInfo>
+    </VersionInfo>
+    <VersionInfoKeys>
+      <VersionInfoKeys Name="CompanyName"></VersionInfoKeys>
+      <VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+      <VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys>
+      <VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+      <VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys>
+      <VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys>
+      <VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+      <VersionInfoKeys Name="ProductName"></VersionInfoKeys>
+      <VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+      <VersionInfoKeys Name="Comments"></VersionInfoKeys>
+    </VersionInfoKeys>
+  </Delphi.Personality>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/_BDS/Client/$PRJNAMEGroup.bdsgroup b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/_BDS/Client/$PRJNAMEGroup.bdsgroup
new file mode 100644
index 0000000..a024158
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/_BDS/Client/$PRJNAMEGroup.bdsgroup	
@@ -0,0 +1,19 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+  <PersonalityInfo>
+    <Option>
+      <Option Name="Personality">Default.Personality</Option>
+      <Option Name="ProjectType"></Option>
+      <Option Name="Version">1.0</Option>
+      <Option Name="GUID">$NEWID</Option>
+    </Option>
+  </PersonalityInfo>
+  <Default.Personality>
+    <Projects>
+      <Projects Name="$PRJNAME.exe">$PRJNAME.bdsproj</Projects>
+      <Projects Name="$PRJNAMEClient.exe">$PRJNAMEClient.bdsproj</Projects>
+      <Projects Name="Targets">$PRJNAME.exe $PRJNAMEClient.exe</Projects>
+    </Projects>
+    <Dependencies/>
+  </Default.Personality>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/_BDS/Server/$PRJNAME.bdsproj b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/_BDS/Server/$PRJNAME.bdsproj
new file mode 100644
index 0000000..719e2c5
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/_BDS/Server/$PRJNAME.bdsproj	
@@ -0,0 +1,173 @@
+<?xml version="1.0" encoding="utf-8"?>
+<BorlandProject>
+  <PersonalityInfo>
+    <Option>
+      <Option Name="Personality">Delphi.Personality</Option>
+      <Option Name="ProjectType"></Option>
+      <Option Name="Version">1.0</Option>
+      <Option Name="GUID">$NEWID</Option>
+    </Option>
+  </PersonalityInfo>
+  <Delphi.Personality>
+    <Source>
+      <Source Name="MainSource">$PRJNAME.dpr</Source>
+    </Source>
+    <FileVersion>
+      <FileVersion Name="Version">7.0</FileVersion>
+    </FileVersion>
+    <Compiler>
+      <Compiler Name="A">8</Compiler>
+      <Compiler Name="B">0</Compiler>
+      <Compiler Name="C">1</Compiler>
+      <Compiler Name="D">1</Compiler>
+      <Compiler Name="E">0</Compiler>
+      <Compiler Name="F">0</Compiler>
+      <Compiler Name="G">1</Compiler>
+      <Compiler Name="H">1</Compiler>
+      <Compiler Name="I">1</Compiler>
+      <Compiler Name="J">0</Compiler>
+      <Compiler Name="K">0</Compiler>
+      <Compiler Name="L">1</Compiler>
+      <Compiler Name="M">0</Compiler>
+      <Compiler Name="N">1</Compiler>
+      <Compiler Name="O">1</Compiler>
+      <Compiler Name="P">1</Compiler>
+      <Compiler Name="Q">0</Compiler>
+      <Compiler Name="R">0</Compiler>
+      <Compiler Name="S">0</Compiler>
+      <Compiler Name="T">0</Compiler>
+      <Compiler Name="U">0</Compiler>
+      <Compiler Name="V">1</Compiler>
+      <Compiler Name="W">0</Compiler>
+      <Compiler Name="X">1</Compiler>
+      <Compiler Name="Y">1</Compiler>
+      <Compiler Name="Z">1</Compiler>
+      <Compiler Name="ShowHints">True</Compiler>
+      <Compiler Name="ShowWarnings">True</Compiler>
+      <Compiler Name="UnitAliases">WinTypes=Windows;WinProcs=Windows;DbiTypes=BDE;DbiProcs=BDE;DbiErrs=BDE;</Compiler>
+      <Compiler Name="NamespacePrefix"></Compiler>
+      <Compiler Name="GenerateDocumentation">False</Compiler>
+      <Compiler Name="DefaultNamespace"></Compiler>
+      <Compiler Name="SymbolDeprecated">True</Compiler>
+      <Compiler Name="SymbolLibrary">True</Compiler>
+      <Compiler Name="SymbolPlatform">True</Compiler>
+      <Compiler Name="SymbolExperimental">True</Compiler>
+      <Compiler Name="UnitLibrary">True</Compiler>
+      <Compiler Name="UnitPlatform">True</Compiler>
+      <Compiler Name="UnitDeprecated">True</Compiler>
+      <Compiler Name="UnitExperimental">True</Compiler>
+      <Compiler Name="HResultCompat">True</Compiler>
+      <Compiler Name="HidingMember">True</Compiler>
+      <Compiler Name="HiddenVirtual">True</Compiler>
+      <Compiler Name="Garbage">True</Compiler>
+      <Compiler Name="BoundsError">True</Compiler>
+      <Compiler Name="ZeroNilCompat">True</Compiler>
+      <Compiler Name="StringConstTruncated">True</Compiler>
+      <Compiler Name="ForLoopVarVarPar">True</Compiler>
+      <Compiler Name="TypedConstVarPar">True</Compiler>
+      <Compiler Name="AsgToTypedConst">True</Compiler>
+      <Compiler Name="CaseLabelRange">True</Compiler>
+      <Compiler Name="ForVariable">True</Compiler>
+      <Compiler Name="ConstructingAbstract">True</Compiler>
+      <Compiler Name="ComparisonFalse">True</Compiler>
+      <Compiler Name="ComparisonTrue">True</Compiler>
+      <Compiler Name="ComparingSignedUnsigned">True</Compiler>
+      <Compiler Name="CombiningSignedUnsigned">True</Compiler>
+      <Compiler Name="UnsupportedConstruct">True</Compiler>
+      <Compiler Name="FileOpen">True</Compiler>
+      <Compiler Name="FileOpenUnitSrc">True</Compiler>
+      <Compiler Name="BadGlobalSymbol">True</Compiler>
+      <Compiler Name="DuplicateConstructorDestructor">True</Compiler>
+      <Compiler Name="InvalidDirective">True</Compiler>
+      <Compiler Name="PackageNoLink">True</Compiler>
+      <Compiler Name="PackageThreadVar">True</Compiler>
+      <Compiler Name="ImplicitImport">True</Compiler>
+      <Compiler Name="HPPEMITIgnored">True</Compiler>
+      <Compiler Name="NoRetVal">True</Compiler>
+      <Compiler Name="UseBeforeDef">True</Compiler>
+      <Compiler Name="ForLoopVarUndef">True</Compiler>
+      <Compiler Name="UnitNameMismatch">True</Compiler>
+      <Compiler Name="NoCFGFileFound">True</Compiler>
+      <Compiler Name="MessageDirective">True</Compiler>
+      <Compiler Name="ImplicitVariants">True</Compiler>
+      <Compiler Name="UnicodeToLocale">True</Compiler>
+      <Compiler Name="LocaleToUnicode">True</Compiler>
+      <Compiler Name="ImagebaseMultiple">True</Compiler>
+      <Compiler Name="SuspiciousTypecast">True</Compiler>
+      <Compiler Name="PrivatePropAccessor">True</Compiler>
+      <Compiler Name="UnsafeType">False</Compiler>
+      <Compiler Name="UnsafeCode">False</Compiler>
+      <Compiler Name="UnsafeCast">False</Compiler>
+      <Compiler Name="OptionTruncated">True</Compiler>
+      <Compiler Name="WideCharReduced">True</Compiler>
+      <Compiler Name="DuplicatesIgnored">True</Compiler>
+    </Compiler>
+    <Linker>
+      <Linker Name="MapFile">0</Linker>
+      <Linker Name="OutputObjs">0</Linker>
+      <Linker Name="ConsoleApp">1</Linker>
+      <Linker Name="DebugInfo">False</Linker>
+      <Linker Name="RemoteSymbols">False</Linker>
+      <Linker Name="GenerateDRC">False</Linker>
+      <Linker Name="MinStackSize">16384</Linker>
+      <Linker Name="MaxStackSize">1048576</Linker>
+      <Linker Name="ImageBase">4194304</Linker>
+      <Linker Name="ExeDescription"></Linker>
+    </Linker>
+    <Directories>
+      <Directories Name="OutputDir"></Directories>
+      <Directories Name="UnitOutputDir"></Directories>
+      <Directories Name="PackageDLLOutputDir"></Directories>
+      <Directories Name="PackageDCPOutputDir"></Directories>
+      <Directories Name="SearchPath"></Directories>
+      <Directories Name="Packages"></Directories>
+      <Directories Name="Conditionals"></Directories>
+      <Directories Name="DebugSourceDirs"></Directories>
+      <Directories Name="UsePackages">False</Directories>
+    </Directories>
+    <Parameters>
+      <Parameters Name="RunParams"></Parameters>
+      <Parameters Name="HostApplication"></Parameters>
+      <Parameters Name="Launcher"></Parameters>
+      <Parameters Name="UseLauncher">False</Parameters>
+      <Parameters Name="DebugCWD"></Parameters>
+      <Parameters Name="RemoteHost"></Parameters>
+      <Parameters Name="RemotePath"></Parameters>
+      <Parameters Name="RemoteLauncher"></Parameters>
+      <Parameters Name="RemoteCWD"></Parameters>
+      <Parameters Name="RemoteDebug">False</Parameters>
+    </Parameters>
+    <Language>
+      <Language Name="ActiveLang"></Language>
+      <Language Name="ProjectLang">$00000000</Language>
+      <Language Name="RootDir"></Language>
+    </Language>
+    <VersionInfo>
+      <VersionInfo Name="IncludeVerInfo">False</VersionInfo>
+      <VersionInfo Name="AutoIncBuild">False</VersionInfo>
+      <VersionInfo Name="MajorVer">1</VersionInfo>
+      <VersionInfo Name="MinorVer">0</VersionInfo>
+      <VersionInfo Name="Release">0</VersionInfo>
+      <VersionInfo Name="Build">0</VersionInfo>
+      <VersionInfo Name="Debug">False</VersionInfo>
+      <VersionInfo Name="PreRelease">False</VersionInfo>
+      <VersionInfo Name="Special">False</VersionInfo>
+      <VersionInfo Name="Private">False</VersionInfo>
+      <VersionInfo Name="DLL">False</VersionInfo>
+      <VersionInfo Name="Locale">1033</VersionInfo>
+      <VersionInfo Name="CodePage">1252</VersionInfo>
+    </VersionInfo>
+    <VersionInfoKeys>
+      <VersionInfoKeys Name="CompanyName"></VersionInfoKeys>
+      <VersionInfoKeys Name="FileDescription"></VersionInfoKeys>
+      <VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys>
+      <VersionInfoKeys Name="InternalName"></VersionInfoKeys>
+      <VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys>
+      <VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys>
+      <VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys>
+      <VersionInfoKeys Name="ProductName"></VersionInfoKeys>
+      <VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys>
+      <VersionInfoKeys Name="Comments"></VersionInfoKeys>
+    </VersionInfoKeys>
+  </Delphi.Personality>
+</BorlandProject>
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/_Client/$PRJNAMEClient.dpr b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/_Client/$PRJNAMEClient.dpr
new file mode 100644
index 0000000..980806e
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/_Client/$PRJNAMEClient.dpr	
@@ -0,0 +1,14 @@
+program $PRJNAMEClient;
+
+uses
+  uROComInit,
+  Forms,
+  fClientForm in 'fClientForm.pas' {ClientForm};
+
+{$R *.res}
+
+begin
+  Application.Initialize;
+  Application.CreateForm(TClientForm, ClientForm);
+  Application.Run;
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/_Client/$PRJNAMEClient.res b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/_Client/$PRJNAMEClient.res
new file mode 100644
index 0000000..0f940ed
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/_Client/$PRJNAMEClient.res differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/_Client/$PRJNAMEGroup.bpg b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/_Client/$PRJNAMEGroup.bpg
new file mode 100644
index 0000000..dbb4e14
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/_Client/$PRJNAMEGroup.bpg	
@@ -0,0 +1,21 @@
+#------------------------------------------------------------------------------
+VERSION = BWS.01
+#------------------------------------------------------------------------------
+!ifndef ROOT
+ROOT = $(MAKEDIR)\..
+!endif
+#------------------------------------------------------------------------------
+MAKE = $(ROOT)\bin\make.exe -$(MAKEFLAGS) -f$**
+DCC = $(ROOT)\bin\dcc32.exe $**
+BRCC = $(ROOT)\bin\brcc32.exe $**
+#------------------------------------------------------------------------------
+PROJECTS = $PRJNAME.exe $PRJNAMEClient.exe 
+#------------------------------------------------------------------------------
+default: $(PROJECTS)
+#------------------------------------------------------------------------------
+
+$PRJNAME.exe: $PRJNAME.dpr
+  $(DCC)
+
+$PRJNAMEClient.exe: $PRJNAMEClient.dpr
+  $(DCC)
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/_Client/fClientForm.dfm b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/_Client/fClientForm.dfm
new file mode 100644
index 0000000..8d0da7f
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/_Client/fClientForm.dfm	
@@ -0,0 +1,34 @@
+object ClientForm: TClientForm
+  Left = 372
+  Top = 277
+  Width = 400
+  Height = 340
+  Caption = 'RemObjects Client'
+  ClientHeight = 64
+  ClientWidth = 228
+  Color = clBtnFace
+  Font.Charset = DEFAULT_CHARSET
+  Font.Color = clWindowText
+  Font.Height = -11
+  Font.Style = []
+  ParentFont = True
+  OldCreateOrder = False
+  PixelsPerInch = 96
+  Position = poScreenCenter
+  TextHeight = 14
+  object ROMessage: TRO$MSGCLSNAME
+    Left = 36
+    Top = 8
+  end
+  object ROChannel: TRO$CHNCLSNAME
+    Left = 8
+    Top = 8
+  end
+  object RORemoteService: TRORemoteService
+    Message = ROMessage
+    Channel = ROChannel
+    ServiceName = '$SVCNAME'
+    Left = 64
+    Top = 8
+  end
+end
\ No newline at end of file
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/_Client/fClientForm.pas b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/_Client/fClientForm.pas
new file mode 100644
index 0000000..f4c3c9b
--- /dev/null
+++ b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Templates/_Client/fClientForm.pas	
@@ -0,0 +1,38 @@
+unit fClientForm;
+
+interface
+
+uses
+  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls,
+  uROClient, uROClientIntf, uRORemoteService, $MESSAGEUNIT, $CHANNELUNIT;
+
+type
+  TClientForm = class(TForm)
+    ROMessage: TRO$MSGCLSNAME;
+    ROChannel: TRO$CHNCLSNAME;
+    RORemoteService: TRORemoteService;
+  private
+    { Private declarations }
+  public
+    { Public declarations }
+  end;
+
+var
+  ClientForm: TClientForm;
+
+implementation
+
+{
+  The unit $SVCLIBNAME_Intf.pas will be generated by the RemObjects preprocessor the first time you
+  compile your server application. Make sure to do that before trying to compile the client.
+
+  To invoke your server simply typecast your server to the name of the service interface like this:
+
+      (RORemoteService as I$SVCNAME).Sum(1,2)
+}
+
+uses $SVCLIBNAME_Intf; 
+
+{$R *.dfm}
+
+end.
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/Thumbs.db b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Thumbs.db
new file mode 100644
index 0000000..b210061
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/Thumbs.db differ
diff --git a/internal/5.0.35.741/1/RemObjects SDK for Delphi/ro.png b/internal/5.0.35.741/1/RemObjects SDK for Delphi/ro.png
new file mode 100644
index 0000000..a7dc1ae
Binary files /dev/null and b/internal/5.0.35.741/1/RemObjects SDK for Delphi/ro.png differ